diff --git a/emacs/.emacs.d/.lsp-session-v1 b/emacs/.emacs.d/.lsp-session-v1
new file mode 100644
index 0000000..4bb1785
--- /dev/null
+++ b/emacs/.emacs.d/.lsp-session-v1
@@ -0,0 +1 @@
+#s(lsp-session ("/home/mmarcos/Projects/testing_lsp_c" "/home/mmarcos/Projects/testing_lsp_verilog" "/home/mmarcos/Projects/testing_lsp_python") nil #s(hash-table size 65 test equal rehash-size 1.5 rehash-threshold 0.8125 data (pyright ("/home/mmarcos/Projects/testing_lsp_python"))) #s(hash-table size 65 test equal rehash-size 1.5 rehash-threshold 0.8125 data ()) #s(hash-table size 65 test equal rehash-size 1.5 rehash-threshold 0.8125 data ()))
\ No newline at end of file
diff --git a/emacs/.emacs.d/auto-save-list/.saves-146383-BSC-848818480~ b/emacs/.emacs.d/auto-save-list/.saves-146383-BSC-848818480~
new file mode 100644
index 0000000..2747427
--- /dev/null
+++ b/emacs/.emacs.d/auto-save-list/.saves-146383-BSC-848818480~
@@ -0,0 +1,8 @@
+/home/mmarcos/Projects/testing_lsp_python/main.py
+/home/mmarcos/Projects/testing_lsp_python/#main.py#
+/home/mmarcos/.emacs.d/init.el
+/home/mmarcos/.emacs.d/#init.el#
+/home/mmarcos/Projects/testing_lsp_verilog/main.sv
+/home/mmarcos/Projects/testing_lsp_verilog/#main.sv#
+/home/mmarcos/Projects/testing_lsp_python/.#main.py
+/home/mmarcos/Projects/testing_lsp_python/#.#main.py#
diff --git a/emacs/.emacs.d/auto-save-list/.saves-190103-BSC-848818480~ b/emacs/.emacs.d/auto-save-list/.saves-190103-BSC-848818480~
new file mode 100644
index 0000000..34e92d9
--- /dev/null
+++ b/emacs/.emacs.d/auto-save-list/.saves-190103-BSC-848818480~
@@ -0,0 +1,24 @@
+/home/mmarcos/Projects/aoc_rv64/screen.S
+/home/mmarcos/Projects/aoc_rv64/#screen.S#
+/home/mmarcos/.emacs.d/init.el
+/home/mmarcos/.emacs.d/#init.el#
+/home/mmarcos/Nextcloud/OrgVault/china/verification-progress.org
+/home/mmarcos/Nextcloud/OrgVault/china/#verification-progress.org#
+/home/mmarcos/Projects/zvkned_generator/main.zig
+/home/mmarcos/Projects/zvkned_generator/#main.zig#
+/home/mmarcos/Nextcloud/OrgVault/china/finding_the_bug.org
+/home/mmarcos/Nextcloud/OrgVault/china/#finding_the_bug.org#
+/home/mmarcos/Projects/testing_lsp_verilog/main.sv
+/home/mmarcos/Projects/testing_lsp_verilog/#main.sv#
+/home/mmarcos/Projects/testing_lsp_verilog/main.sc
+/home/mmarcos/Projects/testing_lsp_verilog/#main.sc#
+/home/mmarcos/Projects/testing_lsp_c/main.c
+/home/mmarcos/Projects/testing_lsp_c/#main.c#
+/home/mmarcos/Projects/testing_lsp_python/main.py
+/home/mmarcos/Projects/testing_lsp_python/#main.py#
+/home/mmarcos/Nextcloud/OrgVault/books/reading-list.org
+/home/mmarcos/Nextcloud/OrgVault/books/#reading-list.org#
+/home/mmarcos/Nextcloud/OrgVault/random_notes/changing_to_debian.org
+/home/mmarcos/Nextcloud/OrgVault/random_notes/#changing_to_debian.org#
+/home/mmarcos/Nextcloud/OrgVault/testing_tutorial/Tasks.org
+/home/mmarcos/Nextcloud/OrgVault/testing_tutorial/#Tasks.org#
diff --git a/emacs/.emacs.d/auto-save-list/.saves-52982-BSC-848818480~ b/emacs/.emacs.d/auto-save-list/.saves-52982-BSC-848818480~
new file mode 100644
index 0000000..2a95d86
--- /dev/null
+++ b/emacs/.emacs.d/auto-save-list/.saves-52982-BSC-848818480~
@@ -0,0 +1,2 @@
+/home/mmarcos/learning_emacs/systems_crafters/init.el
+/home/mmarcos/learning_emacs/systems_crafters/#init.el#
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/add-log-cb3c2979-e74c1477.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/add-log-cb3c2979-e74c1477.eln
new file mode 100755
index 0000000..c6ccbae
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/add-log-cb3c2979-e74c1477.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/all-the-icons-4e496a22-a0aaf60a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/all-the-icons-4e496a22-a0aaf60a.eln
new file mode 100755
index 0000000..80f88ad
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/all-the-icons-4e496a22-a0aaf60a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ansi-color-75eac800-77130f12.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ansi-color-75eac800-77130f12.eln
new file mode 100755
index 0000000..ada1016
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ansi-color-75eac800-77130f12.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ansi-osc-b447f6a8-a7225f73.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ansi-osc-b447f6a8-a7225f73.eln
new file mode 100755
index 0000000..4075347
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ansi-osc-b447f6a8-a7225f73.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/arc-mode-bac5621c-20782811.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/arc-mode-bac5621c-20782811.eln
new file mode 100755
index 0000000..5a52445
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/arc-mode-bac5621c-20782811.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/asm-mode-e341f82a-33b55612.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/asm-mode-e341f82a-33b55612.eln
new file mode 100755
index 0000000..0c0a614
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/asm-mode-e341f82a-33b55612.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/auth-source-49df7eef-60daa0bc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/auth-source-49df7eef-60daa0bc.eln
new file mode 100755
index 0000000..30d5c86
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/auth-source-49df7eef-60daa0bc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/autorevert-841d6890-205e26f8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/autorevert-841d6890-205e26f8.eln
new file mode 100755
index 0000000..4083bc4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/autorevert-841d6890-205e26f8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/avl-tree-508a9d96-60873164.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/avl-tree-508a9d96-60873164.eln
new file mode 100755
index 0000000..5892966
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/avl-tree-508a9d96-60873164.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/backtrace-f58a28c5-d16b8595.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/backtrace-f58a28c5-d16b8595.eln
new file mode 100755
index 0000000..73c1ccb
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/backtrace-f58a28c5-d16b8595.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/benchmark-0e5ff0c6-231cff7e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/benchmark-0e5ff0c6-231cff7e.eln
new file mode 100755
index 0000000..7a110c6
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/benchmark-0e5ff0c6-231cff7e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bibtex-2f037630-0b05b6a4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bibtex-2f037630-0b05b6a4.eln
new file mode 100755
index 0000000..1127512
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bibtex-2f037630-0b05b6a4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bind-key-4b5c7f25-8f1a5aac.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bind-key-4b5c7f25-8f1a5aac.eln
new file mode 100755
index 0000000..903e909
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bind-key-4b5c7f25-8f1a5aac.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bookmark-8667481e-92b22845.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bookmark-8667481e-92b22845.eln
new file mode 100755
index 0000000..aa65482
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bookmark-8667481e-92b22845.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/browse-url-87f72988-0ed347e6.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/browse-url-87f72988-0ed347e6.eln
new file mode 100755
index 0000000..3646e60
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/browse-url-87f72988-0ed347e6.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bug-reference-79735dad-0cabd526.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bug-reference-79735dad-0cabd526.eln
new file mode 100755
index 0000000..3345439
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/bug-reference-79735dad-0cabd526.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cal-iso-8ac36734-7fdf0633.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cal-iso-8ac36734-7fdf0633.eln
new file mode 100755
index 0000000..0d43095
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cal-iso-8ac36734-7fdf0633.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cal-menu-9380b697-3e588465.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cal-menu-9380b697-3e588465.eln
new file mode 100755
index 0000000..ed044fd
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cal-menu-9380b697-3e588465.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cal-move-aed18331-d5a24e7b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cal-move-aed18331-d5a24e7b.eln
new file mode 100755
index 0000000..5e1f1b0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cal-move-aed18331-d5a24e7b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/calendar-d19e5c14-001ac5c3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/calendar-d19e5c14-001ac5c3.eln
new file mode 100755
index 0000000..a7cbfa8
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/calendar-d19e5c14-001ac5c3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-align-bb265728-7a9b512c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-align-bb265728-7a9b512c.eln
new file mode 100755
index 0000000..bf23c07
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-align-bb265728-7a9b512c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-cmds-9eab15be-4be4da0a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-cmds-9eab15be-4be4da0a.eln
new file mode 100755
index 0000000..7c0adb2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-cmds-9eab15be-4be4da0a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-defs-029877ca-450944c8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-defs-029877ca-450944c8.eln
new file mode 100755
index 0000000..a4b947d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-defs-029877ca-450944c8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-engine-ccfcb170-ebf99546.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-engine-ccfcb170-ebf99546.eln
new file mode 100755
index 0000000..6a883c3
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-engine-ccfcb170-ebf99546.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-fonts-d7d8a7f5-77910d83.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-fonts-d7d8a7f5-77910d83.eln
new file mode 100755
index 0000000..d0bcf49
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-fonts-d7d8a7f5-77910d83.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-guess-fa39ca73-2b4ed413.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-guess-fa39ca73-2b4ed413.eln
new file mode 100755
index 0000000..7fb1e84
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-guess-fa39ca73-2b4ed413.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-langs-de47cd28-0d0a3fd8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-langs-de47cd28-0d0a3fd8.eln
new file mode 100755
index 0000000..4055841
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-langs-de47cd28-0d0a3fd8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-menus-d370fa63-0cdaf793.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-menus-d370fa63-0cdaf793.eln
new file mode 100755
index 0000000..6fc9091
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-menus-d370fa63-0cdaf793.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-mode-515a98a5-29b249e0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-mode-515a98a5-29b249e0.eln
new file mode 100755
index 0000000..8da2f2b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-mode-515a98a5-29b249e0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-styles-e4992978-af868f44.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-styles-e4992978-af868f44.eln
new file mode 100755
index 0000000..645ad18
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-styles-e4992978-af868f44.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-vars-6cc3f0fc-e5e50404.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-vars-6cc3f0fc-e5e50404.eln
new file mode 100755
index 0000000..6fb6dff
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cc-vars-6cc3f0fc-e5e50404.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-51cb6d6a-316a335b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-51cb6d6a-316a335b.eln
new file mode 100755
index 0000000..6bad574
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-51cb6d6a-316a335b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-extra-d7051cba-75626f5f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-extra-d7051cba-75626f5f.eln
new file mode 100755
index 0000000..becb89b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-extra-d7051cba-75626f5f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-lib-8b938900-e3ab682c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-lib-8b938900-e3ab682c.eln
new file mode 100755
index 0000000..1e32456
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-lib-8b938900-e3ab682c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-macs-7ae82f81-76be1959.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-macs-7ae82f81-76be1959.eln
new file mode 100755
index 0000000..5981733
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-macs-7ae82f81-76be1959.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-seq-f464c4e2-46ed09e4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-seq-f464c4e2-46ed09e4.eln
new file mode 100755
index 0000000..5809700
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cl-seq-f464c4e2-46ed09e4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/closql-47e993d6-c923176d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/closql-47e993d6-c923176d.eln
new file mode 100755
index 0000000..d14414b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/closql-47e993d6-c923176d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/colir-7a3f17ac-ea77557b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/colir-7a3f17ac-ea77557b.eln
new file mode 100755
index 0000000..5a5fc97
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/colir-7a3f17ac-ea77557b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/color-9d7980a5-959c9da9.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/color-9d7980a5-959c9da9.eln
new file mode 100755
index 0000000..e3d0f24
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/color-9d7980a5-959c9da9.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/comint-faef15ad-ca88e19f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/comint-faef15ad-ca88e19f.eln
new file mode 100755
index 0000000..35c745f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/comint-faef15ad-ca88e19f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/command-log-mode-ac5ed6bb-53bc4c52.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/command-log-mode-ac5ed6bb-53bc4c52.eln
new file mode 100755
index 0000000..e186edc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/command-log-mode-ac5ed6bb-53bc4c52.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-bbdb-d98d09e8-91c0dccf.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-bbdb-d98d09e8-91c0dccf.eln
new file mode 100755
index 0000000..2506807
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-bbdb-d98d09e8-91c0dccf.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-capf-fab6078b-d8e05cbb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-capf-fab6078b-d8e05cbb.eln
new file mode 100755
index 0000000..33092fb
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-capf-fab6078b-d8e05cbb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-clang-34a26b4e-bc88454d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-clang-34a26b4e-bc88454d.eln
new file mode 100755
index 0000000..c7a54dc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-clang-34a26b4e-bc88454d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-cmake-66b385a0-a6ca4a59.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-cmake-66b385a0-a6ca4a59.eln
new file mode 100755
index 0000000..0fc4f09
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-cmake-66b385a0-a6ca4a59.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-d1520a0e-af2ac6e7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-d1520a0e-af2ac6e7.eln
new file mode 100755
index 0000000..820c304
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-d1520a0e-af2ac6e7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-dabbrev-570c1998-98d8656d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-dabbrev-570c1998-98d8656d.eln
new file mode 100755
index 0000000..fc1d8e1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-dabbrev-570c1998-98d8656d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-dabbrev-code-e525200b-b69191ff.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-dabbrev-code-e525200b-b69191ff.eln
new file mode 100755
index 0000000..633efff
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-dabbrev-code-e525200b-b69191ff.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-etags-1c8be5f9-b9e58efb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-etags-1c8be5f9-b9e58efb.eln
new file mode 100755
index 0000000..8920001
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-etags-1c8be5f9-b9e58efb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-files-1e7107d5-db4b097a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-files-1e7107d5-db4b097a.eln
new file mode 100755
index 0000000..d62c97d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-files-1e7107d5-db4b097a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-gtags-48ca9c1e-db3f0de4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-gtags-48ca9c1e-db3f0de4.eln
new file mode 100755
index 0000000..21514a2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-gtags-48ca9c1e-db3f0de4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-keywords-e6a48db2-0a7ba751.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-keywords-e6a48db2-0a7ba751.eln
new file mode 100755
index 0000000..ca4d3c8
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-keywords-e6a48db2-0a7ba751.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-oddmuse-5d5ccac7-6731a06a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-oddmuse-5d5ccac7-6731a06a.eln
new file mode 100755
index 0000000..39b12d2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-oddmuse-5d5ccac7-6731a06a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-semantic-47dad940-13ae21a9.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-semantic-47dad940-13ae21a9.eln
new file mode 100755
index 0000000..1f76b07
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-semantic-47dad940-13ae21a9.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-template-8da238e8-18d25400.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-template-8da238e8-18d25400.eln
new file mode 100755
index 0000000..6fb838c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/company-template-8da238e8-18d25400.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/compat-30-f6193482-d1838c9b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/compat-30-f6193482-d1838c9b.eln
new file mode 100755
index 0000000..a3897a6
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/compat-30-f6193482-d1838c9b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/compat-31-dd021d73-feac4dd5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/compat-31-dd021d73-feac4dd5.eln
new file mode 100755
index 0000000..b8c2e36
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/compat-31-dd021d73-feac4dd5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/compile-91e1c2a0-f110e6b2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/compile-91e1c2a0-f110e6b2.eln
new file mode 100755
index 0000000..9f5f5e5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/compile-91e1c2a0-f110e6b2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cond-let-8529b7d7-a3365f34.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cond-let-8529b7d7-a3365f34.eln
new file mode 100755
index 0000000..2bac71d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cond-let-8529b7d7-a3365f34.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/counsel-ac6d9939-8abc4c68.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/counsel-ac6d9939-8abc4c68.eln
new file mode 100755
index 0000000..9558b6a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/counsel-ac6d9939-8abc4c68.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/counsel-projectile-3a305476-8d88e273.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/counsel-projectile-3a305476-8d88e273.eln
new file mode 100755
index 0000000..8d71bcc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/counsel-projectile-3a305476-8d88e273.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/crm-f08665f2-b1b569da.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/crm-f08665f2-b1b569da.eln
new file mode 100755
index 0000000..903ea66
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/crm-f08665f2-b1b569da.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cua-base-52b0df84-1b1be306.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cua-base-52b0df84-1b1be306.eln
new file mode 100755
index 0000000..64f1c8e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cua-base-52b0df84-1b1be306.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cursor-sensor-54079dab-f6b7579c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cursor-sensor-54079dab-f6b7579c.eln
new file mode 100755
index 0000000..2f065b0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cursor-sensor-54079dab-f6b7579c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cus-edit-3cd01345-421e12c1.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cus-edit-3cd01345-421e12c1.eln
new file mode 100755
index 0000000..e2ae3ad
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/cus-edit-3cd01345-421e12c1.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dabbrev-ed4e5147-1e9fc06d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dabbrev-ed4e5147-1e9fc06d.eln
new file mode 100755
index 0000000..5aa7a51
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dabbrev-ed4e5147-1e9fc06d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dash-ada1d0c2-6b841ef4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dash-ada1d0c2-6b841ef4.eln
new file mode 100755
index 0000000..db4bd0f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dash-ada1d0c2-6b841ef4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dbus-f1406cab-2768001b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dbus-f1406cab-2768001b.eln
new file mode 100755
index 0000000..51de581
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dbus-f1406cab-2768001b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/debian-ispell-6348c193-8c8887e4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/debian-ispell-6348c193-8c8887e4.eln
new file mode 100755
index 0000000..a5971d2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/debian-ispell-6348c193-8c8887e4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/debian-startup-709b84bb-734d0b9f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/debian-startup-709b84bb-734d0b9f.eln
new file mode 100755
index 0000000..86b89ce
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/debian-startup-709b84bb-734d0b9f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/debug-bee52b4d-530cea6a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/debug-bee52b4d-530cea6a.eln
new file mode 100755
index 0000000..f9d2868
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/debug-bee52b4d-530cea6a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/delsel-1c603c42-6c66f34b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/delsel-1c603c42-6c66f34b.eln
new file mode 100755
index 0000000..3204b93
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/delsel-1c603c42-6c66f34b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/derived-381801a7-9e7def6b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/derived-381801a7-9e7def6b.eln
new file mode 100755
index 0000000..4f7e564
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/derived-381801a7-9e7def6b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/diary-lib-57afc63e-c7393e9a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/diary-lib-57afc63e-c7393e9a.eln
new file mode 100755
index 0000000..f98d1f3
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/diary-lib-57afc63e-c7393e9a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/diff-b728f3ea-11851209.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/diff-b728f3ea-11851209.eln
new file mode 100755
index 0000000..dc2dde7
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/diff-b728f3ea-11851209.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/diff-mode-ac82991e-87747c49.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/diff-mode-ac82991e-87747c49.eln
new file mode 100755
index 0000000..1bd8a0c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/diff-mode-ac82991e-87747c49.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dig-9eb56850-c8a75ee7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dig-9eb56850-c8a75ee7.eln
new file mode 100755
index 0000000..b4e0579
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dig-9eb56850-c8a75ee7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dired-6a3ae2bc-826d47ef.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dired-6a3ae2bc-826d47ef.eln
new file mode 100755
index 0000000..a86fc31
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dired-6a3ae2bc-826d47ef.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dired-aux-1ff8c91a-b2a693fb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dired-aux-1ff8c91a-b2a693fb.eln
new file mode 100755
index 0000000..6069810
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dired-aux-1ff8c91a-b2a693fb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/display-line-numbers-1d060f2e-5f0d5a4e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/display-line-numbers-1d060f2e-5f0d5a4e.eln
new file mode 100755
index 0000000..a3eb0b7
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/display-line-numbers-1d060f2e-5f0d5a4e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dns-af8d8a40-87897a08.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dns-af8d8a40-87897a08.eln
new file mode 100755
index 0000000..77f502c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dns-af8d8a40-87897a08.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doc-view-164df236-b338f758.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doc-view-164df236-b338f758.eln
new file mode 100755
index 0000000..398c966
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doc-view-164df236-b338f758.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dom-a7939831-162984e5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dom-a7939831-162984e5.eln
new file mode 100755
index 0000000..627a915
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/dom-a7939831-162984e5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-core-4d3089d6-ee1f0c7a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-core-4d3089d6-ee1f0c7a.eln
new file mode 100755
index 0000000..a24408f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-core-4d3089d6-ee1f0c7a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-e3a20e86-edab1384.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-e3a20e86-edab1384.eln
new file mode 100755
index 0000000..45f0c5a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-e3a20e86-edab1384.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-env-2e5740a2-ee4ab6e7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-env-2e5740a2-ee4ab6e7.eln
new file mode 100755
index 0000000..e187569
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-env-2e5740a2-ee4ab6e7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-segments-5369ec78-06a0187a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-segments-5369ec78-06a0187a.eln
new file mode 100755
index 0000000..1ce92c0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-modeline-segments-5369ec78-06a0187a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-themes-c2701eec-94a9ed26.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-themes-c2701eec-94a9ed26.eln
new file mode 100755
index 0000000..fd12d7a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/doom-themes-c2701eec-94a9ed26.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/easy-mmode-5bf0223e-f980579b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/easy-mmode-5bf0223e-f980579b.eln
new file mode 100755
index 0000000..3be472e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/easy-mmode-5bf0223e-f980579b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/edebug-ddc96ebf-e45e144c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/edebug-ddc96ebf-e45e144c.eln
new file mode 100755
index 0000000..f2e85c8
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/edebug-ddc96ebf-e45e144c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-a80490ec-cc88ec8e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-a80490ec-cc88ec8e.eln
new file mode 100755
index 0000000..d9d34b5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-a80490ec-cc88ec8e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-diff-2b0d2962-baf04dc3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-diff-2b0d2962-baf04dc3.eln
new file mode 100755
index 0000000..a1c3271
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-diff-2b0d2962-baf04dc3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-help-c2ff7acc-8fa6e0e0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-help-c2ff7acc-8fa6e0e0.eln
new file mode 100755
index 0000000..b3f0eb5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-help-c2ff7acc-8fa6e0e0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-init-40528864-a2bd4e1b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-init-40528864-a2bd4e1b.eln
new file mode 100755
index 0000000..06da279
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-init-40528864-a2bd4e1b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-merg-1145ff14-4bdc9fd1.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-merg-1145ff14-4bdc9fd1.eln
new file mode 100755
index 0000000..baf9c66
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-merg-1145ff14-4bdc9fd1.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-mult-be31dada-96600dd6.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-mult-be31dada-96600dd6.eln
new file mode 100755
index 0000000..bb7dee6
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-mult-be31dada-96600dd6.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-util-4e7ed67c-473d640e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-util-4e7ed67c-473d640e.eln
new file mode 100755
index 0000000..e2bb1e4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-util-4e7ed67c-473d640e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-wind-af98f9ef-603e1f08.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-wind-af98f9ef-603e1f08.eln
new file mode 100755
index 0000000..09b66cf
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ediff-wind-af98f9ef-603e1f08.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/edmacro-74bf45a3-f136a773.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/edmacro-74bf45a3-f136a773.eln
new file mode 100755
index 0000000..8b644d1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/edmacro-74bf45a3-f136a773.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-0db8d1d4-430e1776.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-0db8d1d4-430e1776.eln
new file mode 100755
index 0000000..eca2f56
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-0db8d1d4-430e1776.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-base-3621993d-6924c89c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-base-3621993d-6924c89c.eln
new file mode 100755
index 0000000..2d1ca7a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-base-3621993d-6924c89c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-core-63c05904-01ab2e35.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-core-63c05904-01ab2e35.eln
new file mode 100755
index 0000000..357a629
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-core-63c05904-01ab2e35.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-custom-9d4d8f82-e806b83f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-custom-9d4d8f82-e806b83f.eln
new file mode 100755
index 0000000..51f328b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eieio-custom-9d4d8f82-e806b83f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/elisp-refs-f817ce7f-21e7937c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/elisp-refs-f817ce7f-21e7937c.eln
new file mode 100755
index 0000000..48b200c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/elisp-refs-f817ce7f-21e7937c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/elp-7220055f-e2361f7b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/elp-7220055f-e2361f7b.eln
new file mode 100755
index 0000000..0f68ffe
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/elp-7220055f-e2361f7b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/em-prompt-cecb9e99-9ff36352.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/em-prompt-cecb9e99-9ff36352.eln
new file mode 100755
index 0000000..be75d91
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/em-prompt-cecb9e99-9ff36352.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-compiler-84f4643c-d4fac107.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-compiler-84f4643c-d4fac107.eln
new file mode 100755
index 0000000..a249205
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-compiler-84f4643c-d4fac107.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-ef5d2b84-6a0dd9ce.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-ef5d2b84-6a0dd9ce.eln
new file mode 100755
index 0000000..abe91ec
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-ef5d2b84-6a0dd9ce.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-sqlite-152bc4e6-56cd6426.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-sqlite-152bc4e6-56cd6426.eln
new file mode 100755
index 0000000..93bcedf
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-sqlite-152bc4e6-56cd6426.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-sqlite-builtin-80d56bcc-c0acd533.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-sqlite-builtin-80d56bcc-c0acd533.eln
new file mode 100755
index 0000000..9a19c3f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/emacsql-sqlite-builtin-80d56bcc-c0acd533.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-api-f481048d-1cd4e029.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-api-f481048d-1cd4e029.eln
new file mode 100755
index 0000000..67fa8e1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-api-f481048d-1cd4e029.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-f70a4d72-f12c6b11.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-f70a4d72-f12c6b11.eln
new file mode 100755
index 0000000..89acf00
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-f70a4d72-f12c6b11.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-lib-1f3b8f28-2eb7dd39.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-lib-1f3b8f28-2eb7dd39.eln
new file mode 100755
index 0000000..2b3c339
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-lib-1f3b8f28-2eb7dd39.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-notifications-c649136e-6110efd0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-notifications-c649136e-6110efd0.eln
new file mode 100755
index 0000000..353625a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-notifications-c649136e-6110efd0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-notify-3298e3d3-3c75f9c7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-notify-3298e3d3-3c75f9c7.eln
new file mode 100755
index 0000000..aa85146
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-notify-3298e3d3-3c75f9c7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-room-bde1df28-c89c7e77.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-room-bde1df28-c89c7e77.eln
new file mode 100755
index 0000000..a6904ad
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-room-bde1df28-c89c7e77.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-room-list-706d2033-ac8d9345.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-room-list-706d2033-ac8d9345.eln
new file mode 100755
index 0000000..632e8eb
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-room-list-706d2033-ac8d9345.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-structs-ee4bb60b-1dd6b5f0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-structs-ee4bb60b-1dd6b5f0.eln
new file mode 100755
index 0000000..088bee4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ement-structs-ee4bb60b-1dd6b5f0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/epa-bdd8ea1c-98cdb22c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/epa-bdd8ea1c-98cdb22c.eln
new file mode 100755
index 0000000..9e5d282
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/epa-bdd8ea1c-98cdb22c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/epg-config-78240760-b0601fc3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/epg-config-78240760-b0601fc3.eln
new file mode 100755
index 0000000..76f1b91
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/epg-config-78240760-b0601fc3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/epg-de089247-9a76b13f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/epg-de089247-9a76b13f.eln
new file mode 100755
index 0000000..1c4a3ad
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/epg-de089247-9a76b13f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-backend-86323103-08f366bc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-backend-86323103-08f366bc.eln
new file mode 100755
index 0000000..be99954
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-backend-86323103-08f366bc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-button-9c19b84a-66ed1738.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-button-9c19b84a-66ed1738.eln
new file mode 100755
index 0000000..86a0be4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-button-9c19b84a-66ed1738.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-common-6b830f02-05417530.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-common-6b830f02-05417530.eln
new file mode 100755
index 0000000..6b387c3
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-common-6b830f02-05417530.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-compat-89f33f49-97c6159a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-compat-89f33f49-97c6159a.eln
new file mode 100755
index 0000000..2a8d019
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-compat-89f33f49-97c6159a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-dc86a8e8-941784c8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-dc86a8e8-941784c8.eln
new file mode 100755
index 0000000..8f8ca0d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-dc86a8e8-941784c8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-fill-99b1b78f-c212265b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-fill-99b1b78f-c212265b.eln
new file mode 100755
index 0000000..bd4d6ba
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-fill-99b1b78f-c212265b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-goodies-3039f909-0a0a0760.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-goodies-3039f909-0a0a0760.eln
new file mode 100755
index 0000000..cdb138f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-goodies-3039f909-0a0a0760.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-join-023b2594-e797d255.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-join-023b2594-e797d255.eln
new file mode 100755
index 0000000..88c195c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-join-023b2594-e797d255.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-list-cd3d6912-7c338e67.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-list-cd3d6912-7c338e67.eln
new file mode 100755
index 0000000..b104b3b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-list-cd3d6912-7c338e67.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-match-8326cd86-75627fcb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-match-8326cd86-75627fcb.eln
new file mode 100755
index 0000000..91b5a69
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-match-8326cd86-75627fcb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-menu-d566e3a2-3fd8fe0d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-menu-d566e3a2-3fd8fe0d.eln
new file mode 100755
index 0000000..c692fe5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-menu-d566e3a2-3fd8fe0d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-netsplit-e31100b4-d1855850.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-netsplit-e31100b4-d1855850.eln
new file mode 100755
index 0000000..f8391b3
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-netsplit-e31100b4-d1855850.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-networks-99db3898-c5ff8ef3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-networks-99db3898-c5ff8ef3.eln
new file mode 100755
index 0000000..7174a7c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-networks-99db3898-c5ff8ef3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-pcomplete-f847cf3f-43781151.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-pcomplete-f847cf3f-43781151.eln
new file mode 100755
index 0000000..bb5df9e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-pcomplete-f847cf3f-43781151.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-ring-ba31d51e-196ad509.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-ring-ba31d51e-196ad509.eln
new file mode 100755
index 0000000..454d7ef
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-ring-ba31d51e-196ad509.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-spelling-5843a2f4-b41d77d5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-spelling-5843a2f4-b41d77d5.eln
new file mode 100755
index 0000000..00fca93
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-spelling-5843a2f4-b41d77d5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-stamp-6c2964ef-de1b7f3c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-stamp-6c2964ef-de1b7f3c.eln
new file mode 100755
index 0000000..2973d7a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-stamp-6c2964ef-de1b7f3c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-track-99327e2e-33e39b86.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-track-99327e2e-33e39b86.eln
new file mode 100755
index 0000000..09ff318
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/erc-track-99327e2e-33e39b86.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ert-786c6677-f9e26532.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ert-786c6677-f9e26532.eln
new file mode 100755
index 0000000..4b82db5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ert-786c6677-f9e26532.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ert-x-ac436b35-1f76dede.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ert-x-ac436b35-1f76dede.eln
new file mode 100755
index 0000000..cf6fae8
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ert-x-ac436b35-1f76dede.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-arg-8f74f3a2-eca8a5c2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-arg-8f74f3a2-eca8a5c2.eln
new file mode 100755
index 0000000..3033bc1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-arg-8f74f3a2-eca8a5c2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-cmd-40a07574-c4c9ff00.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-cmd-40a07574-c4c9ff00.eln
new file mode 100755
index 0000000..64d1bd1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-cmd-40a07574-c4c9ff00.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-ext-9adf61a7-5cfebda6.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-ext-9adf61a7-5cfebda6.eln
new file mode 100755
index 0000000..410070c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-ext-9adf61a7-5cfebda6.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-io-26247c62-8235676a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-io-26247c62-8235676a.eln
new file mode 100755
index 0000000..21df0d4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-io-26247c62-8235676a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-mode-29140b27-39d73eb6.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-mode-29140b27-39d73eb6.eln
new file mode 100755
index 0000000..ff16777
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-mode-29140b27-39d73eb6.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-module-367a7193-36e58493.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-module-367a7193-36e58493.eln
new file mode 100755
index 0000000..2e29981
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-module-367a7193-36e58493.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-opt-fcb0edfb-9b29c478.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-opt-fcb0edfb-9b29c478.eln
new file mode 100755
index 0000000..712eae5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-opt-fcb0edfb-9b29c478.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-proc-276ac638-6da16d28.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-proc-276ac638-6da16d28.eln
new file mode 100755
index 0000000..d81a408
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-proc-276ac638-6da16d28.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-util-7285fb2f-6ba85e7c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-util-7285fb2f-6ba85e7c.eln
new file mode 100755
index 0000000..632117a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/esh-util-7285fb2f-6ba85e7c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eshell-bb674bcd-e8b62257.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eshell-bb674bcd-e8b62257.eln
new file mode 100755
index 0000000..76494ce
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eshell-bb674bcd-e8b62257.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/etags-fc6f38d6-f99d36fc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/etags-fc6f38d6-f99d36fc.eln
new file mode 100755
index 0000000..857fb58
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/etags-fc6f38d6-f99d36fc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-arc-mode-6de536e9-9d0ccf5e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-arc-mode-6de536e9-9d0ccf5e.eln
new file mode 100755
index 0000000..ccd2c49
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-arc-mode-6de536e9-9d0ccf5e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-bookmark-00cb7736-ff30157a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-bookmark-00cb7736-ff30157a.eln
new file mode 100755
index 0000000..e2d859b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-bookmark-00cb7736-ff30157a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-buff-menu-e47cd28d-b8aad5ef.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-buff-menu-e47cd28d-b8aad5ef.eln
new file mode 100755
index 0000000..082b013
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-buff-menu-e47cd28d-b8aad5ef.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-calendar-2ed789bf-36f8a74f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-calendar-2ed789bf-36f8a74f.eln
new file mode 100755
index 0000000..c69b747
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-calendar-2ed789bf-36f8a74f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-comint-0c395d5a-d04d5c8f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-comint-0c395d5a-d04d5c8f.eln
new file mode 100755
index 0000000..63a499e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-comint-0c395d5a-d04d5c8f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-company-2a0d67ca-7ebc6d44.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-company-2a0d67ca-7ebc6d44.eln
new file mode 100755
index 0000000..7a8faa1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-company-2a0d67ca-7ebc6d44.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-compile-2e058cd1-a998542b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-compile-2e058cd1-a998542b.eln
new file mode 100755
index 0000000..7d995d8
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-compile-2e058cd1-a998542b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-custom-b1468495-619b3fc5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-custom-b1468495-619b3fc5.eln
new file mode 100755
index 0000000..8862a8c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-custom-b1468495-619b3fc5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-debug-f11a4b8c-3c34f9e9.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-debug-f11a4b8c-3c34f9e9.eln
new file mode 100755
index 0000000..b4f4cc4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-debug-f11a4b8c-3c34f9e9.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-diff-mode-94e64133-d5d4610c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-diff-mode-94e64133-d5d4610c.eln
new file mode 100755
index 0000000..2a3444c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-diff-mode-94e64133-d5d4610c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-dired-a9334cae-9ae6b9c1.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-dired-a9334cae-9ae6b9c1.eln
new file mode 100755
index 0000000..b8c2776
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-dired-a9334cae-9ae6b9c1.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-doc-view-26ab4ffb-eb6893e8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-doc-view-26ab4ffb-eb6893e8.eln
new file mode 100755
index 0000000..c63f163
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-doc-view-26ab4ffb-eb6893e8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-e9584682-4465c5b2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-e9584682-4465c5b2.eln
new file mode 100755
index 0000000..a964d1d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-e9584682-4465c5b2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-edebug-6f072f63-1797ad1c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-edebug-6f072f63-1797ad1c.eln
new file mode 100755
index 0000000..4417bc1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-edebug-6f072f63-1797ad1c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ediff-0ec52521-b9fb2916.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ediff-0ec52521-b9fb2916.eln
new file mode 100755
index 0000000..61905df
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ediff-0ec52521-b9fb2916.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-eldoc-7a18b4b5-143eedb5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-eldoc-7a18b4b5-143eedb5.eln
new file mode 100755
index 0000000..0508715
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-eldoc-7a18b4b5-143eedb5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-elisp-mode-b1f6a13b-6608930d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-elisp-mode-b1f6a13b-6608930d.eln
new file mode 100755
index 0000000..520f8b1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-elisp-mode-b1f6a13b-6608930d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-elisp-refs-76d04287-a54e1a69.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-elisp-refs-76d04287-a54e1a69.eln
new file mode 100755
index 0000000..64d6ea9
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-elisp-refs-76d04287-a54e1a69.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ement-2ae81353-5983055e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ement-2ae81353-5983055e.eln
new file mode 100755
index 0000000..0f2aae0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ement-2ae81353-5983055e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-epa-17497a99-75d3974d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-epa-17497a99-75d3974d.eln
new file mode 100755
index 0000000..3618ed4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-epa-17497a99-75d3974d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ert-52506c58-ba0da87b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ert-52506c58-ba0da87b.eln
new file mode 100755
index 0000000..12f6f9f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ert-52506c58-ba0da87b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-eshell-67de2d76-3306ade2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-eshell-67de2d76-3306ade2.eln
new file mode 100755
index 0000000..863dce2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-eshell-67de2d76-3306ade2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-eww-37bda181-5c9999dd.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-eww-37bda181-5c9999dd.eln
new file mode 100755
index 0000000..50a823a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-eww-37bda181-5c9999dd.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-flymake-f0bec299-0b966daa.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-flymake-f0bec299-0b966daa.eln
new file mode 100755
index 0000000..b8e7c21
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-flymake-f0bec299-0b966daa.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-forge-6affe097-6fec13ae.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-forge-6affe097-6fec13ae.eln
new file mode 100755
index 0000000..3acf8a9
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-forge-6affe097-6fec13ae.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-gnus-3b3abce7-2258a625.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-gnus-3b3abce7-2258a625.eln
new file mode 100755
index 0000000..210ea91
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-gnus-3b3abce7-2258a625.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-grep-1adc67b2-bfd7be43.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-grep-1adc67b2-bfd7be43.eln
new file mode 100755
index 0000000..91b2a11
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-grep-1adc67b2-bfd7be43.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-help-d83db35d-8313b013.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-help-d83db35d-8313b013.eln
new file mode 100755
index 0000000..c0f30e6
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-help-d83db35d-8313b013.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-helpful-83023709-08250f33.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-helpful-83023709-08250f33.eln
new file mode 100755
index 0000000..583fddd
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-helpful-83023709-08250f33.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ibuffer-b637c8ec-4fd7ca7a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ibuffer-b637c8ec-4fd7ca7a.eln
new file mode 100755
index 0000000..20c7d01
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ibuffer-b637c8ec-4fd7ca7a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-image-f8e730f6-32e20712.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-image-f8e730f6-32e20712.eln
new file mode 100755
index 0000000..2fb8008
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-image-f8e730f6-32e20712.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-imenu-680afffb-82df3dd4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-imenu-680afffb-82df3dd4.eln
new file mode 100755
index 0000000..623a080
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-imenu-680afffb-82df3dd4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-indent-cebfeb70-21bb75cb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-indent-cebfeb70-21bb75cb.eln
new file mode 100755
index 0000000..e5def14
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-indent-cebfeb70-21bb75cb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-info-3a35606e-d33a2f39.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-info-3a35606e-d33a2f39.eln
new file mode 100755
index 0000000..f78da22
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-info-3a35606e-d33a2f39.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ivy-9903675e-d325d6d2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ivy-9903675e-d325d6d2.eln
new file mode 100755
index 0000000..8563aad
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ivy-9903675e-d325d6d2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-log-edit-a15cad82-e20ae15b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-log-edit-a15cad82-e20ae15b.eln
new file mode 100755
index 0000000..551873c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-log-edit-a15cad82-e20ae15b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-log-view-321a1908-afe85414.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-log-view-321a1908-afe85414.eln
new file mode 100755
index 0000000..728c17c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-log-view-321a1908-afe85414.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-magit-90797de2-81068960.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-magit-90797de2-81068960.eln
new file mode 100755
index 0000000..7531c11
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-magit-90797de2-81068960.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-magit-repos-e757b3cc-b9228a0e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-magit-repos-e757b3cc-b9228a0e.eln
new file mode 100755
index 0000000..942d41f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-magit-repos-e757b3cc-b9228a0e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-magit-section-a6723914-2031c37a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-magit-section-a6723914-2031c37a.eln
new file mode 100755
index 0000000..ede19ad
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-magit-section-a6723914-2031c37a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-man-8375641b-6f7223f5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-man-8375641b-6f7223f5.eln
new file mode 100755
index 0000000..1fc26cc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-man-8375641b-6f7223f5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-markdown-mode-bc5d7c5c-8aaef3f0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-markdown-mode-bc5d7c5c-8aaef3f0.eln
new file mode 100755
index 0000000..0b5705f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-markdown-mode-bc5d7c5c-8aaef3f0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-message-5b5265b6-ab154e3c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-message-5b5265b6-ab154e3c.eln
new file mode 100755
index 0000000..6407fc5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-message-5b5265b6-ab154e3c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-org-17674836-23e556b0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-org-17674836-23e556b0.eln
new file mode 100755
index 0000000..34d8f1f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-org-17674836-23e556b0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-org-agenda-769f9d03-76532d67.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-org-agenda-769f9d03-76532d67.eln
new file mode 100755
index 0000000..4bb954d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-org-agenda-769f9d03-76532d67.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-outline-6fd35a57-62435259.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-outline-6fd35a57-62435259.eln
new file mode 100755
index 0000000..81fc079
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-outline-6fd35a57-62435259.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-package-menu-49bf6211-fc628909.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-package-menu-49bf6211-fc628909.eln
new file mode 100755
index 0000000..1e8ad3b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-package-menu-49bf6211-fc628909.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-process-menu-01c4ef7e-a7b14086.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-process-menu-01c4ef7e-a7b14086.eln
new file mode 100755
index 0000000..7ea2b54
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-process-menu-01c4ef7e-a7b14086.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-python-4e5d7968-90407bd4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-python-4e5d7968-90407bd4.eln
new file mode 100755
index 0000000..e5296fc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-python-4e5d7968-90407bd4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-replace-39ce5425-a8e5b891.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-replace-39ce5425-a8e5b891.eln
new file mode 100755
index 0000000..9461680
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-replace-39ce5425-a8e5b891.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-rg-9ab302f5-a135eeaf.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-rg-9ab302f5-a135eeaf.eln
new file mode 100755
index 0000000..3176397
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-rg-9ab302f5-a135eeaf.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ripgrep-d17a6dee-0805c335.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ripgrep-d17a6dee-0805c335.eln
new file mode 100755
index 0000000..7053f50
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-ripgrep-d17a6dee-0805c335.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-shortdoc-c6d963b2-fc3fe3b2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-shortdoc-c6d963b2-fc3fe3b2.eln
new file mode 100755
index 0000000..1d55a9a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-shortdoc-c6d963b2-fc3fe3b2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-simple-22755ad5-2264c413.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-simple-22755ad5-2264c413.eln
new file mode 100755
index 0000000..97902fc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-simple-22755ad5-2264c413.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-smerge-mode-6d56fc23-bc0e3d82.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-smerge-mode-6d56fc23-bc0e3d82.eln
new file mode 100755
index 0000000..8571426
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-smerge-mode-6d56fc23-bc0e3d82.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-tab-bar-fdc2dd3e-cb2fef76.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-tab-bar-fdc2dd3e-cb2fef76.eln
new file mode 100755
index 0000000..2b3e660
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-tab-bar-fdc2dd3e-cb2fef76.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-tabulated-list-c0c98672-dff61954.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-tabulated-list-c0c98672-dff61954.eln
new file mode 100755
index 0000000..71d86b6
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-tabulated-list-c0c98672-dff61954.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-tar-mode-8389896c-f3f1a4cd.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-tar-mode-8389896c-f3f1a4cd.eln
new file mode 100755
index 0000000..d238739
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-tar-mode-8389896c-f3f1a4cd.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-unimpaired-c30cf05a-e6dd0676.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-unimpaired-c30cf05a-e6dd0676.eln
new file mode 100755
index 0000000..2441a77
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-unimpaired-c30cf05a-e6dd0676.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-vc-git-3e11c551-f7d182d0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-vc-git-3e11c551-f7d182d0.eln
new file mode 100755
index 0000000..488c979
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-vc-git-3e11c551-f7d182d0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-view-5720ca6c-696ebdaf.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-view-5720ca6c-696ebdaf.eln
new file mode 100755
index 0000000..ba7159e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-view-5720ca6c-696ebdaf.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-wgrep-5ed933f8-a6b103f3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-wgrep-5ed933f8-a6b103f3.eln
new file mode 100755
index 0000000..3c76e96
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-wgrep-5ed933f8-a6b103f3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-which-key-14885300-0e23407e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-which-key-14885300-0e23407e.eln
new file mode 100755
index 0000000..c534737
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-which-key-14885300-0e23407e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-with-editor-2d6f2304-7b3e8b9f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-with-editor-2d6f2304-7b3e8b9f.eln
new file mode 100755
index 0000000..8bf24cd
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-with-editor-2d6f2304-7b3e8b9f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-woman-08ac814f-090cb998.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-woman-08ac814f-090cb998.eln
new file mode 100755
index 0000000..826a2a3
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-woman-08ac814f-090cb998.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-xref-678376cd-25c887ea.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-xref-678376cd-25c887ea.eln
new file mode 100755
index 0000000..6d8dd9a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-collection-xref-678376cd-25c887ea.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-command-window-c7ce3808-f2e668ed.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-command-window-c7ce3808-f2e668ed.eln
new file mode 100755
index 0000000..9041b60
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-command-window-c7ce3808-f2e668ed.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-commands-048d3a80-45a1da45.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-commands-048d3a80-45a1da45.eln
new file mode 100755
index 0000000..6a7bea4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-commands-048d3a80-45a1da45.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-common-35d0103e-da7a143f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-common-35d0103e-da7a143f.eln
new file mode 100755
index 0000000..e9414af
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-common-35d0103e-da7a143f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-core-d186999a-ceac6008.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-core-d186999a-ceac6008.eln
new file mode 100755
index 0000000..261a6ed
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-core-d186999a-ceac6008.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-ex-d4a406ea-c1678a17.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-ex-d4a406ea-c1678a17.eln
new file mode 100755
index 0000000..9577759
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-ex-d4a406ea-c1678a17.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-integration-41f8b917-53c7fdb5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-integration-41f8b917-53c7fdb5.eln
new file mode 100755
index 0000000..d8acf3d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-integration-41f8b917-53c7fdb5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-jumps-8553f6a7-704290dc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-jumps-8553f6a7-704290dc.eln
new file mode 100755
index 0000000..5de4497
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-jumps-8553f6a7-704290dc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-macros-2d2eb48d-c9bf2faf.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-macros-2d2eb48d-c9bf2faf.eln
new file mode 100755
index 0000000..1fe3b8c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-macros-2d2eb48d-c9bf2faf.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-maps-4a86f454-05abd254.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-maps-4a86f454-05abd254.eln
new file mode 100755
index 0000000..3f632c1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-maps-4a86f454-05abd254.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-repeat-ca4337f3-2c807021.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-repeat-ca4337f3-2c807021.eln
new file mode 100755
index 0000000..e811cd0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-repeat-ca4337f3-2c807021.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-search-eb52a613-f8106721.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-search-eb52a613-f8106721.eln
new file mode 100755
index 0000000..0d83f72
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-search-eb52a613-f8106721.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-states-a44d95e8-284450f7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-states-a44d95e8-284450f7.eln
new file mode 100755
index 0000000..a632df0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-states-a44d95e8-284450f7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-types-8495fec4-e11dc653.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-types-8495fec4-e11dc653.eln
new file mode 100755
index 0000000..4617e86
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-types-8495fec4-e11dc653.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-vars-d05c3292-7fd7f0cb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-vars-d05c3292-7fd7f0cb.eln
new file mode 100755
index 0000000..8146a7f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/evil-vars-d05c3292-7fd7f0cb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ewoc-6e3ae0bf-ce26edcb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ewoc-6e3ae0bf-ce26edcb.eln
new file mode 100755
index 0000000..ffb91f0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ewoc-6e3ae0bf-ce26edcb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eww-08abb1e7-914a2465.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eww-08abb1e7-914a2465.eln
new file mode 100755
index 0000000..3bb3c28
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/eww-08abb1e7-914a2465.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/executable-21d46f43-38d0b1b1.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/executable-21d46f43-38d0b1b1.eln
new file mode 100755
index 0000000..95d9309
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/executable-21d46f43-38d0b1b1.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/exif-0bb59082-5dae40ad.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/exif-0bb59082-5dae40ad.eln
new file mode 100755
index 0000000..6eb38b9
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/exif-0bb59082-5dae40ad.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/f-91e7e192-57bd0257.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/f-91e7e192-57bd0257.eln
new file mode 100755
index 0000000..763b117
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/f-91e7e192-57bd0257.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/face-remap-9d6c47ed-2d86ece0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/face-remap-9d6c47ed-2d86ece0.eln
new file mode 100755
index 0000000..8077722
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/face-remap-9d6c47ed-2d86ece0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/facemenu-cceb809d-f30c0558.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/facemenu-cceb809d-f30c0558.eln
new file mode 100755
index 0000000..bed6667
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/facemenu-cceb809d-f30c0558.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ffap-4b3c5789-712c9dfd.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ffap-4b3c5789-712c9dfd.eln
new file mode 100755
index 0000000..19bf03b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ffap-4b3c5789-712c9dfd.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/fileloop-f8cb1238-711fc25b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/fileloop-f8cb1238-711fc25b.eln
new file mode 100755
index 0000000..4415551
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/fileloop-f8cb1238-711fc25b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/filenotify-65939d6e-c8c030e6.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/filenotify-65939d6e-c8c030e6.eln
new file mode 100755
index 0000000..10c3705
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/filenotify-65939d6e-c8c030e6.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/files-x-59c65c89-c591ec13.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/files-x-59c65c89-c591ec13.eln
new file mode 100755
index 0000000..239c15e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/files-x-59c65c89-c591ec13.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/find-dired-b47bcf4a-ef5aa03e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/find-dired-b47bcf4a-ef5aa03e.eln
new file mode 100755
index 0000000..db9c0cf
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/find-dired-b47bcf4a-ef5aa03e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/find-file-29570019-35784e9b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/find-file-29570019-35784e9b.eln
new file mode 100755
index 0000000..c7efbe3
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/find-file-29570019-35784e9b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/find-func-64af57a4-85922d30.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/find-func-64af57a4-85922d30.eln
new file mode 100755
index 0000000..80d4df7
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/find-func-64af57a4-85922d30.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flymake-a41dd277-0e346626.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flymake-a41dd277-0e346626.eln
new file mode 100755
index 0000000..cf49026
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flymake-a41dd277-0e346626.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flymake-cc-6498f5e5-84b71098.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flymake-cc-6498f5e5-84b71098.eln
new file mode 100755
index 0000000..fc8bafd
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flymake-cc-6498f5e5-84b71098.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flymake-proc-bba228e0-bd35646c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flymake-proc-bba228e0-bd35646c.eln
new file mode 100755
index 0000000..af9afb1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flymake-proc-bba228e0-bd35646c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flyspell-c044604e-23d9d890.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flyspell-c044604e-23d9d890.eln
new file mode 100755
index 0000000..301a694
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/flyspell-c044604e-23d9d890.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-1e17c6ca-de985db7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-1e17c6ca-de985db7.eln
new file mode 100755
index 0000000..e64a22d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-1e17c6ca-de985db7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-bitbucket-c5f909d1-f0f68518.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-bitbucket-c5f909d1-f0f68518.eln
new file mode 100755
index 0000000..06352ac
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-bitbucket-c5f909d1-f0f68518.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-client-69438c16-1e14e162.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-client-69438c16-1e14e162.eln
new file mode 100755
index 0000000..d5d4974
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-client-69438c16-1e14e162.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-commands-0194d224-0c7a2021.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-commands-0194d224-0c7a2021.eln
new file mode 100755
index 0000000..1e7a5bc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-commands-0194d224-0c7a2021.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-core-1064f982-e96c1bc8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-core-1064f982-e96c1bc8.eln
new file mode 100755
index 0000000..448c1f6
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-core-1064f982-e96c1bc8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-db-88521e00-06382c3a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-db-88521e00-06382c3a.eln
new file mode 100755
index 0000000..95137fd
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-db-88521e00-06382c3a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-discussion-61b170bd-e28004cd.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-discussion-61b170bd-e28004cd.eln
new file mode 100755
index 0000000..ab1b75e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-discussion-61b170bd-e28004cd.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-forgejo-297772f5-51c5c1dd.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-forgejo-297772f5-51c5c1dd.eln
new file mode 100755
index 0000000..48bb00e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-forgejo-297772f5-51c5c1dd.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-gitea-7dd7af32-409f2bd2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-gitea-7dd7af32-409f2bd2.eln
new file mode 100755
index 0000000..d9ddda4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-gitea-7dd7af32-409f2bd2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-github-5d4d3cef-9d5f4645.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-github-5d4d3cef-9d5f4645.eln
new file mode 100755
index 0000000..1c140f4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-github-5d4d3cef-9d5f4645.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-gitlab-f0f2064d-420221ae.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-gitlab-f0f2064d-420221ae.eln
new file mode 100755
index 0000000..4df2169
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-gitlab-f0f2064d-420221ae.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-gogs-291e5cc5-d06cdb17.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-gogs-291e5cc5-d06cdb17.eln
new file mode 100755
index 0000000..05c8b8c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-gogs-291e5cc5-d06cdb17.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-issue-6b506906-7134432d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-issue-6b506906-7134432d.eln
new file mode 100755
index 0000000..7229d7c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-issue-6b506906-7134432d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-notify-cb3923a9-374dc169.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-notify-cb3923a9-374dc169.eln
new file mode 100755
index 0000000..d1ade13
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-notify-cb3923a9-374dc169.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-post-c9e599c2-73fa25c8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-post-c9e599c2-73fa25c8.eln
new file mode 100755
index 0000000..2b214bc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-post-c9e599c2-73fa25c8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-pullreq-2f689420-bbf3ae41.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-pullreq-2f689420-bbf3ae41.eln
new file mode 100755
index 0000000..0bcf74e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-pullreq-2f689420-bbf3ae41.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-repo-9d648130-afbdd03f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-repo-9d648130-afbdd03f.eln
new file mode 100755
index 0000000..61f968f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-repo-9d648130-afbdd03f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-repos-07f42001-16ac8467.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-repos-07f42001-16ac8467.eln
new file mode 100755
index 0000000..c7d5fd7
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-repos-07f42001-16ac8467.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-revnote-b5d7a4e6-82972714.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-revnote-b5d7a4e6-82972714.eln
new file mode 100755
index 0000000..21cd38b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-revnote-b5d7a4e6-82972714.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-semi-31ed43b3-5ae14a5c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-semi-31ed43b3-5ae14a5c.eln
new file mode 100755
index 0000000..d6e1ba1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-semi-31ed43b3-5ae14a5c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-tablist-5b7dcb79-c94894d3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-tablist-5b7dcb79-c94894d3.eln
new file mode 100755
index 0000000..49ed507
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-tablist-5b7dcb79-c94894d3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-topic-8912d6bc-c8725b9b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-topic-8912d6bc-c8725b9b.eln
new file mode 100755
index 0000000..181fe6e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-topic-8912d6bc-c8725b9b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-topics-770992c9-6164f066.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-topics-770992c9-6164f066.eln
new file mode 100755
index 0000000..514a4e5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/forge-topics-770992c9-6164f066.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/format-spec-644c0068-d51b38c3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/format-spec-644c0068-d51b38c3.eln
new file mode 100755
index 0000000..7444e37
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/format-spec-644c0068-d51b38c3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/general-e08d0b84-051fda13.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/general-e08d0b84-051fda13.eln
new file mode 100755
index 0000000..527a82a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/general-e08d0b84-051fda13.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/generate-lisp-file-20e31f41-988dc95e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/generate-lisp-file-20e31f41-988dc95e.eln
new file mode 100755
index 0000000..05152d9
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/generate-lisp-file-20e31f41-988dc95e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/generator-184aa77f-ac947286.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/generator-184aa77f-ac947286.eln
new file mode 100755
index 0000000..a745edd
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/generator-184aa77f-ac947286.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ghub-520c283d-2e3ac0b2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ghub-520c283d-2e3ac0b2.eln
new file mode 100755
index 0000000..dcc0728
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ghub-520c283d-2e3ac0b2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ghub-graphql-1ba3a2ad-f1542b39.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ghub-graphql-1ba3a2ad-f1542b39.eln
new file mode 100755
index 0000000..760f0a0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ghub-graphql-1ba3a2ad-f1542b39.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/git-commit-69cfecfc-03d4f136.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/git-commit-69cfecfc-03d4f136.eln
new file mode 100755
index 0000000..277a1a4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/git-commit-69cfecfc-03d4f136.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gmm-utils-3a9b481d-fd158fa2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gmm-utils-3a9b481d-fd158fa2.eln
new file mode 100755
index 0000000..7fe064a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gmm-utils-3a9b481d-fd158fa2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-a56b3481-6aa2177f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-a56b3481-6aa2177f.eln
new file mode 100755
index 0000000..8855041
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-a56b3481-6aa2177f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-art-ba92929b-c766aad6.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-art-ba92929b-c766aad6.eln
new file mode 100755
index 0000000..dde3a18
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-art-ba92929b-c766aad6.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-cloud-175ba8bd-bfe63d4c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-cloud-175ba8bd-bfe63d4c.eln
new file mode 100755
index 0000000..a471cd2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-cloud-175ba8bd-bfe63d4c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-dbus-711ffae7-a77bcc36.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-dbus-711ffae7-a77bcc36.eln
new file mode 100755
index 0000000..0eae9e6
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-dbus-711ffae7-a77bcc36.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-group-4173e662-f57666e5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-group-4173e662-f57666e5.eln
new file mode 100755
index 0000000..30ee842
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-group-4173e662-f57666e5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-int-7bc862cf-7d6fb32d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-int-7bc862cf-7d6fb32d.eln
new file mode 100755
index 0000000..36cf6de
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-int-7bc862cf-7d6fb32d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-range-becbd692-65105552.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-range-becbd692-65105552.eln
new file mode 100755
index 0000000..e98d375
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-range-becbd692-65105552.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-spec-87d90d34-0be317de.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-spec-87d90d34-0be317de.eln
new file mode 100755
index 0000000..de56bea
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-spec-87d90d34-0be317de.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-start-e3ba711c-4325c14d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-start-e3ba711c-4325c14d.eln
new file mode 100755
index 0000000..6e0a14d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-start-e3ba711c-4325c14d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-sum-2a5c0016-c3b3427d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-sum-2a5c0016-c3b3427d.eln
new file mode 100755
index 0000000..d87a023
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-sum-2a5c0016-c3b3427d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-undo-97cfb5a4-3d489218.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-undo-97cfb5a4-3d489218.eln
new file mode 100755
index 0000000..e997da1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-undo-97cfb5a4-3d489218.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-util-b645aa9c-525996a3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-util-b645aa9c-525996a3.eln
new file mode 100755
index 0000000..09e691a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-util-b645aa9c-525996a3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-win-9f30cf0f-c2da442f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-win-9f30cf0f-c2da442f.eln
new file mode 100755
index 0000000..276bac5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnus-win-9f30cf0f-c2da442f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnutls-5b82d5da-6480b977.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnutls-5b82d5da-6480b977.eln
new file mode 100755
index 0000000..57a7535
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gnutls-5b82d5da-6480b977.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/goto-addr-27d78ac3-e45654a5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/goto-addr-27d78ac3-e45654a5.eln
new file mode 100755
index 0000000..a0da649
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/goto-addr-27d78ac3-e45654a5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/grep-c9b5c28d-352eca85.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/grep-c9b5c28d-352eca85.eln
new file mode 100755
index 0000000..ae54f28
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/grep-c9b5c28d-352eca85.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gsexp-564e8332-88ab0cca.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gsexp-564e8332-88ab0cca.eln
new file mode 100755
index 0000000..3698839
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gsexp-564e8332-88ab0cca.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gv-e0cf7478-a0e42736.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gv-e0cf7478-a0e42736.eln
new file mode 100755
index 0000000..83592dc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/gv-e0cf7478-a0e42736.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/help-fns-d233c6e8-17f83b55.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/help-fns-d233c6e8-17f83b55.eln
new file mode 100755
index 0000000..39fb050
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/help-fns-d233c6e8-17f83b55.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/help-mode-d4dbae3d-49b6bc68.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/help-mode-d4dbae3d-49b6bc68.eln
new file mode 100755
index 0000000..e4f7487
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/help-mode-d4dbae3d-49b6bc68.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/helpful-ff245eea-a70e5916.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/helpful-ff245eea-a70e5916.eln
new file mode 100755
index 0000000..ff239cc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/helpful-ff245eea-a70e5916.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/hexl-eddf9831-5d8eb8db.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/hexl-eddf9831-5d8eb8db.eln
new file mode 100755
index 0000000..9d45c8b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/hexl-eddf9831-5d8eb8db.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/hl-line-8fa29c14-453955b2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/hl-line-8fa29c14-453955b2.eln
new file mode 100755
index 0000000..7a6d2b8
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/hl-line-8fa29c14-453955b2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ht-4947a3c9-e90e3e81.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ht-4947a3c9-e90e3e81.eln
new file mode 100755
index 0000000..5da2e75
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ht-4947a3c9-e90e3e81.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ibuf-ext-5624402a-35d00009.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ibuf-ext-5624402a-35d00009.eln
new file mode 100755
index 0000000..6939288
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ibuf-ext-5624402a-35d00009.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ibuffer-c2dc0626-a1a9b1d4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ibuffer-c2dc0626-a1a9b1d4.eln
new file mode 100755
index 0000000..34b69dc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ibuffer-c2dc0626-a1a9b1d4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/icons-eafe82eb-789d397a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/icons-eafe82eb-789d397a.eln
new file mode 100755
index 0000000..2b5fca8
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/icons-eafe82eb-789d397a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ido-ccb260dc-33d94ef2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ido-ccb260dc-33d94ef2.eln
new file mode 100755
index 0000000..826195c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ido-ccb260dc-33d94ef2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ietf-drums-23d9ecfe-e3310a23.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ietf-drums-23d9ecfe-e3310a23.eln
new file mode 100755
index 0000000..31173c2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ietf-drums-23d9ecfe-e3310a23.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/image-converter-4f9f5f94-1ffb920c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/image-converter-4f9f5f94-1ffb920c.eln
new file mode 100755
index 0000000..4e46677
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/image-converter-4f9f5f94-1ffb920c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/image-file-9034ac7e-e6045348.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/image-file-9034ac7e-e6045348.eln
new file mode 100755
index 0000000..6b31d72
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/image-file-9034ac7e-e6045348.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/image-mode-f854d2db-8e4cb517.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/image-mode-f854d2db-8e4cb517.eln
new file mode 100755
index 0000000..04ef56b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/image-mode-f854d2db-8e4cb517.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/imenu-a6693d03-3c0282fa.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/imenu-a6693d03-3c0282fa.eln
new file mode 100755
index 0000000..311f822
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/imenu-a6693d03-3c0282fa.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/info-ce12c0ca-c249b377.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/info-ce12c0ca-c249b377.eln
new file mode 100755
index 0000000..5c2efa5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/info-ce12c0ca-c249b377.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/info-look-27e24920-d92674a8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/info-look-27e24920-d92674a8.eln
new file mode 100755
index 0000000..f1eb876
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/info-look-27e24920-d92674a8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/inline-2e43e5bb-d6b0c492.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/inline-2e43e5bb-d6b0c492.eln
new file mode 100755
index 0000000..e8ac43c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/inline-2e43e5bb-d6b0c492.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/iso8601-3903451a-ebbec623.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/iso8601-3903451a-ebbec623.eln
new file mode 100755
index 0000000..218bb4d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/iso8601-3903451a-ebbec623.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ispell-4457395a-fb4796b7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ispell-4457395a-fb4796b7.eln
new file mode 100755
index 0000000..453ac70
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ispell-4457395a-fb4796b7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ivy-2ea30a2c-38e83e89.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ivy-2ea30a2c-38e83e89.eln
new file mode 100755
index 0000000..d302789
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ivy-2ea30a2c-38e83e89.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ivy-overlay-5debf09b-ff6ba1d4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ivy-overlay-5debf09b-ff6ba1d4.eln
new file mode 100755
index 0000000..64447e2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ivy-overlay-5debf09b-ff6ba1d4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ivy-rich-a45ee80a-7cf1cbeb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ivy-rich-a45ee80a-7cf1cbeb.eln
new file mode 100755
index 0000000..3b515e4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ivy-rich-a45ee80a-7cf1cbeb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/jka-compr-40ebe92b-504527be.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/jka-compr-40ebe92b-504527be.eln
new file mode 100755
index 0000000..b874776
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/jka-compr-40ebe92b-504527be.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/json-a90a1eab-1895db7f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/json-a90a1eab-1895db7f.eln
new file mode 100755
index 0000000..aca97b5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/json-a90a1eab-1895db7f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/kinsoku-dd85875c-81a9f0a4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/kinsoku-dd85875c-81a9f0a4.eln
new file mode 100755
index 0000000..ef33c04
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/kinsoku-dd85875c-81a9f0a4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/kmacro-048feaec-9a7faa06.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/kmacro-048feaec-9a7faa06.eln
new file mode 100755
index 0000000..33cede0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/kmacro-048feaec-9a7faa06.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/let-alist-c9c0fd50-00a8b5e8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/let-alist-c9c0fd50-00a8b5e8.eln
new file mode 100755
index 0000000..f451020
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/let-alist-c9c0fd50-00a8b5e8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lisp-mnt-2b554e27-7ee13b73.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lisp-mnt-2b554e27-7ee13b73.eln
new file mode 100755
index 0000000..bdb9898
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lisp-mnt-2b554e27-7ee13b73.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/llama-472ba4b4-81ca73fc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/llama-472ba4b4-81ca73fc.eln
new file mode 100755
index 0000000..2956548
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/llama-472ba4b4-81ca73fc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/log-edit-bc58b2d4-7959c85c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/log-edit-bc58b2d4-7959c85c.eln
new file mode 100755
index 0000000..e8ecc02
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/log-edit-bc58b2d4-7959c85c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/log-view-a87baa9d-87e44fda.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/log-view-a87baa9d-87e44fda.eln
new file mode 100755
index 0000000..622a85c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/log-view-a87baa9d-87e44fda.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lsp-protocol-b5e51e6e-bb515b78.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lsp-protocol-b5e51e6e-bb515b78.eln
new file mode 100755
index 0000000..a26c56b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lsp-protocol-b5e51e6e-bb515b78.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lsp-pyright-cde8693c-3b103b14.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lsp-pyright-cde8693c-3b103b14.eln
new file mode 100755
index 0000000..40d8d1f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lsp-pyright-cde8693c-3b103b14.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lv-1c58359d-879c0e5d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lv-1c58359d-879c0e5d.eln
new file mode 100755
index 0000000..c5c5684
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/lv-1c58359d-879c0e5d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-5ca7d205-861428d3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-5ca7d205-861428d3.eln
new file mode 100755
index 0000000..e503311
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-5ca7d205-861428d3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-apply-288c9f8a-99eea8a4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-apply-288c9f8a-99eea8a4.eln
new file mode 100755
index 0000000..84a77e1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-apply-288c9f8a-99eea8a4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-autorevert-6be5982a-25584948.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-autorevert-6be5982a-25584948.eln
new file mode 100755
index 0000000..3a095f2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-autorevert-6be5982a-25584948.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-base-cd1fc66b-5f972ce9.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-base-cd1fc66b-5f972ce9.eln
new file mode 100755
index 0000000..15c4529
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-base-cd1fc66b-5f972ce9.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-bisect-1c1ffab4-a33cd3fc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-bisect-1c1ffab4-a33cd3fc.eln
new file mode 100755
index 0000000..ad21fe9
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-bisect-1c1ffab4-a33cd3fc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-blame-e1926d1d-026c6216.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-blame-e1926d1d-026c6216.eln
new file mode 100755
index 0000000..ee2d2e7
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-blame-e1926d1d-026c6216.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-bookmark-d5b12f63-3c219d99.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-bookmark-d5b12f63-3c219d99.eln
new file mode 100755
index 0000000..dd9ef30
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-bookmark-d5b12f63-3c219d99.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-branch-ef962fc0-d40969fc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-branch-ef962fc0-d40969fc.eln
new file mode 100755
index 0000000..0948c17
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-branch-ef962fc0-d40969fc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-clone-8bfba4a5-28c4cc12.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-clone-8bfba4a5-28c4cc12.eln
new file mode 100755
index 0000000..3e6be03
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-clone-8bfba4a5-28c4cc12.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-commit-1efb7423-f169e7b7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-commit-1efb7423-f169e7b7.eln
new file mode 100755
index 0000000..d8b7128
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-commit-1efb7423-f169e7b7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-diff-43ab7e65-7e5eecc5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-diff-43ab7e65-7e5eecc5.eln
new file mode 100755
index 0000000..43276ef
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-diff-43ab7e65-7e5eecc5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-ediff-c61def96-67467696.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-ediff-c61def96-67467696.eln
new file mode 100755
index 0000000..fd173f7
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-ediff-c61def96-67467696.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-extras-b6d0f3aa-84d803b6.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-extras-b6d0f3aa-84d803b6.eln
new file mode 100755
index 0000000..519d070
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-extras-b6d0f3aa-84d803b6.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-fetch-76560701-d2b21337.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-fetch-76560701-d2b21337.eln
new file mode 100755
index 0000000..815fd76
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-fetch-76560701-d2b21337.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-files-056f59e8-88dfa405.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-files-056f59e8-88dfa405.eln
new file mode 100755
index 0000000..7223eaa
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-files-056f59e8-88dfa405.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-git-687c9877-872773ba.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-git-687c9877-872773ba.eln
new file mode 100755
index 0000000..2cfbfe2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-git-687c9877-872773ba.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-gitignore-64e41e64-4f3dd853.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-gitignore-64e41e64-4f3dd853.eln
new file mode 100755
index 0000000..34ef046
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-gitignore-64e41e64-4f3dd853.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-log-5e140bae-2d1d1402.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-log-5e140bae-2d1d1402.eln
new file mode 100755
index 0000000..80f01ff
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-log-5e140bae-2d1d1402.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-margin-2c16ab27-83608d97.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-margin-2c16ab27-83608d97.eln
new file mode 100755
index 0000000..87044fc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-margin-2c16ab27-83608d97.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-merge-e22903b4-afe732ae.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-merge-e22903b4-afe732ae.eln
new file mode 100755
index 0000000..4a484c0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-merge-e22903b4-afe732ae.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-mode-b2c1e75a-53cbfb40.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-mode-b2c1e75a-53cbfb40.eln
new file mode 100755
index 0000000..0dd67f9
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-mode-b2c1e75a-53cbfb40.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-notes-6796a9e8-c69adcdb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-notes-6796a9e8-c69adcdb.eln
new file mode 100755
index 0000000..4ded01e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-notes-6796a9e8-c69adcdb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-patch-e045f9b5-be09aa7a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-patch-e045f9b5-be09aa7a.eln
new file mode 100755
index 0000000..3d5c256
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-patch-e045f9b5-be09aa7a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-process-cc0d40de-50728d38.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-process-cc0d40de-50728d38.eln
new file mode 100755
index 0000000..444c2b8
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-process-cc0d40de-50728d38.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-pull-da582d1d-beb7ca15.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-pull-da582d1d-beb7ca15.eln
new file mode 100755
index 0000000..e1e208d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-pull-da582d1d-beb7ca15.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-push-e15dfe22-47763dcd.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-push-e15dfe22-47763dcd.eln
new file mode 100755
index 0000000..3c98ca1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-push-e15dfe22-47763dcd.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-reflog-1595809c-c404aeec.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-reflog-1595809c-c404aeec.eln
new file mode 100755
index 0000000..a7ef5be
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-reflog-1595809c-c404aeec.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-refs-f6059a87-6a481c89.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-refs-f6059a87-6a481c89.eln
new file mode 100755
index 0000000..0923b37
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-refs-f6059a87-6a481c89.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-remote-d2b651bf-1aa2e414.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-remote-d2b651bf-1aa2e414.eln
new file mode 100755
index 0000000..eda9a22
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-remote-d2b651bf-1aa2e414.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-repos-2b94423d-04b020e6.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-repos-2b94423d-04b020e6.eln
new file mode 100755
index 0000000..0b8230d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-repos-2b94423d-04b020e6.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-reset-de192603-8a9f3629.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-reset-de192603-8a9f3629.eln
new file mode 100755
index 0000000..3c0adf4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-reset-de192603-8a9f3629.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-section-0596b258-7a215c4e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-section-0596b258-7a215c4e.eln
new file mode 100755
index 0000000..fc6f36c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-section-0596b258-7a215c4e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-sequence-676b29d8-526a7110.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-sequence-676b29d8-526a7110.eln
new file mode 100755
index 0000000..50b8a81
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-sequence-676b29d8-526a7110.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-stash-93e8d66c-844b0ca5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-stash-93e8d66c-844b0ca5.eln
new file mode 100755
index 0000000..bff7c70
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-stash-93e8d66c-844b0ca5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-status-878377b5-e6069930.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-status-878377b5-e6069930.eln
new file mode 100755
index 0000000..8c24d0d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-status-878377b5-e6069930.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-submodule-821e9900-5427d63a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-submodule-821e9900-5427d63a.eln
new file mode 100755
index 0000000..13b0cc0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-submodule-821e9900-5427d63a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-subtree-e4c302eb-cdce7f7e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-subtree-e4c302eb-cdce7f7e.eln
new file mode 100755
index 0000000..e487519
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-subtree-e4c302eb-cdce7f7e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-tag-3139507b-4c9f79a1.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-tag-3139507b-4c9f79a1.eln
new file mode 100755
index 0000000..09a85f1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-tag-3139507b-4c9f79a1.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-transient-6bb42a97-5d0bb1af.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-transient-6bb42a97-5d0bb1af.eln
new file mode 100755
index 0000000..c8fed27
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-transient-6bb42a97-5d0bb1af.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-wip-f820c265-ffbb337f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-wip-f820c265-ffbb337f.eln
new file mode 100755
index 0000000..8e67569
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-wip-f820c265-ffbb337f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-worktree-a8a0efc3-8e1f6e20.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-worktree-a8a0efc3-8e1f6e20.eln
new file mode 100755
index 0000000..3186ebf
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/magit-worktree-a8a0efc3-8e1f6e20.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mail-parse-5e7f4583-be28e687.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mail-parse-5e7f4583-be28e687.eln
new file mode 100755
index 0000000..329f727
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mail-parse-5e7f4583-be28e687.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mail-source-6f8fd451-6395bc82.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mail-source-6f8fd451-6395bc82.eln
new file mode 100755
index 0000000..d404703
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mail-source-6f8fd451-6395bc82.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mail-utils-ae525238-b77a46f0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mail-utils-ae525238-b77a46f0.eln
new file mode 100755
index 0000000..2ba15c2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mail-utils-ae525238-b77a46f0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mailabbrev-287b6d20-053e9748.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mailabbrev-287b6d20-053e9748.eln
new file mode 100755
index 0000000..699030b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mailabbrev-287b6d20-053e9748.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mailcap-a1205653-ea0935cc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mailcap-a1205653-ea0935cc.eln
new file mode 100755
index 0000000..52e0281
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mailcap-a1205653-ea0935cc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mailheader-2dff755b-0df9548f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mailheader-2dff755b-0df9548f.eln
new file mode 100755
index 0000000..89b4830
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mailheader-2dff755b-0df9548f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/make-mode-da8e3e22-d8efef50.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/make-mode-da8e3e22-d8efef50.eln
new file mode 100755
index 0000000..2ab33b4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/make-mode-da8e3e22-d8efef50.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/man-9b8001be-1d8a503b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/man-9b8001be-1d8a503b.eln
new file mode 100755
index 0000000..a80aad0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/man-9b8001be-1d8a503b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/map-5d7b616a-4ddf25b9.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/map-5d7b616a-4ddf25b9.eln
new file mode 100755
index 0000000..b0b9711
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/map-5d7b616a-4ddf25b9.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/markdown-mode-2f241042-48c5f01d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/markdown-mode-2f241042-48c5f01d.eln
new file mode 100755
index 0000000..9f1a411
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/markdown-mode-2f241042-48c5f01d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/message-4a315c5a-f6087ab6.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/message-4a315c5a-f6087ab6.eln
new file mode 100755
index 0000000..5599f3b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/message-4a315c5a-f6087ab6.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/misearch-3d1286b0-6765083f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/misearch-3d1286b0-6765083f.eln
new file mode 100755
index 0000000..af801aa
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/misearch-3d1286b0-6765083f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-archive-10ccf562-b3cdf45c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-archive-10ccf562-b3cdf45c.eln
new file mode 100755
index 0000000..8dd97de
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-archive-10ccf562-b3cdf45c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-bodies-5a92b2dc-f1b8226b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-bodies-5a92b2dc-f1b8226b.eln
new file mode 100755
index 0000000..12f3791
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-bodies-5a92b2dc-f1b8226b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-decode-4a4c16d8-f56fdb68.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-decode-4a4c16d8-f56fdb68.eln
new file mode 100755
index 0000000..4fa0f05
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-decode-4a4c16d8-f56fdb68.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-encode-4f0ce800-006b7453.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-encode-4f0ce800-006b7453.eln
new file mode 100755
index 0000000..8096ff5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-encode-4f0ce800-006b7453.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-url-8379ac94-135fe240.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-url-8379ac94-135fe240.eln
new file mode 100755
index 0000000..ab86506
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-url-8379ac94-135fe240.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-util-3a4439f0-17c041b9.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-util-3a4439f0-17c041b9.eln
new file mode 100755
index 0000000..ec22f23
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-util-3a4439f0-17c041b9.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-uu-1661a81c-c4252b17.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-uu-1661a81c-c4252b17.eln
new file mode 100755
index 0000000..47c72ac
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-uu-1661a81c-c4252b17.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-view-ea5aa834-2941163e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-view-ea5aa834-2941163e.eln
new file mode 100755
index 0000000..390d3bb
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mm-view-ea5aa834-2941163e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml-34028078-4772585e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml-34028078-4772585e.eln
new file mode 100755
index 0000000..6a915da
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml-34028078-4772585e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml-sec-827872f6-fa6eff9f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml-sec-827872f6-fa6eff9f.eln
new file mode 100755
index 0000000..8ba9987
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml-sec-827872f6-fa6eff9f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml-smime-9ca0ce10-596b88ab.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml-smime-9ca0ce10-596b88ab.eln
new file mode 100755
index 0000000..9ed2d5b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml-smime-9ca0ce10-596b88ab.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml2015-2eff3ca9-a7f5757a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml2015-2eff3ca9-a7f5757a.eln
new file mode 100755
index 0000000..808b154
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/mml2015-2eff3ca9-a7f5757a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nerd-icons-6e35fec8-e9039d5f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nerd-icons-6e35fec8-e9039d5f.eln
new file mode 100755
index 0000000..a390c56
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nerd-icons-6e35fec8-e9039d5f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/network-stream-6de4812d-d5809aa5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/network-stream-6de4812d-d5809aa5.eln
new file mode 100755
index 0000000..a8af2ed
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/network-stream-6de4812d-d5809aa5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnheader-94408d86-813e71c3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnheader-94408d86-813e71c3.eln
new file mode 100755
index 0000000..d67853a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnheader-94408d86-813e71c3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnimap-91c35abc-3265ed0a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnimap-91c35abc-3265ed0a.eln
new file mode 100755
index 0000000..5905132
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnimap-91c35abc-3265ed0a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnmail-703135a4-4277da3a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnmail-703135a4-4277da3a.eln
new file mode 100755
index 0000000..02813f3
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnmail-703135a4-4277da3a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnoo-1b638390-ae67e38b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnoo-1b638390-ae67e38b.eln
new file mode 100755
index 0000000..87b19dd
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnoo-1b638390-ae67e38b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnselect-763353f0-ff5243eb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnselect-763353f0-ff5243eb.eln
new file mode 100755
index 0000000..8eacd62
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nnselect-763353f0-ff5243eb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/notifications-bd0b4b34-0b360378.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/notifications-bd0b4b34-0b360378.eln
new file mode 100755
index 0000000..e228d6d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/notifications-bd0b4b34-0b360378.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nsm-c2159ddd-7db7e23b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nsm-c2159ddd-7db7e23b.eln
new file mode 100755
index 0000000..68421ed
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/nsm-c2159ddd-7db7e23b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-comint-12e5146d-19be0920.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-comint-12e5146d-19be0920.eln
new file mode 100755
index 0000000..c5b5b3c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-comint-12e5146d-19be0920.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-core-cffe1ec4-1d1702a2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-core-cffe1ec4-1d1702a2.eln
new file mode 100755
index 0000000..de0562f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-core-cffe1ec4-1d1702a2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-emacs-lisp-0b97f15a-68bf40d9.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-emacs-lisp-0b97f15a-68bf40d9.eln
new file mode 100755
index 0000000..5bc189e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-emacs-lisp-0b97f15a-68bf40d9.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-eval-7b5fcf2d-e5af5450.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-eval-7b5fcf2d-e5af5450.eln
new file mode 100755
index 0000000..1f2d341
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-eval-7b5fcf2d-e5af5450.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-exp-930ab846-e349114d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-exp-930ab846-e349114d.eln
new file mode 100755
index 0000000..15c2d3b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-exp-930ab846-e349114d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-lob-56972985-2fe0d9d8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-lob-56972985-2fe0d9d8.eln
new file mode 100755
index 0000000..6702db7
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-lob-56972985-2fe0d9d8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-ref-667588a1-9fed606d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-ref-667588a1-9fed606d.eln
new file mode 100755
index 0000000..7db5e6a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-ref-667588a1-9fed606d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-table-d2f732c8-878798b7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-table-d2f732c8-878798b7.eln
new file mode 100755
index 0000000..dae8843
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-table-d2f732c8-878798b7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-tangle-d4d1c7b8-94d9f7af.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-tangle-d4d1c7b8-94d9f7af.eln
new file mode 100755
index 0000000..14a479c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ob-tangle-d4d1c7b8-94d9f7af.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/oc-aec59d52-0a7ba05d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/oc-aec59d52-0a7ba05d.eln
new file mode 100755
index 0000000..4527b34
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/oc-aec59d52-0a7ba05d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/oc-basic-c3b5e4de-86ab248e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/oc-basic-c3b5e4de-86ab248e.eln
new file mode 100755
index 0000000..3209b05
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/oc-basic-c3b5e4de-86ab248e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-1680a4ec-6afef8cd.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-1680a4ec-6afef8cd.eln
new file mode 100755
index 0000000..c84c635
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-1680a4ec-6afef8cd.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-bbdb-bd3b6961-1f9ab792.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-bbdb-bd3b6961-1f9ab792.eln
new file mode 100755
index 0000000..70904f1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-bbdb-bd3b6961-1f9ab792.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-bibtex-aa95cf9f-46bddeb5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-bibtex-aa95cf9f-46bddeb5.eln
new file mode 100755
index 0000000..e1a769a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-bibtex-aa95cf9f-46bddeb5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-docview-43ceff9f-f75e4dc3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-docview-43ceff9f-f75e4dc3.eln
new file mode 100755
index 0000000..1997195
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-docview-43ceff9f-f75e4dc3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-doi-71acc3a3-4711313a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-doi-71acc3a3-4711313a.eln
new file mode 100755
index 0000000..ae44d03
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-doi-71acc3a3-4711313a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-eww-c259fbbb-922f37bb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-eww-c259fbbb-922f37bb.eln
new file mode 100755
index 0000000..90408ae
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-eww-c259fbbb-922f37bb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-gnus-403e66ee-b8e326b7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-gnus-403e66ee-b8e326b7.eln
new file mode 100755
index 0000000..55d477b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-gnus-403e66ee-b8e326b7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-info-e618e18d-19a96de2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-info-e618e18d-19a96de2.eln
new file mode 100755
index 0000000..eb48f48
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-info-e618e18d-19a96de2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-irc-f5d19fdb-a9a607e9.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-irc-f5d19fdb-a9a607e9.eln
new file mode 100755
index 0000000..7e9584f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-irc-f5d19fdb-a9a607e9.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-mhe-cc58e91e-2eb0d1fd.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-mhe-cc58e91e-2eb0d1fd.eln
new file mode 100755
index 0000000..3f85420
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-mhe-cc58e91e-2eb0d1fd.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-rmail-f27e2275-9a120936.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-rmail-f27e2275-9a120936.eln
new file mode 100755
index 0000000..9fed716
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-rmail-f27e2275-9a120936.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-w3m-e82e1e2d-94ae235a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-w3m-e82e1e2d-94ae235a.eln
new file mode 100755
index 0000000..1011149
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ol-w3m-e82e1e2d-94ae235a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-agenda-3c0198d7-c38c7de6.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-agenda-3c0198d7-c38c7de6.eln
new file mode 100755
index 0000000..8c3fad6
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-agenda-3c0198d7-c38c7de6.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-bullets-406b09dd-3308bbbc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-bullets-406b09dd-3308bbbc.eln
new file mode 100755
index 0000000..d1d6aca
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-bullets-406b09dd-3308bbbc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-clock-660c3e46-7638df9b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-clock-660c3e46-7638df9b.eln
new file mode 100755
index 0000000..dd070c7
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-clock-660c3e46-7638df9b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-compat-8f643782-396e3536.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-compat-8f643782-396e3536.eln
new file mode 100755
index 0000000..1c78383
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-compat-8f643782-396e3536.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-cycle-05ca4f54-821776dd.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-cycle-05ca4f54-821776dd.eln
new file mode 100755
index 0000000..7eebe23
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-cycle-05ca4f54-821776dd.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-d208de9c-870ab2cc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-d208de9c-870ab2cc.eln
new file mode 100755
index 0000000..3e6257c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-d208de9c-870ab2cc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-element-763f8d74-2b5f0311.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-element-763f8d74-2b5f0311.eln
new file mode 100755
index 0000000..fd8a3e9
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-element-763f8d74-2b5f0311.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-entities-aa8d636b-c1428be2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-entities-aa8d636b-c1428be2.eln
new file mode 100755
index 0000000..4465a83
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-entities-aa8d636b-c1428be2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-faces-fdfdb79f-76c1c9fa.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-faces-fdfdb79f-76c1c9fa.eln
new file mode 100755
index 0000000..b9e8985
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-faces-fdfdb79f-76c1c9fa.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-fold-6bfb5591-22e1e6ca.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-fold-6bfb5591-22e1e6ca.eln
new file mode 100755
index 0000000..d576877
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-fold-6bfb5591-22e1e6ca.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-fold-core-45e5a935-fe38320a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-fold-core-45e5a935-fe38320a.eln
new file mode 100755
index 0000000..6bc650d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-fold-core-45e5a935-fe38320a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-footnote-a50a8027-ffc28943.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-footnote-a50a8027-ffc28943.eln
new file mode 100755
index 0000000..76b276e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-footnote-a50a8027-ffc28943.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-id-b4e96473-6847ccac.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-id-b4e96473-6847ccac.eln
new file mode 100755
index 0000000..6227e12
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-id-b4e96473-6847ccac.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-indent-91cb060a-af5dec0a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-indent-91cb060a-af5dec0a.eln
new file mode 100755
index 0000000..98251fc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-indent-91cb060a-af5dec0a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-keys-d9945960-b26973cb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-keys-d9945960-b26973cb.eln
new file mode 100755
index 0000000..cf45d08
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-keys-d9945960-b26973cb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-list-96883631-31079817.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-list-96883631-31079817.eln
new file mode 100755
index 0000000..5e4d1a2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-list-96883631-31079817.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-macro-6e7b0632-d7310c05.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-macro-6e7b0632-d7310c05.eln
new file mode 100755
index 0000000..65b1564
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-macro-6e7b0632-d7310c05.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-macs-aa4d7af1-1dc98955.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-macs-aa4d7af1-1dc98955.eln
new file mode 100755
index 0000000..25c4208
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-macs-aa4d7af1-1dc98955.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-pcomplete-720280c5-e44e1232.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-pcomplete-720280c5-e44e1232.eln
new file mode 100755
index 0000000..4846f73
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-pcomplete-720280c5-e44e1232.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-persist-596c089f-fe3aec0c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-persist-596c089f-fe3aec0c.eln
new file mode 100755
index 0000000..91f84fb
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-persist-596c089f-fe3aec0c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-refile-7eecbbb9-a1a47e17.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-refile-7eecbbb9-a1a47e17.eln
new file mode 100755
index 0000000..552fc6c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-refile-7eecbbb9-a1a47e17.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-src-656a0d3e-cfb91ad7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-src-656a0d3e-cfb91ad7.eln
new file mode 100755
index 0000000..ad77b65
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-src-656a0d3e-cfb91ad7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-table-986a2c6e-51799606.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-table-986a2c6e-51799606.eln
new file mode 100755
index 0000000..3a94d3b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/org-table-986a2c6e-51799606.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/outline-afc41f82-67467bbc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/outline-afc41f82-67467bbc.eln
new file mode 100755
index 0000000..ff3034b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/outline-afc41f82-67467bbc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/package-14201d8e-51ce59ee.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/package-14201d8e-51ce59ee.eln
new file mode 100755
index 0000000..d61b191
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/package-14201d8e-51ce59ee.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/parse-time-ca7017be-e0ef2075.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/parse-time-ca7017be-e0ef2075.eln
new file mode 100755
index 0000000..7be66a1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/parse-time-ca7017be-e0ef2075.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/password-cache-187e4eec-7151bf3b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/password-cache-187e4eec-7151bf3b.eln
new file mode 100755
index 0000000..1f60317
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/password-cache-187e4eec-7151bf3b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pcase-394c5744-838284f8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pcase-394c5744-838284f8.eln
new file mode 100755
index 0000000..3821b58
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pcase-394c5744-838284f8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pcomplete-81dbd8b0-96480051.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pcomplete-81dbd8b0-96480051.eln
new file mode 100755
index 0000000..4ccf1a3
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pcomplete-81dbd8b0-96480051.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pcvs-util-35d8f453-72d813cb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pcvs-util-35d8f453-72d813cb.eln
new file mode 100755
index 0000000..f61050e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pcvs-util-35d8f453-72d813cb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/persist-15dc144f-f1442f6f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/persist-15dc144f-f1442f6f.eln
new file mode 100755
index 0000000..4faeeda
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/persist-15dc144f-f1442f6f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pixel-fill-83d963be-2bc7bef2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pixel-fill-83d963be-2bc7bef2.eln
new file mode 100755
index 0000000..6d8ad8e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pixel-fill-83d963be-2bc7bef2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/plz-e20bfc66-afba82f0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/plz-e20bfc66-afba82f0.eln
new file mode 100755
index 0000000..4ecc43b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/plz-e20bfc66-afba82f0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/posframe-ec7cac54-521ca389.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/posframe-ec7cac54-521ca389.eln
new file mode 100755
index 0000000..7a09ca5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/posframe-ec7cac54-521ca389.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pp-5d47c1cc-462efba5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pp-5d47c1cc-462efba5.eln
new file mode 100755
index 0000000..83c2ac6
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pp-5d47c1cc-462efba5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/project-5477de5a-d8ba2cf5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/project-5477de5a-d8ba2cf5.eln
new file mode 100755
index 0000000..ffa077e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/project-5477de5a-d8ba2cf5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/projectile-f5968da5-c7b3cdc2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/projectile-f5968da5-c7b3cdc2.eln
new file mode 100755
index 0000000..de86411
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/projectile-f5968da5-c7b3cdc2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pulse-35e729a5-5d8a3a11.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pulse-35e729a5-5d8a3a11.eln
new file mode 100755
index 0000000..caf153e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pulse-35e729a5-5d8a3a11.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/puny-eb5a151f-3b98aff5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/puny-eb5a151f-3b98aff5.eln
new file mode 100755
index 0000000..aa85454
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/puny-eb5a151f-3b98aff5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/python-4c762d55-65f77997.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/python-4c762d55-65f77997.eln
new file mode 100755
index 0000000..795175e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/python-4c762d55-65f77997.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pyvenv-f8d7c4a7-027c9b97.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pyvenv-f8d7c4a7-027c9b97.eln
new file mode 100755
index 0000000..146cc03
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/pyvenv-f8d7c4a7-027c9b97.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rainbow-delimiters-6ac00a9c-2f6d45a1.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rainbow-delimiters-6ac00a9c-2f6d45a1.eln
new file mode 100755
index 0000000..443919e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rainbow-delimiters-6ac00a9c-2f6d45a1.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/range-2231b0fa-b56da976.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/range-2231b0fa-b56da976.eln
new file mode 100755
index 0000000..b637613
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/range-2231b0fa-b56da976.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rect-cd288962-dbb6b96b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rect-cd288962-dbb6b96b.eln
new file mode 100755
index 0000000..86bb12f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rect-cd288962-dbb6b96b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/reveal-65b32910-b80bf3b5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/reveal-65b32910-b80bf3b5.eln
new file mode 100755
index 0000000..5cab5ce
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/reveal-65b32910-b80bf3b5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc2045-713c994b-1d9003f5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc2045-713c994b-1d9003f5.eln
new file mode 100755
index 0000000..f7f349a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc2045-713c994b-1d9003f5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc2047-b84e264d-95b366f3.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc2047-b84e264d-95b366f3.eln
new file mode 100755
index 0000000..c37863e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc2047-b84e264d-95b366f3.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc2231-e2cbed75-045f5369.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc2231-e2cbed75-045f5369.eln
new file mode 100755
index 0000000..725b2f0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc2231-e2cbed75-045f5369.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc6068-5e4d60aa-0ff6e574.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc6068-5e4d60aa-0ff6e574.eln
new file mode 100755
index 0000000..9873c8a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc6068-5e4d60aa-0ff6e574.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc822-a91daeff-8f6184c8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc822-a91daeff-8f6184c8.eln
new file mode 100755
index 0000000..5ef8ed5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rfc822-a91daeff-8f6184c8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-62eadd39-429b0355.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-62eadd39-429b0355.eln
new file mode 100755
index 0000000..11a4288
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-62eadd39-429b0355.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-header-abb79ea7-cd427dc6.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-header-abb79ea7-cd427dc6.eln
new file mode 100755
index 0000000..b055916
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-header-abb79ea7-cd427dc6.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-history-6358c37b-8e060b7d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-history-6358c37b-8e060b7d.eln
new file mode 100755
index 0000000..3dbebf0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-history-6358c37b-8e060b7d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-ibuffer-629491eb-1c216624.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-ibuffer-629491eb-1c216624.eln
new file mode 100755
index 0000000..f723a1b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-ibuffer-629491eb-1c216624.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-info-hack-40be7e99-53aa5365.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-info-hack-40be7e99-53aa5365.eln
new file mode 100755
index 0000000..8b9af3b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-info-hack-40be7e99-53aa5365.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-menu-b35623c6-ca4edf72.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-menu-b35623c6-ca4edf72.eln
new file mode 100755
index 0000000..843a137
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-menu-b35623c6-ca4edf72.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-result-44a0702d-031395b7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-result-44a0702d-031395b7.eln
new file mode 100755
index 0000000..df9eff2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rg-result-44a0702d-031395b7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ring-bff0b981-dfebb553.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ring-bff0b981-dfebb553.eln
new file mode 100755
index 0000000..da46710
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ring-bff0b981-dfebb553.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ripgrep-f52a6ac3-cfa36508.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ripgrep-f52a6ac3-cfa36508.eln
new file mode 100755
index 0000000..ed44253
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ripgrep-f52a6ac3-cfa36508.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ruler-mode-3c3fd53f-0b84cc7d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ruler-mode-3c3fd53f-0b84cc7d.eln
new file mode 100755
index 0000000..5c11ff1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/ruler-mode-3c3fd53f-0b84cc7d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rx-627d8c83-7fca8575.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rx-627d8c83-7fca8575.eln
new file mode 100755
index 0000000..556cd98
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/rx-627d8c83-7fca8575.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/s-c3b7834f-f815a3a2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/s-c3b7834f-f815a3a2.eln
new file mode 100755
index 0000000..eb8a5f9
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/s-c3b7834f-f815a3a2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/sendmail-bcf4df3f-bdfb62c9.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/sendmail-bcf4df3f-bdfb62c9.eln
new file mode 100755
index 0000000..983cdb2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/sendmail-bcf4df3f-bdfb62c9.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/server-0cc44189-6be4835d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/server-0cc44189-6be4835d.eln
new file mode 100755
index 0000000..2b84418
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/server-0cc44189-6be4835d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/sh-script-c65f7507-d014cedf.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/sh-script-c65f7507-d014cedf.eln
new file mode 100755
index 0000000..75108f2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/sh-script-c65f7507-d014cedf.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shell-57930f41-f425d43b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shell-57930f41-f425d43b.eln
new file mode 100755
index 0000000..ab7cda0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shell-57930f41-f425d43b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shortdoc-c079c0cb-c72b54fa.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shortdoc-c079c0cb-c72b54fa.eln
new file mode 100755
index 0000000..d031288
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shortdoc-c079c0cb-c72b54fa.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shr-375ad325-ef4c1910.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shr-375ad325-ef4c1910.eln
new file mode 100755
index 0000000..0b45664
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shr-375ad325-ef4c1910.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shrink-path-0e12d1e5-74a89b2f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shrink-path-0e12d1e5-74a89b2f.eln
new file mode 100755
index 0000000..140e647
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/shrink-path-0e12d1e5-74a89b2f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/skeleton-435acb71-bf985e38.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/skeleton-435acb71-bf985e38.eln
new file mode 100755
index 0000000..f984963
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/skeleton-435acb71-bf985e38.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/smerge-mode-3977987a-d3ee5ddd.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/smerge-mode-3977987a-d3ee5ddd.eln
new file mode 100755
index 0000000..e8bdb47
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/smerge-mode-3977987a-d3ee5ddd.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/smie-45b5c06f-5eb85653.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/smie-45b5c06f-5eb85653.eln
new file mode 100755
index 0000000..f3ea11c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/smie-45b5c06f-5eb85653.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/smime-846b28fb-22d906bd.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/smime-846b28fb-22d906bd.eln
new file mode 100755
index 0000000..bc5e56f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/smime-846b28fb-22d906bd.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/spinner-f3637a88-043a22dc.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/spinner-f3637a88-043a22dc.eln
new file mode 100755
index 0000000..cf4c39b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/spinner-f3637a88-043a22dc.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-616c6c2d636f6d706c6574696f6e73_all_completions_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-616c6c2d636f6d706c6574696f6e73_all_completions_0.eln
new file mode 100755
index 0000000..1906b01
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-616c6c2d636f6d706c6574696f6e73_all_completions_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-64656c6574652d66696c65_delete_file_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-64656c6574652d66696c65_delete_file_0.eln
new file mode 100755
index 0000000..7f367a0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-64656c6574652d66696c65_delete_file_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-64657363726962652d6275666665722d62696e64696e6773_describe_buffer_bindings_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-64657363726962652d6275666665722d62696e64696e6773_describe_buffer_bindings_0.eln
new file mode 100755
index 0000000..f3fb95d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-64657363726962652d6275666665722d62696e64696e6773_describe_buffer_bindings_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-6d616b652d70726f63657373_make_process_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-6d616b652d70726f63657373_make_process_0.eln
new file mode 100755
index 0000000..df2d87f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-6d616b652d70726f63657373_make_process_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-6d657373616765_message_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-6d657373616765_message_0.eln
new file mode 100755
index 0000000..fe3cf79
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-6d657373616765_message_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-726561642d6b65792d73657175656e63652d766563746f72_read_key_sequence_vector_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-726561642d6b65792d73657175656e63652d766563746f72_read_key_sequence_vector_0.eln
new file mode 100755
index 0000000..a0a7659
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-726561642d6b65792d73657175656e63652d766563746f72_read_key_sequence_vector_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-726561642d6b65792d73657175656e6365_read_key_sequence_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-726561642d6b65792d73657175656e6365_read_key_sequence_0.eln
new file mode 100755
index 0000000..8ec364d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-726561642d6b65792d73657175656e6365_read_key_sequence_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7265637572736976652d65646974_recursive_edit_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7265637572736976652d65646974_recursive_edit_0.eln
new file mode 100755
index 0000000..9c225ec
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7265637572736976652d65646974_recursive_edit_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-72656e616d652d66696c65_rename_file_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-72656e616d652d66696c65_rename_file_0.eln
new file mode 100755
index 0000000..3a13eb1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-72656e616d652d66696c65_rename_file_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-73656c6563742d77696e646f77_select_window_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-73656c6563742d77696e646f77_select_window_0.eln
new file mode 100755
index 0000000..b620d5b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-73656c6563742d77696e646f77_select_window_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7365742d77696e646f772d627566666572_set_window_buffer_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7365742d77696e646f772d627566666572_set_window_buffer_0.eln
new file mode 100755
index 0000000..8f71532
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7365742d77696e646f772d627566666572_set_window_buffer_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7573652d676c6f62616c2d6d6170_use_global_map_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7573652d676c6f62616c2d6d6170_use_global_map_0.eln
new file mode 100755
index 0000000..5c632c1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7573652d676c6f62616c2d6d6170_use_global_map_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7573652d6c6f63616c2d6d6170_use_local_map_0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7573652d6c6f63616c2d6d6170_use_local_map_0.eln
new file mode 100755
index 0000000..62f7e6e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr--trampoline-7573652d6c6f63616c2d6d6170_use_local_map_0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr-x-02dfef32-efcc4a00.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr-x-02dfef32-efcc4a00.eln
new file mode 100755
index 0000000..c1fae2f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/subr-x-02dfef32-efcc4a00.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/svg-4c391752-0afbc04b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/svg-4c391752-0afbc04b.eln
new file mode 100755
index 0000000..01e3d7e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/svg-4c391752-0afbc04b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/svg-lib-dde4a640-a88c1f62.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/svg-lib-dde4a640-a88c1f62.eln
new file mode 100755
index 0000000..6f513e1
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/svg-lib-dde4a640-a88c1f62.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/swiper-9fb5007e-002157c7.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/swiper-9fb5007e-002157c7.eln
new file mode 100755
index 0000000..b4dc7b2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/swiper-9fb5007e-002157c7.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tabify-b74f3a50-ccf1283e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tabify-b74f3a50-ccf1283e.eln
new file mode 100755
index 0000000..7d40ebc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tabify-b74f3a50-ccf1283e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tar-mode-8829ee02-ae9c6e22.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tar-mode-8829ee02-ae9c6e22.eln
new file mode 100755
index 0000000..a25a24c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tar-mode-8829ee02-ae9c6e22.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/taxy-6ba152cd-df057488.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/taxy-6ba152cd-df057488.eln
new file mode 100755
index 0000000..00ce140
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/taxy-6ba152cd-df057488.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/taxy-magit-section-43bca0a7-d35b259e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/taxy-magit-section-43bca0a7-d35b259e.eln
new file mode 100755
index 0000000..9cab3ba
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/taxy-magit-section-43bca0a7-d35b259e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tempo-5756037f-9495b002.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tempo-5756037f-9495b002.eln
new file mode 100755
index 0000000..34591b4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tempo-5756037f-9495b002.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/text-property-search-db1383f6-b55737e0.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/text-property-search-db1383f6-b55737e0.eln
new file mode 100755
index 0000000..a71be48
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/text-property-search-db1383f6-b55737e0.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/thingatpt-6fc8a4ab-cebdd435.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/thingatpt-6fc8a4ab-cebdd435.eln
new file mode 100755
index 0000000..d1c875b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/thingatpt-6fc8a4ab-cebdd435.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/time-date-40951a48-f191adf4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/time-date-40951a48-f191adf4.eln
new file mode 100755
index 0000000..505e1ba
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/time-date-40951a48-f191adf4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/trace-f0924b40-7d8be8ef.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/trace-f0924b40-7d8be8ef.eln
new file mode 100755
index 0000000..c13df3a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/trace-f0924b40-7d8be8ef.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tramp-compat-fa04d39a-b450c968.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tramp-compat-fa04d39a-b450c968.eln
new file mode 100755
index 0000000..cfa8b41
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tramp-compat-fa04d39a-b450c968.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tramp-integration-58d1aa20-7740fc75.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tramp-integration-58d1aa20-7740fc75.eln
new file mode 100755
index 0000000..ebc99bc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tramp-integration-58d1aa20-7740fc75.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/trampver-0d42d995-6c0d4655.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/trampver-0d42d995-6c0d4655.eln
new file mode 100755
index 0000000..2d5f32c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/trampver-0d42d995-6c0d4655.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/transient-376febf1-00c93387.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/transient-376febf1-00c93387.eln
new file mode 100755
index 0000000..4ea6c6f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/transient-376febf1-00c93387.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/transient-83d97d57-92ad3fa9.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/transient-83d97d57-92ad3fa9.eln
new file mode 100755
index 0000000..81cf958
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/transient-83d97d57-92ad3fa9.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tree-widget-8dccf6ba-23a7612a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tree-widget-8dccf6ba-23a7612a.eln
new file mode 100755
index 0000000..a9dffe8
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/tree-widget-8dccf6ba-23a7612a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/treepy-52ba1570-d2119d9a.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/treepy-52ba1570-d2119d9a.eln
new file mode 100755
index 0000000..3926afa
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/treepy-52ba1570-d2119d9a.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/treesit-37439c61-97df641d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/treesit-37439c61-97df641d.eln
new file mode 100755
index 0000000..7808dff
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/treesit-37439c61-97df641d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/two-column-957d5508-f1eee06e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/two-column-957d5508-f1eee06e.eln
new file mode 100755
index 0000000..4081ba4
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/two-column-957d5508-f1eee06e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-38944b26-91585087.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-38944b26-91585087.eln
new file mode 100755
index 0000000..c9b0161
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-38944b26-91585087.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-auth-088dc9ae-9e295755.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-auth-088dc9ae-9e295755.eln
new file mode 100755
index 0000000..7e2cf09
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-auth-088dc9ae-9e295755.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-cache-57858dc5-d04a6a35.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-cache-57858dc5-d04a6a35.eln
new file mode 100755
index 0000000..786d8f6
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-cache-57858dc5-d04a6a35.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-cookie-02b28750-07f8a2ea.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-cookie-02b28750-07f8a2ea.eln
new file mode 100755
index 0000000..d445535
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-cookie-02b28750-07f8a2ea.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-domsuf-beabcbfe-c9bce20e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-domsuf-beabcbfe-c9bce20e.eln
new file mode 100755
index 0000000..0df28b5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-domsuf-beabcbfe-c9bce20e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-expand-cf7ffc4e-8e4adbde.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-expand-cf7ffc4e-8e4adbde.eln
new file mode 100755
index 0000000..ed3e71a
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-expand-cf7ffc4e-8e4adbde.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-file-f44a48ab-60b5bf09.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-file-f44a48ab-60b5bf09.eln
new file mode 100755
index 0000000..b0acb96
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-file-f44a48ab-60b5bf09.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-gw-93360de5-c7525cc4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-gw-93360de5-c7525cc4.eln
new file mode 100755
index 0000000..f6a214c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-gw-93360de5-c7525cc4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-handlers-8b35c993-473cb206.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-handlers-8b35c993-473cb206.eln
new file mode 100755
index 0000000..c8d661e
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-handlers-8b35c993-473cb206.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-history-a9b2f6e8-f26837d2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-history-a9b2f6e8-f26837d2.eln
new file mode 100755
index 0000000..ed0ac54
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-history-a9b2f6e8-f26837d2.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-http-d4259444-fe54f57f.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-http-d4259444-fe54f57f.eln
new file mode 100755
index 0000000..79ff7b9
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-http-d4259444-fe54f57f.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-methods-08bf763a-fb816c9d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-methods-08bf763a-fb816c9d.eln
new file mode 100755
index 0000000..c39033f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-methods-08bf763a-fb816c9d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-parse-ee297c9b-bd80b009.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-parse-ee297c9b-bd80b009.eln
new file mode 100755
index 0000000..20442aa
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-parse-ee297c9b-bd80b009.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-privacy-7df6b777-2c88e1ee.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-privacy-7df6b777-2c88e1ee.eln
new file mode 100755
index 0000000..b4b6b22
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-privacy-7df6b777-2c88e1ee.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-proxy-fc0751f0-2d9a6682.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-proxy-fc0751f0-2d9a6682.eln
new file mode 100755
index 0000000..eddc391
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-proxy-fc0751f0-2d9a6682.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-queue-4e80de45-232caba1.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-queue-4e80de45-232caba1.eln
new file mode 100755
index 0000000..82808cd
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-queue-4e80de45-232caba1.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-util-28122a93-962bf717.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-util-28122a93-962bf717.eln
new file mode 100755
index 0000000..6dcc5dd
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-util-28122a93-962bf717.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-vars-04b97511-2c035d05.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-vars-04b97511-2c035d05.eln
new file mode 100755
index 0000000..b6694c3
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/url-vars-04b97511-2c035d05.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-bind-key-201012df-ee8ed859.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-bind-key-201012df-ee8ed859.eln
new file mode 100755
index 0000000..4a3afff
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-bind-key-201012df-ee8ed859.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-core-b234260b-209e2629.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-core-b234260b-209e2629.eln
new file mode 100755
index 0000000..8225767
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-core-b234260b-209e2629.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-delight-4b7925f6-d391d942.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-delight-4b7925f6-d391d942.eln
new file mode 100755
index 0000000..1fbccae
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-delight-4b7925f6-d391d942.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-diminish-c766422e-d8059ee5.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-diminish-c766422e-d8059ee5.eln
new file mode 100755
index 0000000..c541859
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-diminish-c766422e-d8059ee5.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-ensure-7a9061b4-42b15b04.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-ensure-7a9061b4-42b15b04.eln
new file mode 100755
index 0000000..413105c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/use-package-ensure-7a9061b4-42b15b04.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/utf7-8aab9346-0cfd2c82.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/utf7-8aab9346-0cfd2c82.eln
new file mode 100755
index 0000000..f9004be
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/utf7-8aab9346-0cfd2c82.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-bzr-1e531aa5-1485e463.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-bzr-1e531aa5-1485e463.eln
new file mode 100755
index 0000000..b51722c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-bzr-1e531aa5-1485e463.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-cvs-2047e045-73ab1a3c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-cvs-2047e045-73ab1a3c.eln
new file mode 100755
index 0000000..8d975c0
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-cvs-2047e045-73ab1a3c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-d8599e21-5eb39f6d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-d8599e21-5eb39f6d.eln
new file mode 100755
index 0000000..e5ca149
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-d8599e21-5eb39f6d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-dispatcher-d82eb341-75f8ef2b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-dispatcher-d82eb341-75f8ef2b.eln
new file mode 100755
index 0000000..668e31d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-dispatcher-d82eb341-75f8ef2b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-git-5d6756dc-eda20e0c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-git-5d6756dc-eda20e0c.eln
new file mode 100755
index 0000000..4faae8c
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-git-5d6756dc-eda20e0c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-hg-69e20438-2b73605d.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-hg-69e20438-2b73605d.eln
new file mode 100755
index 0000000..ad025be
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-hg-69e20438-2b73605d.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-rcs-6dddc773-f0126345.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-rcs-6dddc773-f0126345.eln
new file mode 100755
index 0000000..d7659ee
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-rcs-6dddc773-f0126345.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-sccs-3997d8ba-086a4f58.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-sccs-3997d8ba-086a4f58.eln
new file mode 100755
index 0000000..ccc4e36
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-sccs-3997d8ba-086a4f58.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-src-2157d054-5aefdd15.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-src-2157d054-5aefdd15.eln
new file mode 100755
index 0000000..3775772
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-src-2157d054-5aefdd15.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-svn-e027bd39-98e82a20.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-svn-e027bd39-98e82a20.eln
new file mode 100755
index 0000000..bea27fe
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/vc-svn-e027bd39-98e82a20.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/verilog-mode-b3ec8c2e-5b214e38.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/verilog-mode-b3ec8c2e-5b214e38.eln
new file mode 100755
index 0000000..ebf5aa2
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/verilog-mode-b3ec8c2e-5b214e38.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/view-faefc6b2-27c9bbbb.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/view-faefc6b2-27c9bbbb.eln
new file mode 100755
index 0000000..f7f1205
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/view-faefc6b2-27c9bbbb.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/warnings-28e75f4d-25346206.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/warnings-28e75f4d-25346206.eln
new file mode 100755
index 0000000..c2f32fd
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/warnings-28e75f4d-25346206.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/wgrep-c59b3a3e-a9adc40c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/wgrep-c59b3a3e-a9adc40c.eln
new file mode 100755
index 0000000..e0e6fa5
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/wgrep-c59b3a3e-a9adc40c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/wgrep-rg-74ce9977-a56be73e.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/wgrep-rg-74ce9977-a56be73e.eln
new file mode 100755
index 0000000..9b4255f
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/wgrep-rg-74ce9977-a56be73e.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/which-func-fb53504e-6ee45ec8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/which-func-fb53504e-6ee45ec8.eln
new file mode 100755
index 0000000..c98436b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/which-func-fb53504e-6ee45ec8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/which-key-4b0d23f6-5b2ee717.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/which-key-4b0d23f6-5b2ee717.eln
new file mode 100755
index 0000000..bef19cc
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/which-key-4b0d23f6-5b2ee717.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/wid-edit-5b92861a-075130ef.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/wid-edit-5b92861a-075130ef.eln
new file mode 100755
index 0000000..50fef03
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/wid-edit-5b92861a-075130ef.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/windmove-15827e24-7dbd232b.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/windmove-15827e24-7dbd232b.eln
new file mode 100755
index 0000000..6f3aa16
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/windmove-15827e24-7dbd232b.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/with-editor-1ddcef4e-e564d2f4.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/with-editor-1ddcef4e-e564d2f4.eln
new file mode 100755
index 0000000..5e7f258
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/with-editor-1ddcef4e-e564d2f4.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/woman-468654b8-e33c67ac.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/woman-468654b8-e33c67ac.eln
new file mode 100755
index 0000000..dae20b7
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/woman-468654b8-e33c67ac.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/xdg-9947111f-c2dfed16.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/xdg-9947111f-c2dfed16.eln
new file mode 100755
index 0000000..3417a94
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/xdg-9947111f-c2dfed16.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/xml-78b9f1ba-59b789b8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/xml-78b9f1ba-59b789b8.eln
new file mode 100755
index 0000000..4c1c81b
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/xml-78b9f1ba-59b789b8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/xref-9ee0ccd1-1902725c.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/xref-9ee0ccd1-1902725c.eln
new file mode 100755
index 0000000..13acaa6
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/xref-9ee0ccd1-1902725c.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/yaml-69b717ba-8ac6c5e8.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/yaml-69b717ba-8ac6c5e8.eln
new file mode 100755
index 0000000..2d997ea
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/yaml-69b717ba-8ac6c5e8.eln differ
diff --git a/emacs/.emacs.d/eln-cache/29.3-ffcb1460/yank-media-62540c94-1785e1e2.eln b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/yank-media-62540c94-1785e1e2.eln
new file mode 100755
index 0000000..537409d
Binary files /dev/null and b/emacs/.emacs.d/eln-cache/29.3-ffcb1460/yank-media-62540c94-1785e1e2.eln differ
diff --git a/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout-autoloads.el b/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout-autoloads.el
new file mode 100644
index 0000000..5893af2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout-autoloads.el
@@ -0,0 +1,55 @@
+;;; 0blayout-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from 0blayout.el
+
+(autoload '0blayout-add-keybindings-with-prefix "0blayout" "\
+Add 0blayout keybindings using the prefix PREFIX.
+
+(fn PREFIX)")
+(defvar 0blayout-mode nil "\
+Non-nil if 0bLayout mode is enabled.
+See the `0blayout-mode' command
+for a description of this minor mode.")
+(custom-autoload '0blayout-mode "0blayout" nil)
+(autoload '0blayout-mode "0blayout" "\
+Handle layouts with ease
+
+This is a global minor mode.  If called interactively, toggle the
+`0bLayout mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='0blayout-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "0blayout" '("0blayout-"))
+
+;;; End of scraped data
+
+(provide '0blayout-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; 0blayout-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout-pkg.el b/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout-pkg.el
new file mode 100644
index 0000000..ebeed65
--- /dev/null
+++ b/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout-pkg.el
@@ -0,0 +1,8 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "0blayout" "20190703.527"
+  "Layout grouping with ease."
+  ()
+  :url "https://github.com/etu/0blayout"
+  :commit "fd9a8f353dbd45b4628b5f84b8d8c2525ebf571d"
+  :revdesc "fd9a8f353dbd"
+  :keywords '("convenience" "window-management"))
diff --git a/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout.el b/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout.el
new file mode 100644
index 0000000..c66a870
--- /dev/null
+++ b/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout.el
@@ -0,0 +1,200 @@
+;;; 0blayout.el --- Layout grouping with ease
+
+;; Copyright (c) 2015-2016 Elis Axelsson
+
+;; Author: Elis "etu" Axelsson
+;; URL: https://github.com/etu/0blayout
+;; Package-Version: 20190703.527
+;; Package-Revision: fd9a8f353dbd
+;; Keywords: convenience, window-management
+
+;;; Commentary:
+
+;; This global minor mode provides a simple way to switch between layouts and
+;; the buffers you left open before you switched (unless you closed it).
+
+;; It doesn't require any setup at all more than:
+;; (0blayout-mode)
+
+;; When you start Emacs with 0blayout loaded, you will have a default layout
+;; named "default", and then you can create new layouts (<prefix> C-c), switch
+;; layouts (<prefix> C-b), and kill the current layout (<prefix> C-k).
+;; The default <prefix> is (C-c C-l), but you can change it using:
+;; (0blayout-add-keybindings-with-prefix "<your prefix>")
+
+;; You can also customize-variable to change the name of the default session.
+
+;; The project is hosted at https://github.com/etu/0blayout
+;; There you can leave bug-reports and suggestions.
+
+;; Another comparable mode is eyebrowse which have been developed for longer.
+
+;;; License:
+
+;; This file is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this file; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Code:
+
+(defgroup 0blayout nil
+  "Configuration settings for 0blayout-mode."
+  :group 'convenience)
+
+(defvar 0blayout-alist ()
+  "List of the currently defined layouts.")
+
+(defcustom 0blayout-default "default"
+  "Name of default layout used."
+  :type 'string
+  :group '0blayout)
+
+(defvar 0blayout-keys-map '(("C-c" . 0blayout-new)
+                            ("C-k" . 0blayout-kill)
+                            ("C-b" . 0blayout-switch))
+  "Which keys bounded to which functions map.")
+
+(defvar 0blayout-mode-map (make-sparse-keymap)
+  "Keymap for 0blayout.")
+
+
+;; Function to create a new layout
+(defun 0blayout-new (layout-name)
+  "0blayout creating function.
+Argument LAYOUT-NAME Name of the layout."
+  (interactive "sEnter name of new layout: ")
+
+  ;; Save the currently active layout
+  (0blayout-save)
+
+  ;; Then we just delete all other windows and switch to a *scratch* buffer,
+  ;; then it's up to the user to set up their layout.
+  (delete-other-windows)
+  (switch-to-buffer "*scratch*")
+
+  ;; Save the name of the new current layout
+  (0blayout-set-current-name layout-name))
+
+
+;; Function to kill current layout
+(defun 0blayout-kill ()
+  "0blayout removal function."
+  (interactive)
+
+  (message "Killing layout: '%s'" (0blayout-get-current-name))
+
+  ;; Remove current layout from known layouts
+  (setq 0blayout-alist
+        (assq-delete-all (intern (0blayout-get-current-name)) 0blayout-alist))
+
+  ;; Switch to next layout in the list
+  (let ((new-layout (car (car 0blayout-alist))))
+    (if (eq new-layout nil)
+        ;; If there's no other layout, make a new default layout
+        (progn
+          (0blayout-set-current-name 0blayout-default)
+          (0blayout-new 0blayout-default))
+
+      ;; Switch to some other saved layout
+      (progn
+        (set-window-configuration (cdr (car 0blayout-alist)))
+        (0blayout-set-current-name (symbol-name new-layout))))))
+
+
+;; Function to switch layout
+(defun 0blayout-switch (layout-name)
+  "0blayout switching function.
+Argument LAYOUT-NAME Name of the layout."
+  (interactive
+   (list
+    (completing-read "Layout to switch to: " 0blayout-alist)))
+
+  ;; Save the currently active layout
+  (0blayout-save)
+
+  (let ((layout (assoc (intern layout-name) 0blayout-alist)))
+    (if (eq layout nil)
+        (message "No layout with name: '%s' is defined" layout-name)
+      (progn
+        ;; Load window configuration
+        (set-window-configuration (cdr layout))
+
+        ;; Save the name of the currently active layout
+        (0blayout-set-current-name layout-name)
+
+        (message "Switch to layout: '%s'" layout-name)))))
+
+
+;; Function to save layout
+(defun 0blayout-save ()
+  "This is a helper function to save the current layout."
+
+  ;; Remove all saves of current layout before saving
+  (setq 0blayout-alist
+        (assq-delete-all
+         (intern (0blayout-get-current-name)) 0blayout-alist))
+
+  ;; Add current layout to list
+  (add-to-list '0blayout-alist
+               (cons (intern (0blayout-get-current-name))
+                     (current-window-configuration)))
+
+  (message "Saved the currently active layout: %s" (0blayout-get-current-name)))
+
+
+;; Save current layout name
+(defun 0blayout-set-current-name (layout-name)
+  "Helper function to store current LAYOUT-NAME for this frame."
+
+  (set-frame-parameter nil '0blayout-current layout-name))
+
+
+;; Get current layout name
+(defun 0blayout-get-current-name ()
+  "Helper function to get current LAYOUT-NAME for this frame."
+
+  ;; Get variable from current frame
+  (let ((current-layout (frame-parameter nil '0blayout-current)))
+    ;; Check if it's nil
+    (if (eq current-layout nil)
+        ;; If so, return default value
+        0blayout-default
+      ;; else return current value
+      current-layout)))
+
+
+;;;###autoload
+(defun 0blayout-add-keybindings-with-prefix (prefix)
+  "Add 0blayout keybindings using the prefix PREFIX."
+  (setf (cdr 0blayout-mode-map) nil)
+  (dolist (pair 0blayout-keys-map)
+    (define-key 0blayout-mode-map
+      (kbd (format "%s %s" prefix (car pair)))
+      (cdr pair))))
+
+(0blayout-add-keybindings-with-prefix "C-c C-l")
+
+
+;;;###autoload
+(define-minor-mode 0blayout-mode
+  "Handle layouts with ease"
+  :lighter " 0bL"
+  :global t
+  :group '0blayout
+  :keymap 0blayout-mode-map)
+
+
+(provide '0blayout)
+
+;;; 0blayout.el ends here
diff --git a/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout.elc b/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout.elc
new file mode 100644
index 0000000..1248951
Binary files /dev/null and b/emacs/.emacs.d/elpa/0blayout-20190703.527/0blayout.elc differ
diff --git a/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0-autoloads.el b/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0-autoloads.el
new file mode 100644
index 0000000..f4f2ac3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0-autoloads.el
@@ -0,0 +1,52 @@
+;;; 0x0-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from 0x0.el
+
+(autoload '0x0-upload-file "0x0" "\
+Choose FILE and upload it to SERVER.
+
+(fn SERVER FILE)" t)
+(autoload '0x0-upload-text "0x0" "\
+Upload full or region text from the current buffer to SERVER.
+
+(fn SERVER)" t)
+(autoload '0x0-upload-kill-ring "0x0" "\
+Upload content from the \"kill-ring\" to SERVER.
+
+(fn SERVER)" t)
+(autoload '0x0-shorten-uri "0x0" "\
+Shorten the given URI with SERVER.
+
+(fn SERVER URI)" t)
+(autoload '0x0-popup "0x0" "\
+Create a new buffer, fill it with content, and upload it to SERVER later.
+
+(fn SERVER)" t)
+(autoload '0x0-dwim "0x0" "\
+Try to guess what to upload to SERVER.
+
+(fn SERVER)" t)
+(register-definition-prefixes "0x0" '("0x0-"))
+
+;;; End of scraped data
+
+(provide '0x0-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; 0x0-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0-pkg.el b/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0-pkg.el
new file mode 100644
index 0000000..9258688
--- /dev/null
+++ b/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0-pkg.el
@@ -0,0 +1,9 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "0x0" "20230823.2214"
+  "Upload sharing to 0x0.st."
+  '((emacs "26.1"))
+  :url "https://git.sr.ht/~willvaughn/emacs-0x0"
+  :commit "04f95142b25d8bb701f239539176df6617dcd982"
+  :revdesc "04f95142b25d"
+  :authors '(("William Vaughn" . "vaughnwilld@gmail.com"))
+  :maintainers '(("William Vaughn" . "vaughnwilld@gmail.com")))
diff --git a/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0.el b/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0.el
new file mode 100644
index 0000000..eeb879a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0.el
@@ -0,0 +1,346 @@
+;;; 0x0.el --- Upload sharing to 0x0.st -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2023 William Vaughn
+;;
+;; Author: William Vaughn <vaughnwilld@gmail.com>
+;; Maintainer: William Vaughn <vaughnwilld@gmail.com>
+;; Created: June 26, 2021
+;; Modified: August 16, 2023
+;; Package-Version: 20230823.2214
+;; Package-Revision: 04f95142b25d
+;; Homepage: https://git.sr.ht/~willvaughn/emacs-0x0
+;; Package-Requires: ((emacs "26.1"))
+;;
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;; Integration with https://0x0.st, envs.sh, ttm.sh, and self-hosted services
+;;
+;; Upload whatever you need to a pastebin server. The commands
+;; `0x0-upload-file',`0x0-upload-text' and `0x0-upload-kill-ring', which
+;; respectively upload (parts of) the current buffer, a file on your disk and a
+;; string from the minibuffer can be used too.
+;;
+;; The default host and the host this package is named after is https://0x0.st.
+;; Consider donating to https://liberapay.com/mia/donate if you like the service.
+
+(require 'url)
+
+;;; Code:
+(defgroup 0x0 nil
+  "Share files, links, pastes, and images with others."
+  :group 'convenience
+  :tag "0x0"
+  :prefix "0x0-")
+
+(defcustom 0x0-servers
+  `((0x0
+     :scheme "https"
+     :host "0x0.st"
+     :default-dir "~/Desktop"
+     :curl-args-fun 0x0--make-0x0-curl-args
+     :min-age 30
+     :max-age 365
+     :max-size ,(* 1024 1024 512))
+    (ttm
+     :scheme "https"
+     :host "ttm.sh"
+     :default-dir "~/Desktop"
+     :curl-args-fun 0x0--make-0x0-curl-args
+     :min-age 30
+     :max-age 365
+     :max-size ,(* 1024 1024 256))
+    (envs
+     :scheme "https"
+     :host "envs.sh"
+     :default-dir "~/Desktop"
+     :curl-args-fun 0x0--make-0x0-curl-args
+     :min-age 30
+     :max-age 365
+     :max-size ,(* 1024 1024 512)))
+  "Configurations for the target servers.
+
+Override these values to associate your own target servers."
+  :type '(alist :key-type symbol
+                :value-type (plist :value-type sexp)))
+
+(defcustom 0x0-default-server '0x0
+  "Symbol describing server to use.
+
+The symbol must be a key from the alist `0x0-servers'."
+  :type `(choice ,@(mapcar (lambda (srv)
+                             `(const :tag ,(plist-get (cdr srv) :host) ,(car srv)))
+                           0x0-servers)))
+
+(defcustom 0x0-use-curl 'if-installed
+  "Policy how how to use curl.
+Can be a symbol (t, nil, if-installed) to respectivly use curl
+unconditionally, never or only if found.
+Alternativly the value might be a string describing a path to the
+curl binary."
+  :type '(choice (const :tag "Unconditionally" t)
+                 (const :tag "If Installed" if-installed)
+                 (const :tag "Never" nil)
+                 (string :tag "Path to curl")))
+
+(defun 0x0--choose-server ()
+  "Prompt user for service to use."
+  (let ((server-key (if current-prefix-arg
+                        (intern (completing-read "Server: "
+                                                 (mapcar #'car 0x0-servers)
+                                                 nil t nil nil
+                                                 0x0-default-server))
+                      0x0-default-server)))
+    (cdr (assq server-key 0x0-servers))))
+
+(defun 0x0--calculate-timeout (server size)
+  "Calculate days a file of size SIZE would last on SERVER."
+  (condition-case nil
+      (let ((min-age (float (plist-get server :min-age)))
+            (max-age (float (plist-get server :max-age)))
+            (max-size (float (plist-get server :max-size))))
+        (+ min-age (* (- min-age max-age)
+                      (expt (- (/ size max-size) 1.0) 3))))
+    (wrong-type-argument nil)))
+
+(defun 0x0--get-server-default-dir (server)
+  "Access the :default-dir property of the SERVER Property list."
+  (plist-get server :default-dir))
+
+(defun 0x0--get-server-curl-args-fun (server)
+  "Access the value of :curl-args-fun on the SERVER."
+  (plist-get server :curl-args-fun))
+
+(defun 0x0--pick-file (server)
+  "Prompt to pick a file path or use Dired file at point.
+
+This function creates a prompt for interactive functions below.
+The SERVER is used to look up the default directory to use for where to find
+uploadable files."
+  (cond ((derived-mode-p 'dired-mode) (dired-file-name-at-point))
+        (t (read-file-name "Pick a file to share: " (0x0--get-server-default-dir server)))))
+
+(defun 0x0--make-server-host-uri (server &optional basic-auth-creds)
+  "Make a SERVER host URI using configuration properties.
+
+BASIC-AUTH-CREDS plist optionally contains :user and :pass."
+  (if basic-auth-creds
+      (format "%s://%s:%s@%s"
+              (plist-get server :scheme)
+              (plist-get basic-auth-creds :user)
+              (plist-get basic-auth-creds :pass)
+              (plist-get server :host))
+    (format "%s://%s" (plist-get server :scheme) (plist-get server :host))))
+
+(defun 0x0--make-0x0-curl-args (server file-name &optional bounded)
+  "Create 0x0 curl arguments from SERVER configs and FILE-NAME.
+
+BOUNDED indicates a partial upload and that changes querystring parameters."
+  (let ((q-string (if bounded
+                      "file=@-;filename=%s"
+                    "file=@%s")))
+    (list "-s" "-S" "-F" (format q-string file-name) (0x0--make-server-host-uri server))))
+
+(defun 0x0--make-curl-args (server file-name &optional bounded)
+  "Call SERVER :curl-args-fun with FILE-NAME and BOUNDED arguments."
+  (let ((curl-args-fun (0x0--get-server-curl-args-fun server)))
+    (funcall curl-args-fun server file-name bounded)))
+
+(defun 0x0--make-bounds (&optional start end)
+  "Make Bounds property list from START and END points.
+
+Defaults START to =point-min= and END to =point-min=."
+  (let ((start (or start (point-min)))
+        (end (or end (point-max))))
+    (list :start start :end end)))
+
+(defun 0x0--bounds-size (bounds)
+  "Get end - start size of BOUNDS."
+  (- (plist-get bounds :end) (plist-get bounds :start)))
+
+(defun 0x0--curl (curl-args &optional bounds)
+  "Wrapper around curl background process call.
+
+CURL-ARGS are forwarded to the curl command. If BOUNDS are supplied the curl
+process call will be called using =call-process-region= on the portion of the
+buffer between start and end."
+  (let ((buf (generate-new-buffer "*0x0 response*"))
+        (curl-cmd (if (stringp 0x0-use-curl) 0x0-use-curl "curl")))
+    (if bounds
+        (apply #'call-process-region (plist-get bounds :start) (plist-get bounds :end) curl-cmd nil buf nil curl-args)
+      (apply #'call-process curl-cmd nil buf nil curl-args))
+    buf))
+
+(defun 0x0--make-url-props (server file-name &optional bounded)
+  "Create 0x0 url arguments from SERVER configs and FILE-NAME.
+
+BOUNDED indicates a partial upload and changes querystring parameters."
+  (let ((query-str (format "name=\"file\"; filename=\"%s\"" (file-name-nondirectory file-name)))
+        (host-uri (0x0--make-server-host-uri server))
+        (file-path (unless bounded file-name)))
+    (list :file-path file-path :query-str query-str :host-uri host-uri)))
+
+(defun 0x0--url (url-props &optional bounds)
+  "Uploading using `url' functions according to URL-PROPS infrormation.
+
+Operate on region between BOUNDS."
+  (let* ((boundary (format "%X-%X-%X" (random) (random) (random)))
+         (file-path (plist-get url-props :file-path))
+         (query-str (plist-get url-props :query-str))
+         (host-uri (plist-get url-props :host-uri))
+         (url-request-extra-headers
+          `(("Content-Type" . ,(concat "multipart/form-data; boundary=" boundary))))
+         (url-request-data
+          (let ((source (if file-path
+                            (with-temp-buffer
+                              (insert-file-contents file-path)
+                              (buffer-substring-no-properties (point-min) (point-max)))
+                          (buffer-substring-no-properties (plist-get bounds :start) (plist-get bounds :end)))))
+            (with-temp-buffer
+              (insert "--" boundary "\r\n")
+              (insert "Content-Disposition: form-data; ")
+              (insert query-str "\r\n")
+              (insert "Content-type: text/plain\r\n\r\n")
+              (insert source)
+              (insert "\r\n--" boundary "--")
+              (buffer-string))))
+         (url-request-method "POST"))
+    (with-current-buffer (url-retrieve-synchronously host-uri)
+      (rename-buffer "*0x0 response*" t)
+      (goto-char (point-min))
+      (save-match-data
+        (when (search-forward-regexp "^[[:space:]]*$" nil t)
+          (delete-region (point-min) (match-end 0))))
+      (current-buffer))))
+
+(defun 0x0--send (server file-name &optional bounds)
+  "Send data to SERVER from file with FILE-NAME.
+
+Optionally, uses BOUNDS when sending a partial file as text."
+  (if (cond ((eq 0x0-use-curl t))
+            ((eq 0x0-use-curl 'if-installed) (executable-find "curl"))
+            ((stringp 0x0-use-curl)))
+      (0x0--curl (0x0--make-curl-args server file-name bounds) bounds)
+    (0x0--url (0x0--make-url-props server file-name bounds) bounds)))
+
+(defun 0x0--handle-resp (server size resp)
+  "Yank successful SERVER share URI into \"kill-ring\" from response RESP.
+
+The SIZE influences the estimate of file timeout."
+  (with-current-buffer resp
+    (goto-char (point-min))
+    (save-match-data
+      (unless (search-forward-regexp (concat "^" (0x0--make-server-host-uri server) ".+") nil t)
+        (error "Failed to upload/parse. see %s for more details"
+               (buffer-name (current-buffer))))
+      (kill-new (match-string 0))
+      (let ((timeout (and size (0x0--calculate-timeout server size))))
+        (message (concat "yanked `%s' into kill ring."
+                         (and timeout " Should last ~%g days."))
+                 (match-string 0) timeout))
+      (prog1 (match-string 0)
+        (kill-buffer (current-buffer))))))
+
+;;;###autoload
+(defun 0x0-upload-file (server file)
+  "Choose FILE and upload it to SERVER."
+  (interactive (let ((srv (0x0--choose-server)))
+                 (list srv
+                       (0x0--pick-file srv))))
+  (let* ((file-name (expand-file-name file))
+         (size (file-attribute-size (file-attributes file)))
+         (resp (0x0--send server file-name)))
+    (0x0--handle-resp server size resp)))
+
+;;;###autoload
+(defun 0x0-upload-text (server)
+  "Upload full or region text from the current buffer to SERVER."
+  (interactive (list (0x0--choose-server)))
+  ;; TODO file name looking like a function
+  (let* ((file-name "upload.txt")
+         (bounds (if (use-region-p)
+                     (0x0--make-bounds (region-beginning) (region-end))
+                   (0x0--make-bounds)))
+         (size (0x0--bounds-size bounds))
+         (resp (0x0--send server file-name bounds)))
+    (0x0--handle-resp server size resp)))
+
+;;;###autoload
+(defun 0x0-upload-kill-ring (server)
+  "Upload content from the \"kill-ring\" to SERVER."
+  (interactive (list (0x0--choose-server)))
+  (with-temp-buffer
+    (insert (current-kill 0))
+    (let* ((file-name (or (buffer-file-name) (buffer-name) "kill-ring.txt"))
+           (bounds (0x0--make-bounds))
+           (size (0x0--bounds-size bounds))
+           (resp (0x0--send server file-name bounds)))
+      (0x0--handle-resp server size resp))))
+
+;;;###autoload
+(defun 0x0-shorten-uri (server uri)
+  "Shorten the given URI with SERVER."
+  (interactive (list (0x0--choose-server)
+                     (read-string "URI: ")))
+  (unless (cond ((eq 0x0-use-curl t))
+                ((eq 0x0-use-curl 'if-installed) (executable-find "curl"))
+                ((stringp 0x0-use-curl)))
+    (error "Unsupported currenlty without using curl"))
+  (let* ((host-uri (0x0--make-server-host-uri server))
+         (curl-args (list "-s" "-S" "-F" (format "shorten=%s" uri) host-uri))
+         (resp (0x0--curl curl-args)))
+    (0x0--handle-resp server nil resp)))
+
+(defun 0x0-popup-upload (server)
+  "Upload to SERVER and kill current buffer."
+  (interactive (list (0x0--choose-server)))
+  (let* ((file-name "popup-upload.txt")
+         (bounds (0x0--make-bounds))
+         (size (0x0--bounds-size bounds))
+         (resp (0x0--send server file-name bounds)))
+    (0x0--handle-resp server size resp))
+  (kill-buffer (current-buffer)))
+
+;;;###autoload
+(defun 0x0-popup (server)
+  "Create a new buffer, fill it with content, and upload it to SERVER later."
+  (interactive (list (0x0--choose-server)))
+  (with-current-buffer (generate-new-buffer "*upload*")
+    (local-set-key (kbd "C-c C-c") (lambda ()
+                                     (interactive)
+                                     (let ((current-prefix-arg current-prefix-arg))
+                                       (0x0-popup-upload server))))
+    (pop-to-buffer (current-buffer)))
+  (message "Press C-c C-c to upload."))
+
+;;;###autoload
+(defun 0x0-dwim (server)
+  "Try to guess what to upload to SERVER."
+  (interactive (list (0x0--choose-server)))
+  (cond ((region-active-p)
+         (0x0-upload-text server))
+        ((memq last-command '(kill-ring-save
+                              kill-region
+                              append-next-kill))
+         (0x0-upload-kill-ring server))
+        ((derived-mode-p 'dired-mode)
+         (0x0-upload-file server (dired-file-name-at-point)))
+        ((ffap-guess-file-name-at-point) (if-let* ((file (ffap-guess-file-name-at-point)))
+                                             (when (yes-or-no-p (format "Is publicly sharing this file, %s, what you intended?" file))
+                                               (0x0-upload-file server file))))
+        ((0x0-upload-text server))))
+
+(provide '0x0)
+;;; 0x0.el ends here
diff --git a/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0.elc b/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0.elc
new file mode 100644
index 0000000..4d7b4f3
Binary files /dev/null and b/emacs/.emacs.d/elpa/0x0-20230823.2214/0x0.elc differ
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-autoloads.el b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-autoloads.el
new file mode 100644
index 0000000..94db3ae
--- /dev/null
+++ b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-autoloads.el
@@ -0,0 +1,70 @@
+;;; all-the-icons-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; 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)")
+(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)")
+(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)")
+(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)")
+(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)
+(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)
+(register-definition-prefixes "all-the-icons" '("all-the-icons-"))
+
+;;; End of scraped data
+
+(provide 'all-the-icons-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; all-the-icons-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-faces.el b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-faces.el
new file mode 100644
index 0000000..9baa891
--- /dev/null
+++ b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-faces.el
@@ -0,0 +1,229 @@
+;;; all-the-icons-faces.el --- A module of faces for all-the-icons -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2016  Dominic Charlesworth <dgc336@gmail.com>
+
+;; Author: Dominic Charlesworth <dgc336@gmail.com>
+;; Package-Requires: ((emacs "24.3"))
+;; URL: https://github.com/domtronn/all-the-icons.el
+;; Keywords: convenient, lisp
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This file contains all of the faces used by the package for
+;; colouring icons
+
+;;; Code:
+
+(defgroup all-the-icons-faces nil
+  "Manage how All The Icons icons are coloured and themed."
+  :prefix "all-the-icons-"
+  :group 'tools
+  :group 'all-the-icons)
+
+
+;; red
+(defface all-the-icons-red
+  '((((background dark)) :foreground "#AC4142")
+    (((background light)) :foreground "#AC4142"))
+  "Face for red icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-lred
+  '((((background dark)) :foreground "#EB595A")
+    (((background light)) :foreground "#EB595A"))
+  "Face for lred icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-dred
+  '((((background dark)) :foreground "#843031")
+    (((background light)) :foreground "#843031"))
+  "Face for dred icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-red-alt
+  '((((background dark)) :foreground "#ce5643")
+    (((background light)) :foreground "#843031"))
+  "Face for dred icons"
+  :group 'all-the-icons-faces)
+
+;; green
+(defface all-the-icons-green
+  '((((background dark)) :foreground "#90A959")
+    (((background light)) :foreground "#90A959"))
+  "Face for green icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-lgreen
+  '((((background dark)) :foreground "#C6E87A")
+    (((background light)) :foreground "#3D6837"))
+  "Face for lgreen icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-dgreen
+  '((((background dark)) :foreground "#6D8143")
+    (((background light)) :foreground "#6D8143"))
+  "Face for dgreen icons"
+  :group 'all-the-icons-faces)
+
+;; yellow
+(defface all-the-icons-yellow
+  '((((background dark)) :foreground "#FFD446")
+    (((background light)) :foreground "#FFCC0E"))
+  "Face for yellow icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-lyellow
+  '((((background dark)) :foreground "#FFC16D")
+    (((background light)) :foreground "#FF9300"))
+  "Face for lyellow icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-dyellow
+  '((((background dark)) :foreground "#B48D56")
+    (((background light)) :foreground "#B48D56"))
+  "Face for dyellow icons"
+  :group 'all-the-icons-faces)
+
+;; blue
+(defface all-the-icons-blue
+  '((((background dark)) :foreground "#6A9FB5")
+    (((background light)) :foreground "#6A9FB5"))
+  "Face for blue icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-blue-alt
+  '((((background dark)) :foreground "#2188b6")
+    (((background light)) :foreground "#2188b6"))
+  "Face for blue icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-lblue
+  '((((background dark)) :foreground "#8FD7F4")
+    (((background light)) :foreground "#677174"))
+  "Face for lblue icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-dblue
+  '((((background dark)) :foreground "#446674")
+    (((background light)) :foreground "#446674"))
+  "Face for dblue icons"
+  :group 'all-the-icons-faces)
+
+;; maroon
+(defface all-the-icons-maroon
+  '((((background dark)) :foreground "#8F5536")
+    (((background light)) :foreground "#8F5536"))
+  "Face for maroon icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-lmaroon
+  '((((background dark)) :foreground "#CE7A4E")
+    (((background light)) :foreground "#CE7A4E"))
+  "Face for lmaroon icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-dmaroon
+  '((((background dark)) :foreground "#72584B")
+    (((background light)) :foreground "#72584B"))
+  "Face for dmaroon icons"
+  :group 'all-the-icons-faces)
+
+;; purple
+(defface all-the-icons-purple
+  '((((background dark)) :foreground "#AA759F")
+    (((background light)) :foreground "#68295B"))
+  "Face for purple icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-purple-alt
+  '((((background dark)) :foreground "#5D54E1")
+    (((background light)) :foreground "#5D54E1"))
+  "Face for purple icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-lpurple
+  '((((background dark)) :foreground "#E69DD6")
+    (((background light)) :foreground "#E69DD6"))
+  "Face for lpurple icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-dpurple
+  '((((background dark)) :foreground "#694863")
+    (((background light)) :foreground "#694863"))
+  "Face for dpurple icons"
+  :group 'all-the-icons-faces)
+
+;; orange
+(defface all-the-icons-orange
+  '((((background dark)) :foreground "#D4843E")
+    (((background light)) :foreground "#D4843E"))
+  "Face for orange icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-lorange
+  '((((background dark)) :foreground "#FFA500")
+    (((background light)) :foreground "#FFA500"))
+  "Face for lorange icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-dorange
+  '((((background dark)) :foreground "#915B2D")
+    (((background light)) :foreground "#915B2D"))
+  "Face for dorange icons"
+  :group 'all-the-icons-faces)
+
+;; cyan
+(defface all-the-icons-cyan
+  '((((background dark)) :foreground "#75B5AA")
+    (((background light)) :foreground "#75B5AA"))
+  "Face for cyan icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-cyan-alt
+  '((((background dark)) :foreground "#61dafb")
+    (((background light)) :foreground "#0595bd"))
+  "Face for cyan icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-lcyan
+  '((((background dark)) :foreground "#A5FDEC")
+    (((background light)) :foreground "#2C7D6E"))
+  "Face for lcyan icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-dcyan
+  '((((background dark)) :foreground "#48746D")
+    (((background light)) :foreground "#48746D"))
+  "Face for dcyan icons"
+  :group 'all-the-icons-faces)
+
+;; pink
+(defface all-the-icons-pink
+  '((((background dark)) :foreground "#F2B4B8")
+    (((background light)) :foreground "#FC505B"))
+  "Face for pink icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-lpink
+  '((((background dark)) :foreground "#FFBDC1")
+    (((background light)) :foreground "#FF505B"))
+  "Face for lpink icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-dpink
+  '((((background dark)) :foreground "#B18286")
+    (((background light)) :foreground "#7E5D5F"))
+  "Face for dpink icons"
+  :group 'all-the-icons-faces)
+
+;; silver
+(defface all-the-icons-silver
+  '((((background dark)) :foreground "#716E68")
+    (((background light)) :foreground "#716E68"))
+  "Face for silver icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-lsilver
+  '((((background dark)) :foreground "#B9B6AA")
+    (((background light)) :foreground "#7F7869"))
+  "Face for lsilver icons"
+  :group 'all-the-icons-faces)
+(defface all-the-icons-dsilver
+  '((((background dark)) :foreground "#838484")
+    (((background light)) :foreground "#838484"))
+  "Face for dsilver icons"
+  :group 'all-the-icons-faces)
+
+
+(provide 'all-the-icons-faces)
+;;; all-the-icons-faces.el ends here
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-faces.elc b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-faces.elc
new file mode 100644
index 0000000..2418e96
Binary files /dev/null and b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-faces.elc differ
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-pkg.el b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-pkg.el
new file mode 100644
index 0000000..d30e1f4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "all-the-icons" "20250527.927"
+  "A library for inserting Developer icons."
+  '((emacs "24.3"))
+  :url "https://github.com/domtronn/all-the-icons.el"
+  :commit "4778632b29c8c8d2b7cd9ce69535d0be01d846f9"
+  :revdesc "4778632b29c8"
+  :keywords '("convenient" "lisp")
+  :authors '(("Dominic Charlesworth" . "dgc336@gmail.com"))
+  :maintainers '(("Dominic Charlesworth" . "dgc336@gmail.com")))
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons.el b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons.el
new file mode 100644
index 0000000..606d3b8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons.el
@@ -0,0 +1,1289 @@
+;;; all-the-icons.el --- A library for inserting Developer icons -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2016  Dominic Charlesworth <dgc336@gmail.com>
+
+;; Author: Dominic Charlesworth <dgc336@gmail.com>
+;; Package-Version: 20250527.927
+;; Package-Revision: 4778632b29c8
+;; Package-Requires: ((emacs "24.3"))
+;; URL: https://github.com/domtronn/all-the-icons.el
+;; Keywords: convenient, lisp
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This package is a utility for using and formatting various Icon
+;; fonts within Emacs.  Icon Fonts allow you to propertize and format
+;; icons the same way you would normal text.  This enables things such
+;; as better scaling of and anti aliasing of the icons.
+
+;; This package was inspired by
+
+;; - `mode-icons' for Emacs, found at https://github.com/ryuslash/mode-icons
+;; - `file-icons' for Atom, found at https://atom.io/packages/file-icons
+
+;; Currently, this package provides an interface to the following Icon Fonts
+
+;; - Atom File Icons,       found at https://atom.io/packages/file-icons
+;; - FontAwesome Icons,     found at http://fontawesome.io/
+;; - GitHub Octicons,       found at http://octicons.github.com
+;; - Material Design Icons, found at http://google.github.io/material-design-icons/
+;; - Weather Icons,         found at https://erikflowers.github.io/weather-icons/
+;; - AllTheIcons,           a custom Icon Font maintained as part of this package
+
+;; Requests for new icons will be accepted and added to the AllTheIcons Icon Font
+
+;;; Usage:
+
+;; The simplest usage for this package is to use the following functions;
+
+;;   `all-the-icons-icon-for-buffer'
+;;   `all-the-icons-icon-for-dir'
+;;   `all-the-icons-icon-for-file'
+;;   `all-the-icons-icon-for-mode'
+;;   `all-the-icons-icon-for-url'
+
+;; Which can be used to get a formatted icon for the current buffer, a
+;; file name, a major mode, or an URL respectively.  e.g.
+
+;;   (insert (all-the-icons-icon-for-file "foo.js"))
+
+;; Inserts a JavaScript icon formatted like this
+
+;;   #("some-icon" 0 1 (display (raise -0.24)
+;;              face (:family "dev-icons" :height 1.08 :foreground "#FFD446")))
+
+;; You can also insert icons directly using the individual icon family
+;; functions
+
+;;   `all-the-icons-alltheicon'     // Custom font with fewest icons
+;;   `all-the-icons-devicon'        // Developer Icons
+;;   `all-the-icons-faicon'         // Font Awesome Icons
+;;   `all-the-icons-fileicon'       // File Icons from the Atom File Icons package
+;;   `all-the-icons-octicon'        // GitHub Octicons
+;;   `all-the-icons-material'       // Material Design Icons
+;;   `all-the-icons-wicon'          // Weather Icons
+
+;; You can call these functions with the icon name you want to insert, e.g.
+
+;;   (all-the-icons-octicon "file-binary")  // GitHub Octicon for Binary File
+;;   (all-the-icons-faicon  "cogs")         // FontAwesome icon for cogs
+;;   (all-the-icons-wicon   "tornado")      // Weather Icon for tornado
+
+;; A list of all the icon names for the different font families can be
+;; found in the data directory, or by inspecting the alist variables.
+;; All the alist variables are prefixed with `all-the-icons-data/'
+
+;;; Code:
+(require 'cl-lib)
+
+(require 'data-alltheicons  "./data/data-alltheicons")
+(require 'data-faicons      "./data/data-faicons")
+(require 'data-fileicons    "./data/data-fileicons")
+(require 'data-octicons     "./data/data-octicons")
+(require 'data-weathericons "./data/data-weathericons")
+(require 'data-material     "./data/data-material")
+
+(require 'all-the-icons-faces)
+
+(defvar web-mode-content-type) ;silence byte-compiler warning
+;;; Custom Variables
+(defgroup all-the-icons nil
+  "Manage how All The Icons formats icons."
+  :prefix "all-the-icons-"
+  :group 'appearance
+  :group 'convenience)
+
+(defcustom all-the-icons-color-icons t
+  "Whether or not to include a foreground colour when formatting the icon."
+  :group 'all-the-icons
+  :type 'boolean)
+
+(defcustom all-the-icons-scale-factor 1.2
+  "The base Scale Factor for the `height' face property of an icon."
+  :group 'all-the-icons
+  :type 'number)
+
+(defcustom all-the-icons-default-adjust -0.2
+  "The default adjustment to be made to the `raise' display property of an icon."
+  :group 'all-the-icons
+  :type 'number)
+
+(defcustom all-the-icons-fonts-subdirectory nil
+  "The subdirectory within the system fonts folder where the icons are installed."
+  :group 'all-the-icons
+  :type 'directory)
+
+(defvar all-the-icons-font-families '() "List of defined icon font families.")
+(defvar all-the-icons-font-names '() "List of defined font file names this package was built with.")
+
+(defvar all-the-icons-extension-icon-alist
+  '(
+    ("fish"         all-the-icons-alltheicon "terminal"       :face all-the-icons-lpink)
+    ("zsh"          all-the-icons-alltheicon "terminal"       :face all-the-icons-lcyan)
+    ("sh"           all-the-icons-alltheicon "terminal"       :face all-the-icons-purple)
+    ;; Meta
+    ("tags"         all-the-icons-octicon "tag"               :height 1.0 :v-adjust 0.0 :face all-the-icons-blue)
+    ("log"          all-the-icons-octicon "bug"               :height 1.0 :v-adjust 0.0 :face all-the-icons-maroon)
+    ;; Config
+    ("node"         all-the-icons-alltheicon "nodejs"         :height 1.0  :face all-the-icons-green)
+    ("babelrc"      all-the-icons-fileicon "babel"            :face all-the-icons-yellow)
+    ("bashrc"       all-the-icons-alltheicon "script"         :height 0.9  :face all-the-icons-dpink)
+    ("bowerrc"      all-the-icons-alltheicon "bower"          :height 1.0 :v-adjust 0.0 :face all-the-icons-silver)
+    ("cr"           all-the-icons-fileicon "crystal"          :v-adjust 0.0 :face all-the-icons-yellow)
+    ("ecr"           all-the-icons-fileicon "crystal"          :v-adjust 0.0 :face all-the-icons-yellow)
+    ("ini"          all-the-icons-octicon "settings"          :v-adjust 0.0 :face all-the-icons-yellow)
+    ("eslintignore" all-the-icons-fileicon "eslint"           :height 0.9  :face all-the-icons-purple)
+    ("eslint"       all-the-icons-fileicon "eslint"           :height 0.9  :face all-the-icons-lpurple)
+    ("git"          all-the-icons-alltheicon "git"            :height 1.0  :face all-the-icons-lred)
+    ("mk"           all-the-icons-fileicon "gnu"              :face all-the-icons-dorange)
+    ("cmake"        all-the-icons-fileicon "cmake"            :face all-the-icons-red)
+    ("dockerignore" all-the-icons-fileicon "dockerfile"       :height 1.2  :face all-the-icons-dblue)
+    ("xml"          all-the-icons-faicon "file-code-o"        :height 0.95 :face all-the-icons-lorange)
+    ("json"         all-the-icons-octicon "settings"          :v-adjust 0.0 :face all-the-icons-yellow)
+    ("cson"         all-the-icons-octicon "settings"          :v-adjust 0.0 :face all-the-icons-yellow)
+    ("yml"          all-the-icons-octicon "settings"          :v-adjust 0.0 :face all-the-icons-dyellow)
+    ("yaml"         all-the-icons-octicon "settings"          :v-adjust 0.0 :face all-the-icons-dyellow)
+    ;; ?
+    ("pkg"          all-the-icons-octicon "package"           :v-adjust 0.0 :face all-the-icons-dsilver)
+    ("rpm"          all-the-icons-octicon "package"           :v-adjust 0.0 :face all-the-icons-dsilver)
+    ("pkgbuild"     all-the-icons-octicon "package"           :v-adjust 0.0 :face all-the-icons-dsilver)
+    ("elc"          all-the-icons-octicon "file-binary"       :v-adjust 0.0 :face all-the-icons-dsilver)
+    ("gz"           all-the-icons-octicon "file-binary"       :v-adjust 0.0 :face all-the-icons-lmaroon)
+    ("zip"          all-the-icons-octicon "file-zip"          :v-adjust 0.0 :face all-the-icons-lmaroon)
+    ("7z"           all-the-icons-octicon "file-zip"          :v-adjust 0.0 :face all-the-icons-lmaroon)
+    ("dat"          all-the-icons-faicon "bar-chart"          :face all-the-icons-cyan :height 0.9)
+    ("dmg"          all-the-icons-octicon "tools"             :v-adjust 0.0 :face all-the-icons-lsilver)
+    ("dll"          all-the-icons-faicon "cogs"               :face all-the-icons-silver)
+    ("ds_store"     all-the-icons-faicon "cogs"               :face all-the-icons-silver)
+    ;; Source Codes
+    ("ada"          all-the-icons-fileicon "ada"              :v-adjust 0.0 :face all-the-icons-blue)
+    ("adb"          all-the-icons-fileicon "ada"              :v-adjust 0.0 :face all-the-icons-blue)
+    ("adc"          all-the-icons-fileicon "ada"              :v-adjust 0.0 :face all-the-icons-blue)
+    ("ads"          all-the-icons-fileicon "ada"              :v-adjust 0.0 :face all-the-icons-blue)
+    ("gpr"          all-the-icons-fileicon "ada"              :v-adjust 0.0 :face all-the-icons-green)
+    ("cgpr"         all-the-icons-fileicon "ada"              :v-adjust 0.0 :face all-the-icons-green)
+    ("scpt"         all-the-icons-fileicon "apple"            :face all-the-icons-pink)
+    ("aup"          all-the-icons-fileicon "audacity"         :face all-the-icons-yellow)
+    ("elm"          all-the-icons-fileicon "elm"              :face all-the-icons-blue)
+    ("erl"          all-the-icons-alltheicon "erlang"         :face all-the-icons-red :v-adjust -0.1 :height 0.9)
+    ("hrl"          all-the-icons-alltheicon "erlang"         :face all-the-icons-dred :v-adjust -0.1 :height 0.9)
+    ("eex"          all-the-icons-alltheicon "elixir"         :face all-the-icons-lorange :v-adjust -0.1 :height 0.9)
+    ("leex"         all-the-icons-alltheicon "elixir"         :face all-the-icons-lorange :v-adjust -0.1 :height 0.9)
+    ("heex"         all-the-icons-alltheicon "elixir"         :face all-the-icons-lorange :v-adjust -0.1 :height 0.9)
+    ("ex"           all-the-icons-alltheicon "elixir"         :face all-the-icons-lpurple :v-adjust -0.1 :height 0.9)
+    ("exs"          all-the-icons-alltheicon "elixir"         :face all-the-icons-lred :v-adjust -0.1 :height 0.9)
+    ("java"         all-the-icons-alltheicon "java"           :height 1.0  :face all-the-icons-purple)
+    ("gradle"       all-the-icons-fileicon "gradle"           :height 1.0  :face all-the-icons-silver)
+    ("ebuild"       all-the-icons-fileicon "gentoo"           :face all-the-icons-cyan)
+    ("eclass"       all-the-icons-fileicon "gentoo"           :face all-the-icons-blue)
+    ("go"           all-the-icons-fileicon "go"               :height 1.0  :face all-the-icons-blue)
+    ("jl"           all-the-icons-fileicon "julia"            :face all-the-icons-purple :v-adjust 0.0)
+    ("matlab"       all-the-icons-fileicon "matlab"           :face all-the-icons-orange)
+    ("nix"          all-the-icons-fileicon "nix"              :face all-the-icons-blue)
+    ("pl"           all-the-icons-alltheicon "perl"           :face all-the-icons-lorange)
+    ("pm"           all-the-icons-alltheicon "perl"           :face all-the-icons-lorange)
+    ("pl6"          all-the-icons-fileicon "raku"            :face all-the-icons-cyan)
+    ("pm6"          all-the-icons-fileicon "raku"            :face all-the-icons-pink)
+    ("pod"          all-the-icons-alltheicon "perldocs"       :height 1.2  :face all-the-icons-lgreen)
+    ("php"          all-the-icons-fileicon "php"              :face all-the-icons-lsilver)
+    ("pony"         all-the-icons-fileicon "pony"             :face all-the-icons-maroon)
+    ("ps1"          all-the-icons-fileicon "powershell"       :face all-the-icons-blue)
+    ("pro"          all-the-icons-alltheicon "prolog"         :height 1.1  :face all-the-icons-lmaroon)
+    ("proog"        all-the-icons-alltheicon "prolog"         :height 1.1  :face all-the-icons-lmaroon)
+    ("py"           all-the-icons-alltheicon "python"         :height 1.0  :face all-the-icons-dblue)
+    ("idr"          all-the-icons-fileicon "idris"            :face all-the-icons-red)
+    ("ipynb"        all-the-icons-fileicon "jupyter"          :height 1.0  :face all-the-icons-dorange)
+    ("gem"          all-the-icons-alltheicon "ruby-alt"       :face all-the-icons-red)
+    ("raku"         all-the-icons-fileicon "raku"            :face all-the-icons-cyan)
+    ("rakumod"      all-the-icons-fileicon "raku"            :face all-the-icons-pink)
+    ("rb"           all-the-icons-octicon "ruby"              :v-adjust 0.0 :face all-the-icons-lred)
+    ("rs"           all-the-icons-alltheicon "rust"           :height 1.2  :face all-the-icons-maroon)
+    ("rlib"         all-the-icons-alltheicon "rust"           :height 1.2  :face all-the-icons-dmaroon)
+    ("r"            all-the-icons-fileicon "R"                :face all-the-icons-lblue)
+    ("rd"           all-the-icons-fileicon "R"                :face all-the-icons-lblue)
+    ("rdx"          all-the-icons-fileicon "R"                :face all-the-icons-lblue)
+    ("rsx"          all-the-icons-fileicon "R"                :face all-the-icons-lblue)
+    ("beancount"    all-the-icons-faicon "credit-card"        :face all-the-icons-lgreen)
+    ("ledger"       all-the-icons-faicon "credit-card"        :face all-the-icons-lgreen)
+    ("svelte"       all-the-icons-fileicon "svelte"           :v-adjust 0.0 :face all-the-icons-red)
+    ("gql"          all-the-icons-fileicon "graphql"          :face all-the-icons-dpink)
+    ("graphql"      all-the-icons-fileicon "graphql"          :face all-the-icons-dpink)
+    ;; There seems to be a a bug with this font icon which does not
+    ;; let you propertise it without it reverting to being a lower
+    ;; case phi
+    ("c"            all-the-icons-alltheicon "c-line"         :face all-the-icons-blue)
+    ("h"            all-the-icons-alltheicon "c-line"         :face all-the-icons-purple)
+    ("m"            all-the-icons-fileicon "apple"            :v-adjust 0.0 :height 1.0)
+    ("mm"           all-the-icons-fileicon "apple"            :v-adjust 0.0 :height 1.0)
+    ;;
+    ("cc"           all-the-icons-alltheicon "cplusplus-line" :v-adjust -0.2 :face all-the-icons-blue)
+    ("cpp"          all-the-icons-alltheicon "cplusplus-line" :v-adjust -0.2 :face all-the-icons-blue)
+    ("cxx"          all-the-icons-alltheicon "cplusplus-line" :v-adjust -0.2 :face all-the-icons-blue)
+    ("hh"           all-the-icons-alltheicon "cplusplus-line" :v-adjust -0.2 :face all-the-icons-purple)
+    ("hpp"          all-the-icons-alltheicon "cplusplus-line" :v-adjust -0.2 :face all-the-icons-purple)
+    ("hxx"          all-the-icons-alltheicon "cplusplus-line" :v-adjust -0.2 :face all-the-icons-purple)
+    ;; Lisps
+    ("cl"           all-the-icons-fileicon "clisp"            :face all-the-icons-lorange)
+    ("l"            all-the-icons-fileicon "lisp"             :face all-the-icons-orange)
+    ("lisp"         all-the-icons-fileicon "lisp"             :face all-the-icons-orange)
+    ("hy"           all-the-icons-fileicon "hy"               :face all-the-icons-blue)
+    ("el"           all-the-icons-fileicon "elisp"            :height 1.0 :v-adjust -0.2 :face all-the-icons-purple)
+    ("clj"          all-the-icons-alltheicon "clojure-line"   :height 1.0 :face all-the-icons-blue :v-adjust 0.0)
+    ("cljc"         all-the-icons-alltheicon "clojure-line"   :height 1.0 :face all-the-icons-blue :v-adjust 0.0)
+    ("cljs"         all-the-icons-fileicon "cljs"             :height 1.0 :face all-the-icons-dblue :v-adjust 0.0)
+    ("coffee"       all-the-icons-alltheicon "coffeescript"   :height 1.0  :face all-the-icons-maroon)
+    ("iced"         all-the-icons-alltheicon "coffeescript"   :height 1.0  :face all-the-icons-lmaroon)
+    ("dart"         all-the-icons-fileicon "dart"             :height 1.0 :face all-the-icons-blue :v-adjust 0.0)
+    ("rkt"          all-the-icons-fileicon "racket"           :height 1.2 :face all-the-icons-red)
+    ("scrbl"        all-the-icons-fileicon "racket"           :height 1.2 :face all-the-icons-blue)
+    ;; Stylesheeting
+    ("css"          all-the-icons-alltheicon "css3"           :face all-the-icons-yellow)
+    ("scss"         all-the-icons-alltheicon "sass"           :face all-the-icons-pink)
+    ("sass"         all-the-icons-alltheicon "sass"           :face all-the-icons-dpink)
+    ("less"         all-the-icons-alltheicon "less"           :height 0.8  :face all-the-icons-dyellow)
+    ("postcss"      all-the-icons-fileicon "postcss"          :face all-the-icons-dred)
+    ("pcss"         all-the-icons-fileicon "postcss"          :face all-the-icons-dred)
+    ("sss"          all-the-icons-fileicon "postcss"          :face all-the-icons-dred)
+    ("styl"         all-the-icons-alltheicon "stylus"         :face all-the-icons-lgreen)
+    ("csv"          all-the-icons-octicon "graph"             :v-adjust 0.0 :face all-the-icons-dblue)
+    ;; haskell
+    ("hs"           all-the-icons-alltheicon "haskell"        :height 1.0  :face all-the-icons-red)
+    ("chs"          all-the-icons-alltheicon "haskell"        :height 1.0  :face all-the-icons-red)
+    ("lhs"          all-the-icons-alltheicon "haskell"        :height 1.0  :face all-the-icons-red)
+    ("hsc"          all-the-icons-alltheicon "haskell"        :height 1.0  :face all-the-icons-red)
+    ;; Web modes
+    ("inky-haml"    all-the-icons-fileicon "haml"             :face all-the-icons-lyellow)
+    ("haml"         all-the-icons-fileicon "haml"             :face all-the-icons-lyellow)
+    ("htm"          all-the-icons-alltheicon "html5"          :face all-the-icons-orange)
+    ("html"         all-the-icons-alltheicon "html5"          :face all-the-icons-orange)
+    ("inky-er"      all-the-icons-alltheicon "html5"          :face all-the-icons-lred)
+    ("inky-erb"     all-the-icons-alltheicon "html5"          :face all-the-icons-lred)
+    ("erb"          all-the-icons-alltheicon "html5"          :face all-the-icons-lred)
+    ("hbs"          all-the-icons-fileicon "moustache"        :face all-the-icons-green)
+    ("inky-slim"    all-the-icons-octicon "dashboard"         :v-adjust 0.0 :face all-the-icons-yellow)
+    ("slim"         all-the-icons-octicon "dashboard"         :v-adjust 0.0 :face all-the-icons-yellow)
+    ("jade"         all-the-icons-fileicon "jade"             :face all-the-icons-red)
+    ("pug"          all-the-icons-fileicon "pug-alt"          :face all-the-icons-red)
+    ;; Javascript
+    ("d3js"         all-the-icons-alltheicon "d3"             :height 0.8  :face all-the-icons-lgreen)
+    ("re"           all-the-icons-fileicon "reason"           :height 1.0  :face all-the-icons-red-alt)
+    ("rei"          all-the-icons-fileicon "reason"           :height 1.0  :face all-the-icons-dred)
+    ("ml"           all-the-icons-fileicon "ocaml"            :height 1.0  :face all-the-icons-lpink)
+    ("mli"          all-the-icons-fileicon "ocaml"            :height 1.0  :face all-the-icons-dpink)
+    ("react"        all-the-icons-alltheicon "react"          :height 1.1  :face all-the-icons-lblue)
+    ("ts"           all-the-icons-fileicon "typescript"       :height 1.0 :v-adjust -0.1 :face all-the-icons-blue-alt)
+    ("js"           all-the-icons-alltheicon "javascript"     :height 1.0 :v-adjust 0.0 :face all-the-icons-yellow)
+    ("mjs"          all-the-icons-alltheicon "javascript"     :height 1.0 :v-adjust 0.0 :face all-the-icons-yellow)
+    ("es"           all-the-icons-alltheicon "javascript"     :height 1.0 :v-adjust 0.0 :face all-the-icons-yellow)
+    ("jsx"          all-the-icons-fileicon "jsx-2"            :height 1.0 :v-adjust -0.1 :face all-the-icons-cyan-alt)
+    ("tsx"          all-the-icons-fileicon "tsx"              :height 1.0 :v-adjust -0.1 :face all-the-icons-cyan-alt)
+    ("njs"          all-the-icons-alltheicon "nodejs"         :height 1.2  :face all-the-icons-lgreen)
+    ("vue"          all-the-icons-fileicon "vue"              :face all-the-icons-lgreen)
+    ("wasm"         all-the-icons-fileicon "wasm"             :height 1.0 :face all-the-icons-purple-alt)
+    ("wat"          all-the-icons-fileicon "wasm"             :height 1.0 :face all-the-icons-purple-alt)
+
+    ("sbt"          all-the-icons-fileicon   "sbt"            :face all-the-icons-red)
+    ("scala"        all-the-icons-alltheicon "scala"          :face all-the-icons-red)
+    ("scm"          all-the-icons-fileicon   "scheme"         :height 1.2 :face all-the-icons-red)
+    ("swift"        all-the-icons-alltheicon "swift"          :height 1.0 :v-adjust -0.1 :face all-the-icons-green)
+
+    ("tcl"          all-the-icons-fileicon "tcl"              :height 1.0 :face all-the-icons-dred)
+
+    ("tf"           all-the-icons-fileicon "terraform"        :height 1.0 :face all-the-icons-purple-alt)
+    ("tfvars"       all-the-icons-fileicon "terraform"        :height 1.0 :face all-the-icons-purple-alt)
+    ("tfstate"      all-the-icons-fileicon "terraform"        :height 1.0 :face all-the-icons-purple-alt)
+
+    ("asm"          all-the-icons-fileicon "assembly"         :height 1.0 :face all-the-icons-blue)
+    ;; Verilog(-AMS) and SystemVerilog(-AMS)
+    ("v"            all-the-icons-fileicon "verilog"          :height 1.0 :v-adjust -0.2 :face all-the-icons-red)
+    ("vams"         all-the-icons-fileicon "verilog"          :height 1.0 :v-adjust -0.2 :face all-the-icons-red)
+    ("sv"           all-the-icons-fileicon "verilog"          :height 1.0 :v-adjust -0.2 :face all-the-icons-red)
+    ("sva"          all-the-icons-fileicon "verilog"          :height 1.0 :v-adjust -0.2 :face all-the-icons-red)
+    ("svh"          all-the-icons-fileicon "verilog"          :height 1.0 :v-adjust -0.2 :face all-the-icons-red)
+    ("svams"        all-the-icons-fileicon "verilog"          :height 1.0 :v-adjust -0.2 :face all-the-icons-red)
+    ;; VHDL(-AMS)
+    ("vhd"          all-the-icons-fileicon "vhdl"             :face all-the-icons-blue)
+    ("vhdl"         all-the-icons-fileicon "vhdl"             :face all-the-icons-blue)
+    ("vhms"         all-the-icons-fileicon "vhdl"             :face all-the-icons-blue)
+    ;; Cabal
+    ("cabal"        all-the-icons-fileicon "cabal"            :face all-the-icons-lblue)
+    ;; Kotlin
+    ("kt"           all-the-icons-fileicon "kotlin"           :face all-the-icons-orange)
+    ("kts"          all-the-icons-fileicon "kotlin"           :face all-the-icons-orange)
+    ;; Nimrod
+    ("nim"          all-the-icons-fileicon "nimrod"           :face all-the-icons-yellow)
+    ("nims"         all-the-icons-fileicon "nimrod"           :face all-the-icons-yellow)
+    ;; SQL
+    ("sql"          all-the-icons-octicon "database"          :face all-the-icons-silver)
+    ;; Styles
+    ("styles"       all-the-icons-material "style"            :face all-the-icons-red)
+    ;; Lua
+    ("lua"          all-the-icons-fileicon "lua"              :face all-the-icons-dblue)
+    ;; ASCII doc
+    ("adoc"         all-the-icons-fileicon "asciidoc"         :face all-the-icons-lblue)
+    ("asciidoc"     all-the-icons-fileicon "asciidoc"         :face all-the-icons-lblue)
+    ;; Puppet
+    ("pp"           all-the-icons-fileicon "puppet"           :face all-the-icons-yellow)
+    ;; Jinja
+    ("j2"           all-the-icons-fileicon "jinja"            :face all-the-icons-silver)
+    ("jinja2"       all-the-icons-fileicon "jinja"            :face all-the-icons-silver)
+    ;; Docker
+    ("dockerfile"   all-the-icons-fileicon "dockerfile"       :face all-the-icons-cyan)
+    ;; Vagrant
+    ("vagrantfile"  all-the-icons-fileicon "vagrant"          :face all-the-icons-blue)
+    ;; GLSL
+    ("glsl"     all-the-icons-fileicon "vertex-shader"        :face all-the-icons-blue)
+    ("vert"     all-the-icons-fileicon "vertex-shader"        :face all-the-icons-blue)
+    ("tesc"     all-the-icons-fileicon "vertex-shader"        :face all-the-icons-purple)
+    ("tese"     all-the-icons-fileicon "vertex-shader"        :face all-the-icons-dpurple)
+    ("geom"     all-the-icons-fileicon "vertex-shader"        :face all-the-icons-green)
+    ("frag"     all-the-icons-fileicon "vertex-shader"        :face all-the-icons-red)
+    ("comp"     all-the-icons-fileicon "vertex-shader"        :face all-the-icons-dblue)
+    ;; CUDA
+    ("cu"       all-the-icons-fileicon "nvidia"               :face all-the-icons-green)
+    ("cuh"      all-the-icons-fileicon "nvidia"               :face all-the-icons-green)
+    ;; Fortran
+    ("f90"      all-the-icons-fileicon "fortran"              :face all-the-icons-purple)
+    ;; C#
+    ("cs"           all-the-icons-alltheicon "csharp-line"    :face all-the-icons-dblue)
+    ("csx"          all-the-icons-alltheicon "csharp-line"    :face all-the-icons-dblue)
+    ;; F#
+    ("fs"           all-the-icons-fileicon "fsharp"           :face all-the-icons-blue-alt)
+    ("fsi"          all-the-icons-fileicon "fsharp"           :face all-the-icons-blue-alt)
+    ("fsx"          all-the-icons-fileicon "fsharp"           :face all-the-icons-blue-alt)
+    ("fsscript"     all-the-icons-fileicon "fsharp"           :face all-the-icons-blue-alt)
+    ;; zig
+    ("zig"          all-the-icons-fileicon "zig"              :face all-the-icons-orange)
+    ;; odin
+    ("odin"         all-the-icons-fileicon "odin"             :height 1.1 :face all-the-icons-lblue)
+    ;; File Types
+    ("ico"          all-the-icons-octicon "file-media"        :v-adjust 0.0 :face all-the-icons-blue)
+    ("png"          all-the-icons-octicon "file-media"        :v-adjust 0.0 :face all-the-icons-orange)
+    ("gif"          all-the-icons-octicon "file-media"        :v-adjust 0.0 :face all-the-icons-green)
+    ("jpeg"         all-the-icons-octicon "file-media"        :v-adjust 0.0 :face all-the-icons-dblue)
+    ("jpg"          all-the-icons-octicon "file-media"        :v-adjust 0.0 :face all-the-icons-dblue)
+    ("webp"         all-the-icons-octicon "file-media"        :v-adjust 0.0 :face all-the-icons-dblue)
+    ;; Audio
+    ("mp3"          all-the-icons-faicon "volume-up"          :face all-the-icons-dred)
+    ("wav"          all-the-icons-faicon "volume-up"          :face all-the-icons-dred)
+    ("m4a"          all-the-icons-faicon "volume-up"          :face all-the-icons-dred)
+    ("ogg"          all-the-icons-faicon "volume-up"          :face all-the-icons-dred)
+    ("flac"         all-the-icons-faicon "volume-up"          :face all-the-icons-dred)
+    ("opus"         all-the-icons-faicon "volume-up"          :face all-the-icons-dred)
+    ("au"           all-the-icons-faicon "volume-up"          :face all-the-icons-dred)
+    ("aif"          all-the-icons-faicon "volume-up"          :face all-the-icons-dred)
+    ("aifc"         all-the-icons-faicon "volume-up"          :face all-the-icons-dred)
+    ("aiff"         all-the-icons-faicon "volume-up"          :face all-the-icons-dred)
+    ("svg"          all-the-icons-alltheicon "svg"            :height 0.9  :face all-the-icons-lgreen)
+    ;; Video
+    ("mov"          all-the-icons-faicon "film"               :face all-the-icons-blue)
+    ("mp4"          all-the-icons-faicon "film"               :face all-the-icons-blue)
+    ("ogv"          all-the-icons-faicon "film"               :face all-the-icons-dblue)
+    ("mpg"          all-the-icons-faicon "film"               :face all-the-icons-blue)
+    ("mpeg"         all-the-icons-faicon "film"               :face all-the-icons-blue)
+    ("flv"          all-the-icons-faicon "film"               :face all-the-icons-blue)
+    ("ogv"          all-the-icons-faicon "film"               :face all-the-icons-dblue)
+    ("mkv"          all-the-icons-faicon "film"               :face all-the-icons-blue)
+    ("webm"         all-the-icons-faicon "film"               :face all-the-icons-blue)
+    ("dav"          all-the-icons-faicon "film"               :face all-the-icons-blue)
+    ;; Fonts
+    ("ttf"          all-the-icons-fileicon "font"             :v-adjust 0.0 :face all-the-icons-dcyan)
+    ("woff"         all-the-icons-fileicon "font"             :v-adjust 0.0 :face all-the-icons-cyan)
+    ("woff2"        all-the-icons-fileicon "font"             :v-adjust 0.0 :face all-the-icons-cyan)
+    ;; Doc
+    ("pdf"          all-the-icons-octicon "file-pdf"          :v-adjust 0.0 :face all-the-icons-dred)
+    ("text"         all-the-icons-octicon "file-text"         :v-adjust 0.0 :face all-the-icons-cyan)
+    ("txt"          all-the-icons-octicon "file-text"         :v-adjust 0.0 :face all-the-icons-cyan)
+    ("doc"          all-the-icons-fileicon "word"             :face all-the-icons-blue)
+    ("docx"         all-the-icons-fileicon "word"             :face all-the-icons-blue)
+    ("docm"         all-the-icons-fileicon "word"             :face all-the-icons-blue)
+    ("eml"          all-the-icons-faicon "envelope"              :face all-the-icons-blue)
+    ("msg"          all-the-icons-faicon "envelope"              :face all-the-icons-blue)
+    ("texi"         all-the-icons-fileicon "tex"              :face all-the-icons-lred)
+    ("tex"          all-the-icons-fileicon "tex"              :face all-the-icons-lred)
+    ("md"           all-the-icons-octicon "markdown"          :v-adjust 0.0 :face all-the-icons-lblue)
+    ("bib"          all-the-icons-fileicon "bib"              :face all-the-icons-maroon)
+    ("org"          all-the-icons-fileicon "org"              :face all-the-icons-lgreen)
+    ("pps"          all-the-icons-fileicon "powerpoint"       :face all-the-icons-orange)
+    ("ppt"          all-the-icons-fileicon "powerpoint"       :face all-the-icons-orange)
+    ("pptsx"        all-the-icons-fileicon "powerpoint"       :face all-the-icons-orange)
+    ("pptx"         all-the-icons-fileicon "powerpoint"       :face all-the-icons-orange)
+    ("knt"          all-the-icons-fileicon "powerpoint"       :face all-the-icons-cyan)
+    ("xlsx"         all-the-icons-fileicon "excel"            :face all-the-icons-dgreen)
+    ("xlsm"         all-the-icons-fileicon "excel"            :face all-the-icons-dgreen)
+    ("xlsb"         all-the-icons-fileicon "excel"            :face all-the-icons-dgreen)
+    ("xltx"         all-the-icons-fileicon "excel"            :face all-the-icons-dgreen)
+    ("xltm"         all-the-icons-fileicon "excel"            :face all-the-icons-dgreen)
+    ("ly"           all-the-icons-faicon   "music"            :face all-the-icons-green)
+    ;;
+    ("key"          all-the-icons-octicon "key"               :v-adjust 0.0 :face all-the-icons-lblue)
+    ("pem"          all-the-icons-octicon "key"               :v-adjust 0.0 :face all-the-icons-orange)
+    ("p12"          all-the-icons-octicon "key"               :v-adjust 0.0 :face all-the-icons-dorange)
+    ("crt"          all-the-icons-octicon "key"               :v-adjust 0.0 :face all-the-icons-lblue)
+    ("pub"          all-the-icons-octicon "key"               :v-adjust 0.0 :face all-the-icons-blue)
+    ("gpg"          all-the-icons-octicon "key"               :v-adjust 0.0 :face all-the-icons-lblue)
+    ("cache"        all-the-icons-octicon "database"          :height 1.0 :v-adjust 0.0 :face all-the-icons-green)))
+
+
+(define-obsolete-variable-alias 'all-the-icons-icon-alist
+  'all-the-icons-regexp-icon-alist
+  "5.0.0"
+  "`all-the-icons-icon-alist' has been split to
+`all-the-icons-extension-icon-alist' and `all-the-icons-regexp-icon-alist'
+for performance sake.")
+
+(defvar all-the-icons-regexp-icon-alist
+  '(
+    ;;
+    ("^TAGS$"           all-the-icons-octicon "tag"                     :height 1.0 :v-adjust 0.0 :face all-the-icons-blue)
+    ("^TODO$"           all-the-icons-octicon "checklist"               :v-adjust 0.0 :face all-the-icons-lyellow)
+    ("^LICENSE$"        all-the-icons-octicon "book"                    :height 1.0 :v-adjust 0.0 :face all-the-icons-blue)
+    ("^readme"          all-the-icons-octicon "book"                    :height 1.0 :v-adjust 0.0 :face all-the-icons-lcyan)
+
+    ;; Config
+    ("nginx$"            all-the-icons-fileicon "nginx"                 :height 0.9  :face all-the-icons-dgreen)
+    ("apache$"           all-the-icons-alltheicon "apache"              :height 0.9  :face all-the-icons-dgreen)
+
+    ;; C
+    ("^Makefile$"       all-the-icons-fileicon "gnu"                    :face all-the-icons-dorange)
+    ("^CMakeLists.txt$" all-the-icons-fileicon "cmake"                  :face all-the-icons-red)
+    ("^CMakeCache.txt$" all-the-icons-fileicon "cmake"                  :face all-the-icons-blue)
+    ("^meson.build$"    all-the-icons-fileicon "meson"                  :face all-the-icons-purple)
+    ("^meson_options.txt$" all-the-icons-fileicon "meson"               :face all-the-icons-purple)
+
+    ;; Docker
+    ("^\\.?Dockerfile"  all-the-icons-fileicon "dockerfile"             :face all-the-icons-blue)
+
+    ;; Homebrew
+    ("^Brewfile$"       all-the-icons-faicon "beer"                     :face all-the-icons-lsilver)
+
+    ;; ;; AWS
+    ("^stack.*.json$"   all-the-icons-alltheicon "aws"                  :face all-the-icons-orange)
+    ("^serverless\\.yml$" all-the-icons-faicon "bolt"                   :v-adjust 0.0 :face all-the-icons-yellow)
+
+    ;; lock files
+    ("~$"               all-the-icons-octicon "lock"                    :v-adjust 0.0 :face all-the-icons-maroon)
+
+    ;; Source Codes
+    ("^mix.lock$"       all-the-icons-alltheicon "elixir"               :face all-the-icons-lyellow :v-adjust -0.1 :height 0.9)
+
+    ;; Ruby
+    ("^Gemfile\\(\\.lock\\)?$" all-the-icons-alltheicon "ruby-alt"      :face all-the-icons-red)
+    ("_?test\\.rb$"        all-the-icons-fileicon "test-ruby"           :height 1.0 :v-adjust 0.0 :face all-the-icons-red)
+    ("_?test_helper\\.rb$" all-the-icons-fileicon "test-ruby"           :height 1.0 :v-adjust 0.0 :face all-the-icons-dred)
+    ("_?spec\\.rb$"        all-the-icons-fileicon "test-ruby"           :height 1.0 :v-adjust 0.0 :face all-the-icons-red)
+    ("_?spec_helper\\.rb$" all-the-icons-fileicon "test-ruby"           :height 1.0 :v-adjust 0.0 :face all-the-icons-dred)
+
+    ("-?spec\\.ts$"     all-the-icons-fileicon "test-typescript"        :height 1.0 :v-adjust 0.0 :face all-the-icons-blue)
+    ("-?test\\.ts$"     all-the-icons-fileicon "test-typescript"        :height 1.0 :v-adjust 0.0 :face all-the-icons-blue)
+    ("-?spec\\.js$"     all-the-icons-fileicon "test-js"                :height 1.0 :v-adjust 0.0 :face all-the-icons-lpurple)
+    ("-?test\\.js$"     all-the-icons-fileicon "test-js"                :height 1.0 :v-adjust 0.0 :face all-the-icons-lpurple)
+    ("-?spec\\.jsx$"    all-the-icons-fileicon "test-react"             :height 1.0 :v-adjust 0.0 :face all-the-icons-blue-alt)
+    ("-?test\\.jsx$"    all-the-icons-fileicon "test-react"             :height 1.0 :v-adjust 0.0 :face all-the-icons-blue-alt)
+
+    ;; Git
+    ("^MERGE_"          all-the-icons-octicon "git-merge"               :v-adjust 0.0 :face all-the-icons-red)
+    ("^COMMIT_EDITMSG"  all-the-icons-octicon "git-commit"              :v-adjust 0.0 :face all-the-icons-red)
+
+    ;; Stylesheeting
+    ("stylelint"        all-the-icons-fileicon "stylelint"              :face all-the-icons-lyellow)
+
+    ;; JavaScript
+    ("^package.json$"   all-the-icons-fileicon "npm"                    :face all-the-icons-red)
+    ("^package.lock.json$" all-the-icons-fileicon "npm"                 :face all-the-icons-dred)
+    ("^yarn\\.lock"     all-the-icons-fileicon "yarn"                   :face all-the-icons-blue-alt)
+    ("\\.npmignore$"    all-the-icons-fileicon "npm"                    :face all-the-icons-dred)
+    ("^bower.json$"     all-the-icons-alltheicon "bower"                :height 1.0 :v-adjust 0.0 :face all-the-icons-lorange)
+    ("^gulpfile"        all-the-icons-alltheicon "gulp"                 :height 1.0  :face all-the-icons-lred)
+    ("^gruntfile"       all-the-icons-alltheicon "grunt"                :height 1.0 :v-adjust -0.1 :face all-the-icons-lyellow)
+    ("^webpack"         all-the-icons-fileicon "webpack"                :face all-the-icons-lblue)
+
+    ;; Go
+    ("^go.mod$"         all-the-icons-fileicon "config-go"              :height 1.0 :face all-the-icons-blue-alt)
+    ("^go.work$"        all-the-icons-fileicon "config-go"              :height 1.0 :face all-the-icons-blue-alt)
+
+    ;; Emacs
+    ("bookmark"         all-the-icons-octicon "bookmark"                :height 1.1 :v-adjust 0.0 :face all-the-icons-lpink)
+
+    ("^\\*scratch\\*$"  all-the-icons-faicon "sticky-note"              :face all-the-icons-lyellow)
+    ("^\\*scratch.*"    all-the-icons-faicon "sticky-note"              :face all-the-icons-yellow)
+    ("^\\*new-tab\\*$"  all-the-icons-material "star"                   :face all-the-icons-cyan)
+
+    ("^\\."             all-the-icons-octicon "gear"                    :v-adjust 0.0)
+    ))
+
+(defvar all-the-icons-default-file-icon
+  '(all-the-icons-faicon "file-o" :v-adjust 0.0 :face all-the-icons-dsilver))
+
+(defvar all-the-icons-dir-icon-alist
+  '(
+    ("trash"            all-the-icons-faicon "trash-o"          :height 1.2 :v-adjust -0.1)
+    ("dropbox"          all-the-icons-faicon "dropbox"          :height 1.0 :v-adjust -0.1)
+    ("google[ _-]drive" all-the-icons-alltheicon "google-drive" :height 1.0 :v-adjust -0.1)
+    ("^atom$"           all-the-icons-alltheicon "atom"         :height 1.2 :v-adjust -0.1)
+    ("documents"        all-the-icons-faicon "book"             :height 1.0 :v-adjust -0.1)
+    ("download"         all-the-icons-faicon "cloud-download"   :height 0.9 :v-adjust -0.1)
+    ("desktop"          all-the-icons-octicon "device-desktop"  :height 1.0 :v-adjust -0.1)
+    ("pictures"         all-the-icons-faicon "picture-o"        :height 0.9 :v-adjust -0.2)
+    ("photos"           all-the-icons-faicon "camera-retro"     :height 1.0 :v-adjust -0.1)
+    ("music"            all-the-icons-faicon "music"            :height 1.0 :v-adjust -0.1)
+    ("movies"           all-the-icons-faicon "film"             :height 0.9 :v-adjust -0.1)
+    ("code"             all-the-icons-octicon "code"            :height 1.1 :v-adjust -0.1)
+    ("workspace"        all-the-icons-octicon "code"            :height 1.1 :v-adjust -0.1)
+    ("test"             all-the-icons-fileicon "test-dir"       :height 0.9)
+    ("\\.git"           all-the-icons-alltheicon "git"          :height 1.0)
+    (".?"               all-the-icons-octicon "file-directory"  :height 1.0 :v-adjust -0.1)
+    ))
+
+(defvar all-the-icons-weather-icon-alist
+  '(
+    ("tornado"               all-the-icons-wicon "tornado")
+    ("hurricane"             all-the-icons-wicon "hurricane")
+    ("thunderstorms"         all-the-icons-wicon "thunderstorm")
+    ("sunny"                 all-the-icons-wicon "day-sunny")
+    ("rain.*snow"            all-the-icons-wicon "rain-mix")
+    ("rain.*hail"            all-the-icons-wicon "rain-mix")
+    ("sleet"                 all-the-icons-wicon "sleet")
+    ("hail"                  all-the-icons-wicon "hail")
+    ("drizzle"               all-the-icons-wicon "sprinkle")
+    ("rain"                  all-the-icons-wicon "showers" :height 1.1 :v-adjust 0.0)
+    ("showers"               all-the-icons-wicon "showers")
+    ("blowing.*snow"         all-the-icons-wicon "snow-wind")
+    ("snow"                  all-the-icons-wicon "snow")
+    ("dust"                  all-the-icons-wicon "dust")
+    ("fog"                   all-the-icons-wicon "fog")
+    ("haze"                  all-the-icons-wicon "day-haze")
+    ("smoky"                 all-the-icons-wicon "smoke")
+    ("blustery"              all-the-icons-wicon "cloudy-windy")
+    ("windy"                 all-the-icons-wicon "cloudy-gusts")
+    ("cold"                  all-the-icons-wicon "snowflake-cold")
+    ("partly.*cloudy.*night" all-the-icons-wicon "night-alt-partly-cloudy")
+    ("partly.*cloudy"        all-the-icons-wicon "day-cloudy-high")
+    ("cloudy.*night"         all-the-icons-wicon "night-alt-cloudy")
+    ("cxloudy.*day"          all-the-icons-wicon "day-cloudy")
+    ("cloudy"                all-the-icons-wicon "cloudy")
+    ("clear.*night"          all-the-icons-wicon "night-clear")
+    ("fair.*night"           all-the-icons-wicon "stars")
+    ("fair.*day"             all-the-icons-wicon "horizon")
+    ("hot"                   all-the-icons-wicon "hot")
+    ("not.*available"        all-the-icons-wicon "na")
+    ))
+
+(defvar all-the-icons-mode-icon-alist
+  '(
+    (emacs-lisp-mode           all-the-icons-fileicon "elisp"              :height 1.0 :v-adjust -0.1 :face all-the-icons-purple)
+    (circe-server-mode         all-the-icons-faicon "commenting-o"         :height 1.0 :v-adjust 0.0)
+    (circe-channel-mode        all-the-icons-faicon "commenting-o"         :height 1.0 :v-adjust 0.0)
+    (circe-query-mode          all-the-icons-faicon "commenting-o"         :height 1.0 :v-adjust 0.0)
+    (crystal-mode              all-the-icons-fileicon "crystal"            :v-adjust 0.0 :face all-the-icons-yellow)
+    (erc-mode                  all-the-icons-faicon "commenting-o"         :height 1.0 :v-adjust 0.0)
+    (inferior-emacs-lisp-mode  all-the-icons-fileicon "elisp"              :height 1.0 :v-adjust -0.1 :face all-the-icons-lblue)
+    (dired-mode                all-the-icons-octicon "file-directory"      :v-adjust 0.0)
+    (wdired-mode               all-the-icons-octicon "file-directory"      :v-adjust 0.0 :face all-the-icons-dcyan)
+    (lisp-interaction-mode     all-the-icons-fileicon "lisp"               :v-adjust -0.1 :face all-the-icons-orange)
+    (sly-mrepl-mode            all-the-icons-fileicon "clisp"               :v-adjust -0.1 :face all-the-icons-orange)
+    (slime-repl-mode           all-the-icons-fileicon "clisp"               :v-adjust -0.1 :face all-the-icons-orange)
+    (org-mode                  all-the-icons-fileicon "org"                :v-adjust 0.0 :face all-the-icons-lgreen)
+    (typescript-mode           all-the-icons-fileicon "typescript"         :v-adjust -0.1 :face all-the-icons-blue-alt)
+    (typescript-ts-mode        all-the-icons-fileicon "typescript"         :v-adjust -0.1 :face all-the-icons-blue-alt)
+    (typescript-tsx-mode       all-the-icons-fileicon "tsx"                :v-adjust -0.1 :face all-the-icons-cyan-alt)
+    (tsx-ts-mode               all-the-icons-fileicon "tsx"                :v-adjust -0.1 :face all-the-icons-cyan-alt)
+    (js-mode                   all-the-icons-alltheicon "javascript"       :v-adjust -0.1 :face all-the-icons-yellow)
+    (js-ts-mode                all-the-icons-alltheicon "javascript"       :v-adjust -0.1 :face all-the-icons-yellow)
+    (js-jsx-mode               all-the-icons-alltheicon "javascript"       :v-adjust -0.1 :face all-the-icons-yellow)
+    (js2-mode                  all-the-icons-alltheicon "javascript"       :v-adjust -0.1 :face all-the-icons-yellow)
+    (js3-mode                  all-the-icons-alltheicon "javascript"       :v-adjust -0.1 :face all-the-icons-yellow)
+    (rjsx-mode                 all-the-icons-fileicon "jsx-2"              :v-adjust -0.1 :face all-the-icons-cyan-alt)
+    (term-mode                 all-the-icons-octicon "terminal"            :v-adjust 0.2)
+    (vterm-mode                all-the-icons-octicon "terminal"            :v-adjust 0.2)
+    (eshell-mode               all-the-icons-octicon "terminal"            :v-adjust 0.0 :face all-the-icons-purple)
+    (magit-refs-mode           all-the-icons-octicon "git-branch"          :v-adjust 0.0 :face all-the-icons-red)
+    (magit-process-mode        all-the-icons-octicon "mark-github"         :v-adjust 0.0)
+    (magit-diff-mode           all-the-icons-octicon "git-compare"         :v-adjust 0.0 :face all-the-icons-lblue)
+    (ediff-mode                all-the-icons-octicon "git-compare"         :v-adjust 0.0 :Face all-the-icons-red)
+    (comint-mode               all-the-icons-faicon "terminal"             :v-adjust 0.0 :face all-the-icons-lblue)
+    (eww-mode                  all-the-icons-faicon "firefox"              :v-adjust -0.1 :face all-the-icons-red)
+    (org-agenda-mode           all-the-icons-octicon "checklist"           :v-adjust 0.0 :face all-the-icons-lgreen)
+    (cfw:calendar-mode         all-the-icons-octicon "calendar"            :v-adjust 0.0)
+    (ibuffer-mode              all-the-icons-faicon "files-o"              :v-adjust 0.0 :face all-the-icons-dsilver)
+    (messages-buffer-mode      all-the-icons-faicon "file-o"               :v-adjust 0.0 :face all-the-icons-dsilver)
+    (help-mode                 all-the-icons-faicon "info"                 :v-adjust -0.1 :face all-the-icons-purple)
+    (helpful-mode              all-the-icons-faicon "info"                 :v-adjust -0.1 :face all-the-icons-purple)
+    (benchmark-init/tree-mode  all-the-icons-octicon "dashboard"           :v-adjust 0.0)
+    (jenkins-mode              all-the-icons-fileicon "jenkins"            :face all-the-icons-blue)
+    (magit-popup-mode          all-the-icons-alltheicon "git"              :face all-the-icons-red)
+    (magit-status-mode         all-the-icons-alltheicon "git"              :face all-the-icons-lred)
+    (magit-log-mode            all-the-icons-alltheicon "git"              :face all-the-icons-green)
+    (mu4e-compose-mode         all-the-icons-octicon "pencil"              :v-adjust 0.0)
+    (mu4e-headers-mode         all-the-icons-octicon "mail"                :v-adjust 0.0)
+    (mu4e-main-mode            all-the-icons-octicon "mail"                :v-adjust 0.0)
+    (mu4e-view-mode            all-the-icons-octicon "mail-read"           :v-adjust 0.0)
+    (sieve-mode                all-the-icons-octicon "mail"                :v-adjust 0.0)
+    (gnus-group-mode           all-the-icons-octicon "mail"                :v-adjust 0.0)
+    (gnus-summary-mode         all-the-icons-octicon "mail"                :v-adjust 0.0)
+    (gnus-article-mode         all-the-icons-octicon "mail-read"           :v-adjust 0.0)
+    (message-mode              all-the-icons-octicon "pencil"              :v-adjust 0.0)
+    (package-menu-mode         all-the-icons-faicon "archive"              :height 1.0 :v-adjust 0.0 :face all-the-icons-silver)
+    (paradox-menu-mode         all-the-icons-faicon "archive"              :height 1.0 :v-adjust 0.0 :face all-the-icons-silver)
+    (Custom-mode               all-the-icons-octicon "settings"            :v-adjust -0.1)
+
+    ;; Special matcher for Web Mode based on the `web-mode-content-type' of the current buffer
+    (web-mode             all-the-icons--web-mode-icon)
+
+    (fundamental-mode                   all-the-icons-fileicon "elisp"            :height 1.0 :v-adjust -0.1 :face all-the-icons-dsilver)
+    (special-mode                       all-the-icons-fileicon "elisp"            :height 1.0 :v-adjust -0.1 :face all-the-icons-yellow)
+    (text-mode                          all-the-icons-octicon "file-text"         :v-adjust 0.0 :face all-the-icons-cyan)
+    (enh-ruby-mode                      all-the-icons-alltheicon "ruby-alt"       :face all-the-icons-lred)
+    (ruby-mode                          all-the-icons-alltheicon "ruby-alt"       :face all-the-icons-lred)
+    (ruby-ts-mode                       all-the-icons-alltheicon "ruby-alt"       :face all-the-icons-lred)
+    (inf-ruby-mode                      all-the-icons-alltheicon "ruby-alt"       :face all-the-icons-red)
+    (projectile-rails-compilation-mode  all-the-icons-alltheicon "ruby-alt"       :face all-the-icons-red)
+    (rspec-compilation-mode             all-the-icons-alltheicon "ruby-alt"       :face all-the-icons-red)
+    (rake-compilation-mode              all-the-icons-alltheicon "ruby-alt"       :face all-the-icons-red)
+    (sh-mode                            all-the-icons-alltheicon "terminal"       :face all-the-icons-purple)
+    (bash-ts-mode                       all-the-icons-alltheicon "terminal"       :face all-the-icons-purple)
+    (shell-mode                         all-the-icons-alltheicon "terminal"       :face all-the-icons-purple)
+    (fish-mode                          all-the-icons-alltheicon "terminal"       :face all-the-icons-lpink)
+    (nginx-mode                         all-the-icons-fileicon "nginx"            :height 0.9  :face all-the-icons-dgreen)
+    (apache-mode                        all-the-icons-alltheicon "apache"         :height 0.9  :face all-the-icons-dgreen)
+    (makefile-mode                      all-the-icons-fileicon "gnu"              :face all-the-icons-dorange)
+    (cmake-mode                         all-the-icons-fileicon "cmake"            :face all-the-icons-red)
+    (cmake-ts-mode                      all-the-icons-fileicon "cmake"            :face all-the-icons-red)
+    (dockerfile-mode                    all-the-icons-fileicon "dockerfile"       :face all-the-icons-blue)
+    (dockerfile-ts-mode                 all-the-icons-fileicon "dockerfile"       :face all-the-icons-blue)
+    (docker-compose-mode                all-the-icons-fileicon "dockerfile"       :face all-the-icons-lblue)
+    (nxml-mode                          all-the-icons-faicon "file-code-o"        :height 0.95 :face all-the-icons-lorange)
+    (json-mode                          all-the-icons-octicon "settings"          :face all-the-icons-yellow)
+    (json-ts-mode                       all-the-icons-octicon "settings"          :face all-the-icons-yellow)
+    (jsonian-mode                       all-the-icons-octicon "settings"          :face all-the-icons-yellow)
+    (yaml-mode                          all-the-icons-octicon "settings"          :v-adjust 0.0 :face all-the-icons-dyellow)
+    (yaml-ts-mode                       all-the-icons-octicon "settings"          :v-adjust 0.0 :face all-the-icons-dyellow)
+    (elisp-byte-code-mode               all-the-icons-octicon "file-binary"       :v-adjust 0.0 :face all-the-icons-dsilver)
+    (archive-mode                       all-the-icons-octicon "file-zip"          :v-adjust 0.0 :face all-the-icons-lmaroon)
+    (elm-mode                           all-the-icons-fileicon "elm"              :face all-the-icons-blue)
+    (erlang-mode                        all-the-icons-alltheicon "erlang"         :face all-the-icons-red :v-adjust -0.1 :height 0.9)
+    (elixir-mode                        all-the-icons-alltheicon "elixir"         :face all-the-icons-lorange :v-adjust -0.1 :height 0.9)
+    (java-mode                          all-the-icons-alltheicon "java"           :height 1.0 :face all-the-icons-purple)
+    (java-ts-mode                       all-the-icons-alltheicon "java"           :height 1.0 :face all-the-icons-purple)
+    (go-mode                            all-the-icons-fileicon "go"               :height 1.0 :face all-the-icons-blue)
+    (go-ts-mode                         all-the-icons-fileicon "go"               :height 1.0 :face all-the-icons-blue)
+    (go-mod-ts-mode                     all-the-icons-fileicon "config-go"        :height 1.0 :face all-the-icons-blue-alt)
+    (go-dot-mod-mode                    all-the-icons-fileicon "config-go"        :height 1.0 :face all-the-icons-blue-alt)
+    (go-dot-work-mode                   all-the-icons-fileicon "config-go"        :height 1.0 :face all-the-icons-blue-alt)
+    (graphql-mode                       all-the-icons-fileicon "graphql"          :face all-the-icons-dpink)
+    (matlab-mode                        all-the-icons-fileicon "matlab"           :face all-the-icons-orange)
+    (nix-mode                           all-the-icons-fileicon "nix"              :face all-the-icons-blue)
+    (perl-mode                          all-the-icons-alltheicon "perl"           :face all-the-icons-lorange)
+    (cperl-mode                         all-the-icons-alltheicon "perl"           :face all-the-icons-lorange)
+    (php-mode                           all-the-icons-fileicon "php"              :face all-the-icons-lsilver)
+    (php-ts-mode                        all-the-icons-fileicon "php"              :face all-the-icons-lsilver)
+    (phps-mode                          all-the-icons-fileicon "php"              :face all-the-icons-lsilver)
+    (prolog-mode                        all-the-icons-alltheicon "prolog"         :height 1.1  :face all-the-icons-lmaroon)
+    (python-mode                        all-the-icons-alltheicon "python"         :height 1.0  :face all-the-icons-dblue)
+    (python-ts-mode                     all-the-icons-alltheicon "python"         :height 1.0  :face all-the-icons-dblue)
+    (inferior-python-mode               all-the-icons-alltheicon "python"         :height 1.0  :face all-the-icons-dblue)
+    (racket-mode                        all-the-icons-fileicon "racket"           :height 1.2 :face all-the-icons-red)
+    (rust-mode                          all-the-icons-alltheicon "rust"           :height 1.2  :face all-the-icons-maroon)
+    (rustic-mode                        all-the-icons-alltheicon "rust"           :height 1.2  :face all-the-icons-maroon)
+    (rust-ts-mode                       all-the-icons-alltheicon "rust"           :height 1.2  :face all-the-icons-maroon)
+    (scala-mode                         all-the-icons-alltheicon "scala"          :face all-the-icons-red)
+    (scheme-mode                        all-the-icons-fileicon   "scheme"         :height 1.2 :face all-the-icons-red)
+    (swift-mode                         all-the-icons-alltheicon "swift"          :height 1.0 :v-adjust -0.1 :face all-the-icons-green)
+    (svelte-mode                        all-the-icons-fileicon "svelte"           :v-adjust 0.0 :face all-the-icons-red)
+    (ada-mode                           all-the-icons-fileicon   "ada"            :v-adjust 0.0 :face all-the-icons-blue)
+    (ada-ts-mode                        all-the-icons-fileicon   "ada"            :v-adjust 0.0 :face all-the-icons-blue)
+    (gpr-mode                           all-the-icons-fileicon   "ada"            :v-adjust 0.0 :face all-the-icons-green)
+    (gpr-ts-mode                        all-the-icons-fileicon   "ada"            :v-adjust 0.0 :face all-the-icons-green)
+    (c-mode                             all-the-icons-alltheicon "c-line"         :face all-the-icons-blue)
+    (c-ts-mode                          all-the-icons-alltheicon "c-line"         :face all-the-icons-blue)
+    (c++-mode                           all-the-icons-alltheicon "cplusplus-line" :v-adjust -0.2 :face all-the-icons-blue)
+    (c++-ts-mode                        all-the-icons-alltheicon "cplusplus-line" :v-adjust -0.2 :face all-the-icons-blue)
+    (csharp-mode                        all-the-icons-alltheicon "csharp-line"    :face all-the-icons-dblue)
+    (csharp-ts-mode                     all-the-icons-alltheicon "csharp-line"    :face all-the-icons-dblue)
+    (clojure-mode                       all-the-icons-alltheicon "clojure"        :height 1.0  :face all-the-icons-blue)
+    (cider-repl-mode                    all-the-icons-alltheicon "clojure"        :height 1.0  :face all-the-icons-green)
+    (clojurescript-mode                 all-the-icons-fileicon "cljs"             :height 1.0  :face all-the-icons-dblue)
+    (coffee-mode                        all-the-icons-alltheicon "coffeescript"   :height 1.0  :face all-the-icons-maroon)
+    (lisp-mode                          all-the-icons-fileicon "lisp"             :face all-the-icons-orange)
+    (css-mode                           all-the-icons-alltheicon "css3"           :face all-the-icons-yellow)
+    (css-ts-mode                        all-the-icons-alltheicon "css3"           :face all-the-icons-yellow)
+    (scss-mode                          all-the-icons-alltheicon "sass"           :face all-the-icons-pink)
+    (sass-mode                          all-the-icons-alltheicon "sass"           :face all-the-icons-dpink)
+    (less-css-mode                      all-the-icons-alltheicon "less"           :height 0.8  :face all-the-icons-dyellow)
+    (stylus-mode                        all-the-icons-alltheicon "stylus"         :face all-the-icons-lgreen)
+    (csv-mode                           all-the-icons-octicon "graph"             :v-adjust 0.0 :face all-the-icons-dblue)
+    (haskell-mode                       all-the-icons-alltheicon "haskell"        :height 1.0  :face all-the-icons-red)
+    (haskell-c2hs-mode                  all-the-icons-alltheicon "haskell"        :height 1.0  :face all-the-icons-red)
+    (literate-haskell-mode              all-the-icons-alltheicon "haskell"        :height 1.0  :face all-the-icons-red)
+    (haml-mode                          all-the-icons-fileicon "haml"             :face all-the-icons-lyellow)
+    (html-mode                          all-the-icons-alltheicon "html5"          :face all-the-icons-orange)
+    (html-ts-mode                       all-the-icons-alltheicon "html5"          :face all-the-icons-orange)
+    (rhtml-mode                         all-the-icons-alltheicon "html5"          :face all-the-icons-lred)
+    (mustache-mode                      all-the-icons-fileicon "moustache"        :face all-the-icons-green)
+    (slim-mode                          all-the-icons-octicon "dashboard"         :v-adjust 0.0 :face all-the-icons-yellow)
+    (jade-mode                          all-the-icons-fileicon "jade"             :face all-the-icons-red)
+    (pug-mode                           all-the-icons-fileicon "pug"              :face all-the-icons-red)
+    (react-mode                         all-the-icons-alltheicon "react"          :height 1.1  :face all-the-icons-lblue)
+    (image-mode                         all-the-icons-octicon "file-media"        :v-adjust 0.0 :face all-the-icons-blue)
+    (texinfo-mode                       all-the-icons-fileicon "tex"              :face all-the-icons-lred)
+    (markdown-mode                      all-the-icons-octicon "markdown"          :v-adjust 0.0 :face all-the-icons-lblue)
+    (bibtex-mode                        all-the-icons-fileicon "bib"              :face all-the-icons-maroon)
+    (org-mode                           all-the-icons-fileicon "org"              :face all-the-icons-lgreen)
+    (compilation-mode                   all-the-icons-faicon "cogs"               :v-adjust 0.0 :height 1.0)
+    (objc-mode                          all-the-icons-faicon "apple"              :v-adjust 0.0 :height 1.0)
+    (tuareg-mode                        all-the-icons-fileicon "ocaml"            :v-adjust 0.0 :height 1.0)
+    (purescript-mode                    all-the-icons-fileicon "purescript"       :v-adjust 0.0 :height 1.0)
+    (verilog-mode                       all-the-icons-fileicon "verilog"          :height 1.0 :v-adjust -0.2 :face all-the-icons-red)
+    (vhdl-mode                          all-the-icons-fileicon "vhdl"             :face all-the-icons-blue)
+    (haskell-cabal-mode                 all-the-icons-fileicon "cabal"            :face all-the-icons-lblue)
+    (kotlin-mode                        all-the-icons-fileicon "kotlin"           :face all-the-icons-orange)
+    (kotlin-ts-mode                     all-the-icons-fileicon "kotlin"           :face all-the-icons-orange)
+    (nim-mode                           all-the-icons-fileicon "nimrod"           :face all-the-icons-yellow)
+    (sql-mode                           all-the-icons-octicon  "database"         :face all-the-icons-silver)
+    (lua-mode                           all-the-icons-fileicon "lua"              :face all-the-icons-dblue)
+    (adoc-mode                          all-the-icons-fileicon "asciidoc"         :face all-the-icons-lblue)
+    (puppet-mode                        all-the-icons-fileicon "puppet"           :face all-the-icons-yellow)
+    (jinja2-mode                        all-the-icons-fileicon "jinja"            :face all-the-icons-silver)
+    (powershell-mode                    all-the-icons-fileicon "powershell"       :face all-the-icons-blue)
+    (tex-mode                           all-the-icons-fileicon "tex"              :face all-the-icons-lred)
+    (latex-mode                         all-the-icons-fileicon "tex"              :face all-the-icons-lred)
+    (dart-mode                          all-the-icons-fileicon "dart"             :height 1.0  :face all-the-icons-blue)
+    (fsharp-mode                        all-the-icons-fileicon "fsharp"           :height 1.0  :face all-the-icons-blue)
+    (asm-mode                           all-the-icons-fileicon "assembly"         :height 1.0  :face all-the-icons-blue)
+    (nasm-mode                          all-the-icons-fileicon "assembly"         :height 1.0  :face all-the-icons-blue)
+    (tcl-mode                           all-the-icons-fileicon "tcl"              :height 1.0  :face all-the-icons-dred)
+    (cuda-mode                          all-the-icons-fileicon "nvidia"           :face all-the-icons-green)
+    (f90-mode                           all-the-icons-fileicon "fortran"          :face all-the-icons-purple)
+    (hy-mode                            all-the-icons-fileicon "hy"               :face all-the-icons-blue)
+    (glsl-mode                          all-the-icons-fileicon "vertex-shader"    :face all-the-icons-green)
+    (zig-mode                           all-the-icons-fileicon "zig"              :face all-the-icons-orange)
+    (exwm-mode                          all-the-icons-octicon "browser"           :v-adjust 0.2 :face all-the-icons-purple)
+    (beancount-mode                     all-the-icons-faicon "credit-card"        :face all-the-icons-lgreen)
+    (ledger-mode                        all-the-icons-faicon "credit-card"        :face all-the-icons-lgreen)
+    (odin-mode                          all-the-icons-fileicon "odin"             :height 1.1 :face all-the-icons-lblue)
+    (pdf-view-mode                      all-the-icons-octicon  "file-pdf"         :v-adjust 0.0 :face all-the-icons-dred)
+    (spacemacs-buffer-mode              all-the-icons-fileicon "elisp"            :height 1.0 :v-adjust -0.1 :face all-the-icons-purple)
+    (elfeed-search-mode                 all-the-icons-faicon   "rss-square"       :face all-the-icons-orange)
+    (elfeed-show-mode                   all-the-icons-faicon   "rss"              :face all-the-icons-orange)
+    (emms-browser-mode                  all-the-icons-faicon   "music"            :face all-the-icons-silver)
+    (emms-lyrics-mode                   all-the-icons-faicon   "music"            :face all-the-icons-silver)
+    (emms-show-all-mode                 all-the-icons-faicon   "music"            :face all-the-icons-silver)
+    (emms-metaplaylist-mode             all-the-icons-faicon   "music"            :face all-the-icons-silver)
+    (emms-tag-editor-mode               all-the-icons-faicon   "music"            :face all-the-icons-silver)
+    (emms-playlist-mode                 all-the-icons-faicon   "music"            :face all-the-icons-silver)
+    (lilypond-mode                      all-the-icons-faicon   "music"            :face all-the-icons-green)
+    (meson-mode                         all-the-icons-fileicon "meson"            :face all-the-icons-purple)
+    (man-common                         all-the-icons-fileicon "man-page"         :face all-the-icons-blue)
+    (ess-r-mode                         all-the-icons-fileicon "R"                :face all-the-icons-lblue)))
+
+(defvar all-the-icons-url-alist
+  '(
+    ;; Social media and communities
+    ("^\\(https?://\\)?\\(www\\.\\)?del\\.icio\\.us" all-the-icons-faicon "delicious")
+    ("^\\(https?://\\)?\\(www\\.\\)?behance\\.net" all-the-icons-faicon "behance")
+    ("^\\(https?://\\)?\\(www\\.\\)?dribbble\\.com" all-the-icons-faicon "dribbble")
+    ("^\\(https?://\\)?\\(www\\.\\)?facebook\\.com" all-the-icons-faicon "facebook-official")
+    ("^\\(https?://\\)?\\(www\\.\\)?glide\\.me" all-the-icons-faicon "glide-g")
+    ("^\\(https?://\\)?\\(www\\.\\)?plus\\.google\\.com" all-the-icons-faicon "google-plus")
+    ("linkedin\\.com" all-the-icons-faicon "linkedin")
+    ("^\\(https?://\\)?\\(www\\.\\)?ok\\.ru" all-the-icons-faicon "odnoklassniki")
+    ("^\\(https?://\\)?\\(www\\.\\)?reddit\\.com" all-the-icons-faicon "reddit-alien")
+    ("^\\(https?://\\)?\\(www\\.\\)?slack\\.com" all-the-icons-faicon "slack")
+    ("^\\(https?://\\)?\\(www\\.\\)?snapchat\\.com" all-the-icons-faicon "snapchat-ghost")
+    ("^\\(https?://\\)?\\(www\\.\\)?weibo\\.com" all-the-icons-faicon "weibo")
+    ("^\\(https?://\\)?\\(www\\.\\)?twitter\\.com" all-the-icons-faicon "twitter")
+    ;; Blogging
+    ("joomla\\.org" all-the-icons-faicon "joomla")
+    ("^\\(https?://\\)?\\(www\\.\\)?medium\\.com" all-the-icons-faicon "medium")
+    ("tumblr\\.com" all-the-icons-faicon "tumblr")
+    ("^wordpress\\.com" all-the-icons-faicon "wordpress")
+    ;; Programming
+    ("^\\(https?://\\)?\\(www\\.\\)?bitbucket\\.org" all-the-icons-faicon "bitbucket")
+    ("^\\(https?://\\)?\\(www\\.\\)?codepen\\.io" all-the-icons-faicon "codepen")
+    ("^\\(https?://\\)?\\(www\\.\\)?codiepie\\.com" all-the-icons-faicon "codiepie")
+    ("^\\(https?://\\)?\\(www\\.\\)?gist\\.github\\.com" all-the-icons-octicon "gist")
+    ("^\\(https?://\\)?\\(www\\.\\)?github\\.com" all-the-icons-octicon "mark-github")
+    ("^\\(https?://\\)?\\(www\\.\\)?gitlab\\.com" all-the-icons-faicon "gitlab")
+    ("^\\(https?://\\)?\\(www\\.\\)?news\\.ycombinator\\.com" all-the-icons-faicon "hacker-news")
+    ("^\\(https?://\\)?\\(www\\.\\)?jsfiddle\\.net" all-the-icons-faicon "jsfiddle")
+    ("^\\(https?://\\)?\\(www\\.\\)?maxcdn\\.com" all-the-icons-faicon "maxcdn")
+    ("^\\(https?://\\)?\\(www\\.\\)?stackoverflow\\.com" all-the-icons-faicon "stack-overflow")
+    ;; Video
+    ("^\\(https?://\\)?\\(www\\.\\)?twitch\\.tv" all-the-icons-faicon "twitch")
+    ("^\\(https?://\\)?\\(www\\.\\)?vimeo\\.com" all-the-icons-faicon "vimeo")
+    ("^\\(https?://\\)?\\(www\\.\\)?youtube\\.com" all-the-icons-faicon "youtube")
+    ("^\\(https?://\\)?\\(www\\.\\)?youtu\\.be" all-the-icons-faicon "youtube")
+    ("^\\(https?://\\)?\\(www\\.\\)?vine\\.co" all-the-icons-faicon "vine")
+    ;; Sound
+    ("^\\(https?://\\)?\\(www\\.\\)?last\\.fm" all-the-icons-faicon "lastfm")
+    ("^\\(https?://\\)?\\(www\\.\\)?mixcloud\\.com" all-the-icons-faicon "mixcloud")
+    ("^\\(https?://\\)?\\(www\\.\\)?soundcloud\\.com" all-the-icons-faicon "soundcloud")
+    ("spotify\\.com" all-the-icons-faicon "spotify")
+    ;; Shopping
+    ("^\\(https?://\\)?\\(www\\.\\)?amazon\\." all-the-icons-faicon "amazon")
+    ("^\\(https?://\\)?\\(www\\.\\)?opencart\\.com" all-the-icons-faicon "opencart")
+    ("^\\(https?://\\)?\\(www\\.\\)?paypal\\.com" all-the-icons-faicon "paypal")
+    ("^\\(https?://\\)?\\(www\\.\\)?shirtsinbulk\\.com" all-the-icons-faicon "shitsinbulk")
+    ;; Images
+    ("^\\(https?://\\)?\\(www\\.\\)?500px\\.com" all-the-icons-faicon "500px")
+    ("^\\(https?://\\)?\\(www\\.\\)?deviantart\\.com" all-the-icons-faicon "deviantart")
+    ("^\\(https?://\\)?\\(www\\.\\)?flickr\\.com" all-the-icons-faicon "flickr")
+    ("^\\(https?://\\)?\\(www\\.\\)?instagram\\.com" all-the-icons-faicon "instagram")
+    ("^\\(https?://\\)?\\(www\\.\\)?pinterest\\." all-the-icons-faicon "pinterest")
+    ;; Information and books
+    ("^\\(https?://\\)?\\(www\\.\\)?digg\\.com" all-the-icons-faicon "digg")
+    ("^\\(https?://\\)?\\(www\\.\\)?foursquare\\.com" all-the-icons-faicon "foursquare")
+    ("^\\(https?://\\)?\\(www\\.\\)?getpocket\\.com" all-the-icons-faicon "get-pocket")
+    ("^\\(https?://\\)?\\(www\\.\\)?scribd\\.com" all-the-icons-faicon "scribd")
+    ("^\\(https?://\\)?\\(www\\.\\)?slideshare\\.net" all-the-icons-faicon "slideshare")
+    ("stackexchange\\.com" all-the-icons-faicon "stack-exchange")
+    ("^\\(https?://\\)?\\(www\\.\\)?stumbleupon\\.com" all-the-icons-faicon "stumbleupon")
+    ("^\\(https?://\\)?\\(www\\.\\)?tripadvisor\\." all-the-icons-faicon "tripadvisor")
+    ("^\\(https?://\\)?\\(www\\.\\)?yelp\\." all-the-icons-faicon "yelp")
+
+    ("wikipedia\\.org" all-the-icons-faicon "wikipedia-w")
+    ;; Various companies and tools
+    ("^\\(https?://\\)?\\(www\\.\\)?angel\\.co" all-the-icons-faicon "angellist")
+    ("^\\(https?://\\)?\\(www\\.\\)?apple\\.com" all-the-icons-faicon "apple")
+    ("^\\(https?://\\)?\\(www\\.\\)?buysellads\\.com" all-the-icons-faicon "buysellads")
+    ("^\\(https?://\\)?\\(www\\.\\)?connectdevelop\\.com" all-the-icons-faicon "connectdevelop")
+    ("^\\(https?://\\)?\\(www\\.\\)?dashcube\\.com" all-the-icons-faicon "dashcube")
+    ("^\\(https?://\\)?\\(www\\.\\)?dropbox\\.com" all-the-icons-faicon "dropbox")
+    ("^\\(https?://\\)?\\(www\\.\\)?enviragallery\\.com" all-the-icons-faicon "envira")
+    ("^\\(https?://\\)?\\(www\\.\\)?fortawesome\\.com" all-the-icons-faicon "fort-awesome")
+    ("^\\(https?://\\)?\\(www\\.\\)?forumbee\\.com" all-the-icons-faicon "forumbee")
+    ("^\\(https?://\\)?\\(www\\.\\)?gratipay\\.com" all-the-icons-faicon "gratipay")
+    ("^\\(https?://\\)?\\(www\\.\\)?modx\\.com" all-the-icons-faicon "modx")
+    ("^\\(https?://\\)?\\(www\\.\\)?pagelines\\.com" all-the-icons-faicon "pagelines")
+    ("^\\(https?://\\)?\\(www\\.\\)?producthunt\\.com" all-the-icons-faicon "product-hunt")
+    ("sellsy\\.com" all-the-icons-faicon "sellsy")
+    ("^\\(https?://\\)?\\(www\\.\\)?simplybuilt\\.com" all-the-icons-faicon "simplybuilt")
+    ("^\\(https?://\\)?\\(www\\.\\)?skyatlas\\.com" all-the-icons-faicon "skyatlas")
+    ("^\\(https?://\\)?\\(www\\.\\)?skype\\.com" all-the-icons-faicon "skype")
+    ("steampowered\\.com" all-the-icons-faicon "steam")
+    ("^\\(https?://\\)?\\(www\\.\\)?themeisle\\.com" all-the-icons-faicon "themeisle")
+    ("^\\(https?://\\)?\\(www\\.\\)?trello\\.com" all-the-icons-faicon "trello")
+    ("^\\(https?://\\)?\\(www\\.\\)?whatsapp\\.com" all-the-icons-faicon "whatsapp")
+    ("^\\(https?://\\)?\\(www\\.\\)?ycombinator\\.com" all-the-icons-faicon "y-combinator")
+    ("yahoo\\.com" all-the-icons-faicon "yahoo")
+    ("^\\(https?://\\)?\\(www\\.\\)?yoast\\.com" all-the-icons-faicon "yoast")
+    ;; Catch all
+    ("android" all-the-icons-faicon "android")
+    ("creativecommons" all-the-icons-faicon "creative-commons")
+    ("forums?" all-the-icons-octicon "comment-discussion")
+    ("\\.pdf$" all-the-icons-octicon "file-pdf" :v-adjust 0.0 :face all-the-icons-dred)
+    ("google" all-the-icons-faicon "google")
+    ("\\.rss" all-the-icons-faicon "rss")
+    ))
+
+;; ====================
+;;   Functions Start
+;; ====================
+
+(defun all-the-icons-auto-mode-match? (&optional file)
+  "Whether or not FILE's `major-mode' match against its `auto-mode-alist'."
+  (let* ((file (or file (buffer-file-name) (buffer-name)))
+         (auto-mode (all-the-icons-match-to-alist file auto-mode-alist)))
+    (eq major-mode auto-mode)))
+
+(defun all-the-icons-match-to-alist (file alist)
+  "Match FILE against an entry in ALIST using `string-match-p'."
+  (cdr (cl-find-if (lambda (it) (string-match-p (car it) file)) alist)))
+
+(defun all-the-icons-dir-is-submodule (dir)
+  "Checker whether or not DIR is a git submodule."
+  (let* ((gitmodule-dir (locate-dominating-file dir ".gitmodules"))
+         (modules-file  (expand-file-name (format "%s.gitmodules" gitmodule-dir)))
+         (module-search (format "submodule \".*?%s\"" (file-name-base dir))))
+
+    (when (and gitmodule-dir (file-exists-p (format "%s/.git" dir)))
+      (with-temp-buffer
+        (insert-file-contents modules-file)
+        (search-forward-regexp module-search (point-max) t)))))
+
+;; Icon functions
+(defun all-the-icons-icon-for-dir-with-chevron (dir &optional chevron padding)
+  "Format an icon for DIR with CHEVRON similar to tree based directories.
+
+If PADDING is provided, it will prepend and separate the chevron
+and directory with PADDING.
+
+Produces different symbols by inspecting DIR to distinguish
+symlinks and git repositories which do not depend on the
+directory contents"
+  (let ((icon (all-the-icons-icon-for-dir dir))
+        (chevron (if chevron (all-the-icons-octicon (format "chevron-%s" chevron) :height 0.8 :v-adjust -0.1) ""))
+        (padding (or padding "\t")))
+    (format "%s%s%s%s%s" padding chevron padding icon padding)))
+
+(defun all-the-icons-icon-for-buffer ()
+  "Get the formatted icon for the current buffer.
+
+This function prioritises the use of the buffers file extension to
+discern the icon when its `major-mode' matches its auto mode,
+otherwise it will use the buffers `major-mode' to decide its
+icon."
+  (all-the-icons--icon-info-for-buffer))
+
+(defun all-the-icons-icon-family-for-buffer ()
+  "Get the icon font family for the current buffer."
+  (all-the-icons--icon-info-for-buffer "family"))
+
+(defun all-the-icons--web-mode-icon (&rest arg-overrides) "Get icon for a `web-mode' buffer with ARG-OVERRIDES." (all-the-icons--web-mode nil arg-overrides))
+(defun all-the-icons--web-mode-icon-family () "Get icon family for a `web-mode' buffer." (all-the-icons--web-mode t))
+(defun all-the-icons--web-mode (&optional family arg-overrides)
+  "Return icon or FAMILY for `web-mode' based on `web-mode-content-type'.
+Providing ARG-OVERRIDES will modify the creation of the icon."
+  (let ((non-nil-args (cl-reduce (lambda (acc it) (if it (append acc (list it)) acc)) arg-overrides :initial-value '())))
+    (cond
+     ((equal web-mode-content-type "jsx")
+      (if family (all-the-icons-fileicon-family) (apply 'all-the-icons-fileicon (append '("jsx-2") non-nil-args))))
+     ((equal web-mode-content-type "javascript")
+      (if family (all-the-icons-alltheicon-family) (apply 'all-the-icons-alltheicon (append '("javascript") non-nil-args))))
+     ((equal web-mode-content-type "json")
+      (if family (all-the-icons-alltheicon-family) (apply 'all-the-icons-alltheicon (append '("less") non-nil-args))))
+     ((equal web-mode-content-type "xml")
+      (if family (all-the-icons-faicon-family) (apply 'all-the-icons-faicon (append '("file-code-o") non-nil-args))))
+     ((equal web-mode-content-type "css")
+      (if family (all-the-icons-alltheicon-family) (apply 'all-the-icons-alltheicon (append '("css3") non-nil-args))))
+     (t
+      (if family (all-the-icons-alltheicon-family) (apply 'all-the-icons-alltheicon (append '("html5") non-nil-args)))))))
+
+;; Icon Functions
+
+;;;###autoload
+(defun all-the-icons-icon-for-dir (dir &rest arg-overrides)
+  "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'."
+  (let* ((dirname (file-name-base (directory-file-name dir)))
+         (icon (all-the-icons-match-to-alist dirname all-the-icons-dir-icon-alist))
+         (args (cdr icon)))
+    (when arg-overrides (setq args (append `(,(car args)) arg-overrides (cdr args))))
+    (if (file-remote-p dir) ;; don't call expand-file-name on a remote dir as this can make emacs hang
+        (apply #'all-the-icons-octicon "terminal" (cdr args))
+      (let
+          ((path (expand-file-name dir)))
+        (cond
+         ((file-symlink-p path)
+          (apply #'all-the-icons-octicon "file-symlink-directory" (cdr args)))
+         ((all-the-icons-dir-is-submodule path)
+          (apply #'all-the-icons-octicon "file-submodule" (cdr args)))
+         ((file-exists-p (format "%s/.git" path))
+          (apply #'all-the-icons-octicon "repo" (cdr args)))
+         (t (apply (car icon) args)))))))
+
+;;;###autoload
+(defun all-the-icons-icon-for-file (file &rest arg-overrides)
+  "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."
+  (let* ((ext (file-name-extension file))
+         (icon (or (all-the-icons-match-to-alist file all-the-icons-regexp-icon-alist)
+                   (and ext
+                        (cdr (assoc (downcase ext)
+                                    all-the-icons-extension-icon-alist)))
+                   all-the-icons-default-file-icon))
+         (args (cdr icon)))
+    (when arg-overrides (setq args (append `(,(car args)) arg-overrides (cdr args))))
+    (apply (car icon) args)))
+
+;;;###autoload
+(defun all-the-icons-icon-for-mode (mode &rest arg-overrides)
+  "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."
+  (let* ((icon (cdr (or (assoc mode all-the-icons-mode-icon-alist)
+                        (assoc (get mode 'derived-mode-parent) all-the-icons-mode-icon-alist))))
+         (args (cdr icon)))
+    (when arg-overrides (setq args (append `(,(car args)) arg-overrides (cdr args))))
+    (if icon (apply (car icon) args) mode)))
+
+;;;###autoload
+(defun all-the-icons-icon-for-url (url &rest arg-overrides)
+  "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."
+  (let* ((icon (all-the-icons-match-to-alist url all-the-icons-url-alist))
+         (args (cdr icon)))
+    (unless icon
+      (setq icon '(all-the-icons-faicon "globe"))
+      (setq args (cdr icon)))
+    (when arg-overrides (setq args (append `(,(car args)) arg-overrides (cdr args))))
+    (apply (car icon) args)))
+
+(defcustom all-the-icons--cache-limit 2048
+  "Maximum cache size for functions cached by `all-the-icons-cache'."
+  :type 'integer)
+
+(defun all-the-icons-cache (func)
+  "Set a cache for FUNC. Does not work on interactive functions."
+  (unless (get func 'all-the-icons--cached)
+    (let ((cache (make-hash-table :test #'equal
+                                  :size all-the-icons--cache-limit))
+          (orig-fn (symbol-function func)))
+      (fset func
+            (lambda (&rest args)
+              (or (gethash args cache)
+                  (progn
+                    (when (> (hash-table-count cache)
+                             all-the-icons--cache-limit)
+                      (clrhash cache))
+                    (puthash args (apply orig-fn args) cache)))))))
+
+  (put func 'all-the-icons--cached t))
+
+(all-the-icons-cache #'all-the-icons-icon-for-dir)
+(all-the-icons-cache #'all-the-icons-icon-for-file)
+(all-the-icons-cache #'all-the-icons-icon-for-mode)
+(all-the-icons-cache #'all-the-icons-icon-for-url)
+
+;; Family Face Functions
+(defun all-the-icons-icon-family-for-file (file)
+  "Get the icons font family for FILE."
+  (let* ((ext (file-name-extension file))
+         (icon (or (all-the-icons-match-to-alist file all-the-icons-regexp-icon-alist)
+                   (and ext
+                        (cdr (assoc (downcase ext)
+                                    all-the-icons-extension-icon-alist)))
+                   all-the-icons-default-file-icon)))
+    (funcall (intern (format "%s-family" (car icon))))))
+
+(defun all-the-icons-icon-family-for-mode (mode)
+  "Get the icons font family for MODE."
+  (let ((icon (cdr (assoc mode all-the-icons-mode-icon-alist))))
+    (if icon (funcall (intern (format "%s-family" (car icon)))) nil)))
+
+(defun all-the-icons-icon-family (icon)
+  "Get a propertized ICON family programmatically."
+  (plist-get (get-text-property 0 'face icon) :family))
+
+(all-the-icons-cache #'all-the-icons-icon-family-for-file)
+(all-the-icons-cache #'all-the-icons-icon-family-for-mode)
+(all-the-icons-cache #'all-the-icons-icon-family)
+
+(defun all-the-icons--icon-info-for-buffer (&optional f)
+  "Get icon info for the current buffer.
+
+When F is provided, the info function is calculated with the format
+`all-the-icons-icon-%s-for-file' or `all-the-icons-icon-%s-for-mode'."
+  (let* ((base-f (concat "all-the-icons-icon" (when f (format "-%s" f))))
+         (file-f (intern (concat base-f "-for-file")))
+         (mode-f (intern (concat base-f "-for-mode"))))
+    (if (and (buffer-file-name)
+             (all-the-icons-auto-mode-match?))
+        (funcall file-f (file-name-nondirectory (buffer-file-name)))
+      (funcall mode-f major-mode))))
+
+;; Weather icons
+(defun all-the-icons-icon-for-weather (weather)
+  "Get an icon for a WEATHER status."
+  (let ((icon (all-the-icons-match-to-alist weather all-the-icons-weather-icon-alist)))
+    (if icon (apply (car icon) (cdr icon)) weather)))
+
+;; Definitions
+
+(eval-and-compile
+  (defun all-the-icons--function-name (name)
+    "Get the symbol for an icon function name for icon set NAME."
+    (intern (concat "all-the-icons-" (downcase (symbol-name name)))))
+
+  (defun all-the-icons--family-name (name)
+    "Get the symbol for an icon family function for icon set NAME."
+    (intern (concat "all-the-icons-" (downcase (symbol-name name)) "-family")))
+
+  (defun all-the-icons--data-name (name)
+    "Get the symbol for an icon family function for icon set NAME."
+    (intern (concat "all-the-icons-" (downcase (symbol-name name)) "-data")))
+
+  (defun all-the-icons--insert-function-name (name)
+    "Get the symbol for an icon insert function for icon set NAME."
+    (intern (concat "all-the-icons-insert-" (downcase (symbol-name name)))))
+
+  (defun all-the-icons--family-scale-factor (family)
+    (intern (concat "all-the-icons-" (symbol-name family) "-scale-factor")))
+
+  (defun all-the-icons--family-adjust (family)
+    (intern (concat "all-the-icons-default-" (symbol-name family) "-adjust"))))
+
+;; Icon insertion functions
+
+(defun all-the-icons--read-candidates ()
+  "Helper to build a list of candidates for all families."
+  (cl-reduce 'append (mapcar (lambda (it) (all-the-icons--read-candidates-for-family it t)) all-the-icons-font-families)))
+
+(defun all-the-icons--read-candidates-for-family (family &optional show-family)
+  "Helper to build read candidates for FAMILY.
+If SHOW-FAMILY is non-nil, displays the icons family in the candidate string."
+  (let ((data   (funcall (all-the-icons--data-name family)))
+        (icon-f (all-the-icons--function-name family)))
+    (mapcar
+     (lambda (it)
+       (let* ((icon-name (car it))
+              (icon-name-head (substring icon-name 0 1))
+              (icon-name-tail (substring icon-name 1))
+
+              (icon-display (propertize icon-name-head 'display (format "%s\t%s" (funcall icon-f icon-name) icon-name-head)))
+              (icon-family (if show-family (format "\t[%s]" family) ""))
+
+              (candidate-name (format "%s%s%s" icon-display icon-name-tail icon-family))
+              (candidate-icon (funcall (all-the-icons--function-name family) icon-name)))
+
+         (cons candidate-name candidate-icon)))
+     data)))
+
+;;;###autoload
+(defun all-the-icons-install-fonts (&optional pfx)
+  "Helper function to download and install the latests fonts based on OS.
+When PFX is non-nil, ignore the prompt and just install"
+  (interactive "P")
+  (when (or pfx (yes-or-no-p "This will download and install fonts, are you sure you want to do this?"))
+    (let* ((url-format "https://raw.githubusercontent.com/domtronn/all-the-icons.el/master/fonts/%s")
+           (font-dest (cond
+                       ;; Default Linux install directories
+                       ((member system-type '(gnu gnu/linux gnu/kfreebsd))
+                        (concat (or (getenv "XDG_DATA_HOME")
+                                    (concat (getenv "HOME") "/.local/share"))
+                                "/fonts/"
+                                all-the-icons-fonts-subdirectory))
+                       ;; Default MacOS install directory
+                       ((eq system-type 'darwin)
+                        (concat (getenv "HOME")
+                                "/Library/Fonts/"
+                                all-the-icons-fonts-subdirectory))))
+           (known-dest? (stringp font-dest))
+           (font-dest (or font-dest (read-directory-name "Font installation directory: " "~/"))))
+
+      (unless (file-directory-p font-dest) (mkdir font-dest t))
+
+      (mapc (lambda (font)
+              (url-copy-file (format url-format font) (expand-file-name font font-dest) t))
+            all-the-icons-font-names)
+      (when known-dest?
+        (message "Fonts downloaded, updating font cache... <fc-cache -f -v> ")
+        (shell-command-to-string (format "fc-cache -f -v")))
+      (message "%s Successfully %s `all-the-icons' fonts to `%s'!"
+               (all-the-icons-wicon "stars" :v-adjust 0.0)
+               (if known-dest? "installed" "downloaded")
+               font-dest))))
+
+;;;###autoload
+(defun all-the-icons-insert (&optional arg family)
+  "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."
+  (interactive "P")
+  (let* ((standard-output (current-buffer))
+         (candidates (if family
+                         (all-the-icons--read-candidates-for-family family)
+                       (all-the-icons--read-candidates)))
+         (prompt     (if family
+                         (format "%s Icon: " (funcall (all-the-icons--family-name family)))
+                       "Icon : "))
+
+         (selection (completing-read prompt candidates nil t))
+         (result    (cdr (assoc selection candidates))))
+
+    (if arg (prin1 result) (insert result))))
+
+;; Debug Helpers
+
+(defun all-the-icons-insert-icons-for (family &optional height duration)
+  "Insert all of the available icons associated with FAMILY.
+If a HEIGHT is provided it will render the icons at this height.
+This is useful both to see the icons more clearly and to test
+different height rendering.  If DURATION is provided, it will
+pause for DURATION seconds between printing each character."
+  (let* ((data-f    (all-the-icons--data-name family))
+         (insert-f  (all-the-icons--function-name family))
+
+         (height (or height 2.0))
+         (data (funcall data-f)))
+    (mapc
+     (lambda (it)
+       (insert (format "%s - %s\n" (funcall insert-f (car it) :height height) (car it)))
+       (when duration (sit-for duration)))
+     data)))
+
+(defmacro all-the-icons-define-icon (name alist family &optional font-name)
+  "Macro to generate functions for inserting icons for icon set NAME.
+
+NAME defines is the name of the iconset and will produce a
+function of the for `all-the-icons-NAME'.
+
+ALIST is the alist containing maps between icon names and the
+UniCode for the character.  All of these can be found in the data
+directory of this package.
+
+FAMILY is the font family to use for the icons.
+FONT-NAME is the name of the .ttf file providing the font, defaults to FAMILY."
+  `(progn
+     (add-to-list 'all-the-icons-font-families (quote ,name))
+     (add-to-list 'all-the-icons-font-names (quote ,(downcase (format "%s.ttf" (or font-name family)))))
+     (defcustom ,(all-the-icons--family-scale-factor name) 1.0
+       ,(format "The additional `height' face property Scale Factor for %s icons."
+                (symbol-name name))
+       :group 'all-the-icons
+       :type 'number)
+     (defcustom ,(all-the-icons--family-adjust name) 0.0
+       ,(format "The additional `raise' display property adjustment for %s icons."
+                (symbol-name name))
+       :group 'all-the-icons
+       :type 'number)
+     (defun ,(all-the-icons--family-name name) () ,family)
+     (defun ,(all-the-icons--data-name name) () ,alist)
+     (defun ,(all-the-icons--function-name name) (icon-name &rest args)
+       (let ((icon (cdr (assoc icon-name ,alist)))
+             (other-face (when all-the-icons-color-icons (plist-get args :face)))
+             (height   (* all-the-icons-scale-factor
+                          ,(all-the-icons--family-scale-factor name)
+                          (or (plist-get args :height) 1.0)))
+             (v-adjust (* all-the-icons-scale-factor ,(all-the-icons--family-scale-factor name)
+                          (+ (or (plist-get args :v-adjust) all-the-icons-default-adjust)
+                             ,(all-the-icons--family-adjust name))))
+             (family ,family))
+         (unless icon
+           (error (format "Unable to find icon with name `%s' in icon set `%s'" icon-name (quote ,name))))
+         (let ((face (if other-face
+                         `(:family ,family :height ,height :inherit ,other-face)
+                       `(:family ,family :height ,height))))
+           (propertize icon
+                       'face face           ;so that this works without `font-lock-mode' enabled
+                       'font-lock-face face ;so that `font-lock-mode' leaves this alone
+                       'display `(raise ,v-adjust)
+                       'rear-nonsticky t))))
+     (defun ,(all-the-icons--insert-function-name name) (&optional arg)
+       ,(format "Insert a %s icon at point." family)
+       (interactive "P")
+       (all-the-icons-insert arg (quote ,name)))))
+
+(all-the-icons-define-icon alltheicon all-the-icons-data/alltheicons-alist    "all-the-icons")
+(all-the-icons-define-icon fileicon   all-the-icons-data/file-icon-alist      "file-icons")
+(all-the-icons-define-icon faicon     all-the-icons-data/fa-icon-alist        "FontAwesome")
+(all-the-icons-define-icon octicon    all-the-icons-data/octicons-alist       "github-octicons" "octicons")
+(all-the-icons-define-icon wicon      all-the-icons-data/weather-icons-alist  "Weather Icons"   "weathericons")
+(all-the-icons-define-icon material   all-the-icons-data/material-icons-alist "Material Icons"  "material-design-icons")
+
+(provide 'all-the-icons)
+
+;;; all-the-icons.el ends here
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons.elc b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons.elc
new file mode 100644
index 0000000..9f6ce80
Binary files /dev/null and b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/all-the-icons.elc differ
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-alltheicons.el b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-alltheicons.el
new file mode 100644
index 0000000..e5446a5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-alltheicons.el
@@ -0,0 +1,72 @@
+;; -*- lexical-binding: t -*-
+
+(defvar all-the-icons-data/alltheicons-alist
+  '(
+
+    ( "apache"             . "\xe909" )
+    ( "atom"               . "\xe917" )
+    ( "aws"                . "\xe90c" )
+    ( "bower"              . "\xe918" )
+    ( "c"                  . "\xe915" )
+    ( "c-line"             . "\xe90f" )
+    ( "clojure"            . "\xe919" )
+    ( "clojure-line"       . "\xe91a" )
+    ( "coffeescript"       . "\xe914" )
+    ( "cplusplus"          . "\xe913" )
+    ( "cplusplus-line"     . "\xe910" )
+    ( "csharp"             . "\xe911" )
+    ( "csharp-line"        . "\xe912" )
+    ( "css3"               . "\xe91b" )
+    ( "css3-alt"           . "\xe91c" )
+    ( "d3"                 . "\xe90e" )
+    ( "dlang"              . "\xe935" )
+    ( "elixir"             . "\xe936" )
+    ( "erlang"             . "\xe934" )
+    ( "git"                . "\xe907" )
+    ( "go"                 . "\xe91d" )
+    ( "google-drive"       . "\xe91e" )
+    ( "grunt"              . "\xe90d" )
+    ( "grunt-line"         . "\xe91f" )
+    ( "gulp"               . "\xe920" )
+    ( "haskell"            . "\xe921" )
+    ( "html5"              . "\xe932" )
+    ( "jasmine"            . "\xe904" )
+    ( "java"               . "\xe922" )
+    ( "javascript"         . "\xe906" )
+    ( "javascript-badge"   . "\xe923" )
+    ( "javascript-shield"  . "\xe924" )
+    ( "less"               . "\xe90b" )
+    ( "nginx"              . "\xe933" )
+    ( "nodejs"             . "\xe925" )
+    ( "perl"               . "\xe905" )
+    ( "perldocs"           . "\xe926" )
+    ( "postgresql"         . "\xe938" )
+    ( "prolog"             . "\xe927" )
+    ( "python"             . "\xe928" )
+    ( "react"              . "\xe929" )
+    ( "ruby"               . "\xe92a" )
+    ( "ruby-alt"           . "\xe92b" )
+    ( "rust"               . "\xe92c" )
+    ( "sass"               . "\xe92d" )
+    ( "scala"              . "\xe908" )
+    ( "script"             . "\xe90a" )
+    ( "spring"             . "\xe937" )
+    ( "stylus"             . "\xe92e" )
+    ( "svg"                . "\xe903" )
+    ( "swift"              . "\xe92f" )
+    ( "terminal"           . "\xe930" )
+    ( "terminal-alt"       . "\xe931" )
+    ( "battery-charging"   . "\xe939" )
+
+    ( "arrow-left"  . "\xe93a" )
+    ( "arrow-right" . "\xe93b" )
+    ( "cup-left"    . "\xe93c" )
+    ( "cup-right"   . "\xe93d" )
+    ( "slant-left"  . "\xe93e" )
+    ( "slant-right" . "\xe93f" )
+    ( "wave-left"   . "\xe940" )
+    ( "wave-right"  . "\xe941" )
+
+    ))
+
+(provide 'data-alltheicons)
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-alltheicons.elc b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-alltheicons.elc
new file mode 100644
index 0000000..455031d
Binary files /dev/null and b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-alltheicons.elc differ
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-faicons.el b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-faicons.el
new file mode 100644
index 0000000..eb56602
--- /dev/null
+++ b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-faicons.el
@@ -0,0 +1,643 @@
+;; -*- lexical-binding: t -*-
+
+(defvar all-the-icons-data/fa-icon-alist
+  '(
+
+    ("500px" . "\xf26e")
+    ("adjust" . "\xf042")
+    ("adn" . "\xf170")
+    ("align-center" . "\xf037")
+    ("align-justify" . "\xf039")
+    ("align-left" . "\xf036")
+    ("align-right" . "\xf038")
+    ("amazon" . "\xf270")
+    ("ambulance" . "\xf0f9")
+    ("american-sign-language-interpreting" . "\xf2a3")
+    ("anchor" . "\xf13d")
+    ("android" . "\xf17b")
+    ("angellist" . "\xf209")
+    ("angle-double-down" . "\xf103")
+    ("angle-double-left" . "\xf100")
+    ("angle-double-right" . "\xf101")
+    ("angle-double-up" . "\xf102")
+    ("angle-down" . "\xf107")
+    ("angle-left" . "\xf104")
+    ("angle-right" . "\xf105")
+    ("angle-up" . "\xf106")
+    ("apple" . "\xf179")
+    ("archive" . "\xf187")
+    ("area-chart" . "\xf1fe")
+    ("arrow-circle-down" . "\xf0ab")
+    ("arrow-circle-left" . "\xf0a8")
+    ("arrow-circle-o-down" . "\xf01a")
+    ("arrow-circle-o-left" . "\xf190")
+    ("arrow-circle-o-right" . "\xf18e")
+    ("arrow-circle-o-up" . "\xf01b")
+    ("arrow-circle-right" . "\xf0a9")
+    ("arrow-circle-up" . "\xf0aa")
+    ("arrow-down" . "\xf063")
+    ("arrow-left" . "\xf060")
+    ("arrow-right" . "\xf061")
+    ("arrow-up" . "\xf062")
+    ("arrows" . "\xf047")
+    ("arrows-alt" . "\xf0b2")
+    ("arrows-h" . "\xf07e")
+    ("arrows-v" . "\xf07d")
+    ("assistive-listening-systems" . "\xf2a2")
+    ("asterisk" . "\xf069")
+    ("at" . "\xf1fa")
+    ("audio-description" . "\xf29e")
+    ("backward" . "\xf04a")
+    ("balance-scale" . "\xf24e")
+    ("ban" . "\xf05e")
+    ("bar-chart" . "\xf080")
+    ("barcode" . "\xf02a")
+    ("bars" . "\xf0c9")
+    ("battery-empty" . "\xf244")
+    ("battery-full" . "\xf240")
+    ("battery-half" . "\xf242")
+    ("battery-quarter" . "\xf243")
+    ("battery-three-quarters" . "\xf241")
+    ("bed" . "\xf236")
+    ("beer" . "\xf0fc")
+    ("behance" . "\xf1b4")
+    ("behance-square" . "\xf1b5")
+    ("bell" . "\xf0f3")
+    ("bell-o" . "\xf0a2")
+    ("bell-slash" . "\xf1f6")
+    ("bell-slash-o" . "\xf1f7")
+    ("bicycle" . "\xf206")
+    ("binoculars" . "\xf1e5")
+    ("birthday-cake" . "\xf1fd")
+    ("bitbucket" . "\xf171")
+    ("bitbucket-square" . "\xf172")
+    ("black-tie" . "\xf27e")
+    ("blind" . "\xf29d")
+    ("bluetooth" . "\xf293")
+    ("bluetooth-b" . "\xf294")
+    ("bold" . "\xf032")
+    ("bolt" . "\xf0e7")
+    ("bomb" . "\xf1e2")
+    ("book" . "\xf02d")
+    ("bookmark" . "\xf02e")
+    ("bookmark-o" . "\xf097")
+    ("braille" . "\xf2a1")
+    ("briefcase" . "\xf0b1")
+    ("btc" . "\xf15a")
+    ("bug" . "\xf188")
+    ("building" . "\xf1ad")
+    ("building-o" . "\xf0f7")
+    ("bullhorn" . "\xf0a1")
+    ("bullseye" . "\xf140")
+    ("bus" . "\xf207")
+    ("buysellads" . "\xf20d")
+    ("calculator" . "\xf1ec")
+    ("calendar" . "\xf073")
+    ("calendar-check-o" . "\xf274")
+    ("calendar-minus-o" . "\xf272")
+    ("calendar-o" . "\xf133")
+    ("calendar-plus-o" . "\xf271")
+    ("calendar-times-o" . "\xf273")
+    ("camera" . "\xf030")
+    ("camera-retro" . "\xf083")
+    ("car" . "\xf1b9")
+    ("caret-down" . "\xf0d7")
+    ("caret-left" . "\xf0d9")
+    ("caret-right" . "\xf0da")
+    ("caret-square-o-down" . "\xf150")
+    ("caret-square-o-left" . "\xf191")
+    ("caret-square-o-right" . "\xf152")
+    ("caret-square-o-up" . "\xf151")
+    ("caret-up" . "\xf0d8")
+    ("cart-arrow-down" . "\xf218")
+    ("cart-plus" . "\xf217")
+    ("cc" . "\xf20a")
+    ("cc-amex" . "\xf1f3")
+    ("cc-diners-club" . "\xf24c")
+    ("cc-discover" . "\xf1f2")
+    ("cc-jcb" . "\xf24b")
+    ("cc-mastercard" . "\xf1f1")
+    ("cc-paypal" . "\xf1f4")
+    ("cc-stripe" . "\xf1f5")
+    ("cc-visa" . "\xf1f0")
+    ("certificate" . "\xf0a3")
+    ("chain-broken" . "\xf127")
+    ("check" . "\xf00c")
+    ("check-circle" . "\xf058")
+    ("check-circle-o" . "\xf05d")
+    ("check-square" . "\xf14a")
+    ("check-square-o" . "\xf046")
+    ("chevron-circle-down" . "\xf13a")
+    ("chevron-circle-left" . "\xf137")
+    ("chevron-circle-right" . "\xf138")
+    ("chevron-circle-up" . "\xf139")
+    ("chevron-down" . "\xf078")
+    ("chevron-left" . "\xf053")
+    ("chevron-right" . "\xf054")
+    ("chevron-up" . "\xf077")
+    ("child" . "\xf1ae")
+    ("chrome" . "\xf268")
+    ("circle" . "\xf111")
+    ("circle-o" . "\xf10c")
+    ("circle-o-notch" . "\xf1ce")
+    ("circle-thin" . "\xf1db")
+    ("clipboard" . "\xf0ea")
+    ("clock-o" . "\xf017")
+    ("clone" . "\xf24d")
+    ("cloud" . "\xf0c2")
+    ("cloud-download" . "\xf0ed")
+    ("cloud-upload" . "\xf0ee")
+    ("code" . "\xf121")
+    ("code-fork" . "\xf126")
+    ("codepen" . "\xf1cb")
+    ("codiepie" . "\xf284")
+    ("coffee" . "\xf0f4")
+    ("cog" . "\xf013")
+    ("cogs" . "\xf085")
+    ("columns" . "\xf0db")
+    ("comment" . "\xf075")
+    ("comment-o" . "\xf0e5")
+    ("commenting" . "\xf27a")
+    ("commenting-o" . "\xf27b")
+    ("comments" . "\xf086")
+    ("comments-o" . "\xf0e6")
+    ("compass" . "\xf14e")
+    ("compress" . "\xf066")
+    ("connectdevelop" . "\xf20e")
+    ("contao" . "\xf26d")
+    ("copyright" . "\xf1f9")
+    ("creative-commons" . "\xf25e")
+    ("credit-card" . "\xf09d")
+    ("credit-card-alt" . "\xf283")
+    ("crop" . "\xf125")
+    ("crosshairs" . "\xf05b")
+    ("css3" . "\xf13c")
+    ("cube" . "\xf1b2")
+    ("cubes" . "\xf1b3")
+    ("cutlery" . "\xf0f5")
+    ("dashcube" . "\xf210")
+    ("database" . "\xf1c0")
+    ("deaf" . "\xf2a4")
+    ("delicious" . "\xf1a5")
+    ("desktop" . "\xf108")
+    ("deviantart" . "\xf1bd")
+    ("diamond" . "\xf219")
+    ("digg" . "\xf1a6")
+    ("dot-circle-o" . "\xf192")
+    ("download" . "\xf019")
+    ("dribbble" . "\xf17d")
+    ("dropbox" . "\xf16b")
+    ("drupal" . "\xf1a9")
+    ("edge" . "\xf282")
+    ("eject" . "\xf052")
+    ("ellipsis-h" . "\xf141")
+    ("ellipsis-v" . "\xf142")
+    ("empire" . "\xf1d1")
+    ("envelope" . "\xf0e0")
+    ("envelope-o" . "\xf003")
+    ("envelope-square" . "\xf199")
+    ("envira" . "\xf299")
+    ("eraser" . "\xf12d")
+    ("eur" . "\xf153")
+    ("exchange" . "\xf0ec")
+    ("exclamation" . "\xf12a")
+    ("exclamation-circle" . "\xf06a")
+    ("exclamation-triangle" . "\xf071")
+    ("expand" . "\xf065")
+    ("expeditedssl" . "\xf23e")
+    ("external-link" . "\xf08e")
+    ("external-link-square" . "\xf14c")
+    ("eye" . "\xf06e")
+    ("eye-slash" . "\xf070")
+    ("eyedropper" . "\xf1fb")
+    ("facebook" . "\xf09a")
+    ("facebook-official" . "\xf230")
+    ("facebook-square" . "\xf082")
+    ("fast-backward" . "\xf049")
+    ("fast-forward" . "\xf050")
+    ("fax" . "\xf1ac")
+    ("female" . "\xf182")
+    ("fighter-jet" . "\xf0fb")
+    ("file" . "\xf15b")
+    ("file-archive-o" . "\xf1c6")
+    ("file-audio-o" . "\xf1c7")
+    ("file-code-o" . "\xf1c9")
+    ("file-excel-o" . "\xf1c3")
+    ("file-image-o" . "\xf1c5")
+    ("file-o" . "\xf016")
+    ("file-pdf-o" . "\xf1c1")
+    ("file-powerpoint-o" . "\xf1c4")
+    ("file-text" . "\xf15c")
+    ("file-text-o" . "\xf0f6")
+    ("file-video-o" . "\xf1c8")
+    ("file-word-o" . "\xf1c2")
+    ("files-o" . "\xf0c5")
+    ("film" . "\xf008")
+    ("filter" . "\xf0b0")
+    ("fire" . "\xf06d")
+    ("fire-extinguisher" . "\xf134")
+    ("firefox" . "\xf269")
+    ("first-order" . "\xf2b0")
+    ("flag" . "\xf024")
+    ("flag-checkered" . "\xf11e")
+    ("flag-o" . "\xf11d")
+    ("flask" . "\xf0c3")
+    ("flickr" . "\xf16e")
+    ("floppy-o" . "\xf0c7")
+    ("folder" . "\xf07b")
+    ("folder-o" . "\xf114")
+    ("folder-open" . "\xf07c")
+    ("folder-open-o" . "\xf115")
+    ("font" . "\xf031")
+    ("font-awesome" . "\xf2b4")
+    ("fonticons" . "\xf280")
+    ("fort-awesome" . "\xf286")
+    ("forumbee" . "\xf211")
+    ("forward" . "\xf04e")
+    ("foursquare" . "\xf180")
+    ("frown-o" . "\xf119")
+    ("futbol-o" . "\xf1e3")
+    ("gamepad" . "\xf11b")
+    ("gavel" . "\xf0e3")
+    ("gbp" . "\xf154")
+    ("genderless" . "\xf22d")
+    ("get-pocket" . "\xf265")
+    ("gg" . "\xf260")
+    ("gg-circle" . "\xf261")
+    ("gift" . "\xf06b")
+    ("git" . "\xf1d3")
+    ("git-square" . "\xf1d2")
+    ("github" . "\xf09b")
+    ("github-alt" . "\xf113")
+    ("github-square" . "\xf092")
+    ("gitlab" . "\xf296")
+    ("glass" . "\xf000")
+    ("glide" . "\xf2a5")
+    ("glide-g" . "\xf2a6")
+    ("globe" . "\xf0ac")
+    ("google" . "\xf1a0")
+    ("google-plus" . "\xf0d5")
+    ("google-plus-official" . "\xf2b3")
+    ("google-plus-square" . "\xf0d4")
+    ("google-wallet" . "\xf1ee")
+    ("graduation-cap" . "\xf19d")
+    ("gratipay" . "\xf184")
+    ("h-square" . "\xf0fd")
+    ("hacker-news" . "\xf1d4")
+    ("hand-lizard-o" . "\xf258")
+    ("hand-o-down" . "\xf0a7")
+    ("hand-o-left" . "\xf0a5")
+    ("hand-o-right" . "\xf0a4")
+    ("hand-o-up" . "\xf0a6")
+    ("hand-paper-o" . "\xf256")
+    ("hand-peace-o" . "\xf25b")
+    ("hand-pointer-o" . "\xf25a")
+    ("hand-rock-o" . "\xf255")
+    ("hand-scissors-o" . "\xf257")
+    ("hand-spock-o" . "\xf259")
+    ("hashtag" . "\xf292")
+    ("hdd-o" . "\xf0a0")
+    ("header" . "\xf1dc")
+    ("headphones" . "\xf025")
+    ("heart" . "\xf004")
+    ("heart-o" . "\xf08a")
+    ("heartbeat" . "\xf21e")
+    ("history" . "\xf1da")
+    ("home" . "\xf015")
+    ("hospital-o" . "\xf0f8")
+    ("hourglass" . "\xf254")
+    ("hourglass-end" . "\xf253")
+    ("hourglass-half" . "\xf252")
+    ("hourglass-o" . "\xf250")
+    ("hourglass-start" . "\xf251")
+    ("houzz" . "\xf27c")
+    ("html5" . "\xf13b")
+    ("i-cursor" . "\xf246")
+    ("ils" . "\xf20b")
+    ("inbox" . "\xf01c")
+    ("indent" . "\xf03c")
+    ("industry" . "\xf275")
+    ("info" . "\xf129")
+    ("info-circle" . "\xf05a")
+    ("inr" . "\xf156")
+    ("instagram" . "\xf16d")
+    ("internet-explorer" . "\xf26b")
+    ("ioxhost" . "\xf208")
+    ("italic" . "\xf033")
+    ("joomla" . "\xf1aa")
+    ("jpy" . "\xf157")
+    ("jsfiddle" . "\xf1cc")
+    ("key" . "\xf084")
+    ("keyboard-o" . "\xf11c")
+    ("krw" . "\xf159")
+    ("language" . "\xf1ab")
+    ("laptop" . "\xf109")
+    ("lastfm" . "\xf202")
+    ("lastfm-square" . "\xf203")
+    ("leaf" . "\xf06c")
+    ("leanpub" . "\xf212")
+    ("lemon-o" . "\xf094")
+    ("level-down" . "\xf149")
+    ("level-up" . "\xf148")
+    ("life-ring" . "\xf1cd")
+    ("lightbulb-o" . "\xf0eb")
+    ("line-chart" . "\xf201")
+    ("link" . "\xf0c1")
+    ("linkedin" . "\xf0e1")
+    ("linkedin-square" . "\xf08c")
+    ("linux" . "\xf17c")
+    ("list" . "\xf03a")
+    ("list-alt" . "\xf022")
+    ("list-ol" . "\xf0cb")
+    ("list-ul" . "\xf0ca")
+    ("location-arrow" . "\xf124")
+    ("lock" . "\xf023")
+    ("long-arrow-down" . "\xf175")
+    ("long-arrow-left" . "\xf177")
+    ("long-arrow-right" . "\xf178")
+    ("long-arrow-up" . "\xf176")
+    ("low-vision" . "\xf2a8")
+    ("magic" . "\xf0d0")
+    ("magnet" . "\xf076")
+    ("male" . "\xf183")
+    ("map" . "\xf279")
+    ("map-marker" . "\xf041")
+    ("map-o" . "\xf278")
+    ("map-pin" . "\xf276")
+    ("map-signs" . "\xf277")
+    ("mars" . "\xf222")
+    ("mars-double" . "\xf227")
+    ("mars-stroke" . "\xf229")
+    ("mars-stroke-h" . "\xf22b")
+    ("mars-stroke-v" . "\xf22a")
+    ("maxcdn" . "\xf136")
+    ("meanpath" . "\xf20c")
+    ("medium" . "\xf23a")
+    ("medkit" . "\xf0fa")
+    ("meh-o" . "\xf11a")
+    ("mercury" . "\xf223")
+    ("microphone" . "\xf130")
+    ("microphone-slash" . "\xf131")
+    ("minus" . "\xf068")
+    ("minus-circle" . "\xf056")
+    ("minus-square" . "\xf146")
+    ("minus-square-o" . "\xf147")
+    ("mixcloud" . "\xf289")
+    ("mobile" . "\xf10b")
+    ("modx" . "\xf285")
+    ("money" . "\xf0d6")
+    ("moon-o" . "\xf186")
+    ("motorcycle" . "\xf21c")
+    ("mouse-pointer" . "\xf245")
+    ("music" . "\xf001")
+    ("neuter" . "\xf22c")
+    ("newspaper-o" . "\xf1ea")
+    ("object-group" . "\xf247")
+    ("object-ungroup" . "\xf248")
+    ("odnoklassniki" . "\xf263")
+    ("odnoklassniki-square" . "\xf264")
+    ("opencart" . "\xf23d")
+    ("openid" . "\xf19b")
+    ("opera" . "\xf26a")
+    ("optin-monster" . "\xf23c")
+    ("outdent" . "\xf03b")
+    ("pagelines" . "\xf18c")
+    ("paint-brush" . "\xf1fc")
+    ("paper-plane" . "\xf1d8")
+    ("paper-plane-o" . "\xf1d9")
+    ("paperclip" . "\xf0c6")
+    ("paragraph" . "\xf1dd")
+    ("pause" . "\xf04c")
+    ("pause-circle" . "\xf28b")
+    ("pause-circle-o" . "\xf28c")
+    ("paw" . "\xf1b0")
+    ("paypal" . "\xf1ed")
+    ("pencil" . "\xf040")
+    ("pencil-square" . "\xf14b")
+    ("pencil-square-o" . "\xf044")
+    ("percent" . "\xf295")
+    ("phone" . "\xf095")
+    ("phone-square" . "\xf098")
+    ("picture-o" . "\xf03e")
+    ("pie-chart" . "\xf200")
+    ("pied-piper" . "\xf2ae")
+    ("pied-piper-alt" . "\xf1a8")
+    ("pied-piper-pp" . "\xf1a7")
+    ("pinterest" . "\xf0d2")
+    ("pinterest-p" . "\xf231")
+    ("pinterest-square" . "\xf0d3")
+    ("plane" . "\xf072")
+    ("play" . "\xf04b")
+    ("play-circle" . "\xf144")
+    ("play-circle-o" . "\xf01d")
+    ("plug" . "\xf1e6")
+    ("plus" . "\xf067")
+    ("plus-circle" . "\xf055")
+    ("plus-square" . "\xf0fe")
+    ("plus-square-o" . "\xf196")
+    ("power-off" . "\xf011")
+    ("print" . "\xf02f")
+    ("product-hunt" . "\xf288")
+    ("puzzle-piece" . "\xf12e")
+    ("qq" . "\xf1d6")
+    ("qrcode" . "\xf029")
+    ("question" . "\xf128")
+    ("question-circle" . "\xf059")
+    ("question-circle-o" . "\xf29c")
+    ("quote-left" . "\xf10d")
+    ("quote-right" . "\xf10e")
+    ("random" . "\xf074")
+    ("rebel" . "\xf1d0")
+    ("recycle" . "\xf1b8")
+    ("reddit" . "\xf1a1")
+    ("reddit-alien" . "\xf281")
+    ("reddit-square" . "\xf1a2")
+    ("refresh" . "\xf021")
+    ("registered" . "\xf25d")
+    ("renren" . "\xf18b")
+    ("repeat" . "\xf01e")
+    ("reply" . "\xf112")
+    ("reply-all" . "\xf122")
+    ("retweet" . "\xf079")
+    ("road" . "\xf018")
+    ("rocket" . "\xf135")
+    ("rss" . "\xf09e")
+    ("rss-square" . "\xf143")
+    ("rub" . "\xf158")
+    ("safari" . "\xf267")
+    ("scissors" . "\xf0c4")
+    ("scribd" . "\xf28a")
+    ("search" . "\xf002")
+    ("search-minus" . "\xf010")
+    ("search-plus" . "\xf00e")
+    ("sellsy" . "\xf213")
+    ("server" . "\xf233")
+    ("share" . "\xf064")
+    ("share-alt" . "\xf1e0")
+    ("share-alt-square" . "\xf1e1")
+    ("share-square" . "\xf14d")
+    ("share-square-o" . "\xf045")
+    ("shield" . "\xf132")
+    ("ship" . "\xf21a")
+    ("shirtsinbulk" . "\xf214")
+    ("shopping-bag" . "\xf290")
+    ("shopping-basket" . "\xf291")
+    ("shopping-cart" . "\xf07a")
+    ("sign-in" . "\xf090")
+    ("sign-language" . "\xf2a7")
+    ("sign-out" . "\xf08b")
+    ("signal" . "\xf012")
+    ("simplybuilt" . "\xf215")
+    ("sitemap" . "\xf0e8")
+    ("skyatlas" . "\xf216")
+    ("skype" . "\xf17e")
+    ("slack" . "\xf198")
+    ("sliders" . "\xf1de")
+    ("slideshare" . "\xf1e7")
+    ("smile-o" . "\xf118")
+    ("snapchat" . "\xf2ab")
+    ("snapchat-ghost" . "\xf2ac")
+    ("snapchat-square" . "\xf2ad")
+    ("sort" . "\xf0dc")
+    ("sort-alpha-asc" . "\xf15d")
+    ("sort-alpha-desc" . "\xf15e")
+    ("sort-amount-asc" . "\xf160")
+    ("sort-amount-desc" . "\xf161")
+    ("sort-asc" . "\xf0de")
+    ("sort-desc" . "\xf0dd")
+    ("sort-numeric-asc" . "\xf162")
+    ("sort-numeric-desc" . "\xf163")
+    ("soundcloud" . "\xf1be")
+    ("space-shuttle" . "\xf197")
+    ("spinner" . "\xf110")
+    ("spoon" . "\xf1b1")
+    ("spotify" . "\xf1bc")
+    ("square" . "\xf0c8")
+    ("square-o" . "\xf096")
+    ("stack-exchange" . "\xf18d")
+    ("stack-overflow" . "\xf16c")
+    ("star" . "\xf005")
+    ("star-half" . "\xf089")
+    ("star-half-o" . "\xf123")
+    ("star-o" . "\xf006")
+    ("steam" . "\xf1b6")
+    ("steam-square" . "\xf1b7")
+    ("step-backward" . "\xf048")
+    ("step-forward" . "\xf051")
+    ("stethoscope" . "\xf0f1")
+    ("sticky-note" . "\xf249")
+    ("sticky-note-o" . "\xf24a")
+    ("stop" . "\xf04d")
+    ("stop-circle" . "\xf28d")
+    ("stop-circle-o" . "\xf28e")
+    ("street-view" . "\xf21d")
+    ("strikethrough" . "\xf0cc")
+    ("stumbleupon" . "\xf1a4")
+    ("stumbleupon-circle" . "\xf1a3")
+    ("subscript" . "\xf12c")
+    ("subway" . "\xf239")
+    ("suitcase" . "\xf0f2")
+    ("sun-o" . "\xf185")
+    ("superscript" . "\xf12b")
+    ("table" . "\xf0ce")
+    ("tablet" . "\xf10a")
+    ("tachometer" . "\xf0e4")
+    ("tag" . "\xf02b")
+    ("tags" . "\xf02c")
+    ("tasks" . "\xf0ae")
+    ("taxi" . "\xf1ba")
+    ("television" . "\xf26c")
+    ("tencent-weibo" . "\xf1d5")
+    ("terminal" . "\xf120")
+    ("text-height" . "\xf034")
+    ("text-width" . "\xf035")
+    ("th" . "\xf00a")
+    ("th-large" . "\xf009")
+    ("th-list" . "\xf00b")
+    ("themeisle" . "\xf2b2")
+    ("thumb-tack" . "\xf08d")
+    ("thumbs-down" . "\xf165")
+    ("thumbs-o-down" . "\xf088")
+    ("thumbs-o-up" . "\xf087")
+    ("thumbs-up" . "\xf164")
+    ("ticket" . "\xf145")
+    ("times" . "\xf00d")
+    ("times-circle" . "\xf057")
+    ("times-circle-o" . "\xf05c")
+    ("tint" . "\xf043")
+    ("toggle-off" . "\xf204")
+    ("toggle-on" . "\xf205")
+    ("trademark" . "\xf25c")
+    ("train" . "\xf238")
+    ("transgender" . "\xf224")
+    ("transgender-alt" . "\xf225")
+    ("trash" . "\xf1f8")
+    ("trash-o" . "\xf014")
+    ("tree" . "\xf1bb")
+    ("trello" . "\xf181")
+    ("tripadvisor" . "\xf262")
+    ("trophy" . "\xf091")
+    ("truck" . "\xf0d1")
+    ("try" . "\xf195")
+    ("tty" . "\xf1e4")
+    ("tumblr" . "\xf173")
+    ("tumblr-square" . "\xf174")
+    ("twitch" . "\xf1e8")
+    ("twitter" . "\xf099")
+    ("twitter-square" . "\xf081")
+    ("umbrella" . "\xf0e9")
+    ("underline" . "\xf0cd")
+    ("undo" . "\xf0e2")
+    ("universal-access" . "\xf29a")
+    ("university" . "\xf19c")
+    ("unlock" . "\xf09c")
+    ("unlock-alt" . "\xf13e")
+    ("upload" . "\xf093")
+    ("usb" . "\xf287")
+    ("usd" . "\xf155")
+    ("user" . "\xf007")
+    ("user-md" . "\xf0f0")
+    ("user-plus" . "\xf234")
+    ("user-secret" . "\xf21b")
+    ("user-times" . "\xf235")
+    ("users" . "\xf0c0")
+    ("venus" . "\xf221")
+    ("venus-double" . "\xf226")
+    ("venus-mars" . "\xf228")
+    ("viacoin" . "\xf237")
+    ("viadeo" . "\xf2a9")
+    ("viadeo-square" . "\xf2aa")
+    ("video-camera" . "\xf03d")
+    ("vimeo" . "\xf27d")
+    ("vimeo-square" . "\xf194")
+    ("vine" . "\xf1ca")
+    ("vk" . "\xf189")
+    ("volume-control-phone" . "\xf2a0")
+    ("volume-down" . "\xf027")
+    ("volume-off" . "\xf026")
+    ("volume-up" . "\xf028")
+    ("weibo" . "\xf18a")
+    ("weixin" . "\xf1d7")
+    ("whatsapp" . "\xf232")
+    ("wheelchair" . "\xf193")
+    ("wheelchair-alt" . "\xf29b")
+    ("wifi" . "\xf1eb")
+    ("wikipedia-w" . "\xf266")
+    ("windows" . "\xf17a")
+    ("wordpress" . "\xf19a")
+    ("wpbeginner" . "\xf297")
+    ("wpforms" . "\xf298")
+    ("wrench" . "\xf0ad")
+    ("xing" . "\xf168")
+    ("xing-square" . "\xf169")
+    ("y-combinator" . "\xf23b")
+    ("yahoo" . "\xf19e")
+    ("yelp" . "\xf1e9")
+    ("yoast" . "\xf2b1")
+    ("youtube" . "\xf167")
+    ("youtube-play" . "\xf16a")
+    ("youtube-square" . "\xf166")
+
+    ))
+
+(provide 'data-faicons)
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-faicons.elc b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-faicons.elc
new file mode 100644
index 0000000..15f32c4
Binary files /dev/null and b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-faicons.elc differ
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-fileicons.el b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-fileicons.el
new file mode 100644
index 0000000..f5d09a4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-fileicons.el
@@ -0,0 +1,504 @@
+;; -*- lexical-binding: t -*-
+
+(defvar all-the-icons-data/file-icon-alist
+  '(
+
+    ( "1c" . "\xa5ea" )
+    ( "1c-alt" . "\xea28" )
+    ( "MJML" . "\xea6f" )
+    ( "R" . "\xe905" )
+    ( "abap" . "\xe92b" )
+    ( "abif" . "\xea4e" )
+    ( "access" . "\xe9ea" )
+    ( "actionscript" . "\xe92e" )
+    ( "ada" . "\xe90b" )
+    ( "ae" . "\xe9f3" )
+    ( "ai" . "\xe6b4" )
+    ( "akka" . "\xea0e" )
+    ( "alex" . "\x29cb" )
+    ( "alloy" . "\xe935" )
+    ( "alpine-linux" . "\xe9ff" )
+    ( "ampl" . "\xe94e" )
+    ( "amx" . "\xe99b" )
+    ( "angelscript" . "\xea5b" )
+    ( "ansible" . "\x24b6" )
+    ( "ansible-alt" . "\x61" )
+    ( "ant" . "\xe93e" )
+    ( "antlr" . "\xe92c" )
+    ( "antwar" . "\x2591" )
+    ( "api-blueprint" . "\xe92d" )
+    ( "apl" . "\x234b" )
+    ( "apl-old" . "\xe909" )
+    ( "apple" . "\xe925" )
+    ( "appveyor" . "\xe923" )
+    ( "arc" . "\xe92f" )
+    ( "arch-linux" . "\x41" )
+    ( "arduino" . "\xe930" )
+    ( "arttext" . "\x24d0" )
+    ( "asciidoc" . "\xe918" )
+    ( "assembly" . "\xEB4F" )
+    ( "ats" . "\xe934" )
+    ( "audacity" . "\xe9f9" )
+    ( "augeas" . "\xe931" )
+    ( "aurelia" . "\xea48" )
+    ( "auto-hotkey" . "\xe932" )
+    ( "autoit" . "\xe933" )
+    ( "babel" . "\xe91f" )
+    ( "bazel" . "\xea5a" )
+    ( "bem" . "\xea59" )
+    ( "bib" . "\xe601" )
+    ( "bintray" . "\xea6e" )
+    ( "bithound" . "\xea2a" )
+    ( "blender" . "\xe9fa" )
+    ( "bluespec" . "\xe93c" )
+    ( "boo" . "\xe939" )
+    ( "brain" . "\xe93a" )
+    ( "brakeman" . "\xe9d6" )
+    ( "bro" . "\xe93b" )
+    ( "broccoli" . "\xe922" )
+    ( "brotli" . "\xea6c" )
+    ( "browserslist" . "\xea80" )
+    ( "brunch" . "\xea47" )
+    ( "buck" . "\xea46" )
+    ( "build-boot" . "\xf103" )
+    ( "bundler" . "\xea45" )
+    ( "byond" . "\xe962" )
+    ( "cabal" . "\xe9c2" )
+    ( "caddy" . "\xea58" )
+    ( "cake" . "\xe9e3" )
+    ( "cakefile" . "\xe924" )
+    ( "cakephp" . "\xea43" )
+    ( "cakephp-old" . "\xe9d3" )
+    ( "cc" . "\xe9d5" )
+    ( "ceylon" . "\xe94f" )
+    ( "chai" . "\x63" )
+    ( "chapel" . "\xe950" )
+    ( "chartjs" . "\xea0b" )
+    ( "chef" . "\xea42" )
+    ( "chuck" . "\xe943" )
+    ( "circle-ci" . "\xea12" )
+    ( "cirru" . "\xe951" )
+    ( "ckeditor" . "\xea0c" )
+    ( "clarion" . "\xe952" )
+    ( "clean" . "\xe95b" )
+    ( "click" . "\xe95c" )
+    ( "clips" . "\xe940" )
+    ( "clj" . "\xf105" )
+    ( "cljs" . "\xf104" )
+    ( "closure-template" . "\xea82" )
+    ( "cmake" . "\xe93f" )
+    ( "cobol" . "\xea44" )
+    ( "codecov" . "\x2602" )
+    ( "codekit" . "\xea41" )
+    ( "codemirror" . "\xea0d" )
+    ( "codeship" . "\xea6a" )
+    ( "cold-fusion" . "\xe929" )
+    ( "clisp" . "\xe972" )
+    ( "composer" . "\xe683" )
+    ( "config" . "\xf07c" )
+    ( "config-coffeescript" . "\xeb18" )
+    ( "config-go" . "\xeb12" )
+    ( "config-haskell" . "\xeb14" )
+    ( "config-js" . "\xeb1a" )
+    ( "config-perl" . "\xeb19" )
+    ( "config-python" . "\xeb15" )
+    ( "config-react" . "\xeb16" )
+    ( "config-ruby" . "\xeb17" )
+    ( "config-rust" . "\xeb13" )
+    ( "config-typescript" . "\xeb1b" )
+    ( "coq" . "\xe95f" )
+    ( "cordova" . "\xea11" )
+    ( "cp" . "\xe942" )
+    ( "cpan" . "\xea87" )
+    ( "creole" . "\xe95e" )
+    ( "crystal" . "\xe902" )
+    ( "cs-script" . "\xe9e2" )
+    ( "csound" . "\xe9f0" )
+    ( "cucumber" . "\xf02b" )
+    ( "cython" . "\xe963" )
+    ( "d3" . "\xea10" )
+    ( "darcs" . "\xe964" )
+    ( "dart" . "\xe698" )
+    ( "dashboard" . "\xf07d" )
+    ( "dbase" . "\xe9f1" )
+    ( "default" . "\x1f5cc" )
+    ( "delphi" . "\xea40" )
+    ( "devicetree" . "\xea57" )
+    ( "diff" . "\xe960" )
+    ( "dockerfile" . "\xf106" )
+    ( "doclets" . "\xea3f" )
+    ( "doge" . "\xe946" )
+    ( "dom" . "\xea71" )
+    ( "donejs" . "\x1f3c1" )
+    ( "doxygen" . "\xe928" )
+    ( "dragula" . "\x1f44c" )
+    ( "drone" . "\xea3d" )
+    ( "dyalog" . "\xe90c" )
+    ( "dylib" . "\xea15" )
+    ( "e" . "\x45" )
+    ( "eagle" . "\xe965" )
+    ( "easybuild" . "\xea85" )
+    ( "ec" . "\xe9c9" )
+    ( "ecere" . "\xe966" )
+    ( "edge" . "\xea78" )
+    ( "editorconfig" . "\xea1b" )
+    ( "eiffel" . "\xe967" )
+    ( "ejs" . "\xea4b" )
+    ( "electron" . "\xea27" )
+    ( "elm" . "\xf102" )
+    ( "emacs" . "\xe926" )
+    ( "elisp" . "\xe926" )
+    ( "ember" . "\xe61b" )
+    ( "emberscript" . "\xe968" )
+    ( "eq" . "\xea0a" )
+    ( "esdoc" . "\xea5c" )
+    ( "eslint" . "\xea0f" )
+    ( "eslint-old" . "\xe90e" )
+    ( "excel" . "\xe9ee" )
+    ( "fabfile" . "\xe94b" )
+    ( "factor" . "\xe96a" )
+    ( "fancy" . "\xe96b" )
+    ( "fantom" . "\xe96f" )
+    ( "fbx" . "\xe9fc" )
+    ( "ffmpeg" . "\xea22" )
+    ( "finder" . "\xe9e9" )
+    ( "firebase" . "\xea7f" )
+    ( "flow" . "\xe921" )
+    ( "flux" . "\xe969" )
+    ( "font" . "\xe90f" )
+    ( "fontforge" . "\xfb00" )
+    ( "fortran" . "\xe90a" )
+    ( "franca" . "\xea56" )
+    ( "freemarker" . "\xe970" )
+    ( "frege" . "\xe96e" )
+    ( "fsharp" . "\xe6a7" )
+    ( "fuel-ux" . "\xea09" )
+    ( "gams" . "\xe973" )
+    ( "gap" . "\xe971" )
+    ( "gdb" . "\xea08" )
+    ( "genshi" . "\xe976" )
+    ( "gentoo" . "\xe96d" )
+    ( "gf" . "\xe978" )
+    ( "gitlab" . "\xea3c" )
+    ( "glade" . "\xe938" )
+    ( "glyphs" . "\x47" )
+    ( "gn" . "\xea25" )
+    ( "gnu" . "\xe679" )
+    ( "go" . "\xeaae" )
+    ( "godot" . "\xe974" )
+    ( "golo" . "\xe979" )
+    ( "gosu" . "\xe97a" )
+    ( "gradle" . "\xe903" )
+    ( "graphql" . "\xe97c" )
+    ( "graphviz" . "\xe97d" )
+    ( "groovy" . "\xe904" )
+    ( "grunt" . "\xe611" )
+    ( "gulp" . "\xe610" )
+    ( "hack" . "\xe9ce" )
+    ( "haml" . "\xf15b" )
+    ( "harbour" . "\xe97b" )
+    ( "hashicorp" . "\xe97e" )
+    ( "haxe" . "\xe907" )
+    ( "haxedevelop" . "\xea3b" )
+    ( "hg" . "\x263f" )
+    ( "hoplon" . "\xea4d" )
+    ( "hy" . "\xe97f" )
+    ( "icu" . "\xea23" )
+    ( "id" . "\xe9f4" )
+    ( "idl" . "\xe947" )
+    ( "idris" . "\xe983" )
+    ( "igorpro" . "\xe980" )
+    ( "image" . "\xf012" )
+    ( "inform7" . "\xe984" )
+    ( "inno" . "\xe985" )
+    ( "io" . "\xe981" )
+    ( "ioke" . "\xe982" )
+    ( "ionic-project" . "\xf14b" )
+    ( "isabelle" . "\xe945" )
+    ( "j" . "\xe937" )
+    ( "jade" . "\xe90d" )
+    ( "jake" . "\xe948" )
+    ( "jasmine" . "\xea3a" )
+    ( "jenkins" . "\xe667" )
+    ( "jest" . "\xea39" )
+    ( "jinja" . "\xe944" )
+    ( "jison" . "\xea55" )
+    ( "jolie" . "\xea75" )
+    ( "jsonld" . "\xe958" )
+    ( "jsx" . "\xf100" )
+    ( "jsx-2" . "\xf101" )
+    ( "jsx2-alt" . "\xe9e6" )
+    ( "julia" . "\x26ec" )
+    ( "junos" . "\xea81" )
+    ( "jupyter" . "\xe987" )
+    ( "karma" . "\xe9cd" )
+    ( "keynote" . "\xe9e5" )
+    ( "khronos" . "\xe9f8" )
+    ( "kicad" . "\xea4c" )
+    ( "kitchenci" . "\xea38" )
+    ( "kivy" . "\xe901" )
+    ( "knockout" . "\x4b" )
+    ( "kotlin" . "\xe989" )
+    ( "krl" . "\xe988" )
+    ( "labview" . "\xe98a" )
+    ( "lasso" . "\xe98c" )
+    ( "leaflet" . "\xea07" )
+    ( "lean" . "\x4c" )
+    ( "lerna" . "\xea37" )
+    ( "lfe" . "\xe94c" )
+    ( "libuv" . "\xea21" )
+    ( "lightwave" . "\xe9fb" )
+    ( "lime" . "\xea36" )
+    ( "lisp" . "\xe908" )
+    ( "livescript" . "\xe914" )
+    ( "llvm" . "\xe91d" )
+    ( "logtalk" . "\xe98d" )
+    ( "lookml" . "\xe98e" )
+    ( "lsl" . "\xe98b" )
+    ( "lua" . "\xe91b" )
+    ( "mako" . "\xe98f" )
+    ( "man-page" . "\xe936" )
+    ( "mapbox" . "\xe941" )
+    ( "markdownlint" . "\xf0c9" )
+    ( "marko" . "\xe920" )
+    ( "mathematica" . "\xe990" )
+    ( "mathjax" . "\xea06" )
+    ( "matlab" . "\xe991" )
+    ( "max" . "\xe993" )
+    ( "maxscript" . "\xe900" )
+    ( "maya" . "\xe9f6" )
+    ( "mediawiki" . "\xe954" )
+    ( "mercury" . "\xe994" )
+    ( "meson" . "\xeafe" )
+    ( "metal" . "\x4d" )
+    ( "meteor" . "\xe6a5" )
+    ( "microsoft-infopath" . "\xea35" )
+    ( "minecraft" . "\xe9dc" )
+    ( "minizinc" . "\xea53" )
+    ( "mirah" . "\xe995" )
+    ( "miranda" . "\xea52" )
+    ( "mocha" . "\x26fe" )
+    ( "modula-2" . "\xe996" )
+    ( "moment" . "\x1f558" )
+    ( "moment-tz" . "\x1f30d" )
+    ( "monkey" . "\xe997" )
+    ( "moustache" . "\xe60f" )
+    ( "mruby" . "\xea18" )
+    ( "mupad" . "\xe9ca" )
+    ( "nano" . "\xea76" )
+    ( "nanoc" . "\xea51" )
+    ( "nant" . "\xe9e1" )
+    ( "nasm" . "\xea72" )
+    ( "neko" . "\xea05" )
+    ( "netlogo" . "\xe99c" )
+    ( "new-relic" . "\xe9d7" )
+    ( "nginx" . "\xf146b" )
+    ( "nib" . "\x2712" )
+    ( "nimrod" . "\xe998" )
+    ( "nit" . "\xe999" )
+    ( "nix" . "\xe99a" )
+    ( "nmap" . "\xe94d" )
+    ( "nodemon" . "\xea26" )
+    ( "normalize" . "\xea04" )
+    ( "npm" . "\xe91c" )
+    ( "npm-old" . "\xf17b" )
+    ( "nsis" . "\xea1e" )
+    ( "nsis-old" . "\xe992" )
+    ( "nuclide" . "\xea34" )
+    ( "nuget" . "\xe9d9" )
+    ( "numpy" . "\xe99d" )
+    ( "nunjucks" . "\xe953" )
+    ( "nvidia" . "\xe95d" )
+    ( "nxc" . "\xea6b" )
+    ( "obj" . "\xe9e8" )
+    ( "objective-j" . "\xe99e" )
+    ( "ocaml" . "\xe91a" )
+    ( "octave" . "\xea33" )
+    ( "odin" . "\xeb36" )
+    ( "onenote" . "\xe9eb" )
+    ( "ooc" . "\xe9cb" )
+    ( "opa" . "\x2601" )
+    ( "opencl" . "\xe99f" )
+    ( "opengl" . "\xea7a" )
+    ( "openoffice" . "\xe9e4" )
+    ( "openscad" . "\xe911" )
+    ( "org" . "\xe917" )
+    ( "owl" . "\xe957" )
+    ( "ox" . "\xe9a1" )
+    ( "oxygene" . "\xe9bf" )
+    ( "oz" . "\xe9be" )
+    ( "p4" . "\xea50" )
+    ( "pan" . "\xe9bd" )
+    ( "papyrus" . "\xe9bc" )
+    ( "parrot" . "\xe9bb" )
+    ( "pascal" . "\xe92a" )
+    ( "patch" . "\xe961" )
+    ( "pawn" . "\x265f" )
+    ( "pb" . "\xea14" )
+    ( "pegjs" . "\xea74" )
+    ( "raku" . "\xe96c" )
+    ( "phalcon" . "\xe94a" )
+    ( "phoenix" . "\xea5f" )
+    ( "php" . "\xf147" )
+    ( "phpunit" . "\xea32" )
+    ( "pickle" . "\xe9c4" )
+    ( "pike" . "\xe9b9" )
+    ( "platformio" . "\xea2c" )
+    ( "pm2" . "\x2630" )
+    ( "pod" . "\xea84" )
+    ( "pogo" . "\xe9b8" )
+    ( "pointwise" . "\xe977" )
+    ( "polymer" . "\xea2b" )
+    ( "pony" . "\xe9b7" )
+    ( "postcss" . "\xe910" )
+    ( "postscript" . "\xe955" )
+    ( "povray" . "\x50" )
+    ( "powerpoint" . "\xe9ec" )
+    ( "powershell" . "\xe9da" )
+    ( "precision" . "\x2295" )
+    ( "premiere" . "\xe9f5" )
+    ( "processing" . "\xe9a0" )
+    ( "progress" . "\xe9c0" )
+    ( "propeller" . "\xe9b5" )
+    ( "proselint" . "\xea6d" )
+    ( "protractor" . "\xe9de" )
+    ( "ps" . "\xe6b8" )
+    ( "pug" . "\xea13" )
+    ( "pug-alt" . "\xe9d0" )
+    ( "puppet" . "\xf0c3" )
+    ( "purebasic" . "\x1b5" )
+    ( "purescript" . "\xe9b2" )
+    ( "racket" . "\xe9b1" )
+    ( "raml" . "\xe913" )
+    ( "rascal" . "\xea24" )
+    ( "rdoc" . "\xe9b0" )
+    ( "realbasic" . "\xe9af" )
+    ( "reason" . "\xea1d" )
+    ( "rebol" . "\xe9ae" )
+    ( "red" . "\xe9ad" )
+    ( "redux" . "\xea30" )
+    ( "regex" . "\x2a" )
+    ( "rexx" . "\xea16" )
+    ( "rhino" . "\xea4a" )
+    ( "ring" . "\x1f48d" )
+    ( "riot" . "\xe919" )
+    ( "robot" . "\xe9ac" )
+    ( "rollup" . "\xea20" )
+    ( "rollup-old" . "\xe9fd" )
+    ( "rot" . "\x1f764" )
+    ( "rspec" . "\xea31" )
+    ( "rst" . "\xe9cc" )
+    ( "sage" . "\xe9ab" )
+    ( "saltstack" . "\xe915" )
+    ( "sas" . "\xe95a" )
+    ( "sbt" . "\xe9d2" )
+    ( "sc" . "\xe9a2" )
+    ( "scheme" . "\x3bb" )
+    ( "scilab" . "\xe9a9" )
+    ( "scrutinizer" . "\xe9d4" )
+    ( "self" . "\xe9a8" )
+    ( "sequelize" . "\xea2f" )
+    ( "sf" . "\xe9db" )
+    ( "shen" . "\xe9a7" )
+    ( "shipit" . "\x26f5" )
+    ( "shippable" . "\xea2d" )
+    ( "shopify" . "\xe9cf" )
+    ( "shuriken" . "\x272b" )
+    ( "silverstripe" . "\xe800" )
+    ( "sinatra" . "\xea03" )
+    ( "sketch" . "\xe927" )
+    ( "sketchup-layout" . "\xea7c" )
+    ( "sketchup-make" . "\xea7e" )
+    ( "sketchup-stylebuilder" . "\xea7d" )
+    ( "slash" . "\xe9a6" )
+    ( "snyk" . "\xea1c" )
+    ( "solidity" . "\xea86" )
+    ( "sparql" . "\xe959" )
+    ( "spray" . "\xea02" )
+    ( "sqf" . "\xe9a5" )
+    ( "sqlite" . "\xe9dd" )
+    ( "squarespace" . "\xea5e" )
+    ( "stan" . "\xe9a4" )
+    ( "stata" . "\xe9a3" )
+    ( "storyist" . "\xe9ef" )
+    ( "strings" . "\xe9e0" )
+    ( "stylelint" . "\xe93d" )
+    ( "stylus" . "\x73" )
+    ( "stylus-full" . "\xe9f7" )
+    ( "stylus-orb" . "\x53" )
+    ( "sublime" . "\xe986" )
+    ( "sv" . "\xe9c3" )
+    ( "svelte" . "\x33dc" )
+    ( "svn" . "\xea17" )
+    ( "swagger" . "\xea29" )
+    ( "tag" . "\xf015" )
+    ( "tcl" . "\xe956" )
+    ( "telegram" . "\x2708" )
+    ( "terminal" . "\xf0c8" )
+    ( "tern" . "\x1f54a" )
+    ( "terraform" . "\xe916" )
+    ( "test-coffeescript" . "\xea62" )
+    ( "test-dir" . "\xea60" )
+    ( "test-generic" . "\xea63" )
+    ( "test-js" . "\xea64" )
+    ( "test-perl" . "\xea65" )
+    ( "test-python" . "\xea66" )
+    ( "test-react" . "\xea67" )
+    ( "test-ruby" . "\xea68" )
+    ( "test-typescript" . "\xea69" )
+    ( "tex" . "\xe600" )
+    ( "textile" . "\x74" )
+    ( "textmate" . "\x2122" )
+    ( "thor" . "\xe9d8" )
+    ( "tinymce" . "\xea01" )
+    ( "tsx" . "\xe9d1" )
+    ( "tsx-alt" . "\xe9e7" )
+    ( "tt" . "\x54" )
+    ( "turing" . "\xe9b6" )
+    ( "twig" . "\x2e19" )
+    ( "twine" . "\xea5d" )
+    ( "txl" . "\xe9c1" )
+    ( "typedoc" . "\xe9fe" )
+    ( "typescript" . "\xe912" )
+    ( "typescript-alt" . "\x2a6" )
+    ( "typings" . "\xe9df" )
+    ( "uno" . "\xe9b3" )
+    ( "unreal" . "\x75" )
+    ( "urweb" . "\xe9ba" )
+    ( "v8" . "\xea1f" )
+    ( "vagrant" . "\x56" )
+    ( "vcl" . "\xe9b4" )
+    ( "verilog" . "\xe949" )
+    ( "vertex-shader" . "\xea79" )
+    ( "vhdl" . "\xe9aa" )
+    ( "video" . "\xf057" )
+    ( "virtualbox" . "\xea3e" )
+    ( "virtualbox-alt" . "\xea2e" )
+    ( "visio" . "\xea83" )
+    ( "vmware" . "\xea49" )
+    ( "vue" . "\xe906" )
+    ( "wasm" . "\xea70" )
+    ( "watchman" . "\xea4f" )
+    ( "webgl" . "\xea7b" )
+    ( "webpack" . "\xea61" )
+    ( "webpack-old" . "\xe91e" )
+    ( "wercker" . "\xea19" )
+    ( "word" . "\xe9ed" )
+    ( "x10" . "\x2169" )
+    ( "xamarin" . "\xea77" )
+    ( "xmos" . "\x58" )
+    ( "xpages" . "\xe9c5" )
+    ( "xtend" . "\xe9c6" )
+    ( "yarn" . "\xea1a" )
+    ( "yasm" . "\xea73" )
+    ( "yin-yang" . "\x262f" )
+    ( "yoyo" . "\xe975" )
+    ( "yui" . "\xea00" )
+    ( "zbrush" . "\xe9f2" )
+    ( "zephir" . "\xe9c7" )
+    ( "zig" . "\x7A" )
+    ( "zimpl" . "\xe9c8" )
+    )
+  )
+
+(provide 'data-fileicons)
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-fileicons.elc b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-fileicons.elc
new file mode 100644
index 0000000..d333901
Binary files /dev/null and b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-fileicons.elc differ
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-material.el b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-material.el
new file mode 100644
index 0000000..aedb84b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-material.el
@@ -0,0 +1,937 @@
+;; -*- lexical-binding: t -*-
+
+(defvar all-the-icons-data/material-icons-alist
+  '(("3d_rotation" . "\xe84d")
+    ("ac_unit" . "\xeb3b")
+    ("access_alarm" . "\xe190")
+    ("access_alarms" . "\xe191")
+    ("access_time" . "\xe192")
+    ("accessibility" . "\xe84e")
+    ("accessible" . "\xe914")
+    ("account_balance" . "\xe84f")
+    ("account_balance_wallet" . "\xe850")
+    ("account_box" . "\xe851")
+    ("account_circle" . "\xe853")
+    ("adb" . "\xe60e")
+    ("add" . "\xe145")
+    ("add_a_photo" . "\xe439")
+    ("add_alarm" . "\xe193")
+    ("add_alert" . "\xe003")
+    ("add_box" . "\xe146")
+    ("add_circle" . "\xe147")
+    ("add_circle_outline" . "\xe148")
+    ("add_location" . "\xe567")
+    ("add_shopping_cart" . "\xe854")
+    ("add_to_photos" . "\xe39d")
+    ("add_to_queue" . "\xe05c")
+    ("adjust" . "\xe39e")
+    ("airline_seat_flat" . "\xe630")
+    ("airline_seat_flat_angled" . "\xe631")
+    ("airline_seat_individual_suite" . "\xe632")
+    ("airline_seat_legroom_extra" . "\xe633")
+    ("airline_seat_legroom_normal" . "\xe634")
+    ("airline_seat_legroom_reduced" . "\xe635")
+    ("airline_seat_recline_extra" . "\xe636")
+    ("airline_seat_recline_normal" . "\xe637")
+    ("airplanemode_active" . "\xe195")
+    ("airplanemode_inactive" . "\xe194")
+    ("airplay" . "\xe055")
+    ("airport_shuttle" . "\xeb3c")
+    ("alarm" . "\xe855")
+    ("alarm_add" . "\xe856")
+    ("alarm_off" . "\xe857")
+    ("alarm_on" . "\xe858")
+    ("album" . "\xe019")
+    ("all_inclusive" . "\xeb3d")
+    ("all_out" . "\xe90b")
+    ("android" . "\xe859")
+    ("announcement" . "\xe85a")
+    ("apps" . "\xe5c3")
+    ("archive" . "\xe149")
+    ("arrow_back" . "\xe5c4")
+    ("arrow_downward" . "\xe5db")
+    ("arrow_drop_down" . "\xe5c5")
+    ("arrow_drop_down_circle" . "\xe5c6")
+    ("arrow_drop_up" . "\xe5c7")
+    ("arrow_forward" . "\xe5c8")
+    ("arrow_upward" . "\xe5d8")
+    ("art_track" . "\xe060")
+    ("aspect_ratio" . "\xe85b")
+    ("assessment" . "\xe85c")
+    ("assignment" . "\xe85d")
+    ("assignment_ind" . "\xe85e")
+    ("assignment_late" . "\xe85f")
+    ("assignment_return" . "\xe860")
+    ("assignment_returned" . "\xe861")
+    ("assignment_turned_in" . "\xe862")
+    ("assistant" . "\xe39f")
+    ("assistant_photo" . "\xe3a0")
+    ("attach_file" . "\xe226")
+    ("attach_money" . "\xe227")
+    ("attachment" . "\xe2bc")
+    ("audiotrack" . "\xe3a1")
+    ("autorenew" . "\xe863")
+    ("av_timer" . "\xe01b")
+    ("backspace" . "\xe14a")
+    ("backup" . "\xe864")
+    ("battery_alert" . "\xe19c")
+    ("battery_charging_full" . "\xe1a3")
+    ("battery_full" . "\xe1a4")
+    ("battery_std" . "\xe1a5")
+    ("battery_unknown" . "\xe1a6")
+    ("beach_access" . "\xeb3e")
+    ("beenhere" . "\xe52d")
+    ("block" . "\xe14b")
+    ("bluetooth" . "\xe1a7")
+    ("bluetooth_audio" . "\xe60f")
+    ("bluetooth_connected" . "\xe1a8")
+    ("bluetooth_disabled" . "\xe1a9")
+    ("bluetooth_searching" . "\xe1aa")
+    ("blur_circular" . "\xe3a2")
+    ("blur_linear" . "\xe3a3")
+    ("blur_off" . "\xe3a4")
+    ("blur_on" . "\xe3a5")
+    ("book" . "\xe865")
+    ("bookmark" . "\xe866")
+    ("bookmark_border" . "\xe867")
+    ("border_all" . "\xe228")
+    ("border_bottom" . "\xe229")
+    ("border_clear" . "\xe22a")
+    ("border_color" . "\xe22b")
+    ("border_horizontal" . "\xe22c")
+    ("border_inner" . "\xe22d")
+    ("border_left" . "\xe22e")
+    ("border_outer" . "\xe22f")
+    ("border_right" . "\xe230")
+    ("border_style" . "\xe231")
+    ("border_top" . "\xe232")
+    ("border_vertical" . "\xe233")
+    ("branding_watermark" . "\xe06b")
+    ("brightness_1" . "\xe3a6")
+    ("brightness_2" . "\xe3a7")
+    ("brightness_3" . "\xe3a8")
+    ("brightness_4" . "\xe3a9")
+    ("brightness_5" . "\xe3aa")
+    ("brightness_6" . "\xe3ab")
+    ("brightness_7" . "\xe3ac")
+    ("brightness_auto" . "\xe1ab")
+    ("brightness_high" . "\xe1ac")
+    ("brightness_low" . "\xe1ad")
+    ("brightness_medium" . "\xe1ae")
+    ("broken_image" . "\xe3ad")
+    ("brush" . "\xe3ae")
+    ("bubble_chart" . "\xe6dd")
+    ("bug_report" . "\xe868")
+    ("build" . "\xe869")
+    ("burst_mode" . "\xe43c")
+    ("business" . "\xe0af")
+    ("business_center" . "\xeb3f")
+    ("cached" . "\xe86a")
+    ("cake" . "\xe7e9")
+    ("call" . "\xe0b0")
+    ("call_end" . "\xe0b1")
+    ("call_made" . "\xe0b2")
+    ("call_merge" . "\xe0b3")
+    ("call_missed" . "\xe0b4")
+    ("call_missed_outgoing" . "\xe0e4")
+    ("call_received" . "\xe0b5")
+    ("call_split" . "\xe0b6")
+    ("call_to_action" . "\xe06c")
+    ("camera" . "\xe3af")
+    ("camera_alt" . "\xe3b0")
+    ("camera_enhance" . "\xe8fc")
+    ("camera_front" . "\xe3b1")
+    ("camera_rear" . "\xe3b2")
+    ("camera_roll" . "\xe3b3")
+    ("cancel" . "\xe5c9")
+    ("card_giftcard" . "\xe8f6")
+    ("card_membership" . "\xe8f7")
+    ("card_travel" . "\xe8f8")
+    ("casino" . "\xeb40")
+    ("cast" . "\xe307")
+    ("cast_connected" . "\xe308")
+    ("center_focus_strong" . "\xe3b4")
+    ("center_focus_weak" . "\xe3b5")
+    ("change_history" . "\xe86b")
+    ("chat" . "\xe0b7")
+    ("chat_bubble" . "\xe0ca")
+    ("chat_bubble_outline" . "\xe0cb")
+    ("check" . "\xe5ca")
+    ("check_box" . "\xe834")
+    ("check_box_outline_blank" . "\xe835")
+    ("check_circle" . "\xe86c")
+    ("chevron_left" . "\xe5cb")
+    ("chevron_right" . "\xe5cc")
+    ("child_care" . "\xeb41")
+    ("child_friendly" . "\xeb42")
+    ("chrome_reader_mode" . "\xe86d")
+    ("class" . "\xe86e")
+    ("clear" . "\xe14c")
+    ("clear_all" . "\xe0b8")
+    ("close" . "\xe5cd")
+    ("closed_caption" . "\xe01c")
+    ("cloud" . "\xe2bd")
+    ("cloud_circle" . "\xe2be")
+    ("cloud_done" . "\xe2bf")
+    ("cloud_download" . "\xe2c0")
+    ("cloud_off" . "\xe2c1")
+    ("cloud_queue" . "\xe2c2")
+    ("cloud_upload" . "\xe2c3")
+    ("code" . "\xe86f")
+    ("collections" . "\xe3b6")
+    ("collections_bookmark" . "\xe431")
+    ("color_lens" . "\xe3b7")
+    ("colorize" . "\xe3b8")
+    ("comment" . "\xe0b9")
+    ("compare" . "\xe3b9")
+    ("compare_arrows" . "\xe915")
+    ("computer" . "\xe30a")
+    ("confirmation_number" . "\xe638")
+    ("contact_mail" . "\xe0d0")
+    ("contact_phone" . "\xe0cf")
+    ("contacts" . "\xe0ba")
+    ("content_copy" . "\xe14d")
+    ("content_cut" . "\xe14e")
+    ("content_paste" . "\xe14f")
+    ("control_point" . "\xe3ba")
+    ("control_point_duplicate" . "\xe3bb")
+    ("copyright" . "\xe90c")
+    ("create" . "\xe150")
+    ("create_new_folder" . "\xe2cc")
+    ("credit_card" . "\xe870")
+    ("crop" . "\xe3be")
+    ("crop_16_9" . "\xe3bc")
+    ("crop_3_2" . "\xe3bd")
+    ("crop_5_4" . "\xe3bf")
+    ("crop_7_5" . "\xe3c0")
+    ("crop_din" . "\xe3c1")
+    ("crop_free" . "\xe3c2")
+    ("crop_landscape" . "\xe3c3")
+    ("crop_original" . "\xe3c4")
+    ("crop_portrait" . "\xe3c5")
+    ("crop_rotate" . "\xe437")
+    ("crop_square" . "\xe3c6")
+    ("dashboard" . "\xe871")
+    ("data_usage" . "\xe1af")
+    ("date_range" . "\xe916")
+    ("dehaze" . "\xe3c7")
+    ("delete" . "\xe872")
+    ("delete_forever" . "\xe92b")
+    ("delete_sweep" . "\xe16c")
+    ("description" . "\xe873")
+    ("desktop_mac" . "\xe30b")
+    ("desktop_windows" . "\xe30c")
+    ("details" . "\xe3c8")
+    ("developer_board" . "\xe30d")
+    ("developer_mode" . "\xe1b0")
+    ("device_hub" . "\xe335")
+    ("devices" . "\xe1b1")
+    ("devices_other" . "\xe337")
+    ("dialer_sip" . "\xe0bb")
+    ("dialpad" . "\xe0bc")
+    ("directions" . "\xe52e")
+    ("directions_bike" . "\xe52f")
+    ("directions_boat" . "\xe532")
+    ("directions_bus" . "\xe530")
+    ("directions_car" . "\xe531")
+    ("directions_railway" . "\xe534")
+    ("directions_run" . "\xe566")
+    ("directions_subway" . "\xe533")
+    ("directions_transit" . "\xe535")
+    ("directions_walk" . "\xe536")
+    ("disc_full" . "\xe610")
+    ("dns" . "\xe875")
+    ("do_not_disturb" . "\xe612")
+    ("do_not_disturb_alt" . "\xe611")
+    ("do_not_disturb_off" . "\xe643")
+    ("do_not_disturb_on" . "\xe644")
+    ("dock" . "\xe30e")
+    ("domain" . "\xe7ee")
+    ("done" . "\xe876")
+    ("done_all" . "\xe877")
+    ("donut_large" . "\xe917")
+    ("donut_small" . "\xe918")
+    ("drafts" . "\xe151")
+    ("drag_handle" . "\xe25d")
+    ("drive_eta" . "\xe613")
+    ("dvr" . "\xe1b2")
+    ("edit" . "\xe3c9")
+    ("edit_location" . "\xe568")
+    ("eject" . "\xe8fb")
+    ("email" . "\xe0be")
+    ("enhanced_encryption" . "\xe63f")
+    ("equalizer" . "\xe01d")
+    ("error" . "\xe000")
+    ("error_outline" . "\xe001")
+    ("euro_symbol" . "\xe926")
+    ("ev_station" . "\xe56d")
+    ("event" . "\xe878")
+    ("event_available" . "\xe614")
+    ("event_busy" . "\xe615")
+    ("event_note" . "\xe616")
+    ("event_seat" . "\xe903")
+    ("exit_to_app" . "\xe879")
+    ("expand_less" . "\xe5ce")
+    ("expand_more" . "\xe5cf")
+    ("explicit" . "\xe01e")
+    ("explore" . "\xe87a")
+    ("exposure" . "\xe3ca")
+    ("exposure_neg_1" . "\xe3cb")
+    ("exposure_neg_2" . "\xe3cc")
+    ("exposure_plus_1" . "\xe3cd")
+    ("exposure_plus_2" . "\xe3ce")
+    ("exposure_zero" . "\xe3cf")
+    ("extension" . "\xe87b")
+    ("face" . "\xe87c")
+    ("fast_forward" . "\xe01f")
+    ("fast_rewind" . "\xe020")
+    ("favorite" . "\xe87d")
+    ("favorite_border" . "\xe87e")
+    ("featured_play_list" . "\xe06d")
+    ("featured_video" . "\xe06e")
+    ("feedback" . "\xe87f")
+    ("fiber_dvr" . "\xe05d")
+    ("fiber_manual_record" . "\xe061")
+    ("fiber_new" . "\xe05e")
+    ("fiber_pin" . "\xe06a")
+    ("fiber_smart_record" . "\xe062")
+    ("file_download" . "\xe2c4")
+    ("file_upload" . "\xe2c6")
+    ("filter" . "\xe3d3")
+    ("filter_1" . "\xe3d0")
+    ("filter_2" . "\xe3d1")
+    ("filter_3" . "\xe3d2")
+    ("filter_4" . "\xe3d4")
+    ("filter_5" . "\xe3d5")
+    ("filter_6" . "\xe3d6")
+    ("filter_7" . "\xe3d7")
+    ("filter_8" . "\xe3d8")
+    ("filter_9" . "\xe3d9")
+    ("filter_9_plus" . "\xe3da")
+    ("filter_b_and_w" . "\xe3db")
+    ("filter_center_focus" . "\xe3dc")
+    ("filter_drama" . "\xe3dd")
+    ("filter_frames" . "\xe3de")
+    ("filter_hdr" . "\xe3df")
+    ("filter_list" . "\xe152")
+    ("filter_none" . "\xe3e0")
+    ("filter_tilt_shift" . "\xe3e2")
+    ("filter_vintage" . "\xe3e3")
+    ("find_in_page" . "\xe880")
+    ("find_replace" . "\xe881")
+    ("fingerprint" . "\xe90d")
+    ("first_page" . "\xe5dc")
+    ("fitness_center" . "\xeb43")
+    ("flag" . "\xe153")
+    ("flare" . "\xe3e4")
+    ("flash_auto" . "\xe3e5")
+    ("flash_off" . "\xe3e6")
+    ("flash_on" . "\xe3e7")
+    ("flight" . "\xe539")
+    ("flight_land" . "\xe904")
+    ("flight_takeoff" . "\xe905")
+    ("flip" . "\xe3e8")
+    ("flip_to_back" . "\xe882")
+    ("flip_to_front" . "\xe883")
+    ("folder" . "\xe2c7")
+    ("folder_open" . "\xe2c8")
+    ("folder_shared" . "\xe2c9")
+    ("folder_special" . "\xe617")
+    ("font_download" . "\xe167")
+    ("format_align_center" . "\xe234")
+    ("format_align_justify" . "\xe235")
+    ("format_align_left" . "\xe236")
+    ("format_align_right" . "\xe237")
+    ("format_bold" . "\xe238")
+    ("format_clear" . "\xe239")
+    ("format_color_fill" . "\xe23a")
+    ("format_color_reset" . "\xe23b")
+    ("format_color_text" . "\xe23c")
+    ("format_indent_decrease" . "\xe23d")
+    ("format_indent_increase" . "\xe23e")
+    ("format_italic" . "\xe23f")
+    ("format_line_spacing" . "\xe240")
+    ("format_list_bulleted" . "\xe241")
+    ("format_list_numbered" . "\xe242")
+    ("format_paint" . "\xe243")
+    ("format_quote" . "\xe244")
+    ("format_shapes" . "\xe25e")
+    ("format_size" . "\xe245")
+    ("format_strikethrough" . "\xe246")
+    ("format_textdirection_l_to_r" . "\xe247")
+    ("format_textdirection_r_to_l" . "\xe248")
+    ("format_underlined" . "\xe249")
+    ("forum" . "\xe0bf")
+    ("forward" . "\xe154")
+    ("forward_10" . "\xe056")
+    ("forward_30" . "\xe057")
+    ("forward_5" . "\xe058")
+    ("free_breakfast" . "\xeb44")
+    ("fullscreen" . "\xe5d0")
+    ("fullscreen_exit" . "\xe5d1")
+    ("functions" . "\xe24a")
+    ("g_translate" . "\xe927")
+    ("gamepad" . "\xe30f")
+    ("games" . "\xe021")
+    ("gavel" . "\xe90e")
+    ("gesture" . "\xe155")
+    ("get_app" . "\xe884")
+    ("gif" . "\xe908")
+    ("golf_course" . "\xeb45")
+    ("gps_fixed" . "\xe1b3")
+    ("gps_not_fixed" . "\xe1b4")
+    ("gps_off" . "\xe1b5")
+    ("grade" . "\xe885")
+    ("gradient" . "\xe3e9")
+    ("grain" . "\xe3ea")
+    ("graphic_eq" . "\xe1b8")
+    ("grid_off" . "\xe3eb")
+    ("grid_on" . "\xe3ec")
+    ("group" . "\xe7ef")
+    ("group_add" . "\xe7f0")
+    ("group_work" . "\xe886")
+    ("hd" . "\xe052")
+    ("hdr_off" . "\xe3ed")
+    ("hdr_on" . "\xe3ee")
+    ("hdr_strong" . "\xe3f1")
+    ("hdr_weak" . "\xe3f2")
+    ("headset" . "\xe310")
+    ("headset_mic" . "\xe311")
+    ("healing" . "\xe3f3")
+    ("hearing" . "\xe023")
+    ("help" . "\xe887")
+    ("help_outline" . "\xe8fd")
+    ("high_quality" . "\xe024")
+    ("highlight" . "\xe25f")
+    ("highlight_off" . "\xe888")
+    ("history" . "\xe889")
+    ("home" . "\xe88a")
+    ("hot_tub" . "\xeb46")
+    ("hotel" . "\xe53a")
+    ("hourglass_empty" . "\xe88b")
+    ("hourglass_full" . "\xe88c")
+    ("http" . "\xe902")
+    ("https" . "\xe88d")
+    ("image" . "\xe3f4")
+    ("image_aspect_ratio" . "\xe3f5")
+    ("import_contacts" . "\xe0e0")
+    ("import_export" . "\xe0c3")
+    ("important_devices" . "\xe912")
+    ("inbox" . "\xe156")
+    ("indeterminate_check_box" . "\xe909")
+    ("info" . "\xe88e")
+    ("info_outline" . "\xe88f")
+    ("input" . "\xe890")
+    ("insert_chart" . "\xe24b")
+    ("insert_comment" . "\xe24c")
+    ("insert_drive_file" . "\xe24d")
+    ("insert_emoticon" . "\xe24e")
+    ("insert_invitation" . "\xe24f")
+    ("insert_link" . "\xe250")
+    ("insert_photo" . "\xe251")
+    ("invert_colors" . "\xe891")
+    ("invert_colors_off" . "\xe0c4")
+    ("iso" . "\xe3f6")
+    ("keyboard" . "\xe312")
+    ("keyboard_arrow_down" . "\xe313")
+    ("keyboard_arrow_left" . "\xe314")
+    ("keyboard_arrow_right" . "\xe315")
+    ("keyboard_arrow_up" . "\xe316")
+    ("keyboard_backspace" . "\xe317")
+    ("keyboard_capslock" . "\xe318")
+    ("keyboard_hide" . "\xe31a")
+    ("keyboard_return" . "\xe31b")
+    ("keyboard_tab" . "\xe31c")
+    ("keyboard_voice" . "\xe31d")
+    ("kitchen" . "\xeb47")
+    ("label" . "\xe892")
+    ("label_outline" . "\xe893")
+    ("landscape" . "\xe3f7")
+    ("language" . "\xe894")
+    ("laptop" . "\xe31e")
+    ("laptop_chromebook" . "\xe31f")
+    ("laptop_mac" . "\xe320")
+    ("laptop_windows" . "\xe321")
+    ("last_page" . "\xe5dd")
+    ("launch" . "\xe895")
+    ("layers" . "\xe53b")
+    ("layers_clear" . "\xe53c")
+    ("leak_add" . "\xe3f8")
+    ("leak_remove" . "\xe3f9")
+    ("lens" . "\xe3fa")
+    ("library_add" . "\xe02e")
+    ("library_books" . "\xe02f")
+    ("library_music" . "\xe030")
+    ("lightbulb_outline" . "\xe90f")
+    ("line_style" . "\xe919")
+    ("line_weight" . "\xe91a")
+    ("linear_scale" . "\xe260")
+    ("link" . "\xe157")
+    ("linked_camera" . "\xe438")
+    ("list" . "\xe896")
+    ("live_help" . "\xe0c6")
+    ("live_tv" . "\xe639")
+    ("local_activity" . "\xe53f")
+    ("local_airport" . "\xe53d")
+    ("local_atm" . "\xe53e")
+    ("local_bar" . "\xe540")
+    ("local_cafe" . "\xe541")
+    ("local_car_wash" . "\xe542")
+    ("local_convenience_store" . "\xe543")
+    ("local_dining" . "\xe556")
+    ("local_drink" . "\xe544")
+    ("local_florist" . "\xe545")
+    ("local_gas_station" . "\xe546")
+    ("local_grocery_store" . "\xe547")
+    ("local_hospital" . "\xe548")
+    ("local_hotel" . "\xe549")
+    ("local_laundry_service" . "\xe54a")
+    ("local_library" . "\xe54b")
+    ("local_mall" . "\xe54c")
+    ("local_movies" . "\xe54d")
+    ("local_offer" . "\xe54e")
+    ("local_parking" . "\xe54f")
+    ("local_pharmacy" . "\xe550")
+    ("local_phone" . "\xe551")
+    ("local_pizza" . "\xe552")
+    ("local_play" . "\xe553")
+    ("local_post_office" . "\xe554")
+    ("local_printshop" . "\xe555")
+    ("local_see" . "\xe557")
+    ("local_shipping" . "\xe558")
+    ("local_taxi" . "\xe559")
+    ("location_city" . "\xe7f1")
+    ("location_disabled" . "\xe1b6")
+    ("location_off" . "\xe0c7")
+    ("location_on" . "\xe0c8")
+    ("location_searching" . "\xe1b7")
+    ("lock" . "\xe897")
+    ("lock_open" . "\xe898")
+    ("lock_outline" . "\xe899")
+    ("looks" . "\xe3fc")
+    ("looks_3" . "\xe3fb")
+    ("looks_4" . "\xe3fd")
+    ("looks_5" . "\xe3fe")
+    ("looks_6" . "\xe3ff")
+    ("looks_one" . "\xe400")
+    ("looks_two" . "\xe401")
+    ("loop" . "\xe028")
+    ("loupe" . "\xe402")
+    ("low_priority" . "\xe16d")
+    ("loyalty" . "\xe89a")
+    ("mail" . "\xe158")
+    ("mail_outline" . "\xe0e1")
+    ("map" . "\xe55b")
+    ("markunread" . "\xe159")
+    ("markunread_mailbox" . "\xe89b")
+    ("memory" . "\xe322")
+    ("menu" . "\xe5d2")
+    ("merge_type" . "\xe252")
+    ("message" . "\xe0c9")
+    ("mic" . "\xe029")
+    ("mic_none" . "\xe02a")
+    ("mic_off" . "\xe02b")
+    ("mms" . "\xe618")
+    ("mode_comment" . "\xe253")
+    ("mode_edit" . "\xe254")
+    ("monetization_on" . "\xe263")
+    ("money_off" . "\xe25c")
+    ("monochrome_photos" . "\xe403")
+    ("mood" . "\xe7f2")
+    ("mood_bad" . "\xe7f3")
+    ("more" . "\xe619")
+    ("more_horiz" . "\xe5d3")
+    ("more_vert" . "\xe5d4")
+    ("motorcycle" . "\xe91b")
+    ("mouse" . "\xe323")
+    ("move_to_inbox" . "\xe168")
+    ("movie" . "\xe02c")
+    ("movie_creation" . "\xe404")
+    ("movie_filter" . "\xe43a")
+    ("multiline_chart" . "\xe6df")
+    ("music_note" . "\xe405")
+    ("music_video" . "\xe063")
+    ("my_location" . "\xe55c")
+    ("nature" . "\xe406")
+    ("nature_people" . "\xe407")
+    ("navigate_before" . "\xe408")
+    ("navigate_next" . "\xe409")
+    ("navigation" . "\xe55d")
+    ("near_me" . "\xe569")
+    ("network_cell" . "\xe1b9")
+    ("network_check" . "\xe640")
+    ("network_locked" . "\xe61a")
+    ("network_wifi" . "\xe1ba")
+    ("new_releases" . "\xe031")
+    ("next_week" . "\xe16a")
+    ("nfc" . "\xe1bb")
+    ("no_encryption" . "\xe641")
+    ("no_sim" . "\xe0cc")
+    ("not_interested" . "\xe033")
+    ("note" . "\xe06f")
+    ("note_add" . "\xe89c")
+    ("notifications" . "\xe7f4")
+    ("notifications_active" . "\xe7f7")
+    ("notifications_none" . "\xe7f5")
+    ("notifications_off" . "\xe7f6")
+    ("notifications_paused" . "\xe7f8")
+    ("offline_pin" . "\xe90a")
+    ("ondemand_video" . "\xe63a")
+    ("opacity" . "\xe91c")
+    ("open_in_browser" . "\xe89d")
+    ("open_in_new" . "\xe89e")
+    ("open_with" . "\xe89f")
+    ("pages" . "\xe7f9")
+    ("pageview" . "\xe8a0")
+    ("palette" . "\xe40a")
+    ("pan_tool" . "\xe925")
+    ("panorama" . "\xe40b")
+    ("panorama_fish_eye" . "\xe40c")
+    ("panorama_horizontal" . "\xe40d")
+    ("panorama_vertical" . "\xe40e")
+    ("panorama_wide_angle" . "\xe40f")
+    ("party_mode" . "\xe7fa")
+    ("pause" . "\xe034")
+    ("pause_circle_filled" . "\xe035")
+    ("pause_circle_outline" . "\xe036")
+    ("payment" . "\xe8a1")
+    ("people" . "\xe7fb")
+    ("people_outline" . "\xe7fc")
+    ("perm_camera_mic" . "\xe8a2")
+    ("perm_contact_calendar" . "\xe8a3")
+    ("perm_data_setting" . "\xe8a4")
+    ("perm_device_information" . "\xe8a5")
+    ("perm_identity" . "\xe8a6")
+    ("perm_media" . "\xe8a7")
+    ("perm_phone_msg" . "\xe8a8")
+    ("perm_scan_wifi" . "\xe8a9")
+    ("person" . "\xe7fd")
+    ("person_add" . "\xe7fe")
+    ("person_outline" . "\xe7ff")
+    ("person_pin" . "\xe55a")
+    ("person_pin_circle" . "\xe56a")
+    ("personal_video" . "\xe63b")
+    ("pets" . "\xe91d")
+    ("phone" . "\xe0cd")
+    ("phone_android" . "\xe324")
+    ("phone_bluetooth_speaker" . "\xe61b")
+    ("phone_forwarded" . "\xe61c")
+    ("phone_in_talk" . "\xe61d")
+    ("phone_iphone" . "\xe325")
+    ("phone_locked" . "\xe61e")
+    ("phone_missed" . "\xe61f")
+    ("phone_paused" . "\xe620")
+    ("phonelink" . "\xe326")
+    ("phonelink_erase" . "\xe0db")
+    ("phonelink_lock" . "\xe0dc")
+    ("phonelink_off" . "\xe327")
+    ("phonelink_ring" . "\xe0dd")
+    ("phonelink_setup" . "\xe0de")
+    ("photo" . "\xe410")
+    ("photo_album" . "\xe411")
+    ("photo_camera" . "\xe412")
+    ("photo_filter" . "\xe43b")
+    ("photo_library" . "\xe413")
+    ("photo_size_select_actual" . "\xe432")
+    ("photo_size_select_large" . "\xe433")
+    ("photo_size_select_small" . "\xe434")
+    ("picture_as_pdf" . "\xe415")
+    ("picture_in_picture" . "\xe8aa")
+    ("picture_in_picture_alt" . "\xe911")
+    ("pie_chart" . "\xe6c4")
+    ("pie_chart_outlined" . "\xe6c5")
+    ("pin_drop" . "\xe55e")
+    ("place" . "\xe55f")
+    ("play_arrow" . "\xe037")
+    ("play_circle_filled" . "\xe038")
+    ("play_circle_outline" . "\xe039")
+    ("play_for_work" . "\xe906")
+    ("playlist_add" . "\xe03b")
+    ("playlist_add_check" . "\xe065")
+    ("playlist_play" . "\xe05f")
+    ("plus_one" . "\xe800")
+    ("poll" . "\xe801")
+    ("polymer" . "\xe8ab")
+    ("pool" . "\xeb48")
+    ("portable_wifi_off" . "\xe0ce")
+    ("portrait" . "\xe416")
+    ("power" . "\xe63c")
+    ("power_input" . "\xe336")
+    ("power_settings_new" . "\xe8ac")
+    ("pregnant_woman" . "\xe91e")
+    ("present_to_all" . "\xe0df")
+    ("print" . "\xe8ad")
+    ("priority_high" . "\xe645")
+    ("public" . "\xe80b")
+    ("publish" . "\xe255")
+    ("query_builder" . "\xe8ae")
+    ("question_answer" . "\xe8af")
+    ("queue" . "\xe03c")
+    ("queue_music" . "\xe03d")
+    ("queue_play_next" . "\xe066")
+    ("radio" . "\xe03e")
+    ("radio_button_checked" . "\xe837")
+    ("radio_button_unchecked" . "\xe836")
+    ("rate_review" . "\xe560")
+    ("receipt" . "\xe8b0")
+    ("recent_actors" . "\xe03f")
+    ("record_voice_over" . "\xe91f")
+    ("redeem" . "\xe8b1")
+    ("redo" . "\xe15a")
+    ("refresh" . "\xe5d5")
+    ("remove" . "\xe15b")
+    ("remove_circle" . "\xe15c")
+    ("remove_circle_outline" . "\xe15d")
+    ("remove_from_queue" . "\xe067")
+    ("remove_red_eye" . "\xe417")
+    ("remove_shopping_cart" . "\xe928")
+    ("reorder" . "\xe8fe")
+    ("repeat" . "\xe040")
+    ("repeat_one" . "\xe041")
+    ("replay" . "\xe042")
+    ("replay_10" . "\xe059")
+    ("replay_30" . "\xe05a")
+    ("replay_5" . "\xe05b")
+    ("reply" . "\xe15e")
+    ("reply_all" . "\xe15f")
+    ("report" . "\xe160")
+    ("report_problem" . "\xe8b2")
+    ("restaurant" . "\xe56c")
+    ("restaurant_menu" . "\xe561")
+    ("restore" . "\xe8b3")
+    ("restore_page" . "\xe929")
+    ("ring_volume" . "\xe0d1")
+    ("room" . "\xe8b4")
+    ("room_service" . "\xeb49")
+    ("rotate_90_degrees_ccw" . "\xe418")
+    ("rotate_left" . "\xe419")
+    ("rotate_right" . "\xe41a")
+    ("rounded_corner" . "\xe920")
+    ("router" . "\xe328")
+    ("rowing" . "\xe921")
+    ("rss_feed" . "\xe0e5")
+    ("rv_hookup" . "\xe642")
+    ("satellite" . "\xe562")
+    ("save" . "\xe161")
+    ("scanner" . "\xe329")
+    ("schedule" . "\xe8b5")
+    ("school" . "\xe80c")
+    ("screen_lock_landscape" . "\xe1be")
+    ("screen_lock_portrait" . "\xe1bf")
+    ("screen_lock_rotation" . "\xe1c0")
+    ("screen_rotation" . "\xe1c1")
+    ("screen_share" . "\xe0e2")
+    ("sd_card" . "\xe623")
+    ("sd_storage" . "\xe1c2")
+    ("search" . "\xe8b6")
+    ("security" . "\xe32a")
+    ("select_all" . "\xe162")
+    ("send" . "\xe163")
+    ("sentiment_dissatisfied" . "\xe811")
+    ("sentiment_neutral" . "\xe812")
+    ("sentiment_satisfied" . "\xe813")
+    ("sentiment_very_dissatisfied" . "\xe814")
+    ("sentiment_very_satisfied" . "\xe815")
+    ("settings" . "\xe8b8")
+    ("settings_applications" . "\xe8b9")
+    ("settings_backup_restore" . "\xe8ba")
+    ("settings_bluetooth" . "\xe8bb")
+    ("settings_brightness" . "\xe8bd")
+    ("settings_cell" . "\xe8bc")
+    ("settings_ethernet" . "\xe8be")
+    ("settings_input_antenna" . "\xe8bf")
+    ("settings_input_component" . "\xe8c0")
+    ("settings_input_composite" . "\xe8c1")
+    ("settings_input_hdmi" . "\xe8c2")
+    ("settings_input_svideo" . "\xe8c3")
+    ("settings_overscan" . "\xe8c4")
+    ("settings_phone" . "\xe8c5")
+    ("settings_power" . "\xe8c6")
+    ("settings_remote" . "\xe8c7")
+    ("settings_system_daydream" . "\xe1c3")
+    ("settings_voice" . "\xe8c8")
+    ("share" . "\xe80d")
+    ("shop" . "\xe8c9")
+    ("shop_two" . "\xe8ca")
+    ("shopping_basket" . "\xe8cb")
+    ("shopping_cart" . "\xe8cc")
+    ("short_text" . "\xe261")
+    ("show_chart" . "\xe6e1")
+    ("shuffle" . "\xe043")
+    ("signal_cellular_4_bar" . "\xe1c8")
+    ("signal_cellular_connected_no_internet_4_bar" . "\xe1cd")
+    ("signal_cellular_no_sim" . "\xe1ce")
+    ("signal_cellular_null" . "\xe1cf")
+    ("signal_cellular_off" . "\xe1d0")
+    ("signal_wifi_4_bar" . "\xe1d8")
+    ("signal_wifi_4_bar_lock" . "\xe1d9")
+    ("signal_wifi_off" . "\xe1da")
+    ("sim_card" . "\xe32b")
+    ("sim_card_alert" . "\xe624")
+    ("skip_next" . "\xe044")
+    ("skip_previous" . "\xe045")
+    ("slideshow" . "\xe41b")
+    ("slow_motion_video" . "\xe068")
+    ("smartphone" . "\xe32c")
+    ("smoke_free" . "\xeb4a")
+    ("smoking_rooms" . "\xeb4b")
+    ("sms" . "\xe625")
+    ("sms_failed" . "\xe626")
+    ("snooze" . "\xe046")
+    ("sort" . "\xe164")
+    ("sort_by_alpha" . "\xe053")
+    ("spa" . "\xeb4c")
+    ("space_bar" . "\xe256")
+    ("speaker" . "\xe32d")
+    ("speaker_group" . "\xe32e")
+    ("speaker_notes" . "\xe8cd")
+    ("speaker_notes_off" . "\xe92a")
+    ("speaker_phone" . "\xe0d2")
+    ("spellcheck" . "\xe8ce")
+    ("star" . "\xe838")
+    ("star_border" . "\xe83a")
+    ("star_half" . "\xe839")
+    ("stars" . "\xe8d0")
+    ("stay_current_landscape" . "\xe0d3")
+    ("stay_current_portrait" . "\xe0d4")
+    ("stay_primary_landscape" . "\xe0d5")
+    ("stay_primary_portrait" . "\xe0d6")
+    ("stop" . "\xe047")
+    ("stop_screen_share" . "\xe0e3")
+    ("storage" . "\xe1db")
+    ("store" . "\xe8d1")
+    ("store_mall_directory" . "\xe563")
+    ("straighten" . "\xe41c")
+    ("streetview" . "\xe56e")
+    ("strikethrough_s" . "\xe257")
+    ("style" . "\xe41d")
+    ("subdirectory_arrow_left" . "\xe5d9")
+    ("subdirectory_arrow_right" . "\xe5da")
+    ("subject" . "\xe8d2")
+    ("subscriptions" . "\xe064")
+    ("subtitles" . "\xe048")
+    ("subway" . "\xe56f")
+    ("supervisor_account" . "\xe8d3")
+    ("surround_sound" . "\xe049")
+    ("swap_calls" . "\xe0d7")
+    ("swap_horiz" . "\xe8d4")
+    ("swap_vert" . "\xe8d5")
+    ("swap_vertical_circle" . "\xe8d6")
+    ("switch_camera" . "\xe41e")
+    ("switch_video" . "\xe41f")
+    ("sync" . "\xe627")
+    ("sync_disabled" . "\xe628")
+    ("sync_problem" . "\xe629")
+    ("system_update" . "\xe62a")
+    ("system_update_alt" . "\xe8d7")
+    ("tab" . "\xe8d8")
+    ("tab_unselected" . "\xe8d9")
+    ("tablet" . "\xe32f")
+    ("tablet_android" . "\xe330")
+    ("tablet_mac" . "\xe331")
+    ("tag_faces" . "\xe420")
+    ("tap_and_play" . "\xe62b")
+    ("terrain" . "\xe564")
+    ("text_fields" . "\xe262")
+    ("text_format" . "\xe165")
+    ("textsms" . "\xe0d8")
+    ("texture" . "\xe421")
+    ("theaters" . "\xe8da")
+    ("thumb_down" . "\xe8db")
+    ("thumb_up" . "\xe8dc")
+    ("thumbs_up_down" . "\xe8dd")
+    ("time_to_leave" . "\xe62c")
+    ("timelapse" . "\xe422")
+    ("timeline" . "\xe922")
+    ("timer" . "\xe425")
+    ("timer_10" . "\xe423")
+    ("timer_3" . "\xe424")
+    ("timer_off" . "\xe426")
+    ("title" . "\xe264")
+    ("toc" . "\xe8de")
+    ("today" . "\xe8df")
+    ("toll" . "\xe8e0")
+    ("tonality" . "\xe427")
+    ("touch_app" . "\xe913")
+    ("toys" . "\xe332")
+    ("track_changes" . "\xe8e1")
+    ("traffic" . "\xe565")
+    ("train" . "\xe570")
+    ("tram" . "\xe571")
+    ("transfer_within_a_station" . "\xe572")
+    ("transform" . "\xe428")
+    ("translate" . "\xe8e2")
+    ("trending_down" . "\xe8e3")
+    ("trending_flat" . "\xe8e4")
+    ("trending_up" . "\xe8e5")
+    ("tune" . "\xe429")
+    ("turned_in" . "\xe8e6")
+    ("turned_in_not" . "\xe8e7")
+    ("tv" . "\xe333")
+    ("unarchive" . "\xe169")
+    ("undo" . "\xe166")
+    ("unfold_less" . "\xe5d6")
+    ("unfold_more" . "\xe5d7")
+    ("update" . "\xe923")
+    ("usb" . "\xe1e0")
+    ("verified_user" . "\xe8e8")
+    ("vertical_align_bottom" . "\xe258")
+    ("vertical_align_center" . "\xe259")
+    ("vertical_align_top" . "\xe25a")
+    ("vibration" . "\xe62d")
+    ("video_call" . "\xe070")
+    ("video_label" . "\xe071")
+    ("video_library" . "\xe04a")
+    ("videocam" . "\xe04b")
+    ("videocam_off" . "\xe04c")
+    ("videogame_asset" . "\xe338")
+    ("view_agenda" . "\xe8e9")
+    ("view_array" . "\xe8ea")
+    ("view_carousel" . "\xe8eb")
+    ("view_column" . "\xe8ec")
+    ("view_comfy" . "\xe42a")
+    ("view_compact" . "\xe42b")
+    ("view_day" . "\xe8ed")
+    ("view_headline" . "\xe8ee")
+    ("view_list" . "\xe8ef")
+    ("view_module" . "\xe8f0")
+    ("view_quilt" . "\xe8f1")
+    ("view_stream" . "\xe8f2")
+    ("view_week" . "\xe8f3")
+    ("vignette" . "\xe435")
+    ("visibility" . "\xe8f4")
+    ("visibility_off" . "\xe8f5")
+    ("voice_chat" . "\xe62e")
+    ("voicemail" . "\xe0d9")
+    ("volume_down" . "\xe04d")
+    ("volume_mute" . "\xe04e")
+    ("volume_off" . "\xe04f")
+    ("volume_up" . "\xe050")
+    ("vpn_key" . "\xe0da")
+    ("vpn_lock" . "\xe62f")
+    ("wallpaper" . "\xe1bc")
+    ("warning" . "\xe002")
+    ("watch" . "\xe334")
+    ("watch_later" . "\xe924")
+    ("wb_auto" . "\xe42c")
+    ("wb_cloudy" . "\xe42d")
+    ("wb_incandescent" . "\xe42e")
+    ("wb_iridescent" . "\xe436")
+    ("wb_sunny" . "\xe430")
+    ("wc" . "\xe63d")
+    ("web" . "\xe051")
+    ("web_asset" . "\xe069")
+    ("weekend" . "\xe16b")
+    ("whatshot" . "\xe80e")
+    ("widgets" . "\xe1bd")
+    ("wifi" . "\xe63e")
+    ("wifi_lock" . "\xe1e1")
+    ("wifi_tethering" . "\xe1e2")
+    ("work" . "\xe8f9")
+    ("wrap_text" . "\xe25b")
+    ("youtube_searched_for" . "\xe8fa")
+    ("zoom_in" . "\xe8ff")
+    ("zoom_out" . "\xe900")
+    ("zoom_out_map" . "\xe56b")))
+
+  (provide 'data-material)
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-material.elc b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-material.elc
new file mode 100644
index 0000000..80b6f06
Binary files /dev/null and b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-material.elc differ
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-octicons.el b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-octicons.el
new file mode 100644
index 0000000..069dbb5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-octicons.el
@@ -0,0 +1,167 @@
+;; -*- lexical-binding: t -*-
+
+(defvar all-the-icons-data/octicons-alist
+  '(
+
+    ("alert" . "\xf02d")
+    ("arrow-down" . "\xf03f")
+    ("arrow-left" . "\xf040")
+    ("arrow-right" . "\xf03e")
+    ("arrow-small-down" . "\xf0a0")
+    ("arrow-small-left" . "\xf0a1")
+    ("arrow-small-right" . "\xf071")
+    ("arrow-small-up" . "\xf09f")
+    ("arrow-up" . "\xf03d")
+    ("book" . "\xf007")
+    ("bookmark" . "\xf07b")
+    ("briefcase" . "\xf0d3")
+    ("broadcast" . "\xf048")
+    ("browser" . "\xf0c5")
+    ("bug" . "\xf091")
+    ("calendar" . "\xf068")
+    ("check" . "\xf03a")
+    ("checklist" . "\xf076")
+    ("chevron-down" . "\xf0a3")
+    ("chevron-left" . "\xf0a4")
+    ("chevron-right" . "\xf078")
+    ("chevron-up" . "\xf0a2")
+    ("circle-slash" . "\xf084")
+    ("circuit-board" . "\xf0d6")
+    ("clippy" . "\xf035")
+    ("clock" . "\xf046")
+    ("cloud-download" . "\xf00b")
+    ("cloud-upload" . "\xf00c")
+    ("code" . "\xf05f")
+    ("comment" . "\xf02b")
+    ("comment-discussion" . "\xf04f")
+    ("credit-card" . "\xf045")
+    ("dash" . "\xf0ca")
+    ("dashboard" . "\xf07d")
+    ("database" . "\xf096")
+    ("device-camera" . "\xf056")
+    ("device-camera-video" . "\xf057")
+    ("device-desktop" . "\xf27c")
+    ("device-mobile" . "\xf038")
+    ("diff" . "\xf04d")
+    ("diff-added" . "\xf06b")
+    ("diff-ignored" . "\xf099")
+    ("diff-modified" . "\xf06d")
+    ("diff-removed" . "\xf06c")
+    ("diff-renamed" . "\xf06e")
+    ("ellipsis" . "\xf09a")
+    ("eye" . "\xf04e")
+    ("file-binary" . "\xf094")
+    ("file-code" . "\xf010")
+    ("file-directory" . "\xf016")
+    ("file-media" . "\xf012")
+    ("file-pdf" . "\xf014")
+    ("file-submodule" . "\xf017")
+    ("file-symlink-directory" . "\xf0b1")
+    ("file-symlink-file" . "\xf0b0")
+    ("file-text" . "\xf011")
+    ("file-zip" . "\xf013")
+    ("flame" . "\xf0d2")
+    ("fold" . "\xf0cc")
+    ("gear" . "\xf02f")
+    ("gift" . "\xf042")
+    ("gist" . "\xf00e")
+    ("gist-secret" . "\xf08c")
+    ("git-branch" . "\xf020")
+    ("git-commit" . "\xf01f")
+    ("git-compare" . "\xf0ac")
+    ("git-merge" . "\xf023")
+    ("git-pull-request" . "\xf009")
+    ("globe" . "\xf0b6")
+    ("graph" . "\xf043")
+    ("beaker" . "\xf0dd")
+    ("heart" . "\x2665")
+    ("history" . "\xf07e")
+    ("home" . "\xf08d")
+    ("horizontal-rule" . "\xf070")
+    ("hourglass" . "\xf09e")
+    ("hubot" . "\xf09d")
+    ("inbox" . "\xf0cf")
+    ("info" . "\xf059")
+    ("issue-closed" . "\xf028")
+    ("issue-opened" . "\xf026")
+    ("issue-reopened" . "\xf027")
+    ("jersey" . "\xf019")
+    ("key" . "\xf049")
+    ("keyboard" . "\xf00d")
+    ("law" . "\xf0d8")
+    ("light-bulb" . "\xf000")
+    ("link" . "\xf05c")
+    ("link-external" . "\xf07f")
+    ("list-ordered" . "\xf062")
+    ("list-unordered" . "\xf061")
+    ("location" . "\xf060")
+    ("lock" . "\xf06a")
+    ("logo-github" . "\xf092")
+    ("mail" . "\xf03b")
+    ("mail-read" . "\xf03c")
+    ("mail-reply" . "\xf051")
+    ("mark-github" . "\xf00a")
+    ("markdown" . "\xf0c9")
+    ("megaphone" . "\xf077")
+    ("mention" . "\xf0be")
+    ("milestone" . "\xf075")
+    ("mirror" . "\xf024")
+    ("mortar-board" . "\xf0d7")
+    ("mute" . "\xf080")
+    ("no-newline" . "\xf09c")
+    ("octoface" . "\xf008")
+    ("organization" . "\xf037")
+    ("package" . "\xf0c4")
+    ("paintcan" . "\xf0d1")
+    ("pencil" . "\xf058")
+    ("person" . "\xf018")
+    ("pin" . "\xf041")
+    ("plug" . "\xf0d4")
+    ("plus" . "\xf05d")
+    ("primitive-dot" . "\xf052")
+    ("primitive-square" . "\xf053")
+    ("pulse" . "\xf085")
+    ("puzzle" . "\xf0c0")
+    ("question" . "\xf02c")
+    ("quote" . "\xf063")
+    ("radio-tower" . "\xf030")
+    ("repo" . "\xf001")
+    ("repo-clone" . "\xf04c")
+    ("repo-force-push" . "\xf04a")
+    ("repo-forked" . "\xf002")
+    ("repo-pull" . "\xf006")
+    ("repo-push" . "\xf005")
+    ("rocket" . "\xf033")
+    ("rss" . "\xf034")
+    ("ruby" . "\xf047")
+    ("search" . "\xf02e")
+    ("server" . "\xf097")
+    ("settings" . "\xf07c")
+    ("sign-in" . "\xf036")
+    ("sign-out" . "\xf032")
+    ("squirrel" . "\xf0b2")
+    ("star" . "\xf02a")
+    ("steps" . "\xf0c7")
+    ("stop" . "\xf08f")
+    ("sync" . "\xf087")
+    ("tag" . "\xf015")
+    ("telescope" . "\xf088")
+    ("terminal" . "\xf0c8")
+    ("three-bars" . "\xf05e")
+    ("thumbsdown" . "\xf0db")
+    ("thumbsup" . "\xf0da")
+    ("tools" . "\xf031")
+    ("trashcan" . "\xf0d0")
+    ("triangle-down" . "\xf05b")
+    ("triangle-left" . "\xf044")
+    ("triangle-right" . "\xf05a")
+    ("triangle-up" . "\xf0aa")
+    ("unfold" . "\xf039")
+    ("unmute" . "\xf0ba")
+    ("versions" . "\xf064")
+    ("x" . "\xf081")
+    ("zap" . "\x26A1")
+
+    ))
+
+(provide 'data-octicons)
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-octicons.elc b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-octicons.elc
new file mode 100644
index 0000000..957d22a
Binary files /dev/null and b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-octicons.elc differ
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-weathericons.el b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-weathericons.el
new file mode 100644
index 0000000..daac977
--- /dev/null
+++ b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-weathericons.el
@@ -0,0 +1,596 @@
+;; -*- lexical-binding: t -*-
+
+(defvar all-the-icons-data/weather-icons-alist
+  '(
+
+    ("alien"                           . "\xf075")
+    ("barometer"                       . "\xf079")
+    ("celsius"                         . "\xf03c")
+    ("cloud"                           . "\xf041")
+    ("cloud-down"                      . "\xf03d")
+    ("cloud-refresh"                   . "\xf03e")
+    ("cloud-up"                        . "\xf040")
+    ("cloudy"                          . "\xf013")
+    ("cloudy-gusts"                    . "\xf011")
+    ("cloudy-windy"                    . "\xf012")
+    ("day-cloudy"                      . "\xf002")
+    ("day-cloudy-gusts"                . "\xf000")
+    ("day-cloudy-high"                 . "\xf07d")
+    ("day-cloudy-windy"                . "\xf001")
+    ("day-fog"                         . "\xf003")
+    ("day-hail"                        . "\xf004")
+    ("day-haze"                        . "\xf0b6")
+    ("day-light-wind"                  . "\xf0c4")
+    ("day-lightning"                   . "\xf005")
+    ("day-rain"                        . "\xf008")
+    ("day-rain-mix"                    . "\xf006")
+    ("day-rain-wind"                   . "\xf007")
+    ("day-showers"                     . "\xf009")
+    ("day-sleet"                       . "\xf0b2")
+    ("day-sleet-storm"                 . "\xf068")
+    ("day-snow"                        . "\xf00a")
+    ("day-snow-thunderstorm"           . "\xf06b")
+    ("day-snow-wind"                   . "\xf065")
+    ("day-sprinkle"                    . "\xf00b")
+    ("day-storm-showers"               . "\xf00e")
+    ("day-sunny"                       . "\xf00d")
+    ("day-sunny-overcast"              . "\xf00c")
+    ("day-thunderstorm"                . "\xf010")
+    ("day-windy"                       . "\xf085")
+    ("degrees"                         . "\xf042")
+    ("direction-down"                  . "\xf044")
+    ("direction-down-left"             . "\xf043")
+    ("direction-down-right"            . "\xf088")
+    ("direction-left"                  . "\xf048")
+    ("direction-right"                 . "\xf04d")
+    ("direction-up"                    . "\xf058")
+    ("direction-up-left"               . "\xf087")
+    ("direction-up-right"              . "\xf057")
+    ("dust"                            . "\xf063")
+    ("earthquake"                      . "\xf0c6")
+    ("fahrenheit"                      . "\xf045")
+    ("fire"                            . "\xf0c7")
+    ("flood"                           . "\xf07c")
+    ("fog"                             . "\xf014")
+    ("forecast-io-clear-day"           . "\xf00d")
+    ("forecast-io-clear-night"         . "\xf02e")
+    ("forecast-io-cloudy"              . "\xf013")
+    ("forecast-io-fog"                 . "\xf014")
+    ("forecast-io-hail"                . "\xf015")
+    ("forecast-io-partly-cloudy-day"   . "\xf002")
+    ("forecast-io-partly-cloudy-night" . "\xf031")
+    ("forecast-io-rain"                . "\xf019")
+    ("forecast-io-sleet"               . "\xf0b5")
+    ("forecast-io-snow"                . "\xf01b")
+    ("forecast-io-thunderstorm"        . "\xf01e")
+    ("forecast-io-tornado"             . "\xf056")
+    ("forecast-io-wind"                . "\xf050")
+    ("gale-warning"                    . "\xf0cd")
+    ("hail"                            . "\xf015")
+    ("horizon"                         . "\xf047")
+    ("horizon-alt"                     . "\xf046")
+    ("hot"                             . "\xf072")
+    ("humidity"                        . "\xf07a")
+    ("hurricane"                       . "\xf073")
+    ("hurricane-warning"               . "\xf0cf")
+    ("lightning"                       . "\xf016")
+    ("lunar-eclipse"                   . "\xf070")
+    ("meteor"                          . "\xf071")
+    ("moon-0"                          . "\xf095")
+    ("moon-1"                          . "\xf096")
+    ("moon-10"                         . "\xf09f")
+    ("moon-11"                         . "\xf0a0")
+    ("moon-12"                         . "\xf0a1")
+    ("moon-13"                         . "\xf0a2")
+    ("moon-14"                         . "\xf0a3")
+    ("moon-15"                         . "\xf0a4")
+    ("moon-16"                         . "\xf0a5")
+    ("moon-17"                         . "\xf0a6")
+    ("moon-18"                         . "\xf0a7")
+    ("moon-19"                         . "\xf0a8")
+    ("moon-2"                          . "\xf097")
+    ("moon-20"                         . "\xf0a9")
+    ("moon-21"                         . "\xf0aa")
+    ("moon-22"                         . "\xf0ab")
+    ("moon-23"                         . "\xf0ac")
+    ("moon-24"                         . "\xf0ad")
+    ("moon-25"                         . "\xf0ae")
+    ("moon-26"                         . "\xf0af")
+    ("moon-27"                         . "\xf0b0")
+    ("moon-3"                          . "\xf098")
+    ("moon-4"                          . "\xf099")
+    ("moon-5"                          . "\xf09a")
+    ("moon-6"                          . "\xf09b")
+    ("moon-7"                          . "\xf09c")
+    ("moon-8"                          . "\xf09d")
+    ("moon-9"                          . "\xf09e")
+    ("moon-alt-first-quarter"          . "\xf0d6")
+    ("moon-alt-full"                   . "\xf0dd")
+    ("moon-alt-new"                    . "\xf0eb")
+    ("moon-alt-third-quarter"          . "\xf0e4")
+    ("moon-alt-waning-crescent-1"      . "\xf0e5")
+    ("moon-alt-waning-crescent-2"      . "\xf0e6")
+    ("moon-alt-waning-crescent-3"      . "\xf0e7")
+    ("moon-alt-waning-crescent-4"      . "\xf0e8")
+    ("moon-alt-waning-crescent-5"      . "\xf0e9")
+    ("moon-alt-waning-crescent-6"      . "\xf0ea")
+    ("moon-alt-waning-gibbous-1"       . "\xf0de")
+    ("moon-alt-waning-gibbous-2"       . "\xf0df")
+    ("moon-alt-waning-gibbous-3"       . "\xf0e0")
+    ("moon-alt-waning-gibbous-4"       . "\xf0e1")
+    ("moon-alt-waning-gibbous-5"       . "\xf0e2")
+    ("moon-alt-waning-gibbous-6"       . "\xf0e3")
+    ("moon-alt-waxing-crescent-1"      . "\xf0d0")
+    ("moon-alt-waxing-crescent-2"      . "\xf0d1")
+    ("moon-alt-waxing-crescent-3"      . "\xf0d2")
+    ("moon-alt-waxing-crescent-4"      . "\xf0d3")
+    ("moon-alt-waxing-crescent-5"      . "\xf0d4")
+    ("moon-alt-waxing-crescent-6"      . "\xf0d5")
+    ("moon-alt-waxing-gibbous-1"       . "\xf0d7")
+    ("moon-alt-waxing-gibbous-2"       . "\xf0d8")
+    ("moon-alt-waxing-gibbous-3"       . "\xf0d9")
+    ("moon-alt-waxing-gibbous-4"       . "\xf0da")
+    ("moon-alt-waxing-gibbous-5"       . "\xf0db")
+    ("moon-alt-waxing-gibbous-6"       . "\xf0dc")
+    ("moon-first-quarter"              . "\xf09c")
+    ("moon-full"                       . "\xf0a3")
+    ("moon-new"                        . "\xf095")
+    ("moon-third-quarter"              . "\xf0aa")
+    ("moon-waning-crescent-1"          . "\xf0ab")
+    ("moon-waning-crescent-2"          . "\xf0ac")
+    ("moon-waning-crescent-3"          . "\xf0ad")
+    ("moon-waning-crescent-4"          . "\xf0ae")
+    ("moon-waning-crescent-5"          . "\xf0af")
+    ("moon-waning-crescent-6"          . "\xf0b0")
+    ("moon-waning-gibbous-1"           . "\xf0a4")
+    ("moon-waning-gibbous-2"           . "\xf0a5")
+    ("moon-waning-gibbous-3"           . "\xf0a6")
+    ("moon-waning-gibbous-4"           . "\xf0a7")
+    ("moon-waning-gibbous-5"           . "\xf0a8")
+    ("moon-waning-gibbous-6"           . "\xf0a9")
+    ("moon-waxing-crescent-1"          . "\xf096")
+    ("moon-waxing-crescent-2"          . "\xf097")
+    ("moon-waxing-crescent-3"          . "\xf098")
+    ("moon-waxing-crescent-4"          . "\xf099")
+    ("moon-waxing-crescent-5"          . "\xf09a")
+    ("moon-waxing-crescent-6"          . "\xf09b")
+    ("moon-waxing-gibbous-1"           . "\xf09d")
+    ("moon-waxing-gibbous-2"           . "\xf09e")
+    ("moon-waxing-gibbous-3"           . "\xf09f")
+    ("moon-waxing-gibbous-4"           . "\xf0a0")
+    ("moon-waxing-gibbous-5"           . "\xf0a1")
+    ("moon-waxing-gibbous-6"           . "\xf0a2")
+    ("moonrise"                        . "\xf0c9")
+    ("moonset"                         . "\xf0ca")
+    ("na"                              . "\xf07b")
+    ("night-alt-cloudy"                . "\xf086")
+    ("night-alt-cloudy-gusts"          . "\xf022")
+    ("night-alt-cloudy-high"           . "\xf07e")
+    ("night-alt-cloudy-windy"          . "\xf023")
+    ("night-alt-hail"                  . "\xf024")
+    ("night-alt-lightning"             . "\xf025")
+    ("night-alt-partly-cloudy"         . "\xf081")
+    ("night-alt-rain"                  . "\xf028")
+    ("night-alt-rain-mix"              . "\xf026")
+    ("night-alt-rain-wind"             . "\xf027")
+    ("night-alt-showers"               . "\xf029")
+    ("night-alt-sleet"                 . "\xf0b4")
+    ("night-alt-sleet-storm"           . "\xf06a")
+    ("night-alt-snow"                  . "\xf02a")
+    ("night-alt-snow-thunderstorm"     . "\xf06d")
+    ("night-alt-snow-wind"             . "\xf067")
+    ("night-alt-sprinkle"              . "\xf02b")
+    ("night-alt-storm-showers"         . "\xf02c")
+    ("night-alt-thunderstorm"          . "\xf02d")
+    ("night-clear"                     . "\xf02e")
+    ("night-cloudy"                    . "\xf031")
+    ("night-cloudy-gusts"              . "\xf02f")
+    ("night-cloudy-high"               . "\xf080")
+    ("night-cloudy-windy"              . "\xf030")
+    ("night-fog"                       . "\xf04a")
+    ("night-hail"                      . "\xf032")
+    ("night-lightning"                 . "\xf033")
+    ("night-partly-cloudy"             . "\xf083")
+    ("night-rain"                      . "\xf036")
+    ("night-rain-mix"                  . "\xf034")
+    ("night-rain-wind"                 . "\xf035")
+    ("night-showers"                   . "\xf037")
+    ("night-sleet"                     . "\xf0b3")
+    ("night-sleet-storm"               . "\xf069")
+    ("night-snow"                      . "\xf038")
+    ("night-snow-thunderstorm"         . "\xf06c")
+    ("night-snow-wind"                 . "\xf066")
+    ("night-sprinkle"                  . "\xf039")
+    ("night-storm-showers"             . "\xf03a")
+    ("night-thunderstorm"              . "\xf03b")
+    ("owm-200"                         . "\xf01e")
+    ("owm-201"                         . "\xf01e")
+    ("owm-202"                         . "\xf01e")
+    ("owm-210"                         . "\xf016")
+    ("owm-211"                         . "\xf016")
+    ("owm-212"                         . "\xf016")
+    ("owm-221"                         . "\xf016")
+    ("owm-230"                         . "\xf01e")
+    ("owm-231"                         . "\xf01e")
+    ("owm-232"                         . "\xf01e")
+    ("owm-300"                         . "\xf01c")
+    ("owm-301"                         . "\xf01c")
+    ("owm-302"                         . "\xf019")
+    ("owm-310"                         . "\xf017")
+    ("owm-311"                         . "\xf019")
+    ("owm-312"                         . "\xf019")
+    ("owm-313"                         . "\xf01a")
+    ("owm-314"                         . "\xf019")
+    ("owm-321"                         . "\xf01c")
+    ("owm-500"                         . "\xf01c")
+    ("owm-501"                         . "\xf019")
+    ("owm-502"                         . "\xf019")
+    ("owm-503"                         . "\xf019")
+    ("owm-504"                         . "\xf019")
+    ("owm-511"                         . "\xf017")
+    ("owm-520"                         . "\xf01a")
+    ("owm-521"                         . "\xf01a")
+    ("owm-522"                         . "\xf01a")
+    ("owm-531"                         . "\xf01d")
+    ("owm-600"                         . "\xf01b")
+    ("owm-601"                         . "\xf01b")
+    ("owm-602"                         . "\xf0b5")
+    ("owm-611"                         . "\xf017")
+    ("owm-612"                         . "\xf017")
+    ("owm-615"                         . "\xf017")
+    ("owm-616"                         . "\xf017")
+    ("owm-620"                         . "\xf017")
+    ("owm-621"                         . "\xf01b")
+    ("owm-622"                         . "\xf01b")
+    ("owm-701"                         . "\xf01a")
+    ("owm-711"                         . "\xf062")
+    ("owm-721"                         . "\xf0b6")
+    ("owm-731"                         . "\xf063")
+    ("owm-741"                         . "\xf014")
+    ("owm-761"                         . "\xf063")
+    ("owm-762"                         . "\xf063")
+    ("owm-771"                         . "\xf011")
+    ("owm-781"                         . "\xf056")
+    ("owm-800"                         . "\xf00d")
+    ("owm-801"                         . "\xf011")
+    ("owm-802"                         . "\xf011")
+    ("owm-803"                         . "\xf012")
+    ("owm-804"                         . "\xf013")
+    ("owm-900"                         . "\xf056")
+    ("owm-901"                         . "\xf01d")
+    ("owm-902"                         . "\xf073")
+    ("owm-903"                         . "\xf076")
+    ("owm-904"                         . "\xf072")
+    ("owm-905"                         . "\xf021")
+    ("owm-906"                         . "\xf015")
+    ("owm-957"                         . "\xf050")
+    ("owm-day-200"                     . "\xf010")
+    ("owm-day-201"                     . "\xf010")
+    ("owm-day-202"                     . "\xf010")
+    ("owm-day-210"                     . "\xf005")
+    ("owm-day-211"                     . "\xf005")
+    ("owm-day-212"                     . "\xf005")
+    ("owm-day-221"                     . "\xf005")
+    ("owm-day-230"                     . "\xf010")
+    ("owm-day-231"                     . "\xf010")
+    ("owm-day-232"                     . "\xf010")
+    ("owm-day-300"                     . "\xf00b")
+    ("owm-day-301"                     . "\xf00b")
+    ("owm-day-302"                     . "\xf008")
+    ("owm-day-310"                     . "\xf008")
+    ("owm-day-311"                     . "\xf008")
+    ("owm-day-312"                     . "\xf008")
+    ("owm-day-313"                     . "\xf008")
+    ("owm-day-314"                     . "\xf008")
+    ("owm-day-321"                     . "\xf00b")
+    ("owm-day-500"                     . "\xf00b")
+    ("owm-day-501"                     . "\xf008")
+    ("owm-day-502"                     . "\xf008")
+    ("owm-day-503"                     . "\xf008")
+    ("owm-day-504"                     . "\xf008")
+    ("owm-day-511"                     . "\xf006")
+    ("owm-day-520"                     . "\xf009")
+    ("owm-day-521"                     . "\xf009")
+    ("owm-day-522"                     . "\xf009")
+    ("owm-day-531"                     . "\xf00e")
+    ("owm-day-600"                     . "\xf00a")
+    ("owm-day-601"                     . "\xf0b2")
+    ("owm-day-602"                     . "\xf00a")
+    ("owm-day-611"                     . "\xf006")
+    ("owm-day-612"                     . "\xf006")
+    ("owm-day-615"                     . "\xf006")
+    ("owm-day-616"                     . "\xf006")
+    ("owm-day-620"                     . "\xf006")
+    ("owm-day-621"                     . "\xf00a")
+    ("owm-day-622"                     . "\xf00a")
+    ("owm-day-701"                     . "\xf009")
+    ("owm-day-711"                     . "\xf062")
+    ("owm-day-721"                     . "\xf0b6")
+    ("owm-day-731"                     . "\xf063")
+    ("owm-day-741"                     . "\xf003")
+    ("owm-day-761"                     . "\xf063")
+    ("owm-day-762"                     . "\xf063")
+    ("owm-day-781"                     . "\xf056")
+    ("owm-day-800"                     . "\xf00d")
+    ("owm-day-801"                     . "\xf000")
+    ("owm-day-802"                     . "\xf000")
+    ("owm-day-803"                     . "\xf000")
+    ("owm-day-804"                     . "\xf00c")
+    ("owm-day-900"                     . "\xf056")
+    ("owm-day-902"                     . "\xf073")
+    ("owm-day-903"                     . "\xf076")
+    ("owm-day-904"                     . "\xf072")
+    ("owm-day-906"                     . "\xf004")
+    ("owm-day-957"                     . "\xf050")
+    ("owm-night-200"                   . "\xf02d")
+    ("owm-night-201"                   . "\xf02d")
+    ("owm-night-202"                   . "\xf02d")
+    ("owm-night-210"                   . "\xf025")
+    ("owm-night-211"                   . "\xf025")
+    ("owm-night-212"                   . "\xf025")
+    ("owm-night-221"                   . "\xf025")
+    ("owm-night-230"                   . "\xf02d")
+    ("owm-night-231"                   . "\xf02d")
+    ("owm-night-232"                   . "\xf02d")
+    ("owm-night-300"                   . "\xf02b")
+    ("owm-night-301"                   . "\xf02b")
+    ("owm-night-302"                   . "\xf028")
+    ("owm-night-310"                   . "\xf028")
+    ("owm-night-311"                   . "\xf028")
+    ("owm-night-312"                   . "\xf028")
+    ("owm-night-313"                   . "\xf028")
+    ("owm-night-314"                   . "\xf028")
+    ("owm-night-321"                   . "\xf02b")
+    ("owm-night-500"                   . "\xf02b")
+    ("owm-night-501"                   . "\xf028")
+    ("owm-night-502"                   . "\xf028")
+    ("owm-night-503"                   . "\xf028")
+    ("owm-night-504"                   . "\xf028")
+    ("owm-night-511"                   . "\xf026")
+    ("owm-night-520"                   . "\xf029")
+    ("owm-night-521"                   . "\xf029")
+    ("owm-night-522"                   . "\xf029")
+    ("owm-night-531"                   . "\xf02c")
+    ("owm-night-600"                   . "\xf02a")
+    ("owm-night-601"                   . "\xf0b4")
+    ("owm-night-602"                   . "\xf02a")
+    ("owm-night-611"                   . "\xf026")
+    ("owm-night-612"                   . "\xf026")
+    ("owm-night-615"                   . "\xf026")
+    ("owm-night-616"                   . "\xf026")
+    ("owm-night-620"                   . "\xf026")
+    ("owm-night-621"                   . "\xf02a")
+    ("owm-night-622"                   . "\xf02a")
+    ("owm-night-701"                   . "\xf029")
+    ("owm-night-711"                   . "\xf062")
+    ("owm-night-721"                   . "\xf0b6")
+    ("owm-night-731"                   . "\xf063")
+    ("owm-night-741"                   . "\xf04a")
+    ("owm-night-761"                   . "\xf063")
+    ("owm-night-762"                   . "\xf063")
+    ("owm-night-781"                   . "\xf056")
+    ("owm-night-800"                   . "\xf02e")
+    ("owm-night-801"                   . "\xf022")
+    ("owm-night-802"                   . "\xf022")
+    ("owm-night-803"                   . "\xf022")
+    ("owm-night-804"                   . "\xf086")
+    ("owm-night-900"                   . "\xf056")
+    ("owm-night-902"                   . "\xf073")
+    ("owm-night-903"                   . "\xf076")
+    ("owm-night-904"                   . "\xf072")
+    ("owm-night-906"                   . "\xf024")
+    ("owm-night-957"                   . "\xf050")
+    ("rain"                            . "\xf019")
+    ("rain-mix"                        . "\xf017")
+    ("rain-wind"                       . "\xf018")
+    ("raindrop"                        . "\xf078")
+    ("raindrops"                       . "\xf04e")
+    ("refresh"                         . "\xf04c")
+    ("refresh-alt"                     . "\xf04b")
+    ("sandstorm"                       . "\xf082")
+    ("showers"                         . "\xf01a")
+    ("sleet"                           . "\xf0b5")
+    ("small-craft-advisory"            . "\xf0cc")
+    ("smog"                            . "\xf074")
+    ("smoke"                           . "\xf062")
+    ("snow"                            . "\xf01b")
+    ("snow"                            . "\xf01b")
+    ("snow-wind"                       . "\xf064")
+    ("snowflake-cold"                  . "\xf076")
+    ("solar-eclipse"                   . "\xf06e")
+    ("sprinkle"                        . "\xf01c")
+    ("stars"                           . "\xf077")
+    ("storm-showers"                   . "\xf01d")
+    ("storm-showers"                   . "\xf01d")
+    ("storm-warning"                   . "\xf0ce")
+    ("strong-wind"                     . "\xf050")
+    ("sunrise"                         . "\xf051")
+    ("sunset"                          . "\xf052")
+    ("thermometer"                     . "\xf055")
+    ("thermometer-exterior"            . "\xf053")
+    ("thermometer-internal"            . "\xf054")
+    ("thunderstorm"                    . "\xf01e")
+    ("thunderstorm"                    . "\xf01e")
+    ("time-1"                          . "\xf08a")
+    ("time-10"                         . "\xf093")
+    ("time-11"                         . "\xf094")
+    ("time-12"                         . "\xf089")
+    ("time-2"                          . "\xf08b")
+    ("time-3"                          . "\xf08c")
+    ("time-4"                          . "\xf08d")
+    ("time-5"                          . "\xf08e")
+    ("time-6"                          . "\xf08f")
+    ("time-7"                          . "\xf090")
+    ("time-8"                          . "\xf091")
+    ("time-9"                          . "\xf092")
+    ("tornado"                         . "\xf056")
+    ("train"                           . "\xf0cb")
+    ("tsunami"                         . "\xf0c5")
+    ("umbrella"                        . "\xf084")
+    ("volcano"                         . "\xf0c8")
+    ("wind-beaufort-0"                 . "\xf0b7")
+    ("wind-beaufort-1"                 . "\xf0b8")
+    ("wind-beaufort-10"                . "\xf0c1")
+    ("wind-beaufort-11"                . "\xf0c2")
+    ("wind-beaufort-12"                . "\xf0c3")
+    ("wind-beaufort-2"                 . "\xf0b9")
+    ("wind-beaufort-3"                 . "\xf0ba")
+    ("wind-beaufort-4"                 . "\xf0bb")
+    ("wind-beaufort-5"                 . "\xf0bc")
+    ("wind-beaufort-6"                 . "\xf0bd")
+    ("wind-beaufort-7"                 . "\xf0be")
+    ("wind-beaufort-8"                 . "\xf0bf")
+    ("wind-beaufort-9"                 . "\xf0c0")
+    ("wind-direction"                  . "\xf0b1")
+    ("windy"                           . "\xf021")
+    ("wmo4680-00"                      . "\xf055")
+    ("wmo4680-01"                      . "\xf013")
+    ("wmo4680-02"                      . "\xf055")
+    ("wmo4680-03"                      . "\xf013")
+    ("wmo4680-04"                      . "\xf014")
+    ("wmo4680-05"                      . "\xf014")
+    ("wmo4680-10"                      . "\xf014")
+    ("wmo4680-11"                      . "\xf014")
+    ("wmo4680-12"                      . "\xf016")
+    ("wmo4680-18"                      . "\xf050")
+    ("wmo4680-20"                      . "\xf014")
+    ("wmo4680-21"                      . "\xf017")
+    ("wmo4680-22"                      . "\xf017")
+    ("wmo4680-23"                      . "\xf019")
+    ("wmo4680-24"                      . "\xf01b")
+    ("wmo4680-25"                      . "\xf015")
+    ("wmo4680-26"                      . "\xf01e")
+    ("wmo4680-27"                      . "\xf063")
+    ("wmo4680-28"                      . "\xf063")
+    ("wmo4680-29"                      . "\xf063")
+    ("wmo4680-30"                      . "\xf014")
+    ("wmo4680-31"                      . "\xf014")
+    ("wmo4680-32"                      . "\xf014")
+    ("wmo4680-33"                      . "\xf014")
+    ("wmo4680-34"                      . "\xf014")
+    ("wmo4680-35"                      . "\xf014")
+    ("wmo4680-40"                      . "\xf017")
+    ("wmo4680-41"                      . "\xf01c")
+    ("wmo4680-42"                      . "\xf019")
+    ("wmo4680-43"                      . "\xf01c")
+    ("wmo4680-44"                      . "\xf019")
+    ("wmo4680-45"                      . "\xf015")
+    ("wmo4680-46"                      . "\xf015")
+    ("wmo4680-47"                      . "\xf01b")
+    ("wmo4680-48"                      . "\xf01b")
+    ("wmo4680-50"                      . "\xf01c")
+    ("wmo4680-51"                      . "\xf01c")
+    ("wmo4680-52"                      . "\xf019")
+    ("wmo4680-53"                      . "\xf019")
+    ("wmo4680-54"                      . "\xf076")
+    ("wmo4680-55"                      . "\xf076")
+    ("wmo4680-56"                      . "\xf076")
+    ("wmo4680-57"                      . "\xf01c")
+    ("wmo4680-58"                      . "\xf019")
+    ("wmo4680-60"                      . "\xf01c")
+    ("wmo4680-61"                      . "\xf01c")
+    ("wmo4680-62"                      . "\xf019")
+    ("wmo4680-63"                      . "\xf019")
+    ("wmo4680-64"                      . "\xf015")
+    ("wmo4680-65"                      . "\xf015")
+    ("wmo4680-66"                      . "\xf015")
+    ("wmo4680-67"                      . "\xf017")
+    ("wmo4680-68"                      . "\xf017")
+    ("wmo4680-70"                      . "\xf01b")
+    ("wmo4680-71"                      . "\xf01b")
+    ("wmo4680-72"                      . "\xf01b")
+    ("wmo4680-73"                      . "\xf01b")
+    ("wmo4680-74"                      . "\xf076")
+    ("wmo4680-75"                      . "\xf076")
+    ("wmo4680-76"                      . "\xf076")
+    ("wmo4680-77"                      . "\xf01b")
+    ("wmo4680-78"                      . "\xf076")
+    ("wmo4680-80"                      . "\xf019")
+    ("wmo4680-81"                      . "\xf01c")
+    ("wmo4680-82"                      . "\xf019")
+    ("wmo4680-83"                      . "\xf019")
+    ("wmo4680-84"                      . "\xf01d")
+    ("wmo4680-85"                      . "\xf017")
+    ("wmo4680-86"                      . "\xf017")
+    ("wmo4680-87"                      . "\xf017")
+    ("wmo4680-89"                      . "\xf015")
+    ("wmo4680-90"                      . "\xf016")
+    ("wmo4680-91"                      . "\xf01d")
+    ("wmo4680-92"                      . "\xf01e")
+    ("wmo4680-93"                      . "\xf01e")
+    ("wmo4680-94"                      . "\xf016")
+    ("wmo4680-95"                      . "\xf01e")
+    ("wmo4680-96"                      . "\xf01e")
+    ("wmo4680-99"                      . "\xf056")
+    ("wu-chanceflurries"               . "\xf064")
+    ("wu-chancerain"                   . "\xf019")
+    ("wu-chancesleat"                  . "\xf0b5")
+    ("wu-chancesnow"                   . "\xf01b")
+    ("wu-chancetstorms"                . "\xf01e")
+    ("wu-clear"                        . "\xf00d")
+    ("wu-cloudy"                       . "\xf002")
+    ("wu-flurries"                     . "\xf064")
+    ("wu-hazy"                         . "\xf0b6")
+    ("wu-mostlycloudy"                 . "\xf002")
+    ("wu-mostlysunny"                  . "\xf00d")
+    ("wu-partlycloudy"                 . "\xf002")
+    ("wu-partlysunny"                  . "\xf00d")
+    ("wu-rain"                         . "\xf01a")
+    ("wu-sleat"                        . "\xf0b5")
+    ("wu-snow"                         . "\xf01b")
+    ("wu-sunny"                        . "\xf00d")
+    ("wu-tstorms"                      . "\xf01e")
+    ("wu-unknown"                      . "\xf00d")
+    ("yahoo-0"                         . "\xf056")
+    ("yahoo-1"                         . "\xf00e")
+    ("yahoo-10"                        . "\xf015")
+    ("yahoo-11"                        . "\xf01a")
+    ("yahoo-12"                        . "\xf01a")
+    ("yahoo-13"                        . "\xf01b")
+    ("yahoo-14"                        . "\xf00a")
+    ("yahoo-15"                        . "\xf064")
+    ("yahoo-16"                        . "\xf01b")
+    ("yahoo-17"                        . "\xf015")
+    ("yahoo-18"                        . "\xf017")
+    ("yahoo-19"                        . "\xf063")
+    ("yahoo-2"                         . "\xf073")
+    ("yahoo-20"                        . "\xf014")
+    ("yahoo-21"                        . "\xf021")
+    ("yahoo-22"                        . "\xf062")
+    ("yahoo-23"                        . "\xf050")
+    ("yahoo-24"                        . "\xf050")
+    ("yahoo-25"                        . "\xf076")
+    ("yahoo-26"                        . "\xf013")
+    ("yahoo-27"                        . "\xf031")
+    ("yahoo-28"                        . "\xf002")
+    ("yahoo-29"                        . "\xf031")
+    ("yahoo-3"                         . "\xf01e")
+    ("yahoo-30"                        . "\xf002")
+    ("yahoo-31"                        . "\xf02e")
+    ("yahoo-32"                        . "\xf00d")
+    ("yahoo-3200"                      . "\xf077")
+    ("yahoo-33"                        . "\xf083")
+    ("yahoo-34"                        . "\xf00c")
+    ("yahoo-35"                        . "\xf017")
+    ("yahoo-36"                        . "\xf072")
+    ("yahoo-37"                        . "\xf00e")
+    ("yahoo-38"                        . "\xf00e")
+    ("yahoo-39"                        . "\xf00e")
+    ("yahoo-4"                         . "\xf01e")
+    ("yahoo-40"                        . "\xf01a")
+    ("yahoo-41"                        . "\xf064")
+    ("yahoo-42"                        . "\xf01b")
+    ("yahoo-43"                        . "\xf064")
+    ("yahoo-44"                        . "\xf00c")
+    ("yahoo-45"                        . "\xf00e")
+    ("yahoo-46"                        . "\xf01b")
+    ("yahoo-47"                        . "\xf00e")
+    ("yahoo-5"                         . "\xf017")
+    ("yahoo-6"                         . "\xf017")
+    ("yahoo-7"                         . "\xf017")
+    ("yahoo-8"                         . "\xf015")
+    ("yahoo-9"                         . "\xf01a")
+
+    ))
+
+(provide 'data-weathericons)
diff --git a/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-weathericons.elc b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-weathericons.elc
new file mode 100644
index 0000000..31798cf
Binary files /dev/null and b/emacs/.emacs.d/elpa/all-the-icons-20250527.927/data/data-weathericons.elc differ
diff --git a/emacs/.emacs.d/elpa/archives/elpa/archive-contents b/emacs/.emacs.d/elpa/archives/elpa/archive-contents
new file mode 100644
index 0000000..3bf94c9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/archives/elpa/archive-contents
@@ -0,0 +1,3847 @@
+(1
+ (a68-mode
+  . [(1 3) ((emacs (24 3))) "Major mode for editing Algol 68 code" tar
+     ((:url . "https://git.sr.ht/~jemarch/a68-mode")
+      (:keywords "languages")
+      (:maintainer "Jose E. Marchesi" . "jemarch@gnu.org")
+      (:authors ("Omar Polo" . "op@omarpolo.com"))
+      (:commit . "a35b2fec07dcf9c3550cebc7f75e13f240088db2"))])
+ (ace-window
+  . [(0 10 0) ((avy (0 5 0))) "Quickly switch windows." tar
+     ((:url . "https://github.com/abo-abo/ace-window")
+      (:keywords "window" "location")
+      (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com")
+      (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com"))
+      (:commit . "7003c88cd9cad58dc35c7cd13ebc61c355fb5be7"))])
+ (ack
+  . [(1 11) nil "interface to ack-like tools" tar
+     ((:url . "https://github.com/leoliu/ack-el")
+      (:keywords "tools" "processes" "convenience")
+      (:maintainer "João Távora" . "joaotavora@gmail.com")
+      (:authors ("Leo Liu" . "sdl.web@gmail.com"))
+      (:commit . "90c90a80322aa9f26ce88f2f24a224afc4c994b8"))])
+ (activities
+  . [(0 7 2) ((emacs (29 1)) (persist (0 6)))
+     "Save/restore sets of windows, tabs/frames, and their buffers"
+     tar
+     ((:url . "https://github.com/alphapapa/activities.el")
+      (:keywords "convenience")
+      (:maintainer "Adam Porter" . "adam@alphapapa.net")
+      (:authors ("Adam Porter" . "adam@alphapapa.net"))
+      (:commit . "a7e7842c615e149ad7d7e57f383936b49dcb129f"))])
+ (ada-mode
+  . [(8 1 0)
+     ((uniquify-files (1 0 4)) (wisi (4 3 0)) (gnat-compiler (1 0 3))
+      (emacs (25 3)))
+     "major-mode for editing Ada sources" tar
+     ((:url . "https://www.nongnu.org/ada-mode/")
+      (:keywords "languages" "ada")
+      (:maintainer "Stephen Leake" . "stephen_leake@stephe-leake.org")
+      (:authors ("Stephen Leake" . "stephen_leake@stephe-leake.org"))
+      (:commit . "357ac189bea640023e33214e8efe9288d9d1416c"))])
+ (ada-ref-man
+  . [(2020 1) nil "Ada Reference Manual 2012" tar
+     ((:url . "http://stephe-leake.org/ada/arm.html")
+      (:keywords "languages" "ada")
+      (:maintainer "Stephen Leake" . "stephen_leake@member.fsf.org")
+      (:authors ("Stephen Leake" . "stephen_leake@member.fsf.org"))
+      (:commit . "b86a173c1488989fd06f0b612e7b7acee9fda070"))])
+ (adaptive-wrap
+  . [(0 9) ((emacs (24 1))) "Smart line-wrapping with wrap-prefix" tar
+     ((:maintainer ("Stephen Berman" . "stephen.berman@gmx.net")
+		   ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:authors ("Stephen Berman" . "stephen.berman@gmx.net")
+		("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/adaptive-wrap.html")
+      (:commit . "e929b38c12f17aa6f8d6270326301d61fbb09cab"))])
+ (adjust-parens
+  . [(3 2) ((emacs (24 3)))
+     "Indent and dedent Lisp code, automatically adjust close parens"
+     tar
+     ((:maintainer "Barry O'Reilly" . "gundaetiapo@gmail.com")
+      (:authors ("Barry O'Reilly" . "gundaetiapo@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/adjust-parens.html")
+      (:commit . "a7e0ece3037821ea438fe401ade6d3c60b3d24e0"))])
+ (advice-patch
+  . [(0 1) ((emacs (24 4)))
+     "Use patches to advise the inside of functions" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/advice-patch.html")
+      (:commit . "b0575729f34d1c45f1b47d8793e84311a4770826"))])
+ (aggressive-completion
+  . [(1 8) ((emacs (27 1))) "Automatic minibuffer completion" tar
+     ((:keywords "minibuffer" "completion")
+      (:maintainer "Tassilo Horn" . "tsdh@gnu.org")
+      (:authors ("Tassilo Horn" . "tsdh@gnu.org"))
+      (:url
+       . "https://elpa.gnu.org/packages/aggressive-completion.html")
+      (:commit . "c1ead4f049f4cfc9a3a9f8fa567a83a4caa0614d"))])
+ (aggressive-indent
+  . [(1 10 0) ((emacs (24 3)))
+     "Minor mode to aggressively keep your code always indented" tar
+     ((:url . "https://github.com/Malabarba/aggressive-indent-mode")
+      (:keywords "indent" "lisp" "maint" "tools")
+      (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com")
+      (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com"))
+      (:commit . "cb416faf61c46977c06cf9d99525b04dc109a33c"))])
+ (ahungry-theme
+  . [(1 10 0) ((emacs (24)))
+     "Ahungry color theme for Emacs.  Make sure to (load-theme 'ahungry)."
+     tar
+     ((:url . "https://github.com/ahungry/color-theme-ahungry")
+      (:keywords "ahungry" "palette" "color" "theme" "emacs"
+		 "color-theme" "deftheme")
+      (:maintainer "Matthew Carter" . "m@ahungry.com")
+      (:authors ("Matthew Carter" . "m@ahungry.com"))
+      (:commit . "45bf75f17752c8e8dd4c8a4531c0aa419cdccb84"))])
+ (aircon-theme
+  . [(0 0 6) ((emacs (24 4))) "Cool and legible light theme" tar
+     ((:url . "https://git.sr.ht/~chambln/aircon-theme.el")
+      (:keywords "faces")
+      (:maintainer "Gregory Chamberlain"
+		   . "~chambln/public-inbox@lists.sr.ht")
+      (:authors ("Gregory Chamberlain" . "greg@cosine.blue"))
+      (:commit . "0cecd81e7f6631c91ed0437d801517677e018c1d"))])
+ (all
+  . [(1 1) ((emacs (24 3))) "Edit all lines matching a given regexp"
+     tar
+     ((:keywords "matching")
+      (:maintainer "Per Abrahamsen" . "per.abrahamsen@gmail.com")
+      (:authors ("Per Abrahamsen" . "per.abrahamsen@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/all.html")
+      (:commit . "55aa1ac8853d81040aec0b3a2bd43200923146fd"))])
+ (altcaps
+  . [(1 3 0) ((emacs (27 1)))
+     "Apply alternating letter casing to convey sarcasm or mockery"
+     tar
+     ((:url . "https://github.com/protesilaos/altcaps")
+      (:maintainer "Protesilaos Stavrou" . "info@protesilaos.com")
+      (:authors ("Protesilaos Stavrou" . "info@protesilaos.com"))
+      (:commit . "2606eafb4352a0c4a2d9f3a760ff234020772d8d"))])
+ (ampc
+  . [(0 2) nil "Asynchronous Music Player Controller" tar
+     ((:keywords "ampc" "mpc" "mpd")
+      (:maintainer "Christopher Schmidt"
+		   . "christopher@ch.ristopher.com")
+      (:authors
+       ("Christopher Schmidt" . "christopher@ch.ristopher.com"))
+      (:url . "https://elpa.gnu.org/packages/ampc.html")
+      (:commit . "70e1a282a9d91c3cab9d87e613259891e124aa35"))])
+ (arbitools
+  . [(0 977) ((cl-lib (0 5)))
+     "Package for chess tournaments administration" tar
+     ((:maintainer "David Gonzalez Gandara"
+		   . "dggandara@member.fsf.org")
+      (:authors
+       ("David Gonzalez Gandara" . "dggandara@member.fsf.org"))
+      (:url . "https://elpa.gnu.org/packages/arbitools.html")
+      (:commit . "93f48b7964909f92bdb410557a01db433826b95e"))])
+ (ascii-art-to-unicode
+  . [(1 13) nil "a small artist adjunct" tar
+     ((:url . "http://www.gnuvola.org/software/aa2u/")
+      (:keywords "ascii" "unicode" "box-drawing")
+      (:maintainer "Thien-Thi Nguyen" . "ttn@gnu.org")
+      (:authors ("Thien-Thi Nguyen" . "ttn@gnu.org"))
+      (:commit . "83ec71af9e1812df781b78f28fa9dac0ff7b61bc"))])
+ (assess
+  . [(0 7) ((emacs (24 4)) (m-buffer (0 15))) "Test support functions"
+     tar
+     ((:maintainer "Phillip Lord" . "phillip.lord@russet.org.uk")
+      (:authors ("Phillip Lord" . "phillip.lord@russet.org.uk"))
+      (:url . "https://elpa.gnu.org/packages/assess.html")
+      (:commit . "cadeb24a5d8261fad4bdfdc09e7d571cc395a6ca"))])
+ (async
+  . [(1 9 9) ((emacs (24 4))) "Asynchronous processing in Emacs" tar
+     ((:url . "https://github.com/jwiegley/emacs-async")
+      (:keywords "async")
+      (:maintainer "Thierry Volpiatto" . "thievol@posteo.net")
+      (:authors ("John Wiegley" . "jwiegley@gmail.com"))
+      (:commit . "f317b0c9c3e60a959f45d035ed5e31a78f1263ac"))])
+ (auctex
+  . [(14 1 2) ((emacs (28 1))) "Integrated environment for *TeX*" tar
+     ((:url . "https://www.gnu.org/software/auctex/")
+      (:keywords "tex" "latex" "texinfo" "context" "doctex"
+		 "preview-latex")
+      (:maintainer nil . "auctex-devel@gnu.org")
+      (:commit . "5850499d0182b4ca53c078e74711a13995651337"))])
+ (auctex-cont-latexmk
+  . [(0 3) ((emacs (29 3)) (auctex (14 0 5)))
+     "run latexmk continuously, report errors via Flymake" tar
+     ((:url . "https://github.com/ultronozm/auctex-cont-latexmk.el")
+      (:keywords "tex")
+      (:maintainer "Paul D. Nelson" . "nelson.paul.david@gmail.com")
+      (:authors ("Paul D. Nelson" . "nelson.paul.david@gmail.com"))
+      (:commit . "5bd2e6f96fad055e4c3f7d22109aa6573b927406"))])
+ (auctex-label-numbers
+  . [(0 3) ((emacs (27 1)) (auctex (14 0 5)))
+     "Numbering for LaTeX previews and folds" tar
+     ((:url . "https://github.com/ultronozm/auctex-label-numbers.el")
+      (:keywords "tex")
+      (:maintainer "Paul D. Nelson" . "nelson.paul.david@gmail.com")
+      (:authors ("Paul D. Nelson" . "nelson.paul.david@gmail.com"))
+      (:commit . "b399826caeb854073a5d3435133f5a77a7f9f683"))])
+ (aumix-mode
+  . [(7) nil "run the aumix program in a buffer" tar
+     ((:url . "http://user42.tuxfamily.org/aumix-mode/index.html")
+      (:keywords "multimedia" "mixer" "aumix")
+      (:maintainer "Kevin Ryde" . "user42_kevin@yahoo.com.au")
+      (:authors ("Kevin Ryde" . "user42_kevin@yahoo.com.au"))
+      (:commit . "72db1f3ee04f3d1db17487d5bd98466fcbad87fd"))])
+ (auth-source-xoauth2-plugin
+  . [(0 4 1) ((emacs (28 1)) (oauth2 (0 18)))
+     "Authentication source plugin for xoauth2" tar
+     ((:url . "https://gitlab.com/manphiz/auth-source-xoauth2-plugin")
+      (:maintainer "Xiyue Deng" . "manphiz@gmail.com")
+      (:authors ("Xiyue Deng" . "manphiz@gmail.com"))
+      (:commit . "8f7725ef7fce48a548f997aceebfdebcf1b4d214"))])
+ (auto-correct
+  . [(1 1 4) nil "Remembers and automatically fixes past corrections"
+     tar
+     ((:keywords "editing") (:maintainer "Ian Dunn" . "dunni@gnu.org")
+      (:authors ("Ian Dunn" . "dunni@gnu.org"))
+      (:url . "https://elpa.gnu.org/packages/auto-correct.html")
+      (:commit . "0d38425fad4cd96714c07cfa66983b20764ff518"))])
+ (auto-overlays
+  . [(0 10 10) ((cl-lib (0 5))) "Automatic regexp-delimited overlays"
+     tar
+     ((:url . "http://www.dr-qubit.org/tags/computing-code-emacs.html")
+      (:keywords "extensions")
+      (:maintainer "Toby Cubitt" . "toby-predictive@dr-qubit.org")
+      (:authors ("Toby Cubitt" . "toby-predictive@dr-qubit.org"))
+      (:commit . "0807a75d2606462ef636b737e8f3873f98141a82"))])
+ (autocrypt
+  . [(0 4 2) ((emacs (24 3))) "Autocrypt implementation" tar
+     ((:url . "https://git.sr.ht/~pkal/autocrypt") (:keywords "comm")
+      (:maintainer "Philip Kaludercic"
+		   . "~pkal/public-inbox@lists.sr.ht")
+      (:authors ("Philip Kaludercic" . "philipk@posteo.net"))
+      (:commit . "dc0223f11daf526621fda206b38bf06c29759c94"))])
+ (autorevert-tail-truncate
+  . [(1 0 1) ((emacs (29 1)))
+     "auto-revert-tail your files with RAM control" tar
+     ((:url
+       . "https://github.com/shipmints/autorevert-tail-truncate.el")
+      (:keywords "convenience" "tools" "log files" "autorevert")
+      (:maintainer "Stephane Marks" . "shipmints@gmail.com")
+      (:authors ("Stephane Marks" . "shipmints@gmail.com"))
+      (:commit . "b54df5838159abf760a48de2fd33b21cabd12e66"))])
+ (avy
+  . [(0 5 0) ((emacs (24 1)) (cl-lib (0 5)))
+     "Jump to arbitrary positions in visible text and select text quickly."
+     tar
+     ((:url . "https://github.com/abo-abo/avy")
+      (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com")
+      (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com"))
+      (:keywords "point" "location"))])
+ (bbdb
+  . [(3 2 2 4) ((emacs (24)) (cl-lib (0 5))) "Big Brother DataBase"
+     tar
+     ((:maintainer "Roland Winkler" . "winkler@gnu.org")
+      (:url . "https://elpa.gnu.org/packages/bbdb.html")
+      (:commit . "641ff1f309e65ac8bd9794bd5f72cfc9ffc297a4"))])
+ (beacon
+  . [(1 3 4) ((emacs (25 1)))
+     "Highlight the cursor whenever the window scrolls" tar
+     ((:url . "https://github.com/Malabarba/beacon")
+      (:keywords "convenience")
+      (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com")
+      (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com"))
+      (:commit . "0cf8b60f62876f3e75653a5fb30d5d5cdd74c586"))])
+ (beframe
+  . [(1 5 0) ((emacs (28 1))) "Isolate buffers per frame" tar
+     ((:url . "https://github.com/protesilaos/beframe")
+      (:maintainer "Protesilaos Stavrou" . "info@protesilaos.com")
+      (:authors ("Protesilaos Stavrou" . "info@protesilaos.com"))
+      (:commit . "68260beb5d60600a75d6e5b54eb1e5e9cf8c6eac"))])
+ (bicep-ts-mode
+  . [(0 1 4) nil "tree-sitter support for Bicep" tar
+     ((:url . "https://github.com/josteink/bicep-ts-mode")
+      (:keywords "bicep" "languages" "tree-sitter")
+      (:maintainer "Jostein Kjønigsen" . "jostein@kjonigsen.net")
+      (:authors ("Jostein Kjønigsen" . "jostein@kjonigsen.net"))
+      (:commit . "625d03d1f63e4a35a9e62dd4d8b06d80134109d8"))])
+ (bind-key
+  . [(2 4 1) nil "A simple way to manage personal keybindings" tar
+     ((:url . "https://github.com/jwiegley/use-package")
+      (:keywords "keys" "keybinding" "config" "dotemacs")
+      (:maintainer "John Wiegley" . "johnw@newartisans.com")
+      (:authors ("John Wiegley" . "johnw@newartisans.com"))
+      (:commit . "4932ed21d40f9e8ad48ad2a1f086fdf9b3847ac9"))])
+ (blist
+  . [(0 6) ((ilist (0 4)) (emacs (24)))
+     "Display bookmarks in an ibuffer way" tar
+     ((:url . "https://gitlab.com/mmemmew/blist")
+      (:keywords "convenience")
+      (:maintainer "Durand" . "durand@jsdurand.xyz")
+      (:authors ("Durand" . "durand@jsdurand.xyz"))
+      (:commit . "e3894193fd7602483e0132b82f1b0afbcebe654d"))])
+ (bluetooth
+  . [(0 4 1)
+     ((emacs (26 1)) (dash (2 18 1)) (compat (30 0 0 0))
+      (transient (0 5 0)))
+     "A mode for interacting with Bluetooth devices" tar
+     ((:url . "https://codeberg.org/rstocker/emacs-bluetooth")
+      (:keywords "hardware")
+      (:maintainer "Raffael Stocker" . "r.stocker@mnet-mail.de")
+      (:authors ("Raffael Stocker" . "r.stocker@mnet-mail.de")
+		("Etienne Prud homme" . "e.e.f.prudhomme@gmail.com"))
+      (:commit . "db880e306e00f51e5456b7388371ad6329452165"))])
+ (bnf-mode
+  . [(0 4 5) ((cl-lib (0 5)) (emacs (24 3)))
+     "Major mode for editing BNF grammars." tar
+     ((:url . "https://github.com/sergeyklay/bnf-mode")
+      (:keywords "languages")
+      (:maintainer "Serghei Iakovlev" . "egrep@protonmail.ch")
+      (:authors ("Serghei Iakovlev" . "egrep@protonmail.ch"))
+      (:commit . "a4fe013fc945d8396930bc6d0dcc1cf9d7102f41"))])
+ (boxy
+  . [(2 0 1) ((emacs (26 1))) "A boxy layout framework" tar
+     ((:url . "https://codeberg.org/strawburster/boxy")
+      (:keywords "tools")
+      (:maintainer "Amy Pillow" . "amypillow@lavache.com")
+      (:authors ("Amy Pillow" . "amypillow@lavache.com"))
+      (:commit . "793e3d65ffb970fa8b52e89d25e7ea5e6f39508a"))])
+ (boxy-headings
+  . [(2 1 11) ((emacs (26 1)) (boxy (2 0)) (org (9 4)))
+     "View org files in a boxy diagram" tar
+     ((:url . "https://codeberg.org/strawburster/boxy-headings")
+      (:keywords "tools")
+      (:maintainer "Amy Pillow" . "amypillow@lavache.com")
+      (:authors ("Amy Pillow" . "amypillow@lavache.com"))
+      (:commit . "08e1c84dee28f87010f50cb4e9a48c0798c8912b"))])
+ (breadcrumb
+  . [(1 0 1) ((emacs (28 1)) (project (0 9 8)))
+     "project and imenu-based breadcrumb paths" tar
+     ((:maintainer "João Távora" . "joaotavora@gmail.com")
+      (:authors ("João Távora" . "joaotavora@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/breadcrumb.html")
+      (:commit . "ff5fb77e2556c42aee9f1131f824bdfb955d861f"))])
+ (brief
+  . [(5 92) ((nadvice (0 3)) (cl-lib (0 5)))
+     "Brief Editor Emulator (Brief Mode)" tar
+     ((:keywords "brief" "emulations" "crisp")
+      (:maintainer "Luke Lee" . "luke.yx.lee@gmail.com")
+      (:authors ("Luke Lee" . "luke.yx.lee@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/brief.html")
+      (:commit . "58c2f484100fecd89248c476e3baf222cda5c7c7"))])
+ (buffer-env
+  . [(0 6) ((emacs (27 1)) (compat (29 1)))
+     "Buffer-local process environments" tar
+     ((:url . "https://github.com/astoff/buffer-env")
+      (:keywords "processes" "tools")
+      (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com")
+      (:authors ("Augusto Stoffel" . "arstoffel@gmail.com"))
+      (:commit . "3814bdf3585ffffea3014b1d01549894ec1aa897"))])
+ (buffer-expose
+  . [(0 4 3) ((emacs (25)) (cl-lib (0 5)))
+     "Visual buffer switching using a window grid" tar
+     ((:url . "https://github.com/clemera/buffer-expose")
+      (:keywords "convenience")
+      (:maintainer "Clemens Radermacher" . "clemera@posteo.net")
+      (:authors ("Clemens Radermacher" . "clemera@posteo.net"))
+      (:commit . "c4a1c745123b86c15ba7bb4858255b5252e8440a"))])
+ (bufferlo
+  . [(1 2) ((emacs (29 1)))
+     "Frame/Tab Local Buffer Lists with Persistence" tar
+     ((:url . "https://github.com/florommel/bufferlo")
+      (:keywords "buffer" "frame" "tabs" "local")
+      (:maintainer ("Florian Rommel" . "mail@florommel.de")
+		   ("Stephane Marks" . "shipmints@gmail.com"))
+      (:authors ("Florian Rommel" . "mail@florommel.de")
+		("Stephane Marks" . "shipmints@gmail.com"))
+      (:commit . "8fc587ba341b2ec8189b4d948accc90140469147"))])
+ (buframe
+  . [(0 3) ((emacs (27 1)) (timeout (2 1))) "Buffer-local frames" tar
+     ((:url . "https://github.com/haji-ali/buframe")
+      (:keywords "buffer" "frames" "convenience")
+      (:maintainer "Al Haji-Ali" . "abdo.haji.ali@gmail.com")
+      (:authors ("Al Haji-Ali" . "abdo.haji.ali@gmail.com"))
+      (:commit . "b6a92c96ea5c71247c94610b873bae47dfc898bb"))])
+ (bug-hunter
+  . [(1 3 1) ((seq (1 3)) (cl-lib (0 5)))
+     "Hunt down errors by bisecting elisp files" tar
+     ((:url . "https://github.com/Malabarba/elisp-bug-hunter")
+      (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com")
+      (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com"))
+      (:keywords "lisp"))])
+ (buildbot
+  . [(0 0 1) ((emacs (28))) "A Buildbot client for emacs" tar
+     ((:url . "https://g.ypei.me/buildbot.el.git")
+      (:keywords "buildbot" "continuous integration")
+      (:maintainer "Yuchen Pei" . "id@ypei.org")
+      (:authors ("Yuchen Pei" . "id@ypei.org"))
+      (:commit . "d614eea91ca5717c2b0019dae8c85e6a24873f39"))])
+ (calibre
+  . [(1 5 2) ((emacs (27 1)) (compat (29 1 4 1)))
+     "Interact with Calibre libraries from Emacs" tar
+     ((:url . "https://git.disroot.org/kjartanoli/calibre.el")
+      (:maintainer "Kjartan Oli Agustsson" . "kjartanoli@disroot.org")
+      (:authors ("Kjartan Oli Agustsson" . "kjartanoli@disroot.org"))
+      (:commit . "5f13266520c6135510bf214f67e084e39a97e3b3"))])
+ (cape
+  . [(2 9) ((emacs (29 1)) (compat (31)))
+     "Completion At Point Extensions" tar
+     ((:url . "https://github.com/minad/cape")
+      (:keywords "abbrev" "convenience" "matching" "completion" "text")
+      (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de")
+      (:authors ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:commit . "f0135abaf95a22b9fb2c951751a5d0733ce61bbd"))])
+ (capf-autosuggest
+  . [(0 3) ((emacs (25 1)))
+     "History autosuggestions for comint and eshell" tar
+     ((:url . "https://repo.or.cz/emacs-capf-autosuggest.git")
+      (:maintainer "jakanakaevangeli" . "jakanakaevangeli@chiru.no")
+      (:authors ("jakanakaevangeli" . "jakanakaevangeli@chiru.no"))
+      (:commit . "6d66f0ce52c6a41945a48e7b562dd6d262c62cd9"))])
+ (caps-lock
+  . [(1 0) nil "Caps-lock as a minor mode" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/caps-lock.html")
+      (:commit . "ce94899c7619e748e8a811ad8cdeb09918e7ecd8"))])
+ (captain
+  . [(1 0 3) nil "CAPiTalization is Automatic IN emacs" tar
+     ((:keywords "editing") (:maintainer "Ian Dunn" . "dunni@gnu.org")
+      (:authors ("Ian Dunn" . "dunni@gnu.org"))
+      (:url . "https://elpa.gnu.org/packages/captain.html")
+      (:commit . "a341d4cf3288ebae410c1c9124b82a9e421f3779"))])
+ (chess
+  . [(2 0 5) ((cl-lib (0 5))) "Play chess in GNU Emacs" tar
+     ((:keywords "games")
+      (:maintainer "Mario Lang" . "mlang@delysid.org")
+      (:authors ("John Wiegley" . "johnw@gnu.org"))
+      (:url . "https://elpa.gnu.org/packages/chess.html")
+      (:commit . "c98602f7b1aa7b74c708008209e698d0886a529c"))])
+ (cl-generic
+  . [(0 3) nil "Forward cl-generic compatibility for Emacs<25" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/cl-generic.html")
+      (:commit . "d90985eee35afd48b96aa8f14e0d0c8a67ce62c9"))])
+ (cl-lib
+  . [(0 7 1) nil "Forward cl-lib compatibility library for Emacs<24.3"
+     tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/cl-lib.html")
+      (:commit . "80dc6223f2e25db1f4b38d5c48365553abd793fc"))])
+ (clipboard-collector
+  . [(0 3) ((emacs (25)))
+     "Collect clipboard entries according to regex rules" tar
+     ((:url . "https://github.com/clemera/clipboard-collector")
+      (:keywords "convenience")
+      (:maintainer "Clemens Radermacher" . "clemera@posteo.net")
+      (:authors ("Clemens Radermacher" . "clemera@posteo.net"))
+      (:commit . "ee4a0ee506c47666714cd61649334936d67e5a43"))])
+ (cm-mode
+  . [(1 10) ((emacs (25 1)) (cl-lib (0 5)))
+     "Minor mode for CriticMarkup" tar
+     ((:keywords "text" "markdown")
+      (:maintainer "Joost Kremers" . "joostkremers@fastmail.fm")
+      (:authors ("Joost Kremers" . "joostkremers@fastmail.fm"))
+      (:url . "https://elpa.gnu.org/packages/cm-mode.html")
+      (:commit . "a5816175548a821bf62d374b40d6974e4956c44b"))])
+ (cobol-mode
+  . [(1 1) ((cl-lib (0 5))) "Mode for editing COBOL code" tar
+     ((:keywords "languages")
+      (:maintainer "Edward Hart" . "edward.dan.hart@gmail.com")
+      (:authors ("Edward Hart" . "edward.dan.hart@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/cobol-mode.html")
+      (:commit . "bd7879daa71908616277688ba51d27b60c88b0a2"))])
+ (code-cells
+  . [(0 5) ((emacs (27 1)) (compat (29 1)))
+     "Lightweight notebooks with support for ipynb files" tar
+     ((:url . "https://github.com/astoff/code-cells.el")
+      (:keywords "convenience" "outlines")
+      (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com")
+      (:authors ("Augusto Stoffel" . "arstoffel@gmail.com"))
+      (:commit . "caffb420be106cebbdfe4474ed0507a601603f83"))])
+ (colorful-mode
+  . [(1 2 5) ((emacs (28 1)) (compat (30 1 0 0)))
+     "Preview any color in your buffer in real time" tar
+     ((:url . "https://github.com/DevelopmentCool2449/colorful-mode")
+      (:keywords "faces" "tools" "matching" "convenience")
+      (:maintainer ("Jen-Chieh" . "jcs090218@gmail.com")
+		   ("Elias G. Perez" . "eg642616@gmail.com"))
+      (:authors ("Elias G. Perez" . "eg642616@gmail.com"))
+      (:commit . "484d1b8e7c3e98ef7ccf99eddfcea2e30f5c63a2"))])
+ (comint-mime
+  . [(0 7) ((emacs (28 1)) (compat (29 1)) (mathjax (0 1)))
+     "Display content of various MIME types in comint buffers" tar
+     ((:url . "https://github.com/astoff/comint-mime")
+      (:keywords "processes" "multimedia")
+      (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com")
+      (:authors ("Augusto Stoffel" . "arstoffel@gmail.com"))
+      (:commit . "5e7b609a4f8c4ba8ec6d1d994c01143b79b93c33"))])
+ (compact-docstrings
+  . [(0 2) nil "Shrink blank lines in docstrings and doc comments" tar
+     ((:url . "https://github.com/cpitclaudel/compact-docstrings")
+      (:keywords "convenience" "faces" "lisp" "maint" "c")
+      (:maintainer "Clément Pit-Claudel"
+		   . "clement.pitclaudel@live.com")
+      (:authors
+       ("Clément Pit-Claudel" . "clement.pitclaudel@live.com"))
+      (:commit . "50b9ec928193f339c3c2ae20f088ea62cc82bb9d"))])
+ (company
+  . [(1 1 0) ((emacs (26 1)) (posframe (1 5 1)))
+     "Modular text completion framework" tar
+     ((:url . "http://company-mode.github.io/")
+      (:keywords "abbrev" "convenience" "matching")
+      (:maintainer "Dmitry Gutov" . "dmitry@gutov.dev")
+      (:commit . "1cc907ac9e46ae4209eb5a341131787e0c678406"))])
+ (company-ebdb
+  . [(1 1) ((company (0 9 4)) (ebdb (0 2)))
+     "company-mode completion backend for EBDB in message-mode" tar
+     ((:maintainer "Eric Abrahamsen" . "eric@ericabrahamsen.net")
+      (:authors ("Jan Tatarik" . "jan.tatarik@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/company-ebdb.html")
+      (:commit . "f4b8ad408a068f2c3d07782cb111db4d62fd69d8"))])
+ (company-math
+  . [(1 5 1) ((company (0 8 0)) (math-symbol-lists (1 3)))
+     "Completion backends for unicode math symbols and latex tags" tar
+     ((:url . "https://github.com/vspinu/company-math")
+      (:keywords "unicode" "symbols" "completion")
+      (:maintainer "Vitalie Spinu" . "spinuvit@gmail.com")
+      (:authors ("Vitalie Spinu" . "spinuvit@gmail.com"))
+      (:commit . "3eb006874e309ff4076d947fcbd61bb6806aa508"))])
+ (company-statistics
+  . [(0 2 3) ((emacs (24 3)) (company (0 8 5)))
+     "Sort candidates using completion history" tar
+     ((:url . "https://github.com/company-mode/company-statistics")
+      (:keywords "abbrev" "convenience" "matching")
+      (:maintainer "Ingo Lohmar" . "i.lohmar@gmail.com")
+      (:authors ("Ingo Lohmar" . "i.lohmar@gmail.com"))
+      (:commit . "e62157d43b2c874d2edbd547c3bdfb05d0a7ae5c"))])
+ (compat
+  . [(31 0 0 2) ((emacs (25 1))) "Emacs Lisp Compatibility Library"
+     tar
+     ((:url . "https://github.com/emacs-compat/compat")
+      (:keywords "lisp" "maint")
+      (:maintainer ("Philip Kaludercic" . "philipk@posteo.net")
+		   ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:authors ("Philip Kaludercic" . "philipk@posteo.net")
+		("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:commit . "df03e91f1fc47503ca71e11dd507ed18ca8b5ab0"))])
+ (cond-star
+  . [(1 0) ((emacs (24 3))) "Extended form of `cond' construct" tar
+     ((:maintainer "Richard Stallman" . "rms@gnu.org")
+      (:url . "https://elpa.gnu.org/packages/cond-star.html")
+      (:commit . "4719df9f42c157e2683ac641883cff5efaa480bc"))])
+ (constants
+  . [(2 11 1) ((emacs (24 1)))
+     "Enter definition of constants into source code" tar
+     ((:url . "https://github.com/cdominik/constants-for-Emacs")
+      (:keywords "programming" "languages")
+      (:maintainer "Carsten Dominik" . "carsten.dominik@gmail.com")
+      (:authors ("Carsten Dominik" . "carsten.dominik@gmail.com"))
+      (:commit . "f07e221d4d5597c7ccf4b0003c0909a88bdfcc9e"))])
+ (consult
+  . [(3 7) ((emacs (29 1)) (compat (31)))
+     "Search and navigate via completing-read" tar
+     ((:url . "https://github.com/minad/consult")
+      (:keywords "matching" "files" "completion")
+      (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de")
+      (:commit . "3ddec5493bce5445f099537be50b7a4f79c68321"))])
+ (consult-denote
+  . [(0 5 1) ((emacs (28 1)) (denote (4 0 0)) (consult (2 2)))
+     "Use Consult in tandem with Denote" tar
+     ((:url . "https://github.com/protesilaos/consult-denote")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "0fbd723e7f4d824902b0a4b712b92c66a1eaf97e"))])
+ (consult-hoogle
+  . [(0 8 0) ((emacs (28 1)) (consult (2 0)))
+     "Hoogle frontend using consult" tar
+     ((:url . "https://codeberg.org/rahguzar/consult-hoogle")
+      (:keywords "docs" "languages")
+      (:maintainer "rahguzar" . "rahguzar@mailbox.org")
+      (:authors ("rahguzar" . "rahguzar@mailbox.org"))
+      (:commit . "d6d3e9419980c0c385ae2e7a55b1e52e93103f87"))])
+ (consult-recoll
+  . [(1 0 0) ((emacs (26 1)) (consult (2 0)))
+     "Recoll queries using consult" tar
+     ((:url . "https://codeberg.org/jao/consult-recoll")
+      (:keywords "docs" "convenience")
+      (:maintainer "Jose A Ortega Ruiz" . "jao@gnu.org")
+      (:authors ("Jose A Ortega Ruiz" . "jao@gnu.org"))
+      (:commit . "eddbc7ba70439881e4781fa73fb0fb240e02fd3b"))])
+ (context-coloring
+  . [(8 1 0) ((emacs (24 3))) "Highlight by scope" tar
+     ((:url . "https://github.com/jacksonrayhamilton/context-coloring")
+      (:keywords "convenience" "faces" "tools")
+      (:maintainer "Jackson Ray Hamilton"
+		   . "jackson@jacksonrayhamilton.com")
+      (:authors
+       ("Jackson Ray Hamilton" . "jackson@jacksonrayhamilton.com"))
+      (:commit . "1b30a28857727202d1f6a027f83ad66151fb1e92"))])
+ (corfu
+  . [(2 14) ((emacs (29 1)) (compat (31)))
+     "COmpletion in Region FUnction" tar
+     ((:url . "https://github.com/minad/corfu")
+      (:keywords "abbrev" "convenience" "matching" "completion" "text")
+      (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de")
+      (:authors ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:commit . "75be36fe63e78c63ac71c32039ab07836bd532ac"))])
+ (coterm
+  . [(1 6) ((emacs (26 1)) (compat (28 1 2 0)))
+     "Terminal emulation for comint" tar
+     ((:url . "https://repo.or.cz/emacs-coterm.git")
+      (:keywords "processes")
+      (:maintainer "jakanakaevangeli" . "jakanakaevangeli@chiru.no")
+      (:authors ("jakanakaevangeli" . "jakanakaevangeli@chiru.no"))
+      (:commit . "d8e1b04cd359d9f27ab7c6dbf8cae90dde834085"))])
+ (counsel
+  . [(0 15 1) ((emacs (24 5)) (ivy (0 15 1)) (swiper (0 15 1)))
+     "Various completion functions using Ivy" tar
+     ((:url . "https://github.com/abo-abo/swiper")
+      (:keywords "convenience" "matching" "tools")
+      (:maintainer "Basil L. Contovounesios" . "basil@contovou.net")
+      (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com"))
+      (:commit . "72f47d4d1e6dcf89d59f5af65f365dd704efe9e5"))])
+ (cperl-mode
+  . [(32 0 50) ((emacs (26 1))) "Perl code editing commands" tar
+     ((:url . "https://github.com/HaraldJoerg/cperl-mode/issues/32")
+      (:keywords "languages")
+      (:maintainer nil . "emacs-devel@gnu.org")
+      (:authors ("Ilya Zakharevich" . "ilyaz@cpan.org")
+		("Jonathan Rockway" . "jon@jrock.us"))
+      (:commit . "ca03a4c3857b46f24613d1b4dc87299847fdaf19"))])
+ (cpio-mode
+  . [(0 17) nil "Handle cpio archives in the style of dired." tar
+     ((:keywords "files")
+      (:maintainer "Douglas Lewan" . "d.lewan2000@gmail.com")
+      (:authors ("Douglas Lewan" . "d.lewan2000@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/cpio-mode.html")
+      (:commit . "ce1183f52fa0cfc50145553804615e23d7d73046"))])
+ (cpupower
+  . [(1 0 5) nil "cpupower command interface" tar
+     ((:url . "https://gitlab.com/steve-emacs-stuff/cpupower-el")
+      (:keywords "hardware" "cpupower" "cpu" "frequency-scaling")
+      (:maintainer "Stephen Meister" . "pallagun@gmail.com")
+      (:authors ("Stephen Meister" . "pallagun@gmail.com"))
+      (:commit . "fa979dfafa1beb374bf42e937f0b5b99ed06222e"))])
+ (crdt
+  . [(0 3 5) nil
+     "Collaborative editing using Conflict-free Replicated Data Types"
+     tar
+     ((:url . "https://code.librehq.com/qhong/crdt.el")
+      (:keywords "collaboration" "crdt")
+      (:maintainer "Qiantan Hong" . "qhong@alum.mit.edu")
+      (:authors ("Qiantan Hong" . "qhong@alum.mit.edu"))
+      (:commit . "e6d42f42c5dedb73560048f4bf6263c63ffa21bb"))])
+ (crisp
+  . [(1 3 6) nil "CRiSP/Brief Emacs emulator" tar
+     ((:keywords "emulations" "brief" "crisp")
+      (:maintainer "Luke Lee" . "luke.yx.lee@gmail.com")
+      (:authors ("Gary D. Foster" . "Gary.Foster@Corp.Sun.COM"))
+      (:url . "https://elpa.gnu.org/packages/crisp.html")
+      (:commit . "810f057c640043ca9e419248b73f43d82b1a47a0"))])
+ (csharp-mode
+  . [(2 0 0) ((emacs (26 1))) "C# mode derived mode" tar
+     ((:url . "https://github.com/emacs-csharp/csharp-mode")
+      (:keywords "c#" "languages" "oop" "mode")
+      (:maintainer ("Jostein Kjønigsen" . "jostein@gmail.com")
+		   ("Theodor Thornhill" . "theo@thornhill.no"))
+      (:authors ("Theodor Thornhill" . "theo@thornhill.no"))
+      (:commit . "02c61c219b2c22491eff9b7315fed661fab423d4"))])
+ (csv-mode
+  . [(1 27) ((emacs (27 1)) (cl-lib (0 5)))
+     "Major mode for editing comma/char separated values" tar
+     ((:keywords "convenience")
+      (:maintainer nil . "emacs-devel@gnu.org")
+      (:authors ("Francis J. Wright" . "F.J.Wright@qmul.ac.uk"))
+      (:url . "https://elpa.gnu.org/packages/csv-mode.html")
+      (:commit . "a16e9d8b0952de1badf6da8e652b178a7f6c4498"))])
+ (cursor-undo
+  . [(1 1 5) nil "Undo Cursor Movement" tar
+     ((:keywords "undo" "cursor")
+      (:maintainer "Luke Lee" . "luke.yx.lee@gmail.com")
+      (:authors ("Luke Lee" . "luke.yx.lee@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/cursor-undo.html")
+      (:commit . "e82084c3d491ff7199e14cc8da69c250b9bda492"))])
+ (cursory
+  . [(1 2 0) ((emacs (29 1))) "Manage cursor styles using presets" tar
+     ((:url . "https://github.com/protesilaos/cursory")
+      (:keywords "convenience" "cursor")
+      (:maintainer "Protesilaos Stavrou" . "info@protesilaos.com")
+      (:authors ("Protesilaos Stavrou" . "info@protesilaos.com"))
+      (:commit . "892c3b81037ece0e1753ab058e3cfda93f985693"))])
+ (cycle-quotes
+  . [(0 1) nil "Cycle between quote styles" tar
+     ((:keywords "convenience")
+      (:maintainer "Simen Heggestøyl" . "simenheg@gmail.com")
+      (:authors ("Simen Heggestøyl" . "simenheg@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/cycle-quotes.html")
+      (:commit . "836b19b39651419876e65cdb1a91e3eef83cc4e7"))])
+ (dape
+  . [(0 27 1) ((emacs (29 1)) (jsonrpc (1 0 25)))
+     "Debug Adapter Protocol for Emacs" tar
+     ((:url . "https://github.com/svaante/dape")
+      (:maintainer "Daniel Pettersson" . "daniel@dpettersson.net")
+      (:commit . "dcbdffc68a3c89bbb89956161edde9f0fe062e64"))])
+ (darkroom
+  . [(0 3) ((cl-lib (0 5)))
+     "Remove visual distractions and focus on writing" tar
+     ((:keywords "convenience" "emulations")
+      (:maintainer "João Távora" . "joaotavora@gmail.com")
+      (:authors ("João Távora" . "joaotavora@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/darkroom.html")
+      (:commit . "4496945487130ae1123a9f17b40674ec24c54e8f"))])
+ (dash
+  . [(2 20 0) ((emacs (24))) "A modern list library for Emacs" tar
+     ((:url . "https://github.com/magnars/dash.el")
+      (:keywords "extensions" "lisp")
+      (:maintainer "Basil L. Contovounesios" . "basil@contovou.net")
+      (:authors ("Magnar Sveen" . "magnars@gmail.com"))
+      (:commit . "fcb5d831fc08a43f984242c7509870f30983c27c"))])
+ (dbus-codegen
+  . [(0 1) ((cl-lib (0 5))) "Lisp code generation for D-Bus." tar
+     ((:keywords "comm" "dbus" "convenience")
+      (:maintainer nil . "emacs-devel@gnu.org")
+      (:authors ("Daiki Ueno" . "ueno@gnu.org"))
+      (:url . "https://elpa.gnu.org/packages/dbus-codegen.html")
+      (:commit . "4b0d8525943ebba797e1ebaf97fd9a608aef5ec1"))])
+ (debbugs
+  . [(0 47) ((emacs (26 1)) (soap-client (3 1 5)))
+     "SOAP library to access debbugs servers" tar
+     ((:keywords "comm" "hypermedia")
+      (:maintainer "Michael Albinus" . "michael.albinus@gmx.de")
+      (:authors ("Michael Albinus" . "michael.albinus@gmx.de"))
+      (:url . "https://elpa.gnu.org/packages/debbugs.html")
+      (:commit . "a9ab46cddf1e51acfd02186cbf8610d978113206"))])
+ (delight
+  . [(1 7) ((cl-lib (0 5)) (nadvice (0 3)))
+     "A dimmer switch for your lighter text" tar
+     ((:url . "https://savannah.nongnu.org/projects/delight")
+      (:keywords "convenience")
+      (:maintainer "Phil Sainty" . "psainty@orcon.net.nz")
+      (:authors ("Phil Sainty" . "psainty@orcon.net.nz"))
+      (:commit . "a763ec1e5c2987efea3ce2ee6d9c979f56ab6528"))])
+ (denote
+  . [(4 2 3) ((emacs (28 1)))
+     "Simple notes with an efficient file-naming scheme" tar
+     ((:url . "https://github.com/protesilaos/denote")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "9fd6692a32a99e236c377f12f114b77a91417ac2"))])
+ (denote-journal
+  . [(0 3 0) ((emacs (28 1)) (denote (4 0 0)))
+     "Convenience functions for daily journaling with Denote" tar
+     ((:url . "https://github.com/protesilaos/denote-journal")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "374224ad2b3162c1fa92bb9ecdb61f157a781c4b"))])
+ (denote-markdown
+  . [(0 3 0) ((emacs (28 1)) (denote (4 0 0)))
+     "Extensions that better integrate Denote with Markdown" tar
+     ((:url . "https://github.com/protesilaos/denote-markdown")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "e46945b128b8ea7b3dd9e2c5af3f120045e9243a"))])
+ (denote-menu
+  . [(1 4 0) ((emacs (28 1)) (denote (3 0 0)))
+     "View denote files in a tabulated list." tar
+     ((:url . "https://github.com/namilus/denote-menu")
+      (:maintainer "Mohamed Suliman" . "sulimanm@tcd.ie")
+      (:authors ("Mohamed Suliman" . "sulimanm@tcd.ie"))
+      (:commit . "247a9b66d67b3fe409eda8f896feae87546f5b4d"))])
+ (denote-org
+  . [(0 3 0) ((emacs (28 1)) (denote (4 0 0)))
+     "Denote extensions for Org mode" tar
+     ((:url . "https://github.com/protesilaos/denote-org")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "b6b788db84fbf0c918bce6b3ce65508dd651bb4c"))])
+ (denote-review
+  . [(1 0 7) ((emacs (28 1)) (denote (4 1 3)))
+     "implements review process for denote notes" tar
+     ((:url . "https://codeberg.org/mattof/denote-review")
+      (:keywords "files")
+      (:maintainer "Matto Fransen" . "matto@matto.nl")
+      (:authors ("Matto Fransen" . "matto@matto.nl"))
+      (:commit . "4fe3bac06249f28119f7aeef91fc03df3b042589"))])
+ (denote-search
+  . [(1 0 3) ((emacs (29 1)) (denote (3 0)))
+     "Search the contents of your notes" tar
+     ((:url . "https://github.com/lmq-10/denote-search")
+      (:keywords "matching")
+      (:maintainer "Lucas Quintana" . "lmq10@protonmail.com")
+      (:authors ("Lucas Quintana" . "lmq10@protonmail.com"))
+      (:commit . "4df3e77a495b4f0df7fe56924509afe7f2fa735d"))])
+ (denote-sequence
+  . [(0 3 3) ((emacs (28 1)) (denote (4 0 0)))
+     "Sequence notes or Folgezettel with Denote" tar
+     ((:url . "https://github.com/protesilaos/denote-sequence")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "841cf148a56a6c62fb483d5529a45c689b04049e"))])
+ (denote-silo
+  . [(0 3 2) ((emacs (28 1)) (denote (4 0 0)))
+     "Convenience functions for using Denote in multiple silos" tar
+     ((:url . "https://github.com/protesilaos/denote-silo")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "41985759d29d4a673055a0d0bd08e2ada88cffe8"))])
+ (detached
+  . [(0 10 1) ((emacs (27 1)))
+     "A package to launch, and manage, detached processes" tar
+     ((:url . "https://sr.ht/~niklaseklund/detached.el/")
+      (:keywords "convenience" "processes")
+      (:maintainer "detached.el Development"
+		   . "~niklaseklund/detached.el@lists.sr.ht")
+      (:authors ("Niklas Eklund" . "niklas.eklund@posteo.net"))
+      (:commit . "fedb0df5b0fbba13c662107855fb07a922793096"))])
+ (devdocs
+  . [(0 7) ((emacs (27 1)) (compat (30 1))) "Emacs viewer for DevDocs"
+     tar
+     ((:url . "https://github.com/astoff/devdocs.el")
+      (:keywords "help")
+      (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com")
+      (:authors ("Augusto Stoffel" . "arstoffel@gmail.com"))
+      (:commit . "25c746024ddf73570195bf42b841f761a2fee10c"))])
+ (devicetree-ts-mode
+  . [(0 3) ((emacs (29 1))) "Tree-sitter support for DTS" tar
+     ((:url . "https://sr.ht/~akagi/devicetree-ts-mode")
+      (:keywords "languages" "devicetree" "tree-sitter")
+      (:maintainer "Aleksandr Vityazev" . "avityazew@gmail.com")
+      (:authors ("Aleksandr Vityazev" . "avityazew@gmail.com"))
+      (:commit . "bc07c1124545cbf6e5ebe64e92bfaa306e309033"))])
+ (dicom
+  . [(1 6) ((emacs (29 1)) (compat (31)))
+     "DICOM viewer - Digital Imaging & Communications in Medicine" tar
+     ((:url . "https://github.com/minad/dicom")
+      (:keywords "multimedia" "hypermedia" "files")
+      (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de")
+      (:authors ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:commit . "5db856bd206ac899ecd5378eb3cb655b310397f5"))])
+ (dict-tree
+  . [(0 17) ((trie (0 6)) (tNFA (0 1 1)) (heap (0 3)) (emacs (24 1)))
+     "Dictionary data structure" tar
+     ((:url . "http://www.dr-qubit.org/emacs.php")
+      (:keywords "extensions" "matching" "data structures trie" "tree"
+		 "dictionary" "completion" "regexp")
+      (:maintainer "Toby Cubitt" . "toby-predictive@dr-qubit.org")
+      (:authors ("Toby Cubitt" . "toby-predictive@dr-qubit.org"))
+      (:commit . "a83ea986982b2d09d150456028a9f1e73658333a"))])
+ (diff-hl
+  . [(1 10 0) ((cl-lib (0 2)) (emacs (25 1)))
+     "Highlight uncommitted changes using VC" tar
+     ((:url . "https://github.com/dgutov/diff-hl")
+      (:keywords "vc" "diff")
+      (:maintainer "Dmitry Gutov" . "dmitry@gutov.dev")
+      (:authors ("Dmitry Gutov" . "dmitry@gutov.dev"))
+      (:commit . "b80ff9b4a772f7ea000e86fbf88175104ddf9557"))])
+ (diffview
+  . [(1 0) nil "View diffs in side-by-side format" single
+     ((:keywords "convenience" "diff")
+      (:authors ("Mitchel Humpherys" . "mitch.special@gmail.com"))
+      (:maintainer "Mitchel Humpherys" . "mitch.special@gmail.com")
+      (:url . "https://github.com/mgalgs/diffview-mode"))])
+ (diminish
+  . [(0 46) ((emacs (24 3)))
+     "Diminished modes are minor modes with no modeline display" tar
+     ((:url . "https://github.com/myrjola/diminish.el")
+      (:keywords "extensions" "diminish" "minor" "codeprose")
+      (:maintainer "Martin Yrjölä" . "martin.yrjola@gmail.com")
+      (:authors ("Will Mengarini" . "seldon@eskimo.com"))
+      (:commit . "66b3902401059d161424b1b8d0abc3cb0a7d6df0"))])
+ (dired-du
+  . [(0 5 2) ((emacs (24 4)) (cl-lib (0 5)))
+     "Dired with recursive directory sizes" tar
+     ((:keywords "files" "unix" "convenience")
+      (:maintainer "Tino Calancha" . "tino.calancha@gmail.com")
+      (:authors ("Tino Calancha" . "tino.calancha@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/dired-du.html")
+      (:commit . "c586a6bc255cec88e1027e70319030cb63ecdc4a"))])
+ (dired-duplicates
+  . [(0 4) ((emacs (27 1)))
+     "Find duplicate files locally and remotely" tar
+     ((:url . "https://codeberg.org/hjudt/dired-duplicates")
+      (:keywords "files")
+      (:maintainer "Harald Judt" . "h.judt@gmx.at")
+      (:authors ("Harald Judt" . "h.judt@gmx.at"))
+      (:commit . "5c5f24bea92159987f65f01ef32b261e905997bd"))])
+ (dired-git-info
+  . [(0 3 1) ((emacs (25))) "Show git info in dired" tar
+     ((:url . "https://github.com/clemera/dired-git-info")
+      (:keywords "dired" "files")
+      (:maintainer "Clemens Radermacher" . "clemera@posteo.net")
+      (:authors ("Clemens Radermacher" . "clemera@posteo.net"))
+      (:commit . "bd8556eef10e57b175406c117f18e1953422c803"))])
+ (dired-preview
+  . [(0 6 1) ((emacs (28 1)))
+     "Automatically preview file at point in Dired" tar
+     ((:url . "https://github.com/protesilaos/dired-preview")
+      (:keywords "files" "convenience")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "090eded80f801cb4f651490cdd9a78910ef63946"))])
+ (dired-sidebar
+  . [(2 0 1) ((emacs (29 1)) (compat (30 0 0 0)))
+     "Tree browser leveraging dired" tar
+     ((:url . "https://github.com/jojojames/dired-sidebar")
+      (:keywords "dired" "files" "tools")
+      (:maintainer "James Nguyen" . "james@jojojames.com")
+      (:authors ("James Nguyen" . "james@jojojames.com"))
+      (:commit . "8159b8a8134c9b6d65e3b3b22c54e034ae54db0b"))])
+ (disk-usage
+  . [(1 3 3) ((emacs (26 1))) "Sort and browse disk usage listings"
+     tar
+     ((:url . "https://gitlab.com/Ambrevar/emacs-disk-usage")
+      (:keywords "files" "convenience" "tools")
+      (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz")
+      (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz"))
+      (:commit . "b0fb8af34291a49b041eab8b5570e7bc8433a8d8"))])
+ (dismal
+  . [(1 5 2) ((cl-lib (0)))
+     "Dis Mode Ain't Lotus: Spreadsheet program Emacs" tar
+     ((:maintainer "UnMaintainer" . "emacs-devel@gnu.org")
+      (:authors (nil . "fox@cs.nyu.edu") (nil . "ritter@cs.cmu.edu"))
+      (:url . "https://elpa.gnu.org/packages/dismal.html")
+      (:commit . "670c0001026ff437d14545aeed3ef5745f0a53d2"))])
+ (djvu
+  . [(1 1 2) nil "Edit and view Djvu files via djvused" tar
+     ((:keywords "files" "wp")
+      (:maintainer "Roland Winkler" . "winkler@gnu.org")
+      (:authors ("Roland Winkler" . "winkler@gnu.org"))
+      (:url . "https://elpa.gnu.org/packages/djvu.html")
+      (:commit . "071c8ab168588897475899c46eaa16e70141db8c"))])
+ (dmsg
+  . [(0 3) ((emacs (28 1)))
+     "Timestamped debug messages with backtrace support" tar
+     ((:url . "https://github.com/haji-ali/dmsg.el")
+      (:keywords "maint" "tools")
+      (:maintainer "Al Haji-Ali" . "abdo.haji.ali@gmail.com")
+      (:authors ("Al Haji-Ali" . "abdo.haji.ali@gmail.com"))
+      (:commit . "b5c383e931499f9e3693833a2863e019429c3f7b"))])
+ (do-at-point
+  . [(0 2 0) ((emacs (26 1)))
+     "Generic context-sensitive action dispatcher." tar
+     ((:url . "https://codeberg.org/pkal/do-at-point.el")
+      (:keywords "convenience")
+      (:maintainer "Philip Kaludercic" . "philipk@posteo.net")
+      (:authors ("Philip Kaludercic" . "philipk@posteo.net"))
+      (:commit . "abdc992088f552d4dbc649955b0911f15418aead"))])
+ (doc-toc
+  . [(1 2) ((emacs (26 1)))
+     "Manage outlines/table of contents of pdf and djvu documents" tar
+     ((:url . "https://github.com/dalanicolai/doc-tools-toc")
+      (:keywords "tools" "outlines" "convenience")
+      (:maintainer "Daniel Laurens Nicolai" . "dalanicolai@gmail.com")
+      (:authors ("Daniel Laurens Nicolai" . "dalanicolai@gmail.com"))
+      (:commit . "4a179fbacd7bc9efbd6cfcdc8772d42935e6de29"))])
+ (doc-view-follow
+  . [(0 3 2) ((emacs (29 1)))
+     "Synchronize windows showing the same document" tar
+     ((:url . "https://github.com/ultronozm/doc-view-follow.el")
+      (:keywords "convenience")
+      (:maintainer "Paul D. Nelson" . "ultrono@gmail.com")
+      (:authors ("Paul D. Nelson" . "ultrono@gmail.com"))
+      (:commit . "0393bfc9cdbec698201c9c69c247b201558f8511"))])
+ (docbook
+  . [(0 1) nil "Info-like viewer for DocBook" tar
+     ((:keywords "docs" "help")
+      (:maintainer "Chong Yidong" . "cyd@gnu.org")
+      (:authors ("Chong Yidong" . "cyd@gnu.org"))
+      (:url . "https://elpa.gnu.org/packages/docbook.html")
+      (:commit . "a59f87c0dc04bcfcf9f55a124658c2e7a585dbd2"))])
+ (doric-themes
+  . [(1 2 1) ((emacs (29 1)))
+     "Highly legible minimalist themes with precise typography" tar
+     ((:url . "https://github.com/protesilaos/doric-themes")
+      (:keywords "faces" "theme" "accessibility")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "5608fa66894559b86ad7b430a4d01e8ce9b48b0c"))])
+ (drepl
+  . [(0 4) ((emacs (29 1)) (comint-mime (0 7)))
+     "REPL protocol for the dumb terminal" tar
+     ((:url . "https://github.com/astoff/drepl")
+      (:keywords "languages" "processes")
+      (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com")
+      (:authors ("Augusto Stoffel" . "arstoffel@gmail.com"))
+      (:commit . "949cc68612d9427e482d12c2b344a61082f25949"))])
+ (dts-mode
+  . [(1 0) ((emacs (24))) "Major mode for Device Tree source files"
+     tar
+     ((:keywords "languages")
+      (:maintainer "Ben Gamari" . "ben@smart-cactus.org")
+      (:authors ("Ben Gamari" . "ben@smart-cactus.org"))
+      (:url . "https://elpa.gnu.org/packages/dts-mode.html")
+      (:commit . "8413d2dc9b3347831aa9e8c8b2524af3ef005441"))])
+ (easy-escape
+  . [(0 2 1) nil
+     "Improve readability of escape characters in regular expressions"
+     tar
+     ((:url . "https://github.com/cpitclaudel/easy-escape")
+      (:keywords "convenience" "lisp" "tools")
+      (:maintainer "Clément Pit-Claudel"
+		   . "clement.pitclaudel@live.com")
+      (:authors
+       ("Clément Pit-Claudel" . "clement.pitclaudel@live.com"))
+      (:commit . "938497a21e65ba6b3ff8ec90e93a6d0ab18dc9b4"))])
+ (easy-kill
+  . [(0 9 5) ((emacs (25)) (cl-lib (0 5))) "kill & mark things easily"
+     tar
+     ((:url . "https://github.com/leoliu/easy-kill")
+      (:keywords "killing" "convenience")
+      (:maintainer "Leo Liu" . "sdl.web@gmail.com")
+      (:authors ("Leo Liu" . "sdl.web@gmail.com"))
+      (:commit . "f155d19c528e27f8f6c72f0d75f652edbdcab37f"))])
+ (ebdb
+  . [(0 8 22) ((emacs (25 1)) (seq (2 15)))
+     "Contact management package" tar
+     ((:url . "https://github.com/girzel/ebdb")
+      (:keywords "convenience" "mail")
+      (:maintainer "Eric Abrahamsen" . "eric@ericabrahamsen.net")
+      (:authors ("Eric Abrahamsen" . "eric@ericabrahamsen.net"))
+      (:commit . "b96e5470c54503eab2159e69c822648ad55e6915"))])
+ (ebdb-gnorb
+  . [(1 0 2) ((gnorb (1 1 0)) (ebdb (0 2)))
+     "Utilities for connecting EBDB to Gnorb" tar
+     ((:maintainer "Eric Abrahamsen" . "eric@ericabrahamsen.net")
+      (:authors ("Eric Abrahamsen" . "eric@ericabrahamsen.net"))
+      (:url . "https://elpa.gnu.org/packages/ebdb-gnorb.html")
+      (:commit . "461a6b35dc9322d1ec59547ad845d26a6c65a698"))])
+ (ebdb-i18n-chn
+  . [(1 3 2) ((pyim (1 6 0)) (ebdb (0 6 17)))
+     "China-specific internationalization support for EBDB" tar
+     ((:maintainer "Eric Abrahamsen" . "eric@ericabrahamsen.net")
+      (:authors ("Eric Abrahamsen" . "eric@ericabrahamsen.net"))
+      (:url . "https://elpa.gnu.org/packages/ebdb-i18n-chn.html")
+      (:commit . "b8c1f7c21204bda9c130ce21a75d69358d1bc49a"))])
+ (ediprolog
+  . [(2 3) nil "Emacs Does Interactive Prolog" tar
+     ((:url . "https://www.metalevel.at/ediprolog/")
+      (:keywords "languages" "processes")
+      (:maintainer "Markus Triska" . "triska@metalevel.at")
+      (:authors ("Markus Triska" . "triska@metalevel.at"))
+      (:commit . "ea8710335eec483b576c7a800c92b8fd214aa6dd"))])
+ (eev
+  . [(20260126) ((emacs (25 1)))
+     "Support for e-scripts (eepitch blocks, elisp hyperlinks, etc)"
+     tar
+     ((:url . "http://anggtwu.net/#eev")
+      (:keywords "lisp" "e-scripts")
+      (:maintainer "Eduardo Ochs" . "eduardoochs@gmail.com")
+      (:authors ("Eduardo Ochs" . "eduardoochs@gmail.com"))
+      (:commit . "ffa3b88874d064256c5221d2bbcb1564d901602a"))])
+ (ef-themes
+  . [(2 2 1) ((emacs (28 1)) (modus-themes (5 0 0)))
+     "Colorful and legible themes" tar
+     ((:url . "https://github.com/protesilaos/ef-themes")
+      (:keywords "faces" "theme" "accessibility")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "e1f617607a5f0692b398365dcd8412ba1e98ccb3"))])
+ (eglot
+  . [(1 24)
+     ((emacs (26 3)) (eldoc (1 16 0)) (external-completion (0 1))
+      (flymake (1 4 5)) (jsonrpc (1 0 29)) (project (0 11 2))
+      (seq (2 23)) (xref (1 7 0)))
+     "The Emacs Client for LSP servers" tar
+     ((:url . "https://github.com/joaotavora/eglot")
+      (:keywords "convenience" "languages")
+      (:maintainer "João Távora" . "joaotavora@gmail.com")
+      (:authors ("João Távora" . "joaotavora@gmail.com"))
+      (:commit . "0d67e76b94e1f0af9fe364aed8aa5db1c494c206"))])
+ (el-job
+  . [(2 7 4) ((emacs (29 1)))
+     "Contrived way to call a function using all CPU cores" tar
+     ((:url . "https://github.com/meedstrom/el-job")
+      (:keywords "processes")
+      (:maintainer "Martin Edström" . "meedstrom@runbox.eu")
+      (:authors ("Martin Edström" . "meedstrom@runbox.eu"))
+      (:commit . "5ce8bdf4886ee275d56a238a9786296ee4697500"))])
+ (el-search
+  . [(1 12 6 1) ((emacs (25)) (stream (2 2 4)) (cl-print (1 0)))
+     "Expression based interactive search for Emacs Lisp" tar
+     ((:keywords "lisp")
+      (:maintainer "Michael Heerdegen" . "michael_heerdegen@web.de")
+      (:authors ("Michael Heerdegen" . "michael_heerdegen@web.de"))
+      (:url . "https://elpa.gnu.org/packages/el-search.html")
+      (:commit . "43779b910025aba2574213cf3eabee2132c0a175"))])
+ (eldoc
+  . [(1 16 0) ((emacs (26 3)))
+     "Show function arglist or variable docstring in echo area" tar
+     ((:keywords "extensions")
+      (:maintainer "Noah Friedman" . "friedman@splode.com")
+      (:authors ("Noah Friedman" . "friedman@splode.com"))
+      (:url . "https://elpa.gnu.org/packages/eldoc.html")
+      (:commit . "b85d9048f4a32c7c50894e991423d021d9f95317"))])
+ (electric-spacing
+  . [(5 0) nil "Insert operators with surrounding spaces smartly" tar
+     ((:maintainer "William Xu" . "william.xwl@gmail.com")
+      (:authors ("William Xu" . "william.xwl@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/electric-spacing.html")
+      (:commit . "122ac5d08c3d3d91251752136abab9721d90e36c"))])
+ (elisa
+  . [(1 1 7)
+     ((emacs (29 2)) (ellama (0 11 2)) (llm (0 18 1)) (async (1 9 8))
+      (plz (0 9)))
+     "Emacs Lisp Information System Assistant" tar
+     ((:url . "http://github.com/s-kostyaev/elisa")
+      (:keywords "help" "local" "tools")
+      (:maintainer "Sergey Kostyaev" . "sskostyaev@gmail.com")
+      (:authors ("Sergey Kostyaev" . "sskostyaev@gmail.com"))
+      (:commit . "b655b59d371639d357dcabe48f1c2cd1694ee8de"))])
+ (elisp-benchmarks
+  . [(1 16) nil "elisp benchmarks collection" tar
+     ((:keywords "languages" "lisp")
+      (:maintainer "Andrea Corallo" . "acorallo@gnu.org")
+      (:authors ("Andrea Corallo" . "acorallo@gnu.org"))
+      (:url . "https://elpa.gnu.org/packages/elisp-benchmarks.html")
+      (:commit . "1a3d97954957a95a179806e0d49ca6d178b097af"))])
+ (ellama
+  . [(1 32 1)
+     ((emacs (28 1)) (llm (0 31 1)) (plz (0 8)) (transient (0 7))
+      (compat (29 1)) (yaml (1 2 3)))
+     "Tool for interacting with LLMs" tar
+     ((:url . "http://github.com/s-kostyaev/ellama")
+      (:keywords "help" "local" "tools")
+      (:maintainer "Sergey Kostyaev" . "sskostyaev@gmail.com")
+      (:authors ("Sergey Kostyaev" . "sskostyaev@gmail.com"))
+      (:commit . "4e43ad24ca6d1ef9239250e87e47513754e8647c"))])
+ (emacs-gc-stats
+  . [(1 4 2) ((emacs (25 1))) "Collect Emacs GC statistics" tar
+     ((:url . "https://git.sr.ht/~yantar92/emacs-gc-stats")
+      (:maintainer "Ihor Radchenko" . "yantar92@posteo.net")
+      (:authors ("Ihor Radchenko" . "yantar92@posteo.net"))
+      (:commit . "05d669e123f411c9582f99a9a6182efa43d01a6b"))])
+ (emacs-lisp-intro-es
+  . [(1 0 1) nil "ELisp intro manual in Spanish" tar
+     ((:keywords "manual" "translation" "spanish" "español")
+      (:maintainer "David Arroyo Menéndez" . "davidam@gmail.com")
+      (:authors ("David Arroyo Menéndez" . "davidam@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/emacs-lisp-intro-es.html")
+      (:commit . "a2c2c167837cef08a1b8f86f5eb9864f93699300"))])
+ (embark
+  . [(1 2) ((emacs (29 1)) (compat (30)))
+     "Conveniently act on minibuffer completions" tar
+     ((:url . "https://github.com/oantolin/embark")
+      (:keywords "convenience")
+      (:maintainer "Omar Antolín Camarena" . "omar@matem.unam.mx")
+      (:authors ("Omar Antolín Camarena" . "omar@matem.unam.mx"))
+      (:commit . "27de48004242e98586b9c9661fdb6912f26fe70f"))])
+ (embark-consult
+  . [(1 2)
+     ((emacs (29 1)) (compat (30)) (embark (1 1)) (consult (3 2)))
+     "Consult integration for Embark" tar
+     ((:url . "https://github.com/oantolin/embark")
+      (:keywords "convenience")
+      (:maintainer "Omar Antolín Camarena" . "omar@matem.unam.mx")
+      (:authors ("Omar Antolín Camarena" . "omar@matem.unam.mx"))
+      (:commit . "80254c91da90635978fb12db8b9ab9bf54f3bfb0"))])
+ (ement
+  . [(0 17)
+     ((emacs (27 1)) (map (2 1)) (persist (0 5)) (plz (0 6))
+      (taxy (0 10)) (taxy-magit-section (0 13)) (svg-lib (0 2 5))
+      (transient (0 3 7)))
+     "Matrix client" tar
+     ((:url . "https://github.com/alphapapa/ement.el")
+      (:keywords "comm")
+      (:maintainer "Adam Porter" . "adam@alphapapa.net")
+      (:authors ("Adam Porter" . "adam@alphapapa.net"))
+      (:commit . "ca3b0e7da1626e692df14c56e105dc91480ef814"))])
+ (emms
+  . [(26) ((cl-lib (0 5)) (nadvice (0 3)) (seq (0)))
+     "The Emacs Multimedia System" tar
+     ((:url . "https://www.gnu.org/software/emms/")
+      (:keywords "emms" "mp3" "ogg" "flac" "music" "mpeg" "video"
+		 "multimedia")
+      (:maintainer "Yoni Rabkin" . "yrk@gnu.org")
+      (:authors ("Jorgen Schäfer" . "forcer@forcix.cx"))
+      (:commit . "6f704fd3c12f35e059700aaeb43ae64c35ad81b2"))])
+ (engrave-faces
+  . [(0 3 1) ((emacs (27 1)))
+     "Convert font-lock faces to other formats" tar
+     ((:url . "https://github.com/tecosaur/engrave-faces")
+      (:keywords "faces") (:maintainer "TEC" . "tec@tecosaur.com")
+      (:authors ("TEC" . "https://github/tecosaur"))
+      (:commit . "fe29d9b593a0f7ada4df3f52dfb9f7f8c1bdaaa7"))])
+ (enwc
+  . [(2 0) ((emacs (25 1))) "The Emacs Network Client" tar
+     ((:url . "https://savannah.nongnu.org/p/enwc")
+      (:keywords "external" "network" "wicd" "manager" "nm")
+      (:maintainer "Ian Dunn" . "dunni@gnu.org")
+      (:authors ("Ian Dunn" . "dunni@gnu.org"))
+      (:commit . "9893d7f17a2ee7f83587c305c256bd1300995125"))])
+ (epoch-view
+  . [(0 0 1) nil "Minor mode to visualize epoch timestamps" single
+     ((:url . "http://elpa.gnu.org/packages/epoch-view.html")
+      (:keywords "data" "timestamp" "epoch" "unix")
+      (:authors ("Ted Zlatanov" . "tzz@lifelogs.com"))
+      (:maintainer "Ted Zlatanov" . "tzz@lifelogs.com"))])
+ (erc
+  . [(5 6 2) ((emacs (27 1)) (compat (29 1 4 5)))
+     "An Emacs Internet Relay Chat client" tar
+     ((:url . "https://www.gnu.org/software/emacs/erc.html")
+      (:keywords "irc" "chat" "client" "internet")
+      (:maintainer ("Amin Bandali" . "bandali@gnu.org")
+		   ("F. Jason Park" . "jp@neverwas.me"))
+      (:authors ("Alexander L. Belikoff" . "alexander@belikoff.net"))
+      (:commit . "6d347d983480c17293da0d430360d98cfc8bd805"))])
+ (ergoemacs-mode
+  . [(5 16 10 12) ((emacs (24 1)) (undo-tree (0 6 5)) (cl-lib (0 5)))
+     "Emacs mode based on common modern interface and ergonomics." tar
+     ((:url . "https://github.com/ergoemacs/ergoemacs-mode")
+      (:keywords "convenience")
+      (:maintainer "Matthew L. Fidler" . "matthew.fidler@gmail.com")
+      (:authors ("Xah Lee" . "xah@xahlee.org")
+		("David Capello" . "davidcapello@gmail.com")
+		("Matthew L. Fidler" . "matthew.fidler@gmail.com"))
+      (:commit . "ac70b2563fb6e3d69ea382fddc87b5721c20c292"))])
+ (ess
+  . [(26 5 0) ((emacs (25 1))) "Emacs Speaks Statistics" tar
+     ((:url . "https://ess.r-project.org/")
+      (:maintainer "ESS Core Team" . "ESS-core@r-project.org")
+      (:authors ("David Smith" . "dsmith@stats.adelaide.edu.au")
+		("A.J. Rossini" . "blindglobe@gmail.com")
+		("Richard M. Heiberger" . "rmh@temple.edu")
+		("Kurt Hornik" . "Kurt.Hornik@R-project.org")
+		("Martin Maechler" . "maechler@stat.math.ethz.ch")
+		("Rodney A. Sparapani" . "rsparapa@mcw.edu")
+		("Stephen Eglen" . "stephen@gnu.org")
+		("Sebastian P. Luque" . "spluque@gmail.com")
+		("Henning Redestig" . "henning.red@googlemail.com")
+		("Vitalie Spinu" . "spinuvit@gmail.com")
+		("Lionel Henry" . "lionel.hry@gmail.com")
+		("J. Alexander Branham" . "alex.branham@gmail.com"))
+      (:commit . "da7d7dc1d2cf95760f56cb1763eb543c4dadaa0c"))])
+ (excorporate
+  . [(1 1 3)
+     ((fsm (0 2 1)) (soap-client (3 2 0)) (url-http-ntlm (2 0 6))
+      (url-http-oauth (0 8 4)))
+     "Exchange Web Services (EWS) integration" tar
+     ((:url . "https://www.fitzsim.org/blog/") (:keywords "calendar")
+      (:maintainer "Thomas Fitzsimmons" . "fitzsim@fitzsim.org")
+      (:authors ("Thomas Fitzsimmons" . "fitzsim@fitzsim.org"))
+      (:commit . "d0dc6a28a0b39b67b01c63163217f8ebd055df4d"))])
+ (expand-region
+  . [(1 0 0) ((emacs (24 4)))
+     "Increase selected region by semantic units." tar
+     ((:url . "https://github.com/magnars/expand-region.el")
+      (:keywords "marking" "region")
+      (:maintainer "Magnar Sveen" . "magnars@gmail.com")
+      (:authors ("Magnar Sveen" . "magnars@gmail.com"))
+      (:commit . "9e3f86c02c5e2ab6f0d95da8a34045b54f6166d1"))])
+ (expreg
+  . [(1 4 1) ((emacs (29 1))) "Simple expand region" tar
+     ((:url . "https://github.com/casouri/expreg")
+      (:keywords "text" "editing")
+      (:maintainer "Yuan Fu" . "casouri@gmail.com")
+      (:authors ("Yuan Fu" . "casouri@gmail.com"))
+      (:commit . "b1dc64aef8ed8498a6d21e5e78ce7e0bda8407e0"))])
+ (external-completion
+  . [(0 1) nil "Let external tools control completion style" tar
+     ((:maintainer "João Távora" . "joaotavora@gmail.com")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/external-completion.html")
+      (:commit . "4bc9c8972ac0a3dfa237a9c5704de89ef24ad82b"))])
+ (exwm
+  . [(0 35) ((emacs (29 1)) (xelb (0 22)) (compat (31)))
+     "Emacs X Window Manager" tar
+     ((:url . "https://github.com/emacs-exwm/exwm") (:keywords "unix")
+      (:maintainer
+       ("Adrián Medraño Calvo" . "adrian@medranocalvo.com")
+       ("Steven Allen" . "steven@stebalien.com")
+       ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:authors ("Chris Feng" . "chris.w.feng@gmail.com"))
+      (:commit . "fcc83b6dfaea1e32e01f0706812ee3ac01ec69f5"))])
+ (f90-interface-browser
+  . [(1 1) nil "Parse and browse f90 interfaces" single
+     ((:authors ("Lawrence Mitchell" . "wence@gmx.li"))
+      (:maintainer "Lawrence Mitchell" . "wence@gmx.li")
+      (:url . "http://github.com/wence-/f90-iface/"))])
+ (ffs
+  . [(0 2 2) ((emacs (27 1)))
+     "Form feed-separated plain text presentations" tar
+     ((:url . "https://git.kelar.org/~bandali/ffs")
+      (:keywords "convenience" "focus" "narrowing" "outlines"
+		 "presentation" "text")
+      (:maintainer "Amin Bandali" . "bandali@gnu.org")
+      (:authors ("Amin Bandali" . "bandali@gnu.org"))
+      (:commit . "71b66bcf7e1538a28ca7b354e3e1acfd3d7da444"))])
+ (filechooser
+  . [(0 3 0) ((emacs (28 1)) (compat (29 1)))
+     "An xdg-desktop-portal filechooser" tar
+     ((:url . "https://codeberg.org/rahguzar/filechooser")
+      (:keywords "convenience" "files" "tools" "unix")
+      (:maintainer "rahguzar" . "rahguzar@mailbox.org")
+      (:authors ("rahguzar" . "rahguzar@mailbox.org"))
+      (:commit . "a0be6ce512eea8940b325d96fbefba2ada3048ec"))])
+ (filladapt
+  . [(2 12 2) ((emacs (24 4))) "Adaptive fill" tar
+     ((:maintainer nil . "emacs-devel@gnu.org")
+      (:authors ("Kyle E. Jones" . "kyle_jones@wonderworks.com"))
+      (:url . "https://elpa.gnu.org/packages/filladapt.html")
+      (:commit . "6cce6acc6350541efe6b1064335b480e820fd325"))])
+ (firefox-javascript-repl
+  . [(0 9 5) ((emacs (26 1))) "Jack into Firefox" tar
+     ((:maintainer "Thomas Fitzsimmons" . "fitzsim@fitzsim.org")
+      (:authors ("Thomas Fitzsimmons" . "fitzsim@fitzsim.org"))
+      (:url
+       . "https://elpa.gnu.org/packages/firefox-javascript-repl.html")
+      (:commit . "fee99c20f1f4684ed845eeac9eda46fcde6bf1e9"))])
+ (flylisp
+  . [(0 2) nil
+     "Color unbalanced parentheses and parentheses inconsistent with indentation"
+     tar
+     ((:maintainer "Barry O'Reilly" . "gundaetiapo@gmail.com")
+      (:authors ("Barry O'Reilly" . "gundaetiapo@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/flylisp.html")
+      (:commit . "20fe3e77bb73773c8678e65ae38020b0b7f996eb"))])
+ (flymake
+  . [(1 4 6) ((emacs (26 1)) (eldoc (1 14 0)) (project (0 11 1)))
+     "A universal on-the-fly syntax checker" tar
+     ((:keywords "c" "languages" "tools")
+      (:maintainer "Spencer Baugh" . "sbaugh@janestreet.com")
+      (:authors ("Pavel Kobyakov" . "pk_at_work@yahoo.com"))
+      (:url . "https://elpa.gnu.org/packages/flymake.html")
+      (:commit . "da0565d9b57d67c59177b5069346fcf32778b2dd"))])
+ (flymake-clippy
+  . [(1 1 0) ((emacs (27))) "Flymake backend for Clippy" tar
+     ((:url . "https://github.com/mak-kirkland/flymake-clippy")
+      (:keywords "languages" "tools")
+      (:maintainer "Michael Kirkland" . "mak.kirkland@proton.me")
+      (:authors ("Michael Kirkland" . "mak.kirkland@proton.me"))
+      (:commit . "38aeda6a8f4090b00f3c7fdb5188f80e04c556de"))])
+ (flymake-codespell
+  . [(0 1) ((emacs (26 1)) (compat (29 1 4 2)))
+     "Flymake backend for codespell" tar
+     ((:url . "https://www.github.com/skangas/flymake-codespell")
+      (:keywords "extensions")
+      (:maintainer "Stefan Kangas" . "stefankangas@gmail.com")
+      (:authors ("Stefan Kangas" . "stefankangas@gmail.com"))
+      (:commit . "d72e3ad4cdfd5cea1509a241d55e18f54ae2aeca"))])
+ (flymake-harper
+  . [(0 1 1) ((emacs (27 1))) "Flymake backend for Harper" tar
+     ((:url . "https://codeberg.org/pkal/flymake-harper.el")
+      (:keywords "convenience" "text")
+      (:maintainer "Philip Kaludercic" . "philipk@posteo.net")
+      (:authors ("Manuel Uberti" . "manuel.uberti@inventati.org")
+		("Philip Kaludercic" . "philipk@posteo.net"))
+      (:commit . "d7c8ff434ab388cd5a29a25b7ecd7340c17fd371"))])
+ (flymake-proselint
+  . [(0 3 0) ((emacs (26 1))) "Flymake backend for proselint" tar
+     ((:url . "https://git.sr.ht/~manuel-uberti/flycheck-proselint")
+      (:keywords "convenience")
+      (:maintainer "Manuel Uberti"
+		   . "~manuel-uberti/flymake-proselint@lists.sr.ht")
+      (:authors ("Manuel Uberti" . "manuel.uberti@inventati.org"))
+      (:commit . "9c68ee881f18f554f0ab5bbf5bee1a4b753d792b"))])
+ (fontaine
+  . [(3 1 0) ((emacs (29 1))) "Set font configurations using presets"
+     tar
+     ((:url . "https://github.com/protesilaos/fontaine")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "8cf9f6693e2a780b530ff5fd9920863b751d5bd5"))])
+ (forgejo
+  . [(0 2 3) ((emacs (29 1)) (keymap-popup (0 2 1)))
+     "Emacs Forgejo Front-end" tar
+     ((:url . "https://codeberg.org/thanosapollo/emacs-forgejo")
+      (:keywords "tools" "vc" "git" "forgejo")
+      (:maintainer "Thanos Apollo" . "public@thanosapollo.org")
+      (:authors ("Thanos Apollo" . "public@thanosapollo.org"))
+      (:commit . "0fbe243481ec3208fc253aaed17ef06f83fb23b0"))])
+ (frame-tabs
+  . [(1 1) nil "show buffer tabs in side window" tar
+     ((:keywords "frames" "tabs")
+      (:maintainer "Martin Rudalics" . "rudalics@gmx.at")
+      (:authors ("Martin Rudalics" . "rudalics@gmx.at"))
+      (:url . "https://elpa.gnu.org/packages/frame-tabs.html")
+      (:commit . "2142034967085642823f7f60f9a3e4f09ada089e"))])
+ (frog-menu
+  . [(0 2 11) ((emacs (26)) (avy (0 4)) (posframe (0 4)))
+     "Quickly pick items from ad hoc menus" tar
+     ((:url . "https://github.com/clemera/frog-menu")
+      (:keywords "convenience")
+      (:maintainer "Clemens Radermacher" . "clemera@posteo.net")
+      (:authors ("Clemens Radermacher" . "clemera@posteo.net"))
+      (:commit . "3d99c10eb472b5f7fe761bb3f329fe10971ea903"))])
+ (fsm
+  . [(0 2 1) ((emacs (24 1)) (cl-lib (0 5))) "state machine library"
+     tar
+     ((:keywords "extensions")
+      (:maintainer "Thomas Fitzsimmons" . "fitzsim@fitzsim.org")
+      (:authors ("Magnus Henoch" . "magnus.henoch@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/fsm.html")
+      (:commit . "3acbc4df9b13d234ca1e297d85be27c54e81799e"))])
+ (ftable
+  . [(1 1) ((emacs (26 0))) "Fill a table to fit in n columns" tar
+     ((:url . "https://github.com/casouri/ftable")
+      (:keywords "convenience" "text" "table")
+      (:maintainer "Yuan Fu" . "casouri@gmail.com")
+      (:authors ("Yuan Fu" . "casouri@gmail.com"))
+      (:commit . "d7c243ac3be2a67986f53f3dc31ba1426e82b771"))])
+ (futur
+  . [(2 0) nil "Future/promise-based async library" tar
+     ((:keywords "concurrency" "async" "promises" "futures")
+      (:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/futur.html")
+      (:commit . "2bd1d6cb405e8e27719a3be4f2de79668b1c5d2f"))])
+ (gcmh
+  . [(0 2 1) ((emacs (24))) "the Garbage Collector Magic Hack" tar
+     ((:url . "https://gitlab.com/koral/gcmh") (:keywords "internal")
+      (:maintainer nil . "akrl@sdf.org")
+      (:authors ("Andrea Corallo" . "akrl@sdf.org"))
+      (:commit . "0089f9c3a6d4e9a310d0791cf6fa8f35642ecfd9"))])
+ (ggtags
+  . [(0 9 0) ((emacs (25)))
+     "emacs frontend to GNU Global source code tagging system" tar
+     ((:url . "https://github.com/leoliu/ggtags")
+      (:keywords "tools" "convenience")
+      (:maintainer "Leo Liu" . "sdl.web@gmail.com")
+      (:authors ("Leo Liu" . "sdl.web@gmail.com"))
+      (:commit . "a0809f5241d9accceb161ca40374680799021f04"))])
+ (gited
+  . [(0 6 0) ((emacs (24 4)) (cl-lib (0 5)))
+     "Operate on Git branches like dired" tar
+     ((:keywords "git" "vc" "convenience")
+      (:maintainer "Tino Calancha" . "tino.calancha@gmail.com")
+      (:authors ("Tino Calancha" . "tino.calancha@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/gited.html")
+      (:commit . "475e29723ad2d5ff08cae5fdaa122ab56e69141b"))])
+ (gle-mode
+  . [(1 1) ((cl-lib (0 5)))
+     "Major mode to edit Graphics Layout Engine files" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/gle-mode.html")
+      (:commit . "b633a627bb15f77f7e64df89f82b8f556dcc0a6e"))])
+ (gnat-compiler
+  . [(1 0 3) ((emacs (25 3)) (wisi (4 3 0)))
+     "Support for running GNAT tools" tar
+     ((:maintainer "Stephen Leake" . "stephen_leake@member.fsf.org")
+      (:authors ("Stephen Leake" . "stephen_leake@member.fsf.org"))
+      (:url . "https://elpa.gnu.org/packages/gnat-compiler.html")
+      (:commit . "9db5c393ee0f9694e83305ef8b0b1e37f0560111"))])
+ (gnome-c-style
+  . [(0 1) nil "minor mode for editing GNOME-style C source code" tar
+     ((:maintainer "Daiki Ueno" . "ueno@gnu.org")
+      (:authors ("Daiki Ueno" . "ueno@gnu.org"))
+      (:keywords "gnome" "c" "coding style")
+      (:url . "http://elpa.gnu.org/packages/gnome-c-style.html"))])
+ (gnome-dark-style
+  . [(0 2 4) ((emacs (30 1))) "Sync theme with GNOME color-scheme" tar
+     ((:url . "https://github.com/dimagid/gnome-dark-style")
+      (:keywords "themes" "gnome" "sync" "dark" "light" "color-scheme")
+      (:maintainer "David Dimagid" . "davidimagid@gmail.com")
+      (:authors ("David Dimagid" . "davidimagid@gmail.com"))
+      (:commit . "ede0104f21ebdc0128b6cbe2c31962ab335b0ea6"))])
+ (gnorb
+  . [(1 6 11) ((cl-lib (0 5))) "Glue code between Gnus, Org, and BBDB"
+     tar
+     ((:keywords "mail" "org" "gnus" "bbdb" "todo" "task")
+      (:maintainer "Eric Abrahamsen" . "eric@ericabrahamsen.net")
+      (:authors ("Eric Abrahamsen" . "eric@ericabrahamsen.net"))
+      (:url . "https://elpa.gnu.org/packages/gnorb.html")
+      (:commit . "409e4fc2c83f8406f362028dbcc3a1fc21182819"))])
+ (gnosis
+  . [(0 10 6)
+     ((emacs (29 1)) (compat (29 1 4 2)) (keymap-popup (0 2 0)))
+     "Knowledge System" tar
+     ((:url . "https://codeberg.org/thanosapollo/emacs-gnosis")
+      (:keywords "extensions")
+      (:maintainer "Thanos Apollo" . "public@thanosapollo.org")
+      (:authors ("Thanos Apollo" . "public@thanosapollo.org"))
+      (:commit . "07de9c67536fe3e8c5fef1daf61527f3bcfa46a7"))])
+ (gnu-elpa
+  . [(1 1) nil "Advertize GNU ELPA packages" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/gnu-elpa.html")
+      (:commit . "cd18964ec3176ab99d626da4ca6ca7d4bf2389db"))])
+ (gnu-elpa-keyring-update
+  . [(2025 10 1) nil "Update Emacs's GPG keyring for GNU ELPA" tar
+     ((:keywords "maint" "tools")
+      (:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url
+       . "https://elpa.gnu.org/packages/gnu-elpa-keyring-update.html")
+      (:commit . "62156e2ec72ca9f79eed3e7275aba38f71808361"))])
+ (gnugo
+  . [(3 1 2)
+     ((ascii-art-to-unicode (1 5)) (xpm (1 0 1)) (cl-lib (0 5)))
+     "play GNU Go in a buffer" tar
+     ((:url . "https://www.gnuvola.org/software/gnugo/")
+      (:keywords "games" "processes")
+      (:maintainer "Thien-Thi Nguyen" . "ttn@gnu.org")
+      (:authors ("Thien-Thi Nguyen" . "ttn@gnu.org"))
+      (:commit . "1fd2e8df042f8e51a87173ce36220ee9a8c4241c"))])
+ (gnus-mock
+  . [(0 5) nil "Mock Gnus installation for testing" tar
+     ((:maintainer "Eric Abrahamsen" . "eric@ericabrahamsen.net")
+      (:authors ("Eric Abrahamsen" . "eric@ericabrahamsen.net"))
+      (:url . "https://elpa.gnu.org/packages/gnus-mock.html")
+      (:commit . "0ec119ff8ddca61fc0f3e05ac4e895d57cb2ca21"))])
+ (gpastel
+  . [(0 5 0) ((emacs (25 1))) "Integrates GPaste with the kill-ring"
+     tar
+     ((:url
+       . "https://gitlab.petton.fr/DamienCassou/desktop-environment")
+      (:keywords "tools")
+      (:maintainer "Damien Cassou" . "damien@cassou.me")
+      (:authors ("Damien Cassou" . "damien@cassou.me"))
+      (:commit . "8a5522b274f79d55d7c9a0b2aaf062526f9253c7"))])
+ (gpr-mode
+  . [(1 0 5) ((emacs (25 3)) (wisi (4 3 2)) (gnat-compiler (1 0 3)))
+     "Major mode for editing GNAT project files" tar
+     ((:url . "https://stephe-leake.org/ada/wisitoken.html")
+      (:maintainer "Stephen Leake" . "stephen_leake@member.fsf.org")
+      (:authors ("Stephen Leake" . "stephen_leake@member.fsf.org"))
+      (:commit . "9ca25ec5ca871f04b4704b39fb3ba129694e02ac"))])
+ (gpr-query
+  . [(1 0 4) ((emacs (25 3)) (wisi (4 3 0)) (gnat-compiler (1 0 3)))
+     "Minor mode for navigating sources using gpr_query" tar
+     ((:maintainer "Stephen Leake" . "stephen_leake@member.fsf.org")
+      (:authors ("Stephen Leake" . "stephen_leake@member.fsf.org"))
+      (:url . "https://elpa.gnu.org/packages/gpr-query.html")
+      (:commit . "d50f92fe46828b6b675770dba3004c1ea6ab0b50"))])
+ (graphql
+  . [(0 1 2) ((emacs (25))) "GraphQL utilities" tar
+     ((:url . "https://github.com/vermiculus/graphql.el")
+      (:keywords "hypermedia" "tools" "lisp")
+      (:maintainer "Sean Allred" . "code@seanallred.com")
+      (:authors ("Sean Allred" . "code@seanallred.com"))
+      (:commit . "b57b5ca5d2d0837e1fb4a4f30c051d5f3e643f0f"))])
+ (greader
+  . [(0 19 5) ((emacs (26 1)) (seq (2 24)) (compat (29 1 4 5)))
+     "Gnamù reader, send buffer contents to a speech engine" tar
+     ((:url . "https://gitlab.com/michelangelo-rodriguez/greader")
+      (:keywords "tools" "accessibility")
+      (:maintainer "Michelangelo Rodriguez"
+		   . "michelangelo.rodriguez@gmail.com")
+      (:authors
+       ("Michelangelo Rodriguez" . "michelangelo.rodriguez@gmail.com"))
+      (:commit . "5c304ad008d8688e4eccd9947ba5e410399bf021"))])
+ (greenbar
+  . [(1 2 260317) ((emacs (27 1)))
+     "Mark comint output with \"greenbar\" background" tar
+     ((:keywords "faces" "terminals")
+      (:maintainer "Michael R. Mauger" . "michael@mauger.com")
+      (:authors ("Michael R. Mauger" . "michael@mauger.com"))
+      (:url . "https://elpa.gnu.org/packages/greenbar.html")
+      (:commit . "eedbec6a0c56be403fdbe0b1f38a4acd4f11d09b"))])
+ (gtags-mode
+  . [(1 9 5) ((emacs (28)))
+     "GNU Global integration with xref, project and imenu." tar
+     ((:url . "https://github.com/Ergus/gtags-mode")
+      (:keywords "xref" "project" "imenu" "gtags" "global")
+      (:commit . "94de3a0a9c6b28d5a3dadc97dd52230922462a5d"))])
+ (guess-language
+  . [(0 0 1) ((cl-lib (0 5)) (emacs (24)) (nadvice (0 1)))
+     "Robust automatic language detection" single
+     ((:authors ("Titus von der Malsburg" . "malsburg@posteo.de"))
+      (:maintainer "Titus von der Malsburg" . "malsburg@posteo.de")
+      (:url . "https://github.com/tmalsburg/guess-language.el"))])
+ (hcel
+  . [(1 0 0) ((emacs (28)))
+     "Haskell codebase explorer / cross referencer" tar
+     ((:url . "https://g.ypei.me/hc.el.git") (:keywords "haskell")
+      (:maintainer "Yuchen Pei" . "id@ypei.org")
+      (:authors ("Yuchen Pei" . "id@ypei.org"))
+      (:commit . "a215df2f884fb445d8f159a2b4d84e6853ac9816"))])
+ (heap
+  . [(0 5) nil "Heap (a.k.a. priority queue) data structure" tar
+     ((:url . "http://www.dr-qubit.org/emacs.php")
+      (:keywords "extensions" "data structures" "heap"
+		 "priority queue")
+      (:maintainer "Toby Cubitt" . "toby-predictive@dr-qubit.org")
+      (:authors ("Toby Cubitt" . "toby-predictive@dr-qubit.org"))
+      (:commit . "10a68e6000bdf630aa7232e57ba25390423991d8"))])
+ (hiddenquote
+  . [(1 2) ((emacs (25 1)))
+     "Major mode for doing hidden quote puzzles" tar
+     ((:url . "http://mauroaranda.com/puzzles/hidden-quote-puzzle/")
+      (:keywords "games")
+      (:maintainer "Mauro Aranda" . "maurooaranda@gmail.com")
+      (:authors ("Mauro Aranda" . "maurooaranda@gmail.com"))
+      (:commit . "856438ee2950fa998561f71d40355a88cdb078b4"))])
+ (highlight-escape-sequences
+  . [(0 4) nil "Highlight escape sequences" tar
+     ((:url . "https://github.com/dgutov/highlight-escape-sequences")
+      (:keywords "convenience")
+      (:maintainer ("Dmitry Gutov" . "dgutov@yandex.ru")
+		   ("Pavel Matcula" . "dev.plvlml@gmail.com"))
+      (:authors ("Dmitry Gutov" . "dgutov@yandex.ru")
+		("Pavel Matcula" . "dev.plvlml@gmail.com"))
+      (:commit . "08d846a7aa748209d65fecead2b6a766c3e5cb41"))])
+ (hook-helpers
+  . [(1 1 1) ((emacs (25 1))) "Anonymous, modifiable hook functions"
+     tar
+     ((:url . "https://savannah.nongnu.org/projects/hook-helpers-el/")
+      (:maintainer "Ian Dunn" . "dunni@gnu.org")
+      (:authors ("Ian Dunn" . "dunni@gnu.org"))
+      (:keywords "development" "hooks"))])
+ (html5-schema
+  . [(0 1) nil "Add HTML5 schemas for use by nXML" tar
+     ((:url . "https://github.com/validator/validator")
+      (:keywords "html" "xml")
+      (:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:commit . "784c471a9ea9ae817d70b222ec6fbe90ac64a057"))])
+ (hugoista
+  . [(0 2 1) ((emacs (24 3)) (seq (0)))
+     "Manage Hugo posts like a barista" tar
+     ((:url . "https://codeberg.org/c-alpha/hugoista")
+      (:maintainer "Alexander Adolf"
+		   . "alexander.adolf@condition-alpha.com")
+      (:authors
+       ("Alexander Adolf" . "alexander.adolf@condition-alpha.com")
+       ("Thanos Apollo" . "public@thanosapollo.org"))
+      (:commit . "22b543c0cb9c74ede7e762a16d44173c08c906ab"))])
+ (hydra
+  . [(0 15 0) ((cl-lib (0 5)) (lv (0)))
+     "Make bindings that stick around." tar
+     ((:url . "https://github.com/abo-abo/hydra")
+      (:keywords "bindings")
+      (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com")
+      (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com"))
+      (:commit . "7081ee6d443dbf2b58e77fa7357c90e495173a2f"))])
+ (hyperbole
+  . [(9 1 0) ((emacs (28)))
+     "GNU Hyperbole: The Everyday Hypertextual Information Manager"
+     tar
+     ((:url . "http://www.gnu.org/software/hyperbole")
+      (:keywords "comm" "convenience" "files" "frames" "hypermedia"
+		 "languages" "mail" "matching" "mouse" "multimedia"
+		 "outlines" "tools" "wp")
+      (:maintainer ("Robert Weiner" . "rsw@gnu.org")
+		   ("Mats Lidell" . "matsl@gnu.org"))
+      (:authors ("Robert Weiner" . "rsw@gnu.org"))
+      (:commit . "1491d0d1e84fb3c5e4a4b6d3be9176f47639ecba"))])
+ (ibuffer-sidebar
+  . [(1 0 0) ((emacs (29 1))) "Sidebar for `ibuffer'" tar
+     ((:url . "https://github.com/jojojames/ibuffer-sidebar")
+      (:keywords "ibuffer" "files" "tools")
+      (:maintainer "James Nguyen" . "james@jojojames.com")
+      (:authors ("James Nguyen" . "james@jojojames.com"))
+      (:commit . "2781453a6967a7d16a1dddb04cfba6b907110d3e"))])
+ (idlwave
+  . [(6 5 1) nil "IDL editing mode for GNU Emacs" tar
+     ((:keywords "languages")
+      (:maintainer "J.D. Smith" . "jdtsmith@gmail.com")
+      (:url . "https://elpa.gnu.org/packages/idlwave.html")
+      (:commit . "e1fcd7244cb32df1e90b09729e53474e50a2e808"))])
+ (ilist
+  . [(0 4) nil "Display a list in an ibuffer way." tar
+     ((:url . "https://gitlab.com/mmemmew/ilist")
+      (:keywords "convenience")
+      (:maintainer "Durand" . "mmemmew@gmail.com")
+      (:authors ("Durand" . "mmemmew@gmail.com"))
+      (:commit . "5a57e52122fe483fa9bd39049c13a25334e408da"))])
+ (indent-bars
+  . [(1 0 1) ((emacs (27 1)) (compat (30)))
+     "Highlight indentation with bars" tar
+     ((:url . "https://github.com/jdtsmith/indent-bars")
+      (:keywords "convenience")
+      (:maintainer "J.D. Smith" . "jdtsmith+elpa@gmail.com")
+      (:authors ("J.D. Smith" . "jdtsmith+elpa@gmail.com"))
+      (:commit . "36620c5f3fba2ba8f23d7ef947e0d1d09e412bf5"))])
+ (inspector
+  . [(0 39) ((emacs (27 1)))
+     "Tool for inspection of Emacs Lisp objects" tar
+     ((:url . "https://github.com/mmontone/emacs-inspector")
+      (:keywords "debugging" "tool" "lisp" "development")
+      (:maintainer "Mariano Montone" . "marianomontone@gmail.com")
+      (:authors ("Mariano Montone" . "marianomontone@gmail.com"))
+      (:commit . "52a64993ac36ed3ed0be51b6a0d54d190edc9c74"))])
+ (ioccur
+  . [(2 6) ((emacs (24)) (cl-lib (0 5))) "Incremental occur" tar
+     ((:url . "https://github.com/thierryvolpiatto/ioccur")
+      (:maintainer "Thierry Volpiatto" . "thievol@posteo.net")
+      (:authors ("Thierry Volpiatto" . "thievol@posteo.net"))
+      (:commit . "33bf6f73e314ade8da27dd793c69c21312c97f10"))])
+ (isearch-mb
+  . [(0 8) ((emacs (27 1))) "Control isearch from the minibuffer" tar
+     ((:url . "https://github.com/astoff/isearch-mb")
+      (:keywords "matching")
+      (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com")
+      (:authors ("Augusto Stoffel" . "arstoffel@gmail.com"))
+      (:commit . "927ea1790bd0c474be5f63bd9c23874e6c61fb48"))])
+ (iso-date
+  . [(1 2 0) ((emacs (28 1))) "Utilities for working with ISO dates"
+     tar
+     ((:url . "https://github.com/lmq-10/iso-date")
+      (:maintainer "Lucas Quintana" . "lmq10@protonmail.com")
+      (:authors ("Lucas Quintana" . "lmq10@protonmail.com"))
+      (:commit . "a957d9ae579eeed146e929dd70e5d1a6e265bd06"))])
+ (iterators
+  . [(0 1 1) ((emacs (25))) "Functions for working with iterators" tar
+     ((:keywords "extensions" "elisp")
+      (:maintainer "Michael Heerdegen" . "michael_heerdegen@web.de")
+      (:authors ("Michael Heerdegen" . "michael_heerdegen@web.de"))
+      (:url . "https://elpa.gnu.org/packages/iterators.html")
+      (:commit . "99bdcc8bdfcbc6a8de3d2675450c2fe0aa0e72fd"))])
+ (ivy
+  . [(0 15 1) ((emacs (24 5))) "Incremental Vertical completYon" tar
+     ((:url . "https://github.com/abo-abo/swiper")
+      (:keywords "matching")
+      (:maintainer "Basil L. Contovounesios" . "basil@contovou.net")
+      (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com"))
+      (:commit . "d63d52f140105d4a072fbc18f1405ab8313a4cd5"))])
+ (ivy-avy
+  . [(0 15 1) ((emacs (24 5)) (ivy (0 15 1)) (avy (0 5 0)))
+     "Avy integration for Ivy" tar
+     ((:url . "https://github.com/abo-abo/swiper")
+      (:keywords "convenience")
+      (:maintainer "Basil L. Contovounesios" . "basil@contovou.net")
+      (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com"))
+      (:commit . "b1fb126f19612aab7fdee74bccbf00fcaa3f908f"))])
+ (ivy-explorer
+  . [(0 3 2) ((emacs (25)) (ivy (0 10 0)))
+     "Dynamic file browsing grid using ivy" tar
+     ((:url . "https://github.com/clemera/ivy-explorer")
+      (:keywords "convenience" "files" "matching")
+      (:maintainer "Clemens Radermacher" . "clemera@posteo.net")
+      (:authors ("Clemens Radermacher" . "clemera@posteo.net"))
+      (:commit . "14adb6164f1d1646f503c3e4bd9aa559805f93d7"))])
+ (ivy-hydra
+  . [(0 15 1) ((emacs (24 5)) (ivy (0 15 1)) (hydra (0 14 0)))
+     "Additional key bindings for Ivy" tar
+     ((:url . "https://github.com/abo-abo/swiper")
+      (:keywords "convenience")
+      (:maintainer "Basil L. Contovounesios" . "basil@contovou.net")
+      (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com"))
+      (:commit . "1c9bc4e190199c891a69af03b2cf3e3f0d00c1ec"))])
+ (ivy-posframe
+  . [(0 6 4) ((emacs (26 0)) (posframe (1 0 0)) (ivy (0 13 0)))
+     "Using posframe to show Ivy" tar
+     ((:url . "https://github.com/tumashu/ivy-posframe")
+      (:keywords "abbrev" "convenience" "matching" "ivy")
+      (:maintainer "Feng Shu" . "tumashu@163.com")
+      (:authors ("Feng Shu" . "tumashu@163.com")
+		("Naoya Yamashita" . "conao3@gmail.com"))
+      (:commit . "ede7b2121f176ab543ce6b73fd96e3eafd6d1505"))])
+ (jami-bot
+  . [(0 0 4) ((emacs (27 1)))
+     "An extendable chat bot for the private messenger GNU Jami" tar
+     ((:url . "https://gitlab.com/hperrey/jami-bot")
+      (:keywords "comm" "jami" "messenger" "chat bot" "dbus")
+      (:maintainer "Hanno Perrey" . "hanno@hoowl.se")
+      (:authors ("Hanno Perrey" . "hanno@hoowl.se"))
+      (:commit . "c2ad37e2ada14b5551a83211cc4692b39be4e5fb"))])
+ (jarchive
+  . [(0 12 0) ((emacs (26 1)))
+     "Open project dependencies in jar archives" tar
+     ((:url . "https://git.sr.ht/~dannyfreeman/jarchive")
+      (:keywords "tools" "languages" "jvm" "java" "clojure")
+      (:maintainer "Danny Freeman" . "danny@dfreeman.email")
+      (:commit . "670b574ee3588b30acdeb096069b2739c979cac5"))])
+ (javaimp
+  . [(0 9 2) nil
+     "Add and reorder Java import statements in Maven/Gradle projects"
+     tar
+     ((:keywords "java" "maven" "gradle" "programming")
+      (:maintainer "Filipp Gunbin" . "fgunbin@fastmail.fm")
+      (:authors ("Filipp Gunbin" . "fgunbin@fastmail.fm"))
+      (:url . "https://elpa.gnu.org/packages/javaimp.html")
+      (:commit . "2a6cb97fb068fe8c8a96a60cd7cc6f5ae367c7b1"))])
+ (jgraph-mode
+  . [(1 1) ((cl-lib (0 5))) "Major mode for Jgraph files" tar
+     ((:keywords "tex" "wp")
+      (:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/jgraph-mode.html")
+      (:commit . "4e13f89fe8837b84d40b969e6a5431816180a747"))])
+ (jinx
+  . [(2 10) ((emacs (29 1)) (compat (31))) "Enchanted Spell Checker"
+     tar
+     ((:url . "https://github.com/minad/jinx")
+      (:keywords "convenience" "text")
+      (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de")
+      (:authors ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:commit . "f776ca306801f3b4d26a458d5109ea586d52e716"))])
+ (jit-spell
+  . [(0 5) ((emacs (27 1)) (compat (29 1)))
+     "Just-in-time spell checking" tar
+     ((:url . "https://github.com/astoff/jit-spell")
+      (:keywords "tools" "wp")
+      (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com")
+      (:authors ("Augusto Stoffel" . "arstoffel@gmail.com"))
+      (:commit . "e6f3525b848c48906f06bf21a9e8678b95ccd3bf"))])
+ (js2-mode
+  . [(20231224) ((emacs (24 1)) (cl-lib (0 5)))
+     "Improved JavaScript editing mode" tar
+     ((:url . "https://github.com/mooz/js2-mode/")
+      (:keywords "languages" "javascript")
+      (:maintainer ("Steve Yegge" . "steve.yegge@gmail.com")
+		   ("mooz" . "stillpedant@gmail.com")
+		   ("Dmitry Gutov" . "dgutov@yandex.ru"))
+      (:authors ("Steve Yegge" . "steve.yegge@gmail.com")
+		("mooz" . "stillpedant@gmail.com")
+		("Dmitry Gutov" . "dgutov@yandex.ru"))
+      (:commit . "010a536da6df345a0b9a55bbd892f5f4d0d9fdfc"))])
+ (json-mode
+  . [(0 3 1) ((emacs (25 1))) "Major mode for editing JSON files" tar
+     ((:keywords "data")
+      (:maintainer "Simen Heggestøyl" . "simenheg@gmail.com")
+      (:authors ("Simen Heggestøyl" . "simenheg@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/json-mode.html")
+      (:commit . "2eb4b83db23e61fa2112688148aeedbacfc3c18e"))])
+ (jsonrpc
+  . [(1 0 29) ((emacs (25 2))) "JSON-RPC library" tar
+     ((:keywords "processes" "languages" "extensions")
+      (:maintainer "João Távora" . "joaotavora@gmail.com")
+      (:authors ("João Távora" . "joaotavora@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/jsonrpc.html")
+      (:commit . "f52457d17ef3fb426b9dff07dec8b99aae3ff54c"))])
+ (jumpc
+  . [(3 1) nil "jump to previous insertion points" tar
+     ((:maintainer "Ivan Kanis" . "ivan@kanis.fr")
+      (:authors ("Ivan Kanis" . "ivan@kanis.fr"))
+      (:url . "https://elpa.gnu.org/packages/jumpc.html")
+      (:commit . "ab83a2a5416f83405361e25df8cbd8aab35cb8b3"))])
+ (keymap-popup
+  . [(0 4 3) ((emacs (29 1))) "Described keymaps with popup help" tar
+     ((:url . "https://git.thanosapollo.org/emacs-keymap-popup/")
+      (:keywords "convenience")
+      (:maintainer "Thanos Apollo" . "public@thanosapollo.org")
+      (:authors ("Thanos Apollo" . "public@thanosapollo.org"))
+      (:commit . "51569cc03e7baba51005d08e6019c24c1a4794c9"))])
+ (kind-icon
+  . [(0 2 2) ((emacs (27 1)) (svg-lib (0 2 8)))
+     "Completion kind icons" tar
+     ((:url . "https://github.com/jdtsmith/kind-icon")
+      (:keywords "completion" "convenience")
+      (:maintainer "J.D. Smith" . "jdtsmith@gmail.com")
+      (:authors ("J.D. Smith" . "jdtsmith@gmail.com"))
+      (:commit . "d8e73fea45cba968de0deed4b7985f5fdaafadfe"))])
+ (kiwix
+  . [(1 1 5) ((emacs (25 1)) (request (0 3 0)))
+     "Searching offline Wikipedia through Kiwix." tar
+     ((:url . "https://github.com/stardiviner/kiwix.el")
+      (:keywords "kiwix" "wikipedia")
+      (:maintainer "stardiviner" . "numbchild@gmail.com")
+      (:authors ("stardiviner" . "numbchild@gmail.com"))
+      (:commit . "cb843349c10b1a492ceb59da20bfcef3ef02f4b5"))])
+ (kmb
+  . [(0 1) ((emacs (24 1)))
+     "Kill buffers matching a regexp w/o confirmation" tar
+     ((:keywords "lisp" "convenience")
+      (:authors ("Tino Calancha" . "tino.calancha@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/kmb.html")
+      (:commit . "4fee1c87e7e286d7ecd759fb74aa7a112bb51e3a"))])
+ (kubed
+  . [(0 7 1) ((emacs (29 1))) "Kubernetes, Emacs, done!" tar
+     ((:url . "https://eshelyaron.com/kubed.html")
+      (:keywords "tools" "kubernetes" "containers")
+      (:maintainer "Eshel Yaron" . "~eshel/kubed-devel@lists.sr.ht")
+      (:authors ("Eshel Yaron" . "me@eshelyaron.com"))
+      (:commit . "214cddb1e6458fd76143b580c24700cba70acf1e"))])
+ (landmark
+  . [(1 0) nil "Neural-network robot that learns landmarks" tar
+     ((:keywords "games" "neural network" "adaptive search"
+		 "chemotaxis")
+      (:maintainer "Terrence Brannon (was:" . "brannon@rana.usc.edu>)")
+      (:authors ("Terrence Brannon (was:" . "brannon@rana.usc.edu>)"))
+      (:url . "https://elpa.gnu.org/packages/landmark.html")
+      (:commit . "422d310c7726898b8d85f95f2336c79c8aaf30eb"))])
+ (latex-table-wizard
+  . [(1 6 0) ((emacs (27 1)) (auctex (12 1)) (transient (0 3 7)))
+     "Magic editing of LaTeX tables" tar
+     ((:url . "https://github.com/enricoflor/latex-table-wizard")
+      (:keywords "convenience" "tex")
+      (:maintainer "Enrico Flor" . "enrico@eflor.net")
+      (:authors ("Enrico Flor" . "enrico@eflor.net"))
+      (:commit . "0ccd242ba521ed3b323d1dc84f49febe80b2eec7"))])
+ (leaf
+  . [(4 5 5) ((emacs (24 1)))
+     "Simplify your init.el configuration, extended use-package" tar
+     ((:url . "https://github.com/conao3/leaf.el")
+      (:keywords "lisp" "settings")
+      (:maintainer "Naoya Yamashita" . "conao3@gmail.com")
+      (:authors ("Naoya Yamashita" . "conao3@gmail.com"))
+      (:commit . "7cc38f9739eadc569b1179fabe7f7893167105da"))])
+ (lentic
+  . [(0 12) ((emacs (25)) (m-buffer (0 13)) (dash (2 5 0)))
+     "One buffer as a view of another" tar
+     ((:maintainer "Phillip Lord" . "phillip.lord@russet.org.uk")
+      (:authors ("Phillip Lord" . "phillip.lord@russet.org.uk"))
+      (:url . "https://elpa.gnu.org/packages/lentic.html")
+      (:commit . "180c1082c016de790f9e6596b63329657c83ce20"))])
+ (lentic-server
+  . [(0 2) ((lentic (0 8)) (web-server (0 1 1)))
+     "Web Server for Emacs Literate Source" tar
+     ((:maintainer "Phillip Lord" . "phillip.lord@newcastle.ac.uk")
+      (:authors ("Phillip Lord" . "phillip.lord@newcastle.ac.uk"))
+      (:url . "https://elpa.gnu.org/packages/lentic-server.html")
+      (:commit . "732b88e7a183707ba65c38e8b3517cac42572644"))])
+ (let-alist .
+   [(1 0 6) ((emacs (24 1)))
+    "Easily let-bind values of an assoc-list by their names" tar
+    ((:keywords "extensions" "lisp")
+     (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com")
+     (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com"))
+     (:url . "https://elpa.gnu.org/packages/let-alist.html")
+     (:commit . "77fb84e6db96cbaa70e230f4881e4ede6e028f15"))])
+ (lex
+  . [(1 3) nil "Lexical analyser construction" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/lex.html")
+      (:commit . "ccbfa1da2d773e07c9f1e0451b70b23f721fa7d5"))])
+ (lin
+  . [(2 0 0) ((emacs (27 1)))
+     "Make `hl-line-mode' more suitable for selection interfaces" tar
+     ((:url . "https://github.com/protesilaos/lin")
+      (:keywords "convenience" "faces" "theme")
+      (:maintainer "Protesilaos Stavrou" . "info@protesilaos.com")
+      (:authors ("Protesilaos Stavrou" . "info@protesilaos.com"))
+      (:commit . "fa75ea6b05070ce0f06befdef1954afa99aa5e89"))])
+ (lisp-ts-mode
+  . [(0 3 3) ((emacs (30 2)) (cond-star (0)) (compat (31)))
+     "lisp-mode with tree-sitter support" tar
+     ((:url . "https://codeberg.org/zshaftel/lisp-ts-mode")
+      (:keywords "lisp" "languages" "tree-sitter")
+      (:maintainer "zach shaftel" . "zach@shaf.tel")
+      (:authors ("zach shaftel" . "zach@shaf.tel"))
+      (:commit . "9642d56362f0417a5b9a9c6299282e5df8b02353"))])
+ (listen
+  . [(0 10 1)
+     ((emacs (29 1)) (persist (0 6)) (taxy (0 10))
+      (taxy-magit-section (0 13)) (transient (0 5 3)))
+     "Audio/Music player" tar
+     ((:url . "https://github.com/alphapapa/listen.el")
+      (:keywords "multimedia")
+      (:maintainer "Adam Porter" . "adam@alphapapa.net")
+      (:authors ("Adam Porter" . "adam@alphapapa.net"))
+      (:commit . "2a867549dc1fe6aaee9140cfa1f913fa5a74a3bf"))])
+ (literate-scratch
+  . [(2 2) ((emacs (29 1))) "Lisp Interaction w/ text paragraphs" tar
+     ((:url
+       . "https://git.spwhitton.name/dotfiles/tree/.emacs.d/site-lisp/literate-scratch.el")
+      (:keywords "lisp" "text")
+      (:maintainer "Sean Whitton" . "spwhitton@spwhitton.name")
+      (:authors ("Sean Whitton" . "spwhitton@spwhitton.name"))
+      (:commit . "00b8f65effe4f2673e6450d70000644b266aa78a"))])
+ (llm
+  . [(0 32 0)
+     ((emacs (28 1)) (plz (0 8)) (plz-event-source (0 1 1))
+      (plz-media-type (0 2 1)) (compat (29 1)))
+     "Interface to pluggable llm backends" tar
+     ((:url . "https://github.com/ahyatt/llm")
+      (:maintainer "Andrew Hyatt" . "ahyatt@gmail.com")
+      (:authors ("Andrew Hyatt" . "ahyatt@gmail.com"))
+      (:commit . "34d4f5b42ba6bbf7b2710af4320ae9ad7b8a1d87"))])
+ (lmc
+  . [(1 4) nil "Little Man Computer in Elisp" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/lmc.html")
+      (:commit . "b65ac802b4f55fd8e5809fcf7a6f6da1e11e853a"))])
+ (load-dir
+  . [(0 0 5) nil "Load all Emacs Lisp files in a given directory" tar
+     ((:keywords "lisp" "files" "convenience")
+      (:url . "https://elpa.gnu.org/packages/load-dir.html")
+      (:commit . "4c43baee082cc5a6f966c441008c6c479acbc5b7"))])
+ (load-relative
+  . [(1 3 2) nil
+     "Relative file load (within a multi-file Emacs package)" tar
+     ((:url . "https://github.com/rocky/emacs-load-relative")
+      (:keywords "internal")
+      (:maintainer "Rocky Bernstein" . "rocky@gnu.org")
+      (:authors ("Rocky Bernstein" . "rocky@gnu.org"))
+      (:commit . "e79d8f1581991381a9e3f1657af59dd0c35058fa"))])
+ (loc-changes
+  . [(1 2) nil "keep track of positions even after buffer changes"
+     single
+     ((:authors ("Rocky Bernstein" . "rocky@gnu.org"))
+      (:maintainer "Rocky Bernstein" . "rocky@gnu.org")
+      (:url . "http://github.com/rocky/emacs-loc-changes"))])
+ (loccur
+  . [(1 2 5) ((emacs (25 1)))
+     "Perform an occur-like folding in current buffer" tar
+     ((:url . "https://github.com/fourier/loccur")
+      (:keywords "matching")
+      (:maintainer "Alexey Veretennikov"
+		   . "alexey.veretennikov@gmail.com")
+      (:authors
+       ("Alexey Veretennikov" . "alexey.veretennikov@gmail.com"))
+      (:commit . "2120345933a1617cc5359dabd7636fd3479441bf"))])
+ (logos
+  . [(1 2 0) ((emacs (27 1))) "Simple focus mode and extras" tar
+     ((:url . "https://github.com/protesilaos/logos")
+      (:keywords "convenience" "focus" "writing" "presentation"
+		 "narrowing")
+      (:maintainer "Protesilaos Stavrou" . "info@protesilaos.com")
+      (:authors ("Protesilaos Stavrou" . "info@protesilaos.com"))
+      (:commit . "79270ec67d81f45f4431d850fbbb31eaca92f24f"))])
+ (luwak
+  . [(1 0 0) ((emacs (28))) "Web browser based on lynx -dump." tar
+     ((:url . "https://g.ypei.me/luwak.git")
+      (:keywords "web-browser" "lynx" "html" "tor")
+      (:maintainer "Yuchen Pei" . "id@ypei.org")
+      (:authors ("Yuchen Pei" . "id@ypei.org"))
+      (:commit . "37a36288c8d4cdba461812dbdf5da434ca156fee"))])
+ (lv
+  . [(0 15 0) nil "Other echo area" tar
+     ((:url . "https://elpa.gnu.org/packages/lv.html")
+      (:commit . "54e9db2b023e03b6f6b46aeec48ea74fd51d4e11"))])
+ (m-buffer
+  . [(0 16 1) ((seq (2 14)))
+     "List-Oriented, Functional Buffer Manipulation" tar
+     ((:maintainer "Phillip Lord" . "phillip.lord@russet.rg.uk")
+      (:authors ("Phillip Lord" . "phillip.lord@russet.org.uk"))
+      (:url . "https://elpa.gnu.org/packages/m-buffer.html")
+      (:commit . "5e7714835b2289f61dad24c0b5cf98d28fc313b0"))])
+ (map
+  . [(3 3 1) ((emacs (26))) "Map manipulation functions" tar
+     ((:keywords "extensions" "lisp")
+      (:maintainer nil . "emacs-devel@gnu.org")
+      (:authors ("Nicolas Petton" . "nicolas@petton.fr"))
+      (:url . "https://elpa.gnu.org/packages/map.html")
+      (:commit . "9da2efb670574b473ab864ae0456b4f1b38e680b"))])
+ (marginalia
+  . [(2 12) ((emacs (29 1)) (compat (31)))
+     "Enrich existing commands with completion annotations" tar
+     ((:url . "https://github.com/minad/marginalia")
+      (:keywords "docs" "help" "matching" "completion")
+      (:maintainer ("Omar Antolín Camarena" . "omar@matem.unam.mx")
+		   ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:authors ("Omar Antolín Camarena" . "omar@matem.unam.mx")
+		("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:commit . "7ec0b70afb43a756ecd45a958c6ebe797717fc91"))])
+ (markchars
+  . [(0 2 2) nil "Mark chars fitting certain characteristics" tar
+     ((:maintainer "Lennart Borgman" . "lennart.borgman@gmail.com")
+      (:authors ("Lennart Borgman" . "lennart.borgman@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/markchars.html")
+      (:commit . "f069a7637a97239ecab7f34fd07fddfafb02ba3f"))])
+ (math-symbol-lists
+  . [(1 3) nil "Lists of Unicode math symbols and latex commands" tar
+     ((:url . "https://github.com/vspinu/math-symbol-lists")
+      (:keywords "unicode" "symbols" "mathematics")
+      (:maintainer "Vitalie Spinu" . "spinuvit@gmail.com")
+      (:authors ("Vitalie Spinu" . "spinuvit@gmail.com"))
+      (:commit . "590d9f09f8ad9aab747b97f077396a2035dcf50f"))])
+ (mathjax
+  . [(0 1) ((emacs (27 1))) "Render formulas using MathJax" tar
+     ((:url . "https://github.com/astoff/mathjax.el")
+      (:keywords "tex" "text" "tools")
+      (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com")
+      (:authors ("Augusto Stoffel" . "arstoffel@gmail.com"))
+      (:commit . "db669451bbee7d2ea9872c28661c4679391b9644"))])
+ (mathsheet
+  . [(1 3) ((peg (1 0)) (emacs (28 1)))
+     "Generate dynamic math worksheets" tar
+     ((:url . "https://gitlab.com/ianxm/mathsheet")
+      (:keywords "tools" "education" "math")
+      (:maintainer "Ian Martins" . "ianxm@jhu.edu")
+      (:authors ("Ian Martins" . "ianxm@jhu.edu"))
+      (:commit . "da128406fca3eeb66358d479082cd78f2fdeabb4"))])
+ (matlab-mode
+  . [(8 2 0) ((emacs (27 2))) "Major mode for MATLAB(R) dot-m files"
+     tar
+     ((:url . "https://github.com/mathworks/Emacs-MATLAB-Mode")
+      (:keywords "matlab(r)")
+      (:maintainer ("Eric M. Ludlam" . "eludlam@mathworks.com")
+		   ("Uwe Brauer" . "oub@mat.ucm.es")
+		   ("John Ciolfi" . "john.ciolfi.32@gmail.com"))
+      (:authors ("Matt Wette" . "mwette@alumni.caltech.edu")
+		("Eric M. Ludlam" . "eludlam@mathworks.com"))
+      (:commit . "a42d34dfc498b8754ac89512b399b77481791406"))])
+ (mct
+  . [(1 1 1) ((emacs (29 4))) "Minibuffer Confines Transcended" tar
+     ((:url . "https://github.com/protesilaos/mct")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "ffe1555ace9041c93b78ba2fdf1f4656111394f3"))])
+ (memory-usage
+  . [(0 2) nil "Analyze the memory usage of Emacs in various ways" tar
+     ((:keywords "maint")
+      (:maintainer "Stefan Monnier" . "monnier@cs.yale.edu")
+      (:authors ("Stefan Monnier" . "monnier@cs.yale.edu"))
+      (:url . "https://elpa.gnu.org/packages/memory-usage.html")
+      (:commit . "cb73fe66a59d737a72a5ed4259794b1d75aefa2c"))])
+ (metar
+  . [(0 3) ((cl-lib (0 5)))
+     "Retrieve and decode METAR weather information" tar
+     ((:keywords "comm")
+      (:maintainer "Mario Lang" . "mlang@delysid.org")
+      (:authors ("Mario Lang" . "mlang@delysid.org"))
+      (:url . "https://elpa.gnu.org/packages/metar.html")
+      (:commit . "623639e7d6912c4d71dc8f0aea5ad1e9ede41cf8"))])
+ (midi-kbd
+  . [(0 2) ((emacs (25))) "Create keyboard events from Midi input" tar
+     ((:keywords "convenience" "hardware" "multimedia")
+      (:maintainer "David Kastrup" . "dak@gnu.org")
+      (:authors ("David Kastrup" . "dak@gnu.org"))
+      (:url . "https://elpa.gnu.org/packages/midi-kbd.html")
+      (:commit . "d23eea421486cf94e0282ac0cc43fd9700174c77"))])
+ (mines
+  . [(1 6) ((emacs (24 4)) (cl-lib (0 5))) "Minesweeper game" tar
+     ((:url . "https://github.com/calancha/Minesweeper")
+      (:keywords "games")
+      (:maintainer "Tino Calancha" . "tino.calancha@gmail.com")
+      (:authors ("Tino Calancha" . "tino.calancha@gmail.com"))
+      (:commit . "868e9b9650be1bcc1a5e6ff5a66806eccd1fe26e"))])
+ (minibuffer-header
+  . [(0 5) ((emacs (27 1))) "Minibuffer header line" tar
+     ((:url . "https://github.com/rougier/minibuffer-header")
+      (:keywords "convenience")
+      (:maintainer "Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr")
+      (:commit . "fe5d90d3f13c0010eed3b5dd437b458f8bf3da5f"))])
+ (minibuffer-line
+  . [(0 1) nil "Display status info in the minibuffer window" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/minibuffer-line.html")
+      (:commit . "852874725fd06329109b2d431d8af5502b54036c"))])
+ (minimail
+  . [(0 5) ((emacs (30 1)) (compat (31)) (transient (0 12)))
+     "Simple, non-blocking IMAP email client" tar
+     ((:url . "https://codeberg.org/astoff/minimail")
+      (:keywords "mail")
+      (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com")
+      (:authors ("Augusto Stoffel" . "arstoffel@gmail.com"))
+      (:commit . "5834c3e09d36fe7901e8dcd14f2dac36d70fe5cf"))])
+ (minimap
+  . [(1 4) nil "Sidebar showing a \"mini-map\" of a buffer" tar
+     ((:maintainer "David Engster" . "deng@randomsample.de")
+      (:authors ("David Engster" . "deng@randomsample.de"))
+      (:url . "https://elpa.gnu.org/packages/minimap.html")
+      (:commit . "2ff29c5d6abae3637d6174d889f39745fcd13fa5"))])
+ (minuet
+  . [(0 10 0) ((emacs (29)) (plz (0 9)) (dash (2 19 1)))
+     "Code completion using LLM" tar
+     ((:url . "https://github.com/milanglacier/minuet-ai.el")
+      (:maintainer "Milan Glacier" . "dev@milanglacier.com")
+      (:authors ("Milan Glacier" . "dev@milanglacier.com"))
+      (:commit . "2c566377d580ee678d661e0638c916776f62a424"))])
+ (mmm-mode
+  . [(0 5 11) ((emacs (25 1)) (cl-lib (0 2)))
+     "Allow Multiple Major Modes in a buffer" tar
+     ((:url . "https://github.com/dgutov/mmm-mode")
+      (:keywords "convenience" "faces" "languages" "tools")
+      (:maintainer "Dmitry Gutov" . "dmitry@gutov.dev")
+      (:authors ("Michael Abraham Shulman" . "viritrilbia@gmail.com"))
+      (:commit . "b1f5c7dbdc405e6e10d9ddd99a43a6b2ad61b176"))])
+ (mode-line-maker
+  . [(0 2 2) ((emacs (29 1))) "Mode-line helper tools" tar
+     ((:url . "https://github.com/rougier/mode-line-maker")
+      (:keywords "convenience" "mode-line" "header-line")
+      (:maintainer "Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr")
+      (:commit . "dc0bd20750f34340448ba1c7be4ed2b62af0f78c"))])
+ (modus-themes
+  . [(5 3 0) ((emacs (28 1)))
+     "Elegant, highly legible and customizable themes" tar
+     ((:url . "https://github.com/protesilaos/modus-themes")
+      (:keywords "faces" "theme" "accessibility")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "2d044ac89f3bca7011fa2bfda003cf80ce115f70"))])
+ (mpdired
+  . [(3) ((emacs (29))) "A dired-like client for Music Player Daemon"
+     tar
+     ((:keywords "multimedia")
+      (:maintainer "Manuel Giraud" . "manuel@ledu-giraud.fr")
+      (:authors ("Manuel Giraud" . "manuel@ledu-giraud.fr"))
+      (:url . "https://elpa.gnu.org/packages/mpdired.html")
+      (:commit . "793ec28c47d25f36806eb5e692025d61fb6a1bb3"))])
+ (multi-mode
+  . [(1 14) nil "support for multiple major modes" tar
+     ((:url . "http://www.loveshack.ukfsn.org/emacs")
+      (:keywords "languages" "extensions" "files")
+      (:maintainer "Dave Love" . "fx@gnu.org")
+      (:authors ("Dave Love" . "fx@gnu.org"))
+      (:commit . "03dae71ad44bd5d10495011f124a1cd6f43f795d"))])
+ (multishell
+  . [(1 1 10) ((cl-lib (0 5)))
+     "Organize use of multiple shell buffers, local and remote" tar
+     ((:url . "https://github.com/kenmanheimer/EmacsMultishell")
+      (:keywords "processes")
+      (:maintainer "Ken Manheimer" . "ken.manheimer@gmail.com")
+      (:authors ("Ken Manheimer" . "ken.manheimer@gmail.com"))
+      (:commit . "aa1433b8df6d950e8592c7e878922b4ec5374569"))])
+ (muse
+  . [(3 20 2) nil "Authoring and publishing tool for Emacs" tar
+     ((:url . "http://mwolson.org/projects/EmacsMuse.html")
+      (:maintainer "Michael Olson" . "mwolson@gnu.org")
+      (:authors ("John Wiegley" . "johnw@gnu.org"))
+      (:keywords "hypermedia"))])
+ (myers
+  . [(0 1) ((emacs (25))) "Random-access singly-linked lists" tar
+     ((:keywords "list" "containers")
+      (:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/myers.html")
+      (:commit . "cc8d39d05c4a48545336510df7ac9ab186611ea2"))])
+ (nadvice
+  . [(0 4) nil "Forward compatibility for Emacs-24.4's nadvice" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/nadvice.html")
+      (:commit . "d19e9ae649374a0f2fab1baa045ed192e0851750"))])
+ (nameless
+  . [(1 0 2) ((emacs (24 4)))
+     "Hide package namespace in your emacs-lisp code" tar
+     ((:url . "https://github.com/Malabarba/nameless")
+      (:keywords "convenience" "lisp")
+      (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com")
+      (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com"))
+      (:commit . "ab1a5c589378334eafca105af1a17f73b9065423"))])
+ (names
+  . [(20151201 0) ((emacs (24 1)) (cl-lib (0 5)))
+     "Namespaces for emacs-lisp. Avoid name clobbering without hiding symbols."
+     tar
+     ((:url . "https://github.com/Malabarba/names")
+      (:keywords "extensions" "lisp")
+      (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com")
+      (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com"))
+      (:commit . "465df8ed03f9d6c926566b81ef8abc93f8357983"))])
+ (nano-agenda
+  . [(0 3) ((emacs (27 1))) "N Λ N O agenda" tar
+     ((:url . "https://github.com/rougier/nano-agenda")
+      (:keywords "convenience" "org-mode" "org-agenda")
+      (:maintainer "Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr")
+      (:commit . "6c38e95b8e846aceb88398c682fd283052924556"))])
+ (nano-modeline
+  . [(1 1 0) ((emacs (27 1))) "N Λ N O modeline" tar
+     ((:url . "https://github.com/rougier/nano-modeline")
+      (:keywords "convenience" "mode-line" "header-line")
+      (:maintainer "Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr")
+      (:commit . "04676d57a1e602123a593836745a744d1b2028fb"))])
+ (nano-theme
+  . [(0 3 4) ((emacs (27 1))) "N Λ N O theme" tar
+     ((:url . "https://github.com/rougier/nano-theme")
+      (:keywords "theme" "dark" "light")
+      (:maintainer "Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr")
+      (:commit . "34a3efc37b329064a320225361ad833c57017485"))])
+ (nftables-mode
+  . [(1 1) ((emacs (25 1))) "Major mode for editing nftables" tar
+     ((:keywords "convenience")
+      (:maintainer nil . "emacs-devel@gnu.org")
+      (:authors ("Trent W. Buck" . "trentbuck@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/nftables-mode.html")
+      (:commit . "05600129ee8ea0774c6ac446a2bd18fc1dde54eb"))])
+ (nhexl-mode
+  . [(1 5) ((emacs (24 4)) (cl-lib (0 5)))
+     "Minor mode to edit files via hex-dump format" tar
+     ((:keywords "data")
+      (:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/nhexl-mode.html")
+      (:commit . "ec80692dec04e238f2ae3284cfd8f9d05ac1d2a3"))])
+ (nlinum
+  . [(1 9) nil "Show line numbers in the margin" tar
+     ((:keywords "convenience")
+      (:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/nlinum.html")
+      (:commit . "99d0fef381e9f44a3fdcf66f28c28109a7cdaf45"))])
+ (notes-mode
+  . [(1 31) nil "Indexing system for on-line note-taking" tar
+     ((:url . "https://ant.isi.edu/~johnh/SOFTWARE/NOTES_MODE/")
+      (:maintainer "John Heidemann" . "johnh@isi.edu")
+      (:authors ("John Heidemann" . "johnh@isi.edu"))
+      (:commit . "2a25d79f7e5d9ab7298ba40e11e78d1f2ded06d2"))])
+ (notmuch-indicator
+  . [(1 3 0) ((emacs (27 1)))
+     "Display mode line indicator with notmuch-count(1) output" tar
+     ((:url . "https://github.com/protesilaos/notmuch-indicator")
+      (:keywords "convenience" "mail")
+      (:maintainer "Protesilaos Stavrou" . "info@protesilaos.com")
+      (:authors ("Protesilaos Stavrou" . "info@protesilaos.com"))
+      (:commit . "d25ece77e8ead14e6f37a2d8c05f19cb60362164"))])
+ (ntlm
+  . [(2 1 0) nil "NTLM (NT LanManager) authentication support" tar
+     ((:keywords "ntlm" "sasl" "comm")
+      (:maintainer "Thomas Fitzsimmons" . "fitzsim@fitzsim.org")
+      (:authors ("Taro Kawagishi" . "tarok@transpulse.org"))
+      (:url . "https://elpa.gnu.org/packages/ntlm.html")
+      (:commit . "1add5ec3a270cba99549dc7e78c529c3dd190784"))])
+ (num3-mode
+  . [(1 5) nil "highlight groups of digits in long numbers" tar
+     ((:keywords "faces" "minor-mode")
+      (:maintainer "Michal Nazarewicz" . "mina86@mina86.com")
+      (:authors ("Felix Lee" . "felix8a@gmail.com")
+		("Michal Nazarewicz" . "mina86@mina86.com"))
+      (:url . "https://elpa.gnu.org/packages/num3-mode.html")
+      (:commit . "fdf4d633e541875a6f765f5c3c8e0d4911122ed3"))])
+ (oauth2
+  . [(0 19) ((emacs (27 1))) "OAuth 2.0 Authorization Protocol" tar
+     ((:url . "https://elpa.gnu.org/packages/oauth2.html")
+      (:keywords "comm")
+      (:maintainer ("Xiyue Deng" . "manphiz@gmail.com")
+		   (nil . "emacs-devel@gnu.org"))
+      (:authors ("Julien Danjou" . "julien@danjou.info"))
+      (:commit . "d5390a3213399b2fb95e5cac940d3065226ee3f7"))])
+ (ob-asymptote
+  . [(1 0 2) nil "Babel Functions for Asymptote" tar
+     ((:url . "https://github.com/hurrja/ob-asymptote")
+      (:keywords "literate programming" "reproducible research")
+      (:maintainer "Jarmo Hurri" . "jarmo.hurri@iki.fi")
+      (:commit . "339b5bef1434b1833d636c9fea9b95b3e990fe71"))])
+ (ob-haxe
+  . [(1 0) nil "org-babel functions for haxe evaluation" tar
+     ((:url . "https://orgmode.org")
+      (:keywords "literate programming" "reproducible research")
+      (:maintainer "Ian Martins" . "ianxm@jhu.edu")
+      (:authors ("Ian Martins" . "ianxm@jhu.edu"))
+      (:commit . "d52fa3bc87310a560bed8e6362e412c4b3d73294"))])
+ (objed
+  . [(0 8 3) ((emacs (25)) (cl-lib (0 5)))
+     "Navigate and edit text objects." tar
+     ((:url . "https://github.com/clemera/objed")
+      (:keywords "convenience")
+      (:maintainer "Clemens Radermacher" . "clemera@posteo.net")
+      (:authors ("Clemens Radermacher" . "clemera@posteo.net"))
+      (:commit . "01f062187912785ebaa2961036802c777cbbc65d"))])
+ (omn-mode
+  . [(1 3) nil "Support for OWL Manchester Notation" tar
+     ((:maintainer "Phillip Lord" . "phillip.lord@newcastle.ac.uk")
+      (:authors ("Phillip Lord" . "phillip.lord@newcastle.ac.uk"))
+      (:url . "https://elpa.gnu.org/packages/omn-mode.html")
+      (:commit . "ec1d34f63b6d79fc0db7ed79c3d1c5747c0d6d6b"))])
+ (on-screen
+  . [(1 3 3) ((cl-lib (0))) "guide your eyes while scrolling" tar
+     ((:url . "https://github.com/michael-heerdegen/on-screen.el")
+      (:keywords "convenience")
+      (:maintainer "Michael Heerdegen" . "michael_heerdegen@web.de")
+      (:authors ("Michael Heerdegen" . "michael_heerdegen@web.de"))
+      (:commit . "cfc449d68e762cf05297bb923a48e9bbd0af1b92"))])
+ (orderless
+  . [(1 7) ((emacs (27 1)) (compat (31)))
+     "Completion style for matching regexps in any order" tar
+     ((:url . "https://github.com/oantolin/orderless")
+      (:keywords "matching" "completion")
+      (:maintainer ("Omar Antolín Camarena" . "omar@matem.unam.mx")
+		   ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:authors ("Omar Antolín Camarena" . "omar@matem.unam.mx"))
+      (:commit . "cebe19e3cf0f30604d1ed1bfaa74fff21a4e89a5"))])
+ (org
+  . [(9 8 9) ((emacs (28 2)))
+     "Outline-based notes management and organizer" tar
+     ((:url . "https://orgmode.org")
+      (:keywords "outlines" "hypermedia" "calendar" "text")
+      (:maintainer "Ihor Radchenko" . "yantar92@posteo.net")
+      (:authors ("Carsten Dominik" . "carsten.dominik@gmail.com"))
+      (:commit . "7427df2d96d264734e1ba2a943545faa1c8c763f"))])
+ (org-contacts
+  . [(1 3) ((emacs (29 1)) (org (9 7)))
+     "Contacts management system for Org mode" tar
+     ((:url . "https://repo.or.cz/org-contacts.git")
+      (:keywords "contacts" "org-mode" "outlines" "hypermedia"
+		 "calendar")
+      (:maintainer "stardiviner" . "numbchild@gmail.com")
+      (:authors ("Julien Danjou" . "julien@danjou.info"))
+      (:commit . "adaca49699cc149af991825feebaa29624e124b0"))])
+ (org-edna
+  . [(1 1 2) ((emacs (25 1)) (seq (2 19)) (org (9 0 5)))
+     "Extensible Dependencies 'N' Actions" tar
+     ((:url . "https://savannah.nongnu.org/projects/org-edna-el/")
+      (:keywords "convenience" "text" "org")
+      (:maintainer "Ian Dunn" . "dunni@gnu.org")
+      (:authors ("Ian Dunn" . "dunni@gnu.org"))
+      (:commit . "8258a4dfa00aa522249cdf9aeea5be4de97bd7c1"))])
+ (org-gnosis
+  . [(0 2 2) ((emacs (27 2)) (emacsql (4 0 0)) (compat (29 1 4 2)))
+     "Learning-focused note-taking for Gnosis" tar
+     ((:url . "https://thanosapollo.org/projects/org-gnosis/")
+      (:keywords "outlines" "extensions" "org-mode")
+      (:maintainer "Thanos Apollo" . "public@thanosapollo.org")
+      (:authors ("Thanos Apollo" . "public@thanosapollo.org"))
+      (:commit . "8dba5433f32a1c3f715408303cbe59b7db96f070"))])
+ (org-jami-bot
+  . [(0 0 5) ((emacs (28 1)) (jami-bot (0 0 4)))
+     "Capture GNU Jami messages as notes and todos in Org mode" tar
+     ((:url . "https://gitlab.com/hperrey/org-jami-bot")
+      (:keywords "comm" "outlines" "org-capture" "jami")
+      (:maintainer "Hanno Perrey" . "hanno@hoowl.se")
+      (:authors ("Hanno Perrey" . "hanno@hoowl.se"))
+      (:commit . "020b03f299dad438f65d7bcbf93553b273fd7c33"))])
+ (org-mem
+  . [(0 34 1)
+     ((emacs (29 1)) (el-job (2 7 3)) (llama (1 0))
+      (truename-cache (0 3 2)))
+     "Fast info from a large number of Org file contents" tar
+     ((:url . "https://github.com/meedstrom/org-mem")
+      (:keywords "text")
+      (:maintainer "Martin Edström" . "meedstrom@runbox.eu")
+      (:authors ("Martin Edström" . "meedstrom@runbox.eu"))
+      (:commit . "04abbc49d936dc632672d95851b0b1f2af4c2e3f"))])
+ (org-modern
+  . [(1 15) ((emacs (29 1)) (org (9 6)) (compat (31)))
+     "Modern looks for Org" tar
+     ((:url . "https://github.com/minad/org-modern")
+      (:keywords "outlines" "hypermedia" "text")
+      (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de")
+      (:authors ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:commit . "8775389d085a4ebdf77856b8f86ab4d9679fc55e"))])
+ (org-notify
+  . [(0 1 2) ((emacs (25 1))) "Notifications for Org-mode" tar
+     ((:url . "https://github.com/p-m/org-notify")
+      (:keywords "notification" "todo-list" "alarm" "reminder"
+		 "pop-up" "calendar")
+      (:maintainer "Peter Münster" . "pm@a16n.net")
+      (:authors ("Peter Münster" . "pm@a16n.net"))
+      (:commit . "aacd0efd8cb7906b3c0893791016d2e7f82e11e0"))])
+ (org-real
+  . [(1 0 12) ((emacs (26 1)) (boxy (2 0)) (org (9 3)))
+     "Keep track of real things as org-mode links" tar
+     ((:url . "https://codeberg.org/strawburster/org-real")
+      (:keywords "tools")
+      (:maintainer "Amy Pillow" . "amypillow@lavache.com")
+      (:authors ("Amy Pillow" . "amypillow@lavache.com"))
+      (:commit . "47b78418fed535c3e0e0350422e76fccd31a65ba"))])
+ (org-remark
+  . [(1 3 0) ((emacs (27 1)) (org (9 4)))
+     "Highlight & annotate text, Info, EPUB, EWW" tar
+     ((:url . "https://github.com/nobiot/org-remark")
+      (:keywords "org-mode" "annotation" "note-taking"
+		 "marginal-notes" "wp")
+      (:maintainer "Noboru Ota" . "me@nobiot.com")
+      (:authors ("Noboru Ota" . "me@nobiot.com"))
+      (:commit . "c458649989ab32babb61cf9fc5c178cdaef1a62a"))])
+ (org-transclusion
+  . [(1 4 0) ((emacs (27 1)) (org (9 4)))
+     "Transclude text content via links" tar
+     ((:url . "https://github.com/nobiot/org-transclusion")
+      (:keywords "org-mode" "transclusion" "writing")
+      (:maintainer "Noboru Ota" . "me@nobiot.com")
+      (:authors ("Noboru Ota" . "me@nobiot.com"))
+      (:commit . "e6e638710e90198070c9b07ebdaa345a79f74706"))])
+ (org-translate
+  . [(0 1 4) ((emacs (27 1)) (org (9 1)))
+     "Org-based translation environment" tar
+     ((:maintainer "Eric Abrahamsen" . "eric@ericabrahamsen.net")
+      (:authors ("Eric Abrahamsen" . "eric@ericabrahamsen.net"))
+      (:url . "https://elpa.gnu.org/packages/org-translate.html")
+      (:commit . "bdc5d169ef0c502f46aa673918ccf34fcc8415f2"))])
+ (orgalist
+  . [(1 16) ((emacs (26 1)))
+     "Manage Org-like lists in non-Org buffers" tar
+     ((:keywords "convenience")
+      (:maintainer "Nicolas Goaziou" . "mail@nicolasgoaziou.fr")
+      (:authors ("Nicolas Goaziou" . "mail@nicolasgoaziou.fr"))
+      (:url . "https://elpa.gnu.org/packages/orgalist.html")
+      (:commit . "1f540f645eeb338019750d4dca3c056a1f5eca6d"))])
+ (osc
+  . [(0 4) nil "Open Sound Control protocol library" tar
+     ((:keywords "comm" "processes" "multimedia")
+      (:maintainer "Mario Lang" . "mlang@blind.guru")
+      (:authors ("Mario Lang" . "mlang@blind.guru"))
+      (:url . "https://elpa.gnu.org/packages/osc.html")
+      (:commit . "6b6dbb4176f45f9ff3a783c816c4556ca2931a22"))])
+ (osm
+  . [(2 5) ((emacs (29 1)) (compat (31))) "OpenStreetMap viewer" tar
+     ((:url . "https://github.com/minad/osm")
+      (:keywords "network" "multimedia" "hypermedia" "mouse")
+      (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de")
+      (:authors ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:commit . "117a00204afd95c9ac2ef1016e31c67d5cd01268"))])
+ (other-frame-window
+  . [(1 0 6) ((emacs (24 4)))
+     "Minor mode to enable global prefix keys for other frame/window buffer placement"
+     tar
+     ((:keywords "frame" "window")
+      (:maintainer "Stephen Leake" . "stephen_leake@member.fsf.org")
+      (:authors ("Stephen Leake" . "stephen_leake@member.fsf.org"))
+      (:url . "https://elpa.gnu.org/packages/other-frame-window.html")
+      (:commit . "7477b00664bff9b0b9edfe7ecbef379a7543ba77"))])
+ (pabbrev
+  . [(4 3 0) ((emacs (25 1))) "Predictive abbreviation expansion" tar
+     ((:url . "https://github.com/phillord/pabbrev")
+      (:maintainer "Arthur Miller" . "arthur.miller@live.com")
+      (:authors ("Phillip Lord" . "phillip.lord@newcastle.ac.uk"))
+      (:commit . "0c281401b47bd67d2726326c1a415c2bd219395f"))])
+ (paced
+  . [(1 1 3) ((emacs (25 1)) (async (1 9 1)))
+     "Predictive Abbreviation Completion and Expansion using Dictionaries"
+     tar
+     ((:url . "https://savannah.nongnu.org/projects/paced-el/")
+      (:keywords "convenience" "completion")
+      (:maintainer "Ian Dunn" . "dunni@gnu.org")
+      (:authors ("Ian Dunn" . "dunni@gnu.org"))
+      (:commit . "c3683a0a8a611fbd15bb3ec78ccac121843711c9"))])
+ (package-x
+  . [(1 0) nil "Package extras" tar
+     ((:keywords "tools")
+      (:maintainer "Philip Kaludercic" . "philipk@posteo.net")
+      (:authors ("Tom Tromey" . "tromey@redhat.com"))
+      (:url . "https://elpa.gnu.org/packages/package-x.html")
+      (:commit . "a4aaf1a7dc31af40b33435fae3c1674d744031f7"))])
+ (parsec
+  . [(0 1 3) ((emacs (24)) (cl-lib (0 5))) "Parser combinator library"
+     tar
+     ((:url . "https://github.com/cute-jumper/parsec.el")
+      (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com")
+      (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com"))
+      (:keywords "extensions"))])
+ (parser-generator
+  . [(0 2 9) ((emacs (26))) "Parser Generator library" tar
+     ((:url . "https://github.com/cjohansson/emacs-parser-generator")
+      (:keywords "tools" "convenience")
+      (:maintainer "Christian Johansson" . "christian@cvj.se")
+      (:authors ("Christian Johansson" . "christian@cvj.se"))
+      (:commit . "a74ff797c32ac343cfca1535ad0ca59f91bcfc5f"))])
+ (path-iterator
+  . [(1 0) ((emacs (25 0)))
+     "An iterator for traversing a directory path." tar
+     ((:maintainer "Stephen Leake" . "stephen_leake@stephe-leake.org")
+      (:authors ("Stephen Leake" . "stephen_leake@stephe-leake.org"))
+      (:url . "https://elpa.gnu.org/packages/path-iterator.html")
+      (:commit . "df6a5e2d7e0399bac4f6d016dc272943bbb04e5e"))])
+ (peg
+  . [(1 0 2) ((emacs (25)))
+     "Parsing Expression Grammars in Emacs Lisp" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Helmut Eller" . "eller.helmut@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/peg.html")
+      (:commit . "2bccc414a94f067eb571fe614270494750a5de0e"))])
+ (perl-doc
+  . [(0 82) ((emacs (27))) "Read Perl documentation" tar
+     ((:url . "https://github.com/HaraldJoerg/emacs-perl-doc")
+      (:keywords "languages")
+      (:maintainer "Harald Jörg" . "haj@posteo.de")
+      (:authors ("Harald Jörg" . "haj@posteo.de"))
+      (:commit . "9ac4eeb55b554601c2f0205f099645806a05dc82"))])
+ (persist
+  . [(0 8) ((emacs (26 1)) (compat (30 0 2 0)))
+     "Persist Variables between Emacs Sessions" tar
+     ((:maintainer "Joseph Turner" . "persist-el@breatheoutbreathe.in")
+      (:authors ("Phillip Lord" . "phillip.lord@russet.org.uk"))
+      (:url . "https://elpa.gnu.org/packages/persist.html")
+      (:commit . "3b4b421d5185f2c33bae478aa057dff13701cc25"))])
+ (php-fill
+  . [(1 1 2) ((emacs (27 1)))
+     "Additional fill commands for PHP code editing" tar
+     ((:url . "https://github.com/arielenter/php-fill.el")
+      (:keywords "php" "languages" "tools" "convenience")
+      (:maintainer "Ariel Del Valle Lozano"
+		   . "arielmazatlan@gmail.com")
+      (:authors ("Ariel Del Valle Lozano" . "arielmazatlan@gmail.com"))
+      (:commit . "293bc8bc939cf0e4553d4aedd9c45e2ee653ae4d"))])
+ (phpinspect
+  . [(3 0 1) ((compat (29)))
+     "PHP parsing and code intelligence package" tar
+     ((:url . "https://github.com/hugot/phpinspect.el")
+      (:keywords "php" "languages" "tools" "convenience")
+      (:maintainer "Hugo Thunnissen" . "devel@hugot.nl")
+      (:authors ("Hugo Thunnissen" . "devel@hugot.nl"))
+      (:commit . "ce64041a4be5da24514356a3d6e7f6b9fafdd51b"))])
+ (phps-mode
+  . [(0 4 52) ((emacs (26)))
+     "Major mode for PHP with code intelligence" tar
+     ((:url . "https://github.com/cjohansson/emacs-phps-mode")
+      (:keywords "tools" "convenience")
+      (:maintainer "Christian Johansson" . "christian@cvj.se")
+      (:authors ("Christian Johansson" . "christian@cvj.se"))
+      (:commit . "81029f85ea6563d92a6091c12935600e431e4ea5"))])
+ (pinentry
+  . [(0 1) nil "GnuPG Pinentry server implementation" tar
+     ((:keywords "gnupg") (:maintainer "Daiki Ueno" . "ueno@gnu.org")
+      (:authors ("Daiki Ueno" . "ueno@gnu.org"))
+      (:url . "https://elpa.gnu.org/packages/pinentry.html")
+      (:commit . "ef0d62bba29dfab07624d030032ec0f67d34e865"))])
+ (plz
+  . [(0 9 1) ((emacs (27 1))) "HTTP library" tar
+     ((:url . "https://github.com/alphapapa/plz.el")
+      (:keywords "comm" "network" "http")
+      (:maintainer "Adam Porter" . "adam@alphapapa.net")
+      (:authors ("Adam Porter" . "adam@alphapapa.net"))
+      (:commit . "c579f039ffdb52ff61775ff25510a9c26e25d0c5"))])
+ (plz-event-source
+  . [(0 1 3) ((emacs (26 3)) (plz-media-type (0 2 4)))
+     "Plz Event Source" tar
+     ((:url . "https://github.com/r0man/plz-event-source")
+      (:keywords "comm" "network" "http")
+      (:maintainer "r0man" . "roman@burningswell.com")
+      (:authors ("r0man" . "roman@burningswell.com"))
+      (:commit . "236235a14cd33ab3d458627a3c169b1a0c7a887e"))])
+ (plz-media-type
+  . [(0 2 4) ((emacs (26 3)) (plz (0 9 1))) "Plz Media Types" tar
+     ((:url . "https://github.com/r0man/plz-media-type")
+      (:keywords "comm" "network" "http")
+      (:maintainer "r0man" . "roman@burningswell.com")
+      (:authors ("r0man" . "roman@burningswell.com"))
+      (:commit . "4a0621e6d76860b0c331d58845af11c150e5f19a"))])
+ (plz-see
+  . [(0 1) ((emacs (29 1)) (plz (0 7))) "Interactive HTTP client" tar
+     ((:url . "https://github.com/astoff/plz-see.el")
+      (:keywords "comm" "network" "http")
+      (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com")
+      (:authors ("Augusto Stoffel" . "arstoffel@gmail.com"))
+      (:commit . "c55e6aa2971caad582df1d449e0f57604250cae1"))])
+ (po-mode
+  . [(2 32) ((emacs (23))) "major mode for GNU gettext PO files" tar
+     ((:keywords "i18n" "gettext")
+      (:url . "https://elpa.gnu.org/packages/po-mode.html")
+      (:commit . "24d793df3cffd2fa7636be6f00c2f283577655d4"))])
+ (poke
+  . [(3 2) ((emacs (25))) "Emacs meets GNU poke!" tar
+     ((:url . "https://www.jemarch.net/poke")
+      (:maintainer "Jose E. Marchesi" . "jemarch@gnu.org")
+      (:authors ("Jose E. Marchesi" . "jemarch@gnu.org"))
+      (:commit . "77bdcce97e06bbd6771f35acbb3f399457bebb71"))])
+ (poke-mode
+  . [(3 1) nil "Major mode for editing Poke programs" tar
+     ((:maintainer "Jose E. Marchesi" . "jemarch@gnu.org")
+      (:authors ("Aurelien Aptel" . "aaptel@suse.com"))
+      (:url . "https://elpa.gnu.org/packages/poke-mode.html")
+      (:commit . "340bb45867cce7f86d09a00b809c2c2078302a9e"))])
+ (poker
+  . [(0 2) nil "Texas hold 'em poker" tar
+     ((:keywords "games")
+      (:maintainer "Mario Lang" . "mlang@delysid.org")
+      (:authors ("Mario Lang" . "mlang@delysid.org"))
+      (:url . "https://elpa.gnu.org/packages/poker.html")
+      (:commit . "56469f23f29dba8f8beefd308b01a0b1bbc81756"))])
+ (popper
+  . [(0 4 8) ((emacs (26 1))) "Summon and dismiss buffers as popups"
+     tar
+     ((:url . "https://github.com/karthink/popper")
+      (:keywords "convenience")
+      (:maintainer "Karthik Chikmagalur"
+		   . "karthik.chikmagalur@gmail.com")
+      (:authors
+       ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com"))
+      (:commit . "91b71955db19014d7139191660272c736458d87d"))])
+ (posframe
+  . [(1 5 2) ((emacs (26 1))) "Pop a posframe (just a frame) at point"
+     tar
+     ((:url . "https://github.com/tumashu/posframe")
+      (:keywords "convenience" "tooltip")
+      (:maintainer "Feng Shu" . "tumashu@163.com")
+      (:authors ("Feng Shu" . "tumashu@163.com"))
+      (:commit . "74c8c56131ed866db47ae4191364b72dd4852456"))])
+ (pq
+  . [(0 2) ((emacs (25))) "libpq binding" tar
+     ((:url . "https://github.com/anse1/emacs-libpq")
+      (:maintainer "Tom Gillespie" . "tgbugs@gmail.com")
+      (:authors ("Tom Gillespie" . "tgbugs@gmail.com"))
+      (:commit . "4dad5fcdbbb362a0dc2dfa7b5a38dd5be1551c68"))])
+ (preview-auto
+  . [(0 5 0) ((emacs (29 3)) (auctex (14 0 5)))
+     "Automatic previews in AUCTeX" tar
+     ((:url . "https://github.com/ultronozm/preview-auto.el")
+      (:keywords "tex" "convenience")
+      (:maintainer "Paul D. Nelson" . "nelson.paul.david@gmail.com")
+      (:authors ("Paul D. Nelson" . "nelson.paul.david@gmail.com"))
+      (:commit . "a16168a7c9547d262589608b7757de0f83d0cff3"))])
+ (preview-tailor
+  . [(0 2 1) ((emacs (29 1)) (auctex (0)))
+     "Tailor AUCTeX preview scale to monitor/text scale" tar
+     ((:url . "https://github.com/ultronozm/preview-tailor.el")
+      (:keywords "tex" "multimedia")
+      (:maintainer "Paul D. Nelson" . "nelson.paul.david@gmail.com")
+      (:authors ("Paul D. Nelson" . "nelson.paul.david@gmail.com"))
+      (:commit . "731d92247aab0a51c208d0fe196db3dec0d1b2e9"))])
+ (project
+  . [(0 12 0) ((emacs (26 1)) (xref (1 7 0)))
+     "Operations on the current project" tar
+     ((:url . "https://elpa.gnu.org/packages/project.html")
+      (:commit . "094e2e56923647fe85d51b37f4150044c4d30d99"))])
+ (psgml
+  . [(1 3 5) nil "SGML-editing mode with parsing support" tar
+     ((:keywords "languages")
+      (:maintainer "Lennart Staflin" . "lstaflin@gmail.com")
+      (:authors ("Lennart Staflin" . "lenst@lysator.liu.se")
+		("James Clark" . "jjc@clark.com"))
+      (:url . "https://elpa.gnu.org/packages/psgml.html")
+      (:commit . "697fcf7d80513257d90b7331297495bb9e01003d"))])
+ (pspp-mode
+  . [(1 1) nil "Major mode for editing PSPP files" single
+     ((:url . "http://elpa.gnu.org/packages/pspp-mode.html")
+      (:keywords "pspp" "major-mode")
+      (:authors ("Scott Andrew Borton" . "scott@pp.htv.fi"))
+      (:maintainer "John Darrington" . "john@darrington.wattle.id.au"))])
+ (pulsar
+  . [(1 4 1) ((emacs (28 1)))
+     "Pulse highlight on demand or after select functions" tar
+     ((:url . "https://github.com/protesilaos/pulsar")
+      (:keywords "convenience" "pulse" "highlight")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "c75b0bb3e062cd1c51b31af8f7c32b049596ecde"))])
+ (pyim
+  . [(5 3 6) ((emacs (27 1)) (async (1 6)) (xr (1 13)))
+     "A Chinese input method support quanpin, shuangpin, wubi, cangjie and rime."
+     tar
+     ((:url . "https://github.com/tumashu/pyim")
+      (:keywords "convenience" "chinese" "pinyin" "input-method")
+      (:maintainer "Feng Shu" . "tumashu@163.com")
+      (:authors ("Ye Wenbin" . "wenbinye@163.com")
+		("Feng Shu" . "tumashu@163.com"))
+      (:commit . "a56c8d992c872addcfc295c409a7bae70d00af87"))])
+ (pyim-basedict
+  . [(0 5 5) ((pyim (3 7))) "The default pinyin dict of pyim" tar
+     ((:url . "https://github.com/tumashu/pyim-basedict")
+      (:keywords "convenience" "chinese" "pinyin" "input-method"
+		 "complete")
+      (:maintainer "Feng Shu" . "tumashu@163.com")
+      (:authors ("Feng Shu" . "tumashu@163.com"))
+      (:commit . "55d9b324831b0fc79ff62f1c6f21aad72341a114"))])
+ (python
+  . [(0 30)
+     ((emacs (29 1)) (compat (29 1 1 0)) (seq (2 23)) (project (0 1))
+      (flymake (1 0)))
+     "Python's flying circus support for Emacs" tar
+     ((:url . "https://github.com/fgallina/python.el")
+      (:keywords "languages")
+      (:maintainer nil . "emacs-devel@gnu.org")
+      (:authors ("Fabián E. Gallina" . "fgallina@gnu.org"))
+      (:commit . "672df0288b55f8bb7ebacdce5335f9e11955482e"))])
+ (qrencode
+  . [(1 4) ((emacs (25 1))) "QRCode encoder" tar
+     ((:url . "https://github.com/ruediger/qrencode-el")
+      (:keywords "qrcode" "comm")
+      (:maintainer "Rüdiger Sonderfeld" . "ruediger@c-plusplus.net")
+      (:authors ("Rüdiger Sonderfeld" . "ruediger@c-plusplus.net"))
+      (:commit . "677939b0566295e1ff227de115edfcfeceb52bab"))])
+ (quarter-plane
+  . [(0 1) nil "editing using quarter-plane screen model" tar
+     ((:keywords "convenience" "wp")
+      (:url . "https://elpa.gnu.org/packages/quarter-plane.html")
+      (:commit . "8cf26bf19d0193068bef34dd0103e8a7ea566afa"))])
+ (queue
+  . [(0 2) nil "Queue data structure" tar
+     ((:url . "http://www.dr-qubit.org/emacs.php")
+      (:keywords "extensions" "data structures" "queue")
+      (:maintainer "Toby Cubitt" . "toby-predictive@dr-qubit.org")
+      (:authors ("Inge Wallin" . "inge@lysator.liu.se")
+		("Toby Cubitt" . "toby-predictive@dr-qubit.org"))
+      (:commit . "c9ec2e33f26b068c40b8391e91a7839546fa8355"))])
+ (rainbow-mode
+  . [(1 0 6) nil "Colorize color names in buffers" tar
+     ((:keywords "faces")
+      (:maintainer "Julien Danjou" . "julien@danjou.info")
+      (:authors ("Julien Danjou" . "julien@danjou.info"))
+      (:url . "https://elpa.gnu.org/packages/rainbow-mode.html")
+      (:commit . "ac68593018ef3555e64ea592d72334f4e3e39209"))])
+ (rbit
+  . [(0 1) nil "Red-black persistent interval trees" tar
+     ((:keywords "data structures" "binary tree" "intervals")
+      (:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/rbit.html")
+      (:commit . "59da8b3219a9632e1ed4ce85f58a6f3c68b61684"))])
+ (rcirc-color
+  . [(0 4 5) ((emacs (24 4))) "color nicks" tar
+     ((:keywords "comm")
+      (:maintainer "Alex Schroeder" . "alex@gnu.org")
+      (:authors ("Alex Schroeder" . "alex@gnu.org"))
+      (:url . "https://elpa.gnu.org/packages/rcirc-color.html")
+      (:commit . "79449152cb71ec4d719d4b1a95c1192fb9831ceb"))])
+ (rcirc-mentions
+  . [(1 0 5) ((emacs (29 1)))
+     "Log mentions of your nick or keywords in a separate buffer" tar
+     ((:url . "https://sr.ht/~tsdh/rcirc-mentions/")
+      (:keywords "rcirc" "irc")
+      (:maintainer "Tassilo Horn" . "tsdh@gnu.org")
+      (:authors ("Tassilo Horn" . "tsdh@gnu.org"))
+      (:commit . "f48c86345110433cfcda669d3ad6500334371a34"))])
+ (rcirc-menu
+  . [(1 1) nil "A menu of all your rcirc connections" single
+     ((:url . "http://elpa.gnu.org/packages/rcirc-menu.html")
+      (:keywords "comm")
+      (:authors ("Alex Schroeder" . "alex@gnu.org"))
+      (:maintainer "Alex Schroeder" . "alex@gnu.org"))])
+ (rcirc-sqlite
+  . [(1 0 4) ((emacs (30 0))) "rcirc logging in SQLite" tar
+     ((:url . "https://codeberg.org/mattof/rcirc-sqlite")
+      (:keywords "comm")
+      (:maintainer "Matto Fransen" . "matto@matto.nl")
+      (:authors ("Matto Fransen" . "matto@matto.nl"))
+      (:commit . "349aabcbb6bd10b007f431d180e870a5918b9e21"))])
+ (realgud
+  . [(1 6 0)
+     ((load-relative (1 3 2)) (loc-changes (1 2))
+      (test-simple (1 3 0)) (emacs (27)))
+     "A modular front-end for interacting with external debuggers" tar
+     ((:url . "https://github.com/realgud/realgud/")
+      (:keywords "debugger" "gdb" "python" "perl" "go" "bash" "zsh"
+		 "bashdb" "zshdb" "remake" "trepan" "perldb" "pdb")
+      (:maintainer "Rocky Bernstein" . "rocky@gnu.org")
+      (:authors ("Rocky Bernstein" . "rocky@gnu.org"))
+      (:commit . "7a93c29c04a4f0d283d3acb3918c4d6381bbfc20"))])
+ (realgud-ipdb
+  . [(1 0 0) ((realgud (1 4 5)) (emacs (24)))
+     "realgud front-end to ipdb" tar
+     ((:url . "http://github.com/rocky/realgud-ipdb")
+      (:commit . "ba41636ac4102bdc9d28a5ae7177b3792be55933"))])
+ (realgud-jdb
+  . [(1 0 0)
+     ((realgud (1 4 5)) (load-relative (1 2)) (cl-lib (0 5))
+      (emacs (25)))
+     "Realgud front-end to Java's jdb debugger\"" tar
+     ((:url . "http://github.com/realgud/realgud-jdb")
+      (:maintainer "Rocky Bernstein" . "rocky@gnu.org")
+      (:authors ("Rocky Bernstein" . "rocky@gnu.org")))])
+ (realgud-lldb
+  . [(1 0 2) ((load-relative (1 3 1)) (realgud (1 5 0)) (emacs (25)))
+     "Realgud front-end to lldb" tar
+     ((:url . "http://github.com/realgud/realgud-lldb")
+      (:maintainer "Rocky Bernstein" . "rocky@gnu.org")
+      (:authors ("Rocky Bernstein" . "rocky@gnu.org"))
+      (:commit . "f2f77d6ddfa42430ead400eaf81c605c3a04dead"))])
+ (realgud-node-debug
+  . [(1 0 0)
+     ((realgud (1 4 5)) (load-relative (1 2)) (cl-lib (0 5))
+      (emacs (25)))
+     "Realgud front-end to older \"node debug\"" tar
+     ((:url . "http://github.com/realgud/realgud-node-debug")
+      (:maintainer "Rocky Bernstein" . "rocky@gnu.org")
+      (:authors ("Rocky Bernstein" . "rocky@gnu.org")))])
+ (realgud-node-inspect
+  . [(1 0 0)
+     ((realgud (1 4 5)) (load-relative (1 2)) (cl-lib (0 5))
+      (emacs (24)))
+     "Realgud front-end to newer \"node inspect\"" tar
+     ((:url . "http://github.com/realgud/realgud-node-inspect")
+      (:maintainer "Rocky Bernstein" . "rocky@gnu.org")
+      (:authors ("Rocky Bernstein" . "rocky@gnu.org")))])
+ (realgud-trepan-ni
+  . [(1 0 1)
+     ((load-relative (1 2)) (realgud (1 5 0)) (cl-lib (0 5))
+      (emacs (25)))
+     "Realgud front-end to trepan-ni" tar
+     ((:url . "http://github.com/realgud/realgud-trepan-ni")
+      (:maintainer "Rocky Bernstein" . "rocky@gnu.org")
+      (:authors ("Rocky Bernstein" . "rocky@gnu.org"))
+      (:commit . "ce008862ea33de0a9e6c06099b9ddff8f620f2e4"))])
+ (realgud-trepan-xpy
+  . [(1 0 1) ((realgud (1 5 0)) (load-relative (1 3 1)) (emacs (25)))
+     "Realgud front-end to trepan-xpy" tar
+     ((:url . "https://github.com/realgud/realgud-trepan-xpy")
+      (:maintainer "Rocky Bernstein" . "rocky@gnu.org")
+      (:authors ("Rocky Bernstein" . "rocky@gnu.org"))
+      (:commit . "f758f48266d90775643454e72214e40a4ed320b8"))])
+ (rec-mode
+  . [(1 9 4) ((emacs (25))) "Major mode for viewing/editing rec files"
+     tar
+     ((:url . "https://www.gnu.org/software/recutils/")
+      (:maintainer "Antoine Kalmbach" . "ane@iki.fi")
+      (:authors ("Jose E. Marchesi" . "jemarch@gnu.org"))
+      (:commit . "8d9b73870acdd0a282a5c2829b139a93a39366dc"))])
+ (register-list
+  . [(0 1) nil "Interactively list/edit registers" tar
+     ((:keywords "register")
+      (:maintainer "Bastien Guerry" . "bzgATalternDOTorg")
+      (:authors ("Bastien Guerry" . "bzgATalternDOTorg"))
+      (:url . "https://elpa.gnu.org/packages/register-list.html")
+      (:commit . "14d719a6f3596856228f08d3746a7bf92dd13240"))])
+ (relint
+  . [(2 2) ((xr (2 0)) (emacs (27 1))) "Elisp regexp mistake finder"
+     tar
+     ((:url . "https://github.com/mattiase/relint")
+      (:keywords "lisp" "regexps")
+      (:maintainer "Mattias Engdegård" . "mattias.engdegard@gmail.com")
+      (:authors ("Mattias Engdegård" . "mattias.engdegard@gmail.com"))
+      (:commit . "03a881ce58c083b280da53e231487b2e0cf5eac4"))])
+ (repology
+  . [(1 2 4) ((emacs (26 1))) "Repology API access via Elisp" tar
+     ((:keywords "web")
+      (:maintainer "Nicolas Goaziou" . "mail@nicolasgoaziou.fr")
+      (:authors ("Nicolas Goaziou" . "mail@nicolasgoaziou.fr"))
+      (:url . "https://elpa.gnu.org/packages/repology.html")
+      (:commit . "a6b41709525e60bdac807f153a3199003ee9d50f"))])
+ (rich-minority
+  . [(1 0 3) ((cl-lib (0 5)))
+     "Clean-up and Beautify the list of minor-modes." tar
+     ((:url . "https://github.com/Malabarba/rich-minority")
+      (:keywords "mode-line" "faces")
+      (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com")
+      (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com"))
+      (:commit . "d33d2e357c8eb0b38624dbc51e8b953b08b0cc98"))])
+ (rnc-mode
+  . [(0 4) nil "Emacs mode to edit Relax-NG Compact files" tar
+     ((:keywords "xml" "relaxng")
+      (:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/rnc-mode.html")
+      (:commit . "2ffd0775392b6f5efd82c775f3a1cb5bea8c917d"))])
+ (rt-liberation
+  . [(7) nil "Emacs interface to RT" tar
+     ((:url . "http://www.nongnu.org/rtliber/")
+      (:keywords "rt" "tickets")
+      (:maintainer "Yoni Rabkin" . "yrk@gnu.org")
+      (:authors ("Yoni Rabkin" . "yrk@gnu.org"))
+      (:commit . "3b98d22c76de94fae16434517b99525fabc58f31"))])
+ (ruby-end
+  . [(0 4 3) nil "Automatic insertion of end blocks for Ruby" tar
+     ((:url . "http://github.com/rejeep/ruby-end")
+      (:keywords "speed" "convenience" "ruby")
+      (:maintainer "Dmitry Gutov" . "dgutov@yandex.ru")
+      (:authors ("Johan Andersson" . "johan.rejeep@gmail.com"))
+      (:commit . "fe39d34ba7a43d522c7bdc47406935611e782ca3"))])
+ (rudel
+  . [(0 3 2)
+     ((emacs (24)) (cl-lib (0 5)) (cl-generic (0 3)) (cl-print (1 0)))
+     "A collaborative editing framework for Emacs" tar
+     ((:url . "http://rudel.sourceforge.net/")
+      (:keywords "rudel" "collaboration")
+      (:maintainer "Jan Moringen" . "scymtym@users.sourceforge.net")
+      (:authors ("Jan Moringen" . "scymtym@users.sourceforge.net"))
+      (:commit . "42684c4fb26318291c8c06b184166c470d465ff4"))])
+ (satchel
+  . [(0 2) ((emacs (27 2)) (project (0 8 1)))
+     "A bag for your files, separated by git branches" tar
+     ((:keywords "tools" "languages")
+      (:maintainer "Theodor Thornhill" . "theo@thornhill.no")
+      (:authors ("Theodor Thornhill" . "theo@thornhill.no"))
+      (:url . "https://elpa.gnu.org/packages/satchel.html")
+      (:commit . "6e5613e203f6937202cb5d55249e7e6be939067b"))])
+ (scanner
+  . [(0 3) ((emacs (25 1)) (dash (2 12 0)))
+     "Scan documents and images" tar
+     ((:url . "https://codeberg.org/rstocker/scanner.git")
+      (:keywords "hardware" "multimedia")
+      (:maintainer "Raffael Stocker" . "r.stocker@mnet-mail.de")
+      (:authors ("Raffael Stocker" . "r.stocker@mnet-mail.de"))
+      (:commit . "44eab47963a61e67cd4aa3a96a6762764367de5f"))])
+ (scroll-restore
+  . [(1 0) nil "restore original position after scrolling" tar
+     ((:keywords "scrolling")
+      (:maintainer "Martin Rudalics" . "rudalics@gmx.at")
+      (:authors ("Martin Rudalics" . "rudalics@gmx.at"))
+      (:url . "https://elpa.gnu.org/packages/scroll-restore.html")
+      (:commit . "af8f3beae533c030d4899c235473aa15bfcb2010"))])
+ (sed-mode
+  . [(1 1) nil "Major mode to edit sed scripts" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/sed-mode.html")
+      (:commit . "6009f57567959387b9e34068567e982b6991eb24"))])
+ (sendai-theme
+  . [(0 1 0) ((emacs (27 1))) "A cool blue color theme" tar
+     ((:url . "https://sr.ht/~jimporter/sendai-theme/")
+      (:keywords "theme")
+      (:commit . "e7a7fc191035f98082020113fbb5c89ac1b74f37"))])
+ (seq
+  . [(2 24) nil "Sequence manipulation functions" tar
+     ((:keywords "sequences")
+      (:maintainer nil . "emacs-devel@gnu.org")
+      (:authors ("Nicolas Petton" . "nicolas@petton.fr"))
+      (:url . "https://elpa.gnu.org/packages/seq.html")
+      (:commit . "27a90793a13f149121180e864fa53d68b9eac0b3"))])
+ (setup
+  . [(1 5 0) ((emacs (26 1))) "Helpful Configuration Macro" tar
+     ((:url . "https://codeberg.org/pkal/setup.el")
+      (:keywords "lisp" "local")
+      (:maintainer "Philip Kaludercic" . "philipk@posteo.net")
+      (:authors ("Philip Kaludercic" . "philipk@posteo.net"))
+      (:commit . "5a69dab9bb79d8bebaaa9bc14795cbaafd1c2423"))])
+ (shelisp
+  . [(1 0 0) nil "execute elisp in shell" tar
+     ((:keywords "terminals" "lisp" "processes")
+      (:maintainer "Michael R. Mauger" . "michael@mauger.com")
+      (:authors ("Michael R. Mauger" . "michael@mauger.com"))
+      (:url . "https://elpa.gnu.org/packages/shelisp.html")
+      (:commit . "32f91342f0039aa0e78a032b5b2a651ed5b1b79e"))])
+ (shell-command+
+  . [(2 5 0) ((emacs (24 3))) "An extended shell-command" tar
+     ((:url . "https://codeberg.org/pkal/shell-command-plus.el")
+      (:keywords "unix" "processes" "convenience")
+      (:maintainer "Philip Kaludercic" . "philipk@posteo.net")
+      (:authors ("Philip Kaludercic" . "philipk@posteo.net"))
+      (:commit . "8388de44c488106a53913e7028b0e3f3859982bb"))])
+ (shen-mode
+  . [(0 1) nil "A major mode for editing shen source code" tar
+     ((:keywords "languages" "shen")
+      (:maintainer "Eric Schulte" . "schulte.eric@gmail.com")
+      (:authors ("Eric Schulte" . "schulte.eric@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/shen-mode.html")
+      (:commit . "df28df31317188a6d87c9df93444543ace4f7f4f"))])
+ (shift-number
+  . [(0 3) ((emacs (28 1))) "Increase/decrease the number at point"
+     tar
+     ((:url . "https://codeberg.org/ideasman42/emacs-shift-number")
+      (:keywords "convenience")
+      (:maintainer "Campbell Barton" . "ideasman42@gmail.com")
+      (:authors ("Alex Kost" . "alezost@gmail.com"))
+      (:commit . "e7ec4402962471baa8d9a3b445bbbb06c71af139"))])
+ (show-font
+  . [(1 0 0) ((emacs (29 1))) "Show font features in a buffer" tar
+     ((:url . "https://github.com/protesilaos/show-font")
+      (:keywords "convenience" "writing" "font")
+      (:maintainer "Protesilaos Stavrou" . "info@protesilaos.com")
+      (:authors ("Protesilaos Stavrou" . "info@protesilaos.com"))
+      (:commit . "07c46e3b96d726a674ae3d42e27eb4193208efd9"))])
+ (sisu-mode
+  . [(7 1 8) nil "Major mode for SiSU markup text" tar
+     ((:url . "http://www.sisudoc.org/")
+      (:keywords "text" "syntax" "processes" "tools")
+      (:commit . "456acbde87a9fa9da0ed8b441c3f22c4d5310296"))])
+ (site-lisp
+  . [(0 3 0) ((emacs (25 1))) "Manage site-lisp directories" tar
+     ((:url . "https://codeberg.org/pkal/site-lisp.el")
+      (:keywords "lisp" "local")
+      (:maintainer "Philip Kaludercic" . "philipk@posteo.net")
+      (:authors ("Philip Kaludercic" . "philipk@posteo.net"))
+      (:commit . "87656ba13c805285e50e7d86c29e444272b7d74f"))])
+ (sketch-mode
+  . [(1 0 4) nil
+     "Quickly create svg sketches using keyboard and mouse" tar
+     ((:url . "https://github.com/dalanicolai/sketch-mode")
+      (:keywords "multimedia")
+      (:maintainer "D.L. Nicolai" . "dalanicolai@gmail.com")
+      (:authors ("D.L. Nicolai" . "dalanicolai@gmail.com"))
+      (:commit . "ff42a587d90f9cfd3481db6f4e9a269e3a9300cd"))])
+ (slime-volleyball
+  . [(1 2 0) ((cl-lib (0 5))) "An SVG Slime Volleyball Game" tar
+     ((:keywords "games")
+      (:maintainer "Thomas Fitzsimmons" . "fitzsim@fitzsim.org")
+      (:authors ("Thomas Fitzsimmons" . "fitzsim@fitzsim.org"))
+      (:url . "https://elpa.gnu.org/packages/slime-volleyball.html")
+      (:commit . "361d22bba0b03cd81331439c97f84583dd87c752"))])
+ (sm-c-mode
+  . [(1 2) nil "C major mode based on SMIE" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/sm-c-mode.html")
+      (:commit . "a56142cb82d3390faa3dbd0658d65fe06822206d"))])
+ (smalltalk-mode
+  . [(4 0) nil "Major mode for the GNU Smalltalk programming language"
+     tar
+     ((:maintainer "Derek Zhou" . "derek@3qin.us")
+      (:url . "https://elpa.gnu.org/packages/smalltalk-mode.html")
+      (:commit . "570b705db9a02bb48cd61652639401715f419447"))])
+ (smart-yank
+  . [(0 1 1) ((emacs (24)))
+     "A different approach of yank pointer handling" tar
+     ((:keywords "convenience")
+      (:maintainer "Michael Heerdegen" . "michael_heerdegen@web.de")
+      (:authors ("Michael Heerdegen" . "michael_heerdegen@web.de"))
+      (:url . "https://elpa.gnu.org/packages/smart-yank.html")
+      (:commit . "673e1884d3ca537143415fc91b0b06a4ae02f164"))])
+ (sml-mode
+  . [(6 12) ((emacs (24 3)) (cl-lib (0 5)))
+     "Major mode for editing (Standard) ML" tar
+     ((:keywords "sml")
+      (:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Matthew Morley" . "mjm@scs.leeds.ac.uk")
+		("Matthias Blume" . "blume@cs.princeton.edu")
+		("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/sml-mode.html")
+      (:commit . "7ebf91114292eead967d1a9bb4f235d66f6dd525"))])
+ (so-long
+  . [(1 1 2) ((emacs (24 4)))
+     "Say farewell to performance problems with minified code." tar
+     ((:url . "https://savannah.nongnu.org/projects/so-long")
+      (:keywords "convenience")
+      (:maintainer "Phil Sainty" . "psainty@orcon.net.nz")
+      (:authors ("Phil Sainty" . "psainty@orcon.net.nz"))
+      (:commit . "045a4fe94c18cd36ef297e62a80cdff449af3aa5"))])
+ (soap-client
+  . [(3 2 3) ((emacs (24 1)) (cl-lib (0 6 1)))
+     "Access SOAP web services" tar
+     ((:url . "https://github.com/alex-hhh/emacs-soap-client")
+      (:keywords "soap" "web-services" "comm" "hypermedia")
+      (:maintainer "Alexandru Harsanyi" . "AlexHarsanyi@gmail.com")
+      (:authors ("Alexandru Harsanyi" . "AlexHarsanyi@gmail.com"))
+      (:commit . "6234c3e0411a1d70bed2c85bbfb438d4479be51b"))])
+ (sokoban
+  . [(1 4 9) ((emacs (23 1)) (cl-lib (0 5)))
+     "Implementation of Sokoban for Emacs." tar
+     ((:keywords "games")
+      (:maintainer "Dieter Deyke" . "dieter.deyke@gmail.com")
+      (:authors ("Glynn Clements" . "glynn.clements@xemacs.org"))
+      (:url . "https://elpa.gnu.org/packages/sokoban.html")
+      (:commit . "3043723a7c2557443aa28d871137c8d9c3b46edc"))])
+ (sotlisp
+  . [(1 6 2) ((emacs (24 1))) "Write lisp at the speed of thought."
+     tar
+     ((:url . "https://github.com/Malabarba/speed-of-thought-lisp")
+      (:keywords "convenience" "lisp")
+      (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com")
+      (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com"))
+      (:commit . "fffe8d0b42b143a2e7df0470d9049fa57b6ecac5"))])
+ (spacious-padding
+  . [(0 8 0) ((emacs (28 1)))
+     "Increase the padding/spacing of frames and windows" tar
+     ((:url . "https://github.com/protesilaos/spacious-padding")
+      (:keywords "convenience" "focus" "writing" "presentation")
+      (:maintainer "Protesilaos Stavrou" . "info@protesilaos.com")
+      (:authors ("Protesilaos Stavrou" . "info@protesilaos.com"))
+      (:commit . "9507cb206e1187c08574e8fa65c3fe6aeab84063"))])
+ (speedrect
+  . [(0 7) ((emacs (29 1)) (compat (30)))
+     "Fast modal rectangle commands" tar
+     ((:url . "https://github.com/jdtsmith/speedrect")
+      (:keywords "convenience")
+      (:maintainer "JD Smith" . "jdtsmith+elpa@gmail.com")
+      (:authors ("JD Smith" . "jdtsmith+elpa@gmail.com"))
+      (:commit . "2232149c300343732f424c1b22db296455f4c0ac"))])
+ (spinner
+  . [(1 7 4) ((emacs (24 3)))
+     "Add spinners and progress-bars to the mode-line for ongoing operations"
+     tar
+     ((:url . "https://github.com/Malabarba/spinner.el")
+      (:keywords "processes" "mode-line")
+      (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com")
+      (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com"))
+      (:commit . "bca794fa6f6b007292cdac9b0a850a3711986db5"))])
+ (sql-beeline
+  . [(0 2) nil "Beeline support for sql.el" tar
+     ((:keywords "sql" "hive" "beeline" "hiveserver2" "impala")
+      (:maintainer "Filipp Gunbin" . "fgunbin@fastmail.fm")
+      (:authors ("Filipp Gunbin" . "fgunbin@fastmail.fm"))
+      (:url . "https://elpa.gnu.org/packages/sql-beeline.html")
+      (:commit . "b7ffff9404d93f569e3c2bc59db1be6e848c894f"))])
+ (sql-cassandra
+  . [(0 2 2) ((emacs (29))) "Cassandra support for sql.el" tar
+     ((:keywords "sql" "cassandra" "cql" "cqlsh")
+      (:maintainer "Filipp Gunbin" . "fgunbin@fastmail.fm")
+      (:authors ("Filipp Gunbin" . "fgunbin@fastmail.fm"))
+      (:url . "https://elpa.gnu.org/packages/sql-cassandra.html")
+      (:commit . "3e997c6ad82f4240bcd62630ad44b5f023bd16c1"))])
+ (sql-indent
+  . [(1 7) ((cl-lib (0 5))) "Support for indenting code in SQL files."
+     tar
+     ((:url . "https://github.com/alex-hhh/emacs-sql-indent")
+      (:keywords "languages" "sql")
+      (:maintainer "Alex Harsanyi" . "AlexHarsanyi@gmail.com")
+      (:authors ("Alex Harsanyi" . "AlexHarsanyi@gmail.com"))
+      (:commit . "323ece64acaac7f27b7806db9dba0757d6e57885"))])
+ (srht
+  . [(0 4) ((emacs (27 1)) (plz (0 7)) (transient (0 4 3)))
+     "Sourcehut" tar
+     ((:url . "https://sr.ht/~akagi/srht.el/") (:keywords "comm" "vc")
+      (:maintainer "Aleksandr Vityazev" . "avityazev@posteo.org")
+      (:authors ("Aleksandr Vityazev" . "avityazev@posteo.org"))
+      (:commit . "053c79fb41278f11e98c61785e8cc500ed4c853b"))])
+ (ssh-deploy
+  . [(3 1 16) ((emacs (25)))
+     "Deployment via Tramp, global or per directory." tar
+     ((:url . "https://github.com/cjohansson/emacs-ssh-deploy")
+      (:keywords "tools" "convenience")
+      (:maintainer "Christian Johansson" . "christian@cvj.se")
+      (:authors ("Christian Johansson" . "christian@cvj.se"))
+      (:commit . "95fb076c9b657c5f1bfad3ee5bf1f8691c50d428"))])
+ (standard-themes
+  . [(3 0 2) ((emacs (28 1)) (modus-themes (5 0 0)))
+     "Like the default theme but more consistent" tar
+     ((:url . "https://github.com/protesilaos/standard-themes")
+      (:keywords "faces" "theme" "accessibility")
+      (:maintainer "Protesilaos Stavrou" . "info@protesilaos.com")
+      (:authors ("Protesilaos Stavrou" . "info@protesilaos.com"))
+      (:commit . "3f7c8af249fff314c8e3694f1fdd7526f135a638"))])
+ (stream
+  . [(2 4 0) ((emacs (25))) "Implementation of streams" tar
+     ((:keywords "stream" "laziness" "sequences")
+      (:maintainer nil . "nicolas@petton.fr")
+      (:authors ("Nicolas Petton" . "nicolas@petton.fr"))
+      (:url . "https://elpa.gnu.org/packages/stream.html")
+      (:commit . "b9b3ad5c38063703cfa5a06522031e631c49b7e3"))])
+ (substitute
+  . [(0 6 1) ((emacs (27 1)))
+     "Efficiently replace targets in the buffer or context" tar
+     ((:url . "https://github.com/protesilaos/substitute")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com"))
+      (:commit . "e4bf1ac7f8ae5d8cf27f05ab35412e2da4d04e3d"))])
+ (svg
+  . [(1 1) ((emacs (25))) "SVG image creation functions" tar
+     ((:keywords "image")
+      (:maintainer ("Lars Magne Ingebrigtsen" . "larsi@gnus.org")
+		   ("Felix E. Klee" . "felix.klee@inka.de"))
+      (:authors ("Lars Magne Ingebrigtsen" . "larsi@gnus.org")
+		("Felix E. Klee" . "felix.klee@inka.de"))
+      (:url . "https://elpa.gnu.org/packages/svg.html")
+      (:commit . "2c1d8397788c1385debef514c59a6461b2e5408e"))])
+ (svg-clock
+  . [(1 2) ((svg (1 0)) (emacs (27 0)))
+     "Analog clock using Scalable Vector Graphics" tar
+     ((:keywords "demo" "svg" "clock")
+      (:maintainer "Ulf Jasper" . "ulf.jasper@web.de")
+      (:authors ("Ulf Jasper" . "ulf.jasper@web.de"))
+      (:url . "https://elpa.gnu.org/packages/svg-clock.html")
+      (:commit . "1c04475520a125432c4e873ca944323999a3ff83"))])
+ (svg-lib
+  . [(0 3) ((emacs (27 1))) "SVG tags, progress bars & icons" tar
+     ((:url . "https://github.com/rougier/svg-lib")
+      (:keywords "svg" "icons" "tags" "convenience")
+      (:maintainer "Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr")
+      (:commit . "f2cc9615ef3a052747135d34f31c423a26592f14"))])
+ (svg-tag-mode
+  . [(0 3 3) ((emacs (27 1)) (svg-lib (0 2)))
+     "Replace keywords with SVG tags" tar
+     ((:url . "https://github.com/rougier/svg-tag-mode")
+      (:keywords "convenience")
+      (:maintainer "Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr")
+      (:authors ("Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr"))
+      (:commit . "49809d64e6b8084c6468d4a6ffe5523fd4dda8f4"))])
+ (swiper
+  . [(0 15 1) ((emacs (24 5)) (ivy (0 15 1)))
+     "Isearch with an overview.  Oh, man!" tar
+     ((:url . "https://github.com/abo-abo/swiper")
+      (:keywords "matching")
+      (:maintainer "Basil L. Contovounesios" . "basil@contovou.net")
+      (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com"))
+      (:commit . "6f9d587e7e5250cccf1d7f67394fcc59313db755"))])
+ (switchy-window
+  . [(1 4) ((emacs (25 1)) (compat (29 1 4 1)))
+     "A most-recently-used window switcher" tar
+     ((:url . "https://sr.ht/~tsdh/switchy-window/")
+      (:keywords "windows")
+      (:maintainer "Tassilo Horn" . "tsdh@gnu.org")
+      (:authors ("Tassilo Horn" . "tsdh@gnu.org"))
+      (:commit . "3ac4e522231a052e9beaa2d25478090d1215c7ae"))])
+ (sxhkdrc-mode
+  . [(1 2 0) ((emacs (27 1)))
+     "Major mode for sxhkdrc files (Simple X Hot Key Daemon)" tar
+     ((:url . "https://github.com/protesilaos/sxhkdrc-mode")
+      (:maintainer "Protesilaos Stavrou" . "info@protesilaos.com")
+      (:authors ("Protesilaos Stavrou" . "info@protesilaos.com"))
+      (:commit . "f9bc3f6f8639d4ed9c2d848fdcc84fab4b1b6cae"))])
+ (system-packages
+  . [(1 1 2) ((emacs (24 3))) "functions to manage system packages"
+     tar
+     ((:url . "https://gitlab.com/jabranham/system-packages")
+      (:maintainer "J. Alexander Branham" . "alex.branham@gmail.com")
+      (:authors ("J. Alexander Branham" . "alex.branham@gmail.com"))
+      (:commit . "de2a98caad223ded3b58512d8f44a8307a228a93"))])
+ (tNFA
+  . [(0 1 1) ((queue (0 1)))
+     "Tagged non-deterministic finite-state automata" single
+     ((:keywords "extensions" "matching" "data structures tnfa" "nfa"
+		 "dfa" "finite state automata" "automata" "regexp")
+      (:authors ("Toby Cubitt" . "toby-predictive@dr-qubit.org"))
+      (:maintainer "Toby Cubitt" . "toby-predictive@dr-qubit.org")
+      (:url . "http://www.dr-qubit.org/emacs.php"))])
+ (tam
+  . [(0 1) ((queue (0 2)) (emacs (24 3)))
+     "Manage use of slots in a fixed size table" tar
+     ((:url
+       . "https://github.com/owinebar/emacs-table-allocation-manager")
+      (:keywords "lisp" "tools")
+      (:maintainer "Onnie Lynn Winebarger" . "owinebar@gmail.com")
+      (:authors ("Onnie Lynn Winebarger" . "owinebar@gmail.com"))
+      (:commit . "c254ec9f646ef5527eb1f834a90e5897caa977cf"))])
+ (taxy
+  . [(0 10 2) ((emacs (26 3)))
+     "Programmable taxonomical grouping for arbitrary objects" tar
+     ((:url . "https://github.com/alphapapa/taxy.el")
+      (:keywords "lisp")
+      (:maintainer "Adam Porter" . "adam@alphapapa.net")
+      (:authors ("Adam Porter" . "adam@alphapapa.net"))
+      (:commit . "3099ae5cb27a34961e06a3af67555919c62c12d7"))])
+ (taxy-magit-section
+  . [(0 14 3) ((emacs (26 3)) (magit-section (3 2 1)) (taxy (0 10)))
+     "View Taxy structs in a Magit Section buffer" tar
+     ((:url . "https://github.com/alphapapa/taxy.el")
+      (:keywords "lisp")
+      (:maintainer "Adam Porter" . "adam@alphapapa.net")
+      (:authors ("Adam Porter" . "adam@alphapapa.net"))
+      (:commit . "19c67f4d2e7a87cb9aed8e17058c4cf4dfd75406"))])
+ (temp-buffer-browse
+  . [(1 5) ((emacs (24))) "temp buffer browse mode" tar
+     ((:keywords "convenience")
+      (:maintainer "Leo Liu" . "sdl.web@gmail.com")
+      (:authors ("Leo Liu" . "sdl.web@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/temp-buffer-browse.html")
+      (:commit . "db6041b0413fdeefb1f1285e1d9c1039c10fbf04"))])
+ (tempel
+  . [(1 14) ((emacs (29 1)) (compat (31)))
+     "Tempo templates/snippets with in-buffer field editing" tar
+     ((:url . "https://github.com/minad/tempel")
+      (:keywords "abbrev" "languages" "tools" "text")
+      (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de")
+      (:authors ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:commit . "c5fdc3806b486d9d86a54c50efac3d4a141e789d"))])
+ (termint
+  . [(0 2 3) ((emacs (29 1))) "Run REPLs in a terminal backend" tar
+     ((:url . "https://github.com/milanglacier/termint.el")
+      (:maintainer "Milan Glacier" . "dev@milanglacier.com")
+      (:authors ("Milan Glacier" . "dev@milanglacier.com"))
+      (:commit . "f51ab6c4ef50eb8781560d3596335a6f7f668c7c"))])
+ (test-simple
+  . [(1 3 2) ((emacs (24 4)) (compat (30 1 0 1)))
+     "Simple Unit Test Framework for Emacs Lisp" tar
+     ((:url . "https://github.com/rocky/emacs-test-simple")
+      (:keywords "lisp")
+      (:maintainer "Rocky Bernstein" . "rocky@gnu.org")
+      (:authors ("Rocky Bernstein" . "rocky@gnu.org"))
+      (:commit . "ae5b036e52d383a5b5873bffdf1142900baa214b"))])
+ (tex-item
+  . [(0 1) ((emacs (27 1))) "Commands for working with tex items" tar
+     ((:url . "https://github.com/ultronozm/tex-item.el")
+      (:keywords "tex" "convenience")
+      (:maintainer "Paul D. Nelson" . "nelson.paul.david@gmail.com")
+      (:authors ("Paul D. Nelson" . "nelson.paul.david@gmail.com"))
+      (:commit . "ee1957f3bce6ed04627b985e95a17db190781e06"))])
+ (tex-parens
+  . [(0 7) ((emacs (27 1))) "Like lisp.el, but for tex" tar
+     ((:url . "https://github.com/ultronozm/tex-parens.el")
+      (:keywords "tex" "convenience")
+      (:maintainer "Paul D. Nelson" . "nelson.paul.david@gmail.com")
+      (:authors ("Paul D. Nelson" . "nelson.paul.david@gmail.com"))
+      (:commit . "00e41b4110b4fc049513a1e31d4a00c295580026"))])
+ (theme-buffet
+  . [(0 1 2) ((emacs (29 1))) "Time based theme switcher" tar
+     ((:url . "https://git.sr.ht/~bboal/theme-buffet")
+      (:maintainer "Theme-Buffet Development"
+		   . "~bboal/general-issues@lists.sr.ht")
+      (:authors ("Bruno Boal" . "egomet@bboal.com")
+		("Protesilaos Stavrou" . "info@protesilaos.com"))
+      (:commit . "06f1be349e9c3d124520b18742911307de9abda3"))])
+ (timeout
+  . [(2 1 6) ((emacs (24 4))) "Throttle or debounce Elisp functions"
+     tar
+     ((:url . "https://github.com/karthink/timeout")
+      (:keywords "convenience" "extensions")
+      (:maintainer "Karthik Chikmagalur"
+		   . "karthikchikmagalur@gmail.com")
+      (:authors
+       ("Karthik Chikmagalur" . "karthikchikmagalur@gmail.com"))
+      (:commit . "60b5ab7774f30fd12b9927e93b4d43fafb1fe925"))])
+ (timerfunctions
+  . [(1 4 2) ((cl-lib (0 5)) (emacs (24)))
+     "Enhanced versions of some timer.el functions" single
+     ((:url . "http://elpa.gnu.org/packages/timerfunctions.html")
+      (:authors ("Dave Goel" . "deego3@gmail.com"))
+      (:maintainer "Dave Goel" . "deego3@gmail.com"))])
+ (tiny
+  . [(0 2 1) nil "Quickly generate linear ranges in Emacs" tar
+     ((:url . "https://github.com/abo-abo/tiny")
+      (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com")
+      (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com"))
+      (:keywords "convenience"))])
+ (tmr
+  . [(1 4 0) ((emacs (29 1))) "Set timers using a convenient notation"
+     tar
+     ((:url . "https://github.com/protesilaos/tmr")
+      (:keywords "convenience" "timer")
+      (:maintainer "Protesilaos" . "info@protesilaos.com")
+      (:authors ("Protesilaos" . "info@protesilaos.com")
+		("Damien Cassou" . "damien@cassou.me")
+		("Daniel Mendler" . "mail@daniel-mendler.de")
+		("Steven Allen" . "steven@stebalien.com"))
+      (:commit . "34a23bbd40771c804133969e217a35c47b494a61"))])
+ (tomelr
+  . [(0 4 3) ((emacs (26 3)) (map (3 2 1)) (seq (2 23)))
+     "Convert S-expressions to TOML" tar
+     ((:url . "https://github.com/kaushalmodi/tomelr/")
+      (:keywords "data" "tools" "toml" "serialization" "config")
+      (:maintainer "Kaushal Modi" . "kaushal.modi@gmail.com")
+      (:authors ("Kaushal Modi" . "kaushal.modi@gmail.com"))
+      (:commit . "670e0a08f625175fd80137cf69e799619bf8a381"))])
+ (topspace
+  . [(0 3 1) ((emacs (25 1)))
+     "Recenter line 1 with scrollable upper margin/padding" tar
+     ((:url . "https://github.com/trevorpogue/topspace")
+      (:keywords "convenience" "scrolling" "center" "cursor" "margin"
+		 "padding")
+      (:maintainer "Trevor Edwin Pogue" . "trevor.pogue@gmail.com")
+      (:authors ("Trevor Edwin Pogue" . "trevor.pogue@gmail.com"))
+      (:commit . "33c2a6f0a11d1d88cdb2065c5a897e33507f4c86"))])
+ (track-changes
+  . [(1 5) ((emacs (24))) "API to react to buffer modifications" tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/track-changes.html")
+      (:commit . "e119514ae8b391f41577d22d4e41cc3fea7ab9eb"))])
+ (tramp
+  . [(2 8 2 1) ((emacs (28 1)))
+     "Transparent Remote Access, Multiple Protocol" tar
+     ((:url . "https://www.gnu.org/software/tramp/")
+      (:keywords "comm" "processes")
+      (:maintainer "Michael Albinus" . "michael.albinus@gmx.de")
+      (:authors ("Kai Großjohann" . "kai.grossjohann@gmx.net")
+		("Michael Albinus" . "michael.albinus@gmx.de"))
+      (:commit . "56569d77e50d73b3db7b34e903adade9122660ce"))])
+ (tramp-hlo
+  . [(0 0 2) ((tramp (2 8 0 5)))
+     "High level operations as Tramp handlers" tar
+     ((:url . "https://github.com/jsadusk/tramp-hlo")
+      (:maintainer "Joe Sadusk" . "joe@sadusk.com")
+      (:authors ("Joe Sadusk" . "joe@sadusk.com"))
+      (:commit . "a204c14a2eed4c92a455f12acae2ec7eeac6d8fd"))])
+ (tramp-nspawn
+  . [(1 0 2) ((emacs (23)))
+     "Tramp integration for systemd-nspawn containers" tar
+     ((:url . "https://git.spork.org/tramp-nspawn.git")
+      (:keywords "tramp" "nspawn" "machinectl" "systemd"
+		 "systemd-nspawn")
+      (:maintainer "Brian Cully" . "bjc@kublai.com")
+      (:authors ("Brian Cully" . "bjc@kublai.com"))
+      (:commit . "a2da5b6b25be7191755678651bdade2f9af5c617"))])
+ (tramp-theme
+  . [(0 3) ((emacs (24 1))) "Custom theme for remote buffers" tar
+     ((:keywords "convenience" "faces")
+      (:maintainer "Michael Albinus" . "michael.albinus@gmx.de")
+      (:authors ("Michael Albinus" . "michael.albinus@gmx.de"))
+      (:url . "https://elpa.gnu.org/packages/tramp-theme.html")
+      (:commit . "f89f0c8ac25455ae59ae3e4bd8c8cb673e16130e"))])
+ (transcribe
+  . [(1 5 2) nil "Package for audio transcriptions" tar
+     ((:maintainer "David Gonzalez Gandara"
+		   . "dggandara@member.fsf.org")
+      (:authors
+       ("David Gonzalez Gandara" . "dggandara@member.fsf.org"))
+      (:url . "https://elpa.gnu.org/packages/transcribe.html")
+      (:commit . "89832e4cdc1e6d8262a4a2c9d1ff70f398b8faf0"))])
+ (transient
+  . [(0 13 7)
+     ((emacs (28 1)) (compat (31 0)) (cond-let (1 1)) (llama (1 0))
+      (seq (2 24)))
+     "Transient commands" tar
+     ((:url . "https://github.com/magit/transient")
+      (:keywords "extensions")
+      (:maintainer "Jonas Bernoulli"
+		   . "emacs.transient@jonas.bernoulli.dev")
+      (:authors
+       ("Jonas Bernoulli" . "emacs.transient@jonas.bernoulli.dev"))
+      (:commit . "0ec75dcce235f5ab3d39a02b878e6aaa78159b22"))])
+ (transient-cycles
+  . [(2 1) ((emacs (29 1)))
+     "Define command variants with transient cycling" tar
+     ((:url
+       . "https://git.spwhitton.name/dotfiles/tree/.emacs.d/user-lisp/transient-cycles.el")
+      (:keywords "buffer" "window" "processes" "minor-mode"
+		 "convenience")
+      (:maintainer "Sean Whitton" . "spwhitton@spwhitton.name")
+      (:authors ("Sean Whitton" . "spwhitton@spwhitton.name"))
+      (:commit . "2a35e2086675c08d1d3d451307566215202b641e"))])
+ (tree-inspector
+  . [(0 4) ((emacs (27 1)) (treeview (1 1 0)))
+     "Inspector tool for Emacs Lisp object that uses a treeview" tar
+     ((:url . "https://github.com/mmontone/emacs-inspector")
+      (:keywords "debugging" "tool" "lisp" "development")
+      (:maintainer "Mariano Montone" . "marianomontone@gmail.com")
+      (:authors ("Mariano Montone" . "marianomontone@gmail.com"))
+      (:commit . "bbb8d2dfe84fbf857fcc1579de5a1324b09a877e"))])
+ (trie
+  . [(0 6) ((tNFA (0 1 1)) (heap (0 3))) "Trie data structure" tar
+     ((:url . "http://www.dr-qubit.org/emacs.php")
+      (:keywords "extensions" "matching" "data structures trie"
+		 "ternary search tree" "tree" "completion" "regexp")
+      (:maintainer "Toby Cubitt" . "toby-predictive@dr-qubit.org")
+      (:authors ("Toby Cubitt" . "toby-predictive@dr-qubit.org"))
+      (:commit . "e7326a61b1cd2605867063fcfc5ddddaeed6d993"))])
+ (triples
+  . [(0 6 2) ((seq (2 0)) (emacs (28 1)))
+     "A flexible triple-based database for use in apps" tar
+     ((:url . "https://github.com/ahyatt/triples")
+      (:keywords "triples" "kg" "data" "sqlite")
+      (:maintainer "Andrew Hyatt" . "ahyatt@gmail.com")
+      (:authors ("Andrew Hyatt" . "ahyatt@gmail.com"))
+      (:commit . "127e42e98f7df3997d538d72a67604c9584517dd"))])
+ (truename-cache
+  . [(0 3 7) ((emacs (27 1)) (compat (30 1)))
+     "Efficiently de-dup file-names" tar
+     ((:url . "https://github.com/meedstrom/truename-cache")
+      (:keywords "lisp")
+      (:maintainer "Martin Edström" . "meedstrom91@gmail.com")
+      (:authors ("Martin Edström" . "meedstrom91@gmail.com"))
+      (:commit . "6540dd050c0db1e73e03dfa6fe253dd5fb03b579"))])
+ (trust-manager
+  . [(0 4 2) ((emacs (30 1))) "Convenient trust management" tar
+     ((:url . "https://git.sr.ht/~eshel/trust-manager")
+      (:keywords "security" "trust" "files")
+      (:maintainer "Eshel Yaron" . "me@eshelyaron.com")
+      (:authors ("Eshel Yaron" . "me@eshelyaron.com"))
+      (:commit . "0ff311bb59c9f1bb1ecdf413fa2bfa353bf389d7"))])
+ (ulisp-repl
+  . [(1 0 3) ((emacs (26 1))) "uLisp REPL" tar
+     ((:maintainer "Thomas Fitzsimmons" . "fitzsim@fitzsim.org")
+      (:authors ("Thomas Fitzsimmons" . "fitzsim@fitzsim.org"))
+      (:url . "https://elpa.gnu.org/packages/ulisp-repl.html")
+      (:commit . "63e38a9080b2d15146680022e20700db6eb20657"))])
+ (undo-tree
+  . [(0 8 2) ((queue (0 2))) "Treat undo history as a tree" tar
+     ((:url . "https://www.dr-qubit.org/undo-tree.html")
+      (:keywords "convenience" "files" "undo" "redo" "history" "tree")
+      (:maintainer "Toby Cubitt" . "toby-undo-tree@dr-qubit.org")
+      (:authors ("Toby Cubitt" . "toby-undo-tree@dr-qubit.org"))
+      (:commit . "42aab056e37e033816b2d192f9121b89410b958e"))])
+ (uni-confusables
+  . [(0 3) nil "Unicode confusables table" tar
+     ((:maintainer "Teodor Zlatanov" . "tzz@lifelogs.com")
+      (:url . "https://elpa.gnu.org/packages/uni-confusables.html")
+      (:commit . "393e1adeec5b0eb51f9606983655cfe2272c6e54"))])
+ (uniquify-files
+  . [(1 0 4) ((emacs (25 0)))
+     "Completion style for files, minimizing directories" tar
+     ((:keywords "completion" "table" "uniquify")
+      (:maintainer "Stephen Leake" . "stephen_leake@stephe-leake.org")
+      (:authors ("Stephen Leake" . "stephen_leake@stephe-leake.org"))
+      (:url . "https://elpa.gnu.org/packages/uniquify-files.html")
+      (:commit . "1d76b4f0e283afaff2be053d85f8726ffc3abd6e"))])
+ (urgrep
+  . [(0 6 0) ((emacs (28 1)) (compat (29 1 0 1)) (project (0 3 0)))
+     "Universal recursive grep" tar
+     ((:url . "https://sr.ht/~jimporter/urgrep/")
+      (:keywords "grep" "search")
+      (:commit . "334aa0a364b2811ccba67b1ce4e719e9e96f963a"))])
+ (url-http-ntlm
+  . [(2 0 6) ((emacs (24 4)) (ntlm (2 1 0)))
+     "NTLM authentication for the url library" tar
+     ((:url . "https://code.google.com/p/url-http-ntlm/")
+      (:keywords "comm" "data" "processes" "hypermedia")
+      (:maintainer "Thomas Fitzsimmons" . "fitzsim@fitzsim.org")
+      (:authors ("Tom Schutzer-Weissmann" . "tom.weissmann@gmail.com"))
+      (:commit . "234228e02682b9000015f5aa668875ea5d4fe6f0"))])
+ (url-http-oauth
+  . [(0 8 5) ((emacs (24 4))) "OAuth 2.0 for URL library" tar
+     ((:keywords "comm" "data" "processes" "hypermedia")
+      (:maintainer "Thomas Fitzsimmons" . "fitzsim@fitzsim.org")
+      (:authors ("Thomas Fitzsimmons" . "fitzsim@fitzsim.org"))
+      (:url . "https://elpa.gnu.org/packages/url-http-oauth.html")
+      (:commit . "ff866a39ccc120d6bed930d2ed4fcec09e0662d4"))])
+ (url-scgi
+  . [(0 9) ((emacs (24 3))) "SCGI support for url.el" tar
+     ((:url . "https://github.com/skangas/url-scgi/")
+      (:keywords "comm" "data" "processes" "scgi")
+      (:maintainer "Stefan Kangas" . "stefankangas@gmail.com")
+      (:authors ("Stefan Kangas" . "stefankangas@gmail.com"))
+      (:commit . "ccf30c3647cd6a560cadc795bd92769c0a0c9de9"))])
+ (use-package
+   . [(2 4 6) ((emacs (24 3)) (bind-key (2 4)))
+      "A configuration macro for simplifying your .emacs" tar
+      ((:url . "https://github.com/jwiegley/use-package")
+       (:keywords "dotemacs" "startup" "speed" "config" "package"
+		  "extensions")
+       (:maintainer "John Wiegley" . "johnw@newartisans.com")
+       (:authors ("John Wiegley" . "johnw@newartisans.com"))
+       (:commit . "d8e9eb73c2b5f93adf3ae29d1349ce2161e23cb4"))])
+ (validate
+  . [(1 0 4) ((emacs (24 1)) (cl-lib (0 5)) (seq (2 16)))
+     "Schema validation for Emacs-lisp" tar
+     ((:keywords "lisp")
+      (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com")
+      (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com"))
+      (:url . "https://elpa.gnu.org/packages/validate.html")
+      (:commit . "2bc1a7c5f09de5deb7f27b2b4ed731271f9f3f05"))])
+ (valign
+  . [(3 1 1) ((emacs (26 0))) "Visually align tables" tar
+     ((:url . "https://github.com/casouri/valign")
+      (:keywords "convenience" "text" "table")
+      (:maintainer "Yuan Fu" . "casouri@gmail.com")
+      (:authors ("Yuan Fu" . "casouri@gmail.com"))
+      (:commit . "421c8c0cb4636e5fd87ac1022d6b8268c320f74f"))])
+ (vc-backup
+  . [(1 1 1) ((emacs (24 3)) (compat (28 1 1 0)))
+     "VC backend for versioned backups" tar
+     ((:url . "https://codeberg.org/pkal/vc-backup.el")
+      (:keywords "vc")
+      (:maintainer "Philip Kaludercic" . "philipk@posteo.net")
+      (:authors ("Philip Kaludercic" . "philipk@posteo.net"))
+      (:commit . "28412c81c3b046616fd8edf82d05bb2d83d0c306"))])
+ (vc-got
+  . [(1 2) ((emacs (25 1))) "VC backend for Game of Trees VCS" tar
+     ((:url . "https://projects.omarpolo.com/vc-got.html")
+      (:keywords "vc" "tools")
+      (:maintainer ("Omar Polo" . "op@omarpolo.com")
+		   ("Timo Myyrä" . "timo.myyra@bittivirhe.fi"))
+      (:authors ("Omar Polo" . "op@omarpolo.com")
+		("Timo Myyrä" . "timo.myyra@bittivirhe.fi"))
+      (:commit . "bc158324418fd8bef96a7f62856679de2569030f"))])
+ (vc-hgcmd
+  . [(1 14 1) ((emacs (25 1)))
+     "VC mercurial backend that uses hg command server" tar
+     ((:url . "https://github.com/muffinmad/emacs-vc-hgcmd")
+      (:keywords "vc")
+      (:maintainer "Andrii Kolomoiets" . "andreyk.mad@gmail.com")
+      (:authors ("Andrii Kolomoiets" . "andreyk.mad@gmail.com"))
+      (:commit . "d044448965d31ca8214f8bca48487e4d9b9d9a0f"))])
+ (vc-jj
+  . [(0 5) ((emacs (28 1)) (compat (29 4)))
+     "VC backend for the Jujutsu version control system" tar
+     ((:url . "https://codeberg.org/emacs-jj-vc/vc-jj.el")
+      (:keywords "vc" "tools")
+      (:maintainer ("Rudolf Schlatte" . "rudi@constantly.at")
+		   ("Kristoffer Balintona" . "krisbalintona@gmail.com"))
+      (:authors ("Rudolf Schlatte" . "rudi@constantly.at")
+		("Kristoffer Balintona" . "krisbalintona@gmail.com"))
+      (:commit . "13b00216330c381179659f5210472fe975c2805d"))])
+ (vcard
+  . [(0 2 2) ((emacs (27 1))) "Package for handling vCard files" tar
+     ((:keywords "vcard" "mail" "news")
+      (:maintainer ("Noah Friedman" . "friedman@splode.com")
+		   ("Eric Abrahamsen" . "eric@ericabrahamsen.net"))
+      (:authors ("Noah Friedman" . "friedman@splode.com"))
+      (:url . "https://elpa.gnu.org/packages/vcard.html")
+      (:commit . "28b88fd8ed53ca12d9499175217af81f5ea161fc"))])
+ (vcl-mode
+  . [(1 1) nil "Major mode for Varnish Configuration Language" tar
+     ((:keywords "varnish" "vcl")
+      (:maintainer "Sergey Poznyakoff" . "gray@gnu.org.ua")
+      (:authors ("Sergey Poznyakoff" . "gray@gnu.org.ua"))
+      (:url . "https://elpa.gnu.org/packages/vcl-mode.html")
+      (:commit . "ff7331de91e399af4b222cad0b0a1d445f82b333"))])
+ (vdiff
+  . [(0 2 4) ((emacs (24 4)) (hydra (0 13 0)))
+     "A diff tool similar to  vimdiff" tar
+     ((:url . "https://github.com/justbur/emacs-vdiff")
+      (:keywords "diff")
+      (:maintainer "Justin Burkett" . "justin@burkett.cc")
+      (:authors ("Justin Burkett" . "justin@burkett.cc"))
+      (:commit . "007e44be19d068fd6b49874b6e9b8df8b1f552bd"))])
+ (vecdb
+  . [(0 2 2) ((emacs (29 1)) (plz (0 8)) (pg (0 56)))
+     "An interface to vector databases for embeddings" tar
+     ((:url . "https://github.com/ahyatt/vecdb")
+      (:maintainer "Andrew Hyatt" . "ahyatt@gmail.com")
+      (:authors ("Andrew Hyatt" . "ahyatt@gmail.com"))
+      (:commit . "a0240be7a917dca47b95e401382affd1c11abea1"))])
+ (verilog-mode
+  . [(2026 4 14 10117132) nil
+     "major mode for editing verilog source in Emacs" tar
+     ((:url . "https://www.veripool.org") (:keywords "languages")
+      (:maintainer ("Michael McNamara" . "mac@verilog.com")
+		   ("Wilson Snyder" . "wsnyder@wsnyder.org"))
+      (:authors ("Michael McNamara" . "mac@verilog.com")
+		("Wilson Snyder" . "wsnyder@wsnyder.org"))
+      (:commit . "b3574e6464b0cce4a878106c07f1ea8f65989a6b"))])
+ (vertico
+  . [(2 13) ((emacs (29 1)) (compat (31)))
+     "VERTical Interactive COmpletion" tar
+     ((:url . "https://github.com/minad/vertico")
+      (:keywords "convenience" "files" "matching" "completion")
+      (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de")
+      (:authors ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:commit . "a6874e3d8c74a9eea77967d702d608ebbd6b27ec"))])
+ (vertico-posframe
+  . [(0 9 2) ((emacs (26 0)) (posframe (1 4 0)) (vertico (2 6)))
+     "Using posframe to show Vertico" tar
+     ((:url . "https://github.com/tumashu/vertico-posframe")
+      (:keywords "abbrev" "convenience" "matching" "vertico")
+      (:maintainer "Feng Shu" . "tumashu@163.com")
+      (:authors ("Feng Shu" . "tumashu@163.com"))
+      (:commit . "d6e06a4f1b34d24cc0ca6ec69d2d6c965191b23e"))])
+ (vigenere
+  . [(1 0) ((emacs (25 1)))
+     "Run a vigenere cipher on a block of text ;" tar
+     ((:url . "https://elpa.gnu.org/packages/vigenere.html")
+      (:keywords "data" "vigenere" "cipher")
+      (:maintainer "Ian Dunn" . "dunni@gnu.org")
+      (:authors ("Ian Dunn" . "dunni@gnu.org"))
+      (:commit . "434270403845789f4be32102c573ea965e870d19"))])
+ (visual-filename-abbrev
+  . [(1 3) ((emacs (26 1))) "Visually abbreviate filenames" tar
+     ((:keywords "tools")
+      (:maintainer "Tassilo Horn" . "tsdh@gnu.org")
+      (:authors ("Tassilo Horn" . "tsdh@gnu.org"))
+      (:url
+       . "https://elpa.gnu.org/packages/visual-filename-abbrev.html")
+      (:commit . "4af7868db7bbc6a3c185540ba4e257d4c4c560c0"))])
+ (visual-fill
+  . [(0 2) nil "Auto-refill paragraphs without modifying the buffer"
+     tar
+     ((:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca")
+      (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca"))
+      (:url . "https://elpa.gnu.org/packages/visual-fill.html")
+      (:commit . "1951eaf59e25091d5597cc45e3dd5925be005122"))])
+ (vlf
+  . [(1 7 2) nil "View Large Files" tar
+     ((:url . "https://github.com/m00natic/vlfi")
+      (:keywords "large files" "utilities")
+      (:maintainer "Andrey Kotlarski" . "m00naticus@gmail.com")
+      (:commit . "efffeb5f54191d41a503d1d51343bb327fe2f871"))])
+ (vundo
+  . [(2 4 0) ((emacs (28 1))) "Visual undo tree" tar
+     ((:url . "https://github.com/casouri/vundo")
+      (:keywords "undo" "text" "editing")
+      (:maintainer "Yuan Fu" . "casouri@gmail.com")
+      (:authors ("Yuan Fu" . "casouri@gmail.com"))
+      (:commit . "b89f719824fe5da0f6a7590fad3ece798fd59909"))])
+ (wcheck-mode
+  . [(2026 5) nil "General interface for text checkers" tar
+     ((:url . "https://github.com/tlikonen/wcheck-mode")
+      (:keywords "text" "spell" "check" "languages" "ispell")
+      (:maintainer "Teemu Likonen" . "tlikonen@iki.fi")
+      (:authors ("Teemu Likonen" . "tlikonen@iki.fi"))
+      (:commit . "a5312ed2638a90a6e5340ec3315d9fa8eadc1fa6"))])
+ (wconf
+  . [(0 2 1) ((emacs (24 4))) "Minimal window layout manager" tar
+     ((:url . "https://github.com/ilohmar/wconf")
+      (:keywords "windows" "frames" "layout")
+      (:maintainer "Ingo Lohmar" . "i.lohmar@gmail.com")
+      (:authors ("Ingo Lohmar" . "i.lohmar@gmail.com"))
+      (:commit . "833ae431a5b35739be3076ea4b586d84d6fe269f"))])
+ (web-server
+  . [(0 1 2) ((emacs (24 3))) "Emacs Web Server" tar
+     ((:url . "https://github.com/eschulte/emacs-web-server")
+      (:keywords "http" "server" "network")
+      (:maintainer "Eric Schulte" . "schulte.eric@gmail.com")
+      (:authors ("Eric Schulte" . "schulte.eric@gmail.com"))
+      (:commit . "33afdb46e1cd61251736816d965495525b36c9cd"))])
+ (webfeeder
+  . [(1 1 2) ((emacs (25 1)))
+     "Build RSS and Atom webfeeds from HTML files" tar
+     ((:url . "https://gitlab.com/Ambrevar/emacs-webfeeder")
+      (:keywords "news" "hypermedia" "blog" "feed" "rss" "atom")
+      (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz")
+      (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz"))
+      (:commit . "6037848ee495a67510d8b43f1fbe319b76dbd859"))])
+ (websocket
+  . [(1 16) ((cl-lib (0 5))) "Emacs WebSocket client and server" tar
+     ((:url . "https://github.com/ahyatt/emacs-websocket")
+      (:keywords "communication" "websocket" "server")
+      (:maintainer "Andrew Hyatt" . "ahyatt@gmail.com")
+      (:authors ("Andrew Hyatt" . "ahyatt@gmail.com"))
+      (:commit . "03d1cca4bd910a8df73e4ec637836c6ac25213a2"))])
+ (which-key
+  . [(3 6 1) ((emacs (25 1))) "Display available keybindings in popup"
+     tar
+     ((:maintainer "Justin Burkett" . "justin@burkett.cc")
+      (:authors ("Justin Burkett" . "justin@burkett.cc"))
+      (:url . "https://elpa.gnu.org/packages/which-key.html")
+      (:commit . "34b832fce1d01c22aa644196cd6e6b50b1d403ee"))])
+ (window-commander
+  . [(3 0 2) ((emacs (27 1))) "Simply execute commands on windows" tar
+     ((:url . "https://dsemy.com/projects/window-commander")
+      (:keywords "convenience")
+      (:maintainer "Daniel Semyonov" . "daniel@dsemy.com")
+      (:authors ("Daniel Semyonov" . "daniel@dsemy.com"))
+      (:commit . "ad92c184ccc06f46b2caf001bc8201d983eca626"))])
+ (window-tool-bar
+  . [(0 3) ((emacs (27 1)) (compat (29 1)))
+     "Add tool bars inside windows" tar
+     ((:url . "http://github.com/chaosemer/window-tool-bar")
+      (:keywords "mouse")
+      (:maintainer "Jared Finder" . "jared@finder.org")
+      (:authors ("Jared Finder" . "jared@finder.org"))
+      (:commit . "72bbbff7e8128fe14c0b69c7282667788758b8b4"))])
+ (windower
+  . [(0 0 1) ((emacs (25)))
+     "Helper functions for window manipulation." single
+     ((:keywords "convenience" "tools")
+      (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz"))
+      (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz")
+      (:url . "https://gitlab.com/ambrevar/windower"))])
+ (windresize
+  . [(0 1) nil "Resize windows interactively" tar
+     ((:keywords "window")
+      (:maintainer "Bastien" . "bzgATalternDOTorg")
+      (:authors ("Bastien" . "bzgATalternDOTorg"))
+      (:url . "https://elpa.gnu.org/packages/windresize.html")
+      (:commit . "0693d5d864ac9fd033c868bdd887e66278e056e9"))])
+ (wisi
+  . [(4 3 2) ((emacs (25 3)) (seq (2 20)))
+     "Utilities for implementing an indentation/navigation engine using a generalized LR parser"
+     tar
+     ((:url . "https://stephe-leake.org/ada/wisitoken.html")
+      (:keywords "parser" "indentation" "navigation")
+      (:maintainer "Stephen Leake" . "stephen_leake@stephe-leake.org")
+      (:authors ("Stephen Leake" . "stephen_leake@stephe-leake.org"))
+      (:commit . "1c4b099bf1f93cebee523b0ba75ccab6c6c2a2f0"))])
+ (wisitoken-grammar-mode
+  . [(1 3 0) ((wisi (4 2 2)) (emacs (25 3)) (mmm-mode (0 5 7)))
+     "Major mode for editing WisiToken grammar files" tar
+     ((:url . "https://www.nongnu.org/ada-mode/")
+      (:keywords "languages")
+      (:maintainer "Stephen Leake" . "stephen_leake@stephe-leake.org")
+      (:authors ("Stephen Leake" . "stephen_leake@stephe-leake.org"))
+      (:commit . "2d58879cea26b8a3b573d084d149dea94f93dfb8"))])
+ (with-command-redo
+  . [(0 2) ((emacs (29 1))) "Repeat commands with automatic undo" tar
+     ((:url
+       . "https://codeberg.org/ideasman42/emacs-with-command-redo")
+      (:maintainer "Campbell Barton" . "ideasman42@gmail.com")
+      (:authors ("Campbell Barton" . "ideasman42@gmail.com"))
+      (:commit . "b3e3c86e2cbeb097552a1bff000905ad28de7907"))])
+ (wpuzzle
+  . [(1 1) nil "find as many word in a given time" tar
+     ((:maintainer "Ivan Kanis" . "ivan@kanis.fr")
+      (:authors ("Ivan Kanis" . "ivan@kanis.fr"))
+      (:url . "https://elpa.gnu.org/packages/wpuzzle.html")
+      (:commit . "9373cbc013b978b31e38822bfdcc9a7fc5e0ed99"))])
+ (wrap-search
+  . [(4 17 6) nil "wrapped, non-incremental search" tar
+     ((:url . "https://dataswamp.org/~incal/elpa/wrap-search.el")
+      (:keywords "matching")
+      (:maintainer "Emanuel Berg" . "incal@dataswamp.org")
+      (:authors ("Emanuel Berg" . "incal@dataswamp.org"))
+      (:commit . "980081a476dce22032e31b50eb4e34d54dc4788c"))])
+ (xclip
+  . [(1 11 1) nil "Copy&paste GUI clipboard from text terminal" tar
+     ((:keywords "convenience" "tools")
+      (:maintainer "Leo Liu" . "sdl.web@gmail.com")
+      (:authors ("Leo Liu" . "sdl.web@gmail.com"))
+      (:url . "https://elpa.gnu.org/packages/xclip.html")
+      (:commit . "7febe164de2a881b83b9d604d3c7cf20b69f422d"))])
+ (xeft
+  . [(3 6) ((emacs (26 0))) "Deft feat. Xapian" tar
+     ((:url . "https://sr.ht/~casouri/xeft")
+      (:keywords "applications" "note" "searching")
+      (:maintainer "Yuan Fu" . "casouri@gmail.com")
+      (:authors ("Yuan Fu" . "casouri@gmail.com"))
+      (:commit . "6c63bc4c40eae8fe7a3213efe11b75dfe73aaaa4"))])
+ (xelb
+  . [(0 23) ((emacs (29 1)) (compat (31)))
+     "X protocol Emacs Lisp Binding" tar
+     ((:url . "https://github.com/emacs-exwm/xelb") (:keywords "unix")
+      (:maintainer
+       ("Adrián Medraño Calvo" . "adrian@medranocalvo.com")
+       ("Steven Allen" . "steven@stebalien.com")
+       ("Daniel Mendler" . "mail@daniel-mendler.de"))
+      (:authors ("Chris Feng" . "chris.w.feng@gmail.com"))
+      (:commit . "638692fac2e3ef081cd8c39891d6d6e15032ff17"))])
+ (xpm
+  . [(1 0 5) ((cl-lib (0 5)) (queue (0 2))) "edit XPM images" tar
+     ((:url . "https://www.gnuvola.org/software/xpm/")
+      (:keywords "multimedia" "xpm")
+      (:maintainer "Thien-Thi Nguyen" . "ttn@gnu.org")
+      (:authors ("Thien-Thi Nguyen" . "ttn@gnu.org"))
+      (:commit . "85e5c412dde7ec3c3f64c64d37079e233293e4d0"))])
+ (xr
+  . [(2 2) ((emacs (27 1))) "Convert string regexp to rx notation" tar
+     ((:url . "https://github.com/mattiase/xr")
+      (:keywords "lisp" "regexps")
+      (:maintainer "Mattias Engdegård" . "mattias.engdegard@gmail.com")
+      (:authors ("Mattias Engdegård" . "mattias.engdegard@gmail.com"))
+      (:commit . "694defa220113d0acaa78fd646dcff9f1a08fad9"))])
+ (xref
+  . [(1 7 0) ((emacs (26 1))) "Cross-referencing commands" tar
+     ((:url . "https://elpa.gnu.org/packages/xref.html")
+      (:commit . "cef848fe5f355ca34abc176739d0ace835b12eed"))])
+ (xref-union
+  . [(0 2 0) ((emacs (25 1))) "Combine multiple Xref backends" tar
+     ((:url . "https://git.sr.ht/~pkal/xref-union/")
+      (:maintainer "Philip Kaludercic"
+		   . "~pkal/public-inbox@lists.sr.ht")
+      (:authors ("Philip Kaludercic" . "philipk@posteo.net"))
+      (:commit . "2bb88d0dc526177c3c6612d6585cee6b2c57803a"))])
+ (yaml
+  . [(1 2 4) ((emacs (25 1))) "YAML parser for Elisp" tar
+     ((:url . "https://github.com/zkry/yaml.el") (:keywords "tools")
+      (:maintainer "Zachary Romero" . "zkry@posteo.org")
+      (:authors ("Zachary Romero" . "zkry@posteo.org"))
+      (:commit . "5546f36bde24a9a8c1934e0f6ce205cd41d72537"))])
+ (yasnippet
+  . [(0 14 3) ((cl-lib (0 5)) (emacs (24 4)))
+     "Yet another snippet extension for Emacs" tar
+     ((:url . "http://github.com/joaotavora/yasnippet")
+      (:keywords "convenience" "emulation")
+      (:maintainer "Noam Postavsky" . "npostavs@gmail.com")
+      (:commit . "dd570a6b22364212fff9769cbf4376bdbd7a63c5"))])
+ (yasnippet-classic-snippets
+  . [(1 0 2) ((yasnippet (0 9 1))) "\"Classic\" yasnippet snippets"
+     tar
+     ((:keywords "snippets")
+      (:maintainer "Noam Postavsky" . "npostavs@gmail.com")
+      (:url
+       . "https://elpa.gnu.org/packages/yasnippet-classic-snippets.html")
+      (:commit . "43ff0337f5ec504f2a496f2f035a5087cd8e2074"))])
+ (zones
+  . [(2023 6 11) nil "Zones of text - like multiple regions" tar
+     ((:url . "https://elpa.gnu.org/packages/zones.html")
+      (:keywords "narrow" "restriction" "widen" "region" "zone")
+      (:maintainer "Drew Adams" . "drew.adams@oracle.com")
+      (:commit . "10ebf386d48725fa3af2f8b0c60ad4ffa0ec9653"))])
+ (ztree
+  . [(1 0 7) ((cl-lib (0))) "Text mode directory tree" tar
+     ((:url . "https://github.com/fourier/ztree")
+      (:keywords "files" "tools")
+      (:maintainer "Alexey Veretennikov"
+		   . "alexey.veretennikov@gmail.com")
+      (:authors
+       ("Alexey Veretennikov" . "alexey.veretennikov@gmail.com"))
+      (:commit . "48f17807ac6c765a66cf29b2fcdd08f1aa7da7d6"))])
+ (zuul
+  . [(0 4 0) ((emacs (27 1)) (project (0 8 1))) "Interface to Zuul"
+     tar
+     ((:url . "https://sr.ht/~niklaseklund/zuul.el")
+      (:keywords "convenience" "tools")
+      (:maintainer "zuul.el Development"
+		   . "~niklaseklund/zuul.el@lists.sr.ht")
+      (:authors ("Niklas Eklund" . "niklas.eklund@posteo.net"))
+      (:commit . "c94886cb7abdea66ba1d0a064a4d93efed10fed4"))]))
diff --git a/emacs/.emacs.d/elpa/archives/elpa/archive-contents.signed b/emacs/.emacs.d/elpa/archives/elpa/archive-contents.signed
new file mode 100644
index 0000000..bb2e8ce
--- /dev/null
+++ b/emacs/.emacs.d/elpa/archives/elpa/archive-contents.signed
@@ -0,0 +1 @@
+Good signature from 645357D2883A0966 GNU ELPA Signing Agent (2023) <elpasign@elpa.gnu.org> (trust undefined) created at 2026-08-27T05:05:02+0800 using EDDSA
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/archives/melpa/archive-contents b/emacs/.emacs.d/elpa/archives/melpa/archive-contents
new file mode 100644
index 0000000..b3ed829
--- /dev/null
+++ b/emacs/.emacs.d/elpa/archives/melpa/archive-contents
@@ -0,0 +1,6296 @@
+(1
+ (0blayout . [(20190703 527) nil "Layout grouping with ease" tar ((:url . "https://github.com/etu/0blayout") (:commit . "fd9a8f353dbd45b4628b5f84b8d8c2525ebf571d") (:revdesc . "fd9a8f353dbd") (:keywords "convenience" "window-management"))])
+ (0x0 . [(20230823 2214) ((emacs (26 1))) "Upload sharing to 0x0.st" tar ((:url . "https://git.sr.ht/~willvaughn/emacs-0x0") (:commit . "04f95142b25d8bb701f239539176df6617dcd982") (:revdesc . "04f95142b25d") (:authors ("William Vaughn" . "vaughnwilld@gmail.com")) (:maintainers ("William Vaughn" . "vaughnwilld@gmail.com")) (:maintainer "William Vaughn" . "vaughnwilld@gmail.com"))])
+ (0xc . [(20201025 2105) ((emacs (24 4)) (s (1 11 0))) "Base conversion made easy" tar ((:url . "https://github.com/AdamNiederer/0xc") (:commit . "5bd6c0c901d03d1f24a3ddcf3a62d3b6d2428c80") (:revdesc . "5bd6c0c901d0") (:keywords "base" "conversion") (:authors ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainers ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainer "Adam Niederer" . "adam.niederer@gmail.com"))])
+ (2048-game . [(20230809 356) ((emacs (24 3))) "Play 2048 in Emacs" tar ((:url . "https://hg.sr.ht/~zck/game-2048") (:commit . "8175ca5191175183b9522141dcb55d30673d2323") (:revdesc . "8175ca519117") (:authors ("Zachary Kanfer" . "zkanfer@gmail.com")) (:maintainers ("Zachary Kanfer" . "zkanfer@gmail.com")) (:maintainer "Zachary Kanfer" . "zkanfer@gmail.com"))])
+ (2bit . [(20200926 1418) ((emacs (24 3))) "Library for reading data from 2bit files" tar ((:url . "https://github.com/davep/2bit.el") (:commit . "69b4ec1d6d2ad95c9e59dacb43224abbec7a8989") (:revdesc . "69b4ec1d6d2a") (:keywords "files" "data") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (750words . [(20220625 1407) ((emacs (24 4))) "Emacs integration and Org exporter for 750words.com" tar ((:url . "https://github.com/zzamboni/750words-client") (:commit . "43eee19428fc8f5a133192398510d7313eb33d97") (:revdesc . "43eee19428fc") (:keywords "files" "org" "writing") (:authors ("Diego Zamboni" . "https://github.com/zzamboni")) (:maintainers ("Diego Zamboni" . "diego@zzamboni.org")) (:maintainer "Diego Zamboni" . "diego@zzamboni.org"))])
+ (@ . [(20240923 1318) ((emacs (24 3))) "Multiple-inheritance prototype-based objects DSL" tar ((:url . "https://github.com/skeeto/at-el") (:commit . "0489e15cd0bc2fd9da56a4147f9083c6d816ebb9") (:revdesc . "0489e15cd0bc") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainer "Christopher Wellons" . "wellons@nullprogram.com"))])
+ (a . [(20210929 1510) ((emacs (25))) "Associative data structure functions" tar ((:url . "https://github.com/plexus/a.el") (:commit . "9ad2d18252b729174fe22ed0b2b7670c88f60c31") (:revdesc . "9ad2d18252b7") (:keywords "lisp") (:authors ("Arne Brasseur" . "arne@arnebrasseur.net")) (:maintainers ("Arne Brasseur" . "arne@arnebrasseur.net")) (:maintainer "Arne Brasseur" . "arne@arnebrasseur.net"))])
+ (aa-edit-mode . [(20170119 320) ((emacs (24 3)) (navi2ch (2 0 0))) "Major mode for editing AA(S_JIS Art) and .mlt file" tar ((:url . "https://github.com/zonuexe/aa-edit-mode") (:commit . "1dd801225b7ad3c23ad09698f5e77f0df7012a65") (:revdesc . "1dd801225b7a") (:keywords "wp" "text" "shiftjis" "mlt" "yaruo") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (aangit . [(20231106 2115) ((emacs (29 1)) (transient (0 4)) (s (1 13))) "Quickly scaffold new Angular apps with Aangit" tar ((:url . "https://github.com/stephenwithav/aangit") (:commit . "7527a366c542cb7b09672597876e83f429ca6b46") (:revdesc . "7527a366c542") (:keywords "angular" "tools") (:authors ("Steven Edwards" . "steven@stephenwithav.io")) (:maintainers ("Steven Edwards" . "steven@stephenwithav.io")) (:maintainer "Steven Edwards" . "steven@stephenwithav.io"))])
+ (aas . [(20230303 2214) ((emacs (26 3))) "Snippet expansions mid-typing" tar ((:url . "https://github.com/ymarco/auto-activating-snippets") (:commit . "ddc2b7a58a2234477006af348b30e970f73bc2c1") (:revdesc . "ddc2b7a58a22") (:keywords "abbrev" "tools") (:authors ("Yoav Marco" . "yoavm448@gmail.com")) (:maintainers ("Yoav Marco" . "yoavm448@gmail.com")) (:maintainer "Yoav Marco" . "yoavm448@gmail.com"))])
+ (abc-mode . [(20220713 1359) nil "Major mode for editing abc music files" tar ((:url . "https://github.com/mkjunker/abc-mode") (:commit . "45193b67508861cf77da7e76b71711855c002caa") (:revdesc . "45193b675088") (:keywords "local" "docs") (:authors ("Matthew K. Junker" . "junker@alum.mit.edu")) (:maintainers ("Matthew K. Junker" . "junker@alum.mit.edu")) (:maintainer "Matthew K. Junker" . "junker@alum.mit.edu"))])
+ (abgaben . [(20171119 646) ((pdf-tools (0 80)) (f (0 19 0)) (s (1 11 0))) "Review and correct assignments received by mail" tar ((:url . "http://arne.chark.eu/") (:commit . "966bfcfdd3b2e288576ffe363d676ad282902090") (:revdesc . "966bfcfdd3b2") (:keywords "mail" "outlines" "convenience") (:authors ("Arne Köhn" . "arne@chark.eu")) (:maintainers ("Arne Köhn" . "arne@chark.eu")) (:maintainer "Arne Köhn" . "arne@chark.eu"))])
+ (abl-mode . [(20240423 1214) nil "Python TDD minor mode" tar ((:url . "https://github.com/afroisalreadyinu/abl-mode") (:commit . "e918290b279112c367787ac704398d66759e5298") (:revdesc . "e918290b2791") (:authors ("Ulas Tuerkmen" . "ulas.tuerkmenatgmaildotcom")) (:maintainers ("Ulas Tuerkmen" . "ulas.tuerkmenatgmaildotcom")) (:maintainer "Ulas Tuerkmen" . "ulas.tuerkmenatgmaildotcom"))])
+ (abridge-diff . [(20230307 2159) ((emacs (26 1))) "Abridge long line-based diff hunks, including in magit" tar ((:url . "https://github.com/jdtsmith/abridge-diff") (:commit . "31e0ccaa9d0bd4ad257f5de25cc3c0b3395fafa1") (:revdesc . "31e0ccaa9d0b") (:keywords "magit" "diffs" "tools") (:authors ("J.D. Smith" . "jdtsmithATgmail")) (:maintainers ("J.D. Smith" . "jdtsmithATgmail")) (:maintainer "J.D. Smith" . "jdtsmithATgmail"))])
+ (abs-mode . [(20260415 813) ((emacs (27 1)) (erlang (2 8)) (maude-mode (0 3)) (flymake (1 0)) (yasnippet (0 14 0))) "Major mode for the modeling language Abs" tar ((:url . "https://github.com/abstools/abs-mode") (:commit . "a4b8d0caa61db2f37b77e15055fad8324c35f4ae") (:revdesc . "a4b8d0caa61d") (:keywords "languages") (:authors ("Rudi Schlatte" . "rudi@constantly.at")) (:maintainers ("Rudi Schlatte" . "rudi@constantly.at")) (:maintainer "Rudi Schlatte" . "rudi@constantly.at"))])
+ (abyss-theme . [(20260125 1959) ((emacs (24))) "A dark theme with contrasting colours" tar ((:url . "https://github.com/mgrbyte/emacs-abyss-theme") (:commit . "6eb2b5735808ea96a36fc7abf741fc3bbf1b6ee4") (:revdesc . "6eb2b5735808") (:keywords "theme" "dark" "contrasting colours") (:authors ("Matt Russell" . "mgrbyte@member.fsf.org")) (:maintainers ("Matt Russell" . "mgrbyte@member.fsf.org")) (:maintainer "Matt Russell" . "mgrbyte@member.fsf.org"))])
+ (ac-alchemist . [(20150908 656) ((auto-complete (1 5 0)) (alchemist (1 5 0)) (cl-lib (0 5))) "Auto-complete source for alchemist" tar ((:url . "https://github.com/syohex/emacs-ac-alchemist") (:commit . "b1891c3d41aed83f61d78a609ea97be5cc2758d9") (:revdesc . "b1891c3d41ae") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (ac-c-headers . [(20200816 1007) ((auto-complete (1 3 1))) "Auto-complete source for C headers" tar ((:url . "http://zk-phi.gitub.io/") (:commit . "67e1e86a48c9bed57bc7ce5ce2553ad203f5752e") (:revdesc . "67e1e86a48c9"))])
+ (ac-capf . [(20151101 217) ((auto-complete (1 4)) (cl-lib (0 5))) "Auto-complete source with completion-at-point" tar ((:url . "https://github.com/syohex/emacs-ac-capf") (:commit . "17571dba0a8f98111f2ab758e9bea285b263781b") (:revdesc . "17571dba0a8f") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (ac-clang . [(20180710 546) ((emacs (24)) (cl-lib (0 5)) (auto-complete (1 4 0)) (pos-tip (0 4 6)) (yasnippet (0 8 0))) "Auto Completion source by libclang for GNU Emacs" tar ((:url . "https://github.com/yaruopooner/ac-clang") (:commit . "3294b968eb1a8317049190940193f9da47c085ef") (:revdesc . "3294b968eb1a") (:keywords "completion" "convenience" "intellisense"))])
+ (ac-dcd . [(20250925 946) ((auto-complete (1 3 1)) (flycheck-dmd-dub (0 7))) "Auto Completion source for dcd for GNU Emacs" tar ((:url . "https://github.com/atilaneves/ac-dcd") (:commit . "b95dfc61b9f2597e17f9a4a59b1745afd46a02d6") (:revdesc . "b95dfc61b9f2") (:keywords "languages") (:authors (nil . "atila.neves@gmail.com")) (:maintainers (nil . "atila.neves@gmail.com")) (:maintainer nil . "atila.neves@gmail.com"))])
+ (ac-emmet . [(20131015 1558) ((emmet-mode (1 0 2)) (auto-complete (1 4))) "Auto-complete sources for emmet-mode's snippets" tar ((:url . "https://github.com/yasuyk/ac-emmet") (:commit . "88f24876ee3b759978d4614a758280b5d512d543") (:revdesc . "88f24876ee3b") (:keywords "completion" "convenience" "emmet") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (ac-emoji . [(20150823 711) ((auto-complete (1 5 0)) (cl-lib (0 5))) "Auto-complete source of Emoji" tar ((:url . "https://github.com/syohex/emacs-ac-emoji") (:commit . "53677f754929ead403ccde64b714ebb6b8fc808e") (:revdesc . "53677f754929") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (ac-etags . [(20161001 1507) ((auto-complete (1 4))) "Etags/ctags completion source for auto-complete" tar ((:url . "https://github.com/syohex/emacs-ac-etags") (:commit . "7983e631c226fe0fa53af3b2d56bf4eca3d785ce") (:revdesc . "7983e631c226") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (ac-geiser . [(20200318 824) ((geiser (0 5)) (auto-complete (1 4))) "Auto-complete backend for geiser" tar ((:url . "https://github.com/xiaohanyu/ac-geiser") (:commit . "93818c936ee7e2f1ba1b315578bde363a7d43d05") (:revdesc . "93818c936ee7"))])
+ (ac-haskell-process . [(20150423 1402) ((auto-complete (1 4)) (haskell-mode (13))) "Haskell auto-complete source which uses the current haskell process" tar ((:url . "https://github.com/purcell/ac-haskell-process") (:commit . "0362d4323511107ec70e7165cb612f3ab01b712f") (:revdesc . "0362d4323511") (:keywords "languages") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (ac-helm . [(20160319 233) ((helm (1 6 3)) (auto-complete (1 4 0)) (popup (0 5 0)) (cl-lib (0 5))) "Helm interface for auto-complete" tar ((:url . "https://github.com/yasuyk/ac-helm") (:commit . "baf2b1e04bcffa835084389c0fab415f26efbf32") (:revdesc . "baf2b1e04bcf") (:keywords "completion" "convenience" "helm") (:authors ("rubikitch" . "rubikitch@ruby-lang.org") ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (ac-html . [(20151005 731) ((auto-complete (1 4)) (s (1 9)) (f (0 17)) (dash (2 10))) "Auto complete source for html tags and attributes" tar ((:url . "https://github.com/cheunghy/ac-html") (:commit . "3de94a46d8cb93e8e62a1b6bdebbde4d65dc7cc2") (:revdesc . "3de94a46d8cb") (:keywords "html" "auto-complete" "slim" "haml" "jade") (:authors ("Zhang Kai Yu" . "yeannylam@gmail.com")) (:maintainers ("Zhang Kai Yu" . "yeannylam@gmail.com")) (:maintainer "Zhang Kai Yu" . "yeannylam@gmail.com"))])
+ (ac-html-angular . [(20151225 719) ((web-completion-data (0 1))) "Auto complete angular15 data for `ac-html' and `company-web'" tar ((:url . "https://github.com/osv/ac-html-bootstrap") (:commit . "6bafe09afe03112ca4183d58461c1a6f6c2b3c67") (:revdesc . "6bafe09afe03") (:keywords "html" "auto-complete" "angular") (:authors ("Olexandr Sydorchuk" . "olexandr.syd@gmail.com")) (:maintainers ("Olexandr Sydorchuk" . "olexandr.syd@gmail.com")) (:maintainer "Olexandr Sydorchuk" . "olexandr.syd@gmail.com"))])
+ (ac-html-bootstrap . [(20160302 1701) ((web-completion-data (0 1))) "Auto complete bootstrap3/fontawesome classes for `ac-html' and `company-web'" tar ((:url . "https://github.com/osv/ac-html-bootstrap") (:commit . "481e6e441cd566554ce71cd8cb28c9e7ebb1c24b") (:revdesc . "481e6e441cd5") (:keywords "html" "auto-complete" "bootstrap" "cssx") (:authors ("Olexandr Sydorchuk" . "olexandr.syd@gmail.com")) (:maintainers ("Olexandr Sydorchuk" . "olexandr.syd@gmail.com")) (:maintainer "Olexandr Sydorchuk" . "olexandr.syd@gmail.com"))])
+ (ac-html-csswatcher . [(20151208 2113) ((web-completion-data (0 1))) "Css/less class/id completion with `ac-html' or `company-web'" tar ((:url . "https://github.com/osv/ac-html-csswatcher") (:commit . "b0f3e7e1a3fe49e88b6eb6432377232fc715f221") (:revdesc . "b0f3e7e1a3fe") (:keywords "html" "css" "less" "auto-complete") (:authors ("Olexandr Sydorchuck" . "olexandr.syd@gmail.com")) (:maintainers ("Olexandr Sydorchuck" . "olexandr.syd@gmail.com")) (:maintainer "Olexandr Sydorchuck" . "olexandr.syd@gmail.com"))])
+ (ac-inf-ruby . [(20131115 1150) ((inf-ruby (2 3 2)) (auto-complete (1 4))) "Enable auto-complete in inf-ruby sessions" tar ((:url . "https://github.com/purcell/ac-inf-ruby") (:commit . "094d86761088ab0b16ddac75cf57eeb9c2afbee2") (:revdesc . "094d86761088") (:keywords "languages" "tools") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (ac-ispell . [(20151101 226) ((auto-complete (1 4)) (cl-lib (0 5))) "Ispell completion source for auto-complete" tar ((:url . "https://github.com/syohex/emacs-ac-ispell") (:commit . "7e054793fe77f5fa1ced59d97da9c31df9807c48") (:revdesc . "7e054793fe77") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (ac-js2 . [(20190101 933) ((js2-mode (20090723)) (skewer-mode (1 4))) "Auto-complete source for Js2-mode, with navigation" tar ((:url . "https://github.com/ScottyB/ac-js2") (:commit . "2b56d09a16c1a0ce514cc1b85d64cb1be4502723") (:revdesc . "2b56d09a16c1") (:authors ("Scott Barnett" . "scott.n.barnett@gmail.com")) (:maintainers ("Scott Barnett" . "scott.n.barnett@gmail.com")) (:maintainer "Scott Barnett" . "scott.n.barnett@gmail.com"))])
+ (ac-math . [(20141116 2127) ((auto-complete (1 4)) (math-symbol-lists (1 0))) "Auto-complete sources for input of mathematical symbols and latex tags" tar ((:url . "https://github.com/vitoshka/ac-math") (:commit . "89478063dead68894f0d27687b63896633048c6f") (:revdesc . "89478063dead") (:keywords "latex" "auto-complete" "unicode" "symbols"))])
+ (ac-mozc . [(20150227 1619) ((cl-lib (0 5)) (auto-complete (1 4)) (mozc (0))) "Auto-complete sources for Japanese input using Mozc" tar ((:url . "https://github.com/igjit/ac-mozc") (:commit . "4c6c8be4701010d9362184437c0f783e0335c631") (:revdesc . "4c6c8be47010") (:authors ("igjit" . "igjit1@gmail.com")) (:maintainers ("igjit" . "igjit1@gmail.com")) (:maintainer "igjit" . "igjit1@gmail.com"))])
+ (ac-octave . [(20180406 334) ((auto-complete (1 4 0))) "An auto-complete source for Octave" tar ((:url . "https://github.com/coldnew/ac-octave") (:commit . "fe0f931f2024f43de3c4fff4b1ace672413adeae") (:revdesc . "fe0f931f2024") (:keywords "octave" "auto-complete" "completion") (:authors ("coldnew" . "coldnew.tw@gmail.com")) (:maintainers ("coldnew" . "coldnew.tw@gmail.com")) (:maintainer "coldnew" . "coldnew.tw@gmail.com"))])
+ (ac-php . [(20240328 1036) ((ac-php-core (2 0)) (auto-complete (1 4 0)) (yasnippet (0 8 0))) "Auto Completion source for PHP" tar ((:url . "https://github.com/xcwen/ac-php") (:commit . "a69ae4a12e40900619b4e5a1613fd449aef649c3") (:revdesc . "a69ae4a12e40") (:keywords "completion" "convenience" "intellisense") (:authors ("jim" . "xcwenn@qq.com")))])
+ (ac-php-core . [(20260817 501) ((emacs (24 4)) (dash (1)) (php-mode (1)) (s (1)) (f (0 17 0)) (popup (0 5 0)) (xcscope (1 0))) "The core library of the ac-php" tar ((:url . "https://github.com/xcwen/ac-php") (:commit . "8d9354f2f851d087cf11a95f98a0e65f8203f065") (:revdesc . "8d9354f2f851") (:keywords "completion" "convenience" "intellisense") (:authors ("jim" . "xcwenn@qq.com") ("Serghei Iakovlev" . "sadhooklay@gmail.com")))])
+ (ac-racer . [(20170114 809) ((emacs (24 3)) (auto-complete (1 5 0)) (racer (0 0 2))) "Auto-complete source of racer" tar ((:url . "https://github.com/syohex/emacs-ac-racer") (:commit . "4408c2d652dec0432e20c05e001db8222d778c6b") (:revdesc . "4408c2d652de") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (ac-rtags . [(20191222 920) ((auto-complete (1 4 0)) (rtags (2 10))) "Auto-complete back-end for RTags" tar ((:url . "https://github.com/Andersbakken/rtags") (:commit . "595055b5316a7c92ba1d638f324f98842a0f41a5") (:revdesc . "595055b5316a") (:authors ("Jan Erik Hanssen" . "jhanssen@gmail.com") ("Anders Bakken" . "agbakken@gmail.com")) (:maintainers ("Jan Erik Hanssen" . "jhanssen@gmail.com") ("Anders Bakken" . "agbakken@gmail.com")) (:maintainer "Jan Erik Hanssen" . "jhanssen@gmail.com"))])
+ (ac-skk . [(20141230 119) ((auto-complete (1 3 1)) (ddskk (16 0 50)) (tinysegmenter (0)) (cl-lib (0 5))) "Auto-complete-mode source for DDSKK a.k.a Japanese input method" tar ((:url . "https://github.com/myuhe/ac-skk.el") (:commit . "d25a265930430d080329789fb253d786c01dfa24") (:revdesc . "d25a26593043") (:keywords "convenience" "auto-complete") (:authors ("lugecy" . "https://twitter.com/lugecy")))])
+ (ac-slime . [(20171027 2100) ((auto-complete (1 4)) (slime (2 9)) (cl-lib (0 5))) "An auto-complete source using slime completions" tar ((:url . "https://github.com/purcell/ac-slime") (:commit . "a91f664510d3da24b02e87e4aa59d049483a6529") (:revdesc . "a91f664510d3") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (ac-sly . [(20170728 1027) ((sly (1 0 0 -3)) (auto-complete (1 4)) (cl-lib (0 5))) "An auto-complete source using sly completions" tar ((:url . "https://github.com/qoocku/ac-sly") (:commit . "bf69c687c4ecf1994349d20c182e9b567399912e") (:revdesc . "bf69c687c4ec") (:authors ("Damian T. Dobroczy\\'nski" . "qoocku@gmail.com")) (:maintainers ("Damian T. Dobroczy\\'nski" . "qoocku@gmail.com")) (:maintainer "Damian T. Dobroczy\\'nski" . "qoocku@gmail.com"))])
+ (academic-phrases . [(20180723 1021) ((dash (2 12 0)) (s (1 12 0)) (ht (2 0)) (emacs (24))) "Bypass that mental block when writing your papers" tar ((:url . "https://github.com/nashamri/academic-phrases") (:commit . "25d9cf67feac6359cb213f061735e2679c84187f") (:revdesc . "25d9cf67feac") (:keywords "academic" "convenience" "papers" "writing" "wp") (:authors ("Nasser Alshammari" . "designernasser@gmail.com")) (:maintainers ("Nasser Alshammari" . "designernasser@gmail.com")) (:maintainer "Nasser Alshammari" . "designernasser@gmail.com"))])
+ (accent . [(20250210 906) ((emacs (24 3)) (popup (0 5 8))) "Popup for accented characters (diacritics)" tar ((:url . "https://github.com/elias94/accent") (:commit . "d613700dc4159692f5c30dc5f241c9de41bbb1dc") (:revdesc . "d613700dc415") (:keywords "i18n") (:authors ("Elia Scotto" . "eliascotto94@gmail.com")) (:maintainers ("Elia Scotto" . "eliascotto94@gmail.com")) (:maintainer "Elia Scotto" . "eliascotto94@gmail.com"))])
+ (ace-flyspell . [(20170309 509) ((avy (0 4 0))) "Jump to and correct spelling errors using `ace-jump-mode' and flyspell" tar ((:commit . "538d4f8508d305262ba0228dfe7c819fb65b53c9") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com") (:keywords "extensions") (:url . "https://github.com/cute-jumper/ace-flyspell"))])
+ (ace-isearch . [(20220809 1748) ((emacs (24))) "A seamless bridge between isearch, ace-jump-mode, avy, helm-swoop and swiper" tar ((:url . "https://github.com/tam17aki/ace-isearch") (:commit . "a24bfc626100f183dbad016bd7723eb12e238534") (:revdesc . "a24bfc626100"))])
+ (ace-jump-buffer . [(20171031 1550) ((avy (0 4 0)) (dash (2 4 0))) "Fast buffer switching extension to `avy'" tar ((:url . "https://github.com/waymondo/ace-jump-buffer") (:commit . "ae5be0415c823f7bb66833aa4af2180d4cf99cef") (:revdesc . "ae5be0415c82") (:authors ("Justin Talbott" . "justin@waymondo.com")) (:maintainers ("Justin Talbott" . "justin@waymondo.com")) (:maintainer "Justin Talbott" . "justin@waymondo.com"))])
+ (ace-jump-helm-line . [(20160918 1836) ((avy (0 4 0)) (helm (1 6 3))) "Ace-jump to a candidate in helm window" tar ((:url . "https://github.com/cute-jumper/ace-jump-helm-line") (:commit . "1483055255df3f8ae349f7520f05b1e43ea3ed37") (:revdesc . "1483055255df") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (ace-jump-mode . [(20140616 815) nil "A quick cursor location minor mode for emacs" tar ((:url . "https://github.com/winterTTr/ace-jump-mode/") (:commit . "8351e2df4fbbeb2a4003f2fb39f46d33803f3dac") (:revdesc . "8351e2df4fbb") (:keywords "motion" "location" "cursor") (:authors ("winterTTr" . "winterTTr@gmail.com")) (:maintainers ("winterTTr" . "winterTTr@gmail.com")) (:maintainer "winterTTr" . "winterTTr@gmail.com"))])
+ (ace-jump-zap . [(20170717 1849) ((ace-jump-mode (1 0)) (dash (2 10 0))) "Character zapping, `ace-jump-mode` style" tar ((:url . "https://github.com/waymondo/ace-jump-zap") (:commit . "52b5d4c6c73bd0fc833a0dcb4e803a5287d8cae8") (:revdesc . "52b5d4c6c73b") (:keywords "convenience" "tools" "extensions") (:authors ("justin talbott" . "justin@waymondo.com")) (:maintainers ("justin talbott" . "justin@waymondo.com")) (:maintainer "justin talbott" . "justin@waymondo.com"))])
+ (ace-link . [(20241101 1344) ((avy (0 4 0))) "Quickly follow links" tar ((:url . "https://github.com/abo-abo/ace-link") (:commit . "d9bd4a25a02bdfde4ea56247daf3a9ff15632ea4") (:revdesc . "d9bd4a25a02b") (:keywords "convenience" "links" "avy") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (ace-mc . [(20190206 749) ((ace-jump-mode (1 0)) (multiple-cursors (1 0)) (dash (2 10 0))) "Add multiple cursors quickly using ace jump" tar ((:url . "https://github.com/mm--/ace-mc") (:commit . "6877880efd99e177e4e9116a364576def3da391b") (:revdesc . "6877880efd99") (:keywords "motion" "location" "cursor") (:authors ("Josh Moller-Mara" . "jmm@cns.nyu.edu")) (:maintainers ("Josh Moller-Mara" . "jmm@cns.nyu.edu")) (:maintainer "Josh Moller-Mara" . "jmm@cns.nyu.edu"))])
+ (ace-pinyin . [(20210827 355) ((avy (0 2 0)) (pinyinlib (0 1 0))) "Jump to Chinese characters using avy or ace-jump-mode" tar ((:url . "https://github.com/cute-jumper/ace-pinyin") (:commit . "47662c0b05775ba353464b44c0f1a037c85e746e") (:revdesc . "47662c0b0577") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (ace-popup-menu . [(20260802 938) ((emacs (24 4)) (avy-menu (0 1))) "Replace GUI popup menu with something more efficient" tar ((:url . "https://github.com/mrkkrp/ace-popup-menu") (:commit . "b86a26be8edc8b0e71f971f2201cfff71084e983") (:revdesc . "b86a26be8edc") (:keywords "convenience" "popup" "menu") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (ace-window . [(20220911 358) ((avy (0 5 0))) "Quickly switch windows" tar ((:url . "https://github.com/abo-abo/ace-window") (:commit . "77115afc1b0b9f633084cf7479c767988106c196") (:revdesc . "77115afc1b0b") (:keywords "window" "location") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (achievements . [(20240703 318) ((keyfreq (0 0 3))) "Achievements for emacs usage" tar ((:url . "https://gitlab.com/gvol/emacs-achievements") (:commit . "c229d21ad5d1e13be08e087ab498800b2b9b7c97") (:revdesc . "c229d21ad5d1") (:keywords "games") (:authors ("Ivan Andrus" . "darthandrus@gmail.com")) (:maintainers ("Ivan Andrus" . "darthandrus@gmail.com")) (:maintainer "Ivan Andrus" . "darthandrus@gmail.com"))])
+ (ack-menu . [(20150504 2022) ((mag-menu (0 1 0))) "A menu-based front-end for ack" tar ((:url . "https://github.com/chumpage/ack-menu") (:commit . "f77be93a4697926ecf3195a355eb69580f695f4d") (:revdesc . "f77be93a4697") (:keywords "tools" "matching" "convenience"))])
+ (acme-theme . [(20210430 302) nil "A color theme based on Acme & Sam from Plan 9" tar ((:url . "https://github.com/ianpan870102/acme-emacs-theme") (:commit . "ae8788b5851ea353fbb80ab586a3bbd5dc8e91aa") (:revdesc . "ae8788b5851e"))])
+ (acp . [(20260821 1448) ((emacs (28 1))) "An ACP (Agent Client Protocol) implementation" tar ((:url . "https://github.com/xenodium/acp.el") (:commit . "4d7d58dc39870e9390e94617e13d7ada175d7945") (:revdesc . "4d7d58dc3987"))])
+ (act-mode . [(20240718 39) ((emacs (26 1))) "Major mode for the ACT programming language" tar ((:url . "https://github.com/rafaelcn/act") (:commit . "90d7d626691591b24d83596149bc89fd51ba39b4") (:revdesc . "90d7d6266915") (:authors ("Rafael Campos Nunes" . "rcamposnunes@outlook.com")) (:maintainers ("Rafael Campos Nunes" . "rcamposnunes@outlook.com")) (:maintainer "Rafael Campos Nunes" . "rcamposnunes@outlook.com"))])
+ (actionscript-mode . [(20180527 1701) nil "A simple mode for editing Actionscript 3 files" tar ((:url . "https://codeberg.org/austinhaas/actionscript-mode") (:commit . "65abd58e198458a8e46748c5962c41d80d60c4ea") (:revdesc . "65abd58e1984") (:keywords "language" "modes"))])
+ (activity-watch-mode . [(20260311 835) ((emacs (25)) (request (0)) (json (0)) (cl-lib (0))) "Automatic time tracking extension" tar ((:url . "https://github.com/pauldub/activity-watch-mode") (:commit . "1a950ad310cbd0511bb01744b20c7012a1c0b0e8") (:revdesc . "1a950ad310cb") (:keywords "calendar" "comm") (:authors ("Gabor Torok" . "gabor@20y.hu") ("Alan Hamlett" . "alan@wakatime.com")) (:maintainers ("Paul d'Hubert" . "paul.dhubert@ya.ru")) (:maintainer "Paul d'Hubert" . "paul.dhubert@ya.ru"))])
+ (acton-mode . [(20250113 1059) ((emacs (25 1))) "Major mode for editing Acton source code" tar ((:url . "https://github.com/actonlang/acton-mode") (:commit . "5a1a8509fb84dad4f8a02da47519ed7399c26d7f") (:revdesc . "5a1a8509fb84") (:keywords "languages" "programming"))])
+ (ada-ts-mode . [(20260627 1553) ((emacs (29 1))) "Major mode for Ada using Tree-sitter" tar ((:url . "https://github.com/brownts/ada-ts-mode") (:commit . "32fcf68dba7463902481b256cdecad08e4b5b0a7") (:revdesc . "32fcf68dba74") (:keywords "ada" "languages" "tree-sitter") (:authors ("Troy Brown" . "brownts@troybrown.dev")) (:maintainers ("Troy Brown" . "brownts@troybrown.dev")) (:maintainer "Troy Brown" . "brownts@troybrown.dev"))])
+ (adafruit-wisdom . [(20200217 306) ((emacs (25 1)) (request (0 3 1))) "Get/display adafruit.com quotes" tar ((:url . "https://github.com/gonewest818/adafruit-wisdom.el") (:commit . "c4ae0db35d0be94f0e9c50977758224d7e00234a") (:revdesc . "c4ae0db35d0b") (:keywords "games") (:authors ("Neil Okamoto" . "neil.okamoto+melpa@gmail.com")) (:maintainers ("Neil Okamoto" . "neil.okamoto+melpa@gmail.com")) (:maintainer "Neil Okamoto" . "neil.okamoto+melpa@gmail.com"))])
+ (add-hooks . [(20171217 123) nil "Functions for setting multiple hooks" tar ((:url . "https://github.com/nickmccurdy/add-hooks") (:commit . "1845137703461fc44bd77cf24014ba58f19c369d") (:revdesc . "184513770346") (:keywords "lisp") (:authors ("Nick McCurdy" . "nick@nickmccurdy.com")) (:maintainers ("Nick McCurdy" . "nick@nickmccurdy.com")) (:maintainer "Nick McCurdy" . "nick@nickmccurdy.com"))])
+ (add-node-modules-path . [(20230307 655) ((s (1 12 0))) "Add node_modules to your exec-path" tar ((:url . "https://github.com/codesuki/add-node-modules-path") (:commit . "841e93dfed50448da66c89a977c9182bb18796a1") (:revdesc . "841e93dfed50") (:keywords "javascript" "node" "node_modules" "eslint") (:authors ("Neri Marschik" . "marschik_neri@cyberagent.co.jp")) (:maintainers ("Neri Marschik" . "marschik_neri@cyberagent.co.jp")) (:maintainer "Neri Marschik" . "marschik_neri@cyberagent.co.jp"))])
+ (addressbook-bookmark . [(20260105 453) ((emacs (24))) "An address book based on Standard Emacs bookmarks" tar ((:url . "https://github.com/thierryvolpiatto/addressbook-bookmark") (:commit . "469faa4206e6503d9c045fecb2ec0af8e1dcf504") (:revdesc . "469faa4206e6") (:authors ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainers ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainer "Thierry Volpiatto" . "thievol@posteo.net"))])
+ (ado-mode . [(20260210 1431) ((emacs (25 1))) "Major mode for editing Stata-related files" tar ((:url . "https://github.com/louabill/ado-mode") (:commit . "371441d27027fd4783a8c828458a5af098babca4") (:revdesc . "371441d27027") (:keywords "tools" "languages" "files" "convenience" "stata" "mata" "ado") (:authors ("Bill Rising" . "brising@alum.mit.edu")) (:maintainers ("Bill Rising" . "brising@alum.mit.edu")) (:maintainer "Bill Rising" . "brising@alum.mit.edu"))])
+ (adoc-mode . [(20260612 638) ((emacs (28 1))) "A major-mode for editing AsciiDoc files" tar ((:url . "https://github.com/bbatsov/adoc-mode") (:commit . "5c1484b8982845845ccd0be02629e21f1d5bed81") (:revdesc . "5c1484b89828") (:keywords "asciidoc" "text") (:authors ("Florian Kaufmann" . "sensorflo@gmail.com")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (advent-mode . [(20260209 1903) ((emacs (29 1))) "Advent of Code mode" tar ((:url . "https://github.com/vkazanov/advent-mode") (:commit . "68c149aad8e5844d87fbf5f703479cded641ef49") (:revdesc . "68c149aad8e5") (:keywords "lisp") (:authors ("Vladimir Kazanov" . "@vkazanov")) (:maintainers ("Vladimir Kazanov" . "@vkazanov")) (:maintainer "Vladimir Kazanov" . "@vkazanov"))])
+ (adwaita-dark-theme . [(20231209 1033) ((emacs (27 1))) "A dark color scheme inspired by Adwaita" tar ((:url . "https://gitlab.com/jessieh/adwaita-dark-theme") (:commit . "04fed0ef795bfe2482998c5b6f87c37c13fe8c50") (:revdesc . "04fed0ef795b") (:keywords "mode-line" "faces") (:authors ("Jessie Hildebrandt" . "jessieh.net")) (:maintainers ("Jessie Hildebrandt" . "jessieh.net")) (:maintainer "Jessie Hildebrandt" . "jessieh.net"))])
+ (aes . [(20211204 2348) ((emacs (26 1))) "Implementation of AES" tar ((:url . "https://github.com/Sauermann/emacs-aes") (:commit . "c9cd12d6c1dbc18603eb4703276132cea59d5c78") (:revdesc . "c9cd12d6c1db") (:keywords "data" "tools") (:authors ("Markus Sauermann" . "emacs-aes@sauermann-consulting.de")) (:maintainers ("Markus Sauermann" . "emacs-aes@sauermann-consulting.de")) (:maintainer "Markus Sauermann" . "emacs-aes@sauermann-consulting.de"))])
+ (affe . [(20260519 1026) ((emacs (29 1)) (consult (2 8))) "Asynchronous Fuzzy Finder for Emacs" tar ((:url . "https://github.com/minad/affe") (:commit . "ccc6e4dc3dc7c87bdd4733d174274f4710f9e99e") (:revdesc . "ccc6e4dc3dc7") (:keywords "matching" "files" "completion") (:authors ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (afterglow . [(20240312 953) ((emacs (26 1))) "Temporary Highlighting after Function Calls" tar ((:url . "https://github.com/ernstvanderlinden/emacs-afterglow") (:commit . "d90fcf4e5c8ac6f5bae2eb01dea32558b2b18fba") (:revdesc . "d90fcf4e5c8a") (:keywords "highlight" "line" "convenience" "evil") (:authors ("Ernest M. van der Linden" . "hello@ernestoz.com")) (:maintainers ("Ernest M. van der Linden" . "hello@ernestoz.com")) (:maintainer "Ernest M. van der Linden" . "hello@ernestoz.com"))])
+ (afternoon-theme . [(20140104 1859) ((emacs (24 1))) "Dark color theme with a deep blue background" tar ((:url . "https://github.com/osener/emacs-afternoon-theme") (:commit . "89b1d778a1f8b385775c122f2bd1c62f0fbf931a") (:revdesc . "89b1d778a1f8") (:keywords "themes") (:authors ("Ozan Sener" . "ozan@ozansener.com")) (:maintainers ("Ozan Sener" . "ozan@ozansener.com")) (:maintainer "Ozan Sener" . "ozan@ozansener.com"))])
+ (ag . [(20201031 2202) ((dash (2 8 0)) (s (1 9 0)) (cl-lib (0 5))) "A front-end for ag ('the silver searcher'), the C ack replacement" tar ((:url . "https://github.com/Wilfred/ag.el") (:commit . "ed7e32064f92f1315cecbfc43f120bbc7508672c") (:revdesc . "ed7e32064f92") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (agda-editor-tactics . [(20211024 2357) ((s (1 12 0)) (dash (2 16 0)) (emacs (27 1)) (org (9 1))) "An editor tactic to produce Σ-types from Agda records" tar ((:url . "https://github.com/alhassy/next-700-module-systems") (:commit . "06e374516cb2ab17018985f3dc4fccdc4acefd08") (:revdesc . "06e374516cb2") (:keywords "abbrev" "convenience" "languages" "agda" "tools") (:authors ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainers ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainer "Musa Al-hassy" . "alhassy@gmail.com"))])
+ (agda-lib-mode . [(20251013 2307) ((emacs (24 3))) "Major mode for Agda library files" tar ((:url . "https://codeberg.org/heraplem/agda-lib-mode") (:commit . "1cf7d486753887736eef6cae2688b2a05f9c1854") (:revdesc . "1cf7d4867538") (:keywords "text") (:authors ("Nicholas Coltharp" . "mail@heraplem.xyz")) (:maintainers ("Nicholas Coltharp" . "mail@heraplem.xyz")) (:maintainer "Nicholas Coltharp" . "mail@heraplem.xyz"))])
+ (age . [(20250806 1723) ((emacs (28 1))) "The Age Encryption Library" tar ((:url . "https://github.com/anticomputer/age.el") (:commit . "e99165ef5274bc4512b8d77ba2ac208c59b5d456") (:revdesc . "e99165ef5274") (:keywords "data") (:authors ("Daiki Ueno" . "ueno@unixuser.org") ("Bas Alberts" . "bas@anti.computer")) (:maintainers ("Bas Alberts" . "bas@anti.computer")) (:maintainer "Bas Alberts" . "bas@anti.computer"))])
+ (agenix . [(20250209 551) ((emacs (27 1))) "Decrypt and encrypt agenix secrets" tar ((:url . "https://github.com/t4ccer/agenix.el") (:commit . "36ad60f0b7f2a12b730c6f568fcfd4daf2581158") (:revdesc . "36ad60f0b7f2") (:authors ("Tomasz Maciosowski" . "t4ccer@gmail.com")) (:maintainers ("Tomasz Maciosowski" . "t4ccer@gmail.com")) (:maintainer "Tomasz Maciosowski" . "t4ccer@gmail.com"))])
+ (agent-recall . [(20260821 1916) ((emacs (29 1)) (agent-shell (0 1 0))) "Search and browse agent-shell conversation transcripts" tar ((:url . "https://github.com/Marx-A00/agent-recall") (:commit . "8c9cfc200a5c08bffd6d9415f2719382cf481640") (:revdesc . "8c9cfc200a5c") (:keywords "tools" "convenience" "ai") (:authors ("Marcos Andrade" . "https://github.com/Marx-A00")) (:maintainers ("Marcos Andrade" . "https://github.com/Marx-A00")) (:maintainer "Marcos Andrade" . "https://github.com/Marx-A00"))])
+ (agent-shell . [(20260823 1937) ((emacs (29 1)) (shell-maker (0 97 2)) (acp (0 13 1))) "Native agentic integrations for Claude Code, Gemini CLI, etc" tar ((:url . "https://github.com/xenodium/agent-shell") (:commit . "2fff5b8d9af971b1ea209f811bd7410be647d79e") (:revdesc . "2fff5b8d9af9"))])
+ (aggressive-fill-paragraph . [(20240213 2320) ((dash (2 10 0))) "A mode to automatically keep paragraphs filled" tar ((:url . "https://github.com/davidshepherd7/aggressive-fill-paragraph-mode") (:commit . "60e4eb5c57d4408e811d12c6b6491b8c89dfa695") (:revdesc . "60e4eb5c57d4") (:keywords "fill-paragraph" "automatic" "comments") (:authors ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainers ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainer "David Shepherd" . "davidshepherd7@gmail.com"))])
+ (aggressive-indent . [(20230112 1300) ((emacs (24 3))) "Minor mode to aggressively keep your code always indented" tar ((:url . "https://github.com/Malabarba/aggressive-indent-mode") (:commit . "a437a45868f94b77362c6b913c5ee8e67b273c42") (:revdesc . "a437a45868f9") (:keywords "indent" "lisp" "maint" "tools") (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainers ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com"))])
+ (agitjo . [(20260523 2048) ((emacs (30 1)) (magit (4 3 8)) (markdown-mode (2 7)) (transient (0 9 1))) "Manage Forgejo PRs with AGit-Flow" tar ((:url . "https://codeberg.org/halvin/agitjo") (:commit . "fa9737479f44c62f76e2dc6561ffb340d8eead3e") (:revdesc . "fa9737479f44") (:keywords "convenience" "vc" "tools") (:authors ("Alvin Hsu" . "aurtzy@gmail.com")) (:maintainers ("Alvin Hsu" . "aurtzy@gmail.com")) (:maintainer "Alvin Hsu" . "aurtzy@gmail.com"))])
+ (agtags . [(20250523 1654) ((emacs (25))) "A frontend to GNU Global" tar ((:url . "https://github.com/vietor/agtags") (:commit . "afb45864557fe08570ee26b7bc7bf9197a6a7538") (:revdesc . "afb45864557f") (:keywords "tools" "convenience") (:authors ("Vietor Liu" . "vietor.liu@gmail.com")) (:maintainers ("Vietor Liu" . "vietor.liu@gmail.com")) (:maintainer "Vietor Liu" . "vietor.liu@gmail.com"))])
+ (ah . [(20220730 1058) ((emacs (25 1))) "Additional hooks" tar ((:url . "https://github.com/takaxp/ah") (:commit . "8e12223f0f423e7fa882cc049a25af6db755902d") (:revdesc . "8e12223f0f42") (:keywords "convenience") (:authors ("Takaaki ISHIKAWA" . "takaxpatieeedotorg")) (:maintainers ("Takaaki ISHIKAWA" . "takaxpatieeedotorg")) (:maintainer "Takaaki ISHIKAWA" . "takaxpatieeedotorg"))])
+ (ahg . [(20241113 748) nil "Alberto's Emacs interface for Mercurial (Hg)" tar ((:url . "https://bitbucket.org/agriggio/ahg") (:commit . "d57b91d52e5c2c501cb7112af53c6549397ea1b5") (:revdesc . "d57b91d52e5c") (:authors ("Alberto Griggio" . "agriggio@users.sourceforge.net")) (:maintainers ("Alberto Griggio" . "agriggio@users.sourceforge.net")) (:maintainer "Alberto Griggio" . "agriggio@users.sourceforge.net"))])
+ (ahk-mode . [(20200412 1832) ((emacs (24 3))) "Major mode for editing AHK (AutoHotkey and AutoHotkey_L)" tar ((:url . "https://github.com/ralesi/ahk-mode") (:commit . "729007b5f22a49f5187ff47fca18c0d674e73047") (:revdesc . "729007b5f22a") (:keywords "ahk" "autohotkey" "hotkey" "keyboard shortcut" "automation"))])
+ (ahungry-theme . [(20180131 328) ((emacs (24))) "Ahungry color theme for Emacs.  Make sure to (load-theme 'ahungry)" tar ((:url . "https://github.com/ahungry/color-theme-ahungry") (:commit . "a038d91ec593d1f1b19ca66a0576d59bbc24c523") (:revdesc . "a038d91ec593") (:keywords "ahungry" "palette" "color" "theme" "emacs" "color-theme" "deftheme") (:authors ("Matthew Carter" . "m@ahungry.com")) (:maintainers ("Matthew Carter" . "m@ahungry.com")) (:maintainer "Matthew Carter" . "m@ahungry.com"))])
+ (ai-code . [(20260825 1604) ((emacs (29 1)) (transient (0 9 0)) (magit (2 1 0))) "Unified interface for AI coding backends such as Codex CLI, Antigravity CLI, Claude Code, Opencode, etc" tar ((:url . "https://github.com/tninja/ai-code-interface.el") (:commit . "e9d19814be477e5bb27798a0d14ef8b653a6c38d") (:revdesc . "e9d19814be47") (:authors ("Kang Tu" . "tninja@gmail.com")) (:maintainers ("Kang Tu" . "tninja@gmail.com")) (:maintainer "Kang Tu" . "tninja@gmail.com"))])
+ (aider . [(20251201 133) ((emacs (26 1)) (transient (0 9 0)) (magit (2 1 0)) (markdown-mode (2 5)) (s (1 13 0))) "AI assisted programming with Aider and LLM" tar ((:url . "https://github.com/tninja/aider.el") (:commit . "5c2c093f20e14ca5f47ebbb35d4e198550f9fffc") (:revdesc . "5c2c093f20e1") (:keywords "ai" "gpt" "sonnet" "llm" "aider" "gemini-pro" "deepseek" "ai-assisted-coding") (:authors ("Kang Tu" . "tninja@gmail.com")) (:maintainers ("Kang Tu" . "tninja@gmail.com")) (:maintainer "Kang Tu" . "tninja@gmail.com"))])
+ (aidermacs . [(20260826 1614) ((emacs (26 1)) (transient (0 3 0)) (compat (30 0 2 0)) (markdown-mode (2 7))) "AI pair programming with Aider" tar ((:url . "https://github.com/MatthewZMD/aidermacs") (:commit . "d6f0489efba1ecbf70f2db9ae7ee0c64eb7d98df") (:revdesc . "d6f0489efba1") (:keywords "ai" "emacs" "llm" "aider" "ai-pair-programming" "tools") (:authors ("Mingde Zeng" . "matthewzmd@posteo.net")) (:maintainers ("Mingde Zeng" . "matthewzmd@posteo.net")) (:maintainer "Mingde Zeng" . "matthewzmd@posteo.net"))])
+ (aidev-mode . [(20250318 2144) ((emacs (27 1)) (request (0 3 2))) "Minor mode for AI-assisted development" tar ((:url . "https://github.com/inaimathi/aidev-mode") (:commit . "5a71b7ddc43be3629e2c2928e349fee78099989f") (:revdesc . "5a71b7ddc43b") (:keywords "tools" "convenience" "ai") (:authors ("inaimathi" . "leo.zovic@example.com")) (:maintainers ("inaimathi" . "leo.zovic@example.com")) (:maintainer "inaimathi" . "leo.zovic@example.com"))])
+ (aiken-mode . [(20230920 1210) ((emacs (26 1))) "Major mode for Aiken" tar ((:url . "https://github.com/aiken-lang/aiken-mode") (:commit . "1af54e4df02eb52cf62034acbe1c6dd54776d843") (:revdesc . "1af54e4df02e") (:keywords "languages" "aiken") (:authors ("Sebastian Nagel" . "sebastian.nagel@ncoding.at")) (:maintainers ("Sebastian Nagel" . "sebastian.nagel@ncoding.at")) (:maintainer "Sebastian Nagel" . "sebastian.nagel@ncoding.at"))])
+ (aio . [(20260214 1529) ((emacs (26 1))) "Async/await for Emacs Lisp" tar ((:url . "https://github.com/skeeto/emacs-aio") (:commit . "0e94a06bb035953cbbb4242568b38ca15443ad4c") (:revdesc . "0e94a06bb035") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainer "Christopher Wellons" . "wellons@nullprogram.com"))])
+ (airline-themes . [(20250502 1915) ((powerline (2 3))) "Vim-airline themes for emacs powerline" tar ((:url . "https://github.com/AnthonyDiGirolamo/airline-themes") (:commit . "827a2dae106ecf1fb14793c43f13c4a6cd045c9a") (:revdesc . "827a2dae106e") (:keywords "evil" "mode-line" "powerline" "airline" "themes") (:authors ("Anthony DiGirolamo" . "anthony.digirolamo@gmail.com")) (:maintainers ("Anthony DiGirolamo" . "anthony.digirolamo@gmail.com")) (:maintainer "Anthony DiGirolamo" . "anthony.digirolamo@gmail.com"))])
+ (airplay . [(20130212 1226) ((request (20130110 2144)) (simple-httpd (1 4 1)) (deferred (0 3 1))) "Airplay bindings to Emacs" tar ((:url . "https://github.com/gongo/airplay-el") (:commit . "46fad71d293a3e18551cf464fe6c6208a7a32d9d") (:revdesc . "46fad71d293a") (:keywords "appletv" "airplay") (:authors ("Wataru MIYAGUNI" . "gonngo@gmail.com")) (:maintainers ("Wataru MIYAGUNI" . "gonngo@gmail.com")) (:maintainer "Wataru MIYAGUNI" . "gonngo@gmail.com"))])
+ (alabaster-themes . [(20260113 657) ((emacs (28 1))) "Alabaster themes collection" tar ((:url . "https://github.com/vedang/alabaster-themes") (:commit . "2d3dcfc6ac8988d23f8065a580f7dcf4ff607e56") (:revdesc . "2d3dcfc6ac89") (:keywords "faces" "theme" "minimal") (:authors ("Nikita Prokopov" . "@tonsky")) (:maintainers ("Vedang Manerikar" . "@vedang")) (:maintainer "Vedang Manerikar" . "@vedang"))])
+ (alan-mode . [(20260523 1330) ((flycheck (32)) (emacs (25 1)) (s (1 12))) "Major mode for editing Alan files" tar ((:url . "https://github.com/Kjerner/AlanForEmacs") (:commit . "10d7a0a51451e9b023ac3dc0b24fdba9d81ecb2c") (:revdesc . "10d7a0a51451") (:keywords "alan" "languages") (:authors ("Paul van Dam" . "pvandam@kjerner.com")) (:maintainers ("Paul van Dam" . "pvandam@kjerner.com")) (:maintainer "Paul van Dam" . "pvandam@kjerner.com"))])
+ (alarm-clock . [(20250123 556) ((emacs (24 4))) "Alarm Clock" tar ((:url . "https://github.com/wlemuel/alarm-clock") (:commit . "8a805d365aa38be32041c4e968bb624d3bb1b54b") (:revdesc . "8a805d365aa3") (:keywords "calendar" "tools" "convenience") (:authors ("Steve Lemuel" . "wlemuel@hotmail.com")) (:maintainers ("Steve Lemuel" . "wlemuel@hotmail.com")) (:maintainer "Steve Lemuel" . "wlemuel@hotmail.com"))])
+ (alchemist . [(20180312 1304) ((elixir-mode (2 2 5)) (dash (2 11 0)) (emacs (24 4)) (company (0 8 0)) (pkg-info (0 4)) (s (1 11 0))) "Elixir tooling integration into Emacs" tar ((:url . "http://www.github.com/tonini/alchemist.el") (:commit . "6f99367511ae209f8fe2c990779764bbb4ccb6ed") (:revdesc . "6f99367511ae") (:keywords "languages" "elixir" "elixirc" "mix" "hex" "alchemist") (:authors ("Samuel Tonini" . "tonini.samuel@gmail.com")) (:maintainers ("Samuel Tonini" . "tonini.samuel@gmail.com")) (:maintainer "Samuel Tonini" . "tonini.samuel@gmail.com"))])
+ (alda-mode . [(20251223 6) ((emacs (24 0))) "An Alda major mode" tar ((:url . "https://gitlab.com/jgkamat/alda-mode") (:commit . "bde0e9c5df2810deb48df57f46bb3a1a51d7a8f6") (:revdesc . "bde0e9c5df28") (:keywords "alda" "highlight") (:authors ("Jay Kamat" . "jaygkamat@gmail.com")) (:maintainers ("Jay Kamat" . "jaygkamat@gmail.com")) (:maintainer "Jay Kamat" . "jaygkamat@gmail.com"))])
+ (alect-themes . [(20251205 1503) ((emacs (24 0))) "Configurable light, dark and black themes for Emacs 24 or later" tar ((:url . "https://github.com/alezost/alect-themes") (:commit . "b1f97e4bc0dc6ec91c7e9999fbe9fa371016463b") (:revdesc . "b1f97e4bc0dc") (:keywords "color" "theme") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (alectryon . [(20260525 2000) ((flycheck (31)) (emacs (25 1))) "Toggle between Code and markup" tar ((:url . "https://github.com/cpitclaudel/alectryon") (:commit . "bf99e72c54579460769984ba668e46c235ad18d8") (:revdesc . "bf99e72c5457") (:keywords "convenience" "languages" "tools") (:authors ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainers ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainer "Clément Pit-Claudel" . "clement.pitclaudel@live.com"))])
+ (alert . [(20260316 2025) ((gntp (0 1)) (log4e (0 3 0)) (cl-lib (0 5))) "Growl-style notification system for Emacs" tar ((:url . "https://github.com/jwiegley/alert") (:commit . "fb8f1fc7f769d7b3ed93b47bd8252f2947c96d9c") (:revdesc . "fb8f1fc7f769") (:keywords "notification" "emacs" "message") (:authors ("John Wiegley" . "jwiegley@gmail.com")) (:maintainers ("John Wiegley" . "jwiegley@gmail.com")) (:maintainer "John Wiegley" . "jwiegley@gmail.com"))])
+ (alert-termux . [(20181119 951) ((emacs (24 4))) "Alert.el notifications on Termux" tar ((:url . "https://github.com/gergelypolonkai/alert-termux") (:commit . "8215cf1d86392738c35a90bbc0055359265dfc4d") (:revdesc . "8215cf1d8639") (:keywords "terminals") (:authors ("Gergely Polonkai" . "gergely@polonkai.eu")) (:maintainers ("Gergely Polonkai" . "gergely@polonkai.eu")) (:maintainer "Gergely Polonkai" . "gergely@polonkai.eu"))])
+ (alert-toast . [(20220312 229) ((emacs (25 1)) (alert (1 2)) (f (0 20 0)) (s (1 12 0))) "Windows 10 toast notifications" tar ((:url . "https://github.com/gkowzan/alert-toast") (:commit . "96c88c93c1084de681700f655223142ee0eb944a") (:revdesc . "96c88c93c108") (:authors ("Grzegorz Kowzan" . "grzegorz@kowzan.eu")) (:maintainers ("Grzegorz Kowzan" . "grzegorz@kowzan.eu")) (:maintainer "Grzegorz Kowzan" . "grzegorz@kowzan.eu"))])
+ (align-cljlet . [(20160112 2101) ((clojure-mode (1 11 5))) "Space align various Clojure forms" tar ((:url . "https://github.com/gstamp/align-cljlet") (:commit . "ebcf0a912e836579a3a9d386e22c1c4bef7fba17") (:revdesc . "ebcf0a912e83") (:authors ("Glen Stampoultzis" . "gstampgmail.com") ("Reid D McKenzie" . "https://github.com/arrdem")) (:maintainers ("Glen Stampoultzis" . "gstampgmail.com") ("Reid D McKenzie" . "https://github.com/arrdem")) (:maintainer "Glen Stampoultzis" . "gstampgmail.com"))])
+ (all-ext . [(20200315 1443) ((emacs (24 4)) (all (1 0))) "M-x all with helm-swoop/anything/multiple-cursors/line-number" tar ((:url . "https://github.com/rubikitch/all-ext") (:commit . "c865c62506af2c9edc7705a7c24dc8b70d5d4de2") (:revdesc . "c865c62506af") (:keywords "matching" "all" "search" "replace" "anything" "helm" "helm-swoop" "occur") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (all-the-icons . [(20250527 927) ((emacs (24 3))) "A library for inserting Developer icons" tar ((:url . "https://github.com/domtronn/all-the-icons.el") (:commit . "4778632b29c8c8d2b7cd9ce69535d0be01d846f9") (:revdesc . "4778632b29c8") (:keywords "convenient" "lisp") (:authors ("Dominic Charlesworth" . "dgc336@gmail.com")) (:maintainers ("Dominic Charlesworth" . "dgc336@gmail.com")) (:maintainer "Dominic Charlesworth" . "dgc336@gmail.com"))])
+ (all-the-icons-completion . [(20240128 2048) ((emacs (26 1)) (all-the-icons (5 0))) "Add icons to completion candidates" tar ((:url . "https://github.com/iyefrat/all-the-icons-completion") (:commit . "4c8bcad8033f5d0868ce82ea3807c6cd46c4a198") (:revdesc . "4c8bcad8033f") (:keywords "convenient" "lisp") (:authors ("Itai Y. Efrat" . "https://github.com/iyefrat")) (:maintainers ("Itai Y. Efrat" . "itai3397@gmail.com")) (:maintainer "Itai Y. Efrat" . "itai3397@gmail.com"))])
+ (all-the-icons-dired . [(20231207 1324) ((emacs (26 1)) (all-the-icons (2 2 0))) "Shows icons for each file in dired mode" tar ((:url . "https://github.com/wyuenho/all-the-icons-dired") (:commit . "e157f0668f22ed586aebe0a2c0186ab07702986c") (:revdesc . "e157f0668f22") (:keywords "files" "icons" "dired") (:maintainers ("Jimmy Yuen Ho Wong" . "wyuenho@gmail.com")) (:maintainer "Jimmy Yuen Ho Wong" . "wyuenho@gmail.com"))])
+ (all-the-icons-gnus . [(20180511 654) ((emacs (24 4)) (dash (2 12 0)) (all-the-icons (3 1 0))) "Shows icons for in Gnus" tar ((:url . "https://github.com/nlamirault/all-the-icons-gnus") (:commit . "27f78996da0725943bcfb2d18038e6f7bddfa9c7") (:revdesc . "27f78996da07") (:keywords "mail" "tools") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (all-the-icons-ibuffer . [(20230503 1625) ((emacs (24 4)) (all-the-icons (2 2 0))) "Display icons for all buffers in ibuffer" tar ((:url . "https://github.com/seagle0128/all-the-icons-ibuffer") (:commit . "400860b2990529bd3a915e4d0a55fbc6d128a3ba") (:revdesc . "400860b29905") (:keywords "convenience" "icons" "ibuffer") (:authors ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainers ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainer "Vincent Zhang" . "seagle0128@gmail.com"))])
+ (all-the-icons-ivy . [(20190508 1803) ((emacs (24 4)) (all-the-icons (2 4 0)) (ivy (0 8 0))) "Shows icons while using ivy and counsel" tar ((:url . "https://github.com/asok/all-the-icons-ivy") (:commit . "babea626db20773de4c408acb2788e2b9c8277e3") (:revdesc . "babea626db20") (:keywords "faces"))])
+ (all-the-icons-ivy-rich . [(20230420 1234) ((emacs (25 1)) (ivy-rich (0 1 0)) (all-the-icons (2 2 0))) "Better experience with icons for ivy" tar ((:url . "https://github.com/seagle0128/all-the-icons-ivy-rich") (:commit . "c098cc85123a401b0ab8f2afd3a25853e61d7d28") (:revdesc . "c098cc85123a") (:keywords "convenience" "icons" "ivy") (:authors ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainers ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainer "Vincent Zhang" . "seagle0128@gmail.com"))])
+ (all-the-icons-nerd-fonts . [(20260614 1246) ((emacs (28 1)) (all-the-icons (5 0)) (nerd-icons (0 0 1))) "Nerd font integration for all-the-icons" tar ((:url . "https://github.com/mohkale/all-the-icons-nerd-fonts") (:commit . "4583cf5e8cce73c35e8ec3195915ce693d703bb1") (:revdesc . "4583cf5e8cce") (:keywords "convenience" "lisp") (:authors ("Mohsin Kaleem" . "mohkale@gmail.com")) (:maintainers ("Mohsin Kaleem" . "mohkale@gmail.com")) (:maintainer "Mohsin Kaleem" . "mohkale@gmail.com"))])
+ (almost-mono-themes . [(20250722 1957) ((emacs (24))) "Almost monochromatic color themes" tar ((:url . "https://github.com/cryon/almost-mono-themes") (:commit . "1b739fef5f26a64ea22736012c3899d70c83df2d") (:revdesc . "1b739fef5f26") (:keywords "faces") (:authors ("John Olsson" . "john@cryon.se")) (:maintainers ("John Olsson" . "john@cryon.se")) (:maintainer "John Olsson" . "john@cryon.se"))])
+ (alsamixer . [(20250106 1025) nil "Functions to call out to amixer" tar ((:url . "https://codeberg.org/rwv/alsamixer-el") (:commit . "5f5a1f26637ca1b2a8ac964fc86a59522e3f778e") (:revdesc . "5f5a1f26637c") (:keywords "convenience"))])
+ (alt-codes . [(20260101 557) ((emacs (26 1))) "Insert alt codes using meta key" tar ((:url . "https://github.com/jcs-elpa/alt-codes") (:commit . "1a4df7f34b1072ef199aba602c6c3901d3da5bb1") (:revdesc . "1a4df7f34b10") (:keywords "convenience" "alt" "codes" "insertion" "meta") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (amaranth-dark-theme . [(20251228 1916) ((emacs (24 1))) "Amaranth Dark theme" tar ((:url . "https://github.com/a9sk/amaranth-dark-theme") (:commit . "624e0b5ef632b3adfdc03e44dce7a98cd48d47ed") (:revdesc . "624e0b5ef632") (:authors ("Emiliano Rizzonelli" . "emiliano.rizzonelli@proton.me")) (:maintainers ("Emiliano Rizzonelli" . "emiliano.rizzonelli@proton.me")) (:maintainer "Emiliano Rizzonelli" . "emiliano.rizzonelli@proton.me"))])
+ (amber-glow-theme . [(20250305 936) ((emacs (24 1))) "A warm and inviting theme" tar ((:url . "https://github.com/madara123pain/unique-emacs-theme-pack") (:commit . "43afeb68b3ba0394f8cc925ebb90e9a6620b4b28") (:revdesc . "43afeb68b3ba") (:keywords "faces" "theme" "warm" "amber" "glow" "dark"))])
+ (amd-mode . [(20180111 1402) ((emacs (25)) (projectile (20161008 47)) (s (1 9 0)) (f (0 16 2)) (seq (2 16)) (makey (0 3)) (js2-mode (20140114)) (js2-refactor (0 6 1))) "Minor mode for handling JavaScript AMD module requirements" tar ((:url . "https://github.com/NicolasPetton/amd-mode.el") (:commit . "01fd19e0d635ccaf8e812364d8720733f2e84126") (:revdesc . "01fd19e0d635") (:keywords "javascript" "amd" "projectile") (:authors ("Nicolas Petton" . "petton.nicolas@gmail.com")) (:maintainers ("Nicolas Petton" . "petton.nicolas@gmail.com")) (:maintainer "Nicolas Petton" . "petton.nicolas@gmail.com"))])
+ (ameba . [(20200103 1454) ((emacs (24 4))) "An interface to Crystal Ameba linter" tar ((:url . "https://github.com/crystal-ameba/ameba.el") (:commit . "0c4925ae0e998818326adcb47ed27ddf9761c7dc") (:revdesc . "0c4925ae0e99") (:keywords "convenience"))])
+ (ample-regexps . [(20200508 1021) nil "Ample regular expressions for Emacs" tar ((:url . "https://github.com/immerrr/ample-regexps.el") (:commit . "153969ce547afe410b8986f01c9ed4087c9cd20b") (:revdesc . "153969ce547a") (:keywords "regexps" "extensions" "tools") (:authors ("immerrr" . "immerrr@gmail.com")) (:maintainers ("immerrr" . "immerrr@gmail.com")) (:maintainer "immerrr" . "immerrr@gmail.com"))])
+ (ample-theme . [(20260611 1532) nil "Calm Dark Theme for Emacs" tar ((:url . "https://github.com/jordonbiondo/ample-theme") (:commit . "6952b29a588c854084ca1360bed16c9bc2d48e37") (:revdesc . "6952b29a588c") (:keywords "theme" "dark") (:authors ("Jordon Biondo" . "jordonbiondo@gmail.com")) (:maintainers ("Jordon Biondo" . "jordonbiondo@gmail.com")) (:maintainer "Jordon Biondo" . "jordonbiondo@gmail.com"))])
+ (ample-zen-theme . [(20150119 2154) nil "AmpleZen Theme for Emacs 24" tar ((:url . "https://github.com/mjwall/ample-zen") (:commit . "b277bb7abd4b6624e8d59f02474b79af50a007bd") (:revdesc . "b277bb7abd4b") (:keywords "theme" "dark" "emacs 24"))])
+ (amread-mode . [(20240903 1534) ((emacs (28 1)) (pyim (5 2 8)) (hydra (0 15 0))) "A minor mode helper user speed-reading" tar ((:url . "https://repo.or.cz/amread-mode.git") (:commit . "bf06b05c6322fe74f0e5ac2436cad46f66f673c6") (:revdesc . "bf06b05c6322") (:keywords "wp") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (amsreftex . [(20240512 1746) ((emacs (25 1))) "Add amsrefs bibliography support for reftex" tar ((:url . "https://github.com/franburstall/amsreftex") (:commit . "c508b05536a04ee153a9947f025d24930c52209a") (:revdesc . "c508b05536a0") (:keywords "tex") (:authors ("Fran Burstall" . "fran.burstall@gmail.com")) (:maintainers ("Fran Burstall" . "fran.burstall@gmail.com")) (:maintainer "Fran Burstall" . "fran.burstall@gmail.com"))])
+ (amx . [(20230413 1210) ((emacs (24 4)) (s (0))) "Alternative M-x with extra features" tar ((:url . "https://github.com/DarwinAwardWinner/amx/") (:commit . "1c2428d21e9d2ee8bee944b572a39ca8c91ca13b") (:revdesc . "1c2428d21e9d") (:keywords "convenience" "usability" "completion") (:authors ("Ryan C. Thompson" . "rct@thompsonclan.org") ("Cornelius Mika" . "cornelius.mika@gmail.com")) (:maintainers ("Ryan C. Thompson" . "rct@thompsonclan.org")) (:maintainer "Ryan C. Thompson" . "rct@thompsonclan.org"))])
+ (anaconda-mode . [(20250430 227) ((emacs (25 1)) (pythonic (0 1 0)) (dash (2 6 0)) (s (1 9)) (f (0 16 2))) "Code navigation, documentation lookup and completion for Python" tar ((:url . "https://github.com/proofit404/anaconda-mode") (:commit . "ee1562c6b443be9208910c700e229824b2f1af7a") (:revdesc . "ee1562c6b443") (:keywords "convenience" "anaconda") (:authors ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainers ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainer "Artem Malyshev" . "proofit404@gmail.com"))])
+ (anakondo . [(20210221 1727) ((emacs (26 3))) "Adds clj-kondo based Clojure[Script] editing facilities" tar ((:url . "https://github.com/didibus/anakondo") (:commit . "16b0ba14d94a5d7e55655efc9e1d6d069a9306f2") (:revdesc . "16b0ba14d94a") (:keywords "clojure" "clojurescript" "cljc" "clj-kondo" "completion" "languages" "tools") (:authors ("Didier A." . "didibus@users.noreply.github.com")) (:maintainers ("Didier A." . "didibus@users.noreply.github.com")) (:maintainer "Didier A." . "didibus@users.noreply.github.com"))])
+ (anaphora . [(20260720 903) nil "Anaphoric macros providing implicit temp variables" tar ((:url . "https://github.com/rolandwalker/anaphora") (:commit . "d22ae8afd3b3bf6a383f6a6c27522893b57130b1") (:revdesc . "d22ae8afd3b3") (:keywords "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (ancient-one-dark-theme . [(20211030 1358) ((emacs (24 1))) "A color theme based off uetchy's Ancient One Dark Theme" tar ((:url . "https://github.com/DaniruKun/ancient-one-dark-emacs-theme") (:commit . "a0eaa8bce0ffc25d1469af48a74e80f820bab0ab") (:revdesc . "a0eaa8bce0ff"))])
+ (ancient-theme . [(20260322 1856) ((emacs (29 1))) "A theme about ruins" tar ((:url . "https://github.com/thomasbestvina/ancient-theme") (:commit . "6b5c5a016a8460739215aac8eeb16be9fa357b4e") (:revdesc . "6b5c5a016a84") (:keywords "faces" "theme") (:authors ("Thomas Bestvina" . "bestvinathomas@gmail.com")) (:maintainers ("Thomas Bestvina" . "bestvinathomas@gmail.com")) (:maintainer "Thomas Bestvina" . "bestvinathomas@gmail.com"))])
+ (android-env . [(20220810 1449) ((emacs (24 3)) (s (1 12 0))) "Helper functions for working in android" tar ((:url . "https://github.com/fernando-jascovich/android-env.el") (:commit . "d2890f1156ed184314adbfcf01cdceb6ea79b10d") (:revdesc . "d2890f1156ed") (:keywords "android" "gradle" "java" "tools" "convenience"))])
+ (android-mode . [(20250106 1022) nil "Minor mode for Android application development" tar ((:url . "https://codeberg.org/rwv/android-mode") (:commit . "67f7c0d7d37605efc7f055b76d731556861c3eb9") (:revdesc . "67f7c0d7d376") (:keywords "tools" "processes"))])
+ (angry-police-captain . [(20120829 1252) nil "Show quote from http://theangrypolicecaptain.com in the minibuffer" tar ((:url . "https://github.com/rolpereira/angry-police-captain-el") (:commit . "d11931c5cb63368dcc4a48797962428cca6d3e9d") (:revdesc . "d11931c5cb63") (:keywords "games" "web" "fun") (:authors ("Rolando Pereira" . "rolando_pereira@sapo.pt")) (:maintainers ("Rolando Pereira" . "rolando_pereira@sapo.pt")) (:maintainer "Rolando Pereira" . "rolando_pereira@sapo.pt"))])
+ (angular-mode . [(20151201 2127) nil "Major mode for Angular.js" tar ((:url . "https://github.com/omouse/angularjs-mode") (:commit . "8720cde86af0f1859ccc8580571e8d0ad1c52cff") (:revdesc . "8720cde86af0") (:keywords "languages" "javascript") (:authors ("Rudolf Olah" . "omouse@gmail.com")) (:maintainers ("Rudolf Olah" . "omouse@gmail.com")) (:maintainer "Rudolf Olah" . "omouse@gmail.com"))])
+ (angular-snippets . [(20140514 523) ((s (1 4 0)) (dash (1 2 0))) "Yasnippets for AngularJS" tar ((:url . "https://github.com/magnars/angular-snippets.el") (:commit . "af5ae0a4a8603b040446c28afcf6ca01a8b4bd7b") (:revdesc . "af5ae0a4a860") (:keywords "snippets") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (anju . [(20260818 1900) ((emacs (29 1)) (casual (2 14 0)) (markdown-mode (2 7))) "Mouse UX Customizations" tar ((:url . "https://github.com/kickingvegas/anju") (:commit . "0dd7b55e54031e5e1db364f80150f004733abf22") (:revdesc . "0dd7b55e5403") (:keywords "tools") (:authors ("Charles Choi" . "charles.choi@yummymelon.com")) (:maintainers ("Charles Choi" . "charles.choi@yummymelon.com")) (:maintainer "Charles Choi" . "charles.choi@yummymelon.com"))])
+ (anki-connect . [(20250414 1301) ((emacs (24 3))) "AnkiConnect API" tar ((:url . "https://github.com/lujun9972/anki-connect.el") (:commit . "e32e611d54a3819f88c5ff58009df70c9ae01934") (:revdesc . "e32e611d54a3") (:keywords "lisp" "anki") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (anki-editor . [(20260714 1156) ((emacs (29 1))) "Minor mode for making Anki cards with Org" tar ((:url . "https://github.com/anki-editor/anki-editor") (:commit . "4a55c3f937b176d31e36d484c196682cae9f9104") (:revdesc . "4a55c3f937b1"))])
+ (anki-editor-view . [(20230807 806) ((emacs (29 1))) "Open anki-editor notes from Anki" tar ((:url . "https://gitlab.com/vherrmann/anki-editor-view") (:commit . "6ad8c6be4f44de0c33eab012e507320b732d4800") (:revdesc . "6ad8c6be4f44") (:authors ("Valentin Herrmann" . "me@valentin-herrmann.de")) (:maintainers ("Valentin Herrmann" . "me@valentin-herrmann.de")) (:maintainer "Valentin Herrmann" . "me@valentin-herrmann.de"))])
+ (anki-mode . [(20201223 719) ((emacs (24 4)) (dash (2 12 0)) (markdown-mode (2 2)) (s (1 11 0)) (request (0 3 0))) "A major mode for creating anki cards" tar ((:url . "https://github.com/davidshepherd7/anki-mode") (:commit . "7cde5a68c9d0ef3811b0bd480274ea79909d2ddc") (:revdesc . "7cde5a68c9d0") (:keywords "tools") (:authors ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainers ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainer "David Shepherd" . "davidshepherd7@gmail.com"))])
+ (anki-vocabulary . [(20200103 325) ((emacs (24 4)) (s (1 0)) (youdao-dictionary (0 4)) (anki-connect (1 0)) (s (1 10))) "Help you to create vocabulary cards in Anki" tar ((:url . "https://github.com/lujun9972/anki-vocabulary.el") (:commit . "863fe0219577f996ab126f1b7902db3c2cc59b2b") (:revdesc . "863fe0219577") (:keywords "lisp" "anki" "translator" "chinese") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (annalist . [(20260531 1558) ((emacs (24 4)) (cl-lib (0 5))) "Record and display information such as keybindings" tar ((:url . "https://github.com/noctuid/annalist.el") (:commit . "0d958732b710a8e9edc4c70b2318570e1c7d4923") (:revdesc . "0d958732b710") (:keywords "convenience" "tools" "keybindings" "org") (:authors ("Fox Kiester" . "noct@posteo.net")) (:maintainers ("Fox Kiester" . "noct@posteo.net")) (:maintainer "Fox Kiester" . "noct@posteo.net"))])
+ (annotate . [(20260514 1320) ((emacs (27 1))) "Annotate files without changing them" tar ((:url . "https://github.com/bastibe/annotate.el") (:commit . "347525024f319ab50735ef324e8900aecda3724c") (:revdesc . "347525024f31") (:maintainers ("Bastian Bechtold" . "bastibe.dev@mailbox.org") ("cage" . "cage-dev@twistfold.it")) (:maintainer "Bastian Bechtold" . "bastibe.dev@mailbox.org"))])
+ (annotate-depth . [(20160520 2040) nil "Annotate buffer if indentation depth is beyond threshold" tar ((:url . "https://github.com/netromdk/annotate-depth") (:commit . "fcb24fa36287250e40d195590c4ca4a8a696277b") (:revdesc . "fcb24fa36287") (:keywords "convenience") (:authors ("Morten Slot Kristensen" . "mskATnullpointerDOTdk")) (:maintainers ("Morten Slot Kristensen" . "mskATnullpointerDOTdk")) (:maintainer "Morten Slot Kristensen" . "mskATnullpointerDOTdk"))])
+ (annotated-completing-read . [(20260817 235) ((emacs (29 1))) "Ergonomic completing-read wrapper/helper" tar ((:url . "https://github.com/tychoish/annotated-completing-read") (:commit . "e93c3d71d59a4a01c0a28c3d4c9ecca00e5d83fc") (:revdesc . "e93c3d71d59a") (:keywords "convenience" "matching") (:authors ("sam kleinman" . "garen@tychoish.com")) (:maintainers ("sam kleinman" . "garen@tychoish.com")) (:maintainer "sam kleinman" . "garen@tychoish.com"))])
+ (annotation . [(20250805 1029) nil "Functions for annotating text with faces and help bubbles" tar ((:url . "https://github.com/agda/agda") (:commit . "213db6e50bb89c1b0b2832eab4c6caafb137eb6d") (:revdesc . "213db6e50bb8"))])
+ (annoying-arrows-mode . [(20161024 646) ((cl-lib (0 5))) "Ring the bell if using arrows too much" tar ((:url . "https://github.com/magnars/annoying-arrows-mode.el") (:commit . "3c42e9807d7696da2da2a21b63beebf9cdb3f5dc") (:revdesc . "3c42e9807d76") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (ansi . [(20251118 230) ((emacs (24 1)) (cl-lib (0 6))) "Turn string into ansi strings" tar ((:url . "https://github.com/rejeep/ansi") (:commit . "a3aa9daa37a75fec22186399014a790a6c554311") (:revdesc . "a3aa9daa37a7") (:keywords "terminals" "color" "ansi") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (ansible . [(20260607 1852) ((s (1 9 0)) (f (0 16 2)) (emacs (25 1))) "Ansible minor mode" tar ((:url . "https://gitlab.com/emacs-ansible/emacs-ansible") (:commit . "0d7bc93ad963677880d99c846a30ea6e6ed9eec5") (:revdesc . "0d7bc93ad963") (:authors (nil . "k1lowxb[at]gmail[dot]com") (nil . "k1low[at]101000lab[dot]org")) (:maintainers (nil . "k1lowxb[at]gmail[dot]com") (nil . "k1low[at]101000lab[dot]org")) (:maintainer nil . "k1lowxb[at]gmail[dot]com"))])
+ (ansible-doc . [(20160924 824) ((emacs (24 3))) "Ansible documentation Minor Mode" tar ((:url . "https://github.com/lunaryorn/ansible-doc.el") (:commit . "bc8128a85a79b14f4a121105d87a5eddc33975ad") (:revdesc . "bc8128a85a79") (:keywords "tools" "help") (:authors ("Sebastian Wiesner" . "swiesner@lunaryorn")) (:maintainers ("Sebastian Wiesner" . "swiesner@lunaryorn")) (:maintainer "Sebastian Wiesner" . "swiesner@lunaryorn"))])
+ (ansible-vault . [(20251029 2146) ((emacs (26 1))) "Minor mode for editing ansible vault files" tar ((:url . "https://github.com/freehck/ansible-vault-mode") (:commit . "74f96ce226f51bec203af343f73182ea132749a6") (:revdesc . "74f96ce226f5") (:keywords "ansible" "ansible-vault" "tools") (:authors ("Zachary Elliott" . "contact@zell.io") ("Dmitrii Kashin" . "freehck@yandex.ru")) (:maintainers ("Dmitrii Kashin" . "freehck@yandex.ru")) (:maintainer "Dmitrii Kashin" . "freehck@yandex.ru"))])
+ (ansilove . [(20250105 1853) ((emacs (26 1))) "Display buffers as PNG images using ansilove" tar ((:url . "https://gitlab.com/xgqt/emacs-ansilove/") (:commit . "a75eb6c89a1d96e1b4fa028ecca9be8b13c95230") (:revdesc . "a75eb6c89a1d") (:keywords "multimedia") (:authors ("Maciej Barć" . "xgqt@xgqt.org")) (:maintainers ("Maciej Barć" . "xgqt@xgqt.org")) (:maintainer "Maciej Barć" . "xgqt@xgqt.org"))])
+ (ant . [(20160211 1543) nil "Helpers for compiling with ant" tar ((:url . "https://github.com/apg/ant-el") (:commit . "510b5a3f57ee4b2855422d88d359a28922c1ab70") (:revdesc . "510b5a3f57ee") (:keywords "compilation" "ant" "java"))])
+ (anti-zenburn-theme . [(20180712 1838) nil "Low-contrast Zenburn-inverted theme" tar ((:url . "https://github.com/m00natic/anti-zenburn-theme") (:commit . "dbafbaa86be67c1d409873f57a5c0bbe1e7ca158") (:revdesc . "dbafbaa86be6") (:authors ("Andrey Kotlarski" . "m00naticus@gmail.com")) (:maintainers ("Andrey Kotlarski" . "m00naticus@gmail.com")) (:maintainer "Andrey Kotlarski" . "m00naticus@gmail.com"))])
+ (anx-api . [(20140208 1514) nil "Interact with the AppNexus API from Emacs" tar ((:url . "https://github.com/rmloveland/emacs-appnexus-api") (:commit . "b2411ebc966ac32c3ffc61bc22bf183834df0fa0") (:revdesc . "b2411ebc966a") (:keywords "convenience" "json" "rest" "api" "appnexus"))])
+ (anybar . [(20160816 1421) nil "Control AnyBar from Emacs" tar ((:url . "https://github.com/tie-rack/anybar-el") (:commit . "7a0743e0d31bcb36ab1bb2e351f3e7139c422ac5") (:revdesc . "7a0743e0d31b") (:keywords "anybar") (:authors ("Christopher Shea" . "cmshea@gmail.com")) (:maintainers ("Christopher Shea" . "cmshea@gmail.com")) (:maintainer "Christopher Shea" . "cmshea@gmail.com"))])
+ (anyins . [(20131229 1041) nil "Insert content at multiple places from shell command or kill-ring" tar ((:url . "https://github.com/antham/anyins") (:commit . "cd5e3c1abd471c8a67aafc42c4c985a2796f4b9f") (:revdesc . "cd5e3c1abd47") (:keywords "insert" "rectangular") (:authors ("Anthony HAMON" . "hamon.anth@gmail.com")) (:maintainers ("Anthony HAMON" . "hamon.anth@gmail.com")) (:maintainer "Anthony HAMON" . "hamon.anth@gmail.com"))])
+ (anzu . [(20240929 201) ((emacs (25 1))) "Show number of matches in mode-line while searching" tar ((:url . "https://github.com/emacsorphanage/anzu") (:commit . "bc3a0032bb6aa7f5886f10460cd53eb7b8b020af") (:revdesc . "bc3a0032bb6a") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("LemonBreezes" . "look@strawberrytea.xyz")) (:maintainer "LemonBreezes" . "look@strawberrytea.xyz"))])
+ (aozora-view . [(20140310 1317) nil "Aozora Bunko text Emacs viewer" tar ((:url . "https://github.com/kawabata/aozora-view") (:commit . "b0390616d19e45f15f9a2f5d5688274831e721fd") (:revdesc . "b0390616d19e") (:keywords "text") (:authors ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (apache-mode . [(20210519 1931) nil "Major mode for editing Apache httpd configuration files" tar ((:url . "https://github.com/emacs-php/apache-mode") (:commit . "f2c11aac2f5fc598123e04f4604bea248689a117") (:revdesc . "f2c11aac2f5f") (:keywords "languages" "faces") (:authors ("Karl Chen" . "quarl@nospam.quarl.org")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (apdl-mode . [(20250508 908) ((emacs (25 1))) "Major mode for the APDL programming language" tar ((:url . "https://github.com/dieter-wilhelm/apdl-mode") (:commit . "4883ab085811b85cc75c44b5af478ab8f7e98386") (:revdesc . "4883ab085811") (:keywords "languages" "convenience" "tools" "ansys" "apdl") (:authors ("H. Dieter Wilhelm" . "dieter@duenenhof-wilhelm.de")))])
+ (apel . [(20250608 1806) ((emacs (24 5))) "Support for portable Emacs Lisp programs" tar ((:url . "https://github.com/emacsmirror/apel") (:commit . "1b043cfea58ea146356c237a5286ead69e97417b") (:revdesc . "1b043cfea58e"))])
+ (apheleia . [(20260817 2331) ((emacs (27))) "Reformat buffer stably" tar ((:url . "https://github.com/radian-software/apheleia") (:commit . "5789d6066aea23c5dd669372c5081ab55dec6f5a") (:revdesc . "5789d6066aea") (:keywords "tools") (:authors ("Radian LLC" . "contact+apheleia@radian.codes")) (:maintainers ("Radian LLC" . "contact+apheleia@radian.codes")) (:maintainer "Radian LLC" . "contact+apheleia@radian.codes"))])
+ (apib-mode . [(20200101 1017) ((markdown-mode (2 1))) "Major mode for API Blueprint files" tar ((:url . "https://github.com/w-vi/apib-mode") (:commit . "c6dd05201f6eb9295736d8668a79a7510d11159e") (:revdesc . "c6dd05201f6e") (:keywords "tools" "api-blueprint") (:authors ("Vilibald Wanča" . "vilibald@wvi.cz")) (:maintainers ("Vilibald Wanča" . "vilibald@wvi.cz")) (:maintainer "Vilibald Wanča" . "vilibald@wvi.cz"))])
+ (apiwrap . [(20180602 2231) ((emacs (25))) "Api-wrapping macros" tar ((:url . "https://github.com/vermiculus/apiwrap.el") (:commit . "e4c9c57d6620a788ec8a715ff1bb50542edea3a6") (:revdesc . "e4c9c57d6620") (:keywords "tools" "maint" "convenience") (:authors ("Sean Allred" . "code@seanallred.com")) (:maintainers ("Sean Allred" . "code@seanallred.com")) (:maintainer "Sean Allred" . "code@seanallred.com"))])
+ (app-monochrome-themes . [(20250710 2315) ((emacs (26 1))) "Low contrast monochrome themes" tar ((:url . "https://github.com/Greybeard-Entertainment/app-monochrome") (:commit . "bd8bfee0b64bf10543f4cefaf40bb5dcd4cf123b") (:revdesc . "bd8bfee0b64b") (:authors ("Aleksandr Petrosyan" . "appetrosan3@gmail.com")) (:maintainers ("Aleksandr Petrosyan" . "appetrosan3@gmail.com")) (:maintainer "Aleksandr Petrosyan" . "appetrosan3@gmail.com"))])
+ (apparmor-mode . [(20260515 454) ((emacs (26 1))) "Major mode for editing AppArmor policy files" tar ((:url . "https://gitlab.com/apparmor/apparmor-mode") (:commit . "b0e4bbcd30aafd71f484c74164351af40ef885bf") (:revdesc . "b0e4bbcd30aa") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (apple-container-tramp . [(20260504 1350) ((emacs (24 3))) "TRAMP integration for apple container" tar ((:url . "https://github.com/major1201/apple-container-tramp.el") (:commit . "f47d58d029c594f4c9e9b1cfff79630de68a9cb5") (:revdesc . "f47d58d029c5"))])
+ (apples-mode . [(20110121 418) nil "Major mode for editing and executing AppleScript code" tar ((:url . "https://github.com/tequilasunset/apples-mode") (:commit . "83a9ab0d6ba82496e2f7df386909b1a55701fccb") (:revdesc . "83a9ab0d6ba8") (:keywords "applescript" "languages") (:authors ("tequilasunset" . "tequilasunset.mac@gmail.com")) (:maintainers ("tequilasunset" . "tequilasunset.mac@gmail.com")) (:maintainer "tequilasunset" . "tequilasunset.mac@gmail.com"))])
+ (applescript-mode . [(20210802 1715) ((emacs (24 3))) "Major mode for editing AppleScript source" tar ((:url . "https://github.com/emacsorphanage/applescript-mode") (:commit . "00c141bbff46c89a96598b605dee05dd1d89f624") (:revdesc . "00c141bbff46") (:keywords "languages" "tools") (:authors ("sakito" . "sakito@users.sourceforge.jp")) (:maintainers ("sakito" . "sakito@users.sourceforge.jp")) (:maintainer "sakito" . "sakito@users.sourceforge.jp"))])
+ (apropospriate-theme . [(20251010 121) nil "A colorful, low-contrast, light & dark theme set for Emacs with a fun name" tar ((:url . "https://github.com/waymondo/apropospriate-theme") (:commit . "2b26eed7e2063ca93998a6807f5a4e602483a23d") (:revdesc . "2b26eed7e206") (:authors ("Justin Talbott" . "justin@waymondo.com")) (:maintainers ("Justin Talbott" . "justin@waymondo.com")) (:maintainer "Justin Talbott" . "justin@waymondo.com"))])
+ (apt-sources-list . [(20180527 1241) ((emacs (24 4))) "Mode for editing APT source.list files" tar ((:url . "https://git.korewanetadesu.com/apt-sources-list.git") (:commit . "44112833b3fa7f4d7e43708e5996782e22bb2fa3") (:revdesc . "44112833b3fa") (:authors ("Dr. Rafael Sepúlveda" . "drs@gnulinux.org.mx")) (:maintainers ("Joe Wreschnig" . "joe.wreschnig@gmail.com")) (:maintainer "Joe Wreschnig" . "joe.wreschnig@gmail.com"))])
+ (aqi . [(20230530 1204) ((emacs (25 1)) (request (0 3)) (let-alist (0 0))) "Air quality data from the World Air Quality Index" tar ((:url . "https://github.com/zzkt/aqi") (:commit . "cbff3c6ce691a3a1d2f5636384e29d43f0e1d236") (:revdesc . "cbff3c6ce691") (:keywords "air quality" "aqi" "pollution" "weather" "data") (:authors ("nik gaffney" . "nik@fo.am")) (:maintainers ("nik gaffney" . "nik@fo.am")) (:maintainer "nik gaffney" . "nik@fo.am"))])
+ (arch-packer . [(20170730 1321) ((emacs (25 1)) (s (1 11 0)) (async (1 9 2)) (dash (2 12 0))) "Arch Linux package management frontend" tar ((:url . "https://github.com/brotzeitmacher/arch-packer") (:commit . "940e96f7d357c6570b675a0f942181c787f1bfd7") (:revdesc . "940e96f7d357") (:authors ("Fritz Stelzer" . "brotzeitmacher@gmail.com")) (:maintainers ("Fritz Stelzer" . "brotzeitmacher@gmail.com")) (:maintainer "Fritz Stelzer" . "brotzeitmacher@gmail.com"))])
+ (archive-phar . [(20221009 2129) ((emacs (28 1)) (php-runtime (0 2)) (datetime-format (0 0 1))) "Phar file support for archive-mode" tar ((:url . "https://github.com/emacs-php/archive-phar.el") (:commit . "0bda3e338446d06dbe9d8c8837dee746de48632f") (:revdesc . "0bda3e338446") (:keywords "files") (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (archive-region . [(20200316 1425) ((emacs (24 4))) "Move region to archive file instead of killing" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/archive-region.el") (:commit . "53cd2d96ea7c33f320353982b36854f25c900c2e") (:revdesc . "53cd2d96ea7c") (:keywords "languages") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (archive-rpm . [(20220527 632) ((emacs (24 4))) "RPM and CPIO support for archive-mode" tar ((:url . "https://github.com/nbarrientos/archive-rpm") (:commit . "cb48fee04cb0cbb26f760a3b95649f7dac78c6ec") (:revdesc . "cb48fee04cb0") (:keywords "files") (:authors ("Magnus Henoch" . "magnus.henoch@gmail.com")) (:maintainers ("Magnus Henoch" . "magnus.henoch@gmail.com")) (:maintainer "Magnus Henoch" . "magnus.henoch@gmail.com"))])
+ (arduino-cli-mode . [(20260628 2219) ((emacs (25 1))) "Arduino-CLI command wrapper" tar ((:url . "https://github.com/motform/arduino-cli-mode") (:commit . "d5614acdca80871cf4db65843227223b5a0e3a2c") (:revdesc . "d5614acdca80") (:keywords "processes" "tools"))])
+ (arduino-mode . [(20240527 1603) ((emacs (25 1)) (spinner (1 7 3))) "Major mode for editing Arduino code" tar ((:url . "https://repo.or.cz/arduino-mode.git") (:commit . "b2ffd8441851659cb1cc844156073967729585e5") (:revdesc . "b2ffd8441851") (:keywords "languages" "arduino") (:authors ("Christopher Grim" . "christopher.grim@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (aria2 . [(20230314 2131) ((emacs (25 1))) "Control aria2c commandline tool from Emacs" tar ((:url . "https://bitbucket.org/ukaszg/aria2-mode") (:commit . "1f2cbe624f3a4e0109b5dc123bb4bbed496b15a7") (:revdesc . "1f2cbe624f3a") (:keywords "download" "bittorrent" "aria2") (:authors ("ukasz Gruner" . "lukasz@gruner.lu")) (:maintainers ("ukasz Gruner" . "lukasz@gruner.lu")) (:maintainer "ukasz Gruner" . "lukasz@gruner.lu"))])
+ (ariadne . [(20131117 1711) ((bert (0 1))) "Ariadne plugin for Emacs" tar ((:url . "https://github.com/manzyuk/ariadne-el") (:commit . "6fe401c7f996bcbc2f685e7971324c6f5e5eaf15") (:revdesc . "6fe401c7f996") (:keywords "comm" "convenience" "processes") (:authors ("Oleksandr Manzyuk" . "manzyuk@gmail.com")) (:maintainers ("Oleksandr Manzyuk" . "manzyuk@gmail.com")) (:maintainer "Oleksandr Manzyuk" . "manzyuk@gmail.com"))])
+ (arjen-grey-theme . [(20170522 2047) nil "A soothing dark grey theme" tar ((:url . "https://github.com/credmp/arjen-grey") (:commit . "4cd0be72b65d42390e2105cfdaa408a1ead8d8d1") (:revdesc . "4cd0be72b65d") (:keywords "faces") (:authors ("Arjen Wiersma" . "arjen@wiersma.org")) (:maintainers ("Arjen Wiersma" . "arjen@wiersma.org")) (:maintainer "Arjen Wiersma" . "arjen@wiersma.org"))])
+ (arscript-mode . [(20240819 1927) ((emacs (25 1))) "Major mode for editing arscript files" tar ((:url . "https://github.com/captainflasmr/arscript-mode") (:commit . "797e1d0ef1312e8ff846abd0c6853358041f7691") (:revdesc . "797e1d0ef131") (:keywords "convenience") (:authors ("James Dyer" . "captainflasmr@gmail.com")) (:maintainers ("James Dyer" . "captainflasmr@gmail.com")) (:maintainer "James Dyer" . "captainflasmr@gmail.com"))])
+ (artbollocks-mode . [(20251211 1624) ((emacs (25 1))) "Improve your writing (especially about art)" tar ((:url . "https://github.com/sachac/artbollocks-mode") (:commit . "63d20ed2846226f45b35eded69a776143a772ea4") (:revdesc . "63d20ed28462") (:authors ("Rob Myers" . "rob@robmyers.org") ("Sacha Chua" . "sacha@sachachua.com")) (:maintainers ("Rob Myers" . "rob@robmyers.org") ("Sacha Chua" . "sacha@sachachua.com")) (:maintainer "Rob Myers" . "rob@robmyers.org"))])
+ (arview . [(20160419 2109) nil "Extract and view archives in the temporary directory" tar ((:url . "https://github.com/afainer/arview") (:commit . "5437b4221b64b238c273a651d4792c577dba6d45") (:revdesc . "5437b4221b64") (:keywords "files") (:authors ("Andrey Fainer" . "fandrey@gmx.com")) (:maintainers ("Andrey Fainer" . "fandrey@gmx.com")) (:maintainer "Andrey Fainer" . "fandrey@gmx.com"))])
+ (arxiv-citation . [(20230713 627) ((emacs (25 1)) (dash (2 19 1)) (s (1 12 0))) "Utility functions for dealing with arXiv papers" tar ((:url . "https://gitlab.com/slotThe/arXiv-citation") (:commit . "04de0dae1121fb92c30b393449c6f8d6d940dbed") (:revdesc . "04de0dae1121") (:keywords "convenience") (:authors ("Tony Zorman" . "soliditsallgood@mailbox.org")) (:maintainers ("Tony Zorman" . "soliditsallgood@mailbox.org")) (:maintainer "Tony Zorman" . "soliditsallgood@mailbox.org"))])
+ (arxiv-mode . [(20240111 2203) ((emacs (27 1)) (hydra (0))) "Read and search for articles on arXiv.org" tar ((:url . "https://github.com/fizban007/arxiv-mode") (:commit . "f629ec64f8bbac0cadb472c6741f8f33d49e9160") (:revdesc . "f629ec64f8bb") (:keywords "bib" "convenience" "hypermedia") (:authors ("Alex Chen" . "fizban007@gmail.com") ("Simon Lin" . "n.sibetz@gmail.com")) (:maintainers ("Alex Chen" . "fizban007@gmail.com") ("Simon Lin" . "n.sibetz@gmail.com")) (:maintainer "Alex Chen" . "fizban007@gmail.com"))])
+ (ascii-table . [(20231215 1527) ((emacs (24 3))) "Interactive ASCII table" tar ((:url . "https://github.com/lassik/emacs-ascii-table") (:commit . "dc3c91feff6282303b66816bdcee9e031558ff77") (:revdesc . "dc3c91feff62") (:keywords "help" "tools") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (asciidoc-mode . [(20260612 645) ((emacs (30 1))) "Major mode for AsciiDoc markup" tar ((:url . "https://github.com/bbatsov/asciidoc-mode") (:commit . "8914fad451f9c7f9c2286cf18db5edaa51a92cd7") (:revdesc . "8914fad451f9") (:keywords "text" "asciidoc" "languages" "tree-sitter") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (asdf-vm . [(20250710 1053) ((emacs (29 1))) "ASDF-VM porcelain" tar ((:url . "https://github.com/zellio/emacs-asdf-vm") (:commit . "f6dbb4b6560cd7e5bb05006e9fc416c5c323b567") (:revdesc . "f6dbb4b6560c") (:keywords "tools" "asdf-vm" "asdf") (:authors ("Zachary Elliott" . "contact@zell.io")) (:maintainers ("Zachary Elliott" . "contact@zell.io")) (:maintainer "Zachary Elliott" . "contact@zell.io"))])
+ (asilea . [(20150105 1525) ((emacs (24)) (cl-lib (0 5))) "Find best compiler options using simulated annealing" tar ((:url . "https://github.com/Fanael/asilea") (:commit . "2aab1cc63b64ef08d12e84fd7ba5c94065f6039f") (:revdesc . "2aab1cc63b64") (:authors ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (asm-blox . [(20240106 1930) ((emacs (26 1)) (yaml (0 5 1))) "Programming game involving WAT" tar ((:url . "https://github.com/zkry/asm-blox") (:commit . "6731d8e4f78d0b43ec9b90d8184c1d86d725ac7c") (:revdesc . "6731d8e4f78d") (:keywords "games"))])
+ (asn1-mode . [(20170729 226) ((emacs (24 3)) (s (1 10 0))) "ASN.1/GDMO mode for GNU Emacs" tar ((:url . "https://github.com/kawabata/asn1-mode/") (:commit . "d5d4a8259daf708411699bcea85d322f18beb972") (:revdesc . "d5d4a8259daf") (:keywords "languages" "processes" "tools") (:authors ("Taichi Kawabata" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi Kawabata" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi Kawabata" . "kawabata.taichi_at_gmail.com"))])
+ (assess . [(20240303 1454) ((emacs (24 4)) (m-buffer (0 15))) "Test support functions" tar ((:url . "https://github.com/phillord/assess") (:commit . "cadeb24a5d8261fad4bdfdc09e7d571cc395a6ca") (:revdesc . "cadeb24a5d82") (:authors ("Phillip Lord" . "phillip.lord@russet.org.uk")) (:maintainers ("Phillip Lord" . "phillip.lord@russet.org.uk")) (:maintainer "Phillip Lord" . "phillip.lord@russet.org.uk"))])
+ (ast-grep . [(20260702 238) ((emacs (28 1))) "Search code using ast-grep with completing-read interface" tar ((:url . "https://github.com/sunskyxh/ast-grep.el") (:commit . "28bc6e9ac21acf1d1ef58b962b6acd670c27e80f") (:revdesc . "28bc6e9ac21a") (:keywords "tools" "matching") (:authors ("SunskyXH" . "sunskyxh@gmail.com")) (:maintainers ("SunskyXH" . "sunskyxh@gmail.com")) (:maintainer "SunskyXH" . "sunskyxh@gmail.com"))])
+ (astro-ts-mode . [(20260711 131) ((emacs (31))) "Major mode for editing Astro templates" tar ((:url . "https://github.com/Sorixelle/astro-ts-mode") (:commit . "fcc299a0b5aade4fd996cbbb5db136348958ebe3") (:revdesc . "fcc299a0b5aa") (:keywords "languages") (:authors ("Ruby Iris Juric" . "ruby@srxl.me")) (:maintainers ("Ruby Iris Juric" . "ruby@srxl.me")) (:maintainer "Ruby Iris Juric" . "ruby@srxl.me"))])
+ (astute . [(20241015 444) ((emacs (25 1))) "A minor mode to redisplay `smart' typography" tar ((:url . "https://github.com/rnkn/astute") (:commit . "69d413c952771c0d06cda161fb25fe495fb895b0") (:revdesc . "69d413c95277") (:keywords "faces" "wp") (:authors ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainers ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainer "Paul W. Rankin" . "rnkn@rnkn.xyz"))])
+ (astyle . [(20200328 616) ((emacs (24 4)) (reformatter (0 3))) "Astyle formatter functions" tar ((:url . "https://github.com/storvik/emacs-astyle") (:commit . "04ff2941f08c4b731fe6a18ee1697436d1ca1cc0") (:revdesc . "04ff2941f08c") (:keywords "astyle" "c" "c++" "cpp" "reformatter"))])
+ (asx . [(20191024 1100) ((emacs (26 1))) "Ask StackExchange/StackOverflow" tar ((:url . "https://github.com/ragone/asx") (:commit . "5ca12cc51bb02b5926adf9a7976ba9ca08a1ea21") (:revdesc . "5ca12cc51bb0") (:keywords "convenience") (:authors ("Alex Ragone" . "ragonedk@gmail.com")) (:maintainers ("Alex Ragone" . "ragonedk@gmail.com")) (:maintainer "Alex Ragone" . "ragonedk@gmail.com"))])
+ (async . [(20260729 1431) ((emacs (24 4))) "Asynchronous processing in Emacs" tar ((:url . "https://github.com/jwiegley/emacs-async") (:commit . "4fdcb061a166e0d6ccc27d3829a28e04415ae825") (:revdesc . "4fdcb061a166") (:keywords "async") (:authors ("John Wiegley" . "jwiegley@gmail.com")) (:maintainers ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainer "Thierry Volpiatto" . "thievol@posteo.net"))])
+ (async-await . [(20220827 437) ((emacs (25 1)) (promise (1 1)) (iter2 (0 9 10))) "Async/Await" tar ((:url . "https://github.com/chuntaro/emacs-async-await") (:commit . "e0d15e8057ed7520100bc50c5552278292ebcb07") (:revdesc . "e0d15e8057ed") (:keywords "async" "await" "convenience") (:authors ("chuntaro" . "chuntaro@sakura-games.jp")) (:maintainers ("chuntaro" . "chuntaro@sakura-games.jp")) (:maintainer "chuntaro" . "chuntaro@sakura-games.jp"))])
+ (async-backup . [(20230412 1534) ((emacs (24 4))) "Backup on each save without freezing Emacs" tar ((:url . "https://codeberg.org/contrapunctus/async-backup") (:commit . "d07a7bd4a5c3332a8a585680d67925385c595927") (:revdesc . "d07a7bd4a5c3") (:keywords "files") (:authors ("contrapunctus" . "xmpp:contrapunctus@jabjab.de")) (:maintainers ("contrapunctus" . "xmpp:contrapunctus@jabjab.de")) (:maintainer "contrapunctus" . "xmpp:contrapunctus@jabjab.de"))])
+ (async-http-queue . [(20260316 755) ((emacs (28 1))) "Async HTTP queue with parallel fetching" tar ((:url . "https://git.andros.dev/andros/async-http-queue-el") (:commit . "bd37342372a0b24ce0d54e9dad8070af997b0a0b") (:revdesc . "bd37342372a0") (:keywords "comm" "processes" "http") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (async-job-queue . [(20230427 2122) ((async (1 4)) (emacs (25 1)) (queue (0 2))) "Dispatch queue of async jobs to a fixed number of slots" tar ((:url . "https://github.com/owinebar/emacs-async-job-queue") (:commit . "eeafcce7f960305666b2a51aec55cc6333f6af1b") (:revdesc . "eeafcce7f960") (:keywords "extensions" "lisp"))])
+ (async-status . [(20230821 204) ((emacs (28 1)) (svg-lib (0 2 7)) (posframe (1 4 2))) "A package for indicator support" tar ((:url . "https://github.com/seokbeomkim/async-status") (:commit . "d2f5becc9850c26aa71fb581f9fc389eac740f52") (:revdesc . "d2f5becc9850") (:keywords "tools" "async") (:authors ("Jason Kim" . "sukbeom.kim@gmail.com")) (:maintainers ("Jason Kim" . "sukbeom.kim@gmail.com")) (:maintainer "Jason Kim" . "sukbeom.kim@gmail.com"))])
+ (async1 . [(20260421 2116) ((emacs (24 1)) (compat (30 1))) "Unroll chain of async callbacks, parallel and sequencial" tar ((:url . "https://github.com/Anoncheg1/emacs-async1") (:commit . "88cccffe14bdd0a61dbb2e33edf8c335706f24dc") (:revdesc . "88cccffe14bd") (:keywords "tools" "async" "callback" "lisp" "extensions") (:authors (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainers (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainer nil . "github.com/Anoncheg1,codeberg.org/Anoncheg"))])
+ (asyncloop . [(20240818 1247) ((emacs (28))) "Non-blocking series of functions" tar ((:url . "https://github.com/meedstrom/asyncloop") (:commit . "7d60950d160098a879293e049b9863bc955f8666") (:revdesc . "7d60950d1600") (:keywords "tools") (:authors ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainers ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainer "Martin Edström" . "meedstrom91@gmail.com"))])
+ (atcoder-tools . [(20200109 1236) ((emacs (26)) (f (0 20)) (s (1 12))) "An atcoder-tools client" tar ((:url . "https://github.com/sei40kr/atcoder-tools") (:commit . "cfe61ed18ea9b3b1bfb6f9e7d80a47599680cd1f") (:revdesc . "cfe61ed18ea9") (:keywords "extensions" "tools") (:authors ("Seong Yong-ju" . "sei40kr@gmail.com")) (:maintainers ("Seong Yong-ju" . "sei40kr@gmail.com")) (:maintainer "Seong Yong-ju" . "sei40kr@gmail.com"))])
+ (atl-long-lines . [(20240101 929) ((emacs (24 3))) "Turn off truncate-lines when the line is long" tar ((:url . "https://github.com/jcs-elpa/atl-long-lines") (:commit . "82cdd4edefba2d5b1d491bf3fcc487385819d713") (:revdesc . "82cdd4edefba") (:keywords "convenience" "truncate" "lines" "auto" "long") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (atl-markup . [(20240101 933) ((emacs (24 3))) "Automatically truncate lines for markup languages" tar ((:url . "https://github.com/jcs-elpa/atl-markup") (:commit . "b616343ffe17060d521b214b8e90f5da1e880934") (:revdesc . "b616343ffe17") (:keywords "convenience" "automatic" "truncate" "visual" "lines") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (atom-dark-theme . [(20220114 1902) nil "An Emacs port of the Atom Dark theme from Atom.io" tar ((:url . "https://github.com/whitlockjc/atom-dark-theme-emacs") (:commit . "2b3c7ad42bbcab3214a131f8957b92e717b36ad3") (:revdesc . "2b3c7ad42bbc") (:keywords "themes" "atom" "dark") (:authors ("Jeremy Whitlock" . "jwhitlock@apache.org")) (:maintainers ("Jeremy Whitlock" . "jwhitlock@apache.org")) (:maintainer "Jeremy Whitlock" . "jwhitlock@apache.org"))])
+ (atom-one-dark-theme . [(20260821 352) nil "Atom One Dark color theme" tar ((:url . "https://github.com/jonathanchu/atom-one-dark-theme") (:commit . "4317f01ed554cbd60397243fda949800d1fa5ce1") (:revdesc . "4317f01ed554") (:keywords "faces") (:authors ("Jonathan Chu" . "me@jonathanchu.is")) (:maintainers ("Jonathan Chu" . "me@jonathanchu.is")) (:maintainer "Jonathan Chu" . "me@jonathanchu.is"))])
+ (atomic-chrome . [(20230304 112) ((emacs (24 4)) (let-alist (1 0 4)) (websocket (1 4))) "Edit Chrome text area with Emacs using Atomic Chrome" tar ((:url . "https://github.com/alpha22jp/atomic-chrome") (:commit . "f1b077be7e414f457191d72dcf5eedb4371f9309") (:revdesc . "f1b077be7e41") (:keywords "chrome" "edit" "textarea") (:authors ("alpha22jp" . "alpha22jp@gmail.com")) (:maintainers ("alpha22jp" . "alpha22jp@gmail.com")) (:maintainer "alpha22jp" . "alpha22jp@gmail.com"))])
+ (attrap . [(20260806 1537) ((dash (2 12 0)) (emacs (25 1)) (f (0 19 0)) (s (1 11 0))) "ATtempt To Repair At Point" tar ((:url . "https://github.com/jyp/attrap") (:commit . "22d68a9f8270c5e7d1ab02e01d84f3e45a630a49") (:revdesc . "22d68a9f8270") (:keywords "programming" "tools") (:authors ("Jean-Philippe Bernardy" . "jeanphilippe.bernardy@gmail.com")) (:maintainers ("Jean-Philippe Bernardy" . "jeanphilippe.bernardy@gmail.com")) (:maintainer "Jean-Philippe Bernardy" . "jeanphilippe.bernardy@gmail.com"))])
+ (auctex-cluttex . [(20240519 1303) ((emacs (24 4)) (auctex (13 1))) "ClutTeX support for AUCTeX" tar ((:url . "https://github.com/tsuu32/auctex-cluttex") (:commit . "1a940892dcbe3e4874d2d60db92de1cb34a1b773") (:revdesc . "1a940892dcbe") (:keywords "tex") (:authors ("Masahiro Nakamura" . "tsuucat@icloud.com")) (:maintainers ("Masahiro Nakamura" . "tsuucat@icloud.com")) (:maintainer "Masahiro Nakamura" . "tsuucat@icloud.com"))])
+ (auctex-latexmk . [(20221025 1219) ((auctex (11 87))) "Add LatexMk support to AUCTeX" tar ((:url . "https://github.com/tom-tan/auctex-latexmk/") (:commit . "b00a95e6b34c94987fda5a57c20cfe2f064b1c7a") (:revdesc . "b00a95e6b34c") (:keywords "tex") (:authors ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainers ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainer "Tomoya Tanjo" . "ttanjo@gmail.com"))])
+ (auctex-lua . [(20151121 1610) ((auctex (11 86)) (lua-mode (20130419))) "Lua editing support for AUCTeX" tar ((:url . "https://github.com/vermiculus/auctex-lua") (:commit . "799cd8ac10c96991bb63d9aa60528ae5d8c786b5") (:revdesc . "799cd8ac10c9") (:keywords "latex" "lua") (:authors ("Sean Allred" . "(seallred@smcm.edu)")) (:maintainers ("Sean Allred" . "(seallred@smcm.edu)")) (:maintainer "Sean Allred" . "(seallred@smcm.edu)"))])
+ (audacious . [(20210917 51) ((helm (3 6 2)) (emacs (24 4))) "Emacs interface to control audacious" tar ((:url . "https://github.com/shishimaru/audacious.el") (:commit . "65c37f12a5c774a0ae434beee27ff7737006dd2f") (:revdesc . "65c37f12a5c7") (:authors ("Hitoshi Uchida" . "hitoshi.uchida@gmail.com")) (:maintainers ("Hitoshi Uchida" . "hitoshi.uchida@gmail.com")) (:maintainer "Hitoshi Uchida" . "hitoshi.uchida@gmail.com"))])
+ (audio-notes-mode . [(20170611 2159) nil "Play audio notes synced from somewhere else" tar ((:url . "https://github.com/Bruce-Connor/audio-notes-mode") (:commit . "fa38350829c7e97257efc746a010471d33748a68") (:revdesc . "fa38350829c7") (:keywords "hypermedia" "convenience") (:authors ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainers ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainer "Artur Malabarba" . "bruce.connor.am@gmail.com"))])
+ (aurel . [(20260429 458) ((emacs (29 1)) (bui (1 1 0))) "Search, get info, vote for and download AUR packages" tar ((:url . "https://github.com/alezost/aurel") (:commit . "c571cc44ea3b9aa96399056bff22919efffbbb06") (:revdesc . "c571cc44ea3b") (:keywords "tools") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (aurora-config-mode . [(20180216 2302) nil "Major mode for Apache Aurora configuration files" tar ((:url . "https://github.com/bdd/aurora-config.el") (:commit . "8273ec7937a21b469b9dbb6c11714255b890f410") (:revdesc . "8273ec7937a2") (:keywords "languages" "configuration") (:authors ("Berk D. Demir" . "bdd@mindcast.org")) (:maintainers ("Berk D. Demir" . "bdd@mindcast.org")) (:maintainer "Berk D. Demir" . "bdd@mindcast.org"))])
+ (australia-holidays . [(20250706 1213) ((emacs (24 1))) "Australian holidays for calendar" tar ((:url . "https://github.com/jmibanez/australia-holidays.el") (:commit . "a73bbc940bc953164b8ed77e61e65a7a3aff4da5") (:revdesc . "a73bbc940bc9") (:keywords "calendar") (:authors ("JM Ibañez" . "jm@jmibanez.com")) (:maintainers ("JM Ibañez" . "jm@jmibanez.com")) (:maintainer "JM Ibañez" . "jm@jmibanez.com"))])
+ (auth-source-1password . [(20260825 439) ((emacs (24 4))) "1password integration for auth-source" tar ((:url . "https://github.com/dlobraico") (:commit . "957bd9b3da51022a9d74610117621738fcec2de4") (:revdesc . "957bd9b3da51") (:authors ("Dominick LoBraico" . "auth-source-1password@lobrai.co")) (:maintainers ("Dominick LoBraico" . "auth-source-1password@lobrai.co")) (:maintainer "Dominick LoBraico" . "auth-source-1password@lobrai.co"))])
+ (auth-source-gopass . [(20230109 1213) ((emacs (24 4))) "Gopass integration for auth-source" tar ((:url . "https://github.com/") (:commit . "6f7f0cc0d682f66d11f7fac4fa5c1e79904232da") (:revdesc . "6f7f0cc0d682") (:authors ("Markus M. May" . "mmay@javafreedom.org")) (:maintainers ("Markus M. May" . "mmay@javafreedom.org")) (:maintainer "Markus M. May" . "mmay@javafreedom.org"))])
+ (auth-source-keytar . [(20251231 1726) ((emacs (24 4)) (keytar (0 1 2)) (s (1 12 0))) "Integrate auth-source with keytar" tar ((:url . "https://github.com/emacs-grammarly/auth-source-keytar") (:commit . "ae32dd807aa3cff59e4384ce8c9d7de259e45998") (:revdesc . "ae32dd807aa3") (:keywords "convenience" "keytar" "password" "credential" "secret" "security") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (auth-source-kwallet . [(20250419 1330) ((emacs (24 4))) "KWallet integration for auth-source" tar ((:url . "https://github.com/vaartis/auth-source-kwallet") (:commit . "1e1bff2403966c3a0683ee65fb28cb8d8ff2c389") (:revdesc . "1e1bff240396") (:authors ("Ekaterina Vaartis" . "vaartis@kotobank.ch")) (:maintainers ("Ekaterina Vaartis" . "vaartis@kotobank.ch")) (:maintainer "Ekaterina Vaartis" . "vaartis@kotobank.ch"))])
+ (auth-source-xoauth2 . [(20220804 2219) ((emacs (26 1))) "Integrate auth-source with XOAUTH2" tar ((:url . "https://github.com/ccrusius/auth-source-xoauth2") (:commit . "99a03f8ce835412943d311b2746e77fcf5a1b500") (:revdesc . "99a03f8ce835") (:authors ("Cesar Crusius" . "ccrusius@google.com")) (:maintainers ("Cesar Crusius" . "ccrusius@google.com")) (:maintainer "Cesar Crusius" . "ccrusius@google.com"))])
+ (auto-async-byte-compile . [(20160916 454) nil "Automatically byte-compile when saved" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/auto-async-byte-compile.el") (:commit . "8681e74ddb8481789c5dbb3cafabb327db4c4484") (:revdesc . "8681e74ddb84") (:keywords "lisp" "convenience") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (auto-auto-indent . [(20131106 1903) ((es-lib (0 1)) (cl-lib (1 0))) "Indents code as you type" tar ((:url . "https://github.com/sabof/auto-auto-indent") (:commit . "0139378577f936d34b20276af6f022fb457af490") (:revdesc . "0139378577f9"))])
+ (auto-capitalize . [(20260813 619) ((emacs (28 1)) (compat (31 0))) "Automatic capitalization with batteries included" tar ((:url . "https://github.com/abdulnafe-t/auto-capitalize.el") (:commit . "b19e574cb374f96f96704a427fa6fc565e29d095") (:revdesc . "b19e574cb374") (:keywords "text" "wp" "convenience") (:maintainers ("Abdulnafé Toulaïmat" . "abdulnafe.toulaimat@gmail.com")) (:maintainer "Abdulnafé Toulaïmat" . "abdulnafe.toulaimat@gmail.com"))])
+ (auto-compile . [(20260601 1449) ((emacs (28 1))) "Automatically compile Emacs Lisp libraries" tar ((:url . "https://github.com/emacscollective/auto-compile") (:commit . "4db3a0e497feecc8b3dbeeefacdf363ae60a6392") (:revdesc . "4db3a0e497fe") (:keywords "compile" "convenience" "lisp") (:authors ("Jonas Bernoulli" . "emacs.auto-compile@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.auto-compile@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.auto-compile@jonas.bernoulli.dev"))])
+ (auto-complete . [(20251231 1622) ((emacs (25 1)) (popup (0 5 8))) "Auto Completion for GNU Emacs" tar ((:url . "https://github.com/auto-complete/auto-complete") (:commit . "07f9915e08342410b933145d7934998709753a29") (:revdesc . "07f9915e0834") (:keywords "completion" "convenience") (:authors ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (auto-complete-auctex . [(20140223 1758) ((yasnippet (0 6 1)) (auto-complete (1 4))) "Auto-completion for auctex" tar ((:url . "https://github.com/emacsattic/auto-complete-auctex") (:commit . "855633f668bcc4b9408396742a7cb84e0c4a2f77") (:revdesc . "855633f668bc") (:authors ("Christopher Monsanto" . "chris@monsan.to")) (:maintainers ("Christopher Monsanto" . "chris@monsan.to")) (:maintainer "Christopher Monsanto" . "chris@monsan.to"))])
+ (auto-complete-c-headers . [(20150912 323) ((auto-complete (1 4))) "An auto-complete source for C/C++ header files" tar ((:url . "https://github.com/mooz/auto-complete-c-headers") (:commit . "52fef720c6f274ad8de52bef39a343421006c511") (:revdesc . "52fef720c6f2") (:keywords "c") (:authors ("Masafumi Oyamada" . "stillpedant@gmail.com")) (:maintainers ("Masafumi Oyamada" . "stillpedant@gmail.com")) (:maintainer "Masafumi Oyamada" . "stillpedant@gmail.com"))])
+ (auto-complete-chunk . [(20140225 946) ((auto-complete (1 4))) "Auto-completion for dot.separated.words" tar ((:url . "https://github.com/tkf/auto-complete-chunk") (:commit . "a9aa77ffb84a1037984a7ce4dda25074272f13fe") (:revdesc . "a9aa77ffb84a"))])
+ (auto-complete-clang . [(20140409 752) ((auto-complete (1 3 1))) "Auto Completion source for clang for GNU Emacs" tar ((:url . "https://github.com/brianjcj/auto-complete-clang") (:commit . "a195db1d0593b4fb97efe50885e12aa6764d998c") (:revdesc . "a195db1d0593") (:keywords "completion" "convenience") (:authors ("Brian Jiang" . "brianjcj@gmail.com")) (:maintainers ("Brian Jiang" . "brianjcj@gmail.com")) (:maintainer "Brian Jiang" . "brianjcj@gmail.com"))])
+ (auto-complete-clang-async . [(20130526 1527) nil "Auto Completion source for clang for GNU Emacs" tar ((:url . "https://github.com/Golevka/emacs-clang-complete-async") (:commit . "a5114e3477793ccb9420acc5cd6a1cb26be65964") (:revdesc . "a5114e347779") (:keywords "completion" "convenience") (:authors ("Brian Jiang" . "brianjcj@gmail.com") ("Taylan Ulrich Bayirli/Kammer" . "taylanbayirli@gmail.com")) (:maintainers ("Brian Jiang" . "brianjcj@gmail.com") ("Taylan Ulrich Bayirli/Kammer" . "taylanbayirli@gmail.com")) (:maintainer "Brian Jiang" . "brianjcj@gmail.com"))])
+ (auto-complete-distel . [(20180827 1344) ((auto-complete (1 4)) (distel-completion-lib (1 0 0))) "Erlang/distel completion backend for auto-complete-mode" tar ((:url . "github.com/sebastiw/distel-completion") (:commit . "acc4c0a5521904203d797fe96b08e5fae4233c7e") (:revdesc . "acc4c0a55219") (:keywords "erlang" "distel" "auto-complete"))])
+ (auto-complete-exuberant-ctags . [(20140320 724) ((auto-complete (1 4 0))) "Exuberant ctags auto-complete.el source" tar ((:url . "http://code.101000lab.org") (:commit . "ff6121ff8b71beb5aa606d28fd389c484ed49765") (:revdesc . "ff6121ff8b71") (:keywords "anto-complete" "exuberant ctags") (:authors ("Kenichirou Oyama" . "k1lowxb@gmail.com")) (:maintainers ("Kenichirou Oyama" . "k1lowxb@gmail.com")) (:maintainer "Kenichirou Oyama" . "k1lowxb@gmail.com"))])
+ (auto-complete-nxml . [(20140221 458) ((auto-complete (1 4))) "Do completion by auto-complete.el on nXML-mode" tar ((:url . "https://github.com/aki2o/auto-complete-nxml") (:commit . "ac7b09a23e45f9bd02affb31847263de4180163a") (:revdesc . "ac7b09a23e45") (:keywords "completion" "html" "xml") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (auto-complete-pcmp . [(20140303 255) ((auto-complete (1 4 0)) (log4e (0 2 0)) (yaxception (0 1))) "Provide auto-complete sources using pcomplete results" tar ((:url . "https://github.com/aki2o/auto-complete-pcmp") (:commit . "2595d3dab1ef3549271ca922f212928e9d830eec") (:revdesc . "2595d3dab1ef") (:keywords "completion") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (auto-complete-rst . [(20140225 944) ((auto-complete (1 4))) "Auto-complete extension for ReST and Sphinx" tar ((:url . "https://github.com/tkf/auto-complete-rst") (:commit . "4803ce41a96224e6fa54e6741a5b5f40ebed7351") (:revdesc . "4803ce41a962"))])
+ (auto-complete-sage . [(20160514 751) ((auto-complete (1 5 1)) (sage-shell-mode (0 1 0))) "An auto-complete source for sage-shell-mode" tar ((:url . "https://github.com/stakemori/auto-complete-sage") (:commit . "51b8e3905196d266e1f8aa47881189833151b398") (:revdesc . "51b8e3905196") (:keywords "sage" "math" "auto-complete") (:authors ("Sho Takemori" . "stakemorii@gmail.com")) (:maintainers ("Sho Takemori" . "stakemorii@gmail.com")) (:maintainer "Sho Takemori" . "stakemorii@gmail.com"))])
+ (auto-dark . [(20260313 2356) ((emacs (24 4))) "Automatically set the dark-mode theme based on system status" tar ((:url . "https://github.com/LionyxML/auto-dark-emacs") (:commit . "6d1e8d2fc493dccbf05c9191611805c7e7881c70") (:revdesc . "6d1e8d2fc493") (:keywords "macos" "windows" "linux" "themes" "tools" "faces") (:authors ("Tim Harper" . "timcharperatgmaildotcom") ("Vincent Zhang" . "seagle0128@gmail.com") ("Jonathan Arnett" . "jonathan.arnett@protonmail.com") ("Greg Pfeil" . "greg@technomadic.org")) (:maintainers ("Tim Harper" . "timcharperatgmaildotcom") ("Vincent Zhang" . "seagle0128@gmail.com") ("Jonathan Arnett" . "jonathan.arnett@protonmail.com") ("Greg Pfeil" . "greg@technomadic.org")) (:maintainer "Tim Harper" . "timcharperatgmaildotcom"))])
+ (auto-dictionary . [(20150410 1610) nil "Automatic dictionary switcher for flyspell" tar ((:url . "http://nschum.de/src/emacs/auto-dictionary/") (:commit . "b364e08009fe0062cf0927d8a0582fad5a12b8e7") (:revdesc . "b364e08009fe") (:keywords "wp") (:authors ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainers ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainer "Nikolaj Schumacher" . "bugs*nschumde"))])
+ (auto-dim-other-buffers . [(20260731 1220) ((emacs (27 1))) "Makes windows without focus less prominent" tar ((:url . "https://github.com/mina86/auto-dim-other-buffers.el") (:commit . "640a32f6ccdd9d93279342882be2389e1d3abd01") (:revdesc . "640a32f6ccdd") (:keywords "faces") (:authors ("Michal Nazarewicz" . "mina86@mina86.com")) (:maintainers ("Michal Nazarewicz" . "mina86@mina86.com")) (:maintainer "Michal Nazarewicz" . "mina86@mina86.com"))])
+ (auto-highlight-symbol . [(20260101 552) ((emacs (26 1)) (ht (2 3))) "Automatic highlighting current symbol minor mode" tar ((:url . "https://github.com/elp-revive/auto-highlight-symbol") (:commit . "e84da32e7cf1baefb0a9eef42a2fc842cf18f8b3") (:revdesc . "e84da32e7cf1") (:keywords "highlight" "face" "match" "convenience") (:authors ("Mitsuo Saito" . "arch320@NOSPAM.gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (auto-indent-mode . [(20211029 11) nil "Auto indent Minor mode" tar ((:url . "https://github.com/mlf176f2/auto-indent-mode.el/") (:commit . "664006b67329a8e27330541547f8c2187dab947c") (:revdesc . "664006b67329") (:keywords "auto" "indentation"))])
+ (auto-minor-mode . [(20180527 1123) ((emacs (24 4))) "Enable minor modes by file name and contents" tar ((:url . "https://github.com/joewreschnig/auto-minor-mode") (:commit . "c62f4e04c7b73835c399f0348bea0ade2720bcbb") (:revdesc . "c62f4e04c7b7") (:keywords "convenience") (:authors ("Joe Wreschnig" . "joe.wreschnig@gmail.com")) (:maintainers ("Joe Wreschnig" . "joe.wreschnig@gmail.com")) (:maintainer "Joe Wreschnig" . "joe.wreschnig@gmail.com"))])
+ (auto-org-md . [(20180213 2343) ((emacs (24 4))) "Export a markdown file automatically when you save an org-file" tar ((:url . "https://github.com/jamcha-aa/auto-org-md") (:commit . "9318338bdb7fe8bd698d88f3af89b2d6413efdd2") (:revdesc . "9318338bdb7f") (:keywords "org" "markdown") (:authors ("jamcha" . "jamcha.aa@gmail.com")) (:maintainers ("jamcha" . "jamcha.aa@gmail.com")) (:maintainer "jamcha" . "jamcha.aa@gmail.com"))])
+ (auto-package-update . [(20260601 1804) ((emacs (24 4)) (dash (2 1 0))) "Automatically update Emacs packages" tar ((:url . "https://github.com/rranelli/auto-package-update.el") (:commit . "e966c6c95de1742d867250dc15b1c6bd570b6ea5") (:revdesc . "e966c6c95de1") (:keywords "package" "update"))])
+ (auto-pause . [(20160426 1216) ((emacs (24 4))) "Run processes which will be paused when Emacs is idle" tar ((:url . "https://github.com/lujun9972/auto-pause") (:commit . "a4d778de774ca3895542cb559a953e0d98657338") (:revdesc . "a4d778de774c") (:keywords "convenience" "menu") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (auto-read-only . [(20260521 1659) ((emacs (25 1)) (cl-lib (0 5))) "Automatically make the buffer to read-only" tar ((:url . "https://github.com/zonuexe/auto-read-only.el") (:commit . "206d4559762fe6ef9e91de8f9dc43e1e41c0f42c") (:revdesc . "206d4559762f") (:keywords "files" "convenience") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (auto-rename-tag . [(20260101 547) ((emacs (24 4))) "Automatically rename paired HTML/XML tag" tar ((:url . "https://github.com/emacs-vs/auto-rename-tag") (:commit . "ace6de8bc8200aa9c9f37c8266d0e1b51627b559") (:revdesc . "ace6de8bc820") (:keywords "convenience" "auto-complete" "html" "rename" "tag" "xml") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (auto-save-buffers-enhanced . [(20161109 710) nil "Automatically save buffers in a decent way" tar ((:url . "https://github.com/kentaro/auto-save-buffers-enhanced") (:commit . "461e8c816c1b7c650be5f209078b381fe55da8c6") (:revdesc . "461e8c816c1b") (:authors ("Kentaro Kuribayashi" . "kentarok@gmail.com")) (:maintainers ("Kentaro Kuribayashi" . "kentarok@gmail.com")) (:maintainer "Kentaro Kuribayashi" . "kentarok@gmail.com"))])
+ (auto-save-visited-local-mode . [(20251021 1126) ((emacs (26 1))) "Buffer-local auto-save for visited files" tar ((:url . "https://github.com/pierrelegall/auto-save-visited-local-mode") (:commit . "78a46d8a02360b4c63e45496bd32efe351459c81") (:revdesc . "78a46d8a0236") (:keywords "convenience" "files" "autosave") (:authors ("Pierre Le Gall" . "pierre@legall.im")) (:maintainers ("Pierre" . "pierre@legall.im")) (:maintainer "Pierre" . "pierre@legall.im"))])
+ (auto-shell-command . [(20180817 1502) ((deferred (20130312)) (popwin (20130329))) "Run the shell command asynchronously that you specified when you save the file" tar ((:url . "https://github.com/ongaeshi/auto-shell-command") (:commit . "a8f9213e3c773b5687b81881240e6e648f2f56ba") (:revdesc . "a8f9213e3c77") (:keywords "shell" "save" "async" "deferred" "auto"))])
+ (auto-side-windows . [(20260817 1434) ((emacs (30 1))) "Simplified buffer management for side windows" tar ((:url . "https://github.com/MArpogaus/auto-side-windows") (:commit . "cf06db76c65aef2443557340cb06c3a6527186b2") (:revdesc . "cf06db76c65a") (:keywords "convenience" "windows" "buffers") (:authors ("Marcel Arpogaus" . "znepry.necbtnhf@tznvy.pbz")) (:maintainers ("Marcel Arpogaus" . "znepry.necbtnhf@tznvy.pbz")) (:maintainer "Marcel Arpogaus" . "znepry.necbtnhf@tznvy.pbz"))])
+ (auto-sort-mode . [(20230827 2124) ((emacs (24 1))) "Automatically sort lines between two delimiters" tar ((:url . "https://github.com/rweir/auto-sort-mode") (:commit . "3ffa4e2a76a6dda949fdfd200f623a17c4796559") (:revdesc . "3ffa4e2a76a6") (:keywords "sorting" "sort" "matching" "tools") (:authors ("Rob Weir" . "rweir@ertius.org")) (:maintainers ("Rob Weir" . "rweir@ertius.org")) (:maintainer "Rob Weir" . "rweir@ertius.org"))])
+ (auto-space-mode . [(20260806 638) ((emacs (29 1))) "Auto add space between CJK and ASCII" tar ((:url . "https://github.com/wowhxj/auto-space-mode") (:commit . "9c474bc294d77ca6af7fcb248919765d96d3bb5f") (:revdesc . "9c474bc294d7") (:keywords "convenience" "wp") (:authors ("Randolph" . "xiaojianghuang@yahoo.com")) (:maintainers ("Randolph" . "xiaojianghuang@yahoo.com")) (:maintainer "Randolph" . "xiaojianghuang@yahoo.com"))])
+ (auto-sudoedit . [(20260420 832) ((emacs (26 1)) (f (0 19 0))) "Auto sudo edit by tramp" tar ((:url . "https://github.com/ncaq/auto-sudoedit") (:commit . "b792e82a2e55be18c5fe945213325d6c84a2813c") (:revdesc . "b792e82a2e55") (:authors ("ncaq" . "ncaq@ncaq.net")) (:maintainers ("ncaq" . "ncaq@ncaq.net")) (:maintainer "ncaq" . "ncaq@ncaq.net"))])
+ (auto-virtualenv . [(20260106 1436) ((cl-lib (0 5))) "Automatically activate Python virtualenvs based on project directory" tar ((:url . "https://github.com/marcwebbie/auto-virtualenv") (:commit . "0b6ba18f0b449a40e9ff438b4e910b58b8804282") (:revdesc . "0b6ba18f0b44") (:keywords "python" "virtualenv" "environment" "tools" "projects") (:authors ("Marcwebbie" . "marcwebbie@gmail.com")) (:maintainers ("Marcwebbie" . "marcwebbie@gmail.com")) (:maintainer "Marcwebbie" . "marcwebbie@gmail.com"))])
+ (auto-virtualenvwrapper . [(20230317 1313) ((cl-lib (1 0)) (s (1 13 0)) (virtualenvwrapper (0))) "Lightweight auto activate python virtualenvs" tar ((:url . "https://github.com/robert-zaremba/auto-virtualenvwrapper.el") (:commit . "8cc2616af46d7e26c1d9ecea5fffd8974e5b1acb") (:revdesc . "8cc2616af46d") (:keywords "python" "virtualenv" "tools") (:authors ("Marcwebbie" . "marcwebbie@gmail.com") ("Robert Zaremba" . "robert-zaremba@scale-it.pl")) (:maintainers ("Marcwebbie" . "marcwebbie@gmail.com") ("Robert Zaremba" . "robert-zaremba@scale-it.pl")) (:maintainer "Marcwebbie" . "marcwebbie@gmail.com"))])
+ (auto-yasnippet . [(20230208 331) ((yasnippet (0 14 0)) (emacs (25 1))) "Quickly create disposable yasnippets" tar ((:url . "https://github.com/abo-abo/auto-yasnippet") (:commit . "6a9e406d0d7f9dfd6dff7647f358cb05a0b1637e") (:revdesc . "6a9e406d0d7f") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com") ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (autobookmarks . [(20220509 1712) ((dash (2 10 0)) (cl-lib (0 5))) "Save recently visited files and buffers" tar ((:url . "https://github.com/Fuco1/autobookmarks") (:commit . "8acd6f182181e23257e01c1b5cf90b872507a74d") (:revdesc . "8acd6f182181") (:keywords "files") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (autobuild . [(20240430 1600) ((emacs (26 1)) (selcand (0 0 3))) "Define and execute build rules and compilation pipelines" tar ((:url . "https://github.com/erjoalgo/autobuild") (:commit . "4760f6ea843d5d15c3fcf7cbf6b69153b61739fa") (:revdesc . "4760f6ea843d") (:keywords "compile" "build" "pipeline" "autobuild" "extensions" "processes" "tools") (:maintainers ("concat \"erjoalgo\" \"@\" \"gmail\" \".com\"" . "")) (:maintainer "concat \"erjoalgo\" \"@\" \"gmail\" \".com\"" . ""))])
+ (autodisass-java-bytecode . [(20230907 1729) nil "Automatically disassemble Java bytecode" tar ((:url . "https://github.com/gbalats/autodisass-java-bytecode") (:commit . "02788145f5c70e9004c4eba5acffbb584fe7de37") (:revdesc . "02788145f5c7") (:keywords "convenience" "data" "files") (:authors ("George Balatsouras" . "gbalatsgmailcom")) (:maintainers ("George Balatsouras" . "gbalatsgmailcom")) (:maintainer "George Balatsouras" . "gbalatsgmailcom"))])
+ (autodisass-llvm-bitcode . [(20150411 125) nil "Automatically disassemble LLVM bitcode" tar ((:url . "https://github.com/gbalats/autodisass-llvm-bitcode") (:commit . "14bb1bfe2be3b04d6e0c87a7a9d1e88ce15506d0") (:revdesc . "14bb1bfe2be3") (:keywords "convenience" "data" "files") (:authors ("George Balatsouras" . "gbalatsgmailcom")) (:maintainers ("George Balatsouras" . "gbalatsgmailcom")) (:maintainer "George Balatsouras" . "gbalatsgmailcom"))])
+ (automoji . [(20250814 2054) ((emacs (29 1))) "Discord-like emoji completion" tar ((:url . "https://github.com/Dev380/automoji-el") (:commit . "725e6915f9976bd7fd87a4daa7dc9f1968bcfe23") (:revdesc . "725e6915f997") (:keywords "completion" "abbrev" "convenience" "text"))])
+ (autoscratch . [(20251217 1834) ((emacs (24 1))) "Automatically switch scratch buffer mode" tar ((:url . "https://codeberg.org/scip/autoscratch") (:commit . "c56cc89dc4a51e0d5966391d78849dc391634bb5") (:revdesc . "c56cc89dc4a5") (:keywords "convenience" "buffer" "scrach") (:authors ("T.v.Dein" . "tlinden@cpan.org")) (:maintainers ("T.v.Dein" . "tlinden@cpan.org")) (:maintainer "T.v.Dein" . "tlinden@cpan.org"))])
+ (autotetris-mode . [(20141114 1646) ((cl-lib (0 5))) "Automatically play tetris" tar ((:url . "https://github.com/skeeto/autotetris-mode") (:commit . "7d348d33829bc89ddbd2b4d5cfe5073c3b0cbaaa") (:revdesc . "7d348d33829b") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainer "Christopher Wellons" . "wellons@nullprogram.com"))])
+ (autothemer . [(20260530 2349) ((dash (2 10 0)) (emacs (26 1))) "Conveniently define themes" tar ((:url . "https://github.com/jasonm23/autothemer") (:commit . "99fd9b45ef6cc931fcf030b1a6c050ca3c17ce04") (:revdesc . "99fd9b45ef6c") (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (autumn-light-theme . [(20150515 1447) nil "A light color theme with muted, autumnal colors" tar ((:url . "https://github.com/aalpern/emacs-color-theme-autumn-light") (:commit . "26a52a79e7fff401af6d24c4365bb4a250c1136a") (:revdesc . "26a52a79e7ff") (:keywords "color" "theme") (:authors ("Adam Alpern" . "adam.alpern@gmail.com")) (:maintainers ("Adam Alpern" . "adam.alpern@gmail.com")) (:maintainer "Adam Alpern" . "adam.alpern@gmail.com"))])
+ (avandu . [(20221106 834) nil "Gateway to Tiny Tiny RSS" tar ((:url . "https://github.com/ryuslash/avandu") (:commit . "f064cd62f878d945cc2f202cda9a1a82b39d9e22") (:revdesc . "f064cd62f878") (:keywords "net") (:authors ("Tom Willemse" . "tom@ryuslash.org")) (:maintainers ("Tom Willemse" . "tom@ryuslash.org")) (:maintainer "Tom Willemse" . "tom@ryuslash.org"))])
+ (avk-emacs-themes . [(20230825 922) nil "Collection of avk themes" tar ((:url . "https://github.com/avkoval/avk-emacs-themes") (:commit . "abe6fd059e0a7e8fcf2eb95b16c3dfac5620b1e7") (:revdesc . "abe6fd059e0a") (:keywords "theme") (:authors ("Alex V. Koval" . "alex@koval.kharkov.ua")) (:maintainers ("Alex V. Koval" . "alex@koval.kharkov.ua")) (:maintainer "Alex V. Koval" . "alex@koval.kharkov.ua"))])
+ (avy . [(20241101 1357) ((emacs (24 1)) (cl-lib (0 5))) "Jump to arbitrary positions in visible text and select text quickly" tar ((:url . "https://github.com/abo-abo/avy") (:commit . "933d1f36cca0f71e4acb5fac707e9ae26c536264") (:revdesc . "933d1f36cca0") (:keywords "point" "location") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (avy-act . [(20251104 1920) ((avy (0 5 0)) (emacs (29 1))) "Commands that let avy act from a distance" tar ((:url . "https://gitlab.com/nameiwillforget/avy-act") (:commit . "61b0bf036da3755ded04f8bc295a8a54407ea758") (:revdesc . "61b0bf036da3") (:keywords "tools" "convenience") (:authors ("Alexander Prähauser" . "ahprae@protonmail.com")) (:maintainers ("Alexander Prähauser" . "ahprae@protonmail.com")) (:maintainer "Alexander Prähauser" . "ahprae@protonmail.com"))])
+ (avy-embark-collect . [(20260404 2302) ((emacs (29 1)) (embark (1 1)) (avy (0 5))) "Use avy to jump to Embark Collect entries" tar ((:url . "https://github.com/oantolin/embark") (:commit . "27de48004242e98586b9c9661fdb6912f26fe70f") (:revdesc . "27de48004242") (:keywords "convenience") (:authors ("Omar Antolín Camarena" . "omar@matem.unam.mx")) (:maintainers ("Omar Antolín Camarena" . "omar@matem.unam.mx")) (:maintainer "Omar Antolín Camarena" . "omar@matem.unam.mx"))])
+ (avy-flycheck . [(20260815 506) ((emacs (24 1)) (flycheck (0 14)) (seq (1 11)) (avy (0 4 0))) "Jump to and fix syntax errors using `flycheck' with `avy' interface" tar ((:url . "https://github.com/magicdirac/avy-flycheck") (:commit . "2279e2461d4a1ec1481e760c911defd84fc91742") (:revdesc . "2279e2461d4a") (:keywords "tools" "convenience" "avy" "flycheck") (:authors ("Xu Ma" . "magicdirac@gmail.com")) (:maintainers ("Xu Ma" . "magicdirac@gmail.com")) (:maintainer "Xu Ma" . "magicdirac@gmail.com"))])
+ (avy-menu . [(20260802 951) ((emacs (24 4)) (avy (0 4 0))) "Library providing avy-powered popup menu" tar ((:url . "https://github.com/mrkkrp/avy-menu") (:commit . "881a7018e2de41bc98ac011e4b345a1750dc1e95") (:revdesc . "881a7018e2de") (:keywords "convenience") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (avy-migemo . [(20180716 1455) ((emacs (24 4)) (avy (0 4 0)) (migemo (1 9))) "Avy with migemo" tar ((:url . "https://github.com/momomo5717/avy-migemo") (:commit . "922a6dd82c0bfa316b0fbb56a9d4dd4ffa5707e7") (:revdesc . "922a6dd82c0b") (:keywords "avy" "migemo"))])
+ (avy-zap . [(20190801 329) ((avy (0 2 0))) "Zap to char using `avy'" tar ((:url . "https://github.com/cute-jumper/avy-zap") (:commit . "7c8d1f40e43d03e2f6c1696bfa547526528ce8cb") (:revdesc . "7c8d1f40e43d") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (awk-ts-mode . [(20240517 1251) ((emacs (29 1))) "Major mode for awk using tree-sitter" tar ((:url . "https://github.com/nverno/awk-ts-mode") (:commit . "343d19c5b3c99f1a665d0c6bddb7b18278306b06") (:revdesc . "343d19c5b3c9") (:keywords "awk" "languages" "tree-sitter") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (awk-yasnippets . [(20230515 1756) ((emacs (26 3)) (yasnippet (0 8 0))) "Yasnippets for AWK" tar ((:url . "https://github.com/uberkael/awk-yasnippets") (:commit . "12e8e0b49878099bda5d3e4915cc3c738c87b95c") (:revdesc . "12e8e0b49878") (:keywords "extensions") (:maintainers ("Adriano Martinez" . "uberkael@gmail.com")) (:maintainer "Adriano Martinez" . "uberkael@gmail.com"))])
+ (awqat . [(20260613 2054) ((emacs (28 1)) (alert (1 2))) "Islamic prayer times" tar ((:url . "https://github.com/zkry/awqat") (:commit . "0ef8501dc31774cbc6b17f8b899609a45c1fe0c7") (:revdesc . "0ef8501dc317") (:authors ("Zachary Romero" . "zacromero@posteo.net")) (:maintainers ("Zachary Romero" . "zacromero@posteo.net")) (:maintainer "Zachary Romero" . "zacromero@posteo.net"))])
+ (aws-ec2 . [(20221011 538) ((emacs (24 4)) (dash (2 12 1)) (tblui (0 1 0))) "Manage AWS EC2 instances" tar ((:url . "https://github.com/Yuki-Inoue/aws.el") (:commit . "7b500097ac3c2addbe1644f78595dc2ea4eb87c4") (:revdesc . "7b500097ac3c") (:authors ("Yuki Inoue" . "inouetakahiroki_at_gmail.com")) (:maintainers ("Yuki Inoue" . "inouetakahiroki_at_gmail.com")) (:maintainer "Yuki Inoue" . "inouetakahiroki_at_gmail.com"))])
+ (aws-snippets . [(20191203 1553) ((yasnippet (0 8 0))) "Yasnippets for AWS" tar ((:url . "https://github.com/baron42bba/aws-snippets") (:commit . "557d19a0bc486e0fddb597b2be5087769d9bd47e") (:revdesc . "557d19a0bc48") (:keywords "snippets"))])
+ (awscli-capf . [(20190930 1517) ((emacs (26))) "Completion at point function for the AWS CLI" tar ((:url . "https://github.com/sebasmonia/awscli-capf.git") (:commit . "1a75f88f53a2969fe821c31e6857861d0a0c0a5e") (:revdesc . "1a75f88f53a2") (:keywords "tools" "convenience" "abbrev") (:authors ("Sebastian Monia" . "smonia@outlook.com")) (:maintainers ("Sebastian Monia" . "smonia@outlook.com")) (:maintainer "Sebastian Monia" . "smonia@outlook.com"))])
+ (axe . [(20230120 1915) ((emacs (25 1)) (hmac (0 0)) (request (0 3 2)) (s (1 12 0)) (xmlgen (0 5)) (dash (2 17 0)) (mimetypes (1 0))) "AWS Extensions" tar ((:url . "https://github.com/cniles/axe") (:commit . "5168d4f4c33861a071285df34f17fce92137d497") (:revdesc . "5168d4f4c338") (:authors ("Craig Niles" . "niles.catgmail.com")) (:maintainers ("Craig Niles" . "niles.catgmail.com")) (:maintainer "Craig Niles" . "niles.catgmail.com"))])
+ (ayu-theme . [(20230306 1924) ((emacs (24 1))) "Ayu theme" tar ((:url . "https://github.com/vutran1710/Ayu-Theme-Emacs") (:commit . "dc325520c1202463a0f05d4ece1644109830fef4") (:revdesc . "dc325520c120") (:keywords "lisp" "theme" "emacs"))])
+ (babashka . [(20240527 732) ((emacs (27 1)) (parseedn (1 1 0))) "Babashka Tasks Interface" tar ((:url . "https://github.com/licht1stein/babashka.el") (:commit . "4ea9d7febf3e9d301c91231ba2833f3417ba9059") (:revdesc . "4ea9d7febf3e") (:authors ("Mykhaylo Bilyanskyy" . "mb@m1k.pw")) (:maintainers ("Mykhaylo Bilyanskyy" . "mb@m1k.pw")) (:maintainer "Mykhaylo Bilyanskyy" . "mb@m1k.pw"))])
+ (babel . [(20210612 640) nil "Interface to web translation services such as Babelfish" tar ((:url . "https://github.com/juergenhoetzel/babel") (:commit . "946e69c61188bc41793402ac48466d8967ddb43d") (:revdesc . "946e69c61188") (:keywords "translation" "web") (:authors ("Juergen Hoetzel" . "juergen@hoetzel.info") ("Eric Marsden" . "emarsden@laas.fr")) (:maintainers ("Juergen Hoetzel" . "juergen@hoetzel.info") ("Eric Marsden" . "emarsden@laas.fr")) (:maintainer "Juergen Hoetzel" . "juergen@hoetzel.info"))])
+ (babel-repl . [(20160504 2201) ((emacs (24))) "Run babel REPL" tar ((:url . "https://github.com/hung-phan/babel-repl/") (:commit . "0faa2f6518a2b46236f116ca1736a314f7d9c034") (:revdesc . "0faa2f6518a2") (:keywords "babel" "javascript" "es6"))])
+ (back-button . [(20220827 1733) ((nav-flash (1 0 0)) (smartrep (0 0 3)) (list-utils (0 4 2)) (persistent-soft (0 8 8)) (pcache (0 2 3))) "Visual navigation through mark rings" tar ((:url . "https://github.com/rolandwalker/back-button") (:commit . "f8783c98a7fefc1d0419959c1b462c7dcadce5a8") (:revdesc . "f8783c98a7fe") (:keywords "convenience" "navigation" "interface") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (backlight . [(20210513 129) ((emacs (24 3))) "Backlight brightness adjustment on GNU/Linux" tar ((:url . "https://github.com/mschuldt/backlight.el") (:commit . "b6826a60440d8bf440618e3cdafb40158de920e6") (:revdesc . "b6826a60440d") (:keywords "hardware") (:authors ("Michael Schuldt" . "mbschuldt@gmail.com")) (:maintainers ("Michael Schuldt" . "mbschuldt@gmail.com")) (:maintainer "Michael Schuldt" . "mbschuldt@gmail.com"))])
+ (backline . [(20260601 1450) ((emacs (28 1)) (compat (30 1)) (outline-minor-faces (1 2))) "Preserve appearance of outline headings" tar ((:url . "https://github.com/tarsius/backline") (:commit . "cc6e54e40bdbb725cdaf0cc95cef8cd48dce413f") (:revdesc . "cc6e54e40bdb") (:keywords "outlines") (:authors ("Jonas Bernoulli" . "emacs.backline@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.backline@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.backline@jonas.bernoulli.dev"))])
+ (backup-each-save . [(20180227 557) nil "Backup each savepoint of a file" tar ((:url . "https://github.com/conornash/backup-each-save") (:commit . "3c414b9d6b278911c95c5b8b71819e6af6f8a02a") (:revdesc . "3c414b9d6b27") (:authors ("Benjamin Rutt" . "brutt@bloomington.in.us")) (:maintainers ("Conor Nash" . "conor@nashcobusinessservicesllc.com")) (:maintainer "Conor Nash" . "conor@nashcobusinessservicesllc.com"))])
+ (backup-walker . [(20130720 1516) nil "Quickly traverse all backups of a file" tar ((:url . "https://github.com/lewang/backup-walker") (:commit . "934a4128c122972ac32bb9952addf279a60a94da") (:revdesc . "934a4128c122") (:keywords "backup"))])
+ (backward-forward . [(20161229 550) ((emacs (24 5))) "Navigation backwards and forwards across marks" tar ((:url . "https://gitlab.com/vancan1ty/emacs-backward-forward/tree/master") (:commit . "58489957a62a0da25dfb5df902624d2548d800b4") (:revdesc . "58489957a62a") (:keywords "navigation" "convenience" "backward" "forward") (:authors ("Currell Berry" . "currellberry@gmail.com")) (:maintainers ("Currell Berry" . "currellberry@gmail.com")) (:maintainer "Currell Berry" . "currellberry@gmail.com"))])
+ (badger-theme . [(20140717 232) nil "A dark theme for Emacs 24" tar ((:url . "https://github.com/ccann/badger-theme") (:commit . "80fb9f8ace37b2e8807da639f7da499a53ffefd4") (:revdesc . "80fb9f8ace37") (:authors ("Cody Canning" . "cocanning11@gmail.com")) (:maintainers ("Cody Canning" . "cocanning11@gmail.com")) (:maintainer "Cody Canning" . "cocanning11@gmail.com"))])
+ (badwolf-theme . [(20161004 715) ((emacs (24))) "Bad Wolf color theme" tar ((:url . "https://github.com/bkruczyk/badwolf-emacs") (:commit . "ea01a3d9358e968f75e3ed15dec6a2a96ce3d9a1") (:revdesc . "ea01a3d9358e") (:keywords "themes") (:authors ("bkruczyk" . "bartlomiej.kruczyk@gmail.com")) (:maintainers ("bkruczyk" . "bartlomiej.kruczyk@gmail.com")) (:maintainer "bkruczyk" . "bartlomiej.kruczyk@gmail.com"))])
+ (baff . [(20200824 1807) ((emacs (24 3)) (f (0 20 0))) "Create a byte array from a file" tar ((:url . "https://github.com/dave-f/baff/") (:commit . "52a8508e2300ee810ce7806cb78a2b294f2630f2") (:revdesc . "52a8508e2300") (:keywords "convenience" "usability") (:authors ("Dave Footitt" . "dave.footitt@gmail.com")) (:maintainers ("Dave Footitt" . "dave.footitt@gmail.com")) (:maintainer "Dave Footitt" . "dave.footitt@gmail.com"))])
+ (baidu-translate . [(20211130 1235) ((unicode-escape (1 1))) "A plugin using baidu-translate-api" tar ((:url . "https://github.com/liShiZhensPi/baidu-translate") (:commit . "16101d5e6ce19bbcc8badf4422a95db457160999") (:revdesc . "16101d5e6ce1") (:keywords "docs") (:authors (nil . "LiShizhengsu4017@gmail.com")) (:maintainers (nil . "LiShizhengsu4017@gmail.com")) (:maintainer nil . "LiShizhengsu4017@gmail.com"))])
+ (balanced-windows . [(20260706 1545) ((emacs (25))) "Keep windows balanced" tar ((:url . "https://github.com/wbolster/emacs-balanced-windows") (:commit . "f94f9cbe832147396bb0d67e687a9dc33ec2a2c5") (:revdesc . "f94f9cbe8321") (:keywords "convenience") (:authors ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "wouter bolsterlee" . "wouter@bolsterl.ee"))])
+ (bank-buddy . [(20260817 937) ((emacs (26 1)) (async (1 9 4))) "Financial analysis and reporting" tar ((:url . "https://github.com/captainflasmr/bank-buddy") (:commit . "7b1567e85f5dfa40120a109b0dd15e885500fdfe") (:revdesc . "7b1567e85f5d") (:keywords "matching") (:authors ("James Dyer" . "captainflasmr@gmail.com")) (:maintainers ("James Dyer" . "captainflasmr@gmail.com")) (:maintainer "James Dyer" . "captainflasmr@gmail.com"))])
+ (banner-comment . [(20250131 300) ((emacs (24 4))) "For producing banner comments" tar ((:url . "https://github.com/WJCFerguson/banner-comment") (:commit . "216ba051451df72796daaae9744cd9dbdaeb5fc6") (:revdesc . "216ba051451d") (:keywords "convenience") (:authors ("James Ferguson" . "james@faff.org")) (:maintainers ("James Ferguson" . "james@faff.org")) (:maintainer "James Ferguson" . "james@faff.org"))])
+ (bap-mode . [(20200128 1354) nil "Major-mode for BAP's IR" tar ((:url . "https://github.com/fkie-cad/bap-mode") (:commit . "8969679f60db0aa918d35f40d959c0a9c723b111") (:revdesc . "8969679f60db") (:keywords "languages") (:authors ("Thomas Barabosch" . "http://github/tbarabosch")) (:maintainers ("Thomas Barabosch" . "thomas.barabosch@fkie.fraunhofer.de")) (:maintainer "Thomas Barabosch" . "thomas.barabosch@fkie.fraunhofer.de"))])
+ (bar-cursor . [(20201204 2244) nil "Package used to switch block cursor to a bar" tar ((:url . "https://github.com/ajsquared/bar-cursor") (:commit . "78f195b6db63459033c4f1c7e7add5d82f3ce424") (:revdesc . "78f195b6db63") (:keywords "files") (:authors ("Joe Casadonte" . "(emacs@northbound-train.com)")) (:maintainers ("Andrew Johnson" . "(andrew@andrewjamesjohnson.com)")) (:maintainer "Andrew Johnson" . "(andrew@andrewjamesjohnson.com)"))])
+ (bart-mode . [(20190601 1004) ((emacs (24 3))) "Real time BART departures info" tar ((:url . "https://github.com/mschuldt/bart-mode") (:commit . "f70b6c42452e47c0c6b3ebd4c90e555a9bedeec7") (:revdesc . "f70b6c42452e") (:keywords "convenience" "transit") (:authors ("Michael Schuldt" . "mbschuldt@gmail.com")) (:maintainers ("Michael Schuldt" . "mbschuldt@gmail.com")) (:maintainer "Michael Schuldt" . "mbschuldt@gmail.com"))])
+ (base16-theme . [(20260816 111) nil "Collection of themes built on combinations of 16 base colors" tar ((:url . "https://github.com/tinted-theming/base16-emacs") (:commit . "17acf7f6efd7a73dadb902d2f5586aec4e32051e") (:revdesc . "17acf7f6efd7") (:authors ("Kaleb Elwert" . "belak@coded.io")) (:maintainers ("Kaleb Elwert" . "belak@coded.io")) (:maintainer "Kaleb Elwert" . "belak@coded.io"))])
+ (base32 . [(20240227 1821) ((emacs (27 1))) "Base32 support" tar ((:url . "https://gitlab.com/fledermaus/totp.el") (:commit . "927257e97a602b6979a75028e8417bf1499582d4") (:revdesc . "927257e97a60") (:keywords "tools") (:authors ("Vivek Das Mohapatra" . "vivek@etla.org")) (:maintainers ("Vivek Das Mohapatra" . "vivek@etla.org")) (:maintainer "Vivek Das Mohapatra" . "vivek@etla.org"))])
+ (bash-completion . [(20260206 1459) ((emacs (25 3))) "Bash completion for the shell buffer" tar ((:url . "https://github.com/szermatt/emacs-bash-completion") (:commit . "5b621db96efc549c64436011a81fd658c6dcf6a0") (:revdesc . "5b621db96efc") (:keywords "convenience" "unix") (:authors ("Stephane Zermatten" . "szermatt@gmx.net")) (:maintainers ("Stephane Zermatten" . "szermatt@gmail.com")) (:maintainer "Stephane Zermatten" . "szermatt@gmail.com"))])
+ (basic-c-compile . [(20170302 1112) ((cl-lib (0 5)) (f (0 19 0))) "Quickly create a Makefile, compile and run C" tar ((:url . "https://github.com/nick96/basic-c-compile") (:commit . "335e96e19647ad7245fb68cf7e68cf86c5023d23") (:revdesc . "335e96e19647") (:keywords "c" "makefile" "compilation" "convenience") (:authors ("Nick Spain" . "nicholas.spain96@gmail.com")) (:maintainers ("Nick Spain" . "nicholas.spain96@gmail.com")) (:maintainer "Nick Spain" . "nicholas.spain96@gmail.com"))])
+ (basic-ide . [(20230118 1040) ((emacs (25)) (basic-mode (0 4 2)) (company (0 9 12)) (flycheck (0 22)) (dash (2 12 0)) (f (0 17 0))) "BASIC IDE c64" tar ((:url . "https://gitlab.com/sasanidas/emacs-c64-basic-ide") (:commit . "e33036f838e61b647927165e81be5d5b855e0518") (:revdesc . "e33036f838e6") (:keywords "languages" "basic") (:authors ("Fermin MF" . "fmfs@posteo.net")) (:maintainers ("Fermin MF" . "fmfs@posteo.net")) (:maintainer "Fermin MF" . "fmfs@posteo.net"))])
+ (basic-mode . [(20231125 1617) ((seq (2 20)) (emacs (25 1))) "Major mode for editing BASIC code" tar ((:url . "https://github.com/dykstrom/basic-mode") (:commit . "1dc1a635d6d80668c8a583b974205e49ff0fc3ce") (:revdesc . "1dc1a635d6d8") (:keywords "basic" "languages"))])
+ (basic-theme . [(20160817 827) ((emacs (24))) "Minimalistic light color theme" tar ((:url . "https://github.com/fgeller/basic-theme.el") (:commit . "9d0fd5f56898a5237c1de3363ad416aeab7f880e") (:revdesc . "9d0fd5f56898") (:keywords "theme" "basic" "minimal" "colors") (:authors ("Felix Geller" . "fgeller@gmail.com")) (:maintainers ("Felix Geller" . "fgeller@gmail.com")) (:maintainer "Felix Geller" . "fgeller@gmail.com"))])
+ (batppuccin . [(20260729 1522) ((emacs (27 1))) "Batppuccin (Catppuccin) color themes" tar ((:url . "https://github.com/bbatsov/batppuccin-emacs") (:commit . "5fc5b4bca7b7775ec047d003394615830f04d993") (:revdesc . "5fc5b4bca7b7") (:keywords "faces" "themes") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (bats-mode . [(20230325 7) nil "Emacs mode for editing and running Bats tests" tar ((:url . "https://github.com/dougm/bats-mode") (:commit . "fa88930b1baba101ae6474f289a239a236a7d19f") (:revdesc . "fa88930b1bab") (:keywords "bats" "tests"))])
+ (battery-notifier . [(20220705 2030) ((alert (1 3))) "Notify when battery capacity is low" tar ((:url . "https://github.com/jasonmj/battery-notifier") (:commit . "b7301d3633afff78609afd45dcf78268f98d52d3") (:revdesc . "b7301d3633af") (:keywords "hardware" "battery") (:authors ("Jason Johnson" . "(jason@fullsteamlabs.com)")) (:maintainers ("Jason Johnson" . "(jason@fullsteamlabs.com)")) (:maintainer "Jason Johnson" . "(jason@fullsteamlabs.com)"))])
+ (battle-haxe . [(20210219 354) ((emacs (25)) (company (0 9 9)) (helm (3 0)) (async (1 9 3)) (cl-lib (0 5)) (dash (2 18 0)) (s (1 10 0)) (f (0 19 0))) "A Haxe development system, with code completion and more" tar ((:url . "https://github.com/AlonTzarafi/battle-haxe") (:commit . "2f32c81dcecfc68fd410cb9d2aca303d6e3028c7") (:revdesc . "2f32c81dcecf") (:keywords "programming" "languages" "completion") (:authors ("Alon Tzarafi" . "alontzarafi@gmail.com")) (:maintainers ("Alon Tzarafi" . "alontzarafi@gmail.com")) (:maintainer "Alon Tzarafi" . "alontzarafi@gmail.com"))])
+ (bazel . [(20260826 1211) ((emacs (30 1))) "Bazel support for Emacs" tar ((:url . "https://github.com/bazel-contrib/bazel.el") (:commit . "abf801d360474f09647a9b6e5fd5ad8e88d72971") (:revdesc . "abf801d36047") (:keywords "build tools" "languages"))])
+ (bbcode-mode . [(20231215 1539) ((emacs (24)) (cl-lib (0 5))) "Major mode for phpBB posts (BBCode markup)" tar ((:url . "https://github.com/lassik/emacs-bbcode-mode") (:commit . "109962f1070a5e6943c2e32c1eb84ce4debfb8f8") (:revdesc . "109962f1070a") (:keywords "bbcode" "languages") (:authors ("Eric James Michael Ritz" . "lobbyjones@gmail.com")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (bbdb . [(20231122 1326) ((emacs (24)) (cl-lib (0 5))) "Big Brother DataBase" tar ((:commit . "53e8ba04c47b3542db75b68f9663941daf2e6ca4") (:revdesc . "53e8ba04c47b") (:maintainers ("Roland Winkler" . "winkler@gnu.org")) (:maintainer "Roland Winkler" . "winkler@gnu.org"))])
+ (bbdb- . [(20140221 2354) ((bbdb (20140123 1541)) (log4e (0 2 0)) (yaxception (0 1))) "Provide interface for more easily search/choice than BBDB" tar ((:url . "https://github.com/aki2o/bbdb-") (:commit . "2839e84c894de2513af41053e80a277a1b483d22") (:revdesc . "2839e84c894d") (:keywords "bbdb" "news" "mail") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (bbdb-csv-import . [(20140802 1142) ((pcsv (1 3 3)) (dash (2 5 0)) (bbdb (20140412 1949))) "Import csv to bbdb version 3+" tar ((:url . "https://gitlab.com/iankelling/bbdb-csv-import") (:commit . "7739d10ebe1787a72aa74085e9baedd0f4988b00") (:revdesc . "7739d10ebe17") (:keywords "csv" "util" "bbdb") (:authors ("Ian Kelling" . "ian@iankelling.org")) (:maintainers ("Ian Kelling" . "ian@iankelling.org")) (:maintainer "Ian Kelling" . "ian@iankelling.org"))])
+ (bbdb-ext . [(20151220 2013) ((bbdb (2 36))) "Extra commands for BBDB" tar ((:url . "https://github.com/vapniks/bbdb-ext") (:commit . "fee97b1b3faa83edaea00fbc5ad3cbca5e791a55") (:revdesc . "fee97b1b3faa") (:keywords "extensions") (:authors ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainers ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainer "Joe Bloggs" . "vapniks@yahoo.com"))])
+ (bbdb-vcard . [(20210325 2208) ((bbdb (3 0))) "VCard import/export for BBDB" tar ((:url . "https://github.com/tohojo/bbdb-vcard") (:commit . "113c66115ce68316e209f51ebce56de8dded3606") (:revdesc . "113c66115ce6") (:keywords "data" "calendar" "mail" "news") (:authors ("Bert Burgemeister" . "trebbu@googlemail.com") ("Vincent Geddes" . "vincent.geddes@gmail.com")) (:maintainers ("Bert Burgemeister" . "trebbu@googlemail.com") ("Vincent Geddes" . "vincent.geddes@gmail.com")) (:maintainer "Bert Burgemeister" . "trebbu@googlemail.com"))])
+ (bbdb2erc . [(20190822 907) ((bbdb (3 0))) "Make bbdb show if pal is online with ERC, click i to chat" tar ((:url . "https://github.com/unhammer/bbdb2erc") (:commit . "40b89e961762af3e7ade3a1844a9fbcd4084ac65") (:revdesc . "40b89e961762") (:keywords "irc" "contacts" "chat" "client" "internet") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (bbww . [(20230502 2239) ((mwim (1 0)) (emacs (24 3))) "Improved word-jumping functions" tar ((:url . "http://chud.wtf") (:commit . "9b4430f757e9c7fc7178541009676af1262c486b") (:revdesc . "9b4430f757e9") (:keywords "convenience" "files"))])
+ (bbyac . [(20180206 1441) ((browse-kill-ring (1 3)) (cl-lib (0 5))) "Type a little Bit, and Bang! You Are Completed" tar ((:url . "https://github.com/baohaojun/bbyac") (:commit . "9f0de9cad13801891ffb590dc09f51ff9a7cb225") (:revdesc . "9f0de9cad138") (:keywords "abbrev") (:authors ("Bao Haojun" . "baohaojun@gmail.com")) (:maintainers ("Bao Haojun" . "baohaojun@gmail.com")) (:maintainer "Bao Haojun" . "baohaojun@gmail.com"))])
+ (beacon . [(20220730 100) ((emacs (25 1))) "Highlight the cursor whenever the window scrolls" tar ((:url . "https://github.com/Malabarba/beacon") (:commit . "85261a928ae0ec3b41e639f05291ffd6bf7c231c") (:revdesc . "85261a928ae0") (:keywords "convenience") (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainers ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com"))])
+ (beans . [(20221114 1634) ((emacs (24 3))) "Major mode for Beans grammar" tar ((:url . "https://github.com/TheBlackBeans/emacs-beans") (:commit . "0d04b79222812aa4978b6486a9ccac461850fe7a") (:revdesc . "0d04b7922281"))])
+ (bech32 . [(20221210 1154) ((emacs (26 1))) "Bech32 library" tar ((:url . "https://github.com/Titan-C/cardano.el") (:commit . "badbf267fa488df1cb87809ed234ebd67786f2f8") (:revdesc . "badbf267fa48") (:authors ("Oscar Najera" . "https://oscarnajera.com")) (:maintainers ("Oscar Najera" . "hi@oscarnajera.com")) (:maintainer "Oscar Najera" . "hi@oscarnajera.com"))])
+ (beef-mode . [(20221227 203) ((emacs (24 3))) "A major mode for the Beef programming language" tar ((:url . "https://github.com/thechampagne/beef-mode") (:commit . "20906b41630d74eba56504fbb9fabb79562e0d6e") (:revdesc . "20906b41630d") (:keywords "files" "beef"))])
+ (beeminder . [(20201227 2024) ((emacs (24 3)) (seq (2 16)) (org (7))) "Emacs interface for Beeminder" tar ((:url . "http://www.philnewton.net/code/beeminder-el/") (:commit . "161d9c94c594614a01cb08219693d9e000af4f69") (:revdesc . "161d9c94c594") (:keywords "tools" "beeminder") (:authors ("Phil Newton" . "phil@sodaware.net")) (:maintainers ("Phil Newton" . "phil@sodaware.net")) (:maintainer "Phil Newton" . "phil@sodaware.net"))])
+ (beginend . [(20230902 1458) ((emacs (25 3))) "Redefine M-< and M-> for some modes" tar ((:url . "https://github.com/DamienCassou/beginend") (:commit . "2d3536971b7cca597ba3404c30b5d1ce9d56f1fe") (:revdesc . "2d3536971b7c") (:authors ("Damien Cassou" . "damien@cassou.me") ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Damien Cassou" . "damien@cassou.me") ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (belarus-holidays . [(20190102 1343) nil "Belarus holidays whith transfers" tar ((:url . "http://bitbucket.org/EugeneMakei/belarus-holidays.el") (:commit . "35a18273e19edc3b4c761030ffbd11116483b83e") (:revdesc . "35a18273e19e") (:authors ("Yauhen Makei" . "yauhen.makei@gmail.com")) (:maintainers ("Yauhen Makei" . "yauhen.makei@gmail.com")) (:maintainer "Yauhen Makei" . "yauhen.makei@gmail.com"))])
+ (beluga-mode . [(20250930 700) ((emacs (24 4))) "Major mode for Beluga source code" tar ((:url . "https://github.com/Beluga-lang/Beluga") (:commit . "820615cc4758086eb7641f62340a3ab93a689303") (:revdesc . "820615cc4758") (:keywords "languages") (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca")) (:maintainers (nil . "beluga-dev@cs.mcgill.ca")) (:maintainer nil . "beluga-dev@cs.mcgill.ca"))])
+ (ben . [(20260803 928) ((emacs (29 1)) (inheritenv (0 1)) (seq (2 24))) "Asynchronous buffer-local environments via `direnv'" tar ((:url . "https://codeberg.org/pastor/ben.el") (:commit . "d98b5be60d52d00a4808c25762cd0b51b516bb59") (:revdesc . "d98b5be60d52") (:keywords "processes" "tools") (:authors ("Steve Purcell" . "steve@sanityinc.com") ("Sergio Pastor Pérez" . "sergio.pastorperez@gmail.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com") ("Sergio Pastor Pérez" . "sergio.pastorperez@gmail.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (benchmark-init . [(20260108 1447) ((emacs (24 4))) "Benchmarks for require and load calls" tar ((:url . "https://github.com/dholm/benchmark-init-el") (:commit . "54b9703389f25012e4cc20fe4a0d4ea253ce4820") (:revdesc . "54b9703389f2") (:keywords "convenience" "benchmark") (:maintainers ("David Holm" . "dholmster@gmail.com")) (:maintainer "David Holm" . "dholmster@gmail.com"))])
+ (benchstat . [(20171014 312) nil "Proper benchmarking made simple" tar ((:url . "https://github.com/Quasilyte/benchstat.el") (:commit . "fee86f521f22ef0f99564903d63e2023b591fc7f") (:revdesc . "fee86f521f22") (:keywords "lisp") (:authors ("Iskander Sharipov" . "quasilyte@gmail.com")) (:maintainers ("Iskander Sharipov" . "quasilyte@gmail.com")) (:maintainer "Iskander Sharipov" . "quasilyte@gmail.com"))])
+ (bencode . [(20190317 2010) ((emacs (24 4))) "Bencode encoding / decoding" tar ((:url . "https://github.com/skeeto/emacs-bencode") (:commit . "b5fe9c9d4b9b5ea61cedd77987ca46eb8154bd16") (:revdesc . "b5fe9c9d4b9b") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainer "Christopher Wellons" . "wellons@nullprogram.com"))])
+ (bencoding . [(20200331 1102) ((emacs (25 1))) "Bencoding decoding and encoding" tar ((:url . "https://github.com/xuchunyang/bencoding.el") (:commit . "409836f2cf4883826600de42519ee9cffeb48a11") (:revdesc . "409836f2cf48") (:keywords "tools"))])
+ (berry-theme . [(20250224 923) ((emacs (24 1))) "A vibrant berry-colored theme" tar ((:url . "https://github.com/madara123pain/unique-emacs-theme-pack") (:commit . "ae9a0c318c371ed70ec568f3a618d47124817fe7") (:revdesc . "ae9a0c318c37") (:keywords "faces" "theme" "berry" "vibrant" "colorful"))])
+ (berrys-theme . [(20191201 1609) ((emacs (24 1))) "A light, clean and elegant theme" tar ((:url . "https://github.com/vbuzin/berrys-theme") (:commit . "888a14206b2fb3dc45b5273aeb05075f3e0b5f60") (:revdesc . "888a14206b2f") (:authors ("Slava Buzin" . "v8v.buzin@gmail.com")) (:maintainers ("Slava Buzin" . "v8v.buzin@gmail.com")) (:maintainer "Slava Buzin" . "v8v.buzin@gmail.com"))])
+ (bert . [(20131117 1014) nil "BERT serialization library for Emacs" tar ((:url . "https://github.com/manzyuk/bert-el") (:commit . "a3eec6980a725aa4abd2019e4c00246450260490") (:revdesc . "a3eec6980a72") (:keywords "comm" "data") (:authors ("Oleksandr Manzyuk" . "manzyuk@gmail.com")) (:maintainers ("Oleksandr Manzyuk" . "manzyuk@gmail.com")) (:maintainer "Oleksandr Manzyuk" . "manzyuk@gmail.com"))])
+ (better-defaults . [(20260621 1647) ((emacs (25 1))) "Fixing weird quirks and poor defaults" tar ((:url . "https://git.sr.ht/~technomancy/better-defaults") (:commit . "faf5c664472d01d978442b5e567470a51f9566c2") (:revdesc . "faf5c664472d") (:keywords "convenience"))])
+ (better-jumper . [(20241009 1517) ((emacs (25 1))) "Configurable jump list" tar ((:url . "https://github.com/gilbertw1/better-jumper") (:commit . "b1bf7a3c8cb820d942a0305e0e6412ef369f819c") (:revdesc . "b1bf7a3c8cb8") (:keywords "convenience" "jump" "history" "evil") (:authors ("Bryan Gilbert" . "http://github/gilbertw1")) (:maintainers ("Bryan Gilbert" . "bryan@bryan.sh")) (:maintainer "Bryan Gilbert" . "bryan@bryan.sh"))])
+ (better-scroll . [(20260101 557) ((emacs (24 3))) "Improve user experience when scrolling window" tar ((:url . "https://github.com/jcs-elpa/better-scroll") (:commit . "f87c21c7b29ba1545f7e1f050325dd85d478de76") (:revdesc . "f87c21c7b29b") (:keywords "convenience" "scrolling" "scroll" "window" "better" "improvement") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (better-shell . [(20191025 1737) ((emacs (24 4))) "Better shell management" tar ((:url . "https://github.com/killdash9/better-shell") (:commit . "70c787b981caeef8c5f8012b170eb7b9f167cd13") (:revdesc . "70c787b981ca") (:keywords "convenience") (:authors ("Russell Black" . "(killdash9@github)")) (:maintainers ("Russell Black" . "(killdash9@github)")) (:maintainer "Russell Black" . "(killdash9@github)"))])
+ (bf-mode . [(20130403 1442) nil "Browse file persistently on dired" tar ((:url . "https://github.com/emacs-jp/bf-mode") (:commit . "7cc4d09aed64d9db6be95646f5f5067de68f8895") (:revdesc . "7cc4d09aed64") (:keywords "convenience") (:maintainers ("myuhe" . "yuhei.maeda_at_gmail.com")) (:maintainer "myuhe" . "yuhei.maeda_at_gmail.com"))])
+ (bfbuilder . [(20210228 1740) ((cl-lib (0 3)) (emacs (24 4))) "A brainfuck development environment with interactive debugger" tar ((:url . "http://zk-phi.gitub.io/") (:commit . "689f320a9a1326cdeff43b8538e0d739f8519c4b") (:revdesc . "689f320a9a13"))])
+ (bibclean-format . [(20190302 2017) ((emacs (24 3)) (reformatter (0 3))) "Reformat BibTeX and Scribe using bibclean" tar ((:url . "https://github.com/peterwvj/bibclean-format") (:commit . "b4003950a925d1c659bc359ab5e88e4441775d77") (:revdesc . "b4003950a925") (:keywords "languages") (:authors ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainers ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainer "Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com"))])
+ (bible-gateway . [(20260824 2028) ((emacs (29 1))) "A Simple BibleGateway Client" tar ((:url . "https://github.com/kristjoc/bible-gateway") (:commit . "e3d8e596097a9b23654ff0d4088100c284bd474e") (:revdesc . "e3d8e596097a") (:keywords "convenience" "comm" "hypermedia"))])
+ (biblio . [(20250812 1408) ((emacs (24 3)) (biblio-core (0 3))) "Browse and import bibliographic references and BibTeX records from CrossRef, arXiv, DBLP, HAL, IEEE Xplore, Dissemin, and doi.org" tar ((:url . "https://github.com/cpitclaudel/biblio.el") (:commit . "bb9d6b4b962fb2a4e965d27888268b66d868766b") (:revdesc . "bb9d6b4b962f") (:keywords "bib" "tex" "convenience" "hypermedia") (:authors ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainers ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainer "Clément Pit-Claudel" . "clement.pitclaudel@live.com"))])
+ (biblio-bibsonomy . [(20190105 1200) ((emacs (24 4)) (biblio-core (0 2))) "Lookup bibliographic entries from Bibsonomy" tar ((:url . "https://github.com/andreasjansson/biblio-bibsonomy/") (:commit . "fbdb3ecfcd88c179a2358d7967f7ecafef725835") (:revdesc . "fbdb3ecfcd88") (:keywords "bib" "tex" "bibsonomy"))])
+ (biblio-core . [(20230202 1721) ((emacs (24 3)) (let-alist (1 0 4)) (seq (1 11)) (dash (2 12 1))) "A framework for looking up and displaying bibliographic entries" tar ((:url . "https://github.com/cpitclaudel/biblio.el") (:commit . "ee52f6cda82ea6fbc3b400e7b12132595cc0374c") (:revdesc . "ee52f6cda82e") (:keywords "bib" "tex" "convenience" "hypermedia") (:authors ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainers ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainer "Clément Pit-Claudel" . "clement.pitclaudel@live.com"))])
+ (biblio-gbooks . [(20241025 1400) ((emacs (24 4)) (biblio-core (0 2)) (let-alist (1 0 6)) (seq (2 24)) (compat (29 1 4 2))) "Google Books backend for biblio.el" tar ((:url . "https://github.com/jrasband/biblio-gbooks") (:commit . "c7bdaba4dde8fca8b8e923f3c004d050a32c06c2") (:revdesc . "c7bdaba4dde8") (:keywords "bib" "tex"))])
+ (bibliothek . [(20190124 1828) ((emacs (24 4)) (pdf-tools (0 70)) (a (0 1 0 -3 4))) "Managing a digital library of PDFs" tar ((:url . "https://dev.gkayaalp.com/elisp/index.html#bibliothek-el") (:commit . "b19b37be332bada6b18d4d895edf6ce78ab420c4") (:revdesc . "b19b37be332b") (:keywords "tools") (:authors ("Göktuğ Kayaalp" . "self@gkayaalp.com")) (:maintainers ("Göktuğ Kayaalp" . "self@gkayaalp.com")) (:maintainer "Göktuğ Kayaalp" . "self@gkayaalp.com"))])
+ (bibretrieve . [(20191124 1855) ((auctex (11 87)) (emacs (24 3))) "Retrieve BibTeX entries from the internet" tar ((:url . "https://github.com/pzorin/bibretrieve") (:commit . "81dc8e0db3629cc180eafb2bc34b60dcd8980316") (:revdesc . "81dc8e0db362") (:keywords "bibtex" "bibliography" "mathscinet" "arxiv" "zbmath") (:maintainers ("Pavel Zorin-Kranich" . "pzorin@uni-bonn.de")) (:maintainer "Pavel Zorin-Kranich" . "pzorin@uni-bonn.de"))])
+ (bibslurp . [(20151202 2346) ((s (1 6 0)) (dash (1 5 0))) "Retrieve BibTeX entries from NASA ADS" tar ((:url . "https://github.com/mkmcc/bibslurp") (:commit . "aeba96368f2a06959e4fe945375ce2a54d34b189") (:revdesc . "aeba96368f2a") (:keywords "bibliography" "nasa ads") (:authors ("Mike McCourt" . "mkmcc@astro.berkeley.edu")) (:maintainers ("Mike McCourt" . "mkmcc@astro.berkeley.edu")) (:maintainer "Mike McCourt" . "mkmcc@astro.berkeley.edu"))])
+ (bibtex-capf . [(20260726 1818) ((emacs (27 1)) (parsebib (3 0)) (org (9 5))) "Completion at point for bibtex" tar ((:url . "https://codeberg.org/mclear-tools/bibtex-capf") (:commit . "a8312160b0cd568f1ce6d0328e33ae890a5d5b9e") (:revdesc . "a8312160b0cd") (:keywords "bibtex" "convenience"))])
+ (bibtex-completion . [(20241116 726) ((parsebib (6 0)) (s (1 9 0)) (dash (2 6 0)) (f (0 16 2)) (cl-lib (0 5)) (biblio (0 2)) (emacs (26 1))) "A BibTeX backend for completion frameworks" tar ((:url . "https://github.com/tmalsburg/helm-bibtex") (:commit . "6064e8625b2958f34d6d40312903a85c173b5261") (:revdesc . "6064e8625b29") (:authors ("Titus von der Malsburg" . "malsburg@posteo.de") ("Justin Burkett" . "justin@burkett.cc")) (:maintainers ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainer "Titus von der Malsburg" . "malsburg@posteo.de"))])
+ (bibtex-utils . [(20260323 1346) nil "Provides utilities for extending BibTeX mode" tar ((:url . "https://github.com/plantarum/bibtex-utils") (:commit . "1b25796ac9e6546b46daea861f1bf3d3031cebca") (:revdesc . "1b25796ac9e6") (:keywords "bibtex") (:authors ("Tyler Smith" . "tyler@plantarum.ca")) (:maintainers ("Tyler Smith" . "tyler@plantarum.ca")) (:maintainer "Tyler Smith" . "tyler@plantarum.ca"))])
+ (bicycle . [(20260820 2024) ((emacs (28 1)) (compat (30 1))) "Cycle outline and code visibility" tar ((:url . "https://github.com/tarsius/bicycle") (:commit . "4b0efa33a9da40a327deb40fbf229e64b01dd650") (:revdesc . "4b0efa33a9da") (:keywords "outlines") (:authors ("Jonas Bernoulli" . "emacs.bicycle@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.bicycle@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.bicycle@jonas.bernoulli.dev"))])
+ (bifocal . [(20251231 2025) ((emacs (24 4))) "Split-screen scrolling for comint-mode buffers" tar ((:url . "https://github.com/riscy/bifocal-mode") (:commit . "4e4f1084dc3dd95dfe0905854530e95dbf6c6c5b") (:revdesc . "4e4f1084dc3d") (:keywords "frames" "processes") (:authors ("Chris Rayner" . "(dchrisrayner@gmail.com)")) (:maintainers ("Chris Rayner" . "(dchrisrayner@gmail.com)")) (:maintainer "Chris Rayner" . "(dchrisrayner@gmail.com)"))])
+ (bilibili . [(20250727 348) ((emacs (29 1)) (org (9 0)) (mpvi (1 3)) (pdd (0 2))) "Watch videos of BiliBili (哔哩哔哩) in org mode" tar ((:url . "https://github.com/lorniu/bilibili.el") (:commit . "f650983c9c29ea5fe4574dac3b3fd2a62ae49520") (:revdesc . "f650983c9c29") (:keywords "multimedia" "application") (:authors ("lorniu" . "lorniu@gmail.com")) (:maintainers ("lorniu" . "lorniu@gmail.com")) (:maintainer "lorniu" . "lorniu@gmail.com"))])
+ (binclock . [(20260401 1252) ((emacs (24 1)) (cl-lib (0 5))) "Display the current time using a binary clock" tar ((:url . "https://github.com/davep/binclock.el") (:commit . "aac5a907be45d4b1225188440f4bc7c5dcae68f7") (:revdesc . "aac5a907be45") (:keywords "games" "time" "display") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (bind . [(20231001 2051) ((emacs (25 1))) "Bind commands to keys" tar ((:url . "https://github.com/repelliuss/bind") (:commit . "4c1698a7c1c9f3d45559c3be871d87d76a1cbe00") (:revdesc . "4c1698a7c1c9") (:authors ("repelliuss" . "https://github.com/repelliuss")) (:maintainers ("repelliuss" . "repelliuss@gmail.com")) (:maintainer "repelliuss" . "repelliuss@gmail.com"))])
+ (bind-chord . [(20250330 1852) ((emacs (24 3)) (bind-key (1 0)) (key-chord (0 6))) "Key-chord binding helper for use-package-chords" tar ((:url . "https://github.com/jwiegley/use-package") (:commit . "0793b50e2bf1ec8bfc532b10baeef716c5aa947a") (:revdesc . "0793b50e2bf1") (:keywords "convenience" "tools" "extensions") (:authors ("Justin Talbott" . "justin@waymondo.com")) (:maintainers ("Justin Talbott" . "justin@waymondo.com")) (:maintainer "Justin Talbott" . "justin@waymondo.com"))])
+ (bind-map . [(20251119 201) ((emacs (24 3))) "Bind personal keymaps in multiple locations" tar ((:url . "https://github.com/justbur/emacs-bind-map") (:commit . "75aac732c10d97bc8dc49196c6623a09faf30d37") (:revdesc . "75aac732c10d") (:authors ("Justin Burkett" . "justin@burkett.cc")) (:maintainers ("Justin Burkett" . "justin@burkett.cc")) (:maintainer "Justin Burkett" . "justin@burkett.cc"))])
+ (binder . [(20250101 1950) ((emacs (24 4)) (seq (2 20))) "Global minor mode to facilitate multi-file writing projects" tar ((:url . "https://codeberg.org/divyaranjan/binder") (:commit . "08a0c9d4179ed31dcbacea3ab0077cd22db341b5") (:revdesc . "08a0c9d4179e") (:keywords "files" "outlines" "wp" "text") (:authors ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainers ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainer "Paul W. Rankin" . "rnkn@rnkn.xyz"))])
+ (bing-dict . [(20200216 110) nil "Minimalists' English-Chinese Bing dictionary" tar ((:url . "https://github.com/cute-jumper/bing-dict.el") (:commit . "1d581aaa9622b34f8fb83af5579fa252aa24cfef") (:revdesc . "1d581aaa9622") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (binky . [(20260719 1537) ((emacs (29 1)) (dash (2 19 1))) "Jump between points like a rabbit" tar ((:url . "https://github.com/eki3z/binky.el") (:commit . "e24c4691d231f4b0f649e155d2c93cd83d3dc073") (:revdesc . "e24c4691d231") (:keywords "convenience") (:authors ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainers ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainer "Eki Zhang" . "liuyinz95@gmail.com"))])
+ (biome . [(20260607 1500) ((emacs (27 1)) (transient (0 9 2)) (ct (0 2)) (request (0 3 3)) (compat (29 1 4 1))) "Bountiful Interface to Open Meteo for Emacs" tar ((:url . "https://github.com/SqrtMinusOne/biome") (:commit . "77a94f3c5210b80b63d5002c4780e542cd98a65f") (:revdesc . "77a94f3c5210") (:authors ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainers ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainer "Korytov Pavel" . "thexcloud@gmail.com"))])
+ (biomejs-format . [(20240401 458) ((emacs (24 1))) "Minor mode to format JS code with Biome on file save" tar ((:url . "https://github.com/yadex205/emacs-biomejs-format") (:commit . "cbfb8aac8bfab6fd893f1ccb4eb9efa29b1b3214") (:revdesc . "cbfb8aac8bfa") (:keywords "convenience" "wp" "edit" "js") (:maintainers ("Kanon Kakuno" . "yadex205@yadex205.com")) (:maintainer "Kanon Kakuno" . "yadex205@yadex205.com"))])
+ (birds-of-paradise-plus-theme . [(20130419 2129) nil "A brown/orange light-on-dark theme for Emacs 24 (deftheme)" tar ((:url . "https://github.com/jimeh/birds-of-paradise-plus-theme.el") (:commit . "bb9f9d4ef7f7872a388ec4eee1253069adcadb6f") (:revdesc . "bb9f9d4ef7f7") (:keywords "themes") (:authors ("Jim Myhrberg" . "contact@jimeh.me")) (:maintainers ("Jim Myhrberg" . "contact@jimeh.me")) (:maintainer "Jim Myhrberg" . "contact@jimeh.me"))])
+ (bison-mode . [(20210527 717) nil "Major mode for editing bison, yacc and lex files" tar ((:url . "https://github.com/Wilfred/bison-mode") (:commit . "4f2e20394a475931409618c1635e9c9f1cf07d9c") (:revdesc . "4f2e20394a47") (:keywords "bison-mode" "yacc-mode") (:authors ("Eric Beuscher" . "beuscher@eecs.tulane.edu")) (:maintainers ("Eric Beuscher" . "beuscher@eecs.tulane.edu")) (:maintainer "Eric Beuscher" . "beuscher@eecs.tulane.edu"))])
+ (bitbake . [(20260712 1615) ((emacs (25)) (dash (2 6 0)) (polymode (20260505 1803)) (s (1 10 0))) "Running bitbake from emacs" tar ((:url . "https://github.com/canatella/bitbake-el") (:commit . "f626d37727df0550aa2afd3f1b0ce81f38be18a3") (:revdesc . "f626d37727df") (:keywords "convenience"))])
+ (bitbake-ts-mode . [(20240908 1435) ((emacs (29 1))) "A major mode to use bitbake tree-sitter" tar ((:url . "https://github.com/seokbeomKim/bitbake-ts-mode") (:commit . "224d7fb93f0c06968421dd8536c64840a2f13273") (:revdesc . "224d7fb93f0c") (:keywords "bitbake" "tree-sitter" "languages") (:authors ("Jason Kim" . "sukbeom.kim@gmail.com")) (:maintainers ("Jason Kim" . "sukbeom.kim@gmail.com")) (:maintainer "Jason Kim" . "sukbeom.kim@gmail.com"))])
+ (bitbucket-devops . [(20260823 1649) ((emacs (29 1)) (magit (4 0 0)) (markdown-mode (2 6)) (transient (0 3 0)) (yaml (1 2 3))) "Bitbucket Cloud DevOps workflows" tar ((:url . "https://github.com/will-abb/bitbucket-devops.el") (:commit . "e362baf75ebf9ca32ddd5a5fde17fe53cebfaad9") (:revdesc . "e362baf75ebf") (:keywords "tools" "vc") (:authors ("Will Bosch-Bello" . "williamsbosch@gmail.com")) (:maintainers ("Will Bosch-Bello" . "williamsbosch@gmail.com")) (:maintainer "Will Bosch-Bello" . "williamsbosch@gmail.com"))])
+ (bitlbee . [(20151203 0) nil "Help get Bitlbee (http://www.bitlbee.org) up and running" tar ((:url . "https://github.com/pjones/bitlbee-el") (:commit . "f3342da46b0864ae8db4e82b553d9e617b090534") (:revdesc . "f3342da46b08"))])
+ (bitpack . [(20230417 2032) ((emacs (24 3))) "Bit packing functions" tar ((:url . "https://github.com/skeeto/bitpack") (:commit . "38d000646b81ce52fcb90a0747059a15264e112b") (:revdesc . "38d000646b81") (:keywords "c" "comm") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainer "Christopher Wellons" . "wellons@nullprogram.com"))])
+ (blackboard-bold-mode . [(20241216 2353) nil "Quail package for Blackboard bold symbols" tar ((:url . "https://github.com/grettke/blackboard-bold-mode") (:commit . "f4959eb0adca6b3096e5fea1f7e549533e4d8d79") (:revdesc . "f4959eb0adca") (:keywords "convenience" "i18n") (:authors ("Grant Rettke" . "grant@wisdomandwonder.com")) (:maintainers (nil . "grant@wisdomandwonder.com")) (:maintainer nil . "grant@wisdomandwonder.com"))])
+ (blackboard-theme . [(20161216 656) ((emacs (24))) "TextMate Blackboard Theme" tar ((:url . "https://github.com/don9z/blackboard-theme") (:commit . "d8b984f2541bb86eb4363a2b4c94631e49843d4a") (:revdesc . "d8b984f2541b"))])
+ (blacken . [(20231129 654) ((emacs (25 2))) "Reformat python buffers using the \"black\" formatter" tar ((:url . "https://github.com/proofit404/blacken") (:commit . "a43695f9cb412df93ac8d38b55ab1515e86e217e") (:revdesc . "a43695f9cb41") (:keywords "convenience" "blacken") (:authors ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainers ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainer "Artem Malyshev" . "proofit404@gmail.com"))])
+ (blackjack . [(20260705 2046) ((emacs (26 2))) "The game of Blackjack" tar ((:url . "https://github.com/gdonald/blackjack-el") (:commit . "7f98c9d15fa2d42abb2643235f73a9513b46c227") (:revdesc . "7f98c9d15fa2") (:keywords "card" "game" "games" "blackjack" "21") (:authors ("Greg Donald" . "gdonald@gmail.com")) (:maintainers ("Greg Donald" . "gdonald@gmail.com")) (:maintainer "Greg Donald" . "gdonald@gmail.com"))])
+ (blackout . [(20220509 2350) ((emacs (26))) "Better mode lighter overriding" tar ((:url . "https://github.com/radian-software/blackout") (:commit . "7707211370f03f03a2f74df15f42ac24a1e99300") (:revdesc . "7707211370f0") (:keywords "extensions") (:authors ("Radian LLC" . "contact+blackout@radian.codes")) (:maintainers ("Radian LLC" . "contact+blackout@radian.codes")) (:maintainer "Radian LLC" . "contact+blackout@radian.codes"))])
+ (blamee . [(20260619 227) ((emacs (27 1))) "Chunked git-blame overlays with popup details" tar ((:url . "https://github.com/fvi-att/blamee") (:commit . "60bb7e7dd29e0e0fabd172e91d362b00fac363c4") (:revdesc . "60bb7e7dd29e") (:keywords "tools" "vc" "git") (:authors ("fvi-att" . "jshimizujp@gmail.com")) (:maintainers ("fvi-att" . "jshimizujp@gmail.com")) (:maintainer "fvi-att" . "jshimizujp@gmail.com"))])
+ (blamer . [(20251001 620) ((emacs (27 1)) (posframe (1 1 7)) (async (1 9 8))) "Show git blame info about current line" tar ((:url . "https://github.com/artawower/blamer.el") (:commit . "aa9b22d4e847d15a5c4659c0407aa8bf4242cc94") (:revdesc . "aa9b22d4e847") (:authors ("Artur Yaroshenko" . "artawower@protonmail.com")) (:maintainers ("Artur Yaroshenko" . "artawower@protonmail.com")) (:maintainer "Artur Yaroshenko" . "artawower@protonmail.com"))])
+ (blgrep . [(20150401 1416) ((clmemo (20140321 715))) "Block grep" tar ((:url . "https://github.com/ataka/blgrep") (:commit . "605beda210610a5829750a987f5fcebea97af546") (:revdesc . "605beda21061") (:keywords "tools" "convenience") (:authors ("Masayuki Ataka" . "masayuki.ataka@gmail.com")) (:maintainers ("Masayuki Ataka" . "masayuki.ataka@gmail.com")) (:maintainer "Masayuki Ataka" . "masayuki.ataka@gmail.com"))])
+ (blimp . [(20180903 2240) ((emacs (25)) (eimp (1 4 0))) "Bustling Image Manipulation Package" tar ((:url . "https://github.com/walseb/blimp") (:commit . "b048b037129b68674b99310bcc08fb96d44fdbb4") (:revdesc . "b048b037129b") (:keywords "multimedia" "unix") (:authors ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainers ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainer "Sebastian Wålinder" . "s.walinder@gmail.com"))])
+ (bliss-theme . [(20170808 1307) ((emacs (24 0))) "An Emacs 24 theme based on Bliss (tmTheme)" tar ((:url . "https://github.com/emacsfodder/tmtheme-to-deftheme") (:commit . "c3cf6d8a666ab26909b7da158f9e94df71a5fbbf") (:revdesc . "c3cf6d8a666a"))])
+ (blitzmax-mode . [(20250221 1408) ((emacs (24 1))) "A major mode for editing BlitzMax source code" tar ((:url . "https://www.sodaware.net/dev/tools/blitzmax-mode/") (:commit . "adf6444ca4cea047b5532495e9692ed044224ea4") (:revdesc . "adf6444ca4ce") (:keywords "languages" "blitzmax"))])
+ (bln-mode . [(20181121 918) nil "Binary line navigation minor mode for cursor movement in long lines" tar ((:url . "https://github.com/mgrachten/bln-mode") (:commit . "a601b0bf975dd1432f6552ab6afe3f4f71133b4a") (:revdesc . "a601b0bf975d") (:keywords "motion" "location" "cursor" "convenience"))])
+ (block-nav . [(20201005 202) ((emacs (25 1))) "Jump across indentation levels for quick navigation" tar ((:url . "https://github.com/nixin72/block-nav.el") (:commit . "bc02e545cfd9a048a8df777669a426a8edc2321f") (:revdesc . "bc02e545cfd9") (:keywords "convenience") (:authors ("Philip Dumaresq" . "phdumaresq@protonmail.com")) (:maintainers ("Philip Dumaresq" . "phdumaresq@protonmail.com")) (:maintainer "Philip Dumaresq" . "phdumaresq@protonmail.com"))])
+ (blockdiag-mode . [(20160427 524) ((emacs (24 3))) "Major mode for editing blockdiag files" tar ((:url . "https://github.com/xcezx/xdiag-mode") (:commit . "f3b21ba433d60327cebd103ae4492200750e24a9") (:revdesc . "f3b21ba433d6") (:authors ("xcezx" . "main.xcezx@gmail.com")) (:maintainers ("xcezx" . "main.xcezx@gmail.com")) (:maintainer "xcezx" . "main.xcezx@gmail.com"))])
+ (blog-admin . [(20170923 1409) ((ctable (0 1 1)) (s (1 10 0)) (f (0 17 3)) (names (20151201 0)) (cl-lib (0 5))) "Blog admin for emacs with hexo/org-page supported" tar ((:url . "https://github.com/xcodebuild/blog-admin") (:commit . "b5f2e1dad7d68ec903619f7280bb0bcb7e398a1e") (:revdesc . "b5f2e1dad7d6") (:keywords "tools" "blog" "org" "hexo" "org-page") (:authors (nil . "code.falling@gmail.com")) (:maintainers (nil . "code.falling@gmail.com")) (:maintainer nil . "code.falling@gmail.com"))])
+ (blog-minimal . [(20181021 849) ((ht (1 5)) (simple-httpd (1 4 6)) (mustache (0 22)) (s (1 11 0)) (org (9 0 3))) "A simple static site generator based on org mode" tar ((:url . "https://github.com/thiefuniverse/blog-minimal") (:commit . "a634a2db0b80cb445ef0b072d1a1482ced91f9ad") (:revdesc . "a634a2db0b80") (:keywords "tools") (:authors ("Thank Fly" . "thiefuniverses@gmail.com")) (:maintainers ("Thank Fly" . "thiefuniverses@gmail.com")) (:maintainer "Thank Fly" . "thiefuniverses@gmail.com"))])
+ (blox . [(20220521 807) ((emacs (25 1))) "Interaction with Roblox tooling" tar ((:url . "https://github.com/kennethloeffler/blox") (:commit . "9ebebb65fb38b5570ba8dfbb5ec835633c06b67d") (:revdesc . "9ebebb65fb38") (:keywords "roblox" "rojo" "tools") (:authors ("Kenneth Loeffler" . "kenloef@gmail.com")) (:maintainers ("Kenneth Loeffler" . "kenloef@gmail.com")) (:maintainer "Kenneth Loeffler" . "kenloef@gmail.com"))])
+ (blue . [(20260709 1248) ((emacs (30 1)) (magit-section (4 3 8))) "BLUE build system interface" tar ((:url . "https://codeberg.org/lapislazuli/blue.el") (:commit . "3668ca7f627f3497d907293f38dcfbe33fb6f4f7") (:revdesc . "3668ca7f627f") (:keywords "blue" "tools") (:authors ("Sergio Pastor Pérez" . "sergio.pastorperez@gmail.com")) (:maintainers ("Sergio Pastor Pérez" . "sergio.pastorperez@gmail.com")) (:maintainer "Sergio Pastor Pérez" . "sergio.pastorperez@gmail.com"))])
+ (bluesky . [(20260618 147) ((emacs (30 1)) (plz (0 9 0)) (futur (1 7)) (vui (1 0 0))) "A Bluesky client" tar ((:url . "https://github.com/ahyatt/emacs-bluesky") (:commit . "b4b7957a3af0533918535486f44afcb808d38d24") (:revdesc . "b4b7957a3af0") (:keywords "outlines" "hypermedia") (:authors ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainers ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainer "Andrew Hyatt" . "ahyatt@gmail.com"))])
+ (bluesound . [(20260616 831) ((emacs (26 1))) "Play, pause, resume music on a Bluesound player" tar ((:url . "https://git.sr.ht/~rwv/bluesound-el/") (:commit . "3a99edc4232d41a9cd13b846c7a4f27036256d29") (:revdesc . "3a99edc4232d") (:keywords "convenience" "multimedia"))])
+ (bm . [(20260325 2238) nil "Visible bookmarks in buffer" tar ((:url . "https://github.com/joodland/bm") (:commit . "7517b7812629b6bd4900ef5c2946121a4835dc0e") (:revdesc . "7517b7812629") (:keywords "bookmark" "highlight" "faces" "persistent") (:authors ("Jo Odland" . "jo.odlandgmail.com")) (:maintainers ("Jo Odland" . "jo.odlandgmail.com")) (:maintainer "Jo Odland" . "jo.odlandgmail.com"))])
+ (bmp . [(20251005 2032) ((emacs (29))) "Version bumper for git projects" tar ((:url . "https://git.sr.ht/~lepisma/bmp") (:commit . "8f4fe653ee49860d764b789919bbd46a4a9d3768") (:revdesc . "8f4fe653ee49") (:authors ("Abhinav Tushar" . "lepisma@fastmail.com")) (:maintainers ("Abhinav Tushar" . "lepisma@fastmail.com")) (:maintainer "Abhinav Tushar" . "lepisma@fastmail.com"))])
+ (bmx-mode . [(20210319 620) ((emacs (25 1)) (cl-lib (0 5)) (company (0 9 4)) (dash (2 13 0)) (s (1 12 0))) "Batch Mode eXtras" tar ((:url . "https://github.com/josteink/bmx-mode") (:commit . "6f008707efe0bb5646f0c1b0d6f57f0a8800e200") (:revdesc . "6f008707efe0") (:keywords "c" "convenience" "tools") (:authors ("Jostein Kjønigsen" . "jostein@gmail.com")) (:maintainers ("Jostein Kjønigsen" . "jostein@gmail.com")) (:maintainer "Jostein Kjønigsen" . "jostein@gmail.com"))])
+ (bnf-mode . [(20240915 2118) ((cl-lib (0 5)) (emacs (27 1))) "Major mode for editing BNF grammars" tar ((:url . "https://github.com/sergeyklay/bnf-mode") (:commit . "5304ab647e04916c5be4fdde41477ad429a89120") (:revdesc . "5304ab647e04") (:keywords "languages") (:authors ("Serghei Iakovlev" . "gnu@serghei.pl")) (:maintainers ("Serghei Iakovlev" . "gnu@serghei.pl")) (:maintainer "Serghei Iakovlev" . "gnu@serghei.pl"))])
+ (bnfc . [(20160605 1927) ((emacs (24 3))) "Define context-free grammars for the BNFC tool" tar ((:url . "https://github.com/jmitchell/bnfc-mode") (:commit . "1b58df1dd0cb9b81900632fb2843a03b94f56fdb") (:revdesc . "1b58df1dd0cb") (:keywords "languages" "tools") (:authors ("Jacob Mitchell" . "jmitchell@member.fsf.org")) (:maintainers ("Jacob Mitchell" . "jmitchell@member.fsf.org")) (:maintainer "Jacob Mitchell" . "jmitchell@member.fsf.org"))])
+ (boa-ide . [(20230813 2036) ((boa-mode (1 4 4)) (emacs (28 1)) (json-snatcher (1 0)) (json-mode (0 2)) (project (0 8 1))) "Mode for boa language files" tar ((:url . "https://github.com/boalang/syntax-highlight") (:commit . "e1f960ada937be747ea2ec302bea155092e5c06b") (:revdesc . "e1f960ada937") (:keywords "languages") (:authors ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (boa-mode . [(20230730 2216) ((emacs (26 1))) "Mode for boa language files" tar ((:url . "https://github.com/boalang/syntax-highlight") (:commit . "892f2a33ef95db9f19b45deb8309652534f91efd") (:revdesc . "892f2a33ef95") (:keywords "languages") (:authors ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (bog . [(20240215 27) ((cl-lib (0 5))) "Extensions for research notes in Org mode" tar ((:url . "https://github.com/kyleam/bog") (:commit . "c8e7c8cb54b1787cc3d9383f0514eb76cadd4002") (:revdesc . "c8e7c8cb54b1") (:keywords "bib" "outlines") (:authors ("Kyle Meyer" . "kyle@kyleam.com")) (:maintainers ("Kyle Meyer" . "kyle@kyleam.com")) (:maintainer "Kyle Meyer" . "kyle@kyleam.com"))])
+ (bolt-mode . [(20180310 810) ((emacs (24 3))) "Editing support for Bolt language" tar ((:url . "https://github.com/mpontus/bolt-mode") (:commit . "85a5a752bfbebb4aed884326c25db64c000e9934") (:revdesc . "85a5a752bfbe") (:keywords "languages") (:authors ("Mikhail Pontus" . "mpontus@gmail.com")) (:maintainers ("Mikhail Pontus" . "mpontus@gmail.com")) (:maintainer "Mikhail Pontus" . "mpontus@gmail.com"))])
+ (bongo . [(20201002 1020) ((cl-lib (0 5)) (emacs (24 1))) "Play music with Emacs" tar ((:url . "https://github.com/dbrock/bongo") (:commit . "9e9629090262bba6d0003dabe5a375e47a4477f1") (:revdesc . "9e9629090262"))])
+ (bonjourmadame . [(20170919 1134) nil "Say \"Hello ma'am!\"" tar ((:url . "https://github.com/pierre-lecocq/bonjourmadame") (:commit . "d3df185fce78aefa689fded8e56a654f0fde4ac0") (:revdesc . "d3df185fce78"))])
+ (boogie-friends . [(20260804 2236) ((cl-lib (0 5)) (company (0 8 12)) (dash (2 10 0)) (flycheck (0 23)) (yasnippet (0 9 0 1)) (emacs (24 4))) "A collection of programming modes for Boogie, Dafny, and Z3 (SMTLIB v2)" tar ((:url . "https://github.com/boogie-org/boogie-friends/") (:commit . "39bacece3b6a3ee5169b4b76751cf73aaccaa7a9") (:revdesc . "39bacece3b6a") (:keywords "convenience" "languages") (:authors ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainers ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainer "Clément Pit-Claudel" . "clement.pitclaudel@live.com"))])
+ (bookmark-frecency . [(20250220 1407) ((emacs (27 1))) "Sort bookmarks by frecency" tar ((:url . "https://github.com/akirak/bookmark-frecency.el") (:commit . "c0a4dae3ff23a548538716cbd2ad533680dc7e9e") (:revdesc . "c0a4dae3ff23") (:keywords "convenience") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (bookmark-in-project . [(20260108 1305) ((emacs (29 1))) "Bookmark access within a project" tar ((:url . "https://codeberg.org/ideasman42/emacs-bookmark-in-project") (:commit . "bf923ddd3e74fe99e086221e461a5fa7599d0644") (:revdesc . "bf923ddd3e74") (:keywords "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (bookmarks-menu . [(20250508 2114) ((emacs (29 1))) "Add a Bookmarks menu to the menu bar" tar ((:url . "https://github.com/ajrosen/bookmarks-menu") (:commit . "e279bd3c27773e72b23eb698e9b1eed3f7d764c9") (:revdesc . "e279bd3c2777") (:keywords "matching" "convenience" "bookmark") (:authors ("Andy Rosen" . "ajr@corp.mlfs.org")) (:maintainers ("Andy Rosen" . "ajr@corp.mlfs.org")) (:maintainer "Andy Rosen" . "ajr@corp.mlfs.org"))])
+ (bool-flip . [(20161215 1539) ((emacs (24 3))) "Flip the boolean under the point" tar ((:url . "https://github.com/michaeljb/bool-flip/") (:commit . "0f7cc9b387429239fb929896511727d4e49a795b") (:revdesc . "0f7cc9b38742") (:keywords "boolean" "convenience" "usability") (:authors ("Michael Brandt" . "michaelbrandt5@gmail.com")) (:maintainers ("Michael Brandt" . "michaelbrandt5@gmail.com")) (:maintainer "Michael Brandt" . "michaelbrandt5@gmail.com"))])
+ (boon . [(20260215 930) ((emacs (26 1)) (dash (2 12 0)) (expand-region (0 10 0)) (multiple-cursors (1 3 0))) "An Ergonomic Command Mode" tar ((:url . "https://github.com/jyp/boon") (:commit . "1aa2b2f8f6c0b32cd600355bbeabc036624d0566") (:revdesc . "1aa2b2f8f6c0"))])
+ (borg . [(20260826 1830) ((emacs (28 1)) (epkg (4 2)) (magit (4 7))) "Assimilate Emacs packages as Git submodules" tar ((:url . "https://github.com/emacscollective/borg") (:commit . "c6118f3779659ed2ff8ec8f651bd66c8eea3d2bf") (:revdesc . "c6118f377965") (:keywords "tools") (:authors ("Jonas Bernoulli" . "emacs.borg@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.borg@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.borg@jonas.bernoulli.dev"))])
+ (borland-blue-theme . [(20260620 1425) ((emacs (24 1))) "Blue/yellow theme based on old DOS Borland/Turbo C IDE" tar ((:url . "https://github.com/fourier/borland-blue-theme") (:commit . "c24ef5aa16fed6727696b0ea71bf154889e4ee0a") (:revdesc . "c24ef5aa16fe") (:keywords "themes") (:authors ("Alexey Veretennikov" . "alexeydotveretennikovatgmaildotcom")) (:maintainers ("Alexey Veretennikov" . "alexeydotveretennikovatgmaildotcom")) (:maintainer "Alexey Veretennikov" . "alexeydotveretennikovatgmaildotcom"))])
+ (boron-theme . [(20170808 1308) ((emacs (24 0))) "An Emacs 24 theme based on Boron (tmTheme)" tar ((:url . "https://github.com/emacsfodder/tmtheme-to-deftheme") (:commit . "87ae1a765e07429fec25d2f29b004f84b52d2e0a") (:revdesc . "87ae1a765e07"))])
+ (boxes . [(20241003 847) ((emacs (24 3))) "ASCII boxes unlimited!" tar ((:url . "https://boxes.thomasjensen.com") (:commit . "bae35281d0f814c704ef4a174a5f734541e1f457") (:revdesc . "bae35281d0f8") (:keywords "extensions") (:authors ("Jason L. Shiffer" . "jshiffer@zerotao.com")) (:maintainers ("Jason L. Shiffer" . "jshiffer@zerotao.com")) (:maintainer "Jason L. Shiffer" . "jshiffer@zerotao.com"))])
+ (boxquote . [(20260415 1949) ((emacs (28 1))) "Quote text with a semi-box" tar ((:url . "https://github.com/davep/boxquote.el") (:commit . "eb14169161ddeba9a703c42f7352cb52f732cc86") (:revdesc . "eb14169161dd") (:keywords "convenience" "editing" "quoting") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (bpe . [(20141228 2205) ((emacs (24 1))) "Blog from Org mode to Blogger" tar ((:url . "https://github.com/yuutayamada/bpe") (:commit . "7b5b25f83506e6c9f4075d3803fa32404943a189") (:revdesc . "7b5b25f83506") (:keywords "blogger" "blog") (:authors ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainers ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainer "Yuta Yamada" . "cokesboy\"at\"gmail.com"))])
+ (bpftrace-mode . [(20190608 2201) ((emacs (24 0))) "Major mode for editing bpftrace script files" tar ((:url . "https://gitlab.com/jgkamat/bpftrace-mode") (:commit . "587b39ea7a1d786df5c04796d51bf2a5a4eda0d7") (:revdesc . "587b39ea7a1d") (:keywords "highlight" "c") (:authors ("Jay Kamat" . "jaygkamat@gmail.com")) (:maintainers ("Jay Kamat" . "jaygkamat@gmail.com")) (:maintainer "Jay Kamat" . "jaygkamat@gmail.com"))])
+ (bpr . [(20180220 1844) ((emacs (24))) "Background Process Runner" tar ((:url . "https://github.com/ilya-babanov/emacs-bpr") (:commit . "af84a83dea09d86e77d87ac30604f2c5b4bf4117") (:revdesc . "af84a83dea09") (:keywords "background" "async" "process" "management") (:authors ("Ilya Babanov" . "ilya-babanov@ya.ru")) (:maintainers ("Ilya Babanov" . "ilya-babanov@ya.ru")) (:maintainer "Ilya Babanov" . "ilya-babanov@ya.ru"))])
+ (bqn-mode . [(20260208 1145) ((emacs (26 1)) (compat (30 0 0 0)) (eros (0 1 0))) "Emacs mode for BQN" tar ((:url . "https://github.com/museoa/bqn-mode") (:commit . "7968023225c23ec63644a18ea613cb8cd2cd536e") (:revdesc . "7968023225c2") (:authors ("Marshall Lochbaum" . "mwlochbaum@gmail.com")) (:maintainers ("Marshall Lochbaum" . "mwlochbaum@gmail.com")) (:maintainer "Marshall Lochbaum" . "mwlochbaum@gmail.com"))])
+ (bracket-face . [(20260815 1330) ((emacs (30 1))) "A face for brackets" tar ((:url . "https://github.com/tarsius/paren-face") (:commit . "f9475c6a6e52e5047d9e87e31dec04833b1a0d4d") (:revdesc . "f9475c6a6e52") (:keywords "faces" "lisp") (:authors ("Jonas Bernoulli" . "emacs.paren-face@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.paren-face@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.paren-face@jonas.bernoulli.dev"))])
+ (bracketed-paste . [(20160407 2348) ((emacs (24 3))) "Bracketed paste mode support within emacs -nw" tar ((:url . "https://github.com/hchbaw/bracketed-paste.el") (:commit . "843ce3bbb63d560face889e13a57a2f7543957d5") (:revdesc . "843ce3bbb63d") (:keywords "terminals") (:authors ("Takeshi Banse" . "takebi@laafc.net")) (:maintainers ("Takeshi Banse" . "takebi@laafc.net")) (:maintainer "Takeshi Banse" . "takebi@laafc.net"))])
+ (brainfuck-mode . [(20150113 842) ((langdoc (20130601 1450))) "Brainfuck mode for Emacs" tar ((:url . "https://github.com/tom-tan/brainfuck-mode/") (:commit . "36e69552bb3b97a4f888d362c59845651bd0d492") (:revdesc . "36e69552bb3b") (:keywords "brainfuck" "langdoc") (:authors ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainers ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainer "Tomoya Tanjo" . "ttanjo@gmail.com"))])
+ (bray . [(20260108 326) ((emacs (29 1))) "Lightweight modal editing" tar ((:url . "https://codeberg.org/ideasman42/emacs-bray") (:commit . "ad06429ac60a5e90e2c2de6ea24ec561cecfb2d0") (:revdesc . "ad06429ac60a") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (brazilian-holidays . [(20220828 2348) ((emacs (26))) "Brazilian holidays" tar ((:url . "https://github.com/jadler/brazilian-holidays") (:commit . "03206ea673df49c91a8f924db799620713d86240") (:revdesc . "03206ea673df") (:keywords "calendar" "holidays" "brazilian") (:authors ("Jaguaraquem A. Reinaldo" . "jaguar.adler@gmail.com")) (:maintainers ("Jaguaraquem A. Reinaldo" . "jaguar.adler@gmail.com")) (:maintainer "Jaguaraquem A. Reinaldo" . "jaguar.adler@gmail.com"))])
+ (brec-mode . [(20240620 1213) ((emacs (24 3))) "A major mode for editing Breccian text" tar ((:url . "http://reluk.ca/project/Breccia/Emacs/") (:commit . "942e042cc22224ec3940d0867c8c08f71e036924") (:revdesc . "942e042cc222") (:keywords "outlines" "wp") (:authors ("Michael Allan" . "mike@reluk.ca")) (:maintainers ("Michael Allan" . "mike@reluk.ca")) (:maintainer "Michael Allan" . "mike@reluk.ca"))])
+ (brf . [(20250301 1142) ((fringe-helper (0 1 1)) (emacs (24 4))) "Brf-mode provides features from the legendary editor Brief" tar ((:url . "https://bitbucket.org/MikeWoolley/brf-mode") (:commit . "4751ce5c76f53d4e3e6a658461651a4f3ce35045") (:revdesc . "4751ce5c76f5") (:keywords "brief" "crisp" "emulations") (:authors ("Mike Woolley" . "mike@bulsara.com")) (:maintainers ("Mike Woolley" . "mike@bulsara.com")) (:maintainer "Mike Woolley" . "mike@bulsara.com"))])
+ (brightscript-mode . [(20220906 827) ((emacs (26 3))) "Major mode for editing Brightscript files" tar ((:url . "https://github.com/viseztrance/brightscript-mode") (:commit . "025d6f5a70752c62a28d4f86c053a283b3898a49") (:revdesc . "025d6f5a7075") (:keywords "languages") (:authors ("Daniel Mircea" . "daniel@viseztrance.com")) (:maintainers (nil . "daniel@viseztrance.com")) (:maintainer nil . "daniel@viseztrance.com"))])
+ (bril-mode . [(20240315 1157) ((emacs (27 1))) "Major mode for Bril text format" tar ((:url . "https://github.com/nverno/bril-mode") (:commit . "da61316385e31973c462a1e8a3213327b34df3ff") (:revdesc . "da61316385e3") (:keywords "languages" "bril") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (broadcast . [(20250804 1815) ((emacs (24 4))) "Links buffers together for simultaneous editing" tar ((:url . "https://github.com/killdash9/broadcast.el") (:commit . "c6fff897c14f0aac9c44a7d8ca3f70782e4c38d0") (:revdesc . "c6fff897c14f") (:keywords "convenience" "frames" "link" "cursors") (:authors ("Russell Black" . "(killdash9@github)")) (:maintainers ("Russell Black" . "(killdash9@github)")) (:maintainer "Russell Black" . "(killdash9@github)"))])
+ (browse-at-remote . [(20260126 608) ((f (0 20 0)) (s (1 9 0)) (cl-lib (0 5))) "Open github/gitlab/bitbucket/stash/gist/phab/sourcehut/gitea page from Emacs" tar ((:url . "https://github.com/rmuslimov/browse-at-remote") (:commit . "38e5ffd77493c17c821fd88f938dbf42705a5158") (:revdesc . "38e5ffd77493") (:keywords "github" "gitlab" "bitbucket" "gist" "stash" "phabricator" "sourcehut" "pagure" "gitea") (:authors ("Rustem Muslimov" . "r.muslimov@gmail.com")) (:maintainers ("Rustem Muslimov" . "r.muslimov@gmail.com")) (:maintainer "Rustem Muslimov" . "r.muslimov@gmail.com"))])
+ (browse-kill-ring . [(20260503 1620) nil "Interactively insert items from kill-ring" tar ((:url . "https://github.com/browse-kill-ring/browse-kill-ring") (:commit . "39d65a830b93530c9bd68a7dc14353cbffd1d01f") (:revdesc . "39d65a830b93") (:keywords "convenience") (:authors ("Colin Walters" . "walters@verbum.org")) (:maintainers ("browse-kill-ring" . "browse-kill-ring@tonotdo.com")) (:maintainer "browse-kill-ring" . "browse-kill-ring@tonotdo.com"))])
+ (browse-url-dwim . [(20140731 1922) ((string-utils (0 3 2))) "Context-sensitive external browse URL or Internet search" tar ((:url . "https://github.com/rolandwalker/browse-url-dwim") (:commit . "11f1c53126619c7ef1bb5f5d6914ce0b3cce0e30") (:revdesc . "11f1c5312661") (:keywords "hypermedia") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (browser-gt . [(20260821 2202) ((emacs (30 1)) (websocket (1 13)) (org (9 8))) "WebSocket bridge to a Chrome/Firefox extension" tar ((:url . "https://github.com/dmgerman/browser-gt") (:commit . "6117e1f4b70540a8f6986f6e647eedbd72e818e7") (:revdesc . "6117e1f4b705") (:keywords "comm" "tools" "browser" "org") (:authors ("Daniel M. German" . "dmg@turingmachine.org")) (:maintainers ("Daniel M. German" . "dmg@turingmachine.org")) (:maintainer "Daniel M. German" . "dmg@turingmachine.org"))])
+ (browser-hist . [(20260425 1930) ((emacs (28 1))) "Search through the Browser history" tar ((:url . "https://github.com/agzam/browser-hist.el") (:commit . "aab0a364077bfbf5559085086545d30bbaf7ac5e") (:revdesc . "aab0a364077b") (:keywords "convenience" "hypermedia" "matching" "tools") (:authors ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainers ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainer "Ag Ibragimov" . "agzam.ibragimov@gmail.com"))])
+ (brutalist-theme . [(20250104 1112) ((emacs (24 1))) "Brutalist theme" tar ((:url . "https://git.madhouse-project.org/algernon/brutalist-theme.el") (:commit . "29f1c70451075e87a9f1747478cc78ed6d37de26") (:revdesc . "29f1c7045107"))])
+ (bshell . [(20260107 1914) ((emacs (26 1)) (dash (2 19 1)) (buffer-manage (1 1))) "Manage and track multiple inferior shells" tar ((:url . "https://github.com/plandes/bshell") (:commit . "c13907ac0d2d8eda58c0e35d99179ed8c0e4c25a") (:revdesc . "c13907ac0d2d") (:keywords "unix" "interactive" "shell" "management"))])
+ (bts . [(20151109 1333) ((widget-mvc (0 0 2)) (log4e (0 3 0)) (yaxception (0 3 3)) (dash (2 9 0)) (s (1 9 0)) (pos-tip (0 4 5))) "A unified UI for various bug tracking systems" tar ((:url . "https://github.com/aki2o/emacs-bts") (:commit . "df42d58a36447697f93b56e69f5e700b2baef1f9") (:revdesc . "df42d58a3644") (:keywords "convenience") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (bts-github . [(20170401 1249) ((bts (0 0 1)) (gh (0 8 2))) "A plugin of bts.el for GitHub" tar ((:url . "https://github.com/aki2o/emacs-bts-github") (:commit . "ef2cf9202dc2128e5efdb613bfde9276a8cd95ad") (:revdesc . "ef2cf9202dc2") (:keywords "convenience" "git" "github") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (bubbleberry-theme . [(20141017 944) ((emacs (24 1))) "A theme based on LightTable for Emacs24" tar ((:url . "https://github.com/jasonm23/emacs-bubbleberry-theme") (:commit . "22e9adf4586414024e4592972022ec297321b320") (:revdesc . "22e9adf45864") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (buckwalter . [(20191119 1950) nil "Write arabic using Buckwalter transliteration" tar ((:url . "https://github.com/joehakimrahme/buckwalter-arabic") (:commit . "1ef6f210f38c0686bc5b445b9704190f168f30ea") (:revdesc . "1ef6f210f38c") (:keywords "arabic" "transliteration" "i18n") (:authors ("Joe HAKIM RAHME" . "joehakimrahme@gmail.com")) (:maintainers ("Joe HAKIM RAHME" . "joehakimrahme@gmail.com")) (:maintainer "Joe HAKIM RAHME" . "joehakimrahme@gmail.com"))])
+ (buffer-buttons . [(20150106 1439) nil "Define, save, and load code-safe buttons in files for emacs" tar ((:url . "https://github.com/rpav/buffer-buttons") (:commit . "2feb8494fa7863b98256bc85da670d74a3a8a975") (:revdesc . "2feb8494fa78") (:authors ("Ryan Pavlik" . "rpavlik@gmail.com")) (:maintainers ("Ryan Pavlik" . "rpavlik@gmail.com")) (:maintainer "Ryan Pavlik" . "rpavlik@gmail.com"))])
+ (buffer-env . [(20260604 645) ((emacs (27 1)) (compat (29 1))) "Buffer-local process environments" tar ((:url . "https://github.com/astoff/buffer-env") (:commit . "81968582b2dbfd5171b57206b44a4bb8fc31cc69") (:revdesc . "81968582b2db") (:keywords "processes" "tools") (:authors ("Augusto Stoffel" . "arstoffel@gmail.com")) (:maintainers ("Augusto Stoffel" . "arstoffel@gmail.com")) (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com"))])
+ (buffer-flip . [(20220718 10) ((cl-lib (0 5))) "Cycle through buffers like Alt-Tab in Windows" tar ((:url . "https://github.com/killdash9/buffer-flip.el") (:commit . "dda0cbcd202cdadf322942f9637a11ed92525756") (:revdesc . "dda0cbcd202c") (:keywords "convenience") (:authors ("Russell Black" . "(killdash9@github)")) (:maintainers ("Russell Black" . "(killdash9@github)")) (:maintainer "Russell Black" . "(killdash9@github)"))])
+ (buffer-guardian . [(20260826 243) ((emacs (27 1))) "Automatically Save Buffers Without Manual Intervention" tar ((:url . "https://github.com/jamescherti/jc-dev") (:commit . "283ff5eb4f1a5f714a7c41b5759a62060d143fa6") (:revdesc . "283ff5eb4f1a") (:keywords "convenience" "files") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (buffer-manage . [(20260713 121) ((emacs (26 1)) (choice-program (0 16 0)) (dash (2 17 0))) "Manage buffers" tar ((:url . "https://github.com/plandes/buffer-manage") (:commit . "f32c756a261aebca0a864e41958097b30690e171") (:revdesc . "f32c756a261a") (:keywords "internal" "maint"))])
+ (buffer-move . [(20220512 755) ((emacs (24 1))) "Easily swap buffers" tar ((:url . "https://github.com/lukhas/buffer-move/") (:commit . "e7800b3ab1bd76ee475ef35507ec51ecd5a3f065") (:revdesc . "e7800b3ab1bd") (:keywords "convenience") (:authors ("Lucas Bonnet" . "lucas@rincevent.net") ("Mathis Hofer" . "mathis@fsfe.org") ("Geyslan G. Bem" . "geyslan@gmail.com")) (:maintainers ("Lucas Bonnet" . "lucas@rincevent.net") ("Mathis Hofer" . "mathis@fsfe.org") ("Geyslan G. Bem" . "geyslan@gmail.com")) (:maintainer "Lucas Bonnet" . "lucas@rincevent.net"))])
+ (buffer-name-relative . [(20251214 600) ((emacs (29 1))) "Relative buffer names" tar ((:url . "https://codeberg.org/ideasman42/emacs-buffer-name-relative") (:commit . "a2e902c04ab68ec52b7c721d89a999f8eb2daae2") (:revdesc . "a2e902c04ab6") (:keywords "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (buffer-ring . [(20251004 347) ((emacs (25 1)) (dynaring (0 3))) "Rings and tori for buffer navigation" tar ((:url . "https://github.com/countvajhula/buffer-ring") (:commit . "3d7ee2020aff07506e16220f86b6521af814c282") (:revdesc . "3d7ee2020aff") (:authors ("Mike Mattie" . "codermattie@gmail.com") ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainers ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainer "Sid Kasivajhula" . "sid@countvajhula.com"))])
+ (buffer-sets . [(20260817 2118) ((cl-lib (0 5))) "Sets of Buffers for Buffer Management" tar ((:url . "https://git.sr.ht/~swflint/buffer-sets") (:commit . "9c30f12feaa4182d845b70c5be459a07d3be5db3") (:revdesc . "9c30f12feaa4") (:keywords "buffer-management") (:authors ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (buffer-terminator . [(20260826 245) ((emacs (27 1))) "Safely Terminate/Kill Buffers Automatically" tar ((:url . "https://github.com/jamescherti/buffer-terminator.el") (:commit . "6b6b648127c3d3ac4b7e6ce0a701ddbb8325151c") (:revdesc . "6b6b648127c3") (:keywords "convenience" "files") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (buffer-utils . [(20140512 1400) nil "Buffer-manipulation utility functions" tar ((:url . "https://github.com/rolandwalker/buffer-utils") (:commit . "32e1f23817b9c6caedb53e5359baad29e99eaa2b") (:revdesc . "32e1f23817b9") (:keywords "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (buffer-watcher . [(20170913 839) ((f (0 16 2)) (cl-lib (0 5))) "Easily run shell scripts per filetype/directory when a buffer is saved" tar ((:url . "https://github.com/NicolasPetton/buffer-watcher") (:commit . "b32c67c8a5d724257d759f4c903d0dedc32246ef") (:revdesc . "b32c67c8a5d7") (:authors ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainers ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainer "Nicolas Petton" . "nicolas@petton.fr"))])
+ (buffer-wrap . [(20260101 558) ((emacs (24 4))) "Wrap the beginning and the end of buffer" tar ((:url . "https://github.com/jcs-elpa/buffer-wrap") (:commit . "53a098384c17ae5140e525aeeeece3b14d35e12f") (:revdesc . "53a098384c17") (:keywords "convenience" "buffer" "tool" "wrap") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (bufferbin . [(20230706 110) ((emacs (26 1))) "Quick mouse access to buffers" tar ((:url . "https://github.com/blueridge-data/bufferbin") (:commit . "ee4bf49cc69573f690e2e9f36f03c20b322c1730") (:revdesc . "ee4bf49cc695") (:authors ("Ryan Walsh" . "blueridge-data@github")) (:maintainers ("Ryan Walsh" . "blueridge-data@github")) (:maintainer "Ryan Walsh" . "blueridge-data@github"))])
+ (bufferfile . [(20260826 245) ((emacs (26 1))) "Rename/Delete/Copy Files and Associated Buffers" tar ((:url . "https://github.com/jamescherti/bufferfile.el") (:commit . "52c1af463cdd29f8f36250189a489e8ad6ac30fe") (:revdesc . "52c1af463cdd") (:keywords "convenience" "files" "tools") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (bufler . [(20250327 2246) ((emacs (26 3)) (burly (0 4 -1)) (dash (2 18)) (f (0 17)) (pretty-hydra (0 2 2)) (magit-section (0 1)) (map (2 1))) "Group buffers into workspaces with programmable rules" tar ((:url . "https://github.com/alphapapa/bufler.el") (:commit . "b96822d2132fda6bd1dd86f017d7e76e3b990c82") (:revdesc . "b96822d2132f") (:keywords "convenience") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (bufshow . [(20130726 1838) ((emacs (24 1))) "A simple presentation tool for Emacs" tar ((:url . "https://github.com/pjones/bufshow") (:commit . "42d7fb74c3f914e127d5447c63d209bf19f5d517") (:revdesc . "42d7fb74c3f9") (:authors ("Peter Jones" . "pjones@pmade.com")) (:maintainers ("Peter Jones" . "pjones@pmade.com")) (:maintainer "Peter Jones" . "pjones@pmade.com"))])
+ (bug-reference-github . [(20200206 2158) nil "Set `bug-reference-url-format' in Github repos" tar ((:url . "https://github.com/arnested/bug-reference-github") (:commit . "4e848472a5be464a3bc10a3c917322d1e344951a") (:revdesc . "4e848472a5be") (:keywords "programming" "tools") (:authors ("Arne Jørgensen" . "arne@arnested.dk")) (:maintainers ("Arne Jørgensen" . "arne@arnested.dk")) (:maintainer "Arne Jørgensen" . "arne@arnested.dk"))])
+ (bui . [(20260502 730) ((emacs (29 1))) "Buffer interface library" tar ((:url . "https://github.com/alezost/bui.el") (:commit . "4319e1bf3ff94ff0568eed280ac1f980a4b68679") (:revdesc . "4319e1bf3ff9") (:keywords "tools") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (build-farm . [(20181218 2002) ((emacs (24 4)) (bui (1 2 1)) (magit-popup (2 1 0))) "Interface for Nix and Guix build farms (Hydra and Cuirass)" tar ((:url . "https://gitlab.com/alezost-emacs/build-farm") (:commit . "5c268a3c235ace0d79ef1ec82c440120317e06f5") (:revdesc . "5c268a3c235a") (:keywords "tools") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (build-helper . [(20161009 1755) ((projectile (0 9 0))) "Utilities to help build code" tar ((:url . "https://github.com/afonso360/build-helper") (:commit . "d1962858734253eca791721ccf62d1c4a10719f5") (:revdesc . "d19628587342") (:keywords "convenience") (:authors ("Afonso Bordado" . "afonsobordado@az8.co")) (:maintainers ("Afonso Bordado" . "afonsobordado@az8.co")) (:maintainer "Afonso Bordado" . "afonsobordado@az8.co"))])
+ (build-status . [(20190807 1231) ((cl-lib (0 5))) "Mode line build status indicator" tar ((:url . "https://github.com/sshaw/build-status") (:commit . "1a1d2473aa62f2fdda47d8bfeb9fe352d2579b48") (:revdesc . "1a1d2473aa62") (:keywords "mode-line" "ci" "circleci" "travis-ci") (:authors ("Skye Shaw" . "skye.shaw@gmail.com")) (:maintainers ("Skye Shaw" . "skye.shaw@gmail.com")) (:maintainer "Skye Shaw" . "skye.shaw@gmail.com"))])
+ (burly . [(20240727 545) ((emacs (27 1)) (map (2 1))) "Save and restore frame/window configurations with buffers" tar ((:url . "https://github.com/alphapapa/burly.el") (:commit . "d5b7133b5b629dd6bca29bb16660a9e472e82e25") (:revdesc . "d5b7133b5b62") (:keywords "convenience") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (burnt-toast . [(20201113 814) ((emacs (25 1)) (dash (2 10)) (alert (1 2))) "Elisp integration with the BurntToast PowerShell module" tar ((:url . "https://github.com/cedarbaum/burnt-toast.el") (:commit . "e9cf41928b7b502fdfa43718c35a24e503db32e2") (:revdesc . "e9cf41928b7b") (:keywords "alert" "notifications" "powershell" "comm") (:authors ("Sam Cedarbaum" . "(scedarbaum@gmail.com)")) (:maintainers ("Sam Cedarbaum" . "(scedarbaum@gmail.com)")) (:maintainer "Sam Cedarbaum" . "(scedarbaum@gmail.com)"))])
+ (bury-successful-compilation . [(20181106 403) nil "Bury the *compilation* buffer after successful compilation" tar ((:url . "https://github.com/EricCrosson/bury-successful-compilation") (:commit . "674644c844184605a1bb4f9487a60f7a780a6fe7") (:revdesc . "674644c84418") (:keywords "compilation") (:authors ("Eric Crosson" . "esc@ericcrosson.com")) (:maintainers ("Eric Crosson" . "esc@ericcrosson.com")) (:maintainer "Eric Crosson" . "esc@ericcrosson.com"))])
+ (buster-mode . [(20140928 1213) nil "Minor mode to speed up development when writing tests with Buster.js" tar ((:url . "https://github.com/magnars/buster-mode") (:commit . "de6958ef8369400922618b8d1e99abfa91b97ac5") (:revdesc . "de6958ef8369") (:keywords "buster" "testing" "javascript") (:authors ("Magnar Sveen" . "magnars@gmail.com") ("Christian Johansen" . "christian@cjohansen.no")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com") ("Christian Johansen" . "christian@cjohansen.no")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (buster-snippets . [(20151125 1010) ((yasnippet (0 8 0))) "Yasnippets for the Buster javascript testing framework" tar ((:url . "https://github.com/magnars/buster-snippets.el") (:commit . "bb8769dae132659858e74d52f3f4e8790399423a") (:revdesc . "bb8769dae132") (:keywords "snippets") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (busybee-theme . [(20170719 928) nil "Port of vim's mustang theme" tar ((:url . "https://github.com/mswift42/busybee-theme") (:commit . "66b2315b030582d0ebee605cf455d386d8c30fcd") (:revdesc . "66b2315b0305"))])
+ (buttercup . [(20260512 2141) ((emacs (24 4))) "Behavior-Driven Emacs Lisp Testing" tar ((:url . "https://github.com/jorgenschaefer/emacs-buttercup") (:commit . "39c8e762408a166a5afa03b8e79dd8d1a0de5caa") (:revdesc . "39c8e762408a") (:authors ("Jorgen Schaefer" . "contact@jorgenschaefer.de")) (:maintainers ("Ola Nilsson" . "ola.nilsson@gmail.com")) (:maintainer "Ola Nilsson" . "ola.nilsson@gmail.com"))])
+ (buttercup-junit . [(20240423 2158) ((emacs (24 4)) (buttercup (1 15))) "JUnit reporting for Buttercup" tar ((:url . "https://bitbucket.org/olanilsson/buttercup-junit") (:commit . "877daa33fc3fc23f2a3d633e28650c04534458b5") (:revdesc . "877daa33fc3f") (:keywords "tools" "test" "unittest" "buttercup" "ci") (:authors ("Ola Nilsson" . "ola.nilsson@gmail.com")) (:maintainers ("Ola Nilsson" . "ola.nilsson@gmail.com")) (:maintainer "Ola Nilsson" . "ola.nilsson@gmail.com"))])
+ (button-lock . [(20230304 2212) nil "Clickable text defined by regular expression" tar ((:url . "https://github.com/rolandwalker/button-lock") (:commit . "1f7a89ca05b6167af7d1337ad23a5d923486caac") (:revdesc . "1f7a89ca05b6") (:keywords "mouse" "button" "hypermedia" "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (buttons . [(20230906 1631) ((emacs (24 1)) (cl-lib (0 3))) "Define and visualize hierarchies of keymaps" tar ((:url . "https://github.com/erjoalgo/emacs-buttons") (:commit . "6fd4a9b3f8b9d2344a316b0fd6576d90f53f5acb") (:revdesc . "6fd4a9b3f8b9") (:keywords "lisp" "extensions" "convenience" "tools") (:maintainers ("concat \"erjoalgo\" \"@\" \"gmail\" \".com\"" . "")) (:maintainer "concat \"erjoalgo\" \"@\" \"gmail\" \".com\"" . ""))])
+ (c-c-combo . [(20151224 255) nil "Make stuff happen when you reach a target wpm" tar ((:url . "https://www.github.com/CestDiego/c-c-combo.el") (:commit . "a261a833499a7fdc29610863b3aafc74818770ba") (:revdesc . "a261a833499a") (:authors ("Diego Berrocal" . "cestdiego@gmail.com")) (:maintainers ("Diego Berrocal" . "cestdiego@gmail.com")) (:maintainer "Diego Berrocal" . "cestdiego@gmail.com"))])
+ (c-eldoc . [(20201004 2347) nil "Helpful description of the arguments to C functions" tar ((:url . "https://github.com/nflath/c-eldoc") (:commit . "f4ede1f37f6de583376669735326367d84a0a917") (:revdesc . "f4ede1f37f6d") (:authors ("Nathaniel Flath" . "flat0103@gmail.com")) (:maintainers ("Nathaniel Flath" . "flat0103@gmail.com")) (:maintainer "Nathaniel Flath" . "flat0103@gmail.com"))])
+ (c-eval . [(20210611 705) ((emacs (24 5))) "Compile and run one-off C code snippets" tar ((:url . "https://github.com/lassik/emacs-c-eval") (:commit . "fd129bfcb75475ac6820cc33862bd8efb8097fae") (:revdesc . "fd129bfcb754") (:keywords "c" "languages") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (c0-mode . [(20151110 1852) nil "Major mode for editing C0 files" tar ((:url . "http://c0.typesafety.net/") (:commit . "c214093c36864d6208fcb9e6a72413ed17ed5d60") (:revdesc . "c214093c3686") (:keywords "c0" "languages"))])
+ (c2-mode . [(20250303 956) ((emacs (24 3))) "Major mode for C2 programming language" tar ((:url . "https://github.com/easimonenko/c2-mode") (:commit . "e3cc3a94f88d98e5a1b9086a4ad480009040a1ed") (:revdesc . "e3cc3a94f88d") (:keywords "languages" "c2") (:authors ("Evgeny Simonenko" . "easimonenko@gmail.com")) (:maintainers ("Evgeny Simonenko" . "easimonenko@gmail.com")) (:maintainer "Evgeny Simonenko" . "easimonenko@gmail.com"))])
+ (ca65-mode . [(20210218 106) ((emacs (26 1))) "Major mode for ca65 assembly files" tar ((:url . "https://github.com/wendelscardua/ca65-mode") (:commit . "590d90cc0e1c1864dd7ce03df99b741ba866d52a") (:revdesc . "590d90cc0e1c") (:keywords "languages" "assembly" "ca65" "6502") (:authors ("Wendel Scardua" . "wendel@scardua.net")) (:maintainers ("Wendel Scardua" . "wendel@scardua.net")) (:maintainer "Wendel Scardua" . "wendel@scardua.net"))])
+ (cabal-mode . [(20251119 1602) ((emacs (24 4))) "Support for Cabal packages" tar ((:url . "https://github.com/webdevred/cabal-mode") (:commit . "14183916674121ce49bff129c5c1f4f49092ee2c") (:revdesc . "141839166741") (:authors ("Stefan Monnier" . "monnier@iro.umontreal.ca")) (:maintainers ("Stefan Monnier" . "monnier@iro.umontreal.ca")) (:maintainer "Stefan Monnier" . "monnier@iro.umontreal.ca"))])
+ (cabledolphin . [(20160204 938) ((emacs (24 4)) (seq (1 0))) "Capture Emacs network traffic" tar ((:url . "https://github.com/legoscia/cabledolphin") (:commit . "fffc192cafa61558e924323d6da8166fe5f2a6f9") (:revdesc . "fffc192cafa6") (:keywords "comm") (:authors ("Magnus Henoch" . "magnus.henoch@gmail.com")) (:maintainers ("Magnus Henoch" . "magnus.henoch@gmail.com")) (:maintainer "Magnus Henoch" . "magnus.henoch@gmail.com"))])
+ (cacao-theme . [(20260519 1959) ((emacs (24 1))) "Based on a image reversal" tar ((:url . "https://github.com/Michael-Garibaldi/cacao-theme") (:commit . "73d8f81b7c9d2957cf7201d89a7a81bb673af03f") (:revdesc . "73d8f81b7c9d"))])
+ (cache . [(20111019 2300) nil "Implementation of a hash table whose key-value pairs expire" tar ((:url . "https://github.com/nflath/cache") (:commit . "7499586b6c8224df9f5c5bc4dec96b008258d580") (:revdesc . "7499586b6c82"))])
+ (cacoo . [(20120319 2359) ((concurrent (0 3 1))) "Minor mode for Cacoo : http://cacoo.com" tar ((:url . "https://github.com/kiwanami/emacs-cacoo/") (:commit . "c9fa04fbe97639b24698709530361c2bb5f3273c") (:revdesc . "c9fa04fbe976") (:keywords "convenience" "diagram") (:authors ("SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net")) (:maintainers ("SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net")) (:maintainer "SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net"))])
+ (caddyfile-mode . [(20220626 945) ((emacs (25)) (loop (1 3))) "Major mode for Caddy configuration files" tar ((:url . "https://github.com/Schnouki/caddyfile-mode/") (:commit . "fc41148f5a7eb320f070666f046fb9d88cf17680") (:revdesc . "fc41148f5a7e") (:keywords "languages") (:authors ("Thomas Jost" . "schnouki@schnouki.net")) (:maintainers ("Thomas Jost" . "schnouki@schnouki.net")) (:maintainer "Thomas Jost" . "schnouki@schnouki.net"))])
+ (cake-inflector . [(20140415 858) ((s (1 9 0))) "Lazy porting CakePHP infrector.php to el" tar ((:url . "https://github.com/k1LoW/emacs-cake-inflector") (:commit . "d9c6298fbca53efeb6f0f37140395659d9a6d7cc") (:revdesc . "d9c6298fbca5") (:authors (nil . "k1low[at]101000lab[dot]org")) (:maintainers (nil . "k1low[at]101000lab[dot]org")) (:maintainer nil . "k1low[at]101000lab[dot]org"))])
+ (cakecrumbs . [(20180929 139) ((emacs (24 4))) "Show parents on header for HTML/Jade/Sass/Stylus" tar ((:url . "https://github.com/kuanyui/cakecrumbs.el") (:commit . "cf8c1df885eee004602f73c4f841301e200e5850") (:revdesc . "cf8c1df885ee") (:keywords "languages" "html" "jade" "pug" "sass" "scss" "stylus") (:authors ("ono hiroko" . "kuanyui.github.io")) (:maintainers ("ono hiroko" . "kuanyui.github.io")) (:maintainer "ono hiroko" . "kuanyui.github.io"))])
+ (cal-china-x . [(20260222 1826) ((cl-lib (0 5))) "Chinese localization, lunar/horoscope/zodiac info and more.." tar ((:url . "https://github.com/xwl/cal-china-x") (:commit . "e9e3067134b0606bfe2a6925d7488c4b24ce81d5") (:revdesc . "e9e3067134b0") (:authors ("William Xu" . "william.xwl@gmail.com")) (:maintainers ("William Xu" . "william.xwl@gmail.com")) (:maintainer "William Xu" . "william.xwl@gmail.com"))])
+ (calc-at-point . [(20210219 1252) ((emacs (26)) (dash (2 18 0))) "Perform calculations at point or over selection" tar ((:url . "https://github.com/walseb/calc-at-point") (:commit . "0c1a9e94b519b0edb0abcbacdf6101eea2f2a524") (:revdesc . "0c1a9e94b519") (:keywords "convenience") (:authors ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainers ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainer "Sebastian Wålinder" . "s.walinder@gmail.com"))])
+ (calc-prog-utils . [(20220820 1855) ((emacs (24 1))) "Calc programmers utilities" tar ((:url . "https://github.com/Jesse-Millwood/calc-prog") (:commit . "190acfda56660a2d75df2d9eac5b14edaccccd80") (:revdesc . "190acfda5666") (:keywords "tools" "convenience"))])
+ (calctape . [(20251016 857) ((emacs (29 1))) "Adding-machine, tape calculator, column sum-mer" tar ((:url . "https://github.com/Boruch-Baum/emacs-calctape") (:commit . "4fe05aa8d0071c7e057cec9985dd5bab65c3380c") (:revdesc . "4fe05aa8d007") (:keywords "convenience" "data") (:authors ("Boruch Baum" . "boruch_baum@gmx.com")) (:maintainers ("Boruch Baum" . "boruch_baum@gmx.com")) (:maintainer "Boruch Baum" . "boruch_baum@gmx.com"))])
+ (calendar-norway . [(20220211 1129) nil "Norwegian calendar" tar ((:url . "https://github.com/unhammer/calendar-norway.el") (:commit . "0db0ea63365f4ff5f7d18fb8335fa88af194a2cc") (:revdesc . "0db0ea63365f") (:keywords "calendar" "norwegian" "localization") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (calfw . [(20251031 1110) ((emacs (28 1))) "Calendar view framework" tar ((:url . "https://github.com/haji-ali/emacs-calfw") (:commit . "36846cdca91794cf38fa171d5a3ac291d3ebc060") (:revdesc . "36846cdca917") (:keywords "calendar") (:authors ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainers ("Al Haji-Ali" . "abdo.haji.aliatgmail.com")) (:maintainer "Al Haji-Ali" . "abdo.haji.aliatgmail.com"))])
+ (calfw-cal . [(20251030 845) ((emacs (28 1)) (calfw (2 0))) "Calendar view for diary" tar ((:url . "https://github.com/haji-ali/emacs-calfw") (:commit . "57be107b20625c13ed010cb0f70a603a61d47629") (:revdesc . "57be107b2062") (:keywords "calendar" "org") (:authors ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainers ("Al Haji-Ali" . "abdo.haji.aliatgmail.com")) (:maintainer "Al Haji-Ali" . "abdo.haji.aliatgmail.com"))])
+ (calfw-gcal . [(20120111 1000) nil "Edit Google calendar for calfw.el" tar ((:url . "https://github.com/myuhe/calfw-gcal.el") (:commit . "14aab20687d6cc9e6c5ddb9e11984c4e14c3d870") (:revdesc . "14aab20687d6") (:keywords "convenience" "calendar" "calfw.el") (:authors ("myuhe" . "yuhei.maeda_at_gmail.com")))])
+ (calfw-howm . [(20251030 1600) ((emacs (28 1)) (calfw (2 0)) (howm (1 5 0))) "Calendar view for howm" tar ((:url . "https://github.com/haji-ali/emacs-calfw") (:commit . "c34b6afaee33392e0bcd18441588e9a502f368eb") (:revdesc . "c34b6afaee33") (:keywords "calendar") (:authors ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainers ("Al Haji-Ali" . "abdo.haji.aliatgmail.com")) (:maintainer "Al Haji-Ali" . "abdo.haji.aliatgmail.com"))])
+ (calfw-ical . [(20260426 925) ((emacs (28 1)) (calfw (2 0))) "Calendar view for ical format" tar ((:url . "https://github.com/haji-ali/emacs-calfw") (:commit . "24fa167af96a6e677aea7c6b9385f669b550ee2f") (:revdesc . "24fa167af96a") (:keywords "calendar" "ical") (:authors ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainers ("Al Haji-Ali" . "abdo.haji.aliatgmail.com")) (:maintainer "Al Haji-Ali" . "abdo.haji.aliatgmail.com"))])
+ (calfw-org . [(20251030 845) ((emacs (28 1)) (calfw (2 0)) (org (9 7))) "Calendar view for org-agenda" tar ((:url . "https://github.com/haji-ali/emacs-calfw") (:commit . "57be107b20625c13ed010cb0f70a603a61d47629") (:revdesc . "57be107b2062") (:keywords "calendar" "org") (:authors ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainers ("Al Haji-Ali" . "abdo.haji.aliatgmail.com")) (:maintainer "Al Haji-Ali" . "abdo.haji.aliatgmail.com"))])
+ (calibredb . [(20260821 518) ((emacs (29 1)) (org (9 3)) (transient (0 1 0)) (s (1 12 0)) (dash (2 17 0)) (request (0 3 3)) (esxml (0 3 7))) "Yet another calibre client" tar ((:url . "https://github.com/chenyanming/calibredb.el") (:commit . "4fefffd7018365677e6fc4cdbcd8b6041a4c0b18") (:revdesc . "4fefffd70183") (:keywords "tools") (:authors ("Damon Chan" . "elecming@gmail.com")) (:maintainers ("Damon Chan" . "elecming@gmail.com")) (:maintainer "Damon Chan" . "elecming@gmail.com"))])
+ (call-graph . [(20260713 638) ((emacs (28 1)) (tree-mode (1 0 0)) (ivy (0 10 0)) (beacon (1 3 4))) "Generate call graph for c/c++ functions" tar ((:url . "https://github.com/beacoder/call-graph") (:commit . "99cab0f3829632f39f0e76f4e992c7bd988203a7") (:revdesc . "99cab0f38296") (:keywords "programming" "convenience") (:authors ("Huming Chen" . "chenhuming@gmail.com")) (:maintainers ("Huming Chen" . "chenhuming@gmail.com")) (:maintainer "Huming Chen" . "chenhuming@gmail.com"))])
+ (calle24 . [(20260506 2210) ((emacs (29 1))) "Emacs Toolbar Support for SF Symbols" tar ((:url . "https://github.com/kickingvegas/calle24") (:commit . "24d6240209b46c5005121d14cba3fae0e0ff257f") (:revdesc . "24d6240209b4") (:keywords "tools") (:authors ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainers ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainer "Charles Choi" . "kickingvegas@gmail.com"))])
+ (calmer-forest-theme . [(20230302 2149) nil "Darkish theme with green/orange tint" tar ((:url . "https://github.com/caldwell/calmer-forest-theme") (:commit . "09fc50730ea386d3589863f8809e02e5bdd459cf") (:revdesc . "09fc50730ea3") (:authors ("David Caldwell" . "david@porkrind.org")) (:maintainers ("David Caldwell" . "david@porkrind.org")) (:maintainer "David Caldwell" . "david@porkrind.org"))])
+ (camcorder . [(20190317 2138) ((emacs (24)) (names (20150000)) (cl-lib (0 5))) "Record screencasts in gif or other formats" tar ((:url . "https://github.com/Bruce-Connor/camcorder.el") (:commit . "b11ca61491a27681bb3131b72b51c105fd996bed") (:revdesc . "b11ca61491a2") (:keywords "multimedia" "screencast") (:authors ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainers ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainer "Artur Malabarba" . "bruce.connor.am@gmail.com"))])
+ (caml . [(20250227 1734) ((emacs (24 4))) "Caml mode for GNU Emacs" tar ((:url . "https://github.com/ocaml/caml-mode") (:commit . "744333dc4c4bd8b93e037efa8f7362b0903b96a2") (:revdesc . "744333dc4c4b") (:keywords "ocaml") (:authors ("Jacques Garrigue" . "garrigue@kurims.kyoto-u.ac.jp") ("Ian T Zimmerman" . "itz@rahul.net") ("Damien Doligez" . "damien.doligez@inria.fr")) (:maintainers ("Christophe Troestler" . "Christophe.Troestler@umons.ac.be")) (:maintainer "Christophe Troestler" . "Christophe.Troestler@umons.ac.be"))])
+ (cangjie . [(20230219 1150) ((emacs (24 4)) (s (1 12 0)) (dash (2 14 1)) (f (0 2 0))) "Retrieve cangjie code for han characters" tar ((:url . "https://github.com/kisaragi-hiu/cangjie.el") (:commit . "d6882e15f47fdde37e9f739dde604d77d25f11db") (:revdesc . "d6882e15f47f") (:keywords "convenience" "writing") (:authors ("Kisaragi Hiu" . "mail@kisaragi-hiu.com")) (:maintainers ("Kisaragi Hiu" . "mail@kisaragi-hiu.com")) (:maintainer "Kisaragi Hiu" . "mail@kisaragi-hiu.com"))])
+ (cape . [(20260821 1208) ((emacs (29 1)) (compat (31))) "Completion At Point Extensions" tar ((:url . "https://github.com/minad/cape") (:commit . "f0135abaf95a22b9fb2c951751a5d0733ce61bbd") (:revdesc . "f0135abaf95a") (:keywords "abbrev" "convenience" "matching" "completion" "text") (:authors ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (capnp-mode . [(20260106 2017) nil "Major mode for editing Capn' Proto Files" tar ((:url . "https://github.com/capnproto/capnproto") (:commit . "92327754f61963a2b4f0edbd299246ed1d42e665") (:revdesc . "92327754f619") (:authors ("Brian Taylor" . "el.wubo@gmail.com")) (:maintainers ("Brian Taylor" . "el.wubo@gmail.com")) (:maintainer "Brian Taylor" . "el.wubo@gmail.com"))])
+ (capture . [(20130828 1644) nil "Screencasting with \"avconv\" or \"ffmpeg\"" tar ((:url . "https://github.com/pashinin/capture.el") (:commit . "9140c207b48b3520a2f06674b3e1bee2fc92b80c") (:revdesc . "9140c207b48b") (:authors ("Sergey Pashinin" . "sergeyatpashinindotcom")) (:maintainers ("Sergey Pashinin" . "sergeyatpashinindotcom")) (:maintainer "Sergey Pashinin" . "sergeyatpashinindotcom"))])
+ (carbon-now-sh . [(20220701 332) ((emacs (24 4))) "Https://carbon.now.sh integration" tar ((:url . "https://github.com/veelenga/carbon-now-sh.el") (:commit . "e66f2e43e288f35ad9075f5fc84d59ad348efc88") (:revdesc . "e66f2e43e288") (:keywords "convenience"))])
+ (card-games . [(20260816 1451) ((emacs (26 1))) "Play card games (console UNICODE and graphical SVG)" tar ((:url . "https://code.bru.st/corwin/card-game.el") (:commit . "1a5d23d39eb3d7dfcdeabc8e99c2673fd4937434") (:revdesc . "1a5d23d39eb3") (:keywords "games") (:authors ("Corwin Brust" . "corwin@bru.st")) (:maintainers ("Corwin Brust" . "corwin@bru.st")) (:maintainer "Corwin Brust" . "corwin@bru.st"))])
+ (cargo . [(20231229 915) ((emacs (24 3)) (markdown-mode (2 4))) "Emacs Minor Mode for Cargo, Rust's Package Manager" tar ((:url . "https://github.com/kwrooijen/cargo.el") (:commit . "7f8466063381eed05d4e222ce822b1dd44e3bf17") (:revdesc . "7f8466063381") (:keywords "tools"))])
+ (cargo-mode . [(20260114 839) ((emacs (25 1))) "Cargo Major Mode. Cargo is the Rust package manager" tar ((:url . "https://github.com/ayrat555/cargo-mode") (:commit . "33528954218f8957a26f3fef506c3537823d569d") (:revdesc . "33528954218f") (:keywords "tools") (:authors ("Ayrat Badykov" . "ayratin555@gmail.com")) (:maintainers ("Ayrat Badykov" . "ayratin555@gmail.com")) (:maintainer "Ayrat Badykov" . "ayratin555@gmail.com"))])
+ (cargo-transient . [(20260718 1155) ((emacs (28 1))) "A transient UI for Cargo, Rust's package manager" tar ((:url . "https://github.com/peterstuart/cargo-transient") (:commit . "a1fac6ce76d32317fd9f6bcdcc86fca46460c709") (:revdesc . "a1fac6ce76d3") (:authors ("Peter Stuart" . "peter@peterstuart.org")) (:maintainers ("Peter Stuart" . "peter@peterstuart.org")) (:maintainer "Peter Stuart" . "peter@peterstuart.org"))])
+ (caroline-theme . [(20160318 520) ((emacs (24))) "A trip down to New Orleans.." tar ((:url . "https://github.com/xjackk/carolines-theme") (:commit . "222fd483db304509f9e422dc82883d808e023ceb") (:revdesc . "222fd483db30") (:authors ("Jack Killilea" . "jaaacckz1@gmail.com")) (:maintainers ("Jack Killilea" . "jaaacckz1@gmail.com")) (:maintainer "Jack Killilea" . "jaaacckz1@gmail.com"))])
+ (cascading-dir-locals . [(20211013 1955) ((emacs (26 1))) "Apply all (!) .dir-locals.el from root to current directory" tar ((:url . "https://github.com/fritzgrabo/cascading-dir-locals") (:commit . "345d4b70e837d45ee84014684127e7399932d5e6") (:revdesc . "345d4b70e837") (:keywords "convenience") (:authors ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainers ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainer "Fritz Grabo" . "hello@fritzgrabo.com"))])
+ (caseformat . [(20160115 1615) ((emacs (24)) (cl-lib (0 5)) (dash (2 12 1)) (s (1 10 0))) "Format based letter case converter" tar ((:url . "https://github.com/HKey/caseformat") (:commit . "e4961889309408b3425da9b69c16ddfadd17a674") (:revdesc . "e49618893094") (:keywords "convenience") (:authors ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainers ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainer "Hiroki YAMAKAWA" . "s06139@gmail.com"))])
+ (caser . [(20241003 131) ((emacs (29 1))) "Change text casing from camelCase to UpperCamelCase to dash-case to snake_case" tar ((:url . "https://hg.sr.ht/~zck/caser.el") (:commit . "6ed8fe13ff6a4c39a831cf51b031a9e9fdcba5ff") (:revdesc . "6ed8fe13ff6a"))])
+ (cask-mode . [(20160410 1449) ((emacs (24 3))) "Major mode for editing Cask files" tar ((:url . "https://github.com/Wilfred/cask-mode") (:commit . "c97755267b7215f02df7b0c16b4210c04aee6566") (:revdesc . "c97755267b72") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (cask-package-toolset . [(20170921 2256) ((emacs (24)) (cl-lib (0 3)) (s (1 6 1)) (dash (1 8 0)) (f (0 10 0)) (commander (0 2 0)) (ansi (0 1 0)) (shut-up (0 1 0))) "Toolsettize your package" tar ((:url . "https://github.com/AdrieanKhisbe/cask-package-toolset.el") (:commit . "2c74cd827e88c7f8360581a841e45f0b794510e7") (:revdesc . "2c74cd827e88") (:keywords "convenience" "tools") (:authors ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainers ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainer "Adrien Becchis" . "adriean.khisbe@live.fr"))])
+ (caskxy . [(20140513 1539) ((log4e (0 2 0)) (yaxception (0 1))) "Control Cask in Emacs" tar ((:url . "https://github.com/aki2o/caskxy") (:commit . "279f3ab79bd77fe69cb3148a79896b9bf118a9b3") (:revdesc . "279f3ab79bd7") (:keywords "convenience") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (casual . [(20260818 526) ((emacs (30 1)) (transient (0 9 0)) (csv-mode (1 27))) "Transient user interfaces for various modes" tar ((:url . "https://github.com/kickingvegas/casual") (:commit . "4360a3f8bd8dc775bd1c41a0fb26f2397785ad7f") (:revdesc . "4360a3f8bd8d") (:keywords "tools" "wp") (:authors ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainers ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainer "Charles Choi" . "kickingvegas@gmail.com"))])
+ (casual-avy . [(20250830 2115) ((emacs (29 1)) (avy (0 5 0)) (casual (2 0 0))) "Transient UI for Avy" tar ((:url . "https://github.com/kickingvegas/casual-avy") (:commit . "c5bc8e9d57a843f75e6125f097550414af3d5ec7") (:revdesc . "c5bc8e9d57a8") (:keywords "tools") (:authors ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainers ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainer "Charles Choi" . "kickingvegas@gmail.com"))])
+ (casual-suite . [(20241022 3) ((emacs (29 1)) (casual (2 0 0)) (casual-avy (2 0 0)) (casual-symbol-overlay (2 0 0))) "A suite of opinionated Transient UIs" tar ((:url . "https://github.com/kickingvegas/casual-suite") (:commit . "c590e78d756bc6b3d43ab5cf8618e41b2a5bc88b") (:revdesc . "c590e78d756b") (:keywords "tools") (:authors ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainers ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainer "Charles Choi" . "kickingvegas@gmail.com"))])
+ (casual-symbol-overlay . [(20241021 2358) ((emacs (29 1)) (casual (2 0 0)) (symbol-overlay (4 2))) "Transient UI for Symbol Overlay" tar ((:url . "https://github.com/kickingvegas/casual-symbol-overlay") (:commit . "1453e7486dd0921f0319f21dd8c8b603e4eb7300") (:revdesc . "1453e7486dd0") (:keywords "tools") (:authors ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainers ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainer "Charles Choi" . "kickingvegas@gmail.com"))])
+ (catmacs . [(20170826 1157) ((emacs (24))) "Simple CAT interface for Yaesu Transceivers" tar ((:url . "https://bitbucket.org/pymaximus/catmacs") (:commit . "6ea9ee195661fe95355413856476c45dcc8e24e8") (:revdesc . "6ea9ee195661") (:keywords "comm" "hardware") (:authors ("Frank Singleton" . "b17flyboy@gmail.com")) (:maintainers ("Frank Singleton" . "b17flyboy@gmail.com")) (:maintainer "Frank Singleton" . "b17flyboy@gmail.com"))])
+ (catppuccin-theme . [(20260406 30) ((emacs (27 1))) "Catppuccin for Emacs - 🍄 Soothing pastel theme for Emacs" tar ((:url . "https://github.com/catppuccin/emacs") (:commit . "7435adc7f81eaf3b1b254fd2156ff3abd7a171c4") (:revdesc . "7435adc7f81e") (:maintainers ("Jeremy Baxter" . "jeremy@baxters.nz")) (:maintainer "Jeremy Baxter" . "jeremy@baxters.nz"))])
+ (cats . [(20230407 1316) ((emacs (26 1))) "Monads for Elisp" tar ((:url . "https://github.com/Fuco1/emacs-cats") (:commit . "7fc70db0eeb2c33ffba5c13c4cdc0f31c7b95537") (:revdesc . "7fc70db0eeb2") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (cbm . [(20171116 1240) ((cl-lib (0 5))) "Switch to similar buffers" tar ((:url . "https://github.com/akermu/cbm.el") (:commit . "5b41c936ba9f6d170309a85ffebc9939c1050b31") (:revdesc . "5b41c936ba9f") (:keywords "buffers") (:authors ("Lukas Fürmetz" . "fuermetz@mailbox.org")) (:maintainers ("Lukas Fürmetz" . "fuermetz@mailbox.org")) (:maintainer "Lukas Fürmetz" . "fuermetz@mailbox.org"))])
+ (cbor . [(20230810 1653) ((emacs (25 1))) "CBOR utilities" tar ((:url . "https://github.com/Titan-C/cardano.el") (:commit . "ba624ad3f8b726bee1d8dcb0a2a9e2b658bb4c9b") (:revdesc . "ba624ad3f8b7") (:authors ("Oscar Najera" . "https://oscarnajera.com")) (:maintainers ("Oscar Najera" . "hi@oscarnajera.com")) (:maintainer "Oscar Najera" . "hi@oscarnajera.com"))])
+ (cc-cedict . [(20241221 1256) ((emacs (26 1))) "Interface to CC-CEDICT (a Chinese-English dictionary)" tar ((:url . "https://github.com/xuchunyang/cc-cedict.el") (:commit . "4b30010f98b34c7e1b3a3c327f9be0851ef83641") (:revdesc . "4b30010f98b3"))])
+ (ccc . [(20260322 1316) nil "Buffer local cursor color control library" tar ((:url . "https://github.com/skk-dev/ddskk") (:commit . "29a290bb62fa58bd8aad330c54049b7a7ac8449a") (:revdesc . "29a290bb62fa") (:keywords "cursor") (:authors ("Masatake YAMATO" . "masata-y@is.aist-nara.ac.jp")))])
+ (ccls . [(20260507 1746) ((emacs (29 1)) (lsp-mode (6 3 1)) (dash (2 14 1))) "Ccls client for lsp-mode" tar ((:url . "https://github.com/emacs-lsp/emacs-ccls") (:commit . "f728c92e33844f1da54cb47ecb4e44160f2042a8") (:revdesc . "f728c92e3384") (:keywords "languages" "lsp" "c++"))])
+ (cd-compile . [(20141108 1957) nil "Run compile in a specific directory" tar ((:url . "https://github.com/jamienicol/emacs-cd-compile") (:commit . "10284ccae86afda4a37b09ba90acd1e2efedec9f") (:revdesc . "10284ccae86a") (:authors ("Jamie Nicol" . "jamie@thenicols.net")) (:maintainers ("Jamie Nicol" . "jamie@thenicols.net")) (:maintainer "Jamie Nicol" . "jamie@thenicols.net"))])
+ (cdb . [(20230318 2152) nil "Constant database (cdb) reader for Emacs Lisp" tar ((:url . "https://github.com/skk-dev/ddskk") (:commit . "3820fa6bb0d53132aafb611a643c1e41e444052b") (:revdesc . "3820fa6bb0d5") (:keywords "cdb") (:authors ("Yusuke Shinyama" . "yusukeatcs.nyu.edu")))])
+ (cdlatex . [(20241007 1623) nil "Fast input methods for LaTeX environments and math" tar ((:url . "https://github.com/cdominik/cdlatex") (:commit . "fac070f0164ac9f5859cb4cccba7d29a65c337f3") (:revdesc . "fac070f0164a") (:keywords "tex") (:authors ("Carsten Dominik" . "carsten.dominik@gmail.com")) (:maintainers ("Carsten Dominik" . "carsten.dominik@gmail.com")) (:maintainer "Carsten Dominik" . "carsten.dominik@gmail.com"))])
+ (cdnjs . [(20161031 1522) ((dash (2 13 0)) (deferred (0 4)) (f (0 17 2)) (pkg-info (0 5))) "A front end for http://cdnjs.com" tar ((:url . "https://github.com/yasuyk/cdnjs.el") (:commit . "ce19880d3ec3d81e6c665d0b1dfea99cc7a3f908") (:revdesc . "ce19880d3ec3") (:keywords "tools") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (cedit . [(20200816 526) nil "Paredit-like commands for c-like languages" tar ((:url . "http://zk-phi.gitub.io/") (:commit . "cb38316903e6cfa8b8c978defa7e1dafcd4e0c12") (:revdesc . "cb38316903e6"))])
+ (celery . [(20250221 1903) ((emacs (24)) (dash (2 18 0)) (s (1 9 0)) (deferred (0 3 2))) "A minor mode to draw stats from celery and more?" tar ((:url . "https://github.com/ardumont/emacs-celery") (:commit . "c689a47176d09a99382a4daecbe42ded94d4d649") (:revdesc . "c689a47176d0") (:keywords "celery" "convenience") (:authors ("ardumont" . "eniotna.t@gmail.com")) (:maintainers ("ardumont" . "eniotna.t@gmail.com")) (:maintainer "ardumont" . "eniotna.t@gmail.com"))])
+ (celestial-mode-line . [(20230323 737) ((emacs (24))) "Show lunar phase and sunrise/-set time in modeline" tar ((:url . "https://github.com/ecraven/celestial-mode-line") (:commit . "90056322d6664e2e2b593912e4d5e68f1468cafc") (:revdesc . "90056322d666") (:keywords "extensions") (:authors ("Peter" . "craven@gmx.net")) (:maintainers ("Peter" . "craven@gmx.net")) (:maintainer "Peter" . "craven@gmx.net"))])
+ (centaur-tabs . [(20260128 950) ((emacs (27 1)) (powerline (2 4))) "Aesthetic, modern looking customizable tabs plugin" tar ((:url . "https://github.com/ema2159/centaur-tabs") (:commit . "5ec350da6cacc34ac0efaac17d6ac5031ef82bd4") (:revdesc . "5ec350da6cac") (:keywords "frames") (:authors ("Emmanuel Bustos" . "ema2159@gmail.com")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (centered-cursor-mode . [(20230914 1358) nil "Cursor stays vertically centered" tar ((:url . "https://github.com/andre-r/centered-cursor-mode.el") (:commit . "67ef719e685407dbc455c7430765e4e685fd95a9") (:revdesc . "67ef719e6854") (:keywords "convenience") (:authors ("André Riemann" . "andre.riemann@web.de")) (:maintainers ("André Riemann" . "andre.riemann@web.de")) (:maintainer "André Riemann" . "andre.riemann@web.de"))])
+ (centered-window . [(20250921 2101) ((emacs (24 4))) "Center the text when there's only one window" tar ((:url . "https://github.com/nullvec/centered-window-mode") (:commit . "701f56cd1d2b68352d29914f05ca1b0037bb2595") (:revdesc . "701f56cd1d2b") (:keywords "faces" "windows") (:authors ("A. Hdez" . "trefoil_chilled_7k@icloud.com")) (:maintainers ("A. Hdez" . "trefoil_chilled_7k@icloud.com")) (:maintainer "A. Hdez" . "trefoil_chilled_7k@icloud.com"))])
+ (centimacro . [(20201225 1132) nil "Assign multiple macros as global key bindings" tar ((:url . "https://github.com/abo-abo/centimacro") (:commit . "0149877584b333c4f1953f0767f0cae23881b0df") (:revdesc . "0149877584b3") (:keywords "macros") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (cerbere . [(20181113 1641) ((pkg-info (0 5))) "Unit testing in Emacs for several programming languages" tar ((:url . "https://github.com/nlamirault/cerbere") (:commit . "bb18d932b16541105d41a668dbf6fc4e833a6dc2") (:revdesc . "bb18d932b165") (:keywords "python" "go" "php" "phpunit" "elisp" "ert" "tests" "tdd") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (cern-ldap . [(20230626 1158) ((emacs (27 1))) "Library to interact with CERN's LDAP servers" tar ((:url . "https://git.sr.ht/~nbarrientos/cern-ldap.el") (:commit . "70b5275f0e7b8e15a3def48281f364a32c55afce") (:revdesc . "70b5275f0e7b") (:keywords "tools" "convenience") (:authors ("Nacho Barrientos" . "nacho.barrientos@cern.ch")) (:maintainers ("Nacho Barrientos" . "nacho.barrientos@cern.ch")) (:maintainer "Nacho Barrientos" . "nacho.barrientos@cern.ch"))])
+ (cern-root-mode . [(20240411 1355) ((emacs (26 1))) "Major-mode for running C++ code with ROOT" tar ((:url . "https://github.com/jaypmorgan/cern-root-mode") (:commit . "d769530ddfbe57cc3c319b430c8a37c72c8ce52c") (:revdesc . "d769530ddfbe") (:keywords "languages" "tools") (:authors ("Jay Morgan" . "jay@morganwastaken.com")) (:maintainers ("Jay Morgan" . "jay@morganwastaken.com")) (:maintainer "Jay Morgan" . "jay@morganwastaken.com"))])
+ (cfengine-code-style . [(20171111 1027) nil "C code style for CFEngine project" tar ((:url . "https://github.com/cfengine/core") (:commit . "92a25872a6d1de00c5bfc2b9455ccb0082bf6569") (:revdesc . "92a25872a6d1") (:authors ("Mikhail Gusarov" . "mikhail.gusarov@cfengine.com")) (:maintainers ("Mikhail Gusarov" . "mikhail.gusarov@cfengine.com")) (:maintainer "Mikhail Gusarov" . "mikhail.gusarov@cfengine.com"))])
+ (cff . [(20250209 2316) ((cl-lib (0 5)) (emacs (24))) "Search of the C/C++ file header by the source and vice versa" tar ((:url . "https://codeberg.org/fourier/cff") (:commit . "ebb2c9c24cae43283221219e95dac0ab43925a0f") (:revdesc . "ebb2c9c24cae") (:keywords "find-file") (:authors ("Alexey Veretennikov" . "alexey.veretennikov@gmail.com")) (:maintainers ("Alexey Veretennikov" . "alexey.veretennikov@gmail.com")) (:maintainer "Alexey Veretennikov" . "alexey.veretennikov@gmail.com"))])
+ (cfml-mode . [(20190617 1130) ((emacs (25))) "Emacs mode for editing CFML files" tar ((:url . "https://github.com/am2605/cfml-mode") (:commit . "b06d7cee2af0ed5d55a94f0db80fc1f429a1829a") (:revdesc . "b06d7cee2af0") (:authors ("Andrew Myers" . "am2605@gmail.com")) (:maintainers ("Andrew Myers" . "am2605@gmail.com")) (:maintainer "Andrew Myers" . "am2605@gmail.com"))])
+ (cfn-mode . [(20260823 806) ((emacs (27 0)) (f (0 20 0)) (s (1 12 0)) (yaml-mode (0 0 13))) "AWS cloudformation mode" tar ((:url . "https://gitlab.com/worr/cfn-mode") (:commit . "1652cda225eba6180e8b586ec59c3b152e2a4c9b") (:revdesc . "1652cda225eb") (:keywords "convenience" "languages" "tools") (:authors ("William Orr" . "will@worrbase.com")) (:maintainers ("William Orr" . "will@worrbase.com")) (:maintainer "William Orr" . "will@worrbase.com"))])
+ (cframe . [(20250126 1800) ((emacs (26)) (buffer-manage (1 1)) (dash (2 17 0))) "Customize a frame and fast switch size and positions" tar ((:url . "https://github.com/plandes/cframe") (:commit . "c968e4d9fd6079e60ae90531dac4647a66d7d2b7") (:revdesc . "c968e4d9fd60") (:keywords "frames"))])
+ (cfrs . [(20250729 1422) ((emacs (26 1)) (dash (2 11 0)) (s (1 10 0)) (posframe (0 6 0))) "Child-frame based read-string" tar ((:url . "https://github.com/Alexander-Miller/cfrs") (:commit . "981bddb3fb9fd9c58aed182e352975bd10ad74c8") (:revdesc . "981bddb3fb9f") (:authors ("Alexander Miller" . "alexanderm@web.de")) (:maintainers ("Alexander Miller" . "alexanderm@web.de")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (cg . [(20250430 1005) ((emacs (26 1))) "Major mode for editing Constraint Grammar files" tar ((:url . "https://edu.visl.dk/constraint_grammar.html") (:commit . "8ab7e26352c615326d74feeec71f531fc7a8855d") (:revdesc . "8ab7e26352c6") (:keywords "languages") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (challenger-deep-theme . [(20240913 937) ((emacs (24))) "Challenger-deep Theme" tar ((:url . "https://github.com/challenger-deep-theme/emacs") (:commit . "8f688eda0d9b138e41e21d2ca246c89c3547002f") (:revdesc . "8f688eda0d9b"))])
+ (champagne . [(20240515 310) ((emacs (28 1)) (posframe (1 4 2))) "Graphical countdowns" tar ((:url . "https://github.com/positron-solutions/champagne") (:commit . "42ef0451e4abe800f047583c4c3b04e51b29d5ee") (:revdesc . "42ef0451e4ab") (:keywords "games") (:authors ("Psionic K" . "contact@positron.solutions")) (:maintainers ("Psionic K" . "contact@positron.solutions")) (:maintainer "Psionic K" . "contact@positron.solutions"))])
+ (change-inner . [(20250320 1600) ((expand-region (0 7))) "Change contents based on semantic units" tar ((:url . "https://github.com/magnars/change-inner.el") (:commit . "675056ff78aa5dc32286e56dd0008d0683ddfc79") (:revdesc . "675056ff78aa") (:keywords "convenience" "extensions") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (chaos-mode . [(20221227 223) ((emacs (24 3))) "A major mode for the Chaos programming language" tar ((:url . "https://github.com/thechampagne/chaos-mode") (:commit . "801d869c461166eb2face2554b9b7883a26374c6") (:revdesc . "801d869c4611") (:keywords "files" "chaos"))])
+ (chapel-mode . [(20210513 457) ((emacs (25 1)) (hydra (0 15 0))) "A major mode for the Chapel programming language" tar ((:url . "https://github.com/damon-kwok/chapel-mode") (:commit . "39fd24bb7cf44808200354ac0496be4fc4fddd9a") (:revdesc . "39fd24bb7cf4") (:keywords "chapel" "chpl" "programming" "languages") (:authors ("Damon Kwok" . "damon-kwok@outlook.com")) (:maintainers ("Damon Kwok" . "damon-kwok@outlook.com")) (:maintainer "Damon Kwok" . "damon-kwok@outlook.com"))])
+ (char-menu . [(20260802 939) ((emacs (24 3)) (avy-menu (0 1))) "Create your own menu for fast insertion of arbitrary symbols" tar ((:url . "https://github.com/mrkkrp/char-menu") (:commit . "106dfd07ceb84f826ae339230c63897f3590cd3d") (:revdesc . "106dfd07ceb8") (:keywords "convenience" "editing") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (charmap . [(20200616 1418) nil "Unicode table for Emacs" tar ((:url . "https://github.com/lateau/charmap") (:commit . "feac50b87d2a596c5e5b7b82b79ddd65b6dedd8c") (:revdesc . "feac50b87d2a") (:keywords "unicode" "character" "ucs") (:authors ("Anan Mikami" . "lateau@gmail.com")) (:maintainers ("Anan Mikami" . "lateau@gmail.com")) (:maintainer "Anan Mikami" . "lateau@gmail.com"))])
+ (chatgpt-shell . [(20260725 1136) ((emacs (28 1)) (shell-maker (0 82 3)) (transient (0 9 3))) "A family of utilities to interact with LLMs (ChatGPT, Claude, DeepSeek, Gemini, Kagi, Ollama, Perplexity)" tar ((:url . "https://github.com/xenodium/chatgpt-shell") (:commit . "49827c8d0746a2f3e1bc68f5f3d73363b7db3db6") (:revdesc . "49827c8d0746"))])
+ (chatu . [(20251113 2350) ((org (9 6 6)) (emacs (29 1)) (plantuml-mode (1 2 9))) "Convert and insert any images to org-mode or markdown buffer" tar ((:url . "https://github.com/kimim/chatu") (:commit . "54fde21a03de78fc234ff3ce25a84fc4833adbca") (:revdesc . "54fde21a03de") (:keywords "multimedia" "convenience") (:authors ("Kimi Ma" . "kimi.im@outlook.com")) (:maintainers ("Kimi Ma" . "kimi.im@outlook.com")) (:maintainer "Kimi Ma" . "kimi.im@outlook.com"))])
+ (chatwork . [(20240910 1531) nil "ChatWork client for Emacs" tar ((:url . "https://github.com/ataka/chatwork") (:commit . "5abbf07bd6063c922191cc645f5771a943e3043c") (:revdesc . "5abbf07bd606") (:keywords "web") (:authors ("Masayuki Ataka" . "masayuki.ataka@gmail.com")) (:maintainers ("Masayuki Ataka" . "masayuki.ataka@gmail.com")) (:maintainer "Masayuki Ataka" . "masayuki.ataka@gmail.com"))])
+ (cheat-sh . [(20210607 1307) ((emacs (25 1))) "Interact with cheat.sh" tar ((:url . "https://github.com/davep/cheat-sh.el") (:commit . "33bae22feae8d3375739c6bdef08d0dcdf47ee42") (:revdesc . "33bae22feae8") (:keywords "docs" "help") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (cheatsheet . [(20170126 2150) ((emacs (24)) (cl-lib (0 5))) "Create your own cheatsheet" tar ((:url . "https://github.com/darksmile/cheatsheet/") (:commit . "e4f8e0110167ea16a17a74517d1f10cb7ff805b8") (:revdesc . "e4f8e0110167") (:keywords "convenience" "usability") (:authors ("Shirin Nikita and contributors" . "shirin.nikita@gmail.com")) (:maintainers ("Shirin Nikita and contributors" . "shirin.nikita@gmail.com")) (:maintainer "Shirin Nikita and contributors" . "shirin.nikita@gmail.com"))])
+ (checkbox . [(20141117 58) ((emacs (24)) (cl-lib (0 5))) "Quick manipulation of textual checkboxes" tar ((:url . "https://github.com/camdez/checkbox.el") (:commit . "2afc2011fa35ccfa0ce9ef46cb1896911fa340d1") (:revdesc . "2afc2011fa35") (:keywords "convenience") (:authors ("Cameron Desautels" . "camdez@gmail.com")) (:maintainers ("Cameron Desautels" . "camdez@gmail.com")) (:maintainer "Cameron Desautels" . "camdez@gmail.com"))])
+ (chee . [(20171123 2233) ((dash (2 12 1)) (s (1 10 0)) (f (0 18 2))) "Interface to chee using dired and image-dired" tar ((:url . "https://github.com/eikek/chee/tree/release/0.3.0/emacs") (:commit . "669ff9ee429f24c3c2d03b83d9cb9aec5f86bb8b") (:revdesc . "669ff9ee429f"))])
+ (cheerilee . [(20160313 1835) ((xelb (0 1))) "Toolkit library" tar ((:url . "https://github.com/Vannil/cheerilee.el") (:commit . "41bd81b5b0bb657241ceda5be6af5e07254d7376") (:revdesc . "41bd81b5b0bb") (:keywords "multimedia" "tools") (:authors ("Alessio Vanni" . "vannilla@firemail.cc")) (:maintainers ("Alessio Vanni" . "vannilla@firemail.cc")) (:maintainer "Alessio Vanni" . "vannilla@firemail.cc"))])
+ (chef-mode . [(20180628 1453) nil "Minor mode for editing an opscode chef repository" tar ((:url . "https://github.com/mpasternacki/chef-mode") (:commit . "048d691cb63981ae235763d4a6ced4af5c729924") (:revdesc . "048d691cb639") (:keywords "chef" "knife") (:authors ("Maciej Pasternacki" . "maciej@pasternacki.net")) (:maintainers ("Maciej Pasternacki" . "maciej@pasternacki.net")) (:maintainer "Maciej Pasternacki" . "maciej@pasternacki.net"))])
+ (chembalance . [(20210601 1653) ((emacs (24 4))) "Balance chemical equations" tar ((:url . "https://github.com/sergiruiztrepat/chembalance") (:commit . "ae36c823ca151f1dc6144ec96b2f5e98181c0dbb") (:revdesc . "ae36c823ca15") (:keywords "convenience" "chemistry"))])
+ (chemtable . [(20230314 1825) ((emacs (24 1))) "Periodic table of the elements" tar ((:url . "https://github.com/sergiruiztrepat/chemtable") (:commit . "ca0fea2f28162e90a93be242279ec6aee9046475") (:revdesc . "ca0fea2f2816") (:keywords "convenience" "chemistry"))])
+ (cherry-blossom-theme . [(20150622 342) ((emacs (24 0))) "A soothing color theme for Emacs24" tar ((:url . "https://github.com/inlinestyle/emacs-cherry-blossom-theme") (:commit . "e5ea23694c0f20ab670c0aa87214c27f2232d922") (:revdesc . "e5ea23694c0f") (:authors ("Ben Yelsey" . "byelsey1@gmail.com")) (:maintainers ("Ben Yelsey" . "byelsey1@gmail.com")) (:maintainer "Ben Yelsey" . "byelsey1@gmail.com"))])
+ (chezmoi . [(20230726 1638) ((emacs (26 1))) "A package for interacting with chezmoi" tar ((:url . "http://www.github.com/tuh8888/chezmoi.el") (:commit . "1389782f8c0780c7e66f8e77b10345ba1f4eabae") (:revdesc . "1389782f8c07") (:keywords "vc"))])
+ (chinese-conv . [(20170807 2128) ((cl-lib (0 5))) "Conversion between Chinese Characters with opencc or cconv" tar ((:url . "https://github.com/gucong/emacs-chinese-conv") (:commit . "b56815bbb163d642e97fa73093b5a7e87cc32574") (:revdesc . "b56815bbb163") (:authors ("gucong" . "gucong43216@gmail.com")) (:maintainers ("gucong" . "gucong43216@gmail.com")) (:maintainer "gucong" . "gucong43216@gmail.com"))])
+ (chinese-number . [(20161008 509) nil "Convert numbers between Arabic and Chinese formats" tar ((:url . "https://github.com/zhcosin/chinese-number") (:commit . "1d0c440181848dfcd1d1e618b2650fb0562a32ac") (:revdesc . "1d0c44018184") (:authors ("zhcosin" . "zhcosin@163.com")) (:maintainers ("zhcosin" . "zhcosin@163.com")) (:maintainer "zhcosin" . "zhcosin@163.com"))])
+ (chinese-wbim . [(20190727 854) nil "Enable Wubi Input Method in Emacs" tar ((:url . "https://github.com/andyque/chinese-wbim") (:commit . "5d496364b0b6bbaaf0f9b37e5a6d260d4994f260") (:revdesc . "5d496364b0b6") (:keywords "wubi" "input" "method.") (:authors ("Guanghui Qu" . "guanghui8827@gmail.com")) (:maintainers ("Guanghui Qu" . "guanghui8827@gmail.com")) (:maintainer "Guanghui Qu" . "guanghui8827@gmail.com"))])
+ (chinese-word-at-point . [(20170811 941) ((cl-lib (0 5))) "Add `chinese-word' thing to `thing-at-point'" tar ((:url . "https://github.com/xuchunyang/chinese-word-at-point.el") (:commit . "8223d7439e005555b86995a005b225ae042f0538") (:revdesc . "8223d7439e00") (:keywords "convenience" "chinese") (:authors ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang56@gmail.com"))])
+ (chinese-yasdcv . [(20171015 144) ((cl-lib (0 5)) (pyim (1 6 0))) "Yet another StarDict frontend" tar ((:url . "https://github.com/tumashu/chinese-yasdcv") (:commit . "5ab830daf1273d5a5cddcb94b56a9737f12d996f") (:revdesc . "5ab830daf127") (:keywords "convenience" "chinese" "dictionary") (:authors ("Feng Shu" . "tumashu@gmail.com")) (:maintainers ("Feng Shu" . "tumashu@gmail.com")) (:maintainer "Feng Shu" . "tumashu@gmail.com"))])
+ (chip8 . [(20250405 1408) ((emacs (28 1))) "A CHIP-8 emulator" tar ((:url . "https://github.com/gabrielelana/chip8.el") (:commit . "e2d0131dc45e65151f9655833807fbe838267dbd") (:revdesc . "e2d0131dc45e") (:keywords "chip-8" "game" "games" "emulator") (:authors ("Gabriele Lana" . "gabriele.lana@gmail.com")) (:maintainers ("Gabriele Lana" . "gabriele.lana@gmail.com")) (:maintainer "Gabriele Lana" . "gabriele.lana@gmail.com"))])
+ (chocolate-theme . [(20210128 1647) ((emacs (24 1)) (autothemer (0 2))) "A dark chocolaty theme" tar ((:url . "https://github.com/SavchenkoValeriy/emacs-chocolate-theme") (:commit . "ccc05f7ad96d3d1332727689bf6250443adc7ec0") (:revdesc . "ccc05f7ad96d") (:authors ("Valeriy Savchenko" . "sinmipt@gmail.com")) (:maintainers ("Valeriy Savchenko" . "sinmipt@gmail.com")) (:maintainer "Valeriy Savchenko" . "sinmipt@gmail.com"))])
+ (choice-program . [(20260127 2022) ((emacs (27 1)) (dash (2 19 1))) "Parameter based program" tar ((:url . "https://github.com/plandes/choice-program") (:commit . "9c027a54a97390ee4863d663be19b1a2aaa70c7b") (:revdesc . "9c027a54a973") (:keywords "execution" "processes" "unix" "lisp"))])
+ (chordpro-mode . [(20260711 623) ((emacs (29 1)) (compat (29 1 4 1))) "Major mode for ChordPro lead sheet file format" tar ((:url . "https://git.sr.ht/~breatheoutbreathein/chordpro-mode.el/") (:commit . "9d7b242b06453aaaa3fb3d1cca438ebcd478979b") (:revdesc . "9d7b242b0645") (:keywords "convenience") (:authors ("Howard Ding" . "hading2@gmail.com")) (:maintainers ("Howard Ding" . "hading2@gmail.com")) (:maintainer "Howard Ding" . "hading2@gmail.com"))])
+ (chroma . [(20240716 1131) ((emacs (24 1))) "Color manipulation library" tar ((:url . "https://github.com/galdor/chroma") (:commit . "89324b476498bdfc657079040cfbbe33d1da48a3") (:revdesc . "89324b476498") (:authors ("Nicolas Martyanoff" . "nicolas@n16f.net")) (:maintainers ("Nicolas Martyanoff" . "nicolas@n16f.net")) (:maintainer "Nicolas Martyanoff" . "nicolas@n16f.net"))])
+ (chronometer . [(20190304 1528) ((emacs (24))) "A [not so] simple chronometer" tar ((:url . "https://github.com/marcelotoledo/chronometer") (:commit . "8457b296ef87be339cbe47730b922757d60bdcd5") (:revdesc . "8457b296ef87") (:keywords "tools" "convenience") (:authors ("Marcelo Toledo" . "marcelo@marcelotoledo.com")) (:maintainers ("Marcelo Toledo" . "marcelo@marcelotoledo.com")) (:maintainer "Marcelo Toledo" . "marcelo@marcelotoledo.com"))])
+ (chronometrist . [(20240807 1850) ((emacs (27 1)) (dash (2 16 0)) (seq (2 20)) (ts (0 2))) "Friendly and powerful personal time tracker and analyzer" tar ((:url . "https://codeberg.org/contrapunctus/chronometrist") (:commit . "fdeeba0c0f23cd0ebfa76d5ec2bf4e5e93f87941") (:revdesc . "fdeeba0c0f23") (:keywords "calendar") (:authors ("contrapunctus" . "xmpp:contrapunctus@jabjab.de")) (:maintainers ("contrapunctus" . "xmpp:contrapunctus@jabjab.de")) (:maintainer "contrapunctus" . "xmpp:contrapunctus@jabjab.de"))])
+ (chronometrist-goal . [(20210510 1831) ((emacs (25 1)) (alert (1 2)) (chronometrist (0 7 0))) "Adds support for time goals to Chronometrist" tar ((:url . "https://tildegit.org/contrapunctus/chronometrist-goal") (:commit . "6cb939d160f5d5966d7853aa23f3ed7c7ef9df44") (:revdesc . "6cb939d160f5") (:keywords "calendar") (:authors ("contrapunctus" . "xmpp:contrapunctus@jabber.fr")) (:maintainers ("contrapunctus" . "xmpp:contrapunctus@jabber.fr")) (:maintainer "contrapunctus" . "xmpp:contrapunctus@jabber.fr"))])
+ (chronometrist-key-values . [(20220321 349) ((chronometrist (0 7 0))) "Add key-values to Chronometrist data" tar ((:url . "https://tildegit.org/contrapunctus/chronometrist") (:commit . "239f733dd8f784a5251ae253d350a99fb739da6e") (:revdesc . "239f733dd8f7") (:keywords "calendar") (:authors ("contrapunctus" . "xmpp:contrapunctus@jabjab.de")) (:maintainers ("contrapunctus" . "xmpp:contrapunctus@jabjab.de")) (:maintainer "contrapunctus" . "xmpp:contrapunctus@jabjab.de"))])
+ (chronometrist-spark . [(20230629 1039) ((emacs (25 1)) (chronometrist (0 7 0)) (spark (0 1))) "Show sparklines in Chronometrist buffers" tar ((:url . "https://tildegit.org/contrapunctus/chronometrist") (:commit . "d8290a82ea65730413627325a705067269cfa2f1") (:revdesc . "d8290a82ea65") (:keywords "calendar") (:authors ("contrapunctus" . "xmpp:contrapunctus@jabjab.de")) (:maintainers ("contrapunctus" . "xmpp:contrapunctus@jabjab.de")) (:maintainer "contrapunctus" . "xmpp:contrapunctus@jabjab.de"))])
+ (chronos . [(20240525 1339) ((emacs (27 1))) "Multiple simultaneous countdown / countup timers" tar ((:url . "https://github.com/DarkBuffalo/chronos") (:commit . "5ea0bf7c3881ea905e280446342539b242401979") (:revdesc . "5ea0bf7c3881") (:keywords "calendar") (:authors ("David Knight" . "dxknight@opmbx.org")) (:maintainers ("David Knight" . "dxknight@opmbx.org")) (:maintainer "David Knight" . "dxknight@opmbx.org"))])
+ (chruby . [(20180114 1652) ((cl-lib (0 5))) "Emacs integration for chruby" tar ((:url . "https://github.com/plexus/chruby.el") (:commit . "42bc6d521f832eca8e2ba210f30d03ad5529788f") (:revdesc . "42bc6d521f83") (:keywords "languages") (:authors ("Arne Brasseur" . "arne@arnebrasseur.net")) (:maintainers ("Arne Brasseur" . "arne@arnebrasseur.net")) (:maintainer "Arne Brasseur" . "arne@arnebrasseur.net"))])
+ (chyla-dark-theme . [(20240824 1615) ((emacs (24 1))) "Chyla.org - dark green color theme" tar ((:url . "https://github.com/chyla/ChylaDarkThemeForEmacs") (:commit . "274ff01146e265f773478b16a59483b638b986f8") (:revdesc . "274ff01146e2"))])
+ (chyla-theme . [(20240708 2017) ((emacs (24 1))) "Chyla.org - green color theme" tar ((:url . "https://github.com/chyla/ChylaThemeForEmacs") (:commit . "c2bb425eaff0975e0c7081f282d291f7853f8376") (:revdesc . "c2bb425eaff0"))])
+ (cider . [(20260824 709) ((emacs (28)) (clojure-mode (5 19)) (compat (30)) (parseedn (1 2 1)) (queue (0 2)) (spinner (1 7)) (seq (2 22)) (sesman (0 3 2)) (transient (0 4 1))) "Clojure Interactive Development Environment that Rocks" tar ((:url . "https://www.github.com/clojure-emacs/cider") (:commit . "2e2bafb99bf5ac691014b8b3993bddb85b117d99") (:revdesc . "2e2bafb99bf5") (:keywords "languages" "clojure" "cider") (:authors ("Tim King" . "kingtim@gmail.com") ("Phil Hagelberg" . "technomancy@gmail.com") ("Bozhidar Batsov" . "bozhidar@batsov.dev") ("Artur Malabarba" . "bruce.connor.am@gmail.com") ("Hugo Duncan" . "hugo@hugoduncan.org") ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (cider-decompile . [(20151122 537) ((cider (0 3 0)) (javap-mode (9))) "Decompilation extension for cider" tar ((:url . "http://www.github.com/clojure-emacs/cider-decompile") (:commit . "5d87035f3c3c14025e8f01c0c53d0ce2c8f56651") (:revdesc . "5d87035f3c3c") (:keywords "languages" "clojure" "cider"))])
+ (cider-eval-sexp-fu . [(20190311 2152) ((emacs (24)) (eval-sexp-fu (0 5 0))) "Briefly highlights an evaluated sexp" tar ((:url . "https://github.com/clojure-emacs/cider-eval-sexp-fu") (:commit . "7fd229f1441356866aedba611fd0cf4e89b50921") (:revdesc . "7fd229f14413") (:keywords "languages" "clojure" "cider") (:authors ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainers ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainer "Sylvain Benner" . "sylvain.benner@gmail.com"))])
+ (cider-hydra . [(20190816 1121) ((cider (0 22 0)) (hydra (0 13 0))) "Hydras for CIDER" tar ((:url . "https://github.com/clojure-emacs/cider-hydra") (:commit . "c3b8a15d72dddfbc390ab6a454bd7e4c765a2c95") (:revdesc . "c3b8a15d72dd") (:keywords "convenience" "tools") (:authors ("Tianxiang Xiong" . "tianxiang.xiong@gmail.com")) (:maintainers ("Tianxiang Xiong" . "tianxiang.xiong@gmail.com")) (:maintainer "Tianxiang Xiong" . "tianxiang.xiong@gmail.com"))])
+ (ciel . [(20180914 815) ((emacs (24))) "A command that is clone of \"ci\" in vim" tar ((:url . "https://github.com/cs14095/ciel.el") (:commit . "429773a3c551691a463ecfddd634b8bae2f48503") (:revdesc . "429773a3c551") (:keywords "convinience") (:authors ("Takuma Matsushita" . "cs14095@gmail.com")) (:maintainers ("Takuma Matsushita" . "cs14095@gmail.com")) (:maintainer "Takuma Matsushita" . "cs14095@gmail.com"))])
+ (cil-mode . [(20160622 1431) nil "Common Intermediate Language mode" tar ((:url . "https://github.com/ForNeVeR/cil-mode") (:commit . "a78a88ca9a66a82f069329a96e34b67478ae2d9b") (:revdesc . "a78a88ca9a66") (:keywords "languages") (:authors ("Friedrich von Never" . "friedrich@fornever.me")) (:maintainers ("Friedrich von Never" . "friedrich@fornever.me")) (:maintainer "Friedrich von Never" . "friedrich@fornever.me"))])
+ (cilk-mode . [(20220807 1629) ((emacs (25 1)) (flycheck (32 -4))) "Minor mode for Cilk code editing" tar ((:url . "https://github.com/ailiop/cilk-mode") (:commit . "d5ba732a5a313a97a96085943cd7840b8e2d9c7c") (:revdesc . "d5ba732a5a31") (:keywords "c" "convenience" "faces" "languages") (:authors ("Alexandros-Stavros Iliopoulos" . "https://github.com/ailiop")) (:maintainers ("Alexandros-Stavros Iliopoulos" . "1577182+ailiop@users.noreply.github.com")) (:maintainer "Alexandros-Stavros Iliopoulos" . "1577182+ailiop@users.noreply.github.com"))])
+ (cinspect . [(20150716 233) ((emacs (24)) (cl-lib (0 5)) (deferred (0 3 1)) (python-environment (0 0 2))) "Use cinspect to look at the CPython source of builtins and other C objects!" tar ((:url . "https://github.com/inlinestyle/cinspect-mode") (:commit . "4e199a90f89b335cccda1518aa0963e0a1d4fbab") (:revdesc . "4e199a90f89b") (:keywords "python") (:authors ("Ben Yelsey" . "ben.yelsey@gmail.com")) (:maintainers ("Ben Yelsey" . "ben.yelsey@gmail.com")) (:maintainer "Ben Yelsey" . "ben.yelsey@gmail.com"))])
+ (circadian . [(20260208 2050) ((emacs (27 2))) "Theme-switching based on daytime" tar ((:url . "https://github.com/GuidoSchmidt/circadian") (:commit . "181bb35ba9416bdede255c9fa6b86a2d60115f94") (:revdesc . "181bb35ba941") (:keywords "themes") (:maintainers ("Guido Schmidt" . "git@guidoschmidt.cc")) (:maintainer "Guido Schmidt" . "git@guidoschmidt.cc"))])
+ (circe . [(20260525 1114) ((emacs (25 1)) (cl-lib (0 5))) "Client for IRC in Emacs" tar ((:url . "https://github.com/emacs-circe/circe") (:commit . "4bd1e964066fe8985d8112ed9172db3a1ecf58c8") (:revdesc . "4bd1e964066f") (:keywords "irc" "chat" "comm") (:authors ("Jorgen Schaefer" . "forcer@forcix.cx")) (:maintainers ("Jorgen Schaefer" . "forcer@forcix.cx")) (:maintainer "Jorgen Schaefer" . "forcer@forcix.cx"))])
+ (circe-notifications . [(20180102 2318) ((emacs (24 4)) (circe (2 3)) (alert (1 2))) "Add desktop notifications to Circe" tar ((:url . "https://github.com/eqyiel/circe-notifications") (:commit . "291149ac12877bbd062da993479d3533a26862b0") (:revdesc . "291149ac1287") (:authors ("Ruben Maher" . "r@rkm.id.au")) (:maintainers ("Ruben Maher" . "r@rkm.id.au")) (:maintainer "Ruben Maher" . "r@rkm.id.au"))])
+ (circleci-api . [(20210227 1607) ((emacs (27)) (request (0 3 2))) "Bindings for the CircleCI API" tar ((:url . "https://github.com/sulami/circleci-api") (:commit . "1432b0ad0f32b03fec564c0815951d5e096c2f6a") (:revdesc . "1432b0ad0f32"))])
+ (circom-mode . [(20250604 1022) ((emacs (24 3))) "Major mode for editing Circom circuit" tar ((:url . "https://github.com/taquangtrung/emacs-circom-mode") (:commit . "80240776507ac2454546a8999bcfb6c39ab04a32") (:revdesc . "80240776507a") (:keywords "languages"))])
+ (citar . [(20260706 1221) ((emacs (27 1)) (parsebib (4 2)) (org (9 5)) (citeproc (0 9))) "Citation-related commands for org, latex, markdown" tar ((:url . "https://github.com/emacs-citar/citar") (:commit . "d2289669fea76ae7b2f7ad04794fcc230d65e055") (:revdesc . "d2289669fea7") (:authors ("Bruce D'Arcus" . "https://github.com/bdarcus")) (:maintainers ("Bruce D'Arcus" . "https://github.com/bdarcus")) (:maintainer "Bruce D'Arcus" . "https://github.com/bdarcus"))])
+ (citar-denote . [(20260302 507) ((emacs (29 1)) (citar (1 4)) (denote (4 1)) (dash (2 19 1))) "Minor mode integrating Citar and Denote" tar ((:url . "https://github.com/pprevos/citar-denote") (:commit . "7b2414c116ffff347a6be22a562fdc69a3ff9578") (:revdesc . "7b2414c116ff") (:authors ("Peter Prevos" . "peter@prevos.net")) (:maintainers ("Peter Prevos" . "peter@prevos.net")) (:maintainer "Peter Prevos" . "peter@prevos.net"))])
+ (citar-embark . [(20251027 1830) ((emacs (27 1)) (embark (0 17)) (citar (0 9 7))) "Citar/Embark integration" tar ((:url . "https://github.com/emacs-citar/citar") (:commit . "a71ec7c3f02e8d4051fb608d9c4918de5a8ba4e6") (:revdesc . "a71ec7c3f02e") (:keywords "bib" "extensions") (:authors ("Bruce D'Arcus" . "bdarcus@gmail.com")) (:maintainers ("Bruce D'Arcus" . "bdarcus@gmail.com")) (:maintainer "Bruce D'Arcus" . "bdarcus@gmail.com"))])
+ (citar-org-node . [(20250727 650) ((emacs (26 1)) (citar (1 1)) (org-node (3 0 0)) (ht (1 6))) "Citar integration with org-node" tar ((:url . "https://github.com/krisbalintona/citar-org-node") (:commit . "b6f8e9db9bbff7675299bc3babb62db7e73bdc60") (:revdesc . "b6f8e9db9bbf") (:keywords "tools") (:authors ("Kristoffer Balintona" . "krisbalintona@gmail.com")) (:maintainers ("Kristoffer Balintona" . "krisbalintona@gmail.com")) (:maintainer "Kristoffer Balintona" . "krisbalintona@gmail.com"))])
+ (citar-org-roam . [(20250424 1511) ((emacs (27 1)) (org-roam (2 2 0)) (citar (1 2 0))) "Citar/org-roam integration" tar ((:url . "https://github.com/emacs-citar/citar-org-roam") (:commit . "9750cfbbf330ab3d5b15066b65bd0a0fe7c296fb") (:revdesc . "9750cfbbf330") (:authors ("Bruce D'Arcus" . "bdarcus@gmail.com")) (:maintainers ("Bruce D'Arcus" . "bdarcus@gmail.com")) (:maintainer "Bruce D'Arcus" . "bdarcus@gmail.com"))])
+ (citar-typst . [(20260301 2247) ((emacs (29 1)) (citar (1 4))) "Typst support for citar" tar ((:url . "https://codeberg.org/ashton314/citar-typst") (:commit . "5ce419484e3bb27d8f3ba116ce9d1fd959fc549b") (:revdesc . "5ce419484e3b") (:authors ("Ashton Wiersdorf" . "https://lambdaland.org/")) (:maintainers ("Ashton Wiersdorf" . "https://lambdaland.org/")) (:maintainer "Ashton Wiersdorf" . "https://lambdaland.org/"))])
+ (citar-vulpea . [(20260414 1628) ((emacs (27 2)) (citar (1 4)) (vulpea (2 0))) "Minor mode integrating Citar and Vulpea" tar ((:url . "https://github.com/fabcontigiani/citar-vulpea") (:commit . "44ee8c1366687213afdeca20b1889cdcd822237a") (:revdesc . "44ee8c136668") (:keywords "bib" "notes" "vulpea") (:authors ("Fabrizio Contigiani" . "fabcontigiani@gmail.com")) (:maintainers ("Fabrizio Contigiani" . "fabcontigiani@gmail.com")) (:maintainer "Fabrizio Contigiani" . "fabcontigiani@gmail.com"))])
+ (citeproc . [(20260113 1047) ((emacs (26)) (dash (2 13 0)) (s (1 12 0)) (f (0 18 0)) (queue (0 2)) (string-inflection (1 0)) (org (9)) (parsebib (2 4)) (compat (28 1))) "A CSL 1.0.2 Citation Processor" tar ((:url . "https://github.com/andras-simonyi/citeproc-el") (:commit . "4bde999a41803fe519ea80eab8b813d53503eebd") (:revdesc . "4bde999a4180") (:keywords "bib") (:authors ("András Simonyi" . "andras.simonyi@gmail.com")) (:maintainers ("András Simonyi" . "andras.simonyi@gmail.com")) (:maintainer "András Simonyi" . "andras.simonyi@gmail.com"))])
+ (citeproc-org . [(20200915 2009) ((emacs (25 1)) (dash (2 12 0)) (org (9)) (f (0 18 0)) (citeproc (0 1)) (org-ref (1 1 1))) "Render org-mode references in CSL styles" tar ((:url . "https://github.com/andras-simonyi/citeproc-org") (:commit . "22a759c4f0ec80075014dcc594baa4d1b470d995") (:revdesc . "22a759c4f0ec") (:keywords "org-ref" "org-mode" "cite" "bib") (:authors ("András Simonyi" . "andras.simonyi@gmail.com")) (:maintainers ("András Simonyi" . "andras.simonyi@gmail.com")) (:maintainer "András Simonyi" . "andras.simonyi@gmail.com"))])
+ (citre . [(20260530 602) ((emacs (26 1))) "Superior code reading & auto-completion tool with pluggable backends" tar ((:url . "https://github.com/universal-ctags/citre") (:commit . "be0d9c6dc9b1ac67d76fc7ed315f2369d5c3bde8") (:revdesc . "be0d9c6dc9b1") (:keywords "convenience" "tools") (:authors ("Hao Wang" . "amaikinono@gmail.com")) (:maintainers ("Hao Wang" . "amaikinono@gmail.com")) (:maintainer "Hao Wang" . "amaikinono@gmail.com"))])
+ (cl-format . [(20230818 1726) nil "CL format routine" tar ((:url . "https://gitlab.com/akater/elisp-cl-format") (:commit . "42b662d27eefa458c1a39bea1836d6ada740b863") (:revdesc . "42b662d27eef") (:keywords "extensions") (:authors ("Andreas Politz" . "politza@fh-trier.de")) (:maintainers ("akater" . "nuclearspace@gmail.com")) (:maintainer "akater" . "nuclearspace@gmail.com"))])
+ (cl-libify . [(20181130 230) ((emacs (25))) "Update elisp code to use cl-lib instead of cl" tar ((:url . "https://github.com/purcell/cl-libify") (:commit . "e205b96f944a4f312fd523804cbbaf00027a3c8b") (:revdesc . "e205b96f944a") (:keywords "lisp") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (clang-capf . [(20221030 1830) ((emacs (24 4))) "Completion-at-point backend for c/c++ using clang" tar ((:url . "https://git.sr.ht/~pkal/clang-capf") (:commit . "5e4dfba90ce86bbc7ee61805edfca04fff93c291") (:revdesc . "5e4dfba90ce8") (:keywords "c" "abbrev" "convenience") (:authors ("Philip K." . "philipk[at]posteo[dot]net")) (:maintainers ("Philip K." . "philipk[at]posteo[dot]net")) (:maintainer "Philip K." . "philipk[at]posteo[dot]net"))])
+ (clang-format . [(20250223 1620) ((cl-lib (0 3))) "Format code using clang-format" tar ((:url . "https://github.com/emacsmirror/clang-format") (:commit . "a099177b5cd5060597d454e4c1ffdc96b92ba985") (:revdesc . "a099177b5cd5") (:keywords "tools" "c"))])
+ (clang-format+ . [(20190824 2216) ((emacs (25 1)) (clang-format (20180406 1514))) "Minor mode for automatic clang-format application" tar ((:url . "https://github.com/SavchenkoValeriy/emacs-clang-format-plus") (:commit . "ddd4bfe1a13c2fd494ce339a320a51124c1d2f68") (:revdesc . "ddd4bfe1a13c") (:keywords "c" "c++" "clang-format") (:authors ("Valeriy Savchenko" . "sinmipt@gmail.com")) (:maintainers ("Valeriy Savchenko" . "sinmipt@gmail.com")) (:maintainer "Valeriy Savchenko" . "sinmipt@gmail.com"))])
+ (clang-format-lite . [(20250509 246) nil "Format code on-save with clang-format, supports remote files" tar ((:url . "https://github.com/arteen1000/clang-format-lite") (:commit . "46681aada7f93170a7e073332a43f8b19ee7b4c5") (:revdesc . "46681aada7f9") (:keywords "tools" "c" "c++" "clang-format" "formatting") (:authors ("Arteen Abrishami" . "arteen@ucla.edu")) (:maintainers ("Arteen Abrishami" . "arteen@ucla.edu")) (:maintainer "Arteen Abrishami" . "arteen@ucla.edu"))])
+ (clatter . [(20260826 1357) ((emacs (30 1))) "An IRCv3-compliant IRC client" tar ((:url . "https://github.com/parenworks/clatter.el") (:commit . "832a21c37a77f72373e37316601fa8532d63a232") (:revdesc . "832a21c37a77") (:keywords "comm" "irc") (:authors ("Glenn Thompson" . "glenn@paren.works")) (:maintainers ("Glenn Thompson" . "glenn@paren.works")) (:maintainer "Glenn Thompson" . "glenn@paren.works"))])
+ (claude-code . [(20260812 1216) ((emacs (28 1)) (projectile (2 5 0)) (vterm (0 0 2)) (transient (0 4 0)) (markdown-mode (2 5))) "Run Claude Code sessions" tar ((:url . "https://github.com/yuya373/claude-code-emacs") (:commit . "ebc13e87c4c04e5df2c486c118570e1076fbc945") (:revdesc . "ebc13e87c4c0") (:keywords "tools" "convenience"))])
+ (claude-code-context . [(20260503 2210) ((emacs (27 1))) "Share buffer context with Claude Code" tar ((:url . "https://github.com/lukehoersten/claude-code-context") (:commit . "1e9062b0bc5e0d4f3f9f98a349b6ed9c775360ca") (:revdesc . "1e9062b0bc5e") (:keywords "tools" "ai" "convenience") (:authors ("Luke Hoersten" . "Luke@Hoersten.org")) (:maintainers ("Luke Hoersten" . "Luke@Hoersten.org")) (:maintainer "Luke Hoersten" . "Luke@Hoersten.org"))])
+ (claude-shell . [(20241130 2024) ((emacs (29 1)) (shell-maker (0 72 1))) "Integration with Anthropic's Claude LLM" tar ((:url . "https://github.com/arminfriedl/claude-shell") (:commit . "8e9e7e22b6fab50e19b293d1ebcf435ad937a41f") (:revdesc . "8e9e7e22b6fa") (:keywords "anthropic" "claude" "claude-shell" "shell-maker" "terminals" "wp" "help" "tools") (:authors ("Armin Friedl" . "dev@friedl.net")) (:maintainers ("Armin Friedl" . "dev@friedl.net")) (:maintainer "Armin Friedl" . "dev@friedl.net"))])
+ (claudia . [(20250824 1704) ((emacs (29 1)) (uuidgen (0 3)) (markdown-mode (2 3))) "Claude AI integration" tar ((:url . "https://github.com/mzacho/claudia") (:commit . "f5a3398d588a83372169a277d3dd3ed467ff799b") (:revdesc . "f5a3398d588a") (:keywords "ai" "tools" "productivity" "codegen") (:authors ("Martin Zacho" . "hi@martinzacho.net")) (:maintainers ("Martin Zacho" . "hi@martinzacho.net")) (:maintainer "Martin Zacho" . "hi@martinzacho.net"))])
+ (clause . [(20260805 1228) ((emacs (27 1)) (mark-thing-at (0 3))) "Functions to move, mark, kill by clause" tar ((:url . "https://codeberg.org/martianh/clause.el") (:commit . "7d8e89125f5a0d27f1490eb39bb4443133eaae6c") (:revdesc . "7d8e89125f5a") (:keywords "wp" "convenience" "sentences" "text") (:authors ("Marty Hiatt" . "martianh@disroot.org")) (:maintainers ("Marty Hiatt" . "martianh@disroot.org")) (:maintainer "Marty Hiatt" . "martianh@disroot.org"))])
+ (clay . [(20240409 1321) ((emacs (26 1)) (cider (1 0))) "Emacs commands Clay - literate in Clojure" tar ((:url . "https://github.com/scicloj/clay.el") (:commit . "5d5512e67e7dd4b7b7ffae070517948cb1ad82e4") (:revdesc . "5d5512e67e7d") (:keywords "lisp"))])
+ (clean-aindent-mode . [(20171017 2043) nil "Simple indent and unindent, trims indent white-space" tar ((:url . "https://github.com/pmarinov/clean-aindent-mode") (:commit . "a97bcae8f43a9ff64e95473e4ef0d8bafe829211") (:revdesc . "a97bcae8f43a") (:keywords "indentation" "whitespace" "backspace") (:authors ("peter marinov" . "efravia@gmail.com")) (:maintainers ("peter marinov" . "efravia@gmail.com")) (:maintainer "peter marinov" . "efravia@gmail.com"))])
+ (clean-buffers . [(20160529 2259) ((cl-lib (0 5))) "Clean useless buffers" tar ((:url . "https://github.com/lujun9972/clean-buffers") (:commit . "1be6c54e3095761b6b64bf749faae3dfce94e72a") (:revdesc . "1be6c54e3095") (:keywords "convenience" "usability" "buffers") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (clean-kill-ring . [(20260724 1848) ((emacs (24 4))) "Keep the kill ring clean" tar ((:url . "https://github.com/NicholasBHubbard/clean-kill-ring.el") (:commit . "dc5d622a23dfcf6c00634fd74ae37fd3bdc36f2e") (:revdesc . "dc5d622a23df") (:keywords "kill-ring" "convenience") (:authors ("Nicholas Hubbard" . "nicholashubbard@posteo.net")) (:maintainers ("Nicholas Hubbard" . "nicholashubbard@posteo.net")) (:maintainer "Nicholas Hubbard" . "nicholashubbard@posteo.net"))])
+ (clear-text . [(20160406 2043) nil "Make you use clear text" tar ((:url . "https://github.com/xuchunyang/clear-text.el") (:commit . "b50669b6077d6948f72cb3c649281d206e0c2f2b") (:revdesc . "b50669b6077d") (:keywords "convenience") (:authors ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang56@gmail.com"))])
+ (clevercss . [(20131229 155) nil "A major mode for editing CleverCSS files" tar ((:url . "https://github.com/jschaf/CleverCSS-Mode") (:commit . "b8a3c0dd674367c62b1a1ffec84d88fe0c0219bc") (:revdesc . "b8a3c0dd6743") (:keywords "languages" "css") (:authors ("Joe Schafer" . "(joesmoe10@gmail.com)")) (:maintainers ("Joe Schafer" . "(joesmoe10@gmail.com)")) (:maintainer "Joe Schafer" . "(joesmoe10@gmail.com)"))])
+ (clhs . [(20210428 1911) nil "Access the Common Lisp HyperSpec (CLHS)" tar ((:url . "https://gitlab.com/sam-s/clhs") (:commit . "7b106c4fb5a6388ab753f94740f6dfadcdeedcbb") (:revdesc . "7b106c4fb5a6") (:keywords "lisp" "common lisp" "emacs" "ansi cl" "hyperspec") (:maintainers ("Sam Steingold" . "sds@gnu.org")) (:maintainer "Sam Steingold" . "sds@gnu.org"))])
+ (click-mode . [(20180611 44) ((emacs (24))) "Major mode for the Click Modular Router Project" tar ((:url . "https://github.com/bmalehorn/click-mode") (:commit . "b94ea8cce89cf0e753b2ab915202d49ffc470fb6") (:revdesc . "b94ea8cce89c") (:keywords "click" "router") (:authors ("Brian Malehorn" . "bmalehorn@gmail.com")) (:maintainers ("Brian Malehorn" . "bmalehorn@gmail.com")) (:maintainer "Brian Malehorn" . "bmalehorn@gmail.com"))])
+ (clingo-mode . [(20240724 1135) ((emacs (24 3))) "A major mode for editing Answer Set Programs" tar ((:url . "https://github.com/llaisdy/clingo-mode") (:commit . "feff7d3308a824e918740461e9df636ab67a8874") (:revdesc . "feff7d3308a8") (:keywords "asp" "clingo" "answer set programs" "potassco" "major mode" "languages") (:authors ("Ivan Uemlianin" . "ivan@llaisdy.com") ("Henrik Jürges" . "juerges.henrik@gmail.com")) (:maintainers ("Ivan Uemlianin" . "ivan@llaisdy.com")) (:maintainer "Ivan Uemlianin" . "ivan@llaisdy.com"))])
+ (clipetty . [(20200327 2241) ((emacs (25 1))) "Send every kill from a TTY frame to the system clipboard" tar ((:url . "https://github.com/spudlyo/clipetty") (:commit . "7ee3f9c52f70f80820a8c66fb6f796d6e01dd92d") (:revdesc . "7ee3f9c52f70") (:keywords "terminals" "convenience") (:authors ("Mike Hamrick" . "mikeh@muppetlabs.com")) (:maintainers ("Mike Hamrick" . "mikeh@muppetlabs.com")) (:maintainer "Mike Hamrick" . "mikeh@muppetlabs.com"))])
+ (cliphist . [(20220525 1034) ((emacs (25 1))) "Paste from clipboard managers" tar ((:url . "https://github.com/redguardtoo/cliphist") (:commit . "d02b97a2aa0da13711d9a6f845649115de8ac11b") (:revdesc . "d02b97a2aa0d") (:keywords "clipboard" "manager" "history") (:authors ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainers ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainer "Chen Bin" . "chenbinDOTshATgmailDOTcom"))])
+ (clipmon . [(20180129 1054) nil "Clipboard monitor - watch system clipboard, add changes to kill ring/autoinsert" tar ((:url . "https://github.com/bburns/clipmon") (:commit . "95dc56c7ed84a654ec90f4740eb6df1050de8cf1") (:revdesc . "95dc56c7ed84") (:keywords "convenience") (:authors ("Brian Burns" . "bburns.km@gmail.com")) (:maintainers ("Brian Burns" . "bburns.km@gmail.com")) (:maintainer "Brian Burns" . "bburns.km@gmail.com"))])
+ (clippy . [(20250511 2020) ((pos-tip (1 0))) "Show tooltip with function documentation at point" tar ((:url . "https://github.com/Fuco1/clippy.el") (:commit . "006e0bbe3f695c0e0ebdc0de5095255608eb9e6c") (:revdesc . "006e0bbe3f69") (:keywords "docs") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (clips-mode . [(20170909 823) nil "Major mode for editing CLIPS code and REPL" tar ((:url . "https://github.com/clips-mode/clips-mode") (:commit . "dd38e2822640a38f7d8bfec4f69d8dd24be27074") (:revdesc . "dd38e2822640") (:keywords "clips") (:authors ("David E. Young" . "david.young@fnc.fujitsu.com") ("Andrey Kotlarski" . "m00naticus@gmail.com") ("Grant Rettke" . "grettke@acm.org")) (:maintainers ("Grant Rettke" . "grettke@acm.org")) (:maintainer "Grant Rettke" . "grettke@acm.org"))])
+ (clj-decompiler . [(20220103 1746) ((emacs (26 1)) (clojure-mode (5 12)) (cider (1 2 0))) "Clojure Java decompiler expansion" tar ((:url . "https://www.github.com/bsless/clj-decompiler.el") (:commit . "8c0c53f87e6e33f2be7e7aff6095eb586b50be1a") (:revdesc . "8c0c53f87e6e") (:keywords "languages" "clojure" "cider" "java" "decompiler") (:authors ("Ben Sless" . "ben.sless@gmail.com")) (:maintainers ("Ben Sless" . "ben.sless@gmail.com")) (:maintainer "Ben Sless" . "ben.sless@gmail.com"))])
+ (clj-deps-new . [(20230413 1833) ((emacs (25 1)) (transient (0 3 7))) "Create clojure projects from templates" tar ((:url . "https://github.com/jpe90/emacs-deps-new") (:commit . "72f25d86bbd9cd6cb4aa431e70bda38f35b19262") (:revdesc . "72f25d86bbd9") (:authors ("jpe90" . "eskinjp@gmail.com")) (:maintainers ("jpe90" . "eskinjp@gmail.com")) (:maintainer "jpe90" . "eskinjp@gmail.com"))])
+ (clj-doc-browse . [(20260329 1912) ((emacs (27 1)) (cider (1 0)) (markdown-mode (2 5))) "Browse Clojure library docs from classpath JARs" tar ((:url . "https://github.com/dcj/clj-doc-browse-el") (:commit . "1409c55f8173720d8035e38f19ee0bd16f1c5ecf") (:revdesc . "1409c55f8173") (:keywords "clojure" "documentation" "tools") (:authors ("Don Jackson" . "dcj@clark-communications.com")) (:maintainers ("Don Jackson" . "dcj@clark-communications.com")) (:maintainer "Don Jackson" . "dcj@clark-communications.com"))])
+ (clj-refactor . [(20260716 1545) ((emacs (28 1)) (yasnippet (0 6 1)) (paredit (24)) (clojure-mode (5 18 0)) (cider (2 0 0)) (parseedn (1 2 0)) (transient (0 4 1)) (spinner (1 7))) "A collection of commands for refactoring Clojure code" tar ((:url . "https://github.com/clojure-emacs/clj-refactor.el") (:commit . "2805bd5f505fdb199a8c5a25fca398ec9c161e5b") (:revdesc . "2805bd5f505f") (:keywords "convenience" "clojure" "cider") (:authors ("Magnar Sveen" . "magnars@gmail.com") ("Lars Andersen" . "expez@expez.com") ("Benedek Fazekas" . "benedek.fazekas@gmail.com") ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com") ("Lars Andersen" . "expez@expez.com") ("Benedek Fazekas" . "benedek.fazekas@gmail.com") ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (cljr-helm . [(20220721 824) ((clj-refactor (0 13 0)) (helm-core (3 6 0)) (cl-lib (0 5))) "Wraps clojure refactor commands with helm" tar ((:url . "https://github.com/philjackson/cljr-helm") (:commit . "2c1f9cbd892ec03335f671ea3f974ee2ff6078dc") (:revdesc . "2c1f9cbd892e") (:keywords "helm" "clojure" "refactor") (:authors ("Phil Jackson" . "phil@shellarchive.co.uk")) (:maintainers ("Phil Jackson" . "phil@shellarchive.co.uk")) (:maintainer "Phil Jackson" . "phil@shellarchive.co.uk"))])
+ (cljr-ivy . [(20200602 1607) ((clj-refactor (2 5 0)) (ivy (0 13 0)) (emacs (24 3)) (cl-lib (0 6 1))) "Access clojure refactor with ivy completion" tar ((:url . "https://github.com/wandersoncferreira/cljr-ivy") (:commit . "18e6e3526e872010a643c91aa71ff1d429431b83") (:revdesc . "18e6e3526e87") (:keywords "convenience" "matching") (:authors ("Wanderson Ferreira" . "iagwanderson@gmail.com")) (:maintainers ("Wanderson Ferreira" . "iagwanderson@gmail.com")) (:maintainer "Wanderson Ferreira" . "iagwanderson@gmail.com"))])
+ (cljsbuild-mode . [(20160402 1700) nil "A minor mode for the ClojureScript 'lein cljsbuild' command" tar ((:url . "https://github.com/kototama/cljsbuild-mode") (:commit . "fa2315660cb3ce944b5e16c679dcf5afd6a97f4c") (:revdesc . "fa2315660cb3") (:keywords "clojure" "clojurescript" "leiningen" "compilation") (:authors ("Kototama" . "kototamogmailcom")) (:maintainers ("Kototama" . "kototamogmailcom")) (:maintainer "Kototama" . "kototamogmailcom"))])
+ (clmemo . [(20220204 1345) nil "Change Log MEMO" tar ((:url . "https://github.com/ataka/clmemo") (:commit . "f695c38c551f72f6ac5e1a82badc540c80d3b33b") (:revdesc . "f695c38c551f") (:keywords "convenience") (:authors ("Masayuki Ataka" . "masayuki.ataka@gmail.com")) (:maintainers ("Masayuki Ataka" . "masayuki.ataka@gmail.com")) (:maintainer "Masayuki Ataka" . "masayuki.ataka@gmail.com"))])
+ (cloak-mode . [(20260309 1455) ((emacs (27 1))) "A minor mode to cloak sensitive values" tar ((:url . "https://github.com/erickgnavar/cloak-mode") (:commit . "ba182aafebe901aeb33f879058381866d0076186") (:revdesc . "ba182aafebe9") (:authors ("Erick Navarro" . "erick@navarro.io")) (:maintainers ("Erick Navarro" . "erick@navarro.io")) (:maintainer "Erick Navarro" . "erick@navarro.io"))])
+ (cloc . [(20170728 1824) ((cl-lib (0 5))) "Count lines of code over emacs buffers" tar ((:url . "https://github.com/cosmicexplorer/cloc-emacs") (:commit . "f30f0472e465cc8d433d2473e9d3b8dfe2c94491") (:revdesc . "f30f0472e465") (:keywords "cloc" "count" "source" "code" "lines") (:authors ("Danny McClanahan" . "danieldmcclanahan@gmail.com")) (:maintainers ("Danny McClanahan" . "danieldmcclanahan@gmail.com")) (:maintainer "Danny McClanahan" . "danieldmcclanahan@gmail.com"))])
+ (clocker . [(20190214 1833) ((projectile (0 11 0)) (dash (2 10)) (spaceline (2 0 1))) "Note taker and clock-in enforcer" tar ((:url . "https://github.com/roman/clocker.el") (:commit . "c4d76968a49287ce3bac0832bb5d5d076054c96f") (:revdesc . "c4d76968a492") (:keywords "org") (:authors ("Roman Gonzalez" . "romanandreg@gmail.com")) (:maintainers ("Roman Gonzalez" . "romanandreg@gmail.com")) (:maintainer "Roman Gonzalez" . "romanandreg@gmail.com"))])
+ (clockodo . [(20220604 2049) ((emacs (26 1)) (request (0 3 2)) (ts (0 2 2)) (org (8))) "A small integration for the clockodo api" tar ((:url . "https://github.com/santifa/clockodo-el") (:commit . "6329aaebc4373edaa4cd1d046582a4cc36db4888") (:revdesc . "6329aaebc437") (:keywords "tools" "clockodo") (:authors ("Henrik Jürges" . "juerges.henrik@gmail.com")) (:maintainers ("Henrik Jürges" . "juerges.henrik@gmail.com")) (:maintainer "Henrik Jürges" . "juerges.henrik@gmail.com"))])
+ (clojars . [(20180825 1951) ((request-deferred (0 2 0))) "Clojars.org search interface" tar ((:url . "https://github.com/joshuamiller/clojars.el") (:commit . "c78e4d5ddacda064c253e2b38d1c35188aa1ad71") (:revdesc . "c78e4d5ddacd") (:keywords "docs" "help" "tools") (:authors ("Joshua Miller" . "josh@joshmiller.io")) (:maintainers ("Joshua Miller" . "josh@joshmiller.io")) (:maintainer "Joshua Miller" . "josh@joshmiller.io"))])
+ (clojure-essential-ref . [(20221215 1427) ((emacs (24)) (cider (0 24 0))) "Cider-doc to \"Clojure, The Essential Reference\"" tar ((:url . "https://github.com/p3r7/clojure-essential-ref") (:commit . "6741bf65cf9b9bc896ab1cc3c384573e8ffe5f96") (:revdesc . "6741bf65cf9b"))])
+ (clojure-essential-ref-nov . [(20221215 1427) ((emacs (24)) (dash (2 16 0)) (nov (0 3 1)) (clojure-essential-ref (0 1 0))) "Cider-doc to \"Clojure, The Essential Reference\" (EPUB)" tar ((:url . "https://github.com/p3r7/clojure-essential-ref") (:commit . "6741bf65cf9b9bc896ab1cc3c384573e8ffe5f96") (:revdesc . "6741bf65cf9b"))])
+ (clojure-mode . [(20260709 952) ((emacs (27 1))) "Major mode for Clojure code" tar ((:url . "https://github.com/clojure-emacs/clojure-mode") (:commit . "38c72d3284367459a8b116deb660c3163f6653ea") (:revdesc . "38c72d328436") (:keywords "languages" "clojure" "clojurescript" "lisp") (:authors ("Jeffrey Chu" . "jochu0@gmail.com") ("Lennart Staflin" . "lenst@lysator.liu.se") ("Phil Hagelberg" . "technomancy@gmail.com") ("Bozhidar Batsov" . "bozhidar@batsov.dev") ("Artur Malabarba" . "bruce.connor.am@gmail.com") ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (clojure-mode-extra-font-locking . [(20260325 811) ((clojure-mode (5 23 0))) "Extra font-locking for Clojure mode" tar ((:url . "https://github.com/clojure-emacs/clojure-mode") (:commit . "9146525680b29a0c6b72a1126d075b54f8066710") (:revdesc . "9146525680b2") (:keywords "languages" "lisp") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (clojure-quick-repls . [(20150814 736) ((cider (0 8 1)) (dash (2 9 0))) "Quickly create Clojure and ClojureScript repls for a project" tar ((:url . "https://github.com/symfrog/clojure-quick-repls") (:commit . "8fe4e44939e8a01a4cdf60c0001d9a6abf8a73c3") (:revdesc . "8fe4e44939e8") (:keywords "languages" "clojure" "cider" "clojurescript"))])
+ (clojure-snippets . [(20241226 1639) ((yasnippet (0 10 0)) (cl-lib (0 5))) "Yasnippets for clojure" tar ((:url . "https://github.com/mpenet/clojure-snippets") (:commit . "1e96ed7215e9da7c003a370eb1f91ed5475e6b0d") (:revdesc . "1e96ed7215e9") (:keywords "snippets") (:authors ("Max Penet" . "m@qbits.cc")) (:maintainers ("Max Penet" . "m@qbits.cc")) (:maintainer "Max Penet" . "m@qbits.cc"))])
+ (clojure-ts-mode . [(20260823 431) ((emacs (30 1))) "Major mode for Clojure code" tar ((:url . "https://github.com/clojure-emacs/clojure-ts-mode") (:commit . "2bce67a68c270157d940ac9374ab393804c7e00d") (:revdesc . "2bce67a68c27") (:keywords "languages" "clojure" "clojurescript" "lisp") (:authors ("Danny Freeman" . "danny@dfreeman.email") ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (clomacs . [(20220415 1035) ((emacs (24 3)) (cider (0 22 1)) (s (1 12 0)) (simple-httpd (1 4 6)) (dash (2 19 1))) "Simplifies Emacs Lisp interaction with Clojure" tar ((:url . "https://github.com/clojure-emacs/clomacs") (:commit . "9cd7c9fd86bc7bc627a31275d1ef131378b90a49") (:revdesc . "9cd7c9fd86bc") (:keywords "clojure" "interaction") (:authors ("Kostafey" . "kostafey@gmail.com")) (:maintainers ("Kostafey" . "kostafey@gmail.com")) (:maintainer "Kostafey" . "kostafey@gmail.com"))])
+ (closql . [(20260601 1540) ((emacs (28 1)) (compat (31 0)) (cond-let (1 1)) (emacsql (4 4)) (llama (1 0))) "Store EIEIO objects using EmacSQL" tar ((:url . "https://github.com/emacscollective/closql") (:commit . "d382e7427f5d375ffc872851b049e9f9c4a43dfc") (:revdesc . "d382e7427f5d") (:keywords "extensions") (:authors ("Jonas Bernoulli" . "emacs.closql@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.closql@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.closql@jonas.bernoulli.dev"))])
+ (closure-lint-mode . [(20101118 2124) nil "Minor mode for the Closure Linter" tar ((:url . "https://github.com/r0man/closure-lint-mode") (:commit . "bc3d2fd5c35580bf1b8af43b12484c95a343b4b5") (:revdesc . "bc3d2fd5c355") (:keywords "tools" "closure" "javascript" "lint" "flymake") (:authors ("Roman Scherer" . "roman@burningswell.com")) (:maintainers ("Roman Scherer" . "roman@burningswell.com")) (:maintainer "Roman Scherer" . "roman@burningswell.com"))])
+ (cloud-theme . [(20220205 1336) ((emacs (24))) "A light colored theme" tar ((:url . "https://github.com/vallyscode/cloud-theme") (:commit . "16ef7fbf0a423b29e3c3a0a2d9525afaf265aaed") (:revdesc . "16ef7fbf0a42") (:keywords "color" "theme") (:authors ("Valerii Lysenko" . "vallyscode@gmail.com")) (:maintainers ("Valerii Lysenko" . "vallyscode@gmail.com")) (:maintainer "Valerii Lysenko" . "vallyscode@gmail.com"))])
+ (cloud-to-butt-erc . [(20130627 2308) nil "Replace 'the cloud' with 'my butt'" tar ((:url . "http://www.github.com/leathekd/cloud-to-butt-erc") (:commit . "6710c03d1bc91736435cbfe845924940cae34e5c") (:revdesc . "6710c03d1bc9") (:authors ("David Leatherman" . "leathekd@gmail.com")) (:maintainers ("David Leatherman" . "leathekd@gmail.com")) (:maintainer "David Leatherman" . "leathekd@gmail.com"))])
+ (clues-theme . [(20161213 1127) ((emacs (24 0))) "An Emacs 24 theme which may well be fully awesome.." tar ((:url . "https://github.com/emacsfodder/emacs-clues-theme") (:commit . "abd61f2b7f3e98de58ca26e6d1230e70c6406cc7") (:revdesc . "abd61f2b7f3e") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (clutch . [(20260819 309) ((emacs (29 1)) (transient (0 3 7))) "Interactive database client" tar ((:url . "https://github.com/LuciusChen/clutch") (:commit . "833fcb0709959281a713da0d262a2e7d70640cff") (:revdesc . "833fcb070995") (:keywords "comm" "data" "tools") (:authors ("Lucius Chen" . "chenyh572@gmail.com")) (:maintainers ("Lucius Chen" . "chenyh572@gmail.com")) (:maintainer "Lucius Chen" . "chenyh572@gmail.com"))])
+ (cm-mode . [(20260518 1920) ((emacs (25 1)) (cl-lib (0 5))) "Minor mode for CriticMarkup" tar ((:url . "https://github.com/joostkremers/criticmarkup-emacs") (:commit . "a5816175548a821bf62d374b40d6974e4956c44b") (:revdesc . "a5816175548a") (:keywords "text" "markdown") (:authors ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainers ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainer "Joost Kremers" . "joostkremers@fastmail.fm"))])
+ (cmake-font-lock . [(20230304 2223) ((cmake-mode (0 0))) "Advanced, type aware, highlight support for CMake" tar ((:url . "https://github.com/Lindydancer/cmake-font-lock") (:commit . "a6038e916bcca807ae695f7d7e5c300c3f38f415") (:revdesc . "a6038e916bcc") (:keywords "faces" "languages"))])
+ (cmake-ide . [(20210610 1525) ((emacs (24 4)) (cl-lib (0 5)) (seq (1 11)) (levenshtein (0)) (s (1 11 0))) "Calls CMake to find out include paths and other compiler flags" tar ((:url . "https://github.com/atilaneves/cmake-ide") (:commit . "28dc4ab5bd01d99553901b4efeb7234280928b18") (:revdesc . "28dc4ab5bd01") (:keywords "languages") (:authors ("Atila Neves" . "atila.neves@gmail.com")) (:maintainers ("Atila Neves" . "atila.neves@gmail.com")) (:maintainer "Atila Neves" . "atila.neves@gmail.com"))])
+ (cmake-mode . [(20260825 1510) ((emacs (24 1))) "Major-mode for editing CMake sources" tar ((:commit . "af7ecc8c294d153b0120813776e1fa11c5bfe4a1") (:revdesc . "af7ecc8c294d"))])
+ (cmake-project . [(20171121 1115) nil "Integrates CMake build process with Emacs" tar ((:url . "https://github.com/alamaison/emacs-cmake-project") (:commit . "d3f408f226eff3f77f7e00dd519f4efc78fd292d") (:revdesc . "d3f408f226ef") (:keywords "c" "cmake" "languages" "tools") (:authors ("Alexander Lamaison" . "alexander.lamaison@gmail")) (:maintainers ("Alexander Lamaison" . "alexander.lamaison@gmail")) (:maintainer "Alexander Lamaison" . "alexander.lamaison@gmail"))])
+ (cmd-to-echo . [(20161203 2133) ((emacs (24 4)) (s (1 11 0)) (shell-split-string (20151224 208))) "Show the output of long-running commands in the echo area" tar ((:url . "https://github.com/mallt/cmd-to-echo") (:commit . "e0e874fc0e1ad6d291e39ed76023445297ad438a") (:revdesc . "e0e874fc0e1a") (:authors ("Tijs Mallaerts" . "tijs.mallaerts@gmail.com")) (:maintainers ("Tijs Mallaerts" . "tijs.mallaerts@gmail.com")) (:maintainer "Tijs Mallaerts" . "tijs.mallaerts@gmail.com"))])
+ (cmm-mode . [(20150225 746) nil "Major mode for C-- source code" tar ((:url . "https://github.com/bgamari/cmm-mode") (:commit . "c3ad514dff3eb30434f6b20d953276d4c00de1ee") (:revdesc . "c3ad514dff3e"))])
+ (cnfonts . [(20251223 636) ((emacs (24))) "A simple Chinese fonts config tool" tar ((:url . "https://github.com/tumashu/cnfonts") (:commit . "9daace1a96febb4f8ec72f1a845a4e63ae56bc4c") (:revdesc . "9daace1a96fe") (:keywords "convenience" "chinese" "font") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (cobalt . [(20180304 1155) ((emacs (24))) "Easily use the Cobalt.rs static site generator" tar ((:url . "https://github.com/cobalt-org/cobalt.el") (:commit . "634ace275697e188746ca22a30ff94380ec756be") (:revdesc . "634ace275697") (:keywords "convenience") (:authors ("Juan Karlo Licudine" . "accidentalrebel@gmail.com")) (:maintainers ("Juan Karlo Licudine" . "accidentalrebel@gmail.com")) (:maintainer "Juan Karlo Licudine" . "accidentalrebel@gmail.com"))])
+ (cobra-mode . [(20140116 2116) nil "Major mode for .NET-based Cobra language" tar ((:url . "https://github.com/Nekroze/cobra-mode") (:commit . "acd6e53f6286af5176471d01f25257e5ddb6dd01") (:revdesc . "acd6e53f6286") (:keywords "languages"))])
+ (coc-dc . [(20260629 1344) ((emacs (27 2)) (hydra (0 14 0))) "A Clash of Clans damage calculator" tar ((:url . "https://github.com/S0mbr3/coc-damage-calculator") (:commit . "c5bb252b1ed39c17796ef2b4dcaf66e1202cbd89") (:revdesc . "c5bb252b1ed3") (:keywords "games") (:authors ("S0mbr3" . "0xf2f@proton.me")) (:maintainers ("S0mbr3" . "0xf2f@proton.me")) (:maintainer "S0mbr3" . "0xf2f@proton.me"))])
+ (codcut . [(20190915 1009) nil "Share pieces of code to Codcut" tar ((:url . "https://github.com/codcut/codcut-emacs") (:commit . "bf07c3db3900e36b0b87423f3b715d6378f86393") (:revdesc . "bf07c3db3900") (:keywords "comm" "tools" "codcut" "share") (:authors ("Diego Pasquali" . "hello@dgopsq.space")) (:maintainers ("Diego Pasquali" . "hello@dgopsq.space")) (:maintainer "Diego Pasquali" . "hello@dgopsq.space"))])
+ (code-archive . [(20190612 308) ((emacs (24 3))) "Git supported code archive and reference for org-mode" tar ((:url . "https://github.com/mschuldt/code-archive") (:commit . "1ad9af6679d0294c3056eab9cad673f29c562721") (:revdesc . "1ad9af6679d0") (:authors ("Michael Schuldt" . "mbschuldt@gmail.com")) (:maintainers ("Michael Schuldt" . "mbschuldt@gmail.com")) (:maintainer "Michael Schuldt" . "mbschuldt@gmail.com"))])
+ (code-cells . [(20241119 1421) ((emacs (27 1)) (compat (29 1))) "Lightweight notebooks with support for ipynb files" tar ((:url . "https://github.com/astoff/code-cells.el") (:commit . "caffb420be106cebbdfe4474ed0507a601603f83") (:revdesc . "caffb420be10") (:keywords "convenience" "outlines") (:authors ("Augusto Stoffel" . "arstoffel@gmail.com")) (:maintainers ("Augusto Stoffel" . "arstoffel@gmail.com")) (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com"))])
+ (code-compass . [(20260724 1822) ((emacs (26 1)) (s (1 12 0)) (dash (2 13)) (async (1 9 7)) (simple-httpd (1 5 1))) "Navigate software aided by metrics and visualization" tar ((:url . "https://github.com/ag91/code-compass") (:commit . "9004c885ac20e10237c97b66b5dd4e61f4e8a1e1") (:revdesc . "9004c885ac20") (:keywords "tools" "extensions" "help") (:authors ("Andrea" . "andrea-dev@hotmail.com")) (:maintainers ("Andrea" . "andrea-dev@hotmail.com")) (:maintainer "Andrea" . "andrea-dev@hotmail.com"))])
+ (code-library . [(20160426 1218) ((gist (1 3 1))) "Use org-mode to collect code snippets" tar ((:url . "https://github.com/lujun9972/code-library") (:commit . "3c79338eae5c892bfb4e4882298422d9fd65d2d7") (:revdesc . "3c79338eae5c") (:keywords "lisp" "code") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (code-review . [(20221206 113) ((emacs (25 1)) (closql (1 2 0)) (magit (3 0 0)) (transient (0 3 7)) (a (1 0 0)) (ghub (3 5 1)) (uuidgen (1 2)) (deferred (0 5 1)) (markdown-mode (2 4)) (forge (0 3 0)) (emojify (1 2))) "Perform code review from Github, Gitlab, and Bitbucket Cloud" tar ((:url . "https://github.com/wandersoncferreira/code-review") (:commit . "a8bb63b53f2a1fd31302c110e668ad7b5c871b34") (:revdesc . "a8bb63b53f2a") (:keywords "git" "tools" "vc") (:authors ("Wanderson Ferreira" . "https://github.com/wandersoncferreira")) (:maintainers ("Wanderson Ferreira" . "wand@hey.com")) (:maintainer "Wanderson Ferreira" . "wand@hey.com"))])
+ (code-stats . [(20201209 2135) ((emacs (25)) (request (0 3 0))) "Code::Stats plugin" tar ((:url . "https://github.com/xuchunyang/code-stats-emacs") (:commit . "9a467dfd6a3cef849468623e1c085cbf59dac154") (:revdesc . "9a467dfd6a3c") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (codebug . [(20140929 2137) nil "Interact with codebug" tar ((:url . "http://www.shanedowling.com/") (:commit . "d95e5182fa1465406964873d9db1fdac77206f5b") (:revdesc . "d95e5182fa14"))])
+ (codesearch . [(20240828 618) ((log4e (0 3 1))) "Core support for managing codesearch tools" tar ((:url . "https://github.com/abingham/emacs-codesearch") (:commit . "92b4c2557c0bbf7da4d26c413feccb6766e70a9c") (:revdesc . "92b4c2557c0b") (:keywords "tools" "development" "search") (:authors ("Austin Bingham" . "austin.bingham@gmail.com") ("Youngjoo Lee" . "youngker@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com") ("Youngjoo Lee" . "youngker@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (codespaces . [(20260305 2229) ((emacs (28 1))) "Connect to GitHub Codespaces via TRAMP" tar ((:url . "https://github.com/F4ban/codespaces.el") (:commit . "33161d6ac6fd3b57df896f8969566f50f37bd3ce") (:revdesc . "33161d6ac6fd") (:keywords "comm") (:authors ("Fabian Markl" . "fabian@markl.dev")) (:maintainers ("Fabian Markl" . "fabian@markl.dev")) (:maintainer "Fabian Markl" . "fabian@markl.dev"))])
+ (codex-cli . [(20250913 1900) ((emacs (28 1))) "Codex CLI integration" tar ((:url . "https://github.com/bennfocus/codex-cli.el") (:commit . "172d62381851d82860186a56da6f936f40180b3f") (:revdesc . "172d62381851") (:keywords "tools" "convenience" "codex" "codex-cli") (:authors ("Benn" . "bennmsg@gmail.com")) (:maintainers ("Benn" . "bennmsg@gmail.com")) (:maintainer "Benn" . "bennmsg@gmail.com"))])
+ (codex-theme . [(20240914 204) nil "Codex theme, a simple high contrast theme" tar ((:url . "https://github.com/hsnovel/codex-theme") (:commit . "fe5ce22e801423e7a5dafb7b57674e2dffbeb86d") (:revdesc . "fe5ce22e8014") (:authors ("ağan Korkmaz" . "root@hsnovel.net")) (:maintainers ("ağan Korkmaz" . "root@hsnovel.net")) (:maintainer "ağan Korkmaz" . "root@hsnovel.net"))])
+ (codic . [(20150926 1127) ((emacs (24)) (cl-lib (0 5))) "Search Codic (codic.jp) naming dictionaries" tar ((:url . "https://github.com/syohex/emacs-codic") (:commit . "52bbb6997ef4ab9fb7fea43bbfff7f04671aa557") (:revdesc . "52bbb6997ef4") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (coercion . [(20250123 1931) ((emacs (29 1))) "Naming convention style switch" tar ((:url . "https://github.com/eki3z/coercion.el") (:commit . "aa50f6c51a2363f7827e614c3e533152619dd050") (:revdesc . "aa50f6c51a23") (:keywords "convenience" "editing") (:authors ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainers ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainer "Eki Zhang" . "liuyinz95@gmail.com"))])
+ (coffee-fof . [(20131012 1230) ((coffee-mode (0 4 1))) "A coffee-mode configuration for `ff-find-other-file'" tar ((:url . "https://github.com/yasuyk/coffee-fof") (:commit . "211529594bc074721c6cbc4edb73a63cc05f89ac") (:revdesc . "211529594bc0") (:keywords "coffee-mode") (:authors ("Yasuyki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyki Oka" . "yasuyk@gmail.com"))])
+ (coffee-mode . [(20200315 1133) ((emacs (24 3))) "Major mode for CoffeeScript code" tar ((:url . "https://github.com/defunkt/coffee-mode") (:commit . "35a41c7d8233eac0b267d9593e67fb8b6235e134") (:revdesc . "35a41c7d8233") (:keywords "coffeescript" "major" "mode") (:authors ("Chris Wanstrath" . "chris@ozmm.org")) (:maintainers ("Chris Wanstrath" . "chris@ozmm.org")) (:maintainer "Chris Wanstrath" . "chris@ozmm.org"))])
+ (coin-ticker . [(20170611 727) ((request (0 3 0)) (emacs (25))) "Show a cryptocurrency price ticker" tar ((:url . "https://github.com/eklitzke/coin-ticker-mode") (:commit . "45108e239e1d129c0cc1ff37f2870cf73087780b") (:revdesc . "45108e239e1d") (:keywords "news") (:authors ("Evan Klitzke" . "evan@eklitzke.org")) (:maintainers ("Evan Klitzke" . "evan@eklitzke.org")) (:maintainer "Evan Klitzke" . "evan@eklitzke.org"))])
+ (colonoscopy-theme . [(20170808 1309) ((emacs (24 0))) "An Emacs 24 theme based on Colonoscopy (tmTheme)" tar ((:url . "https://github.com/emacsfodder/tmtheme-to-deftheme") (:commit . "64bbb322b13dae91ce9f1e3581f836f94f800ead") (:revdesc . "64bbb322b13d"))])
+ (color-identifiers-mode . [(20251227 1110) ((dash (2 5 0)) (emacs (24 4))) "Color identifiers based on their names" tar ((:url . "https://github.com/ankurdave/color-identifiers-mode") (:commit . "adcdbbe9c69edeb207f2b066db071057f3f612d6") (:revdesc . "adcdbbe9c69e") (:keywords "faces" "languages") (:authors ("Ankur Dave" . "ankurdave@gmail.com")) (:maintainers ("Ankur Dave" . "ankurdave@gmail.com")) (:maintainer "Ankur Dave" . "ankurdave@gmail.com"))])
+ (color-moccur . [(20141223 35) nil "Multi-buffer occur (grep) mode" tar ((:url . "http://www.bookshelf.jp/elc/color-moccur.el") (:commit . "4f1c59ffd1ccc2ab1a171cd6b721e8cb9e002fb7") (:revdesc . "4f1c59ffd1cc") (:keywords "convenience") (:authors ("Akihisa" . "akihisa@mail.ne.jp")) (:maintainers ("Akihisa" . "akihisa@mail.ne.jp")) (:maintainer "Akihisa" . "akihisa@mail.ne.jp"))])
+ (color-theme . [(20190220 1115) nil "An OBSOLETE color-theme implementation" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki.pl?ColorTheme") (:commit . "3a2f6b615f5e2401e30d93a3e0adc210bbb4b7aa") (:revdesc . "3a2f6b615f5e") (:keywords "faces") (:authors ("Jonadab the Unsightly One" . "jonadab@bright.net")) (:maintainers ("Xavier Maillard" . "zedek@gnu.org")) (:maintainer "Xavier Maillard" . "zedek@gnu.org"))])
+ (color-theme-approximate . [(20140228 436) nil "Makes Emacs theme works on terminal transparently" tar ((:url . "https://github.com/tungd/color-theme-approximate") (:commit . "f54301ca39bc5d2ffb000f233f8114184a3e7d71") (:revdesc . "f54301ca39bc") (:authors ("Tung Dao" . "me@tungdao.com")) (:maintainers ("Tung Dao" . "me@tungdao.com")) (:maintainer "Tung Dao" . "me@tungdao.com"))])
+ (color-theme-buffer-local . [(20170126 601) ((color-theme (0))) "Install color-themes by buffer" tar ((:url . "https://github.com/vic/color-theme-buffer-local") (:commit . "faf7415c99e132094f1f09c6b6974ec118a18d87") (:revdesc . "faf7415c99e1") (:keywords "faces") (:authors ("Victor Borja" . "vic.borja@gmail.com")) (:maintainers ("Victor Borja" . "vic.borja@gmail.com")) (:maintainer "Victor Borja" . "vic.borja@gmail.com"))])
+ (color-theme-modern . [(20241227 223) ((emacs (24))) "Ports of color-theme themes to deftheme" tar ((:url . "https://github.com/emacs-jp/replace-colorthemes") (:commit . "99839fe205ff7dd299b15355e98e6b0aeb9cc646") (:revdesc . "99839fe205ff") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (color-theme-sanityinc-solarized . [(20241126 1028) ((emacs (24 1))) "A version of Ethan Schoonover's Solarized themes" tar ((:url . "https://github.com/purcell/color-theme-sanityinc-solarized") (:commit . "f42431850e0ff0cff90c6cc39edc222faa40323d") (:revdesc . "f42431850e0f") (:keywords "faces" "themes") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (color-theme-sanityinc-tomorrow . [(20260826 1451) ((emacs (24 1))) "A version of Chris Kempson's \"tomorrow\" themes" tar ((:url . "https://github.com/purcell/color-theme-sanityinc-tomorrow") (:commit . "e3a94c399c0c490aa3be7b05c28952c520b65786") (:revdesc . "e3a94c399c0c") (:keywords "faces" "themes") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (color-theme-x . [(20201204 2245) ((cl-lib (0 5))) "Convert color themes to X11 resource settings" tar ((:url . "https://github.com/ajsquared/color-theme-x") (:commit . "ec853dd931d625e07116fbc91d8829bd15f90889") (:revdesc . "ec853dd931d6") (:keywords "convenience" "faces" "frames") (:authors ("Matthew Kennedy" . "mkennedy@killr.ath.cx")) (:maintainers ("Andrew Johnson" . "andrew@andrewjamesjohnson.com")) (:maintainer "Andrew Johnson" . "andrew@andrewjamesjohnson.com"))])
+ (colorless-themes . [(20210102 1035) ((emacs (24 1))) "A macro to generate mostly colorless themes" tar ((:url . "https://git.sr.ht/~lthms/colorless-themes.el") (:commit . "95fff8b4e313bdd2073454fd5be9420d95dab267") (:revdesc . "95fff8b4e313") (:keywords "faces themes" "faces") (:authors ("Thomas Letan" . "contact@thomasletan.fr")) (:maintainers ("Thomas Letan" . "contact@thomasletan.fr")) (:maintainer "Thomas Letan" . "contact@thomasletan.fr"))])
+ (colormaps . [(20171008 2224) ((emacs (25))) "Hex colormaps" tar ((:url . "https://github.com/lepisma/colormaps.el") (:commit . "3a88961ba66b09a49ea5aa92b2b8776b2c92d68c") (:revdesc . "3a88961ba66b") (:keywords "tools") (:authors ("Abhinav Tushar" . "lepisma@fastmail.com")) (:maintainers ("Abhinav Tushar" . "lepisma@fastmail.com")) (:maintainer "Abhinav Tushar" . "lepisma@fastmail.com"))])
+ (column-enforce-mode . [(20200605 1933) nil "Highlight text that extends beyond a  column" tar ((:url . "www.github.com/jordonbiondo/column-enforce-mode") (:commit . "14a7622f2268890e33536ccd29510024d51ee96f") (:revdesc . "14a7622f2268"))])
+ (com-css-sort . [(20260101 558) ((emacs (25 1)) (s (1 12 0))) "Common way of sorting the CSS attributes" tar ((:url . "https://github.com/jcs-elpa/com-css-sort") (:commit . "244f910ef55c853e75b0109b7fd96ce742a13461") (:revdesc . "244f910ef55c") (:keywords "convenience" "matching" "css" "sort") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (comb . [(20201010 1147) ((emacs (25 1))) "Interactive code auditing and grep tool" tar ((:url . "https://github.com/cyrus-and/comb") (:commit . "31f3e94afb2a7f7d18d30c2468a0c683700f7a66") (:revdesc . "31f3e94afb2a") (:keywords "matching") (:authors ("Andrea Cardaci" . "cyrus.and@gmail.com")) (:maintainers ("Andrea Cardaci" . "cyrus.and@gmail.com")) (:maintainer "Andrea Cardaci" . "cyrus.and@gmail.com"))])
+ (comby . [(20200629 140) ((emacs (25 1))) "Emacs comby integration" tar ((:url . "https://github.com/s-kostyaev/comby.el") (:commit . "928b8b8959a2556aba5526f2a25801341eb59dc3") (:revdesc . "928b8b8959a2") (:keywords "languages") (:authors ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainers ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainer "Sergey Kostyaev" . "feo.me@ya.ru"))])
+ (comet-trail . [(20260729 1212) ((emacs (29 1))) "Cursor comet trail effect" tar ((:url . "https://git.andros.dev/andros/comet-trail.el") (:commit . "5456810234d7236be8fb8b17a9ac7b270d6f4718") (:revdesc . "5456810234d7") (:keywords "faces" "convenience") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (comint-histories . [(20260608 1833) ((emacs (29 1)) (f (0 21 0))) "Many comint histories" tar ((:url . "https://github.com/NicholasBHubbard/comint-histories") (:commit . "e13c5ac7f812bc6f7da57c4640600b97356bd02b") (:revdesc . "e13c5ac7f812") (:keywords "convenience" "processes" "terminals") (:authors ("Nicholas Hubbard" . "nicholashubbard@posteo.net")) (:maintainers ("Nicholas Hubbard" . "nicholashubbard@posteo.net")) (:maintainer "Nicholas Hubbard" . "nicholashubbard@posteo.net"))])
+ (comint-hyperlink . [(20211026 100) ((emacs (24 3))) "Create hyperlinks in comint for SGR URL control sequences" tar ((:url . "https://github.com/matthewbauer/comint-hyperlink") (:commit . "905f2db1f95950899301b9f71faed9e9362cf5dc") (:revdesc . "905f2db1f959") (:keywords "comint" "shell" "processes" "hypermedia" "terminals") (:authors ("Matthew Bauer" . "mjbauer95@gmail.com")) (:maintainers ("Matthew Bauer" . "mjbauer95@gmail.com")) (:maintainer "Matthew Bauer" . "mjbauer95@gmail.com"))])
+ (comint-intercept . [(20241021 629) ((emacs (24 3)) (vterm (20240102 1640))) "Intercept input in comint-mode" tar ((:url . "https://github.com/hying-caritas/comint-intercept") (:commit . "99b17be632ff1d892f427244cad9e37752cbf71b") (:revdesc . "99b17be632ff") (:keywords "processes" "terminals") (:authors ("Huang, Ying" . "huang.ying.caritas@gmail.com")) (:maintainers ("Huang, Ying" . "huang.ying.caritas@gmail.com")) (:maintainer "Huang, Ying" . "huang.ying.caritas@gmail.com"))])
+ (command-log-mode . [(20160413 447) nil "Log keyboard commands to buffer" tar ((:url . "https://github.com/lewang/command-log-mode") (:commit . "af600e6b4129c8115f464af576505ea8e789db27") (:revdesc . "af600e6b4129") (:keywords "help") (:authors ("Michael Weber" . "michaelw@foldr.org")) (:maintainers ("Michael Weber" . "michaelw@foldr.org")) (:maintainer "Michael Weber" . "michaelw@foldr.org"))])
+ (command-queue . [(20160328 1725) ((emacs (24 3))) "Shell command queue" tar ((:url . "https://github.com/Yuki-Inoue/command-queue") (:commit . "f327c6f852592229a755ec6de0c62c6aeafd6659") (:revdesc . "f327c6f85259") (:authors ("Yuki INOUE" . "inouetakahirokiatgmail.com")) (:maintainers ("Yuki INOUE" . "inouetakahirokiatgmail.com")) (:maintainer "Yuki INOUE" . "inouetakahirokiatgmail.com"))])
+ (commander . [(20140120 1852) ((s (1 6 0)) (dash (2 0 0)) (cl-lib (0 3)) (f (0 6 1))) "Emacs command line parser" tar ((:url . "https://github.com/rejeep/commander.el") (:commit . "2c8a57b9c619e29ccbe2d5a85921b9c689e95bf9") (:revdesc . "2c8a57b9c619") (:keywords "cli" "argv") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (comment-dwim-2 . [(20241219 1643) ((emacs (28 1))) "An all-in-one comment command to rule them all" tar ((:url . "https://github.com/remyferre/comment-dwim-2") (:commit . "6ab75d0a690f0080e9b97c730aac817d04144cd0") (:revdesc . "6ab75d0a690f") (:keywords "convenience" "tools") (:authors ("Rémy Ferré" . "dev@remyferre.net")) (:maintainers ("Rémy Ferré" . "dev@remyferre.net")) (:maintainer "Rémy Ferré" . "dev@remyferre.net"))])
+ (comment-or-uncomment-sexp . [(20190225 1122) ((emacs (24))) "Command for commenting the sexp under point" tar ((:url . "https://github.com/Malabarba/comment-or-uncomment-sexp") (:commit . "bec730d3fc1e6c17ff1339eb134af16c034a4d95") (:revdesc . "bec730d3fc1e") (:keywords "convenience") (:authors ("Artur Malabarba" . "artur@endlessparentheses.com")) (:maintainers ("Artur Malabarba" . "artur@endlessparentheses.com")) (:maintainer "Artur Malabarba" . "artur@endlessparentheses.com"))])
+ (comment-tags . [(20170910 1735) ((emacs (24 5))) "Highlight & navigate comment tags like 'TODO'" tar ((:url . "https://github.com/vincekd/comment-tags") (:commit . "7ae64a8d7aca098f360e03e9a3e780e27715c6e3") (:revdesc . "7ae64a8d7aca") (:keywords "convenience" "comments" "tags") (:authors ("Vincent Dumas" . "vincekd@gmail.com")) (:maintainers ("Vincent Dumas" . "vincekd@gmail.com")) (:maintainer "Vincent Dumas" . "vincekd@gmail.com"))])
+ (commentary-theme . [(20240620 1307) ((emacs (24))) "A minimal theme with contrasting comments" tar ((:url . "https://github.com/pzel/commentary-theme") (:commit . "31e3724631d20fe5854cf522443a31fc12245ce3") (:revdesc . "31e3724631d2") (:authors ("Amirreza Ghaderi" . "amirreza.blog@gmail.com") ("Simon Zelazny" . "zelazny@mailbox.org")) (:maintainers ("Amirreza Ghaderi" . "amirreza.blog@gmail.com") ("Simon Zelazny" . "zelazny@mailbox.org")) (:maintainer "Amirreza Ghaderi" . "amirreza.blog@gmail.com"))])
+ (commenter . [(20160219 1627) ((emacs (24 4)) (let-alist (1 0 4))) "Multiline-comment support package" tar ((:url . "https://github.com/yuutayamada/commenter") (:commit . "6d1885419434ba779270c6fda0e30d390bb074bd") (:revdesc . "6d1885419434") (:keywords "comment") (:authors ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainers ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainer "Yuta Yamada" . "cokesboy\"at\"gmail.com"))])
+ (commify . [(20240131 1455) ((s (1 9 0))) "Toggle grouping commas in numbers" tar ((:url . "https://github.com/ddoherty03/commify") (:commit . "1245bfe420e92b4274bce3421ee59ea201e72aaa") (:revdesc . "1245bfe420e9") (:keywords "convenience" "editing" "numbers" "grouping" "commas") (:authors ("Daniel E. Doherty" . "ded-commify@ddoherty.net")) (:maintainers ("Daniel E. Doherty" . "ded-commify@ddoherty.net")) (:maintainer "Daniel E. Doherty" . "ded-commify@ddoherty.net"))])
+ (common-lisp-snippets . [(20180226 1523) ((yasnippet (0 8 0))) "Yasnippets for Common Lisp" tar ((:url . "https://github.com/mrkkrp/common-lisp-snippets") (:commit . "1ddf808311ba4d9e8444a1cb50bd5ee75e4111f6") (:revdesc . "1ddf808311ba") (:keywords "snippets") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (communinfo . [(20250927 28) ((emacs (30))) "Community maintained Info-url-alist" tar ((:url . "https://codeberg.org/mekeor/communinfo") (:commit . "a562535f385f1ff7a154b01047e4e2c9efc2dd65") (:revdesc . "a562535f385f") (:keywords "docs") (:authors ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainers ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainer "Mekeor Melire" . "mekeor@posteo.de"))])
+ (company . [(20260721 100) ((emacs (26 1)) (posframe (1 5 1))) "Modular text completion framework" tar ((:url . "http://company-mode.github.io/") (:commit . "1cc907ac9e46ae4209eb5a341131787e0c678406") (:revdesc . "1cc907ac9e46") (:keywords "abbrev" "convenience" "matching") (:maintainers ("Dmitry Gutov" . "dmitry@gutov.dev")) (:maintainer "Dmitry Gutov" . "dmitry@gutov.dev"))])
+ (company-anaconda . [(20230821 2126) ((emacs (25 1)) (company (0 8 0)) (anaconda-mode (0 1 1)) (cl-lib (0 5 0)) (dash (2 6 0)) (s (1 9))) "Anaconda backend for company-mode" tar ((:url . "https://github.com/proofit404/anaconda-mode") (:commit . "14867265e474f7a919120bbac74870c3256cbacf") (:revdesc . "14867265e474") (:keywords "convenience" "company" "anaconda") (:authors ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainers ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainer "Artem Malyshev" . "proofit404@gmail.com"))])
+ (company-ansible . [(20240221 2255) ((emacs (24 4)) (company (0 8 12))) "A company back-end for ansible" tar ((:url . "https://github.com/krzysztof-magosa/company-ansible") (:commit . "338922601cf9e8ada863fe6f2dd9d5145d9983b0") (:revdesc . "338922601cf9") (:keywords "ansible") (:authors ("Krzysztof Magosa" . "krzysztof@magosa.pl")) (:maintainers ("Krzysztof Magosa" . "krzysztof@magosa.pl")) (:maintainer "Krzysztof Magosa" . "krzysztof@magosa.pl"))])
+ (company-arduino . [(20160306 1739) ((emacs (24 1)) (company (0 8 0)) (irony (0 1 0)) (cl-lib (0 5)) (company-irony (0 1 0)) (company-c-headers (20140930)) (arduino-mode (1 0))) "Company-mode for Arduino" tar ((:url . "https://github.com/yuutayamada/company-arduino") (:commit . "5958b917cc5cc729dc64d74d947da5ee91c48980") (:revdesc . "5958b917cc5c") (:keywords "convenience" "development" "company") (:authors ("Yuta Yamada" . "sleepboy.zzz@gmail.com")) (:maintainers ("Yuta Yamada" . "sleepboy.zzz@gmail.com")) (:maintainer "Yuta Yamada" . "sleepboy.zzz@gmail.com"))])
+ (company-auctex . [(20200529 1835) ((yasnippet (0 8 0)) (company (0 8 0)) (auctex (11 87))) "Company-mode auto-completion for AUCTeX" tar ((:url . "https://github.com/alexeyr/company-auctex/") (:commit . "9400a2ec7459dde8cbf1a5d50dfee4e300ed7e18") (:revdesc . "9400a2ec7459") (:authors ("Christopher Monsanto" . "chris@monsan.to") ("Alexey Romanov" . "alexey.v.romanov@gmail.com")) (:maintainers ("Christopher Monsanto" . "chris@monsan.to") ("Alexey Romanov" . "alexey.v.romanov@gmail.com")) (:maintainer "Christopher Monsanto" . "chris@monsan.to"))])
+ (company-bibtex . [(20171105 644) ((company (0 9 0)) (cl-lib (0 5)) (parsebib (1 0))) "Company completion for bibtex keys" tar ((:url . "https://github.com/gbgar/company-bibtex") (:commit . "225c6f5c0c070c94c8cdbbd452ea548cd94d76f4") (:revdesc . "225c6f5c0c07") (:keywords "company-mode" "bibtex") (:authors ("GB Gardner" . "gbgar@users.noreply.github.com")) (:maintainers ("GB Gardner" . "gbgar@users.noreply.github.com")) (:maintainer "GB Gardner" . "gbgar@users.noreply.github.com"))])
+ (company-box . [(20240320 921) ((emacs (26 0 91)) (dash (2 19 0)) (company (0 9 6)) (frame-local (0 0 1))) "Company front-end with icons" tar ((:url . "https://github.com/sebastiencs/company-box") (:commit . "c4f2e243fba03c11e46b1600b124e036f2be7691") (:revdesc . "c4f2e243fba0") (:keywords "company" "completion" "front-end" "convenience") (:authors ("Sebastien Chapuis" . "sebastien@chapu.is")) (:maintainers ("Sebastien Chapuis" . "sebastien@chapu.is")) (:maintainer "Sebastien Chapuis" . "sebastien@chapu.is"))])
+ (company-c-headers . [(20260511 1117) ((emacs (24 1)) (company (0 8))) "Company mode backend for C/C++ header files" tar ((:url . "https://github.com/randomphrase/company-c-headers") (:commit . "986cef8c7aae821ae65b193ea15e7f4a7097821c") (:revdesc . "986cef8c7aae") (:keywords "development" "company") (:authors ("Alastair Rankine" . "alastair@girtby.net")) (:maintainers ("Alastair Rankine" . "alastair@girtby.net")) (:maintainer "Alastair Rankine" . "alastair@girtby.net"))])
+ (company-cabal . [(20170917 1317) ((cl-lib (0 5)) (company (0 8 0)) (emacs (24))) "Company-mode cabal backend" tar ((:url . "https://github.com/iquiw/company-cabal") (:commit . "62112a7259e24bd6c08885629a185afe512b7d3d") (:revdesc . "62112a7259e2") (:authors ("Iku Iwasa" . "iku.iwasa@gmail.com")) (:maintainers ("Iku Iwasa" . "iku.iwasa@gmail.com")) (:maintainer "Iku Iwasa" . "iku.iwasa@gmail.com"))])
+ (company-coq . [(20260223 1721) ((cl-lib (0 5)) (dash (2 12 1)) (yasnippet (0 11 0)) (company (0 8 12)) (company-math (1 1))) "A collection of extensions for Proof General's Coq mode" tar ((:url . "https://github.com/cpitclaudel/company-coq") (:commit . "1fc1d8f2d56e460b33c6d41a659488dce7b214f9") (:revdesc . "1fc1d8f2d56e") (:keywords "convenience" "languages") (:authors ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainers ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainer "Clément Pit-Claudel" . "clement.pitclaudel@live.com"))])
+ (company-ctags . [(20240511 856) ((emacs (27 1)) (company (0 9 0))) "Fastest company-mode completion backend for ctags" tar ((:url . "https://github.com/redguardtoo/company-ctags") (:commit . "2e079a634afa5687bdb004e3883ac0671a222401") (:revdesc . "2e079a634afa") (:keywords "convenience") (:authors ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainers ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainer "Chen Bin" . "chenbin.sh@gmail.com"))])
+ (company-dcd . [(20241024 1152) ((company (0 9)) (flycheck-dmd-dub (0 7)) (yasnippet (0 8)) (popwin (0 7)) (cl-lib (0 5))) "Company backend for Dlang using DCD" tar ((:url . "https://github.com/tsukimizake/company-dcd") (:commit . "d1f0bf4ed3b86ba6e4173450d237185df37ef464") (:revdesc . "d1f0bf4ed3b8") (:keywords "languages") (:authors ("tsukimizake" . "shomasd_at_gmail.com")) (:maintainers ("tsukimizake" . "shomasd_at_gmail.com")) (:maintainer "tsukimizake" . "shomasd_at_gmail.com"))])
+ (company-dict . [(20190302 5) ((emacs (24 4)) (company (0 8 12)) (parent-mode (2 3))) "A backend that emulates ac-source-dictionary" tar ((:url . "https://github.com/hlissner/emacs-company-dict") (:commit . "cd7b8394f6014c57897f65d335d6b2bd65dab1f4") (:revdesc . "cd7b8394f601") (:keywords "company" "dictionary" "ac-source-dictionary") (:authors ("Henrik Lissner" . "http://github/hlissner")) (:maintainers ("Henrik Lissner" . "henrik@lissner.net")) (:maintainer "Henrik Lissner" . "henrik@lissner.net"))])
+ (company-distel . [(20180827 1344) ((distel-completion-lib (1 0 0))) "Erlang/distel completion backend for company-mode" tar ((:url . "github.com/sebastiw/distel-completion") (:commit . "acc4c0a5521904203d797fe96b08e5fae4233c7e") (:revdesc . "acc4c0a55219") (:keywords "erlang" "distel" "company"))])
+ (company-eask . [(20260301 1017) ((emacs (26 1)) (company (0 8 0)) (eask (0 1 0))) "Company backend for Eask-file" tar ((:url . "https://github.com/emacs-eask/company-eask") (:commit . "94447ebd18b0003d0941ec1e7d027c8d95216411") (:revdesc . "94447ebd18b0") (:keywords "convenience") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (company-emoji . [(20260810 1758) ((cl-lib (0 5)) (company (0 8 0))) "Company-mode backend for emoji" tar ((:url . "https://codeberg.org/egirl/company-emoji") (:commit . "1cfed9f1eaba4210a9d3632d1123cca39a7d8c9a") (:revdesc . "1cfed9f1eaba") (:keywords "emoji" "company") (:authors ("Alex Dunn" . "git@garbage.world")) (:maintainers ("Alex Dunn" . "git@garbage.world")) (:maintainer "Alex Dunn" . "git@garbage.world"))])
+ (company-emojify . [(20260101 558) ((emacs (26 1)) (company (0 8 0)) (emojify (1 2 1)) (ht (2 0))) "Company completion for Emojify" tar ((:url . "https://github.com/jcs-elpa/company-emojify") (:commit . "e7dcd46effa607c18cb4bde51a59dc310ceeac1c") (:revdesc . "e7dcd46effa6") (:keywords "convenience" "emoji" "company" "emojify") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (company-erlang . [(20170123 538) ((emacs (24 4)) (ivy-erlang-complete (0 1)) (company (0 9 2))) "Company backend based on ivy-erlang-complete" tar ((:url . "https://github.com/s-kostyaev/company-erlang") (:commit . "bc0524a16f17b66c7397690e4ca0e004f09ea6c5") (:revdesc . "bc0524a16f17") (:keywords "tools") (:authors ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainers ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainer "Sergey Kostyaev" . "feo.me@ya.ru"))])
+ (company-flow . [(20180225 2159) ((company (0 8 0)) (dash (2 13 0))) "Flow backend for company-mode" tar ((:url . "https://github.com/aaronjensen/company-flow") (:commit . "76ef585c70d2a3206c2eadf24ba61e59124c3a16") (:revdesc . "76ef585c70d2") (:authors ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainers ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainer "Aaron Jensen" . "aaronjensen@gmail.com"))])
+ (company-flx . [(20180103 518) ((emacs (24)) (company (0 8 12)) (flx (0 5))) "Flx based fuzzy matching for company" tar ((:url . "https://github.com/PythonNut/company-flx") (:commit . "05efcafb488f587bb6e60923078d97227462eb68") (:revdesc . "05efcafb488f") (:keywords "convenience" "company" "fuzzy" "flx") (:authors ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainers ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainer "PythonNut" . "pythonnut@pythonnut.com"))])
+ (company-forge . [(20260408 1038) ((emacs (29 1)) (company (1 0 0)) (forge (0 5 0)) (ghub (4 3 0))) "Company backend for mentions and topics from forge" tar ((:url . "https://github.com/pkryger/company-forge.el") (:commit . "e8329706023daac8fa047623cf87979f5d4b9f12") (:revdesc . "e8329706023d") (:keywords "convenience" "completion" "company" "forge") (:authors ("Przemyslaw Kryger" . "pkryger@gmail.com")) (:maintainers ("Przemyslaw Kryger" . "pkryger@gmail.com")) (:maintainer "Przemyslaw Kryger" . "pkryger@gmail.com"))])
+ (company-fuzzy . [(20260101 558) ((emacs (26 1)) (company (0 8 12)) (s (1 12 0)) (ht (2 0))) "Fuzzy matching for `company-mode'" tar ((:url . "https://github.com/jcs-elpa/company-fuzzy") (:commit . "4b023aa623272675112ea57a50f286475ca620d2") (:revdesc . "4b023aa62327") (:keywords "matching" "auto-complete" "complete" "fuzzy") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (company-ghci . [(20190707 311) ((company (0 8 11)) (haskell-mode (13))) "Company backend which uses the current ghci process" tar ((:url . "https://github.com/horellana/company-ghci") (:commit . "a1d25652583ab4666c5a78cac18cd8039776b50d") (:revdesc . "a1d25652583a") (:authors ("Hector Orellana" . "hofm92@gmail.com")) (:maintainers ("Hector Orellana" . "hofm92@gmail.com")) (:maintainer "Hector Orellana" . "hofm92@gmail.com"))])
+ (company-glsl . [(20210109 1403) ((company (0 9 4)) (glsl-mode (2 4)) (emacs (24 4))) "Support glsl in company-mode" tar ((:url . "https://github.com/guidoschmidt/company-glsl") (:commit . "3a40501ba831a30a7fd3e8529b20d1305d0454aa") (:revdesc . "3a40501ba831") (:authors ("Guido Schmidt" . "git@guidoschmidt.cc")) (:maintainers ("Guido Schmidt" . "git@guidoschmidt.cc")) (:maintainer "Guido Schmidt" . "git@guidoschmidt.cc"))])
+ (company-go . [(20170825 1643) ((company (0 8 0)) (go-mode (1 0 0))) "Company-mode backend for Go (using gocode)" tar ((:url . "https://github.com/emacsattic/company-go") (:commit . "31948b463f2fc18f8801e5a8fe511fef300eb3dd") (:revdesc . "31948b463f2f") (:keywords "languages") (:authors ("nsf" . "no.smile.face@gmail.com")) (:maintainers ("nsf" . "no.smile.face@gmail.com")) (:maintainer "nsf" . "no.smile.face@gmail.com"))])
+ (company-inf-ruby . [(20140805 2054) ((company (0 6 10)) (inf-ruby (2 2 7)) (emacs (24 1))) "Company-mode completion back-end for inf-ruby" tar ((:url . "https://github.com/company-mode/company-inf-ruby") (:commit . "9c2eab3bb82e8838c54013026e6ffb51cccbd37e") (:revdesc . "9c2eab3bb82e") (:authors ("Dmitry Gutov" . "dgutov@yandex.ru")) (:maintainers ("Dmitry Gutov" . "dgutov@yandex.ru")) (:maintainer "Dmitry Gutov" . "dgutov@yandex.ru"))])
+ (company-ipa . [(20210307 1838) ((emacs (24 3)) (company (0 8 12))) "IPA backend for company" tar ((:url . "https://github.com/mguzmann/company-ipa") (:commit . "8634021cac885f53f3274ef6dcce7eab19321046") (:revdesc . "8634021cac88") (:keywords "convenience" "company" "ipa") (:authors ("Matías Guzmán Naranjo" . "mguzmann89@gmail.com")) (:maintainers ("Matías Guzmán Naranjo" . "mguzmann89@gmail.com")) (:maintainer "Matías Guzmán Naranjo" . "mguzmann89@gmail.com"))])
+ (company-irony . [(20190124 2346) ((emacs (24 1)) (company (0 8 0)) (irony (1 1 0)) (cl-lib (0 5))) "Company-mode completion back-end for irony-mode" tar ((:url . "https://github.com/Sarcasm/company-irony/") (:commit . "b44711dfce445610c1ffaec4951c6ff3882b216a") (:revdesc . "b44711dfce44") (:keywords "convenience") (:authors ("Guillaume Papin" . "guillaume.papin@epitech.eu")) (:maintainers ("Guillaume Papin" . "guillaume.papin@epitech.eu")) (:maintainer "Guillaume Papin" . "guillaume.papin@epitech.eu"))])
+ (company-irony-c-headers . [(20151018 909) ((cl-lib (0 5)) (company (0 9 0)) (irony (0 2 0))) "Company mode backend for C/C++ header files with Irony" tar ((:url . "https://github.com/hotpxl/company-irony-c-headers") (:commit . "ba304fe7eebdff90bbc7dea063b45b82638427fa") (:revdesc . "ba304fe7eebd") (:keywords "c" "company") (:authors ("Yutian Li" . "hotpxless@gmail.com")) (:maintainers ("Yutian Li" . "hotpxless@gmail.com")) (:maintainer "Yutian Li" . "hotpxless@gmail.com"))])
+ (company-jedi . [(20200324 25) ((emacs (24)) (cl-lib (0 5)) (company (0 8 11)) (jedi-core (0 2 7))) "Company-mode completion back-end for Python JEDI" tar ((:url . "https://github.com/emacsorphanage/company-jedi") (:commit . "a5a9f7ddf2770bbfad9e39a275053923fe82a200") (:revdesc . "a5a9f7ddf277") (:authors ("Boy" . "boyw165@gmail.com")) (:maintainers ("Neil Okamoto" . "neil.okamoto+melpa@gmail.com")) (:maintainer "Neil Okamoto" . "neil.okamoto+melpa@gmail.com"))])
+ (company-ledger . [(20210910 250) ((emacs (24 3)) (company (0 8 0))) "Fuzzy auto-completion for Ledger & friends" tar ((:url . "https://github.com/debanjum/company-ledger") (:commit . "55fdddd6c5e9c061c685b474ef5e148a4ac9b576") (:revdesc . "55fdddd6c5e9") (:keywords "abbrev" "matching" "auto-complete" "beancount" "ledger" "company") (:authors ("Debanjum Singh Solanky" . "debanjumATgmailDOTcom")) (:maintainers ("Debanjum Singh Solanky" . "debanjumATgmailDOTcom")) (:maintainer "Debanjum Singh Solanky" . "debanjumATgmailDOTcom"))])
+ (company-lua . [(20171108 2306) ((company (0 8 12)) (s (1 10 0)) (f (0 17 0)) (lua-mode (20151025))) "Company backend for Lua" tar ((:url . "https://github.com/ptrv/company-lua") (:commit . "29f6819de4d691e5fd0b62893a9f4fbc1c6fcb52") (:revdesc . "29f6819de4d6") (:authors ("Peter Vasil" . "mail@petervasil.net")) (:maintainers ("Peter Vasil" . "mail@petervasil.net")) (:maintainer "Peter Vasil" . "mail@petervasil.net"))])
+ (company-manually . [(20200721 1903) ((emacs (24 3)) (company (0 9 0)) (ivy (0 13 0))) "A company backend that lets you manually build candidates" tar ((:url . "https://github.com/yanghaoxie/company-manually") (:commit . "b922318da821fc3cf1d3155f21d543ea8470c881") (:revdesc . "b922318da821") (:keywords "convenience" "company-mode" "manually build candidates") (:maintainers ("Yanghao Xie" . "yhaoxie@gmail.com")) (:maintainer "Yanghao Xie" . "yhaoxie@gmail.com"))])
+ (company-math . [(20221227 1329) ((company (0 8 0)) (math-symbol-lists (1 3))) "Completion backends for unicode math symbols and latex tags" tar ((:url . "https://github.com/vspinu/company-math") (:commit . "3eb006874e309ff4076d947fcbd61bb6806aa508") (:revdesc . "3eb006874e30") (:keywords "unicode" "symbols" "completion") (:authors ("Vitalie Spinu" . "spinuvit@gmail.com")) (:maintainers ("Vitalie Spinu" . "spinuvit@gmail.com")) (:maintainer "Vitalie Spinu" . "spinuvit@gmail.com"))])
+ (company-maxima . [(20230529 1026) ((emacs (25 1)) (maxima (0 6 1)) (seq (2 20)) (company (0 9 13))) "Maxima company integration" tar ((:url . "https://gitlab.com/sasanidas/maxima") (:commit . "b2bcf2e6997a5ab3502baba9143af44ac2cc2eb3") (:revdesc . "b2bcf2e6997a") (:keywords "languages" "tools" "convenience") (:maintainers ("Fermin Munoz" . "fmfs@posteo.net")) (:maintainer "Fermin Munoz" . "fmfs@posteo.net"))])
+ (company-nand2tetris . [(20171201 1813) ((nand2tetris (1 1 0)) (company (0 5)) (cl-lib (0 5 0))) "Company backend for nand2tetris major mode" tar ((:url . "http://www.github.com/CestDiego/nand2tetris.el/") (:commit . "fe37ee41367ceff6f7d7a472a5f80cf1285e1e01") (:revdesc . "fe37ee41367c") (:keywords "nand2tetris" "hdl" "company") (:authors ("Diego Berrocal" . "cestdiego@gmail.com")) (:maintainers ("Diego Berrocal" . "cestdiego@gmail.com")) (:maintainer "Diego Berrocal" . "cestdiego@gmail.com"))])
+ (company-native-complete . [(20240816 1648) ((emacs (26 1)) (company (0 9 0)) (native-complete (0 1 0))) "Company completion using native-complete" tar ((:url . "https://github.com/CeleritasCelery/emacs-native-shell-complete") (:commit . "452c8d429f51434f5d53bd9920b7c2d06bf559d9") (:revdesc . "452c8d429f51") (:authors ("Troy Hinckley" . "troy.hinckley@gmail.com")) (:maintainers ("Troy Hinckley" . "troy.hinckley@gmail.com")) (:maintainer "Troy Hinckley" . "troy.hinckley@gmail.com"))])
+ (company-nginx . [(20220210 1411) ((emacs (24)) (cl-lib (0)) (company (0))) "Company-mode keywords support for nginx-mode" tar ((:url . "https://repo.or.cz/company-nginx.git") (:commit . "8a9f1a5653fe2d9a5042bfb9377d54f37fcc64c8") (:revdesc . "8a9f1a5653fe") (:keywords "company" "nginx") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (company-ngram . [(20170129 1913) ((cl-lib (0 5)) (company (0 8 0))) "N-gram based completion" tar ((:url . "https://github.com/kshramt/company-ngram") (:commit . "d15182df3eac72b29772802759b77c9eafef5066") (:revdesc . "d15182df3eac"))])
+ (company-nixos-options . [(20160215 857) ((company (0 8 0)) (nixos-options (0 0 1)) (cl-lib (0 5 0))) "Company Backend for nixos-options" tar ((:url . "http://www.github.com/travisbhartwell/nix-emacs/") (:commit . "a4e1d9ea9f2e773170caa3afbe54ecdf73d04ec8") (:revdesc . "a4e1d9ea9f2e") (:keywords "unix") (:authors ("Diego Berrocal" . "cestdiego@gmail.com") ("Travis B. Hartwell" . "nafai@travishartwell.net")) (:maintainers ("Diego Berrocal" . "cestdiego@gmail.com") ("Travis B. Hartwell" . "nafai@travishartwell.net")) (:maintainer "Diego Berrocal" . "cestdiego@gmail.com"))])
+ (company-org-block . [(20230115 1202) ((emacs (25 1)) (company (0 8 0)) (org (9 2 0))) "Org blocks company backend" tar ((:url . "https://github.com/xenodium/company-org-block") (:commit . "aee601a2bfcc86d26e762eeb84e5e42573f8c5ca") (:revdesc . "aee601a2bfcc"))])
+ (company-php . [(20240328 1036) ((cl-lib (0 5)) (ac-php-core (2 0)) (company (0 9))) "A company back-end for PHP" tar ((:url . "https://github.com/xcwen/ac-php") (:commit . "a69ae4a12e40900619b4e5a1613fd449aef649c3") (:revdesc . "a69ae4a12e40") (:keywords "completion" "convenience" "intellisense") (:authors ("jim" . "xcwenn@qq.com")))])
+ (company-phpactor . [(20240407 1015) ((emacs (24 3)) (company (0 9 6)) (phpactor (0 1 0))) "A company-mode backend for Phpactor" tar ((:url . "https://github.com/emacs-php/phpactor.el") (:commit . "e488ed4c46489861c15d83a43e70eb7c352adc09") (:revdesc . "e488ed4c4648") (:keywords "tools" "php") (:authors ("Martin Tang" . "martin.tang365@gmail.com") ("Mikael Kermorgant" . "mikael@kgtech.fi")) (:maintainers ("Martin Tang" . "martin.tang365@gmail.com") ("Mikael Kermorgant" . "mikael@kgtech.fi")) (:maintainer "Martin Tang" . "martin.tang365@gmail.com"))])
+ (company-plisp . [(20200531 1927) ((emacs (25)) (s (1 2 0)) (company (0 8 12)) (dash (2 12 0)) (cl-lib (0 5))) "Company mode backend for PicoLisp language" tar ((:url . "https://gitlab.com/sasanidas/company-plisp") (:commit . "0e6941e1832faafb2176238339667edd482acd95") (:revdesc . "0e6941e1832f") (:keywords "company" "plisp" "convenience" "auto-completion") (:authors ("Fermin MF" . "fmfs@posteo.net")) (:maintainers ("Fermin MF" . "fmfs@posteo.net")) (:maintainer "Fermin MF" . "fmfs@posteo.net"))])
+ (company-plsense . [(20180118 58) ((company (0 9 3)) (cl-lib (0 5 0)) (dash (2 12 0)) (s (1 12)) (emacs (24))) "Company backend for Perl" tar ((:url . "https://github.com/CeleritasCelery/company-plsense") (:commit . "b48e3181e08ec597269621d621aa06636f02d883") (:revdesc . "b48e3181e08e") (:authors ("Troy Hinckley" . "troy.hinckley@gmail.com")) (:maintainers ("Troy Hinckley" . "troy.hinckley@gmail.com")) (:maintainer "Troy Hinckley" . "troy.hinckley@gmail.com"))])
+ (company-pollen . [(20160812 1510) ((company (0 9 0)) (pollen-mode (1 0))) "Company-mode completion backend for pollen" tar ((:url . "https://github.com/lijunsong/pollen-mode") (:commit . "9779f7f13b1e0cfb58af01af5d8ee9e783bb8a43") (:revdesc . "9779f7f13b1e") (:keywords "languages" "pollen" "pollenpub" "company") (:authors ("Junsong Li" . "ljs.darkfishATGMAIL")))])
+ (company-posframe . [(20230104 1229) ((emacs (26 0)) (company (0 9 0)) (posframe (0 9 0))) "Use a posframe as company candidate menu" tar ((:url . "https://github.com/tumashu/company-posframe") (:commit . "18d6641bba72cba3c00018cee737ea8b454f64a8") (:revdesc . "18d6641bba72") (:keywords "abbrev" "convenience" "matching") (:authors ("Lars Andersen" . "expez@expez.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (company-prescient . [(20260628 2243) ((emacs (25 1)) (prescient (6 1 0)) (company (0 9 6))) "Prescient.el + Company" tar ((:url . "https://github.com/raxod502/prescient.el") (:commit . "5649977fa7789e4615efeca09397ed7eccd06dfc") (:revdesc . "5649977fa778") (:keywords "extensions") (:authors ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainers ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainer "Radian LLC" . "contact+prescient@radian.codes"))])
+ (company-qml . [(20170428 1708) ((qml-mode (0 1)) (company (0 8 12))) "Company backend for QML files" tar ((:url . "https://github.com/cute-jumper/company-qml") (:commit . "4af4f32a7ad86d86bb9293fb0b675aec513b5736") (:revdesc . "4af4f32a7ad8") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (company-quickhelp . [(20231026 1714) ((emacs (24 3)) (company (0 8 9)) (pos-tip (0 4 6))) "Popup documentation for completion candidates" tar ((:url . "https://www.github.com/expez/company-quickhelp") (:commit . "5bda859577582cc42d16fc0eaf5f7c8bedfd9e69") (:revdesc . "5bda85957758") (:keywords "company" "popup" "documentation" "quickhelp") (:authors ("Lars Andersen" . "expez@expez.com")) (:maintainers ("Lars Andersen" . "expez@expez.com")) (:maintainer "Lars Andersen" . "expez@expez.com"))])
+ (company-quickhelp-terminal . [(20240101 1005) ((emacs (24 4)) (company-quickhelp (2 2 0)) (popup (0 5 3))) "Terminal support for `company-quickhelp'" tar ((:url . "https://github.com/jcs-elpa/company-quickhelp-terminal") (:commit . "1ea1dcc8696714f349df21e151bc66fb2cf396a8") (:revdesc . "1ea1dcc86967") (:keywords "convenience" "terminal" "extends" "support" "tip" "help") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (company-racer . [(20171205 310) ((emacs (24 4)) (cl-lib (0 5)) (company (0 8 0)) (deferred (0 3 1))) "Company integration for racer" tar ((:url . "https://github.com/emacs-pe/company-racer") (:commit . "a00381c9d416f375f783fcb6ae8d40669ce1f567") (:revdesc . "a00381c9d416") (:keywords "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (company-reftex . [(20210418 1316) ((emacs (25 1)) (s (1 12)) (company (0 8))) "Company backend based on RefTeX" tar ((:url . "https://github.com/TheBB/company-reftex") (:commit . "42eb98c6504e65989635d95ab81b65b9d5798e76") (:revdesc . "42eb98c6504e") (:keywords "bib" "tex" "company" "latex" "reftex" "references" "labels" "citations") (:authors ("Eivind Fonn" . "evfonn@gmail.com")) (:maintainers ("Eivind Fonn" . "evfonn@gmail.com")) (:maintainer "Eivind Fonn" . "evfonn@gmail.com"))])
+ (company-restclient . [(20190426 1312) ((cl-lib (0 5)) (company (0 8 0)) (emacs (24)) (know-your-http-well (0 2 0)) (restclient (0 0 0))) "Company-mode completion back-end for restclient-mode" tar ((:url . "https://github.com/iquiw/company-restclient") (:commit . "e5a3ec54edb44776738c13e13e34c85b3085277b") (:revdesc . "e5a3ec54edb4") (:authors ("Iku Iwasa" . "iku.iwasa@gmail.com")) (:maintainers ("Iku Iwasa" . "iku.iwasa@gmail.com")) (:maintainer "Iku Iwasa" . "iku.iwasa@gmail.com"))])
+ (company-rtags . [(20250804 1613) ((emacs (24 3)) (company (0 8 1)) (rtags (2 10))) "RTags back-end for company" tar ((:url . "https://github.com/Andersbakken/rtags") (:commit . "d46dfed0e0f175937658ee642b39db05e2ee1477") (:revdesc . "d46dfed0e0f1") (:authors ("Jan Erik Hanssen" . "jhanssen@gmail.com") ("Anders Bakken" . "agbakken@gmail.com")) (:maintainers ("Jan Erik Hanssen" . "jhanssen@gmail.com") ("Anders Bakken" . "agbakken@gmail.com")) (:maintainer "Jan Erik Hanssen" . "jhanssen@gmail.com"))])
+ (company-shell . [(20230106 1532) ((emacs (24 4)) (company (0 8 12)) (dash (2 12 0)) (cl-lib (0 5))) "Company mode backend for shell functions" tar ((:url . "https://github.com/Alexander-Miller/company-shell") (:commit . "5f959a63a6e66eb0cbdac3168cad523a62cc2ccd") (:revdesc . "5f959a63a6e6") (:keywords "company" "shell" "auto-completion") (:authors ("Alexander Miller" . "alexanderm@web.de")) (:maintainers ("Alexander Miller" . "alexanderm@web.de")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (company-solidity . [(20200113 1721) ((company (0 9 0)) (cl-lib (0 5 0)) (solidity-mode (0 1 9))) "Company-mode back-end for solidity-mode" tar ((:url . "https://github.com/ethereum/emacs-solidity") (:commit . "93412f211fad7dfc3b02aa226856fc52b6a15c22") (:revdesc . "93412f211fad") (:keywords "solidity" "completion" "company") (:authors ("Samuel Smolkin" . "sam@future-precedent.org")) (:maintainers ("Samuel Smolkin" . "sam@future-precedent.org")) (:maintainer "Samuel Smolkin" . "sam@future-precedent.org"))])
+ (company-sourcekit . [(20210430 2155) ((emacs (24 3)) (company (0 8 12)) (dash (2 18 0)) (sourcekit (0 2 0))) "Company-mode completion backend for SourceKit" tar ((:url . "https://github.com/nathankot/company-sourcekit") (:commit . "a1860ad4dd3a542acd2fa0dfac2a388cbdf4af0c") (:revdesc . "a1860ad4dd3a") (:keywords "abbrev") (:authors ("Nathan Kot" . "nk@nathankot.com")) (:maintainers ("Nathan Kot" . "nk@nathankot.com")) (:maintainer "Nathan Kot" . "nk@nathankot.com"))])
+ (company-spell . [(20230906 1635) ((emacs (24 4)) (company (0 9 13))) "Autocompleting spelling for Company" tar ((:url . "https://github.com/enzuru/company-spell") (:commit . "f25b592c271dd1098ebe06b233b6ebb6fbeed488") (:revdesc . "f25b592c271d") (:keywords "wp"))])
+ (company-stan . [(20211129 2051) ((emacs (24 3)) (company (0 9 10)) (stan-mode (10 3 0))) "A company-mode completion backend for stan" tar ((:url . "https://github.com/stan-dev/stan-mode/tree/master/company-stan") (:commit . "150bbbe5fd3ad2b5a3dbfba9d291e66eeea1a581") (:revdesc . "150bbbe5fd3a") (:keywords "languages") (:authors ("Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu")) (:maintainers ("Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu")) (:maintainer "Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu"))])
+ (company-statistics . [(20250805 1524) ((emacs (24 3)) (company (0 8 5))) "Sort candidates using completion history" tar ((:url . "https://github.com/company-mode/company-statistics") (:commit . "120e982f47e01945c044e0762ba376741c41b76c") (:revdesc . "120e982f47e0") (:keywords "abbrev" "convenience" "matching") (:authors ("Ingo Lohmar" . "i.lohmar@gmail.com")) (:maintainers ("Ingo Lohmar" . "i.lohmar@gmail.com")) (:maintainer "Ingo Lohmar" . "i.lohmar@gmail.com"))])
+ (company-suggest . [(20200911 1845) ((company (0 9 0)) (emacs (25 1))) "Company-mode back-end for search engine suggests" tar ((:url . "https://github.com/juergenhoetzel/company-suggest") (:commit . "1c89c9de3852f07ce28b0bedf1fbf56fe6eedcdc") (:revdesc . "1c89c9de3852") (:keywords "completion" "convenience") (:authors ("Jürgen Hötzel" . "juergen@archlinux.org")) (:maintainers ("Jürgen Hötzel" . "juergen@archlinux.org")) (:maintainer "Jürgen Hötzel" . "juergen@archlinux.org"))])
+ (company-tabnine . [(20230216 817) ((emacs (25)) (company (0 9 3)) (cl-lib (0 5)) (dash (2 16 0)) (s (1 12 0))) "A company-mode backend for TabNine" tar ((:url . "https://github.com/TommyX12/company-tabnine/") (:commit . "96d0c2c05450359ce90ee99a474991391988d2e6") (:revdesc . "96d0c2c05450") (:keywords "convenience") (:authors ("Tommy Xiang" . "tommyx058@gmail.com")) (:maintainers ("Tommy Xiang" . "tommyx058@gmail.com")) (:maintainer "Tommy Xiang" . "tommyx058@gmail.com"))])
+ (company-terraform . [(20220509 1759) ((emacs (24 4)) (company (0 8 12)) (terraform-mode (0 6))) "A company backend for terraform" tar ((:url . "https://github.com/rafalcieslak/emacs-company-terraform") (:commit . "8d5a16d1bbeeb18ca49a8fd57b5d8cd30c8b8dc7") (:revdesc . "8d5a16d1bbee") (:keywords "abbrev" "convenience" "terraform" "company") (:authors ("Rafał Cieślak" . "rafalcieslak256@gmail.com")) (:maintainers ("Rafał Cieślak" . "rafalcieslak256@gmail.com")) (:maintainer "Rafał Cieślak" . "rafalcieslak256@gmail.com"))])
+ (company-try-hard . [(20200417 1603) ((emacs (24 3)) (company (0 8 0)) (dash (2 0))) "Get all completions from company backends" tar ((:url . "https://github.com/Wilfred/company-try-hard") (:commit . "2b41136b5ed6e02032d99bcdb0599ecf00394fa5") (:revdesc . "2b41136b5ed6") (:keywords "matching") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (company-web . [(20220115 2146) ((company (0 8 0)) (dash (2 8 0)) (cl-lib (0 5 0)) (web-completion-data (0 1 0))) "Company version of ac-html, complete for web,html,emmet,jade,slim modes" tar ((:url . "https://github.com/osv/company-web") (:commit . "e0c6bfa3ae7006c73d0fdfc0fdb69816309baf1b") (:revdesc . "e0c6bfa3ae70") (:keywords "html" "company") (:authors ("Olexandr Sydorchuk" . "olexandr.syd@gmail.com")) (:maintainers ("Olexandr Sydorchuk" . "olexandr.syd@gmail.com")) (:maintainer "Olexandr Sydorchuk" . "olexandr.syd@gmail.com"))])
+ (company-wordfreq . [(20220405 2000) ((emacs (27 1)) (company (0 9))) "Company backend for human language texts" tar ((:url . "https://github.com/johannes-mueller/company-wordfreq.el") (:commit . "83569cf346c2320ef22f6a858e3424f771c4324e") (:revdesc . "83569cf346c2") (:keywords "company" "convenience" "matching") (:authors ("Johannes Mueller" . "github@johannes-mueller.org")) (:maintainers ("Johannes Mueller" . "github@johannes-mueller.org")) (:maintainer "Johannes Mueller" . "github@johannes-mueller.org"))])
+ (company-ycm . [(20140904 1817) ((ycm (0 1))) "Company-ycm" tar ((:url . "https://github.com/neuromage/ycm.el") (:commit . "b2cb611503cf8d256fa19fc76362d7d5d9449d01") (:revdesc . "b2cb611503cf") (:keywords "abbrev") (:authors ("Ajay Gopinathan" . "ajay@gopinathan.net")) (:maintainers ("Ajay Gopinathan" . "ajay@gopinathan.net")) (:maintainer "Ajay Gopinathan" . "ajay@gopinathan.net"))])
+ (company-ycmd . [(20180520 1053) ((ycmd (1 3)) (company (0 9 3)) (deferred (0 5 1)) (s (1 11 0)) (dash (2 13 0)) (let-alist (1 0 5)) (f (0 19 0))) "Company-mode backend for ycmd" tar ((:url . "https://github.com/abingham/emacs-ycmd") (:commit . "966594701c1eef1f6d4dad0c71c6d43a029977d7") (:revdesc . "966594701c1e") (:authors ("Austin Bingham" . "austin.bingham@gmail.com") ("Peter Vasil" . "mail@petervasil.net")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com") ("Peter Vasil" . "mail@petervasil.net")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (compdef . [(20200304 611) ((emacs (24 4))) "A local completion definer" tar ((:url . "https://gitlab.com/jjzmajic/compdef") (:commit . "30fb5846ed851efee641ce8c5d8879ad36cd7ac6") (:revdesc . "30fb5846ed85") (:keywords "convenience"))])
+ (competitive-programming-snippets . [(20201115 1702) ((emacs (26)) (yasnippet (0 8 0))) "Competitive Programming snippets for yasnippet" tar ((:url . "https://github.com/sei40kr/competitive-programming-snippets") (:commit . "3b43c1aeaa6676d1d3d0c47e78790db9bee150b6") (:revdesc . "3b43c1aeaa66") (:keywords "tools") (:authors ("Seong Yong-ju" . "sei40kr@gmail.com")) (:maintainers ("Seong Yong-ju" . "sei40kr@gmail.com")) (:maintainer "Seong Yong-ju" . "sei40kr@gmail.com"))])
+ (compilation-history . [(20260413 2031) ((emacs (29 1))) "Track compilation history in SQLite" tar ((:url . "https://github.com/djgoku/compilation-history") (:commit . "cfc37a18469634696761e239d0517cfb96a2ca40") (:revdesc . "cfc37a184696") (:keywords "processes" "tools") (:authors ("Jonathan Carroll Otsuka" . "pitas.axioms0c@icloud.com")) (:maintainers ("Jonathan Carroll Otsuka" . "pitas.axioms0c@icloud.com")) (:maintainer "Jonathan Carroll Otsuka" . "pitas.axioms0c@icloud.com"))])
+ (compile-angel . [(20260826 245) ((emacs (27 1))) "Automatically Compile Elisp files (auto-compile alternative)" tar ((:url . "https://github.com/jamescherti/compile-angel.el") (:commit . "0b44cc6042dd6846cf44598defa1f71cf40fdb8f") (:revdesc . "0b44cc6042dd") (:keywords "lisp" "tools" "convenience") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (compile-multi . [(20250831 1542) ((emacs (28 1))) "A multi target interface to compile" tar ((:url . "https://github.com/mohkale/compile-multi") (:commit . "d111f99303ceb0354e37e2a5cd7f504d19f105f7") (:revdesc . "d111f99303ce") (:keywords "tools" "compile" "build") (:authors ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainers ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainer "mohsin kaleem" . "mohkale@kisara.moe"))])
+ (compile-multi-all-the-icons . [(20251004 2121) ((emacs (28 0)) (all-the-icons-completion (0 0 1))) "Affixate `compile-multi' with icons" tar ((:url . "https://github.com/mohkale/compile-multi") (:commit . "2976058c416b19f9761d5b8cf596210803afd2d7") (:revdesc . "2976058c416b") (:keywords "tools" "compile" "build") (:authors ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainers ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainer "mohsin kaleem" . "mohkale@kisara.moe"))])
+ (compile-multi-embark . [(20250101 2156) ((emacs (28 1)) (compile-multi (0 4)) (embark (0 22 1))) "Integration for `compile-multi' and `embark'" tar ((:url . "https://github.com/mohkale/compile-multi") (:commit . "19d16d8871b5f19f5625e1a66c1dc46a7c3f6a3a") (:revdesc . "19d16d8871b5") (:keywords "project" "convenience") (:authors ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainers ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainer "Mohsin Kaleem" . "mohkale@kisara.moe"))])
+ (compile-multi-nerd-icons . [(20251004 2121) ((emacs (28 0)) (nerd-icons-completion (0 0 1))) "Affixate `compile-multi' with nerd icons" tar ((:url . "https://github.com/mohkale/compile-multi") (:commit . "2976058c416b19f9761d5b8cf596210803afd2d7") (:revdesc . "2976058c416b") (:keywords "tools" "compile" "build") (:authors ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainers ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainer "mohsin kaleem" . "mohkale@kisara.moe"))])
+ (compiler-explorer . [(20260325 2318) ((emacs (28 1)) (plz (0 9)) (eldoc (1 15 0)) (map (3 3 1)) (seq (2 23))) "Compiler explorer client (godbolt.org)" tar ((:url . "https://github.com/mkcms/compiler-explorer.el") (:commit . "e26a4dac90ca2ceed26b77470bdbea097e877aa4") (:revdesc . "e26a4dac90ca") (:keywords "c" "tools") (:authors ("Michał Krzywkowski" . "k.michal@zoho.com")) (:maintainers ("Michał Krzywkowski" . "k.michal@zoho.com")) (:maintainer "Michał Krzywkowski" . "k.michal@zoho.com"))])
+ (composable . [(20220608 1148) ((emacs (25 1))) "Composable editing" tar ((:url . "https://github.com/paldepind/composable.el") (:commit . "205a69c64ea95ef67070423c31ed70ec44ec980c") (:revdesc . "205a69c64ea9") (:keywords "lisp") (:authors ("Simon Friis Vindum" . "simon@vindum.io")) (:maintainers ("Simon Friis Vindum" . "simon@vindum.io")) (:maintainer "Simon Friis Vindum" . "simon@vindum.io"))])
+ (composer . [(20241016 1900) ((emacs (25 1)) (seq (1 9)) (php-runtime (0 1 0))) "Interface to PHP Composer" tar ((:url . "https://github.com/zonuexe/composer.el") (:commit . "6c7e19256ff964546cea682edd21446c465a663c") (:revdesc . "6c7e19256ff9") (:keywords "tools" "php" "dependency" "manager") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (comware-router-mode . [(20240103 907) ((dash (2 16 0)) (emacs (24 3))) "Major mode for editing Comware configuration files" tar ((:url . "https://github.com/daviderestivo/comware-router-mode") (:commit . "e1671efe5e0ade2dcbea0c17697d460cd8f0ba67") (:revdesc . "e1671efe5e0a") (:keywords "convenience" "faces") (:authors ("Davide Restivo" . "davide.restivo@yahoo.it")) (:maintainers ("Davide Restivo" . "davide.restivo@yahoo.it")) (:maintainer "Davide Restivo" . "davide.restivo@yahoo.it"))])
+ (conan . [(20250919 1412) ((emacs (29 1)) (s (1 7 0)) (f (0 20 0))) "Generate flags for c++ using conan 2.0" tar ((:url . "https://github.com/Carl2/conan-elisp") (:commit . "0c3cca9e832e837a037f8c88438cca979891b131") (:revdesc . "0c3cca9e832e") (:keywords "tools"))])
+ (concurrent . [(20170601 435) ((emacs (24 3)) (deferred (0 5 0))) "Concurrent utility functions for emacs lisp" tar ((:url . "https://github.com/kiwanami/emacs-deferred/blob/master/README-concurrent.markdown") (:commit . "d012a1ab50edcc2c44e3e49006f054dbff47cb6c") (:revdesc . "d012a1ab50ed") (:keywords "deferred" "async" "concurrent") (:authors ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainers ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainer "SAKURAI Masashi" . "m.sakuraiatkiwanami.net"))])
+ (cond-let . [(20260817 452) ((emacs (28 1))) "Additional and improved binding conditionals" tar ((:url . "https://github.com/tarsius/cond-let") (:commit . "bbe1f1c7389b16ad0e6c3bc7b28ba8fb27afb6f5") (:revdesc . "bbe1f1c7389b") (:keywords "extensions") (:authors ("Jonas Bernoulli" . "emacs.cond-let@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.cond-let@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.cond-let@jonas.bernoulli.dev"))])
+ (conda . [(20260808 51) ((emacs (25 1)) (pythonic (0 1 0)) (dash (2 13 0)) (s (1 11 0)) (f (0 18 2))) "Work with your conda environments" tar ((:url . "https://github.com/necaris/conda.el") (:commit . "58b43d5020b8a7cc55065031bae9d0a5020528e0") (:revdesc . "58b43d5020b8") (:keywords "languages" "local" "tools" "python" "environment" "conda") (:authors ("Rami Chowdhury" . "rami.chowdhury@gmail.com")) (:maintainers ("Rami Chowdhury" . "rami.chowdhury@gmail.com")) (:maintainer "Rami Chowdhury" . "rami.chowdhury@gmail.com"))])
+ (conda-project . [(20250415 1442) ((emacs (28 1)) (s (1 13 0)) (yaml (0 1 1)) (pythonic (0 2 0)) (transient (0 8 6))) "Work with conda-project environments" tar ((:url . "https://github.com/gilbertwong96/conda-project.el") (:commit . "21becf078e21cc98a5890dff9049928c4712c235") (:revdesc . "21becf078e21") (:keywords "python" "conda-project" "tools") (:authors ("Gilbert" . "gilbertwong96@icloud.com")) (:maintainers ("Gilbert" . "gilbertwong96@icloud.com")) (:maintainer "Gilbert" . "gilbertwong96@icloud.com"))])
+ (config-general-mode . [(20251217 1842) nil "Config::General config file mode" tar ((:url . "https://codeberg.org/scip/config-general-mode") (:commit . "f92cc6d9b3f3cc49e58cea2b10ad3c2e8aced813") (:revdesc . "f92cc6d9b3f3") (:keywords "files") (:authors ("T.v.Dein" . "tlinden@cpan.org")) (:maintainers ("T.v.Dein" . "tlinden@cpan.org")) (:maintainer "T.v.Dein" . "tlinden@cpan.org"))])
+ (config-parser . [(20160426 1219) ((emacs (24 4))) "A library for parsing config file" tar ((:url . "https://github.com/lujun9972/el-config-parser") (:commit . "85d559e7889d8f5b98b8794b79426ae25ec3caa5") (:revdesc . "85d559e7889d") (:keywords "convenience" "config") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (conflict-buttons . [(20260223 740) ((emacs (26 1))) "Clickable buttons for smerge-mode conflicts" tar ((:url . "https://git.andros.dev/andros/conflict-buttons.el") (:commit . "22af851d6a0cdd226ef7ba0db54fa096c8ddf235") (:revdesc . "22af851d6a0c") (:keywords "vc" "tools" "convenience") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (conkeror-minor-mode . [(20150114 1604) nil "Mode for editing conkeror javascript files" tar ((:url . "https://github.com/Bruce-Connor/conkeror-minor-mode") (:commit . "476e81c27b056e21c192391fe674a2bf875466b0") (:revdesc . "476e81c27b05") (:keywords "programming" "tools") (:authors ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainers ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainer "Artur Malabarba" . "bruce.connor.am@gmail.com"))])
+ (conllu-mode . [(20200501 2328) ((emacs (25)) (cl-lib (0 5)) (flycheck (30)) (hydra (0 13 0)) (s (1 0))) "Editing mode for CoNLL-U files" tar ((:url . "https://github.com/odanoburu/conllu-mode") (:commit . "0db3063572b0de08874822e20570bb153747e6ed") (:revdesc . "0db3063572b0") (:keywords "extensions") (:authors ("bruno cuconato" . "bcclaro+emacs@gmail.com")) (:maintainers ("bruno cuconato" . "bcclaro+emacs@gmail.com")) (:maintainer "bruno cuconato" . "bcclaro+emacs@gmail.com"))])
+ (connection . [(20191111 446) nil "TCP-based client connection" tar ((:url . "https://github.com/myrkr/dictionary-el") (:commit . "c9cad101100975e88873636bfd426b7a19304ebd") (:revdesc . "c9cad1011009") (:keywords "network") (:authors ("Torsten Hilbrich" . "torsten.hilbrich@gmx.net")) (:maintainers ("Torsten Hilbrich" . "torsten.hilbrich@gmx.net")) (:maintainer "Torsten Hilbrich" . "torsten.hilbrich@gmx.net"))])
+ (conner . [(20250726 1900) ((emacs (29 1))) "Define and run project specific commands" tar ((:url . "https://github.com/tralph3/conner") (:commit . "c87ada981743184ad21cd41def1405520651d626") (:revdesc . "c87ada981743") (:keywords "tools") (:authors ("Tomás Ralph" . "tomasralph2000@gmail.com")) (:maintainers ("Tomás Ralph" . "tomasralph2000@gmail.com")) (:maintainer "Tomás Ralph" . "tomasralph2000@gmail.com"))])
+ (constant-theme . [(20180921 1012) ((emacs (24 1))) "A calm, dark, almost monochrome color theme" tar ((:url . "https://github.com/jannis/emacs-constant-theme") (:commit . "0feb9f99d708633d62fa548c953ebbe68fd70de0") (:revdesc . "0feb9f99d708") (:keywords "themes") (:authors ("Jannis Pohlmann" . "contact@jannispohlmann.de")) (:maintainers ("Jannis Pohlmann" . "contact@jannispohlmann.de")) (:maintainer "Jannis Pohlmann" . "contact@jannispohlmann.de"))])
+ (consult . [(20260826 1954) ((emacs (29 1)) (compat (31))) "Search and navigate via completing-read" tar ((:url . "https://github.com/minad/consult") (:commit . "1aec7822fec2724a2e4978665681992f420c29b5") (:revdesc . "1aec7822fec2") (:keywords "matching" "files" "completion") (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (consult-ag . [(20230227 406) ((emacs (27 1)) (consult (0 32))) "The silver searcher integration using Consult" tar ((:url . "https://github.com/yadex205/consult-ag") (:commit . "9eb4df265aedf2628a714610c2ade6d2f21de053") (:revdesc . "9eb4df265aed") (:authors ("Kanon Kakuno and contributors" . "yadex205@outlook.jp")) (:maintainers ("Kanon Kakuno and contributors" . "yadex205@outlook.jp")) (:maintainer "Kanon Kakuno and contributors" . "yadex205@outlook.jp"))])
+ (consult-codesearch . [(20230315 1424) ((emacs (27 1)) (consult (0 20))) "Consult interface for codesearch" tar ((:url . "https://github.com/youngker/consult-codesearch") (:commit . "51df545bb57b468058245950322ae15f6c3a0ce2") (:revdesc . "51df545bb57b") (:keywords "tools") (:authors ("Youngjoo Lee" . "youngker@gmail.com")) (:maintainers ("Youngjoo Lee" . "youngker@gmail.com")) (:maintainer "Youngjoo Lee" . "youngker@gmail.com"))])
+ (consult-company . [(20230606 1824) ((emacs (27 1)) (company (0 9)) (consult (0 9))) "Consult frontend for company" tar ((:url . "https://github.com/mohkale/consult-company") (:commit . "6e309fa9115c9ecd29aa27bff4e3b733979e5dbc") (:revdesc . "6e309fa9115c") (:authors ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainers ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainer "mohsin kaleem" . "mohkale@kisara.moe"))])
+ (consult-compile-multi . [(20250101 2156) ((emacs (28 1)) (compile-multi (0 4)) (consult (0 34))) "Consulting read support for `compile-multi'" tar ((:url . "https://github.com/mohkale/compile-multi") (:commit . "19d16d8871b5f19f5625e1a66c1dc46a7c3f6a3a") (:revdesc . "19d16d8871b5") (:keywords "tools" "compile" "build") (:authors ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainers ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainer "mohsin kaleem" . "mohkale@kisara.moe"))])
+ (consult-dash . [(20250114 1511) ((emacs (27 2)) (dash-docs (1 4 0)) (consult (0 16))) "Consult front-end for dash-docs" tar ((:url . "https://codeberg.org/ravi/consult-dash") (:commit . "edb57bf8cdbef422b88667fadc83e1bb046957a6") (:revdesc . "edb57bf8cdbe") (:keywords "consult" "dash" "docs") (:authors ("Ravi R Kiran" . "lists.ravi@gmail.com")) (:maintainers ("Ravi R Kiran" . "lists.ravi@gmail.com")) (:maintainer "Ravi R Kiran" . "lists.ravi@gmail.com"))])
+ (consult-dir . [(20251020 416) ((emacs (26 1)) (project (0 3 0)) (consult (2 0))) "Insert paths into the minibuffer prompt" tar ((:url . "https://github.com/karthink/consult-dir") (:commit . "1497b46d6f48da2d884296a1297e5ace1e050eb5") (:revdesc . "1497b46d6f48") (:keywords "convenience") (:authors ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com")) (:maintainers ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com")) (:maintainer "Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com"))])
+ (consult-eglot . [(20260613 1443) ((emacs (27 1)) (eglot (1 16)) (consult (0 31)) (project (0 3 0))) "A consulting-read interface for eglot" tar ((:url . "https://github.com/mohkale/consult-eglot") (:commit . "3e4d9a40911b897c0a2c5d20199d0f7c30bfc1c2") (:revdesc . "3e4d9a40911b") (:keywords "tools" "completion" "lsp") (:authors ("mohsin kaleem" . "mohkale@kisara.moe")))])
+ (consult-eglot-embark . [(20250831 925) ((emacs (27 1)) (consult-eglot (0 3)) (embark-consult (1 0))) "Embark integration for `consult-eglot'" tar ((:url . "https://github.com/mohkale/consult-eglot") (:commit . "d8b444aac39edfc6473ffbd228df3e9119451b51") (:revdesc . "d8b444aac39e") (:keywords "tools" "completion" "lsp") (:authors ("mohsin kaleem" . "mohkale@kisara.moe")))])
+ (consult-flycheck . [(20260605 1858) ((emacs (29 1)) (consult (3 5)) (flycheck (35))) "Provides the command `consult-flycheck'" tar ((:url . "https://github.com/minad/consult-flycheck") (:commit . "9dd95361669f87e14230376f4f93c6b9a222c497") (:revdesc . "9dd95361669f") (:keywords "languages" "tools" "completion") (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (consult-flyspell . [(20230322 204) ((emacs (25 1)) (consult (0 12))) "Consult integration for flyspell" tar ((:url . "https://gitlab.com/OlMon/consult-flyspell") (:commit . "7011e6634598530ea2d874e7e7389dc1bb94e1ca") (:revdesc . "7011e6634598") (:keywords "convenience"))])
+ (consult-gh . [(20260801 1654) ((emacs (29 4)) (consult (2 0)) (markdown-mode (2 6)) (ox-gfm (1 0)) (yaml (1 2 0))) "Consulting GitHub Client" tar ((:url . "https://github.com/armindarvish/consult-gh") (:commit . "c8707e86d36ea4ec38e177ca8fa0313a5374a0a9") (:revdesc . "c8707e86d36e") (:keywords "convenience" "matching" "tools" "vc"))])
+ (consult-gh-embark . [(20260801 1654) ((emacs (29 4)) (consult (2 0)) (consult-gh (3 1)) (embark-consult (1 1)) (which-key (3 6 0))) "Embark Actions for consult-gh" tar ((:url . "https://github.com/armindarvish/consult-gh") (:commit . "c8707e86d36ea4ec38e177ca8fa0313a5374a0a9") (:revdesc . "c8707e86d36e") (:keywords "matching" "git" "repositories" "forges" "completion"))])
+ (consult-gh-forge . [(20260801 1654) ((emacs (29 4)) (consult (2 0)) (forge (0 3 3)) (consult-gh (3 1))) "Magit/Forge Integration for consult-gh" tar ((:url . "https://github.com/armindarvish/consult-gh") (:commit . "c8707e86d36ea4ec38e177ca8fa0313a5374a0a9") (:revdesc . "c8707e86d36e") (:keywords "matching" "git" "repositories" "forges" "completion"))])
+ (consult-gh-nerd-icons . [(20260801 1654) ((emacs (29 4)) (nerd-icons (0 1 0)) (consult-gh (3 1))) "Nerd icons integration for consult-gh" tar ((:url . "https://github.com/armindarvish/consult-gh") (:commit . "c8707e86d36ea4ec38e177ca8fa0313a5374a0a9") (:revdesc . "c8707e86d36e") (:keywords "matching" "git" "repositories" "completion"))])
+ (consult-gh-with-pr-review . [(20260801 1654) ((emacs (29 4)) (consult (2 0)) (pr-review (0 1)) (consult-gh (3 1))) "\"pr-review\" Integration for consult-gh" tar ((:url . "https://github.com/armindarvish/consult-gh") (:commit . "c8707e86d36ea4ec38e177ca8fa0313a5374a0a9") (:revdesc . "c8707e86d36e") (:keywords "matching" "git" "repositories" "completion"))])
+ (consult-ghq . [(20231111 1303) ((emacs (26 1)) (consult (0 8))) "Ghq interface using consult" tar ((:url . "https://github.com/tomoya/consult-ghq") (:commit . "65a99980fb313d473376542cb87464a8a44ff25e") (:revdesc . "65a99980fb31") (:keywords "convenience" "usability" "consult" "ghq") (:authors ("Tomoya Otake" . "tomoya.ton@gmail.com")) (:maintainers ("Tomoya Otake" . "tomoya.ton@gmail.com")) (:maintainer "Tomoya Otake" . "tomoya.ton@gmail.com"))])
+ (consult-git-log-grep . [(20250317 1916) ((emacs (28 1)) (consult (1 9))) "Consult integration for git log grep" tar ((:url . "https://github.com/Ghosty141/consult-git-log-grep") (:commit . "5b1669ebaff9a91000ea185264cfcb850885d21f") (:revdesc . "5b1669ebaff9") (:keywords "git" "convenience"))])
+ (consult-gumshoe . [(20260217 252) ((emacs (27 1)) (consult (0 35)) (gumshoe (4 0))) "Consult integration for gumshoe" tar ((:url . "https://github.com/Overdr0ne/gumshoe") (:commit . "da71e889b5e890fecbacaeba0a4977c4657b4351") (:revdesc . "da71e889b5e8") (:keywords "tools"))])
+ (consult-hatena-bookmark . [(20250421 1501) ((emacs (27 1)) (consult (2 0))) "Consult commands for the Hatena Bookmark" tar ((:url . "https://github.com/Nyoho/consult-hatena-bookmark") (:commit . "8f2e48688455711df89533a7fe5af1d9cd02c137") (:revdesc . "8f2e48688455"))])
+ (consult-hn . [(20260812 2247) ((emacs (29 4)) (consult (2 0)) (ts (0 3)) (transient (0 9))) "Hacker News search with Consult" tar ((:url . "https://github.com/agzam/consult-hn") (:commit . "adbb48802a2b000df2340dc0a1b51396c0b0c0c3") (:revdesc . "adbb48802a2b") (:keywords "search" "extensions") (:authors ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainers ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainer "Ag Ibragimov" . "agzam.ibragimov@gmail.com"))])
+ (consult-ls-git . [(20250419 1320) ((emacs (27 1)) (consult (0 16))) "Consult integration for git" tar ((:url . "https://github.com/rcj/consult-ls-git") (:commit . "85882e4b7af9ad40160d985e42b36b0fd6400ead") (:revdesc . "85882e4b7af9") (:keywords "convenience"))])
+ (consult-lsp . [(20260619 643) ((emacs (27 1)) (lsp-mode (5 0)) (consult (1 9)) (f (0 20 0))) "LSP-mode Consult integration" tar ((:url . "https://github.com/gagbo/consult-lsp") (:commit . "f41a3946987a3880068f95f3725bbb7b0d4b0b22") (:revdesc . "f41a3946987a") (:keywords "tools" "completion" "lsp"))])
+ (consult-notes . [(20260731 1506) ((emacs (28 1)) (consult (1 0))) "Manage notes with consult" tar ((:url . "https://codeberg.org/mclear-tools/consult-notes") (:commit . "4a9b7e2990fa9c9be0df482c2342d24bf9ddc32a") (:revdesc . "4a9b7e2990fa") (:keywords "convenience") (:authors ("Colin McLear" . "mclear@fastmail.com")))])
+ (consult-notmuch . [(20250815 1739) ((emacs (28 1)) (consult (2 7)) (notmuch (0 31))) "Notmuch search using consult" tar ((:url . "https://codeberg.org/jao/consult-notmuch") (:commit . "abc0318c9971b4288cc96f6f934ad6d36e63d9f9") (:revdesc . "abc0318c9971") (:keywords "mail") (:authors ("Jose A Ortega Ruiz" . "jao@gnu.org")))])
+ (consult-org-roam . [(20260209 1805) ((emacs (27 1)) (org-roam (2 2 0)) (consult (0 16))) "Consult integration for org-roam" tar ((:url . "https://github.com/jgru/consult-org-roam") (:commit . "781d9c1cfee8631bc125fa45bab92de320d3941e") (:revdesc . "781d9c1cfee8") (:authors ("jgru" . "https://github.com/jgru")) (:maintainers ("jgru" . "https://github.com/jgru")) (:maintainer "jgru" . "https://github.com/jgru"))])
+ (consult-project-extra . [(20260428 2007) ((emacs (28 1)) (consult (0 17)) (project (0 8 1))) "Consult integration for project.el" tar ((:url . "https://github.com/Qkessler/consult-project-extra") (:commit . "52c453b7f85dea90cc53ff8fba750795606415df") (:revdesc . "52c453b7f85d") (:keywords "convenience" "project" "management"))])
+ (consult-projectile . [(20230821 406) ((emacs (25 1)) (consult (0 12)) (projectile (2 5 0))) "Consult integration for projectile" tar ((:url . "https://gitlab.com/OlMon/consult-projectile") (:commit . "400439c56d17bca7888f7d143d8a11f84900a406") (:revdesc . "400439c56d17") (:keywords "convenience"))])
+ (consult-recoll . [(20250205 1712) ((emacs (26 1)) (consult (2 0))) "Recoll queries using consult" tar ((:url . "https://codeberg.org/jao/consult-recoll") (:commit . "eddbc7ba70439881e4781fa73fb0fb240e02fd3b") (:revdesc . "eddbc7ba7043") (:keywords "docs" "convenience") (:authors ("Jose A Ortega Ruiz" . "jao@gnu.org")) (:maintainers ("Jose A Ortega Ruiz" . "jao@gnu.org")) (:maintainer "Jose A Ortega Ruiz" . "jao@gnu.org"))])
+ (consult-spotify . [(20211114 2258) ((emacs (26 1)) (consult (0 8)) (espotify (0 1))) "Spotify queries using consult" tar ((:url . "https://codeberg.org/jao/espotify") (:commit . "5c1dcf0182135cda4191d4ba206fe2f265100293") (:revdesc . "5c1dcf018213") (:keywords "multimedia") (:authors ("Jose A Ortega Ruiz" . "jao@gnu.org")))])
+ (consult-spotlight . [(20260708 2142) ((emacs (28 1)) (consult (2 0))) "Consult interface to macOS mdfind (Spotlight)" tar ((:url . "https://github.com/guibor/consult-spotlight") (:commit . "c6d8cb34e223608708c5424e4d03d04d6d6648f7") (:revdesc . "c6d8cb34e223") (:keywords "matching" "files" "convenience") (:authors ("MDF" . "sguibor@gmail.com")) (:maintainers ("MDF" . "sguibor@gmail.com")) (:maintainer "MDF" . "sguibor@gmail.com"))])
+ (consult-symbol . [(20260321 1545) ((emacs (27 1)) (consult (2 0))) "Consult-based symbol search with narrowing" tar ((:url . "https://github.com/danielfleischer/consult-symbol") (:commit . "61a98d6fb80fbda6b2b90b892c80675f5852adcc") (:revdesc . "61a98d6fb80f") (:keywords "convenience" "matching") (:authors ("Daniel Fleischer" . "danflscr@gmail.com")) (:maintainers ("Daniel Fleischer" . "danflscr@gmail.com")) (:maintainer "Daniel Fleischer" . "danflscr@gmail.com"))])
+ (consult-tex . [(20250306 1724) ((emacs (28 2)) (consult (0 35))) "Consult powered completion for tex" tar ((:url . "https://gitlab.com/titus.pinta/consult-TeX") (:commit . "546e4b16a3f98fa1d4d440acb158b8fa5147a14c") (:revdesc . "546e4b16a3f9") (:keywords "consult" "tex" "latex") (:maintainers ("Titus Pinta" . "titus.pinta@gmail.com")) (:maintainer "Titus Pinta" . "titus.pinta@gmail.com"))])
+ (consult-todo . [(20250417 1903) ((emacs (29 1)) (consult (1 9)) (hl-todo (3 8 2))) "Search hl-todo keywords in consult" tar ((:url . "https://github.com/eki3z/consult-todo") (:commit . "f9ba063a6714cb95ddbd886786ada93771f3c140") (:revdesc . "f9ba063a6714") (:authors ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainers ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainer "Eki Zhang" . "liuyinz95@gmail.com"))])
+ (consult-vc-modified-files . [(20250724 2218) ((emacs (28 1)) (consult (0 9))) "Show git modified files with consult and vc" tar ((:url . "https://github.com/chmouel/consult-vc-modified-files") (:commit . "06837dc61a3b8f38dec0ad62b33293fc50ca03d2") (:revdesc . "06837dc61a3b") (:keywords "vc" "convenience") (:authors ("Chmouel Boudjnah" . "chmouel@chmouel.com")) (:maintainers ("Chmouel Boudjnah" . "chmouel@chmouel.com")) (:maintainer "Chmouel Boudjnah" . "chmouel@chmouel.com"))])
+ (consult-vulpea . [(20260818 19) ((emacs (28 1)) (vulpea (2 0 0)) (consult (2 2))) "Use Consult in tandem with Vulpea" tar ((:url . "https://github.com/fabcontigiani/consult-vulpea") (:commit . "ffb093ee9f1de1e68eaee16dfaf41635ad6bc711") (:revdesc . "ffb093ee9f1d") (:keywords "convenience" "notes" "vulpea") (:authors ("Fabrizio Contigiani" . "fabcontigiani@gmail.com")) (:maintainers ("Fabrizio Contigiani" . "fabcontigiani@gmail.com")) (:maintainer "Fabrizio Contigiani" . "fabcontigiani@gmail.com"))])
+ (consult-yasnippet . [(20260613 1436) ((emacs (27 1)) (yasnippet (0 14)) (consult (0 16))) "A consulting-read interface for yasnippet" tar ((:url . "https://github.com/mohkale/consult-yasnippet") (:commit . "89e39887c87e25d18861216a4d72e5d174f13751") (:revdesc . "89e39887c87e") (:authors ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainers ("mohsin kaleem" . "mohkale@kisara.moe")) (:maintainer "mohsin kaleem" . "mohkale@kisara.moe"))])
+ (context-clues . [(20260719 2046) ((emacs (28 1)) (transient (0 3 0))) "Easily copy context like the current file name and path" tar ((:url . "https://github.com/mrcnski/context-clues") (:commit . "1d873e6fe4c1651e3d47df7fde5932f88dfa2879") (:revdesc . "1d873e6fe4c1") (:keywords "convenience" "tools") (:authors ("Marcin Swieczkowski" . "marcin@realemail.net")) (:maintainers ("Marcin Swieczkowski" . "marcin@realemail.net")) (:maintainer "Marcin Swieczkowski" . "marcin@realemail.net"))])
+ (context-transient . [(20240530 1344) ((emacs (29 1))) "Context specific transients" tar ((:url . "https://github.com/licht1stein/context-transient.el") (:commit . "4461c3a5b8654cb1dacea404f78951172437804f") (:revdesc . "4461c3a5b865") (:authors ("Mykhaylo Bilyanskyy" . "mb@m1k.pw")) (:maintainers ("Mykhaylo Bilyanskyy" . "mb@m1k.pw")) (:maintainer "Mykhaylo Bilyanskyy" . "mb@m1k.pw"))])
+ (contextual . [(20180726 800) ((emacs (24)) (dash (2 12 1)) (cl-lib (0 5))) "Contextual profile management system" tar ((:url . "https://github.com/lshift-de/contextual") (:commit . "7ad2bb36426fd182d4d5ee7fd9be1cc0db8c7a84") (:revdesc . "7ad2bb36426f") (:keywords "convenience" "tools") (:authors ("Alexander Kahl" . "ak@sodosopa.io")) (:maintainers ("Alexander Kahl" . "ak@sodosopa.io")) (:maintainer "Alexander Kahl" . "ak@sodosopa.io"))])
+ (contextual-menubar . [(20180205 709) nil "Display the menubar only on a graphical display" tar ((:url . "https://github.com/aaronjensen/contextual-menubar") (:commit . "f76f55232ac07df76ef9a334a0c527dfab97c40b") (:revdesc . "f76f55232ac0") (:authors ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainers ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainer "Aaron Jensen" . "aaronjensen@gmail.com"))])
+ (contrast-color . [(20160903 1807) ((emacs (24 3)) (cl-lib (0 5))) "Pick best contrast color for you" tar ((:url . "https://github.com/yuutayamada/contrast-color-el") (:commit . "6ff1b807e09ef6a775e4ab1032bb2ea3fc442d9e") (:revdesc . "6ff1b807e09e") (:keywords "color" "convenience") (:authors ("Yuta Yamada" . "cokesboy[at]gmail.com")) (:maintainers ("Yuta Yamada" . "cokesboy[at]gmail.com")) (:maintainer "Yuta Yamada" . "cokesboy[at]gmail.com"))])
+ (control-mode . [(20160624 1710) nil "A \"control\" mode, similar to vim's \"normal\" mode" tar ((:url . "https://github.com/stephendavidmarsh/control-mode") (:commit . "6bf487144119b03f9cc54168f70e3d7d8d84e22b") (:revdesc . "6bf487144119") (:keywords "convenience" "emulations") (:authors ("Stephen Marsh" . "stephen.david.marsh@gmail.com")) (:maintainers ("Stephen Marsh" . "stephen.david.marsh@gmail.com")) (:maintainer "Stephen Marsh" . "stephen.david.marsh@gmail.com"))])
+ (conventional . [(20250630 600) ((emacs (28 1))) "Enable conventional syntax" tar ((:url . "https://github.com/KeyWeeUsr/conventional") (:commit . "d4172953ddb8239108014ee82164892f08371b3b") (:revdesc . "d4172953ddb8") (:keywords "convenience" "conventional" "mode" "helper" "git" "comment" "commit") (:authors ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainers ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainer "Peter Badida" . "keyweeusr@gmail.com"))])
+ (cool-mode . [(20231026 456) ((emacs (25))) "Major mode for cool compiler language" tar ((:url . "https://github.com/nverno/cool-mode") (:commit . "46b6a38a99a954c5e77e90506eafec4092690692") (:revdesc . "46b6a38a99a9") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (copilot . [(20260707 516) ((emacs (27 2)) (editorconfig (0 8 2)) (jsonrpc (1 0 14)) (compat (30)) (track-changes (1 4))) "An Emacs plugin for GitHub Copilot" tar ((:url . "https://github.com/copilot-emacs/copilot.el") (:commit . "277ca357422ba34bcf7fe650cb720580994eea84") (:revdesc . "277ca357422b") (:keywords "convenience" "copilot") (:authors ("zerol" . "z@zerol.me")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (copilot-chat . [(20260401 836) ((emacs (30 1)) (aio (1 0)) (request (0 3 2)) (transient (0 8 3)) (polymode (0 2 2)) (org (9 4 6)) (markdown-mode (2 6)) (shell-maker (0 76 2)) (mcp (0 1 0))) "Copilot chat interface" tar ((:url . "https://github.com/chep/copilot-chat.el") (:commit . "444c7a5114ba483c3c37fb95ea2888c5539fc9c8") (:revdesc . "444c7a5114ba") (:keywords "convenience" "tools") (:authors ("cedric.chepied" . "cedric.chepied@gmail.com")) (:maintainers ("cedric.chepied" . "cedric.chepied@gmail.com")) (:maintainer "cedric.chepied" . "cedric.chepied@gmail.com"))])
+ (copy-as-format . [(20231112 1710) ((cl-lib (0 5))) "Copy buffer locations as GitHub/Slack/JIRA etc... formatted code" tar ((:url . "https://github.com/sshaw/copy-as-format") (:commit . "b9f6f725ca9701c5a02bfb479573fdfcce2e1e30") (:revdesc . "b9f6f725ca97") (:keywords "github" "slack" "jira" "telegram" "gitlab" "bitbucket" "org-mode" "pod" "rst" "asciidoc" "whatsapp" "tools" "convenience") (:authors ("Skye Shaw" . "skye.shaw@gmail.com")) (:maintainers ("Skye Shaw" . "skye.shaw@gmail.com")) (:maintainer "Skye Shaw" . "skye.shaw@gmail.com"))])
+ (copy-file-on-save . [(20260728 802) ((emacs (24 3)) (compat (29))) "Copy file on save, automatic deployment it" tar ((:url . "https://github.com/emacs-php/emacs-auto-deployment") (:commit . "5c9b80897ecaad2c4f47a2a473b88c25ee7885e2") (:revdesc . "5c9b80897eca") (:keywords "files" "comm" "deploy") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (copyit . [(20241030 543) ((emacs (24 3)) (s (1 9 0))) "Copy it, yank anything!" tar ((:url . "https://github.com/zonuexe/emacs-copyit") (:commit . "09556ba8407dc2b132b7f76cd1b458c0773a1fe8") (:revdesc . "09556ba8407d") (:keywords "convenience" "yank" "clipboard") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (copyit-pandoc . [(20190919 1258) ((emacs (24 3)) (copyit (0 1 0)) (pandoc (0 0 1))) "Copy it, yank anything!" tar ((:url . "https://github.com/zonuexe/emacs-copyit") (:commit . "c4f2c28e5b6270e8e3364341619f1154bb4e682e") (:revdesc . "c4f2c28e5b62") (:keywords "convenience" "yank" "clipboard") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (coq-commenter . [(20170822 2309) ((dash (2 13 0)) (s (1 11 0)) (cl-lib (0 5))) "Coq commenting minor mode for proof" tar ((:url . "https://github.com/ailrun/coq-commenter") (:commit . "7fe9a2cc0ebdb0b1e54a24eb7971d757fb588ac3") (:revdesc . "7fe9a2cc0ebd") (:keywords "comment" "coq" "proof") (:authors ("Junyoung Clare Jang" . "jjc9310@gmail.com")) (:maintainers ("Junyoung Clare Jang" . "jjc9310@gmail.com")) (:maintainer "Junyoung Clare Jang" . "jjc9310@gmail.com"))])
+ (corfu . [(20260821 1158) ((emacs (29 1)) (compat (31))) "COmpletion in Region FUnction" tar ((:url . "https://github.com/minad/corfu") (:commit . "75be36fe63e78c63ac71c32039ab07836bd532ac") (:revdesc . "75be36fe63e7") (:keywords "abbrev" "convenience" "matching" "completion" "text") (:authors ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (corfu-candidate-overlay . [(20240322 1814) ((emacs (28 1)) (corfu (0 36))) "Show first candidate in an overlay while typing" tar ((:url . "https://code.bsdgeek.org/adam/corfu-candidate-overlay/") (:commit . "f730de2c150720ee70d4d7be4b8bb533c7dfc97e") (:revdesc . "f730de2c1507") (:authors ("Adam Kruszewski" . "adam@kruszewski.name")) (:maintainers ("Adam Kruszewski" . "adam@kruszewski.name")) (:maintainer "Adam Kruszewski" . "adam@kruszewski.name"))])
+ (corfu-prescient . [(20260628 2243) ((emacs (27 1)) (prescient (6 1 0)) (corfu (1 1))) "Prescient.el + Corfu" tar ((:url . "https://github.com/radian-software/prescient.el") (:commit . "5649977fa7789e4615efeca09397ed7eccd06dfc") (:revdesc . "5649977fa778") (:keywords "extensions") (:authors ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainers ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainer "Radian LLC" . "contact+prescient@radian.codes"))])
+ (corg . [(20260406 1951) ((emacs (27 1)) (s (1 13 1)) (compat (30))) "Header completion for org-mode" tar ((:url . "https://github.com/isamert/corg.el") (:commit . "0eeb4255b0c47a1e3c46513ae3fa2ffe749400b8") (:revdesc . "0eeb4255b0c4") (:keywords "abbrev" "convenience" "completion" "matching") (:authors ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainers ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainer "Isa Mert Gurbuz" . "isamertgurbuz@gmail.com"))])
+ (corral . [(20160502 948) nil "Quickly surround text with delimiters" tar ((:url . "https://github.com/nivekuil/corral") (:commit . "e7ab6aa118e46b93d4933d1364bc273f57cd6911") (:revdesc . "e7ab6aa118e4") (:authors ("Kevin Liu" . "mail@nivekuil.com")) (:maintainers ("Kevin Liu" . "mail@nivekuil.com")) (:maintainer "Kevin Liu" . "mail@nivekuil.com"))])
+ (corsair . [(20260505 1402) ((emacs (28 1)) (gptel (0 9 0))) "Text accumulation enhancements for GPTel" tar ((:url . "https://github.com/rob137/Corsair") (:commit . "412285e1feeba9c6e0e3a103d64396cef1e73d51") (:revdesc . "412285e1feeb") (:keywords "convenience" "tools") (:authors ("Robert Kirby" . "corsair.el.package@gmail.com")) (:maintainers ("Robert Kirby" . "corsair.el.package@gmail.com")) (:maintainer "Robert Kirby" . "corsair.el.package@gmail.com"))])
+ (cort . [(20260516 827) ((emacs (24 1)) (ansi (0 4 1)) (cl-lib (0 7 1))) "Simplify extended unit test framework" tar ((:url . "https://github.com/conao3/cort.el") (:commit . "851a8669f14a1cfc3b0f9d6bf046139cb5bb7470") (:revdesc . "851a8669f14a") (:keywords "test" "lisp") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (cosmo . [(20170922 744) ((emacs (24 4))) "Cosmological Calculator" tar ((:url . "https://gitlab.com/montanari/cosmo-el") (:commit . "dd83b09a49a2843606b28279b674b2207040b36b") (:revdesc . "dd83b09a49a2") (:keywords "tools") (:authors ("Francesco Montanari" . "fmnt@fmnt.info")) (:maintainers ("Francesco Montanari" . "fmnt@fmnt.info")) (:maintainer "Francesco Montanari" . "fmnt@fmnt.info"))])
+ (counsel . [(20260214 1004) ((emacs (24 5)) (ivy (0 15 1)) (swiper (0 15 1))) "Various completion functions using Ivy" tar ((:url . "https://github.com/abo-abo/swiper") (:commit . "ee79f68215ae7e2b8a38ba6bf7f82b3fe57dc16c") (:revdesc . "ee79f68215ae") (:keywords "convenience" "matching" "tools") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Basil L. Contovounesios" . "basil@contovou.net")) (:maintainer "Basil L. Contovounesios" . "basil@contovou.net"))])
+ (counsel-ag-popup . [(20210121 805) ((emacs (26 1)) (counsel (0 13 0)) (transient (0 3 0))) "Interactive search with counsel-ag" tar ((:url . "https://github.com/gexplorer/counsel-ag-popup") (:commit . "41d85fe36edd72da68f5009ad9cf9013cd19960d") (:revdesc . "41d85fe36edd") (:keywords "convenience" "matching" "tools") (:authors ("Eder Elorriaga" . "gexplorer8@gmail.com")) (:maintainers ("Eder Elorriaga" . "gexplorer8@gmail.com")) (:maintainer "Eder Elorriaga" . "gexplorer8@gmail.com"))])
+ (counsel-at-point . [(20251230 1124) ((emacs (29 1)) (counsel (0 13 0))) "Context-sensitive project search" tar ((:url . "https://codeberg.org/ideasman42/emacs-counsel-at-point") (:commit . "720347962085ed4f0efe5db797882cf3f35ad68c") (:revdesc . "720347962085") (:keywords "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (counsel-bbdb . [(20220909 727) ((emacs (24 3)) (bbdb (3 2 2 2))) "Quick search&input email from BBDB based on Emacs API `completing-read'" tar ((:url . "https://github.com/redguard/counsel-bbdb") (:commit . "ccae56b0551abb305cad087d85f1b6a97adb7c0f") (:revdesc . "ccae56b0551a") (:keywords "mail" "abbrev" "convenience" "matching") (:authors ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainers ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainer "Chen Bin" . "chenbin.sh@gmail.com"))])
+ (counsel-chrome-bm . [(20211022 1427) ((emacs (25 1)) (counsel (0 13 0))) "Browse Chrom(e/ium) bookmarks with Ivy" tar ((:url . "https://github.com/BlueBoxWare/counsel-chrome-bm") (:commit . "3321bf78231e443cb98520dbb30a6c49e004c6a7") (:revdesc . "3321bf78231e") (:keywords "hypermedia") (:authors ("BlueBoxWare" . "(BlueBoxWare@users.noreply.github.com)")) (:maintainers ("BlueBoxWare" . "(BlueBoxWare@users.noreply.github.com)")) (:maintainer "BlueBoxWare" . "(BlueBoxWare@users.noreply.github.com)"))])
+ (counsel-codesearch . [(20180925 803) ((codesearch (1)) (counsel (0 10 0)) (emacs (24)) (ivy (0 10 0))) "Counsel interface for codesearch.el" tar ((:url . "https://github.com/abingham/emacs-counsel-codesearch") (:commit . "b7989fad3e06f301c31d5e896c42b6cc549a0e0c") (:revdesc . "b7989fad3e06") (:keywords "tools") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (counsel-css . [(20211115 1755) ((emacs (24 4)) (counsel (0 7 0)) (cl-lib (0 5))) "Stylesheet-selector-aware swiper" tar ((:url . "https://github.com/hlissner/emacs-counsel-css") (:commit . "8e9c0515fc952452eee786d8ebb43d48ea86c9f8") (:revdesc . "8e9c0515fc95") (:keywords "convenience" "tools" "counsel" "swiper" "selector" "css" "less" "scss") (:authors ("Henrik Lissner" . "http://github/hlissner")) (:maintainers ("Henrik Lissner" . "contact@henrik.io")) (:maintainer "Henrik Lissner" . "contact@henrik.io"))])
+ (counsel-dash . [(20221217 419) ((emacs (24 4)) (dash-docs (1 4 0)) (counsel (0 8 0)) (cl-lib (0 5))) "Browse dash docsets using Ivy" tar ((:url . "https://github.com/nathankot/counsel-dash") (:commit . "04117bffc8badd85c9f4fdb17648fd56e83fe832") (:revdesc . "04117bffc8ba") (:keywords "dash" "ivy" "counsel") (:authors ("Nathan Kot" . "nk@nathankot.com")) (:maintainers ("Nathan Kot" . "nk@nathankot.com")) (:maintainer "Nathan Kot" . "nk@nathankot.com"))])
+ (counsel-edit-mode . [(20230411 1740) ((emacs (26 1)) (ht (2 3)) (s (1 12 0)) (counsel (0 10 0))) "Edit results of counsel commands in-place" tar ((:url . "https://github.com/tyler-dodge/counsel-edit-mode") (:commit . "8ff508a864d0fe4cac32c6868420df2ad77f041b") (:revdesc . "8ff508a864d0") (:keywords "convenience" "matching"))])
+ (counsel-etags . [(20260513 1048) ((emacs (28 1)) (counsel (0 15 1))) "Fast and complete Ctags solution using ivy" tar ((:url . "https://github.com/redguardtoo/counsel-etags") (:commit . "d9ed92310da368d8d037e151b8dcbb7ada55d42c") (:revdesc . "d9ed92310da3") (:keywords "tools" "convenience"))])
+ (counsel-fd . [(20221011 1853) ((counsel (0 12 0))) "Counsel interface for fd" tar ((:url . "https://github.com/CsBigDataHub/counsel-fd") (:commit . "7c1e413e4ce44df2232c19ebe3357ac8ec33cb3b") (:revdesc . "7c1e413e4ce4") (:keywords "tools"))])
+ (counsel-ffdata . [(20191017 1237) ((emacs (25 1)) (counsel (0 11 0)) (emacsql (3 0 0))) "Use ivy to access firefox data" tar ((:url . "https://github.com/cireu/counsel-ffdata") (:commit . "913cb1b8cd5e4ca2ba6613eab56d52040e08a0a5") (:revdesc . "913cb1b8cd5e") (:keywords "convenience" "tools" "matching") (:authors ("Zhu Zihao" . "all_but_last@163.com")) (:maintainers ("Zhu Zihao" . "all_but_last@163.com")) (:maintainer "Zhu Zihao" . "all_but_last@163.com"))])
+ (counsel-gtags . [(20210222 1803) ((emacs (25 1)) (counsel (0 8 0)) (seq (1 0))) "Ivy for GNU global" tar ((:url . "https://github.com/FelipeLema/emacs-counsel-gtags") (:commit . "1d52eaeffeb60266434d4f7416a108ca058fde91") (:revdesc . "1d52eaeffeb6") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com") ("Felipe Lema" . "felipelema@mortemale.org") ("Jimmy Aguilar Mena" . "spacibba@aol.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com") ("Felipe Lema" . "felipelema@mortemale.org") ("Jimmy Aguilar Mena" . "spacibba@aol.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (counsel-jq . [(20210329 749) ((swiper (0 12 0)) (ivy (0 12 0)) (emacs (24 1))) "Live preview of \"jq\" queries using counsel" tar ((:url . "https://github.com/200ok-ch/counsel-jq") (:commit . "8cadd2e96470402ede4881b4e955872976443689") (:revdesc . "8cadd2e96470") (:keywords "convenience" "data" "matching") (:authors ("Alain M. Lafon" . "alain@200ok.ch")) (:maintainers ("Alain M. Lafon" . "alain@200ok.ch")) (:maintainer "Alain M. Lafon" . "alain@200ok.ch"))])
+ (counsel-mairix . [(20210422 649) ((emacs (26 3)) (ivy (0 13 1))) "Counsel interface for Mairix" tar ((:url . "https://sr.ht/~ane/counsel-mairix") (:commit . "39fa2ad10a5f899cb3f3275f9a6ebd166c51216a") (:revdesc . "39fa2ad10a5f") (:keywords "mail") (:authors ("Antoine Kalmbach" . "ane@iki.fi")) (:maintainers ("Antoine Kalmbach" . "ane@iki.fi")) (:maintainer "Antoine Kalmbach" . "ane@iki.fi"))])
+ (counsel-notmuch . [(20181203 935) ((emacs (24)) (ivy (0 10 0)) (notmuch (0 21)) (s (1 12 0))) "Search emails in Notmuch asynchronously with Ivy" tar ((:url . "https://github.com/fuxialexander/counsel-notmuch") (:commit . "a4a1562935e4180c42524c51609d1283e9be0688") (:revdesc . "a4a1562935e4") (:keywords "mail") (:authors ("Alexander Fu Xi" . "fuxialexander@gmail.com")) (:maintainers ("Alexander Fu Xi" . "fuxialexander@gmail.com")) (:maintainer "Alexander Fu Xi" . "fuxialexander@gmail.com"))])
+ (counsel-org-capture-string . [(20200810 1114) ((emacs (25 1)) (ivy (0 13))) "Counsel for org-capture-string" tar ((:url . "https://github.com/akirak/counsel-org-capture-string") (:commit . "f47de69458c9fceeecd7c69264f645c0cfeb2cd2") (:revdesc . "f47de69458c9") (:keywords "outlines") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (counsel-org-clock . [(20200810 1109) ((emacs (25 1)) (ivy (0 10 0)) (dash (2 0))) "Counsel commands for org-clock" tar ((:url . "https://github.com/akirak/counsel-org-clock") (:commit . "a32bb85205e877cc57f62765c225e8b288536918") (:revdesc . "a32bb85205e8") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (counsel-osx-app . [(20160821 809) ((ivy (0 8 0)) (emacs (24 3))) "Launch osx applications via ivy interface" tar ((:url . "https://github.com/d12frosted/counsel-osx-app") (:commit . "5cc93ec684f837dc31ce20e7625407f2c0445691") (:revdesc . "5cc93ec684f8") (:authors ("Boris Buliga" . "d12frosted@gmail.com")) (:maintainers ("Boris Buliga" . "d12frosted@gmail.com")) (:maintainer "Boris Buliga" . "d12frosted@gmail.com"))])
+ (counsel-projectile . [(20211004 2003) ((counsel (0 13 4)) (projectile (2 5 0))) "Ivy integration for Projectile" tar ((:url . "https://github.com/ericdanan/counsel-projectile") (:commit . "e30150792a96968f55f34638cbfe63eaa30839cc") (:revdesc . "e30150792a96") (:keywords "project" "convenience"))])
+ (counsel-pydoc . [(20171018 2042) ((emacs (24 3)) (ivy (0 9 1))) "Run pydoc with counsel" tar ((:url . "https://github.com/co-dh/pydoc_utils") (:commit . "08a4a1020da3d06604156303024c8a5e31ec36e4") (:revdesc . "08a4a1020da3") (:keywords "completion" "matching") (:authors ("Hao" . "Deng(denghao8888@gmail.com)")) (:maintainers ("Hao" . "Deng(denghao8888@gmail.com)")) (:maintainer "Hao" . "Deng(denghao8888@gmail.com)"))])
+ (counsel-spotify . [(20200818 2055) ((emacs (25 1)) (ivy (0 13 0))) "Control Spotify search and select music with Ivy" tar ((:url . "https://github.com/Lautaro-Garcia/counsel-spotify") (:commit . "2743ad52a9def53534fd505397fbe1ac49e53015") (:revdesc . "2743ad52a9de") (:authors ("Lautaro García" . "https://github.com/Lautaro-Garcia")) (:maintainers ("Lautaro García" . "https://github.com/Lautaro-Garcia")) (:maintainer "Lautaro García" . "https://github.com/Lautaro-Garcia"))])
+ (counsel-test . [(20190819 1920) ((emacs (25 1)) (ivy (0 11 0)) (s (1 12 0))) "Browse and execute tests with ivy" tar ((:url . "https://github.com/xmagpie/counsel-test") (:commit . "f0ea446def59a3a8ca40e868fe9d82de268b2abe") (:revdesc . "f0ea446def59") (:keywords "tools" "ivy" "counsel" "testing" "ctest" "pytest") (:authors ("Konstantin Sorokin" . "sorokin.kc@gmail.com")) (:maintainers ("Konstantin Sorokin" . "sorokin.kc@gmail.com")) (:maintainer "Konstantin Sorokin" . "sorokin.kc@gmail.com"))])
+ (counsel-toki . [(20230705 1638) ((request (0 3 3)) (emacs (25 1)) (ivy (0 14 0))) "Counsel support for toki pona dictionary lookup" tar ((:url . "https://github.com/emiflake/counsel-toki") (:commit . "545aa4413ba8ce6a92d11d42e910a57a8cb58e2e") (:revdesc . "545aa4413ba8") (:authors ("Emily Martins" . "emi@haskell.fyi")) (:maintainers ("Emily Martins" . "emi@haskell.fyi")) (:maintainer "Emily Martins" . "emi@haskell.fyi"))])
+ (counsel-tramp . [(20230714 936) ((emacs (24 3)) (counsel (0 10))) "Tramp ivy interface for ssh, docker, vagrant" tar ((:url . "https://github.com/masasam/emacs-counsel-tramp") (:commit . "70dcc6b9da5e76fefbc92646e7d780b2a06ca93f") (:revdesc . "70dcc6b9da5e"))])
+ (counsel-web . [(20210609 2156) ((emacs (25 1)) (counsel (0 13 0)) (request (0 3 0))) "Search the Web using Ivy" tar ((:url . "https://github.com/mnewt/counsel-web") (:commit . "1359b3b204fcdac7a3d6664c7d540a88b5acecfd") (:revdesc . "1359b3b204fc") (:keywords "convenience" "hypermedia") (:authors ("Matthew Sojourner Newton" . "matt@mnewton.com")) (:maintainers ("Matthew Sojourner Newton" . "matt@mnewton.com")) (:maintainer "Matthew Sojourner Newton" . "matt@mnewton.com"))])
+ (counsel-world-clock . [(20190709 2211) ((ivy (0 9 0)) (s (1 12 0))) "Display world clock using Ivy" tar ((:url . "https://github.com/kchenphy/counsel-world-clock") (:commit . "674e4c6b82a92ea765af97cc5f017b357284c7dc") (:revdesc . "674e4c6b82a9") (:authors ("Kuang Chen" . "http://github.com/kchenphy")) (:maintainers ("Kuang Chen" . "http://github.com/kchenphy")) (:maintainer "Kuang Chen" . "http://github.com/kchenphy"))])
+ (countdown . [(20190626 244) ((emacs (25 1)) (stream (2 2 4))) "Countdown using big LCD-like digits" tar ((:url . "https://github.com/xuchunyang/countdown.el") (:commit . "139dea91fc818d65944aca5f16c9626abbdfbf04") (:revdesc . "139dea91fc81") (:keywords "tools") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (countdown-modeline . [(20260808 1211) ((emacs (27 1))) "Display a color-coded countdown in the modeline" tar ((:url . "https://github.com/jholland82/countdown-modeline") (:commit . "a07cf0b1d0e71cca21255a599a91c28d7e8ed2d8") (:revdesc . "a07cf0b1d0e7") (:keywords "convenience" "modeline") (:authors ("Jeffrey Holland" . "jeff.holland@gmail.com")) (:maintainers ("Jeffrey Holland" . "jeff.holland@gmail.com")) (:maintainer "Jeffrey Holland" . "jeff.holland@gmail.com"))])
+ (cov . [(20250126 2333) ((emacs (24 4)) (f (0 18 2)) (s (1 11 0)) (elquery (0))) "Show coverage stats in the fringe" tar ((:url . "https://github.com/AdamNiederer/cov") (:commit . "7a3599e42d4fe943b912701e04beffcf2ec812d2") (:revdesc . "7a3599e42d4f") (:keywords "coverage" "gcov" "c" "lcov" "coveralls" "clover"))])
+ (coverage . [(20191113 1958) ((ov (1 0)) (cl-lib (0 5))) "Code coverage line highlighting" tar ((:url . "https://github.com/trezona-lecomte/coverage") (:commit . "6e3c6f2dcb759a76086adeeb1fdfe83e4f082482") (:revdesc . "6e3c6f2dcb75") (:keywords "coverage" "metrics" "simplecov" "ruby" "rspec") (:authors ("Kieran Trezona-le Comte" . "trezona.lecomte@gmail.com")) (:maintainers ("Kieran Trezona-le Comte" . "trezona.lecomte@gmail.com")) (:maintainer "Kieran Trezona-le Comte" . "trezona.lecomte@gmail.com"))])
+ (coverlay . [(20190414 940) ((emacs (24 1)) (cl-lib (0 5))) "Test coverage overlays" tar ((:url . "https://github.com/twada/coverlay.el") (:commit . "0beae208d0e7d746a94385428bd61aa5cd7ea828") (:revdesc . "0beae208d0e7") (:keywords "coverage" "overlay") (:authors ("Takuto Wada" . "takuto.wadaatgmailcom")) (:maintainers ("Takuto Wada" . "takuto.wadaatgmailcom")) (:maintainer "Takuto Wada" . "takuto.wadaatgmailcom"))])
+ (cowsay . [(20210510 1540) ((emacs (24 5))) "Poorly drawn ASCII cartoons saying things" tar ((:url . "https://github.com/lassik/emacs-cowsay") (:commit . "d8a72a311c6875f1aef6a30b3d23a1b02df75941") (:revdesc . "d8a72a311c68") (:keywords "games") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (cp5022x . [(20120323 2335) nil "Cp50220, cp50221, cp50222 coding system" tar ((:url . "https://github.com/awasira/cp5022x.el") (:commit . "ea7327dd75e54539576916f592ae1be98179ae35") (:revdesc . "ea7327dd75e5") (:keywords "languages" "cp50220" "cp50221" "cp50222" "cp51932" "cp932") (:authors ("ARISAWA Akihiro" . "ari@mbf.ocn.ne.jp")) (:maintainers ("ARISAWA Akihiro" . "ari@mbf.ocn.ne.jp")) (:maintainer "ARISAWA Akihiro" . "ari@mbf.ocn.ne.jp"))])
+ (cpanfile-mode . [(20161001 710) ((emacs (24 4))) "Major mode for cpanfiles" tar ((:url . "https://github.com/zakame/cpanfile-mode") (:commit . "b09908b4342b3aa97940159dbe91ac074ec98e0b") (:revdesc . "b09908b4342b") (:keywords "perl") (:authors ("Zak B. Elep" . "zakame@zakame.net")) (:maintainers ("Zak B. Elep" . "zakame@zakame.net")) (:maintainer "Zak B. Elep" . "zakame@zakame.net"))])
+ (cpp-auto-include . [(20210318 2217) ((cl-lib (0 5))) "Insert and delete C++ header files automatically" tar ((:url . "https://github.com/emacsorphanage/cpp-auto-include") (:commit . "0ce829f27d466c083e78b9fe210dcfa61fb417f4") (:revdesc . "0ce829f27d46") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (cppinsights . [(20260628 722) ((emacs (28 1))) "Integration with cppinsights tool" tar ((:url . "https://github.com/ignity21/cppinsights.el") (:commit . "552d959a7313e746b2a343991bffb9c2271dba47") (:revdesc . "552d959a7313") (:keywords "c++" "tools" "cppinsights") (:authors ("Chris Chen" . "chrischen@ignity.xyz")) (:maintainers ("Chris Chen" . "chrischen@ignity.xyz")) (:maintainer "Chris Chen" . "chrischen@ignity.xyz"))])
+ (cpputils-cmake . [(20181006 328) nil "Easy realtime C++ syntax check and IntelliSense with CMake" tar ((:url . "https://github.com/redguardtoo/cpputils-cmake") (:commit . "64b2b05eff5398b4cd522e66efaf14553ab18ff4") (:revdesc . "64b2b05eff53") (:keywords "cmake" "intellisense" "flymake" "flycheck") (:authors ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainers ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainer "Chen Bin" . "chenbin.sh@gmail.com"))])
+ (cpu-sos . [(20200409 2356) ((emacs (25 1))) "S.O.S. from a CPU in distress" tar ((:url . "https://github.com/oitofelix/cpu-sos") (:commit . "1594b76d4ad3a6e3c471d82da366226d156e6226") (:revdesc . "1594b76d4ad3") (:keywords "processes") (:authors ("Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org")) (:maintainers ("Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org")) (:maintainer "Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org"))])
+ (cql-mode . [(20190315 225) ((emacs (24))) "Major mode for editting CQLs" tar ((:url . "https://github.com/Yuki-Inoue/cql-mode") (:commit . "d400c046850d3cf404778b2c47d6be4ff84ca04b") (:revdesc . "d400c046850d") (:keywords "cql" "cassandra") (:authors ("Yuki Inoue" . "inouetakahirokiatgmail.com")) (:maintainers ("Yuki Inoue" . "inouetakahirokiatgmail.com")) (:maintainer "Yuki Inoue" . "inouetakahirokiatgmail.com"))])
+ (cquery . [(20190118 542) ((emacs (25 1)) (lsp-mode (3 4)) (dash (0 13))) "Cquery client for lsp-mode" tar ((:url . "https://github.com/jacobdufault/cquery") (:commit . "555e50984ebda177421fdcdc8c76cb29235d9694") (:revdesc . "555e50984ebd") (:keywords "languages" "lsp" "c++"))])
+ (crappy-jsp-mode . [(20140311 931) nil "A pretty crappy major-mode for jsp" tar ((:url . "https://github.com/magnars/crappy-jsp-mode") (:commit . "6c45ab92b452411cc0fab9bcee2f456276b4fc40") (:revdesc . "6c45ab92b452") (:keywords "jsp" "major" "mode") (:authors ("Magnar Sveen" . "magnars@gmail.com") ("Jostein Holje" . "jostein.holje@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com") ("Jostein Holje" . "jostein.holje@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (crc . [(20250303 119) ((emacs (25 1))) "Cyclic Redundancy Check" tar ((:url . "https://codeberg.org/tomenzgg/Emacs-CRC") (:commit . "568bd5e0fddfbf430c295da33a17f6ed99484188") (:revdesc . "568bd5e0fddf") (:keywords "lisp" "checksum" "algorithms") (:authors ("Jean Libète" . "tomenzgg@mail.mayfirst.org")) (:maintainers ("Jean Libète" . "tomenzgg@mail.mayfirst.org")) (:maintainer "Jean Libète" . "tomenzgg@mail.mayfirst.org"))])
+ (creamsody-theme . [(20250724 52) ((autothemer (0 2)) (emacs (24))) "Straight from the soda fountain" tar ((:url . "https://github.com/emacsfodder/emacs-theme-creamsody") (:commit . "98d55dcb2480889dee416c9fa0c6baf8c6af9844") (:revdesc . "98d55dcb2480") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (creamy-theme . [(20260130 917) ((emacs (24 1))) "A simple creamy theme" tar ((:url . "https://github.com/smallwat3r/emacs-creamy-theme") (:commit . "d16902a91c28d616d01bb7bcfd7c6248415f5860") (:revdesc . "d16902a91c28"))])
+ (create-link . [(20220621 1440) ((emacs (25 1))) "Smart format link generator" tar ((:url . "https://github.com/kijimaD/create-link") (:commit . "276fafcc6fb568ede256c8d459c3beb408ad9b46") (:revdesc . "276fafcc6fb5") (:keywords "link" "format" "browser" "convenience") (:authors ("Kijima Daigo" . "norimaking777@gmail.com")) (:maintainers ("Kijima Daigo" . "norimaking777@gmail.com")) (:maintainer "Kijima Daigo" . "norimaking777@gmail.com"))])
+ (creds . [(20140510 1706) ((s (1 9 0)) (dash (2 5 0))) "A parser credentials file library (not limited to credentials entries)" tar ((:url . "https://github.com/ardumont/emacs-creds") (:commit . "00ebefd10005c170b790a01380cb6a98f798ce5c") (:revdesc . "00ebefd10005") (:keywords "credentials") (:authors ("Antoine R. Dumont" . "eniotna.tATgmail.com")) (:maintainers ("Antoine R. Dumont" . "eniotna.tATgmail.com")) (:maintainer "Antoine R. Dumont" . "eniotna.tATgmail.com"))])
+ (creole . [(20140924 1500) ((noflet (0 0 3)) (kv (0 0 17))) "A parser for the Creole Wiki language" tar ((:url . "https://github.com/nicferrier/elwikicreole") (:commit . "7d5cffe93857f6c75ca09ac79c0e47b8d4410e53") (:revdesc . "7d5cffe93857") (:keywords "lisp" "creole" "wiki") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (creole-mode . [(20130722 50) nil "A markup mode for creole" tar ((:url . "https://github.com/nicferrier/creole-mode") (:commit . "b5e79b2ec5f19fb5aacf689b5febc3e0b61515c4") (:revdesc . "b5e79b2ec5f1") (:keywords "hypermedia" "wp") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (cricbuzz . [(20180804 2254) ((enlive (0 0 1)) (f (0 19 0)) (dash (2 13 0)) (s (1 11 0))) "Cricket scores from cricbuzz in emacs" tar ((:url . "https://github.com/lepisma/cricbuzz.el") (:commit . "0b95d45991bbcd2fa58d96ce921f6a57ba42c153") (:revdesc . "0b95d45991bb") (:keywords "cricket" "score") (:authors ("Abhinav Tushar" . "abhinav.tushar.vs@gmail.com")) (:maintainers ("Abhinav Tushar" . "abhinav.tushar.vs@gmail.com")) (:maintainer "Abhinav Tushar" . "abhinav.tushar.vs@gmail.com"))])
+ (crm-custom . [(20160117 6) ((cl-lib (0 5))) "Alternate `completing-read-multiple' that uses `completing-read'" tar ((:url . "https://github.com/DarwinAwardWinner/crm-custom") (:commit . "f1aaccf64306a5f99d9bf7ba815d7ea41c15518d") (:revdesc . "f1aaccf64306") (:keywords "completion" "minibuffer" "multiple elements") (:authors ("Ryan C. Thompson" . "rct@thompsonclan.org")) (:maintainers ("Ryan C. Thompson" . "rct@thompsonclan.org")) (:maintainer "Ryan C. Thompson" . "rct@thompsonclan.org"))])
+ (crontab-mode . [(20210715 133) ((emacs (24 3))) "Major mode for crontab(5)" tar ((:url . "https://github.com/emacs-pe/crontab-mode") (:commit . "7412f3df0958812bfcacd5875a409fa795fa8ecc") (:revdesc . "7412f3df0958") (:keywords "languages") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (crossword . [(20210614 633) ((emacs (26 1))) "Download and play crossword puzzles" tar ((:url . "https://github.com/Boruch-Baum/emacs-crossword") (:commit . "e462de8ef15d1f979207a95b224e68d7feead92f") (:revdesc . "e462de8ef15d") (:keywords "games"))])
+ (crux . [(20260315 622) ((emacs (26 1))) "A Collection of Ridiculously Useful eXtensions" tar ((:url . "https://github.com/bbatsov/crux") (:commit . "69e03917f6fd35e25b9a9dfd02df8ff3643f9227") (:revdesc . "69e03917f6fd") (:keywords "convenience") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (cryptol-mode . [(20190531 2051) nil "Cryptol major mode for Emacs" tar ((:url . "https://github.com/thoughtpolice/cryptol-mode") (:commit . "81ebbde83f7cb75b2dfaefc09de6a1703068c769") (:revdesc . "81ebbde83f7c") (:keywords "cryptol" "cryptography") (:authors ("Austin Seipp" . "aseipp[@at]pobox[dot]com")) (:maintainers ("Austin Seipp" . "aseipp[@at]pobox[dot]com")) (:maintainer "Austin Seipp" . "aseipp[@at]pobox[dot]com"))])
+ (crystal-mode . [(20260607 2043) ((emacs (24 4))) "Major mode for editing Crystal files" tar ((:url . "https://github.com/crystal-lang-tools/emacs-crystal-mode") (:commit . "f3b01df0bbe58852d0d7242bf5c0495931bb6fa6") (:revdesc . "f3b01df0bbe5") (:keywords "languages" "crystal"))])
+ (crystal-playground . [(20251026 2240) ((emacs (25)) (crystal-mode (0 1 2))) "Local crystal playground for short code snippets" tar ((:url . "https://github.com/jasonrobot/crystal-playground") (:commit . "9920cab99b02c6da70dfe1c3325146d062c14288") (:revdesc . "9920cab99b02") (:keywords "tools" "crystal"))])
+ (crystal-point . [(20250915 1107) ((emacs (24 4))) "Dynamic cursor color matching face at point" tar ((:url . "https://github.com/laluxx/crystal-point") (:commit . "bd7b9aca2f6153dd7d4bf3c74e4d138c77dcc748") (:revdesc . "bd7b9aca2f61") (:keywords "convenience" "cursor" "faces"))])
+ (csgo-conf-mode . [(20161209 1619) nil "CS:GO Configuration files syntax highlighting" tar ((:url . "https://github.com/wynro/emacs-csgo-conf-mode") (:commit . "df45ca833eb68c394dd03acce5733a33c3b06bf8") (:revdesc . "df45ca833eb6") (:keywords "languages") (:authors ("Guillermo Robles" . "guillerobles1995@gmail.com")) (:maintainers ("Guillermo Robles" . "guillerobles1995@gmail.com")) (:maintainer "Guillermo Robles" . "guillerobles1995@gmail.com"))])
+ (csharp-mode . [(20221126 2005) ((emacs (26 1))) "C# mode derived mode" tar ((:url . "https://github.com/emacs-csharp/csharp-mode") (:commit . "d8b058c9e9d0429ea7e81d121ce19b064bd7e0f5") (:revdesc . "d8b058c9e9d0") (:keywords "c#" "languages" "oop" "mode") (:authors ("Theodor Thornhill" . "theo@thornhill.no")) (:maintainers ("Jostein Kjønigsen" . "jostein@gmail.com") ("Theodor Thornhill" . "theo@thornhill.no")) (:maintainer "Jostein Kjønigsen" . "jostein@gmail.com"))])
+ (csound-mode . [(20260719 833) ((emacs (27 1))) "A major mode for interacting and coding Csound" tar ((:url . "https://github.com/hlolli/csound-mode") (:commit . "9b12204deb8cede38dbb178f4b9c5f101e06d6a3") (:revdesc . "9b12204deb8c") (:authors ("Hlöðver Sigurðsson" . "hlolli@gmail.com")) (:maintainers ("Hlöðver Sigurðsson" . "hlolli@gmail.com")) (:maintainer "Hlöðver Sigurðsson" . "hlolli@gmail.com"))])
+ (csproj-mode . [(20200801 1732) ((emacs (24))) "Work with .NET project files (csproj, vbproj)" tar ((:url . "https://github.com/omajid/csproj-mode") (:commit . "a7f0f4610c976a28c41b9b8299892f88b5d0336c") (:revdesc . "a7f0f4610c97") (:keywords "languages" "tools") (:authors ("Omair Majid" . "omair.majid@gmail.com")) (:maintainers ("Omair Majid" . "omair.majid@gmail.com")) (:maintainer "Omair Majid" . "omair.majid@gmail.com"))])
+ (css-autoprefixer . [(20180311 1600) ((emacs (24))) "Adds autoprefix to CSS" tar ((:url . "https://github.com/kkweon/emacs-css-autoprefixer") (:commit . "386a5defc8543a3b87820f1761c075c7d1d93b38") (:revdesc . "386a5defc854") (:keywords "convenience" "usability" "css") (:authors ("Kyung Mo Kweon and contributors" . "kkweon@gmail.com")) (:maintainers ("Kyung Mo Kweon and contributors" . "kkweon@gmail.com")) (:maintainer "Kyung Mo Kweon and contributors" . "kkweon@gmail.com"))])
+ (css-comb . [(20160416 559) nil "Sort CSS properties in a particular order using CSS Comb" tar ((:url . "https://github.com/channikhabra/css-comb.el") (:commit . "6fa45e5af8a8bd3af6c1154cde3540e32c4206ee") (:revdesc . "6fa45e5af8a8") (:authors ("Charanjit Singh" . "ckhabra@gmail.com")) (:maintainers ("Charanjit Singh" . "ckhabra@gmail.com")) (:maintainer "Charanjit Singh" . "ckhabra@gmail.com"))])
+ (css-eldoc . [(20220415 1629) nil "An eldoc-mode plugin for CSS source code" tar ((:url . "https://github.com/zenozeng/css-eldoc") (:commit . "73ebf9757a043b56b7d3b5befec5a38e6754b9e5") (:revdesc . "73ebf9757a04") (:authors ("Zeno Zeng" . "zenoes@qq.com")) (:maintainers ("Zeno Zeng" . "zenoes@qq.com")) (:maintainer "Zeno Zeng" . "zenoes@qq.com"))])
+ (cssh . [(20150810 1709) nil "Clusterssh implementation for emacs" tar ((:url . "http://tapoueh.org/emacs/cssh.html") (:commit . "2fe2754235225a59b63f08b130cfd4352e2e1c3f") (:revdesc . "2fe275423522") (:keywords "clusterssh" "ssh" "cssh") (:authors ("Dimitri Fontaine" . "dim@tapoueh.org")) (:maintainers ("Dimitri Fontaine" . "dim@tapoueh.org")) (:maintainer "Dimitri Fontaine" . "dim@tapoueh.org"))])
+ (csv . [(20231216 1243) nil "Functions for reading and parsing CSV files" tar ((:url . "https://gitlab.com/u11/csv.el") (:commit . "8ed083c171a5e8caf11ebfbec67af3119ab1fd90") (:revdesc . "8ed083c171a5") (:keywords "extensions" "data" "csv") (:authors ("Ulf Jasper" . "ulf.jasper@web.de")) (:maintainers ("Ulf Jasper" . "ulf.jasper@web.de")) (:maintainer "Ulf Jasper" . "ulf.jasper@web.de"))])
+ (ct . [(20260330 1943) ((emacs (26 1)) (dash (2 18 0)) (hsluv (1 0 0))) "Color Tools - a color api" tar ((:url . "https://github.com/neeasade/ct.el") (:commit . "d47271cc1b5ef55cf74a3e25ac45a187b36910d5") (:revdesc . "d47271cc1b5e") (:keywords "convenience" "color" "theming" "rgb" "hsv" "hsl" "lab" "oklab" "background"))])
+ (ctable . [(20210128 629) ((emacs (24 3)) (cl-lib (0 5))) "Table component for Emacs Lisp" tar ((:url . "https://github.com/kiwanami/emacs-ctable") (:commit . "48b73742757a3ae5736d825fe49e00034cc453b5") (:revdesc . "48b73742757a") (:keywords "table") (:authors ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainers ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainer "SAKURAI Masashi" . "m.sakuraiatkiwanami.net"))])
+ (ctags-update . [(20190609 613) nil "(auto) update TAGS in parent directory using exuberant-ctags" tar ((:url . "https://github.com/jixiuf/ctags-update") (:commit . "67faf248b92388442958a069263c62a345425a1b") (:revdesc . "67faf248b923") (:keywords "exuberant-ctags" "etags") (:authors ("纪秀峰" . "Josephjixiuf@gmail.com")) (:maintainers ("纪秀峰" . "Josephjixiuf@gmail.com")) (:maintainer "纪秀峰" . "Josephjixiuf@gmail.com"))])
+ (ctl-mode . [(20151202 1006) nil "Major mode for editing GrADS script files" tar ((:url . "https://github.com/yyr/emacs-grads") (:commit . "1a13051db21b999c7682a015b33a03096ff9d891") (:revdesc . "1a13051db21b") (:keywords "grads" "script" "major-mode") (:authors ("Joe Wielgosz" . "joew@cola.iges.org")) (:maintainers ("Joe Wielgosz" . "joew@cola.iges.org")) (:maintainer "Joe Wielgosz" . "joew@cola.iges.org"))])
+ (ctrlf . [(20260221 1939) ((emacs (25 1))) "Emacs finally learns how to ctrl+F" tar ((:url . "https://github.com/radian-software/ctrlf") (:commit . "452723c046c54f66f590900548d8eb4a7783e528") (:revdesc . "452723c046c5") (:keywords "extensions") (:authors ("Radian LLC" . "contact+ctrlf@radian.codes")) (:maintainers ("Radian LLC" . "contact+ctrlf@radian.codes")) (:maintainer "Radian LLC" . "contact+ctrlf@radian.codes"))])
+ (ctrlxo . [(20201021 701) ((emacs (25 1))) "Switch to the most recently used window" tar ((:url . "https://github.com/muffinmad/emacs-ctrlxo") (:commit . "8ad95a81bd1ece06ebe40e2a83490775db64b419") (:revdesc . "8ad95a81bd1e") (:keywords "frames") (:authors ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainers ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainer "Andrii Kolomoiets" . "andreyk.mad@gmail.com"))])
+ (ctune . [(20250310 2034) ((emacs (26 1))) "Tune out CC Mode Noise Macros" tar ((:url . "https://github.com/maurooaranda/ctune") (:commit . "7c26d7af3cd0d6cf4f94deb7f2bf3cf8ed8a1f11") (:revdesc . "7c26d7af3cd0") (:keywords "c" "convenience") (:authors ("Mauro Aranda" . "maurooaranda@gmail.com")) (:maintainers ("Mauro Aranda" . "maurooaranda@gmail.com")) (:maintainer "Mauro Aranda" . "maurooaranda@gmail.com"))])
+ (ctxmenu . [(20140303 2142) ((popup (20140205 103)) (log4e (0 2 0)) (yaxception (0 1))) "Provide a context menu like right-click" tar ((:url . "https://github.com/aki2o/emacs-ctxmenu") (:commit . "5c2376859562b98c07c985d2b483658e4c0e888e") (:revdesc . "5c2376859562") (:keywords "popup") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (cubicaltt . [(20171108 1402) ((emacs (24 1)) (cl-lib (0 5))) "Mode for cubical type theory" tar ((:url . "https://github.com/mortberg/cubicaltt") (:commit . "a867f3d66172020e30dd0614bd7b50f90b6fddd7") (:revdesc . "a867f3d66172") (:keywords "languages"))])
+ (cubicle-mode . [(20221031 2122) nil "Major mode for the Cubicle model checker" tar ((:url . "https://github.com/cubicle-model-checker/cubicle") (:commit . "7679c8452051ed5c89f891c72c6ada76757fc935") (:revdesc . "7679c8452051"))])
+ (cuckoo-search . [(20251004 1847) ((emacs (29 1)) (elfeed (3 4 2))) "Content-based search and saved-searches for Elfeed" tar ((:url . "https://github.com/rtrppl/cuckoo-search") (:commit . "3c9840c4a3fe5cfe0c203ed4657324af8e5bb32f") (:revdesc . "3c9840c4a3fe") (:maintainers ("René Trappel" . "rtrappel@gmail.com")) (:maintainer "René Trappel" . "rtrappel@gmail.com"))])
+ (cucumber-goto-step . [(20131210 519) ((pcre2el (1 5))) "Jump to cucumber step definition" tar ((:url . "http://orthogonal.me") (:commit . "f2713ffb26ebe1b757d1f2ea80e900b55e5895aa") (:revdesc . "f2713ffb26eb") (:authors ("Glen Stampoultzis" . "gstamp@gmail.com")) (:maintainers ("Glen Stampoultzis" . "gstamp@gmail.com")) (:maintainer "Glen Stampoultzis" . "gstamp@gmail.com"))])
+ (cuda-mode . [(20240819 11) ((compat (29))) "NVIDIA CUDA Major Mode derived from C++-mode" tar ((:url . "https://github.com/chachi/cuda-mode") (:commit . "c3dae31b3d1abedf4d0b98840127e2cac73d6ad8") (:revdesc . "c3dae31b3d1a") (:keywords "c" "languages" "cuda") (:authors ("Jack Morrison" . "jackmorrison1@gmail.com")) (:maintainers ("Jack Morrison" . "jackmorrison1@gmail.com")) (:maintainer "Jack Morrison" . "jackmorrison1@gmail.com"))])
+ (cue-mode . [(20220811 1938) ((emacs (25 1))) "Major mode for CUE language files" tar ((:url . "https://github.com/russell/cue-mode") (:commit . "31c671d56e7884fa87ad0f1d27d0bb439dc65380") (:revdesc . "31c671d56e78") (:keywords "data" "languages") (:authors ("Russell Sim" . "russell.sim@gmail.com")) (:maintainers ("Russell Sim" . "russell.sim@gmail.com")) (:maintainer "Russell Sim" . "russell.sim@gmail.com"))])
+ (cue-sheet-mode . [(20230522 511) ((emacs (27 1))) "Major mode for editing CUE sheet files" tar ((:url . "https://github.com/peterhoeg/cue-sheet-mode") (:commit . "016dfa8aeed264e15e2f55b0b34fcfdb7e14b9d9") (:revdesc . "016dfa8aeed2") (:keywords "languages") (:authors ("Peter Hoeg" . "(peter@hoeg.com)")) (:maintainers ("Peter Hoeg" . "(peter@hoeg.com)")) (:maintainer "Peter Hoeg" . "(peter@hoeg.com)"))])
+ (cui . [(20260825 1359) ((emacs (29 1))) "Chat blocks in org-mode for LLM and agents" tar ((:url . "https://codeberg.org/Anoncheg/emacs-cui") (:commit . "bba8d2c3821138452f3e404d3769e8b4a2b715e7") (:revdesc . "bba8d2c38211") (:keywords "org" "comm" "url" "link") (:authors (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainers (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainer nil . "github.com/Anoncheg1,codeberg.org/Anoncheg"))])
+ (curl-to-elisp . [(20201124 1012) ((emacs (25 1))) "Convert cURL command to Emacs Lisp code" tar ((:url . "https://github.com/xuchunyang/curl-to-elisp") (:commit . "63d8d9c6d5efb8af8aa88042bfc0690ba699ef64") (:revdesc . "63d8d9c6d5ef") (:keywords "lisp"))])
+ (currency-convert . [(20231215 1526) ((emacs (24 4))) "Currency converter" tar ((:url . "https://github.com/lassik/emacs-currency-convert") (:commit . "125a718e73f826f461856aabd19bb2de9327531b") (:revdesc . "125a718e73f8") (:keywords "comm" "convenience" "i18n") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (current-window-only . [(20241220 2006) ((emacs (25 1))) "Open things only in the current window" tar ((:url . "https://github.com/FrostyX/current-window-only") (:commit . "1e9c6fb55a4292c62818035f2bdc159512ac089f") (:revdesc . "1e9c6fb55a42") (:keywords "frames") (:authors ("Jakub Kadlčík" . "frostyx@email.cz")) (:maintainers ("Jakub Kadlčík" . "frostyx@email.cz")) (:maintainer "Jakub Kadlčík" . "frostyx@email.cz"))])
+ (current-word-highlight . [(20210323 1401) nil "Highlight the current word minor mode" tar ((:url . "https://github.com/kijimaD/current-word-highlight") (:commit . "d860f4e170ffa4cef840da93647f458cc409d554") (:revdesc . "d860f4e170ff") (:keywords "highlight" "face" "convenience" "word") (:authors ("Kijima Daigo" . "norimaking777@gmail.com")) (:maintainers ("Kijima Daigo" . "norimaking777@gmail.com")) (:maintainer "Kijima Daigo" . "norimaking777@gmail.com"))])
+ (curry-on-theme . [(20210322 1717) ((emacs (24 1))) "A low contrast color theme" tar ((:url . "https://github.com/mvarela/Curry-On-Theme") (:commit . "b53a61d443cc75906d9f97e19f19be71f1e19bc4") (:revdesc . "b53a61d443cc") (:authors ("Martín Varela" . "(martin@varela.fi)")) (:maintainers ("Martín Varela" . "(martin@varela.fi)")) (:maintainer "Martín Varela" . "(martin@varela.fi)"))])
+ (cursor-flash . [(20210722 445) ((emacs (24 3))) "Highlight the cursor on buffer/window-switch" tar ((:url . "https://github.com/Boruch-Baum/emacs-cursor-flash") (:commit . "6bb54a1e2e1bf9df80926718b1b8b9ee49080484") (:revdesc . "6bb54a1e2e1b") (:keywords "convenience" "faces" "maint"))])
+ (cursor-test . [(20131207 1732) ((emacs (24))) "Testing library for cursor position in emacs" tar ((:url . "https://github.com/ainame/cursor-test.el") (:commit . "e09956e048b88fd2ee8dd90b5678baed8b04d31b") (:revdesc . "e09956e048b8"))])
+ (custom-keymap . [(20250906 1450) ((emacs (29 3))) "Configure user key sequence bindings from a custom variable" tar ((:url . "https://github.com/viandant/custom-keymap") (:commit . "d8db247fd8ce47bc9ecc7f75c4074fc4f82c4119") (:revdesc . "d8db247fd8ce") (:keywords "internal" "keymap" "keyboard" "customization") (:authors ("Viandant" . "viandant@langenst.de")) (:maintainers ("Viandant" . "viandant@langenst.de")) (:maintainer "Viandant" . "viandant@langenst.de"))])
+ (cwl-mode . [(20210510 1150) ((yaml-mode (0 0 13)) (emacs (24 4))) "A major mode for editing CWL" tar ((:url . "https://github.com/tom-tan/cwl-mode") (:commit . "23a333119efaac78453cba95d316109805bd6aec") (:revdesc . "23a333119efa") (:keywords "languages" "cwl" "common workflow language") (:authors ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainers ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainer "Tomoya Tanjo" . "ttanjo@gmail.com"))])
+ (cyanometric-theme . [(20220822 301) ((autothemer (0 2)) (emacs (24))) "A Theme with overwhelming bias towards cyan" tar ((:url . "https://github.com/emacsfodder/emacs-theme-cyanometric") (:commit . "9b20e33a8cc2c76bfe6ad45916be6881386707f5") (:revdesc . "9b20e33a8cc2") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (cybercafe-theme . [(20231122 1444) ((emacs (24 1))) "Cybercafe color theme" tar ((:url . "https://github.com/gboncoffee/cybercafe-emacs-theme") (:commit . "c241228914c9bd070733b1e97ea11a5cb6331e86") (:revdesc . "c241228914c9") (:keywords "faces") (:authors (nil . "GabrieldeBritogabrielgbrito@icloud.com")) (:maintainers (nil . "GabrieldeBritogabrielgbrito@icloud.com")) (:maintainer nil . "GabrieldeBritogabrielgbrito@icloud.com"))])
+ (cyberpunk-2019-theme . [(20191008 1133) ((emacs (24 1))) "A retina-scorching cyberpunk theme" tar ((:url . "https://github.com/the-frey/cyberpunk-2019") (:commit . "7e40c37210c363b2819fd9bb98a73101d7a3c206") (:revdesc . "7e40c37210c3") (:keywords "cyberpunk" "theme" "themes") (:authors ("Alex Lynham" . "alex@lynh.am")) (:maintainers ("Alex Lynham" . "alex@lynh.am")) (:maintainer "Alex Lynham" . "alex@lynh.am"))])
+ (cyberpunk-theme . [(20240112 1944) nil "Cyberpunk Color Theme" tar ((:url . "https://github.com/n3mo/cyberpunk-theme.el") (:commit . "1fd5350ddfc53c30e6eef82af77c62d7c825df3c") (:revdesc . "1fd5350ddfc5") (:keywords "color" "theme" "cyberpunk") (:authors ("Nicholas M. Van Horn" . "nvanhorn@protonmail.com")) (:maintainers ("Nicholas M. Van Horn" . "nvanhorn@protonmail.com")) (:maintainer "Nicholas M. Van Horn" . "nvanhorn@protonmail.com"))])
+ (cycbuf . [(20131203 2037) nil "Cycle buffers, inspired by swbuff.el, swbuff-x.el, and bs.el" tar ((:url . "https://github.com/martinp26/cycbuf") (:commit . "1079b41c3eb27d65b66d4399959bb6253f84858e") (:revdesc . "1079b41c3eb2") (:keywords "files" "convenience" "buffer switching"))])
+ (cycle-at-point . [(20260502 927) ((emacs (29 1)) (recomplete (0 2))) "Cycle (rotate) the word at point" tar ((:url . "https://codeberg.org/ideasman42/emacs-cycle-at-point") (:commit . "0be4e5813250139697773275784a9a8d144f47b1") (:revdesc . "0be4e5813250") (:keywords "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (cycle-resize . [(20160521 1557) nil "Cycle resize the current window horizontally or vertically" tar ((:url . "https://github.com/pierre-lecocq/cycle-resize") (:commit . "7d255d6fe85f12c967a0f7fcfcf18633be194c88") (:revdesc . "7d255d6fe85f"))])
+ (cycle-themes . [(20150403 309) ((cl-lib (0 5))) "A global minor mode to make switching themes easier" tar ((:url . "https://github.com/toroidal-code/cycle-themes.el") (:commit . "2660c3178be7b28c2cb5dde2dd70a4bd51dae3a2") (:revdesc . "2660c3178be7") (:keywords "themes" "utility" "global minor mode") (:authors ("Katherine Whitlock" . "toroidalcode@gmail.com")) (:maintainers ("Katherine Whitlock" . "toroidalcode@gmail.com")) (:maintainer "Katherine Whitlock" . "toroidalcode@gmail.com"))])
+ (cyphejor . [(20260802 938) ((emacs (24 4))) "Shorten major mode names using user-defined rules" tar ((:url . "https://github.com/mrkkrp/cyphejor") (:commit . "d18322bb02686aaf6f0da63debcec8e66523d65d") (:revdesc . "d18322bb0268") (:keywords "convenience") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (cypher-mode . [(20151110 1142) nil "Major mode for editing cypher scripts" tar ((:url . "https://github.com/fxbois/cypher-mode") (:commit . "ce8543d7877c736c574a17b49874c9dcdc7a06d6") (:revdesc . "ce8543d7877c") (:keywords "cypher" "graph") (:authors ("François-Xavier Bois" . "fxboisATGoogleMailService")))])
+ (cypher-ts-mode . [(20260817 1627) ((emacs (29 1))) "Cypher editing mode" tar ((:url . "https://codeberg.org/nutcase/cypher-ts-mode") (:commit . "d8643a1bce1f71f42725cfea13d7cfe03215ffa6") (:revdesc . "d8643a1bce1f") (:keywords "languages" "files" "cypher" "graph" "database" "treesitter") (:authors ("Julian Flake" . "flake@uni-koblenz.de")) (:maintainers ("Julian Flake" . "flake@uni-koblenz.de")) (:maintainer "Julian Flake" . "flake@uni-koblenz.de"))])
+ (cython-mode . [(20221130 1257) nil "Major mode for editing Cython files" tar ((:url . "https://github.com/cython/emacs-cython-mode") (:commit . "3e4790559d3168fe992cf2aa62f01423038cedb5") (:revdesc . "3e4790559d31"))])
+ (czech-holidays . [(20160113 1752) nil "Adds a list of Czech public holidays to Emacs calendar" tar ((:url . "https://github.com/chkhd/czech-holidays") (:commit . "d19828122cf3322bcf50601cefa4ac385d2d8f82") (:revdesc . "d19828122cf3") (:keywords "calendar") (:authors ("David Chkhikvadze" . "david.chk@outlook.com")) (:maintainers ("David Chkhikvadze" . "david.chk@outlook.com")) (:maintainer "David Chkhikvadze" . "david.chk@outlook.com"))])
+ (d-mode . [(20241225 1823) ((emacs (25 1))) "D Programming Language major mode for (X)Emacs" tar ((:url . "https://github.com/Emacs-D-Mode-Maintainers/Emacs-D-Mode") (:commit . "e8754635a7dbb7b1712dc9fcf380acd3ed5a2db6") (:revdesc . "e8754635a7db") (:keywords "d" "programming" "language" "emacs" "cc-mode") (:maintainers ("Russel Winder" . "russel@winder.org.uk") ("Vladimir Panteleev" . "vladimir@thecybershadow.net")) (:maintainer "Russel Winder" . "russel@winder.org.uk"))])
+ (d2-mode . [(20241209 2156) ((emacs (26 1))) "Major mode for working with d2 graphs" tar ((:url . "https://github.com/andorsk/d2-mode") (:commit . "e1fc7d6c1915acaf476060c0f79b8bdef6bd1952") (:revdesc . "e1fc7d6c1915") (:keywords "d2" "graphs" "tools" "processes") (:authors ("Andor Kesselman" . "andor@henosisknot.com")) (:maintainers ("Andor Kesselman" . "andor@henosisknot.com")) (:maintainer "Andor Kesselman" . "andor@henosisknot.com"))])
+ (d2-ts-mode . [(20260301 2339) ((emacs (30 1))) "Tree-sitter support for D2" tar ((:url . "https://github.com/chaploud/d2-ts-mode") (:commit . "70891b8d49bbc25cc19ad9b21e3b88bda8fd705d") (:revdesc . "70891b8d49bb") (:keywords "languages" "d2" "tree-sitter") (:authors ("chaploud" . "https://github.com/chaploud")) (:maintainers ("chaploud" . "https://github.com/chaploud")) (:maintainer "chaploud" . "https://github.com/chaploud"))])
+ (dactyl-mode . [(20140906 1725) nil "Major mode for editing Pentadactyl config files" tar ((:url . "https://github.com/luxbock/dactyl-mode") (:commit . "cc55fe6b987271d9647492b8df4c812d884f661f") (:revdesc . "cc55fe6b9872") (:keywords "languages" "vim") (:authors ("Alpha Tan" . "alphatan.zh@gmail.com")) (:maintainers ("Alpha Tan" . "alphatan.zh@gmail.com")) (:maintainer "Alpha Tan" . "alphatan.zh@gmail.com"))])
+ (dad-joke . [(20170928 658) ((emacs (24))) "Get/display dad jokes" tar ((:url . "https://github.com/davep/dad-joke.el") (:commit . "bee47e7b746b403228fa7d7361cb095de19ac9ba") (:revdesc . "bee47e7b746b") (:keywords "games") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (daemons . [(20250514 1107) ((emacs (25 1)) (s (1 13 0)) (compat (29 1 4 2))) "UI for managing init system daemons (services)" tar ((:url . "https://github.com/cbowdon/daemons.el") (:commit . "7b08ce315c0be901d88c1099483f9607c653712e") (:revdesc . "7b08ce315c0b") (:keywords "unix" "convenience"))])
+ (dag-draw . [(20260627 2238) ((emacs (26 1)) (dash (2 19 1)) (ht (2 3))) "Draw directed graphs using the GKNV algorithm" tar ((:url . "https://codeberg.org/trevoke/dag-draw.el") (:commit . "c20b3c28781f1d768116a2cc601a4e8d0058e2ba") (:revdesc . "c20b3c28781f") (:keywords "tools" "extensions"))])
+ (dakrone-light-theme . [(20170808 2140) nil "Dakrone's custom light theme" tar ((:url . "https://github.com/dakrone/dakrone-light-theme") (:commit . "06f198dc8b4ca7421990b30a23d89c8e0b8c5de4") (:revdesc . "06f198dc8b4c") (:keywords "color" "themes" "faces") (:authors ("Lee Hinman" . "lee_AT_writequit.org")) (:maintainers ("Lee Hinman" . "lee_AT_writequit.org")) (:maintainer "Lee Hinman" . "lee_AT_writequit.org"))])
+ (dakrone-theme . [(20170801 1933) nil "Dakrone's custom dark theme" tar ((:url . "https://github.com/dakrone/dakrone-theme") (:commit . "232ad1be5f3572dcbdf528f1655109aa355a6937") (:revdesc . "232ad1be5f35") (:keywords "color" "themes") (:authors ("Lee Hinman" . "lee_AT_writequit.org")) (:maintainers ("Lee Hinman" . "lee_AT_writequit.org")) (:maintainer "Lee Hinman" . "lee_AT_writequit.org"))])
+ (dall-e-shell . [(20250821 1033) ((emacs (27 1)) (shell-maker (0 79 1))) "Interaction mode for DALL-E" tar ((:url . "https://github.com/xenodium/chatgpt-shell") (:commit . "428125f9fa8578703a9ca85d173b2cc9a3eb16b9") (:revdesc . "428125f9fa85"))])
+ (daml-lsp . [(20231101 1818) ((daml-mode (1 0)) (dash (2 18 0)) (f (0 20 0)) (ht (2 3)) (lsp-mode (7 0))) "LSP client definition for daml" tar ((:url . "https://github.com/bartfaitamas/daml-mode") (:commit . "26ea6a1b34c49aaa5a2b395a0468c8af710bfab7") (:revdesc . "26ea6a1b34c4"))])
+ (daml-mode . [(20231106 916) ((emacs (27 1)) (haskell-mode (16 1))) "Major mode for daml" tar ((:url . "https://github.com/bartfaitamas/daml-mode") (:commit . "3ba1166edd4c22402996625b1f8a05a2d5b1cbc6") (:revdesc . "3ba1166edd4c"))])
+ (danneskjold-theme . [(20260818 609) nil "Beautiful high-contrast Emacs theme" tar ((:url . "https://github.com/rails-to-cosmos/danneskjold-theme") (:commit . "6c2fe929bfd0757163e1b7c5c7cbcd4dd18a256b") (:revdesc . "6c2fe929bfd0") (:authors ("Dmitry Akatov" . "dmitry.akatov@protonmail.com")) (:maintainers ("Dmitry Akatov" . "dmitry.akatov@protonmail.com")) (:maintainer "Dmitry Akatov" . "dmitry.akatov@protonmail.com"))])
+ (dante . [(20260311 705) ((dash (2 12 0)) (emacs (27 1)) (f (0 19 0)) (flycheck (0 30)) (company (0 9)) (flymake (1 0)) (s (1 11 0)) (lcr (1 5))) "Development mode for Haskell" tar ((:url . "https://github.com/jyp/dante") (:commit . "eed4b8147a1395a3b674577f032321d391cbf19e") (:revdesc . "eed4b8147a13") (:keywords "haskell" "tools") (:authors ("Jean-Philippe Bernardy" . "jeanphilippe.bernardy@gmail.com")) (:maintainers ("Jean-Philippe Bernardy" . "jeanphilippe.bernardy@gmail.com")) (:maintainer "Jean-Philippe Bernardy" . "jeanphilippe.bernardy@gmail.com"))])
+ (dap-mode . [(20260616 1526) ((emacs (29 1)) (dash (2 18 0)) (lsp-mode (6 0)) (bui (1 1 0)) (f (0 20 0)) (s (1 12 0)) (lsp-treemacs (0 1)) (posframe (0 7 0)) (ht (2 3)) (lsp-docker (1 0 0))) "Debug Adapter Protocol mode" tar ((:url . "https://github.com/emacs-lsp/dap-mode") (:commit . "c73a587d613788003986a11ffe393b46affe8322") (:revdesc . "c73a587d6137") (:keywords "languages" "debug") (:authors ("Ivan Yonchovski" . "yyoncho@gmail.com")) (:maintainers ("Ivan Yonchovski" . "yyoncho@gmail.com")) (:maintainer "Ivan Yonchovski" . "yyoncho@gmail.com"))])
+ (darcsum . [(20190316 2215) nil "A pcl-cvs like interface for managing darcs patches" tar ((:url . "https://github.com/emacsmirror/darcsum") (:commit . "6a8b690539d133c5e3d17cb23fe4365fbb6fb493") (:revdesc . "6a8b690539d1") (:keywords "completion" "convenience" "tools" "vc") (:authors ("John Wiegley" . "johnw@gnu.org")) (:maintainers ("John Wiegley" . "johnw@gnu.org")) (:maintainer "John Wiegley" . "johnw@gnu.org"))])
+ (darcula-theme . [(20260617 1603) nil "Inspired by IntelliJ's Darcula theme" tar ((:url . "https://gitlab.com/fommil/emacs-darcula-theme") (:commit . "89e81a156f375306aa0aa639b3d0161543ce514f") (:revdesc . "89e81a156f37") (:keywords "faces") (:authors ("Sam Halliday" . "Sam.Halliday@gmail.com")) (:maintainers ("Sam Halliday" . "Sam.Halliday@gmail.com")) (:maintainer "Sam Halliday" . "Sam.Halliday@gmail.com"))])
+ (dark-krystal-theme . [(20170808 1300) ((emacs (24 0))) "An Emacs 24 theme based on Dark Krystal (tmTheme)" tar ((:url . "https://github.com/emacsfodder/tmtheme-to-deftheme") (:commit . "79084b99665dc9ffb0ec62cc092349a5ecebebbc") (:revdesc . "79084b99665d"))])
+ (dark-mint-theme . [(20160302 642) nil "Dark & minty fresh theme" tar ((:url . "https://github.com/shaunvxc/dark-mint-theme") (:commit . "c8ad39b7115baf889b54c3e9bffe32daeab93c29") (:revdesc . "c8ad39b7115b"))])
+ (dark-souls . [(20140314 1128) nil "Prepare to die" tar ((:url . "https://github.com/tomjakubowski/dark-souls.el") (:commit . "2c9437265b52f966b2fb13a410a12f3b1e167cb7") (:revdesc . "2c9437265b52") (:keywords "games") (:authors ("Tom Jakubowski" . "tom@crystae.net")) (:maintainers ("Tom Jakubowski" . "tom@crystae.net")) (:maintainer "Tom Jakubowski" . "tom@crystae.net"))])
+ (darkman . [(20260414 1055) ((emacs (28 1))) "Seamless integration with Darkman" tar ((:url . "https://darkman.grtcdr.tn") (:commit . "ee99dfcdc1f48330d0fbb565f8db7664eee34643") (:revdesc . "ee99dfcdc1f4") (:keywords "convenience") (:authors ("Taha Aziz Ben Ali" . "ba.tahaaziz@gmail.com")) (:maintainers ("Taha Aziz Ben Ali" . "ba.tahaaziz@gmail.com")) (:maintainer "Taha Aziz Ben Ali" . "ba.tahaaziz@gmail.com"))])
+ (darkmine-theme . [(20160406 624) nil "Yet another emacs dark color theme" tar ((:url . "https://github.com/pierre-lecocq/darkmine-theme") (:commit . "7f7e82ca03bcad52911fa41fb3e204e32d6ee63e") (:revdesc . "7f7e82ca03bc") (:authors ("Pierre Lecocq" . "pierre.lecocq@gmail.com")) (:maintainers ("Pierre Lecocq" . "pierre.lecocq@gmail.com")) (:maintainer "Pierre Lecocq" . "pierre.lecocq@gmail.com"))])
+ (darkokai-theme . [(20260316 1908) nil "A darker variant on Monokai" tar ((:url . "https://github.com/sjrmanning/darkokai") (:commit . "bd1e2bc33a81b331cc7747cd2f405f793348061d") (:revdesc . "bd1e2bc33a81"))])
+ (darktooth-theme . [(20251019 304) ((emacs (27 1)) (autothemer (0 2))) "From the darkness... it watches" tar ((:url . "https://github.com/emacsfodder/emacs-theme-darktooth") (:commit . "998639b2ce629dbdc0901ed560371f82de7af490") (:revdesc . "998639b2ce62") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (dart-mode . [(20260529 1840) ((emacs (27 1))) "Major mode for editing Dart files" tar ((:url . "https://github.com/emacsorphanage/dart-mode") (:commit . "793d7bcc18a2636ebafe06450356c08ea6d638ca") (:revdesc . "793d7bcc18a2") (:keywords "languages") (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (dart-server . [(20210501 1445) ((emacs (24 5)) (cl-lib (0 5)) (dash (2 10 0)) (flycheck (0 23)) (s (1 10))) "Minor mode for editing Dart files" tar ((:url . "https://github.com/bradyt/dart-server") (:commit . "75562baf9a89b7e314bc2f795f6ecdc5d1f2cc8c") (:revdesc . "75562baf9a89") (:keywords "languages") (:authors ("Brady Trainor" . "mail@bradyt.com")) (:maintainers ("Brady Trainor" . "mail@bradyt.com")) (:maintainer "Brady Trainor" . "mail@bradyt.com"))])
+ (daselt . [(20260626 1859) ((emacs (30 1))) "Module for the Daselt configuration scheme" tar ((:url . "https://gitlab.com/nameiwillforget/d-emacs/") (:commit . "288211ee4789392aa1b5ea9c665c6e9fd04b3a84") (:revdesc . "288211ee4789") (:keywords "tools") (:authors ("Alexander Prähauser" . "ahprae@protonmail.com")) (:maintainers ("Alexander Prähauser" . "ahprae@protonmail.com")) (:maintainer "Alexander Prähauser" . "ahprae@protonmail.com"))])
+ (dash . [(20260221 1346) ((emacs (24))) "A modern list library for Emacs" tar ((:url . "https://github.com/magnars/dash.el") (:commit . "d3a84021dbe48dba63b52ef7665651e0cf02e915") (:revdesc . "d3a84021dbe4") (:keywords "extensions" "lisp") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Basil L. Contovounesios" . "basil@contovou.net")) (:maintainer "Basil L. Contovounesios" . "basil@contovou.net"))])
+ (dash-alfred . [(20191024 450) ((emacs (25 1))) "Search Dash documentation via Dash-Alfred-Workflow" tar ((:url . "https://github.com/xuchunyang/dash-alfred.el") (:commit . "fcd21bd6c7eb5cd31377be970406ff3d2454bd5c") (:revdesc . "fcd21bd6c7eb") (:keywords "docs"))])
+ (dash-at-point . [(20211023 104) nil "Search the word at point with Dash" tar ((:url . "https://github.com/stanaka/dash-at-point") (:commit . "fba1a6f42ea51d05110e12c62bdced664059eb55") (:revdesc . "fba1a6f42ea5") (:authors ("Shinji Tanaka" . "shinji.tanaka@gmail.com")) (:maintainers ("Shinji Tanaka" . "shinji.tanaka@gmail.com")) (:maintainer "Shinji Tanaka" . "shinji.tanaka@gmail.com"))])
+ (dash-docs . [(20210830 926) ((emacs (24 4)) (cl-lib (0 5)) (async (1 9 3))) "Offline documentation browser using Dash docsets" tar ((:url . "https://github.com/areina/helm-dash") (:commit . "29848b6b347ac520f7646c200ed2ec36cea3feda") (:revdesc . "29848b6b347a") (:keywords "docs") (:authors ("Raimon Grau" . "raimonster@gmail.com") ("Toni Reina" . "areina0@gmail.com") ("Bryan Gilbert" . "bryan@bryan.sh")) (:maintainers ("Raimon Grau" . "raimonster@gmail.com") ("Toni Reina" . "areina0@gmail.com") ("Bryan Gilbert" . "bryan@bryan.sh")) (:maintainer "Raimon Grau" . "raimonster@gmail.com"))])
+ (dash-functional . [(20250312 1307) ((dash (2 18 0))) "Collection of useful combinators for Emacs Lisp" tar ((:url . "https://github.com/magnars/dash.el") (:commit . "fcb5d831fc08a43f984242c7509870f30983c27c") (:revdesc . "fcb5d831fc08") (:keywords "extensions" "lisp") (:authors ("Matus Goljer" . "matus.goljer@gmail.com") ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com") ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (dashboard . [(20260809 447) ((emacs (27 1))) "A startup screen extracted from Spacemacs" tar ((:url . "https://github.com/emacs-dashboard/dashboard") (:commit . "a2c49ba27f3a906fd8b059da55104c1ec562b8b6") (:revdesc . "a2c49ba27f3a") (:keywords "startup" "screen" "tools" "dashboard") (:authors ("Rakan Al-Hneiti" . "rakan.alhneiti@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com") ("Ricardo Arredondo" . "ricardo.richo@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (dashboard-hackernews . [(20260521 1635) ((emacs (24)) (dashboard (1 2 5)) (request (0 3 0))) "Display Hacker News on dashboard" tar ((:url . "https://github.com/hyakt/emacs-dashboard-hackernews") (:commit . "ecc8c1eeca10408ac1fab2ad0e80fccf9c6bc0b2") (:revdesc . "ecc8c1eeca10") (:authors ("Hayato KAJIYAMA" . "kaji1216@gmail.com")) (:maintainers ("Hayato KAJIYAMA" . "kaji1216@gmail.com")) (:maintainer "Hayato KAJIYAMA" . "kaji1216@gmail.com"))])
+ (dashboard-ls . [(20251231 1631) ((emacs (27 1)) (dashboard (1 2 5))) "Display files/directories in current directory on Dashboard" tar ((:url . "https://github.com/emacs-dashboard/dashboard-ls") (:commit . "e6f1ae4e4f4efbc1d3c4cff84b220f44e963e6ab") (:revdesc . "e6f1ae4e4f4e") (:keywords "convenience" "directory" "file" "show") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (dashboard-project-status . [(20190202 1354) ((emacs (24)) (git (0 1 1)) (dashboard (1 2 5))) "Display a git project status in a dashboard widget" tar ((:url . "https://github.com/functionreturnfunction/dashboard-project-status") (:commit . "7675c138e9df8fe2c626e7ba9bbb8b6717671a41") (:revdesc . "7675c138e9df") (:authors ("Jason Duncan" . "jasond496@msn.com")) (:maintainers ("Jason Duncan" . "jasond496@msn.com")) (:maintainer "Jason Duncan" . "jasond496@msn.com"))])
+ (date-at-point . [(20150308 1243) nil "Add `date' to `thing-at-point' function" tar ((:url . "https://github.com/alezost/date-at-point.el") (:commit . "258c0268cc4357640c2af78774ba9667beff28ee") (:revdesc . "258c0268cc43") (:keywords "convenience") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (date-field . [(20141129 1539) ((dash (2 9 0)) (log4e (0 2 0)) (yaxception (0 3 2))) "Date widget" tar ((:url . "https://github.com/aki2o/emacs-date-field") (:commit . "11c9170d1f7b343233f7716d4c0a62be024c1654") (:revdesc . "11c9170d1f7b") (:keywords "widgets") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (date2name . [(20190630 933) ((emacs (24 4))) "Package to prepend ISO Timestamps to files" tar ((:url . "https://github.com/DerBeutlin/date2name.el") (:commit . "1d239e4d647ad8ba5cd23a8d4012a9f10bcf7d7d") (:revdesc . "1d239e4d647a") (:keywords "files" "convenience"))])
+ (datetime . [(20250203 2047) ((emacs (25 1)) (extmap (1 1 1))) "Parsing, formatting and matching timestamps" tar ((:url . "https://github.com/doublep/datetime") (:commit . "2601120d4d2857cdbad1cf8d4b84d77308920835") (:revdesc . "2601120d4d28") (:keywords "lisp" "i18n") (:authors ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainers ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainer "Paul Pogonyshev" . "pogonyshev@gmail.com"))])
+ (datetime-format . [(20240105 1901) ((emacs (26 3))) "Datetime functions" tar ((:url . "https://github.com/emacs-php/emacs-datetime") (:commit . "c4ee8ef11bc95c78c390497f1d1397ca57a96f97") (:revdesc . "c4ee8ef11bc9") (:keywords "lisp" "datetime" "calendar") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (datomic-snippets . [(20180817 1045) ((s (1 4 0)) (dash (1 2 0)) (yasnippet (0 6 1))) "Yasnippets for Datomic" tar ((:url . "https://github.com/magnars/datomic-snippets") (:commit . "4a14228840d5252e13d2bf6209670f26345bbb84") (:revdesc . "4a14228840d5") (:keywords "snippets") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (dayone . [(20160105 1240) ((uuid (0 0 3)) (mustache (0 22)) (ht (1 5))) "Utility script for Day One" tar ((:url . "https://github.com/mori-dev/emacs-dayone") (:commit . "ab628274f0806451f23bce16f62a6a11cbf91a2b") (:revdesc . "ab628274f080") (:keywords "day one" "tools" "convenience") (:authors ("mori-dev" . "mori.dev.asdf@gmail.com")) (:maintainers ("mori-dev" . "mori.dev.asdf@gmail.com")) (:maintainer "mori-dev" . "mori.dev.asdf@gmail.com"))])
+ (db . [(20140421 2111) ((kv (0 0 11))) "A database for EmacsLisp" tar ((:url . "https://github.com/nicferrier/emacs-db") (:commit . "b3a423fb8e72f9013009cbe033d654df2ce31438") (:revdesc . "b3a423fb8e72") (:keywords "data" "lisp") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (db-pg . [(20130131 1902) ((pg (0 12)) (db (0 0 6))) "A PostgreSQL adapter for emacs-db" tar ((:url . "https://github.com/nicferrier/emacs-db-pg") (:commit . "7d5ab86b74b05fe003b3b434d4835f37f3f3eded") (:revdesc . "7d5ab86b74b0") (:keywords "data" "comm" "database" "postgresql") (:authors ("Nic Ferrier" . "nic@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nic@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nic@ferrier.me.uk"))])
+ (dbc . [(20201001 1452) ((emacs (24 4)) (cl-lib (0 5)) (ht (2 3))) "Control how to open buffers" tar ((:url . "https://gitlab.com/matsievskiysv/display-buffer-control") (:commit . "6728e72f72347d098b7d75ac4c29a7d687cc9ed3") (:revdesc . "6728e72f7234") (:keywords "convenience"))])
+ (dbml-mode . [(20241206 706) ((emacs (27 1))) "Major mode for DBML" tar ((:url . "https://github.com/KeyWeeUsr/dbml-mode") (:commit . "fd2e4ec1356a63b05a15103631bd007bd089867c") (:revdesc . "fd2e4ec1356a") (:keywords "convenience" "dbml" "language" "markup" "highlight" "dbdiagram" "diagram") (:authors ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainers ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainer "Peter Badida" . "keyweeusr@gmail.com"))])
+ (ddate . [(20250306 1709) ((emacs (24 4))) "Manage Discordian dates with ddate" tar ((:url . "https://git.sr.ht/~earneson/emacs-ddate") (:commit . "ec3de36ae7bcf71829f03a5063ee9912fcca40bc") (:revdesc . "ec3de36ae7bc") (:keywords "lisp" "dates" "tools" "dashboard") (:authors ("Erik L. Arneson" . "earneson@arnesonium.com")) (:maintainers ("Erik L. Arneson" . "earneson@arnesonium.com")) (:maintainer "Erik L. Arneson" . "earneson@arnesonium.com"))])
+ (ddgr . [(20260217 345) ((emacs (27 1))) "DuckDuckGo search" tar ((:url . "https://github.com/necaris/ddgr.el") (:commit . "55cba194c477f435221094d31798a588df4137e7") (:revdesc . "55cba194c477") (:keywords "comm" "duckduckgo" "search" "web") (:authors ("Rami Chowdhury" . "rami.chowdhury@gmail.com")) (:maintainers ("Rami Chowdhury" . "rami.chowdhury@gmail.com")) (:maintainer "Rami Chowdhury" . "rami.chowdhury@gmail.com"))])
+ (ddp . [(20250421 353) ((emacs (29 1))) "Dynamic Data Processor with cmd tools" tar ((:url . "https://github.com/eki3z/ddp.el") (:commit . "ee02e658f3bf8f26115e2dd61c713137e01227a9") (:revdesc . "ee02e658f3bf") (:keywords "tools") (:authors ("Eki Zhang" . "liuyinz@gmail.com")) (:maintainers ("Eki Zhang" . "liuyinz@gmail.com")) (:maintainer "Eki Zhang" . "liuyinz@gmail.com"))])
+ (ddskk . [(20260329 1317) ((ccc (1 43)) (cdb (20141201 754))) "Daredevil SKK (Simple Kana to Kanji conversion program)" tar ((:url . "https://github.com/skk-dev/ddskk") (:commit . "e8bf68b27021c29781dbfa6a8ef7b770565bdb5b") (:revdesc . "e8bf68b27021") (:keywords "japanese" "mule" "input method") (:authors ("Masahiko Sato" . "masahiko@kuis.kyoto-u.ac.jp")))])
+ (ddskk-posframe . [(20260516 827) ((emacs (26 1)) (posframe (1 5 1)) (ddskk (17 2))) "Show Henkan tooltip for ddskk via posframe" tar ((:url . "https://github.com/conao3/ddskk-posframe.el") (:commit . "1b5c8f85cafb1e763e214f4310113c75e28cce0d") (:revdesc . "1b5c8f85cafb") (:keywords "tooltip" "convenience" "posframe") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (deadgrep . [(20260629 1858) ((emacs (25 1)) (dash (2 12 0)) (s (1 11 0)) (spinner (1 7 3))) "Fast, friendly searching with ripgrep" tar ((:url . "https://github.com/Wilfred/deadgrep") (:commit . "9ba86acdd9fa6aec55c753f4db8c3a5778941259") (:revdesc . "9ba86acdd9fa") (:keywords "tools") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (debian-el . [(20260703 520) nil "Startup file for the debian-el package" tar ((:commit . "ce58c690e27522669eb1905e21a194ff9eb79a9b") (:revdesc . "ce58c690e275") (:keywords "debian" "apt" "elisp") (:authors ("Debian Emacsen Team" . "debian-emacsen@lists.debian.org")) (:maintainers ("Debian Emacsen Team" . "debian-emacsen@lists.debian.org")) (:maintainer "Debian Emacsen Team" . "debian-emacsen@lists.debian.org"))])
+ (debpaste . [(20161214 2023) ((xml-rpc (1 6 7))) "Interface for getting/posting/deleting pastes from paste.debian.net" tar ((:url . "https://github.com/alezost/debpaste.el") (:commit . "6f2a400665062468ebd03a2ce1de2a73d9084958") (:revdesc . "6f2a40066506") (:keywords "paste") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (debug-print . [(20140126 19) ((emacs (24))) "A nice printf debugging environment by the way Gauche do" tar ((:url . "https://github.com/kenoss/debug-print") (:commit . "d817fd9ea2d3f8d2c1ace4d8af155684f3a99dc5") (:revdesc . "d817fd9ea2d3") (:keywords "extensions" "lisp" "tools" "maint") (:authors ("Ken Okada" . "keno.ss57@gmail.com")) (:maintainers ("Ken Okada" . "keno.ss57@gmail.com")) (:maintainer "Ken Okada" . "keno.ss57@gmail.com"))])
+ (decide . [(20241014 1927) nil "Rolling dice and other random things" tar ((:url . "https://github.com/lifelike/decide-mode") (:commit . "fa97462f9c9237551e99ec56dbfe13af14391ca6") (:revdesc . "fa97462f9c92") (:authors ("Pelle Nilsson" . "perni@lysator.liu.se")) (:maintainers ("Pelle Nilsson" . "perni@lysator.liu.se")) (:maintainer "Pelle Nilsson" . "perni@lysator.liu.se"))])
+ (decl . [(20260819 1858) ((dash (2 5 0)) (emacs (24 3)) (cl-lib (0 3))) "Library for organizing code declaratively" tar ((:url . "https://github.com/preetpalS/decl.el") (:commit . "491fab9d6a8debe266e0f7ed8590becfa2157353") (:revdesc . "491fab9d6a8d"))])
+ (declutter . [(20220310 2101) ((emacs (25 1))) "Read html content and (some) paywall sites without clutter" tar ((:url . "http://www.github.com/sanel/declutter") (:commit . "0b2ca86fa716dfc2fb3bc3425019f049dd65eda2") (:revdesc . "0b2ca86fa716") (:keywords "html" "hypermedia" "terminals") (:authors ("Sanel Zukan" . "sanelz@gmail.com")) (:maintainers ("Sanel Zukan" . "sanelz@gmail.com")) (:maintainer "Sanel Zukan" . "sanelz@gmail.com"))])
+ (decor . [(20241210 646) ((emacs (24 1))) "Modify visual decorations" tar ((:url . "https://github.com/KeyWeeUsr/decor") (:commit . "fa91fd8dabc7e98d7c0fc5e01400aae90966b38d") (:revdesc . "fa91fd8dabc7") (:keywords "convenience" "window" "decoration" "distraction" "xprop" "xwayland") (:authors ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainers ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainer "Peter Badida" . "keyweeusr@gmail.com"))])
+ (dedicated . [(20151202 110) nil "A very simple minor mode for dedicated buffers" tar ((:url . "https://github.com/emacsorphanage/dedicated") (:commit . "f47b504c0c56fa5ab9d1028417ca1f65a713a2f0") (:revdesc . "f47b504c0c56") (:keywords "dedicated" "buffer") (:authors ("Eric Crampton" . "eric@atdesk.com")) (:maintainers ("Eric Crampton" . "eric@atdesk.com")) (:maintainer "Eric Crampton" . "eric@atdesk.com"))])
+ (dedukti-mode . [(20171103 1212) nil "Major mode for Dedukti files" tar ((:url . "https://github.com/rafoo/dedukti-mode") (:commit . "d7c3505a1046187de3c3aeb144455078d514594e") (:revdesc . "d7c3505a1046") (:keywords "languages" "dedukti"))])
+ (default-font-presets . [(20260505 1159) ((emacs (26 1))) "Support selecting fonts from a list of presets" tar ((:url . "https://codeberg.org/ideasman42/emacs-default-font-presets") (:commit . "43e778da6ef468e187743f009e14270875bc312e") (:revdesc . "43e778da6ef4") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (default-text-scale . [(20191226 2234) ((emacs (24))) "Easily adjust the font size in all frames" tar ((:url . "https://github.com/purcell/default-text-scale") (:commit . "bfc0987c37e93742255d3b23d86c17096fda8e7e") (:revdesc . "bfc0987c37e9") (:keywords "frames" "faces") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (defcapture . [(20230909 353) ((emacs (25 1)) (doct (3 0))) "A convenience macro for the Doct DSL" tar ((:url . "https://github.com/aggu4/defcapture") (:commit . "777a10a3343da0553813d004a67e39e2df1bcbb2") (:revdesc . "777a10a3343d") (:keywords "convenience" "org") (:authors ("Abraham Aguilar" . "a.aguilar@ciencias.unam.mx")) (:maintainers ("Abraham Aguilar" . "a.aguilar@ciencias.unam.mx")) (:maintainer "Abraham Aguilar" . "a.aguilar@ciencias.unam.mx"))])
+ (deferred . [(20170901 1330) ((emacs (24 4))) "Simple asynchronous functions for emacs lisp" tar ((:url . "https://github.com/kiwanami/emacs-deferred") (:commit . "2239671d94b38d92e9b28d4e12fd79814cfb9c16") (:revdesc . "2239671d94b3") (:keywords "deferred" "async") (:authors ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainers ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainer "SAKURAI Masashi" . "m.sakuraiatkiwanami.net"))])
+ (define-it . [(20260214 1857) ((emacs (25 1)) (s (1 12 0)) (popup (0 5 3)) (pos-tip (0 4 6)) (posframe (1 1 7)) (define-word (0 1 0)) (google-translate (0 11 18)) (wiki-summary (0 1))) "Define, translate, wiki the word" tar ((:url . "https://github.com/jcs-elpa/define-it") (:commit . "094c2dbe3fac7c19365fb952e821bdd5b558f51c") (:revdesc . "094c2dbe3fac") (:keywords "convenience" "dictionary" "explanation" "search" "wiki") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (define-scratch . [(20221220 946) ((emacs (24 3))) "Define new commands to make scratch buffers" tar ((:url . "https://github.com/lassik/emacs-define-scratch") (:commit . "26cf11f801c2b5df0fbd56d2c4f7ac41b3ccd1c6") (:revdesc . "26cf11f801c2") (:keywords "languages" "util") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (define-word . [(20220104 1848) ((emacs (24 3))) "Display the definition of word at point" tar ((:url . "https://github.com/abo-abo/define-word") (:commit . "31a8c67405afa99d0e25e7c86a4ee7ef84a808fe") (:revdesc . "31a8c67405af") (:keywords "dictionary" "convenience") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (deflate . [(20250703 808) ((dash (2 0 0)) (emacs (25 1))) "The DEFLATE compression algorithm in pure Emacs LISP" tar ((:url . "https://github.com/skuro/deflate") (:commit . "4896cdf0c1d031404c6705f52c03f048444ff927") (:revdesc . "4896cdf0c1d0") (:keywords "files" "tools") (:authors ("Carlo Sciolla" . "carlo.sciolla@gmail.com")) (:maintainers ("Carlo Sciolla" . "carlo.sciolla@gmail.com")) (:maintainer "Carlo Sciolla" . "carlo.sciolla@gmail.com"))])
+ (defproject . [(20151201 2219) ((emacs (24))) "Manager dir-locals and project specific variables" tar ((:url . "https://github.com/kotfic/defproject") (:commit . "674d48a5e34cb4bba76faa38ee901322ec649086") (:revdesc . "674d48a5e34c") (:keywords "convenience") (:authors (nil . "kotfic@gmail.com")) (:maintainers (nil . "kotfic@gmail.com")) (:maintainer nil . "kotfic@gmail.com"))])
+ (defrepeater . [(20180830 410) ((emacs (25 2)) (s (1 12 0))) "Easily make commands repeatable" tar ((:url . "https://github.com/alphapapa/defrepeater.el") (:commit . "62b00ede57d2e115b9ef9f21268c021ae1186873") (:revdesc . "62b00ede57d2") (:keywords "convenience") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (deft . [(20240524 1524) nil "Quickly browse, filter, and edit plain text notes" tar ((:url . "https://jblevins.org/projects/deft/") (:commit . "b369d7225d86551882568788a23c5497b232509c") (:revdesc . "b369d7225d86") (:keywords "plain text" "notes" "simplenote" "notational velocity") (:authors ("Jason R. Blevins" . "jrblevin@xbeta.org")) (:maintainers ("Jason R. Blevins" . "jrblevin@xbeta.org")) (:maintainer "Jason R. Blevins" . "jrblevin@xbeta.org"))])
+ (delim-kill . [(20100517 620) nil "Kill text between delimiters" tar ((:url . "https://github.com/thomas11/delim-kill/tree/master") (:commit . "1dbe47344f2d2cbc8c54beedf0cf0bf10fd203c1") (:revdesc . "1dbe47344f2d") (:keywords "convenience" "languages") (:authors ("Thomas Kappler" . "tkappler@gmail.com")) (:maintainers ("Thomas Kappler" . "tkappler@gmail.com")) (:maintainer "Thomas Kappler" . "tkappler@gmail.com"))])
+ (demangle-mode . [(20210822 2210) ((cl-lib (0 1)) (emacs (24 3))) "Automatically demangle C++, D, and Rust symbols" tar ((:url . "https://github.com/liblit/demangle-mode") (:commit . "04f545adab066708d6151f13da65aaf519f8ac4e") (:revdesc . "04f545adab06") (:keywords "c" "tools") (:authors ("Ben Liblit" . "liblit@acm.org")) (:maintainers ("Ben Liblit" . "liblit@acm.org")) (:maintainer "Ben Liblit" . "liblit@acm.org"))])
+ (demap . [(20220322 2309) ((emacs (25 1))) "Detachable minimap package" tar ((:url . "https://gitlab.com/sawyerjgardner/demap.el") (:commit . "c42ec4752544f80ca7c172ff65e705a56089bc96") (:revdesc . "c42ec4752544") (:keywords "lisp" "tools" "convenience") (:authors ("Sawyer Gardner" . "https://gitlab.com/sawyerjgardner")) (:maintainers ("Sawyer Gardner" . "https://gitlab.com/sawyerjgardner")) (:maintainer "Sawyer Gardner" . "https://gitlab.com/sawyerjgardner"))])
+ (demo-it . [(20211221 2152) nil "Create demonstrations" tar ((:url . "https://github.com/howardabrams/demo-it") (:commit . "8ade739bb2605275f1f56128a0a9a8c6b55bab6a") (:revdesc . "8ade739bb260") (:keywords "demonstration" "presentation" "test") (:authors ("Howard Abrams" . "howard.abrams@gmail.com")) (:maintainers ("Howard Abrams" . "howard.abrams@gmail.com")) (:maintainer "Howard Abrams" . "howard.abrams@gmail.com"))])
+ (deno-fmt . [(20230117 1117) ((emacs (24))) "Minor mode for using deno fmt on save" tar ((:url . "https://github.com/russell/deno-emacs") (:commit . "6378966f448a3b9b5ae98af58cd13a031bd26702") (:revdesc . "6378966f448a") (:authors ("Russell Clarey" . "http://github/rclarey")) (:maintainers ("Russell Clarey" . "http://github/rclarey")) (:maintainer "Russell Clarey" . "http://github/rclarey"))])
+ (deno-ts-mode . [(20230912 202) ((emacs (29 1))) "Major mode for Deno" tar ((:url . "https://git.sr.ht/~mgmarlow/deno-ts-mode") (:commit . "526b6c00483cd86a028805e31ebd8a4a7000c3da") (:revdesc . "526b6c00483c") (:keywords "languages") (:authors ("Graham Marlow" . "info@mgmarlow.com")) (:maintainers ("Graham Marlow" . "info@mgmarlow.com")) (:maintainer "Graham Marlow" . "info@mgmarlow.com"))])
+ (denote-agenda . [(20251206 42) ((emacs (27 1)) (denote (3 1 0)) (seq (2 24))) "Integrate Denote and Org-Agenda" tar ((:url . "https://git.sr.ht/~swflint/denote-agenda") (:commit . "90876a96663c1cb8baf4281e79aea51a95bd5be6") (:revdesc . "90876a96663c") (:keywords "calendar") (:authors ("Samuel W. Flint" . "swflint@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "swflint@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "swflint@samuelwflint.com"))])
+ (denote-citar-sections . [(20260402 1642) ((emacs (26 1)) (denote (2 2 4)) (universal-sidecar (1 5 0)) (citar-denote (2 2 2)) (citar (1 4))) "Universal Sidecar sections for citar-denote" tar ((:url . "https://git.sr.ht/~swflint/denote-sections") (:commit . "c76659de2dd13f6e6f7358f96db6d2e067a42fbc") (:revdesc . "c76659de2dd1") (:keywords "convenience" "files" "hypermedia" "notes") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (denote-explore . [(20260719 936) ((emacs (29 1)) (denote (4 2)) (dash (2 19 1)) (denote-regexp (20250415 2202))) "Explore and visualise Denote files" tar ((:url . "https://github.com/pprevos/denote-explore/") (:commit . "bd442d761d0ce6efe5cd3b7ce4806a86a49cf8a9") (:revdesc . "bd442d761d0c") (:authors ("Peter Prevos" . "peter@prevos.net")) (:maintainers ("Peter Prevos" . "peter@prevos.net")) (:maintainer "Peter Prevos" . "peter@prevos.net"))])
+ (denote-journal-capture . [(20250315 1919) ((emacs (24 1)) (denote-journal (0))) "Better Integration for Denote Journal and Org Capture" tar ((:url . "https://git.sr.ht/~swflint/denote-journal-capture") (:commit . "64ca22073b01b9a3fca15ff300342ce67932cd3d") (:revdesc . "64ca22073b01") (:keywords "convenience") (:authors ("Samuel W. Flint" . "swflint@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "swflint@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "swflint@samuelwflint.com"))])
+ (denote-project-notes . [(20260622 1947) ((emacs (28 1)) (denote (3 0 0))) "Link Denote notes to a project" tar ((:url . "https://git.sr.ht/~swflint/denote-project-notes") (:commit . "e109c84071b3aa8da49e5b0fc56e96f8d1cf5e95") (:revdesc . "e109c84071b3") (:keywords "convenience") (:authors ("Samuel W. Flint" . "swflint@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "swflint@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "swflint@samuelwflint.com"))])
+ (denote-regexp . [(20250415 2202) ((emacs (27 1)) (denote (3 1 0))) "Compose regexps to match Denote files" tar ((:url . "https://git.sr.ht/~swflint/denote-regexp") (:commit . "08d62cb5bb2d271eb4e0915b56a9601179f88627") (:revdesc . "08d62cb5bb2d") (:keywords "convenience") (:authors ("Samuel W. Flint" . "swflint@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "swflint@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "swflint@samuelwflint.com"))])
+ (denote-sections . [(20260120 1542) ((universal-sidecar (1 5 0)) (denote (2 2 4)) (emacs (27 1))) "Universal Sidecar Sections for Denote" tar ((:url . "https://git.sr.ht/~swflint/denote-sections") (:commit . "dde6836a4663cb3fc23cdce8ea25834720711c8a") (:revdesc . "dde6836a4663") (:keywords "convenience" "files" "notes" "hypermedia") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (denote-smart-sluggify-title . [(20260809 1652) ((emacs (25 1)) (denote (4 0 0))) "Denoise denote titles to save filename length" tar ((:url . "https://git.sr.ht/~swflint/denote-smart-sluggify-title") (:commit . "87c60e5e03c2e00855db81589ff1340bd6c5bcb5") (:revdesc . "87c60e5e03c2") (:keywords "convenience" "denote") (:authors ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (denote-solo . [(20260621 1352) ((emacs (28 1)) (denote (4 0))) "Switch the active Denote directory" tar ((:url . "https://github.com/pavlo/denote-solo") (:commit . "f6f3621b48022fe43ec54429dcff4f92a06d7c15") (:revdesc . "f6f3621b4802") (:keywords "convenience" "notes") (:authors ("Pavlo V. Lysov" . "pavlikus@gmail.com")) (:maintainers ("Pavlo V. Lysov" . "pavlikus@gmail.com")) (:maintainer "Pavlo V. Lysov" . "pavlikus@gmail.com"))])
+ (denote-wordcloud . [(20260506 1238) ((emacs (28 1)) (denote (4 1 3))) "Generate a word cloud" tar ((:url . "https://codeberg.org/treflip/denote-wordcloud") (:commit . "01a74f13bd1fa4f1645851cc64f2701ff2654e64") (:revdesc . "01a74f13bd1f") (:keywords "files") (:authors ("Alexander Kuzmin" . "treflcrew@gmail.org")) (:maintainers ("Alexander Kuzmin" . "treflcrew@gmail.org")) (:maintainer "Alexander Kuzmin" . "treflcrew@gmail.org"))])
+ (departure-times-norway . [(20250921 1626) ((emacs (27 1)) (persist (0 6 1))) "Display public transport departure times in Norway" tar ((:url . "https://github.com/hsolg/emacs-departure-times-norway") (:commit . "3b0559bc55099cb025df63715ed9029885b64c39") (:revdesc . "3b0559bc5509") (:authors ("Henrik Solgaard" . "henrik.solgaard@gmail.com")) (:maintainers ("Henrik Solgaard" . "henrik.solgaard@gmail.com")) (:maintainer "Henrik Solgaard" . "henrik.solgaard@gmail.com"))])
+ (describe-hash . [(20200718 1556) nil "Help function for examining a hash map" tar ((:url . "https://github.com/Junker/describe-hash") (:commit . "20dbbbea630055b2401f13a55fbb21216960dc46") (:revdesc . "20dbbbea6300"))])
+ (describe-number . [(20151101 55) ((yabin (1 1))) "Describe arbitrarily large number at point" tar ((:url . "https://github.com/netromdk/describe-number") (:commit . "40618345a37831804b29589849a785ef5aa5ac24") (:revdesc . "40618345a378") (:keywords "describe" "value" "help") (:authors ("Morten Slot Kristensen" . "mskATnullpointerDOTdk")) (:maintainers ("Morten Slot Kristensen" . "mskATnullpointerDOTdk")) (:maintainer "Morten Slot Kristensen" . "mskATnullpointerDOTdk"))])
+ (desert-theme . [(20260606 1836) ((emacs (27 1))) "A warm earthy port of Vim's desert theme" tar ((:url . "https://github.com/bkc39/desert-theme") (:commit . "a334abfe4d624cb37bb4a2dc309f8623f42b74d1") (:revdesc . "a334abfe4d62") (:keywords "faces" "theme" "vim" "desert") (:authors ("Ben Carriel" . "notthefather@pm.me")) (:maintainers ("Ben Carriel" . "notthefather@pm.me")) (:maintainer "Ben Carriel" . "notthefather@pm.me"))])
+ (desktop+ . [(20170107 2132) ((emacs (24 4)) (dash (2 11 0)) (f (0 17 2))) "Handle special buffers when saving & restoring sessions" tar ((:url . "https://github.com/ffevotte/desktop-plus") (:commit . "d26f369bda96860eef18365cdb5c79f39a2c765c") (:revdesc . "d26f369bda96") (:authors ("François Févotte" . "fevotte@gmail.com")) (:maintainers ("François Févotte" . "fevotte@gmail.com")) (:maintainer "François Févotte" . "fevotte@gmail.com"))])
+ (desktop-environment . [(20250821 1428) ((emacs (25 1))) "Helps you control your GNU/Linux computer" tar ((:url . "https://gitlab.petton.fr/DamienCassou/desktop-environment") (:commit . "1f16fa0fcc1b5b33773a8e334a60133a046e9fc7") (:revdesc . "1f16fa0fcc1b") (:authors ("Damien Cassou" . "damien@cassou.me") ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainers ("Damien Cassou" . "damien@cassou.me") ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (desktop-mail-user-agent . [(20210519 1008) ((emacs (24 3))) "Call OS default mail program to compose mail" tar ((:url . "https://github.com/lassik/emacs-desktop-mail-user-agent") (:commit . "caac672ef7e4ddced960fa31cef3a6ba5d7ab451") (:revdesc . "caac672ef7e4") (:keywords "mail") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (desktop-registry . [(20140119 2143) nil "Keep a central registry of desktop files" tar ((:url . "http://projects.ryuslash.org/desktop-registry/") (:commit . "244c2e7f9f0a1050aa8a47ad0b38f4e4584682dd") (:revdesc . "244c2e7f9f0a") (:keywords "convenience") (:authors ("Tom Willemse" . "tom@ryuslash.org")) (:maintainers ("Tom Willemse" . "tom@ryuslash.org")) (:maintainer "Tom Willemse" . "tom@ryuslash.org"))])
+ (detached . [(20221129 1430) ((emacs (27 1))) "A package to launch, and manage, detached processes" tar ((:url . "https://sr.ht/~niklaseklund/detached.el/") (:commit . "6b64d4d8064cee781e071e825857b442ea96c3d9") (:revdesc . "6b64d4d8064c") (:keywords "convenience" "processes") (:authors ("Niklas Eklund" . "niklas.eklund@posteo.net")) (:maintainers ("detached.el Development" . "~niklaseklund/detached.el@lists.sr.ht")) (:maintainer "detached.el Development" . "~niklaseklund/detached.el@lists.sr.ht"))])
+ (detour . [(20181122 2138) ((emacs (24 4))) "Take a quick detour and return" tar ((:url . "https://github.com/ska2342/detour/") (:commit . "f41f17cf1cf4f3db41563ff011786b6567596fb4") (:revdesc . "f41f17cf1cf4") (:keywords "convenience" "abbrev") (:authors ("Stefan Kamphausen" . "www.skamphausen.de")) (:maintainers ("Stefan Kamphausen" . "www.skamphausen.de")) (:maintainer "Stefan Kamphausen" . "www.skamphausen.de"))])
+ (devcontainer . [(20260418 621) ((emacs (29 1))) "Support for devcontainer" tar ((:url . "https://github.com/johannes-mueller/devcontainer.el") (:commit . "bc598413a18baa3ec9ef7e1a0cf0115685d23a22") (:revdesc . "bc598413a18b") (:authors ("Johannes Mueller" . "github@johannes-mueller.org")) (:maintainers ("Johannes Mueller" . "github@johannes-mueller.org")) (:maintainer "Johannes Mueller" . "github@johannes-mueller.org"))])
+ (devdocs . [(20251022 1255) ((emacs (27 1)) (compat (30 1))) "Emacs viewer for DevDocs" tar ((:url . "https://github.com/astoff/devdocs.el") (:commit . "25c746024ddf73570195bf42b841f761a2fee10c") (:revdesc . "25c746024ddf") (:keywords "help") (:authors ("Augusto Stoffel" . "arstoffel@gmail.com")) (:maintainers ("Augusto Stoffel" . "arstoffel@gmail.com")) (:maintainer "Augusto Stoffel" . "arstoffel@gmail.com"))])
+ (devdocs-browser . [(20260813 1553) ((emacs (27 1))) "Browse devdocs.io documents using EWW" tar ((:url . "https://github.com/blahgeek/emacs-devdocs-browser") (:commit . "a49adc1f20b745338db34b729a7c94394c1c1689") (:revdesc . "a49adc1f20b7") (:keywords "docs" "help" "tools") (:authors ("blahgeek" . "i@blahgeek.com")) (:maintainers ("blahgeek" . "i@blahgeek.com")) (:maintainer "blahgeek" . "i@blahgeek.com"))])
+ (devil . [(20240107 2149) ((emacs (24 4))) "Minor mode for translating key sequences" tar ((:url . "https://github.com/susam/devil") (:commit . "dd29681fe07f37c4acbff32a5767bddcbf3b5b80") (:revdesc . "dd29681fe07f") (:keywords "convenience" "abbrev") (:authors ("Susam Pal" . "susam@susam.net")) (:maintainers ("Susam Pal" . "susam@susam.net")) (:maintainer "Susam Pal" . "susam@susam.net"))])
+ (dfmt . [(20170728 1023) nil "Emacs Interface to D indenting/formatting tool dfmt" tar ((:url . "https://github.com/qsimpleq/elisp-dfmt") (:commit . "21b9094e907b7ac53f5ecb4ff4539613a9d12434") (:revdesc . "21b9094e907b") (:keywords "tools" "convenience" "languages" "dlang") (:maintainers ("Kirill Babikhin" . "qsimpleq")) (:maintainer "Kirill Babikhin" . "qsimpleq"))])
+ (dhall-mode . [(20250105 1418) ((emacs (24 4)) (reformatter (0 3))) "Major mode for the dhall configuration language" tar ((:url . "https://github.com/psibi/dhall-mode") (:commit . "fca383a9c4622c1d9a39dc977572b34c7fa0b719") (:revdesc . "fca383a9c462") (:keywords "languages") (:authors ("Sibi Prabakaran" . "sibi@psibi.in")) (:maintainers ("Sibi Prabakaran" . "sibi@psibi.in")) (:maintainer "Sibi Prabakaran" . "sibi@psibi.in"))])
+ (dialog-mode . [(20260823 1237) ((emacs (28 1))) "Major mode for editing Dialog files" tar ((:url . "https://git.sr.ht/~mew/dialog-mode") (:commit . "3cf51316db1dcef64a01399ec82499b742d911e9") (:revdesc . "3cf51316db1d") (:keywords "languages") (:authors ("Morgan Willcock" . "morgan@ice9.digital")) (:maintainers ("Morgan Willcock" . "morgan@ice9.digital")) (:maintainer "Morgan Willcock" . "morgan@ice9.digital"))])
+ (dianyou . [(20210525 1517) ((emacs (24 4))) "Search and analyze mails in Gnus" tar ((:url . "https://github.com/redguardtoo/dianyou") (:commit . "f77d9e76be5d8022fa6ee5426144f13f38dd09f2") (:revdesc . "f77d9e76be5d") (:keywords "mail") (:authors ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainers ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainer "Chen Bin" . "chenbinDOTshATgmailDOTcom"))])
+ (diary-manager . [(20220929 2042) ((emacs (25))) "Simple personal diary" tar ((:url . "https://github.com/radian-software/diary-manager") (:commit . "56c739224e5bb845d275bfe3f4e420285de3a929") (:revdesc . "56c739224e5b") (:keywords "extensions") (:authors ("Radian LLC" . "contact+diary-manager@radian.codes")) (:maintainers ("Radian LLC" . "contact+diary-manager@radian.codes")) (:maintainer "Radian LLC" . "contact+diary-manager@radian.codes"))])
+ (dic-lookup-w3m . [(20180526 1621) ((w3m (20120723 324)) (stem (20120826))) "Look up dictionaries on the Internet" tar ((:url . "https://github.com/emacsattic/dic-lookup-w3m") (:commit . "3254ab10cbf0078c7162557dd1f68dac28459cf9") (:revdesc . "3254ab10cbf0") (:keywords "emacs-w3m" "w3m" "dictionary"))])
+ (dicom . [(20260821 1214) ((emacs (29 1)) (compat (31))) "DICOM viewer - Digital Imaging & Communications in Medicine" tar ((:url . "https://github.com/minad/dicom") (:commit . "5db856bd206ac899ecd5378eb3cb655b310397f5") (:revdesc . "5db856bd206a") (:keywords "multimedia" "hypermedia" "files") (:authors ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (dictcc . [(20221231 1703) ((emacs (24 4)) (cl-lib (0 5))) "Look up translations on dict.cc" tar ((:url . "https://github.com/martenlienen/dictcc.el") (:commit . "30b505759e5a97c2aaa8b0e8ea5e187fdf625c65") (:revdesc . "30b505759e5a") (:keywords "convenience") (:authors ("Marten Lienen" . "marten.lienen@gmail.com")) (:maintainers ("Marten Lienen" . "marten.lienen@gmail.com")) (:maintainer "Marten Lienen" . "marten.lienen@gmail.com"))])
+ (dictionary . [(20201001 1727) ((connection (1 11)) (link (1 11))) "Client for rfc2229 dictionary servers" tar ((:url . "https://github.com/myrkr/dictionary-el") (:commit . "bdf0aa7761d1c1a3bc0652b2fdc4a54b3acdb06a") (:revdesc . "bdf0aa7761d1") (:keywords "interface" "dictionary") (:authors ("Torsten Hilbrich" . "torsten.hilbrich@gmx.net")) (:maintainers ("Torsten Hilbrich" . "torsten.hilbrich@gmx.net")) (:maintainer "Torsten Hilbrich" . "torsten.hilbrich@gmx.net"))])
+ (didyoumean . [(20251103 1002) ((emacs (24 4))) "Did you mean to open another file?" tar ((:url . "https://gitlab.com/kisaragi-hiu/didyoumean.el") (:commit . "398fc3bf8ea520cd0517076bdc9b609cc6858c80") (:revdesc . "398fc3bf8ea5") (:keywords "convenience") (:authors ("Kisaragi Hiu" . "mail@kisaragi-hiu.com")) (:maintainers ("Kisaragi Hiu" . "mail@kisaragi-hiu.com")) (:maintainer "Kisaragi Hiu" . "mail@kisaragi-hiu.com"))])
+ (diff-ansi . [(20260713 2340) ((emacs (29 1))) "Display diffs using alternative diffing tools" tar ((:url . "https://codeberg.org/ideasman42/emacs-diff-ansi") (:commit . "86c0b3525b2793b585b548c6e975d6fe6a2cea2a") (:revdesc . "86c0b3525b27") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (diff-at-point . [(20260813 359) ((emacs (29 1))) "Diff navigation" tar ((:url . "https://codeberg.org/ideasman42/emacs-diff-at-point") (:commit . "5cdfc8fdefc9fd041eab364c9cdeb3db12f79469") (:revdesc . "5cdfc8fdefc9") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (diff-hl . [(20260811 347) ((cl-lib (0 2)) (emacs (27 1))) "Highlight uncommitted changes using VC" tar ((:url . "https://github.com/dgutov/diff-hl") (:commit . "6f1df2b83d1140a2938409b35de7f4c9c7b1defd") (:revdesc . "6f1df2b83d11") (:keywords "vc" "diff") (:authors ("Dmitry Gutov" . "dmitry@gutov.dev")) (:maintainers ("Dmitry Gutov" . "dmitry@gutov.dev")) (:maintainer "Dmitry Gutov" . "dmitry@gutov.dev"))])
+ (diffed . [(20240618 2037) ((emacs (27 1))) "Diffed is for recursive diff like Dired is for ls" tar ((:url . "https://github.com/ber-ro/diffed") (:commit . "93251169a4fc8c07fdd5f3d32c89b4d3401d37a1") (:revdesc . "93251169a4fc") (:keywords "tools") (:authors ("Bernhard Rotter" . "bernhard@b-rotter.de")) (:maintainers ("Bernhard Rotter" . "bernhard@b-rotter.de")) (:maintainer "Bernhard Rotter" . "bernhard@b-rotter.de"))])
+ (difflib . [(20260530 536) ((emacs (24 4)) (cl-generic (0 3)) (ht (2 2)) (s (1 12 0))) "Helpers for computing deltas between sequences" tar ((:url . "https://sr.ht/~dieggsy/difflib.el") (:commit . "9efb87bcf430600e8beb1a821dc78c1088a081e7") (:revdesc . "9efb87bcf430") (:keywords "matching" "tools" "string") (:authors ("Diego A. Mundo" . "dieggsy@pm.me")) (:maintainers ("Diego A. Mundo" . "dieggsy@pm.me")) (:maintainer "Diego A. Mundo" . "dieggsy@pm.me"))])
+ (diffpdf . [(20210626 1447) ((emacs (25 1)) (transient (0 3 0))) "Transient diffpdf" tar ((:url . "https://github.com/ShuguangSun/diffpdf.el") (:commit . "a5b203b549e373cb9b0ef3f00c0010bd34dd644a") (:revdesc . "a5b203b549e3") (:keywords "tools") (:authors ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainers ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainer "Shuguang Sun" . "shuguang79@qq.com"))])
+ (diffscuss-mode . [(20141014 2357) nil "Major mode for diffscuss files" tar ((:url . "https://github.com/tomheon/diffscuss") (:commit . "bbc6dbed4b97d1eb9ae5dae021ed1e066129bd98") (:revdesc . "bbc6dbed4b97") (:keywords "tools") (:authors ("Edmund Jorgensen" . "edmund@hut8labs.com")) (:maintainers ("Edmund Jorgensen" . "edmund@hut8labs.com")) (:maintainer "Edmund Jorgensen" . "edmund@hut8labs.com"))])
+ (difftastic . [(20260408 950) ((emacs (28 1)) (compat (29 1 4 2)) (magit (4 0 0)) (transient (0 4 0))) "Wrapper for difftastic" tar ((:url . "https://github.com/pkryger/difftastic.el") (:commit . "7db20929cac31687a529943c3d8d5b44fd8d69e2") (:revdesc . "7db20929cac3") (:keywords "tools" "diff") (:authors ("Przemyslaw Kryger" . "pkryger@gmail.com")) (:maintainers ("Przemyslaw Kryger" . "pkryger@gmail.com")) (:maintainer "Przemyslaw Kryger" . "pkryger@gmail.com"))])
+ (diffview . [(20230224 1916) nil "View diffs in side-by-side format" tar ((:url . "https://github.com/mgalgs/diffview-mode") (:commit . "8f07c0ff4a1acef990589df0d3e32288f19c9d71") (:revdesc . "8f07c0ff4a1a") (:keywords "convenience" "diff") (:authors ("Mitchel Humpherys" . "mitch.special@gmail.com")) (:maintainers ("Mitchel Humpherys" . "mitch.special@gmail.com")) (:maintainer "Mitchel Humpherys" . "mitch.special@gmail.com"))])
+ (digistar-mode . [(20250710 1554) ((emacs (25 1))) "Major mode for Digistar scripts" tar ((:url . "https://github.com/retroj/digistar-mode/") (:commit . "09063c4f05129be3c4b595a318edabf6ad05393a") (:revdesc . "09063c4f0512") (:keywords "languages") (:authors ("John Foerch" . "jjfoerch@gmail.com")) (:maintainers ("John Foerch" . "jjfoerch@gmail.com")) (:maintainer "John Foerch" . "jjfoerch@gmail.com"))])
+ (digit-groups . [(20200506 37) ((dash (2 11 0))) "Highlight place-value positions in numbers" tar ((:url . "https://github.com/adamsmd/digit-groups/") (:commit . "7b81930cad19b8b7913b7eedbcb498964bfdcbdb") (:revdesc . "7b81930cad19") (:authors ("Michael D. Adams" . "http://michaeldadams.org")) (:maintainers ("Michael D. Adams" . "http://michaeldadams.org")) (:maintainer "Michael D. Adams" . "http://michaeldadams.org"))])
+ (digitalocean . [(20190607 726) ((request (2 5)) (emacs (24 4))) "Create and manipulate digitalocean droplets" tar ((:url . "https://github.com/olymk2/emacs-digitalocean") (:commit . "6c32d3593286e2a62d9afab0057c829407b0d1e8") (:revdesc . "6c32d3593286") (:keywords "processes" "tools") (:authors ("Oliver Marks" . "oly@digitaloctave.com")) (:maintainers ("Oliver Marks" . "oly@digitaloctave.com")) (:maintainer "Oliver Marks" . "oly@digitaloctave.com"))])
+ (digitalocean-helm . [(20180610 746) ((emacs (24 3)) (helm (2 5)) (digitalocean (0 1))) "Create and manipulate digitalocean droplets" tar ((:url . "https://gitlab.com/olymk2/digitalocean-api") (:commit . "b125c9882eded7d73ec109d152b26625f333440b") (:revdesc . "b125c9882ede") (:keywords "processes" "tools") (:authors ("Oliver Marks" . "oly@digitaloctave.com")) (:maintainers ("Oliver Marks" . "oly@digitaloctave.com")) (:maintainer "Oliver Marks" . "oly@digitaloctave.com"))])
+ (dilbert . [(20211118 1512) ((emacs (26 1)) (enlive (0 0 1)) (dash (2 19 1))) "View Dilbert comics" tar ((:url . "https://github.com/DaniruKun/dilbert-el") (:commit . "d8c586f1bac58c334822b64bce671dde5e25a27f") (:revdesc . "d8c586f1bac5") (:keywords "multimedia" "news") (:authors ("Daniils Petrovs" . "thedanpetrov@gmail.com")) (:maintainers ("Daniils Petrovs" . "thedanpetrov@gmail.com")) (:maintainer "Daniils Petrovs" . "thedanpetrov@gmail.com"))])
+ (dim . [(20160818 949) ((emacs (24 4))) "Change mode-line names of major/minor modes" tar ((:url . "https://github.com/alezost/dim.el") (:commit . "110624657fec0c8a7b3589108230e6a635302ae0") (:revdesc . "110624657fec") (:keywords "convenience") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (dim-autoload . [(20260601 1459) ((emacs (28 1)) (compat (30 1))) "Dim or hide autoload cookie lines" tar ((:url . "https://github.com/tarsius/dim-autoload") (:commit . "a9024464f0f0573338eaa490cfca998e66bf47f7") (:revdesc . "a9024464f0f0") (:keywords "convenience") (:authors ("Jonas Bernoulli" . "emacs.dim-autoload@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.dim-autoload@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.dim-autoload@jonas.bernoulli.dev"))])
+ (dime . [(20260212 8) ((emacs (25 1)) (dylan (3 0))) "Dylan interaction mode" tar ((:url . "https://opendylan.org/") (:commit . "c22f339b5394d26af4961192825e58ae766965ec") (:revdesc . "c22f339b5394"))])
+ (diminish . [(20220909 847) ((emacs (24 3))) "Diminished modes are minor modes with no modeline display" tar ((:url . "https://github.com/myrjola/diminish.el") (:commit . "fbd5d846611bad828e336b25d2e131d1bc06b83d") (:revdesc . "fbd5d846611b") (:keywords "extensions" "diminish" "minor" "codeprose") (:authors ("Will Mengarini" . "seldon@eskimo.com")) (:maintainers ("Martin Yrjölä" . "martin.yrjola@gmail.com")) (:maintainer "Martin Yrjölä" . "martin.yrjola@gmail.com"))])
+ (diminish-buffer . [(20260101 558) ((emacs (24 4))) "Diminish (hide) buffers from buffer-menu" tar ((:url . "https://github.com/jcs-elpa/diminish-buffer") (:commit . "bd94b5b58655454728b655a30c93c0347749cf37") (:revdesc . "bd94b5b58655") (:keywords "convenience" "diminish" "hide" "buffer" "menu") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (dimmer . [(20260618 1559) ((emacs (27 1))) "Visually highlight the selected buffer" tar ((:url . "https://github.com/gonewest818/dimmer.el") (:commit . "bbab62f01d45086b9098f6a0ab765282d9c7bc45") (:revdesc . "bbab62f01d45") (:keywords "faces" "editing"))])
+ (dionysos . [(20160810 1056) ((libmpdee (2 1 0)) (alert (1 2)) (s (1 11 0)) (dash (2 12 1)) (pkg-info (0 5 0)) (cl-lib (0 5))) "Dionysos, a music player for Emacs" tar ((:url . "https://github.com/nlamirault/dionysos") (:commit . "98bc789d20e41020d6e62d63d3c78f8032fa4bf2") (:revdesc . "98bc789d20e4") (:keywords "music") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (dir-config . [(20260826 245) ((emacs (25 1))) "Find and evaluate .dir-config.el (dir-locals alternative)" tar ((:url . "https://github.com/jamescherti/dir-config.el") (:commit . "08aed2f99b1d9670bc9d4e7a5b3ffded4d7dfe3b") (:revdesc . "08aed2f99b1d") (:keywords "convenience" "files" "lisp") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (dir-treeview . [(20241025 2251) ((emacs (25 1)) (treeview (1 3 0))) "A directory tree browser and simple file manager" tar ((:url . "https://github.com/tilmanrassy/emacs-dir-treeview") (:commit . "09cf976b0f5999e378141bb66361395f1832aeae") (:revdesc . "09cf976b0f59") (:keywords "tools" "convenience" "files") (:authors ("Tilman Rassy" . "tilman.rassy@googlemail.com")) (:maintainers ("Tilman Rassy" . "tilman.rassy@googlemail.com")) (:maintainer "Tilman Rassy" . "tilman.rassy@googlemail.com"))])
+ (dir-treeview-themes . [(20230112 134) ((emacs (24 4)) (dir-treeview (1 3 3))) "Themes for dir-treeview" tar ((:url . "https://github.com/tilmanrassy/emacs-dir-treeview-themes") (:commit . "8e28c2501a978e6ff733fc9cf43a826fd8e7b87e") (:revdesc . "8e28c2501a97") (:keywords "tools" "convenience" "files") (:authors ("Tilman Rassy" . "tilman.rassy@googlemail.com")) (:maintainers ("Tilman Rassy" . "tilman.rassy@googlemail.com")) (:maintainer "Tilman Rassy" . "tilman.rassy@googlemail.com"))])
+ (dircmp . [(20141204 1756) nil "Compare and sync directories" tar ((:url . "https://github.com/matthewlmcclure/dircmp-mode") (:commit . "558ee0b601c2de9d247612085aafe2926f56a09f") (:revdesc . "558ee0b601c2") (:keywords "unix" "tools"))])
+ (director . [(20230213 1201) ((emacs (27 1))) "Simulate user sessions" tar ((:url . "https://bard.github.io/emacs-director") (:commit . "16afdbbd91b451fab44c68c8f7d0b810f5283f28") (:revdesc . "16afdbbd91b4") (:keywords "maint" "tools") (:authors ("Massimiliano Mirra" . "hyperstruct@gmail.com")) (:maintainers ("Massimiliano Mirra" . "hyperstruct@gmail.com")) (:maintainer "Massimiliano Mirra" . "hyperstruct@gmail.com"))])
+ (directory-slideshow . [(20251218 554) ((emacs (29 4))) "Simple slideshows from files" tar ((:url . "https://github.com/Duncan-Britt/directory-slideshow") (:commit . "a54e6bc923f1f31867d7899ec179eb91f3dda300") (:revdesc . "a54e6bc923f1") (:keywords "multimedia"))])
+ (dired-atool . [(20210719 404) ((emacs (24))) "Pack/unpack files with atool on dired" tar ((:url . "https://github.com/HKey/dired-atool") (:commit . "01416fd5961b901c50686c91cb59b3833adc831b") (:revdesc . "01416fd5961b") (:keywords "files") (:authors ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainers ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainer "Hiroki YAMAKAWA" . "s06139@gmail.com"))])
+ (dired-auto-readme . [(20250726 1928) ((emacs (29 1)) (markdown-mode (2 5))) "Auto-display README file in Dired buffers" tar ((:url . "https://github.com/amno1/dired-auto-readme") (:commit . "d1cced1a5cf26ff50a8c1585b6e6813a3ddb8395") (:revdesc . "d1cced1a5cf2") (:keywords "tools" "convenience"))])
+ (dired-avfs . [(20240629 1857) ((dash (2 5 0)) (dired-hacks-utils (0 0 1)) (emacs (24))) "AVFS support for dired" tar ((:url . "https://github.com/Fuco1/dired-hacks") (:commit . "d1a85901c892ba7ec273995070a43cbbbe5d0b37") (:revdesc . "d1a85901c892") (:keywords "files") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (dired-collapse . [(20240629 1857) ((f (0 19 0)) (s (1 13 1)) (dired-hacks-utils (0 0 1)) (emacs (24))) "Collapse unique nested paths in dired listing" tar ((:url . "https://github.com/Fuco1/dired-hacks") (:commit . "d1a85901c892ba7ec273995070a43cbbbe5d0b37") (:revdesc . "d1a85901c892") (:keywords "files") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (dired-du-duc . [(20260205 1758) ((emacs (29 1)) (dired-du (0 5 2))) "Speed up dired-du with duc" tar ((:url . "https://github.com/meedstrom/dired-du-duc") (:commit . "f7f1a915e5a39109c00cabc3ab2a38c77750c195") (:revdesc . "f7f1a915e5a3") (:keywords "files") (:authors ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainers ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainer "Martin Edström" . "meedstrom91@gmail.com"))])
+ (dired-duplicates . [(20240328 2016) ((emacs (27 1))) "Find duplicate files locally and remotely" tar ((:url . "https://codeberg.org/hjudt/dired-duplicates") (:commit . "5c5f24bea92159987f65f01ef32b261e905997bd") (:revdesc . "5c5f24bea921") (:keywords "files") (:authors ("Harald Judt" . "h.judt@gmx.at")) (:maintainers ("Harald Judt" . "h.judt@gmx.at")) (:maintainer "Harald Judt" . "h.judt@gmx.at"))])
+ (dired-dups . [(20130527 2125) nil "Find duplicate files and display them in a dired buffer" tar ((:url . "https://github.com/vapniks/dired-dups") (:commit . "694ad128c822c59348ced16c4a0c1356d43da47a") (:revdesc . "694ad128c822") (:keywords "unix") (:authors ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainers ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainer "Joe Bloggs" . "vapniks@yahoo.com"))])
+ (dired-efap . [(20250726 1400) nil "Edit Filename At Point in a dired buffer" tar ((:url . "https://github.com/juan-leon/dired-efap") (:commit . "34afe56327e26b90634e054e3b38e69c82f833bd") (:revdesc . "34afe56327e2") (:keywords "dired" "environment" "files" "renaming") (:authors ("Juan-Leon Lahoz" . "juanleon1@gmail.com")) (:maintainers ("Juan-Leon Lahoz" . "juanleon1@gmail.com")) (:maintainer "Juan-Leon Lahoz" . "juanleon1@gmail.com"))])
+ (dired-explorer . [(20260306 522) ((emacs (24 3))) "Provide Explorer-like file selection in Dired" tar ((:url . "https://github.com/jidaikobo-shibata/dired-explorer") (:commit . "4d36d3ad18a310843f96bd35ff3aabc4406b4854") (:revdesc . "4d36d3ad18a3") (:keywords "dired" "explorer"))])
+ (dired-filetype-face . [(20250412 1344) nil "Set different faces for different filetypes in dired" tar ((:url . "https://github.com/jixiuf/dired-filetype-face") (:commit . "41288f9f35a7ef830b9e78fe252b367aee078c96") (:revdesc . "41288f9f35a7") (:keywords "dired" "filetype" "face") (:authors (nil . "jixiufatgmaildotcom")) (:maintainers (nil . "jixiufatgmaildotcom")) (:maintainer nil . "jixiufatgmaildotcom"))])
+ (dired-filter . [(20240629 1857) ((dash (2 10 0)) (dired-hacks-utils (0 0 1)) (f (0 17 0)) (cl-lib (0 3)) (emacs (24))) "Ibuffer-like filtering for dired" tar ((:url . "https://github.com/Fuco1/dired-hacks") (:commit . "d1a85901c892ba7ec273995070a43cbbbe5d0b37") (:revdesc . "d1a85901c892") (:keywords "files") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (dired-git . [(20220828 6) ((emacs (26 1)) (async-await (1 0)) (async (1 9 4)) (all-the-icons (2 2 0)) (ppp (1 0 0))) "Git integration for dired" tar ((:url . "https://github.com/conao3/dired-git.el") (:commit . "e84387b947cd707d3ff0c039ddef753a468f88e7") (:revdesc . "e84387b947cd") (:keywords "tools") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (dired-gitignore . [(20230909 1408) ((emacs (27 1))) "A minor mode to hide gitignored files in a dired buffer" tar ((:url . "https://github.com/johannes-mueller/dired-gitignore.el") (:commit . "b6e804c212b497d5502600bd4df10196e44d2bf7") (:revdesc . "b6e804c212b4") (:keywords "dired" "convenience" "git") (:authors ("Johannes Mueller" . "github@johannes-mueller.org")) (:maintainers ("Johannes Mueller" . "github@johannes-mueller.org")) (:maintainer "Johannes Mueller" . "github@johannes-mueller.org"))])
+ (dired-hacks-utils . [(20240629 1906) ((dash (2 5 0)) (emacs (24 3))) "Utilities and helpers for dired-hacks collection" tar ((:url . "https://github.com/Fuco1/dired-hacks") (:commit . "63b04d17936c98cb4ad7ce6bc3331cda8e30c55a") (:revdesc . "63b04d17936c") (:keywords "files") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (dired-hide-dotfiles . [(20240727 1720) ((emacs (25 1))) "Hide dotfiles in dired" tar ((:url . "https://github.com/mattiasb/dired-hide-dotfiles") (:commit . "0d035ba8c5decc5957d50f3c64ef860b5c2093a1") (:revdesc . "0d035ba8c5de") (:keywords "files") (:authors ("Mattias Bengtsson" . "mattias.jc.bengtsson@gmail.com")) (:maintainers ("Mattias Bengtsson" . "mattias.jc.bengtsson@gmail.com")) (:maintainer "Mattias Bengtsson" . "mattias.jc.bengtsson@gmail.com"))])
+ (dired-hist . [(20251110 1828) ((emacs (27 1))) "Traverse Dired buffer's history: back, forward" tar ((:url . "https://codeberg.org/Anoncheg/dired-hist") (:commit . "8cca7292086b849ef170d17bc6beafbc2d3228b6") (:revdesc . "8cca7292086b") (:keywords "convenience" "dired" "history") (:authors ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com")) (:maintainers ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com")) (:maintainer "Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com"))])
+ (dired-icon . [(20170223 526) ((emacs (24 3))) "A minor mode to display a list of associated icons in dired buffers" tar ((:url . "https://gitlab.com/xuhdev/dired-icon") (:commit . "f60e10757a5011235b519231ad35974ff25963ed") (:revdesc . "f60e10757a50") (:keywords "dired" "files") (:authors ("Hong Xu" . "hong@topbug.net")) (:maintainers ("Hong Xu" . "hong@topbug.net")) (:maintainer "Hong Xu" . "hong@topbug.net"))])
+ (dired-imenu . [(20230904 1810) nil "Imenu binding for dired mode" tar ((:url . "https://github.com/DamienCassou/dired-imenu") (:commit . "4f6169f9056fe5f9b9a97e9e75f27825a15e05b9") (:revdesc . "4f6169f9056f") (:keywords "dired" "imenu") (:authors ("Damien Cassou" . "damien.cassou@gmail.com")) (:maintainers ("Damien Cassou" . "damien.cassou@gmail.com")) (:maintainer "Damien Cassou" . "damien.cassou@gmail.com"))])
+ (dired-k . [(20211002 2358) ((emacs (24 3))) "Highlight dired by size, date, git status" tar ((:url . "https://github.com/emacsorphanage/dired-k") (:commit . "b9507bac79fc8c030abbec389267262bc671f58b") (:revdesc . "b9507bac79fc") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Neil Okamoto" . "neil.okamoto+melpa@gmail.com")) (:maintainer "Neil Okamoto" . "neil.okamoto+melpa@gmail.com"))])
+ (dired-launch . [(20250128 1955) ((emacs (24 3))) "Use dired as a launcher" tar ((:url . "https://codeberg.org/thomp/dired-launch") (:commit . "32ba5b600034a58511fc243fd06165cc07120cbb") (:revdesc . "32ba5b600034") (:keywords "dired" "launch"))])
+ (dired-list . [(20240318 845) ((dash (2 10 0)) (emacs (24 3)) (dired-hacks-utils (0 0 1))) "Create dired listings from sources" tar ((:url . "https://github.com/Fuco1/dired-hacks") (:commit . "475be5486bc2d593283ba6e8c8c43053d4cbdd7f") (:revdesc . "475be5486bc2") (:keywords "files") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (dired-lsi . [(20200812 929) ((emacs (26 1))) "Add memo to directory and show it in dired" tar ((:url . "https://github.com/conao3/dired-lsi.el") (:commit . "0f4038c8b47f6cfc70f82062800700c14c9912c2") (:revdesc . "0f4038c8b47f") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (dired-narrow . [(20250511 2303) ((dash (2 7 0)) (dired-hacks-utils (0 0 1)) (emacs (24))) "Live-narrowing of search results for dired" tar ((:url . "https://github.com/Fuco1/dired-hacks") (:commit . "bb5d1c3c8b0bb6025335dabb4b3639d60acc6a12") (:revdesc . "bb5d1c3c8b0b") (:keywords "files") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (dired-open . [(20240629 1857) ((dash (2 5 0)) (dired-hacks-utils (0 0 1)) (emacs (24))) "Open files from dired using using custom actions" tar ((:url . "https://github.com/Fuco1/dired-hacks") (:commit . "d1a85901c892ba7ec273995070a43cbbbe5d0b37") (:revdesc . "d1a85901c892") (:keywords "files") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (dired-open-with . [(20240923 2050) ((emacs (28 1))) "And \"Open with\" dialog for Dired" tar ((:url . "https://github.com/FrostyX/dired-open-with") (:commit . "5f9fddecea3d467a6d7bdb6a1863505b92a81e0d") (:revdesc . "5f9fddecea3d") (:keywords "files" "dired" "xdg" "open-with") (:authors ("Jakub Kadlčík" . "frostyx@email.cz")) (:maintainers ("Jakub Kadlčík" . "frostyx@email.cz")) (:maintainer "Jakub Kadlčík" . "frostyx@email.cz"))])
+ (dired-posframe . [(20200817 420) ((emacs (26 1)) (posframe (0 7))) "Peep dired items using posframe" tar ((:url . "https://github.com/conao3/dired-posframe.el") (:commit . "1a21eb9ad956a0371dd3c9e1bec53407d685f705") (:revdesc . "1a21eb9ad956") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (dired-quick-sort . [(20260331 2219) ((emacs (28))) "Persistent quick sorting of Dired buffers in various ways" tar ((:url . "https://gitlab.com/xuhdev/dired-quick-sort") (:commit . "3c9b41799b0424eb78f54caba56e4de1d7224e8b") (:revdesc . "3c9b41799b04") (:keywords "convenience" "files") (:authors ("Hong Xu" . "hong@topbug.net")) (:maintainers ("Hong Xu" . "hong@topbug.net")) (:maintainer "Hong Xu" . "hong@topbug.net"))])
+ (dired-rainbow . [(20240629 1857) ((dash (2 5 0)) (dired-hacks-utils (0 0 1)) (emacs (24))) "Extended file highlighting according to its type" tar ((:url . "https://github.com/Fuco1/dired-hacks") (:commit . "d1a85901c892ba7ec273995070a43cbbbe5d0b37") (:revdesc . "d1a85901c892") (:keywords "files") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (dired-ranger . [(20240629 1857) ((dash (2 7 0)) (dired-hacks-utils (0 0 1)) (emacs (24 3))) "Implementation of useful ranger features for dired" tar ((:url . "https://github.com/Fuco1/dired-hacks") (:commit . "d1a85901c892ba7ec273995070a43cbbbe5d0b37") (:revdesc . "d1a85901c892") (:keywords "files") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (dired-recent . [(20211004 1924) ((emacs (24))) "Dired visited paths history" tar ((:url . "https://github.com/vifon/dired-recent.el") (:commit . "a376f53e42fdca80c3286e8111578c65c64b0711") (:revdesc . "a376f53e42fd") (:keywords "files") (:authors ("Wojciech Siewierski" . "wojciechdotsiewierskiatonetdotpl")) (:maintainers ("Wojciech Siewierski" . "wojciechdotsiewierskiatonetdotpl")) (:maintainer "Wojciech Siewierski" . "wojciechdotsiewierskiatonetdotpl"))])
+ (dired-rifle . [(20250307 130) nil "Call rifle(1) from dired" tar ((:url . "https://github.com/vifon/dired-rifle.el") (:commit . "4bc28f2892cf586cde0a200e350b17218dc556c4") (:revdesc . "4bc28f2892cf") (:keywords "files" "convenience") (:authors ("Wojciech Siewierski" . "wojciechdotsiewierskiatonetdotpl")) (:maintainers ("Wojciech Siewierski" . "wojciechdotsiewierskiatonetdotpl")) (:maintainer "Wojciech Siewierski" . "wojciechdotsiewierskiatonetdotpl"))])
+ (dired-rmjunk . [(20191007 1232) nil "A home directory cleanup utility for Dired" tar ((:url . "https://git.sr.ht/~jakob/dired-rmjunk") (:commit . "0e890a41fa680a45b4b4aad2c28f9d6dca999cee") (:revdesc . "0e890a41fa68") (:keywords "files" "matching") (:authors ("Jakob L. Kreuze" . "zerodaysfordays@sdf.lonestar.org")) (:maintainers ("Jakob L. Kreuze" . "zerodaysfordays@sdf.lonestar.org")) (:maintainer "Jakob L. Kreuze" . "zerodaysfordays@sdf.lonestar.org"))])
+ (dired-rsync . [(20260716 1319) ((s (1 12 0)) (dash (2 0 0)) (emacs (25 1))) "Allow rsync from dired buffers" tar ((:url . "https://github.com/stsquad/dired-rsync") (:commit . "eecf700ce70b282040b87ccdb76ff4195bdba919") (:revdesc . "eecf700ce70b") (:authors ("Alex Bennée" . "alex@bennee.com")) (:maintainers ("Alex Bennée" . "alex@bennee.com")) (:maintainer "Alex Bennée" . "alex@bennee.com"))])
+ (dired-rsync-transient . [(20230714 1459) ((dired-rsync (0 6)) (transient (0 3 0)) (emacs (24 4))) "Transient command for dired-rsync" tar ((:url . "https://github.com/stsquad/dired-rsync") (:commit . "95607fc7eb84e792122b52d2b1d62f49199a2a37") (:revdesc . "95607fc7eb84") (:authors ("Alex Bennée" . "alex@bennee.com")) (:maintainers ("Alex Bennée" . "alex@bennee.com")) (:maintainer "Alex Bennée" . "alex@bennee.com"))])
+ (dired-sidebar . [(20260806 2140) ((emacs (29 1)) (compat (30 0 0 0))) "Tree browser leveraging dired" tar ((:url . "https://github.com/jojojames/dired-sidebar") (:commit . "af43b8164191a6afb656a524c48010eb9e372c5d") (:revdesc . "af43b8164191") (:keywords "dired" "files" "tools") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (dired-subtree . [(20240629 1859) ((dash (2 5 0)) (dired-hacks-utils (0 0 1)) (emacs (24 3))) "Insert subdirectories in a tree-like fashion" tar ((:url . "https://github.com/Fuco1/dired-hacks") (:commit . "b769c7de9c8c5dc70e4dcdbb3267c70fae3cb9b7") (:revdesc . "b769c7de9c8c") (:keywords "files") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (dired-toggle . [(20190616 303) nil "Show dired as sidebar and will not create new buffers when changing dir" tar ((:url . "https://github.com/fasheng/dired-toggle") (:commit . "b694ba91a45d0762bd032ff1bb4109e4c62ca686") (:revdesc . "b694ba91a45d") (:keywords "dired" "sidebar") (:authors ("Xu FaSheng" . "fasheng[AT]fasheng.info")))])
+ (dired-toggle-sudo . [(20211216 102) nil "Browse directory with sudo privileges" tar ((:url . "https://github.com/renard/dired-toggle-sudo") (:commit . "9f86cdf858225b15c20affb97ed105e4109047bf") (:revdesc . "9f86cdf85822") (:keywords "emacs" "dired") (:authors ("Sebastien Gross" . "seb•ɑƬ•chezwam•ɖɵʈ•org")) (:maintainers ("Sebastien Gross" . "seb•ɑƬ•chezwam•ɖɵʈ•org")) (:maintainer "Sebastien Gross" . "seb•ɑƬ•chezwam•ɖɵʈ•org"))])
+ (dired-video-thumbnail . [(20251215 816) ((emacs (28 1))) "Display video thumbnails from dired" tar ((:url . "https://github.com/captainflasmr/dired-video-thumbnail") (:commit . "4735c6d81c48228f9dccc48a09ca715bf2e6ffad") (:revdesc . "4735c6d81c48") (:keywords "multimedia" "files" "dired"))])
+ (dired-view-data . [(20260822 1255) ((emacs (26 1)) (ess (18 10 1)) (ess-view-data (1 5))) "View data from dired via ESS and R" tar ((:url . "https://github.com/ShuguangSun/dired-view-data") (:commit . "dd1aeb67a59321e82d755e065181af074f661efa") (:revdesc . "dd1aeb67a593") (:keywords "tools") (:authors ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainers ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainer "Shuguang Sun" . "shuguang79@qq.com"))])
+ (diredc . [(20260714 1154) ((emacs (26 1)) (key-assist (1 0))) "Midnight Commander features (plus) for dired" tar ((:url . "https://github.com/Boruch-Baum/emacs-diredc") (:commit . "0ad972d370e63e9b81909a60c06a147986de84f2") (:revdesc . "0ad972d370e6") (:keywords "files"))])
+ (diredfd . [(20260206 337) ((emacs (28 1))) "Dired functions and settings to mimic FD/FDclone" tar ((:url . "https://github.com/knu/diredfd.el") (:commit . "a3eb656d2bd201a193fdb1ac547c075717ee7561") (:revdesc . "a3eb656d2bd2") (:keywords "unix" "directories" "dired") (:authors ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (diredfl . [(20241201 1141) ((emacs (24))) "Extra font lock rules for a more colourful dired" tar ((:url . "https://github.com/purcell/diredfl") (:commit . "fe72d2e42ee18bf6228bba9d7086de4098f18a70") (:revdesc . "fe72d2e42ee1") (:keywords "faces") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (diredful . [(20160529 2017) nil "Colorful file names in dired buffers" tar ((:url . "https://github.com/thamer/diredful") (:commit . "b17b3087e0084a5571a9ac4d47ccfc36d96b109e") (:revdesc . "b17b3087e008") (:keywords "dired" "colors" "extension" "widget") (:authors ("Thamer Mahmoud" . "thamer.mahmoud@gmail.com")) (:maintainers ("Thamer Mahmoud" . "thamer.mahmoud@gmail.com")) (:maintainer "Thamer Mahmoud" . "thamer.mahmoud@gmail.com"))])
+ (direnv . [(20260630 839) ((emacs (25 1)) (dash (2 12 0))) "Direnv integration" tar ((:url . "https://github.com/wbolster/emacs-direnv") (:commit . "c1f38f71184f8aa3130898932f2de638beb5ed33") (:revdesc . "c1f38f71184f") (:keywords "direnv" "environment" "processes" "unix" "tools") (:authors ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "wouter bolsterlee" . "wouter@bolsterl.ee"))])
+ (direx . [(20230409 1425) nil "Simple Directory Explorer" tar ((:url . "https://github.com/emacsorphanage/direx") (:commit . "935d2010234c02c93e22d6e1cc72d595341ba855") (:revdesc . "935d2010234c") (:keywords "convenience") (:authors ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainers ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainer "Tomohiro Matsuyama" . "m2ym.pub@gmail.com"))])
+ (direx-grep . [(20140515 1506) ((direx (0 1 -3))) "Grep node of direx.el using incremental search like anything.el/helm.el" tar ((:url . "https://github.com/aki2o/direx-grep") (:commit . "1109a512a80b2673a70b18b8568514049017faad") (:revdesc . "1109a512a80b") (:keywords "convenience") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (dirtree . [(20140129 832) ((tree-mode (1 1 1 1)) (windata (0))) "Directory tree views" tar ((:url . "https://github.com/emacsorphanage/dirtree") (:commit . "ba55f1e716e386fdd37cb8e7f48616e405dc7251") (:revdesc . "ba55f1e716e3") (:authors ("Ye Wenbin" . "wenbinye@gmail.com")) (:maintainers ("Ye Wenbin" . "wenbinye@gmail.com")) (:maintainer "Ye Wenbin" . "wenbinye@gmail.com"))])
+ (dirtree-prosjekt . [(20140129 904) ((prosjekt (0 3)) (dirtree (0 1))) "Dirtree integration for prosjekt" tar ((:url . "https://github.com/abingham/prosjekt") (:commit . "03e06910589ba5cd736868793eb436b3233c6a26") (:revdesc . "03e06910589b") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (dirvish . [(20260725 1520) ((emacs (28 1)) (compat (30))) "A modern file manager based on dired mode" tar ((:url . "https://github.com/alexluigit/dirvish") (:commit . "bf164ee21e128837ede59be03836a9900c4a41be") (:revdesc . "bf164ee21e12") (:keywords "files" "convenience") (:authors ("Alex Lu" . "https://github.com/alexluigit")) (:maintainers ("Alex Lu" . "https://github.com/alexluigit")) (:maintainer "Alex Lu" . "https://github.com/alexluigit"))])
+ (disable-mouse . [(20240604 900) ((emacs (24 1))) "Disable mouse commands globally" tar ((:url . "https://github.com/purcell/disable-mouse") (:commit . "93a55a6453f34049375f97d3cf817b4e6db46f25") (:revdesc . "93a55a6453f3") (:keywords "mouse") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (disaster . [(20250828 2224) ((emacs (27))) "Disassemble C, C++ or Fortran code under cursor" tar ((:url . "https://github.com/jart/disaster") (:commit . "0299c129d4153e3a794358159737c3ff9d155654") (:revdesc . "0299c129d415") (:keywords "tools" "c") (:authors ("Justine Tunney" . "jtunney@gmail.com") ("Abdelhak Bougouffa" . "abougouffa@fedoraproject.org")) (:maintainers ("Abdelhak Bougouffa" . "abougouffa@fedoraproject.org")) (:maintainer "Abdelhak Bougouffa" . "abougouffa@fedoraproject.org"))])
+ (discourse . [(20160911 819) ((cl-lib (0 5)) (request (0 2)) (s (1 11 0))) "Discourse api" tar ((:url . "https://github.com/lujun9972/discourse-api") (:commit . "a86c7e608851e186fe12e892a573994f08c8e65e") (:revdesc . "a86c7e608851") (:keywords "lisp" "discourse") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (discover . [(20140103 2139) ((makey (0 3))) "Discover more of Emacs" tar ((:url . "https://github.com/mickeynp/discover.el") (:commit . "bbfda2b4e429985a8fa7971d264c942767cfa816") (:revdesc . "bbfda2b4e429") (:authors ("Mickey Petersen" . "mickey@fyeah.org")) (:maintainers ("Mickey Petersen" . "mickey@fyeah.org")) (:maintainer "Mickey Petersen" . "mickey@fyeah.org"))])
+ (discover-clj-refactor . [(20150328 1459) ((clj-refactor (0 14 0)) (discover (0 3))) "Adds discover context menu for clj-refactor" tar ((:url . "https://github.com/maio/discover-clj-refactor.el") (:commit . "3fbd5c1162739e606d7cf5d4f5d7426547d99647") (:revdesc . "3fbd5c116273") (:keywords "clj-refactor" "discover" "convenience") (:authors ("Marian Schubert" . "marian.schubert@gmail.com")) (:maintainers ("Marian Schubert" . "marian.schubert@gmail.com")) (:maintainer "Marian Schubert" . "marian.schubert@gmail.com"))])
+ (discover-js2-refactor . [(20140129 1552) ((js2-refactor (20131221 501)) (discover (20140103 1339))) "Adds discover context menu for js2-refactor" tar ((:url . "https://github.com/NicolasPetton/discover-js2-refactor") (:commit . "3812abf61f39f3e73a9f3daefa6fed4f21a429ba") (:revdesc . "3812abf61f39") (:keywords "js2-refactor" "discover") (:authors ("Nicolas Petton" . "petton.nicolas@gmail.com")) (:maintainers ("Nicolas Petton" . "petton.nicolas@gmail.com")) (:maintainer "Nicolas Petton" . "petton.nicolas@gmail.com"))])
+ (discover-my-major . [(20180606 511) ((makey (0 2))) "Discover key bindings and their meaning for the current Emacs major mode" tar ((:url . "https://framagit.org/steckerhalter/discover-my-major") (:commit . "66081546eac360c83a9c3270db92a2164288b0d0") (:revdesc . "66081546eac3") (:keywords "discover" "help" "major-mode" "keys"))])
+ (dispass . [(20140202 1531) ((dash (1 0 0))) "Emacs wrapper for DisPass" tar ((:url . "http://projects.ryuslash.org/dispass.el/") (:commit . "b6e8f89040ebaaf0e7609b04bc27a8979f0ae861") (:revdesc . "b6e8f89040eb") (:keywords "processes") (:authors ("Tom Willemsen" . "tom@ryuslash.org")) (:maintainers ("Tom Willemsen" . "tom@ryuslash.org")) (:maintainer "Tom Willemsen" . "tom@ryuslash.org"))])
+ (display-theme . [(20140115 1556) ((emacs (24))) "Display current theme(s) at mode-line" tar ((:url . "https://github.com/kawabata/emacs-display-theme/") (:commit . "b180b3be7a74ae4799a14e7e4bc2fe10e3ff7a15") (:revdesc . "b180b3be7a74") (:keywords "tools") (:authors ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (display-wttr . [(20221102 1426) ((emacs (27 1))) "Display wttr(weather) in the mode line" tar ((:url . "https://github.com/josegpt/display-wttr") (:commit . "7062953d034e27c297d58748cf74dad552aa2873") (:revdesc . "7062953d034e") (:authors ("Jose G Perez Taveras" . "josegpt27@gmail.com")) (:maintainers ("Jose G Perez Taveras" . "josegpt27@gmail.com")) (:maintainer "Jose G Perez Taveras" . "josegpt27@gmail.com"))])
+ (disproject . [(20260114 1438) ((emacs (29 4)) (transient (0 9 2))) "Dispatch project commands with Transient" tar ((:url . "https://github.com/aurtzy/disproject") (:commit . "9282473adbf450785741fe6cd02abf6ffed7b9f0") (:revdesc . "9282473adbf4") (:keywords "convenience" "files" "vc") (:authors ("Alvin Hsu" . "aurtzy@gmail.com")) (:maintainers ("Alvin Hsu" . "aurtzy@gmail.com")) (:maintainer "Alvin Hsu" . "aurtzy@gmail.com"))])
+ (dispwatch . [(20210305 342) ((emacs (24 4))) "Watch displays for configuration changes" tar ((:url . "https://github.com/mnp/dispwatch") (:commit . "03abbac89a9f625aaa1a808dd49ae4906f466421") (:revdesc . "03abbac89a9f") (:keywords "frames") (:authors ("Mitchell Perilstein" . "mitchell.perilstein@gmail.com")) (:maintainers ("Mitchell Perilstein" . "mitchell.perilstein@gmail.com")) (:maintainer "Mitchell Perilstein" . "mitchell.perilstein@gmail.com"))])
+ (dist-file-mode . [(20240107 2040) ((emacs (26))) "Dispatch major mode for *.dist files" tar ((:url . "https://github.com/emacs-php/dist-file-mode.el") (:commit . "8bb2f05487164cd690cac9c9c442969f6f79b81f") (:revdesc . "8bb2f0548716") (:keywords "files" "convenience") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (distel-completion-lib . [(20180827 1344) nil "Completion library for Erlang/Distel" tar ((:url . "github.com/sebastiw/distel-completion") (:commit . "acc4c0a5521904203d797fe96b08e5fae4233c7e") (:revdesc . "acc4c0a55219") (:keywords "erlang" "distel" "completion"))])
+ (distinguished-theme . [(20151216 2015) nil "A dark and elegant theme for emacs" tar ((:url . "https://github.com/Lokaltog/distinguished-theme") (:commit . "9b1d25ac59465a5016d187ea84b7614c95a29b3b") (:revdesc . "9b1d25ac5946") (:authors ("Kim Silkebækken" . "kim.silkebaekken@gmail.com")) (:maintainers ("Kim Silkebækken" . "kim.silkebaekken@gmail.com")) (:maintainer "Kim Silkebækken" . "kim.silkebaekken@gmail.com"))])
+ (ditz-mode . [(20150729 940) nil "Emacs interface to Ditz issue tracking system" tar ((:commit . "56668844acd91c3d15a08ba406dbb1ba0c2fe9b4") (:revdesc . "56668844acd9") (:keywords "tools") (:authors ("Glenn Hutchings" . "zondo42@gmail.com")) (:maintainers ("Glenn Hutchings" . "zondo42@gmail.com")) (:maintainer "Glenn Hutchings" . "zondo42@gmail.com"))])
+ (dix . [(20250430 915) ((cl-lib (0 5)) (emacs (26 2))) "Apertium XML editing minor mode" tar ((:url . "http://wiki.apertium.org/wiki/Emacs") (:commit . "c833800623eaeab74b4d578a2d0219882320c0d2") (:revdesc . "c833800623ea") (:keywords "languages") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (dix-evil . [(20181210 1200) ((dix (0 3 0)) (evil (1 0 7))) "Optional evil-integration with dix.el" tar ((:url . "http://wiki.apertium.org/wiki/Emacs") (:commit . "b973de948deb7aa2995b1895e1e62bbe3129b5a5") (:revdesc . "b973de948deb") (:keywords "languages") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (dizzee . [(20171201 916) nil "A more pleasant way to manage your project's subprocesses in Emacs" tar ((:url . "https://github.com/davidmiller/dizzee") (:commit . "e3cf1c2ea5d0fc00747524b6f3c5b905d0a8c8e1") (:revdesc . "e3cf1c2ea5d0") (:keywords "emacs" "processes") (:authors ("David Miller" . "david@deadpansincerity.com")) (:maintainers ("David Miller" . "david@deadpansincerity.com")) (:maintainer "David Miller" . "david@deadpansincerity.com"))])
+ (django-commands . [(20220314 1545) ((emacs (25 1))) "Run django commands" tar ((:url . "https://github.com/muffinmad/emacs-django-commands") (:commit . "7510c0f068bf214ad012c203d68e03ff4262efdf") (:revdesc . "7510c0f068bf") (:keywords "tools") (:authors ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainers ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainer "Andrii Kolomoiets" . "andreyk.mad@gmail.com"))])
+ (django-manage . [(20160819 212) ((hydra (0 13 2))) "Django minor mode for commanding manage.py" tar ((:url . "https://github.com/gopar/django-manage") (:commit . "e72b1cf2fdbb5c624d19169176e60467b4918fe2") (:revdesc . "e72b1cf2fdbb") (:keywords "languages") (:authors ("Daniel Gopar" . "gopardaniel@yahoo.com")) (:maintainers ("Daniel Gopar" . "gopardaniel@yahoo.com")) (:maintainer "Daniel Gopar" . "gopardaniel@yahoo.com"))])
+ (django-mode . [(20170522 714) ((projectile (0)) (s (0)) (helm-make (0))) "Major mode for Django web framework" tar ((:url . "https://github.com/unrelentingtech/django-mode") (:commit . "a71b8dd984e7f724b8321246e5c353a4ae5c986e") (:revdesc . "a71b8dd984e7") (:keywords "languages") (:authors ("Greg V" . "floatboth@me.com")) (:maintainers ("Greg V" . "floatboth@me.com")) (:maintainer "Greg V" . "floatboth@me.com"))])
+ (django-snippets . [(20131229 1611) ((yasnippet (0 8 0))) "Yasnippets for django" tar ((:url . "https://github.com/myfreeweb/django-mode") (:commit . "f1e6fea8878bebc9bc0b761376a14cd5c9feda0f") (:revdesc . "f1e6fea8878b") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (django-theme . [(20131022 902) nil "Custom face theme for Emacs" tar ((:url . "http://github/anrzejsliwa/django-theme") (:commit . "86c8142b3eb1addd94a43aa6f1d98dab06401af0") (:revdesc . "86c8142b3eb1"))])
+ (djangonaut . [(20230821 1713) ((emacs (25 2)) (magit-popup (2 6 0)) (pythonic (0 1 0)) (f (0 20 0)) (s (1 12 0))) "Minor mode to interact with Django projects" tar ((:url . "https://github.com/proofit404/djangonaut") (:commit . "f360e3b39dc830a0380e82b6f3c475a466d7dda6") (:revdesc . "f360e3b39dc8") (:keywords "convenience" "django") (:authors ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainers ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainer "Artem Malyshev" . "proofit404@gmail.com"))])
+ (djinni-mode . [(20190303 139) ((emacs (24 4))) "Major-mode for editing Djinni files" tar ((:url . "https://github.com/danielmartin/djinni-mode") (:commit . "f0da31d8f45c4b1b2341cf88ec7f2d2e7d16267f") (:revdesc . "f0da31d8f45c") (:keywords "languages") (:authors ("Daniel Martín" . "mardani29@yahoo.es")) (:maintainers ("Daniel Martín" . "mardani29@yahoo.es")) (:maintainer "Daniel Martín" . "mardani29@yahoo.es"))])
+ (dkdo . [(20131110 1119) ((dkmisc (0 50)) (emacs (24 1))) "Do List major mode based on org-mode" tar ((:url . "https://github.com/davidkeegan/dkdo") (:commit . "fd6bb105e8331fafb6385c5238c988c4c5bbe2da") (:revdesc . "fd6bb105e833") (:keywords "dolist" "task" "productivity") (:authors ("David Keegan" . "dksw@eircom.net")) (:maintainers ("David Keegan" . "dksw@eircom.net")) (:maintainer "David Keegan" . "dksw@eircom.net"))])
+ (dkl . [(20161005 7) nil "Display keyboard layout" tar ((:url . "https://github.com/flexibeast/dkl") (:commit . "6b4584f86037bda3383960c678d51f340229fb91") (:revdesc . "6b4584f86037") (:keywords "input" "keyboard" "layout") (:authors ("Alexis" . "flexibeast@gmail.com")) (:maintainers ("Alexis" . "flexibeast@gmail.com")) (:maintainer "Alexis" . "flexibeast@gmail.com"))])
+ (dklrt . [(20131110 1341) ((dkmisc (0 50)) (ledger-mode (20130908 1357)) (emacs (24 1))) "Ledger Recurring Transactions" tar ((:url . "https://github.com/davidkeegan/dklrt") (:commit . "4eceed270015b41d24a62a8b71bd239224a63063") (:revdesc . "4eceed270015") (:keywords "ledger" "ledger-cli" "recurring" "periodic" "automatic") (:authors ("David Keegan" . "dksw@eircom.net")) (:maintainers ("David Keegan" . "dksw@eircom.net")) (:maintainer "David Keegan" . "dksw@eircom.net"))])
+ (dkmisc . [(20131110 1115) ((emacs (24 1))) "Miscellaneous functions required by dk* packages" tar ((:url . "https://github.com/davidkeegan/dkmisc") (:commit . "fe3d49c6f8322b6f89466361acd97585bdfe0608") (:revdesc . "fe3d49c6f832") (:keywords "utility" "time" "date" "file") (:authors ("David Keegan" . "dksw@eircom.net")) (:maintainers ("David Keegan" . "dksw@eircom.net")) (:maintainer "David Keegan" . "dksw@eircom.net"))])
+ (dmacro . [(20241027 830) ((emacs (24 1)) (cl-lib (0 6))) "Repeated detection and execution of key operation" tar ((:url . "https://github.com/emacs-jp/dmacro") (:commit . "cb3ce0e1d6ce868baf47cb9225c8daae4b610dab") (:revdesc . "cb3ce0e1d6ce") (:keywords "convenience") (:authors ("Toshiyuki Masui" . "masui@ptiecan.com")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (dmenu . [(20190908 44) ((cl-lib (0 5))) "Simulate the dmenu command line program" tar ((:url . "https://github.com/lujun9972/el-dmenu") (:commit . "e8cc9b27c79d3ecc252267c082ab8e9c82eab264") (:revdesc . "e8cc9b27c79d") (:keywords "convenience" "usability") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (dna-mode . [(20191001 2108) nil "A major mode for editing dna sequences" tar ((:url . "http://www.mahalito.net/~harley/elisp/dna-mode.el") (:commit . "7a48393fcf0015eed2368fcb89b3091c9d029dc4") (:revdesc . "7a48393fcf00") (:keywords "dna" "emacs" "editing") (:authors ("Harley Gorrell" . "harley@panix.com")) (:maintainers ("Harley Gorrell" . "harley@panix.com")) (:maintainer "Harley Gorrell" . "harley@panix.com"))])
+ (doc-show-inline . [(20260108 1342) ((emacs (29 1))) "Show doc-strings found in external files" tar ((:url . "https://codeberg.org/ideasman42/emacs-doc-show-inline") (:commit . "4a81b89873f8d3594b7d7b65c15f86ec6c49e40c") (:revdesc . "4a81b89873f8") (:keywords "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (docbook-snippets . [(20150714 1625) ((yasnippet (0 8 0))) "Yasnippets for DocBook" tar ((:url . "https://github.com/jhradilek/emacs-docbook-snippets") (:commit . "b06297fdec039a541aaa6312cb328a11062cfab4") (:revdesc . "b06297fdec03") (:keywords "snippets" "docbook") (:authors ("Jaromir Hradilek" . "jhradilek@gmail.com")) (:maintainers ("Jaromir Hradilek" . "jhradilek@gmail.com")) (:maintainer "Jaromir Hradilek" . "jhradilek@gmail.com"))])
+ (docean . [(20180605 1744) ((emacs (24)) (cl-lib (0 5)) (request (0 2 0))) "Interact with DigitalOcean from Emacs" tar ((:url . "https://github.com/emacs-pe/docean.el") (:commit . "bbe2298fd21f7876fc2d5c52a69b931ff59df979") (:revdesc . "bbe2298fd21f") (:keywords "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (dock . [(20250720 1954) ((emacs (28 1))) "Integration for desktop environment's taskbar/dock" tar ((:url . "https://github.com/hron/dock.el") (:commit . "8397c69d33444fa48ec24944e1886386801a27a1") (:revdesc . "8397c69d3344") (:keywords "lisp") (:authors ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainers ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainer "Aleksei Gusev" . "aleksei.gusev@gmail.com"))])
+ (docker . [(20260824 1516) ((aio (1 0)) (dash (2 19 1)) (emacs (28 1)) (s (1 13 0)) (tablist (1 1)) (transient (0 4 3))) "Interface to Docker" tar ((:url . "https://github.com/Silex/docker.el") (:commit . "e476b1bf73e917aaae43daab763696629d864425") (:revdesc . "e476b1bf73e9") (:keywords "filename" "convenience") (:authors ("Philippe Vaucher" . "philippe.vaucher@gmail.com")) (:maintainers ("Philippe Vaucher" . "philippe.vaucher@gmail.com")) (:maintainer "Philippe Vaucher" . "philippe.vaucher@gmail.com"))])
+ (docker-api . [(20160525 720) ((dash (2 12 1)) (request (0 2 0)) (s (1 11 0))) "Emacs interface to the Docker API" tar ((:url . "https://github.com/Silex/docker-api.el") (:commit . "206144346b7fa4165223349cfeb64a75d47ddd1b") (:revdesc . "206144346b7f") (:authors ("Philippe Vaucher" . "philippe.vaucher@gmail.com")) (:maintainers ("Philippe Vaucher" . "philippe.vaucher@gmail.com")) (:maintainer "Philippe Vaucher" . "philippe.vaucher@gmail.com"))])
+ (docker-cli . [(20190524 1624) nil "Running various commands in docker containers" tar ((:url . "https://github.com/bosko/docker-cli") (:commit . "328429219574555c5fb831a421b4b5d9a2338561") (:revdesc . "328429219574") (:keywords "processes") (:authors ("Boško Ivanišević" . "bosko.ivanisevic@gmail.com")) (:maintainers ("Boško Ivanišević" . "bosko.ivanisevic@gmail.com")) (:maintainer "Boško Ivanišević" . "bosko.ivanisevic@gmail.com"))])
+ (docker-compose-mode . [(20200830 1336) ((emacs (24 3)) (dash (2 12 0)) (yaml-mode (0 0 12))) "Major mode for editing docker-compose files" tar ((:url . "https://github.com/meqif/docker-compose-mode") (:commit . "abaa4f3aeb5c62d7d16e186dd7d77f4e846e126a") (:revdesc . "abaa4f3aeb5c") (:keywords "convenience"))])
+ (docker-tramp . [(20230809 511) ((emacs (24)) (cl-lib (0 5))) "TRAMP integration for docker containers for Emacs 28 and earlier" tar ((:url . "https://github.com/emacs-pe/docker-tramp.el") (:commit . "19d0771db4e6b89e19c00af5806438e315779c15") (:revdesc . "19d0771db4e6") (:keywords "docker" "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (dockerfile-mode . [(20251221 1644) ((emacs (24))) "Major mode for editing Docker's Dockerfiles" tar ((:url . "https://github.com/spotify/dockerfile-mode") (:commit . "97733ce074b1252c1270fd5e8a53d178b66668ed") (:revdesc . "97733ce074b1") (:keywords "docker" "languages" "processes" "tools"))])
+ (docopt . [(20230216 957) ((emacs (26 3)) (dash (2 17 0)) (emacs (26 1)) (f (0 20 0)) (parsec (0 1 3)) (s (1 12 0)) (transient (0 3 7))) "A Docopt implementation in Elisp" tar ((:url . "https://github.com/r0man/docopt.el") (:commit . "21c575db68d4ccadb3125241a62136a0f8b76f63") (:revdesc . "21c575db68d4") (:keywords "docopt" "tools" "processes") (:authors ("r0man" . "roman@burningswell.com")) (:maintainers ("r0man" . "roman@burningswell.com")) (:maintainer "r0man" . "roman@burningswell.com"))])
+ (docsim . [(20240906 421) ((emacs (24 4)) (org (8 0))) "Search and compare notes with a local search engine" tar ((:url . "https://github.com/hrs/docsim.el") (:commit . "1441436621835eb9c6fe80bb07299043133f2942") (:revdesc . "144143662183") (:authors ("Robin Schwartz" . "hello@robinschwartz.me")) (:maintainers ("Robin Schwartz" . "hello@robinschwartz.me")) (:maintainer "Robin Schwartz" . "hello@robinschwartz.me"))])
+ (docstr . [(20260101 548) ((emacs (27 1)) (s (1 9 0))) "A document string minor mode" tar ((:url . "https://github.com/emacs-vs/docstr") (:commit . "c83e3d24b610168477466aab7ca691cbe7c36484") (:revdesc . "c83e3d24b610") (:keywords "convenience" "document" "string") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (doct . [(20230622 1847) ((emacs (25 1))) "DOCT: Declarative Org capture templates" tar ((:url . "https://github.com/progfolio/doct") (:commit . "5cab660dab653ad88c07b0493360252f6ed1d898") (:revdesc . "5cab660dab65") (:keywords "org" "convenience") (:authors ("Nicholas Vollmer" . "progfolio@protonmail.com")) (:maintainers ("Nicholas Vollmer" . "progfolio@protonmail.com")) (:maintainer "Nicholas Vollmer" . "progfolio@protonmail.com"))])
+ (doctest . [(20260620 2225) ((emacs (28 1))) "Doctests for Emacs Lisp" tar ((:url . "https://github.com/ag91/doctest") (:commit . "cdf41b5185dcd502f92722297f4361eab4ef1d13") (:revdesc . "cdf41b5185dc") (:keywords "lisp" "maint" "docs" "help") (:authors ("Chris Rayner" . "(dchrisrayner@gmail.com)") ("Andrea -- current maintainer" . "(andrea-dev@hotmail.com) ")) (:maintainers ("Chris Rayner" . "(dchrisrayner@gmail.com)") ("Andrea -- current maintainer" . "(andrea-dev@hotmail.com) ")) (:maintainer "Chris Rayner" . "(dchrisrayner@gmail.com)"))])
+ (dogears . [(20240412 850) ((emacs (26 3)) (map (2 1))) "Never lose your place again" tar ((:url . "https://github.com/alphapapa/dogears.el") (:commit . "162671e66cac601f1cfd5d22f7da2671af2e9866") (:revdesc . "162671e66cac") (:keywords "convenience") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (doing . [(20260219 234) ((emacs (27 1)) (org (9 0))) "Frictionless activity log and time tracking" tar ((:url . "https://github.com/xiaoxinghu/doing.el") (:commit . "e3c39bf16f41637a0ef1c1512cb1417063dea956") (:revdesc . "e3c39bf16f41") (:keywords "convenience" "org" "time-tracking") (:authors ("Xiaoxing Hu" . "hi@xiaoxing.dev")) (:maintainers ("Xiaoxing Hu" . "hi@xiaoxing.dev")) (:maintainer "Xiaoxing Hu" . "hi@xiaoxing.dev"))])
+ (dokuwiki . [(20180102 59) ((emacs (24 3)) (xml-rpc (1 6 8))) "Edit Remote DokuWiki Pages Using XML-RPC" tar ((:url . "http://www.github.com/accidentalrebel/emacs-dokuwiki") (:commit . "594c4d4904dcc2796bbbd2c0845d9e7c09ccf6f7") (:revdesc . "594c4d4904dc") (:keywords "convenience") (:authors ("Juan Karlo Licudine" . "accidentalrebel@gmail.com")) (:maintainers ("Juan Karlo Licudine" . "accidentalrebel@gmail.com")) (:maintainer "Juan Karlo Licudine" . "accidentalrebel@gmail.com"))])
+ (dokuwiki-mode . [(20170223 1301) nil "Major mode for DokuWiki document" tar ((:url . "https://github.com/kai2nenobu/emacs-dokuwiki-mode") (:commit . "e4e116f6fcc373e3f5937c1a7daa5c2c9c6d3fa1") (:revdesc . "e4e116f6fcc3") (:keywords "hypermedia" "text" "dokuwiki") (:authors ("Tsunenobu Kai" . "kai2nenobu@gmail.com")) (:maintainers ("Tsunenobu Kai" . "kai2nenobu@gmail.com")) (:maintainer "Tsunenobu Kai" . "kai2nenobu@gmail.com"))])
+ (dollaro . [(20260210 1514) ((s (1 6 0))) "Simple text templates" tar ((:url . "https://github.com/emacsattic/dollaro") (:commit . "d18b07fc6a63ce773b745714e135284b6eec7485") (:revdesc . "d18b07fc6a63") (:keywords "tools" "convenience") (:authors ("Alessandro Piras" . "laynor@gmail.com")) (:maintainers ("Alessandro Piras" . "laynor@gmail.com")) (:maintainer "Alessandro Piras" . "laynor@gmail.com"))])
+ (doom . [(20180301 2308) ((cl-lib (0 5))) "DOM implementation and manipulation library" tar ((:url . "http://www.github.com/kensanata/doom.el/") (:commit . "e59040aefc92dd9b3134eb623624307fb9e4327b") (:revdesc . "e59040aefc92") (:keywords "xml" "dom") (:authors ("Alex Schroeder" . "alex@gnu.org") ("Henrik.Motakef" . "elisp@henrik-motakef.de") ("Katherine Whitlock" . "toroidal-code@gmail.com") ("Syohei YOSHIDA" . "syohex@gmail.com")))])
+ (doom-modeline . [(20260826 1138) ((emacs (25 1)) (compat (30 1 0 0)) (nerd-icons (0 1 0)) (shrink-path (0 3 1))) "A minimal and modern mode-line" tar ((:url . "https://github.com/seagle0128/doom-modeline") (:commit . "f35c9c9eb111c59377c4bad86497d38eff716df0") (:revdesc . "f35c9c9eb111") (:keywords "faces" "mode-line") (:authors ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainers ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainer "Vincent Zhang" . "seagle0128@gmail.com"))])
+ (doom-modeline-now-playing . [(20260501 743) ((emacs (26 1)) (doom-modeline (3 0 0))) "Segment for Doom Modeline to show media player information" tar ((:url . "https://github.com/elken/doom-modeline-now-playing") (:commit . "11e060f9e30c2ae3e95e71a18f3d0d91b7a54d97") (:revdesc . "11e060f9e30c") (:authors ("Ellis Kenyő" . "me@elken.dev")) (:maintainers ("Ellis Kenyő" . "me@elken.dev")) (:maintainer "Ellis Kenyő" . "me@elken.dev"))])
+ (doom-themes . [(20260826 1413) ((emacs (25 1)) (cl-lib (0 5))) "An opinionated pack of modern color-themes" tar ((:url . "https://github.com/doomemacs/themes") (:commit . "a59202912ad55014e53a685eee6cd94130bdd4fd") (:revdesc . "a59202912ad5") (:keywords "themes" "faces") (:authors ("Henrik Lissner" . "contact@henrik.io")) (:maintainers ("Henrik Lissner" . "contact@henrik.io")) (:maintainer "Henrik Lissner" . "contact@henrik.io"))])
+ (dorgygen . [(20260422 45) ((emacs (29 1))) "Source code documentation in org-mode" tar ((:url . "https://github.com/drghirlanda/dorgygen") (:commit . "84815fda133c15fe967c6f132e146992827de1c9") (:revdesc . "84815fda133c") (:keywords "tools" "wp"))])
+ (dot-env . [(20230820 2014) ((emacs (24 4)) (s (1 13 0))) "Dotenv functionality" tar ((:url . "https://github.com/amodelbello/dot-env.el") (:commit . "83ce690e8ef9175fc621c85d5fbef4f7ace7b7a8") (:revdesc . "83ce690e8ef9") (:keywords "convenience" "dotenv" "environment" "configuration"))])
+ (dot-mode . [(20180312 2300) ((emacs (24 3))) "Minor mode to repeat typing or commands" tar ((:url . "https://github.com/wyrickre/dot-mode") (:commit . "6ca22b73bcdae2363ee9641b822a60685df16a3e") (:revdesc . "6ca22b73bcda") (:keywords "convenience") (:authors ("Robert Wyrick" . "rob@wyrick.org")) (:maintainers ("Robert Wyrick" . "rob@wyrick.org")) (:maintainer "Robert Wyrick" . "rob@wyrick.org"))])
+ (dotenv-mode . [(20191027 2129) ((emacs (24 3))) "Major mode for .env files" tar ((:url . "https://github.com/preetpalS/emacs-dotenv-mode") (:commit . "e3701bf739bde44f6484eb7753deadaf691b73fb") (:revdesc . "e3701bf739bd"))])
+ (dotnet . [(20200803 1032) nil "Interact with dotnet CLI tool" tar ((:url . "https://github.com/julienXX/dotnet.el") (:commit . "83ba1305d7895b03f3dffb2d3458b7ec75e6909f") (:revdesc . "83ba1305d789") (:keywords ".net" "tools") (:authors ("Julien BLANCHARD" . "julien@sideburns.eu")) (:maintainers ("Julien BLANCHARD" . "julien@sideburns.eu")) (:maintainer "Julien BLANCHARD" . "julien@sideburns.eu"))])
+ (double-press . [(20250916 1005) ((emacs (24 4))) "Double-press key dispatcher" tar ((:url . "https://github.com/k-talo/double-press.el") (:commit . "380f7f1cab9045c9ef56b4b40c241037dc2c58d0") (:revdesc . "380f7f1cab90") (:keywords "abbrev" "convenience" "emulations" "wp") (:authors ("K-talo Miyazaki" . "Keitaro.Miyazaki@gmail.com")) (:maintainers ("K-talo Miyazaki" . "Keitaro.Miyazaki@gmail.com")) (:maintainer "K-talo Miyazaki" . "Keitaro.Miyazaki@gmail.com"))])
+ (double-saber . [(20190325 1917) ((emacs (24 4))) "Narrow and delete in search buffers" tar ((:url . "https://github.com/dp12/double-saber.git") (:commit . "5555dc28cbaa228fa8f9390738a4200e071380b8") (:revdesc . "5555dc28cbaa") (:keywords "double-saber" "narrow" "delete" "sort" "tools" "convenience" "matching") (:authors ("Daniel Ting" . "deep.paren.12@gmail.com")) (:maintainers ("Daniel Ting" . "deep.paren.12@gmail.com")) (:maintainer "Daniel Ting" . "deep.paren.12@gmail.com"))])
+ (download-region . [(20210306 415) ((cl-lib (0 3))) "Simple in-buffer download manager" tar ((:url . "http://zk-phi.github.io/") (:commit . "e0a721858a22896fa1d7f1d5689dd0878dbc58fa") (:revdesc . "e0a721858a22"))])
+ (downplay-mode . [(20151125 2009) nil "Focus attention on a region of the buffer" tar ((:url . "https://github.com/tobias/downplay-mode/") (:commit . "4a2c3addc73c8ca3816345c3c11c08af265baedb") (:revdesc . "4a2c3addc73c") (:authors ("Toby Crawley" . "toby@tcrawley.org")) (:maintainers ("Toby Crawley" . "toby@tcrawley.org")) (:maintainer "Toby Crawley" . "toby@tcrawley.org"))])
+ (doxy-graph-mode . [(20210604 723) ((emacs (26 3))) "Links source code editing with doxygen call graphs" tar ((:url . "https://github.com/gustavopuche/doxy-graph-mode") (:commit . "88af6ef4bc9c8918b66c7774f0a115b2addc310e") (:revdesc . "88af6ef4bc9c") (:keywords "languages" "all") (:authors ("Gustavo Puche" . "gustavo.puche@gmail.com")) (:maintainers ("Gustavo Puche" . "gustavo.puche@gmail.com")) (:maintainer "Gustavo Puche" . "gustavo.puche@gmail.com"))])
+ (doxymacs . [(20250909 48) ((emacs (24 4)) (compat (28 1))) "Emacs integration with Doxygen" tar ((:url . "https://pniedzielski.github.io/doxymacs/") (:commit . "869b378b724e4bf4b7e4976e2b8a549d744fc1d2") (:revdesc . "869b378b724e") (:keywords "c" "convenience" "tools") (:authors ("Patrick M. Niedzielski" . "patrick@pniedzielski.net") ("Ryan T. Sammartino" . "ryan.sammartino@gmail.com") ("Kris Verbeeck" . "kris.verbeeck@advalvas.be")) (:maintainers ("Patrick M. Niedzielski" . "patrick@pniedzielski.net")) (:maintainer "Patrick M. Niedzielski" . "patrick@pniedzielski.net"))])
+ (doxymin . [(20251122 1103) ((emacs (28 1))) "Create doxygen style docs the easy way" tar ((:url . "https://gitlab.com/L0ren2/doxymin") (:commit . "1de66de7bf4b0c3f6d09eaf461337840bd28715e") (:revdesc . "1de66de7bf4b") (:keywords "(abbref" "convenience" "docs)") (:authors ("Lorenz Schwab" . "lorenz_schwabatwebdotde")) (:maintainers ("Lorenz Schwab" . "lorenz_schwabatwebdotde")) (:maintainer "Lorenz Schwab" . "lorenz_schwabatwebdotde"))])
+ (dpaste . [(20160303 2112) nil "Emacs integration for dpaste.com" tar ((:url . "https://github.com/gregnewman/dpaste.el") (:commit . "e7a1a18de77f752eb0dbb4b878925f2265538d0b") (:revdesc . "e7a1a18de77f") (:keywords "paste" "pastie" "pastebin" "dpaste" "python") (:authors ("Greg Newman" . "greg@gregnewman.org") ("Guilherme Gondim" . "semente@taurinus.org")) (:maintainers ("Greg Newman" . "greg@gregnewman.org")) (:maintainer "Greg Newman" . "greg@gregnewman.org"))])
+ (dpaste_de . [(20131015 1225) ((web (0 3 7))) "Emacs mode to paste to dpaste.de" tar ((:url . "https://github.com/theju/dpaste_de.el") (:commit . "ab041443884a7a4bfdc81b055688821e8efc9b02") (:revdesc . "ab041443884a") (:keywords "pastebin") (:authors ("Thejaswi Puthraya" . "thejaswi.puthraya@gmail.com")) (:maintainers ("Thejaswi Puthraya" . "thejaswi.puthraya@gmail.com")) (:maintainer "Thejaswi Puthraya" . "thejaswi.puthraya@gmail.com"))])
+ (dpkg-dev-el . [(20260727 749) ((emacs (27 1)) (debian-el (37 0))) "Startup file for the elpa-dpkg-dev-el package" tar ((:commit . "11a92e9ecaaf68deff5cf4e7f5b3867318d10693") (:revdesc . "11a92e9ecaaf") (:authors ("Peter S Galbraith" . "psg@debian.org")) (:maintainers ("Peter S Galbraith" . "psg@debian.org")) (:maintainer "Peter S Galbraith" . "psg@debian.org"))])
+ (dr-racket-like-unicode . [(20220810 2000) ((emacs (24 3))) "DrRacket-style unicode input" tar ((:url . "https://github.com/david-christiansen/dr-racket-like-unicode") (:commit . "d09b9be289e91e25c941107be5e8f52e7c8f0065") (:revdesc . "d09b9be289e9") (:keywords "i18n" "tools") (:authors ("David Christiansen" . "david@davidchristiansen.dk")) (:maintainers ("David Christiansen" . "david@davidchristiansen.dk")) (:maintainer "David Christiansen" . "david@davidchristiansen.dk"))])
+ (dracula-theme . [(20260719 2050) ((emacs (24 3))) "Dracula Theme" tar ((:url . "https://github.com/dracula/emacs") (:commit . "df2be56b03fcbbafcc211013ff93ba50e34a4397") (:revdesc . "df2be56b03fc") (:maintainers ("tienne Deparis" . "etienne@depar.is")) (:maintainer "tienne Deparis" . "etienne@depar.is"))])
+ (draft-mode . [(20160106 859) nil "Rough drafting for Emacs" tar ((:url . "https://github.com/gaudecker/draft-mode") (:commit . "4779fb32daf53746459da2def7e08004492d4f18") (:revdesc . "4779fb32daf5") (:keywords "draft" "drafting") (:authors ("Eeli Reilin" . "gaudecker@fea.st")) (:maintainers ("Eeli Reilin" . "gaudecker@fea.st")) (:maintainer "Eeli Reilin" . "gaudecker@fea.st"))])
+ (drag-stuff . [(20161108 749) nil "Drag stuff (lines, words, region, etc...) around" tar ((:url . "https://github.com/rejeep/drag-stuff") (:commit . "d49fe376d24f0f8ac5ade67b6d7fccc2487c81db") (:revdesc . "d49fe376d24f") (:keywords "speed" "convenience") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (drawille . [(20160418 1838) ((cl-lib (0 5))) "Drawille implementation in elisp" tar ((:url . "https://github.com/sshbio/elisp-drawille") (:commit . "d582b455c01432bc80933650c52a1f586bd1b5ad") (:revdesc . "d582b455c014") (:keywords "graphics") (:authors ("Josuah Demangeon" . "josuah.demangeon@gmail.com")) (:maintainers ("Josuah Demangeon" . "josuah.demangeon@gmail.com")) (:maintainer "Josuah Demangeon" . "josuah.demangeon@gmail.com"))])
+ (dream-theme . [(20210419 605) ((emacs (26 1))) "Maximalist Nordic/Zenburn-inspired color theme" tar ((:url . "https://github.com/djcb/dream-theme") (:commit . "0c27f05544b90e41338f79ea923044b358a323c6") (:revdesc . "0c27f05544b9") (:keywords "faces" "theme") (:authors ("Dirk-Jan C. Binnema" . "djcb@djcbsoftware.nl")) (:maintainers ("Dirk-Jan C. Binnema" . "djcb@djcbsoftware.nl")) (:maintainer "Dirk-Jan C. Binnema" . "djcb@djcbsoftware.nl"))])
+ (drill-instructor-AZIK-force . [(20151123 514) ((popup (0 5))) "Support AZIK input" tar ((:url . "https://github.com/myuhe/drill-instructor-AZIK-force.el") (:commit . "008cea202dc31d7d6fb1e7d8e6334d516403b7a5") (:revdesc . "008cea202dc3") (:keywords "convenience") (:authors ("Yuhei Maeda" . "yuhei.maeda_at_gmail.com")))])
+ (drone . [(20161106 918) nil "Launch your drone test suite if drone.yml is present" tar ((:url . "https://github.com/olymk2/emacs-drone") (:commit . "1d4ee037ad3208847a4235426edf0c4a3e7b1899") (:revdesc . "1d4ee037ad32") (:keywords "drone" "tests" "ci") (:authors ("Oliver Marks" . "oly@digitaloctave.com")) (:maintainers ("Oliver Marks" . "oly@digitaloctave.com")) (:maintainer "Oliver Marks" . "oly@digitaloctave.com"))])
+ (dropbox . [(20220314 1638) ((request (0 3 0)) (json (1 2)) (oauth (1 0 3))) "Emacs backend for dropbox" tar ((:url . "https://github.com/pavpanchekha/dropbox.el") (:commit . "c048faad0be24e8fa31974f08b710a87cf5b668c") (:revdesc . "c048faad0be2") (:keywords "dropbox") (:authors ("Pavel Panchekha" . "me@pavpanchekha.com")) (:maintainers ("Pavel Panchekha" . "me@pavpanchekha.com")) (:maintainer "Pavel Panchekha" . "me@pavpanchekha.com"))])
+ (drupal-mode . [(20240816 1236) ((php-mode (1 5 0))) "Advanced minor mode for Drupal development" tar ((:url . "https://github.com/arnested/drupal-mode") (:commit . "3f91d1d44df11ebd0137a896055fca6a1bb2f554") (:revdesc . "3f91d1d44df1") (:keywords "programming" "php" "drupal") (:authors ("Arne Jørgensen" . "arne@arnested.dk")) (:maintainers ("Arne Jørgensen" . "arne@arnested.dk")) (:maintainer "Arne Jørgensen" . "arne@arnested.dk"))])
+ (drupal-spell . [(20130520 1655) nil "Aspell extra dictionary for Drupal" tar ((:url . "https://github.com/arnested/drupal-spell") (:commit . "a69f5e3b62c4c0da74ce26c1d00d5b8f7395e4ae") (:revdesc . "a69f5e3b62c4") (:keywords "wp") (:authors ("Arne Jørgensen" . "arne@arnested.dk")) (:maintainers ("Arne Jørgensen" . "arne@arnested.dk")) (:maintainer "Arne Jørgensen" . "arne@arnested.dk"))])
+ (dslide . [(20250102 819) ((emacs (29 2))) "Domain Specific sLIDEs. Programmable Presentation" tar ((:url . "https://github.com/positron-solutions/dslide") (:commit . "be47f2dcb939779067f8c77c3493162bcf242b83") (:revdesc . "be47f2dcb939") (:keywords "convenience" "org-mode" "presentation" "narrowing") (:authors ("Positron" . "contact@positron.solutions")) (:maintainers ("Positron" . "contact@positron.solutions")) (:maintainer "Positron" . "contact@positron.solutions"))])
+ (dsvn . [(20221102 1416) nil "Subversion interface" tar ((:url . "https://github.com/emacsmirror/dsvn") (:commit . "36ecd5219584e46dcf6bd252e2ea1ec517d2fc05") (:revdesc . "36ecd5219584") (:keywords "docs") (:authors ("David Kågedal" . "davidk@lysator.liu.se") ("Mattias Engdegård" . "mattiase@acm.org")) (:maintainers ("Mattias Engdegård" . "mattiase@acm.org")) (:maintainer "Mattias Engdegård" . "mattiase@acm.org"))])
+ (dtb-mode . [(20210105 1132) ((emacs (25))) "Show device tree souce in dtbs" tar ((:url . "https://github.com/schspa/dtb-mode") (:commit . "d5bca7d1afaac5615c586b60c7314a1d0e2514dc") (:revdesc . "d5bca7d1afaa") (:keywords "dtb" "dts" "convenience") (:authors ("Schspa Shi" . "schspa@gmail.com")) (:maintainers ("Schspa Shi" . "schspa@gmail.com")) (:maintainer "Schspa Shi" . "schspa@gmail.com"))])
+ (dtext-mode . [(20231120 1606) ((emacs (24 4))) "Major mode for Danbooru DText" tar ((:url . "https://github.com/JohnDevlopment/dtext-mode.el") (:commit . "5c68d1c05c4606f68384569d9baaef4f6e72fc73") (:revdesc . "5c68d1c05c46") (:keywords "languages") (:authors ("John Russell" . "johndevlopment7@gmail.com")) (:maintainers ("John Russell" . "johndevlopment7@gmail.com")) (:maintainer "John Russell" . "johndevlopment7@gmail.com"))])
+ (dtk . [(20241013 331) ((emacs (24 4)) (cl-lib (0 6 1)) (dash (2 12 0)) (seq (1 9)) (s (1 9))) "Access SWORD content via diatheke" tar ((:url . "https://codeberg.org/thomp/dtk") (:commit . "a80891a3f59381de1ae902417a19bc4f75255d00") (:revdesc . "a80891a3f593") (:keywords "hypermedia"))])
+ (dtrace-script-mode . [(20150214 623) nil "DTrace code editing commands for Emacs" tar ((:url . "https://github.com/dotemacs/dtrace-script-mode") (:commit . "a92f76c65b9fb64d448e503b4ea7ff06085be8ee") (:revdesc . "a92f76c65b9f"))])
+ (dtrt-indent . [(20260709 2011) ((emacs (28 1))) "Adapt to foreign indentation offsets" tar ((:url . "https://github.com/jscheid/dtrt-indent") (:commit . "8402da6bcc288709366e0b589fa79e744e877788") (:revdesc . "8402da6bcc28") (:keywords "convenience" "files" "languages" "c") (:authors ("Julian Scheid" . "julians37@googlemail.com")) (:maintainers ("Reuben Thomas" . "rrt@sc3d.org")) (:maintainer "Reuben Thomas" . "rrt@sc3d.org"))])
+ (dts-mode . [(20211202 18) nil "Major mode for Devicetree source code" tar ((:url . "https://github.com/bgamari/dts-mode") (:commit . "32517e7eeeccc785b7c669fd5e93c5df45597ef1") (:revdesc . "32517e7eeecc") (:keywords "languages") (:authors ("Ben Gamari" . "ben@smart-cactus.org")) (:maintainers ("Ben Gamari" . "ben@smart-cactus.org")) (:maintainer "Ben Gamari" . "ben@smart-cactus.org"))])
+ (duckdb-query . [(20260302 1329) ((emacs (28 1))) "DuckDB query results as native Elisp data structures" tar ((:url . "https://github.com/gggion/duckdb-query.el") (:commit . "b93d0b20120d734d7a264bea9ed8b41290345151") (:revdesc . "b93d0b20120d") (:keywords "data" "sql") (:authors ("Gino Cornejo" . "gggion123@gmail.com")) (:maintainers ("Gino Cornejo" . "gggion123@gmail.com")) (:maintainer "Gino Cornejo" . "gggion123@gmail.com"))])
+ (ducpel . [(20260204 1533) ((emacs (29 1))) "Logic game with sokoban elements" tar ((:url . "https://github.com/alezost/ducpel") (:commit . "bb0275a8aa7e8aa0895979711b037573544d50c1") (:revdesc . "bb0275a8aa7e") (:keywords "games") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (dumb-diff . [(20171211 2122) ((emacs (24 3))) "Fast arbitrary diffs" tar ((:url . "https://github.com/jacktasia/dumb-diff") (:commit . "1a2331d283049b71a07c1b06b1e0627a950d55f4") (:revdesc . "1a2331d28304") (:keywords "programming" "diff"))])
+ (dumb-jump . [(20260603 1700) ((emacs (26 1))) "Jump to definition for 60+ languages without configuration" tar ((:url . "https://github.com/jacktasia/dumb-jump") (:commit . "cf06b4ccdce6a39346c32f05139f9ee8b77ee229") (:revdesc . "cf06b4ccdce6") (:keywords "programming"))])
+ (dumber-jump . [(20260722 720) ((emacs (28 1)) (s (1 11 0)) (dash (2 9 0))) "Jump to definition for 50+ languages without configuration" tar ((:url . "https://github.com/zenspider/dumber-jump") (:commit . "65684e70c0349709fb745df5f4993425e0d571b2") (:revdesc . "65684e70c034") (:keywords "tools"))])
+ (dummyparens . [(20141009 1024) nil "Parenthesis auto-pairing and wrapping" tar ((:url . "https://github.com/snosov1/dummyparens") (:commit . "9798ef1d0eaa24e4fe66f8aa6022a8c62714cc89") (:revdesc . "9798ef1d0eaa") (:keywords "dummyparens" "auto-pair" "wrapping") (:authors ("Sergei Nosov" . "sergei.nosov[at]gmail.com")) (:maintainers ("Sergei Nosov" . "sergei.nosov[at]gmail.com")) (:maintainer "Sergei Nosov" . "sergei.nosov[at]gmail.com"))])
+ (dune . [(20260803 1048) nil "Integration with the dune build system" tar ((:url . "https://github.com/ocaml/dune") (:commit . "ce734ac25ffb06994a4530426bb06ee8cda19e50") (:revdesc . "ce734ac25ffb"))])
+ (dune-format . [(20210505 108) ((reformatter (0 6)) (emacs (24 1))) "Reformat OCaml's dune files automatically" tar ((:url . "https://github.com/purcell/emacs-dune-format") (:commit . "eda7a16ae378e7c482c11228c43ef32b893a1520") (:revdesc . "eda7a16ae378") (:keywords "languages") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (dup-transform . [(20240922 1924) ((emacs (29 1))) "RGB/XY graphics code helpers" tar ((:url . "https://github.com/garyo/dup-transform.el") (:commit . "6cbfb9b6fdf811a4e1e2ddad993fb16f35ec7622") (:revdesc . "6cbfb9b6fdf8") (:keywords "graphics" "tools" "convenience" "c++" "3d" "video" "rgb") (:authors ("Gary Oberbrunner" . "garyo@darkstarsystems.com")) (:maintainers ("Gary Oberbrunner" . "garyo@darkstarsystems.com")) (:maintainer "Gary Oberbrunner" . "garyo@darkstarsystems.com"))])
+ (duplexer . [(20250123 1844) ((emacs (29 1)) (dash (2 19 1))) "Handle conflicts between local minor modes and reuse rules" tar ((:url . "https://github.com/eki3z/duplexer.el") (:commit . "242b0bf47192164835a26ae5c553e689dd1b2974") (:revdesc . "242b0bf47192") (:keywords "tools") (:authors ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainers ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainer "Eki Zhang" . "liuyinz95@gmail.com"))])
+ (duplicate-thing . [(20181031 1500) nil "Duplicate current line & selection" tar ((:url . "https://github.com/ongaeshi/duplicate-thing") (:commit . "9d8fd05e3e5caa35d3f2a0c0032c92f0c0908e21") (:revdesc . "9d8fd05e3e5c") (:keywords "convenience" "command" "duplicate" "line" "selection"))])
+ (dut-mode . [(20170729 2111) ((emacs (24))) "Major mode for the Dut programming language" tar ((:url . "https://github.com/dut-lang/dut-mode") (:commit . "9235c7acaa6690942e9de8b7acd1e4be0c859dc1") (:revdesc . "9235c7acaa66") (:keywords "languages" "gut"))])
+ (dw . [(20210331 2311) ((emacs (25 1))) "Diceware passphrase generation commands" tar ((:url . "https://github.com/integral-dw/dw-passphrase-generator") (:commit . "61c5718ba64ace4c9e29de18aa2690ecc3f0f258") (:revdesc . "61c5718ba64a") (:keywords "convenience" "games") (:authors ("D. Williams" . "d.williams@posteo.net")) (:maintainers ("D. Williams" . "d.williams@posteo.net")) (:maintainer "D. Williams" . "d.williams@posteo.net"))])
+ (dwim-coder-mode . [(20260114 852) ((emacs (31))) "DWIM keybindings for C, Python, Rust, and more" tar ((:url . "https://sadiqpk.org/projects/dwim-coder-mode.html") (:commit . "bc8b308e5fe82951d3843b5913c6d34c11c07098") (:revdesc . "bc8b308e5fe8") (:keywords "convenience" "hacks") (:authors ("Mohammed Sadiq" . "sadiq@sadiqpk.org")) (:maintainers ("Mohammed Sadiq" . "sadiq@sadiqpk.org")) (:maintainer "Mohammed Sadiq" . "sadiq@sadiqpk.org"))])
+ (dwim-shell-command . [(20260708 1641) ((emacs (28 1))) "Shell commands with DWIM behaviour" tar ((:url . "https://github.com/xenodium/dwim-shell-command") (:commit . "3566651e24ca05fe818897f2cf31718d2bcd1c99") (:revdesc . "3566651e24ca"))])
+ (dwin . [(20251208 2300) ((emacs (28 1)) (compat (30 1 0 1))) "Navigate and arrange desktop windows" tar ((:url . "https://github.com/lsth/dwin") (:commit . "cbef68f873f02af3e40173c31013e01876a21b71") (:revdesc . "cbef68f873f0") (:keywords "frames" "processes" "convenience") (:authors ("Lars Schmidt-Thieme" . "schmidt-thieme@ismll.de")) (:maintainers ("Lars Schmidt-Thieme" . "schmidt-thieme@ismll.de")) (:maintainer "Lars Schmidt-Thieme" . "schmidt-thieme@ismll.de"))])
+ (dyalog-mode . [(20230214 1027) ((cl-lib (0 2)) (emacs (24 3))) "Major mode for editing Dyalog APL source code" tar ((:url . "https://github.com/harsman/dyalog-mode.git") (:commit . "13c0d391aa878a1609259a89fe3e6db8d21935e8") (:revdesc . "13c0d391aa87") (:keywords "languages") (:authors ("Joakim Hårsman" . "joakim.harsman@gmail.com")) (:maintainers ("Joakim Hårsman" . "joakim.harsman@gmail.com")) (:maintainer "Joakim Hårsman" . "joakim.harsman@gmail.com"))])
+ (dylan . [(20260212 8) ((emacs (25 1))) "Dylan editing modes" tar ((:url . "https://opendylan.org/") (:commit . "c22f339b5394d26af4961192825e58ae766965ec") (:revdesc . "c22f339b5394"))])
+ (dynamic-fonts . [(20140731 1226) ((font-utils (0 7 0)) (persistent-soft (0 8 8)) (pcache (0 2 3))) "Set faces based on available fonts" tar ((:url . "https://github.com/rolandwalker/dynamic-fonts") (:commit . "004ee6014dc7dbff8f14d26015c91d9229f6eac0") (:revdesc . "004ee6014dc7") (:keywords "faces" "frames") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (dynamic-graphs . [(20250701 853) ((emacs (26 1))) "Manipulation with graphviz graphs" tar ((:url . "https://github.com/zellerin/dynamic-graphs") (:commit . "5aa3182174de28b6c034a43cd9ef2f26024911b1") (:revdesc . "5aa3182174de") (:keywords "tools") (:authors ("Tomas Zellerin" . "tomas@zellerin.cz")) (:maintainers ("Tomas Zellerin" . "tomas@zellerin.cz")) (:maintainer "Tomas Zellerin" . "tomas@zellerin.cz"))])
+ (dynamic-ruler . [(20231126 1915) nil "Displays a dynamic ruler at point" tar ((:url . "http://rocher.github.io/dynamic-ruler") (:commit . "984877f3ad8dd4e4bdec2fcacb82a11b4f3b5d75") (:revdesc . "984877f3ad8d") (:keywords "ruler" "tools" "convenience") (:authors ("Francesc Rocher" . "francesc.rocher@gmail.com")) (:maintainers ("Francesc Rocher" . "francesc.rocher@gmail.com")) (:maintainer "Francesc Rocher" . "francesc.rocher@gmail.com"))])
+ (dynamic-spaces . [(20250102 736) nil "Don't move text separated by multiple spaces" tar ((:url . "https://github.com/Lindydancer/dynamic-spaces") (:commit . "dade49afa9eb2700a02de0333935a28b39b15b7b") (:revdesc . "dade49afa9eb") (:keywords "convenience"))])
+ (dynaring . [(20251104 1606) ((emacs (25 1))) "A dynamically sized ring structure" tar ((:url . "https://github.com/countvajhula/dynaring") (:commit . "d74e4f36da97a64baa023e5b2519bfaac7d8b02b") (:revdesc . "d74e4f36da97") (:authors ("Mike Mattie" . "codermattie@gmail.com") ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainers ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainer "Sid Kasivajhula" . "sid@countvajhula.com"))])
+ (dyncloze . [(20210712 145) ((emacs (25 1)) (dash (2 18))) "Language alternatives self-testing" tar ((:url . "https://github.com/ahyatt/emacs-dyncloze") (:commit . "aafc5adc25c7f714b619109bccf92e475d6c84ef") (:revdesc . "aafc5adc25c7") (:authors ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainers ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainer "Andrew Hyatt" . "ahyatt@gmail.com"))])
+ (e2ansi . [(20250120 2241) ((face-explorer (0 0 6))) "Syntax highlighting for `less', powered by Emacs" tar ((:url . "https://github.com/Lindydancer/e2ansi") (:commit . "53c9c2aff5bf66864446a02a75e2e431aaef59d5") (:revdesc . "53c9c2aff5bf") (:keywords "faces" "languages"))])
+ (e2wm . [(20241104 914) ((window-layout (1 5))) "Simple window manager for emacs" tar ((:url . "https://github.com/kiwanami/emacs-window-manager") (:commit . "33efca5504db9d8b3fdbd412c3d79663c9eec77a") (:revdesc . "33efca5504db") (:keywords "tools" "window manager") (:authors ("SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net")) (:maintainers ("SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net")) (:maintainer "SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net"))])
+ (e2wm-R . [(20151230 926) ((e2wm (1 3)) (inlineR (1 0)) (ess (15 3))) "Some e2wm plugin and perspective for GNU R" tar ((:url . "https://github.com/myuhe/e2wm-R.el") (:commit . "4350601ee1a96bf89777b3f09f1b79b88e2e6e4d") (:revdesc . "4350601ee1a9") (:keywords "convenience" "e2wm") (:authors ("myuhe" . "yuhei.maeda_at_gmail.com")))])
+ (e2wm-bookmark . [(20151123 521) ((e2wm (1 2))) "Bookmark plugin for e2wm.el" tar ((:url . "https://github.com/myuhe/e2wm-bookmark.el") (:commit . "bad816b6d8049984d69bcd277b7d325fb84d55eb") (:revdesc . "bad816b6d804") (:keywords "convenience") (:authors ("Yuhei Maeda" . "yuhei.maeda_at_gmail.com")) (:maintainers ("Yuhei Maeda" . "yuhei.maeda_at_gmail.com")) (:maintainer "Yuhei Maeda" . "yuhei.maeda_at_gmail.com"))])
+ (e2wm-direx . [(20200805 1414) ((e2wm (1 2)) (direx (0 1 -3))) "Plugin of e2wm.el for direx.el" tar ((:url . "https://github.com/aki2o/e2wm-direx") (:commit . "5672bc44d8e5cea6bc3b84c3b58e522050ffae0e") (:revdesc . "5672bc44d8e5") (:keywords "tools" "window manager" "convenience") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (e2wm-pkgex4pl . [(20140525 2211) ((e2wm (1 2)) (plsense-direx (0 2 0))) "Plugin of e2wm.el for package explorer of Perl" tar ((:url . "https://github.com/aki2o/e2wm-pkgex4pl") (:commit . "7ea994450727190c4f3cb46cb429ba41b692ecc0") (:revdesc . "7ea994450727") (:keywords "tools" "window manager" "perl") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (e2wm-svg-clock . [(20150106 1306) ((e2wm (20130225 1602)) (svg-clock (0 4))) "E2wm plugin for svg-clock" tar ((:url . "https://github.com/myuhe/e2wm-svg-clock.el") (:commit . "d425925e3afffcbe2ff74edc80b714e4319d4c94") (:revdesc . "d425925e3aff") (:keywords "convenience" "e2wm") (:authors ("Yuhei Maeda" . "yuhei.maeda_at_gmail.com")))])
+ (e2wm-sww . [(20200805 1339) ((e2wm (1 2))) "Plugin of e2wm.el to switch plugin quickly" tar ((:url . "https://github.com/aki2o/e2wm-sww") (:commit . "8926d0c70be05c7b4ef821e22e411e8813973687") (:revdesc . "8926d0c70be0") (:keywords "tools" "window manager") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (e2wm-term . [(20240107 850) ((e2wm (1 2)) (log4e (0 2 0)) (yaxception (1 0 0))) "Perspective of e2wm.el for work in terminal" tar ((:url . "https://github.com/aki2o/e2wm-term") (:commit . "4542e52138484933dd99a497ff1b048ea42f9246") (:revdesc . "4542e5213848") (:keywords "tools" "window manager") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (eacl . [(20260427 655) ((emacs (27 1))) "Auto-complete lines by grepping project" tar ((:url . "https://github.com/redguardtoo/eacl") (:commit . "19f0170f3548eb49f5bd92653f321c3b1742b492") (:revdesc . "19f0170f3548") (:keywords "abbrev" "convenience" "matching"))])
+ (eager-state . [(20260123 751) ((emacs (29 1)) (llama (0 5 0))) "Eagerly persist data onto disk" tar ((:url . "https://github.com/meedstrom/eager-state") (:commit . "53282709833021dfbe8605c9eadaa0fffe5da349") (:revdesc . "532827098330") (:keywords "convenience") (:authors ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainers ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainer "Martin Edström" . "meedstrom91@gmail.com"))])
+ (earl . [(20241020 1847) ((emacs (29 1))) "Erlang distribution protocol implementation" tar ((:url . "https://github.com/axelf4/earl") (:commit . "aa10aae9891a599f523f269cc391ed316775d12a") (:revdesc . "aa10aae9891a") (:keywords "comm" "extensions" "languages" "processes") (:authors ("Axel Forsman" . "axel@axelf.se")) (:maintainers ("Axel Forsman" . "axel@axelf.se")) (:maintainer "Axel Forsman" . "axel@axelf.se"))])
+ (earthfile-mode . [(20230809 2250) ((emacs (26))) "Major mode for editing Earthly file" tar ((:url . "https://github.com/earthly/earthly-mode") (:commit . "3029e5ab06171ca5947041e95053561e10e5ba41") (:revdesc . "3029e5ab0617") (:authors ("Thanabodee Charoenpiriyakij" . "wingyminus@gmail.com")) (:maintainers ("Thanabodee Charoenpiriyakij" . "wingyminus@gmail.com")) (:maintainer "Thanabodee Charoenpiriyakij" . "wingyminus@gmail.com"))])
+ (eask . [(20260222 1247) ((emacs (26 1))) "Core Eask APIs, for Eask CLI development" tar ((:url . "https://github.com/emacs-eask/eask") (:commit . "664704775ce2318f7a76b65077e8559ada542814") (:revdesc . "664704775ce2") (:keywords "lisp" "eask" "api") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (eask-mode . [(20251231 1607) ((emacs (24 3)) (eask (0 1 0))) "Major mode for editing Eask files" tar ((:url . "https://github.com/emacs-eask/eask-mode") (:commit . "0970dc6f4f8008d58261e36b9b824a0ffa6b9882") (:revdesc . "0970dc6f4f80") (:keywords "lisp" "eask") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (easky . [(20260123 1934) ((emacs (27 1)) (eask-mode (0 1 0)) (eask (0 1 0)) (ansi (0 4 1)) (lv (0 0)) (marquee-header (0 1 0))) "Control the Eask command-line interface" tar ((:url . "https://github.com/emacs-eask/easky") (:commit . "2eb06188d2a134c23340421a53cc5bfa94286a4a") (:revdesc . "2eb06188d2a1") (:keywords "maint" "easky") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (easy-after-load . [(20170817 1231) nil "Eval-after-load for all files in a directory" tar ((:url . "https://github.com/pd/easy-after-load") (:commit . "29e20145da49ac9ea40463c552130777408040de") (:revdesc . "29e20145da49"))])
+ (easy-escape . [(20210917 1254) nil "Improve readability of escape characters in regular expressions" tar ((:url . "https://github.com/cpitclaudel/easy-escape") (:commit . "938497a21e65ba6b3ff8ec90e93a6d0ab18dc9b4") (:revdesc . "938497a21e65") (:keywords "convenience" "lisp" "tools") (:authors ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainers ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainer "Clément Pit-Claudel" . "clement.pitclaudel@live.com"))])
+ (easy-hugo . [(20260112 502) ((emacs (25 1)) (request (0 3 0)) (transient (0 3 6))) "Write blogs made with hugo by markdown or org-mode" tar ((:url . "https://github.com/masasam/emacs-easy-hugo") (:commit . "f39adb614ce2c8969aeb7198e9677a189e391a14") (:revdesc . "f39adb614ce2"))])
+ (easy-jekyll . [(20250830 1006) ((emacs (25 1)) (request (0 3 0))) "Major mode managing jekyll blogs" tar ((:url . "https://github.com/masasam/emacs-easy-jekyll") (:commit . "4e85bb4568f87e08a93d7c5c82898a8e98109669") (:revdesc . "4e85bb4568f8"))])
+ (easy-kill . [(20260121 752) ((emacs (25)) (cl-lib (0 5))) "Kill & mark things easily" tar ((:url . "https://github.com/leoliu/easy-kill") (:commit . "98cbae5d8c378ad14d612d7c88a78484c49a80b8") (:revdesc . "98cbae5d8c37") (:keywords "killing" "convenience") (:authors ("Leo Liu" . "sdl.web@gmail.com")) (:maintainers ("Leo Liu" . "sdl.web@gmail.com")) (:maintainer "Leo Liu" . "sdl.web@gmail.com"))])
+ (easy-kill-extras . [(20260108 1716) ((easy-kill (0 9 4))) "Extra functions for easy-kill" tar ((:url . "https://github.com/knu/easy-kill-extras.el") (:commit . "3fea06322d76be78e66074b9a9dad9a6d4aa6bcd") (:revdesc . "3fea06322d76") (:keywords "killing" "convenience") (:authors ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (easy-repeat . [(20150516 848) ((emacs (24 4))) "Repeat easily" tar ((:url . "https://github.com/xuchunyang/easy-repeat.el") (:commit . "060f0e6801c82c40c06961dc0528a00e18947a8c") (:revdesc . "060f0e6801c8") (:keywords "repeat" "convenience") (:authors ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang56@gmail.com"))])
+ (easy-theme-preview . [(20251123 1604) ((emacs (24 3))) "Easily preview themes" tar ((:url . "https://git.sr.ht/~ayys/theme-preview-mode.el") (:commit . "999d89d88634e2eedcc82ac56fa54ed92ce38614") (:revdesc . "999d89d88634") (:keywords "theme" "convenience" "utility") (:authors ("Ayush Jha" . "ayys@duck.com")) (:maintainers ("Ayush Jha" . "ayys@duck.com")) (:maintainer "Ayush Jha" . "ayys@duck.com"))])
+ (easysession . [(20260826 244) ((emacs (26 1))) "Persist and restore your sessions (desktop.el alternative)" tar ((:url . "https://github.com/jamescherti/easysession.el") (:commit . "39ab4576b182d80e5545764d4dbacdd16df87f30") (:revdesc . "39ab4576b182") (:keywords "convenience" "frames" "files") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (ebdb-mua-sidecar . [(20260314 1744) ((emacs (28 1)) (universal-sidecar (1 5 1)) (ebdb (0 8 20))) "EBDB Integration for Universal Sidecar" tar ((:url . "https://git.sr.ht/~swflint/emacs-universal-sidecar") (:commit . "3b6bd928f7adb840e62a63dd5bf1236ece912b13") (:revdesc . "3b6bd928f7ad") (:keywords "mail" "convenience") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (ebf . [(20210225 1211) ((dash (2 18 0)) (cl-lib (0 5))) "Brainfuck language transpiler to Emacs Lisp" tar ((:url . "https://github.com/rexim/ebf") (:commit . "6cbeb4d62416f4cfd5be8906667342af8ecc44a6") (:revdesc . "6cbeb4d62416") (:authors ("Alexey Kutepov" . "reximkut@gmail.com")) (:maintainers ("Alexey Kutepov" . "reximkut@gmail.com")) (:maintainer "Alexey Kutepov" . "reximkut@gmail.com"))])
+ (ebib . [(20260621 1413) ((parsebib (6 0)) (emacs (27 1)) (compat (29 1 4 3))) "A BibTeX database manager" tar ((:url . "http://joostkremers.github.io/ebib/") (:commit . "32c6ab8ce418af10b54f497a404b9b33a67d48fc") (:revdesc . "32c6ab8ce418") (:keywords "text" "bibtex") (:authors ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainers ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainer "Joost Kremers" . "joostkremers@fastmail.fm"))])
+ (ebib-sidecar . [(20260314 1744) ((emacs (28 1)) (citeproc (0 9 4)) (universal-sidecar (1 5 1)) (universal-sidecar-citeproc (1 0 0)) (ebib (2 39))) "Sidecar to show formatted reference of current Ebib Entry" tar ((:url . "https://git.sr.ht/~swflint/emacs-universal-sidecar") (:commit . "3b6bd928f7adb840e62a63dd5bf1236ece912b13") (:revdesc . "3b6bd928f7ad") (:keywords "bib") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (ebnf-mode . [(20231022 1759) ((emacs (25 1))) "Major mode for EBNF files" tar ((:url . "https://github.com/nverno/ebnf-mode") (:commit . "61486b1c9d4746249640410e58087e318f801ed8") (:revdesc . "61486b1c9d47") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (ebuku . [(20260712 308) ((emacs (25 1))) "Interface to the buku Web bookmark manager" tar ((:url . "https://github.com/flexibeast/ebuku") (:commit . "dba4523f18591491c2d716442ad1da184747d879") (:revdesc . "dba4523f1859") (:keywords "bookmarks" "buku" "data" "web" "www") (:authors ("Alexis" . "flexibeast@gmail.com") ("Erik Sjöstrand" . "sjostrand.erik@gmail.com") ("Hilton Chain" . "hako@ultrarare.space")) (:maintainers ("Alexis" . "flexibeast@gmail.com")) (:maintainer "Alexis" . "flexibeast@gmail.com"))])
+ (eca . [(20260826 1629) ((emacs (28 1)) (dash (2 18 0)) (s (1 12 0)) (f (0 20 0)) (markdown-mode (2 3)) (compat (30 1))) "AI pair programming via ECA (Editor Code Assistant)" tar ((:url . "https://github.com/editor-code-assistant/eca-emacs") (:commit . "518fa18a541facf8ef7a3740bc611b10a00b73aa") (:revdesc . "518fa18a541f") (:keywords "tools") (:authors ("Eric Dallo" . "ercdll1337@gmail.com")) (:maintainers ("Eric Dallo" . "ercdll1337@gmail.com")) (:maintainer "Eric Dallo" . "ercdll1337@gmail.com"))])
+ (ecb . [(20260518 524) nil "A code browser for Emacs" tar ((:url . "https://github.com/ecb-org/ecb") (:commit . "ac7c585be4de7ba085ec91ef580361711a7f8c54") (:revdesc . "ac7c585be4de") (:keywords "browser" "code" "programming" "tools") (:authors ("Jesper Nordenberg" . "mayhem@home.se") ("Klaus Berndl" . "klaus.berndl@sdm.de") ("Kevin A. Burton" . "burton@openprivacy.org")) (:maintainers ("Klaus Berndl" . "klaus.berndl@sdm.de")) (:maintainer "Klaus Berndl" . "klaus.berndl@sdm.de"))])
+ (echo-bar . [(20260723 1521) nil "Turn the echo area into a custom status bar" tar ((:url . "https://github.com/qaiviq/echo-bar.el") (:commit . "25348c0220b58eea196ae79cab22e934817fdc89") (:revdesc . "25348c0220b5") (:keywords "convenience" "tools") (:authors ("Adam Tillou" . "qaiviq@gmail.com")) (:maintainers ("Adam Tillou" . "qaiviq@gmail.com")) (:maintainer "Adam Tillou" . "qaiviq@gmail.com"))])
+ (eclipse-theme . [(20191113 1518) nil "Theme based on Eclipse circa 2010" tar ((:url . "https://github.com/abo-abo/eclipse-theme") (:commit . "dcf97865512ed450f9d5137c1a05e12edb5b7f80") (:revdesc . "dcf97865512e") (:keywords "themes") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (ecukes . [(20241226 1759) ((emacs (25)) (commander (0 6 1)) (espuds (0 2 2)) (ansi (0 3 0)) (dash (2 2 0)) (s (1 8 0)) (f (0 11 0))) "Cucumber for Emacs" tar ((:url . "https://github.com/ecukes/ecukes") (:commit . "70cb0748b222b7c96ab9821ef898ffbdb45eacd8") (:revdesc . "70cb0748b222") (:keywords "test"))])
+ (edbi . [(20160225 141) ((concurrent (0 3 1)) (ctable (0 1 2)) (epc (0 1 1))) "Emacs Database Interface" tar ((:url . "https://github.com/kiwanami/emacs-edbi") (:commit . "6f50aaf4bde75255221f2292c7a4ad3fa9d918c0") (:revdesc . "6f50aaf4bde7") (:keywords "database" "epc") (:authors ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainers ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainer "SAKURAI Masashi" . "m.sakuraiatkiwanami.net"))])
+ (ede-php-autoload . [(20230916 441) nil "Simple EDE PHP Project" tar ((:url . "https://github.com/emacs-php/ede-php-autoload") (:commit . "a7c16292ecaf9b39321e7a99ccac259fcbf6c373") (:revdesc . "a7c16292ecaf") (:keywords "php" "project" "ede") (:authors ("Steven Rémot" . "steven.remot@gmail.com") ("original code for C++ by Eric M. Ludlam" . "eric@siege-engine.com")) (:maintainers ("Steven Rémot" . "steven.remot@gmail.com") ("original code for C++ by Eric M. Ludlam" . "eric@siege-engine.com")) (:maintainer "Steven Rémot" . "steven.remot@gmail.com"))])
+ (edebug-inline-result . [(20220820 2240) ((emacs (25 1))) "Show Edebug result inline" tar ((:url . "https://repo.or.cz/edebug-inline-result.git") (:commit . "90e401ae3e7b3c85da8b24af940fd97f5e744625") (:revdesc . "90e401ae3e7b") (:keywords "extensions" "lisp" "tools") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (edebug-x . [(20130616 625) nil "Extensions for Edebug" tar ((:url . "https://github.com/ScottyB/edebug-x") (:commit . "a2c2c42553d3bcbd5ac11898554865acbed1bc46") (:revdesc . "a2c2c42553d3") (:keywords "extensions") (:authors ("Scott Barnett" . "scott.n.barnett@gmail.com")) (:maintainers ("Scott Barnett" . "scott.n.barnett@gmail.com")) (:maintainer "Scott Barnett" . "scott.n.barnett@gmail.com"))])
+ (edit-as-format . [(20220221 1312) ((emacs (26 1)) (edit-indirect (0 1 5))) "Edit document as other format" tar ((:url . "https://github.com/etern/edit-as-format") (:commit . "59c6f439683846d994a7a2110b9b00cc16c08c40") (:revdesc . "59c6f4396838") (:keywords "files" "outlines" "convenience") (:authors ("Xiaobing Jing" . "jingxiaobing@gmail.com")) (:maintainers ("Xiaobing Jing" . "jingxiaobing@gmail.com")) (:maintainer "Xiaobing Jing" . "jingxiaobing@gmail.com"))])
+ (edit-at-point . [(20191013 1218) nil "Edit(copy,cut..) current things(word,symbol..) under cursor" tar ((:url . "https://github.com/enoson/edit-at-point.el") (:commit . "28c85a65c9c61f2aff50bc5e93f61cde26a5d9c0") (:revdesc . "28c85a65c9c6") (:authors (nil . "e.enoson@gmail.com")) (:maintainers (nil . "e.enoson@gmail.com")) (:maintainer nil . "e.enoson@gmail.com"))])
+ (edit-chrome-textarea . [(20200324 1513) ((emacs (25 1)) (websocket (1 4))) "Edit Chrome Textarea" tar ((:url . "https://github.com/xuchunyang/edit-chrome-textarea.el") (:commit . "302659e92b7ef88824691905df3f926766f64729") (:revdesc . "302659e92b7e") (:keywords "tools"))])
+ (edit-color-stamp . [(20130529 1733) ((es-lib (0 2)) (cl-lib (1 0))) "Edit a hex color stamp, using a QT or the internal color picker" tar ((:url . "https://github.com/sabof/edit-color-stamp") (:commit . "32dc1ca5bcf3dcf83fad5e39b55dc5b77becb3d3") (:revdesc . "32dc1ca5bcf3"))])
+ (edit-indirect . [(20240128 119) ((emacs (24 3))) "Edit regions in separate buffers" tar ((:url . "https://github.com/Fanael/edit-indirect") (:commit . "82a28d8a85277cfe453af464603ea330eae41c05") (:revdesc . "82a28d8a8527") (:authors ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (edit-indirect-region-latex . [(20161129 645) ((emacs (24 3)) (ht (2 2)) (edit-indirect (0 1 4))) "Edit LaTeX regions in separate buffers, e.g. for English grammar checks" tar ((:url . "https://github.com/niitsuma/edit-indirect-region-latex") (:commit . "05043f2c0c9838947d3ca4b51b695deb7c47612e") (:revdesc . "05043f2c0c98") (:authors ("Hirotaka Niitsuma" . "hirotaka.niitsuma@gmail.com")) (:maintainers ("Hirotaka Niitsuma" . "hirotaka.niitsuma@gmail.com")) (:maintainer "Hirotaka Niitsuma" . "hirotaka.niitsuma@gmail.com"))])
+ (edit-list . [(20100930 1443) nil "Edit a single list" tar ((:url . "http://mwolson.org/static/dist/elisp/edit-list.el") (:commit . "f460d3f9e208a4e606fe6ded307f1b011916ca71") (:revdesc . "f460d3f9e208") (:authors ("Michael Olson" . "mwolson@gnu.org")) (:maintainers ("Michael Olson" . "mwolson@gnu.org")) (:maintainer "Michael Olson" . "mwolson@gnu.org"))])
+ (edit-metadata . [(20260307 1827) ((exiftool (0 3 2)) (emacs (28 1)) (compat (29 1))) "Edit embedded metadata" tar ((:url . "https://codeberg.org/mxpi/edit-metadata") (:commit . "52f7b4818e7a9335fd51bfc6198d8a52e14b2d1f") (:revdesc . "52f7b4818e7a") (:keywords "files" "multimedia") (:authors ("Michael Piotrowski" . "mxp@dynalabs.de")) (:maintainers ("Michael Piotrowski" . "mxp@dynalabs.de")) (:maintainer "Michael Piotrowski" . "mxp@dynalabs.de"))])
+ (edit-server . [(20260104 1224) nil "Server that responds to edit requests from Chrome" tar ((:url . "https://github.com/stsquad/emacs_chrome") (:commit . "c7cb4cb0043e4545588f110d6e48bf9230dbf354") (:revdesc . "c7cb4cb0043e") (:authors ("Alex Bennée" . "alex@bennee.com")) (:maintainers ("Alex Bennée" . "alex@bennee.com")) (:maintainer "Alex Bennée" . "alex@bennee.com"))])
+ (edit-server-htmlize . [(20130329 2248) ((edit-server (1 9))) "(de)HTMLization hooks for edit-server.el" tar ((:url . "https://github.com/frobtech/edit-server-htmlize") (:commit . "e7f8dadfabe869c77ca241cd6fbd4c52bd908392") (:revdesc . "e7f8dadfabe8") (:authors ("Roland McGrath" . "roland@hack.frob.com")) (:maintainers ("Roland McGrath" . "roland@hack.frob.com")) (:maintainer "Roland McGrath" . "roland@hack.frob.com"))])
+ (editorconfig . [(20260118 718) ((emacs (27 2))) "EditorConfig Emacs Plugin" tar ((:url . "https://github.com/editorconfig/editorconfig-emacs#readme") (:commit . "1e9931d5f38a8d8cb8a92cf726d64696550bfc95") (:revdesc . "1e9931d5f38a") (:keywords "convenience" "editorconfig") (:authors ("EditorConfig Team" . "editorconfig@googlegroups.com")) (:maintainers ("EditorConfig Team" . "editorconfig@googlegroups.com")) (:maintainer "EditorConfig Team" . "editorconfig@googlegroups.com"))])
+ (editorconfig-charset-extras . [(20180223 457) ((editorconfig (0 6 0))) "Extra EditorConfig Charset Support" tar ((:url . "https://github.com/10sr/editorconfig-charset-extras-el") (:commit . "ddf60923c6f4841cb593b2ea04c9c710a01d262f") (:revdesc . "ddf60923c6f4") (:keywords "tools") (:authors ("10sr" . "8.slashes@gmail.com")) (:maintainers ("10sr" . "8.slashes@gmail.com")) (:maintainer "10sr" . "8.slashes@gmail.com"))])
+ (editorconfig-custom-majormode . [(20180816 244) ((editorconfig (0 6 0))) "Decide major-mode and mmm-mode from EditorConfig" tar ((:url . "https://github.com/10sr/editorconfig-custom-majormode-el") (:commit . "13ad1c83f847bedd4b3a19f9df7fd925853b19de") (:revdesc . "13ad1c83f847") (:keywords "editorconfig" "util") (:authors ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainers ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainer "10sr" . "8slashes+el[at]gmail[dot]com"))])
+ (editorconfig-domain-specific . [(20180505 924) ((cl-lib (0 5)) (editorconfig (0 6 0))) "Apply brace style and other \"domain-specific\" EditorConfig properties" tar ((:url . "https://github.com/lassik/editorconfig-emacs-domain-specific") (:commit . "e9824160fb2e466afa755240ee3ab7cc5657fb04") (:revdesc . "e9824160fb2e") (:keywords "editorconfig" "util") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (editorconfig-generate . [(20190513 433) ((emacs (24))) "Generate .editorconfig" tar ((:url . "https://github.com/10sr/editorconfig-generate-el") (:commit . "47a31f928f46d2a0188db8e2cffa5d6354a81573") (:revdesc . "47a31f928f46") (:keywords "tools") (:authors ("10sr" . "8.slashes@gmail.com")) (:maintainers ("10sr" . "8.slashes@gmail.com")) (:maintainer "10sr" . "8.slashes@gmail.com"))])
+ (edn . [(20160215 1219) ((cl-lib (0 3)) (emacs (24 1)) (peg (0 6))) "Support for reading and writing the edn data format from elisp" tar ((:url . "https://www.github.com/expez/edn.el") (:commit . "be9e32d1b49e35247b263b0243df7cfdc8d413ab") (:revdesc . "be9e32d1b49e") (:keywords "edn" "clojure") (:authors ("Lars Andersen" . "expez@expez.com")) (:maintainers ("Lars Andersen" . "expez@expez.com")) (:maintainer "Lars Andersen" . "expez@expez.com"))])
+ (edna-theme . [(20260214 2320) ((emacs (26 1))) "A dark, Edna-inspired theme" tar ((:url . "https://codeberg.org/golanv/edna-theme") (:commit . "78da1fcde3d03f4ff65b310d19319dc26140566b") (:revdesc . "78da1fcde3d0") (:keywords "faces" "theme") (:authors ("golanv" . "https://codeberg.org/golanv")) (:maintainers ("golanv" . "https://codeberg.org/golanv")) (:maintainer "golanv" . "https://codeberg.org/golanv"))])
+ (ednc . [(20251104 1820) ((emacs (26 1))) "Emacs Desktop Notification Center" tar ((:url . "https://github.com/sinic/ednc") (:commit . "638d73e7c3fe4ffe86199e33fb85fbaa4cf1ab7f") (:revdesc . "638d73e7c3fe") (:keywords "unix") (:authors ("Simon Nicolussi" . "sinic@sinic.name")) (:maintainers ("Simon Nicolussi" . "sinic@sinic.name")) (:maintainer "Simon Nicolussi" . "sinic@sinic.name"))])
+ (edts . [(20250214 2310) ((auto-complete (20201213 1255)) (auto-highlight-symbol (20211106 638)) (dash (20210609 1330)) (emacs (24 3)) (erlang (20210315 1640)) (f (20191110 1357)) (popup (20210317 138)) (s (20210603 736))) "Erlang Development Tool Suite" tar ((:url . "https://github.com/sebastiw/edts") (:commit . "5481bcbe61f2843fbb939daac5a32e59b9acfd69") (:revdesc . "5481bcbe61f2") (:keywords "erlang" "tools" "programming" "development") (:authors ("Thomas Järvstrand" . "tjarvstrand@gmail.com") ("Sebastian Weddmark Olsson" . "visnae@gmail.com")) (:maintainers ("Thomas Järvstrand" . "tjarvstrand@gmail.com") ("Sebastian Weddmark Olsson" . "visnae@gmail.com")) (:maintainer "Thomas Järvstrand" . "tjarvstrand@gmail.com"))])
+ (edwina . [(20221206 1610) ((emacs (25))) "Dynamic window manager" tar ((:url . "https://gitlab.com/ajgrf/edwina") (:commit . "f95c31b1de95df7e83338a5d4daf3363df325862") (:revdesc . "f95c31b1de95") (:keywords "convenience") (:authors ("Alex Griffin" . "a@ajgrf.com")) (:maintainers ("Alex Griffin" . "a@ajgrf.com")) (:maintainer "Alex Griffin" . "a@ajgrf.com"))])
+ (efar . [(20230216 1213) ((emacs (26 1))) "FAR-like file manager" tar ((:url . "https://github.com/suntsov/efar") (:commit . "78618a6cd9fe7d46c3728db3589d1fe50f7c1c6b") (:revdesc . "78618a6cd9fe") (:keywords "files") (:authors ("Vladimir Suntsov" . "vladimir@suntsov.online")) (:maintainers (nil . "vladimir@suntsov.online")) (:maintainer nil . "vladimir@suntsov.online"))])
+ (eff . [(20240708 231) ((emacs (28))) "Show symbols in Executable File Formats" tar ((:url . "https://github.com/oxidase/eff") (:commit . "b8298439360b29333d3dcd8a352e00cde2b6ccd7") (:revdesc . "b8298439360b") (:keywords "elf" "readelf" "convenience"))])
+ (efinger . [(20260822 1753) ((emacs (28 1))) "Finger client and .plan feed reader" tar ((:url . "https://git.andros.dev/andros/efinger.el") (:commit . "175b0d027da97a64819dc8b7056a148ac1b23ea1") (:revdesc . "175b0d027da9") (:keywords "comm") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (efire . [(20151009 2031) ((circe (1 2))) "Use campfire from Emacs" tar ((:url . "https://github.com/capitaomorte/efire") (:commit . "d38dd6dd7974b7cb11bff6fd84846fd01163211a") (:revdesc . "d38dd6dd7974") (:keywords "convenience" "tools") (:authors ("João Távora" . "joaotavora@gmail.com")) (:maintainers ("João Távora" . "joaotavora@gmail.com")) (:maintainer "João Távora" . "joaotavora@gmail.com"))])
+ (eg . [(20260331 1939) ((emacs (29 1))) "Norton Guide reader" tar ((:url . "https://github.com/davep/eg.el") (:commit . "6b4302a57c87f0535d4ebc51f701aecf4d3dbe87") (:revdesc . "6b4302a57c87") (:keywords "docs") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (egalgo . [(20211105 1657) ((emacs (24 3))) "Genetic algorithm" tar ((:url . "https://github.com/ROCKTAKEY/egalgo") (:commit . "a56a86591351d53ca2add7c651757bfb0064fb22") (:revdesc . "a56a86591351") (:keywords "data") (:authors ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "ROCKTAKEY" . "rocktakey@gmail.com"))])
+ (egg . [(20181126 500) nil "Emacs Got Git - Emacs interface to Git" tar ((:url . "https://github.com/byplayer/egg") (:commit . "00e768a78ac3d25f457eed667d02cac568480bf9") (:revdesc . "00e768a78ac3") (:keywords "git" "version control" "release management") (:authors ("Bogolisk" . "bogolisk@gmail.com")) (:maintainers ("Bogolisk" . "bogolisk@gmail.com")) (:maintainer "Bogolisk" . "bogolisk@gmail.com"))])
+ (egg-timer . [(20200217 1650) ((emacs (25 1))) "Commonly used intervals for setting timers while working" tar ((:url . "https://github.com/wpcarro/egg-timer.el") (:commit . "53a9e9d20453ea4b0198ca413b8b5069a0b30b38") (:revdesc . "53a9e9d20453") (:authors ("William Carroll" . "wpcarro@gmail.com")) (:maintainers ("William Carroll" . "wpcarro@gmail.com")) (:maintainer "William Carroll" . "wpcarro@gmail.com"))])
+ (egison-mode . [(20260720 1006) nil "Egison editing mode" tar ((:url . "https://github.com/egisatoshi/egison/blob/master/emacs/egison-mode.el") (:commit . "cbd50c069e9b0791268a2a6bf136ea17f7f995fb") (:revdesc . "cbd50c069e9b") (:authors ("Satoshi Egi" . "egisatoshi@gmail.com")) (:maintainers ("Satoshi Egi" . "egisatoshi@gmail.com")) (:maintainer "Satoshi Egi" . "egisatoshi@gmail.com"))])
+ (eglot-fsharp . [(20250403 1925) ((emacs (27 1)) (eglot (1 4)) (fsharp-mode (1 10)) (jsonrpc (1 0 14))) "Fsharp-mode eglot integration" tar ((:url . "https://github.com/fsharp/emacs-fsharp-mode") (:commit . "8d08f057889bcd19812d17d955865428626d8c47") (:revdesc . "8d08f057889b") (:keywords "languages") (:authors ("Jürgen Hötzel" . "juergen@hoetzel.info")) (:maintainers ("Jürgen Hötzel" . "juergen@hoetzel.info")) (:maintainer "Jürgen Hötzel" . "juergen@hoetzel.info"))])
+ (eglot-java . [(20250527 1232) ((emacs (26 1)) (eglot (1 0)) (jsonrpc (1 0 0))) "Java extension for the eglot LSP client" tar ((:url . "https://github.com/yveszoundi/eglot-java") (:commit . "b42b5190f3f59976d330fcec5fd27fc8e2701336") (:revdesc . "b42b5190f3f5") (:keywords "convenience" "languages") (:authors ("Yves Zoundi and contributors" . "yves_zoundi@hotmail.com")) (:maintainers ("Yves Zoundi" . "yves_zoundi@hotmail.com")) (:maintainer "Yves Zoundi" . "yves_zoundi@hotmail.com"))])
+ (eglot-jl . [(20260705 2320) ((emacs (25 1)) (eglot (1 4)) (project (0 8 1)) (cl-generic (1 0))) "Julia support for eglot" tar ((:url . "https://github.com/non-Jedi/eglot-jl") (:commit . "ebe4358b48827a85dd4c714bcc3db11842aa6c3c") (:revdesc . "ebe4358b4882") (:keywords "convenience" "languages") (:authors ("Adam Beckmeyer" . "adam_git@thebeckmeyers.xyz")) (:maintainers ("Adam Beckmeyer" . "adam_git@thebeckmeyers.xyz")) (:maintainer "Adam Beckmeyer" . "adam_git@thebeckmeyers.xyz"))])
+ (eglot-luau . [(20260226 11) ((emacs (29 1)) (eglot (1 17))) "Luau language server integration for eglot" tar ((:url . "https://github.com/kennethloeffler/eglot-luau") (:commit . "cf024fb654e0a38d1de2e3fbd1d7a9cde9936f1e") (:revdesc . "cf024fb654e0") (:keywords "roblox" "luau" "tools") (:authors ("Kenneth Loeffler" . "kenloef@gmail.com")) (:maintainers ("Kenneth Loeffler" . "kenloef@gmail.com")) (:maintainer "Kenneth Loeffler" . "kenloef@gmail.com"))])
+ (eglot-python-preset . [(20260617 148) ((emacs (30 2)) (eglot (1 17))) "Eglot preset for Python" tar ((:url . "https://github.com/mwolson/eglot-python-preset") (:commit . "719b3aa8fd47aec6c1c3094e2468f41b9d588b09") (:revdesc . "719b3aa8fd47") (:keywords "python" "convenience" "languages" "tools") (:authors ("Michael Olson" . "mwolson@gnu.org")) (:maintainers ("Michael Olson" . "mwolson@gnu.org")) (:maintainer "Michael Olson" . "mwolson@gnu.org"))])
+ (eglot-signature-eldoc-talkative . [(20240626 815) ((emacs (29 1)) (eglot (1 16)) (eldoc (1 14 0)) (jsonrpc (1 0 23))) "Make Eglot make ElDoc echo docs" tar ((:url . "https://codeberg.org/mekeor/eglot-signature-eldoc-talkative") (:commit . "34cc207265f26f13142f5c62276e0ba18e1d55e4") (:revdesc . "34cc207265f2") (:keywords "convenience" "documentation" "eglot" "eldoc" "languages" "lsp") (:authors ("João Távora" . "joaotavora@gmail.com") ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainers ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainer "Mekeor Melire" . "mekeor@posteo.de"))])
+ (eglot-tempel . [(20241115 1110) ((eglot (1 9)) (tempel (0 5)) (emacs (29 1)) (peg (1 0 1))) "Use tempel to expand snippets from eglot" tar ((:url . "https://github.com/fejfighter/eglot-tempel") (:commit . "c6c9a18eba61f6bae7167fa62bab9b637592d20d") (:revdesc . "c6c9a18eba61") (:keywords "convenience" "languages" "tools") (:authors ("Jeff Walsh" . "fejfighter@gmail.com")) (:maintainers ("Jeff Walsh" . "fejfighter@gmail.com")) (:maintainer "Jeff Walsh" . "fejfighter@gmail.com"))])
+ (eglot-typescript-preset . [(20260617 128) ((emacs (30 2)) (eglot (1 17))) "Eglot preset for TypeScript" tar ((:url . "https://github.com/mwolson/eglot-typescript-preset") (:commit . "cc780650223cf08f2268bca3de16509c61ef885d") (:revdesc . "cc780650223c") (:keywords "typescript" "javascript" "convenience" "languages" "tools") (:authors ("Michael Olson" . "mwolson@gnu.org")) (:maintainers ("Michael Olson" . "mwolson@gnu.org")) (:maintainer "Michael Olson" . "mwolson@gnu.org"))])
+ (ego . [(20200803 1101) ((emacs (24 5)) (ht (1 5)) (mustache (0 22)) (htmlize (1 47)) (org (8 0)) (dash (2 0 0))) "A static site generator based on org mode, forked from org-page" tar ((:url . "https://github.com/emacs-china/EGO") (:commit . "211c4cb2af2582849d9df984fb2346deecaf79be") (:revdesc . "211c4cb2af25") (:keywords "org-mode" "convenience" "beautify") (:authors ("Feng Shu" . "tumashuAT163.com") ("Kelvin Hu" . "iniDOTkelvinATgmailDOTcom") ("Kuangdash" . "kuangdashAT163.com")) (:maintainers ("Feng Shu" . "tumashuAT163.com") ("Kelvin Hu" . "iniDOTkelvinATgmailDOTcom") ("Kuangdash" . "kuangdashAT163.com")) (:maintainer "Feng Shu" . "tumashuAT163.com"))])
+ (eide . [(20260723 2036) ((emacs (26 1))) "IDE features made available out of the box" tar ((:url . "https://forge.tedomum.net/hjuvi/eide") (:commit . "74448bb8c2e3674c3b9d332b250cd27a34850b67") (:revdesc . "74448bb8c2e3") (:authors ("Cédric Marie" . "hjuvi@tedomum.fr")) (:maintainers ("Cédric Marie" . "hjuvi@tedomum.fr")) (:maintainer "Cédric Marie" . "hjuvi@tedomum.fr"))])
+ (eimp . [(20120826 2039) nil "Emacs Image Manipulation Package" tar ((:url . "https://github.com/nicferrier/eimp") (:commit . "2e7536fe6d8f7faf1bad7a8ae37faba0162c3b4f") (:revdesc . "2e7536fe6d8f") (:keywords "files" "frames") (:authors ("Matthew P. Hodges" . "MPHodges@member.fsf.org")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (ein . [(20251212 1623) ((emacs (26 1)) (websocket (1 12)) (anaphora (1 0 4)) (request (0 3 3)) (deferred (0 5)) (polymode (0 2 2)) (dash (2 13 0)) (with-editor (0 -1))) "Jupyter notebook client" tar ((:url . "https://github.com/dickmao/emacs-ipython-notebook") (:commit . "8fa836fcd1c22f45d36249b09590b32a890f2b9e") (:revdesc . "8fa836fcd1c2") (:keywords "jupyter" "literate programming" "reproducible research") (:authors ("dickmao" . "githubid:dickmao") ("John Miller" . "millejohatmillejoh.com") ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainers ("dickmao" . "githubid:dickmao") ("John Miller" . "millejohatmillejoh.com") ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainer "dickmao" . "githubid:dickmao"))])
+ (eink-theme . [(20190219 858) nil "E Ink color theme" tar ((:url . "https://github.com/maio/eink-emacs") (:commit . "326b07523dcb076d6209cdbc7fdbb73df296dbdb") (:revdesc . "326b07523dcb") (:authors ("Marian Schubert" . "marian.schubert@gmail.com")) (:maintainers ("Marian Schubert" . "marian.schubert@gmail.com")) (:maintainer "Marian Schubert" . "marian.schubert@gmail.com"))])
+ (ejc-sql . [(20241111 117) ((emacs (26 3)) (clomacs (0 0 5)) (dash (2 16 0)) (spinner (1 7 3))) "Emacs SQL client uses Clojure JDBC" tar ((:url . "https://github.com/kostafey/ejc-sql") (:commit . "1fc5a38d974aed401424ecd3b49a74e0a0ebc3bb") (:revdesc . "1fc5a38d974a") (:keywords "sql" "jdbc") (:authors ("Kostafey" . "kostafey@gmail.com")) (:maintainers ("Kostafey" . "kostafey@gmail.com")) (:maintainer "Kostafey" . "kostafey@gmail.com"))])
+ (ejson-mode . [(20190720 2138) ((emacs (25))) "Major mode for editing ejson files" tar ((:url . "https://github.com/dantecatalfamo/ejson-mode") (:commit . "9630dfac9549779711dbe89e621f516bb4b3a354") (:revdesc . "9630dfac9549") (:keywords "convenience" "languages" "tools"))])
+ (ekg . [(20260803 155) ((triples (0 6 1)) (emacs (28 1)) (llm (0 18 0)) (vui (1 0 0))) "A sqlite-based note-taking package based on tags" tar ((:url . "https://github.com/ahyatt/ekg") (:commit . "1cf54ac295fcf7bb74c93398ebbe4e1c5174a028") (:revdesc . "1cf54ac295fc") (:keywords "outlines" "hypermedia") (:authors ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainers ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainer "Andrew Hyatt" . "ahyatt@gmail.com"))])
+ (ekg-agent . [(20260717 2134) ((ekg (20260305)) (futur (1 2))) "Agent tools for ekg" tar ((:url . "https://github.com/ahyatt/ekg") (:commit . "3ea7ac9fc6f881ce63e8ab06dc71f4f383016c6f") (:revdesc . "3ea7ac9fc6f8") (:keywords "outlines" "hypermedia") (:authors ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainers ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainer "Andrew Hyatt" . "ahyatt@gmail.com"))])
+ (ekg-denote . [(20260707 412) ((ekg (20260305)) (denote (4 0 0))) "Denote integration for ekg" tar ((:url . "https://github.com/ahyatt/ekg") (:commit . "f1401f4189143dcfce5cd7d68231462d7a8873ec") (:revdesc . "f1401f418914") (:keywords "outlines" "hypermedia") (:authors ("Jay Rajput" . "jayrajput@gmail.com")) (:maintainers ("Jay Rajput" . "jayrajput@gmail.com")) (:maintainer "Jay Rajput" . "jayrajput@gmail.com"))])
+ (el-autoyas . [(20120918 1317) nil "Automatically create Emacs-Lisp Yasnippets" tar ((:url . "https://github.com/mlf176f2/el-autoyas.el") (:commit . "bde0251ecb504f585dfa27c205c8e312655310cc") (:revdesc . "bde0251ecb50") (:keywords "emacs" "lisp" "mode" "yasnippet"))])
+ (el-fetch . [(20251225 1426) ((emacs (25 1))) "Show system information in Neofetch-like style (eg CPU, RAM)" tar ((:url . "https://gitlab.com/xgqt/xgqt-elisp-app-el-fetch") (:commit . "169e2bffe77b43577acbf83d7d8073b6808b880e") (:revdesc . "169e2bffe77b") (:keywords "games") (:authors ("Maciej Barć" . "xgqt@xgqt.org")) (:maintainers ("Maciej Barć" . "xgqt@xgqt.org")) (:maintainer "Maciej Barć" . "xgqt@xgqt.org"))])
+ (el-fly-indent-mode . [(20180422 243) ((emacs (25))) "Indent Emacs Lisp on the fly" tar ((:url . "https://github.com/jiahaowork/el-fly-indent-mode.el") (:commit . "1dd4b907ff4d9581c18b4e38e8719e83ba0dace1") (:revdesc . "1dd4b907ff4d") (:keywords "lisp" "languages") (:authors ("Jiahao Li" . "jiahaowork@gmail.com")) (:maintainers ("Jiahao Li" . "jiahaowork@gmail.com")) (:maintainer "Jiahao Li" . "jiahaowork@gmail.com"))])
+ (el-get . [(20260615 2354) nil "Manage the external elisp bits and pieces you depend upon" tar ((:url . "http://www.emacswiki.org/emacs/el-get") (:commit . "447b7efc9fca29a087f4ec29c5d8ccb580cd1c78") (:revdesc . "447b7efc9fca") (:keywords "emacs" "package" "elisp" "install" "elpa" "git" "git-svn" "bzr" "cvs" "svn" "darcs" "hg" "apt-get" "fink" "pacman" "http" "http-tar" "emacswiki") (:authors ("Dimitri Fontaine" . "dim@tapoueh.org")) (:maintainers ("Dimitri Fontaine" . "dim@tapoueh.org")) (:maintainer "Dimitri Fontaine" . "dim@tapoueh.org"))])
+ (el-init . [(20150728 920) ((emacs (24)) (cl-lib (0 5)) (anaphora (1 0 0))) "A loader inspired by init-loader" tar ((:url . "https://github.com/HKey/el-init") (:commit . "25fd21d820bca1cf576b8f70c8d5a3bc76792597") (:revdesc . "25fd21d820bc") (:authors ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainers ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainer "Hiroki YAMAKAWA" . "s06139@gmail.com"))])
+ (el-init-viewer . [(20150303 828) ((emacs (24)) (cl-lib (0 5)) (ctable (0 1 2)) (dash (2 10 0)) (anaphora (1 0 0)) (el-init (0 1 4))) "Record viewer for el-init" tar ((:url . "https://github.com/HKey/el-init-viewer") (:commit . "c40417db7808c8b8c9b2f196a69de5da7eee84a2") (:revdesc . "c40417db7808") (:authors ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainers ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainer "Hiroki YAMAKAWA" . "s06139@gmail.com"))])
+ (el-job . [(20260306 643) ((emacs (29 1))) "Contrived way to call a function using all CPU cores" tar ((:url . "https://github.com/meedstrom/el-job") (:commit . "8b21c8f9a47a71102bf4ec08504b044aeab880fe") (:revdesc . "8b21c8f9a47a") (:keywords "processes") (:authors ("Martin Edström" . "meedstrom@runbox.eu")) (:maintainers ("Martin Edström" . "meedstrom@runbox.eu")) (:maintainer "Martin Edström" . "meedstrom@runbox.eu"))])
+ (el-mock . [(20220625 1949) nil "Tiny Mock and Stub framework in Emacs Lisp" tar ((:url . "https://github.com/rejeep/el-mock.el") (:commit . "6cfbc9de8f1927295dca6864907fe4156bd71910") (:revdesc . "6cfbc9de8f19") (:keywords "lisp" "testing" "unittest") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (el-patch . [(20250816 21) ((emacs (26))) "Future-proof your Elisp" tar ((:url . "https://github.com/radian-software/el-patch") (:commit . "5adb7097d0ff3d9e004a8bb07c0b25f7ee20ba8a") (:revdesc . "5adb7097d0ff") (:keywords "extensions") (:authors ("Radian LLC" . "contact+el-patch@radian.codes")) (:maintainers ("Radian LLC" . "contact+el-patch@radian.codes")) (:maintainer "Radian LLC" . "contact+el-patch@radian.codes"))])
+ (el-secretario . [(20250407 1946) ((emacs (27 1)) (org-ql (0 6 -1)) (hercules (0 3))) "Unify all your inboxes with the Emacs secretary" tar ((:url . "https://git.sr.ht/~zetagon/el-secretario") (:commit . "cb62184ee740df345665ba091267ca41f5895b04") (:revdesc . "cb62184ee740") (:keywords "convenience") (:authors ("Leo Okawa Ericson" . "https://sr.ht/~zetagon")) (:maintainers ("Leo Okawa Ericson" . "git@relevant-information.com")) (:maintainer "Leo Okawa Ericson" . "git@relevant-information.com"))])
+ (el-secretario-elfeed . [(20250709 1937) ((emacs (27 1)) (el-secretario (0 0 1)) (elfeed (3 4 1))) "Add elfeed feeds to el-secretario" tar ((:url . "https://git.sr.ht/~zetagon/el-secretario") (:commit . "77bfa47532cfa06ad6d1627dbc61e60996b064e4") (:revdesc . "77bfa47532cf") (:keywords "convenience") (:authors ("Leo Okawa Ericson" . "https://sr.ht/~zetagon")) (:maintainers ("Leo Okawa Ericson" . "git@relevant-information.com")) (:maintainer "Leo Okawa Ericson" . "git@relevant-information.com"))])
+ (el-secretario-mu4e . [(20250407 1946) ((emacs (27 1)) (org-ql (0 6 -1)) (el-secretario (0 0 1))) "Add mu4e inboxes to el-secretario" tar ((:url . "https://git.sr.ht/~zetagon/el-secretario") (:commit . "0c728c3bdd1d19356c192ba333a945d732bd16b8") (:revdesc . "0c728c3bdd1d") (:keywords "convenience" "mail") (:authors ("Leo Okawa Ericson" . "https://sr.ht/~zetagon")) (:maintainers ("Leo Okawa Ericson" . "git@relevant-information.com")) (:maintainer "Leo Okawa Ericson" . "git@relevant-information.com"))])
+ (el-secretario-notmuch . [(20250407 1946) ((emacs (27 1)) (el-secretario (0 0 1)) (notmuch (0 3 1))) "Add notmuch inboxes to el-secretario" tar ((:url . "https://git.sr.ht/~zetagon/el-secretario") (:commit . "0c728c3bdd1d19356c192ba333a945d732bd16b8") (:revdesc . "0c728c3bdd1d") (:keywords "convenience" "mail") (:authors ("Leo Okawa Ericson" . "https://sr.ht/~zetagon")) (:maintainers ("Leo Okawa Ericson" . "git@relevant-information.com")) (:maintainer "Leo Okawa Ericson" . "git@relevant-information.com"))])
+ (el-secretario-org . [(20250411 1608) ((emacs (27 1)) (org-ql (0 6 -1)) (dash (2 18 1)) (el-secretario (0 0 1))) "Create inboxes out of org-mode files for el-secretario" tar ((:url . "https://git.sr.ht/~zetagon/el-secretario") (:commit . "70dee3593e63384d536b59958d9765751c8065b9") (:revdesc . "70dee3593e63") (:keywords "convenience") (:authors ("Leo Okawa Ericson" . "https://sr.ht/~zetagon")) (:maintainers ("Leo Okawa Ericson" . "git@relevant-information.com")) (:maintainer "Leo Okawa Ericson" . "git@relevant-information.com"))])
+ (el-spec . [(20121018 704) nil "Ruby's rspec like syntax test frame work" tar ((:url . "https://github.com/uk-ar/el-spec") (:commit . "1dbc465401d4aea5560318c4f13ff30920a0718d") (:revdesc . "1dbc465401d4") (:keywords "test") (:authors ("Yuuki Arisawa" . "yuuki.ari@gmail.com")) (:maintainers ("Yuuki Arisawa" . "yuuki.ari@gmail.com")) (:maintainer "Yuuki Arisawa" . "yuuki.ari@gmail.com"))])
+ (el-spice . [(20201013 1729) nil "Extra spice for emacs lisp programming" tar ((:url . "https://github.com/vedang/el-spice") (:commit . "a1adde201ee10881b522e67aa2c605378943a28d") (:revdesc . "a1adde201ee1") (:keywords "languages" "extensions") (:authors ("Vedang Manerikar" . "vedang.manerikar@gmail.com")) (:maintainers ("Vedang Manerikar" . "vedang.manerikar@gmail.com")) (:maintainer "Vedang Manerikar" . "vedang.manerikar@gmail.com"))])
+ (el-sprunge . [(20200312 1212) ((web-server (20140105 2246)) (htmlize (20130207 1202)) (emacs (24 3))) "Command line paste server with Emacs highlighting" tar ((:url . "https://github.com/eschulte/el-sprunge") (:commit . "e4365ea0bdf60969817619376bdcc98003fec33d") (:revdesc . "e4365ea0bdf6") (:keywords "http" "html" "server" "sprunge" "paste") (:authors ("Eric Schulte" . "schulte.eric@gmail.com")) (:maintainers ("Eric Schulte" . "schulte.eric@gmail.com")) (:maintainer "Eric Schulte" . "schulte.eric@gmail.com"))])
+ (el-spy . [(20131226 2008) nil "Mocking framework for Emacs lisp. It also support spy, proxy" tar ((:url . "https://github.com/uk-ar/el-spy") (:commit . "b1dead9d1877660856ada22d906ac4e54695aec7") (:revdesc . "b1dead9d1877") (:keywords "test") (:authors ("Yuuki Arisawa" . "yuuki.ari@gmail.com")) (:maintainers ("Yuuki Arisawa" . "yuuki.ari@gmail.com")) (:maintainer "Yuuki Arisawa" . "yuuki.ari@gmail.com"))])
+ (el-who . [(20240916 613) ((emacs (25 1))) "A s-expression html DSL library compatible with cl-who" tar ((:url . "https://github.com/alejandrogallo/el-who") (:commit . "bfefb23742ac3695578d4b748895df5ccbba6b44") (:revdesc . "bfefb23742ac") (:keywords "lisp" "hypermedia" "docs" "tools" "html" "web") (:authors ("Alejandro Gallo" . "aamsgallo@gmail.com")) (:maintainers ("Alejandro Gallo" . "aamsgallo@gmail.com")) (:maintainer "Alejandro Gallo" . "aamsgallo@gmail.com"))])
+ (el2markdown . [(20250105 1836) nil "Convert commentary of elisp files to markdown" tar ((:url . "https://github.com/Lindydancer/el2markdown") (:commit . "66f11d8e46f2def11b3c46abdc114bfd9cfa185e") (:revdesc . "66f11d8e46f2"))])
+ (el2org . [(20200408 146) ((emacs (25 1))) "Convert elisp file to org file" tar ((:url . "https://github.com/tumashu/el2org") (:commit . "7db77fdd73f378d4e60e34c11bbdf00677adc32c") (:revdesc . "7db77fdd73f3") (:keywords "convenience") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (elbank . [(20180316 1343) ((emacs (25)) (seq (2 16))) "Personal finances reporting application" tar ((:url . "https://github.com/NicolasPetton/elbank") (:commit . "6dbd21e31fdf7cf62491f6d24b8198d4f91a031b") (:revdesc . "6dbd21e31fdf") (:keywords "tools" "personal-finances") (:authors ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainers ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainer "Nicolas Petton" . "nicolas@petton.fr"))])
+ (elchacha . [(20250922 1827) ((emacs (25 1))) "Elisp ChaCha20 implementation" tar ((:url . "https://github.com/KeyWeeUsr/elchacha") (:commit . "e6e71b8b25eafefd23c33d0d9cb820c4eb646ff6") (:revdesc . "e6e71b8b25ea") (:keywords "convenience" "elchacha") (:authors ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainers ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainer "Peter Badida" . "keyweeusr@gmail.com"))])
+ (elcontext . [(20210109 1238) ((ht (2 3)) (hydra (0 14 0)) (emacs (24 3)) (f (0 20 0)) (osx-location (0 4)) (uuidgen (0 3))) "Create context specific actions" tar ((:url . "https://github.com/rollacaster/elcontext") (:commit . "2efd3dd8c5176c4f071bb048be6cb069b05d6e9e") (:revdesc . "2efd3dd8c517") (:keywords "calendar" "convenience"))])
+ (elcord . [(20260506 2048) ((emacs (25 1))) "Allows you to integrate Rich Presence from Discord" tar ((:url . "https://github.com/Mstrodl/elcord") (:commit . "033be3dc076fdb3de335d3b12bac5f783ebec820") (:revdesc . "033be3dc076f") (:keywords "games") (:authors ("Wilfredo Velázquez-Rodríguez" . "zulu.inuoe@gmail.com")) (:maintainers ("Wilfredo Velázquez-Rodríguez" . "zulu.inuoe@gmail.com")) (:maintainer "Wilfredo Velázquez-Rodríguez" . "zulu.inuoe@gmail.com"))])
+ (elcouch . [(20230903 750) ((emacs (25 1)) (json-mode (1 0 0)) (libelcouch (0 11 0)) (navigel (0 3 0))) "View and manipulate CouchDB databases" tar ((:url . "https://gitlab.petton.fr/DamienCassou/elcouch") (:commit . "a426e9bee9501284f4e1e84766621ca6b130c79a") (:revdesc . "a426e9bee950") (:keywords "data" "tools") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (elcute . [(20260102 1001) ((emacs (29 1))) "Commands for marking and killing lines electrically" tar ((:url . "https://codeberg.org/vilij/slurpbarf-elcute") (:commit . "5ec0f75a308ab8ae1f29bbb3c18b63514fc83c20") (:revdesc . "5ec0f75a308a") (:keywords "convenience" "lisp" "xml"))])
+ (eldc . [(20260130 1628) ((emacs (25 1)) (deferred (0 5 1))) "Emacs Lisp Dictionary Converter" tar ((:url . "https://github.com/gicrisf/eldc") (:commit . "acd9971c491331b9824be96b6190497b6ca5ed53") (:revdesc . "acd9971c4913") (:keywords "tools" "data" "conversion" "yaml" "json") (:authors ("Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com")) (:maintainers ("Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com")) (:maintainer "Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com"))])
+ (eldev . [(20260612 1624) ((emacs (24 4))) "Elisp development tool" tar ((:url . "https://github.com/emacs-eldev/eldev") (:commit . "7ce62b0a71f75c8568e391e45eafe0687f610076") (:revdesc . "7ce62b0a71f7") (:keywords "maint" "tools") (:authors ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainers ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainer "Paul Pogonyshev" . "pogonyshev@gmail.com"))])
+ (eldoc-box . [(20260620 158) ((emacs (27 1))) "Display documentation in childframe" tar ((:url . "https://github.com/casouri/eldoc-box") (:commit . "e458cefba4013785ef6099c6245463689a50dd7d") (:revdesc . "e458cefba401") (:authors ("Yuan Fu" . "casouri@gmail.com")) (:maintainers ("Yuan Fu" . "casouri@gmail.com")) (:maintainer "Yuan Fu" . "casouri@gmail.com"))])
+ (eldoc-cmake . [(20250320 2017) ((emacs (25 1))) "Eldoc support for CMake" tar ((:url . "https://github.com/ikirill/eldoc-cmake") (:commit . "8ffe7ef0fc01f487834d6bb2468f2d55d68277f1") (:revdesc . "8ffe7ef0fc01"))])
+ (eldoc-eask . [(20251231 1607) ((emacs (26 1)) (eask (0 1 0))) "Eldoc support for Eask-file" tar ((:url . "https://github.com/emacs-eask/eldoc-eask") (:commit . "d305a63c5e67a3e8a6ff448c7419bcc1ac05d5b4") (:revdesc . "d305a63c5e67") (:keywords "convenience") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (eldoc-eval . [(20220106 1951) nil "Enable eldoc support when minibuffer is in use" tar ((:url . "https://github.com/thierryvolpiatto/eldoc-eval") (:commit . "e91800503c90cb75dc70abe42f1d6ae499346cc1") (:revdesc . "e91800503c90") (:authors ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainers ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainer "Thierry Volpiatto" . "thievol@posteo.net"))])
+ (eldoc-mouse . [(20260825 1036) ((emacs (27 1)) (posframe (1 5 1)) (eglot (1 23))) "Display documentation for mouse hover" tar ((:url . "https://github.com/huangfeiyu/eldoc-mouse") (:commit . "0bcefa8d1bc33f251ea10b138fc4e5dbfedb92ed") (:revdesc . "0bcefa8d1bc3") (:keywords "tools" "languages" "convenience" "mouse" "hover") (:authors ("Huang Feiyu" . "sibadake1@163.com")) (:maintainers ("Huang Feiyu" . "sibadake1@163.com")) (:maintainer "Huang Feiyu" . "sibadake1@163.com"))])
+ (eldoc-overlay . [(20230406 959) ((emacs (24 4)) (inline-docs (1 0 1)) (quick-peek (1 0))) "Display eldoc with contextual documentation overlay" tar ((:url . "https://repo.or.cz/eldoc-overlay.git") (:commit . "14a9e141918c2e18a107920e8631e622c580b3ef") (:revdesc . "14a9e141918c") (:keywords "docs" "eldoc" "overlay") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (eldoc-stan . [(20211129 2051) ((emacs (25)) (stan-mode (10 3 0))) "Eldoc support for stan functions" tar ((:url . "https://github.com/stan-dev/stan-mode/tree/master/eldoc-stan") (:commit . "150bbbe5fd3ad2b5a3dbfba9d291e66eeea1a581") (:revdesc . "150bbbe5fd3a") (:keywords "help" "tools") (:authors ("Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu")) (:maintainers ("Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu")) (:maintainer "Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu"))])
+ (eldoc-toml . [(20211026 1122) ((emacs (24 4))) "TOML table name at point for ElDoc" tar ((:url . "https://github.com/it-is-wednesday/eldoc-toml") (:commit . "61106be3c3f3a5b293c3f285eec8c6f400142b6d") (:revdesc . "61106be3c3f3") (:keywords "data") (:authors ("Maor Kadosh" . "git@avocadosh.xyz")) (:maintainers ("Maor Kadosh" . "git@avocadosh.xyz")) (:maintainer "Maor Kadosh" . "git@avocadosh.xyz"))])
+ (electric-case . [(20150417 1112) nil "Insert camelCase, snake_case words without \"Shift\"ing" tar ((:url . "http://hins11.yu-yake.com/") (:commit . "984b6a4c6c4cdcefeecb59e941f5f184cc1dedff") (:revdesc . "984b6a4c6c4c"))])
+ (electric-cursor . [(20221221 438) ((emacs (25 1))) "Change cursor automatically depending on mode" tar ((:url . "https://github.com/duckwork/electric-cursor") (:commit . "bc09aa8c5d3cc32e3e6452cbf8018fc1ea772b73") (:revdesc . "bc09aa8c5d3c") (:keywords "terminals" "frames") (:authors ("Case Duckworth" . "acdw@acdw.net")) (:maintainers ("Case Duckworth" . "acdw@acdw.net")) (:maintainer "Case Duckworth" . "acdw@acdw.net"))])
+ (electric-list-directory . [(20250821 520) ((emacs (26 1))) "Lightweight popup directory browser" tar ((:url . "https://github.com/kshartman/electric-directory-list") (:commit . "2e0d4342146f1c033a1dba54e814961649810a5f") (:revdesc . "2e0d4342146f") (:keywords "files" "convenience") (:authors ("K. Shane Hartman" . "shane@ai.mit.edu")) (:maintainers ("K. Shane Hartman" . "shane@ai.mit.edu")) (:maintainer "K. Shane Hartman" . "shane@ai.mit.edu"))])
+ (electric-operator . [(20260314 1325) ((dash (2 10 0)) (emacs (24 4))) "Automatically add spaces around operators" tar ((:url . "https://github.com/davidshepherd7/electric-operator") (:commit . "ef39e07158cdfc1c2a461287fef17972d1985b0c") (:revdesc . "ef39e07158cd") (:keywords "electric") (:authors ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainers ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainer "David Shepherd" . "davidshepherd7@gmail.com"))])
+ (electric-ospl . [(20260701 1901) ((emacs (26 1))) "Electric OSPL Mode" tar ((:url . "https://git.sr.ht/~swflint/electric-ospl-mode") (:commit . "88ab5ca588b4cbd1ddd27757d390da19298b05bd") (:revdesc . "88ab5ca588b4") (:keywords "convenience" "text") (:authors ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (electric-spacing . [(20220220 1540) nil "Insert operators with surrounding spaces smartly" tar ((:url . "https://github.com/xwl/electric-spacing") (:commit . "c37b2502512dd49a8311d7c34e9bfd1af3d4dbcd") (:revdesc . "c37b2502512d") (:authors ("William Xu" . "william.xwl@gmail.com")) (:maintainers ("William Xu" . "william.xwl@gmail.com")) (:maintainer "William Xu" . "william.xwl@gmail.com"))])
+ (elegant-agenda-mode . [(20210115 353) ((emacs (26 1))) "An elegant theme for your org-agenda" tar ((:url . "https://github.com/justinbarclay/elegant-agenda-mode") (:commit . "5cbc688584ba103ea3be7d7b30e5d94e52f59eb6") (:revdesc . "5cbc688584ba") (:keywords "faces") (:authors ("Justin Barclay" . "justinbarclay@gmail.com")) (:maintainers ("Justin Barclay" . "justinbarclay@gmail.com")) (:maintainer "Justin Barclay" . "justinbarclay@gmail.com"))])
+ (elescope . [(20210312 1147) ((emacs (25 1)) (ivy (0 10)) (request (0 3)) (seq (2 0))) "Seach and clone projects from the minibuffer" tar ((:url . "https://github.com/freesteph/elescope") (:commit . "36566c8c1f5f993f67eadc85d18539ff375c0f98") (:revdesc . "36566c8c1f5f") (:keywords "vc") (:authors ("Stéphane Maniaci" . "stephane.maniaci@gmail.com")) (:maintainers ("Stéphane Maniaci" . "stephane.maniaci@gmail.com")) (:maintainer "Stéphane Maniaci" . "stephane.maniaci@gmail.com"))])
+ (elf-mode . [(20161009 748) ((emacs (24 3))) "Show symbols in binaries" tar ((:url . "https://github.com/abo-abo/elf-mode") (:commit . "cd280d683cd3341d8bb31af6db7e3b74a133e6ab") (:revdesc . "cd280d683cd3") (:keywords "matching") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (elfeed . [(20260821 1205) ((emacs (29 1)) (compat (31))) "An Atom/RSS feed reader" tar ((:url . "https://github.com/emacs-elfeed/elfeed") (:commit . "737c1d6d2649b1ff82c5e2d2d9891a7caeac3835") (:revdesc . "737c1d6d2649") (:keywords "network" "comm" "hypermedia") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com") ("Ihor Radchenko" . "yantar92@posteo.net") ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com"))])
+ (elfeed-ai . [(20260301 1831) ((emacs (28 1)) (elfeed (3 4 1)) (gptel (0 9 9))) "AI-powered article summarization for elfeed" tar ((:url . "https://github.com/danielfleischer/elfeed-ai") (:commit . "10c8f39e3304eca2d6fabb3b06d252d0c0c0bdaa") (:revdesc . "10c8f39e3304") (:keywords "comm" "news" "ai") (:authors ("Daniel Fleischer" . "danflscr@gmail.com")) (:maintainers ("Daniel Fleischer" . "danflscr@gmail.com")) (:maintainer "Daniel Fleischer" . "danflscr@gmail.com"))])
+ (elfeed-autotag . [(20210607 637) ((emacs (27 1)) (elfeed (3 4 1)) (elfeed-protocol (0 8 0)) (org (8 2 7)) (dash (2 10 0)) (s (1 9 0))) "Easy auto-tagging for elfeed" tar ((:url . "https://github.com/paulelms/elfeed-autotag") (:commit . "bc62c37fb79b720ff8b6d67f04f2268841306dcd") (:revdesc . "bc62c37fb79b") (:keywords "news") (:authors ("Paul Elms" . "https://paul.elms.pro")) (:maintainers ("Paul Elms" . "paul@elms.pro")) (:maintainer "Paul Elms" . "paul@elms.pro"))])
+ (elfeed-curate . [(20260322 2137) ((emacs (27 1)) (elfeed (3 4 1))) "Elfeed entry curation" tar ((:url . "https://github.com/rnadler/elfeed-curate") (:commit . "e56c24eda719f0c827955ae555bce702e1c74db0") (:revdesc . "e56c24eda719") (:keywords "news") (:authors ("Robert Nadler" . "robert.nadler@gmail.com")) (:maintainers ("Robert Nadler" . "robert.nadler@gmail.com")) (:maintainer "Robert Nadler" . "robert.nadler@gmail.com"))])
+ (elfeed-dashboard . [(20210727 603) ((emacs (25 1)) (elfeed (3 3 0))) "An extensible frontend for elfeed using org-mode" tar ((:url . "https://github.com/Manoj321/elfeed-dashboard") (:commit . "b143f8453aed2053e8fc6f05cef6233797408546") (:revdesc . "b143f8453aed") (:keywords "convenience") (:authors ("Manoj Kumar Manikchand" . "manojm321@protonmail.com")) (:maintainers ("Manoj Kumar Manikchand" . "manojm321@protonmail.com")) (:maintainer "Manoj Kumar Manikchand" . "manojm321@protonmail.com"))])
+ (elfeed-goodies . [(20221003 1406) ((popwin (1 0 0)) (powerline (2 2)) (elfeed (2 0 0)) (cl-lib (0 5)) (link-hint (0 1))) "Elfeed goodies" tar ((:url . "https://github.com/algernon/elfeed-goodies") (:commit . "544ef42ead011d960a0ad1c1d34df5d222461a6b") (:revdesc . "544ef42ead01"))])
+ (elfeed-org . [(20250219 950) ((emacs (28 1)) (elfeed (1 1 1)) (org (8 2 7))) "Configure elfeed with one or more org-mode files" tar ((:url . "https://github.com/remyhonig/elfeed-org") (:commit . "1197cf29f6604e572ec604874a8f50b58081176a") (:revdesc . "1197cf29f660") (:keywords "news") (:authors ("Remy Honig" . "remyhonig@gmail.com")) (:maintainers ("Remy Honig" . "remyhonig@gmail.com")) (:maintainer "Remy Honig" . "remyhonig@gmail.com"))])
+ (elfeed-protocol . [(20260523 1339) ((emacs (24 4)) (elfeed (4 0 0)) (cl-lib (0 5))) "Provide fever/newsblur/owncloud/ttrss protocols for elfeed" tar ((:url . "https://github.com/fasheng/elfeed-protocol") (:commit . "58936590459ccc2dfd6132f69983011d15d9404a") (:revdesc . "58936590459c") (:keywords "news") (:authors ("Xu Fasheng" . "fasheng[AT]fasheng.info")) (:maintainers ("Xu Fasheng" . "fasheng[AT]fasheng.info")) (:maintainer "Xu Fasheng" . "fasheng[AT]fasheng.info"))])
+ (elfeed-score . [(20260419 349) ((emacs (26 1)) (elfeed (3 3 0))) "Gnus-style scoring for Elfeed" tar ((:url . "https://github.com/sp1ff/elfeed-score") (:commit . "f6d25f6c1c967822e75ff01ad4d57be1c80f480a") (:revdesc . "f6d25f6c1c96") (:keywords "news") (:authors ("Michael Herstine" . "sp1ff@pobox.com")) (:maintainers ("Michael Herstine" . "sp1ff@pobox.com")) (:maintainer "Michael Herstine" . "sp1ff@pobox.com"))])
+ (elfeed-summarize . [(20260522 2046) ((emacs (28 1)) (elfeed (3 4 1)) (llm (0 28 4))) "Add LLM-powered inline summaries to elfeed" tar ((:url . "https://github.com/fritzgrabo/elfeed-summarize") (:commit . "9b2fbc469d31e1f965ff1953e483adabbdf4495d") (:revdesc . "9b2fbc469d31") (:keywords "comm") (:authors ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainers ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainer "Fritz Grabo" . "hello@fritzgrabo.com"))])
+ (elfeed-summary . [(20260607 1418) ((emacs (27 1)) (magit-section (3 3 0)) (elfeed (3 4 1))) "Feed summary interface for elfeed" tar ((:url . "https://github.com/SqrtMinusOne/elfeed-summary.el") (:commit . "d8f237530c05c8be3093af295d3f5d530c2d3130") (:revdesc . "d8f237530c05") (:authors ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainers ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainer "Korytov Pavel" . "thexcloud@gmail.com"))])
+ (elfeed-tube . [(20260702 1928) ((emacs (27 1)) (elfeed (3 4 2)) (aio (1 0))) "YouTube integration for Elfeed" tar ((:url . "https://github.com/karthink/elfeed-tube") (:commit . "f653d5b7f27a2eace217d9e6b4f40e0e35ae88cd") (:revdesc . "f653d5b7f27a") (:keywords "news" "hypermedia" "convenience") (:authors ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com")) (:maintainers ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com")) (:maintainer "Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com"))])
+ (elfeed-tube-mpv . [(20250815 629) ((emacs (27 1)) (elfeed-tube (0 10)) (mpv (0 2 0))) "Control mpv from Elfeed" tar ((:url . "https://github.com/karthink/elfeed-tube") (:commit . "99e55ac428dc50bff271575cffddc5060f22087d") (:revdesc . "99e55ac428dc") (:keywords "news" "hypermedia") (:authors ("Karthik Chikmagalur" . "karthikchikmagalur@gmail.com")) (:maintainers ("Karthik Chikmagalur" . "karthikchikmagalur@gmail.com")) (:maintainer "Karthik Chikmagalur" . "karthikchikmagalur@gmail.com"))])
+ (elfeed-web . [(20260821 1229) ((emacs (29 1)) (compat (31)) (elfeed (4 1 0)) (simple-httpd (1 6))) "Web interface to Elfeed" tar ((:url . "https://github.com/emacs-elfeed/elfeed-web") (:commit . "1f089663e7952c33512c37d2bd2544043e039e23") (:revdesc . "1f089663e795") (:keywords "network" "hypermedia") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com") ("Ihor Radchenko" . "yantar92@posteo.net") ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com"))])
+ (elfeed-webkit . [(20230604 2111) ((emacs (26 1)) (elfeed (3 4 1))) "Render elfeed entries in embedded webkit widgets" tar ((:url . "https://github.com/fritzgrabo/elfeed-webkit") (:commit . "db7ee83f9c0e67f01960b1e0489717cf7a8fd2c2") (:revdesc . "db7ee83f9c0e") (:keywords "comm") (:authors ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainers ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainer "Fritz Grabo" . "hello@fritzgrabo.com"))])
+ (elforth . [(20210522 928) ((emacs (26 1))) "Do you have what it takes to hack Emacs Lisp in Forth?" tar ((:url . "https://github.com/lassik/elforth") (:commit . "2d8540434a28e7edaa04a992c3c362832b2fd61e") (:revdesc . "2d8540434a28") (:keywords "games") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (elgrep . [(20230814 1215) ((emacs (26 2)) (async (1 5))) "Searching files for regular expressions" tar ((:url . "https://github.com/TobiasZawada/elgrep") (:commit . "329eaf2e9e994e5535c7f7fe2685ec21d8323384") (:revdesc . "329eaf2e9e99") (:keywords "tools" "matching" "files" "unix") (:authors ("Tobias Zawada" . "i@tn-home.de")) (:maintainers ("Tobias Zawada" . "i@tn-home.de")) (:maintainer "Tobias Zawada" . "i@tn-home.de"))])
+ (elhome . [(20161025 2042) ((initsplit (20120630))) "A framework for a \"home\" Emacs configuration" tar ((:url . "https://github.com/demyanrogozhin/elhome") (:commit . "e789e806469af3e9705f72298683c21f6c3a516d") (:revdesc . "e789e806469a") (:keywords "lisp") (:authors ("Dave Abrahams" . "dave@boostpro.com")) (:maintainers ("Demyan Rogozhin" . "demyan.rogozhin@gmail.com")) (:maintainer "Demyan Rogozhin" . "demyan.rogozhin@gmail.com"))])
+ (elisa . [(20250202 2040) ((emacs (29 2)) (ellama (0 11 2)) (llm (0 18 1)) (async (1 9 8)) (plz (0 9))) "Emacs Lisp Information System Assistant" tar ((:url . "https://github.com/s-kostyaev/elisa") (:commit . "b655b59d371639d357dcabe48f1c2cd1694ee8de") (:revdesc . "b655b59d3716") (:keywords "help" "local" "tools") (:authors ("Sergey Kostyaev" . "sskostyaev@gmail.com")) (:maintainers ("Sergey Kostyaev" . "sskostyaev@gmail.com")) (:maintainer "Sergey Kostyaev" . "sskostyaev@gmail.com"))])
+ (elisp-autofmt . [(20260810 2354) ((emacs (29 1))) "Emacs lisp auto-format" tar ((:url . "https://codeberg.org/ideasman42/emacs-elisp-autofmt") (:commit . "be5c48683cefd32450f26b6c569e92bad310f7eb") (:revdesc . "be5c48683cef") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (elisp-def . [(20250818 2223) ((dash (2 12 0)) (f (0 19 0)) (s (1 11 0)) (emacs (24 3))) "Macro-aware go-to-definition for elisp" tar ((:url . "https://github.com/Wilfred/elisp-def") (:commit . "61a5f64498c9c8de8e9aab84a22775162f336144") (:revdesc . "61a5f64498c9") (:keywords "lisp") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (elisp-demos . [(20260826 1326) ((emacs (26 3))) "Elisp API Demos" tar ((:url . "https://github.com/xuchunyang/elisp-demos") (:commit . "637001834b445e518a7b730266f8864fdcc1d294") (:revdesc . "637001834b44") (:keywords "lisp" "docs"))])
+ (elisp-depend . [(20251121 2039) nil "Parse depend libraries of elisp file" tar ((:url . "https://github.com/emacsorphanage/elisp-depend") (:commit . "c604eee1a86a297cd13c0235ebde1431dcad59d2") (:revdesc . "c604eee1a86a") (:authors (nil . "AndyStewartlazycat.manatee@gmail.com") ("Tehom" . "TomBretontehom@panix.com") ("Michael Heerdegen" . "michael_heerdegen@web.de")) (:maintainers (nil . "AndyStewartlazycat.manatee@gmail.com") ("Tehom" . "TomBretontehom@panix.com") ("Michael Heerdegen" . "michael_heerdegen@web.de")) (:maintainer nil . "AndyStewartlazycat.manatee@gmail.com"))])
+ (elisp-depmap . [(20251029 1438) ((emacs (26 1)) (dash (0))) "Generate an elisp dependency map in graphviz" tar ((:url . "https://github.com/mtekman/elisp-depmap.el") (:commit . "c87e9ecae624b09d113c25b7ad1317d97eb2f434") (:revdesc . "c87e9ecae624") (:keywords "outlines"))])
+ (elisp-dev-mcp . [(20260630 1120) ((emacs (27 1)) (mcp-server-lib (0 4 0))) "MCP server for agentic Elisp development" tar ((:url . "https://github.com/laurynas-biveinis/elisp-dev-mcp") (:commit . "d70a8f38ededefb7e3d11f3e2b519bf754a54d1a") (:revdesc . "d70a8f38eded") (:keywords "tools" "development"))])
+ (elisp-docstring-mode . [(20170304 1615) nil "Major mode for editing elisp docstrings" tar ((:url . "https://github.com/Fuco1/elisp-docstring-mode") (:commit . "b135d95b158048927f12184e5cfb8fe01fc44713") (:revdesc . "b135d95b1580") (:keywords "languages") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (elisp-format . [(20160508 952) nil "Format elisp code" tar ((:url . "https://github.com/Yuki-Inoue/elisp-format") (:commit . "9fe516d39b349070537099a01fe34e47fbded2c8") (:revdesc . "9fe516d39b34") (:authors (nil . "AndyStewartlazycat.manatee@gmail.com")))])
+ (elisp-lint . [(20220419 252) ((emacs (24 4)) (dash (2 15 0)) (package-lint (0 11))) "Basic linting for Emacs Lisp" tar ((:url . "https://github.com/gonewest818/elisp-lint/") (:commit . "c5765abf75fd1ad22505b349ae1e6be5303426c2") (:revdesc . "c5765abf75fd") (:keywords "lisp" "maint" "tools") (:authors ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainers ("Neil Okamoto" . "neil.okamoto+melpa@gmail.com")) (:maintainer "Neil Okamoto" . "neil.okamoto+melpa@gmail.com"))])
+ (elisp-refs . [(20230920 201) ((dash (2 12 0)) (s (1 11 0))) "Find callers of elisp functions or macros" tar ((:url . "https://github.com/Wilfred/elisp-refs") (:commit . "541a064c3ce27867872cf708354a65d83baf2a6d") (:revdesc . "541a064c3ce2") (:keywords "lisp") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (elisp-sandbox . [(20131116 1842) nil "Evaluate EmacsLisp expressions in a sandbox" tar ((:url . "https://github.com/joelmccracken/elisp-sandbox") (:commit . "ddd669266ca36d7e4ebba73eb1ab42523787e042") (:revdesc . "ddd669266ca3") (:keywords "lisp") (:authors ("Joel McCracken" . "mccracken.joel@gmail.com") ("D. Goel" . "deego@gnufans.org")) (:maintainers ("Joel McCracken" . "mccracken.joel@gmail.com") ("D. Goel" . "deego@gnufans.org")) (:maintainer "Joel McCracken" . "mccracken.joel@gmail.com"))])
+ (elisp-slime-nav . [(20210510 528) ((emacs (24 1)) (cl-lib (0 2))) "Make M-. and M-, work in elisp like they do in slime" tar ((:url . "https://github.com/purcell/elisp-slime-nav") (:commit . "8588d80d414aee1fafce5b9da0e913612ee0bcdd") (:revdesc . "8588d80d414a") (:keywords "languages" "navigation" "slime" "elisp" "emacs-lisp") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (elixir-iex . [(20260412 1946) ((emacs (29 1)) (eat (0 9))) "IEx REPL via eat terminal emulator" tar ((:url . "https://github.com/mojochao/elixir-iex") (:commit . "a82808ebb91b9668329459e808a75552d698433d") (:revdesc . "a82808ebb91b") (:keywords "elixir" "languages" "processes" "tools") (:authors ("Allen Gooch" . "allen.gooch@gmail.com")) (:maintainers ("Allen Gooch" . "allen.gooch@gmail.com")) (:maintainer "Allen Gooch" . "allen.gooch@gmail.com"))])
+ (elixir-mode . [(20230626 1738) ((emacs (25))) "Major mode for editing Elixir files" tar ((:url . "https://github.com/elixir-editors/emacs-elixir") (:commit . "00d6580a040a750e019218f9392cf9a4c2dac23a") (:revdesc . "00d6580a040a") (:keywords "languages" "elixir") (:authors ("Andreas Fuchs" . "asf@boinkor.net") ("Samuel Tonini" . "tonini.samuel@gmail.com")) (:maintainers ("Andreas Fuchs" . "asf@boinkor.net") ("Samuel Tonini" . "tonini.samuel@gmail.com")) (:maintainer "Andreas Fuchs" . "asf@boinkor.net"))])
+ (elixir-ts-mode . [(20241228 919) ((emacs (29 1)) (heex-ts-mode (1 3))) "Major mode for Elixir with tree-sitter support" tar ((:url . "https://github.com/wkirschbaum/elixir-ts-mode") (:commit . "143b94f4a5ac1f161c232e3f25b84c6768be2f25") (:revdesc . "143b94f4a5ac") (:keywords "elixir" "languages" "tree-sitter"))])
+ (elixir-yasnippets . [(20150417 1239) ((yasnippet (0 8 0))) "Yasnippets for Elixir" tar ((:url . "https://github.com/hisea/elixir-yasnippets") (:commit . "980ca7626c14ef0573bec0035ec7942796062783") (:revdesc . "980ca7626c14") (:keywords "snippets") (:authors ("Yinghai Zhao" . "zyinghai@gmail.com")) (:maintainers ("Yinghai Zhao" . "zyinghai@gmail.com")) (:maintainer "Yinghai Zhao" . "zyinghai@gmail.com"))])
+ (elkee . [(20250928 2333) ((emacs (25 1)) (kaesar (0 9 5)) (elchacha (1 0 4))) "Keepass client" tar ((:url . "https://github.com/KeyWeeUsr/elkee") (:commit . "9caf0b086e6b4f8132163620a709de7b260b5ace") (:revdesc . "9caf0b086e6b") (:keywords "convenience" "keepass" "client") (:authors ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainers ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainer "Peter Badida" . "keyweeusr@gmail.com"))])
+ (ellama . [(20260812 2136) ((emacs (28 1)) (llm (0 31 1)) (plz (0 8)) (transient (0 7)) (compat (29 1)) (yaml (1 2 3))) "Tool for interacting with LLMs" tar ((:url . "https://github.com/s-kostyaev/ellama") (:commit . "a86e9154ae88907d3de2710195810cda986ef0d8") (:revdesc . "a86e9154ae88") (:keywords "help" "local" "tools") (:authors ("Sergey Kostyaev" . "sskostyaev@gmail.com")) (:maintainers ("Sergey Kostyaev" . "sskostyaev@gmail.com")) (:maintainer "Sergey Kostyaev" . "sskostyaev@gmail.com"))])
+ (ellocate . [(20200112 1931) ((emacs (25 1)) (s (1 12 0)) (f (0 20 0))) "The locate command reimplemented in Emacs Lisp" tar ((:url . "https://github.com/walseb/ellocate") (:commit . "81405082f68f0577c9f176d3d4f034a7142aba59") (:revdesc . "81405082f68f") (:keywords "matching") (:authors ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainers ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainer "Sebastian Wålinder" . "s.walinder@gmail.com"))])
+ (elm-mode . [(20250401 915) ((f (0 17)) (s (1 7 0)) (emacs (25 1)) (seq (2 23)) (reformatter (0 3))) "Major mode for Elm" tar ((:url . "https://github.com/jcollard/elm-mode") (:commit . "90b72cd2c9bc4506f531bcdcd73fa2530d9f4f7c") (:revdesc . "90b72cd2c9bc"))])
+ (elm-test-runner . [(20230905 331) ((emacs (24 4))) "Enhanced support for running elm-test" tar ((:url . "https://github.com/juanedi/elm-test-runner") (:commit . "b664e50a4c849f5f2e2f434fc01718da10515612") (:revdesc . "b664e50a4c84"))])
+ (elm-yasnippets . [(20160401 524) ((yasnippet (0 8 0))) "Yasnippets for Elm" tar ((:url . "https://github.com/abingham/elm-yasnippets") (:commit . "45a11a0cef0c36633fb3477d3dc4167e82779ba4") (:revdesc . "45a11a0cef0c") (:keywords "snippets") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (elmacro . [(20210716 639) ((s (1 11 0)) (dash (2 13 0))) "Convert keyboard macros to emacs lisp" tar ((:url . "https://github.com/Silex/elmacro") (:commit . "d2e05012cee4f54fab6d8d8d6aced6e5eeef4f31") (:revdesc . "d2e05012cee4") (:keywords "macro" "elisp" "convenience") (:authors ("Philippe Vaucher" . "philippe.vaucher@gmail.com")) (:maintainers ("Philippe Vaucher" . "philippe.vaucher@gmail.com")) (:maintainer "Philippe Vaucher" . "philippe.vaucher@gmail.com"))])
+ (elmine . [(20200520 1237) ((s (1 10 0))) "Redmine API access via elisp" tar ((:url . "https://github.com/leoc/elmine") (:commit . "d42e328634828e0c1770b72d5e8b87671d081693") (:revdesc . "d42e32863482") (:keywords "tools") (:authors ("Arthur Andersen" . "leoc.git@gmail.com")) (:maintainers ("Arthur Andersen" . "leoc.git@gmail.com")) (:maintainer "Arthur Andersen" . "leoc.git@gmail.com"))])
+ (elmpd . [(20260619 2114) ((emacs (25 1))) "A tight, ergonomic, async client library for mpd" tar ((:url . "https://github.com/sp1ff/elmpd") (:commit . "40a666c153da0c45262230bed3c7594e3362ca09") (:revdesc . "40a666c153da") (:keywords "comm") (:authors ("Michael Herstine" . "sp1ff@pobox.com")) (:maintainers ("Michael Herstine" . "sp1ff@pobox.com")) (:maintainer "Michael Herstine" . "sp1ff@pobox.com"))])
+ (elnode . [(20190702 1509) ((web (0 1 4)) (dash (1 1 0)) (noflet (0 0 7)) (s (1 5 0)) (creole (0 8 14)) (fakir (0 1 6)) (db (0 0 5)) (kv (0 0 17))) "The Emacs webserver" tar ((:url . "https://github.com/jcaw/elnode") (:commit . "29ef0f51a65a24fca7fdcdb4140d2e4556e4bb29") (:revdesc . "29ef0f51a65a") (:keywords "lisp" "http" "hypermedia") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")))])
+ (elog . [(20250413 100) ((emacs (23 2))) "Logging library extended from logito" tar ((:url . "https://github.com/lujun9972/elog") (:commit . "c65288fd32eb187d3e63d4a7799a69e57da0eab4") (:revdesc . "c65288fd32eb") (:keywords "lisp" "tool" "log") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (elogcat . [(20260423 851) ((s (1 9 0)) (dash (2 10 0))) "Logcat interface" tar ((:url . "https://github.com/youngker/elogcat.el") (:commit . "6bd7bfd75134d615bd49e5eba8a6e639ee0814ac") (:revdesc . "6bd7bfd75134") (:keywords "tools") (:authors ("Youngjoo Lee" . "youngker@gmail.com")) (:maintainers ("Youngjoo Lee" . "youngker@gmail.com")) (:maintainer "Youngjoo Lee" . "youngker@gmail.com"))])
+ (elot . [(20260804 900) ((emacs (30 1))) "Emacs Literate Ontology Tool (ELOT)" tar ((:url . "https://github.com/johanwk/elot") (:commit . "1c94cb4e961cbb1d79879d30f5ced6fd86945237") (:revdesc . "1c94cb4e961c") (:keywords "languages" "outlines" "tools" "org" "ontology") (:authors ("Johan W. Klüwer" . "johan.w.kluwer@gmail.com")) (:maintainers ("Johan W. Klüwer" . "johan.w.kluwer@gmail.com")) (:maintainer "Johan W. Klüwer" . "johan.w.kluwer@gmail.com"))])
+ (eloud . [(20190706 1707) ((emacs (24 4))) "A lightweight, interactive screen reader" tar ((:url . "https://github.com/smythp/eloud") (:commit . "b8f4af1f652268d73281de91fb333b5984970847") (:revdesc . "b8f4af1f6522") (:keywords "extensions") (:authors ("Patrick Smyth" . "patricksmyth01@gmail.com")) (:maintainers ("Patrick Smyth" . "patricksmyth01@gmail.com")) (:maintainer "Patrick Smyth" . "patricksmyth01@gmail.com"))])
+ (elpa-audit . [(20141023 1331) nil "Handy functions for inspecting and comparing package archives" tar ((:url . "https://github.com/purcell/elpa-audit") (:commit . "1ca4e6073f8c4cbb41688b69d3b3feaa1a392efc") (:revdesc . "1ca4e6073f8c") (:keywords "maint") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (elpa-clone . [(20240229 1034) ((emacs (24 4))) "Clone ELPA archive" tar ((:url . "https://github.com/dochang/elpa-clone") (:commit . "3c77587a6ab6cdf041f969d8606407e575374022") (:revdesc . "3c77587a6ab6") (:keywords "comm" "elpa" "clone" "mirror") (:authors ("ZHANG Weiyi" . "dochang@gmail.com")) (:maintainers ("ZHANG Weiyi" . "dochang@gmail.com")) (:maintainer "ZHANG Weiyi" . "dochang@gmail.com"))])
+ (elpa-deploy . [(20191022 718) ((emacs (24 4)) (f (0 0))) "ELPA deployment library" tar ((:url . "https://github.com/oitofelix/elpa-deploy") (:commit . "f5126a2da1e0e52981fad9c12028814be80328c2") (:revdesc . "f5126a2da1e0") (:keywords "tools") (:authors ("Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org")) (:maintainers ("Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org")) (:maintainer "Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org"))])
+ (elpa-mirror . [(20240413 1426) ((emacs (27 1))) "Create local package repository from installed packages" tar ((:url . "https://github.com/redguardtoo/elpa-mirror") (:commit . "d51a5b81af909727fac45f3c9d3653b1170e01f0") (:revdesc . "d51a5b81af90") (:keywords "tools") (:authors ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainers ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainer "Chen Bin" . "chenbin.sh@gmail.com"))])
+ (elpher . [(20260221 920) ((emacs (27 1))) "A friendly gopher and gemini client" tar ((:url . "https://thelambdalab.xyz/elpher") (:commit . "d799c467a1f35934f96d33960d638ddf796f01ba") (:revdesc . "d799c467a1f3") (:keywords "comm" "gopher" "gemini") (:authors ("Tim Vaughan" . "plugd@thelambdalab.xyz")) (:maintainers ("Tim Vaughan" . "plugd@thelambdalab.xyz")) (:maintainer "Tim Vaughan" . "plugd@thelambdalab.xyz"))])
+ (elpl . [(20220328 316) ((emacs (24 4))) "Emacs Lisp REPL" tar ((:url . "https://github.com/twlz0ne/elpl") (:commit . "501871ab543b9967bfe87a8a82f83ab96b7f909e") (:revdesc . "501871ab543b") (:keywords "lisp" "tool") (:authors ("Gong Qijian" . "gongqijian@gmail.com")) (:maintainers ("Gong Qijian" . "gongqijian@gmail.com")) (:maintainer "Gong Qijian" . "gongqijian@gmail.com"))])
+ (elpy . [(20260715 1747) ((company (0 9 10)) (emacs (24 4)) (highlight-indentation (0 7 0)) (pyvenv (1 20)) (yasnippet (0 13 0)) (s (1 12 0))) "Emacs Python Development Environment" tar ((:url . "https://github.com/jorgenschaefer/elpy") (:commit . "9cdf26dfea1cb044b3cf1dfa9755b6479bfd9a1c") (:revdesc . "9cdf26dfea1c") (:keywords "python" "ide" "languages" "tools") (:authors ("Jorgen Schaefer" . "contact@jorgenschaefer.de") ("Gaby Launay" . "gaby.launay@protonmail.com")) (:maintainers ("Jorgen Schaefer" . "contact@jorgenschaefer.de") ("Gaby Launay" . "gaby.launay@protonmail.com")) (:maintainer "Jorgen Schaefer" . "contact@jorgenschaefer.de"))])
+ (elpygen . [(20171225 1736) ((emacs (25)) (yasnippet (0 8 0))) "Generate a Python function/method using a symbol under point" tar ((:url . "https://github.com/vkazanov/elpygen") (:commit . "21929c997a05968f9eefe52b85a76ceaab3b0d81") (:revdesc . "21929c997a05") (:keywords "python" "languages" "tools") (:authors ("Vladimir Kazanov" . "vkazanov@inbox.ru")) (:maintainers ("Vladimir Kazanov" . "vkazanov@inbox.ru")) (:maintainer "Vladimir Kazanov" . "vkazanov@inbox.ru"))])
+ (elquery . [(20220331 143) ((emacs (25 1)) (dash (2 13 0))) "The HTML library for elisp" tar ((:url . "https://github.com/AdamNiederer/elquery") (:commit . "38f3bd41096cb270919b06095da0b9ac1add4598") (:revdesc . "38f3bd41096c") (:keywords "html" "hypermedia" "tools" "webscale"))])
+ (elsa . [(20250717 1205) ((emacs (26 1)) (trinary (0)) (f (0)) (dash (2 14)) (cl-lib (0 3)) (lsp-mode (0)) (ansi (0)) (async (1 9 7)) (lgr (0 1 0))) "Emacs Lisp Static Analyser" tar ((:url . "https://github.com/emacs-elsa/Elsa") (:commit . "4a4a180a7e6837ac359c0094e40da339e1300765") (:revdesc . "4a4a180a7e68") (:keywords "languages" "lisp") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (elscreen . [(20181009 451) ((emacs (24))) "Emacs window session manager" tar ((:url . "https://github.com/knu/elscreen") (:commit . "cc58337faf5ba1eae7e87f75f6ff3758675688f2") (:revdesc . "cc58337faf5b") (:keywords "window" "convenience") (:authors ("Naoto Morishima" . "naoto@morishima.net")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (elscreen-buffer-group . [(20200109 2338) ((emacs (24 4)) (elscreen (0)) (cl-lib (0 5))) "Elscreen buffer group" tar ((:url . "https://github.com/jeffgran/elscreen-buffer-group") (:commit . "b48e71d4782adfeb2958f227d78c04164d26e4bd") (:revdesc . "b48e71d4782a") (:keywords "buffer") (:authors ("Jeff Gran" . "jeff@jeffgran.com")) (:maintainers ("Jeff Gran" . "jeff@jeffgran.com")) (:maintainer "Jeff Gran" . "jeff@jeffgran.com"))])
+ (elscreen-fr . [(20160920 953) ((elscreen (0)) (seq (1 11))) "Use frame title as screen tab" tar ((:url . "https://github.com/rocher/elscreen-fr") (:commit . "b9c11f80d277086d5d5bf88623e15fc7adbbbe3c") (:revdesc . "b9c11f80d277") (:authors ("Francesc Rocher" . "francesc.rocher@gmail.com")) (:maintainers ("Francesc Rocher" . "francesc.rocher@gmail.com")) (:maintainer "Francesc Rocher" . "francesc.rocher@gmail.com"))])
+ (elscreen-mew . [(20160504 1835) ((elscreen (20120413 807))) "ElScreen Add-On for Mew" tar ((:url . "https://github.com/masutaka/elscreen-mew") (:commit . "89871fad690ae161dc076e16ef481b1965612077") (:revdesc . "89871fad690a") (:authors ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainers ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainer "Takashi Masuda" . "masutaka.net@gmail.com"))])
+ (elscreen-multi-term . [(20200417 821) ((emacs (24 4)) (elscreen (1 4 6)) (multi-term (1 3))) "Multi term for elscreen" tar ((:url . "https://github.com/wamei/elscreen-multi-term") (:commit . "4ea89bae0444d9d4377515929f76cb3e98140f1f") (:revdesc . "4ea89bae0444") (:keywords "elscreen" "multi term") (:authors ("wamei" . "wamei.cho@gmail.com")) (:maintainers ("wamei" . "wamei.cho@gmail.com")) (:maintainer "wamei" . "wamei.cho@gmail.com"))])
+ (elscreen-separate-buffer-list . [(20200807 1324) ((emacs (24 4)) (elscreen (1 4 6))) "Separate buffer list manager for elscreen" tar ((:url . "https://github.com/wamei/elscreen-separate-buffer-list") (:commit . "88d8850108947949431425a2d938a09d941454e8") (:revdesc . "88d885010894") (:keywords "elscreen") (:authors ("wamei" . "wamei.cho@gmail.com")) (:maintainers ("wamei" . "wamei.cho@gmail.com")) (:maintainer "wamei" . "wamei.cho@gmail.com"))])
+ (elscreen-tab . [(20230810 2114) ((emacs (26)) (elscreen (20180321)) (dash (2 14 1))) "Minor mode to display tabs of elscreen in a dedicated buffer" tar ((:url . "https://github.com/aki-s/elscreen-tab") (:commit . "21c1f3d3ec47f8b5e31bb0b26b4f60864e49e966") (:revdesc . "21c1f3d3ec47") (:keywords "tools" "extensions") (:authors ("Aki Syunsuke" . "sunny.day.dev@gmail.com")) (:maintainers ("Aki Syunsuke" . "sunny.day.dev@gmail.com")) (:maintainer "Aki Syunsuke" . "sunny.day.dev@gmail.com"))])
+ (elsqlite . [(20260206 1949) ((emacs (29 1))) "SQLite browser" tar ((:url . "https://github.com/dusanx/elsqlite") (:commit . "394904b1cd80ceb665ae4e832043331c1b587b8d") (:revdesc . "394904b1cd80") (:keywords "tools" "databases" "sqlite") (:authors ("Dusan Popovic" . "dpx@binaryapparatus.com")) (:maintainers ("Dusan Popovic" . "dpx@binaryapparatus.com")) (:maintainer "Dusan Popovic" . "dpx@binaryapparatus.com"))])
+ (elune-theme . [(20231009 1709) nil "Elune theme" tar ((:url . "https://github.com/xcatalyst/elune-theme") (:commit . "4d0217a7601e34fa84fc174ccf7945cd598d4135") (:revdesc . "4d0217a7601e") (:authors ("ağan Korkmaz" . "xcatalystt@gmail.com")) (:maintainers ("ağan Korkmaz" . "xcatalystt@gmail.com")) (:maintainer "ağan Korkmaz" . "xcatalystt@gmail.com"))])
+ (elvish-mode . [(20180809 1612) ((emacs (24 3))) "Defines a major mode for Elvish" tar ((:url . "https://github.com/ALSchwalm/elvish-mode") (:commit . "c3a7e31564256b9755b1ab9fb40d32ad78cd1ad2") (:revdesc . "c3a7e3156425") (:authors ("Adam Schwalm" . "adamschwalm@gmail.com")) (:maintainers ("Adam Schwalm" . "adamschwalm@gmail.com")) (:maintainer "Adam Schwalm" . "adamschwalm@gmail.com"))])
+ (elwm . [(20150817 1007) ((dash (1 1 0))) "Minimalistic window manager for emacs" tar ((:url . "https://github.com/Fuco1/elwm") (:commit . "c33b183f006ad476c3a44dab316f580f8b369930") (:revdesc . "c33b183f006a") (:keywords "docs") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (elx . [(20260601 1500) ((emacs (29 1)) (compat (31 0)) (cond-let (1 1)) (llama (1 0))) "Extract information from Emacs Lisp libraries" tar ((:url . "https://github.com/emacscollective/elx") (:commit . "99ea4bde756a3ae4a0cae96e9fffe6b13421d25f") (:revdesc . "99ea4bde756a") (:keywords "docs" "libraries" "packages") (:authors ("Jonas Bernoulli" . "emacs.elx@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.elx@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.elx@jonas.bernoulli.dev"))])
+ (elysium . [(20250406 1638) ((emacs (27 1)) (gptel (0 9 0))) "Automatically apply LLM-created code-suggestions" tar ((:url . "https://github.com/lanceberge/elysium/") (:commit . "049ad3091baf3ce578791187c5e5e4f932c26044") (:revdesc . "049ad3091baf") (:authors ("Lance Bergeron" . "bergeron.lance6@gmail.com")) (:maintainers ("Lance Bergeron" . "bergeron.lance6@gmail.com")) (:maintainer "Lance Bergeron" . "bergeron.lance6@gmail.com"))])
+ (emacs-everywhere . [(20251028 1701) ((emacs (28 1))) "System-wide popup windows for quick edits" tar ((:url . "https://github.com/tecosaur/emacs-everywhere") (:commit . "09a6a64dd07a712aad8ef1d0b99c086f025540d3") (:revdesc . "09a6a64dd07a") (:keywords "convenience" "frames") (:authors ("TEC" . "https://github.com/tecosaur")) (:maintainers ("TEC" . "contact@tecosaur.net")) (:maintainer "TEC" . "contact@tecosaur.net"))])
+ (emacsc . [(20260125 1050) nil "Helper for emacsc(1)" tar ((:url . "https://github.com/knu/emacsc") (:commit . "e3c8636d64d787eec876792288e99511d604eeec") (:revdesc . "e3c8636d64d7") (:keywords "tools") (:authors ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (emacsist-view . [(20160426 1223) nil "Mode for viewing emacsist.com" tar ((:url . "https://github.com/lujun9972/emacsist-view") (:commit . "f67761259ed779a9bc95c9a4e0474522990c5c6b") (:revdesc . "f67761259ed7") (:keywords "convenience" "usability") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (emacsql . [(20260601 1722) ((emacs (28 1))) "High-level SQL database front-end" tar ((:url . "https://github.com/magit/emacsql") (:commit . "d811bbefcb5e27841af55cae53aa939ba720de77") (:revdesc . "d811bbefcb5e") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Jonas Bernoulli" . "emacs.emacsql@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.emacsql@jonas.bernoulli.dev"))])
+ (emacsshot . [(20191206 944) ((emacs (24 4))) "Snapshot a frame or window from within" tar ((:url . "https://gitlab.com/marcowahl/emacsshot") (:commit . "fe958b11056f3c671ebdd604d5aa574323284ca5") (:revdesc . "fe958b11056f") (:keywords "convenience") (:authors ("Marco Wahl" . "marcowahlsoft@gmail.com")))])
+ (emamux . [(20251204 2049) ((emacs (26 1))) "Interact with tmux" tar ((:url . "https://github.com/emacsorphanage/emamux") (:commit . "0c42b04c1ee50d81872a736b768f44f544141b45") (:revdesc . "0c42b04c1ee5") (:keywords "unix") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (emamux-ruby-test . [(20130812 1639) ((emamux (0 1)) (projectile (0 9 1))) "Ruby test with emamux" tar ((:url . "https://github.com/syohex/emamux-ruby-test") (:commit . "785bfd44d097a46bb2ebe1e62ac7595fd4dc9ab5") (:revdesc . "785bfd44d097") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com") ("Malyshev Artem" . "proofit404@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com") ("Malyshev Artem" . "proofit404@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (emaps . [(20200508 1759) ((dash (2 17 0)) (emacs (24))) "Utilities for working with keymaps" tar ((:url . "https://github.com/GuiltyDolphin/emaps") (:commit . "7c561f3ded2015ed3774e5784059d6601082743e") (:revdesc . "7c561f3ded20") (:keywords "convenience" "keyboard" "keymap" "utility") (:authors ("Ben Moon" . "software@guiltydolphin.com")) (:maintainers ("Ben Moon" . "software@guiltydolphin.com")) (:maintainer "Ben Moon" . "software@guiltydolphin.com"))])
+ (embark . [(20260610 302) ((emacs (29 1)) (compat (31))) "Conveniently act on minibuffer completions" tar ((:url . "https://github.com/oantolin/embark") (:commit . "350ca86924c5027e80875943fba7b912a71e5791") (:revdesc . "350ca86924c5") (:keywords "convenience") (:authors ("Omar Antolín Camarena" . "omar@matem.unam.mx")) (:maintainers ("Omar Antolín Camarena" . "omar@matem.unam.mx")) (:maintainer "Omar Antolín Camarena" . "omar@matem.unam.mx"))])
+ (embark-consult . [(20260503 118) ((emacs (29 1)) (compat (31)) (embark (1 1)) (consult (3 2))) "Consult integration for Embark" tar ((:url . "https://github.com/oantolin/embark") (:commit . "ec5dd1475595277ef908567d0a18d32f1c40bc91") (:revdesc . "ec5dd1475595") (:keywords "convenience") (:authors ("Omar Antolín Camarena" . "omar@matem.unam.mx")) (:maintainers ("Omar Antolín Camarena" . "omar@matem.unam.mx")) (:maintainer "Omar Antolín Camarena" . "omar@matem.unam.mx"))])
+ (embark-org-roam . [(20240303 335) ((emacs (27 1)) (embark (0 23)) (org-roam (2 2 0))) "Embark export buffer for org roam nodes" tar ((:url . "https://github.com/bramadams/embark-org-roam") (:commit . "5bc9efc33e74eb47becbc2f6467141864cb6ecea") (:revdesc . "5bc9efc33e74") (:keywords "outlines" "hypermedia") (:authors ("Bram Adams" . "bram.adams@queensu.ca")) (:maintainers ("Bram Adams" . "bram.adams@queensu.ca")) (:maintainer "Bram Adams" . "bram.adams@queensu.ca"))])
+ (embark-vc . [(20250121 1558) ((emacs (27 1)) (embark (0 21 1)) (forge (0 3)) (compat (29 1 3 0))) "Embark actions for various version control integrations" tar ((:url . "https://github.com/elken/embark-vc") (:commit . "2bc2b3a3e610c217a61355a33b7e6c73b3b3ad44") (:revdesc . "2bc2b3a3e610") (:keywords "convenience" "matching" "terminals" "tools" "unix" "vc") (:authors ("Ellis Kenyő" . "https://github.com/elken")) (:maintainers ("Ellis Kenyő" . "me@elken.dev")) (:maintainer "Ellis Kenyő" . "me@elken.dev"))])
+ (ember-mode . [(20240507 915) ((cl-lib (0 5))) "Ember navigation mode for emacs" tar ((:url . "https://github.com/madnificent/ember-mode") (:commit . "38145ad189000c58860594c05523e42bacb3d246") (:revdesc . "38145ad18900") (:keywords "ember" "ember.js" "emberjs") (:authors ("Aad Versteden" . "madnificent@gmail.com")) (:maintainers ("Aad Versteden" . "madnificent@gmail.com")) (:maintainer "Aad Versteden" . "madnificent@gmail.com"))])
+ (ember-twilight-theme . [(20250224 923) ((emacs (24 1))) "Ember Twilight theme" tar ((:url . "https://github.com/madara123pain/unique-emacs-theme-pack") (:commit . "ae9a0c318c371ed70ec568f3a618d47124817fe7") (:revdesc . "ae9a0c318c37") (:keywords "faces" "theme" "ember" "twilight" "dark"))])
+ (ember-yasnippets . [(20160526 1658) ((yasnippet (0 8 0))) "Snippets for Ember.js development" tar ((:url . "https://github.com/ronco/ember-yasnippets.el") (:commit . "3b5bd01569646237bf1b540d097e12f9118b67f4") (:revdesc . "3b5bd0156964") (:keywords "tools" "abbrev" "languages") (:authors ("Ron White" . "ronco@costite.com")) (:maintainers ("Ron White" . "ronco@costite.com")) (:maintainer "Ron White" . "ronco@costite.com"))])
+ (embrace . [(20231027 419) ((cl-lib (0 5)) (expand-region (0 10 0))) "Add/Change/Delete pairs based on `expand-region'" tar ((:url . "https://github.com/cute-jumper/embrace.el") (:commit . "c7e748603151d7d91c237fd2d9cdf56e9f3b1ea8") (:revdesc . "c7e748603151") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (emc . [(20251014 1710) ((delight (1 7)) (emacs (29 1))) "Invoking a C/C++ (et al.) build toolchain from ELisp" tar ((:url . "https://github.com/marcoxa/emc") (:commit . "f788e164056801059b5821a64909d49472d0e77e") (:revdesc . "f788e1640568") (:keywords "extensions" "c" "lisp" "building tools" "development" "deployment.") (:authors ("Marco Antoniotti" . "marcoxa[at]gmail.com")) (:maintainers ("Marco Antoniotti" . "marcoxa[at]gmail.com")) (:maintainer "Marco Antoniotti" . "marcoxa[at]gmail.com"))])
+ (emcp . [(20260706 1558) ((emacs (30 1)) (http-server (0 1 0)) (elisp-refs (1 6)) (magit-section (4 0 0))) "Lets your agent talk to Emacs" tar ((:url . "https://codeberg.org/martenlienen/emcp") (:commit . "cc452a2cb8b128305c7091a4adf9435e6b227fc1") (:revdesc . "cc452a2cb8b1") (:keywords "maint") (:authors ("Marten Lienen" . "ml@martenlienen.com")) (:maintainers ("Marten Lienen" . "ml@martenlienen.com")) (:maintainer "Marten Lienen" . "ml@martenlienen.com"))])
+ (emidje . [(20190209 1726) ((emacs (25)) (cider (0 17 0)) (seq (2 16)) (magit-popup (2 4 0))) "Test runner and report viewer for Midje" tar ((:url . "https://github.com/nubank/emidje") (:commit . "7e92f053964d925c97dc8cca8d4d70a3030021db") (:revdesc . "7e92f053964d") (:keywords "tools") (:authors ("Alan Ghelardi" . "alan.ghelardi@nubank.com.br")) (:maintainers ("Alan Ghelardi" . "alan.ghelardi@nubank.com.br")) (:maintainer "Alan Ghelardi" . "alan.ghelardi@nubank.com.br"))])
+ (emmet-mode . [(20240617 45) nil "Unofficial Emmet's support for emacs" tar ((:url . "https://github.com/smihica/emmet-mode") (:commit . "322d3bb112fced57d63b44863357f7a0b7eee1e3") (:revdesc . "322d3bb112fc") (:keywords "convenience") (:authors ("Shin Aoyama" . "smihica@gmail.com")) (:maintainers ("Shin Aoyama" . "smihica@gmail.com")) (:maintainer "Shin Aoyama" . "smihica@gmail.com"))])
+ (emms . [(20260414 1505) ((cl-lib (0 5)) (nadvice (0 3)) (seq (0))) "The Emacs Multimedia System" tar ((:url . "https://www.gnu.org/software/emms/") (:commit . "6f704fd3c12f35e059700aaeb43ae64c35ad81b2") (:revdesc . "6f704fd3c12f") (:keywords "emms" "mp3" "ogg" "flac" "music" "mpeg" "video" "multimedia") (:authors ("Jorgen Schäfer" . "forcer@forcix.cx")) (:maintainers ("Yoni Rabkin" . "yrk@gnu.org")) (:maintainer "Yoni Rabkin" . "yrk@gnu.org"))])
+ (emms-info-mediainfo . [(20131223 1300) ((emms (0))) "Info-method for EMMS using medianfo" tar ((:url . "https://github.com/fgallina/emms-info-mediainfo") (:commit . "bce16eae9eacd38719fea62a9755225a888da59d") (:revdesc . "bce16eae9eac") (:keywords "multimedia" "processes") (:authors ("Fabián Ezequiel Gallina" . "fgallina@gnu.org")) (:maintainers ("Fabián Ezequiel Gallina" . "fgallina@gnu.org")) (:maintainer "Fabián Ezequiel Gallina" . "fgallina@gnu.org"))])
+ (emms-mark-ext . [(20130529 327) ((emms (3 0))) "Extra functions for emms-mark-mode and emms-tag-edit-mode" tar ((:url . "https://github.com/vapniks/emms-mark-ext") (:commit . "ec68129e3e9e469e5bf160c6a1b7030e322f3541") (:revdesc . "ec68129e3e9e") (:keywords "convenience" "multimedia") (:authors ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainers ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainer "Joe Bloggs" . "vapniks@yahoo.com"))])
+ (emms-mode-line-cycle . [(20160221 1120) ((emacs (24)) (emms (4 0))) "Display the emms mode line as a ticker" tar ((:url . "https://github.com/momomo5717/emms-mode-line-cycle") (:commit . "2c2f395e484a1d345050ddd61ff5fab71a92a6bc") (:revdesc . "2c2f395e484a") (:keywords "emms" "mode-line"))])
+ (emms-player-mpv-jp-radios . [(20180325 1117) ((emacs (24)) (cl-lib (0 5)) (emms (4 0)) (emms-player-simple-mpv (0 1 7))) "EMMS players and stream lists of Japan radio stations" tar ((:url . "https://github.com/momomo5717/emms-player-mpv-jp-radios") (:commit . "f6b37f5878c741124d5fca43c5b80af873541edd") (:revdesc . "f6b37f5878c7") (:keywords "emms" "mpv" "radio"))])
+ (emms-player-simple-mpv . [(20180316 1549) ((emacs (24)) (cl-lib (0 5)) (emms (4 0))) "An extension of emms-player-simple.el for mpv JSON IPC" tar ((:url . "https://github.com/momomo5717/emms-player-simple-mpv") (:commit . "101d120ccdee1c2c213fd2f0423c858b21649c00") (:revdesc . "101d120ccdee") (:keywords "emms" "mpv"))])
+ (emms-player-spotify . [(20250411 619) ((emacs (26 1)) (compat (29 1)) (emms (18)) (s (1 13 0))) "Spotify player for EMMS" tar ((:url . "https://github.com/sarg/emms-spotify") (:commit . "ca80431b00738e6130b924c64dc1f2cddadcc0b8") (:revdesc . "ca80431b0073") (:authors ("Sergey Trofimov" . "sarg@sarg.org.ru")) (:maintainers ("Sergey Trofimov" . "sarg@sarg.org.ru")) (:maintainer "Sergey Trofimov" . "sarg@sarg.org.ru"))])
+ (emms-soundcloud . [(20131221 1145) ((emms (20131016)) (json (1 2))) "EMMS source for Soundcloud audio sharing platform" tar ((:url . "https://github.com/osener/emms-soundcloud") (:commit . "87e5cbf9609d1f26c24dc834fdeb78b33d453c2b") (:revdesc . "87e5cbf9609d") (:keywords "emms" "soundcloud") (:authors ("Ozan Sener" . "ozan@ozansener.com")) (:maintainers ("Ozan Sener" . "ozan@ozansener.com")) (:maintainer "Ozan Sener" . "ozan@ozansener.com"))])
+ (emms-state . [(20260102 648) ((emms (0))) "Display EMMS track description and playing time in the mode line" tar ((:url . "https://github.com/alezost/emms-state.el") (:commit . "18128405c0a3659f493fceb3ea22e0a8a39125be") (:revdesc . "18128405c0a3") (:keywords "emms") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (emoji-cheat-sheet-plus . [(20200202 1412) ((emacs (24)) (helm (1 6 4))) "Emoji-cheat-sheet for emacs" tar ((:url . "https://github.com/syl20bnr/emacs-emoji-cheat-sheet-plus") (:commit . "ffcc84d7060dfa000148e7f8be4fd6701593a74f") (:revdesc . "ffcc84d7060d") (:keywords "emacs" "emoji"))])
+ (emoji-display . [(20140117 1013) nil "Emoji displaying module" tar ((:url . "https://github.com/ikazuhiro/emoji-display") (:commit . "bb4217f6400151a9cfa6d4524b8427f01feb5193") (:revdesc . "bb4217f64001") (:keywords "emoji") (:authors ("Kazuhiro Ito" . "kzhr@d1.dion.ne.jp")) (:maintainers ("Kazuhiro Ito" . "kzhr@d1.dion.ne.jp")) (:maintainer "Kazuhiro Ito" . "kzhr@d1.dion.ne.jp"))])
+ (emoji-fontset . [(20160726 1924) nil "Set font face for Emoji" tar ((:url . "https://github.com/zonuexe/emoji-fontset.el") (:commit . "e460c9a08e48ec4103e38a7a04acae20880149a9") (:revdesc . "e460c9a08e48") (:keywords "emoji" "font" "config") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (emoji-github . [(20260101 559) ((emacs (24 4)) (emojify (1 0)) (request (0 3 0))) "Display list of GitHub's emoji.  (cheat sheet)" tar ((:url . "https://github.com/jcs-elpa/emoji-github") (:commit . "439c0471b16bc1d73e7d460e526a1b0fa14116c3") (:revdesc . "439c0471b16b") (:keywords "convenience" "list" "github" "emoji" "display") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (emoji-recall . [(20160723 2208) ((emacs (24))) "How many emoji can you recall from memory?" tar ((:url . "https://github.com/lujun9972/emoji-recall.el") (:commit . "1c12d18e5592eaa2138dd3034012dced277e6d99") (:revdesc . "1c12d18e5592") (:keywords "game") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (emojify . [(20210108 1111) ((seq (1 11)) (ht (2 0)) (emacs (24 3))) "Display emojis in Emacs" tar ((:url . "https://github.com/iqbalansari/emacs-emojify") (:commit . "cfa00865388809363df3f884b4dd554a5d44f835") (:revdesc . "cfa008653888") (:keywords "multimedia" "convenience") (:authors ("Iqbal Ansari" . "iqbalansari02@yahoo.com")) (:maintainers ("Iqbal Ansari" . "iqbalansari02@yahoo.com")) (:maintainer "Iqbal Ansari" . "iqbalansari02@yahoo.com"))])
+ (emojify-logos . [(20180814 917) ((emojify (0 4))) "Add logos to emojify" tar ((:url . "https://github.com/mxgoldstein/emojify-logos") (:commit . "a3e78bcbdf863092d4c9b026ac08bf7d1c7c0e8b") (:revdesc . "a3e78bcbdf86") (:authors ("mxgoldstein" . "m_goldstein@gmx.net")) (:maintainers ("mxgoldstein" . "m_goldstein@gmx.net")) (:maintainer "mxgoldstein" . "m_goldstein@gmx.net"))])
+ (empos . [(20151011 1916) nil "Locate bibtex citations from within emacs" tar ((:url . "https://github.com/dimalik/empos/") (:commit . "7b99ad30e56937adb7e6349777e5a2045597d564") (:revdesc . "7b99ad30e569") (:keywords "citations" "reference" "bibtex" "reftex") (:authors ("Dimitris Alikaniotis" . "da352[at]cam.ac.uk")) (:maintainers ("Dimitris Alikaniotis" . "da352[at]cam.ac.uk")) (:maintainer "Dimitris Alikaniotis" . "da352[at]cam.ac.uk"))])
+ (empv . [(20260819 2256) ((emacs (28 1)) (s (1 13 0)) (compat (29 1 4 4))) "A multimedia player/manager, YouTube interface" tar ((:url . "https://github.com/isamert/empv.el") (:commit . "a1c76aa8d29b8759fe9363e83043c7571deaaea4") (:revdesc . "a1c76aa8d29b") (:authors ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainers ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainer "Isa Mert Gurbuz" . "isamertgurbuz@gmail.com"))])
+ (emr . [(20220108 548) ((s (1 3 1)) (dash (1 2 0)) (cl-lib (0 2)) (popup (0 5 0)) (emacs (24 1)) (list-utils (0 3 0)) (paredit (24 0 0)) (projectile (0 9 1)) (clang-format (0 0 1)) (iedit (0 97))) "Emacs refactoring system" tar ((:url . "https://github.com/Wilfred/emacs-refactor") (:commit . "cac1b52932926f56d7f6d2923732d20bbd20670d") (:revdesc . "cac1b5293292") (:keywords "tools" "convenience" "refactoring") (:authors ("Chris Barrett" . "chris.d.barrett@me.com")) (:maintainers ("Chris Barrett" . "chris.d.barrett@me.com")) (:maintainer "Chris Barrett" . "chris.d.barrett@me.com"))])
+ (enclose . [(20121008 1614) nil "Enclose cursor within punctuation pairs" tar ((:url . "https://github.com/rejeep/enclose") (:commit . "2fff3d4fcc1089f87647042d7164ba04282766ae") (:revdesc . "2fff3d4fcc10") (:keywords "speed" "convenience") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (encourage-mode . [(20151128 905) ((emacs (24 4))) "Encourages you in your work. :D" tar ((:url . "https://github.com/halbtuerke/encourage-mode.el") (:commit . "ca411e6bfd3d0edffe95852127bd995730b942e3") (:revdesc . "ca411e6bfd3d") (:keywords "fun") (:authors ("Patrick Mosby" . "patrick@schreiblogade.de")) (:maintainers ("Patrick Mosby" . "patrick@schreiblogade.de")) (:maintainer "Patrick Mosby" . "patrick@schreiblogade.de"))])
+ (encrypt-region . [(20220802 918) ((emacs (26 1))) "Encrypts and decrypts regions" tar ((:url . "https://github.com/cgshep/encrypt-region") (:commit . "8ff5704bc6f4c57f935a8b7680129e599bbe474f") (:revdesc . "8ff5704bc6f4") (:keywords "tools" "convenience") (:authors ("Carlton Shepherd" . "carlton@linux.com")) (:maintainers ("Carlton Shepherd" . "carlton@linux.com")) (:maintainer "Carlton Shepherd" . "carlton@linux.com"))])
+ (engine-mode . [(20240906 453) ((emacs (24 4))) "Define and query search engines" tar ((:url . "https://github.com/hrs/engine-mode") (:commit . "1cfdaef7e019aecc1b648036c3434c99d6d308bc") (:revdesc . "1cfdaef7e019") (:authors ("Robin Schwartz" . "hello@robinschwartz.me")) (:maintainers ("Robin Schwartz" . "hello@robinschwartz.me")) (:maintainer "Robin Schwartz" . "hello@robinschwartz.me"))])
+ (enh-ruby-mode . [(20260107 824) ((emacs (25 1))) "Major mode for editing Ruby files" tar ((:url . "https://github.com/zenspider/Enhanced-Ruby-Mode") (:commit . "1a3a93a6ba51798baa7364589136d974b19fd8d8") (:revdesc . "1a3a93a6ba51") (:keywords "languages" "elisp" "ruby"))])
+ (enhanced-evil-paredit . [(20260826 247) ((emacs (24 1)) (evil (1 0 9)) (paredit (25 -2))) "Paredit support for evil keybindings" tar ((:url . "https://github.com/jamescherti/enhanced-evil-paredit.el") (:commit . "e6149d233313b299f8a05e13b6082fbd35a2c593") (:revdesc . "e6149d233313") (:keywords "convenience" "lisp"))])
+ (enlight . [(20240602 2025) ((emacs (27 1)) (compat (29 1 4 1))) "Highly customizable startup screen" tar ((:url . "https://github.com/ichernyshovvv/enlight") (:commit . "5194c1a4f4c245a1ef544205d723381fac30414b") (:revdesc . "5194c1a4f4c2") (:keywords "startup" "screen" "tools" "dashboard") (:authors ("Ilya Chernyshov" . "ichernyshovvv@gmail.com")) (:maintainers ("Ilya Chernyshov" . "ichernyshovvv@gmail.com")) (:maintainer "Ilya Chernyshov" . "ichernyshovvv@gmail.com"))])
+ (enlightened-theme . [(20210220 2327) nil "A theme based on enlightened" tar ((:url . "https://hg.sr.ht/~slondr/enlightened") (:commit . "1bfebd8f47e8a8357c9e557cf6e95d7027861e6d") (:revdesc . "1bfebd8f47e8"))])
+ (enlive . [(20170725 1417) nil "Query html document with css selectors" tar ((:url . "https://github.com/zweifisch/enlive") (:commit . "604a8ca272b6889f114e2b5a13adb5b1dc4bae86") (:revdesc . "604a8ca272b6") (:keywords "css" "selector" "query") (:authors ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainers ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainer "ZHOU Feng" . "zf.pascal@gmail.com"))])
+ (eno . [(20191013 1239) ((dash (2 12 1)) (edit-at-point (1 0))) "Goto/copy/cut any word/symbol/line in view, similar to ace-jump/easymotion" tar ((:url . "https://github.com/enoson/eno.el") (:commit . "c5c6193687c0bede1ddf507c430cf8b0a6d272d9") (:revdesc . "c5c6193687c0") (:authors (nil . "e.enoson@gmail.com")) (:maintainers (nil . "e.enoson@gmail.com")) (:maintainer nil . "e.enoson@gmail.com"))])
+ (enotify . [(20130407 1348) nil "A networked notification system for emacs" tar ((:url . "https://github.com/laynor/enotify") (:commit . "7fd2f48ef4ff32c8f013c634ea2dd6b1d1409f80") (:revdesc . "7fd2f48ef4ff") (:keywords "tools") (:authors ("Alessandro Piras" . "laynor@gmail.com")) (:maintainers ("Alessandro Piras" . "laynor@gmail.com")) (:maintainer "Alessandro Piras" . "laynor@gmail.com"))])
+ (environ . [(20260313 1407) ((emacs (24 1)) (dash (2 17 0)) (f (0 20 0)) (s (1 12 0))) "API for environment variables and env files" tar ((:url . "https://github.com/cfclrk/environ") (:commit . "697878b084b74401ba8183f5272cd464d3647ee6") (:revdesc . "697878b084b7") (:keywords "tools") (:authors ("Chris Clark" . "cfclrk@gmail.com")) (:maintainers ("Chris Clark" . "cfclrk@gmail.com")) (:maintainer "Chris Clark" . "cfclrk@gmail.com"))])
+ (envrc . [(20260811 1221) ((emacs (28 1)) (inheritenv (0 1)) (seq (2 24))) "Support for `direnv' that operates buffer-locally" tar ((:url . "https://github.com/purcell/envrc") (:commit . "e4f9fd79a612c8f81b4ba5b12ee7261fc33568f0") (:revdesc . "e4f9fd79a612") (:keywords "processes" "tools") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (eopengrok . [(20230114 1413) ((s (1 9 0)) (dash (2 10 0)) (magit (2 1 0)) (cl-lib (0 5))) "Opengrok interface for emacs" tar ((:url . "https://github.com/youngker/eopengrok.el") (:commit . "83b1695774f8bdc322e528ade9dffe9b2e93f32a") (:revdesc . "83b1695774f8") (:keywords "tools") (:authors ("Youngjoo Lee" . "youngker@gmail.com")) (:maintainers ("Youngjoo Lee" . "youngker@gmail.com")) (:maintainer "Youngjoo Lee" . "youngker@gmail.com"))])
+ (epc . [(20140610 534) ((concurrent (0 3 1)) (ctable (0 1 2))) "A RPC stack for the Emacs Lisp" tar ((:url . "https://github.com/kiwanami/emacs-epc") (:commit . "94cd36a3bec752263ac9b1b3a9dd2def329d2af7") (:revdesc . "94cd36a3bec7") (:keywords "lisp" "rpc") (:authors ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainers ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainer "SAKURAI Masashi" . "m.sakuraiatkiwanami.net"))])
+ (epic . [(20170210 23) ((htmlize (1 47))) "Evernote Picker for Cocoa Emacs" tar ((:url . "https://github.com/yoshinari-nomura/epic") (:commit . "a41826c330eb0ea061d58a08cc861b0c4ac8ec4e") (:revdesc . "a41826c330eb") (:keywords "evernote" "applescript") (:authors ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainers ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainer "Yoshinari Nomura" . "nom@quickhack.net"))])
+ (eping . [(20201027 2149) ((emacs (25 1))) "Ping websites to check internet connectivity" tar ((:url . "https://github.com/sean-hut/eping") (:commit . "004496ee06c0b8ead4a4f49e17109e8eb32eb49d") (:revdesc . "004496ee06c0") (:keywords "comm" "processes" "terminals" "unix") (:authors ("Sean Hutchings" . "seanhut@yandex.com")) (:maintainers ("Sean Hutchings" . "seanhut@yandex.com")) (:maintainer "Sean Hutchings" . "seanhut@yandex.com"))])
+ (epkg . [(20260814 2044) ((emacs (28 1)) (compat (31 0)) (closql (2 4)) (cond-let (1 1)) (emacsql (4 4)) (llama (1 0))) "Browse the Emacsmirror package database" tar ((:url . "https://github.com/emacscollective/epkg") (:commit . "a01ce8e73231e33778a5f8fa2ef366b94da4f52b") (:revdesc . "a01ce8e73231") (:keywords "tools") (:authors ("Jonas Bernoulli" . "emacs.epkg@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.epkg@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.epkg@jonas.bernoulli.dev"))])
+ (epkg-marginalia . [(20260601 1622) ((emacs (28 1)) (compat (31 0)) (cond-let (1 1)) (epkg (4 2)) (marginalia (2 11))) "Show Epkg information in completion annotations" tar ((:url . "https://github.com/emacscollective/epkg-marginalia") (:commit . "e789ebff7af97f193e38cc3d5636dd55022973b8") (:revdesc . "e789ebff7af9") (:keywords "tools") (:authors ("Jonas Bernoulli" . "emacs.epkg-marginalia@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.epkg-marginalia@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.epkg-marginalia@jonas.bernoulli.dev"))])
+ (epl . [(20180205 2049) ((cl-lib (0 3))) "Emacs Package Library" tar ((:url . "https://github.com/cask/epl") (:commit . "78ab7a85c08222cd15582a298a364774e3282ce6") (:revdesc . "78ab7a85c082") (:keywords "convenience") (:authors ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com") ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (eplotly . [(20251221 1257) ((emacs (26 1)) (jack (1 0)) (f (0 21 0))) "Create Plotly charts" tar ((:url . "https://codeberg.org/GioBo/eplotly") (:commit . "7f36d03d7d3226da05c4e60a692f9a1055d92212") (:revdesc . "7f36d03d7d32") (:keywords "tools") (:maintainers ("GioBo" . "boccigionata@gmail.com")) (:maintainer "GioBo" . "boccigionata@gmail.com"))])
+ (epm . [(20190509 443) ((emacs (24 3)) (epl (0 8))) "Emacs Package Manager" tar ((:url . "https://github.com/xuchunyang/epm") (:commit . "6375ddbf93c5f25647f6ebb25b54045b3c93a5be") (:revdesc . "6375ddbf93c5") (:authors ("Chunyang Xu" . "xuchunyang.me@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang.me@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang.me@gmail.com"))])
+ (epresent . [(20160411 201) ((org (8)) (cl-lib (0 5))) "Simple presentation mode for Emacs Org-mode" tar ((:url . "https://github.com/dakrone/epresent") (:commit . "bc3443879bb0111dcde2abd2f9c578e2cd438186") (:revdesc . "bc3443879bb0") (:keywords "gui") (:authors ("Tom Tromey" . "tromey@redhat.com") ("Eric Schulte" . "schulte.eric@gmail.com") ("Lee Hinman" . "lee@writequit.org")) (:maintainers ("Tom Tromey" . "tromey@redhat.com") ("Eric Schulte" . "schulte.eric@gmail.com") ("Lee Hinman" . "lee@writequit.org")) (:maintainer "Tom Tromey" . "tromey@redhat.com"))])
+ (eproject . [(20180312 1642) ((helm (1 6 4))) "Assign files to projects, programatically" tar ((:url . "https://github.com/jrockway/eproject") (:commit . "068218d2cf2138cb2e8fc29b57e773a0097a7e8b") (:revdesc . "068218d2cf21") (:keywords "programming" "projects") (:authors ("Jonathan Rockway" . "jon@jrock.us")) (:maintainers ("Jonathan Rockway" . "jon@jrock.us")) (:maintainer "Jonathan Rockway" . "jon@jrock.us"))])
+ (eprolog . [(20260308 1503) ((emacs (27 2))) "Native Prolog engine implementation" tar ((:url . "https://github.com/tani/eprolog") (:commit . "6eff9942d3de603109101f3d74e30aac495203f6") (:revdesc . "6eff9942d3de") (:keywords "languages" "prolog" "logic programming"))])
+ (epx . [(20260805 1957) ((emacs (29 1))) "Manage and run project-specific shell commands" tar ((:url . "https://git.sr.ht/~alex-iam/epx") (:commit . "ef8cfb41bf2064c56a61cc0cf96c51f9cc008675") (:revdesc . "ef8cfb41bf20") (:keywords "project" "shell" "tools") (:authors ("Oleksandr Korzh" . "alex@korzh.me")) (:maintainers ("Oleksandr Korzh" . "alex@korzh.me")) (:maintainer "Oleksandr Korzh" . "alex@korzh.me"))])
+ (equake . [(20260102 225) ((emacs (27 1)) (dash (2 14 1))) "Drop-down console for (e)shell & terminal emulation" tar ((:url . "https://github.com/emacsomancer/equake") (:commit . "4469dd9eb1519f4d699d43d6cdb3a59488021fe8") (:revdesc . "4469dd9eb151") (:keywords "convenience" "frames" "terminals" "tools" "window-system") (:authors ("Benjamin Slade" . "slade@lambda-y.net")) (:maintainers ("Benjamin Slade" . "slade@lambda-y.net")) (:maintainer "Benjamin Slade" . "slade@lambda-y.net"))])
+ (eradio . [(20210327 1000) ((emacs (24 1))) "A simple Internet radio player" tar ((:url . "https://github.com/fossegrim/eradio") (:commit . "47769986c79def84307921f0277e9bb2714756c2") (:revdesc . "47769986c79d") (:authors ("Olav Fosse" . "mail@olavfosse.no")) (:maintainers ("Olav Fosse" . "mail@olavfosse.no")) (:maintainer "Olav Fosse" . "mail@olavfosse.no"))])
+ (erblint . [(20200622 5) ((emacs (24))) "An interface for checking HTML ERB files using Erblint" tar ((:url . "https://github.com/leodcs/erblint-emacs") (:commit . "43706afb09ec8de91651a832b703c81ced10ec4e") (:revdesc . "43706afb09ec") (:keywords "project" "convenience"))])
+ (erc-colorize . [(20241205 1612) nil "Per user colorization of whole message" tar ((:url . "https://github.com/thisirs/erc-colorize.git") (:commit . "998a37e950dc2ad026bdd192b37889f65d4e858e") (:revdesc . "998a37e950dc") (:keywords "erc" "convenience") (:authors ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainers ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainer "Sylvain Rousseau" . "thisirsatgmaildotcom"))])
+ (erc-crypt . [(20251128 1224) ((cl-lib (0 5))) "Symmetric Encryption for ERC" tar ((:url . "https://github.com/atomontage/erc-crypt") (:commit . "fc7eb4896310cc274ab7d035a1daf6a2a608a1e1") (:revdesc . "fc7eb4896310") (:keywords "comm") (:authors ("xristos" . "xristos@sdf.org")) (:maintainers ("xristos" . "xristos@sdf.org")) (:maintainer "xristos" . "xristos@sdf.org"))])
+ (erc-hl-nicks . [(20240615 2058) nil "ERC nick highlighter that ignores uniquifying chars when colorizing" tar ((:url . "http://www.github.com/leathekd/erc-hl-nicks") (:commit . "fd2759bde20c25226a332c3d19aed6c7f135bf10") (:revdesc . "fd2759bde20c") (:authors ("David Leatherman" . "leathekd@gmail.com")) (:maintainers ("David Leatherman" . "leathekd@gmail.com")) (:maintainer "David Leatherman" . "leathekd@gmail.com"))])
+ (erc-image . [(20210604 753) nil "Show received image urls in the ERC buffer" tar ((:url . "https://github.com/kidd/erc-image.el") (:commit . "883084f0801d46a5ccf183e51ae9a734755bbb97") (:revdesc . "883084f0801d") (:keywords "multimedia") (:authors ("Jon de Andrés Frías" . "jondeandres@gmail.com") ("Raimon Grau Cuscó" . "raimonster@gmail.com")) (:maintainers ("Jon de Andrés Frías" . "jondeandres@gmail.com") ("Raimon Grau Cuscó" . "raimonster@gmail.com")) (:maintainer "Jon de Andrés Frías" . "jondeandres@gmail.com"))])
+ (erc-matterircd . [(20260628 743) ((emacs (27 1))) "Integrate matterircd with ERC" tar ((:url . "https://github.com/alexmurray/erc-matterircd") (:commit . "f4c8e3cac924065b2d0e43114459c45fa39cc006") (:revdesc . "f4c8e3cac924") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (erc-scrolltoplace . [(20180608 606) ((emacs (24 0)) (switch-buffer-functions (0 0 1))) "An Erc module to scrolltobottom better with keep-place" tar ((:url . "https://gitlab.com/jgkamat/erc-scrolltoplace") (:commit . "feb0fbf1fd4bdf220ae2d31ea7c066d8e62089f9") (:revdesc . "feb0fbf1fd4b") (:keywords "erc" "module" "comm" "scrolltobottom" "keep-place") (:authors ("Jay Kamat" . "jaygkamat@gmail.com")) (:maintainers ("Jay Kamat" . "jaygkamat@gmail.com")) (:maintainer "Jay Kamat" . "jaygkamat@gmail.com"))])
+ (erc-social-graph . [(20150508 1204) nil "A social network graph module for ERC" tar ((:url . "https://github.com/vibhavp/erc-social-graph") (:commit . "e6ef3416a1c5064054bf054d9f0c1c7bf54a9cd0") (:revdesc . "e6ef3416a1c5") (:keywords "erc" "graph") (:authors ("Vibhav Pant" . "vibhavp@gmail.com")) (:maintainers ("Vibhav Pant" . "vibhavp@gmail.com")) (:maintainer "Vibhav Pant" . "vibhavp@gmail.com"))])
+ (erc-terminal-notifier . [(20140115 1024) nil "OSX notifications via the terminal-notifier gem for Emacs ERC" tar ((:url . "https://github.com/julienXX/") (:commit . "a3dacb935845e4a20031212bbd82b2170f68d2a8") (:revdesc . "a3dacb935845") (:keywords "erc" "terminal-notifier" "nick") (:authors ("Julien Blanchard" . "julien@sideburns.eu")) (:maintainers ("Julien Blanchard" . "julien@sideburns.eu")) (:maintainer "Julien Blanchard" . "julien@sideburns.eu"))])
+ (erc-track-score . [(20130328 1215) nil "Add score support to tracked channel buffers" tar ((:url . "http://julien.danjou.info/erc-track-score.html") (:commit . "5b27531ea6b1a4c4b703b270dfa9128cb5bfdaa3") (:revdesc . "5b27531ea6b1") (:authors ("Julien Danjou" . "julien@danjou.info")) (:maintainers ("Julien Danjou" . "julien@danjou.info")) (:maintainer "Julien Danjou" . "julien@danjou.info"))])
+ (erc-tweet . [(20150920 1258) nil "Shows text of a tweet when an url is posted in erc buffers" tar ((:url . "https://github.com/kidd/erc-tweet.el") (:commit . "91fed61e139fa788d66a7358f0d50acc896414b8") (:revdesc . "91fed61e139f") (:keywords "extensions") (:authors ("Raimon Grau" . "raimonster@gmail.com")) (:maintainers ("Raimon Grau" . "raimonster@gmail.com")) (:maintainer "Raimon Grau" . "raimonster@gmail.com"))])
+ (erc-twitch . [(20170427 606) ((json (1 3)) (erc (5 0))) "Support for Twitch emotes for ERC" tar ((:url . "https://github.com/vibhavp/erc-twitch") (:commit . "53c6af0cb72e56d897d30a40e7e5066668d6b5ec") (:revdesc . "53c6af0cb72e") (:keywords "twitch" "erc" "emotes") (:authors ("Vibhav Pant" . "vibhavp@gmail.com")) (:maintainers ("Vibhav Pant" . "vibhavp@gmail.com")) (:maintainer "Vibhav Pant" . "vibhavp@gmail.com"))])
+ (erc-view-log . [(20140227 2039) nil "Major mode for viewing ERC logs" tar ((:url . "https://github.com/Niluge-KiWi/erc-view-log/raw/master/erc-view-log.el") (:commit . "c5a25f0cbca84ed2e4f72068c02b66bd0ea3b266") (:revdesc . "c5a25f0cbca8") (:keywords "erc" "viewer" "logs" "colors") (:authors ("Thomas Riccardi" . "riccardi.thomas@gmail.com")) (:maintainers ("Thomas Riccardi" . "riccardi.thomas@gmail.com")) (:maintainer "Thomas Riccardi" . "riccardi.thomas@gmail.com"))])
+ (erc-yank . [(20210220 1815) nil "Automagically create a Gist if pasting more than 5 lines" tar ((:url . "https://github.com/jwiegley/erc-yank") (:commit . "55d96f18c5df9d8fce51fa073d7a12c47a46ac80") (:revdesc . "55d96f18c5df") (:keywords "comm" "erc" "chat" "irc" "yank" "gist") (:authors ("John Wiegley" . "jwiegley@gmail.com")) (:maintainers ("John Wiegley" . "jwiegley@gmail.com")) (:maintainer "John Wiegley" . "jwiegley@gmail.com"))])
+ (erc-youtube . [(20150603 2136) nil "Show info about a YouTube URL in an ERC buffer" tar ((:url . "https://github.com/kidd/erc-youtube.el") (:commit . "97054ba8475b442e2aa81e5a291f668b7f28697f") (:revdesc . "97054ba8475b") (:keywords "multimedia") (:authors ("Raimon Grau Cuscó" . "raimonster@gmail.com")) (:maintainers ("Raimon Grau Cuscó" . "raimonster@gmail.com")) (:maintainer "Raimon Grau Cuscó" . "raimonster@gmail.com"))])
+ (erc-yt . [(20150426 1249) ((dash (2 10 0))) "An erc module to display youtube links nicely" tar ((:url . "https://github.com/yhvh/erc-yt") (:commit . "43e7d49325b17a3217a6ffb4a9daf75c5ff4e6f8") (:revdesc . "43e7d49325b1") (:keywords "multimedia") (:authors ("William Stevenson" . "yhvh2000@gmail.com")) (:maintainers ("William Stevenson" . "yhvh2000@gmail.com")) (:maintainer "William Stevenson" . "yhvh2000@gmail.com"))])
+ (ercn . [(20250317 2338) ((dash (0))) "Flexible ERC notifications" tar ((:url . "http://www.github.com/leathekd/ercn") (:commit . "ac063a64b9e04e4f74ba22b95275cec3bd9dfce1") (:revdesc . "ac063a64b9e0") (:authors ("David Leatherman" . "leathekd@gmail.com")) (:maintainers ("David Leatherman" . "leathekd@gmail.com")) (:maintainer "David Leatherman" . "leathekd@gmail.com"))])
+ (ereader . [(20170810 501) ((emacs (24 4)) (dash (2 12 1)) (s (1 10 0)) (xml+ (0 0 0))) "Major mode for reading ebooks with org-mode integration" tar ((:url . "https://github.com/bddean/emacs-ereader") (:commit . "f3bbd3f13195f8fba3e3c880aab0e4c60430dcf3") (:revdesc . "f3bbd3f13195") (:keywords "epub" "ebook") (:authors ("Ben Dean" . "bendean837@gmail.com")) (:maintainers ("Ben Dean" . "bendean837@gmail.com")) (:maintainer "Ben Dean" . "bendean837@gmail.com"))])
+ (eredis . [(20181119 131) ((dash (0))) "Eredis, a Redis client in emacs lisp" tar ((:url . "https://github.com/justinhj/eredis/") (:commit . "cfbfc25832f6fbc507bdd56b02e3a0b851a3c368") (:revdesc . "cfbfc25832f6") (:keywords "redis" "api" "tools" "org") (:authors ("Justin Heyes-Jones" . "justinhj@gmail.com")) (:maintainers ("Justin Heyes-Jones" . "justinhj@gmail.com")) (:maintainer "Justin Heyes-Jones" . "justinhj@gmail.com"))])
+ (erefactor . [(20200513 1252) ((cl-lib (0 3))) "Emacs-Lisp refactoring utilities" tar ((:url . "https://github.com/mhayashi1120/Emacs-erefactor") (:commit . "bfe27a1b8c7cac0fe054e76113e941efa3775fe8") (:revdesc . "bfe27a1b8c7c") (:keywords "extensions" "tools" "maint") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (ergoemacs-mode . [(20260811 2315) ((emacs (24 1)) (cl-lib (0 5)) (nadvice (0 4))) "Emacs mode based on common modern interface and ergonomics" tar ((:url . "https://github.com/ergoemacs/ergoemacs-mode") (:commit . "5e83523752a47231af64c352fe4af57ad44dc456") (:revdesc . "5e83523752a4") (:keywords "convenience") (:authors ("Xah Lee" . "xah@xahlee.org") ("David Capello" . "davidcapello@gmail.com") ("Matthew L. Fidler" . "matthew.fidler@gmail.com") ("Kim F. Storm -- CUA approach for C-x and C-c" . "storm@cua.dk")) (:maintainers ("Matthew L. Fidler" . "matthew.fidler@gmail.com")) (:maintainer "Matthew L. Fidler" . "matthew.fidler@gmail.com"))])
+ (ergoemacs-status . [(20160318 538) ((powerline (2 3)) (mode-icons (0 1 0))) "Adaptive Status Bar / Mode Line" tar ((:url . "https://github.com/ergoemacs/ergoemacs-status") (:commit . "d952cc2361adf6eb4d6af60950ad4ab699c81320") (:revdesc . "d952cc2361ad"))])
+ (eri . [(20250328 1043) nil "Enhanced relative indentation (eri)" tar ((:url . "https://github.com/agda/agda") (:commit . "ad8ea74ccefd3507006a7ea9a7d9ff5b7a973603") (:revdesc . "ad8ea74ccefd"))])
+ (erlang . [(20260825 940) ((emacs (27 1))) "Major modes for editing and running Erlang" tar ((:url . "https://github.com/erlang/otp") (:commit . "9b155fcc2bc05efa1bc8aa05db540852151c5a11") (:revdesc . "9b155fcc2bc0") (:keywords "erlang" "languages" "processes"))])
+ (erlang-ts . [(20260410 717) ((emacs (29 2)) (erlang (27 2))) "Major modes for editing Erlang" tar ((:url . "https://github.com/erlang/emacs-erlang-ts") (:commit . "4e9095be49630dc279c70033245a7e1051614f92") (:revdesc . "4e9095be4963") (:keywords "erlang" "languages" "treesitter"))])
+ (erlstack-mode . [(20230608 909) ((emacs (25 1)) (dash (2 12 0))) "Minor mode for analysing Erlang stacktraces" tar ((:url . "https://github.com/k32/erlstack-mode") (:commit . "51e3cd10a2fe77eb8eb60643aba6f8178374b069") (:revdesc . "51e3cd10a2fe") (:keywords "tools" "erlang"))])
+ (eros . [(20251226 345) ((emacs (24 4))) "Evaluation Result OverlayS for Emacs Lisp" tar ((:url . "https://github.com/xiongtx/eros") (:commit . "66ee90baa3162fea028f5101ddcc370f7d1d4fcf") (:revdesc . "66ee90baa316") (:keywords "convenience" "lisp") (:authors ("Tianxiang Xiong" . "tianxiang.xiong@gmail.com")) (:maintainers ("Tianxiang Xiong" . "tianxiang.xiong@gmail.com")) (:maintainer "Tianxiang Xiong" . "tianxiang.xiong@gmail.com"))])
+ (eros-inspector . [(20240923 613) ((emacs (24 4)) (eros (0 1 0)) (inspector (0 38))) "Glue between eros and inspector" tar ((:url . "https://github.com/port19x/eros-inspector") (:commit . "c1625f553ec944883867f0975bff08f10dd3086f") (:revdesc . "c1625f553ec9") (:keywords "convenience" "lisp" "tool" "debugging" "development") (:authors ("port19" . "port19@port19.xyz")) (:maintainers ("port19" . "port19@port19.xyz")) (:maintainer "port19" . "port19@port19.xyz"))])
+ (ert-async . [(20200105 1031) ((emacs (24 1))) "Async support for ERT" tar ((:url . "https://github.com/rejeep/ert-async.el") (:commit . "948cf2faa10e085bda3739034ca5ea1912893433") (:revdesc . "948cf2faa10e") (:keywords "lisp" "test") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (ert-expectations . [(20121009 734) nil "The simplest unit test framework in the world" tar ((:url . "http://www.emacswiki.org/emacs/download/ert-expectations.el") (:commit . "aed70e002c4305b66aed7f6d0d48e9addd2dc1e6") (:revdesc . "aed70e002c43") (:keywords "test" "unittest" "ert" "expectations") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (ert-junit . [(20190802 2232) ((ert (0)) (emacs (23 4))) "JUnit XML reports from ert results" tar ((:url . "http://bitbucket.org/olanilsson/ert-junit") (:commit . "65f91c35b088b87943dbbbe7e1ce354bc9bc0992") (:revdesc . "65f91c35b088") (:keywords "tools" "test" "unittest" "ert") (:authors ("Ola Nilsson" . "ola.nilsson@gmail.com")) (:maintainers ("Ola Nilsson" . "ola.nilsson@gmail.com")) (:maintainer "Ola Nilsson" . "ola.nilsson@gmail.com"))])
+ (ert-modeline . [(20140115 1015) ((s (1 3 1)) (dash (1 2 0)) (emacs (24 1)) (projectile (0 9 1))) "Displays ert test results in the modeline" tar ((:url . "https://github.com/chrisbarrett/ert-modeline") (:commit . "7c6340834387f749519616f9601821cb73fd657b") (:revdesc . "7c6340834387") (:keywords "tools" "tests" "convenience") (:authors ("Chris Barrett" . "chris.d.barrett@me.com")) (:maintainers ("Chris Barrett" . "chris.d.barrett@me.com")) (:maintainer "Chris Barrett" . "chris.d.barrett@me.com"))])
+ (ert-results . [(20240108 1358) ((emacs (24 1))) "Filter ERT test results display" tar ((:url . "https://github.com/rswgnu/ert-results") (:commit . "32200a195f68c25a013497329d85ae0703ab475d") (:revdesc . "32200a195f68") (:keywords "lisp" "maint" "tools") (:authors ("Robert Weiner" . "rsw@gnu.org")) (:maintainers ("Robert Weiner" . "rsw@gnu.org")) (:maintainer "Robert Weiner" . "rsw@gnu.org"))])
+ (ert-runner . [(20231110 1358) ((s (1 6 1)) (dash (1 8 0)) (f (0 10 0)) (commander (0 2 0)) (ansi (0 1 0)) (shut-up (0 1 0))) "Opinionated Ert testing workflow" tar ((:url . "https://github.com/rejeep/ert-runner.el") (:commit . "98a5a6f683663f9f0357459d75ce1dc36c987e4a") (:revdesc . "98a5a6f68366") (:keywords "test") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (es-lib . [(20141111 1830) ((cl-lib (0 3))) "A collection of emacs utilities" tar ((:url . "https://github.com/sabof/es-lib") (:commit . "753b27363e39c10edc9e4e452bdbbbe4d190df4a") (:revdesc . "753b27363e39"))])
+ (es-mode . [(20260220 2147) ((dash (2 11 0)) (cl-lib (0 5)) (spark (1 0)) (s (1 11 0)) (request (0 3 0))) "A major mode for editing and executing Elasticsearch queries" tar ((:url . "http://www.github.com/dakrone/es-mode") (:commit . "cf93c9900057a9f3c89f982f778f41f48285d076") (:revdesc . "cf93c9900057") (:keywords "elasticsearch") (:authors ("Lee Hinman" . "lee@writequit.org")) (:maintainers ("Lee Hinman" . "lee@writequit.org")) (:maintainer "Lee Hinman" . "lee@writequit.org"))])
+ (es-windows . [(20140211 904) ((cl-lib (0 3)) (emacs (24))) "Window-management utilities" tar ((:url . "https://github.com/sabof/es-windows") (:commit . "7ebe6c6e0831373847d7adbedeaa2e506b54b2af") (:revdesc . "7ebe6c6e0831"))])
+ (esa . [(20180403 1525) ((cl-lib (0 5))) "Interface to esa.io" tar ((:url . "https://github.com/nabinno/esa.el") (:commit . "417e0ac55abe9b17e0b7165d0df26bc018aff42e") (:revdesc . "417e0ac55abe") (:keywords "tools" "esa") (:authors ("Nab Inno" . "nab@blahfe.com")) (:maintainers ("Nab Inno" . "nab@blahfe.com")) (:maintainer "Nab Inno" . "nab@blahfe.com"))])
+ (esb . [(20251208 653) ((emacs (27 1))) "Emacs Simple Bookmark" tar ((:url . "https://github.com/0xhenrique/esb") (:commit . "3646ddab71ede860257182a7e772aad476533d39") (:revdesc . "3646ddab71ed") (:authors ("Henrique Marques" . "hm2030master@proton.me")) (:maintainers ("Henrique Marques" . "hm2030master@proton.me")) (:maintainer "Henrique Marques" . "hm2030master@proton.me"))])
+ (eselect-news . [(20260222 1216) ((emacs (27 1))) "Read Gentoo eselect news" tar ((:url . "https://gitlab.com/cestrand/emacs-eselect-news") (:commit . "562191c013a20348bd1adbf3be564c6e1d3c52b6") (:revdesc . "562191c013a2") (:keywords "gentoo" "convenience") (:authors ("Marcin Kolenda" . "https://gitlab.com/cestrand")) (:maintainers ("Marcin Kolenda" . "https://gitlab.com/cestrand")) (:maintainer "Marcin Kolenda" . "https://gitlab.com/cestrand"))])
+ (esh-autosuggest . [(20260530 527) ((emacs (24 4)) (company (0 9 4))) "History autosuggestions for eshell" tar ((:url . "https://sr.ht/~dieggsy/esh-autosuggest") (:commit . "40774022105ed16287fcf26553a16c4cdda5e1ab") (:revdesc . "40774022105e") (:keywords "completion" "company" "matching" "convenience" "abbrev") (:authors ("Diego A. Mundo" . "dieggsy@pm.me")) (:maintainers ("Diego A. Mundo" . "dieggsy@pm.me")) (:maintainer "Diego A. Mundo" . "dieggsy@pm.me"))])
+ (esh-buf-stack . [(20140107 1018) nil "Add a buffer stack feature to Eshell" tar ((:url . "https://github.com/tom-tan/esh-buf-stack") (:commit . "ea5da9ce8566ffe2e013f0e588701cb0825258b6") (:revdesc . "ea5da9ce8566") (:keywords "eshell" "extensions") (:authors ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainers ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainer "Tomoya Tanjo" . "ttanjo@gmail.com"))])
+ (esh-help . [(20190905 22) ((dash (1 4 0))) "Add some help functions and support for Eshell" tar ((:url . "https://github.com/tom-tan/esh-help/") (:commit . "417673ed18a983930a66a6692dbfb288a995cb80") (:revdesc . "417673ed18a9") (:keywords "eshell" "extensions") (:authors ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainers ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainer "Tomoya Tanjo" . "ttanjo@gmail.com"))])
+ (eshell-atuin . [(20260222 802) ((emacs (27 1)) (compat (29 1 4 1))) "Integrate eshell with atuin, a shell history tool" tar ((:url . "https://github.com/SqrtMinusOne/eshell-atuin") (:commit . "142536a01a9d6d92d802e41474c290e0ca655deb") (:revdesc . "142536a01a9d") (:authors ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainers ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainer "Korytov Pavel" . "thexcloud@gmail.com"))])
+ (eshell-autojump . [(20201117 235) nil "Autojump command for Eshell" tar ((:url . "https://github.com/coldnew/eshell-autojump") (:commit . "c1056bfc6b46646ae1e606247689fef9aee621af") (:revdesc . "c1056bfc6b46") (:maintainers ("Lee" . "coldnew.tw@gmail.com")) (:maintainer "Lee" . "coldnew.tw@gmail.com"))])
+ (eshell-bookmark . [(20170922 1514) ((emacs (24 3))) "Integrate bookmarks with eshell" tar ((:url . "https://github.com/Fuco1/eshell-bookmark") (:commit . "deda4b848b2fb979dbe73ead2cb866610e3596ed") (:revdesc . "deda4b848b2f") (:keywords "convenience" "files") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (eshell-command-not-found . [(20260408 844) ((emacs (25 1))) "Integrate command-not-found in eshell" tar ((:url . "https://github.com/jaeyeom/eshell-command-not-found") (:commit . "b50003d36f63c8520f85fcbdfb0cefa7bd170db6") (:revdesc . "b50003d36f63") (:keywords "convenience") (:authors ("Jaehyun Yeom" . "jae.yeom@gmail.com")) (:maintainers ("Jaehyun Yeom" . "jae.yeom@gmail.com")) (:maintainer "Jaehyun Yeom" . "jae.yeom@gmail.com"))])
+ (eshell-did-you-mean . [(20211104 237) ((emacs (24 1)) (cl-lib (0 5))) "Command not found (\"did you mean…\" feature) in Eshell" tar ((:url . "https://github.com/xuchunyang/eshell-did-you-mean") (:commit . "80cd8c4b186a2fb29621cf634bcf2bcd914f1e3d") (:revdesc . "80cd8c4b186a") (:keywords "eshell") (:authors ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang56@gmail.com"))])
+ (eshell-fixed-prompt . [(20250414 914) ((emacs (25)) (s (1 11 0))) "Restrict eshell to a single fixed prompt" tar ((:url . "https://github.com/mallt/eshell-fixed-prompt-mode") (:commit . "f495a7bdf0f5da87e9eb3021862aa8e2ec578948") (:revdesc . "f495a7bdf0f5") (:authors ("Tijs Mallaerts" . "tijs.mallaerts@gmail.com")) (:maintainers ("Tijs Mallaerts" . "tijs.mallaerts@gmail.com")) (:maintainer "Tijs Mallaerts" . "tijs.mallaerts@gmail.com"))])
+ (eshell-fringe-status . [(20170117 2316) nil "Show last status in fringe" tar ((:url . "http://projects.ryuslash.org/eshell-fringe-status/") (:commit . "adc6997c68e39c0d52a2af1b2fd5cf2057783797") (:revdesc . "adc6997c68e3") (:authors ("Tom Willemse" . "tom@ryuslash.org")) (:maintainers ("Tom Willemse" . "tom@ryuslash.org")) (:maintainer "Tom Willemse" . "tom@ryuslash.org"))])
+ (eshell-git-prompt . [(20220830 2000) ((emacs (24 1)) (cl-lib (0 5)) (dash (2 11 0))) "Some Eshell prompt for Git users" tar ((:url . "https://github.com/xuchunyang/eshell-git-prompt") (:commit . "dfcf9cd93add6763e2c46603b0323274d4c22906") (:revdesc . "dfcf9cd93add") (:keywords "eshell" "git") (:authors ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainers ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainer "Chunyang Xu" . "mail@xuchunyang.me"))])
+ (eshell-info-banner . [(20220728 1006) ((emacs (25 1)) (s (1))) "System information as your Eshell banner" tar ((:url . "https://github.com/Phundrak/eshell-info-banner.el") (:commit . "987e69a66276ca057798896c606e5c5d5fb9ee5c") (:revdesc . "987e69a66276") (:authors ("Lucien Cartier-Tilet" . "lucien@phundrak.com")) (:maintainers ("Lucien Cartier-Tilet" . "lucien@phundrak.com")) (:maintainer "Lucien Cartier-Tilet" . "lucien@phundrak.com"))])
+ (eshell-outline . [(20201121 620) ((emacs (25 1))) "Enhanced outline-mode for Eshell" tar ((:url . "https://git.jamzattack.xyz/eshell-outline") (:commit . "6f917afa5b3d36764d76d7864589094647d8c3b4") (:revdesc . "6f917afa5b3d") (:keywords "unix" "eshell" "outline" "convenience") (:authors ("Jamie Beardslee" . "jdb@jamzattack.xyz")) (:maintainers ("Jamie Beardslee" . "jdb@jamzattack.xyz")) (:maintainer "Jamie Beardslee" . "jdb@jamzattack.xyz"))])
+ (eshell-prompt-extras . [(20260402 1141) ((emacs (25))) "Display extra information for your eshell prompt" tar ((:url . "https://github.com/zwild/eshell-prompt-extras") (:commit . "36504072605a2044cf291d1c2ea987cb898c6394") (:revdesc . "36504072605a") (:keywords "eshell" "prompt") (:authors ("zwild" . "judezhao@outlook.com")) (:maintainers ("Xu Chunyang" . "xuchunyang56@gmail.com")) (:maintainer "Xu Chunyang" . "xuchunyang56@gmail.com"))])
+ (eshell-syntax-highlighting . [(20241222 2030) ((emacs (25 1))) "Highlight eshell commands" tar ((:url . "https://github.com/akreisher/eshell-syntax-highlighting") (:commit . "62418fd8b2380114a3f6dad699c1ba45329db1d2") (:revdesc . "62418fd8b238") (:keywords "convenience") (:authors ("Alex Kreisher" . "akreisher18@gmail.com")) (:maintainers ("Alex Kreisher" . "akreisher18@gmail.com")) (:maintainer "Alex Kreisher" . "akreisher18@gmail.com"))])
+ (eshell-toggle . [(20250513 1742) ((emacs (25 1)) (dash (2 11 0))) "Show/hide eshell under active window" tar ((:url . "https://github.com/4da/eshell-toggle") (:commit . "04e501e02c475bd9067eebcf8807c951f2316194") (:revdesc . "04e501e02c47") (:keywords "processes") (:authors ("Dmitry Cherkassov" . "dcherkassov@gmail.com")) (:maintainers ("Dmitry Cherkassov" . "dcherkassov@gmail.com")) (:maintainer "Dmitry Cherkassov" . "dcherkassov@gmail.com"))])
+ (eshell-up . [(20240226 1747) ((emacs (24))) "Quickly go to a specific parent directory in eshell" tar ((:url . "https://github.com/peterwvj/eshell-up") (:commit . "1999afaa509204b780db44e99ac9648fe7d92d32") (:revdesc . "1999afaa5092") (:keywords "eshell") (:authors ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainers ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainer "Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com"))])
+ (eshell-vterm . [(20240305 1149) ((emacs (27 1)) (vterm (0 0 1))) "Vterm for visual commands in eshell" tar ((:url . "https://github.com/iostapyshyn/eshell-vterm") (:commit . "20f4b246fa605a1533cdfbe3cb7faf31a24e3d2e") (:revdesc . "20f4b246fa60") (:keywords "eshell" "vterm" "terminals" "shell" "visual" "tools" "processes") (:authors ("Illia Ostapyshyn" . "ilya.ostapyshyn@gmail.com")) (:maintainers ("Illia Ostapyshyn" . "ilya.ostapyshyn@gmail.com")) (:maintainer "Illia Ostapyshyn" . "ilya.ostapyshyn@gmail.com"))])
+ (eshell-z . [(20191116 333) ((cl-lib (0 5))) "Cd to frequent directory in eshell" tar ((:url . "https://github.com/xuchunyang/eshell-z") (:commit . "337cb241e17bd472bd3677ff166a0800f684213c") (:revdesc . "337cb241e17b") (:keywords "convenience") (:authors ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainers ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainer "Chunyang Xu" . "mail@xuchunyang.me"))])
+ (eslint-disable-rule . [(20230904 1821) ((emacs (27 2))) "Commands to add JS comments disabling eslint rules" tar ((:url . "https://github.com/DamienCassou/eslint-disable-rule") (:commit . "54771405e09e2cf5cb8f47aab2818e77d3046f53") (:revdesc . "54771405e09e") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (eslint-fix . [(20211005 221) nil "Fix JavaScript files using ESLint" tar ((:url . "https://github.com/codesuki/eslint-fix") (:commit . "636bf8d8797bdd58f1b543c9d3f4910e3ce879ab") (:revdesc . "636bf8d8797b") (:keywords "tools" "javascript" "eslint" "lint" "formatting" "style") (:authors ("Neri Marschik" . "marschik_neri@cyberagent.co.jp")) (:maintainers ("Neri Marschik" . "marschik_neri@cyberagent.co.jp")) (:maintainer "Neri Marschik" . "marschik_neri@cyberagent.co.jp"))])
+ (eslint-rc . [(20220328 800) ((emacs (24 3)) (eslint-fix (0 1 0))) "Use local rc rules with ESLint" tar ((:url . "https://github.com/jjuliano/eslint-rc-emacs") (:commit . "eb6f3e715792952bc957d5dc8ab1a607f3dbbd55") (:revdesc . "eb6f3e715792") (:keywords "convenience" "edit" "js" "ts" "rc" "eslintrc" "eslint-rc" "eslint" "eslint-fix") (:authors ("Joel Bryan Juliano" . "joelbryandotjulianoatgmaildotcom")) (:maintainers ("Joel Bryan Juliano" . "joelbryandotjulianoatgmaildotcom")) (:maintainer "Joel Bryan Juliano" . "joelbryandotjulianoatgmaildotcom"))])
+ (eslintd-fix . [(20240224 1517) ((dash (2 12 0)) (emacs (26 3))) "Use eslint_d to automatically fix js files" tar ((:url . "https://github.com/aaronjensen/eslintd-fix") (:commit . "99665b66686cc5974499cec4aff1e29faef1c028") (:revdesc . "99665b66686c") (:authors ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainers ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainer "Aaron Jensen" . "aaronjensen@gmail.com"))])
+ (esmond-theme . [(20230526 124) nil "Esmond dark theme" tar ((:url . "https://github.com/xcatalyst/esmond-theme") (:commit . "22b414599fbda46f90a210e846ca64b8427dd3f2") (:revdesc . "22b414599fbd") (:authors ("ağan Korkmaz" . "cagankorkmaz35@gmail.com")) (:maintainers ("ağan Korkmaz" . "cagankorkmaz35@gmail.com")) (:maintainer "ağan Korkmaz" . "cagankorkmaz35@gmail.com"))])
+ (esonify . [(20190110 1621) ((deferred (0 3 1)) (cl-lib (0 5))) "Sonify your code" tar ((:url . "https://github.com/oflatt/esonify") (:commit . "bdc79d4ab2e3c449b5bef46e5cabc552beeed5c6") (:revdesc . "bdc79d4ab2e3") (:authors ("Oliver Flatt" . "oflatt@gmail.com")) (:maintainers ("Oliver Flatt" . "oflatt@gmail.com")) (:maintainer "Oliver Flatt" . "oflatt@gmail.com"))])
+ (espotify . [(20220121 2057) ((emacs (26 1))) "Spotify access library" tar ((:url . "https://codeberg.org/jao/espotify") (:commit . "ea6d6021e5acc550560325db2f09198839ee702f") (:revdesc . "ea6d6021e5ac") (:keywords "multimedia") (:authors ("Jose A Ortega Ruiz" . "jao@gnu.org")))])
+ (espresso-theme . [(20210505 1957) nil "Espresso Tutti Colori port for Emacs" tar ((:url . "https://github.com/dgutov/espresso-theme") (:commit . "580f673729f02aa07070c5300bedf24733d56e74") (:revdesc . "580f673729f0") (:authors ("Martin Kühl" . "purl.org/net/mkhl")) (:maintainers ("Martin Kühl" . "purl.org/net/mkhl")) (:maintainer "Martin Kühl" . "purl.org/net/mkhl"))])
+ (espuds . [(20230218 910) ((emacs (25)) (s (1 7 0)) (dash (2 2 0)) (f (0 12 1))) "Ecukes step definitions" tar ((:url . "https://github.com/ecukes/espuds") (:commit . "57c18a48f1a01d8174298eaab4fcf3b2c6549291") (:revdesc . "57c18a48f1a0") (:keywords "test") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (espy . [(20250417 1352) ((emacs (24))) "Emacs Simple Password Yielder" tar ((:url . "https://github.com/walseb/espy") (:commit . "f58049ed86798b6cb7f462e0a71bf3ecb1f0f9e5") (:revdesc . "f58049ed8679") (:keywords "convenience") (:authors ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainers ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainer "Sebastian Wålinder" . "s.walinder@gmail.com"))])
+ (esqlite . [(20151206 1206) ((pcsv (1 3 3))) "Manipulate sqlite file from Emacs" tar ((:url . "https://github.com/mhayashi1120/Emacs-esqlite") (:commit . "fae9826cbc255b0f0686a801288f1441bda5f631") (:revdesc . "fae9826cbc25") (:keywords "data") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (esqlite-helm . [(20151116 850) ((esqlite (0 2 0)) (helm (20131207 845))) "Define helm source for sqlite database" tar ((:url . "https://github.com/mhayashi1120/Emacs-esqlite") (:commit . "84d5b16198f30949c544affba751ee0d58a000d9") (:revdesc . "84d5b16198f3") (:keywords "data") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (ess . [(20260818 1451) ((emacs (25 1))) "Emacs Speaks Statistics" tar ((:url . "https://ess.r-project.org/") (:commit . "369a84876c42567ff01627c1b9df0750a727056b") (:revdesc . "369a84876c42") (:authors ("David Smith" . "dsmith@stats.adelaide.edu.au") ("A.J. Rossini" . "blindglobe@gmail.com") ("Richard M. Heiberger" . "rmh@temple.edu") ("Kurt Hornik" . "Kurt.Hornik@R-project.org") ("Martin Maechler" . "maechler@stat.math.ethz.ch") ("Rodney A. Sparapani" . "rsparapa@mcw.edu") ("Stephen Eglen" . "stephen@gnu.org") ("Sebastian P. Luque" . "spluque@gmail.com") ("Henning Redestig" . "henning.red@googlemail.com") ("Vitalie Spinu" . "spinuvit@gmail.com") ("Lionel Henry" . "lionel.hry@gmail.com") ("J. Alexander Branham" . "alex.branham@gmail.com")) (:maintainers ("ESS Core Team" . "ESS-core@r-project.org")) (:maintainer "ESS Core Team" . "ESS-core@r-project.org"))])
+ (ess-R-data-view . [(20130509 1158) ((ctable (20130313 1743)) (popup (20130324 1305)) (ess (20130225 1754))) "Data viewer for GNU R" tar ((:url . "https://github.com/myuhe/ess-R-data-view.el") (:commit . "d6e98d3ae1e2a2ea39a56eebcdb73e99d29562e9") (:revdesc . "d6e98d3ae1e2") (:keywords "convenience") (:authors ("myuhe" . "yuhei.maeda_at_gmail.com")))])
+ (ess-r-insert-obj . [(20220610 1406) ((emacs (26 1)) (ess (18 10 1))) "Insert objects in ESS-R" tar ((:url . "https://github.com/ShuguangSun/ess-r-insert-obj") (:commit . "2ded9c23d0af2a7f6c0e02f9ea4af0e5b3cb7fb4") (:revdesc . "2ded9c23d0af") (:keywords "tools") (:authors ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainers ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainer "Shuguang Sun" . "shuguang79@qq.com"))])
+ (ess-smart-equals . [(20210411 1333) ((emacs (25 1)) (ess (18 10))) "Flexible, context-sensitive assignment key for R/S" tar ((:url . "https://github.com/genovese/ess-smart-equals") (:commit . "fea9eea4b59c3e9559b379508e3500076ca99ef1") (:revdesc . "fea9eea4b59c") (:keywords "r" "s" "ess" "convenience") (:authors ("Christopher R. Genovese" . "genovese@cmu.edu")) (:maintainers ("Christopher R. Genovese" . "genovese@cmu.edu")) (:maintainer "Christopher R. Genovese" . "genovese@cmu.edu"))])
+ (ess-smart-underscore . [(20190309 101) ((ess (0))) "Ess Smart Underscore" tar ((:url . "https://github.com/mlf176f2/ess-smart-underscore.el") (:commit . "aa871c5b0448515db439ea9bed6a8574e82ddb47") (:revdesc . "aa871c5b0448") (:keywords "ess" "underscore"))])
+ (ess-view . [(20250409 2120) ((ess (15)) (s (1 8 0)) (f (0 16 0))) "View R dataframes in a spreadsheet software" tar ((:url . "https://github.com/GioBo/ess-view") (:commit . "82df032e6e367e7f587e6131925c0a349c685f93") (:revdesc . "82df032e6e36") (:keywords "extensions" "ess") (:authors ("Bocci Gionata" . "boccigionata@gmail.com")) (:maintainers ("Bocci Gionata" . "boccigionata@gmail.com")) (:maintainer "Bocci Gionata" . "boccigionata@gmail.com"))])
+ (ess-view-data . [(20260816 1321) ((emacs (26 1)) (ess (18 10 1)) (csv-mode (1 12)) (transient (0 3 7))) "View Data" tar ((:url . "https://github.com/ShuguangSun/ess-view-data") (:commit . "831be384d0045ae9ff1f4b8ae2b5090377938475") (:revdesc . "831be384d004") (:keywords "tools") (:authors ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainers ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainer "Shuguang Sun" . "shuguang79@qq.com"))])
+ (essgd . [(20240929 2107) ((websocket (1 15)) (ess (24 1 1)) (emacs (29 1))) "Show R plots from ESS within a buffer" tar ((:url . "https://github.com/sje30/essgd") (:commit . "d9a3729ebaeeeec78984f00508cf2785bc7e8978") (:revdesc . "d9a3729ebaee") (:authors ("Stephen Eglen" . "sje30@cam.ac.uk")) (:maintainers ("Stephen Eglen" . "sje30@cam.ac.uk")) (:maintainer "Stephen Eglen" . "sje30@cam.ac.uk"))])
+ (esup . [(20220202 2335) ((cl-lib (0 5)) (s (1 2)) (emacs (25 1))) "The Emacs StartUp Profiler (ESUP)" tar ((:url . "https://github.com/jschaf/esup") (:commit . "4b49c8d599d4cc0fbf994e9e54a9c78e5ab62a5f") (:revdesc . "4b49c8d599d4") (:keywords "convenience" "processes") (:authors ("Joe Schafer" . "joe@jschaf.com")) (:maintainers ("Serghei Iakovlev" . "egrep@protonmail.ch")) (:maintainer "Serghei Iakovlev" . "egrep@protonmail.ch"))])
+ (esxml . [(20260329 1617) ((emacs (24 1)) (cl-lib (0 5))) "Library for working with xml via esxml and sxml" tar ((:url . "https://github.com/tali713/esxml") (:commit . "35940903049f05858d2519c9d8316d00bc228953") (:revdesc . "35940903049f") (:keywords "tools" "lisp" "comm") (:authors ("Vanya Izaksonas-Smith" . "izak0002atumndotedu")))])
+ (eta . [(20210115 1655) ((emacs (25 1)) (ht (2 2)) (dash (2 17))) "Standard and multi dispatch key bind" tar ((:url . "https://www.github.com/zcaudate/eta") (:commit . "651f96c46eeb7ff8a0f0efcfacad5b4d25bfaa4b") (:revdesc . "651f96c46eeb") (:keywords "convenience" "usability"))])
+ (etc-sudoers-mode . [(20260224 326) ((sudo-edit (0)) (with-editor (0))) "Edit Sudo security policies" tar ((:url . "https://gitlab.com/mavit/etc-sudoers-mode/") (:commit . "400b4d4d7281b33896d388e84dec6b7a2c39ea22") (:revdesc . "400b4d4d7281") (:keywords "languages") (:authors ("Peter Oliver" . "git@mavit.org.uk")) (:maintainers ("Peter Oliver" . "git@mavit.org.uk")) (:maintainer "Peter Oliver" . "git@mavit.org.uk"))])
+ (etd . [(20230711 547) ((emacs (24 4))) "Examples to Tests and Docs" tar ((:url . "https://github.com/emacsfodder/kurecolor") (:commit . "65f713935c9d2598f6fa4674bf2bdac2169005a9") (:revdesc . "65f713935c9d") (:keywords "lisp" "tools" "extensions") (:authors ("Jason M23" . "jasonm23@gmail.com")) (:maintainers ("Jason M23" . "jasonm23@gmail.com")) (:maintainer "Jason M23" . "jasonm23@gmail.com"))])
+ (eterm-256color . [(20260530 531) ((emacs (24 4)) (xterm-color (1 7)) (f (0 19 0))) "Customizable 256 colors for term" tar ((:url . "https://sr.ht/~dieggsy/eterm-256color") (:commit . "868eeaa958de1deab690fe8ac8f5477452ccdb6a") (:revdesc . "868eeaa958de") (:keywords "faces") (:authors ("Diego A. Mundo" . "dieggsy@pm.me")) (:maintainers ("Diego A. Mundo" . "dieggsy@pm.me")) (:maintainer "Diego A. Mundo" . "dieggsy@pm.me"))])
+ (eterm-fn . [(20250110 1354) ((emacs (25))) "Function (F1--F12) keys for term" tar ((:url . "https://github.com/oitofelix/eterm-fn") (:commit . "b5d433fedc030046ea0e4a217f4dd3846a113fe4") (:revdesc . "b5d433fedc03") (:keywords "terminals") (:authors ("Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org")) (:maintainers ("Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org")) (:maintainer "Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org"))])
+ (ethan-wspace . [(20201106 2059) nil "Whitespace customizations for emacs" tar ((:url . "https://github.com/glasserc/ethan-wspace") (:commit . "035c7d698c99e3891a522d6e6f8fde23c6267c15") (:revdesc . "035c7d698c99") (:keywords "whitespace" "tab" "newline" "trailing" "clean") (:authors ("Ethan Glasser-Camp" . "ethan@betacantrips.com")) (:maintainers ("Ethan Glasser-Camp" . "ethan@betacantrips.com")) (:maintainer "Ethan Glasser-Camp" . "ethan@betacantrips.com"))])
+ (etherpad . [(20230530 1248) ((emacs (27 1)) (request (0 3)) (let-alist (0 0)) (websocket (1 12)) (parsec (0 1)) (0xc (0 1))) "Interface to the Etherpad API" tar ((:url . "https://github.com/zzkt/ethermacs") (:commit . "29409bf9ff05b74d942c1cd7a421eeec2ef96e49") (:revdesc . "29409bf9ff05") (:keywords "comm" "etherpad" "collaborative editing") (:authors ("nik gaffney" . "nik@fo.am")) (:maintainers ("nik gaffney" . "nik@fo.am")) (:maintainer "nik gaffney" . "nik@fo.am"))])
+ (euslisp-mode . [(20250823 1454) ((emacs (28 1)) (s (1 9)) (exec-path-from-shell (1 0)) (helm (3 0))) "Major mode for Euslisp-formatted text" tar ((:url . "https://github.com/iory/euslisp-mode") (:commit . "bf74f683f3b0e127bf2c0e8082fe097e897cd572") (:revdesc . "bf74f683f3b0") (:keywords "languages" "lisp") (:authors ("iory" . "ab.ioryz@gmail.com")) (:maintainers ("iory" . "ab.ioryz@gmail.com")) (:maintainer "iory" . "ab.ioryz@gmail.com"))])
+ (eval-expr . [(20120619 647) nil "Enhanced eval-expression command" tar ((:url . "https://github.com/jwiegley/eval-expr") (:commit . "a0e69e83de41df8dbccefc1962ab4f02206a3328") (:revdesc . "a0e69e83de41") (:keywords "lisp" "extensions") (:authors ("Noah Friedman" . "friedman@splode.com")) (:maintainers (nil . "friedman@splode.com")) (:maintainer nil . "friedman@splode.com"))])
+ (eval-in-repl . [(20230805 2125) ((dash (0)) (paredit (0)) (ace-window (0))) "Consistent ESS-like eval interface for various REPLs" tar ((:url . "https://github.com/kaz-yos/eval-in-repl") (:commit . "a57c6a790c0ca72b0d1218b837d3114ef874dd1f") (:revdesc . "a57c6a790c0c") (:keywords "tools" "convenience") (:authors ("Kazuki YOSHIDA" . "kazukiyoshida@mail.harvard.edu")) (:maintainers ("Kazuki YOSHIDA" . "kazukiyoshida@mail.harvard.edu")) (:maintainer "Kazuki YOSHIDA" . "kazukiyoshida@mail.harvard.edu"))])
+ (eval-sexp-fu . [(20191128 825) ((cl-lib (0))) "Tiny functionality enhancements for evaluating sexps" tar ((:url . "https://github.com/hchbaw/eval-sexp-fu.el") (:commit . "36d2fe3bcf602e15ca10a7f487da103515ef391a") (:revdesc . "36d2fe3bcf60") (:keywords "lisp" "highlight" "convenience") (:authors ("Takeshi Banse" . "takebi@laafc.net")) (:maintainers ("Takeshi Banse" . "takebi@laafc.net")) (:maintainer "Takeshi Banse" . "takebi@laafc.net"))])
+ (evalator . [(20160213 128) ((helm-core (1 9 1))) "Package for interactive transformation of data with helm" tar ((:url . "http://www.github.com/seanirby/evalator") (:commit . "f30da4da48c0b3f3cfa1fc1c7cfdb53ffe79df36") (:revdesc . "f30da4da48c0") (:keywords "languages" "elisp" "helm") (:maintainers ("Sean Irby" . "sean.t.irby@gmail.com")) (:maintainer "Sean Irby" . "sean.t.irby@gmail.com"))])
+ (evalator-clojure . [(20160208 2148) ((cider (0 10 0)) (evalator (1 0 0))) "Clojure evaluation context for evalator via CIDER" tar ((:url . "http://www.github.com/seanirby/evalator-clojure") (:commit . "caa4e0a137bdfada86593128a654e16aa617ad50") (:revdesc . "caa4e0a137bd") (:keywords "languages" "clojure" "cider" "helm") (:maintainers ("Sean Irby" . "sean.t.irby@gmail.com")) (:maintainer "Sean Irby" . "sean.t.irby@gmail.com"))])
+ (evangelion-theme . [(20241116 1036) ((emacs (27 1))) "A dark colour scheme inspired by Neon Genesis Evangelion" tar ((:url . "https://github.com/crmsnbleyd/evangelion-theme") (:commit . "89577330e93f1c11b3e75d1c8bbae6accc18fc48") (:revdesc . "89577330e93f") (:keywords "faces" "theme") (:authors ("Andrew Jose" . "mail@drewsh.com")) (:maintainers ("Andrew Jose" . "mail@drewsh.com")) (:maintainer "Andrew Jose" . "mail@drewsh.com"))])
+ (eve-mode . [(20170822 2231) ((emacs (25)) (polymode (1 0)) (markdown-mode (2 0))) "Major mode for editing Eve documents" tar ((:url . "https://github.com/witheve/emacs-eve-mode") (:commit . "a4661114d9c18725691b76321d72167ca5a9070a") (:revdesc . "a4661114d9c1") (:keywords "languages" "wp" "tools") (:authors ("Joshua Cole" . "joshuafcole@gmail.com")) (:maintainers ("Joshua Cole" . "joshuafcole@gmail.com")) (:maintainer "Joshua Cole" . "joshuafcole@gmail.com"))])
+ (evenok . [(20260221 2125) ((emacs (28 1))) "Themes with perceptively evenly distributed colors" tar ((:url . "https://codeberg.org/mekeor/evenok") (:commit . "6b5e3c10d3649be6ea9df5cc369d8a4d4a03f3aa") (:revdesc . "6b5e3c10d364") (:keywords "faces" "theme") (:authors ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainers ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainer "Mekeor Melire" . "mekeor@posteo.de"))])
+ (everlasting-scratch . [(20260713 605) ((emacs (26 1))) "The *scratch* that lasts forever" tar ((:url . "https://github.com/beacoder/everlasting-scratch") (:commit . "4180fd04183a24de44a920cc02ac5a3bbf23643f") (:revdesc . "4180fd04183a") (:keywords "convenience" "tool") (:authors ("Huming Chen" . "chenhuming@gmail.com")) (:maintainers ("Huming Chen" . "chenhuming@gmail.com")) (:maintainer "Huming Chen" . "chenhuming@gmail.com"))])
+ (evil . [(20260728 1438) ((emacs (24 1)) (cl-lib (0 5)) (goto-chg (1 6)) (nadvice (0 3))) "Extensible vi layer" tar ((:url . "https://github.com/emacs-evil/evil") (:commit . "6a3e1ddd04ac504a016590940d0af2a3361b9efd") (:revdesc . "6a3e1ddd04ac") (:keywords "emulations") (:maintainers ("Tom Dalziel" . "tom.dalziel@gmail.com")) (:maintainer "Tom Dalziel" . "tom.dalziel@gmail.com"))])
+ (evil-anzu . [(20250316 1617) ((evil (1 0 0)) (anzu (0 46))) "Anzu for evil-mode" tar ((:url . "https://github.com/syohex/emacs-evil-anzu") (:commit . "7309650425797420944075c9c1556c7c1ff960b3") (:revdesc . "730965042579") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com") ("Fredrik Bergroth" . "fbergroth@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com") ("Fredrik Bergroth" . "fbergroth@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (evil-args . [(20240210 504) ((evil (1 0 8))) "Motions and text objects for delimited arguments in Evil" tar ((:url . "https://github.com/wcsmith/evil-args") (:commit . "a8151556f63c9d45d0c44c8a7ef9e5a542f3cdc7") (:revdesc . "a8151556f63c") (:keywords "evil" "vim-emulation") (:authors ("Connor Smith" . "wconnorsmith@gmail.com")) (:maintainers ("Connor Smith" . "wconnorsmith@gmail.com")) (:maintainer "Connor Smith" . "wconnorsmith@gmail.com"))])
+ (evil-avy . [(20150908 748) ((emacs (24 1)) (cl-lib (0 5)) (avy (0 3 0)) (evil (1 2 3))) "Set-based completion" tar ((:url . "https://github.com/louy2/evil-avy") (:commit . "2dd955cc3ecaa7ddeb67b295298abdc6d16dd3a5") (:revdesc . "2dd955cc3eca") (:keywords "point" "location" "evil" "vim") (:authors ("Yufan Lou" . "loganlyf@gmail.com")) (:maintainers ("Yufan Lou" . "loganlyf@gmail.com")) (:maintainer "Yufan Lou" . "loganlyf@gmail.com"))])
+ (evil-better-visual-line . [(20200123 2045) ((evil (1 2 13))) "Gj and gk visual line mode fix" tar ((:url . "https://github.com/yourfin/evil-better-visual-line") (:commit . "7a65dfb17ab93857eb4c7a39d4018d9399705293") (:revdesc . "7a65dfb17ab9") (:keywords "evil" "vim" "motion") (:authors (nil . "nuckollspatgmail.com")) (:maintainers (nil . "nuckollspatgmail.com")) (:maintainer nil . "nuckollspatgmail.com"))])
+ (evil-cleverparens . [(20250518 1741) ((evil (1 0)) (paredit (1)) (smartparens (1 6 1)) (emacs (24 4)) (dash (2 12 0))) "Evil friendly minor-mode for editing lisp" tar ((:url . "https://github.com/emacs-evil/evil-cleverparens") (:commit . "4c413a132934695b975004d429b0b0a6e3d8ca38") (:revdesc . "4c413a132934") (:keywords "convenience" "emulations") (:authors ("Olli Piepponen" . "opieppo@gmail.com")) (:maintainers ("Olli Piepponen" . "opieppo@gmail.com")) (:maintainer "Olli Piepponen" . "opieppo@gmail.com"))])
+ (evil-colemak-basics . [(20260619 1649) ((emacs (28 1)) (evil (1 15 0)) (evil-snipe (2 1 3))) "Basic Colemak key bindings for evil-mode" tar ((:url . "https://github.com/wbolster/evil-colemak-basics") (:commit . "70a08ff4c8148c38e0cdc2b89b0316fd504501f6") (:revdesc . "70a08ff4c814") (:keywords "convenience" "emulations" "colemak" "evil") (:authors ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "wouter bolsterlee" . "wouter@bolsterl.ee"))])
+ (evil-colemak-minimal . [(20171006 1317) ((emacs (24)) (evil (1 2 12))) "Minimal Colemak key bindings for evil-mode" tar ((:url . "https://github.com/bmallred/evil-colemak-minimal") (:commit . "6d98b6da60f414524a0d718f76024c26dce742b3") (:revdesc . "6d98b6da60f4") (:keywords "colemak" "evil") (:authors ("Bryan Allred" . "bryan@revolvingcow.com")) (:maintainers ("Bryan Allred" . "bryan@revolvingcow.com")) (:maintainer "Bryan Allred" . "bryan@revolvingcow.com"))])
+ (evil-collection . [(20260818 145) ((emacs (29 1)) (evil (1 2 13))) "A set of keybindings for Evil mode" tar ((:url . "https://github.com/emacs-evil/evil-collection") (:commit . "0a9a4c46e274584f66a2e0c313819697c0ab0d2d") (:revdesc . "0a9a4c46e274") (:keywords "evil" "tools") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (evil-commentary . [(20230610 1006) ((evil (1 0 0))) "Comment stuff out. A port of vim-commentary" tar ((:url . "https://github.com/linktohack/evil-commentary") (:commit . "c5945f28ce47644c828aac1f5f6ec335478d17fb") (:revdesc . "c5945f28ce47") (:keywords "evil" "comment" "commentary" "evil-commentary") (:authors ("Quang Linh LE" . "linktohack@gmail.com")) (:maintainers ("Quang Linh LE" . "linktohack@gmail.com")) (:maintainer "Quang Linh LE" . "linktohack@gmail.com"))])
+ (evil-dvorak . [(20160416 1841) ((evil (1 0 8))) "Evil keybindings for that work with dvorak mode" tar ((:url . "https://github.com/jbranso/evil-dvorak") (:commit . "e7b80077d6f332452049eb3d7ea51f6c8fbf5947") (:revdesc . "e7b80077d6f3") (:keywords "dvorak" "evil" "vim"))])
+ (evil-easymotion . [(20260602 2314) ((emacs (24)) (avy (0 3 0)) (cl-lib (0 5)) (evil (1 2 13))) "A port of vim's easymotion to emacs" tar ((:url . "https://github.com/pythonnut/evil-easymotion") (:commit . "629c894af63336028a61cc93d6465d10837eb82b") (:revdesc . "629c894af633") (:keywords "convenience" "evil") (:authors ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainers ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainer "PythonNut" . "pythonnut@pythonnut.com"))])
+ (evil-embrace . [(20230820 445) ((emacs (24 4)) (embrace (0 1 0)) (evil-surround (0))) "Evil integration of embrace.el" tar ((:url . "https://github.com/cute-jumper/evil-embrace.el") (:commit . "3081d37811b6a3dfaaf01d578c7ab7a746c6064d") (:revdesc . "3081d37811b6") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (evil-escape . [(20241212 1318) ((emacs (26)) (evil (1 14 0)) (cl-lib (0 5))) "Escape from anything with a customizable key sequence" tar ((:url . "https://github.com/emacsorphanage/evil-escape") (:commit . "aebd1a78a6bd33e5164e7552096b3fe1172d3012") (:revdesc . "aebd1a78a6bd") (:keywords "convenience" "editing" "evil") (:authors ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainers ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainer "Sylvain Benner" . "sylvain.benner@gmail.com"))])
+ (evil-ex-fasd . [(20180903 612) ((emacs (24 4)) (evil (1 1 0)) (fasd (0))) "Using fasd right from evil-ex" tar ((:url . "https://github.com/yqrashawn/evil-ex-fasd") (:commit . "ed8fbbe23a8a268d9dcbf1a6132e928ba2c655c5") (:revdesc . "ed8fbbe23a8a") (:keywords "tools" "fasd" "evil" "navigation") (:authors ("Rashawn Zhang" . "namy.19@gmail.com")) (:maintainers ("Rashawn Zhang" . "namy.19@gmail.com")) (:maintainer "Rashawn Zhang" . "namy.19@gmail.com"))])
+ (evil-ex-shell-command . [(20181226 226) ((emacs (24 4)) (evil (1 1 0))) "Invoke shell-command right from evil-ex" tar ((:url . "https://github.com/yqrashawn/evil-ex-shell-command") (:commit . "a6ca6d27c07f6a0807abfb5b8f8865f1d17f54aa") (:revdesc . "a6ca6d27c07f") (:keywords "tools" "shell-command" "evil") (:authors ("Rashawn Zhang" . "namy.19@gmail.com")) (:maintainers ("Rashawn Zhang" . "namy.19@gmail.com")) (:maintainer "Rashawn Zhang" . "namy.19@gmail.com"))])
+ (evil-exchange . [(20200118 252) ((evil (1 2 8)) (cl-lib (0 3))) "Exchange text more easily within Evil" tar ((:url . "https://github.com/Dewdrops/evil-exchange") (:commit . "3030e21ee16a42dfce7f7cf86147b778b3f5d8c1") (:revdesc . "3030e21ee16a") (:keywords "evil" "plugin") (:authors ("Dewdrops" . "v_v_4474@126.com")) (:maintainers ("Dewdrops" . "v_v_4474@126.com")) (:maintainer "Dewdrops" . "v_v_4474@126.com"))])
+ (evil-expat . [(20241120 1350) ((emacs (24 3)) (evil (1 0 0))) "Evil ex commands" tar ((:url . "https://github.com/edkolev/evil-expat") (:commit . "23610598a9f1450f2deafc47726d5b7ce61e8695") (:revdesc . "23610598a9f1") (:keywords "emulations" "evil" "vim") (:authors ("edkolev" . "evgenysw@gmail.com")) (:maintainers ("edkolev" . "evgenysw@gmail.com")) (:maintainer "edkolev" . "evgenysw@gmail.com"))])
+ (evil-extra-operator . [(20210225 1239) ((evil (1 0 7))) "Evil operator for evaluating codes, taking notes, searching via google, etc" tar ((:url . "https://github.com/Dewdrops/evil-extra-operator") (:commit . "49c2dae224705f05dcfa03868b9fbbb72f2b5a8d") (:revdesc . "49c2dae22470") (:keywords "evil" "plugin") (:authors ("Dewdrops" . "v_v_4474@126.com")) (:maintainers ("Dewdrops" . "v_v_4474@126.com")) (:maintainer "Dewdrops" . "v_v_4474@126.com"))])
+ (evil-find-char-pinyin . [(20160514 2041) ((evil (1 2 12)) (pinyinlib (0 1 0))) "Evil's f/F/t/T/evil-snipe commands with Pinyin support" tar ((:url . "https://github.com/cute-jumper/evil-find-char-pinyin") (:commit . "04e277946d658f1a73c68dcbbadea9c21097a31c") (:revdesc . "04e277946d65") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (evil-fringe-mark . [(20190320 453) ((emacs (24 3)) (evil (1 0 0)) (fringe-helper (0 1 1)) (goto-chg (1 6))) "Display evil-mode marks in the fringe" tar ((:url . "https://github.com/Andrew-William-Smith/evil-fringe-mark") (:commit . "a1689fddb7ee79aaa720a77aada1208b8afd5c20") (:revdesc . "a1689fddb7ee") (:authors ("Andrew Smith" . "andy.bill.smith@gmail.com")) (:maintainers ("Andrew Smith" . "andy.bill.smith@gmail.com")) (:maintainer "Andrew Smith" . "andy.bill.smith@gmail.com"))])
+ (evil-ghostel . [(20260820 1035) ((emacs (28 1)) (evil (1 0)) (ghostel (0 42 1))) "Evil-mode integration for ghostel" tar ((:url . "https://github.com/dakra/ghostel") (:commit . "02d0e3743dbe1a8c607adcfdc526367d798f4c23") (:revdesc . "02d0e3743dbe") (:authors ("Daniel Kraus" . "daniel@kraus.my")) (:maintainers ("Daniel Kraus" . "daniel@kraus.my")) (:maintainer "Daniel Kraus" . "daniel@kraus.my"))])
+ (evil-god-state . [(20141117 255) ((evil (1 0 8)) (god-mode (2 12 0))) "Use god-mode keybindings in evil-mode" tar ((:url . "https://github.com/gridaphobe/evil-god-state") (:commit . "3d44197dc0a1fb40e7b7ff8717f8a8c339ce1d40") (:revdesc . "3d44197dc0a1") (:keywords "evil" "leader" "god-mode"))])
+ (evil-god-toggle . [(20260522 2049) ((emacs (28 1)) (evil (1 0 8)) (god-mode (2 12 0))) "Toggle Evil and God Mode" tar ((:url . "https://github.com/jam1015/evil-god-toggle") (:commit . "d6f8d098b9f9e0046df5afd35ced5bc5ed5a0ea0") (:revdesc . "d6f8d098b9f9") (:keywords "convenience" "emulation" "evil" "god-mode") (:authors ("Jordan Mandel" . "jordan.mandel@live.com")) (:maintainers ("Jordan Mandel" . "jordan.mandel@live.com")) (:maintainer "Jordan Mandel" . "jordan.mandel@live.com"))])
+ (evil-goggles . [(20231021 738) ((emacs (24 4)) (evil (1 0 0))) "Add a visual hint to evil operations" tar ((:url . "https://github.com/edkolev/evil-goggles") (:commit . "34ca276a85f615d2b45e714c9f8b5875bcb676f3") (:revdesc . "34ca276a85f6") (:keywords "emulations" "evil" "vim" "visual") (:authors ("edkolev" . "evgenysw@gmail.com")) (:maintainers ("edkolev" . "evgenysw@gmail.com")) (:maintainer "edkolev" . "evgenysw@gmail.com"))])
+ (evil-iedit-state . [(20220219 1432) ((evil (1 0 9)) (iedit (0 9 9 9))) "Evil states to interface iedit mode" tar ((:url . "https://github.com/syl20bnr/evil-iedit-state") (:commit . "44c64c71692e5b2f608ad3e3c537ec0a0e0ea0f8") (:revdesc . "44c64c71692e") (:keywords "convenience" "editing" "evil" "iedit" "mnemonic") (:authors ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainers ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainer "Sylvain Benner" . "sylvain.benner@gmail.com"))])
+ (evil-indent-plus . [(20230927 1513) ((evil (0)) (cl-lib (0 5))) "Evil textobjects based on indentation" tar ((:url . "https://github.com/TheBB/evil-indent-plus") (:commit . "f392696e4813f1d3a92c7eeed333248914ba6dae") (:revdesc . "f392696e4813") (:keywords "convenience" "evil") (:authors ("Eivind Fonn" . "evfonn@gmail.com")) (:maintainers ("Eivind Fonn" . "evfonn@gmail.com")) (:maintainer "Eivind Fonn" . "evfonn@gmail.com"))])
+ (evil-indent-textobject . [(20130831 2219) ((evil (0))) "Evil textobjects based on indentation" tar ((:url . "https://github.com/cofi/evil-indent-textobject") (:commit . "70a1154a531b7cfdbb9a31d6922482791e20a3a7") (:revdesc . "70a1154a531b") (:keywords "convenience" "evil") (:authors ("Michael Markert" . "markert.michael@gmail.com")) (:maintainers ("Michael Markert" . "markert.michael@gmail.com")) (:maintainer "Michael Markert" . "markert.michael@gmail.com"))])
+ (evil-insert-plus . [(20260127 1015) ((emacs (24 4)) (evil (1 14 0))) "Use insert and append as evil operators" tar ((:url . "https://github.com/yad-tahir/evil-insert-plus") (:commit . "d584ed3ea2a49ed7f93fe176800e7a2f95dff6aa") (:revdesc . "d584ed3ea2a4") (:keywords "emulations" "textvim" "editing") (:authors ("Yad Tahir" . "yadatieee.org")) (:maintainers ("Yad Tahir" . "yadatieee.org")) (:maintainer "Yad Tahir" . "yadatieee.org"))])
+ (evil-keypad . [(20260802 18) ((emacs (30 1)) (evil (1 0 0))) "Modal command dispatch for evil-mode" tar ((:url . "https://github.com/achyudh/evil-keypad") (:commit . "0a9f3873d67ba7b9ab4281bcb6d000ec9a1dbd04") (:revdesc . "0a9f3873d67b") (:keywords "convenience" "emulation") (:authors ("Achyudh Ram" . "mail@achyudh.me")) (:maintainers ("Achyudh Ram" . "mail@achyudh.me")) (:maintainer "Achyudh Ram" . "mail@achyudh.me"))])
+ (evil-leader . [(20140606 1243) ((evil (0))) "Let there be <leader>" tar ((:url . "https://github.com/cofi/evil-leader") (:commit . "39f7014bcf8b36463e0c7512c638bda4bac6c2cf") (:revdesc . "39f7014bcf8b") (:keywords "evil" "vim-emulation" "leader") (:authors ("Michael Markert" . "markert.michael@googlemail.com")) (:maintainers ("Michael Markert" . "markert.michael@googlemail.com")) (:maintainer "Michael Markert" . "markert.michael@googlemail.com"))])
+ (evil-ledger . [(20180802 1612) ((emacs (24 4)) (evil (1 2 12)) (ledger-mode (0))) "Make `ledger-mode' more `evil'" tar ((:url . "https://github.com/atheriel/evil-ledger") (:commit . "7a9f9f5d39c42fffdba8004f8982642351f2b233") (:revdesc . "7a9f9f5d39c4") (:keywords "convenience" "evil" "languages" "ledger" "vim-emulation") (:authors ("Aaron Jacobs" . "atheriel@gmail.com")) (:maintainers ("Aaron Jacobs" . "atheriel@gmail.com")) (:maintainer "Aaron Jacobs" . "atheriel@gmail.com"))])
+ (evil-lion . [(20241120 1351) ((emacs (24 3)) (evil (1 0 0))) "Evil align operator, port of vim-lion" tar ((:url . "https://github.com/edkolev/evil-lion") (:commit . "5a0bca151466960e090d1803c4c5ded88875f90a") (:revdesc . "5a0bca151466") (:keywords "emulations" "evil" "vim") (:authors ("edkolev" . "evgenysw@gmail.com")) (:maintainers ("edkolev" . "evgenysw@gmail.com")) (:maintainer "edkolev" . "evgenysw@gmail.com"))])
+ (evil-lisp-state . [(20160404 248) ((evil (1 0 9)) (bind-map (0)) (smartparens (1 6 1))) "An evil state to edit Lisp code" tar ((:url . "https://github.com/syl20bnr/evil-lisp-state") (:commit . "3c65fecd9917a41eaf6460f22187e2323821f3ce") (:revdesc . "3c65fecd9917") (:keywords "convenience" "editing" "evil" "smartparens" "lisp" "mnemonic") (:authors ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainers ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainer "Sylvain Benner" . "sylvain.benner@gmail.com"))])
+ (evil-lispops . [(20240428 1356) ((emacs (26 1)) (evil (1 2 10))) "Operations for editing lisp evilly" tar ((:url . "https://github.com/precompute/evil-lispops") (:commit . "372b52df1a45fcea6c9461e7909cfdbb1db822a9") (:revdesc . "372b52df1a45") (:authors ("precompute" . "git@precompute.net")) (:maintainers ("precompute" . "git@precompute.net")) (:maintainer "precompute" . "git@precompute.net"))])
+ (evil-lispy . [(20190502 739) ((lispy (0 26 0)) (evil (1 2 12)) (hydra (0 13 5))) "Precision Lisp editing with Evil and Lispy" tar ((:url . "https://github.com/sp3ctum/evil-lispy") (:commit . "ed317f7fccbdbeea8aa04a91b1b1f48a0e2ddc4e") (:revdesc . "ed317f7fccbd") (:keywords "lisp") (:authors ("Brandon Carrell" . "brandoncarrell@gmail.com") ("Mika Vilpas" . "mika.vilpas@gmail.com")) (:maintainers ("Brandon Carrell" . "brandoncarrell@gmail.com") ("Mika Vilpas" . "mika.vilpas@gmail.com")) (:maintainer "Brandon Carrell" . "brandoncarrell@gmail.com"))])
+ (evil-mark-replace . [(20260716 634) ((evil (1 15 0))) "Replace the thing in buffer and defun" tar ((:url . "https://github.com/redguardtoo/evil-mark-replace") (:commit . "3221d2c3b304a1cb825f6c79da4d418a8233dcc2") (:revdesc . "3221d2c3b304") (:keywords "convenience"))])
+ (evil-matchit . [(20260409 936) ((emacs (27 1))) "Vim matchit ported to Evil" tar ((:url . "https://github.com/redguardtoo/evil-matchit") (:commit . "751e74ce2e29c3f32b30e6a1012a33fe81ba0700") (:revdesc . "751e74ce2e29") (:keywords "matchit" "vim" "evil") (:authors ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainers ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainer "Chen Bin" . "chenbin.sh@gmail.com"))])
+ (evil-mc . [(20241025 2045) ((emacs (24 3)) (evil (1 2 14)) (cl-lib (0 5))) "Multiple cursors for evil-mode" tar ((:url . "https://github.com/gabesoft/evil-mc") (:commit . "7e363dd6b0a39751e13eb76f2e9b7b13c7054a43") (:revdesc . "7e363dd6b0a3") (:keywords "evil" "editing" "multiple-cursors" "vim" "evil-multiple-cursors" "evil-mc" "evil-mc") (:authors ("Gabriel Adomnicai" . "gabesoft@gmail.com")) (:maintainers ("Gabriel Adomnicai" . "gabesoft@gmail.com")) (:maintainer "Gabriel Adomnicai" . "gabesoft@gmail.com"))])
+ (evil-mc-extras . [(20170202 1649) ((emacs (24 3)) (evil (1 2 12)) (cl-lib (0 5)) (evil-mc (0 0 2)) (evil-numbers (0 4))) "Extra functionality for evil-mc" tar ((:url . "https://github.com/gabesoft/evil-mc-extras") (:commit . "ba3252ae129c3b79aeb70ec3d276cbda32b00421") (:revdesc . "ba3252ae129c") (:keywords "evil" "editing" "multiple-cursors" "vim" "evil-multiple-cursors" "evil-mc" "evil-mc-extras") (:authors ("Gabriel Adomnicai" . "gabesoft@gmail.com")) (:maintainers ("Gabriel Adomnicai" . "gabesoft@gmail.com")) (:maintainer "Gabriel Adomnicai" . "gabesoft@gmail.com"))])
+ (evil-mu4e . [(20180613 1039) ((emacs (24 4)) (evil (1 2 10))) "Evil-based key bindings for mu4e" tar ((:url . "https://github.com/JorisE/evil-mu4e") (:commit . "f4b387ccbd2c49f3bbb5401e93bfcc050ca128ef") (:revdesc . "f4b387ccbd2c") (:authors ("Joris Engbers" . "info@jorisengbers.nl")) (:maintainers ("Joris Engbers" . "info@jorisengbers.nl")) (:maintainer "Joris Engbers" . "info@jorisengbers.nl"))])
+ (evil-multiedit . [(20211121 1650) ((emacs (25 1)) (evil (1 14 0)) (iedit (0 9 9)) (cl-lib (0 5))) "Multiple cursors for evil-mode" tar ((:url . "https://github.com/hlissner/evil-multiedit") (:commit . "23b53bc8743fb82a8854ba907b1d277374c93a79") (:revdesc . "23b53bc8743f") (:keywords "multiple cursors" "editing" "iedit") (:authors ("Henrik Lissner" . "http://github/hlissner")) (:maintainers ("Henrik Lissner" . "contact@henrik.io")) (:maintainer "Henrik Lissner" . "contact@henrik.io"))])
+ (evil-neo . [(20240721 1241) ((evil (1 0 0))) "Minor mode for using the Neo keyboard layout with Evil" tar ((:url . "https://git.sr.ht/~p-conrad/evil-neo") (:commit . "18f115a0ddc12a0930f0eb2f9f119b190c71017e") (:revdesc . "18f115a0ddc1") (:keywords "convenience" "emulations" "neo" "evil" "vim" "keymap") (:authors ("Peter Conrad" . "p.conrad@proton.me")) (:maintainers ("Peter Conrad" . "p.conrad@proton.me")) (:maintainer "Peter Conrad" . "p.conrad@proton.me"))])
+ (evil-nerd-commenter . [(20260507 414) ((emacs (26 1))) "Comment/uncomment lines efficiently. Like Nerd Commenter in Vim" tar ((:url . "https://github.com/redguardtoo/evil-nerd-commenter") (:commit . "db5ee61a6e75db074b7d20e9dcb68e0b94b4edc7") (:revdesc . "db5ee61a6e75") (:keywords "convenience" "evil") (:authors ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainers ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainer "Chen Bin" . "chenbin.sh@gmail.com"))])
+ (evil-nl-break-undo . [(20240921 953) ((evil (0))) "Break evil's undo sequence on CR" tar ((:url . "https://github.com/VanLaser/evil-nl-break-undo") (:commit . "fabd063c097f1b23112a29936dc5be5214153a0d") (:revdesc . "fabd063c097f") (:authors ("VanLaser" . "Gabriel.Lazar@com.utcluj.ro")) (:maintainers ("VanLaser" . "Gabriel.Lazar@com.utcluj.ro")) (:maintainer "VanLaser" . "Gabriel.Lazar@com.utcluj.ro"))])
+ (evil-numbers . [(20260103 850) ((emacs (24 1)) (evil (1 2 0)) (shift-number (0 2))) "Increment/decrement numbers like in VIM" tar ((:url . "https://github.com/juliapath/evil-numbers") (:commit . "616aff9e5cee012954756ed2715209fa90308cdf") (:revdesc . "616aff9e5cee") (:keywords "convenience" "tools") (:authors ("Michael Markert" . "markert.michael@googlemail.com")) (:maintainers ("Julia Path" . "julia@jpath.de")) (:maintainer "Julia Path" . "julia@jpath.de"))])
+ (evil-opener . [(20161207 1810) ((evil (1 2 12)) (opener (0 2 2))) "Opening urls as buffers in evil" tar ((:url . "https://github.com/0robustus1/opener.el") (:commit . "c384f67278046fdcd220275fdd212ab85672cbeb") (:revdesc . "c384f6727804") (:keywords "url" "http" "files") (:authors ("Tim Reddehase" . "tr@rightsrestricted.com")) (:maintainers ("Tim Reddehase" . "tr@rightsrestricted.com")) (:maintainer "Tim Reddehase" . "tr@rightsrestricted.com"))])
+ (evil-org . [(20221001 2335) ((emacs (24 4)) (evil (1 0))) "Evil keybindings for org-mode" tar ((:url . "https://github.com/Somelauw/evil-org-mode.git") (:commit . "b1f309726b1326e1a103742524ec331789f2bf94") (:revdesc . "b1f309726b13") (:keywords "evil" "vim-emulation" "org-mode" "key-bindings" "presets"))])
+ (evil-owl . [(20210416 1700) ((emacs (25 1)) (evil (1 2 13))) "Preview evil registers and marks before using them" tar ((:url . "https://github.com/mamapanda/evil-owl") (:commit . "a41a6d28e26052b25f3d21da37ccf1d8fde1e6aa") (:revdesc . "a41a6d28e260") (:keywords "emulations" "evil" "visual") (:authors ("Daniel Phan" . "daniel.phan36@gmail.com")) (:maintainers ("Daniel Phan" . "daniel.phan36@gmail.com")) (:maintainer "Daniel Phan" . "daniel.phan36@gmail.com"))])
+ (evil-paredit . [(20150413 2048) ((evil (1 0 9)) (paredit (25 -2))) "Paredit support for evil keybindings" tar ((:url . "https://github.com/roman/evil-paredit") (:commit . "e058fbdcf9dbf7ad6cc77f0172d7517ef233d55f") (:revdesc . "e058fbdcf9db") (:keywords "paredit" "evil") (:authors ("Roman Gonzalez" . "romanandreg@gmail.com")) (:maintainers ("Roman Gonzalez" . "romanandreg@gmail.com")) (:maintainer "Roman Gonzalez" . "romanandreg@gmail.com"))])
+ (evil-pinyin . [(20231016 1558) ((emacs (25)) (names (0 5)) (evil (1))) "Evil search Chinese characters by pinyin" tar ((:url . "https://github.com/laishulu/evil-pinyin") (:commit . "0fae5ad8761417f027b33230382a50f826ad3bfb") (:revdesc . "0fae5ad87614") (:keywords "extensions"))])
+ (evil-python-movement . [(20180724 1420) ((emacs (25 1)) (cl-lib (0 5)) (dash (2 13 0)) (evil (1 0)) (s (1 12 0))) "Port Neovim's python movement to Evil" tar ((:url . "https://bitbucket.org/FelipeLema/evil-python-movement.el/") (:commit . "9936b3b7f8d96415d517c1f3604637889484a637") (:revdesc . "9936b3b7f8d9") (:authors ("Felipe Lema" . "felipelemaenmortemalepuntoorg")) (:maintainers ("Felipe Lema" . "felipelemaenmortemalepuntoorg")) (:maintainer "Felipe Lema" . "felipelemaenmortemalepuntoorg"))])
+ (evil-quickscope . [(20160202 1924) ((evil (0))) "Highlight unique characters in words for f,F,t,T navigation" tar ((:url . "https://github.com/blorbx/evil-quickscope") (:commit . "37a20e4c56c6058abf186ad4013c155e695e876f") (:revdesc . "37a20e4c56c6") (:keywords "faces" "emulation" "vim" "evil") (:authors ("Michael Chen" . "blorbx@gmail.com")) (:maintainers ("Michael Chen" . "blorbx@gmail.com")) (:maintainer "Michael Chen" . "blorbx@gmail.com"))])
+ (evil-rails . [(20190512 1517) ((evil (1 0)) (projectile-rails (1 0))) "Rails support for Evil Mode" tar ((:url . "https://github.com/antono/evil-rails") (:commit . "b0f1c5de6720714febeb76c4b569b71bb891938c") (:revdesc . "b0f1c5de6720") (:keywords "ruby" "rails" "vim" "project" "convenience" "web" "evil" "projectile") (:authors ("Antono Vasiljev" . "antono.vasiljev@gmail.com")) (:maintainers ("Antono Vasiljev" . "antono.vasiljev@gmail.com")) (:maintainer "Antono Vasiljev" . "antono.vasiljev@gmail.com"))])
+ (evil-replace-with-char . [(20180324 2206) ((evil (1 2 13)) (emacs (24))) "Replace chars of a text object with a char" tar ((:url . "https://github.com/ninrod/evil-replace-with-char") (:commit . "ed4a12d5bff11163eb03ad2826c52fd30f51a8d3") (:revdesc . "ed4a12d5bff1") (:authors ("Filipe Silva" . "filipe.silva@gmail.com")) (:maintainers ("Filipe Silva" . "filipe.silva@gmail.com")) (:maintainer "Filipe Silva" . "filipe.silva@gmail.com"))])
+ (evil-replace-with-register . [(20170713 925) ((evil (1 0 8))) "Port of vim plugin ReplaceWithRegister" tar ((:url . "https://github.com/Dewdrops/evil-ReplaceWithRegister") (:commit . "91cc7bf21a94703c441cc9212214075b226b7f67") (:revdesc . "91cc7bf21a94") (:keywords "evil" "plugin") (:authors ("Dewdrops" . "v_v_4474@126.com")) (:maintainers ("Dewdrops" . "v_v_4474@126.com")) (:maintainer "Dewdrops" . "v_v_4474@126.com"))])
+ (evil-rsi . [(20160221 2104) ((evil (1 0 0))) "Use emacs motion keys in evil, inspired by vim-rsi" tar ((:url . "https://github.com/linktohack/evil-rsi") (:commit . "236bf6ed1e2285698db808463e5f2f69f5f5e7c0") (:revdesc . "236bf6ed1e22") (:keywords "evil" "rsi" "evil-rsi") (:authors ("Quang Linh LE" . "linktohack@gmail.com")) (:maintainers ("Quang Linh LE" . "linktohack@gmail.com")) (:maintainer "Quang Linh LE" . "linktohack@gmail.com"))])
+ (evil-ruby-text-objects . [(20240411 1139) ((emacs (25 1)) (evil (1 2 0))) "Evil text objects for Ruby code" tar ((:url . "https://github.com/porras/evil-ruby-text-objects") (:commit . "de138b3279817484d1d34ca5b293af09e00a4e1a") (:revdesc . "de138b327981") (:keywords "languages") (:authors ("Sergio Gil" . "sgilperez@gmail.com")) (:maintainers ("Sergio Gil" . "sgilperez@gmail.com")) (:maintainer "Sergio Gil" . "sgilperez@gmail.com"))])
+ (evil-search-highlight-persist . [(20170523 334) ((highlight (0))) "Persistent highlights after search" tar ((:url . "https://github.com/naclander/evil-search-highlight-persist") (:commit . "6e04a8c075f5fd62526d222447048faab8bfa187") (:revdesc . "6e04a8c075f5") (:authors ("Juanjo Alvarez" . "juanjo@juanjoalvarez.net")) (:maintainers ("Juanjo Alvarez" . "juanjo@juanjoalvarez.net")) (:maintainer "Juanjo Alvarez" . "juanjo@juanjoalvarez.net"))])
+ (evil-smartparens . [(20171210 1513) ((evil (1 0)) (emacs (24 4)) (smartparens (1 10 1))) "Evil support for smartparens" tar ((:url . "https://www.github.com/expez/evil-smartparens") (:commit . "026d4a3cfce415a4dfae1457f871b385386e61d3") (:revdesc . "026d4a3cfce4") (:keywords "evil" "smartparens") (:authors ("Lars Andersen" . "expez@expez.com")) (:maintainers ("Lars Andersen" . "expez@expez.com")) (:maintainer "Lars Andersen" . "expez@expez.com"))])
+ (evil-snipe . [(20250505 508) ((emacs (24 4)) (evil (1 2 12)) (cl-lib (0 5))) "Emulate vim-sneak & vim-seek" tar ((:url . "https://github.com/hlissner/evil-snipe") (:commit . "16317d7e54313490a0fe8642ed9a1a72498e7ad2") (:revdesc . "16317d7e5431") (:keywords "emulation" "vim" "evil" "sneak" "seek") (:authors ("Henrik Lissner" . "http://github/hlissner")) (:maintainers ("Henrik Lissner" . "contact@henrik.io")) (:maintainer "Henrik Lissner" . "contact@henrik.io"))])
+ (evil-space . [(20151208 1228) ((evil (1 0 0))) "Repeat motion in Evil. Correct the behaviour of what SPC should do" tar ((:url . "https://github.com/linktohack/evil-space") (:commit . "a9c07284d308425deee134c9d88a2d538dd229e6") (:revdesc . "a9c07284d308") (:keywords "space" "repeat" "motion") (:authors ("Quang Linh LE" . "linktohack@gmail.com")) (:maintainers ("Quang Linh LE" . "linktohack@gmail.com")) (:maintainer "Quang Linh LE" . "linktohack@gmail.com"))])
+ (evil-string-inflection . [(20200524 1402) ((emacs (24)) (evil (1 2 13)) (string-inflection (1 0 6))) "Snake_case -> CamelCase -> etc. for text objects" tar ((:url . "https://github.com/ninrod/evil-string-inflection") (:commit . "d22a90ab807afa7f27f3815b5b5ea47d52d05218") (:revdesc . "d22a90ab807a") (:authors ("Filipe Silva" . "filipe.silva@gmail.com")) (:maintainers ("Filipe Silva" . "filipe.silva@gmail.com")) (:maintainer "Filipe Silva" . "filipe.silva@gmail.com"))])
+ (evil-surround . [(20240325 852) ((evil (1 2 12))) "Emulate surround.vim from Vim" tar ((:url . "https://github.com/emacs-evil/evil-surround") (:commit . "14dc693ed971053feb9596d4bc1b1de0b0006584") (:revdesc . "14dc693ed971") (:keywords "emulation" "vi" "evil") (:authors ("Tim Harper" . "timcharperatgmaildotcom") ("Vegard ye" . "vegard_oyeathotmaildotcom")) (:maintainers ("Tom Dalziel" . "tom.dalziel@gmail.com")) (:maintainer "Tom Dalziel" . "tom.dalziel@gmail.com"))])
+ (evil-swap-keys . [(20260624 2045) ((emacs (24 4))) "Intelligently swap keys on text input with evil" tar ((:url . "https://github.com/wbolster/evil-swap-keys") (:commit . "889672ad0d35ab062c52d9d84b22de4ac49753f3") (:revdesc . "889672ad0d35") (:keywords "convenience" "data" "languages" "tools") (:authors ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "wouter bolsterlee" . "wouter@bolsterl.ee"))])
+ (evil-tabs . [(20160217 1520) ((evil (0 0 0)) (elscreen (0 0 0))) "Integrating Vim-style tabs for Evil mode users" tar ((:url . "https://github.com/krisajenkins/evil-tabs") (:commit . "53d3314a810017b6056ab6796aef671f5ea1c063") (:revdesc . "53d3314a8100") (:keywords "evil" "tab" "tabs" "vim") (:authors ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainers ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainer "Kris Jenkins" . "krisajenkins@gmail.com"))])
+ (evil-terminal-cursor-changer . [(20260523 1907) nil "Change cursor shape and color in terminal" tar ((:url . "https://github.com/7696122/evil-terminal-cursor-changer") (:commit . "fb824f657fb4325c1124f3e1b61f0de7ed062adf") (:revdesc . "fb824f657fb4") (:keywords "terminal" "cursor" "evil"))])
+ (evil-test-helpers . [(20230820 2246) ((evil (1 15 0))) "Unit test helpers for Evil" tar ((:url . "https://github.com/emacs-evil/evil") (:commit . "4beec94d14fc4180c41314edff997dbb9c422a23") (:revdesc . "4beec94d14fc") (:authors ("Vegard ye" . "vegard_oyeathotmail.com")) (:maintainers ("Vegard ye" . "vegard_oyeathotmail.com")) (:maintainer "Vegard ye" . "vegard_oyeathotmail.com"))])
+ (evil-tex . [(20230715 1752) ((emacs (26 1)) (evil (1 0)) (auctex (11 88))) "Useful features for editing LaTeX in evil-mode" tar ((:url . "https://github.com/iyefrat/evil-tex") (:commit . "5dd1e852c8fb9e6efa2b748e89786526483e7619") (:revdesc . "5dd1e852c8fb") (:keywords "tex" "emulation" "vi" "evil" "wp") (:authors ("Yoav Marco" . "https://github.com/ymarco") ("Itai Y. Efrat" . "https://github.com/iyefrat")) (:maintainers ("Yoav Marco" . "yoavm448@gmail.com") ("Itai Y. Efrat" . "itai3397@gmail.com")) (:maintainer "Yoav Marco" . "yoavm448@gmail.com"))])
+ (evil-tex-ts . [(20251229 2214) ((emacs (29 1)) (evil (1 0))) "Tree-sitter based LaTeX text objects for Evil" tar ((:url . "https://github.com/Prgebish/evil-tex-ts") (:commit . "abeb89a410a2f2e2db0a6e632f11a44de7313f09") (:revdesc . "abeb89a410a2") (:keywords "tex" "emulation" "vi" "evil" "wp"))])
+ (evil-text-object-python . [(20260706 1546) ((emacs (25)) (evil (1 2 14)) (dash (2 16 0))) "Python specific evil text objects" tar ((:url . "https://github.com/wbolster/evil-text-object-python") (:commit . "c8b2c6d8f5194af99f65cceec1b692f464f00a8b") (:revdesc . "c8b2c6d8f519") (:keywords "convenience" "languages" "tools") (:authors ("Wouter Bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("Wouter Bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "Wouter Bolsterlee" . "wouter@bolsterl.ee"))])
+ (evil-textobj-anyblock . [(20170905 1907) ((cl-lib (0 5)) (evil (1 1 0))) "Textobject for the closest user-defined blocks" tar ((:url . "https://github.com/noctuid/evil-textobj-anyblock") (:commit . "ff00980f0634f95bf2ad9956b615a155ea8743be") (:revdesc . "ff00980f0634") (:keywords "evil") (:authors ("Fox Kiester" . "noct@openmailbox.org")) (:maintainers ("Fox Kiester" . "noct@openmailbox.org")) (:maintainer "Fox Kiester" . "noct@openmailbox.org"))])
+ (evil-textobj-column . [(20170905 1905) ((names (0 5)) (emacs (24)) (evil (0))) "Provides column text objects" tar ((:url . "https://github.com/noctuid/evil-textobj-column") (:commit . "835d7036d0bc9a6e44fc9b7c54ccf2a7c01428cd") (:revdesc . "835d7036d0bc") (:keywords "evil" "column" "text-object") (:authors ("Fox Kiester" . "noct@openmailbox.org")) (:maintainers ("Fox Kiester" . "noct@openmailbox.org")) (:maintainer "Fox Kiester" . "noct@openmailbox.org"))])
+ (evil-textobj-entire . [(20150422 1254) ((emacs (24)) (evil (1 0 0))) "Text object for entire lines of buffer for evil" tar ((:url . "https://github.com/supermomonga/evil-textobj-entire") (:commit . "5b3a98f3a69edc3a788f539f6ffef4a0ef5e853d") (:revdesc . "5b3a98f3a69e") (:keywords "convenience" "emulations"))])
+ (evil-textobj-line . [(20211101 1429) ((evil (1 0 0))) "Line text object for Evil" tar ((:url . "https://github.com/emacsorphanage/evil-textobj-line") (:commit . "9eaf9a5485c2b5c05e16552b34632ca520cd681d") (:revdesc . "9eaf9a5485c2") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (evil-textobj-syntax . [(20231119 1633) ((emacs (24)) (evil (0))) "Provides syntax text objects" tar ((:url . "https://github.com/laishulu/evil-textobj-syntax") (:commit . "64252ded690a2e65b71a1c84aa3acd24e704d02f") (:revdesc . "64252ded690a") (:keywords "evil" "syntax" "highlight" "text-object"))])
+ (evil-textobj-tree-sitter . [(20260616 730) ((emacs (25 1))) "Provides evil textobjects using tree-sitter" tar ((:url . "https://github.com/meain/evil-textobj-tree-sitter") (:commit . "fecc0e11615df31a6651ce11b012388e53cad4e9") (:revdesc . "fecc0e11615d") (:keywords "evil" "tree-sitter" "text-object" "convenience"))])
+ (evil-traces . [(20230820 2255) ((emacs (25 1)) (evil (1 2 13))) "Visual hints for `evil-ex'" tar ((:url . "https://github.com/mamapanda/evil-traces") (:commit . "3b4e08c522d1a4c6f458ab5dc21914fd307333a1") (:revdesc . "3b4e08c522d1") (:keywords "emulations" "evil" "visual") (:authors ("Daniel Phan" . "daniel.phan36@gmail.com")) (:maintainers ("Daniel Phan" . "daniel.phan36@gmail.com")) (:maintainer "Daniel Phan" . "daniel.phan36@gmail.com"))])
+ (evil-tree-edit . [(20231206 1836) ((emacs (29 1)) (tree-edit (0 1 0)) (tree-sitter (0 15 0)) (evil (1 0 0)) (avy (0 5 0)) (s (0 0 0))) "Evil structural editing for any language!" tar ((:url . "https://github.com/ethan-leba/tree-edit") (:commit . "9e3635e3fd0449bf259d42ea29c93e46ef623fe7") (:revdesc . "9e3635e3fd04") (:authors ("Ethan Leba" . "ethanleba5@gmail.com")) (:maintainers ("Ethan Leba" . "ethanleba5@gmail.com")) (:maintainer "Ethan Leba" . "ethanleba5@gmail.com"))])
+ (evil-tutor . [(20150103 653) ((evil (1 0 9))) "Vimtutor adapted to Evil and wrapped in a major-mode" tar ((:url . "https://github.com/syl20bnr/evil-tutor") (:commit . "909273bac88b98a565f1b89bbb13d523b7edce2b") (:revdesc . "909273bac88b") (:keywords "convenience" "editing" "evil") (:authors ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainers ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainer "Sylvain Benner" . "sylvain.benner@gmail.com"))])
+ (evil-tutor-ja . [(20160917 132) ((evil (1 0 9)) (evil-tutor (0 1))) "Japanese Vimtutor adapted to Evil and wrapped in a major-mode" tar ((:url . "https://github.com/kenjimyzk/evil-tutor-ja") (:commit . "06b9ad853a15ce6f2c53c2cf379b9ff358369f2d") (:revdesc . "06b9ad853a15") (:keywords "convenience" "editing" "evil" "japanese") (:authors ("Kenji Miyazaki" . "kenjizmyzk@gmail.com")) (:maintainers ("Kenji Miyazaki" . "kenjizmyzk@gmail.com")) (:maintainer "Kenji Miyazaki" . "kenjizmyzk@gmail.com"))])
+ (evil-tutor-sc . [(20240326 1239) ((evil (1 0 9)) (evil-tutor (0 1))) "Simplified Chinese tutor for Evil" tar ((:url . "https://github.com/clsty/evil-tutor-sc") (:commit . "9520aae3e10480a942c35ae83f7215086fee9412") (:revdesc . "9520aae3e104") (:keywords "convenience" "editing" "evil" "chinese") (:authors ("clsty" . "celestial.y@outlook.com")) (:maintainers ("clsty" . "celestial.y@outlook.com")) (:maintainer "clsty" . "celestial.y@outlook.com"))])
+ (evil-vimish-fold . [(20200122 117) ((emacs (24 4)) (evil (1 0 0)) (vimish-fold (0 2 0))) "Integrate vimish-fold with evil" tar ((:url . "https://github.com/alexmurray/evil-vimish-fold") (:commit . "b6e0e6b91b8cd047e80debef1a536d9d49eef31a") (:revdesc . "b6e0e6b91b8c") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (evil-visual-mark-mode . [(20230202 318) ((evil (1 0 9)) (dash (2 10))) "Display evil marks on buffer" tar ((:url . "https://github.com/roman/evil-visual-mark-mode") (:commit . "2bbaaae56ae53e68a8bcc7bc2cfe830a14843b4d") (:revdesc . "2bbaaae56ae5") (:keywords "evil") (:authors ("Roman Gonzalez" . "romanandreg@gmail.com")) (:maintainers ("Roman Gonzalez" . "romanandreg@gmail.com")) (:maintainer "Roman Gonzalez" . "romanandreg@gmail.com"))])
+ (evil-visual-replace . [(20171016 613) ((evil (1 0 0))) "Search/replace commands for evil visual state, inc. blocks" tar ((:url . "https://github.com/troyp/evil-visual-replace") (:commit . "163fc827a1ffc106475da470c37fb26f4cc9b008") (:revdesc . "163fc827a1ff") (:keywords "evil" "search" "replace" "regexp" "block" "rectangular" "region" "visual"))])
+ (evil-visualstar . [(20160223 48) ((evil (0))) "Starts a * or # search from the visual selection" tar ((:url . "https://github.com/bling/evil-visualstar") (:commit . "06c053d8f7381f91c53311b1234872ca96ced752") (:revdesc . "06c053d8f738") (:keywords "evil" "vim" "visualstar"))])
+ (evim . [(20260407 1614) ((emacs (27 1)) (evil (1 14 0))) "Evil Visual Multi - Multiple cursors for evil-mode" tar ((:url . "https://github.com/Prgebish/evim") (:commit . "746b22bea4c9b4c120472b8f6b319bbced50221e") (:revdesc . "746b22bea4c9") (:keywords "convenience" "emulations") (:authors ("Vadim Pavlov" . "vadim198527@gmail.com")) (:maintainers ("Vadim Pavlov" . "vadim198527@gmail.com")) (:maintainer "Vadim Pavlov" . "vadim198527@gmail.com"))])
+ (evm-mode . [(20220911 1647) nil "Major mode for editing Ethereum EVM bytecode" tar ((:url . "https://github.com/taquangtrung/emacs-evm-mode") (:commit . "422b65cfd04854072bf6b9238c49e3d40577ef98") (:revdesc . "422b65cfd048") (:keywords "languages"))])
+ (ewal . [(20200305 230) ((emacs (25 1))) "A pywal-based theme generator" tar ((:url . "https://gitlab.com/jjzmajic/ewal") (:commit . "4ecc355dae9c7d648cd2874e01a15dfa02b9350d") (:revdesc . "4ecc355dae9c") (:keywords "faces"))])
+ (ewal-doom-themes . [(20200922 325) ((emacs (25)) (ewal (0 1)) (doom-themes (0 1))) "Dread the colors of darkness" tar ((:url . "https://gitlab.com/jjzmajic/ewal") (:commit . "e2a04f5c97b7d5e087af26e646c0b45a24522e56") (:revdesc . "e2a04f5c97b7") (:keywords "faces"))])
+ (ewal-evil-cursors . [(20200301 839) ((emacs (25)) (ewal (0 1))) "`ewal'-colored evil cursor for Emacs and Spacemacs" tar ((:url . "https://gitlab.com/jjzmajic/ewal") (:commit . "732a2f4abb480f9f5a3249af822d8eb1e90324e3") (:revdesc . "732a2f4abb48") (:keywords "faces"))])
+ (ewal-spacemacs-themes . [(20230505 609) ((emacs (25)) (ewal (0 1)) (spacemacs-theme (0 1))) "Ride the rainbow spaceship" tar ((:url . "https://gitlab.com/jjzmajic/ewal") (:commit . "0d245edcfcd9cc5766d37b270214fb9da9b4336d") (:revdesc . "0d245edcfcd9") (:keywords "faces"))])
+ (ewm . [(20251021 30) ((emacs (26 1)) (eyebrowse (0 7 8))) "Window manager" tar ((:url . "https://github.com/laluxx/ewm") (:commit . "aed05324efc290a1674eceb2018f8e2a7e4480d5") (:revdesc . "aed05324efc2") (:keywords "windows" "convenience"))])
+ (ewmctrl . [(20170922 217) nil "Use `wmctrl' to manage desktop windows via EWMH/NetWM" tar ((:url . "https://github.com/flexibeast/ewmctrl") (:commit . "3d0217c4d6cdb5c308b6cb4293574f470d4faacf") (:revdesc . "3d0217c4d6cd") (:keywords "desktop" "windows" "ewmh" "netwm") (:authors ("Alexis" . "flexibeast@gmail.com") ("Adam Plaice" . "plaice.adam@gmail.com")) (:maintainers ("Alexis" . "flexibeast@gmail.com")) (:maintainer "Alexis" . "flexibeast@gmail.com"))])
+ (eww-lnum . [(20150102 1512) nil "Conkeror-like functionality for eww" tar ((:url . "https://github.com/m00natic/eww-lnum") (:commit . "4b0ecec769919ecb05ca4fb15ec51911ba589929") (:revdesc . "4b0ecec76991") (:keywords "eww" "browse" "conkeror") (:authors ("Andrey Kotlarski" . "m00naticus@gmail.com")) (:maintainers ("Andrey Kotlarski" . "m00naticus@gmail.com")) (:maintainer "Andrey Kotlarski" . "m00naticus@gmail.com"))])
+ (exato . [(20200524 1319) ((evil (1 2 13)) (emacs (24))) "EXATO: Evil XML/HTML Attributes Text Object" tar ((:url . "https://github.com/ninrod/exato") (:commit . "5e7b5721bf48aa49c6cdb5d41b908ef7d513b2a8") (:revdesc . "5e7b5721bf48") (:authors ("Filipe Silva" . "filipe.silva@gmail.com")) (:maintainers ("Filipe Silva" . "filipe.silva@gmail.com")) (:maintainer "Filipe Silva" . "filipe.silva@gmail.com"))])
+ (exec-in-buffer . [(20250629 324) ((emacs (24 1))) "Choose programs to execute on buffers in projects" tar ((:url . "https://github.com/arteen1000/exec-in-buffer") (:commit . "57ddaf95d46714ec1382f83ba952480b4cd0b73d") (:revdesc . "57ddaf95d467") (:keywords "tools" "c" "c++" "formatting" "projects") (:authors ("Arteen Abrishami" . "arteen@ucla.edu")) (:maintainers ("Arteen Abrishami" . "arteen@ucla.edu")) (:maintainer "Arteen Abrishami" . "arteen@ucla.edu"))])
+ (exec-path-from-shell . [(20260423 1833) ((emacs (26 1))) "Get environment variables such as $PATH from the shell" tar ((:url . "https://github.com/purcell/exec-path-from-shell") (:commit . "dae820da35ad46234cbca31626ffb6da7928694a") (:revdesc . "dae820da35ad") (:keywords "unix" "environment") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (execline . [(20190711 2010) ((emacs (26 1)) (s (1 6 0))) "Major mode for editing execline scripts" tar ((:url . "https://gitlab.com/KAction/emacs-execline") (:commit . "c75dd9b2c54d8e59fc35fd4bd98d8e213948a3f5") (:revdesc . "c75dd9b2c54d") (:keywords "tools" "unix" "languages") (:authors ("Dmitry Bogatov" . "KAction@debian.org")) (:maintainers ("Dmitry Bogatov" . "KAction@debian.org")) (:maintainer "Dmitry Bogatov" . "KAction@debian.org"))])
+ (exercism . [(20241019 1120) ((emacs (27 1)) (dash (2 19 1)) (a (1 0 0)) (s (1 13 1)) (request (0 3 2)) (async (1 9 6)) (async-await (1 1)) (persist (0 5)) (transient (0 3 7))) "Unofficial https://exercism.org integration" tar ((:url . "https://github.com/anonimitoraf/exercism.el") (:commit . "62c008b0e845c26f2e855969e9f87b405011a3ec") (:revdesc . "62c008b0e845") (:keywords "exercism" "convenience") (:authors ("Rafael Nicdao" . "https://github.com/anonimito")) (:maintainers ("Rafael Nicdao" . "nicdaoraf@gmail.com")) (:maintainer "Rafael Nicdao" . "nicdaoraf@gmail.com"))])
+ (exiftool . [(20260328 2210) ((emacs (27 1))) "Elisp wrapper around ExifTool" tar ((:url . "https://git.systemreboot.net/exiftool.el") (:commit . "23e9b7b407440037b23b1f7ad5f2010e41898621") (:revdesc . "23e9b7b40744") (:keywords "data") (:authors ("Arun I" . "arunisaac@systemreboot.net")) (:maintainers ("Arun I" . "arunisaac@systemreboot.net")) (:maintainer "Arun I" . "arunisaac@systemreboot.net"))])
+ (exotica-theme . [(20180212 2329) ((emacs (24))) "A dark theme with vibrant colors" tar ((:url . "https://github.com/jbharat/exotica-theme") (:commit . "ff3ef4f6fa38c93b99becad977c7810c990a4d2f") (:revdesc . "ff3ef4f6fa38") (:keywords "faces" "theme" "dark" "vibrant colors") (:authors ("Bharat Joshi" . "jbharat@outlook.com")) (:maintainers ("Bharat Joshi" . "jbharat@outlook.com")) (:maintainer "Bharat Joshi" . "jbharat@outlook.com"))])
+ (expand-line . [(20151006 207) nil "Expand selection by line" tar ((:url . "https://github.com/victorteokw/expand-line") (:commit . "75a5d0241f35dd0748ab8ecb4ff16891535be372") (:revdesc . "75a5d0241f35") (:authors ("Kai Yu" . "yeannylam@gmail.com")) (:maintainers ("Kai Yu" . "yeannylam@gmail.com")) (:maintainer "Kai Yu" . "yeannylam@gmail.com"))])
+ (expand-region . [(20241217 1840) ((emacs (24 4))) "Increase selected region by semantic units" tar ((:url . "https://github.com/magnars/expand-region.el") (:commit . "351279272330cae6cecea941b0033a8dd8bcc4e8") (:revdesc . "351279272330") (:keywords "marking" "region") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (expenses . [(20260824 616) ((emacs (28 1)) (dash (2 19 1)) (ht (2 3)) (transient (0 3 7))) "Record and view expenses" tar ((:url . "https://github.com/md-arif-shaikh/expenses") (:commit . "38e5b3eb49daa00ec0f8de81bc28651afe105d11") (:revdesc . "38e5b3eb49da") (:keywords "expense tracking" "convenience") (:authors ("Md Arif Shaikh" . "arifshaikh.astro@gmail.com")) (:maintainers ("Md Arif Shaikh" . "arifshaikh.astro@gmail.com")) (:maintainer "Md Arif Shaikh" . "arifshaikh.astro@gmail.com"))])
+ (express . [(20260202 1155) ((emacs (24 3)) (string-utils (0 3 2))) "Alternatives to `message'" tar ((:url . "https://github.com/rolandwalker/express") (:commit . "f98932f43771eea3cadd36002670d2099a0258f8") (:revdesc . "f98932f43771") (:keywords "extensions" "message" "interface") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (exsqlaim-mode . [(20170607 1003) ((s (1 10 0))) "Use variables inside sql queries" tar ((:url . "https://github.com/ahmadnazir/exsqlaim-mode") (:commit . "a2e0a62ec8b87193d8eaa695774bfd689324b06c") (:revdesc . "a2e0a62ec8b8") (:authors ("Ahmad Nazir Raja" . "ahmadnazir@gmail.com")) (:maintainers ("Ahmad Nazir Raja" . "ahmadnazir@gmail.com")) (:maintainer "Ahmad Nazir Raja" . "ahmadnazir@gmail.com"))])
+ (extempore-mode . [(20220704 2241) ((emacs (24 4))) "Emacs major mode for Extempore source files" tar ((:url . "https://github.com/extemporelang/extempore-emacs-mode") (:commit . "92e0fff482a0a4dc2971c39581c5ea9e84ae5e1c") (:revdesc . "92e0fff482a0") (:keywords "extempore") (:authors ("Ben Swift" . "ben@benswift.me")) (:maintainers ("Ben Swift" . "ben@benswift.me")) (:maintainer "Ben Swift" . "ben@benswift.me"))])
+ (extend-dnd . [(20151122 1850) nil "R drag and Drop" tar ((:url . "https://github.com/mlf176f2/extend-dnd") (:commit . "80c966c93b82c9bb5c6225a432557c39144fc602") (:revdesc . "80c966c93b82") (:keywords "extend" "drag and drop"))])
+ (external-dict . [(20250104 330) ((emacs (25 1))) "Query external dictionary like goldendict, Bob.app etc" tar ((:url . "https://repo.or.cz/external-dict.el.git") (:commit . "018cc2bad2e8bf29914d39b0119e836fa0f9dc18") (:revdesc . "018cc2bad2e8") (:keywords "wp" "processes") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (extmap . [(20230907 1959) ((emacs (24 4))) "Externally-stored constant mapping for Elisp" tar ((:url . "https://github.com/doublep/extmap") (:commit . "3b0f898057082a1c01584ff2bbaf5fd4d22c1400") (:revdesc . "3b0f89805708") (:keywords "lisp") (:authors ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainers ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainer "Paul Pogonyshev" . "pogonyshev@gmail.com"))])
+ (exunit . [(20260127 1521) ((s (1 11 0)) (emacs (24 3)) (f (0 20 0)) (transient (0 3 6)) (project (0 9 8))) "ExUnit test runner" tar ((:url . "https://github.com/ananthakumaran/exunit.el") (:commit . "bef971bde5634992fc2e4c8436b3feaddd8d7ed6") (:revdesc . "bef971bde563") (:keywords "processes" "elixir" "exunit") (:authors ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainers ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainer "Anantha kumaran" . "ananthakumaran@gmail.com"))])
+ (exwm-edit . [(20240418 2142) ((emacs (27 1))) "Edit mode for EXWM" tar ((:url . "https://github.com/agzam/exwm-edit") (:commit . "046b8c11f71bfd6c798df770c6b7708af2c187a2") (:revdesc . "046b8c11f71b") (:keywords "convenience"))])
+ (exwm-firefox-core . [(20251107 2150) ((emacs (24 4)) (exwm (0 16))) "Firefox hotkeys to functions" tar ((:url . "https://github.com/walseb/exwm-firefox-core") (:commit . "d8e599b7584f5570f3e50e111248d1d857cd5641") (:revdesc . "d8e599b7584f") (:keywords "extensions") (:authors ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainers ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainer "Sebastian Wålinder" . "s.walinder@gmail.com"))])
+ (exwm-firefox-evil . [(20250311 952) ((emacs (24 4)) (exwm (0 16)) (evil (1 0 0)) (exwm-firefox-core (1 0))) "Evil-mode implementation of exwm-firefox-core" tar ((:url . "https://github.com/walseb/exwm-firefox-evil") (:commit . "c87d601de9bad4d3cbf41c69281073b465a66769") (:revdesc . "c87d601de9ba") (:keywords "extensions") (:authors ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainers ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainer "Sebastian Wålinder" . "s.walinder@gmail.com"))])
+ (exwm-float . [(20210207 2035) ((emacs (25 1)) (xelb (0 18)) (exwm (0 24)) (popwin (1 0 2))) "Convenient modes and bindings for floating EXWM frames" tar ((:url . "https://gitlab.com/mtekman/exwm-float.el") (:commit . "047c83aa6b54bfb6ca8cac4d3ea18542611cef77") (:revdesc . "047c83aa6b54") (:keywords "outlines"))])
+ (exwm-mff . [(20210603 1723) ((emacs (25 1))) "Mouse Follows Focus" tar ((:url . "https://github.com/ieure/exwm-mff") (:commit . "89206f2e3189f589c27c56bd2b6203e906ee7100") (:revdesc . "89206f2e3189") (:keywords "unix") (:authors ("Ian Eure" . "public@lowbar.fyi")) (:maintainers ("Ian Eure" . "public@lowbar.fyi")) (:maintainer "Ian Eure" . "public@lowbar.fyi"))])
+ (exwm-modeline . [(20250222 1334) ((emacs (27 1)) (exwm (0 26))) "A modeline segment for EXWM workspaces" tar ((:url . "https://github.com/SqrtMinusOne/exwm-modeline") (:commit . "c933baccb8535a81ebae06a5dc4245b801c47f06") (:revdesc . "c933baccb853") (:authors ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainers ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainer "Korytov Pavel" . "thexcloud@gmail.com"))])
+ (exwm-surf . [(20171204 1140) ((emacs (24 4)) (exwm (0 16))) "Interface for Surf (surf.suckless.org) under exwm" tar ((:url . "https://github.com/ecraven/exwm-surf") (:commit . "6c17e2c1597fe4b7b454a1dac23b9127ac951e94") (:revdesc . "6c17e2c1597f") (:keywords "extensions") (:authors ("Peter" . "craven@gmx.net")) (:maintainers ("Peter" . "craven@gmx.net")) (:maintainer "Peter" . "craven@gmx.net"))])
+ (exwm-x . [(20230119 624) ((cl-lib (0 5)) (async (1 6)) (exwm (0 22))) "A derivative wm based on EXWM (emacs x window manager)" tar ((:url . "https://github.com/tumashu/exwm-x") (:commit . "1e2bbfca872ad76eaa8f1c00d17762bed256881a") (:revdesc . "1e2bbfca872a") (:keywords "window-manager" "exwm") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (eyebrowse . [(20240407 1342) ((dash (2 7 0)) (emacs (24 3 1))) "Easy window config switching" tar ((:url . "https://depp.brause.cc/eyebrowse") (:commit . "473381f4f9e847eb50a40ef2306c027432789754") (:revdesc . "473381f4f9e8") (:keywords "convenience") (:authors ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (eyebrowse-restore . [(20240304 2338) ((emacs (26 3)) (eyebrowse (0 7 8)) (dash (2 19 1)) (s (1 13 0))) "Persistent Eyebrowse for all frames" tar ((:url . "https://github.com/FrostyX/eyebrowse-restore") (:commit . "abb3877e12b41740305741deec37ca681b896e82") (:revdesc . "abb3877e12b4") (:keywords "convenience" "eyebrowse" "helm" "persistent") (:authors ("Jakub Kadlčík" . "frostyx@email.cz")) (:maintainers ("Jakub Kadlčík" . "frostyx@email.cz")) (:maintainer "Jakub Kadlčík" . "frostyx@email.cz"))])
+ (eyuml . [(20141028 2227) ((request (0 2 0)) (s (1 8 0))) "Write textual uml diagram from emacs using yuml.me" tar ((:url . "https://github.com/antham/eyuml") (:commit . "2f259c201c6cc63ee608f75cd85c1ae27f9d2532") (:revdesc . "2f259c201c6c") (:keywords "uml") (:authors ("Anthony HAMON" . "hamon.anth@gmail.com")) (:maintainers ("Anthony HAMON" . "hamon.anth@gmail.com")) (:maintainer "Anthony HAMON" . "hamon.anth@gmail.com"))])
+ (ez-query-replace . [(20210724 2247) ((dash (1 2 0)) (s (1 11 0))) "A smarter context-sensitive query-replace that can be reapplied" tar ((:url . "https://github.com/Wilfred/ez-query-replace") (:commit . "2b68472f4007a73908c3b242e83ac5a7587967ff") (:revdesc . "2b68472f4007") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (eziam-themes . [(20230820 917) nil "The mostly monochrome Eziam theme family" tar ((:url . "https://github.com/thblt/eziam-theme-emacs") (:commit . "8223acc0218130ad2493c1476ad3736ee4fdbb8f") (:revdesc . "8223acc02181") (:keywords "faces") (:authors ("Thibault Polge" . "thibault@thb.lt")) (:maintainers ("Thibault Polge" . "thibault@thb.lt")) (:maintainer "Thibault Polge" . "thibault@thb.lt"))])
+ (f . [(20241003 1131) ((emacs (24 1)) (s (1 7 0)) (dash (2 2 0))) "Modern API for working with files and directories" tar ((:url . "https://github.com/rejeep/f.el") (:commit . "931b6d0667fe03e7bf1c6c282d6d8d7006143c52") (:revdesc . "931b6d0667fe") (:keywords "files" "directories") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Lucien Cartier-Tilet" . "lucien@phundrak.com")) (:maintainer "Lucien Cartier-Tilet" . "lucien@phundrak.com"))])
+ (f3 . [(20180130 1158) ((emacs (24 3)) (helm (2 8 8)) (cl-lib (0 5))) "A helm interface to find" tar ((:url . "https://github.com/cosmicexplorer/f3") (:commit . "000009ce4adf7a57eae80512f29c4ec2a1391ce5") (:revdesc . "000009ce4adf") (:keywords "find" "file" "files" "helm" "fast" "finder"))])
+ (f90-ts-mode . [(20260821 1115) ((emacs (30 1))) "Tree-sitter based Fortran 90 mode" tar ((:url . "https://github.com/mscfd/emacs-f90-ts-mode") (:commit . "756c299f7cd284c0b5af26f15bf88522f1870bc2") (:revdesc . "756c299f7cd2") (:keywords "languages" "treesitter" "fortran") (:authors ("Martin Stein" . "mscfd@gmx.net")) (:maintainers ("Martin Stein" . "mscfd@gmx.net")) (:maintainer "Martin Stein" . "mscfd@gmx.net"))])
+ (fabric . [(20171116 656) nil "Launch Fabric using Emacs" tar ((:url . "https://github.com/nlamirault/fabric.el") (:commit . "df79be341d0b34ed23850f9894136092fa5fea8c") (:revdesc . "df79be341d0b") (:keywords "python" "fabric") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@chmouel.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@chmouel.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@chmouel.com"))])
+ (face-explorer . [(20250117 932) nil "Tools for faces and text properties" tar ((:url . "https://github.com/Lindydancer/face-explorer") (:commit . "4dc83bffbaf41c22795556fed63f8dc938efd9b8") (:revdesc . "4dc83bffbaf4") (:keywords "faces"))])
+ (faceup . [(20170925 1946) nil "Markup language for faces and font-lock regression testing" tar ((:url . "https://github.com/Lindydancer/faceup") (:commit . "6c92dad56a133e14e7b27831e1bcf9b3a71ff154") (:revdesc . "6c92dad56a13") (:keywords "faces" "languages"))])
+ (factlog . [(20130210 140) ((deferred (0 3 1))) "File activity logger" tar ((:url . "https://github.com/tkf/factlog") (:commit . "38f78132ae311faffba98ed5dd18d661af68678e") (:revdesc . "38f78132ae31") (:authors ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainers ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainer "Takafumi Arakaki" . "aka.tkfatgmail.com"))])
+ (faff-theme . [(20260803 1446) ((emacs (28 1)) (modus-themes (5 0 0))) "Light cornsilk theme with warm, earthy colors" tar ((:url . "https://github.com/WJCFerguson/emacs-faff-theme") (:commit . "374759dc41af124480d1ea383d8118f9010f58d2") (:revdesc . "374759dc41af") (:keywords "faces" "theme") (:authors ("James Ferguson" . "")) (:maintainers ("James Ferguson" . "")) (:maintainer "James Ferguson" . ""))])
+ (fakir . [(20140729 1652) ((noflet (0 0 8)) (dash (1 3 2)) (kv (0 0 19))) "Fakeing bits of Emacs" tar ((:url . "https://github.com/nicferrier/emacs-fakir") (:commit . "1fca406ad7de80fece6319ff75d4230b648534b0") (:revdesc . "1fca406ad7de") (:keywords "lisp" "tools") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (fancy-battery . [(20150101 1204) ((emacs (24 1))) "Fancy battery display" tar ((:url . "https://github.com/lunaryorn/fancy-battery.el") (:commit . "bcc2d7960ba207b5b4db96fe40f7d72670fdbb68") (:revdesc . "bcc2d7960ba2") (:keywords "convenience" "tools" "hardware") (:authors ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainer "Sebastian Wiesner" . "swiesner@lunaryorn.com"))])
+ (fancy-compilation . [(20251214 1102) ((emacs (26 1))) "Enhanced compilation output" tar ((:url . "https://codeberg.org/ideasman42/emacs-fancy-compilation") (:commit . "502d36e0fb4c4daedc16ea5d732dcbc8285d6fb1") (:revdesc . "502d36e0fb4c") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (fancy-dabbrev . [(20260717 1243) ((emacs (25 1)) (popup (0 5 3))) "Like dabbrev-expand with preview and popup menu" tar ((:url . "https://github.com/jrosdahl/fancy-dabbrev") (:commit . "9a9296f0dcfe272cdff1fc2e0a6a62b8cdaf11ab") (:revdesc . "9a9296f0dcfe") (:authors ("Joel Rosdahl" . "joel@rosdahl.net")) (:maintainers ("Joel Rosdahl" . "joel@rosdahl.net")) (:maintainer "Joel Rosdahl" . "joel@rosdahl.net"))])
+ (fancy-fill-paragraph . [(20260726 526) ((emacs (29 1))) "Fancy paragraph fill" tar ((:url . "https://codeberg.org/ideasman42/emacs-fancy-fill-paragraph") (:commit . "3af940b027a08a4a5e2d8fca157eb0377e2f40ff") (:revdesc . "3af940b027a0") (:keywords "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (fancy-narrow . [(20171031 16) nil "Narrow-to-region with more eye candy" tar ((:url . "https://github.com/Bruce-Connor/fancy-narrow") (:commit . "9f4a587f6a5a387271fb665e13f59d41fd42504c") (:revdesc . "9f4a587f6a5a") (:keywords "faces" "convenience") (:authors ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainers ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainer "Artur Malabarba" . "bruce.connor.am@gmail.com"))])
+ (fancy-urls-menu . [(20241216 2300) ((emacs (29 1))) "Interface for viewing and opening URLs in current buffer" tar ((:url . "https://codeberg.org/kakafarm/emacs-fancy-urls-menu/") (:commit . "88135b9964edd47f849830308e9be17813598432") (:revdesc . "88135b9964ed") (:keywords "convenience") (:maintainers (nil . "yuval.langer@gmail.com")) (:maintainer nil . "yuval.langer@gmail.com"))])
+ (fantom-mode . [(20221227 218) ((emacs (24 3))) "A major mode for the Fantom programming language" tar ((:url . "https://github.com/thechampagne/fantom-mode") (:commit . "51cd82d29a7dca7bfd043971ba1d0fd21ed11693") (:revdesc . "51cd82d29a7d") (:keywords "files" "fantom"))])
+ (fantom-theme . [(20200328 604) ((emacs (24 1))) "Dark theme based on Phantom Code for VSCode" tar ((:url . "https://github.com/adsva/fantom-emacs-theme") (:commit . "2c1c7fd53086c2ff86ee0961642c3b58e2343c08") (:revdesc . "2c1c7fd53086"))])
+ (fanyi . [(20230926 1849) ((emacs (27 1)) (s (1 12 0))) "Not only English-Chinese translator" tar ((:url . "https://github.com/condy0919/fanyi.el") (:commit . "df91f2d69b7dbd9b7ebb8f54085aee74f22ad3f5") (:revdesc . "df91f2d69b7d") (:keywords "convenience" "tools") (:authors ("Zhiwei Chen" . "condy0919@gmail.com")) (:maintainers ("Zhiwei Chen" . "condy0919@gmail.com")) (:maintainer "Zhiwei Chen" . "condy0919@gmail.com"))])
+ (farmhouse-themes . [(20221025 2054) nil "Farmhouse Themes, dark and light versions" tar ((:url . "https://github.com/emacsorphanage/farmhouse-themes") (:commit . "30c763d01611dad88f1a1ff88451431e2629016d") (:revdesc . "30c763d01611") (:authors ("Matthew Lyon" . "matthew@lyonheart.us")) (:maintainers ("Matthew Lyon" . "matthew@lyonheart.us")) (:maintainer "Matthew Lyon" . "matthew@lyonheart.us"))])
+ (fasd . [(20210104 738) nil "Emacs integration for the command-line productivity booster `fasd'" tar ((:url . "https://framagit.org/steckerhalter/emacs-fasd") (:commit . "c1d92553f33ebb018135c698db1a6d7f86731a26") (:revdesc . "c1d92553f33e") (:keywords "cli" "bash" "zsh" "autojump"))])
+ (fast-scroll . [(20191016 327) ((emacs (25 1)) (cl-lib (0 6 1))) "Some utilities for faster scrolling over large buffers" tar ((:url . "https://github.com/ahungry/fast-scroll") (:commit . "3f6ca0d5556fe9795b74714304564f2295dcfa24") (:revdesc . "3f6ca0d5556f") (:keywords "ahungry" "convenience" "fast" "scroll" "scrolling") (:authors ("Matthew Carter" . "m@ahungry.com")) (:maintainers ("Matthew Carter" . "m@ahungry.com")) (:maintainer "Matthew Carter" . "m@ahungry.com"))])
+ (fastbuild-bff-mode . [(20260411 905) ((emacs (26 1))) "Major mode for FASTBuild BFF files" tar ((:url . "https://github.com/cyberkm/fastbuild-bff-mode") (:commit . "fa3ea52a7542b3110d0320ba4c48ed5cbfde100b") (:revdesc . "fa3ea52a7542") (:keywords "languages" "tools" "build") (:authors ("Pavel Bibergal" . "cyberkm@gmail.com")) (:maintainers ("Pavel Bibergal" . "cyberkm@gmail.com")) (:maintainer "Pavel Bibergal" . "cyberkm@gmail.com"))])
+ (fastdef . [(20160713 1329) ((ivy (0 7 0)) (w3m (0 0))) "Insert terminology from Google top search results" tar ((:url . "https://github.com/redguardtoo/fastdef") (:commit . "0696f41dc150d35ce31fe8d2ea74f4173818bb55") (:revdesc . "0696f41dc150") (:keywords "terminology" "org-mode" "markdown") (:authors ("Chen Bin" . "cheninDOTshATgmailDOTcom")) (:maintainers ("Chen Bin" . "cheninDOTshATgmailDOTcom")) (:maintainer "Chen Bin" . "cheninDOTshATgmailDOTcom"))])
+ (fastnav . [(20120211 1457) nil "Fast navigation and editing routines" tar ((:url . "https://github.com/gleber/fastnav.el") (:commit . "1019ba2b61d1a070204099b23da347278a61bc89") (:revdesc . "1019ba2b61d1") (:keywords "nav" "fast" "fastnav" "navigation") (:authors ("Zsolt Terek" . "zsolt@google.com")) (:maintainers ("Zsolt Terek" . "zsolt@google.com")) (:maintainer "Zsolt Terek" . "zsolt@google.com"))])
+ (faust-mode . [(20201004 1353) nil "Faust syntax colorizer for Emacs" tar ((:url . "https://github.com/rukano/emacs-faust-mode") (:commit . "2a56cda14b152d5471f21a5d82f23c141dc7134c") (:revdesc . "2a56cda14b15") (:keywords "languages" "faust") (:authors ("rukano" . "rukano@gmail.com")) (:maintainers ("Yassin Philip" . "xaccrocheur@gmail.com")) (:maintainer "Yassin Philip" . "xaccrocheur@gmail.com"))])
+ (faustine . [(20171122 1202) ((emacs (24 3)) (faust-mode (0 3))) "Edit, visualize, build and run Faust code" tar ((:url . "https://bitbucket.org/yphil/faustine") (:commit . "07a38963111518f86123802f9d477be0d4689a3f") (:revdesc . "07a389631115") (:keywords "languages" "faust") (:authors ("Yassin Philip" . "xaccrocheur@gmail.com")) (:maintainers ("Yassin Philip" . "xaccrocheur@gmail.com")) (:maintainer "Yassin Philip" . "xaccrocheur@gmail.com"))])
+ (fb2-reader . [(20250326 2240) ((emacs (26 2)) (f (0 17)) (s (1 11 0)) (dash (2 12 0)) (visual-fill-column (2 2)) (async (1 9 4))) "Read FB2 and FB2.ZIP documents" tar ((:url . "https://github.com/jumper047/fb2-reader") (:commit . "5244d481ed19fc9c4dff7f6394fd68e400b828a3") (:revdesc . "5244d481ed19") (:keywords "multimedia" "ebook" "fb2") (:authors ("Dmitriy Pshonko" . "jumper047@gmail.com")) (:maintainers ("Dmitriy Pshonko" . "jumper047@gmail.com")) (:maintainer "Dmitriy Pshonko" . "jumper047@gmail.com"))])
+ (fcitx . [(20240121 1829) nil "Make fcitx better in Emacs" tar ((:url . "https://github.com/cute-jumper/fcitx.el") (:commit . "b399482ed8db5893db2701df01db4c38cccda495") (:revdesc . "b399482ed8db") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (fcopy . [(20150304 1403) nil "Funny Copy, set past point HERE then search copy text" tar ((:url . "https://github.com/ataka/fcopy") (:commit . "e355f6ec889d8ecbdb096019c2dc660b1cec4941") (:revdesc . "e355f6ec889d") (:keywords "convenience") (:authors ("Masayuki Ataka" . "masayuki.ataka@gmail.com")) (:maintainers ("Masayuki Ataka" . "masayuki.ataka@gmail.com")) (:maintainer "Masayuki Ataka" . "masayuki.ataka@gmail.com"))])
+ (fd-dired . [(20260104 335) ((emacs (25))) "Find-dired alternative using fd" tar ((:url . "https://github.com/yqrashawn/fd-dired") (:commit . "c5b31aec25d20c3219e2635b82efeba532895278") (:revdesc . "c5b31aec25d2") (:keywords "tools" "fd" "find" "dired") (:authors ("Rashawn Zhang" . "namy.19@gmail.com")) (:maintainers ("Rashawn Zhang" . "namy.19@gmail.com")) (:maintainer "Rashawn Zhang" . "namy.19@gmail.com"))])
+ (feature-mode . [(20251015 2134) ((emacs (28 1))) "Major mode for editing Gherkin (i.e. Cucumber) user stories" tar ((:url . "https://github.com/freesteph/cucumber.el") (:commit . "8d43c37ddf986af769870da27c31c1911f35b205") (:revdesc . "8d43c37ddf98"))])
+ (fedi . [(20260509 801) ((emacs (28 1)) (markdown-mode (2 5))) "Helper functions for fediverse clients" tar ((:url . "https://codeberg.org/martianh/fedi.el") (:commit . "91f28ee199a499b8d6e1b9c7a0f1c15f8a382198") (:revdesc . "91f28ee199a4") (:authors ("Marty Hiatt" . "martianh@disroot.org")) (:maintainers ("Marty Hiatt" . "martianh@disroot.org")) (:maintainer "Marty Hiatt" . "martianh@disroot.org"))])
+ (feebleline . [(20190822 1401) nil "Replace modeline with a slimmer proxy" tar ((:url . "https://github.com/tautologyclub/feebleline") (:commit . "b2f2db25cac77817bf0c49ea2cea6383556faea0") (:revdesc . "b2f2db25cac7") (:authors ("Benjamin Lindqvist" . "benjamin.lindqvist@gmail.com")) (:maintainers ("Benjamin Lindqvist" . "benjamin.lindqvist@gmail.com")) (:maintainer "Benjamin Lindqvist" . "benjamin.lindqvist@gmail.com"))])
+ (feed-discovery . [(20200714 1118) ((emacs (25 1)) (dash (2 16 0))) "Discover feed url by RSS/Atom autodiscovery" tar ((:url . "https://github.com/HKey/feed-discovery") (:commit . "3812439c845c184eaf164d3ac8935de135259855") (:revdesc . "3812439c845c") (:authors ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainers ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainer "Hiroki YAMAKAWA" . "s06139@gmail.com"))])
+ (feline . [(20230301 1350) ((emacs (28 1))) "A modeline with very little" tar ((:url . "https://opensource.chee.party/chee/feline-mode") (:commit . "8c46b1be9e45a38281aa9ddae79fda3c8e4cb5c5") (:revdesc . "8c46b1be9e45") (:authors ("chee" . "emacs@chee.party")) (:maintainers ("chee" . "emacs@chee.party")) (:maintainer "chee" . "emacs@chee.party"))])
+ (fennel-mode . [(20260726 2034) ((emacs (26 1))) "A major-mode for editing Fennel code" tar ((:url . "https://git.sr.ht/~technomancy/fennel-mode") (:commit . "2cf12616455d5b042cca8394f3ceb70b138e3043") (:revdesc . "2cf12616455d") (:keywords "languages" "tools"))])
+ (fetch . [(20131201 730) nil "Fetch and unpack resources" tar ((:url . "https://github.com/crshd/fetch.el") (:commit . "3f2793afcbbc32f320e572453166f9354ecc6d06") (:revdesc . "3f2793afcbbc") (:authors ("Christian 'crshd' Brassat" . "christian.brassat@gmail.com")) (:maintainers ("Christian 'crshd' Brassat" . "christian.brassat@gmail.com")) (:maintainer "Christian 'crshd' Brassat" . "christian.brassat@gmail.com"))])
+ (ffmpeg-player . [(20260101 559) ((emacs (24 4)) (s (1 12 0)) (f (0 20 0))) "Play video using ffmpeg" tar ((:url . "https://github.com/jcs-elpa/ffmpeg-player") (:commit . "97205aa6c47875c75d10385f22ea0ef3c8a1a880") (:revdesc . "97205aa6c478") (:keywords "multimedia" "video" "ffmpeg" "buffering" "images") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (ffmpeg-utils . [(20230305 709) ((emacs (25 1)) (alert (1 2)) (transient (0 1 0))) "FFmpeg command utilities wrappers" tar ((:url . "https://repo.or.cz/ffmpeg-utils.git") (:commit . "064d61527bc6b6a1d0fb0065f8a7bae3bbd4cefc") (:revdesc . "064d61527bc6") (:keywords "multimedia") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (fic-mode . [(20180603 2035) nil "Show FIXME/TODO/BUG(...) in special face only in comments and strings" tar ((:url . "https://github.com/lewang/fic-mode") (:commit . "a05fc36ed54ba0c6dc22ac216a6a72cf191ca13d") (:revdesc . "a05fc36ed54b"))])
+ (fifo-class . [(20160425 558) nil "First in first out abstract class" tar ((:url . "https://github.com/mola-T/fifo-class") (:commit . "8fe4cf690727f4ac7b67f29c55f845df023c3f21") (:revdesc . "8fe4cf690727") (:keywords "lisp") (:authors ("Mola-T" . "Mola@molamola.xyz")) (:maintainers ("Mola-T" . "Mola@molamola.xyz")) (:maintainer "Mola-T" . "Mola@molamola.xyz"))])
+ (figlet . [(20160218 2237) nil "Annoy people with big, ascii art text" tar ((:url . "https://github.com/jpkotta/figlet") (:commit . "19a38783a90e151faf047ff233a21a729db0cea9") (:revdesc . "19a38783a90e") (:authors ("Philip Jackson" . "phil@shellarchive.co.uk")) (:maintainers ("Philip Jackson" . "phil@shellarchive.co.uk")) (:maintainer "Philip Jackson" . "phil@shellarchive.co.uk"))])
+ (file-info . [(20260509 754) ((emacs (28 1)) (hydra (0 15 0)) (browse-at-remote (0 15 0))) "Show pretty information about current file" tar ((:url . "https://github.com/artawower/file-info.el") (:commit . "c20ab17ee23e7e1b07975cce9a3c2d5e3dff14f6") (:revdesc . "c20ab17ee23e") (:authors ("Artur Yaroshenko" . "artawower@protonmail.com")) (:maintainers ("Artur Yaroshenko" . "artawower@protonmail.com")) (:maintainer "Artur Yaroshenko" . "artawower@protonmail.com"))])
+ (filelock . [(20180524 2215) ((emacs (24)) (cl-lib (0)) (f (0))) "Functions for manipulating file locks" tar ((:url . "https://github.com/DarwinAwardWinner/emacs-filelock") (:commit . "17a5ca6e0dee14d2e7d92c84be91143bca9d9663") (:revdesc . "17a5ca6e0dee") (:keywords "extensions" "files" "tools"))])
+ (filetags . [(20190706 804) ((emacs (24 4))) "Package to manage filetags in filename" tar ((:url . "https://github.com/DerBeutlin/filetags.el") (:commit . "71667a819e46eb1f6e30e2fa61321acb7c6ccb3d") (:revdesc . "71667a819e46") (:keywords "convenience" "files"))])
+ (filetree . [(20241229 1923) ((dash (2 12 0)) (helm (3 7 0)) (seq (2 23)) (transient (0 4 0))) "File tree view/manipulatation package" tar ((:url . "https://github.com/knpatel401/filetree") (:commit . "dfdddc02a65b7af747f053593a9c9c2db73c45a5") (:revdesc . "dfdddc02a65b") (:authors ("Ketan Patel" . "knpatel401@gmail.com")) (:maintainers ("Ketan Patel" . "knpatel401@gmail.com")) (:maintainer "Ketan Patel" . "knpatel401@gmail.com"))])
+ (fill-column-indicator . [(20200806 2239) nil "Graphically indicate the fill column" tar ((:url . "https://github.com/alpaker/fill-column-indicator") (:commit . "c35f9de072c241699b57bcb46da84bed5af29cfe") (:revdesc . "c35f9de072c2") (:keywords "convenience") (:authors ("Alp Aker" . "alp.tekin.aker@gmail.com")) (:maintainers ("Alp Aker" . "alp.tekin.aker@gmail.com")) (:maintainer "Alp Aker" . "alp.tekin.aker@gmail.com"))])
+ (fill-function-arguments . [(20240213 2249) ((emacs (24 4))) "Convert function arguments to/from single line" tar ((:url . "https://github.com/davidshepherd7/fill-function-arguments") (:commit . "9def8ced5241b10067ae85c89ae34359c2e4847a") (:revdesc . "9def8ced5241") (:keywords "convenience") (:authors ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainers ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainer "David Shepherd" . "davidshepherd7@gmail.com"))])
+ (fill-page . [(20260101 559) ((emacs (24 4))) "Fill buffer so you don't see empty lines at the end" tar ((:url . "https://github.com/jcs-elpa/fill-page") (:commit . "c9bc538f72869f572bf71c95d2b9b6dac5b4b169") (:revdesc . "c9bc538f7286") (:keywords "convenience" "fill" "page" "buffer") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (fillcode . [(20200524 2226) nil "Fill (wrap) function calls and expressions in source code" tar ((:url . "https://snarfed.org/fillcode") (:commit . "4d206982b6aaa493d709c84aea206cabb8b4038c") (:revdesc . "4d206982b6aa") (:authors ("Ryan Barrett" . "fillcode@ryanb.org")) (:maintainers ("Ryan Barrett" . "fillcode@ryanb.org")) (:maintainer "Ryan Barrett" . "fillcode@ryanb.org"))])
+ (filldent . [(20220423 2216) ((emacs (24 1))) "Fill or indent" tar ((:url . "https://github.com/duckwork/filldent.el") (:commit . "2f32e0cf5e27c613f962fa41bf3427bbdc04e6c0") (:revdesc . "2f32e0cf5e27") (:authors ("Case Duckworth" . "acdw@acdw.net")) (:maintainers ("Case Duckworth" . "acdw@acdw.net")) (:maintainer "Case Duckworth" . "acdw@acdw.net"))])
+ (find-by-pinyin-dired . [(20180210 218) ((pinyinlib (0 1 0))) "Find file by first PinYin character of Chinese Hanzi" tar ((:url . "https://github.com/redguardtoo/find-by-pinyin-dired") (:commit . "3b4781148dddc84a701ad76c0934ed991ecd59d5") (:revdesc . "3b4781148ddd") (:keywords "hanzi" "chinese" "dired" "find" "file" "pinyin") (:authors ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainers ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainer "Chen Bin" . "chenbin.sh@gmail.com"))])
+ (find-dupes-dired . [(20210426 835) ((emacs (26 1))) "Find dupes and handle in dired" tar ((:url . "https://github.com/ShuguangSun/find-dupes-dired") (:commit . "af56f75afc240d8121c8944a614a272be811830c") (:revdesc . "af56f75afc24") (:keywords "tools") (:authors ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainers ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainer "Shuguang Sun" . "shuguang79@qq.com"))])
+ (find-file-in-project . [(20250612 234) ((emacs (25 1))) "Find file/directory and review Diff/Patch/Commit efficiently" tar ((:url . "https://github.com/redguardtoo/find-file-in-project") (:commit . "6d6e132f5e9ebcbe5b475df939c556794dd1ce64") (:revdesc . "6d6e132f5e9e") (:keywords "project" "convenience") (:maintainers ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainer "Chen Bin" . "chenbin.sh@gmail.com"))])
+ (find-file-in-repository . [(20210301 2202) nil "Quickly find files in a git, mercurial or other repository" tar ((:url . "https://github.com/hoffstaetter/find-file-in-repository") (:commit . "10f5bd919ce35691addc5ce0d281597a46813a79") (:revdesc . "10f5bd919ce3") (:keywords "files" "convenience" "repository" "project" "source control") (:authors ("Samuel Hoffstaetter" . "samuel@hoffstaetter.com")) (:maintainers ("Samuel Hoffstaetter" . "samuel@hoffstaetter.com")) (:maintainer "Samuel Hoffstaetter" . "samuel@hoffstaetter.com"))])
+ (find-file-rg . [(20220314 1540) ((emacs (25 1))) "Find file in project using ripgrep" tar ((:url . "https://github.com/muffinmad/emacs-find-file-rg") (:commit . "404b1cc97c2f700d3dc1c66b640f96ed5a268dc3") (:revdesc . "404b1cc97c2f") (:keywords "tools") (:authors ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainers ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainer "Andrii Kolomoiets" . "andreyk.mad@gmail.com"))])
+ (find-temp-file . [(20240512 1635) nil "Open quickly a temporary file" tar ((:url . "https://github.com/thisirs/find-temp-file.git") (:commit . "76414b6ba8660905675ec8969f5db0adb270bb80") (:revdesc . "76414b6ba866") (:keywords "convenience") (:authors ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainers ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainer "Sylvain Rousseau" . "thisirsatgmaildotcom"))])
+ (find-things-fast . [(20150519 2226) nil "Find things fast, leveraging the power of git" tar ((:url . "https://github.com/eglaysher/find-things-fast") (:commit . "281dcb5a2e2db1013246dcac5111808352a8ea95") (:revdesc . "281dcb5a2e2d") (:keywords "project" "convenience"))])
+ (findr . [(20130127 2032) nil "Breadth-first file-finding facility for (X)Emacs" tar ((:url . "https://github.com/emacsorphanage/findr") (:commit . "1ddbc0464bb05dcda392b62666ad17239a2152d3") (:revdesc . "1ddbc0464bb0") (:keywords "files") (:authors ("David Bakhash" . "cadet@bu.edu")) (:maintainers ("David Bakhash" . "cadet@bu.edu")) (:maintainer "David Bakhash" . "cadet@bu.edu"))])
+ (fingers . [(20160817 829) nil "Modal editing with universal text manipulation helpers" tar ((:url . "https://github.com/fgeller/fingers.el") (:commit . "7de351448a6f5ea7aa7a25db6c90d5138f87eb16") (:revdesc . "7de351448a6f") (:keywords "fingers" "modal" "editing" "workman") (:authors ("Felix Geller" . "fgeller@gmail.com")) (:maintainers ("Felix Geller" . "fgeller@gmail.com")) (:maintainer "Felix Geller" . "fgeller@gmail.com"))])
+ (finito . [(20260111 1424) ((emacs (28 1)) (dash (2 19 1)) (request (0 3 2)) (f (0 2 0)) (s (1 12 0)) (transient (0 3 0)) (graphql (0 1 1)) (async (1 9 3))) "View and collect books" tar ((:url . "https://github.com/LaurenceWarne/finito.el") (:commit . "4f768de5ce9784ca54125c5056b0a026ba2eb42c") (:revdesc . "4f768de5ce97") (:keywords "outlines"))])
+ (fiplr . [(20140724 645) ((grizzl (0 1 0)) (cl-lib (0 1))) "Fuzzy Search for Files in Projects" tar ((:url . "https://github.com/d11wtq/fiplr") (:commit . "bb6b90ba3c558988c195048c4c40140b2ee17530") (:revdesc . "bb6b90ba3c55") (:keywords "convenience" "usability" "project") (:authors ("Chris Corbyn" . "chris@w3style.co.uk")) (:maintainers ("Chris Corbyn" . "chris@w3style.co.uk")) (:maintainer "Chris Corbyn" . "chris@w3style.co.uk"))])
+ (fira-code-mode . [(20260413 1901) ((emacs (24 4))) "Minor mode for Fira Code ligatures using prettify-symbols" tar ((:url . "https://github.com/jming422/fira-code-mode") (:commit . "5a8e2e96c40822b8e11a8f16392bc3ccdd6c69fd") (:revdesc . "5a8e2e96c408") (:keywords "faces" "ligatures" "fonts" "programming-ligatures") (:authors ("Jonathan Ming" . "jming422@gmail.com")) (:maintainers ("Jonathan Ming" . "jming422@gmail.com")) (:maintainer "Jonathan Ming" . "jming422@gmail.com"))])
+ (firebase-rules-mode . [(20240520 1326) ((emacs (24 3))) "Editing support for firebase.rules" tar ((:url . "https://github.com/dherbst/firebase-rules-mode") (:commit . "c88cb10251cdfce931e4fe48ce76eaa50cc7e791") (:revdesc . "c88cb10251cd") (:keywords "languages") (:authors ("Darrel Herbst" . "dherbst@gmail.com")) (:maintainers ("Darrel Herbst" . "dherbst@gmail.com")) (:maintainer "Darrel Herbst" . "dherbst@gmail.com"))])
+ (firecode-theme . [(20170808 1311) ((emacs (24 0))) "An Emacs 24 theme based on FireCode (tmTheme)" tar ((:url . "https://github.com/emacsfodder/tmtheme-to-deftheme") (:commit . "8b7b03ecdd41e70dab145b98906017e1392eaef4") (:revdesc . "8b7b03ecdd41"))])
+ (fireplace . [(20200402 2206) nil "A cozy fireplace for emacs" tar ((:url . "https://github.com/johanvts/emacs-fireplace") (:commit . "f6c23e259349922aae25cf2898ba815a7d8f2527") (:revdesc . "f6c23e259349") (:keywords "games") (:authors ("Johan Sivertsen" . "johanvts@gmail.com")) (:maintainers ("Johan Sivertsen" . "johanvts@gmail.com")) (:maintainer "Johan Sivertsen" . "johanvts@gmail.com"))])
+ (firestarter . [(20210508 1626) ((emacs (24 1))) "Execute (shell) commands on save" tar ((:url . "https://depp.brause.cc/firestarter") (:commit . "76070c9074aa363350abe6ad06143e90b3e12ab1") (:revdesc . "76070c9074aa") (:keywords "convenience") (:authors ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (firrtl-mode . [(20231127 1237) ((emacs (24 3))) "Mode for working with FIRRTL files" tar ((:url . "https://github.com/ibm/firrtl-mode") (:commit . "0c7d971899f93367b78e13d70d64cfb89d80b45c") (:revdesc . "0c7d971899f9") (:keywords "languages" "firrtl") (:authors ("Schuyler Eldridge" . "schuyler.eldridge@ibm.com")) (:maintainers ("Schuyler Eldridge" . "schuyler.eldridge@ibm.com")) (:maintainer "Schuyler Eldridge" . "schuyler.eldridge@ibm.com"))])
+ (firstly-search . [(20260323 745) ((emacs (29 1)) (compat (30 1))) "Search with any key: Dired, Package, Buffer menu modes" tar ((:url . "https://codeberg.org/Anoncheg/firstly-search") (:commit . "a6d8140295783b94cc6e5eef25ac8913a2b9b9f2") (:revdesc . "a6d814029578") (:keywords "matching" "isearch" "navigation" "dired" "packagemenu") (:authors (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainers (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainer nil . "github.com/Anoncheg1,codeberg.org/Anoncheg"))])
+ (fish-completion . [(20240518 1403) ((emacs (25 1))) "Fish completion for pcomplete (shell and Eshell)" tar ((:url . "https://gitlab.com/Ambrevar/emacs-fish-completion") (:commit . "1256f137a2039805d4e87f8e6c11a162ed019587") (:revdesc . "1256f137a203") (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainers ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz"))])
+ (fish-mode . [(20240129 1213) ((emacs (24))) "Major mode for fish shell scripts" tar ((:url . "https://github.com/wwwjfy/emacs-fish") (:commit . "2526b1803b58cf145bc70ff6ce2adb3f6c246f89") (:revdesc . "2526b1803b58") (:keywords "fish" "shell") (:authors ("Tony Wang" . "wwwjfy@gmail.com")) (:maintainers ("Tony Wang" . "wwwjfy@gmail.com")) (:maintainer "Tony Wang" . "wwwjfy@gmail.com"))])
+ (fit-text-scale . [(20211230 2002) ((emacs (25 1))) "Fit text by scaling" tar ((:url . "https://gitlab.com/marcowahl/fit-text-scale") (:commit . "c53c8ce606380088643463848a9ee3502b0c64f4") (:revdesc . "c53c8ce60638") (:keywords "convenience") (:authors ("Marco Wahl" . "marcowahlsoft@gmail.com")) (:maintainers ("Marco Wahl" . "marcowahlsoft@gmail.com")) (:maintainer "Marco Wahl" . "marcowahlsoft@gmail.com"))])
+ (fix-input . [(20260802 956) ((emacs (24 4))) "Make input methods play nicely with alternative layouts" tar ((:url . "https://github.com/mrkkrp/fix-input") (:commit . "c68b830201e3910270f906cbe6784941aad6862b") (:revdesc . "c68b830201e3") (:keywords "convenience" "input") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (fix-muscle-memory . [(20210702 1755) nil "Simple hacks to fix muscle memory problems" tar ((:url . "https://github.com/jonnay/fix-muscle-memory") (:commit . "b8d4b8025d758762f4459c70c3a7a209ead865ed") (:revdesc . "b8d4b8025d75") (:keywords "spelling" "typing") (:authors ("Jonathan Arkell" . "jonnay@jonnay.net")) (:maintainers ("Jonathan Arkell" . "jonnay@jonnay.net")) (:maintainer "Jonathan Arkell" . "jonnay@jonnay.net"))])
+ (fix-word . [(20260802 938) ((emacs (24 1)) (cl-lib (0 5))) "Convenient word transformation" tar ((:url . "https://github.com/mrkkrp/fix-word") (:commit . "e29889f9819488360b48237dfbf06ce2a75c01f5") (:revdesc . "e29889f98194") (:keywords "word" "convenience") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (fixed-page-mode . [(20230531 929) ((emacs (24 3))) "A fixed page length mode" tar ((:url . "https://gitlab.com/igorwojnicki/fixed-page-mode") (:commit . "608dd1120d35b02a02570f024c585f7569508586") (:revdesc . "608dd1120d35") (:keywords "wp") (:authors ("Igor Wojnicki" . "wojnicki@gmail.com")) (:maintainers ("Igor Wojnicki" . "wojnicki@gmail.com")) (:maintainer "Igor Wojnicki" . "wojnicki@gmail.com"))])
+ (fixmee . [(20230415 2027) ((button-lock (1 0 2)) (nav-flash (1 0 0)) (back-button (0 6 0)) (smartrep (0 0 3)) (string-utils (0 3 2)) (tabulated-list (0))) "Quickly navigate to FIXME notices in code" tar ((:url . "https://github.com/rolandwalker/fixmee") (:commit . "54500aaa8ae019034dc170af33f43465f5f03123") (:revdesc . "54500aaa8ae0") (:keywords "navigation" "convenience") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (fj . [(20260509 741) ((emacs (29 1)) (fedi (0 2)) (tp (0 8)) (transient (0 10 0)) (magit (4 3 8))) "Client for Forgejo instances" tar ((:url . "https://codeberg.org/martianh/fj.el") (:commit . "4832dcfcd167d1975bb44a024881c75fef64182e") (:revdesc . "4832dcfcd167") (:keywords "git" "convenience") (:authors ("Marty Hiatt" . "martianh@disroot.org")) (:maintainers ("Marty Hiatt" . "martianh@disroot.org")) (:maintainer "Marty Hiatt" . "martianh@disroot.org"))])
+ (flame . [(20180303 2016) ((emacs (24))) "Automatic generation of flamage, as if we needed more" tar ((:url . "https://github.com/mschuldt/flame") (:commit . "2cfb860a483197e92a4c20d7b9b055d586e76fe0") (:revdesc . "2cfb860a4831") (:keywords "games") (:authors ("Ian G. Batten" . "batten@uk.ac.bham.multics") ("Noah Friedman" . "friedman@splode.com")) (:maintainers ("Noah Friedman" . "friedman@splode.com")) (:maintainer "Noah Friedman" . "friedman@splode.com"))])
+ (flames-of-freedom . [(20191202 1637) ((emacs (25 1))) "The flames of freedom" tar ((:url . "https://github.com/wiz21b/FlamesOfFreedom") (:commit . "5e47ff27cfa2f7c06081be2ffefe91a731efd012") (:revdesc . "5e47ff27cfa2") (:keywords "multimedia") (:authors ("Stéphane Champailler" . "schampailler@skynet.be")) (:maintainers ("Stéphane Champailler" . "schampailler@skynet.be")) (:maintainer "Stéphane Champailler" . "schampailler@skynet.be"))])
+ (flappymacs . [(20171023 1004) nil "Flappybird clone for emacs" tar ((:url . "https://github.com/taksatou/flappymacs") (:commit . "fac0011983251d5c44f4ed1eacac03f5de3caac4") (:revdesc . "fac001198325") (:keywords "games"))])
+ (flash . [(20260711 805) ((emacs (27 1))) "Flash-style navigation" tar ((:url . "https://github.com/Prgebish/flash") (:commit . "db3bfa84866f143a0665d1b5a48c3b30dc7b528f") (:revdesc . "db3bfa84866f") (:keywords "convenience" "navigation") (:authors ("Vadim Pavlov" . "https://github.com/Prgebish")) (:maintainers ("Vadim Pavlov" . "https://github.com/Prgebish")) (:maintainer "Vadim Pavlov" . "https://github.com/Prgebish"))])
+ (flash-region . [(20130923 1817) nil "Flash a region" tar ((:url . "https://github.com/Fuco1/flash-region") (:commit . "261b3597b23cdd40e5c14262a5687bcc6c1d0901") (:revdesc . "261b3597b23c") (:keywords "utility") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (flatbuffers-mode . [(20210710 1004) ((emacs (24 3))) "Major mode for editing flatbuffers" tar ((:url . "https://github.com/Asalle/flatbuffers-mode") (:commit . "8e7783db45a64c9456130fd0c108ac12d45a7789") (:revdesc . "8e7783db45a6") (:keywords "flatbuffers" "languages") (:authors ("Asal Mirzaieva" . "asalle.kim@gmail.com")) (:maintainers ("Asal Mirzaieva" . "asalle.kim@gmail.com")) (:maintainer "Asal Mirzaieva" . "asalle.kim@gmail.com"))])
+ (flatfluc-theme . [(20260105 2045) ((emacs (26 1))) "Custom merge of flucui and flatui themes" tar ((:url . "https://github.com/seblemaguer/flatfluc-theme") (:commit . "483f25a8d5c332851f0b216bee58e33e95632769") (:revdesc . "483f25a8d5c3") (:keywords "lisp") (:authors ("Sébastien Le Maguer" . "lemagues@tcd.ie")) (:maintainers ("Sébastien Le Maguer" . "lemagues@tcd.ie")) (:maintainer "Sébastien Le Maguer" . "lemagues@tcd.ie"))])
+ (flatland-black-theme . [(20170808 1312) ((emacs (24 0))) "An Emacs 24 theme based on Flatland Black (tmTheme)" tar ((:url . "https://github.com/emacsfodder/flatland-black-theme") (:commit . "348c5d5fe615e6ea13cadc17f046e506e789ce07") (:revdesc . "348c5d5fe615"))])
+ (flatland-theme . [(20171113 1521) nil "A simple theme for Emacs based on the Flatland theme for Sublime Text" tar ((:url . "https://github.com/gregchapple/flatland-emacs") (:commit . "a98a6f19ad4dff0fa3fad1ea487b7d0ef634a19a") (:revdesc . "a98a6f19ad4d") (:authors ("Greg Chapple" . "info@gregchapple.com")) (:maintainers ("Greg Chapple" . "info@gregchapple.com")) (:maintainer "Greg Chapple" . "info@gregchapple.com"))])
+ (flatui-dark-theme . [(20170513 1422) ((emacs (24))) "Dark color theme with colors from https://flatuicolors.com/" tar ((:url . "https://github.com/theasp/flatui-dark-theme") (:commit . "5b959a9f743f891e4660b1b432086417947872ea") (:revdesc . "5b959a9f743f") (:keywords "color" "theme" "dark" "flatui" "faces") (:authors ("Andrew Phillips" . "theasp@gmail.com")) (:maintainers ("Andrew Phillips" . "theasp@gmail.com")) (:maintainer "Andrew Phillips" . "theasp@gmail.com"))])
+ (flatui-theme . [(20160619 127) nil "A color theme for Emacs based on flatuicolors.com" tar ((:url . "https://github.com/john2x/flatui-theme.el") (:commit . "9c15db5526c15c8dba55023f5698372b19c2a780") (:revdesc . "9c15db5526c1") (:authors ("John Louis Del Rosario" . "john2x@gmail.com")) (:maintainers ("John Louis Del Rosario" . "john2x@gmail.com")) (:maintainer "John Louis Del Rosario" . "john2x@gmail.com"))])
+ (fleetish-theme . [(20230407 1438) ((emacs (24))) "A take on the JetBrains Fleet theme" tar ((:url . "https://github.com/nylar/fleetish-emacs-theme") (:commit . "482513562b6691c7f3440b62a31033d22378ed96") (:revdesc . "482513562b66") (:authors ("Scott Raine" . "scott@raine.sh")) (:maintainers ("Scott Raine" . "scott@raine.sh")) (:maintainer "Scott Raine" . "scott@raine.sh"))])
+ (flex-autopair . [(20120809 1218) nil "Automatically insert pair braces and quotes, insertion conditions & actions are highly customizable" tar ((:url . "https://github.com/uk-ar/flex-autopair.el") (:commit . "55d128749cc070551a1624a4508d1c4f6d76f7cf") (:revdesc . "55d128749cc0") (:keywords "keyboard" "input") (:authors ("Yuuki Arisawa" . "yuuki.ari@gmail.com")) (:maintainers ("Yuuki Arisawa" . "yuuki.ari@gmail.com")) (:maintainer "Yuuki Arisawa" . "yuuki.ari@gmail.com"))])
+ (flex-compile . [(20260819 1449) ((emacs (26 1)) (dash (2 17 0)) (buffer-manage (1 2 1))) "Run, evaluate and compile across many languages" tar ((:url . "https://github.com/plandes/flex-compile") (:commit . "6e56021cfa5a9f1e2f3fa063ba610331eb20047d") (:revdesc . "6e56021cfa5a") (:keywords "compilation" "integration" "processes"))])
+ (flex-isearch . [(20170308 2010) nil "Flex matching (like ido) in isearch" tar ((:url . "https://bitbucket.org/jpkotta/flex-isearch") (:commit . "b1f7e04de762282c276343cc2709af9ff4abc9d2") (:revdesc . "b1f7e04de762") (:keywords "convenience" "search") (:authors ("Jonathan Kotta" . "jpkotta@gmail.com")) (:maintainers ("Jonathan Kotta" . "jpkotta@gmail.com")) (:maintainer "Jonathan Kotta" . "jpkotta@gmail.com"))])
+ (flex-x . [(20260820 2207) ((emacs (30 1))) "Extended flex completion style" tar ((:url . "https://github.com/kn66/flex-x") (:commit . "bf090daf2942968d9523e25bcd3bbad22f8079bb") (:revdesc . "bf090daf2942") (:keywords "convenience" "matching") (:authors ("kn66" . "https://github.com/kn66")) (:maintainers ("kn66" . "https://github.com/kn66")) (:maintainer "kn66" . "https://github.com/kn66"))])
+ (flexoki-themes . [(20260516 1228) ((emacs (27 1))) "An inky color scheme for prose and code" tar ((:url . "https://github.com/crmsnbleyd/flexoki-emacs-theme") (:commit . "3d6074282ff6e181e98f16000f3355fb977e2b56") (:revdesc . "3d6074282ff6") (:keywords "faces" "theme") (:authors ("Andrew Jose" . "mail@drewsh.com")) (:maintainers ("Andrew Jose" . "mail@drewsh.com")) (:maintainer "Andrew Jose" . "mail@drewsh.com"))])
+ (flim . [(20251102 2052) ((emacs (24 5)) (apel (0)) (oauth2 (0 17))) "Basic message representation and encoding features" tar ((:url . "https://github.com/emacsmirror/flim") (:commit . "b7265bae4b11a1434f5c0acf78ba13580bf00cfc") (:revdesc . "b7265bae4b11") (:keywords "mime" "multimedia" "mail" "news"))])
+ (flimenu . [(20200810 1510) ((emacs (24 4))) "Flatten imenu automatically" tar ((:url . "https://github.com/IvanMalison/flimenu") (:commit . "4c0ff37cf3bd6c836bd136b5f6c450560a6c92b9") (:revdesc . "4c0ff37cf3bd") (:keywords "imenu" "browse" "structure" "hook" "mode" "matching" "tools" "convenience" "files") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (fliptext . [(20171124 2056) nil "Input method for flipping characters upside down" tar ((:url . "https://github.com/andre-r/fliptext.el") (:commit . "fd821f645ffebae6ae3894afa7ba7fc06f91afc6") (:revdesc . "fd821f645ffe") (:keywords "games" "i18n") (:authors ("André Riemann" . "andre.riemann@web.de")) (:maintainers ("André Riemann" . "andre.riemann@web.de")) (:maintainer "André Riemann" . "andre.riemann@web.de"))])
+ (floobits . [(20211018 550) ((json (1 2)) (highlight (0))) "Floobits plugin for real-time collaborative editing" tar ((:url . "https://github.com/Floobits/floobits-emacs") (:commit . "93b3317fb6c842efe165e54c8a32bf51d436837d") (:revdesc . "93b3317fb6c8") (:keywords "comm" "tools"))])
+ (flow-js2-mode . [(20191213 1004) ((flow-minor-mode (0)) (js2-mode (0)) (emacs (25 1))) "Support for flow annotations in js2-mode" tar ((:url . "https://github.com/Fuco1/flow-js2-mode") (:commit . "7520bdda70287e8d57b3f41033b1e0ca59a3be95") (:revdesc . "7520bdda7028") (:keywords "languages" "extensions") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (flow-minor-mode . [(20200905 1730) ((emacs (25 1))) "Flow type mode based on web-mode" tar ((:url . "https://github.com/an-sh/flow-minor-mode") (:commit . "804217a15a28f6918fba93c91d495ed7d50b0495") (:revdesc . "804217a15a28"))])
+ (flower . [(20220416 1744) ((emacs (24 4)) (clomacs (0 0 4))) "Emacs task tracker client" tar ((:url . "https://github.com/FlowerAutomation/flower") (:commit . "047846409867b2dd0ba4e2047a414b498680cd9c") (:revdesc . "047846409867") (:keywords "hypermedia" "outlines" "tools" "vc") (:authors ("Sergey Sobko" . "flower@tpg.am")) (:maintainers ("Sergey Sobko" . "flower@tpg.am")) (:maintainer "Sergey Sobko" . "flower@tpg.am"))])
+ (flucui-themes . [(20200815 2103) ((emacs (24))) "Custom theme inspired by the Flat UI palette" tar ((:url . "https://github.com/MetroWind/flucui-theme") (:commit . "6591b5093e6e8f0e720e3995a16a91835b2e7a48") (:revdesc . "6591b5093e6e") (:keywords "lisp") (:authors ("MetroWind" . "chris.corsair@gmail.com")) (:maintainers ("MetroWind" . "chris.corsair@gmail.com")) (:maintainer "MetroWind" . "chris.corsair@gmail.com"))])
+ (flutter . [(20240823 1231) ((emacs (26 1))) "Tools for working with Flutter SDK" tar ((:url . "https://github.com/amake/flutter.el") (:commit . "e71235d400787d977da7ed792709437899c2a03c") (:revdesc . "e71235d40078") (:keywords "languages"))])
+ (flutter-l10n-flycheck . [(20240823 1231) ((emacs (26 1)) (flycheck (30)) (flutter (0 1 0))) "Flycheck checker for intl_translation" tar ((:url . "https://github.com/amake/flutter.el") (:commit . "e71235d400787d977da7ed792709437899c2a03c") (:revdesc . "e71235d40078") (:keywords "languages"))])
+ (fluxus-mode . [(20210715 58) ((osc (0 1)) (emacs (24 4))) "Major mode for interfacing with Fluxus" tar ((:url . "https://github.com/defaultxr/fluxus-mode") (:commit . "a14578640c578a4fd09cb7e25da1e87d637719ae") (:revdesc . "a14578640c57") (:keywords "languages") (:authors ("modula t." . "defaultxr@gmail.com")) (:maintainers ("modula t." . "defaultxr@gmail.com")) (:maintainer "modula t." . "defaultxr@gmail.com"))])
+ (flx . [(20260821 1204) ((cl-lib (0 3))) "Fuzzy matching with good sorting" tar ((:url . "https://github.com/lewang/flx") (:commit . "dc6e4cec66ab05d536ec2cc6f5f324c019e8f8c0") (:revdesc . "dc6e4cec66ab"))])
+ (flx-ido . [(20260821 1204) ((emacs (24 1)) (flx (0 1)) (cl-lib (0 3))) "Flx integration for ido" tar ((:url . "https://github.com/lewang/flx") (:commit . "dc6e4cec66ab05d536ec2cc6f5f324c019e8f8c0") (:revdesc . "dc6e4cec66ab"))])
+ (flx-isearch . [(20191119 515) ((emacs (24)) (flx (20140821)) (cl-lib (0 5))) "Fuzzy incremental searching for emacs" tar ((:url . "https://github.com/pythonnut/flx-isearch") (:commit . "a44097fb8f539a193c2f09a37ea52a68f2c51839") (:revdesc . "a44097fb8f53") (:keywords "convenience" "search" "flx") (:authors ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainers ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainer "PythonNut" . "pythonnut@pythonnut.com"))])
+ (flycheck . [(20260826 1418) ((emacs (28 1)) (seq (2 24))) "On-the-fly syntax checking" tar ((:url . "https://github.com/flycheck/flycheck") (:commit . "e8245aead5bdd462ecf4cc8732a790a9bb5aa2de") (:revdesc . "e8245aead5bd") (:keywords "convenience" "languages" "tools") (:authors ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Clément Pit-Claudel" . "clement.pitclaudel@live.com") ("fmdkdd" . "fmdkdd@gmail.com") ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Clément Pit-Claudel" . "clement.pitclaudel@live.com"))])
+ (flycheck-actionlint . [(20230802 913) ((emacs (26)) (flycheck (32))) "Flycheck integration for actionlint" tar ((:url . "https://github.com/tirimia/flycheck-actionlint") (:commit . "f3baf396b534f8b874d3ae885cc1dd53b5098dff") (:revdesc . "f3baf396b534") (:keywords "convenience" "github" "linter" "flycheck"))])
+ (flycheck-ameba . [(20191226 1011) ((emacs (24 4)) (flycheck (30))) "Add support for Ameba to Flycheck" tar ((:url . "https://github.com/crystal-ameba/ameba.el") (:commit . "b129dbd8e4c43077521d1c77cc94bb3d52d5ee6d") (:revdesc . "b129dbd8e4c4") (:keywords "tools" "crystal" "ameba"))])
+ (flycheck-apertium . [(20181211 1038) ((flycheck (0 25))) "Apertium checkers in flycheck" tar ((:url . "http://wiki.apertium.org/wiki/Emacs") (:commit . "22b60a17836477ac1edd15dc85b14f88ca871ba9") (:revdesc . "22b60a178364") (:keywords "convenience" "tools" "xml") (:authors ("Kevin Brubeck Unhammer" . "unhammer+apertium@mm.st")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer+apertium@mm.st")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer+apertium@mm.st"))])
+ (flycheck-aspell . [(20260105 2025) ((flycheck (28 0)) (emacs (25 1))) "Aspell checker for flycheck" tar ((:url . "https://github.com/leotaku/flycheck-aspell") (:commit . "abbac0f6ccd94224f19c70d8545fddfe9c27351f") (:revdesc . "abbac0f6ccd9") (:keywords "wp" "flycheck" "spell" "aspell") (:authors ("Leo Gaskin" . "leo.gaskin@le0.gs")) (:maintainers ("Leo Gaskin" . "leo.gaskin@le0.gs")) (:maintainer "Leo Gaskin" . "leo.gaskin@le0.gs"))])
+ (flycheck-ats2 . [(20170225 1636) ((emacs (24 1)) (flycheck (0 22))) "Flycheck: ATS2 support" tar ((:url . "https://github.com/drvink/flycheck-ats2") (:commit . "9f77add8408462af35bdddf87e37a661880255e3") (:revdesc . "9f77add84084") (:keywords "convenience" "tools" "languages") (:authors ("Mark Laws" . "mdl@60hz.org")) (:maintainers ("Mark Laws" . "mdl@60hz.org")) (:maintainer "Mark Laws" . "mdl@60hz.org"))])
+ (flycheck-bashate . [(20200625 642) ((flycheck (0 24)) (emacs (24 4))) "Integrate bashate with flycheck" tar ((:url . "https://github.com/alexmurray/flycheck-bashate") (:commit . "69e53e84f712bafffd785d84d9304598c2df5615") (:revdesc . "69e53e84f712") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (flycheck-buf-lint . [(20250408 1011) ((emacs (26 1)) (flycheck (0 22)) (s (1 12 0))) "Flycheck checker for protobuf with buf.build" tar ((:url . "https://github.com/shuxiao9058/flycheck-buf-lint") (:commit . "0cf5eec5cf647e3156bc13be67927fa37c167902") (:revdesc . "0cf5eec5cf64") (:keywords "convenience" "tools" "buf" "protobuf") (:authors ("Aaron Ji" . "shuxiao9058@gmail.com")) (:maintainers ("Aaron Ji" . "shuxiao9058@gmail.com")) (:maintainer "Aaron Ji" . "shuxiao9058@gmail.com"))])
+ (flycheck-cask . [(20240205 1721) ((emacs (24 3)) (flycheck (0 14)) (dash (2 4 0))) "Cask support in Flycheck" tar ((:url . "https://github.com/flycheck/flycheck-cask") (:commit . "0eeec5197e9d31bfcfc39380b262d65259a87d91") (:revdesc . "0eeec5197e9d") (:keywords "tools" "convenience") (:authors ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainer "Sebastian Wiesner" . "swiesner@lunaryorn.com"))])
+ (flycheck-cfn . [(20240512 2341) ((emacs (27 0)) (flycheck (31))) "Flycheck backend for AWS cloudformation" tar ((:url . "https://gitlab.com/worr/cfn-mode") (:commit . "b26a95a219aa700256b22fd026cace57bce1701b") (:revdesc . "b26a95a219aa") (:keywords "convenience") (:authors ("William Orr" . "will@worrbase.com")) (:maintainers ("William Orr" . "will@worrbase.com")) (:maintainer "William Orr" . "will@worrbase.com"))])
+ (flycheck-checkbashisms . [(20230313 1418) ((emacs (24)) (flycheck (0 25))) "Checkbashisms checker for flycheck" tar ((:url . "https://github.com/cuonglm/flycheck-checkbashisms") (:commit . "ca8f11679c77d6702f34e773bdde185ceb47a05d") (:revdesc . "ca8f11679c77") (:keywords "convenience" "tools" "sh" "unix") (:authors ("Cuong Le" . "cuong.manhle.vn@gmail.com")) (:maintainers ("Cuong Le" . "cuong.manhle.vn@gmail.com")) (:maintainer "Cuong Le" . "cuong.manhle.vn@gmail.com"))])
+ (flycheck-checkpatch . [(20240810 1951) ((emacs (25)) (flycheck (30))) "Flycheck support for checkpatch.pl tool" tar ((:url . "https://github.com/zpp0/flycheck-checkpatch") (:commit . "61710dff2828ff119968161e7118fce2a4a0b67f") (:revdesc . "61710dff2828") (:authors ("Alexander Yarygin" . "yarygin.alexander@gmail.com")) (:maintainers ("Alexander Yarygin" . "yarygin.alexander@gmail.com")) (:maintainer "Alexander Yarygin" . "yarygin.alexander@gmail.com"))])
+ (flycheck-clang-analyzer . [(20211214 648) ((flycheck (0 24)) (emacs (24 4))) "Integrate Clang Analyzer with flycheck" tar ((:url . "https://github.com/alexmurray/flycheck-clang-analyzer") (:commit . "646d9f3a80046ab231a07526778695d5decad92d") (:revdesc . "646d9f3a8004") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (flycheck-clang-tidy . [(20201115 1232) ((flycheck (0 30))) "Flycheck syntax checker using clang-tidy" tar ((:url . "https://github.com/ch1bo/flycheck-clang-tidy") (:commit . "3bd947fb0dcc1e97617eab7be9e1b6e57db5e091") (:revdesc . "3bd947fb0dcc") (:keywords "convenience" "languages" "tools") (:authors ("Sebastian Nagel" . "sebastian.nagel@ncoding.at")) (:maintainers ("tastytea" . "tastytea@tastytea.de")) (:maintainer "tastytea" . "tastytea@tastytea.de"))])
+ (flycheck-clangcheck . [(20150712 710) ((cl-lib (0 5)) (seq (1 7)) (flycheck (0 17))) "A Flycheck checker difinition for ClangCheck" tar ((:url . "https://github.com/kumar8600/flycheck-clangcheck") (:commit . "24a9424c484420073a24443a829fd5779752362b") (:revdesc . "24a9424c4844") (:authors ("kumar8600" . "kumar8600@gmail.com")) (:maintainers ("kumar8600" . "kumar8600@gmail.com")) (:maintainer "kumar8600" . "kumar8600@gmail.com"))])
+ (flycheck-clj-kondo . [(20260615 1926) ((emacs (27 1)) (flycheck (36))) "Add clj-kondo linter to flycheck" tar ((:url . "https://github.com/borkdude/flycheck-clj-kondo") (:commit . "414a3ead1faefb234d658fd8a8ba121c95b71de2") (:revdesc . "414a3ead1fae") (:authors ("Michiel Borkent" . "michielborkent@gmail.com")) (:maintainers ("Michiel Borkent" . "michielborkent@gmail.com")) (:maintainer "Michiel Borkent" . "michielborkent@gmail.com"))])
+ (flycheck-clojure . [(20191215 2227) ((cider (0 22 0)) (flycheck (32 -4)) (let-alist (1 0 1)) (emacs (25))) "Flycheck: Clojure support" tar ((:url . "https://github.com/clojure-emacs/squiggly-clojure") (:commit . "bc85f9dfe1bcfa66a98d2ca5da955e7eab4ae00d") (:revdesc . "bc85f9dfe1bc") (:authors ("Peter Fraenkel" . "pnf@podsnap.com") ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Peter Fraenkel" . "pnf@podsnap.com")) (:maintainer "Peter Fraenkel" . "pnf@podsnap.com"))])
+ (flycheck-clolyze . [(20190422 2134) ((flycheck (0 25)) (emacs (24))) "Add Clolyze to to flycheck" tar ((:url . "https://github.com/DLaps/flycheck-clolyze") (:commit . "9a3300eac22a7ff96accf37fa2d761c13cc38020") (:revdesc . "9a3300eac22a") (:authors ("Daniel Laps" . "daniel.laps@hhu.de")) (:maintainers ("Daniel Laps" . "daniel.laps@hhu.de")) (:maintainer "Daniel Laps" . "daniel.laps@hhu.de"))])
+ (flycheck-color-mode-line . [(20230106 1829) ((flycheck (0 15)) (emacs (24 3))) "Change mode line color with Flycheck status" tar ((:url . "https://github.com/flycheck/flycheck-color-mode-line") (:commit . "df9be4c5bf26c4dc5ddaeed8179c4d66bdaa91f5") (:revdesc . "df9be4c5bf26") (:keywords "convenience" "language" "tools") (:authors ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainers ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainer "Sylvain Benner" . "sylvain.benner@gmail.com"))])
+ (flycheck-coverity . [(20170704 59) ((flycheck (0 24)) (dash (2 12 0)) (emacs (24 4))) "Integrate Coverity with flycheck" tar ((:url . "https://github.com/alexmurray/flycheck-coverity") (:commit . "cb211e3dd50413a5042eb20175be518214591c9d") (:revdesc . "cb211e3dd504") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (flycheck-credo . [(20240105 1655) ((flycheck (29))) "Flycheck checker for elixir credo" tar ((:url . "https://github.com/aaronjensen/flycheck-credo") (:commit . "e285bd042a535d0f13e0b4c5226df404cdda4033") (:revdesc . "e285bd042a53") (:authors ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainers ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainer "Aaron Jensen" . "aaronjensen@gmail.com"))])
+ (flycheck-crystal . [(20200805 2344) ((flycheck (30))) "Add support for Crystal to Flycheck" tar ((:url . "https://github.com/crystal-lang-tools/emacs-crystal-mode") (:commit . "f9e4db16ff9fdc6a296363aa35d19cfb4926e472") (:revdesc . "f9e4db16ff9f") (:keywords "tools" "crystal"))])
+ (flycheck-css-colorguard . [(20161031 1122) ((flycheck (0 22)) (emacs (24))) "Detect similar colors in CSS" tar ((:url . "https://github.com/Simplify/flycheck-css-colorguard/") (:commit . "ae94fa0396acd99f9ec36d9572459df793f37fe8") (:revdesc . "ae94fa0396ac") (:keywords "flycheck" "css" "colorguard") (:authors ("Saša Jovanić" . "info@simplify.ba")) (:maintainers ("Saša Jovanić" . "info@simplify.ba")) (:maintainer "Saša Jovanić" . "info@simplify.ba"))])
+ (flycheck-cstyle . [(20160905 2341) ((flycheck (0 24)) (emacs (24 4))) "Integrate cstyle with flycheck" tar ((:url . "https://github.com/alexmurray/flycheck-cstyle") (:commit . "002699f83253ea8e1a509a9ab6d0fce1a1650f73") (:revdesc . "002699f83253") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (flycheck-cython . [(20170724 958) ((flycheck (0 25))) "Support Cython in flycheck" tar ((:url . "https://github.com/lbolla/emacs-flycheck-cython") (:commit . "ecc4454d35ab5317ab66a04406f36f0c1dbc0b76") (:revdesc . "ecc4454d35ab") (:authors ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainers ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainer "Lorenzo Bolla" . "lbolla@gmail.com"))])
+ (flycheck-d-unittest . [(20260810 759) ((flycheck (0 21 -4 1)) (dash (1 4 0))) "Add D unittest support to flycheck" tar ((:url . "https://github.com/tom-tan/flycheck-d-unittest/") (:commit . "4ebaabedfd52d63d7e4f62c8dce279eaef635e45") (:revdesc . "4ebaabedfd52") (:keywords "flycheck" "d") (:authors ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainers ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainer "Tomoya Tanjo" . "ttanjo@gmail.com"))])
+ (flycheck-dedukti . [(20171103 1212) ((flycheck (0 19)) (dedukti-mode (0 1))) "Flycheck integration of Dedukti" tar ((:url . "https://github.com/rafoo/flycheck-dedukti") (:commit . "3dbff5646355f39d57a3ec514f560a6b0082a1cd") (:revdesc . "3dbff5646355") (:keywords "convenience" "languages" "tools" "flycheck" "dedukti"))])
+ (flycheck-deno . [(20251231 1618) ((emacs (27 1)) (flycheck (0 14))) "Flycheck for deno-lint" tar ((:url . "https://github.com/flycheck/flycheck-deno") (:commit . "27c2f2a4d5edcc4ddce06a42bf49a3f6b36e8f1f") (:revdesc . "27c2f2a4d5ed") (:keywords "lisp" "deno") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (flycheck-dialyxir . [(20170515 1525) ((flycheck (29))) "Flycheck checker for elixir dialyxir" tar ((:url . "https://github.com/aaronjensen/flycheck-dialyxir") (:commit . "adfb73374cb2bee75724822972f405f2ec371199") (:revdesc . "adfb73374cb2") (:authors ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainers ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainer "Aaron Jensen" . "aaronjensen@gmail.com"))])
+ (flycheck-dialyzer . [(20160326 1430) ((flycheck (0 18))) "Support dialyzer in flycheck" tar ((:url . "https://github.com/lbolla/emacs-flycheck-dialyzer") (:commit . "a5df0db95ac69f397b5f85d325a6d88cf8974f64") (:revdesc . "a5df0db95ac6") (:authors ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainers ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainer "Lorenzo Bolla" . "lbolla@gmail.com"))])
+ (flycheck-dmd-dub . [(20250304 1432) ((flycheck (0 24)) (f (0 18 2))) "Sets flycheck-dmd-include-paths from dub package information" tar ((:url . "https://github.com/atilaneves/flycheck-dmd-dub") (:commit . "c1bf54b7eca8951a38ce9f6ae12e07a011f03eb5") (:revdesc . "c1bf54b7eca8") (:keywords "languages") (:authors ("Atila Neves" . "atila.neves@gmail.com")) (:maintainers ("Atila Neves" . "atila.neves@gmail.com")) (:maintainer "Atila Neves" . "atila.neves@gmail.com"))])
+ (flycheck-dogma . [(20170125 721) ((flycheck (29))) "Flycheck checker for elixir dogma" tar ((:url . "https://github.com/aaronjensen/flycheck-dogma") (:commit . "7e14207a7da67dc5524a8949cb37a3d11de1db6e") (:revdesc . "7e14207a7da6") (:authors ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainers ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainer "Aaron Jensen" . "aaronjensen@gmail.com"))])
+ (flycheck-drstring . [(20200210 1903) ((emacs (25 1)) (flycheck (0 25)) (swift-mode (8 0))) "Doc linting for Swift using DrString" tar ((:url . "https://github.com/danielmartin/flycheck-drstring") (:commit . "d8d5a560e792a6657ef5ac69934c74f1ed51372d") (:revdesc . "d8d5a560e792") (:keywords "tools" "flycheck") (:authors ("Daniel Martín" . "mardani29@yahoo.es")) (:maintainers ("Daniel Martín" . "mardani29@yahoo.es")) (:maintainer "Daniel Martín" . "mardani29@yahoo.es"))])
+ (flycheck-dtrace . [(20180903 1630) ((emacs (25 1)) (flycheck (0 22))) "Flycheck: DTrace support" tar ((:url . "https://github.com/juergenhoetzel/flycheck-dtrace") (:commit . "951fab3a15c11d92b9fac1ea4791a80dfe034a00") (:revdesc . "951fab3a15c1") (:keywords "languages" "convenience" "tools") (:authors ("Jürgen Hötzel" . "juergen@hoetzel.info")) (:maintainers ("Jürgen Hötzel" . "juergen@hoetzel.info")) (:maintainer "Jürgen Hötzel" . "juergen@hoetzel.info"))])
+ (flycheck-eask . [(20251231 1617) ((emacs (27 1)) (flycheck (0 14))) "Eask support in Flycheck" tar ((:url . "https://github.com/flycheck/flycheck-eask") (:commit . "9141ad6b9ec2f2572a4dcddf54247825516c93b2") (:revdesc . "9141ad6b9ec2") (:keywords "lisp" "eask") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (flycheck-eglot . [(20260810 1731) ((emacs (28 1)) (eglot (1 9)) (flycheck (32))) "Flycheck support for eglot" tar ((:url . "https://github.com/flycheck/flycheck-eglot") (:commit . "173b38fcf5cfaacad5715969cd5b6b45c616be5a") (:revdesc . "173b38fcf5cf") (:keywords "convenience" "language" "tools") (:authors ("Sergey Firsov" . "intramurz@gmail.com")) (:maintainers ("Sergey Firsov" . "intramurz@gmail.com")) (:maintainer "Sergey Firsov" . "intramurz@gmail.com"))])
+ (flycheck-eldev . [(20251025 1350) ((flycheck (32)) (dash (2 17)) (emacs (24 4))) "Eldev support in Flycheck" tar ((:url . "https://github.com/flycheck/flycheck-eldev") (:commit . "ad9e367c0caf75195e7443b666adcddf98576724") (:revdesc . "ad9e367c0caf") (:keywords "tools" "convenience") (:authors ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainers ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainer "Paul Pogonyshev" . "pogonyshev@gmail.com"))])
+ (flycheck-elixir . [(20210413 612) ((flycheck (0 25))) "Support Elixir in flycheck" tar ((:url . "https://github.com/lbolla/emacs-flycheck-elixir") (:commit . "b57a77a21d6cf9621b3387831cba34135c4fa35d") (:revdesc . "b57a77a21d6c") (:authors ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainers ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainer "Lorenzo Bolla" . "lbolla@gmail.com"))])
+ (flycheck-elm . [(20181107 146) ((flycheck (0 29 -4)) (emacs (24 4)) (let-alist (1 0 5)) (seq (2 20))) "Flycheck support for the elm language" tar ((:url . "https://github.com/bsermons/flycheck-elm") (:commit . "debd0af563cb6c2944367a691c7fa3021d9378c1") (:revdesc . "debd0af563cb"))])
+ (flycheck-elsa . [(20230217 1640) ((emacs (25)) (flycheck (0 14)) (seq (2 0))) "Flycheck for Elsa" tar ((:url . "https://github.com/emacs-elsa/flycheck-elsa") (:commit . "d60db9544d0c4213f2478bcea0fd0e668e31cf34") (:revdesc . "d60db9544d0c") (:keywords "convenience") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (flycheck-falco-rules . [(20231020 1534) ((emacs (24 3)) (flycheck (0 25)) (let-alist (1 0 1))) "On-the-fly syntax checking for falco rules files" tar ((:url . "https://github.com/falcosecurity/flycheck-falco-rules") (:commit . "4bdc576abb13569354281badeaafe4abeee7fb3d") (:revdesc . "4bdc576abb13") (:keywords "tools" "convenience"))])
+ (flycheck-flawfinder . [(20211214 647) ((flycheck (0 24)) (emacs (24 4))) "Integrate flawfinder with flycheck" tar ((:url . "https://github.com/alexmurray/flycheck-flawfinder") (:commit . "85701b849ea1ed8438ed4b7ae236e99d0f5528c7") (:revdesc . "85701b849ea1") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (flycheck-flow . [(20190304 1459) ((flycheck (0 18)) (json (1 4))) "Support Flow in flycheck" tar ((:url . "https://github.com/lbolla/emacs-flycheck-flow") (:commit . "9e8e52cfc98af6a23fd906f9cb5d5d470d8cf82d") (:revdesc . "9e8e52cfc98a") (:authors ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainers ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainer "Lorenzo Bolla" . "lbolla@gmail.com"))])
+ (flycheck-ghcmod . [(20150114 632) ((flycheck (0 21 -4 1)) (dash (2 0))) "A flycheck checker for Haskell using ghcmod" tar ((:url . "https://github.com/scturtle/flycheck-ghcmod") (:commit . "6bb7b7d879f05bbae54e99eb04806c877adf3ccc") (:revdesc . "6bb7b7d879f0") (:keywords "convenience" "languages" "tools") (:authors ("Shen Chao" . "scturtle@gmail.com")) (:maintainers ("Shen Chao" . "scturtle@gmail.com")) (:maintainer "Shen Chao" . "scturtle@gmail.com"))])
+ (flycheck-golangci-lint . [(20260201 1313) ((emacs (24)) (flycheck (0 22))) "Flycheck checker for golangci-lint" tar ((:url . "https://github.com/weijiangan/flycheck-golangci-lint") (:commit . "51aede797df89eeea5928df05d0f619530339152") (:revdesc . "51aede797df8") (:keywords "convenience" "tools" "go") (:authors ("Wei Jian Gan" . "weijiangan@outlook.com")) (:maintainers ("Wei Jian Gan" . "weijiangan@outlook.com")) (:maintainer "Wei Jian Gan" . "weijiangan@outlook.com"))])
+ (flycheck-gometalinter . [(20180424 941) ((emacs (24)) (flycheck (0 22))) "Flycheck checker for gometalinter" tar ((:url . "https://github.com/favadi/flycheck-gometalinter") (:commit . "422f6e4b77b27fd7370f0c88437ac5072c9d3413") (:revdesc . "422f6e4b77b2") (:keywords "convenience" "tools" "go") (:authors ("Diep Pham" . "me@favadi.com")) (:maintainers ("Diep Pham" . "me@favadi.com")) (:maintainer "Diep Pham" . "me@favadi.com"))])
+ (flycheck-google-cpplint . [(20251231 1618) ((emacs (27 1)) (flycheck (0 20 -4 1))) "Help to comply with the Google C++ Style Guide" tar ((:url . "https://github.com/flycheck/flycheck-google-cpplint/") (:commit . "cf9d93a89073c3259fcebd46a7bdf1c0b4733b41") (:revdesc . "cf9d93a89073") (:keywords "flycheck" "c" "c++") (:authors ("Akiha Senda" . "senda.akiha@gmail.com")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (flycheck-gradle . [(20190315 234) ((emacs (25 1)) (flycheck (0 25))) "Flycheck extension for Gradle" tar ((:url . "https://github.com/jojojames/flycheck-gradle") (:commit . "1ca08bbc343362a923cbdc2010f66e41655e92ab") (:revdesc . "1ca08bbc3433") (:keywords "languages" "gradle") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (flycheck-grammalecte . [(20260615 1837) ((emacs (29 1)) (flycheck (32))) "Integrate Grammalecte with Flycheck" tar ((:url . "https://git.umaneti.net/flycheck-grammalecte/") (:commit . "f822e96ef54cc8d0d9ca64ad489b915bc36f6ac0") (:revdesc . "f822e96ef54c") (:keywords "i18n" "text") (:authors ("Guilhem Doulcier" . "guilhem.doulcier@espci.fr") ("tienne Pflieger" . "etienne@pflieger.bzh")))])
+ (flycheck-grammarly . [(20251231 1727) ((emacs (27 1)) (flycheck (0 14)) (grammarly (0 3 0)) (s (1 12 0))) "Grammarly support for Flycheck" tar ((:url . "https://github.com/emacs-grammarly/flycheck-grammarly") (:commit . "4b247b36785049eb987919cb2ba1715d698fc07b") (:revdesc . "4b247b367850") (:keywords "convenience" "grammar" "check") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (flycheck-guile . [(20230405 1154) ((emacs (25 1)) (flycheck (0 22)) (geiser (0 20))) "A Flycheck checker for GNU Guile" tar ((:url . "https://notabug.org/flatwhatson/flycheck-guile") (:commit . "dd7bbdc48fd21cf8d270c913c56cd580f8ec3d03") (:revdesc . "dd7bbdc48fd2") (:authors ("Ricardo Wurmus" . "rekado@elephly.net")) (:maintainers ("Andrew Whatson" . "whatson@tailcall.au")) (:maintainer "Andrew Whatson" . "whatson@tailcall.au"))])
+ (flycheck-haskell . [(20260319 1949) ((emacs (24 3)) (flycheck (0 25)) (haskell-mode (13 7)) (dash (2 4 0)) (seq (1 11)) (let-alist (1 0 1))) "Flycheck: Automatic Haskell configuration" tar ((:url . "https://github.com/flycheck/flycheck-haskell") (:commit . "dca624b528978ca47b387d34d9aca8b6a42bc011") (:revdesc . "dca624b52897") (:keywords "tools" "convenience") (:authors ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainer "Sebastian Wiesner" . "swiesner@lunaryorn.com"))])
+ (flycheck-hdevtools . [(20160926 702) ((flycheck (0 21 -4 1)) (dash (2 0))) "A flycheck checker for Haskell using hdevtools" tar ((:url . "https://github.com/flycheck/flycheck-hdevtools") (:commit . "53829f0c57800615718cfce27ffa16d8ba286cee") (:revdesc . "53829f0c5780") (:keywords "convenience" "languages" "tools") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flycheck-hl-todo . [(20230807 1500) ((emacs (25 1)) (hl-todo (1 9 0)) (flycheck (0 14))) "Display hl-todo keywords in flycheck" tar ((:url . "https://github.com/alvarogonzalezsotillo/flycheck-hl-todo") (:commit . "16b66ea07e9d31950093ef0ff97d42b8e7ebf10f") (:revdesc . "16b66ea07e9d") (:keywords "convenience") (:authors ("lvaro González Sotillo" . "alvarogonzalezsotillo@gmail.com")) (:maintainers ("lvaro González Sotillo" . "alvarogonzalezsotillo@gmail.com")) (:maintainer "lvaro González Sotillo" . "alvarogonzalezsotillo@gmail.com"))])
+ (flycheck-hledger . [(20241029 1710) ((emacs (27 1)) (flycheck (31))) "Flycheck module to check hledger journals" tar ((:url . "https://github.com/DamienCassou/flycheck-hledger/") (:commit . "66e12fce7d4875327bce06b2fc33043924c710ed") (:revdesc . "66e12fce7d48") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (flycheck-indent . [(20260516 852) ((emacs (27 1)) (indent-lint (1 1 4)) (flycheck (36))) "Indent-lint frontend for flycheck" tar ((:url . "https://github.com/conao3/indent-lint.el") (:commit . "3660b10520d78dd545fd0c52d7e7a36dc602492d") (:revdesc . "3660b10520d7") (:keywords "tools") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (flycheck-indicator . [(20200331 1142) ((flycheck (0 15))) "A fancy mode line indicator for `flycheck-mode'" tar ((:url . "https://github.com/gexplorer/flycheck-indicator") (:commit . "e00d9a20cbc21d6814c27cc9206296da394478e8") (:revdesc . "e00d9a20cbc2") (:keywords "convenience" "language" "tools") (:authors ("Eder Elorriaga" . "gexplorer8@gmail.com")) (:maintainers ("Eder Elorriaga" . "gexplorer8@gmail.com")) (:maintainer "Eder Elorriaga" . "gexplorer8@gmail.com"))])
+ (flycheck-ini-pyinilint . [(20190312 1931) ((flycheck (31))) "Flycheck integration for PyINILint" tar ((:url . "https://gitlab.com/danieljrmay/flycheck-ini-pyinilint") (:commit . "54744a78d06373404933fedc3ca836916e83de51") (:revdesc . "54744a78d063") (:keywords "convenience" "files" "tools") (:authors ("Daniel J. R. May" . "daniel.may@danieljrmay.com")) (:maintainers ("Daniel J. R. May" . "daniel.may@danieljrmay.com")) (:maintainer "Daniel J. R. May" . "daniel.may@danieljrmay.com"))])
+ (flycheck-inline . [(20260810 759) ((emacs (25 1)) (flycheck (32))) "Display Flycheck errors inline" tar ((:url . "https://github.com/flycheck/flycheck-inline") (:commit . "ac651c6b3101c32eb615d454a4214c4fbd9e1260") (:revdesc . "ac651c6b3101") (:keywords "tools" "convenience"))])
+ (flycheck-irony . [(20180604 2152) ((emacs (24 1)) (flycheck (0 22)) (irony (0 2 0))) "Flycheck: C/C++ support via Irony" tar ((:url . "https://github.com/Sarcasm/flycheck-irony/") (:commit . "42dbecd4a865cabeb301193bb4d660e26ae3befe") (:revdesc . "42dbecd4a865") (:keywords "convenience" "tools" "c") (:authors ("Guillaume Papin" . "guillaume.papin@epitech.eu")) (:maintainers ("Guillaume Papin" . "guillaume.papin@epitech.eu")) (:maintainer "Guillaume Papin" . "guillaume.papin@epitech.eu"))])
+ (flycheck-jest . [(20220530 1418) ((emacs (25 1)) (flycheck (0 25))) "Flycheck extension for Jest" tar ((:url . "https://github.com/jojojames/flycheck-jest") (:commit . "8181c5d2e1318c6ddcff21c6f3f6d76413545645") (:revdesc . "8181c5d2e131") (:keywords "languages" "jest") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (flycheck-joker . [(20200412 2346) ((flycheck (0 18))) "Add Clojure syntax checker (via Joker) to flycheck" tar ((:url . "https://github.com/candid82/flycheck-joker") (:commit . "93576295fef7a749bf779eeece5edd85e21868e2") (:revdesc . "93576295fef7") (:authors ("Roman Bataev" . "roman.bataev@gmail.com")) (:maintainers ("Roman Bataev" . "roman.bataev@gmail.com")) (:maintainer "Roman Bataev" . "roman.bataev@gmail.com"))])
+ (flycheck-julia . [(20170729 2141) ((emacs (24)) (flycheck (0 22))) "Julia support for Flycheck" tar ((:url . "https://github.com/gdkrmr/flycheck-julia") (:commit . "213b60a5a9a1cb7887260e1d159b5bb27167cbb6") (:revdesc . "213b60a5a9a1") (:keywords "convenience" "tools" "languages") (:authors ("Guido Kraemer" . "guido.kraemer@gmx.de")) (:maintainers ("Guido Kraemer" . "guido.kraemer@gmx.de")) (:maintainer "Guido Kraemer" . "guido.kraemer@gmx.de"))])
+ (flycheck-keg . [(20200726 218) ((emacs (24 3)) (keg (0 1)) (flycheck (0 1))) "Flycheck for Keg projects" tar ((:url . "https://github.com/conao3/keg.el") (:commit . "926de8f43842380e7150d99971eb73ff84cb59cb") (:revdesc . "926de8f43842") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (flycheck-kotlin . [(20230111 1907) ((flycheck (0 20))) "Support kotlin in flycheck" tar ((:url . "https://github.com/whirm/flycheck-kotlin") (:commit . "a2a6abb9a7f85c6fb15ce327459ec3c8ff780188") (:revdesc . "a2a6abb9a7f8") (:authors ("Elric Milon" . "whirm_REMOVETHIS__@gmx.com")) (:maintainers ("Elric Milon" . "whirm_REMOVETHIS__@gmx.com")) (:maintainer "Elric Milon" . "whirm_REMOVETHIS__@gmx.com"))])
+ (flycheck-languagetool . [(20260818 50) ((emacs (27 1)) (flycheck (39 0 0 20260813))) "Flycheck support for LanguageTool" tar ((:url . "https://github.com/emacs-languagetool/flycheck-languagetool") (:commit . "42c0757d1365f4a98a1eefc621eee69456de8815") (:revdesc . "42c0757d1365") (:keywords "convenience" "grammar" "check") (:authors ("Jen-Chieh" . "jcs090218@gmail.com") ("Peter Oliver" . "git@mavit.org.uk")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com") ("Peter Oliver" . "git@mavit.org.uk")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (flycheck-ledger . [(20200304 2204) ((emacs (24 1)) (flycheck (0 15))) "Flycheck integration for ledger files" tar ((:url . "https://github.com/purcell/flycheck-ledger") (:commit . "628e25ba66604946085571652a94a54f4d1ad96f") (:revdesc . "628e25ba6660") (:keywords "convenience" "languages" "tools") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flycheck-lilypond . [(20211006 2102) ((emacs (24 3)) (flycheck (0 22))) "LilyPond support in Flycheck" tar ((:url . "https://github.com/hinrik/flycheck-lilypond") (:commit . "78f8c16cd67f9f6d3f1806e1fd403222723ba400") (:revdesc . "78f8c16cd67f") (:keywords "tools" "convenience") (:authors ("Hinrik rn Sigurðsson" . "hinrik.sig@gmail.com")) (:maintainers ("Hinrik rn Sigurðsson" . "hinrik.sig@gmail.com")) (:maintainer "Hinrik rn Sigurðsson" . "hinrik.sig@gmail.com"))])
+ (flycheck-liquidhs . [(20170412 2326) ((flycheck (0 15))) "A flycheck checker for Haskell using liquid (i.e. liquidhaskell)" tar ((:url . "https://github.com/ucsd-progsys/liquidhaskell/flycheck-liquid.el") (:commit . "c27252ac24d77f4b6eec76a4ba9cd61761a3fba9") (:revdesc . "c27252ac24d7") (:keywords "convenience" "languages" "tools") (:authors ("Ranjit Jhala" . "jhala@cs.ucsd.edu")) (:maintainers ("Ranjit Jhala" . "jhala@cs.ucsd.edu")) (:maintainer "Ranjit Jhala" . "jhala@cs.ucsd.edu"))])
+ (flycheck-mercury . [(20181118 1952) ((flycheck (0 22)) (s (1 9 0)) (dash (2 4 0))) "Mercury support in Flycheck" tar ((:url . "https://github.com/flycheck/flycheck-mercury") (:commit . "b6807a8db70981e21a91a93324c31e49de85c89f") (:revdesc . "b6807a8db709") (:keywords "convenience" "languages" "tools") (:authors ("Matthias Güdemann" . "matthias.gudemann@gmail.com")) (:maintainers ("Matthias Güdemann" . "matthias.gudemann@gmail.com")) (:maintainer "Matthias Güdemann" . "matthias.gudemann@gmail.com"))])
+ (flycheck-mmark . [(20260802 952) ((emacs (24 4)) (flycheck (0 29))) "Flycheck checker for the MMark markdown processor" tar ((:url . "https://github.com/mmark-md/flycheck-mmark") (:commit . "e58e36bf4def70e8aa2928b76fa757dd63d869f7") (:revdesc . "e58e36bf4def") (:keywords "convenience" "text") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (flycheck-mypy . [(20200113 1336) ((flycheck (0 18))) "Support mypy in flycheck" tar ((:url . "https://github.com/lbolla/emacs-flycheck-mypy") (:commit . "12a77ee8ee3f6e774365f63be3cd5aede6462dd5") (:revdesc . "12a77ee8ee3f") (:authors ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainers ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainer "Lorenzo Bolla" . "lbolla@gmail.com"))])
+ (flycheck-nim . [(20190927 1514) ((dash (2 4 0)) (flycheck (0 20))) "Defines a flycheck syntax checker for nim" tar ((:url . "https://github.com/ALSchwalm/flycheck-nim") (:commit . "ddfade51001571c2399f78bcc509e0aa8eb752a4") (:revdesc . "ddfade510015") (:authors ("Adam Schwalm" . "adamschwalm@gmail.com")) (:maintainers ("Adam Schwalm" . "adamschwalm@gmail.com")) (:maintainer "Adam Schwalm" . "adamschwalm@gmail.com"))])
+ (flycheck-nimsuggest . [(20171027 2208) ((flycheck (0 23)) (emacs (24 3))) "Flycheck backend for Nim using nimsuggest" tar ((:url . "https://github.com/yuutayamada/flycheck-nimsuggest") (:commit . "dc9a5de1cb3ee05db5794d824610959a1f603bc9") (:revdesc . "dc9a5de1cb3e") (:authors ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainers ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainer "Yuta Yamada" . "cokesboy\"at\"gmail.com"))])
+ (flycheck-objc-clang . [(20210911 1023) ((emacs (24 4)) (flycheck (26))) "Flycheck: Objective-C support using Clang" tar ((:url . "https://github.com/GyazSquare/flycheck-objc-clang") (:commit . "5a441a31e58de17da94f933277150be39198d98c") (:revdesc . "5a441a31e58d") (:keywords "convenience" "languages" "tools") (:authors ("Goichi Hirakawa" . "gooichi@gyazsquare.com")) (:maintainers ("Goichi Hirakawa" . "gooichi@gyazsquare.com")) (:maintainer "Goichi Hirakawa" . "gooichi@gyazsquare.com"))])
+ (flycheck-ocaml . [(20260810 1135) ((emacs (24 3)) (flycheck (32)) (merlin (3 0 1)) (let-alist (1 0 3))) "Flycheck: OCaml support" tar ((:url . "https://github.com/flycheck/flycheck-ocaml") (:commit . "e302792ba72ad57b262e1ab79799960d49a4278d") (:revdesc . "e302792ba72a") (:keywords "convenience" "tools" "languages" "ocaml") (:authors ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (flycheck-package . [(20210509 2325) ((emacs (24 1)) (flycheck (0 22)) (package-lint (0 2))) "A Flycheck checker for elisp package authors" tar ((:url . "https://github.com/purcell/flycheck-package") (:commit . "ecd03f83790611888d693c684d719e033f69cb40") (:revdesc . "ecd03f837906") (:keywords "lisp") (:authors ("Steve Purcell" . "steve@sanityinc.com") ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com") ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flycheck-pest . [(20200710 2327) ((emacs (26 3)) (flycheck (31)) (pest-mode (0 1))) "Flycheck integration for Pest -" tar ((:url . "https://github.com/ksqsf/pest-mode") (:commit . "43447a2c70f98edd1139005e32f437d3f142442b") (:revdesc . "43447a2c70f9") (:keywords "convenience" "flycheck") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (flycheck-php-noverify . [(20211005 401) ((flycheck (0 22))) "Flycheck checker for PHP Noverify linter" tar ((:url . "https://github.com/Junker/flycheck-php-noverify") (:commit . "3aa3035c637eb0476f05bd0fbc66c058aa67ffb7") (:revdesc . "3aa3035c637e"))])
+ (flycheck-phpstan . [(20260717 1734) ((emacs (27 1)) (flycheck (26)) (phpstan (0 10 0))) "Flycheck integration for PHPStan" tar ((:url . "https://github.com/emacs-php/phpstan.el") (:commit . "00942a5d5b28560bd08f7355d131074772bb7a01") (:revdesc . "00942a5d5b28") (:keywords "tools" "php") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (flycheck-pkg-config . [(20230119 1721) ((dash (2 8 0)) (s (1 9 0)) (flycheck (29))) "Configure flycheck using pkg-config" tar ((:url . "https://github.com/Wilfred/flycheck-pkg-config") (:commit . "c4e4028f6621187365b7362566ac2786206765a1") (:revdesc . "c4e4028f6621") (:keywords "flycheck") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (flycheck-plantuml . [(20171018 111) ((flycheck (0 24)) (emacs (24 4)) (plantuml-mode (1 2 2))) "Integrate plantuml with flycheck" tar ((:url . "https://github.com/alexmurray/flycheck-plantuml") (:commit . "183be89e1dbba0b38237dd198dff600e0790309d") (:revdesc . "183be89e1dbb") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (flycheck-pony . [(20210118 1327) ((flycheck (0 25 1))) "Pony support in Flycheck" tar ((:url . "https://github.com/seantallen/flycheck-pony") (:commit . "22787cf8223ca9ec309e30a42c20a8e706d8bfbe") (:revdesc . "22787cf8223c") (:keywords "tools" "convenience") (:authors ("Sean T Allen" . "sean@seantallen.com")) (:maintainers ("Sean T Allen" . "sean@seantallen.com")) (:maintainer "Sean T Allen" . "sean@seantallen.com"))])
+ (flycheck-popup-tip . [(20260810 759) ((flycheck (0 22)) (popup (0 5)) (emacs (24))) "Display Flycheck error messages using popup.el" tar ((:url . "https://github.com/flycheck/flycheck-popup-tip/") (:commit . "79a70cf1f3b7b8db4eeb7cec01f6dedc0a38cabb") (:revdesc . "79a70cf1f3b7") (:keywords "convenience" "tools" "flycheck" "tooltip") (:authors ("Saša Jovanić" . "sasa@simplify.ba")) (:maintainers ("Saša Jovanić" . "sasa@simplify.ba")) (:maintainer "Saša Jovanić" . "sasa@simplify.ba"))])
+ (flycheck-pos-tip . [(20260810 759) ((emacs (24 1)) (flycheck (0 22)) (pos-tip (0 4 6))) "Display Flycheck errors in GUI tooltips" tar ((:url . "https://github.com/flycheck/flycheck-pos-tip") (:commit . "16f1757a76320ae6082d06f9a18195a316d81258") (:revdesc . "16f1757a7632") (:keywords "tools" "convenience") (:authors ("Akiha Senda" . "senda.akiha@gmail.com") ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainer "Sebastian Wiesner" . "swiesner@lunaryorn.com"))])
+ (flycheck-posframe . [(20260409 14) ((flycheck (0 24)) (emacs (26)) (posframe (0 7 0))) "Show flycheck error messages using posframe.el" tar ((:url . "https://github.com/alexmurray/flycheck-posframe") (:commit . "aeccb14e90ba25f45e1919b776777fc6ec95e251") (:revdesc . "aeccb14e90ba") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (flycheck-projectile . [(20201031 1952) ((emacs (25 1)) (flycheck (31)) (projectile (2 2))) "Project-wide errors" tar ((:url . "https://github.com/nbfalcon/flycheck-projectile") (:commit . "ce6e9e8793a55dace13d5fa13badab2dca3b5ddb") (:revdesc . "ce6e9e8793a5") (:authors ("Nikita Bloshchanevich" . "nikblos@outlook.com")) (:maintainers ("Nikita Bloshchanevich" . "nikblos@outlook.com")) (:maintainer "Nikita Bloshchanevich" . "nikblos@outlook.com"))])
+ (flycheck-prospector . [(20180524 450) ((flycheck (0 22))) "Support prospector in flycheck" tar ((:url . "https://github.com/chocoelho/flycheck-prospector") (:commit . "d5b81adb5c8261b935baf0a614dd4b776280392e") (:revdesc . "d5b81adb5c82") (:authors ("Carlos Coelho" . "carlospecter@gmail.com")) (:maintainers ("Carlos Coelho" . "carlospecter@gmail.com")) (:maintainer "Carlos Coelho" . "carlospecter@gmail.com"))])
+ (flycheck-psalm . [(20211002 1555) ((emacs (24 3)) (flycheck (26)) (psalm (0 6 0))) "Flycheck integration for Psalm" tar ((:url . "https://github.com/emacs-php/psalm.el") (:commit . "28d546a79cb865a78b94cd7e929d66d720505faa") (:revdesc . "28d546a79cb8") (:keywords "tools" "php") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (flycheck-pycheckers . [(20260624 439) ((flycheck (0 18))) "Multiple syntax checker for Python, using Flycheck" tar ((:url . "https://github.com/msherry/flycheck-pycheckers") (:commit . "de546e52ceb3147da9688c428f7243e6d98af507") (:revdesc . "de546e52ceb3") (:keywords "convenience" "tools" "languages"))])
+ (flycheck-pyflakes . [(20240124 101) ((flycheck (0 18))) "Support pyflakes in flycheck" tar ((:url . "https://github.com/Wilfred/flycheck-pyflakes") (:commit . "60db5908747faf3831f055eddc6d3b5deafa7384") (:revdesc . "60db5908747f") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (flycheck-pyre . [(20190215 1222) ((emacs (24)) (flycheck (29)) (cl-lib (0 6))) "Support Pyre in flycheck" tar ((:url . "https://github.com/linnik/flycheck-pyre") (:commit . "0560122caae207d99d8af1ac2b4e5d6f6a1ce444") (:revdesc . "0560122caae2") (:authors ("Vyacheslav Linnik" . "vyacheslav.linnik@gmail.com")) (:maintainers ("Vyacheslav Linnik" . "vyacheslav.linnik@gmail.com")) (:maintainer "Vyacheslav Linnik" . "vyacheslav.linnik@gmail.com"))])
+ (flycheck-raku . [(20220420 732) ((emacs (26 3)) (flycheck (0 22))) "Raku support in Flycheck" tar ((:url . "https://github.com/Raku/flycheck-raku") (:commit . "4da1970a75396aff1957b07f7579c1de6b817e6b") (:revdesc . "4da1970a7539") (:keywords "tools" "convenience") (:authors ("Hinrik rn Sigurðsson" . "hinrik.sig@gmail.com") ("Johnathon Weare" . "jrweare@gmail.com") ("Siavash Askari Nasr" . "siavash.askari.nasr@gmail.com")) (:maintainers ("Hinrik rn Sigurðsson" . "hinrik.sig@gmail.com") ("Johnathon Weare" . "jrweare@gmail.com") ("Siavash Askari Nasr" . "siavash.askari.nasr@gmail.com")) (:maintainer "Hinrik rn Sigurðsson" . "hinrik.sig@gmail.com"))])
+ (flycheck-relint . [(20240910 1036) ((emacs (26 1)) (flycheck (0 22)) (relint (2 0))) "A Flycheck checker for elisp regular expressions" tar ((:url . "https://github.com/purcell/flycheck-relint") (:commit . "88da7151b1781ec950eb9ec0b2ad32b90dae7427") (:revdesc . "88da7151b178") (:keywords "lisp") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flycheck-rtags . [(20191222 920) ((emacs (24)) (flycheck (0 23)) (rtags (2 10))) "RTags Flycheck integration" tar ((:url . "https://github.com/Andersbakken/rtags") (:commit . "595055b5316a7c92ba1d638f324f98842a0f41a5") (:revdesc . "595055b5316a") (:authors ("Christian Schwarzgruber" . "c.schwarzgruber.cs@gmail.com")) (:maintainers ("Christian Schwarzgruber" . "c.schwarzgruber.cs@gmail.com")) (:maintainer "Christian Schwarzgruber" . "c.schwarzgruber.cs@gmail.com"))])
+ (flycheck-rust . [(20251231 1617) ((emacs (27 1)) (flycheck (28)) (dash (2 13 0)) (seq (2 3)) (let-alist (1 0 4))) "Flycheck: Rust additions and Cargo support" tar ((:url . "https://github.com/flycheck/flycheck-rust") (:commit . "b9db73a7a5980ca884d5dd0cbe79b3291a185972") (:revdesc . "b9db73a7a598") (:keywords "tools" "convenience") (:authors ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainer "Sebastian Wiesner" . "swiesner@lunaryorn.com"))])
+ (flycheck-stan . [(20211129 2051) ((emacs (25 1)) (flycheck (0 16 0)) (stan-mode (10 3 0))) "Add Stan support for Flycheck" tar ((:url . "https://github.com/stan-dev/stan-mode/tree/master/flycheck-stan") (:commit . "150bbbe5fd3ad2b5a3dbfba9d291e66eeea1a581") (:revdesc . "150bbbe5fd3a") (:keywords "c" "languages") (:authors ("Jeffrey Arnold" . "jeffrey.arnold@gmail.com") ("Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu")) (:maintainers ("Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu")) (:maintainer "Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu"))])
+ (flycheck-status-emoji . [(20180516 229) ((cl-lib (0 1)) (emacs (24)) (flycheck (0 20)) (let-alist (1 0))) "Show flycheck status using cute, compact emoji" tar ((:url . "https://github.com/liblit/flycheck-status-emoji") (:commit . "4bd113ab42dec9544b66e0a27ed9008ce8148433") (:revdesc . "4bd113ab42de") (:keywords "convenience" "languages" "tools") (:authors ("Ben Liblit" . "liblit@acm.org")) (:maintainers ("Ben Liblit" . "liblit@acm.org")) (:maintainer "Ben Liblit" . "liblit@acm.org"))])
+ (flycheck-swift . [(20170129 549) ((emacs (24 4)) (flycheck (0 25))) "Flycheck extension for Apple's Swift" tar ((:url . "https://github.com/swift-emacs/flycheck-swift") (:commit . "c6c416a1b7a7d346e5c040e4e4065abc68d3a844") (:revdesc . "c6c416a1b7a7") (:keywords "languages" "swift") (:authors ("Chris Barrett" . "chris.d.barrett@me.com") ("Bozhidar Batsov" . "bozhidar@batsov.com") ("Arthur Evstifeev" . "lod@pisem.net")) (:maintainers ("Chris Barrett" . "chris.d.barrett@me.com") ("Bozhidar Batsov" . "bozhidar@batsov.com") ("Arthur Evstifeev" . "lod@pisem.net")) (:maintainer "Chris Barrett" . "chris.d.barrett@me.com"))])
+ (flycheck-swift3 . [(20221227 1307) ((emacs (25 1)) (flycheck (26))) "Flycheck: Swift support for Apple swift-mode" tar ((:url . "https://github.com/GyazSquare/flycheck-swift3") (:commit . "14cb83c71a03bb7ae0952ee1707783219fda980e") (:revdesc . "14cb83c71a03") (:keywords "convenience" "languages" "tools") (:authors ("Goichi Hirakawa" . "gooichi@gyazsquare.com")) (:maintainers ("Goichi Hirakawa" . "gooichi@gyazsquare.com")) (:maintainer "Goichi Hirakawa" . "gooichi@gyazsquare.com"))])
+ (flycheck-swiftlint . [(20180830 340) ((emacs (25 1)) (flycheck (0 25))) "Flycheck extension for Swiftlint" tar ((:url . "https://github.com/jojojames/flycheck-swiftlint") (:commit . "65101873c4c9f8e7eac9471188b161eeddda1555") (:revdesc . "65101873c4c9") (:keywords "languages" "swiftlint" "swift" "emacs") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (flycheck-swiftx . [(20200814 845) ((emacs (26 1)) (flycheck (26)) (xcode-project (1 0))) "Flycheck: Swift backend" tar ((:url . "https://github.com/nhojb/flycheck-swiftx") (:commit . "4d0c8ca0540b06fb947a83f1a38a6003a5abe0d4") (:revdesc . "4d0c8ca0540b") (:keywords "convenience" "languages" "tools") (:authors ("John Buckley" . "john@olivetoast.com")) (:maintainers ("John Buckley" . "john@olivetoast.com")) (:maintainer "John Buckley" . "john@olivetoast.com"))])
+ (flycheck-tcl . [(20180327 1259) ((emacs (24 4)) (flycheck (0 22))) "A flycheck checker for Tcl using tclchecker" tar ((:url . "https://github.com/nwidger/flycheck-tcl") (:commit . "7ca23f4673e178b9f5dcc8a82b86cf05b15d7236") (:revdesc . "7ca23f4673e1") (:authors ("Niels Widger" . "niels.widger@gmail.com")) (:maintainers ("Niels Widger" . "niels.widger@gmail.com")) (:maintainer "Niels Widger" . "niels.widger@gmail.com"))])
+ (flycheck-tip . [(20171020 1048) ((flycheck (29)) (emacs (24 1)) (popup (0 5 0))) "Show flycheck/flymake errors by tooltip" tar ((:url . "https://github.com/yuutayamada/flycheck-tip") (:commit . "a8ea6c905e8ad2d0684a17f7e78ba11e8598e85d") (:revdesc . "a8ea6c905e8a") (:keywords "flycheck") (:authors ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainers ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainer "Yuta Yamada" . "cokesboy\"at\"gmail.com"))])
+ (flycheck-title . [(20210321 558) ((flycheck (30)) (emacs (24))) "Show flycheck errors in the frame title" tar ((:url . "https://github.com/Wilfred/flycheck-title") (:commit . "74e4375f372f7b9ce0fdfa34dc74a048376679ae") (:revdesc . "74e4375f372f") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (flycheck-vale . [(20220929 608) ((emacs (24 4)) (flycheck (0 22)) (let-alist (1 0 4))) "Flycheck integration for vale" tar ((:url . "https://github.com/abingham/flycheck-vale") (:commit . "7c7ebc3de058a321cb76348a01f45f02dc55d2f0") (:revdesc . "7c7ebc3de058") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (flycheck-vdm . [(20190304 839) ((emacs (24)) (flycheck (32 -4)) (vdm-mode (0 0 4))) "Syntax checking for vdm-mode" tar ((:url . "https://github.com/peterwvj/vdm-mode") (:commit . "103993147b24325ef68099d087dce9ac501f02f9") (:revdesc . "103993147b24") (:keywords "languages") (:authors ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainers ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainer "Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com"))])
+ (flycheck-xcode . [(20180122 651) ((emacs (25 1)) (flycheck (0 25))) "Flycheck extension for Apple's Xcode" tar ((:url . "https://github.com/jojojames/flycheck-xcode") (:commit . "6147ab777e2c08e4f5ffdbd85d3013ca700fa835") (:revdesc . "6147ab777e2c") (:keywords "languages" "xcode") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (flycheck-yamllint . [(20170326 1309) ((flycheck (30))) "Flycheck integration for YAMLLint" tar ((:url . "https://github.com/krzysztof-magosa/flycheck-yamllint") (:commit . "aa211b1243168a4f752888c0014c5b9d2da178b1") (:revdesc . "aa211b124316") (:keywords "convenience" "languages" "tools") (:authors ("Krzysztof Magosa" . "krzysztof@magosa.pl")) (:maintainers ("Krzysztof Magosa" . "krzysztof@magosa.pl")) (:maintainer "Krzysztof Magosa" . "krzysztof@magosa.pl"))])
+ (flycheck-yang . [(20180312 1831) ((yang-mode (0 9 4)) (flycheck (0 18))) "YANG flycheck checker" tar ((:url . "https://github.com/andaru/flycheck-yang") (:commit . "47881fc42ef0163c47064b72b5d6dbef4f83d778") (:revdesc . "47881fc42ef0") (:authors ("Andrew Fort" . "(@andaru)")) (:maintainers ("Andrew Fort" . "(@andaru)")) (:maintainer "Andrew Fort" . "(@andaru)"))])
+ (flycheck-ycmd . [(20181016 618) ((emacs (24)) (dash (2 13 0)) (flycheck (0 22)) (ycmd (1 2)) (let-alist (1 0 5))) "Flycheck integration for ycmd" tar ((:url . "https://github.com/abingham/emacs-ycmd") (:commit . "ef87d020d3314efbac2e8925c115d0ac5c128c2a") (:revdesc . "ef87d020d331") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (flymake-actionlint . [(20240826 1658) ((emacs (24 1)) (flymake-easy (0 0 0))) "A Flymake handler for actionlint" tar ((:url . "https://github.com/ROCKTAKEY/flymake-actionlint") (:commit . "c502456fd445794f166d537eccd7b113d2c6fc64") (:revdesc . "c502456fd445") (:keywords "convenience") (:authors ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "ROCKTAKEY" . "rocktakey@gmail.com"))])
+ (flymake-ansible-lint . [(20260826 246) ((emacs (27 1))) "A Flymake backend for ansible-lint" tar ((:url . "https://github.com/jamescherti/flymake-ansible-lint.el") (:commit . "1d16cfe3340fd6215f4d39e38ab032d6cd31a45d") (:revdesc . "1d16cfe3340f") (:keywords "tools" "languages") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (flymake-aspell . [(20260105 2025) ((emacs (26 1))) "Aspell checker for flymake" tar ((:url . "https://github.com/leotaku/flycheck-aspell") (:commit . "abbac0f6ccd94224f19c70d8545fddfe9c27351f") (:revdesc . "abbac0f6ccd9") (:keywords "wp" "flymake" "spell" "aspell") (:authors ("Leo Gaskin" . "leo.gaskin@le0.gs")) (:maintainers ("Leo Gaskin" . "leo.gaskin@le0.gs")) (:maintainer "Leo Gaskin" . "leo.gaskin@le0.gs"))])
+ (flymake-bashate . [(20260826 245) ((flymake-quickdef (1 0 0)) (emacs (27 1))) "A Flymake backend for bashate, a Bash scripts style checker" tar ((:url . "https://github.com/jamescherti/flymake-bashate.el") (:commit . "67706445e4c42e5297b058aff51e379ef5ff6531") (:revdesc . "67706445e4c4") (:keywords "tools" "languages") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (flymake-biome . [(20241007 1626) ((emacs (27 1))) "A flymake plugin for Javascript files using biome" tar ((:url . "https://github.com/erickgnavar/flymake-biome") (:commit . "03fa55d23fdc80fb4bc963cd144da460e7da0220") (:revdesc . "03fa55d23fdc") (:authors ("Erick Navarro" . "erick@navarro.io")) (:maintainers ("Erick Navarro" . "erick@navarro.io")) (:maintainer "Erick Navarro" . "erick@navarro.io"))])
+ (flymake-clippy . [(20250323 234) ((emacs (27))) "Flymake backend for Clippy" tar ((:url . "https://github.com/mak-kirkland/flymake-clippy") (:commit . "38aeda6a8f4090b00f3c7fdb5188f80e04c556de") (:revdesc . "38aeda6a8f40") (:keywords "languages" "tools") (:authors ("Michael Kirkland" . "mak.kirkland@proton.me")) (:maintainers ("Michael Kirkland" . "mak.kirkland@proton.me")) (:maintainer "Michael Kirkland" . "mak.kirkland@proton.me"))])
+ (flymake-coffee . [(20170723 146) ((flymake-easy (0 1))) "A flymake handler for coffee script" tar ((:url . "https://github.com/purcell/flymake-coffee") (:commit . "dee295acf30820ed15fe0de17137d50bc27fc80c") (:revdesc . "dee295acf308") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-collection . [(20260613 1434) ((emacs (28 1)) (let-alist (1 0)) (flymake (1 2 1))) "Collection of checkers for flymake, bringing flymake to the level of flycheck" tar ((:url . "https://github.com/mohkale/flymake-collection") (:commit . "1c771edc125ae44d9574489f3989397027b17654") (:revdesc . "1c771edc125a") (:keywords "language" "tools") (:authors ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainers ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainer "Mohsin Kaleem" . "mohkale@kisara.moe"))])
+ (flymake-cspell . [(20240304 1349) ((emacs (26 1))) "A Flymake backend for CSpell" tar ((:url . "https://github.com/fritzgrabo/flymake-cspell") (:commit . "a573c07142cd0142c4cc1affd57f96b4d5c229b3") (:revdesc . "a573c07142cd") (:keywords "wp") (:authors ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainers ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainer "Fritz Grabo" . "hello@fritzgrabo.com"))])
+ (flymake-css . [(20170723 146) ((flymake-easy (0 1))) "Flymake support for css using csslint" tar ((:url . "https://github.com/purcell/flymake-css") (:commit . "de090163ba289910ceeb61b13368ce42d0f2dfd8") (:revdesc . "de090163ba28") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-cursor . [(20220506 1458) ((flymake (0 3))) "Show flymake messages in the minibuffer after delay" tar ((:url . "https://github.com/flymake/emacs-flymake-cursor") (:commit . "95806594cacddbbc0c3aa2351a6a7cf28e73a8bf") (:revdesc . "95806594cacd") (:keywords "languages" "mode" "flymake") (:authors ("Dino Chiesa" . "dpchiesa@hotmail.com") ("Sam Graham" . "libflymake-emacsBLAHBLAHillusori.co.uk")) (:maintainers ("Sam Graham" . "libflymake-emacsBLAHBLAHillusori.co.uk") ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Sam Graham" . "libflymake-emacsBLAHBLAHillusori.co.uk"))])
+ (flymake-diagnostic-at-point . [(20180815 1004) ((emacs (26 1)) (popup (0 5 3))) "Display flymake diagnostics at point" tar ((:url . "https://github.com/meqif/flymake-diagnostic-at-point") (:commit . "379616b1c6f5ebeaf08fbe54ae765008a78b3be7") (:revdesc . "379616b1c6f5") (:keywords "convenience" "languages" "tools") (:authors ("Ricardo Martins" . "ricardo@scarybox.net")) (:maintainers ("Ricardo Martins" . "ricardo@scarybox.net")) (:maintainer "Ricardo Martins" . "ricardo@scarybox.net"))])
+ (flymake-eask . [(20251231 1620) ((emacs (26 1)) (flymake-easy (0 1))) "Eask support in Flymake" tar ((:url . "https://github.com/flymake/flymake-eask") (:commit . "b389846ee64cc56c25ffb162be4388f3f31ad809") (:revdesc . "b389846ee64c") (:keywords "lisp" "eask") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (flymake-easy . [(20240624 1702) nil "Helpers for easily building flymake checkers" tar ((:url . "https://github.com/purcell/flymake-easy") (:commit . "1986500f75ea06f006ab1734abcce441117d385d") (:revdesc . "1986500f75ea") (:keywords "convenience" "internal") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-eldev . [(20240419 2023) ((dash (2 17)) (emacs (28 1))) "Eldev support in Flymake" tar ((:url . "https://github.com/emacs-eldev/flymake-eldev") (:commit . "d8f4d9da115002afd3785b777cd59a49d170e04a") (:revdesc . "d8f4d9da1150") (:keywords "tools" "convenience") (:authors ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainers ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainer "Paul Pogonyshev" . "pogonyshev@gmail.com"))])
+ (flymake-elisp-config . [(20250621 1609) ((emacs (28 1))) "Setup load-path for flymake on Emacs Lisp mode" tar ((:url . "https://github.com/ROCKTAKEY/flymake-elisp-config") (:commit . "1f9100e855aff8877c1af111fcdde6968038b4d2") (:revdesc . "1f9100e855af") (:keywords "lisp") (:authors ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "ROCKTAKEY" . "rocktakey@gmail.com"))])
+ (flymake-elixir . [(20130810 1417) nil "A flymake handler for elixir-mode .ex files" tar ((:url . "https://github.com/syl20bnr/flymake-elixir") (:commit . "3810566cffe35d04cc3f01e27fe397d68d52f802") (:revdesc . "3810566cffe3") (:authors ("Sylvain Benner" . "syl20bnr@gmail.com")) (:maintainers ("Sylvain Benner" . "syl20bnr@gmail.com")) (:maintainer "Sylvain Benner" . "syl20bnr@gmail.com"))])
+ (flymake-eslint . [(20250319 1221) ((emacs (26 1))) "A Flymake backend for Javascript using eslint" tar ((:url . "https://github.com/orzechowskid/flymake-eslint") (:commit . "69aa89346e663a57579848936a18d795655a485b") (:revdesc . "69aa89346e66") (:keywords "languages" "tools"))])
+ (flymake-fennel . [(20231118 1858) ((emacs (26 1))) "Flymake backend for Fennel" tar ((:url . "https://git.sr.ht/~mgmarlow/flymake-fennel") (:commit . "f62be1505152d0adec0aa7927e674db8cef58b28") (:revdesc . "f62be1505152") (:keywords "tools") (:authors ("Graham Marlow" . "info@mgmarlow.com")) (:maintainers ("Graham Marlow" . "info@mgmarlow.com")) (:maintainer "Graham Marlow" . "info@mgmarlow.com"))])
+ (flymake-flycheck . [(20250812 1141) ((flycheck (31)) (emacs (27 1))) "Use flycheck checkers as flymake backends" tar ((:url . "https://github.com/purcell/flymake-flycheck") (:commit . "79092d7e53277d7fe961f73b69e2d174ea3c6210") (:revdesc . "79092d7e5327") (:keywords "convenience" "languages" "tools") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-gjshint . [(20130327 1232) nil "A flymake handler for javascript using both jshint and gjslint" tar ((:url . "https://github.com/yasuyk/flymake-gjshint-el") (:commit . "71495ee5303de18293decd57ab9f9abdbaabfa05") (:revdesc . "71495ee5303d") (:keywords "flymake" "javascript" "jshint" "gjslint") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (flymake-go . [(20150714 733) nil "A flymake handler for go-mode files" tar ((:url . "https://github.com/robert-zaremba/flymake-go") (:commit . "ae83761aa908c1a50ff34af04f00dcc46bca2ce9") (:revdesc . "ae83761aa908") (:keywords "go" "flymake") (:authors ("Michael Fellinger" . "michael@iron.io") ("Robert Zaremba" . "robert.marek.zaremba@wp.eu")) (:maintainers ("Michael Fellinger" . "michael@iron.io") ("Robert Zaremba" . "robert.marek.zaremba@wp.eu")) (:maintainer "Michael Fellinger" . "michael@iron.io"))])
+ (flymake-go-staticcheck . [(20220804 1907) ((emacs (26 1))) "Go staticcheck linter for flymake" tar ((:url . "https://github.com/s-kostyaev/flymake-go-staticcheck") (:commit . "9098f7e07ea6513667dc6af6d9ad2fa854464d20") (:revdesc . "9098f7e07ea6") (:keywords "languages" "tools") (:authors ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainers ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainer "Sergey Kostyaev" . "feo.me@ya.ru"))])
+ (flymake-golangci . [(20191028 1927) ((flymake-easy (0 1)) (emacs (24))) "A flymake handler for go-mode files using Golang CI lint" tar ((:url . "https://gitlab.com/shackra/flymake-golangci") (:commit . "dfc31a1a6ae3f087b49fe6f5f21b3866780aa91c") (:revdesc . "dfc31a1a6ae3") (:authors ("Jorge Javier Araya Navarro" . "jorgejavieran@yahoo.com.mx")) (:maintainers ("Jorge Javier Araya Navarro" . "jorgejavieran@yahoo.com.mx")) (:maintainer "Jorge Javier Araya Navarro" . "jorgejavieran@yahoo.com.mx"))])
+ (flymake-gradle . [(20190315 233) ((emacs (26 1))) "Flymake extension for Gradle" tar ((:url . "https://github.com/jojojames/flymake-gradle") (:commit . "dbedd29b78d4828ef57d4de20867be5df3eaab99") (:revdesc . "dbedd29b78d4") (:keywords "languages" "gradle") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (flymake-grammarly . [(20251231 1727) ((emacs (26 1)) (grammarly (0 3 0)) (s (1 12 0))) "Flymake support for Grammarly" tar ((:url . "https://github.com/emacs-grammarly/flymake-grammarly") (:commit . "45ed9ff6ce87298271903aad5a839c34e940a296") (:revdesc . "45ed9ff6ce87") (:keywords "convenience" "grammar" "check") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (flymake-hadolint . [(20220328 823) ((emacs (26 1))) "Flymake backend for hadolint, a Dockerfile linter" tar ((:url . "https://github.com/buzztaiki/flymake-hadolint") (:commit . "82a6df7f6cc95e1ab95c5d28f2edcd8c1d4c7382") (:revdesc . "82a6df7f6cc9") (:keywords "convenience" "processes" "docker" "flymake") (:authors ("Taiki Sugawara" . "buzz.taiki@gmail.com")) (:maintainers ("Taiki Sugawara" . "buzz.taiki@gmail.com")) (:maintainer "Taiki Sugawara" . "buzz.taiki@gmail.com"))])
+ (flymake-haml . [(20170723 146) ((flymake-easy (0 1))) "A flymake handler for haml files" tar ((:url . "https://github.com/purcell/flymake-haml") (:commit . "22a81e8484734552d461e7ae7305664dc244447e") (:revdesc . "22a81e848473") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-haskell-multi . [(20170723 146) ((flymake-easy (0 1))) "Syntax-check haskell-mode using both ghc and hlint" tar ((:url . "https://github.com/purcell/flymake-haskell-multi") (:commit . "b564a94312259885b1380272eb867bf52a164020") (:revdesc . "b564a9431225") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-hledger . [(20241226 1937) ((emacs (28 2))) "Flymake module to check hledger journals" tar ((:url . "https://github.com/DamienCassou/flymake-hledger") (:commit . "3dd9d58ccd8e4c22c14553ebfac0ca1be3efebc5") (:revdesc . "3dd9d58ccd8e") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (flymake-hlint . [(20170723 146) ((flymake-easy (0 1))) "A flymake handler for haskell-mode files using hlint" tar ((:url . "https://github.com/purcell/flymake-hlint") (:commit . "f910736b26784efc9a2fa29503f45c1f1dd0aa38") (:revdesc . "f910736b2678") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-joker . [(20200315 1429) ((emacs (26 1)) (flymake-quickdef (0 1 1))) "Add Clojure syntax checker (via Joker) to flymake" tar ((:url . "https://github.com/beetleman/flymake-joker") (:commit . "fc132beedac9e6f415b72e578e77318fd13af9ee") (:revdesc . "fc132beedac9") (:authors ("Mateusz Probachta" . "mateusz.probachta@gmail.com")) (:maintainers ("Mateusz Probachta" . "mateusz.probachta@gmail.com")) (:maintainer "Mateusz Probachta" . "mateusz.probachta@gmail.com"))])
+ (flymake-jshint . [(20140319 2200) ((flymake-easy (0 8))) "Making flymake work with JSHint" tar ((:url . "https://github.com/Wilfred/flymake-jshint.el") (:commit . "79dd554c227883c487db38ac111306c8d5382c95") (:revdesc . "79dd554c2278") (:keywords "flymake" "jshint" "javascript") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (flymake-jslint . [(20170723 146) ((flymake-easy (0 1))) "A flymake handler for javascript using jslint" tar ((:url . "https://github.com/purcell/flymake-jslint") (:commit . "8edb82be605542b0ef62d38d818adcdde335eecb") (:revdesc . "8edb82be6055") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-json . [(20180511 911) ((flymake-easy (0 1))) "A flymake handler for json using jsonlint" tar ((:url . "https://github.com/purcell/flymake-json") (:commit . "ae58795f948402e987cda4c15f10354f8ec2d0fd") (:revdesc . "ae58795f9484") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-kondor . [(20211026 501) ((emacs (26 1))) "Linter with clj-kondo" tar ((:url . "https://github.com/turbo-cafe/flymake-kondor") (:commit . "784e57f36812a37e323409b90b935ef3c6920a22") (:revdesc . "784e57f36812"))])
+ (flymake-ktlint . [(20180831 346) ((emacs (26 1))) "Flymake extension for Ktlint" tar ((:url . "https://github.com/jojojames/flymake-ktlint") (:commit . "bea8bf350802c06756efd4e6dfba65f31dc41d78") (:revdesc . "bea8bf350802") (:keywords "languages" "ktlint") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (flymake-languagetool . [(20260101 535) ((emacs (27 1)) (compat (29 1 4 4))) "Flymake support for LanguageTool" tar ((:url . "https://github.com/emacs-languagetool/flymake-languagetool") (:commit . "2fcba271ab1b8fc301812615a8c072c108ad96b3") (:revdesc . "2fcba271ab1b") (:keywords "convenience" "grammar" "check") (:authors ("Jen-Chieh" . "jcs090218@gmail.com") ("Trey Peacock" . "git@treypeacock.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com") ("Trey Peacock" . "git@treypeacock.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (flymake-less . [(20151111 738) ((less-css-mode (0 15)) (flymake-easy (0 1))) "Flymake handler for LESS stylesheets (lesscss.org)" tar ((:url . "https://github.com/purcell/flymake-less") (:commit . "32d3c28a9a5c52b82d1741ff9d715013b6498421") (:revdesc . "32d3c28a9a5c") (:keywords "languages") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-lua . [(20170129 154) nil "Flymake for Lua" tar ((:url . "https://github.com/sroccaserra/flymake-lua") (:commit . "dcc32b62a285215898ae774ba63dbda0656f6f53") (:revdesc . "dcc32b62a285") (:keywords "lua") (:authors ("Sébastien Roccaserra (format \"s\" \"roccaserra\" \"yahoo\" \"com\"" . "\"<%s%s@%s.%s>\" ")) (:maintainers ("Sébastien Roccaserra (format \"s\" \"roccaserra\" \"yahoo\" \"com\"" . "\"<%s%s@%s.%s>\" ")) (:maintainer "Sébastien Roccaserra (format \"s\" \"roccaserra\" \"yahoo\" \"com\"" . "\"<%s%s@%s.%s>\" "))])
+ (flymake-margin . [(20240612 306) ((emacs (29 1))) "Sets flymake to work with margin instead of fringes" tar ((:url . "https://github.com/LionyxML/flymake-margin") (:commit . "4e36634789d64c33a9fc0dc5bc2eb4a21c391d96") (:revdesc . "4e36634789d6") (:keywords "languages" "maint" "tools"))])
+ (flymake-markdownlint . [(20220320 1208) ((emacs (27 1))) "Markdown linter with markdownlint" tar ((:url . "https://github.com/shaohme/flymake-markdownlint") (:commit . "59e3520668d9394c573e07b7980a2d48d9f6086c") (:revdesc . "59e3520668d9") (:authors ("Martin Kjær Jørgensen" . "mkj@gotu.dk")) (:maintainers ("Martin Kjær Jørgensen" . "mkj@gotu.dk")) (:maintainer "Martin Kjær Jørgensen" . "mkj@gotu.dk"))])
+ (flymake-nasm . [(20210310 1540) ((flymake-quickdef (1 0 0)) (emacs (26 1))) "A flymake handler for asm-mode files using nasm" tar ((:url . "https://github.com/juergenhoetzel/flymake-nasm") (:commit . "27e58d7f3a48ca6fc12238fe6c888a3fdffc3f75") (:revdesc . "27e58d7f3a48") (:keywords "tools" "languages") (:authors ("Jürgen Hötzel" . "juergen@hoetzel.info")))])
+ (flymake-perlcritic . [(20250615 802) ((flymake (1 2))) "Flymake handler for Perl to invoke Perl::Critic" tar ((:url . "https://github.com/illusori/emacs-flymake-perlcritic") (:commit . "311743e97d2f705e76755697eea9ff451a39dd64") (:revdesc . "311743e97d2f") (:authors ("Sam Graham" . "libflymake-perlcritic-emacsBLAHBLAHillusori.co.uk") ("gemmaro" . "gemmaro.dev@gmail.com")) (:maintainers ("Sam Graham" . "libflymake-perlcritic-emacsBLAHBLAHillusori.co.uk")) (:maintainer "Sam Graham" . "libflymake-perlcritic-emacsBLAHBLAHillusori.co.uk"))])
+ (flymake-pest . [(20200710 2327) ((emacs (26 3)) (pest-mode (0 1))) "A flymake handler for Pest files" tar ((:url . "https://github.com/ksqsf/pest-mode") (:commit . "43447a2c70f98edd1139005e32f437d3f142442b") (:revdesc . "43447a2c70f9") (:keywords "languages" "flymake") (:authors ("ksqsf" . "i@ksqsf.moe") ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("ksqsf" . "i@ksqsf.moe") ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "ksqsf" . "i@ksqsf.moe"))])
+ (flymake-php . [(20170723 146) ((flymake-easy (0 1))) "A flymake handler for php-mode files" tar ((:url . "https://github.com/purcell/flymake-php") (:commit . "c045d01e002ba5e09b05f40e25bf5068d02126bc") (:revdesc . "c045d01e002b") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-phpcs . [(20210213 732) ((flymake-easy (0 9))) "Making flymake work with PHP CodeSniffer" tar ((:url . "https://github.com/senda-akiha/flymake-phpcs/") (:commit . "f947ba3066c1fa903d2ec69d67bf84413f51eb3f") (:revdesc . "f947ba3066c1") (:keywords "flymake" "phpcs" "php"))])
+ (flymake-phpstan . [(20260717 1734) ((emacs (27 1)) (phpstan (0 10 0))) "Flymake backend for PHP using PHPStan" tar ((:url . "https://github.com/emacs-php/phpstan.el") (:commit . "00942a5d5b28560bd08f7355d131074772bb7a01") (:revdesc . "00942a5d5b28") (:keywords "tools" "php") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (flymake-puppet . [(20170801 554) ((flymake-easy (0 9))) "Flymake handler using puppet-lint" tar ((:url . "https://github.com/benprew/flymake-puppet") (:commit . "9579e5c736cb890195464fabf51df113313de88d") (:revdesc . "9579e5c736cb"))])
+ (flymake-python-pyflakes . [(20170723 146) ((flymake-easy (0 8))) "A flymake handler for python-mode files using pyflakes (or flake8)" tar ((:url . "https://github.com/purcell/flymake-python-pyflakes") (:commit . "1d65c26bf65a5dcbd29fcd967e2feb90e1e7a33d") (:revdesc . "1d65c26bf65a") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-quickdef . [(20200308 2342) ((emacs (26 1))) "Quickly define a new Flymake backend" tar ((:url . "https://github.com/karlotness/flymake-quickdef") (:commit . "150c5839768a3d32f988f9dc08052978a68f2ad7") (:revdesc . "150c5839768a") (:keywords "languages" "tools" "convenience" "lisp"))])
+ (flymake-racket . [(20210105 606) ((emacs (26 1))) "Flymake extension for Racket" tar ((:url . "https://github.com/jojojames/flymake-racket") (:commit . "3d3e5f2a9ab696670f9e52baa4dde7b84b7542df") (:revdesc . "3d3e5f2a9ab6") (:keywords "languages" "racket" "scheme") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (flymake-rakudo . [(20220424 637) ((emacs (28 1)) (flymake-collection (2 0 0)) (let-alist (1 0))) "Flymake syntax checker for Rakudo" tar ((:url . "https://github.com/Raku/flymake-rakudo") (:commit . "f8e3d03a7207876cd891174702efd572d74f2e49") (:revdesc . "f8e3d03a7207") (:keywords "language" "tools" "convenience") (:authors ("Siavash Askari Nasr" . "ciavash@proton.me")) (:maintainers ("Siavash Askari Nasr" . "ciavash@proton.me")) (:maintainer "Siavash Askari Nasr" . "ciavash@proton.me"))])
+ (flymake-relint . [(20250123 2108) ((emacs (26 1)) (relint (1 23))) "A relint Flymake backend" tar ((:url . "https://github.com/eki3z/flymake-relint") (:commit . "7fd3dabe4fdc258aaf18abbe70e46f49f2fe6b69") (:revdesc . "7fd3dabe4fdc") (:keywords "lisp") (:authors ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainers ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainer "Eki Zhang" . "liuyinz95@gmail.com"))])
+ (flymake-ruby . [(20170723 146) ((flymake-easy (0 1))) "A flymake handler for ruby-mode files" tar ((:url . "https://github.com/purcell/flymake-ruby") (:commit . "6c320c6fb686c5223bf975cc35178ad6b195e073") (:revdesc . "6c320c6fb686") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-ruff . [(20260616 427) ((emacs (26 1)) (project (0 3 0))) "A flymake plugin for python files using ruff" tar ((:url . "https://github.com/erickgnavar/flymake-ruff") (:commit . "ef4a6caed72bce77a27bda54ffb30e3fdb0e7d76") (:revdesc . "ef4a6caed72b") (:authors ("Erick Navarro" . "erick@navarro.io")) (:maintainers ("Erick Navarro" . "erick@navarro.io")) (:maintainer "Erick Navarro" . "erick@navarro.io"))])
+ (flymake-sass . [(20170723 146) ((flymake-easy (0 1))) "Flymake handler for sass and scss files" tar ((:url . "https://github.com/purcell/flymake-sass") (:commit . "2de28148e92deb93bff3d55fe14e7c67ac476056") (:revdesc . "2de28148e92d") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-shell . [(20170723 146) ((flymake-easy (0 1))) "A flymake syntax-checker for shell scripts" tar ((:url . "https://github.com/purcell/flymake-shell") (:commit . "a16cf453056b9849cc7c912bb127fb0b08fc6dab") (:revdesc . "a16cf453056b") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (flymake-shellcheck . [(20220308 2218) ((emacs (26))) "A bash/sh Flymake backend powered by ShellCheck" tar ((:url . "https://github.com/federicotdn/flymake-shellcheck") (:commit . "1ad9acb599e6be6aac57280b7c918b0e4a0f07de") (:revdesc . "1ad9acb599e6") (:authors ("Federico Tedin" . "federicotedin@gmail.com")) (:maintainers ("Federico Tedin" . "federicotedin@gmail.com")) (:maintainer "Federico Tedin" . "federicotedin@gmail.com"))])
+ (flymake-solidity . [(20170805 644) ((flymake-easy (0 10))) "A flymake handler for solidity using solc" tar ((:url . "https://github.com/kootenvp/flymake-solidity") (:commit . "48bfe9525f764d8a68cc0270905dbf45bfd00bb8") (:revdesc . "48bfe9525f76") (:authors ("Pascal van Kooten" . "kootenpv@gmail.com")) (:maintainers ("Pascal van Kooten" . "kootenpv@gmail.com")) (:maintainer "Pascal van Kooten" . "kootenpv@gmail.com"))])
+ (flymake-sqlfluff . [(20240611 1257) ((emacs (27 1))) "A flymake plugin for SQL files using sqlfluff" tar ((:url . "https://github.com/erickgnavar/flymake-sqlfluff") (:commit . "0a836d7a919723ae5897fce01c3c7d651a30e8c6") (:revdesc . "0a836d7a9197") (:authors ("Erick Navarro" . "erick@navarro.io")) (:maintainers ("Erick Navarro" . "erick@navarro.io")) (:maintainer "Erick Navarro" . "erick@navarro.io"))])
+ (flymake-swi-prolog . [(20220404 950) ((emacs (26 1))) "A Flymake backend for SWI-Prolog" tar ((:url . "https://git.sr.ht/~eshel/flymake-swi-prolog") (:commit . "ae0e4b706a40b71c007ed6cb0ec5425d49bea4c3") (:revdesc . "ae0e4b706a40") (:keywords "languages"))])
+ (flymake-vala . [(20150326 531) ((flymake-easy (0 1))) "A flymake handler for vala-mode files" tar ((:url . "https://github.com/daniellawrence/flymake-vala") (:commit . "c3674f461fc84fb0300cd3a562fb903a59782745") (:revdesc . "c3674f461fc8") (:keywords "convenience" "vala") (:authors ("Daniel Lawrence" . "dannyla@linux.com")) (:maintainers ("Daniel Lawrence" . "dannyla@linux.com")) (:maintainer "Daniel Lawrence" . "dannyla@linux.com"))])
+ (flymake-vnu . [(20230310 440) ((emacs (26 1))) "Flymake extension for the v.Nu HTML validator" tar ((:url . "https://github.com/theneosloth/flymake-vnu") (:commit . "e9c6038f69ad1523e603026155d9acd5fc3d5aac") (:revdesc . "e9c6038f69ad") (:keywords "languages") (:authors ("Stefan Kuznetsov" . "skuznetsov@posteo.net")) (:maintainers ("Stefan Kuznetsov" . "skuznetsov@posteo.net")) (:maintainer "Stefan Kuznetsov" . "skuznetsov@posteo.net"))])
+ (flymake-yaml . [(20130423 1548) ((flymake-easy (0 1))) "A flymake handler for YAML" tar ((:url . "https://github.com/yasuyk/flymake-yaml") (:commit . "0dd11eed29fe4054ff5b4e06e2c39b4d925d6aae") (:revdesc . "0dd11eed29fe") (:keywords "yaml") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (flymake-yamllint . [(20230226 1024) ((emacs (26 1))) "YAML linter with yamllint" tar ((:url . "https://github.com/shaohme/flymake-yamllint") (:commit . "020d2a33568c8069801db9dd6992b8961a58de8d") (:revdesc . "020d2a33568c") (:authors ("Martin Kjær Jørgensen" . "mkj@gotu.dk")) (:maintainers ("Martin Kjær Jørgensen" . "mkj@gotu.dk")) (:maintainer "Martin Kjær Jørgensen" . "mkj@gotu.dk"))])
+ (flymake-zizmor . [(20260310 1959) ((emacs (28 1))) "Flymake backend for zizmor, a Github Actions static analyzer" tar ((:url . "https://github.com/unhammer/flymake-zizmor") (:commit . "9b57aa59280a84b60bd4fdf384ef797a37c19b29") (:revdesc . "9b57aa59280a") (:keywords "convenience" "languages") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (flymd . [(20160617 1214) ((cl-lib (0 5))) "On the fly markdown preview" tar ((:url . "https://github.com/mola-T/flymd") (:commit . "84d5a68bcfed4a295952c33ffcd11e880978d9d7") (:revdesc . "84d5a68bcfed") (:keywords "markdown" "convenience") (:authors ("Mola-T" . "Mola@molamola.xyz")) (:maintainers ("Mola-T" . "Mola@molamola.xyz")) (:maintainer "Mola-T" . "Mola@molamola.xyz"))])
+ (flyover . [(20260225 626) ((emacs (27 1)) (flymake (1 0))) "Display Flycheck and Flymake errors with overlays" tar ((:url . "https://github.com/konrad1977/flyover") (:commit . "8815cb067ca0d3d32607c9ae5093673cb29663a0") (:revdesc . "8815cb067ca0") (:keywords "convenience" "tools" "flycheck" "flymake") (:authors ("Mikael Konradsson" . "mikael.konradsson@outlook.com")) (:maintainers ("Mikael Konradsson" . "mikael.konradsson@outlook.com")) (:maintainer "Mikael Konradsson" . "mikael.konradsson@outlook.com"))])
+ (flyparens . [(20140723 1846) nil "Check for unbalanced parens on the fly" tar ((:url . "https://github.com/jiyoo/flyparens") (:commit . "af9b8cfd647d0e5f97684d613dc2eea7cfc19398") (:revdesc . "af9b8cfd647d") (:keywords "faces" "convenience" "lisp" "matching" "parentheses" "parens"))])
+ (flyspell-correct . [(20260106 955) ((emacs (29 1))) "Correcting words with flyspell via custom interface" tar ((:url . "https://github.com/d12frosted/flyspell-correct") (:commit . "a5a41c0f3a7881bd3eba07bee424ecb7c7d5061e") (:revdesc . "a5a41c0f3a78") (:authors ("Boris Buliga" . "boris@d12frosted.io")) (:maintainers ("Boris Buliga" . "boris@d12frosted.io")) (:maintainer "Boris Buliga" . "boris@d12frosted.io"))])
+ (flyspell-correct-avy-menu . [(20260106 955) ((flyspell-correct (1 0 0)) (avy-menu (0 1 1)) (emacs (29 1))) "Correcting words with flyspell via avy-menu interface" tar ((:url . "https://github.com/d12frosted/flyspell-correct") (:commit . "a5a41c0f3a7881bd3eba07bee424ecb7c7d5061e") (:revdesc . "a5a41c0f3a78") (:authors ("Boris Buliga" . "boris@d12frosted.io") ("Clemens Radermacher" . "clemera@posteo.net")) (:maintainers ("Boris Buliga" . "boris@d12frosted.io") ("Clemens Radermacher" . "clemera@posteo.net")) (:maintainer "Boris Buliga" . "boris@d12frosted.io"))])
+ (flyspell-correct-helm . [(20260106 955) ((flyspell-correct (1 0 0)) (helm (1 9 0)) (emacs (29 1))) "Correcting words with flyspell via helm interface" tar ((:url . "https://github.com/d12frosted/flyspell-correct") (:commit . "a5a41c0f3a7881bd3eba07bee424ecb7c7d5061e") (:revdesc . "a5a41c0f3a78") (:authors ("Boris Buliga" . "boris@d12frosted.io")) (:maintainers ("Boris Buliga" . "boris@d12frosted.io")) (:maintainer "Boris Buliga" . "boris@d12frosted.io"))])
+ (flyspell-correct-ivy . [(20260106 955) ((flyspell-correct (1 0 0)) (ivy (0 8 0)) (emacs (29 1))) "Correcting words with flyspell via ivy interface" tar ((:url . "https://github.com/d12frosted/flyspell-correct") (:commit . "a5a41c0f3a7881bd3eba07bee424ecb7c7d5061e") (:revdesc . "a5a41c0f3a78") (:authors ("Boris Buliga" . "boris@d12frosted.io")) (:maintainers ("Boris Buliga" . "boris@d12frosted.io")) (:maintainer "Boris Buliga" . "boris@d12frosted.io"))])
+ (flyspell-correct-popup . [(20260106 955) ((flyspell-correct (1 0 0)) (popup (0 5 3)) (emacs (29 1))) "Correcting words with flyspell via popup interface" tar ((:url . "https://github.com/d12frosted/flyspell-correct") (:commit . "a5a41c0f3a7881bd3eba07bee424ecb7c7d5061e") (:revdesc . "a5a41c0f3a78") (:authors ("Boris Buliga" . "boris@d12frosted.io")) (:maintainers ("Boris Buliga" . "boris@d12frosted.io")) (:maintainer "Boris Buliga" . "boris@d12frosted.io"))])
+ (flyspell-lazy . [(20210308 1253) nil "Improve flyspell responsiveness using idle timers" tar ((:url . "https://github.com/rolandwalker/flyspell-lazy") (:commit . "0fc5996bcee20b46cbd227ae948d343c3bef7339") (:revdesc . "0fc5996bcee2") (:keywords "spelling") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (flyspell-popup . [(20170529 815) ((popup (0 5 0))) "Correcting words with Flyspell in popup menus" tar ((:url . "https://github.com/xuchunyang/flyspell-popup") (:commit . "29311849bfd253b9b689bf331860b4c4d3bd4dde") (:revdesc . "29311849bfd2") (:keywords "convenience") (:authors ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainers ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainer "Chunyang Xu" . "mail@xuchunyang.me"))])
+ (flywrite . [(20260526 1418) ((emacs (29 1))) "Inline writing suggestions via LLM" tar ((:url . "https://github.com/awdeorio/flywrite") (:commit . "e9d11b17fdb4a2d986354a5b942952dea9876a6b") (:revdesc . "e9d11b17fdb4") (:keywords "text" "wp") (:authors ("Andrew DeOrio" . "awdeorio@umich.edu")) (:maintainers ("Andrew DeOrio" . "awdeorio@umich.edu")) (:maintainer "Andrew DeOrio" . "awdeorio@umich.edu"))])
+ (fm-bookmarks . [(20170104 1716) ((emacs (24 3)) (cl-lib (0 5))) "Use file manager bookmarks (eg Dolphin, Nautilus, PCManFM) in Dired" tar ((:url . "https://github.com/kuanyui/fm-bookmarks.el") (:commit . "11dacfd16a926bfecba96a94c6b13e162c7717f7") (:revdesc . "11dacfd16a92") (:keywords "files" "convenience") (:authors ("Ono Hiroko" . "azazabc123@gmail.com")) (:maintainers ("Ono Hiroko" . "azazabc123@gmail.com")) (:maintainer "Ono Hiroko" . "azazabc123@gmail.com"))])
+ (fmo-mode . [(20240306 1442) ((emacs (29 1)) (difflib (0 3 7)) (format-all (0 5 0))) "Format only changed lines" tar ((:url . "https://github.com/xeechou/fmo-mode.el") (:commit . "eb63a36ee8ca0ec985e6fd043db974e6f9b38c83") (:revdesc . "eb63a36ee8ca") (:keywords "languages" "util") (:authors ("Xichen Zhou" . "sichem.zh@gmail.com")) (:maintainers ("Xichen Zhou" . "sichem.zh@gmail.com")) (:maintainer "Xichen Zhou" . "sichem.zh@gmail.com"))])
+ (fn . [(20210304 1812) ((emacs (24)) (cl-lib (0 5)) (dash (2 18 0))) "Concise anonymous functions for Emacs Lisp" tar ((:url . "https://github.com/troyp/fn.el") (:commit . "98e3fe1b4785e162d9aca978a2db106baa79260f") (:revdesc . "98e3fe1b4785") (:keywords "functional"))])
+ (fnm . [(20260717 1314) ((emacs (24 1)) (s (1 8 0)) (dash (2 18 0)) (f (0 14 0))) "Manage Node versions using fnm" tar ((:url . "https://github.com/nhojb/fnm.el") (:commit . "2bb4c5d287a3c2046b42f90db2cc8e889ea642d9") (:revdesc . "2bb4c5d287a3") (:keywords "tools" "node" "fnm" "nvm") (:authors ("John Buckley" . "nhoj.buckley@gmail.com")) (:maintainers ("John Buckley" . "nhoj.buckley@gmail.com")) (:maintainer "John Buckley" . "nhoj.buckley@gmail.com"))])
+ (focus . [(20241029 1506) ((emacs (24 3)) (cl-lib (0 5))) "Dim the font color of text in surrounding sections" tar ((:url . "https://github.com/larstvei/Focus") (:commit . "29b412b209c3542a7932c201f0166e48c9fd7fee") (:revdesc . "29b412b209c3") (:authors ("Lars Tveito" . "larstvei@ifi.uio.no")) (:maintainers ("Lars Tveito" . "larstvei@ifi.uio.no")) (:maintainer "Lars Tveito" . "larstvei@ifi.uio.no"))])
+ (focus-autosave-mode . [(20160519 2116) ((emacs (24 4))) "Automatically save files in focus-out-hook" tar ((:url . "https://github.com/vifon/focus-autosave-mode.el") (:commit . "e89ed22aa4dfc76e1b844b202aedd468ad58814a") (:revdesc . "e89ed22aa4df") (:keywords "convenience" "files" "frames" "mouse") (:authors ("Wojciech Siewierski" . "wojciech.siewierski@onet.pl")) (:maintainers ("Wojciech Siewierski" . "wojciech.siewierski@onet.pl")) (:maintainer "Wojciech Siewierski" . "wojciech.siewierski@onet.pl"))])
+ (foggy-night-theme . [(20190123 1614) ((emacs (24))) "Dark low contrast theme with soft and muted colors" tar ((:url . "https://github.com/mswift42/foggy-night-theme") (:commit . "14894e06ee5c6e14db36f2cb07387ee971c1736f") (:revdesc . "14894e06ee5c"))])
+ (fold-dwim . [(20140208 1637) nil "Unified user interface for Emacs folding modes" tar ((:url . "http://www.dur.ac.uk/p.j.heslin/Software/Emacs") (:commit . "c46f4bb2ce91b4e307136320e72c28dd50b6cd8b") (:revdesc . "c46f4bb2ce91") (:authors ("Peter Heslin" . "p.j.heslin@dur.ac.uk")) (:maintainers ("Peter Heslin" . "p.j.heslin@dur.ac.uk")) (:maintainer "Peter Heslin" . "p.j.heslin@dur.ac.uk"))])
+ (fold-dwim-org . [(20131203 1351) ((fold-dwim (1 2))) "Fold DWIM bound to org key-strokes" tar ((:url . "https://github.com/mlf176f2/fold-dwim-org") (:commit . "c09bb2b46d65afbd1d0febc6fded7495be7a3037") (:revdesc . "c09bb2b46d65") (:keywords "folding" "emacs" "org-mode"))])
+ (fold-this . [(20191107 1816) nil "Just fold this region please" tar ((:url . "https://github.com/magnars/fold-this.el") (:commit . "c3912c738cf0515f65162479c55999e2992afce5") (:revdesc . "c3912c738cf0") (:keywords "convenience") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (folding . [(20250120 1132) nil "A folding-editor-like minor mode" tar ((:url . "https://github.com/jaalto/project-emacs--folding-mode") (:commit . "443b826c76a4938fc0961298ff0e6c924c723ed7") (:revdesc . "443b826c76a4") (:keywords "tools") (:authors ("Jamie Lokier" . "jamieATimbolc.uccdtie") ("Jari Aalto" . "jariaaltoATcantedtnet") ("Anders Lindgren" . "anderslATcsd.uudtse")) (:maintainers ("Jari Aalto" . "jariaaltoATcantedtnet")) (:maintainer "Jari Aalto" . "jariaaltoATcantedtnet"))])
+ (folgezett . [(20260517 422) ((emacs (27 2)) (org-roam (2 0 0))) "Folgezettel IDs for org-roam" tar ((:url . "https://github.com/landerwells/folgezett.el") (:commit . "8b60ab378fd83a4fc9abc15c82bdcd3cdb2c507d") (:revdesc . "8b60ab378fd8") (:keywords "outlines" "tools" "org-roam" "zettelkasten") (:authors ("Lander Wells" . "landerwells@gmail.com")) (:maintainers ("Lander Wells" . "landerwells@gmail.com")) (:maintainer "Lander Wells" . "landerwells@gmail.com"))])
+ (folio-theme . [(20260711 13) ((emacs (28 1)) (modus-themes (5 0 0)) (ef-themes (2 0 0))) "Warm paper-like theme built on Modus and Ef" tar ((:url . "https://github.com/kn66/folio-theme.el") (:commit . "758ca1f9674d685747d0846160e76bb6cb677a2d") (:revdesc . "758ca1f9674d") (:keywords "faces"))])
+ (font-lock-profiler . [(20250104 2246) ((emacs (24 3))) "Coverage and timing tool for font-lock" tar ((:url . "https://github.com/Lindydancer/font-lock-profiler") (:commit . "6f19fda11de06f5f6c5b3732f056df762d685fcc") (:revdesc . "6f19fda11de0") (:keywords "faces" "tools"))])
+ (font-lock-studio . [(20250309 1523) ((emacs (24 3))) "Debugger for Font Lock keywords" tar ((:url . "https://github.com/Lindydancer/font-lock-studio") (:commit . "12d542b939610367d99051655c76fd2b970fd0e4") (:revdesc . "12d542b93961") (:keywords "faces" "tools"))])
+ (font-utils . [(20210405 1149) ((persistent-soft (0 8 8)) (pcache (0 2 3))) "Utility functions for working with fonts" tar ((:url . "https://github.com/rolandwalker/font-utils") (:commit . "abc572eb0dc30a26584c0058c3fe6c7273a10003") (:revdesc . "abc572eb0dc3") (:keywords "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (fontawesome . [(20240925 814) ((emacs (24 4))) "Fontawesome utility" tar ((:url . "https://github.com/emacsorphanage/fontawesome") (:commit . "d81096e5e8fa7e386a6bbfe02a50f0f7d6a5dca6") (:revdesc . "d81096e5e8fa") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (fontify-face . [(20251111 1121) ((emacs (25 1))) "Fontify symbols representing faces with that face" tar ((:url . "https://github.com/Fuco1/fontify-face") (:commit . "b975c764b6e9e070c7673317146b4d345ec83ef8") (:revdesc . "b975c764b6e9") (:keywords "faces") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (fontsloth . [(20250707 829) ((async (1 9 7)) (f (0 20 0)) (logito (0 1)) (pcache (0 5)) (stream (2 2 5)) (emacs (28 1))) "Elisp otf/ttf font loader/renderer" tar ((:url . "https://github.com/jollm/fontsloth") (:commit . "0835098743e060b2f2191f53d181257d6444dce4") (:revdesc . "0835098743e0") (:keywords "data" "font" "rasterization" "ttf" "otf") (:authors ("Jo Gay" . "jo.gay@mailfence.com")) (:maintainers ("Jo Gay" . "jo.gay@mailfence.com")) (:maintainer "Jo Gay" . "jo.gay@mailfence.com"))])
+ (for . [(20260417 457) ((emacs (28 1))) "Iteration and sequence" tar ((:url . "https://github.com/usaoc/elisp-for") (:commit . "2e18cf627ecf4c390e295a73d61ab1eba7d076f4") (:revdesc . "2e18cf627ecf") (:keywords "extensions") (:authors ("Wing Hei Chan" . "whmunkchan@outlook.com")) (:maintainers ("Wing Hei Chan" . "whmunkchan@outlook.com")) (:maintainer "Wing Hei Chan" . "whmunkchan@outlook.com"))])
+ (forecast . [(20191004 1850) ((emacs (24 4))) "Weather forecasts" tar ((:url . "https://dev.gkayaalp.com/elisp/index.html#forecast-el") (:commit . "5f3e67448cc98fe2875115163849acae4d9e8526") (:revdesc . "5f3e67448cc9") (:keywords "weather" "forecast") (:authors ("Göktuğ Kayaalp" . "self@gkayaalp.com")) (:maintainers ("Göktuğ Kayaalp" . "self@gkayaalp.com")) (:maintainer "Göktuğ Kayaalp" . "self@gkayaalp.com"))])
+ (foreign-regexp . [(20200325 50) nil "Search and replace by foreign regexp" tar ((:url . "https://github.com/k-talo/foreign-regexp.el") (:commit . "e2dd47f2160cadc194eb156e7c76c3c869e6706e") (:revdesc . "e2dd47f2160c") (:keywords "convenience" "emulations" "matching" "tools" "unix" "wp") (:authors ("K-talo Miyazaki" . "KeitarodotMiyazakiatgmaildotcom")) (:maintainers ("K-talo Miyazaki" . "KeitarodotMiyazakiatgmaildotcom")) (:maintainer "K-talo Miyazaki" . "KeitarodotMiyazakiatgmaildotcom"))])
+ (foreman-mode . [(20170725 1422) ((s (1 9 0)) (dash (2 10 0)) (dash-functional (1 2 0)) (f (0 17 2)) (emacs (24))) "View and manage Procfile-based applications" tar ((:url . "https://github.com/zweifisch/foreman-mode") (:commit . "22b3bb13134b617870ed1e888af739f4818be929") (:revdesc . "22b3bb13134b") (:keywords "foreman") (:authors ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainers ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainer "ZHOU Feng" . "zf.pascal@gmail.com"))])
+ (forest-blue-theme . [(20160627 842) ((emacs (24))) "Emacs theme with a dark background" tar ((:url . "https://github.com/olkinn/forest-blue-emacs") (:commit . "58096ce1a25615d2bae806c3775bae3e2775019d") (:revdesc . "58096ce1a256"))])
+ (forge . [(20260815 1911) ((emacs (29 1)) (compat (31 0)) (closql (2 4)) (cond-let (1 1)) (emacsql (4 4)) (ghub (5 3)) (llama (1 0)) (magit (4 7)) (markdown-mode (2 8)) (transient (0 13)) (yaml (1 2))) "Access Git forges from Magit" tar ((:url . "https://github.com/magit/forge") (:commit . "71e182e40186cc2a79fea298586905f26f48ae15") (:revdesc . "71e182e40186") (:keywords "git" "tools" "vc") (:authors ("Jonas Bernoulli" . "emacs.forge@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.forge@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.forge@jonas.bernoulli.dev"))])
+ (forge-llm . [(20250731 117) ((emacs (25 1)) (forge (0 3 0)) (llm (0 16 1))) "LLM integration for generating PR descriptions in Forge" tar ((:url . "https://gitlab.com/rogs/forge-llm") (:commit . "ebd59266fd68bfd55a8115efc65817ba3e31c235") (:revdesc . "ebd59266fd68") (:keywords "convenience" "forge" "git" "llm" "github" "gitlab" "pull-request") (:authors ("Roger Gonzalez" . "roger@rogs.me")) (:maintainers ("Roger Gonzalez" . "roger@rogs.me")) (:maintainer "Roger Gonzalez" . "roger@rogs.me"))])
+ (form-feed . [(20250426 2028) ((emacs (25 1))) "Display ^L glyphs as horizontal lines" tar ((:url . "https://depp.brause.cc/form-feed") (:commit . "6258fe6390a7bf264a6f02813502bf83a645d872") (:revdesc . "6258fe6390a7") (:keywords "faces") (:authors ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (form-feed-st . [(20231002 2211) ((emacs (25 1))) "Display ^L glyphs as full-width horizontal lines" tar ((:url . "https://github.com/leodag/form-feed-st") (:commit . "f91c8daf35b7588e0aa24c8716c8cfd8ff0067c8") (:revdesc . "f91c8daf35b7") (:keywords "faces"))])
+ (format-all . [(20260620 1824) ((emacs (24 4)) (inheritenv (0 1)) (language-id (0 20))) "Auto-format C, C++, JS, Python, Ruby and 50 other languages" tar ((:url . "https://github.com/lassik/emacs-format-all-the-code") (:commit . "0dbe9c70eaf8b92dca1a42552761eaa13c3139cf") (:revdesc . "0dbe9c70eaf8") (:keywords "languages" "util") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (format-sql . [(20150422 1333) nil "Use format-sql to make your SQL readable in directly Emacs" tar ((:url . "https://github.com/paetzke/format-sql.el") (:commit . "97f475c245cd6c81a72a265678e2087cee66ac7b") (:revdesc . "97f475c245cd") (:authors ("Friedrich Paetzke" . "paetzke@fastmail.fm")) (:maintainers ("Friedrich Paetzke" . "paetzke@fastmail.fm")) (:maintainer "Friedrich Paetzke" . "paetzke@fastmail.fm"))])
+ (format-table . [(20181223 1616) ((emacs (25)) (dash (2 14 1))) "Parse and reformat tabular data" tar ((:url . "https://github.com/functionreturnfunction/format-table") (:commit . "dfcae3a867e574577fc09a43b045889ff155b58f") (:revdesc . "dfcae3a867e5") (:keywords "data") (:authors ("Jason Duncan" . "jasond496@msn.com")) (:maintainers ("Jason Duncan" . "jasond496@msn.com")) (:maintainer "Jason Duncan" . "jasond496@msn.com"))])
+ (forth-mode . [(20260315 803) ((cl-lib (0 2))) "Programming language mode for Forth" tar ((:url . "https://github.com/larsbrinkhoff/forth-mode") (:commit . "4450a3a5629b579f5d2045d0d8aec84193e9a31f") (:revdesc . "4450a3a5629b") (:keywords "languages" "forth") (:authors ("Lars Brinkhoff" . "lars@nocrew.org")) (:maintainers ("Lars Brinkhoff" . "lars@nocrew.org")) (:maintainer "Lars Brinkhoff" . "lars@nocrew.org"))])
+ (fortpy . [(20150715 2032) ((epc (0 1 0)) (auto-complete (1 4)) (python-environment (0 0 2)) (pos-tip (0 4 5))) "A Fortran auto-completion for Emacs" tar ((:url . "https://github.com/rosenbrockc/fortpy-el") (:commit . "c614517e9396ef7a78be3b8786fbf303879cf43b") (:revdesc . "c614517e9396") (:authors ("Conrad Rosenbrock" . "rosenbrockcatgmail.com")) (:maintainers ("Conrad Rosenbrock" . "rosenbrockcatgmail.com")) (:maintainer "Conrad Rosenbrock" . "rosenbrockcatgmail.com"))])
+ (fortune-cookie . [(20181223 842) nil "Print a fortune in your scratch buffer" tar ((:url . "https://github.com/andschwa/fortune-cookie") (:commit . "6c1c08f5be83822c0b762872ab25e3dbee96f333") (:revdesc . "6c1c08f5be83") (:keywords "fortune" "cowsay" "scratch" "startup") (:authors ("Andrew Schwartzmeyer" . "andrew@schwartzmeyer.com")) (:maintainers ("Andrew Schwartzmeyer" . "andrew@schwartzmeyer.com")) (:maintainer "Andrew Schwartzmeyer" . "andrew@schwartzmeyer.com"))])
+ (fountain-mode . [(20241106 219) ((emacs (24 4)) (seq (2 20))) "Major mode for screenwriting in Fountain markup" tar ((:url . "https://www.fountain-mode.org") (:commit . "74ddc5a783e8204beeda3343ea6725a3c198f4bc") (:revdesc . "74ddc5a783e8") (:keywords "wp" "text") (:authors ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainers ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainer "Paul W. Rankin" . "rnkn@rnkn.xyz"))])
+ (fpga . [(20260715 1713) ((emacs (29 1))) "FPGA & ASIC Utils" tar ((:url . "https://github.com/gmlarumbe/fpga") (:commit . "cbf972cf8700291d904f8b922f5d919295d69a67") (:revdesc . "cbf972cf8700") (:keywords "tools") (:authors ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainers ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainer "Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com"))])
+ (fraktur-mode . [(20160815 227) ((cl-lib (0 5))) "Easily insert Unicode mathematical Fraktur characters" tar ((:url . "https://github.com/grettke/fraktur-mode") (:commit . "514baf5546aed12a0d9fa0fe66e87cdcc7843b08") (:revdesc . "514baf5546ae") (:keywords "unicode" "fraktur" "math" "mathematical") (:authors ("Grant Rettke" . "gcr@wisdomandwonder.com")) (:maintainers (nil . "gcr@wisdomandwonder.com")) (:maintainer nil . "gcr@wisdomandwonder.com"))])
+ (frame-local . [(20180330 940) ((emacs (25 1))) "Variables local to a frame" tar ((:url . "https://github.com/sebastiencs/frame-local") (:commit . "51c0889602626e2dcc6f1c1a812b058bc96df03c") (:revdesc . "51c088960262") (:keywords "frames" "tools" "local" "lisp") (:authors ("Sebastien Chapuis" . "sebastien@chapu.is")) (:maintainers ("Sebastien Chapuis" . "sebastien@chapu.is")) (:maintainer "Sebastien Chapuis" . "sebastien@chapu.is"))])
+ (frame-mode . [(20260710 1851) ((s (1 9 0)) (emacs (24 4))) "Use frames instead of windows" tar ((:url . "https://github.com/IvanMalison/frame-mode") (:commit . "0435d9ed05223904cf389eea881553632e681035") (:revdesc . "0435d9ed0522") (:keywords "frames") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (frame-purpose . [(20211011 1518) ((emacs (25 1)) (dash (2 18))) "Purpose-specific frames" tar ((:url . "https://github.com/alphapapa/frame-purpose.el") (:commit . "7d498147445cc0afb87b922a8225d2e163e5ed5a") (:revdesc . "7d498147445c") (:keywords "buffers" "convenience" "frames") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (frame-tag . [(20170111 6) ((cl-lib (0 5))) "Minor mode that assigns a unique number to each frame for easy switching" tar ((:url . "https://github.com/liangzan/frame-tag.el") (:commit . "73d6163568c7d32952175e663318b872f995a4e5") (:revdesc . "73d6163568c7") (:keywords "frame" "movement") (:authors ("Wong Liang Zan" . "zan@liangzan.net")) (:maintainers ("Wong Liang Zan" . "zan@liangzan.net")) (:maintainer "Wong Liang Zan" . "zan@liangzan.net"))])
+ (frames-only-mode . [(20260328 650) ((emacs (28 1))) "Use frames instead of Emacs windows" tar ((:url . "https://github.com/davidshepherd7/frames-only-mode") (:commit . "ba54b8ff096b3317fc4a28ca5bbb8e46199c2b8d") (:revdesc . "ba54b8ff096b") (:keywords "frames" "windows") (:authors ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainers ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainer "David Shepherd" . "davidshepherd7@gmail.com"))])
+ (frameshot . [(20260601 1501) ((emacs (28 1)) (compat (31 0))) "Take screenshots of a frame" tar ((:url . "https://github.com/tarsius/frameshot") (:commit . "6e1f45af13ebaf6ff6f13207c74ed4c5fb8e10c9") (:revdesc . "6e1f45af13eb") (:keywords "multimedia") (:authors ("Jonas Bernoulli" . "emacs.frameshot@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.frameshot@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.frameshot@jonas.bernoulli.dev"))])
+ (framesize . [(20131017 2132) ((key-chord (0 5 20080915))) "Change the size of frames in Emacs" tar ((:url . "https://github.com/nicferrier/emacs-framesize") (:commit . "f2dbf5d2513b2bc45f2085370a55c1754b6025da") (:revdesc . "f2dbf5d2513b") (:keywords "frames") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (frecency . [(20240111 628) ((emacs (25 1)) (a (0 1)) (dash (2 13 0))) "Library for sorting items by frequency and recency of access" tar ((:url . "https://github.com/alphapapa/frecency.el") (:commit . "4293bf4c8d571b0914e16a5aa05a6d657fdff551") (:revdesc . "4293bf4c8d57") (:keywords "extensions") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (frecentf . [(20231125 201) ((emacs (26 1)) (frecency (0 1 -1)) (persist (0 4)) (async (1 9 4))) "Pervasive recentf using frecency" tar ((:url . "https://launchpad.net/frecentf.el") (:commit . "ef788b2af412311fbc6f52d639810746e5c0fa93") (:revdesc . "ef788b2af412") (:keywords "files" "maint") (:authors ("Felipe Lema" . "felipel@mortemale.org")) (:maintainers ("Felipe Lema" . "felipel@mortemale.org")) (:maintainer "Felipe Lema" . "felipel@mortemale.org"))])
+ (free-keys . [(20250512 1527) ((cl-lib (0 3))) "Show free keybindings for modkeys or prefixes" tar ((:url . "https://github.com/Fuco1/free-keys") (:commit . "bed8e9c356c889cd98dd7a4a63c69d6c4960cf82") (:revdesc . "bed8e9c356c8") (:keywords "convenience") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (freeradius-mode . [(20190401 1743) ((emacs (24 4))) "Major mode for FreeRadius server config files" tar ((:url . "https://github.com/VersBinarii/freeradius-mode") (:commit . "cf8bf0359cf6c77848facbd24b764b3e111b4c2d") (:revdesc . "cf8bf0359cf6"))])
+ (fretboard . [(20250420 326) ((emacs (27 1)) (s (1 13 0)) (dash (2 19 0))) "Visualize guitar scales and chord shapes on a fretboard" tar ((:url . "https://github.com/skyefreeman/fretboard.el") (:commit . "064aeb7553c9bef86cf3de8d3c124809f1b3b381") (:revdesc . "064aeb7553c9") (:keywords "music" "guitar" "tools"))])
+ (friendly-remote-shell . [(20230916 1426) ((emacs (24 1)) (cl-lib (0 6 1)) (with-shell-interpreter (0 2 5)) (friendly-tramp-path (0 1 0)) (friendly-shell (0 2 0))) "Human-friendly remote interactive shells" tar ((:url . "https://github.com/p3r7/friendly-shell") (:commit . "5cafa3f6313ce04a47c8996ea1ac6b617d155d46") (:revdesc . "5cafa3f6313c") (:keywords "processes" "terminals"))])
+ (friendly-shell . [(20230916 1426) ((emacs (24 1)) (cl-lib (0 6 1)) (dash (2 17 0)) (with-shell-interpreter (0 2 5))) "Better shell-mode API" tar ((:url . "https://github.com/p3r7/friendly-shell") (:commit . "5cafa3f6313ce04a47c8996ea1ac6b617d155d46") (:revdesc . "5cafa3f6313c") (:keywords "processes" "terminals"))])
+ (friendly-shell-command . [(20230916 1426) ((emacs (24 1)) (cl-lib (0 6 1)) (dash (2 17 0)) (with-shell-interpreter (0 2 5))) "Better shell-command API" tar ((:url . "https://github.com/p3r7/friendly-shell") (:commit . "5cafa3f6313ce04a47c8996ea1ac6b617d155d46") (:revdesc . "5cafa3f6313c") (:keywords "processes" "terminals"))])
+ (friendly-tramp-path . [(20200502 1032) ((cl-lib (0 6 1))) "Human-friendly TRAMP path construction" tar ((:url . "https://github.com/p3r7/prf-tramp") (:commit . "be572b8953b9e5a3a35c30bb64c2936d3e9802ba") (:revdesc . "be572b8953b9"))])
+ (frimacs . [(20260308 1807) ((emacs (26 1))) "An environment for the FriCAS computer algebra system" tar ((:url . "https://github.com/pdo/frimacs") (:commit . "e1f1599c6144e697b41059369f4d6010eca9019f") (:revdesc . "e1f1599c6144") (:keywords "fricas" "computer algebra" "extensions" "tools") (:authors ("Paul Onions" . "paul.onions@acm.org")) (:maintainers ("Paul Onions" . "paul.onions@acm.org")) (:maintainer "Paul Onions" . "paul.onions@acm.org"))])
+ (fringe-current-line . [(20140111 411) nil "Show current line on the fringe" tar ((:url . "https://github.com/kyanagi/fringe-current-line/raw/master/fringe-current-line.el") (:commit . "0ef000bac76abae30601222e6f06c7d133ab4942") (:revdesc . "0ef000bac76a") (:authors ("Kouhei Yanagita" . "yanagi@shakenbu.org")) (:maintainers ("Kouhei Yanagita" . "yanagi@shakenbu.org")) (:maintainer "Kouhei Yanagita" . "yanagi@shakenbu.org"))])
+ (fringe-helper . [(20140620 2109) nil "Helper functions for fringe bitmaps" tar ((:url . "http://nschum.de/src/emacs/fringe-helper/") (:commit . "9bc3d3e82c9cc3937aa090248dc4dd2e289fc55c") (:revdesc . "9bc3d3e82c9c") (:keywords "lisp") (:authors ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainers ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainer "Nikolaj Schumacher" . "bugs*nschumde"))])
+ (frog-jump-buffer . [(20251228 555) ((emacs (24)) (avy (0 4 0)) (dash (2 4 0)) (frog-menu (0 2 8))) "The fastest buffer-jumping Emacs lisp package around" tar ((:url . "https://github.com/waymondo/frog-jump-buffer") (:commit . "e2beb322d4ef1baaaf191dbc6f50e19fa5781abf") (:revdesc . "e2beb322d4ef") (:keywords "convenience" "tools"))])
+ (frontside-javascript . [(20220315 1057) ((emacs (25 1)) (add-node-modules-path (1 2 0)) (company (0 9 2)) (flycheck (20201228 2104)) (js2-mode (20201220)) (js2-refactor (0 9 0)) (rjsx-mode (0 5 0)) (tide (4 0 2)) (web-mode (17)) (lsp-mode (20220124))) "JS  development that just work™️" tar ((:url . "https://github.com/thefrontside/frontmacs") (:commit . "18816534a977fbd28848389b58c22b6538cfdeec") (:revdesc . "18816534a977") (:keywords "files" "tools") (:authors ("Frontside Engineering" . "engineering@frontside.com")) (:maintainers ("Frontside Engineering" . "engineering@frontside.com")) (:maintainer "Frontside Engineering" . "engineering@frontside.com"))])
+ (fsbot-data-browser . [(20220830 230) nil "Browse the fsbot database using tabulated-list-mode" tar ((:url . "https://github.com/benaiah/fsbot-data-browser") (:commit . "27455860fec01ca47bf98b85f093cc24b9852bef") (:revdesc . "27455860fec0") (:keywords "fsbot" "irc" "tabulated-list-mode"))])
+ (fsharp-mode . [(20250630 1818) ((emacs (25))) "Support for the F# programming language" tar ((:url . "https://github.com/fsharp/emacs-fsharp-mode") (:commit . "9b2405bb8367661fde1b55a6b8a5793bb324282d") (:revdesc . "9b2405bb8367") (:keywords "languages") (:authors ("2010-2011 Laurent Le Brun" . "laurent@le-brun.eu") ("2012-2014 Robin Neatherway" . "robin.neatherway@gmail.com")))])
+ (fsharp-ts-mode . [(20260728 827) ((emacs (29 1))) "Major mode for F# code" tar ((:url . "https://github.com/bbatsov/fsharp-ts-mode") (:commit . "07eb9306c82a133d6723346455f6be8e0a641ac1") (:revdesc . "07eb9306c82a") (:keywords "languages" "fsharp") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (fsrs . [(20251119 1629) ((emacs (25 1))) "Free Spaced Repetition Scheduler" tar ((:url . "https://github.com/open-spaced-repetition/lisp-fsrs") (:commit . "3260544388b9239dc3710eb16ff202a279391260") (:revdesc . "3260544388b9") (:keywords "tools"))])
+ (fstar-mode . [(20250402 820) ((emacs (24 3)) (dash (2 11)) (company (0 8 12)) (quick-peek (1 0)) (yasnippet (0 11 0)) (flycheck (30 0)) (company-quickhelp (2 2 0))) "Support for F* programming" tar ((:url . "https://github.com/FStarLang/fstar-mode.el") (:commit . "3bbfe93abd077103e9e4417d076d4f4d21e9acab") (:revdesc . "3bbfe93abd07") (:keywords "convenience" "languages") (:authors ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainers ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainer "Clément Pit-Claudel" . "clement.pitclaudel@live.com"))])
+ (fuel . [(20241006 231) ((cl-lib (0 2)) (emacs (24 2))) "Major mode for the Factor programming language" tar ((:url . "https://github.com/factor/fuel") (:commit . "6d0e98494f89d8b7dcfcae4cf83775562bf44ea9") (:revdesc . "6d0e98494f89") (:keywords "languages" "fuel" "factor") (:authors ("Jose Antonio Ortega Ruiz" . "jao@gnu.org")) (:maintainers ("Jose Antonio Ortega Ruiz" . "jao@gnu.org")) (:maintainer "Jose Antonio Ortega Ruiz" . "jao@gnu.org"))])
+ (fuff . [(20170202 1503) ((seq (2 3))) "Find files with findutils, recursively" tar ((:url . "https://github.com/joelmo/fuff") (:commit . "278e849913df87bd8756c59382282d87474802c3") (:revdesc . "278e849913df") (:keywords "files" "project" "convenience"))])
+ (full-ack . [(20140223 1732) nil "A front-end for ack" tar ((:url . "http://nschum.de/src/emacs/full-ack/") (:commit . "8345753e9569dabf6426a837f29387557e32f2af") (:revdesc . "8345753e9569") (:keywords "tools" "matching") (:authors ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainers ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainer "Nikolaj Schumacher" . "bugs*nschumde"))])
+ (fullframe . [(20210226 1057) ((cl-lib (0 5))) "Generalized automatic execution in a single frame" tar ((:url . "https://git.sr.ht/~tomterl/fullframe") (:commit . "886b831c001b44ec95aec4ff36e8bc1b3003c786") (:revdesc . "886b831c001b") (:keywords "fullscreen") (:authors ("Tom Regner" . "tom@goochesa.de")) (:maintainers ("Tom Regner" . "tom@goochesa.de")) (:maintainer "Tom Regner" . "tom@goochesa.de"))])
+ (function-args . [(20220516 1226) ((ivy (0 9 1))) "C++ completion for GNU Emacs" tar ((:url . "https://github.com/abo-abo/function-args") (:commit . "beba049751fed78666c87bd146a6f1cf149bb819") (:revdesc . "beba049751fe") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (fuo . [(20190812 927) ((emacs (24 4))) "Feeluown client" tar ((:url . "https://github.com/cosven/emacs-fuo") (:commit . "0e4122f94a336a50c02bc96652d25ac3d74bedeb") (:revdesc . "0e4122f94a33") (:keywords "feeluown" "multimedia" "unix") (:authors ("cosven" . "yinshaowen241@gmail.com")) (:maintainers ("cosven" . "yinshaowen241@gmail.com")) (:maintainer "cosven" . "yinshaowen241@gmail.com"))])
+ (furl . [(20150509 316) nil "Friendly URL retrieval" tar ((:url . "https://github.com/nex3/furl-el") (:commit . "014438271e0ef27333dfcd599cb247f12a20d870") (:revdesc . "014438271e0e") (:authors ("Natalie Weizenbaum" . "nweiz@google.com")) (:maintainers ("Natalie Weizenbaum" . "nweiz@google.com")) (:maintainer "Natalie Weizenbaum" . "nweiz@google.com"))])
+ (fussy . [(20260613 1231) ((emacs (29 1)) (flx (0 5)) (compat (30 0 0 0))) "Fuzzy completion style using `flx' and/or `fzf-native'" tar ((:url . "https://github.com/jojojames/fussy") (:commit . "78730ceefb23ee6314803f54eaf73cb044055f47") (:revdesc . "78730ceefb23") (:keywords "matching") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (futhark-mode . [(20250311 1518) ((emacs (24 3)) (cl-lib (0 5)) (reformatter (0 4))) "Major mode for editing Futhark source files" tar ((:url . "https://github.com/diku-dk/futhark-mode") (:commit . "ac363a47f6b24b9af5b817fb7bd94c16ebd46c3d") (:revdesc . "ac363a47f6b2") (:keywords "languages"))])
+ (fuz . [(20200104 524) ((emacs (25 1))) "Fast and precise fuzzy scoring/matching utils" tar ((:url . "https://github.com/cireu/fuz.el") (:commit . "0b6b64cebde5675be3a28520ee16234db48d3b8b") (:revdesc . "0b6b64cebde5") (:keywords "lisp") (:authors ("Zhu Zihao" . "all_but_last@163.com")) (:maintainers ("Zhu Zihao" . "all_but_last@163.com")) (:maintainer "Zhu Zihao" . "all_but_last@163.com"))])
+ (fuzzy . [(20251231 1622) ((emacs (24 3))) "Fuzzy Matching" tar ((:url . "https://github.com/auto-complete/fuzzy-el") (:commit . "3dc04f0a037d53d1174a1f38dce8a4b3498fa947") (:revdesc . "3dc04f0a037d") (:keywords "convenience") (:authors ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainers ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainer "Tomohiro Matsuyama" . "m2ym.pub@gmail.com"))])
+ (fuzzy-clock . [(20251109 17) ((emacs (26 1))) "Display time in a human-friendly, approximate way" tar ((:url . "https://github.com/trevoke/fuzzy-clock.el") (:commit . "6b1a33296d856aeee0b29cdf65a9e614054ef94a") (:revdesc . "6b1a33296d85") (:keywords "calendar" "time"))])
+ (fuzzy-finder . [(20250318 632) ((emacs (24 4))) "Fuzzy Finder App Integration" tar ((:url . "https://github.com/10sr/fuzzy-finder-el") (:commit . "097072165c0ee4a2200229f39851bd85ca0ea92c") (:revdesc . "097072165c0e") (:keywords "matching") (:authors ("10sr" . "8.slashes@gmail.com")) (:maintainers ("10sr" . "8.slashes@gmail.com")) (:maintainer "10sr" . "8.slashes@gmail.com"))])
+ (fvwm-mode . [(20230214 2149) nil "A major mode for editing Fvwm configuration files" tar ((:url . "https://github.com/theBlackDragon/fvwm-mode") (:commit . "574c0370f6199c9a1492923bf0d35fdd26738d24") (:revdesc . "574c0370f619") (:keywords "files") (:authors ("Bert Geens" . "bert@lair.be")) (:maintainers ("Bert Geens" . "bert@lair.be")) (:maintainer "Bert Geens" . "bert@lair.be"))])
+ (fwb-cmds . [(20260601 1507) ((emacs (28 1)) (compat (31 0))) "Misc frame, window and buffer commands" tar ((:url . "https://github.com/tarsius/fwb-cmds") (:commit . "bb62a32dbd3febdd2e644af25a22e56259ed060d") (:revdesc . "bb62a32dbd3f") (:keywords "convenience") (:authors ("Jonas Bernoulli" . "emacs.fwb-cmds@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.fwb-cmds@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.fwb-cmds@jonas.bernoulli.dev"))])
+ (fxrd-mode . [(20250705 116) ((s (1 2))) "Major mode for editing fixed field width files" tar ((:url . "https://github.com/msherry/fxrd-mode") (:commit . "7f755e1ff4a6451bc97fcefef8e96f563311fb1a") (:revdesc . "7f755e1ff4a6") (:keywords "convenience") (:authors ("Marc Sherry" . "(msherry@gmail.com)")) (:maintainers ("Marc Sherry" . "(msherry@gmail.com)")) (:maintainer "Marc Sherry" . "(msherry@gmail.com)"))])
+ (fyure . [(20130216 1314) nil "An interface to fix Japanese hyoki-yure" tar ((:url . "https://github.com/mooz/fyure") (:commit . "b6977f1eb148e8b63259f7233b55bb050e44d9b8") (:revdesc . "b6977f1eb148") (:keywords "languages") (:authors ("Masafumi Oyamada" . "stillpedant@gmail.com")) (:maintainers ("Masafumi Oyamada" . "stillpedant@gmail.com")) (:maintainer "Masafumi Oyamada" . "stillpedant@gmail.com"))])
+ (fzf . [(20260505 1105) ((emacs (24 4))) "A front-end for fzf" tar ((:url . "https://github.com/bling/fzf.el") (:commit . "75060d81f4eea3f8088ac2a4a3a253c686b44d44") (:revdesc . "75060d81f4ee") (:keywords "fzf" "fuzzy" "search"))])
+ (fzf-native . [(20260714 2328) ((emacs (29 1))) "Fuzzy completion style" tar ((:url . "https://github.com/dangduc/fzf-native") (:commit . "39dc386062d6ae942b4a7e8592d26ce11b73bf29") (:revdesc . "39dc386062d6") (:keywords "matching") (:authors ("Duc Dang" . "me@dangduc.com")) (:maintainers ("Duc Dang" . "me@dangduc.com")) (:maintainer "Duc Dang" . "me@dangduc.com"))])
+ (fzfa . [(20260822 1949) ((emacs (29 1)) (fzf-native (2 2))) "Async fuzzy completion via `fzf-native'" tar ((:url . "https://github.com/jojojames/fzfa") (:commit . "99274680596209a0c0be80bba3ed470ed1e11ba2") (:revdesc . "992746805962") (:keywords "matching" "completion" "fzf" "fuzzy" "fussy") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (gameoflife . [(20250102 900) nil "Screensaver running Conway's Game of Life" tar ((:url . "https://github.com/Lindydancer/gameoflife") (:commit . "5f4ac265928bfd88765d057b44cebcef71a7aaf6") (:revdesc . "5f4ac265928b") (:keywords "games"))])
+ (gams-ac . [(20180423 926) ((emacs (24)) (auto-complete (1 0)) (gams-mode (4 0))) "Auto-complete source file for GAMS mode" tar ((:url . "https://github.com/ShiroTakeda/gams-ac") (:commit . "66d04ff36033f54205c19bc1d893e926d4dbf02e") (:revdesc . "66d04ff36033") (:keywords "languages" "tools" "gams-mode" "auto-complete"))])
+ (gams-mode . [(20260121 924) ((emacs (25 1))) "Major mode for General Algebraic Modeling System (GAMS)" tar ((:url . "https://github.com/ShiroTakeda/gams-mode") (:commit . "eeb4cfcf98d113388a5d66b2fa65cb32563ef9af") (:revdesc . "eeb4cfcf98d1") (:keywords "languages" "tools" "gams"))])
+ (gandalf-theme . [(20130809 947) nil "Gandalf color theme" tar ((:url . "https://github.com/ptrv/gandalf-theme-emacs") (:commit . "4e472fc851431458537d458d09c1f5895e338536") (:revdesc . "4e472fc85143") (:keywords "color" "theme") (:authors ("Peter Vasil" . "mail@petervasil.net")) (:maintainers ("Peter Vasil" . "mail@petervasil.net")) (:maintainer "Peter Vasil" . "mail@petervasil.net"))])
+ (gap-mode . [(20240430 210) nil "Major mode for editing files in the GAP programming language" tar ((:url . "https://gitlab.com/gvol/gap-mode") (:commit . "09b4082b6e28141537696bb832c8ecc975ec57d8") (:revdesc . "09b4082b6e28") (:keywords "gap") (:authors ("Michael Smith" . "smith@pell.anu.edu.au") ("Ivan Andrus" . "darthandrus@gmail.com")) (:maintainers ("Ivan Andrus" . "darthandrus@gmail.com")) (:maintainer "Ivan Andrus" . "darthandrus@gmail.com"))])
+ (gather . [(20141230 1338) nil "Gather string in buffer" tar ((:url . "https://github.com/mhayashi1120/Emacs-gather/raw/master/gather.el") (:commit . "8909c886d72a682710bb79ccfcfe4df54a399b7e") (:revdesc . "8909c886d72a") (:keywords "matching" "convenience" "tools") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (gcmh . [(20201116 2251) ((emacs (24))) "The Garbage Collector Magic Hack" tar ((:url . "https://gitlab.com/koral/gcmh") (:commit . "0089f9c3a6d4e9a310d0791cf6fa8f35642ecfd9") (:revdesc . "0089f9c3a6d4") (:keywords "internal") (:authors ("Andrea Corallo" . "akrl@sdf.org")) (:maintainers (nil . "akrl@sdf.org")) (:maintainer nil . "akrl@sdf.org"))])
+ (gcode-mode . [(20260108 1713) ((emacs (24 4))) "Simple G-Code major mode" tar ((:url . "https://gitlab.com/wavexx/gcode-mode.el") (:commit . "a0423aab9aba9f2af8600809bcb1b927fa188d1d") (:revdesc . "a0423aab9aba") (:keywords "gcode" "languages" "highlight" "syntax") (:authors ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainers ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainer "Yuri D'Elia" . "wavexx@thregr.org"))])
+ (gdb-x . [(20251107 1256) ((emacs (29 1))) "Improve GDB-MI user interface" tar ((:url . "https://codeberg.org/pastor/gdb-x") (:commit . "7e03680f7b5a001341d1892daa69bc32fcf75113") (:revdesc . "7e03680f7b5a") (:keywords "extensions") (:authors ("Sergio Pastor Pérez" . "sergio.pastorperez@outlook.es")) (:maintainers ("Sergio Pastor Pérez" . "sergio.pastorperez@outlook.es")) (:maintainer "Sergio Pastor Pérez" . "sergio.pastorperez@outlook.es"))])
+ (gdscript-mode . [(20260822 915) ((emacs (29 1))) "Major mode for Godot's GDScript language" tar ((:url . "https://github.com/godotengine/emacs-gdscript-mode/") (:commit . "2ecb74363851e551ed8176376e5b72725fe3e910") (:revdesc . "2ecb74363851") (:keywords "languages") (:authors ("Nathan Lovato" . "nathan@gdquest.com") ("Fabián E. Gallina" . "fgallina@gnu.org")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (gdshader-mode . [(20251123 1852) ((emacs (24 3)) (glsl-mode (2 4))) "Major mode for Godot gdshader files" tar ((:url . "https://github.com/bbbscarter/gdshader-mode") (:commit . "8e9efda9393d44be96009f37ff7201df3d36f05f") (:revdesc . "8e9efda9393d") (:keywords "languages" "opengl" "gpu" "godot") (:authors ("Simon Carter" . "bbbscarter@gmail.com")) (:maintainers ("Simon Carter" . "bbbscarter@gmail.com")) (:maintainer "Simon Carter" . "bbbscarter@gmail.com"))])
+ (geben . [(20220827 105) ((emacs (24 3)) (cl-lib (0 5))) "DBGp protocol frontend, a script debugger" tar ((:url . "https://github.com/ahungry/geben") (:commit . "8df1ed2c8ff13b0ca4ef241c95c46f60a5a4fe3c") (:revdesc . "8df1ed2c8ff1") (:keywords "c" "comm" "tools") (:authors ("Matthew Carter" . "m@ahungry.com")) (:maintainers ("Matthew Carter" . "m@ahungry.com")) (:maintainer "Matthew Carter" . "m@ahungry.com"))])
+ (geben-helm-projectile . [(20170524 334) ((emacs (24)) (geben (0 26)) (helm-projectile (0 13 0))) "Integrate helm-projectile with geben" tar ((:url . "https://github.com/ahungry/geben-helm-projectile") (:commit . "31ce0faca5dcc71924884f03fd5a7a25d00ccd9b") (:revdesc . "31ce0faca5dc") (:keywords "ahungry" "emacs" "geben" "helm" "projectile" "debug") (:authors ("Matthew Carter" . "m@ahungry.com")) (:maintainers ("Matthew Carter" . "m@ahungry.com")) (:maintainer "Matthew Carter" . "m@ahungry.com"))])
+ (geeknote . [(20220213 612) ((emacs (24))) "Use Evernote in Emacs through geeknote" tar ((:url . "https://github.com/avendael/emacs-geeknote") (:commit . "ce2738aebeeda35f9d31027e9b7bad0813b975c3") (:revdesc . "ce2738aebeed") (:keywords "evernote" "geeknote" "note" "emacs-evernote" "evernote-mode"))])
+ (geiser . [(20260823 2028) ((emacs (27 1)) (project (0 8 1))) "GNU Emacs and Scheme talk to each other" tar ((:url . "https://gitlab.com/emacs-geiser/") (:commit . "584f78b103037e8bc6f4b22a6fae23e09f619d6d") (:revdesc . "584f78b10303") (:keywords "languages" "scheme" "geiser") (:authors ("Jose Antonio Ortega Ruiz" . "(jao@gnu.org)")) (:maintainers ("Jose Antonio Ortega Ruiz" . "(jao@gnu.org)")) (:maintainer "Jose Antonio Ortega Ruiz" . "(jao@gnu.org)"))])
+ (geiser-chez . [(20230707 1334) ((emacs (26 1)) (geiser (0 19))) "Chez and Geiser talk to each other" tar ((:url . "https://gitlab.com/emacs-geiser/chez") (:commit . "605a81ff7b2d2b275a3ec68e3ce7e5b50f85014d") (:revdesc . "605a81ff7b2d") (:keywords "languages" "chez" "scheme" "geiser") (:authors ("Peter" . "craven@gmx.net")) (:maintainers ("Jose A Ortega Ruiz" . "jao@gnu.org")) (:maintainer "Jose A Ortega Ruiz" . "jao@gnu.org"))])
+ (geiser-chibi . [(20260706 27) ((emacs (24 4)) (geiser (0 18))) "Chibi Scheme's implementation of the geiser protocols" tar ((:url . "https://gitlab.com/emacs-geiser/chibi") (:commit . "98cda369db3faf7268dd3b1705bb914dd6dad56a") (:revdesc . "98cda369db3f") (:keywords "languages" "chibi" "scheme" "geiser") (:authors ("Peter" . "craven@gmx.net")) (:maintainers ("Jose A Ortega Ruiz" . "jao@gnu.org")) (:maintainer "Jose A Ortega Ruiz" . "jao@gnu.org"))])
+ (geiser-chicken . [(20260819 530) ((emacs (24 4)) (geiser (0 19))) "Chicken's implementation of the geiser protocols" tar ((:url . "https://gitlab.com/emacs-geiser/chicken") (:commit . "ba0c16df8ce21f1722e27e4591656c9b64fafdff") (:revdesc . "ba0c16df8ce2") (:keywords "languages" "chicken" "scheme" "geiser"))])
+ (geiser-gambit . [(20220208 1356) ((emacs (26 1)) (geiser (0 18))) "Gambit's implementation of the geiser protocols" tar ((:url . "https://gitlab.com/emacs-geiser/gambit") (:commit . "381d74ca5059b44fe3d8b5daf42214019c6d1a88") (:revdesc . "381d74ca5059") (:keywords "languages" "gambit" "scheme" "geiser") (:maintainers ("Jose A Ortega Ruiz" . "jao@gnu.org")) (:maintainer "Jose A Ortega Ruiz" . "jao@gnu.org"))])
+ (geiser-gauche . [(20251213 1148) ((emacs (26 1)) (geiser (0 11 2))) "Gauche scheme support for Geiser" tar ((:url . "https://gitlab.com/emacs-geiser/gauche") (:commit . "adbd3c8d9031955c5941af459ea0e2bd60b7c925") (:revdesc . "adbd3c8d9031") (:keywords "languages" "gauche" "scheme" "geiser") (:authors ("András Simonyi" . "andras.simonyi@gmail.com")) (:maintainers ("András Simonyi" . "andras.simonyi@gmail.com")) (:maintainer "András Simonyi" . "andras.simonyi@gmail.com"))])
+ (geiser-guile . [(20260516 19) ((emacs (27 1)) (transient (0 3)) (geiser (0 33))) "Guile and Geiser talk to each other" tar ((:url . "https://gitlab.com/emacs-geiser/guile") (:commit . "cbab81bd2dcb4c787bcda4ae18062db3087e6887") (:revdesc . "cbab81bd2dcb") (:keywords "languages" "guile" "scheme" "geiser") (:authors ("Jose Antonio Ortega Ruiz" . "(jao@gnu.org)")) (:maintainers ("Jose Antonio Ortega Ruiz" . "(jao@gnu.org)")) (:maintainer "Jose Antonio Ortega Ruiz" . "(jao@gnu.org)"))])
+ (geiser-kawa . [(20210920 1607) ((emacs (26 1)) (geiser (0 16))) "Kawa scheme support for Geiser" tar ((:url . "https://gitlab.com/emacs-geiser/kawa") (:commit . "5896b19642923f74f718eb68d447560b2d26d797") (:revdesc . "5896b1964292") (:keywords "languages" "kawa" "scheme" "geiser") (:authors ("spellcard199" . "spellcard199@protonmail.com")) (:maintainers ("spellcard199" . "spellcard199@protonmail.com")) (:maintainer "spellcard199" . "spellcard199@protonmail.com"))])
+ (geiser-mit . [(20240909 1145) ((emacs (24 4)) (geiser (0 18))) "MIT/GNU Scheme's implementation of the geiser protocols" tar ((:url . "https://gitlab.com/emacs-geiser/mit") (:commit . "ddd2ba733e8274d40a26b5d6d2ee11f1bac8abe6") (:revdesc . "ddd2ba733e82") (:keywords "languages" "mit" "scheme" "geiser") (:authors ("Peter" . "craven@gmx.net")) (:maintainers ("Jose A Ortega Ruiz" . "jao@gnu.org")) (:maintainer "Jose A Ortega Ruiz" . "jao@gnu.org"))])
+ (geiser-overlay . [(20240920 816) ((emacs (24 4)) (geiser (0 31))) "Overlay Scheme evaluation results" tar ((:url . "https://github.com/port19x/geiser-overlay") (:commit . "dd02acf804d6d3c0ac4f86ed580316b19a7f5d5c") (:revdesc . "dd02acf804d6") (:keywords "lisp" "scheme") (:authors ("port19" . "port19@port19.xyz")) (:maintainers ("port19" . "port19@port19.xyz")) (:maintainer "port19" . "port19@port19.xyz"))])
+ (geiser-racket . [(20210421 125) ((emacs (26 1)) (geiser (0 16))) "Support for Racket in Geiser" tar ((:url . "https://gitlab.com/emacs-geiser/racket") (:commit . "22e56ce80389544d3872cf4beb4008fb514b2218") (:revdesc . "22e56ce80389") (:keywords "languages" "racket" "scheme" "geiser") (:authors ("Jose Antonio Ortega Ruiz" . "(jao@gnu.org)")) (:maintainers ("Jose Antonio Ortega Ruiz" . "(jao@gnu.org)")) (:maintainer "Jose Antonio Ortega Ruiz" . "(jao@gnu.org)"))])
+ (geiser-stklos . [(20260411 1308) ((emacs (24 4)) (geiser (0 16))) "STklos Scheme implementation of the geiser protocols" tar ((:url . "https://gitlab.com/emacs-geiser/stklos") (:commit . "eb8f6d53ec5c4520c590572182f66efa51faf74c") (:revdesc . "eb8f6d53ec5c") (:keywords "languages" "stklos" "scheme" "geiser") (:authors ("Jeronimo Pellegrini" . "(j_p@aleph0.info)")) (:maintainers ("Jeronimo Pellegrini" . "(j_p@aleph0.info)")) (:maintainer "Jeronimo Pellegrini" . "(j_p@aleph0.info)"))])
+ (gemini-mode . [(20221127 1619) ((emacs (24 4))) "A simple highlighting package for text/gemini" tar ((:url . "https://git.carcosa.net/jmcbray/gemini.el") (:commit . "a7dd7c6ea4e036d0d5ecc4a5d284874c400f10ba") (:revdesc . "a7dd7c6ea4e0") (:keywords "languages") (:authors ("Jason McBrayer" . "jmcbray@carcosa.net") ("tastytea" . "tastytea@tastytea.de") ("tienne Deparis" . "etienne@depar.is")) (:maintainers ("Jason McBrayer" . "jmcbray@carcosa.net") ("tastytea" . "tastytea@tastytea.de") ("tienne Deparis" . "etienne@depar.is")) (:maintainer "Jason McBrayer" . "jmcbray@carcosa.net"))])
+ (gemini-write . [(20211114 1032) ((emacs (26)) (elpher (2 8 0)) (gemini-mode (1 0 0))) "Elpher for Titan" tar ((:url . "https://alexschroeder.ch/cgit/gemini-write") (:commit . "2a7d07d0ce4c5b8750f3ff1182ad94ee616734c8") (:revdesc . "2a7d07d0ce4c") (:keywords "comm" "gemini") (:authors ("Alex Schroeder" . "alex@gnu.org")) (:maintainers ("Alex Schroeder" . "alex@gnu.org")) (:maintainer "Alex Schroeder" . "alex@gnu.org"))])
+ (gemtext-mode . [(20241129 820) ((emacs (29 1))) "Major mode for Gemtext-formatted text" tar ((:url . "https://sr.ht/~arjca/gemtext-mode.el/") (:commit . "9e6a7373759afbb8b05e322a3c7b52fc9255c16c") (:revdesc . "9e6a7373759a") (:keywords "languages" "gemtext" "gemini") (:authors ("Antoine Aubé" . "courriel@arjca.fr")) (:maintainers ("Antoine Aubé" . "courriel@arjca.fr")) (:maintainer "Antoine Aubé" . "courriel@arjca.fr"))])
+ (general . [(20250612 2309) ((emacs (24 4)) (cl-lib (0 5))) "Convenience wrappers for keybindings" tar ((:url . "https://github.com/noctuid/general.el") (:commit . "a48768f85a655fe77b5f45c2880b420da1b1b9c3") (:revdesc . "a48768f85a65") (:keywords "vim" "evil" "leader" "keybindings" "keys") (:authors ("Fox Kiester" . "noct@posteo.net")) (:maintainers ("Fox Kiester" . "noct@posteo.net")) (:maintainer "Fox Kiester" . "noct@posteo.net"))])
+ (genexpr-mode . [(20260701 1400) ((emacs (27 1))) "Major mode for editing GenExpr files" tar ((:url . "https://github.com/larme/genexpr-mode") (:commit . "b5007dbd80b9468b7b206927791171218f2f5da1") (:revdesc . "b5007dbd80b9") (:keywords "languages" "dsp") (:authors ("Zhao Shenyang" . "dev@zsy.im")) (:maintainers ("Zhao Shenyang" . "dev@zsy.im")) (:maintainer "Zhao Shenyang" . "dev@zsy.im"))])
+ (genrnc . [(20140612 1237) ((deferred (0 3 1)) (concurrent (0 3)) (log4e (0 2 0)) (yaxception (0 1))) "Generate RELAX NG Compact Schema from RELAX NG Schema, XML Schema and DTD" tar ((:url . "https://github.com/aki2o/emacs-genrnc") (:commit . "da75b1966a73ad215ec2ced4522c25f4d0bf1f9a") (:revdesc . "da75b1966a73") (:keywords "xml") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (geoip . [(20200310 911) ((emacs (25 1))) "Find out where an IP address is located via GeoIP2" tar ((:url . "https://github.com/xuchunyang/geoip.el") (:commit . "b4952890993642c7055f4bbbf05b0384740f8f51") (:revdesc . "b49528909936") (:keywords "tools"))])
+ (geolocation . [(20200317 1559) ((request-deferred (0 3 2)) (deferred (0 5 1)) (emacs (25 1))) "Get your location on Earth" tar ((:url . "https://github.com/gonewest818/geolocation.el") (:commit . "08e3569024659f6f04cb269ad213d144fd8e2a95") (:revdesc . "08e356902465") (:keywords "hardware") (:authors ("Neil Okamoto" . "neil.okamoto+melpa@gmail.com")) (:maintainers ("Neil Okamoto" . "neil.okamoto+melpa@gmail.com")) (:maintainer "Neil Okamoto" . "neil.okamoto+melpa@gmail.com"))])
+ (german-holidays . [(20181213 644) nil "German holidays for Emacs calendar" tar ((:url . "https://github.com/rudolfochrist/german-holidays") (:commit . "a8462dffccaf2b665f2032e646b5370e993a386a") (:revdesc . "a8462dffccaf") (:authors ("Sebastian Christ" . "rudolfo.christ@gmail.com")) (:maintainers ("Sebastian Christ" . "rudolfo.christ@gmail.com")) (:maintainer "Sebastian Christ" . "rudolfo.christ@gmail.com"))])
+ (germanium . [(20220716 1500) ((emacs (26 1))) "Generate image from source code using germanium" tar ((:url . "https://github.com/matsuyoshi30/germanium-el") (:commit . "7292aa6870cf8b0acb34a8750da32b44d83cd65c") (:revdesc . "7292aa6870cf") (:keywords "convenience"))])
+ (gerrit . [(20260512 617) ((emacs (29 1)) (magit (2 13 1)) (s (1 12 0)) (dash (0 2 15))) "Gerrit client" tar ((:url . "https://github.com/twmr/gerrit.el") (:commit . "ccbc70a482305c8f0c88da3a9daead6a16c63ae5") (:revdesc . "ccbc70a48230") (:keywords "extensions") (:authors ("Thomas Wimmer" . "thomaswimmer@posteo.com")) (:maintainers ("Thomas Wimmer" . "thomaswimmer@posteo.com")) (:maintainer "Thomas Wimmer" . "thomaswimmer@posteo.com"))])
+ (gf . [(20181028 1542) ((s (1 0)) (ht (2 0))) "Major mode for editing GF code" tar ((:url . "https://github.com/GrammaticalFramework/gf-emacs-mode") (:commit . "49fa46db67634530499be969ffd3c436a22d4404") (:revdesc . "49fa46db6763") (:keywords "languages") (:authors ("Johan Bockgård" . "bojohan+mail@dd.chalmers.se")) (:maintainers ("bruno cuconato" . "bcclaro+emacs@gmail.com")) (:maintainer "bruno cuconato" . "bcclaro+emacs@gmail.com"))])
+ (ggo-mode . [(20210310 1345) nil "Gengetopt major mode" tar ((:url . "https://github.com/mkjunker/ggo-mode") (:commit . "6a7617b5af3d13029e4d680a375e8107c40d0fac") (:revdesc . "6a7617b5af3d") (:keywords "extensions" "convenience" "local") (:authors ("Matthew K. Junker" . "junker@alum.mit.edu")) (:maintainers ("Matthew K. Junker" . "junker@alum.mit.edu")) (:maintainer "Matthew K. Junker" . "junker@alum.mit.edu"))])
+ (ggtags . [(20230602 133) ((emacs (25))) "Emacs frontend to GNU Global source code tagging system" tar ((:url . "https://github.com/leoliu/ggtags") (:commit . "4e3630c30fb836872b5d8f2ae3e5d5ae003365d8") (:revdesc . "4e3630c30fb8") (:keywords "tools" "convenience") (:authors ("Leo Liu" . "sdl.web@gmail.com")) (:maintainers ("Leo Liu" . "sdl.web@gmail.com")) (:maintainer "Leo Liu" . "sdl.web@gmail.com"))])
+ (gh . [(20260210 1535) ((emacs (25 1)) (pcache (0 4 2)) (logito (0 1)) (marshal (0 9 0)) (cl-lib (0 3))) "Github API client libraries" tar ((:url . "https://github.com/sigma/gh.el") (:commit . "b1551245d3404eac6394abaebe1a9e0b2c504235") (:revdesc . "b1551245d340") (:authors ("Yann Hodique" . "yhodique@gmail.com")) (:maintainers ("Yann Hodique" . "yhodique@gmail.com")) (:maintainer "Yann Hodique" . "yhodique@gmail.com"))])
+ (gh-md . [(20220316 1432) ((emacs (24 3))) "Render markdown using the Github api" tar ((:url . "https://github.com/emacs-pe/gh-md.el") (:commit . "e721fd5e41e682f47f2dd4ce26ef2ba28c7fa0b5") (:revdesc . "e721fd5e41e6") (:keywords "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (gh-notify . [(20260701 1512) ((emacs (29 1)) (magit (3 3 0)) (forge (0 4 0))) "A veneer for Magit/Forge GitHub notifications" tar ((:url . "https://github.com/anticomputer/gh-notify") (:commit . "efecbc0ea7a1b77a48fb395ce3d5a54271974608") (:revdesc . "efecbc0ea7a1") (:keywords "comm") (:authors ("Bas Alberts" . "bas@anti.computer") ("xristos" . "xristos@sdf.org")) (:maintainers ("Bas Alberts" . "bas@anti.computer")) (:maintainer "Bas Alberts" . "bas@anti.computer"))])
+ (ghc-imported-from . [(20141124 1932) ((emacs (24 1))) "Haskell documentation lookup with ghc-imported-from" tar ((:url . "https://github.com/david-christiansen/ghc-imported-from-el") (:commit . "fcff08628a19f5d26151564659218cc677779b79") (:revdesc . "fcff08628a19") (:keywords "languages") (:authors ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainers ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainer "David Raymond Christiansen" . "david@davidchristiansen.dk"))])
+ (ghci-completion . [(20151125 1257) ((emacs (24 1)) (cl-lib (0 5))) "Completion for GHCi commands in inferior-haskell buffers" tar ((:url . "https://github.com/manzyuk/ghci-completion") (:commit . "c47e23d585d2a3c7b13aac163693fdc4f2bb90e5") (:revdesc . "c47e23d585d2") (:keywords "convenience") (:authors ("Oleksandr Manzyuk" . "manzyuk@gmail.com")) (:maintainers ("Oleksandr Manzyuk" . "manzyuk@gmail.com")) (:maintainer "Oleksandr Manzyuk" . "manzyuk@gmail.com"))])
+ (gherkin-mode . [(20171224 1353) nil "An emacs major mode for editing gherkin files" tar ((:url . "https://github.com/candera/gherkin-mode") (:commit . "0313492e7da152f0aa73ddf96c0287ded8f51253") (:revdesc . "0313492e7da1") (:keywords "languages"))])
+ (ghost-blog . [(20171023 742) ((markdown-mode (1 0))) "A package to manage Ghost blog" tar ((:url . "https://github.com/javaguirre/ghost-blog") (:commit . "71b358643cc9a2db1bf752281ff94aba9b59e4cc") (:revdesc . "71b358643cc9") (:keywords "ghost" "blog") (:authors ("Javier Aguirre" . "hello@javaguirre.net")) (:maintainers ("Javier Aguirre" . "hello@javaguirre.net")) (:maintainer "Javier Aguirre" . "hello@javaguirre.net"))])
+ (ghostel . [(20260825 1200) ((emacs (28 1)) (compat (30 1 0 1))) "Terminal emulator powered by libghostty" tar ((:url . "https://github.com/dakra/ghostel") (:commit . "d8ee7a9ef523e054d35987349ed14ee1d791aad2") (:revdesc . "d8ee7a9ef523") (:keywords "terminals") (:authors ("Daniel Kraus" . "daniel@kraus.my")) (:maintainers ("Daniel Kraus" . "daniel@kraus.my")) (:maintainer "Daniel Kraus" . "daniel@kraus.my"))])
+ (ghq . [(20230510 332) ((emacs (26 1)) (dash (2 18 0)) (s (1 7 0))) "Ghq interface for emacs" tar ((:url . "https://github.com/lafrenierejm/emacs-ghq") (:commit . "eb197c14e53ac57a136ea8d34eec7528487c3301") (:revdesc . "eb197c14e53a") (:keywords "convenience") (:authors ("Roman Coedo" . "romancoedo@gmail.com")) (:maintainers ("Joseph LaFreniere" . "joseph@lafreniere.xyz")) (:maintainer "Joseph LaFreniere" . "joseph@lafreniere.xyz"))])
+ (ghub . [(20260731 2254) ((emacs (29 1)) (compat (31 0)) (cond-let (1 1)) (llama (1 0)) (treepy (0 1 3))) "Client libraries for Git forge APIs" tar ((:url . "https://github.com/magit/ghub") (:commit . "cba5666d8b999e2733aefac369a4e0def3be7fc9") (:revdesc . "cba5666d8b99") (:keywords "tools") (:authors ("Jonas Bernoulli" . "emacs.ghub@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.ghub@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.ghub@jonas.bernoulli.dev"))])
+ (ghub+ . [(20191229 1748) ((emacs (25)) (ghub (2 0)) (apiwrap (0 5))) "A thick GitHub API client built on ghub" tar ((:url . "https://github.com/vermiculus/ghub-plus") (:commit . "b1adef2402d7599911d4dd447a987a0cea04e6fe") (:revdesc . "b1adef2402d7") (:keywords "extensions" "multimedia" "tools") (:authors ("Sean Allred" . "code@seanallred.com")) (:maintainers ("Sean Allred" . "code@seanallred.com")) (:maintainer "Sean Allred" . "code@seanallred.com"))])
+ (gif-screencast . [(20230728 1144) ((emacs (25 1))) "One-frame-per-action GIF recording" tar ((:url . "https://gitlab.com/ambrevar/emacs-gif-screencast") (:commit . "6798656d3d3107d16e30cc26bc3928b00e50c1ca") (:revdesc . "6798656d3d31") (:keywords "multimedia" "screencast") (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainers ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz"))])
+ (gift-mode . [(20210528 1459) nil "Major mode for editing GIFT format quizzes" tar ((:url . "https://github.com/csrhodes/gift-mode") (:commit . "c93354e8fe1173b22f398f17b127875807f15b87") (:revdesc . "c93354e8fe11") (:authors ("Christophe Rhodes" . "christophe@rhodes.io")) (:maintainers ("Christophe Rhodes" . "christophe@rhodes.io")) (:maintainer "Christophe Rhodes" . "christophe@rhodes.io"))])
+ (gildas-mode . [(20181022 649) ((polymode (0 1 5)) (emacs (25))) "Major mode for Gildas" tar ((:url . "https://github.com/smaret/gildas-mode") (:commit . "d0c9e997e2aa0bcd9b8b7db082d69100448cb1b2") (:revdesc . "d0c9e997e2aa") (:keywords "languages" "gildas") (:authors ("Sébastien Maret" . "sebastien.maret@icloud.com")) (:maintainers ("Sébastien Maret" . "sebastien.maret@icloud.com")) (:maintainer "Sébastien Maret" . "sebastien.maret@icloud.com"))])
+ (girly-notebook-theme . [(20240513 1344) ((emacs (26 1))) "A light theme with vivid colours and cursive text" tar ((:url . "https://github.com/melissaboiko/girly-notebook-theme") (:commit . "e27603d5afb2b60714b8acef61f3477d11c34e00") (:revdesc . "e27603d5afb2") (:authors ("elilla&" . "elilla@transmom.love")) (:maintainers ("elilla&" . "elilla@transmom.love")) (:maintainer "elilla&" . "elilla@transmom.love"))])
+ (gist . [(20171128 406) ((emacs (24 1)) (gh (0 10 0))) "Emacs integration for gist.github.com" tar ((:url . "https://github.com/defunkt/gist.el") (:commit . "b2712a61d04af98a05cc2556d85479803b6626be") (:revdesc . "b2712a61d04a") (:keywords "tools") (:authors ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainers ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainer "Yann Hodique" . "yann.hodique@gmail.com"))])
+ (git . [(20140128 1041) ((s (1 7 0)) (dash (2 2 0)) (f (0 10 0))) "An Elisp API for programmatically using Git" tar ((:url . "https://github.com/rejeep/git.el") (:commit . "8b7f1477ef367b5b7de452589dd9a8ab30150d0a") (:revdesc . "8b7f1477ef36") (:keywords "git") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (git-annex . [(20250626 2344) nil "Mode for easy editing of git-annex'd files" tar ((:url . "https://github.com/jwiegley/git-annex-el") (:commit . "7f12f0acb2548e22946c17b3cdd58a3376434294") (:revdesc . "7f12f0acb254") (:keywords "files" "data" "git" "annex") (:authors ("John Wiegley" . "jwiegley@gmail.com")) (:maintainers ("John Wiegley" . "jwiegley@gmail.com")) (:maintainer "John Wiegley" . "jwiegley@gmail.com"))])
+ (git-assembler-mode . [(20230611 1425) ((emacs (24 4))) "Git-assembler major mode" tar ((:url . "https://gitlab.com/wavexx/git-assembler-mode.el") (:commit . "391f507269f4f243d81ebdc1f5d43388dc54bc2f") (:revdesc . "391f507269f4") (:keywords "git" "git-assembler" "languages" "highlight" "syntax") (:authors ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainers ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainer "Yuri D'Elia" . "wavexx@thregr.org"))])
+ (git-attr . [(20180925 2003) ((emacs (24 3))) "Git attributes of buffer file" tar ((:url . "https://github.com/arnested/emacs-git-attr") (:commit . "3e43a0cf616b00a4bbd3c6b49fd2397f3103796f") (:revdesc . "3e43a0cf616b") (:keywords "vc") (:authors ("Arne Jørgensen" . "arne@arnested.dk")) (:maintainers ("Arne Jørgensen" . "arne@arnested.dk")) (:maintainer "Arne Jørgensen" . "arne@arnested.dk"))])
+ (git-auto-commit-mode . [(20200828 653) nil "Emacs Minor mode to automatically commit and push" tar ((:url . "https://github.com/ryuslash/git-auto-commit-mode") (:commit . "df07899acdb3f9c114b72fdab77107c924b3172c") (:revdesc . "df07899acdb3") (:keywords "vc") (:authors ("Tom Willemse" . "tom@ryuslash.org")) (:maintainers ("Tom Willemse" . "tom@ryuslash.org")) (:maintainer "Tom Willemse" . "tom@ryuslash.org"))])
+ (git-backup . [(20191209 2144) ((emacs (24 3)) (s (1 8 0))) "Backup each file change using git" tar ((:url . "https://github.com/antham/git-backup") (:commit . "e28d7af2d1c58fa5b8068223eb83a73f044e6a6c") (:revdesc . "e28d7af2d1c5") (:keywords "backup" "files" "tools" "git") (:authors ("Anthony HAMON" . "hamon.anth@gmail.com")) (:maintainers ("Anthony HAMON" . "hamon.anth@gmail.com")) (:maintainer "Anthony HAMON" . "hamon.anth@gmail.com"))])
+ (git-backup-ivy . [(20231030 2155) ((ivy (0 12 0)) (git-backup (0 0 1)) (emacs (25 1))) "An ivy interface to git-backup" tar ((:url . "https://github.com/walseb/git-backup-ivy") (:commit . "8c825ac2fef586e2792e980003e5ae0deb908bbc") (:revdesc . "8c825ac2fef5") (:keywords "backup" "convenience" "files" "tools" "vc") (:authors ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainers ("Sebastian Wålinder" . "s.walinder@gmail.com")) (:maintainer "Sebastian Wålinder" . "s.walinder@gmail.com"))])
+ (git-blamed . [(20161028 1926) nil "Minor mode for incremental blame for Git" tar ((:url . "https://github.com/tsgates/git-emacs") (:commit . "cef196abf398e2dd11f775d1e6cd8690567408aa") (:revdesc . "cef196abf398") (:keywords "git" "version control" "release management") (:authors ("David Kågedal" . "davidk@lysator.liu.se")) (:maintainers ("David Kågedal" . "davidk@lysator.liu.se")) (:maintainer "David Kågedal" . "davidk@lysator.liu.se"))])
+ (git-bug . [(20251001 25) ((emacs (29 1))) "Conveniences for local-first issues with git-bug" tar ((:url . "http://www.github.com/WillForan/emacs-git-bug") (:commit . "b29eba066f61e3ee3a0c751f4d9958e3be19d56d") (:revdesc . "b29eba066f61") (:keywords "tools" "vc" "processes") (:authors ("Will Foran" . "willforan+emacs@gmail.com")) (:maintainers ("Will Foran" . "willforan+emacs@gmail.com")) (:maintainer "Will Foran" . "willforan+emacs@gmail.com"))])
+ (git-cliff . [(20250216 2216) ((emacs (29 1)) (transient (0 6 0)) (llama (0 6 0))) "Generate and update changelog using git-cliff" tar ((:url . "https://github.com/eki3z/git-cliff.el") (:commit . "e33246132ecf5bc5b7ef4156921deb6558f95289") (:revdesc . "e33246132ecf") (:keywords "tools") (:authors ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainers ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainer "Eki Zhang" . "liuyinz95@gmail.com"))])
+ (git-command . [(20191028 333) ((term-run (0 1 4)) (with-editor (2 3 1))) "A Git Command-Line interface" tar ((:url . "https://github.com/10sr/git-command-el") (:commit . "a773d40da39dfb1c6ecf2b0758aa370ddea8f06d") (:revdesc . "a773d40da39d") (:keywords "utility" "git") (:authors ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainers ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainer "10sr" . "8slashes+el[at]gmail[dot]com"))])
+ (git-commit-insert-issue . [(20230512 1416) ((emacs (25)) (projectile (0)) (s (0)) (ghub (0)) (bitbucket (0))) "Get issues list when typing \"Fixes #\"" tar ((:url . "https://gitlab.com/emacs-stuff/git-commit-insert-issue/") (:commit . "df7ce0549d1db7bab27d401a351ea0d187c4a673") (:revdesc . "df7ce0549d1d") (:keywords "tools" "vc" "github" "gitlab" "bitbucket" "commit" "issues"))])
+ (git-commit-ts-mode . [(20241003 612) ((emacs (29 1))) "Tree-sitter support for Git commit messages" tar ((:url . "https://github.com/danilshvalov/git-commit-ts-mode") (:commit . "6eb42a3c08c5c6a1a610d433b93590b88a71f63e") (:revdesc . "6eb42a3c08c5") (:keywords "tree-sitter" "git" "faces") (:authors ("Daniil Shvalov" . "daniil.shvalov@gmail.com")) (:maintainers ("Daniil Shvalov" . "daniil.shvalov@gmail.com")) (:maintainer "Daniil Shvalov" . "daniil.shvalov@gmail.com"))])
+ (git-dwim . [(20170126 1214) nil "Context-aware git commands such as branch handling" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/git-dwim.el") (:commit . "485c732130686c2f28a026e385366006435394b9") (:revdesc . "485c73213068") (:keywords "git" "tools" "convenience") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (git-grep . [(20200920 1751) ((projectile (0 10 0))) "Search tools using git grep" tar ((:url . "https://github.com/tychoish/git-grep.el") (:commit . "12ff6045e9b6aa42f98abd4ddc44d670268a0849") (:revdesc . "12ff6045e9b6") (:keywords "matching" "files" "grep" "search" "using" "git-grep") (:maintainers ("tychoish" . "garen@tychoish.com")) (:maintainer "tychoish" . "garen@tychoish.com"))])
+ (git-grep-transient . [(20240521 648) ((emacs (27 1)) (magit (3 3 0)) (transient (0 6 0)) (symbol-overlay (4 2))) "Search for text using git grep command" tar ((:url . "https://github.com/adelplanque/git-grep-transient") (:commit . "c9eb6d76e6b0600d2f90d009fdc28a171f69dd80") (:revdesc . "c9eb6d76e6b0") (:keywords "git" "tools" "vc") (:authors ("Alain Delplanque" . "alaindelplanque@mailoo.org")) (:maintainers ("Alain Delplanque" . "alaindelplanque@mailoo.org")) (:maintainer "Alain Delplanque" . "alaindelplanque@mailoo.org"))])
+ (git-gutter . [(20241212 1415) ((emacs (25 1))) "Port of Sublime Text plugin GitGutter" tar ((:url . "https://github.com/emacsorphanage/git-gutter") (:commit . "3bdead17db7b84270c00e5a6b5ad02fa87ddd52e") (:revdesc . "3bdead17db7b") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Neil Okamoto" . "neil.okamoto+melpa@gmail.com") ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Neil Okamoto" . "neil.okamoto+melpa@gmail.com"))])
+ (git-gutter-fringe . [(20211003 2228) ((git-gutter (0 88)) (fringe-helper (0 1 1)) (cl-lib (0 5)) (emacs (24))) "Fringe version of git-gutter.el" tar ((:url . "https://github.com/emacsorphanage/git-gutter-fringe") (:commit . "648cb5b57faec55711803cdc9434e55a733c3eba") (:revdesc . "648cb5b57fae") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Neil Okamoto" . "neil.okamoto+melpa@gmail.com")) (:maintainer "Neil Okamoto" . "neil.okamoto+melpa@gmail.com"))])
+ (git-identity . [(20220721 912) ((emacs (25 1)) (dash (2 10)) (hydra (0 14)) (f (0 20))) "Identity management for (ma)git" tar ((:url . "https://github.com/akirak/git-identity.el") (:commit . "f920916a92fad0c551cd0739e48fc09d8709bd8d") (:revdesc . "f920916a92fa") (:keywords "git" "vc" "convenience") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (git-io . [(20230322 1038) ((emacs (24 4))) "Integration for git.io URL shortening in buffer" tar ((:url . "https://github.com/tejasbubane/emacs-git-io") (:commit . "fb25f9432e6454edd621a7512ee7abc6220151a5") (:revdesc . "fb25f9432e64") (:keywords "convenience" "files") (:authors ("Tejas Bubane" . "tejasbubane@gmail.com")) (:maintainers ("Tejas Bubane" . "tejasbubane@gmail.com")) (:maintainer "Tejas Bubane" . "tejasbubane@gmail.com"))])
+ (git-lens . [(20220922 710) ((emacs (24 4))) "Show new, deleted or modified files in branch" tar ((:url . "https://github.com/pidu/git-lens") (:commit . "347832fbdb75a0930aa3eef628ec0069a335f3b7") (:revdesc . "347832fbdb75") (:keywords "vc" "convenience") (:authors ("Peter Stiernström" . "peter@stiernstrom.se")) (:maintainers ("Peter Stiernström" . "peter@stiernstrom.se")) (:maintainer "Peter Stiernström" . "peter@stiernstrom.se"))])
+ (git-link . [(20260723 2213) ((emacs (24 3))) "Get the GitHub/Bitbucket/GitLab URL for a buffer location" tar ((:url . "https://github.com/sshaw/git-link") (:commit . "ca01d013bd575710e2cd47001ee1ef6ee41667cf") (:revdesc . "ca01d013bd57") (:keywords "git" "vc" "github" "bitbucket" "gitlab" "sourcehut" "aws" "azure" "convenience") (:authors ("Skye Shaw" . "skye.shaw@gmail.com")) (:maintainers ("Skye Shaw" . "skye.shaw@gmail.com")) (:maintainer "Skye Shaw" . "skye.shaw@gmail.com"))])
+ (git-messenger . [(20201202 1637) ((emacs (24 3)) (popup (0 5 3))) "Popup last commit of current line" tar ((:url . "https://github.com/emacsorphanage/git-messenger") (:commit . "fb9a049ac3b5fba7369ef1f027b97881f1e377ec") (:revdesc . "fb9a049ac3b5") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")))])
+ (git-modes . [(20260601 1550) ((emacs (28 1)) (compat (31 0))) "Major modes for editing Git configuration files" tar ((:url . "https://github.com/magit/git-modes") (:commit . "f291a4cc4a8b02a25d5cf93b4ab6af29e6f060d9") (:revdesc . "f291a4cc4a8b") (:keywords "convenience" "vc" "git") (:authors ("Sebastian Wiesner" . "lunaryorn@gmail.com") ("Rüdiger Sonderfeld" . "ruediger@c-plusplus.net") ("Jonas Bernoulli" . "emacs.git-modes@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.git-modes@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.git-modes@jonas.bernoulli.dev"))])
+ (git-msg-prefix . [(20191031 1304) ((emacs (24)) (s (1 10 0)) (dash (2 9 0))) "Insert commit message prefix (issue number)" tar ((:url . "https://github.com/kidd/git-msg-prefix.el") (:commit . "43f6b31c1090371260a2f15b2117a7666920bee7") (:revdesc . "43f6b31c1090") (:keywords "vc" "tools") (:authors ("Raimon Grau" . "raimonster@gmail.com")) (:maintainers ("Raimon Grau" . "raimonster@gmail.com")) (:maintainer "Raimon Grau" . "raimonster@gmail.com"))])
+ (git-overleaf . [(20260819 857) ((emacs (29 4)) (websocket (1 15)) (webdriver (0 1)) (magit-section (4 5)) (transient (0 7 2))) "Clone, push, and pull full Overleaf projects with Git" tar ((:url . "https://github.com/Jamie-Cui/git-overleaf") (:commit . "df667e84262041a574f94e8917df3ee439efa8c5") (:revdesc . "df667e842620") (:keywords "hypermedia" "tex" "tools") (:authors ("Jamie Cui" . "jamie.cui@outlook.com")) (:maintainers ("Jamie Cui" . "jamie.cui@outlook.com")) (:maintainer "Jamie Cui" . "jamie.cui@outlook.com"))])
+ (git-ps1-mode . [(20200113 704) nil "Global minor-mode to print __git_ps1 in mode-line" tar ((:url . "https://github.com/10sr/git-ps1-mode-el") (:commit . "6762a309bd593d26258dfbf43e7bc21254a70fbf") (:revdesc . "6762a309bd59") (:keywords "utility" "mode-line" "git") (:authors ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainers ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainer "10sr" . "8slashes+el[at]gmail[dot]com"))])
+ (git-sync-mode . [(20260101 2353) ((emacs (29 1)) (async-await (0))) "Automatically commit and sync local changes" tar ((:url . "https://github.com/justinbarclay/git-sync-mode") (:commit . "9e602ebb0fa3c02a7987bb94ccfa0142fe00d1a9") (:revdesc . "9e602ebb0fa3") (:keywords "vc" "convenience") (:authors ("Justin Barclay" . "github@justincbarclay.ca")) (:maintainers ("Justin Barclay" . "github@justincbarclay.ca")) (:maintainer "Justin Barclay" . "github@justincbarclay.ca"))])
+ (git-time-metric . [(20181116 2011) nil "Provide function to record time with gtm ( git time metric )" tar ((:url . "https://github.com/c301/gtm-emacs-plugin") (:commit . "287108ed1d6885dc795eb3bad4476aa08c626186") (:revdesc . "287108ed1d68") (:keywords "tools" "gtm" "productivity" "time") (:authors ("Anton Sivolapov" . "anton.sivolapov@gmail.com")) (:maintainers ("Anton Sivolapov" . "anton.sivolapov@gmail.com")) (:maintainer "Anton Sivolapov" . "anton.sivolapov@gmail.com"))])
+ (git-timemachine . [(20250128 940) ((emacs (24 3)) (transient (0 1 0))) "Walk through git revisions of a file" tar ((:url . "https://codeberg.org/pidu/git-timemachine") (:commit . "d1346a76122595aeeb7ebb292765841c6cfd417b") (:revdesc . "d1346a761225") (:keywords "vc") (:authors ("Peter Stiernström" . "peter@stiernstrom.se")) (:maintainers ("Peter Stiernström" . "peter@stiernstrom.se")) (:maintainer "Peter Stiernström" . "peter@stiernstrom.se"))])
+ (git-walktree . [(20191101 302) ((emacs (26 1)) (git (0 1 1)) (cl-lib (0 5))) "Browse Git tree and blob objects" tar ((:url . "https://github.com/10sr/git-walktree-el") (:commit . "a1a5490b89d193724ec637818baf2d8edf97c638") (:revdesc . "a1a5490b89d1") (:keywords "vc" "utility" "git") (:authors ("10sr" . "8.slashes[at]gmail[dot]com")) (:maintainers ("10sr" . "8.slashes[at]gmail[dot]com")) (:maintainer "10sr" . "8.slashes[at]gmail[dot]com"))])
+ (git-wip-timemachine . [(20150408 1006) ((s (1 9 0))) "Walk through git-wip revisions of a file" tar ((:url . "https://github.com/itsjeyd/git-wip-timemachine") (:commit . "1ce257e6c25117b01f1b899aca21e07eae084d40") (:revdesc . "1ce257e6c251") (:keywords "git") (:authors ("Tim Krones" . "t.krones@gmx.net")) (:maintainers ("Tim Krones" . "t.krones@gmx.net")) (:maintainer "Tim Krones" . "t.krones@gmx.net"))])
+ (gitconfig . [(20130718 935) nil "Emacs lisp interface to work with git-config variables" tar ((:url . "https://github.com/tonini/gitconfig.el") (:commit . "6c313a39e20702ddcebc12d146f69db1ce668901") (:revdesc . "6c313a39e207") (:keywords "git" "gitconfig" "git-config"))])
+ (github-browse-file . [(20160205 1427) ((cl-lib (0 5))) "View the file you're editing on GitHub" tar ((:url . "https://github.com/osener/github-browse-file") (:commit . "177667b8dac640f3dabacc4395e09451c5e88c53") (:revdesc . "177667b8dac6") (:keywords "convenience" "vc" "git" "github") (:authors ("Ozan Sener" . "ozan@ozansener.com")) (:maintainers ("Ozan Sener" . "ozan@ozansener.com")) (:maintainer "Ozan Sener" . "ozan@ozansener.com"))])
+ (github-clone . [(20210108 1920) ((gh (1 0 1)) (magit (3 0 0)) (emacs (25 1))) "Fork and clone github repos" tar ((:url . "https://github.com/dgtized/github-clone.el") (:commit . "7b2ce0109f5aac0b65f3e6a5ba761e18bd86f093") (:revdesc . "7b2ce0109f5a") (:keywords "vc" "tools") (:authors ("Charles L.G. Comstock" . "dgtized@gmail.com")) (:maintainers ("Charles L.G. Comstock" . "dgtized@gmail.com")) (:maintainer "Charles L.G. Comstock" . "dgtized@gmail.com"))])
+ (github-dark-vscode-theme . [(20260706 2133) ((emacs (25 1))) "The GitHub Dark Theme from Visual Studio Code" tar ((:url . "https://github.com/justintime50/github-dark-vscode-emacs-theme") (:commit . "b3590004a25a279a913168801142d18d2decfde0") (:revdesc . "b3590004a25a") (:keywords "faces"))])
+ (github-elpa . [(20231201 804) ((package-build (1 0)) (commander (0 7 0)) (git (0 1 1))) "Build and publish ELPA repositories with GitHub Pages" tar ((:url . "https://github.com/10sr/github-elpa") (:commit . "c818883d9dc8d34eaee03691574e0408f18db28a") (:revdesc . "c818883d9dc8") (:authors ("10sr" . "8slashes+el@gmail.com")) (:maintainers ("10sr" . "8slashes+el@gmail.com")) (:maintainer "10sr" . "8slashes+el@gmail.com"))])
+ (github-explorer . [(20220305 1450) ((emacs (25)) (graphql (0))) "Explore a GitHub repository on the fly" tar ((:url . "https://github.com/TxGVNN/github-explorer") (:commit . "49e5c350169b556deaabdcb67e9440bd4d5b4f8b") (:revdesc . "49e5c350169b") (:keywords "comm") (:authors ("Giap Tran" . "txgvnn@gmail.com")) (:maintainers ("Giap Tran" . "txgvnn@gmail.com")) (:maintainer "Giap Tran" . "txgvnn@gmail.com"))])
+ (github-linguist . [(20241014 601) ((emacs (28 1)) (project (0 8)) (async (1 9)) (map (3))) "Run GitHub Linguist on projects to collect information" tar ((:url . "https://github.com/akirak/github-linguist.el") (:commit . "442bc84dcdd3fe756f228b52fd027842f419e52b") (:revdesc . "442bc84dcdd3") (:keywords "processes") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (github-notifier . [(20180421 316) ((emacs (24))) "Displays your GitHub notifications unread count in mode-line" tar ((:url . "https://github.com/xuchunyang/github-notifier.el") (:commit . "274f3812926ea371346f639fcee98066f6e8c96f") (:revdesc . "274f3812926e") (:keywords "github" "mode-line") (:authors ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainers ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainer "Chunyang Xu" . "mail@xuchunyang.me"))])
+ (github-pullrequest . [(20170116 616) ((emacs (24 4)) (request (0 2 0)) (dash (2 11 0)) (magit (2 10 0))) "Create and fetch Github Pull requests with ease" tar ((:url . "https://github.com/jakoblind/github-pullrequest") (:commit . "471816e09d1e140a0975911fe020c6c659f71209") (:revdesc . "471816e09d1e") (:keywords "tools") (:authors ("Jakob Lind" . "karl.jakob.lind@gmail.com")) (:maintainers ("Jakob Lind" . "karl.jakob.lind@gmail.com")) (:maintainer "Jakob Lind" . "karl.jakob.lind@gmail.com"))])
+ (github-review . [(20211029 243) ((emacs (25 1)) (s (1 12 0)) (ghub (2 0)) (dash (2 11 0)) (deferred (0 5 1)) (a (0 1 1))) "GitHub based code review" tar ((:url . "https://github.com/charignon/github-review") (:commit . "725fbc7b385228f53a7ddc46a92c1276bab4aea8") (:revdesc . "725fbc7b3852") (:keywords "git" "tools" "vc" "github") (:authors ("Laurent Charignon" . "l.charignon@gmail.com")) (:maintainers ("Laurent Charignon" . "l.charignon@gmail.com")) (:maintainer "Laurent Charignon" . "l.charignon@gmail.com"))])
+ (github-search . [(20190624 436) ((magit (0 8 1)) (gh (1 0 0))) "Clone repositories by searching github" tar ((:url . "https://github.com/IvanMalison/github-search") (:commit . "b73efaf19491010522b09db35bb0f1bad1620e63") (:revdesc . "b73efaf19491") (:keywords "github" "search" "clone" "api" "gh" "magit" "vc" "tools") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (github-stars . [(20190517 1319) ((emacs (25 1)) (ghub (2 0 0))) "Browse your Github Stars" tar ((:url . "https://github.com/xuchunyang/github-stars.el") (:commit . "bb79c80574cfff865342b6e262f2c9762edb4c15") (:revdesc . "bb79c80574cf") (:keywords "tools") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (github-topics . [(20260810 2321) ((emacs (29 4)) (ts (0 3))) "Lookup PRs matching a query" tar ((:url . "https://github.com/agzam/github-topics") (:commit . "6086960d85bc538b6ea8cb91d1d69f9fedad4817") (:revdesc . "6086960d85bc") (:keywords "vc" "matching" "tools") (:authors ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainers ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainer "Ag Ibragimov" . "agzam.ibragimov@gmail.com"))])
+ (gitignore-snippets . [(20201118 1551) ((emacs (26)) (yasnippet (0 8 0))) "Gitignore.io templates for Yasnippet" tar ((:url . "https://github.com/sei40kr/gitignore-snippets") (:commit . "f91b3397526fe09d2e4a1f507a73b06bc7542cf7") (:revdesc . "f91b3397526f") (:keywords "tools") (:authors ("Seong Yong-ju" . "sei40kr@gmail.com")) (:maintainers ("Seong Yong-ju" . "sei40kr@gmail.com")) (:maintainer "Seong Yong-ju" . "sei40kr@gmail.com"))])
+ (gitignore-templates . [(20210814 144) ((emacs (24 3))) "Create .gitignore using GitHub or gitignore.io API" tar ((:url . "https://github.com/xuchunyang/gitignore-templates.el") (:commit . "d28cd1cec00242b688861648d36d086818b06099") (:revdesc . "d28cd1cec002") (:keywords "tools"))])
+ (gitlab . [(20180312 1647) ((s (1 9 0)) (dash (2 9 0)) (pkg-info (0 5 0)) (request (0 1 0))) "Emacs client for Gitlab" tar ((:url . "https://github.com/nlamirault/emacs-gitlab") (:commit . "68318aca3206d50701039c9aae39734ca29a49f9") (:revdesc . "68318aca3206") (:keywords "gitlab") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (gitlab-ci-mode . [(20191022 2017) ((emacs (25 1)) (yaml-mode (0 0 12))) "Mode for editing GitLab CI files" tar ((:url . "https://gitlab.com/joewreschnig/gitlab-ci-mode/") (:commit . "c861dc5fa17d380d5c3aca99dc3bbec5eee623bc") (:revdesc . "c861dc5fa17d") (:keywords "tools" "vc"))])
+ (gitlab-ci-mode-flycheck . [(20190323 1829) ((emacs (25)) (flycheck (31)) (gitlab-ci-mode (1))) "Flycheck support for ‘gitlab-ci-mode’" tar ((:url . "https://gitlab.com/joewreschnig/gitlab-ci-mode-flycheck/") (:commit . "eba81cfb7224fd1fa4e4da90d11729cc7ea12f72") (:revdesc . "eba81cfb7224") (:keywords "tools" "vc" "convenience"))])
+ (gitlab-pipeline . [(20251213 1504) ((emacs (25 1)) (ghub (3 3 0))) "Get infomation about Gitlab pipelines" tar ((:url . "https://github.com/TxGVNN/gitlab-pipeline") (:commit . "0e35528cffa04e6d3621066c7406b2c1260a56ce") (:revdesc . "0e35528cffa0") (:keywords "comm" "tools" "git") (:authors ("Giap Tran" . "txgvnn@gmail.com")) (:maintainers ("Giap Tran" . "txgvnn@gmail.com")) (:maintainer "Giap Tran" . "txgvnn@gmail.com"))])
+ (gitlab-snip-helm . [(20200427 2014) ((emacs (25)) (dash (2 12 0)) (helm (3 2))) "Gitlab snippets api helm package" tar ((:url . "https://gitlab.com/sasanidas/gitlab-snip-helm") (:commit . "5fe0a66642da6f4e7ba9e1e3a96572c7f1876e37") (:revdesc . "5fe0a66642da") (:keywords "tools" "files" "convenience") (:authors ("Fermin MF" . "fmfs@posteo.net")) (:maintainers ("Fermin MF" . "fmfs@posteo.net")) (:maintainer "Fermin MF" . "fmfs@posteo.net"))])
+ (gitolite-clone . [(20160609 2355) ((dash (2 10 0)) (s (1 9 0)) (pcache (0 3 1)) (emacs (24))) "Clone gitolite repositories from a completing list" tar ((:url . "https://github.com/IvanMalison/gitolite-clone") (:commit . "d8a4c2875c984e51137c980b5773f42703602721") (:revdesc . "d8a4c2875c98") (:keywords "gitolite" "clone" "git") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (gitpatch . [(20170722 410) ((emacs (24 3))) "Git-format patch toolkit" tar ((:url . "https://github.com/tumashu/gitpatch") (:commit . "577d5adf65c8133caa325c10e89e1e2fc323c907") (:revdesc . "577d5adf65c8") (:keywords "convenience") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (gitstatus . [(20221113 1951) ((emacs (25 1))) "Common front-end for `gitstatusd'" tar ((:url . "https://github.com/igorepst/gitstatus-el") (:commit . "c3e30341d0add9728010e566b9eb031c76414b47") (:revdesc . "c3e30341d0ad") (:keywords "tools" "processes") (:authors ("Igor Epstein" . "igorepst@gmail.com")) (:maintainers ("Igor Epstein" . "igorepst@gmail.com")) (:maintainer "Igor Epstein" . "igorepst@gmail.com"))])
+ (gitter . [(20220316 138) ((emacs (24 4)) (let-alist (1 0 4))) "An Emacs Gitter client" tar ((:url . "https://github.com/xuchunyang/gitter.el") (:commit . "49327c91eb50cfea633af8fd32b0643691d75cb7") (:revdesc . "49327c91eb50") (:keywords "gitter" "chat" "client" "internet") (:authors ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainers ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainer "Chunyang Xu" . "mail@xuchunyang.me"))])
+ (gkroam . [(20251114 648) ((emacs (26 3)) (db (0 0 6)) (company (0 9 10))) "A lightweight org-mode Roam Research replica" tar ((:url . "https://github.com/Kinneyzhang/gkroam") (:commit . "b2b580731ce5c92d6682cfbd17361129a5cea4ca") (:revdesc . "b2b580731ce5") (:keywords "org" "convenience") (:authors ("Kinney Zhang" . "kinneyzhang666@gmail.com")) (:maintainers ("Kinney Zhang" . "kinneyzhang666@gmail.com")) (:maintainer "Kinney Zhang" . "kinneyzhang666@gmail.com"))])
+ (gl-conf-mode . [(20170714 1310) ((emacs (24 3))) "Mode for editing gitolite config files" tar ((:url . "https://github.com/llloret/gitolite-emacs") (:commit . "9136a9b737e0a5b6471a91571d104c487c43f35b") (:revdesc . "9136a9b737e0") (:keywords "git" "gitolite" "languages"))])
+ (glab . [(20250620 1333) ((ghub (4))) "Client library for the Gitlab API" tar ((:url . "https://github.com/emacsattic/glab") (:commit . "655c0cd042b8e4abe6d314846f4c55b146f9fdee") (:revdesc . "655c0cd042b8") (:keywords "tools") (:authors ("Jonas Bernoulli" . "emacs.ghub@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.ghub@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.ghub@jonas.bernoulli.dev"))])
+ (glass-tty-theme . [(20240909 1259) ((emacs (24 1))) "Reverse video-like theme for the Glass TTY VT220 font" tar ((:url . "https://github.com/irtnog/glass-tty-theme") (:commit . "59126e888d9a237c6a0461e3712665d543f1320d") (:revdesc . "59126e888d9a") (:authors ("Matthew X. Economou" . "xenophon+glass-tty-theme@irtnog.org")) (:maintainers ("Matthew X. Economou" . "xenophon+glass-tty-theme@irtnog.org")) (:maintainer "Matthew X. Economou" . "xenophon+glass-tty-theme@irtnog.org"))])
+ (gleam-ts-mode . [(20260604 1354) ((emacs (29 1))) "Major mode for Gleam" tar ((:url . "https://github.com/gleam-lang/gleam-mode") (:commit . "ae8aecda23e9dca755d80e86cdb7c336011c2321") (:revdesc . "ae8aecda23e9") (:keywords "languages" "gleam") (:authors ("Jonathan Arnett" . "jonathan.arnett@protonmail.com")) (:maintainers ("Jonathan Arnett" . "jonathan.arnett@protonmail.com")) (:maintainer "Jonathan Arnett" . "jonathan.arnett@protonmail.com"))])
+ (global-tags . [(20211120 347) ((emacs (26 1)) (async (1 9 4)) (project (0 5 2)) (ht (2 3))) "Elisp API and editor integration for GNU global" tar ((:url . "https://launchpad.net/global-tags.el") (:commit . "aaa37da4c538f35a90149ef4ad3d8b0922af54ab") (:revdesc . "aaa37da4c538") (:keywords "convenience" "matching" "tools") (:authors ("Felipe Lema" . "felipelema@mortemale.org")) (:maintainers ("Felipe Lema" . "felipelema@mortemale.org")) (:maintainer "Felipe Lema" . "felipelema@mortemale.org"))])
+ (glsl-mode . [(20260603 1348) ((emacs (26 1))) "Major mode for Open GLSL shader files" tar ((:url . "https://github.com/jimhourihan/glsl-mode") (:commit . "515a2ba4dab3ec89c83a962902a123ddf81e3cfe") (:revdesc . "515a2ba4dab3") (:keywords "languages" "opengl" "gpu" "spir-v" "vulkan") (:authors ("Gustaf Waldemarson" . "gustaf.waldemarson~at~gmail.com") ("Jim Hourihan" . "jimhourihan~at~gmail.com") (nil . "Xavier.Decoret@imag.fr")) (:maintainers ("Gustaf Waldemarson" . "gustaf.waldemarson~at~gmail.com") ("Jim Hourihan" . "jimhourihan~at~gmail.com") (nil . "Xavier.Decoret@imag.fr")) (:maintainer "Gustaf Waldemarson" . "gustaf.waldemarson~at~gmail.com"))])
+ (glue . [(20230112 2159) ((emacs (24 1))) "Emacs - Common Lisp interop using SLIME or SLY" tar ((:url . "https://git.sr.ht/~hajovonta/glue/") (:commit . "dcdf8a69db87acea4fa61d4b4b9b1265c7e025db") (:revdesc . "dcdf8a69db87") (:keywords "lisp" "emacs" "common" "lisp" "cl") (:authors ("Gabor Poczkodi" . "hajovonta@gmail.com")) (:maintainers ("Gabor Poczkodi" . "hajovonta@gmail.com")) (:maintainer "Gabor Poczkodi" . "hajovonta@gmail.com"))])
+ (gmail-message-mode . [(20160627 1847) ((ham-mode (1 0))) "A major-mode for editing gmail messages using markdown syntax" tar ((:url . "https://github.com/Bruce-Connor/gmail-message-mode") (:commit . "ec36672a9dc93c09ebe2f77597b498d11883d008") (:revdesc . "ec36672a9dc9") (:keywords "mail" "convenience" "emulation") (:authors ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainers ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainer "Artur Malabarba" . "bruce.connor.am@gmail.com"))])
+ (gmail2bbdb . [(20170423 1144) nil "Import email and name into bbdb from vcard" tar ((:url . "https://github.com/redguardtoo/gmail2bbdb") (:commit . "a84fa385cfaec7fc5f1518c368e52722da139f99") (:revdesc . "a84fa385cfae") (:keywords "vcard" "bbdb" "email" "contact" "gmail") (:authors ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainers ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainer "Chen Bin" . "chenbin.sh@gmail.com"))])
+ (gmpl-mode . [(20220121 631) ((emacs (24))) "Major mode for editing GMPL(MathProg) files" tar ((:url . "https://github.com/cute-jumper/gmpl-mode") (:commit . "97b103eea8b18f7e27b0f0be6cb4809a4156c032") (:revdesc . "97b103eea8b1") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (gmsh-mode . [(20240223 558) ((emacs (26 1))) "Highlight GMSH mesh generator script syntax" tar ((:url . "https://gitlab.com/matsievskiysv/gmsh-mode") (:commit . "324d09e6ef51ff9473cbfaf560979ed313df416b") (:revdesc . "324d09e6ef51") (:keywords "languages"))])
+ (gn-mode . [(20190428 1812) ((emacs (24)) (cl-lib (0 5))) "Major mode for editing GN (generate ninja) files" tar ((:url . "https://github.com/lashtear/gn-mode") (:commit . "fcf8e1e500d953364e97e7ebc5708a2c00fa3cd2") (:revdesc . "fcf8e1e500d9") (:keywords "data") (:authors ("Emily Backes" . "lucca@accela.net")) (:maintainers ("Emily Backes" . "lucca@accela.net")) (:maintainer "Emily Backes" . "lucca@accela.net"))])
+ (gnome-calendar . [(20161110 1256) nil "Integration with the GNOME Shell calendar" tar ((:url . "https://github.com/NicolasPetton/gnome-calendar.el") (:commit . "668591bec95c23934c5e1ef100cec4824e7cb25d") (:revdesc . "668591bec95c") (:keywords "gnome" "calendar") (:authors ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainers ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainer "Nicolas Petton" . "nicolas@petton.fr"))])
+ (gnome-screencast . [(20210125 2001) ((emacs (25))) "Use Gnome screen recording functionality using elisp" tar ((:url . "https://github.com/juergenhoetzel/emacs-gnome-screencast") (:commit . "1f4ef60fe9d452320dc02f89e289bac04ef2ad1c") (:revdesc . "1f4ef60fe9d4") (:keywords "tools" "multimedia") (:authors ("Jürgen Hötzel" . "juergen@hoetzel.info")) (:maintainers ("Jürgen Hötzel" . "juergen@hoetzel.info")) (:maintainer "Jürgen Hötzel" . "juergen@hoetzel.info"))])
+ (gnomenm . [(20150316 1918) ((s (1 9 0)) (dash (2 3 0)) (kv (0 0 19))) "Emacs interface to Gnome nmcli command" tar ((:url . "https://github.com/nicferrier/emacs-nm") (:commit . "9065cda44ffc9e06239b8189a0154d31314c3b4d") (:revdesc . "9065cda44ffc") (:keywords "processes" "hardware") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (gnosis . [(20260507 2347) ((emacs (29 1)) (compat (29 1 4 2)) (keymap-popup (0 2 0))) "Knowledge System" tar ((:url . "https://codeberg.org/thanosapollo/emacs-gnosis") (:commit . "07de9c67536fe3e8c5fef1daf61527f3bcfa46a7") (:revdesc . "07de9c67536f") (:keywords "extensions") (:authors ("Thanos Apollo" . "public@thanosapollo.org")) (:maintainers ("Thanos Apollo" . "public@thanosapollo.org")) (:maintainer "Thanos Apollo" . "public@thanosapollo.org"))])
+ (gntp . [(20141025 250) nil "Growl Notification Protocol for Emacs" tar ((:url . "https://github.com/tekai/gntp.el") (:commit . "767571135e2c0985944017dc59b0be79af222ef5") (:revdesc . "767571135e2c") (:authors ("Engelke Eschner" . "tekai@gmx.li")) (:maintainers ("Engelke Eschner" . "tekai@gmx.li")) (:maintainer "Engelke Eschner" . "tekai@gmx.li"))])
+ (gnu-apl-mode . [(20220404 341) ((emacs (27))) "Integrate GNU APL with Emacs" tar ((:url . "http://www.gnu.org/software/apl/") (:commit . "c8695b0d55b5167263a843252ffd21a589018427") (:revdesc . "c8695b0d55b5") (:keywords "languages") (:authors ("Elias Mårtenson" . "lokedhs@gmail.com")) (:maintainers ("Elias Mårtenson" . "lokedhs@gmail.com")) (:maintainer "Elias Mårtenson" . "lokedhs@gmail.com"))])
+ (gnu-indent . [(20221127 2112) ((emacs (25 1))) "Indent your code with GNU Indent" tar ((:url . "https://codeberg.org/akib/emacs-gnu-indent") (:commit . "f31dbe60478b6270bb57b6b05998df8eec56f801") (:revdesc . "f31dbe60478b") (:keywords "tools" "c") (:authors ("Akib Azmain Turja" . "akib@disroot.org")) (:maintainers ("Akib Azmain Turja" . "akib@disroot.org")) (:maintainer "Akib Azmain Turja" . "akib@disroot.org"))])
+ (gnuplot . [(20260623 1111) ((emacs (29 1)) (compat (31))) "Major-mode and interactive frontend for gnuplot" tar ((:url . "https://github.com/emacs-gnuplot/gnuplot") (:commit . "81e3cb30297f0d12df41b865d2a76c8ba179089c") (:revdesc . "81e3cb30297f") (:keywords "data" "gnuplot" "plotting") (:maintainers ("Maxime Tréca" . "maxime@gmail.com") ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Maxime Tréca" . "maxime@gmail.com"))])
+ (gnuplot-mode . [(20171013 1616) nil "Major mode for editing gnuplot scripts" tar ((:url . "https://github.com/mkmcc/gnuplot-mode") (:commit . "601f6392986f0cba332c87678d31ae0d0a496ce7") (:revdesc . "601f6392986f") (:keywords "gnuplot" "plotting") (:authors ("Mike McCourt" . "mkmcc@astro.berkeley.edu")) (:maintainers ("Mike McCourt" . "mkmcc@astro.berkeley.edu")) (:maintainer "Mike McCourt" . "mkmcc@astro.berkeley.edu"))])
+ (gnus-alias . [(20260224 27) nil "An alternative to gnus-posting-styles" tar ((:url . "https://github.com/hexmode/gnus-alias") (:commit . "cd7e3f92a12fe7948e2658d26bd0c53ca4a483bd") (:revdesc . "cd7e3f92a12f") (:keywords "personality" "identity" "news" "mail" "gnus") (:authors ("Joe Casadonte" . "emacs@northbound-train.com")) (:maintainers ("Mark A. Hershberger" . "mah@everybody.org")) (:maintainer "Mark A. Hershberger" . "mah@everybody.org"))])
+ (gnus-browse-url-in-article . [(20260806 2358) ((emacs (27 1))) "Smarter browse-url for Gnus articles" tar ((:url . "https://github.com/jmibanez/gnus-browse-url-in-article") (:commit . "1fac4601d1222bca0e244f61fd0e6fba75cdbb0c") (:revdesc . "1fac4601d122") (:keywords "convenience" "mail" "gnus") (:authors ("JM Ibañez" . "jm@jmibanez.com")) (:maintainers ("JM Ibañez" . "jm@jmibanez.com")) (:maintainer "JM Ibañez" . "jm@jmibanez.com"))])
+ (gnus-desktop-notify . [(20250616 816) ((gnus (1 0))) "Gnus Desktop Notification global minor mode" tar ((:url . "http://www.thregr.org/~wavexx/software/gnus-desktop-notify.el/") (:commit . "344777f35a65f0cf76bf29ea97c6f4b6880aed4a") (:revdesc . "344777f35a65") (:authors ("Yuri D'Elia" . "wavexxATthregr.org")) (:maintainers ("Yuri D'Elia" . "wavexxATthregr.org")) (:maintainer "Yuri D'Elia" . "wavexxATthregr.org"))])
+ (gnus-notes . [(20221206 616) ((emacs (27 1)) (bbdb (3 1)) (helm (3 1)) (hydra (0 13 0)) (org (8 3)) (s (0 0)) (lv (0 0)) (async (1 9 1))) "Keep handy notes of read Gnus articles with helm and org" tar ((:url . "https://github.com/deusmax/gnus-notes") (:commit . "9996b382c5c7b4f944a716baac69b556ef181462") (:revdesc . "9996b382c5c7") (:keywords "convenience" "mail" "bbdb" "gnus" "helm" "org" "hydra") (:authors ("Deus Max" . "deusmax@gmx.com")) (:maintainers ("Deus Max" . "deusmax@gmx.com")) (:maintainer "Deus Max" . "deusmax@gmx.com"))])
+ (gnus-recent . [(20241218 1308) ((emacs (25 3 2))) "Article breadcrumbs for Gnus" tar ((:url . "https://github.com/unhammer/gnus-recent") (:commit . "9cd9797c2aa54be4ca03b5ca0c50b64c4dc1d34e") (:revdesc . "9cd9797c2aa5") (:keywords "convenience" "mail") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (gnus-select-account . [(20170722 511) nil "Select an account before writing a mail in gnus" tar ((:url . "https://github.com/tumashu/gnus-select-account") (:commit . "ddc8c135eeaf90f5b6692a033af2badae36e68ce") (:revdesc . "ddc8c135eeaf") (:keywords "convenience") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (gnus-summary-ext . [(20180113 1316) nil "Extra limit and process mark commands for the gnus summary buffer" tar ((:url . "https://github.com/vapniks/gnus-summary-ext") (:commit . "025fd853fe9280ae696a89ec2c2cac9befd010aa") (:revdesc . "025fd853fe92") (:keywords "comm") (:authors ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainers ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainer "Joe Bloggs" . "vapniks@yahoo.com"))])
+ (gnus-summary-repo . [(20190617 1419) ((emacs (25))) "Import and export files between IMAP and local by using GNUS" tar ((:url . "https://github.com/TxGVNN/gnus-summary-repo") (:commit . "3968667bfded60fbbf33f2fba3170e2b6501ec43") (:revdesc . "3968667bfded") (:keywords "gnus" "repository") (:authors ("Giap Tran" . "txgvnn@gmail.com")) (:maintainers ("Giap Tran" . "txgvnn@gmail.com")) (:maintainer "Giap Tran" . "txgvnn@gmail.com"))])
+ (gnus-x-gm-raw . [(20140610 2156) ((log4e (0 2 0)) (yaxception (0 1))) "Search mail of Gmail using X-GM-RAW as web interface" tar ((:url . "https://github.com/aki2o/gnus-x-gm-raw") (:commit . "978bdfcecc8844465b71641c2e909fcdc66b22be") (:revdesc . "978bdfcecc88") (:keywords "gnus") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (go . [(20220414 1956) ((emacs (24))) "Play GO, translate and transfer between GO back ends" tar ((:url . "http://eschulte.github.io/el-go/") (:commit . "79690579496b0df85a1c94199aca968371b58b3c") (:revdesc . "79690579496b") (:keywords "game" "go" "sgf") (:authors ("Eric Schulte" . "schulte.eric@gmail.com")) (:maintainers ("Eric Schulte" . "schulte.eric@gmail.com")) (:maintainer "Eric Schulte" . "schulte.eric@gmail.com"))])
+ (go-add-tags . [(20211122 1812) ((emacs (24 3)) (s (1 11 0))) "Add field tags for struct fields" tar ((:url . "https://github.com/syohex/emacs-go-add-tags") (:commit . "93ecde9f82bc960493eaf6921d46a5adc3699ffc") (:revdesc . "93ecde9f82bc") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (go-autocomplete . [(20170626 1023) ((auto-complete (1 4 0))) "Auto-complete-mode backend for go-mode" tar ((:url . "https://github.com/emacsattic/go-autocomplete") (:commit . "5327738ec1be51061a3f31010c89bdd4924ca496") (:revdesc . "5327738ec1be") (:keywords "languages") (:authors ("Mikhail Kuryshev" . "tensai@cirno.in")) (:maintainers ("Mikhail Kuryshev" . "tensai@cirno.in")) (:maintainer "Mikhail Kuryshev" . "tensai@cirno.in"))])
+ (go-complete . [(20190409 516) ((go-mode (0)) (cl-lib (0 5))) "Native code completion for Go" tar ((:url . "https://github.com/vibhavp/go-complete") (:commit . "056294014f37a1004958ec17ebd6748deed63502") (:revdesc . "056294014f37") (:keywords "go" "golang" "completion") (:authors ("Vibhav Pant" . "vibhavp@gmail.com")) (:maintainers ("Vibhav Pant" . "vibhavp@gmail.com")) (:maintainer "Vibhav Pant" . "vibhavp@gmail.com"))])
+ (go-direx . [(20150316 143) ((direx (1 0 0)) (cl-lib (0 5))) "Tree style source code viewer for Go language" tar ((:url . "https://github.com/syohex/emacs-go-direx") (:commit . "aecb9fef4d56d04d230d37c75c260c8392b5ad9f") (:revdesc . "aecb9fef4d56") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (go-dlv . [(20220126 1436) ((go-mode (1 3 1))) "Go Delve - Debug Go programs interactively with the GUD" tar ((:url . "https://github.com/benma/go-dlv.el/") (:commit . "0a296bc3b7b4dcf0c140a78c5ca3e1a8c6b7ea1a") (:revdesc . "0a296bc3b7b4") (:keywords "go" "debug" "debugger" "delve" "interactive" "gud") (:authors ("Marko Bencun" . "mbencun@gmail.com")) (:maintainers ("Marko Bencun" . "mbencun@gmail.com")) (:maintainer "Marko Bencun" . "mbencun@gmail.com"))])
+ (go-eldoc . [(20170305 1427) ((emacs (24 3)) (go-mode (1 0 0))) "Eldoc for go-mode" tar ((:url . "https://github.com/syohex/emacs-go-eldoc") (:commit . "cbbd2ea1e94a36004432a9ac61414cb5a95a39bd") (:revdesc . "cbbd2ea1e94a") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (go-errcheck . [(20160723 43) nil "Errcheck integration for go-mode" tar ((:url . "https://github.com/dominikh/go-errcheck.el") (:commit . "9db21eccecedc2490793f176246094167164af31") (:revdesc . "9db21ecceced") (:authors ("Dominik Honnef" . "dominikh@fork-bomb.org")) (:maintainers ("Dominik Honnef" . "dominikh@fork-bomb.org")) (:maintainer "Dominik Honnef" . "dominikh@fork-bomb.org"))])
+ (go-expr-completion . [(20200817 1750) ((emacs (24 1))) "Complement the return values for Go" tar ((:url . "https://github.com/fujimisakari/emacs-go-expr-completion") (:commit . "66bba78f52a732b978848e3a4c99fa2afeb6c25f") (:revdesc . "66bba78f52a7") (:authors ("Ryo Fujimoto" . "fujimisakri@gmail.com")) (:maintainers ("Ryo Fujimoto" . "fujimisakri@gmail.com")) (:maintainer "Ryo Fujimoto" . "fujimisakri@gmail.com"))])
+ (go-fill-struct . [(20230308 1034) ((emacs (24))) "Fill struct for golang" tar ((:url . "https://github.com/s-kostyaev/go-fill-struct") (:commit . "9e2e4be5af716ecadba809e73ddc95d4c772b2d9") (:revdesc . "9e2e4be5af71") (:keywords "tools") (:authors ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainers ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainer "Sergey Kostyaev" . "feo.me@ya.ru"))])
+ (go-gen-test . [(20230616 2053) ((emacs (24 4))) "Generate tests for go code with gotests" tar ((:url . "https://github.com/s-kostyaev/go-gen-test") (:commit . "af00a9abbaba2068502327ecdef574fd894a884b") (:revdesc . "af00a9abbaba") (:keywords "languages") (:authors ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainers ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainer "Sergey Kostyaev" . "feo.me@ya.ru"))])
+ (go-gopath . [(20160705 1034) ((cl-lib (0 5))) "Will guess GOPATH using gb and projectile" tar ((:url . "https://github.com/iced/go-gopath/") (:commit . "5172fc53f21edbf9347d5ee7d1d745da1ec88a15") (:revdesc . "5172fc53f21e") (:authors ("Andrew Kirilenko" . "andrew.kirilenko.main@gmail.com")) (:maintainers ("Andrew Kirilenko" . "andrew.kirilenko.main@gmail.com")) (:maintainer "Andrew Kirilenko" . "andrew.kirilenko.main@gmail.com"))])
+ (go-guru . [(20260529 1355) ((go-mode (1 3 1)) (cl-lib (0 5))) "Integration of the Go 'guru' analysis tool into Emacs" tar ((:url . "https://github.com/dominikh/go-mode.el") (:commit . "3a71d28ab47df685e54ca6046a7a3dd3e28b682c") (:revdesc . "3a71d28ab47d") (:keywords "tools"))])
+ (go-imenu . [(20181029 1029) ((emacs (24 3))) "Enhance imenu for go language" tar ((:url . "https://github.com/brantou/go-imenu.el") (:commit . "00bb69c1c71453f43ab2d6622a74e3c8e6b454b9") (:revdesc . "00bb69c1c714") (:keywords "tools") (:authors ("Brantou" . "brantou89@gmail.com")) (:maintainers ("Brantou" . "brantou89@gmail.com")) (:maintainer "Brantou" . "brantou89@gmail.com"))])
+ (go-impl . [(20210621 743) ((emacs (24 3)) (go-mode (1 3 0))) "Impl integration for go-mode" tar ((:url . "https://github.com/syohex/emacs-go-impl") (:commit . "1eebba6ccd02d11a5a82ad4540a8d562797bc3b3") (:revdesc . "1eebba6ccd02") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (go-imports . [(20190715 1647) nil "Insert go import statement given package name" tar ((:url . "https://github.com/yasushi-saito/go-imports") (:commit . "55681e815da93b6f927213c4aa352ae33db97c37") (:revdesc . "55681e815da9") (:keywords "tools" "go" "import"))])
+ (go-mode . [(20260510 1707) ((emacs (26 1))) "Major mode for the Go programming language" tar ((:url . "https://github.com/dominikh/go-mode.el") (:commit . "8aaaa9d2574d7862ecbbe1ff369e88fe3796c8be") (:revdesc . "8aaaa9d2574d") (:keywords "languages" "go"))])
+ (go-noisegate . [(20200502 703) ((emacs (24 4))) "Run Golang tests with Noise Gate" tar ((:url . "https://github.com/go-noisegate/go-noisegate.el") (:commit . "825d1fb05ec329f938c4c5bed23592f54d326f80") (:revdesc . "825d1fb05ec3") (:keywords "languages" "go" "test"))])
+ (go-playground . [(20250107 2014) ((emacs (24 4)) (go-mode (1 4 0)) (gotest (0 13 0))) "Local Golang playground for short snippets" tar ((:url . "https://github.com/grafov/go-playground") (:commit . "e4b9a82a11bc1a368eb517185813904c76d05336") (:revdesc . "e4b9a82a11bc") (:keywords "tools" "golang") (:authors ("Alexander I.Grafov" . "grafov@inet.name")) (:maintainers ("Alexander I.Grafov" . "grafov@inet.name")) (:maintainer "Alexander I.Grafov" . "grafov@inet.name"))])
+ (go-playground-cli . [(20160503 914) ((emacs (24)) (request (0 2 0)) (deferred (0 3 2)) (names (20151201 404)) (s (1 10 0)) (f (0 17 2)) (let-alist (1 0 4)) (cl-lib (0 5))) "Go Playground client tool" tar ((:url . "https://github.com/kosh04/go-playground-cli") (:commit . "60beebd98e3930641d41cee0189c579626f223bc") (:revdesc . "60beebd98e39") (:authors ("KOBAYASHI Shigeru" . "shigeru.kb@gmail.com")) (:maintainers ("KOBAYASHI Shigeru" . "shigeru.kb@gmail.com")) (:maintainer "KOBAYASHI Shigeru" . "shigeru.kb@gmail.com"))])
+ (go-prettify-mode . [(20260429 1651) ((emacs (28 1))) "Hide `if err != nil' and prettify them" tar ((:url . "https://codeberg.org/snyssfx/go-prettify-mode.el") (:commit . "446907afa83d749dbd0a610d1d6fea6bbb822335") (:revdesc . "446907afa83d") (:keywords "languages" "go" "tools") (:authors ("Gleb Zakharov" . "snyssfx@posteo.net")) (:maintainers ("Gleb Zakharov" . "snyssfx@posteo.net")) (:maintainer "Gleb Zakharov" . "snyssfx@posteo.net"))])
+ (go-projectile . [(20200609 131) ((projectile (0 10 0)) (go-mode (0)) (go-eldoc (0 16)) (go-rename (0)) (go-guru (0)) (dash (2 17 0))) "Go add-ons for Projectile" tar ((:url . "https://github.com/dougm/go-projectile") (:commit . "ad4ca3b5695a0e31e95e3cc4ccab498f87d68303") (:revdesc . "ad4ca3b5695a") (:keywords "project" "convenience") (:authors ("Doug MacEachern" . "dougm@vmware.com")) (:maintainers ("Doug MacEachern" . "dougm@vmware.com")) (:maintainer "Doug MacEachern" . "dougm@vmware.com"))])
+ (go-rename . [(20260510 1707) ((go-mode (1 3 1))) "Integration of the 'gorename' tool into Emacs" tar ((:url . "https://github.com/dominikh/go-mode.el") (:commit . "144dc7d312d260f8dad7dfa6168537ae57f8e436") (:revdesc . "144dc7d312d2") (:keywords "tools"))])
+ (go-scratch . [(20150810 440) ((go-mode (1 3 1)) (emacs (24))) "*scratch* buffer for Go" tar ((:url . "https://github.com/shosti/go-scratch.el") (:commit . "3f68cbcce04f59eb8e83af109164731ec0454be0") (:revdesc . "3f68cbcce04f") (:keywords "languages" "go") (:authors ("Emanuel Evans" . "mail@emanuel.industries")) (:maintainers ("Emanuel Evans" . "mail@emanuel.industries")) (:maintainer "Emanuel Evans" . "mail@emanuel.industries"))])
+ (go-snippets . [(20180113 611) ((yasnippet (0 8 0))) "Yasnippets for go" tar ((:url . "https://github.com/toumorokoshi/go-snippets") (:commit . "d437df148879566ffe7f2e503a3cf2602aa9fb28") (:revdesc . "d437df148879") (:keywords "snippets"))])
+ (go-stacktracer . [(20150430 2142) nil "Parse Go stack traces" tar ((:url . "https://github.com/samertm/go-stacktracer.el") (:commit . "a2ac6d801b389f80ca4e2fcc1ab44513a9e55976") (:revdesc . "a2ac6d801b38") (:keywords "tools") (:authors ("Samer Masterson" . "samer@samertm.com")) (:maintainers ("Samer Masterson" . "samer@samertm.com")) (:maintainer "Samer Masterson" . "samer@samertm.com"))])
+ (go-tag . [(20230111 651) ((emacs (24 0)) (go-mode (1 5 0))) "Edit Golang struct field tag" tar ((:url . "https://github.com/brantou/emacs-go-tag") (:commit . "33f2059551d5298ca228d90f525b99d1a8d70364") (:revdesc . "33f2059551d5") (:keywords "tools") (:authors ("Brantou" . "brantou89@gmail.com")) (:maintainers ("Brantou" . "brantou89@gmail.com")) (:maintainer "Brantou" . "brantou89@gmail.com"))])
+ (go-template-helper-mode . [(20260124 2229) ((emacs (28 1))) "Go text/template overlay highlighting (Helm/YAML)" tar ((:url . "https://codeberg.org/rch/go-template-helper-mode") (:commit . "e13b09d9176dd88e65c4bea5eb5c878242ea7e13") (:revdesc . "e13b09d9176d") (:keywords "tools" "faces") (:authors ("Robert Charusta" . "rch-public@posteo.net")) (:maintainers ("Robert Charusta" . "rch-public@posteo.net")) (:maintainer "Robert Charusta" . "rch-public@posteo.net"))])
+ (go-template-mode . [(20260102 1442) ((emacs (28 1))) "Major mode for Go templates" tar ((:url . "https://codeberg.org/rch/go-template-mode") (:commit . "f33b953f5301d079463b428393efcd83767a128c") (:revdesc . "f33b953f5301") (:keywords "languages" "tools") (:authors ("Robert Charusta" . "rch-public@posteo.net")) (:maintainers ("Robert Charusta" . "rch-public@posteo.net")) (:maintainer "Robert Charusta" . "rch-public@posteo.net"))])
+ (gobgen . [(20161020 1523) ((emacs (24 4))) "Generate GObject descendants using a detailed form" tar ((:url . "https://github.com/gergelypolonkai/gobgen.el") (:commit . "ed2c2b0d217deae293096f3cf14aa492791ddd4f") (:revdesc . "ed2c2b0d217d") (:keywords "gobject" "glib" "gtk" "helper" "utilities") (:authors ("Gergely Polonkai" . "gergely@polonkai.eu")) (:maintainers ("Gergely Polonkai" . "gergely@polonkai.eu")) (:maintainer "Gergely Polonkai" . "gergely@polonkai.eu"))])
+ (god-mode . [(20260428 56) ((emacs (26 3))) "Minor mode for God-like command entering" tar ((:url . "https://github.com/emacsorphanage/god-mode") (:commit . "4deb47444dd21c67521908cef8b11ab377bfbd6f") (:revdesc . "4deb47444dd2") (:authors ("Chris Done" . "chrisdone@gmail.com")) (:maintainers ("Chris Done" . "chrisdone@gmail.com")) (:maintainer "Chris Done" . "chrisdone@gmail.com"))])
+ (godoctor . [(20180710 2152) nil "Frontend for godoctor" tar ((:url . "https://github.com/microamp/godoctor.el") (:commit . "4b45ff3d0572f0e84056e4c3ba91fcc178199859") (:revdesc . "4b45ff3d0572") (:keywords "go" "golang" "refactoring") (:authors ("Sangho Na" . "microamp@protonmail.com")) (:maintainers ("Sangho Na" . "microamp@protonmail.com")) (:maintainer "Sangho Na" . "microamp@protonmail.com"))])
+ (gofmt-tag . [(20240111 2031) ((emacs (27))) "Format and align go struct tags" tar ((:url . "https://github.com/m1ndo/gofmt-tag") (:commit . "b7cc315ac45342fc9c17dde779cc9c37aa309841") (:revdesc . "b7cc315ac453") (:keywords "tools" "wp" "matching") (:authors ("ybenel" . "http://github/m1ndo")) (:maintainers ("ybenel" . "root@ybenel.cf")) (:maintainer "ybenel" . "root@ybenel.cf"))])
+ (goggles . [(20260519 1038) ((emacs (29 1)) (compat (31))) "Pulse modified regions" tar ((:url . "https://github.com/minad/goggles") (:commit . "e473909708aa0df2134b7bb7f6654d0fb5f23e23") (:revdesc . "e473909708aa") (:keywords "convenience" "text") (:authors ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (gogs . [(20250620 1333) ((ghub (4))) "Client library for the Gogs API" tar ((:url . "https://github.com/emacsattic/gogs") (:commit . "87f47b3b3d7a336c2a41fcf65b30fc48e497d53e") (:revdesc . "87f47b3b3d7a") (:keywords "tools") (:authors ("Jonas Bernoulli" . "emacs.ghub@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.ghub@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.ghub@jonas.bernoulli.dev"))])
+ (gold-mode . [(20140607 206) ((sws-mode (0))) "Major mode for editing .gold files" tar ((:url . "https://github.com/yuutayamada/gold-mode-el") (:commit . "6d3aa59602b1b835495271c8c9741ac344c2eab1") (:revdesc . "6d3aa59602b1") (:keywords "golang" "template" "gold") (:authors ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainers ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainer "Yuta Yamada" . "cokesboy\"at\"gmail.com"))])
+ (golden-ratio . [(20230912 1825) nil "Automatic resizing of Emacs windows to the golden ratio" tar ((:url . "https://github.com/roman/golden-ratio.el") (:commit . "375c9f287dfad68829582c1e0a67d0c18119dab9") (:revdesc . "375c9f287dfa") (:keywords "window" "resizing") (:authors ("Roman Gonzalez" . "romanandreg@gmail.com")) (:maintainers ("Roman Gonzalez" . "romanandreg@gmail.com")) (:maintainer "Roman Gonzalez" . "romanandreg@gmail.com"))])
+ (golden-ratio-scroll-screen . [(20250412 358) nil "Scroll half screen down or up, and highlight current line" tar ((:url . "https://github.com/jixiuf/golden-ratio-scroll-screen") (:commit . "60eb00ed7e51c0875a38cff25c9a87fe79296484") (:revdesc . "60eb00ed7e51") (:keywords "scroll" "screen" "highlight") (:authors (nil . "jixiufatgmaildotcom")) (:maintainers (nil . "jixiufatgmaildotcom")) (:maintainer nil . "jixiufatgmaildotcom"))])
+ (golint . [(20180221 2015) nil "Lint for the Go source code" tar ((:url . "https://github.com/golang/lint") (:commit . "0562613f16a6ec439a4a68e817e69e0f7c405c87") (:revdesc . "0562613f16a6"))])
+ (gom-mode . [(20131008 253) nil "Major mode for Gomfile" tar ((:url . "https://github.com/syohex/emacs-gom-mode") (:commit . "972e33df1d38ff323bc97de87477305826013701") (:revdesc . "972e33df1d38") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (gomacro-mode . [(20200326 1103) ((emacs (24 4)) (go-mode (1 5 0))) "Gomacro mode and Go REPL integration" tar ((:url . "https://github.com/storvik/gomacro-mode") (:commit . "66b77efebb9654aa60383a1014f716f8cd74e3fc") (:revdesc . "66b77efebb96") (:keywords "gomacro" "repl" "languages" "tools" "processes"))])
+ (good-scroll . [(20211101 942) ((emacs (27 1))) "Good pixel line scrolling" tar ((:url . "https://github.com/io12/good-scroll.el") (:commit . "a7ffd5c0e5935cebd545a0570f64949077f71ee3") (:revdesc . "a7ffd5c0e593") (:authors ("Benjamin Levy" . "blevy@protonmail.com")) (:maintainers ("Benjamin Levy" . "blevy@protonmail.com")) (:maintainer "Benjamin Levy" . "blevy@protonmail.com"))])
+ (google . [(20140416 1748) nil "Emacs interface to the Google API" tar ((:url . "https://github.com/hober/google-el") (:commit . "3b3189a8b201c8d36fed6e61496274e530dd40bd") (:revdesc . "3b3189a8b201") (:keywords "comm" "processes" "tools") (:authors ("Edward O'Connor" . "ted@oconnor.cx")) (:maintainers ("Edward O'Connor" . "ted@oconnor.cx")) (:maintainer "Edward O'Connor" . "ted@oconnor.cx"))])
+ (google-c-style . [(20220210 1659) nil "Google's C/C++ style for c-mode" tar ((:url . "https://github.com/google/styleguide") (:commit . "af78b49ac4fef8083094d5105f72528ee7d09073") (:revdesc . "af78b49ac4fe") (:keywords "c" "tools"))])
+ (google-contacts . [(20201012 1056) ((oauth2 (0 10)) (cl-lib (0 5))) "Support for Google Contacts in Emacs" tar ((:url . "https://github.com/jd/google-contacts.el") (:commit . "8923c238fe0906184d2254b33ba72792ed12cd47") (:revdesc . "8923c238fe09") (:keywords "comm") (:authors ("Julien Danjou" . "julien@danjou.info")) (:maintainers ("Julien Danjou" . "julien@danjou.info")) (:maintainer "Julien Danjou" . "julien@danjou.info"))])
+ (google-maps . [(20181121 1532) ((emacs (24 3))) "Access Google Maps from Emacs" tar ((:url . "https://julien.danjou.info/projects/emacs-packages#google-maps") (:commit . "2eb16ff609f5a9f8d02c15238a111fbb7db6c146") (:revdesc . "2eb16ff609f5") (:keywords "comm") (:authors ("Julien Danjou" . "julien@danjou.info")) (:maintainers ("Julien Danjou" . "julien@danjou.info")) (:maintainer "Julien Danjou" . "julien@danjou.info"))])
+ (google-this . [(20250407 1500) ((emacs (24 1))) "A set of functions and bindings to google under point" tar ((:url . "https://github.com/Malabarba/emacs-google-this") (:commit . "abdcb565503844e2146de42ab5ba898e90a2bb09") (:revdesc . "abdcb5655038") (:keywords "convenience" "hypermedia") (:authors ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainers ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainer "Artur Malabarba" . "bruce.connor.am@gmail.com"))])
+ (google-translate . [(20260419 134) ((emacs (24 3)) (popup (0 5 8))) "Emacs interface to Google Translate" tar ((:url . "https://github.com/atykhonov/google-translate") (:commit . "47c5719b7dd51a37a6ad270489738187a436d920") (:revdesc . "47c5719b7dd5") (:keywords "convenience") (:authors ("Oleksandr Manzyuk" . "manzyuk@gmail.com")) (:maintainers ("Andrey Tykhonov" . "atykhonov@gmail.com")) (:maintainer "Andrey Tykhonov" . "atykhonov@gmail.com"))])
+ (goose-theme . [(20160828 1245) ((emacs (24 1))) "A gray color theme" tar ((:url . "https://github.com/thwg/goose-theme") (:commit . "acd017b50ab25a75fd1331eb3de66467e2042e9c") (:revdesc . "acd017b50ab2") (:authors ("Stephen Whipple" . "shw@wicdmedia.org")) (:maintainers ("Stephen Whipple" . "shw@wicdmedia.org")) (:maintainer "Stephen Whipple" . "shw@wicdmedia.org"))])
+ (gore-mode . [(20151123 1927) ((go-mode (1 0 0))) "Simple mode for gore, a command-line evaluator for golang" tar ((:url . "https://github.com/sergey-pashaev/gore-mode") (:commit . "94d7f3e99104e06167967c98fdc201049c433c2d") (:revdesc . "94d7f3e99104") (:keywords "go" "repl") (:authors ("Sergey Pashaev" . "sergey.pashaev@gmail.com")) (:maintainers ("Sergey Pashaev" . "sergey.pashaev@gmail.com")) (:maintainer "Sergey Pashaev" . "sergey.pashaev@gmail.com"))])
+ (gorepl-mode . [(20170905 945) ((emacs (24)) (s (1 11 0)) (f (0 19 0)) (hydra (0 13 0))) "Go REPL Interactive Development in top of Gore" tar ((:url . "http://www.github.com/manute/gorepl-mode") (:commit . "bbd27f6a0a77f484e2a3f082d70dc69da63ae52a") (:revdesc . "bbd27f6a0a77") (:keywords "languages" "go" "golang" "gorepl") (:authors ("Manuel Alonso" . "manuteali@gmail.com")) (:maintainers ("Manuel Alonso" . "manuteali@gmail.com")) (:maintainer "Manuel Alonso" . "manuteali@gmail.com"))])
+ (gotest . [(20230221 945) ((emacs (24 3)) (s (1 11 0)) (f (0 19 0))) "Launch GO unit tests" tar ((:url . "https://github.com/nlamirault/gotest.el") (:commit . "490189e68d743a851bfb42d0017428a7550e8615") (:revdesc . "490189e68d74") (:keywords "languages" "go" "tests") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (gotham-theme . [(20220107 1730) ((emacs (24 1))) "A very dark Emacs color theme" tar ((:url . "https://depp.brause.cc/gotham-theme") (:commit . "4b8214df0851bb69b44c3e864568b7e0030a95d2") (:revdesc . "4b8214df0851") (:authors ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (goto-char-preview . [(20260204 956) ((emacs (24 3))) "Preview character when executing `goto-char` command" tar ((:url . "https://github.com/emacs-vs/goto-char-preview") (:commit . "d81c7186dc3c916ba84a5d8ce2f06c652c1186a8") (:revdesc . "d81c7186dc3c") (:keywords "convenience" "character" "navigation") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (goto-chg . [(20240407 1110) ((emacs (24 1))) "Go to last change" tar ((:url . "https://github.com/emacs-evil/goto-chg") (:commit . "72f556524b88e9d30dc7fc5b0dc32078c166fda7") (:revdesc . "72f556524b88") (:keywords "convenience" "matching") (:authors ("David Andersson" . "l.david.anderssonsverige.nu")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (goto-last-change . [(20150109 1823) nil "Move point through buffer-undo-list positions" tar ((:url . "https://github.com/camdez/goto-last-change.el") (:commit . "58b0928bc255b47aad318cd183a5dce8f62199cc") (:revdesc . "58b0928bc255") (:keywords "convenience") (:authors ("Kevin Rodgers" . "ihs_4664@yahoo.com")) (:maintainers ("Kevin Rodgers" . "ihs_4664@yahoo.com")) (:maintainer "Kevin Rodgers" . "ihs_4664@yahoo.com"))])
+ (goto-last-point . [(20230406 1822) ((emacs (24 3))) "Record and jump to the last point in the buffer" tar ((:url . "https://github.com/manuel-uberti/goto-last-point") (:commit . "2ad8ff095bc34b433803c824ec4f500ff51cd1b2") (:revdesc . "2ad8ff095bc3") (:keywords "convenience") (:authors ("Manuel Uberti" . "manuel.uberti@inventati.org")) (:maintainers ("Manuel Uberti" . "manuel.uberti@inventati.org")) (:maintainer "Manuel Uberti" . "manuel.uberti@inventati.org"))])
+ (goto-line-preview . [(20260204 956) ((emacs (25))) "Preview line when executing `goto-line` command" tar ((:url . "https://github.com/emacs-vs/goto-line-preview") (:commit . "7c86228bc4f92b5129302824881f36d7ae39ee0a") (:revdesc . "7c86228bc4f9") (:keywords "convenience" "line" "navigation") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (govc . [(20250702 120) ((emacs (24 3)) (dash (1 5 0)) (s (1 9 0)) (magit-popup (2 0 50)) (json-mode (1 6 0))) "Interface to govc for managing VMware ESXi and vCenter" tar ((:url . "https://github.com/vmware/govmomi/tree/main/govc/emacs") (:commit . "bedcaadc5399abbaaaebac504718a1b043cd354d") (:revdesc . "bedcaadc5399") (:keywords "convenience"))])
+ (govet . [(20170808 1724) nil "Linter/problem finder for the Go source code" tar ((:url . "https://godoc.org/golang.org/x/tools/cmd/vet") (:commit . "1b8c044aa856f4b62a682bc57494af19d22a6053") (:revdesc . "1b8c044aa856"))])
+ (gpastel . [(20231030 713) ((emacs (25 1))) "Integrates GPaste with the kill-ring" tar ((:url . "https://github.com/DamienCassou/gpastel") (:commit . "d35505abb1e38ddda61440b033ebd4decac7a25c") (:revdesc . "d35505abb1e3") (:keywords "tools") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (gpr-ts-mode . [(20260403 2016) ((emacs (29 1))) "Major mode for GNAT project files using Tree-Sitter" tar ((:url . "https://github.com/brownts/gpr-ts-mode") (:commit . "cd10a0963b4cf64966bb2e9413d787d83f5494d5") (:revdesc . "cd10a0963b4c") (:keywords "gpr" "gnat" "ada" "languages" "tree-sitter") (:authors ("Troy Brown" . "brownts@troybrown.dev")) (:maintainers ("Troy Brown" . "brownts@troybrown.dev")) (:maintainer "Troy Brown" . "brownts@troybrown.dev"))])
+ (gpr-yasnippets . [(20230516 627) ((emacs (24 4)) (yasnippet (0 14 0))) "Yasnippets for GNAT project files" tar ((:url . "https://github.com/brownts/gpr-yasnippets") (:commit . "d66ea90e8e45f6d0c3bd62185967c26190117296") (:revdesc . "d66ea90e8e45") (:keywords "gpr" "gnat" "languages" "snippets") (:authors ("Troy Brown" . "brownts@troybrown.dev")) (:maintainers ("Troy Brown" . "brownts@troybrown.dev")) (:maintainer "Troy Brown" . "brownts@troybrown.dev"))])
+ (gpt . [(20260207 633) ((emacs (28 1))) "Run instruction-following language models" tar ((:url . "https://github.com/stuhlmueller/gpt.el") (:commit . "9d4752674e6cbf57aee0bc013d99b4c8652e9f60") (:revdesc . "9d4752674e6c") (:keywords "openai" "anthropic" "claude" "language" "copilot" "convenience" "tools") (:authors ("Andreas Stuhlmueller" . "emacs@stuhlmueller.org")) (:maintainers ("Andreas Stuhlmueller" . "emacs@stuhlmueller.org")) (:maintainer "Andreas Stuhlmueller" . "emacs@stuhlmueller.org"))])
+ (gpt-commit . [(20230716 331) ((emacs (27 1)) (magit (2 90)) (request (0 3 2))) "Commit messages with GPT in Emacs" tar ((:url . "https://github.com/ywkim/gpt-commit") (:commit . "8a8883be2051eed499c5bc3035a75ff56d64d5ff") (:revdesc . "8a8883be2051") (:authors ("Youngwook Kim" . "youngwook.kim@gmail.com")) (:maintainers ("Youngwook Kim" . "youngwook.kim@gmail.com")) (:maintainer "Youngwook Kim" . "youngwook.kim@gmail.com"))])
+ (gptai . [(20250220 1735) ((emacs (24 1))) "Integrate with the OpenAI API" tar ((:url . "https://github.com/antonhibl/gptai") (:commit . "446b3a3f8a4f2412c969189a1f64aed099582094") (:revdesc . "446b3a3f8a4f") (:keywords "comm" "convenience") (:authors ("Anton Hibl" . "antonhibl11@gmail.com")) (:maintainers ("Anton Hibl" . "antonhibl11@gmail.com")) (:maintainer "Anton Hibl" . "antonhibl11@gmail.com"))])
+ (gptel . [(20260826 2228) ((emacs (27 1)) (transient (0 7 8)) (compat (30 1 0 0))) "Interact with ChatGPT or other LLMs" tar ((:url . "https://github.com/karthink/gptel") (:commit . "1f6556d9266c756a142337ccc82acfa5bba713ec") (:revdesc . "1f6556d9266c") (:keywords "convenience" "tools") (:authors ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com")) (:maintainers ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com")) (:maintainer "Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com"))])
+ (gptel-agent . [(20260824 106) ((emacs (29 1)) (compat (30 1 0 0)) (gptel (0 9 9)) (yaml (1 2 0)) (orderless (1 1))) "Agentic LLM use for gptel" tar ((:url . "https://github.com/karthink/gptel-agent") (:commit . "326e0abb8c6db0e5c4c421bd9af495932ae94b62") (:revdesc . "326e0abb8c6d") (:keywords "comm"))])
+ (gptel-agent-harness . [(20260826 1547) ((emacs (29 1)) (compat (30 1 0 0)) (gptel (0 9 9)) (gptel-agent (0 0 1))) "Autonomous coding-agent harness for gptel-agent" tar ((:url . "https://github.com/beacoder/gptel-agent-harness") (:commit . "ff8ca7bbf74a618efca01d70eaaca58077053e40") (:revdesc . "ff8ca7bbf74a") (:keywords "programming" "convenience" "ai" "agent") (:authors ("Huming Chen" . "chenhuming@gmail.com")) (:maintainers ("Huming Chen" . "chenhuming@gmail.com")) (:maintainer "Huming Chen" . "chenhuming@gmail.com"))])
+ (gptel-aibo . [(20250709 851) ((emacs (27 1)) (gptel (0 9 7))) "An AI Writing Assistant" tar ((:url . "https://github.com/dolmens/gptel-aibo") (:commit . "f55b5170b9dfc3023110ec8cad66e6f352ea9d8a") (:revdesc . "f55b5170b9df") (:keywords "emacs" "tools" "editing" "gptel" "ai" "assistant" "code-completion" "productivity") (:authors ("Sun Yi Ming" . "dolmens@gmail.com")) (:maintainers ("Sun Yi Ming" . "dolmens@gmail.com")) (:maintainer "Sun Yi Ming" . "dolmens@gmail.com"))])
+ (gptel-commit . [(20260520 342) ((emacs (27 1)) (gptel (0 9 8))) "Generate commit message with gptel" tar ((:url . "https://github.com/lakkiy/gptel-commit") (:commit . "c354320fc6a2f3df4594d524d78a7effa765636e") (:revdesc . "c354320fc6a2") (:keywords "vc" "convenience") (:authors ("Liu Bo" . "liubolovelife@gmail.com")) (:maintainers ("Liu Bo" . "liubolovelife@gmail.com")) (:maintainer "Liu Bo" . "liubolovelife@gmail.com"))])
+ (gptel-cpp-complete . [(20260715 307) ((emacs (30 1)) (eglot (1 19)) (gptel (0 9 8))) "GPTel-powered C++ completion" tar ((:url . "https://github.com/beacoder/gptel-cpp-complete") (:commit . "d1d083100a57edc467fb1adf3afe405bf0b2c258") (:revdesc . "d1d083100a57") (:keywords "programming" "convenience") (:authors ("Huming Chen" . "chenhuming@gmail.com")) (:maintainers ("Huming Chen" . "chenhuming@gmail.com")) (:maintainer "Huming Chen" . "chenhuming@gmail.com"))])
+ (gptel-fn-complete . [(20250317 1805) ((emacs (29 1)) (gptel (0 9 8))) "Complete the function at point using gptel" tar ((:url . "https://github.com/mwolson/gptel-fn-complete") (:commit . "6970dfa5c123f420ab06b99be012a222e792b019") (:revdesc . "6970dfa5c123") (:keywords "hypermedia" "convenience" "tools") (:authors ("Michael Olson" . "mwolson@gnu.org")) (:maintainers ("Michael Olson" . "mwolson@gnu.org")) (:maintainer "Michael Olson" . "mwolson@gnu.org"))])
+ (gptel-forge-prs . [(20260624 821) ((emacs (28 1)) (magit (4 0)) (forge (0 3)) (gptel (0 9))) "Generate PR descriptions for forge using gptel" tar ((:url . "https://github.com/ArthurHeymans/gptel-forge-prs") (:commit . "0a23a7f3f339bb0110a446a7b358aa68867c7898") (:revdesc . "0a23a7f3f339") (:keywords "forge" "vc" "convenience" "llm" "pull-request"))])
+ (gptel-magit . [(20250520 833) ((emacs (28 1)) (magit (4 0)) (gptel (0 9 8))) "Generate commit messages for magit using gptel" tar ((:url . "https://github.com/ragnard/gptel-magit") (:commit . "f27c01821b67ed99ddf705c2b995f78b71394d8b") (:revdesc . "f27c01821b67") (:keywords "vc" "convenience") (:authors ("Ragnar Dahlén" . "r.dahlen@gmail.com")) (:maintainers ("Ragnar Dahlén" . "r.dahlen@gmail.com")) (:maintainer "Ragnar Dahlén" . "r.dahlen@gmail.com"))])
+ (gpx . [(20251228 1347) ((emacs (27 1))) "Major mode for GPX files" tar ((:url . "https://github.com/mkcms/gpx-mode") (:commit . "d97efb2c2701118f418c22ab1b6518bef0d79517") (:revdesc . "d97efb2c2701") (:keywords "data" "tools") (:authors ("Michał Krzywkowski" . "k.michal@zoho.com")) (:maintainers ("Michał Krzywkowski" . "k.michal@zoho.com")) (:maintainer "Michał Krzywkowski" . "k.michal@zoho.com"))])
+ (grab-mac-link . [(20210511 1303) ((emacs (24))) "Grab link from Mac Apps and insert it into Emacs" tar ((:url . "https://github.com/xuchunyang/grab-mac-link.el") (:commit . "5fdb03bf57bc4a530374b896e0f8b5139dc794e3") (:revdesc . "5fdb03bf57bc") (:keywords "mac" "hyperlink"))])
+ (grab-x-link . [(20241223 1442) ((emacs (24)) (cl-lib (0 5))) "Grab links from X11 apps and insert into Emacs" tar ((:url . "https://github.com/xuchunyang/grab-x-link") (:commit . "4aecb0f360320e0a58b4b142d247b1e628612574") (:revdesc . "4aecb0f36032") (:keywords "hyperlink") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (gradle-mode . [(20150313 1905) ((s (1 8 0))) "Gradle integration with Emacs' compile" tar ((:url . "https://github.com/jacobono/emacs-gradle-mode") (:commit . "579de06674551919cddac9cfe42129f4fb0155c9") (:revdesc . "579de0667455") (:keywords "gradle") (:authors ("Daniel Mijares" . "daniel.j.mijares@gmail.com")) (:maintainers ("Daniel Mijares" . "daniel.j.mijares@gmail.com")) (:maintainer "Daniel Mijares" . "daniel.j.mijares@gmail.com"))])
+ (grails . [(20221110 929) ((emacs (24))) "Minor mode for Grails projects" tar ((:url . "https://github.com/lifeisfoo/emacs-grails") (:commit . "3019f86e555ee94388795a0475cfa213e3897bbb") (:revdesc . "3019f86e555e") (:authors ("Alessandro Miliucci" . "lifeisfoo@gmail.com")) (:maintainers ("Alessandro Miliucci" . "lifeisfoo@gmail.com")) (:maintainer "Alessandro Miliucci" . "lifeisfoo@gmail.com"))])
+ (grails-mode . [(20220407 1954) nil "Minor-mode that adds some Grails project management to a grails project" tar ((:url . "http://blog.wolfman.com") (:commit . "29210e5a969c02169b68e04f2e28e3bf2fc13363") (:revdesc . "29210e5a969c") (:keywords "languages") (:authors ("Jim Morris" . "morris@wolfman.com")) (:maintainers ("Russel Winder" . "russel@winder.org.uk")) (:maintainer "Russel Winder" . "russel@winder.org.uk"))])
+ (grammarly . [(20251231 1727) ((emacs (26 1)) (s (1 12 0)) (request (0 3 0)) (websocket (1 6))) "Grammarly API interface" tar ((:url . "https://github.com/emacs-grammarly/grammarly") (:commit . "aa079dca01e7dc35d993bdbdf2bcdccaf93a3d56") (:revdesc . "aa079dca01e7") (:keywords "convenience" "grammar" "api" "interface" "english") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (grandshell-theme . [(20180606 517) nil "Dark color theme for Emacs > 24 with intensive colors" tar ((:url . "https://framagit.org/steckerhalter/grandshell-theme") (:commit . "0ed8e4273607dd4fcaa742b4097259233b09eda6") (:revdesc . "0ed8e4273607") (:keywords "color" "theme" "grand" "shell" "faces"))])
+ (graph-fa2 . [(20260807 1146) ((emacs (27 1))) "ForceAtlas2 pure-elisp background-cached engine" tar ((:url . "https://github.com/elij/graph-fa2") (:commit . "17cbd4b18979cb468e3822d9ea994454ac642992") (:revdesc . "17cbd4b18979") (:keywords "multimedia" "graphs" "visualization") (:authors ("Elijah Charles" . "https://github.com/elij")) (:maintainers ("Elijah Charles" . "https://github.com/elij")) (:maintainer "Elijah Charles" . "https://github.com/elij"))])
+ (graphene . [(20180529 1112) ((dash (2 10 0)) (exec-path-from-shell (1 9)) (ppd-sr-speedbar (0 0 6)) (sr-speedbar (20140505)) (ido-completing-read+ (4 3)) (smex (3 0)) (web-mode (11 2)) (smartparens (1 8 0)) (graphene-meta-theme (0 0 2)) (flycheck (0 23)) (company (0 8 12))) "Friendly Emacs defaults" tar ((:url . "https://github.com/rdallasgray/graphene") (:commit . "cc8477fcfb7771ea4e5bbaf3c01f9e679234c1c1") (:revdesc . "cc8477fcfb77") (:keywords "defaults") (:authors ("Robert Dallas Gray" . "mail@robertdallasgray.com")) (:maintainers ("Robert Dallas Gray" . "mail@robertdallasgray.com")) (:maintainer "Robert Dallas Gray" . "mail@robertdallasgray.com"))])
+ (graphene-meta-theme . [(20180615 1335) nil "Integrated theming for common packages" tar ((:url . "https://github.com/rdallasgray/graphene") (:commit . "a4deb38957ee2aeb861d5601b304bf28d9f867ec") (:revdesc . "a4deb38957ee") (:keywords "defaults") (:authors ("Robert Dallas Gray" . "mail@robertdallasgray.com")) (:maintainers ("Robert Dallas Gray" . "mail@robertdallasgray.com")) (:maintainer "Robert Dallas Gray" . "mail@robertdallasgray.com"))])
+ (graphql . [(20221128 1106) ((emacs (25))) "GraphQL utilities" tar ((:url . "https://github.com/vermiculus/graphql.el") (:commit . "b57b5ca5d2d0837e1fb4a4f30c051d5f3e643f0f") (:revdesc . "b57b5ca5d2d0") (:keywords "hypermedia" "tools" "lisp") (:authors ("Sean Allred" . "code@seanallred.com")) (:maintainers ("Sean Allred" . "code@seanallred.com")) (:maintainer "Sean Allred" . "code@seanallred.com"))])
+ (graphql-doc . [(20240716 38) ((emacs (26 1)) (request (0 3 2)) (promise (1 1))) "GraphQL Documentation Explorer" tar ((:url . "https://github.com/ifitzpatrick/graphql-doc.el") (:commit . "17755a2466a1acef68eac664093fcd13cd51494a") (:revdesc . "17755a2466a1"))])
+ (graphql-mode . [(20251213 1110) ((emacs (25 1))) "Major mode for editing GraphQL schemas" tar ((:url . "https://github.com/davazp/graphql-mode") (:commit . "ccec811d0f1cb13e63e330234e408d56ba0f4d8e") (:revdesc . "ccec811d0f1c") (:keywords "languages") (:authors ("David Vazquez Pua" . "davazp@gmail.com")) (:maintainers ("David Vazquez Pua" . "davazp@gmail.com")) (:maintainer "David Vazquez Pua" . "davazp@gmail.com"))])
+ (graphql-ts-mode . [(20240105 1236) ((emacs (29 1))) "Tree-sitter support for GraphQL" tar ((:url . "https://sr.ht/~joram/graphql-ts-mode/") (:commit . "e933f235408ea195762700fd07c2d828e8f09aac") (:revdesc . "e933f235408e") (:keywords "languages" "graphql" "tree-sitter") (:authors ("Joram Schrijver" . "i@joram.io")) (:maintainers ("Joram Schrijver" . "i@joram.io")) (:maintainer "Joram Schrijver" . "i@joram.io"))])
+ (graphviz-dot-mode . [(20250925 1226) ((emacs (25 0))) "Mode for the dot-language used by graphviz (att)" tar ((:url . "https://ppareit.github.io/graphviz-dot-mode/") (:commit . "516c151b845a3eb2da73eb4ee648ad99172087ac") (:revdesc . "516c151b845a") (:keywords "mode" "dot" "dot-language" "dotlanguage" "graphviz" "graphs" "att") (:authors ("Pieter Pareit" . "pieter.pareit@gmail.com") ("Rubens Ramos" . "rubensrATusers.sourceforge.net")) (:maintainers ("Pieter Pareit" . "pieter.pareit@gmail.com")) (:maintainer "Pieter Pareit" . "pieter.pareit@gmail.com"))])
+ (grapnel . [(20131001 1534) nil "HTTP request lib with flexible callback dispatch" tar ((:url . "http://www.github.com/leathekd/grapnel") (:commit . "7387234eb3f0285a490fddb1e06a4bf029719fb7") (:revdesc . "7387234eb3f0") (:authors ("David Leatherman" . "leathekd@gmail.com")) (:maintainers ("David Leatherman" . "leathekd@gmail.com")) (:maintainer "David Leatherman" . "leathekd@gmail.com"))])
+ (grass-mode . [(20170503 1500) ((cl-lib (0 2)) (dash (2 8 0))) "Provides Emacs modes for interacting with the GRASS GIS program" tar ((:url . "https://github.com/plantarum/grass-mode") (:commit . "f17e330dfde6a1b81a9b33d019fc0dff890f482d") (:revdesc . "f17e330dfde6") (:keywords "grass" "gis") (:authors ("Tyler Smith" . "tyler@plantarum.ca")) (:maintainers ("Tyler Smith" . "tyler@plantarum.ca")) (:maintainer "Tyler Smith" . "tyler@plantarum.ca"))])
+ (grayscale-theme . [(20171005 802) nil "A simple grayscale theme" tar ((:url . "https://github.com/belak/emacs-grayscale-theme") (:commit . "917d63c0effc8459502a41e0cad5822d2b200499") (:revdesc . "917d63c0effc") (:keywords "lisp") (:authors ("Kaleb Elwert" . "belak@coded.io")) (:maintainers ("Kaleb Elwert" . "belak@coded.io")) (:maintainer "Kaleb Elwert" . "belak@coded.io"))])
+ (greader . [(20260627 1651) ((emacs (26 1)) (seq (2 24)) (compat (29 1 4 5))) "Gnamù reader, send buffer contents to a speech engine" tar ((:url . "https://gitlab.com/michelangelo-rodriguez/greader") (:commit . "5c304ad008d8688e4eccd9947ba5e410399bf021") (:revdesc . "5c304ad008d8") (:keywords "tools" "accessibility") (:authors ("Michelangelo Rodriguez" . "michelangelo.rodriguez@gmail.com")) (:maintainers ("Michelangelo Rodriguez" . "michelangelo.rodriguez@gmail.com")) (:maintainer "Michelangelo Rodriguez" . "michelangelo.rodriguez@gmail.com"))])
+ (greek-polytonic . [(20190303 1358) ((emacs (24))) "Quail package for inputting polytonic Greek" tar ((:url . "https://github.com/jhanschoo/greek-polytonic") (:commit . "114cba0f57cc077871693c799b807df2292341ec") (:revdesc . "114cba0f57cc") (:keywords "i18n" "multilingual" "input method" "greek") (:authors ("Johannes Choo" . "jhanschoo@gmail.com")) (:maintainers ("Johannes Choo" . "jhanschoo@gmail.com")) (:maintainer "Johannes Choo" . "jhanschoo@gmail.com"))])
+ (green-is-the-new-black-theme . [(20230828 2225) nil "A cool and minimalist green blackened theme engine" tar ((:url . "https://github.com/fredcamps/green-is-the-new-black-emacs") (:commit . "ad6f349e7e3a626f790af994424d3f015ac0d3ee") (:revdesc . "ad6f349e7e3a") (:keywords "faces" "themes") (:authors ("Fred Campos" . "fred.tecnologia@gmail.com")) (:maintainers ("Fred Campos" . "fred.tecnologia@gmail.com")) (:maintainer "Fred Campos" . "fred.tecnologia@gmail.com"))])
+ (green-phosphor-theme . [(20150515 1447) nil "A light color theme with muted, autumnal colors" tar ((:url . "https://github.com/aalpern/emacs-color-theme-green-phosphor") (:commit . "5549781559ff5daa85c1d6c635c94524c1c5f644") (:revdesc . "5549781559ff") (:keywords "color" "theme") (:authors ("Adam Alpern" . "adam.alpern@gmail.com")) (:maintainers ("Adam Alpern" . "adam.alpern@gmail.com")) (:maintainer "Adam Alpern" . "adam.alpern@gmail.com"))])
+ (green-screen-theme . [(20180816 1502) nil "A nice color theme for those who miss green CRTs" tar ((:url . "https://github.com/rbanffy/green-screen-emacs") (:commit . "774e8f6c033786406267f71ec07319d906a30b75") (:revdesc . "774e8f6c0337") (:keywords "faces" "theme") (:authors ("Ricardo Banffy" . "rbanffy@gmail.com")) (:maintainers ("Ricardo Banffy" . "rbanffy@gmail.com")) (:maintainer "Ricardo Banffy" . "rbanffy@gmail.com"))])
+ (greger . [(20250704 1635) ((emacs (29 1))) "Agentic coding environment with tool use, using Claude" tar ((:url . "https://github.com/andreasjansson/greger.el") (:commit . "b9591c30193cc764b23f1741fbb43159f85e945b") (:revdesc . "b9591c30193c") (:keywords "agent" "agentic" "ai" "chat" "language-models" "tools") (:authors ("Andreas Jansson" . "andreas@jansson.me.uk")) (:maintainers ("Andreas Jansson" . "andreas@jansson.me.uk")) (:maintainer "Andreas Jansson" . "andreas@jansson.me.uk"))])
+ (gregorio-mode . [(20170705 1451) nil "Gregorio Mode for .gabc files" tar ((:url . "https://jsrjenkins.github.io/gregorio-mode/") (:commit . "2b45f91246286abc449cb71f28583403181051c2") (:revdesc . "2b45f9124628") (:keywords "gregorio" "chant") (:authors ("Fr. John Jenkins" . "jenkins@sspx.ng")) (:maintainers ("Fr. John Jenkins" . "jenkins@sspx.ng")) (:maintainer "Fr. John Jenkins" . "jenkins@sspx.ng"))])
+ (grep-a-lot . [(20210618 1420) nil "Manages multiple search results buffers for grep.el" tar ((:url . "https://github.com/ZungBang/emacs-grep-a-lot") (:commit . "223819dbea049bdeb5f97f9849fce139a5f16a75") (:revdesc . "223819dbea04") (:keywords "tools" "convenience" "search") (:authors ("Avi Rozen" . "avi.rozen@gmail.com")) (:maintainers ("Avi Rozen" . "avi.rozen@gmail.com")) (:maintainer "Avi Rozen" . "avi.rozen@gmail.com"))])
+ (grey-paper-theme . [(20230415 1115) ((emacs (24 1))) "A greyscale theme with look-n-feel of an eink display" tar ((:url . "https://github.com/gugod/grey-paper-theme") (:commit . "4e5b8a31f586e2aa5c5d9bd939f0f518d919522e") (:revdesc . "4e5b8a31f586") (:keywords "faces") (:authors ("Kang-min Liu" . "gugod@gugod.org")) (:maintainers ("Kang-min Liu" . "gugod@gugod.org")) (:maintainer "Kang-min Liu" . "gugod@gugod.org"))])
+ (greymatters-theme . [(20150621 1123) ((emacs (24))) "Emacs 24 theme with a light background" tar ((:url . "https://github.com/mswift42/greymatters-theme") (:commit . "a7220a8c6cf18ccae2b76946b6f01188a7c9d5d1") (:revdesc . "a7220a8c6cf1"))])
+ (grip-mode . [(20260610 628) ((emacs (24 4))) "Instant GitHub-flavored Markdown/Org preview using grip" tar ((:url . "https://github.com/seagle0128/grip-mode") (:commit . "6ed3f9739e4a3320ab063f923c00215f7ee5b5cc") (:revdesc . "6ed3f9739e4a") (:keywords "convenience" "markdown" "preview") (:authors ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainers ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainer "Vincent Zhang" . "seagle0128@gmail.com"))])
+ (grizzl . [(20160818 737) ((cl-lib (0 5)) (emacs (24 3))) "Fast fuzzy search index for Emacs" tar ((:url . "https://github.com/grizzl/grizzl") (:commit . "d554d93afa8519ee3a41340ec8aa6b4555065446") (:revdesc . "d554d93afa85") (:keywords "convenience" "usability") (:authors ("Chris Corbyn" . "chris@w3style.co.uk")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.com")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.com"))])
+ (groovy-imports . [(20210505 1807) ((emacs (24 4)) (s (1 10 0)) (pcache (0 3 2))) "Code for dealing with Groovy imports" tar ((:url . "http://www.github.com/mbezjak/emacs-groovy-imports") (:commit . "a60c3202973e3185091db623d960f71840a22205") (:revdesc . "a60c3202973e") (:keywords "groovy"))])
+ (groovy-mode . [(20230318 533) ((s (1 12 0)) (emacs (24 3)) (dash (2 13 0))) "Major mode for Groovy source files" tar ((:url . "https://github.com/Groovy-Emacs-Modes/groovy-emacs-modes") (:commit . "7b8520b2e2d3ab1d62b35c426e17ac25ed0120bb") (:revdesc . "7b8520b2e2d3") (:keywords "languages") (:authors ("Russel Winder" . "russel@winder.org.uk") ("Jim Morris" . "morris@wolfman.com") ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Russel Winder" . "russel@winder.org.uk")) (:maintainer "Russel Winder" . "russel@winder.org.uk"))])
+ (grove . [(20260823 313) ((emacs (29 1))) "Obsidian-like note-taking for org files" tar ((:url . "https://github.com/jonathanchu/grove") (:commit . "1c93f2876c537356971724d050f6c3353f4f0fb5") (:revdesc . "1c93f2876c53") (:keywords "notes" "outlines" "tools") (:authors ("Jonathan Chu" . "me@jonathanchu.is")) (:maintainers ("Jonathan Chu" . "me@jonathanchu.is")) (:maintainer "Jonathan Chu" . "me@jonathanchu.is"))])
+ (grpclient . [(20260727 942) ((emacs (29 1))) "Grpcurl interactive builder" tar ((:url . "https://github.com/Prikaz98/grpclient.el") (:commit . "da91349b3b6eccfdf7d318dbea3a54b36d38552d") (:revdesc . "da91349b3b6e") (:keywords "grpc" "grpcurl" "tools") (:authors ("Ivan Prikaznov" . "prikaznov555@gmail.com") ("Miloš Tepić" . "tepcmils@gmail.com")) (:maintainers ("Ivan Prikaznov" . "prikaznov555@gmail.com") ("Miloš Tepić" . "tepcmils@gmail.com")) (:maintainer "Ivan Prikaznov" . "prikaznov555@gmail.com"))])
+ (gruber-darker-ayu-theme . [(20260720 1152) ((emacs (27 1))) "Gruber Darker + Ayu Dark color theme" tar ((:url . "https://github.com/Hadi493/gruber-darker-ayu-theme") (:commit . "205be6284bc409ce49c5b7e3d68c96bffe6278e2") (:revdesc . "205be6284bc4") (:authors ("Hadi Alam" . "hadialam493@gmail.com")) (:maintainers ("Hadi Alam" . "hadialam493@gmail.com")) (:maintainer "Hadi Alam" . "hadialam493@gmail.com"))])
+ (gruber-darker-theme . [(20231026 2031) nil "Gruber Darker color theme for Emacs 24" tar ((:url . "https://github.com/rexim/gruber-darker-theme") (:commit . "2e9f99c41fe8ef0557e9ea0f3b94ef50c68b5557") (:revdesc . "2e9f99c41fe8") (:authors ("Alexey Kutepov" . "reximkut@gmail.com")) (:maintainers ("Alexey Kutepov" . "reximkut@gmail.com")) (:maintainer "Alexey Kutepov" . "reximkut@gmail.com"))])
+ (grugru . [(20231202 250) ((emacs (24 4))) "Rotate text at point" tar ((:url . "https://github.com/ROCKTAKEY/grugru") (:commit . "3f1bc431f4dc919a7b04e519f1c8add9fb2949f3") (:revdesc . "3f1bc431f4dc") (:keywords "convenience" "abbrev" "tools") (:authors ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "ROCKTAKEY" . "rocktakey@gmail.com"))])
+ (grunt . [(20160316 1528) ((dash (2 9 0)) (ansi-color (3 4 2)) (emacs (24 3))) "Some glue to stick Emacs and Gruntfiles together" tar ((:url . "https://github.com/gempesaw/grunt.el") (:commit . "4c269e2738658643ec2ed9ef61a2a3d71b08d304") (:revdesc . "4c269e273865") (:keywords "convenience" "grunt") (:authors ("Daniel Gempesaw" . "dgempesaw@sharecare.com")) (:maintainers ("Daniel Gempesaw" . "dgempesaw@sharecare.com")) (:maintainer "Daniel Gempesaw" . "dgempesaw@sharecare.com"))])
+ (gruvbox-theme . [(20260825 2353) ((autothemer (0 2))) "A retro-groove colour theme for Emacs" tar ((:url . "https://github.com/greduan/emacs-theme-gruvbox") (:commit . "b34b8c0d9fe84190bb69cf084d7354d5e948fd94") (:revdesc . "b34b8c0d9fe8") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (gs-mode . [(20151202 1006) nil "Major mode for editing GrADS script files" tar ((:url . "https://github.com/yyr/emacs-grads") (:commit . "1a13051db21b999c7682a015b33a03096ff9d891") (:revdesc . "1a13051db21b") (:keywords "grads" "script" "major-mode") (:authors ("Joe Wielgosz" . "joew@cola.iges.org")) (:maintainers ("Joe Wielgosz" . "joew@cola.iges.org")) (:maintainer "Joe Wielgosz" . "joew@cola.iges.org"))])
+ (gscholar-bibtex . [(20190130 555) nil "Retrieve BibTeX from Google Scholar and other online sources(ACM, IEEE, DBLP)" tar ((:url . "https://github.com/cute-jumper/gscholar-bibtex") (:commit . "3b651e3de116860eb1f1aef9b547a561784871fe") (:revdesc . "3b651e3de116") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (gsettings . [(20260706 1543) ((emacs (24 3)) (dash (2 16 0)) (gvariant (1 0 0)) (s (1 12 0))) "GSettings (Gnome) helpers" tar ((:url . "https://github.com/wbolster/emacs-gsettings") (:commit . "e911edf0c80f3bb9599b3b628425e510f0acb63f") (:revdesc . "e911edf0c80f") (:keywords "languages") (:authors ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "wouter bolsterlee" . "wouter@bolsterl.ee"))])
+ (gsnip . [(20220206 1526) ((emacs (26)) (aio (1 0)) (log4e (0 3 3))) "A gitlab snippet client" tar ((:url . "https://github.com/kaiwk/gitlab-snippet") (:commit . "4d473b726b3f3b6bb7d1b5f66a9d368588ce0f86") (:revdesc . "4d473b726b3f") (:keywords "extensions" "tools") (:authors ("Wang Kai" . "kaiwkx@gmail.com")) (:maintainers ("Wang Kai" . "kaiwkx@gmail.com")) (:maintainer "Wang Kai" . "kaiwkx@gmail.com"))])
+ (gt . [(20250727 230) ((emacs (28 1)) (pdd (0 2 3))) "Translation framework, configurable and scalable" tar ((:url . "https://github.com/lorniu/gt.el") (:commit . "f9febd8583ea482f72139e02f440f3972502f5a2") (:revdesc . "f9febd8583ea") (:keywords "convenience") (:authors ("lorniu" . "lorniu@gmail.com")) (:maintainers ("lorniu" . "lorniu@gmail.com")) (:maintainer "lorniu" . "lorniu@gmail.com"))])
+ (gtasks . [(20251028 336) ((emacs (27 1))) "Google Tasks API (sync)" tar ((:url . "https://github.com/thndrbrrr/gtasks") (:commit . "574205a511b5788e3711f86a438573a62a08c472") (:revdesc . "574205a511b5") (:keywords "convenience" "tools" "google" "tasks" "api") (:authors (nil . "thndrbrrr@gmail.com")) (:maintainers (nil . "thndrbrrr@gmail.com")) (:maintainer nil . "thndrbrrr@gmail.com"))])
+ (gtk-pomodoro-indicator . [(20191007 1500) nil "A pomodoro indicator for the GTK tray" tar ((:url . "https://github.com/abo-abo/gtk-pomodoro-indicator") (:commit . "cb026a595de8a9244b16e06876f10c60dce18676") (:revdesc . "cb026a595de8") (:keywords "convenience" "pomodoro") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (gtk-variant . [(20200416 2136) ((emacs (25 1))) "Set the GTK theme variant (titlebar color)" tar ((:url . "https://github.com/bepvte/gtk-variant.el") (:commit . "a60af277fbb52306c17663074cf9954dd6cea024") (:revdesc . "a60af277fbb5") (:keywords "frames" "gtk" "titlebar"))])
+ (guake . [(20221029 1811) ((emacs (27 1))) "Interact with Guake via DBus" tar ((:url . "https://github.com/juergenhoetzel/emacs-guake") (:commit . "2753ce833b95bd1f042ac0e4b7adfe34975a88ed") (:revdesc . "2753ce833b95") (:keywords "convenience") (:authors ("Jürgen Hötzel" . "juergen.hoetzel@hr.de")) (:maintainers ("Jürgen Hötzel" . "juergen.hoetzel@hr.de")) (:maintainer "Jürgen Hötzel" . "juergen.hoetzel@hr.de"))])
+ (guard . [(20260817 2119) ((emacs (29 1))) "Custom modular init framework" tar ((:url . "https://github.com/Dspil/guard.el") (:commit . "2cce0f78b5a743e493e0defc8191df9c15b06019") (:revdesc . "2cce0f78b5a7") (:keywords "convenience" "initialization" "profiles" "tools") (:authors ("Dionisis Spiliopoulos" . "dennisspiliopoylos@gmail.com")) (:maintainers ("Dionisis Spiliopoulos" . "dennisspiliopoylos@gmail.com")) (:maintainer "Dionisis Spiliopoulos" . "dennisspiliopoylos@gmail.com"))])
+ (guava-themes . [(20260701 2352) ((emacs (24 1))) "A pack of plant-inspired themes" tar ((:url . "https://github.com/bormoge/guava-themes") (:commit . "49339c87d895d0726280811b325bb631f08aec69") (:revdesc . "49339c87d895") (:keywords "themes" "faces" "color") (:authors ("Geralld Borbón" . "geralldborbon@gmail.com")) (:maintainers ("Geralld Borbón" . "geralldborbon@gmail.com")) (:maintainer "Geralld Borbón" . "geralldborbon@gmail.com"))])
+ (guess-language . [(20260625 628) ((cl-lib (0 5)) (emacs (24))) "Robust automatic language detection" tar ((:url . "https://github.com/tmalsburg/guess-language.el") (:commit . "f7f74d50b11e090d7543daa0dfbf273820c006c7") (:revdesc . "f7f74d50b11e") (:keywords "wp") (:authors ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainers ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainer "Titus von der Malsburg" . "malsburg@posteo.de"))])
+ (guide-key . [(20150108 635) ((dash (2 10 0)) (popwin (0 3 0)) (s (1 9 0))) "Guide the following key bindings automatically and dynamically" tar ((:url . "https://github.com/kai2nenobu/guide-key") (:commit . "9236d287a7272e307fb941237390a96037c8c0a2") (:revdesc . "9236d287a727") (:keywords "help" "convenience") (:authors ("Tsunenobu Kai" . "kai2nenobu@gmail.com")) (:maintainers ("Tsunenobu Kai" . "kai2nenobu@gmail.com")) (:maintainer "Tsunenobu Kai" . "kai2nenobu@gmail.com"))])
+ (guide-key-tip . [(20161011 823) ((guide-key (1 2 3)) (pos-tip (0 4 5))) "Show guide-key.el hints using pos-tip.el" tar ((:url . "https://github.com/aki2o/guide-key-tip") (:commit . "02c5d4b0b65f3e91be5a47f0ff1ae5e86e00c64e") (:revdesc . "02c5d4b0b65f") (:keywords "help" "convenience" "tooltip") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (guix . [(20260724 1820) ((emacs (24 3)) (dash (2 11 0)) (geiser (0 8)) (bui (1 2 0)) (transient (0 3 0)) (edit-indirect (0 1 4)) (magit-popup (2 13 3))) "Interface for GNU Guix" tar ((:url . "https://codeberg.org/guix/emacs-guix") (:commit . "addac35e3fcb7a812b239c4aa76eada1743d0921") (:revdesc . "addac35e3fcb") (:keywords "tools") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (gulp-task-runner . [(20170718 2041) nil "Gulp task runner" tar ((:url . "https://github.com/NicolasPetton/gulp-task-runner") (:commit . "877990e956b1d71e2d9c7c3e5a129ad199b9debb") (:revdesc . "877990e956b1") (:keywords "convenience" "javascript") (:authors ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainers ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainer "Nicolas Petton" . "nicolas@petton.fr"))])
+ (gumshoe . [(20260217 252) ((emacs (27 1))) "Scoped spatial and temporal POINT movement tracking" tar ((:url . "https://github.com/Overdr0ne/gumshoe") (:commit . "da71e889b5e890fecbacaeba0a4977c4657b4351") (:revdesc . "da71e889b5e8") (:keywords "tools"))])
+ (guru-mode . [(20211025 1157) nil "Become an Emacs guru" tar ((:url . "https://github.com/bbatsov/guru-mode") (:commit . "a3370e547eab260d24774cd50ccbe865373c8631") (:revdesc . "a3370e547eab") (:keywords "convenience") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (gvariant . [(20260630 840) ((emacs (24)) (parsec (0 1 4))) "GVariant (GLib) helpers" tar ((:url . "https://github.com/wbolster/emacs-gvariant") (:commit . "b49a9c6623773be20e59eada9f8eab33210cc89b") (:revdesc . "b49a9c662377") (:keywords "languages") (:authors ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "wouter bolsterlee" . "wouter@bolsterl.ee"))])
+ (gvpr-mode . [(20250604 1329) nil "A major mode offering basic syntax coloring for gvpr scripts" tar ((:url . "https://raw.github.com/rodw/gvpr-lib/master/extra/gvpr-mode.el") (:commit . "db3aac0b51d8f624d94f8b022503b645ae97d926") (:revdesc . "db3aac0b51d8") (:keywords "graphviz" "gv" "dot" "gvpr" "graph") (:authors ("Rod Waldhoff" . "r.waldhoff@gmail.com")) (:maintainers ("Rod Waldhoff" . "r.waldhoff@gmail.com")) (:maintainer "Rod Waldhoff" . "r.waldhoff@gmail.com"))])
+ (gxref . [(20170411 1753) ((emacs (25))) "Xref backend using GNU Global" tar ((:url . "https://github.com/dedi/gxref") (:commit . "380b02c3c3c2586c828456716eef6a6392bb043b") (:revdesc . "380b02c3c3c2") (:keywords "xref" "global" "tools"))])
+ (h5dump-mode . [(20221128 1935) ((emacs (25 1))) "Major mode for navigating h5dump output" tar ((:url . "https://github.com/berquist/h5dump-mode") (:commit . "3c9e4608112da91db76bf316417023bed0422ef3") (:revdesc . "3c9e4608112d") (:keywords "languages" "hdf5"))])
+ (habamax-theme . [(20181001 850) ((emacs (24))) "Boring white background color that gets the job done" tar ((:url . "https://github.com/habamax/habamax-theme") (:commit . "6e86a1b23b6e2aaf40d4374b5673da00a28be447") (:revdesc . "6e86a1b23b6e") (:authors ("Maxim Kim" . "habamax@gmail.com")) (:maintainers ("Maxim Kim" . "habamax@gmail.com")) (:maintainer "Maxim Kim" . "habamax@gmail.com"))])
+ (habitica . [(20250715 1113) ((org (8 3 5)) (emacs (24 3))) "Interface for habitica.com" tar ((:url . "https://github.com/abrochard/emacs-habitica") (:commit . "de82cd5a1283ae4035602a86b2c92dd23d467ccf") (:revdesc . "de82cd5a1283") (:keywords "habitica" "todo"))])
+ (hack-mode . [(20260207 559) ((emacs (25 1)) (s (1 11 0))) "Major mode for the Hack programming language" tar ((:url . "https://github.com/hhvm/hack-mode") (:commit . "0b117e7f259439e7b5d961ec936d8718a727c13a") (:revdesc . "0b117e7f2594") (:authors ("John Allen" . "jallen@fb.com") ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("John Allen" . "jallen@fb.com") ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "John Allen" . "jallen@fb.com"))])
+ (hacker-typer . [(20260530 526) ((emacs (24))) "Pretend to write code like a pro" tar ((:url . "https://sr.ht/~dieggsy/emacs-hacker-typer") (:commit . "3f15d0cfe7636d5b32cbc882f23d5a7b61a86ae7") (:revdesc . "3f15d0cfe763") (:keywords "hacker" "typer" "multimedia" "games") (:authors ("Diego A. Mundo" . "diegoamundo@gmail.com")) (:maintainers ("Diego A. Mundo" . "diegoamundo@gmail.com")) (:maintainer "Diego A. Mundo" . "diegoamundo@gmail.com"))])
+ (hackernews . [(20250314 1759) nil "Hacker News Client for Emacs" tar ((:url . "https://github.com/clarete/hackernews.el") (:commit . "1d3ba5faf47a3907e270ed5aa4099f73dadfdf6c") (:revdesc . "1d3ba5faf47a") (:keywords "comm" "hypermedia" "news") (:authors ("Lincoln de Sousa" . "lincoln@clarete.li")) (:maintainers ("Basil L. Contovounesios" . "basil@contovou.net")) (:maintainer "Basil L. Contovounesios" . "basil@contovou.net"))])
+ (hackernews-modern . [(20260323 839) ((emacs (28 1)) (visual-fill-column (2 2)) (async-http-queue (0 1 0))) "Hacker News client with modern widget UI" tar ((:url . "https://git.andros.dev/andros/hackernews-modern-el") (:commit . "a90b247e9ed007b1e9e0a5ef77c08670ba0a3953") (:revdesc . "a90b247e9ed0") (:keywords "comm" "hypermedia" "news") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (haki-theme . [(20250119 823) ((emacs (27 1))) "An elegant, high-contrast dark theme in modern sense" tar ((:url . "https://github.com/idlip/haki") (:commit . "38ab81334e11dd11c797aa724149b7cb1fa8eafa") (:revdesc . "38ab81334e11") (:keywords "faces" "theme" "accessibility"))])
+ (hal-mode . [(20160704 1746) nil "Major mode for editing HAL files" tar ((:url . "https://github.com/strahlex/hal-mode/") (:commit . "cd2f66f219ee520198d4586fb6b169cef7ad3f21") (:revdesc . "cd2f66f219ee") (:keywords "language"))])
+ (halloweenie-theme . [(20231011 1252) ((emacs (27 1)) (autothemer (0 2))) "Dark and spooky Halloween color theme" tar ((:url . "https://cicadas.surf/cgit/halloweenie-theme.git") (:commit . "db39ff0516e071aa890585c39fe411ea355e8b06") (:revdesc . "db39ff0516e0") (:keywords "faces" "theme" "halloween" "pumpkin") (:authors ("Colin Okay" . "colin@cicadas.surf")) (:maintainers ("Colin Okay" . "colin@cicadas.surf")) (:maintainer "Colin Okay" . "colin@cicadas.surf"))])
+ (ham-mode . [(20150811 1306) ((html-to-markdown (1 2)) (markdown-mode (2 0))) "Html As Markdown. Transparently edit an html file using markdown" tar ((:url . "https://github.com/Bruce-Connor/ham-mode") (:commit . "3a141986a21c2aa6eefb428983352abb8b7907d2") (:revdesc . "3a141986a21c") (:keywords "convenience" "emulation" "wp") (:authors ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainers ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainer "Artur Malabarba" . "bruce.connor.am@gmail.com"))])
+ (hamburg-theme . [(20160123 740) ((emacs (24))) "Color Theme with a dark blue background" tar ((:url . "https://github.com/mswift42/hamburg-theme") (:commit . "a05bf090e0c57c34cc59e301f95d9961280db244") (:revdesc . "a05bf090e0c5"))])
+ (hamburger-menu . [(20220509 1341) ((emacs (28 1))) "Mode line hamburger menu" tar ((:url . "https://gitlab.com/iain/hamburger-menu-mode") (:commit . "06bc9d6872007a31226d7410d497a0acd98b272b") (:revdesc . "06bc9d687200") (:keywords "hamburger" "menu"))])
+ (haml-mode . [(20250714 1441) ((emacs (24 1)) (cl-lib (0 5))) "Major mode for editing Haml files" tar ((:url . "https://github.com/nex3/haml-mode") (:commit . "3bb4a96535eb5c81dbe6a43bfa8d67a778d449c0") (:revdesc . "3bb4a96535eb") (:keywords "markup" "languages" "html"))])
+ (hamlet-mode . [(20131208 724) ((cl-lib (0 3)) (dash (2 3 0)) (s (1 7 0))) "Hamlet editing mode" tar ((:url . "https://github.com/lightquake/hamlet-mode") (:commit . "7362b955e556a3d007fa06945a27e5b99349527d") (:revdesc . "7362b955e556") (:keywords "wp" "languages" "comm") (:authors ("Kata" . "lightquake@amateurtopologist.com")) (:maintainers ("Kata" . "lightquake@amateurtopologist.com")) (:maintainer "Kata" . "lightquake@amateurtopologist.com"))])
+ (hammy . [(20240917 212) ((emacs (28 1)) (svg-lib (0 2 5)) (ts (0 2 2))) "Programmable, interactive interval timers" tar ((:url . "https://github.com/alphapapa/hammy.el") (:commit . "5d33d41f0aa019719f9568e20b9599aed80d7db6") (:revdesc . "5d33d41f0aa0") (:keywords "convenience") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (handle . [(20191029 856) ((emacs (25 1)) (parent-mode (2 3))) "A handle for major-mode generic functions" tar ((:url . "https://gitlab.com/jjzmajic/handle") (:commit . "e27b2d0b229923f81a2c8afa3e9c65ae9e84a0da") (:revdesc . "e27b2d0b2299") (:keywords "convenience"))])
+ (handlebars-mode . [(20150211 1749) nil "A major mode for editing Handlebars files" tar ((:url . "https://github.com/danielevans/handlebars-mode") (:commit . "81f6b73fea8f397807781a1b51568397af21a6ef") (:revdesc . "81f6b73fea8f"))])
+ (handlebars-sgml-mode . [(20130623 2333) nil "Add Handlebars contextual indenting support to sgml-mode" tar ((:url . "https://github.com/jacott/handlebars-sgml-mode") (:commit . "005282c33dfb6dbd2cfd46a4147d261504e8323c") (:revdesc . "005282c33dfb") (:authors ("Geoff Jacobsen" . "geoffjacobsen@gmail.com")) (:maintainers ("Geoff Jacobsen" . "geoffjacobsen@gmail.com")) (:maintainer "Geoff Jacobsen" . "geoffjacobsen@gmail.com"))])
+ (handoff . [(20150917 600) nil "Get your hand off that mouse, damn it!" tar ((:url . "https://github.com/rejeep/handoff.el") (:commit . "75dc7a7e352f38679f65d0ca80ad158798e168bd") (:revdesc . "75dc7a7e352f") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (hanfix-mode . [(20260202 2111) ((emacs (30 2))) "Korean grammar checker" tar ((:url . "https://github.com/ntalbs/hanfix-mode") (:commit . "41f3a942cf7531dcb003932138e00e9ab4fa8214") (:revdesc . "41f3a942cf75") (:keywords "convenience" "wp") (:authors ("ntalbs" . "ntalbsen@gmail.com")) (:maintainers ("ntalbs" . "ntalbsen@gmail.com")) (:maintainer "ntalbs" . "ntalbsen@gmail.com"))])
+ (haproxy-mode . [(20240207 2010) ((emacs (24 3))) "Major mode for editing HAProxy config files" tar ((:url . "https://github.com/port19x/haproxy-mode") (:commit . "eafb1144751493c33dc005a317236ec3e84aeb07") (:revdesc . "eafb11447514") (:keywords "haproxy" "languages" "tools") (:authors ("port19" . "port19@port19.xyz")) (:maintainers ("port19" . "port19@port19.xyz")) (:maintainer "port19" . "port19@port19.xyz"))])
+ (har-viewer . [(20260523 2035) ((emacs (26 1))) "Major mode for viewing HTTP Archive (HAR) files" tar ((:url . "https://github.com/bozoslivehere/har-viewer.el") (:commit . "0b36dd0ef6743e0267e603127a4509737f8b1f0b") (:revdesc . "0b36dd0ef674") (:keywords "tools" "http" "network") (:authors ("Gregory Newman" . "bozoslivehere@protonmail.com")) (:maintainers ("Gregory Newman" . "bozoslivehere@protonmail.com")) (:maintainer "Gregory Newman" . "bozoslivehere@protonmail.com"))])
+ (hardcore-mode . [(20151114 701) nil "Disable arrow keys + optionally backspace and return" tar ((:url . "https://github.com/magnars/hardcore-mode.el") (:commit . "b1dda19692b4a7a58a689e81784a9b35be39e70d") (:revdesc . "b1dda19692b4") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (hardhat . [(20210515 1422) ((emacs (24 3)) (ignoramus (0 7 0))) "Protect against clobbering user-writable files" tar ((:url . "https://github.com/rolandwalker/hardhat") (:commit . "908cb130be3d56921a3687a00b974ba5eef3a11f") (:revdesc . "908cb130be3d") (:keywords "convenience") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (hardtime . [(20241203 1647) ((emacs (26 3))) "Prevents overuse of specified commands" tar ((:url . "https://github.com/ichernyshovvv/hardtime.el") (:commit . "a14df12bda3951e53553426629f4af7a638f6eee") (:revdesc . "a14df12bda39") (:keywords "navigation" "convenience") (:authors ("Ilya Chernyshov" . "ichernyshovvv@gmail.com")) (:maintainers ("Ilya Chernyshov" . "ichernyshovvv@gmail.com")) (:maintainer "Ilya Chernyshov" . "ichernyshovvv@gmail.com"))])
+ (hare-mode . [(20260316 1559) ((emacs (25 1))) "Hare mode" tar ((:url . "https://git.sr.ht/~grafov/hare-mode") (:commit . "7c757157502d916932bbc7668e1606a67e6b3b22") (:revdesc . "7c757157502d") (:keywords "languages") (:authors ("Benjamín Buccianti" . "benjamin@buccianti.dev") ("Amin Bandali" . "bandali@gnu.org") ("Theodor Thornhill" . "theo@thornhill.no") ("Sebastian" . "sebastian@sebsite.pw") ("Alexander Grafov" . "grafov@inet.name")) (:maintainers ("Benjamín Buccianti" . "benjamin@buccianti.dev") ("Amin Bandali" . "bandali@gnu.org") ("Theodor Thornhill" . "theo@thornhill.no") ("Sebastian" . "sebastian@sebsite.pw") ("Alexander Grafov" . "grafov@inet.name")) (:maintainer "Benjamín Buccianti" . "benjamin@buccianti.dev"))])
+ (harpoon . [(20240920 1714) ((emacs (27 2)) (f (0 20 0)) (hydra (0 14 0)) (project (0 8 1))) "Bookmarks on steroids" tar ((:url . "https://github.com/otavioschwanck/harpoon.el") (:commit . "631354f24c0bd56daaf8ab613d695c4f1d57949a") (:revdesc . "631354f24c0b") (:keywords "tools" "languages") (:authors ("Otávio Schwanck" . "otavioschwanck@gmail.com")) (:maintainers ("Otávio Schwanck" . "otavioschwanck@gmail.com")) (:maintainer "Otávio Schwanck" . "otavioschwanck@gmail.com"))])
+ (harvest . [(20170822 1746) ((swiper (0 7 0)) (hydra (0 13 0)) (s (1 11 0))) "Harvest integration" tar ((:url . "https://github.com/kostajh/harvest.el") (:commit . "7acbc0564b250521b67131ee2a0a92720239454f") (:revdesc . "7acbc0564b25") (:keywords "harvest") (:authors ("Kosta Harlan" . "kosta@kostaharlan.net")) (:maintainers ("Kosta Harlan" . "kosta@kostaharlan.net")) (:maintainer "Kosta Harlan" . "kosta@kostaharlan.net"))])
+ (haskell-emacs . [(20240205 2225) nil "Write emacs extensions in haskell" tar ((:url . "https://github.com/knupfer/haskell-emacs") (:commit . "777d5209f70229b53e4a60a09d1b714d233b0a7c") (:revdesc . "777d5209f702") (:keywords "haskell" "emacs" "ffi"))])
+ (haskell-emacs-base . [(20160904 2026) ((haskell-emacs (2 4 0))) "Haskell functions from Prelude" tar ((:url . "https://github.com/knupfer/haskell-emacs/modules/base") (:commit . "a2c6a079175904689eed7c6c200754bfa85d1ed9") (:revdesc . "a2c6a0791759") (:keywords "haskell" "emacs" "ffi"))])
+ (haskell-emacs-text . [(20160904 2026) ((haskell-emacs (2 4 0))) "Haskell functions from Data.Text" tar ((:url . "https://github.com/knupfer/haskell-emacs/modules/text") (:commit . "a2c6a079175904689eed7c6c200754bfa85d1ed9") (:revdesc . "a2c6a0791759") (:keywords "haskell" "emacs" "ffi"))])
+ (haskell-mode . [(20260206 1050) ((emacs (25 1))) "A Haskell editing mode" tar ((:url . "https://github.com/haskell/haskell-mode") (:commit . "2dd755a5fa11577a9388af88f385d2a8e18f7a8d") (:revdesc . "2dd755a5fa11") (:keywords "haskell" "cabal" "ghc" "repl" "languages"))])
+ (haskell-snippets . [(20210228 344) ((cl-lib (0 5)) (yasnippet (0 8 0))) "Yasnippets for Haskell" tar ((:url . "https://github.com/haskell/haskell-snippets") (:commit . "1c29c4a68ce89848b8d371c6510d1de3b586c8b3") (:revdesc . "1c29c4a68ce8") (:keywords "snippets" "haskell") (:authors ("Luke Hoersten" . "luke@hoersten.org")) (:maintainers ("Luke Hoersten" . "luke@hoersten.org")) (:maintainer "Luke Hoersten" . "luke@hoersten.org"))])
+ (haskell-tab-indent . [(20200514 1424) nil "Tab-based indentation for haskell-mode" tar ((:url . "https://spwhitton.name/tech/code/haskell-tab-indent/") (:commit . "1127f46eca40a48be9cd2380df2cfc5f0b694e63") (:revdesc . "1127f46eca40") (:keywords "indentation" "haskell") (:authors ("Sean Whitton" . "spwhitton@spwhitton.name")) (:maintainers ("Sean Whitton" . "spwhitton@spwhitton.name")) (:maintainer "Sean Whitton" . "spwhitton@spwhitton.name"))])
+ (hass . [(20230529 1312) ((emacs (25 1)) (request (0 3 3)) (websocket (1 13))) "Interact with Home Assistant" tar ((:url . "https://github.com/purplg/hass") (:commit . "4c9da37c5217177d43dbd2cb9cd458c01b834c54") (:revdesc . "4c9da37c5217"))])
+ (haste . [(20141030 2034) ((json (1 2))) "Emacs client for hastebin (http://hastebin.com/about.md)" tar ((:url . "https://github.com/rlister/emacs-haste-client") (:commit . "f1099c6296fc9575675e281402b89854739114bb") (:revdesc . "f1099c6296fc"))])
+ (hatty . [(20260815 1327) ((emacs (29 1))) "Query positions through hats" tar ((:url . "https://github.com/ErikPrantare/hatty.el") (:commit . "b13bb27a61cde5ad745bcac0d23a5791100badb9") (:revdesc . "b13bb27a61cd") (:keywords "convenience") (:authors ("Erik Präntare" . "erik@prantare.xyz")) (:maintainers ("Erik Präntare" . "erik@prantare.xyz")) (:maintainer "Erik Präntare" . "erik@prantare.xyz"))])
+ (haxe-imports . [(20170330 2304) ((emacs (24 4)) (s (1 10 0)) (pcache (0 3 1))) "Code for dealing with Haxe imports" tar ((:url . "http://www.github.com/accidentalrebel/emacs-haxe-imports") (:commit . "a4ab31759bd237e78c055dda73e808a4ee1b5fde") (:revdesc . "a4ab31759bd2") (:keywords "haxe") (:authors ("Juan Karlo Licudine" . "karlo@accidentalrebel.com")) (:maintainers ("Juan Karlo Licudine" . "karlo@accidentalrebel.com")) (:maintainer "Juan Karlo Licudine" . "karlo@accidentalrebel.com"))])
+ (haxe-mode . [(20260103 1757) nil "Major mode for editing Haxe files" tar ((:url . "https://github.com/emacsorphanage/haxe-mode") (:commit . "6ffa81f6d1fa81b7b9ae2e68d22b0d4c872cf59d") (:revdesc . "6ffa81f6d1fa") (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (haxor-mode . [(20160618 1129) ((emacs (24 0))) "Major mode for editing Haxor Assembly Files" tar ((:url . "https://github.com/krzysztof-magosa/haxor-mode") (:commit . "6fa25a8e6b6a59481bc0354c2fe1e0ed53cbdc91") (:revdesc . "6fa25a8e6b6a") (:keywords "haxor") (:authors ("Krzysztof Magosa" . "krzysztof@magosa.pl")) (:maintainers ("Krzysztof Magosa" . "krzysztof@magosa.pl")) (:maintainer "Krzysztof Magosa" . "krzysztof@magosa.pl"))])
+ (hayoo . [(20140831 1221) ((emacs (24)) (json (1 3))) "Query hayoo and show results in a tabulated buffer" tar ((:url . "https://github.com/benma/hayoo.el/") (:commit . "3ca2fb0c4d5f337d0410c21b2702dd147014e984") (:revdesc . "3ca2fb0c4d5f") (:keywords "hayoo" "haskell") (:authors ("Marko Bencun" . "mbencun@gmail.com")) (:maintainers ("Marko Bencun" . "mbencun@gmail.com")) (:maintainer "Marko Bencun" . "mbencun@gmail.com"))])
+ (hc-zenburn-theme . [(20150928 1633) nil "An higher contrast version of the Zenburn theme" tar ((:url . "https:github.com/edran/hc-zenburn-emacs") (:commit . "fd0024a5191cdce204d91c8f1db99ba31640f6e9") (:revdesc . "fd0024a5191c") (:authors ("Nantas Nardelli" . "nantas.nardelli@gmail.com")) (:maintainers ("Nantas Nardelli" . "nantas.nardelli@gmail.com")) (:maintainer "Nantas Nardelli" . "nantas.nardelli@gmail.com"))])
+ (hcl-mode . [(20240220 1534) ((emacs (24 3))) "Major mode for Hashicorp" tar ((:url . "https://github.com/purcell/emacs-hcl-mode") (:commit . "b2a03a446c1fe324ff494c28b9321486fa6fc672") (:revdesc . "b2a03a446c1f") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (hdf5-viewer . [(20260216 1940) ((emacs (29 1))) "Major mode for viewing HDF5 files" tar ((:url . "https://github.com/hdf5-viewer/hdf5-viewer") (:commit . "620abfea368c85e326108328c846a82fea490b77") (:revdesc . "620abfea368c") (:keywords "hdf5" "data") (:authors ("Paul Minner" . "minner.paul@gmail.com") ("Peter Mao" . "peter.mao@gmail.com")) (:maintainers ("Paul Minner" . "minner.paul@gmail.com") ("Peter Mao" . "peter.mao@gmail.com")) (:maintainer "Paul Minner" . "minner.paul@gmail.com"))])
+ (headlong . [(20150417 1526) nil "Reckless completion" tar ((:url . "https://github.com/abo-abo/headlong") (:commit . "f6830f87f236eee88263cb6976125f72422abe72") (:revdesc . "f6830f87f236") (:keywords "completion") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (heaven-and-hell . [(20190713 1830) ((emacs (24 4))) "Easy toggle light/dark themes" tar ((:url . "https://github.com/valignatev/heaven-and-hell") (:commit . "e1febfd60d060c110a1e43c5f093cd8537251308") (:revdesc . "e1febfd60d06") (:keywords "faces") (:authors ("Valentin Ignatev" . "valentignatev@gmail.com")) (:maintainers ("Valentin Ignatev" . "valentignatev@gmail.com")) (:maintainer "Valentin Ignatev" . "valentignatev@gmail.com"))])
+ (heex-ts-mode . [(20250511 643) ((emacs (29 1))) "Major mode for Heex with tree-sitter support" tar ((:url . "https://github.com/wkirschbaum/elixir-ts-mode") (:commit . "7496adcad0339978ef462b92160b6d40c3595841") (:revdesc . "7496adcad033") (:keywords "heex" "languages" "tree-sitter"))])
+ (hel . [(20260826 1524) ((emacs (29 1)) (dash (2 19 1)) (avy (0 5 0)) (pcre2el (1 12)) (ultra-scroll (0 6))) "Helix Emulation Layer" tar ((:url . "https://github.com/helheim-emacs/hel") (:commit . "28aac5b39cf582b0781bd61e6bce457625392e0e") (:revdesc . "28aac5b39cf5") (:authors ("Yuriy Artemyev" . "anuvyklack@gmail.com")) (:maintainers ("Yuriy Artemyev" . "anuvyklack@gmail.com")) (:maintainer "Yuriy Artemyev" . "anuvyklack@gmail.com"))])
+ (helix . [(20260826 2153) ((emacs (29 1))) "A minor mode emulating Helix keybindings" tar ((:url . "https://github.com/mgmarlow/helix-mode") (:commit . "4a8aeafa5ca43c68dcd2a23a1906e0a4221fe35d") (:revdesc . "4a8aeafa5ca4") (:keywords "convenience"))])
+ (helix-theme . [(20240814 1212) nil "Color theme inspired by Helix editor's default colors" tar ((:url . "https://github.com/ibakepunk/helix-theme") (:commit . "8c70b48fe5fbb392d237b6be2ae9da7b84236320") (:revdesc . "8c70b48fe5fb") (:keywords "faces"))])
+ (helm . [(20260811 401) ((helm-core (4 0 7)) (wfnames (1 2))) "Helm is an Emacs incremental and narrowing framework" tar ((:url . "https://emacs-helm.github.io/helm/") (:commit . "acff7751af0623f1bbebb1f3bf1ee4831f7f5035") (:revdesc . "acff7751af06") (:keywords "helm" "convenience" "files" "buffers" "grep" "completion" "lisp" "matching" "tools" "help" "package") (:authors ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainers ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainer "Thierry Volpiatto" . "thievol@posteo.net"))])
+ (helm-R . [(20120820 14) ((helm (20120517)) (ess (20120509))) "Helm-sources and some utilities for GNU R" tar ((:url . "https://github.com/myuhe/helm-R.el") (:commit . "b0eb9d5f6a483a9dbe6eb6cf1f2024d4f5938bc2") (:revdesc . "b0eb9d5f6a48") (:keywords "convenience") (:authors ("myuhe" . "yuhei.maeda_at_gmail.com")))])
+ (helm-ad . [(20151209 1015) ((dash (2 8 0)) (helm (1 6 2))) "Helm source for Active Directory" tar ((:url . "https://github.com/tnoda/helm-ad") (:commit . "8ac044705d8620ee354a9cfa8cc1b865e83c0d55") (:revdesc . "8ac044705d86") (:keywords "comm") (:authors ("Takahiro Noda" . "takahiro.noda+github@gmail.com")) (:maintainers ("Takahiro Noda" . "takahiro.noda+github@gmail.com")) (:maintainer "Takahiro Noda" . "takahiro.noda+github@gmail.com"))])
+ (helm-apt . [(20231005 423) ((helm (3 9 5)) (emacs (25 1))) "Helm interface for Debian/Ubuntu packages (apt-*)" tar ((:url . "https://github.com/emacs-helm/helm-apt") (:commit . "3ddbb62f483d2bbdbfcab4160040eaad22a82d67") (:revdesc . "3ddbb62f483d") (:authors ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainers ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainer "Thierry Volpiatto" . "thievol@posteo.net"))])
+ (helm-atoms . [(20201013 1723) ((emacs (25 1)) (helm (2 0))) "Reverse variable lookup using Helm" tar ((:url . "https://github.com/dantecatalfamo/helm-atoms") (:commit . "7e6f91a16f556c96ae1b0d1f965ea56861bb6372") (:revdesc . "7e6f91a16f55") (:keywords "help" "lisp" "maint" "helm" "tools" "matching"))])
+ (helm-aws . [(20180514 1032) ((helm (1 5 3)) (cl-lib (0 5)) (s (1 9 0))) "Manage AWS EC2 server instances directly from Emacs" tar ((:url . "https://github.com/istib/helm-aws") (:commit . "b36c744b3f00f458635a91d1f5158fccbb5baef6") (:revdesc . "b36c744b3f00"))])
+ (helm-backup . [(20180911 614) ((helm (1 5 5)) (s (1 8 0)) (cl-lib (0))) "Backup each file change using git" tar ((:url . "https://github.com/antham/helm-backup") (:commit . "691fe542f38fc7c8cca409997f6a0ff5d76ad6c2") (:revdesc . "691fe542f38f") (:keywords "backup" "convenience" "files" "tools" "vc") (:authors ("Anthony HAMON" . "hamon.anth@gmail.com")) (:maintainers ("Anthony HAMON" . "hamon.anth@gmail.com")) (:maintainer "Anthony HAMON" . "hamon.anth@gmail.com"))])
+ (helm-bbdb . [(20260728 2016) ((emacs (26 1)) (helm (1 5)) (bbdb (3 1 2))) "Helm interface for bbdb" tar ((:url . "https://github.com/emacs-helm/helm-bbdb") (:commit . "8d5e5e35af18d61870f00e06ce272d90d4006506") (:revdesc . "8d5e5e35af18") (:authors ("Thierry Volpiatto" . "thierry.volpiatto@gmail.com")) (:maintainers ("Jonathan Gregory" . "jgrg@autistici.org")) (:maintainer "Jonathan Gregory" . "jgrg@autistici.org"))])
+ (helm-bibtex . [(20231009 1014) ((bibtex-completion (1 0 0)) (helm (1 5 5)) (cl-lib (0 5)) (emacs (24 1))) "A bibliography manager based on Helm" tar ((:url . "https://github.com/tmalsburg/helm-bibtex") (:commit . "d8baeaa4c69fde4a179102c8271c1db804e5155e") (:revdesc . "d8baeaa4c69f") (:authors ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainers ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainer "Titus von der Malsburg" . "malsburg@posteo.de"))])
+ (helm-bibtexkey . [(20140214 1504) ((helm (1 5 8))) "Bibtexkey source for helm" tar ((:url . "https://github.com/kenbeese/helm-bibtexkey") (:commit . "aa1637ea5c8c5f1817e480fc2a3750cafab3d99f") (:revdesc . "aa1637ea5c8c") (:keywords "bib" "tex") (:authors ("TAKAGI Kentaro" . "kentaro0910_at_gmail.com")) (:maintainers ("TAKAGI Kentaro" . "kentaro0910_at_gmail.com")) (:maintainer "TAKAGI Kentaro" . "kentaro0910_at_gmail.com"))])
+ (helm-bind-key . [(20141109 515) ((bind-key (1 0)) (helm (1 6 4))) "Helm-source for for bind-key" tar ((:url . "https://github.com/myuhe/helm-bind-key.el") (:commit . "9da6ad8b7530e72fb4ac67be8c6a482898dddc25") (:revdesc . "9da6ad8b7530") (:keywords "convenience" "emulation") (:authors ("Yuhei Maeda" . "yuhei.maeda_at_gmail.com")))])
+ (helm-bitbucket . [(20220722 1538) ((emacs (24)) (helm-core (3 6 0))) "Search Bitbucket with Helm" tar ((:url . "https://github.com/dragonwasrobot/helm-bitbucket") (:commit . "9d07a274584ad364a2620c6389f86d90502f2640") (:revdesc . "9d07a274584a") (:keywords "matching") (:authors ("Peter Urbak" . "tolowercase@gmail.com")) (:maintainers ("Peter Urbak" . "tolowercase@gmail.com")) (:maintainer "Peter Urbak" . "tolowercase@gmail.com"))])
+ (helm-bm . [(20240812 1738) ((bm (1 0)) (cl-lib (0 5)) (helm (1 9 3))) "Helm sources for bm.el" tar ((:url . "https://github.com/emacs-helm/helm-bm") (:commit . "4744b5784df5800f36c3c54de5269034191155f5") (:revdesc . "4744b5784df5") (:keywords "helm" "bookmark") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com") ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainers ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainer "Thierry Volpiatto" . "thievol@posteo.net"))])
+ (helm-books . [(20170325 631) ((helm (1 7 7))) "Helm interface for searching books" tar ((:url . "https://github.com/grugrut/helm-books") (:commit . "6735e1787f99b5ef77b276fa5c43e565b4d3e792") (:revdesc . "6735e1787f99") (:authors ("grugrut" . "grugruglut+github@gmail.com")) (:maintainers ("grugrut" . "grugruglut+github@gmail.com")) (:maintainer "grugrut" . "grugruglut+github@gmail.com"))])
+ (helm-bufler . [(20230916 916) ((emacs (26 3)) (bufler (0 2 -1)) (helm (1 9 4))) "Helm source for Bufler" tar ((:url . "https://github.com/alphapapa/bufler.el") (:commit . "938b186f09739196fe0e65e8e370f90b47008054") (:revdesc . "938b186f0973") (:keywords "convenience") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (helm-bundle-show . [(20190526 1401) ((emacs (24)) (helm (1 8 0))) "Bundle show with helm interface" tar ((:url . "https://github.com/masutaka/emacs-helm-bundle-show") (:commit . "70f1ca7d1847c7d5cd5a3e488562cd4a295b809f") (:revdesc . "70f1ca7d1847") (:authors ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainers ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainer "Takashi Masuda" . "masutaka.net@gmail.com"))])
+ (helm-c-yasnippet . [(20230911 444) ((emacs (25 1)) (helm (1 7 7)) (yasnippet (0 8 0))) "Helm source for yasnippet.el" tar ((:url . "https://github.com/emacs-jp/helm-c-yasnippet") (:commit . "c6c9a14a65d11de967be593e5bead3196c1f4ecf") (:revdesc . "c6c9a14a65d1") (:keywords "convenience" "emulation") (:authors ("Kenji.I" . "ken.imakaado@gmail.com")) (:maintainers ("Kenji.I" . "ken.imakaado@gmail.com")) (:maintainer "Kenji.I" . "ken.imakaado@gmail.com"))])
+ (helm-catkin . [(20190425 1520) ((emacs (24 3)) (helm (0)) (xterm-color (0))) "Package for compile ROS workspaces with catkin-tools" tar ((:url . "https://github.com/gollth/helm-catkin") (:commit . "a3422346eb46e66a947a75f9e1b9975a672036be") (:revdesc . "a3422346eb46") (:keywords "catkin" "helm" "build" "tools" "ros") (:authors ("Thore Goll" . "thoregoll@googlemail.com")) (:maintainers ("Thore Goll" . "thoregoll@googlemail.com")) (:maintainer "Thore Goll" . "thoregoll@googlemail.com"))])
+ (helm-charinfo . [(20170810 1231) ((emacs (24)) (helm (1 7 0)) (cl-lib (0 5))) "A helm source for character information" tar ((:url . "https://github.com/cwittern/helm-charinfo") (:commit . "91798a49dc115342a7e01e48b264e9a0bf5ea414") (:revdesc . "91798a49dc11") (:keywords "convenience") (:authors ("Christian Wittern" . "cwittern@gmail.com")) (:maintainers ("Christian Wittern" . "cwittern@gmail.com")) (:maintainer "Christian Wittern" . "cwittern@gmail.com"))])
+ (helm-chrome . [(20160719 520) ((helm (1 5)) (cl-lib (0 3)) (emacs (24))) "Helm interface for Chrome bookmarks" tar ((:url . "https://github.com/kawabata/helm-chrome") (:commit . "fd630ace4b4b4f33355a973743bbfe0c90ce4830") (:revdesc . "fd630ace4b4b") (:keywords "tools") (:authors ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (helm-chrome-control . [(20190707 1807) ((emacs (25 1)) (helm-core (3 0))) "Control Chrome tabs with Helm (macOS only)" tar ((:url . "https://github.com/xuchunyang/helm-chrome-control") (:commit . "85c1473ef9baa43b6babe3a785a2742271069244") (:revdesc . "85c1473ef9ba"))])
+ (helm-chrome-history . [(20191031 1233) ((emacs (25 1)) (helm-core (3 0))) "Browse Chrome History with Helm" tar ((:url . "https://github.com/xuchunyang/helm-chrome-history") (:commit . "f9002d4c12df65a99830376b126dbbeae3ef2148") (:revdesc . "f9002d4c12df") (:keywords "tools") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (helm-chronos . [(20150528 2036) ((chronos (1 2)) (helm (1 7 1))) "Helm interface for chronos timers" tar ((:url . "https://github.com/dxknight/helm-chronos") (:commit . "a14fc3d65dd96ce6616234b3f7b8b08b4c1817ef") (:revdesc . "a14fc3d65dd9") (:keywords "calendar") (:authors ("David Knight" . "dxknight@opmbx.org")) (:maintainers ("David Knight" . "dxknight@opmbx.org")) (:maintainer "David Knight" . "dxknight@opmbx.org"))])
+ (helm-cider . [(20220706 944) ((emacs (26)) (cider (1 0)) (helm-core (3 7 0))) "Helm interface to CIDER" tar ((:url . "https://github.com/clojure-emacs/helm-cider") (:commit . "fe7e48befdb0b20ea1b0fb3626a8a725e54ae626") (:revdesc . "fe7e48befdb0") (:keywords "cider" "clojure" "helm" "languages") (:authors ("Tianxiang Xiong" . "tianxiang.xiong@gmail.com")) (:maintainers ("Tianxiang Xiong" . "tianxiang.xiong@gmail.com")) (:maintainer "Tianxiang Xiong" . "tianxiang.xiong@gmail.com"))])
+ (helm-cider-history . [(20150719 2120) ((helm (1 4 0)) (cider (0 9 0))) "Helm interface for cider history" tar ((:url . "https://github.com/Kungi/helm-cider-history") (:commit . "c391fcb2e162a02001605a0b9449783575a831fd") (:revdesc . "c391fcb2e162") (:keywords "convenience") (:authors ("Andreas Klein" . "git@kungi.org")) (:maintainers ("Andreas Klein" . "git@kungi.org")) (:maintainer "Andreas Klein" . "git@kungi.org"))])
+ (helm-circe . [(20160207 652) ((emacs (24)) (helm (0 0)) (circe (0 0)) (cl-lib (0 5))) "Helm circe buffer management" tar ((:url . "https://github.com/lesharris/helm-circe") (:commit . "9091651d9fdd8d49d8ff6f9dcf3a2ae416c9f15a") (:revdesc . "9091651d9fdd") (:keywords "helm" "circe") (:authors ("Les Harris" . "les@lesharris.com")) (:maintainers ("Les Harris" . "les@lesharris.com")) (:maintainer "Les Harris" . "les@lesharris.com"))])
+ (helm-clojuredocs . [(20160405 723) ((edn (1 1 2)) (helm (1 5 7))) "Search for help in clojuredocs.org" tar ((:url . "https://github.com/mbuczko/helm-clojuredocs") (:commit . "5a7f0f2cb401be0b09e73262a1c18265ab9a3cea") (:revdesc . "5a7f0f2cb401") (:keywords "helm" "clojure") (:authors ("Michal Buczko" . "michal.buczko@gmail.com")) (:maintainers ("Michal Buczko" . "michal.buczko@gmail.com")) (:maintainer "Michal Buczko" . "michal.buczko@gmail.com"))])
+ (helm-codesearch . [(20221219 1219) ((emacs (25 1)) (s (1 11 0)) (dash (2 12 0)) (helm (1 7 7)) (cl-lib (0 5))) "Helm interface for codesearch" tar ((:url . "https://github.com/youngker/helm-codesearch.el") (:commit . "bd5a7e3ece98f2940cb09be56d3e56da97d4c865") (:revdesc . "bd5a7e3ece98") (:keywords "tools") (:authors ("Youngjoo Lee" . "youngker@gmail.com")) (:maintainers ("Youngjoo Lee" . "youngker@gmail.com")) (:maintainer "Youngjoo Lee" . "youngker@gmail.com"))])
+ (helm-comint . [(20231102 2029) ((emacs (25 1)) (helm (3 9 4))) "Comint prompt navigation for helm" tar ((:url . "https://github.com/benedicthw/helm-comint.git") (:commit . "9215b2aa8f42f62cbda66a1503832abb7f491549") (:revdesc . "9215b2aa8f42") (:keywords "processes" "matching") (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainers ("Benedict Wang" . "foss@bhw.name")) (:maintainer "Benedict Wang" . "foss@bhw.name"))])
+ (helm-commandlinefu . [(20150611 545) ((emacs (24 1)) (helm (1 7 0)) (json (1 3)) (let-alist (1 0 3))) "Search and browse commandlinefu.com from helm" tar ((:url . "https://github.com/xuchunyang/helm-commandlinefu") (:commit . "9ee7e018c5db23ae9c8d1c8fa969876f15b7280d") (:revdesc . "9ee7e018c5db") (:keywords "commandlinefu.com") (:authors ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang56@gmail.com"))])
+ (helm-company . [(20231113 701) ((helm (1 5 9)) (company (0 10 0))) "Helm interface for company-mode" tar ((:url . "https://github.com/Sodel-the-Vociferous/helm-company") (:commit . "4622b82353220ee6cc33468f710fa5b6b253b7f1") (:revdesc . "4622b8235322") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Daniel Ralston" . "Sodel-the-Vociferous@users.noreply.github.com")) (:maintainer "Daniel Ralston" . "Sodel-the-Vociferous@users.noreply.github.com"))])
+ (helm-core . [(20260720 1307) ((emacs (25 1)) (async (1 9 9))) "Development files for Helm" tar ((:url . "https://emacs-helm.github.io/helm/") (:commit . "ab09703effe69217b97a2097ff3b8742bb39c6a3") (:revdesc . "ab09703effe6") (:authors ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainers ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainer "Thierry Volpiatto" . "thievol@posteo.net"))])
+ (helm-cscope . [(20190615 41) ((xcscope (1 0)) (helm (1 6 7)) (cl-lib (0 5)) (emacs (24 1))) "Helm interface for xcscope.el" tar ((:url . "https://github.com/alpha22jp/helm-cscope.el") (:commit . "af1d9e7f4460a88d7400b5a74d5da68084089ac1") (:revdesc . "af1d9e7f4460") (:keywords "cscope" "helm") (:authors ("alpha22jp" . "alpha22jp@gmail.com")) (:maintainers ("alpha22jp" . "alpha22jp@gmail.com")) (:maintainer "alpha22jp" . "alpha22jp@gmail.com"))])
+ (helm-css-scss . [(20230522 1113) ((emacs (24 3)) (helm (1 0))) "CSS/SCSS/LESS Selectors with helm interface" tar ((:url . "https://github.com/ShingoFukuyama/helm-css-scss") (:commit . "2169d83d8fdc661241df208cb3235112735d936e") (:revdesc . "2169d83d8fdc") (:keywords "convenience" "scss" "css" "less" "selector" "helm"))])
+ (helm-ctest . [(20220721 400) ((s (1 9 0)) (dash (2 11 0)) (helm-core (3 6 0))) "Run ctest from within emacs" tar ((:url . "https://github.com/danlamanna/helm-ctest") (:commit . "48edc9fa862219da34feb423c06c33d8f6d43722") (:revdesc . "48edc9fa8622") (:keywords "helm" "ctest") (:authors ("Dan LaManna" . "me@danlamanna.com")) (:maintainers ("Dan LaManna" . "me@danlamanna.com")) (:maintainer "Dan LaManna" . "me@danlamanna.com"))])
+ (helm-dash . [(20190527 1118) ((emacs (24 4)) (dash-docs (1 4 0)) (helm (1 9 2)) (cl-lib (0 5))) "Offline documentation browser for +150 APIs using Dash docsets" tar ((:url . "https://github.com/dash-docs-el/helm-dash") (:commit . "6c76c794fec95586028633f24773451812af5df4") (:revdesc . "6c76c794fec9") (:keywords "docs") (:authors ("Raimon Grau" . "raimonster@gmail.com") ("Toni Reina" . "areina0@gmail.com") ("Bryan Gilbert" . "bryan@bryan.sh")) (:maintainers ("Raimon Grau" . "raimonster@gmail.com") ("Toni Reina" . "areina0@gmail.com") ("Bryan Gilbert" . "bryan@bryan.sh")) (:maintainer "Raimon Grau" . "raimonster@gmail.com"))])
+ (helm-descbinds . [(20250705 942) ((helm (1 5))) "A convenient `describe-bindings' with `helm'" tar ((:url . "https://github.com/emacs-helm/helm-descbinds") (:commit . "0aff44badad976ebf2666a7e9b6ddf4db53e59e5") (:revdesc . "0aff44badad9") (:keywords "helm" "help") (:authors ("Taiki SUGAWARA" . "buzz.taiki@gmail.com")) (:maintainers ("Taiki SUGAWARA" . "buzz.taiki@gmail.com")) (:maintainer "Taiki SUGAWARA" . "buzz.taiki@gmail.com"))])
+ (helm-describe-modes . [(20160212 518) ((helm (1 9)) (cl-lib (0 5)) (emacs (24 1))) "Helm interface to major and minor modes" tar ((:url . "https://github.com/emacs-helm/helm-describe-modes") (:commit . "d2253c7c2bf4f28b9ff8a2d281bd7527c0106527") (:revdesc . "d2253c7c2bf4") (:keywords "docs" "convenience") (:authors ("Tianxiang Xiong" . "tianxiang.xiong@gmail.com")) (:maintainers ("Tianxiang Xiong" . "tianxiang.xiong@gmail.com")) (:maintainer "Tianxiang Xiong" . "tianxiang.xiong@gmail.com"))])
+ (helm-dictionary . [(20260611 719) ((helm (1 5 5))) "Helm source for looking up dictionaries" tar ((:url . "https://github.com/emacs-helm/helm-dictionary") (:commit . "79eb9b8b33cb3fd8228efde146e23866b4a02652") (:revdesc . "79eb9b8b33cb") (:authors ("Titus von der Malsburg" . "malsburg@posteo.de") ("Michael Heerdegen" . "michael_heerdegen@web.de")) (:maintainers ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainer "Titus von der Malsburg" . "malsburg@posteo.de"))])
+ (helm-dired-recent-dirs . [(20131228 1414) ((helm (1 0))) "Show recent dirs with helm.el support" tar ((:url . "https://github.com/zonkyy/helm-dired-recent-dirs") (:commit . "3bcd125b44f5a707588ae3868777d91192351523") (:revdesc . "3bcd125b44f5") (:keywords "helm" "dired" "zsh") (:authors ("Akisute" . "akisute3@gmail.com")) (:maintainers ("Akisute" . "akisute3@gmail.com")) (:maintainer "Akisute" . "akisute3@gmail.com"))])
+ (helm-dogears . [(20230608 356) ((emacs (26 3)) (dogears (0 1 -1)) (helm (3 6))) "Helm source for Dogears" tar ((:url . "https://github.com/alphapapa/dogears.el") (:commit . "7ba83bd8924cec66fe3ede3334e98b1845e6852e") (:revdesc . "7ba83bd8924c") (:keywords "convenience") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (helm-eca . [(20260228 137) ((emacs (28 1)) (eca (0 8 1)) (helm (3 9 0))) "Helm UI for ECA chats/workspaces" tar ((:url . "https://github.com/PalaceChan/helm-eca") (:commit . "34402f053cf6f42b77ff20bbd0891160605cc20e") (:revdesc . "34402f053cf6") (:keywords "tools" "convenience") (:authors ("PalaceChan" . "PalaceChan@users.noreply.github.com")) (:maintainers ("PalaceChan" . "PalaceChan@users.noreply.github.com")) (:maintainer "PalaceChan" . "PalaceChan@users.noreply.github.com"))])
+ (helm-elfeed . [(20251013 1740) ((emacs (29 1)) (helm (3 9 6)) (elfeed (3 4 2))) "Helm interface for Elfeed" tar ((:url . "https://codeberg.org/timmli/helm-elfeed") (:commit . "4d1c853548e3425bc72a0c2fd4be9a3672382d51") (:revdesc . "4d1c853548e3") (:keywords "matching") (:authors ("Timm Lichte" . "timm.lichte@uni-tuebingen.de")) (:maintainers ("Timm Lichte" . "timm.lichte@uni-tuebingen.de")) (:maintainer "Timm Lichte" . "timm.lichte@uni-tuebingen.de"))])
+ (helm-emmet . [(20160713 1231) ((helm (1 0)) (emmet-mode (1 0 2))) "Helm sources for emmet-mode's snippets" tar ((:url . "https://github.com/yasuyk/helm-emmet") (:commit . "f0364e736b10cf44232053a78de04133a88185ae") (:revdesc . "f0364e736b10") (:keywords "convenience" "helm" "emmet") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (helm-emms . [(20260102 537) ((helm (1 5)) (emms (6 0)) (cl-lib (0 5)) (emacs (24 1))) "Emms for Helm" tar ((:url . "https://github.com/emacs-helm/helm-emms") (:commit . "ae442c2a338c9335cd8e2b27be623b135cde6107") (:revdesc . "ae442c2a338c") (:keywords "multimedia" "emms") (:authors ("Thierry Volpiatto" . "thierry.volpiatto@gmail.com")) (:maintainers ("Thierry Volpiatto" . "thierry.volpiatto@gmail.com")) (:maintainer "Thierry Volpiatto" . "thierry.volpiatto@gmail.com"))])
+ (helm-emoji . [(20260218 1141) ((emacs (29 1)) (helm (3 9 6))) "Select emojis with Helm" tar ((:url . "https://codeberg.org/timmli/helm-emoji") (:commit . "4c125d3fc42fad0576ff653c0a45ee265498a2c6") (:revdesc . "4c125d3fc42f") (:keywords "matching") (:authors ("Timm Lichte" . "timm.lichte@uni-tuebingen.de")) (:maintainers ("Timm Lichte" . "timm.lichte@uni-tuebingen.de")) (:maintainer "Timm Lichte" . "timm.lichte@uni-tuebingen.de"))])
+ (helm-esa . [(20190721 1429) ((emacs (26 2)) (helm (3 2)) (request (0 3 0))) "Esa with helm interface" tar ((:url . "https://github.com/masutaka/emacs-helm-esa") (:commit . "d93b4af404346870cb2cf9c257d055332ef3f577") (:revdesc . "d93b4af40434") (:authors ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainers ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainer "Takashi Masuda" . "masutaka.net@gmail.com"))])
+ (helm-evil-markers . [(20200506 715) ((emacs (25 1)) (helm (2 0 0)) (evil (1 2 10))) "Show evil markers with helm" tar ((:url . "https://github.com/xueeinstein/helm-evil-markers") (:commit . "0245f0c268e0eaec85df51ab2deba7ac961f6770") (:revdesc . "0245f0c268e0") (:keywords "extensions"))])
+ (helm-eww . [(20190315 907) ((emacs (24 4)) (helm (2 8 6)) (seq (1 8))) "Helm UI wrapper for EWW" tar ((:url . "https://github.com/emacs-helm/helm-eww") (:commit . "76ba59fda8dd6f32a1bc7c6df0b43c6f76169911") (:revdesc . "76ba59fda8dd") (:keywords "helm" "packages") (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainers ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz"))])
+ (helm-ext . [(20200722 107) ((emacs (24 4)) (helm (2 5 3))) "A few extensions to Helm" tar ((:url . "https://github.com/cute-jumper/helm-ext") (:commit . "c30f7772ec577a5ce1de3215f0507826e0725a69") (:revdesc . "c30f7772ec57") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (helm-exwm . [(20210215 858) ((emacs (25 2)) (helm (2 8 5)) (exwm (0 15))) "Helm for EXWM buffers" tar ((:url . "https://github.com/emacs-helm/helm-exwm") (:commit . "5b35a42ff10fbcbf673268987df700ea6b6288e8") (:revdesc . "5b35a42ff10f") (:keywords "helm" "exwm") (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainers ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz"))])
+ (helm-firefox . [(20260826 519) ((helm (1 5)) (cl-lib (0 5)) (emacs (24 1))) "Firefox bookmarks" tar ((:url . "https://github.com/emacs-helm/helm-firefox") (:commit . "e91c290574df3ad514fc2bb3ffb3851fcadd0157") (:revdesc . "e91c290574df"))])
+ (helm-fish-completion . [(20200908 1504) ((emacs (25)) (helm (3)) (fish-completion (1 2))) "Helm interface for fish completion" tar ((:url . "https://github.com/emacs-helm/helm-fish-completion") (:commit . "2a2001b3a876da3c468ffec8935572509c485aac") (:revdesc . "2a2001b3a876") (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainers ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz"))])
+ (helm-flx . [(20221020 1739) ((emacs (24 4)) (helm (1 7 9)) (flx (0 5))) "Sort helm candidates by flx score" tar ((:url . "https://github.com/PythonNut/helm-flx") (:commit . "5220099e695a3586dba2d59640217fe378e66310") (:revdesc . "5220099e695a") (:keywords "convenience" "helm" "fuzzy" "flx") (:authors ("Jonathan Hayase" . "jonathan.hayase@gmail.com")) (:maintainers ("Jonathan Hayase" . "jonathan.hayase@gmail.com")) (:maintainer "Jonathan Hayase" . "jonathan.hayase@gmail.com"))])
+ (helm-flycheck . [(20160710 829) ((dash (2 12 1)) (flycheck (28)) (helm-core (1 9 8))) "Show flycheck errors with helm" tar ((:url . "https://github.com/yasuyk/helm-flycheck") (:commit . "a15e62a6432c165c4f2c17388686873383400d7d") (:revdesc . "a15e62a6432c") (:keywords "helm" "flycheck") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (helm-flymake . [(20240902 1133) ((helm (1 0))) "Helm sources for flymake" tar ((:url . "https://github.com/emacs-helm/helm-flymake") (:commit . "3df968f45b066bc284b0bcce718c8493104d3f3b") (:revdesc . "3df968f45b06") (:authors ("Akira Tamamori" . "tamamori5917@gmail.com")) (:maintainers ("zbelial" . "zjyzhaojiyang@gmail.com")) (:maintainer "zbelial" . "zjyzhaojiyang@gmail.com"))])
+ (helm-flyspell . [(20170210 1901) ((helm (1 6 5))) "Helm extension for correcting words with flyspell" tar ((:url . "https://github.com/pronobis/helm-flyspell") (:commit . "8d4d947c687cb650cb149aa2271ad5201ea92594") (:revdesc . "8d4d947c687c") (:keywords "convenience"))])
+ (helm-fuz . [(20200812 1222) ((emacs (25 1)) (fuz (1 4 0)) (helm (3 6))) "Integrate Helm and Fuz" tar ((:url . "https://github.com/cireu/fuz.el") (:commit . "fee874aa35d2ee6b12b836290b5c8eaa44175a28") (:revdesc . "fee874aa35d2") (:keywords "convenience") (:authors ("Zhu Zihao" . "all_but_last@163.com")) (:maintainers ("Zhu Zihao" . "all_but_last@163.com")) (:maintainer "Zhu Zihao" . "all_but_last@163.com"))])
+ (helm-fuzzier . [(20160605 2145) ((emacs (24 3)) (helm (1 7 0))) "Better fuzzy matching for Helm" tar ((:url . "https://github.com/EphramPerdition/helm-fuzzier") (:commit . "8798dcf3583b863df5b9dea7fe3b0179ba1c35bc") (:revdesc . "8798dcf3583b") (:keywords "convenience" "helm" "fuzzy"))])
+ (helm-fuzzy . [(20240101 1005) ((emacs (24 4)) (helm (1 7 9)) (flx (0 5))) "Fuzzy matching for helm source" tar ((:url . "https://github.com/jcs-elpa/helm-fuzzy") (:commit . "6ae944c04464bf5984e4180c8353c7fdcf17f672") (:revdesc . "6ae944c04464") (:keywords "matching" "fuzzy" "helm" "source") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (helm-fuzzy-find . [(20171106 400) ((emacs (24 1)) (helm (1 7 0))) "Find file using Fuzzy Search" tar ((:url . "https://github.com/xuchunyang/helm-fuzzy-find") (:commit . "de2abbf7ca13609587325bacd4a1ed4376b5c927") (:revdesc . "de2abbf7ca13") (:keywords "helm" "fuzzy" "find" "file") (:authors ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang56@gmail.com"))])
+ (helm-ghq . [(20250725 601) ((emacs (24)) (helm (3 8 0))) "Ghq with helm interface" tar ((:url . "https://github.com/masutaka/emacs-helm-ghq") (:commit . "d321d7801f8ac1af885551a5be6d39e1562e7ee2") (:revdesc . "d321d7801f8a") (:authors ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainers ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainer "Takashi Masuda" . "masutaka.net@gmail.com"))])
+ (helm-ghs . [(20170715 541) ((emacs (24)) (helm (2 2 0))) "Ghs with helm interface" tar ((:url . "https://github.com/iory/emacs-helm-ghs") (:commit . "f9d4ab80e8a33b21cd635285289ec5779bbe629f") (:revdesc . "f9d4ab80e8a3") (:authors ("iory" . "ab.ioryz@gmail.com")) (:maintainers ("iory" . "ab.ioryz@gmail.com")) (:maintainer "iory" . "ab.ioryz@gmail.com"))])
+ (helm-github-stars . [(20190428 1047) ((helm (1 6 8)) (emacs (24 4))) "Helm interface for your github's stars" tar ((:url . "https://github.com/Sliim/helm-github-stars") (:commit . "c891690218b0d8b957ea6cb45b1b6cffd15a6950") (:revdesc . "c891690218b0") (:keywords "helm" "github" "stars") (:authors ("Sliim" . "sliim@mailoo.org") ("xuchunyang" . "xuchunyang56@gmail.com")) (:maintainers ("Sliim" . "sliim@mailoo.org") ("xuchunyang" . "xuchunyang56@gmail.com")) (:maintainer "Sliim" . "sliim@mailoo.org"))])
+ (helm-gitignore . [(20230310 1829) ((git-modes (1 4 0)) (helm (1 7 0)) (request (0 1 0)) (cl-lib (0 5))) "Generate .gitignore files with gitignore.io" tar ((:url . "https://github.com/jupl/helm-gitignore") (:commit . "85c34065e6fceac8fa7287e6ec79ea3d1182d654") (:revdesc . "85c34065e6fc") (:keywords "helm" "gitignore" "gitignore.io"))])
+ (helm-gitlab . [(20180312 1647) ((s (1 9 0)) (dash (2 9 0)) (helm (1 0)) (gitlab (0 8 0))) "Helm interface to Gitlab" tar ((:url . "https://github.com/nlamirault/emacs-gitlab") (:commit . "68318aca3206d50701039c9aae39734ca29a49f9") (:revdesc . "68318aca3206") (:keywords "gitlab" "helm") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (helm-go-package . [(20161103 153) ((emacs (24 4)) (helm-core (2 2 1)) (go-mode (1 4 0)) (deferred (0 4 0))) "Helm sources for Go programming language's package" tar ((:url . "https://github.com/yasuyk/helm-go-package") (:commit . "bf741f4a455fcb129c1a9dcec710a52621f9719d") (:revdesc . "bf741f4a455f") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (helm-grepint . [(20200811 1616) ((helm (2 9 7)) (emacs (24 4))) "Generic helm interface to grep" tar ((:url . "https://github.com/kopoli/helm-grepint") (:commit . "9aec98428823b749eb14d2c8512b46b59ca9f8ca") (:revdesc . "9aec98428823") (:keywords "grep" "grepping" "searching" "helm" "tools" "convenience") (:authors ("Kalle Kankare" . "kalle.kankare@iki.fi")) (:maintainers ("Kalle Kankare" . "kalle.kankare@iki.fi")) (:maintainer "Kalle Kankare" . "kalle.kankare@iki.fi"))])
+ (helm-growthforecast . [(20140120 344) ((helm (1 5 9))) "Helm extensions for growthforecast" tar ((:url . "https://github.com/daic-h/helm-growthforecast") (:commit . "0f94ac090d6c354058ad89a86e5c18385c136d9b") (:revdesc . "0f94ac090d6c") (:authors ("Daichi Hirata" . "daichi.hirat@gmail.com")) (:maintainers ("Daichi Hirata" . "daichi.hirat@gmail.com")) (:maintainer "Daichi Hirata" . "daichi.hirat@gmail.com"))])
+ (helm-gtags . [(20260204 1753) ((emacs (27 1)) (helm (3 0))) "GNU GLOBAL helm interface" tar ((:url . "https://github.com/syohex/emacs-helm-gtags") (:commit . "bfafd3d4a7f028d42f3f46c3273eaed930269ec6") (:revdesc . "bfafd3d4a7f0") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (helm-hatena-bookmark . [(20250728 421) ((emacs (24)) (helm (2 8 2))) "Helm interface for Hatena::Bookmark" tar ((:url . "https://github.com/masutaka/emacs-helm-hatena-bookmark") (:commit . "9692659fefcb4e1a6519a0072a8bf6d766419f6b") (:revdesc . "9692659fefcb") (:authors ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainers ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainer "Takashi Masuda" . "masutaka.net@gmail.com"))])
+ (helm-hayoo . [(20151014 651) ((helm (1 6 0)) (json (1 2)) (haskell-mode (13 7))) "Source and configured helm for searching hayoo" tar ((:url . "https://github.com/markus1189/helm-hayoo") (:commit . "dd4c0c8c87521026edf1b808c4de01fa19b7c693") (:revdesc . "dd4c0c8c8752") (:keywords "helm") (:authors ("Markus Hauck" . "markus1189@gmail.com")) (:maintainers ("Markus Hauck" . "markus1189@gmail.com")) (:maintainer "Markus Hauck" . "markus1189@gmail.com"))])
+ (helm-hoogle . [(20161027 534) ((helm (1 6 2)) (emacs (24 4))) "Use helm to navigate query results from Hoogle" tar ((:url . "https://github.com/jwiegley/haskell-config") (:commit . "73969a9d46d2121a849a01a9f7ed3636d01f7bbc") (:revdesc . "73969a9d46d2") (:keywords "haskell" "programming" "hoogle") (:authors ("John Wiegley" . "jwiegley@gmail.com")) (:maintainers ("John Wiegley" . "jwiegley@gmail.com")) (:maintainer "John Wiegley" . "jwiegley@gmail.com"))])
+ (helm-hunks . [(20171217 1933) ((emacs (24 4)) (helm (1 9 8))) "A helm interface for git hunks - browsing, staging, unstaging and killing" tar ((:url . "https://github.com/torgeir/helm-hunks.el") (:commit . "6392bf716f618eac23ce81140aceb0dfacb9c6d0") (:revdesc . "6392bf716f61") (:keywords "helm" "git" "hunks" "vc") (:authors (nil . "@torgeir")) (:maintainers (nil . "@torgeir")) (:maintainer nil . "@torgeir"))])
+ (helm-idris . [(20141202 1757) ((helm (0 0 0)) (idris-mode (0 9 14))) "A Helm datasource for Idris documentation, queried from the compiler" tar ((:url . "https://github.com/david-christiansen/helm-idris") (:commit . "a2f45d6817974f318b55ad9b7fd19d5df132d47e") (:revdesc . "a2f45d681797") (:keywords "languages" "helm") (:authors ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainers ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainer "David Raymond Christiansen" . "david@davidchristiansen.dk"))])
+ (helm-img . [(20151224 2321) ((helm (1 7 7)) (cl-lib (0 5))) "Utilities for making image sources for helm" tar ((:url . "https://github.com/l3msh0/helm-img") (:commit . "aa3f8a5dce8d0413bf07584f07153a39015c2bfc") (:revdesc . "aa3f8a5dce8d") (:keywords "convenience") (:authors ("Sho Matsumoto" . "l3msh0_at_gmail.com")))])
+ (helm-img-tiqav . [(20151224 2322) ((helm-img (0 0 1))) "An helm-source for joking" tar ((:url . "https://github.com/l3msh0/helm-img") (:commit . "33a7e9508bc8f37d53320b56c92b53d321a57bb0") (:revdesc . "33a7e9508bc8") (:keywords "convenience") (:authors ("Sho Matsumoto" . "l3msh0_at_gmail.com")))])
+ (helm-ispell . [(20220721 323) ((helm-core (3 6 0))) "Ispell-complete-word with helm interface" tar ((:url . "https://github.com/syohex/emacs-helm-ispell") (:commit . "03e74ae7ebb17589a9f8860d1e2ae37f57378735") (:revdesc . "03e74ae7ebb1") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (helm-itunes . [(20151013 648) ((helm (1 6 1))) "Play local iTunes and Spotify tracks" tar ((:url . "https://github.com/daschwa/helm-itunes") (:commit . "966de755a5aadbe02311a6cef77bd4790e84c263") (:revdesc . "966de755a5aa") (:authors ("Adam Schwartz" . "adam@adamschwartz.io")) (:maintainers ("Adam Schwartz" . "adam@adamschwartz.io")) (:maintainer "Adam Schwartz" . "adam@adamschwartz.io"))])
+ (helm-j-cheatsheet . [(20170217 829) ((helm (1 5 3))) "Quick J reference for Emacs" tar ((:url . "https://github.com/abo-abo/helm-j-cheatsheet") (:commit . "6c47e7162b9ba2de4b41221d01180146973d860b") (:revdesc . "6c47e7162b9b") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (helm-jira . [(20180802 815) ((emacs (25)) (cl-lib (0 5)) (helm (1 9 9))) "Helm bindings for JIRA/Bitbucket/stash" tar ((:url . "https://github.com/DeX3/helm-jira") (:commit . "75d6ed5bd7a041fa8c1adb21cbbbe57b5a7c7cc7") (:revdesc . "75d6ed5bd7a0") (:keywords "tools" "helm" "jira" "bitbucket" "stash") (:authors ("Roman Decker" . "romandotdeckeratgmaildotcom")) (:maintainers ("Roman Decker" . "romandotdeckeratgmaildotcom")) (:maintainer "Roman Decker" . "romandotdeckeratgmaildotcom"))])
+ (helm-js-codemod . [(20190921 942) ((emacs (24 4)) (helm-core (1 9 8)) (js-codemod (1 0 0))) "A helm interface for running js-codemods" tar ((:url . "https://github.com/torgeir/helm-js-codemod.el") (:commit . "1df8583fafadf8c8c5ceb2aecaa815a2a4152686") (:revdesc . "1df8583fafad") (:keywords "helm" "js" "codemod" "region") (:authors ("Torgeir Thoresen" . "@torgeir")) (:maintainers ("Torgeir Thoresen" . "@torgeir")) (:maintainer "Torgeir Thoresen" . "@torgeir"))])
+ (helm-jstack . [(20150603 422) ((emacs (24)) (helm (1 7 0)) (cl-lib (0 5))) "Helm interface to Jps & Jstack for Java/JVM processes" tar ((:url . "https://github.com/raghavgautam/helm-jstack") (:commit . "aab0fd9f14794ae3a6e7cfbe7f6a81842ce4c23b") (:revdesc . "aab0fd9f1479") (:keywords "java" "jps" "jstack" "jvm" "emacs" "elisp" "helm") (:authors ("Raghav Kumar Gautam" . "rgautam@apache.com")) (:maintainers ("Raghav Kumar Gautam" . "rgautam@apache.com")) (:maintainer "Raghav Kumar Gautam" . "rgautam@apache.com"))])
+ (helm-kythe . [(20170709 726) ((emacs (25)) (dash (2 12 0)) (helm (2 0))) "Google Kythe helm interface" tar ((:url . "https://github.com/MaskRay/emacs-helm-kythe") (:commit . "eabbef4948f8ec7c7b2fac498e9145dfdb10ca82") (:revdesc . "eabbef4948f8") (:authors ("Fangrui Song" . "i@maskray.me")) (:maintainers ("Fangrui Song" . "i@maskray.me")) (:maintainer "Fangrui Song" . "i@maskray.me"))])
+ (helm-lastpass . [(20180722 806) ((emacs (25 1)) (helm (2 0)) (csv (2 1))) "Helm interface of LastPass" tar ((:url . "https://github.com/xuchunyang/helm-lastpass") (:commit . "82e1ffb6ae77d9d9e29c398eb013cd20ce963f77") (:revdesc . "82e1ffb6ae77") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (helm-lib-babel . [(20180510 1324) ((cl-lib (0 5)) (helm (1 9 2)) (emacs (24 4))) "Helm insertion of babel function references" tar ((:url . "https://github.com/dfeich/helm-lib-babel.el") (:commit . "41bc0cdea8a604c6c8dc83ed5066644d33688fad") (:revdesc . "41bc0cdea8a6") (:keywords "convenience") (:authors ("Derek Feichtinger" . "dfeich@gmail.com")) (:maintainers ("Derek Feichtinger" . "dfeich@gmail.com")) (:maintainer "Derek Feichtinger" . "dfeich@gmail.com"))])
+ (helm-lines . [(20220103 1909) ((emacs (24 4)) (helm (1 9 8))) "A helm interface for completing by lines" tar ((:url . "https://github.com/torgeir/helm-lines.el/") (:commit . "f5ad178818d223f32a0bf60d370b50c01df5f3da") (:revdesc . "f5ad178818d2") (:keywords "files" "helm" "rg" "ag" "pt" "vc" "git" "lines" "complete" "tools" "languages") (:authors (nil . "@torgeir")) (:maintainers (nil . "@torgeir")) (:maintainer nil . "@torgeir"))])
+ (helm-lobsters . [(20230820 1403) ((helm (1 0)) (cl-lib (0 5))) "Helm front-end for lobste.rs" tar ((:url . "https://github.com/julienXX/helm-lobste.rs") (:commit . "3a1af0d063ca24fe0187daff12110171b942c7d3") (:revdesc . "3a1af0d063ca") (:authors ("Julien BLANCHARD" . "julien@sideburns.eu")) (:maintainers ("Julien BLANCHARD" . "julien@sideburns.eu")) (:maintainer "Julien BLANCHARD" . "julien@sideburns.eu"))])
+ (helm-ls-git . [(20260105 455) ((helm (3 9 5)) (emacs (25 3))) "The git project manager for helm" tar ((:url . "https://github.com/emacs-helm/helm-ls-git") (:commit . "dd0ed5847d4bf1b27e767cf194475ada88ee8898") (:revdesc . "dd0ed5847d4b") (:keywords "helm" "convenience" "vc" "files" "buffers" "completion" "diff" "log" "git"))])
+ (helm-ls-hg . [(20150909 543) ((helm (1 7 8))) "List hg files in hg project" tar ((:url . "https://github.com/emacs-helm/helm-ls-hg") (:commit . "61b91a22fcfb62d0fc56e361ec01ce96973c7165") (:revdesc . "61b91a22fcfb"))])
+ (helm-ls-svn . [(20190316 2203) ((emacs (24 1)) (helm (1 7 0)) (cl-lib (0 5))) "Helm extension to list svn files" tar ((:url . "https://svn.macports.org/repository/macports/users/chunyang/helm-ls-svn.el/helm-ls-svn.el") (:commit . "a6043e1187282f649e2cb9f0e722a42daf41294b") (:revdesc . "a6043e118728") (:keywords "helm" "svn") (:authors ("Chunyang Xu" . "chunyang@macports.org")) (:maintainers ("Chunyang Xu" . "chunyang@macports.org")) (:maintainer "Chunyang Xu" . "chunyang@macports.org"))])
+ (helm-lsp . [(20260507 1749) ((emacs (29 1)) (dash (2 14 1)) (lsp-mode (5 0)) (helm (2 0))) "LSP helm integration" tar ((:url . "https://github.com/emacs-lsp/helm-lsp") (:commit . "056bb16b5f69137218613b7558b477f6b21f22be") (:revdesc . "056bb16b5f69") (:keywords "languages" "debug") (:authors ("Ivan Yonchovski" . "yyoncho@gmail.com")) (:maintainers ("Ivan Yonchovski" . "yyoncho@gmail.com")) (:maintainer "Ivan Yonchovski" . "yyoncho@gmail.com"))])
+ (helm-lxc . [(20200323 816) ((emacs (25)) (cl-lib (0 5)) (helm (2 9 4)) (lxc-tramp (0 2 0))) "Helm interface to manage LXC containers" tar ((:url . "https://github.com/montag451/helm-lxc") (:commit . "37fe2d7ed97967edf59a3b68b1434910516ae24f") (:revdesc . "37fe2d7ed979") (:keywords "helm" "lxc" "convenience"))])
+ (helm-make . [(20200620 27) nil "Select a Makefile target with helm" tar ((:url . "https://github.com/abo-abo/helm-make") (:commit . "ebd71e85046d59b37f6a96535e01993b6962c559") (:revdesc . "ebd71e85046d") (:keywords "makefile") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (helm-mode-manager . [(20210108 2330) ((helm (1 5 3))) "Select and toggle major and minor modes with helm" tar ((:url . "https://github.com/istib/helm-mode-manager") (:commit . "7df8ed3ddd46a0402838b748d317c01454346164") (:revdesc . "7df8ed3ddd46"))])
+ (helm-mt . [(20160918 452) ((emacs (24)) (helm (0 0)) (multi-term (0 0)) (cl-lib (0 5))) "Helm multi-term management" tar ((:url . "https://github.com/dfdeshom/helm-mt") (:commit . "d2bff4100118483bc398c56d0ff095294209265b") (:revdesc . "d2bff4100118") (:keywords "helm" "multi-term") (:authors ("Didier Deshommes" . "dfdeshom@gmail.com")) (:maintainers ("Didier Deshommes" . "dfdeshom@gmail.com")) (:maintainer "Didier Deshommes" . "dfdeshom@gmail.com"))])
+ (helm-mu . [(20251128 1556) ((helm (1 5 5))) "Helm search for e-mails and contacts in mu4e" tar ((:url . "https://github.com/emacs-helm/helm-mu") (:commit . "8275efff2c5e41da1264f9b261b93afc116c32a5") (:revdesc . "8275efff2c5e") (:authors ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainers ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainer "Titus von der Malsburg" . "malsburg@posteo.de"))])
+ (helm-navi . [(20230517 1143) ((emacs (24 4)) (helm (1 9 4)) (helm-org (1 0)) (navi-mode (2 0)) (s (1 10 0))) "Helm for navi-mode" tar ((:url . "https://github.com/emacs-helm/helm-navi") (:commit . "cc3f9a0fad6301f7bb717a8dbde4087fd9a884f6") (:revdesc . "cc3f9a0fad63") (:keywords "navigation" "outlines") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (helm-nixos-options . [(20151013 2309) ((nixos-options (0 0 1)) (helm (1 5 6))) "Helm Interface for nixos-options" tar ((:url . "http://www.github.com/travisbhartwell/nix-emacs/") (:commit . "f7709bb007ebafb4d6b32778c7764e2c44e0420d") (:revdesc . "f7709bb007eb") (:keywords "unix") (:authors ("Diego Berrocal" . "cestdiego@gmail.com") ("Travis B. Hartwell" . "nafai@travishartwell.net")) (:maintainers ("Diego Berrocal" . "cestdiego@gmail.com") ("Travis B. Hartwell" . "nafai@travishartwell.net")) (:maintainer "Diego Berrocal" . "cestdiego@gmail.com"))])
+ (helm-notmuch . [(20190320 1048) ((helm (1 9 3)) (notmuch (0 21))) "Search emails with Notmuch and Helm" tar ((:url . "https://github.com/emacs-helm/helm-notmuch") (:commit . "97a01497e079a7b6505987e9feba6b603bbec288") (:revdesc . "97a01497e079") (:keywords "mail") (:authors ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainers ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainer "Chunyang Xu" . "mail@xuchunyang.me"))])
+ (helm-open-github . [(20220721 415) ((emacs (24 4)) (helm-core (3 6 0)) (gh (0 8 2))) "Utilities of Opening Github Page" tar ((:url . "https://github.com/syohex/emacs-helm-open-github") (:commit . "5e6d700d1b484bd6cd44bc30674e96d157870c3f") (:revdesc . "5e6d700d1b48") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (helm-org . [(20250405 1720) ((helm (4 0 2)) (emacs (25 1))) "Helm for org headlines and keywords completion" tar ((:url . "https://github.com/emacs-helm/helm-org") (:commit . "4744ca7f8b35e17bafce9cb0093deb87a232699d") (:revdesc . "4744ca7f8b35") (:authors ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainers ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainer "Thierry Volpiatto" . "thievol@posteo.net"))])
+ (helm-org-multi-wiki . [(20210228 1853) ((emacs (26 1)) (org (9 3)) (org-multi-wiki (0 4)) (org-ql (0 5)) (dash (2 18)) (helm-org-ql (0 5)) (helm (3 5))) "Helm interface to org-multi-wiki" tar ((:url . "https://github.com/akirak/org-multi-wiki") (:commit . "c85bcaafed749de3efa5e1f4d256e7ac9c5678e2") (:revdesc . "c85bcaafed74") (:keywords "org" "outlines") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (helm-org-ql . [(20240613 355) ((emacs (26 1)) (compat (29 1 4 5)) (dash (2 18 1)) (s (1 12 0)) (helm-org (1 0)) (org-ql (0 6 -1))) "Helm support for org-ql" tar ((:url . "https://github.com/alphapapa/org-ql") (:commit . "f7c3a61e32e8da62da1e69a2a79ec5b333a7d1f5") (:revdesc . "f7c3a61e32e8") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (helm-org-recent-headings . [(20211011 1519) ((emacs (26 1)) (org (9 0 5)) (dash (2 18 0)) (helm (1 9 4)) (org-recent-headings (0 2 -1)) (s (1 12 0))) "Helm source for org-recent-headings" tar ((:url . "https://github.com/alphapapa/org-recent-headings") (:commit . "97418d581ea030f0718794e50b005e9bae44582e") (:revdesc . "97418d581ea0") (:keywords "hypermedia" "outlines" "org") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (helm-org-rifle . [(20230821 1927) ((emacs (24 4)) (dash (2 12)) (f (0 18 1)) (helm (1 9 4)) (s (1 10 0))) "Rifle through your Org files" tar ((:url . "https://github.com/alphapapa/helm-org-rifle") (:commit . "03a52265040b8c6510a8269213d750c451779c38") (:revdesc . "03a52265040b") (:keywords "hypermedia" "outlines") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (helm-orgcard . [(20220721 756) ((helm-core (3 6 0))) "Browse the orgcard by helm" tar ((:url . "https://github.com/emacs-jp/helm-orgcard") (:commit . "d58d35627bb1714bb2cb095f696706b6881233ed") (:revdesc . "d58d35627bb1") (:keywords "convenience" "helm" "org") (:authors ("Yuhei Maeda" . "yuhei.maeda_at_gmail.com")))])
+ (helm-osx-app . [(20190717 958) ((emacs (25 1)) (helm-core (3 0))) "Launch macOS apps with helm" tar ((:url . "https://github.com/xuchunyang/helm-osx-app") (:commit . "634ed5d721a20af265825a018e9df3ee6640daee") (:revdesc . "634ed5d721a2"))])
+ (helm-pages . [(20161121 226) ((helm (1 6 5)) (emacs (24)) (cl-lib (0 5))) "Pages in current buffer as Helm datasource" tar ((:url . "https://github.com/david-christiansen/helm-pages") (:commit . "51dcb9374d1df9feaae85e60cfb39b970554ecba") (:revdesc . "51dcb9374d1d") (:keywords "convenience" "helm" "outlines") (:authors ("David Christiansen" . "david@davidchristiansen.dk")) (:maintainers ("David Christiansen" . "david@davidchristiansen.dk")) (:maintainer "David Christiansen" . "david@davidchristiansen.dk"))])
+ (helm-pass . [(20210221 1655) ((emacs (25)) (helm (0)) (password-store (0)) (auth-source-pass (4 0 0))) "Helm interface of pass, the standard Unix password manager" tar ((:url . "https://github.com/emacs-helm/helm-pass") (:commit . "4ce46f1801f2e76e53482c65aa0619d427a3fbf9") (:revdesc . "4ce46f1801f2") (:authors ("J. Alexander Branham" . "branham@utexas.edu")) (:maintainers ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz"))])
+ (helm-perldoc . [(20220721 431) ((helm-core (3 6 0)) (deferred (0 3 1)) (emacs (24 4))) "Perldoc with helm interface" tar ((:url . "https://github.com/syohex/emacs-helm-perldoc") (:commit . "affbf0f7357e5e0b33dab74d7193c91632d59b78") (:revdesc . "affbf0f7357e") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (helm-perspeen . [(20170228 1345) ((perspeen (0 1 0)) (helm (2 5 0))) "Helm interface for perspeen" tar ((:url . "https://github.com/jimo1001/helm-perspeen") (:commit . "7fe2922d85608bfa9e18269fc44181428b8849ff") (:revdesc . "7fe2922d8560") (:keywords "projects" "lisp"))])
+ (helm-phpunit . [(20160513 853) ((helm (1 9 5)) (phpunit (0 7 0))) "Helm integration for phpunit.el" tar ((:url . "https://github.com/eric-hansen/phpunit-helm") (:commit . "739f26204ad2ba76c25f45e8eab1e5216f7c3518") (:revdesc . "739f26204ad2") (:keywords "phpunit" "helm" "php") (:authors ("Eric Hansen" . "hansen.c.eric@gmail.com")) (:maintainers ("Eric Hansen" . "hansen.c.eric@gmail.com")) (:maintainer "Eric Hansen" . "hansen.c.eric@gmail.com"))])
+ (helm-proc . [(20241230 1732) ((helm (1 6 0)) (cl-lib (0 5))) "Helm interface for managing system processes" tar ((:url . "https://github.com/markus1189/helm-proc") (:commit . "86265218415c7b26cdc3c25de03d063196ba566a") (:revdesc . "86265218415c") (:keywords "helm") (:authors ("Markus Hauck" . "markus1189@gmail.com")) (:maintainers ("Markus Hauck" . "markus1189@gmail.com")) (:maintainer "Markus Hauck" . "markus1189@gmail.com"))])
+ (helm-project . [(20230608 1212) ((emacs (28 1)) (helm (3 9 0))) "Helm source for project management" tar ((:url . "https://github.com/cmccloud/helm-project") (:commit . "1e0cd563b2470ab7dbfc47a8cbe7dafd030dce70") (:revdesc . "1e0cd563b247"))])
+ (helm-project-persist . [(20151210 1543) ((helm (1 5 2)) (project-persist (0 1 4))) "Helm integration for project-persist package" tar ((:url . "https://github.com/Sliim/helm-project-persist") (:commit . "357950fbac18090985a750e40d5d8b10ee9dcd53") (:revdesc . "357950fbac18") (:keywords "project-persist" "project" "helm") (:authors ("Sliim" . "sliim@mailoo.org")) (:maintainers ("Sliim" . "sliim@mailoo.org")) (:maintainer "Sliim" . "sliim@mailoo.org"))])
+ (helm-projectile . [(20260724 27) ((emacs (28 1)) (helm (3 0)) (projectile (3 3 0))) "Helm integration for Projectile" tar ((:url . "https://github.com/bbatsov/helm-projectile") (:commit . "4dae1d072cc2650749846cfcab1f60686471cc45") (:revdesc . "4dae1d072cc2") (:keywords "project" "convenience"))])
+ (helm-prosjekt . [(20140129 717) ((prosjekt (0 3)) (helm (1 5 9))) "Helm integration for prosjekt" tar ((:url . "https://github.com/abingham/prosjekt") (:commit . "f94f970c2d375e0973b66ba99b29c7aa42fd550f") (:revdesc . "f94f970c2d37") (:authors ("Sohail Somani" . "sohail@taggedtype.net")) (:maintainers ("Sohail Somani" . "sohail@taggedtype.net")) (:maintainer "Sohail Somani" . "sohail@taggedtype.net"))])
+ (helm-purpose . [(20170114 1636) ((emacs (24)) (helm (1 9 2)) (window-purpose (1 4))) "Helm Interface for Purpose" tar ((:url . "https://github.com/bmag/helm-purpose") (:commit . "9ff4c21c1e9ebc7afb851b738f815df7343bb287") (:revdesc . "9ff4c21c1e9e"))])
+ (helm-pydoc . [(20220721 433) ((helm-core (3 6 0)) (emacs (24 4))) "Pydoc with helm interface" tar ((:url . "https://github.com/syohex/emacs-helm-pydoc") (:commit . "cac7b8953adcab85e898bc42b699c3afde5d33c6") (:revdesc . "cac7b8953adc") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (helm-qiita . [(20190526 1359) ((emacs (24)) (helm (2 8 2))) "Qiita with helm interface" tar ((:url . "https://github.com/masutaka/emacs-helm-qiita") (:commit . "5f82010c595f8e122aa3f68148ba8d8ccb1333d8") (:revdesc . "5f82010c595f") (:authors ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainers ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainer "Takashi Masuda" . "masutaka.net@gmail.com"))])
+ (helm-rage . [(20240202 822) ((helm (1 9 8)) (emacs (24 4)) (dash (2 13 0)) (s (1 11 0))) "Helm command for rage characters" tar ((:url . "https://github.com/bomgar/helm-rage") (:commit . "5b5316b92fd2b5319f7296c7ccaa93d471935076") (:revdesc . "5b5316b92fd2") (:keywords "helm" "rage" "meme"))])
+ (helm-rails . [(20130424 1519) ((helm (1 5 1)) (inflections (1 1))) "Helm extension for Rails projects" tar ((:url . "https://github.com/asok/helm-rails") (:commit . "723c2a27f3843570ec1039e3c526953e48b4ed40") (:revdesc . "723c2a27f384") (:keywords "helm" "rails" "git") (:authors ("Adam Sokolnicki" . "adam.sokolnicki@gmail.com")) (:maintainers ("Adam Sokolnicki" . "adam.sokolnicki@gmail.com")) (:maintainer "Adam Sokolnicki" . "adam.sokolnicki@gmail.com"))])
+ (helm-raindrop . [(20260818 1217) ((emacs (29 1)) (helm (4 0 4)) (request (0 3 2))) "Raindrop.io with helm interface" tar ((:url . "https://github.com/masutaka/emacs-helm-raindrop") (:commit . "ebfe81d19c3d4b84564c38add1093e5b71d72c2e") (:revdesc . "ebfe81d19c3d") (:authors ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainers ("Takashi Masuda" . "masutaka.net@gmail.com")) (:maintainer "Takashi Masuda" . "masutaka.net@gmail.com"))])
+ (helm-rdefs . [(20161130 536) ((emacs (24)) (helm (1 6 4))) "Rdefs with helm interface" tar ((:url . "https://github.com/saidie/helm-rdefs") (:commit . "cd3a6b3af3015ee58ef30cb7c81c79ebe5fc867b") (:revdesc . "cd3a6b3af301") (:keywords "matching" "tools") (:authors ("Hiroshi Saito" . "monodie@gmail.com")) (:maintainers ("Hiroshi Saito" . "monodie@gmail.com")) (:maintainer "Hiroshi Saito" . "monodie@gmail.com"))])
+ (helm-recoll . [(20220920 1206) ((helm (3 3)) (emacs (24 4))) "Helm interface for the recoll desktop search tool" tar ((:url . "https://github.com/emacs-helm/helm-recoll") (:commit . "c054047ecca360c3e02281d8d0c021f654e63f37") (:revdesc . "c054047ecca3") (:keywords "convenience") (:authors ("Thierry Volpiatto" . "thierry.volpiattoatgmail.com")) (:maintainers ("Joe Bloggs" . "vapniksatyahoo.com") ("Michael Heerdegen" . "michael_heerdegenatweb.de") ("Cayetano Santos" . "cayetanosantosatgmail.com")) (:maintainer "Joe Bloggs" . "vapniksatyahoo.com"))])
+ (helm-rg . [(20200721 725) ((emacs (25)) (cl-lib (0 5)) (dash (2 13 0)) (helm (2 8 8))) "A helm interface to ripgrep" tar ((:url . "https://github.com/cosmicexplorer/helm-rg") (:commit . "ee0a3c09da0c843715344919400ab0a0190cc9dc") (:revdesc . "ee0a3c09da0c") (:keywords "find" "file" "files" "helm" "fast" "rg" "ripgrep" "grep" "search" "match"))])
+ (helm-rhythmbox . [(20160524 1158) ((helm (1 5 0)) (cl-lib (0 5))) "Control Rhythmbox's play queue via Helm" tar ((:url . "https://github.com/mrBliss/helm-rhythmbox") (:commit . "c92e1ded34ddd4e62e7e9a558259c232e05193fa") (:revdesc . "c92e1ded34dd") (:authors ("Thomas Winant" . "dewinant@gmail.com")) (:maintainers ("Thomas Winant" . "dewinant@gmail.com")) (:maintainer "Thomas Winant" . "dewinant@gmail.com"))])
+ (helm-roam . [(20240723 1443) ((emacs (24 1)) (org (9 3)) (helm (3 9 9)) (org-roam (2 2 2))) "Helm command for org-roam" tar ((:url . "https://github.com/vhqr0/helm-roam") (:commit . "85222a9ea50c69b18c1e31a66cc70adb851967d5") (:revdesc . "85222a9ea50c") (:keywords "org-mode" "roam" "helm" "convenience") (:authors ("VHQR" . "zq_cmd@163.com")) (:maintainers ("VHQR" . "zq_cmd@163.com")) (:maintainer "VHQR" . "zq_cmd@163.com"))])
+ (helm-robe . [(20151209 355) ((helm (1 7 7))) "Completing read function for robe" tar ((:url . "https://github.com/syohex/emacs-helm-robe") (:commit . "7348d0bc0251b51979554ea678b970fd01c0efe9") (:revdesc . "7348d0bc0251") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (helm-ros . [(20160812 1752) ((helm (1 9 9)) (xterm-color (1 0)) (cl-lib (0 5))) "Interfaces ROS with helm" tar ((:url . "https://www.github.com/davidlandry93/helm-ros") (:commit . "92b0b215f6a017f0f57f1af15466cc0b2a5a0135") (:revdesc . "92b0b215f6a0") (:keywords "helm" "ros") (:authors ("David Landry" . "davidlandry93@gmail.com")) (:maintainers ("David Landry" . "davidlandry93@gmail.com")) (:maintainer "David Landry" . "davidlandry93@gmail.com"))])
+ (helm-rtags . [(20250801 1647) ((helm (2 0)) (rtags (2 10))) "A front-end for rtags" tar ((:url . "https://github.com/Andersbakken/rtags") (:commit . "dd6b20f7e57a30f32a8ccbb6c22038383dba746b") (:revdesc . "dd6b20f7e57a") (:authors ("Jan Erik Hanssen" . "jhanssen@gmail.com") ("Anders Bakken" . "agbakken@gmail.com")) (:maintainers ("Jan Erik Hanssen" . "jhanssen@gmail.com") ("Anders Bakken" . "agbakken@gmail.com")) (:maintainer "Jan Erik Hanssen" . "jhanssen@gmail.com"))])
+ (helm-rubygems-local . [(20130712 111) ((helm (1 5 3))) "Installed local rubygems find-file for helm" tar ((:url . "https://github.com/f-kubotar/helm-rubygems-local") (:commit . "289cb33d41c703af9791d6da46b55f070013c2e3") (:revdesc . "289cb33d41c7") (:authors ("hadashiA" . "dev@hadashikick.jp")) (:maintainers ("hadashiA" . "dev@hadashikick.jp")) (:maintainer "hadashiA" . "dev@hadashikick.jp"))])
+ (helm-safari . [(20160404 324) ((helm (1 9 1)) (emacs (24))) "Browse your Safari bookmarks and history" tar ((:url . "https://github.com/xuchunyang/helm-safari") (:commit . "664c7f4488829228eed7e90cd53002e14bec555b") (:revdesc . "664c7f448882") (:keywords "tools") (:authors ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang56@gmail.com"))])
+ (helm-sage . [(20160514 745) ((cl-lib (0 5)) (helm (1 5 6)) (sage-shell-mode (0 1 0))) "A helm extension for sage-shell-mode" tar ((:url . "https://github.com/stakemori/helm-sage") (:commit . "f14e9281d8f2162df7d8f9c2ad9ad1248a24803b") (:revdesc . "f14e9281d8f2") (:keywords "sage" "math" "helm") (:authors ("Sho Takemori" . "stakemorii@gmail.com")) (:maintainers ("Sho Takemori" . "stakemorii@gmail.com")) (:maintainer "Sho Takemori" . "stakemorii@gmail.com"))])
+ (helm-searcher . [(20251231 1623) ((emacs (25 1)) (helm (2 0)) (searcher (0 1 8))) "Helm interface to use searcher" tar ((:url . "https://github.com/emacs-helm/helm-searcher") (:commit . "f81955c7197cdaaf96e4b643f1946d54912d6b8a") (:revdesc . "f81955c7197c") (:keywords "convenience" "replace" "grep" "ag" "rg") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (helm-selected . [(20171223 210) ((emacs (24 4)) (helm (2 8 6)) (selected (1 1))) "Helm extension for selected.el" tar ((:url . "https://github.com/takaxp/helm-selected") (:commit . "d2609cdfce14052ab2d9c23761d4fe56966a8ed1") (:revdesc . "d2609cdfce14") (:keywords "extensions" "convenience") (:authors ("Takaaki ISHIKAWA" . "takaxpatieeedotorg")) (:maintainers ("Takaaki ISHIKAWA" . "takaxpatieeedotorg")) (:maintainer "Takaaki ISHIKAWA" . "takaxpatieeedotorg"))])
+ (helm-sheet . [(20130630 1239) ((helm (1 0))) "Helm sources for sheet" tar ((:url . "https://github.com/yasuyk/helm-sheet") (:commit . "d360b68d0ddb09aa1854e7b2f3cb39caeee26463") (:revdesc . "d360b68d0ddb") (:keywords "helm" "sheet") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (helm-slime . [(20191016 1601) ((emacs (25)) (helm (3 2)) (slime (2 18)) (cl-lib (0 5))) "Helm-sources and some utilities for SLIME" tar ((:url . "https://github.com/emacs-helm/helm-slime") (:commit . "7886cc49906a87ebd73be3b71f5dd6b1433a9b7b") (:revdesc . "7886cc49906a") (:keywords "convenience" "helm" "slime") (:authors ("Takeshi Banse" . "takebi@laafc.net")) (:maintainers ("Takeshi Banse" . "takebi@laafc.net")) (:maintainer "Takeshi Banse" . "takebi@laafc.net"))])
+ (helm-sly . [(20210205 1424) ((emacs (25 1)) (helm (3 2)) (cl-lib (0 5)) (sly (0 0))) "Helm sources and some utilities for SLY" tar ((:url . "https://github.com/emacs-helm/helm-sly") (:commit . "3691626c80620e992a338c3222283d9149f1ecb5") (:revdesc . "3691626c8062") (:keywords "convenience" "helm" "sly" "lisp") (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainers ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz"))])
+ (helm-smex . [(20171004 2008) ((emacs (24)) (smex (3 0)) (helm (1 7 7))) "Helm interface for smex" tar ((:url . "https://github.com/ptrv/helm-smex") (:commit . "2269375dfa452b88b5170d1a5d5849ebb2c1e413") (:revdesc . "2269375dfa45") (:keywords "convenience") (:authors ("Peter Vasil" . "mail@petervasil.net")) (:maintainers ("Peter Vasil" . "mail@petervasil.net")) (:maintainer "Peter Vasil" . "mail@petervasil.net"))])
+ (helm-spaces . [(20161001 1409) ((helm-core (2 2)) (spaces (0 1 0))) "Helm sources for spaces" tar ((:url . "https://github.com/yasuyk/helm-spaces") (:commit . "877e2b5178926308d6a7c2a37477bb12c33a96d4") (:revdesc . "877e2b517892") (:keywords "helm" "frames" "convenience") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (helm-spotify . [(20160905 2147) ((helm (0 0 0)) (multi (2 0 0))) "Control Spotify with Helm" tar ((:url . "https://github.com/krisajenkins/helm-spotify") (:commit . "f7a62d1ff88e3127de9be7cd3e818b0a92268ab3") (:revdesc . "f7a62d1ff88e") (:keywords "helm" "spotify") (:authors ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainers ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainer "Kris Jenkins" . "krisajenkins@gmail.com"))])
+ (helm-spotify-plus . [(20190913 2236) ((emacs (24 4)) (helm (2 0 0)) (multi (2 0 1))) "Control Spotify search and select music with Helm" tar ((:url . "https://github.com/wandersoncferreira/helm-spotify-plus") (:commit . "c3922ec368250965e483876cde5880d88a40a71b") (:revdesc . "c3922ec36825") (:authors ("Wanderson Ferreira and Luis Moneda" . "https://github.com/lgmoneda")) (:maintainers ("Wanderson Ferreira and Luis Moneda" . "https://github.com/lgmoneda")) (:maintainer "Wanderson Ferreira and Luis Moneda" . "https://github.com/lgmoneda"))])
+ (helm-sql-connect . [(20170319 1251) ((helm (0 0 0))) "Choose a database to connect to via Helm" tar ((:url . "https://github.com/eric-hansen/helm-sql-connect") (:commit . "5aead55b6f8636140945714d8c332b287ab9ef10") (:revdesc . "5aead55b6f86") (:keywords "tools" "convenience" "comm") (:authors ("Eric Hansen" . "hansen.c.eric@gmail.com")) (:maintainers ("Eric Hansen" . "hansen.c.eric@gmail.com")) (:maintainer "Eric Hansen" . "hansen.c.eric@gmail.com"))])
+ (helm-switch-shell . [(20210713 1440) ((emacs (25 1)) (helm (2 8 8))) "A Helm source for switching between shell buffers" tar ((:url . "https://github.com/jamesnvc/helm-switch-shell") (:commit . "8d7ba1d99ff12a8f1d6ce3b9684ae8aebf494cf3") (:revdesc . "8d7ba1d99ff1") (:keywords "matching" "processes" "terminals" "tools") (:authors ("James N. V. Cash" . "james.cash@occasionallycogent.com")) (:maintainers ("James N. V. Cash" . "james.cash@occasionallycogent.com")) (:maintainer "James N. V. Cash" . "james.cash@occasionallycogent.com"))])
+ (helm-switch-to-repl . [(20210206 844) ((emacs (26 1)) (helm (3))) "Helm action to switch directory in REPLs" tar ((:url . "https://github.com/emacs-helm/helm-switch-to-repl") (:commit . "f0e732e7217fc0373b0805245fa15920cf676619") (:revdesc . "f0e732e7217f") (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainers ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz"))])
+ (helm-system-packages . [(20260411 501) ((emacs (24 4)) (helm (2 8 7)) (seq (1 8))) "Helm UI wrapper for system package managers" tar ((:url . "https://github.com/emacs-helm/helm-system-packages") (:commit . "ca29a21bb9177ebdb3f0d81a22b80d747d916335") (:revdesc . "ca29a21bb917") (:keywords "helm" "packages") (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainers ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz"))])
+ (helm-systemd . [(20210105 542) ((emacs (24 4)) (helm (1 9 2)) (with-editor (2 5 0))) "Helm's systemd interface" tar ((:url . "https://github.com/Lompik/helm-systemd") (:commit . "8b26ab2d3a5b08c1e03c9312818512d7492bbc9a") (:revdesc . "8b26ab2d3a5b") (:keywords "convenience") (:authors (nil . "lompik@oriontabArch")) (:maintainers (nil . "lompik@oriontabArch")) (:maintainer nil . "lompik@oriontabArch"))])
+ (helm-tail . [(20220726 947) ((emacs (25 1)) (helm (2 7 0))) "Read recent output from various sources" tar ((:url . "https://github.com/akirak/helm-tail") (:commit . "8dc44a87fa1a52199e43b73b55c8ef8fe8069e79") (:revdesc . "8dc44a87fa1a") (:keywords "maint" "tools") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (helm-taskswitch . [(20250805 2318) ((emacs (24)) (helm (3 0))) "Use helm to switch windows and buffers" tar ((:url . "https://github.com/bdc34/helm-taskswitch") (:commit . "11e84316b9db96b19bf1d4038e85bbc26017f302") (:revdesc . "11e84316b9db") (:keywords "frames") (:authors ("Brian Caruso" . "briancaruso@gmail.com")) (:maintainers ("Brian Caruso" . "briancaruso@gmail.com")) (:maintainer "Brian Caruso" . "briancaruso@gmail.com"))])
+ (helm-tramp . [(20230714 1053) ((emacs (24 3)) (helm (2 0))) "Tramp helm interface for ssh, docker, vagrant" tar ((:url . "https://github.com/masasam/emacs-helm-tramp") (:commit . "6683eae65a106d5afd5575b2b05cdb5529ddc926") (:revdesc . "6683eae65a10"))])
+ (helm-tree-sitter . [(20220328 1345) ((emacs (25 1)) (helm (3 6 2)) (tree-sitter (0 16 1))) "Helm interface for tree-sitter" tar ((:url . "https://github.com/Giedriusj1/helm-tree-sitter") (:commit . "ef5209bd1deb56d6cab7a26e6d55615161f2115a") (:revdesc . "ef5209bd1deb") (:authors ("Giedrius Jonikas" . "giedriusj1@gmail.com")) (:maintainers ("Giedrius Jonikas" . "giedriusj1@gmail.com")) (:maintainer "Giedrius Jonikas" . "giedriusj1@gmail.com"))])
+ (helm-twitch . [(20220420 1625) ((dash (2 11 0)) (helm (1 5)) (emacs (24)) (twitch-api (20210809 1641)) (streamlink (20210811 1429))) "Navigate Twitch.tv via `helm'" tar ((:url . "https://github.com/BenediktBroich/helm-twitch") (:commit . "27fbec24cc250d508cd2f4286da16262752908eb") (:revdesc . "27fbec24cc25") (:keywords "helm" "twitch" "games") (:authors ("Aaron Jacobs" . "atheriel@gmail.com")) (:maintainers ("Aaron Jacobs" . "atheriel@gmail.com")) (:maintainer "Aaron Jacobs" . "atheriel@gmail.com"))])
+ (helm-w32-launcher . [(20141223 2014) ((emacs (24)) (helm (1 6 5)) (cl-lib (0 5))) "Start Menu entry launcher using Helm" tar ((:url . "https://github.com/Fanael/helm-w32-launcher") (:commit . "3e59ad62b89dd21d334af0203d445a83eb25dc5b") (:revdesc . "3e59ad62b89d") (:authors ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (helm-w3m . [(20210315 723) ((helm (1 5)) (w3m (0 0)) (cl-lib (0 5)) (emacs (24 1))) "W3m bookmark - helm interface" tar ((:url . "https://github.com/emacs-helm/helm-w3m") (:commit . "0a25a2b1df9bc660a90d633beb301b3815556e4e") (:revdesc . "0a25a2b1df9b"))])
+ (helm-wikipedia . [(20240912 1617) ((helm (3 6)) (emacs (25 1))) "Wikipedia suggestions" tar ((:url . "https://github.com/emacs-helm/helm-wikipedia") (:commit . "e4b9434785e2a421af6e16ba50ea51eb54c7e490") (:revdesc . "e4b9434785e2"))])
+ (helm-wordnet . [(20160128 1507) ((emacs (24)) (helm (1 7 0)) (cl-lib (0 5))) "Helm interface to local wordnet dictionary" tar ((:url . "https://github.com/raghavgautam/helm-wordnet") (:commit . "a36dbc6fcb570b812870bc1e190f203e0a0042fc") (:revdesc . "a36dbc6fcb57") (:keywords "dictionary" "wordnet" "emacs" "elisp" "helm") (:authors ("Raghav Kumar Gautam" . "rgautam@apache.com")) (:maintainers ("Raghav Kumar Gautam" . "rgautam@apache.com")) (:maintainer "Raghav Kumar Gautam" . "rgautam@apache.com"))])
+ (helm-xcdoc . [(20160116 1018) ((helm (1 5)) (emacs (24 4))) "Search Xcode Document by docsetutil and eww with helm interface" tar ((:url . "https://github.com/fujimisakari/emacs-helm-xcdoc") (:commit . "a85612149a6d8e18ab309b3db2d222ce39c42049") (:revdesc . "a85612149a6d") (:authors ("Ryo Fujimoto" . "fujimisakri@gmail.com")) (:maintainers ("Ryo Fujimoto" . "fujimisakri@gmail.com")) (:maintainer "Ryo Fujimoto" . "fujimisakri@gmail.com"))])
+ (helm-xref . [(20211017 1334) ((emacs (25 1)) (helm (1 9 4))) "Helm interface for xref results" tar ((:url . "https://github.com/brotzeit/helm-xref") (:commit . "ea0e4ed8a9baf236e4085cbc7178241f109a53fa") (:revdesc . "ea0e4ed8a9ba") (:authors ("Fritz Stelzer" . "brotzeitmacher@gmail.com")) (:maintainers ("Fritz Stelzer" . "brotzeitmacher@gmail.com")) (:maintainer "Fritz Stelzer" . "brotzeitmacher@gmail.com"))])
+ (helm-youtube . [(20190101 1733) ((request (0 2 0)) (helm (2 3 1)) (cl-lib (0 5))) "Query YouTube and play videos in your browser" tar ((:url . "https://github.com/maximus12793/helm-youtube") (:commit . "e7272f1648c7fa836ea5ac1a61770b4931ab4709") (:revdesc . "e7272f1648c7") (:keywords "youtube" "multimedia") (:authors ("Maximilian Roquemore" . "maximus12793@gmail.com")) (:maintainers ("Maximilian Roquemore" . "maximus12793@gmail.com")) (:maintainer "Maximilian Roquemore" . "maximus12793@gmail.com"))])
+ (helm-z . [(20171204 325) ((helm (1 0))) "Show z directory list with helm.el support" tar ((:url . "https://github.com/yynozk/helm-z") (:commit . "37212220bebea8b9c238cb1bbacd8332b7f26c03") (:revdesc . "37212220bebe") (:authors ("yynozk" . "yynozk@gmail.com")) (:maintainers ("yynozk" . "yynozk@gmail.com")) (:maintainer "yynozk" . "yynozk@gmail.com"))])
+ (helm-zhihu-daily . [(20160625 1145) ((helm (1 0)) (cl-lib (0 5)) (emacs (24 4))) "Helm interface for 知乎日报 (http://daily.zhihu.com)" tar ((:url . "https://github.com/xuchunyang/helm-zhihu-daily") (:commit . "be27dcc6be1eb97663b65581a9a5c0fc81cfaba7") (:revdesc . "be27dcc6be1e") (:authors ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang56@gmail.com"))])
+ (help-find . [(20220929 822) ((emacs (25 2)) (dash (2 12))) "Additional help functions for working with keymaps" tar ((:url . "https://github.com/duncanburke/help-find") (:commit . "ef7266fc480367c12bff64817c875af940d0c9c0") (:revdesc . "ef7266fc4803") (:keywords "help") (:authors ("Duncan Burke" . "duncankburke@gmail.com")) (:maintainers ("Duncan Burke" . "duncankburke@gmail.com")) (:maintainer "Duncan Burke" . "duncankburke@gmail.com"))])
+ (help-find-org-mode . [(20181204 234) ((emacs (24 4))) "Advise help to find org source over tangled code" tar ((:url . "https://github.com/EricCrosson/help-find-org-mode") (:commit . "c6fa2c8a8e9381572190010a9fa01f2be78f2790") (:revdesc . "c6fa2c8a8e93") (:keywords "convenience") (:authors ("Eric Crosson" . "eric.s.crosson@utexas.com")) (:maintainers ("Eric Crosson" . "eric.s.crosson@utexas.com")) (:maintainer "Eric Crosson" . "eric.s.crosson@utexas.com"))])
+ (helpful . [(20250408 334) ((emacs (25)) (dash (2 18 0)) (s (1 11 0)) (f (0 20 0)) (elisp-refs (1 2))) "A better *help* buffer" tar ((:url . "https://github.com/Wilfred/helpful") (:commit . "03756fa6ad4dcca5e0920622b1ee3f70abfc4e39") (:revdesc . "03756fa6ad4d") (:keywords "help" "lisp") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (hemera-theme . [(20180916 924) ((emacs (24))) "Light theme" tar ((:url . "https://github.com/GuidoSchmidt/emacs-hemera-theme") (:commit . "b67c902b210b37b00cac68726822404543147ba8") (:revdesc . "b67c902b210b") (:keywords "themes" "light-theme") (:maintainers ("Guido Schmidt" . "guido.schmidt.2912@gmail.com")) (:maintainer "Guido Schmidt" . "guido.schmidt.2912@gmail.com"))])
+ (hemisu-theme . [(20130508 1844) nil "Hemisu for Emacs" tar ((:url . "http://github/anrzejsliwa/django-theme") (:commit . "ae593ac58e6bffef97467259c1d1472840385e84") (:revdesc . "ae593ac58e6b"))])
+ (hercules . [(20200420 747) ((emacs (24 4)) (which-key (3 3 2))) "An auto-magical, which-key-based hydra banisher" tar ((:url . "https://gitlab.com/jjzmajic/hercules") (:commit . "557da39878d0637395fdded91243b340c37eff7b") (:revdesc . "557da39878d0") (:keywords "convenience"))])
+ (heroku . [(20230811 1244) ((emacs (27 2)) (transient (0 3 7)) (dash (2 19 1)) (s (1 13 0)) (ts (0 2 2))) "Like Magit but for Heroku CLI" tar ((:url . "https://github.com./licht1stein/heroku.el") (:commit . "b76db3801d759baece7865b238e99e494506dbeb") (:revdesc . "b76db3801d75") (:keywords "heroku" "devops" "convenience"))])
+ (heroku-theme . [(20150523 219) nil "Heroku color theme" tar ((:url . "https://github.com/jonathanchu/color-theme-heroku") (:commit . "7c1e80f8b5087c37008fec687070344638cd4752") (:revdesc . "7c1e80f8b508") (:authors ("Jonathan Chu" . "me@jonathanchu.is")) (:maintainers ("Jonathan Chu" . "me@jonathanchu.is")) (:maintainer "Jonathan Chu" . "me@jonathanchu.is"))])
+ (hexo . [(20221130 1642) ((emacs (24 3))) "Major mode & tools for Hexo" tar ((:url . "https://github.com/kuanyui/hexo.el") (:commit . "709c069ec0f9ffd8bc2f8fff18a66d80bc205f6d") (:revdesc . "709c069ec0f9") (:keywords "tools" "hexo") (:authors ("Ono Hiroko" . "azazabc123@gmail.com")) (:maintainers ("Ono Hiroko" . "azazabc123@gmail.com")) (:maintainer "Ono Hiroko" . "azazabc123@gmail.com"))])
+ (hfst-mode . [(20160708 1202) nil "Major mode for editing HFST files" tar ((:url . "http://wiki.apertium.org/wiki/Emacs") (:commit . "ac1bb9dd92545d3e7fdc05c83996c227cc15c6b8") (:revdesc . "ac1bb9dd9254") (:keywords "languages") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (hg-histedit . [(20210302 2334) ((emacs (25 1)) (with-editor (2 8 3))) "Edit HG histedit files" tar ((:url . "https://github.com/jojojames/hg-histedit") (:commit . "a05149483b9c5f7848ece0ba6028c900595a6a25") (:revdesc . "a05149483b9c") (:keywords "mercurial" "hg" "emacs" "tools") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (hgignore-mode . [(20220804 1326) nil "A major mode for editing hgignore files" tar ((:url . "https://github.com/omajid/hgignore-mode") (:commit . "c65810347f39904b985187c5e2aaf27b184f3cae") (:revdesc . "c65810347f39") (:keywords "convenience" "vc" "hg") (:authors ("Omair Majid" . "omair.majid@gmail.com")) (:maintainers ("Omair Majid" . "omair.majid@gmail.com")) (:maintainer "Omair Majid" . "omair.majid@gmail.com"))])
+ (hgrc-mode . [(20150409 2043) nil "Major mode for editing hgrc files" tar ((:url . "https://github.com/omajid/hgrc-mode") (:commit . "314e8320b82cc1ce74b1bd372f296252e7a23090") (:revdesc . "314e8320b82c") (:keywords "convenience" "vc" "hg") (:authors ("Omair Majid" . "omair.majid@gmail.com")) (:maintainers ("Omair Majid" . "omair.majid@gmail.com")) (:maintainer "Omair Majid" . "omair.majid@gmail.com"))])
+ (hi2 . [(20141005 1931) nil "Indentation module for Haskell Mode" tar ((:url . "https://github.com/errge/hi2") (:commit . "c9d199727b5cdcb9e36a972b38131ce4611fd6c8") (:revdesc . "c9d199727b5c") (:keywords "indentation" "haskell") (:authors ("Gergely Risko" . "gergely@risko.hu")) (:maintainers ("Gergely Risko" . "gergely@risko.hu")) (:maintainer "Gergely Risko" . "gergely@risko.hu"))])
+ (hiccup-cli . [(20210211 2127) ((emacs (26 1))) "Convert HTML to Hiccup syntax" tar ((:url . "https://github.com/kwrooijen/hiccup-cli") (:commit . "cfbb957a1f86bc1d28e778bfdffdeaaa2ae79286") (:revdesc . "cfbb957a1f86") (:keywords "tools"))])
+ (hide-lines . [(20250523 2205) nil "Commands for hiding lines based on a regexp" tar ((:url . "https://github.com/vapniks/hide-lines") (:commit . "803443035c7feb85ea1ad83e49629c54dfc48e8d") (:revdesc . "803443035c7f") (:keywords "convenience") (:authors ("Mark Hulme-Jones" . "tureatpligcucumberdotnet")) (:maintainers ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainer "Joe Bloggs" . "vapniks@yahoo.com"))])
+ (hide-mode-line . [(20240828 2322) ((emacs (24 4))) "Minor mode that hides/masks your modeline" tar ((:url . "https://github.com/hlissner/emacs-hide-mode-line") (:commit . "ddd154f1e04d666cd004bf8212ead8684429350d") (:revdesc . "ddd154f1e04d") (:keywords "frames" "mode-line") (:authors ("Henrik Lissner" . "http://github/hlissner")) (:maintainers ("Henrik Lissner" . "contact@henrik.io")) (:maintainer "Henrik Lissner" . "contact@henrik.io"))])
+ (hide-secrets . [(20240512 1933) ((emacs (29 1))) "A package for hiding secrets in buffers" tar ((:url . "https://gitlab.com/ostseepinguin1/hide-secrets-el") (:commit . "e774f3fdacd875707fde25e32f8760e54a440689") (:revdesc . "e774f3fdacd8") (:keywords "tools") (:authors ("Sebastian Meisel" . "sebastian.meisel@gmail.com")) (:maintainers ("Sebastian Meisel" . "sebastian.meisel@gmail.com")) (:maintainer "Sebastian Meisel" . "sebastian.meisel@gmail.com"))])
+ (hidepass . [(20260512 1112) ((emacs (27 2))) "Hide passwords at one or multiple lines" tar ((:url . "https://codeberg.org/Anoncheg/emacs-hidepass") (:commit . "6094bc0e37f5ac4abfe3fe8ed0ce8eef1a928ef9") (:revdesc . "6094bc0e37f5") (:keywords "hide" "hidden" "password" "faces") (:authors (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainers (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainer nil . "github.com/Anoncheg1,codeberg.org/Anoncheg"))])
+ (hidepw . [(20200326 112) nil "Minor mode to hide passwords" tar ((:url . "https://github.com/jekor/hidepw") (:commit . "73f099da79d73fe4087472df3469d8b9b20a59f2") (:revdesc . "73f099da79d7") (:keywords "hide" "hidden" "password" "faces") (:authors ("Chris Forno" . "jekor@jekor.com")) (:maintainers ("Chris Forno" . "jekor@jekor.com")) (:maintainer "Chris Forno" . "jekor@jekor.com"))])
+ (hideshow-org . [(20120223 2250) nil "Provides org-mode like hide and show for hideshow.el" tar ((:url . "https://github.com/shanecelis/hideshow-org") (:commit . "16419e52e6cdd2f46f755144c0ab11ce00d1a626") (:revdesc . "16419e52e6cd") (:keywords "c" "c++" "java" "lisp" "tools" "editing" "comments" "blocks" "hiding" "outlines" "org-mode") (:authors ("Shane Celis" . "shanegnufooorg")) (:maintainers ("Shane Celis" . "shanegnufooorg")) (:maintainer "Shane Celis" . "shanegnufooorg"))])
+ (highlight . [(20210318 2248) nil "Highlighting commands" tar ((:url . "https://www.emacswiki.org/emacs/download/highlight.el") (:commit . "28557cb8d99b96eb509aaec1334c7cdda162517f") (:revdesc . "28557cb8d99b") (:keywords "faces" "help" "local") (:maintainers ("Drew Adams (concat \"drew.adams\" \"oracle\" \".com\"" . "\"@\" ")) (:maintainer "Drew Adams (concat \"drew.adams\" \"oracle\" \".com\"" . "\"@\" "))])
+ (highlight-blocks . [(20190318 1557) ((emacs (24))) "Highlight the blocks point is in" tar ((:url . "https://github.com/Fanael/highlight-blocks") (:commit . "33cf3d36662faa36c86c8d53e4d5a3922efa3eb8") (:revdesc . "33cf3d36662f") (:authors ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (highlight-context-line . [(20181122 2203) nil "Improve orientation when scrolling" tar ((:url . "https://github.com/ska2342/highlight-context-line/") (:commit . "c3257c0ca9dba76167bbd7e0718a65ecd26ef26f") (:revdesc . "c3257c0ca9db") (:keywords "faces" "services" "user") (:authors ("Stefan Kamphausen" . "www.skamphausen.de")) (:maintainers ("Stefan Kamphausen" . "www.skamphausen.de")) (:maintainer "Stefan Kamphausen" . "www.skamphausen.de"))])
+ (highlight-defined . [(20210411 222) ((emacs (24))) "Syntax highlighting of known Elisp symbols" tar ((:url . "https://github.com/Fanael/highlight-defined") (:commit . "4420bdda419875dacb065468aafe273b2022580e") (:revdesc . "4420bdda4198") (:authors ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (highlight-doxygen . [(20200520 1713) nil "Highlight Doxygen comments" tar ((:url . "https://github.com/Lindydancer/highlight-doxygen") (:commit . "eec4874e2e89d4eb39091aad89a67dff8f8ec84c") (:revdesc . "eec4874e2e89") (:keywords "faces"))])
+ (highlight-escape-sequences . [(20201214 1730) nil "Highlight escape sequences" tar ((:url . "https://github.com/dgutov/highlight-escape-sequences") (:commit . "fae976568c04b6fe8a9f2d854c8fe23b357a6878") (:revdesc . "fae976568c04") (:keywords "convenience") (:authors ("Dmitry Gutov" . "dgutov@yandex.ru") ("Pavel Matcula" . "dev.plvlml@gmail.com")) (:maintainers ("Dmitry Gutov" . "dgutov@yandex.ru") ("Pavel Matcula" . "dev.plvlml@gmail.com")) (:maintainer "Dmitry Gutov" . "dgutov@yandex.ru"))])
+ (highlight-function-calls . [(20240922 1826) ((emacs (24 4))) "Highlight function/macro calls" tar ((:url . "https://github.com/alphapapa/highlight-function-calls") (:commit . "3037e64c740e799ecefd06419cc1ceffca6320b5") (:revdesc . "3037e64c740e") (:keywords "faces" "highlighting") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (highlight-indent-guides . [(20260202 1243) ((emacs (26 1))) "Minor mode to highlight indentation" tar ((:url . "https://github.com/DarthFennec/highlight-indent-guides") (:commit . "802fb2eaf67ead730d7e3483b9a1e9639705f267") (:revdesc . "802fb2eaf67e") (:keywords "convenience") (:authors ("DarthFennec" . "darthfennec@derpymail.org")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (highlight-indentation . [(20210221 1418) nil "Minor modes for highlighting indentation" tar ((:url . "https://github.com/antonj/Highlight-Indentation-for-Emacs") (:commit . "d88db4248882da2d4316e76ed673b4ac1fa99ce3") (:revdesc . "d88db4248882"))])
+ (highlight-leading-spaces . [(20151216 1222) ((emacs (24 4))) "Highlight leading spaces" tar ((:url . "https://github.com/mrBliss/highlight-leading-spaces") (:commit . "840db19d863dd97993fd9f893f5be501627b6354") (:revdesc . "840db19d863d") (:authors ("Thomas Winant" . "dewinant@gmail.com")) (:maintainers ("Thomas Winant" . "dewinant@gmail.com")) (:maintainer "Thomas Winant" . "dewinant@gmail.com"))])
+ (highlight-numbers . [(20181013 1744) ((emacs (24)) (parent-mode (2 0))) "Highlight numbers in source code" tar ((:url . "https://github.com/Fanael/highlight-numbers") (:commit . "8b4744c7f46c72b1d3d599d4fb75ef8183dee307") (:revdesc . "8b4744c7f46c") (:authors ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (highlight-operators . [(20170213 2220) nil "A face for operators in programming modes" tar ((:url . "https://github.com/jpkotta/highlight-operators") (:commit . "7696b43419505d6e3511ad2781f9f1dd3c55ef8c") (:revdesc . "7696b4341950") (:authors ("Jonathan Kotta" . "jpkotta@gmail.com")) (:maintainers ("Jonathan Kotta" . "jpkotta@gmail.com")) (:maintainer "Jonathan Kotta" . "jpkotta@gmail.com"))])
+ (highlight-parentheses . [(20240408 1126) ((emacs (24 3))) "Highlight surrounding parentheses" tar ((:url . "https://sr.ht/~tsdh/highlight-parentheses.el/") (:commit . "965b18dd69eff4457e17c9e84b3cbfdbfca2ddfb") (:revdesc . "965b18dd69ef") (:keywords "faces" "matching") (:authors ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainers ("Tassilo Horn" . "tsdh@gnu.org")) (:maintainer "Tassilo Horn" . "tsdh@gnu.org"))])
+ (highlight-quoted . [(20140916 1822) ((emacs (24))) "Highlight Lisp quotes and quoted symbols" tar ((:url . "https://github.com/Fanael/highlight-quoted") (:commit . "ec9108486cf7f21f9a0b13f81369849b3b525f1f") (:revdesc . "ec9108486cf7") (:authors ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (highlight-refontification . [(20250104 1619) nil "Visualize refontification" tar ((:url . "https://github.com/Lindydancer/highlight-refontification") (:commit . "31ce7f8086a85144695dc6c972bad9f1199bd179") (:revdesc . "31ce7f8086a8") (:keywords "faces" "tools"))])
+ (highlight-stages . [(20210306 418) nil "Highlight staged (quasi-quoted) expressions" tar ((:url . "http://hins11.yu-yake.com/") (:commit . "95daa710f3d8fc83f42c5da38003fc71ae0da1fc") (:revdesc . "95daa710f3d8"))])
+ (highlight-symbol . [(20160102 2009) nil "Automatic and manual symbol highlighting" tar ((:url . "http://nschum.de/src/emacs/highlight-symbol/") (:commit . "7a789c779648c55b16e43278e51be5898c121b3a") (:revdesc . "7a789c779648") (:keywords "faces" "matching") (:authors ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainers ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainer "Nikolaj Schumacher" . "bugs*nschumde"))])
+ (highlight-thing . [(20250416 1107) nil "Minimalistic minor mode to highlight current thing under point" tar ((:url . "https://github.com/fgeller/highlight-thing.el") (:commit . "fd0309e72727e5332be3397e15edb035b426dd0b") (:revdesc . "fd0309e72727") (:keywords "highlight" "thing" "symbol") (:authors ("Felix Geller" . "fgeller@gmail.com")) (:maintainers ("Felix Geller" . "fgeller@gmail.com")) (:maintainer "Felix Geller" . "fgeller@gmail.com"))])
+ (highlight-unique-symbol . [(20130612 542) ((deferred (0 3 2))) "Highlight symbols which not appear in the repository" tar ((:url . "https://github.com/hitode909/emacs-highlight-unique-symbol") (:commit . "d760015b4a5ce31d6da5a30890b599a8e1312be5") (:revdesc . "d760015b4a5c") (:authors ("hitode909" . "hitode909@gmail.com")) (:maintainers ("hitode909" . "hitode909@gmail.com")) (:maintainer "hitode909" . "hitode909@gmail.com"))])
+ (highlight2clipboard . [(20240516 1942) ((htmlize (1 47))) "Copy text to clipboard with highlighting" tar ((:url . "https://github.com/Lindydancer/highlight2clipboard") (:commit . "6564fafd09a9c676b4d393f2260a0c73daac7257") (:revdesc . "6564fafd09a9") (:keywords "tools"))])
+ (hima-theme . [(20250807 650) ((emacs (25 1))) "A minimal theme with pretty colors" tar ((:url . "https://github.com/meain/hima-theme") (:commit . "637367be2b87a57b0dcc12dc9dd30a854d3281b4") (:revdesc . "637367be2b87") (:keywords "faces"))])
+ (himalaya . [(20260219 1107) ((emacs (27 1))) "Interface for the email client Himalaya CLI" tar ((:url . "https://github.com/dantecatalfamo/himalaya-emacs") (:commit . "e308694ef60b211bad2a70c46a1566ef0b985f2e") (:revdesc . "e308694ef60b") (:keywords "mail" "comm") (:authors ("soywod" . "clement.douin@posteo.net")) (:maintainers ("soywod" . "clement.douin@posteo.net")) (:maintainer "soywod" . "clement.douin@posteo.net"))])
+ (hindent . [(20260124 2208) ((emacs (27 1))) "Indent haskell code using the \"hindent\" program" tar ((:url . "https://github.com/mihaimaruseac/hindent") (:commit . "57e769d48447c77da5a21d1923ba3634e3a605fe") (:revdesc . "57e769d48447") (:authors ("Chris Done" . "chrisdone@gmail.com")) (:maintainers ("Chris Done" . "chrisdone@gmail.com")) (:maintainer "Chris Done" . "chrisdone@gmail.com"))])
+ (hindu-calendar . [(20260627 1755) ((emacs (24 3))) "Astronomical traditional Hindu calendar (panchanga)" tar ((:url . "https://github.com/bdsatish/hindu-calendar") (:commit . "0868cb7548830e50d801f68a79e34fd988464f3e") (:revdesc . "0868cb754883") (:keywords "calendar" "panchanga" "hindu" "indian") (:authors ("B.D.Satish" . "bdsatish@gmail.com")) (:maintainers ("B.D.Satish" . "bdsatish@gmail.com")) (:maintainer "B.D.Satish" . "bdsatish@gmail.com"))])
+ (hippie-exp-ext . [(20160502 2326) nil "Extension of hippie-expand" tar ((:url . "http://www.emacswiki.org/emacs/download/hippie-exp-ext.el") (:commit . "4eda13f90da51ab217d024701f4c30f91ffcb90e") (:revdesc . "4eda13f90da5") (:keywords "abbrev" "convenience" "completions" "hippie-expand") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (hippie-expand-slime . [(20170723 146) nil "Hook slime's completion into hippie-expand" tar ((:url . "https://github.com/purcell/hippie-expand-slime") (:commit . "39bbae94896a62854d31754debdfae71d35fec62") (:revdesc . "39bbae94896a") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (hippie-namespace . [(20140508 2041) nil "Special treatment for namespace prefixes in hippie-expand" tar ((:url . "https://github.com/rolandwalker/hippie-namespace") (:commit . "107d927634032062483e83c6de9b7698b64809d1") (:revdesc . "107d92763403") (:keywords "convenience" "lisp" "tools" "completion") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (hippo-themes . [(20250929 1221) ((emacs (24 1))) "Hippo color theme" tar ((:url . "https://github.com/kimim/emacs-hippo-theme") (:commit . "8eb27d6bf632bb466d242334adfbbe9c027dd8c5") (:revdesc . "8eb27d6bf632") (:keywords "faces" "local" "color" "theme"))])
+ (historian . [(20200203 1927) ((emacs (24 4))) "Persistently store selected minibuffer candidates" tar ((:url . "https://github.com/PythonNut/historian.el") (:commit . "ac1bea7d99dd6965c72fabeb72d5fdc38c5380a4") (:revdesc . "ac1bea7d99dd") (:keywords "convenience") (:authors ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainers ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainer "PythonNut" . "pythonnut@pythonnut.com"))])
+ (history . [(20160821 1602) ((emacs (24 3))) "History utility for source code navigation" tar ((:url . "https://github.com/boyw165/history") (:commit . "5317663fb45bbd5e96d258cb0807dcc266ce67ff") (:revdesc . "5317663fb45b"))])
+ (historyf . [(20151124 159) nil "File history library like browser" tar ((:url . "https://github.com/k1LoW/emacs-historyf") (:commit . "64ab6c9d2cd6dec6982622bf675326e011373cd2") (:revdesc . "64ab6c9d2cd6") (:authors (nil . "k1low[at]101000lab[dot]org")) (:maintainers (nil . "k1low[at]101000lab[dot]org")) (:maintainer nil . "k1low[at]101000lab[dot]org"))])
+ (hive . [(20131217 1512) ((sql (3 0))) "Hive SQL mode extension" tar ((:url . "https://github.com/r0man/hive-el") (:commit . "131f2816a0cf4d1fee44198ca305e6e2d1cab750") (:revdesc . "131f2816a0cf") (:keywords "sql" "hive") (:authors ("Roman Scherer" . "roman@burningswell.com")) (:maintainers ("Roman Scherer" . "roman@burningswell.com")) (:maintainer "Roman Scherer" . "roman@burningswell.com"))])
+ (hiwin . [(20150825 827) nil "Visible active window mode" tar ((:url . "https://github.com/yoshida-mediba/hiwin-mode") (:commit . "6ee8ed051405653bd9b7332d7e9fbb591d954051") (:revdesc . "6ee8ed051405") (:keywords "faces" "editing" "emulating"))])
+ (hl-anything . [(20160422 1708) ((emacs (24 3))) "Highlight symbols, selections, enclosing parens and more" tar ((:url . "https://github.com/hl-anything/hl-anything-emacs") (:commit . "c2e50f91a05d6c43e8a1c169f709cd1f23e47b0a") (:revdesc . "c2e50f91a05d"))])
+ (hl-block-mode . [(20251230 731) ((emacs (29 1))) "Highlighting nested blocks" tar ((:url . "https://codeberg.org/ideasman42/emacs-hl-block-mode") (:commit . "8f66a89196dec2f9b5f9a58b769e64c190493064") (:revdesc . "8f66a89196de") (:keywords "convenience" "faces") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (hl-indent . [(20170429 2104) ((emacs (24)) (cl-lib (0 5))) "Highlight irregular indentation" tar ((:url . "https://github.com/ikirill/hl-indent") (:commit . "bdb2e0177a7c8b29af26998e688b856adc6ded93") (:revdesc . "bdb2e0177a7c") (:keywords "convenience" "faces") (:authors ("Kirill Ignatiev" . "github.com/ikirill")) (:maintainers ("Kirill Ignatiev" . "github.com/ikirill")) (:maintainer "Kirill Ignatiev" . "github.com/ikirill"))])
+ (hl-indent-scope . [(20260726 536) ((emacs (29 1))) "Highlight indentation by scope" tar ((:url . "https://codeberg.org/ideasman42/emacs-hl-indent-scope") (:commit . "5e0e0d293231169b27c96d13cf2ccdf3b4d01353") (:revdesc . "5e0e0d293231") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (hl-printf . [(20250926 1624) ((emacs (24 1)) (compat (29 1 0 1))) "Minor mode for highlighting \"printf\" format specifiers" tar ((:url . "https://github.com/8dcc/hl-printf.el") (:commit . "f2f534efaa1788b66a50a8e811c19d48275f26f4") (:revdesc . "f2f534efaa17") (:keywords "c" "faces") (:authors ("8dcc" . "8dcc.git@gmail.com")) (:maintainers ("8dcc" . "8dcc.git@gmail.com")) (:maintainer "8dcc" . "8dcc.git@gmail.com"))])
+ (hl-prog-extra . [(20260810 948) ((emacs (27 1))) "Customizable highlighting for source-code" tar ((:url . "https://codeberg.org/ideasman42/emacs-hl-prog-extra") (:commit . "2896595512b4e0fe36f915227bd5db4d158cc658") (:revdesc . "2896595512b4") (:keywords "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (hl-sentence . [(20171018 1519) nil "Highlight a sentence based on customizable face" tar ((:url . "https://github.com/milkypostman/hl-sentence") (:commit . "86ae38d3103bd20da5485cbdd59dfbd396c45ee4") (:revdesc . "86ae38d3103b") (:keywords "highlighting") (:authors ("Donald Ephraim Curtis" . "dcurtis@milkbox.net")) (:maintainers ("Donald Ephraim Curtis" . "dcurtis@milkbox.net")) (:maintainer "Donald Ephraim Curtis" . "dcurtis@milkbox.net"))])
+ (hl-todo . [(20260601 1508) ((emacs (28 1)) (compat (31 0)) (cond-let (1 1))) "Highlight TODO and similar keywords" tar ((:url . "https://github.com/tarsius/hl-todo") (:commit . "527d545b8c2f36243194cbe4a8d0e6ac9d50e6a7") (:revdesc . "527d545b8c2f") (:keywords "convenience") (:authors ("Jonas Bernoulli" . "emacs.hl-todo@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.hl-todo@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.hl-todo@jonas.bernoulli.dev"))])
+ (hledger-mode . [(20251023 1834) ((emacs (24 4)) (popup (0 5 3)) (async (1 9)) (htmlize (1 47))) "A mode for writing journal entries for hledger" tar ((:url . "https://github.com/narendraj9/hledger-mode.git") (:commit . "77766869e03ce1ab0d810d8c6fb5d482a3017854") (:revdesc . "77766869e03c") (:keywords "data") (:authors ("Narendra Joshi" . "narendraj9@gmail.com")) (:maintainers ("Narendra Joshi" . "narendraj9@gmail.com")) (:maintainer "Narendra Joshi" . "narendraj9@gmail.com"))])
+ (hlint-refactor . [(20190115 900) nil "Apply HLint suggestions" tar ((:url . "https://github.com/mpickering/hlint-refactor-mode") (:commit . "c4307f86aad6d02e32e9b30cb6edc115584c791c") (:revdesc . "c4307f86aad6") (:keywords "haskell" "refactor"))])
+ (hlinum . [(20180422 412) ((cl-lib (0 2))) "Extension for linum.el to highlight current line number" tar ((:url . "https://github.com/tom-tan/hlinum-mode/") (:commit . "f17360fe93de6df99a05b4b64b0a1ca4ee45abb6") (:revdesc . "f17360fe93de") (:keywords "convenience" "extensions") (:authors ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainers ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainer "Tomoya Tanjo" . "ttanjo@gmail.com"))])
+ (hmac . [(20201004 1819) ((emacs (25 1))) "Hash-based message authentication code" tar ((:url . "https://github.com/grimnebulin/emacs-hmac") (:commit . "f2b99a9a10becfff207cf9418c6dce78364b1a4b") (:revdesc . "f2b99a9a10be"))])
+ (hnreader . [(20260824 2055) ((emacs (25 1)) (promise (1 1)) (request (0 3 0)) (org (9 2))) "A hackernews reader" tar ((:url . "https://github.com/thanhvg/emacs-hnreader/") (:commit . "3a1ad5f3711b89e3e2f8506cc485ce9f8e8ca216") (:revdesc . "3a1ad5f3711b") (:authors ("Thanh Vuong" . "thanhvg@gmail.com")) (:maintainers ("Thanh Vuong" . "thanhvg@gmail.com")) (:maintainer "Thanh Vuong" . "thanhvg@gmail.com"))])
+ (hnview . [(20260720 641) ((emacs (29 1)) (llm (0 30 1)) (plz (0 9))) "Standalone Hacker News client" tar ((:url . "https://github.com/luciuschen/hnview") (:commit . "9b835985f9513f6801109b26d2b311f90195a3b3") (:revdesc . "9b835985f951") (:keywords "news" "hypermedia" "convenience") (:authors ("Lucius Chen" . "https://github.com/LuciusChen")) (:maintainers ("Lucius Chen" . "https://github.com/LuciusChen")) (:maintainer "Lucius Chen" . "https://github.com/LuciusChen"))])
+ (hoa-mode . [(20251027 1528) ((emacs (25 1))) "Major mode for the HOA format" tar ((:url . "https://gitlab.lre.epita.fr/spot/emacs-modes") (:commit . "10446387fda1d59d7ef9765d67b8022543697e62") (:revdesc . "10446387fda1") (:keywords "major-mode" "automata" "convenience") (:authors ("Alexandre Duret-Lutz" . "adl@lrde.epita.fr")) (:maintainers ("Alexandre Duret-Lutz" . "adl@lrde.epita.fr")) (:maintainer "Alexandre Duret-Lutz" . "adl@lrde.epita.fr"))])
+ (holiday-pascha-etc . [(20160822 58) nil "Eastern Christian analog to holiday-easter-etc" tar ((:url . "https://github.com/hexmode/holiday-pascha-etc") (:commit . "eb198656f63cb8679fb0e3a8248782df071a0f3c") (:revdesc . "eb198656f63c") (:authors ("Mark A. Hershberger" . "mah@everybody.org")) (:maintainers ("Mark A. Hershberger" . "mah@everybody.org")) (:maintainer "Mark A. Hershberger" . "mah@everybody.org"))])
+ (holy-books . [(20211025 127) ((s (1 12 0)) (dash (2 16 0)) (emacs (27 1)) (org (9 1))) "Org-mode links/tooltips/lookups for Quran & Bible" tar ((:url . "https://alhassy.github.io/holy-books/") (:commit . "02c2956d36631d3d8c8b4bacdcf0a5cdd1f3136d") (:revdesc . "02c2956d3663") (:keywords "quran" "bible" "links" "tooltips" "convenience" "comm" "hypermedia") (:authors ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainers ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainer "Musa Al-hassy" . "alhassy@gmail.com"))])
+ (home-end . [(20190109 541) ((emacs (24 3)) (keypress-multi-event (1 0))) "Smart multi-purpose home / end keys" tar ((:url . "https://www.github.com/Boruch_Baum/emacs-home-end") (:commit . "30676ceec0d4ad84038cd0d65ee45ae810ab185c") (:revdesc . "30676ceec0d4") (:keywords "abbrev" "convenience" "wp" "keyboard") (:authors ("Boruch Baum" . "boruch_baum@gmx.com")) (:maintainers ("Boruch Baum" . "boruch_baum@gmx.com")) (:maintainer "Boruch Baum" . "boruch_baum@gmx.com"))])
+ (honcho . [(20230224 420) ((emacs (26 1))) "Run and manage long-running services" tar ((:url . "https://github.com/emacs-pe/honcho.el") (:commit . "95846309c6a4ce45f29f215d43847beb510b6aca") (:revdesc . "95846309c6a4") (:keywords "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (hookify . [(20141216 2209) ((s (1 9 0)) (dash (1 5 0))) "Interactive commands to create temporary hooks" tar ((:url . "https://github.com/Silex/hookify") (:commit . "e76127230716f7fab6662410c03c3872d17a172b") (:revdesc . "e76127230716") (:keywords "hook" "convenience") (:authors ("Philippe Vaucher" . "philippe.vaucher@gmail.com")) (:maintainers ("Philippe Vaucher" . "philippe.vaucher@gmail.com")) (:maintainer "Philippe Vaucher" . "philippe.vaucher@gmail.com"))])
+ (horizon-theme . [(20200720 1832) ((emacs (24 3))) "A beautifully warm dual theme" tar ((:url . "https://github.com/aodhneine/horizon-theme.el") (:commit . "9595549c514a9376c61d5d303405f6a6982e9e46") (:revdesc . "9595549c514a") (:authors ("Aodnait taín" . "aodhneine@tuta.io")) (:maintainers ("Aodnait taín" . "aodhneine@tuta.io")) (:maintainer "Aodnait taín" . "aodhneine@tuta.io"))])
+ (horoscope . [(20180409 641) ((emacs (24))) "Generate horoscopes" tar ((:url . "https://github.com/mschuldt/horoscope.el") (:commit . "f4c683e991adce0a8f9023f15050f306f9b9a9ed") (:revdesc . "f4c683e991ad") (:keywords "extensions" "games") (:authors ("Bob Manson" . "manson@cygnus.com")) (:maintainers ("Noah Friedman" . "friedman@prep.ai.mit.edu")) (:maintainer "Noah Friedman" . "friedman@prep.ai.mit.edu"))])
+ (hotdesk . [(20251125 2349) ((emacs (29 3))) "Multiple buffer lists for projects & workspaces" tar ((:url . "https://github.com/j-hotlink/hotdesk") (:commit . "8d20f38edb3f7e53ee86bb408e020f4dc35c6c70") (:revdesc . "8d20f38edb3f") (:keywords "convenience" "frames" "local") (:authors ("Jonathan Doull" . "jonathan@hotlink.technology")) (:maintainers ("Jonathan Doull" . "jonathan@hotlink.technology")) (:maintainer "Jonathan Doull" . "jonathan@hotlink.technology"))])
+ (hotfuzz . [(20241125 2036) ((emacs (27 1))) "Fuzzy completion style" tar ((:url . "https://github.com/axelf4/hotfuzz") (:commit . "cb0ce382d98cbc35ea55f4533b3c321119ed18b7") (:revdesc . "cb0ce382d98c") (:keywords "matching") (:authors ("Axel Forsman" . "axel@axelf.se")) (:maintainers ("Axel Forsman" . "axel@axelf.se")) (:maintainer "Axel Forsman" . "axel@axelf.se"))])
+ (hound . [(20200122 1700) ((request (0 2 0)) (cl-lib (0 5))) "Display hound search results in a compilation window" tar ((:url . "https://github.com/ryoung786/hound.el") (:commit . "35e2cdc81fcc904b450a7ef3ec00fd25df6a4431") (:revdesc . "35e2cdc81fcc"))])
+ (hover . [(20220129 1935) ((emacs (25 2)) (dash (2 14 1))) "Package to use hover with flutter" tar ((:url . "https://github.com/ericdallo/hover.el") (:commit . "2b826735bb8d3bcfced489a1e0fa21b10fbc967e") (:revdesc . "2b826735bb8d") (:keywords "hover" "flutter" "mobile" "tools"))])
+ (howdoi . [(20150204 43) nil "Instant coding answers via Emacs" tar ((:url . "https://github.com/atykhonov/emacs-howdoi/") (:commit . "5fbf7069ee160c597a328e5ce5fb32920e1ca88f") (:revdesc . "5fbf7069ee16") (:keywords "howdoi" "convenience") (:authors ("Andrey Tykhonov" . "atykhonovatgmail.com")) (:maintainers ("Andrey Tykhonov" . "atykhonov@gmail.com")) (:maintainer "Andrey Tykhonov" . "atykhonov@gmail.com"))])
+ (howdoyou . [(20250321 104) ((emacs (25 1)) (promise (1 1)) (request (0 3 3)) (org (9 2))) "A stackoverflow and its sisters' sites reader" tar ((:url . "https://github.com/thanhvg/howdoyou/") (:commit . "ebecc51c4c1db598d2303d001553ee74fc8fc49a") (:revdesc . "ebecc51c4c1d") (:authors ("Thanh Vuong" . "thanhvg@gmail.com")) (:maintainers ("Thanh Vuong" . "thanhvg@gmail.com")) (:maintainer "Thanh Vuong" . "thanhvg@gmail.com"))])
+ (howm . [(20260726 1112) ((cl-lib (0 5))) "Wiki-like note-taking tool" tar ((:url . "https://kaorahi.github.io/howm/") (:commit . "0765a0ad0b9bac80cc739ee869fb986ed705a056") (:revdesc . "0765a0ad0b9b") (:authors ("HIRAOKA Kazuyuki" . "kakkokakko@gmail.com")) (:maintainers ("HIRAOKA Kazuyuki" . "kakkokakko@gmail.com")) (:maintainer "HIRAOKA Kazuyuki" . "kakkokakko@gmail.com"))])
+ (hsluv . [(20181127 1206) ((seq (2 20))) "Hsluv color space conversions" tar ((:url . "https://github.com/hsluv/hsluv-emacs") (:commit . "bc6e27d25b62f5a2f79836a32e8de6125f4d1564") (:revdesc . "bc6e27d25b62") (:keywords "color" "hsluv"))])
+ (ht . [(20230703 558) ((dash (2 12 0))) "The missing hash table library for Emacs" tar ((:url . "https://github.com/Wilfred/ht.el") (:commit . "1c49aad1c820c86f7ee35bf9fff8429502f60fef") (:revdesc . "1c49aad1c820") (:keywords "hash table" "hash map" "hash") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (html-check-frag . [(20201106 1748) ((emacs (24 3))) "Check html-fragments" tar ((:url . "https://github.com/TobiasZawada/html-check-frag") (:commit . "b9d1f2003a126c2e8b6d469964ec2278ad55c9df") (:revdesc . "b9d1f2003a12") (:keywords "html") (:authors ("Tobias.Zawada" . "i@tn-home.de")) (:maintainers ("Tobias.Zawada" . "i@tn-home.de")) (:maintainer "Tobias.Zawada" . "i@tn-home.de"))])
+ (html-script-src . [(20130807 918) nil "Insert <script src=\"..\"> for popular JavaScript libraries" tar ((:url . "https://github.com/rejeep/html-script-src") (:commit . "ed5e686ab604c81222c7e50b27c5d874c5687db7") (:revdesc . "ed5e686ab604") (:keywords "tools" "convenience") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (html-to-hiccup . [(20230727 1013) ((emacs (25 1)) (s (1 10 0))) "Convert HTML to Hiccup syntax" tar ((:url . "https://github.com/plexus/html-to-hiccup") (:commit . "6879354b8f33ca0c35cf0929581d419cd0ec9ea1") (:revdesc . "6879354b8f33") (:keywords "html" "hiccup" "clojure" "convenience" "tools") (:authors ("Arne Brasseur" . "arne@arnebrasseur.net")) (:maintainers ("Arne Brasseur" . "arne@arnebrasseur.net")) (:maintainer "Arne Brasseur" . "arne@arnebrasseur.net"))])
+ (html-to-markdown . [(20151105 840) ((cl-lib (0 5))) "HTML to Markdown converter written in Emacs-lisp" tar ((:url . "https://github.com/Bruce-Connor/html-to-markdown") (:commit . "60c5498c801be186478cf7c05be05b4430c4a144") (:revdesc . "60c5498c801b") (:keywords "tools" "wp" "languages") (:authors ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainers ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainer "Artur Malabarba" . "bruce.connor.am@gmail.com"))])
+ (html2org . [(20170418 501) ((emacs (24 4))) "Convert html to org format text" tar ((:url . "https://github.com/lujun9972/html2org.el") (:commit . "6904aed40259ad8afccff079ebd8a07bff319ebc") (:revdesc . "6904aed40259") (:keywords "convenience" "html" "org") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (htmlize . [(20250724 1703) ((emacs (26 1))) "Convert buffer text and decorations to HTML" tar ((:url . "https://github.com/emacsorphanage/htmlize") (:commit . "c9a8196a59973fabb3763b28069af9a4822a5260") (:revdesc . "c9a8196a5997") (:keywords "hypermedia" "extensions") (:authors ("Hrvoje Niksic" . "hniksic@gmail.com")) (:maintainers ("Hrvoje Niksic" . "hniksic@gmail.com")) (:maintainer "Hrvoje Niksic" . "hniksic@gmail.com"))])
+ (htmltagwrap . [(20260101 549) ((emacs (24 4))) "Wraps a chunk of HTML code in tags" tar ((:url . "https://github.com/emacs-vs/htmltagwrap") (:commit . "d5df47cf0a303ddad6b063c69db629d373ce2fd3") (:revdesc . "d5df47cf0a30") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (http . [(20201010 920) ((emacs (24 4)) (request (0 2 0)) (edit-indirect (0 1 4))) "Yet another HTTP client" tar ((:url . "https://github.com/emacs-pe/http.el") (:commit . "5fdceed1fbf36e274e578e349a53ce922c574774") (:revdesc . "5fdceed1fbf3") (:keywords "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (http-post-simple . [(20170715 940) nil "HTTP POST requests using the url library" tar ((:url . "https://github.com/emacsorphanage/http-post-simple") (:commit . "f53697fca278c741051aeb668b00466b5e0fd3fe") (:revdesc . "f53697fca278") (:keywords "comm" "data" "processes" "hypermedia"))])
+ (http-server . [(20260609 1136) ((emacs (30 1))) "Speaks HTTP for you" tar ((:url . "https://codeberg.org/martenlienen/http-server.el") (:commit . "4285bd3e4b67983cb783f46afc736032f895882d") (:revdesc . "4285bd3e4b67") (:keywords "comm") (:authors ("Marten Lienen" . "ml@martenlienen.com")) (:maintainers ("Marten Lienen" . "ml@martenlienen.com")) (:maintainer "Marten Lienen" . "ml@martenlienen.com"))])
+ (http-twiddle . [(20221203 1351) nil "Send & twiddle & resend HTTP requests" tar ((:url . "https://github.com/hassy/http-twiddle/blob/master/http-twiddle.el") (:commit . "c07e8620183ec710623db35e26dd839b84c56007") (:revdesc . "c07e8620183e") (:keywords "http" "rest" "soap") (:authors ("Luke Gorrie" . "luke@synap.se")) (:maintainers ("Hasan Veldstra" . "h@vidiowiki.com")) (:maintainer "Hasan Veldstra" . "h@vidiowiki.com"))])
+ (httpcode . [(20121002 345) nil "Explains the meaning of an HTTP status code" tar ((:url . "https://github.com/rspivak/httpcode.el") (:commit . "a45e735082b09477cd704a99294d336cdbeb12ba") (:revdesc . "a45e735082b0") (:authors ("Ruslan Spivak" . "ruslan.spivak@gmail.com")) (:maintainers ("Ruslan Spivak" . "ruslan.spivak@gmail.com")) (:maintainer "Ruslan Spivak" . "ruslan.spivak@gmail.com"))])
+ (httprepl . [(20141101 1734) ((s (1 9 0)) (dash (2 5 0)) (emacs (24))) "An HTTP REPL" tar ((:url . "https://github.com/gregsexton/httprepl.el") (:commit . "cfa3693267a8ed1c96a86a126823f37dbfe077d8") (:revdesc . "cfa3693267a8") (:keywords "http" "repl") (:authors ("Greg Sexton" . "gregsexton@gmail.com")) (:maintainers ("Greg Sexton" . "gregsexton@gmail.com")) (:maintainer "Greg Sexton" . "gregsexton@gmail.com"))])
+ (huecycle . [(20241129 1717) ((emacs (27 1))) "Idle color animation" tar ((:url . "https://github.com/pnor/huecycle") (:commit . "60eed50ffe83e2e139c8a675ff8e53cf94c8a1ee") (:revdesc . "60eed50ffe83") (:keywords "faces") (:authors ("Phillip O'Reggio" . "https://github.com/pnor")))])
+ (hugsql-ghosts . [(20211124 1646) ((s (1 9 0)) (dash (2 10 0)) (cider (0 14 0))) "Display hugsql defqueries in clojure code as an overlay" tar ((:url . "https://github.com/rkaercher/hugsql-ghosts") (:commit . "f9ab314b6a10140041233e65a23e924dcab9a7a3") (:revdesc . "f9ab314b6a10") (:authors ("Roland Kaercher" . "roland.kaercher@gmail.com")) (:maintainers ("Roland Kaercher" . "roland.kaercher@gmail.com")) (:maintainer "Roland Kaercher" . "roland.kaercher@gmail.com"))])
+ (humanoid-themes . [(20251106 1956) ((emacs (27 1))) "Color themes with a dark and light variant" tar ((:url . "https://github.com/humanoid-colors/emacs-humanoid-themes") (:commit . "4adf696a5d9968f6328f488a1f606558cfc8f940") (:revdesc . "4adf696a5d99") (:keywords "faces" "color" "theme"))])
+ (hungarian-holidays . [(20161020 1138) nil "Adds a list of Hungarian public holidays to Emacs calendar" tar ((:url . "https://github.com/gergelypolonkai/hungarian-holidays") (:commit . "653108769279499d84a79267c90e640d98823872") (:revdesc . "653108769279") (:keywords "calendar") (:authors ("Gergely Polonkai" . "gergely@polonkai.eu")) (:maintainers ("Gergely Polonkai" . "gergely@polonkai.eu")) (:maintainer "Gergely Polonkai" . "gergely@polonkai.eu"))])
+ (hungry-delete . [(20210409 1643) nil "Hungry delete minor mode" tar ((:url . "https://github.com/nflath/hungry-delete") (:commit . "d919e555e5c13a2edf4570f3ceec84f0ade71657") (:revdesc . "d919e555e5c1") (:authors ("Nathaniel Flath" . "flat0103@gmail.com")) (:maintainers ("Nathaniel Flath" . "flat0103@gmail.com")) (:maintainer "Nathaniel Flath" . "flat0103@gmail.com"))])
+ (hush . [(20231008 2125) ((emacs (27 1))) "Pluggable secret manager (auth-source alternative)" tar ((:url . "https://github.com/tirimia/hush") (:commit . "51c7960820de0576bbf0c3c286cb1264854d20aa") (:revdesc . "51c7960820de") (:keywords "extensions" "lisp" "local" "tools"))])
+ (hutch . [(20260820 745) ((emacs (29 1)) (magit (4 0)) (transient (0 7 4)) (gptel (0 9 9 3)) (svg-lib (0 3))) "AI code review for magit" tar ((:url . "https://github.com/adjaecent/magit-hutch") (:commit . "319e5c55c66968ebce7beeb780c18dc20fdeac6b") (:revdesc . "319e5c55c669") (:authors ("Akshay Gupta" . "mail@kitallis.in")) (:maintainers ("Akshay Gupta" . "mail@kitallis.in")) (:maintainer "Akshay Gupta" . "mail@kitallis.in"))])
+ (hy-mode . [(20211016 2011) ((dash (2 18 0)) (s (1 11 0)) (emacs (24))) "Major mode for Hylang" tar ((:url . "https://github.com/hylang/hy-mode") (:commit . "df814865a1faa8414dacdbb35b2a9029995312ec") (:revdesc . "df814865a1fa") (:keywords "languages" "lisp" "python") (:authors ("Julien Danjou" . "julien@danjou.info") ("Eric Kaschalk" . "ekaschalk@gmail.com")) (:maintainers ("Julien Danjou" . "julien@danjou.info") ("Eric Kaschalk" . "ekaschalk@gmail.com")) (:maintainer "Julien Danjou" . "julien@danjou.info"))])
+ (hyai . [(20170301 1447) ((cl-lib (0 5)) (emacs (24))) "Haskell Yet Another Indentation" tar ((:url . "https://github.com/iquiw/hyai") (:commit . "e9a7e945fed12d8e664e898cf8b434b0376d5d80") (:revdesc . "e9a7e945fed1") (:authors ("Iku Iwasa" . "iku.iwasa@gmail.com")) (:maintainers ("Iku Iwasa" . "iku.iwasa@gmail.com")) (:maintainer "Iku Iwasa" . "iku.iwasa@gmail.com"))])
+ (hybrid-reverse-theme . [(20220921 1345) ((emacs (24 1))) "Emacs theme with material color scheme" tar ((:url . "https://github.com/riyyi/emacs-hybrid-reverse") (:commit . "5c60e7428d3c135c5f027d09f4474ed776f80d8d") (:revdesc . "5c60e7428d3c") (:keywords "faces" "theme"))])
+ (hydandata-light-theme . [(20190809 1925) nil "A light color theme that is easy on your eyes" tar ((:url . "https://github.com/chkhd/hydandata-light-theme") (:commit . "812ffa4bee3163098ef66ee4506feed45018be4e") (:revdesc . "812ffa4bee31") (:keywords "color-theme" "theme") (:authors ("David Chkhikvadze" . "david@chkhd.net")) (:maintainers ("David Chkhikvadze" . "david@chkhd.net")) (:maintainer "David Chkhikvadze" . "david@chkhd.net"))])
+ (hyde . [(20160508 308) nil "Major mode to help create and manage Jekyll blogs" tar ((:url . "https://github.com/nibrahim/Hyde") (:commit . "a8cd6ed00ecd8d7de0ded2f4867015b412b15b76") (:revdesc . "a8cd6ed00ecd"))])
+ (hydra . [(20250316 1254) ((cl-lib (0 5)) (lv (0))) "Make bindings that stick around" tar ((:url . "https://github.com/abo-abo/hydra") (:commit . "59a2a45a35027948476d1d7751b0f0215b1e61aa") (:revdesc . "59a2a45a3502") (:keywords "bindings") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (hyperbole . [(20260826 2016) ((emacs (28))) "GNU Hyperbole: The Everyday Hypertextual Information Manager" tar ((:url . "http://www.gnu.org/software/hyperbole") (:commit . "cb4339d7e43383d0724da9ab0990cebe87e57352") (:revdesc . "cb4339d7e433") (:keywords "comm" "convenience" "files" "frames" "hypermedia" "languages" "mail" "matching" "mouse" "multimedia" "outlines" "tools" "wp") (:authors ("Robert Weiner" . "rsw@gnu.org")) (:maintainers ("Robert Weiner" . "rsw@gnu.org") ("Mats Lidell" . "matsl@gnu.org")) (:maintainer "Robert Weiner" . "rsw@gnu.org"))])
+ (hyperdrive . [(20251120 1454) ((emacs (28 1)) (map (3 0)) (compat (30 0 0 0)) (org (9 7 6)) (plz (0 9 1)) (persist (0 8)) (taxy-magit-section (0 14)) (transient (0 8 0))) "P2P filesystem" tar ((:url . "https://git.sr.ht/~ushin/hyperdrive.el") (:commit . "cb4974672b4271004ddd5eea1962216752b730ab") (:revdesc . "cb4974672b42") (:authors ("Joseph Turner" . "joseph@ushin.org")) (:maintainers ("Joseph Turner" . "~ushin/ushin@lists.sr.ht")) (:maintainer "Joseph Turner" . "~ushin/ushin@lists.sr.ht"))])
+ (hyperdrive-org-transclusion . [(20241028 427) ((emacs (28 1)) (hyperdrive (0 4 2)) (org-transclusion (1 4 0))) "Tranclude hyperdrive content" tar ((:url . "https://git.sr.ht/~ushin/hyperdrive-org-transclusion") (:commit . "252e2df3fe7a07a122a365a637c47a43b26e179c") (:revdesc . "252e2df3fe7a") (:authors ("Joseph Turner" . "joseph@ushin.org")) (:maintainers ("Joseph Turner" . "~ushin/ushin@lists.sr.ht")) (:maintainer "Joseph Turner" . "~ushin/ushin@lists.sr.ht"))])
+ (hyperkitty . [(20220226 1951) ((request (0 3 2)) (emacs (25 1))) "Emacs interface for Hyperkitty archives" tar ((:url . "https://github.com/maxking/hyperkitty.el") (:commit . "2c1d22ff017d096c359aa151e6a29f7214a58118") (:revdesc . "2c1d22ff017d") (:keywords "mail" "hyperkitty" "mailman") (:authors ("Abhilash Raj" . "maxking@asynchronous.in")) (:maintainers ("Abhilash Raj" . "maxking@asynchronous.in")) (:maintainer "Abhilash Raj" . "maxking@asynchronous.in"))])
+ (hyperlist-mode . [(20230119 28) ((emacs (24))) "A major-mode for viewing Hyperlists" tar ((:url . "https://github.com/vifon/hyperlist-mode") (:commit . "480dbf33ca72e7b5fade952aaf0d5a5eb43acb1d") (:revdesc . "480dbf33ca72") (:keywords "outlines"))])
+ (hyperspace . [(20230518 442) ((emacs (25)) (s (1 12 0))) "Get there from here" tar ((:url . "https://github.com/ieure/hyperspace-el") (:commit . "f574d07fd8715e806ba4f0487b73c699963baed3") (:revdesc . "f574d07fd871") (:keywords "tools" "convenience") (:authors ("Ian Eure" . "ian@retrospec.tv")) (:maintainers ("Ian Eure" . "ian@retrospec.tv")) (:maintainer "Ian Eure" . "ian@retrospec.tv"))])
+ (hyperstitional-themes . [(20260820 1048) ((emacs (24 1))) "Weird themes with incremental palettes" tar ((:url . "https://github.com/precompute/hyperstitional-themes") (:commit . "fb828b43e32aa693344b2530062ba62ee6595f62") (:revdesc . "fb828b43e32a") (:authors ("precompute" . "git@precompute.net")) (:maintainers ("precompute" . "git@precompute.net")) (:maintainer "precompute" . "git@precompute.net"))])
+ (hyprlang-ts-mode . [(20241225 914) ((emacs (29 1))) "Major mode for editing hyprland configuration files" tar ((:url . "https://github.com/Nathan-Melaku/hyprlang-ts-mode") (:commit . "458636c6a4505ea1eb16321be124ced234469e3f") (:revdesc . "458636c6a450") (:keywords "hyprland" "hyprlang" "languages" "tree-sitter") (:authors ("Nathan Melaku" . "nathan@natefu.xyz")) (:maintainers ("Nathan Melaku" . "nathan@natefu.xyz")) (:maintainer "Nathan Melaku" . "nathan@natefu.xyz"))])
+ (i-ching . [(20241113 1642) ((emacs (25 1)) (request (0 3))) "The Book of Changes" tar ((:url . "https://github.com/zzkt/i-ching") (:commit . "e4339cb64a97e0d04a4cb8e7183aeec4e4ae6a29") (:revdesc . "e4339cb64a97") (:keywords "games" "divination" "stochastism" "cleromancy" "change") (:authors ("nik gaffney" . "nik@fo.am")) (:maintainers ("nik gaffney" . "nik@fo.am")) (:maintainer "nik gaffney" . "nik@fo.am"))])
+ (i2b2-mode . [(20140710 104) nil "Highlights corresponding PHI data in the text portion of an i2b2 XML Document" tar ((:url . "https://github.com/danlamanna/i2b2-mode") (:commit . "db10efcfc8bed369a516bbf7526ede41f98cb95a") (:revdesc . "db10efcfc8be") (:keywords "xml" "phi" "i2b2" "deidi2b2") (:authors ("Dan LaManna" . "dan.lamanna@gmail.com")) (:maintainers ("Dan LaManna" . "dan.lamanna@gmail.com")) (:maintainer "Dan LaManna" . "dan.lamanna@gmail.com"))])
+ (i3bar . [(20260102 1630) ((emacs (28 1))) "Display status from an i3status command in the tab bar" tar ((:url . "https://github.com/Stebalien/i3bar.el") (:commit . "111448dc2f84566c656c471eb05a8cb6cd946de1") (:revdesc . "111448dc2f84") (:keywords "unix") (:authors ("Steven Allen" . "steven@stebalien.com")) (:maintainers ("Steven Allen" . "steven@stebalien.com")) (:maintainer "Steven Allen" . "steven@stebalien.com"))])
+ (i3wm . [(20170822 1438) nil "I3wm integration library" tar ((:url . "https://git.flintfam.org/swf-projects/emacs-i3") (:commit . "71391dc61063fee77ad174f3b2ca25c60b41009e") (:revdesc . "71391dc61063") (:keywords "convenience" "extensions") (:authors ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (i3wm-config-mode . [(20220913 1121) ((emacs (24 1))) "Better syntax highlighting for i3wm's config file" tar ((:url . "https://github.com/Alexander-Miller/i3wm-Config-Mode") (:commit . "188e3978807ec39eba3cb69d973c0062af324215") (:revdesc . "188e3978807e") (:keywords "faces" "languages" "i3wm" "font-lock") (:authors ("Alexander Miller" . "alexanderm@web.de")) (:maintainers ("Alexander Miller" . "alexanderm@web.de")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (ialign . [(20251102 1056) ((emacs (25 1))) "Interactive align-regexp" tar ((:url . "https://github.com/mkcms/ialign") (:commit . "2a7472bdb782f5af021bfbdc4c32424d54c005dd") (:revdesc . "2a7472bdb782") (:keywords "tools" "editing" "align" "interactive") (:authors ("Michał Krzywkowski" . "k.michal@zoho.com")) (:maintainers ("Michał Krzywkowski" . "k.michal@zoho.com")) (:maintainer "Michał Krzywkowski" . "k.michal@zoho.com"))])
+ (iasm-mode . [(20171023 1422) nil "Interactive assembly major mode" tar ((:url . "https://github.com/RAttab/iasm-mode") (:commit . "abbec7f308f9ce97beeb57e459fff35f559b4c18") (:revdesc . "abbec7f308f9") (:keywords ":" "tools") (:authors ("Rémi Attab" . "remi.attab@gmail.com")) (:maintainers ("Rémi Attab" . "remi.attab@gmail.com")) (:maintainer "Rémi Attab" . "remi.attab@gmail.com"))])
+ (ibrowse . [(20230926 2056) ((emacs (27 1))) "Interact with your browser" tar ((:url . "https://git.sr.ht/~ngraves/ibrowse.el") (:commit . "addfec54f2c33d505d10bb5f17c084876db5baed") (:revdesc . "addfec54f2c3") (:keywords "comm" "data" "files" "tools") (:authors ("Nicolas Graves" . "ngraves@ngraves.fr")) (:maintainers ("Nicolas Graves" . "ngraves@ngraves.fr")) (:maintainer "Nicolas Graves" . "ngraves@ngraves.fr"))])
+ (ibuffer-git . [(20110508 731) nil "Show git status in ibuffer column" tar ((:url . "https://github.com/jrockway/ibuffer-git") (:commit . "d326319c05ddb8280885b31f9094040c1b365876") (:revdesc . "d326319c05dd") (:keywords "convenience") (:authors ("Jonathan Rockway" . "jon@jrock.us")) (:maintainers ("Jonathan Rockway" . "jon@jrock.us")) (:maintainer "Jonathan Rockway" . "jon@jrock.us"))])
+ (ibuffer-project . [(20220321 1312) ((emacs (25 1))) "Group ibuffer's list by project or any function" tar ((:url . "https://github.com/muffinmad/emacs-ibuffer-project") (:commit . "bfc0ec1f27b02b8ab816dcfd9073e5d78dae1aed") (:revdesc . "bfc0ec1f27b0") (:keywords "tools") (:authors ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainers ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainer "Andrii Kolomoiets" . "andreyk.mad@gmail.com"))])
+ (ibuffer-projectile . [(20230817 610) ((projectile (0 11 0)) (emacs (25 1)) (seq (2))) "Group ibuffer's list by projectile root" tar ((:url . "https://github.com/purcell/ibuffer-projectile") (:commit . "710ecac1578273bf31debe52870f5844472e3428") (:revdesc . "710ecac15782") (:keywords "convenience") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (ibuffer-rcirc . [(20150215 2118) ((cl-lib (0 2))) "Ibuffer integration for rcirc" tar ((:url . "https://github.com/fgallina/ibuffer-rcirc") (:commit . "8a4409b1c679d65c819dee4085faf929840e79f8") (:revdesc . "8a4409b1c679") (:keywords "buffer" "convenience" "comm") (:authors ("Fabián Ezequiel Gallina" . "fgallina@gnu.org")) (:maintainers ("Fabián Ezequiel Gallina" . "fgallina@gnu.org")) (:maintainer "Fabián Ezequiel Gallina" . "fgallina@gnu.org"))])
+ (ibuffer-sidebar . [(20260718 2134) ((emacs (29 1))) "Sidebar for `ibuffer'" tar ((:url . "https://github.com/jojojames/ibuffer-sidebar") (:commit . "b9b985f4ceb627521ed78cfdc4270305f3b0f272") (:revdesc . "b9b985f4ceb6") (:keywords "ibuffer" "files" "tools") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (ibuffer-tramp . [(20180127 2122) nil "Group ibuffer's list by TRAMP connection" tar ((:url . "https://github.com/svend/ibuffer-tramp") (:commit . "bcad0bda3a67f55d1be936bf8fa9ef735fe1e3f3") (:revdesc . "bcad0bda3a67") (:keywords "convenience") (:authors ("Svend Sorensen" . "svend@ciffer.net")) (:maintainers ("Svend Sorensen" . "svend@ciffer.net")) (:maintainer "Svend Sorensen" . "svend@ciffer.net"))])
+ (ibuffer-vc . [(20241106 1518) ((emacs (25 1)) (seq (2))) "Group ibuffer's list by VC project, or show VC status" tar ((:url . "https://github.com/purcell/ibuffer-vc") (:commit . "890c692da9348ef071a4b27940082a4dad05b27c") (:revdesc . "890c692da934") (:keywords "convenience") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (ical-form . [(20251106 746) ((emacs (29 1))) "A widget form for editing ical events" tar ((:url . "https://github.com/haji-ali/maccalfw") (:commit . "fce42746bdaa1f5770282dfc4ec85241c2f5bdd7") (:revdesc . "fce42746bdaa") (:keywords "calendar") (:authors ("Al Haji-Ali" . "abdo.haji.aliatgmail.com")) (:maintainers ("Al Haji-Ali" . "abdo.haji.aliatgmail.com")) (:maintainer "Al Haji-Ali" . "abdo.haji.aliatgmail.com"))])
+ (iceberg-theme . [(20260516 827) ((emacs (28 1)) (solarized-theme (2 1 0))) "Well-designed, eye-friendly, dark blue color scheme" tar ((:url . "https://github.com/conao3/iceberg-theme.el") (:commit . "78b6cb1fce4d7456d928c32a7799809103fbbc10") (:revdesc . "78b6cb1fce4d") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (icl-mode . [(20241030 1743) ((emacs (25 2))) "Support for IEEE 1687 ICL/PDL" tar ((:url . "https://github.com/CeleritasCelery/icl-mode") (:commit . "9cc7fbb7f290fd8c63795765cf309e8a57a49b14") (:revdesc . "9cc7fbb7f290") (:authors ("Troy Hinckley" . "troy.hinckley@dabrev.com")) (:maintainers ("Troy Hinckley" . "troy.hinckley@dabrev.com")) (:maintainer "Troy Hinckley" . "troy.hinckley@dabrev.com"))])
+ (icomplete-vertical . [(20220418 2119) ((emacs (26 1))) "Display icomplete candidates vertically" tar ((:url . "https://github.com/oantolin/icomplete-vertical") (:commit . "f5775d535630199703c936380d210d38249b342c") (:revdesc . "f5775d535630") (:keywords "convenience" "completion") (:authors ("Omar Antolín Camarena" . "omar@matem.unam.mx")) (:maintainers ("Omar Antolín Camarena" . "omar@matem.unam.mx")) (:maintainer "Omar Antolín Camarena" . "omar@matem.unam.mx"))])
+ (icsql . [(20231021 1949) ((emacs (26)) (choice-program (0 13)) (buffer-manage (0 12))) "Interactive iSQL iteraface to ciSQL" tar ((:url . "https://github.com/plandes/icsql") (:commit . "24c013486fd56386946eadc9a2f653e9f0d3f4de") (:revdesc . "24c013486fd5") (:keywords "isql" "sql" "rdbms" "data"))])
+ (id-manager . [(20170320 1246) nil "Id-password management" tar ((:url . "https://github.com/kiwanami/emacs-id-manager") (:commit . "14ebc35db298aac4dedc8aa188bc46bacab81f3b") (:revdesc . "14ebc35db298") (:keywords "password" "convenience") (:authors ("SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net")) (:maintainers ("SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net")) (:maintainer "SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net"))])
+ (idea-darkula-theme . [(20230617 2005) ((emacs (24 1))) "Color theme based on IntelliJ IDEA Darkula color theme" tar ((:url . "https://github.com/fourier/idea-darkula-theme") (:commit . "2ba08b6b7c0f75d460d81e1f02114a6449bb1868") (:revdesc . "2ba08b6b7c0f") (:keywords "themes") (:authors ("Alexey Veretennikov" . "alexeydotveretennikovatgmaildotcom")) (:maintainers ("Alexey Veretennikov" . "alexeydotveretennikovatgmaildotcom")) (:maintainer "Alexey Veretennikov" . "alexeydotveretennikovatgmaildotcom"))])
+ (identica-mode . [(20130204 2253) nil "Major mode API client for status.net open microblogging" tar ((:url . "http://blog.gabrielsaldana.org/identica-mode-for-emacs/") (:commit . "cf9183ee11ac922e85c7c908f04e2d00b03111b3") (:revdesc . "cf9183ee11ac") (:keywords "identica" "web") (:authors ("Gabriel Saldana" . "gsaldana@gmail.com")) (:maintainers ("Gabriel Saldana" . "gsaldana@gmail.com")) (:maintainer "Gabriel Saldana" . "gsaldana@gmail.com"))])
+ (idle-highlight-in-visible-buffers-mode . [(20240107 1344) nil "Highlight the word the point is on" tar ((:url . "https://github.com/ignacy/idle-highlight-in-visible-buffers") (:commit . "f1f7ed3148439398adc6c0fe8ecf100d976886e6") (:revdesc . "f1f7ed314843") (:keywords "convenience"))])
+ (idle-highlight-mode . [(20260108 1311) ((emacs (29 1))) "Highlight the word the point is on" tar ((:url . "https://codeberg.org/ideasman42/emacs-idle-highlight-mode") (:commit . "83aa002c837fc6c6e4ce7069c169875beeb1d41e") (:revdesc . "83aa002c837f") (:keywords "convenience") (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (idle-org-agenda . [(20190106 1844) nil "Shows your agenda when editor is idle" tar ((:url . "https://github.com/enisozgen/idle-org-agenda") (:commit . "bfdf1b4f4096acdd081b3549d6b838f4ca4f7d0d") (:revdesc . "bfdf1b4f4096") (:keywords "org" "org-mode" "org-agenda" "calendar") (:authors ("John Wiegley" . "jwiegley@gmail.com")) (:maintainers ("Enis zgen" . "mail@enisozgen.com")) (:maintainer "Enis zgen" . "mail@enisozgen.com"))])
+ (idle-require . [(20090715 2203) nil "Load elisp libraries while Emacs is idle" tar ((:url . "http://nschum.de/src/emacs/idle-require/") (:commit . "33592bb098223b4432d7a35a1d65ab83f47c1ec1") (:revdesc . "33592bb09822") (:keywords "internal") (:authors ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainers ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainer "Nikolaj Schumacher" . "bugs*nschumde"))])
+ (ido-at-point . [(20151113 1508) ((emacs (24))) "Ido-style completion-at-point" tar ((:url . "https://github.com/katspaugh/ido-at-point") (:commit . "e5907bbe8a3d148d07698b76bd994dc3076e16ee") (:revdesc . "e5907bbe8a3d") (:keywords "convenience" "abbrev"))])
+ (ido-complete-space-or-hyphen . [(20210206 1505) nil "Allow spaces to also match hyphens in ido" tar ((:url . "https://github.com/DarwinAwardWinner/ido-complete-space-or-hyphen") (:commit . "d1244243e042b8d5b6b991db752a17a44ea169bc") (:revdesc . "d1244243e042") (:keywords "ido" "completion" "convenience") (:authors ("Ryan C. Thompson" . "rct@thompsonclan.org") ("Ian Yang" . "meiany.me")) (:maintainers ("Ryan C. Thompson" . "rct@thompsonclan.org")) (:maintainer "Ryan C. Thompson" . "rct@thompsonclan.org"))])
+ (ido-completing-read+ . [(20240130 30) ((emacs (24 4)) (seq (0 5)) (memoize (1 1))) "A completing-read-function using ido" tar ((:url . "https://github.com/DarwinAwardWinner/ido-completing-read-plus") (:commit . "1609049c0a9b3f674ffff3083adc8f5359746fa9") (:revdesc . "1609049c0a9b") (:keywords "ido" "completion" "convenience") (:authors ("Ryan C. Thompson" . "rct@thompsonclan.org")) (:maintainers ("Ryan C. Thompson" . "rct@thompsonclan.org")) (:maintainer "Ryan C. Thompson" . "rct@thompsonclan.org"))])
+ (ido-exit-target . [(20170717 1851) ((emacs (24 4))) "Commands and keys for selecting other window and frame targets within ido" tar ((:url . "https://github.com/waymondo/ido-exit-target") (:commit . "e56fc6928649c87ccf39d56d84ab53ebaced1f73") (:revdesc . "e56fc6928649") (:keywords "convenience" "tools" "extensions") (:authors ("justin talbott" . "justin@waymondo.com")) (:maintainers ("justin talbott" . "justin@waymondo.com")) (:maintainer "justin talbott" . "justin@waymondo.com"))])
+ (ido-flex-with-migemo . [(20190408 350) ((flx-ido (0 6 1)) (migemo (1 9 1)) (emacs (24 4))) "Use ido with flex and migemo" tar ((:url . "https://github.com/ROCKTAKEY/ido-flex-with-migemo") (:commit . "aa93aa05947eb6c106bb9523ff3163b8574c4eac") (:revdesc . "aa93aa05947e") (:keywords "matching") (:authors ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "ROCKTAKEY" . "rocktakey@gmail.com"))])
+ (ido-gnus . [(20140216 1646) ((gnus (5 13))) "Access gnus groups or servers using ido" tar ((:url . "https://github.com/vapniks/ido-gnus") (:commit . "f5fe3f6aa8086f675ba216abace9e3d5f2e3a089") (:revdesc . "f5fe3f6aa808") (:keywords "comm") (:authors ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainers ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainer "Joe Bloggs" . "vapniks@yahoo.com"))])
+ (ido-grid-mode . [(20160122 1139) ((emacs (24 4))) "Display ido-prospects in the minibuffer in a grid" tar ((:url . "https://github.com/larkery/ido-grid-mode.el") (:commit . "7cfca3988a6dc3ad18e28abe114218095ff2366f") (:revdesc . "7cfca3988a6d") (:keywords "convenience") (:maintainers ("Tom Hinton" . "t@larkery.com")) (:maintainer "Tom Hinton" . "t@larkery.com"))])
+ (ido-hacks . [(20190206 2153) nil "Put more IDO in your IDO" tar ((:url . "https://github.com/scottjad/ido-hacks") (:commit . "d2153a3e8d23436ee07ecae2a106f434361a10c5") (:revdesc . "d2153a3e8d23") (:keywords "convenience") (:maintainers ("Scott Jaderholm" . "jaderholm@gmail.com")) (:maintainer "Scott Jaderholm" . "jaderholm@gmail.com"))])
+ (ido-load-library . [(20140611 1600) ((persistent-soft (0 8 8)) (pcache (0 2 3))) "Load-library alternative using ido-completing-read" tar ((:url . "https://github.com/rolandwalker/ido-load-library") (:commit . "f439559721c5fecb2572dcaf3e357c5d94a20f4a") (:revdesc . "f439559721c5") (:keywords "maint" "completion") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (ido-migemo . [(20191017 1919) ((migemo (1 9 1))) "Migemo plug-in for Ido" tar ((:url . "https://github.com/myuhe/ido-migemo.el") (:commit . "09a2cc175b500cab7655a25ffc982e78d46ca669") (:revdesc . "09a2cc175b50") (:keywords "files") (:authors ("myuhe" . "yuhei.maeda_at_gmail.com")))])
+ (ido-occasional . [(20150214 1248) ((emacs (24 1))) "Use ido where you choose" tar ((:url . "https://github.com/abo-abo/ido-occasional") (:commit . "d405f1795e1e0c63be411ee2825184738d29c33a") (:revdesc . "d405f1795e1e") (:keywords "completion") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (ido-select-window . [(20131220 2047) ((emacs (24 1))) "Select a window using ido and buffer names" tar ((:url . "https://github.com/pjones/ido-select-window") (:commit . "946db3db7a3fec582cc1a0097877f1250303b53a") (:revdesc . "946db3db7a3f") (:authors ("Peter Jones" . "pjones@devalot.com")) (:maintainers ("Peter Jones" . "pjones@devalot.com")) (:maintainer "Peter Jones" . "pjones@devalot.com"))])
+ (ido-skk . [(20151111 950) ((emacs (24 4)) (ddskk (20150912 1820))) "Ido interface for skk henkan" tar ((:url . "https://github.com/tsukimizake/ido-skk") (:commit . "89a2e62799bff2841ff634517c86084c4ce69246") (:revdesc . "89a2e62799bf") (:keywords "languages") (:authors ("tsukimizake" . "shomasd_at_gmail.com")) (:maintainers ("tsukimizake" . "shomasd_at_gmail.com")) (:maintainer "tsukimizake" . "shomasd_at_gmail.com"))])
+ (ido-sort-mtime . [(20171121 859) nil "Sort Ido's file list by modification time" tar ((:url . "https://github.com/pkkm/ido-sort-mtime") (:commit . "f638ff0c922af862f5211779f2311a27fde428eb") (:revdesc . "f638ff0c922a") (:keywords "convenience" "files"))])
+ (ido-springboard . [(20170106 755) nil "Temporarily change default-directory for one command" tar ((:url . "https://github.com/jwiegley/springboard") (:commit . "263a8cd4582c81bfc29d7db37d5267e2488b148c") (:revdesc . "263a8cd4582c") (:keywords "ido") (:authors ("John Wiegley" . "jwiegley@gmail.com")) (:maintainers ("John Wiegley" . "jwiegley@gmail.com")) (:maintainer "John Wiegley" . "jwiegley@gmail.com"))])
+ (ido-vertical-mode . [(20260420 1855) ((emacs (24 4))) "Makes ido-mode display vertically" tar ((:url . "https://github.com/creichert/ido-vertical-mode.el") (:commit . "58ad6d8b645e6211c7c564a4fbebf39a72691c7e") (:revdesc . "58ad6d8b645e") (:keywords "convenience") (:maintainers ("Christopher Reichert" . "creichert07@gmail.com")) (:maintainer "Christopher Reichert" . "creichert07@gmail.com"))])
+ (ido-yes-or-no . [(20161108 2351) ((ido-completing-read+ (0))) "Use Ido to answer yes-or-no questions" tar ((:url . "https://github.com/DarwinAwardWinner/ido-yes-or-no") (:commit . "8953eadaaa7811ebc66d8a9eb7ac43f38913ab59") (:revdesc . "8953eadaaa78") (:keywords "convenience" "completion" "ido"))])
+ (idomenu . [(20141123 2120) nil "Imenu tag selection a la ido" tar ((:url . "https://github.com/birkenfeld/idomenu") (:commit . "4b0152d606360c70204fb4c27f68de79ca885386") (:revdesc . "4b0152d60636") (:authors ("Georg Brandl" . "georg@python.org")) (:maintainers ("Georg Brandl" . "georg@python.org")) (:maintainer "Georg Brandl" . "georg@python.org"))])
+ (idris-mode . [(20260506 2033) ((emacs (24)) (prop-menu (0 1)) (cl-lib (0 5))) "Major mode for editing Idris code" tar ((:url . "https://github.com/idris-hackers/idris-mode") (:commit . "22cc1bf237428b24de5f4f228db747e93a4ae619") (:revdesc . "22cc1bf23742") (:keywords "languages"))])
+ (ids-edit . [(20170818 1502) ((emacs (24 3))) "IDS (Ideographic Description Sequence) editing tool" tar ((:url . "https://github.com/kawabata/ids-edit") (:commit . "8562a6cbfb3f2d44bc6f62ab15081a80f8fee502") (:revdesc . "8562a6cbfb3f") (:keywords "i18n" "wp") (:authors ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (iedit . [(20251017 410) nil "Edit multiple regions in the same way simultaneously" tar ((:url . "https://github.com/victorhge/iedit") (:commit . "7e513d573c6a5dd2a01aeeb1d8587d74630a2f80") (:revdesc . "7e513d573c6a") (:keywords "occurrence" "region" "simultaneous" "refactoring") (:authors ("Victor Ren" . "victorhge@gmail.com")) (:maintainers ("Victor Ren" . "victorhge@gmail.com")) (:maintainer "Victor Ren" . "victorhge@gmail.com"))])
+ (ietf-docs . [(20190420 851) nil "Fetch, Cache and Load IETF documents" tar ((:url . "https://github.com/choppsv1/ietf-docs") (:commit . "ae157549eae5ec78dcbf215c2f48cb662b73abd0") (:revdesc . "ae157549eae5") (:keywords "ietf" "rfc") (:authors ("Christian E. Hopps" . "chopps@gmail.com")) (:maintainers ("Christian E. Hopps" . "chopps@gmail.com")) (:maintainer "Christian E. Hopps" . "chopps@gmail.com"))])
+ (iflipb . [(20220612 858) nil "Interactively flip between recently visited buffers" tar ((:url . "https://github.com/jrosdahl/iflipb") (:commit . "9ec1888335107bd314e8f40b3e113d525fed8083") (:revdesc . "9ec188833510") (:authors ("Joel Rosdahl" . "joel@rosdahl.net")) (:maintainers ("Joel Rosdahl" . "joel@rosdahl.net")) (:maintainer "Joel Rosdahl" . "joel@rosdahl.net"))])
+ (igist . [(20260816 757) ((emacs (29 1)) (ghub (4 2 2)) (transient (0 8 5))) "List, create, update and delete GitHub gists" tar ((:url . "https://github.com/KarimAziev/igist") (:commit . "2c19cf33044cda8408e15bca48771c13c09d71a1") (:revdesc . "2c19cf33044c") (:keywords "tools") (:authors ("Karim Aziiev" . "karim.aziiev@gmail.com")) (:maintainers ("Karim Aziiev" . "karim.aziiev@gmail.com")) (:maintainer "Karim Aziiev" . "karim.aziiev@gmail.com"))])
+ (ignoramus . [(20220611 1514) ((emacs (24 3))) "Ignore backups, build files, et al" tar ((:url . "https://github.com/rolandwalker/ignoramus") (:commit . "f5e4a66191be12c2fc3cf42a5e0849fcc8518a3f") (:revdesc . "f5e4a66191be") (:keywords "convenience" "tools") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (igv . [(20141210 1227) nil "Control Integrative Genomic Viewer within Emacs" tar ((:commit . "47ac6ceede252f451348a2c696398c0cb5279555") (:revdesc . "47ac6ceede25") (:authors ("Stefano Barbi" . "stefanobarbi@gmail.com")) (:maintainers ("Stefano Barbi" . "stefanobarbi@gmail.com")) (:maintainer "Stefano Barbi" . "stefanobarbi@gmail.com"))])
+ (image+ . [(20150707 1616) ((cl-lib (0 3))) "Image manipulate extensions for Emacs" tar ((:url . "https://github.com/mhayashi1120/Emacs-imagex") (:commit . "6834d0c09bb4df9ecc0d7a559bd7827fed48fffc") (:revdesc . "6834d0c09bb4") (:keywords "multimedia" "extensions") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (image-archive . [(20150621 132) ((emacs (24)) (cl-lib (0 5))) "Image thumbnails in archive file with non-blocking" tar ((:url . "https://github.com/mhayashi1120/Emacs-image-archive") (:commit . "4cf0edabfd6a4da2ffb920ff1e5009a002fc1e53") (:revdesc . "4cf0edabfd6a") (:keywords "multimedia") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (image-dired+ . [(20150430 544) ((cl-lib (0 3))) "Image-dired extensions" tar ((:url . "https://github.com/mhayashi1120/Emacs-image-diredx") (:commit . "b68094625d963056ad64e0e44af0e2266b2eadc7") (:revdesc . "b68094625d96") (:keywords "extensions" "multimedia") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (imakado . [(20141024 923) nil "Imakado's usefull macros and functions" tar ((:url . "https://github.com/imakado/emacs-imakado") (:commit . "00a1e7eea2cb9e9066343a23927d6c747707902f") (:revdesc . "00a1e7eea2cb") (:keywords "convenience") (:authors ("imakado" . "ken.imakado_at_gmail.com")))])
+ (imake . [(20260813 2139) ((emacs (28 1)) (compat (31 0)) (marginalia (2 11))) "Simple, opinionated make target runner" tar ((:url . "https://github.com/tarsius/imake") (:commit . "8a5cfb021de517027492c77acf772823425cbc12") (:revdesc . "8a5cfb021de5") (:keywords "convenience") (:authors ("Jonas Bernoulli" . "emacs.imake@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.imake@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.imake@jonas.bernoulli.dev"))])
+ (imbot . [(20260606 428) ((emacs (29 1))) "Emacs input method" tar ((:url . "https://github.com/QiangF/imbot") (:commit . "69d1551bbca9c991a4cfe3ccb133d862854ee1c7") (:revdesc . "69d1551bbca9") (:keywords "convenience" "input method" "dbus"))])
+ (imenu-anywhere . [(20210201 1704) ((cl-lib (0 5)) (emacs (25))) "Ido/ivy/helm imenu across same mode/project/etc buffers" tar ((:url . "https://github.com/vitoshka/imenu-anywhere") (:commit . "06ec33d79e33edf01b9118aead1eabeae8ee08b1") (:revdesc . "06ec33d79e33") (:keywords "ido" "imenu" "tags") (:authors ("Vitalie Spinu" . "spinuvit.list[aaattt]gmail[dot]com")) (:maintainers ("Vitalie Spinu" . "spinuvit.list[aaattt]gmail[dot]com")) (:maintainer "Vitalie Spinu" . "spinuvit.list[aaattt]gmail[dot]com"))])
+ (imenu-extra . [(20201229 1035) ((emacs (25 1))) "Add extra items into existing imenu items" tar ((:url . "https://github.com/redguardtoo/imenu-extra") (:commit . "68b0aaaefc18b267e4e383df36a8dfb7448bc83c") (:revdesc . "68b0aaaefc18") (:keywords "convenience") (:authors ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainers ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainer "Chen Bin" . "chenbinDOTshATgmailDOTcom"))])
+ (imenu-list . [(20210420 1200) ((emacs (24 3))) "Show imenu entries in a separate buffer" tar ((:url . "https://github.com/bmag/imenu-list") (:commit . "76f2335ee6f2f066d87fe4e4729219d70c9bc70d") (:revdesc . "76f2335ee6f2"))])
+ (imenus . [(20200730 855) ((cl-lib (0 5))) "Imenu for multiple buffers and without subgroups" tar ((:url . "https://github.com/alezost/imenus.el") (:commit . "90200f5f22377903b405082eabe185447968f3e2") (:revdesc . "90200f5f2237") (:keywords "tools" "convenience") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (imgbb . [(20180609 1649) ((emacs (24)) (request (0 3 0))) "Simple image upload client for imgbb.com" tar ((:url . "https://github.com/ecraven/imgbb.el") (:commit . "a524a46263835aa474f908827ebab4e8fa586001") (:revdesc . "a524a4626383") (:keywords "extensions") (:authors ("Peter" . "craven@gmx.net")) (:maintainers ("Peter" . "craven@gmx.net")) (:maintainer "Peter" . "craven@gmx.net"))])
+ (imgur . [(20241201 1257) ((emacs (27 1))) "Imgur client" tar ((:url . "https://github.com/KeyWeeUsr/imgur") (:commit . "9a7f47d6da3f6a7365f8575c0403f05398ad05c5") (:revdesc . "9a7f47d6da3f") (:keywords "convenience" "imgur" "client") (:authors ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainers ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainer "Peter Badida" . "keyweeusr@gmail.com"))])
+ (immaterial-theme . [(20260802 918) ((emacs (31))) "A family of themes loosely based on material colors" tar ((:url . "https://github.com/petergardfjall/emacs-immaterial-theme") (:commit . "1dcbade9c4b4dd1bb3c112f0f82c7bf9264036b2") (:revdesc . "1dcbade9c4b4") (:keywords "themes"))])
+ (immersive-translate . [(20231001 1557) ((emacs (28 2))) "Translate the current buffer immersively" tar ((:url . "https://github.com/Elilif/emacs-immersive-translate") (:commit . "1d00d558363985fa988fc40cd5093bfc6926d83e") (:revdesc . "1d00d5583639") (:keywords "convenience" "help" "translate") (:authors ("Eli Qian" . "eli.q.qian@gmail.com")) (:maintainers ("Eli Qian" . "eli.q.qian@gmail.com")) (:maintainer "Eli Qian" . "eli.q.qian@gmail.com"))])
+ (immortal-scratch . [(20160517 2118) nil "Respawn the scratch buffer when it's killed" tar ((:url . "https://github.com/jpkotta/immortal-scratch") (:commit . "faeab0ad6c33c74c0cbd1dfcebffaa0690de40c6") (:revdesc . "faeab0ad6c33") (:authors ("Jonathan Kotta" . "jpkotta@gmail.com")) (:maintainers ("Jonathan Kotta" . "jpkotta@gmail.com")) (:maintainer "Jonathan Kotta" . "jpkotta@gmail.com"))])
+ (impatient-mode . [(20260426 1323) ((emacs (27 1)) (simple-httpd (1 5 0)) (htmlize (1 40))) "Serve buffers live over HTTP" tar ((:url . "https://github.com/skeeto/impatient-mode") (:commit . "4bb8009c6c6a6339a8fd7b4dea4a165af3721812") (:revdesc . "4bb8009c6c6a") (:authors ("Brian Taylor" . "el.wubo@gmail.com") ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (impatient-showdown . [(20260101 600) ((emacs (24 3)) (impatient-mode (1 1))) "Preview markdown buffer live over HTTP using showdown" tar ((:url . "https://github.com/jcs-elpa/impatient-showdown") (:commit . "19c4f7b2561bce8b0e186655660a22ed369707eb") (:revdesc . "19c4f7b2561b") (:keywords "convenience" "live" "preview" "markdown" "http" "server" "impatient") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (import-js . [(20220215 1948) ((grizzl (0 1 0)) (emacs (24))) "Import Javascript dependencies" tar ((:url . "https://github.com/Galooshi/emacs-import-js/") (:commit . "d2bbb53f96395415f9f01de4fa88d82c1f59ba63") (:revdesc . "d2bbb53f9639") (:keywords "javascript") (:authors ("Kevin Kehl" . "kevin.kehl@gmail.com")) (:maintainers ("Kevin Kehl" . "kevin.kehl@gmail.com")) (:maintainer "Kevin Kehl" . "kevin.kehl@gmail.com"))])
+ (import-popwin . [(20170218 1407) ((emacs (24 3)) (popwin (0 6))) "Popwin buffer near by import statements with popwin" tar ((:url . "https://github.com/syohex/emacs-import-popwin") (:commit . "bb05a9e226f8c63fe7b18a3e92010357049ab5ba") (:revdesc . "bb05a9e226f8") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (importmagic . [(20180520 303) ((f (0 11 0)) (epc (0 1 0)) (emacs (24 3))) "Fix Python imports using importmagic" tar ((:url . "https://github.com/anachronic/importmagic.el") (:commit . "e32ee9f6a5eef937b76eba82fdae8bae85d18088") (:revdesc . "e32ee9f6a5ee") (:keywords "languages" "convenience") (:authors ("Nicolás Salas V." . "nikosalas@gmail.com")) (:maintainers ("Nicolás Salas V." . "nikosalas@gmail.com")) (:maintainer "Nicolás Salas V." . "nikosalas@gmail.com"))])
+ (impostman . [(20260805 1020) ((emacs (27 1))) "Import Postman collections" tar ((:url . "https://github.com/flashcode/impostman") (:commit . "341e44c3586e83412782a8b35cc184693e5fdba7") (:revdesc . "341e44c3586e") (:keywords "tools") (:authors ("Sébastien Helleu" . "flashcode@flashtux.org")) (:maintainers ("Sébastien Helleu" . "flashcode@flashtux.org")) (:maintainer "Sébastien Helleu" . "flashcode@flashtux.org"))])
+ (incus-tramp . [(20240917 906) ((emacs (24 4))) "TRAMP integration for Incus containers" tar ((:url . "https://gitlab.com/lckarssen/incus-tramp.git") (:commit . "dfeb8381bcde28209bafb45b03bb8d6795aedb61") (:revdesc . "dfeb8381bcde") (:keywords "incus" "convenience") (:authors ("Lennart C. Karssen" . "lennart@karssen.org")) (:maintainers ("Lennart C. Karssen" . "lennart@karssen.org")) (:maintainer "Lennart C. Karssen" . "lennart@karssen.org"))])
+ (indent-control . [(20260128 1027) ((emacs (26 1))) "Management for indentation level" tar ((:url . "https://github.com/jcs-elpa/indent-control") (:commit . "8bd4a44c2ae51f781bc3b86f09869f71343ca1ff") (:revdesc . "8bd4a44c2ae5") (:keywords "convenience" "control" "indent" "tab" "generic" "level") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (indent-guide . [(20260629 918) nil "Show vertical lines to guide indentation" tar ((:url . "http://zk-phi.github.io/") (:commit . "1332f95d6f08afee35f62621793e2622b9f86f27") (:revdesc . "1332f95d6f08"))])
+ (indent-info . [(20210111 745) ((emacs (24 3))) "Show indentation information in status bar" tar ((:url . "https://github.com/terlar/indent-info.el") (:commit . "05a787afeb9946714d8b0c724868195a678db49e") (:revdesc . "05a787afeb99") (:keywords "convenience" "tools") (:authors ("Terje Larsen" . "terlar@gmail.com")) (:maintainers ("Terje Larsen" . "terlar@gmail.com")) (:maintainer "Terje Larsen" . "terlar@gmail.com"))])
+ (indent-lint . [(20260516 852) ((emacs (27 1)) (async-await (1 1)) (async (1 9 7)) (promise (1 1))) "Async indentation checker" tar ((:url . "https://github.com/conao3/indent-lint.el") (:commit . "3660b10520d78dd545fd0c52d7e7a36dc602492d") (:revdesc . "3660b10520d7") (:keywords "tools") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (indent-tools . [(20210622 1207) ((s (0)) (hydra (0)) (yafolding (0))) "Indent, navigate (and more) by blocks of indentation: yaml, python etc" tar ((:url . "https://gitlab.com/emacs-stuff/indent-tools/") (:commit . "c731f05fa3950e2e8580ec61b88abbc705639830") (:revdesc . "c731f05fa395") (:keywords "indentation" "movements" "navigation" "kill" "fold" "yaml" "python") (:authors ("vindarel" . "vindarel@mailz.org")) (:maintainers ("vindarel" . "vindarel@mailz.org")) (:maintainer "vindarel" . "vindarel@mailz.org"))])
+ (indentinator . [(20251103 2132) ((emacs (25 1))) "Automatically indent code" tar ((:url . "https://github.com/xendk/indentinator.el") (:commit . "79ddeb38d9679616b7a843a88b22866f3b3cd9f6") (:revdesc . "79ddeb38d967") (:keywords "convenience") (:authors ("Thomas Fini Hansen" . "xen@xen.dk")) (:maintainers ("Thomas Fini Hansen" . "xen@xen.dk")) (:maintainer "Thomas Fini Hansen" . "xen@xen.dk"))])
+ (indian-ext . [(20231009 740) ((emacs (24))) "Extension to Indian language utilities" tar ((:url . "https://github.com/paddymcall/indian-ext") (:commit . "80ea22eea203c8eb4c28f59fceb8d276395ecb0f") (:revdesc . "80ea22eea203") (:keywords "i18n" "tools" "wp" "indian" "devanagari" "encoding") (:authors ("Patrick McAllister" . "pma@rdorte.org")) (:maintainers ("Patrick McAllister" . "pma@rdorte.org")) (:maintainer "Patrick McAllister" . "pma@rdorte.org"))])
+ (indicators . [(20240321 2029) ((dash (2 13 0)) (cl-lib (0 5 0))) "Display the buffer relative location of line in the fringe" tar ((:url . "https://github.com/Fuco1/indicators.el") (:commit . "9b80c4545fc5c50332b2748c30d492517ae583b5") (:revdesc . "9b80c4545fc5") (:keywords "fringe" "frames") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (indigo . [(20260506 1617) ((emacs (25 1))) "Emacs interface to the Indigo cheminformatics library" tar ((:url . "https://github.com/gicrisf/emacs-indigo") (:commit . "86433c884f5ef591ff8250b3322e5e9abd8a502d") (:revdesc . "86433c884f5e") (:keywords "data" "tools" "extensions") (:authors ("Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com")) (:maintainers ("Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com")) (:maintainer "Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com"))])
+ (indium . [(20210309 1210) ((emacs (25)) (seq (2 16)) (js2-mode (20140114)) (js2-refactor (0 9 0)) (company (0 9 0)) (json-process-client (0 2 0))) "JavaScript Awesome Development Environment" tar ((:url . "https://github.com/NicolasPetton/indium") (:commit . "8499e156bf7286846c3a2bf8c9e0c4d4f24b224c") (:revdesc . "8499e156bf72") (:keywords "tools" "javascript") (:authors ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainers ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainer "Nicolas Petton" . "nicolas@petton.fr"))])
+ (indy . [(20190807 625) nil "A minor mode and EDSL to manage your mode's indentation rules" tar ((:url . "https://github.com/kwrooijen/indy") (:commit . "abc5bee424780ad2de5520f8fefbf8e120c0d9ed") (:revdesc . "abc5bee42478") (:keywords "convenience" "matching" "tools") (:authors ("Kevin W. van Rooijen" . "kevin.van.rooijen@attichacker.com")) (:maintainers ("Kevin W. van Rooijen" . "kevin.van.rooijen@attichacker.com")) (:maintainer "Kevin W. van Rooijen" . "kevin.van.rooijen@attichacker.com"))])
+ (inf-clojure . [(20260227 658) ((emacs (28 1)) (clojure-mode (5 11))) "Basic interaction with a Clojure REPL" tar ((:url . "https://github.com/clojure-emacs/inf-clojure") (:commit . "4d3b8fae32caf91e0f9432004bbe861f54ce9c0c") (:revdesc . "4d3b8fae32ca") (:keywords "processes" "comint" "clojure") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.dev") ("Olin Shivers" . "shivers@cs.cmu.edu")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (inf-crystal . [(20180119 211) ((emacs (24 3)) (crystal-mode (0 1 0))) "Run a Inferior-Crystal process in a buffer" tar ((:url . "https://github.com/brantou/inf-crystal.el") (:commit . "dd5c85e621976ea09b602182a15396e3b510ec63") (:revdesc . "dd5c85e62197") (:keywords "languages" "crystal") (:authors ("Brantou" . "brantou89@gmail.com")) (:maintainers ("Brantou" . "brantou89@gmail.com")) (:maintainer "Brantou" . "brantou89@gmail.com"))])
+ (inf-elixir . [(20251106 2146) ((emacs (25 1))) "Run an interactive Elixir shell" tar ((:url . "https://github.com/J3RN/inf-elixir") (:commit . "085f1c198a121c569a161f9fa71e6cce1998cd63") (:revdesc . "085f1c198a12") (:keywords "languages" "processes" "tools") (:authors ("Jonathan Arnett" . "j3rn@j3rn.com")) (:maintainers ("Jonathan Arnett" . "j3rn@j3rn.com")) (:maintainer "Jonathan Arnett" . "j3rn@j3rn.com"))])
+ (inf-ruby . [(20251224 216) ((emacs (26 1))) "Run a Ruby process in a buffer" tar ((:url . "https://github.com/nonsequitur/inf-ruby") (:commit . "274398a24288a7db430a656b580ffbf889ca02aa") (:revdesc . "274398a24288") (:keywords "languages" "ruby") (:authors ("Cornelius Mika" . "cornelius.mika@gmail.com") ("Dmitry Gutov" . "dgutov@yandex.ru") ("Kyle Hargraves" . "pd@krh.me")) (:maintainers ("Dmitry Gutov" . "dmitry@gutov.dev")) (:maintainer "Dmitry Gutov" . "dmitry@gutov.dev"))])
+ (inferior-islisp . [(20220924 1040) ((emacs (26 3)) (islisp-mode (0 2))) "Run inferior ISLisp processes" tar ((:url . "https://gitlab.com/sasanidas/islisp-mode") (:commit . "423b84fe4cc6944e36971225b3e19c888e7e4690") (:revdesc . "423b84fe4cc6") (:keywords "islisp" "lisp" "programming") (:maintainers ("Fermin Munoz" . "fmfs@posteo.net")) (:maintainer "Fermin Munoz" . "fmfs@posteo.net"))])
+ (inflections . [(20210110 2237) ((cl-lib (0 5)) (emacs (24))) "Convert english words between singular and plural" tar ((:url . "https://github.com/eschulte/jump.el") (:commit . "55caa66a7cc6e0b1a76143fd40eff38416928941") (:revdesc . "55caa66a7cc6") (:keywords "languages" "tools" "wp"))])
+ (info-beamer . [(20210427 1033) ((emacs (24 4))) "Utilities for working with info-beamer" tar ((:url . "https://github.com/dakra/info-beamer.el") (:commit . "6b4cc29f1aec72d8e23b2c25a99cdd84e6cdc92b") (:revdesc . "6b4cc29f1aec") (:keywords "tools" "processes" "comm") (:authors ("Daniel Kraus" . "daniel@kraus.my")) (:maintainers ("Daniel Kraus" . "daniel@kraus.my")) (:maintainer "Daniel Kraus" . "daniel@kraus.my"))])
+ (info-buffer . [(20170112 1422) nil "Display info topics in separate buffers" tar ((:url . "http://www.github.com/llvilanova/info-buffer") (:commit . "d35dad6e766c6e2ddb8dc6acb4ce5b6e10fbcaa7") (:revdesc . "d35dad6e766c") (:keywords "docs" "info") (:authors ("Lluís Vilanova" . "vilanova@ac.upc.edu")) (:maintainers ("Lluís Vilanova" . "vilanova@ac.upc.edu")) (:maintainer "Lluís Vilanova" . "vilanova@ac.upc.edu"))])
+ (info-colors . [(20220927 1640) ((emacs (24)) (cl-lib (0 5))) "Extra colors for Info-mode" tar ((:url . "https://github.com/ubolonton/info-colors") (:commit . "2e237c301ba62f0e0286a27c1abe48c4c8441143") (:revdesc . "2e237c301ba6") (:keywords "faces") (:authors ("Tuấn-Anh Nguyễn" . "ubolonton@gmail.com")) (:maintainers ("Tuấn-Anh Nguyễn" . "ubolonton@gmail.com")) (:maintainer "Tuấn-Anh Nguyễn" . "ubolonton@gmail.com"))])
+ (info-nav . [(20260113 531) ((emacs (29 1))) "Browse info docs with a 2 pane layout" tar ((:url . "https://codeberg.org/ggxx/info-nav") (:commit . "eede340e73cecf435bda4ad27d386a98b8c02f36") (:revdesc . "eede340e73ce") (:keywords "docs" "hypermedia") (:authors ("ggxx" . "https://codeberg.org/ggxx")) (:maintainers ("ggxx" . "https://codeberg.org/ggxx")) (:maintainer "ggxx" . "https://codeberg.org/ggxx"))])
+ (info-rename-buffer . [(20200328 1450) ((emacs (24 3))) "Rename Info buffers to match manuals" tar ((:url . "https://github.com/oitofelix/info-rename-buffer") (:commit . "87fb263b18717538fd04878e3358e1e720415db8") (:revdesc . "87fb263b1871") (:keywords "help") (:authors ("Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org")) (:maintainers ("Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org")) (:maintainer "Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org"))])
+ (inform . [(20200723 500) ((emacs (25 1))) "Symbol links in Info buffers to their help documentation" tar ((:url . "https://github.com/dieter-wilhelm/inform") (:commit . "8ff0a19a9f40cfa8283da8ed73de94c35a327423") (:revdesc . "8ff0a19a9f40") (:keywords "help" "docs" "convenience") (:authors ("H. Dieter Wilhelm" . "dieter@duenenhof-wilhelm.de")))])
+ (inform-mode . [(20250602 2351) ((emacs (29 1))) "Major mode for Inform 6 interactive fiction code" tar ((:url . "https://rrthomas.github.io/inform-mode") (:commit . "e03289d0d056a6e35737612650c7a6060537f726") (:revdesc . "e03289d0d056") (:keywords "languages") (:authors ("Rupert Lane" . "rupert@rupert-lane.org") ("Gareth Rees" . "Gareth.Rees@cl.cam.ac.uk")) (:maintainers ("Reuben Thomas" . "rrt@sc3d.org")) (:maintainer "Reuben Thomas" . "rrt@sc3d.org"))])
+ (inform7 . [(20200430 1539) ((emacs (24 3)) (s (1 12 0))) "Major mode for working with Inform 7 files" tar ((:url . "https://github.com/GuiltyDolphin/inform7-mode") (:commit . "a409bbc6f04264f7f00616a995fa6ecf59d33d0d") (:revdesc . "a409bbc6f042") (:keywords "languages") (:authors ("Ben Moon" . "software@guiltydolphin.com")) (:maintainers ("Ben Moon" . "software@guiltydolphin.com")) (:maintainer "Ben Moon" . "software@guiltydolphin.com"))])
+ (inherit-local . [(20170409 1649) ((emacs (24 3))) "Inherited buffer-local variables" tar ((:url . "https://github.com/shlevy/inherit-local/tree-master/") (:commit . "b1f4ff9c41f9d64e4adaf5adcc280b82f084cdc7") (:revdesc . "b1f4ff9c41f9"))])
+ (inheritenv . [(20241119 1355) ((emacs (24 4))) "Make temp buffers inherit buffer-local environment variables" tar ((:url . "https://github.com/purcell/inheritenv") (:commit . "b9e67cc20c069539698a9ac54d0e6cc11e616c6f") (:revdesc . "b9e67cc20c06") (:keywords "unix") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (inhibit-mouse . [(20260826 246) ((emacs (24 1))) "Deactivate mouse input (alternative to disable-mouse)" tar ((:url . "https://github.com/jamescherti/inhibit-mouse.el") (:commit . "383919fdb0ab261deb4deb50e4652f1678df0e47") (:revdesc . "383919fdb0ab") (:keywords "convenience" "mouse") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (ini . [(20220827 2009) ((emacs (24 4))) "Converting between INI files and association lists" tar ((:url . "https://github.com/EsaLaine/ini.el") (:commit . "d50fe629497d51c6390a56bbded1ad77ce12e5af") (:revdesc . "d50fe629497d"))])
+ (ini-mode . [(20250103 1901) ((emacs (24 1))) "Major mode for Windows-style ini files" tar ((:url . "https://github.com/Lindydancer/ini-mode") (:commit . "d99a27548a650b8ad531634419ae55f7b4dbe2fa") (:revdesc . "d99a27548a65") (:keywords "languages" "faces"))])
+ (init-dir . [(20260104 1727) ((emacs (27 1)) (benchmark-init (1 2))) "Init directory instead of just a single file" tar ((:url . "https://github.com/chaosemer/init-dir") (:commit . "cc5a4676cbc698144c7a9bca465fccb5bdd4ace4") (:revdesc . "cc5a4676cbc6") (:keywords "extensions" "internal") (:authors ("Jared Finder" . "jared@finder.org")) (:maintainers ("Jared Finder" . "jared@finder.org")) (:maintainer "Jared Finder" . "jared@finder.org"))])
+ (init-loader . [(20250313 47) ((cl-lib (0 5))) "Loader for configuration files" tar ((:url . "https://github.com/emacs-jp/init-loader/") (:commit . "1837769c872b6453c7c02490f50a6eb322156c2c") (:revdesc . "1837769c872b") (:authors ("IMAKADO" . "ken.imakado@gmail.com")) (:maintainers ("IMAKADO" . "ken.imakado@gmail.com")) (:maintainer "IMAKADO" . "ken.imakado@gmail.com"))])
+ (init-open-recentf . [(20220220 2004) ((emacs (24 4))) "Invoke a command immediately after startup" tar ((:url . "https://github.com/zonuexe/init-open-recentf.el") (:commit . "51463effe54ca9390ec339b9678968f35a40dbfd") (:revdesc . "51463effe54c") (:keywords "files" "recentf" "after-init-hook") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (initsplit . [(20160919 1818) nil "Code to split customizations into different files" tar ((:url . "http://www.gci-net.com/users/j/johnw/emacs.html") (:commit . "c941d436eb2b10b01c76a582c5a2b23fb30751aa") (:revdesc . "c941d436eb2b") (:keywords "lisp") (:authors ("John Wiegley" . "johnw@gnu.org") ("Dave Abrahams" . "dave@boostpro.com")) (:maintainers ("John Wiegley" . "johnw@gnu.org") ("Dave Abrahams" . "dave@boostpro.com")) (:maintainer "John Wiegley" . "johnw@gnu.org"))])
+ (ink-mode . [(20260212 923) ((emacs (29 1))) "Major mode for writing interactive fiction in Ink" tar ((:url . "https://github.com/Kungsgeten/ink-mode") (:commit . "da2e7144837606f27ea6a5ea6d26229aeb0dd77e") (:revdesc . "da2e71448376") (:keywords "languages" "wp" "hypermedia"))])
+ (inkpot-theme . [(20250303 1039) ((emacs (24 1))) "A port of vim's inkpot theme" tar ((:url . "https://codeberg.org/ideasman42/emacs-inkpot-theme") (:commit . "a10b26fbee33dc8533a6688df51c540683f39134") (:revdesc . "a10b26fbee33") (:authors ("Sarah Iovan" . "sarah@hwaetageek.com") ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Sarah Iovan" . "sarah@hwaetageek.com") ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Sarah Iovan" . "sarah@hwaetageek.com"))])
+ (inline-crypt . [(20170824 900) nil "Simple inline encryption via openssl" tar ((:url . "https://github.com/Sodel-the-Vociferous/inline-crypt-el") (:commit . "af4981c613bfd355d5ef34da1995a8384f167fd9") (:revdesc . "af4981c613bf") (:keywords "crypt") (:authors ("Daniel Ralston" . "Wubbulous@gmail.com")) (:maintainers ("Daniel Ralston" . "Wubbulous@gmail.com")) (:maintainer "Daniel Ralston" . "Wubbulous@gmail.com"))])
+ (inline-docs . [(20260115 1353) ((emacs (24 3))) "Show inline contextual docs" tar ((:url . "https://repo.or.cz/inline-docs.git") (:commit . "977e4b6bb2e636335c9e72cc9ef5c922296ec3ae") (:revdesc . "977e4b6bb2e6") (:keywords "inline" "docs" "overlay") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (inlineR . [(20191017 1920) nil "Insert Tag for inline image of R graphics" tar ((:url . "https://github.com/myuhe/inlineR.el") (:commit . "bf6450a3540aa3538546d312324c41befd0a4e54") (:revdesc . "bf6450a3540a") (:keywords "convenience" "iimage.el" "cacoo.el") (:authors ("myuhe" . "yuhei.maeda_at_gmail.com")))])
+ (inputrc-mode . [(20241109 10) ((emacs (27 1))) "Major mode for readline configuration" tar ((:url . "https://github.com/nverno/inputrc-mode") (:commit . "2ccf09ae19f3cbb2b8c35dcd54ed333d688fffae") (:revdesc . "2ccf09ae19f3") (:keywords "languages" "readline" "config") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (insecure-lock . [(20230426 53) ((emacs (28 1))) "Extensible screen lock framework" tar ((:url . "https://github.com/BlueFlo0d/insecure-lock") (:commit . "33b2cf4ecf80d948cf0942aa8bc1787d44c99941") (:revdesc . "33b2cf4ecf80") (:keywords "unix" "screensaver" "security") (:authors ("Qiantan Hong" . "qhong@alum.mit.edu")) (:maintainers ("Qiantan Hong" . "qhong@alum.mit.edu")) (:maintainer "Qiantan Hong" . "qhong@alum.mit.edu"))])
+ (insert-char-preview . [(20201023 2108) ((emacs (24 1))) "Insert Unicode char" tar ((:url . "https://gitlab.com/matsievskiysv/insert-char-preview") (:commit . "8f13262ebcb3f271f1d188584d04ca6d87214111") (:revdesc . "8f13262ebcb3") (:keywords "convenience"))])
+ (insert-esv . [(20201201 722) ((emacs (24 3)) (request (0 3 2))) "Insert ESV Bible passages" tar ((:url . "https://github.com/sam030820/insert-esv/") (:commit . "b6b47f1521f221e0c2a215f1f802708e10294422") (:revdesc . "b6b47f1521f2") (:keywords "convenience"))])
+ (insert-kaomoji . [(20220215 1204) ((emacs (24 4))) "Easily insert kaomojis" tar ((:url . "https://git.sr.ht/~pkal/insert-kaomoji") (:commit . "974bb7dc02059253e032c501b2c3c0ece448d472") (:revdesc . "974bb7dc0205") (:keywords "wp") (:authors ("Philip Kaludercic" . "philipk@posteo.net")) (:maintainers ("Philip Kaludercic" . "~pkal/public-inbox@lists.sr.ht")) (:maintainer "Philip Kaludercic" . "~pkal/public-inbox@lists.sr.ht"))])
+ (insert-random . [(20230212 1710) ((emacs (24 5))) "Insert random characters from various character sets" tar ((:url . "https://github.com/lassik/emacs-insert-random") (:commit . "a13827fd68457f939e46f95a662752f6f344107c") (:revdesc . "a13827fd6845") (:keywords "convenience") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (insert-shebang . [(20201203 1648) nil "Insert shebang line automatically" tar ((:url . "https://gitlab.com/psachin/insert-shebang") (:commit . "cc8cea997a8523bce9f303de993af3a73eb0d2e2") (:revdesc . "cc8cea997a85") (:keywords "shebang" "tool" "convenience") (:authors ("Sachin Patil" . "iclcoolster@gmail.com")) (:maintainers ("Sachin Patil" . "iclcoolster@gmail.com")) (:maintainer "Sachin Patil" . "iclcoolster@gmail.com"))])
+ (insfactor . [(20141117 2) nil "Client for a Clojure project with insfactor in it" tar ((:url . "https://github.com/duelinmarkers/insfactor.el") (:commit . "7ef5446cebb08a17d4106d2e6f3c053e49e1e829") (:revdesc . "7ef5446cebb0") (:keywords "clojure") (:authors ("John D. Hume" . "duelin.markers@gmail.com")) (:maintainers ("John D. Hume" . "duelin.markers@gmail.com")) (:maintainer "John D. Hume" . "duelin.markers@gmail.com"))])
+ (inspire . [(20230514 1030) ((emacs (27 1))) "An interface for inspirehep.net" tar ((:url . "https://github.com/Simon-Lin/inspire.el") (:commit . "825bbd4e19046b0e61aa27a0f88b1daeaaebf1d0") (:revdesc . "825bbd4e1904") (:keywords "extensions" "tex") (:authors ("Simon Lin" . "n.sibetz@gmail.com")) (:maintainers ("Simon Lin" . "n.sibetz@gmail.com")) (:maintainer "Simon Lin" . "n.sibetz@gmail.com"))])
+ (insta-pocket . [(20250921 2201) ((emacs (29 1)) (oauth (1 11)) (tablist (1 0))) "Instapaper client" tar ((:url . "https://github.com/thanhvg/emacs-insta-pocket") (:commit . "33a735c3c5060b5e322aa4eb4e24665c01c3ba4b") (:revdesc . "33a735c3c506") (:authors ("Thanh Vuong" . "thanhvg@gmail.com")) (:maintainers ("Thanh Vuong" . "thanhvg@gmail.com")) (:maintainer "Thanh Vuong" . "thanhvg@gmail.com"))])
+ (instapaper . [(20110419 1355) nil "[No description available]" tar ((:url . "htts://bitbucket.org/jfm/emacs-instapaper") (:commit . "4714ed1b014615f8213e6f93637e4ec1d9d5a37a") (:revdesc . "4714ed1b0146") (:authors ("Jason F. McBrayer" . "jmcbray@carcosa.net")) (:maintainers ("Jason F. McBrayer" . "jmcbray@carcosa.net")) (:maintainer "Jason F. McBrayer" . "jmcbray@carcosa.net"))])
+ (intel-hex-mode . [(20180423 31) nil "Mode for Intel Hex files" tar ((:url . "https://github.com/mschuldt/intel-hex-mode") (:commit . "e83c94e1c31a8435a88b3ae395f2bc842ef83217") (:revdesc . "e83c94e1c31a") (:keywords "tools" "hex") (:authors ("Rubens Ramos" . "rubensrATusers.sourceforge.net")) (:maintainers ("Michael Schuldt" . "mbschuldt@gmail.com")) (:maintainer "Michael Schuldt" . "mbschuldt@gmail.com"))])
+ (intellij-theme . [(20171017 1415) nil "Inspired by IntelliJ's default theme" tar ((:url . "https://github.com/fommil/intellij-theme.el") (:commit . "1bbfff8e6742d18e9b77ed796f44da3b7bd10606") (:revdesc . "1bbfff8e6742") (:keywords "faces") (:authors ("Vladimir Polushin" . "vovapolu@gmail.com")) (:maintainers ("Vladimir Polushin" . "vovapolu@gmail.com")) (:maintainer "Vladimir Polushin" . "vovapolu@gmail.com"))])
+ (interaction-log . [(20160305 1301) ((cl-lib (0))) "Exhaustive log of interactions with Emacs" tar ((:url . "https://github.com/michael-heerdegen/interaction-log.el") (:commit . "0f2d773269d1f7b93c9281226719113f5410cbd0") (:revdesc . "0f2d773269d1") (:keywords "convenience") (:authors ("Michael Heerdegen" . "michael_heerdegen@web.de")) (:maintainers ("Michael Heerdegen" . "michael_heerdegen@web.de")) (:maintainer "Michael Heerdegen" . "michael_heerdegen@web.de"))])
+ (interval-list . [(20150327 1718) ((dash (2 4 0)) (cl-lib (0 5)) (emacs (24 4))) "Interval list data structure for 1D selections" tar ((:url . "https://github.com/Fuco1/interval-list") (:commit . "38af7ecf0a493ad8f487074938a2a115f3531177") (:revdesc . "38af7ecf0a49") (:keywords "extensions" "data structure") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (interval-tree . [(20130325 1407) ((dash (1 1 0))) "Interval tree data structure for 1D range queries" tar ((:url . "https://github.com/Fuco1/interval-tree") (:commit . "301302f480617091cf3ab6989caac385d52543dc") (:revdesc . "301302f48061") (:keywords "extensions" "data structure") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (inverse-acme-theme . [(20210204 1640) ((autothemer (0 2)) (cl-lib (0 5))) "A theme that looks like an inverse of Acme's color scheme" tar ((:url . "https://github.com/dcjohnson/inverse-acme-theme") (:commit . "79008920ce7923312ada6f95a3ec1f96ce513c0b") (:revdesc . "79008920ce79"))])
+ (io-mode . [(20161004 756) nil "Major mode to edit Io language files in Emacs" tar ((:url . "https://github.com/superbobry/io-mode") (:commit . "fd65ae769093defcf554d6d637eba6e6dfc29f56") (:revdesc . "fd65ae769093") (:keywords "languages" "io") (:authors ("Sergei Lebedev" . "superbobry@gmail.com")) (:maintainers ("Sergei Lebedev" . "superbobry@gmail.com")) (:maintainer "Sergei Lebedev" . "superbobry@gmail.com"))])
+ (io-mode-inf . [(20140128 1934) nil "Interaction with an Io interpreter" tar ((:url . "https://github.com/slackorama/io-emacs") (:commit . "6dd2bac3fd87484bb7d97e135b06c29d70b444b6") (:revdesc . "6dd2bac3fd87") (:keywords "io" "languages"))])
+ (iodine-theme . [(20250521 1145) ((emacs (24))) "A light emacs color theme" tar ((:url . "https://github.com/srdja/iodine-theme") (:commit . "305691881ddf9ba0ad698979f133394bd132f180") (:revdesc . "305691881ddf") (:keywords "themes") (:authors ("Srđan Panić" . "srdja.panic@gmail.com")) (:maintainers ("Srđan Panić" . "srdja.panic@gmail.com")) (:maintainer "Srđan Panić" . "srdja.panic@gmail.com"))])
+ (iosevka-theme . [(20250919 2228) ((emacs (28 1))) "Theme using various stylistic sets of Iosevka font" tar ((:url . "https://codeberg.org/mekeor/iosevka-theme") (:commit . "bef8c3ec7979937cfdde3054ce5fed2146bc3f87") (:revdesc . "bef8c3ec7979") (:keywords "faces" "theme") (:authors ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainers ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainer "Mekeor Melire" . "mekeor@posteo.de"))])
+ (iota . [(20230918 1028) nil "Replace marker with increasing integers" tar ((:url . "https://git.sr.ht/~mango/iota.el") (:commit . "c065c087567f074bff639eb12fa53018654b8ce2") (:revdesc . "c065c087567f") (:keywords "abbrev" "data" "wp") (:authors ("Thomas Voss" . "mail@thomasvoss.com")) (:maintainers ("Thomas Voss" . "mail@thomasvoss.com")) (:maintainer "Thomas Voss" . "mail@thomasvoss.com"))])
+ (ipcalc . [(20210903 958) ((cl-lib (0 5))) "IP subnet calculator" tar ((:url . "https://github.com/dotemacs/ipcalc.el") (:commit . "05fcb5bb8db3ba0c1f9e5f1bfcf0c183828a2426") (:revdesc . "05fcb5bb8db3") (:keywords "networking" "tools") (:authors ("Aleksandar Simic" . "asimic@gmail.com")) (:maintainers ("Aleksandar Simic" . "asimic@gmail.com")) (:maintainer "Aleksandar Simic" . "asimic@gmail.com"))])
+ (ipe . [(20241229 54) ((emacs (24 4))) "Insert, Update and Delete PAIRs using overlays" tar ((:url . "https://github.com/BriansEmacs/insert-pair-edit.el") (:commit . "5701e598a0d115a4f0261c82320d180e6be3045e") (:revdesc . "5701e598a0d1") (:keywords "convenience" "tools") (:authors ("Brian Kavanagh" . "brians.emacs@gmail.com")) (:maintainers ("Brian Kavanagh" . "brians.emacs@gmail.com")) (:maintainer "Brian Kavanagh" . "brians.emacs@gmail.com"))])
+ (iplayer . [(20240305 1633) nil "Browse and download BBC TV/radio shows" tar ((:url . "https://github.com/csrhodes/iplayer-el") (:commit . "62d3ca74e4f4d4f72f17e9075b06d0ba561ae5df") (:revdesc . "62d3ca74e4f4") (:keywords "multimedia" "bbc") (:authors ("Christophe Rhodes" . "csr21@cantab.net")) (:maintainers ("Christophe Rhodes" . "csr21@cantab.net")) (:maintainer "Christophe Rhodes" . "csr21@cantab.net"))])
+ (ipp . [(20251124 718) ((plz (0 9)) (emacs (28 1))) "Implementation of the Internet Printing Protocol" tar ((:url . "https://github.com/emarsden/ipp-el") (:commit . "8210d8a276ff4dfb67e3a2b4594a67be095edd45") (:revdesc . "8210d8a276ff") (:keywords "printing" "hardware") (:authors ("Eric Marsden" . "eric.marsden@risk-engineering.org")) (:maintainers ("Eric Marsden" . "eric.marsden@risk-engineering.org")) (:maintainer "Eric Marsden" . "eric.marsden@risk-engineering.org"))])
+ (ipretty . [(20180606 522) nil "Interactive Emacs Lisp pretty-printing" tar ((:url . "https://framagit.org/steckerhalter/ipretty") (:commit . "042f5cc4e6f81d59115e8335c582bb5c571c2585") (:revdesc . "042f5cc4e6f8") (:keywords "pretty-print" "elisp" "buffer"))])
+ (ipython-shell-send . [(20190220 2246) ((emacs (24))) "Send code (including magics) to ipython shell" tar ((:url . "https://github.com/jackkamm/ipython-shell-send-el") (:commit . "0faed86faff02a361f23ce5fc923d0e9b09bb2da") (:revdesc . "0faed86faff0") (:keywords "tools" "processes") (:authors ("Jack Kamm" . "jackkamm@gmail.com")) (:maintainers ("Jack Kamm" . "jackkamm@gmail.com")) (:maintainer "Jack Kamm" . "jackkamm@gmail.com"))])
+ (iqa . [(20201113 849) ((emacs (24 3))) "Init file(and directory) Quick Access" tar ((:url . "https://github.com/a13/iqa.el") (:commit . "eed962679783133e1ff6ae63d19efaeae4dadb6b") (:revdesc . "eed962679783"))])
+ (ir-black-theme . [(20130303 755) nil "Port of ir-black theme" tar ((:url . "https://github.com/jmdeldin/ir-black-theme.el") (:commit . "ee6078bc67cbc15184e64e0f1fc8542d4079d55f") (:revdesc . "ee6078bc67cb") (:keywords "faces") (:authors ("Jon-Michael Deldin" . "dev@jmdeldin.com")) (:maintainers ("Jon-Michael Deldin" . "dev@jmdeldin.com")) (:maintainer "Jon-Michael Deldin" . "dev@jmdeldin.com"))])
+ (iregister . [(20150515 2107) nil "Interactive register commands for Emacs" tar ((:url . "https://github.com/atykhonov/iregister.el") (:commit . "6a48c66187289de5f300492be11c83e98410c018") (:revdesc . "6a48c6618728") (:keywords "convenience") (:authors ("Andrey Tykhonov" . "atykhonov@gmail.com")) (:maintainers ("Andrey Tykhonov" . "atykhonov@gmail.com")) (:maintainer "Andrey Tykhonov" . "atykhonov@gmail.com"))])
+ (irony . [(20231018 1915) ((cl-lib (0 5)) (json (1 2))) "C/C++ minor mode powered by libclang" tar ((:url . "https://github.com/Sarcasm/irony-mode") (:commit . "40e0ce19eb850bdf1f77225f11713cc816250d95") (:revdesc . "40e0ce19eb85") (:keywords "c" "convenience" "tools") (:authors ("Guillaume Papin" . "guillaume.papin@epitech.eu")) (:maintainers ("Guillaume Papin" . "guillaume.papin@epitech.eu")) (:maintainer "Guillaume Papin" . "guillaume.papin@epitech.eu"))])
+ (irony-eldoc . [(20200622 2214) ((emacs (24)) (cl-lib (0 5)) (irony (0 1))) "Irony-mode support for eldoc-mode" tar ((:url . "https://github.com/ikirill/irony-eldoc") (:commit . "73e79a89fad982a2ba072f2fcc1b4e41f0aa2978") (:revdesc . "73e79a89fad9") (:keywords "c" "c++" "objc" "convenience" "tools") (:authors ("Kirill Ignatiev" . "github.com/ikirill")) (:maintainers ("Kirill Ignatiev" . "github.com/ikirill")) (:maintainer "Kirill Ignatiev" . "github.com/ikirill"))])
+ (iscroll . [(20220612 310) ((emacs (26 0))) "Smooth scrolling over images" tar ((:url . "https://github.com/casouri/iscroll") (:commit . "76aa4e7e72f907e95715351819d9efb6336b8238") (:revdesc . "76aa4e7e72f9") (:keywords "convenience" "image") (:authors ("Yuan Fu" . "casouri@gmail.com")) (:maintainers ("Yuan Fu" . "casouri@gmail.com")) (:maintainer "Yuan Fu" . "casouri@gmail.com"))])
+ (isearch-dabbrev . [(20141224 622) ((cl-lib (0 5))) "Use dabbrev in isearch" tar ((:url . "https://github.com/Dewdrops/isearch-dabbrev") (:commit . "1efe7abba4923015cbc2462395deaec5446a9cc8") (:revdesc . "1efe7abba492") (:keywords "dabbrev" "isearch") (:authors ("Dewdrops" . "v_v_4474@126.com")) (:maintainers ("Dewdrops" . "v_v_4474@126.com")) (:maintainer "Dewdrops" . "v_v_4474@126.com"))])
+ (isearch-project . [(20260101 600) ((emacs (27 1)) (f (0 20 0))) "Incremental search through the whole project" tar ((:url . "https://github.com/jcs-elpa/isearch-project") (:commit . "e67c997c9b36690a8b1b7712ff1ba9664020d8b2") (:revdesc . "e67c997c9b36") (:keywords "convenience" "search") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (isearch-symbol-at-point . [(20130728 2221) nil "Use isearch to search for the symbol at point" tar ((:url . "https://github.com/re5et/isearch-symbol-at-point") (:commit . "51a1029bec1ec414885f9edb7e5947603dffdab2") (:revdesc . "51a1029bec1e") (:keywords "isearch"))])
+ (isend-mode . [(20210106 1506) nil "Interactively send parts of an Emacs buffer to an interpreter" tar ((:url . "https://github.com/ffevotte/isend-mode.el") (:commit . "ea855f63be7febc15bd08aec6229fab9407734fb") (:revdesc . "ea855f63be7f") (:authors ("François Févotte" . "fevotte@gmail.com")) (:maintainers ("François Févotte" . "fevotte@gmail.com")) (:maintainer "François Févotte" . "fevotte@gmail.com"))])
+ (islisp-mode . [(20220924 1043) ((emacs (26 3))) "Major mode for ISLisp programming" tar ((:url . "https://gitlab.com/sasanidas/islisp-mode") (:commit . "bbf45d02495f9455e91beed01676178dfa5d3561") (:revdesc . "bbf45d02495f") (:keywords "islisp" "lisp" "programming") (:maintainers ("Fermin Munoz" . "fmfs@posteo.net")) (:maintainer "Fermin Munoz" . "fmfs@posteo.net"))])
+ (iso-639 . [(20251114 1512) ((emacs (27 1))) "ISO 639" tar ((:url . "https://codeberg.org/tomenzgg/emacs-iso-639") (:commit . "d55dbbea5291dd41de4ccd9662f6dfd610feacb5") (:revdesc . "d55dbbea5291") (:keywords "tools" "multilingual" "language" "iso-639") (:authors ("Jean Libète" . "tomenzgg@mail.mayfirst.org")) (:maintainers ("Jean Libète" . "tomenzgg@mail.mayfirst.org")) (:maintainer "Jean Libète" . "tomenzgg@mail.mayfirst.org"))])
+ (isortify . [(20230821 1632) ((emacs (25)) (pythonic (0 1 0))) "(automatically) format python buffers using isort" tar ((:url . "https://github.com/proofit404/isortify") (:commit . "5ee404c5bee2772b4f3ee424df0a5b0aef7e6982") (:revdesc . "5ee404c5bee2") (:keywords "convenience" "isort") (:authors ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainers ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainer "Artem Malyshev" . "proofit404@gmail.com"))])
+ (ispc-mode . [(20201215 852) nil "Syntax coloring for ispc programs" tar ((:url . "https://github.com/Munksgaard/ispc-mode") (:commit . "bedfff2528157d4bb0b75927c459631bebe2b1ce") (:revdesc . "bedfff252815") (:keywords "c" "ispc") (:authors ("Philip Munksgaard" . "philip@munksgaard.me")) (:maintainers ("Philip Munksgaard" . "philip@munksgaard.me")) (:maintainer "Philip Munksgaard" . "philip@munksgaard.me"))])
+ (iss-mode . [(20141001 1913) nil "Mode for InnoSetup install scripts" tar ((:url . "https://github.com/rasmus-toftdahl-olesen/iss-mode") (:commit . "3b517aff31529bab33f8d7b562bd17aff0107fd1") (:revdesc . "3b517aff3152") (:authors (nil . "stefan@xsteve.at")) (:maintainers (nil . "stefan@xsteve.at")) (:maintainer nil . "stefan@xsteve.at"))])
+ (itail . [(20171112 804) nil "An interactive tail mode" tar ((:url . "https://github.com/re5et/itail") (:commit . "6e43c20da03be3b9c6ece93b7dc3495975ec1888") (:revdesc . "6e43c20da03b") (:keywords "tail"))])
+ (itasca . [(20170601 1622) ((emacs (24 3))) "Major modes for Itasca software data files" tar ((:url . "https://github.com/jkfurtney/itasca-emacs/") (:commit . "3d15dd1b70d6db69b0f4758a3e28b8b506cc84ca") (:revdesc . "3d15dd1b70d6") (:keywords "itasca" "flac" "3dec" "udec" "flac3d" "pfc" "pfc2d" "pfc3d" "fish") (:authors ("Jason Furtney" . "jkfurtney@gmail.com")) (:maintainers ("Jason Furtney" . "jkfurtney@gmail.com")) (:maintainer "Jason Furtney" . "jkfurtney@gmail.com"))])
+ (iter2 . [(20250209 1516) ((emacs (25 1))) "Reimplementation of Elisp generators" tar ((:url . "https://github.com/doublep/iter2") (:commit . "632232b5ee627bf5d299db0b7714b3b687a0124c") (:revdesc . "632232b5ee62") (:keywords "elisp" "extensions") (:authors ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainers ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainer "Paul Pogonyshev" . "pogonyshev@gmail.com"))])
+ (iterator . [(20250504 1720) ((emacs (24)) (cl-lib (0 5))) "A library to create and use elisp iterators objects" tar ((:url . "https://github.com/thierryvolpiatto/iterator") (:commit . "9cbe0d1153ce03d11c75f1d2b010091092b476ea") (:revdesc . "9cbe0d1153ce") (:authors ("Thierry Volpiatto" . "thierrydotvolpiattoatgmaildotcom")) (:maintainers ("Thierry Volpiatto" . "thierrydotvolpiattoatgmaildotcom")) (:maintainer "Thierry Volpiatto" . "thierrydotvolpiattoatgmaildotcom"))])
+ (ivariants . [(20170823 224) ((emacs (24 3)) (ivs-edit (1 0))) "Ideographic variants editor and browser" tar ((:url . "https://github.com/kawabata/ivariants") (:commit . "ca0b74d32b5d2d77a45cc6ad6edc00be0ee85284") (:revdesc . "ca0b74d32b5d") (:keywords "i18n" "languages") (:authors ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (ivs-edit . [(20170818 1441) ((emacs (24 3)) (dash (2 6 0)) (cl-lib (1 0))) "IVS (Ideographic Variation Sequence) editing tool" tar ((:url . "https://github.com/kawabata/ivs-edit") (:commit . "5db39c234aa7393b591168a4fd0a9a4cbbca347d") (:revdesc . "5db39c234aa7") (:keywords "text") (:authors ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (ivy . [(20260413 2102) ((emacs (24 5))) "Incremental Vertical completYon" tar ((:url . "https://github.com/abo-abo/swiper") (:commit . "0d02f5063d36ff4fa6138f0973c83c6d3874fba0") (:revdesc . "0d02f5063d36") (:keywords "matching") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Basil L. Contovounesios" . "basil@contovou.net")) (:maintainer "Basil L. Contovounesios" . "basil@contovou.net"))])
+ (ivy-avy . [(20260101 2125) ((emacs (24 5)) (ivy (0 15 1)) (avy (0 5 0))) "Avy integration for Ivy" tar ((:url . "https://github.com/abo-abo/swiper") (:commit . "d489b4f0d48fd215119261d92de103c5b5580895") (:revdesc . "d489b4f0d48f") (:keywords "convenience") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Basil L. Contovounesios" . "basil@contovou.net")) (:maintainer "Basil L. Contovounesios" . "basil@contovou.net"))])
+ (ivy-bibtex . [(20210927 1205) ((bibtex-completion (1 0 0)) (ivy (0 13 0)) (cl-lib (0 5))) "A bibliography manager based on Ivy" tar ((:url . "https://github.com/tmalsburg/helm-bibtex") (:commit . "bb47f355b0da8518aa3fb516019120c14c8747c9") (:revdesc . "bb47f355b0da") (:authors ("Justin Burkett" . "justin@burkett.cc")) (:maintainers ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainer "Titus von der Malsburg" . "malsburg@posteo.de"))])
+ (ivy-clipmenu . [(20220202 2122) ((emacs (26 1)) (f (0 20 0)) (s (1 12 0)) (dash (2 16 0)) (ivy (0 13 0))) "Ivy client for clipmenu" tar ((:url . "https://github.com/wpcarro/ivy-clipmenu.el") (:commit . "7c200cd4732821187084fad23547ee3f58365062") (:revdesc . "7c200cd47328") (:authors ("William Carroll" . "wpcarro@gmail.com")) (:maintainers ("William Carroll" . "wpcarro@gmail.com")) (:maintainer "William Carroll" . "wpcarro@gmail.com"))])
+ (ivy-clojuredocs . [(20201129 2355) ((edn (1 1 2)) (ivy (0 12 0)) (emacs (24 4))) "Search for help in clojuredocs.org" tar ((:url . "https://github.com/wandersoncferreira/ivy-clojuredocs") (:commit . "8b6de19b3578c72d2b88f898e2290d94c04350f9") (:revdesc . "8b6de19b3578") (:keywords "matching") (:authors ("Wanderson Ferreira" . "iagwanderson@gmail.com")) (:maintainers ("Wanderson Ferreira" . "iagwanderson@gmail.com")) (:maintainer "Wanderson Ferreira" . "iagwanderson@gmail.com"))])
+ (ivy-emms . [(20231112 1621) ((ivy (0 13 0)) (emms (0 0)) (emacs (24 4))) "Ivy interface to emms tracks" tar ((:url . "https://github.com/franburstall/ivy-emms") (:commit . "3b1bda7be64ba5555672b6375c205e0f7d831bc0") (:revdesc . "3b1bda7be64b") (:keywords "multimedia") (:authors ("Fran Burstall" . "fran.burstall@gmail.com")) (:maintainers ("Fran Burstall" . "fran.burstall@gmail.com")) (:maintainer "Fran Burstall" . "fran.burstall@gmail.com"))])
+ (ivy-emoji . [(20200316 2351) ((emacs (26 1)) (ivy (0 13 0))) "Insert emojis with ivy" tar ((:url . "https://github.com/sbozzolo/ivy-emoji.git") (:commit . "45894a1f8f8c67b142e1dd1113f47d703dea0b59") (:revdesc . "45894a1f8f8c") (:keywords "emoji" "ivy" "convenience") (:authors ("Gabriele Bozzola" . "sbozzolator@gmail.com")) (:maintainers ("Gabriele Bozzola" . "sbozzolator@gmail.com")) (:maintainer "Gabriele Bozzola" . "sbozzolator@gmail.com"))])
+ (ivy-erlang-complete . [(20250210 1738) ((async (1 9)) (counsel (0 13 4)) (ivy (0 13 4)) (erlang (19 2)) (emacs (25 1))) "Erlang completion at point using ivy" tar ((:url . "https://github.com/s-kostyaev/ivy-erlang-complete") (:commit . "88bbfab802a58f157c1ff7886324eb4056b451c8") (:revdesc . "88bbfab802a5") (:keywords "languages" "tools") (:authors ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainers ("Sergey Kostyaev" . "feo.me@ya.ru")) (:maintainer "Sergey Kostyaev" . "feo.me@ya.ru"))])
+ (ivy-explorer . [(20190909 1921) ((emacs (25)) (ivy (0 10 0))) "Dynamic file browsing grid using ivy" tar ((:url . "https://github.com/clemera/ivy-explorer") (:commit . "a413966cfbcecacc082d99297fa1abde0c10d3f3") (:revdesc . "a413966cfbce") (:keywords "convenience" "files" "matching") (:authors ("Clemens Radermacher" . "clemera@posteo.net")) (:maintainers ("Clemens Radermacher" . "clemera@posteo.net")) (:maintainer "Clemens Radermacher" . "clemera@posteo.net"))])
+ (ivy-file-preview . [(20240101 1004) ((emacs (25 1)) (ivy (0 8 0)) (s (1 12 0)) (f (0 20 0))) "Preview the current ivy file selection" tar ((:url . "https://github.com/jcs-elpa/ivy-file-preview") (:commit . "c1ea280cffa52710fffb14b2285a9a9474d18fa5") (:revdesc . "c1ea280cffa5") (:keywords "convenience" "file" "ivy" "swiper" "preview" "select" "selection") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (ivy-fuz . [(20191222 946) ((emacs (25 1)) (fuz (1 3 0)) (ivy (0 13 0))) "Integration between fuz and ivy" tar ((:url . "https://github.com/Silex/ivy-fuz.el") (:commit . "f171ac73422a4bae1503d63d804e691482ed35b2") (:revdesc . "f171ac73422a") (:keywords "convenience") (:authors ("Zhu Zihao" . "all_but_last@163.com")) (:maintainers ("Philippe Vaucher" . "philippe.vaucher@gmail.com")) (:maintainer "Philippe Vaucher" . "philippe.vaucher@gmail.com"))])
+ (ivy-gitlab . [(20181228 826) ((s (1 9 0)) (dash (2 9 0)) (ivy (0 8 0)) (gitlab (0 8))) "Ivy interface to Gitlab" tar ((:url . "https://github.com/nlamirault/emacs-gitlab") (:commit . "8c2324c02119500f094c2f92dfaba4c9977ce1ba") (:revdesc . "8c2324c02119") (:keywords "gitlab" "ivy") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (ivy-historian . [(20210714 56) ((emacs (24 4)) (historian (20170111)) (ivy (0 8 0)) (flx (0 6 1))) "Persistently store selected minibuffer candidates" tar ((:url . "https://github.com/PythonNut/historian.el") (:commit . "852cb4e72c0f78c8dbb2c972bdcb4e7b0108ff4c") (:revdesc . "852cb4e72c0f") (:keywords "convenience" "ivy") (:authors ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainers ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainer "PythonNut" . "pythonnut@pythonnut.com"))])
+ (ivy-hoogle . [(20240102 908) ((emacs (28 1)) (async (1 9)) (ivy (0 13 2))) "Search Hoogle using ivy" tar ((:url . "https://github.com/aartamonau/ivy-hoogle") (:commit . "4b080018175b5770fd3571265bc846a4a845cdca") (:revdesc . "4b080018175b") (:keywords "matching" "haskell" "hoogle") (:authors ("Aliaksei Artamonau" . "aliaksiej.artamonau@gmail.com")) (:maintainers ("Aliaksei Artamonau" . "aliaksiej.artamonau@gmail.com")) (:maintainer "Aliaksei Artamonau" . "aliaksiej.artamonau@gmail.com"))])
+ (ivy-hydra . [(20260213 941) ((emacs (24 5)) (ivy (0 15 1)) (hydra (0 14 0))) "Additional key bindings for Ivy" tar ((:url . "https://github.com/abo-abo/swiper") (:commit . "4defb814ce00fbbc2cf2ad626e630a39f4da1456") (:revdesc . "4defb814ce00") (:keywords "convenience") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Basil L. Contovounesios" . "basil@contovou.net")) (:maintainer "Basil L. Contovounesios" . "basil@contovou.net"))])
+ (ivy-lobsters . [(20200818 1406) ((ivy (0 8 0)) (cl-lib (0 5))) "Browse lobste.rs stories with ivy" tar ((:url . "https://github.com/julienXX/ivy-lobsters") (:commit . "3f7f90751d15ebcf91253ef3cda18c0aa7d856ff") (:revdesc . "3f7f90751d15") (:authors ("Julien Blanchard" . "https://github.com/julienXX")) (:maintainers ("Julien Blanchard" . "https://github.com/julienXX")) (:maintainer "Julien Blanchard" . "https://github.com/julienXX"))])
+ (ivy-migemo . [(20230121 1934) ((emacs (24 3)) (ivy (0 13 0)) (migemo (1 9 2)) (nadvice (0 3))) "Use migemo on ivy" tar ((:url . "https://github.com/ROCKTAKEY/ivy-migemo") (:commit . "6022b24e72f073a7b5599f2dea611da3a1282378") (:revdesc . "6022b24e72f0") (:keywords "matching") (:authors ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "ROCKTAKEY" . "rocktakey@gmail.com"))])
+ (ivy-mpdel . [(20190428 920) ((emacs (25 1)) (ivy (0 10 0)) (libmpdel (1 0 0)) (mpdel (1 0 0))) "Ivy interface to navigate MPD" tar ((:url . "https://gitlab.petton.fr/mpdel/ivy-mpdel") (:commit . "a42dcc943914c71975c115195d38c739f25e475c") (:revdesc . "a42dcc943914") (:keywords "multimedia") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (ivy-omni-org . [(20200810 1050) ((emacs (25 1)) (ivy (0 13)) (dash (2 12))) "Browse anything in Org mode" tar ((:url . "https://github.com/akirak/ivy-omni-org") (:commit . "b6a27379bc40fd6530a84afc50b3f41cd488e0c9") (:revdesc . "b6a27379bc40") (:keywords "outlines") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (ivy-pass . [(20170812 1955) ((emacs (24)) (ivy (0 8 0)) (password-store (1 6 5))) "Ivy interface for pass" tar ((:url . "https://github.com/ecraven/ivy-pass/") (:commit . "5b523de1151f2109fdd6a8114d0af12eef83d3c5") (:revdesc . "5b523de1151f") (:keywords "pass" "password" "convenience" "data"))])
+ (ivy-posframe . [(20260127 50) ((emacs (26 0)) (posframe (1 0 0)) (ivy (0 13 0))) "Using posframe to show Ivy" tar ((:url . "https://github.com/tumashu/ivy-posframe") (:commit . "ede7b2121f176ab543ce6b73fd96e3eafd6d1505") (:revdesc . "ede7b2121f17") (:keywords "abbrev" "convenience" "matching" "ivy") (:authors ("Feng Shu" . "tumashu@163.com") ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (ivy-prescient . [(20260628 2243) ((emacs (25 1)) (prescient (6 1 0)) (ivy (0 11 0))) "Prescient.el + Ivy" tar ((:url . "https://github.com/raxod502/prescient.el") (:commit . "5649977fa7789e4615efeca09397ed7eccd06dfc") (:revdesc . "5649977fa778") (:keywords "extensions") (:authors ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainers ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainer "Radian LLC" . "contact+prescient@radian.codes"))])
+ (ivy-purpose . [(20160724 1003) ((emacs (24)) (ivy (0 8)) (window-purpose (1 5))) "Ivy Interface for Purpose" tar ((:url . "https://github.com/bmag/ivy-purpose") (:commit . "0495f2f3aed64d7e0028125e76a9a68f8fc4107e") (:revdesc . "0495f2f3aed6"))])
+ (ivy-rich . [(20230425 1422) ((emacs (25 1)) (ivy (0 13 0))) "More friendly display transformer for ivy" tar ((:url . "https://github.com/Yevgnen/ivy-rich") (:commit . "aff9b6bd53e0fdcf350ab83c90e64e651b47dba4") (:revdesc . "aff9b6bd53e0") (:keywords "convenience" "ivy") (:authors ("Yevgnen Koh" . "wherejoystarts@gmail.com")) (:maintainers ("Yevgnen Koh" . "wherejoystarts@gmail.com")) (:maintainer "Yevgnen Koh" . "wherejoystarts@gmail.com"))])
+ (ivy-rtags . [(20251228 2249) ((ivy (0 7 0)) (rtags (2 10))) "RTags completion back-end for ivy" tar ((:url . "https://github.com/Andersbakken/rtags") (:commit . "829a6298d6bfba8ed541570fcbe3daf5ce3135d0") (:revdesc . "829a6298d6bf") (:authors ("Jan Erik Hanssen" . "jhanssen@gmail.com") ("Anders Bakken" . "agbakken@gmail.com")) (:maintainers ("Jan Erik Hanssen" . "jhanssen@gmail.com") ("Anders Bakken" . "agbakken@gmail.com")) (:maintainer "Jan Erik Hanssen" . "jhanssen@gmail.com"))])
+ (ivy-searcher . [(20240101 1004) ((emacs (25 1)) (ivy (0 8 0)) (searcher (0 1 8)) (s (1 12 0)) (f (0 20 0))) "Ivy interface to use searcher" tar ((:url . "https://github.com/jcs-elpa/ivy-searcher") (:commit . "1b6f6aed1b371c45b5d8be8aaf6d6e89eba5e0f1") (:revdesc . "1b6f6aed1b37") (:keywords "convenience" "ivy" "interface" "searcher" "search" "replace" "grep" "ag" "rg") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (ivy-spotify . [(20210329 312) ((emacs (26 1)) (espotify (0 1)) (ivy (0 13 1))) "Search spotify with ivy" tar ((:url . "https://codeberg.org/jao/espotify") (:commit . "eefcb49d740570f6c874302d87be33e5b0ec54ff") (:revdesc . "eefcb49d7405") (:keywords "multimedia") (:authors ("Jose A Ortega Ruiz" . "jao@gnu.org")))])
+ (ivy-todo . [(20200323 2005) ((ivy (0 8 0)) (emacs (25))) "Manage org-mode TODOs with ivy" tar ((:url . "https://github.com/Kungsgeten/ivy-todo") (:commit . "d74501cd334b7d709659946c5e02b21cfd5507de") (:revdesc . "d74501cd334b") (:keywords "convenience") (:authors ("Erik Sjöstrand" . "sjostrand.erik@gmail.com")) (:maintainers ("Erik Sjöstrand" . "sjostrand.erik@gmail.com")) (:maintainer "Erik Sjöstrand" . "sjostrand.erik@gmail.com"))])
+ (ivy-xcdoc . [(20160917 1055) ((ivy (0 8 0)) (emacs (24 4))) "Search Xcode documents with ivy interface" tar ((:url . "https://github.com/hex2010/emacs-ivy-xcdoc") (:commit . "fbf264b0746182567b17fd7409fff8eed3658c71") (:revdesc . "fbf264b07461") (:keywords "ivy" "xcode" "xcdoc") (:authors ("C.T.Chen" . "chenct@7adybird.com")) (:maintainers ("C.T.Chen" . "chenct@7adybird.com")) (:maintainer "C.T.Chen" . "chenct@7adybird.com"))])
+ (ivy-xref . [(20211008 1103) ((emacs (25 1)) (ivy (0 10 0))) "Ivy interface for xref results" tar ((:url . "https://github.com/alexmurray/ivy-xref") (:commit . "a82e8e117d2dd62c28b6a3e3d6e4cfb11c0bda38") (:revdesc . "a82e8e117d2d") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (ivy-yasnippet . [(20200704 700) ((emacs (24 1)) (cl-lib (0 6)) (ivy (0 10 0)) (yasnippet (0 12 2)) (dash (2 14 1))) "Preview yasnippets with ivy" tar ((:url . "https://github.com/mkcms/ivy-yasnippet") (:commit . "83402d91b4eba5307f71884a72df8e11cc6a994e") (:revdesc . "83402d91b4eb") (:keywords "convenience") (:authors ("Michał Krzywkowski" . "k.michal@zoho.com")) (:maintainers ("Michał Krzywkowski" . "k.michal@zoho.com")) (:maintainer "Michał Krzywkowski" . "k.michal@zoho.com"))])
+ (ivy-ycmd . [(20180909 1225) ((ycmd (1 3)) (emacs (24)) (ivy (0 10 0)) (dash (2 14 1))) "Ivy interface to ycmd" tar ((:url . "https://github.com/abingham/emacs-ivy-ycmd") (:commit . "25bfee8f676e4ecbb645e4f30b47083410a00c58") (:revdesc . "25bfee8f676e") (:keywords "tools") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (ivy-youtube . [(20230503 1509) ((request (0 2 0)) (ivy (0 8 0)) (cl-lib (0 5))) "Query YouTube and play videos in your browser" tar ((:url . "https://github.com/squiter/ivy-youtube") (:commit . "e7a7cc860e967500857e5fd85d8e397c6d752ee1") (:revdesc . "e7a7cc860e96") (:keywords "youtube" "multimedia" "mpv" "vlc"))])
+ (iwd-manager . [(20260113 1101) ((emacs (26 1)) (promise (1 1))) "Manage IWD via the D-Bus interface" tar ((:url . "https://github.com/sarg/wpa-manager.el") (:commit . "e947dff1f5593b3b01b380cc195108649392b89a") (:revdesc . "e947dff1f559") (:authors ("Sergey Trofimov" . "sarg@sarg.org.ru")) (:maintainers ("Sergey Trofimov" . "sarg@sarg.org.ru")) (:maintainer "Sergey Trofimov" . "sarg@sarg.org.ru"))])
+ (ix . [(20131027 1657) ((grapnel (0 5 3))) "Emacs client for http://ix.io pastebin" tar ((:url . "http://www.github.com/theanalyst/ix.el") (:commit . "498dac674f4f1910d39087b1457c5da5465a0614") (:revdesc . "498dac674f4f") (:authors ("Abhishek L" . "abhishekl.2006@gmail.com")) (:maintainers ("Abhishek L" . "abhishekl.2006@gmail.com")) (:maintainer "Abhishek L" . "abhishekl.2006@gmail.com"))])
+ (j-mode . [(20260328 1226) nil "Major mode for editing J programs" tar ((:url . "https://github.com/zellio/j-mode") (:commit . "e49ef0692d73b320c281e40d9fa96b2c17073695") (:revdesc . "e49ef0692d73") (:keywords "j" "languages") (:authors ("Zachary Elliott" . "ZacharyElliott1@gmail.com")) (:maintainers ("Zachary Elliott" . "ZacharyElliott1@gmail.com")) (:maintainer "Zachary Elliott" . "ZacharyElliott1@gmail.com"))])
+ (jack . [(20221122 632) ((emacs (28 1))) "HTML generator library" tar ((:url . "https://github.com/tonyaldon/jack") (:commit . "3b4ea97fcc107d0ffd201ea695129af52f390113") (:revdesc . "3b4ea97fcc10") (:keywords "lisp" "html") (:authors ("Tony Aldon" . "tony.aldon.adm@gmail.com")) (:maintainers ("Tony Aldon" . "tony.aldon.adm@gmail.com")) (:maintainer "Tony Aldon" . "tony.aldon.adm@gmail.com"))])
+ (jack-connect . [(20220201 1417) nil "Manage jack connections within Emacs" tar ((:commit . "1acaebfe8f37f0194e95c3e812c9515a6f688eee") (:revdesc . "1acaebfe8f37") (:authors ("Stefano Barbi" . "stefanobarbi@gmail.com")) (:maintainers ("Stefano Barbi" . "stefanobarbi@gmail.com")) (:maintainer "Stefano Barbi" . "stefanobarbi@gmail.com"))])
+ (jack-ts-mode . [(20231110 1615) ((emacs (29 1))) "Major mode for jack buffers using tree-sitter" tar ((:url . "https://github.com/nverno/jack-ts-mode") (:commit . "f57f211d96608a90142619a925caeb8808e7c632") (:revdesc . "f57f211d9660") (:keywords "tree-sitter" "languages" "jack" "nand2tetris") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (jade-mode . [(20210908 2121) nil "Major mode for editing .jade files" tar ((:url . "https://github.com/brianc/jade-mode") (:commit . "111460b056838854e470a6383041a99f843b93ee") (:revdesc . "111460b05683") (:keywords "languages"))])
+ (jade-schema-mode . [(20251223 255) ((emacs (26 3))) "A major-mode for navigating Jade Platform schema files" tar ((:url . "https://github.com/danjacka/jade-schema-mode") (:commit . "9cc4f9b780ff40afd8dde21ab7f53a16401c3d09") (:revdesc . "9cc4f9b780ff") (:keywords "languages" "tools") (:authors ("Dan Jacka" . "danjacka@gmail.com")) (:maintainers ("Dan Jacka" . "danjacka@gmail.com")) (:maintainer "Dan Jacka" . "danjacka@gmail.com"))])
+ (jal . [(20260810 1507) ((emacs (28 1))) "Java Agent Loader (JAL) for JDTLS" tar ((:url . "https://github.com/saulotoledo/java-agent-loader") (:commit . "00cb7be8facea246906f74d70e07f84e16222b08") (:revdesc . "00cb7be8face") (:keywords "java" "languages" "tools") (:authors ("Saulo Toledo" . "saulotoledo@gmail.com")) (:maintainers ("Saulo Toledo" . "saulotoledo@gmail.com")) (:maintainer "Saulo Toledo" . "saulotoledo@gmail.com"))])
+ (jami-bot . [(20240203 1017) ((emacs (27 1))) "An extendable chat bot for the private messenger GNU Jami" tar ((:url . "https://gitlab.com/hperrey/jami-bot") (:commit . "c2ad37e2ada14b5551a83211cc4692b39be4e5fb") (:revdesc . "c2ad37e2ada1") (:keywords "comm" "jami" "messenger" "chat bot" "dbus") (:authors ("Hanno Perrey" . "hanno@hoowl.se")) (:maintainers ("Hanno Perrey" . "hanno@hoowl.se")) (:maintainer "Hanno Perrey" . "hanno@hoowl.se"))])
+ (jammer . [(20210508 1633) ((emacs (24 1))) "Punish yourself for using Emacs inefficiently" tar ((:url . "https://depp.brause.cc/jammer") (:commit . "a780e4c2adb2e85a4daadcefd1a2b189d761872f") (:revdesc . "a780e4c2adb2") (:keywords "games") (:authors ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (janet-mode . [(20210924 44) ((emacs (24 3))) "Defines a major mode for Janet" tar ((:url . "https://github.com/ALSchwalm/janet-mode") (:commit . "9e3254a0249d720d5fa5603f1f8c3ed0612695af") (:revdesc . "9e3254a0249d") (:authors ("Adam Schwalm" . "adamschwalm@gmail.com")) (:maintainers ("Adam Schwalm" . "adamschwalm@gmail.com")) (:maintainer "Adam Schwalm" . "adamschwalm@gmail.com"))])
+ (japanese-holidays . [(20201229 755) ((emacs (24 1)) (cl-lib (0 3))) "Calendar functions for the Japanese calendar" tar ((:url . "https://github.com/emacs-jp/japanese-holidays") (:commit . "324b6bf2f55ec050bef49e001caedaabaf4fa35d") (:revdesc . "324b6bf2f55e") (:keywords "calendar") (:authors ("Takashi Hattori" . "hattori@sfc.keio.ac.jp") ("Hiroya Murata" . "lapis-lazuli@pop06.odn.ne.jp")) (:maintainers ("Takashi Hattori" . "hattori@sfc.keio.ac.jp") ("Hiroya Murata" . "lapis-lazuli@pop06.odn.ne.jp")) (:maintainer "Takashi Hattori" . "hattori@sfc.keio.ac.jp"))])
+ (jape-mode . [(20140903 1506) nil "An Emacs editing mode mode for GATE's JAPE files" tar ((:url . "https://github.com/tanzoniteblack/jape-mode") (:commit . "27dbebc4de93eb887038fda7a11671349efe8dbb") (:revdesc . "27dbebc4de93") (:keywords "languages" "jape" "gate") (:authors ("Ryan Smith" . "rnsmith2@gmail.com")) (:maintainers ("Ryan Smith" . "rnsmith2@gmail.com")) (:maintainer "Ryan Smith" . "rnsmith2@gmail.com"))])
+ (jar-manifest-mode . [(20160501 26) nil "Major mode to edit JAR manifest files" tar ((:url . "https://github.com/omajid/jar-manifest-mode") (:commit . "270dae14c481300f75ed96dad3a5ae42ca928a1d") (:revdesc . "270dae14c481") (:keywords "convenience" "languages") (:authors ("Omair Majid" . "omair.majid@gmail.com")) (:maintainers ("Omair Majid" . "omair.majid@gmail.com")) (:maintainer "Omair Majid" . "omair.majid@gmail.com"))])
+ (jasminejs-mode . [(20150527 5) nil "A minor mode for manipulating jasmine test files" tar ((:url . "https://github.com/stoltene2/jasminejs-mode") (:commit . "23637d6718423d376eebbdaa4d6d914c7cab26ed") (:revdesc . "23637d671842") (:keywords "javascript" "jasmine") (:authors ("Eric Stolten" . "stoltene2@gmail.com")) (:maintainers ("Eric Stolten" . "stoltene2@gmail.com")) (:maintainer "Eric Stolten" . "stoltene2@gmail.com"))])
+ (jastadd-ast-mode . [(20260209 816) ((emacs (25))) "Major mode for editing JastAdd AST files" tar ((:url . "https://github.com/rudi/jastadd-ast-mode") (:commit . "b495089cd15876d5ac83289c5768d67dce3c28cd") (:revdesc . "b495089cd158") (:keywords "languages") (:authors ("Rudi Schlatte" . "rudi@constantly.at")) (:maintainers ("Rudi Schlatte" . "rudi@constantly.at")) (:maintainer "Rudi Schlatte" . "rudi@constantly.at"))])
+ (java-imports . [(20230713 2247) ((emacs (24 4)) (s (1 10 0)) (pcache (0 5 1))) "Code for dealing with Java imports" tar ((:url . "http://www.github.com/dakrone/emacs-java-imports") (:commit . "1489813795ecd061896e265720709040bd90d96f") (:revdesc . "1489813795ec") (:keywords "java" "kotlin") (:authors ("Lee Hinman" . "lee@writequit.org")) (:maintainers ("Lee Hinman" . "lee@writequit.org")) (:maintainer "Lee Hinman" . "lee@writequit.org"))])
+ (java-snippets . [(20160627 252) ((yasnippet (0 8 0))) "Yasnippets for Java" tar ((:url . "https://github.com/nekop/yasnippet-java-mode") (:commit . "738523debb1018439bda0ce70e00248154a600ac") (:revdesc . "738523debb10"))])
+ (javadoc-lookup . [(20160214 31) ((cl-lib (0 3))) "Javadoc Emacs integration with Maven" tar ((:url . "https://github.com/skeeto/javadoc-lookup") (:commit . "507a2dd443d60b537b8f779c1847e2cd0ccd1382") (:revdesc . "507a2dd443d6") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainer "Christopher Wellons" . "wellons@nullprogram.com"))])
+ (javap-mode . [(20120223 2208) nil "Javap major mode" tar ((:url . "https://github.com/hiredman/javap-mode") (:commit . "864c1130e204b2072e1d19cd027b6fce8ebe6629") (:revdesc . "864c1130e204"))])
+ (javelin . [(20260215 1847) ((emacs (28 1))) "Implementation of harpoon: bookmarks on steroids" tar ((:url . "https://github.com/DamianB-BitFlipper/javelin.el") (:commit . "e2f1ccad5a7ad0dd38f62773723353081d57bae8") (:revdesc . "e2f1ccad5a7a") (:keywords "tools" "languages"))])
+ (jaword . [(20210306 420) ((tinysegmenter (0 1)) (emacs (25 1))) "Minor-mode for handling Japanese words better" tar ((:url . "http://zk-phi.github.io/") (:commit . "783544a265f91b2e568b52311afb36e3691d5ad3") (:revdesc . "783544a265f9"))])
+ (jazz-theme . [(20230814 1916) nil "A warm color theme for Emacs 24+" tar ((:url . "https://github.com/donderom/jazz-theme") (:commit . "b936b392e3ea3b6968530e3d5e5fccb9c454b5f8") (:revdesc . "b936b392e3ea") (:authors ("Roman Parykin" . "donderom@ymail.com")) (:maintainers ("Roman Parykin" . "donderom@ymail.com")) (:maintainer "Roman Parykin" . "donderom@ymail.com"))])
+ (jbeam-mode . [(20251123 2213) ((emacs (24 4))) "Major mode for JBeam files" tar ((:url . "https://github.com/webdevred/jbeam-mode") (:commit . "7c16b603cb8e342533d20069603373a63a3ca7ca") (:revdesc . "7c16b603cb8e") (:keywords "languages"))])
+ (jbeans-theme . [(20200924 1946) ((emacs (24))) "Jbeans theme for GNU Emacs 24 (deftheme)" tar ((:url . "https://github.com/synic/jbeans-emacs") (:commit . "a63916a928324c42bfbe3016972c2ecff598b1ae") (:revdesc . "a63916a92832") (:authors ("Adam Olsen" . "arolsen@gmail.com")) (:maintainers ("Adam Olsen" . "arolsen@gmail.com")) (:maintainer "Adam Olsen" . "arolsen@gmail.com"))])
+ (jdecomp . [(20170224 2200) ((emacs (24 5))) "Interface to Java decompilers" tar ((:url . "https://github.com/xiongtx/jdecomp") (:commit . "692866abc83deedce62be8d6040cf24dda7fb7a8") (:revdesc . "692866abc83d") (:keywords "decompile" "java" "languages" "tools") (:authors ("Tianxiang Xiong" . "tianxiang.xiong@gmail.com")) (:maintainers ("Tianxiang Xiong" . "tianxiang.xiong@gmail.com")) (:maintainer "Tianxiang Xiong" . "tianxiang.xiong@gmail.com"))])
+ (jdee . [(20191102 1426) ((emacs (24 3)) (flycheck (30)) (memoize (1 0 1)) (dash (2 13 0)) (s (1 12 0))) "Java Development Environment for Emacs" tar ((:url . "https://github.com/jdee-emacs/jdee") (:commit . "b510a29f1fc1bea218a6230fb219922775687c78") (:revdesc . "b510a29f1fc1") (:keywords "java" "tools") (:authors ("Paul Kinnucan" . "pkinnucan@attbi.com")))])
+ (jedi . [(20250602 2107) ((emacs (24)) (jedi-core (0 2 2)) (auto-complete (1 4))) "A Python auto-completion for Emacs" tar ((:url . "https://github.com/tkf/emacs-jedi") (:commit . "0a92f57dcfd76f1daf6d382d1e2eb437784a71e0") (:revdesc . "0a92f57dcfd7") (:authors ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainers ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainer "Takafumi Arakaki" . "aka.tkfatgmail.com"))])
+ (jedi-core . [(20250602 2109) ((emacs (24)) (epc (0 1 0)) (python-environment (0 0 2)) (cl-lib (0 5))) "Common code of jedi.el and company-jedi.el" tar ((:url . "https://github.com/tkf/emacs-jedi") (:commit . "94a031d54c55d22aa36ad557f45c972cb3f5833b") (:revdesc . "94a031d54c55") (:authors ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainers ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainer "Takafumi Arakaki" . "aka.tkfatgmail.com"))])
+ (jedi-direx . [(20140310 936) ((jedi (0 1 2)) (direx (0 1 -3))) "Tree style source code viewer for Python buffer" tar ((:url . "https://github.com/tkf/emacs-jedi-direx") (:commit . "7a2e677400717ed12b959cb5988e7b3fb1c12117") (:revdesc . "7a2e67740071") (:authors ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainers ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainer "Takafumi Arakaki" . "aka.tkfatgmail.com"))])
+ (jeison . [(20190721 1651) ((emacs (25 1)) (dash (2 16 0))) "A library for declarative JSON parsing" tar ((:url . "https://github.com/SavchenkoValeriy/jeison") (:commit . "775b45657728c91f24f7508dfbc4d81a92b8e053") (:revdesc . "775b45657728") (:keywords "lisp" "json" "data-types") (:authors ("Valeriy Savchenko" . "sinmipt@gmail.com")) (:maintainers ("Valeriy Savchenko" . "sinmipt@gmail.com")) (:maintainer "Valeriy Savchenko" . "sinmipt@gmail.com"))])
+ (jekyll-modes . [(20141117 1314) ((polymode (0 2))) "Major modes (markdown and HTML) for authoring Jekyll content" tar ((:url . "https://github.com/fred-o/jekyll-modes") (:commit . "7cb10b50fd2883e3f7b10fdfd98f19f2f0b2381c") (:revdesc . "7cb10b50fd28") (:keywords "docs") (:authors ("Fredrik Appelberg" . "fredrik@milgrim.local")) (:maintainers ("Fredrik Appelberg" . "fredrik@milgrim.local")) (:maintainer "Fredrik Appelberg" . "fredrik@milgrim.local"))])
+ (jemdoc-mode . [(20170704 2027) ((emacs (24 3))) "Major mode for editing jemdoc files" tar ((:url . "https://github.com/drdv/jemdoc-mode") (:commit . "529b4d4681e1198b9892f340fdd6c3f1592a047a") (:revdesc . "529b4d4681e1") (:keywords "convenience" "usability") (:authors ("Dimitar Dimitrov" . "mail.mitko@gmail.com")) (:maintainers ("Dimitar Dimitrov" . "mail.mitko@gmail.com")) (:maintainer "Dimitar Dimitrov" . "mail.mitko@gmail.com"))])
+ (jenkins . [(20251022 2050) ((dash (2 12)) (emacs (24 3)) (json (1 4))) "Minimalistic Jenkins client for Emacs" tar ((:url . "https://github.com/rmuslimov/jenkins.el") (:commit . "10197d13b491811d4e066003dfc83fedeb21dd90") (:revdesc . "10197d13b491") (:keywords "jenkins" "convenience") (:authors ("Rustem Muslimov" . "r.muslimov@gmail.com")) (:maintainers ("Rustem Muslimov" . "r.muslimov@gmail.com")) (:maintainer "Rustem Muslimov" . "r.muslimov@gmail.com"))])
+ (jenkins-watch . [(20121004 2326) nil "Watch continuous integration build status" tar ((:url . "https://github.com/ataylor284/jenkins-watch") (:commit . "37b84dfbd98240a57ff798e1ff8bc7dba2913577") (:revdesc . "37b84dfbd982") (:authors ("Andrew Taylor" . "ataylor@redtoad.ca")) (:maintainers ("Andrew Taylor" . "ataylor@redtoad.ca")) (:maintainer "Andrew Taylor" . "ataylor@redtoad.ca"))])
+ (jenkinsfile-mode . [(20230525 2006) ((emacs (24)) (groovy-mode (2 0))) "Major mode for editing Jenkins declarative pipeline syntax" tar ((:url . "https://github.com/john2x/jenkinsfile-mode") (:commit . "568865ee419e0592de0dd0717d6769a66d9df111") (:revdesc . "568865ee419e"))])
+ (jest . [(20220807 2243) ((emacs (24 4)) (dash (2 18 0)) (magit-popup (2 12 0)) (projectile (0 14 0)) (s (1 12 0)) (js2-mode (20180301)) (cl-lib (0 6 1))) "Helpers to run jest" tar ((:url . "https://github.com/emiller88/emacs-jest/") (:commit . "c8145635c54bd7df9711000e889753d267afcdc4") (:revdesc . "c8145635c54b") (:keywords "jest" "javascript" "testing") (:authors ("Edmund Miller" . "edmund.a.miller@gmail.com")) (:maintainers ("Edmund Miller" . "edmund.a.miller@gmail.com")) (:maintainer "Edmund Miller" . "edmund.a.miller@gmail.com"))])
+ (jest-test-mode . [(20231209 1754) ((emacs (25 1))) "Minor mode for running Node.js tests using jest" tar ((:url . "https://github.com/rymndhng/jest-test-mode.el") (:commit . "a397507d8bb41e4aa6b97994f1d7512e78d3dee3") (:revdesc . "a397507d8bb4") (:authors ("Raymond Huang" . "rymndhng@gmail.com")) (:maintainers ("Raymond Huang" . "rymndhng@gmail.com")) (:maintainer "Raymond Huang" . "rymndhng@gmail.com"))])
+ (jet . [(20240730 1228) ((emacs (27 1)) (transient (0 3 7))) "Emacs integration for jet Clojure tool" tar ((:url . "https://github.com/ericdallo/jet.el") (:commit . "67ded216a0a6af0bb8d6874a7faea538912c0345") (:revdesc . "67ded216a0a6") (:keywords "tools") (:authors ("Eric Dallo" . "ercdll1337@gmail.com")) (:maintainers ("Eric Dallo" . "ercdll1337@gmail.com")) (:maintainer "Eric Dallo" . "ercdll1337@gmail.com"))])
+ (jetbrains . [(20180301 502) ((emacs (24 3)) (cl-lib (0 5)) (f (0 17))) "JetBrains IDE bridge" tar ((:url . "https://github.com/emacs-php/jetbrains.el") (:commit . "56f71a17d455581c10d48f6dbb31d9e2126227bf") (:revdesc . "56f71a17d455") (:keywords "tools" "php") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (jetbrains-darcula-theme . [(20230223 1901) nil "A complete port of the default JetBrains Darcula theme" tar ((:url . "https://github.com/ianpan870102/jetbrains-darcula-emacs-theme") (:commit . "46f153385e50998826ca13e18056c6a972768cfd") (:revdesc . "46f153385e50"))])
+ (jg-quicknav . [(20170809 130) ((s (1 9 0)) (cl-lib (0 5))) "Quickly navigate the file system to find a file" tar ((:url . "https://github.com/jeffgran/jg-quicknav") (:commit . "c8d53e774d63e68a944092c08a026b57da741038") (:revdesc . "c8d53e774d63") (:keywords "navigation") (:authors ("Jeff Gran" . "jeff@jeffgran.com")) (:maintainers ("Jeff Gran" . "jeff@jeffgran.com")) (:maintainer "Jeff Gran" . "jeff@jeffgran.com"))])
+ (jinja2-mode . [(20220117 807) nil "A major mode for jinja2" tar ((:url . "https://github.com/paradoxxxzero/jinja2-mode") (:commit . "03e5430a7efe1d163a16beaf3c82c5fd2c2caee1") (:revdesc . "03e5430a7efe"))])
+ (jinx . [(20260813 954) ((emacs (29 1)) (compat (31))) "Enchanted Spell Checker" tar ((:url . "https://github.com/minad/jinx") (:commit . "f776ca306801f3b4d26a458d5109ea586d52e716") (:revdesc . "f776ca306801") (:keywords "convenience" "text") (:authors ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (jira . [(20260315 1613) ((emacs (29 1)) (request (0 3 0)) (tablist (1 0)) (transient (0 8 3)) (magit-section (4 2 0))) "Emacs Interface to Jira" tar ((:url . "https://github.com/unmonoqueteclea/jira.el") (:commit . "1b1a43600ca138f3f8e56481bea6f629a4d877ec") (:revdesc . "1b1a43600ca1") (:authors ("Pablo González Carrizo" . "unmonoqueteclea@gmail.com")) (:maintainers ("Pablo González Carrizo" . "unmonoqueteclea@gmail.com")) (:maintainer "Pablo González Carrizo" . "unmonoqueteclea@gmail.com"))])
+ (jira-markup-mode . [(20150601 2109) nil "Emacs Major mode for JIRA-markup-formatted text files" tar ((:url . "https://github.com/mnuessler/jira-markup-mode") (:commit . "53bf083fdbece483f1351f32085b424b38c4c1f2") (:revdesc . "53bf083fdbec") (:keywords "jira" "markup") (:authors ("Matthias Nuessler" . "m.nuessler@web.de")) (:maintainers ("Matthias Nuessler" . "m.nuessler@web.de")) (:maintainer "Matthias Nuessler" . "m.nuessler@web.de"))])
+ (jiralib2 . [(20200520 2031) ((emacs (25)) (request (0 3)) (dash (2 14 1))) "JIRA REST API bindings to Elisp" tar ((:url . "https://github.com/nyyManni/jiralib2") (:commit . "c21c4e759eff549dbda11099f2f680b78d7f5a01") (:revdesc . "c21c4e759eff") (:keywords "comm" "jira" "rest" "api") (:authors ("Henrik Nyman" . "h@nyymanni.com")) (:maintainers ("Henrik Nyman" . "h@nyymanni.com")) (:maintainer "Henrik Nyman" . "h@nyymanni.com"))])
+ (jirascope . [(20240122 2130) ((emacs (25 1))) "A Jira client" tar ((:url . "https://github.com/Duckonaut/jirascope") (:commit . "61acd8d6adbd6b25ebcc5436b4dce6d5c6d2981c") (:revdesc . "61acd8d6adbd") (:keywords "tools") (:authors ("Stanisław Zagórowski" . "duckonaut@gmail.com")) (:maintainers ("Stanisław Zagórowski" . "duckonaut@gmail.com")) (:maintainer "Stanisław Zagórowski" . "duckonaut@gmail.com"))])
+ (jist . [(20161229 1721) ((emacs (24 4)) (dash (2 12 0)) (seq (1 11)) (let-alist (1 0 4)) (magit (2 1 0)) (request (0 2 0))) "Gist integration" tar ((:url . "https://github.com/emacs-pe/jist.el") (:commit . "ec4b27eb4051f0084cb3b1e4f19fab9e2db77665") (:revdesc . "ec4b27eb4051") (:keywords "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (jit-lock-stealth-progress . [(20240616 2345) ((emacs (29 1))) "JIT lock stealth mode-line progress" tar ((:url . "https://codeberg.org/ideasman42/emacs-jit-lock-stealth-progress") (:commit . "caf256543cfe5404333f5cf914a478d14b2ec102") (:revdesc . "caf256543cfe") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (jjdescription . [(20251011 159) ((emacs (25 1))) "Major mode for editing Jujutsu description files" tar ((:url . "https://github.com/necaris/jjdescription.el") (:commit . "cd2478f0e2f92cb823110caba22fe0eaafeed07e") (:revdesc . "cd2478f0e2f9") (:authors ("Rami Chowdhury" . "rami.chowdhury@gmail.com")) (:maintainers ("Rami Chowdhury" . "rami.chowdhury@gmail.com")) (:maintainer "Rami Chowdhury" . "rami.chowdhury@gmail.com"))])
+ (jknav . [(20121006 2025) nil "Automatically enable j/k keys for line-based navigation" tar ((:url . "https://github.com/aculich/jknav.el") (:commit . "861245715c728503dad6573278fdd75c271dbf8b") (:revdesc . "861245715c72") (:keywords "keyboard" "navigation") (:authors ("Aaron Culich" . "aculich@gmail.com")) (:maintainers ("Aaron Culich" . "aculich@gmail.com")) (:maintainer "Aaron Culich" . "aculich@gmail.com"))])
+ (jmespath . [(20240115 1310) ((emacs (24 3))) "Query JSON using jmespath" tar ((:url . "https://github.com/unresolvedcold/jmespath") (:commit . "d3a4a4abdd6804d3aef5e0d0c538abd27667b4c3") (:revdesc . "d3a4a4abdd68") (:keywords "json" "data" "languages" "tools") (:authors ("Shubham Kumar" . "unresolved.shubham@gmail.com")) (:maintainers ("Shubham Kumar" . "unresolved.shubham@gmail.com")) (:maintainer "Shubham Kumar" . "unresolved.shubham@gmail.com"))])
+ (jmt-mode . [(20240617 1034) ((emacs (27 1))) "JMT Mode" tar ((:url . "http://reluk.ca/project/Java/Emacs/") (:commit . "278db38c30bd556793c9ce0c939045e95dbb6f32") (:revdesc . "278db38c30bd") (:keywords "languages" "c") (:authors ("Michael Allan" . "mike@reluk.ca")) (:maintainers ("Michael Allan" . "mike@reluk.ca")) (:maintainer "Michael Allan" . "mike@reluk.ca"))])
+ (jonprl-mode . [(20160819 59) ((emacs (24 3)) (cl-lib (0 5)) (yasnippet (0 8 0))) "A major mode for editing JonPRL files" tar ((:url . "https://github.com/david-christiansen/jonprl-mode") (:commit . "6059bb64891fae45827174e044d6a87ac07172d8") (:revdesc . "6059bb64891f") (:keywords "languages") (:authors ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainers ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainer "David Raymond Christiansen" . "david@davidchristiansen.dk"))])
+ (journalctl-mode . [(20260110 1949) ((emacs (27 1))) "Sample major mode for  viewing output journalctl" tar ((:url . "https://github.com/SebastianMeisel/journalctl-mode") (:commit . "0b9294f8f2b53375aa4f4fb3eb7f73be7cd15add") (:revdesc . "0b9294f8f2b5") (:keywords "unix") (:authors ("Sebastian Meisel" . "sebastian.meisel@gmail.com")) (:maintainers ("Sebastian Meisel" . "sebastian.meisel@gmail.com")) (:maintainer "Sebastian Meisel" . "sebastian.meisel@gmail.com"))])
+ (jpop . [(20170410 1250) ((emacs (24)) (dash (2 11 0)) (cl-lib (0 5))) "Lightweight project caching and navigation framework" tar ((:url . "https://github.com/domtronn/jpop.el") (:commit . "7628b03260be96576b34459d45959ee77d8b2110") (:revdesc . "7628b03260be") (:keywords "project" "convenience") (:authors ("Dom Charlesworth" . "dgc336@gmail.com")) (:maintainers ("Dom Charlesworth" . "dgc336@gmail.com")) (:maintainer "Dom Charlesworth" . "dgc336@gmail.com"))])
+ (jq-format . [(20190428 1434) ((emacs (24)) (reformatter (0 3))) "Reformat JSON and JSONLines using jq" tar ((:url . "https://github.com/wbolster/emacs-jq-format") (:commit . "47e1c5adb89b37b4d53fe01302d8c675913c20e7") (:revdesc . "47e1c5adb89b") (:keywords "languages") (:authors ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "wouter bolsterlee" . "wouter@bolsterl.ee"))])
+ (jq-mode . [(20260821 1006) ((emacs (25 1))) "Edit jq scripts" tar ((:url . "https://github.com/ljos/jq-mode") (:commit . "558f2af06c34f12c52097f8db746169c28c35484") (:revdesc . "558f2af06c34") (:authors ("Bjarte Johansen" . "BjartedotJohansenatgmaildotcom")) (:maintainers ("Bjarte Johansen" . "BjartedotJohansenatgmaildotcom")) (:maintainer "Bjarte Johansen" . "BjartedotJohansenatgmaildotcom"))])
+ (jq-ts-mode . [(20250223 1411) ((emacs (29 1))) "Tree-sitter support for jq buffers" tar ((:url . "https://github.com/nverno/jq-ts-mode") (:commit . "3ac689c3c38be9117076de0bcc15510e369016c9") (:revdesc . "3ac689c3c38b") (:keywords "jq" "languages" "tree-sitter") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (jquery-doc . [(20150812 758) nil "JQuery api documentation interface for emacs" tar ((:url . "https://github.com/ananthakumaran/jquery-doc.el") (:commit . "24032284919b942ec27707d929bdd8bf48420062") (:revdesc . "24032284919b") (:keywords "docs" "jquery") (:authors ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainers ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainer "Anantha kumaran" . "ananthakumaran@gmail.com"))])
+ (js-auto-beautify . [(20161031 509) ((web-beautify (0 3 1)) (web-mode (14 0 27))) "Auto format you js/jsx file" tar ((:url . "https://github.com/Qquanwei/auto-beautify.el") (:commit . "6bc9fef474197ca1722cb1e9051b270f80cdd7cc") (:revdesc . "6bc9fef47419") (:authors (nil . "quanwei9958@126.com")) (:maintainers (nil . "quanwei9958@126.com")) (:maintainer nil . "quanwei9958@126.com"))])
+ (js-auto-format-mode . [(20180807 1352) ((emacs (24))) "Minor mode for auto-formatting JavaScript code" tar ((:url . "https://github.com/ybiquitous/js-auto-format-mode") (:commit . "29d245b4d126a5fc5153a4d8f17396be4165b4a6") (:revdesc . "29d245b4d126") (:keywords "languages") (:authors ("Masafumi Koba" . "ybiquitous@gmail.com")) (:maintainers ("Masafumi Koba" . "ybiquitous@gmail.com")) (:maintainer "Masafumi Koba" . "ybiquitous@gmail.com"))])
+ (js-codemod . [(20190921 941) ((emacs (24 4))) "Run js-codemod on current sentence or selected region" tar ((:url . "https://github.com/torgeir/js-codemod.el") (:commit . "056bdf3e5e0c807b8cf17edb5834179a90fb722b") (:revdesc . "056bdf3e5e0c") (:keywords "js" "codemod" "region") (:authors ("Torgeir Thoresen" . "@torgeir")) (:maintainers ("Torgeir Thoresen" . "@torgeir")) (:maintainer "Torgeir Thoresen" . "@torgeir"))])
+ (js-comint . [(20250807 352) ((emacs (28 1))) "JavaScript interpreter in window" tar ((:url . "https://github.com/redguardtoo/js-comint") (:commit . "41015e29c8f51f7a927b453d97e14bc0cd7054de") (:revdesc . "41015e29c8f5") (:keywords "javascript" "node" "inferior-mode" "convenience") (:authors ("Paul Huff" . "paul.huff@gmail.com") ("Stefano Mazzucco" . "MYFIRSTNAME-AT-CURSO-DOT-RE")) (:maintainers ("Chen Bin" . "chenbin.shATgmailDOTcom")) (:maintainer "Chen Bin" . "chenbin.shATgmailDOTcom"))])
+ (js-doc . [(20160715 434) nil "Insert JsDoc style comment easily" tar ((:url . "https://github.com/mooz/js-doc") (:commit . "f0606e89d5aa89146f96edb38cf69af0068a9d1e") (:revdesc . "f0606e89d5aa") (:keywords "document" "comment") (:authors ("mooz" . "stillpedant@gmail.com")) (:maintainers ("mooz" . "stillpedant@gmail.com")) (:maintainer "mooz" . "stillpedant@gmail.com"))])
+ (js-format . [(20170119 102) ((emacs (24 1)) (js2-mode (20101228))) "Format or transform code style using NodeJS server with different javascript formatter" tar ((:url . "https://github.com/futurist/js-format.el") (:commit . "544bda9be72b74ec2d442543ba60cff727d96669") (:revdesc . "544bda9be72b") (:keywords "js" "javascript" "format" "standard" "jsbeautify" "esformatter" "airbnb") (:authors ("James Yang" . "jamesyang999@gmail.com")) (:maintainers ("James Yang" . "jamesyang999@gmail.com")) (:maintainer "James Yang" . "jamesyang999@gmail.com"))])
+ (js-import . [(20230131 1900) ((emacs (24 4)) (f (0 19 0)) (projectile (0 14 0)) (dash (2 13 0))) "Import Javascript files from your current project or dependencies" tar ((:url . "https://github.com/jakoblind/js-import") (:commit . "9f8b6bc4f080c7146ce7ee5dd5a6572aeb6f1cc7") (:revdesc . "9f8b6bc4f080") (:keywords "tools") (:authors ("Jakob Lind" . "karl.jakob.lind@gmail.com")) (:maintainers ("Jakob Lind" . "karl.jakob.lind@gmail.com")) (:maintainer "Jakob Lind" . "karl.jakob.lind@gmail.com"))])
+ (js-pkg-mode . [(20251017 936) ((emacs (25 1))) "Minor mode for working with javascript projects" tar ((:url . "https://github.com/ovistoica/js-pkg-mode") (:commit . "4d7248b829b62c7ed8509c13bd959e78466bef77") (:revdesc . "4d7248b829b6") (:keywords "convenience" "project" "javascript" "package-manager") (:authors ("Ovi Stoica" . "ovidiu.stoica1094@gmail.com")) (:maintainers ("Ovi Stoica" . "ovidiu.stoica1094@gmail.com")) (:maintainer "Ovi Stoica" . "ovidiu.stoica1094@gmail.com"))])
+ (js-react-redux-yasnippets . [(20200316 1144) ((emacs (24 3)) (yasnippet (0 8 0))) "JavaScript,React,Redux yasnippets" tar ((:url . "https://github.com/sooqua/js-react-redux-yasnippets") (:commit . "9f509043f01fa59bff4daf31b2e95d63f8deab4a") (:revdesc . "9f509043f01f") (:keywords "convenience" "snippets"))])
+ (js-ts-defs . [(20251118 504) ((emacs (29 1))) "Find JavaScript variable definitions using tree-sitter" tar ((:url . "https://github.com/jacksonrayhamilton/js-ts-defs") (:commit . "6e6d052855133534c9a175a813f01aea428a6a68") (:revdesc . "6e6d05285513") (:keywords "languages" "javascript" "tree-sitter") (:authors ("Jackson Ray Hamilton" . "jackson@jacksonrayhamilton.com")) (:maintainers ("Jackson Ray Hamilton" . "jackson@jacksonrayhamilton.com")) (:maintainer "Jackson Ray Hamilton" . "jackson@jacksonrayhamilton.com"))])
+ (js2-closure . [(20170816 1918) ((js2-mode (20150909))) "Google Closure dependency manager" tar ((:url . "https://github.com/jart/js2-closure") (:commit . "74a75f001a8bc2b9c02b9e8b4557f7ee3c5f84fb") (:revdesc . "74a75f001a8b") (:keywords "javascript" "closure") (:authors ("Justine Tunney" . "jart@google.com")) (:maintainers ("Justine Tunney" . "jart@google.com")) (:maintainer "Justine Tunney" . "jart@google.com"))])
+ (js2-highlight-vars . [(20170418 1829) ((emacs (24 4)) (js2-mode (20150908))) "Highlight occurrences of the variable under cursor" tar ((:url . "http://mihai.bazon.net/projects/editing-javascript-with-emacs-js2-mode/js2-highlight-vars-mode") (:commit . "e3bb177e50f76b272e8073a94d4f46be6512a163") (:revdesc . "e3bb177e50f7") (:authors ("Mihai Bazon" . "mihai.bazon@gmail.com")) (:maintainers ("Mihai Bazon" . "mihai.bazon@gmail.com")) (:maintainer "Mihai Bazon" . "mihai.bazon@gmail.com"))])
+ (js2-mode . [(20260627 1342) ((emacs (24 1)) (cl-lib (0 5))) "Improved JavaScript editing mode" tar ((:url . "https://github.com/mooz/js2-mode/") (:commit . "41d0e7f5ef51109c682016baa6fc6846e03e8517") (:revdesc . "41d0e7f5ef51") (:keywords "languages" "javascript") (:authors ("Steve Yegge" . "steve.yegge@gmail.com") ("mooz" . "stillpedant@gmail.com") ("Dmitry Gutov" . "dmitry@gutov.dev")) (:maintainers ("Steve Yegge" . "steve.yegge@gmail.com") ("mooz" . "stillpedant@gmail.com") ("Dmitry Gutov" . "dmitry@gutov.dev")) (:maintainer "Steve Yegge" . "steve.yegge@gmail.com"))])
+ (js2-refactor . [(20250210 1811) ((js2-mode (20101228)) (s (1 9 0)) (multiple-cursors (1 0 0)) (dash (1 0 0)) (s (1 0 0)) (yasnippet (0 9 0 1))) "The beginnings of a JavaScript refactoring library in emacs" tar ((:url . "https://github.com/js-emacs/js2-refactor.el") (:commit . "e1177c728ae52a5e67157fb18ee1409d8e95386a") (:revdesc . "e1177c728ae5") (:keywords "conveniences") (:authors ("Magnar Sveen" . "magnars@gmail.com") ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com") ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (js2hl . [(20201119 816) ((emacs (25 1)) (js2-mode (20190219))) "Highlight/rename things using js2-mode parser" tar ((:url . "https://github.com/redguardtoo/js2hl") (:commit . "8a9a53a861d20ce51a382d6caef48ccd978d8212") (:revdesc . "8a9a53a861d2") (:keywords "convenience") (:authors ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainers ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainer "Chen Bin" . "chenbinDOTshATgmailDOTcom"))])
+ (js3-mode . [(20160515 1550) nil "An improved JavaScript editing mode" tar ((:url . "https://github.com/tamzinblake/js3-mode") (:commit . "7fceb21ec56aac7af4b189bb0c0d0cf620327f5a") (:revdesc . "7fceb21ec56a") (:keywords "javascript" "languages") (:authors ("Thom Blake" . "(webmaster@thomblake.com)")) (:maintainers ("Thom Blake" . "(webmaster@thomblake.com)")) (:maintainer "Thom Blake" . "(webmaster@thomblake.com)"))])
+ (jscs . [(20151015 1749) ((emacs (24 1)) (cl-lib (0 5))) "Consistent JavaScript editing using JSCS" tar ((:url . "https://github.com/papaeye/emacs-jscs") (:commit . "9d39d0f2355e69a020bf76242504f3a33e013ccf") (:revdesc . "9d39d0f2355e") (:keywords "languages" "convenience") (:authors ("papaeye" . "papaeye@gmail.com")) (:maintainers ("papaeye" . "papaeye@gmail.com")) (:maintainer "papaeye" . "papaeye@gmail.com"))])
+ (jsdoc . [(20241227 1219) ((emacs (29 1)) (dash (2 11 0)) (s (1 12 0))) "Insert JSDoc comments" tar ((:url . "https://github.com/isamert/jsdoc.el") (:commit . "623994bb50d845de487c100f5cd393ce1d792460") (:revdesc . "623994bb50d8") (:authors ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainers ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainer "Isa Mert Gurbuz" . "isamertgurbuz@gmail.com"))])
+ (jsfmt . [(20180920 1008) nil "Interface to jsfmt command for javascript files" tar ((:url . "https://github.com/brettlangdon/jsfmt.el") (:commit . "ca141a135c7700eaedef92561d334e1fb7dc28a1") (:revdesc . "ca141a135c77") (:authors ("Brett Langdon" . "brett@blangdon.com")) (:maintainers ("Brett Langdon" . "brett@blangdon.com")) (:maintainer "Brett Langdon" . "brett@blangdon.com"))])
+ (json-mode . [(20240427 1245) ((json-snatcher (1 0 0)) (emacs (24 4))) "Major mode for editing JSON files" tar ((:url . "https://github.com/joshwnj/json-mode") (:commit . "77125b01c0ddce537085201098bea9b4b8ba6be3") (:revdesc . "77125b01c0dd"))])
+ (json-navigator . [(20241031 630) ((emacs (28 1))) "View and navigate JSON structures" tar ((:url . "https://github.com/DamienCassou/json-navigator") (:commit . "8ab49b066bc23de731a29ef07bbafa29999e1852") (:revdesc . "8ab49b066bc2") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (json-par . [(20260418 849) ((emacs (24 4))) "Minor mode for structural editing of JSON" tar ((:url . "https://github.com/taku0/json-par") (:commit . "9e1876e0c2a43d5350307bd834a856ebed54dcc4") (:revdesc . "9e1876e0c2a4") (:keywords "abbrev" "convenience" "files") (:authors ("taku0" . "mxxouy6x3m_github@tatapa.org")) (:maintainers ("taku0" . "mxxouy6x3m_github@tatapa.org")) (:maintainer "taku0" . "mxxouy6x3m_github@tatapa.org"))])
+ (json-process-client . [(20250330 728) ((emacs (27 1))) "Interact with a TCP process using JSON" tar ((:url . "https://github.com/DamienCassou/json-process-client") (:commit . "6485953fe6eff62938fd08720811c6fdd09d7d22") (:revdesc . "6485953fe6ef") (:authors ("Nicolas Petton" . "nicolas@petton.fr") ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Nicolas Petton" . "nicolas@petton.fr") ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Nicolas Petton" . "nicolas@petton.fr"))])
+ (json-reformat . [(20220905 2342) ((emacs (24 3))) "Reformatting tool for JSON" tar ((:url . "https://github.com/gongo/json-reformat") (:commit . "e9999b1f1fc933c02ff44f4136602b6a45ed59c6") (:revdesc . "e9999b1f1fc9") (:keywords "json") (:authors ("Wataru MIYAGUNI" . "gonngo@gmail.com")) (:maintainers ("Wataru MIYAGUNI" . "gonngo@gmail.com")) (:maintainer "Wataru MIYAGUNI" . "gonngo@gmail.com"))])
+ (json-rpc . [(20200417 1629) ((emacs (24 1)) (cl-lib (0 5))) "JSON-RPC library" tar ((:url . "https://github.com/skeeto/elisp-json-rpc") (:commit . "81a5a520072e20d18aeab2aac4d66c046b031e56") (:revdesc . "81a5a520072e") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainer "Christopher Wellons" . "wellons@nullprogram.com"))])
+ (json-rpc-server . [(20220205 1504) ((emacs (26))) "Server-side JSON-RPC library" tar ((:url . "https://github.com/jcaw/json-rpc-server.el") (:commit . "349e1f4722474bf1f75dbc8eb9d9c59d790b8083") (:revdesc . "349e1f472247") (:keywords "tools" "comm" "json" "rpc"))])
+ (json-snatcher . [(20200916 1717) ((emacs (24))) "Grabs the path to JSON values in a JSON file" tar ((:url . "https://github.com/sterlingg/json-snatcher") (:commit . "b28d1c0670636da6db508d03872d96ffddbc10f2") (:revdesc . "b28d1c067063") (:authors ("Sterling Graham" . "sterlingrgraham@gmail.com")) (:maintainers ("Sterling Graham" . "sterlingrgraham@gmail.com")) (:maintainer "Sterling Graham" . "sterlingrgraham@gmail.com"))])
+ (json5-ts-mode . [(20250526 1505) ((emacs (29 1))) "Major mode for JSON5" tar ((:url . "https://github.com/dochang/json5-ts-mode") (:commit . "21233ff6386529be26d147d46681119918a9451a") (:revdesc . "21233ff63865") (:keywords "json5" "languages" "tree-sitter") (:authors ("ZHANG Weiyi" . "dochang@gmail.com")) (:maintainers ("ZHANG Weiyi" . "dochang@gmail.com")) (:maintainer "ZHANG Weiyi" . "dochang@gmail.com"))])
+ (jsonian . [(20260612 2214) ((emacs (27 1))) "A major mode for editing JSON files" tar ((:url . "https://github.com/iwahbe/jsonian") (:commit . "2709fb0140c92eb183c849fdc530fd59f4e4fd3d") (:revdesc . "2709fb0140c9"))])
+ (jsonl . [(20190623 509) ((emacs (25))) "Utility functions for working with line-delimited JSON" tar ((:url . "https://github.com/ebpa/jsonl.el") (:commit . "3dd0b7bb2b4bce9f9de7367941f0cc78f82049c9") (:revdesc . "3dd0b7bb2b4b") (:keywords "tools") (:authors ("Erik Anderson" . "erik@ebpa.link")) (:maintainers ("Erik Anderson" . "erik@ebpa.link")) (:maintainer "Erik Anderson" . "erik@ebpa.link"))])
+ (jsonnet-mode . [(20220121 2109) ((emacs (24)) (dash (2 17 0))) "Major mode for editing jsonnet files" tar ((:url . "https://github.com/mgyucht/jsonnet-mode") (:commit . "cef3d352408599a63655002af655d11757579253") (:revdesc . "cef3d3524085") (:keywords "languages"))])
+ (jsonp . [(20250603 2133) ((emacs (28 1))) "Resolve JSON pointers in ELisp objects" tar ((:url . "https://github.com/joshbax189/jsonp-el") (:commit . "3964615915a69f9cc2b1ec3fd8f32825b8380f72") (:revdesc . "3964615915a6") (:keywords "comm" "tools"))])
+ (jss . [(20130508 1423) ((emacs (24 1)) (websocket (0)) (js2-mode (0))) "An emacs interface to webkit and mozilla debuggers" tar ((:url . "https://github.com/segv/jss") (:commit . "41749257aecf13c7bd6ed489b5ab3304d06e40bc") (:revdesc . "41749257aecf") (:keywords "languages") (:authors ("Marco Baringer" . "mb@bese.it")) (:maintainers ("Marco Baringer" . "mb@bese.it")) (:maintainer "Marco Baringer" . "mb@bese.it"))])
+ (jst . [(20150604 1138) ((s (1 9)) (f (0 17)) (dash (2 10)) (pcache (0 3)) (emacs (24 4))) "JS test mode" tar ((:url . "https://github.com/cheunghy/jst-mode") (:commit . "865ff97449a4cbbcb40d38b4908cf4d7b22a5108") (:revdesc . "865ff97449a4") (:keywords "js" "javascript" "jasmine" "coffee" "coffeescript") (:authors ("Cheung Hoi Yu" . "yeannylam@gmail.com")) (:maintainers ("Cheung Hoi Yu" . "yeannylam@gmail.com")) (:maintainer "Cheung Hoi Yu" . "yeannylam@gmail.com"))])
+ (jtags . [(20160211 2029) nil "Enhanced tags functionality for Java development" tar ((:url . "http://jtags.sourceforge.net") (:commit . "f7d29e1635ef7ee4ee2cdb8f1f6ab83e1015c84a") (:revdesc . "f7d29e1635ef") (:keywords "languages" "tools") (:authors ("Alexander Baltatzis" . "alexander@baltatzis.com") ("Johan Dykstrom" . "jody4711-sf@yahoo.se")) (:maintainers ("Johan Dykstrom" . "jody4711-sf@yahoo.se")) (:maintainer "Johan Dykstrom" . "jody4711-sf@yahoo.se"))])
+ (jtsx . [(20260130 2058) ((emacs (29 1))) "Extends JSX/TSX built-in support" tar ((:url . "https://github.com/llemaitre19/jtsx") (:commit . "f33efef5052b0757287abbea2b877cefca663bf2") (:revdesc . "f33efef5052b") (:keywords "languages") (:authors ("Loïc Lemaître" . "loic.lemaitre@gmail.com")) (:maintainers ("Loïc Lemaître" . "loic.lemaitre@gmail.com")) (:maintainer "Loïc Lemaître" . "loic.lemaitre@gmail.com"))])
+ (julia-formatter . [(20250524 2338) ((emacs (27 1)) (session-async (0 0 5))) "Use JuliaFormatter.jl for julia code" tar ((:url . "https://codeberg.org/FelipeLema/julia-formatter.el") (:commit . "a2d86565b1d74a7fa1667468fe17e20aa0dfc0b9") (:revdesc . "a2d86565b1d7") (:keywords "convenience" "tools") (:authors ("Felipe Lema" . "felipe.lema@mortemale.org")) (:maintainers ("Felipe Lema" . "felipe.lema@mortemale.org")) (:maintainer "Felipe Lema" . "felipe.lema@mortemale.org"))])
+ (julia-mode . [(20260529 1424) ((emacs (26 1))) "Major mode for editing Julia source code" tar ((:url . "https://github.com/JuliaEditorSupport/julia-emacs") (:commit . "1b5a4c2f5b7c3f842785985bf8778b8805cc6766") (:revdesc . "1b5a4c2f5b7c") (:keywords "languages"))])
+ (julia-repl . [(20260211 1502) ((emacs (29 1)) (s (1 12))) "A minor mode for a Julia REPL" tar ((:url . "https://github.com/tpapp/julia-repl") (:commit . "0173237a43d9a42f0d69a5405283fabe1ac602a0") (:revdesc . "0173237a43d9") (:keywords "languages") (:authors ("Tamas Papp" . "tkpapp@gmail.com")) (:maintainers ("Tamas Papp" . "tkpapp@gmail.com")) (:maintainer "Tamas Papp" . "tkpapp@gmail.com"))])
+ (julia-shell . [(20161125 1910) ((julia-mode (0 3))) "Major mode for an inferior Julia shell" tar ((:url . "https://github.com/dennisog/julia-shell-mode") (:commit . "583a0b2ca20461ab4356929fd0f2212c22341b69") (:revdesc . "583a0b2ca204") (:authors ("Dennis Ogbe" . "dogbe@purdue.edu")) (:maintainers ("Dennis Ogbe" . "dogbe@purdue.edu")) (:maintainer "Dennis Ogbe" . "dogbe@purdue.edu"))])
+ (julia-snail . [(20260713 1343) ((emacs (26 2)) (dash (2 16 0)) (julia-mode (0 3)) (s (1 12 0)) (spinner (1 7 3)) (popup (0 5 9))) "Julia Snail" tar ((:url . "https://github.com/gcv/julia-snail") (:commit . "6c545d67e93590d1155b60e79384481438cb7527") (:revdesc . "6c545d67e935"))])
+ (julia-ts-mode . [(20260616 1624) ((emacs (29 1)) (julia-mode (0 4))) "Major mode for Julia source code using tree-sitter" tar ((:url . "https://github.com/ronisbr/julia-ts-mode") (:commit . "d53fb5b2c7e83223dcd8c7ae6bd5e1abf18665f6") (:revdesc . "d53fb5b2c7e8") (:keywords "julia" "languages" "tree-sitter"))])
+ (julia-vterm . [(20260813 2350) ((emacs (25 1)) (vterm (0 0 1))) "A mode for Julia REPL using vterm" tar ((:url . "https://github.com/shg/julia-vterm.el") (:commit . "718b3952e980f73eb33b67168145c383b1a5f0bf") (:revdesc . "718b3952e980") (:keywords "languages" "julia"))])
+ (jumblr . [(20170727 2043) ((s (1 8 0)) (dash (2 2 0))) "An anagram game for emacs" tar ((:url . "https://github.com/mkmcc/jumblr") (:commit . "34533dfb9db8538c005f4eaffafeff7ed193729f") (:revdesc . "34533dfb9db8") (:keywords "anagram" "word game" "games") (:authors ("Mike McCourt" . "mkmcc@astro.berkeley.edu")) (:maintainers ("Mike McCourt" . "mkmcc@astro.berkeley.edu")) (:maintainer "Mike McCourt" . "mkmcc@astro.berkeley.edu"))])
+ (jump . [(20210110 2237) ((findr (0 7)) (inflections (2 4)) (cl-lib (0 5))) "Build functions which contextually jump between files" tar ((:url . "https://github.com/eschulte/jump.el") (:commit . "55caa66a7cc6e0b1a76143fd40eff38416928941") (:revdesc . "55caa66a7cc6") (:keywords "project" "convenience" "navigation"))])
+ (jump-char . [(20251205 508) nil "Navigation by char" tar ((:url . "https://github.com/lewang/jump-char") (:commit . "6d7e7b090c4c5af77626f45e64e0677f356fce5b") (:revdesc . "6d7e7b090c4c"))])
+ (jump-to-line . [(20130122 1653) nil "Jump to line number at point" tar ((:url . "https://github.com/ongaeshi/jump-to-line") (:commit . "01ef8c3529d85e6c59cc20840acbc4a8e8325bc8") (:revdesc . "01ef8c3529d8") (:keywords "jump" "line" "back" "file" "ruby" "csharp" "python" "perl"))])
+ (jump-tree . [(20171014 1551) nil "Treat position history as a tree" tar ((:url . "https://github.com/yangwen0228/jump-tree") (:commit . "282267dc6305889e31d46b405b7ad4dfe5923b66") (:revdesc . "282267dc6305") (:keywords "convenience" "position" "jump" "tree") (:authors ("Wen Yang" . "yangwen0228@foxmail.com")) (:maintainers ("Wen Yang" . "yangwen0228@foxmail.com")) (:maintainer "Wen Yang" . "yangwen0228@foxmail.com"))])
+ (jumplist . [(20151120 345) ((cl-lib (0 5))) "Jump like vim jumplist or ex jumplist" tar ((:url . "https://github.com/ganmacs/jumplist") (:commit . "c482d137d95bc5e1bcd790cdbde25b7f729b2502") (:revdesc . "c482d137d95b") (:keywords "jumplist" "vim") (:authors ("ganmacs" . "ganmacs_at_gmail.com")) (:maintainers ("ganmacs" . "ganmacs_at_gmail.com")) (:maintainer "ganmacs" . "ganmacs_at_gmail.com"))])
+ (jupyter . [(20260813 1437) ((emacs (27)) (cl-lib (0 5)) (org (9 1 6)) (zmq (0 10 10)) (simple-httpd (1 5 0)) (websocket (1 9))) "Jupyter" tar ((:url . "https://github.com/emacs-jupyter/jupyter") (:commit . "05ea84067f784fb7cd1f829d7a0fadcad20466aa") (:revdesc . "05ea84067f78") (:authors ("Nathaniel Nicandro" . "nathanielnicandro@gmail.com")) (:maintainers ("Nathaniel Nicandro" . "nathanielnicandro@gmail.com")) (:maintainer "Nathaniel Nicandro" . "nathanielnicandro@gmail.com"))])
+ (jupyter-ascending . [(20250427 2101) ((emacs (29 4))) "Edit Jupyter Notebooks in plain text" tar ((:url . "https://github.com/Duncan-Britt/jupyter-ascending") (:commit . "dda5bb675ca5f1e0d23e9fcb430f49adcafd2d2e") (:revdesc . "dda5bb675ca5") (:keywords "tools" "jupyter" "notebook" "python"))])
+ (just-mode . [(20251121 1826) ((emacs (26 1))) "Justfile editing mode" tar ((:url . "https://github.com/leon-barrett/just-mode.el") (:commit . "b6173c7bf4d8d28e0dbd80fa41b9c75626885b4e") (:revdesc . "b6173c7bf4d8") (:keywords "files" "languages" "tools") (:authors ("Leon Barrett" . "(leon@barrettnexus.com)")) (:maintainers ("Leon Barrett" . "(leon@barrettnexus.com)")) (:maintainer "Leon Barrett" . "(leon@barrettnexus.com)"))])
+ (just-ts-mode . [(20260319 1513) ((emacs (29 1))) "Justfile editing mode" tar ((:url . "https://github.com/leon-barrett/just-ts-mode.el") (:commit . "94f788eccb13cd3ade827af5612ffe3cad5fddf0") (:revdesc . "94f788eccb13") (:keywords "files" "languages" "tools" "treesitter") (:authors ("Leon Barrett" . "(leon@barrettnexus.com)")) (:maintainers ("Leon Barrett" . "(leon@barrettnexus.com)")) (:maintainer "Leon Barrett" . "(leon@barrettnexus.com)"))])
+ (justl . [(20260513 850) ((transient (0 1 0)) (emacs (27 1)) (s (1 2 0)) (f (0 20 0)) (inheritenv (0 2))) "Major mode for driving just files" tar ((:url . "https://github.com/psibi/justl.el") (:commit . "2b6e5f8d2d16e7c535553dcb9c496f8bd1bb827e") (:revdesc . "2b6e5f8d2d16") (:keywords "just" "justfile" "tools" "processes"))])
+ (jvm-mode . [(20150422 708) ((dash (2 6 0)) (emacs (24))) "Monitor and manage your JVMs" tar ((:url . "https://github.com/martintrojer/jvm-mode.el") (:commit . "3355dbaf5b0185aadfbad24160399abb32c5bea0") (:revdesc . "3355dbaf5b01") (:keywords "convenience") (:authors ("Martin Trojer" . "martin.trojer@gmail.com")) (:maintainers ("Martin Trojer" . "martin.trojer@gmail.com")) (:maintainer "Martin Trojer" . "martin.trojer@gmail.com"))])
+ (jwt . [(20260514 2219) ((emacs (29 1))) "Interact with JSON Web Tokens" tar ((:url . "https://github.com/joshbax189/jwt-el") (:commit . "83bcef37c311645a07c0263007c5b962ca3dab15") (:revdesc . "83bcef37c311") (:keywords "tools" "convenience"))])
+ (k8s-mode . [(20250408 844) ((emacs (24 3)) (yaml-mode (0 0 10))) "Major mode for Kubernetes configuration file" tar ((:url . "https://github.com/TxGVNN/emacs-k8s-mode") (:commit . "39a189d1e030aa108e90a82fd40f0042b1e69b21") (:revdesc . "39a189d1e030") (:authors ("Giap Tran" . "txgvnn@gmail.com")) (:maintainers ("Giap Tran" . "txgvnn@gmail.com")) (:maintainer "Giap Tran" . "txgvnn@gmail.com"))])
+ (kaesar . [(20230626 2314) ((emacs (24 3)) (kaesar-pbkdf2 (0 9 0))) "AES algorithm encrypt/decrypt" tar ((:url . "https://github.com/mhayashi1120/Emacs-kaesar") (:commit . "740eaea4d2510b78d30cceabf4be2c3daca66cf7") (:revdesc . "740eaea4d251") (:keywords "data") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (kaesar-file . [(20230614 332) ((emacs (24 3)) (kaesar (0 1 1))) "AES encrypt/decrypt file" tar ((:url . "https://github.com/mhayashi1120/Emacs-kaesar") (:commit . "be615884cbbb9838c5e6655abf7f112a8df03a06") (:revdesc . "be615884cbbb") (:keywords "data" "files") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (kaesar-mode . [(20230626 401) ((emacs (24 3)) (kaesar (0 1 4))) "AES encrypt/decrypt buffer" tar ((:url . "https://github.com/mhayashi1120/Emacs-kaesar") (:commit . "fd833c69ad3ced4a890eb162f4399d79a8ec199c") (:revdesc . "fd833c69ad3c") (:keywords "data" "convenience") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (kaesar-pbkdf2 . [(20230626 2314) ((emacs (25 1))) "PBKDF2 extension for kaesar.el" tar ((:url . "https://github.com/mhayashi1120/Emacs-kaesar") (:commit . "740eaea4d2510b78d30cceabf4be2c3daca66cf7") (:revdesc . "740eaea4d251") (:keywords "data") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (kagi . [(20240811 2130) ((emacs (29 1)) (markdown-mode (2 6)) (shell-maker (0 46 1))) "Kagi API integration" tar ((:url . "https://codeberg.org/bram85/kagi.el") (:commit . "013749218495e2c1bf2bb203c6b61976963817b5") (:revdesc . "013749218495") (:keywords "terminals" "wp") (:authors ("Bram Schoenmakers" . "me@bramschoenmakers.nl")) (:maintainers ("Bram Schoenmakers" . "me@bramschoenmakers.nl")) (:maintainer "Bram Schoenmakers" . "me@bramschoenmakers.nl"))])
+ (kakapo-mode . [(20171004 451) ((cl-lib (0 5))) "TABS (hard or soft) for indentation (leading whitespace), and SPACES for alignment" tar ((:url . "https://github.com/listx/kakapo-mode") (:commit . "67d516138172fd60782df94454b3d0bd247e84f3") (:revdesc . "67d516138172") (:keywords "indentation"))])
+ (kakoune . [(20230206 2037) ((ryo-modal (0 45)) (multiple-cursors (1 4)) (expand-region (0 11 0)) (emacs (25 1))) "A simulation, but not emulation, of kakoune" tar ((:url . "https://github.com/jmorag/kakoune.el") (:commit . "b39c5605e896c55ea246f755c46171bd6d0768a8") (:revdesc . "b39c5605e896") (:authors ("Joseph Morag" . "jm4157@columbia.edu")) (:maintainers ("Joseph Morag" . "jm4157@columbia.edu")) (:maintainer "Joseph Morag" . "jm4157@columbia.edu"))])
+ (kaleidoscope . [(20170808 817) ((s (1 11 0))) "Controlling Kaleidoscope-powered devices" tar ((:url . "https://github.com/algernon/kaleidoscope.el") (:commit . "b89a243f6024099192f1bc38d8a54e3e7a654090") (:revdesc . "b89a243f6024"))])
+ (kaleidoscope-evil-state-flash . [(20170728 1020) ((evil (1 2 12)) (kaleidoscope (0 1 0)) (s (1 11 0))) "Flash keyboard LEDs when changing Evil state" tar ((:url . "https://github.com/algernon/kaleidoscope.el") (:commit . "5b88327350c3d6375ef1d43fb31342eaabd88fdc") (:revdesc . "5b88327350c3"))])
+ (kana . [(20210531 1427) ((emacs (24 4)) (dash (2 17 0))) "Learn Japanese hiragana and katakana" tar ((:url . "https://github.com/chenyanming/kana") (:commit . "d3d550aad67ef8625b3860598bf3622f5b2a7d32") (:revdesc . "d3d550aad67e") (:keywords "tools") (:authors ("Damon Chan" . "elecming@gmail.com")) (:maintainers ("Damon Chan" . "elecming@gmail.com")) (:maintainer "Damon Chan" . "elecming@gmail.com"))])
+ (kanagawa-themes . [(20260625 2142) ((emacs (24 3))) "Elegant theme inspired by The Great Wave off Kanagawa" tar ((:url . "https://github.com/Fabiokleis/kanagawa-emacs") (:commit . "fe06241196bf9c77df751cfd74a984b5d8a45ba4") (:revdesc . "fe06241196bf") (:keywords "themes" "faces") (:authors ("Mrjtjmn" . "meritamen@sdf.org")) (:maintainers ("Fabio Kleis" . "fabiohkrc@gmail.com") ("Mrjtjmn" . "meritamen@sdf.org")) (:maintainer "Fabio Kleis" . "fabiohkrc@gmail.com"))])
+ (kanban . [(20250501 957) nil "Parse org-todo headlines to use org-tables as Kanban tables" tar ((:commit . "6bfdc94e4cee0f946fc032a2471898b945e25aea") (:revdesc . "6bfdc94e4cee") (:keywords "outlines" "convenience") (:authors ("Arne Babenhauserheide" . "arne_bab@web.de")) (:maintainers ("Arne Babenhauserheide" . "arne_bab@web.de")) (:maintainer "Arne Babenhauserheide" . "arne_bab@web.de"))])
+ (kanji-mode . [(20241120 1923) nil "View stroke order for kanji characters at cursor" tar ((:url . "https://github.com/wsgac/kanji-mode ") (:commit . "09719b00d60e22bd31c93b21c0c817eced9d0406") (:revdesc . "09719b00d60e") (:authors ("Wojciech Gac" . "wojciech.s.gac@gmail.com")) (:maintainers ("Wojciech Gac" . "wojciech.s.gac@gmail.com")) (:maintainer "Wojciech Gac" . "wojciech.s.gac@gmail.com"))])
+ (kaocha-runner . [(20240625 1010) ((emacs (26)) (s (1 4 0)) (cider (0 21 0)) (parseedn (0 1 0))) "A package for running Kaocha tests via CIDER" tar ((:url . "https://github.com/magnars/kaocha-runner.el") (:commit . "98f45ee396802c2225595c9151d4a941f9dcaa9d") (:revdesc . "98f45ee39680") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (kaolin-themes . [(20260826 814) ((emacs (26 1)) (autothemer (0 2 2)) (cl-lib (0 6))) "A set of eye pleasing themes" tar ((:url . "https://github.com/ogdenwebb/emacs-kaolin-themes") (:commit . "9ced044fdf092b9cfa5f6692eedd8b908569f84a") (:revdesc . "9ced044fdf09") (:keywords "dark" "light" "teal" "blue" "violet" "purple" "brown" "theme" "faces") (:authors ("Ogden Webb" . "ogdenwebb@gmail.com")) (:maintainers ("Ogden Webb" . "ogdenwebb@gmail.com")) (:maintainer "Ogden Webb" . "ogdenwebb@gmail.com"))])
+ (kaomel . [(20260615 1304) ((emacs (27 1))) "A snappy kaomoji picker" tar ((:url . "https://github.com/gicrisf/kaomel") (:commit . "652b31cc8437d87b65e618af9428229182ea595c") (:revdesc . "652b31cc8437") (:keywords "convenience" "extensions" "faces" "tools") (:authors ("Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com")) (:maintainers ("Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com")) (:maintainer "Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com"))])
+ (kaomoji . [(20220721 441) ((emacs (24 3)) (helm-core (3 6 0))) "Input kaomoji superb easily" tar ((:url . "https://github.com/kuanyui/kaomoji.el") (:commit . "fba0018a13eba70c2bffc6153dcfee99937fa3d6") (:revdesc . "fba0018a13eb") (:keywords "tools" "fun") (:authors ("Ono Hiroko" . "azazabc123@gmail.com")) (:maintainers ("Ono Hiroko" . "azazabc123@gmail.com")) (:maintainer "Ono Hiroko" . "azazabc123@gmail.com"))])
+ (kapacitor . [(20190414 1908) ((emacs (25 1)) (magit (2 13 0)) (magit-popup (2 12 4))) "Main file for kapacitor-mode" tar ((:url . "https://github.com/Manoj321/kapacitor-el") (:commit . "e3300d8b4017a2f66b0d929cb85bcc7ee2612072") (:revdesc . "e3300d8b4017") (:keywords "kapacitor" "emacs" "magit" "tools") (:authors ("Manoj Kumar Manikchand" . "manojm.321@gmail.com")) (:maintainers ("Manoj Kumar Manikchand" . "manojm.321@gmail.com")) (:maintainer "Manoj Kumar Manikchand" . "manojm.321@gmail.com"))])
+ (karma . [(20160220 1245) ((pkg-info (0 4)) (emacs (24))) "Karma Test Runner Emacs Integration" tar ((:url . "https://github.com/tonini/karma.el") (:commit . "31d3e7708246183d7ed0686be92bf23140af348c") (:revdesc . "31d3e7708246") (:keywords "language" "javascript" "js" "karma" "testing"))])
+ (kawacode . [(20260307 808) ((emacs (27 1))) "Kawa Code collaboration package" tar ((:url . "https://github.com/codeawareness/kawa.emacs") (:commit . "2aa16e40aaf044c27a7c79dfd5a3fe6656875979") (:revdesc . "2aa16e40aaf0") (:keywords "tools" "convenience" "vc") (:authors ("Mark Vasile" . "mark@codeawareness.com")) (:maintainers ("Mark Vasile" . "mark@codeawareness.com")) (:maintainer "Mark Vasile" . "mark@codeawareness.com"))])
+ (kconfig-mode . [(20220604 1415) ((emacs (24 3))) "Major mode for editing Kconfig files" tar ((:url . "https://github.com/delaanthonio/kconfig-mode") (:commit . "cd87b71c8c1739d026645ece0bbd20055a7a2d4a") (:revdesc . "cd87b71c8c17") (:keywords "kconfig" "languages" "linux" "kernel") (:authors ("Dela Anthonio" . "dell.anthonio@gmail.com")) (:maintainers ("Dela Anthonio" . "dell.anthonio@gmail.com")) (:maintainer "Dela Anthonio" . "dell.anthonio@gmail.com"))])
+ (kconfig-ref . [(20230814 1052) ((emacs (24 4)) (projectile (2 7 0)) (emacsql (0))) "A simple package for looking up kconfig symbol quickly" tar ((:url . "https://github.com/seokbeomkim/kconfig-ref") (:commit . "a3f602032cd3b9a7167505bd8ad0f156ae34c0b8") (:revdesc . "a3f602032cd3") (:keywords "tools" "kconfig" "linux" "kernel") (:authors ("Jason Kim" . "sukbeom.kim@gmail.com")) (:maintainers ("Jason Kim" . "sukbeom.kim@gmail.com")) (:maintainer "Jason Kim" . "sukbeom.kim@gmail.com"))])
+ (kdeconnect . [(20260315 2359) ((emacs (25 1))) "An interface for KDE Connect" tar ((:url . "https://github.com/carldotac/kdeconnect.el") (:commit . "daee28249b852cc52f4f32d35704a97af5cc4b7d") (:revdesc . "daee28249b85") (:keywords "convenience") (:authors ("Carl Lieberman" . "dev@carl.ac")) (:maintainers ("Carl Lieberman" . "dev@carl.ac")) (:maintainer "Carl Lieberman" . "dev@carl.ac"))])
+ (kdl-mode . [(20260818 637) ((emacs (29 1))) "Major mode for editing KDL files" tar ((:url . "https://github.com/taquangtrung/emacs-kdl-mode") (:commit . "c6ef2a0375b1e179c08a2e0f3809d318d8a0c090") (:revdesc . "c6ef2a0375b1") (:keywords "languages"))])
+ (keepass-mode . [(20211030 958) ((emacs (27))) "Mode for KeePass DB" tar ((:url . "https://github.com/ifosch/keepass-mode") (:commit . "f432bb60f9f3bd027025140d723906dcabeefaef") (:revdesc . "f432bb60f9f3") (:keywords "data" "files" "tools") (:authors ("Ignasi Fosch" . "natx@y10k.ws")) (:maintainers ("Ignasi Fosch" . "natx@y10k.ws")) (:maintainer "Ignasi Fosch" . "natx@y10k.ws"))])
+ (keg . [(20260527 831) ((emacs (24 1))) "Modern Elisp package development system" tar ((:url . "https://github.com/conao3/keg.el") (:commit . "91030f36115ce50c4f812b95b169aeaffdd0e042") (:revdesc . "91030f36115c") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (keg-mode . [(20220307 829) ((emacs (24 4))) "Major mode for editing Keg files" tar ((:url . "https://github.com/conao3/keg.el") (:commit . "d2ef9cfaee1256849291cfade3d730667f55aaf2") (:revdesc . "d2ef9cfaee12") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (kele . [(20251211 128) ((emacs (29 1)) (async (1 9 7)) (dash (2 19 1)) (f (0 20 0)) (magit-section (4 0 0)) (memoize (0)) (plz (0 8 0)) (yaml (0 5 1))) "Spritzy Kubernetes cluster management" tar ((:url . "https://github.com/jinnovation/kele.el") (:commit . "3303c146905043098197fc8ec1283252447ad321") (:revdesc . "3303c1469050") (:keywords "kubernetes" "tools") (:authors ("Jonathan Jin" . "me@jonathanj.in")) (:maintainers ("Jonathan Jin" . "me@jonathanj.in")) (:maintainer "Jonathan Jin" . "me@jonathanj.in"))])
+ (kerl . [(20150424 2005) nil "Emacs integration for kerl" tar ((:url . "https://github.com/correl/kerl.el/") (:commit . "1732ee26213f021bf040919c45ad276aafcaae14") (:revdesc . "1732ee26213f") (:keywords "tools") (:authors ("Correl Roush" . "correl@gmail.com")) (:maintainers ("Correl Roush" . "correl@gmail.com")) (:maintainer "Correl Roush" . "correl@gmail.com"))])
+ (key-assist . [(20231208 446) ((emacs (24 3))) "Minibuffer keybinding cheatsheet and launcher" tar ((:url . "https://github.com/Boruch-Baum/emacs-key-assist") (:commit . "87d2378db3d997b6b5a7b2c04281c18378e70bbb") (:revdesc . "87d2378db3d9") (:keywords "abbrev" "convenience" "docs" "help") (:authors ("Boruch Baum" . "boruch_baum@gmx.com")) (:maintainers ("Boruch Baum" . "boruch_baum@gmx.com")) (:maintainer "Boruch Baum" . "boruch_baum@gmx.com"))])
+ (key-chord . [(20250330 2011) ((emacs (24))) "Map pairs of simultaneously pressed keys to commands" tar ((:url . "https://github.com/LemonBreezes/key-chord") (:commit . "cb646e815c61f253ad9fdfbe058049dda4e2b32b") (:revdesc . "cb646e815c61") (:keywords "keyboard" "chord" "input") (:authors ("David Andersson" . "l.david.anderssonsverige.nu")) (:maintainers ("LemonBreezes" . "look@strawberrytea.xyz")) (:maintainer "LemonBreezes" . "look@strawberrytea.xyz"))])
+ (key-combo . [(20230323 829) nil "Map key sequence to commands" tar ((:url . "https://github.com/uk-ar/key-combo") (:commit . "16fb73522d53547ef38f3710aff7c0b01005d576") (:revdesc . "16fb73522d53") (:keywords "keyboard" "input") (:authors ("Yuuki Arisawa" . "yuuki.ari@gmail.com")) (:maintainers ("Vitalie Spinu" . "spinuvit@gmail.com")) (:maintainer "Vitalie Spinu" . "spinuvit@gmail.com"))])
+ (key-intercept . [(20140211 749) nil "Intercept prefix keys" tar ((:url . "https://github.com/tarao/key-intercept-el") (:commit . "d9a60edb4ce893f2d3d94f242164fdcc62d43cf2") (:revdesc . "d9a60edb4ce8") (:keywords "keyboard") (:authors ("INA Lintaro" . "tarao.gnnatgmail.com")) (:maintainers ("INA Lintaro" . "tarao.gnnatgmail.com")) (:maintainer "INA Lintaro" . "tarao.gnnatgmail.com"))])
+ (key-leap . [(20160831 1447) ((emacs (24 3))) "Leap between lines by typing keywords" tar ((:url . "https://github.com/MartinRykfors/key-leap") (:commit . "b3f6ef15c8a13870475d5af159fa24b30f97dea0") (:revdesc . "b3f6ef15c8a1") (:keywords "point" "convenience") (:authors ("Martin Rykfors" . "martinrykfors@gmail.com")) (:maintainers ("Martin Rykfors" . "martinrykfors@gmail.com")) (:maintainer "Martin Rykfors" . "martinrykfors@gmail.com"))])
+ (key-quiz . [(20200226 2129) ((emacs (26))) "Emacs Keys Quiz" tar ((:url . "https://github.com/federicotdn/key-quiz") (:commit . "1ee67f3f8977d95785e021f7896685de1979137e") (:revdesc . "1ee67f3f8977") (:keywords "games") (:authors ("Federico Tedin" . "federicotedin@gmail.com")) (:maintainers ("Federico Tedin" . "federicotedin@gmail.com")) (:maintainer "Federico Tedin" . "federicotedin@gmail.com"))])
+ (key-seq . [(20150907 756) ((key-chord (0 6))) "Map pairs of sequentially pressed keys to commands" tar ((:url . "https://github.com/vlevit/key-seq.el") (:commit . "e29b083a6427d061638749194fc249ef69ad2cc0") (:revdesc . "e29b083a6427") (:keywords "convenience" "keyboard" "keybindings") (:authors ("Vyacheslav Levit" . "dev@vlevit.org")) (:maintainers ("Vyacheslav Levit" . "dev@vlevit.org")) (:maintainer "Vyacheslav Levit" . "dev@vlevit.org"))])
+ (keycast . [(20260601 1510) ((emacs (28 1)) (compat (31 0)) (cond-let (1 1))) "Show current command and its binding" tar ((:url . "https://github.com/tarsius/keycast") (:commit . "a6518e1b48b08ba883e9b1a2db0872d5bf3d85f4") (:revdesc . "a6518e1b48b0") (:keywords "multimedia") (:authors ("Jonas Bernoulli" . "emacs.keycast@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.keycast@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.keycast@jonas.bernoulli.dev"))])
+ (keychain-environment . [(20260728 1811) nil "Load keychain environment variables" tar ((:url . "https://github.com/tarsius/keychain-environment") (:commit . "199f407f28f8f473790126a1149abba38e4b3164") (:revdesc . "199f407f28f8") (:keywords "gnupg" "pgp" "ssh") (:authors ("Paul Tipper" . "bluefooatgooglemaildotcom")) (:maintainers ("Jonas Bernoulli" . "jonas@bernoul.li")) (:maintainer "Jonas Bernoulli" . "jonas@bernoul.li"))])
+ (keycoach . [(20260802 1523) ((emacs (25 1))) "Remember and learn new keybindings" tar ((:url . "https://github.com/mrcnski/keycoach") (:commit . "8cdb38ebca3a69e3ea6658325fb252b846cb6da2") (:revdesc . "8cdb38ebca3a") (:keywords "help") (:authors ("Marcin Swieczkowski" . "marcin@realemail.net")) (:maintainers ("Marcin Swieczkowski" . "marcin@realemail.net")) (:maintainer "Marcin Swieczkowski" . "marcin@realemail.net"))])
+ (keydef . [(20090428 1931) nil "A simpler way to define keys, with kbd syntax" tar ((:url . "https://github.com/emacsorphanage/keydef") (:commit . "dff2be9f58d12d8c6a490ad0c1b2b10b55528dc0") (:revdesc . "dff2be9f58d1") (:keywords "convenience" "lisp" "customization" "keyboard" "keys") (:authors ("Michael John Downes" . "mjd@ams.org")) (:maintainers ("Michael John Downes" . "mjd@ams.org")) (:maintainer "Michael John Downes" . "mjd@ams.org"))])
+ (keyfreq . [(20231107 106) ((cl-lib (0 5))) "Track command frequencies" tar ((:url . "https://github.com/dacap/keyfreq") (:commit . "c6955162307f37c2ac631d9daf118781009f8dda") (:revdesc . "c6955162307f"))])
+ (keymap-utils . [(20260601 1550) ((emacs (28 1)) (compat (31 0)) (llama (1 0))) "Keymap utilities" tar ((:url . "https://github.com/tarsius/keymap-utils") (:commit . "3064e5ffe98458500c75bf7c854c45d3e60e8e90") (:revdesc . "3064e5ffe984") (:keywords "convenience" "extensions") (:authors ("Jonas Bernoulli" . "emacs.keymap-utils@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.keymap-utils@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.keymap-utils@jonas.bernoulli.dev"))])
+ (keypress-multi-event . [(20250313 1648) ((emacs (24 3))) "Perform different actions for the same keypress" tar ((:url . "https://www.github.com/Boruch-Baum/emacs-keypress-multi-event") (:commit . "8c31b75f6ef4d81d5625e91a4130e204bfd02dd3") (:revdesc . "8c31b75f6ef4") (:keywords "abbrev" "convenience" "wp" "keyboard") (:authors ("Boruch Baum" . "boruch_baum@gmx.com")) (:maintainers ("Boruch Baum" . "boruch_baum@gmx.com")) (:maintainer "Boruch Baum" . "boruch_baum@gmx.com"))])
+ (keypression . [(20240111 440) ((emacs (26 3))) "Keystroke visualizer" tar ((:url . "https://github.com/chuntaro/emacs-keypression") (:commit . "e85e3fd9ce216a370be221cf9de1503777ef0088") (:revdesc . "e85e3fd9ce21") (:keywords "key" "screencast" "tools") (:authors ("chuntaro" . "chuntaro@sakura-games.jp")) (:maintainers ("chuntaro" . "chuntaro@sakura-games.jp")) (:maintainer "chuntaro" . "chuntaro@sakura-games.jp"))])
+ (keyset . [(20150220 530) ((dash (2 8 0)) (cl-lib (0 5))) "A small library for structuring key bindings" tar ((:url . "https://github.com/HKey/keyset") (:commit . "c6b375fbe8035fde593d1d96895eb6e3f111d379") (:revdesc . "c6b375fbe803") (:authors ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainers ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainer "Hiroki YAMAKAWA" . "s06139@gmail.com"))])
+ (keystore-mode . [(20190409 1946) ((emacs (24 3)) (origami (1 0)) (s (1 12 0)) (seq (2 20))) "A major mode for viewing and managing (java) keystores" tar ((:url . "https://github.com/peterpaul/keystore-mode") (:commit . "43bd5926348298d077c7221f37902c990df3f951") (:revdesc . "43bd59263482") (:keywords "tools") (:authors ("Peterpaul Taekele Klein Haneveld" . "pp.kleinhaneveld@gmail.com")) (:maintainers ("Peterpaul Taekele Klein Haneveld" . "pp.kleinhaneveld@gmail.com")) (:maintainer "Peterpaul Taekele Klein Haneveld" . "pp.kleinhaneveld@gmail.com"))])
+ (keyswap . [(20240717 1440) ((emacs (25 1))) "Swap bindings between key pairs" tar ((:url . "https://github.com/hardenedapple/keyswap.el") (:commit . "d4f9f56a0e6e1365fc7c8ea8d953b8fdffad27fe") (:revdesc . "d4f9f56a0e6e") (:keywords "convenience") (:authors ("Matthew Malcomson" . "hardenedapple@gmail.com")) (:maintainers ("Matthew Malcomson" . "hardenedapple@gmail.com")) (:maintainer "Matthew Malcomson" . "hardenedapple@gmail.com"))])
+ (keytar . [(20251231 1727) ((emacs (24 4))) "Emacs Lisp interface for node-keytar" tar ((:url . "https://github.com/emacs-grammarly/keytar") (:commit . "f0485df065bcdc8f446be3e00aa77a43629ec84e") (:revdesc . "f0485df065bc") (:keywords "convenience" "keytar" "password" "credential" "secret" "security") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (keyword-search . [(20180424 1102) nil "Browser keyword search from Emacs" tar ((:url . "https://github.com/juhp/keyword-search") (:commit . "f8475ecaddb8804a9be6bee47678207c86ac8dee") (:revdesc . "f8475ecaddb8") (:keywords "web" "search" "keyword"))])
+ (kfg . [(20140909 538) ((f (0 17 1))) "An emacs configuration system" tar ((:url . "https://github.com/abingham/kfg") (:commit . "ffc35b77f227d4c64a1271ec30d31333ffeb0013") (:revdesc . "ffc35b77f227") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (khalel . [(20260709 655) ((emacs (27 1))) "Import, edit and create calendar events through khal" tar ((:url . "https://gitlab.com/hperrey/khalel") (:commit . "3691b4545eaef5a246f020f57bd0f843cc9c84ef") (:revdesc . "3691b4545eae") (:keywords "event" "calendar" "ics" "khal") (:authors ("Hanno Perrey" . "http://gitlab.com/hperrey")) (:maintainers ("Hanno Perrey" . "hanno@hoowl.se")) (:maintainer "Hanno Perrey" . "hanno@hoowl.se"))])
+ (khardel . [(20231126 1502) ((emacs (27 1)) (yaml-mode (0 0 13))) "Integrate with khard" tar ((:url . "https://github.com/DamienCassou/khardel") (:commit . "205e374b36252183a146a7a8f857bcf95a77edc3") (:revdesc . "205e374b3625") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (khoj . [(20260326 333) ((emacs (27 1)) (transient (0 3 0)) (dash (2 19 1))) "Your Second Brain" tar ((:url . "https://github.com/khoj-ai/khoj/tree/master/src/interface/emacs") (:commit . "9258f57dceab19d52a1a0bdac54eb38576c29187") (:revdesc . "9258f57dceab") (:keywords "search" "chat" "ai" "org-mode" "outlines" "markdown" "pdf" "image") (:authors ("Debanjum Singh Solanky" . "debanjum@khoj.dev") ("Saba Imran" . "saba@khoj.dev")) (:maintainers ("Debanjum Singh Solanky" . "debanjum@khoj.dev") ("Saba Imran" . "saba@khoj.dev")) (:maintainer "Debanjum Singh Solanky" . "debanjum@khoj.dev"))])
+ (kibit-helper . [(20150508 1533) ((s (0 8)) (emacs (24))) "Conveniently use the Kibit Leiningen plugin from Emacs" tar ((:url . "http://www.github.com/brunchboy/kibit-helper") (:commit . "ec5f154db3bb0c838e86f527353f08644cede926") (:revdesc . "ec5f154db3bb") (:keywords "languages" "clojure" "kibit") (:authors ("James Elliott" . "james@brunchboy.com")) (:maintainers ("James Elliott" . "james@brunchboy.com")) (:maintainer "James Elliott" . "james@brunchboy.com"))])
+ (kill-dollar-mode . [(20241217 1947) ((emacs (27 1))) "Remove leading $ from shell-script-like text" tar ((:url . "https://github.com/sandinmyjoints/kill-dollar-mode") (:commit . "e51c076f93605c5a651b549731ccfc85a2564aca") (:revdesc . "e51c076f9360") (:keywords "convenience" "tools"))])
+ (kill-file-path . [(20230306 1041) ((emacs (26))) "Copy file name into kill ring" tar ((:url . "https://github.com/chyla/kill-file-path/kill-file-path.el") (:commit . "5dcbce69cbae17665216a32dd20f27de54c62972") (:revdesc . "5dcbce69cbae") (:keywords "files") (:authors ("Adam Chyła" . "adam@chyla.org")) (:maintainers ("Adam Chyła" . "adam@chyla.org")) (:maintainer "Adam Chyła" . "adam@chyla.org"))])
+ (kill-or-bury-alive . [(20260802 939) ((emacs (24 4))) "Precise control over buffer killing" tar ((:url . "https://github.com/mrkkrp/kill-or-bury-alive") (:commit . "0d69edb0148246b239d2c720ed8077cb4e797033") (:revdesc . "0d69edb01482") (:keywords "convenience") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (kill-ring-search . [(20140422 1555) nil "Incremental search for the kill ring" tar ((:url . "http://nschum.de/src/emacs/kill-ring-search/") (:commit . "23535b4a01a1cb1574604e36c49614e84e85c883") (:revdesc . "23535b4a01a1") (:keywords "convenience" "matching") (:authors ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainers ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainer "Nikolaj Schumacher" . "bugs*nschumde"))])
+ (kirigami . [(20260826 246) ((emacs (26 1))) "A unified method to fold and unfold text" tar ((:url . "https://github.com/jamescherti/kirigami.el") (:commit . "11ff03c676b439b2267d65ddfe1e897232451b02") (:revdesc . "11ff03c676b4") (:keywords "outlines" "convenience") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (kite . [(20130201 1938) ((json (1 2)) (websocket (0 93 1))) "WebKit inspector front-end" tar ((:url . "https://github.com/jscheid/kite") (:commit . "7ed74d1147a6ddd152d3da65dc30df3517d53144") (:revdesc . "7ed74d1147a6") (:keywords "tools") (:authors ("Julian Scheid" . "julians37@gmail.com")) (:maintainers ("Julian Scheid" . "julians37@gmail.com")) (:maintainer "Julian Scheid" . "julians37@gmail.com"))])
+ (kite-mini . [(20160508 1106) ((dash (2 11 0)) (websocket (1 5))) "Remotely evaluate JavaScript in the WebKit debugger" tar ((:url . "https://github.com/tungd/kite-mini.el") (:commit . "48734092e735033ad7664a9933acd4556e095f79") (:revdesc . "48734092e735") (:keywords "webkit") (:authors ("Tung Dao" . "me@tungdao.com")) (:maintainers ("Tung Dao" . "me@tungdao.com")) (:maintainer "Tung Dao" . "me@tungdao.com"))])
+ (kivy-mode . [(20250528 2123) nil "Emacs major mode for editing Kivy files" tar ((:url . "https://github.com/kivy/kivy") (:commit . "42a3d0a62eaa54890a1e6461ecfc6199ac26a1b0") (:revdesc . "42a3d0a62eaa") (:authors ("Dean Serenevy" . "dean@serenevy.net")) (:maintainers ("Dean Serenevy" . "dean@serenevy.net")) (:maintainer "Dean Serenevy" . "dean@serenevy.net"))])
+ (kiwix . [(20260815 236) ((emacs (25 1)) (request (0 3 0))) "Searching offline Wikipedia through Kiwix" tar ((:url . "https://repo.or.cz/kiwix.el.git") (:commit . "f6becc2abf733b9e631c687c431dabd2097d1fba") (:revdesc . "f6becc2abf73") (:keywords "kiwix" "wikipedia") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (kixtart-mode . [(20260823 1231) ((emacs (28 1)) (eldoc (1 14 0))) "Major mode for editing KiXtart scripts" tar ((:url . "https://git.sr.ht/~mew/kixtart-mode") (:commit . "a450b436e2cdb1b18d16fd273b1ce405d095c0f9") (:revdesc . "a450b436e2cd") (:keywords "languages") (:authors ("Morgan Willcock" . "morgan@ice9.digital")) (:maintainers ("Morgan Willcock" . "morgan@ice9.digital")) (:maintainer "Morgan Willcock" . "morgan@ice9.digital"))])
+ (kkp . [(20260706 858) ((emacs (27 1)) (compat (29 1 3 4))) "Enable support for the Kitty Keyboard Protocol" tar ((:url . "https://github.com/benotn/kkp") (:commit . "82b7443e10a2ba287467b62e90b6adb6dd93dc99") (:revdesc . "82b7443e10a2") (:keywords "terminals") (:authors ("Benjamin Orthen" . "contact@orthen.net")) (:maintainers ("Benjamin Orthen" . "contact@orthen.net")) (:maintainer "Benjamin Orthen" . "contact@orthen.net"))])
+ (klere-theme . [(20260526 323) ((emacs (24))) "A dark theme with lambent color highlights and incremental grays" tar ((:url . "https://github.com/tomenzgg/emacs-klere-theme") (:commit . "332d93b22f0359150c8dd8de710ffed09c34664f") (:revdesc . "332d93b22f03") (:authors ("Jean Libète" . "tomenzgg@mail.mayfirst.org")) (:maintainers ("Jean Libète" . "tomenzgg@mail.mayfirst.org")) (:maintainer "Jean Libète" . "tomenzgg@mail.mayfirst.org"))])
+ (klondike . [(20250301 2336) ((emacs (28 1))) "Klondike" tar ((:url . "https://codeberg.org/tomenzgg/Emacs-Klondike") (:commit . "891cc54c1d9411f7848a4bba34811370ae19960e") (:revdesc . "891cc54c1d94") (:keywords "games" "cards" "solitaire" "klondike") (:authors ("Jean Libète" . "tomenzgg@mail.mayfirst.org")) (:maintainers ("Jean Libète" . "tomenzgg@mail.mayfirst.org")) (:maintainer "Jean Libète" . "tomenzgg@mail.mayfirst.org"))])
+ (kmacro-x . [(20250521 1530) ((emacs (29 1))) "Keyboard macro helpers and extensions" tar ((:url . "https://github.com/vifon/kmacro-x.el") (:commit . "da859b6b8b31c4fdfd3028996a02e5a70d9fff6b") (:revdesc . "da859b6b8b31") (:keywords "convenience"))])
+ (know-your-http-well . [(20240726 1649) nil "Look up the meaning of HTTP headers, methods, relations, status codes" tar ((:url . "https://github.com/for-GET/know-your-http-well") (:commit . "2ff1548a6d59f2b59cfbdd2697fcf202625cc248") (:revdesc . "2ff1548a6d59"))])
+ (kodi-remote . [(20190622 1325) ((request (0 2 0)) (let-alist (1 0 4)) (json (1 4)) (cl-lib (0 5)) (f (20190109 906))) "Remote Control for Kodi" tar ((:url . "https://github.com/spiderbit/kodi-remote.el") (:commit . "f5e932036c16e2b61a63020e006fc601e38d181e") (:revdesc . "f5e932036c16") (:keywords "kodi" "tools" "convinience") (:authors ("Stefan Huchler" . "stefan.huchler@mail.de")) (:maintainers ("Stefan Huchler" . "stefan.huchler@mail.de")) (:maintainer "Stefan Huchler" . "stefan.huchler@mail.de"))])
+ (koishi-theme . [(20260810 1337) ((emacs (24 1))) "A sweet theme inspired by Koishi's color tone" tar ((:url . "https://github.com/gynamics/koishi-theme.el") (:commit . "c719c98750ac41d4e3718a4aba5e4887e1d37c1b") (:revdesc . "c719c98750ac") (:keywords "faces"))])
+ (kolon-mode . [(20140122 1134) nil "Syntax highlighting for Text::Xslate's Kolon syntax" tar ((:url . "https://github.com/samvtran/kolon-mode") (:commit . "5af0955e280ae991862189ebecd3937c5fc8fb9f") (:revdesc . "5af0955e280a") (:keywords "xslate" "perl"))])
+ (koopa-mode . [(20230905 2243) ((company (0 9 13)) (emacs (27 1))) "A major mode for Microsoft PowerShell" tar ((:url . "https://github.com/sch0lars/koopa-mode") (:commit . "82c81a641e106f270d45427f6d0139aabbd8523c") (:revdesc . "82c81a641e10") (:keywords "powershell" "convenience"))])
+ (kooten-theme . [(20161023 905) ((emacs (24 1))) "Dark color theme" tar ((:url . "https://github.com/kootenpv/emacs-kooten-theme") (:commit . "d10197b4dd7af02cd14aeab2573c273a294798c3") (:revdesc . "d10197b4dd7a") (:keywords "themes") (:authors ("Pascal van Kooten" . "kootenpv@gmail.com")) (:maintainers ("Pascal van Kooten" . "kootenpv@gmail.com")) (:maintainer "Pascal van Kooten" . "kootenpv@gmail.com"))])
+ (korean-holidays . [(20260326 1400) nil "Korean holidays for calendar" tar ((:url . "https://github.com/tttuuu888/korean-holidays") (:commit . "465fc0e7e95354f75678c2d310edc74743414d1b") (:revdesc . "465fc0e7e953") (:keywords "calendar") (:authors ("SeungKi Kim" . "tttuuu888@gmail.com")) (:maintainers ("SeungKi Kim" . "tttuuu888@gmail.com")) (:maintainer "SeungKi Kim" . "tttuuu888@gmail.com"))])
+ (kosmos-theme . [(20170502 1850) ((emacs (24))) "Black and lightgray theme with not so much syntax highlighting" tar ((:url . "https://github.com/habamax/kosmos-theme") (:commit . "616456d2376a75dc31190ad65137d179fbad4336") (:revdesc . "616456d2376a") (:authors ("Maxim Kim" . "habamax@gmail.com")) (:maintainers ("Maxim Kim" . "habamax@gmail.com")) (:maintainer "Maxim Kim" . "habamax@gmail.com"))])
+ (kotlin-mode . [(20230123 1859) ((emacs (24 3))) "Major mode for kotlin" tar ((:url . "https://github.com/Emacs-Kotlin-Mode-Maintainers/kotlin-mode") (:commit . "fddd747e5b4736e8b27a147960f369b86179ddff") (:revdesc . "fddd747e5b47") (:keywords "languages") (:authors ("Shodai Yokoyama" . "(quantumcars@gmail.com)")) (:maintainers ("Shodai Yokoyama" . "(quantumcars@gmail.com)")) (:maintainer "Shodai Yokoyama" . "(quantumcars@gmail.com)"))])
+ (kotlin-ts-mode . [(20260824 1024) ((emacs (30 1))) "A mode for editing Kotlin files based on tree-sitter" tar ((:url . "https://gitlab.com/bricka/emacs-kotlin-ts-mode") (:commit . "292c9a05ff2243c39a48201b277840b1d25e1ea0") (:revdesc . "292c9a05ff22") (:authors ("Alex Figl-Brick" . "alex@alexbrick.me")) (:maintainers ("Alex Figl-Brick" . "alex@alexbrick.me")) (:maintainer "Alex Figl-Brick" . "alex@alexbrick.me"))])
+ (kpm-list . [(20170924 1352) nil "An emacs buffer list that tries to intelligently group together buffers" tar ((:url . "https://github.com/KMahoney/kpm-list/") (:commit . "e0f5112e5ce8ec1b603f4428fa51681c68bb28f5") (:revdesc . "e0f5112e5ce8"))])
+ (kql-mode . [(20250925 1437) ((emacs (26 1))) "Major mode for highlighting KQL" tar ((:url . "https://gitlab.com/aimebertrand/kql-mode") (:commit . "6ea203a6f21332eeab33875908da01607740947d") (:revdesc . "6ea203a6f213") (:keywords "files" "languages" "azure" "entra" "kql" "faces" "syntax" "major-mode"))])
+ (kroman . [(20150827 2340) nil "Korean hangul romanization" tar ((:url . "https://github.com/victorteokw/kroman-el") (:commit . "431144a3cd629a2812a668a29ad85182368dc9b0") (:revdesc . "431144a3cd62") (:keywords "korean" "roman") (:authors ("Zhang Kai Yu" . "yeannylam@gmail.com")) (:maintainers ("Zhang Kai Yu" . "yeannylam@gmail.com")) (:maintainer "Zhang Kai Yu" . "yeannylam@gmail.com"))])
+ (ksp-cfg-mode . [(20190414 2348) ((emacs (24)) (cl-lib (0 5))) "Major mode for editing KSP CFG files" tar ((:url . "https://github.com/lashtear/ksp-cfg-mode") (:commit . "faec8bd8456c67276d065eb68c88a30efcef59ef") (:revdesc . "faec8bd8456c") (:keywords "data") (:authors ("Emily Backes" . "lucca@accela.net")) (:maintainers ("Emily Backes" . "lucca@accela.net")) (:maintainer "Emily Backes" . "lucca@accela.net"))])
+ (ksp-mode . [(20221220 1136) ((emacs (27 1))) "Major mode for editing ksp files" tar ((:url . "https://github.com/youngker/ksp-mode.el") (:commit . "89b91b8ed6753867e30aa494e5d80325dfe25569") (:revdesc . "89b91b8ed675") (:keywords "ksp" "languages") (:maintainers ("YoungJoo Lee" . "youngker@gmail.com")) (:maintainer "YoungJoo Lee" . "youngker@gmail.com"))])
+ (kubectx-mode . [(20240312 2024) ((emacs (24))) "Change kubectl context/namespace and show in mode line" tar ((:url . "https://github.com/terjesannum/emacs-kubectx-mode") (:commit . "b177c0fa9f8471d6199df4598afde1e39e83c504") (:revdesc . "b177c0fa9f84") (:keywords "tools" "kubernetes") (:authors ("Terje Sannum" . "terje@offpiste.org")) (:maintainers ("Terje Sannum" . "terje@offpiste.org")) (:maintainer "Terje Sannum" . "terje@offpiste.org"))])
+ (kubedoc . [(20240108 1404) ((emacs (27 1))) "Kubernetes API Documentation" tar ((:url . "https://github.com/r0bobo/kubedoc.el/") (:commit . "aac02b096c98b83b4eaf129e6d767cf7150a6d43") (:revdesc . "aac02b096c98") (:keywords "docs" "help" "k8s" "kubernetes" "tools") (:authors ("Dean Lindqvist Todevski" . "https://github.com/r0bobo")))])
+ (kubel . [(20260508 2043) ((transient (0 1 0)) (emacs (25 3)) (dash (2 12 0)) (s (1 2 0)) (yaml-mode (0 0 14))) "Control Kubernetes with limited permissions" tar ((:url . "https://github.com/abrochard/kubel") (:commit . "f2d64227c6d2ce0a3a9023345b230b5b2b30d147") (:revdesc . "f2d64227c6d2") (:keywords "kubernetes" "k8s" "tools" "processes"))])
+ (kubel-evil . [(20231224 1343) ((kubel (1 0)) (evil (1 0)) (emacs (25 3))) "Extension for kubel to provide evil keybindings" tar ((:url . "https://github.com/abrochard/kubel") (:commit . "3d2f86fccdf81ab890f5d46dde93f241b718a436") (:revdesc . "3d2f86fccdf8") (:keywords "kubernetes" "k8s" "tools" "processes" "evil" "keybindings"))])
+ (kubernetes . [(20260402 429) ((dash (2 12 0)) (magit-section (3 1 1)) (magit-popup (2 13 0)) (with-editor (3 0 4)) (request (0 3 2)) (s (1 12 0)) (transient (0 3 0))) "Magit-like porcelain for Kubernetes" tar ((:url . "https://github.com/kubernetes-el/kubernetes-el") (:commit . "54ad1b11ca6ceff8a7931271d8c694ad2e6ade4c") (:revdesc . "54ad1b11ca6c") (:keywords "kubernetes") (:authors ("Chris Barrett" . "chris+emacs@walrus.cool")) (:maintainers ("Chris Barrett" . "chris+emacs@walrus.cool") ("Noorul Islam K M" . "noorul@noorul.com") ("Jonathan Jin" . "me@jonathanj.in")) (:maintainer "Chris Barrett" . "chris+emacs@walrus.cool"))])
+ (kubernetes-evil . [(20260402 429) ((kubernetes (0 18 0)) (evil (1 2 12))) "Kubernetes keybindings for evil-mode" tar ((:url . "https://github.com/kubernetes-el/kubernetes-el") (:commit . "54ad1b11ca6ceff8a7931271d8c694ad2e6ade4c") (:revdesc . "54ad1b11ca6c") (:authors ("Chris Barrett" . "chris+emacs@walrus.cool")) (:maintainers ("Chris Barrett" . "chris+emacs@walrus.cool")) (:maintainer "Chris Barrett" . "chris+emacs@walrus.cool"))])
+ (kubernetes-helm . [(20230221 1438) ((yaml-mode (0 0 13)) (emacs (25 3))) "Extension for helm, the package manager for kubernetes" tar ((:url . "https://github.com/abrochard/kubernetes-helm") (:commit . "f70e2efa6ef869143ccb2f158f4ab7df91dcc58f") (:revdesc . "f70e2efa6ef8") (:keywords "kubernetes" "helm" "k8s" "tools" "processes"))])
+ (kubernetes-tramp . [(20181228 922) ((emacs (24)) (cl-lib (0 5))) "TRAMP integration for kubernetes containers" tar ((:url . "https://github.com/gruggiero/kubernetes-tramp") (:commit . "8713571b66940f8f3f496b55baa23cdf1df7a869") (:revdesc . "8713571b6694") (:keywords "kubernetes" "convenience") (:authors ("Giovanni Ruggiero" . "giovanni.ruggiero+github@gmail.com")) (:maintainers ("Giovanni Ruggiero" . "giovanni.ruggiero+github@gmail.com")) (:maintainer "Giovanni Ruggiero" . "giovanni.ruggiero+github@gmail.com"))])
+ (kurecolor . [(20221213 124) ((emacs (24 4)) (s (1 12))) "Color editing goodies" tar ((:url . "https://github.com/emacsfodder/kurecolor.el") (:commit . "ac67ceba85839ab1ced96fad605bf023b697263f") (:revdesc . "ac67ceba8583") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (kuronami-theme . [(20240104 2022) ((emacs (24 1))) "A deep blue theme with cool autumnal colors" tar ((:url . "https://github.com/inj0h/kuronami") (:commit . "4d0a9e5f789e5768a0c2ea7dec31f98ea95c7372") (:revdesc . "4d0a9e5f789e") (:authors ("inj0h" . "")) (:maintainers ("inj0h" . "")) (:maintainer "inj0h" . ""))])
+ (kusanagi-theme . [(20260629 307) ((emacs (30 1)) (modus-themes (5 0 0))) "Ghost in the Shell inspired dark theme built on Modus" tar ((:url . "https://github.com/LionyxML/kusanagi-theme") (:commit . "9bc24e173addb206a583fcd23086d79cd3e6c360") (:revdesc . "9bc24e173add") (:keywords "faces" "themes") (:authors ("Rahul Martim Juliato" . "rahul.juliato@gmail.com")) (:maintainers ("Rahul Martim Juliato" . "rahul.juliato@gmail.com")) (:maintainer "Rahul Martim Juliato" . "rahul.juliato@gmail.com"))])
+ (kv . [(20140108 1534) nil "Key/value data structure functions" tar ((:url . "https://github.com/nicferrier/emacs-kv") (:commit . "721148475bce38a70e0b678ba8aa923652e8900e") (:revdesc . "721148475bce") (:keywords "lisp") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (kwin . [(20220120 2125) nil "Communicatewith the KWin window manager" tar ((:url . "https://github.com/reactormonk/kwin-minor-mode") (:commit . "20fac6508e5535a26df783ba05f04d1800b7382c") (:revdesc . "20fac6508e55"))])
+ (laas . [(20241212 1314) ((emacs (26 3)) (auctex (11 88)) (aas (1 1))) "A bundle of as-you-type LaTeX snippets" tar ((:url . "https://github.com/tecosaur/LaTeX-auto-activating-snippets") (:commit . "f5fb180ab23b7eb0695ade84c9077aa701f47bbf") (:revdesc . "f5fb180ab23b") (:keywords "tools" "tex") (:authors ("Yoav Marco TEC" . "https://github.com/tecosaur")) (:maintainers ("Yoav Marco" . "yoavm448@gmail.com")) (:maintainer "Yoav Marco" . "yoavm448@gmail.com"))])
+ (lab . [(20260809 1506) ((emacs (27 1)) (request (0 3 2)) (s (1 10 0)) (f (0 20 0)) (compat (29 1 4 4)) (promise (1 1)) (async-await (1 1))) "An interface for GitLab" tar ((:url . "https://github.com/isamert/lab.el") (:commit . "8c33f35b490a12a8d4bc57954a946fe4d12abb81") (:revdesc . "8c33f35b490a") (:authors ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainers ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainer "Isa Mert Gurbuz" . "isamertgurbuz@gmail.com"))])
+ (lab-themes . [(20200815 2104) ((emacs (24))) "A custom theme carefully constructed in the LAB space" tar ((:url . "https://github.com/MetroWind/lab-theme") (:commit . "9d7deb9635959d3a50ccb1082eb1207275f4b3e8") (:revdesc . "9d7deb963595") (:keywords "lisp") (:authors ("MetroWind" . "chris.corsair@gmail.com")) (:maintainers ("MetroWind" . "chris.corsair@gmail.com")) (:maintainer "MetroWind" . "chris.corsair@gmail.com"))])
+ (labburn-theme . [(20221208 1611) nil "A lab color space zenburn theme" tar ((:url . "https://github.com/ksjogo/labburn-theme") (:commit . "bd0de2fdcf285d981f32e3e5ebc56fe3c9b589a5") (:revdesc . "bd0de2fdcf28") (:keywords "theme" "zenburn"))])
+ (lacquer . [(20230824 725) ((emacs (25 2))) "Switch theme/font by selecting from a cache" tar ((:url . "https://github.com/zakudriver/lacquer") (:commit . "c8a0fb81f18001b3d510f545ba253ed4f9a50f5b") (:revdesc . "c8a0fb81f180") (:keywords "tools") (:authors ("zakudriver" . "zy.hua1122@gmail.com")) (:maintainers ("zakudriver" . "zy.hua1122@gmail.com")) (:maintainer "zakudriver" . "zy.hua1122@gmail.com"))])
+ (laguna-theme . [(20220804 227) nil "An updated blue-green Laguna Theme" tar ((:url . "https://github.com/HenryNewcomer/laguna-theme") (:commit . "680ab8c936cb1c249b5a6a07976bcc83ef217e25") (:revdesc . "680ab8c936cb") (:authors ("Henry Newcomer" . "a.cliche.email@gmail.com")) (:maintainers ("Henry Newcomer" . "a.cliche.email@gmail.com")) (:maintainer "Henry Newcomer" . "a.cliche.email@gmail.com"))])
+ (lambdapi-mode . [(20260825 821) ((emacs (27 1)) (eglot (1 6)) (math-symbol-lists (1 2 1)) (highlight (20190710 1527))) "A major mode for editing Lambdapi source code" tar ((:url . "https://github.com/Deducteam/lambdapi") (:commit . "95ea869762e4467633ab1dc8f61e87cbfb4ac11a") (:revdesc . "95ea869762e4") (:keywords "languages") (:maintainers ("Deducteam" . "dedukti-dev@inria.fr")) (:maintainer "Deducteam" . "dedukti-dev@inria.fr"))])
+ (lammps-mode . [(20250311 47) ((emacs (24 4))) "Basic syntax highlighting for LAMMPS files" tar ((:url . "https://github.com/lammps/lammps/tree/master/tools/emacs") (:commit . "92d262c755c3aedf02bbe19743ba761ccdc7c0c2") (:revdesc . "92d262c755c3") (:keywords "languages" "faces") (:authors ("Aidan Thompson" . "athompsatsandia.gov")) (:maintainers ("Rohit Goswami" . "r95g10atgmail.com")) (:maintainer "Rohit Goswami" . "r95g10atgmail.com"))])
+ (lang-refactor-perl . [(20131122 2127) nil "Simple refactorings, primarily for Perl" tar ((:url . "https://github.com/jplindstrom/emacs-lang-refactor-perl") (:commit . "691bd69639de6b7af357e3b7143563ececd9c497") (:revdesc . "691bd69639de") (:keywords "languages" "refactoring" "perl") (:authors ("Johan Lindstrom" . "buzzwordninjanot_this_bit@googlemail.com")) (:maintainers ("Johan Lindstrom" . "buzzwordninjanot_this_bit@googlemail.com")) (:maintainer "Johan Lindstrom" . "buzzwordninjanot_this_bit@googlemail.com"))])
+ (langdoc . [(20150218 645) ((cl-lib (0 2))) "Help to define help document mode for various languages" tar ((:url . "https://github.com/tom-tan/langdoc/") (:commit . "2c7223bacb116992d700ecb19a60df5c09c63424") (:revdesc . "2c7223bacb11") (:keywords "convenience" "eldoc") (:authors ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainers ("Tomoya Tanjo" . "ttanjo@gmail.com")) (:maintainer "Tomoya Tanjo" . "ttanjo@gmail.com"))])
+ (langtool . [(20230222 326) ((emacs (24 3))) "Grammar check utility using LanguageTool" tar ((:url . "https://github.com/mhayashi1120/Emacs-langtool") (:commit . "416abc7d1c1cbb31a9bddad458366215bad0089b") (:revdesc . "416abc7d1c1c") (:keywords "docs") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (langtool-ignore-fonts . [(20210526 2340) ((emacs (25 1)) (langtool (2 2 1))) "Force langtool to ignore certain fonts" tar ((:url . "https://github.com/cjl8zf/langtool-ignore-fonts") (:commit . "a5d04c3840c293f1b11db3c28e7210d0d20f53af") (:revdesc . "a5d04c3840c2") (:authors ("Christopher Lloyd" . "cjl8zf@virginia.edu")) (:maintainers ("Christopher Lloyd" . "cjl8zf@virginia.edu")) (:maintainer "Christopher Lloyd" . "cjl8zf@virginia.edu"))])
+ (langtool-popup . [(20230222 401) ((emacs (25 1)) (popup (0 5 9))) "Popup message extension for langtool.el" tar ((:url . "https://github.com/mhayashi1120/Emacs-langtool") (:commit . "d86101eafe9a994eb0425e08e7c1795e9cb0cd42") (:revdesc . "d86101eafe9a") (:keywords "docs") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (language-detection . [(20161123 1813) ((emacs (24)) (cl-lib (0 5))) "Automatic language detection from code snippets" tar ((:url . "https://github.com/andreasjansson/language-detection.el") (:commit . "38f5d294870678efc6ccf94ce6e8175a58f93025") (:revdesc . "38f5d2948706") (:authors ("Andreas Jansson" . "andreas@jansson.me.uk")) (:maintainers ("Andreas Jansson" . "andreas@jansson.me.uk")) (:maintainer "Andreas Jansson" . "andreas@jansson.me.uk"))])
+ (language-id . [(20241024 854) ((emacs (24 3))) "Library to work with programming language identifiers" tar ((:url . "https://github.com/lassik/emacs-language-id") (:commit . "dbfbc4903ffb042552b458fac76ee9f67a022036") (:revdesc . "dbfbc4903ffb") (:keywords "languages" "util") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (languagetool . [(20250924 1813) ((emacs (27 1))) "LanguageTool integration for grammar and spell check" tar ((:url . "https://github.com/PillFall/Emacs-LanguageTool.el") (:commit . "fa3c08c369bf53f3311f1f365b54271cf126e4dd") (:revdesc . "fa3c08c369bf") (:keywords "grammar" "text" "docs" "tools" "convenience" "checker") (:authors ("Joar Buitrago" . "jebuitragoc@unal.edu.co")) (:maintainers ("Joar Buitrago" . "jebuitragoc@unal.edu.co")) (:maintainer "Joar Buitrago" . "jebuitragoc@unal.edu.co"))])
+ (lark-mode . [(20231221 340) ((emacs (24 3))) "Major mode for editing Lark parser code" tar ((:url . "https://github.com/taquangtrung/lark-mode") (:commit . "0a0724b0f64d433d81f90ba8f86e618f8c33522a") (:revdesc . "0a0724b0f64d") (:keywords "languages"))])
+ (lastfm . [(20260130 1102) ((emacs (26 1)) (request (0 3 0)) (anaphora (1 0 4)) (memoize (1 1)) (elquery (0 1 0)) (s (1 12 0))) "Last.fm API for Emacs Lisp" tar ((:url . "https://github.com/mihaiolteanu/lastfm.el/") (:commit . "d095474f2264174396e36148bac3ced80382d061") (:revdesc . "d095474f2264") (:keywords "multimedia" "api") (:authors ("Mihai Olteanu" . "mihai_olteanu@fastmail.fm")) (:maintainers ("Mihai Olteanu" . "mihai_olteanu@fastmail.fm")) (:maintainer "Mihai Olteanu" . "mihai_olteanu@fastmail.fm"))])
+ (lastpass . [(20201229 2109) ((emacs (24 4)) (seq (1 9)) (cl-lib (0 5))) "LastPass command wrapper" tar ((:url . "https://github.com/storvik/emacs-lastpass") (:commit . "2366de7824b6c5f8e9ec6811d219dc06794e8630") (:revdesc . "2366de7824b6") (:keywords "extensions" "processes" "lpass" "lastpass"))])
+ (latex-change-env . [(20250210 637) ((emacs (27 1)) (auctex (13 1))) "Change in and out of LaTeX environments" tar ((:url . "https://github.com/slotThe/change-env") (:commit . "c39f8fbc6c378e6969bd94a19213f548c88a949c") (:revdesc . "c39f8fbc6c37") (:keywords "convenience" "tex") (:authors ("Tony Zorman" . "soliditsallgood@mailbox.org")) (:maintainers ("Tony Zorman" . "soliditsallgood@mailbox.org")) (:maintainer "Tony Zorman" . "soliditsallgood@mailbox.org"))])
+ (latex-extra . [(20240909 2043) ((auctex (11 86 1)) (cl-lib (0 5))) "Adds several useful functionalities to LaTeX-mode" tar ((:url . "https://github.com/Malabarba/latex-extra") (:commit . "81507c1b63eb3898b654818de047544f662c1f73") (:revdesc . "81507c1b63eb") (:keywords "tex") (:authors ("Artur Malabarba" . "artur@endlessparentheses.com")) (:maintainers ("Artur Malabarba" . "artur@endlessparentheses.com")) (:maintainer "Artur Malabarba" . "artur@endlessparentheses.com"))])
+ (latex-labeler . [(20240827 2337) ((emacs (28 1))) "Simplify equation labeling in LaTeX" tar ((:url . "https://github.com/X9hRRDys/latex-labeler") (:commit . "6ca15d7dea4f8b2fc0878f6be19438e84061e894") (:revdesc . "6ca15d7dea4f") (:keywords "tools"))])
+ (latex-math-preview . [(20211228 641) nil "Preview LaTeX mathematical expressions" tar ((:url . "https://gitlab.com/latex-math-preview/latex-math-preview") (:commit . "1c082179493eed3ce8bc255f87791eb4acb1fbdb") (:revdesc . "1c082179493e") (:keywords "latex" "tex") (:authors ("Takayuki YAMAGUCHI" . "d@ytak.info")) (:maintainers ("Takayuki YAMAGUCHI" . "d@ytak.info")) (:maintainer "Takayuki YAMAGUCHI" . "d@ytak.info"))])
+ (latex-pretty-symbols . [(20151112 1044) nil "Display many latex symbols as their unicode counterparts" tar ((:url . "https://bitbucket.org/mortiferus/latex-pretty-symbols.el") (:commit . "83d5888147bb734a94dfd4847a11e975a7d86ba8") (:revdesc . "83d5888147bb") (:keywords "convenience" "display") (:authors ("Erik Parmann" . "eparmann@gmail.com")) (:maintainers ("Erik Parmann" . "eparmann@gmail.com")) (:maintainer "Erik Parmann" . "eparmann@gmail.com"))])
+ (latex-preview-pane . [(20181008 1822) nil "Makes LaTeX editing less painful by providing a updatable preview pane" tar ((:url . "http://www.emacswiki.org/emacs/LaTeXPreviewPane") (:commit . "5297668a89996b50b2b62f99cba01cc544dbed2e") (:revdesc . "5297668a8999") (:keywords "latex" "preview") (:authors ("John L. Singleton" . "jsinglet@gmail.com")) (:maintainers ("John L. Singleton" . "jsinglet@gmail.com")) (:maintainer "John L. Singleton" . "jsinglet@gmail.com"))])
+ (latex-table-wizard . [(20260504 128) ((emacs (27 1)) (auctex (12 1)) (transient (0 3 7))) "Magic editing of LaTeX tables" tar ((:url . "https://github.com/enricoflor/latex-table-wizard") (:commit . "0ccd242ba521ed3b323d1dc84f49febe80b2eec7") (:revdesc . "0ccd242ba521") (:keywords "convenience" "tex") (:authors ("Enrico Flor" . "enrico@eflor.net")) (:maintainers ("Enrico Flor" . "enrico@eflor.net")) (:maintainer "Enrico Flor" . "enrico@eflor.net"))])
+ (latex-unicode-math-mode . [(20231210 2234) nil "Input method for Unicode math symbols" tar ((:url . "https://github.com/Christoph-D/latex-unicode-math-mode") (:commit . "af6a28c3c7e8652f1e9c124beeccaa81133b1d88") (:revdesc . "af6a28c3c7e8") (:authors ("Christoph Dittmann" . "github@christoph-d.de")) (:maintainers ("Christoph Dittmann" . "github@christoph-d.de")) (:maintainer "Christoph Dittmann" . "github@christoph-d.de"))])
+ (latexdiff . [(20190827 1651) ((emacs (24 4))) "Latexdiff integration in Emacs" tar ((:url . "https://github.com/galaunay/latexdiff.el") (:commit . "56d0b240867527d1b43d3ddec14059361929b971") (:revdesc . "56d0b2408675") (:keywords "tex" "vc" "tools" "git" "helm") (:authors ("Launay Gaby" . "gaby.launay@tutanota.com")) (:maintainers ("Launay Gaby" . "gaby.launay@tutanota.com")) (:maintainer "Launay Gaby" . "gaby.launay@tutanota.com"))])
+ (latvian-holidays . [(20230326 2030) nil "Latvian holidays for the calendar" tar ((:url . "https://github.com/ashumilov/latvian-holidays") (:commit . "6b82f3bd9682c97f19a65b7d359ce7a02ec9cfec") (:revdesc . "6b82f3bd9682") (:keywords "calendar") (:authors ("Alexander Shumilov" . "alexander.shumilov@me.com")) (:maintainers ("Alexander Shumilov" . "alexander.shumilov@me.com")) (:maintainer "Alexander Shumilov" . "alexander.shumilov@me.com"))])
+ (launch . [(20130619 2204) nil "Launch files with OS-standard associated applications" tar ((:url . "https://github.com/sfllaw/emacs-launch") (:commit . "e7c3b573fc05fe4d3d322389079909311542e799") (:revdesc . "e7c3b573fc05") (:keywords "convenience" "processes") (:authors ("Simon Law" . "sfllaw@sfllaw.ca")) (:maintainers ("Simon Law" . "sfllaw@sfllaw.ca")) (:maintainer "Simon Law" . "sfllaw@sfllaw.ca"))])
+ (launch-mode . [(20170106 512) ((emacs (24 4))) "Major mode for launch-formatted text" tar ((:url . "https://github.com/iory/launch-mode") (:commit . "25ebd4ba77afcbe729901eb74923dbe9ae81c313") (:revdesc . "25ebd4ba77af") (:authors ("iory" . "ab.ioryz@gmail.com")) (:maintainers ("iory" . "ab.ioryz@gmail.com")) (:maintainer "iory" . "ab.ioryz@gmail.com"))])
+ (launchctl . [(20210611 2243) ((emacs (24 1))) "Interface to launchctl on Mac OS X" tar ((:url . "https://github.com/pekingduck/launchctl-el") (:commit . "c9b7e93f5ec6fa504dfb03d60571cf3e5dc38e12") (:revdesc . "c9b7e93f5ec6") (:keywords "tools" "convenience") (:authors ("Peking Duck" . "github.com/pekingduck")) (:maintainers ("Peking Duck" . "github.com/pekingduck")) (:maintainer "Peking Duck" . "github.com/pekingduck"))])
+ (lavender-theme . [(20170808 1313) ((emacs (24 0))) "An Emacs 24 theme based on Lavender (tmTheme)" tar ((:url . "https://github.com/emacsfodder/tmtheme-to-deftheme") (:commit . "ef5e959b95d7fb8152137bc186c4c24e986c1e3c") (:revdesc . "ef5e959b95d7"))])
+ (lavenderless-theme . [(20201222 1627) ((colorless-themes (0 2))) "A mostly colorless version of lavender-theme" tar ((:url . "https://git.sr.ht/~lthms/colorless-themes.el") (:commit . "1b2a507b3b7f9559c944af8fc7531a60b38ae0c3") (:revdesc . "1b2a507b3b7f") (:keywords "faces" "theme") (:authors ("Thomas Letan" . "lthms@soap.coffee")) (:maintainers ("Thomas Letan" . "lthms@soap.coffee")) (:maintainer "Thomas Letan" . "lthms@soap.coffee"))])
+ (lazy . [(20260128 1547) ((emacs (25))) "Lazy evaluation library" tar ((:url . "https://github.com/conao3/lazy.el") (:commit . "c9c70fb7f157148e9d08462e93240ada73e365ae") (:revdesc . "c9c70fb7f157") (:keywords "lisp" "lazy") (:authors ("chuntaro" . "chuntaro@sakura-games.jp")) (:maintainers ("conao3" . "conao3@gmail.com")) (:maintainer "conao3" . "conao3@gmail.com"))])
+ (lazy-ruff . [(20241127 1434) ((emacs (24 3)) (org (9 1))) "Integration with the Ruff Python linter/formatter" tar ((:url . "https://github.com/christophermadsen/emacs-lazy-ruff") (:commit . "4eeea363a133e0e7ed7c02a5e2f1f7b63a78c3f4") (:revdesc . "4eeea363a133") (:keywords "languages" "tools"))])
+ (lcb-mode . [(20160816 630) ((emacs (24))) "LiveCode Builder major mode" tar ((:url . "https://github.com/peter-b/lcb-mode") (:commit . "be0768e9aa6f9b8e76f2230f4f7f4d152a766b9a") (:revdesc . "be0768e9aa6f") (:keywords "languages") (:authors ("Peter TB Brett" . "peter@peter-b.co.uk")) (:maintainers ("Peter TB Brett" . "peter@peter-b.co.uk")) (:maintainer "Peter TB Brett" . "peter@peter-b.co.uk"))])
+ (lcr . [(20221012 742) ((dash (2 12 0)) (emacs (25 1))) "Lightweight coroutines" tar ((:url . "https://github.com/jyp/lcr") (:commit . "6c345112ffb59f3e7babca6c83942f686b5f554b") (:revdesc . "6c345112ffb5") (:keywords "tools") (:authors ("Jean-Philippe Bernardy" . "jeanphilippe.bernardy@gmail.com")) (:maintainers ("Jean-Philippe Bernardy" . "jeanphilippe.bernardy@gmail.com")) (:maintainer "Jean-Philippe Bernardy" . "jeanphilippe.bernardy@gmail.com"))])
+ (le-gpt . [(20260202 1935) ((emacs (28 1)) (markdown-mode (2 6))) "Emacs on steroids with GPT" tar ((:url . "https://github.com/AnselmC/le-gpt.el") (:commit . "dd5e0cdec646adb3fb638d837e6d8fb61a2602f1") (:revdesc . "dd5e0cdec646") (:keywords "openai" "anthropic" "deepseek" "gpt" "claude" "language" "copilot" "convenience" "tools" "llm") (:authors ("Andreas Stuhlmueller" . "andreas@ought.org")) (:maintainers ("Anselm Coogan" . "anselm.coogan@gmail.com")) (:maintainer "Anselm Coogan" . "anselm.coogan@gmail.com"))])
+ (le-thesaurus . [(20241229 1950) ((request (0 3 2)) (emacs (24 4))) "Query thesaurus.com for synonyms of a given word" tar ((:url . "https://github.com/AnselmC/le-thesaurus.el") (:commit . "8c8ea595678da69df817a173ec043ab1b17d96c3") (:revdesc . "8c8ea595678d"))])
+ (leader-key . [(20231001 2236) ((emacs (25 1))) "Leader key configuration (e.g. for god-mode)" tar ((:url . "https://github.com/havner/leader-key") (:commit . "64d2a29e2f667399869f2b0334855a647211e50e") (:revdesc . "64d2a29e2f66") (:keywords "convenience" "keys" "keybinding" "config" "leader" "god" "god-mode") (:authors ("Lukasz Pawelczyk" . "havner@gmail.com")) (:maintainers ("Lukasz Pawelczyk" . "havner@gmail.com")) (:maintainer "Lukasz Pawelczyk" . "havner@gmail.com"))])
+ (leadkey . [(20260706 257) ((emacs (30 1))) "Translate leader keys to key sequences" tar ((:url . "https://github.com/jixiuf/emacs-leadkey") (:commit . "a7bf4c8a5bfee908c5287ebe86dcbaddd2b0fb8d") (:revdesc . "a7bf4c8a5bfe") (:keywords "convenience") (:authors ("jixiuf" . "https://github.com/jixiuf")) (:maintainers ("jixiuf" . "https://github.com/jixiuf")) (:maintainer "jixiuf" . "https://github.com/jixiuf"))])
+ (leaf . [(20260302 652) ((emacs (24 1))) "Simplify your init.el configuration, extended use-package" tar ((:url . "https://github.com/conao3/leaf.el") (:commit . "b49e68613b8efba89c702141f49ad9b4460a7204") (:revdesc . "b49e68613b8e") (:keywords "lisp" "settings") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (leaf-convert . [(20260516 853) ((emacs (26 1)) (leaf (4 5 5)) (leaf-keywords (2 0 8)) (ppp (2 2 4))) "Convert many format to leaf format" tar ((:url . "https://github.com/conao3/leaf-convert.el") (:commit . "37967565c023596d863d9cd45527a024c5922553") (:revdesc . "37967565c023") (:keywords "tools") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (leaf-defaults . [(20260516 827) ((emacs (26 1)) (leaf (4 5 5)) (leaf-keywords (2 0 8))) "Awesome leaf config collections" tar ((:url . "https://github.com/conao3/leaf-defaults.el") (:commit . "238282d31d20c9b5077d7274ba9448eaaf0d44cc") (:revdesc . "238282d31d20") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (leaf-keywords . [(20260516 827) ((emacs (24 4)) (leaf (4 5 5))) "Additional leaf.el keywords for external packages" tar ((:url . "https://github.com/conao3/leaf-keywords.el") (:commit . "36efb8c94071c0fd98b6534866297f2238b78630") (:revdesc . "36efb8c94071") (:keywords "lisp" "settings") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (leaf-manager . [(20211225 624) ((emacs (26 1)) (leaf (4 1)) (leaf-convert (1 0)) (ppp (2 1))) "Configuration manager for leaf based init.el" tar ((:url . "https://github.com/conao3/leaf-manager.el") (:commit . "a9fb7fda1432d0cf6bd8546d98a11b3fbe1d84e6") (:revdesc . "a9fb7fda1432") (:keywords "convenience" "leaf") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (leaf-tree . [(20260516 827) ((emacs (25 1)) (imenu-list (0 9))) "Interactive side-bar feature for init.el using leaf" tar ((:url . "https://github.com/conao3/leaf-tree.el") (:commit . "6c85ef64bb21ddbd64e70625dbd59b0539fac534") (:revdesc . "6c85ef64bb21") (:keywords "convenience" "leaf") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (leanote . [(20161223 139) ((emacs (24 4)) (cl-lib (0 5)) (request (0 2)) (let-alist (1 0 3)) (pcache (0 4 0)) (s (1 10 0)) (async (1 9))) "A minor mode writing markdown leanote" tar ((:url . "https://github.com/aborn/leanote-emacs") (:commit . "d499e7b59bb1f1a2fabc0e4c26fb101ed62ebc7b") (:revdesc . "d499e7b59bb1") (:keywords "leanote" "note" "markdown") (:authors ("Aborn Jiang" . "aborn.jiang@gmail.com")) (:maintainers ("Aborn Jiang" . "aborn.jiang@gmail.com")) (:maintainer "Aborn Jiang" . "aborn.jiang@gmail.com"))])
+ (learn-ocaml . [(20211003 1412) ((emacs (25 1))) "Emacs frontend for learn-ocaml" tar ((:url . "https://github.com/pfitaxel/learn-ocaml.el") (:commit . "abdc263537a6a534152a4eaaa17b2c3e4e10418b") (:revdesc . "abdc263537a6"))])
+ (ledger-import . [(20230904 1837) ((emacs (25 1))) "Fetch OFX files from bank and push them to Ledger" tar ((:url . "https://gitlab.petton.fr/mpdel/libmpdel") (:commit . "e47e8508794462986b982d6ce3d05bcd17c19242") (:revdesc . "e47e85087944") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (ledger-mode . [(20260727 518) ((emacs (26 1))) "Helper code for use with the \"ledger\" command-line tool" tar ((:url . "https://github.com/ledger/ledger-mode") (:commit . "b0e71b7e9ee612ccb0b0e5f8bfefcfddb69ae861") (:revdesc . "b0e71b7e9ee6"))])
+ (leerzeichen . [(20220626 835) nil "Minor mode to display whitespace characters" tar ((:url . "https://github.com/fgeller/leerzeichen.el") (:commit . "9d4126d5f6563569080845a69b0867119a9fd6ea") (:revdesc . "9d4126d5f656") (:keywords "whitespace" "characters") (:authors ("Felix Geller" . "fgeller@gmail.com")) (:maintainers ("Felix Geller" . "fgeller@gmail.com")) (:maintainer "Felix Geller" . "fgeller@gmail.com"))])
+ (leetcode . [(20260312 515) ((emacs (28 1)) (s (1 13 0)) (aio (1 0)) (log4e (0 3 3))) "An leetcode client" tar ((:url . "https://github.com/kaiwk/leetcode.el") (:commit . "716d47702eb4f044cfa096a4306149012a85785e") (:revdesc . "716d47702eb4") (:keywords "extensions" "tools") (:authors ("Wang Kai" . "kaiwkx@gmail.com")) (:maintainers ("Wang Kai" . "kaiwkx@gmail.com")) (:maintainer "Wang Kai" . "kaiwkx@gmail.com"))])
+ (legalese . [(20200119 2248) nil "Add legalese to your program files" tar ((:url . "https://github.com/jorgenschaefer/legalese") (:commit . "e465471d2d5a62d35073d93e0f8d40387a82e302") (:revdesc . "e465471d2d5a") (:keywords "convenience") (:authors ("Jorgen Schaefer" . "forcer@forcix.cx")) (:maintainers ("Jorgen Schaefer" . "forcer@forcix.cx")) (:maintainer "Jorgen Schaefer" . "forcer@forcix.cx"))])
+ (lem . [(20260509 758) ((emacs (29 1)) (fedi (0 2)) (markdown-mode (2 5))) "A lemmy client" tar ((:url . "https://codeberg.org/martianh/lem.el") (:commit . "3abd1604c3ab9451dcbc087099c499e6dc8882d7") (:revdesc . "3abd1604c3ab") (:keywords "multimedia" "comm" "web" "fediverse") (:authors ("martian hiatus" . "martianh@disroot.org")) (:maintainers ("martian hiatus" . "martianh@disroot.org")) (:maintainer "martian hiatus" . "martianh@disroot.org"))])
+ (lemon-mode . [(20130216 1304) nil "A major mode for editing lemon grammar files" tar ((:url . "https://github.com/mooz/lemon-mode") (:commit . "155bfced6c9afc8072a0133d3d1baa54c6d67430") (:revdesc . "155bfced6c9a") (:keywords "lemon") (:authors ("mooz" . "stillpedant@gmail.com")) (:maintainers ("mooz" . "stillpedant@gmail.com")) (:maintainer "mooz" . "stillpedant@gmail.com"))])
+ (lentic . [(20240303 1456) ((emacs (25)) (m-buffer (0 13)) (dash (2 5 0))) "One buffer as a view of another" tar ((:url . "https://github.com/phillord/lentic") (:commit . "180c1082c016de790f9e6596b63329657c83ce20") (:revdesc . "180c1082c016") (:authors ("Phillip Lord" . "phillip.lord@russet.org.uk")) (:maintainers ("Phillip Lord" . "phillip.lord@russet.org.uk")) (:maintainer "Phillip Lord" . "phillip.lord@russet.org.uk"))])
+ (lentic-server . [(20240315 144) ((lentic (0 8)) (web-server (0 1 1))) "Web Server for Emacs Literate Source" tar ((:url . "https://github.com/phillord/lentic-server") (:commit . "732b88e7a183707ba65c38e8b3517cac42572644") (:revdesc . "732b88e7a183") (:authors ("Phillip Lord" . "phillip.lord@newcastle.ac.uk")) (:maintainers ("Phillip Lord" . "phillip.lord@newcastle.ac.uk")) (:maintainer "Phillip Lord" . "phillip.lord@newcastle.ac.uk"))])
+ (leo . [(20250109 1131) ((emacs (28 1)) (s (1 12 0)) (aio (1 0))) "Interface for dict.leo.org" tar ((:url . "https://codeberg.org/martianh/emacs-leo") (:commit . "24020b11de5975f71f4b57efbb9ef874ec0bcd87") (:revdesc . "24020b11de59") (:keywords "convenience" "translate" "wp" "dictionary") (:authors ("M.T. Enders" . "michaelATmichael-enders.com") ("Marty Hiatt" . "martianhiatusATriseup.net")) (:maintainers ("M.T. Enders" . "michaelATmichael-enders.com") ("Marty Hiatt" . "martianhiatusATriseup.net")) (:maintainer "M.T. Enders" . "michaelATmichael-enders.com"))])
+ (lesim-mode . [(20260318 1318) ((emacs (28 1))) "Major mode for Learning Simulator scripts" tar ((:url . "https://github.com/drghirlanda/lesim-mode") (:commit . "8524702bcf9285c60066d38b4e9935b5bf053d38") (:revdesc . "8524702bcf92") (:keywords "languages" "faces") (:authors ("Stefano Ghirlanda" . "drghirlanda@gmail.com")) (:maintainers ("Stefano Ghirlanda" . "drghirlanda@gmail.com")) (:maintainer "Stefano Ghirlanda" . "drghirlanda@gmail.com"))])
+ (less-css-mode . [(20161001 453) nil "Major mode for editing LESS CSS files (lesscss.org)" tar ((:url . "https://github.com/purcell/less-css-mode") (:commit . "59bf174c4e9f053ec2a7ef8c8a8198490390f6fb") (:revdesc . "59bf174c4e9f") (:keywords "less" "css" "mode") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (let-completion . [(20260407 1428) ((emacs (28 1))) "Show let-binding values in Elisp completion" tar ((:url . "https://github.com/gggion/let-completion.el") (:commit . "460cdd5a73d857d6d91469e28f84f02465db8dac") (:revdesc . "460cdd5a73d8") (:keywords "lisp" "completion") (:authors ("Gino Cornejo" . "gggion123@gmail.com")) (:maintainers ("Gino Cornejo" . "gggion123@gmail.com")) (:maintainer "Gino Cornejo" . "gggion123@gmail.com"))])
+ (letcheck . [(20160202 1948) nil "Check the erroneous assignments in let forms" tar ((:url . "https://github.com/Fuco1/letcheck") (:commit . "edf188ca2f85349e971b83f164c6484264e79426") (:revdesc . "edf188ca2f85") (:keywords "convenience") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (letterbox-mode . [(20170702 125) ((emacs (24 3))) "Hide sensitive text on a buffer" tar ((:url . "https://github.com/pacha64/letterbox-mode") (:commit . "88c67a51d67216d569a28e8423200883fde096dd") (:revdesc . "88c67a51d672") (:keywords "password" "convenience") (:authors ("Fernando Leboran" . "f.leboran@gmail.com")) (:maintainers ("Fernando Leboran" . "f.leboran@gmail.com")) (:maintainer "Fernando Leboran" . "f.leboran@gmail.com"))])
+ (leuven-theme . [(20260826 856) nil "Elegant Emacs color theme for a white background" tar ((:url . "https://github.com/fniessen/emacs-leuven-theme") (:commit . "8cd77776d6574596cf37a39e3546f8d88ab9b240") (:revdesc . "8cd77776d657") (:keywords "color" "theme") (:authors ("Fabrice Niessen" . "")) (:maintainers ("Fabrice Niessen" . "")) (:maintainer "Fabrice Niessen" . ""))])
+ (levenshtein . [(20090830 1040) nil "Edit distance between two strings" tar ((:url . "https://github.com/emacsorphanage/levenshtein") (:commit . "070925197ebf6b704e6e00c4f2d2ec783f3df38c") (:revdesc . "070925197ebf") (:keywords "lisp") (:authors ("Aaron S. Hawley" . "ashawleyatuvmdotedu")) (:maintainers ("Aaron S. Hawley" . "ashawleyatuvmdotedu")) (:maintainer "Aaron S. Hawley" . "ashawleyatuvmdotedu"))])
+ (lexbind-mode . [(20141027 1429) nil "Puts the value of lexical-binding in the mode line" tar ((:url . "https://github.com/spacebat/lexbind-mode") (:commit . "fa0a6848c1cfd3fbf45db43dc2deef16377d887d") (:revdesc . "fa0a6848c1cf") (:keywords "convenience" "lisp") (:authors ("Andrew Kirkpatrick" . "ubermonk@gmail.com")) (:maintainers ("Andrew Kirkpatrick" . "ubermonk@gmail.com")) (:maintainer "Andrew Kirkpatrick" . "ubermonk@gmail.com"))])
+ (lexic . [(20220501 1432) ((emacs (26 3))) "A major mode to find out more about words" tar ((:url . "https://github.com/tecosaur/lexic") (:commit . "f9b3de4d9c2dd1ce5022383e1a504b87bf7d1b09") (:revdesc . "f9b3de4d9c2d") (:authors ("pluskid" . "pluskid@gmail.com") ("gucong" . "gucong43216@gmail.com") ("TEC" . "tec@tecosaur.com")) (:maintainers ("TEC" . "tec@tecosaur.com")) (:maintainer "TEC" . "tec@tecosaur.com"))])
+ (lf . [(20260502 1103) ((s (1 12 0)) (dash (2 16 0)) (emacs (27 1))) "A Language Features library for Emacs Lisp" tar ((:url . "https://alhassy.github.io/lf.el/") (:commit . "dbe5a7c66c51d1a3036eb33d13c0a0a399349dda") (:revdesc . "dbe5a7c66c51") (:keywords "convenience" "programming") (:authors ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainers ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainer "Musa Al-hassy" . "alhassy@gmail.com"))])
+ (lfe-mode . [(20250702 1243) nil "Lisp Flavoured Erlang mode" tar ((:url . "https://github.com/rvirding/lfe") (:commit . "ebd7d221c52b6bf8c47c9e4f7daf15b3dee4d3fa") (:revdesc . "ebd7d221c52b"))])
+ (lgr . [(20230407 1317) ((emacs (26 1))) "A fully featured logging framework" tar ((:url . "https://github.com/Fuco1/emacs-lgr") (:commit . "4ab6c22bcbc533acace3c854876f40fa9d2f7819") (:revdesc . "4ab6c22bcbc5") (:keywords "tools") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (libbcel . [(20230826 1233) ((emacs (26 1)) (request (0 3 1))) "Library to connect to basecamp 3 API" tar ((:url . "https://gitlab.petton.fr/bcel/libbcel") (:commit . "35679c86b6d73817fef17df4119a7a45dfc9f33d") (:revdesc . "35679c86b6d7") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (libelcouch . [(20230903 800) ((emacs (26 1)) (request (0 3 0))) "Communication with CouchDB" tar ((:url . "https://github.com/DamienCassou/libelcouch/") (:commit . "5202084caee9fd236a18afc6f83293f05168a4c3") (:revdesc . "5202084caee9") (:keywords "tools") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (liberime . [(20260814 1041) ((emacs (25 1))) "Rime elisp binding" tar ((:url . "https://github.com/merrickluo/liberime") (:commit . "24b0f2e9f535af305767f56a417532b8165eaea8") (:revdesc . "24b0f2e9f535") (:keywords "convenience" "chinese" "input-method" "rime"))])
+ (liblouis . [(20220426 657) ((emacs (26 1))) "Mode for editing liblouis braille translation tables" tar ((:url . "https://github.com/liblouis/liblouis-mode") (:commit . "a341a0c434cdbe7f46956c8db13203c3fc941a34") (:revdesc . "a341a0c434cd") (:keywords "languages") (:authors ("Christian Egli" . "christian.egli@sbs.ch")) (:maintainers ("Christian Egli" . "christian.egli@sbs.ch")) (:maintainer "Christian Egli" . "christian.egli@sbs.ch"))])
+ (libmpdee . [(20220825 957) nil "Client end library for mpd, a music playing daemon" tar ((:url . "https://github.com/andyetitmoves/libmpdee") (:commit . "9a84e074385cd085622f94e720a968a0e05ceae5") (:revdesc . "9a84e074385c") (:keywords "music" "mpd") (:authors ("Ramkumar R. Aiyengar" . "andyetitmoves@gmail.com")) (:maintainers ("Ramkumar R. Aiyengar" . "andyetitmoves@gmail.com")) (:maintainer "Ramkumar R. Aiyengar" . "andyetitmoves@gmail.com"))])
+ (libmpdel . [(20250922 938) ((emacs (25 1))) "Communication with an MPD server" tar ((:url . "https://github.com/mpdel/libmpdel") (:commit . "f2cb01c8d004b5fbfa937579e899035a47d2a5f2") (:revdesc . "f2cb01c8d004") (:keywords "multimedia") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (librera-sync . [(20230902 1006) ((emacs (26 1)) (f (0 17)) (dash (2 12 0))) "Sync document's position with Librera Reader for Android" tar ((:url . "https://github.com/jumper047/librera-sync") (:commit . "19cf9496d71daac67ce4b0ebcdf7f6ac2c3e689a") (:revdesc . "19cf9496d71d") (:keywords "multimedia" "sync") (:authors ("Dmitriy Pshonko" . "jumper047@gmail.com")) (:maintainers ("Dmitriy Pshonko" . "jumper047@gmail.com")) (:maintainer "Dmitriy Pshonko" . "jumper047@gmail.com"))])
+ (lice . [(20220312 2215) nil "License And Header Template" tar ((:url . "https://github.com/buzztaiki/lice-el") (:commit . "0b69ba54057146f1473e85c0760029e584e3eb13") (:revdesc . "0b69ba540571") (:keywords "template" "license" "tools") (:authors ("Taiki Sugawara" . "buzz.taiki@gmail.com")) (:maintainers ("Taiki Sugawara" . "buzz.taiki@gmail.com")) (:maintainer "Taiki Sugawara" . "buzz.taiki@gmail.com"))])
+ (license-snippets . [(20201117 1619) ((emacs (26)) (yasnippet (0 8 0))) "LICENSE templates for yasnippet" tar ((:url . "https://github.com/sei40kr/license-snippets") (:commit . "a89988b81604fd23c43746912215770a4b861989") (:revdesc . "a89988b81604") (:keywords "tools") (:authors ("Seong Yong-ju" . "sei40kr@gmail.com")) (:maintainers ("Seong Yong-ju" . "sei40kr@gmail.com")) (:maintainer "Seong Yong-ju" . "sei40kr@gmail.com"))])
+ (license-templates . [(20260101 600) ((emacs (24 3)) (request (0 3 0))) "Create LICENSE using GitHub API" tar ((:url . "https://github.com/jcs-elpa/license-templates") (:commit . "c53a4e9f748be1a9c4c032602b927f9ab5a16702") (:revdesc . "c53a4e9f748b") (:keywords "convenience" "license" "api" "template") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (lichess . [(20260710 914) ((emacs (27 1))) "Client for Lichess.org" tar ((:url . "https://github.com/tmythicator/Lichess.el") (:commit . "572a6a353e2113c8a95564b9bea1f2896e6d3dab") (:revdesc . "572a6a353e21") (:keywords "games" "chess" "lichess" "api") (:authors ("Alexandr Timchenko" . "atimchenko92@gmail.com")) (:maintainers ("Alexandr Timchenko" . "atimchenko92@gmail.com")) (:maintainer "Alexandr Timchenko" . "atimchenko92@gmail.com"))])
+ (life-calendar . [(20260111 2324) ((emacs (27 1))) "Display your life in weeks" tar ((:url . "https://github.com/vshender/emacs-life-calendar") (:commit . "9f618f7958282f04245a4a59214c7bfd255f73d4") (:revdesc . "9f618f795828") (:keywords "calendar" "visualization") (:authors ("Vadzim Shender" . "https://github.com/vshender")) (:maintainers ("Vadzim Shender" . "https://github.com/vshender")) (:maintainer "Vadzim Shender" . "https://github.com/vshender"))])
+ (ligature . [(20260723 1509) ((emacs (28))) "Display typographical ligatures in major modes" tar ((:url . "https://www.github.com/mickeynp/ligature.el") (:commit . "b68eb47c5a29b74c8769e05eae6f5ee6a667f8b3") (:revdesc . "b68eb47c5a29") (:keywords "tools" "faces") (:authors ("Mickey Petersen" . "mickey@masteringemacs.org")) (:maintainers ("Mickey Petersen" . "mickey@masteringemacs.org")) (:maintainer "Mickey Petersen" . "mickey@masteringemacs.org"))])
+ (ligature-pragmatapro . [(20221127 2252) ((emacs (28)) (ligature (1 0))) "PragmataPro support for ligature.el" tar ((:url . "https://gitlab.com/wavexx/ligature-pragmatapro.el") (:commit . "85f7b15a5cf5f2ee843bc0469e03602a0251c275") (:revdesc . "85f7b15a5cf5") (:keywords "faces" "fonts" "ligatures" "programming-ligatures") (:authors ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainers ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainer "Yuri D'Elia" . "wavexx@thregr.org"))])
+ (light-soap-theme . [(20150607 1445) ((emacs (24))) "Emacs 24 theme with a light background" tar ((:url . "https://github.com/mswift42/light-soap-theme") (:commit . "76a787bd40c6b567ae68ced7f5d9f9f10725e00d") (:revdesc . "76a787bd40c6"))])
+ (line-reminder . [(20260414 1746) ((emacs (25 1)) (fringe-helper (1 0 1)) (ov (1 0 6)) (ht (2 0))) "Line annotation for changed and saved lines" tar ((:url . "https://github.com/emacs-vs/line-reminder") (:commit . "9a20500704f5b21772d00e4d0a9ff16dac943400") (:revdesc . "9a20500704f5") (:keywords "convenience" "annotation") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (line-up-words . [(20241121 2033) nil "Align words in an intelligent way" tar ((:url . "https://github.com/janestreet/line-up-words") (:commit . "3c1339a3fb3840dfaea50d8cb966c90b19d14925") (:revdesc . "3c1339a3fb38"))])
+ (lines-at-once . [(20180422 247) ((emacs (25))) "Insert and edit multiple lines at once" tar ((:url . "https://github.com/jiahaowork/lines-at-once.el") (:commit . "a018ba90549384d52ec58c2685fd14a0f65252be") (:revdesc . "a018ba905493") (:keywords "abbrev" "tools") (:authors ("Jiahao Li" . "jiahaowork@gmail.com")) (:maintainers ("Jiahao Li" . "jiahaowork@gmail.com")) (:maintainer "Jiahao Li" . "jiahaowork@gmail.com"))])
+ (lingr . [(20100807 1731) nil "Lingr Client for GNU Emacs" tar ((:url . "https://github.com/lugecy/lingr-el") (:commit . "4215a8704492d3c860097cbe2649936c22c196df") (:revdesc . "4215a8704492") (:keywords "chat" "client" "internet") (:authors ("lugecy" . "lugecy@gmail.com")) (:maintainers ("lugecy" . "lugecy@gmail.com")) (:maintainer "lugecy" . "lugecy@gmail.com"))])
+ (linguistic . [(20181129 2116) nil "A package for basic linguistic analysis" tar ((:url . "https://github.com/andcarnivorous/linguistic") (:commit . "23e47e98cdb09ee61883669b6d8a11bf6449862c") (:revdesc . "23e47e98cdb0") (:keywords "linguistics" "text analysis" "matching") (:authors ("Andrew Favia" . "drewlinguistics01atgmaildotcom")) (:maintainers ("Andrew Favia" . "drewlinguistics01atgmaildotcom")) (:maintainer "Andrew Favia" . "drewlinguistics01atgmaildotcom"))])
+ (lingva . [(20260805 1230) ((emacs (25 1))) "Access Google Translate without tracking via lingva.ml" tar ((:url . "https://codeberg.org/martianh/lingva.el") (:commit . "36a41d234f2d803a522365c753d646ca5342acc7") (:revdesc . "36a41d234f2d") (:keywords "convenience" "translation" "wp" "text") (:authors ("marty hiatt" . "martianh@disroot.org")) (:maintainers ("marty hiatt" . "martianh@disroot.org")) (:maintainer "marty hiatt" . "martianh@disroot.org"))])
+ (link . [(20191111 446) nil "Hypertext links in text buffers" tar ((:url . "https://github.com/myrkr/dictionary-el") (:commit . "c9cad101100975e88873636bfd426b7a19304ebd") (:revdesc . "c9cad1011009") (:keywords "interface" "hypermedia") (:authors ("Torsten Hilbrich" . "torsten.hilbrich@gmx.net")) (:maintainers ("Torsten Hilbrich" . "torsten.hilbrich@gmx.net")) (:maintainer "Torsten Hilbrich" . "torsten.hilbrich@gmx.net"))])
+ (link-hint . [(20250911 57) ((avy (0 4 0)) (emacs (24 4))) "Use avy to open, copy, etc. visible links" tar ((:url . "https://github.com/noctuid/link-hint.el") (:commit . "8fda5dcb9caff5a3c49d22b82e570ac9e29af7dd") (:revdesc . "8fda5dcb9caf") (:keywords "convenience" "url" "avy" "link" "links" "hyperlink") (:authors ("Fox Kiester" . "noct@posteo.net")) (:maintainers ("Fox Kiester" . "noct@posteo.net")) (:maintainer "Fox Kiester" . "noct@posteo.net"))])
+ (linkin-org . [(20260617 2114) ((emacs (30 1))) "A workflow with fast, reliable links" tar ((:url . "https://github.com/Judafa/linkin-org") (:commit . "51d7c2c2689c0cfd48f91986d36ffdabea57369f") (:revdesc . "51d7c2c2689c") (:authors ("Julien Dallot" . "judafa@protonmail.com")) (:maintainers ("Julien Dallot" . "judafa@protonmail.com")) (:maintainer "Julien Dallot" . "judafa@protonmail.com"))])
+ (linkode . [(20260605 352) nil "Generate a linkode snippet with region/buffer content" tar ((:url . "https://github.com/erickgnavar/linkode.el") (:commit . "8bfb80ca046bc0c942a14effef354722ad8a8a6c") (:revdesc . "8bfb80ca046b") (:authors ("Erick Navarro" . "erick@navarro.io")) (:maintainers ("Erick Navarro" . "erick@navarro.io")) (:maintainer "Erick Navarro" . "erick@navarro.io"))])
+ (linphone . [(20130524 1109) nil "Emacs interface to Linphone" tar ((:url . "https://github.com/zabbal/emacs-linphone") (:commit . "99af3db941b7f4e5272bb48bff96c1ce4ceac302") (:revdesc . "99af3db941b7") (:keywords "comm") (:authors ("Yoni Rabkin" . "yonirabkin@member.fsf.org")) (:maintainers ("Yoni Rabkin" . "yonirabkin@member.fsf.org")) (:maintainer "Yoni Rabkin" . "yonirabkin@member.fsf.org"))])
+ (linum-off . [(20160217 2137) nil "Provides an interface for turning line-numbering off" tar ((:url . "http://www.emacswiki.org/emacs/auto-indent-mode.el ") (:commit . "3e37baaad27d27e405f8dfe01d4ab9cd5b591353") (:revdesc . "3e37baaad27d") (:keywords "line" "numbering"))])
+ (linum-relative . [(20221025 517) nil "Display relative line number in emacs" tar ((:url . "https://github.com/coldnew/linum-relative") (:commit . "8fbe89ad897921849665a3e8da18cee7d0721441") (:revdesc . "8fbe89ad8979") (:keywords "converience") (:authors ("coldnew" . "coldnew.tw@gmail.com")) (:maintainers ("coldnew" . "coldnew.tw@gmail.com")) (:maintainer "coldnew" . "coldnew.tw@gmail.com"))])
+ (liquid-types . [(20151202 735) ((flycheck (0 13)) (dash (1 2)) (emacs (24 1)) (popup (0 5 2)) (pos-tip (0 5 0)) (flycheck-liquidhs (0 0 1)) (button-lock (1 0 2))) "Show inferred liquid-types" tar ((:url . "https://github.com/ucsd-progsys/liquid-types.el") (:commit . "cc4bacbbf204ef9cf0756f78dfebee2c6ae14d7b") (:revdesc . "cc4bacbbf204") (:authors ("Ranjit Jhala" . "jhala@cs.ucsd.edu")) (:maintainers ("Ranjit Jhala" . "jhala@cs.ucsd.edu")) (:maintainer "Ranjit Jhala" . "jhala@cs.ucsd.edu"))])
+ (liquidmetal . [(20240101 1004) ((emacs (24 4))) "A mimetic poly-alloy of the Quicksilver scoring algorithm" tar ((:url . "https://github.com/jcs-elpa/liquidmetal") (:commit . "5d100f4371e0d10656a2bd23c0461781c3c1884b") (:revdesc . "5d100f4371e0") (:keywords "matching" "fuzzy") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (lirve . [(20260708 1737) ((emacs (26 1))) "Learn irregular verbs in English" tar ((:url . "https://git.andros.dev/andros/lirve.el") (:commit . "b8dfa92eb51bde15c269dede50342f0b94240a49") (:revdesc . "b8dfa92eb51b") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (liso-theme . [(20160410 2029) nil "Eclectic Dark Theme for GNU Emacs" tar ((:url . "https://github.com/caisah/liso-theme") (:commit . "844688245eb860d23043455e165ee24503454c81") (:revdesc . "844688245eb8") (:keywords "theme" "themes") (:authors ("Vlad Piersec" . "vlad.piersec@gmail.com")) (:maintainers ("Vlad Piersec" . "vlad.piersec@gmail.com")) (:maintainer "Vlad Piersec" . "vlad.piersec@gmail.com"))])
+ (lisp-butt-mode . [(20210215 2206) ((emacs (25))) "Slim Lisp Butts" tar ((:url . "https://gitlab.com/marcowahl/lisp-butt-mode") (:commit . "2b719baf0ccba79e28fcb3c2633c4849d976ac23") (:revdesc . "2b719baf0ccb") (:keywords "lisp") (:authors ("Marco Wahl" . "marcowahlsoft@gmail.com")) (:maintainers ("Marco Wahl" . "marcowahlsoft@gmail.com")) (:maintainer "Marco Wahl" . "marcowahlsoft@gmail.com"))])
+ (lisp-chat . [(20260722 115) ((emacs (27 1)) (websocket (1 12))) "Emacs client for Lisp Chat" tar ((:url . "https://github.com/ryukinix/lisp-chat") (:commit . "e54265d278af3de1ca6bc895e7b0ebde82c5b5fc") (:revdesc . "e54265d278af") (:keywords "comm" "chat" "lisp") (:authors ("Manoel V. Machado" . "(manoel_vilela@engineer.com)")) (:maintainers ("Manoel V. Machado" . "(manoel_vilela@engineer.com)")) (:maintainer "Manoel V. Machado" . "(manoel_vilela@engineer.com)"))])
+ (lisp-docstring-toggle . [(20251123 1932) ((emacs (29 1))) "Toggle Lisp docstring visibility" tar ((:url . "https://github.com/gggion/lisp-docstring-toggle") (:commit . "3379f337efe01699b40ca8cfb9ca41c166d933ad") (:revdesc . "3379f337efe0") (:keywords "lisp" "docs" "editing"))])
+ (lisp-extra-font-lock . [(20181008 1921) nil "Highlight bound variables and quoted exprs" tar ((:url . "https://github.com/Lindydancer/lisp-extra-font-lock") (:commit . "4605eccbe1a7fcbd3cacf5b71249435413b4db4f") (:revdesc . "4605eccbe1a7") (:keywords "languages" "faces"))])
+ (lisp-local . [(20210605 1347) ((emacs (24 3))) "Allow different Lisp indentation in each buffer" tar ((:url . "https://github.com/lispunion/emacs-lisp-local") (:commit . "22e221c9330d2b5dc07e8b2caa34c83ac7c20b0d") (:revdesc . "22e221c9330d") (:keywords "languages" "lisp") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (lisp-semantic-hl . [(20260223 521) ((emacs (27 1))) "Semantic Syntax Highlighting for Lisp Languages" tar ((:url . "https://github.com/calsys456/lisp-semantic-hl.el") (:commit . "0474bfab3ae6b0d76425e117e6ae4fe9b0f04b54") (:revdesc . "0474bfab3ae6") (:keywords "languages" "lisp" "maint") (:authors ("The Calendrical System" . "us@calsys.org")) (:maintainers ("The Calendrical System" . "us@calsys.org")) (:maintainer "The Calendrical System" . "us@calsys.org"))])
+ (lispxmp . [(20260103 2307) nil "Automagic emacs lisp code annotation" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/lispxmp.el") (:commit . "af33c88276706633a0c37dddd672b27867a4b543") (:revdesc . "af33c8827670") (:keywords "lisp" "convenience") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (lispy . [(20230314 1738) ((emacs (24 3)) (ace-window (0 9 0)) (iedit (0 9 9)) (swiper (0 13 4)) (hydra (0 14 0)) (zoutline (0 2 0))) "Vi-like Paredit" tar ((:url . "https://github.com/abo-abo/lispy") (:commit . "fe44efd21573868638ca86fc8313241148fabbe3") (:revdesc . "fe44efd21573") (:keywords "lisp") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (lispyville . [(20220715 29) ((lispy (0)) (evil (1 2 12)) (cl-lib (0 5)) (emacs (24 4))) "A minor mode for integrating evil with lispy" tar ((:url . "https://github.com/noctuid/lispyville") (:commit . "14ee8711d58b649aeac03581d22b10ab077f06bd") (:revdesc . "14ee8711d58b") (:keywords "vim" "evil" "lispy" "lisp" "parentheses") (:authors ("Fox Kiester" . "noct@posteo.net")) (:maintainers ("Fox Kiester" . "noct@posteo.net")) (:maintainer "Fox Kiester" . "noct@posteo.net"))])
+ (list-environment . [(20210930 1439) nil "A tabulated process environment editor" tar ((:url . "https://github.com/dgtized/list-environment.el") (:commit . "0a72a5a9c1abc090b25202a0387e3f766994b053") (:revdesc . "0a72a5a9c1ab") (:keywords "processes" "unix") (:authors ("Charles L.G. Comstock" . "dgtized@gmail.com")) (:maintainers ("Charles L.G. Comstock" . "dgtized@gmail.com")) (:maintainer "Charles L.G. Comstock" . "dgtized@gmail.com"))])
+ (list-packages-ext . [(20151115 1716) ((s (1 6 0)) (ht (1 5 0)) (persistent-soft (0 8 6))) "Extras for list-packages" tar ((:url . "https://github.com/laynor/list-packages-ext") (:commit . "b4dd644e4369c9aa66f5bb8895ea49ebbfd0a27a") (:revdesc . "b4dd644e4369") (:keywords "convenience" "tools") (:authors ("Alessandro Piras" . "laynor@gmail.com")) (:maintainers ("Alessandro Piras" . "laynor@gmail.com")) (:maintainer "Alessandro Piras" . "laynor@gmail.com"))])
+ (list-projects . [(20250428 1646) ((emacs (28 1))) "List of known projects" tar ((:url . "https://github.com/MatthewTromp/list-projects") (:commit . "8f07faf991f201593388fb85fc7c70320755b71a") (:revdesc . "8f07faf991f2") (:authors ("Matthew Tromp" . "matthewktromp@gmail.com")) (:maintainers ("Matthew Tromp" . "matthewktromp@gmail.com")) (:maintainer "Matthew Tromp" . "matthewktromp@gmail.com"))])
+ (list-unicode-display . [(20241119 1152) ((emacs (24 3))) "Search for and list unicode characters by name" tar ((:url . "https://github.com/purcell/list-unicode-display") (:commit . "68feedd776082c1743588c2b07dbb6539dbe51bf") (:revdesc . "68feedd77608") (:keywords "convenience") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (list-utils . [(20241106 1849) nil "List-manipulation utility functions" tar ((:url . "https://github.com/rolandwalker/list-utils") (:commit . "bbea0e7cc7ab7d96e7f062014bde438aa8ffcd43") (:revdesc . "bbea0e7cc7ab") (:keywords "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (listenbrainz . [(20260603 1009) ((emacs (27 1)) (request (0 3))) "ListenBrainz API interface" tar ((:url . "https://github.com/zzkt/metabrainz") (:commit . "abd37d9f1c25a021b32eac54e6deff6080a66bca") (:revdesc . "abd37d9f1c25") (:keywords "music" "scrobbling" "multimedia") (:authors ("nik gaffney" . "nik@fo.am")) (:maintainers ("nik gaffney" . "nik@fo.am")) (:maintainer "nik gaffney" . "nik@fo.am"))])
+ (lister . [(20240102 1500) ((emacs (26 1))) "Yet another list printer" tar ((:url . "https://github.com/publicimageltd/lister") (:commit . "84fbba7450ac02cbb844727a28b6f245f553df7b") (:revdesc . "84fbba7450ac") (:keywords "lisp") (:authors (nil . "joerg@joergvolbers.de")) (:maintainers (nil . "joerg@joergvolbers.de")) (:maintainer nil . "joerg@joergvolbers.de"))])
+ (lit-mode . [(20141205 441) nil "Major mode for lit" tar ((:url . "https://github.com/HectorAE/lit-mode") (:commit . "c61c403afc8333a5649c5421ab1a6341dc1c7d92") (:revdesc . "c61c403afc83") (:keywords "languages" "tools") (:authors ("Hector A Escobedo" . "ninjahector.escobedo@gmail.com")) (:maintainers ("Hector A Escobedo" . "ninjahector.escobedo@gmail.com")) (:maintainer "Hector A Escobedo" . "ninjahector.escobedo@gmail.com"))])
+ (lit-ts-mode . [(20260224 2121) ((emacs (30 1)) (template-literals-ts-mode (0 1 0))) "Lit-aware JS/TS modes with tree-sitter support" tar ((:url . "https://github.com/ispringle/lit-ts-mode") (:commit . "9dae586c13b28c467cda462c767d10e2ade3658f") (:revdesc . "9dae586c13b2") (:keywords "languages" "javascript" "typescript" "tree-sitter" "lit") (:authors ("Ian S. Pringle" . "ian@dapringles.com")) (:maintainers ("Ian S. Pringle" . "ian@dapringles.com")) (:maintainer "Ian S. Pringle" . "ian@dapringles.com"))])
+ (litable . [(20240321 2059) ((dash (2 6 0))) "Dynamic evaluation replacement with emacs" tar ((:url . "https://github.com/Fuco1/litable") (:commit . "b83b1283ea6642ab82f536f1f3b280160404ff6b") (:revdesc . "b83b1283ea66") (:keywords "lisp") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (litanize . [(20230419 917) ((emacs (24 1)) (enlive (0 0 1)) (s (1 12 0))) "Generate \"Latour Litanies\"" tar ((:url . "https://github.com/zzkt/litanizer") (:commit . "a45902fa29c16ef9606229cb01a5441ea754f11b") (:revdesc . "a45902fa29c1") (:keywords "tools" "latour litany" "alien phenomenology" "ontography" "metaphorism" "carpentry") (:authors ("nik gaffney" . "nik@fo.am")) (:maintainers ("nik gaffney" . "nik@fo.am")) (:maintainer "nik gaffney" . "nik@fo.am"))])
+ (literal-string . [(20191023 733) ((emacs (25)) (edit-indirect (0 1 5))) "Edit string literals in a dedicated buffer" tar ((:url . "https://github.com/joodie/literal-string-mode/") (:commit . "afffa86e626798ee9f9188ea3be2d5ee6ad17c39") (:revdesc . "afffa86e6267") (:keywords "lisp" "tools" "docs") (:authors ("Joost Diepenmaat" . "joost@zeekat.nl")) (:maintainers ("Joost Diepenmaat" . "joost@zeekat.nl")) (:maintainer "Joost Diepenmaat" . "joost@zeekat.nl"))])
+ (literate-calc-mode . [(20250809 1227) ((emacs (27)) (dash (2 19 1)) (s (1 12 0))) "Inline results from calc" tar ((:url . "https://github.com/sulami/literate-calc-mode.el") (:commit . "bdfdb6e526cdcf987ecded3bd9032990e5be1236") (:revdesc . "bdfdb6e526cd") (:keywords "calc" "languages" "tools"))])
+ (literate-coffee-mode . [(20170211 1515) ((coffee-mode (0 5 0))) "Major-mode for Literate CoffeeScript" tar ((:url . "https://github.com/syohex/emacs-literate-coffee-mode") (:commit . "ef34c3a5b813ef078d44c29887761950ab6821c7") (:revdesc . "ef34c3a5b813") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (literate-elisp . [(20260729 513) ((emacs (30 1))) "Load Emacs Lisp code blocks from Org files" tar ((:url . "https://github.com/jingtaozf/literate-elisp") (:commit . "9fcfe78b9bf8a7cfc85ef2074f72a49e8ea6d2b7") (:revdesc . "9fcfe78b9bf8") (:keywords "lisp" "docs" "extensions" "tools") (:authors ("Jingtao Xu" . "jingtaozf@gmail.com")) (:maintainers ("Jingtao Xu" . "jingtaozf@gmail.com")) (:maintainer "Jingtao Xu" . "jingtaozf@gmail.com"))])
+ (litex-mode . [(20221107 147) ((emacs (24 4)) (units-mode (0 1 1))) "Minor mode for converting lisp to LaTeX" tar ((:url . "https://github.com/Atreyagaurav/litex-mode") (:commit . "45004b3a865771799b739d17ebb7849190fffa63") (:revdesc . "45004b3a8657") (:keywords "calculator" "lisp" "latex") (:authors ("Gaurav Atreya" . "allmanpride@gmail.com")) (:maintainers ("Gaurav Atreya" . "allmanpride@gmail.com")) (:maintainer "Gaurav Atreya" . "allmanpride@gmail.com"))])
+ (lithium . [(20250703 243) ((emacs (25 1))) "Lightweight modal interfaces" tar ((:url . "https://github.com/countvajhula/lithium") (:commit . "5ed65cba5ff3de06764ddf1b5efc6761c932017a") (:revdesc . "5ed65cba5ff3") (:keywords "convenience" "emulations" "lisp" "tools") (:authors ("Siddhartha Kasivajhula" . "sid@countvajhula.com")) (:maintainers ("Siddhartha Kasivajhula" . "sid@countvajhula.com")) (:maintainer "Siddhartha Kasivajhula" . "sid@countvajhula.com"))])
+ (live-code-talks . [(20180907 1647) ((emacs (24)) (cl-lib (0 5)) (narrowed-page-navigation (0 1))) "Support for slides with live code in them" tar ((:url . "https://github.com/david-christiansen/live-code-talks") (:commit . "97f16a9ee4e6ff3e0f9291eaead772c66e3e12ae") (:revdesc . "97f16a9ee4e6") (:keywords "docs" "multimedia") (:authors ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainers ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainer "David Raymond Christiansen" . "david@davidchristiansen.dk"))])
+ (live-preview . [(20231215 1612) ((emacs (24 4))) "Live preview by any shell command while editing" tar ((:url . "https://github.com/lassik/emacs-live-preview") (:commit . "135f2b9a8ecf81d00cf92175d144a33561e36f4c") (:revdesc . "135f2b9a8ecf") (:keywords "languages" "util") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (live-py-mode . [(20260227 509) ((emacs (24 3))) "Live Coding in Python" tar ((:url . "http://donkirkby.github.io/live-py-plugin/") (:commit . "7655ee7a7294cd486fd02603d76061c1c773e058") (:revdesc . "7655ee7a7294") (:keywords "live" "coding"))])
+ (lively . [(20171005 754) nil "Interactively updating text" tar ((:url . "https://github.com/purcell/lively") (:commit . "348675828c6a81bfa1ac311ca465aad813542c1b") (:revdesc . "348675828c6a") (:authors ("Luke Gorrie" . "luke@bup.co.nz")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (livereload . [(20170629 650) ((emacs (25)) (websocket (1 8))) "Livereload server" tar ((:url . "https://github.com/joaotavora/emacs-livereload") (:commit . "1e501d7e46dbd476c2c7cc9d20b5ac9d41fb1955") (:revdesc . "1e501d7e46db") (:keywords "convenience") (:authors ("João Távora" . "joaotavora@gmail.com")) (:maintainers ("João Távora" . "joaotavora@gmail.com")) (:maintainer "João Távora" . "joaotavora@gmail.com"))])
+ (livescript-mode . [(20221015 1316) ((emacs (24 3))) "Major mode for editing LiveScript files" tar ((:url . "https://github.com/yhisamatsu/livescript-mode") (:commit . "e71a82a400e9d451c966c397bb8fa7887d35637b") (:revdesc . "e71a82a400e9") (:keywords "languages" "livescript") (:authors ("Hisamatsu Yasuyuki" . "yas@null.net")) (:maintainers ("Hisamatsu Yasuyuki" . "yas@null.net")) (:maintainer "Hisamatsu Yasuyuki" . "yas@null.net"))])
+ (livid-mode . [(20131116 1344) ((skewer-mode (1 5 3)) (s (1 8 0))) "Live browser eval of JavaScript every time a buffer changes" tar ((:url . "https://github.com/pandeiro/livid-mode") (:commit . "dfe5212fa64738bc4138bfebf349fbc8bc237c26") (:revdesc . "dfe5212fa647"))])
+ (ll-debug . [(20211002 1031) ((emacs (24 3))) "Low level debug tools" tar ((:url . "https://github.com/replrep/ll-debug") (:commit . "a2cfeab46e5100c348b35987fae34f9ea76d7c0b") (:revdesc . "a2cfeab46e51") (:keywords "abbrev" "convenience" "tools" "c" "lisp") (:authors ("Claus Brunzema" . "mail@cbrunzema.de")) (:maintainers ("Claus Brunzema" . "mail@cbrunzema.de")) (:maintainer "Claus Brunzema" . "mail@cbrunzema.de"))])
+ (llama . [(20260601 1455) ((emacs (26 1)) (compat (31 0))) "Compact syntax for short lambda" tar ((:url . "https://github.com/tarsius/llama") (:commit . "4d4024048053b898a01521046e0f063ee47615b0") (:revdesc . "4d4024048053") (:keywords "extensions") (:authors ("Jonas Bernoulli" . "emacs.llama@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.llama@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.llama@jonas.bernoulli.dev"))])
+ (llama-cpp . [(20240511 1039) ((emacs (27 1)) (dash (2 19 1))) "A client for llama-cpp server" tar ((:url . "https://github.com/kurnevsky/llama.el") (:commit . "5cea3698aa63921b21888f126cae4f3ebc1baa39") (:revdesc . "5cea3698aa63") (:keywords "tools") (:authors ("Evgeny Kurnevsky" . "kurnevsky@gmail.com")) (:maintainers ("Evgeny Kurnevsky" . "kurnevsky@gmail.com")) (:maintainer "Evgeny Kurnevsky" . "kurnevsky@gmail.com"))])
+ (llm-test . [(20260413 2012) ((emacs (29 1)) (llm (0 18 0)) (yaml (0 5 0)) (futur (1 2))) "LLM-driven testing for packages" tar ((:url . "https://github.com/ahyatt/llm-test") (:commit . "b01444d9a7cffd7273162043921cb47eacc48373") (:revdesc . "b01444d9a7cf") (:keywords "testing" "tools") (:authors ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainers ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainer "Andrew Hyatt" . "ahyatt@gmail.com"))])
+ (llvm-ts-mode . [(20231120 1251) ((emacs (29 1))) "LLVM major mode using tree-sitter" tar ((:url . "https://github.com/nverno/llvm-ts-mode") (:commit . "9974601dcddbeffc4ad47598d63d3c1a83bb6fb9") (:revdesc . "9974601dcddb") (:keywords "languages" "tree-sitter" "llvm") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (lms . [(20210820 2200) ((emacs (25 1))) "Squeezebox / Logitech Media Server frontend" tar ((:url . "https://hg.serna.eu/emacs/lms") (:commit . "29593b4c18a570dfb2e60b196f24d407a1277daa") (:revdesc . "29593b4c18a5") (:keywords "multimedia") (:authors ("Iñigo Serna" . "inigoserna@gmx.com")) (:maintainers ("Iñigo Serna" . "inigoserna@gmx.com")) (:maintainer "Iñigo Serna" . "inigoserna@gmx.com"))])
+ (load-bash-alias . [(20240103 916) ((emacs (24 1)) (seq (2 16))) "Convert bash aliases into eshell ones" tar ((:url . "https://github.com/daviderestivo/load-bash-alias") (:commit . "7e7b6773f99e6aafe819596388a3a7fd09dd91a9") (:revdesc . "7e7b6773f99e") (:keywords "emacs" "bash" "eshell" "alias") (:authors ("Davide Restivo" . "davide.restivo@yahoo.it")) (:maintainers ("Davide Restivo" . "davide.restivo@yahoo.it")) (:maintainer "Davide Restivo" . "davide.restivo@yahoo.it"))])
+ (load-env-vars . [(20180511 2210) ((emacs (24))) "Load environment variables from files" tar ((:url . "https://github.com/diasjorge/emacs-load-env-vars") (:commit . "5da97fabb4d36a00a29c40375fce9c16d8005ab3") (:revdesc . "5da97fabb4d3") (:keywords "lisp") (:authors ("Jorge Dias" . "jorge@mrdias.com")) (:maintainers ("Jorge Dias" . "jorge@mrdias.com")) (:maintainer "Jorge Dias" . "jorge@mrdias.com"))])
+ (load-relative . [(20230214 1032) nil "Relative file load (within a multi-file Emacs package)" tar ((:url . "https://github.com/rocky/emacs-load-relative") (:commit . "b7987c265a64435299d6b02f960ed2c894c4a145") (:revdesc . "b7987c265a64") (:keywords "internal") (:authors ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainers ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainer "Rocky Bernstein" . "rocky@gnu.org"))])
+ (load-theme-buffer-local . [(20120702 2036) nil "Install emacs24 color themes by buffer" tar ((:url . "https://github.com/vic/color-theme-buffer-local") (:commit . "bc221a88aefec5bdc137b5d5e449e1f1e55ce901") (:revdesc . "bc221a88aefe") (:keywords "faces") (:authors ("Victor Borja" . "vic.borja@gmail.com")) (:maintainers ("Victor Borja" . "vic.borja@gmail.com")) (:maintainer "Victor Borja" . "vic.borja@gmail.com"))])
+ (lobsters . [(20260623 735) ((emacs (25 1)) (request (0 2 0)) (visual-fill-column (2 4))) "A Lobsters client" tar ((:url . "https://github.com/tanrax/lobsters.el") (:commit . "41ca67e5827793e91834bf03cdefab581783c3d5") (:revdesc . "41ca67e58277") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (loc-changes . [(20260118 2151) ((emacs (24 4)) (compat (30 1 0 1))) "Keep track of positions even after buffer changes" tar ((:url . "https://github.com/rocky/emacs-loc-changes") (:commit . "a1d2852c4422f09f385069127b93a5c455954e9b") (:revdesc . "a1d2852c4422") (:authors ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainers ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainer "Rocky Bernstein" . "rocky@gnu.org"))])
+ (loccur . [(20240610 1830) ((emacs (25 1))) "Perform an occur-like folding in current buffer" tar ((:url . "https://codeberg.org/fourier/loccur") (:commit . "f47c53a24a9d262898517c71284337821dad7ea9") (:revdesc . "f47c53a24a9d") (:keywords "matching") (:authors ("Alexey Veretennikov" . "alexey.veretennikov@gmail.com")) (:maintainers ("Alexey Veretennikov" . "alexey.veretennikov@gmail.com")) (:maintainer "Alexey Veretennikov" . "alexey.veretennikov@gmail.com"))])
+ (lockfile-mode . [(20170625 507) nil "Major mode for .lock files" tar ((:url . "https://github.com/preetpalS/emacs-lockfile-mode") (:commit . "496b6035716df0582f879f9488f296947cabead2") (:revdesc . "496b6035716d"))])
+ (loco . [(20250917 1458) ((emacs (29 1))) "Enter complex key sequences with ease!" tar ((:url . "https://github.com/csmclaren/loco") (:commit . "eb9f89221d10b946482a79493d63a6fac15fb9fc") (:revdesc . "eb9f89221d10") (:keywords "abbrev" "convenience") (:authors ("Chris McLaren" . "csmclaren@me.com")) (:maintainers ("Chris McLaren" . "csmclaren@me.com")) (:maintainer "Chris McLaren" . "csmclaren@me.com"))])
+ (locs-and-refs . [(20250303 2053) ((emacs (27 1)) (pcre2el (1 11))) "Define locations and references for files and buffers" tar ((:url . "https://github.com/phf-1/locs-and-refs") (:commit . "5c3f0e04ea6cc4728219dfd716d95c7d044b8030") (:revdesc . "5c3f0e04ea6c") (:authors ("Pierre-Henry FRÖHRING" . "contact@phfrohring.com")) (:maintainers ("Pierre-Henry FRÖHRING" . "contact@phfrohring.com")) (:maintainer "Pierre-Henry FRÖHRING" . "contact@phfrohring.com"))])
+ (lodgeit . [(20190802 1308) nil "Paste to a lodgeit powered pastebin" tar ((:url . "https://github.com/ionrock/lodgeit-el") (:commit . "442637194d48a7105b7747b8d98772f5899f9e21") (:revdesc . "442637194d48") (:keywords "pastebin" "lodgeit") (:authors ("Eric Larson" . "eric@ionrock.org")) (:maintainers ("Eric Larson" . "eric@ionrock.org")) (:maintainer "Eric Larson" . "eric@ionrock.org"))])
+ (log4e . [(20240123 1313) nil "Provide logging framework for elisp" tar ((:url . "https://github.com/aki2o/log4e") (:commit . "6d71462df9bf595d3861bfb328377346aceed422") (:revdesc . "6d71462df9bf") (:keywords "log") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (log4j-mode . [(20230826 1331) ((emacs (25 1))) "Major mode for viewing log files" tar ((:url . "https://github.com/dykstrom/log4j-mode") (:commit . "45d5e3ee918f502a160c3a131ce75fd3c38e5c6e") (:revdesc . "45d5e3ee918f") (:keywords "tools"))])
+ (logalimacs . [(20131021 1829) ((popwin (0 6 2)) (popup (0 5 0)) (stem (20130120))) "Front-end to logaling-command for Ruby gems" tar ((:url . "https://github.com/logaling/logalimacs") (:commit . "8286e39502250fc6c3c6656a7f46a8eee8e9a713") (:revdesc . "8286e3950225") (:keywords "translation" "logaling-command") (:authors ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainers ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainer "Yuta Yamada" . "cokesboy\"at\"gmail.com"))])
+ (logito . [(20201226 534) ((emacs (25 1))) "Logging library for Emacs" tar ((:url . "https://github.com/sigma/logito") (:commit . "d5934ce10ba3a70d3fcfb94d742ce3b9136ce124") (:revdesc . "d5934ce10ba3") (:keywords "lisp" "extensions") (:authors ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainers ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainer "Yann Hodique" . "yann.hodique@gmail.com"))])
+ (logms . [(20260101 600) ((emacs (27 1)) (f (0 20 0)) (s (1 9 0)) (ht (2 3))) "Log message with clickable links to context" tar ((:url . "https://github.com/jcs-elpa/logms") (:commit . "7f430ce289d4f46597e67bf46a24e51a8d7471aa") (:revdesc . "7f430ce289d4") (:keywords "maint" "debug" "log") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (lognav-mode . [(20240115 1637) ((emacs (24 3))) "Navigate Log Error Messages" tar ((:url . "https://github.com/ellisvelo/lognav-mode.git") (:commit . "139da9eb356b4432f416d1db49fdbfa46fb1bf8d") (:revdesc . "139da9eb356b") (:keywords "log" "error" "lognav-mode" "convenience") (:authors ("Shawn Ellis" . "shawn.ellis17@gmail.com")) (:maintainers ("Shawn Ellis" . "shawn.ellis17@gmail.com")) (:maintainer "Shawn Ellis" . "shawn.ellis17@gmail.com"))])
+ (logpad . [(20201113 917) nil "Simulate Windows Notepad for logging" tar ((:url . "https://github.com/dertuxmalwieder/logpad.el") (:commit . "2955c6e3de40bd1e84acb4c16c7690b210f82bec") (:revdesc . "2955c6e3de40") (:keywords "files" "outlines" "notepad") (:authors ("Sven Knurr" . "git@tuxproject.de")) (:maintainers ("Sven Knurr" . "git@tuxproject.de")) (:maintainer "Sven Knurr" . "git@tuxproject.de"))])
+ (logstash-conf . [(20210123 1949) nil "Basic mode for editing logstash configuration" tar ((:url . "https://github.com/Wilfred/logstash-conf.el") (:commit . "ec9b527191cd47d3b5947cb0ec3d6a8a57b121ea") (:revdesc . "ec9b527191cd") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (logview . [(20260218 2013) ((emacs (25 1)) (datetime (0 8)) (extmap (1 0)) (compat (29))) "Major mode for viewing log files" tar ((:url . "https://github.com/doublep/logview") (:commit . "50cac3f726abd4e7872b8fa36ede72550ce66a64") (:revdesc . "50cac3f726ab") (:keywords "files" "tools") (:authors ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainers ("Paul Pogonyshev" . "pogonyshev@gmail.com")) (:maintainer "Paul Pogonyshev" . "pogonyshev@gmail.com"))])
+ (lol-data-dragon . [(20200705 1822) ((emacs (25 1))) "Browse Champions of League of Legends on Data Dragon" tar ((:url . "https://github.com/xuchunyang/lol-data-dragon.el") (:commit . "0deec9867bd7ba96220ee2968a9b2a94fd474431") (:revdesc . "0deec9867bd7") (:keywords "games" "hypermedia"))])
+ (lolcat . [(20190527 1145) ((emacs (24 3))) "Rainbows and unicorns!" tar ((:url . "https://github.com/xuchunyang/lolcat.el") (:commit . "4855e587a3b9681c077dac4b9f166dd860f439a4") (:revdesc . "4855e587a3b9") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (lolcode-mode . [(20111002 847) nil "Major mode for editing LOLCODE" tar ((:url . "https://github.com/bodil/lolcode-mode") (:commit . "280a47e0bf02ee3abc7c5b6b14345056f41981f9") (:revdesc . "280a47e0bf02") (:keywords "lolcode" "major" "mode") (:authors ("Bodil Stokke" . "lolcode@bodil.tv")) (:maintainers ("Bodil Stokke" . "lolcode@bodil.tv")) (:maintainer "Bodil Stokke" . "lolcode@bodil.tv"))])
+ (lonelog . [(20260225 1826) ((emacs (27 1))) "Solo RPG notation support" tar ((:url . "https://github.com/enfors/lonelog") (:commit . "0b013df2611d13f88e59a5d3007677d2e34d7b5e") (:revdesc . "0b013df2611d") (:keywords "games" "convenience" "wp") (:authors ("Christer Enfors" . "christer.enfors@gmail.com")) (:maintainers ("Christer Enfors" . "christer.enfors@gmail.com")) (:maintainer "Christer Enfors" . "christer.enfors@gmail.com"))])
+ (look-dired . [(20160729 2323) ((look-mode (1 0))) "Extensions to look-mode for dired buffers" tar ((:url . "https://github.com/vapniks/look-dired") (:commit . "9bfa4e5e6f3810705b6426c88493ea0bf6b15640") (:revdesc . "9bfa4e5e6f38") (:keywords "convenience") (:authors ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainers ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainer "Joe Bloggs" . "vapniks@yahoo.com"))])
+ (look-mode . [(20260712 530) nil "Quick file viewer for image and text file browsing" tar ((:url . "https://github.com/petermao/look-mode") (:commit . "9102caebfb266e8153e14f7462dddfcfa8ba54dd") (:revdesc . "9102caebfb26") (:authors ("Peter H. Mao" . "petermao@jpl.nasa.gov")) (:maintainers ("Peter H. Mao" . "petermao@jpl.nasa.gov")) (:maintainer "Peter H. Mao" . "petermao@jpl.nasa.gov"))])
+ (loop . [(20160813 1407) nil "Friendly imperative loop structures" tar ((:url . "https://github.com/Wilfred/loop.el") (:commit . "0ce77271d56b0fcdba4b3b38fed526081cd1f674") (:revdesc . "0ce77271d56b") (:keywords "loop" "while" "for each" "break" "continue") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (loophole . [(20221126 1556) ((emacs (27 1))) "Manage temporary key bindings" tar ((:url . "https://github.com/0x60df/loophole") (:commit . "dadc3fadc68b13501c4dbe89109f30deb0d3441a") (:revdesc . "dadc3fadc68b") (:keywords "convenience") (:authors ("0x60DF" . "0x60df@gmail.com")) (:maintainers ("0x60DF" . "0x60df@gmail.com")) (:maintainer "0x60DF" . "0x60df@gmail.com"))])
+ (loopy . [(20260722 144) ((emacs (28 1)) (map (3 3 1)) (seq (2 22)) (compat (29 1 3)) (stream (2 4 0))) "A looping macro" tar ((:url . "https://codeberg.org/okamsn/loopy") (:commit . "d33417ff4ff436a221eb10c73c283c9c2af3cde1") (:revdesc . "d33417ff4ff4") (:keywords "extensions"))])
+ (loopy-dash . [(20260627 112) ((emacs (28 1)) (loopy (0 13 0)) (dash (2 20))) "Dash destructuring for `loopy'" tar ((:url . "https://codeberg.org/okamsn/loopy-dash") (:commit . "d7630105c7188a6e7bc23e66e0c1efb56e005d21") (:revdesc . "d7630105c718") (:keywords "extensions"))])
+ (lorem-ipsum . [(20221214 1857) nil "Insert dummy pseudo Latin text" tar ((:url . "https://github.com/jschaf/emacs-lorem-ipsum") (:commit . "4e87a899868e908a7a9e1812831d76c8d072f885") (:revdesc . "4e87a899868e") (:keywords "tools" "language" "convenience") (:authors ("Jean-Philippe Theberge" . "(jphil21@sourceforge.net)")) (:maintainers ("Joe Schafer" . "(joe@jschaf.com)")) (:maintainer "Joe Schafer" . "(joe@jschaf.com)"))])
+ (lox-mode . [(20200619 1700) ((emacs (24 3))) "Major mode for the Lox programming language" tar ((:url . "https://github.com/timmyjose-projects/lox-mode") (:commit . "083a2299e188a516d1e46ef2dd1cbb89db1aec49") (:revdesc . "083a2299e188") (:keywords "languages" "lox") (:authors ("Timmy Jose" . "zoltan.jose@gmail.com")) (:maintainers ("Timmy Jose" . "zoltan.jose@gmail.com")) (:maintainer "Timmy Jose" . "zoltan.jose@gmail.com"))])
+ (lox-ts-mode . [(20240820 345) ((emacs (29 1))) "Major mode for Lox using tree-sitter" tar ((:url . "https://github.com/nverno/lox-ts-mode") (:commit . "3a482f6a96318d617d35683089d5edb405cd0752") (:revdesc . "3a482f6a9631") (:keywords "lox" "tree-sitter" "languages") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (lpy . [(20231026 1525) ((emacs (25 1)) (lispy (0 27 0))) "A lispy interface to Python" tar ((:url . "https://github.com/abo-abo/lpy") (:commit . "2c086ec162d4456b99a6095c3c335382a8304734") (:revdesc . "2c086ec162d4") (:keywords "python" "lisp") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (lsp-cfn . [(20240112 921) ((emacs (27 0)) (lsp-mode (8 0 0)) (yaml-mode (0 0 15))) "LSP integration for cfn-lsp-extra" tar ((:url . "https://github.com/LaurenceWarne/lsp-cfn.el") (:commit . "2297533003118ebd9db0116b4d3486a987e98ca9") (:revdesc . "229753300311"))])
+ (lsp-dart . [(20260507 1741) ((emacs (29 1)) (lsp-treemacs (0 3)) (lsp-mode (7 0 1)) (dap-mode (0 6)) (f (0 20 0)) (dash (2 14 1)) (dart-mode (1 0 5)) (jsonrpc (1 0 15)) (ht (2 2))) "Dart support lsp-mode" tar ((:url . "https://emacs-lsp.github.io/lsp-dart") (:commit . "a0649b4dbf3eb1f1fac4be172ba282df43b16b73") (:revdesc . "a0649b4dbf3e") (:keywords "languages" "extensions"))])
+ (lsp-docker . [(20260507 1750) ((emacs (29 1)) (dash (2 14 1)) (lsp-mode (6 2 1)) (f (0 20 0)) (s (1 13 0)) (yaml (0 2 0)) (ht (2 0))) "LSP Docker integration" tar ((:url . "https://github.com/emacs-lsp/lsp-docker") (:commit . "f666fba72b496c7750bb3f349771b07aa51714f0") (:revdesc . "f666fba72b49") (:keywords "languages" "langserver") (:authors ("Ivan Yonchovski" . "yyoncho@gmail.com")) (:maintainers ("Ivan Yonchovski" . "yyoncho@gmail.com")) (:maintainer "Ivan Yonchovski" . "yyoncho@gmail.com"))])
+ (lsp-focus . [(20260507 1747) ((emacs (29 1)) (focus (0 1 1)) (lsp-mode (6 1))) "Focus.el support for lsp-mode" tar ((:url . "https://github.com/emacs-lsp/lsp-focus") (:commit . "675a20610c63577bb5363c2ed9b253705bbfee4f") (:revdesc . "675a20610c63") (:keywords "languages" "lsp-mode"))])
+ (lsp-grammarly . [(20260503 1232) ((emacs (29 1)) (lsp-mode (6 1)) (grammarly (0 3 0)) (request (0 3 0)) (s (1 12 0)) (ht (2 3))) "LSP Clients for Grammarly" tar ((:url . "https://github.com/emacs-grammarly/lsp-grammarly") (:commit . "237a8322bee1982e926610c7d228fd0bc1e3bc50") (:revdesc . "237a8322bee1") (:keywords "convenience" "lsp" "grammarly" "checker") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (lsp-haskell . [(20260507 1745) ((emacs (29 1)) (lsp-mode (3 0))) "Haskell support for lsp-mode" tar ((:url . "https://github.com/emacs-lsp/lsp-haskell") (:commit . "4c3001aeb116fb489223269ea353359b90e2a5e1") (:revdesc . "4c3001aeb116") (:keywords "haskell"))])
+ (lsp-intellij . [(20180831 2051) ((emacs (25 1)) (lsp-mode (4 1))) "Intellij lsp client" tar ((:url . "https://github.com/Ruin0x11/lsp-intellij") (:commit . "cf30f0ac63bd0140e758840b8ab070e8313697b2") (:revdesc . "cf30f0ac63bd") (:keywords "languages" "processes" "tools") (:authors ("Ruin0x11" . "ipickering2@gmail.com")) (:maintainers ("Ruin0x11" . "ipickering2@gmail.com")) (:maintainer "Ruin0x11" . "ipickering2@gmail.com"))])
+ (lsp-ivy . [(20260507 1752) ((emacs (29 1)) (dash (2 14 1)) (lsp-mode (6 2 1)) (ivy (0 13 0))) "LSP ivy integration" tar ((:url . "https://github.com/emacs-lsp/lsp-ivy") (:commit . "c0930544948dfdb7bf497fc9e58aa6b4b857e237") (:revdesc . "c0930544948d") (:keywords "languages" "debug"))])
+ (lsp-java . [(20260510 647) ((emacs (29 1)) (lsp-mode (10 0 0)) (markdown-mode (2 3)) (dash (2 18 0)) (f (0 20 0)) (ht (2 0)) (request (0 3 0)) (treemacs (2 5)) (dap-mode (0 5))) "Java support for lsp-mode" tar ((:url . "https://github.com/emacs-lsp/lsp-java") (:commit . "5294db2ac033a289e4878fa8386629b75cb3ccb6") (:revdesc . "5294db2ac033") (:keywords "languague" "tools"))])
+ (lsp-javacomp . [(20190124 1755) ((emacs (25 1)) (lsp-mode (3 0)) (s (1 2 0))) "Provide Java IDE features powered by JavaComp" tar ((:url . "https://github.com/tigersoldier/lsp-javacomp") (:commit . "82aa4ad6ca03a74565c35e855b318b1887bcd89b") (:revdesc . "82aa4ad6ca03") (:keywords "java" "tools" "lsp"))])
+ (lsp-jedi . [(20230824 1908) ((emacs (25 1)) (lsp-mode (6 0))) "Lsp client plugin for Python Jedi Language Server" tar ((:url . "https://github.com/fredcamps/lsp-jedi") (:commit . "3c828df8dd422dbb94856cc99db6f9acb52b871d") (:revdesc . "3c828df8dd42") (:keywords "language-server" "tools" "python" "jedi" "ide") (:authors ("Fred Campos" . "fred.tecnologia@gmail.com")))])
+ (lsp-julia . [(20230915 654) ((emacs (25 1)) (lsp-mode (6 3)) (julia-mode (0 3))) "Julia support for lsp-mode" tar ((:url . "https://github.com/gdkrmr/lsp-julia") (:commit . "c869b2f6c05a97e5495ed3cc6710a33b4faf41a2") (:revdesc . "c869b2f6c05a") (:keywords "languages" "tools") (:authors ("Martin Wolke" . "vibhavp@gmail.com") ("Adam Beckmeyer" . "adam_git@thebeckmeyers.xyz") ("Guido Kraemer" . "gdkrmr@users.noreply.github.com")) (:maintainers ("Guido Kraemer" . "gdkrmr@users.noreply.github.com")) (:maintainer "Guido Kraemer" . "gdkrmr@users.noreply.github.com"))])
+ (lsp-latex . [(20251104 1507) ((emacs (29 1)) (lsp-mode (6 0)) (consult (0 35))) "LSP-mode client for LaTeX, on texlab" tar ((:url . "https://github.com/ROCKTAKEY/lsp-latex") (:commit . "a9ac457141f0aa15505b61ded3f12d0ad477b771") (:revdesc . "a9ac457141f0") (:keywords "languages" "tex") (:authors ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "ROCKTAKEY" . "rocktakey@gmail.com"))])
+ (lsp-ltex . [(20260503 1233) ((emacs (29 1)) (lsp-mode (6 1))) "LSP Clients for LTEX" tar ((:url . "https://github.com/emacs-languagetool/lsp-ltex") (:commit . "a7014677b10ddc1127f9e6ed4ffaf9c5ab18922c") (:revdesc . "a7014677b10d") (:keywords "convenience" "lsp" "languagetool" "checker") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (lsp-ltex-plus . [(20260626 618) ((emacs (27 1)) (lsp-mode (6 0))) "Grammar and spell checking for LaTeX, Markdown, Org and more" tar ((:url . "https://github.com/ltex-plus/emacs-ltex-plus") (:commit . "dc617ed2a21f6453053d218601fee38d1bfd6c70") (:revdesc . "dc617ed2a21f") (:keywords "lsp" "grammar" "spelling" "convenience") (:authors ("Andrea Alberti" . "a.alberti82@gmail.com")) (:maintainers ("Andrea Alberti" . "a.alberti82@gmail.com")) (:maintainer "Andrea Alberti" . "a.alberti82@gmail.com"))])
+ (lsp-metals . [(20260529 1928) ((emacs (29 1)) (scala-mode (0 23)) (lsp-mode (7 0)) (lsp-treemacs (0 2)) (dap-mode (0 3)) (dash (2 18 0)) (f (0 20 0)) (ht (2 0)) (treemacs (3 1))) "Scala Client settings" tar ((:url . "https://github.com/emacs-lsp/lsp-metals") (:commit . "afeacc7a528b80b9a9f2747428e5608c264201ec") (:revdesc . "afeacc7a528b") (:keywords "languages" "extensions") (:authors ("Ross A. Baker" . "ross@rossabaker.com") ("Evgeny Kurnevsky" . "kurnevsky@gmail.com")) (:maintainers ("Ross A. Baker" . "ross@rossabaker.com") ("Evgeny Kurnevsky" . "kurnevsky@gmail.com")) (:maintainer "Ross A. Baker" . "ross@rossabaker.com"))])
+ (lsp-mode . [(20260716 755) ((emacs (29 1)) (dash (2 18 0)) (f (0 21 0)) (ht (2 3)) (spinner (1 7 3)) (markdown-mode (2 3)) (lv (0)) (eldoc (1 11))) "LSP mode" tar ((:url . "https://github.com/emacs-lsp/lsp-mode") (:commit . "6bfc593d7b1bc0dd656f09ffce52cc085ebced05") (:revdesc . "6bfc593d7b1b") (:keywords "languages"))])
+ (lsp-mssql . [(20260507 1743) ((emacs (29 1)) (lsp-mode (6 2)) (dash (2 14 1)) (f (0 20 0)) (ht (2 0)) (lsp-treemacs (0 1))) "MSSQL LSP bindings" tar ((:url . "https://github.com/emacs-lsp/lsp-mssql") (:commit . "02e50306c92af1c98473840169a477b22f72af2d") (:revdesc . "02e50306c92a") (:keywords "data" "languages") (:authors ("Ivan Yonchovski" . "yyoncho@gmail.com")) (:maintainers ("Ivan Yonchovski" . "yyoncho@gmail.com")) (:maintainer "Ivan Yonchovski" . "yyoncho@gmail.com"))])
+ (lsp-origami . [(20260507 1743) ((emacs (29 1)) (origami (1 0)) (lsp-mode (6 1))) "Origami.el support for lsp-mode" tar ((:url . "https://github.com/emacs-lsp/lsp-origami") (:commit . "dd398afcf8e9077231dc26ea189916e6ea64c6ab") (:revdesc . "dd398afcf8e9") (:keywords "languages" "lsp-mode"))])
+ (lsp-pascal . [(20200422 1610) ((emacs (24 4)) (lsp-mode (6 3))) "LSP client for Pascal" tar ((:url . "https://github.com/arjanadriaanse/lsp-pascal") (:commit . "9b65bf9e923b1459d1feb1d7528e5855e7bd4ef2") (:revdesc . "9b65bf9e923b") (:keywords "languages" "tools") (:authors ("Arjan Adriaanse" . "arjan@adriaan.se")) (:maintainers ("Arjan Adriaanse" . "arjan@adriaan.se")) (:maintainer "Arjan Adriaanse" . "arjan@adriaan.se"))])
+ (lsp-pyre . [(20190406 335) ((lsp-mode (6 0))) "Lsp-mode client for python using pyre" tar ((:url . "https://github.com/jra3/lsp-pyre") (:commit . "e177b8f5efd1a955b5753aeb5d1894e6d21be35a") (:revdesc . "e177b8f5efd1") (:authors ("John Allen" . "oss@porcnick.com")) (:maintainers ("John Allen" . "oss@porcnick.com")) (:maintainer "John Allen" . "oss@porcnick.com"))])
+ (lsp-pyright . [(20260507 1742) ((emacs (29 1)) (lsp-mode (7 0)) (dash (2 18 0)) (ht (2 0))) "Python LSP client using Pyright" tar ((:url . "https://github.com/emacs-lsp/lsp-pyright") (:commit . "187e08caee4e1630a9975f492274c739f325392f") (:revdesc . "187e08caee4e") (:keywords "languages" "tools" "lsp"))])
+ (lsp-python-ms . [(20230731 1458) ((emacs (25 1)) (lsp-mode (6 1))) "The lsp-mode client for Microsoft python-language-server" tar ((:url . "https://github.com/emacs-lsp/lsp-python-ms") (:commit . "7bda327bec7b219d140c34dab4b1e1fbd41bc516") (:revdesc . "7bda327bec7b") (:keywords "languages" "tools"))])
+ (lsp-rescript . [(20250808 1449) ((lsp-mode (7 0 1)) (emacs (25 1)) (rescript-mode (0 1))) "LSP client configuration for lsp-mode and rescript-vscode" tar ((:url . "https://github.com/jjlee/lsp-rescript") (:commit . "3c13e3ffe2ece7b08f49c72e8a6e6156041f4c8b") (:revdesc . "3c13e3ffe2ec") (:keywords "languages"))])
+ (lsp-scheme . [(20250425 1731) ((emacs (26 1)) (f (0 20 0)) (lsp-mode (8 0 0))) "Scheme support for lsp-mode" tar ((:url . "https://codeberg.org/rgherdt/emacs-lsp-scheme") (:commit . "e50f92618ad34c6d6752cffe12b116f8f9705712") (:revdesc . "e50f92618ad3") (:keywords "languages" "lisp" "tools") (:authors ("Ricardo G. Herdt" . "r.herdt@posteo.de")) (:maintainers ("Ricardo G. Herdt" . "r.herdt@posteo.de")) (:maintainer "Ricardo G. Herdt" . "r.herdt@posteo.de"))])
+ (lsp-shader . [(20260503 1236) ((emacs (29 1)) (lsp-mode (6 1))) "LSP Clients for ShaderLab" tar ((:url . "https://github.com/shader-ls/lsp-shader") (:commit . "85430cd7d20019aa39e624990fd814650af9b3a2") (:revdesc . "85430cd7d200") (:keywords "convenience" "shader") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (lsp-sonarlint . [(20260507 1751) ((emacs (29 1)) (dash (2 12 0)) (lsp-mode (6 3)) (ht (2 3))) "Emacs SonarLint lsp client" tar ((:url . "https://github.com/emacs-lsp/lsp-sonarlint") (:commit . "91794c7663fc24afd8d93a74e775793de8f2f811") (:revdesc . "91794c7663fc") (:keywords "languages" "tools" "php" "javascript" "typescript" "go" "xml" "html" "java" "python") (:authors ("Fermin MF" . "fmfs@posteo.net")) (:maintainers ("Fermin MF" . "fmfs@posteo.net")) (:maintainer "Fermin MF" . "fmfs@posteo.net"))])
+ (lsp-sourcekit . [(20260507 1745) ((emacs (29 1)) (lsp-mode (5))) "Sourcekit-lsp client for lsp-mode" tar ((:url . "https://github.com/emacs-lsp/lsp-sourcekit") (:commit . "252decc7ae53170eb1c67f97ff3e7f576dd13734") (:revdesc . "252decc7ae53") (:keywords "languages" "lsp" "swift" "objective-c" "c++"))])
+ (lsp-treemacs . [(20260515 746) ((emacs (29 1)) (dash (2 18 0)) (f (0 20 0)) (ht (2 0)) (treemacs (2 5)) (lsp-mode (6 0))) "LSP treemacs" tar ((:url . "https://github.com/emacs-lsp/lsp-treemacs") (:commit . "3519ac907ea391e18d9599375b116aeeb6f8a38a") (:revdesc . "3519ac907ea3") (:keywords "languages"))])
+ (lsp-ui . [(20260512 1516) ((emacs (29 1)) (dash (2 18 0)) (lsp-mode (6 0)) (markdown-mode (2 3))) "UI modules for lsp-mode" tar ((:url . "https://github.com/emacs-lsp/lsp-ui") (:commit . "8d888a3ab1ba9e46bd4711398c57d39d0b709a45") (:revdesc . "8d888a3ab1ba") (:keywords "languages" "tools") (:authors ("Sebastien Chapuis" . "sebastien@chapu.is") ("Fangrui Song" . "i@maskray.me")) (:maintainers ("Sebastien Chapuis" . "sebastien@chapu.is") ("Fangrui Song" . "i@maskray.me")) (:maintainer "Sebastien Chapuis" . "sebastien@chapu.is"))])
+ (lte . [(20250112 2154) ((emacs (29 1)) (org (9 6)) (edit-indirect (0 1 13))) "Large Table Edition in Org and Markdown buffers" tar ((:url . "https://github.com/fredericgiquel/lte.el") (:commit . "011c86d9fb72d00105293efabef4756274d851b4") (:revdesc . "011c86d9fb72") (:authors ("Frédéric Giquel" . "frederic.giquel@laposte.net")) (:maintainers ("Frédéric Giquel" . "frederic.giquel@laposte.net")) (:maintainer "Frédéric Giquel" . "frederic.giquel@laposte.net"))])
+ (lua-mode . [(20250310 1150) ((emacs (24 3))) "A major-mode for editing Lua scripts" tar ((:url . "https://immerrr.github.io/lua-mode") (:commit . "2f6b8d7a6317e42c953c5119b0119ddb337e0a5f") (:revdesc . "2f6b8d7a6317") (:keywords "languages" "processes" "tools") (:authors ("2011-2013 immerrr" . "immerrr+lua@gmail.com") ("2010-2011 Reuben Thomas" . "rrt@sc3d.org") ("2006 Juergen Hoetzel" . "juergen@hoetzel.info") ("2001 Christian Vogler" . "cvogler@gradient.cis.upenn.edu") ("1997 Bret Mogilefsky starting from" . "mogul-lua@gelatinous.com") ("tcl-mode by Gregor Schmid" . "schmid@fb3-s7.math.tu-berlin.de") ("Paul Du Bois and" . "pld-lua@gelatinous.com") ("Aaron Smith" . "aaron-lua@gelatinous.com")) (:maintainers ("2011-2013 immerrr" . "immerrr+lua@gmail.com") ("2010-2011 Reuben Thomas" . "rrt@sc3d.org") ("2006 Juergen Hoetzel" . "juergen@hoetzel.info") ("2001 Christian Vogler" . "cvogler@gradient.cis.upenn.edu") ("1997 Bret Mogilefsky starting from" . "mogul-lua@gelatinous.com") ("tcl-mode by Gregor Schmid" . "schmid@fb3-s7.math.tu-berlin.de") ("Paul Du Bois and" . "pld-lua@gelatinous.com") ("Aaron Smith" . "aaron-lua@gelatinous.com")) (:maintainer "2011-2013 immerrr" . "immerrr+lua@gmail.com"))])
+ (luarocks . [(20170430 2305) ((emacs (24)) (cl-lib (0 5))) "Luarocks tools" tar ((:url . "https://github.com/emacs-pe/luarocks.el") (:commit . "cee27ba0716edf338077387969883226dd2b7484") (:revdesc . "cee27ba0716e") (:keywords "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (lumos-mode . [(20251211 650) ((emacs (26 1)) (lsp-mode (8 0))) "Major mode for LUMOS schema language" tar ((:url . "https://github.com/getlumos/lumos-mode") (:commit . "0caf9dccb2676f5d4a7080c3ff515ea65c926038") (:revdesc . "0caf9dccb267") (:keywords "languages" "solana" "blockchain"))])
+ (lurk-mode . [(20230120 2226) ((emacs (25 1))) "A major mode for editing lurk files" tar ((:url . "https://github.com/lurk-lang/lurk-emacs") (:commit . "59a3f956944a5ddd43cfd57deeff6b647fc46554") (:revdesc . "59a3f956944a") (:keywords "languages" "lurk" "lisp") (:authors ("Jeff Weiss" . "jweiss@protocol.ai")) (:maintainers ("Jeff Weiss" . "jweiss@protocol.ai")) (:maintainer "Jeff Weiss" . "jweiss@protocol.ai"))])
+ (lush-theme . [(20180816 2200) ((emacs (24))) "A dark theme with lush colors" tar ((:url . "https://github.com/andre-richter/emacs-lush-theme") (:commit . "7cfc993709d712f75c51b505078608c9e1c11466") (:revdesc . "7cfc993709d7") (:keywords "theme" "dark" "strong colors") (:authors ("Andre Richter" . "andre.o.richter@gmail.com")) (:maintainers ("Andre Richter" . "andre.o.richter@gmail.com")) (:maintainer "Andre Richter" . "andre.o.richter@gmail.com"))])
+ (lusty-explorer . [(20200602 228) ((emacs (25 1))) "Dynamic filesystem explorer and buffer switcher" tar ((:url . "https://github.com/sjbach/lusty-emacs") (:commit . "75233eff9c961b9e99db0e0c50b6720850b595ec") (:revdesc . "75233eff9c96") (:keywords "convenience" "files" "matching" "tools"))])
+ (lux-mode . [(20240108 1004) ((emacs (24 3))) "Major mode for editing lux files" tar ((:url . "https://github.com/hawk/lux") (:commit . "322f50143d164cd1375c9f5b432cd19095aedbad") (:revdesc . "322f50143d16"))])
+ (lv . [(20200507 1518) nil "Other echo area" tar ((:url . "https://github.com/abo-abo/hydra") (:commit . "87873d788891029d9e44fa5458321d6a05849b94") (:revdesc . "87873d788891"))])
+ (lxc . [(20140410 2022) nil "Lxc integration with Emacs" tar ((:url . "https://github.com/nicferrier/emacs-lxc") (:commit . "88bed56c954d1edd9ff5ce0ced2c02dcf9f71835") (:revdesc . "88bed56c954d") (:keywords "processes") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (lxc-tramp . [(20230119 1251) ((emacs (24)) (cl-lib (0 6))) "TRAMP integration for LXC containers" tar ((:url . "https://github.com/montag451/lxc-tramp") (:commit . "57559701334bb5635b82a252bd00298d06d794fe") (:revdesc . "57559701334b") (:keywords "lxc" "convenience"))])
+ (lxd-tramp . [(20181023 7) ((emacs (24 4)) (cl-lib (0 6))) "TRAMP integration for LXD containers" tar ((:url . "https://github.com/onixie/lxd-tramp.git") (:commit . "f335c76245f62b02cf67a9376eca6f3863c8a75a") (:revdesc . "f335c76245f6") (:keywords "lxd" "lxc" "convenience") (:authors ("Yc.S" . "onixie@gmail.com")) (:maintainers ("Yc.S" . "onixie@gmail.com")) (:maintainer "Yc.S" . "onixie@gmail.com"))])
+ (lyrics . [(20220206 116) ((emacs (25 1)) (seq (2 15))) "Show lyrics" tar ((:url . "https://github.com/emacs-pe/lyrics.el") (:commit . "c3d42f1e039941f32f49252e1b1610de337b4470") (:revdesc . "c3d42f1e0399") (:keywords "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (lyrics-fetcher . [(20241222 1620) ((emacs (27)) (emms (7 5)) (f (0 20 0)) (request (0 3 2))) "Fetch song lyrics and album covers" tar ((:url . "https://github.com/SqrtMinusOne/lyrics-fetcher.el") (:commit . "2686f97830d6ba03e86992e44405fad9ae58981f") (:revdesc . "2686f97830d6") (:authors ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainers ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainer "Korytov Pavel" . "thexcloud@gmail.com"))])
+ (m-buffer . [(20241215 2214) ((seq (2 14))) "List-Oriented, Functional Buffer Manipulation" tar ((:url . "https://github.com/phillord/m-buffer-el") (:commit . "5e7714835b2289f61dad24c0b5cf98d28fc313b0") (:revdesc . "5e7714835b22") (:authors ("Phillip Lord" . "phillip.lord@russet.org.uk")) (:maintainers ("Phillip Lord" . "phillip.lord@russet.rg.uk")) (:maintainer "Phillip Lord" . "phillip.lord@russet.rg.uk"))])
+ (mac-ime . [(20260605 1210) ((emacs (27 1))) "Seamless macOS IME integration without any IME patches" tar ((:url . "https://github.com/ma0001/mac-ime") (:commit . "0a8f40c6ad8d02f9b99e3eaa5a68e625b87e7f30") (:revdesc . "0a8f40c6ad8d") (:keywords "i18n" "convenience"))])
+ (mac-pseudo-daemon . [(20211208 138) ((cl-lib (0 1))) "Daemon mode that plays nice with Mac OS" tar ((:url . "https://github.com/DarwinAwardWinner/mac-pseudo-daemon") (:commit . "462031a53255185ae25eb10ae1f4272e49ad70f7") (:revdesc . "462031a53255") (:keywords "convenience" "osx" "mac"))])
+ (maccalfw . [(20251104 512) ((emacs (29 1)) (calfw (2 0)) (ical-form (0 2))) "Calendar view for Mac Calendars" tar ((:url . "https://github.com/haji-ali/maccalfw") (:commit . "0a72897c02537948aecc6a65b30c91466c8adaa8") (:revdesc . "0a72897c0253") (:keywords "calendar") (:authors ("Al Haji-Ali" . "abdo.haji.aliatgmail.com")) (:maintainers ("Al Haji-Ali" . "abdo.haji.aliatgmail.com")) (:maintainer "Al Haji-Ali" . "abdo.haji.aliatgmail.com"))])
+ (maces-game . [(20170903 1551) ((dash (2 12 0)) (cl-lib (0 5)) (emacs (24))) "Another anagram game" tar ((:url . "https://github.com/pawelbx/anagram-game") (:commit . "6a067422d305ac51612842930ed6686dc615ffec") (:revdesc . "6a067422d305") (:keywords "games" "word games" "anagram") (:authors ("Pawel Bokota" . "pawelb.lnx@gmail.com")) (:maintainers ("Pawel Bokota" . "pawelb.lnx@gmail.com")) (:maintainer "Pawel Bokota" . "pawelb.lnx@gmail.com"))])
+ (macher . [(20260726 1942) ((emacs (30 1)) (gptel (0 9 9 6))) "LLM implementation toolset" tar ((:url . "https://github.com/kmontag/macher") (:commit . "fe3622449d73d5404cd34d3e5cdc3419c624b81e") (:revdesc . "fe3622449d73") (:keywords "convenience" "gptel" "llm"))])
+ (macports . [(20260313 58) ((emacs (28 1)) (transient (0 1 0))) "A porcelain for MacPorts" tar ((:url . "https://github.com/amake/macports.el") (:commit . "6de6616e6aeb762dfd287f72c09efce15e8c26f4") (:revdesc . "6de6616e6aeb") (:keywords "convenience"))])
+ (macro-math . [(20130328 1604) nil "In-buffer mathematical operations" tar ((:url . "http://nschum.de/src/emacs/macro-math/") (:commit . "216e59371e9ee39c34117ba79b9acd78bb415750") (:revdesc . "216e59371e9e") (:keywords "convenience") (:authors ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainers ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainer "Nikolaj Schumacher" . "bugs*nschumde"))])
+ (macrostep . [(20250202 2205) ((cl-lib (0 5)) (compat (29))) "Interactive macro expander" tar ((:url . "https://github.com/emacsorphanage/macrostep") (:commit . "d0928626b4711dcf9f8f90439d23701118724199") (:revdesc . "d0928626b471") (:keywords "lisp" "languages" "macro" "debugging") (:authors ("Jon Oddie" . "j.j.oddie@gmail.com")) (:maintainers ("Jeremy Bryant" . "jb@jeremybryant.net")) (:maintainer "Jeremy Bryant" . "jb@jeremybryant.net"))])
+ (macrostep-geiser . [(20210717 801) ((emacs (24 4)) (macrostep (0 9)) (geiser (0 12))) "Macrostep for `geiser'" tar ((:url . "https://github.com/nbfalcon/macrostep-geiser") (:commit . "f6a2d5bb96ade4f23df557649af87ebd0cc45125") (:revdesc . "f6a2d5bb96ad") (:keywords "languages" "scheme"))])
+ (madhat2r-theme . [(20170203 30) ((emacs (24))) "Dark color theme that is easy on the eyes" tar ((:url . "https://github.com/madhat2r/madhat2r-theme") (:commit . "6b387f09de055cfcc15d74981cd4f32f8f9a7323") (:revdesc . "6b387f09de05") (:keywords "color" "theme"))])
+ (mag-menu . [(20150505 1850) ((splitter (0 1 0))) "Intuitive keyboard-centric menu system" tar ((:url . "https://github.com/chumpage/mag-menu") (:commit . "9b9277021cd09fb1dba64b1d2a00705d20914bd6") (:revdesc . "9b9277021cd0") (:keywords "convenience"))])
+ (magic-filetype . [(20240130 1805) ((emacs (24 3)) (s (1 9 0))) "Enhance filetype major mode" tar ((:url . "https://github.com/emacs-php/magic-filetype.el") (:commit . "3979ddbd8066d7390e31bde2b35f997c5f5f4516") (:revdesc . "3979ddbd8066") (:keywords "emulations" "vim" "ft" "file" "magic-mode") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (magic-latex-buffer . [(20210306 422) ((cl-lib (0 5)) (emacs (25 1))) "Magically enhance LaTeX-mode font-locking for semi-WYSIWYG editing" tar ((:url . "http://zk-phi.github.io/") (:commit . "903ec91872760e47c0e5715795f8465173615098") (:revdesc . "903ec9187276"))])
+ (magik-company . [(20260724 714) ((emacs (29 1)) (magik-mode (0 6 5)) (company (1 0 2)) (yasnippet (0 14 0))) "Magik backend for company-mode" tar ((:url . "https://github.com/reinierkof/magik-company") (:commit . "959c0030a4fffbad61013394492ba42ca46e3180") (:revdesc . "959c0030a4ff") (:keywords "convenience") (:authors ("Reinier Koffijberg" . "reinierkof@gmail.com")) (:maintainers ("Reinier Koffijberg" . "reinierkof@gmail.com")) (:maintainer "Reinier Koffijberg" . "reinierkof@gmail.com"))])
+ (magik-mode . [(20260826 1627) ((emacs (24 4)) (compat (28 1)) (yasnippet (0 14 0))) "Emacs major mode for Smallworld Magik files" tar ((:url . "https://github.com/roadrunner1776/magik") (:commit . "b972837d59874fe5fbfceeebbfc7031892fc9233") (:revdesc . "b972837d5987") (:keywords "languages"))])
+ (magit . [(20260822 1158) ((emacs (28 1)) (compat (31 0)) (cond-let (1 1)) (llama (1 0)) (magit-section (4 7)) (seq (2 24)) (transient (0 13)) (with-editor (3 5))) "A Git porcelain inside Emacs" tar ((:url . "https://github.com/magit/magit") (:commit . "137f137dccb37097ae9caa31018cafa071ff4ec1") (:revdesc . "137f137dccb3") (:keywords "git" "tools" "vc") (:authors ("Marius Vollmer" . "marius.vollmer@gmail.com") ("Jonas Bernoulli" . "emacs.magit@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.magit@jonas.bernoulli.dev") ("Kyle Meyer" . "kyle@kyleam.com")) (:maintainer "Jonas Bernoulli" . "emacs.magit@jonas.bernoulli.dev"))])
+ (magit-annex . [(20260315 126) ((emacs (26 1)) (magit (4 0 0))) "Control git-annex from Magit" tar ((:url . "https://github.com/magit/magit-annex") (:commit . "8ac55bdaab50cc1a5124d586ec79abadc3ca7b76") (:revdesc . "8ac55bdaab50") (:keywords "vc" "tools") (:authors ("Kyle Meyer" . "kyle@kyleam.com") ("Rémi Vanicat" . "vanicat@debian.org")) (:maintainers ("Kyle Meyer" . "kyle@kyleam.com") ("Rémi Vanicat" . "vanicat@debian.org")) (:maintainer "Kyle Meyer" . "kyle@kyleam.com"))])
+ (magit-browse-commit . [(20260412 1414) ((emacs (25 1)) (magit (3 0 0))) "Browse pull/merge requests from magit-blame" tar ((:url . "https://github.com/bbw9n/magit-browse-commit") (:commit . "d7b73e3819cf4c6a178aa54f2331d22f41f010df") (:revdesc . "d7b73e3819cf") (:keywords "vc" "tools" "git") (:authors ("bbw9n" . "bbw9nio@gmail.com")) (:maintainers ("bbw9n" . "bbw9nio@gmail.com")) (:maintainer "bbw9n" . "bbw9nio@gmail.com"))])
+ (magit-commit-mark . [(20260511 839) ((emacs (29 1)) (magit (3 3 0))) "Support marking commits as read" tar ((:url . "https://codeberg.org/ideasman42/emacs-magit-commit-mark") (:commit . "9712db3fd09fe493d2ac5644b40e9cd451877180") (:revdesc . "9712db3fd09f") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (magit-delta . [(20220125 50) ((emacs (25 1)) (magit (20200426)) (xterm-color (2 0))) "Use Delta when displaying diffs in Magit" tar ((:url . "https://github.com/dandavison/magit-delta") (:commit . "5fc7dbddcfacfe46d3fd876172ad02a9ab6ac616") (:revdesc . "5fc7dbddcfac") (:authors ("Dan Davison" . "dandavison7@gmail.com")) (:maintainers ("Dan Davison" . "dandavison7@gmail.com")) (:maintainer "Dan Davison" . "dandavison7@gmail.com"))])
+ (magit-diff-flycheck . [(20190524 551) ((magit (2)) (flycheck (31)) (seq (2)) (emacs (25 1))) "Report errors in diffs" tar ((:url . "https://github.com/ragone/magit-diff-flycheck") (:commit . "ad58efa312d708f25661dfcc2a7f83a833cca328") (:revdesc . "ad58efa312d7") (:keywords "convenience" "matching") (:authors ("Alex Ragone" . "ragonedk@gmail.com")) (:maintainers ("Alex Ragone" . "ragonedk@gmail.com")) (:maintainer "Alex Ragone" . "ragonedk@gmail.com"))])
+ (magit-filenotify . [(20151116 2340) ((magit (1 3 0)) (emacs (24 4))) "Refresh status buffer when git tree changes" tar ((:url . "https://github.com/ruediger/magit-filenotify") (:commit . "c0865b3c41af20b6cd89de23d3b0beb54c8401a4") (:revdesc . "c0865b3c41af") (:keywords "tools") (:authors ("Rüdiger Sonderfeld" . "ruediger@c-plusplus.de")) (:maintainers ("Rüdiger Sonderfeld" . "ruediger@c-plusplus.de")) (:maintainer "Rüdiger Sonderfeld" . "ruediger@c-plusplus.de"))])
+ (magit-find-file . [(20150702 830) ((magit (2 1 0)) (dash (2 8 0))) "Completing-read over all files in Git" tar ((:url . "https://github.com/bradleywright/magit-find-file.el") (:commit . "035da838b1a19e7a5ee135b4ca8475f4e235b61e") (:revdesc . "035da838b1a1") (:keywords "git") (:authors ("Bradley Wright" . "brad@intranation.com")) (:maintainers ("Bradley Wright" . "brad@intranation.com")) (:maintainer "Bradley Wright" . "brad@intranation.com"))])
+ (magit-gerrit . [(20250825 811) ((emacs (25 1)) (magit (2 90 1)) (transient (0 3 0))) "Magit plugin for Gerrit Code Review" tar ((:url . "https://github.com/emacsorphanage/magit-gerrit") (:commit . "d95d6d3febf7f9c04a4abefa3640610aae626683") (:revdesc . "d95d6d3febf7") (:authors ("Brian Fransioli" . "assem@terranpro.org")) (:maintainers ("Brian Fransioli" . "assem@terranpro.org")) (:maintainer "Brian Fransioli" . "assem@terranpro.org"))])
+ (magit-gh . [(20260818 436) ((emacs (29 1)) (magit (4 0 0)) (transient (0 5 0))) "GitHub CLI integration for Magit" tar ((:url . "https://github.com/jonathanchu/magit-gh") (:commit . "17edb32ace7d4374559e337c927c6e34550c52ba") (:revdesc . "17edb32ace7d") (:keywords "git" "tools" "vc" "github") (:authors ("Jonathan Chu" . "me@jonathanchu.is")) (:maintainers ("Jonathan Chu" . "me@jonathanchu.is")) (:maintainer "Jonathan Chu" . "me@jonathanchu.is"))])
+ (magit-gh-pulls . [(20191230 1944) ((emacs (24 4)) (gh (0 9 1)) (magit (2 12 0)) (pcache (0 2 3)) (s (1 6 1))) "GitHub pull requests extension for Magit" tar ((:url . "https://github.com/sigma/magit-gh-pulls") (:commit . "57f3a5158bbc7bfd169ee136fde351cce999e0ca") (:revdesc . "57f3a5158bbc") (:keywords "git" "tools") (:authors ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainers ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainer "Yann Hodique" . "yann.hodique@gmail.com"))])
+ (magit-git-toolbelt . [(20260202 325) ((emacs (26 1)) (magit (3 0 0)) (transient (0 3 0))) "A Magit interface for git-toolbelt" tar ((:url . "https://github.com/jonathanchu/magit-git-toolbelt") (:commit . "acf0942bb95ec5c913c35415377d168e38e77e16") (:revdesc . "acf0942bb95e") (:keywords "git" "tools" "vc") (:authors ("Jonathan Chu" . "me@jonathanchu.is")) (:maintainers ("Jonathan Chu" . "me@jonathanchu.is")) (:maintainer "Jonathan Chu" . "me@jonathanchu.is"))])
+ (magit-gitflow . [(20170929 824) ((magit (2 1 0)) (magit-popup (2 2 0))) "Gitflow extension for magit" tar ((:url . "https://github.com/jtatarik/magit-gitflow") (:commit . "cc41b561ec6eea947fe9a176349fb4f771ed865b") (:revdesc . "cc41b561ec6e") (:keywords "vc" "tools") (:authors ("Jan Tatarik" . "Jan.Tatarik@gmail.com")) (:maintainers ("Jan Tatarik" . "Jan.Tatarik@gmail.com")) (:maintainer "Jan Tatarik" . "Jan.Tatarik@gmail.com"))])
+ (magit-gitlab . [(20240707 1506) ((emacs (26 1)) (magit (3 3 0)) (ghub (3 6 0)) (transient (0 6 0))) "Magit plugin for manipulating GitLab merge requests" tar ((:url . "https://gitlab.com/arvidnl/magit-gitlab") (:commit . "6f10468f9091d02aa6f1ce4af914443209a7d2a5") (:revdesc . "6f10468f9091") (:authors ("Arvid Jakobsson" . "arvid.jakobsson@gmail.com")) (:maintainers ("Arvid Jakobsson" . "arvid.jakobsson@gmail.com")) (:maintainer "Arvid Jakobsson" . "arvid.jakobsson@gmail.com"))])
+ (magit-gptcommit . [(20260530 2339) ((emacs (29 1)) (dash (2 13 0)) (magit (2 90 1)) (llm (0 16 1))) "Git commit with help of gpt" tar ((:url . "https://github.com/douo/magit-gptcommit") (:commit . "b3ac0bfad8b06b6930dc4e35e3adefb4b6646193") (:revdesc . "b3ac0bfad8b0") (:authors ("Tiou Lims" . "dourokinga@gmail.com")) (:maintainers ("Tiou Lims" . "dourokinga@gmail.com")) (:maintainer "Tiou Lims" . "dourokinga@gmail.com"))])
+ (magit-ido . [(20250330 1737) ((ido-completing-read+ (4 14)) (magit (4 3 2))) "Support using Ido in Magit" tar ((:url . "https://github.com/emacsorphanage/magit-ido") (:commit . "2b94abf65a208e4c844d046217350efbf77cf582") (:revdesc . "2b94abf65a20") (:authors ("Jonas Bernoulli" . "emacs.magit-ido@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.magit-ido@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.magit-ido@jonas.bernoulli.dev"))])
+ (magit-imerge . [(20260315 29) ((emacs (26 1)) (magit (4 0 0))) "Magit extension for git-imerge" tar ((:url . "https://github.com/magit/magit-imerge") (:commit . "c7853332260298688f8f13cf8e5fdee932d7acae") (:revdesc . "c78533322602") (:keywords "vc" "tools") (:authors ("Kyle Meyer" . "kyle@kyleam.com")) (:maintainers ("Kyle Meyer" . "kyle@kyleam.com")) (:maintainer "Kyle Meyer" . "kyle@kyleam.com"))])
+ (magit-lfs . [(20260807 659) ((emacs (24 4)) (magit (2 10 3)) (dash (2 13 0))) "Magit plugin for Git LFS" tar ((:url . "https://github.com/ailrun/magit-lfs") (:commit . "266d9fecd661f09bedd1a7433a49727b4bdb0337") (:revdesc . "266d9fecd661") (:keywords "magit" "git" "lfs" "tools" "vc") (:authors ("Junyoung/Clare Jang" . "jjc9310@gmail.com")) (:maintainers ("Junyoung/Clare Jang" . "jjc9310@gmail.com")) (:maintainer "Junyoung/Clare Jang" . "jjc9310@gmail.com"))])
+ (magit-org-todos . [(20180709 1950) ((magit (2 0 0)) (emacs (24))) "Add local todo items to the magit status buffer" tar ((:url . "https://github.com/danielma/magit-org-todos") (:commit . "9ffa3efb098434d837cab4bacd1601fdfc6fe999") (:revdesc . "9ffa3efb0984") (:keywords "org-mode" "magit" "tools"))])
+ (magit-p4 . [(20250902 311) ((emacs (27 1)) (magit (4 0 0)) (transient (0 8 0)) (p4 (12 0)) (cl-lib (1 0)) (with-editor (3 4 1))) "Git-p4 plug-in for Magit" tar ((:url . "https://github.com/qoocku/magit-p4") (:commit . "19c54db7423ef87a3688b0ac1e882c2341efee84") (:revdesc . "19c54db7423e") (:keywords "vc" "tools") (:authors ("Damian T. Dobroczyński" . "qoocku@gmail.com") ("Aleksey Fedotov" . "lexa@cfotr.com")) (:maintainers ("Maciej Katafiasz" . "mathrick@gmail.com")) (:maintainer "Maciej Katafiasz" . "mathrick@gmail.com"))])
+ (magit-patch-changelog . [(20221209 123) ((emacs (28 1)) (magit (3 3 0))) "Generate a patch according to emacs-mirror/CONTRIBUTE" tar ((:url . "https://github.com/dickmao/magit-patch-changelog") (:commit . "fd259cf6ce270a21df2f00b1e031193c8595a7a9") (:revdesc . "fd259cf6ce27") (:keywords "git" "tools" "vc") (:authors ("dickmao" . "githubid:dickmao")) (:maintainers ("dickmao" . "githubid:dickmao")) (:maintainer "dickmao" . "githubid:dickmao"))])
+ (magit-popup . [(20200719 1015) ((emacs (24 4)) (dash (2 13 0))) "Define prefix-infix-suffix command combos" tar ((:url . "https://github.com/magit/magit-popup") (:commit . "d8585fa39f88956963d877b921322530257ba9f5") (:revdesc . "d8585fa39f88") (:keywords "bindings") (:authors ("Jonas Bernoulli" . "jonas@bernoul.li")) (:maintainers ("Jonas Bernoulli" . "jonas@bernoul.li")) (:maintainer "Jonas Bernoulli" . "jonas@bernoul.li"))])
+ (magit-pre-commit . [(20260215 1854) ((emacs (29 1)) (magit (3 0 0)) (yaml (0 5 0))) "Magit integration for pre-commit" tar ((:url . "https://github.com/DamianB-BitFlipper/magit-pre-commit.el") (:commit . "406d14e364b11a3a7f5240b2bcb904a3c9c10cc9") (:revdesc . "406d14e364b1") (:keywords "git" "tools" "vc"))])
+ (magit-prime . [(20250803 1914) ((emacs (27 1)) (magit (3 0 0))) "Prime cache before Magit refresh" tar ((:url . "https://github.com/Azkae/magit-prime") (:commit . "ebd58f95a564d69baa21a456471a2584673df78d") (:revdesc . "ebd58f95a564") (:authors ("Romain Ouabdelkader" . "romain.ouabdelkader@gmail.com")) (:maintainers ("Romain Ouabdelkader" . "romain.ouabdelkader@gmail.com")) (:maintainer "Romain Ouabdelkader" . "romain.ouabdelkader@gmail.com"))])
+ (magit-rbr . [(20181009 2016) ((magit (2 13 0)) (emacs (24 3))) "Support for git rbr in Magit" tar ((:url . "https://github.com/fanatoly/magit-rbr") (:commit . "029203b3e48537205052a058e964f058cd802c3c") (:revdesc . "029203b3e485") (:keywords "git" "magit" "rbr" "tools") (:authors ("Anatoly Fayngelerin" . "fanatoly+magitrbr@gmail.com")) (:maintainers ("Anatoly Fayngelerin" . "fanatoly+magitrbr@gmail.com")) (:maintainer "Anatoly Fayngelerin" . "fanatoly+magitrbr@gmail.com"))])
+ (magit-reviewboard . [(20200727 1748) ((emacs (25 2)) (magit (2 13 0)) (s (1 12 0)) (request (0 3 0))) "Show open Reviewboard reviews in Magit" tar ((:url . "https://github.com/jtamagnan/magit-reviewboard") (:commit . "aceedff88921f1dfef8a6b2fb18fe316fb7223a8") (:revdesc . "aceedff88921") (:keywords "magit" "vc") (:authors ("Jules Tamagnan" . "jtamagnan@gmail.com")) (:maintainers ("Jules Tamagnan" . "jtamagnan@gmail.com")) (:maintainer "Jules Tamagnan" . "jtamagnan@gmail.com"))])
+ (magit-section . [(20260731 2248) ((emacs (28 1)) (compat (31 0)) (cond-let (1 1)) (llama (1 0)) (seq (2 24))) "Sections for read-only buffers" tar ((:url . "https://github.com/magit/magit") (:commit . "67f203853e74e926e2c99f60ed508840714f7ced") (:revdesc . "67f203853e74") (:keywords "tools") (:authors ("Jonas Bernoulli" . "emacs.magit@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.magit@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.magit@jonas.bernoulli.dev"))])
+ (magit-stats . [(20230223 1819) ((emacs (25 1))) "Generates GIT Repo Statistics Report" tar ((:url . "https://github.com/LionyxML/magit-stats") (:commit . "41b18e5fc664dba93981a7931f476632c5b54a7d") (:revdesc . "41b18e5fc664") (:keywords "vc" "convenience"))])
+ (magit-stgit . [(20250215 2223) ((emacs (27 1)) (llama (0 6 0)) (magit (4 3 0)) (transient (0 8 4))) "StGit extension for Magit" tar ((:url . "https://github.com/stacked-git/magit-stgit") (:commit . "b19d96f8f62bd4def83eb1c09e9cd2582856351e") (:revdesc . "b19d96f8f62b") (:keywords "git" "tools" "vc") (:authors ("Lluís Vilanova" . "vilanova@ac.upc.edu")) (:maintainers ("Peter Grayson" . "pete@jpgrayson.net")) (:maintainer "Peter Grayson" . "pete@jpgrayson.net"))])
+ (magit-svn . [(20250210 1141) ((emacs (27 1)) (dash (2 19 1)) (magit (4 3 0)) (transient (0 8 4))) "Git-Svn extension for Magit" tar ((:url . "https://github.com/emacsorphanage/magit-svn") (:commit . "ca637c648835eddbeb277cc8089d3ffd6f75ae13") (:revdesc . "ca637c648835") (:keywords "vc" "tools") (:authors ("Phil Jackson" . "phil@shellarchive.co.uk")) (:maintainers ("Phil Jackson" . "phil@shellarchive.co.uk")) (:maintainer "Phil Jackson" . "phil@shellarchive.co.uk"))])
+ (magit-tbdiff . [(20260811 44) ((emacs (26 1)) (magit (4 0 0))) "Magit extension for range diffs" tar ((:url . "https://github.com/magit/magit-tbdiff") (:commit . "62e2c726a26eb7b8c39048e091062d206610649d") (:revdesc . "62e2c726a26e") (:keywords "vc" "tools") (:authors ("Kyle Meyer" . "kyle@kyleam.com")) (:maintainers ("Kyle Meyer" . "kyle@kyleam.com")) (:maintainer "Kyle Meyer" . "kyle@kyleam.com"))])
+ (magit-todos . [(20250928 1611) ((emacs (26 1)) (async (1 9 2)) (dash (2 13 0)) (f (0 17 2)) (hl-todo (1 9 0)) (magit (2 13 0)) (pcre2el (1 8)) (s (1 12 0)) (transient (0 2 0))) "Show source file TODOs in Magit" tar ((:url . "https://github.com/alphapapa/magit-todos") (:commit . "7294a95580bddf7232f2d205efae312dc24c5f61") (:revdesc . "7294a95580bd") (:keywords "magit" "vc") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (magit-topgit . [(20161105 1623) ((emacs (24 4)) (magit (2 1 0))) "TopGit extension for Magit" tar ((:url . "https://github.com/greenrd/magit-topgit") (:commit . "11489ea798bc88d0ea5244bbf725285eedfefbef") (:revdesc . "11489ea798bc") (:keywords "vc" "tools") (:authors ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainers ("Robin Green" . "greenrd@greenrd.org")) (:maintainer "Robin Green" . "greenrd@greenrd.org"))])
+ (magit-vcsh . [(20230402 1219) ((magit (2 90 1)) (vcsh (0 4)) (emacs (24 4))) "Magit vcsh integration" tar ((:url . "http://git.smrk.net/magit-vcsh.el") (:commit . "fd6c86c066b14bbf78644d38eca9711d6d9544a1") (:revdesc . "fd6c86c066b1") (:keywords "vc" "files" "magit") (:authors ("těpán Němec" . "stepnem@smrk.net")) (:maintainers ("těpán Němec" . "stepnem@smrk.net")) (:maintainer "těpán Němec" . "stepnem@smrk.net"))])
+ (magma-mode . [(20211018 917) ((emacs (24 3)) (cl-lib (0 3)) (dash (2 6 0)) (f (0 17 1))) "Mode for editing Magma source code" tar ((:url . "https://github.com/ThibautVerron/magma-mode") (:commit . "11428d18ce3742334923d14ff2a8f493e7bd5ef0") (:revdesc . "11428d18ce37"))])
+ (magnatune . [(20151030 1935) ((dash (2 9 0)) (s (1 9 0))) "Browse magnatune's music catalog" tar ((:url . "https://github.com/eikek/magnatune.el") (:commit . "605b01505ba30589c77ebb4c96834b5072ccbdd4") (:revdesc . "605b01505ba3"))])
+ (magnus . [(20260816 2202) ((emacs (28 1)) (vterm (0 0 2)) (transient (0 4 0)) (magit-section (3 3 0))) "Manage multiple AI coding agents" tar ((:url . "https://github.com/hrishikeshs/magnus") (:commit . "8470a035426ecb10b6960ade8a7cbb39c99be148") (:revdesc . "8470a035426e") (:keywords "tools" "processes" "convenience") (:authors ("Hrishikesh S" . "hrish2006@gmail.com")) (:maintainers ("Hrishikesh S" . "hrish2006@gmail.com")) (:maintainer "Hrishikesh S" . "hrish2006@gmail.com"))])
+ (magrant . [(20210706 1438) ((emacs (25 1)) (dash (2 17 0)) (s (1 12 0)) (tablist (0 70)) (transient (0 2 0)) (friendly-shell-command (0 2 3))) "Transient Interface to Vagrant" tar ((:url . "https://github.com/p3r7/magrant") (:commit . "6309c001355126e3ade79493479b517925943d17") (:revdesc . "6309c0013551") (:keywords "processes" "terminals"))])
+ (major-mode-hydra . [(20231003 2050) ((dash (2 18 0)) (pretty-hydra (0 2 2)) (emacs (25))) "Major mode keybindings managed by Hydra" tar ((:url . "https://github.com/jerrypnz/major-mode-hydra.el") (:commit . "d0a5dadee97c3752fcdef113cf2ba1923972a480") (:revdesc . "d0a5dadee97c") (:authors ("Jerry Peng" . "pr2jerry@gmail.com")) (:maintainers ("Jerry Peng" . "pr2jerry@gmail.com")) (:maintainer "Jerry Peng" . "pr2jerry@gmail.com"))])
+ (major-mode-icons . [(20220210 1404) ((emacs (24 3)) (powerline (2 4)) (all-the-icons (2 3 0))) "Display icon for major-mode on mode-line" tar ((:url . "https://repo.or.cz/major-mode-icons.git") (:commit . "b0214e0af13cd3691c4d28f03e3108bd98ec7a85") (:revdesc . "b0214e0af13c") (:keywords "frames" "multimedia") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (make-color . [(20251106 1219) nil "Alternative to picking color - update fg/bg color by pressing r/g/b/... keys" tar ((:url . "https://github.com/alezost/make-color.el") (:commit . "aac38ff562f8ba46917f8281ad79973caf379f49") (:revdesc . "aac38ff562f8") (:keywords "color") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (make-it-so . [(20190625 1036) ((swiper (0 8 0)) (emacs (24))) "Transform files with Makefile recipes" tar ((:url . "https://github.com/abo-abo/make-it-so") (:commit . "b73dfb640588123c9eece230ad72b37604f5c126") (:revdesc . "b73dfb640588") (:keywords "make" "dired") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (makefile-executor . [(20260722 1556) ((emacs (27 1)) (dash (2 11 0)) (f (0 11 0)) (s (1 10 0))) "Commands for conveniently running makefile targets" tar ((:url . "https://github.com/Olivia5k/makefile-executor.el") (:commit . "6514a34f21ffba5746cb0c7b3148bc656fd7c811") (:revdesc . "6514a34f21ff") (:keywords "processes") (:authors ("Olivia Thiderman" . "olivia@thiderman.org")) (:maintainers ("Olivia Thiderman" . "olivia@thiderman.org")) (:maintainer "Olivia Thiderman" . "olivia@thiderman.org"))])
+ (makey . [(20131231 1430) ((cl-lib (0 2))) "Interactive commandline mode" tar ((:url . "https://github.com/mickeynp/makey") (:commit . "a61781e69d3b451551e269446e1c5f624ab81137") (:revdesc . "a61781e69d3b") (:authors ("Mickey Petersen" . "mickey@masteringemacs.org")) (:maintainers ("Mickey Petersen" . "mickey@masteringemacs.org")) (:maintainer "Mickey Petersen" . "mickey@masteringemacs.org"))])
+ (malinka . [(20171202 1021) ((s (1 9 0)) (dash (2 4 0)) (f (0 11 0)) (cl-lib (0 3)) (rtags (0 0)) (projectile (0 11 0))) "A C/C++ project configuration package for Emacs" tar ((:url . "https://github.com/LefterisJP/malinka") (:commit . "e3dc5b0703a5954057110b82cb397a990ace23e6") (:revdesc . "e3dc5b0703a5") (:keywords "c" "c++" "project-management") (:authors ("Lefteris Karapetsas" . "lefteris@refu.co")) (:maintainers ("Lefteris Karapetsas" . "lefteris@refu.co")) (:maintainer "Lefteris Karapetsas" . "lefteris@refu.co"))])
+ (mallard-mode . [(20131204 425) nil "Major mode for editing Mallard files" tar ((:url . "https://github.com/jhradilek/emacs-mallard-mode") (:commit . "0a4cfede57bc31134495804ce513cc106de8de3c") (:revdesc . "0a4cfede57bc") (:keywords "xml" "mallard") (:authors ("Jaromir Hradilek" . "jhradilek@gmail.com")) (:maintainers ("Jaromir Hradilek" . "jhradilek@gmail.com")) (:maintainer "Jaromir Hradilek" . "jhradilek@gmail.com"))])
+ (mallard-snippets . [(20131023 1851) ((yasnippet (0 8 0)) (mallard-mode (0 1 1))) "Yasnippets for Mallard" tar ((:url . "https://github.com/jhradilek/emacs-mallard-snippets") (:commit . "35b7d0558da14fcffd51863f623806216a0093ce") (:revdesc . "35b7d0558da1") (:keywords "snippets" "mallard") (:authors ("Jaromir Hradilek" . "jhradilek@gmail.com")) (:maintainers ("Jaromir Hradilek" . "jhradilek@gmail.com")) (:maintainer "Jaromir Hradilek" . "jhradilek@gmail.com"))])
+ (malyon . [(20161208 2125) ((cl-lib (0 5))) "Mode to execute Z-code files version 3, 5, 8" tar ((:url . "https://github.com/speedenator/malyon") (:commit . "0d9882650720b4a791556f5e2d917388965d6fc0") (:revdesc . "0d9882650720") (:keywords "games" "emulations") (:authors ("Peter Ilberg" . "peter.ilberg@gmail.com") ("Christopher Madsen" . "cjm@cjmweb.net") ("Erik Selberg" . "erik@selberg.org")) (:maintainers ("Christopher Madsen" . "cjm@cjmweb.net") ("Erik Selberg" . "erik@selberg.org")) (:maintainer "Christopher Madsen" . "cjm@cjmweb.net"))])
+ (mame . [(20240828 1559) ((emacs (27 1))) "A MAME front-end" tar ((:url . "https://github.com/Iacob/elmame") (:commit . "7c727999e03932fc65cabdbe2161efbe06ff1274") (:revdesc . "7c727999e039") (:authors ("Yong" . "luo.yong.name@gmail.com")) (:maintainers ("Yong" . "luo.yong.name@gmail.com")) (:maintainer "Yong" . "luo.yong.name@gmail.com"))])
+ (man-commands . [(20151221 2221) ((cl-lib (0 5))) "Add interactive commands for every manpages installed in your computer" tar ((:url . "https://github.com/nflath/man-commands") (:commit . "f4ba0c3790855d7544dff92d470d212f24de1d9d") (:revdesc . "f4ba0c379085") (:authors ("Nathaniel Flath" . "nflath@gmail.com")) (:maintainers ("Nathaniel Flath" . "nflath@gmail.com")) (:maintainer "Nathaniel Flath" . "nflath@gmail.com"))])
+ (manage-minor-mode . [(20260103 1800) ((emacs (24 3))) "Manage your minor-modes easily" tar ((:url . "https://github.com/ShingoFukuyama/manage-minor-mode") (:commit . "78ca421b501aa1f6b72a4ecdb9a1fe102055beed") (:revdesc . "78ca421b501a") (:keywords "tools" "minor-mode" "manage" "emacs") (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (manage-minor-mode-table . [(20260101 601) ((emacs (25 1)) (manage-minor-mode (1 1))) "Manage minor-modes in table" tar ((:url . "https://github.com/jcs-elpa/manage-minor-mode-table") (:commit . "15730e65792ba5e774562c2311c1674cedd7786e") (:revdesc . "15730e65792b") (:keywords "tools" "minor-mode" "manage") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (mandm-theme . [(20260513 247) ((emacs (24 1))) "An M&M color theme" tar ((:url . "https://github.com/choppsv1/emacs-mandm-theme.git") (:commit . "c9ebcbe0518798cab3667762637062f0255bbad2") (:revdesc . "c9ebcbe05187") (:authors ("Christian Hopps" . "chopps@gmail.com")) (:maintainers ("Christian Hopps" . "chopps@gmail.com")) (:maintainer "Christian Hopps" . "chopps@gmail.com"))])
+ (mandoku . [(20180403 1106) ((org (8)) (github-clone (20150705 1705))) "A tool to access repositories of premodern Chinese texts" tar ((:url . "http://www.mandoku.org") (:commit . "e3b7678762e9824861b1ce775a94b05b096164f5") (:revdesc . "e3b7678762e9") (:keywords "convenience") (:authors ("Christian Wittern" . "cwittern@gmail.com")) (:maintainers ("Christian Wittern" . "cwittern@gmail.com")) (:maintainer "Christian Wittern" . "cwittern@gmail.com"))])
+ (mandoku-tls . [(20171118 240) ((emacs (24 4)) (mandoku (20170301)) (github-clone (0 2)) (hydra (0 13 6)) (helm (1 7 0)) (org (9 0)) (helm-charinfo (20170601))) "A tool to access the TLS database" tar ((:url . "https://github.com/mandoku/mandoku-tls") (:commit . "ffeebf5bd451ac1806ddfe1744fbbd036a56f902") (:revdesc . "ffeebf5bd451") (:keywords "convenience") (:authors ("Christian Wittern" . "cwittern@gmail.com")) (:maintainers ("Christian Wittern" . "cwittern@gmail.com")) (:maintainer "Christian Wittern" . "cwittern@gmail.com"))])
+ (mantra . [(20260118 752) ((emacs (27 1)) (pubsub (0 1))) "A system for scripting and parsing activity beyond macros" tar ((:url . "https://github.com/countvajhula/mantra") (:commit . "49f885b8947662bc837297f5c8a225d65dafcacd") (:revdesc . "49f885b89476") (:authors ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainers ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainer "Sid Kasivajhula" . "sid@countvajhula.com"))])
+ (marcopolo . [(20160421 1004) ((s (1 9 0)) (dash (2 9 0)) (pkg-info (0 5 0)) (request (0 1 0))) "Emacs client to the Docker HUB/Registry API" tar ((:url . "https://github.com/nlamirault/marcopolo") (:commit . "85db828f2bb4346a811b3326349b1c6d0aae4601") (:revdesc . "85db828f2bb4") (:keywords "docker") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (marginalia . [(20260821 1231) ((emacs (29 1)) (compat (31))) "Enrich existing commands with completion annotations" tar ((:url . "https://github.com/minad/marginalia") (:commit . "7ec0b70afb43a756ecd45a958c6ebe797717fc91") (:revdesc . "7ec0b70afb43") (:keywords "docs" "help" "matching" "completion") (:authors ("Omar Antolín Camarena" . "omar@matem.unam.mx") ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Omar Antolín Camarena" . "omar@matem.unam.mx") ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Omar Antolín Camarena" . "omar@matem.unam.mx"))])
+ (mark-graf . [(20260222 753) ((emacs (30 1))) "Modern WYSIWYG-style markdown editing" tar ((:url . "https://github.com/hyperZphere/mark-graf") (:commit . "0e1c502bd577f5b800c8bc04b15ac510d4c4b4a9") (:revdesc . "0e1c502bd577") (:keywords "markdown" "wp" "text") (:authors ("Marc Ansset" . "info@ansset.com")) (:maintainers ("Marc Ansset" . "info@ansset.com")) (:maintainer "Marc Ansset" . "info@ansset.com"))])
+ (mark-multiple . [(20121118 1554) nil "Sorta lets you mark several regions at once" tar ((:url . "https://github.com/magnars/mark-multiple.el") (:commit . "f6a53c7c5283d640ae718f4548b0fda78877a375") (:revdesc . "f6a53c7c5283") (:keywords "marking" "library") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (mark-thing-at . [(20260711 1130) ((emacs (26)) (choice-program (0 14))) "Mark a pattern at the current point" tar ((:url . "https://github.com/plandes/mark-thing-at") (:commit . "7829d89ba7da560adb4236fd26fc6ed5813b7173") (:revdesc . "7829d89ba7da") (:keywords "mark" "point" "lisp"))])
+ (mark-tools . [(20130614 1025) nil "Some simple tools to access the mark-ring in Emacs" tar ((:url . "https://github.com/stsquad/emacs-mark-tools") (:commit . "a11b61effa90bd0abc876d12573674d36fc17f0c") (:revdesc . "a11b61effa90") (:authors ("Alex Bennée" . "alex@bennee.com")) (:maintainers ("Alex Bennée" . "alex@bennee.com")) (:maintainer "Alex Bennée" . "alex@bennee.com"))])
+ (mark-yank . [(20231105 2027) ((emacs (24 4))) "Set region to the last yank" tar ((:url . "https://github.com/mkleehammer/mark-yank") (:commit . "7207aabe9edd0872ec6d506a58b942b43926c122") (:revdesc . "7207aabe9edd") (:authors ("Michael Kleehammer" . "michael@kleehammer.com")) (:maintainers ("Michael Kleehammer" . "michael@kleehammer.com")) (:maintainer "Michael Kleehammer" . "michael@kleehammer.com"))])
+ (markdown-changelog . [(20230805 1720) ((emacs (26)) (dash (2 13 0))) "Maintain changelog entries" tar ((:url . "https://github.com/plandes/markdown-changelog") (:commit . "403d2cd1cff932ae135692d57062824892e01d13") (:revdesc . "403d2cd1cff9") (:keywords "markdown" "changelog" "files"))])
+ (markdown-indent-mode . [(20260419 8) ((emacs (28 1))) "Dynamic indentation for Markdown" tar ((:url . "https://github.com/whhone/markdown-indent-mode") (:commit . "e8d36904be83de7ceb7fdd1c1ddaa59093129b36") (:revdesc . "e8d36904be83") (:authors ("Wai Hon Law" . "whhone@gmail.com")) (:maintainers ("Wai Hon Law" . "whhone@gmail.com")) (:maintainer "Wai Hon Law" . "whhone@gmail.com"))])
+ (markdown-mermaid . [(20251215 8) ((emacs (26 1)) (markdown-mode (2 3))) "Preview Mermaid code blocks in Markdown" tar ((:url . "https://github.com/pasunboneleve/markdown-mermaid") (:commit . "b78f912115e5c218235f3d89a592749c01452be0") (:revdesc . "b78f912115e5") (:keywords "markdown" "tools" "mermaid" "diagrams") (:maintainers ("Daniel Vianna" . "dmlvianna@gmail.com")) (:maintainer "Daniel Vianna" . "dmlvianna@gmail.com"))])
+ (markdown-mode . [(20260821 11) ((emacs (28 1))) "Major mode for Markdown-formatted text" tar ((:url . "https://jblevins.org/projects/markdown-mode/") (:commit . "6995b8d095eceace0b947c1217646781ab021c10") (:revdesc . "6995b8d095ec") (:keywords "markdown" "github flavored markdown" "itex") (:authors ("Jason R. Blevins" . "jblevins@xbeta.org")) (:maintainers ("Jason R. Blevins" . "jblevins@xbeta.org")) (:maintainer "Jason R. Blevins" . "jblevins@xbeta.org"))])
+ (markdown-preview-eww . [(20160111 1502) ((emacs (24 4))) "Realtime preview by eww" tar ((:url . "https://github.com/niku/markdown-preview-eww") (:commit . "5853f836425c877c8a956501f0adda137ef1d3b7") (:revdesc . "5853f836425c") (:authors ("niku" . "niku@niku.name")) (:maintainers ("niku" . "niku@niku.name")) (:maintainer "niku" . "niku@niku.name"))])
+ (markdown-preview-mode . [(20230707 803) ((emacs (24 4)) (websocket (1 6)) (markdown-mode (2 0)) (cl-lib (0 5)) (web-server (0 1 1))) "Markdown realtime preview minor mode" tar ((:url . "https://github.com/ancane/markdown-preview-mode") (:commit . "68242b3907dc065aa35412bfd928b43d8052d321") (:revdesc . "68242b3907dc") (:keywords "markdown" "gfm" "convenience") (:authors ("Igor Shymko" . "igor.shimko@gmail.com")) (:maintainers ("Igor Shymko" . "igor.shimko@gmail.com")) (:maintainer "Igor Shymko" . "igor.shimko@gmail.com"))])
+ (markdown-soma . [(20240215 228) ((emacs (25)) (s (1 11 0)) (dash (2 19 1)) (f (0 20 0))) "Live preview for Markdown" tar ((:url . "https://github.com/jasonm23/markdown-soma") (:commit . "ba30e609108d32fe6e1998490548b4631e3e48c3") (:revdesc . "ba30e609108d") (:keywords "wp" "docs" "text" "markdown") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (markdown-table-wrap . [(20260806 1014) ((emacs (28 1))) "Word-wrap GFM pipe tables to fit window width" tar ((:url . "https://github.com/dnouri/markdown-table-wrap") (:commit . "f846b77d13f34fba57c80214c1a61e00c94048a3") (:revdesc . "f846b77d13f3") (:keywords "text" "markdown" "tables") (:authors ("Daniel Nouri" . "daniel.nouri@gmail.com")) (:maintainers ("Daniel Nouri" . "daniel.nouri@gmail.com")) (:maintainer "Daniel Nouri" . "daniel.nouri@gmail.com"))])
+ (markdown-toc . [(20260131 1444) ((emacs (28 1)) (markdown-mode (2 1)) (dash (2 11 0)) (s (1 9 0))) "A simple TOC generator for markdown file" tar ((:url . "https://github.com/ardumont/markdown-toc") (:commit . "d22633b654193bcab322ec51b6dd3bb98dd5f69f") (:revdesc . "d22633b65419") (:keywords "markdown" "toc" "tools") (:authors ("Antoine R. Dumont" . "(@ardumont)")) (:maintainers ("Antoine R. Dumont" . "(@ardumont)") ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Antoine R. Dumont" . "(@ardumont)"))])
+ (markdown-ts-mode . [(20260505 1217) ((emacs (29 1))) "Major mode for Markdown using Treesitter" tar ((:url . "https://github.com/LionyxML/markdown-ts-mode") (:commit . "e7e78ec55213909d2b70e3dd943b776f622cc991") (:revdesc . "e7e78ec55213") (:keywords "languages" "matching" "faces"))])
+ (markdownfmt . [(20160609 1241) ((emacs (24))) "Format markdown using markdownfmt" tar ((:url . "https://github.com/nlamirault/emacs-markdownfmt") (:commit . "af83cd00fafcaa837ffdb50d1fa2b0ac952f16c0") (:revdesc . "af83cd00fafc") (:keywords "markdown") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (markless . [(20250811 1924) ((emacs (24 4))) "Major mode for Markless documents" tar ((:url . "https://shirakumo.org/docs/markless.el/") (:commit . "f8bd797f4d5962fec1dcf9807fba8cf0be17b2f9") (:revdesc . "f8bd797f4d59") (:keywords "languages" "wp") (:authors ("Yukari Hafner" . "shinmera@tymoon.eu")) (:maintainers ("Yukari Hafner" . "shinmera@tymoon.eu")) (:maintainer "Yukari Hafner" . "shinmera@tymoon.eu"))])
+ (markup . [(20170420 1129) ((cl-lib (0 5))) "Simple markup generation helpers" tar ((:url . "https://github.com/leoc/markup.el") (:commit . "876da2d3f23473475bb0fd0a1480ae11d2671291") (:revdesc . "876da2d3f234") (:keywords "convenience" "markup" "html") (:authors ("Arthur Leonard Andersen" . "leoc.git@gmail.com")) (:maintainers ("Arthur Leonard Andersen" . "leoc.git@gmail.com")) (:maintainer "Arthur Leonard Andersen" . "leoc.git@gmail.com"))])
+ (markup-faces . [(20141110 817) nil "Collection of faces for markup language modes" tar ((:url . "https://github.com/sensorflo/markup-faces") (:commit . "98a807ed82473eb41c6a201ed7ef816d6bcd67b0") (:revdesc . "98a807ed8247") (:keywords "wp" "faces") (:authors ("Florian Kaufmann" . "sensorflo@gmail.com")) (:maintainers ("Florian Kaufmann" . "sensorflo@gmail.com")) (:maintainer "Florian Kaufmann" . "sensorflo@gmail.com"))])
+ (marmalade-client . [(20141231 2007) ((web (0 5 2)) (kv (0 0 19)) (gh (0 8 0))) "Client for marmalade API from emacs" tar ((:url . "https://github.com/nicferrier/emacs-marmalade-upload") (:commit . "f315dea57e4fbebd9ee0668c0bafd4c45c7b754a") (:revdesc . "f315dea57e4f") (:keywords "lisp") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (marquee-header . [(20260101 601) ((emacs (26 1))) "Code interface for displaying marquee in header" tar ((:url . "https://github.com/jcs-elpa/marquee-header") (:commit . "c0e884eea86ef818a652dba9a1719b50489813a6") (:revdesc . "c0e884eea86e") (:keywords "wp" "animation" "marquee") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (marron-gold-theme . [(20250224 923) ((emacs (24 1))) "A rich marron-gold theme" tar ((:url . "https://github.com/madara123pain/unique-emacs-theme-pack") (:commit . "ae9a0c318c371ed70ec568f3a618d47124817fe7") (:revdesc . "ae9a0c318c37") (:keywords "faces" "theme" "marron" "gold" "warm" "elegant"))])
+ (marshal . [(20201223 1853) ((emacs (25 1)) (ht (2 0))) "Eieio extension for automatic (un)marshalling" tar ((:url . "https://github.com/sigma/marshal.el") (:commit . "490496d974d03906f784707ecc2e0ac36ed84b96") (:revdesc . "490496d974d0") (:keywords "extensions") (:authors ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainers ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainer "Yann Hodique" . "yann.hodique@gmail.com"))])
+ (maruo-macro-mode . [(20160616 1349) ((emacs (24 3))) "Major mode for editing Hidemaru/Maruo macro script" tar ((:url . "https://github.com/zonuexe/maruo-macro-mode.el") (:commit . "8fc9a38ad051eafa8eb94038711acc52c5d1d8d5") (:revdesc . "8fc9a38ad051") (:keywords "programming" "editor" "macro") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (masm-mode . [(20200308 1450) ((emacs (25 1))) "MASM x86 and x64 assembly major mode" tar ((:url . "https://github.com/YiGeeker/masm-mode") (:commit . "ab63524d195332ec9f703783704231606e69c292") (:revdesc . "ab63524d1953") (:keywords "languages") (:authors ("YiGeeker" . "zyfchinese@yeah.net")) (:maintainers ("YiGeeker" . "zyfchinese@yeah.net")) (:maintainer "YiGeeker" . "zyfchinese@yeah.net"))])
+ (mason . [(20260517 1744) ((emacs (30 1)) (s (1 13 0))) "Package managers for LSP, DAP, linters, and more" tar ((:url . "https://github.com/mason-org/mason.el") (:commit . "8dc604d12bea314dba3db89ea29d84b0d1438eeb") (:revdesc . "8dc604d12bea") (:keywords "tools" "lsp" "installer") (:authors ("Dimas Firmansyah" . "deirn@bai.lol")) (:maintainers ("Dimas Firmansyah" . "deirn@bai.lol")) (:maintainer "Dimas Firmansyah" . "deirn@bai.lol"))])
+ (mastodon . [(20260825 1806) ((emacs (29 1)) (persist (0 8)) (tp (0 8))) "Client for fediverse services using the Mastodon API" tar ((:url . "https://codeberg.org/martianh/mastodon.el") (:commit . "b3c19403378f9b465302274fb6dda71243c4cfce") (:revdesc . "b3c19403378f") (:authors ("Johnson Denen" . "johnson.denen@gmail.com") ("Marty Hiatt" . "martianh@disroot.org")) (:maintainers ("Marty Hiatt" . "martianh@disroot.org")) (:maintainer "Marty Hiatt" . "martianh@disroot.org"))])
+ (material-theme . [(20210904 1226) ((emacs (24 1))) "A Theme based on the colors of the Google Material Design" tar ((:url . "https://github.com/cpaulik/emacs-material-theme") (:commit . "6823009bc92f82aa3a90e27e1009f7da8e87b648") (:revdesc . "6823009bc92f") (:keywords "themes") (:authors ("Christoph Paulik" . "cpaulik@gmail.com")) (:maintainers ("Christoph Paulik" . "cpaulik@gmail.com")) (:maintainer "Christoph Paulik" . "cpaulik@gmail.com"))])
+ (math-preview . [(20240801 513) ((emacs (26 1)) (json (1 4)) (dash (2 18 0)) (s (1 12 0))) "Preview TeX math equations inline" tar ((:url . "https://gitlab.com/matsievskiysv/math-preview") (:commit . "a2ca3c175468ceaf02bab6cdfd8ef016bda2b98d") (:revdesc . "a2ca3c175468") (:keywords "convenience"))])
+ (math-symbol-lists . [(20220828 2047) nil "Lists of Unicode math symbols and latex commands" tar ((:url . "https://github.com/vspinu/math-symbol-lists") (:commit . "ac3eb053d3b576fcdd192b0ac6ad5090ea3a7079") (:revdesc . "ac3eb053d3b5") (:keywords "unicode" "symbols" "mathematics") (:authors ("Vitalie Spinu" . "spinuvit@gmail.com")) (:maintainers ("Vitalie Spinu" . "spinuvit@gmail.com")) (:maintainer "Vitalie Spinu" . "spinuvit@gmail.com"))])
+ (math-symbols . [(20201005 2313) nil "Math Symbol Input methods and conversion tools" tar ((:url . "https://github.com/kawabata/math-symbols") (:commit . "091b81cb40ceaff97614999ffe85b572ace182f0") (:revdesc . "091b81cb40ce") (:keywords "i18n" "languages" "tex") (:authors ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (math-tex-convert . [(20221210 1937) ((emacs (26 1)) (math-symbol-lists (1 3)) (auctex (12 1))) "Convert LaTeX macros to unicode and back" tar ((:url . "https://github.com/enricoflor/math-tex-convert") (:commit . "8b174d05e8e5269322a1ee90f94cf1ed018d4976") (:revdesc . "8b174d05e8e5") (:authors ("Enrico Flor" . "enrico@eflor.net")) (:maintainers ("Enrico Flor" . "enrico@eflor.net")) (:maintainer "Enrico Flor" . "enrico@eflor.net"))])
+ (mathprog-ts-mode . [(20260225 1548) ((emacs (29 1))) "Major mode for the GNU MathProg modeling language" tar ((:url . "https://github.com/smoeding/mathprog-ts-mode") (:commit . "a45ccc2a252aaeb34fbd2c180d8b428bb38bebc1") (:revdesc . "a45ccc2a252a") (:keywords "languages") (:authors ("Stefan Möding" . "stm@kill-9.net")) (:maintainers ("Stefan Möding" . "stm@kill-9.net")) (:maintainer "Stefan Möding" . "stm@kill-9.net"))])
+ (matlab-mode . [(20260428 1740) ((emacs (27 2))) "Major mode for MATLAB(R) dot-m files" tar ((:url . "https://github.com/mathworks/Emacs-MATLAB-Mode") (:commit . "83ea45983975bc6d17a908bf4acddfc47d51763a") (:revdesc . "83ea45983975") (:keywords "matlab(r)") (:authors ("Matt Wette" . "mwette@alumni.caltech.edu") ("Eric M. Ludlam" . "eludlam@mathworks.com")) (:maintainers ("Eric M. Ludlam" . "eludlam@mathworks.com") ("Uwe Brauer" . "oub@mat.ucm.es") ("John Ciolfi" . "john.ciolfi.32@gmail.com")) (:maintainer "Eric M. Ludlam" . "eludlam@mathworks.com"))])
+ (maude-mode . [(20230504 937) ((emacs (25))) "Emacs mode for the programming language Maude" tar ((:url . "https://github.com/rudi/abs-mode") (:commit . "2e1f68a890493d964f933d6e40b0ede047f70ede") (:revdesc . "2e1f68a89049") (:keywords "languages" "maude") (:authors ("Ellef Gjelstad" . "ellefg+maude*ifi.uio.no")) (:maintainers ("Rudi Schlatte" . "rudi@constantly.at")) (:maintainer "Rudi Schlatte" . "rudi@constantly.at"))])
+ (maven-test-mode . [(20141220 557) ((s (1 9)) (emacs (24))) "Utilities for navigating test files and running maven test tasks" tar ((:url . "https://github.com/rranelli/maven-test-mode") (:commit . "a19151861df2ad8ae4880a2e7c86ddf848cb569a") (:revdesc . "a19151861df2") (:keywords "java" "maven" "test"))])
+ (maxframe . [(20170120 1705) nil "Maximize the emacs frame based on display size" tar ((:url . "https://github.com/rmm5t/maxframe.el") (:commit . "13bda6dd9f1d96aa4b9dd9957a26cefd399a7772") (:revdesc . "13bda6dd9f1d") (:keywords "display" "frame" "window" "maximize"))])
+ (maxima . [(20230529 1658) ((emacs (26 1)) (s (1 11 0)) (test-simple (1 3 0))) "Major mode for Maxima" tar ((:url . "https://gitlab.com/sasanidas/maxima") (:commit . "2de798f6644753772553cd0420d3c419ed50dd0b") (:revdesc . "2de798f66447") (:keywords "maxima" "tools" "math") (:maintainers ("Fermin Munoz" . "fmfs@posteo.net")) (:maintainer "Fermin Munoz" . "fmfs@posteo.net"))])
+ (mb-url . [(20250518 621) ((emacs (25))) "Multiple Backends for Emacs URL package" tar ((:url . "https://github.com/dochang/mb-url") (:commit . "3d714075ad31c7c0e119c289b074f143575e86b7") (:revdesc . "3d714075ad31") (:keywords "comm" "data" "processes" "hypermedia") (:authors ("ZHANG Weiyi" . "dochang@gmail.com")) (:maintainers ("ZHANG Weiyi" . "dochang@gmail.com")) (:maintainer "ZHANG Weiyi" . "dochang@gmail.com"))])
+ (mbe . [(20151126 1134) ((emacs (24)) (cl-lib (0 5))) "Macros by Example" tar ((:url . "https://github.com/ijp/mbe.el") (:commit . "bb10aa8f26bb7e9b1d5746934c94edb00402940c") (:revdesc . "bb10aa8f26bb") (:keywords "tools" "macros") (:authors ("Ian Price" . "ianprice90@googlemail.com")) (:maintainers ("Ian Price" . "ianprice90@googlemail.com")) (:maintainer "Ian Price" . "ianprice90@googlemail.com"))])
+ (mbo70s-theme . [(20170808 1315) ((emacs (24 0))) "70s style palette, with similarities to mbo theme" tar ((:url . "https://github.com/emacsfodder/tmtheme-to-deftheme") (:commit . "bed3db8965708ed4e9482b224a9b084765c052f2") (:revdesc . "bed3db896570"))])
+ (mbsync . [(20200128 1053) nil "Run mbsync to fetch mails" tar ((:url . "https://github.com/dimitri/mbsync-el") (:commit . "d3c81da81ce5b154c0d048047a47277338721a70") (:revdesc . "d3c81da81ce5") (:authors ("Dimitri Fontaine" . "dim@tapoueh.org")) (:maintainers ("Dimitri Fontaine" . "dim@tapoueh.org")) (:maintainer "Dimitri Fontaine" . "dim@tapoueh.org"))])
+ (mc-calc . [(20200420 1836) ((emacs (24 4)) (multiple-cursors (1 2 1))) "Combine multiple-cursors and calc" tar ((:url . "https://github.com/hatheroldev/mc-calc") (:commit . "74a046a5728919a4d1135ca62738326b0dde278c") (:revdesc . "74a046a57289") (:keywords "convenience") (:authors (nil . "FrankRolandhatheroldev@fgmail.com")) (:maintainers (nil . "FrankRolandhatheroldev@fgmail.com")) (:maintainer nil . "FrankRolandhatheroldev@fgmail.com"))])
+ (mc-extras . [(20231206 1655) ((multiple-cursors (1 2 1))) "Extra functions for multiple-cursors mode" tar ((:url . "https://github.com/knu/mc-extras.el") (:commit . "8718cbdaa7bf3dd5c0f30c66a36a6bfbdf7f07c1") (:revdesc . "8718cbdaa7bf") (:keywords "editing" "cursors") (:authors ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (mcp . [(20260615 940) ((emacs (30 1)) (jsonrpc (1 0 25))) "Model Context Protocol" tar ((:url . "https://github.com/lizqwerscott/mcp.el") (:commit . "2d172809cbdb2a40d86b28ad73bd65547cefe0e1") (:revdesc . "2d172809cbdb") (:keywords "tools") (:authors ("lizqwer scott" . "lizqwerscott@gmail.com")) (:maintainers ("lizqwer scott" . "lizqwerscott@gmail.com")) (:maintainer "lizqwer scott" . "lizqwerscott@gmail.com"))])
+ (mcp-server-lib . [(20260819 1306) ((emacs (27 1))) "Model Context Protocol server library" tar ((:url . "https://github.com/laurynas-biveinis/mcp-server-lib.el") (:commit . "f7c34f5ab6ae4620cfa88a25ef9cbd47313322e4") (:revdesc . "f7c34f5ab6ae") (:keywords "comm" "tools") (:authors ("Laurynas Biveinis" . "laurynas.biveinis@gmail.com")) (:maintainers ("Laurynas Biveinis" . "laurynas.biveinis@gmail.com")) (:maintainer "Laurynas Biveinis" . "laurynas.biveinis@gmail.com"))])
+ (md-readme . [(20191112 1943) nil "Markdown-formatted READMEs for your ELisp" tar ((:url . "https://github.com/thomas11/md-readme/tree/master") (:commit . "ca99f44de11fab18d1f50d4b1722f2ceee3c814d") (:revdesc . "ca99f44de11f") (:keywords "lisp" "help" "readme" "markdown" "header" "documentation" "github") (:authors ("Thomas Kappler" . "tkappler@gmail.com")) (:maintainers ("Thomas Kappler" . "tkappler@gmail.com")) (:maintainer "Thomas Kappler" . "tkappler@gmail.com"))])
+ (md-ts-mode . [(20260823 1701) ((emacs (29 1))) "Major mode for Markdown using tree-sitter" tar ((:url . "https://github.com/dnouri/md-ts-mode") (:commit . "13e175beebe3ab2cbfa65186949b990bb26e1fd4") (:revdesc . "13e175beebe3") (:keywords "markdown" "languages" "tree-sitter") (:authors ("Daniel Nouri" . "daniel.nouri@gmail.com")) (:maintainers ("Daniel Nouri" . "daniel.nouri@gmail.com")) (:maintainer "Daniel Nouri" . "daniel.nouri@gmail.com"))])
+ (md4rd . [(20230725 2316) ((emacs (25 1)) (request (0 3 0)) (cl-lib (0 6 1)) (dash (2 12 0)) (s (1 12 0)) (tree-mode (1 0 0))) "Mode for reddit (browse it)" tar ((:url . "https://github.com/ahungry/md4rd") (:commit . "2fa198af749e9ddb759e052d911f56a626088903") (:revdesc . "2fa198af749e") (:keywords "ahungry" "reddit" "browse" "news") (:authors ("Matthew Carter" . "m@ahungry.com")) (:maintainers ("Matthew Carter" . "m@ahungry.com")) (:maintainer "Matthew Carter" . "m@ahungry.com"))])
+ (media-progress . [(20250511 1045) ((emacs (28 1))) "Display position where media player stopped" tar ((:url . "https://github.com/jumper047/media-progress") (:commit . "7055f5830690c9b1330816f899ee05791f35b406") (:revdesc . "7055f5830690") (:keywords "files" "convenience") (:authors ("Dmitriy Pshonko" . "http://github.com/jumper047")) (:maintainers ("Dmitriy Pshonko" . "http://github.com/jumper047")) (:maintainer "Dmitriy Pshonko" . "http://github.com/jumper047"))])
+ (media-progress-dired . [(20230527 2209) ((emacs (28 1)) (media-progress (0 1 0))) "Display position where media player stopped in dired buffer" tar ((:url . "https://github.com/jumper047/media-progress") (:commit . "438a37019383eef35e45875b3e4df3fca4eaf39f") (:revdesc . "438a37019383") (:keywords "files" "convenience") (:authors ("Dmitriy Pshonko" . "http://github.com/jumper047")) (:maintainers ("Dmitriy Pshonko" . "http://github.com/jumper047")) (:maintainer "Dmitriy Pshonko" . "http://github.com/jumper047"))])
+ (media-progress-dirvish . [(20250511 1045) ((emacs (28 1)) (dirvish (2 0 0)) (media-progress (0 1 0))) "Display position where media player stopped in dirvish" tar ((:url . "https://github.com/jumper047/media-progress") (:commit . "7055f5830690c9b1330816f899ee05791f35b406") (:revdesc . "7055f5830690") (:keywords "files" "convenience") (:authors ("Dmitriy Pshonko" . "http://github.com/jumper047")) (:maintainers ("Dmitriy Pshonko" . "http://github.com/jumper047")) (:maintainer "Dmitriy Pshonko" . "http://github.com/jumper047"))])
+ (media-thumbnail . [(20260712 2348) ((emacs (28 1))) "Utility package to provide media icons" tar ((:url . "https://github.com/jojojames/media-thumbnail") (:commit . "4cb8075ec8bc46408a6b01fc8877571d8e66e439") (:revdesc . "4cb8075ec8bc") (:keywords "files" "tools") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (mediawiki . [(20260708 2249) ((emacs (28 1))) "Mediawiki frontend" tar ((:url . "https://github.com/hexmode/mediawiki-el") (:commit . "6e081439a876b3cb9a27146fd75e887997712629") (:revdesc . "6e081439a876") (:keywords "mediawiki" "wikipedia" "network" "wiki") (:authors ("Mark A. Hershberger" . "mah@everybody.org")) (:maintainers ("Mark A. Hershberger" . "mah@everybody.org")) (:maintainer "Mark A. Hershberger" . "mah@everybody.org"))])
+ (meep . [(20260826 506) ((emacs (30 1))) "Lightweight modal editing" tar ((:url . "https://codeberg.org/ideasman42/emacs-meep") (:commit . "ddd765698505e2460ea315e55570adac2e10ffec") (:revdesc . "ddd765698505") (:keywords "convenience" "modal-editing") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (meghanada . [(20220101 505) ((emacs (24 3)) (yasnippet (0 6 1)) (company (0 9 0)) (flycheck (0 23))) "A better java development mode" tar ((:url . "https://github.com/mopemope/meghanada-emacs") (:commit . "59c46cabb7eee715fe810ce59424934a1286df84") (:revdesc . "59c46cabb7ee") (:keywords "languages" "java") (:authors ("Yutaka Matsubara" . "(yutaka.matsubara@gmail.com)")) (:maintainers ("Yutaka Matsubara" . "(yutaka.matsubara@gmail.com)")) (:maintainer "Yutaka Matsubara" . "(yutaka.matsubara@gmail.com)"))])
+ (melancholy-theme . [(20240417 136) ((emacs (27 1))) "A dark theme that's pretty sad  -*- lexical-binding: t; -" tar ((:url . "https://gitlab.com/baaash/melancholy-theme") (:commit . "7ba2bb3f062e798236bfb589381691c5bd9a22be") (:revdesc . "7ba2bb3f062e") (:keywords "faces" "frames") (:authors ("@baaash" . "bleat@baaa.sh")) (:maintainers ("@baaash" . "bleat@baaa.sh")) (:maintainer "@baaash" . "bleat@baaa.sh"))])
+ (mellow-theme . [(20170808 1317) ((emacs (24 0))) "An Emacs 24 theme based on Mellow (tmTheme)" tar ((:url . "https://github.com/emacsfodder/tmtheme-to-deftheme") (:commit . "2bdf18f05f5212b6f269d9a94afe2cf201766891") (:revdesc . "2bdf18f05f52"))])
+ (melpa-upstream-visit . [(20130720 1033) ((s (1 6 0))) "A set of kludges to visit a melpa-hosted package's homepage" tar ((:url . "https://github.com/laynor/melpa-upstream-visit") (:commit . "7310c74fdead3c0f86ad6eff76cf989e63f70f66") (:revdesc . "7310c74fdead") (:keywords "convenience") (:authors ("Alessandro Piras" . "laynor@gmail.com")) (:maintainers ("Alessandro Piras" . "laynor@gmail.com")) (:maintainer "Alessandro Piras" . "laynor@gmail.com"))])
+ (memento-mori . [(20240702 2332) ((emacs (24 4))) "Reminder of our mortality" tar ((:url . "https://github.com/gvol/emacs-memento-mori") (:commit . "c53707871aa5aeb551c6b9c02bdca6f477bc9c5b") (:revdesc . "c53707871aa5") (:keywords "help") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Ivan Andrus" . "darthandrus@gmail.com")) (:maintainer "Ivan Andrus" . "darthandrus@gmail.com"))])
+ (memoize . [(20200103 2036) nil "Memoization functions" tar ((:url . "https://github.com/skeeto/emacs-memoize") (:commit . "51b075935ca7070f62fae1d69fe0ff7d8fa56fdd") (:revdesc . "51b075935ca7") (:authors ("Christopher Wellons" . "mosquitopsu@gmail.com")) (:maintainers ("Christopher Wellons" . "mosquitopsu@gmail.com")) (:maintainer "Christopher Wellons" . "mosquitopsu@gmail.com"))])
+ (memolist . [(20150804 1721) ((markdown-mode (22 0)) (ag (0 45))) "Memolist.el is Emacs port of memolist.vim" tar ((:url . "https://github.com/mikanfactory/emacs-memolist") (:commit . "60c296e202a71e9dcf1c3936d47b5c4b95c5839f") (:revdesc . "60c296e202a7") (:keywords "markdown" "memo") (:authors ("mikanfactory" . "k952i4j14x17_at_gmail.com")))])
+ (mentor . [(20230103 1146) ((emacs (25 1)) (xml-rpc (1 6 15)) (seq (1 11)) (async (1 9 3)) (url-scgi (0 8))) "Frontend for the rTorrent bittorrent client" tar ((:url . "https://github.com/skangas/mentor") (:commit . "f51dd4f3f87c54b7cc92189924b9d873a53f5a75") (:revdesc . "f51dd4f3f87c") (:keywords "comm" "processes" "bittorrent") (:authors ("Stefan Kangas" . "stefankangas@gmail.com")) (:maintainers ("Stefan Kangas" . "stefankangas@gmail.com")) (:maintainer "Stefan Kangas" . "stefankangas@gmail.com"))])
+ (meow . [(20260714 1200) ((emacs (27 1))) "Yet Another modal editing" tar ((:url . "https://www.github.com/DogLooksGood/meow") (:commit . "aa8aec19e70369b547176e625f5b95c4a8565e8e") (:revdesc . "aa8aec19e703") (:keywords "convenience" "modal-editing"))])
+ (meow-tree-sitter . [(20251214 323) ((emacs (29 1)) (meow (1 2 0))) "Tree-sitter powered motions for Meow" tar ((:url . "https://github.com/skissue/meow-tree-sitter") (:commit . "f050dc0867b7a37efc2c6432b33305a0f14b1029") (:revdesc . "f050dc0867b7") (:keywords "convenience" "files" "languages" "tools") (:authors ("Ad" . "me@skissue.xyz")) (:maintainers ("Ad" . "me@skissue.xyz")) (:maintainer "Ad" . "me@skissue.xyz"))])
+ (merlin . [(20260602 1457) ((emacs (25 1))) "Mode for Merlin, an assistant for OCaml" tar ((:url . "https://github.com/ocaml/merlin") (:commit . "653fdaaf2b1be998e3edc6645a2ddee9a3e1bf52") (:revdesc . "653fdaaf2b1b") (:keywords "ocaml" "languages") (:authors ("Frédéric Bour" . "frederic.bourlakaban.net")) (:maintainers ("Frédéric Bour" . "frederic.bourlakaban.net")) (:maintainer "Frédéric Bour" . "frederic.bourlakaban.net"))])
+ (merlin-ac . [(20221123 1408) ((emacs (25 1)) (merlin (3)) (auto-complete (1 5))) "Merlin and auto-complete integration" tar ((:url . "https://github.com/ocaml/merlin") (:commit . "8bcab034a680f57ddf58092fda6288dc4caddd2a") (:revdesc . "8bcab034a680") (:keywords "ocaml" "languages") (:authors ("Simon Castellan" . "simon.castellaniuwt.fr") ("Frédéric Bour" . "frederic.bourlakaban.net") ("Thomas Refis" . "thomas.refisgmail.com")) (:maintainers ("Simon Castellan" . "simon.castellaniuwt.fr") ("Frédéric Bour" . "frederic.bourlakaban.net") ("Thomas Refis" . "thomas.refisgmail.com")) (:maintainer "Simon Castellan" . "simon.castellaniuwt.fr"))])
+ (merlin-company . [(20221123 1408) ((emacs (25 1)) (merlin (3)) (company (0 9))) "Merlin and company mode integration" tar ((:url . "https://github.com/ocaml/merlin") (:commit . "8bcab034a680f57ddf58092fda6288dc4caddd2a") (:revdesc . "8bcab034a680") (:keywords "ocaml" "languages") (:authors ("Simon Castellan" . "simon.castellaniuwt.fr") ("Frédéric Bour" . "frederic.bourlakaban.net") ("Thomas Refis" . "thomas.refisgmail.com")) (:maintainers ("Simon Castellan" . "simon.castellaniuwt.fr") ("Frédéric Bour" . "frederic.bourlakaban.net") ("Thomas Refis" . "thomas.refisgmail.com")) (:maintainer "Simon Castellan" . "simon.castellaniuwt.fr"))])
+ (merlin-eldoc . [(20230213 555) ((emacs (24 4)) (merlin (3 0))) "Eldoc for OCaml and Reason" tar ((:url . "https://github.com/khady/merlin-eldoc") (:commit . "bf8edc63d85b35e4def352fa7ce4ea39f43e1fd8") (:revdesc . "bf8edc63d85b") (:keywords "merlin" "ocaml" "languages" "eldoc") (:authors ("Louis Roché" . "louis@louisroche.net")) (:maintainers ("Louis Roché" . "louis@louisroche.net")) (:maintainer "Louis Roché" . "louis@louisroche.net"))])
+ (merlin-iedit . [(20221123 1408) ((emacs (25 1)) (merlin (3)) (iedit (0 9))) "Merlin and iedit integration" tar ((:url . "https://github.com/ocaml/merlin") (:commit . "8bcab034a680f57ddf58092fda6288dc4caddd2a") (:revdesc . "8bcab034a680") (:keywords "ocaml" "languages") (:authors ("Simon Castellan" . "simon.castellaniuwt.fr") ("Frédéric Bour" . "frederic.bourlakaban.net") ("Thomas Refis" . "thomas.refisgmail.com")) (:maintainers ("Simon Castellan" . "simon.castellaniuwt.fr") ("Frédéric Bour" . "frederic.bourlakaban.net") ("Thomas Refis" . "thomas.refisgmail.com")) (:maintainer "Simon Castellan" . "simon.castellaniuwt.fr"))])
+ (mermaid-docker-mode . [(20250424 1730) ((emacs (26 1)) (mermaid-mode (20230517 1527 -4))) "Render mermaid graphs with Docker service" tar ((:url . "https://github.com/KeyWeeUsr/mermaid-docker-mode") (:commit . "ce5f941cdb1bb360872bd5f80574a50d23f85531") (:revdesc . "ce5f941cdb1b") (:keywords "convenience" "docker" "mermaid" "mmd" "graph" "design" "jpg" "image" "api") (:authors ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainers ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainer "Peter Badida" . "keyweeusr@gmail.com"))])
+ (mermaid-mode . [(20260607 15) ((emacs (25 3))) "Major mode for working with mermaid graphs" tar ((:url . "https://github.com/abrochard/mermaid-mode") (:commit . "804dbcb1452e7496ae0c48e20362da6351227246") (:revdesc . "804dbcb1452e") (:keywords "mermaid" "graphs" "tools" "processes"))])
+ (mermaid-ts-mode . [(20250803 205) ((emacs (29 1))) "Major mode for Mermaid" tar ((:url . "https://github.com/JonathanHope/mermaid-ts-mode") (:commit . "973e442cbed980cf51afc256c90ef133c4d02141") (:revdesc . "973e442cbed9") (:keywords "mermaid" "languages") (:authors ("Jonathan Hope" . "jhope@theflatfield.net")) (:maintainers ("Jonathan Hope" . "jhope@theflatfield.net")) (:maintainer "Jonathan Hope" . "jhope@theflatfield.net"))])
+ (meshmonitor-chat . [(20260824 957) ((emacs (28 1))) "Chat client for MeshMonitor (Meshtastic)" tar ((:url . "https://git.andros.dev/andros/meshmonitor-chat.el") (:commit . "d1dedb2d06f552fb45b278ee34fabaf0ac791c27") (:revdesc . "d1dedb2d06f5") (:keywords "comm") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (meshtastic . [(20260527 1500) ((emacs (28 1))) "Chat client for Meshtastic LoRa devices via serial" tar ((:url . "https://git.andros.dev/andros/meshtastic.el") (:commit . "5ad027669b3e652f704857e3d7e373095d1c09d1") (:revdesc . "5ad027669b3e") (:keywords "comm") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (meson-mode . [(20240601 1647) ((emacs (26 1))) "Major mode for the Meson build system files" tar ((:url . "https://github.com/wentasah/meson-mode") (:commit . "0449c649daaa9322e1c439c1540d8c290501d455") (:revdesc . "0449c649daaa") (:keywords "languages" "tools") (:authors ("Michal Sojka" . "sojkam1@fel.cvut.cz")) (:maintainers ("Michal Sojka" . "sojkam1@fel.cvut.cz")) (:maintainer "Michal Sojka" . "sojkam1@fel.cvut.cz"))])
+ (mess . [(20230718 1533) ((emacs (27 1)) (mame (1 0))) "Front-end for MAME MESS" tar ((:url . "https://github.com/Iacob/elmame") (:commit . "65392b0d0ded45de789d4deab28a4ce88de24567") (:revdesc . "65392b0d0ded") (:authors ("Yong" . "luo.yong.name@gmail.com")) (:maintainers ("Yong" . "luo.yong.name@gmail.com")) (:maintainer "Yong" . "luo.yong.name@gmail.com"))])
+ (message-attachment-reminder . [(20230124 520) ((emacs (24 1))) "Remind if missing attachment" tar ((:url . "https://github.com/alexmurray/message-attachment-reminder") (:commit . "975381d6e7c6771c462e73abd3398a4ed2a9b86b") (:revdesc . "975381d6e7c6") (:authors ("Alex Murray" . "murray.alex@gmail.com")) (:maintainers ("Alex Murray" . "murray.alex@gmail.com")) (:maintainer "Alex Murray" . "murray.alex@gmail.com"))])
+ (message-view-patch . [(20210904 2227) ((emacs (24 4)) (magit (3 0 0))) "Colorize patch-like emails in mu4e" tar ((:url . "https://github.com/seanfarley/message-view-patch") (:commit . "50dd3d92a1794f24b7e375b74e5199c63b54a2d8") (:revdesc . "50dd3d92a179") (:keywords "extensions" "mu4e" "gnus"))])
+ (messages-are-flowing . [(20191029 954) nil "Visible indication when composing \"flowed\" emails" tar ((:url . "https://github.com/legoscia/messages-are-flowing") (:commit . "d582a564a63b7b90764ffc5c618bc5300225d0ab") (:revdesc . "d582a564a63b") (:keywords "mail") (:authors ("Magnus Henoch" . "magnus.henoch@gmail.com")) (:maintainers ("Magnus Henoch" . "magnus.henoch@gmail.com")) (:maintainer "Magnus Henoch" . "magnus.henoch@gmail.com"))])
+ (meta-presenter . [(20210714 1658) nil "A simple multi-file presentation tool for Emacs" tar ((:url . "http://ismail.teamfluxion.com") (:commit . "4ab48dacea245b223a0ffd2723ece746bd61c0af") (:revdesc . "4ab48dacea24") (:keywords "productivity" "presentation") (:authors ("Mohammed Ismail Ansari" . "team.terminal@gmail.com")) (:maintainers ("Mohammed Ismail Ansari" . "team.terminal@gmail.com")) (:maintainer "Mohammed Ismail Ansari" . "team.terminal@gmail.com"))])
+ (metal-archives . [(20260202 1028) ((emacs (26 3)) (alert (1 2)) (ht (2 3)) (request (0 2 2))) "List future releases using Metal-Archives API" tar ((:url . "https://github.com/seblemaguer/metal-archives.el") (:commit . "eb1c4d84f04f4afc7a1c2a0f3c4f816f16fa85e6") (:revdesc . "eb1c4d84f04f") (:keywords "lisp" "calendar") (:authors ("Sébastien Le Maguer" . "lemagues@tcd.ie")) (:maintainers ("Sébastien Le Maguer" . "lemagues@tcd.ie")) (:maintainer "Sébastien Le Maguer" . "lemagues@tcd.ie"))])
+ (metal-archives-shopping-list . [(20260202 1028) ((emacs (26 3)) (org-ml (5 8 7)) (alert (1 2)) (ht (2 3)) (metal-archives (0 3))) "Add shopping list generation support to metal-archives" tar ((:url . "https://github.com/seblemaguer/metal-archives.el") (:commit . "eb1c4d84f04f4afc7a1c2a0f3c4f816f16fa85e6") (:revdesc . "eb1c4d84f04f") (:keywords "org" "calendar") (:authors ("Sébastien Le Maguer" . "lemagues@tcd.ie")) (:maintainers ("Sébastien Le Maguer" . "lemagues@tcd.ie")) (:maintainer "Sébastien Le Maguer" . "lemagues@tcd.ie"))])
+ (metalheart-theme . [(20160710 641) ((emacs (24))) "Low-contrast theme with a dark blue-green background" tar ((:url . "https://github.com/mswift42/MetalHeart-Emacs") (:commit . "ec98ea2c11dc1213dae8cbe1fe0cee73ca138bb2") (:revdesc . "ec98ea2c11dc"))])
+ (metamorph . [(20220328 129) ((emacs (26 1))) "Transform your buffers with lisp" tar ((:url . "https://github.com/AdamNiederer/metamorph") (:commit . "3633e32a9601c491df32d6c2212dbe63dc6484f4") (:revdesc . "3633e32a9601") (:keywords "metaprogramming" "wp") (:authors ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainers ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainer "Adam Niederer" . "adam.niederer@gmail.com"))])
+ (metascript-mode . [(20150709 57) ((emacs (24 3))) "Major mode for the Metascript programming language" tar ((:url . "https://github.com/metascript/metascript-mode") (:commit . "edb361c7b0e5de231e5334a17b90652fb1df78f9") (:revdesc . "edb361c7b0e5") (:keywords "languages" "metascript" "mjs") (:authors ("Rodrigo B. de Oliveira" . "rbo@acm.org")) (:maintainers ("Rodrigo B. de Oliveira" . "rbo@acm.org")) (:maintainer "Rodrigo B. de Oliveira" . "rbo@acm.org"))])
+ (metaweblog . [(20250721 2333) ((emacs (29 4)) (xml-rpc (1 6 15))) "An XML-RPC MetaWeblog and WordPress API client" tar ((:url . "https://github.com/org2blog/org2blog") (:commit . "a47847c4231800335786e624025cb58760a4746e") (:revdesc . "a47847c42318") (:keywords "comm") (:authors ("Puneeth Chaganti" . "punchagan+org2blog@gmail.com")) (:maintainers ("Grant Rettke" . "grant@wisdomandwonder.com")) (:maintainer "Grant Rettke" . "grant@wisdomandwonder.com"))])
+ (metrics-tracker . [(20250120 1606) ((emacs (24 4)) (seq (2 3))) "Generate reports of personal metrics from diary entries" tar ((:url . "https://github.com/ianxm/emacs-tracker") (:commit . "a58591bad91854f63f539eb4657004f029c1ca24") (:revdesc . "a58591bad918") (:keywords "calendar") (:authors ("Ian Martins" . "ianxm@jhu.edu")) (:maintainers ("Ian Martins" . "ianxm@jhu.edu")) (:maintainer "Ian Martins" . "ianxm@jhu.edu"))])
+ (metronome . [(20230515 1850) ((emacs (25 1))) "The missing metronome for GNU Emacs" tar ((:url . "https://git.sr.ht/~jagrg/metronome") (:commit . "4811b54d800d1bb69fd501ffeab3adf86978362d") (:revdesc . "4811b54d800d") (:authors ("Jonathan Gregory" . "jgrgatautisticidotorg")) (:maintainers ("Jonathan Gregory" . "jgrgatautisticidotorg")) (:maintainer "Jonathan Gregory" . "jgrgatautisticidotorg"))])
+ (mew . [(20260824 19) nil "Messaging in the Emacs World" tar ((:url . "https://github.com/kazu-yamamoto/Mew") (:commit . "97457777e245f94a5a325f938d0e91b5310431fe") (:revdesc . "97457777e245"))])
+ (mexican-holidays . [(20210604 1421) nil "Mexico holidays for Emacs calendar" tar ((:url . "https://github.com/sggutier/mexican-holidays") (:commit . "8e28907ea69f2c0ed9aad9f3b99664ca147379d0") (:revdesc . "8e28907ea69f") (:keywords "calendar") (:authors ("Saúl Gutiérrez" . "me@sggc.me")) (:maintainers ("Saúl Gutiérrez" . "me@sggc.me")) (:maintainer "Saúl Gutiérrez" . "me@sggc.me"))])
+ (meyvn . [(20260611 354) ((emacs (28 1)) (cider (0 23)) (s (1 12)) (dash (2 17)) (parseedn (1 1 0)) (parseclj (1 1 0)) (geiser (0 12))) "Meyvn client" tar ((:url . "https://github.com/danielsz/meyvn-el") (:commit . "48c12b8d7d79c1b35d54d195d1ce4c7113ef5215") (:revdesc . "48c12b8d7d79") (:authors ("Daniel Szmulewicz" . "daniel.szmulewicz@gmail.com")) (:maintainers ("Daniel Szmulewicz" . "daniel.szmulewicz@gmail.com")) (:maintainer "Daniel Szmulewicz" . "daniel.szmulewicz@gmail.com"))])
+ (mgmtconfig-mode . [(20260623 203) ((emacs (24 3))) "Mgmt configuration management language" tar ((:url . "https://github.com/purpleidea/mgmt/misc/emacs") (:commit . "0f7ad93cd17e5251c6ec112fa6ff4272499b430a") (:revdesc . "0f7ad93cd17e") (:keywords "languages") (:authors ("Peter Oliver" . "mgmtconfig@mavit.org.uk")) (:maintainers ("Mgmt contributors" . "https://github.com/purpleidea/mgmt")) (:maintainer "Mgmt contributors" . "https://github.com/purpleidea/mgmt"))])
+ (mhc . [(20250904 940) ((calfw (20150703))) "Message Harmonized Calendaring system" tar ((:url . "http://www.quickhack.net/mhc") (:commit . "2e5e6260363744f124bd0ca22ac7d5962e32fd87") (:revdesc . "2e5e62603637") (:keywords "calendar") (:authors ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainers ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainer "Yoshinari Nomura" . "nom@quickhack.net"))])
+ (miasma-theme . [(20260124 2048) nil "Miasma: color theme inspired by the woods" tar ((:url . "https://github.com/daut/miasma-theme.el") (:commit . "313678cfe8cb386f2240ed62d91495bb65e1fc2b") (:revdesc . "313678cfe8cb"))])
+ (mic . [(20240806 1655) ((emacs (26 1))) "Minimal and combinable configuration manager" tar ((:url . "https://github.com/ROCKTAKEY/mic") (:commit . "f552ddf397e899e9c2b96ef4e56a08cc8804a1c5") (:revdesc . "f552ddf397e8") (:keywords "convenience") (:authors ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "ROCKTAKEY" . "rocktakey@gmail.com"))])
+ (mic-paren . [(20170731 1907) nil "Advanced highlighting of matching parentheses" tar ((:url . "https://github.com/emacsattic/mic-paren") (:commit . "d0410c7d805c9aaf51a1bcefaaef092bed5824c4") (:revdesc . "d0410c7d805c") (:keywords "languages" "faces" "parenthesis" "matching") (:authors ("Mikael Sjödin" . "(mic@docs.uu.se)") ("Klaus Berndl" . "berndl@sdm.de") ("Jonathan Kotta" . "jpkotta@gmail.com")))])
+ (micgoline . [(20160415 326) ((emacs (24 3)) (powerline (2 3))) "Powerline mode, color schemes from microsoft and google's logo" tar ((:url . "https://github.com/yzprofile/micgoline") (:commit . "e3e2effe4846175a3b52b4092c0c134ced5978d8") (:revdesc . "e3e2effe4846") (:keywords "mode-line" "powerline" "theme") (:authors ("yzprofile" . "yzprofiles@gmail.com")) (:maintainers ("yzprofile" . "yzprofiles@gmail.com")) (:maintainer "yzprofile" . "yzprofiles@gmail.com"))])
+ (micromamba . [(20250705 2025) ((emacs (27 1)) (pythonic (0 1 0))) "A library for working with micromamba environments" tar ((:url . "https://github.com/SqrtMinusOne/micromamba.el") (:commit . "f0cc31ea2e3d64e1055a8c63700f373a389dc4c0") (:revdesc . "f0cc31ea2e3d") (:authors ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainers ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainer "Korytov Pavel" . "thexcloud@gmail.com"))])
+ (migemo . [(20250616 309) ((emacs (25))) "Japanese incremental search through dynamic pattern expansion" tar ((:url . "https://github.com/emacs-jp/migemo") (:commit . "c0d84b4092ddade01110ba875559bfd454862ac2") (:revdesc . "c0d84b4092dd") (:authors ("Satoru Takabayashi" . "satoru-t@is.aist-nara.ac.jp")) (:maintainers ("Satoru Takabayashi" . "satoru-t@is.aist-nara.ac.jp")) (:maintainer "Satoru Takabayashi" . "satoru-t@is.aist-nara.ac.jp"))])
+ (milkode . [(20140927 529) nil "Command line search and direct jump with Milkode" tar ((:url . "https://github.com/ongaeshi/emacs-milkode") (:commit . "ba97e2aeefa1d9d0b3835bf08edd0de248b0c513") (:revdesc . "ba97e2aeefa1") (:keywords "milkode" "search" "grep" "jump" "keyword"))])
+ (mimetypes . [(20201115 1605) ((emacs (25 1))) "Guess a file's mimetype by extension" tar ((:url . "https://github.com/cniles/emacs-mimetypes") (:commit . "1663054ce266ed25e47ec707c19f619d33225903") (:revdesc . "1663054ce266") (:authors ("Craig Niles" . "niles.catgmail.com")) (:maintainers ("Craig Niles" . "niles.catgmail.com")) (:maintainer "Craig Niles" . "niles.catgmail.com"))])
+ (mindstream . [(20260614 1629) ((emacs (28 1))) "Start writing, stay focused, don't worry" tar ((:url . "https://github.com/countvajhula/mindstream") (:commit . "0b7a2889e8de419d90a3eaa137c82febe014fda6") (:revdesc . "0b7a2889e8de") (:keywords "convenience" "files" "languages" "outlines" "tools" "vc" "wp") (:authors ("Siddhartha Kasivajhula" . "sid@countvajhula.com")) (:maintainers ("Siddhartha Kasivajhula" . "sid@countvajhula.com")) (:maintainer "Siddhartha Kasivajhula" . "sid@countvajhula.com"))])
+ (minesweeper . [(20200416 2342) nil "Play minesweeper in Emacs" tar ((:url . "https://hg.sr.ht/~zck/minesweeper") (:commit . "d4248e3c9b3e9e7277cb9e6d081330611898f334") (:revdesc . "d4248e3c9b3e") (:keywords "game" "fun" "minesweeper" "inane" "diversion") (:authors ("Zachary Kanfer" . "zkanfer@gmail.com")) (:maintainers ("Zachary Kanfer" . "zkanfer@gmail.com")) (:maintainer "Zachary Kanfer" . "zkanfer@gmail.com"))])
+ (mingus . [(20230518 1726) ((libmpdee (2 2))) "MPD Interface" tar ((:url . "https://github.com/pft/mingus") (:commit . "3fa9b95552eb062eb245321abb7f442c458618dc") (:revdesc . "3fa9b95552eb") (:keywords "multimedia" "elisp" "music" "mpd") (:authors ("Niels Giesen" . "pfton#emacs")) (:maintainers ("Niels Giesen" . "pfton#emacs")) (:maintainer "Niels Giesen" . "pfton#emacs"))])
+ (mini-echo . [(20260225 1510) ((emacs (29 1)) (hide-mode-line (1 0 3))) "Echo buffer status in minibuffer window" tar ((:url . "https://github.com/eki3z/mini-echo.el") (:commit . "d5e5ab763184d0eac2b3dc72e1aac4a7b2e6762f") (:revdesc . "d5e5ab763184") (:keywords "frames") (:authors ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainers ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainer "Eki Zhang" . "liuyinz95@gmail.com"))])
+ (mini-frame . [(20260619 549) ((emacs (26 1))) "Show minibuffer in child frame on read-from-minibuffer" tar ((:url . "https://github.com/muffinmad/emacs-mini-frame") (:commit . "066af90bb2c9a52ff0bfbcdb25539e1b92b68586") (:revdesc . "066af90bb2c9") (:keywords "frames") (:authors ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainers ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainer "Andrii Kolomoiets" . "andreyk.mad@gmail.com"))])
+ (mini-header-line . [(20170621 1221) ((emacs (24 4))) "A minimal header-line" tar ((:url . "https://github.com/ksjogo/mini-header-line") (:commit . "73b6724e0a26c4528d93768191c8aa59e6bce2e5") (:revdesc . "73b6724e0a26") (:keywords "header-line" "mode-line"))])
+ (mini-modeline . [(20230306 1521) ((emacs (25 1)) (dash (2 12 0))) "Display modeline in minibuffer" tar ((:url . "https://github.com/kiennq/emacs-mini-modeline") (:commit . "86e753b6c38a06b0fc80d7560aa6a25245fd4d38") (:revdesc . "86e753b6c38a") (:keywords "convenience" "tools") (:authors ("Kien Nguyen" . "kien.n.quang@gmail.com")) (:maintainers ("Kien Nguyen" . "kien.n.quang@gmail.com")) (:maintainer "Kien Nguyen" . "kien.n.quang@gmail.com"))])
+ (minibuf-isearch . [(20151226 1943) nil "Incremental search on minibuffer history" tar ((:url . "https://github.com/knagano/minibuf-isearch") (:commit . "2846c6ac369ee623dad4cd3c8a7a6d9078965516") (:revdesc . "2846c6ac369e") (:keywords "minibuffer" "history" "incremental search") (:authors ("Keiichiro Nagano" . "knagano@sodan.org") ("Hideyuki SHIRAI" . "shirai@meadowy.org")) (:maintainers ("Keiichiro Nagano" . "knagano@sodan.org") ("Hideyuki SHIRAI" . "shirai@meadowy.org")) (:maintainer "Keiichiro Nagano" . "knagano@sodan.org"))])
+ (minibuffer-complete-cycle . [(20130813 1645) nil "Cycle through the *Completions* buffer" tar ((:url . "https://github.com/knu/minibuffer-complete-cycle") (:commit . "3df80135887d0169e02294a948711f6dfeca4a6f") (:revdesc . "3df80135887d") (:keywords "completion") (:authors ("Akinori MUSHA" . "knu@iDaemons.org") ("Kevin Rodgers" . "ihs_4664@yahoo.com")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (minibuffer-cua . [(20130906 1134) nil "Make CUA mode's S-up/S-down work in minibuffer" tar ((:url . "https://github.com/knu/minibuffer-cua.el") (:commit . "adc4979a64f8b36e05960e9afa0746dfa9e2e4c7") (:revdesc . "adc4979a64f8") (:keywords "completion" "editing") (:authors ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (minibuffer-frame . [(20260826 804) ((emacs (28 1))) "Minibuffer in centered child frame" tar ((:url . "https://github.com/zHaOdANiuu/minibuffer-frame") (:commit . "b76229d0b69a0954cc4cf47103c12c8985be6e97") (:revdesc . "b76229d0b69a") (:keywords "convenience" "minibuffer" "child-frame") (:authors ("Daniu Zhao" . "zhaodaniu1@gmail.com")) (:maintainers ("Daniu Zhao" . "zhaodaniu1@gmail.com")) (:maintainer "Daniu Zhao" . "zhaodaniu1@gmail.com"))])
+ (minibuffer-modifier-keys . [(20210823 713) ((emacs (24 3))) "Use spacebar as a modifier key in the minibuffer" tar ((:url . "https://github.com/SpringHan/minibuffer-modifier-keys.git") (:commit . "944cdc01049f7e4b563675495f4d27cb018ca2f0") (:revdesc . "944cdc01049f") (:keywords "tools"))])
+ (miniedit . [(20100419 1745) nil "Enhanced editing for minibuffer fields" tar ((:url . "https://github.com/emacsorphanage/miniedit") (:commit . "e12bf659c3eb92dd8a4cb77642dc0865c54667a3") (:revdesc . "e12bf659c3eb"))])
+ (minimal-dashboard . [(20260710 1120) ((emacs (27 1))) "A very minimal dashboard plugin" tar ((:url . "https://github.com/dheerajshenoy/minimal-dashboard.el") (:commit . "260a074d44eaa9e49576dca24c09cca54f1e193d") (:revdesc . "260a074d44ea") (:keywords "startup" "screen" "tools" "dashboard") (:authors ("Dheeraj Vittal Shenoy" . "dheerajshenoy22@gmail.com")) (:maintainers ("Dheeraj Vittal Shenoy" . "dheerajshenoy22@gmail.com")) (:maintainer "Dheeraj Vittal Shenoy" . "dheerajshenoy22@gmail.com"))])
+ (minimal-session-saver . [(20250228 1021) nil "Very lean session saver" tar ((:url . "https://github.com/rolandwalker/minimal-session-saver") (:commit . "1146d071c370bc3de33538e2d20172a9cca29ba2") (:revdesc . "1146d071c370") (:keywords "tools" "frames" "project") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (minimal-theme . [(20250921 2102) nil "A light/dark minimalistic Emacs 24 theme" tar ((:url . "https://github.com/nullvec/minimal-theme") (:commit . "4382db5c4afc3beab0a356f8867bf480bddc5273") (:revdesc . "4382db5c4afc") (:keywords "color" "theme" "minimal") (:authors ("A. Hdez" . "trefoil_chilled_7k@icloud.com")) (:maintainers ("A. Hdez" . "trefoil_chilled_7k@icloud.com")) (:maintainer "A. Hdez" . "trefoil_chilled_7k@icloud.com"))])
+ (minions . [(20260601 1513) ((emacs (28 1)) (compat (31 0)) (seq (2 24))) "A minor-mode menu for the mode line" tar ((:url . "https://github.com/tarsius/minions") (:commit . "7ec2810c9b3019f8e379022b0ca7ce61e9e7c810") (:revdesc . "7ec2810c9b30") (:keywords "convenience") (:authors ("Jonas Bernoulli" . "emacs.minions@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.minions@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.minions@jonas.bernoulli.dev"))])
+ (minitest . [(20260622 2214) ((dash (1 0 0)) (emacs (24 3))) "An minor mode for ruby minitest files" tar ((:url . "https://git.sr.ht/~shoshin/minitest-emacs") (:commit . "596cc885d3f4898d85c78d1686b22c379fe2acae") (:revdesc . "596cc885d3f4"))])
+ (minizinc-mode . [(20180201 1450) ((emacs (24 1))) "Major mode for MiniZinc code" tar ((:url . "https://github.com/m00nlight/minizinc-mode") (:commit . "2512521ba7f8e263a06db88df663fc6b3cca7e16") (:revdesc . "2512521ba7f8") (:keywords "languages" "minizinc") (:authors ("Yushi Wang" . "dot_wangyushi@yeah.net")) (:maintainers ("Yushi Wang" . "dot_wangyushi@yeah.net")) (:maintainer "Yushi Wang" . "dot_wangyushi@yeah.net"))])
+ (minizinc-ts-mode . [(20250831 753) ((emacs (29 1))) "Major mode for the MiniZinc constraint modeling language" tar ((:url . "https://github.com/AjaiKN/minizinc-ts-mode") (:commit . "c449cde23b8101c589a4cce20b01ea1933978be0") (:revdesc . "c449cde23b81") (:keywords "languages") (:authors ("Ajai Khatri Nelson" . "emacs@ajai.dev")) (:maintainers ("Ajai Khatri Nelson" . "emacs@ajai.dev")) (:maintainer "Ajai Khatri Nelson" . "emacs@ajai.dev"))])
+ (minor-mode-hack . [(20170926 34) nil "Change priority of minor-mode keymaps" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/minor-mode-hack.el") (:commit . "c3aa957602c924c01fe07d48d191b8616fb3696a") (:revdesc . "c3aa957602c9") (:keywords "lisp") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (minsk-theme . [(20260612 845) ((emacs (24))) "Minsk, a theme in deep muted greens" tar ((:url . "https://codeberg.org/loj/minsk-theme") (:commit . "7d1259165a1b7eaecc97d76fc288fa56f8736bef") (:revdesc . "7d1259165a1b") (:keywords "theme" "faces") (:authors ("June Lo" . "loh.ka.tsun@gmail.com")) (:maintainers ("June Lo" . "loh.ka.tsun@gmail.com")) (:maintainer "June Lo" . "loh.ka.tsun@gmail.com"))])
+ (mint-mode . [(20221031 411) ((emacs (25 1))) "Major mode for the Mint programming language" tar ((:url . "https://github.com/creatorrr/emacs-mint-mode") (:commit . "7bb0f9946f5833eada199e880fdc4efa6df09e0b") (:revdesc . "7bb0f9946f58") (:keywords "mint" "languages" "processes" "convenience" "tools" "files") (:authors ("Diwank Tomer" . "singh@diwank.name")) (:maintainers ("jgart" . "jgart@dismail.de")) (:maintainer "jgart" . "jgart@dismail.de"))])
+ (minuet . [(20260814 654) ((emacs (29)) (plz (0 9)) (dash (2 19 1))) "Code completion using LLM" tar ((:url . "https://github.com/milanglacier/minuet-ai.el") (:commit . "2c566377d580ee678d661e0638c916776f62a424") (:revdesc . "2c566377d580") (:authors ("Milan Glacier" . "dev@milanglacier.com")) (:maintainers ("Milan Glacier" . "dev@milanglacier.com")) (:maintainer "Milan Glacier" . "dev@milanglacier.com"))])
+ (mip-mode . [(20151127 617) nil "Virtual projects for emacs" tar ((:url . "https://gitlab.com/gaudecker/mip-mode") (:commit . "7c88c383b4c7ed0a4c1dc397735f365c1fcb461c") (:revdesc . "7c88c383b4c7") (:keywords "workspaces" "workspace" "project" "projects" "mip-mode") (:authors ("Eeli Reilin" . "gaudecker@fea.st")) (:maintainers ("Eeli Reilin" . "gaudecker@fea.st")) (:maintainer "Eeli Reilin" . "gaudecker@fea.st"))])
+ (mips-mode . [(20220608 1204) ((emacs (25 1))) "Major-mode for MIPS assembly" tar ((:url . "https://github.com/hlissner/emacs-mips-mode") (:commit . "98795cdc81979821ac35d9f94ce354cd99780c67") (:revdesc . "98795cdc8197") (:keywords "languages" "mips" "assembly") (:authors ("Henrik Lissner" . "http://github/hlissner")) (:maintainers ("Henrik Lissner" . "contact@henrik.io")) (:maintainer "Henrik Lissner" . "contact@henrik.io"))])
+ (mise . [(20251229 1550) ((emacs (29 1)) (inheritenv (0 2))) "Support for `mise' cli" tar ((:url . "https://github.com/eki3z/mise.el") (:commit . "849c44b36594c80c57a555c5671dd1a5a83d3184") (:revdesc . "849c44b36594") (:keywords "tools" "processes") (:authors ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainers ("Eki Zhang" . "liuyinz95@gmail.com")) (:maintainer "Eki Zhang" . "liuyinz95@gmail.com"))])
+ (mise-tasks . [(20260703 656) ((emacs (28 1))) "Run mise tasks and highlight lockfiles" tar ((:url . "https://github.com/klochowicz/mise-tasks.el") (:commit . "76c762bd920bf1e2faac631ac990c4e2e798d321") (:revdesc . "76c762bd920b") (:keywords "tools" "processes" "mise") (:authors ("Mariusz Klochowicz" . "mariusz@klochowicz.com")) (:maintainers ("Mariusz Klochowicz" . "mariusz@klochowicz.com")) (:maintainer "Mariusz Klochowicz" . "mariusz@klochowicz.com"))])
+ (mistty . [(20260715 1804) ((emacs (29 1))) "Shell/Comint alternative based on term.el" tar ((:url . "https://github.com/szermatt/mistty") (:commit . "879abed83287ab79b6d3dbdab7df2bf3fc68769a") (:revdesc . "879abed83287") (:keywords "convenience" "unix") (:authors ("Stephane Zermatten" . "szermatt@gmx.net")) (:maintainers ("Stephane Zermatten" . "szermatt@gmx.net")) (:maintainer "Stephane Zermatten" . "szermatt@gmx.net"))])
+ (mix . [(20240122 720) ((emacs (25 1))) "Mix Major Mode. Build Elixir using Mix" tar ((:url . "https://github.com/ayrat555/mix.el") (:commit . "16cc69cbf919769c191b1c49c1cab324fd0682a9") (:revdesc . "16cc69cbf919") (:keywords "tools") (:authors ("Ayrat Badykov" . "ayratin555@gmail.com")) (:maintainers ("Ayrat Badykov" . "ayratin555@gmail.com")) (:maintainer "Ayrat Badykov" . "ayratin555@gmail.com"))])
+ (mixed-pitch . [(20210304 1900) ((emacs (24 3))) "Use a variable pitch, keeping fixed pitch where it's sensible" tar ((:url . "https://gitlab.com/jabranham/mixed-pitch") (:commit . "519e05f74825abf04b7d2e0e38ec040d013a125a") (:revdesc . "519e05f74825") (:authors ("J. Alexander Branham" . "branham@utexas.edu")) (:maintainers ("J. Alexander Branham" . "branham@utexas.edu")) (:maintainer "J. Alexander Branham" . "branham@utexas.edu"))])
+ (mkdown . [(20140517 1418) ((markdown-mode (2 0))) "Pretty Markdown previews based on mkdown.com" tar ((:url . "https://github.com/ajtulloch/mkdown.el") (:commit . "8e23de82719af6c5b53b52b3308a02b3a1fb872e") (:revdesc . "8e23de82719a") (:keywords "markdown"))])
+ (mlscroll . [(20260720 1621) ((emacs (27 1))) "A scroll bar for the modeline" tar ((:url . "https://github.com/jdtsmith/mlscroll") (:commit . "5a7cfed411cc5f8d8894dcbd989fd5c81ebcf8a8") (:revdesc . "5a7cfed411cc") (:keywords "convenience"))])
+ (mmm-jinja2 . [(20170313 1420) ((mmm-mode (0 5 4))) "MMM submode class for Jinja2 Templates" tar ((:url . "https://github.com/glynnforrest/mmm-jinja2") (:commit . "c8cb763174fa2fb61b9a0e5e0ff8cb0210f8492f") (:revdesc . "c8cb763174fa") (:authors ("Ben Hayden" . "hayden767@gmail.com")) (:maintainers ("Ben Hayden" . "hayden767@gmail.com")) (:maintainer "Ben Hayden" . "hayden767@gmail.com"))])
+ (mmm-mode . [(20240222 428) ((emacs (25 1)) (cl-lib (0 2))) "Allow Multiple Major Modes in a buffer" tar ((:url . "https://github.com/dgutov/mmm-mode") (:commit . "b1f5c7dbdc405e6e10d9ddd99a43a6b2ad61b176") (:revdesc . "b1f5c7dbdc40") (:keywords "convenience" "faces" "languages" "tools") (:authors ("Michael Abraham Shulman" . "viritrilbia@gmail.com")) (:maintainers ("Dmitry Gutov" . "dmitry@gutov.dev")) (:maintainer "Dmitry Gutov" . "dmitry@gutov.dev"))])
+ (mmt . [(20230606 1513) ((emacs (24 5))) "Missing macro tools for Emacs Lisp" tar ((:url . "https://github.com/mrkkrp/mmt") (:commit . "2a24463eeb72ebef100e89977ebfb88f5f220217") (:revdesc . "2a24463eeb72") (:keywords "macro" "lisp" "extensions") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (mo-git-blame . [(20160129 1759) nil "An interactive, iterative 'git blame' mode for Emacs" tar ((:url . "https://codeberg.org/mbunkus/mo-git-blame") (:commit . "254a675eb794cdbbdef9fa2b4b7bb510b70089c0") (:revdesc . "254a675eb794") (:keywords "tools") (:authors ("Moritz Bunkus" . "moritz@bunkus.org")) (:maintainers ("Moritz Bunkus" . "moritz@bunkus.org")) (:maintainer "Moritz Bunkus" . "moritz@bunkus.org"))])
+ (mo-vi-ment-mode . [(20181217 206) nil "Provide vi-like cursor movement that's easy on the fingers" tar ((:url . "https://github.com/AjayMT/mo-vi-ment") (:commit . "e8b525ffc5faa31d36ecc5496b40f0f5c3603c08") (:revdesc . "e8b525ffc5fa") (:keywords "convenience") (:authors ("Ajay MT" . "ajay.tatachar@gmail.com")) (:maintainers ("Ajay MT" . "ajay.tatachar@gmail.com")) (:maintainer "Ajay MT" . "ajay.tatachar@gmail.com"))])
+ (mobdebug-mode . [(20140110 346) ((lua-mode (20130419)) (emacs (24))) "Major mode for MobDebug" tar ((:url . "https://github.com/deftsp/mobdebug-mode") (:commit . "e1d483bc4e341c762bc5c0a8c52306a8d01ea0da") (:revdesc . "e1d483bc4e34") (:authors ("Shihpin Tseng" . "deftsp@gmail.com")) (:maintainers ("Shihpin Tseng" . "deftsp@gmail.com")) (:maintainer "Shihpin Tseng" . "deftsp@gmail.com"))])
+ (moc . [(20241229 1056) ((emacs (29 4)) (hide-mode-line (1 0 3)) (transient (0 7 2))) "Master of Ceremonies" tar ((:url . "https://github.com/positron-solutions/moc") (:commit . "84acdd7d74cfd3b35637b84d49c53db203f657ce") (:revdesc . "84acdd7d74cf") (:keywords "convenience" "outline") (:authors ("Positron Solutions" . "contact@positron.solutions")) (:maintainers ("Positron Solutions" . "contact@positron.solutions")) (:maintainer "Positron Solutions" . "contact@positron.solutions"))])
+ (mocha . [(20200729 1130) ((js2-mode (20150909)) (f (0 18))) "Run Mocha or Jasmine tests" tar ((:url . "https://github.com/scottaj/mocha.el") (:commit . "6a72fa20e7be6e55c09b1bc9887ee09c5df28e45") (:revdesc . "6a72fa20e7be") (:keywords "javascript" "mocha" "jasmine"))])
+ (mocha-snippets . [(20190417 1931) ((yasnippet (0 8 0))) "Yasnippets for the Mocha JS Testing Framework" tar ((:url . "https://github.com/cowboyd/mocha-snippets.el") (:commit . "361a3809f755577406e109b9e44d473dfa7c08e0") (:revdesc . "361a3809f755") (:keywords "test" "javascript") (:authors ("Charles Lowell" . "cowboyd@frontside.io")) (:maintainers ("Charles Lowell" . "cowboyd@frontside.io")) (:maintainer "Charles Lowell" . "cowboyd@frontside.io"))])
+ (mock-fs . [(20260708 2247) ((emacs (27 1))) "Virtual filesystem for Emacs Lisp tests" tar ((:url . "https://codeberg.org/Trevoke/mock-fs.el") (:commit . "b15c34281d076d6aa1ea5820368307694952e2ce") (:revdesc . "b15c34281d07") (:keywords "testing" "files"))])
+ (mocker . [(20260204 1045) ((emacs (25 1))) "Mocking framework for emacs" tar ((:url . "https://github.com/sigma/mocker.el") (:commit . "462e4aa140db1f0589ab71dd07ee509e5425e2ff") (:revdesc . "462e4aa140db") (:keywords "lisp" "testing") (:authors ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainers ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainer "Yann Hodique" . "yann.hodique@gmail.com"))])
+ (modaled . [(20250124 2004) ((emacs (25 1))) "Build your own minor modes for modal editing" tar ((:url . "https://github.com/DCsunset/modaled") (:commit . "d9ec83a00317ae7ed69a5d7b427c968495761e5c") (:revdesc . "d9ec83a00317") (:keywords "convenience" "modal-editing"))])
+ (modalka . [(20260802 936) ((emacs (24 4))) "Modal editing your way" tar ((:url . "https://github.com/mrkkrp/modalka") (:commit . "85d0901645982238341ba94b7c14439825dd95b5") (:revdesc . "85d090164598") (:keywords "convenience") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (mode-icons . [(20230911 20) ((emacs (24)) (cl-lib (0 5))) "Show icons for modes" tar ((:url . "http://ryuslash.org/projects/mode-icons.html") (:commit . "931250e8f9f1106e7ace6247989867c5e17fc9cc") (:revdesc . "931250e8f9f1") (:keywords "multimedia") (:authors ("Tom Willemse" . "tom@ryuslash.org")) (:maintainers ("Tom Willemse" . "tom@ryuslash.org")) (:maintainer "Tom Willemse" . "tom@ryuslash.org"))])
+ (mode-line-bell . [(20260702 1209) nil "Flash the mode line instead of ringing the bell" tar ((:url . "https://github.com/purcell/mode-line-bell") (:commit . "b888963bf390b6e1d132b72b8a14041bd7afae4b") (:revdesc . "b888963bf390") (:keywords "convenience") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (mode-line-debug . [(20260601 1514) ((emacs (28 1)) (compat (31 0))) "Show status of debug-on-error in mode-line" tar ((:url . "https://github.com/tarsius/mode-line-debug") (:commit . "3e1b50bc666beaf6441f652608bf7f48b74e80df") (:revdesc . "3e1b50bc666b") (:keywords "convenience" "lisp") (:authors ("Jonas Bernoulli" . "emacs.mode-line-debug@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.mode-line-debug@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.mode-line-debug@jonas.bernoulli.dev"))])
+ (mode-line-idle . [(20260813 307) ((emacs (28 1))) "Evaluate mode line content when idle" tar ((:url . "https://codeberg.org/ideasman42/emacs-mode-line-idle") (:commit . "0db11cad15c320d189f2552a7045489b90d862c7") (:revdesc . "0db11cad15c3") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (mode-line-keyboard . [(20250303 2002) ((emacs (26 0))) "Keyboard in mode line for touch screens" tar ((:url . "https://github.com/Lindydancer/mode-line-keyboard") (:commit . "e5613ccd81bd58161efb53ebeaee7bd4dea197ee") (:revdesc . "e5613ccd81bd") (:keywords "convenience"))])
+ (modelica-mode . [(20230508 1020) ((emacs (27 1))) "Major mode for editing Modelica files" tar ((:url . "https://github.com/modelica-tools/modelica-mode") (:commit . "7064a4abdae68fc074a85a2e7c159e067c44c0e1") (:revdesc . "7064a4abdae6") (:keywords "languages" "continuous system modeling"))])
+ (modern-cpp-font-lock . [(20210405 1155) nil "Font-locking for \"Modern C++\"" tar ((:url . "https://github.com/ludwigpacifici/modern-cpp-font-lock") (:commit . "43c6b68ff58fccdf9deef11674a172e4eaa8455c") (:revdesc . "43c6b68ff58f") (:keywords "languages" "c++" "cpp" "font-lock") (:authors ("Ludwig PACIFICI" . "ludwig@lud.cc")) (:maintainers ("Ludwig PACIFICI" . "ludwig@lud.cc")) (:maintainer "Ludwig PACIFICI" . "ludwig@lud.cc"))])
+ (modern-fringes . [(20220401 202) nil "Replaces default fringe bitmaps with better looking ones" tar ((:url . "https://github.com/specialbomb/emacs-modern-fringes") (:commit . "98473694a33922cfdddb18b4791028e4854b53b5") (:revdesc . "98473694a339") (:keywords "themes" "fringes" "convenience") (:authors ("Quen Jankosky" . "quen.jankosky@gmail.com")) (:maintainers ("Quen Jankosky" . "quen.jankosky@gmail.com")) (:maintainer "Quen Jankosky" . "quen.jankosky@gmail.com"))])
+ (modern-sh . [(20250320 858) ((emacs (25 1)) (hydra (0 15 0)) (eval-in-repl (0 9 7))) "Minor mode for editing shell script" tar ((:url . "https://github.com/damon-kwok/modern-sh") (:commit . "65bc75828f7d13af713f1a728c038e2915944cd3") (:revdesc . "65bc75828f7d") (:keywords "languages" "programming") (:authors ("Damon Kwok" . "damon-kwok@outlook.com")) (:maintainers ("Damon Kwok" . "damon-kwok@outlook.com")) (:maintainer "Damon Kwok" . "damon-kwok@outlook.com"))])
+ (modtime-skip-mode . [(20140128 2201) nil "Minor mode for disabling modtime and supersession checks on files" tar ((:url . "http://www.github.com/jordonbiondo/modtime-skip-mode") (:commit . "c0e49523aa26b2263a8693691ac775988015f592") (:revdesc . "c0e49523aa26") (:authors ("Jordon Biondo" . "biondoj@mail.gvsu.edu")) (:maintainers ("Jordon Biondo" . "biondoj@mail.gvsu.edu")) (:maintainer "Jordon Biondo" . "biondoj@mail.gvsu.edu"))])
+ (modular-config . [(20210726 1614) ((emacs (25 1))) "Organize your config into small and loadable modules" tar ((:url . "https://github.com/SidharthArya/modular-config.el") (:commit . "043907d96efff70dfaea1e721de90bd35970e8bd") (:revdesc . "043907d96eff") (:keywords "startup" "lisp" "tools") (:authors ("Sidharth Arya" . "sidhartharya10@gmail.com")) (:maintainers ("Sidharth Arya" . "sidhartharya10@gmail.com")) (:maintainer "Sidharth Arya" . "sidhartharya10@gmail.com"))])
+ (modus-ewal-theme . [(20260715 906) ((emacs (25 1)) (modus-themes (5 2 0)) (ewal (0 2 1))) "Modus theme that uses pywal colors powered by ewal" tar ((:url . "https://github.com/deadendpl/modus-ewal-theme") (:commit . "75f4cbe730d16407f0251d3c45297bb83d31f6db") (:revdesc . "75f4cbe730d1") (:keywords "faces" "theme") (:authors ("Oliwier Czerwiński" . "oliwier.czerwi@proton.me")) (:maintainers ("Oliwier Czerwiński" . "oliwier.czerwi@proton.me")) (:maintainer "Oliwier Czerwiński" . "oliwier.czerwi@proton.me"))])
+ (modus-themes . [(20260825 724) ((emacs (28 1))) "Elegant, highly legible and customizable themes" tar ((:url . "https://github.com/protesilaos/modus-themes") (:commit . "b86cace43523b5809ac5d62ca5ab01e9eb2727bc") (:revdesc . "b86cace43523") (:keywords "faces" "theme" "accessibility") (:authors ("Protesilaos" . "info@protesilaos.com")) (:maintainers ("Protesilaos" . "info@protesilaos.com")) (:maintainer "Protesilaos" . "info@protesilaos.com"))])
+ (moe-theme . [(20260819 1554) nil "A colorful eye-candy theme. Moe, moe, kyun!" tar ((:url . "https://github.com/kuanyui/moe-theme.el") (:commit . "6a5c85c89855ff1fba6aa57d68346b9b7bb7cec0") (:revdesc . "6a5c85c89855") (:keywords "themes") (:authors ("kuanyui" . "azazabc123@gmail.com")) (:maintainers ("kuanyui" . "azazabc123@gmail.com")) (:maintainer "kuanyui" . "azazabc123@gmail.com"))])
+ (molar-mass . [(20220922 1752) ((emacs (24 3))) "Calculates molar mass of a molecule" tar ((:url . "https://github.com/sergiruiztrepat/molar-mass.el") (:commit . "c3b686c4b621b45fa4b17857b4934eb4487d74f5") (:revdesc . "c3b686c4b621") (:keywords "convenience" "chemistry"))])
+ (molecule . [(20180527 743) ((emacs (25 1))) "Simple wrapper for molecule" tar ((:url . "https://git.daemons.it/drymer/molecule.el") (:commit . "2ef72b81d9aa24ea782b71a061a3abdad6cae162") (:revdesc . "2ef72b81d9aa") (:keywords ":" "languages" "terminals") (:authors ("drymer" . "drymer[AT]autistici.org")) (:maintainers ("drymer" . "drymer[AT]autistici.org")) (:maintainer "drymer" . "drymer[AT]autistici.org"))])
+ (molokai-theme . [(20220106 1520) nil "Molokai theme with Emacs theme engine" tar ((:url . "https://github.com/alloy-d/color-theme-molokai") (:commit . "cc53e997e7eff93b58ad16a376a292c1dd66044b") (:revdesc . "cc53e997e7ef") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (mongo . [(20150315 1219) nil "MongoDB driver for Emacs Lisp" tar ((:url . "https://github.com/emacsorphanage/mongo") (:commit . "595529ddd70ecb9fab8b11daad2c3929941099d6") (:revdesc . "595529ddd70e") (:keywords "convenience") (:authors ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainers ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainer "Tomohiro Matsuyama" . "m2ym.pub@gmail.com"))])
+ (monitor . [(20161018 1144) ((dash (2 13 0))) "Utilities for monitoring expressions" tar ((:url . "https://github.com/guiltydolphin/monitor") (:commit . "63f4643a0ee81616dbb692b8b03bae21df2283e2") (:revdesc . "63f4643a0ee8") (:keywords "lisp" "monitor" "utility") (:authors ("Ben Moon" . "software@guiltydolphin.com")) (:maintainers ("Ben Moon" . "software@guiltydolphin.com")) (:maintainer "Ben Moon" . "software@guiltydolphin.com"))])
+ (monkeytype . [(20210110 513) ((emacs (25 1)) (scrollable-quick-peek (0 1 0))) "Mode for speed typing" tar ((:url . "https://github.com/jpablobr/emacs-monkeytype") (:commit . "0e949d08198c0bd003f1d5c8cdceb7e36bef22f7") (:revdesc . "0e949d08198c") (:keywords "games") (:authors ("Pablo Barrantes" . "xjpablobrx@gmail.com")) (:maintainers ("Pablo Barrantes" . "xjpablobrx@gmail.com")) (:maintainer "Pablo Barrantes" . "xjpablobrx@gmail.com"))])
+ (monky . [(20230222 2153) nil "Control Hg from Emacs" tar ((:url . "https://github.com/ananthakumaran/monky") (:commit . "7046eee5fc9ac625924382cb4a82b0d8efcd9ff0") (:revdesc . "7046eee5fc9a") (:keywords "tools") (:authors ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainers ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainer "Anantha kumaran" . "ananthakumaran@gmail.com"))])
+ (mono-complete . [(20260522 348) ((emacs (29 1))) "Completion suggestions with multiple back-ends" tar ((:url . "https://codeberg.org/ideasman42/emacs-mono-complete") (:commit . "7d3d5656269f290a8ebec772d877d95cc815939b") (:revdesc . "7d3d5656269f") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (monochrome-theme . [(20140326 1050) nil "A dark Emacs 24 theme for your focused hacking sessions" tar ((:url . "https://github.com/fxn/monochrome-theme.el") (:commit . "9cf993670c9e8d198f41d840216e13280585b3e1") (:revdesc . "9cf993670c9e") (:authors ("Xavier Noria" . "fxn@hashref.com")) (:maintainers ("Xavier Noria" . "fxn@hashref.com")) (:maintainer "Xavier Noria" . "fxn@hashref.com"))])
+ (monokai-alt-theme . [(20260303 647) ((emacs (24))) "Theme with a dark background. Based on sublime monokai theme" tar ((:url . "https://github.com/dawidof/emacs-monokai-theme") (:commit . "864ab2c8c32e50f0ec6f1563107152814e4a0e38") (:revdesc . "864ab2c8c32e"))])
+ (monokai-pro-theme . [(20250116 1621) nil "A simple theme based on the Monokai Pro Sublime color schemes" tar ((:url . "https://github.com/belak/emacs-monokai-pro-theme") (:commit . "2c886bbeeb354f5f9da7435b2662f6b1511d17e8") (:revdesc . "2c886bbeeb35") (:authors ("Kaleb Elwert" . "belak@coded.io")) (:maintainers ("Kaleb Elwert" . "belak@coded.io")) (:maintainer "Kaleb Elwert" . "belak@coded.io"))])
+ (monokai-theme . [(20240911 1046) nil "A fruity color theme for Emacs" tar ((:url . "https://github.com/oneKelvinSmith/monokai-emacs") (:commit . "dacd9d8a8867afea3ed76b15a6c997053ff88093") (:revdesc . "dacd9d8a8867") (:authors ("Kelvin Smith" . "oneKelvinSmith@gmail.com")) (:maintainers ("Kelvin Smith" . "oneKelvinSmith@gmail.com")) (:maintainer "Kelvin Smith" . "oneKelvinSmith@gmail.com"))])
+ (monotropic-theme . [(20211116 1328) ((emacs (24))) "Monotropic Theme" tar ((:url . "https://github.com/caffo/monotropic-theme") (:commit . "f32a04b5bfee9cbcce4b223f17228d1142a28211") (:revdesc . "f32a04b5bfee"))])
+ (monroe . [(20220915 1647) nil "Yet another client for nREPL" tar ((:url . "http://www.github.com/sanel/monroe") (:commit . "8f809e4aa0a35ec2d1c880aacf59e6bc317a566f") (:revdesc . "8f809e4aa0a3") (:keywords "languages" "clojure" "nrepl" "lisp") (:authors ("Sanel Zukan" . "sanelz@gmail.com")) (:maintainers ("Sanel Zukan" . "sanelz@gmail.com")) (:maintainer "Sanel Zukan" . "sanelz@gmail.com"))])
+ (mood-line . [(20231210 1309) ((emacs (26 1))) "A minimal mode line inspired by doom-modeline" tar ((:url . "https://gitlab.com/jessieh/mood-line") (:commit . "d1c024fdf9543fbc0101cd2c6e8b248378f591cd") (:revdesc . "d1c024fdf954") (:keywords "mode-line" "faces") (:authors ("Jessie Hildebrandt" . "jessieh.net")) (:maintainers ("Jessie Hildebrandt" . "jessieh.net")) (:maintainer "Jessie Hildebrandt" . "jessieh.net"))])
+ (mood-one-theme . [(20221222 1214) ((emacs (27 1))) "A dark color scheme inspired by the Doom One theme" tar ((:url . "https://gitlab.com/jessieh/mood-one-theme") (:commit . "dfbc81900737d3382a340feeed24d2bcd9bdedb0") (:revdesc . "dfbc81900737") (:keywords "mode-line" "faces") (:authors ("Jessie Hildebrandt" . "jessieh.net")) (:maintainers ("Jessie Hildebrandt" . "jessieh.net")) (:maintainer "Jessie Hildebrandt" . "jessieh.net"))])
+ (moody . [(20260601 1514) ((emacs (28 1)) (compat (31 0))) "Tabs and ribbons for the mode line" tar ((:url . "https://github.com/tarsius/moody") (:commit . "48556e65f37c040a430f123494f517f961ae000c") (:revdesc . "48556e65f37c") (:keywords "faces") (:authors ("Jonas Bernoulli" . "emacs.moody@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.moody@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.moody@jonas.bernoulli.dev"))])
+ (moom . [(20250817 1347) ((emacs (25 1))) "Commands to control frame position and size" tar ((:url . "https://github.com/takaxp/Moom") (:commit . "2683e801d3c7be537ddf8b6af5154c0b86fafeb6") (:revdesc . "2683e801d3c7") (:keywords "frames" "faces" "convenience") (:authors ("Takaaki ISHIKAWA" . "takaxpatieeedotorg")) (:maintainers ("Takaaki ISHIKAWA" . "takaxpatieeedotorg")) (:maintainer "Takaaki ISHIKAWA" . "takaxpatieeedotorg"))])
+ (moonbit-ts-mode . [(20260713 229) ((emacs (30 1))) "MoonBit tree-sitter major mode" tar ((:url . "https://github.com/moonbit-community/moonbit-ts-mode") (:commit . "f8ae31f506571614afea2fcd03532d872afd917b") (:revdesc . "f8ae31f50657") (:keywords "languages" "tree-sitter"))])
+ (moonscript . [(20170831 2226) ((cl-lib (0 5)) (emacs (24))) "Major mode for editing MoonScript code" tar ((:url . "https://github.com/k2052/moonscript-mode") (:commit . "56f90471e2ced2b0a177aed4d8c2f854797e9cc7") (:revdesc . "56f90471e2ce") (:authors (nil . "@GriffinSchneider") (nil . "@k2052") (nil . "@EmacsFodder")) (:maintainers (nil . "@GriffinSchneider") (nil . "@k2052") (nil . "@EmacsFodder")) (:maintainer nil . "@GriffinSchneider"))])
+ (moonshot . [(20210627 2244) ((emacs (25 1)) (cl-lib (0 5)) (f (0 18)) (s (1 11 0)) (projectile (2 0 0)) (counsel (0 11 0)) (realgud (1 5 1)) (seq (2 20)) (levenshtein (1 0))) "Run executable file, debug and build commands on project" tar ((:url . "https://github.com/ageldama/moonshot") (:commit . "ec37a12825888047a90d9ee8131aa4bea348edf7") (:revdesc . "ec37a1282588") (:keywords "convenience" "files" "processes" "tools" "unix") (:authors ("Jong-Hyouk Yun" . "ageldama@gmail.com")) (:maintainers ("Jong-Hyouk Yun" . "ageldama@gmail.com")) (:maintainer "Jong-Hyouk Yun" . "ageldama@gmail.com"))])
+ (morganey-mode . [(20170118 934) ((emacs (24 4))) "Major mode for editing Morganey files" tar ((:url . "https://github.com/morganey-lang/morganey-mode") (:commit . "7e33f1be486f58dfcf02adcbf82ccac47f69bd9b") (:revdesc . "7e33f1be486f") (:authors ("Alexey Kutepov" . "reximkut@gmail.com")) (:maintainers ("Alexey Kutepov" . "reximkut@gmail.com")) (:maintainer "Alexey Kutepov" . "reximkut@gmail.com"))])
+ (morgentau-theme . [(20260106 303) ((emacs (24))) "Tango-based custom theme" tar ((:url . "https://github.com/Melchizedek6809/morgentau-theme") (:commit . "2395b8af83fbec097ef747a23a67305159808efb") (:revdesc . "2395b8af83fb") (:keywords "theme" "dark" "faces"))])
+ (morlock . [(20260601 1518) ((emacs (29 1))) "More font-lock keywords for elisp" tar ((:url . "https://github.com/tarsius/morlock") (:commit . "1fd3cc79b1fa1f69386d6b2fa058e2477d35a4e7") (:revdesc . "1fd3cc79b1fa") (:keywords "convenience") (:authors ("Jonas Bernoulli" . "emacs.morlock@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.morlock@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.morlock@jonas.bernoulli.dev"))])
+ (morrowind-theme . [(20230912 406) ((emacs (24 1))) "Theme" tar ((:url . "https://github.com/samuelbanya/morrowind-theme") (:commit . "f197ef02e96fa3b8a38eca25ba750df7b843e564") (:revdesc . "f197ef02e96f"))])
+ (mos-mode . [(20221209 1353) ((emacs (24 4)) (lsp-mode (8 0 0)) (dap-mode (0 7)) (dash (2 19 1)) (ht (2 3))) "MOS toolkit usage" tar ((:url . "https://github.com/themkat/mos-mode") (:commit . "770f49417e8ad7dbf382c8691f6f689d793b9314") (:revdesc . "770f49417e8a"))])
+ (mosey . [(20180614 1649) ((emacs (24 4))) "Mosey around your buffers" tar ((:url . "https://github.com/alphapapa/mosey.el") (:commit . "2e3ac9d334fa2937ed5267193dfd25d8e1f14dc2") (:revdesc . "2e3ac9d334fa") (:keywords "convenience") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (most-faces . [(20250606 814) ((emacs (24))) "A List of Most Available Faces" tar ((:url . "https://codeberg.org/mekeor/most-faces") (:commit . "6b97ecab10d0a9e6e9faaecac3af543263fe658a") (:revdesc . "6b97ecab10d0") (:keywords "faces") (:authors ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainers ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainer "Mekeor Melire" . "mekeor@posteo.de"))])
+ (most-used-words . [(20200808 1353) ((emacs (24 3))) "Display most used words in buffer" tar ((:url . "https://github.com/udyantw/most-used-words") (:commit . "90c09da92b30c6497e9141f0edfe7842440c4d53") (:revdesc . "90c09da92b30") (:keywords "convenience" "wp") (:authors ("Udyant Wig" . "udyant.wig@gmail.com")) (:maintainers ("Udyant Wig" . "udyant.wig@gmail.com")) (:maintainer "Udyant Wig" . "udyant.wig@gmail.com"))])
+ (mote-mode . [(20160123 29) ((ruby-mode (1 1))) "Mote minor mode" tar ((:url . "http://inkel.github.com/mote-mode/") (:commit . "666c6641addbd3b337a7aa01fd2742ded2f41b83") (:revdesc . "666c6641addb") (:authors ("Leandro López" . "inkel.ar@gmail.com")) (:maintainers ("Leandro López" . "inkel.ar@gmail.com")) (:maintainer "Leandro López" . "inkel.ar@gmail.com"))])
+ (motion-mode . [(20140920 156) ((flymake-easy (0 7)) (flymake-cursor (1 0 2))) "Major mode for RubyMotion enviroment" tar ((:url . "https://github.com/ainame/motion-mode") (:commit . "4c94180e3ecea611a61240a0c0cd48f1032c4a55") (:revdesc . "4c94180e3ece"))])
+ (motion-selection-mode . [(20250204 30) ((emacs (29 3)) (god-mode (2 18 0))) "A minor mode to add a text editing grammar" tar ((:url . "https://github.com/alexispurslane/motion-selection-mode") (:commit . "96b8cbf18beb528f32cabdf77808b8db596f30be") (:revdesc . "96b8cbf18beb") (:keywords "tools") (:authors ("Alexis Purslane" . "alexispurslane@pm.me")) (:maintainers ("Alexis Purslane" . "alexispurslane@pm.me")) (:maintainer "Alexis Purslane" . "alexispurslane@pm.me"))])
+ (move-dup . [(20210127 1938) ((emacs (25 1))) "Eclipse-like moving and duplicating lines or rectangles" tar ((:url . "https://github.com/wyuenho/move-dup") (:commit . "bf2e578b89d7e7bf0b5500d9afcf49ac6ec2dcd1") (:revdesc . "bf2e578b89d7") (:keywords "convenience" "text" "edit") (:authors ("Jimmy Yuen Ho Wong" . "wyuenho@gmail.com")) (:maintainers ("Jimmy Yuen Ho Wong" . "wyuenho@gmail.com")) (:maintainer "Jimmy Yuen Ho Wong" . "wyuenho@gmail.com"))])
+ (move-mode . [(20251224 1152) ((emacs (25 1))) "A major-mode for editing Move language" tar ((:url . "https://github.com/amnn/move-mode") (:commit . "e72e2d5102669b82ba70599fb64e64241d49376d") (:revdesc . "e72e2d510266") (:keywords "languages"))])
+ (move-text . [(20260508 508) nil "Move current line or region with M-up or M-down" tar ((:url . "https://github.com/emacsfodder/move-text") (:commit . "142890cfb46d9c374113b4b49021a4202033147b") (:revdesc . "142890cfb46d") (:keywords "edit") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (mowedline . [(20171218 237) nil "Elisp utilities for using mowedline" tar ((:url . "https://github.com/retroj/mowedline") (:commit . "c17501b48ded8261d815ab60bf14cddf7040be72") (:revdesc . "c17501b48ded") (:authors ("John Foerch" . "jjfoerch@earthlink.net")) (:maintainers ("John Foerch" . "jjfoerch@earthlink.net")) (:maintainer "John Foerch" . "jjfoerch@earthlink.net"))])
+ (mowie . [(20260610 846) ((emacs (28 1))) "Cycle Through Point-Moving Commands" tar ((:url . "https://codeberg.org/mekeor/mowie") (:commit . "30eb09b9c671b61b081b1d7096f4650641ee3ea0") (:revdesc . "30eb09b9c671") (:keywords "convenience") (:authors ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainers ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainer "Mekeor Melire" . "mekeor@posteo.de"))])
+ (mozc . [(20260624 1355) ((emacs (24 3))) "Minor mode to input Japanese with Mozc" tar ((:url . "https://github.com/google/mozc") (:commit . "76887c679e1e4f156102e4bc62ea9cf9174678a3") (:revdesc . "76887c679e1e") (:keywords "mule" "multilingual" "input method"))])
+ (mozc-cand-posframe . [(20200208 750) ((emacs (26 1)) (posframe (0 5 0)) (mozc (20180101 800)) (s (1 12))) "Posframe frontend for mozc.el" tar ((:url . "https://github.com/akirak/mozc-posframe") (:commit . "1d07d5055381008ccbb29b97315d140e09a7ee95") (:revdesc . "1d07d5055381") (:keywords "i18n" "tooltip") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (mozc-im . [(20160412 22) ((mozc (0))) "Mozc with input-method-function interface" tar ((:url . "https://github.com/d5884/mozc-im") (:commit . "df614a1076c28a11551fb3e822868bae47e855a5") (:revdesc . "df614a1076c2") (:keywords "i18n" "extentions") (:authors ("Daisuke Kobayashi" . "d5884jp@gmail.com")) (:maintainers ("Daisuke Kobayashi" . "d5884jp@gmail.com")) (:maintainer "Daisuke Kobayashi" . "d5884jp@gmail.com"))])
+ (mozc-modeless . [(20260621 520) ((emacs (29 0)) (mozc (1 0))) "Modeless Japanese input with Mozc" tar ((:url . "https://github.com/kiyoka/mozc-modeless-emacs") (:commit . "95adeb91fbafb569d7ac06a3ab7df9679349a7be") (:revdesc . "95adeb91fbaf") (:keywords "i18n" "input-method") (:authors ("Kiyoka Nishiyama" . "kiyokap@gmail.com")) (:maintainers ("Kiyoka Nishiyama" . "kiyokap@gmail.com")) (:maintainer "Kiyoka Nishiyama" . "kiyokap@gmail.com"))])
+ (mozc-popup . [(20150224 34) ((popup (0 5 2)) (mozc (0))) "Mozc with popup" tar ((:url . "https://github.com/d5884/mozc-popup") (:commit . "f0684b875a7427ec08f8df13939a486e5d5cf420") (:revdesc . "f0684b875a74") (:keywords "i18n" "extentions") (:authors ("Daisuke Kobayashi" . "d5884jp@gmail.com")) (:maintainers ("Daisuke Kobayashi" . "d5884jp@gmail.com")) (:maintainer "Daisuke Kobayashi" . "d5884jp@gmail.com"))])
+ (mozc-temp . [(20160228 840) ((emacs (24)) (dash (2 10 0)) (mozc (0))) "Use mozc temporarily" tar ((:url . "https://github.com/HKey/mozc-temp") (:commit . "7f5dd5fc8ceeca9b1822f7e056a4be67e2e74959") (:revdesc . "7f5dd5fc8cee") (:authors ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainers ("Hiroki YAMAKAWA" . "s06139@gmail.com")) (:maintainer "Hiroki YAMAKAWA" . "s06139@gmail.com"))])
+ (mpages . [(20150710 1404) nil "An Emacs buffer for quickly writing your Morning Pages" tar ((:url . "https://github.com/slevin/mpages") (:commit . "39a72a0931ab1cdbfdf0ab9f412dc12d43a3829f") (:revdesc . "39a72a0931ab"))])
+ (mpdel . [(20260114 725) ((emacs (25 1)) (libmpdel (1 2 0)) (navigel (0 7 0))) "Play and control your MPD music" tar ((:url . "https://github.com/mpdel/mpdel") (:commit . "64cf50aca68064c2857ed0e5a8fddb2075d97090") (:revdesc . "64cf50aca680") (:keywords "multimedia") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (mpdel-embark . [(20230103 2021) ((emacs (26 1)) (mpdel (2 0 0)) (libmpdel (2 0 0)) (embark (0 19))) "Integrate MPDel with Embark" tar ((:url . "https://github.com/mpdel/mpdel-embark") (:commit . "31d91a62b680fb4472ec34c04ac6af80bb3cf4b8") (:revdesc . "31d91a62b680") (:keywords "multimedia") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (mpdmacs . [(20250917 32) ((emacs (29 1)) (elmpd (0 3))) "A lightweight MPD client" tar ((:url . "https://github.com/sp1ff/mpdmacs") (:commit . "e11d46925ce711de37352fb0a243a2cb55f873a3") (:revdesc . "e11d46925ce7") (:keywords "comm") (:authors ("Michael Herstine" . "sp1ff@pobox.com")) (:maintainers ("Michael Herstine" . "sp1ff@pobox.com")) (:maintainer "Michael Herstine" . "sp1ff@pobox.com"))])
+ (mpmc-queue . [(20180303 2029) ((emacs (26 0)) (queue (0 2 0))) "A multiple-producer-multiple-consumer queue" tar ((:url . "https://github.com/smizoe/mpmc-queue") (:commit . "df07d6bef7468edb1d73ef73b8331b94d0e5d0ca") (:revdesc . "df07d6bef746") (:keywords "lisp" "async") (:authors ("Sho Mizoe" . "sho.mizoe@gmail.com")) (:maintainers ("Sho Mizoe" . "sho.mizoe@gmail.com")) (:maintainer "Sho Mizoe" . "sho.mizoe@gmail.com"))])
+ (mpv . [(20241121 2308) ((emacs (25 1))) "Control mpv for easy note-taking" tar ((:url . "https://github.com/kljohann/mpv.el") (:commit . "62cb8825d525d7c9475dd93d62ba84d419bc4832") (:revdesc . "62cb8825d525") (:keywords "tools" "multimedia") (:authors ("Johann Klähn" . "johann@jklaehn.de")) (:maintainers ("Johann Klähn" . "johann@jklaehn.de")) (:maintainer "Johann Klähn" . "johann@jklaehn.de"))])
+ (mpvi . [(20250831 853) ((emacs (28 1)) (emms (11))) "Watch video and take interactive video notes" tar ((:url . "https://github.com/lorniu/mpvi") (:commit . "79a7bd0559b38b289e5463331a9f25336453f3aa") (:revdesc . "79a7bd0559b3") (:keywords "convenience" "docs" "multimedia" "application") (:authors ("lorniu" . "lorniu@gmail.com")) (:maintainers ("lorniu" . "lorniu@gmail.com")) (:maintainer "lorniu" . "lorniu@gmail.com"))])
+ (mqr . [(20180527 1204) ((emacs (24 4))) "Multi-dimensional query and replace" tar ((:url . "https://github.com/calancha/multi-replace") (:commit . "4ade19d4620b8b61340290bf63fa56d5e493859f") (:revdesc . "4ade19d4620b") (:keywords "convenience" "extensions" "lisp") (:authors ("Tino Calancha" . "tino.calancha@gmail.com")) (:maintainers ("Tino Calancha" . "tino.calancha@gmail.com")) (:maintainer "Tino Calancha" . "tino.calancha@gmail.com"))])
+ (mqtt-mode . [(20180611 1735) ((emacs (25)) (dash (2 12 0))) "Client for interaction with MQTT servers" tar ((:url . "https://github.com/andrmuel/mqtt-mode") (:commit . "613e70e9b9940e635e779994b5c83f86eb62c8e6") (:revdesc . "613e70e9b994") (:keywords "tools") (:authors ("Andreas Müller" . "code@0x7.ch")) (:maintainers ("Andreas Müller" . "code@0x7.ch")) (:maintainer "Andreas Müller" . "code@0x7.ch"))])
+ (msgpack . [(20260706 1555) ((emacs (25 1))) "Read and write MessagePack object" tar ((:url . "https://github.com/xuchunyang/msgpack.el") (:commit . "5353a7b2da854c843cbec4536996242001f63471") (:revdesc . "5353a7b2da85") (:keywords "lisp"))])
+ (msvc . [(20221015 1610) ((emacs (24)) (cl-lib (0 5)) (cedet (1 0)) (ac-clang (2 0 0))) "Microsoft Visual C/C++ mode" tar ((:url . "https://github.com/yaruopooner/msvc") (:commit . "1bf173b5da3fbf2bdb799116e2a1f31916c1e16e") (:revdesc . "1bf173b5da3f") (:keywords "languages" "completion" "syntax check" "mode" "intellisense"))])
+ (mtg-deck-mode . [(20231202 1546) ((emacs (25 1))) "Major mode to edit MTG decks" tar ((:url . "https://github.com/mattiasb/mtg-deck-mode") (:commit . "3cb3866951feae40531c0a2e4fa72c0f2989c36c") (:revdesc . "3cb3866951fe") (:keywords "data" "mtg" "magic"))])
+ (mu-cite . [(20260309 2341) ((flim (1 14 9))) "Yet another citation tool for GNU Emacs" tar ((:url . "https://github.com/cvs-m17n-org/MU-CITE") (:commit . "01345683477c6802f437a63ae2df3d8df1665f6d") (:revdesc . "01345683477c") (:keywords "mail" "news" "citation") (:authors ("MORIOKA Tomohiko" . "tomo@m17n.org") ("Shuhei KOBAYASHI" . "shuhei@aqua.ocn.ne.jp")) (:maintainers ("Katsumi Yamaoka" . "yamaoka@jpl.org")) (:maintainer "Katsumi Yamaoka" . "yamaoka@jpl.org"))])
+ (mu2tex . [(20200512 704) nil "Convert plain text molecule names and units to TeX" tar ((:url . "https://github.com/cdominik/mu2tex") (:commit . "4b84cdac955cb36a8c44a2be48f3310252e3d3ad") (:revdesc . "4b84cdac955c") (:keywords "tex") (:authors ("Carsten Dominik" . "carsten.dominik@gmail.com")) (:maintainers ("Carsten Dominik" . "carsten.dominik@gmail.com")) (:maintainer "Carsten Dominik" . "carsten.dominik@gmail.com"))])
+ (mu4e-alert . [(20251022 2130) ((alert (1 2)) (s (1 10 0)) (ht (2 0)) (emacs (24 4))) "Desktop notification for mu4e" tar ((:url . "https://github.com/xzz53/mu4e-alert") (:commit . "9f20f30b15a5f5cc43fe448684fe1d4b981639aa") (:revdesc . "9f20f30b15a5") (:keywords "mail" "convenience") (:authors ("Iqbal Ansari" . "iqbalansari02@yahoo.com")) (:maintainers ("Mikhail Rudenko" . "mike.rudenko@gmail.com")) (:maintainer "Mikhail Rudenko" . "mike.rudenko@gmail.com"))])
+ (mu4e-autotask . [(20260824 747) ((emacs (29 1))) "Email automation for mu4e" tar ((:url . "https://github.com/laurynas-biveinis/mu4e-autotask") (:commit . "2175192cdd6289d35d2e85e8cc97dfc83e8a9c51") (:revdesc . "2175192cdd62") (:keywords "mail") (:authors ("Laurynas Biveinis" . "laurynas.biveinis@gmail.com")) (:maintainers ("Laurynas Biveinis" . "laurynas.biveinis@gmail.com")) (:maintainer "Laurynas Biveinis" . "laurynas.biveinis@gmail.com"))])
+ (mu4e-column-faces . [(20250205 2118) ((emacs (25 3))) "Faces for individual mu4e columns" tar ((:url . "https://github.com/Alexander-Miller/mu4e-column-faces") (:commit . "b3586a9bf61f0cddd8a9f4cb214458f13d37955a") (:revdesc . "b3586a9bf61f") (:authors ("Alexander Miller" . "alexanderm@web.de")) (:maintainers ("Alexander Miller" . "alexanderm@web.de")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (mu4e-conversation . [(20190609 812) ((emacs (25 1))) "Show a complete thread in a single buffer" tar ((:url . "https://gitlab.com/Ambrevar/mu4e-conversation") (:commit . "98110bb9c300fc9866dee8e0023355f9f79c9b96") (:revdesc . "98110bb9c300") (:keywords "mail" "convenience" "mu4e") (:authors ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainers ("Pierre Neidhardt" . "mail@ambrevar.xyz")) (:maintainer "Pierre Neidhardt" . "mail@ambrevar.xyz"))])
+ (mu4e-jump-to-list . [(20221202 1023) ((emacs (24 4)) (cl-lib (0 5))) "Mu4e jump-to-list extension" tar ((:url . "https://gitlab.com/wavexx/mu4e-jump-to-list.el") (:commit . "cf19684d2333cb0cda7f6b62c7607144baa49310") (:revdesc . "cf19684d2333") (:keywords "mu4e" "mail" "convenience") (:authors ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainers ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainer "Yuri D'Elia" . "wavexx@thregr.org"))])
+ (mu4e-llm . [(20260121 1539) ((emacs (28 1)) (llm (0 17))) "AI-powered email assistance for mu4e" tar ((:url . "https://github.com/sillyfellow/mu4e-llm") (:commit . "290657310d4041c23d627572d6fb780da8ed02f8") (:revdesc . "290657310d40") (:keywords "mail" "convenience") (:authors ("Dr. Sandeep Sadanandan" . "sillyfellow@whybenormal.org")) (:maintainers ("Dr. Sandeep Sadanandan" . "sillyfellow@whybenormal.org")) (:maintainer "Dr. Sandeep Sadanandan" . "sillyfellow@whybenormal.org"))])
+ (mu4e-marker-icons . [(20260629 815) ((emacs (26 1)) (nerd-icons (0 0 1))) "Display icons for mu4e markers" tar ((:url . "https://repo.or.cz/mu4e-marker-icons.git") (:commit . "2d048729ab106aebf1acb99e1ccfd002a0f2ec4a") (:revdesc . "2d048729ab10") (:keywords "mail") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (mu4e-overview . [(20260515 1818) ((emacs (28))) "Show overview of maildir" tar ((:url . "https://github.com/mkcms/mu4e-overview") (:commit . "b6dfe3ecc569aa6313ef093c0c49df8a507f19c4") (:revdesc . "b6dfe3ecc569") (:keywords "mail" "tools") (:authors ("Michał Krzywkowski" . "k.michal@zoho.com")) (:maintainers ("Michał Krzywkowski" . "k.michal@zoho.com")) (:maintainer "Michał Krzywkowski" . "k.michal@zoho.com"))])
+ (mu4e-query-fragments . [(20240415 1421) ((emacs (24 4))) "Mu4e query fragments extension" tar ((:url . "https://gitlab.com/wavexx/mu4e-query-fragments.el") (:commit . "14b38e4a7b7aae47f3c1bdccb6680f8c38c645bf") (:revdesc . "14b38e4a7b7a") (:keywords "mu4e" "mail" "convenience") (:authors ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainers ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainer "Yuri D'Elia" . "wavexx@thregr.org"))])
+ (mu4e-views . [(20251130 249) ((emacs (26 1)) (xwidgets-reuse (0 3)) (ht (2 2)) (esxml (20210323 1102))) "View emails in mu4e using xwidget-webkit" tar ((:url . "https://github.com/lordpretzel/mu4e-views") (:commit . "892ea3163fa4964e9fc99e732e0c0d21d4931ae7") (:revdesc . "892ea3163fa4") (:keywords "mail") (:authors ("Boris Glavic" . "lordpretzel@gmail.com")) (:maintainers ("Boris Glavic" . "lordpretzel@gmail.com")) (:maintainer "Boris Glavic" . "lordpretzel@gmail.com"))])
+ (mu4e-walk . [(20251216 2015) ((emacs (29 1))) "Send email addresses for a walk" tar ((:url . "https://codeberg.org/timmli/mu4e-walk") (:commit . "3d0b613cfdd52f0ddf56f305d8f96e9a52b3e4f9") (:revdesc . "3d0b613cfdd5") (:keywords "convenience" "mail") (:authors ("Timm Lichte" . "timm.lichte@uni-tuebingen.de")) (:maintainers ("Timm Lichte" . "timm.lichte@uni-tuebingen.de")) (:maintainer "Timm Lichte" . "timm.lichte@uni-tuebingen.de"))])
+ (mu4easy . [(20250621 1238) ((emacs (25 1)) (mu4e-column-faces (1 2 1)) (mu4e-alert (1 0)) (org-msg (4 0))) "Packages + configs for using mu4e with multiple accounts" tar ((:url . "https://github.com/danielfleischer/mu4easy") (:commit . "5767f6fed2ae077116f2876e872943a3dd5ea788") (:revdesc . "5767f6fed2ae") (:keywords "mail") (:authors ("Daniel Fleischer" . "danflscr@gmail.com")) (:maintainers ("Daniel Fleischer" . "danflscr@gmail.com")) (:maintainer "Daniel Fleischer" . "danflscr@gmail.com"))])
+ (muban . [(20180415 1219) ((emacs (25))) "Lightweight template expansion tool" tar ((:url . "https://github.com/jiahaowork/muban.el") (:commit . "c134c46e60be1fb3e9a08dba3d07346855e0fcc2") (:revdesc . "c134c46e60be") (:keywords "abbrev" "tools") (:authors ("Jiahao Li" . "jiahaowork@gmail.com")) (:maintainers ("Jiahao Li" . "jiahaowork@gmail.com")) (:maintainer "Jiahao Li" . "jiahaowork@gmail.com"))])
+ (mugur . [(20250730 1328) ((emacs (26 1)) (s (1 12 0)) (anaphora (1 0 4)) (dash (2 18 1)) (cl-lib (1 0))) "Configurator for QMK compatible keyboards" tar ((:url . "https://github.com/mihaiolteanu/mugur") (:commit . "ee43cd1ab5ae687882b7d5f3eb05b0e34c3fc0a0") (:revdesc . "ee43cd1ab5ae") (:keywords "multimedia") (:authors ("Mihai Olteanu" . "mihai_olteanu@fastmail.fm")) (:maintainers ("Mihai Olteanu" . "mihai_olteanu@fastmail.fm")) (:maintainer "Mihai Olteanu" . "mihai_olteanu@fastmail.fm"))])
+ (multi . [(20131013 1544) ((emacs (24))) "Clojure-style multi-methods for emacs lisp" tar ((:url . "https://github.com/kurisuwhyte/emacs-multi") (:commit . "884203b11fdac8374ec644cca975469aab263404") (:revdesc . "884203b11fda") (:keywords "multimethod" "generic" "predicate" "dispatch") (:authors ("Christina Whyte" . "kurisu.whyte@gmail.com")) (:maintainers ("Christina Whyte" . "kurisu.whyte@gmail.com")) (:maintainer "Christina Whyte" . "kurisu.whyte@gmail.com"))])
+ (multi-compile . [(20211113 2119) ((emacs (24 4)) (dash (2 12 1))) "Multi target interface to compile" tar ((:url . "https://github.com/ReanGD/emacs-multi-compile") (:commit . "360e44b200d07da379c906856d37613d0f06a9ae") (:revdesc . "360e44b200d0") (:keywords "tools" "compile" "build") (:authors ("Kvashnin Vladimir" . "reangd@gmail.com")) (:maintainers ("Kvashnin Vladimir" . "reangd@gmail.com")) (:maintainer "Kvashnin Vladimir" . "reangd@gmail.com"))])
+ (multi-line . [(20230721 1814) ((emacs (24 3)) (s (1 9 0)) (cl-lib (0 5)) (dash (2 12 0)) (shut-up (0 3 2))) "Multi-line statements" tar ((:url . "https://github.com/IvanMalison/multi-line") (:commit . "06ea7294c4e4ace0c3253b7952a6d937a169eb55") (:revdesc . "06ea7294c4e4") (:keywords "multi" "line" "length" "whitespace" "programming" "tools" "convenience" "files") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (multi-project . [(20260513 1126) ((emacs (26 1))) "Find files, compile, and search in multiple projects" tar ((:url . "https://github.com/ellisvelo/multi-project.git") (:commit . "1ddfd60410dd146c59e9950ef88c5f0084807012") (:revdesc . "1ddfd60410dd") (:keywords "convenience" "project" "management") (:authors ("Shawn Ellis" . "shawn.ellis17@gmail.com")) (:maintainers ("Shawn Ellis" . "shawn.ellis17@gmail.com")) (:maintainer "Shawn Ellis" . "shawn.ellis17@gmail.com"))])
+ (multi-run . [(20210108 336) ((emacs (24)) (window-layout (1 4))) "Efficiently manage multiple remote nodes" tar ((:url . "https://www.github.com/sagarjha/multi-run") (:commit . "13d4d923535b5e8482b13ff76185203075fb26a3") (:revdesc . "13d4d923535b") (:keywords "multiple shells" "multi-run" "remote nodes"))])
+ (multi-term . [(20200514 428) nil "Managing multiple terminal buffers in Emacs" tar ((:url . "http://www.emacswiki.org/emacs/download/multi-term.el") (:commit . "017c77c550115936860e2ea71b88e585371475d5") (:revdesc . "017c77c55011") (:keywords "term" "terminal" "multiple buffer") (:authors ("Andy Stewart" . "lazycat.manatee@gmail.com")) (:maintainers ("Andy Stewart" . "lazycat.manatee@gmail.com")) (:maintainer "Andy Stewart" . "lazycat.manatee@gmail.com"))])
+ (multi-vterm . [(20221031 610) ((emacs (26 3)) (vterm (0 0)) (project (0 3 0))) "Like multi-term.el but for vterm" tar ((:url . "https://github.com/suonlight/multi-libvterm") (:commit . "36746d85870dac5aaee6b9af4aa1c3c0ef21a905") (:revdesc . "36746d85870d") (:keywords "terminals" "processes") (:authors ("Minh Nguyen-Hue" . "minh.nh1989@gmail.com")) (:maintainers ("Minh Nguyen-Hue" . "minh.nh1989@gmail.com")) (:maintainer "Minh Nguyen-Hue" . "minh.nh1989@gmail.com"))])
+ (multi-web-mode . [(20130824 354) nil "Multiple major mode support for web editing" tar ((:url . "https://github.com/fgallina/multi-web-mode") (:commit . "ad1c8d1c870334052d244c7ae3636cb7b9357b7c") (:revdesc . "ad1c8d1c8703") (:keywords "convenience" "languages" "wp") (:authors ("Fabián E. Gallina" . "fabian@anue.biz")) (:maintainers ("Fabián E. Gallina" . "fabian@anue.biz")) (:maintainer "Fabián E. Gallina" . "fabian@anue.biz"))])
+ (multicolumn . [(20150202 2251) nil "Creating and managing multiple side-by-side windows" tar ((:url . "https://github.com/Lindydancer/multicolumn") (:commit . "c7a3afecd470859b2e60aa7c554d6e4d436df7fa") (:revdesc . "c7a3afecd470"))])
+ (multifiles . [(20130615 2133) nil "View and edit parts of multiple files in one buffer" tar ((:url . "https://github.com/magnars/multifiles.el") (:commit . "dddfe64b8e1c1cd1f9ccc1f03405477fc0d53897") (:revdesc . "dddfe64b8e1c") (:keywords "multiple" "files") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (multiple-cursors . [(20260419 931) ((emacs (24 4)) (cl-lib (0 5))) "Multiple cursors for Emacs" tar ((:url . "https://github.com/magnars/multiple-cursors.el") (:commit . "94b8b07a4bab87f803123723b68227565429dfa1") (:revdesc . "94b8b07a4bab") (:keywords "editing" "cursors") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (multistate . [(20210124 2014) ((emacs (25 1)) (ht (2 3))) "Multistate mode" tar ((:url . "https://gitlab.com/matsievskiysv/multistate") (:commit . "a7ab9dc7aac0b6d6d2f872de4e0d1b8550834a9b") (:revdesc . "a7ab9dc7aac0") (:keywords "convenience"))])
+ (multitran . [(20240206 1617) ((emacs (24)) (cl-lib (0 5))) "Interface to multitran" tar ((:url . "https://github.com/zevlg/multitran.el") (:commit . "680f31d15b78876daf484bd926e5c172ab061595") (:revdesc . "680f31d15b78") (:keywords "dictionary" "hypermedia") (:authors ("Zajcev Evgeny" . "zevlg@yandex.ru")) (:maintainers ("Zajcev Evgeny" . "zevlg@yandex.ru")) (:maintainer "Zajcev Evgeny" . "zevlg@yandex.ru"))])
+ (musicbrainz . [(20230530 749) ((emacs (28 1)) (request (0 3))) "MusicBrainz API interface" tar ((:url . "https://github.com/zzkt/metabrainz") (:commit . "986690a515e67526598eaa4200bd383f03a007bd") (:revdesc . "986690a515e6") (:keywords "music" "scrobbling" "multimedia") (:authors ("nik gaffney" . "nik@fo.am")) (:maintainers ("nik gaffney" . "nik@fo.am")) (:maintainer "nik gaffney" . "nik@fo.am"))])
+ (musicbrainz-interactive . [(20260803 342) ((emacs (28 1)) (musicbrainz (0 1))) "Interactive commands for MusicBrainz related things" tar ((:url . "https://github.com/zzkt/metabrainz") (:commit . "47f290b3901e30e1ae93c0f7d8b4598defe285bf") (:revdesc . "47f290b3901e") (:keywords "data" "convenience" "music") (:authors ("Oliwier Czerwiński" . "oliwier.czerwi@proton.me")) (:maintainers ("Oliwier Czerwiński" . "oliwier.czerwi@proton.me")) (:maintainer "Oliwier Czerwiński" . "oliwier.czerwi@proton.me"))])
+ (mustache . [(20230713 514) ((emacs (26)) (s (1 3 0)) (dash (1 2 0))) "Mustache templating library in emacs lisp" tar ((:url . "https://github.com/Wilfred/mustache.el") (:commit . "229e01f0f0a5684499bcc6a11a5bf8dbe14fd4e8") (:revdesc . "229e01f0f0a5") (:keywords "convenience" "mustache" "template") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (mustache-mode . [(20141024 1432) nil "A major mode for editing Mustache files" tar ((:url . "https://github.com/mustache/emacs") (:commit . "bf9897eb287ca47ced65d7d4e07ea61ea0aec39f") (:revdesc . "bf9897eb287c"))])
+ (mustang-theme . [(20170719 946) nil "Port of vim's mustang theme" tar ((:url . "https://github.com/mswift42/mustang-theme") (:commit . "dda6d04803f1c9b196b620ef564e7768fee15de2") (:revdesc . "dda6d04803f1"))])
+ (mustard-theme . [(20170808 1319) ((emacs (24 0))) "An Emacs 24 theme based on Mustard (tmTheme)" tar ((:url . "https://github.com/emacsfodder/tmtheme-to-deftheme") (:commit . "3b15d992c79590d7ea2503004e2a863b57e274b5") (:revdesc . "3b15d992c795"))])
+ (mutant . [(20160124 1353) ((emacs (24 4)) (dash (2 1 0))) "An interface for the Mutant testing tool" tar ((:url . "https://github.com/p-lambert/mutant.el") (:commit . "aff50603a70a110f4ecd7142963ef719e8c11c06") (:revdesc . "aff50603a70a") (:keywords "mutant" "testing"))])
+ (mutt-mode . [(20191102 2330) ((emacs (24))) "Major mode for editing mutt configuration" tar ((:url . "https://gitlab.com/flexw/mutt-mode") (:commit . "1d495de49e6f536459b00d5396a2f5ce5ad4757b") (:revdesc . "1d495de49e6f") (:keywords "languages") (:authors ("Felix Weilbach" . "felix.weilbach@t-online.de")) (:maintainers ("Felix Weilbach" . "felix.weilbach@t-online.de")) (:maintainer "Felix Weilbach" . "felix.weilbach@t-online.de"))])
+ (mutype . [(20260310 330) ((emacs (25 1))) "Type into stillness" tar ((:url . "https://github.com/suxiaogang223/mutype") (:commit . "731c4ce4c72850ac18e35f8739b229343fb15582") (:revdesc . "731c4ce4c728") (:keywords "convenience" "typing") (:authors ("Xiaogang Su" . "https://github.com/suxiaogang223")) (:maintainers ("Xiaogang Su" . "https://github.com/suxiaogang223")) (:maintainer "Xiaogang Su" . "https://github.com/suxiaogang223"))])
+ (mvn . [(20181002 1617) nil "Helpers for compiling with maven" tar ((:url . "https://github.com/apgwoz/mvn-el") (:commit . "ffa40235b7dabb6c6c165f64f32a963cde8031f0") (:revdesc . "ffa40235b7da") (:keywords "compilation" "maven" "java") (:authors ("Andrew Gwozdziewycz" . "git@apgwoz.com")) (:maintainers ("Andrew Gwozdziewycz" . "git@apgwoz.com")) (:maintainer "Andrew Gwozdziewycz" . "git@apgwoz.com"))])
+ (mw-thesaurus . [(20230426 1752) ((emacs (25)) (request (0 3 0)) (dash (2 16 0))) "Merriam-Webster Thesaurus" tar ((:url . "https://github.com/agzam/mw-thesaurus.el") (:commit . "c44d793595c2d0f6789621da457da065920968ac") (:revdesc . "c44d793595c2") (:keywords "wp" "matching"))])
+ (mwim . [(20260227 705) ((seq (2 24))) "Switch between the beginning/end of line or code" tar ((:url . "https://github.com/alezost/mwim.el") (:commit . "e44a7a0a76262d7000b726bfa848cc62e21d7985") (:revdesc . "e44a7a0a7626") (:keywords "convenience") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (mxf-view . [(20180501 740) ((emacs (25))) "Simple MXF viewer" tar ((:url . "https://github.com/t-suwa/mxf-view") (:commit . "c4825f35fad81c4624a2fcaea95cc605addf5cbc") (:revdesc . "c4825f35fad8") (:keywords "data" "multimedia") (:authors ("Tomotaka SUWA" . "tomotaka.suwa@gmail.com")) (:maintainers ("Tomotaka SUWA" . "tomotaka.suwa@gmail.com")) (:maintainer "Tomotaka SUWA" . "tomotaka.suwa@gmail.com"))])
+ (my-repo-pins . [(20230120 1105) ((emacs (26 1))) "Keep your git repositories organized" tar ((:url . "https://alternativebit.fr/projects/my-repo-pins/") (:commit . "e6fe3864e244e6db74b668d24857c04472b2d475") (:revdesc . "e6fe3864e244") (:authors ("Félix Baylac Jacqué" . "felixatalternativebit.fr")) (:maintainers ("Félix Baylac Jacqué" . "felixatalternativebit.fr")) (:maintainer "Félix Baylac Jacqué" . "felixatalternativebit.fr"))])
+ (myanmar-input-methods . [(20160106 1537) nil "Emacs Input Method for Myanmar" tar ((:url . "https://github.com/yelinkyaw/emacs-myanmar-input-methods") (:commit . "9d4e0d6358c61bde7a2274e430ef71683faea32e") (:revdesc . "9d4e0d6358c6") (:keywords "myanmar" "unicode" "keyboard") (:authors ("Ye Lin Kyaw" . "yelinkyaw@gmail.com")) (:maintainers ("Ye Lin Kyaw" . "yelinkyaw@gmail.com")) (:maintainer "Ye Lin Kyaw" . "yelinkyaw@gmail.com"))])
+ (mybigword . [(20230809 904) ((emacs (26 1)) (avy (0 5 0))) "Vocabulary builder using Zipf to extract English big words" tar ((:url . "https://github.com/redguardtoo/mybigword") (:commit . "13574e2c47a670df4b776b88bd633b2e8a82b2b2") (:revdesc . "13574e2c47a6") (:keywords "convenience") (:authors ("Chen Bin" . "chenbinDOTshATgmail.com")) (:maintainers ("Chen Bin" . "chenbinDOTshATgmail.com")) (:maintainer "Chen Bin" . "chenbinDOTshATgmail.com"))])
+ (mybuild-mode . [(20221007 1928) ((emacs (24 3))) "Major mode for editing Mybuild files from Embox" tar ((:url . "https://github.com/easimonenko/mybuild-mode") (:commit . "54e3c31e3b5f133eb8611a3759e59733b17e33e3") (:revdesc . "54e3c31e3b5f") (:keywords "languages") (:authors ("Evgeny Simonenko" . "easimonenko@gmail.com")) (:maintainers ("Evgeny Simonenko" . "easimonenko@gmail.com")) (:maintainer "Evgeny Simonenko" . "easimonenko@gmail.com"))])
+ (mykie . [(20150808 2205) ((emacs (24 3)) (cl-lib (0 5))) "Command multiplexer: Register multiple functions to a keybind" tar ((:url . "https://github.com/yuutayamada/mykie-el") (:commit . "91f222b4f2b2b4285b0bc306905eb960826a67ed") (:revdesc . "91f222b4f2b2") (:keywords "emacs" "configuration" "keybind") (:authors ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainers ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainer "Yuta Yamada" . "cokesboy\"at\"gmail.com"))])
+ (mynt-mode . [(20150512 2049) ((virtualenvwrapper (20131514))) "Minor mode to work with the mynt static site generator" tar ((:url . "https://github.com/crshd/mynt-mode") (:commit . "23d4489167bfa899634548cb41ed32fdeb3600c9") (:revdesc . "23d4489167bf") (:keywords "convenience"))])
+ (myrddin-mode . [(20191225 2120) ((emacs (24 3))) "Major mode for editing Myrddin source files" tar ((:url . "https://git.sr.ht/~jakob/myrddin-mode") (:commit . "51c0a2cb9dfc9526cd47e71313f5a745c99cadcc") (:revdesc . "51c0a2cb9dfc") (:keywords "languages") (:authors ("Jakob L. Kreuze" . "zerodaysfordays@sdf.lonestar.org")) (:maintainers ("Jakob L. Kreuze" . "zerodaysfordays@sdf.lonestar.org")) (:maintainer "Jakob L. Kreuze" . "zerodaysfordays@sdf.lonestar.org"))])
+ (mysql . [(20260726 1544) ((emacs (28 1))) "Pure Elisp MySQL wire protocol client" tar ((:url . "https://github.com/LuciusChen/mysql.el") (:commit . "c1c813d65ef4a3d9647441b57600b8fba14f826b") (:revdesc . "c1c813d65ef4") (:keywords "comm" "data") (:authors ("Lucius Chen" . "chenyh572@gmail.com")) (:maintainers ("Lucius Chen" . "chenyh572@gmail.com")) (:maintainer "Lucius Chen" . "chenyh572@gmail.com"))])
+ (mysql-to-org . [(20210622 447) ((emacs (24 3)) (s (1 11 0))) "Minor mode to output the results of mysql queries to org tables" tar ((:url . "https://github.com/mallt/mysql-to-org-mode") (:commit . "c5eefc71200f2e1d0d67a13ed897b3cdfa835117") (:revdesc . "c5eefc71200f") (:authors ("Tijs Mallaerts" . "tijs.mallaerts@gmail.com")) (:maintainers ("Tijs Mallaerts" . "tijs.mallaerts@gmail.com")) (:maintainer "Tijs Mallaerts" . "tijs.mallaerts@gmail.com"))])
+ (myterminal-controls . [(20210904 516) ((emacs (24)) (cl-lib (0 5))) "Quick toggle controls at a key-stroke" tar ((:url . "http://ismail.teamfluxion.com") (:commit . "c635868e13ee898ec77925d98b36421640e22aa4") (:revdesc . "c635868e13ee") (:keywords "convenience" "shortcuts") (:authors ("Mohammed Ismail Ansari" . "team.terminal@gmail.com")) (:maintainers ("Mohammed Ismail Ansari" . "team.terminal@gmail.com")) (:maintainer "Mohammed Ismail Ansari" . "team.terminal@gmail.com"))])
+ (n4js . [(20150714 231) ((emacs (24)) (cypher-mode (0))) "Neo4j Shell" tar ((:url . "https://github.com/tmtxt/n4js.el") (:commit . "3991ed8975151d5e8d568e952362df810f7ffab7") (:revdesc . "3991ed897515") (:keywords "neo4j" "shell" "comint") (:authors ("TruongTx" . "me@truongtx.me")) (:maintainers ("TruongTx" . "me@truongtx.me")) (:maintainer "TruongTx" . "me@truongtx.me"))])
+ (nael . [(20260309 1253) ((emacs (29 1))) "Major mode for Lean" tar ((:url . "https://codeberg.org/mekeor/nael") (:commit . "c1d349746731bbff6bf1887c51eb7a1f3bea5c4c") (:revdesc . "c1d349746731") (:keywords "languages") (:authors ("Adam Topaz" . "topaz@ualberta.ca") ("Akira Komamura" . "akira.komamura@gmail.com") ("Bao Zhiyuan" . "bzy_sustech@foxmail.com") ("Daniel Selsam" . "daniel.selsam@protonmail.com") ("Gabriel Ebner" . "gebner@gebner.org") ("Henrik Böving" . "hargonix@gmail.com") ("Hongyu Ouyang" . "oyhy0214@163.com") ("Jakub Bartczuk" . "bartczukkuba@gmail.com") ("Leonardo de Moura" . "leonardo@microsoft.com") ("Mauricio Collares" . "mauricio@collares.org") ("Mekeor Melire" . "mekeor@posteo.de") ("Philip Kaludercic" . "philipk@posteo.net") ("Richard Copley" . "buster@buster.me.uk") ("Sebastian Ullrich" . "sebasti@nullri.ch") ("Siddharth Bhat" . "siddu.druid@gmail.com") ("Simon Hudon" . "simon.hudon@gmail.com") ("Soonho Kong" . "soonhok@cs.cmu.edu") ("Tomáš Skřivan" . "skrivantomas@seznam.cz") ("Wojciech Nawrocki" . "wjnawrocki@protonmail.com") ("Yael Dillies" . "yael.dillies@gmail.com") ("Yury G. Kudryashov" . "urkud@urkud.name")) (:maintainers ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainer "Mekeor Melire" . "mekeor@posteo.de"))])
+ (nael-lsp . [(20260309 1253) ((emacs (29 1)) (lsp-mode (9)) (nael (0 8 3))) "Nael and lsp-mode" tar ((:url . "https://codeberg.org/mekeor/nael") (:commit . "c1d349746731bbff6bf1887c51eb7a1f3bea5c4c") (:revdesc . "c1d349746731") (:keywords "languages") (:authors ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainers ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainer "Mekeor Melire" . "mekeor@posteo.de"))])
+ (naga-theme . [(20260422 1017) nil "Dark color theme with green foreground color" tar ((:url . "https://github.com/kenranunderscore/emacs-naga-theme") (:commit . "1ffb5930e57ee0a1073b206ff09ea25ef542b6bc") (:revdesc . "1ffb5930e57e") (:authors ("Johannes Maier" . "johannes.maier@mailbox.org")) (:maintainers ("Johannes Maier" . "johannes.maier@mailbox.org")) (:maintainer "Johannes Maier" . "johannes.maier@mailbox.org"))])
+ (name-this-color . [(20151014 2030) ((emacs (24)) (cl-lib (0 5)) (dash (2 11 0))) "Match RGB codes to names easily and precisely" tar ((:url . "https://github.com/knl/name-this-color.el") (:commit . "e37cd1291d5d68d4c8d6386eab9cb9d94fd3bcfa") (:revdesc . "e37cd1291d5d") (:keywords "lisp" "color" "hex" "rgb" "shade" "name") (:authors ("Nikola Knezevic" . "knl@soba143.net")) (:maintainers ("Nikola Knezevic" . "knl@soba143.net")) (:maintainer "Nikola Knezevic" . "knl@soba143.net"))])
+ (named-timer . [(20181120 2224) ((emacs (24 4))) "Simplified timer management for Emacs Lisp" tar ((:url . "https://github.com/DarwinAwardWinner/emacs-named-timer") (:commit . "670b81e3eddef2e7353a4eedc9553a85306445db") (:revdesc . "670b81e3edde") (:keywords "tools"))])
+ (nameframe . [(20221023 957) nil "Manage frames by name" tar ((:url . "https://github.com/john2x/nameframe") (:commit . "06d3400750c6b33ae215b9ac2922ee4dafd6b506") (:revdesc . "06d3400750c6") (:authors ("John Del Rosario" . "john2x@gmail.com")) (:maintainers ("John Del Rosario" . "john2x@gmail.com")) (:maintainer "John Del Rosario" . "john2x@gmail.com"))])
+ (nameframe-perspective . [(20221023 957) ((nameframe (0 5 0 -2)) (perspective (1 12))) "Nameframe integration with perspective.el" tar ((:url . "https://github.com/john2x/nameframe") (:commit . "06d3400750c6b33ae215b9ac2922ee4dafd6b506") (:revdesc . "06d3400750c6") (:authors ("John Del Rosario" . "john2x@gmail.com")) (:maintainers ("John Del Rosario" . "john2x@gmail.com")) (:maintainer "John Del Rosario" . "john2x@gmail.com"))])
+ (nameframe-project . [(20221024 209) ((emacs (28 1)) (nameframe (0 5 0 -2)) (project (0 8 1))) "Nameframe integration with project.el" tar ((:url . "https://github.com/john2x/nameframe") (:commit . "3116b6738f74a95e144a75344355e09f72620e01") (:revdesc . "3116b6738f74") (:authors ("John Del Rosario" . "john2x@gmail.com")) (:maintainers ("John Del Rosario" . "john2x@gmail.com")) (:maintainer "John Del Rosario" . "john2x@gmail.com"))])
+ (nameframe-projectile . [(20221023 957) ((nameframe (0 5 0 -2)) (projectile (0 13 0))) "Nameframe integration with Projectile" tar ((:url . "https://github.com/john2x/nameframe") (:commit . "06d3400750c6b33ae215b9ac2922ee4dafd6b506") (:revdesc . "06d3400750c6") (:authors ("John Del Rosario" . "john2x@gmail.com")) (:maintainers ("John Del Rosario" . "john2x@gmail.com")) (:maintainer "John Del Rosario" . "john2x@gmail.com"))])
+ (nameless . [(20230112 1259) ((emacs (24 4))) "Hide package namespace in your emacs-lisp code" tar ((:url . "https://github.com/Malabarba/nameless") (:commit . "e468f3eea4518b9827419611868c897dce20453f") (:revdesc . "e468f3eea451") (:keywords "convenience" "lisp") (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainers ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com"))])
+ (names . [(20221227 1825) ((emacs (24 1)) (cl-lib (0 5))) "Namespaces for emacs-lisp. Avoid name clobbering without hiding symbols" tar ((:url . "https://github.com/Malabarba/names") (:commit . "45a272fae915148d9a74d4cb3c39917b272ee9c3") (:revdesc . "45a272fae915") (:keywords "extensions" "lisp") (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainers ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com"))])
+ (namespaces . [(20130326 2250) nil "An implementation of namespaces for Elisp, with an emphasis on immutabilty" tar ((:url . "https://github.com/chrisbarrett/elisp-namespaces") (:commit . "3d02525d9b9a5ae6e7be3adefd880121436e6270") (:revdesc . "3d02525d9b9a"))])
+ (nand2tetris . [(20171201 1813) ((emacs (24))) "Major mode for HDL files in the nand2tetris course" tar ((:url . "http://www.github.com/CestDiego/nand2tetris.el/") (:commit . "fe37ee41367ceff6f7d7a472a5f80cf1285e1e01") (:revdesc . "fe37ee41367c") (:keywords "nand2tetris" "hdl") (:authors ("Diego Berrocal" . "cestdiego@gmail.com")) (:maintainers ("Diego Berrocal" . "cestdiego@gmail.com")) (:maintainer "Diego Berrocal" . "cestdiego@gmail.com"))])
+ (nand2tetris-assembler . [(20171201 1813) ((nand2tetris (1 1 0))) "Assembler For the Nand2tetris Course" tar ((:url . "http://www.github.com/CestDiego/nand2tetris-assembler.el/") (:commit . "fe37ee41367ceff6f7d7a472a5f80cf1285e1e01") (:revdesc . "fe37ee41367c") (:keywords "nand2tetris-assembler" "hdl") (:authors ("Diego Berrocal" . "cestdiego@gmail.com")) (:maintainers ("Diego Berrocal" . "cestdiego@gmail.com")) (:maintainer "Diego Berrocal" . "cestdiego@gmail.com"))])
+ (nanowrimo . [(20151105 228) nil "Track progress for nanowrimo" tar ((:url . "https://bitbucket.org/gvol/nanowrimo-mode") (:commit . "b1d41458926ccb39cefbb1bb74aefe4f02fd349f") (:revdesc . "b1d41458926c") (:authors ("Ivan Andrus" . "darthandrusatgmail.com")) (:maintainers ("Ivan Andrus" . "darthandrusatgmail.com")) (:maintainer "Ivan Andrus" . "darthandrusatgmail.com"))])
+ (naquadah-theme . [(20190225 1427) nil "A theme based on Tango color set" tar ((:url . "https://github.com/jd/naquadah-theme") (:commit . "430c3b7bd51922cb616b3f60301f4e2604816ed8") (:revdesc . "430c3b7bd519") (:authors ("Julien Danjou" . "julien@danjou.info")) (:maintainers ("Julien Danjou" . "julien@danjou.info")) (:maintainer "Julien Danjou" . "julien@danjou.info"))])
+ (narrow-reindent . [(20150722 1906) ((emacs (24 4))) "Defines a minor mode to left-align narrowed regions" tar ((:url . "https://github.com/emallson/narrow-reindent.el") (:commit . "87466aac4dbeb79597124dd077bf5c704872fd3d") (:revdesc . "87466aac4dbe") (:authors ("J David Smith" . "emallson@atlanis.net")) (:maintainers ("J David Smith" . "emallson@atlanis.net")) (:maintainer "J David Smith" . "emallson@atlanis.net"))])
+ (narrowed-page-navigation . [(20150109 519) ((emacs (24)) (cl-lib (0 5))) "A minor mode for showing one page at a time" tar ((:url . "https://github.com/david-christiansen/narrowed-page-navigation") (:commit . "b215adbac4873f56fbab65772062f0f5be8058a1") (:revdesc . "b215adbac487") (:keywords "outlines") (:authors ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainers ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainer "David Raymond Christiansen" . "david@davidchristiansen.dk"))])
+ (narumi . [(20220228 243) ((emacs (26 1))) "A dashboard that displays a ramdom sampled image" tar ((:url . "https://github.com/nryotaro/narumi") (:commit . "2f23f03a7b94766799f26605e167b259a4a90903") (:revdesc . "2f23f03a7b94"))])
+ (nash-mode . [(20160830 1212) nil "Nash major mode" tar ((:url . "https://github.com/tiago4orion/nash-mode.el") (:commit . "bb7ae728a16812a0ef506483b877f6221c92ca9c") (:revdesc . "bb7ae728a168") (:keywords "nash" "languages"))])
+ (nasm-mode . [(20260509 953) ((emacs (24 3))) "NASM x86 assembly major mode" tar ((:url . "https://github.com/skeeto/nasm-mode") (:commit . "fab76d8e092419c341b6240fcc7123975db177e1") (:revdesc . "fab76d8e0924") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainer "Christopher Wellons" . "wellons@nullprogram.com"))])
+ (native-complete . [(20240909 2007) ((emacs (26 1))) "Shell completion using native complete mechanisms" tar ((:url . "https://github.com/CeleritasCelery/emacs-native-shell-complete") (:commit . "157bd9c23508c4b0b8636c9a6d9b6ecc6209d4f0") (:revdesc . "157bd9c23508") (:authors ("Troy Hinckley" . "troy.hinckley@gmail.com")) (:maintainers ("Troy Hinckley" . "troy.hinckley@gmail.com")) (:maintainer "Troy Hinckley" . "troy.hinckley@gmail.com"))])
+ (nav . [(20250211 1523) nil "Emacs mode for filesystem navigation" tar ((:url . "https://github.com/emacsorphanage/nav") (:commit . "c9446387e337888778ea289ed7acc009691450da") (:revdesc . "c9446387e337") (:authors ("Issac Trotts" . "issactrotts@google.com")) (:maintainers ("Issac Trotts" . "issactrotts@google.com")) (:maintainer "Issac Trotts" . "issactrotts@google.com"))])
+ (nav-flash . [(20220726 1117) ((emacs (25 1))) "Briefly highlight the current line" tar ((:url . "https://github.com/rolandwalker/nav-flash") (:commit . "5d4b48567862f6be0ca973d6b1dca90e4815cb9b") (:revdesc . "5d4b48567862") (:keywords "extensions" "navigation" "interface") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (navi-mode . [(20201220 1727) ((outshine (2 0)) (outorg (2 0))) "Major-mode for easy buffer-navigation" tar ((:url . "https://github.com/alphapapa/navi") (:commit . "cf97e1e338815ad3a4d0bbbf4ff6dd1a4e322ca8") (:revdesc . "cf97e1e33881") (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (navi2ch . [(20200130 36) nil "Navigator for 2ch for Emacsen" tar ((:url . "https://github.com/naota/navi2ch") (:commit . "7811dba052f679bd920a1f648d621a6fecace10f") (:revdesc . "7811dba052f6") (:keywords "network" "2ch") (:authors ("Taiki SUGAWARA" . "taiki@users.sourceforge.net")) (:maintainers ("Taiki SUGAWARA" . "taiki@users.sourceforge.net")) (:maintainer "Taiki SUGAWARA" . "taiki@users.sourceforge.net"))])
+ (navigel . [(20251125 1931) ((emacs (25 1)) (tablist (1 0))) "Facilitate the creation of tabulated-list based UIs" tar ((:url . "https://github.com/DamienCassou/navigel") (:commit . "539fe2d9542b01824869b98cde000079a1159b9f") (:revdesc . "539fe2d9542b") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (naysayer-theme . [(20250406 2017) ((emacs (24))) "The naysayer color theme" tar ((:url . "https://github.com/nickav/naysayer-theme.el") (:commit . "00fe031e38f1111614f088505776b09a5453f4ff") (:revdesc . "00fe031e38f1") (:authors ("Nick Aversano" . "nickav@users.noreply.github.com")) (:maintainers ("Nick Aversano" . "nickav@users.noreply.github.com")) (:maintainer "Nick Aversano" . "nickav@users.noreply.github.com"))])
+ (ncl-mode . [(20180129 703) ((emacs (24))) "Major Mode for editing NCL scripts and other goodies" tar ((:url . "https://github.com/yyr/ncl-mode") (:commit . "602292712a9e6b7e7c25155978999e77d06b7338") (:revdesc . "602292712a9e") (:keywords "ncl" "major mode" "ncl-mode" "atmospheric science.") (:authors ("Yagnesh Raghava Yakkala" . "hi@yagnesh.org")) (:maintainers ("Yagnesh Raghava Yakkala" . "hi@yagnesh.org")) (:maintainer "Yagnesh Raghava Yakkala" . "hi@yagnesh.org"))])
+ (nclip . [(20130617 2015) nil "Network (HTTP) Clipboard" tar ((:url . "http://www.github.com/maio/nclip.el") (:commit . "af88e38b1f04be02bf2e57affc662dbd0f828e67") (:revdesc . "af88e38b1f04") (:keywords "nclip" "clipboard" "network") (:authors ("Marian Schubert" . "marian.schubert@gmail.com")) (:maintainers ("Marian Schubert" . "marian.schubert@gmail.com")) (:maintainer "Marian Schubert" . "marian.schubert@gmail.com"))])
+ (neato-graph-bar . [(20181130 1649) ((emacs (24 3))) "Neat-o graph bars CPU/memory etc" tar ((:url . "https://gitlab.com/RobertCochran/neato-graph-bar") (:commit . "a7ae35afd67911e8924f36e646bce0d3e3c1bbe6") (:revdesc . "a7ae35afd679") (:authors ("Robert Cochran" . "robert-git@cochranmail.com")) (:maintainers ("Robert Cochran" . "robert-git@cochranmail.com")) (:maintainer "Robert Cochran" . "robert-git@cochranmail.com"))])
+ (neil . [(20260524 1246) ((emacs (29 4))) "Companion for Babashka Neil" tar ((:url . "https://github.com/babashka/neil") (:commit . "2cdd7c66843ba3f1a2adb08208f2312b72b31900") (:revdesc . "2cdd7c66843b") (:keywords "convenience" "tools") (:authors ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainers ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainer "Ag Ibragimov" . "agzam.ibragimov@gmail.com"))])
+ (nemerle . [(20161029 2023) nil "Major mode for editing nemerle programs" tar ((:url . "https://github.com/rsdn/nemerle") (:commit . "8818c5af5598e16ea59189e1e3245f0a3d7c78f0") (:revdesc . "8818c5af5598") (:keywords "nemerle" "mode" "languages") (:authors ("Jacek Sliwerski" . "rzyj@o2.pl")) (:maintainers ("Jacek Sliwerski" . "rzyj@o2.pl")) (:maintainer "Jacek Sliwerski" . "rzyj@o2.pl"))])
+ (neocaml . [(20260710 532) ((emacs (29 1))) "Major mode for OCaml code" tar ((:url . "https://github.com/bbatsov/neocaml") (:commit . "32acab3624160a7d0bb04c42babaa791729ab8b5") (:revdesc . "32acab362416") (:keywords "languages" "ocaml" "ml") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (neon-mode . [(20241220 1304) ((emacs (24 1))) "Simple major mode for editing neon files" tar ((:url . "https://github.com/Fuco1/neon-mode") (:commit . "23b12659d72a9520850bca72fe64bb7b06fc7b6b") (:revdesc . "23b12659d72a") (:keywords "conf") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (neotree . [(20250703 2202) ((cl-lib (0 5))) "A tree plugin like NerdTree for Vim" tar ((:url . "https://github.com/jaypei/emacs-neotree") (:commit . "3178805a0942696d1e5162575d9cab43d14b7970") (:revdesc . "3178805a0942") (:authors ("jaypei" . "jaypei97159@gmail.com")) (:maintainers ("jaypei" . "jaypei97159@gmail.com")) (:maintainer "jaypei" . "jaypei97159@gmail.com"))])
+ (nerd-icons . [(20260823 17) ((emacs (25 1))) "Emacs Nerd Font Icons Library" tar ((:url . "https://github.com/rainstormstudio/nerd-icons.el") (:commit . "17faac7977242b470732efd417d3bcc8eb5a830e") (:revdesc . "17faac797724") (:keywords "lisp") (:authors ("Hongyu Ding" . "rainstormstudio@yahoo.com") ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainers ("Hongyu Ding" . "rainstormstudio@yahoo.com") ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainer "Hongyu Ding" . "rainstormstudio@yahoo.com"))])
+ (nerd-icons-completion . [(20260412 243) ((emacs (25 1)) (nerd-icons (0 0 1)) (compat (30))) "Add icons to completion candidates" tar ((:url . "https://github.com/rainstormstudio/nerd-icons-completion") (:commit . "45b585d972192a3eaeb239e15e55de7f46f8920a") (:revdesc . "45b585d97219") (:keywords "lisp") (:authors ("Hongyu Ding" . "rainstormstudio@yahoo.com")) (:maintainers ("Hongyu Ding" . "rainstormstudio@yahoo.com")) (:maintainer "Hongyu Ding" . "rainstormstudio@yahoo.com"))])
+ (nerd-icons-corfu . [(20260823 1748) ((emacs (27 1)) (nerd-icons (0 1 0))) "Icons for Corfu via nerd-icons" tar ((:url . "https://github.com/LuigiPiucco/nerd-icons-corfu") (:commit . "e1197d6c1db673f4ec7ee20cb2c4297f479420e7") (:revdesc . "e1197d6c1db6") (:keywords "convenience" "files" "icons") (:authors ("Luigi Sartor Piucco" . "luigipiucco@gmail.com")) (:maintainers ("Luigi Sartor Piucco" . "luigipiucco@gmail.com")) (:maintainer "Luigi Sartor Piucco" . "luigipiucco@gmail.com"))])
+ (nerd-icons-dired . [(20260415 1746) ((emacs (24 4)) (nerd-icons (0 0 1))) "Shows icons for each file in dired mode" tar ((:url . "https://github.com/rainstormstudio/nerd-icons-dired") (:commit . "104acd8879528b8115589f35f1bbcbe231ad732f") (:revdesc . "104acd887952") (:keywords "lisp") (:authors ("Hongyu Ding" . "rainstormstudio@yahoo.com")) (:maintainers ("Hongyu Ding" . "rainstormstudio@yahoo.com")) (:maintainer "Hongyu Ding" . "rainstormstudio@yahoo.com"))])
+ (nerd-icons-grep . [(20250625 1435) ((emacs (30 1)) (nerd-icons (0 0 1))) "Add nerd-icons to grep-mode" tar ((:url . "https://github.com/hron/nerd-icons-grep") (:commit . "7179ff3384efce53f7de2f3c1a98070a310a10da") (:revdesc . "7179ff3384ef") (:keywords "tools" "grep" "icons") (:authors ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainers ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainer "Aleksei Gusev" . "aleksei.gusev@gmail.com"))])
+ (nerd-icons-ibuffer . [(20251022 42) ((emacs (24 3)) (nerd-icons (0 0 1))) "Display nerd icons in ibuffer" tar ((:url . "https://github.com/seagle0128/nerd-icons-ibuffer") (:commit . "590bd834cf5f1898320f5f16ecbed0d5fd3167ed") (:revdesc . "590bd834cf5f") (:keywords "convenience" "icons" "ibuffer") (:authors ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainers ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainer "Vincent Zhang" . "seagle0128@gmail.com"))])
+ (nerd-icons-ivy-rich . [(20250307 1005) ((emacs (26 1)) (ivy-rich (0 1 0)) (nerd-icons (0 0 1))) "Excellent experience with nerd icons for ivy/counsel" tar ((:url . "https://github.com/seagle0128/nerd-icons-ivy-rich") (:commit . "5006f91b49e86e232cdc1a628501b76124c41dac") (:revdesc . "5006f91b49e8") (:keywords "convenience" "icons" "ivy") (:authors ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainers ("Vincent Zhang" . "seagle0128@gmail.com")) (:maintainer "Vincent Zhang" . "seagle0128@gmail.com"))])
+ (nerd-icons-xref . [(20251214 1029) ((emacs (30 1)) (nerd-icons (0 0 1)) (xref (1 0 4))) "Add nerd-icons to xref buffers" tar ((:url . "https://github.com/hron/nerd-icons-xref") (:commit . "47db9ce08fe6514ddb36bdd714256f4e3985579a") (:revdesc . "47db9ce08fe6") (:keywords "tools" "xref" "icons") (:authors ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainers ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainer "Aleksei Gusev" . "aleksei.gusev@gmail.com"))])
+ (nerdtab . [(20180811 339) ((emacs (24 5))) "Keyboard-oriented tabs" tar ((:url . "https://github.com/casouri/nerdtab") (:commit . "601d531fa3748db733fbdff157a0f1cdf8a66416") (:revdesc . "601d531fa374") (:keywords "convenience") (:authors ("Yuan Fu" . "casouri@gmail.com")) (:maintainers ("Yuan Fu" . "casouri@gmail.com")) (:maintainer "Yuan Fu" . "casouri@gmail.com"))])
+ (netease-music . [(20210411 603) ((names (0 5)) (emacs (25))) "Listen netease music" tar ((:url . "https://github.com/nicehiro/netease-music") (:commit . "db7f1eef2d8544983509db679be1cbe6a5678071") (:revdesc . "db7f1eef2d85") (:keywords "multimedia" "chinese" "music") (:authors ("hiro方圆" . "wfy11235813@gmail.com")) (:maintainers ("hiro方圆" . "wfy11235813@gmail.com")) (:maintainer "hiro方圆" . "wfy11235813@gmail.com"))])
+ (nethack . [(20260813 839) ((emacs (27 1))) "Run Nethack as a subprocess" tar ((:url . "https://github.com/Feyorsh/nethack-el") (:commit . "1c8475d3d3061c71705b8cfb696c40a38ff745ae") (:revdesc . "1c8475d3d306") (:keywords "games") (:authors ("Ryan Yeske" . "rcyeske@vcn.bc.ca")) (:maintainers ("George Huebner" . "george@feyor.sh")) (:maintainer "George Huebner" . "george@feyor.sh"))])
+ (netherlands-holidays . [(20150202 1617) nil "Netherlands holidays for Emacs calendar" tar ((:url . "https://github.com/abo-abo/netherlands-holidays") (:commit . "26236178cdd650df9958bf5a086e184096559f00") (:revdesc . "26236178cdd6") (:keywords "calendar") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (netrunner . [(20160910 2332) ((popup (0 5 3)) (company (0 9 0)) (helm (1 9 5))) "Create Android: Netrunner decklists using Company, Helm and org-mode" tar ((:url . "https://github.com/Kungsgeten/netrunner") (:commit . "c64672992175c8c1073c0f56c2e471839db71a0f") (:revdesc . "c64672992175") (:keywords "games"))])
+ (network-watch . [(20171123 1146) ((emacs (24 3))) "Support for intermittent network connectivity" tar ((:url . "https://github.com/jamiguet/network-watch") (:commit . "d80b38dbec79f813c3949a8df8fb5f58d48b60ee") (:revdesc . "d80b38dbec79") (:keywords "unix" "tools" "hardware" "lisp") (:authors ("Juan Amiguet Vercher" . "jamiguet@gmail.com")) (:maintainers ("Juan Amiguet Vercher" . "jamiguet@gmail.com")) (:maintainer "Juan Amiguet Vercher" . "jamiguet@gmail.com"))])
+ (neuron-mode . [(20220718 827) ((emacs (26 3)) (f (0 20 0)) (s (1 12 0)) (markdown-mode (2 3)) (company (0 9 13))) "Major mode for editing zettelkasten notes using neuron" tar ((:url . "https://github.com/felko/neuron-mode") (:commit . "33bc73f9a2ef1c6855bb12fec08e15a8cf4a6c6e") (:revdesc . "33bc73f9a2ef") (:keywords "outlines") (:authors ("felko" . "http://github/felko")) (:maintainers ("felko" . "http://github/felko")) (:maintainer "felko" . "http://github/felko"))])
+ (neut-mode . [(20260425 747) ((emacs (29))) "A major mode for Neut" tar ((:url . "https://github.com/vekatze/neut-mode") (:commit . "536ba9641011ea31c019beb6399ffca9945fc34e") (:revdesc . "536ba9641011") (:authors ("vekatze" . "vekatze@icloud.com")) (:maintainers ("vekatze" . "vekatze@icloud.com")) (:maintainer "vekatze" . "vekatze@icloud.com"))])
+ (never-comment . [(20140104 2207) nil "Never blocks are comment" tar ((:url . "http://stackoverflow.com/a/4554658/89376") (:commit . "1996d003cad6bccf1475f7845d79efacbc7cd673") (:revdesc . "1996d003cad6"))])
+ (newlisp-mode . [(20160226 1545) nil "NewLISP editing mode for Emacs" tar ((:url . "https://github.com/kosh04/newlisp-mode") (:commit . "ac23be40c81a360988ab803d365f1510733f6db4") (:revdesc . "ac23be40c81a") (:keywords "language" "lisp" "newlisp") (:authors ("KOBAYASHI Shigeru" . "shigeru.kb[at]gmail.com")) (:maintainers ("KOBAYASHI Shigeru" . "shigeru.kb[at]gmail.com")) (:maintainer "KOBAYASHI Shigeru" . "shigeru.kb[at]gmail.com"))])
+ (newspeak-mode . [(20211011 1425) ((emacs (24 3))) "Major mode for the Newspeak programming language" tar ((:url . "https://github.com/danielsz/newspeak-mode") (:commit . "f76aee3a1f7ff032ed9ef2d3a092f84c8c985e19") (:revdesc . "f76aee3a1f7f") (:maintainers ("Daniel Szmulewicz" . "daniel.szmulewicz@gmail.com")) (:maintainer "Daniel Szmulewicz" . "daniel.szmulewicz@gmail.com"))])
+ (nexus . [(20220902 2009) nil "REST Client for Nexus Maven Repository servers" tar ((:url . "https://github.com/juergenhoetzel/emacs-nexus") (:commit . "9f0ddf7d6cb5f7df44f684f02e2bd8a96ecabbd6") (:revdesc . "9f0ddf7d6cb5") (:keywords "comm") (:authors ("Juergen Hoetzel" . "juergen@archlinux.org")) (:maintainers ("Juergen Hoetzel" . "juergen@archlinux.org")) (:maintainer "Juergen Hoetzel" . "juergen@archlinux.org"))])
+ (nezburn-theme . [(20230726 600) nil "A low contrast color theme for Emacs (inspired by zenburn)" tar ((:url . "https://github.com/lanjoni/nezburn") (:commit . "83ea665941de938350956d62f430de1255a2d36d") (:revdesc . "83ea665941de") (:authors ("João Lanjoni" . "joaoaugustolanjoni@gmail.com")) (:maintainers ("João Lanjoni" . "joaoaugustolanjoni@gmail.com")) (:maintainer "João Lanjoni" . "joaoaugustolanjoni@gmail.com"))])
+ (ng2-mode . [(20201203 1925) ((typescript-mode (0 1))) "Major modes for editing Angular 2" tar ((:url . "https://github.com/AdamNiederer/ng2-mode") (:commit . "d341f177c6e4fb9d99b8639943ab5fc9184e2715") (:revdesc . "d341f177c6e4") (:keywords "typescript" "angular" "angular2" "template") (:authors ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainers ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainer "Adam Niederer" . "adam.niederer@gmail.com"))])
+ (nginx-mode . [(20240412 402) nil "Major mode for editing nginx config files" tar ((:url . "https://github.com/ajc/nginx-mode") (:commit . "c4ac5de975d65c84893a130a470af32a48b0b66c") (:revdesc . "c4ac5de975d6") (:keywords "languages" "nginx") (:authors ("Andrew J Cosgriff" . "andrew@cosgriff.name")) (:maintainers ("Andrew J Cosgriff" . "andrew@cosgriff.name")) (:maintainer "Andrew J Cosgriff" . "andrew@cosgriff.name"))])
+ (nice-org-html . [(20260625 1926) ((emacs (25 1)) (s (1 13 0)) (dash (2 19 1)) (htmlize (1 58)) (uuidgen (1 0))) "Prettier org-to-html export" tar ((:url . "https://github.com/ewantown/nice-org-html") (:commit . "16c9efdd92a12c78a55364f3d5e8e310585aa012") (:revdesc . "16c9efdd92a1") (:keywords "org" "org-export" "html" "css" "js" "tools") (:authors ("Ewan Townshend" . "ewan@etown.dev")) (:maintainers ("Ewan Townshend" . "ewan@etown.dev")) (:maintainer "Ewan Townshend" . "ewan@etown.dev"))])
+ (niceify-info . [(20160416 1244) nil "Improve usability of Info pages" tar ((:url . "https://github.com/aaron-em/niceify-info.el") (:commit . "66b45916f1994e16ee023d29fa7cf8fec48078f1") (:revdesc . "66b45916f199"))])
+ (nickel-mode . [(20240514 1236) ((emacs (24 3))) "A major mode for editing Nickel source code" tar ((:url . "https://github.com/nickel-lang/nickel-mode") (:commit . "71441281e66500e978e10eb44d58e33a28f55b4e") (:revdesc . "71441281e665") (:keywords "languages" "configuration-language" "configuration" "nickel" "infrastructure") (:authors ("The Nickel Team" . "(nickel-lang@tweag.io)")) (:maintainers ("The Nickel Team" . "(nickel-lang@tweag.io)")) (:maintainer "The Nickel Team" . "(nickel-lang@tweag.io)"))])
+ (niconama . [(20170910 1501) ((emacs (24)) (request (20170131 1747)) (cl-lib (0 5))) "Tools for Niconico Live Broadcast" tar ((:url . "https://github.com/NOBUTOKA/niconama.el") (:commit . "96e7553e50e6bf7b58aac50f52c9b0b8edb41c56") (:revdesc . "96e7553e50e6") (:keywords "comm"))])
+ (night-owl-theme . [(20250224 1841) ((emacs (24))) "A color theme for the night owls out there" tar ((:url . "https://github.com/aaronjensen/night-owl-theme") (:commit . "13d9966ffda746231eef0dc905b50303309f115e") (:revdesc . "13d9966ffda7") (:authors ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainers ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainer "Aaron Jensen" . "aaronjensen@gmail.com"))])
+ (nikki . [(20210228 428) ((emacs (24 3))) "A simple diary mode" tar ((:url . "https://github.com/th994/nikki") (:commit . "b2ea20d04a061df88d72bd8dd0412a6e7876458d") (:revdesc . "b2ea20d04a06") (:keywords "convenience") (:authors ("Taiki Harada" . "thdev994@gmail.com")) (:maintainers ("Taiki Harada" . "thdev994@gmail.com")) (:maintainer "Taiki Harada" . "thdev994@gmail.com"))])
+ (nikola . [(20170703 2021) ((async (1 5)) (emacs (24 3))) "Simple wrapper for nikola" tar ((:url . ": https://git.daemons.it/drymer/nikola.el") (:commit . "964715ac30943c9d6976999cad208dc60d09def0") (:revdesc . "964715ac3094") (:keywords ":" "nikola") (:authors ("drymer" . "drymer[AT]autistici.org")) (:maintainers ("drymer" . "drymer[AT]autistici.org")) (:maintainer "drymer" . "drymer[AT]autistici.org"))])
+ (nim-mode . [(20260123 1302) ((emacs (27 1)) (epc (0 1 1)) (let-alist (1 0 1)) (commenter (0 5 1))) "A major mode for the Nim programming language" tar ((:url . "https://github.com/nim-lang/nim-mode") (:commit . "4502f83fbbd262a8a7e014db9affcbf05c8a1e79") (:revdesc . "4502f83fbbd2") (:keywords "nim" "languages") (:maintainers ("Simon Hafner" . "hafnersimon@gmail.com")) (:maintainer "Simon Hafner" . "hafnersimon@gmail.com"))])
+ (nimbus-theme . [(20260826 1711) ((emacs (27 1))) "Nimbus dark theme" tar ((:url . "https://github.com/mrcnski/nimbus-theme") (:commit . "dc7c6923b1ab589456c14a12bfa49c0791330d66") (:revdesc . "dc7c6923b1ab") (:keywords "faces") (:authors ("Marcin Swieczkowski" . "marcin@realemail.net")) (:maintainers ("Marcin Swieczkowski" . "marcin@realemail.net")) (:maintainer "Marcin Swieczkowski" . "marcin@realemail.net"))])
+ (ninetyfive . [(20260213 1623) ((emacs (26 1)) (websocket (1 12)) (async (1 9 7))) "NinetyFive" tar ((:url . "https://github.com/numerataz/ninetyfive.el") (:commit . "f2af587f97168e3544e770e74690cf0d7877c250") (:revdesc . "f2af587f9716") (:keywords "convenience" "productivity"))])
+ (ninja-mode . [(20241103 1737) ((emacs (24 3))) "Major mode for editing .ninja files" tar ((:url . "https://github.com/jhasse/ninja-emacs") (:commit . "573c3aaedc6e90e9a8954bb70a24e079af7df390") (:revdesc . "573c3aaedc6e") (:keywords "languages"))])
+ (nix-buffer . [(20180212 1518) ((f (0 17 3)) (emacs (24 4))) "Set up buffer environments with nix" tar ((:url . "https://github.com/shlevy/nix-buffer/tree/master/") (:commit . "db57cda36e7477bdc7ef5a136357b971b1d4d099") (:revdesc . "db57cda36e74"))])
+ (nix-env-install . [(20200812 1305) ((emacs (25 1))) "Install packages using nix-env" tar ((:url . "https://github.com/akirak/nix-env-install") (:commit . "79c34bc117ba1cebeb67fab32c364951d2ec37a0") (:revdesc . "79c34bc117ba") (:keywords "processes" "tools") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (nix-haskell-mode . [(20190615 135) ((emacs (25)) (haskell-mode (16 0)) (nix-mode (1 3 0))) "Haskell-mode integrations for Nix" tar ((:url . "https://github.com/matthewbauer/nix-haskell") (:commit . "68efbcbf949a706ecca6409506968ed2ef928a20") (:revdesc . "68efbcbf949a") (:keywords "nix" "haskell" "languages" "processes") (:authors ("Matthew Bauer" . "mjbauer95@gmail.com")) (:maintainers ("Matthew Bauer" . "mjbauer95@gmail.com")) (:maintainer "Matthew Bauer" . "mjbauer95@gmail.com"))])
+ (nix-mode . [(20260810 1740) ((emacs (27 1)) (magit-section (0)) (reformatter (0)) (transient (0 3))) "Major mode for editing .nix files" tar ((:url . "https://github.com/NixOS/nix-mode") (:commit . "2c77e7e0b7540efbb20ccaee3557ef90a5dc77f0") (:revdesc . "2c77e7e0b754") (:keywords "nix" "languages" "tools" "unix") (:maintainers ("Matthew Bauer" . "mjbauer95@gmail.com")) (:maintainer "Matthew Bauer" . "mjbauer95@gmail.com"))])
+ (nix-modeline . [(20210405 742) ((emacs (25 1))) "Info about in-progress Nix evaluations on your modeline" tar ((:url . "https://github.com/ocelot-project/nix-modeline") (:commit . "9a6116a11bdacf649f2c50ae1f2f4b12c03bed70") (:revdesc . "9a6116a11bda") (:keywords "processes" "unix" "tools") (:authors ("Jordan Mulcahey" . "snhjordy@gmail.com")) (:maintainers ("Jordan Mulcahey" . "snhjordy@gmail.com")) (:maintainer "Jordan Mulcahey" . "snhjordy@gmail.com"))])
+ (nix-sandbox . [(20210325 1622) ((dash (2 12 1)) (s (1 10 0))) "Utility functions to work with nix-shell sandboxes" tar ((:url . "https://github.com/travisbhartwell/nix-emacs") (:commit . "d3ec98405f1f9dac833abf9e146249b1b943870d") (:revdesc . "d3ec98405f1f") (:authors ("Sven Keidel" . "svenkeidel@gmail.com")) (:maintainers ("Sven Keidel" . "svenkeidel@gmail.com")) (:maintainer "Sven Keidel" . "svenkeidel@gmail.com"))])
+ (nix-ts-mode . [(20260705 1600) ((emacs (29 1))) "Major mode for Nix expressions, powered by tree-sitter" tar ((:url . "https://github.com/nix-community/nix-ts-mode") (:commit . "3b69aeb8d2403ea52b60a46fa452965b7b37a50e") (:revdesc . "3b69aeb8d240") (:keywords "nix" "languages" "tree-sitter") (:maintainers ("Remi Gelinas" . "mail@remigelin.as")) (:maintainer "Remi Gelinas" . "mail@remigelin.as"))])
+ (nix-update . [(20250817 1556) ((emacs (25))) "Update \"fetch\" blocks in .nix expressions" tar ((:url . "https://github.com/jwiegley/nix-update-el") (:commit . "d67f4f7ba8c8ec43144600f5f970c5fd958fc2f7") (:revdesc . "d67f4f7ba8c8") (:keywords "nix") (:authors ("John Wiegley" . "johnw@newartisans.com")) (:maintainers ("John Wiegley" . "johnw@newartisans.com")) (:maintainer "John Wiegley" . "johnw@newartisans.com"))])
+ (nixfmt . [(20240724 1531) ((emacs (24)) (reformatter (0 3))) "Reformat Nix using nixfmt" tar ((:url . "https://github.com/purcell/emacs-nixfmt") (:commit . "9c8a1c12320247a3fe643191b7574a3674fba317") (:revdesc . "9c8a1c123202") (:keywords "languages") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (nixos-options . [(20160209 1841) ((emacs (24))) "Interface for browsing and completing NixOS options" tar ((:url . "http://www.github.com/travisbhartwell/nix-emacs/") (:commit . "045825c2e1cf0a4fb0a472e72c1dae8f55202cef") (:revdesc . "045825c2e1cf") (:keywords "unix") (:authors ("Diego Berrocal" . "cestdiego@gmail.com") ("Travis B. Hartwell" . "nafai@travishartwell.net")) (:maintainers ("Diego Berrocal" . "cestdiego@gmail.com") ("Travis B. Hartwell" . "nafai@travishartwell.net")) (:maintainer "Diego Berrocal" . "cestdiego@gmail.com"))])
+ (nixpkgs-fmt . [(20200327 2302) ((emacs (24)) (reformatter (0 3))) "Reformat Nix using nixpkgs-fmt" tar ((:url . "https://github.com/purcell/emacs-nixpkgs-fmt") (:commit . "83e03d6f20bdf79c1c448c15734367b1a7cc6b02") (:revdesc . "83e03d6f20bd") (:keywords "languages") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (nlinum-hl . [(20211112 1241) ((emacs (24 4)) (nlinum (1 7)) (cl-lib (0 5))) "Heal nlinum's line numbers" tar ((:url . "https://github.com/hlissner/emacs-nlinum-hl") (:commit . "22f8d75ecdaab67e0d6d0d2da4766358456ca4f5") (:revdesc . "22f8d75ecdaa") (:keywords "nlinum" "highlight" "current" "line" "faces") (:authors ("Henrik Lissner" . "http://github/hlissner")) (:maintainers ("Henrik Lissner" . "git@henrik.io")) (:maintainer "Henrik Lissner" . "git@henrik.io"))])
+ (nlinum-relative . [(20160526 708) ((emacs (24 4)) (nlinum (1 5))) "Relative line number with nlinum" tar ((:url . "https://github.com/xcodebuild/nlinum-relative") (:commit . "5b9950c97ba79a6f0683e38b13da23f39e01031c") (:revdesc . "5b9950c97ba7") (:keywords "convenience") (:authors ("codefalling" . "code.falling@gmail.com")) (:maintainers ("codefalling" . "code.falling@gmail.com")) (:maintainer "codefalling" . "code.falling@gmail.com"))])
+ (nndiscourse . [(20241014 2134) ((emacs (27 1)) (rbenv (0 0 3)) (json-rpc (0 0 1))) "Gnus backend for Discourse" tar ((:url . "https://github.com/dickmao/nndiscourse") (:commit . "c8aaf40d3d8f10b0bbb40fa60a2d98c864b05aaf") (:revdesc . "c8aaf40d3d8f") (:keywords "news") (:authors ("dickmao" . "githubid:dickmao")) (:maintainers ("dickmao" . "githubid:dickmao")) (:maintainer "dickmao" . "githubid:dickmao"))])
+ (nnhackernews . [(20260630 1255) ((emacs (25 2)) (request (0 3 3)) (dash (2 18 1)) (anaphora (1 0 4))) "Gnus backend for Hacker News" tar ((:url . "https://github.com/dickmao/nnhackernews") (:commit . "0cb7ff0a86c9c5b08786b6dc0591adcb25fbe3b3") (:revdesc . "0cb7ff0a86c9") (:keywords "news") (:authors ("dickmao" . "githubid:dickmao")) (:maintainers ("dickmao" . "githubid:dickmao")) (:maintainer "dickmao" . "githubid:dickmao"))])
+ (nnir-est . [(20180710 2103) nil "Gnus nnir interface for HyperEstraier" tar ((:url . "https://github.com/kawabata/nnir-est") (:commit . "6d0d5c8e33f4e4ccbc22350324c0990d2676fb5a") (:revdesc . "6d0d5c8e33f4") (:keywords "mail") (:authors ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (nnreddit . [(20250831 1249) ((emacs (25 1)) (request (0 3 3)) (anaphora (1 0 4)) (dash (2 18 1)) (json-rpc (0 0 1)) (virtualenvwrapper (20151123)) (s (1 6 1))) "Gnus Backend For Reddit" tar ((:url . "https://github.com/dickmao/nnreddit") (:commit . "4b194b5953e9d4e6d94ce929fc264cd2b9e200a4") (:revdesc . "4b194b5953e9") (:keywords "news") (:authors ("dickmao" . "githubid:dickmao")) (:maintainers ("dickmao" . "githubid:dickmao")) (:maintainer "dickmao" . "githubid:dickmao"))])
+ (nntwitter . [(20230705 1110) ((emacs (25 1)) (dash (20190401)) (anaphora (20180618)) (request (20190819))) "Gnus Backend For Twitter" tar ((:url . "https://github.com/dickmao/nntwitter") (:commit . "e27acca9beeb6645dd13545d42f6d4d97d59d82c") (:revdesc . "e27acca9beeb") (:keywords "news") (:authors ("dickmao" . "githubid:dickmao")) (:maintainers ("dickmao" . "githubid:dickmao")) (:maintainer "dickmao" . "githubid:dickmao"))])
+ (no-emoji . [(20180515 1837) ((emacs (24))) "Show :emoji-name: instead of emoji characters" tar ((:url . "https://github.com/ecraven/no-emoji") (:commit . "ebceeab50dbfe4d60235180a57633745dbc18c77") (:revdesc . "ebceeab50dbf") (:keywords "extensions") (:authors ("Peter" . "craven@gmx.net")) (:maintainers ("Peter" . "craven@gmx.net")) (:maintainer "Peter" . "craven@gmx.net"))])
+ (no-littering . [(20260817 404) ((emacs (28 1)) (compat (31 0))) "Help keeping ~/.config/emacs clean" tar ((:url . "https://github.com/emacscollective/no-littering") (:commit . "22235d2790d086db418c1b487e6cd700a8fa8237") (:revdesc . "22235d2790d0") (:keywords "convenience") (:authors ("Jonas Bernoulli" . "emacs.no-littering@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.no-littering@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.no-littering@jonas.bernoulli.dev"))])
+ (no-spam . [(20190724 1854) ((emacs (25 1))) "Add repeat delays to commands" tar ((:url . "https://github.com/mamapanda/no-spam") (:commit . "860860e4a0d59bd15c8e092dc42f5f7f769a428e") (:revdesc . "860860e4a0d5") (:keywords "keyboard" "tools") (:authors ("Daniel Phan" . "daniel.phan36@gmail.com")) (:maintainers ("Daniel Phan" . "daniel.phan36@gmail.com")) (:maintainer "Daniel Phan" . "daniel.phan36@gmail.com"))])
+ (noaa . [(20250102 2211) ((emacs (27 1)) (kv (0 0 19)) (request (0 2 0)) (s (1 12 0))) "Get NOAA weather data" tar ((:url . "https://codeberg.org/thomp/noaa") (:commit . "d162d19dd057430840a08ede0ce333fc30ea5ab9") (:revdesc . "d162d19dd057") (:keywords "calendar"))])
+ (noccur . [(20191015 719) nil "Run multi-occur on project/dired files" tar ((:url . "https://github.com/NicolasPetton/noccur.el") (:commit . "fa91647a305e89561d3dbe53da002fff49abe0bb") (:revdesc . "fa91647a305e") (:keywords "convenience") (:authors ("Nicolas Petton" . "petton.nicolas@gmail.com")) (:maintainers ("Nicolas Petton" . "petton.nicolas@gmail.com")) (:maintainer "Nicolas Petton" . "petton.nicolas@gmail.com"))])
+ (nocomments-mode . [(20250103 1842) nil "Minor mode that makes comments invisible" tar ((:url . "https://github.com/Lindydancer/nocomments-mode") (:commit . "aaa9ef1042e0084fb774b3ee4274e1f8edb4d35e") (:revdesc . "aaa9ef1042e0"))])
+ (noctilux-theme . [(20161113 1442) ((emacs (24))) "Dark theme inspired by LightTable" tar ((:url . "https://github.com/sjrmanning/noctilux-theme") (:commit . "a3265a1be7f4d73f44acce6d968ca6f7add1f2ca") (:revdesc . "a3265a1be7f4") (:authors ("Simon Manning" . "simon@ecksdee.org")) (:maintainers ("Simon Manning" . "simon@ecksdee.org")) (:maintainer "Simon Manning" . "simon@ecksdee.org"))])
+ (node-resolver . [(20140930 1723) ((cl-lib (0 5))) "Hook to install node modules in background" tar ((:url . "https://github.com/meandavejustice/node-resolver.el") (:commit . "ef9d0486907a746a80b02ffc6208a09c168a9f7c") (:revdesc . "ef9d0486907a") (:keywords "convenience" "nodejs" "javascript" "npm"))])
+ (nodejs-repl . [(20240218 2357) nil "Run Node.js REPL" tar ((:url . "https://github.com/abicky/nodejs-repl.el") (:commit . "77a864ca72a6c30217085f1c4db5de72e47eb4da") (:revdesc . "77a864ca72a6"))])
+ (nodemcu-mode . [(20180501 2225) ((emacs (25))) "Minor mode for NodeMCU" tar ((:url . "https://github.com/andrmuel/nodemcu-mode") (:commit . "8effd9f3df40b6b92a2f05e4d54750b624afc4a7") (:revdesc . "8effd9f3df40") (:keywords "tools") (:authors ("Andreas Müller" . "code@0x7.ch")) (:maintainers ("Andreas Müller" . "code@0x7.ch")) (:maintainer "Andreas Müller" . "code@0x7.ch"))])
+ (noether . [(20250320 1847) ((posframe (1 4 2)) (emacs (29 1))) "A modeline which plays hide and seek" tar ((:url . "https://devheroes.codes/lxsameer/noether") (:commit . "c7b85569181f351ae03c4f4d3f622549332534cd") (:revdesc . "c7b85569181f") (:keywords "frames" "modeline") (:authors ("Sameer Rahmani" . "lxsameer@gnu.org")) (:maintainers ("Sameer Rahmani" . "lxsameer@gnu.org")) (:maintainer "Sameer Rahmani" . "lxsameer@gnu.org"))])
+ (noflet . [(20141102 1454) nil "Locally override functions" tar ((:url . "https://github.com/nicferrier/emacs-noflet") (:commit . "7ae84dc3257637af7334101456dafe1759c6b68a") (:revdesc . "7ae84dc32576") (:keywords "lisp") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (nofrils-acme-theme . [(20180620 1248) ((emacs (24))) "Port of \"No Frils Acme\" Vim theme" tar ((:url . "https://gitlab.com/esessoms/nofrils-theme") (:commit . "98ad7bfaff1d85b33dc162645670285b067c6f92") (:revdesc . "98ad7bfaff1d") (:authors ("Eric Sessoms" . "esessoms@protonmail.com")) (:maintainers ("Eric Sessoms" . "esessoms@protonmail.com")) (:maintainer "Eric Sessoms" . "esessoms@protonmail.com"))])
+ (noir-mode . [(20230726 2309) ((emacs (25 1)) (rust-mode (1 0 5))) "Description" tar ((:url . "https://github.com/hhamud/noir-mode") (:commit . "aa6686e15a63498af327cc64f1d79e84c60bda42") (:revdesc . "aa6686e15a63") (:keywords "languages"))])
+ (noir-ts-mode . [(20260318 1735) ((emacs (29 1))) "Tree-sitter support for Noir" tar ((:url . "https://github.com/hhamud/noir-ts-mode") (:commit . "64af37811e0ab91ab1bc333d0961e15b66356944") (:revdesc . "64af37811e0a") (:keywords "noir" "languages" "tree-sitter") (:authors ("Hamza Hamud" . "self@hamzahamud.com")) (:maintainers ("Hamza Hamud" . "self@hamzahamud.com")) (:maintainer "Hamza Hamud" . "self@hamzahamud.com"))])
+ (noman . [(20240610 1145) ((emacs (29 1))) "Read command line help without a man page" tar ((:url . "https://github.com/andykuszyk/noman.el") (:commit . "61ab9c52273fc03b28881a5ce814b863cf050571") (:revdesc . "61ab9c52273f") (:keywords "docs") (:authors ("Andy Kuszyk" . "emacs@akuszyk.com")) (:maintainers ("Andy Kuszyk" . "emacs@akuszyk.com")) (:maintainer "Andy Kuszyk" . "emacs@akuszyk.com"))])
+ (non-edit-mode . [(20230926 1404) ((emacs (24 1))) "Minor mode that disables editing" tar ((:url . "https://gitlab.com/aragaer/non-edit-mode") (:commit . "bc9d29e437d70675c725f3ef8a66abe574b9a142") (:revdesc . "bc9d29e437d7") (:keywords "convenience") (:authors ("aragaer" . "aragaer@gmail.com")) (:maintainers ("aragaer" . "aragaer@gmail.com")) (:maintainer "aragaer" . "aragaer@gmail.com"))])
+ (nord-theme . [(20250312 2046) ((emacs (24))) "An arctic, north-bluish clean and elegant theme" tar ((:url . "https://github.com/nordtheme/emacs") (:commit . "551b2b8a0751c0a22e5c5daa6958152f208e668f") (:revdesc . "551b2b8a0751") (:authors ("Sven Greb" . "development@svengreb.de")) (:maintainers ("Sven Greb" . "development@svengreb.de")) (:maintainer "Sven Greb" . "development@svengreb.de"))])
+ (nordic-night-theme . [(20250624 1732) ((emacs (24 1))) "A darker, more colorful version of the lovely Nord theme" tar ((:url . "https://codeberg.org/ashton314/nordic-night") (:commit . "a500ccc22fab22b291dfbddc8c534e665ae144f9") (:revdesc . "a500ccc22fab") (:authors ("Ashton Wiersdorf" . "mail@wiersdorf.dev")) (:maintainers ("Ashton Wiersdorf" . "mail@wiersdorf.dev")) (:maintainer "Ashton Wiersdorf" . "mail@wiersdorf.dev"))])
+ (nordless-theme . [(20201222 1627) ((colorless-themes (0 2))) "A mostly colorless version of nord-theme" tar ((:url . "https://git.sr.ht/~lthms/colorless-themes.el") (:commit . "1b2a507b3b7f9559c944af8fc7531a60b38ae0c3") (:revdesc . "1b2a507b3b7f") (:keywords "faces" "theme") (:authors ("Thomas Letan" . "lthms@soap.coffee")) (:maintainers ("Thomas Letan" . "lthms@soap.coffee")) (:maintainer "Thomas Letan" . "lthms@soap.coffee"))])
+ (norns . [(20241011 1212) ((emacs (27 1)) (dash (2 17 0)) (s (1 12 0)) (f (0 20 0)) (request (0 3 2)) (websocket (1 13)) (lua-mode (20221218 605))) "Interactive development environment for monome norns" tar ((:url . "https://github.com/p3r7/norns.el") (:commit . "d08eed8555a619a13aa99cfa2ef40e199e86114c") (:revdesc . "d08eed8555a6") (:keywords "processes" "terminals"))])
+ (northcode-theme . [(20180423 1649) ((emacs (24))) "A dark theme focused on blue and orange colors" tar ((:url . "https://github.com/Northcode/northcode-theme.el") (:commit . "4d3750461ba25ec45321318b5f1af4e8fdf16147") (:revdesc . "4d3750461ba2") (:authors ("Andreas Larsen" . "andreas@northcode.no")) (:maintainers ("Andreas Larsen" . "andreas@northcode.no")) (:maintainer "Andreas Larsen" . "andreas@northcode.no"))])
+ (nostr-publish . [(20260223 951) ((emacs (27 1))) "Publish Markdown to Nostr" tar ((:url . "https://github.com/941design/emacs-nostr-publish") (:commit . "f39220f2aaff5fc39e4268d6449a1a402a69cafa") (:revdesc . "f39220f2aaff") (:keywords "comm" "text") (:authors ("Markus Rother" . "mail@markusrother.de")) (:maintainers ("Markus Rother" . "mail@markusrother.de")) (:maintainer "Markus Rother" . "mail@markusrother.de"))])
+ (nothing-theme . [(20200504 402) ((emacs (24 1))) "Monochrome theme" tar ((:url . "https://github.com/jaredgorski/nothing.el") (:commit . "17fc9ecc94af0c919a24c4fe92bb48890bb4c3b0") (:revdesc . "17fc9ecc94af") (:authors (nil . "jaredgorski6@gmail.com")) (:maintainers (nil . "jaredgorski6@gmail.com")) (:maintainer nil . "jaredgorski6@gmail.com"))])
+ (notink-theme . [(20240625 326) ((emacs (26 1))) "A custom theme inspired by e-ink displays" tar ((:url . "https://github.com/MetroWind/notink-theme") (:commit . "d1e84622a491bb570d6a450706833fafaad74f39") (:revdesc . "d1e84622a491") (:keywords "faces") (:authors ("MetroWind" . "chris.corsair@gmail.com")) (:maintainers ("MetroWind" . "chris.corsair@gmail.com")) (:maintainer "MetroWind" . "chris.corsair@gmail.com"))])
+ (notmuch . [(20260314 2247) nil "Run notmuch within emacs" tar ((:url . "https://notmuchmail.org") (:commit . "094744b3f6f5c6831b6555d1fe75709abf1d1279") (:revdesc . "094744b3f6f5") (:authors ("Carl Worth" . "cworth@cworth.org")) (:maintainers ("Carl Worth" . "cworth@cworth.org")) (:maintainer "Carl Worth" . "cworth@cworth.org"))])
+ (notmuch-addr . [(20260601 1530) ((emacs (29 1)) (compat (31 0)) (notmuch (0 39))) "Improved address completion for Notmuch" tar ((:url . "https://github.com/tarsius/notmuch-addr") (:commit . "0cb6f9e0dc0e27b31b4849630f7e74bafaa78758") (:revdesc . "0cb6f9e0dc0e") (:keywords "mail") (:authors ("Jonas Bernoulli" . "emacs.notmuch-addr@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.notmuch-addr@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.notmuch-addr@jonas.bernoulli.dev"))])
+ (notmuch-bookmarks . [(20251203 2059) ((seq (2 20)) (emacs (26 1)) (notmuch (0 29 3))) "Add bookmark handling for notmuch buffers" tar ((:url . "https://github.com/publicimageltd/notmuch-bookmarks") (:commit . "11375003fc0a8440b7ff721b786a8eb4493af45f") (:revdesc . "11375003fc0a") (:keywords "mail") (:authors ("Jörg Volbers" . "joerg@joergvolbers.de")) (:maintainers ("Jörg Volbers" . "joerg@joergvolbers.de")) (:maintainer "Jörg Volbers" . "joerg@joergvolbers.de"))])
+ (notmuch-labeler . [(20131230 1719) ((notmuch (0))) "Improve notmuch way of displaying labels" tar ((:url . "https://github.com/DamienCassou/notmuch-labeler") (:commit . "d65d1129555d368243df4770ecc1e7ccb88efc58") (:revdesc . "d65d1129555d") (:keywords "emacs" "package" "elisp" "notmuch" "emails") (:authors ("Damien Cassou" . "damien.cassou@gmail.com")) (:maintainers ("Damien Cassou" . "damien.cassou@gmail.com")) (:maintainer "Damien Cassou" . "damien.cassou@gmail.com"))])
+ (notmuch-maildir . [(20260601 1530) ((emacs (29 1)) (compat (31 0)) (notmuch (0 39))) "Display maildirs as a tree" tar ((:url . "https://github.com/tarsius/notmuch-maildir") (:commit . "1ed7738468da9910a9bd32f3c44201ab1e9db242") (:revdesc . "1ed7738468da") (:keywords "mail") (:authors ("Jonas Bernoulli" . "emacs.notmuch-maildir@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.notmuch-maildir@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.notmuch-maildir@jonas.bernoulli.dev"))])
+ (notmuch-multi . [(20260616 722) ((emacs (29)) (notmuch (0 38 3))) "Prettified Notmuch UI For Multiple Accounts" tar ((:url . "https://github.com/pivaldi/notmuch-multi") (:commit . "baf954b1d510b0e298823ac9c4b1174d953a24c0") (:revdesc . "baf954b1d510") (:keywords "mail" "notmuch") (:authors ("Philippe IVALDI" . "emacs@ivaldi.me")) (:maintainers ("Philippe IVALDI" . "emacs@ivaldi.me")) (:maintainer "Philippe IVALDI" . "emacs@ivaldi.me"))])
+ (notmuch-transient . [(20260701 1305) ((emacs (29 1)) (compat (31 0)) (notmuch (0 39)) (transient (0 13))) "Command dispatchers for Notmuch" tar ((:url . "https://github.com/tarsius/notmuch-transient") (:commit . "e60942fce3cb1f6a11533500c670ca4ac22186e5") (:revdesc . "e60942fce3cb") (:keywords "mail") (:authors ("Jonas Bernoulli" . "emacs.notmuch-transient@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.notmuch-transient@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.notmuch-transient@jonas.bernoulli.dev"))])
+ (nov . [(20251213 1501) ((esxml (0 3 6)) (emacs (25 1))) "Featureful EPUB reader mode" tar ((:url . "https://depp.brause.cc/nov.el") (:commit . "874daf5e4791a6d4f47741422c80e2736e907351") (:revdesc . "874daf5e4791") (:keywords "hypermedia" "multimedia" "epub") (:authors ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (nova-theme . [(20260508 2135) ((emacs (24 3))) "A dark, pastel color theme" tar ((:url . "https://github.com/muirmanders/emacs-nova-theme") (:commit . "84915bcaf5b5ac3accd39853a17b59483e38a8ac") (:revdesc . "84915bcaf5b5") (:keywords "theme" "dark" "nova" "pastel" "faces") (:authors ("Muir Manders" . "muir+emacs@mnd.rs")) (:maintainers ("Muir Manders" . "muir+emacs@mnd.rs")) (:maintainer "Muir Manders" . "muir+emacs@mnd.rs"))])
+ (now-playing . [(20260815 1824) ((emacs (30 1)) (transient (0 9 0))) "Interface for the macOS Music app" tar ((:url . "https://github.com/kickingvegas/now-playing") (:commit . "262766052b0036e3e3600248e30f3ac4aca24f9d") (:revdesc . "262766052b00") (:keywords "tools") (:authors ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainers ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainer "Charles Choi" . "kickingvegas@gmail.com"))])
+ (noxml-fold . [(20170823 1357) nil "Fold away XML things" tar ((:url . "https://github.com/paddymcall/noxml-fold") (:commit . "46c7f6a008672213238a9f8d7a416ce80916aa62") (:revdesc . "46c7f6a00867") (:keywords "xml" "folding") (:authors ("Patrick McAllister" . "pma@rdorte.org")) (:maintainers ("Patrick McAllister" . "pma@rdorte.org")) (:maintainer "Patrick McAllister" . "pma@rdorte.org"))])
+ (npm . [(20241222 1207) ((emacs (25 1)) (transient (0 1 0)) (jest (20220807 2243))) "Run your npm workflows" tar ((:url . "https://github.com/shaneikennedy/npm.el") (:commit . "45ac45b700c97b61e3133e7a17befb4ebc1d4332") (:revdesc . "45ac45b700c9") (:keywords "tools"))])
+ (npm-mode . [(20190616 2025) ((emacs (24 1))) "Minor mode for working with npm projects" tar ((:url . "https://github.com/mojochao/npm-mode") (:commit . "3ee7c0bad5b7a041d4739ef3aaa06a3dc764e5eb") (:revdesc . "3ee7c0bad5b7") (:keywords "convenience" "project" "javascript" "node" "npm") (:authors ("Allen Gooch" . "allen.gooch@gmail.com")) (:maintainers ("Allen Gooch" . "allen.gooch@gmail.com")) (:maintainer "Allen Gooch" . "allen.gooch@gmail.com"))])
+ (nrepl-eval-sexp-fu . [(20201007 2311) ((highlight (0 0 0)) (smartparens (0 0 0)) (thingatpt (0 0 0))) "Tiny functionality enhancements for evaluating sexps" tar ((:url . "https://github.com/samaaron/nrepl-eval-sexp-fu") (:commit . "2d6ad728b1ba290974a2ae1f232a5a96810a135b") (:revdesc . "2d6ad728b1ba") (:keywords "lisp" "highlight" "convenience") (:authors ("Takeshi Banse" . "takebi@laafc.net")) (:maintainers ("Takeshi Banse" . "takebi@laafc.net")) (:maintainer "Takeshi Banse" . "takebi@laafc.net"))])
+ (nrepl-sync . [(20140807 1557) ((cider (0 6))) "Connect to nrepl port and eval .sync.clj" tar ((:url . "https://github.com/phillord/lein-sync") (:commit . "471a08df87687a3eab61b3b8bf25a2e0962b5d5b") (:revdesc . "471a08df8768") (:authors ("Phillip Lord" . "phillip.lord@newcastle.ac.uk")) (:maintainers ("Phillip Lord" . "phillip.lord@newcastle.ac.uk")) (:maintainer "Phillip Lord" . "phillip.lord@newcastle.ac.uk"))])
+ (ns-auto-titlebar . [(20181022 2154) ((emacs (24 4))) "Set the MacOS transparent titlebar to match theme" tar ((:url . "https://github.com/purcell/ns-auto-titlebar") (:commit . "b16092e8058af63ad2bc222f166b0aa3cb66bf9d") (:revdesc . "b16092e8058a") (:keywords "frames") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (nsis-mode . [(20260628 1801) nil "NSIS-mode" tar ((:url . "https://github.com/mlf176f2/nsis-mode") (:commit . "5ee283dd4da0bf8ca90cc8210da6ad94899d50b9") (:revdesc . "5ee283dd4da0") (:keywords "nsis"))])
+ (nswbuff . [(20230311 154) ((emacs (25 1))) "Quick switching between buffers" tar ((:url . "https://github.com/joostkremers/nswbuff") (:commit . "dfea30e33ddb212a0d537bc927b4bcdf3ebe2cd1") (:revdesc . "dfea30e33ddb") (:keywords "extensions" "convenience") (:authors ("David Ponce" . "david@dponce.com") ("Kahlil HODGSON" . "dorge@tpg.com.au") ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainers ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainer "Joost Kremers" . "joostkremers@fastmail.fm"))])
+ (nu-mode . [(20250211 1243) ((undo-tree (0 6 5)) (ace-window (0)) (lv (0)) (avy (0)) (which-key (0)) (transpose-frame (0))) "Modern Emacs Keybinding" tar ((:url . "https://github.com/pyluyten/emacs-nu") (:commit . "6510bc3f22e921aeb8ef3190bca1f432acc2870e") (:revdesc . "6510bc3f22e9"))])
+ (nu-ts-mode . [(20260721 1414) ((emacs (29 1))) "Major mode for Nushell scripts, powered by treesitter" tar ((:url . "https://github.com/ItsOleks/nu-ts-mode") (:commit . "088c09c86bb1cfb04329828922b893bcfff308bd") (:revdesc . "088c09c86bb1") (:keywords "nushell" "nu" "languages" "tree-sitter") (:authors ("Oleksandr Makhmudov" . "oleksandr.makhmudov@proton.me")) (:maintainers ("Oleksandr Makhmudov" . "oleksandr.makhmudov@proton.me")) (:maintainer "Oleksandr Makhmudov" . "oleksandr.makhmudov@proton.me"))])
+ (nubox . [(20170619 910) nil "Nubox color theme (dark, light and tty versions)" tar ((:url . "https://github.com/martijnat/nubox") (:commit . "84aa965f0cb4bde293237e4cc586643d1f662f83") (:revdesc . "84aa965f0cb4") (:keywords "faces") (:authors ("Martijn Terpstra" . "bigmartijn@gmail.com")) (:maintainers ("Martijn Terpstra" . "bigmartijn@gmail.com")) (:maintainer "Martijn Terpstra" . "bigmartijn@gmail.com"))])
+ (nucleo-completion . [(20260530 1008) ((emacs (27 1))) "Nucleo-backed completion style" tar ((:url . "https://github.com/kn66/nucleo-completion.el") (:commit . "0f07a5bcd384716a3b79ab9e82005bb54f721122") (:revdesc . "0f07a5bcd384") (:keywords "matching" "convenience") (:authors ("Nobu" . "https://github.com/kn66")) (:maintainers ("Nobu" . "https://github.com/kn66")) (:maintainer "Nobu" . "https://github.com/kn66"))])
+ (number . [(20170901 1312) nil "Working with numbers at point" tar ((:url . "https://github.com/emacsattic/number") (:commit . "bbc278d34dbcca83e70e3be855ec98b23debfb99") (:revdesc . "bbc278d34dbc"))])
+ (number-lock . [(20160830 200) nil "Enter symbols on your number keys without pressing shift" tar ((:url . "https://github.com/Liu233w/number-lock.el") (:commit . "1ac1b1a269128ddac820df7d45a8d0c703e9c05c") (:revdesc . "1ac1b1a26912") (:keywords "convenience") (:authors ("Liu233w" . "wwwlsmcom@outlook.com")) (:maintainers ("Liu233w" . "wwwlsmcom@outlook.com")) (:maintainer "Liu233w" . "wwwlsmcom@outlook.com"))])
+ (numbers . [(20260408 754) ((emacs (24))) "Display information and trivia about numbers" tar ((:url . "https://github.com/davep/numbers.el") (:commit . "cc9a3d5183f305634e5a5285b1f5e410fe8602c5") (:revdesc . "cc9a3d5183f3") (:keywords "games" "trivia" "maths" "numbers") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (numbex . [(20230601 1618) ((emacs (26 1))) "Manage numbered examples" tar ((:url . "https://github.com/enricoflor/numbex") (:commit . "b64f51388726363fc0d154219e2270c6b9c5ce19") (:revdesc . "b64f51388726") (:authors ("Enrico Flor" . "enrico@eflor.net")) (:maintainers ("Enrico Flor" . "enrico@eflor.net")) (:maintainer "Enrico Flor" . "enrico@eflor.net"))])
+ (numeri . [(20260304 2239) ((emacs (29 1))) "Roman Numeral Conversion Library" tar ((:url . "https://github.com/kickingvegas/numeri") (:commit . "a6a7c0ab050e6bda191372792572096d3fe33134") (:revdesc . "a6a7c0ab050e") (:keywords "tools") (:authors ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainers ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainer "Charles Choi" . "kickingvegas@gmail.com"))])
+ (numpydoc . [(20230811 1708) ((emacs (25 1)) (s (1 12 0)) (dash (2 18 0))) "NumPy style docstring insertion" tar ((:url . "https://github.com/douglasdavis/numpydoc.el") (:commit . "77e2893442c6e20af9c99b9ba2c6c11988fe0e80") (:revdesc . "77e2893442c6") (:keywords "convenience") (:authors ("Doug Davis" . "ddavis@ddavis.io")) (:maintainers ("Doug Davis" . "ddavis@ddavis.io")) (:maintainer "Doug Davis" . "ddavis@ddavis.io"))])
+ (nushell-mode . [(20260803 917) ((emacs (24 4))) "Major mode for Nushell scripts" tar ((:url . "https://github.com/mrkkrp/nushell-mode") (:commit . "1fbc56d406c4ec9ad699e19735203a1478c31e49") (:revdesc . "1fbc56d406c4") (:keywords "languages" "unix") (:authors ("Azzam S.A" . "vcs@azzamsa.com")) (:maintainers ("Azzam S.A" . "vcs@azzamsa.com")) (:maintainer "Azzam S.A" . "vcs@azzamsa.com"))])
+ (nushell-ts-mode . [(20260705 141) ((emacs (29 1))) "Tree-sitter support for Nushell" tar ((:url . "https://github.com/herbertjones/nushell-ts-mode") (:commit . "49915cd99d62b7e743bd8cf9023a5819479d166f") (:revdesc . "49915cd99d62") (:keywords "nu" "nushell" "languages" "tree-sitter") (:authors ("Herbert Jones" . "jones.herbert@gmail.com")) (:maintainers ("Herbert Jones" . "jones.herbert@gmail.com")) (:maintainer "Herbert Jones" . "jones.herbert@gmail.com"))])
+ (nv-delete-back . [(20170224 1249) ((emacs (24))) "Backward delete like modern text editors" tar ((:url . "https://gitlab.com/nivaca/nv-delete-back") (:commit . "44d506105989873dc1725e0cfc675925b35c9c98") (:revdesc . "44d506105989") (:keywords "lisp") (:authors ("Nicolas Vaughan" . "n.vaughan[at]oxon.org")) (:maintainers ("Nicolas Vaughan" . "n.vaughan[at]oxon.org")) (:maintainer "Nicolas Vaughan" . "n.vaughan[at]oxon.org"))])
+ (nvm . [(20240921 1901) ((s (1 8 0)) (dash (2 18 0)) (f (0 14 0))) "Manage Node versions within Emacs" tar ((:url . "https://github.com/rejeep/nvm.el") (:commit . "d33f5b9260426617e27ca79c78d83a5e00073f97") (:revdesc . "d33f5b926042") (:keywords "node" "nvm") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (nxml-uxml . [(20220606 1213) ((emacs (25))) "MicroXML support for nXML" tar ((:url . "https://gitlab.com/dpk/nxml-uxml") (:commit . "95bbd0018ab218b9f39f5bf1f1e809f60fbc3edc") (:revdesc . "95bbd0018ab2") (:keywords "languages" "xml" "microxml"))])
+ (nyan-mode . [(20220408 2334) ((emacs (24 1))) "Nyan Cat shows position in current buffer in mode-line" tar ((:url . "https://github.com/TeMPOraL/nyan-mode/") (:commit . "09904af23adb839c6a9c1175349a1fb67f5b4370") (:revdesc . "09904af23adb") (:keywords "convenience" "games" "mouse" "multimedia") (:authors ("Jacek TeMPOraL Zlydach" . "temporal.pl@gmail.com")) (:maintainers ("Jacek TeMPOraL Zlydach" . "temporal.pl@gmail.com")) (:maintainer "Jacek TeMPOraL Zlydach" . "temporal.pl@gmail.com"))])
+ (nyx-theme . [(20170910 1307) ((emacs (24))) "Dark theme" tar ((:url . "https://github.com/GuidoSchmidt/emacs-nyx-theme") (:commit . "afe2b8c3b5421b4c292d182dcf77079b278e93d8") (:revdesc . "afe2b8c3b542") (:keywords "themes" "dark-theme") (:maintainers ("Guido Schmidt" . "guido.schmidt.2912@gmail.com")) (:maintainer "Guido Schmidt" . "guido.schmidt.2912@gmail.com"))])
+ (oauth . [(20230706 2026) ((emacs (25 1))) "OAuth 1.0 client library" tar ((:url . "https://github.com/fvdbeek/emacs-oauth") (:commit . "737f4058b3239261cf7c95043034b95f1ce3b282") (:revdesc . "737f4058b323") (:keywords "comm") (:authors ("Peter Sanford" . "peter@petersdanceparty.com") ("Neil Roberts" . "bpeeluk@yahoo.co.uk")) (:maintainers ("Folkert van der Beek" . "folkertvanderbeek@gmail.com")) (:maintainer "Folkert van der Beek" . "folkertvanderbeek@gmail.com"))])
+ (oauth2-auto . [(20260725 1535) ((emacs (26 1)) (aio (1 0)) (alert (1 2)) (dash (2 19))) "Automatically refreshing OAuth 2.0 tokens" tar ((:url . "https://github.com/rhaps0dy/emacs-oauth2-auto") (:commit . "1f046222a51a1650f48895437996c8f83940bc31") (:revdesc . "1f046222a51a") (:keywords "comm" "oauth2") (:authors ("Adrià Garriga-Alonso" . "adria.garriga@gmail.com")) (:maintainers ("Adrià Garriga-Alonso" . "adria.garriga@gmail.com")) (:maintainer "Adrià Garriga-Alonso" . "adria.garriga@gmail.com"))])
+ (oauth2-request . [(20260516 830) ((emacs (27 1)) (oauth2 (0 18 4)) (request (0 3 3))) "OAuth2 request package interface" tar ((:url . "https://github.com/conao3/oauth2-request.el") (:commit . "f6b7ba42ecdfd4cc3588bd57bbb345bdae9b9cd6") (:revdesc . "f6b7ba42ecdf") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (ob-acl2 . [(20240505 1844) ((emacs (28)) (org (9))) "Babel Functions for ACL2" tar ((:url . "https://github.com/tani/ob-acl2") (:commit . "db6b274de3cd16e17b5b525c94bf3ad9cc279970") (:revdesc . "db6b274de3cd") (:keywords "tools" "org" "literate programming" "theorem proving" "acl2" "proof assistant system") (:authors ("TANIGUCHI Masaya" . "masaya.taniguchi@a.riken.jp")) (:maintainers ("TANIGUCHI Masaya" . "masaya.taniguchi@a.riken.jp")) (:maintainer "TANIGUCHI Masaya" . "masaya.taniguchi@a.riken.jp"))])
+ (ob-ada-spark . [(20221114 2007) ((emacs (26 1)) (f (0 20 0))) "Babel functions for Ada & SPARK" tar ((:url . "https://github.com/rocher/ob-ada-spark") (:commit . "92978410ca14aa4e84c229a0920ad40be91c35e1") (:revdesc . "92978410ca14") (:keywords "languages" "tools" "outlines"))])
+ (ob-agent-shell . [(20260727 2317) ((emacs (29 1)) (agent-shell (0 50 1)) (org (9 6))) "Org-babel backend for agent-shell" tar ((:url . "https://github.com/eddof13/ob-agent-shell") (:commit . "012e2d8acf152ee096d95e4b52ef3e82507e93a2") (:revdesc . "012e2d8acf15") (:keywords "tools" "convenience" "outlines") (:authors ("Eddie Jesinsky" . "eddie@jesinsky.com")) (:maintainers ("Eddie Jesinsky" . "eddie@jesinsky.com")) (:maintainer "Eddie Jesinsky" . "eddie@jesinsky.com"))])
+ (ob-aider . [(20250325 1918) ((emacs (27 1)) (org (9 4))) "Org Babel functions for Aider.el & Aidermacs integration" tar ((:url . "https://github.com/localredhead/ob-aider.el") (:commit . "f611b0e733323c04bbbcab710a78a87f47e5fc74") (:revdesc . "f611b0e73332") (:keywords "tools" "convenience" "languages" "org" "processes") (:authors ("Levi Strope" . "levi.strope@gmail.com")) (:maintainers ("Levi Strope" . "levi.strope@gmail.com")) (:maintainer "Levi Strope" . "levi.strope@gmail.com"))])
+ (ob-applescript . [(20190709 1607) nil "Org-babel functions for AppleScript" tar ((:url . "https://github.com/stig/ob-applescript.el") (:commit . "2b07b77b75bd02f2102f62e6d52ffdd0f921439a") (:revdesc . "2b07b77b75bd") (:keywords "literate programming" "reproducible research" "mac"))])
+ (ob-async . [(20210428 2052) ((async (1 9)) (org (9 0 1)) (emacs (24 4)) (dash (2 14 1))) "Asynchronous org-babel src block execution" tar ((:url . "https://github.com/astahlman/ob-async") (:commit . "9aac486073f5c356ada20e716571be33a350a982") (:revdesc . "9aac486073f5") (:keywords "tools") (:authors ("Andrew Stahlman" . "andrewstahlman@gmail.com")) (:maintainers ("Andrew Stahlman" . "andrewstahlman@gmail.com")) (:maintainer "Andrew Stahlman" . "andrewstahlman@gmail.com"))])
+ (ob-athena . [(20260404 1816) ((emacs (26 1))) "Run AWS Athena queries from Org Babel" tar ((:url . "https://github.com/will-abb/aws-athena-babel") (:commit . "132ccc35c13e772ed39813d949d0089ea0c66a66") (:revdesc . "132ccc35c13e") (:keywords "aws" "athena" "org" "babel" "sql" "tools") (:authors ("Williams Bosch-Bello" . "williamsbosch@gmail.com")) (:maintainers ("Williams Bosch-Bello" . "williamsbosch@gmail.com")) (:maintainer "Williams Bosch-Bello" . "williamsbosch@gmail.com"))])
+ (ob-base64 . [(20241209 748) ((emacs (26 1))) "Org-babel for base64 content" tar ((:url . "https://github.com/keyweeusr/ob-base64") (:commit . "6d3ef9d937838eb69b0a91e4012a0b6084ba26e1") (:revdesc . "6d3ef9d93783") (:keywords "convenience" "embedding" "orgmode" "base64" "rendering") (:authors ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainers ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainer "Peter Badida" . "keyweeusr@gmail.com"))])
+ (ob-bigquery . [(20251201 558) ((emacs (29 1)) (org (9 7))) "Babel support for BigQuery" tar ((:url . "https://www.github.com/lhernanz/ob-bigquery") (:commit . "1ee7996e603faad6edc1eda09b51c25841262218") (:revdesc . "1ee7996e603f") (:keywords "lisp"))])
+ (ob-bitfield . [(20220401 600) ((emacs (24 4))) "Babel Functions for bitfield" tar ((:url . "https://github.com/gsingh93/ob-bitfield") (:commit . "abe3d8fe49dc53c4663def689ceb5c0433638652") (:revdesc . "abe3d8fe49dc"))])
+ (ob-blockdiag . [(20210412 1541) nil "Org-babel functions for blockdiag evaluation" tar ((:url . "https://github.com/corpix/ob-blockdiag.el") (:commit . "e997644e81cc67a7092e6e9bb13c66f160491efb") (:revdesc . "e997644e81cc") (:keywords "tools" "convenience"))])
+ (ob-browser . [(20170720 1918) ((org (8))) "Render HTML in org-mode blocks" tar ((:url . "https://github.com/krisajenkins/ob-browser") (:commit . "a347d9df1c87b7eb660be8723982c7ad2563631a") (:revdesc . "a347d9df1c87") (:keywords "org" "babel" "browser" "phantomjs") (:authors ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainers ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainer "Kris Jenkins" . "krisajenkins@gmail.com"))])
+ (ob-cfengine3 . [(20260731 418) ((emacs (24 1))) "Org Babel functions for CFEngine 3" tar ((:url . "https://github.com/nickanderson/ob-cfengine3") (:commit . "3d2576546312193456405af5d1acc446a59d71bc") (:revdesc . "3d2576546312") (:keywords "tools" "convenience") (:authors ("Nick Anderson" . "nick@cmdln.org")) (:maintainers ("Nick Anderson" . "nick@cmdln.org")) (:maintainer "Nick Anderson" . "nick@cmdln.org"))])
+ (ob-chatgpt-shell . [(20250704 705) ((emacs (27 1)) (chatgpt-shell (2 24 1))) "Org babel functions for ChatGPT evaluation" tar ((:url . "https://github.com/xenodium/ob-chatgpt-shell") (:commit . "0e592d19528f8f3283a93e0e2844299e9ea21fcc") (:revdesc . "0e592d19528f"))])
+ (ob-clojurescript . [(20180406 1828) ((emacs (24 4)) (org (9 0))) "Org-babel functions for ClojureScript evaluation" tar ((:url . "https://gitlab.com/statonjr/ob-clojurescript") (:commit . "17ee1558aa94c7b0246fd03f684884122806cfe7") (:revdesc . "17ee1558aa94") (:keywords "literate programming" "reproducible research"))])
+ (ob-coffee . [(20170725 1424) ((org (8))) "Org-babel functions for coffee-script evaluation" tar ((:url . "https://github.com/zweifisch/ob-coffee") (:commit . "7f0b330273e8af7777de87a75fe52a89798e4548") (:revdesc . "7f0b330273e8") (:keywords "org" "babel" "coffee-script") (:authors ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainers ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainer "ZHOU Feng" . "zf.pascal@gmail.com"))])
+ (ob-coffeescript . [(20180126 719) ((emacs (24 4))) "Org-babel functions for coffee-script evaluation, and fully implementation!" tar ((:url . "https://github.com/brantou/ob-coffeescript") (:commit . "5a5bb04aea9c2a6eab5b05f90f5c7cb6de7b4261") (:revdesc . "5a5bb04aea9c") (:keywords "coffee-script" "literate programming" "reproducible research") (:authors ("Brantou" . "brantou89@gmail.com")) (:maintainers ("Brantou" . "brantou89@gmail.com")) (:maintainer "Brantou" . "brantou89@gmail.com"))])
+ (ob-compile . [(20240324 320) ((emacs (24 4))) "Run compile by org-babel" tar ((:url . "https://github.com/TxGVNN/ob-compile") (:commit . "d9c3e446467badad571eef8832232ae5a6f9f05b") (:revdesc . "d9c3e446467b") (:keywords "literate programming" "reproducible" "processes" "compilation") (:authors ("Giap Tran" . "txgvnn@gmail.com")) (:maintainers ("Giap Tran" . "txgvnn@gmail.com")) (:maintainer "Giap Tran" . "txgvnn@gmail.com"))])
+ (ob-crystal . [(20180126 718) ((emacs (24 3))) "Org-babel functions for Crystal evaluation" tar ((:url . "https://github.com/brantou/ob-crystal") (:commit . "b3bb27a21a4cefef3f5aeef52718b694bd51245b") (:revdesc . "b3bb27a21a4c") (:keywords "crystal" "literate programming" "reproducible research") (:authors ("Brantou" . "brantou89@gmail.com")) (:maintainers ("Brantou" . "brantou89@gmail.com")) (:maintainer "Brantou" . "brantou89@gmail.com"))])
+ (ob-cypher . [(20200521 936) ((s (1 9 0)) (cypher-mode (0 0 6)) (dash (2 10 0)) (dash-functional (1 2 0))) "Query neo4j using cypher in org-mode blocks" tar ((:url . "https://github.com/zweifisch/ob-cypher") (:commit . "da9f97339474a48d759fc128cee610c0bc9ae6c0") (:revdesc . "da9f97339474") (:keywords "org" "babel" "cypher" "neo4j") (:authors ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainers ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainer "ZHOU Feng" . "zf.pascal@gmail.com"))])
+ (ob-d2 . [(20230314 352) ((emacs (24 1))) "Org-babel functions for d2" tar ((:url . "https://github.com/xcapaldi/ob-d2") (:commit . "5d197f8225a9fb4da997235b231abe30049c6825") (:revdesc . "5d197f8225a9") (:keywords "languages"))])
+ (ob-dall-e-shell . [(20241112 2008) ((emacs (27 1)) (dall-e-shell (0 43 1))) "Org babel functions for DALL-E evaluation" tar ((:url . "https://github.com/xenodium/chatgpt-shell") (:commit . "1ef7951bf47f63d2d0808c3f475f82eac8c9b219") (:revdesc . "1ef7951bf47f"))])
+ (ob-dao . [(20170816 1558) ((org (8))) "Org Babel Functions for Dao" tar ((:url . "https://github.com/xuchunyang/ob-dao") (:commit . "8c62bd800b1f572860e30be4b72c71fa415a2e31") (:revdesc . "8c62bd800b1f") (:keywords "literate programming" "reproducible research" "org" "babel" "dao") (:authors ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainers ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainer "Chunyang Xu" . "mail@xuchunyang.me"))])
+ (ob-dart . [(20221201 633) ((emacs (24 4))) "Evaluate Dart source blocks in org-mode" tar ((:url . "http://github.org/mzimmerm/ob-dart") (:commit . "f6d5664d5cc8b15e002f6899f8adedcb10ced5f1") (:revdesc . "f6d5664d5cc8") (:keywords "languages"))])
+ (ob-deno . [(20260213 1023) ((emacs (29 1))) "Babel Functions for Javascript/TypeScript with Deno" tar ((:url . "https://github.com/isamert/ob-deno") (:commit . "77beef624ff21a3ee0b69b61265b427205b8031e") (:revdesc . "77beef624ff2") (:keywords "literate programming" "reproducible research" "javascript" "typescript" "tools" "deno"))])
+ (ob-diagrams . [(20160407 1237) nil "Org-babel functions for diagrams evaluation" tar ((:url . "http://orgmode.org") (:commit . "be45815f5596d181592fae709096b7b5f4a71992") (:revdesc . "be45815f5596") (:keywords "literate programming" "reproducible research"))])
+ (ob-drawtiming . [(20230312 1740) ((emacs (24 1)) (org (8 0))) "Functions for drawtiming evaluation in org-babel" tar ((:url . "https://github.com/perfab71/ob-drawtiming") (:commit . "813736e20ce1c223700c87a6e70e3f126a11e933") (:revdesc . "813736e20ce1") (:keywords "tools" "multimedia"))])
+ (ob-dsq . [(20220915 1610) ((emacs (27 1))) "Babel functions for the `dsq` CLI tool by Multiprocess Labs" tar ((:url . "https://github.com/fritzgrabo/ob-dsq") (:commit . "e001b263af87993755319caefaf5d19e196e4e1b") (:revdesc . "e001b263af87") (:keywords "data" "tools") (:authors ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainers ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainer "Fritz Grabo" . "hello@fritzgrabo.com"))])
+ (ob-duckdb . [(20251220 1924) ((emacs (28 1)) (org (9 5))) "Org Babel integration for DuckDB CLI" tar ((:url . "https://github.com/gggion/ob-duckdb") (:commit . "c50b3168dc40ba646f137e8f090a2272f611d135") (:revdesc . "c50b3168dc40") (:keywords "languages" "org" "babel" "duckdb" "sql" "data" "analytics") (:maintainers ("gggion" . "gggion123@gmail.com")) (:maintainer "gggion" . "gggion123@gmail.com"))])
+ (ob-elixir . [(20250706 556) ((org (8))) "Org-babel functions for elixir evaluation" tar ((:url . "https://github.com/zweifisch/ob-elixir") (:commit . "8e5d2f3c7adb0d5acde390264fec94627aa7af31") (:revdesc . "8e5d2f3c7adb") (:keywords "org" "babel" "elixir") (:authors ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainers ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainer "ZHOU Feng" . "zf.pascal@gmail.com"))])
+ (ob-elm . [(20200528 1857) ((emacs (26 1)) (org (9 3))) "Org-babel functions for elm evaluation" tar ((:url . "https://www.bonfacemunyoki.com") (:commit . "d3a9fbc2f56416894c9aed65ea9a20cc1d98f15d") (:revdesc . "d3a9fbc2f564") (:keywords "languages" "tools"))])
+ (ob-elvish . [(20180427 1900) nil "Org-babel functions for Elvish shell" tar ((:url . "https://github.com/zzamboni/ob-elvish") (:commit . "369181ceae1190bf971c71aebf9fc6133bd98c39") (:revdesc . "369181ceae11") (:keywords "literate programming" "elvish" "shell" "languages" "processes" "tools") (:authors ("Diego Zamboni" . "diego@zzamboni.org")) (:maintainers ("Diego Zamboni" . "diego@zzamboni.org")) (:maintainer "Diego Zamboni" . "diego@zzamboni.org"))])
+ (ob-ess-julia . [(20210414 1444) ((ess (20201004 1522)) (julia-mode (0 4))) "Org babel support for Julia language" tar ((:url . "https://github.com/frederic-santos/ob-ess-julia") (:commit . "147e9e7fe55c41dd77171417e92af40db3530b84") (:revdesc . "147e9e7fe55c") (:keywords "languages"))])
+ (ob-ffuf . [(20221004 1715) ((emacs (28 1))) "Babel functions for ffuf" tar ((:url . "https://github.com/daniel-ts/ob-ffuf") (:commit . "5310a3e766a252ac34f8cb2307c4e48e982f5611") (:revdesc . "5310a3e766a2") (:keywords "comm" "tools") (:maintainers ("Daniel Tschertkow" . "daniel.tschertkow@posteo.de")) (:maintainer "Daniel Tschertkow" . "daniel.tschertkow@posteo.de"))])
+ (ob-fricas . [(20220612 854) ((emacs (26 1)) (frimacs (1 0))) "A FriCAS backend for Org-Babel" tar ((:url . "https://github.com/pdo/frimacs") (:commit . "742268f6f05f418993dc366bbca9ccc931125748") (:revdesc . "742268f6f05f") (:keywords "fricas" "computer algebra" "extensions" "tools") (:authors ("Paul Onions" . "paul.onions@acm.org")) (:maintainers ("Paul Onions" . "paul.onions@acm.org")) (:maintainer "Paul Onions" . "paul.onions@acm.org"))])
+ (ob-fsharp . [(20221113 1904) ((emacs (25)) (fsharp-mode (1 9 8)) (seq (2 22))) "Org-Babel F#" tar ((:url . "https://github.com/juergenhoetzel/ob-fsharp") (:commit . "a5e893a88d47bd8ea01cf456331ce54910321b47") (:revdesc . "a5e893a88d47") (:keywords "literate programming" "reproducible research") (:authors ("Jürgen Hötzel" . "juergen@archlinux.org")) (:maintainers ("Jürgen Hötzel" . "juergen@archlinux.org")) (:maintainer "Jürgen Hötzel" . "juergen@archlinux.org"))])
+ (ob-git-permalink . [(20220627 46) ((emacs (25 1))) "Import GitHub code given a permalink" tar ((:url . "https://github.com/kijimaD/ob-git-permalink") (:commit . "14224327a6b34c804b0e90d37b80630a80c56c0a") (:revdesc . "14224327a6b3") (:keywords "docs" "convenience") (:authors ("kijima Daigo" . "norimaking777@gmail.com")) (:maintainers ("kijima Daigo" . "norimaking777@gmail.com")) (:maintainer "kijima Daigo" . "norimaking777@gmail.com"))])
+ (ob-gleam . [(20260221 2046) ((emacs (29 1))) "Org Babel functions for Gleam" tar ((:url . "https://github.com/takeokunn/ob-gleam") (:commit . "31a521c165426954e565ea368da81c4500885f30") (:revdesc . "31a521c16542") (:keywords "languages" "tools") (:authors ("takeokunn" . "bararararatty@gmail.com")) (:maintainers ("takeokunn" . "bararararatty@gmail.com")) (:maintainer "takeokunn" . "bararararatty@gmail.com"))])
+ (ob-go . [(20190201 2040) nil "Org-babel functions for go evaluation" tar ((:url . "http://orgmode.org") (:commit . "2067ed55f4c1d33a43cb3f6948609d240a8915f5") (:revdesc . "2067ed55f4c1") (:keywords "golang" "go" "literate programming" "reproducible research"))])
+ (ob-graphql . [(20201222 1515) ((emacs (24 4)) (graphql-mode (20191024 1221)) (request (0 3 2))) "Org-Babel execution backend for GraphQL source blocks" tar ((:url . "https://github.com/jdormit/ob-graphql") (:commit . "7c35419f9eec5dc44967cbcfa13c7135b9a96bfc") (:revdesc . "7c35419f9eec") (:authors ("Jeremy Dormitzer" . "jeremy.dormitzer@gmail.com")) (:maintainers ("Jeremy Dormitzer" . "jeremy.dormitzer@gmail.com")) (:maintainer "Jeremy Dormitzer" . "jeremy.dormitzer@gmail.com"))])
+ (ob-html-chrome . [(20181219 1042) ((emacs (24 4)) (f (0 20 0)) (s (1 7 0))) "HTML code blocks converted to PNG using Chrome" tar ((:url . "https://github.com/nikclayton/ob-html-chrome") (:commit . "7af6e4a24ed0aaf67751bdf752c7ca0ba02bb8d4") (:revdesc . "7af6e4a24ed0") (:keywords "languages" "org" "org-babel" "chrome" "html") (:authors (nil . "NikClaytonnik@ngo.org.uk")) (:maintainers (nil . "NikClaytonnik@ngo.org.uk")) (:maintainer nil . "NikClaytonnik@ngo.org.uk"))])
+ (ob-http . [(20180707 1448) ((s (1 9 0)) (cl-lib (0 5))) "Http request in org-mode babel" tar ((:url . "https://github.com/zweifisch/ob-http") (:commit . "b1428ea2a63bcb510e7382a1bf5fe82b19c104a7") (:revdesc . "b1428ea2a63b") (:authors ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainers ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainer "ZHOU Feng" . "zf.pascal@gmail.com"))])
+ (ob-hy . [(20180702 540) ((emacs (24 4))) "Org-babel functions for Hy-lang evaluation" tar ((:url . "https://github.com/brantou/ob-hy") (:commit . "a42ecaf440adc03e279afe43ee5ef6093ddd542a") (:revdesc . "a42ecaf440ad") (:keywords "hy" "literate programming" "reproducible research") (:authors ("Brantou" . "brantou89@gmail.com")) (:maintainers ("Brantou" . "brantou89@gmail.com")) (:maintainer "Brantou" . "brantou89@gmail.com"))])
+ (ob-ipython . [(20260324 859) ((s (1 9 0)) (dash (2 10 0)) (dash-functional (1 2 0)) (f (0 17 2)) (emacs (24))) "Org-babel functions for IPython evaluation" tar ((:url . "http://www.gregsexton.org") (:commit . "35414dccffe48ce70122c40ff5db0b74dfa82cdf") (:revdesc . "35414dccffe4") (:keywords "literate programming" "reproducible research") (:authors ("Greg Sexton" . "gregsexton@gmail.com")) (:maintainers ("Greg Sexton" . "gregsexton@gmail.com")) (:maintainer "Greg Sexton" . "gregsexton@gmail.com"))])
+ (ob-janet . [(20260820 855) ((emacs (26 1)) (org (9 1))) "Org-Babel support for the Janet language" tar ((:url . "https://codeberg.org/zzkt/ob-janet") (:commit . "3dbf225cd32bb60b4fe76fabd89fdac72c6aa84f") (:revdesc . "3dbf225cd32b") (:keywords "languages" "tools" "literate programming" "janet") (:authors ("nik gaffney" . "nik@fo.am")) (:maintainers ("nik gaffney" . "nik@fo.am")) (:maintainer "nik gaffney" . "nik@fo.am"))])
+ (ob-julia-vterm . [(20260810 701) ((emacs (26 1)) (julia-vterm (0 26)) (queue (0 2))) "Babel functions for Julia that work with julia-vterm" tar ((:url . "https://github.com/shg/ob-julia-vterm.el") (:commit . "5752ed9b3ca44d5b314b1cbb426c664b8bae8f63") (:revdesc . "5752ed9b3ca4") (:keywords "julia" "org" "outlines" "literate programming" "reproducible research"))])
+ (ob-kotlin . [(20180823 1321) ((org (8))) "Org-babel functions for kotlin evaluation" tar ((:url . "https://github.com/zweifisch/ob-kotlin") (:commit . "b817ffb7fd03a25897eb2aba24af2035bbe3cfa8") (:revdesc . "b817ffb7fd03") (:keywords "org" "babel" "kotlin") (:authors ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainers ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainer "ZHOU Feng" . "zf.pascal@gmail.com"))])
+ (ob-latex-as-png . [(20200629 1013) ((emacs (26 1)) (org (9 1))) "Org-babel functions for latex-as-png evaluation" tar ((:url . "https://github.com/alhassy/ob-latex-as-png") (:commit . "b0c68bdb54741fbee1068654e4eba1962241f271") (:revdesc . "b0c68bdb5474") (:keywords "literate programming" "reproducible research" "org" "convenience") (:authors ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainers ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainer "Musa Al-hassy" . "alhassy@gmail.com"))])
+ (ob-lesim . [(20230619 357) ((emacs (28 1)) (org (9 3)) (lesim-mode (0 3 3))) "Org-babel functions for lesim-mode" tar ((:url . "https://github.com/drghirlanda/ob-lesim") (:commit . "37e15f610783ff12926b5d221cefb4a49b4d54d6") (:revdesc . "37e15f610783") (:keywords "languages" "tools") (:authors ("Stefano Ghirlanda" . "drghirlanda@gmail.com")) (:maintainers ("Stefano Ghirlanda" . "drghirlanda@gmail.com")) (:maintainer "Stefano Ghirlanda" . "drghirlanda@gmail.com"))])
+ (ob-lfe . [(20170725 1420) ((org (8))) "Org-babel functions for lfe evaluation" tar ((:url . "https://github.com/zweifisch/ob-lfe") (:commit . "f7780f58e650b4d29dfd834c662b1d354b620a8e") (:revdesc . "f7780f58e650") (:keywords "org" "babel" "lfe" "lisp" "erlang") (:authors ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainers ("ZHOU Feng" . "zf.pascal@gmail.com")) (:maintainer "ZHOU Feng" . "zf.pascal@gmail.com"))])
+ (ob-llm . [(20251208 18) ((emacs (27 1))) "Use `llm' as an Org Babel language" tar ((:url . "https://github.com/sunflowerseastar/ob-llm") (:commit . "16237613f3ce1fd909544ef8acc402674c482ed0") (:revdesc . "16237613f3ce") (:keywords "llm" "org-mode" "tools" "convenience" "org" "babel") (:authors ("Grant Surlyn" . "grant@sunflowerseastar.com")) (:maintainers ("Grant Surlyn" . "grant@sunflowerseastar.com")) (:maintainer "Grant Surlyn" . "grant@sunflowerseastar.com"))])
+ (ob-lurk . [(20221122 2058) ((emacs (25 1)) (lurk-mode (0 1 6))) "Evaluate lurk code blocks in org mode" tar ((:url . "https://github.com/lurk-lang/lurk-emacs") (:commit . "bd7cf661ccb31bfbfab542018c361bd79064d4f4") (:revdesc . "bd7cf661ccb3") (:keywords "languages" "lurk" "lisp") (:authors ("Jeff Weiss" . "jweiss@protocol.ai")) (:maintainers ("Jeff Weiss" . "jweiss@protocol.ai")) (:maintainer "Jeff Weiss" . "jweiss@protocol.ai"))])
+ (ob-mermaid . [(20260323 559) nil "Org-babel support for mermaid evaluation" tar ((:url . "https://github.com/arnm/ob-mermaid") (:commit . "30c2da02e3d24dbec0d004d3c6dfe7b381500b05") (:revdesc . "30c2da02e3d2") (:keywords "lisp") (:authors ("Alexei Nunez" . "alexeirnunez@gmail.com")) (:maintainers ("Alexei Nunez" . "alexeirnunez@gmail.com")) (:maintainer "Alexei Nunez" . "alexeirnunez@gmail.com"))])
+ (ob-ml-marklogic . [(20190312 1314) nil "Org-babel functions for MarkLogic evaluation" tar ((:url . "https://github.com/ndw/ob-ml-marklogic") (:commit . "d5660ad14f29e17cd26ae92eeb585b24030e9570") (:revdesc . "d5660ad14f29") (:keywords "marklogic" "xquery" "javascript" "sparql") (:authors ("Norman Walsh" . "ndw@nwalsh.com")) (:maintainers ("Norman Walsh" . "ndw@nwalsh.com")) (:maintainer "Norman Walsh" . "ndw@nwalsh.com"))])
+ (ob-mongo . [(20170720 1919) ((org (8))) "Execute mongodb queries within org-mode blocks" tar ((:url . "https://github.com/krisajenkins/ob-mongo") (:commit . "371bf19c7c10eab2f86424f8db8ab685997eb5aa") (:revdesc . "371bf19c7c10") (:keywords "org" "babel" "mongo" "mongodb") (:authors ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainers ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainer "Kris Jenkins" . "krisajenkins@gmail.com"))])
+ (ob-napkin . [(20240405 1223) ((emacs (26 1))) "Babel functions for Napkin" tar ((:url . "https://github.com/pinetr2e/ob-napkin") (:commit . "497bde38772e6fd2a393dd292435ae3787580db4") (:revdesc . "497bde38772e") (:keywords "tools" "literate programming" "reproducible research" "napkin" "plantuml"))])
+ (ob-nim . [(20210601 1807) ((cl-lib (0 5))) "Babel Functions for nim" tar ((:url . "https://github.com/Lompik/ob-nim") (:commit . "315ee36b3ff72437bd65704c456f7ac48205e389") (:revdesc . "315ee36b3ff7") (:keywords "literate programming" "reproducible research"))])
+ (ob-nix . [(20221224 334) ((emacs (24 1))) "Simple org-babel support for nix" tar ((:url . "https://codeberg.org/theesm/ob-nix") (:commit . "76d71b37fb031f25bd52ff9c98b29292ebe0424e") (:revdesc . "76d71b37fb03") (:keywords "lisp" "tools") (:authors ("Wilko Meyer" . "w-devel@wmeyer.eu")) (:maintainers ("Wilko Meyer" . "w-devel@wmeyer.eu")) (:maintainer "Wilko Meyer" . "w-devel@wmeyer.eu"))])
+ (ob-p5js . [(20230802 1613) ((emacs (25 1))) "Support for p5js in org-babel" tar ((:url . "https://github.com/alejandrogallo/p5js") (:commit . "6a1684a02f5baf6c433bfaf700b8c33b0f6ff12e") (:revdesc . "6a1684a02f5b") (:keywords "javascript" "graphics" "multimedia" "p5js" "processing" "org-babel") (:authors ("Alejandro Gallo" . "aamsgallo@gmail.com")) (:maintainers ("Alejandro Gallo" . "aamsgallo@gmail.com")) (:maintainer "Alejandro Gallo" . "aamsgallo@gmail.com"))])
+ (ob-php . [(20220221 1254) ((org (8))) "Execute PHP within org-mode source blocks" tar ((:url . "https://repo.or.cz/ob-php.git") (:commit . "6ebf7799e9ded1d5114094f46785960a50000614") (:revdesc . "6ebf7799e9de") (:keywords "org" "babel" "php") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (ob-pic . [(20250604 2027) ((emacs (24 1))) "Org babel functions for pic language -*- lexical-binding: t;" tar ((:url . "https://github.com/ddoherty03/ob-pic") (:commit . "e60eab82e8fa70ebb288350166baff56ec8f1342") (:revdesc . "e60eab82e8fa") (:keywords "org" "babel" "pic" "tools") (:authors ("Daniel E. Doherty" . "ded-obpic@ddoherty.net")) (:maintainers ("Daniel E. Doherty" . "ded-obpic@ddoherty.net")) (:maintainer "Daniel E. Doherty" . "ded-obpic@ddoherty.net"))])
+ (ob-powershell . [(20250220 1241) ((emacs (26 1))) "Org-babel functions for powershell evaluation" tar ((:url . "https://github.com/rkiggen/ob-powershell") (:commit . "1ba2f3bff0fcb8f4c58ddf534d5bf23bf52a87ca") (:revdesc . "1ba2f3bff0fc") (:keywords "powershell" "shell" "execute" "outlines" "processes") (:authors ("Rob Kiggen" . "robby.kiggen@essential-it.be") ("Pedro Morais" . "fpvmorais@gmail.com")) (:maintainers ("Mois Moshev" . "mois.moshev@bottleshipvfx.com")) (:maintainer "Mois Moshev" . "mois.moshev@bottleshipvfx.com"))])
+ (ob-prolog . [(20190410 2130) nil "Org-babel functions for prolog evaluation" tar ((:url . "https://github.com/ljos/ob-prolog") (:commit . "149abd3832fc5a6a1cb01a586a1622a8f25887dc") (:revdesc . "149abd3832fc") (:keywords "literate programming" "reproducible research"))])
+ (ob-raku . [(20221013 1938) ((emacs (24 1))) "Provides raku support for org-babel" tar ((:url . "https://github.com/masukomi/ob-raku") (:commit . "21aa77a0ca70b7bef0ecf7d4d9c5272d71f0210c") (:revdesc . "21aa77a0ca70") (:keywords "literate programming" "reproducible research" "languages"))])
+ (ob-redis . [(20220221 1249) ((org (8))) "Execute Redis queries within org-mode blocks" tar ((:url . "https://repo.or.cz/ob-redis.git") (:commit . "44c83636ccbea0b3e9838b0180471905c30224c5") (:revdesc . "44c83636ccbe") (:keywords "org" "babel" "redis") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (ob-restclient . [(20250806 2153) ((restclient (0))) "Org-babel functions for restclient-mode" tar ((:url . "https://github.com/alf/ob-restclient.el") (:commit . "94dd9cd98ff50717135ed5089afb378616faf11a") (:revdesc . "94dd9cd98ff5") (:keywords "literate programming" "reproducible research"))])
+ (ob-reticulate . [(20240224 1615) ((org (9 4)) (emacs (24 4))) "Babel Functions for reticulate" tar ((:url . "https://github.com/jackkamm/ob-reticulate") (:commit . "dc08d43df967b15446f3d229fdc6bd600b7ea0df") (:revdesc . "dc08d43df967") (:keywords "literate programming" "reproducible research" "r" "python" "statistics" "languages" "outlines" "processes"))])
+ (ob-rust . [(20220824 1923) nil "Org-babel functions for Rust" tar ((:url . "https://github.com/micanzhang/ob-rust") (:commit . "be059d231fafeb24a658db212a55ccdc55c0c500") (:revdesc . "be059d231faf") (:keywords "rust" "languages" "org" "babel"))])
+ (ob-sagemath . [(20191106 828) ((sage-shell-mode (0 0 8)) (s (1 8 0)) (emacs (24))) "Org-babel functions for SageMath evaluation" tar ((:url . "https://github.com/stakemori/ob-sagemath") (:commit . "79645bce0c25a650bae61e550434bed836995dce") (:revdesc . "79645bce0c25") (:keywords "sagemath" "org-babel") (:authors ("Sho Takemori" . "stakemorii@gmail.com")) (:maintainers ("Sho Takemori" . "stakemorii@gmail.com")) (:maintainer "Sho Takemori" . "stakemorii@gmail.com"))])
+ (ob-smiles . [(20220221 1255) ((smiles-mode (0 0 1)) (org (8))) "Org-mode Babel support for SMILES" tar ((:url . "https://repo.or.cz/ob-smiles.git") (:commit . "d178f3d4a7e3c1ca9910f0a063d2a3cfd97d8609") (:revdesc . "d178f3d4a7e3") (:keywords "org" "babel" "smiles") (:authors (nil . "JohnKitchinjkitchin@andrew.cmu.edu")) (:maintainers (nil . "stardivinernumbchild@gmail.com")) (:maintainer nil . "stardivinernumbchild@gmail.com"))])
+ (ob-sml . [(20130829 1843) ((sml-mode (6 4))) "Org-babel functions for template evaluation" tar ((:url . "http://orgmode.org") (:commit . "958165c92b6cff6cada5c85c8ae5887806b8451b") (:revdesc . "958165c92b6c") (:keywords "literate programming" "reproducible research"))])
+ (ob-solidity . [(20220213 1910) ((emacs (24 4)) (solidity-mode (0 1 10))) "Org-babel functions for solidity evaluation" tar ((:url . "https://github.com/hrkrshnn/ob-solidity") (:commit . "7e3e6cb2d7ec9269514e80248c7ec85c04dbbf89") (:revdesc . "7e3e6cb2d7ec") (:keywords "solidity" "literate programming" "reproducible research" "languages"))])
+ (ob-spice . [(20221030 217) ((spice-mode (0 0 1)) (org (8))) "Org-babel functions for spice evaluation" tar ((:url . "https://repo.or.cz/ob-spice.git") (:commit . "4d3ab60c2012aba2a5bd96a4d42dfeea0be6edac") (:revdesc . "4d3ab60c2012") (:maintainers ("stardiviner" . "(numbchild@gmail.com)")) (:maintainer "stardiviner" . "(numbchild@gmail.com)"))])
+ (ob-sql-mode . [(20190421 1539) ((emacs (24 4))) "SQL code blocks evaluated by sql-mode" tar ((:url . "https://github.com/nikclayton/ob-sql-mode") (:commit . "b31a016585324ad91f1742ff6205bcb76f3ece6e") (:revdesc . "b31a01658532") (:keywords "languages" "org" "org-babel" "sql") (:authors (nil . "NikClaytonnik@google.com")) (:maintainers (nil . "NikClaytonnik@google.com")) (:maintainer nil . "NikClaytonnik@google.com"))])
+ (ob-svgbob . [(20190911 300) ((emacs (24))) "Babel Functions for svgbob" tar ((:url . "https://github.com/mgxm/ob-svgbob") (:commit . "5747f96fb4fdb8711546b3313df9412177eb3c1a") (:revdesc . "5747f96fb4fd") (:keywords "tools" "files") (:authors ("Marcio Giaxa" . "i@mgxm.me")) (:maintainers ("Marcio Giaxa" . "i@mgxm.me")) (:maintainer "Marcio Giaxa" . "i@mgxm.me"))])
+ (ob-swift . [(20170921 1325) ((org (8))) "Org-babel functions for swift evaluation" tar ((:url . "https://github.com/zweifisch/ob-swift") (:commit . "ed478ddbbe41ce5373efde06b4dd0c3663c9055f") (:revdesc . "ed478ddbbe41") (:keywords "org" "babel" "swift") (:authors ("Feng Zhou" . "zf.pascal@gmail.com")) (:maintainers ("Feng Zhou" . "zf.pascal@gmail.com")) (:maintainer "Feng Zhou" . "zf.pascal@gmail.com"))])
+ (ob-swiftui . [(20251023 1031) ((emacs (25 1)) (swift-mode (8 2 0)) (org (9 2 0))) "Org babel functions for SwiftUI evaluation" tar ((:url . "https://github.com/xenodium/ob-swiftui") (:commit . "82154e06ae335ee6669b3c4d344759a0302efab2") (:revdesc . "82154e06ae33"))])
+ (ob-tmux . [(20221005 2025) ((emacs (25 1)) (seq (2 3)) (s (1 9 0))) "Babel Support for Interactive Terminal" tar ((:url . "https://github.com/ahendriksen/ob-tmux") (:commit . "e672ca5a9534b9f33ed7aa5cd21b88189ccc5697") (:revdesc . "e672ca5a9534") (:keywords "literate programming" "interactive shell" "tmux"))])
+ (ob-translate . [(20170720 1919) ((google-translate (0 11)) (org (8))) "Translation of text blocks in org-mode" tar ((:url . "https://github.com/krisajenkins/ob-translate") (:commit . "9d9054a51bafd5a29a8135964069b4fa3a80b169") (:revdesc . "9d9054a51baf") (:keywords "org" "babel" "translate" "translation") (:authors ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainers ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainer "Kris Jenkins" . "krisajenkins@gmail.com"))])
+ (ob-ts-node . [(20260123 14) ((emacs (25 1)) (org (8 0))) "Org-Babel support for TypeScript via ts-node" tar ((:url . "https://github.com/tmythicator/ob-ts-node") (:commit . "a480e19fc204847c5b4c1808b07856bca68dae1e") (:revdesc . "a480e19fc204") (:keywords "languages" "tools"))])
+ (ob-typescript . [(20231227 311) ((emacs (24)) (org (8 0))) "Org-babel functions for typescript evaluation" tar ((:url . "https://github.com/lurdan/ob-typescript") (:commit . "5fe1762f8d8692dd5b6f1697bedbbf4cae9ef036") (:revdesc . "5fe1762f8d86") (:keywords "literate programming" "reproducible research" "typescript"))])
+ (ob-uart . [(20170521 858) nil "Org-babel support for UART communication" tar ((:url . "https://www.0x7.ch") (:commit . "90daeac90a9e75c20cdcf71234c67b812110c50e") (:revdesc . "90daeac90a9e") (:keywords "tools" "comm" "org-mode" "uart" "literate programming" "reproducible development"))])
+ (oberon . [(20120715 909) nil "Major mode for editing Oberon/Oberon-2 program texts" tar ((:url . "https://github.com/emacsorphanage/oberon") (:commit . "fb57d18ce13835a8a69b6bafecdd9193ca9a59a3") (:revdesc . "fb57d18ce138") (:keywords "oberon" "oberon-2" "languages" "oop") (:authors ("Karl Landström" . "karl@karllandstrom.se")) (:maintainers ("Karl Landström" . "karl@karllandstrom.se")) (:maintainer "Karl Landström" . "karl@karllandstrom.se"))])
+ (obfusurl . [(20260401 838) ((emacs (25 1))) "Obfuscate URLs so they aren't spoilers" tar ((:url . "https://github.com/davep/obfusurl.el") (:commit . "3f3a6416223c98b7fddd2c55998ef29f1c77046c") (:revdesc . "3f3a6416223c") (:keywords "convenience" "web" "text") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (objc-font-lock . [(20250103 1606) nil "Highlight Objective-C method calls" tar ((:url . "https://github.com/Lindydancer/objc-font-lock") (:commit . "c971d72599e5a943e8552f929562346ed15446ce") (:revdesc . "c971d72599e5") (:keywords "languages" "faces"))])
+ (objed . [(20200911 1435) ((emacs (25)) (cl-lib (0 5))) "Navigate and edit text objects" tar ((:url . "https://github.com/clemera/objed") (:commit . "e93dda73bd932563d35e76f1c2f1b50895b640cf") (:revdesc . "e93dda73bd93") (:keywords "convenience") (:authors ("Clemens Radermacher" . "clemera@posteo.net")) (:maintainers ("Clemens Radermacher" . "clemera@posteo.net")) (:maintainer "Clemens Radermacher" . "clemera@posteo.net"))])
+ (oblivion-theme . [(20260108 1348) ((emacs (24 1))) "A port of GEdit oblivion theme" tar ((:url . "https://codeberg.org/ideasman42/emacs-theme-oblivion") (:commit . "2a07e4fad23dbe6844dc565193fb04b033c319d4") (:revdesc . "2a07e4fad23d") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (oboe . [(20260816 1143) ((emacs (30 1))) "A simple temporary buffer management framework" tar ((:url . "https://github.com/gynamics/oboe.el") (:commit . "b81cc19f474ed33a10958853f503428d271d1c2c") (:revdesc . "b81cc19f474e") (:keywords "convenience") (:maintainers ("gynamics" . "gynamics@coldbench.top")) (:maintainer "gynamics" . "gynamics@coldbench.top"))])
+ (obsidian . [(20250220 2245) ((emacs (27 2)) (f (0 2 0)) (s (1 12 0)) (dash (2 13)) (markdown-mode (2 5)) (elgrep (1 0 0)) (yaml (0 5 1)) (ht (2 3))) "Obsidian Notes interface" tar ((:url . "https://github.com/licht1stein/obsidian.el") (:commit . "0b31775d5da1dfd3d1ffcf9fa05908a3ba26ed15") (:revdesc . "0b31775d5da1") (:keywords "obsidian" "pkm" "convenience"))])
+ (obsidian-theme . [(20170719 948) nil "Port of the eclipse obsidian theme" tar ((:url . "https://github.com/mswift42/obsidian-theme") (:commit . "f45efb2ebe9942466c1db6abbe2d0e6847b785ea") (:revdesc . "f45efb2ebe99"))])
+ (ocaml-eglot . [(20260819 1639) ((emacs (29 1))) "An OCaml companion for Eglot" tar ((:url . "https://github.com/tarides/ocaml-eglot") (:commit . "909a786934e7b02d5b8556a4f242a1fa3374d095") (:revdesc . "909a786934e7") (:keywords "ocaml" "languages") (:authors ("Xavier Van de Woestyne" . "xaviervdw@gmail.com")) (:maintainers ("Xavier Van de Woestyne" . "xaviervdw@gmail.com")) (:maintainer "Xavier Van de Woestyne" . "xaviervdw@gmail.com"))])
+ (ocaml-ts-mode . [(20230820 1946) ((emacs (29 1))) "Major mode for OCaml using tree-sitter" tar ((:url . "https://github.com/dmitrig/ocaml-ts-mode") (:commit . "bb8c86bd49e4e98f41e45fb0ec82e38f90bc3ee4") (:revdesc . "bb8c86bd49e4") (:keywords "ocaml" "languages" "tree-sitter"))])
+ (ocamlformat . [(20260317 1629) ((emacs (24 3))) "Utility functions to format ocaml code" tar ((:url . "https://github.com/ocaml-ppx/ocamlformat") (:commit . "195e470387ecdcfb0f9ce309b0d8d17807bde25d") (:revdesc . "195e470387ec") (:keywords "languages" "ocaml"))])
+ (occidental-theme . [(20130312 1958) nil "Custom theme for faces based on Adwaita" tar ((:url . "https://github.com/olcai/occidental-theme") (:commit . "fd2db7256d4f78c43d99c3cddb1c39106d479816") (:revdesc . "fd2db7256d4f") (:authors ("William Stevenson" . "yhvh2000@gmail.com") ("Erik Timan" . "dev@timan.info")) (:maintainers ("William Stevenson" . "yhvh2000@gmail.com") ("Erik Timan" . "dev@timan.info")) (:maintainer "William Stevenson" . "yhvh2000@gmail.com"))])
+ (occult . [(20260421 1414) ((emacs (29 1))) "Collapse and reveal buffer regions" tar ((:url . "https://github.com/agzam/occult.el") (:commit . "74006325af1d96af3f26dc2dbf02baccc03d83f1") (:revdesc . "74006325af1d") (:keywords "convenience") (:authors ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainers ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainer "Ag Ibragimov" . "agzam.ibragimov@gmail.com"))])
+ (occur-context-resize . [(20250510 1447) nil "Dynamically resize context around matches in occur-mode" tar ((:url . "https://github.com/dgtized/occur-context-resize.el") (:commit . "7a3f039b54274d353ec2f24067666da9edaaa185") (:revdesc . "7a3f039b5427") (:keywords "matching") (:authors ("Charles L.G. Comstock" . "dgtized@gmail.com")) (:maintainers ("Charles L.G. Comstock" . "dgtized@gmail.com")) (:maintainer "Charles L.G. Comstock" . "dgtized@gmail.com"))])
+ (occur-x . [(20130610 1343) nil "Extra functionality for occur" tar ((:url . "https://github.com/juan-leon/occur-x") (:commit . "352f5fab207d8a1d3dd048073ff127a83e97c82b") (:revdesc . "352f5fab207d") (:keywords "occur" "search" "convenience") (:authors ("Juan-Leon Lahoz" . "juanleon1@gmail.com")) (:maintainers ("Juan-Leon Lahoz" . "juanleon1@gmail.com")) (:maintainer "Juan-Leon Lahoz" . "juanleon1@gmail.com"))])
+ (occurx-mode . [(20230822 1841) ((emacs (27 1)) (rbit (0 1))) "Occur-like filtering of buffers with rx patterns" tar ((:url . "https://github.com/k32/occurx-mode") (:commit . "71ecab6b1cdf6159a02cef3dd7d2610c45cbaf02") (:revdesc . "71ecab6b1cdf") (:keywords "matching"))])
+ (oceanic-theme . [(20161015 819) nil "Oceanic theme" tar ((:url . "https://github.com/terry3/oceanic-theme") (:commit . "00288f6a5245eb001dc123e36af1820eb3cbe985") (:revdesc . "00288f6a5245") (:keywords "oceanic" "color" "theme"))])
+ (ocodo-svg-modelines . [(20150516 1419) ((svg-mode-line-themes (0))) "A collection of beautiful SVG modelines" tar ((:url . "https://github.com/ocodo/ocodo-svg-modelines") (:commit . "a6c5b9a7536c7a8fa3bd9d9dafdebc8d99903018") (:revdesc . "a6c5b9a7536c") (:authors ("ocodo" . "what.is.ocodo@gmail.com")) (:maintainers ("ocodo" . "what.is.ocodo@gmail.com")) (:maintainer "ocodo" . "what.is.ocodo@gmail.com"))])
+ (ocp-indent . [(20260805 738) nil "Automatic indentation with ocp-indent" tar ((:url . "http://www.typerex.org/ocp-indent.html") (:commit . "d5f0d27b3caf7ae2397f8b26ecc5776997643945") (:revdesc . "d5f0d27b3caf") (:keywords "ocaml" "languages"))])
+ (octicons . [(20151101 340) ((cl-lib (0 5))) "Octicons utility" tar ((:url . "https://github.com/syohex/emacs-octicons") (:commit . "229286a6166dba8ddabc8c4d338798c6cd3cf67d") (:revdesc . "229286a6166d") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (octo-mode . [(20161008 1229) ((emacs (24))) "Major mode for Octo assembly language" tar ((:url . "https://github.com/cryon/octo-mode") (:commit . "4b2ed4a61674f73a6ccd390b5ae123474bd0c977") (:revdesc . "4b2ed4a61674") (:keywords "languages") (:authors ("John Olsson" . "john@cryon.se")) (:maintainers ("John Olsson" . "john@cryon.se")) (:maintainer "John Olsson" . "john@cryon.se"))])
+ (octopress . [(20190123 107) nil "A lightweight wrapper for Jekyll and Octopress" tar ((:url . "https://github.com/aaronbieber/octopress.el") (:commit . "f2c92d5420f14fc9167c7de1873836510e652de2") (:revdesc . "f2c92d5420f1") (:keywords "octopress" "blog") (:authors ("Aaron Bieber" . "aaron@aaronbieber.com")) (:maintainers ("Aaron Bieber" . "aaron@aaronbieber.com")) (:maintainer "Aaron Bieber" . "aaron@aaronbieber.com"))])
+ (oer-reveal . [(20260327 1514) ((emacs (24 4)) (org-re-reveal (3 38 0))) "OER with reveal.js, plugins, and org-re-reveal" tar ((:url . "https://gitlab.com/oer/oer-reveal") (:commit . "35f8e50dea185f4df0ac5ef08dd4ad26179c4e75") (:revdesc . "35f8e50dea18") (:keywords "hypermedia" "tools" "slideshow" "presentation" "oer"))])
+ (offlineimap . [(20150916 1158) nil "Run OfflineIMAP from Emacs" tar ((:url . "http://julien.danjou.info/offlineimap-el.html") (:commit . "cc3e067e6237a1eb7b21c575a41683b1febb47f1") (:revdesc . "cc3e067e6237") (:authors ("Julien Danjou" . "julien@danjou.info")) (:maintainers ("Julien Danjou" . "julien@danjou.info")) (:maintainer "Julien Danjou" . "julien@danjou.info"))])
+ (oj . [(20230212 148) ((emacs (26 1)) (quickrun (2 2))) "Competitive programming tools client for AtCoder, Codeforces" tar ((:url . "https://github.com/conao3/oj.el") (:commit . "6d586cb108c642bc166c64df113e03193f4d1495") (:revdesc . "6d586cb108c6") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (ol-bible . [(20260723 1502) ((emacs (27 1))) "Org Link support for Bible Passages" tar ((:url . "https://git.sr.ht/~swflint/ol-bible") (:commit . "d2db628d7ceec5e1d9c164f95c8a4c1b02438870") (:revdesc . "d2db628d7cee") (:keywords "convenience" "outlines") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (ol-locate-file . [(20260707 933) ((emacs (30 1)) (org (9 3))) "Locate-based file links for Org mode" tar ((:url . "https://github.com/p-snow/ol-locate-file") (:commit . "30f84f72616f38975a2dd069dd9f729cb21cca32") (:revdesc . "30f84f72616f") (:keywords "hypermedia" "convenience") (:authors ("p-snow" . "public@p-snow.org")) (:maintainers ("p-snow" . "public@p-snow.org")) (:maintainer "p-snow" . "public@p-snow.org"))])
+ (ol-notmuch . [(20260601 1532) ((emacs (29 1)) (compat (31 0)) (notmuch (0 39)) (org (9 8))) "Links to notmuch messages" tar ((:url . "https://github.com/tarsius/ol-notmuch") (:commit . "fba0b5790a4c9aafeab69fd329776d0b4afa9aac") (:revdesc . "fba0b5790a4c") (:keywords "hypermedia" "mail") (:authors ("Matthieu Lemerre" . "racin@free.fr")) (:maintainers ("Jonas Bernoulli" . "emacs.ol-notmuch@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.ol-notmuch@jonas.bernoulli.dev"))])
+ (ol-tmsu . [(20230207 1457) ((emacs (28 1)) (tmsu (0 9))) "Org-mode links to TMSU queries" tar ((:url . "https://github.com/vifon/tmsu.el") (:commit . "9672d193a51f2848696445528de757aa21b2b686") (:revdesc . "9672d193a51f") (:keywords "files" "outlines" "hypermedia"))])
+ (olc . [(20200818 1221) ((emacs (25 1))) "Open location code library" tar ((:url . "https://gitlab.liu.se/davby02/olc") (:commit . "d2dc62dbc3cf6460cc12bd96857a988bc80ac37e") (:revdesc . "d2dc62dbc3cf") (:keywords "extensions" "lisp") (:authors ("David Byers" . "david.byers@liu.se")) (:maintainers ("David Byers" . "david.byers@liu.se")) (:maintainer "David Byers" . "david.byers@liu.se"))])
+ (old-norse-input . [(20170816 1842) ((emacs (24))) "An input method for Old Norse" tar ((:url . "https://github.com/david-christiansen/emacs-old-norse-input") (:commit . "c2e21ee72c3768e9152aff6baf12a19cde1d0c53") (:revdesc . "c2e21ee72c37") (:keywords "languages") (:authors ("David Christiansen" . "david@davidchristiansen.dk")) (:maintainers ("David Christiansen" . "david@davidchristiansen.dk")) (:maintainer "David Christiansen" . "david@davidchristiansen.dk"))])
+ (oldlace-theme . [(20150705 1300) ((emacs (24))) "Emacs 24 theme with an 'oldlace' background" tar ((:url . "https://github.com/mswift42/oldlace-theme") (:commit . "9ecbef999b63021c967846a3c80b3fbfc81f1290") (:revdesc . "9ecbef999b63"))])
+ (olivetti . [(20260524 213) ((emacs (24 4))) "Minor mode to automatically balance window margins" tar ((:url . "https://github.com/rnkn/olivetti") (:commit . "d2ccae56b442d9c5b06dd2481057abbd7eb82551") (:revdesc . "d2ccae56b442") (:keywords "wp" "text") (:authors ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainers ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainer "Paul W. Rankin" . "rnkn@rnkn.xyz"))])
+ (ollama-buddy . [(20260715 1551) ((emacs (29 1)) (transient (0 4 0))) "Friendly AI assistant for Ollama and cloud LLMs" tar ((:url . "https://github.com/captainflasmr/ollama-buddy") (:commit . "296dd738e43b91bd877743acd7e57139d437cc97") (:revdesc . "296dd738e43b") (:keywords "applications" "tools" "convenience") (:authors ("James Dyer" . "captainflasmr@gmail.com")) (:maintainers ("James Dyer" . "captainflasmr@gmail.com")) (:maintainer "James Dyer" . "captainflasmr@gmail.com"))])
+ (om-mode . [(20140915 2110) nil "Insert Om component template with life cycle" tar ((:url . "https://github.com/danielsz/om-mode") (:commit . "5a6b380f8d1293a865d8a37aa4816d7412c512ce") (:revdesc . "5a6b380f8d12") (:keywords "clojurescript") (:authors ("Daniel Szmulewicz" . "daniel.szmulewicz@gmail.com")) (:maintainers ("Daniel Szmulewicz" . "daniel.szmulewicz@gmail.com")) (:maintainer "Daniel Szmulewicz" . "daniel.szmulewicz@gmail.com"))])
+ (omni-kill . [(20171016 2140) nil "Kill all the things" tar ((:url . "https://github.com/AdrieanKhisbe/omni-kill.el") (:commit . "904549c8fd6ac3cf22b5d7111ca8944e179cffea") (:revdesc . "904549c8fd6a") (:keywords "convenience" "editing" "tools") (:authors ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainers ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainer "Adrien Becchis" . "adriean.khisbe@live.fr"))])
+ (omni-log . [(20200304 2229) ((emacs (24)) (ht (2 0)) (s (1 6 1)) (dash (2 13 0))) "Logging utilities" tar ((:url . "https://github.com/AdrieanKhisbe/omni-log.el") (:commit . "0a240660ccdd0b6588b4e3c322743b5ab1161338") (:revdesc . "0a240660ccdd") (:keywords "convenience" "languages" "tools") (:authors ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainers ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainer "Adrien Becchis" . "adriean.khisbe@live.fr"))])
+ (omni-quotes . [(20200304 2341) ((dash (2 8)) (omni-log (0 4 0)) (f (0 19 0)) (s (1 11 0)) (ht (2 1))) "Random quotes displayer" tar ((:url . "https://github.com/AdrieanKhisbe/omni-quotes.el") (:commit . "cfc7b7f01628a5d57384820d1096de4541e67cdf") (:revdesc . "cfc7b7f01628") (:keywords "convenience") (:authors ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainers ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainer "Adrien Becchis" . "adriean.khisbe@live.fr"))])
+ (omni-scratch . [(20171009 2151) nil "Easy and mode-specific draft buffers" tar ((:url . "https://github.com/AdrieanKhisbe/omni-scratch.el") (:commit . "636374c59c7d33c2f72c97ad8ba9fb4854f2324d") (:revdesc . "636374c59c7d") (:keywords "convenience" "languages" "tools") (:authors ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainers ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainer "Adrien Becchis" . "adriean.khisbe@live.fr"))])
+ (omni-tags . [(20170426 2109) ((pcre2el (1 7)) (cl-lib (0 5))) "Highlight and Actions for 'Tags'" tar ((:url . "https://github.com/AdrieanKhisbe/omni-tags.el") (:commit . "8f0f6c302fab900b7681e5c039f90850cbbabd33") (:revdesc . "8f0f6c302fab") (:keywords "convenience") (:authors ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainers ("Adrien Becchis" . "adriean.khisbe@live.fr")) (:maintainer "Adrien Becchis" . "adriean.khisbe@live.fr"))])
+ (omnibox . [(20180423 49) ((emacs (26 1)) (dash (2 13)) (frame-local (0 0 1))) "Selection package" tar ((:url . "https://github.com/sebastiencs/omnibox") (:commit . "8ee75c71c20c438ebc43ba24ef6f543633d118f3") (:revdesc . "8ee75c71c20c") (:keywords "completion" "selection" "convenience" "frames") (:authors ("Sebastien Chapuis" . "sebastien@chapu.is")) (:maintainers ("Sebastien Chapuis" . "sebastien@chapu.is")) (:maintainer "Sebastien Chapuis" . "sebastien@chapu.is"))])
+ (omnisharp . [(20210725 1955) ((emacs (24 4)) (flycheck (30)) (dash (2 12 0)) (auto-complete (1 4)) (popup (0 5 1)) (csharp-mode (0 8 7)) (cl-lib (0 5)) (s (1 10 0)) (f (0 19 0))) "Omnicompletion (intellisense) and more for C#" tar ((:url . "https://github.com/Omnisharp/omnisharp-emacs") (:commit . "c222e970998d796bdfd49e45ed789e2fd1a9da03") (:revdesc . "c222e970998d") (:keywords "languages" "csharp" "c#" "ide" "auto-complete" "intellisense"))])
+ (omtose-phellack-themes . [(20240928 1241) ((emacs (24))) "Two dark themes, with cold blusish touch" tar ((:url . "http:/github.com/franksn/omtose-darker/") (:commit . "b96905deb9b2bef097e0c573100874812c1e9aa8") (:revdesc . "b96905deb9b2"))])
+ (on . [(20250703 2313) ((emacs (27 1))) "Hooks for faster startup" tar ((:url . "https://gitlab.com/ajgrf/on.el") (:commit . "101619bc008564adeecf2e6d27b16aa7cf68ba0e") (:revdesc . "101619bc0085") (:keywords "convenience") (:authors ("Alex Griffin" . "alex.griffin@axgfn.com")) (:maintainers ("Alex Griffin" . "alex.griffin@axgfn.com")) (:maintainer "Alex Griffin" . "alex.griffin@axgfn.com"))])
+ (on-parens . [(20210928 1913) ((dash (2 10 0)) (emacs (24)) (evil (1 1 6)) (smartparens (1 6 3))) "Smartparens wrapper to fit with evil-mode/vim normal-state" tar ((:url . "https://github.com/willghatch/emacs-on-parens") (:commit . "b8ee8cea45c9b34820fcb951f522f13e3736d216") (:revdesc . "b8ee8cea45c9") (:keywords "evil" "smartparens"))])
+ (once . [(20260218 751) ((emacs (26 1)) (compat (30 1))) "Add-hook and eval-after-load, but only once" tar ((:url . "https://github.com/meedstrom/once") (:commit . "8bb03796ca7801bbd24dcc36f55a5a9d640326d4") (:revdesc . "8bb03796ca78") (:keywords "lisp") (:authors ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainers ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainer "Martin Edström" . "meedstrom91@gmail.com"))])
+ (one . [(20250824 1102) ((emacs (28 1)) (jack (1 0)) (htmlize (1 57))) "Static Site Generator for org-mode users" tar ((:url . "https://github.com/tonyaldon/one.el") (:commit . "0960d56c5a28820e28ba35fce9b204af0dcb558d") (:revdesc . "0960d56c5a28") (:keywords "hypermedia" "outlines") (:authors ("Tony Aldon" . "tony@tonyaldon.com")) (:maintainers ("Tony Aldon" . "tony@tonyaldon.com")) (:maintainer "Tony Aldon" . "tony@tonyaldon.com"))])
+ (one-time-pad-encrypt . [(20160329 1513) nil "One time pad encryption within file" tar ((:url . "https://github.com/garvinguan/emacs-one-time-pad/") (:commit . "87cc1f124024ce3d277299ca0ac703f182937d9f") (:revdesc . "87cc1f124024") (:keywords "convenience") (:authors ("Garvin Guan" . "garvin.guan@gmail.com")) (:maintainers ("Garvin Guan" . "garvin.guan@gmail.com")) (:maintainer "Garvin Guan" . "garvin.guan@gmail.com"))])
+ (opam . [(20150719 1220) ((emacs (24 1))) "OPAM tools" tar ((:url . "https://github.com/lunaryorn/opam.el") (:commit . "4d589de5765728f56af7078fae328b6792de8600") (:revdesc . "4d589de57657") (:keywords "convenience") (:authors ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainer "Sebastian Wiesner" . "swiesner@lunaryorn.com"))])
+ (opam-switch-mode . [(20230802 917) ((emacs (25 1))) "Select OCaml opam switches via a menu" tar ((:url . "https://github.com/ProofGeneral/opam-switch-mode") (:commit . "1069e56a662f23ea09d4e05611bdedeb99257012") (:revdesc . "1069e56a662f") (:maintainers (nil . "proof-general-maintainers@groupes.renater.fr")) (:maintainer nil . "proof-general-maintainers@groupes.renater.fr"))])
+ (open-color . [(20231220 1921) ((emacs (25 1))) "Open Color color palette" tar ((:url . "https://github.com/a13/open-color.el") (:commit . "4db381311d4b659922566236697a424f5f3fde6f") (:revdesc . "4db381311d4b") (:keywords "faces") (:authors ("DK" . "a13@users.noreply.github.com")) (:maintainers ("DK" . "a13@users.noreply.github.com")) (:maintainer "DK" . "a13@users.noreply.github.com"))])
+ (open-in-msvs . [(20170123 2228) nil "Open current file:line:column in Microsoft Visual Studio" tar ((:url . "https://github.com/evgeny-panasyuk/open-in-msvs") (:commit . "e0d071c83188ad5db8f3297d6ce784b4ed554a04") (:revdesc . "e0d071c83188") (:keywords "convenience" "usability" "integration" "visual studio" "msvs" "ide"))])
+ (open-junk-file . [(20161210 1114) nil "Open a junk (memo) file to try-and-error" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/open-junk-file.el") (:commit . "558bec7372b0fed4c4cb6074ab906535fae615bd") (:revdesc . "558bec7372b0") (:keywords "convenience" "tools") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (opencc . [(20170722 816) ((emacs (24 4))) "中文简繁转换 <-> 中文簡繁轉換 (Convert Chinese with OpenCC)" tar ((:url . "https://github.com/xuchunyang/emacs-opencc") (:commit . "959d9ffbae095752182026e3bd9b8fd61178c39f") (:revdesc . "959d9ffbae09") (:keywords "chinese") (:authors (nil . "mail@xuchunyang.me")) (:maintainers (nil . "mail@xuchunyang.me")) (:maintainer nil . "mail@xuchunyang.me"))])
+ (opencl-c-mode . [(20250512 1753) nil "Syntax coloring for opencl kernels" tar ((:url . "https://github.com/salmanebah/opencl-mode") (:commit . "0d305f9618ff56eb7e5e35c5bae980bcf957e972") (:revdesc . "0d305f9618ff") (:keywords "c" "opencl") (:authors ("Salmane Bah" . "salmane.bah~at~u-bordeaux.fr") ("Gustaf Waldemarson" . "gustaf.waldemarson~at~gmail.com")) (:maintainers ("Salmane Bah" . "salmane.bah~at~u-bordeaux.fr") ("Gustaf Waldemarson" . "gustaf.waldemarson~at~gmail.com")) (:maintainer "Salmane Bah" . "salmane.bah~at~u-bordeaux.fr"))])
+ (opener . [(20161207 1810) ((request (0 2 0)) (emacs (24)) (cl-lib (0 5))) "Opening urls as buffers" tar ((:url . "https://github.com/0robustus1/opener.el") (:commit . "c384f67278046fdcd220275fdd212ab85672cbeb") (:revdesc . "c384f6727804") (:keywords "url" "http" "files") (:authors ("Tim Reddehase" . "tr@rightsrestricted.com")) (:maintainers ("Tim Reddehase" . "tr@rightsrestricted.com")) (:maintainer "Tim Reddehase" . "tr@rightsrestricted.com"))])
+ (openfoam . [(20210516 1015) ((emacs (25 1))) "OpenFOAM files and directories" tar ((:url . "https://github.com/ralph-schleicher/emacs-openfoam") (:commit . "e2c899009a9df412bf9f360492b1072eb6f1513f") (:revdesc . "e2c899009a9d") (:keywords "languages") (:authors ("Ralph Schleicher" . "rs@ralph-schleicher.de")) (:maintainers ("Ralph Schleicher" . "rs@ralph-schleicher.de")) (:maintainer "Ralph Schleicher" . "rs@ralph-schleicher.de"))])
+ (opensource . [(20160926 1616) ((s (1 11 0)) (dash (2 12 1)) (pkg-info (0 6 0)) (request (0 2 0))) "Client for Opensource API" tar ((:url . "https://github.com/OpenSourceOrg/el-opensourceorg") (:commit . "42742d5f1b9590acff7f05ee0094e3a80f4f7171") (:revdesc . "42742d5f1b95") (:keywords "opensource") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (opensub . [(20250329 717) ((emacs (25 1)) (plz (0))) "Search and download from open-subtitles" tar ((:url . "https://github.com/danielfleischer/opensub") (:commit . "d8b11e979897616a661edd22a759e5cb025af356") (:revdesc . "d8b11e979897") (:keywords "multimedia") (:authors ("Daniel Fleischer" . "danflscr@gmail.com")) (:maintainers ("Daniel Fleischer" . "danflscr@gmail.com")) (:maintainer "Daniel Fleischer" . "danflscr@gmail.com"))])
+ (openwith . [(20120531 2136) nil "Open files with external programs" tar ((:url . "https://bitbucket.org/jpkotta/openwith") (:commit . "dd1f0e2a527535086c2b0ae12031dbf3ab7c5fd7") (:revdesc . "dd1f0e2a5275") (:keywords "files" "processes") (:authors ("Markus Triska" . "markus.triska@gmx.at")) (:maintainers ("Markus Triska" . "markus.triska@gmx.at")) (:maintainer "Markus Triska" . "markus.triska@gmx.at"))])
+ (operate-on-number . [(20231114 1921) nil "Operate on number at point with arithmetic functions" tar ((:url . "https://github.com/knu/operate-on-number.el") (:commit . "0ddebae1885c1b54eae1d79e66204d6d83c5065b") (:revdesc . "0ddebae1885c") (:keywords "editing") (:authors ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (orangey-bits-theme . [(20220822 324) ((autothemer (0 2)) (emacs (27 1))) "A Theme with smashing orangey bits" tar ((:url . "https://github.com/emacsfodder/emacs-theme-orangey-bits") (:commit . "533856d399cb4098300bcaf4a2d20920395746f8") (:revdesc . "533856d399cb") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (orca . [(20250205 1726) ((emacs (24 3)) (zoutline (0 1 0))) "Org Capture" tar ((:url . "https://github.com/abo-abo/orca") (:commit . "c6105df2ff6cec9f7d109a4348cc16e62bb0feef") (:revdesc . "c6105df2ff6c") (:keywords "org" "convenience") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (ordered-set . [(20250616 1432) ((emacs (25 3)) (seq (2 23))) "Insertion-order sets" tar ((:url . "https://github.com/kisaragi-hiu/ordered-set.el") (:commit . "9688d9e39f365ac86f852c5381f294a757d3bdf4") (:revdesc . "9688d9e39f36") (:keywords "extensions" "sequences" "collection" "set") (:authors ("Kisaragi Hiu" . "mail@kisaragi-hiu.com")) (:maintainers ("Kisaragi Hiu" . "mail@kisaragi-hiu.com")) (:maintainer "Kisaragi Hiu" . "mail@kisaragi-hiu.com"))])
+ (orderless . [(20260519 1029) ((emacs (27 1)) (compat (31))) "Completion style for matching regexps in any order" tar ((:url . "https://github.com/oantolin/orderless") (:commit . "cebe19e3cf0f30604d1ed1bfaa74fff21a4e89a5") (:revdesc . "cebe19e3cf0f") (:keywords "matching" "completion") (:authors ("Omar Antolín Camarena" . "omar@matem.unam.mx")) (:maintainers ("Omar Antolín Camarena" . "omar@matem.unam.mx") ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Omar Antolín Camarena" . "omar@matem.unam.mx"))])
+ (ordinal . [(20210519 1442) ((emacs (24 3))) "Convert number to ordinal number notation" tar ((:url . "https://github.com/zonuexe/ordinal.el") (:commit . "a7f378306290b6807fb6b87cee3ef79b31cec711") (:revdesc . "a7f378306290") (:keywords "lisp") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (org-ac . [(20170401 1307) ((auto-complete-pcmp (0 0 1)) (log4e (0 2 0)) (yaxception (0 1))) "Some auto-complete sources for org-mode" tar ((:url . "https://github.com/aki2o/org-ac") (:commit . "41e3ef8e4039619d0370c23c66730b3b2e9e32ed") (:revdesc . "41e3ef8e4039") (:keywords "org" "completion") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (org-agenda-dock . [(20260206 901) ((emacs (28 1)) (dock (0 0 1)) (org (9 0))) "Integrate org-mode with Gnome's Dock or KDE's taskbar" tar ((:url . "https://github.com/hron/org-agenda-dock") (:commit . "5b4f86a97c45f873ce41ce56ce398d9ef3e92dff") (:revdesc . "5b4f86a97c45") (:keywords "convenience" "org" "dock" "desktop") (:authors ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainers ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainer "Aleksei Gusev" . "aleksei.gusev@gmail.com"))])
+ (org-agenda-files-track . [(20231209 1529) ((emacs (27 1))) "Fine-track `org-agenda-files' to speed-up `org-agenda'" tar ((:url . "https://git.sr.ht/~ngraves/org-agenda-files-track") (:commit . "c0f5f7746ec023a32ba106ec24812eca5cbe15df") (:revdesc . "c0f5f7746ec0") (:keywords "data" "files" "tools") (:authors ("Nicolas Graves" . "ngraves@ngraves.fr")) (:maintainers ("Nicolas Graves" . "ngraves@ngraves.fr")) (:maintainer "Nicolas Graves" . "ngraves@ngraves.fr"))])
+ (org-agenda-files-track-ql . [(20231218 627) ((emacs (27 1)) (org-ql (0 7 3))) "Fine-track `org-agenda-files' to speed-up `org-ql-views'" tar ((:url . "https://git.sr.ht/~ngraves/org-agenda-files-track") (:commit . "832cffe62c35f32850afb800e9a3b8a20a05ad7b") (:revdesc . "832cffe62c35") (:keywords "data" "files" "tools") (:authors ("Nicolas Graves" . "ngraves@ngraves.fr")) (:maintainers ("Nicolas Graves" . "ngraves@ngraves.fr")) (:maintainer "Nicolas Graves" . "ngraves@ngraves.fr"))])
+ (org-agenda-property . [(20140626 2116) ((emacs (24 2))) "Display org properties in the agenda buffer" tar ((:url . "https://github.com/Bruce-Connor/org-agenda-property") (:commit . "01afb36072eb27846eb09310dfca7991dbae831e") (:revdesc . "01afb36072eb") (:keywords "calendar") (:authors ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainers ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainer "Artur Malabarba" . "bruce.connor.am@gmail.com"))])
+ (org-ai . [(20260107 1110) ((emacs (27 1)) (websocket (1 15))) "Use ChatGPT and other LLMs in org-mode and beyond" tar ((:url . "https://github.com/rksm/org-ai") (:commit . "71a6ea50555531f627a69aa0584d3a19060050a4") (:revdesc . "71a6ea505555") (:authors ("Robert Krahn" . "robert@kra.hn")) (:maintainers ("Robert Krahn" . "robert@kra.hn")) (:maintainer "Robert Krahn" . "robert@kra.hn"))])
+ (org-alert . [(20241225 2356) ((org (9 0)) (alert (1 2))) "Notify org deadlines via notify-send" tar ((:url . "https://github.com/spegoraro/org-alert") (:commit . "0bc04cea718387134c37c9fc4c22215adc3f79db") (:revdesc . "0bc04cea7183") (:keywords "org" "org-mode" "notify" "notifications" "calendar") (:authors ("Stephen Pegoraro" . "spegoraro@tutive.com")) (:maintainers ("Stephen Pegoraro" . "spegoraro@tutive.com")) (:maintainer "Stephen Pegoraro" . "spegoraro@tutive.com"))])
+ (org-analyzer . [(20191001 1717) nil "Org-analyzer is a tool that extracts time tracking data from org files" tar ((:url . "https://github.com/rksm/clj-org-analyzer") (:commit . "19da62aa4dcf1090be8f574f6f2d4c7e116163a8") (:revdesc . "19da62aa4dcf") (:keywords "calendar") (:authors ("Robert Krahn" . "robert@kra.hn")) (:maintainers ("Robert Krahn" . "robert@kra.hn")) (:maintainer "Robert Krahn" . "robert@kra.hn"))])
+ (org-anki . [(20260427 1354) ((emacs (27 1)) (request (0 3 2)) (dash (2 17)) (promise (1 1))) "Synchronize org-mode entries to Anki" tar ((:url . "https://github.com/eyeinsky/org-anki") (:commit . "fa5e66fc96a25477780b13cec1fca391260da81e") (:revdesc . "fa5e66fc96a2") (:keywords "outlines" "flashcards" "memory") (:authors ("Markus Läll" . "markus.l2ll@gmail.com")) (:maintainers ("Markus Läll" . "markus.l2ll@gmail.com")) (:maintainer "Markus Läll" . "markus.l2ll@gmail.com"))])
+ (org-appear . [(20260716 2120) ((emacs (29 1)) (org (9 3))) "Auto-toggle Org elements" tar ((:url . "https://github.com/awth13/org-appear") (:commit . "77d23efec5f5c25fc0798364d2b51a3ce3d8d518") (:revdesc . "77d23efec5f5") (:authors ("Alice Istleyeva" . "awth13@gmail.com")) (:maintainers ("Alice Istleyeva" . "awth13@gmail.com")) (:maintainer "Alice Istleyeva" . "awth13@gmail.com"))])
+ (org-arbeitszeit . [(20250724 1857) ((emacs (27 1))) "Calculate your worktime" tar ((:url . "https://github.com/bkaestner/org-arbeitszeit") (:commit . "7f8c50e1dea3595bbf3e79f5a5737f7336478a92") (:revdesc . "7f8c50e1dea3") (:keywords "tools" "org" "calendar" "convenience") (:authors ("Benjamin Kästner" . "benjamin.kaestner@gmail.com")) (:maintainers ("Benjamin Kästner" . "benjamin.kaestner@gmail.com")) (:maintainer "Benjamin Kästner" . "benjamin.kaestner@gmail.com"))])
+ (org-assistant . [(20230623 1439) ((emacs (28 1)) (uuidgen (1 2)) (deferred (0 5 1)) (s (1 12 0)) (dash (2 19 1)) (ht (0 9))) "Org babel extension for Chat Assistant APIs" tar ((:url . "https://github.com/tyler-dodge/org-assistant") (:commit . "d036f82072e22a7fc985e94853deaf65c41d5967") (:revdesc . "d036f82072e2") (:keywords "convenience") (:authors ("Tyler Dodge" . "(tyler@tdodge.consulting)")) (:maintainers ("Tyler Dodge" . "(tyler@tdodge.consulting)")) (:maintainer "Tyler Dodge" . "(tyler@tdodge.consulting)"))])
+ (org-attach-screenshot . [(20210221 1336) ((emacs (24 3))) "Screenshots integrated with org attachment dirs" tar ((:url . "https://github.com/dfeich/org-screenshot") (:commit . "14240909b64605fa966955a14c6045df0f402367") (:revdesc . "14240909b646") (:keywords "org" "multimedia") (:authors ("Derek Feichtinger" . "derek.feichtinger@psi.ch")) (:maintainers ("Derek Feichtinger" . "derek.feichtinger@psi.ch")) (:maintainer "Derek Feichtinger" . "derek.feichtinger@psi.ch"))])
+ (org-auto-expand . [(20231006 854) ((emacs (26 1)) (org (9 6))) "Automatically expand certain headings" tar ((:url . "https://github.com/alphapapa/org-auto-expand") (:commit . "86e3b24e894ab377ea005b1a574e77daace0451d") (:revdesc . "86e3b24e894a") (:keywords "convenience" "outlines" "org") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (org-auto-export-pandoc . [(20241026 832) ((ox-pandoc (2 0)) (emacs (24 1))) "Add org auto export with pandoc" tar ((:url . "https://github.com/Y0ngg4n/org-auto-export-pandoc.git") (:commit . "4c63da7ed3c6bae6fd512d2b886ed3c57c850219") (:revdesc . "4c63da7ed3c6") (:keywords "convenience") (:authors ("Yonggan" . "yonggan@obco.pro")) (:maintainers ("Yonggan" . "yonggan@obco.pro")) (:maintainer "Yonggan" . "yonggan@obco.pro"))])
+ (org-auto-tangle . [(20251230 1416) ((emacs (24 1)) (async (1 9 3))) "Automatically and Asynchronously tangles org files on save" tar ((:url . "https://github.com/yilkalargaw/org-auto-tangle") (:commit . "b4e7abc019179df473ecddf0af80561ddad8fc58") (:revdesc . "b4e7abc01917") (:keywords "outlines") (:authors ("Yilkal Argaw" . "yilkalargawworkneh@gmail.com")) (:maintainers ("Yilkal Argaw" . "yilkalargawworkneh@gmail.com")) (:maintainer "Yilkal Argaw" . "yilkalargawworkneh@gmail.com"))])
+ (org-autoexport . [(20250502 1854) ((emacs (29 1)) (org (9 6))) "Auto-export org file on save" tar ((:url . "https://git.sr.ht/~zondo/org-autoexport") (:commit . "90b8646ad1c8d658fcb142b34a3cdecc1f48b469") (:revdesc . "90b8646ad1c8") (:keywords "org" "wp") (:authors ("Glenn Hutchings" . "zondo42@gmail.com")) (:maintainers ("Glenn Hutchings" . "zondo42@gmail.com")) (:maintainer "Glenn Hutchings" . "zondo42@gmail.com"))])
+ (org-autolist . [(20220530 1620) nil "Improved list management in org-mode" tar ((:url . "https://github.com/calvinwyoung/org-autolist") (:commit . "da3a45f95f2e9f7281d533d1e5cec1764ae26a9c") (:revdesc . "da3a45f95f2e") (:keywords "lists" "checklists" "org-mode"))])
+ (org-aws-iam-role . [(20260625 102) ((emacs (29 1)) (async (1 9)) (promise (1 1))) "Browse, modify, and simulate AWS IAM Roles in Org Babel" tar ((:url . "https://github.com/will-abb/org-aws-iam-role") (:commit . "2e7072a8322a95d39c0019d41eebf9b93bb4a08d") (:revdesc . "2e7072a8322a") (:keywords "aws" "iam" "org" "babel" "tools") (:authors ("William Bosch-Bello" . "williamsbosch@gmail.com")) (:maintainers ("William Bosch-Bello" . "williamsbosch@gmail.com")) (:maintainer "William Bosch-Bello" . "williamsbosch@gmail.com"))])
+ (org-babel-eval-in-repl . [(20201206 1540) ((eval-in-repl (0 9 2)) (matlab-mode (3 3 6)) (ess (16 10)) (emacs (24))) "Eval org-mode babel code blocks in various REPLs" tar ((:url . "https://github.com/diadochos/org-babel-eval-in-repl") (:commit . "3591f062873de2d64cc6f83b3555d030506e6ee7") (:revdesc . "3591f062873d") (:keywords "literate programming" "reproducible research" "async execution") (:authors ("Takeshi Teshima" . "diadochos.developer@gmail.com")) (:maintainers ("Takeshi Teshima" . "diadochos.developer@gmail.com")) (:maintainer "Takeshi Teshima" . "diadochos.developer@gmail.com"))])
+ (org-beautify-theme . [(20250730 2044) ((emacs (24 1))) "A sub-theme to make org-mode more beautiful" tar ((:url . "https://github.com/jonnay/org-beautify-theme") (:commit . "5301f8cfab127f4219aad83e52787898f0710d4f") (:revdesc . "5301f8cfab12") (:keywords "faces" "org" "theme") (:authors ("Jonathan Arkell" . "jonnay@jonnay.net")) (:maintainers ("Jonathan Arkell" . "jonnay@jonnay.net")) (:maintainer "Jonathan Arkell" . "jonnay@jonnay.net"))])
+ (org-board . [(20230408 1041) nil "Bookmarking and web archival system for Org mode" tar ((:url . "https://github.com/scallywag/org-board") (:commit . "500fe02bc114e5b535a2eb2ab73954d79428168f") (:revdesc . "500fe02bc114") (:keywords "org" "bookmarks" "archives") (:authors ("Charles A. Roelli" . "charles@aurox.ch")) (:maintainers ("Charles A. Roelli" . "charles@aurox.ch")) (:maintainer "Charles A. Roelli" . "charles@aurox.ch"))])
+ (org-bookmark-heading . [(20240906 521) ((emacs (25 1)) (compat (29 1 4 5))) "Emacs bookmark support for Org mode" tar ((:url . "https://github.com/alphapapa/org-bookmark-heading") (:commit . "bcab006ec42d7e2c92875c7170df193de2ee55f5") (:revdesc . "bcab006ec42d") (:keywords "hypermedia" "outlines") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (org-bookmarks . [(20260102 1353) ((emacs (29 1)) (nerd-icons (0 1 0)) (seq (2 24))) "Manage bookmarks in Org mode" tar ((:url . "https://repo.or.cz/org-bookmarks.git") (:commit . "b54d1e296bb0fcaf33452838de83f69c1ab58f0d") (:revdesc . "b54d1e296bb0") (:keywords "outline" "matching" "hypermedia" "org") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (org-bookmarks-extractor . [(20220829 146) ((emacs (25 1))) "Extract bookmarks from Org mode" tar ((:url . "https://github.com/jxq0/org-bookmarks-extractor") (:commit . "26d810d4d58de1f64f0bbd649e13816f96663d73") (:revdesc . "26d810d4d58d") (:keywords "convenience" "org") (:authors ("Xuqing Jia" . "jxq@jxq.me")) (:maintainers ("Xuqing Jia" . "jxq@jxq.me")) (:maintainer "Xuqing Jia" . "jxq@jxq.me"))])
+ (org-books . [(20260528 819) ((enlive (0 0 1)) (s (1 11 0)) (helm (2 9 2)) (helm-org (1 0)) (dash (2 14 1)) (org (9 3)) (emacs (25))) "Reading list management with Org mode and helm" tar ((:url . "https://github.com/lepisma/org-books") (:commit . "74b82acd56c7ddaec5b03135a4cbbd5330a9b020") (:revdesc . "74b82acd56c7") (:keywords "outlines") (:authors ("Abhinav Tushar" . "abhinav@lepisma.xyz")) (:maintainers ("Abhinav Tushar" . "abhinav@lepisma.xyz")) (:maintainer "Abhinav Tushar" . "abhinav@lepisma.xyz"))])
+ (org-brain . [(20230217 1908) ((emacs (25 1)) (org (9 2))) "Org-mode concept mapping" tar ((:url . "https://github.com/Kungsgeten/org-brain") (:commit . "2bad7732aae1a3051e2a14de2e30f970bbe43c25") (:revdesc . "2bad7732aae1") (:keywords "outlines" "hypermedia") (:authors ("Erik Sjöstrand" . "sjostrand.erik@gmail.com")) (:maintainers ("Erik Sjöstrand" . "sjostrand.erik@gmail.com")) (:maintainer "Erik Sjöstrand" . "sjostrand.erik@gmail.com"))])
+ (org-bulletproof . [(20230615 640) ((emacs (27 1))) "Automatic plain list bullet cycling" tar ((:url . "https://github.com/pondersson/org-bulletproof") (:commit . "8ae80a53f8034914f502a8655f420c55078e02e1") (:revdesc . "8ae80a53f803") (:keywords "outlines" "convenience") (:authors ("Pontus Andersson" . "pondersson@gmail.com")) (:maintainers ("Pontus Andersson" . "pondersson@gmail.com")) (:maintainer "Pontus Andersson" . "pondersson@gmail.com"))])
+ (org-bullets . [(20200317 1740) nil "Show bullets in org-mode as UTF-8 characters" tar ((:url . "https://github.com/integral-dw/org-bullets") (:commit . "9ec0dbd30be7c6310804141ee952ac8c5f753557") (:revdesc . "9ec0dbd30be7") (:maintainers ("D. Williams" . "d.williams@posteo.net")) (:maintainer "D. Williams" . "d.williams@posteo.net"))])
+ (org-caldav . [(20260501 8) ((emacs (26 3)) (org (9 1))) "Sync org files with external calendar through CalDAV" tar ((:url . "https://github.com/dengste/org-caldav/") (:commit . "14f541814df597395fddb44b6e4bdb7c20f72cbe") (:revdesc . "14f541814df5") (:keywords "calendar" "caldav") (:authors ("David Engster" . "deng@randomsample.de")) (:maintainers ("David Engster" . "deng@randomsample.de")) (:maintainer "David Engster" . "deng@randomsample.de"))])
+ (org-calibre-notes . [(20221202 1657) ((emacs (27 1))) "Extract highlights and notes from Calibre EPUB reader" tar ((:url . "https://github.com/bpanthi977/org-calibre-notes") (:commit . "3120797ecbcb58827b91e3610e65579593d9a402") (:revdesc . "3120797ecbcb") (:authors ("Bibek Panthi" . "bpanthi977@gmail.com")) (:maintainers ("Bibek Panthi" . "bpanthi977@gmail.com")) (:maintainer "Bibek Panthi" . "bpanthi977@gmail.com"))])
+ (org-capture-pop-frame . [(20230516 236) ((emacs (24 4))) "Run org-capture in a new pop frame" tar ((:url . "https://github.com/tumashu/org-capture-pop-frame.git") (:commit . "d88b75cc02fc53716701051dbdd906db0515de8c") (:revdesc . "d88b75cc02fc") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (org-category-capture . [(20260127 711) ((org (9 0 0)) (emacs (24))) "Contextualy capture of org-mode TODOs" tar ((:url . "https://github.com/IvanMalison/org-project-capture") (:commit . "0521cbb6bb371cbfd9b7b5688b82ac119af1bf30") (:revdesc . "0521cbb6bb37") (:keywords "org-mode" "todo" "tools" "outlines") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (org-change . [(20260822 1405) ((emacs (29 1))) "Annotate changes in text files" tar ((:url . "https://github.com/drghirlanda/org-change") (:commit . "c122e2be04978ff64e4058ec7eb3a165e628da21") (:revdesc . "c122e2be0497") (:keywords "wp" "convenience"))])
+ (org-chef . [(20250714 107) ((org (0)) (emacs (24 3))) "Cookbook and recipe management with org-mode" tar ((:url . "https://github.com/Chobbes/org-chef") (:commit . "9f749324f7e8c51a2da8516820268c83e825c6c7") (:revdesc . "9f749324f7e8") (:keywords "convenience" "abbrev" "outlines" "org" "food" "recipes" "cooking") (:authors ("Calvin Beck" . "hobbes@ualberta.ca")) (:maintainers ("Calvin Beck" . "hobbes@ualberta.ca")) (:maintainer "Calvin Beck" . "hobbes@ualberta.ca"))])
+ (org-cite-overlay . [(20260811 1640) ((emacs (29 1)) (citeproc (0 9 4))) "Overlays for org-cite citations" tar ((:url . "https://git.sr.ht/~swflint/org-cite-overlay") (:commit . "a5b8953f7f6788f025cd6e6f6ce5a9f32ad5408d") (:revdesc . "a5b8953f7f67") (:keywords "bib" "tex") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (org-cite-overlay-sidecar . [(20260811 1640) ((emacs (28 1)) (citeproc (0 9 4)) (org-cite-overlay (0 1 0)) (universal-sidecar (1 5 0)) (universal-sidecar-citeproc (1 0 0))) "Show Sidecar for overlaid org-cite citations" tar ((:url . "https://git.sr.ht/~swflint/org-cite-overlay") (:commit . "a5b8953f7f6788f025cd6e6f6ce5a9f32ad5408d") (:revdesc . "a5b8953f7f67") (:keywords "bib") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (org-cliplink . [(20201126 1020) ((emacs (24 4))) "Insert org-mode links from the clipboard" tar ((:url . "https://github.com/rexim/org-cliplink") (:commit . "13e0940b65d22bec34e2de4bc8cba1412a7abfbc") (:revdesc . "13e0940b65d2") (:authors ("Alexey Kutepov" . "reximkut@gmail.com")) (:maintainers ("Alexey Kutepov" . "reximkut@gmail.com")) (:maintainer "Alexey Kutepov" . "reximkut@gmail.com"))])
+ (org-clock-agenda-daytime-mode . [(20240403 1115) ((org (9 6 18)) (emacs (26 1))) "Display the time clocked today in the modeline" tar ((:url . "https://www.draketo.de/software/emacs-daytime") (:commit . "f10c7b92a5b2a25f2300b885c2c70526ada50d9c") (:revdesc . "f10c7b92a5b2") (:keywords "org" "lisp" "clock" "time" "agenda") (:authors ("Arne Babenhauserheide" . "arne_bab@web.de")) (:maintainers ("Arne Babenhauserheide" . "arne_bab@web.de")) (:maintainer "Arne Babenhauserheide" . "arne_bab@web.de"))])
+ (org-clock-convenience . [(20230424 2101) ((org (8)) (emacs (24 3))) "Convenience functions for org time tracking" tar ((:url . "https://github.com/dfeich/org-clock-convenience") (:commit . "08417dfd51deb400b890cf71c87b57393fc5ac8c") (:revdesc . "08417dfd51de") (:keywords "convenience") (:authors ("Derek Feichtinger" . "dfeich.gmail.com")) (:maintainers ("Derek Feichtinger" . "dfeich.gmail.com")) (:maintainer "Derek Feichtinger" . "dfeich.gmail.com"))])
+ (org-clock-csv . [(20201222 1506) ((org (8 3)) (s (1 0))) "Export `org-mode' clock entries to CSV format" tar ((:url . "https://github.com/atheriel/org-clock-csv") (:commit . "af94b58c2e179a5bcc938f339e93de0eee3da99c") (:revdesc . "af94b58c2e17") (:keywords "calendar" "data" "org") (:authors ("Aaron Jacobs" . "atheriel@gmail.com")) (:maintainers ("Aaron Jacobs" . "atheriel@gmail.com")) (:maintainer "Aaron Jacobs" . "atheriel@gmail.com"))])
+ (org-clock-reminder . [(20230222 1956) ((emacs (26 1))) "Notifications that remind you about clocked-in tasks" tar ((:url . "https://github.com/inickey/org-clock-reminder") (:commit . "d3bf97113fd519aa08198e2283ba9c236a6df168") (:revdesc . "d3bf97113fd5") (:keywords "calendar" "convenience") (:authors ("Nikolay Brovko" . "i@nickey.ru")) (:maintainers ("Nikolay Brovko" . "i@nickey.ru")) (:maintainer "Nikolay Brovko" . "i@nickey.ru"))])
+ (org-clock-split . [(20200331 526) ((emacs (24))) "Split clock entries" tar ((:url . "https://github.com/justintaft/emacs-org-clock-split") (:commit . "39e1d2912a7a7223e2356a5fc4dff03507ae084d") (:revdesc . "39e1d2912a7a") (:keywords "calendar") (:authors ("Justin Taft" . "https://github.com/justintaft")) (:maintainers ("Justin Taft" . "https://github.com/justintaft")) (:maintainer "Justin Taft" . "https://github.com/justintaft"))])
+ (org-clock-today . [(20220918 514) ((emacs (25))) "Show total clocked time of the current day in the mode line" tar ((:url . "https://github.com/mallt/org-clock-today-mode") (:commit . "b73cca120eb64538ab0666892a8b97b6d65b4d6b") (:revdesc . "b73cca120eb6") (:authors ("Tijs Mallaerts" . "tijs.mallaerts@gmail.com")) (:maintainers ("Tijs Mallaerts" . "tijs.mallaerts@gmail.com")) (:maintainer "Tijs Mallaerts" . "tijs.mallaerts@gmail.com"))])
+ (org-commentary . [(20160802 637) ((dash (2 0)) (emacs (24 4)) (org (8 0))) "Generate or update conventional library headers using Org mode files" tar ((:url . "https://github.com/smaximov/org-commentary") (:commit . "821ccb994811359c42f4e3d459e0e88849d42b75") (:revdesc . "821ccb994811") (:keywords "convenience" "docs" "tools") (:authors ("Sergei Maximov" . "s.b.maximov@gmail.com")) (:maintainers ("Sergei Maximov" . "s.b.maximov@gmail.com")) (:maintainer "Sergei Maximov" . "s.b.maximov@gmail.com"))])
+ (org-contacts . [(20260813 1047) ((emacs (29 1)) (org (9 7))) "Contacts management system for Org mode" tar ((:url . "https://repo.or.cz/org-contacts.git") (:commit . "791a9daff267083df2dce76f33e0027f516c64d8") (:revdesc . "791a9daff267") (:keywords "contacts" "org-mode" "outlines" "hypermedia" "calendar") (:authors ("Julien Danjou" . "julien@danjou.info")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (org-context . [(20220606 1339) nil "Contextual capture and agenda commands for Org-mode" tar ((:url . "https://github.com/thisirs/org-context") (:commit . "47bd45149cb74dab2ebecccfb918f6f8502a4f2c") (:revdesc . "47bd45149cb7") (:keywords "org" "capture" "agenda" "convenience") (:authors ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainers ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainer "Sylvain Rousseau" . "thisirsatgmaildotcom"))])
+ (org-cua-dwim . [(20120203 534) nil "Org-mode and Cua mode compatibility layer" tar ((:url . "https://github.com/mattfidler/org-cua-dwim.el") (:commit . "a55d6c7009fc0b22f1110c07de629acc955c85e4") (:revdesc . "a55d6c7009fc") (:keywords "org-mode" "cua-mode"))])
+ (org-custom-cookies . [(20240414 44) ((emacs (25 1)) (org (9 4))) "Custom cookies for org-mode" tar ((:url . "https://github.com/gsingh93/org-custom-cookies") (:commit . "5650c73d20e53310dab62f6a65754a55aea9b40b") (:revdesc . "5650c73d20e5") (:authors ("Gulshan Singh" . "gsingh2011@gmail.com")) (:maintainers ("Gulshan Singh" . "gsingh2011@gmail.com")) (:maintainer "Gulshan Singh" . "gsingh2011@gmail.com"))])
+ (org-d20 . [(20240726 255) ((s (1 11 0)) (seq (2 19)) (dash (2 12 0)) (emacs (24))) "Minor mode for d20 tabletop roleplaying games" tar ((:url . "https://spwhitton.name/tech/code/org-d20/") (:commit . "ad399cde0ee21adc67ed0c95ae20900fa936f008") (:revdesc . "ad399cde0ee2") (:keywords "outlines" "games") (:authors ("Sean Whitton" . "spwhitton@spwhitton.name")) (:maintainers ("Sean Whitton" . "spwhitton@spwhitton.name")) (:maintainer "Sean Whitton" . "spwhitton@spwhitton.name"))])
+ (org-daily-reflection . [(20260102 35) ((emacs (26 1)) (org (9 4)) (compat (30 0 0 0))) "Concurrent display of org(-roam) dailies" tar ((:url . "https://github.com/emacsomancer/org-daily-reflection") (:commit . "4f7a2a3b068de2ecee23634a340334fc873421b1") (:revdesc . "4f7a2a3b068d") (:keywords "convenience" "frames" "terminals" "tools" "window-system") (:authors ("Benjamin Slade" . "slade@lambda-y.net")) (:maintainers ("Benjamin Slade" . "slade@lambda-y.net")) (:maintainer "Benjamin Slade" . "slade@lambda-y.net"))])
+ (org-dashboard . [(20171223 1924) ((cl-lib (0 5))) "Visually summarize progress in org files" tar ((:url . "https://github.com/bard/org-dashboard") (:commit . "02c0699771d199075a286e4502340ca6e7c9e831") (:revdesc . "02c0699771d1") (:keywords "outlines" "calendar") (:authors ("Massimiliano Mirra" . "hyperstruct@gmail.com")) (:maintainers ("Massimiliano Mirra" . "hyperstruct@gmail.com")) (:maintainer "Massimiliano Mirra" . "hyperstruct@gmail.com"))])
+ (org-doing . [(20161017 1620) nil "Keep track of what you're doing" tar ((:url . "https://github.com/omouse/org-doing") (:commit . "4819e75c827c2115bd28f3b3148d846aa64ccd9b") (:revdesc . "4819e75c827c") (:keywords "tools" "org"))])
+ (org-dotemacs . [(20211126 2038) ((org (7 9 3)) (cl-lib (0 5))) "Store your emacs config as an org file, and choose which bits to load" tar ((:url . "https://github.com/vapniks/org-dotemacs") (:commit . "598759f4a139f94da62836e8f8064da6377536b2") (:revdesc . "598759f4a139") (:keywords "local") (:authors ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainers ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainer "Joe Bloggs" . "vapniks@yahoo.com"))])
+ (org-download . [(20241118 1846) ((emacs (24 3)) (async (1 2))) "Image drag-and-drop for Org-mode" tar ((:url . "https://github.com/abo-abo/org-download") (:commit . "c8be2611786d1d8d666b7b4f73582de1093f25ac") (:revdesc . "c8be2611786d") (:keywords "multimedia" "images" "screenshots" "download"))])
+ (org-dp . [(20180311 923) ((cl-lib (0 5))) "Declarative Local Programming with Org Elements" tar ((:url . "https://github.com/tj64/org-dp") (:commit . "334fefd06eb925c86b1642787b2a088aa0932bab") (:revdesc . "334fefd06eb9") (:authors ("Thorsten Jolitz" . "tjolitzATgmailDOTcom")) (:maintainers ("Thorsten Jolitz" . "tjolitzATgmailDOTcom")) (:maintainer "Thorsten Jolitz" . "tjolitzATgmailDOTcom"))])
+ (org-drawio . [(20240213 38) ((org (9 6 6)) (emacs (28 1))) "Convert and include drawio image to orgmode" tar ((:url . "https://github.com/kimim/org-drawio") (:commit . "6b25d0ecf7de364da96c96da30a995df8a4cb835") (:revdesc . "6b25d0ecf7de") (:keywords "multimedia" "convenience") (:authors ("Kimi Ma" . "kimi.im@outlook.com")) (:maintainers ("Kimi Ma" . "kimi.im@outlook.com")) (:maintainer "Kimi Ma" . "kimi.im@outlook.com"))])
+ (org-drill . [(20210427 2003) ((emacs (25 3)) (seq (2 14)) (org (9 3)) (persist (0 3))) "Self-testing using spaced repetition" tar ((:url . "https://gitlab.com/phillord/org-drill/issues") (:commit . "e55415221eedba2f2bd37a30cb71c842e344b5ee") (:revdesc . "e55415221eed") (:keywords "games" "outlines" "multimedia") (:authors ("Paul Sexton" . "eeeickythump@gmail.com")) (:maintainers ("Phillip Lord" . "phillip.lord@russet.org.uk")) (:maintainer "Phillip Lord" . "phillip.lord@russet.org.uk"))])
+ (org-dropbox . [(20150114 509) ((dash (2 2)) (names (20150000)) (emacs (24))) "Move Dropbox notes from phone into org-mode datetree" tar ((:url . "https://github.com/heikkil/org-dropbox") (:commit . "2dc677a770c9e82f928ad8e97a7707eb368e58ed") (:revdesc . "2dc677a770c9") (:keywords "dropbox" "android" "notes" "org-mode") (:authors ("Heikki Lehvaslaiho" . "heikki.lehvaslaiho@gmail.com")) (:maintainers ("Heikki Lehvaslaiho" . "heikki.lehvaslaiho@gmail.com")) (:maintainer "Heikki Lehvaslaiho" . "heikki.lehvaslaiho@gmail.com"))])
+ (org-dt . [(20260330 1927) ((emacs (29 1))) "Dynamic templating loader" tar ((:url . "https://codeberg.org/niqc/org-dynamic-templates") (:commit . "aad20f4e6208077825f4b6cd8fc90dffcc1f5cbd") (:revdesc . "aad20f4e6208") (:keywords "convenience"))])
+ (org-easy-img-insert . [(20160915 2008) ((emacs (24 4))) "An easier way to add images from the web in org mode" tar ((:url . "https://github.com/tashrifsanil/org-easy-img-insert") (:commit . "3efb4d70e5a39bfbf7ee4c4033cc61afa89430dd") (:revdesc . "3efb4d70e5a3") (:keywords "convenience" "hypermedia" "files") (:authors ("Tashrif Sanil" . "tashrifsanil@kloke-source.com")) (:maintainers ("Tashrif Sanil" . "tashrifsanil@kloke-source.com")) (:maintainer "Tashrif Sanil" . "tashrifsanil@kloke-source.com"))])
+ (org-edit-indirect . [(20220909 457) ((emacs (27)) (edit-indirect (0 1 10)) (org (9 0))) "Edit anything, not just source blocks" tar ((:url . "https://github.com/agzam/org-edit-indirect.el") (:commit . "62894ac7b8b85eb03766f66072b0be10ffb6898e") (:revdesc . "62894ac7b8b8") (:keywords "convenience" "extensions" "outlines") (:authors ("Ag Ibragimomv" . "https://github.com/agzam")) (:maintainers ("Ag Ibragimomv" . "agzam.ibragimov@gmail.com")) (:maintainer "Ag Ibragimomv" . "agzam.ibragimov@gmail.com"))])
+ (org-edit-latex . [(20170908 1522) ((emacs (24 4)) (auctex (11 90))) "Edit embedded LaTeX in a dedicated buffer" tar ((:url . "https://github.com/et2010/org-edit-latex") (:commit . "ecd91601cb6f3aa79d055bde99bfec6d2b335952") (:revdesc . "ecd91601cb6f") (:keywords "org" "latex") (:authors ("James Wong" . "jianwang.academic@gmail.com")) (:maintainers ("James Wong" . "jianwang.academic@gmail.com")) (:maintainer "James Wong" . "jianwang.academic@gmail.com"))])
+ (org-ehtml . [(20220216 2054) ((web-server (20140109 2200)) (emacs (24 3))) "Export Org-mode files as editable web pages" tar ((:url . "https://github.com/eschulte/org-ehtml") (:commit . "419932d6dbce193b0d90b1ccf9bf643169d21f52") (:revdesc . "419932d6dbce") (:keywords "org" "web-server" "javascript" "html") (:authors ("Eric Schulte" . "schulte.eric@gmail.com")) (:maintainers ("Eric Schulte" . "schulte.eric@gmail.com")) (:maintainer "Eric Schulte" . "schulte.eric@gmail.com"))])
+ (org-elisp-help . [(20161122 55) ((cl-lib (0 5)) (org (9 0))) "Org links to emacs-lisp documentation" tar ((:url . "https://github.com/tarsius/org-elisp-help") (:commit . "3e33ab1a2933dd7f2782ef91d667a37f12d633ab") (:revdesc . "3e33ab1a2933") (:keywords "org" "remember" "lisp") (:authors ("Jonas Bernoulli" . "jonas@bernoul.li")) (:maintainers ("Jonas Bernoulli" . "jonas@bernoul.li")) (:maintainer "Jonas Bernoulli" . "jonas@bernoul.li"))])
+ (org-elp . [(20260331 1802) ((emacs (27 1)) (posframe (1 4 0))) "Preview latex equations in org mode while editing" tar ((:url . "https://github.com/guanyilun/org-elp") (:commit . "ff2570307654a13f5818ddc110423ed51436449c") (:revdesc . "ff2570307654") (:keywords "lisp" "tex" "org"))])
+ (org-emms . [(20260725 1523) ((emacs (24 4)) (org (9 3)) (emms (0 0))) "Playback multimedia files from Org documents" tar ((:url . "https://git.sr.ht/~jagrg/org-emms") (:commit . "92b86f3e2dc4b04019935e49b13890e5d36cd5cc") (:revdesc . "92b86f3e2dc4") (:keywords "multimedia") (:authors ("Jonathan Gregory" . "jgrgatautisticidotorg")) (:maintainers ("Jonathan Gregory" . "jgrgatautisticidotorg")) (:maintainer "Jonathan Gregory" . "jgrgatautisticidotorg"))])
+ (org-epa-gpg . [(20241206 2357) ((emacs (27 1))) "Patch to enable EasyPG .gpg images in Org mode inline" tar ((:url . "https://github.com/KeyWeeUsr/org-epa-gpg") (:commit . "6f3b8b77bdf63e96465322bbb545b96c9641d521") (:revdesc . "6f3b8b77bdf6") (:keywords "lisp" "org" "gpg" "pgp" "epa" "encryption" "image" "inline" "patch") (:authors ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainers ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainer "Peter Badida" . "keyweeusr@gmail.com"))])
+ (org-eval . [(20260323 1823) ((emacs (29 1)) (org (9 0))) "Execute named org-mode blocks on load/save" tar ((:url . "https://github.com/skx/org-eval") (:commit . "8f98e5412e9eed6d6567f3610cd13e7d149782a7") (:revdesc . "8f98e5412e9e") (:keywords "org" "outlines") (:authors ("Steve Kemp" . "steve@steve.fi")) (:maintainers ("Steve Kemp" . "steve@steve.fi")) (:maintainer "Steve Kemp" . "steve@steve.fi"))])
+ (org-evil . [(20210809 1724) ((dash (2 19 0)) (evil (0)) (org (9 4 4))) "Evil extensions for Org" tar ((:url . "https://github.com/guiltydolphin/org-evil") (:commit . "981b0931d043d3b0eb61fcab6258b5a88cc74d15") (:revdesc . "981b0931d043") (:keywords "convenience" "evil" "org") (:authors ("Ben Moon" . "software@guiltydolphin.com")) (:maintainers ("Ben Moon" . "software@guiltydolphin.com")) (:maintainer "Ben Moon" . "software@guiltydolphin.com"))])
+ (org-expose-emphasis-markers . [(20250726 28) ((emacs (29 1))) "Automatically show hidden org emphasis markers" tar ((:url . "https://github.com/lorniu/org-expose-emphasis-markers") (:commit . "5ca3994f2e13b342e0b9d353b66b892e34c7b784") (:revdesc . "5ca3994f2e13") (:authors ("lorniu" . "lorniu@gmail.com")) (:maintainers ("lorniu" . "lorniu@gmail.com")) (:maintainer "lorniu" . "lorniu@gmail.com"))])
+ (org-fancy-priorities . [(20210830 1657) nil "Display org priorities as custom strings" tar ((:url . "https://github.com/harrybournis/org-fancy-priorities") (:commit . "7f677c6c14ecf05eab8e0efbfe7f1b00ae68eb1d") (:revdesc . "7f677c6c14ec") (:keywords "convenience" "faces" "outlines") (:authors ("Harry Bournis" . "harrybournis@gmail.com")) (:maintainers ("Harry Bournis" . "harrybournis@gmail.com")) (:maintainer "Harry Bournis" . "harrybournis@gmail.com"))])
+ (org-fragtog . [(20220714 2146) ((emacs (27 1))) "Auto-toggle Org LaTeX fragments" tar ((:url . "https://github.com/io12/org-fragtog") (:commit . "c675563af3f9ab5558cfd5ea460e2a07477b0cfd") (:revdesc . "c675563af3f9") (:authors ("Benjamin Levy" . "blevy@protonmail.com")) (:maintainers ("Benjamin Levy" . "blevy@protonmail.com")) (:maintainer "Benjamin Levy" . "blevy@protonmail.com"))])
+ (org-gamedb . [(20210525 2338) ((emacs (25 1))) "Track video games in org-mode with giantbomb.com's API" tar ((:url . "https://github.com/repelliuss/org-gamedb") (:commit . "f283b6f6a7e8ad090405be57202caa3d3c424447") (:revdesc . "f283b6f6a7e8") (:keywords "outlines" "org" "games" "convenience" "api") (:authors ("repelliuss" . "https://github.com/repelliuss")) (:maintainers ("repelliuss" . "repelliuss@gmail.com")) (:maintainer "repelliuss" . "repelliuss@gmail.com"))])
+ (org-gcal . [(20260612 1823) ((aio (1 0)) (alert (1 2)) (emacs (26 1)) (oauth2-auto (20240326 2225)) (org (9 3)) (persist (0 8)) (request (20190901)) (request-deferred (20181129))) "Org sync with Google Calendar" tar ((:url . "https://github.com/kidd/org-gcal.el") (:commit . "7304b592c283944db54ac83201d7be6f13a1f447") (:revdesc . "7304b592c283") (:keywords "convenience") (:authors ("myuhe" . "yuhei.maeda_at_gmail.com")) (:maintainers ("Raimon Grau" . "raimonster@gmail.com")) (:maintainer "Raimon Grau" . "raimonster@gmail.com"))])
+ (org-generate . [(20260516 826) ((emacs (26 1)) (org (9 3)) (mustache (0 23))) "Generate template files/folders from org document" tar ((:url . "https://github.com/conao3/org-generate.el") (:commit . "e77b9cc063fdc035110ac2feea0799316e7e5339") (:revdesc . "e77b9cc063fd") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (org-gnome . [(20150614 1457) ((alert (1 2)) (telepathy (0 1)) (gnome-calendar (0 1))) "Orgmode integration with the GNOME desktop" tar ((:url . "https://github.com/NicolasPetton/org-gnome.el") (:commit . "1012d47886cfd30eed25b73d9f18e475e0155f88") (:revdesc . "1012d47886cf") (:keywords "org" "gnome") (:authors ("Nicolas Petton" . "petton.nicolas@gmail.com")) (:maintainers ("Nicolas Petton" . "petton.nicolas@gmail.com")) (:maintainer "Nicolas Petton" . "petton.nicolas@gmail.com"))])
+ (org-grep . [(20230821 2356) ((emacs (26 1))) "Kind of M-x rgrep adapted for Org mode" tar ((:url . "https://sr.ht/~minshall/org-grep/") (:commit . "64d23c2ca11ca68db85fc2c500377c9151e8e40b") (:revdesc . "64d23c2ca11c") (:authors ("François Pinard" . "pinard@iro.umontreal.ca")) (:maintainers ("Greg Minshall" . "minshall@umich.edu")) (:maintainer "Greg Minshall" . "minshall@umich.edu"))])
+ (org-grimoire . [(20260812 1624) ((emacs (30 2)) (org (9 7 11))) "Emacs-native static site generator" tar ((:url . "https://github.com/spiperac/org-grimoire") (:commit . "23075cbdacc65e1fbc22dd7a3c0b3ced4d96a74d") (:revdesc . "23075cbdacc6") (:keywords "files" "hypermedia" "outlines" "text") (:authors ("Strahinja Piperac" . "sp@spiperac.dev")) (:maintainers ("Strahinja Piperac" . "sp@spiperac.dev")) (:maintainer "Strahinja Piperac" . "sp@spiperac.dev"))])
+ (org-gtd . [(20260605 2210) ((emacs (28 1)) (compat (30 0 0 0)) (org-edna (1 1 2)) (f (0 20 0)) (org (9 6)) (transient (0 11 0)) (dag-draw (1 0 4))) "An implementation of GTD" tar ((:url . "https://github.com/Trevoke/org-gtd.el") (:commit . "01a12298033304b751628f41c088e9467d80532c") (:revdesc . "01a122980333") (:authors ("Aldric Giacomoni" . "trevoke@gmail.com")) (:maintainers ("Aldric Giacomoni" . "trevoke@gmail.com")) (:maintainer "Aldric Giacomoni" . "trevoke@gmail.com"))])
+ (org-habit-ng . [(20260713 1625) ((emacs (28 1)) (org (9 6)) (transient (0 13 5))) "Full RRULE recurrence for org-habit" tar ((:url . "https://codeberg.org/Trevoke/org-habit-ng") (:commit . "8710d55411af41d5505236d33bd5b7ad05807441") (:revdesc . "8710d55411af") (:keywords "calendar" "org" "habits") (:authors ("Aldric Giacomoni" . "trevoke@gmail.com")) (:maintainers ("Aldric Giacomoni" . "trevoke@gmail.com")) (:maintainer "Aldric Giacomoni" . "trevoke@gmail.com"))])
+ (org-habit-stats . [(20240208 323) ((emacs (25 1))) "Display info about habits" tar ((:url . "https://github.com/ml729/org-habit-stats/") (:commit . "d500f3a1b269b26097dd2f4cd414c3cb7c68ca23") (:revdesc . "d500f3a1b269") (:keywords "calendar" "org-mode" "org-habit" "habits" "stats" "statistics" "charts" "graphs"))])
+ (org-hide-drawers . [(20250924 732) ((emacs (26 1))) "Hide drawers in Org using overlays" tar ((:url . "https://github.com/krisbalintona/org-hide-drawers.git") (:commit . "15c8fa7fe5b15e09a751699ce780dde7edf7b5bd") (:revdesc . "15c8fa7fe5b1") (:keywords "tools" "extensions") (:authors ("Kristoffer Balintona" . "krisbalintona@gmail.com")) (:maintainers ("Kristoffer Balintona" . "krisbalintona@gmail.com")) (:maintainer "Kristoffer Balintona" . "krisbalintona@gmail.com"))])
+ (org-history . [(20260803 1832) ((emacs (29 1))) "Show Dates for Org headers from vcs + auto-commit" tar ((:url . "https://codeberg.org/Anoncheg/emacs-org-history") (:commit . "3049ba97830e8dd19a56add34ad2538cf11a0ac8") (:revdesc . "3049ba97830e") (:keywords "org" "outline" "vc") (:authors (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainers (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainer nil . "github.com/Anoncheg1,codeberg.org/Anoncheg"))])
+ (org-hyperscheduler . [(20250716 1801) ((emacs (27 1)) (websocket (1 13)) (log4e (0 3 3))) "UI (web) representation of org-agenda" tar ((:url . "https://github.com/dmitrym0/org-hyperscheduler") (:commit . "f40e3df279452dc0cb8506de3bfb6acbf2df79c1") (:revdesc . "f40e3df27945") (:keywords "org-mode" "calendar") (:authors ("Dmitry Markushevich" . "dmitrym@gmail.com")) (:maintainers ("Dmitry Markushevich" . "dmitrym@gmail.com")) (:maintainer "Dmitry Markushevich" . "dmitrym@gmail.com"))])
+ (org-id-cleanup . [(20230922 1258) ((org (9 3)) (dash (2 12)) (emacs (26 3))) "Interactively find, present and maybe delete unused IDs of org-id" tar ((:url . "https://github.com/marcIhm/org-id-cleanup") (:commit . "45b598c7971d149ce4eae5f790469d89f691c8e6") (:revdesc . "45b598c7971d") (:authors ("Marc Ihm" . "marc@ihm.name")) (:maintainers ("Marc Ihm" . "marc@ihm.name")) (:maintainer "Marc Ihm" . "marc@ihm.name"))])
+ (org-if . [(20150920 1513) nil "Interactive Fiction Authoring System for Org-Mode" tar ((:url . "https://gitlab.com/elzair/org-if") (:commit . "fab602cc1bbee7a4e99c0083e129219d3f9ed2e8") (:revdesc . "fab602cc1bbe") (:keywords "if" "org-if" "org org-mode") (:authors ("Philip Woods" . "elzairthesorcerer@gmail.com")) (:maintainers ("Philip Woods" . "elzairthesorcerer@gmail.com")) (:maintainer "Philip Woods" . "elzairthesorcerer@gmail.com"))])
+ (org-incoming . [(20250522 752) ((emacs (24 4)) (dash (2 19 1)) (datetime (0 7 2)) (s (1 13 1))) "Sort incoming PDFs into your org files" tar ((:url . "https://github.com/tinloaf/org-incoming") (:commit . "e702e208326a583e44e4e0c6bf7d9ce397a97453") (:revdesc . "e702e208326a") (:keywords "files") (:authors ("Lukas Barth" . "mail@tinloaf.de")) (:maintainers ("Lukas Barth" . "mail@tinloaf.de")) (:maintainer "Lukas Barth" . "mail@tinloaf.de"))])
+ (org-index . [(20260112 1658) ((org (9 3)) (dash (2 12)) (s (1 12)) (emacs (26 3))) "Ranked and incremental search among selected org-headlines" tar ((:url . "https://github.com/marcIhm/org-index") (:commit . "ccef23d8318bcccd1638f5b85176475c85275f83") (:revdesc . "ccef23d8318b") (:authors ("Marc Ihm" . "marc@ihm.name")) (:maintainers ("Marc Ihm" . "marc@ihm.name")) (:maintainer "Marc Ihm" . "marc@ihm.name"))])
+ (org-inline-anim . [(20230610 1504) ((emacs (25 3)) (org (9 4))) "Inline playback of animated GIF/PNG for Org" tar ((:url . "https://github.com/shg/org-inline-anim.el") (:commit . "488fed644748b578dffe7e3847970ec25dcfd24d") (:revdesc . "488fed644748") (:keywords "org" "outlines" "hypermedia" "multimedia"))])
+ (org-inline-pdf . [(20230826 1220) ((emacs (25 1)) (org (9 4))) "Inline PDF previewing for Org" tar ((:url . "https://github.com/shg/org-inline-pdf.el") (:commit . "2460c429e0977587863f41176aafe1ca858c13e8") (:revdesc . "2460c429e097") (:keywords "org" "outlines" "hypermedia"))])
+ (org-inline-pdfcomment . [(20241014 237) ((emacs (24 4))) "Export Support for Inline Tasks as PDF Comments" tar ((:url . "https://git.sr.ht/~swflint/org-inline-pdfcomment") (:commit . "a0af513b24deffcee14c27641477fef65b228696") (:revdesc . "a0af513b24de") (:keywords "docs" "text") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (org-invoice-table . [(20250409 402) ((emacs (26 1))) "Invoicing table formatter for org-mode" tar ((:url . "https://codeberg.org/trevdev/org-invoice-table") (:commit . "3fe481f54050bb98493a0e3a1eb2a0693cda36d6") (:revdesc . "3fe481f54050") (:authors ("Trevor Richards" . "trev@trevdev.ca")) (:maintainers ("Trevor Richards" . "trev@trevdev.ca")) (:maintainer "Trevor Richards" . "trev@trevdev.ca"))])
+ (org-invox . [(20260624 405) ((emacs (27 1)) (org (9 0))) "Invoice management for contractors using Org mode" tar ((:url . "https://github.com/a-manumohan/org-invox") (:commit . "0373529a0c922fcca62c7cb604099323bc869f76") (:revdesc . "0373529a0c92") (:keywords "outlines" "tools") (:authors ("Manu Mohan" . "me@manumohan.net")) (:maintainers ("Manu Mohan" . "me@manumohan.net")) (:maintainer "Manu Mohan" . "me@manumohan.net"))])
+ (org-iv . [(20171001 1022) ((impatient-mode (1 0 0)) (org (8 0)) (cl-lib (0 5))) "A tool used to view html (in browser) generated by org-file once the org-file changes" tar ((:url . "https://github.com/kuangdash/org-iv") (:commit . "7f2bb1b32647655fd9d6684f6f09dcc66b61b0cd") (:revdesc . "7f2bb1b32647") (:authors ("kuangdash" . "kuangdash@163.com")) (:maintainers ("kuangdash" . "kuangdash@163.com")) (:maintainer "kuangdash" . "kuangdash@163.com"))])
+ (org-ivy-search . [(20260713 622) ((emacs (26 1)) (ivy (0 10 0)) (org (0 10 0)) (beacon (1 3 4))) "Full text search for org files powered by ivy" tar ((:url . "https://github.com/beacoder/org-ivy-search") (:commit . "5aa418961c6dae576e800df459ad6dbd7740b4b4") (:revdesc . "5aa418961c6d") (:keywords "convenience" "tool" "org") (:authors ("Huming Chen" . "chenhuming@gmail.com")) (:maintainers ("Huming Chen" . "chenhuming@gmail.com")) (:maintainer "Huming Chen" . "chenhuming@gmail.com"))])
+ (org-jami-bot . [(20240203 1016) ((emacs (28 1)) (jami-bot (0 0 4))) "Capture GNU Jami messages as notes and todos in Org mode" tar ((:url . "https://gitlab.com/hperrey/org-jami-bot") (:commit . "020b03f299dad438f65d7bcbf93553b273fd7c33") (:revdesc . "020b03f299da") (:keywords "comm" "outlines" "org-capture" "jami") (:authors ("Hanno Perrey" . "hanno@hoowl.se")) (:maintainers ("Hanno Perrey" . "hanno@hoowl.se")) (:maintainer "Hanno Perrey" . "hanno@hoowl.se"))])
+ (org-jira . [(20260205 2052) ((emacs (24 5)) (cl-lib (0 5)) (request (0 2 0)) (dash (2 14 1))) "Syncing between Jira and Org-mode" tar ((:url . "https://github.com/ahungry/org-jira") (:commit . "738002ddbeb0b4311089706f0a979ceea53bf095") (:revdesc . "738002ddbeb0") (:keywords "ahungry" "jira" "org" "bug" "tracker") (:maintainers ("Matthew Carter" . "m@ahungry.com")) (:maintainer "Matthew Carter" . "m@ahungry.com"))])
+ (org-journal . [(20260413 1401) ((emacs (26 1)) (org (9 1))) "A simple org-mode based journaling mode" tar ((:url . "https://github.com/bastibe/org-journal") (:commit . "6460f6f2b0835b4b8aa87d5fdf40cac7deb319f5") (:revdesc . "6460f6f2b083"))])
+ (org-journal-list . [(20190221 2052) ((emacs (25))) "Org mode Journal List" tar ((:url . "https://github.com/huytd/org-journal-list") (:commit . "2b26d00181bb49bff64b31ad020490acd1b6ae02") (:revdesc . "2b26d00181bb") (:authors ("Huy Tran" . "huytd189@gmail.com")) (:maintainers ("Huy Tran" . "huytd189@gmail.com")) (:maintainer "Huy Tran" . "huytd189@gmail.com"))])
+ (org-journal-tags . [(20260102 1551) ((emacs (27 1)) (org-journal (2 1 2)) (magit-section (3 3 0)) (transient (0 3 7))) "Tagging and querying system for org-journal" tar ((:url . "https://github.com/SqrtMinusOne/org-journal-tags") (:commit . "945347b7a2daae463498f12300b13b583a8792d4") (:revdesc . "945347b7a2da") (:authors ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainers ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainer "Korytov Pavel" . "thexcloud@gmail.com"))])
+ (org-kanban . [(20250329 2201) ((s (0)) (dash (2 17 0))) "Kanban dynamic block for org-mode" tar ((:url . "https://github.com/gizmomogwai/org-kanban") (:commit . "bc7864f2140d3ed510ec0ecd60c6d3d8b8589ea4") (:revdesc . "bc7864f2140d") (:keywords "org-mode" "org" "kanban" "tools") (:authors ("Christian Köstlin" . "christian.koestlin@gmail.com")) (:maintainers ("Christian Köstlin" . "christian.koestlin@gmail.com")) (:maintainer "Christian Köstlin" . "christian.koestlin@gmail.com"))])
+ (org-kindle . [(20220210 1408) ((emacs (25)) (cl-lib (0 5)) (seq (2 20))) "Send org link file to ebook reader" tar ((:url . "https://repo.or.cz/org-kindle.git") (:commit . "fadcfd62e254d0c45e87d63128a82a08ae21869a") (:revdesc . "fadcfd62e254") (:keywords "org" "link" "ebook" "kindle" "epub" "azw3" "mobi") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (org-lark . [(20260614 319) ((emacs (27 1))) "Export Lark docs to Org" tar ((:url . "https://github.com/bbw9n/org-lark") (:commit . "ebbe9ed102be2bf00b698f1280a305d8f3b0d38d") (:revdesc . "ebbe9ed102be") (:keywords "outlines" "hypermedia" "tools") (:authors ("bbw9n" . "bbw9nio@gmail.com")) (:maintainers ("bbw9n" . "bbw9nio@gmail.com")) (:maintainer "bbw9n" . "bbw9nio@gmail.com"))])
+ (org-latex-impatient . [(20221111 623) ((emacs (26)) (s (1 8 0)) (posframe (0 8 0)) (org (9 3)) (dash (2 17 0))) "Preview org-latex Fragments Instantly via MathJax" tar ((:url . "https://github.com/yangsheng6810/org-latex-instant-preview") (:commit . "031025a8be9bf7255aa047388d027642cd2d6183") (:revdesc . "031025a8be9b") (:keywords "tex" "tools") (:authors ("Sheng Yang" . "styang@fastmail.com")) (:maintainers ("Sheng Yang" . "styang@fastmail.com")) (:maintainer "Sheng Yang" . "styang@fastmail.com"))])
+ (org-linenote . [(20260518 1058) ((emacs (29 1)) (vertico (1 7)) (eldoc (1 11)) (fringe-helper (1 0 1))) "A package inspired by VSCode Linenote" tar ((:url . "https://github.com/seokbeomKim/org-linenote") (:commit . "35a7940c1c81a1faf8f4b58a633cdcdd89c99509") (:revdesc . "35a7940c1c81") (:keywords "tools" "note" "org") (:authors ("Jason Kim" . "sukbeom.kim@gmail.com")) (:maintainers ("Jason Kim" . "sukbeom.kim@gmail.com")) (:maintainer "Jason Kim" . "sukbeom.kim@gmail.com"))])
+ (org-link-beautify . [(20260826 1721) ((emacs (29 1)) (nerd-icons (0 0 1)) (qrencode (1 3))) "Beautify Org Links" tar ((:url . "https://repo.or.cz/org-link-beautify.git") (:commit . "1e88f0914b66a083eda42258986db626a405e3a4") (:revdesc . "1e88f0914b66") (:keywords "hypermedia") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (org-link-travis . [(20140405 2327) ((org (7))) "Insert/Export the link of Travis CI on org-mode" tar ((:url . "https://github.com/aki2o/org-link-travis") (:commit . "596615ad8373d9090bd4138da683524f0ad0bda5") (:revdesc . "596615ad8373") (:keywords "org") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (org-linkotron . [(20200112 2235) ((emacs (26 1)) (org (9 3))) "Org-mode link selector" tar ((:url . "https://gitlab.com/perweij/org-linkotron") (:commit . "d0adc5247b205bc73d2f1a83d4a512d2be541eb5") (:revdesc . "d0adc5247b20") (:keywords "hypermedia" "org") (:authors ("Per Weijnitz" . "per.weijnitz@gmail.com")) (:maintainers ("Per Weijnitz" . "per.weijnitz@gmail.com")) (:maintainer "Per Weijnitz" . "per.weijnitz@gmail.com"))])
+ (org-links . [(20260717 1827) ((emacs (27 2))) "Better manage line numbers in links of Org mode" tar ((:url . "https://github.com/Anoncheg1/emacs-org-links") (:commit . "d46c02edbdbd9f070b0492ffbe9f4ceea3322737") (:revdesc . "d46c02edbdbd") (:keywords "org" "text" "hypermedia" "url") (:authors (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainers (nil . "github.com/Anoncheg1,codeberg.org/Anoncheg")) (:maintainer nil . "github.com/Anoncheg1,codeberg.org/Anoncheg"))])
+ (org-listcruncher . [(20210706 1741) ((seq (2 3)) (emacs (26 1))) "Planning tool - Parse Org mode lists into table" tar ((:url . "https://github.com/dfeich/org-listcruncher") (:commit . "075e0e6d36eb50406a608bc8a2f0dd359ec63938") (:revdesc . "075e0e6d36eb") (:keywords "convenience") (:authors ("Derek Feichtinger" . "dfeich@gmail.com")) (:maintainers ("Derek Feichtinger" . "dfeich@gmail.com")) (:maintainer "Derek Feichtinger" . "dfeich@gmail.com"))])
+ (org-mac-link . [(20231016 2047) ((emacs (27 1))) "Insert org-mode links to items selected in various Mac apps" tar ((:url . "https://gitlab.com/aimebertrand/org-mac-link") (:commit . "e30171a6e98db90787ab8a23b3a7dc4fd13b10f9") (:revdesc . "e30171a6e98d") (:keywords "files" "wp" "url" "org") (:authors ("Anthony Lander" . "anthony.lander@gmail.com") ("John Wiegley" . "johnw@gnu.org") ("Christopher Suckling" . "sucklingatgmaildotcom") ("Daniil Frumin" . "difrumin@gmail.com") ("Alan Schmitt" . "alan.schmitt@polytechnique.org") ("Mike McLean" . "mike.mclean@pobox.com")) (:maintainers ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainer "Aimé Bertrand" . "aime.bertrand@macowners.club"))])
+ (org-make-toc . [(20240830 2046) ((emacs (26 1)) (dash (2 12)) (s (1 10 0)) (org (9 3)) (compat (29 1))) "Automatic tables of contents for Org files" tar ((:url . "https://github.com/alphapapa/org-make-toc") (:commit . "5f0f39b11c091a5abf49ddf78a6f740252920f78") (:revdesc . "5f0f39b11c09") (:keywords "org" "convenience") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (org-mcp . [(20260820 803) ((emacs (28 2)) (mcp-server-lib (0 4 0))) "MCP server for Org-mode" tar ((:url . "https://github.com/laurynas-biveinis/org-mcp") (:commit . "b02d20d190ecaa6c40f044d04a1502576cdca7bb") (:revdesc . "b02d20d190ec") (:keywords "convenience" "files" "matching" "outlines") (:authors ("Laurynas Biveinis" . "laurynas.biveinis@gmail.com")) (:maintainers ("Laurynas Biveinis" . "laurynas.biveinis@gmail.com")) (:maintainer "Laurynas Biveinis" . "laurynas.biveinis@gmail.com"))])
+ (org-mem . [(20260326 1145) ((emacs (29 1)) (el-job (2 7 3)) (llama (1 0)) (truename-cache (0 3 2))) "Fast info from a large number of Org file contents" tar ((:url . "https://github.com/meedstrom/org-mem") (:commit . "07094dac902e452d59533e4d01e8177afaa0cfd1") (:revdesc . "07094dac902e") (:keywords "text") (:authors ("Martin Edström" . "meedstrom@runbox.eu")) (:maintainers ("Martin Edström" . "meedstrom@runbox.eu")) (:maintainer "Martin Edström" . "meedstrom@runbox.eu"))])
+ (org-mime . [(20251201 245) ((emacs (27 1))) "Org html export for text/html MIME emails" tar ((:url . "https://github.com/org-mime/org-mime") (:commit . "ffaad784a8597ee52842a578c01bd347d3e0281d") (:revdesc . "ffaad784a859") (:keywords "mime" "mail" "email" "html") (:maintainers ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainer "Chen Bin" . "chenbin.sh@gmail.com"))])
+ (org-mind-map . [(20180826 2340) ((emacs (24)) (dash (1 8 0)) (org (8 2 10))) "Creates a directed graph from org-mode files" tar ((:url . "https://github.com/theodorewiles/org-mind-map") (:commit . "41df4b2e30455494f1848b4e06cc9208aa9e902b") (:revdesc . "41df4b2e3045") (:keywords "orgmode" "extensions" "graphviz" "dot") (:authors ("Ted Wiles" . "theodore.wiles@gmail.com")) (:maintainers ("Ted Wiles" . "theodore.wiles@gmail.com")) (:maintainer "Ted Wiles" . "theodore.wiles@gmail.com"))])
+ (org-mindmap . [(20260617 1609) ((emacs (29 1)) (org (9 1))) "Editable mindmap visualization in org-mode" tar ((:url . "https://github.com/krvkir/org-mindmap") (:commit . "128e8fb853718bb4a04aff29703b927276a8b24c") (:revdesc . "128e8fb85371") (:keywords "org" "tools" "outlines") (:authors ("krvkir" . "krvkir@gmail.com")) (:maintainers ("krvkir" . "krvkir@gmail.com")) (:maintainer "krvkir" . "krvkir@gmail.com"))])
+ (org-ml . [(20250514 2314) ((emacs (27 1)) (org (9 7)) (dash (2 17)) (s (1 12))) "Functional Org Mode API" tar ((:url . "https://github.com/ndwarshuis/org-ml") (:commit . "e348f446746bd1699eae05a82dccd4276c6cc9a8") (:revdesc . "e348f446746b") (:keywords "org-mode" "outlines") (:authors ("Nathan Dwarshuis" . "ndwar@yavin4.ch")) (:maintainers ("Nathan Dwarshuis" . "ndwar@yavin4.ch")) (:maintainer "Nathan Dwarshuis" . "ndwar@yavin4.ch"))])
+ (org-mobile-sync . [(20180606 524) ((emacs (24 3 50)) (org (8 0))) "Automatically sync org-mobile on changes" tar ((:url . "https://framagit.org/steckerhalter/org-mobile-sync") (:commit . "06764b943a528827df1e2acc6bc7806cc2c1351f") (:revdesc . "06764b943a52") (:keywords "org-mode" "org" "mobile" "sync" "todo"))])
+ (org-modern . [(20260722 1411) ((emacs (29 1)) (org (9 6)) (compat (31))) "Modern looks for Org" tar ((:url . "https://github.com/minad/org-modern") (:commit . "8775389d085a4ebdf77856b8f86ab4d9679fc55e") (:revdesc . "8775389d085a") (:keywords "outlines" "hypermedia" "text") (:authors ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (org-mpv-notes . [(20260224 1801) ((emacs (28 1))) "Take notes in org mode while watching videos in mpv" tar ((:url . "https://github.com/bpanthi977/org-mpv-notes") (:commit . "bb0e6b2dd5a9dd51d8f3dfa95302f245934391db") (:revdesc . "bb0e6b2dd5a9") (:authors ("Bibek Panthi" . "bpanthi977@gmail.com")) (:maintainers ("Bibek Panthi" . "bpanthi977@gmail.com")) (:maintainer "Bibek Panthi" . "bpanthi977@gmail.com"))])
+ (org-mru-clock . [(20240522 826) ((emacs (26 1))) "Clock in/out of tasks with completion and persistent history" tar ((:url . "https://github.com/unhammer/org-mru-clock") (:commit . "198beb2089ea5e457dd13e8ac64d775eeff8fd89") (:revdesc . "198beb2089ea") (:keywords "convenience" "calendar") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (org-msg . [(20260507 725) ((emacs (24 4)) (htmlize (1 54))) "Org mode to send and reply to email in HTML" tar ((:url . "https://github.com/jeremy-compostella/org-msg") (:commit . "7b45df759340f3e388e84f497052b7cf3a41698c") (:revdesc . "7b45df759340") (:keywords "extensions" "mail") (:authors ("Jérémy Compostella" . "jeremy.compostella@gmail.com")) (:maintainers ("Jérémy Compostella" . "jeremy.compostella@gmail.com")) (:maintainer "Jérémy Compostella" . "jeremy.compostella@gmail.com"))])
+ (org-multi-wiki . [(20210324 1820) ((emacs (26 1)) (dash (2 12)) (s (1 12)) (org-ql (0 5)) (org (9 3))) "Multiple wikis based on Org mode" tar ((:url . "https://github.com/akirak/org-multi-wiki") (:commit . "bf8039aadddaf02569fab473f766071ef7e63563") (:revdesc . "bf8039aaddda") (:keywords "org" "outlines" "files") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (org-multiple-keymap . [(20191017 1920) ((org (8 2 4)) (emacs (24)) (cl-lib (0 5))) "Set keymap to elements, such as timestamp and priority" tar ((:url . "https://github.com/myuhe/org-multiple-keymap.el") (:commit . "4eb8aa0aada012b2346cc7f0c55e07783141a2c3") (:revdesc . "4eb8aa0aada0") (:keywords "convenience" "org-mode") (:authors ("myuhe" . "yuhei.maeda_at_gmail.com")))])
+ (org-newtab . [(20240227 155) ((emacs (27 1)) (websocket (1 14)) (async (1 9 7))) "Supercharge your browser's new tab page" tar ((:url . "https://github.com/Zweihander-Main/org-newtab") (:commit . "eca494a43e242558bd8db24d321ad62a8ec86c02") (:revdesc . "eca494a43e24") (:keywords "outlines") (:authors ("Zweihänder" . "zweidev@zweihander.me")) (:maintainers ("Zweihänder" . "zweidev@zweihander.me")) (:maintainer "Zweihänder" . "zweidev@zweihander.me"))])
+ (org-nix-shell . [(20240603 859) ((emacs (27 1)) (org (9 4))) "Org local nix-shell" tar ((:url . "https://github.com/AntonHakansson/") (:commit . "f359d9e1053fadee86dd668f4789ae2e700d8e8a") (:revdesc . "f359d9e1053f") (:keywords "processes" "outlines") (:maintainers ("Anton Hakansson" . "anton@hakanssn.com")) (:maintainer "Anton Hakansson" . "anton@hakanssn.com"))])
+ (org-node . [(20260819 1204) ((emacs (29 1)) (cond-let (0 2)) (llama (1 0)) (magit-section (4 3 0)) (org-mem (0 34 0))) "Fast org-roam replacement" tar ((:url . "https://github.com/meedstrom/org-node") (:commit . "7466daf5ec82504eab0fe2a68652830776f0baa8") (:revdesc . "7466daf5ec82") (:keywords "org" "hypermedia") (:authors ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainers ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainer "Martin Edström" . "meedstrom91@gmail.com"))])
+ (org-notebook . [(20170322 452) ((emacs (24)) (org (8)) (cl-lib (0 5))) "Ease the use of org-mode as a notebook" tar ((:url . "https://github.com/Rahi374/org-notebook") (:commit . "d90c4aeca2442161e6dd89de175561af85aace03") (:revdesc . "d90c4aeca244") (:keywords "convenience" "tools") (:authors ("Paul Elder" . "paul.elder@amanokami.net")) (:maintainers ("Paul Elder" . "paul.elder@amanokami.net")) (:maintainer "Paul Elder" . "paul.elder@amanokami.net"))])
+ (org-noter . [(20260730 237) ((emacs (24 4)) (cl-lib (0 6)) (org (9 4))) "A synchronized, Org-mode, document annotator" tar ((:url . "https://github.com/org-noter/org-noter") (:commit . "feae91ca4ee6fdc7fd2489fa751dd96bc1f3ddf2") (:revdesc . "feae91ca4ee6") (:keywords "lisp" "pdf" "interleave" "annotate" "external" "sync" "notes" "documents" "org-mode") (:authors ("Gonçalo Santos" . "in@bsentia") ("Maintainer Dmitry M" . "dmitrym@gmail.com")) (:maintainers ("Peter Mao" . "peter.mao@gmail.com") ("Dmitry M" . "dmitrym@gmail.com")) (:maintainer "Peter Mao" . "peter.mao@gmail.com"))])
+ (org-noter-pdftools . [(20230725 1433) ((emacs (26 1)) (org (9 4)) (pdf-tools (0 8)) (org-pdftools (1 0)) (org-noter (1 4 1))) "Integration between org-pdftools and org-noter" tar ((:url . "https://github.com/fuxialexander/org-pdftools") (:commit . "4e420233a153a9c4ab3d1a7e1d7d3211c836f0ac") (:revdesc . "4e420233a153") (:keywords "convenience") (:authors ("Alexander Fu Xi" . "fuxialexander@gmail.com")) (:maintainers ("Alexander Fu Xi" . "fuxialexnader@gmail.com")) (:maintainer "Alexander Fu Xi" . "fuxialexnader@gmail.com"))])
+ (org-notifications . [(20210918 1827) ((emacs (25 1)) (org (9 0)) (sound-wav (0 2)) (alert (1 2)) (seq (2 21))) "Creates notifications for org-mode entries" tar ((:url . "https://github.com/doppelc/org-notifications") (:commit . "b8032f8adfbeb328962a5657c6dd173e64cc76e5") (:revdesc . "b8032f8adfbe") (:keywords "outlines"))])
+ (org-octopress . [(20170821 415) ((org (9 0)) (orglue (0 1)) (ctable (0 1 1))) "Compose octopress articles using org-mode" tar ((:url . "https://github.com/yoshinari-nomura/org-octopress") (:commit . "38598ef98d04076a8eb78d549907ddfde8d3a652") (:revdesc . "38598ef98d04") (:keywords "org" "jekyll" "octopress" "blog") (:authors ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainers ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainer "Yoshinari Nomura" . "nom@quickhack.net"))])
+ (org-onenote . [(20171008 500) ((oauth2 (0 11)) (request (0 2 0)) (org (8 2 10))) "Export org-mode document to onenote" tar ((:url . "https://github.com/ifree/org-onenote") (:commit . "5ce5cf4edb143180e0b185ac26826d39ae5bc929") (:revdesc . "5ce5cf4edb14") (:keywords "tools" "docs" "org-mode" "onenote") (:authors ("Frei Zhang" . "ifree0@gmail.com")) (:maintainers ("Frei Zhang" . "ifree0@gmail.com")) (:maintainer "Frei Zhang" . "ifree0@gmail.com"))])
+ (org-outline-numbering . [(20180705 1501) ((emacs (24)) (org (8 3)) (cl-lib (0 6)) (ov (1 0 6))) "Show outline numbering as overlays in org-mode" tar ((:url . "https://gitlab.com/andersjohansson/org-outline-numbering") (:commit . "b95b6a7ed9289637cb512232470633b330ca9713") (:revdesc . "b95b6a7ed928") (:keywords "wp" "convenience"))])
+ (org-outlook . [(20160705 1338) nil "Outlook org" tar ((:url . "https://github.com/mlf176f2/org-outlook.el") (:commit . "ec32d8d9d8ffd17e6de4de0b52fc3f5ad9b4cc0d") (:revdesc . "ec32d8d9d8ff") (:keywords "org-outlook"))])
+ (org-page . [(20241227 814) ((ht (1 5)) (simple-httpd (1 4 6)) (mustache (0 22)) (htmlize (1 47)) (org (8 0)) (dash (2 0 0)) (cl-lib (0 5)) (git (0 1 1))) "Static site generator based on org mode" tar ((:url . "https://github.com/kelvinh/org-page") (:commit . "3641afab005b892b586a1e70da29201004c189c3") (:revdesc . "3641afab005b") (:keywords "org-mode" "convenience" "beautify") (:authors ("Kelvin Hu" . "iniDOTkelvinATgmailDOTcom")) (:maintainers ("Kelvin Hu" . "iniDOTkelvinATgmailDOTcom")) (:maintainer "Kelvin Hu" . "iniDOTkelvinATgmailDOTcom"))])
+ (org-parser . [(20200417 301) ((emacs (25 1)) (dash (2 12 0)) (ht (2 1))) "Parse org files into structured datatypes" tar ((:url . "https://hg.sr.ht/~zck/org-parser") (:commit . "fd4cb7035ff649378cc968b1ec2c386b5c565706") (:revdesc . "fd4cb7035ff6") (:keywords "files" "outlines" "tools"))])
+ (org-pdftools . [(20250714 1631) ((emacs (26 1)) (org (9 3 6)) (pdf-tools (0 8)) (org-noter (1 4 1))) "Support for links to documents in pdfview mode" tar ((:url . "https://github.com/fuxialexander/org-pdftools") (:commit . "2b3357828a4c2dfba8f87c906d64035d8bf221f2") (:revdesc . "2b3357828a4c") (:keywords "convenience") (:authors ("Alexander Fu Xi" . "fuxialexander@gmail.com")) (:maintainers ("Alexander Fu Xi" . "fuxialexnader@gmail.com")) (:maintainer "Alexander Fu Xi" . "fuxialexnader@gmail.com"))])
+ (org-people . [(20260423 1211) ((emacs (29 1)) (org (9 0))) "Work with a contact-list in org-mode files" tar ((:url . "https://github.com/skx/org-people") (:commit . "cc97f09b395f0a805020464f7bc361cb810af7a8") (:revdesc . "cc97f09b395f") (:keywords "outlines" "contacts" "people") (:authors ("Steve Kemp" . "steve@steve.fi")) (:maintainers ("Steve Kemp" . "steve@steve.fi")) (:maintainer "Steve Kemp" . "steve@steve.fi"))])
+ (org-picklink . [(20210210 516) ((emacs (24 4))) "Pick a headline link from org-agenda" tar ((:url . "https://github.com/tumashu/org-picklink") (:commit . "bfdc22b436482752be41c5d6f6f37dca76b1c7c3") (:revdesc . "bfdc22b43648") (:keywords "convenience") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (org-pomodoro . [(20220318 1618) ((alert (0 5 10)) (cl-lib (0 5))) "Pomodoro implementation for org-mode" tar ((:url . "https://github.com/lolownia/org-pomodoro") (:commit . "3f5bcfb80d61556d35fc29e5ddb09750df962cc6") (:revdesc . "3f5bcfb80d61") (:authors ("Arthur Leonard Andersen" . "leoc.git@gmail.com") ("Marcin Koziej" . "marcinatlolowniadotorg")) (:maintainers ("Arthur Leonard Andersen" . "leoc.git@gmail.com") ("Marcin Koziej" . "marcinatlolowniadotorg")) (:maintainer "Arthur Leonard Andersen" . "leoc.git@gmail.com"))])
+ (org-present . [(20220806 1847) ((org (7))) "Minimalist presentation minor-mode for Emacs org-mode" tar ((:url . "https://github.com/rlister/org-present") (:commit . "4ec04e1b77dea76d7c30066ccf3200d2e0b7bee9") (:revdesc . "4ec04e1b77de"))])
+ (org-present-remote . [(20221107 1139) ((org-present (9)) (elnode (0 9)) (emacs (25)) (fakir (20140729 1652)) (s (20210616 619)) (web (20141231 2001))) "A web-based remote control for org-present" tar ((:url . "https://gitlab.com/duncan-bayne/org-present-remote") (:commit . "95ea38b985b5aaa49b8039010bbe5fda5188a197") (:revdesc . "95ea38b985b5") (:keywords "comm" "docs") (:authors ("Duncan Bayne" . "duncan@bayne.id.au")) (:maintainers ("Duncan Bayne" . "duncan@bayne.id.au")) (:maintainer "Duncan Bayne" . "duncan@bayne.id.au"))])
+ (org-pretty-tags . [(20211228 1546) ((emacs (25))) "Surrogates for tags" tar ((:url . "https://gitlab.com/marcowahl/org-pretty-tags") (:commit . "e127a1e08df8273b909a99594ffaad84960ff212") (:revdesc . "e127a1e08df8") (:keywords "reading" "outlines") (:authors ("Marco Wahl" . "marcowahlsoft@gmail.com")) (:maintainers ("Marco Wahl" . "marcowahlsoft@gmail.com")) (:maintainer "Marco Wahl" . "marcowahlsoft@gmail.com"))])
+ (org-preview-html . [(20220809 1033) ((emacs (25 1)) (org (8 0))) "Automatically preview org-exported HTML files within Emacs" tar ((:url . "https://github.com/jakebox/org-preview-html") (:commit . "785e1f5c99c0f2d76a9a6611a06b4552a343e221") (:revdesc . "785e1f5c99c0") (:keywords "org" "convenience" "outlines") (:authors ("Jake B" . "jakebox0@protonmail.com")) (:maintainers ("Jake B" . "jakebox0@protonmail.com")) (:maintainer "Jake B" . "jakebox0@protonmail.com"))])
+ (org-project-capture . [(20260313 1738) ((dash (2 10 0)) (emacs (28)) (s (1 9 0)) (org-category-capture (1 0 0))) "Repository todo capture and management for org-mode" tar ((:url . "https://github.com/colonelpanic8/org-project-capture") (:commit . "6a95fb90bcdb7fcdeba9d9421d7c511cea95ef70") (:revdesc . "6a95fb90bcdb") (:keywords "org-mode" "todo" "tools" "outlines" "project" "capture") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (org-projectile . [(20260313 1738) ((projectile (2 3 0)) (dash (2 10 0)) (org-project-capture (3 0 1)) (org-category-capture (3 0 1))) "Repository todo capture and management for org-mode with projectile" tar ((:url . "https://github.com/colonelpanic8/org-project-capture") (:commit . "6a95fb90bcdb7fcdeba9d9421d7c511cea95ef70") (:revdesc . "6a95fb90bcdb") (:keywords "org-mode" "projectile" "todo" "tools" "outlines" "project" "capture") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (org-projectile-helm . [(20260313 1738) ((org-projectile (1 0 0)) (helm (2 3 1)) (helm-org (1 0)) (emacs (25))) "Helm functions for org-projectile" tar ((:url . "https://github.com/IvanMalison/org-projectile") (:commit . "6a95fb90bcdb7fcdeba9d9421d7c511cea95ef70") (:revdesc . "6a95fb90bcdb") (:keywords "org" "projectile" "todo" "helm" "outlines") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (org-protocol-jekyll . [(20170328 1639) ((cl-lib (0 5))) "Jekyll's handler for org-protocol" tar ((:url . "https://github.com/vonavi/org-protocol-jekyll") (:commit . "dec064a42d6dfe81dfde7ba59ece5ca103ac6334") (:revdesc . "dec064a42d6d") (:authors ("Vladimir S. Ivanov" . "ivvl82@gmail.com")) (:maintainers ("Vladimir S. Ivanov" . "ivvl82@gmail.com")) (:maintainer "Vladimir S. Ivanov" . "ivvl82@gmail.com"))])
+ (org-ql . [(20250421 133) ((emacs (27 1)) (compat (29 1)) (dash (2 18 1)) (f (0 17 2)) (map (2 1)) (org (9 0)) (org-super-agenda (1 2)) (ov (1 0 6)) (peg (1 0 1)) (s (1 12 0)) (transient (0 1)) (ts (0 2 -1))) "Org Query Language, search command, and agenda-like view" tar ((:url . "https://github.com/alphapapa/org-ql") (:commit . "4b8330a683c43bb4a2c64ccce8cd5a90c8b174ca") (:revdesc . "4b8330a683c4") (:keywords "hypermedia" "outlines" "org" "agenda") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (org-radiobutton . [(20210519 1225) ((dash (2 13 0)) (emacs (24))) "Radiobutton for org-mode lists" tar ((:url . "https://github.com/Fuco1/org-radiobutton") (:commit . "4ba26bbd26102c45c234bc6ce9a8e9c655c6a0a2") (:revdesc . "4ba26bbd2610") (:keywords "outlines") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (org-rainbow-tags . [(20250125 950) ((emacs (28 1))) "Colorize org tags automatically" tar ((:url . "https://github.com/KaratasFurkan/org-rainbow-tags") (:commit . "dfe36047bc9646b621452f3e2e97170e99e2b43f") (:revdesc . "dfe36047bc96") (:keywords "faces" "outlines") (:authors ("Furkan Karataş" . "furkan.karatas02@gmail.com")) (:maintainers ("Furkan Karataş" . "furkan.karatas02@gmail.com")) (:maintainer "Furkan Karataş" . "furkan.karatas02@gmail.com"))])
+ (org-random-todo . [(20190214 2057) ((emacs (24 3)) (alert (1 3))) "Show a random TODO (with alert) every so often" tar ((:url . "https://github.com/unhammer/org-random-todo") (:commit . "4f7677af740e8f3f7cfaf630ae2e594a125af760") (:revdesc . "4f7677af740e") (:keywords "org" "todo" "notification" "calendar") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (org-randomnote . [(20200110 1407) ((f (0 19 0)) (dash (2 12 0)) (org (0))) "Find a random note in your Org-Mode files" tar ((:url . "https://github.com/mwfogleman/org-randomnote") (:commit . "ea8cf4385970637efffff8f79e14576ba6d7ad13") (:revdesc . "ea8cf4385970") (:authors ("Michael Fogleman" . "michaelwfogleman@gmail.com")) (:maintainers ("Michael Fogleman" . "michaelwfogleman@gmail.com")) (:maintainer "Michael Fogleman" . "michaelwfogleman@gmail.com"))])
+ (org-re-reveal . [(20260327 1502) ((emacs (24 4)) (org (8 3)) (htmlize (1 34))) "Org export to reveal.js presentations" tar ((:url . "https://gitlab.com/oer/org-re-reveal") (:commit . "85088676736b9884f7c330777560be3435bc53a7") (:revdesc . "85088676736b") (:keywords "tools" "outlines" "hypermedia" "slideshow" "presentation" "oer"))])
+ (org-re-reveal-citeproc . [(20211028 1328) ((emacs (25 1)) (org (9 5)) (citeproc (0 9)) (org-re-reveal (3 0 0))) "Citations and bibliography for org-re-reveal" tar ((:url . "https://gitlab.com/oer/org-re-reveal-citeproc") (:commit . "faa9ea387917b20bd1499ad90199ff3d417c00c2") (:revdesc . "faa9ea387917") (:keywords "hypermedia" "tools" "slideshow" "presentation" "bibliography"))])
+ (org-re-reveal-ref . [(20211029 551) ((emacs (25 1)) (org-ref (1 1 1)) (org-re-reveal (0 9 3))) "Citations and bibliography for org-re-reveal" tar ((:url . "https://gitlab.com/oer/org-re-reveal-ref") (:commit . "ea9661864d5fbef87b12b78f516c13a40c683f24") (:revdesc . "ea9661864d5f") (:keywords "hypermedia" "tools" "slideshow" "presentation" "bibliography"))])
+ (org-recent-headings . [(20211011 1519) ((emacs (26 1)) (org (9 0 5)) (dash (2 18 0)) (frecency (0 1)) (s (1 12 0))) "Jump to recently used Org headings" tar ((:url . "https://github.com/alphapapa/org-recent-headings") (:commit . "97418d581ea030f0718794e50b005e9bae44582e") (:revdesc . "97418d581ea0") (:keywords "hypermedia" "outlines" "org") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (org-recur . [(20260707 2223) ((emacs (24 1)) (org (9 0)) (dash (2 7 0))) "Recurring org-mode tasks" tar ((:url . "https://github.com/mrcnski/org-recur") (:commit . "680731635038bf453dc75242bf007e886be8c765") (:revdesc . "680731635038") (:authors ("Marcin Swieczkowski" . "marcin.swieczkowski@gmail.com")) (:maintainers ("Marcin Swieczkowski" . "marcin.swieczkowski@gmail.com")) (:maintainer "Marcin Swieczkowski" . "marcin.swieczkowski@gmail.com"))])
+ (org-redmine . [(20160711 1114) nil "Redmine tools using Emacs OrgMode" tar ((:url . "https://github.com/gongo/org-redmine") (:commit . "a526c3ac802634486bf10de9c2283ccb1a30ec8d") (:revdesc . "a526c3ac8026") (:keywords "redmine" "org") (:authors ("Wataru MIYAGUNI" . "gonngo@gmail.com")) (:maintainers ("Wataru MIYAGUNI" . "gonngo@gmail.com")) (:maintainer "Wataru MIYAGUNI" . "gonngo@gmail.com"))])
+ (org-ref . [(20251206 1422) ((org (9 4)) (htmlize (0)) (transient (0)) (avy (0)) (parsebib (0)) (bibtex-completion (0)) (citeproc (0)) (ox-pandoc (0)) (request (0))) "Citations, cross-references and bibliographies in org-mode" tar ((:url . "https://github.com/jkitchin/org-ref") (:commit . "dc2481d430906fe2552f9318f4405242e6d37396") (:revdesc . "dc2481d43090") (:keywords "org-mode" "cite" "ref" "label") (:authors ("John Kitchin" . "jkitchin@andrew.cmu.edu")) (:maintainers ("John Kitchin" . "jkitchin@andrew.cmu.edu")) (:maintainer "John Kitchin" . "jkitchin@andrew.cmu.edu"))])
+ (org-ref-prettify . [(20220507 649) ((emacs (24 3)) (org-ref (3 0)) (bibtex-completion (1 0 0))) "Prettify org-ref citation links" tar ((:url . "https://github.com/alezost/org-ref-prettify.el") (:commit . "0ec3b6e398ee117c8b8a787a0422b95d9e95f7bb") (:revdesc . "0ec3b6e398ee") (:keywords "convenience") (:authors ("Alex Kost" . "alezost@gmail.com") ("Vitus Schäfftlein" . "vitusschaefftlein@live.de")) (:maintainers ("Alex Kost" . "alezost@gmail.com") ("Vitus Schäfftlein" . "vitusschaefftlein@live.de")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (org-repeat-by-cron . [(20260817 1415) ((emacs (24 4))) "An Org mode task repeater based on Cron expressions" tar ((:url . "https://github.com/TomoeMami/org-repeat-by-cron.el") (:commit . "5f4588f690c60f47f9488c4a88a2a5f49e6111c6") (:revdesc . "5f4588f690c6") (:keywords "calendar") (:authors ("TomoeMami" . "trembleafterme@outlook.com")) (:maintainers ("TomoeMami" . "trembleafterme@outlook.com")) (:maintainer "TomoeMami" . "trembleafterme@outlook.com"))])
+ (org-repo-todo . [(20171228 119) nil "Simple repository todo management with org-mode" tar ((:url . "https://github.com/waymondo/org-repo-todo") (:commit . "f73ebd91399c5760ad52c6ad9033de1066042003") (:revdesc . "f73ebd91399c") (:keywords "convenience") (:authors ("justin talbott" . "justin@waymondo.com")) (:maintainers ("justin talbott" . "justin@waymondo.com")) (:maintainer "justin talbott" . "justin@waymondo.com"))])
+ (org-reverse-datetree . [(20250513 848) ((emacs (29 1)) (dash (2 19 1)) (org (9 6))) "Create reverse date trees in org-mode" tar ((:url . "https://github.com/akirak/org-reverse-datetree") (:commit . "8466a3566292cf17e70e6ab4e7fb9e1b48831586") (:revdesc . "8466a3566292") (:keywords "outlines") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (org-review . [(20250416 802) nil "Schedule reviews for Org entries" tar ((:url . "https://github.com/brabalan/org-review") (:commit . "1f24fa504d58d619bb81a2c16058f685d85c2151") (:revdesc . "1f24fa504d58") (:keywords "calendar") (:authors ("Alan Schmitt" . "alan.schmitt@polytechnique.org")) (:maintainers ("Alan Schmitt" . "alan.schmitt@polytechnique.org")) (:maintainer "Alan Schmitt" . "alan.schmitt@polytechnique.org"))])
+ (org-rich-yank . [(20250923 919) ((emacs (25 1))) "Paste with org-mode markup and link to source" tar ((:url . "https://github.com/unhammer/org-rich-yank") (:commit . "fe2ba1c9d9f1f7943d8f76879a1b2b9b15928147") (:revdesc . "fe2ba1c9d9f1") (:keywords "convenience" "hypermedia" "org") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (org-roam . [(20260425 1623) ((emacs (27 1)) (compat (30 1)) (org (9 6)) (emacsql (4 3 3)) (magit-section (4 4 2))) "A database abstraction layer for Org-mode" tar ((:url . "https://github.com/org-roam/org-roam") (:commit . "c54c523dec175695645399705606ea19056a3053") (:revdesc . "c54c523dec17") (:keywords "org-mode" "roam" "convenience") (:authors ("Jethro Kuan" . "jethrokuan95@gmail.com")) (:maintainers ("Jethro Kuan" . "jethrokuan95@gmail.com")) (:maintainer "Jethro Kuan" . "jethrokuan95@gmail.com"))])
+ (org-roam-bibtex . [(20250215 1156) ((emacs (27 1)) (org-roam (2 2 0)) (bibtex-completion (1 0 0))) "Org Roam meets BibTeX" tar ((:url . "https://github.com/org-roam/org-roam-bibtex") (:commit . "b065198f2c3bc2a47ae520acd2b1e00e7b0171e6") (:revdesc . "b065198f2c3b") (:keywords "bib" "hypermedia" "outlines" "wp") (:authors ("Mykhailo Shevchuk" . "mail@mshevchuk.com") ("Leo Vivier" . "leo.vivier+dev@gmail.com")) (:maintainers ("Mykhailo Shevchuk" . "mail@mshevchuk.com") ("Leo Vivier" . "leo.vivier+dev@gmail.com")) (:maintainer "Mykhailo Shevchuk" . "mail@mshevchuk.com"))])
+ (org-roam-latte . [(20260407 512) ((emacs (27 1)) (org-roam (2 0)) (inflections (1 1))) "Auto-highlight unlinked Org-roam references" tar ((:url . "https://github.com/yad-tahir/org-roam-latte") (:commit . "89b979be06195a435ab8dd8762c09221f96a5fd5") (:revdesc . "89b979be0619") (:keywords "hypermedia" "outlines" "org-roam" "convenience") (:authors ("Yad Tahir" . "yadatieee.org")) (:maintainers ("Yad Tahir" . "yadatieee.org")) (:maintainer "Yad Tahir" . "yadatieee.org"))])
+ (org-roam-ql . [(20260721 1955) ((emacs (28)) (org-roam (2 2 0)) (s (1 12 0)) (magit-section (3 3 0)) (transient (0 4)) (dash (2 0))) "Interface to query and view results from org-roam" tar ((:url . "https://github.com/ahmed-shariff/org-roam-ql") (:commit . "7d2494296a774ec86c60f74a4fe004e2bd0bbd23") (:revdesc . "7d2494296a77"))])
+ (org-roam-ql-ql . [(20260627 829) ((emacs (28)) (org-roam-ql (0 1)) (org-ql (0 8 2)) (org-roam (2 2 0)) (s (1 12 0)) (transient (0 4))) "Integrating org-roam and org-ql" tar ((:url . "https://github.com/ahmed-shariff/org-roam-ql") (:commit . "196e6cd37f3eb7418ef250664d62b2cbd67a88e3") (:revdesc . "196e6cd37f3e"))])
+ (org-roam-timeline . [(20260103 123) ((emacs (27 1)) (org-roam (2 0)) (json-mode (1 0)) (simple-httpd (1 5 1))) "Visual timeline for Org-Roam nodes" tar ((:url . "https://github.com/GerardoCendejas/org-roam-timeline") (:commit . "8252fb48d482c55c662eaa2e757b035479eb32e7") (:revdesc . "8252fb48d482") (:keywords "org" "hypermedia" "visualization" "timeline") (:authors ("Gerardo Cendejas Mendoza" . "gc597@cornell.edu")) (:maintainers ("Gerardo Cendejas Mendoza" . "gc597@cornell.edu")) (:maintainer "Gerardo Cendejas Mendoza" . "gc597@cornell.edu"))])
+ (org-roam-timestamps . [(20221104 1544) ((emacs (26 1)) (org-roam (2 0 0))) "Keep track of modification times for org-roam" tar ((:url . "https://github.com/ThomasFKJorna/org-roam-timestamps/") (:commit . "c4ff1e2f5b0905b5caa917249aab56ddc1de1ab3") (:revdesc . "c4ff1e2f5b09") (:keywords "calendar" "outlines" "files") (:authors ("Thomas F. K. Jorna" . "https://github.com/thomas")) (:maintainers ("Thomas F. K. Jorna" . "jorna@jtrialerror.com")) (:maintainer "Thomas F. K. Jorna" . "jorna@jtrialerror.com"))])
+ (org-roam-ui . [(20221105 1040) ((emacs (27 1)) (org-roam (2 0 0)) (simple-httpd (20191103 1446)) (websocket (1 13))) "User Interface for Org-roam" tar ((:url . "https://github.com/org-roam/org-roam-ui") (:commit . "5ac74960231db0bf7783c2ba7a19a60f582e91ab") (:revdesc . "5ac74960231d") (:keywords "files" "outlines"))])
+ (org-ros . [(20251102 1408) ((emacs (24 1))) "Rahul's Org-Mode Screenshot" tar ((:url . "https://github.com/LionyxML/ros") (:commit . "f212ede14350b339ce5e41b0a0b9ca13482ceb10") (:revdesc . "f212ede14350") (:authors ("Rahul Martim Juliato" . "rahul.juliato@gmail.com")) (:maintainers ("Rahul Martim Juliato" . "rahul.juliato@gmail.com")) (:maintainer "Rahul Martim Juliato" . "rahul.juliato@gmail.com"))])
+ (org-rtm . [(20160214 1236) ((rtm (0 1))) "Simple import/export from rememberthemilk to org-mode" tar ((:url . "https://github.com/pmiddend/org-rtm") (:commit . "adc42ad1fbe92ab447ccc9553780f4456f2508d2") (:revdesc . "adc42ad1fbe9") (:keywords "outlines" "data") (:authors ("Philipp Middendorf" . "pmidden@secure.mailbox.org")) (:maintainers ("Philipp Middendorf" . "pmidden@secure.mailbox.org")) (:maintainer "Philipp Middendorf" . "pmidden@secure.mailbox.org"))])
+ (org-runbook . [(20230503 319) ((emacs (27 1)) (seq (2 3)) (f (0 20 0)) (s (1 12 0)) (dash (2 17 0)) (mustache (0 24)) (ht (0 9)) (ivy (0 8 0))) "Org mode for runbooks" tar ((:url . "https://github.com/tyler-dodge/org-runbook") (:commit . "7ada3903a56266d60541d59ae92410e8ab6fe836") (:revdesc . "7ada3903a562") (:keywords "convenience" "processes" "terminals" "files"))])
+ (org-scrum . [(20241231 2251) ((emacs (24 5)) (org (8 2)) (seq (2 3)) (cl-lib (1 0))) "Org mode extensions for scrum planning and reporting" tar ((:url . "https://github.com/ianxm/emacs-scrum") (:commit . "c1da15f576c8f55245df4804221c3b0efa7fbf40") (:revdesc . "c1da15f576c8") (:authors ("Ian Martins" . "ianxm@jhu.edu")) (:maintainers ("Ian Martins" . "ianxm@jhu.edu")) (:maintainer "Ian Martins" . "ianxm@jhu.edu"))])
+ (org-seek . [(20161217 502) ((emacs (24 3)) (ag (0 48))) "Searching Org-mode files with search tools" tar ((:url . "https://github.com/stardiviner/org-seek.el") (:commit . "1f51e6634e3b9a6a29d335d0d14370a6ffef2265") (:revdesc . "1f51e6634e3b") (:keywords "org" "search" "ag" "pt") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (org-shoplist . [(20240831 1140) ((emacs (25))) "Eat the world" tar ((:url . "https://github.com/lordnik22") (:commit . "20c33b7310694742b814bf1ca3c05d3496d2a313") (:revdesc . "20c33b731069") (:keywords "extensions" "matching"))])
+ (org-shortcut . [(20250223 0) ((plz (0 9 1)) (emacs (28 1))) "Bindings for shortcut.com in org-mode" tar ((:url . "https://github.com/endi1/org-shortcut") (:commit . "5344d2011e749b59cb54ed405e7c2d4adcaa6539") (:revdesc . "5344d2011e74") (:keywords "comm") (:authors ("Endi Sukaj" . "endisukaj@gmail.com")) (:maintainers ("Endi Sukaj" . "endisukaj@gmail.com")) (:maintainer "Endi Sukaj" . "endisukaj@gmail.com"))])
+ (org-side-tree . [(20240601 1001) ((emacs (28 1))) "Navigate Org outlines in side window tree" tar ((:url . "https://github.com/localauthor/org-side-tree") (:commit . "e8da5217ce23440a62f4a46ef60e2082b6284b28") (:revdesc . "e8da5217ce23") (:authors ("Grant Rosson" . "https://github.com/localauthor")) (:maintainers ("Grant Rosson" . "https://github.com/localauthor")) (:maintainer "Grant Rosson" . "https://github.com/localauthor"))])
+ (org-sidebar . [(20240102 9) ((emacs (26 1)) (compat (29 1)) (s (1 10 0)) (dash (2 18)) (org (9 6)) (org-ql (0 2)) (org-super-agenda (1 0))) "Helpful sidebar for Org buffers" tar ((:url . "https://github.com/alphapapa/org-sidebar") (:commit . "1e06d1b4ab5f0d09301712cdecb757c9437a7179") (:revdesc . "1e06d1b4ab5f") (:keywords "hypermedia" "outlines" "org" "agenda") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (org-sliced-images . [(20250408 2114) ((emacs (28 1))) "Sliced inline images in org-mode" tar ((:url . "https://github.com/jcfk/org-sliced-images") (:commit . "cbe25ca63bb4c3979396834f279308cf87923f71") (:revdesc . "cbe25ca63bb4") (:keywords "convenience") (:authors ("Jacob Fong" . "jacobcfong@gmail.com")) (:maintainers ("Jacob Fong" . "jacobcfong@gmail.com")) (:maintainer "Jacob Fong" . "jacobcfong@gmail.com"))])
+ (org-snitch . [(20260322 1759) ((emacs (28 1))) "Project-specific org-capture and link faces" tar ((:url . "https://github.com/morazotti/org-snitch") (:commit . "dfe8812bb37cd1c1bd959c5396a1e69678e41dce") (:revdesc . "dfe8812bb37c") (:keywords "org" "project" "outlines") (:authors ("Nícolas Morazotti" . "nicolas.morazotti@gmail.com")) (:maintainers ("Nícolas Morazotti" . "nicolas.morazotti@gmail.com")) (:maintainer "Nícolas Morazotti" . "nicolas.morazotti@gmail.com"))])
+ (org-snooze . [(20181229 1424) ((emacs (24 4))) "Snooze your code, doc and feed" tar ((:url . "https://github.com/xueeinstein/org-snooze.el") (:commit . "8799adc14a20f3489063d279ff69312de3180bf9") (:revdesc . "8799adc14a20") (:keywords "extensions"))])
+ (org-social . [(20260824 732) ((emacs (30 1)) (org (9 0)) (request (0 3 0)) (seq (2 20)) (emojify (1 2)) (async-http-queue (0 1))) "An Org-social client for Emacs" tar ((:url . "https://git.andros.dev/org-social/org-social.el") (:commit . "f5141de306ce402b3f148dd96b46e7d329d2568b") (:revdesc . "f5141de306ce") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (org-special-block-extras . [(20250715 1754) ((s (1 13 1)) (dash (2 18 1)) (emacs (27 1)) (org (9 1)) (lf (1 0)) (dad-joke (1 4)) (seq (2 0)) (lolcat (0))) "30 new custom blocks & 34 link types for Org-mode" tar ((:url . "https://alhassy.github.io/org-special-block-extras") (:commit . "1a236c783958782a4027e29dafc1efe488f443f1") (:revdesc . "1a236c783958") (:keywords "org" "blocks" "colors" "convenience") (:authors ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainers ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainer "Musa Al-hassy" . "alhassy@gmail.com"))])
+ (org-sql . [(20240819 2145) ((emacs (27 1)) (s (1 13)) (f (0 20 0)) (dash (2 19 1)) (org-ml (5 8 8))) "Org-Mode SQL converter" tar ((:url . "https://github.com/ndwarshuis/org-sql") (:commit . "3dbf11d692cf0d5e64235ad4041ed0b5a6775064") (:revdesc . "3dbf11d692cf") (:keywords "org-mode" "data") (:authors ("Nathan Dwarshuis" . "natedwarshuis@gmail.com")) (:maintainers ("Nathan Dwarshuis" . "natedwarshuis@gmail.com")) (:maintainer "Nathan Dwarshuis" . "natedwarshuis@gmail.com"))])
+ (org-srs . [(20260628 1143) ((emacs (30 1)) (org (9 7)) (fsrs (6 0))) "A flexible spaced repetition system for Org-mode" tar ((:url . "https://github.com/bohonghuang/org-srs") (:commit . "e6e5fbfcb8beb520141edac647ccb76af9b71df6") (:revdesc . "e6e5fbfcb8be") (:keywords "outlines") (:authors ("Bohong Huang" . "bohonghuang@qq.com")) (:maintainers ("Bohong Huang" . "bohonghuang@qq.com")) (:maintainer "Bohong Huang" . "bohonghuang@qq.com"))])
+ (org-starter . [(20220326 1106) ((emacs (25 1)) (dash (2 18))) "A basic configuration framework for org mode" tar ((:url . "https://github.com/akirak/org-starter") (:commit . "cd9c5c0402de941299d1c8901f26a8f24d755022") (:revdesc . "cd9c5c0402de") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (org-starter-swiper . [(20220326 1106) ((emacs (25 1)) (swiper (0 11)) (org-starter (0 2 4))) "Swiper for org-starter" tar ((:url . "https://github.com/akirak/org-starter") (:commit . "cd9c5c0402de941299d1c8901f26a8f24d755022") (:revdesc . "cd9c5c0402de") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (org-static-blog . [(20260413 1402) ((emacs (24 3))) "A simple org-mode based static blog generator" tar ((:url . "https://github.com/bastibe/org-static-blog") (:commit . "353fcde0aa27ce11c3513fb4d25ac49fb0b9c57d") (:revdesc . "353fcde0aa27"))])
+ (org-sticky-header . [(20201223 143) ((emacs (24 4)) (org (8 3 5))) "Show off-screen Org heading at top of window" tar ((:url . "https://github.com/alphapapa/org-sticky-header") (:commit . "79136b8c54c48547ba8a07a72a9790cb8e23ecbd") (:revdesc . "79136b8c54c4") (:keywords "hypermedia" "outlines" "org") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (org-super-agenda . [(20250421 130) ((emacs (26 1)) (compat (29 1 4 1)) (s (1 10 0)) (dash (2 13)) (org (9 0)) (ht (2 2)) (ts (0 2))) "Supercharge your agenda" tar ((:url . "https://github.com/alphapapa/org-super-agenda") (:commit . "fb20ad9c8a9705aa05d40751682beae2d094e0fe") (:revdesc . "fb20ad9c8a97") (:keywords "hypermedia" "outlines" "org" "agenda") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (org-superstar . [(20250914 1308) ((org (9 1 9)) (emacs (26 1))) "Prettify headings and plain lists in Org mode" tar ((:url . "https://github.com/integral-dw/org-superstar-mode") (:commit . "ce6f7f421f995893f72d75ffdfa92964b9bea2e3") (:revdesc . "ce6f7f421f99") (:keywords "faces" "outlines") (:authors ("D. Williams" . "d.williams@posteo.net")) (:maintainers ("D. Williams" . "d.williams@posteo.net")) (:maintainer "D. Williams" . "d.williams@posteo.net"))])
+ (org-sync . [(20181204 23) ((cl-lib (0 5)) (org (8 2)) (emacs (24))) "Synchronize Org documents with External Issue Trackers" tar ((:url . "https://github.com/arbox/org-sync") (:commit . "e34a385fa9e658c8341a0a6e6bc3472d4d536bb8") (:revdesc . "e34a385fa9e6") (:keywords "org" "synchronization" "issue tracking" "github" "redmine") (:authors ("Aurelien Aptel" . "aureliendotaptelatgmaildotcom")) (:maintainers ("Andrei Beliankou" . "arbox@yandex.ru")) (:maintainer "Andrei Beliankou" . "arbox@yandex.ru"))])
+ (org-sync-snippets . [(20210111 1726) ((org (8 3 5)) (emacs (24 3)) (f (0 17 3))) "Export snippets to org-mode and vice versa" tar ((:url . "https://github.com/abrochard/org-sync-snippets") (:commit . "88f995dea188b8a645a3388c42b62a2bb88953d3") (:revdesc . "88f995dea188") (:keywords "snippet" "org-mode" "yasnippet" "tools"))])
+ (org-table-color . [(20220311 1927) ((emacs (26 1))) "Add color to your org-mode table cells" tar ((:url . "https://github.com/fosskers/org-table-color") (:commit . "2022f301ef323953c3a0e087a1b601da85e06da1") (:revdesc . "2022f301ef32") (:keywords "data" "faces" "lisp") (:authors ("Colin Woodbury" . "colin@fosskers.ca")) (:maintainers ("Colin Woodbury" . "colin@fosskers.ca")) (:maintainer "Colin Woodbury" . "colin@fosskers.ca"))])
+ (org-table-comment . [(20120209 1851) nil "Org table comment modes" tar ((:url . "https://github.com/mlf176f2/org-table-comment.el") (:commit . "33b9966c33ecbc3e27cca67c2f2cdea04364d74e") (:revdesc . "33b9966c33ec") (:keywords "org-mode" "orgtbl") (:authors ("Matthew L. Fidler" . "matthewdotfidleratgmail.com")))])
+ (org-table-highlight . [(20250727 544) ((emacs (27 1))) "Highlight Org table columns and rows" tar ((:url . "https://github.com/llcc/org-table-highlight") (:commit . "bf2ed6ce251ff7b660526f082515e0589d74c2ed") (:revdesc . "bf2ed6ce251f") (:keywords "org-table" "convenience"))])
+ (org-table-sticky-header . [(20190924 506) ((org (8 2 10)) (emacs (24 4))) "Sticky header for org-mode tables" tar ((:url . "https://github.com/cute-jumper/org-table-sticky-header") (:commit . "b65442857128ab04724aaa301e60aa874a31a798") (:revdesc . "b65442857128") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (org-tag-beautify . [(20260826 943) ((emacs (26 1)) (nerd-icons (0 0 1))) "Beautify Org mode tags" tar ((:url . "https://repo.or.cz/org-tag-beautify.git") (:commit . "43744a5591e43022d53bb1743bde1961b018fc91") (:revdesc . "43744a5591e4") (:keywords "hypermedia") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (org-tag-cloud . [(20260323 1823) ((emacs (29 1)) (org (9 0))) "Easily maintain a tag-cloud of org-mode tags" tar ((:url . "https://github.com/skx/org-tag-cloud") (:commit . "8e1a9f3e868011551a0f7d00b3ae4771dac93809") (:revdesc . "8e1a9f3e8680") (:keywords "outlines" "tagcloud" "tags") (:authors ("Steve Kemp" . "steve@steve.fi")) (:maintainers ("Steve Kemp" . "steve@steve.fi")) (:maintainer "Steve Kemp" . "steve@steve.fi"))])
+ (org-tag-tree . [(20251109 1131) ((emacs (28 1)) (org (9 0))) "Define Org-mode tag hierarchies from Org subtrees" tar ((:url . "https://github.com/p-snow/org-tag-tree") (:commit . "af2b574dbddac0f73cc03bfb15acfe675f622f83") (:revdesc . "af2b574dbdda") (:keywords "outlines" "convenience") (:authors ("p-snow" . "public@p-snow.org")) (:maintainers ("p-snow" . "public@p-snow.org")) (:maintainer "p-snow" . "public@p-snow.org"))])
+ (org-tagged . [(20220926 2048) ((s (1 13 0)) (dash (2 19 1)) (emacs (28 1)) (org (9 5 2))) "Dynamic block for tagged org-mode todos" tar ((:url . "https://github.com/gizmomogwai/org-tagged") (:commit . "4b0174473772fca976426e982bb3f4a3037c1e37") (:revdesc . "4b0174473772") (:keywords "org-mode" "org" "gtd" "tools") (:authors ("Christian Köstlin" . "christian.koestlin@gmail.com")) (:maintainers ("Christian Köstlin" . "christian.koestlin@gmail.com")) (:maintainer "Christian Köstlin" . "christian.koestlin@gmail.com"))])
+ (org-tanglesync . [(20200127 1616) ((emacs (24 4))) "Syncing org src blocks with tangled external files" tar ((:url . "https://github.com/mtekman/org-tanglesync.el") (:commit . "31aa5502d1d4f8b032807949908c016b00556684") (:revdesc . "31aa5502d1d4") (:keywords "outlines"))])
+ (org-tempus . [(20260813 1709) ((emacs (27 1))) "Enhance Org time tracking" tar ((:url . "https://github.com/rul/org-tempus") (:commit . "9e9661d0c0b3b8c5951cf0b84f8e410b9aa7b6f2") (:revdesc . "9e9661d0c0b3") (:keywords "calendar") (:authors ("Raul Benencia" . "id@rbenencia.name")) (:maintainers ("Raul Benencia" . "id@rbenencia.name")) (:maintainer "Raul Benencia" . "id@rbenencia.name"))])
+ (org-tfl . [(20170923 1218) ((org (0 16 2)) (cl-lib (0 5)) (emacs (24 1))) "Transport for London meets Orgmode" tar ((:url . "https://github.com/storax/org-tfl") (:commit . "f0d7d39106a1de5457f5160cddd98ab892b61066") (:revdesc . "f0d7d39106a1") (:keywords "org" "tfl") (:authors (nil . "zuber[dot]david[at]gmx[dot]de")) (:maintainers (nil . "zuber[dot]david[at]gmx[dot]de")) (:maintainer nil . "zuber[dot]david[at]gmx[dot]de"))])
+ (org-tidy . [(20241212 28) ((emacs (27 1)) (dash (2 19 1))) "A minor mode to tidy org-mode buffers" tar ((:url . "https://github.com/jxq0/org-tidy") (:commit . "0bea3a2ceaa999e0ad195ba525c5c1dcf5fba43b") (:revdesc . "0bea3a2ceaa9") (:keywords "convenience" "org") (:authors ("Xuqing Jia" . "jxq@jxq.me")) (:maintainers ("Xuqing Jia" . "jxq@jxq.me")) (:maintainer "Xuqing Jia" . "jxq@jxq.me"))])
+ (org-time-budgets . [(20200715 1016) ((alert (0 5 10)) (cl-lib (0 5))) "Define time budgets and display clocked time" tar ((:url . "https://github.com/leoc/org-time-budgets") (:commit . "1d6bfc323013bbf725167842d9e097fad805de03") (:revdesc . "1d6bfc323013") (:authors ("Arthur Leonard Andersen" . "leoc.git@gmail.com")) (:maintainers ("Arthur Leonard Andersen" . "leoc.git@gmail.com")) (:maintainer "Arthur Leonard Andersen" . "leoc.git@gmail.com"))])
+ (org-timeblock . [(20241027 805) ((emacs (28 1)) (compat (29 1 4 1)) (org (9 0)) (svg (1 1))) "Interactive SVG calendar for orgmode tasks" tar ((:url . "https://github.com/ichernyshovvv/org-timeblock") (:commit . "e61e5734b49f933ed178029f804a0499f3308e1e") (:revdesc . "e61e5734b49f") (:keywords "org" "calendar" "timeblocking" "agenda") (:authors ("Ilya Chernyshov" . "ichernyshovvv@gmail.com")) (:maintainers ("Ilya Chernyshov" . "ichernyshovvv@gmail.com")) (:maintainer "Ilya Chernyshov" . "ichernyshovvv@gmail.com"))])
+ (org-timeline . [(20211110 1952) ((dash (2 13 0)) (emacs (24 3))) "Add graphical view of agenda to agenda buffer" tar ((:url . "https://github.com/Fuco1/org-timeline/") (:commit . "2b300abc8adc9955418fa2334f55e0610bff79f5") (:revdesc . "2b300abc8adc") (:keywords "calendar") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (org-toodledo . [(20150301 1113) ((request-deferred (0 2 0)) (emacs (24)) (cl-lib (0 5))) "Toodledo integration for Emacs Org mode" tar ((:url . "https://github.com/myuhe/org-toodledo") (:commit . "01b53b637f304b89cd3bf2d29009b5ed6ad9466d") (:revdesc . "01b53b637f30") (:keywords "outlines" "data") (:authors ("Christopher J. White" . "emacs@grierwhite.com")) (:maintainers ("Christopher J. White" . "emacs@grierwhite.com")) (:maintainer "Christopher J. White" . "emacs@grierwhite.com"))])
+ (org-tracktable . [(20161118 1329) ((emacs (24)) (cl-lib (0 5))) "Track your writing progress in an org-table" tar ((:url . "https://github.com/tty-tourist/org-tracktable") (:commit . "8e0e60a582a034bd66d5efb72d513140b7d4d90a") (:revdesc . "8e0e60a582a0") (:keywords "org" "writing") (:authors ("tty-tourist" . "andreasrasholm@protonmail.com")) (:maintainers ("tty-tourist" . "andreasrasholm@protonmail.com")) (:maintainer "tty-tourist" . "andreasrasholm@protonmail.com"))])
+ (org-transclusion-http . [(20240619 2130) ((emacs (28 1)) (org-transclusion (1 4 0)) (plz (0 7 2))) "Transclude over HTTP" tar ((:url . "https://git.sr.ht/~ushin/org-transclusion-http") (:commit . "65caad0d9b19bf19c815bd7c033ffb907c3ebb12") (:revdesc . "65caad0d9b19") (:authors ("Joseph Turner" . "firstnameatushin.org")) (:maintainers ("Joseph Turner" . "~ushin/ushin@lists.sr.ht")) (:maintainer "Joseph Turner" . "~ushin/ushin@lists.sr.ht"))])
+ (org-transform-tree-table . [(20200413 1959) ((dash (2 10 0)) (s (1 3 0))) "Transform org-mode tree with properties to a table, and the other way around" tar ((:url . "https://github.com/jplindstrom/emacs-org-transform-tree-table") (:commit . "d84e7fb87bf2d5fc2be252500de0cddf20facf4f") (:revdesc . "d84e7fb87bf2") (:keywords "org-mode" "table" "org-table" "tree" "csv" "convert") (:authors ("Johan Lindstrom" . "buzzwordninjanot_this_bit@googlemail.com")) (:maintainers ("Johan Lindstrom" . "buzzwordninjanot_this_bit@googlemail.com")) (:maintainer "Johan Lindstrom" . "buzzwordninjanot_this_bit@googlemail.com"))])
+ (org-tree-slide . [(20230826 1234) ((emacs (25 2))) "A presentation tool for org-mode" tar ((:url . "https://github.com/takaxp/org-tree-slide") (:commit . "941e7e6cb8a5a0b193345263ed912cceecae1887") (:revdesc . "941e7e6cb8a5") (:keywords "convenience" "org-mode" "presentation" "narrowing") (:authors ("Takaaki ISHIKAWA" . "takaxpatieeedotorg")) (:maintainers ("Takaaki ISHIKAWA" . "takaxpatieeedotorg")) (:maintainer "Takaaki ISHIKAWA" . "takaxpatieeedotorg"))])
+ (org-tree-slide-pauses . [(20201215 146) ((emacs (24 5)) (org-tree-slide (2 8 4))) "Bring the pause command from Beamer to org-tree-slide" tar ((:url . "https://github.com/cnngimenez/org-tree-slide-pauses") (:commit . "f02af7102e9ecef7c3dac0d376d85bbb8c4de4cc") (:revdesc . "f02af7102e9e") (:keywords "convenience" "org-mode" "presentation"))])
+ (org-treescope . [(20200503 1609) ((emacs (24 3)) (org (9 2 3)) (org-ql (0 5 -1)) (dash (2 17 0))) "Time scoping sparse trees within org" tar ((:url . "https://github.com/mtekman/org-treescope.el") (:commit . "a7c386ff134c71fd4f1f042e320751f077d57ddb") (:revdesc . "a7c386ff134c") (:keywords "outlines"))])
+ (org-treeusage . [(20221011 1301) ((emacs (26 1)) (dash (2 17 0)) (org (9 1 6))) "Examine the usage of org headings in a tree-like manner" tar ((:url . "https://github.com/mtekman/org-treeusage.el") (:commit . "c561b3d468aa35e70a43d9a18a4f505996ae882d") (:revdesc . "c561b3d468aa") (:keywords "outlines"))])
+ (org-trello . [(20210314 1901) ((emacs (24 3)) (request-deferred (0 2 0)) (deferred (0 4 0)) (s (1 11 0)) (dash (2 18 0))) "Minor mode to synchronize org-mode buffer and trello board" tar ((:url . "https://github.com/org-trello/org-trello") (:commit . "9c1c94dff1a46631669023286078b887d077c305") (:revdesc . "9c1c94dff1a4") (:keywords "org-mode" "trello" "sync" "org-trello") (:authors ("Antoine R. Dumont" . "antoine.romain.dumont@gmail.com")) (:maintainers ("Antoine R. Dumont" . "antoine.romain.dumont@gmail.com")) (:maintainer "Antoine R. Dumont" . "antoine.romain.dumont@gmail.com"))])
+ (org-unique-id . [(20220907 821) ((emacs (25 1)) (org (9 3))) "Create unique IDs for org headers" tar ((:url . "https://labs.phundrak.com/phundrak/org-unique-id") (:commit . "c3a0908ff2123c8786735f3c6f35e905efea2ef6") (:revdesc . "c3a0908ff212") (:keywords "convenience") (:authors ("Lucien Cartier-Tilet" . "lucien@phundrak.com")) (:maintainers ("Lucien Cartier-Tilet" . "lucien@phundrak.com")) (:maintainer "Lucien Cartier-Tilet" . "lucien@phundrak.com"))])
+ (org-upcoming-modeline . [(20241028 1217) ((emacs (26 1)) (ts (0 2)) (org-ql (0 6))) "Show next org event in mode line" tar ((:url . "https://github.com/unhammer/org-upcoming-modeline") (:commit . "66bfdbe847f398f87e8a05c0cf472eb673fac522") (:revdesc . "66bfdbe847f3") (:keywords "convenience" "calendar") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (org-variable-pitch . [(20220220 1757) ((emacs (25))) "Minor mode for variable pitch text in org mode" tar ((:url . "https://dev.gkayaalp.com/elisp/index.html#ovp") (:commit . "350af0e5d53307c900e4f8b2617f3852f51a74d2") (:revdesc . "350af0e5d533") (:keywords "faces") (:authors ("Göktuğ Kayaalp" . "self@gkayaalp.com")) (:maintainers ("Göktuğ Kayaalp" . "self@gkayaalp.com")) (:maintainer "Göktuğ Kayaalp" . "self@gkayaalp.com"))])
+ (org-vcard . [(20250828 809) ((emacs (24 4))) "Org-mode support for vCard export and import" tar ((:url . "https://github.com/pinoaffe/org-vcard") (:commit . "03c504c34e5c31091d971090b249064e332987d7") (:revdesc . "03c504c34e5c") (:keywords "outlines" "org" "vcard") (:authors ("Alexis" . "flexibeast@gmail.com") ("Will Dey" . "will123dey@gmail.com") ("pinoaffe" . "pinoaffe@gmail.com")) (:maintainers ("pinoaffe" . "pinoaffe@gmail.com")) (:maintainer "pinoaffe" . "pinoaffe@gmail.com"))])
+ (org-view-mode . [(20251211 720) ((emacs (25 1))) "Read-only viewer with less markup clutter in org mode files" tar ((:url . "https://github.com/amno1/org-view-mode") (:commit . "8082b9e9841d1a2e947ab7bebbdf0c49c4b64cdf") (:revdesc . "8082b9e9841d") (:keywords "convenience" "outlines" "tools") (:authors ("Arthur Miller" . "arthur.miller@live.com")) (:maintainers ("Arthur Miller" . "arthur.miller@live.com")) (:maintainer "Arthur Miller" . "arthur.miller@live.com"))])
+ (org-visibility . [(20220929 1415) ((emacs (27 1))) "Persistent org tree visibility" tar ((:url . "https://github.com/nullman/emacs-org-visibility") (:commit . "afa4b6f8ff274df87eb11f1afd0321084a45a2ab") (:revdesc . "afa4b6f8ff27") (:keywords "outlines" "convenience") (:authors ("Kyle W T Sherman" . "kylewsherman@gmail.com")) (:maintainers ("Kyle W T Sherman" . "kylewsherman@gmail.com")) (:maintainer "Kyle W T Sherman" . "kylewsherman@gmail.com"))])
+ (org-wc . [(20251023 1922) nil "Count words in org mode trees" tar ((:url . "https://github.com/tesujimath/org-wc") (:commit . "65e2caaeaeea01b4ab3ab3cd964c911297885a0f") (:revdesc . "65e2caaeaeea"))])
+ (org-web-tools . [(20231220 1515) ((emacs (27 1)) (org (9 0)) (compat (29 1 4 2)) (dash (2 12)) (esxml (0 3 4)) (s (1 10 0)) (plz (0 7 1)) (request (0 3 0))) "Display and capture web content with Org-mode" tar ((:url . "https://github.com/alphapapa/org-web-tools") (:commit . "7a6498f442fc7f29504745649948635c7165d847") (:revdesc . "7a6498f442fc") (:keywords "hypermedia" "outlines" "org" "web") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (org-web-track . [(20260322 1122) ((emacs (29 1)) (request (0 3 0)) (enlive (0 0 1)) (gnuplot (0 8 1))) "Web data tracking framework in Org Mode" tar ((:url . "https://github.com/p-snow/org-web-track") (:commit . "d61668bb9059da8c6d1e69ce980a14ca9da137dc") (:revdesc . "d61668bb9059") (:keywords "org" "agenda" "web" "hypermedia") (:authors ("p-snow" . "public@p-snow.org")) (:maintainers ("p-snow" . "public@p-snow.org")) (:maintainer "p-snow" . "public@p-snow.org"))])
+ (org-wild-notifier . [(20260127 533) ((alert (1 2)) (async (1 9 3)) (dash (2 18 0)) (emacs (27 1))) "Customizable org-agenda notifications" tar ((:url . "https://github.com/emacsorphanage/org-wild-notifier.el") (:commit . "9211d14128a1097f78081dd7f8ba849671604575") (:revdesc . "9211d14128a1") (:keywords "calendar" "convenience") (:authors ("Artem Khramov" . "akhramov+emacs@pm.me")) (:maintainers ("Artem Khramov" . "akhramov+emacs@pm.me")) (:maintainer "Artem Khramov" . "akhramov+emacs@pm.me"))])
+ (org-window-habit . [(20260808 2040) ((emacs (29 1)) (dash (2 10 0))) "Time window based habits" tar ((:url . "https://github.com/colonelpanic8/org-window-habit") (:commit . "0f3e9101fed8e51680bfecb4c90849df87d48da8") (:revdesc . "0f3e9101fed8") (:keywords "calendar" "org-mode" "habit" "interval" "window") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (org-working-set . [(20250620 1501) ((org (9 3)) (dash (2 12)) (s (1 12)) (emacs (28 0))) "Manage and visit a small and changing set of org-nodes that you work on" tar ((:url . "https://github.com/marcIhm/org-working-set") (:commit . "ab14880f7875381ba574183af9e4eec0b5975b07") (:revdesc . "ab14880f7875") (:authors ("Marc Ihm" . "marc@ihm.name")) (:maintainers ("Marc Ihm" . "marc@ihm.name")) (:maintainer "Marc Ihm" . "marc@ihm.name"))])
+ (org-wunderlist . [(20191017 1917) ((request-deferred (0 2 0)) (alert (1 1)) (emacs (24)) (cl-lib (0 5)) (org (8 2 4)) (s (1 9 0))) "Org sync with Wunderlist" tar ((:url . "https://github.com/myuhe/org-wunderlist.el") (:commit . "1a084bb49be4b5a1066db9cd9b7da2f8efab293f") (:revdesc . "1a084bb49be4") (:keywords "convenience") (:authors ("myuhe" . "yuhei.maeda_at_gmail.com")))])
+ (org-xlatex . [(20240707 1343) ((emacs (29 1))) "Instant LaTeX preview in an xwidget" tar ((:url . "https://github.com/ksqsf/org-xlatex") (:commit . "8f25ba5e4784b3f12f5ac5c69b1a1d0695c53b8e") (:revdesc . "8f25ba5e4784") (:keywords "convenience" "org" "tex" "preview" "xwidget") (:authors ("ksqsf" . "justksqsf@gmail.com")) (:maintainers ("ksqsf" . "justksqsf@gmail.com")) (:maintainer "ksqsf" . "justksqsf@gmail.com"))])
+ (org-zettelkasten . [(20240716 2114) ((emacs (25 1)) (org (9 3))) "A Zettelkasten mode leveraging Org" tar ((:url . "https://sr.ht/~ymherklotz/org-zettelkasten") (:commit . "b6ee54071f9653fb95a33491e2c0152efc3c61c8") (:revdesc . "b6ee54071f96") (:keywords "files" "hypermedia" "org" "notes") (:authors ("Yann Herklotz" . "git@yannherklotz.com")) (:maintainers ("Yann Herklotz" . "git@yannherklotz.com")) (:maintainer "Yann Herklotz" . "git@yannherklotz.com"))])
+ (org2blog . [(20250722 223) ((emacs (29 4)) (htmlize (1 58)) (hydra (0 15 0)) (xml-rpc (1 6 15)) (writegood-mode (2 2 0)) (metaweblog (1 1 18))) "Blog from Org mode to WordPress" tar ((:url . "https://github.com/org2blog/org2blog") (:commit . "d0168606e60df2267b451dfe92975ad3f5c7919c") (:revdesc . "d0168606e60d") (:keywords "comm" "convenience" "outlines" "wp") (:authors ("Puneeth Chaganti" . "punchagan+org2blog@gmail.com")) (:maintainers ("Grant Rettke" . "grant@wisdomandwonder.com")) (:maintainer "Grant Rettke" . "grant@wisdomandwonder.com"))])
+ (org2ctex . [(20200331 550) ((emacs (24 4))) "Export org to ctex (a latex macro for Chinese)" tar ((:url . "https://github.com/tumashu/org2ctex") (:commit . "2e40aa5e78b0562516f46f689e7b74cdf451cc2a") (:revdesc . "2e40aa5e78b0") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (org2elcomment . [(20170324 945) ((org (8 3 4))) "Convert Org file to Elisp comments" tar ((:url . "https://github.com/cute-jumper/org2elcomment") (:commit . "c88a75d9587c484ead18f7adf08592b09c1cceb0") (:revdesc . "c88a75d9587c") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (org2issue . [(20190531 941) ((org (8 0)) (emacs (24 4)) (ox-gfm (0 1)) (gh (0 1)) (s (20160405 920))) "Export org to github issue" tar ((:url . "https://github.com/lujun9972/org2issue") (:commit . "910b98c858762fd14b11d261626c5e979dde0833") (:revdesc . "910b98c85876") (:keywords "convenience" "github" "org") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (org2jekyll . [(20210829 1113) ((dash (2 18 0)) (s (1 9 0))) "Minor mode to publish org-mode post to jekyll without specific yaml" tar ((:url . "https://github.com/ardumont/org2jekyll") (:commit . "4393402448da722667f6f5a4d742fa817dec0c0f") (:revdesc . "4393402448da") (:keywords "org-mode" "jekyll" "blog" "publish") (:authors ("Antoine R. Dumont" . "antoine.romain.dumont@gmail.com")) (:maintainers ("Antoine R. Dumont" . "antoine.romain.dumont@gmail.com")) (:maintainer "Antoine R. Dumont" . "antoine.romain.dumont@gmail.com"))])
+ (org2web . [(20241226 1757) ((cl-lib (1 0)) (ht (1 5)) (mustache (0 22)) (htmlize (1 47)) (org (8 0)) (dash (2 0 0)) (el2org (0 10)) (simple-httpd (0 1))) "Static site generator based on org mode" tar ((:url . "https://github.com/tumashu/org2web") (:commit . "0e343770b9785f6150afc98153cd00a316d88d01") (:revdesc . "0e343770b978") (:keywords "org-mode" "convenience" "beautify") (:authors ("Feng Shu" . "tumashuAT163.com") ("Jorge Javier Araya Navarro" . "elcorreoATdeshackra.com") ("Kelvin Hu" . "iniDOTkelvinATgmailDOTcom")) (:maintainers ("Feng Shu" . "tumashuAT163.com") ("Jorge Javier Araya Navarro" . "elcorreoATdeshackra.com") ("Kelvin Hu" . "iniDOTkelvinATgmailDOTcom")) (:maintainer "Feng Shu" . "tumashuAT163.com"))])
+ (organic-green-theme . [(20240731 2058) nil "Low-contrast green color theme" tar ((:url . "https://gitlab.com/kostafey/organic-green-theme") (:commit . "8ea2fea0aea27d67448440f22b4ccdf6f9e6e8f6") (:revdesc . "8ea2fea0aea2"))])
+ (organize-imports-java . [(20260101 601) ((emacs (25 1)) (f (0 20 0)) (s (1 12 0)) (dash (2 14 1)) (ht (2 2))) "Automatically organize imports in Java code" tar ((:url . "https://github.com/jcs-elpa/organize-imports-java") (:commit . "0782a1814104c556a39ac13f0d64f7a9d787899d") (:revdesc . "0782a1814104") (:keywords "convenience" "organize" "imports" "java" "eclipse") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (orgbox . [(20180827 218) ((org (8 0)) (cl-lib (0 5))) "Mailbox-like task scheduling Org" tar ((:url . "https://github.com/yasuhito/orgbox") (:commit . "609e5e37348815ec3ba53ab6d643e38b0cc4fe17") (:revdesc . "609e5e373488") (:keywords "org") (:authors ("Yasuhito Takamiya" . "yasuhito@gmail.com")) (:maintainers ("Yasuhito Takamiya" . "yasuhito@gmail.com")) (:maintainer "Yasuhito Takamiya" . "yasuhito@gmail.com"))])
+ (orgit . [(20260731 2256) ((emacs (29 1)) (compat (31 0)) (cond-let (1 1)) (llama (1 0)) (magit (4 7)) (org (9 8))) "Support for Org links to Magit buffers" tar ((:url . "https://github.com/magit/orgit") (:commit . "c948819a7cad37a654ada275ebf7c003abf782d0") (:revdesc . "c948819a7cad") (:keywords "hypermedia" "vc") (:authors ("Jonas Bernoulli" . "emacs.orgit@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.orgit@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.orgit@jonas.bernoulli.dev"))])
+ (orgit-file . [(20251222 1309) ((emacs (29 1)) (compat (30 1)) (magit (4 3)) (org (9 7)) (orgit (2 0))) "Support for links to files in Git repositories" tar ((:url . "https://github.com/gggion/orgit-file") (:commit . "08f7a16f3cc3d6a85ad4cad89d4c31b3b1c9346d") (:revdesc . "08f7a16f3cc3") (:keywords "hypermedia" "vc"))])
+ (orgit-forge . [(20260731 2256) ((emacs (29 1)) (compat (31 0)) (cond-let (1 1)) (forge (0 6)) (magit (4 7)) (org (9 8)) (orgit (2 2))) "Org links to Forge issue buffers" tar ((:url . "https://github.com/magit/orgit-forge") (:commit . "87f257ba03c634198a634f0bdafc1b9cf6c6d09a") (:revdesc . "87f257ba03c6") (:keywords "hypermedia" "vc") (:authors ("Jonas Bernoulli" . "emacs.orgit-forge@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.orgit-forge@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.orgit-forge@jonas.bernoulli.dev"))])
+ (orglink . [(20260731 2257) ((emacs (28 1)) (compat (31 0)) (llama (1 0)) (org (9 8)) (seq (2 24))) "Use Org Mode links in other modes" tar ((:url . "https://github.com/tarsius/orglink") (:commit . "2e66d4cae10e54a49380fd7b552b641ebd731a15") (:revdesc . "2e66d4cae10e") (:keywords "hypermedia") (:authors ("Jonas Bernoulli" . "emacs.orglink@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.orglink@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.orglink@jonas.bernoulli.dev"))])
+ (orglue . [(20200411 311) ((org (9 3)) (epic (0 2))) "More functionality to org-mode" tar ((:url . "https://github.com/yoshinari-nomura/orglue") (:commit . "9d5a8e24be9acb8c55bb4d6aa8b98e30e2677401") (:revdesc . "9d5a8e24be9a") (:keywords "org") (:authors ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainers ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainer "Yoshinari Nomura" . "nom@quickhack.net"))])
+ (orgmdb . [(20260120 1738) ((emacs (27 1)) (dash (2 11 0)) (s (1 12 0)) (org (8 0 0))) "An OMDb API client with some convenience functions" tar ((:url . "https://github.com/isamert/orgmdb.el") (:commit . "4f24d187e2bf484ef4f68c191324659dca62c2f6") (:revdesc . "4f24d187e2bf") (:authors ("Isa Mert Gurbuz" . "isamert@protonmail.com")) (:maintainers ("Isa Mert Gurbuz" . "isamert@protonmail.com")) (:maintainer "Isa Mert Gurbuz" . "isamert@protonmail.com"))])
+ (orgnav . [(20170608 1713) ((helm (2 7 0)) (s (1 11 0)) (dash (1 11 0)) (emacs (24))) "Org tree navigation using helm" tar ((:url . "https://github.com/facetframer/orgnav") (:commit . "9e2cac9c1a67af5f0080e60022e821bf7b70312d") (:revdesc . "9e2cac9c1a67") (:keywords "convenience" "outlines") (:authors ("Facet Framer" . "(facet@facetframer.com)")) (:maintainers ("Facet Framer" . "(facet@facetframer.com)")) (:maintainer "Facet Framer" . "(facet@facetframer.com)"))])
+ (orgnote . [(20240814 2021) ((emacs (27 1))) "Sync org-roam notes with OrgNote app" tar ((:url . "https://github.com/Artawower/orgnote.el") (:commit . "d2d0c8d16ea2dbcc29b79f9d4a48e03e90c3f57d") (:revdesc . "d2d0c8d16ea2") (:authors ("Artur Yaroshenko" . "artawower@protonmail.com")) (:maintainers ("Artur Yaroshenko" . "artawower@protonmail.com")) (:maintainer "Artur Yaroshenko" . "artawower@protonmail.com"))])
+ (orgstrap . [(20250316 1815) ((emacs (24 4))) "Bootstrap an Org file using file local variables" tar ((:url . "https://github.com/tgbugs/orgstrap") (:commit . "67f4f61716750b4cf4da715b40a19c5ed4bb505c") (:revdesc . "67f4f6171675") (:keywords "lisp" "org" "org-mode" "bootstrap"))])
+ (orgtbl-aggregate . [(20260825 836) ((emacs (26 1))) "Aggregate an Org Mode table | + | + | into another table" tar ((:url . "https://github.com/tbanel/orgaggregate/blob/master/README.org") (:commit . "a4348971a8f0645d41ebe143e4de808c0eaeaa03") (:revdesc . "a4348971a8f0") (:keywords "data" "extensions"))])
+ (orgtbl-ascii-plot . [(20260320 2046) nil "Unicode-art bar plots in org-mode tables" tar ((:url . "https://github.com/tbanel/orgtblasciiplot") (:commit . "8d8959d54343e93f7e578daa34ac315ece9ef8aa") (:revdesc . "8d8959d54343") (:keywords "org" "table" "ascii" "plot"))])
+ (orgtbl-fit . [(20260109 925) ((emacs (24 4))) "Fit an Org Mode column using Calc regression methods" tar ((:url . "https://github.com/tbanel/orgtblfit/blob/master/README.org") (:commit . "987e1a8de9debb416c61a3e2e35b79c1bd9fa568") (:revdesc . "987e1a8de9de") (:keywords "data" "extensions"))])
+ (orgtbl-join . [(20260810 1759) ((emacs (24 3))) "Join columns from other Org Mode tables" tar ((:url . "https://github.com/tbanel/orgtbljoin/blob/master/README.org") (:commit . "37701e3ba0e3c0a30f086f93aef634cb5d2ee454") (:revdesc . "37701e3ba0e3") (:keywords "data" "extensions"))])
+ (orgtbl-show-header . [(20230903 903) nil "Show the header of the current column in the minibuffer" tar ((:url . "https://github.com/DamienCassou/orgtbl-show-header") (:commit . "1ab18f5afa2b01e67618ada0d40e6b7a65d9d14c") (:revdesc . "1ab18f5afa2b") (:authors ("Damien Cassou" . "damien.cassou@gmail.com")) (:maintainers ("Damien Cassou" . "damien.cassou@gmail.com")) (:maintainer "Damien Cassou" . "damien.cassou@gmail.com"))])
+ (origami . [(20200331 1019) ((s (1 9 0)) (dash (2 5 0)) (emacs (24)) (cl-lib (0 5))) "Flexible text folding" tar ((:url . "https://github.com/gregsexton/origami.el") (:commit . "e558710a975e8511b9386edc81cd6bdd0a5bda74") (:revdesc . "e558710a975e") (:keywords "folding") (:authors ("Greg Sexton" . "gregsexton@gmail.com")) (:maintainers ("Greg Sexton" . "gregsexton@gmail.com")) (:maintainer "Greg Sexton" . "gregsexton@gmail.com"))])
+ (origami-predef . [(20200615 1044) ((emacs (24 3)) (origami (1 0))) "Apply folding when finding (opening) files" tar ((:url . "https://github.com/alvarogonzalezsotillo/origami-predef") (:commit . "edcba971ba52a14f69a436ad47888827d7927982") (:revdesc . "edcba971ba52") (:keywords "convenience" "folding") (:authors ("lvaro González Sotillo" . "alvarogonzalezsotillo@gmail.com")) (:maintainers ("lvaro González Sotillo" . "alvarogonzalezsotillo@gmail.com")) (:maintainer "lvaro González Sotillo" . "alvarogonzalezsotillo@gmail.com"))])
+ (ormolu . [(20220530 921) ((emacs (24)) (reformatter (0 4))) "Format Haskell source code using the \"ormolu\" program" tar ((:url . "https://github.com/vyorkin/ormolu.el") (:commit . "a6b1d3f8838d067ac5352fb0673c3c3dae7abd73") (:revdesc . "a6b1d3f8838d") (:keywords "files" "tools") (:authors ("Vasiliy Yorkin" . "vasiliy.yorkin@gmail.com")))])
+ (orthodox-christian-new-calendar-holidays . [(20210830 1657) nil "Feasts (NS)" tar ((:url . "https://github.com/cmchittom/orthodox-christian-new-calendar-holidays") (:commit . "6869024ecd45eefd0ec648979c6a59d7c79770e0") (:revdesc . "6869024ecd45") (:keywords "calendar") (:authors ("Carson Chittom" . "carson@wistly.net")) (:maintainers ("Carson Chittom" . "carson@wistly.net")) (:maintainer "Carson Chittom" . "carson@wistly.net"))])
+ (osa . [(20200522 2103) ((emacs (25 1))) "OSA (JavaScript / AppleScript) bridge" tar ((:url . "https://github.com/atomontage/osa") (:commit . "615ca9eef4131a23d9971691fa0d0f20fe59d01b") (:revdesc . "615ca9eef413") (:keywords "extensions") (:authors ("xristos" . "xristos@sdf.org")) (:maintainers ("xristos" . "xristos@sdf.org")) (:maintainer "xristos" . "xristos@sdf.org"))])
+ (osa-chrome . [(20250129 1831) ((emacs (25 1)) (osa (1 0))) "Google Chrome remote tab control" tar ((:url . "https://github.com/atomontage/osa-chrome") (:commit . "53a139a6c56d52d9bddbf420b0e65f042a1259eb") (:revdesc . "53a139a6c56d") (:keywords "comm") (:authors ("xristos" . "xristos@sdf.org")) (:maintainers ("xristos" . "xristos@sdf.org")) (:maintainer "xristos" . "xristos@sdf.org"))])
+ (osm . [(20260801 757) ((emacs (29 1)) (compat (31))) "OpenStreetMap viewer" tar ((:url . "https://github.com/minad/osm") (:commit . "117a00204afd95c9ac2ef1016e31c67d5cd01268") (:revdesc . "117a00204afd") (:keywords "network" "multimedia" "hypermedia" "mouse") (:authors ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (osx-browse . [(20140508 2041) ((string-utils (0 3 2)) (browse-url-dwim (0 6 6))) "Web browsing helpers for OS X" tar ((:url . "https://github.com/rolandwalker/osx-browse") (:commit . "838b81625853e04919fbb56fd21f387762b2e3f5") (:revdesc . "838b81625853") (:keywords "hypermedia" "external") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (osx-clipboard . [(20141012 717) nil "Use the OS X clipboard from terminal Emacs" tar ((:url . "https://github.com/joddie/osx-clipboard-mode") (:commit . "e46dd31327a3f92f77b013b4c9b1e5fdd0e5c73d") (:revdesc . "e46dd31327a3") (:authors ("Jon Oddie" . "jonxfieldatgmail.com")) (:maintainers ("Jon Oddie" . "jonxfieldatgmail.com")) (:maintainer "Jon Oddie" . "jonxfieldatgmail.com"))])
+ (osx-dictionary . [(20260520 1154) ((cl-lib (0 5))) "Interface for OSX Dictionary.app" tar ((:url . "https://github.com/xuchunyang/osx-dictionary.el") (:commit . "8e6897844c4d6ff6039b31569058273632afea16") (:revdesc . "8e6897844c4d") (:keywords "mac" "dictionary") (:authors ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainers ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainer "Chunyang Xu" . "mail@xuchunyang.me"))])
+ (osx-lib . [(20211206 619) ((emacs (24 4))) "Basic functions for Apple/OSX" tar ((:url . "https://github.com/raghavgautam/osx-lib") (:commit . "7afdb57edd5725e8a66f841a90fa571a4cbb81e7") (:revdesc . "7afdb57edd57") (:keywords "apple" "applescript" "osx" "finder" "emacs" "elisp" "vpn" "speech") (:authors ("Raghav Kumar Gautam" . "raghav@apache.org")) (:maintainers ("Raghav Kumar Gautam" . "raghav@apache.org")) (:maintainer "Raghav Kumar Gautam" . "raghav@apache.org"))])
+ (osx-location . [(20200304 2209) ((emacs (24 1))) "Watch and respond to changes in geographical location on OS X" tar ((:url . "https://github.com/purcell/osx-location") (:commit . "733f116dbc56ac73bee3cebe4a489dc9eb37ab78") (:revdesc . "733f116dbc56") (:keywords "convenience" "calendar") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (osx-org-clock-menubar . [(20150205 2111) nil "Simple menubar integration for org-clock" tar ((:url . "https://github.com/jordonbiondo/osx-org-clock-menubar") (:commit . "9964d2a97cc2fb6570dc4116da44f73bd8eb7cb3") (:revdesc . "9964d2a97cc2") (:keywords "org" "osx") (:authors ("Jordon Biondo" . "jordonbiondo@gmail.com")) (:maintainers ("Jordon Biondo" . "jordonbiondo@gmail.com")) (:maintainer "Jordon Biondo" . "jordonbiondo@gmail.com"))])
+ (osx-plist . [(20200212 1724) ((emacs (25 1))) "Apple plist file parser" tar ((:url . "https://github.com/gonewest818/osx-plist") (:commit . "cd86c03a52eab9b1a1496618809155b25b030ba6") (:revdesc . "cd86c03a52ea") (:keywords "convenience") (:authors ("Theresa O'Connor" . "tess@oconnor.cx")) (:maintainers ("Neil Okamoto" . "neil.okamoto+melpa@gmail.com")) (:maintainer "Neil Okamoto" . "neil.okamoto+melpa@gmail.com"))])
+ (osx-pseudo-daemon . [(20240922 2024) ((mac-pseudo-daemon (2 2))) "Daemon mode that plays nice with OSX" tar ((:url . "https://github.com/DarwinAwardWinner/mac-pseudo-daemon") (:commit . "c2326fe5baf53790d51386a75f09a114e0678c5e") (:revdesc . "c2326fe5baf5") (:keywords "convenience" "osx"))])
+ (osx-trash . [(20220913 1736) ((emacs (24 1))) "System trash for OS X" tar ((:url . "https://github.com/lunaryorn/osx-trash.el") (:commit . "90f0c99206022fec646206018fcd63d9d2e57325") (:revdesc . "90f0c9920602") (:keywords "files" "convenience" "tools" "unix") (:authors ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainer "Sebastian Wiesner" . "swiesner@lunaryorn.com"))])
+ (otama . [(20160404 1032) nil "Org-table Manipulator" tar ((:url . "https://github.com/yoshinari-nomura/otama") (:commit . "b69e0740846ace7885b0c0717f7abe8d0419eefd") (:revdesc . "b69e0740846a") (:keywords "database" "org-mode") (:authors ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainers ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainer "Yoshinari Nomura" . "nom@quickhack.net"))])
+ (other-emacs-eval . [(20180408 1348) ((emacs (25 1)) (async (1 9 2))) "Evaluate the Emacs Lisp expression in other Emacs" tar ((:url . "https://github.com/xuchunyang/other-emacs-eval") (:commit . "8ace5acafef65daabf0c6619eff60733d7f5d792") (:revdesc . "8ace5acafef6") (:keywords "tools") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (otpp . [(20260813 911) ((emacs (28 1)) (compat (29 1))) "One tab per project, with unique names" tar ((:url . "https://github.com/abougouffa/one-tab-per-project") (:commit . "08786dd55a0eef28b4dc6f5490fdc3f157b9f313") (:revdesc . "08786dd55a0e") (:keywords "convenience") (:authors ("Abdelhak Bougouffa (rot13" . "\"nobhtbhssn@srqbencebwrpg.bet\")")) (:maintainers ("Abdelhak Bougouffa (rot13" . "\"nobhtbhssn@srqbencebwrpg.bet\")")) (:maintainer "Abdelhak Bougouffa (rot13" . "\"nobhtbhssn@srqbencebwrpg.bet\")"))])
+ (ouroboros . [(20230606 1150) ((emacs (27 1)) (dash (2 19 0)) (cbor (0 2 5)) (bech32 (0 2 1))) "Ouroboros network mini-protocol" tar ((:url . "https://github.com/Titan-C/cardano.el") (:commit . "cf85424b305e8f89debb756dc67eebc84639f711") (:revdesc . "cf85424b305e") (:authors ("Oscar Najera" . "https://oscarnajera.com")) (:maintainers ("Oscar Najera" . "hi@oscarnajera.com")) (:maintainer "Oscar Najera" . "hi@oscarnajera.com"))])
+ (outli . [(20251012 1930) ((emacs (27 1))) "Org-like code outliner" tar ((:url . "https://github.com/jdtsmith/outli") (:commit . "009e74c1757143040a0427f477ae882107b14592") (:revdesc . "009e74c17571") (:keywords "convenience" "outlines" "org") (:authors ("J.D. Smith" . "jdtsmith@gmail.com")) (:maintainers ("J.D. Smith" . "jdtsmith@gmail.com")) (:maintainer "J.D. Smith" . "jdtsmith@gmail.com"))])
+ (outline-indent . [(20260826 247) ((emacs (26 1)) (kirigami (1 0 5))) "Folding text based on indentation (origami alternative)" tar ((:url . "https://github.com/jamescherti/outline-indent.el") (:commit . "41b5065b5c9a2a0b8a796cab27e60aad00d762f0") (:revdesc . "41b5065b5c9a") (:keywords "outlines" "convenience") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (outline-magic . [(20180619 1819) nil "Outline mode extensions for Emacs" tar ((:url . "https://github.com/tj64/outline-magic") (:commit . "2a5f07417b696cf7541d435c43bafcc64817636b") (:revdesc . "2a5f07417b69") (:keywords "outlines") (:authors ("Carsten Dominik" . "dominik@science.uva.nl")) (:maintainers ("Thorsten Jolitz" . "tjolitzATgmailDOTcom")) (:maintainer "Thorsten Jolitz" . "tjolitzATgmailDOTcom"))])
+ (outline-minor-faces . [(20260601 1519) ((emacs (28 1)) (compat (31 0))) "Highlight only section headings" tar ((:url . "https://github.com/tarsius/outline-minor-faces") (:commit . "71705d0708459f765403968567a329a76c38cf62") (:revdesc . "71705d070845") (:keywords "faces" "outlines") (:authors ("Jonas Bernoulli" . "emacs.outline-minor-faces@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.outline-minor-faces@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.outline-minor-faces@jonas.bernoulli.dev"))])
+ (outline-stars . [(20260427 2355) ((emacs (29 1))) "Outshine-style star headings for outline-minor-mode" tar ((:url . "https://codeberg.org/phmcc/outline-stars") (:commit . "a08f50d395a1a74406da97b22ab22d72ffc4df51") (:revdesc . "a08f50d395a1") (:keywords "outlines" "convenience") (:authors ("Paul Hsin-ti McClelland" . "PaulHMcClelland@protonmail.com")) (:maintainers ("Paul Hsin-ti McClelland" . "PaulHMcClelland@protonmail.com")) (:maintainer "Paul Hsin-ti McClelland" . "PaulHMcClelland@protonmail.com"))])
+ (outline-toc . [(20200401 1208) nil "Sidebar showing a \"table of contents\"" tar ((:url . "https://github.com/abingham/outline-toc.el") (:commit . "81d373633b40628cc3a6b6fb534fd7730076bcdb") (:revdesc . "81d373633b40") (:keywords "convenience" "outlines") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (outlook . [(20180428 1430) ((emacs (24 4))) "Send emails in MS Outlook style" tar ((:url . "https://github.com/asavonic/outlook.el") (:commit . "b6a7a06b996d84647e8024412876e9e76ca884e4") (:revdesc . "b6a7a06b996d") (:keywords "mail"))])
+ (outorg . [(20190720 2002) ((emacs (24 4))) "Org-style comment editing" tar ((:url . "https://github.com/alphapapa/outorg") (:commit . "ef0f86f4b893b30be8bcf8b43a5ec357a6c70f07") (:revdesc . "ef0f86f4b893") (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (outrespace . [(20220218 1936) ((emacs (24 4))) "Some c++ namespace utility functions" tar ((:url . "https://github.com/articuluxe/outrespace.git") (:commit . "3c8efa5e7903d88a2e81178a5def627f37379ee4") (:revdesc . "3c8efa5e7903") (:keywords "tools" "c++" "namespace") (:authors ("Dan Harms" . "danielrharms@gmail.com")) (:maintainers ("Dan Harms" . "danielrharms@gmail.com")) (:maintainer "Dan Harms" . "danielrharms@gmail.com"))])
+ (outshine . [(20220326 540) ((outorg (2 0)) (cl-lib (0 5))) "Outline with outshine outshines outline" tar ((:url . "https://github.com/alphapapa/outshine") (:commit . "bf1eed10dd7a89b63d0fc014944033db397c1e23") (:revdesc . "bf1eed10dd7a") (:keywords "convenience" "outlines" "org") (:maintainers ("Thibault Polge" . "thibault@thb.lt")) (:maintainer "Thibault Polge" . "thibault@thb.lt"))])
+ (ov . [(20230522 1117) ((emacs (24 3))) "Overlay library for Emacs Lisp" tar ((:url . "https://github.com/ShingoFukuyama/ov.el") (:commit . "e2971ad986b6ac441e9849031d34c56c980cf40b") (:revdesc . "e2971ad986b6") (:keywords "convenience" "overlay"))])
+ (overcast-theme . [(20200425 1601) ((emacs (24))) "A dark but vibrant color theme for Emacs" tar ((:url . "http://ismail.teamfluxion.com") (:commit . "e02b835a08919ead079d7221d513348ac02ba92e") (:revdesc . "e02b835a0891") (:keywords "theme") (:authors ("Mohammed Ismail Ansari" . "team.terminal@gmail.com")) (:maintainers ("Mohammed Ismail Ansari" . "team.terminal@gmail.com")) (:maintainer "Mohammed Ismail Ansari" . "team.terminal@gmail.com"))])
+ (overleaf . [(20260824 1709) ((emacs (29 4)) (plz (0 9)) (websocket (1 15)) (webdriver (0 1)) (posframe (1 4 4))) "Sync and track changes live with overleaf" tar ((:url . "https://github.com/vale981/overleaf.el") (:commit . "c9757254a9a27a11a36a889cbe6095d67b78bc65") (:revdesc . "c9757254a9a2") (:keywords "hypermedia" "tex" "comm") (:maintainers ("Valentin Boettcher" . "overleafatprotagon.space")) (:maintainer "Valentin Boettcher" . "overleafatprotagon.space"))])
+ (overseer . [(20240109 800) ((emacs (24)) (dash (2 10 0)) (pkg-info (0 4)) (f (0 18 1))) "Ert-runner Integration Into Emacs" tar ((:url . "http://www.github.com/tonini/overseer.el") (:commit . "7fdcf1a6fba6b1569a09c1666b4e51bcde266ed9") (:revdesc . "7fdcf1a6fba6") (:authors ("Samuel Tonini" . "tonini.samuel@gmail.com")) (:maintainers ("Samuel Tonini" . "tonini.samuel@gmail.com")) (:maintainer "Samuel Tonini" . "tonini.samuel@gmail.com"))])
+ (ovpn-mode . [(20250916 7) ((emacs (25)) (cl-lib (0 5))) "An openvpn management mode" tar ((:url . "https://github.com/anticomputer/ovpn-mode") (:commit . "0474294b76f3a7b468c94090352fe71f7aedeebf") (:revdesc . "0474294b76f3") (:keywords "comm") (:authors ("Bas Alberts" . "bas@anti.computer")) (:maintainers ("Bas Alberts" . "bas@anti.computer")) (:maintainer "Bas Alberts" . "bas@anti.computer"))])
+ (owcmd . [(20200517 2039) ((emacs (26 3))) "Run a single command in the other window" tar ((:url . "https://github.com/fishyfriend/owcmd") (:commit . "05fb8f8f81838b5888fdec8b3947096dd2222e61") (:revdesc . "05fb8f8f8183") (:keywords "convenience") (:authors ("Jacob First" . "jacob.first@member.fsf.org")) (:maintainers ("Jacob First" . "jacob.first@member.fsf.org")) (:maintainer "Jacob First" . "jacob.first@member.fsf.org"))])
+ (owdriver . [(20240211 457) ((log4e (0 4 1)) (yaxception (1 0 0))) "Quickly perform various actions on other windows" tar ((:url . "https://github.com/aki2o/owdriver") (:commit . "ae96f3ff7aca560a872c77d40999f1527f7f84eb") (:revdesc . "ae96f3ff7aca") (:keywords "convenience") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (ox-750words . [(20220625 1407) ((emacs (24 4)) (750words (0 0 1))) "Org mode exporter for 750words.com" tar ((:url . "https://github.com/zzamboni/750words-client") (:commit . "43eee19428fc8f5a133192398510d7313eb33d97") (:revdesc . "43eee19428fc") (:keywords "files" "org" "writing") (:authors ("Diego Zamboni" . "https://github.com/zzamboni")) (:maintainers ("Diego Zamboni" . "diego@zzamboni.org")) (:maintainer "Diego Zamboni" . "diego@zzamboni.org"))])
+ (ox-asciidoc . [(20240821 2247) ((org (8 1))) "AsciiDoc Back-End for Org Export Engine" tar ((:url . "https://github.com/yashi/org-asciidoc") (:commit . "a8d49c44cc9aa8a3f384155f0ae052dbf36df00c") (:revdesc . "a8d49c44cc9a") (:keywords "org" "asciidoc") (:authors ("Yasushi SHOJI" . "yasushi.shoji@gmail.com")) (:maintainers ("Yasushi SHOJI" . "yasushi.shoji@gmail.com")) (:maintainer "Yasushi SHOJI" . "yasushi.shoji@gmail.com"))])
+ (ox-bb . [(20240907 1042) ((emacs (24 4)) (org (8 0))) "BBCode Back-End for Org Export Engine" tar ((:url . "https://github.com/mmitch/ox-bb") (:commit . "4d0a3ea6c4509ecb73a288da11140b588a902e76") (:revdesc . "4d0a3ea6c450") (:keywords "bbcode" "org" "export" "outlines") (:authors ("Christian Garbs" . "mitch@cgarbs.de")) (:maintainers ("Christian Garbs" . "mitch@cgarbs.de")) (:maintainer "Christian Garbs" . "mitch@cgarbs.de"))])
+ (ox-beamer-lecture . [(20250918 358) ((emacs (29 1))) "Beamer Lecture Back-End for Org Export Engine" tar ((:url . "https://github.com/fjesser/ox-beamer-lecture") (:commit . "d9cb630ab5d9e5ef58f68216a4b9e472d67eb46e") (:revdesc . "d9cb630ab5d9") (:keywords "org" "text" "tex") (:authors ("Felix J. Esser" . "code-esser@mailbox.org")) (:maintainers ("Felix J. Esser" . "code-esser@mailbox.org")) (:maintainer "Felix J. Esser" . "code-esser@mailbox.org"))])
+ (ox-bibtex-chinese . [(20170723 309) ((emacs (24 4))) "Let ox-bibtex work well for Chinese users" tar ((:url . "https://github.com/tumashu/ox-bibtex-chinese.git") (:commit . "2ad2364399229144110db7ef6365ad0461d6a38c") (:revdesc . "2ad236439922") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (ox-clip . [(20240310 1513) ((org (8 2)) (htmlize (0))) "Cross-platform formatted copying for org-mode" tar ((:url . "https://github.com/jkitchin/ox-clip") (:commit . "a549cc8e1747beb6b7e567ffac27e31ba45cb8e8") (:revdesc . "a549cc8e1747") (:keywords "org-mode") (:authors ("John Kitchin" . "jkitchin@andrew.cmu.edu")) (:maintainers ("John Kitchin" . "jkitchin@andrew.cmu.edu")) (:maintainer "John Kitchin" . "jkitchin@andrew.cmu.edu"))])
+ (ox-epub . [(20181101 1854) ((emacs (24 3)) (org (9))) "Export org mode projects to EPUB" tar ((:url . "https://github.com/ofosos/org-epub") (:commit . "a66eeb00daa01ad403ac1a1db953ddbf9054be07") (:revdesc . "a66eeb00daa0") (:keywords "hypermedia") (:authors ("Mark Meyer" . "mark@ofosos.org")) (:maintainers ("Mark Meyer" . "mark@ofosos.org")) (:maintainer "Mark Meyer" . "mark@ofosos.org"))])
+ (ox-gemini . [(20240221 2127) ((emacs (26 1))) "Output gemini formatted documents from org-mode" tar ((:url . "https://git.sr.ht/~abrahms/ox-gemini") (:commit . "50818de823b7929f2d3207833e7c581280a60289") (:revdesc . "50818de823b7") (:keywords "lisp" "gemini") (:authors ("Justin Abrahms" . "justin@abrah.ms")) (:maintainers ("Justin Abrahms" . "justin@abrah.ms")) (:maintainer "Justin Abrahms" . "justin@abrah.ms"))])
+ (ox-gfm . [(20231215 1901) nil "Github Flavored Markdown Back-End for Org Export Engine" tar ((:url . "https://github.com/larstvei/ox-gfm") (:commit . "4f774f13d34b3db9ea4ddb0b1edc070b1526ccbb") (:revdesc . "4f774f13d34b") (:keywords "org" "wp" "markdown" "github"))])
+ (ox-gist . [(20220410 2034) ((emacs (26 1)) (gist (1 4 0)) (s (1 12 0))) "Export Org mode buffers and subtrees to GitHub gists" tar ((:url . "https://github.com/punchagan/org2gist/") (:commit . "e9f1f11af0e97fee30c2b15b56c236b1f4e1f400") (:revdesc . "e9f1f11af0e9") (:keywords "org" "lisp" "gist" "github") (:authors ("Puneeth Chaganti" . "punchagan+emacs@muse-amuse.in")) (:maintainers ("Puneeth Chaganti" . "punchagan+emacs@muse-amuse.in")) (:maintainer "Puneeth Chaganti" . "punchagan+emacs@muse-amuse.in"))])
+ (ox-haunt . [(20230725 1) ((emacs (26 1))) "Haunt-flavored HTML backend for the Org export engine" tar ((:url . "https://git.sr.ht/~jakob/ox-haunt") (:commit . "1c8c70e3173f98206768c15cb2e4de706559f151") (:revdesc . "1c8c70e3173f") (:keywords "convenience" "hypermedia" "wp") (:authors ("Jakob L. Kreuze" . "zerodaysfordays@sdf.lonestar.org")) (:maintainers ("Jakob L. Kreuze" . "zerodaysfordays@sdf.lonestar.org")) (:maintainer "Jakob L. Kreuze" . "zerodaysfordays@sdf.lonestar.org"))])
+ (ox-html5slide . [(20221025 521) ((org (8 0))) "Export org-mode to HTML5 slide" tar ((:url . "https://github.com/coldnew/org-html5slide") (:commit . "4e0d9026c96e1dde22cca7c700669f1f863a9d07") (:revdesc . "4e0d9026c96e") (:keywords "html" "presentation") (:authors ("coldnew" . "coldnew.tw@gmail.com")) (:maintainers ("coldnew" . "coldnew.tw@gmail.com")) (:maintainer "coldnew" . "coldnew.tw@gmail.com"))])
+ (ox-hugo . [(20251206 1738) ((emacs (26 3)) (tomelr (0 4 3))) "Hugo Markdown Back-End for Org Export Engine" tar ((:url . "https://ox-hugo.scripter.co") (:commit . "b7dc44dc28911b9d8e3055a18deac16c3b560b03") (:revdesc . "b7dc44dc2891") (:keywords "org" "markdown" "docs") (:authors ("Kaushal Modi" . "kaushal.modi@gmail.com") ("Matt Price" . "moptop99@gmail.com")) (:maintainers ("Kaushal Modi" . "kaushal.modi@gmail.com") ("Matt Price" . "moptop99@gmail.com")) (:maintainer "Kaushal Modi" . "kaushal.modi@gmail.com"))])
+ (ox-ioslide . [(20161015 1338) ((emacs (24 1)) (org (8 0)) (cl-lib (0 5)) (f (0 17 2)) (makey (0 3))) "Export org-mode to Google I/O HTML5 slide" tar ((:url . "https://github.com/coldnew/org-ioslide") (:commit . "6555680be5364c8ddd2bf446865cb1a82adb6b9e") (:revdesc . "6555680be536") (:keywords "html" "presentation") (:authors ("coldnew" . "coldnew.tw@gmail.com")) (:maintainers ("coldnew" . "coldnew.tw@gmail.com")) (:maintainer "coldnew" . "coldnew.tw@gmail.com"))])
+ (ox-jekyll-md . [(20211222 1718) nil "Export Jekyll on Markdown articles using org-mode" tar ((:url . "https://github.com/gonsie/ox-jekyll-md") (:commit . "26edb3f4575bcb0f1a2aed56237cd89694284449") (:revdesc . "26edb3f4575b") (:keywords "org" "jekyll") (:authors ("Elsa Gonsiorowski" . "gonsie@me.com")) (:maintainers ("Elsa Gonsiorowski" . "gonsie@me.com")) (:maintainer "Elsa Gonsiorowski" . "gonsie@me.com"))])
+ (ox-jira . [(20241014 953) ((org (8 3))) "JIRA Backend for Org Export Engine" tar ((:url . "https://github.com/stig/ox-jira.el") (:commit . "6c2013088f442530cbd895abcf4a290c06e2beb0") (:revdesc . "6c2013088f44") (:keywords "outlines" "hypermedia" "wp") (:authors ("Stig Brautaset" . "stig@brautaset.org")) (:maintainers ("Stig Brautaset" . "stig@brautaset.org")) (:maintainer "Stig Brautaset" . "stig@brautaset.org"))])
+ (ox-json . [(20260629 631) ((emacs (27 1)) (org (9 4)) (s (1 12))) "JSON export backend for Org mode" tar ((:url . "https://github.com/jlumpe/ox-json") (:commit . "3fa63a260fc58b09eed5dd8c36904ae80148adbe") (:revdesc . "3fa63a260fc5") (:keywords "outlines") (:authors ("Jared Lumpe" . "jared@jaredlumpe.com")) (:maintainers ("Jared Lumpe" . "jared@jaredlumpe.com")) (:maintainer "Jared Lumpe" . "jared@jaredlumpe.com"))])
+ (ox-latex-subfigure . [(20200326 919) ((emacs (24 4)) (org (9 0))) "Subfigure for latex export" tar ((:url . "https://github.com/linktohack/ox-latex-subfigure") (:commit . "be0a0dde62fde8cdf8d72b6968344906aa8c6f54") (:revdesc . "be0a0dde62fd") (:keywords "convenience" "ox" "latex" "subfigure" "org" "org-mode") (:authors ("Quang Linh LE" . "linktohack@gmail.com")) (:maintainers ("Quang Linh LE" . "linktohack@gmail.com")) (:maintainer "Quang Linh LE" . "linktohack@gmail.com"))])
+ (ox-leanpub . [(20260506 759) ((org (9 1)) (ox-gfm (1 0)) (emacs (26 1)) (s (1 12 0))) "Export Org documents to Leanpub book format" tar ((:url . "https://gitlab.com/zzamboni/ox-leanpub") (:commit . "6197366b8b534484e9cba4a2dfaf82aa37432917") (:revdesc . "6197366b8b53") (:keywords "files" "org" "leanpub") (:authors ("Diego Zamboni" . "diego@zzamboni.org")) (:maintainers ("Diego Zamboni" . "diego@zzamboni.org")) (:maintainer "Diego Zamboni" . "diego@zzamboni.org"))])
+ (ox-linuxmag-fr . [(20250907 1103) ((emacs (28 1))) "Org-mode exporter for the French GNU/Linux Magazine" tar ((:url . "https://github.com/DamienCassou/ox-linuxmag-fr") (:commit . "67381be882a384e0e0ed810b24556148c0eb6b9f") (:revdesc . "67381be882a3") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (ox-mdx-deck . [(20181115 1847) ((emacs (24)) (ox-hugo (0 7))) "Org-mode to mdx-deck exporter" tar ((:url . "https://github.com/WolfeCub/ox-mdx-deck/") (:commit . "f3dbc35870b69a5d8971b1647da8c5468f520c5d") (:revdesc . "f3dbc35870b6") (:keywords "lisp" "org" "ox" "mdx" "deck"))])
+ (ox-mediawiki . [(20260303 2050) ((cl-lib (0 5)) (s (1 9 0))) "Mediawiki Back-End for Org Export Engine" tar ((:url . "https://github.com/tomalexander/orgmode-mediawiki") (:commit . "af145cea598105967c72b730c6eb01175c2b1fef") (:revdesc . "af145cea5981") (:keywords "org" "wp" "mediawiki") (:authors ("Tom Alexander" . "tomalexander@paphus.com")) (:maintainers ("Tom Alexander" . "tomalexander@paphus.com")) (:maintainer "Tom Alexander" . "tomalexander@paphus.com"))])
+ (ox-minutes . [(20180202 1734) ((emacs (24 4))) "Plain text backend for Org for Meeting Minutes" tar ((:url . "https://github.com/kaushalmodi/ox-minutes") (:commit . "27c29f3fdb9181322ae56f8bace8d95e621230e5") (:revdesc . "27c29f3fdb91") (:keywords "org" "exporter" "notes") (:authors ("Kaushal Modi" . "kaushal.modi@gmail.com")) (:maintainers ("Kaushal Modi" . "kaushal.modi@gmail.com")) (:maintainer "Kaushal Modi" . "kaushal.modi@gmail.com"))])
+ (ox-mom . [(20260707 243) ((emacs (27 1)) (org (9 6))) "Groff MOM Macro Back-End for Org Export Engine" tar ((:url . "https://github.com/hinman/ox-mom") (:commit . "40711a3681cbeb4cbcb520371297bf3d932a333b") (:revdesc . "40711a3681cb") (:keywords "org" "groff" "mom" "wp" "outlines") (:authors ("Lee Hinman" . "hinman@gmail.com")) (:maintainers ("Lee Hinman" . "hinman@gmail.com")) (:maintainer "Lee Hinman" . "hinman@gmail.com"))])
+ (ox-nikola . [(20151114 1116) ((emacs (24 4)) (org (8 2 4)) (ox-rst (0 2))) "Export Nikola articles using org-mode" tar ((:url . "https://github.com/masayuko/ox-nikola") (:commit . "5bcbc1a38f6619f62294194f13ca0cd4ca14dd48") (:revdesc . "5bcbc1a38f66") (:keywords "org" "nikola") (:authors ("IGARASHI Masanao" . "syoux2@gmail.com")) (:maintainers ("IGARASHI Masanao" . "syoux2@gmail.com")) (:maintainer "IGARASHI Masanao" . "syoux2@gmail.com"))])
+ (ox-pandoc . [(20260113 1929) ((org (8 2)) (emacs (24 4)) (dash (2 8)) (ht (2 0))) "An Org-mode exporter using pandoc" tar ((:url . "https://github.com/a-fent/ox-pandoc") (:commit . "1caeb56a4be26597319e7288edbc2cabada151b4") (:revdesc . "1caeb56a4be2") (:keywords "tools") (:authors ("Taichi" . "kawabata.taichi@gmail.com") ("Alex" . "a-fent@github")) (:maintainers ("Alex" . "a-fent@github")) (:maintainer "Alex" . "a-fent@github"))])
+ (ox-qmd . [(20260514 1442) ((emacs (27 2)) (request (0 3 3)) (mimetypes (1 0))) "Qiita Markdown Back-End for Org Export Engine" tar ((:url . "https://github.com/0x60df/ox-qmd") (:commit . "7a1a4f2679a38e216130d749dfbb38e2d63b713f") (:revdesc . "7a1a4f2679a3") (:keywords "wp") (:authors ("0x60DF" . "0x60DF@gmail.com")) (:maintainers ("0x60DF" . "0x60DF@gmail.com")) (:maintainer "0x60DF" . "0x60DF@gmail.com"))])
+ (ox-report . [(20250611 2053) ((emacs (24 4)) (org-msg (3 9))) "Export your org file to minutes report PDF file" tar ((:url . "https://github.com/DarkBuffalo/ox-report") (:commit . "81973dafc10fd06d46b8f7abaab9ac90ff5ccca2") (:revdesc . "81973dafc10f") (:keywords "org" "outlines" "report" "exporter" "meeting" "minutes") (:authors ("Matthias David" . "db@gnu.re")) (:maintainers ("Matthias David" . "db@gnu.re")) (:maintainer "Matthias David" . "db@gnu.re"))])
+ (ox-reveal . [(20221127 814) ((org (8 3))) "Reveal.js Presentation Back-End for Org Export Engine" tar ((:url . "https://github.com/yjwen/org-reveal") (:commit . "f55c851bf6aeb1bb2a7f6cf0f2b7bd0e79c4a5a0") (:revdesc . "f55c851bf6ae") (:keywords "outlines" "hypermedia" "slideshow" "presentation") (:authors ("Yujie Wen" . "yjwen.tyatgmaildotcom")) (:maintainers ("Yujie Wen" . "yjwen.tyatgmaildotcom")) (:maintainer "Yujie Wen" . "yjwen.tyatgmaildotcom"))])
+ (ox-reveal-layouts . [(20260123 101) ((emacs (27 1)) (transient (0 3 0))) "Predefined layouts for ox-reveal" tar ((:url . "https://github.com/GerardoCendejas/ox-reveal-layouts") (:commit . "2daf9d61ae235a5bea5d0722529c37d55e4ecce9") (:revdesc . "2daf9d61ae23") (:keywords "hypermedia" "tools" "reveal" "slides") (:authors ("Gerardo Cendejas Mendoza" . "gc597@cornell.edu")) (:maintainers ("Gerardo Cendejas Mendoza" . "gc597@cornell.edu")) (:maintainer "Gerardo Cendejas Mendoza" . "gc597@cornell.edu"))])
+ (ox-review . [(20250826 1233) ((emacs (26 1)) (org (9))) "Re:VIEW Back-End for Org Export Engine" tar ((:url . "https://github.com/masfj/ox-review") (:commit . "516bce8fb298e84d813d3c65b9cba200fa72e3b0") (:revdesc . "516bce8fb298") (:keywords "outlines" "hypermedia"))])
+ (ox-rfc . [(20240901 1714) ((emacs (24 3)) (org (8 3))) "RFC Back-End for Org Export Engine" tar ((:url . "https://github.com/choppsv1/org-rfc-export") (:commit . "ab66ace2f6306828c0842fdd729e018cc2395c94") (:revdesc . "ab66ace2f630") (:keywords "org" "rfc" "wp" "xml") (:authors ("Christian Hopps" . "chopps@devhopps.com")) (:maintainers ("Christian Hopps" . "chopps@devhopps.com")) (:maintainer "Christian Hopps" . "chopps@devhopps.com"))])
+ (ox-rss . [(20260512 2231) ((emacs (26 1)) (org (9 3))) "RSS 2.0 Back-End for Org Export Engine" tar ((:url . "https://github.com/bhw-foss/ox-rss") (:commit . "c83db3dc521d0dd423b0f24e57b7eaa798ab5e40") (:revdesc . "c83db3dc521d") (:keywords "org" "wp" "blog" "feed" "rss") (:authors ("Bastien Guerry" . "bzg@gnu.org")) (:maintainers ("Benedict Wang" . "foss@bhw.name")) (:maintainer "Benedict Wang" . "foss@bhw.name"))])
+ (ox-rst . [(20250428 534) ((emacs (25 1)) (org (8 3))) "Export reStructuredText using org-mode" tar ((:url . "https://github.com/msnoigrs/ox-rst") (:commit . "b73eff187eebac24b457688bfd27f09eff434860") (:revdesc . "b73eff187eeb") (:keywords "org" "rst" "rest" "restructuredtext") (:authors ("Masanao Igarashi" . "syoux2@gmail.com")) (:maintainers ("Masanao Igarashi" . "syoux2@gmail.com")) (:maintainer "Masanao Igarashi" . "syoux2@gmail.com"))])
+ (ox-slack . [(20200108 1546) ((emacs (24)) (org (9 1 4)) (ox-gfm (1 0))) "Slack Exporter for org-mode" tar ((:url . "https://github.com/titaniumbones/ox-slack") (:commit . "c55b003f4ac343d6c6d8ef7cbe01d0d100abac34") (:revdesc . "c55b003f4ac3") (:keywords "org" "slack" "outlines"))])
+ (ox-spectacle . [(20250218 1032) ((emacs (28 1)) (org (8 3))) "Spectacle.js Presentation Back-End for Org Export Engine" tar ((:url . "https://github.com/lorniu/ox-spectacle") (:commit . "42bf787371560f89bdffafcec689f133a13b63ea") (:revdesc . "42bf78737156") (:keywords "convenience") (:authors ("lorniu" . "lorniu@gmail.com")) (:maintainers ("lorniu" . "lorniu@gmail.com")) (:maintainer "lorniu" . "lorniu@gmail.com"))])
+ (ox-ssh . [(20210917 1517) ((emacs (24 4))) "SSH Config Backend for Org Export Engine" tar ((:url . "https://github.com/dantecatalfamo/ox-ssh") (:commit . "be3b39160da6ae37b1f1cd175ed854ac41d1cb63") (:revdesc . "be3b39160da6") (:keywords "outlines" "org" "ssh"))])
+ (ox-textile . [(20210919 1738) ((org (8 1))) "Textile Back-End for Org Export Engine" tar ((:url . "https://github.com/yashi/org-textile") (:commit . "92764235055bd1b51411d3e9490023bed7437d7b") (:revdesc . "92764235055b") (:keywords "org" "textile") (:authors ("Yasushi SHOJI" . "yasushi.shoji@gmail.com")) (:maintainers ("Yasushi SHOJI" . "yasushi.shoji@gmail.com")) (:maintainer "Yasushi SHOJI" . "yasushi.shoji@gmail.com"))])
+ (ox-tiddly . [(20200927 857) ((org (8)) (emacs (24 4))) "Org TiddlyWiki exporter" tar ((:url . "https://github.com/dfeich/org8-wikiexporters") (:commit . "3377d8732aa916e736ce5822c7a9a4fbdc894e37") (:revdesc . "3377d8732aa9") (:keywords "org") (:authors ("Derek Feichtinger" . "derek.feichtinger@psi.ch")) (:maintainers ("Derek Feichtinger" . "derek.feichtinger@psi.ch")) (:maintainer "Derek Feichtinger" . "derek.feichtinger@psi.ch"))])
+ (ox-timeline . [(20220321 2115) ((emacs (24 4))) "HTML Timeline Back-End for Org Export Engine" tar ((:url . "https://github.com/jjuliano/org-simple-timeline") (:commit . "b28bd4ccd5fa114c0f51b9766f0b9be7fe05fdd8") (:revdesc . "b28bd4ccd5fa") (:keywords "simple timeline" "timeline" "hypermedia" "html timeline") (:authors ("Joel Bryan Juliano" . "joelbryandotjulianoatgmaildotcom")) (:maintainers ("Joel Bryan Juliano" . "joelbryandotjulianoatgmaildotcom")) (:maintainer "Joel Bryan Juliano" . "joelbryandotjulianoatgmaildotcom"))])
+ (ox-trac . [(20171026 1823) ((org (9 0))) "Org Export Backend to Trac WikiFormat" tar ((:url . "https://github.com/JalapenoGremlin/ox-trac") (:commit . "5ac6c81bbc18db6c17e267d6399778c3fb5bf1ee") (:revdesc . "5ac6c81bbc18") (:keywords "org-mode" "trac") (:authors ("Brian J. Carlson" . "hackerabutilizecom")) (:maintainers ("Brian J. Carlson" . "hackerabutilizecom")) (:maintainer "Brian J. Carlson" . "hackerabutilizecom"))])
+ (ox-tufte . [(20240919 1332) ((emacs (27 1)) (org (9 5))) "Tufte HTML org-mode export backend" tar ((:url . "https://github.com/ox-tufte/ox-tufte") (:commit . "03e6c9e5e0ee467516139ed6b3f2b4bb13f847ec") (:revdesc . "03e6c9e5e0ee") (:keywords "org" "tufte" "html" "outlines" "hypermedia" "calendar" "wp"))])
+ (ox-twbs . [(20200628 1949) nil "Bootstrap compatible HTML Back-End for Org" tar ((:url . "https://github.com/marsmining/ox-twbs") (:commit . "e8a27dc78b7be494d9918f26db7a3bbb6b45020b") (:revdesc . "e8a27dc78b7b") (:keywords "org" "html" "publish" "twitter" "bootstrap") (:authors ("Carsten Dominik" . "carstenatorgmodedotorg") ("Jambunathan K" . "kjambunathanatgmaildotcom") ("Brandon van Beekum" . "marsminingatgmaildotcom")) (:maintainers ("Carsten Dominik" . "carstenatorgmodedotorg") ("Jambunathan K" . "kjambunathanatgmaildotcom") ("Brandon van Beekum" . "marsminingatgmaildotcom")) (:maintainer "Carsten Dominik" . "carstenatorgmodedotorg"))])
+ (ox-twiki . [(20200927 857) ((org (8)) (emacs (24 4))) "Org Twiki and Foswiki export" tar ((:url . "https://github.com/dfeich/org8-wikiexporters") (:commit . "3377d8732aa916e736ce5822c7a9a4fbdc894e37") (:revdesc . "3377d8732aa9") (:keywords "org") (:authors ("Derek Feichtinger" . "derek.feichtinger@psi.ch")) (:maintainers ("Derek Feichtinger" . "derek.feichtinger@psi.ch")) (:maintainer "Derek Feichtinger" . "derek.feichtinger@psi.ch"))])
+ (ox-typst . [(20260502 1009) ((emacs (30 1)) (org (9 7))) "Typst Back-End for Org Export Engine" tar ((:url . "https://github.com/jmpunkt/ox-typst") (:commit . "3e499609a201405a6064144792dab14e3cc19b93") (:revdesc . "3e499609a201") (:keywords "text" "wp" "org" "typst"))])
+ (ox-wk . [(20191231 2058) ((emacs (24 4)) (org (8 3))) "Wiki Back-End for Org Export Engine" tar ((:url . "https://github.com/w-vi/ox-wk.el") (:commit . "d34d1b72e4e940745a377bfa745dfb618900a09e") (:revdesc . "d34d1b72e4e9") (:keywords "org" "wp" "wiki") (:authors ("Vilibald Wanča" . "vilibald@wvi.cz")) (:maintainers ("Vilibald Wanča" . "vilibald@wvi.cz")) (:maintainer "Vilibald Wanča" . "vilibald@wvi.cz"))])
+ (ox-yaow . [(20220629 1539) ((emacs (27)) (f (0 2 0)) (s (1 12 0)) (dash (2 17 0))) "Generate html pages from org files" tar ((:url . "https://github.com/LaurenceWarne/ox-yaow.el") (:commit . "71d7cee736542f6504c4733d040601d2d2086443") (:revdesc . "71d7cee73654") (:keywords "outlines" "hypermedia"))])
+ (ox-zenn . [(20200924 1607) ((emacs (27 1)) (org (9 0))) "Zenn flavored markdown backend for org export engine" tar ((:url . "https://github.com/conao3/ox-zenn.el") (:commit . "b53bd82116c9f7dbb5b476d2cfcc8ed0f3bc9c78") (:revdesc . "b53bd82116c9") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (ox-zola . [(20260506 1952) ((emacs (27 2)) (ox-hugo (0 8))) "Org export to Zola static site generator" tar ((:url . "https://github.com/gicrisf/ox-zola") (:commit . "c6ab97d53b471ed53803e44169ac5d3766d72cbe") (:revdesc . "c6ab97d53b47") (:keywords "wp" "hypermedia" "org" "zola") (:authors ("Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com")) (:maintainers ("Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com")) (:maintainer "Giovanni Crisalfi" . "giovanni.crisalfi@protonmail.com"))])
+ (p-search . [(20250802 538) ((emacs (29 1)) (compat (29 1))) "Local Search Engine for Emacs" tar ((:url . "https://github.com/zkry/p-search") (:commit . "c382c80947a95825e258332d6f89bd6be496d914") (:revdesc . "c382c80947a9") (:keywords "tools"))])
+ (p4 . [(20150721 1937) nil "Simple Perforce-Emacs Integration" tar ((:url . "https://github.com/gareth-rees/p4.el") (:commit . "eff047caa75dbe4965defca9d1212454cdb755d5") (:revdesc . "eff047caa75d") (:authors ("Gareth Rees" . "gdr@garethrees.org")) (:maintainers ("Gareth Rees" . "gdr@garethrees.org")) (:maintainer "Gareth Rees" . "gdr@garethrees.org"))])
+ (p4-ts-mode . [(20241215 2358) ((emacs (29 1)) (xcscope (1 0))) "Major mode for the P4_16 programming language" tar ((:url . "https://github.com/oxidecomputer/p4-ts-mode") (:commit . "a2b8a0ecde12b23487dff2bb85b2a9dcd1962cb8") (:revdesc . "a2b8a0ecde12") (:keywords "languages" "p4_16" "p4") (:authors ("Zeeshan Lakhani" . "zeeshan@oxidecomputer.com")) (:maintainers ("Zeeshan Lakhani" . "zeeshan@oxidecomputer.com")) (:maintainer "Zeeshan Lakhani" . "zeeshan@oxidecomputer.com"))])
+ (pabbrev . [(20240617 1622) ((emacs (25 1))) "Predictive abbreviation expansion" tar ((:url . "https://github.com/phillord/pabbrev") (:commit . "d5f120c523ddce2e8dea1868150248cd188d8ad8") (:revdesc . "d5f120c523dd") (:authors ("Phillip Lord" . "phillip.lord@newcastle.ac.uk")) (:maintainers ("Arthur Miller" . "arthur.miller@live.com")) (:maintainer "Arthur Miller" . "arthur.miller@live.com"))])
+ (pacdiff . [(20251019 627) ((emacs (28 1))) "Manage pacdiff files" tar ((:url . "https://github.com/fbrosda/pacdiff.el") (:commit . "f1c13777e5c8056a6d6e823ecb51b9bbadc8e0c3") (:revdesc . "f1c13777e5c8") (:authors ("Fabian Brosda" . "fabi3141@gmx.de")) (:maintainers ("Fabian Brosda" . "fabi3141@gmx.de")) (:maintainer "Fabian Brosda" . "fabi3141@gmx.de"))])
+ (pacfiles-mode . [(20230503 1523) ((emacs (26 1))) "The pacnew and pacsave merging tool" tar ((:url . "https://github.com/UndeadKernel/pacfiles-mode") (:commit . "a613d1d88dba4cb293ecaf42a9aeff7d8a3ce8aa") (:revdesc . "a613d1d88dba") (:keywords "files" "pacman" "arch" "pacnew" "pacsave" "update" "linux") (:authors ("Carlos G. Cordero" . "http://github/UndeadKernel")) (:maintainers ("Carlos G. Cordero" . "pacfiles@binarycharly.com")) (:maintainer "Carlos G. Cordero" . "pacfiles@binarycharly.com"))])
+ (pache-dark-theme . [(20251222 925) ((emacs (24 1))) "High-contrast theme based on Gruvbox" tar ((:url . "https://github.com/0xhenrique/pache-dark-theme") (:commit . "73f2209c35f2d49fc4292564c9c4305fc16eec5b") (:revdesc . "73f2209c35f2") (:authors ("Henrique Marques" . "hm2030master@proton.me")) (:maintainers ("Henrique Marques" . "hm2030master@proton.me")) (:maintainer "Henrique Marques" . "hm2030master@proton.me"))])
+ (pack . [(20191017 456) ((emacs (24)) (cl-lib (0 5))) "Pack and unpack archive files" tar ((:url . "https://github.com/10sr/pack-el") (:commit . "85cd856fdc00a2365e88b50373b99f1b3d2227be") (:revdesc . "85cd856fdc00") (:keywords "files" "dired") (:authors ("10sr" . "8.slashes@gmail.com")) (:maintainers ("10sr" . "8.slashes@gmail.com")) (:maintainer "10sr" . "8.slashes@gmail.com"))])
+ (package+ . [(20240823 2307) ((emacs (24 3))) "Extensions for the package library" tar ((:url . "https://github.com/zenspider/package") (:commit . "c677513c61b273f3c688464b6005149aeed700ff") (:revdesc . "c677513c61b2") (:keywords "extensions" "tools") (:authors ("Ryan Davis" . "ryand-ruby@zenspider.com")) (:maintainers ("Ryan Davis" . "ryand-ruby@zenspider.com")) (:maintainer "Ryan Davis" . "ryand-ruby@zenspider.com"))])
+ (package-build . [(20260731 2245) ((emacs (26 1)) (compat (31 0))) "Curate an Emacs Lisp package archive" tar ((:url . "https://github.com/melpa/package-build") (:commit . "80206e27d7b007464e6b28e8150662ba9d14f2bc") (:revdesc . "80206e27d7b0") (:keywords "maint" "tools") (:authors ("Donald Ephraim Curtis" . "dcurtis@milkbox.net") ("Steve Purcell" . "steve@sanityinc.com") ("Jonas Bernoulli" . "jonas@bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "jonas@bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "jonas@bernoulli.dev"))])
+ (package-filter . [(20161122 719) nil "Package archive whitelist and blacklist" tar ((:url . "https://github.com/milkypostman/package-filter") (:commit . "c8e2531227c02c4c5e9d593f2cdb6a4ab4a6849b") (:revdesc . "c8e2531227c0") (:authors ("Donald Ephraim Curtis" . "dcurtis@milkbox.net")) (:maintainers ("Donald Ephraim Curtis" . "dcurtis@milkbox.net")) (:maintainer "Donald Ephraim Curtis" . "dcurtis@milkbox.net"))])
+ (package-lint . [(20260808 1622) ((emacs (25 1)) (let-alist (1 0 6))) "A linting library for elisp package authors" tar ((:url . "https://github.com/purcell/package-lint") (:commit . "ade52be18035b1e1dbc5b65f2100be59e78e76e1") (:revdesc . "ade52be18035") (:keywords "lisp") (:authors ("Steve Purcell" . "steve@sanityinc.com") ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com") ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (package-lint-flymake . [(20250418 1424) ((emacs (26 1)) (package-lint (0 5))) "A package-lint Flymake backend" tar ((:url . "https://github.com/purcell/package-lint") (:commit . "26b27201f1276a71257d328513152494e3edfc5d") (:revdesc . "26b27201f127"))])
+ (package-loading-notifier . [(20230809 446) ((emacs (25))) "Notify a package is being loaded" tar ((:url . "https://github.com/tttuuu888/package-loading-notifier") (:commit . "f64f994cb1a55f9d59444deaec884bff0ed2b26e") (:revdesc . "f64f994cb1a5") (:keywords "convenience" "faces" "config" "startup") (:authors ("SeungKi Kim" . "tttuuu888@gmail.com")) (:maintainers ("SeungKi Kim" . "tttuuu888@gmail.com")) (:maintainer "SeungKi Kim" . "tttuuu888@gmail.com"))])
+ (package-utils . [(20250106 1354) ((restart-emacs (0 1 1))) "Extensions for package.el" tar ((:url . "https://github.com/Silex/package-utils") (:commit . "41c7bf2c0174a9a8bd6efc2260fa9805fbb44c5e") (:revdesc . "41c7bf2c0174") (:keywords "package" "convenience") (:authors ("Philippe Vaucher" . "philippe.vaucher@gmail.com")) (:maintainers ("Philippe Vaucher" . "philippe.vaucher@gmail.com")) (:maintainer "Philippe Vaucher" . "philippe.vaucher@gmail.com"))])
+ (pacmacs . [(20220106 2248) ((emacs (24 4)) (dash (2 18 0)) (cl-lib (0 5)) (f (0 18 0))) "Pacman for Emacs" tar ((:url . "https://github.com/codingteam/pacmacs.el") (:commit . "25a8c30210f6bd94634a7ff743a2f8be391ed3b3") (:revdesc . "25a8c30210f6") (:authors ("Codingteam" . "codingteam@conference.jabber.ru")) (:maintainers ("Alexey Kutepov" . "reximkut@gmail.com")) (:maintainer "Alexey Kutepov" . "reximkut@gmail.com"))])
+ (paganini-theme . [(20180815 1921) ((emacs (24 0))) "A colorful, dark and warm theme" tar ((:url . "https://github.com/onurtemizkan/paganini") (:commit . "255c5a2a8abee9c5935465ec42b9c3604c178c3c") (:revdesc . "255c5a2a8abe"))])
+ (page-break-lines . [(20250218 1607) ((emacs (25 1))) "Display ^L page breaks as tidy horizontal lines" tar ((:url . "https://github.com/purcell/page-break-lines") (:commit . "982571749c8fe2b5e2997dd043003a1b9fe87b38") (:revdesc . "982571749c8f") (:keywords "convenience" "faces") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (pager . [(20151202 120) nil "Windows-scroll commands" tar ((:url . "https://github.com/emacsorphanage/pager") (:commit . "5c791ed23f1136e04040d6f4bc9b4ca5b6dc919f") (:revdesc . "5c791ed23f11") (:authors (nil . "MikaelSjödin--mic@docs.uu.se")) (:maintainers (nil . "MikaelSjödin--mic@docs.uu.se")) (:maintainer nil . "MikaelSjödin--mic@docs.uu.se"))])
+ (pager-default-keybindings . [(20130719 2057) ((pager (1 0))) "Add the default keybindings suggested for pager.el" tar ((:url . "https://github.com/nflath/pager-default-keybindings") (:commit . "dbbd49c2ac5906d1dabf9e9c832bfebc1ab405b3") (:revdesc . "dbbd49c2ac59") (:authors ("Nathaniel Flath" . "nflath@gmail.com")) (:maintainers ("Nathaniel Flath" . "nflath@gmail.com")) (:maintainer "Nathaniel Flath" . "nflath@gmail.com"))])
+ (paimon . [(20240904 1857) ((aio (1 0)) (closql (2 0 0)) (emacs (28 1)) (emacsql (4 0 2)) (f (0 20 0)) (ht (2 4)) (transient (0 7 5)) (request (0 3 2)) (compat (30 0 0 0))) "A major mode for Splunk" tar ((:url . "https://github.com/r0man/paimon.el") (:commit . "b3a5b1ca20e221cc88e20169635076b9b1b08a51") (:revdesc . "b3a5b1ca20e2") (:keywords "paimon" "search" "tools") (:authors ("r0man" . "roman@burningswell.com")) (:maintainers ("r0man" . "roman@burningswell.com")) (:maintainer "r0man" . "roman@burningswell.com"))])
+ (pair-tree . [(20211219 1816) ((emacs (27 1)) (dash (2 17 0))) "Visualize a list" tar ((:url . "https://github.com/zainab-ali/pair-tree") (:commit . "00bdaf9df933aaacbed66b5d666e2abc29870103") (:revdesc . "00bdaf9df933") (:keywords "lisp" "tools") (:authors ("Zainab Ali" . "zainab@kebab-ca.se")) (:maintainers ("Zainab Ali" . "zainab@kebab-ca.se")) (:maintainer "Zainab Ali" . "zainab@kebab-ca.se"))])
+ (palimpsest . [(20200805 1048) nil "Various deletion strategies when editing" tar ((:url . "https://github.com/danielsz/Palimpsest") (:commit . "f474b3ad706373d9953abdc401d683a2a023d28e") (:revdesc . "f474b3ad7063") (:authors ("Daniel Szmulewicz" . "daniel.szmulewicz@gmail.com")) (:maintainers ("Daniel Szmulewicz" . "daniel.szmulewicz@gmail.com")) (:maintainer "Daniel Szmulewicz" . "daniel.szmulewicz@gmail.com"))])
+ (pamparam . [(20210105 1513) ((emacs (26 1)) (lispy (0 27 0)) (worf (0 1 0)) (ivy-posframe (0 5 5))) "Simple and fast flashcards" tar ((:url . "https://github.com/abo-abo/pamparam") (:commit . "0ba91149095bee8c43688c68f83f4d365fbe6771") (:revdesc . "0ba91149095b") (:keywords "outlines" "hypermedia" "flashcards" "memory") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (panda . [(20240102 348) ((emacs (25))) "Client for Bamboo's REST API" tar ((:url . "https://github.com/sebasmonia/panda") (:commit . "286785687d4ffe29fd1d95c699d378743d32ac00") (:revdesc . "286785687d4f") (:keywords "maint" "tool") (:authors ("Sebastian Monia" . "smonia@outlook.com")) (:maintainers ("Sebastian Monia" . "smonia@outlook.com")) (:maintainer "Sebastian Monia" . "smonia@outlook.com"))])
+ (panda-theme . [(20181128 1738) ((emacs (24))) "Panda Theme" tar ((:url . "https://github.com/jamiecollinson/emacs-panda-theme") (:commit . "60aa47c7a930377807da0d601351ad91e8ca446a") (:revdesc . "60aa47c7a930") (:authors ("jamiecollinson" . "jamiecollinson@gmail.com")) (:maintainers ("jamiecollinson" . "jamiecollinson@gmail.com")) (:maintainer "jamiecollinson" . "jamiecollinson@gmail.com"))])
+ (pandoc . [(20161128 1157) ((emacs (24 4))) "Pandoc interface" tar ((:url . "https://github.com/zonuexe/pandoc.el") (:commit . "198d262d09e30448f1672338b0b5a81cf75e1eaa") (:revdesc . "198d262d09e3") (:keywords "hypermedia" "documentation" "markup" "converter") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (pandoc-mode . [(20260114 1255) nil "Minor mode for interacting with Pandoc" tar ((:url . "http://joostkremers.github.io/pandoc-mode/") (:commit . "8f46da90228a9ce22de24da234ba53860257640a") (:revdesc . "8f46da90228a") (:keywords "text" "pandoc") (:authors ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainers ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainer "Joost Kremers" . "joostkremers@fastmail.fm"))])
+ (pangu-spacing . [(20260717 230) nil "Minor-mode to add space between Chinese and English characters" tar ((:url . "https://github.com/coldnew/pangu-spacing") (:commit . "72de84e999aafa753a635b14bb199fc46d322945") (:revdesc . "72de84e999aa") (:authors ("coldnew" . "coldnew.tw@gmail.com")) (:maintainers ("coldnew" . "coldnew.tw@gmail.com")) (:maintainer "coldnew" . "coldnew.tw@gmail.com"))])
+ (paper-theme . [(20230318 48) ((emacs (24))) "A minimal Emacs colour theme" tar ((:url . "https://dev.gkayaalp.com/elisp/index.html#paper") (:commit . "8d337b85592ae44e1fa3ad03f0c65ca99036f9e2") (:revdesc . "8d337b85592a") (:keywords "theme" "paper"))])
+ (paperless . [(20240130 1048) ((emacs (29 1)) (f (0 11 0)) (s (1 10 0)) (cl-lib (0 7 1))) "A major mode for sorting and filing PDF documents" tar ((:url . "https://github.com/atgreen/paperless") (:commit . "ef2e7ef5aeaffa997794f5d6e27be6631ba05d34") (:revdesc . "ef2e7ef5aeaf") (:keywords "pdf" "convenience") (:authors ("Anthony Green" . "green@moxielogic.com")) (:maintainers ("Anthony Green" . "green@moxielogic.com")) (:maintainer "Anthony Green" . "green@moxielogic.com"))])
+ (paradox . [(20191011 1119) ((emacs (24 4)) (seq (1 7)) (let-alist (1 0 3)) (spinner (1 7 3)) (hydra (0 13 2))) "A modern Packages Menu. Colored, with package ratings, and customizable" tar ((:url . "https://github.com/Malabarba/paradox") (:commit . "96401577ed02f433debe7604e49afd478e9eda61") (:revdesc . "96401577ed02") (:keywords "package" "packages") (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainers ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com"))])
+ (parchment-theme . [(20221206 1541) ((autothemer (0 2))) "Light theme inspired by Acme and Leuven" tar ((:url . "https://gitlab.com/ajgrf/parchment") (:commit . "07c9887be6e7d94a8546db625c7d62c54d2e5923") (:revdesc . "07c9887be6e7") (:authors ("Alex Griffin" . "a@ajgrf.com")) (:maintainers ("Alex Griffin" . "a@ajgrf.com")) (:maintainer "Alex Griffin" . "a@ajgrf.com"))])
+ (paredit . [(20241103 2046) nil "Minor mode for editing parentheses" tar ((:url . "https://paredit.org") (:commit . "89e75b4cb21f525a6f4cabcd12f1bd4204e682ab") (:revdesc . "89e75b4cb21f") (:keywords "lisp") (:authors ("Taylor R. Campbell" . "campbell@paredit.org")) (:maintainers ("Taylor R. Campbell" . "campbell@paredit.org")) (:maintainer "Taylor R. Campbell" . "campbell@paredit.org"))])
+ (paredit-everywhere . [(20210510 531) ((paredit (22))) "Enable some paredit features in non-lisp buffers" tar ((:url . "https://github.com/purcell/paredit-everywhere") (:commit . "b81e5d5356c85001a71640941b469aea9cf2e309") (:revdesc . "b81e5d5356c8") (:keywords "languages" "convenience") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (paredit-menu . [(20160128 1733) ((paredit (25))) "Adds a menu to paredit.el as memory aid" tar ((:url . "https://github.com/phillord/paredit-menu") (:commit . "cc0ae85bd819f9ebfa4f2a419ab3b2d70e39c9c8") (:revdesc . "cc0ae85bd819") (:keywords "paredit") (:authors ("Phillip Lord" . "phillip.lord@newcastle.ac.uk")) (:maintainers ("Phillip Lord" . "phillip.lord@newcastle.ac.uk")) (:maintainer "Phillip Lord" . "phillip.lord@newcastle.ac.uk"))])
+ (paren-completer . [(20160501 1052) ((emacs (24 3))) "Automatically, language agnostically, fill in delimiters" tar ((:url . "https://github.com/MatthewBregg/paren-completer") (:commit . "74183a8e13fa1266271bdcbcb4bfb29a4f915f0a") (:revdesc . "74183a8e13fa") (:keywords "convenience"))])
+ (paren-face . [(20260601 1519) ((emacs (28 1)) (compat (31 0))) "A face for parentheses in lisp modes" tar ((:url . "https://github.com/tarsius/paren-face") (:commit . "57307b5ea75e07d2dc0c64c7e3eeadee3369a7aa") (:revdesc . "57307b5ea75e") (:keywords "faces" "lisp") (:authors ("Jonas Bernoulli" . "emacs.paren-face@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.paren-face@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.paren-face@jonas.bernoulli.dev"))])
+ (parent-mode . [(20240210 1906) nil "Get major mode's parent modes" tar ((:url . "https://github.com/Fanael/parent-mode") (:commit . "9fe5363b2a190619641c79b3a40d874d8c8f9f40") (:revdesc . "9fe5363b2a19") (:authors ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (parenthesis-face . [(20260815 1330) ((emacs (30 1))) "A face for parentheses" tar ((:url . "https://github.com/tarsius/paren-face") (:commit . "f9475c6a6e52e5047d9e87e31dec04833b1a0d4d") (:revdesc . "f9475c6a6e52") (:keywords "faces" "lisp") (:authors ("Jonas Bernoulli" . "emacs.paren-face@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.paren-face@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.paren-face@jonas.bernoulli.dev"))])
+ (parinfer-rust-mode . [(20260101 1949) ((emacs (29 2)) (track-changes (1 1))) "An interface for the parinfer-rust library" tar ((:url . "https://github.com/justinbarclay/parinfer-rust-mode") (:commit . "6ee9f905c41f6368689ad12aa99516b9ee4fb06d") (:revdesc . "6ee9f905c41f") (:keywords "lisp" "tools") (:authors ("Justin Barclay" . "justinbarclay@gmail.com")) (:maintainers ("Justin Barclay" . "justinbarclay@gmail.com")) (:maintainer "Justin Barclay" . "justinbarclay@gmail.com"))])
+ (parrot . [(20260111 2133) ((emacs (24 1))) "Party Parrot rotates gracefully in the mode-line" tar ((:url . "https://github.com/dp12/parrot.git") (:commit . "c2700b1d42f94f8cb574a0f96a143f4865b180b6") (:revdesc . "c2700b1d42f9") (:keywords "party" "parrot" "rotate" "sirocco" "kakapo" "games") (:authors ("Daniel Ting" . "deep.paren.12@gmail.com")) (:maintainers ("Daniel Ting" . "deep.paren.12@gmail.com")) (:maintainer "Daniel Ting" . "deep.paren.12@gmail.com"))])
+ (parse-csv . [(20241214 246) ((emacs (24 3))) "Parse strings with CSV fields into s-expressions" tar ((:url . "https://github.com/mrc/el-csv") (:commit . "b2e7010ba91ecce25498a73f64f950de4dd8dbe2") (:revdesc . "b2e7010ba91e") (:keywords "csv") (:authors ("Matt Curtis" . "matt.r.curtis@gmail.com")) (:maintainers ("Matt Curtis" . "matt.r.curtis@gmail.com")) (:maintainer "Matt Curtis" . "matt.r.curtis@gmail.com"))])
+ (parse-it . [(20260101 602) ((emacs (25 1)) (s (1 12 0))) "Basic Parser in Emacs Lisp" tar ((:url . "https://github.com/jcs-elpa/parse-it") (:commit . "d65d74f4d057b0c7754424065c2e796dc0f89f6e") (:revdesc . "d65d74f4d057") (:keywords "convenience" "parse" "parser" "lex" "lexer" "ast") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (parsebib . [(20251125 1320) ((emacs (25 1))) "A library for parsing bib files" tar ((:url . "https://github.com/joostkremers/parsebib") (:commit . "b3990a18984284f0809e6e095196936e65fda2eb") (:revdesc . "b3990a189842") (:keywords "text" "bibtex") (:authors ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainers ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainer "Joost Kremers" . "joostkremers@fastmail.fm"))])
+ (parsec . [(20180730 16) ((emacs (24)) (cl-lib (0 5))) "Parser combinator library" tar ((:url . "https://github.com/cute-jumper/parsec.el") (:commit . "2cbbbc2254aa7bcaa4fb5e07c8c1bf2f381dba26") (:revdesc . "2cbbbc2254aa") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (parseclj . [(20260526 1843) ((emacs (25))) "Clojure/EDN parser" tar ((:url . "https://github.com/clojure-emacs/parseclj") (:commit . "ca828c202c026e45bd60503984cf510d904cae50") (:revdesc . "ca828c202c02") (:keywords "lisp" "clojure" "edn" "parser") (:authors ("Arne Brasseur" . "arne@arnebrasseur.net")) (:maintainers ("Arne Brasseur" . "arne@arnebrasseur.net")) (:maintainer "Arne Brasseur" . "arne@arnebrasseur.net"))])
+ (parseedn . [(20260601 1258) ((emacs (26)) (parseclj (1 1 1)) (map (2))) "Clojure/EDN parser" tar ((:url . "http://www.github.com/clojure-emacs/parseedn") (:commit . "1a28a88e2aabd99b41e02f491d6b8874ec128d7d") (:revdesc . "1a28a88e2aab") (:keywords "lisp" "clojure" "edn" "parser") (:authors ("Arne Brasseur" . "arne@arnebrasseur.net")) (:maintainers ("Arne Brasseur" . "arne@arnebrasseur.net")) (:maintainer "Arne Brasseur" . "arne@arnebrasseur.net"))])
+ (pasp-mode . [(20180404 1700) ((emacs (24 3))) "- A major mode for editing Answer Set Programs" tar ((:url . "https://github.com/santifa/pasp-mode") (:commit . "59385eb0e8ebcfc8c11dd811fb145d4b0fa3cc92") (:revdesc . "59385eb0e8eb") (:keywords "asp" "pasp" "answer set programs" "potassco answer set programs" "major mode" "languages") (:authors ("Henrik Jürges" . "juerges.henrik@gmail.com")) (:maintainers ("Henrik Jürges" . "juerges.henrik@gmail.com")) (:maintainer "Henrik Jürges" . "juerges.henrik@gmail.com"))])
+ (pass . [(20260214 2130) ((emacs (25 1)) (password-store (1 7 4)) (password-store-otp (0 1 5)) (f (0 17))) "Major mode for password-store.el" tar ((:url . "https://github.com/NicolasPetton/pass") (:commit . "143456809fd2dbece9f241f4361085e1de0b0e75") (:revdesc . "143456809fd2") (:keywords "tools" "files") (:authors ("Nicolas Petton" . "petton.nicolas@gmail.com") ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Nicolas Petton" . "petton.nicolas@gmail.com") ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Nicolas Petton" . "petton.nicolas@gmail.com"))])
+ (pass-coffin . [(20251231 1407) ((emacs (28 1))) "Interface to \"pass coffin\"" tar ((:url . "https://codeberg.org/rch/emacs-pass-coffin") (:commit . "202c9e3b67c5e0fe8d3631436c8c95f61586f88f") (:revdesc . "202c9e3b67c5") (:keywords "tools") (:authors ("Robert Charusta" . "rch-public@posteo.net")) (:maintainers ("Robert Charusta" . "rch-public@posteo.net")) (:maintainer "Robert Charusta" . "rch-public@posteo.net"))])
+ (password-generator . [(20250615 2300) nil "Password generator for humans. Good, Bad, Phonetic passwords included" tar ((:url . "https://github.com/vandrlexay/emacs-password-genarator") (:commit . "2d0deb52f2fd978bff9001e155e36ac5bd287d52") (:revdesc . "2d0deb52f2fd"))])
+ (password-menu . [(20260307 1603) ((emacs (29 1))) "Password Menu for auth-source secrets" tar ((:url . "https://github.com/rnadler/password-menu") (:commit . "722469f033e01ea7ebe8abb456375c335576b812") (:revdesc . "722469f033e0") (:keywords "news") (:authors ("Robert Nadler" . "robert.nadler@gmail.com")) (:maintainers ("Robert Nadler" . "robert.nadler@gmail.com")) (:maintainer "Robert Nadler" . "robert.nadler@gmail.com"))])
+ (password-mode . [(20220706 507) ((emacs (25 1))) "Hide password text using overlays" tar ((:url . "https://github.com/juergenhoetzel/password-mode") (:commit . "883981d9f8d0e2a8ec479c89f5f6b2492c22e01a") (:revdesc . "883981d9f8d0") (:keywords "docs" "password" "passphrase") (:authors ("Jürgen Hötzel" . "juergen@archlinux.org")) (:maintainers ("Jürgen Hötzel" . "juergen@archlinux.org")) (:maintainer "Jürgen Hötzel" . "juergen@archlinux.org"))])
+ (password-store . [(20250618 951) ((emacs (26 1)) (with-editor (2 5 11))) "Password store (pass) support" tar ((:url . "https://www.passwordstore.org/") (:commit . "3ca13cd8882cae4083c1c478858adbf2e82dd037") (:revdesc . "3ca13cd8882c") (:keywords "tools" "pass" "password" "password-store" "gpg") (:authors ("Svend Sorensen" . "svend@svends.net")) (:maintainers ("Tino Calancha" . "tino.calancha@gmail.com")) (:maintainer "Tino Calancha" . "tino.calancha@gmail.com"))])
+ (password-store-menu . [(20260423 1011) ((emacs (29 1)) (password-store (2 3 2)) (transient (0 8 3))) "A better, more complete UI for password-store" tar ((:url . "https://github.com/rjekker/password-store-menu") (:commit . "b007d990f895a9bc41048080cb1dd2c2b7f1b92c") (:revdesc . "b007d990f895") (:keywords "convenience" "data" "files") (:authors ("Reindert-Jan Ekker" . "info@rjekker.nl")) (:maintainers ("Reindert-Jan Ekker" . "info@rjekker.nl")) (:maintainer "Reindert-Jan Ekker" . "info@rjekker.nl"))])
+ (password-store-otp . [(20220128 1320) ((emacs (25)) (s (1 9 0)) (password-store (0 1))) "Password store (pass) OTP extension support" tar ((:url . "https://github.com/volrath/password-store-otp.el") (:commit . "be3a00a981921ed1b2f78012944dc25eb5a0beca") (:revdesc . "be3a00a98192") (:keywords "tools" "pass"))])
+ (password-vault . [(20220321 1521) ((cl-lib (0 2)) (emacs (24))) "A Password manager for Emacs" tar ((:url . "https://github.com/PuercoPop/password-vault") (:commit . "56bc893372a435b4fb3c8937c7f811bca3475f12") (:revdesc . "56bc893372a4") (:keywords "password" "productivity") (:authors ("Javier PuercoPop Olaechea" . "pirata@gmail.com")) (:maintainers ("Javier PuercoPop Olaechea" . "pirata@gmail.com")) (:maintainer "Javier PuercoPop Olaechea" . "pirata@gmail.com"))])
+ (paste-of-code . [(20170709 2355) ((emacs (24 3)) (request (0 2 0))) "Paste code on https://paste.ofcode.org" tar ((:url . "https://github.com/spebern/paste-of-code.el") (:commit . "92d258e8ec98598d847ecab82903f9224c7c2050") (:revdesc . "92d258e8ec98") (:keywords "lisp") (:authors ("Bernhard Specht" . "bernhard@specht.net")) (:maintainers ("Bernhard Specht" . "bernhard@specht.net")) (:maintainer "Bernhard Specht" . "bernhard@specht.net"))])
+ (pastebin . [(20101125 2002) nil "A simple interface to the www.pastebin.com webservice" tar ((:url . "https://github.com/nicferrier/elpastebin") (:commit . "8e9a829298ce0f747ab80758aa26caeb2af6cb30") (:revdesc . "8e9a829298ce"))])
+ (pastehub . [(20140627 1319) nil "A client for the PasteHub cloud service" tar ((:url . "https://github.com/kiyoka/pastehub") (:commit . "37b045c67659c078f1517d0fbd5282dab58dca23") (:revdesc . "37b045c67659"))])
+ (pastelmac-theme . [(20151031 236) ((emacs (24 1))) "A soothing theme with a pastel color palette" tar ((:url . "https://github.com/bmastenbrook/pastelmac-theme-el") (:commit . "bead21741e3f46f6506e8aef4469d4240a819389") (:revdesc . "bead21741e3f") (:keywords "themes") (:authors ("Brian Mastenbrook" . "brian@mastenbrook.net")) (:maintainers ("Brian Mastenbrook" . "brian@mastenbrook.net")) (:maintainer "Brian Mastenbrook" . "brian@mastenbrook.net"))])
+ (pastery . [(20171114 349) ((emacs (24 4)) (request (0 2 0))) "Paste snippets to pastery.net" tar ((:url . "https://github.com/diasbruno/pastery.el") (:commit . "4493be98b743b4d062cb4e00760125e394a55022") (:revdesc . "4493be98b743") (:keywords "tools") (:authors ("Bruno Dias" . "dias.h.bruno@gmail.com")) (:maintainers ("Bruno Dias" . "dias.h.bruno@gmail.com")) (:maintainer "Bruno Dias" . "dias.h.bruno@gmail.com"))])
+ (pasvortilo . [(20251210 2125) ((emacs (26 1)) (transient (0 3 0))) "Password manager interface for pass/gopass" tar ((:url . "https://codeberg.org/mester/pasvortilo") (:commit . "a38d016d00164ab319173aa47f2d7f6a7dd1aaf3") (:revdesc . "a38d016d0016") (:keywords "unix" "extensions" "passwords"))])
+ (path-headerline-mode . [(20140423 1332) nil "Displaying file path on headerline" tar ((:url . "https://github.com/7696122/path-headerline-mode") (:commit . "b5b2725c6a8b1cb592fc242b7dbbd54b4dff2e69") (:revdesc . "b5b2725c6a8b") (:keywords "headerline"))])
+ (path-helper . [(20181208 2229) ((emacs (24))) "Set PATH environment variables from config files" tar ((:url . "https://github.com/arouanet/path-helper") (:commit . "34538affb3f341b3c56a875bb094ddb2b859a8ef") (:revdesc . "34538affb3f3") (:keywords "tools" "unix") (:authors ("Arnaud Rouanet" . "arnaud@rouanet.org")) (:maintainers ("Arnaud Rouanet" . "arnaud@rouanet.org")) (:maintainer "Arnaud Rouanet" . "arnaud@rouanet.org"))])
+ (pathaction . [(20260826 246) ((emacs (25 1))) "Execute the pathaction.yaml rules from your editor" tar ((:url . "https://github.com/jamescherti/pathaction.el") (:commit . "d0b3daa538a6aecaadcc7336a0c9f5d03774725e") (:revdesc . "d0b3daa538a6") (:keywords "tools" "processes" "convenience") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (pathify . [(20160423 846) nil "Symlink your scripts into a PATH directory" tar ((:url . "https://gitlab.com/alezost-emacs/pathify") (:commit . "335332a900717ae01bde5ccb8f3dc97a5350f123") (:revdesc . "335332a90071") (:keywords "convenience") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (paxedit . [(20160730 1727) ((cl-lib (0 5)) (paredit (23))) "Structured, Context Driven LISP Editing and Refactoring" tar ((:url . "https://github.com/promethial/paxedit") (:commit . "48df0a26285f68cd20ea64368e7bf2a5fbf13135") (:revdesc . "48df0a26285f") (:keywords "lisp" "refactoring" "context"))])
+ (pbcopy . [(20150225 459) nil "Emacs Interface to pbcopy" tar ((:url . "https://github.com/jkp/pbcopy.el") (:commit . "338f7245746b5de1bb96c5cc2b32bfd9b5d83272") (:revdesc . "338f7245746b") (:keywords "mac" "osx" "pbcopy"))])
+ (pc-bufsw . [(20201011 1918) nil "PC style quick buffer switcher" tar ((:url . "https://github.com/ibukanov/pc-bufsw") (:commit . "a7295e4813d636d5a20605d134acd42e4e4fe8fa") (:revdesc . "a7295e4813d6") (:keywords "buffer") (:authors ("Igor Bukanov" . "igor@mir2.org")) (:maintainers ("Igor Bukanov" . "igor@mir2.org")) (:maintainer "Igor Bukanov" . "igor@mir2.org"))])
+ (pcache . [(20260728 1657) ((emacs (25 1))) "Persistent caching for Emacs" tar ((:url . "https://github.com/sigma/pcache") (:commit . "17d785afa4532043afa8b2dc9ae3d9733528e758") (:revdesc . "17d785afa453") (:keywords "extensions") (:authors ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainers ("Yann Hodique" . "yann.hodique@gmail.com")) (:maintainer "Yann Hodique" . "yann.hodique@gmail.com"))])
+ (pcap-mode . [(20161025 1448) ((emacs (24 3))) "Major mode for working with PCAP files" tar ((:url . "https://github.com/apconole/pcap-mode") (:commit . "52780669af0ade136f84d73f21b4dbb7ab655416") (:revdesc . "52780669af0a") (:keywords "pcap" "packets" "tcpdump" "wireshark" "tshark") (:authors ("Aaron Conole" . "aconole@bytheb.org")) (:maintainers ("Aaron Conole" . "aconole@bytheb.org")) (:maintainer "Aaron Conole" . "aconole@bytheb.org"))])
+ (pcmpl-args . [(20250217 342) ((emacs (25 1))) "Enhanced shell command completion" tar ((:url . "https://github.com/JonWaltman/pcmpl-args.el") (:commit . "bccbfe931a8383fb4ecc75551305057a9bd33700") (:revdesc . "bccbfe931a83") (:keywords "abbrev" "completion" "convenience" "processes" "terminals" "unix") (:authors ("Jonathan Waltman" . "jonathan.waltman@gmail.com")) (:maintainers ("Jonathan Waltman" . "jonathan.waltman@gmail.com")) (:maintainer "Jonathan Waltman" . "jonathan.waltman@gmail.com"))])
+ (pcmpl-homebrew . [(20200911 742) nil "Pcomplete for homebrew" tar ((:url . "https://github.com/suzzvv/pcmpl-homebrew") (:commit . "a2044042dd498abad1dc06162a8ee0d70314ca40") (:revdesc . "a2044042dd49") (:keywords "pcomplete" "homebrew" "tools" "cask" "services") (:authors ("zwild" . "judezhao@outlook.com")) (:maintainers ("zwild" . "judezhao@outlook.com")) (:maintainer "zwild" . "judezhao@outlook.com"))])
+ (pcmpl-pip . [(20181229 1420) ((s (1 12 0)) (f (0 19 0)) (seq (2 15))) "Pcomplete for pip" tar ((:url . "https://github.com/suzzvv/pcmpl-pip") (:commit . "ebb672d4494f876f611639e65df4e28e566c06b5") (:revdesc . "ebb672d4494f") (:keywords "pcomplete" "pip" "python" "tools") (:authors ("zwild" . "judezhao@outlook.com")) (:maintainers ("zwild" . "judezhao@outlook.com")) (:maintainer "zwild" . "judezhao@outlook.com"))])
+ (pcomplete-extension . [(20190928 519) ((emacs (24)) (cl-lib (0 5))) "Additional completion for pcomplete" tar ((:url . "https://github.com/thierryvolpiatto/pcomplete-extension") (:commit . "bc5eb204fee659e0980056009409b44bc7655716") (:revdesc . "bc5eb204fee6") (:authors ("Thierry Volpiatto" . "thierry.volpiatto@gmail.com")) (:maintainers ("Thierry Volpiatto" . "thierry.volpiatto@gmail.com")) (:maintainer "Thierry Volpiatto" . "thierry.volpiatto@gmail.com"))])
+ (pcre2el . [(20240629 2322) ((emacs (25 1))) "Regexp syntax converter" tar ((:url . "https://github.com/joddie/pcre2el") (:commit . "b4d846d80dddb313042131cf2b8fbf647567e000") (:revdesc . "b4d846d80ddd") (:authors ("joddie" . "jonxfieldatgmail.com")) (:maintainers ("joddie" . "jonxfieldatgmail.com")) (:maintainer "joddie" . "jonxfieldatgmail.com"))])
+ (pcsv . [(20240112 1431) ((emacs (25 1))) "Parser of csv" tar ((:url . "https://github.com/mhayashi1120/Emacs-pcsv") (:commit . "aa421d12c0da0adb9bc74a050a591dcbabf934ae") (:revdesc . "aa421d12c0da") (:keywords "data") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (pd-remote . [(20230314 428) ((emacs (24 3)) (faust-mode (0 6)) (lua-mode (20210802))) "Pd remote control helper" tar ((:url . "https://github.com/agraef/pd-remote") (:commit . "dcd68097d2b7468303517d91cb76682bfb47db63") (:revdesc . "dcd68097d2b7") (:keywords "multimedia" "pure-data") (:authors ("Albert Graef" . "aggraef@gmail.com")) (:maintainers ("Albert Graef" . "aggraef@gmail.com")) (:maintainer "Albert Graef" . "aggraef@gmail.com"))])
+ (pdb-capf . [(20200419 1237) ((emacs (25 1))) "Completion-at-point function for python debugger" tar ((:url . "https://github.com/muffinmad/emacs-pdb-capf") (:commit . "2f4099aa1330f87df4e9cd526de057ee9b71de6c") (:revdesc . "2f4099aa1330") (:keywords "languages" "abbrev" "convenience") (:authors ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainers ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainer "Andrii Kolomoiets" . "andreyk.mad@gmail.com"))])
+ (pdb-mode . [(20150128 1751) nil "Major mode for editing Protein Data Bank files" tar ((:url . "http://bondxray.org/software/pdb-mode/") (:commit . "855fb18ebb73b5df30c8d7677c2bcd0f361b138a") (:revdesc . "855fb18ebb73") (:keywords "data" "pdb") (:authors (nil . "charles.bond@uwa.edu.au")) (:maintainers (nil . "aix.bing@gmail.com")) (:maintainer nil . "aix.bing@gmail.com"))])
+ (pdd . [(20250809 509) ((emacs (28 1))) "HTTP library & Async Toolkit" tar ((:url . "https://github.com/lorniu/pdd.el") (:commit . "533e8fde36cb9fae1fae3bf44eb6dbf39ec10f53") (:revdesc . "533e8fde36cb") (:authors ("lorniu" . "lorniu@gmail.com")) (:maintainers ("lorniu" . "lorniu@gmail.com")) (:maintainer "lorniu" . "lorniu@gmail.com"))])
+ (pdf-meta-edit . [(20251118 2327) ((emacs (24 3)) (compat (29 1))) "Edit PDF metadata via pdftk" tar ((:url . "https://github.com/krisbalintona/pdf-meta-edit") (:commit . "18d8b9156f15f77ed3f79152b221551c703b680c") (:revdesc . "18d8b9156f15") (:keywords "files" "data") (:authors ("Kristoffer Balintona" . "krisbalintona@gmail.com")) (:maintainers ("Kristoffer Balintona" . "krisbalintona@gmail.com")) (:maintainer "Kristoffer Balintona" . "krisbalintona@gmail.com"))])
+ (pdf-tools . [(20260102 1101) ((emacs (26 3)) (tablist (1 0)) (let-alist (1 0 4))) "Support library for PDF documents" tar ((:url . "https://github.com/vedang/pdf-tools/") (:commit . "e4b7f1f37cf59ddf025d609ffcdabe732a6e99ba") (:revdesc . "e4b7f1f37cf5") (:keywords "files" "multimedia") (:authors ("Andreas Politz" . "mail@andreas-politz.de")) (:maintainers ("Vedang Manerikar" . "vedang.manerikar@gmail.com")) (:maintainer "Vedang Manerikar" . "vedang.manerikar@gmail.com"))])
+ (pdf-view-pagemark . [(20240518 626) ((pdf-tools (0 90)) (posframe (1 4 2)) (emacs (26 0))) "Add indicator in pdfview mode to show the page remaining" tar ((:url . "https://github.com/kimim/pdf-view-pagemark") (:commit . "a746cf8b86d030ebfc61bb2ff10c0e16b5d195c6") (:revdesc . "a746cf8b86d0") (:keywords "multimedia" "convenience") (:authors ("Kimi Ma" . "kimi.im@outlook.com")) (:maintainers ("Kimi Ma" . "kimi.im@outlook.com")) (:maintainer "Kimi Ma" . "kimi.im@outlook.com"))])
+ (pdf-view-restore . [(20190904 1708) ((pdf-tools (0 90)) (emacs (26 0))) "Support for opening last known pdf position in pdfview mode" tar ((:url . "https://github.com/007kevin/pdf-view-restore") (:commit . "5a1947c01a3edecc9e0fe7629041a2f53e0610c9") (:revdesc . "5a1947c01a3e") (:keywords "files" "convenience") (:authors ("Kevin Kim" . "kevinkim1991@gmail.com")) (:maintainers ("Kevin Kim" . "kevinkim1991@gmail.com")) (:maintainer "Kevin Kim" . "kevinkim1991@gmail.com"))])
+ (pdffontetc . [(20260624 1756) ((emacs (24 4)) (pdf-tools (1 2 0))) "Display `pdffont' and other PDF information" tar ((:url . "https://github.com/emacsomancer/pdffontetc") (:commit . "063529d92f833ca4342f88a4928f6ec74826ccd0") (:revdesc . "063529d92f83") (:keywords "files" "multimedia") (:authors ("Benjamin Slade" . "slade@lambda-y.net")) (:maintainers ("Benjamin Slade" . "slade@lambda-y.net")) (:maintainer "Benjamin Slade" . "slade@lambda-y.net"))])
+ (pdfgrep . [(20210203 1730) ((emacs (24 4))) "Run `pdfgrep' and display the results" tar ((:url . "https://github.com/jeremy-compostella/pdfgrep") (:commit . "a4ca0a1e6521de93f28bb6736a5344b4974d144c") (:revdesc . "a4ca0a1e6521") (:keywords "extensions" "mail" "pdf" "grep") (:authors ("Jérémy Compostella" . "jeremy.compostella@gmail.com")) (:maintainers ("Jérémy Compostella" . "jeremy.compostella@gmail.com")) (:maintainer "Jérémy Compostella" . "jeremy.compostella@gmail.com"))])
+ (peacock-theme . [(20170808 1320) ((emacs (24 0))) "An Emacs 24 theme based on Peacock (tmTheme)" tar ((:url . "https://github.com/emacsfodder/tmtheme-to-deftheme") (:commit . "9e46fbfb562b6e26c6e3d6d618b044b3694da4c8") (:revdesc . "9e46fbfb562b"))])
+ (pebble-mode . [(20230123 1801) ((emacs (24 3))) "A major mode for pebble" tar ((:url . "https://github.com/ArneBab/pebble-mode") (:commit . "bcbc76aa89196338f12a8ddfe4486edf83c19c5e") (:revdesc . "bcbc76aa8919"))])
+ (peek-mode . [(20130620 1946) ((elnode (0 9 8 1))) "Serve buffers live over HTTP with elnode backend" tar ((:url . "https://github.com/erikriverson/peek-mode") (:commit . "55a7dd011375330c7d57322257a5167516702c71") (:revdesc . "55a7dd011375") (:authors ("Erik Iverson" . "erik@sigmafield.org")) (:maintainers ("Erik Iverson" . "erik@sigmafield.org")) (:maintainer "Erik Iverson" . "erik@sigmafield.org"))])
+ (peep-dired . [(20160321 2237) nil "Peep at files in another window from dired buffers" tar ((:url . "https://github.com/asok/peep-dired") (:commit . "12d7e52cd5ae29fd828db0bf1fbf648020077145") (:revdesc . "12d7e52cd5ae") (:keywords "files" "convenience") (:authors ("Adam Sokolnicki" . "adam.sokolnicki@gmail.com")) (:maintainers ("Adam Sokolnicki" . "adam.sokolnicki@gmail.com")) (:maintainer "Adam Sokolnicki" . "adam.sokolnicki@gmail.com"))])
+ (peertube . [(20210101 1007) ((emacs (25 1)) (transmission (0 12 1))) "Query and download PeerTube videos" tar ((:url . "https://git.sr.ht/~yoctocell/peertube") (:commit . "bb529db154596e86327829edbd7144b67cf72255") (:revdesc . "bb529db15459") (:keywords "peertube" "multimedia") (:authors ("yoctocell" . "public@yoctocell.xyz")) (:maintainers ("yoctocell" . "public@yoctocell.xyz")) (:maintainer "yoctocell" . "public@yoctocell.xyz"))])
+ (pelican-mode . [(20190124 2336) ((emacs (25))) "Minor mode for editing Pelican sites" tar ((:url . "https://git.korewanetadesu.com/pelican-mode.git") (:commit . "a69934885c7a3b303049e2418333b3915b8f8fb8") (:revdesc . "a69934885c7a") (:keywords "convenience" "editing") (:authors ("Joe Wreschnig" . "joe.wreschnig@gmail.com")) (:maintainers ("Joe Wreschnig" . "joe.wreschnig@gmail.com")) (:maintainer "Joe Wreschnig" . "joe.wreschnig@gmail.com"))])
+ (pepita . [(20240102 401) ((emacs (25)) (csv (2 1))) "Run Splunk search commands, export results to CSV/HTML/JSON" tar ((:url . "https://github.com/sebasmonia/pepita.git") (:commit . "02ac00ad23b9a3e19797fc76ac569c2d46da54b9") (:revdesc . "02ac00ad23b9") (:keywords "tools" "convenience" "matching") (:authors ("Sebastian Monia" . "smonia@outlook.com")) (:maintainers ("Sebastian Monia" . "smonia@outlook.com")) (:maintainer "Sebastian Monia" . "smonia@outlook.com"))])
+ (peppers-theme . [(20260817 1354) ((emacs (28 1)) (modus-themes (4 0 0))) "Custom dark theme based on modus framework" tar ((:url . "https://codeberg.org/joar/peppers-theme") (:commit . "583aeafea8423629f3a4732facc682b5a8a53ced") (:revdesc . "583aeafea842") (:keywords "faces" "theme" "accessibility") (:authors ("Joar von Arndt" . "joarxpablo@vonarndt.se")) (:maintainers ("Joar von Arndt" . "joarxpablo@vonarndt.se")) (:maintainer "Joar von Arndt" . "joarxpablo@vonarndt.se"))])
+ (per-buffer-theme . [(20221002 2219) ((emacs (25 1))) "Change theme and font according to buffer name or major mode" tar ((:url . "https://hg.serna.eu/emacs/per-buffer-theme") (:commit . "2cbb15c05edff4ce23ce61858cf16e8953cd58b3") (:revdesc . "2cbb15c05edf") (:keywords "themes") (:authors ("Iñigo Serna" . "inigoserna@gmx.com")) (:maintainers ("Iñigo Serna" . "inigoserna@gmx.com")) (:maintainer "Iñigo Serna" . "inigoserna@gmx.com"))])
+ (perfect-margin . [(20251209 2114) ((emacs (25 1))) "Auto center windows, works with line numbers" tar ((:url . "https://github.com/mpwang/perfect-margin") (:commit . "d38a2ff6b89dde81da03e8f4a83c0cad2baade0e") (:revdesc . "d38a2ff6b89d") (:keywords "convenience" "frames") (:authors ("Randall Wang" . "randall.wjz@gmail.com")) (:maintainers ("Randall Wang" . "randall.wjz@gmail.com")) (:maintainer "Randall Wang" . "randall.wjz@gmail.com"))])
+ (perject . [(20250115 1657) ((emacs (27 1)) (dash (2 10)) (transient (0 3 7))) "Session-persistent project management" tar ((:url . "https://github.com/overideal/perject") (:commit . "28fad17c048685d89c815b6bf6e69c3102ee3712") (:revdesc . "28fad17c0486"))])
+ (perl-ts-mode . [(20250425 953) ((emacs (30 1))) "Another Major mode for Perl" tar ((:url . "https://hg.sr.ht/~pranshu/perl-ts-mode") (:commit . "aa34c2a15aec61febb05afb74926b38f6a77f60e") (:revdesc . "aa34c2a15aec") (:keywords "languages" "perl") (:authors ("Pranshu Sharma" . "pranshu@bauherren.ovh")) (:maintainers ("Pranshu Sharma" . "pranshu@bauherren.ovh")) (:maintainer "Pranshu Sharma" . "pranshu@bauherren.ovh"))])
+ (perlbrew . [(20230823 1652) nil "A perlbrew wrapper for Emacs" tar ((:url . "https://github.com/kentaro/perlbrew.el") (:commit . "527b7f6a6a5edd2b779ae98029e60994391c0903") (:revdesc . "527b7f6a6a5e") (:keywords "emacs" "perl") (:authors ("Kentaro Kuribayashi" . "kentarok@gmail.com")) (:maintainers ("Kentaro Kuribayashi" . "kentarok@gmail.com")) (:maintainer "Kentaro Kuribayashi" . "kentarok@gmail.com"))])
+ (persist-state . [(20260217 1752) ((emacs (28 2))) "Regularly persist bookmarks, history, recent files and more" tar ((:url . "https://codeberg.org/meedstrom/emacs-persist-state") (:commit . "bb8d39612197558a497152339ba927506f18bcb5") (:revdesc . "bb8d39612197") (:keywords "convenience") (:authors ("Bram Schoenmakers" . "me@bramschoenmakers.nl")) (:maintainers ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainer "Martin Edström" . "meedstrom91@gmail.com"))])
+ (persist-text-scale . [(20260826 243) ((emacs (26 1))) "Persist and restore text scale" tar ((:url . "https://github.com/jamescherti/persist-text-scale.el") (:commit . "dfedeeee6ef14d1d369b81fd25864dd85726af34") (:revdesc . "dfedeeee6ef1") (:keywords "convenience" "faces") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (persistent-overlays . [(20161128 700) nil "Minor mode to store selected overlays to be loaded later" tar ((:url . "https://github.com/mneilly/Emacs-Persistent-Overlays") (:commit . "f563c8b966edc78c9d806661c4eb80e4781c4eab") (:revdesc . "f563c8b966ed") (:keywords "overlays" "persistent") (:authors ("Michael Neilly" . "mneilly@yahoo.com")) (:maintainers ("Michael Neilly" . "mneilly@yahoo.com")) (:maintainer "Michael Neilly" . "mneilly@yahoo.com"))])
+ (persistent-scratch . [(20230225 1439) ((emacs (24))) "Preserve the scratch buffer across Emacs sessions" tar ((:url . "https://github.com/Fanael/persistent-scratch") (:commit . "5ff41262f158d3eb966826314516f23e0cb86c04") (:revdesc . "5ff41262f158") (:authors ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (persistent-soft . [(20260202 1154) ((cl-lib (0 7 1)) (pcache (0 3 1)) (list-utils (0 4 2))) "Persistent storage, returning nil on failure" tar ((:url . "https://github.com/rolandwalker/persistent-soft") (:commit . "c94b34332529df573bad8a97f70f5a35d5da7333") (:revdesc . "c94b34332529") (:keywords "data" "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (persp-fr . [(20191108 754) ((emacs (25 1)) (persp-mode (2 9 6)) (dash (2 13 0))) "In persp-mode, show perspective list in the GUI window title" tar ((:url . "https://github.com/rocher/persp-fr") (:commit . "1adbb6a9f9a4db580a9b7ed8b4091738e01345e6") (:revdesc . "1adbb6a9f9a4") (:keywords "perspectives" "workspace" "windows" "convenience") (:authors ("Francesc Rocher" . "francesc.rocher@gmail.com")) (:maintainers ("Francesc Rocher" . "francesc.rocher@gmail.com")) (:maintainer "Francesc Rocher" . "francesc.rocher@gmail.com"))])
+ (persp-gumshoe . [(20260217 448) ((emacs (27 1)) (perspective (2 0)) (gumshoe (4 0))) "Perspective support for gumshoe" tar ((:url . "https://github.com/Overdr0ne/gumshoe") (:commit . "4c228d89b35861f6461afcbd5cc596bd30582412") (:revdesc . "4c228d89b358") (:keywords "tools") (:authors ("overdr0ne" . "scmorris.dev@gmail.com")) (:maintainers ("overdr0ne" . "scmorris.dev@gmail.com")) (:maintainer "overdr0ne" . "scmorris.dev@gmail.com"))])
+ (persp-mode . [(20250830 955) ((emacs (24 3))) "Windows/buffers sets shared among frames + save/load" tar ((:url . "https://github.com/Bad-ptr/persp-mode.el") (:commit . "fab4bf76927445d2e431f06e74572acba81f47d5") (:revdesc . "fab4bf769274") (:keywords "perspectives" "session" "workspace" "persistence" "windows" "buffers" "convenience") (:authors ("Constantin Kulikov" . "zxnotdead@gmail.com")) (:maintainers ("Constantin Kulikov" . "zxnotdead@gmail.com")) (:maintainer "Constantin Kulikov" . "zxnotdead@gmail.com"))])
+ (persp-mode-projectile-bridge . [(20170315 1120) ((persp-mode (2 9)) (projectile (0 13 0)) (cl-lib (0 5))) "Persp-mode + projectile integration" tar ((:url . "https://github.com/Bad-ptr/persp-mode-projectile-bridge.el") (:commit . "f6453cd7b8b4352c06e771706f2c5b7e2cdff1ce") (:revdesc . "f6453cd7b8b4") (:keywords "persp-mode" "projectile") (:authors ("Constantin Kulikov" . "zxnotdead@gmail.com")) (:maintainers ("Constantin Kulikov" . "zxnotdead@gmail.com")) (:maintainer "Constantin Kulikov" . "zxnotdead@gmail.com"))])
+ (persp-projectile . [(20210618 708) ((perspective (1 9)) (projectile (2 4)) (cl-lib (0 3))) "Perspective integration with Projectile" tar ((:url . "https://github.com/bbatsov/persp-projectile") (:commit . "6e4c2e017d59d10d627cf95b2bb9f9fa2b22a3a3") (:revdesc . "6e4c2e017d59") (:keywords "project" "convenience"))])
+ (perspective . [(20260717 1853) ((emacs (24 4)) (cl-lib (0 5))) "Switch between named \"perspectives\" of the editor" tar ((:url . "https://github.com/nex3/perspective-el") (:commit . "352a06502582646c8a79d5e1a0c36f1b61b6e6cc") (:revdesc . "352a06502582") (:keywords "workspace" "convenience" "frames") (:authors ("Natalie Weizenbaum" . "nex342@gmail.com")) (:maintainers ("Natalie Weizenbaum" . "nex342@gmail.com")) (:maintainer "Natalie Weizenbaum" . "nex342@gmail.com"))])
+ (perspective-exwm . [(20260802 944) ((emacs (27 1)) (burly (0 2 -1)) (exwm (0 26)) (perspective (2 17))) "Better integration for perspective.el and EXWM" tar ((:url . "https://github.com/SqrtMinusOne/perspective-exwm.el") (:commit . "c0357efbde56ab3aac456f122138e639cb2b8aac") (:revdesc . "c0357efbde56") (:authors ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainers ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainer "Korytov Pavel" . "thexcloud@gmail.com"))])
+ (perspective-project-bridge . [(20231024 1737) ((emacs (27 1)) (perspective (2 18))) "Integration of perspective.el + project.el" tar ((:url . "https://github.com/arunkmv/perspective-project-bridge") (:commit . "7b65b08a0151b8279fc3ae75f0016cb8d5eadb53") (:revdesc . "7b65b08a0151") (:keywords "perspective" "project" "convenience" "frames") (:authors ("Arunkumar Vaidyanathan" . "arunkumarmv1997@gmail.com")) (:maintainers ("Arunkumar Vaidyanathan" . "arunkumarmv1997@gmail.com")) (:maintainer "Arunkumar Vaidyanathan" . "arunkumarmv1997@gmail.com"))])
+ (perspeen . [(20171203 1021) ((emacs (25 0)) (powerline (2 4))) "An package for multi-workspace" tar ((:url . "https://github.com/seudut/perspeen") (:commit . "edb70c530bda50ff3d1756e32a703d5fef5e5480") (:revdesc . "edb70c530bda") (:keywords "lisp") (:authors ("Peng Li" . "seudut@gmail.com")) (:maintainers ("Peng Li" . "seudut@gmail.com")) (:maintainer "Peng Li" . "seudut@gmail.com"))])
+ (pest-mode . [(20221231 15) ((emacs (26 3))) "Major mode for editing Pest files" tar ((:url . "https://github.com/ksqsf/pest-mode") (:commit . "8023a92ce59c34dcd1587cbd85ed144f206ddb89") (:revdesc . "8023a92ce59c") (:keywords "languages") (:authors ("ksqsf" . "i@ksqsf.moe")) (:maintainers ("ksqsf" . "i@ksqsf.moe")) (:maintainer "ksqsf" . "i@ksqsf.moe"))])
+ (pet . [(20260716 2214) ((emacs (27 1)) (f (0 6 0)) (map (3 3 1)) (seq (2 24))) "Executable and virtualenv tracker for python-mode" tar ((:url . "https://github.com/wyuenho/emacs-pet/") (:commit . "c0d856782d74d205a9359ae2f5c623d8152d20d1") (:revdesc . "c0d856782d74") (:keywords "tools") (:authors ("Jimmy Yuen Ho Wong" . "wyuenho@gmail.com")) (:maintainers ("Jimmy Yuen Ho Wong" . "wyuenho@gmail.com")) (:maintainer "Jimmy Yuen Ho Wong" . "wyuenho@gmail.com"))])
+ (pfuture . [(20220913 1401) ((emacs (25 2))) "A simple wrapper around asynchronous processes" tar ((:url . "https://github.com/Alexander-Miller/pfuture") (:commit . "19b53aebbc0f2da31de6326c495038901bffb73c") (:revdesc . "19b53aebbc0f") (:authors ("Alexander Miller" . "alexanderm@web.de")) (:maintainers ("Alexander Miller" . "alexanderm@web.de")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (pg . [(20260812 941) ((emacs (28 1)) (peg (1 0 1))) "Socket-level interface to the PostgreSQL database" tar ((:url . "https://github.com/emarsden/pg-el") (:commit . "17e82d7557cc8d86abdf0679c6a54be3bc25cf5f") (:revdesc . "17e82d7557cc") (:keywords "data" "comm" "database" "postgresql") (:authors ("Eric Marsden" . "eric.marsden@risk-engineering.org")) (:maintainers ("Eric Marsden" . "eric.marsden@risk-engineering.org")) (:maintainer "Eric Marsden" . "eric.marsden@risk-engineering.org"))])
+ (pgdevenv . [(20150105 2236) nil "Manage your PostgreSQL development envs" tar ((:url . "https://github.com/dimitri/pgdevenv-el") (:commit . "7f1d5bc734750aca98cf67a9491cdbd5615fd132") (:revdesc . "7f1d5bc73475") (:keywords "emacs" "postgresql" "development" "environment" "shell" "debug" "gdb") (:authors ("Dimitri Fontaine" . "dim@tapoueh.org")) (:maintainers ("Dimitri Fontaine" . "dim@tapoueh.org")) (:maintainer "Dimitri Fontaine" . "dim@tapoueh.org"))])
+ (pgsql . [(20260817 136) ((emacs (29 1))) "Native PostgreSQL protocol client" tar ((:url . "https://github.com/LuciusChen/pgsql.el") (:commit . "165636b76fa63232a2d560ff04013aae0ff9e8a9") (:revdesc . "165636b76fa6") (:keywords "comm" "data") (:authors ("Lucius Chen" . "chenyh572@gmail.com")) (:maintainers ("Lucius Chen" . "chenyh572@gmail.com")) (:maintainer "Lucius Chen" . "chenyh572@gmail.com"))])
+ (phabricator . [(20160510 1425) ((emacs (24 4)) (dash (1 0)) (projectile (0 13 0)) (s (1 10 0)) (f (0 17 2))) "Phabricator/Arcanist helpers for Emacs" tar ((:url . "https://github.com/ajtulloch/phabricator.el") (:commit . "d09d6f059aea92d3b11c68664a5e80c901182ab8") (:revdesc . "d09d6f059aea") (:keywords "phabricator" "arcanist" "diffusion"))])
+ (phan . [(20200805 356) ((emacs (24)) (composer (0 0 8)) (f (0 17))) "Utility functions for Phan (PHP static analizer)" tar ((:url . "https://github.com/emacs-php/phan.el") (:commit . "b7d523630bb072c4dbcfa9995dc734b25b72a69f") (:revdesc . "b7d523630bb0") (:keywords "tools" "php") (:authors ("USAMI Kenta" . "tadsan@pixiv.com")) (:maintainers ("USAMI Kenta" . "tadsan@pixiv.com")) (:maintainer "USAMI Kenta" . "tadsan@pixiv.com"))])
+ (phi-autopair . [(20210306 424) ((paredit (20))) "Another simple-minded autopair implementation" tar ((:url . "http://zk-phi.gitub.io/") (:commit . "6a67c37d31a3ff9261fc9f812547a0c86721fc90") (:revdesc . "6a67c37d31a3"))])
+ (phi-grep . [(20221004 836) ((cl-lib (0 1)) (emacs (26 1))) "Interactively-editable recursive grep implementation in elisp" tar ((:url . "https://github.com/zk-phi/phi-grep") (:commit . "9f3c42952ad4ad75d24abbdccb041240db4f0557") (:revdesc . "9f3c42952ad4"))])
+ (phi-rectangle . [(20200911 204) nil "Another rectangle-mark command (rewrite of rect-mark)" tar ((:url . "http://zk-phi.github.io/") (:commit . "43ee8aea9998b34a9fdb28d7da2e4f75e4154030") (:revdesc . "43ee8aea9998"))])
+ (phi-search . [(20250611 1725) nil "Another incremental search & replace, compatible with \"multiple-cursors\"" tar ((:url . "http://hins11.yu-yake.com/") (:commit . "2caee8a353608eb41a41e794e7999a5950dbfee3") (:revdesc . "2caee8a35360"))])
+ (phi-search-dired . [(20200816 1542) ((phi-search (2 2 0))) "Interactive filtering for dired powered by phi-search" tar ((:url . "http://hins11.yu-yake.com/") (:commit . "f014a9fb0b6a94af2df0e22f91ef79ce6996afd7") (:revdesc . "f014a9fb0b6a"))])
+ (phi-search-mc . [(20231213 841) ((phi-search (2 0 0)) (multiple-cursors (1 2 1)) (emacs (25 1))) "Multiple-cursors extension for phi-search" tar ((:url . "https://github.com/knu/phi-search-mc.el") (:commit . "8670eb007604555baa7ef017684a46fc97d254dc") (:revdesc . "8670eb007604") (:keywords "search" "cursors") (:authors ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (phi-search-migemo . [(20170618 921) ((phi-search (2 2 0)) (migemo (1 9 1))) "Migemo extension for phi-search" tar ((:url . "http://hins11.yu-yake.com/") (:commit . "723b584d386639d59298d872ad7a035d3f8008b0") (:revdesc . "723b584d3866"))])
+ (phoenix-dark-mono-theme . [(20170729 1406) nil "Monochromatic version of the Phoenix theme" tar ((:url . "https://github.com/j0ni/phoenix-dark-mono") (:commit . "a54f515d162148bcb38676980bc2316adb3d7b8b") (:revdesc . "a54f515d1621") (:authors ("J Irving" . "j@lollyshouse.ca")) (:maintainers ("J Irving" . "j@lollyshouse.ca")) (:maintainer "J Irving" . "j@lollyshouse.ca"))])
+ (phoenix-dark-pink-theme . [(20190821 48) nil "Originally a port of the Sublime Text 2 theme" tar ((:url . "https://github.com/j0ni/phoenix-dark-pink") (:commit . "ddd98a45775be105984ec598384e68df3d3e8046") (:revdesc . "ddd98a45775b") (:authors ("J Irving" . "j@lollyshouse.ca")) (:maintainers ("J Irving" . "j@lollyshouse.ca")) (:maintainer "J Irving" . "j@lollyshouse.ca"))])
+ (phony . [(20260630 1002) ((emacs (29 1)) (simulacrum (1 0 0))) "Define voice commands" tar ((:url . "https://github.com/ErikPrantare/phony.el") (:commit . "b155ee3686c732cfe02a4bcd5f3e07fdc39dca35") (:revdesc . "b155ee3686c7") (:keywords "files"))])
+ (php-boris . [(20130527 821) nil "Run boris php REPL" tar ((:url . "https://github.com/tomterl/php-boris") (:commit . "4bb7e4d34d9906ddce688205eb24cafe634c6d06") (:revdesc . "4bb7e4d34d99") (:keywords "php" "commint" "repl" "boris") (:maintainers ("Tom Regner" . "tom@goochesa.de")) (:maintainer "Tom Regner" . "tom@goochesa.de"))])
+ (php-boris-minor-mode . [(20140209 1835) ((php-boris (0 0 1)) (highlight (0))) "A minor mode to evaluate PHP code in the Boris repl" tar ((:url . "https://github.com/steckerhalter/php-boris-minor-mode") (:commit . "8648eba604e4ff82ef6594a2c5ee4cb4825e6235") (:revdesc . "8648eba604e4") (:keywords "php" "repl" "eval"))])
+ (php-cs-fixer . [(20250211 214) ((emacs (24 3))) "The php-cs-fixer wrapper" tar ((:url . "https://github.com/pivaldi/php-cs-fixer") (:commit . "4bf549c1dedad2a2a52257b866bcb180a31f129d") (:revdesc . "4bf549c1deda") (:keywords "languages" "php"))])
+ (php-eldoc . [(20140202 1941) nil "Eldoc backend for php" tar ((:url . "https://github.com/sabof/php-eldoc") (:commit . "df05064146b884d9081e10657e32dc480f070cfe") (:revdesc . "df05064146b8"))])
+ (php-mode . [(20260825 1535) ((emacs (28 1))) "Major mode for editing PHP code" tar ((:url . "https://github.com/emacs-php/php-mode") (:commit . "0e32f79ffca49578eba452d38b62e434e517df5e") (:revdesc . "0e32f79ffca4") (:keywords "languages" "php") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (php-quickhelp . [(20210819 2025) ((emacs (25 1))) "Quickhelp at point for php" tar ((:url . "https://github.com/vpxyz/php-quickhelp") (:commit . "d5e11b7a6bad64550521e8822139a33218b8c9bb") (:revdesc . "d5e11b7a6bad"))])
+ (php-refactor-mode . [(20171124 635) nil "Minor mode to quickly and safely perform common refactorings" tar ((:url . "https://github.com/keelerm84/php-refactor-mode.el") (:commit . "d06dabd9ca743a04067e02282b69d7b7467fb4b7") (:revdesc . "d06dabd9ca74") (:keywords "php" "refactor") (:authors ("Matthew M. Keeler" . "keelerm84@gmail.com")) (:maintainers ("Matthew M. Keeler" . "keelerm84@gmail.com")) (:maintainer "Matthew M. Keeler" . "keelerm84@gmail.com"))])
+ (php-runtime . [(20241024 1622) ((emacs (25 1)) (compat (29))) "Language binding bridge to PHP" tar ((:url . "https://github.com/emacs-php/php-runtime.el") (:commit . "37beef404c70d7b80dc085b1ee1e13fd9c375fe6") (:revdesc . "37beef404c70") (:keywords "processes" "php" "lisp") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (php-scratch . [(20210706 459) ((emacs (24 3)) (s (1 11 0)) (php-mode (1 17 0))) "A scratch buffer to interactively evaluate php code" tar ((:url . "https://github.com/mallt/php-scratch") (:commit . "b6bfd279da8a8ac7fc30459485956f3fd5d02573") (:revdesc . "b6bfd279da8a") (:authors ("Tijs Mallaerts" . "tijs.mallaerts@gmail.com")) (:maintainers ("Tijs Mallaerts" . "tijs.mallaerts@gmail.com")) (:maintainer "Tijs Mallaerts" . "tijs.mallaerts@gmail.com"))])
+ (phpactor . [(20251226 855) ((emacs (27 1)) (php-runtime (0 2)) (composer (0 2 0)) (async (1 9 3))) "Interface to Phpactor" tar ((:url . "https://github.com/emacs-php/phpactor.el") (:commit . "a4371b525afd5cd74c24461c50a489a1f459bd38") (:revdesc . "a4371b525afd") (:keywords "tools" "php") (:authors ("USAMI Kenta" . "tadsan@zonu.me") ("Mikael Kermorgant" . "mikael@kgtech.fi")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me") ("Mikael Kermorgant" . "mikael@kgtech.fi")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (phpstan . [(20260717 1734) ((emacs (27 1)) (compat (30)) (php-mode (1 22 3)) (php-runtime (0 2))) "Interface to PHPStan (PHP static analyzer)" tar ((:url . "https://github.com/emacs-php/phpstan.el") (:commit . "00942a5d5b28560bd08f7355d131074772bb7a01") (:revdesc . "00942a5d5b28") (:keywords "tools" "php") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (phpt-mode . [(20190512 1809) ((emacs (25)) (polymode (0 1 5)) (php-mode (1 21 2))) "Major mode for editing PHPT test code" tar ((:url . "https://github.com/emacs-php/phpt-mode") (:commit . "deb386f1a81003074c476f15e1975d445ff6df01") (:revdesc . "deb386f1a810") (:keywords "languages" "php") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (phpunit . [(20230801 1523) ((s (1 12 0)) (f (0 19 0)) (pkg-info (0 6)) (cl-lib (0 5)) (emacs (24 3))) "Launch PHP unit tests using phpunit" tar ((:url . "https://github.com/nlamirault/phpunit.el") (:commit . "e5baa445363942fbd9898ac3cb91eea64b69d316") (:revdesc . "e5baa4453639") (:keywords "tools" "php" "tests" "phpunit") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com") ("Eric Hansen" . "hansen.c.eric@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com") ("Eric Hansen" . "hansen.c.eric@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (pi-coding-agent . [(20260826 2219) ((emacs (29 1)) (transient (0 9 0)) (magit-section (4 0 0)) (md-ts-mode (0 3 0)) (markdown-table-wrap (0 2 0))) "Emacs frontend for pi coding agent" tar ((:url . "https://github.com/dnouri/pi-coding-agent") (:commit . "514ad3b14ccc9465c0a80dc0f9f438d53f5b3abf") (:revdesc . "514ad3b14ccc") (:keywords "ai" "llm" "ai-pair-programming" "tools") (:authors ("Daniel Nouri" . "daniel.nouri@gmail.com")) (:maintainers ("Daniel Nouri" . "daniel.nouri@gmail.com")) (:maintainer "Daniel Nouri" . "daniel.nouri@gmail.com"))])
+ (pianobar . [(20201002 1756) nil "Thin wrapper for Pianobar, a Pandora Radio client" tar ((:url . "https://github.com/agrif/pianobar.el") (:commit . "d708417608df4f09ee565fddaad03dfe181829a8") (:revdesc . "d708417608df") (:authors ("Aaron Griffith" . "aargri@gmail.com")) (:maintainers ("Aaron Griffith" . "aargri@gmail.com")) (:maintainer "Aaron Griffith" . "aargri@gmail.com"))])
+ (pickle . [(20190923 354) ((emacs (25 1)) (cl-lib (0 6 1))) "Major mode for editing cucumber gherkin files" tar ((:url . "https://github.com/ahungry/pickle-mode") (:commit . "3a0a717f2a24827667f34bc53830a3b81cd57460") (:revdesc . "3a0a717f2a24") (:keywords "ahungry" "languages" "cucumber" "gherkin") (:authors ("Matthew Carter" . "m@ahungry.com")) (:maintainers ("Matthew Carter" . "m@ahungry.com")) (:maintainer "Matthew Carter" . "m@ahungry.com"))])
+ (picpocket . [(20250830 1131) ((emacs (25 1))) "Image viewer" tar ((:url . "https://github.com/johanclaesson/picpocket") (:commit . "9fafd11824fd81cd884c20ff7243d6a58cea8ff2") (:revdesc . "9fafd11824fd") (:keywords "multimedia") (:authors ("Johan Claesson" . "johanwclaesson@gmail.com")) (:maintainers ("Johan Claesson" . "johanwclaesson@gmail.com")) (:maintainer "Johan Claesson" . "johanwclaesson@gmail.com"))])
+ (pif . [(20260504 1621) ((emacs (29 1))) "Prevent Initial Flash of Light" tar ((:url . "https://github.com/oliverepper/pif") (:commit . "72978dddffa3d9c68c6510c3a0381ffcdb691188") (:revdesc . "72978dddffa3") (:keywords "convenience" "faces" "display" "startup" "appearance" "dark-theme") (:authors ("Oliver Epper" . "oliver.epper@gmail.com")) (:maintainers ("Oliver Epper" . "oliver.epper@gmail.com")) (:maintainer "Oliver Epper" . "oliver.epper@gmail.com"))])
+ (pig-mode . [(20180520 1400) nil "Major mode for Pig files" tar ((:url . "https://github.com/motus/pig-mode") (:commit . "4c6c6e1b1bb719d8adc6c47cc24665f6fe558959") (:revdesc . "4c6c6e1b1bb7"))])
+ (pig-snippets . [(20130913 624) ((yasnippet (0 8 0))) "Snippets for pig-mode" tar ((:url . "https://github.com/motus/pig-mode") (:commit . "69ca24cb756dd516828e284e33274145eba21183") (:revdesc . "69ca24cb756d") (:keywords "snippets") (:authors ("Peter Vasil" . "mail@petervasil.net")) (:maintainers ("Peter Vasil" . "mail@petervasil.net")) (:maintainer "Peter Vasil" . "mail@petervasil.net"))])
+ (pikchr-mode . [(20241127 2138) ((emacs (27 1))) "A major mode for the pikchr diagram markup language" tar ((:url . "https://github.com/kljohann/pikchr-mode") (:commit . "27b5d06d6f55b4db45b9fc96d614f1dce8ee70fa") (:revdesc . "27b5d06d6f55") (:keywords "languages") (:authors ("Johann Klähn" . "johann@jklaehn.de")) (:maintainers ("Johann Klähn" . "johann@jklaehn.de")) (:maintainer "Johann Klähn" . "johann@jklaehn.de"))])
+ (pillar . [(20141112 1811) ((makey (0 3))) "Major mode for editing Pillar files" tar ((:url . "https://github.com/DamienCassou/pillar-mode") (:commit . "13a7f676544cc66005ccd8e6fc1c25e4ccd6f909") (:revdesc . "13a7f676544c") (:keywords "markup" "major-mode") (:authors ("Damien Cassou" . "damien.cassou@gmail.com")) (:maintainers ("Damien Cassou" . "damien.cassou@gmail.com")) (:maintainer "Damien Cassou" . "damien.cassou@gmail.com"))])
+ (pimacs . [(20260826 1644) ((emacs (29 1)) (compat (31 0)) (timeout (2 1 7)) (pcre2el (1 12)) (spinner (1 7)) (transient (0 3 7))) "Emacs Client for Pi" tar ((:url . "https://github.com/ananthakumaran/pimacs.el") (:commit . "1083724ca89bafb848bed1f3de088a6f08966b25") (:revdesc . "1083724ca89b") (:keywords "convenience" "processes") (:authors ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainers ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainer "Anantha kumaran" . "ananthakumaran@gmail.com"))])
+ (pinboard . [(20230101 850) ((emacs (25 1)) (cl-lib (0 5))) "A pinboard.in client" tar ((:url . "https://github.com/davep/pinboard.el") (:commit . "112e903b489fed3f71b3165447ba6f21ee5675e6") (:revdesc . "112e903b489f") (:keywords "hypermedia" "bookmarking" "reading" "pinboard") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (pinboard-api . [(20140324 1148) nil "Rudimentary http://pinboard.in integration" tar ((:url . "https://github.com/danieroux/pinboard-api-el") (:commit . "b7b5214d0c35178f8dca08cf22d6ef3c21f0fce4") (:revdesc . "b7b5214d0c35") (:keywords "pinboard" "www") (:authors ("Danie Roux" . "danie@danieroux.com")) (:maintainers ("Danie Roux" . "danie@danieroux.com")) (:maintainer "Danie Roux" . "danie@danieroux.com"))])
+ (pinboard-popular . [(20180511 1726) ((loop (1 4))) "Displays links from the pinboard.in popular page" tar ((:url . "https://github.com/asimpson/pinboard-popular") (:commit . "c0bc76cd35f8ecf34723c64a702b82eec2751318") (:revdesc . "c0bc76cd35f8") (:keywords "pinboard"))])
+ (pine-script-mode . [(20250826 901) ((emacs (24))) "Major mode for TradingView Pine Script v6 and older" tar ((:url . "https://github.com/darrylhebbes/pine-script-mode") (:commit . "f8c8ae596ca6296b9d5f618ff5b82c223d007ed5") (:revdesc . "f8c8ae596ca6") (:keywords "extensions" "pinescript") (:authors ("Eric Crosson" . "eric.s.crosson@utexas.edu")) (:maintainers ("Darryl Hebbes" . "darryl.hebbes@gmail.com")) (:maintainer "Darryl Hebbes" . "darryl.hebbes@gmail.com"))])
+ (pink-bliss-uwu-theme . [(20260413 1827) ((emacs (24 1))) "Pink color theme" tar ((:url . "https://github.com/themkat/pink-bliss-uwu") (:commit . "26e90134adc997c8f6fbf3820fa9198afa6c832b") (:revdesc . "26e90134adc9"))])
+ (pinot . [(20140211 2026) nil "Emacs interface to pinot-search" tar ((:url . "https://github.com/tkf/emacs-pinot-search") (:commit . "67fda555a155b22bb2ce44ba618b4bd6fc5f144a") (:revdesc . "67fda555a155") (:authors ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainers ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainer "Takafumi Arakaki" . "aka.tkfatgmail.com"))])
+ (pinyin . [(20220815 1239) ((cl-lib (0 5)) (emacs (24))) "Convert Hanzi to Pinyin (汉字转拼音)" tar ((:url . "https://github.com/xuchunyang/pinyin.el") (:commit . "b7a0aad8ff35e50d1c536df4c0e73fc7e9d06700") (:revdesc . "b7a0aad8ff35") (:keywords "extensions") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (pinyin-isearch . [(20260825 1950) ((emacs (28 1))) "Pinyin mode for isearch" tar ((:url . "https://github.com/Anoncheg1/pinyin-isearch") (:commit . "96487d65adfb7f3119ff078e09234abec651226f") (:revdesc . "96487d65adfb") (:keywords "chinese" "isearch" "matching" "convenience") (:authors ("Anoncheg" . "vitalij@gmx.com")) (:maintainers ("Anoncheg" . "vitalij@gmx.com")) (:maintainer "Anoncheg" . "vitalij@gmx.com"))])
+ (pinyin-search . [(20230919 538) ((pinyinlib (0 1 0))) "Search Chinese by Pinyin" tar ((:url . "https://github.com/xuchunyang/pinyin-search.el") (:commit . "3632bb98a5b8c0a396cd0a9d107e323e1ed3b7e7") (:revdesc . "3632bb98a5b8") (:keywords "chinese" "search") (:authors ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang56@gmail.com"))])
+ (pinyinlib . [(20200911 1723) nil "Convert first letter of Pinyin to Simplified/Traditional Chinese characters" tar ((:url . "https://github.com/cute-jumper/pinyinlib.el") (:commit . "1772c79b6f319b26b6a394a8dda065be3ea4498d") (:revdesc . "1772c79b6f31") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (pip-frame . [(20220802 1914) ((emacs (25 1))) "Display and manage a PIP frame" tar ((:url . "https://git.zamazal.org/pdm/pip-frame") (:commit . "8c396a11f532a1beb594b65e99e594f1e9f1c2c8") (:revdesc . "8c396a11f532") (:keywords "frames") (:authors ("Milan Zamazal" . "pdm@zamazal.org")) (:maintainers ("Milan Zamazal" . "pdm@zamazal.org")) (:maintainer "Milan Zamazal" . "pdm@zamazal.org"))])
+ (pip-requirements . [(20240621 2151) ((dash (2 8 0))) "A major mode for editing pip requirements files" tar ((:url . "https://github.com/Wilfred/pip-requirements.el") (:commit . "31e0dc62abb2d88fa765e0ea88b919d756cc0e4f") (:revdesc . "31e0dc62abb2") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (pipenv . [(20220514 123) ((emacs (25 1)) (s (1 12 0)) (pyvenv (1 20)) (load-env-vars (0 0 2))) "A Pipenv porcelain" tar ((:url . "https://github.com/pwalsh/pipenv.el") (:commit . "3af159749824c03f59176aff7f66ddd6a5785a10") (:revdesc . "3af159749824") (:authors ("Paul Walsh" . "paulywalsh@gmail.com")) (:maintainers ("Paul Walsh" . "paulywalsh@gmail.com")) (:maintainer "Paul Walsh" . "paulywalsh@gmail.com"))])
+ (pipewire . [(20220725 1858) ((emacs (28 1))) "PipeWire user interface" tar ((:url . "https://git.zamazal.org/pdm/pipewire-0") (:commit . "115a8a89a3a0c6a89ebe22df0ef0928a701cb1f0") (:revdesc . "115a8a89a3a0") (:keywords "multimedia") (:authors ("Milan Zamazal" . "pdm@zamazal.org")) (:maintainers ("Milan Zamazal" . "pdm@zamazal.org")) (:maintainer "Milan Zamazal" . "pdm@zamazal.org"))])
+ (pippel . [(20220416 1743) ((emacs (25 1)) (s (1 11 0)) (dash (2 12 0))) "Frontend to python package manager pip" tar ((:url . "https://github.com/arifer612/pippel") (:commit . "19153aa8845aa95d080f224d4fcaf2d75224bd5a") (:revdesc . "19153aa8845a") (:authors ("Fritz Stelzer" . "brotzeitmacher@gmail.com")) (:maintainers ("Arif Er" . "arifer612@protonmail.me")) (:maintainer "Arif Er" . "arifer612@protonmail.me"))])
+ (pixelblaze . [(20220918 1925) ((emacs (27 1)) (websocket (1 13))) "Interact with a Pixelblaze via Websocket" tar ((:url . "https://github.com/mgsb/emacs-pixelblaze") (:commit . "564a093f700a3292cbffb3887dd3a8d789f54e6d") (:revdesc . "564a093f700a") (:keywords "games" "pixelblaze" "neopixel" "ws2812" "sk6812") (:authors ("Mark Grosen" . "mark@grosen.org")) (:maintainers ("Mark Grosen" . "mark@grosen.org")) (:maintainer "Mark Grosen" . "mark@grosen.org"))])
+ (pixie-mode . [(20180626 541) ((clojure-mode (3 0 1)) (inf-clojure (1 0 0))) "Major mode for Pixie-lang" tar ((:url . "https://github.com/johnwalker/pixie-mode") (:commit . "a40c2632cfbe948852a5cdcfd44e6a65db11834d") (:revdesc . "a40c2632cfbe") (:authors ("John Walker" . "john.lou.walker@gmail.com")) (:maintainers ("John Walker" . "john.lou.walker@gmail.com")) (:maintainer "John Walker" . "john.lou.walker@gmail.com"))])
+ (pixiv-novel-mode . [(20160220 1421) nil "Major mode for pixiv novel" tar ((:url . "https://github.com/zonuexe/pixiv-novel-mode.el") (:commit . "0d1ca524d92b91f20a7105402a773bc21779b434") (:revdesc . "0d1ca524d92b") (:keywords "novel" "pixiv") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (pkg-info . [(20150517 1143) ((epl (0 8))) "Information about packages" tar ((:url . "https://github.com/lunaryorn/pkg-info.el") (:commit . "4dbe328c9eced79e0004e3fdcd7bfb997a928be5") (:revdesc . "4dbe328c9ece") (:keywords "convenience") (:authors ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainers ("Sebastian Wiesner" . "swiesner@lunaryorn.com")) (:maintainer "Sebastian Wiesner" . "swiesner@lunaryorn.com"))])
+ (pkg-overview . [(20210802 1509) ((emacs (24 3))) "Make org documentation from elisp source file" tar ((:url . "https://github.com/Boruch-Baum/emacs-pkg-overview") (:commit . "9b2e416758a6c107bb8cc670ec4d2627f82d5590") (:revdesc . "9b2e416758a6") (:keywords "docs" "help" "lisp" "maint" "outlines" "tools") (:authors ("Boruch Baum" . "boruch_baum@gmx.com")) (:maintainers ("Boruch Baum" . "boruch_baum@gmx.com")) (:maintainer "Boruch Baum" . "boruch_baum@gmx.com"))])
+ (pkgbuild-mode . [(20250106 2055) ((emacs (26 1))) "Interface to the Arch Linux package manager" tar ((:url . "https://github.com/juergenhoetzel/pkgbuild-mode") (:commit . "aadf3d1d19c5eb9b52c15c5b73b1a46faac5b7d5") (:revdesc . "aadf3d1d19c5") (:keywords "languages") (:authors ("Juergen Hoetzel" . "juergen@hoetzel.info")) (:maintainers ("Juergen Hoetzel" . "juergen@hoetzel.info")) (:maintainer "Juergen Hoetzel" . "juergen@hoetzel.info"))])
+ (pkl-mode . [(20240422 1529) ((emacs (24 3))) "Major mode for editing Pkl files" tar ((:url . "https://github.com/sin-ack/pkl-mode") (:commit . "c57fe374a9c57eee6432d0b449e410ab8dc40a89") (:revdesc . "c57fe374a9c5") (:keywords "languages" "pkl") (:authors ("sin-ack" . "sin-ack@protonmail.com")) (:maintainers ("sin-ack" . "sin-ack@protonmail.com")) (:maintainer "sin-ack" . "sin-ack@protonmail.com"))])
+ (plain-org-wiki . [(20201217 1027) ((emacs (24 3)) (ivy (0 12 0))) "Simple jump-to-org-files in a directory package" tar ((:url . "https://github.com/abo-abo/plain-org-wiki") (:commit . "faeeb54ca808bbf0f4380a938e75805b7a78dbf7") (:revdesc . "faeeb54ca808") (:keywords "convenience") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (plain-theme . [(20171124 410) ((emacs (24))) "Plain theme without syntax highlighting" tar ((:url . "https://github.com/lukateras/plain-theme") (:commit . "2609a811335d58cfb73a65d6307c156fe09037d3") (:revdesc . "2609a811335d"))])
+ (plan9-theme . [(20180804 1441) nil "A color theme for Emacs based on Plan9" tar ((:url . "https://github.com/john2x/plan9-theme.el") (:commit . "4c1050b8ed42e0f99ef64c77ec370a786bd0003c") (:revdesc . "4c1050b8ed42") (:authors ("John Louis Del Rosario" . "john2x@gmail.com")) (:maintainers ("John Louis Del Rosario" . "john2x@gmail.com")) (:maintainer "John Louis Del Rosario" . "john2x@gmail.com"))])
+ (planemo-mode . [(20230227 1139) ((emacs (27 1)) (dash (2 17 0))) "Minor mode for editing Galaxy XML files" tar ((:url . "https://gitlab.com/mtekman/planemo-mode.el") (:commit . "537ebe40688ca8f3786aa1e9842265e6f34584d2") (:revdesc . "537ebe40688c") (:keywords "outlines"))])
+ (planet-theme . [(20161031 217) ((emacs (24))) "A dark theme inspired by Gmail's 'Planets' theme of yore" tar ((:url . "https://github.com/cmack/emacs-planet-theme") (:commit . "b0a310ff36565fe22224c407cf59569986698a32") (:revdesc . "b0a310ff3656") (:keywords "themes") (:authors ("Charlie McMackin" . "charlie.mac@gmail.com")) (:maintainers ("Charlie McMackin" . "charlie.mac@gmail.com")) (:maintainer "Charlie McMackin" . "charlie.mac@gmail.com"))])
+ (plantuml-mode . [(20260514 1745) ((dash (2 0 0)) (emacs (25 1)) (deflate (0 0 3))) "Major mode for PlantUML" tar ((:url . "https://github.com/skuro/plantuml-mode") (:commit . "a4a63efa4a3980bfbd825bfb3a263c6664401e79") (:revdesc . "a4a63efa4a39") (:keywords "files" "text" "processes" "tools"))])
+ (plaster . [(20250821 1444) ((emacs (24 3))) "Pasting to a plaster host with buffers" tar ((:url . "https://shirakumo.org/docs/plaster/") (:commit . "9d77d89aef9ea438e4e0a144256f0ccbe3072a7c") (:revdesc . "9d77d89aef9e") (:keywords "convenience" "paste service") (:authors ("Yukari Hafner" . "shinmera@tymoon.eu")) (:maintainers ("Yukari Hafner" . "shinmera@tymoon.eu")) (:maintainer "Yukari Hafner" . "shinmera@tymoon.eu"))])
+ (platformio-mode . [(20210511 957) ((emacs (25 1)) (async (1 9 0)) (projectile (0 13 0))) "PlatformIO integration" tar ((:url . "https://github.com/zachmassia/platformio-mode") (:commit . "f4fd8932995a8aed80eab14e54232010c2889012") (:revdesc . "f4fd8932995a") (:authors ("Zach Massia" . "zmassia@gmail.com") ("Dante Catalfamo" . "dante@lambda.cx")) (:maintainers ("Zach Massia" . "zmassia@gmail.com") ("Dante Catalfamo" . "dante@lambda.cx")) (:maintainer "Zach Massia" . "zmassia@gmail.com"))])
+ (play-crystal . [(20180114 1024) ((emacs (24 4)) (dash (2 12 0)) (request (0 2 0))) "Https://play.crystal-lang.org integration" tar ((:url . "https://github.com/veelenga/play-crystal.el") (:commit . "86b54346e7c832c14f8e5654a462f6490a6b11d7") (:revdesc . "86b54346e7c8") (:keywords "convenience"))])
+ (play-routes-mode . [(20170426 733) nil "Play Framework Routes File Support" tar ((:url . "https://github.com/brocode/play-routes-mode/") (:commit . "ef8230932f7bb96643febbd6872c522932f9571a") (:revdesc . "ef8230932f7b") (:keywords "play" "scala") (:authors ("M.Riehl" . "max@flatmap.ninja") ("P.Haun" . "bomgar85@googlemail.com")) (:maintainers ("M.Riehl" . "max@flatmap.ninja") ("P.Haun" . "bomgar85@googlemail.com")) (:maintainer "M.Riehl" . "max@flatmap.ninja"))])
+ (playerctl . [(20220714 1234) nil "Control your music player (e.g. Spotify) with playerctl" tar ((:url . "https://github.com/thomasluquet/playerctl.el") (:commit . "0912ed5a5ab6d611b5f35db589f608f1fafdc81a") (:revdesc . "0912ed5a5ab6") (:keywords "multimedia" "playerctl" "music") (:authors ("Thomas Luquet" . "thomas@luquet.net")) (:maintainers ("Thomas Luquet" . "thomas@luquet.net")) (:maintainer "Thomas Luquet" . "thomas@luquet.net"))])
+ (playground . [(20200812 1336) ((emacs (24 4))) "Manage sandboxes for alternative configurations" tar ((:url . "https://github.com/akirak/emacs-playground") (:commit . "77d2faab0bc3f6e1f2c65c66644c52167304610d") (:revdesc . "77d2faab0bc3") (:keywords "maint") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (playonline . [(20200318 758) ((emacs (24 4)) (dash (2 1)) (request (0 2))) "Play code with online playgrounds" tar ((:url . "https://github.com/twlz0ne/playonline.el") (:commit . "463a94fc01112817d1e6e0209ea85385efcb1329") (:revdesc . "463a94fc0111") (:keywords "tools") (:authors ("Gong Qijian" . "gongqijian@gmail.com")) (:maintainers ("Gong Qijian" . "gongqijian@gmail.com")) (:maintainer "Gong Qijian" . "gongqijian@gmail.com"))])
+ (plenv . [(20130707 616) nil "A plenv wrapper for Emacs" tar ((:url . "https://github.com/karupanerura/plenv.el") (:commit . "ee937d0f3a1a7ba2d035f45be896d3ed8fefaee2") (:revdesc . "ee937d0f3a1a") (:keywords "emacs" "perl") (:authors ("Kenta Sato" . "karupa@cpan.org")) (:maintainers ("Kenta Sato" . "karupa@cpan.org")) (:maintainer "Kenta Sato" . "karupa@cpan.org"))])
+ (plim-mode . [(20140813 13) nil "Major mode for editing Plim files" tar ((:url . "https://github.com/dongweiming/plim-mode") (:commit . "98cd6d11b7ff3ee7b6cb8845f143b5a692a3e6e8") (:revdesc . "98cd6d11b7ff") (:keywords "markup" "language"))])
+ (plisp-mode . [(20250328 45) nil "Major mode for PicoLisp programming" tar ((:url . "https://github.com/flexibeast/plisp-mode") (:commit . "062c333343e64427dd70a2739ab9225fd23e550a") (:revdesc . "062c333343e6") (:keywords "picolisp" "lisp" "programming") (:authors ("Alexis Guillermo R. Palavecine" . "grpala@gmail.com") ("Thorsten Jolitz" . "tjolitz@gmail.com") ("Alexis" . "flexibeast@gmail.com")) (:maintainers ("Alexis" . "flexibeast@gmail.com")) (:maintainer "Alexis" . "flexibeast@gmail.com"))])
+ (plsense . [(20151104 1445) ((auto-complete (1 4 0)) (log4e (0 2 0)) (yaxception (0 2 0))) "Provide interface for PlSense that is a development tool for Perl" tar ((:url . "https://github.com/aki2o/emacs-plsense") (:commit . "d50f9dccc98f42bdb42f1d1c8142246e03879218") (:revdesc . "d50f9dccc98f") (:keywords "perl" "completion") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (plsense-direx . [(20140520 2008) ((direx (0 1 -3)) (plsense (0 3 2)) (log4e (0 2 0)) (yaxception (0 3 2))) "Perl Package Explorer" tar ((:url . "https://github.com/aki2o/plsense-direx") (:commit . "8a2f465264c74e04524cc789cdad0190ace43f6c") (:revdesc . "8a2f465264c7") (:keywords "perl" "convenience") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (plumber . [(20250903 2031) ((emacs (25 1)) (compat (28 1 2 2))) "Run different commands depending on the text format" tar ((:url . "https://github.com/8dcc/plumber.el") (:commit . "6fb863d0c0b6b86fc6e488d4d9b1a2a85822c3de") (:revdesc . "6fb863d0c0b6") (:keywords "convenience" "matching" "tools") (:authors ("8dcc" . "8dcc.git@gmail.com")) (:maintainers ("8dcc" . "8dcc.git@gmail.com")) (:maintainer "8dcc" . "8dcc.git@gmail.com"))])
+ (plur . [(20160504 924) ((emacs (24 4))) "Easily search and replace multiple variants of a word" tar ((:url . "https://github.com/xuchunyang/plur") (:commit . "5bdd3b9a2f0624414bd596e798644713cd1545f0") (:revdesc . "5bdd3b9a2f06") (:authors ("Chunyang Xu" . "xuchunyang.me@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang.me@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang.me@gmail.com"))])
+ (pmdm . [(20191101 2346) nil "Poor man's desktop-mode alternative" tar ((:url . "https://hg.serna.eu/emacs/pmdm") (:commit . "6d2af9f9e88e6c91eb74dafaddb5f009e1de4907") (:revdesc . "6d2af9f9e88e") (:authors ("Iñigo Serna" . "inigoserna@gmx.com")) (:maintainers ("Iñigo Serna" . "inigoserna@gmx.com")) (:maintainer "Iñigo Serna" . "inigoserna@gmx.com"))])
+ (pnpm-mode . [(20200527 557) ((emacs (24 1))) "Minor mode for working with pnpm projects" tar ((:url . "https://github.com/rajasegar/pnpm-mode") (:commit . "ec66ba36ba6e07883b029569c33fd461d28eed75") (:revdesc . "ec66ba36ba6e") (:keywords "convenience" "project" "javascript" "node" "npm" "pnpm") (:authors ("Rajasegar Chandran" . "rajasegar.c@gmail.com")) (:maintainers ("Rajasegar Chandran" . "rajasegar.c@gmail.com")) (:maintainer "Rajasegar Chandran" . "rajasegar.c@gmail.com"))])
+ (po-mode . [(20260217 956) ((emacs (23))) "Major mode for GNU gettext PO files" tar ((:commit . "27538dd0938d5a941833d503afc9dba13dcf16fe") (:revdesc . "27538dd0938d") (:keywords "i18n" "gettext"))])
+ (pocket-api . [(20180403 109) ((emacs (24 4)) (request (0 2))) "Another pocket api" tar ((:url . "https://github.com/lujun9972/pocket-api.el") (:commit . "3eb9430b9db90bc02e736e433eb86389f7655189") (:revdesc . "3eb9430b9db9") (:keywords "convenience" "pocket") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (pocket-lib . [(20240713 1529) ((emacs (25 1)) (plz (0 7 3)) (dash (2 13 0)) (kv (0 0 19)) (s (1 12 0))) "Library for accessing getpocket.com API" tar ((:url . "https://github.com/alphapapa/pocket-lib.el") (:commit . "f05f80645d8101518eed13b2da81400fe9b50918") (:revdesc . "f05f80645d81") (:keywords "pocket") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (pocket-mode . [(20171201 1315) ((emacs (24 4)) (pocket-api (0 1))) "Manage your pocket" tar ((:url . "https://github.com/lujun9972/pocket-mode") (:commit . "229de7d35b7e5605797591c46aa8200d7efc363c") (:revdesc . "229de7d35b7e") (:keywords "convenience" "pocket") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (pocket-reader . [(20241225 117) ((emacs (25 1)) (dash (2 13 0)) (kv (0 0 19)) (peg (1 0 1)) (pocket-lib (0 3 -1)) (s (1 10)) (ov (1 0 6)) (org-web-tools (0 1)) (ht (2 2))) "Client for Pocket reading list" tar ((:url . "https://github.com/alphapapa/pocket-reader.el") (:commit . "d507c376f0edaee475466e4ecdcead4d4184e5aa") (:revdesc . "d507c376f0ed") (:keywords "pocket") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (podcaster . [(20200607 1054) ((cl-lib (0 5))) "Podcast client" tar ((:url . "https://github.com/lujun9972/podcaster") (:commit . "7a21173da0c57e6aa41dbdc33383047386b35eb5") (:revdesc . "7a21173da0c5") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (poe-lootfilter-mode . [(20190330 1117) ((emacs (24 3))) "Major mode for editing Path of Exile lootfilters" tar ((:url . "https://github.com/jdodds/poe-lootfilter-mode") (:commit . "5ef06684cb2b17b090ee1f303c2b789fa71bc106") (:revdesc . "5ef06684cb2b") (:keywords "languages" "games") (:authors ("Jeremiah Dodds" . "jeremiah.dodds@gmail.com")) (:maintainers ("Jeremiah Dodds" . "jeremiah.dodds@gmail.com")) (:maintainer "Jeremiah Dodds" . "jeremiah.dodds@gmail.com"))])
+ (poet-theme . [(20200606 2343) ((emacs (24 1))) "A theme for prose" tar ((:url . "https://github.com/kunalb/poet/") (:commit . "16eb694f0755c04c4db98614d0eca1199fddad70") (:revdesc . "16eb694f0755") (:keywords "faces" "theme" "prose") (:authors ("Kunal Bhalla" . "bhalla.kunal@gmail.com")) (:maintainers ("Kunal Bhalla" . "bhalla.kunal@gmail.com")) (:maintainer "Kunal Bhalla" . "bhalla.kunal@gmail.com"))])
+ (poetry . [(20240329 1103) ((transient (0 2 0)) (pyvenv (1 2)) (emacs (25 1))) "Interface to Poetry" tar ((:url . "https://github.com/cybniv/poetry.el") (:commit . "1dff0d4a51ea8aff5f6ce97b154ea799902639ad") (:revdesc . "1dff0d4a51ea") (:keywords "python" "tools") (:authors ("Gaby Launay" . "gaby.launay@protonmail.com")) (:maintainers ("Gaby Launay" . "gaby.launay@protonmail.com")) (:maintainer "Gaby Launay" . "gaby.launay@protonmail.com"))])
+ (point-pos . [(20170421 1632) nil "Save and restore point positions" tar ((:url . "https://github.com/alezost/point-pos.el") (:commit . "4cd0f8c8d1296c5c64f708b6a5835e8520c51b68") (:revdesc . "4cd0f8c8d129") (:keywords "tools" "convenience") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (point-stack . [(20200427 107) nil "Back and forward navigation through buffer locations" tar ((:url . "https://github.com/dgutov/point-stack") (:commit . "cddcea2c91038710c245819b3cda2dd739726134") (:revdesc . "cddcea2c9103") (:authors ("Matt Harrison" . "matthewharrison@gmail.com") ("Dmitry Gutov" . "dgutov@yandex.ru")) (:maintainers ("Matt Harrison" . "matthewharrison@gmail.com") ("Dmitry Gutov" . "dgutov@yandex.ru")) (:maintainer "Matt Harrison" . "matthewharrison@gmail.com"))])
+ (poke-line . [(20201023 247) ((emacs (24 3))) "Minor mode to show position in a buffer using a Pokemon" tar ((:url . "https://github.com/RyanMillerC/poke-line/") (:commit . "8d484dbaa1215d902fbd1e3c9163b39a43ec532a") (:revdesc . "8d484dbaa121") (:keywords "pokemon" "fun" "mode-line" "mouse") (:authors ("Ryan Miller" . "ryan@devopsmachine.com")) (:maintainers ("Ryan Miller" . "ryan@devopsmachine.com")) (:maintainer "Ryan Miller" . "ryan@devopsmachine.com"))])
+ (polish-holidays . [(20250613 2245) ((emacs (24 1))) "Polish holidays" tar ((:url . "https://github.com/przemarbor/polish-holidays") (:commit . "3a1e11f53b0fa41bc511c65ae1699394f49cbb08") (:revdesc . "3a1e11f53b0f") (:keywords "calendar"))])
+ (pollen-mode . [(20220904 447) ((emacs (24 3)) (cl-lib (0 5))) "Major mode for editing pollen files" tar ((:url . "https://github.com/lijunsong/pollen-mode") (:commit . "19174fab69ce4d2ae903ef2c3da44054e8b84268") (:revdesc . "19174fab69ce") (:keywords "languages" "pollen" "pollenpub") (:authors ("Junsong Li" . "ljs.darkfishATGMAIL")))])
+ (poly-R . [(20250502 1525) ((emacs (25)) (ess (25)) (polymode (0 2 2)) (poly-markdown (0 2 2)) (poly-noweb (0 2 2))) "Various polymodes for R language" tar ((:url . "https://github.com/polymode/poly-R") (:commit . "fee0b6e99943fa49ca5ba8ae1a97cbed5ed51946") (:revdesc . "fee0b6e99943") (:keywords "languages" "multi-modes"))])
+ (poly-ansible . [(20250501 1455) ((ansible (0 4 1)) (ansible-doc (0 4)) (emacs (24 1)) (jinja2-mode (0 2)) (polymode (0 2)) (systemd (1 4)) (yaml-mode (0 0 13))) "Polymode for Ansible: Jinja2 in YAML" tar ((:url . "https://gitlab.com/mavit/poly-ansible/") (:commit . "fc31708bff007a40314c1cfd5a5b9659f39b024a") (:revdesc . "fc31708bff00") (:keywords "languages") (:authors ("Peter Oliver" . "poly-ansible@mavit.org.uk")) (:maintainers ("Peter Oliver" . "poly-ansible@mavit.org.uk")) (:maintainer "Peter Oliver" . "poly-ansible@mavit.org.uk"))])
+ (poly-erb . [(20200316 1314) ((emacs (25)) (polymode (0 2 2))) "Polymode for erb" tar ((:url . "https://github.com/polymode/poly-erb") (:commit . "56c744b8d87d8cbe0aba2696d4e8525afc4aa0e8") (:revdesc . "56c744b8d87d") (:keywords "emacs"))])
+ (poly-gams . [(20240812 1540) ((emacs (25)) (polymode (0 2 2)) (gams-mode (6 12))) "Polymode for GAMS" tar ((:url . "https://github.com/ShiroTakeda/poly-gams") (:commit . "e3abb2a195077750c89146900607894ed6239cb4") (:revdesc . "e3abb2a19507") (:keywords "languages" "multi-modes" "gams"))])
+ (poly-markdown . [(20251101 1318) ((emacs (25)) (polymode (0 2 2)) (markdown-mode (2 3))) "Polymode for markdown-mode" tar ((:url . "https://github.com/polymode/poly-markdown") (:commit . "2eb00d1d07a9dd5d94c5c12c27714e095b3b142a") (:revdesc . "2eb00d1d07a9") (:keywords "emacs"))])
+ (poly-noweb . [(20200316 1315) ((emacs (25)) (polymode (0 2 2))) "Polymode for noweb" tar ((:url . "https://github.com/polymode/poly-noweb") (:commit . "3b0cd36ca9a707e8a09337a3468fa85d81fc461c") (:revdesc . "3b0cd36ca9a7") (:keywords "languages" "multi-modes"))])
+ (poly-org . [(20241208 1024) ((emacs (25)) (polymode (0 2 2))) "Polymode for org-mode" tar ((:url . "https://github.com/polymode/poly-org") (:commit . "90d9ca9f440d3b6c03b185353edd37a100559ec4") (:revdesc . "90d9ca9f440d") (:keywords "languages" "multi-modes"))])
+ (poly-rst . [(20210418 1009) ((emacs (25)) (polymode (0 2 2))) "Poly-rst-mode polymode" tar ((:url . "https://github.com/polymode/poly-rst") (:commit . "e71f2ae6a00683cdb8006f953e5db0673043e144") (:revdesc . "e71f2ae6a006") (:keywords "languages" "multi-modes"))])
+ (poly-ruby . [(20180905 929) ((emacs (25)) (polymode (0 1 2))) "Provides poly-ruby-mode" tar ((:url . "https://github.com/knu/poly-ruby.el") (:commit . "794ebb926ace23e9c1398da934701951432dcea2") (:revdesc . "794ebb926ace") (:keywords "languages") (:authors ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (poly-slim . [(20200316 1316) ((emacs (25)) (polymode (0 2 2)) (slim-mode (1 1))) "Polymodes for slim" tar ((:url . "https://github.com/polymode/poly-slim") (:commit . "9e9b5164c68955974fd5f5d220aec5af9b5ba3ae") (:revdesc . "9e9b5164c689") (:keywords "emacs"))])
+ (poly-wdl . [(20190712 529) ((emacs (25)) (polymode (0 2)) (wdl-mode (20170709))) "Polymode for WDL" tar ((:url . "https://github.com/jmonlong/poly-wdl") (:commit . "fe2ee0c441795c35a8c127fa1f7006a5f251f564") (:revdesc . "fe2ee0c44179") (:keywords "languages") (:authors ("Jean Monlong" . "jean.monlong@gmail.com")) (:maintainers ("Jean Monlong" . "jean.monlong@gmail.com")) (:maintainer "Jean Monlong" . "jean.monlong@gmail.com"))])
+ (polybar-sesman . [(20210901 1336) ((emacs (25 1)) (dash (2 19 1)) (sesman (0 3 0))) "Display active sesman connections in polybar" tar ((:url . "https://github.com/markgdawson/polybar-sesman.el") (:commit . "5b8ff640ada92da98400206ba9a61140093a823f") (:revdesc . "5b8ff640ada9") (:keywords "project" "convenience") (:authors ("Mark Dawson" . "markgdawson@gmail.com")) (:maintainers ("Mark Dawson" . "markgdawson@gmail.com")) (:maintainer "Mark Dawson" . "markgdawson@gmail.com"))])
+ (polymode . [(20260505 1803) ((emacs (25))) "Extensible framework for multiple major modes" tar ((:url . "https://github.com/polymode/polymode") (:commit . "8cb72fa5dcc0d98746c680043dc121edc7621e3a") (:revdesc . "8cb72fa5dcc0") (:keywords "languages" "multi-modes" "processes") (:maintainers ("Vitalie Spinu" . "spinuvit@gmail.com")) (:maintainer "Vitalie Spinu" . "spinuvit@gmail.com"))])
+ (pomidor . [(20240601 1617) ((emacs (24 3)) (alert (1 2)) (dash (2 17 0))) "Simple and cool pomodoro timer" tar ((:url . "https://github.com/TatriX/pomidor") (:commit . "de71c34a1a9aff745181107094d3389816dbeca5") (:revdesc . "de71c34a1a9a") (:keywords "tools" "time" "applications" "pomodoro technique") (:authors ("TatriX" . "tatrics@gmail.com")) (:maintainers ("TatriX" . "tatrics@gmail.com")) (:maintainer "TatriX" . "tatrics@gmail.com"))])
+ (pomm . [(20251223 1344) ((emacs (27 1)) (alert (1 2)) (seq (2 22)) (transient (0 3 0))) "Pomodoro and Third Time timers" tar ((:url . "https://github.com/SqrtMinusOne/pomm.el") (:commit . "f198afa7519c365d1d929e7f468caed415df1c43") (:revdesc . "f198afa7519c") (:authors ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainers ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainer "Korytov Pavel" . "thexcloud@gmail.com"))])
+ (pomo-cat . [(20260627 147) ((emacs (27 1)) (popon (0 13)) (posframe (1 1 1))) "Pomodoro timer with cat-themed breaks" tar ((:url . "https://github.com/kn66/pomo-cat.el") (:commit . "499241d5277429e0d9b37f866460e93e6b1c3a02") (:revdesc . "499241d52774") (:keywords "convenience" "tools" "calendar"))])
+ (pomodoro . [(20210225 2018) nil "A timer for the Pomodoro Technique" tar ((:url . "https://github.com/baudtack/pomodoro.el") (:commit . "ed888b24d0b89a5dec6f5278b1064c530c827321") (:revdesc . "ed888b24d0b8") (:authors ("David Kerschner" . "dkerschner@gmail.com")) (:maintainers ("David Kerschner" . "dkerschner@gmail.com")) (:maintainer "David Kerschner" . "dkerschner@gmail.com"))])
+ (pony-mode . [(20170807 1522) nil "Minor mode for working with Django Projects" tar ((:url . "https://github.com/davidmiller/pony-mode") (:commit . "760684d30b6c234d1b88c9a4673a808f36f7f341") (:revdesc . "760684d30b6c") (:keywords "python" "django") (:authors ("David Miller" . "david@deadpansincerity.com")) (:maintainers ("David Miller" . "david@deadpansincerity.com")) (:maintainer "David Miller" . "david@deadpansincerity.com"))])
+ (pony-snippets . [(20200418 354) ((yasnippet (0 8 0))) "Yasnippets for Pony" tar ((:url . "https://github.com/seantallen/pony-snippets") (:commit . "115a0d5066f89554bee9cb1045bcda5a18ebd441") (:revdesc . "115a0d5066f8") (:keywords "snippets" "pony"))])
+ (ponylang-mode . [(20250819 1840) ((emacs (28 1))) "A major mode for the Pony programming language" tar ((:url . "https://github.com/ponylang/ponylang-mode") (:commit . "7e6425f2c12538bfeffce754b32ba75a14c72cbd") (:revdesc . "7e6425f2c125") (:keywords "languages" "programming") (:authors ("Sean T Allen" . "sean@monkeysnatchbanana.com")) (:maintainers ("Sean T Allen" . "sean@monkeysnatchbanana.com")) (:maintainer "Sean T Allen" . "sean@monkeysnatchbanana.com"))])
+ (pophint . [(20250202 713) ((log4e (0 4 0)) (yaxception (1 0 0))) "Provide navigation using pop-up tips, like Firefox's Vimperator Hint Mode" tar ((:url . "https://github.com/aki2o/emacs-pophint") (:commit . "c37195caec62a56af77432a8bd92ac720689b5fe") (:revdesc . "c37195caec62") (:keywords "popup") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (poporg . [(20170403 751) nil "Pop a comment or string to an empty buffer for text editing" tar ((:url . "https://github.com/QBobWatson/poporg") (:commit . "2c58d68c81ecca4140bf179f19ed153ec804b65a") (:revdesc . "2c58d68c81ec") (:keywords "outlines" "tools") (:authors ("François Pinard" . "pinard@iro.umontreal.ca") ("Joseph Rabinoff" . "rabinoff@post.harvard.edu")) (:maintainers ("Joseph Rabinoff" . "rabinoff@post.harvard.edu")) (:maintainer "Joseph Rabinoff" . "rabinoff@post.harvard.edu"))])
+ (popper . [(20260302 22) ((emacs (26 1))) "Summon and dismiss buffers as popups" tar ((:url . "https://github.com/karthink/popper") (:commit . "d83b894ee7a9daf7c8e9b864c23d08f1b23d78f6") (:revdesc . "d83b894ee7a9") (:keywords "convenience") (:authors ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com")) (:maintainers ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com")) (:maintainer "Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com"))])
+ (popterm . [(20260820 2036) ((emacs (29 1)) (posframe (1 4 0))) "Posframe terminal toggler with smart backends" tar ((:url . "https://github.com/CsBigDataHub/popterm.el") (:commit . "90c3ace5f00f6388473c8f02f10b3e450db05803") (:revdesc . "90c3ace5f00f") (:keywords "terminals" "convenience" "tools") (:authors ("Chetan Koneru" . "kchetan.hadoop@gmail.com")) (:maintainers ("Chetan Koneru" . "kchetan.hadoop@gmail.com")) (:maintainer "Chetan Koneru" . "kchetan.hadoop@gmail.com"))])
+ (popup . [(20251231 1622) ((emacs (24 3))) "Visual Popup User Interface" tar ((:url . "https://github.com/auto-complete/popup-el") (:commit . "45a0b759076ce4139aba36dde0a2904136282e73") (:revdesc . "45a0b759076c") (:keywords "lisp") (:authors ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (popup-complete . [(20141109 308) ((popup (0 5 0))) "Completion with popup" tar ((:url . "https://github.com/syohex/emacs-popup-complete") (:commit . "e362d4a005b36646ffbaa6be604e9e31bc406ca9") (:revdesc . "e362d4a005b3") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (popup-edit-menu . [(20170404 1425) ((emacs (24))) "A popup context edit menu package" tar ((:url . "https://github.com/debugfan/popup-edit-menu") (:commit . "925600a6e29183841199e866cf55e566a6a1b002") (:revdesc . "925600a6e291") (:keywords "lisp" "pop-up" "context" "edit" "menu") (:authors ("Debugfan Chin" . "debugfanchin@gmail.com")) (:maintainers ("Debugfan Chin" . "debugfanchin@gmail.com")) (:maintainer "Debugfan Chin" . "debugfanchin@gmail.com"))])
+ (popup-imenu . [(20210404 1153) ((dash (2 12 1)) (popup (0 5 3)) (flx-ido (0 6 1))) "Imenu index popup" tar ((:url . "https://github.com/ancane/popup-imenu") (:commit . "b00c4d503cbbaf01c136b1647329e6a6257d012c") (:revdesc . "b00c4d503cbb") (:keywords "popup" "imenu") (:authors ("Igor Shymko" . "igor.shimko@gmail.com")) (:maintainers ("Igor Shymko" . "igor.shimko@gmail.com")) (:maintainer "Igor Shymko" . "igor.shimko@gmail.com"))])
+ (popup-kill-ring . [(20251130 2000) ((emacs (25 1)) (pos-tip (0 4 6)) (popup (0 5 9))) "Interactively insert items from the kill-ring" tar ((:url . "https://github.com/doomchild/popup-kill-ring") (:commit . "4558409b105ae5f6089081c238139f53cc3ae84f") (:revdesc . "4558409b105a") (:keywords "convenience" "popup" "kill-ring" "pos-tip") (:authors ("HAMANO Kiyoto" . "khiker.mail+elisp@gmail.com")) (:maintainers ("Lee Crabtree" . "lee.crabtree@gmail.com")) (:maintainer "Lee Crabtree" . "lee.crabtree@gmail.com"))])
+ (popup-switcher . [(20201216 2229) ((cl-lib (0 3)) (popup (0 5 3))) "Switch to other buffers and files via popup" tar ((:url . "https://github.com/kostafey/popup-switcher") (:commit . "166a90c13310b829bd392235bf7cc1e45188faff") (:revdesc . "166a90c13310") (:keywords "popup" "switch" "buffers" "functions") (:authors ("Kostafey" . "kostafey@gmail.com")) (:maintainers ("Kostafey" . "kostafey@gmail.com")) (:maintainer "Kostafey" . "kostafey@gmail.com"))])
+ (popwin . [(20260103 1800) ((emacs (24 3))) "Popup Window Manager" tar ((:url . "https://github.com/emacsorphanage/popwin") (:commit . "f7a39759180fa88f3890c3c5f35379ab086e04fa") (:revdesc . "f7a39759180f") (:keywords "convenience") (:authors ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (porg . [(20251230 410) ((emacs (26 1))) "Bring org-mode features to any prog mode" tar ((:url . "https://github.com/laluxx/porg") (:commit . "557fecde1f02fa7ffb13b0dc5da3432171946086") (:revdesc . "557fecde1f02") (:keywords "folding" "convenience" "org-mode"))])
+ (portage-modes . [(20250207 1057) nil "Major modes for editing Portage config files" tar ((:url . "https://github.com/OpenSauce04/portage-modes") (:commit . "10ac263d717ec771e79fdfc1309ea822ec4ba501") (:revdesc . "10ac263d717e") (:authors ("OpenSauce" . "opensauce04@gmail.com")) (:maintainers ("OpenSauce" . "opensauce04@gmail.com")) (:maintainer "OpenSauce" . "opensauce04@gmail.com"))])
+ (portage-navi . [(20141208 1355) ((concurrent (0 3 1)) (ctable (0 1 2))) "Portage viewer" tar ((:url . "https://github.com/kiwanami/emacs-portage-navi") (:commit . "8016c3e99fe6cef101d479a3d69185796b22ca2f") (:revdesc . "8016c3e99fe6") (:keywords "tools" "gentoo") (:authors (nil . "m.sakuraiatkiwanami.net")) (:maintainers (nil . "m.sakuraiatkiwanami.net")) (:maintainer nil . "m.sakuraiatkiwanami.net"))])
+ (porthole . [(20200404 1454) ((emacs (26)) (web-server (0 1 2)) (f (0 19 0)) (json-rpc-server (0 1 2))) "RPC Servers in Emacs" tar ((:url . "https://github.com/jcaw/porthole") (:commit . "9e68b419acf9245208f8094e10041b7f04511473") (:revdesc . "9e68b419acf9") (:keywords "comm" "rpc" "http" "json"))])
+ (pos-tip . [(20240209 837) nil "Show tooltip at point" tar ((:url . "https://github.com/pitkali/pos-tip") (:commit . "4889e08cf9077c8589ea6fea4e2ce558614dfcde") (:revdesc . "4889e08cf907") (:keywords "tooltip"))])
+ (posframe . [(20260816 2356) ((emacs (26 1))) "Pop a posframe (just a frame) at point" tar ((:url . "https://github.com/tumashu/posframe") (:commit . "ec0ec37c0d6397422a07def499e87591ca037af7") (:revdesc . "ec0ec37c0d63") (:keywords "convenience" "tooltip") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (posix-manual . [(20231215 1604) ((emacs (24))) "POSIX manual page lookup" tar ((:url . "https://github.com/lassik/emacs-posix-manual") (:commit . "428b10d011082a57db0ce310fad6cd092267e139") (:revdesc . "428b10d01108") (:keywords "languages" "util") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (postcss-sorting . [(20180211 956) ((emacs (24))) "Postcss-sorting interface" tar ((:url . "https://github.com/P233/postcss-sorting.el") (:commit . "deb0c935d2904c11a965758a9aee5a0e905f21fc") (:revdesc . "deb0c935d290") (:authors ("Peiwen Lu" . "hi@peiwen.lu")) (:maintainers ("Peiwen Lu" . "hi@peiwen.lu")) (:maintainer "Peiwen Lu" . "hi@peiwen.lu"))])
+ (pov-mode . [(20161115 743) nil "Major mode for editing POV-Ray scene files" tar ((:url . "https://github.com/melmothx/pov-mode") (:commit . "9fc1db3aab7c27155674dd1a87ec62606035d074") (:revdesc . "9fc1db3aab7c") (:keywords "pov" "povray") (:authors ("Peter Boettcher" . "pwb@andrew.cmu.edu")) (:maintainers ("Marco Pessotto" . "melmothx@gmail.com")) (:maintainer "Marco Pessotto" . "melmothx@gmail.com"))])
+ (power-mode . [(20220817 429) ((emacs (26 1))) "Imbue Emacs with power!" tar ((:url . "https://github.com/elizagamedev/power-mode.el") (:commit . "313698d9c7766c17b077a70b31a2d0f52496d767") (:revdesc . "313698d9c776") (:keywords "games"))])
+ (powerline . [(20221110 1956) ((cl-lib (0 2))) "Rewrite of Powerline" tar ((:url . "https://github.com/milkypostman/powerline/") (:commit . "c35c35bdf5ce2d992882c1f06f0f078058870d4a") (:revdesc . "c35c35bdf5ce") (:keywords "mode-line") (:authors ("Donald Ephraim Curtis" . "dcurtis@milkbox.net")) (:maintainers ("Donald Ephraim Curtis" . "dcurtis@milkbox.net")) (:maintainer "Donald Ephraim Curtis" . "dcurtis@milkbox.net"))])
+ (powershell . [(20251122 1430) ((emacs (24 5))) "Mode for editing PowerShell scripts" tar ((:url . "https://github.com/jschaf/powershell.el") (:commit . "ae60e11c96cc1767f05ce0cab6a917240ce2e37a") (:revdesc . "ae60e11c96cc") (:keywords "powershell" "languages") (:authors ("Frédéric Perrin" . "fredericperrinreselfr")) (:maintainers ("Juergen Hoetzel" . "juergen@hoetzel.info")) (:maintainer "Juergen Hoetzel" . "juergen@hoetzel.info"))])
+ (powerthesaurus . [(20230426 1719) ((emacs (26 1)) (jeison (1 0 0)) (s (1 13 0))) "Powerthesaurus integration" tar ((:url . "https://github.com/SavchenkoValeriy/emacs-powerthesaurus") (:commit . "4b97797cf789aaba411c61a85fe23474ebc5bedc") (:revdesc . "4b97797cf789") (:keywords "convenience" "writing") (:authors ("Valeriy Savchenko" . "sinmipt@gmail.com")) (:maintainers ("Valeriy Savchenko" . "sinmipt@gmail.com")) (:maintainer "Valeriy Savchenko" . "sinmipt@gmail.com"))])
+ (ppcompile . [(20220619 1535) ((emacs (25 1))) "Ping-pong compile projects on remote machines" tar ((:url . "https://github.com/whatacold/ppcompile") (:commit . "4c287c9ebc0e78dbbe75195bb5eb3fe82e0bfaff") (:revdesc . "4c287c9ebc0e") (:keywords "tools") (:authors ("Guangwang Huang" . "whatacold@gmail.com")))])
+ (ppd-sr-speedbar . [(20151108 1224) ((sr-speedbar (20140914 2339)) (project-persist-drawer (0 0 4))) "Sr Speedbar adaptor for project-persist-drawer" tar ((:url . "https://github.com/rdallasgrayppd-sr-speedbar") (:commit . "19d3e924407f40a6bb38c8fe427a159af755adce") (:revdesc . "19d3e924407f") (:keywords "projects" "drawer"))])
+ (ppp . [(20220211 1529) ((emacs (25 1))) "Extended pretty printer for Emacs Lisp" tar ((:url . "https://github.com/conao3/ppp.el") (:commit . "d5d854c3006dfd268e62c7f91c2aad6f86a505b5") (:revdesc . "d5d854c3006d") (:keywords "tools") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (pr-review . [(20260509 1433) ((emacs (27 1)) (magit-section (4 0)) (magit (4 0)) (markdown-mode (2 5)) (ghub (5 0))) "Review github PR" tar ((:url . "https://github.com/blahgeek/emacs-pr-review") (:commit . "938db766007f3444a2899b2457d9e2f4b4ffbebf") (:revdesc . "938db766007f") (:keywords "tools") (:authors ("Yikai Zhao" . "yikai@z1k.dev")) (:maintainers ("Yikai Zhao" . "yikai@z1k.dev")) (:maintainer "Yikai Zhao" . "yikai@z1k.dev"))])
+ (prassee-theme . [(20180709 1004) ((emacs (24))) "A high contrast color theme for Emacs" tar ((:url . "https://github.com/prassee/prassee-emacs-theme") (:commit . "81126f69cdbaab836c00ae7a49aaf89d4229fde1") (:revdesc . "81126f69cdba") (:keywords "dark" "high-contrast" "faces") (:authors ("Prassee" . "prassee.sathian@gmail.com")) (:maintainers ("Prassee" . "prassee.sathian@gmail.com")) (:maintainer "Prassee" . "prassee.sathian@gmail.com"))])
+ (prefab . [(20240720 1858) ((emacs (27 1)) (f (0 2 0)) (transient (0 3 7))) "Integration for project generation tools like cookiecutter" tar ((:url . "https://github.com/laurencewarne/prefab.el") (:commit . "51da6c214f095a44f3d2223bcf079a3073923115") (:revdesc . "51da6c214f09"))])
+ (preproc-font-lock . [(20250103 1541) nil "Highlight C preprocessor directives" tar ((:url . "https://github.com/Lindydancer/preproc-font-lock") (:commit . "b16b59afcdc53614e6c3c272d1eaea592a832f65") (:revdesc . "b16b59afcdc5") (:keywords "c" "languages" "faces"))])
+ (prescient . [(20260628 2243) ((emacs (25 1))) "Better sorting and filtering" tar ((:url . "https://github.com/raxod502/prescient.el") (:commit . "5649977fa7789e4615efeca09397ed7eccd06dfc") (:revdesc . "5649977fa778") (:keywords "extensions") (:authors ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainers ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainer "Radian LLC" . "contact+prescient@radian.codes"))])
+ (preseed-generic-mode . [(20180210 500) nil "Debian preseed file major mode" tar ((:url . "https://github.com/suntong/preseed-generic-mode") (:commit . "3aa8806c4a659064baa01751400c53fbaf847f66") (:revdesc . "3aa8806c4a65") (:authors ("Tong Sun" . "suntong@users.sourceforge.net")) (:maintainers ("Tong Sun" . "suntong@users.sourceforge.net")) (:maintainer "Tong Sun" . "suntong@users.sourceforge.net"))])
+ (presentation . [(20260131 2112) ((emacs (24 4)) (compat (30))) "Scale text globally and adjust UI for presentations" tar ((:url . "https://github.com/zonuexe/emacs-presentation-mode") (:commit . "5393ea474d76a9d529d27fb1d6185c015e34368c") (:revdesc . "5393ea474d76") (:keywords "environment" "faces" "frames") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (pretend-type . [(20251019 2122) ((emacs (24 3))) "Reveal buffer as you pretend to type" tar ((:url . "https://github.com/haji-ali/pretend-type") (:commit . "1396a0c28986af260a462525ff20a1269cb64eb2") (:revdesc . "1396a0c28986") (:keywords "hide" "show" "invisible" "learning" "games") (:authors ("Al Haji-Ali" . "abdo.haji.ali@gmail.com")) (:maintainers ("Al Haji-Ali" . "abdo.haji.ali@gmail.com")) (:maintainer "Al Haji-Ali" . "abdo.haji.ali@gmail.com"))])
+ (prettier . [(20240902 1516) ((emacs (26 1)) (iter2 (0 9)) (nvm (0 2)) (editorconfig (0 9))) "Code formatting with Prettier" tar ((:url . "https://github.com/jscheid/prettier.el") (:commit . "9e202f129835317d70aea405e536a9f4228680c5") (:revdesc . "9e202f129835") (:keywords "convenience" "languages" "files") (:authors ("Julian Scheid" . "julians37@gmail.com")) (:maintainers ("Julian Scheid" . "julians37@gmail.com")) (:maintainer "Julian Scheid" . "julians37@gmail.com"))])
+ (prettier-js . [(20250705 322) ((emacs (28 1))) "Minor mode to format code on file save" tar ((:url . "https://github.com/prettier/prettier-emacs") (:commit . "1ce7a310b000200e333f0015b87d910672ebdb7e") (:revdesc . "1ce7a310b000") (:keywords "convenience" "wp" "edit" "js"))])
+ (prettier-rc . [(20220330 145) ((emacs (24 3)) (prettier-js (0 1 0))) "Use local rc rules with prettier" tar ((:url . "https://github.com/jjuliano/prettier-rc-emacs") (:commit . "99e40a9783299e41911f6b37156626d53e43809e") (:revdesc . "99e40a978329") (:keywords "convenience" "edit" "js" "ts" "rc" "prettierrc" "prettier-rc" "prettier" "prettier-js") (:authors ("Joel Bryan Juliano" . "joelbryandotjulianoatgmaildotcom")) (:maintainers ("Joel Bryan Juliano" . "joelbryandotjulianoatgmaildotcom")) (:maintainer "Joel Bryan Juliano" . "joelbryandotjulianoatgmaildotcom"))])
+ (prettify-greek . [(20160603 908) nil "Greek letters for prettify-symbols" tar ((:url . "https://gitlab.com/fommil/emacs-prettify-greek") (:commit . "698d07a6ffe85f6fb53f3bfec4f49380c25cfd90") (:revdesc . "698d07a6ffe8") (:keywords "faces"))])
+ (prettify-math . [(20231215 204) ((emacs (27 1)) (dash (2 19 0)) (s (1 12 0)) (jsonrpc (1 0 9))) "Prettify math formula" tar ((:url . "https://github.com/shaqxu/prettify-math") (:commit . "3e659cc446379fb78926db33ac74d296c818b22a") (:revdesc . "3e659cc44637") (:keywords "math" "asciimath" "tex" "latex" "prettify" "mathjax") (:authors ("Shaq Tsui" . "shaqtsui@outlook.com")) (:maintainers ("Shaq Tsui" . "shaqtsui@outlook.com")) (:maintainer "Shaq Tsui" . "shaqtsui@outlook.com"))])
+ (pretty-hydra . [(20250310 2303) ((hydra (0 15 0)) (s (1 12 0)) (dash (2 18 0)) (emacs (24)) (compat (29 1 4 1))) "A macro for creating nice-looking hydras" tar ((:url . "https://github.com/jerrypnz/major-mode-hydra.el") (:commit . "2494d71e24b61c1f5ef2dc17885e2f65bf98b3b2") (:revdesc . "2494d71e24b6") (:authors ("Jerry Peng" . "pr2jerry@gmail.com")) (:maintainers ("Jerry Peng" . "pr2jerry@gmail.com")) (:maintainer "Jerry Peng" . "pr2jerry@gmail.com"))])
+ (pretty-mode . [(20190615 2045) nil "Redisplay parts of the buffer as pretty Unicode symbols" tar ((:url . "https://github.com/akatov/pretty-mode") (:commit . "5154355e90fdd70d3647257280a89eeb725ef084") (:revdesc . "5154355e90fd") (:keywords "pretty" "unicode" "symbols") (:authors ("Arthur Danskin" . "arthurdanskin@gmail.com")) (:maintainers ("Grant Rettke" . "grant@wisdomandwonder.com")) (:maintainer "Grant Rettke" . "grant@wisdomandwonder.com"))])
+ (pretty-sha-path . [(20141105 1826) nil "Prettify Guix/Nix store paths" tar ((:url . "https://gitorious.org/alezost-emacs/pretty-sha-path") (:commit . "beea38bdf34ed27059d6484e1e2a337a27e1f7ce") (:revdesc . "beea38bdf34e") (:keywords "faces" "convenience") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Alex Kost" . "alezost@gmail.com")) (:maintainer "Alex Kost" . "alezost@gmail.com"))])
+ (pretty-speedbar . [(20220303 1726) ((emacs (27 1))) "Make speedbar pretty" tar ((:url . "https://github.com/kcyarn/pretty-speedbar") (:commit . "56dc9f114fcc55843e182cde1fc9d7a14c261c6a") (:revdesc . "56dc9f114fcc") (:keywords "file" "tags" "tools") (:authors ("Kristle Chester" . "kcyarn7@gmail.com")) (:maintainers ("Kristle Chester" . "kcyarn7@gmail.com")) (:maintainer "Kristle Chester" . "kcyarn7@gmail.com"))])
+ (pretty-symbols . [(20140814 959) nil "Draw tokens as Unicode glyphs" tar ((:url . "https://github.com/drothlis/pretty-symbols") (:commit . "ab82b3fba129fae14e4031eb7fd648c1a92d0e71") (:revdesc . "ab82b3fba129") (:keywords "faces") (:authors ("David Röthlisberger" . "david@rothlis.net")) (:maintainers ("David Röthlisberger" . "david@rothlis.net")) (:maintainer "David Röthlisberger" . "david@rothlis.net"))])
+ (preview-dvisvgm . [(20211225 635) ((emacs (27 1)) (auctex (13 0 12))) "SVG output for LaTeX preview" tar ((:url . "https://github.com/TobiasZawada/preview-dvisvgm") (:commit . "630e2f008c4a6c67a01824b7ad6b844977b28f87") (:revdesc . "630e2f008c4a") (:keywords "tex") (:authors ("Tobias Zawada" . "i@tn-home.de")) (:maintainers ("Tobias Zawada" . "i@tn-home.de")) (:maintainer "Tobias Zawada" . "i@tn-home.de"))])
+ (prism . [(20241024 40) ((emacs (27 1)) (compat (29 1 4 5)) (dash (2 14 1))) "Customizable, depth-based syntax coloring" tar ((:url . "https://github.com/alphapapa/prism.el") (:commit . "2fa8eb5a9ca62a548d33befef4517e5d0266eb28") (:revdesc . "2fa8eb5a9ca6") (:keywords "faces" "lisp") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (prisma-ts-mode . [(20251024 1356) ((emacs (29 1))) "Major mode for prisma using tree-sitter" tar ((:url . "https://github.com/nverno/prisma-ts-mode") (:commit . "c63117764dc9e177aea7ddbef23c47feba1523d8") (:revdesc . "c63117764dc9") (:keywords "prisma" "languages" "tree-sitter") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (private . [(20150122 157) ((aes (0 6))) "Take care of your private configuration files" tar ((:url . "https://github.com/cheunghy/private") (:commit . "f57f1c2f6bfe900bd40b252688df4c6ed6a5f44b") (:revdesc . "f57f1c2f6bfe") (:keywords "private" "configuration" "backup" "recover") (:authors ("Cheung Mou Wai" . "yeannylam@gmail.com")) (:maintainers ("Cheung Mou Wai" . "yeannylam@gmail.com")) (:maintainer "Cheung Mou Wai" . "yeannylam@gmail.com"))])
+ (private-comments-mode . [(20240926 1557) ((emacs (27 1))) "Minor mode for masukomi/private_comments" tar ((:url . "https://github.com/masukomi/private-comments-mode") (:commit . "616d63eccc5a21f1785801baf0fa3667ddfeb80f") (:revdesc . "616d63eccc5a") (:keywords "tools") (:authors ("Richard Chiang" . "richard@commandlinesystems.com") ("Kay Rhodes" . "masukomi@masukomi.org")) (:maintainers ("Richard Chiang" . "richard@commandlinesystems.com") ("Kay Rhodes" . "masukomi@masukomi.org")) (:maintainer "Richard Chiang" . "richard@commandlinesystems.com"))])
+ (private-diary . [(20151216 1657) ((emacs (24 0))) "Maintain a private diary in Emacs" tar ((:url . "https://github.com/cacology/private-diary") (:commit . "5b1aeb22f22447fd35e1c107b6db44a7b27b8a42") (:revdesc . "5b1aeb22f224") (:keywords "diary" "encryption") (:authors ("James P. Ascher" . "jpa4q@virginia.edu")) (:maintainers ("James P. Ascher" . "jpa4q@virginia.edu")) (:maintainer "James P. Ascher" . "jpa4q@virginia.edu"))])
+ (proc-net . [(20130322 12) nil "Network process tools" tar ((:url . "https://github.com/nicferrier/emacs-procnet") (:commit . "00bfc92a381787ec387974ed17070118ced6d9ad") (:revdesc . "00bfc92a3817") (:keywords "processes") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (proced-narrow . [(20190911 1818) ((seq (2 20)) (emacs (24))) "Live-narrowing of search results for proced" tar ((:url . "https://github.com/travisjeffery/proced-narrow") (:commit . "0e2a4dfb072eb0369d0020b429e820ae620d325e") (:revdesc . "0e2a4dfb072e") (:keywords "processes" "proced") (:authors ("Travis Jeffery" . "tj@travisjeffery.com")) (:maintainers ("Travis Jeffery" . "tj@travisjeffery.com")) (:maintainer "Travis Jeffery" . "tj@travisjeffery.com"))])
+ (processing-mode . [(20171022 2302) nil "Major mode for Processing 2.0" tar ((:url . "https://github.com/ptrv/processing2-emacs") (:commit . "448aba82970c98322629eaf2746e73be6c30c98e") (:revdesc . "448aba82970c") (:keywords "languages" "snippets") (:authors ("Peter Vasil" . "mail@petervasil.net")) (:maintainers ("Peter Vasil" . "mail@petervasil.net")) (:maintainer "Peter Vasil" . "mail@petervasil.net"))])
+ (processing-snippets . [(20140426 1428) ((yasnippet (0 8 0))) "Snippets for processing-mode" tar ((:url . "https://github.com/ptrv/processing2-emacs") (:commit . "6175b8eef76369c4b1b8608b8df9a37f14b1be5c") (:revdesc . "6175b8eef763") (:keywords "snippets") (:authors ("Peter Vasil" . "mail@petervasil.net")) (:maintainers ("Peter Vasil" . "mail@petervasil.net")) (:maintainer "Peter Vasil" . "mail@petervasil.net"))])
+ (procress . [(20260730 1707) ((emacs (27 1)) (auctex (13 0))) "Process progress" tar ((:url . "https://github.com/haji-ali/procress.git") (:commit . "8e0e3b4c3fad211b028e9daff8dae73693c02272") (:revdesc . "8e0e3b4c3fad") (:keywords "compile" "progress" "tex" "svg") (:authors ("Al Haji-Ali" . "abdo.haji.ali@gmail.com")) (:maintainers ("Al Haji-Ali" . "abdo.haji.ali@gmail.com")) (:maintainer "Al Haji-Ali" . "abdo.haji.ali@gmail.com"))])
+ (prodigy . [(20250401 1948) ((s (1 8 0)) (dash (2 4 0)) (f (0 14 0)) (emacs (27 1))) "Manage external services" tar ((:url . "https://github.com/rejeep/prodigy.el") (:commit . "7bd89fdd544209afb28d6abe828728ad62257617") (:revdesc . "7bd89fdd5442") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (professional-theme . [(20150315 1100) nil "Emacs port of Vim's professional theme" tar ((:url . "https://github.com/juanjux/emacs-professional-theme") (:commit . "0927d1474049a193f9f366bde5eb1887b9ba20ed") (:revdesc . "0927d1474049") (:keywords "theme" "light" "professional") (:authors ("Juanjo Alvarez" . "juanjo@juanjoalvarez.net")) (:maintainers ("Juanjo Alvarez" . "juanjo@juanjoalvarez.net")) (:maintainer "Juanjo Alvarez" . "juanjo@juanjoalvarez.net"))])
+ (prog-face-refine . [(20260726 541) ((emacs (28 0))) "Refine faces for programming modes" tar ((:url . "https://codeberg.org/ideasman42/emacs-prog-face-refine") (:commit . "55a142ab1698f5457567666a56cc96ee6bdc4d74") (:revdesc . "55a142ab1698") (:keywords "faces" "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (prog-fill . [(20180607 132) ((emacs (25 1)) (cl-lib (0 6 1))) "Smartly format lines to use vertical space" tar ((:url . "https://github.com/ahungry/prog-fill") (:commit . "3fbf7da6dd826e95c9077d659566ee29814a31d8") (:revdesc . "3fbf7da6dd82") (:keywords "ahungry" "convenience" "c" "formatting" "editing") (:authors ("Matthew Carter" . "m@ahungry.com")) (:maintainers ("Matthew Carter" . "m@ahungry.com")) (:maintainer "Matthew Carter" . "m@ahungry.com"))])
+ (prognth . [(20130920 1759) nil "Extend prog1 to arbitrary index" tar ((:url . "https://github.com/Fuco1/prognth") (:commit . "2f1ca4d34b1fd581163e1df122c85418137e8e62") (:revdesc . "2f1ca4d34b1f") (:keywords "lisp") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (programmer-dvorak . [(20150427 137) nil "Input method for Programmer Dvorak" tar ((:url . "https://github.com/yangchenyun/programmer-dvorak") (:commit . "c35d5e3b8b53c1e9341957b5d5db40387ba0c8ee") (:revdesc . "c35d5e3b8b53") (:keywords "dvorak" "programmer-dvorak" "input-method") (:authors ("Chenyun Yang" . "yangchenyun@gmail.com")) (:maintainers ("Chenyun Yang" . "yangchenyun@gmail.com")) (:maintainer "Chenyun Yang" . "yangchenyun@gmail.com"))])
+ (project-abbrev . [(20260101 602) ((emacs (25 1))) "Customize abbreviation expansion in the project" tar ((:url . "https://github.com/jcs-elpa/project-abbrev") (:commit . "25ae8a4ea43221955ae3d038dccbda90c43840ae") (:revdesc . "25ae8a4ea432") (:keywords "abbrev" "abbreviation" "customizable" "shortcut") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (project-butler . [(20260412 1017) ((emacs (28 1))) "Lay out a project's buffers" tar ((:url . "https://codeberg.org/jabbo/project-butler") (:commit . "87e5c035a4602fa4400a44a3dd413dfbf5e5c2e4") (:revdesc . "87e5c035a460") (:keywords "convenience" "projects") (:authors ("Stefan Thesing" . "software@webdings.de")) (:maintainers ("Stefan Thesing" . "software@webdings.de")) (:maintainer "Stefan Thesing" . "software@webdings.de"))])
+ (project-cmake . [(20260728 1936) ((emacs (30 1))) "A cmake backend for project.el" tar ((:url . "https://github.com/lucius-martius/project-cmake") (:commit . "9b0d785220e6e2368f6c02fe336911dc18703faa") (:revdesc . "9b0d785220e6") (:keywords "tools" "convenience") (:authors ("Lucius Martius" . "lucius.martius@mailbox.org")) (:maintainers ("Lucius Martius" . "lucius.martius@mailbox.org")) (:maintainer "Lucius Martius" . "lucius.martius@mailbox.org"))])
+ (project-explorer . [(20150504 14) ((cl-lib (0 3)) (es-lib (0 3)) (es-windows (0 1)) (emacs (24))) "A project explorer sidebar" tar ((:url . "https://github.com/sabof/project-explorer") (:commit . "589a09008706f5f4ef91393dc4306eede0d15ca9") (:revdesc . "589a09008706"))])
+ (project-mode-line-tag . [(20231215 807) ((emacs (25 1))) "Display a buffer's project in its mode line" tar ((:url . "https://github.com/fritzgrabo/project-mode-line-tag") (:commit . "c63f254e006ddf6ad12c7dc15eed0484d57a8cb5") (:revdesc . "c63f254e006d") (:keywords "convenience") (:authors ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainers ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainer "Fritz Grabo" . "hello@fritzgrabo.com"))])
+ (project-persist . [(20180906 1302) nil "A minor mode to allow loading and saving of project settings" tar ((:url . "https://github.com/rdallasgray/project-persist") (:commit . "26d9435bef44da2a1b0892eba822f9f487b98eec") (:revdesc . "26d9435bef44") (:keywords "project" "persistence"))])
+ (project-persist-drawer . [(20151108 1222) ((project-persist (0 3))) "Use a project drawer with project-persist" tar ((:url . "https://github.com/rdallasgray/project-persist-drawer.git") (:commit . "35bbe132a4fab6a0fec15ce6c0fd2fe6a4aa9626") (:revdesc . "35bbe132a4fa") (:keywords "defaults") (:authors ("Robert Dallas Gray" . "mail@robertdallasgray.com")) (:maintainers ("Robert Dallas Gray" . "mail@robertdallasgray.com")) (:maintainer "Robert Dallas Gray" . "mail@robertdallasgray.com"))])
+ (project-rails . [(20260425 1314) ((emacs (28 1)) (inflections (2 6))) "Rails support for project.el" tar ((:url . "https://github.com/harrybournis/project.el-rails") (:commit . "2c72764790f9f6f283f713bb72a9f4952ced690d") (:revdesc . "2c72764790f9") (:keywords "languages" "project.el" "rails") (:authors ("Harry Bournis" . "harrybournis@gmail.com")) (:maintainers ("Harry Bournis" . "harrybournis@gmail.com")) (:maintainer "Harry Bournis" . "harrybournis@gmail.com"))])
+ (project-rootfile . [(20251111 720) ((emacs (27 1))) "Extension of project.el to detect project with root file" tar ((:url . "https://github.com/buzztaiki/project-rootfile.el") (:commit . "6c674446350ac3e54536c5520dd3f622463c6f4a") (:revdesc . "6c674446350a") (:authors ("Taiki Sugawara" . "buzz.taiki@gmail.com")) (:maintainers ("Taiki Sugawara" . "buzz.taiki@gmail.com")) (:maintainer "Taiki Sugawara" . "buzz.taiki@gmail.com"))])
+ (project-shells . [(20231005 641) ((emacs (24 3)) (seq (2 19))) "Manage the shell buffers of each project" tar ((:url . "https://github.com/hying-caritas/project-shells") (:commit . "15f70d99b6d5f078f490ceb64b6f13c000b37e24") (:revdesc . "15f70d99b6d5") (:keywords "processes" "terminals") (:authors ("Huang, Ying" . "huang.ying.caritas@gmail.com")) (:maintainers ("Huang, Ying" . "huang.ying.caritas@gmail.com")) (:maintainer "Huang, Ying" . "huang.ying.caritas@gmail.com"))])
+ (project-tab-groups . [(20231215 755) ((emacs (28 1))) "Support a \"one tab group per project\" workflow" tar ((:url . "https://github.com/fritzgrabo/project-tab-groups") (:commit . "2658405d5f3c539fbd9ccf95297a016a2c91816a") (:revdesc . "2658405d5f3c") (:keywords "convenience") (:authors ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainers ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainer "Fritz Grabo" . "hello@fritzgrabo.com"))])
+ (project-tasks . [(20260520 133) ((emacs (26 1)) (project (0 6 0))) "Efficient task management for your project" tar ((:url . "https://github.com/TxGVNN/project-tasks") (:commit . "a8736133dc3ee77b6002098592853ac56e5a5b40") (:revdesc . "a8736133dc3e") (:keywords "project" "workflow" "tools") (:authors ("Giap Tran" . "txgvnn@gmail.com")) (:maintainers ("Giap Tran" . "txgvnn@gmail.com")) (:maintainer "Giap Tran" . "txgvnn@gmail.com"))])
+ (project-treemacs . [(20230529 1207) ((emacs (28 1)) (treemacs (3 1))) "Simple treemacs backend for project.el" tar ((:url . "https://github.com/cmccloud/project-treemacs") (:commit . "36bec1109ba0498c2d1ef29756c841d2e23b063e") (:revdesc . "36bec1109ba0"))])
+ (project-x . [(20260802 2355) ((emacs (28 1))) "Extra convenience features for project.el" tar ((:url . "https://github.com/vmargb/project-x") (:commit . "6f95c7e722db3e1c9fcee43e00873883630b5eed") (:revdesc . "6f95c7e722db") (:keywords "project" "convenience" "session" "tools") (:authors ("Karthik Chikmagalur" . "karthik.chikmagalur@gmail.com")) (:maintainers ("vmargb" . "https://github.com/vmargb")) (:maintainer "vmargb" . "https://github.com/vmargb"))])
+ (projectile . [(20260825 455) ((emacs (28 1)) (compat (30))) "Manage and navigate projects in Emacs easily" tar ((:url . "https://github.com/bbatsov/projectile") (:commit . "5abaa50c48ee661181cf96a1a7c1131f2d619b51") (:revdesc . "5abaa50c48ee") (:keywords "project" "convenience") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (projectile-codesearch . [(20180508 1522) ((codesearch (20171122 431)) (projectile (20150405 126))) "Integration of codesearch into projectile" tar ((:url . "https://github.com/abingham/emacs-codesearch") (:commit . "e40efc62e9333db0593bd81b5c78d08b19bfb193") (:revdesc . "e40efc62e933") (:keywords "tools" "development" "search") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (projectile-git-autofetch . [(20200820 2028) ((emacs (25 1)) (projectile (0 14 0))) "Automatically fetch git repositories" tar ((:url . "https://github.com/andrmuel/projectile-git-autofetch") (:commit . "423ed5fa6508c4edc0a837bb585c7e77e99876be") (:revdesc . "423ed5fa6508") (:keywords "tools" "vc") (:authors ("Andreas Müller" . "code@0x7.ch")) (:maintainers ("Andreas Müller" . "code@0x7.ch")) (:maintainer "Andreas Müller" . "code@0x7.ch"))])
+ (projectile-rails . [(20221231 1643) ((emacs (25 1)) (projectile (0 12 0)) (inflections (1 1)) (inf-ruby (2 2 6)) (f (0 13 0)) (rake (0 3 2)) (dash (2 18 1))) "Minor mode for Rails projects based on projectile-mode" tar ((:url . "https://github.com/asok/projectile-rails") (:commit . "701784df7befe17b861f1b53fe9cbc59d0b94b9f") (:revdesc . "701784df7bef") (:keywords "rails" "projectile") (:authors ("Adam Sokolnicki" . "adam.sokolnicki@gmail.com")) (:maintainers ("Adam Sokolnicki" . "adam.sokolnicki@gmail.com")) (:maintainer "Adam Sokolnicki" . "adam.sokolnicki@gmail.com"))])
+ (projectile-ripgrep . [(20221013 541) ((ripgrep (0 3 0)) (projectile (0 14 0))) "Run ripgrep with Projectile" tar ((:url . "https://github.com/nlamirault/ripgrep.el") (:commit . "b6bd5beb0c11348f1afd9486cbb451d0d2e3c45a") (:revdesc . "b6bd5beb0c11") (:keywords "ripgrep" "projectile") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (projectile-sift . [(20160107 1015) ((sift (0 2 0)) (projectile (0 13 0))) "Run a sift with Projectile" tar ((:url . "https://github.com/nlamirault/sift.el") (:commit . "8c3f3d14a351a2394027d72ee0599aa73b9f0d13") (:revdesc . "8c3f3d14a351") (:keywords "sift" "projectile") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (projectile-speedbar . [(20190807 2010) ((projectile (0 11 0)) (sr-speedbar (0))) "Projectile integration for speedbar" tar ((:url . "https://github.com/anshulverma/projectile-speedbar") (:commit . "93320e467ee78772065e599a5dba94889a77db22") (:revdesc . "93320e467ee7") (:keywords "project" "convenience" "speedbar" "projectile") (:authors ("Anshul Verma" . "anshul.verma86@gmail.com")) (:maintainers ("Anshul Verma" . "anshul.verma86@gmail.com")) (:maintainer "Anshul Verma" . "anshul.verma86@gmail.com"))])
+ (projectile-trailblazer . [(20170928 1624) ((emacs (24 4)) (projectile (0 12 0)) (inflections (1 1)) (inf-ruby (2 2 6)) (f (0 13 0)) (rake (0 3 2))) "Minor mode for Rails projects using trailblazer" tar ((:url . "https://github.com/micdahl/projectile-trailblazer") (:commit . "79299498d74876f2ac3fe8075716b39a5bdd04cd") (:revdesc . "79299498d748") (:keywords "rails" "projectile" "trailblazer" "languages") (:authors ("Michael Dahl" . "michael.dahl84@gmail.com")) (:maintainers ("Michael Dahl" . "michael.dahl84@gmail.com")) (:maintainer "Michael Dahl" . "michael.dahl84@gmail.com"))])
+ (projectile-variable . [(20230916 441) ((emacs (24)) (cl-lib (0 5))) "Store project local variables" tar ((:url . "https://github.com/emacs-php/projectile-variable") (:commit . "fa6bf595529156ee3b6d08f90ebea3b4ab7c5ef8") (:revdesc . "fa6bf5955291") (:keywords "project" "convenience") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (projection . [(20260614 1822) ((emacs (29 1)) (project (0 9 8)) (compat (29 1 4 1)) (f (0 20)) (s (1 13))) "Project type support for `project'" tar ((:url . "https://github.com/mohkale/projection") (:commit . "870a60b26416e13a7cd37ecfd863ae730d6a13fa") (:revdesc . "870a60b26416") (:keywords "project" "convenience") (:authors ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainers ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainer "Mohsin Kaleem" . "mohkale@kisara.moe"))])
+ (projection-dape . [(20241107 2107) ((emacs (29 1)) (projection (0 1)) (dape (0 8))) "Projection integration for `dape'" tar ((:url . "https://github.com/mohkale/projection") (:commit . "50d4f0ec4edfddd24f7c1c540f299a919aa4c151") (:revdesc . "50d4f0ec4edf") (:keywords "project" "convenience") (:authors ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainers ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainer "Mohsin Kaleem" . "mohkale@kisara.moe"))])
+ (projection-multi . [(20260614 1822) ((emacs (29 1)) (projection (0 1)) (compile-multi (0 5))) "Projection integration for `compile-multi'" tar ((:url . "https://github.com/mohkale/projection") (:commit . "66dfa454cbd0ca356d0c5761f6ade248b612b204") (:revdesc . "66dfa454cbd0") (:keywords "project" "convenience") (:authors ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainers ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainer "Mohsin Kaleem" . "mohkale@kisara.moe"))])
+ (projection-multi-embark . [(20241107 2107) ((emacs (29 1)) (projection (0 1)) (compile-multi-embark (0 5))) "Integration for `projection-multi' and `embark'" tar ((:url . "https://github.com/mohkale/projection") (:commit . "50d4f0ec4edfddd24f7c1c540f299a919aa4c151") (:revdesc . "50d4f0ec4edf") (:keywords "project" "convenience") (:authors ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainers ("Mohsin Kaleem" . "mohkale@kisara.moe")) (:maintainer "Mohsin Kaleem" . "mohkale@kisara.moe"))])
+ (projector . [(20211112 1514) ((alert (1 1)) (cl-lib (0 5))) "Lightweight library for managing project-aware shell and command buffers" tar ((:url . "https://github.com/waymondo/projector.el") (:commit . "1d0f2d307591ea50888d31dcae7e463e2ada1316") (:revdesc . "1d0f2d307591") (:authors ("Justin Talbott" . "justin@waymondo.com")) (:maintainers ("Justin Talbott" . "justin@waymondo.com")) (:maintainer "Justin Talbott" . "justin@waymondo.com"))])
+ (projekt . [(20150324 848) ((emacs (24))) "Some kind of staging for CVS" tar ((:url . "https://github.com/tekai/projekt") (:commit . "a65e554e5d8b0def08c5d06f3fe34fec40bebd83") (:revdesc . "a65e554e5d8b") (:authors ("Engelke Eschner" . "tekai@gmx.li")) (:maintainers ("Engelke Eschner" . "tekai@gmx.li")) (:maintainer "Engelke Eschner" . "tekai@gmx.li"))])
+ (projmake-mode . [(20250211 1534) ((dash (20150611 922)) (indicators (20130217 1405))) "Run build system for project" tar ((:url . "https://github.com/emacsattic/projmake-mode") (:commit . "99f10611c24e0884f1f24744adcccb3d972326f6") (:revdesc . "99f10611c24e"))])
+ (prometheus-mode . [(20230522 2358) ((emacs (26 1))) "Major modes for Prometheus files" tar ((:url . "https://gitlab.com/peterhoeg/prometheus-mode") (:commit . "df7f1b13a432594594a967f0b2ff0f3b1ba41656") (:revdesc . "df7f1b13a432") (:keywords "languages") (:authors ("Peter Hoeg" . "(peter@hoeg.com)")) (:maintainers ("Peter Hoeg" . "(peter@hoeg.com)")) (:maintainer "Peter Hoeg" . "(peter@hoeg.com)"))])
+ (promise . [(20210307 727) ((emacs (25 1))) "Promises/A+" tar ((:url . "https://github.com/chuntaro/emacs-promise") (:commit . "cec51feb5f957e8febe6325335cf57dc2db6be30") (:revdesc . "cec51feb5f95") (:keywords "async" "promise" "convenience") (:authors ("chuntaro" . "chuntaro@sakura-games.jp")) (:maintainers ("chuntaro" . "chuntaro@sakura-games.jp")) (:maintainer "chuntaro" . "chuntaro@sakura-games.jp"))])
+ (prompt-binder . [(20250621 853) ((emacs (24 3)) (llm (0 26 0))) "Bind LLM prompts to key chords and editor context" tar ((:url . "https://github.com/tracym") (:commit . "e0e81fba2f1eaf7fa82827fbf32c0cdbf1328d2f") (:revdesc . "e0e81fba2f1e") (:keywords "llm" "tools" "prompt"))])
+ (prompt-text . [(20190408 310) nil "Configure your minibuffer prompt" tar ((:url . "https://github.com/10sr/prompt-text-el") (:commit . "b842bf13c53d0a2bd2bc7a00d37cc713d69fa9e9") (:revdesc . "b842bf13c53d") (:keywords "utility" "minibuffer") (:authors ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainers ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainer "10sr" . "8slashes+el[at]gmail[dot]com"))])
+ (prompts . [(20160916 1041) ((dash (2 13 0))) "Utilities for working with text prompts" tar ((:url . "https://github.com/guiltydolphin/prompts.el") (:commit . "1cd5e732ff2a86b47836eb7252e5b59cd4b6ab26") (:revdesc . "1cd5e732ff2a") (:keywords "input" "minibuffer") (:authors ("Ben Moon" . "guiltydolphin@gmail.com")) (:maintainers ("Ben Moon" . "guiltydolphin@gmail.com")) (:maintainer "Ben Moon" . "guiltydolphin@gmail.com"))])
+ (promptu . [(20260810 1345) ((emacs (28 1)) (transient (0 5 0))) "Compose LLM prompts from building blocks" tar ((:url . "https://github.com/mrcnski/promptu.el") (:commit . "926bf7507d550efc7c86a84a3aa906e91116d663") (:revdesc . "926bf7507d55") (:keywords "convenience" "tools") (:authors ("Marcin Swieczkowski" . "marcin@realemail.net")) (:maintainers ("Marcin Swieczkowski" . "marcin@realemail.net")) (:maintainer "Marcin Swieczkowski" . "marcin@realemail.net"))])
+ (pronto . [(20200218 1633) ((emacs (24))) "Compilation mode for pronto stylechecks" tar ((:url . "https://github.com/julianrubisch/pronto.el") (:commit . "c0cd13d8219879610b7fe284b182a9db4d3d40b3") (:revdesc . "c0cd13d82198") (:keywords "processes" "tools") (:authors ("Julian Rubisch" . "julian@julianrubisch.at")) (:maintainers ("Julian Rubisch" . "julian@julianrubisch.at")) (:maintainer "Julian Rubisch" . "julian@julianrubisch.at"))])
+ (proof-general . [(20260825 1221) ((emacs (25 2))) "A generic Emacs interface for proof assistants" tar ((:url . "https://proofgeneral.github.io/") (:commit . "9799d01c357f9c35634887dffb3276b6d7adb1ac") (:revdesc . "9799d01c357f") (:maintainers (nil . "proof-general-maintainers@groupes.renater.fr")) (:maintainer nil . "proof-general-maintainers@groupes.renater.fr"))])
+ (prop-menu . [(20150728 1118) ((emacs (24 3)) (cl-lib (0 5))) "Create and display a context menu based on text and overlay properties" tar ((:url . "https://github.com/david-christiansen/prop-menu-el") (:commit . "50b102c1c0935fd3e0c465feed7f27d66b21cdf3") (:revdesc . "50b102c1c093") (:keywords "convenience") (:authors ("David Christiansen" . "david@davidchristiansen.dk")) (:maintainers ("David Christiansen" . "david@davidchristiansen.dk")) (:maintainer "David Christiansen" . "david@davidchristiansen.dk"))])
+ (propfont-mixed . [(20150113 2211) ((emacs (24)) (cl-lib (0 5))) "Use proportional fonts with space-based indentation" tar ((:url . "https://github.com/ikirill/propfont-mixed") (:commit . "0b461ef4754a469610dba71874a34b6da42176bf") (:revdesc . "0b461ef4754a") (:keywords "faces") (:authors ("Kirill Ignatiev" . "github.com/ikirill")) (:maintainers ("Kirill Ignatiev" . "github.com/ikirill")) (:maintainer "Kirill Ignatiev" . "github.com/ikirill"))])
+ (proportional . [(20221205 1417) ((emacs (25 1))) "Use a proportional font everywhere" tar ((:url . "https://github.com/ksjogo/proportional") (:commit . "6b675694292a5dbebb52b6196e8ccee6e3a73042") (:revdesc . "6b675694292a") (:keywords "faces"))])
+ (prosjekt . [(20151127 1416) ((dash (2 8 0))) "A software project tool for emacs" tar ((:url . "https://github.com/abingham/prosjekt") (:commit . "a864a8be5842223043702395f311e3350c28e9db") (:revdesc . "a864a8be5842") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (protobuf-mode . [(20240823 1417) nil "Major mode for editing protocol buffers" tar ((:url . "https://github.com/protocolbuffers/protobuf") (:commit . "138451296bf4101f992faa215a1899f3b9ec29e7") (:revdesc . "138451296bf4") (:keywords "google" "protobuf" "languages") (:authors ("Alexandre Vassalotti" . "alexandre@peadrop.com")) (:maintainers ("Alexandre Vassalotti" . "alexandre@peadrop.com")) (:maintainer "Alexandre Vassalotti" . "alexandre@peadrop.com"))])
+ (protobuf-ts-mode . [(20230728 1747) ((emacs (29))) "Tree sitter support for Protocol Buffers (proto3 only)" tar ((:url . "https://git.ookami.one/cgit/protobuf-ts-mode") (:commit . "65152f5341ea4b3417390b3e60b195975161b8bc") (:revdesc . "65152f5341ea") (:keywords "protobuf" "languages" "tree-sitter") (:authors ("ookami" . "mail@ookami.one")) (:maintainers ("ookami" . "mail@ookami.one")) (:maintainer "ookami" . "mail@ookami.one"))])
+ (protocols . [(20170802 1132) ((cl-lib (0 5))) "Protocol database access functions" tar ((:url . "https://github.com/davep/protocols.el") (:commit . "d0f7c4acb05465f1a0d4be54363bbd2802647e77") (:revdesc . "d0f7c4acb054") (:keywords "convenience" "net" "protocols") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (proxy-mode . [(20230303 706) ((emacs (25))) "A minor mode to toggle proxy" tar ((:url . "https://repo.or.cz/proxy-mode.git") (:commit . "eca6f0b8a17fcf9eb961ed0426f57a5b7ca4e1f6") (:revdesc . "eca6f0b8a17f") (:keywords "comm" "proxy") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (psalm . [(20230914 1925) ((emacs (27 1)) (php-mode (1 22 3))) "Interface to Psalm" tar ((:url . "https://github.com/emacs-php/psalm.el") (:commit . "9449c09b8d570705aa74b5aef7651893b482cc66") (:revdesc . "9449c09b8d57") (:keywords "tools" "php") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (psc-ide . [(20250523 1854) ((emacs (25)) (dash (2 18 0)) (company (0 8 7)) (s (1 10 0)) (flycheck (0 24)) (let-alist (1 0 4)) (seq (1 11)) (inheritenv (0 2))) "Minor mode for PureScript's IDE server" tar ((:url . "https://github.com/purescript-emacs/psc-ide-emacs") (:commit . "c64b05d9011d7c87c6ff2b53be08c3374b6dab66") (:revdesc . "c64b05d9011d") (:keywords "languages") (:authors ("Erik Post" . "erik@shinsetsu.nl") ("Dmitry Bushenko" . "d.bushenko@gmail.com") ("Christoph Hegemann" . "christoph.hegemann1337@gmail.com")) (:maintainers ("Erik Post" . "erik@shinsetsu.nl") ("Dmitry Bushenko" . "d.bushenko@gmail.com") ("Christoph Hegemann" . "christoph.hegemann1337@gmail.com")) (:maintainer "Erik Post" . "erik@shinsetsu.nl"))])
+ (psci . [(20231219 52) ((emacs (25 1)) (purescript-mode (13 10)) (dash (2 9 0)) (inheritenv (0 2))) "Major mode for purescript repl psci" tar ((:url . "https://github.com/purescript-emacs/emacs-psci") (:commit . "ef31045295f29485fc697892fba53390fe193595") (:revdesc . "ef31045295f2") (:keywords "languages" "purescript" "psci" "repl") (:authors ("Antoine R. Dumont" . "eniotna.tATgmail.com")) (:maintainers ("Antoine R. Dumont" . "eniotna.tATgmail.com")) (:maintainer "Antoine R. Dumont" . "eniotna.tATgmail.com"))])
+ (psession . [(20260105 456) ((emacs (24)) (cl-lib (0 5)) (async (1 9 3))) "Persistent save of elisp objects" tar ((:url . "https://github.com/thierryvolpiatto/psession") (:commit . "ebe81c18f94bb74e0b795bbe6d4fa9284ccbbf5e") (:revdesc . "ebe81c18f94b") (:keywords "psession" "persistent" "save" "session") (:authors ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainers ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainer "Thierry Volpiatto" . "thievol@posteo.net"))])
+ (psysh . [(20230815 730) ((emacs (24 3)) (s (1 9 0)) (php-runtime (0 2))) "PsySH, PHP interactive shell (REPL)" tar ((:url . "https://github.com/emacs-php/psysh.el") (:commit . "8bf82fa68ca90fc72528ea406f0e57718bcb1cbf") (:revdesc . "8bf82fa68ca9") (:keywords "processes" "php") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (pt . [(20161226 1959) nil "A front-end for pt, The Platinum Searcher" tar ((:url . "https://github.com/bling/pt.el") (:commit . "6d99b2aaded3ece3db19a20f4b8f1d4abe382622") (:revdesc . "6d99b2aaded3") (:keywords "pt" "ack" "ag" "grep" "search"))])
+ (ptemplate . [(20210324 1446) ((emacs (25 1)) (yasnippet (0 13 0))) "Project templates" tar ((:url . "https://github.com/nbfalcon/ptemplate") (:commit . "b81cc7be8865745c3a60177a244d2a69729ab21b") (:revdesc . "b81cc7be8865") (:authors ("Nikita Bloshchanevich" . "nikblos@outlook.com")) (:maintainers ("Nikita Bloshchanevich" . "nikblos@outlook.com")) (:maintainer "Nikita Bloshchanevich" . "nikblos@outlook.com"))])
+ (ptemplate-templates . [(20210324 1443) ((emacs (25 1)) (ptemplate (2 0 0))) "Official templates" tar ((:url . "https://github.com/nbfalcon/ptemplate-templates") (:commit . "3788387973dde3101f9a3f2064572be033c59ad6") (:revdesc . "3788387973dd") (:authors ("Nikita Bloshchanevich" . "nikblos@outlook.com")) (:maintainers ("Nikita Bloshchanevich" . "nikblos@outlook.com")) (:maintainer "Nikita Bloshchanevich" . "nikblos@outlook.com"))])
+ (ptree . [(20221106 1649) ((emacs (25 1))) "Property tree data structure" tar ((:url . "https://github.com/alpha-catharsis/ptree") (:commit . "23cb9093f99b9869606f8d54fa5c45ea35fcc789") (:revdesc . "23cb9093f99b") (:keywords "lisp") (:authors ("Alpha Catharsis" . "alpha.catharsis@gmail.com")) (:maintainers ("Alpha Catharsis" . "alpha.catharsis@gmail.com")) (:maintainer "Alpha Catharsis" . "alpha.catharsis@gmail.com"))])
+ (pubmed . [(20221023 930) ((emacs (26 1)) (esxml (0 3 4)) (s (1 12 0)) (unidecode (0 2))) "Interface to PubMed" tar ((:url . "https://gitlab.com/fvdbeek/emacs-pubmed") (:commit . "b2fbc124cabf0d373845763adf882e9d89ff5daa") (:revdesc . "b2fbc124cabf") (:keywords "pubmed" "hypermedia") (:authors ("Folkert van der Beek" . "folkertvanderbeek@gmail.com")) (:maintainers ("Folkert van der Beek" . "folkertvanderbeek@gmail.com")) (:maintainer "Folkert van der Beek" . "folkertvanderbeek@gmail.com"))])
+ (pubsub . [(20260228 646) ((emacs (24 1))) "A basic publish/subscribe system" tar ((:url . "https://github.com/countvajhula/pubsub") (:commit . "e88732cf6239a2d94fef59b2e32190bf389a576f") (:revdesc . "e88732cf6239") (:authors ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainers ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainer "Sid Kasivajhula" . "sid@countvajhula.com"))])
+ (pueue . [(20230219 1558) ((emacs (28 1)) (with-editor (3 0 4))) "Interface for pueue" tar ((:url . "https://github.com/xFA25E/pueue") (:commit . "386e43d46cbf68470d040b422061ac2ba1629749") (:revdesc . "386e43d46cbf") (:keywords "processes") (:authors ("Valeriy Litkovskyy" . "vlr.ltkvsk@protonmail.com")) (:maintainers ("Valeriy Litkovskyy" . "vlr.ltkvsk@protonmail.com")) (:maintainer "Valeriy Litkovskyy" . "vlr.ltkvsk@protonmail.com"))])
+ (pug-mode . [(20211114 1645) ((emacs (24 4)) (cl-lib (0 5))) "Major mode for jade/pug template files" tar ((:url . "https://github.com/hlissner/emacs-pug-mode") (:commit . "73f8c2f95eba695f701df20c8436f49abadebdc1") (:revdesc . "73f8c2f95eba") (:keywords "markup" "language" "jade" "pug") (:maintainers ("Henrik Lissner" . "contact@henrik.io")) (:maintainer "Henrik Lissner" . "contact@henrik.io"))])
+ (pulseaudio-control . [(20230316 1819) nil "Use `pactl' to manage PulseAudio volumes" tar ((:url . "https://git.sr.ht/~flexibeast/pulseaudio-control") (:commit . "e917e84661b0e2496b295f1bbfba6ad32a656527") (:revdesc . "e917e84661b0") (:keywords "multimedia" "hardware" "sound" "pulseaudio") (:authors ("Alexis" . "flexibeast@gmail.com") ("Ellington Santos" . "ellingtonsantos@gmail.com") ("Sergey Trofimov" . "sarg@sarg.org.ru") ("conses" . "contact@conses.eu")) (:maintainers ("Alexis" . "flexibeast@gmail.com")) (:maintainer "Alexis" . "flexibeast@gmail.com"))])
+ (pumpkin-spice-theme . [(20231011 1253) ((emacs (27 1)) (autothemer (0 2))) "Spice up your day with a delightful pumpkin colored theme" tar ((:url . "https://cicadas.surf/cgit/pumpkin-spice-theme.git") (:commit . "8d38276f6b2d16325ca372dd3630653b21e6e7ed") (:revdesc . "8d38276f6b2d") (:keywords "faces" "theme" "halloween" "pumpkin") (:authors ("Grant Shangreaux" . "shoshin@cicadas.surf")) (:maintainers ("Grant Shangreaux" . "shoshin@cicadas.surf")) (:maintainer "Grant Shangreaux" . "shoshin@cicadas.surf"))])
+ (punctuality-logger . [(20141120 2031) nil "Punctuality logger for Emacs" tar ((:url . "https://gitlab.com/elzair/punctuality-logger") (:commit . "d76c5d5589a4f8a94cc5537686d9a3b46ea7cc59") (:revdesc . "d76c5d5589a4") (:keywords "reminder" "calendar") (:authors ("Philip Woods" . "elzairthesorcerer@gmail.com")) (:maintainers ("Philip Woods" . "elzairthesorcerer@gmail.com")) (:maintainer "Philip Woods" . "elzairthesorcerer@gmail.com"))])
+ (pungi . [(20150222 1246) ((jedi (0 2 0 -3 2)) (pyvenv (1 5))) "Integrates jedi with virtualenv and buildout python environments" tar ((:url . "https://github.com/mgrbyte/pungi") (:commit . "41c9f8b7795e083bfd63ba0d06c789c250998723") (:revdesc . "41c9f8b7795e") (:keywords "convenience") (:authors ("Matthew Russell" . "matthew.russell@horizon5.org")) (:maintainers ("Matthew Russell" . "matthew.russell@horizon5.org")) (:maintainer "Matthew Russell" . "matthew.russell@horizon5.org"))])
+ (puni . [(20260519 1527) ((emacs (26 1))) "Parentheses Universalistic" tar ((:url . "https://github.com/AmaiKinono/puni") (:commit . "04819e0bad5ed62af9e412ef9715b33bb1edc3ba") (:revdesc . "04819e0bad5e") (:keywords "convenience" "lisp" "tools") (:authors ("Hao Wang" . "amaikinono@gmail.com")) (:maintainers ("Hao Wang" . "amaikinono@gmail.com")) (:maintainer "Hao Wang" . "amaikinono@gmail.com"))])
+ (punpun-themes . [(20250421 1819) ((emacs (24 1))) "Common color definitions for punpun themes" tar ((:url . "https://depp.brause.cc/punpun-themes") (:commit . "735cedca649e0576ffba3771a039744c4a70528d") (:revdesc . "735cedca649e") (:keywords "themes" "faces") (:authors ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (puppet-mode . [(20250716 542) ((emacs (24 1)) (pkg-info (0 4))) "Major mode for Puppet manifests" tar ((:url . "https://github.com/voxpupuli/puppet-mode") (:commit . "f02aa30f5c0ce7fd0e1ffb245e5c832538bf6a91") (:revdesc . "f02aa30f5c0c") (:keywords "languages") (:authors ("Vox Pupuli" . "voxpupuli@groups.io") ("Bozhidar Batsov" . "bozhidar@batsov.com") ("Sebastian Wiesner" . "swiesner@lunaryorn.com") ("Russ Allbery" . "rra@stanford.edu")) (:maintainers ("Vox Pupuli" . "voxpupuli@groups.io") ("Bozhidar Batsov" . "bozhidar@batsov.com") ("Sebastian Wiesner" . "swiesner@lunaryorn.com") ("Tim Meusel" . "tim@bastelfreak.de")) (:maintainer "Vox Pupuli" . "voxpupuli@groups.io"))])
+ (puppet-ts-mode . [(20260223 1132) ((emacs (29 1))) "Major mode for Puppet using Tree-sitter" tar ((:url . "https://github.com/smoeding/puppet-ts-mode") (:commit . "f287c44f357604ec7fbf2f3ab0196dcd47056593") (:revdesc . "f287c44f3576") (:keywords "languages") (:authors ("Stefan Möding" . "stm@kill-9.net")) (:maintainers ("Stefan Möding" . "stm@kill-9.net")) (:maintainer "Stefan Möding" . "stm@kill-9.net"))])
+ (pure-light-theme . [(20260613 824) ((emacs (27 1))) "A light colored theme for e-ink color monitors" tar ((:url . "https://github.com/nyrell/pure-light-eink-color") (:commit . "0cf41b8cb0ec95efd363889f8877d7f65514e4ad") (:revdesc . "0cf41b8cb0ec") (:keywords "faces" "theme") (:authors ("Mattias Nyrell" . "mattias@nyrell.se")) (:maintainers ("Mattias Nyrell" . "mattias@nyrell.se")) (:maintainer "Mattias Nyrell" . "mattias@nyrell.se"))])
+ (purescript-mode . [(20260717 1433) ((emacs (25 1))) "A PureScript editing mode" tar ((:url . "https://github.com/purescript-emacs/purescript-mode") (:commit . "7ad5eff9bd59632d49a44f5935c65f1069e17fed") (:revdesc . "7ad5eff9bd59") (:keywords "faces" "files" "purescript") (:authors ("1997-1998 Graeme E Moss and" . "gem@cs.york.ac.uk") ("Tommy Thorn" . "thorn@irisa.fr") ("2003 Dave Love" . "fx@gnu.org") ("2014 Tim Dysinger" . "tim@dysinger.net")) (:maintainers ("1997-1998 Graeme E Moss and" . "gem@cs.york.ac.uk") ("Tommy Thorn" . "thorn@irisa.fr") ("2003 Dave Love" . "fx@gnu.org") ("2014 Tim Dysinger" . "tim@dysinger.net")) (:maintainer "1997-1998 Graeme E Moss and" . "gem@cs.york.ac.uk"))])
+ (purp-theme . [(20210912 1940) nil "A dark color theme with few colors" tar ((:url . "https://github.com/gnuvince/purp") (:commit . "8d3510e1ed995b8323cd5205626ddde6386a76ca") (:revdesc . "8d3510e1ed99") (:keywords "faces") (:authors ("Vincent Foley" . "vfoley@gmail.com")) (:maintainers ("Vincent Foley" . "vfoley@gmail.com")) (:maintainer "Vincent Foley" . "vfoley@gmail.com"))])
+ (purple-haze-theme . [(20141015 229) ((emacs (24 0))) "An overtly purple color theme for Emacs24" tar ((:url . "https://github.com/jasonm23/emacs-purple-haze-theme") (:commit . "3e245cbef7cd09e6b3ee124963e372a04e9a6485") (:revdesc . "3e245cbef7cd") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (purty-mode . [(20131004 2259) nil "Safely pretty-print greek letters, mathematical symbols, or anything else" tar ((:url . "https://github.com/jcatw/purty-mode") (:commit . "ad48149bfd0c765796a728b22d679e03fc124328") (:revdesc . "ad48149bfd0c") (:authors ("James Atwood" . "jatwood@cs.umass.edu")) (:maintainers ("James Atwood" . "jatwood@cs.umass.edu")) (:maintainer "James Atwood" . "jatwood@cs.umass.edu"))])
+ (pushbullet . [(20140809 1232) ((grapnel (0 5 2)) (json (1 2))) "Emacs client for the PushBullet Android app" tar ((:url . "http://www.github.com/theanalyst/revolver") (:commit . "73c59a0f1dc04875b3e5a2c8afbc26c32128e445") (:revdesc . "73c59a0f1dc0") (:keywords "convenience") (:authors ("Abhishek L" . "abhishek.lekshmanan@gmail.com")) (:maintainers ("Abhishek L" . "abhishek.lekshmanan@gmail.com")) (:maintainer "Abhishek L" . "abhishek.lekshmanan@gmail.com"))])
+ (pushover . [(20170818 2103) ((cl-lib (0 5))) "Pushover API Access" tar ((:url . "https://github.com/swflint/pushover.el") (:commit . "bbe3ac8df3c532a72da4552615af960b8a577588") (:revdesc . "bbe3ac8df3c5") (:keywords "notifications") (:authors ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (px . [(20170317 2330) nil "Preview inline latex in any mode" tar ((:url . "https://github.com/aaptel/preview-latex") (:commit . "0c52f7933eab3ca1642ab0df151db9950430c9e2") (:revdesc . "0c52f7933eab") (:authors ("Aurélien Aptel" . "aurelien.aptel@gmail.com")) (:maintainers ("Aurélien Aptel" . "aurelien.aptel@gmail.com")) (:maintainer "Aurélien Aptel" . "aurelien.aptel@gmail.com"))])
+ (py-autopep8 . [(20260108 1346) ((emacs (29 1))) "Use autopep8 to beautify a Python buffer" tar ((:url . "https://codeberg.org/ideasman42/emacs-py-autopep8") (:commit . "f07d487a6cd63a8c8a44ec8b5e93b762aca97566") (:revdesc . "f07d487a6cd6") (:keywords "convenience") (:authors ("Friedrich Paetzke" . "f.paetzke@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (py-gnitset . [(20170821 1732) nil "Run your Python tests any way you'd like" tar ((:url . "https://www.github.com/quodlibetor/py-gnitset") (:commit . "1e993cc29cbc31e06fe1e335dec198e21972fa55") (:revdesc . "1e993cc29cbc") (:authors ("Brandon W Maister" . "quodlibetor@gmail.com")) (:maintainers ("Brandon W Maister" . "quodlibetor@gmail.com")) (:maintainer "Brandon W Maister" . "quodlibetor@gmail.com"))])
+ (py-import-check . [(20130802 1111) nil "Finds the unused python imports using importchecker" tar ((:url . "https://github.com/psibi/emacs-py-import-check") (:commit . "38ad91e67047bd37231497d11d409d064d510f98") (:revdesc . "38ad91e67047") (:keywords "python" "import" "check") (:authors ("Sibi" . "sibi@psibi.in")) (:maintainers ("Sibi" . "sibi@psibi.in")) (:maintainer "Sibi" . "sibi@psibi.in"))])
+ (py-isort . [(20160925 1018) nil "Use isort to sort the imports in a Python buffer" tar ((:url . "http://paetzke.me/project/py-isort.el") (:commit . "e67306f459c47c53a65604e4eea88a3914596560") (:revdesc . "e67306f459c4") (:authors ("Friedrich Paetzke" . "paetzke@fastmail.fm")) (:maintainers ("Friedrich Paetzke" . "paetzke@fastmail.fm")) (:maintainer "Friedrich Paetzke" . "paetzke@fastmail.fm"))])
+ (py-smart-operator . [(20170531 1209) ((s (1 9 0))) "Smart-operator for python-mode" tar ((:url . "https://github.com/rmuslimov/py-smart-operator") (:commit . "0c8a66faca4b35158d0b5885472cb75286039167") (:revdesc . "0c8a66faca4b") (:keywords "python" "convenience" "smart-operator") (:authors ("Rustem Muslimov" . "r.muslimov@gmail.com")) (:maintainers ("Rustem Muslimov" . "r.muslimov@gmail.com")) (:maintainer "Rustem Muslimov" . "r.muslimov@gmail.com"))])
+ (py-snippets . [(20220918 952) ((yasnippet (0 8 0))) "Collection of advanced Python yasnippet snippets" tar ((:url . "https://github.com/Xaldew/py-snippets") (:commit . "1a85c41ea33f33e5b4a5a12a64fd9c4591fc0bcb") (:revdesc . "1a85c41ea33f") (:keywords "convenience" "snippets") (:authors ("Gustaf Waldemarson" . "gustaf.waldemarson@gmail.com")) (:maintainers ("Gustaf Waldemarson" . "gustaf.waldemarson@gmail.com")) (:maintainer "Gustaf Waldemarson" . "gustaf.waldemarson@gmail.com"))])
+ (py-test . [(20230714 517) ((dash (2 9 0)) (f (0 17)) (emacs (24 4))) "A test runner for Python code" tar ((:url . "https://github.com/Bogdanp/py-test.el") (:commit . "72975bb547b6123dcc1213ff78fdcf80f7b29842") (:revdesc . "72975bb547b6") (:keywords "python" "testing" "py.test") (:authors ("Bogdan Paul Popa" . "popa.bogdanp@gmail.com")) (:maintainers ("Bogdan Paul Popa" . "popa.bogdanp@gmail.com")) (:maintainer "Bogdan Paul Popa" . "popa.bogdanp@gmail.com"))])
+ (py-vterm-interaction . [(20251024 2208) ((emacs (27 1)) (vterm (0 0 2)) (python (0 28))) "A mode for Python REPL using vterm" tar ((:url . "https://github.com/vale981/py-vterm-interaction.el") (:commit . "3e79540a715dc69b7998fe7712a0a8183570387d") (:revdesc . "3e79540a715d") (:keywords "languages" "python") (:maintainers ("Valentin Boettcher" . "hiroatprotagon.space")) (:maintainer "Valentin Boettcher" . "hiroatprotagon.space"))])
+ (py-yapf . [(20160925 1122) nil "Use yapf to beautify a Python buffer" tar ((:url . "https://github.com/paetzke/py-yapf.el") (:commit . "a878304202ad827a1f3de3dce1badd9ca8731146") (:revdesc . "a878304202ad") (:authors ("Friedrich Paetzke" . "f.paetzke@gmail.com")) (:maintainers ("Friedrich Paetzke" . "f.paetzke@gmail.com")) (:maintainer "Friedrich Paetzke" . "f.paetzke@gmail.com"))])
+ (pyasm-mode . [(20260122 136) ((emacs (24 4)) (compat (30 1 0 1))) "Mode for editing assembler code" tar ((:url . "https://github.com/rocky/emacs-pyasm-mode") (:commit . "b9434097b5454a2b28440d72ec4eadbdff44f651") (:revdesc . "b9434097b545") (:keywords "languages") (:authors ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainers (nil . "rocky@gnu.org")) (:maintainer nil . "rocky@gnu.org"))])
+ (pycarddavel . [(20150831 1216) ((helm (1 7 0)) (emacs (24 0))) "Integrate pycarddav" tar ((:url . "https://github.com/DamienCassou/pycarddavel") (:commit . "6ead921066fa0156f20155b7126e5875ce11c328") (:revdesc . "6ead921066fa") (:keywords "helm" "pyccarddav" "carddav" "message" "mu4e" "contacts") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (pyconf . [(20240207 2203) ((pyvenv (1 21)) (emacs (28 1)) (transient (0 3 7)) (pyenv-mode (0 1 0))) "Set up python execution configurations like dap-mode ones" tar ((:url . "https://github.com/andcarnivorous/pyconf") (:commit . "f1587f20463496193625526ba805c3cf084db966") (:revdesc . "f1587f204634") (:keywords "processes" "python") (:authors ("Andrew Favia" . "drewlinguistics01atgmaildotcom")) (:maintainers ("Andrew Favia" . "drewlinguistics01atgmaildotcom")) (:maintainer "Andrew Favia" . "drewlinguistics01atgmaildotcom"))])
+ (pycoverage . [(20200513 2047) ((emacs (24 3))) "Support for coverage stats on Python 2.X and 3" tar ((:url . "https://github.com/mattharrison/pycoverage.el") (:commit . "3c69ed312121368f1b24cc04d54a29ce4ed4f743") (:revdesc . "3c69ed312121") (:keywords "project" "convenience"))])
+ (pydoc . [(20250910 2000) nil "Functional, syntax highlighted pydoc navigation" tar ((:url . "https://github.com/statmobile/pydoc") (:commit . "5e76e74538ac3201ad7a3526ecf16d9ac7e73310") (:revdesc . "5e76e74538ac") (:keywords "pydoc" "python") (:authors ("John Kitchin" . "jkitchin@andrew.cmu.edu")) (:maintainers ("Brian J. Lopes" . "statmobile@gmail.com")) (:maintainer "Brian J. Lopes" . "statmobile@gmail.com"))])
+ (pyenv-mode . [(20230821 1645) ((emacs (25 1)) (pythonic (0 1 0))) "Integrate pyenv with python-mode" tar ((:url . "https://github.com/proofit404/pyenv-mode") (:commit . "6820aa6673e6a51ace88611a58b423b5b1effb19") (:revdesc . "6820aa6673e6") (:authors ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainers ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainer "Artem Malyshev" . "proofit404@gmail.com"))])
+ (pygen . [(20161121 506) ((elpy (1 12 0)) (python-mode (6 2 2)) (dash (2 13 0))) "Python code generation using Elpy and Python-mode" tar ((:url . "https://github.com/JackCrawley/pygen/") (:commit . "3a5d1d1a0640865b15be05cd1eeb33bb4793b622") (:revdesc . "3a5d1d1a0640") (:keywords "python" "code generation") (:authors ("Jack Crawley" . "http://www.github.com/jackcrawley")) (:maintainers ("Jack Crawley" . "http://www.github.com/jackcrawley")) (:maintainer "Jack Crawley" . "http://www.github.com/jackcrawley"))])
+ (pygn-mode . [(20260605 1055) ((emacs (27 1)) (tree-sitter (0 18 0)) (tree-sitter-langs (0 12 242)) (uci-mode (0 5 4)) (nav-flash (1 0 0)) (ivy (0 10 0))) "Major-mode for chess PGN files, powered by Python" tar ((:url . "https://github.com/dwcoates/pygn-mode") (:commit . "6eed5ea66d37ae25c4db98ca21b164a98234b59e") (:revdesc . "6eed5ea66d37") (:keywords "data" "games" "chess"))])
+ (pyim . [(20251230 809) ((emacs (27 1)) (async (1 6)) (xr (1 13))) "A Chinese input method support quanpin, shuangpin, wubi, cangjie and rime" tar ((:url . "https://github.com/tumashu/pyim") (:commit . "a56c8d992c872addcfc295c409a7bae70d00af87") (:revdesc . "a56c8d992c87") (:keywords "convenience" "chinese" "pinyin" "input-method") (:authors ("Ye Wenbin" . "wenbinye@163.com") ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (pyim-basedict . [(20240923 739) ((pyim (3 7))) "The default pinyin dict of pyim" tar ((:url . "https://github.com/tumashu/pyim-basedict") (:commit . "55d9b324831b0fc79ff62f1c6f21aad72341a114") (:revdesc . "55d9b324831b") (:keywords "convenience" "chinese" "pinyin" "input-method" "complete") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (pyim-cangjiedict . [(20250924 1320) ((pyim (3 7))) "Some cangjie dicts for pyim" tar ((:url . "https://github.com/cor5corpii/pyim-cangjiedict") (:commit . "2742edcfb60328793fc983bd4a0dedc88f550ec1") (:revdesc . "2742edcfb603") (:keywords "convenience" "chinese" "pinyin" "input-method" "cangjie") (:authors ("Yuanchen Xie" . "xieych@outlook.com")) (:maintainers ("Yuanchen Xie" . "xieych@outlook.com")) (:maintainer "Yuanchen Xie" . "xieych@outlook.com"))])
+ (pyim-smzmdict . [(20250621 828) ((pyim (5 3 4))) "Strange scheMas of ZhengMa dict for pyim" tar ((:url . "https://github.com/cor5corpii/pyim-smzmdict") (:commit . "853908d2ae88a30038dd03a7cd3f00aeabd89ac2") (:revdesc . "853908d2ae88") (:keywords "convenience" "pyim" "chinese" "zhengma") (:maintainers ("Yuanchen Xie" . "xieych@outlook.com")) (:maintainer "Yuanchen Xie" . "xieych@outlook.com"))])
+ (pyim-wbdict . [(20220604 1340) ((pyim (3 7))) "Some wubi dicts for pyim" tar ((:url . "https://github.com/tumashu/pyim-wbdict") (:commit . "e3b128cfcf218e4a0ca04189b0bd46909761227e") (:revdesc . "e3b128cfcf21") (:keywords "convenience" "chinese" "pinyin" "input-method" "complete") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (pyimport . [(20240207 719) ((dash (2 8 0)) (s (1 9 0)) (shut-up (0 3 2))) "Manage Python imports!" tar ((:url . "https://github.com/Wilfred/pyimport") (:commit . "4398ce8dd64fa0f685f4bf8683a35087649346d3") (:revdesc . "4398ce8dd64f") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (pyimpsort . [(20250710 1607) ((emacs (24 3)) (python (0))) "Sort Python imports" tar ((:url . "https://github.com/emacsorphanage/pyimpsort") (:commit . "70d739c134d89ba2025322fee101a13420d0b032") (:revdesc . "70d739c134d8") (:keywords "tools" "python" "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Alain Delplanque" . "alaindelplanque@mailoo.org")) (:maintainer "Alain Delplanque" . "alaindelplanque@mailoo.org"))])
+ (pyinspect . [(20230216 1121) ((emacs (27 1))) "Python object inspector" tar ((:url . "https://github.com/it-is-wednesday/pyinspect.el") (:commit . "4437dc589d0c1eb0ca80bf0d005ee27d15cf69fc") (:revdesc . "4437dc589d0c") (:keywords "tools") (:authors ("Maor Kadosh" . "git@avocadosh.xyz")) (:maintainers ("Maor Kadosh" . "git@avocadosh.xyz")) (:maintainer "Maor Kadosh" . "git@avocadosh.xyz"))])
+ (pylint . [(20221117 1303) nil "Minor mode for running `pylint'" tar ((:url . "https://github.com/emacsorphanage/pylint") (:commit . "bddb91610b6b6aa1e7fee96b6be3be69dfe3695e") (:revdesc . "bddb91610b6b") (:keywords "languages" "python") (:authors ("Ian Eure" . "ian.eure@gmail.com")) (:maintainers ("Ian Eure" . "ian.eure@gmail.com")) (:maintainer "Ian Eure" . "ian.eure@gmail.com"))])
+ (pynt . [(20180710 726) ((emacs (24 4)) (ein (0 13 1)) (epc (0 1 1)) (deferred (0 5 1))) "Generate and scroll EIN buffers from python code" tar ((:url . "https://github.com/ebanner/pynt") (:commit . "963c43cfdb5deea7daedc269aafa79192d853154") (:revdesc . "963c43cfdb5d") (:keywords "convenience") (:authors ("Edward Banner" . "edward.banner@gmail.com")) (:maintainers ("Edward Banner" . "edward.banner@gmail.com")) (:maintainer "Edward Banner" . "edward.banner@gmail.com"))])
+ (pyramid . [(20230114 1049) ((emacs (25 2)) (pythonic (0 1 1)) (tablist (0 70))) "Minor mode for working with pyramid projects" tar ((:url . "https://github.com/dakra/pyramid.el") (:commit . "c8a8b36725d85664e74f59600fe5d18d06ea907d") (:revdesc . "c8a8b36725d8") (:keywords "python" "pyramid" "pylons" "convenience" "tools" "processes") (:authors ("Daniel Kraus" . "daniel@kraus.my")) (:maintainers ("Daniel Kraus" . "daniel@kraus.my")) (:maintainer "Daniel Kraus" . "daniel@kraus.my"))])
+ (pytest . [(20230810 1218) ((s (1 9 0))) "Easy Python test running in Emacs" tar ((:url . "https://github.com/ionrock/pytest-el") (:commit . "8692f965bf4ddf3d755cf1fbf77a7a768e22460e") (:revdesc . "8692f965bf4d") (:keywords "pytest" "python" "testing"))])
+ (pytest-pdb-break . [(20200804 848) ((emacs (25))) "A pytest PDB launcher" tar ((:url . "https://github.com/poppyschmo/pytest-pdb-break") (:commit . "05d227493b7b96f3556cba22f215cb85f9282020") (:revdesc . "05d227493b7b") (:keywords "languages" "tools") (:authors ("Jane Soko" . "poppyschmo@protonmail.com")) (:maintainers ("Jane Soko" . "poppyschmo@protonmail.com")) (:maintainer "Jane Soko" . "poppyschmo@protonmail.com"))])
+ (python-black . [(20260706 1540) ((emacs (25)) (dash (2 16 0)) (reformatter (0 3))) "Reformat Python using python-black" tar ((:url . "https://github.com/wbolster/emacs-python-black") (:commit . "779d49c7db54590d1fa483ef2f89eea5ef8774e1") (:revdesc . "779d49c7db54") (:keywords "languages") (:authors ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "wouter bolsterlee" . "wouter@bolsterl.ee"))])
+ (python-cell . [(20240126 841) ((emacs (25 1))) "Support for MATLAB-like cells in python mode" tar ((:url . "https://github.com/thisch/python-cell.el") (:commit . "ea469071adc72f371698934c3709ee370ac6be6f") (:revdesc . "ea469071adc7") (:keywords "extensions" "python" "matlab" "cell") (:authors ("Thomas Hisch" . "t.hisch@gmail.com")) (:maintainers ("Thomas Hisch" . "t.hisch@gmail.com")) (:maintainer "Thomas Hisch" . "t.hisch@gmail.com"))])
+ (python-coverage . [(20260706 1541) ((emacs (25 1)) (dash (2 18 0)) (s (1 12 0)) (xml+ (0))) "Show Python coverage via overlays or Flycheck" tar ((:url . "https://github.com/wbolster/emacs-python-coverage") (:commit . "9e7af6999077ed3f861c5813297aee13804fcfb1") (:revdesc . "9e7af6999077") (:keywords "languages" "processes" "tools") (:authors ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "wouter bolsterlee" . "wouter@bolsterl.ee"))])
+ (python-django . [(20150822 404) nil "A Jazzy package for managing Django projects" tar ((:url . "https://github.com/fgallina/python-django.el") (:commit . "fc54ad74f0309670359b939f64d0f1fff68aeac4") (:revdesc . "fc54ad74f030") (:keywords "languages") (:authors ("Fabián E. Gallina" . "fabian@anue.biz")))])
+ (python-docstring . [(20231203 2036) nil "Smart Python docstring formatting" tar ((:url . "https://github.com/glyph/python-docstring-mode") (:commit . "48e6489ec2db8b4959a9f591910941c2a5f132a3") (:revdesc . "48e6489ec2db"))])
+ (python-environment . [(20150310 853) ((deferred (0 3 1))) "Virtualenv API for Emacs Lisp" tar ((:url . "https://github.com/tkf/emacs-python-environment") (:commit . "401006584e32864a10c69d29f14414828909362e") (:revdesc . "401006584e32") (:keywords "applications" "tools") (:authors ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainers ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainer "Takafumi Arakaki" . "aka.tkfatgmail.com"))])
+ (python-insert-docstring . [(20211127 1232) ((emacs (25 1))) "Python Google docstring inserter" tar ((:url . "https://github.com/macurovc/insert-docstring") (:commit . "cd6419b74c99c06d5c48c1b289572acce1fd193b") (:revdesc . "cd6419b74c99") (:authors ("Marco Vocialta" . "macurovc@tutanota.com")) (:maintainers ("Marco Vocialta" . "macurovc@tutanota.com")) (:maintainer "Marco Vocialta" . "macurovc@tutanota.com"))])
+ (python-isort . [(20210603 2153) ((emacs (26)) (reformatter (0 6))) "Reformat python-mode buffer with isort" tar ((:url . "https://github.com/wyuenho/emacs-python-isort") (:commit . "339814df22b87eebca02137e581f65d6283fce97") (:revdesc . "339814df22b8") (:keywords "languages") (:authors ("Jimmy Yuen Ho Wong" . "wyuenho@gmail.com")) (:maintainers ("Jimmy Yuen Ho Wong" . "wyuenho@gmail.com")) (:maintainer "Jimmy Yuen Ho Wong" . "wyuenho@gmail.com"))])
+ (python-mls . [(20240621 2114) ((emacs (27 1)) (compat (29 1))) "Multi-line shell for (i)Python" tar ((:url . "https://github.com/jdtsmith/python-mls") (:commit . "3ebacc6c46e9f7de25279783001ca3fc8964d7a8") (:revdesc . "3ebacc6c46e9") (:keywords "languages" "processes"))])
+ (python-mode . [(20260710 1059) nil "Python major mode" tar ((:url . "https://gitlab.com/groups/python-mode-devs") (:commit . "dbbfaa9bbfa1e330f4d9ec81b3793fbb2a297ecd") (:revdesc . "dbbfaa9bbfa1") (:keywords "python" "languages" "oop") (:maintainers (nil . "python-mode@python.org")) (:maintainer nil . "python-mode@python.org"))])
+ (python-pytest . [(20260630 859) ((emacs (28 1)) (dash (2 18 0)) (transient (0 3 7)) (s (1 12 0))) "Helpers to run pytest" tar ((:url . "https://github.com/wbolster/emacs-python-pytest") (:commit . "8c0e048a771f355903a8c2ce78fa0974a077214e") (:revdesc . "8c0e048a771f") (:keywords "pytest" "test" "python" "languages" "processes" "tools") (:authors ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "wouter bolsterlee" . "wouter@bolsterl.ee"))])
+ (python-switch-quotes . [(20250804 904) ((emacs (24 3))) "Cycle between single and double quotes in python strings" tar ((:url . "https://github.com/werehuman/python-switch-quotes") (:commit . "dc3bf1d7c206168605f4df7a605bc4615d296cd6") (:revdesc . "dc3bf1d7c206") (:keywords "python" "tools" "convenience") (:authors ("Vladimir Lagunov" . "lagunov.vladimir@gmail.com")) (:maintainers ("Vladimir Lagunov" . "lagunov.vladimir@gmail.com")) (:maintainer "Vladimir Lagunov" . "lagunov.vladimir@gmail.com"))])
+ (python-tdd-mode . [(20250719 1438) ((emacs (27 1))) "Modern TDD Mode for Python" tar ((:url . "https://github.com/marcwebbie/tdd-mode") (:commit . "e0c05730c76bfed1d819bc981c90ab16e681b55d") (:revdesc . "e0c05730c76b") (:keywords "tools" "convenience" "testing" "python" "tdd") (:authors ("Marcwebbie" . "marcwebbie@gmail.com")) (:maintainers ("Marcwebbie" . "marcwebbie@gmail.com")) (:maintainer "Marcwebbie" . "marcwebbie@gmail.com"))])
+ (python-test . [(20181018 29) ((emacs (25 1))) "Python testing integration" tar ((:url . "https://github.com/emacs-pe/python-test.el") (:commit . "f899975b133539e19ba822e4b0bfd1a28572967e") (:revdesc . "f899975b1335") (:keywords "convenience" "tools" "processes") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (python-unicode-escape . [(20260412 2143) ((emacs (27 1))) "Completion for Python \\N{NAME} escapes" tar ((:url . "https://github.com/jb3/python-unicode-escape") (:commit . "5ccc09f6bb773d6aa649aa569cf16099c2d85d0a") (:revdesc . "5ccc09f6bb77") (:keywords "python" "unicode" "completion" "abbrev") (:authors ("Joe Banks" . "joe@jb3.dev")) (:maintainers ("Joe Banks" . "joe@jb3.dev")) (:maintainer "Joe Banks" . "joe@jb3.dev"))])
+ (python-view-data . [(20260816 1213) ((emacs (28 1)) (python (0 2))) "View data in python" tar ((:url . "https://github.com/ShuguangSun/python-view-data") (:commit . "a3e4b96e6510eb2ccabd3faadd0dba0554318302") (:revdesc . "a3e4b96e6510") (:keywords "tools") (:authors ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainers ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainer "Shuguang Sun" . "shuguang79@qq.com"))])
+ (python-x . [(20260619 1406) ((python (0 24)) (folding (0 0)) (emacs (24 5)) (compat (26 1))) "Python.el extras for interactive evaluation" tar ((:url . "https://gitlab.com/wavexx/python-x.el") (:commit . "548a95c42c110cd65b559416e497de20f5c21d92") (:revdesc . "548a95c42c11") (:keywords "languages" "processes" "python" "eval" "folding") (:authors ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainers ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainer "Yuri D'Elia" . "wavexx@thregr.org"))])
+ (pythonic . [(20230821 1733) ((emacs (25 1)) (s (1 9)) (f (0 17 2))) "Utility functions for writing pythonic emacs package" tar ((:url . "https://github.com/proofit404/pythonic") (:commit . "f6e0bec552319341f260a5c4740288799c2b3a5b") (:revdesc . "f6e0bec55231") (:keywords "convenience" "pythonic") (:authors ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainers ("Artem Malyshev" . "proofit404@gmail.com")) (:maintainer "Artem Malyshev" . "proofit404@gmail.com"))])
+ (pythontest . [(20240813 1322) ((emacs (29 1))) "Testing executor for python" tar ((:url . "https://github.com/erickgnavar/pythontest.el") (:commit . "4bb4f330c13ef82bb6e4a4b15c47cb3fede83523") (:revdesc . "4bb4f330c13e") (:authors ("Erick Navarro" . "erick@navarro.io")) (:maintainers ("Erick Navarro" . "erick@navarro.io")) (:maintainer "Erick Navarro" . "erick@navarro.io"))])
+ (pyvenv . [(20211014 707) nil "Python virtual environment interface" tar ((:url . "https://github.com/jorgenschaefer/pyvenv") (:commit . "31ea715f2164dd611e7fc77b26390ef3ca93509b") (:revdesc . "31ea715f2164") (:keywords "python" "virtualenv" "tools") (:authors ("Jorgen Schaefer" . "contact@jorgenschaefer.de")) (:maintainers ("Jorgen Schaefer" . "contact@jorgenschaefer.de")) (:maintainer "Jorgen Schaefer" . "contact@jorgenschaefer.de"))])
+ (pyvenv-auto . [(20230106 415) ((emacs (26 3)) (pyvenv (1 21))) "Automatically switch Python venvs" tar ((:url . "https://github.com/nryotaro/pyvenv-auto") (:commit . "b4365e60e3ba747a5fec8ca909f64fe8c73d8db2") (:revdesc . "b4365e60e3ba"))])
+ (q-mode . [(20260826 231) ((emacs (28))) "A q editing mode" tar ((:url . "https://github.com/psaris/q-mode") (:commit . "52ab1712b3cbedcfe34deb6023e4efa91a6ea940") (:revdesc . "52ab1712b3cb") (:keywords "faces" "files" "q"))])
+ (qml-mode . [(20161016 31) nil "Major mode for editing QT Declarative (QML) code" tar ((:url . "https://github.com/coldnew/qml-mode") (:commit . "6c5f33ba88ae010bf201a80ee8095e20a724558c") (:revdesc . "6c5f33ba88ae") (:keywords "qml" "qt" "qt declarative") (:authors ("Yen-Chin Lee" . "coldnew.tw@gmail.com")) (:maintainers ("Yen-Chin Lee" . "coldnew.tw@gmail.com")) (:maintainer "Yen-Chin Lee" . "coldnew.tw@gmail.com"))])
+ (qrencode . [(20260802 2131) ((emacs (25 1))) "QRCode encoder" tar ((:url . "https://github.com/ruediger/qrencode-el") (:commit . "7f19d5c20039e3c3e3872c7ae031509a0369d3bd") (:revdesc . "7f19d5c20039") (:keywords "qrcode" "comm") (:authors ("Rüdiger Sonderfeld" . "ruediger@c-plusplus.net")) (:maintainers ("Rüdiger Sonderfeld" . "ruediger@c-plusplus.net")) (:maintainer "Rüdiger Sonderfeld" . "ruediger@c-plusplus.net"))])
+ (qso . [(20260805 2330) ((emacs (25 1))) "Amateur radio QSO logging" tar ((:url . "https://github.com/K6SM/Emacs-QSO-Logger") (:commit . "984c6c1266299021af3fd768426cdb413dfa7a7d") (:revdesc . "984c6c126629") (:keywords "lisp"))])
+ (qt-pro-mode . [(20170604 1841) ((emacs (24))) "Qt Pro/Pri major mode" tar ((:url . "https://github.com/emacsorphanage/qt-pro-mode") (:commit . "1e0052fcfb89c15cb47714c1546d4e8ec6e01ae6") (:revdesc . "1e0052fcfb89") (:keywords "extensions") (:authors ("Todd Neal" . "tolchz@gmail.com")) (:maintainers ("Todd Neal" . "tolchz@gmail.com")) (:maintainer "Todd Neal" . "tolchz@gmail.com"))])
+ (qtcreator-theme . [(20201215 1523) ((emacs (24 3))) "A color theme that mimics Qt Creator IDE" tar ((:url . "https://github.com/LesleyLai/emacs-qtcreator-theme") (:commit . "515532b05063898459157d2ba5c10ec0d5a4b1bd") (:revdesc . "515532b05063") (:keywords "theme" "light" "faces") (:authors ("Lesley Lai" . "lesley@lesleylai.info")) (:maintainers ("Lesley Lai" . "lesley@lesleylai.info")) (:maintainer "Lesley Lai" . "lesley@lesleylai.info"))])
+ (quack . [(20181106 1301) nil "Enhanced support for editing and running Scheme code" tar ((:url . "https://github.com/emacsmirror/quack") (:commit . "2146805ce2b5a9b155d73929986f11e713787e26") (:revdesc . "2146805ce2b5"))])
+ (quakec-mode . [(20230619 947) ((emacs (27 1))) "Major mode for QuakeC" tar ((:url . "https://github.com/vkazanov/quakec-mode") (:commit . "7b5d13fbdd9dfdc319ee8db1f1e954e00bdfce54") (:revdesc . "7b5d13fbdd9d") (:keywords "games" "languages"))])
+ (quarto-mode . [(20221005 1632) ((emacs (25 1)) (polymode (0 2 2)) (poly-markdown (0 2 2)) (markdown-mode (2 3)) (request (0 3 2))) "A (poly)mode for https://quarto.org" tar ((:url . "https://github.com/quarto-dev/quarto-emacs") (:commit . "b7dcba7050b2e1e65acdd5656d08a186bca2c922") (:revdesc . "b7dcba7050b2") (:keywords "languages" "multi-modes"))])
+ (quasi-monochrome-theme . [(20200415 705) nil "Quasi Monochrome theme" tar ((:url . "https://github.com/lbolla/emacs-quasi-monochrome") (:commit . "b38d71860fdea945e10e8a766ac9dfa1410ade67") (:revdesc . "b38d71860fde") (:keywords "color-theme" "monochrome" "high contrast") (:authors ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainers ("Lorenzo Bolla" . "lbolla@gmail.com")) (:maintainer "Lorenzo Bolla" . "lbolla@gmail.com"))])
+ (quelpa . [(20250113 1906) ((emacs (25 1))) "Emacs Lisp packages built directly from source" tar ((:url . "https://github.com/quelpa/quelpa") (:commit . "cf01224edd82920a0fb8a90568d2e14347354fc8") (:revdesc . "cf01224edd82") (:keywords "tools" "package" "management" "build" "source" "elpa"))])
+ (quelpa-leaf . [(20251231 1621) ((emacs (25 1)) (quelpa (1 0)) (leaf (4 1 0))) "Quelpa handler for leaf" tar ((:url . "https://github.com/quelpa/quelpa-leaf") (:commit . "f9e9ef474a2f259d092c7262771e10d17aefbd7f") (:revdesc . "f9e9ef474a2f") (:keywords "convenience" "package" "managment" "elpa" "leaf") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (quelpa-use-package . [(20201022 746) ((emacs (25 1)) (quelpa (1 0)) (use-package (2))) "Quelpa handler for use-package" tar ((:url . "https://github.com/quelpa/quelpa-use-package") (:commit . "a97461008391d045aa2a506fc126280a12a060e4") (:revdesc . "a97461008391") (:keywords "package" "management" "elpa" "use-package"))])
+ (quick-buffer-switch . [(20221220 1142) nil "Quick switch to file or dir buffers" tar ((:url . "https://github.com/renard/quick-buffer-switch") (:commit . "280f67f1a5e02533573b45d585c222c937f11f81") (:revdesc . "280f67f1a5e0") (:keywords "emacs" "configuration") (:authors ("Sebastien Gross" . "seb•ɑƬ•chezwam•ɖɵʈ•org")) (:maintainers ("Sebastien Gross" . "seb•ɑƬ•chezwam•ɖɵʈ•org")) (:maintainer "Sebastien Gross" . "seb•ɑƬ•chezwam•ɖɵʈ•org"))])
+ (quick-fasd . [(20260826 250) ((emacs (26 1))) "Integration for the command-line tool `fasd'" tar ((:url . "https://github.com/jamescherti/quick-fasd.el") (:commit . "f849c8ae8c2e6166a279dd65e159c59f2b8257ce") (:revdesc . "f849c8ae8c2e") (:keywords "convenience" "files" "tools"))])
+ (quick-peek . [(20200130 2059) ((emacs (24 3))) "Inline quick-peek windows" tar ((:url . "https://github.com/cpitclaudel/quick-peek") (:commit . "03a276086795faad46a142454fc3e28cab058b70") (:revdesc . "03a276086795") (:keywords "tools" "help" "doc" "convenience") (:authors ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainers ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainer "Clément Pit-Claudel" . "clement.pitclaudel@live.com"))])
+ (quick-preview . [(20191017 1920) nil "Quick preview using GNOME sushi, gloobus or quick look" tar ((:url . "https://github.com/myuhe/quick-preview.el") (:commit . "a312ab5539b9a362da9d305e4da814e17c5721c9") (:revdesc . "a312ab5539b9") (:keywords "files" "hypermedia") (:authors ("myuhe" . "yuhei.maeda_at_gmail.com")))])
+ (quick-sdcv . [(20260826 246) ((emacs (25 1))) "Offline dictionary using 'sdcv' (StartDict cli dictionary)" tar ((:url . "https://github.com/jamescherti/quick-sdcv.el") (:commit . "47e3b209d36a236f5c1eca2fe40855f063e3bbeb") (:revdesc . "47e3b209d36a") (:keywords "tools" "convenience" "text"))])
+ (quick-shell-keybind . [(20230927 1036) ((emacs (24))) "Interactively bind a key to shell commands" tar ((:url . "https://github.com/eyeinsky/quick-shell-keybind") (:commit . "be830a69cf7eec92d4ea269fd389ac39b0c162f1") (:revdesc . "be830a69cf7e") (:keywords "maint" "convenience" "processes") (:authors ("eyeinsky" . "eyeinsky9@gmail.com")) (:maintainers ("eyeinsky" . "eyeinsky9@gmail.com")) (:maintainer "eyeinsky" . "eyeinsky9@gmail.com"))])
+ (quickref . [(20170817 1232) ((dash (1 0 3)) (s (1 0 0))) "Display relevant notes-to-self in the echo area" tar ((:url . "https://github.com/pd/quickref.el") (:commit . "f368c8b8219bb90498c5ab84e26f00eedaa234cf") (:revdesc . "f368c8b8219b"))])
+ (quickrun . [(20260103 1800) ((emacs (26 1)) (ht (2 0))) "Run commands quickly" tar ((:url . "https://github.com/emacsorphanage/quickrun") (:commit . "9199e222f95104ee83e115a9d5ac159d86816706") (:revdesc . "9199e222f951") (:keywords "tools") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (quiet . [(20230530 859) nil "Disconnect from the online world for a while" tar ((:url . "https://github.com/zzkt/quiet") (:commit . "985b56606517971330c08686c49a8d06db763f3c") (:revdesc . "985b56606517") (:keywords "convenience" "quiet" "distraction" "network" "detachment" "offline") (:authors ("nik gaffney" . "nik@fo.am")) (:maintainers ("nik gaffney" . "nik@fo.am")) (:maintainer "nik gaffney" . "nik@fo.am"))])
+ (quilt . [(20190828 506) ((emacs (26 0))) "Minor mode for working with files in quilt" tar ((:url . "https://github.com/jstranik/emacs-quilt") (:commit . "b56a1f1acc46cdf8655710e4c8f24f5f31f22c6a") (:revdesc . "b56a1f1acc46") (:keywords "extensions") (:authors ("Matt Mackall" . "mpm@selenic.com")) (:maintainers ("Jan Stranik" . "jan@stranik.org")) (:maintainer "Jan Stranik" . "jan@stranik.org"))])
+ (quiz . [(20260408 1543) ((emacs (25 1))) "Multiple choice quiz game" tar ((:url . "https://github.com/davep/quiz.el") (:commit . "9630cfbf0c2a0ee47d5ea146aeac0fe62e8d4a37") (:revdesc . "9630cfbf0c2a") (:keywords "games" "trivia" "quiz") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (quotient . [(20251029 1348) ((emacs (25 1)) (compat (30 1 0 1))) "A library for generating random quotes using a text corpus" tar ((:url . "https://github.com/tvirolai/quotient") (:commit . "3bece7b17a4ef7745f8c49c0c21570239f2b4ded") (:revdesc . "3bece7b17a4e") (:keywords "lisp") (:authors ("Tuomo Virolainen" . "tvirolai@soittakaaparanoid.mail.kapsi.fi")) (:maintainers ("Tuomo Virolainen" . "tvirolai@soittakaaparanoid.mail.kapsi.fi")) (:maintainer "Tuomo Virolainen" . "tvirolai@soittakaaparanoid.mail.kapsi.fi"))])
+ (qwen-chat-shell . [(20240612 343) ((emacs (27 1)) (shell-maker (0 50 1))) "Qwen-chat shell + buffer insert commands" tar ((:url . "https://github.com/Pavinberg/qwen-chat-shell") (:commit . "2d6562c8a75aebf7a59e554011571ba5883cf4fd") (:revdesc . "2d6562c8a75a") (:authors ("Pavinberg" . "pavin0702@gmail.com")) (:maintainers ("Pavinberg" . "pavin0702@gmail.com")) (:maintainer "Pavinberg" . "pavin0702@gmail.com"))])
+ (r-autoyas . [(20140101 1510) ((ess (0)) (yasnippet (0 8 0))) "Provides automatically created yasnippets for R function argument lists" tar ((:url . "https://github.com/mlf176f2/r-autoyas.el") (:commit . "d321a7da0ef2e94668d53e0807277da7b70ea678") (:revdesc . "d321a7da0ef2") (:keywords "r" "yasnippet"))])
+ (r-ts-mode . [(20260804 336) ((emacs (30 1))) "R treesitter mode" tar ((:url . "https://codeberg.org/R-for-emacs/r-ts-mode") (:commit . "0a86bdd3083095576810dfa586be5b712d838332") (:revdesc . "0a86bdd30830") (:authors ("Manuel Teodoro" . "ttm@teoten.me")) (:maintainers ("Manuel Teodoro" . "ttm@teoten.me")) (:maintainer "Manuel Teodoro" . "ttm@teoten.me"))])
+ (racer . [(20210307 243) ((emacs (25 1)) (rust-mode (0 2 0)) (dash (2 13 0)) (s (1 10 0)) (f (0 18 2)) (pos-tip (0 4 6))) "Code completion, goto-definition and docs browsing for Rust via racer" tar ((:url . "https://github.com/racer-rust/emacs-racer") (:commit . "1e63e98626737ea9b662d4a9b1ffd6842b1c648c") (:revdesc . "1e63e9862673") (:keywords "abbrev" "convenience" "matching" "rust" "tools"))])
+ (racket-mode . [(20260726 2002) ((emacs (25 1)) (compat (30 0 2 0))) "Racket editing, REPL, and more" tar ((:url . "https://www.racket-mode.com/") (:commit . "f92a33dcc3b604f53ef23a538e26e1f25c4fea47") (:revdesc . "f92a33dcc3b6") (:authors ("Greg Hendershott" . "racket-mode-author@greghendershott.com")))])
+ (rails-i18n . [(20220126 1643) ((emacs (27 2)) (yaml (0 1 0)) (dash (2 19 1))) "Seach and insert i18n on ruby code" tar ((:url . "https://github.com/otavioschwanck/rails-i18n.el") (:commit . "8e87e4e48e31902b8259ded28a208c2e7efea6e9") (:revdesc . "8e87e4e48e31") (:keywords "tools" "languages") (:authors ("Otávio Schwanck dos Santos" . "otavioschwanck@gmail.com")) (:maintainers ("Otávio Schwanck dos Santos" . "otavioschwanck@gmail.com")) (:maintainer "Otávio Schwanck dos Santos" . "otavioschwanck@gmail.com"))])
+ (rails-log-mode . [(20140408 425) nil "Major mode for viewing Rails log files" tar ((:url . "https://github.com/ananthakumaran/rails-log-mode") (:commit . "ff440003ad7d47cb0ac3300f2a632f4cfd36a446") (:revdesc . "ff440003ad7d") (:keywords "rails" "log") (:authors ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainers ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainer "Anantha kumaran" . "ananthakumaran@gmail.com"))])
+ (rails-routes . [(20220126 1631) ((emacs (27 2)) (inflections (1 1))) "Search for and insert rails routes" tar ((:url . "https://github.com/otavioschwanck/rails-routes") (:commit . "eab995a9297ca5bd9bd4f4c2737f2fecfc36def0") (:revdesc . "eab995a9297c") (:keywords "tools" "languages") (:authors ("Otávio Schwanck" . "otavioschwanck@gmail.com")) (:maintainers ("Otávio Schwanck" . "otavioschwanck@gmail.com")) (:maintainer "Otávio Schwanck" . "otavioschwanck@gmail.com"))])
+ (railscasts-reloaded-theme . [(20201130 903) nil "Railscasts Reloaded color theme" tar ((:url . "https://github.com/thegeorgeous/railscasts-reloaded-theme") (:commit . "1c3850568e60a555d59cbb57bf2b6aa06e99d454") (:revdesc . "1c3850568e60") (:authors ("George Thomas" . "iamgeorgethomas@gmail.com")) (:maintainers ("George Thomas" . "iamgeorgethomas@gmail.com")) (:maintainer "George Thomas" . "iamgeorgethomas@gmail.com"))])
+ (railscasts-theme . [(20150219 1525) nil "Railscasts color theme for GNU Emacs" tar ((:url . "https://github.com/mikenichols/railscasts-theme") (:commit . "1340c3f6c2717761cab95617cf8dcbd962b1095b") (:revdesc . "1340c3f6c271") (:keywords "railscasts" "color" "theme"))])
+ (rainbow-blocks . [(20210715 1518) nil "Block syntax highlighting for lisp code" tar ((:url . "https://github.com/istib/rainbow-blocks") (:commit . "83c4d6e77a1e25d3d2d124a4e90d5b084f3e15a5") (:revdesc . "83c4d6e77a1e"))])
+ (rainbow-delimiters . [(20210515 1254) nil "Highlight brackets according to their depth" tar ((:url . "https://github.com/Fanael/rainbow-delimiters") (:commit . "7919681b0d883502155d5b26e791fec15da6aeca") (:revdesc . "7919681b0d88") (:keywords "faces" "convenience" "lisp" "tools") (:authors ("Jeremy Rayman" . "opensource@jeremyrayman.com") ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (rainbow-fart . [(20251212 1420) ((emacs (25 1)) (flycheck (32 -4))) "Checks the keywords of code to play suitable sounds" tar ((:url . "https://repo.or.cz/emacs-rainbow-fart.git") (:commit . "3fe606cc2fa7cb6713e5e65e0adb7cd7a5ec4ea7") (:revdesc . "3fe606cc2fa7") (:keywords "tools") (:authors ("stardiviner" . "numbchild@gmail.com")) (:maintainers ("stardiviner" . "numbchild@gmail.com")) (:maintainer "stardiviner" . "numbchild@gmail.com"))])
+ (rainbow-identifiers . [(20141102 1526) ((emacs (24))) "Highlight identifiers according to their names" tar ((:url . "https://github.com/Fanael/rainbow-identifiers") (:commit . "19fbfded1baa98d12335f26f6d7b20e5ae44ce2e") (:revdesc . "19fbfded1baa") (:authors ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (rake . [(20220211 827) ((f (0 13 0)) (dash (1 5 0)) (cl-lib (0 5))) "Run rake commands" tar ((:url . "https://github.com/asok/rake.el") (:commit . "452ea0caca33376487103c64177c295ed2960cca") (:revdesc . "452ea0caca33") (:keywords "rake" "ruby") (:authors ("Adam Sokolnicki" . "adam.sokolnicki@gmail.com")) (:maintainers ("Adam Sokolnicki" . "adam.sokolnicki@gmail.com")) (:maintainer "Adam Sokolnicki" . "adam.sokolnicki@gmail.com"))])
+ (raku-mode . [(20250930 1151) ((emacs (24 4))) "Major mode for editing Raku code" tar ((:url . "https://github.com/hinrik/perl6-mode") (:commit . "d06baaa2e881470dddb97193713f9f0a278942ad") (:revdesc . "d06baaa2e881") (:keywords "languages") (:authors ("Hinrik rn Sigurðsson" . "hinrik.sig@gmail.com")) (:maintainers ("Hinrik rn Sigurðsson" . "hinrik.sig@gmail.com")) (:maintainer "Hinrik rn Sigurðsson" . "hinrik.sig@gmail.com"))])
+ (rally-mode . [(20161114 354) ((popwin (1 0 0))) "A mode to interact with the Rally Software web site" tar ((:url . "https://pragcraft.wordpress.com/") (:commit . "0f5e09a6abe2de7613f174b4f54863df93343134") (:revdesc . "0f5e09a6abe2") (:keywords "rally" "ca" "agile") (:authors ("Sean LeBlanc" . "seanleblanc@gmail.com")) (:maintainers ("Sean LeBlanc" . "seanleblanc@gmail.com")) (:maintainer "Sean LeBlanc" . "seanleblanc@gmail.com"))])
+ (rand-theme . [(20151219 2335) ((cl-lib (0 5))) "Random Emacs theme at start-up!" tar ((:url . "https://github.com/gopar/rand-theme") (:commit . "65a00e5c5150f857aa96803b68f50bc8da0215b7") (:revdesc . "65a00e5c5150"))])
+ (random-splash-image . [(20240501 1550) nil "Randomly sets splash image to *GNU Emacs* buffer on startup" tar ((:url . "https://github.com/kakakaya/random-splash-image") (:commit . "05a5cdb8315577536de5e425f6ef6cbb994c6282") (:revdesc . "05a5cdb83155") (:keywords "games") (:authors ("kakakaya" . "kakakayaATgmail.com")) (:maintainers ("kakakaya" . "kakakayaATgmail.com")) (:maintainer "kakakaya" . "kakakayaATgmail.com"))])
+ (ranger . [(20260527 2231) ((emacs (27 1))) "Make dired more like ranger" tar ((:url . "https://github.com/ralesi/ranger") (:commit . "cfcab21cd21eb48709fb4436ba84f3e2a048a432") (:revdesc . "cfcab21cd21e") (:keywords "files" "convenience" "dired") (:authors ("Rich Alesi" . "https://github.com/ralesi")) (:maintainers ("Rich Alesi" . "https://github.com/ralesi")) (:maintainer "Rich Alesi" . "https://github.com/ralesi"))])
+ (rare-words . [(20260401 618) ((emacs (29 1))) "Highlight your rare words!" tar ((:url . "https://github.com/amolv06/rare-words") (:commit . "7e6b3e2083dd37e1a150422c648c28d3b703f185") (:revdesc . "7e6b3e2083dd") (:authors ("Amol Vaidya" . "amolvaidya.signup@gmail.com")) (:maintainers ("Amol Vaidya" . "amolvaidya.signup@gmail.com")) (:maintainer "Amol Vaidya" . "amolvaidya.signup@gmail.com"))])
+ (rase . [(20120928 2045) nil "Run At Sun Event daemon" tar ((:url . "https://github.com/m00natic/rase/") (:commit . "59b5f7e8102570b65040e8d55781c7ea28de7338") (:revdesc . "59b5f7e81025") (:keywords "solar" "sunrise" "sunset" "midday" "midnight") (:authors ("Andrey Kotlarski" . "m00naticus@gmail.com")) (:maintainers ("Andrey Kotlarski" . "m00naticus@gmail.com")) (:maintainer "Andrey Kotlarski" . "m00naticus@gmail.com"))])
+ (rasi-mode . [(20250603 758) ((emacs (24 3))) "Major mode for editing RASI configuration files" tar ((:url . "https://github.com/taquangtrung/emacs-rasi-mode") (:commit . "f6c8551cdc98cb893997f482b9d8d6b366fa39d8") (:revdesc . "f6c8551cdc98") (:keywords "languages"))])
+ (rats . [(20170818 1013) ((s (1 10 0)) (go-mode (1 3 1)) (cl-lib (0 5))) "Rapid testing suite for Go" tar ((:url . "https://github.com/ane/rats.el") (:commit . "a6d55aebcc54f669c6c6ffedf84364c4097903cc") (:revdesc . "a6d55aebcc54") (:keywords "go") (:authors ("Antoine Kalmbach" . "ane@iki.fi")) (:maintainers ("Antoine Kalmbach" . "ane@iki.fi")) (:maintainer "Antoine Kalmbach" . "ane@iki.fi"))])
+ (raycast-mode . [(20230607 2107) ((emacs (26 1))) "Develop Raycast Extensions" tar ((:url . "https://github.com/nhojb/raycast-mode") (:commit . "f6401605cc9dfacdcaaf98d5844348b818cfc010") (:revdesc . "f6401605cc9d") (:keywords "convenience" "languages" "tools") (:authors ("John Buckley" . "nhoj.buckley@gmail.com")) (:maintainers ("John Buckley" . "nhoj.buckley@gmail.com")) (:maintainer "John Buckley" . "nhoj.buckley@gmail.com"))])
+ (rbenv . [(20240120 6) nil "Emacs integration for rbenv" tar ((:url . "https://github.com/senny/rbenv.el") (:commit . "588b817d510737b9d6afd6d1ecddd517d96b78e5") (:revdesc . "588b817d5107") (:keywords "ruby" "rbenv") (:authors ("Yves Senn" . "yves.senn@gmail.com")) (:maintainers ("Yves Senn" . "yves.senn@gmail.com")) (:maintainer "Yves Senn" . "yves.senn@gmail.com"))])
+ (rbs-mode . [(20260203 1023) ((emacs (25 3))) "A major mode for RBS" tar ((:url . "https://github.com/ybiquitous/rbs-mode") (:commit . "c88a53a1981c301a65fa21de225708085d087b7e") (:revdesc . "c88a53a1981c") (:keywords "languages"))])
+ (rbt . [(20170202 2302) ((popup (0 5 3)) (magit (20160128 1201))) "Integrate reviewboard with emacs" tar ((:url . "https://github.com/joeheyming/rbt.el") (:commit . "32bfba9062a014e375451cf4203c29535b5efc1e") (:revdesc . "32bfba9062a0") (:keywords "reviewboard" "rbt") (:authors ("Joe Heyming" . "joeheyming@gmail.com")) (:maintainers ("Joe Heyming" . "joeheyming@gmail.com")) (:maintainer "Joe Heyming" . "joeheyming@gmail.com"))])
+ (rbtagger . [(20251024 1551) ((emacs (25 1))) "Ruby tagging tools" tar ((:url . "https://www.github.com/thiagoa/rbtagger") (:commit . "650c428ef145ce697f02ef12cfadd9deb82b856f") (:revdesc . "650c428ef145") (:keywords "languages" "tools") (:authors ("Thiago Araújo" . "thiagoaraujos@gmail.com")) (:maintainers ("Thiago Araújo" . "thiagoaraujos@gmail.com")) (:maintainer "Thiago Araújo" . "thiagoaraujos@gmail.com"))])
+ (rc-mode . [(20160913 1918) nil "Major mode for the Plan9 rc shell" tar ((:url . "https://github.com/mrhmouse/rc-mode.el") (:commit . "fe2e0570bf9c19a292e16b18fd4b0a256df5d93f") (:revdesc . "fe2e0570bf9c") (:keywords "rc" "plan9" "shell"))])
+ (rcirc-alertify . [(20140407 119) ((alert (20140406 1353))) "Cross platform notifications for rcirc" tar ((:url . "https://github.com/fgallina/rcirc-alertify") (:commit . "ea5cafc55893f375eccbe013d12dbaa94bf6e259") (:revdesc . "ea5cafc55893") (:keywords "comm" "convenience") (:authors ("Fabián Ezequiel Gallina" . "fgallina@gnu.org")) (:maintainers ("Fabián Ezequiel Gallina" . "fgallina@gnu.org")) (:maintainer "Fabián Ezequiel Gallina" . "fgallina@gnu.org"))])
+ (rcirc-groups . [(20170731 2101) nil "An emacs buffer in rcirc-groups major mode" tar ((:url . "http://tapoueh.org/emacs/rcirc-groups.html") (:commit . "b68ece9d219b909244d4e3c0d8bf6a746d6fead7") (:revdesc . "b68ece9d219b") (:keywords "comm" "convenience") (:authors ("Dimitri Fontaine" . "dim@tapoueh.org")) (:maintainers ("Dimitri Fontaine" . "dim@tapoueh.org")) (:maintainer "Dimitri Fontaine" . "dim@tapoueh.org"))])
+ (rcirc-notify . [(20150219 2204) nil "Libnotify popups" tar ((:url . "https://github.com/nicferrier/rcirc-notify") (:commit . "841a7b5a6cdb0c11a812df924d2c6a7d364fd455") (:revdesc . "841a7b5a6cdb") (:keywords "lisp" "rcirc" "irc" "notify" "growl") (:authors ("Alex Schroeder" . "alex@gnu.org") ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (rcirc-styles . [(20210414 1712) ((cl-lib (0 5))) "Support mIRC-style color and attribute codes" tar ((:url . "https://github.com/aaron-em/rcirc-styles.el") (:commit . "dd06ec5fa455131788bbc885fcfaaec16b08f13b") (:revdesc . "dd06ec5fa455"))])
+ (rdf-prefix . [(20240403 1710) nil "Prefix lookup for RDF" tar ((:url . "https://github.com/simenheg/rdf-prefix") (:commit . "c591608d12278b293a14c27ab2df72a269eb535d") (:revdesc . "c591608d1227") (:keywords "convenience" "abbrev") (:authors ("Simen Heggestøyl" . "simenheg@runbox.com")) (:maintainers ("Simen Heggestøyl" . "simenheg@runbox.com")) (:maintainer "Simen Heggestøyl" . "simenheg@runbox.com"))])
+ (rdxmk . [(20170630 134) nil "A small set of tools for redox developments" tar ((:url . "https://github.com/jsalzbergedu/rdxmk") (:commit . "e78749fb29738365ffa4d863ffabeb969ebb0bcf") (:revdesc . "e78749fb2973") (:keywords "redox" "convenience" "tools") (:authors ("Jacob Salzberg" . "jsalzbergedu@yahoo.com")) (:maintainers ("Jacob Salzberg" . "jsalzbergedu@yahoo.com")) (:maintainer "Jacob Salzberg" . "jsalzbergedu@yahoo.com"))])
+ (react-snippets . [(20210430 1510) ((yasnippet (0 7 0))) "Yasnippets for React" tar ((:url . "https://github.com/johnmastro/react-snippets.el") (:commit . "9d0a1bb90ac36c689cded48b661e81d4544fd719") (:revdesc . "9d0a1bb90ac3") (:keywords "snippets") (:authors ("John Mastro" . "john.b.mastro@gmail.com")) (:maintainers ("John Mastro" . "john.b.mastro@gmail.com")) (:maintainer "John Mastro" . "john.b.mastro@gmail.com"))])
+ (read-aloud . [(20160923 500) ((emacs (24 4))) "A simple interface to TTS engines" tar ((:url . "https://github.com/gromnitsky/read-aloud.el") (:commit . "d5f80ab72054a957aed25224639c1779cae5f4d1") (:revdesc . "d5f80ab72054") (:keywords "multimedia") (:authors ("Alexander Gromnitsky" . "alexander.gromnitsky@gmail.com")) (:maintainers ("Alexander Gromnitsky" . "alexander.gromnitsky@gmail.com")) (:maintainer "Alexander Gromnitsky" . "alexander.gromnitsky@gmail.com"))])
+ (read-only-cfg . [(20210717 205) ((emacs (24 3))) "Make files read-only based on user config" tar ((:url . "https://github.com/pfchen/read-only-cfg") (:commit . "fa16d6018a5a29f26adf6007b6b76ea1b3c0bfce") (:revdesc . "fa16d6018a5a") (:keywords "tools" "convenience") (:authors ("pfchen" . "pfchen31@gmail.com")) (:maintainers ("pfchen" . "pfchen31@gmail.com")) (:maintainer "pfchen" . "pfchen31@gmail.com"))])
+ (readable-numbers . [(20220711 911) ((emacs (24 1))) "Visually separate long integers" tar ((:url . "https://github.com/Titan-C/cardano.el") (:commit . "a3ebdcdd91d32f044b68541a00e162396e4acb38") (:revdesc . "a3ebdcdd91d3") (:authors ("Oscar Najera" . "https://oscarnajera.com")) (:maintainers ("Oscar Najera" . "hi@oscarnajera.com")) (:maintainer "Oscar Najera" . "hi@oscarnajera.com"))])
+ (readline-complete . [(20150708 1437) nil "Offers completions in shell mode" tar ((:url . "https://github.com/monsanto/readline-complete.el") (:commit . "30c020c37b2741160cc37e656e13c85d826a0ebf") (:revdesc . "30c020c37b27") (:authors ("Christopher Monsanto" . "chris@monsan.to")) (:maintainers ("Christopher Monsanto" . "chris@monsan.to")) (:maintainer "Christopher Monsanto" . "chris@monsan.to"))])
+ (ready-player . [(20260224 915) ((emacs (28 1))) "Open media files in ready-player major mode" tar ((:url . "https://github.com/xenodium/ready-player") (:commit . "e7737e59f9bc70872935a46da67eef919b9141c4") (:revdesc . "e7737e59f9bc"))])
+ (real-auto-save . [(20260107 1112) ((emacs (24 4))) "Automatically save your buffers/files at regular intervals" tar ((:url . "https://github.com/ChillarAnand/real-auto-save") (:commit . "b74a9fd408196c9333b465852c76525df0371ad1") (:revdesc . "b74a9fd40819") (:authors ("Chaoji Li" . "lichaojiATgmailDOTcom") ("Anand Reddy Pandikunta" . "anand21nandaATgmailDOTcom")) (:maintainers ("Chaoji Li" . "lichaojiATgmailDOTcom") ("Anand Reddy Pandikunta" . "anand21nandaATgmailDOTcom")) (:maintainer "Chaoji Li" . "lichaojiATgmailDOTcom"))])
+ (real-mono-themes . [(20251126 803) ((emacs (28 1))) "Real monochromatic color themes" tar ((:url . "https://github.com/NestorLiao/real-mono-themes") (:commit . "45d68036bce5c3d95fcfdb4f02fca5fddb70e3db") (:revdesc . "45d68036bce5") (:keywords "faces") (:authors ("Qingsong Liao" . "llqingsong@qq.com")) (:maintainers ("Qingsong Liao" . "llqingsong@qq.com")) (:maintainer "Qingsong Liao" . "llqingsong@qq.com"))])
+ (realgud . [(20260821 933) ((load-relative (1 3 2)) (loc-changes (1 2)) (test-simple (1 3 0)) (emacs (27))) "A modular front-end for interacting with external debuggers" tar ((:url . "https://github.com/realgud/realgud/") (:commit . "2075721ad093b4525038f746cc4ad5c013f6d0b8") (:revdesc . "2075721ad093") (:keywords "debugger" "gdb" "python" "perl" "go" "bash" "zsh" "bashdb" "zshdb" "remake" "trepan" "perldb" "pdb") (:authors ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainers ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainer "Rocky Bernstein" . "rocky@gnu.org"))])
+ (realgud-byebug . [(20190520 1140) ((realgud (1 4 5)) (load-relative (1 2)) (cl-lib (0 5)) (emacs (24))) "Realgud front-end to the Ruby byebug debugger" tar ((:url . "https://github.com/rocky/realgud-byebug") (:commit . "f8f20b92c6b13f75cc9797921c0e28d3def48b1c") (:revdesc . "f8f20b92c6b1"))])
+ (realgud-ipdb . [(20200722 1116) ((realgud (1 5 0)) (load-relative (1 3 1)) (emacs (25))) "Realgud front-end to ipdb" tar ((:url . "https://github.com/realgud/realgud-ipdb") (:commit . "f18f907aa4ddd3e59dc19ca296d4ee2dc5e436b0") (:revdesc . "f18f907aa4dd") (:authors ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainers ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainer "Rocky Bernstein" . "rocky@gnu.org"))])
+ (realgud-jdb . [(20260725 1431) ((realgud (1 5 0)) (load-relative (1 3 1)) (emacs (25))) "Realgud front-end to Java's jdb debugger\"" tar ((:url . "https://github.com/realgud/realgud-jdb") (:commit . "af014859343e77f5eea408398314a066db92e253") (:revdesc . "af014859343e") (:authors ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainers ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainer "Rocky Bernstein" . "rocky@gnu.org"))])
+ (realgud-lldb . [(20260105 1658) ((load-relative (1 3 1)) (realgud (1 5 0)) (emacs (25))) "Realgud front-end to lldb" tar ((:url . "https://github.com/realgud/realgud-lldb") (:commit . "2521026a8dc8f1b6ce491a580be21808f6f5f1df") (:revdesc . "2521026a8dc8") (:authors ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainers ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainer "Rocky Bernstein" . "rocky@gnu.org"))])
+ (realgud-node-debug . [(20190525 1634) ((realgud (1 4 5)) (load-relative (1 2)) (cl-lib (0 5)) (emacs (25))) "Realgud front-end to older \"node debug\"" tar ((:url . "https://github.com/realgud/realgud-node-debug") (:commit . "72e786359ce9dace1796b0d81a00e9340e9c90ad") (:revdesc . "72e786359ce9") (:authors ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainers ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainer "Rocky Bernstein" . "rocky@gnu.org"))])
+ (realgud-node-inspect . [(20190523 1251) ((realgud (1 4 5)) (load-relative (1 2)) (cl-lib (0 5)) (emacs (24))) "Realgud front-end to newer \"node inspect\"" tar ((:url . "https://github.com/realgud/realgud-node-inspect") (:commit . "e0f18442d759b8ce4479c01e090975b62270257d") (:revdesc . "e0f18442d759") (:authors ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainers ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainer "Rocky Bernstein" . "rocky@gnu.org"))])
+ (realgud-old-debuggers . [(20190520 1150) ((realgud (1 4 5)) (load-relative (1 2)) (cl-lib (0 5)) (emacs (24))) "Realgud front-end to older lesser-used debuggers" tar ((:url . "https://github.com/rocky/realgud-old-debuggers") (:commit . "0fad38283e885c452160232e01adf3f6ae51983b") (:revdesc . "0fad38283e88"))])
+ (realgud-pry . [(20201011 1815) ((realgud (1 4 5)) (load-relative (1 2)) (cl-lib (0 5)) (emacs (25))) "Realgud front-end to the Ruby pry debugger" tar ((:url . "https://github.com/rocky/realgud-pry") (:commit . "264ca6811b0bef5de4decc54acfeacf0bce2f51f") (:revdesc . "264ca6811b0b"))])
+ (realgud-rdb2 . [(20190520 1146) ((realgud (1 4 5)) (load-relative (1 2)) (cl-lib (0 5)) (emacs (24))) "Realgud front-end for interacting with Ruby debugger2" tar ((:url . "https://github.com/rocky/realgud-ruby-debugger2") (:commit . "3594aa74f7afda3c3251bb2af7fe0e8ec6d621ae") (:revdesc . "3594aa74f7af"))])
+ (realgud-trepan-ni . [(20210513 2237) ((load-relative (1 2)) (realgud (1 5 0)) (emacs (25))) "Realgud front-end to trepan-ni" tar ((:url . "https://github.com/realgud/realgud-trepan-ni") (:commit . "0ec088ea343835e24ae73da09bea96bfb02a3130") (:revdesc . "0ec088ea3438") (:authors ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainers ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainer "Rocky Bernstein" . "rocky@gnu.org"))])
+ (reaper . [(20260206 2340) ((emacs (26 2))) "Interact with Harvest time tracking app" tar ((:url . "https://github.com/xendk/reaper") (:commit . "71c0fcb54a13a446851d4fb351fd9576fefe4172") (:revdesc . "71c0fcb54a13") (:keywords "tools") (:authors ("Thomas Fini Hansen" . "xen@xen.dk")) (:maintainers ("Thomas Fini Hansen" . "xen@xen.dk")) (:maintainer "Thomas Fini Hansen" . "xen@xen.dk"))])
+ (reason-mode . [(20230405 517) ((emacs (24 3))) "A major mode for editing ReasonML" tar ((:url . "https://github.com/reasonml-editor/reason-mode") (:commit . "d657ff75572a8ea7eda6fe22ada3a2ebf5bc6119") (:revdesc . "d657ff75572a") (:keywords "languages" "ocaml"))])
+ (reazon . [(20260101 1930) ((emacs (26))) "MiniKanren for Emacs" tar ((:url . "https://github.com/nickdrozd/reazon") (:commit . "377e879202943eba10b812f372d6cb00aa344fe9") (:revdesc . "377e87920294") (:keywords "languages" "extensions" "lisp") (:authors ("Nick Drozd" . "nicholasdrozd@gmail.com")) (:maintainers ("Nick Drozd" . "nicholasdrozd@gmail.com")) (:maintainer "Nick Drozd" . "nicholasdrozd@gmail.com"))])
+ (rebecca-theme . [(20250603 428) ((emacs (24))) "Rebecca Purple Theme" tar ((:url . "https://github.com/vic/rebecca-theme") (:commit . "718787fb8c9f3e29e09bb9cbdd966c810f15aa81") (:revdesc . "718787fb8c9f") (:keywords "theme" "dark") (:authors ("vic" . "vborja@apache.org")) (:maintainers ("vic" . "vborja@apache.org")) (:maintainer "vic" . "vborja@apache.org"))])
+ (rebox2 . [(20121113 1300) nil "Handling of comment boxes in various styles" tar ((:url . "https://github.com/lewang/rebox2") (:commit . "00634eca420cc48657b81e40e599ff8548083985") (:revdesc . "00634eca420c"))])
+ (recall . [(20250120 2131) ((emacs (29 1))) "Recall Emacs subprocess" tar ((:url . "https://github.com/svaante/recall") (:commit . "a8f961e9a5d6b609ee1934a0ae68ed003ee4987b") (:revdesc . "a8f961e9a5d6") (:maintainers ("Daniel Pettersson" . "daniel@dpettersson.net")) (:maintainer "Daniel Pettersson" . "daniel@dpettersson.net"))])
+ (recentf-ext . [(20170926 35) nil "Recentf extensions" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/recentf-ext.el") (:commit . "450de5f8544ed6414e88d4924d7daa5caa55b7fe") (:revdesc . "450de5f8544e") (:keywords "convenience" "files") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (recentf-remove-sudo-tramp-prefix . [(20220621 749) ((emacs (24 4))) "Normalise recentf history" tar ((:url . "https://github.com/ncaq/recentf-remove-sudo-tramp-prefix") (:commit . "95ff600058371dd08f615095a55850d2910021bb") (:revdesc . "95ff60005837") (:authors ("ncaq" . "ncaq@ncaq.net")) (:maintainers ("ncaq" . "ncaq@ncaq.net")) (:maintainer "ncaq" . "ncaq@ncaq.net"))])
+ (recently . [(20210930 207) ((cl-lib (0 5)) (emacs (24))) "Track recently opened files to visit them again" tar ((:url . "https://github.com/10sr/recently-el") (:commit . "94b31f6bf1dab6af942948fec975e37424938a62") (:revdesc . "94b31f6bf1da") (:keywords "utility" "files") (:authors ("10sr" . "8.slashes[at]gmail[dot]com")) (:maintainers ("10sr" . "8.slashes[at]gmail[dot]com")) (:maintainer "10sr" . "8.slashes[at]gmail[dot]com"))])
+ (recompile-on-save . [(20151126 1446) ((dash (1 1 0)) (cl-lib (0 5))) "Trigger recompilation on file save" tar ((:url . "https://github.com/maio/recompile-on-save.el") (:commit . "92e11446869d878803d4f3dec5d2101380c12bb2") (:revdesc . "92e11446869d") (:keywords "convenience" "files" "processes" "tools") (:authors ("Marian Schubert" . "marian.schubert@gmail.com")) (:maintainers ("Marian Schubert" . "marian.schubert@gmail.com")) (:maintainer "Marian Schubert" . "marian.schubert@gmail.com"))])
+ (recomplete . [(20260504 1201) ((emacs (29 1)) (with-command-redo (0 1))) "Immediately (re)complete actions" tar ((:url . "https://codeberg.org/ideasman42/emacs-recomplete") (:commit . "d8e2b35a65910fee40cebee39153c1e6bc462cc1") (:revdesc . "d8e2b35a6591") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (recover-buffers . [(20171009 437) nil "Revisit all buffers from an auto-save file" tar ((:url . "https://github.com/tripleee/recover-buffers") (:commit . "81a5cb53099955ebc2a411a44cba5a394ee3f2d1") (:revdesc . "81a5cb530999") (:authors ("era eriksson" . "http://www.iki.fi/era")) (:maintainers ("era eriksson" . "http://www.iki.fi/era")) (:maintainer "era eriksson" . "http://www.iki.fi/era"))])
+ (rect+ . [(20250120 829) nil "Extensions to rect.el" tar ((:url . "https://github.com/mhayashi1120/Emacs-rectplus") (:commit . "6b1d49b64b331c4f59a265e0fa91333a0e8243c2") (:revdesc . "6b1d49b64b33") (:keywords "extensions" "data" "tools") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (rectangle-utils . [(20260105 501) ((emacs (24)) (cl-lib (0 5))) "Some useful rectangle functions" tar ((:url . "https://github.com/thierryvolpiatto/rectangle-utils") (:commit . "309034e06fcab69eff094709ba98af9d607dbcbc") (:revdesc . "309034e06fca") (:authors ("Thierry Volpiatto" . "thierry.volpiatto@gmail.com")) (:maintainers ("Thierry Volpiatto" . "thierry.volpiatto@gmail.com")) (:maintainer "Thierry Volpiatto" . "thierry.volpiatto@gmail.com"))])
+ (recur . [(20230121 1836) ((emacs (24 3))) "Tail call optimization" tar ((:url . "https://github.com/ROCKTAKEY/recur") (:commit . "043b3267125cb9fa273d0f0afee0dda1fc60c507") (:revdesc . "043b3267125c") (:keywords "lisp") (:authors ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "ROCKTAKEY" . "rocktakey@gmail.com"))])
+ (recursion-indicator . [(20260519 1025) ((emacs (29 1)) (compat (31))) "Recursion indicator" tar ((:url . "https://github.com/minad/recursion-indicator") (:commit . "eb33010866742808cabae694fa4e77b33737522e") (:revdesc . "eb3301086674") (:keywords "convenience") (:authors ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (recursive-narrow . [(20190306 1521) nil "Narrow-to-region that operates recursively" tar ((:url . "https://github.com/nflath/recursive-narrow") (:commit . "5e3e2067d5a148d7e64e64e0355d3b6860e4c259") (:revdesc . "5e3e2067d5a1") (:authors ("Nathaniel Flath" . "flat0103@gmail.com")) (:maintainers ("Nathaniel Flath" . "flat0103@gmail.com")) (:maintainer "Nathaniel Flath" . "flat0103@gmail.com"))])
+ (redacted . [(20220108 1037) ((emacs (25 1))) "Obscure text in buffer" tar ((:url . "https://github.com/bkaestner/redacted.el") (:commit . "b3f44ccf51d9d5274f7837fc825db0a378055744") (:revdesc . "b3f44ccf51d9") (:keywords "games") (:authors ("Benjamin Kästner" . "benjamin.kaestner@gmail.com")) (:maintainers ("Benjamin Kästner" . "benjamin.kaestner@gmail.com")) (:maintainer "Benjamin Kästner" . "benjamin.kaestner@gmail.com"))])
+ (reddigg . [(20260824 222) ((emacs (26 3)) (promise (1 1)) (ht (2 3)) (org (9 2))) "A reader for redditt" tar ((:url . "https://github.com/thanhvg/emacs-reddigg") (:commit . "cae4026c72c9e7e36c365d16141c5c2cc79f2712") (:revdesc . "cae4026c72c9") (:authors ("Thanh Vuong" . "thanhvg@gmail.com")) (:maintainers ("Thanh Vuong" . "thanhvg@gmail.com")) (:maintainer "Thanh Vuong" . "thanhvg@gmail.com"))])
+ (redis . [(20231111 1733) ((emacs (24)) (cl-lib (0 5))) "Redis integration" tar ((:url . "https://github.com/emacs-pe/redis.el") (:commit . "84382456beae70677aed2f9558a0b446f8ccc17a") (:revdesc . "84382456beae") (:keywords "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (redpen-paragraph . [(20160625 1050) ((emacs (24)) (cl-lib (0 5)) (json (1 4))) "RedPen interface" tar ((:url . "https://github.com/karronoli/redpen-paragraph.el") (:commit . "770ffb34b04bfa0ea8484fa1506e96c530168e13") (:revdesc . "770ffb34b04b") (:keywords "document" "proofreading" "help"))])
+ (redprl . [(20180418 1434) ((emacs (24 3))) "Major mode for editing RedPRL proofs and interacting with RedPRL" tar ((:url . "https://github.com/RedPRL/sml-redprl") (:commit . "4abdbdeda4604ff30ce19c0df3f43e34faf60bd7") (:revdesc . "4abdbdeda460") (:keywords "languages") (:authors ("Jonathan Sterling" . "jon@jonmsterling.com")) (:maintainers ("Jonathan Sterling" . "jon@jonmsterling.com")) (:maintainer "Jonathan Sterling" . "jon@jonmsterling.com"))])
+ (redshank . [(20180730 407) ((paredit (21))) "Common Lisp Editing Extensions" tar ((:url . "https://github.com/emacsattic/redshank") (:commit . "d059c5841044aa163664f8bf87c1d981bf0a04fe") (:revdesc . "d059c5841044") (:keywords "languages" "lisp") (:authors ("Michael Weber" . "michaelw@foldr.org")) (:maintainers ("Michael Weber" . "michaelw@foldr.org")) (:maintainer "Michael Weber" . "michaelw@foldr.org"))])
+ (redtick . [(20180424 2136) ((emacs (24 4))) "Smallest pomodoro timer (1 char)" tar ((:url . "https://github.com/ferfebles/redtick") (:commit . "0faa6b7b479fae39f5d4632f0cbbef0f2917780e") (:revdesc . "0faa6b7b479f") (:keywords "calendar"))])
+ (redtt . [(20181121 21) ((emacs (25 3))) "Major mode for editing redtt proofs" tar ((:url . "https://github.com/RedPRL/redtt") (:commit . "c95d1a0787fb92eb011df690b4bdc1029a611c0b") (:revdesc . "c95d1a0787fb") (:keywords "languages") (:authors ("Jonathan Sterling" . "jon@jonmsterling.com")) (:maintainers ("Jonathan Sterling" . "jon@jonmsterling.com")) (:maintainer "Jonathan Sterling" . "jon@jonmsterling.com"))])
+ (refine . [(20240914 634) ((emacs (24 3)) (s (1 11 0)) (dash (2 12 0)) (list-utils (0 4 4)) (loop (1 2))) "Interactive value editing" tar ((:url . "https://github.com/Wilfred/refine") (:commit . "07c1f3518fff4e363c68c0a110137756754641df") (:revdesc . "07c1f3518fff") (:keywords "convenience") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (reformatter . [(20241204 1051) ((emacs (24 3))) "Define commands which run reformatters on the current buffer" tar ((:url . "https://github.com/purcell/emacs-reformatter") (:commit . "f2cb59466b1c3f85a8c960f7d4b7b7ead015bedc") (:revdesc . "f2cb59466b1c") (:keywords "convenience" "tools") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (regex-dsl . [(20220125 506) nil "Lisp syntax for regexps" tar ((:url . "https://github.com/alk/elisp-regex-dsl") (:commit . "8802555ecdab8b50bb64181798497c10cdb5034b") (:revdesc . "8802555ecdab") (:authors ("Aliaksey Kandratsenka" . "alk@tut.by")) (:maintainers ("Aliaksey Kandratsenka" . "alk@tut.by")) (:maintainer "Aliaksey Kandratsenka" . "alk@tut.by"))])
+ (regex-tool . [(20170104 1918) nil "A regular expression evaluation tool for programmers" tar ((:url . "http://www.newartisans.com/") (:commit . "0b4a0111143c88ef94bec56624cb2e00c1a054e6") (:revdesc . "0b4a0111143c") (:keywords "regex" "languages" "programming" "development") (:authors ("John Wiegley" . "johnw@newartisans.com")) (:maintainers ("John Wiegley" . "johnw@newartisans.com")) (:maintainer "John Wiegley" . "johnw@newartisans.com"))])
+ (region-bindings-mode . [(20140407 2214) nil "Enable custom bindings when mark is active" tar ((:url . "https://github.com/fgallina/region-bindings-mode") (:commit . "3fa5dbdbd7c000bebff6d9d14a4be326ec24b6fc") (:revdesc . "3fa5dbdbd7c0") (:keywords "convenience") (:authors ("Fabián E. Gallina" . "fabian@anue.biz")) (:maintainers ("Fabián E. Gallina" . "fabian@anue.biz")) (:maintainer "Fabián E. Gallina" . "fabian@anue.biz"))])
+ (region-convert . [(20210519 1655) ((emacs (24 3))) "Convert string in region by Lisp function" tar ((:url . "https://github.com/zonuexe/right-click-context") (:commit . "cb3ab0417d7b74e5edd34bf23a70737fc7bf1d3a") (:revdesc . "cb3ab0417d7b") (:keywords "region" "convenience") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (region-occurrences-highlighter . [(20241219 1705) ((emacs (26 1))) "Mark occurrences of current region (selection)" tar ((:url . "https://github.com/alvarogonzalezsotillo/region-occurrences-highlighter") (:commit . "4c2c7a241fd257dd51f2726715cd1be022b3445a") (:revdesc . "4c2c7a241fd2") (:keywords "convenience") (:authors ("lvaro González Sotillo" . "alvarogonzalezsotillo@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (region-state . [(20181205 1746) nil "Show the number of chars/lines or rows/columns in the region" tar ((:url . "https://github.com/xuchunyang/region-state.el") (:commit . "f9e3926036a7c261b20bad9bf46f68ead8c15024") (:revdesc . "f9e3926036a7") (:keywords "convenience") (:authors ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainers ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainer "Chunyang Xu" . "mail@xuchunyang.me"))])
+ (register-channel . [(20210120 1618) nil "Jump around fast using registers" tar ((:url . "https://github.com/YangZhao11/register-channel") (:commit . "ed7f563e92170b758dc878fcb5df88d46d5d44cc") (:revdesc . "ed7f563e9217") (:keywords "convenience") (:authors ("Yang Zhao" . "YangZhao11@users.noreply.github.com")) (:maintainers ("Yang Zhao" . "YangZhao11@users.noreply.github.com")) (:maintainer "Yang Zhao" . "YangZhao11@users.noreply.github.com"))])
+ (rego-mode . [(20201102 1420) ((emacs (24 4)) (reformatter (0 3))) "A major mode for rego language" tar ((:url . "https://github.com/psibi/rego-mode") (:commit . "be110e6cef5d34eef0529a8739c68e619cf15310") (:revdesc . "be110e6cef5d") (:keywords "languages") (:authors ("Sibi Prabakaran" . "sibi@psibi.in")) (:maintainers ("Sibi Prabakaran" . "sibi@psibi.in")) (:maintainer "Sibi Prabakaran" . "sibi@psibi.in"))])
+ (regswap . [(20240602 2051) ((emacs (24 3))) "Functionality for swapping two regions" tar ((:url . "https://github.com/skitov/regswap") (:commit . "65e2319e013c5d59f338edde12b98ef1c737e870") (:revdesc . "65e2319e013c"))])
+ (related . [(20190327 1024) ((cl-lib (0 5))) "Switch back and forth between similarly named buffers" tar ((:url . "https://github.com/julien-montmartin/related") (:commit . "546c7e811b290470288b617f2c27106bd83ccd33") (:revdesc . "546c7e811b29") (:keywords "file" "buffer" "switch" "selection" "matching" "convenience"))])
+ (related-files . [(20230903 851) ((emacs (28 2))) "Easily find files related to the current one" tar ((:url . "https://www.gnu.org/software/emacs/") (:commit . "8020f375013d5e83c9b8117d118d2402c63e66bb") (:revdesc . "8020f375013d") (:keywords "tools") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (remark-mode . [(20221123 2127) ((emacs (25 1)) (markdown-mode (2 0))) "Major mode for the remark slideshow tool" tar ((:url . "https://github.com/torgeir/remark-mode.el") (:commit . "5a2a702d2af8fd007ae02237d5824356d0c1acc6") (:revdesc . "5a2a702d2af8") (:keywords "remark" "slideshow" "markdown" "hot reload") (:authors (nil . "@torgeir")) (:maintainers (nil . "@torgeir")) (:maintainer nil . "@torgeir"))])
+ (remember-last-theme . [(20250921 2104) ((emacs (24 4))) "Remember the last used theme between sessions" tar ((:url . "https://github.com/nullvec/remember-last-theme") (:commit . "6c180928df64bf825f96241291b90e44f5163032") (:revdesc . "6c180928df64") (:keywords "convenience" "faces") (:authors ("A. Hdez" . "trefoil_chilled_7k@icloud.com")) (:maintainers ("A. Hdez" . "trefoil_chilled_7k@icloud.com")) (:maintainer "A. Hdez" . "trefoil_chilled_7k@icloud.com"))])
+ (remind-bindings . [(20200820 1723) ((emacs (25 1)) (omni-quotes (0 5)) (popwin (1 0)) (map (2 0))) "Reminders for your init bindings" tar ((:url . "https://github.com/mtekman/remind-bindings.el") (:commit . "c9a327bfd3c68a0c41b5b64df491bdee4c73ca39") (:revdesc . "c9a327bfd3c6") (:keywords "outlines"))])
+ (renpy-mode . [(20251118 1922) ((emacs (27 1))) "Major mode for editing Ren'Py files" tar ((:url . "https://github.com/Reagankm/renpy-mode") (:commit . "f4b7512af930efbf6a9be8dd7d43f47031acba40") (:revdesc . "f4b7512af930") (:keywords "languages") (:authors ("Dave Love" . "fx@gnu.org")) (:maintainers ("Reagan Middlebrook" . "reagankm@gmail.com")) (:maintainer "Reagan Middlebrook" . "reagankm@gmail.com"))])
+ (repeat-fu . [(20260805 1021) ((emacs (29 1))) "Minor mode to repeat typing or commands" tar ((:url . "https://codeberg.org/ideasman42/emacs-repeat-fu") (:commit . "ba455656de8cc2c3a5180bce8531e6c78541e757") (:revdesc . "ba455656de8c") (:keywords "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (repeat-help . [(20230118 24) ((emacs (28 1))) "Display keybindings for repeat-mode" tar ((:url . "https://github.com/karthink/repeat-help") (:commit . "41dea6fba2edd6ac748d0ca7a6da4058290feede") (:revdesc . "41dea6fba2ed") (:keywords "convenience") (:authors ("Karthik Chikmagalur" . "karthikchikmagalur@gmail.com")) (:maintainers ("Karthik Chikmagalur" . "karthikchikmagalur@gmail.com")) (:maintainer "Karthik Chikmagalur" . "karthikchikmagalur@gmail.com"))])
+ (repeat-ring . [(20250915 2234) ((emacs (25 1)) (virtual-ring (0 1)) (pubsub (0 1)) (mantra (0 1))) "Structured and configurable repetition" tar ((:url . "https://github.com/countvajhula/repeat-ring") (:commit . "04c128149e50827134ecd8e5a5176cd889469175") (:revdesc . "04c128149e50") (:authors ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainers ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainer "Sid Kasivajhula" . "sid@countvajhula.com"))])
+ (repeatable-motion . [(20170620 1848) ((emacs (24))) "Make repeatable versions of motions" tar ((:url . "https://github.com/willghatch/emacs-repeatable-motion") (:commit . "77aa35b27c8a76dc8deef87c9f71ef7e6fd289ee") (:revdesc . "77aa35b27c8a") (:keywords "motion" "repeatable") (:authors ("William Hatch" . "willghatch@gmail.com")) (:maintainers ("William Hatch" . "willghatch@gmail.com")) (:maintainer "William Hatch" . "willghatch@gmail.com"))])
+ (repeater . [(20180418 1212) ((emacs (24 4))) "Repeat recent repeated commands" tar ((:url . "https://github.com/xuchunyang/repeater") (:commit . "854b874542b186b2408cbc58ad0591fe8eb70b6c") (:revdesc . "854b874542b1") (:keywords "convenience") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (repl-driven-development . [(20241110 1611) ((s (1 12 0)) (f (0 20 0)) (lf (1 0)) (dash (2 16 0)) (eros (0 1 0)) (bind-key (2 4 1)) (emacs (29)) (f (0 20 0)) (devdocs (0 5)) (pulsar (1 0 1)) (peg (1 0 1)) (json-navigator (1 0 0))) "Send arbitrary code to a REPL in the background" tar ((:url . "http://alhassy.com/repl-driven-development") (:commit . "2ffa5368a6db602a9f220935cd985999c60845ba") (:revdesc . "2ffa5368a6db") (:keywords "repl-driven-development" "rdd" "repl" "lisp" "eval" "java" "python" "ruby" "programming" "convenience") (:authors ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainers ("Musa Al-hassy" . "alhassy@gmail.com")) (:maintainer "Musa Al-hassy" . "alhassy@gmail.com"))])
+ (repl-toggle . [(20220920 752) ((fullframe (0 0 5))) "Switch to/from repl buffer for current major-mode" tar ((:url . "https://git.sr.ht/~tomterl/repl-toggle") (:commit . "e05996b4a2b988f93ccce67f933cfad00064360f") (:revdesc . "e05996b4a2b9") (:keywords "repl" "buffers" "toggle") (:authors ("Tom Regner" . "tom@goochesa.de")) (:maintainers ("Tom Regner" . "tom@goochesa.de")) (:maintainer "Tom Regner" . "tom@goochesa.de"))])
+ (replace-from-region . [(20240224 52) nil "Replace commands whose query is from region" tar ((:url . "http://www.emacswiki.org/emacs/download/replace-from-region.el") (:commit . "7b5b5ce5488ad5314acaa301d6482bf781db4ebd") (:revdesc . "7b5b5ce5488a") (:keywords "replace" "search" "region") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (replace-pairs . [(20160207 1251) ((emacs (24 4))) "Query-replace pairs of things" tar ((:url . "https://github.com/davidshepherd7/replace-pairs") (:commit . "ef6f2719aab7714f6cb209fd3dd6d2e720681b3c") (:revdesc . "ef6f2719aab7") (:authors ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainers ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainer "David Shepherd" . "davidshepherd7@gmail.com"))])
+ (replace-symbol . [(20160518 12) nil "Rename symbols in expressions or buffers" tar ((:url . "https://github.com/bmastenbrook/replace-symbol-el") (:commit . "baf949e528aee1881f455f9c84e67718bedcb3f6") (:revdesc . "baf949e528ae") (:authors ("Brian Mastenbrook" . "brian@mastenbrook.net")) (:maintainers ("Brian Mastenbrook" . "brian@mastenbrook.net")) (:maintainer "Brian Mastenbrook" . "brian@mastenbrook.net"))])
+ (replace-with-inflections . [(20240122 927) ((cl-lib (0 5)) (string-inflection (1 0 10)) (inflections (1 1))) "Inflection aware `query-replace'" tar ((:url . "https://github.com/knu/replace-with-inflections.el") (:commit . "c57cfb06752bb17389465890ff0ef58a7dd465d2") (:revdesc . "c57cfb06752b") (:keywords "matching") (:authors ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (repo . [(20240425 1307) ((emacs (24 3))) "Running repo from Emacs" tar ((:url . "https://github.com/snogge/repo-el") (:commit . "1572f3ee82eaadc06e741f03e1889281308c79fa") (:revdesc . "1572f3ee82ea") (:keywords "convenience"))])
+ (repo-grep . [(20260407 1642) ((emacs (27 1))) "Project-wide grep search" tar ((:url . "https://github.com/BHFock/repo-grep") (:commit . "237bba04c330e079f04bbd0f03721c97ccffec01") (:revdesc . "237bba04c330") (:keywords "tools" "search" "grep" "convenience" "project"))])
+ (req-package . [(20180605 1141) ((use-package (1 0)) (dash (2 7 0)) (log4e (0 2 0)) (ht (0))) "A use-package wrapper for package runtime dependencies management" tar ((:url . "https://github.com/edvorg/req-package") (:commit . "a77da72931914ac5f3f64dc61fe9dc3522b2817e") (:revdesc . "a77da7293191") (:keywords "dotemacs" "startup" "speed" "config" "package") (:authors ("Edward Knyshov" . "edvorg@gmail.com")) (:maintainers ("Edward Knyshov" . "edvorg@gmail.com")) (:maintainer "Edward Knyshov" . "edvorg@gmail.com"))])
+ (request . [(20250219 2213) ((emacs (24 4))) "Compatible layer for URL request" tar ((:url . "https://github.com/tkf/emacs-request") (:commit . "6f419b5cdd2dfa83675ae53f04d8463d00a533f8") (:revdesc . "6f419b5cdd2d") (:authors ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainers ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainer "Takafumi Arakaki" . "aka.tkfatgmail.com"))])
+ (request-deferred . [(20220614 1604) ((emacs (24 1)) (deferred (0 3 1)) (request (0 3))) "Wrap request.el by deferred" tar ((:url . "https://github.com/tkf/emacs-request") (:commit . "38ed1d2e64138eb16a9d8ed2987cff2e01b4a93b") (:revdesc . "38ed1d2e6413") (:authors ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainers ("Takafumi Arakaki" . "aka.tkfatgmail.com")) (:maintainer "Takafumi Arakaki" . "aka.tkfatgmail.com"))])
+ (requirejs . [(20151204 719) ((js2-mode (20150713)) (popup (0 5 3)) (s (1 9 0)) (cl-lib (0 5)) (yasnippet (20151011 1823))) "Requirejs import manipulation and source traversal" tar ((:url . "https://github.com/joeheyming/requirejs-emacs") (:commit . "4ea2a5fcbc76e4cbb6a7461e6f05f019b75865b1") (:revdesc . "4ea2a5fcbc76") (:keywords "javascript" "requirejs") (:authors ("Joe Heyming" . "joeheyming@gmail.com")) (:maintainers ("Joe Heyming" . "joeheyming@gmail.com")) (:maintainer "Joe Heyming" . "joeheyming@gmail.com"))])
+ (requirejs-mode . [(20130215 2104) nil "Improved AMD module management" tar ((:url . "https://github.com/moricard/requirejs-mode") (:commit . "011849043098b6c4f27571625ae19071b53b8824") (:revdesc . "011849043098") (:keywords "javascript" "amd" "requirejs") (:authors ("Marc-Olivier Ricard" . "marco.ricard@gmail.com")) (:maintainers ("Marc-Olivier Ricard" . "marco.ricard@gmail.com")) (:maintainer "Marc-Olivier Ricard" . "marco.ricard@gmail.com"))])
+ (rescript-mode . [(20260505 2042) ((emacs (26 1))) "A major mode for editing ReScript" tar ((:url . "https://github.com/jjlee/rescript-mode") (:commit . "d0ff73d8e6c9653f0baf7edbcd7e585a24dedf8d") (:revdesc . "d0ff73d8e6c9") (:keywords "languages" "rescript") (:authors ("Karl Landstrom" . "karl.landstrom@brgeight.se") ("Daniel Colascione" . "dancol@dancol.org") ("John Lee" . "jjl@pobox.com")) (:maintainers ("John Lee" . "jjl@pobox.com")) (:maintainer "John Lee" . "jjl@pobox.com"))])
+ (resize-window . [(20180918 538) ((emacs (24)) (cl-lib (0 5))) "Easily resize windows" tar ((:url . "https://github.com/dpsutton/resize-mode") (:commit . "09dc5968f1c988c51fcd6ea5d68bb38b7541eb66") (:revdesc . "09dc5968f1c9") (:keywords "window" "resize") (:authors ("Dan Sutton" . "danielsutton01@gmail.com")) (:maintainers ("Dan Sutton" . "danielsutton01@gmail.com")) (:maintainer "Dan Sutton" . "danielsutton01@gmail.com"))])
+ (restart-emacs . [(20201127 1425) nil "Restart emacs from within emacs" tar ((:url . "https://github.com/iqbalansari/restart-emacs") (:commit . "d0fca7fba014b2d0d4dedcb9744a1e73cd9a6409") (:revdesc . "d0fca7fba014") (:keywords "convenience") (:authors ("Iqbal Ansari" . "iqbalansari02@yahoo.com")) (:maintainers ("Iqbal Ansari" . "iqbalansari02@yahoo.com")) (:maintainer "Iqbal Ansari" . "iqbalansari02@yahoo.com"))])
+ (restclient . [(20260627 1851) ((emacs (26 1)) (compat (30 1 0 0))) "An interactive HTTP client for Emacs" tar ((:url . "https://github.com/emacsorphanage/restclient") (:commit . "d280632df39a175dac06037038105e32945624be") (:revdesc . "d280632df39a") (:keywords "http" "comm" "tools") (:authors ("Pavel Kurnosov" . "pashky@gmail.com")) (:maintainers ("Peder O. Klingenberg" . "peder@klingenberg.no")) (:maintainer "Peder O. Klingenberg" . "peder@klingenberg.no"))])
+ (restclient-helm . [(20170314 1554) ((restclient (0)) (helm (1 9 4))) "Helm interface for restclient.el" tar ((:url . "https://github.com/emacsorphanage/restclient") (:commit . "af7420085dd67ed08d199a2402e8ff3e996c3029") (:revdesc . "af7420085dd6") (:keywords "http" "helm") (:authors ("Pavel Kurnosov" . "pashky@gmail.com")) (:maintainers ("Pavel Kurnosov" . "pashky@gmail.com")) (:maintainer "Pavel Kurnosov" . "pashky@gmail.com"))])
+ (restclient-jq . [(20250803 2119) ((restclient (20200502 831)) (jq-mode (0 4 1)) (emacs (24 4))) "Support for setting restclient vars from jq expressions" tar ((:url . "https://github.com/pashky/restclient.el") (:commit . "6764278a3d63520eaf117344d8dc23654b640645") (:revdesc . "6764278a3d63") (:keywords "tools" "comm" "http" "jq") (:authors ("Cameron Dorrat" . "cdorrat@gmail.com")) (:maintainers ("Cameron Dorrat" . "cdorrat@gmail.com")) (:maintainer "Cameron Dorrat" . "cdorrat@gmail.com"))])
+ (restclient-test . [(20240207 1415) ((emacs (26 1)) (restclient (0))) "Run tests with restclient.el" tar ((:url . "https://github.com/simenheg/restclient-test.el") (:commit . "5a364b93779eb3b4566dd6d843d7637983fcc949") (:revdesc . "5a364b93779e") (:authors ("Simen Heggestøyl" . "simenheg@runbox.com")) (:maintainers ("Simen Heggestøyl" . "simenheg@runbox.com")) (:maintainer "Simen Heggestøyl" . "simenheg@runbox.com"))])
+ (retraction-viewer . [(20250520 1615) ((emacs (27 1)) (plz (0 9 1))) "View retraction information for current citation" tar ((:url . "https://git.sr.ht/~swflint/retraction-viewer") (:commit . "8c913286dcb4bfdbb96c1e87770fae8ec644a966") (:revdesc . "8c913286dcb4") (:keywords "bib" "tex" "data") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (retraction-viewer-section . [(20240509 1440) ((emacs (25 1)) (retraction-viewer (1 0 2)) (universal-sidecar (1 5 1))) "Show retraction information in the universal-sidecar" tar ((:url . "https://git.sr.ht/~swflint/retraction-viewer") (:commit . "e8ab96e5a95a93849b912e2684b9776c685ac4bd") (:revdesc . "e8ab96e5a95a") (:keywords "bib" "tex") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (retrie . [(20200519 551) ((emacs (24 5))) "Refactoring Haskell code with retrie" tar ((:url . "https://github.com/Ailrun/emacs-retrie") (:commit . "976d6f01a3e214917f16b82e750d825cb9bfcc59") (:revdesc . "976d6f01a3e2") (:keywords "files" "languages" "tools") (:authors ("Junyoung Clare Jang" . "jjc9310@gmail.com")) (:maintainers ("Junyoung Clare Jang" . "jjc9310@gmail.com")) (:maintainer "Junyoung Clare Jang" . "jjc9310@gmail.com"))])
+ (revbufs . [(20200907 2223) nil "Reverts all out-of-date buffers safely" tar ((:url . "http://www.neilvandyke.org/revbufs/") (:commit . "df3c02d3063951582c693ae12547993cec8256e2") (:revdesc . "df3c02d30639") (:keywords "convenience" "buffers") (:authors ("Neil Van Dyke" . "neil@neilvandyke.org")) (:maintainers ("Sam Kleinman" . "sam@tychoish.com")) (:maintainer "Sam Kleinman" . "sam@tychoish.com"))])
+ (reveal-in-folder . [(20260101 602) ((emacs (24 3)) (f (0 20 0)) (s (1 12 0))) "Reveal current file/directory in folder" tar ((:url . "https://github.com/jcs-elpa/reveal-in-folder") (:commit . "70c9ba29705ce6a0fc7a718cc4d6016b9691d408") (:revdesc . "70c9ba29705c") (:keywords "convenience" "folder" "finder" "reveal" "file" "explorer") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (reveal-in-osx-finder . [(20150802 1657) nil "Reveal file associated with buffer in OS X Finder" tar ((:url . "https://github.com/kaz-yos/reveal-in-osx-finder") (:commit . "5710e5936e47139a610ec9a06899f72e77ddc7bc") (:revdesc . "5710e5936e47") (:keywords "os x" "finder"))])
+ (reverse-im . [(20250526 1156) ((emacs (25 1)) (seq (2 23))) "Reverse mapping for non-default system layouts" tar ((:url . "https://github.com/a13/reverse-im.el") (:commit . "20d5f0514a761f0a06284b2adf0baf4bf7b93db2") (:revdesc . "20d5f0514a76") (:keywords "i18n") (:authors ("Juri Linkov" . "juri@jurta.org")) (:maintainers ("DK" . "a13@users.noreply.github.com")) (:maintainer "DK" . "a13@users.noreply.github.com"))])
+ (reverse-theme . [(20141205 145) nil "Reverse theme for Emacs" tar ((:url . "https://github.com/syohex/emacs-reverse-theme") (:commit . "3105c950bcb51c662c79b59ca102ef662c2b0be0") (:revdesc . "3105c950bcb5") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (reverso . [(20260801 1240) ((emacs (27 1)) (transient (0 3 7)) (request (0 3 2))) "Translation, grammar checking, context search" tar ((:url . "https://github.com/SqrtMinusOne/reverso.el") (:commit . "a21f17162b5a391ae1220c6b1133af76ed3573a8") (:revdesc . "a21f17162b5a") (:authors ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainers ("Korytov Pavel" . "thexcloud@gmail.com")) (:maintainer "Korytov Pavel" . "thexcloud@gmail.com"))])
+ (revert-buffer-all . [(20251214 1120) ((emacs (28 1))) "Revert all open buffers" tar ((:url . "https://codeberg.org/ideasman42/emacs-buffer-revert-all") (:commit . "e00fc97fe469265b31a9790f40f1e8b749380b01") (:revdesc . "e00fc97fe469") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (review-mode . [(20260311 1218) nil "Major mode for ReVIEW" tar ((:url . "https://github.com/kmuto/review-el") (:commit . "5b2e01f7e07b0ba6776eb0555ef386026bcb62d0") (:revdesc . "5b2e01f7e07b") (:authors ("Kenshi Muto" . "kmuto@kmuto.jp")) (:maintainers ("Kenshi Muto" . "kmuto@kmuto.jp")) (:maintainer "Kenshi Muto" . "kmuto@kmuto.jp"))])
+ (rewriting-pcase . [(20230419 23) ((emacs (27 1))) "Support for rewriting sexps in source code" tar ((:url . "https://github.com/owinebar/emacs-rewriting-pcase") (:commit . "3a2efb79bfc68629bd20a8bc1770c8f6d24575fa") (:revdesc . "3a2efb79bfc6") (:keywords "extensions" "lisp"))])
+ (reykjavik-theme . [(20201219 947) ((emacs (24))) "Theme with a dark background" tar ((:url . "https://github.com/mswift42/reykjavik-theme") (:commit . "f6d8e83946633603234cd1dac725e17447f40bce") (:revdesc . "f6d8e8394663"))])
+ (rfc-mode . [(20260617 1030) ((emacs (25 1))) "RFC document browser and viewer" tar ((:url . "https://github.com/galdor/rfc-mode") (:commit . "0ab3e0b5eca45e7baaea748063b8590d08b55789") (:revdesc . "0ab3e0b5eca4") (:authors ("Nicolas Martyanoff" . "nicolas@n16f.net")) (:maintainers ("Nicolas Martyanoff" . "nicolas@n16f.net")) (:maintainer "Nicolas Martyanoff" . "nicolas@n16f.net"))])
+ (rg . [(20260823 1828) ((emacs (28 1)) (transient (0 9 2)) (wgrep (2 1 10))) "A search tool based on ripgrep" tar ((:url . "https://github.com/dajva/rg.el") (:commit . "6b00e2ae98c47cf7ea04d26636e11b7fa2a540e3") (:revdesc . "6b00e2ae98c4") (:keywords "matching" "tools") (:authors ("David Landell" . "david.landell@sunnyhill.email") ("Roland McGrath" . "roland@gnu.org")) (:maintainers ("David Landell" . "david.landell@sunnyhill.email") ("Roland McGrath" . "roland@gnu.org")) (:maintainer "David Landell" . "david.landell@sunnyhill.email"))])
+ (rg-themes . [(20250718 1826) ((emacs (25 1))) "The rg theme collection" tar ((:url . "https://github.com/raegnald/rg-themes") (:commit . "5947efd002f262e685aae169e4ce68b088dacb7d") (:revdesc . "5947efd002f2") (:keywords "faces") (:authors ("Ronaldo Gligan" . "ronaldogligan@gmail.com")) (:maintainers ("Ronaldo Gligan" . "ronaldogligan@gmail.com")) (:maintainer "Ronaldo Gligan" . "ronaldogligan@gmail.com"))])
+ (rgb . [(20220717 1940) ((emacs (24 3))) "RGB control via OpenRGB" tar ((:url . "https://gitlab.com/cwpitts/rgb.el") (:commit . "4aab5a5be16b69b47ef5e67d02782df5e41dbd7b") (:revdesc . "4aab5a5be16b"))])
+ (rhq . [(20230731 1544) ((emacs (24 4))) "Client for rhq" tar ((:url . "https://github.com/ROCKTAKEY/rhq") (:commit . "9f571787bf0781c78c277db82394fb9a692ec21e") (:revdesc . "9f571787bf07") (:keywords "tools" "extensions") (:authors ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "ROCKTAKEY" . "rocktakey@gmail.com"))])
+ (rhtml-mode . [(20130422 1311) nil "Major mode for editing RHTML files" tar ((:url . "https://github.com/eschulte/rhtml") (:commit . "a6d71b38a3db867ccf82999c99805db1a3a33c33") (:revdesc . "a6d71b38a3db"))])
+ (rib-mode . [(20170726 1448) ((emacs (24))) "RenderMan® Interface Bytestream (RIB) Major Mode" tar ((:url . "https://github.com/blezek/rib-mode") (:commit . "97470158784c3c212e22e2c20b8471ee65ba59af") (:revdesc . "97470158784c") (:authors ("Remik Ziemlinski and Daniel Blezek" . "daniel.blezek@gmail.com")) (:maintainers ("Remik Ziemlinski and Daniel Blezek" . "daniel.blezek@gmail.com")) (:maintainer "Remik Ziemlinski and Daniel Blezek" . "daniel.blezek@gmail.com"))])
+ (rich-minority . [(20240924 2317) ((cl-lib (0 5))) "Clean-up and Beautify the list of minor-modes" tar ((:url . "https://github.com/Malabarba/rich-minority") (:commit . "77cf5ec620aaef18385d2e1d2dad05b4f63dad95") (:revdesc . "77cf5ec620aa") (:keywords "mode-line" "faces") (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainers ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com"))])
+ (ride-mode . [(20240727 456) ((emacs (25 1))) "A major-mode for editing RIDE language" tar ((:url . "https://codeberg.org/deadblackclover/ride-mode") (:commit . "f1b826fc9b14007aefca8d5748549b9a720b0684") (:revdesc . "f1b826fc9b14") (:keywords "languages") (:authors ("DEADBLACKCLOVER" . "deadblackclover@protonmail.com")) (:maintainers ("DEADBLACKCLOVER" . "deadblackclover@protonmail.com")) (:maintainer "DEADBLACKCLOVER" . "deadblackclover@protonmail.com"))])
+ (right-click-context . [(20210519 1713) ((emacs (24 3)) (popup (0 5)) (ordinal (0 0 1))) "Right Click Context menu" tar ((:url . "https://github.com/zonuexe/right-click-context") (:commit . "c3c9d36ffbc9fb2bc7c2c4b75291dbcdb1c5f531") (:revdesc . "c3c9d36ffbc9") (:keywords "mouse" "menu" "rightclick") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (rigid-tabs . [(20230905 940) ((emacs (24 3))) "Fix TAB alignment in diff buffers" tar ((:url . "https://gitlab.com/wavexx/rigid-tabs.el") (:commit . "9553118e76fcbc1d8f0bcb960de13c7e3f07b9df") (:revdesc . "9553118e76fc") (:keywords "diff" "whitespace" "version control" "magit") (:authors ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainers ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainer "Yuri D'Elia" . "wavexx@thregr.org"))])
+ (rii . [(20210317 1330) ((emacs (24 3))) "Reversible input interface for multiple input" tar ((:url . "https://github.com/ROCKTAKEY/rii") (:commit . "9df603a5c63ae38ec776e27dc93d3618e2b0fabe") (:revdesc . "9df603a5c63a") (:keywords "extensions" "tools") (:authors ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "ROCKTAKEY" . "rocktakey@gmail.com"))])
+ (rime . [(20251105 1505) ((emacs (26 3)) (dash (2 17 0)) (cl-lib (0 6 1)) (popup (0 5 3)) (posframe (0 1 0))) "Rime input method" tar ((:url . "https://www.github.com/DogLooksGood/emacs-rime") (:commit . "f927d26e471e7d63de65ffa92897944242f2fd92") (:revdesc . "f927d26e471e") (:keywords "convenience" "input-method"))])
+ (rimel . [(20260814 1139) ((emacs (29 4)) (liberime (0 0 11))) "A lightweight Rime input method" tar ((:url . "https://github.com/emacs-rime/rimel") (:commit . "7b2d967f4230ececbf7b34477c9db71ca5b0104d") (:revdesc . "7b2d967f4230") (:keywords "convenience" "chinese" "input-method" "rime"))])
+ (rinari . [(20150709 640) ((ruby-mode (1 0)) (inf-ruby (2 2 5)) (ruby-compilation (0 16)) (jump (2 0))) "Rinari Is Not A Rails IDE" tar ((:url . "https://github.com/eschulte/rinari") (:commit . "be07b0f42aefa24c5d36c441d1f3f72e64fffaa4") (:revdesc . "be07b0f42aef") (:keywords "ruby" "rails" "project" "convenience" "web"))])
+ (ring-mode . [(20221226 1159) ((emacs (24 3))) "A major mode for the Ring programming language" tar ((:url . "https://github.com/thechampagne/ring-mode") (:commit . "4e38dd5ca374d7d40fd1eeed1e83ef935efd387a") (:revdesc . "4e38dd5ca374") (:keywords "files" "ring"))])
+ (rings . [(20160531 2027) nil "Buffer rings. Like tabs, but better" tar ((:url . "https://github.com/konr/rings") (:commit . "3590b222eb80652cbd27866f066bd3571d86edfc") (:revdesc . "3590b222eb80") (:keywords "utilities" "productivity"))])
+ (ripgrep . [(20220520 1410) nil "Front-end for ripgrep, a command line search tool" tar ((:url . "https://github.com/nlamirault/ripgrep.el") (:commit . "872e250e8f93b8bb0a8a1de8bde17fd9bd116e31") (:revdesc . "872e250e8f93") (:keywords "ripgrep" "ack" "pt" "ag" "sift" "grep" "search") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (riscv-mode . [(20220916 206) ((emacs (24 4))) "Major-mode for RISC V assembly" tar ((:url . "https://github.com/AdamNiederer/riscv-mode") (:commit . "8e335b9c93de93ed8dd063d702b0f5ad48eef6d7") (:revdesc . "8e335b9c93de") (:keywords "riscv" "assembly") (:authors ("Adam Niederer" . "https://github.com/AdamNiederer")))])
+ (rivet-mode . [(20201013 1905) ((emacs (24)) (web-mode (16))) "A minor mode for editing Apache Rivet files" tar ((:url . "https://gitlab.com/thornjad/rivet-mode") (:commit . "6cf58cf04fee933113857af07414b3f27c24b505") (:revdesc . "6cf58cf04fee"))])
+ (rjsx-mode . [(20200224 2149) ((emacs (24 4)) (js2-mode (20170504))) "Real support for JSX" tar ((:url . "https://github.com/felipeochoa/rjsx-mode/") (:commit . "0061587a06cdc2579a8d0e90863498d96bf982d8") (:revdesc . "0061587a06cd") (:keywords "languages") (:authors ("Felipe Ochoa" . "felipe@fov.space")) (:maintainers ("Felipe Ochoa" . "felipe@fov.space")) (:maintainer "Felipe Ochoa" . "felipe@fov.space"))])
+ (rmsbolt . [(20250325 50) ((emacs (25 1))) "A compiler output viewer" tar ((:url . "https://gitlab.com/jgkamat/rmsbolt") (:commit . "05c4795226f859009bc570940139473b6b6f7555") (:revdesc . "05c4795226f8") (:keywords "compilation" "tools") (:authors ("Jay Kamat" . "jaygkamat@gmail.com")) (:maintainers ("Jay Kamat" . "jaygkamat@gmail.com")) (:maintainer "Jay Kamat" . "jaygkamat@gmail.com"))])
+ (robe . [(20250219 1910) ((inf-ruby (2 5 1)) (emacs (27 1))) "Code navigation, documentation lookup and completion for Ruby" tar ((:url . "https://github.com/dgutov/robe") (:commit . "73a78e55394c1c70c11f9354ef52e7ffce31547c") (:revdesc . "73a78e55394c") (:keywords "ruby" "convenience" "rails"))])
+ (robot-log . [(20220719 1301) ((emacs (28 1))) "Major mode for viewing RobotFramework debug log files" tar ((:url . "https://git.sr.ht/~apteryx/emacs-robot-log") (:commit . "26da47597aa97be9649cb60f4da6d94d47d0c0ac") (:revdesc . "26da47597aa9") (:keywords "convenience" "files"))])
+ (robot-mode . [(20240721 1023) ((emacs (26 1))) "Major-mode for Robot Framework files" tar ((:url . "https://github.com/kopoli/robot-mode") (:commit . "7c8d7adfa37b7bd15d61cbb78a02e0e1596c453c") (:revdesc . "7c8d7adfa37b") (:keywords "languages" "files") (:authors ("Kalle Kankare" . "kalle.kankare@iki.fi")) (:maintainers ("Kalle Kankare" . "kalle.kankare@iki.fi")) (:maintainer "Kalle Kankare" . "kalle.kankare@iki.fi"))])
+ (robots-txt-mode . [(20190812 1858) nil "Major mode for editing robots.txt" tar ((:url . "https://github.com/emacs-php/robots-txt-mode") (:commit . "8bf67285a25a6756607354d184e36583f2847e7d") (:revdesc . "8bf67285a25a") (:keywords "languages" "comm" "web") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (roc-ts-mode . [(20260206 908) ((emacs (29 1))) "Roc programming language mode" tar ((:url . "https://gitlab.com/tad-lispy/roc-ts-mode") (:commit . "00aa6d23192a85c4f8e2905c1aa526fefec51f20") (:revdesc . "00aa6d23192a") (:keywords "languages") (:authors ("Tad Lispy" . "tadeusz@lazurski.pl") ("Ajai Khatri Nelson" . "emacs@ajai.dev")) (:maintainers ("Tad Lispy" . "tadeusz@lazurski.pl") ("Ajai Khatri Nelson" . "emacs@ajai.dev")) (:maintainer "Tad Lispy" . "tadeusz@lazurski.pl"))])
+ (rocq-timing . [(20260417 1401) ((emacs (24))) "Display timing of rocq commands in buffer" tar ((:url . "https://github.com/Chobbes/rocq-timing-el") (:commit . "5423ac37dc6a6abff74e59ac299b57746462bd02") (:revdesc . "5423ac37dc6a") (:keywords "convenience" "tools" "rocq" "coq" "proofs" "profiling") (:authors ("Calvin Beck" . "hobbes@ualberta.ca")) (:maintainers ("Calvin Beck" . "hobbes@ualberta.ca")) (:maintainer "Calvin Beck" . "hobbes@ualberta.ca"))])
+ (roguel-ike . [(20241228 929) ((popup (0 5 0))) "Main file for roguel-ike" tar ((:url . "https://github.com/stevenremot/roguel-ike") (:commit . "e2e0c089129353f0d4c08b42baf6dc9d66a05175") (:revdesc . "e2e0c0891293"))])
+ (rom-party . [(20250627 838) ((emacs (28)) (dash (2 17 0)) (f (0 2 0)) (s (1 12 0)) (ht (2 3)) (extmap (1 3)) (compat (29 1 4 4)) (async (1 9 7))) "Rendition of jklm.fun's \"Bomb Party\" game" tar ((:url . "https://github.com/LaurenceWarne/rom-party.el") (:commit . "3664be5a15431c54f1bf04d2597ca546956edb6f") (:revdesc . "3664be5a1543"))])
+ (romanian-holidays . [(20250102 1029) ((emacs (26))) "Romanian holidays" tar ((:url . "https://github.com/petrem/romanian-holidays") (:commit . "96c9983ea170503abbd5b3cd79bfe4481c72f43d") (:revdesc . "96c9983ea170") (:keywords "calendar" "holidays" "romanian"))])
+ (romkan . [(20251019 1646) ((emacs (24 3))) "Romaji/Kana conversion library" tar ((:url . "https://github.com/gicrisf/romkan.el") (:commit . "81cf9448450b866913b1f24d899f0a716fa49f0b") (:revdesc . "81cf9448450b") (:keywords "i18n" "languages") (:authors ("gicrisf" . "giovanni.crisalfi@protonmail.com")) (:maintainers ("gicrisf" . "giovanni.crisalfi@protonmail.com")) (:maintainer "gicrisf" . "giovanni.crisalfi@protonmail.com"))])
+ (ron-mode . [(20200830 1554) ((emacs (24 5 1))) "Rusty Object Notation mode" tar ((:url . "https://chiselapp.com/user/Hutzdog/repository/ron-mode/home") (:commit . "c5e0454b9916d6b73adc15dab8abbb0b0a68ea22") (:revdesc . "c5e0454b9916") (:keywords "languages") (:authors ("Daniel Hutzley" . "endergeryt@gmail.com")) (:maintainers ("Daniel Hutzley" . "endergeryt@gmail.com")) (:maintainer "Daniel Hutzley" . "endergeryt@gmail.com"))])
+ (ronny-theme . [(20260817 859) ((emacs (27))) "A dark colorscheme inspired by Monokai" tar ((:url . "https://github.com/judaew/ronny.el") (:commit . "e1e499b829907cc7d8ccec18b8a9f06be043800b") (:revdesc . "e1e499b82990") (:authors ("Vadym-Valdis Yudaiev" . "judaew@outlook.com")) (:maintainers ("Vadym-Valdis Yudaiev" . "judaew@outlook.com")) (:maintainer "Vadym-Valdis Yudaiev" . "judaew@outlook.com"))])
+ (rope-read-mode . [(20260610 2004) ((emacs (24))) "Rearrange lines to read text smoothly" tar ((:url . "https://gitlab.com/marcowahl/rope-read-mode") (:commit . "4270080eafa5fe5ce1d1a7ecc7ac4143a7d62a22") (:revdesc . "4270080eafa5") (:keywords "reading" "convenience" "chill") (:authors ("Marco Wahl" . "marcowahlsoft@gmail.com")) (:maintainers ("Marco Wahl" . "marcowahlsoft@gmail.com")) (:maintainer "Marco Wahl" . "marcowahlsoft@gmail.com"))])
+ (ropgadget . [(20230107 1225) ((emacs (24 4)) (transient (0 3 6))) "Display and filter ROP gadgets of a binary" tar ((:url . "https://github.com/Dragoncraft89/ropgadget-el") (:commit . "10e9d6f66de1ee805d871c59f4acc078b66747a3") (:revdesc . "10e9d6f66de1") (:keywords "tools" "ctf" "pwn" "rop"))])
+ (ros . [(20250224 943) ((emacs (27 1)) (s (0)) (with-shell-interpreter (0)) (kv (0)) (cl-lib (0)) (transient (0)) (hydra (0)) (grep (0)) (string-inflection (0))) "Package to write code for ROS systems" tar ((:url . "https://github.com/DerBeutlin/ros.el") (:commit . "2108aed4d075652c342e537fab120392f4703d74") (:revdesc . "2108aed4d075") (:keywords "convenience" "tools") (:authors ("Max Beutelspacher" . "https://github.com/mtb")) (:maintainers ("Max Beutelspacher" . "max@beutelspacher.eu")) (:maintainer "Max Beutelspacher" . "max@beutelspacher.eu"))])
+ (ros-face . [(20260327 1536) ((emacs (27 1))) "Syntax highlighting for ROS files" tar ((:url . "https://github.com/smallwat3r/emacs-ros-mode") (:commit . "9278a711a8846b665b3e385f6cc8c51afd3f64cb") (:revdesc . "9278a711a884") (:keywords "languages" "ros" "robotics") (:authors ("Matthieu Petiteau" . "mpetiteau.pro@gmail.com")) (:maintainers ("Matthieu Petiteau" . "mpetiteau.pro@gmail.com")) (:maintainer "Matthieu Petiteau" . "mpetiteau.pro@gmail.com"))])
+ (roseline-theme . [(20250305 936) ((emacs (24 1))) "Roseline theme" tar ((:url . "https://github.com/madara123pain/unique-emacs-theme-pack") (:commit . "43afeb68b3ba0394f8cc925ebb90e9a6620b4b28") (:revdesc . "43afeb68b3ba") (:keywords "faces" "theme" "custom") (:authors ("Omer Arif" . "omerarifkhan.official123@gmail.com")) (:maintainers ("Omer Arif" . "omerarifkhan.official123@gmail.com")) (:maintainer "Omer Arif" . "omerarifkhan.official123@gmail.com"))])
+ (rotate . [(20260521 630) ((emacs (25 1))) "Rotate window layouts and buffers" tar ((:url . "https://github.com/daichirata/emacs-rotate") (:commit . "d61c7643b8dbe3fdd59f8ee40212f27bd14cfb61") (:revdesc . "d61c7643b8db") (:keywords "window" "layout" "convenience") (:authors ("Daichi Hirata" . "bunny.hop.md@gmail.com")) (:maintainers ("Daichi Hirata" . "bunny.hop.md@gmail.com")) (:maintainer "Daichi Hirata" . "bunny.hop.md@gmail.com"))])
+ (roy-mode . [(20121208 1158) nil "Roy major mode" tar ((:url . "https://github.com/folone/roy-mode") (:commit . "e1a4fb5ec0f46e82f569865ca47042ba5934e425") (:revdesc . "e1a4fb5ec0f4") (:keywords "extensions"))])
+ (royal-hemlock-theme . [(20260403 1452) ((emacs (24))) "Soothing royal-blue light-theme" tar ((:url . "https://github.com/vs-123/royal-hemlock-theme") (:commit . "17f3a0a966a72f2f901c806f99ee25637ae8c711") (:revdesc . "17f3a0a966a7") (:keywords "color" "theme" "faces"))])
+ (rpm-spec-mode . [(20260423 902) ((emacs (27 1)) (compat (29 1 4 5))) "RPM spec mode for Emacs/XEmacs" tar ((:url . "https://github.com/Thaodan/rpm-spec-mode/") (:commit . "90c1beceff24b9f0e02c5a141efd466d5763f957") (:revdesc . "90c1beceff24") (:keywords "unix" "languages" "rpm") (:authors (nil . "stig@bjorlykke.org") ("Tore Olsen" . "toreo@tihlde.org") ("Steve Sanbeg" . "sanbeg@dset.com") ("Tim Powers" . "timp@redhat.com") ("Trond Eivind Glomsrød" . "teg@redhat.com") ("Chmouel Boudjnah" . "chmouel@mandrakesoft.com") ("Ville Skyttä" . "ville.skytta@iki.fi") ("Adam Spiers" . "elisp@adamspiers.org")) (:maintainers ("Björn Bidar" . "bjorn.bidar@thaodan.de")) (:maintainer "Björn Bidar" . "bjorn.bidar@thaodan.de"))])
+ (rpn-calc . [(20210306 426) ((popup (0 4))) "Quick RPN calculator for hackers" tar ((:url . "https://github.com/zk-phi/rpn-calc") (:commit . "320123ede874a8fc6cde542baa0d106950318071") (:revdesc . "320123ede874"))])
+ (rspec-mode . [(20260618 548) ((ruby-mode (1 0)) (cl-lib (0 4))) "Enhance ruby-mode for RSpec" tar ((:url . "https://github.com/pezra/rspec-mode") (:commit . "b5d48de9b56a0070d7a0d3e642b139992a1ce3f0") (:revdesc . "b5d48de9b56a") (:keywords "rspec" "ruby"))])
+ (rsync-mode . [(20210911 0) ((emacs (27 1)) (spinner (1 7 1))) "Rsync projects to remote machines" tar ((:url . "https://github.com/r-zip/rsync-mode.el") (:commit . "2bc76aa8c2d82bb08ef70e23813a653d66bf3195") (:revdesc . "2bc76aa8c2d8") (:keywords "comm") (:authors ("Ryan Pilgrim" . "ryan.z.pilgrim@gmail.com")) (:maintainers ("Ryan Pilgrim" . "ryan.z.pilgrim@gmail.com")) (:maintainer "Ryan Pilgrim" . "ryan.z.pilgrim@gmail.com"))])
+ (rtags . [(20260727 1603) ((emacs (24 3))) "A front-end for rtags" tar ((:url . "https://github.com/Andersbakken/rtags") (:commit . "b0bd2b276f810a291f08c05ba2860ca07285a2eb") (:revdesc . "b0bd2b276f81") (:authors ("Jan Erik Hanssen" . "jhanssen@gmail.com") ("Anders Bakken" . "agbakken@gmail.com")) (:maintainers ("Jan Erik Hanssen" . "jhanssen@gmail.com") ("Anders Bakken" . "agbakken@gmail.com")) (:maintainer "Jan Erik Hanssen" . "jhanssen@gmail.com"))])
+ (rtags-xref . [(20250801 1701) ((emacs (25 1)) (rtags (2 37))) "RTags backend for xref.el" tar ((:url . "https://github.com/Andersbakken/rtags") (:commit . "62d881dab01ecb9ee6d54b705124ca8dadba726f") (:revdesc . "62d881dab01e"))])
+ (rtf-view . [(20260319 1915) ((emacs (24 1))) "View Rich Text Format files" tar ((:url . "https://github.com/danielcmccarthy/rtf-view.git") (:commit . "81197d08020ed07e97f4479963002d81c115b647") (:revdesc . "81197d08020e") (:keywords "files" "data") (:authors ("Dan McCarthy" . "daniel.c.mccarthy@gmail.com")) (:maintainers ("Dan McCarthy" . "daniel.c.mccarthy@gmail.com")) (:maintainer "Dan McCarthy" . "daniel.c.mccarthy@gmail.com"))])
+ (rtm . [(20180329 1508) ((cl-lib (1 0))) "An elisp implementation of the Remember The Milk API" tar ((:url . "https://github.com/pmiddend/emacs-rtm") (:commit . "3e3d09387cb84801343ecca8fb02e82f213e7bbe") (:revdesc . "3e3d09387cb8") (:keywords "remember" "the" "milk" "productivity" "todo") (:authors ("Friedrich Delgado Friedrichs" . "frie...@nomaden.org")) (:maintainers ("Friedrich Delgado Friedrichs" . "frie...@nomaden.org")) (:maintainer "Friedrich Delgado Friedrichs" . "frie...@nomaden.org"))])
+ (rubik . [(20180222 2014) ((cl-lib (1 0)) (emacs (25 3))) "Rubik's Cube" tar ((:url . "https://github.com/Kurvivor19/rubik-mode") (:commit . "c8dab1726463dbc9042a0b00186e4a8df02eb868") (:revdesc . "c8dab1726463") (:keywords "games") (:authors ("Ivan 'Kurvivor' Truskov" . "trus19@gmail.com")) (:maintainers ("Ivan 'Kurvivor' Truskov" . "trus19@gmail.com")) (:maintainer "Ivan 'Kurvivor' Truskov" . "trus19@gmail.com"))])
+ (rubocop . [(20210309 1241) ((emacs (24))) "An Emacs interface for RuboCop" tar ((:url . "https://github.com/rubocop/rubocop-emacs") (:commit . "f5fd18aa810c3d3269188cbbd731ddc09006f8f5") (:revdesc . "f5fd18aa810c") (:keywords "project" "convenience"))])
+ (rubocopfmt . [(20230204 1110) ((cl-lib (0 5))) "Minor-mode to format Ruby code with RuboCop on save" tar ((:url . "https://github.com/jimeh/rubocopfmt.el") (:commit . "1c6f4f1da755c9e60eb475eb9530320726904341") (:revdesc . "1c6f4f1da755") (:keywords "convenience" "wp" "edit" "ruby" "rubocop"))])
+ (ruby-compilation . [(20150709 640) ((inf-ruby (2 2 1))) "Run a ruby process in a compilation buffer" tar ((:url . "https://github.com/eschulte/rinari") (:commit . "be07b0f42aefa24c5d36c441d1f3f72e64fffaa4") (:revdesc . "be07b0f42aef") (:keywords "test" "convenience") (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (ruby-electric . [(20250110 1017) nil "Minor mode for electrically editing ruby code" tar ((:url . "https://github.com/ruby/elisp-ruby-electric") (:commit . "c53376da891713e0c49f01aad2ff64d4fbb0b812") (:revdesc . "c53376da8917") (:keywords "languages" "ruby") (:authors ("Dee Zsombor" . "deedotzsomboratgmaildotcom") ("Akinori MUSHA" . "knu@iDaemons.org") ("Jakub Kuźma" . "qoobaa@gmail.com")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (ruby-end . [(20230205 115) nil "Automatic insertion of end blocks for Ruby" tar ((:url . "https://github.com/rejeep/ruby-end") (:commit . "1c87e214de6a75936b89ab50ee5fe522b87b009e") (:revdesc . "1c87e214de6a") (:keywords "speed" "convenience" "ruby") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Dmitry Gutov" . "dgutov@yandex.ru")) (:maintainer "Dmitry Gutov" . "dgutov@yandex.ru"))])
+ (ruby-extra-highlight . [(20250103 1518) nil "Highlight Ruby parameters" tar ((:url . "https://github.com/Lindydancer/ruby-extra-highlight") (:commit . "d1f6d41e5c2fc4cc7a23f4e79fa3710fdc74ec61") (:revdesc . "d1f6d41e5c2f") (:keywords "languages" "faces"))])
+ (ruby-factory . [(20160102 721) ((inflections (1 1))) "Minor mode for Ruby test object generation libraries" tar ((:url . "https://github.com/sshaw/ruby-factory-mode") (:commit . "2bb7ccc2fccb5257376a989aa395bc7b9eb1d55d") (:revdesc . "2bb7ccc2fccb") (:keywords "ruby" "rails" "convenience") (:authors ("Skye Shaw" . "skye.shaw@gmail.com")) (:maintainers ("Skye Shaw" . "skye.shaw@gmail.com")) (:maintainer "Skye Shaw" . "skye.shaw@gmail.com"))])
+ (ruby-hash-syntax . [(20210106 224) ((emacs (24 1))) "Toggle ruby hash syntax between => and 1.9+ styles" tar ((:url . "https://github.com/purcell/ruby-hash-syntax") (:commit . "d458fb5891e0da85271b1cba3ee0ee69ea66a374") (:revdesc . "d458fb5891e0") (:keywords "languages") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (ruby-interpolation . [(20131112 1652) nil "Ruby string interpolation helpers" tar ((:url . "https://github.com/leoc/ruby-interpolation.el") (:commit . "1978e337601222cedf00e117bf4b5cac15d1f203") (:revdesc . "1978e3376012") (:authors ("Arthur Leonard Andersen" . "leoc.git@gmail.com")) (:maintainers ("Arthur Leonard Andersen" . "leoc.git@gmail.com")) (:maintainer "Arthur Leonard Andersen" . "leoc.git@gmail.com"))])
+ (ruby-json-to-hash . [(20211108 351) ((emacs (27 2)) (smartparens (1 11 0)) (string-inflection (1 0 16))) "Convert JSON to Hash and play with the keys" tar ((:url . "https://github.com/otavioschwanck/ruby-json-to-hash.el") (:commit . "8e94d8c5ac1732e1f4d09786968b46e14139520c") (:revdesc . "8e94d8c5ac17") (:keywords "tools" "languages") (:authors ("Otávio Schwanck dos Santos" . "otavioschwanck@gmail.com")) (:maintainers ("Otávio Schwanck dos Santos" . "otavioschwanck@gmail.com")) (:maintainer "Otávio Schwanck dos Santos" . "otavioschwanck@gmail.com"))])
+ (ruby-refactor . [(20160214 1650) ((ruby-mode (1 2))) "A minor mode which presents various Ruby refactoring helpers" tar ((:url . "https://github.com/ajvargo/ruby-refactor") (:commit . "e6b7125878a08518bffec6942df0c606f748e9ee") (:revdesc . "e6b7125878a0") (:keywords "refactor" "ruby") (:authors ("Andrew J Vargo" . "ajvargo@gmail.com") ("Jeff Morgan" . "jeff.morgan@leandog.com")) (:maintainers ("Andrew J Vargo" . "ajvargo@gmail.com") ("Jeff Morgan" . "jeff.morgan@leandog.com")) (:maintainer "Andrew J Vargo" . "ajvargo@gmail.com"))])
+ (ruby-test-mode . [(20210205 1107) ((ruby-mode (1 0)) (pcre2el (1 8))) "Minor mode for Behaviour and Test Driven" tar ((:url . "https://github.com/ruby-test-mode/ruby-test-mode") (:commit . "d66db4aca6e6a246f65f7195ecfbc7581d35fb7a") (:revdesc . "d66db4aca6e6") (:keywords "ruby" "unit" "test" "rspec" "tools") (:authors ("Roman Scherer" . "roman.scherer@gmx.de") ("Caspar Florian Ebeling" . "florian.ebeling@gmail.com")) (:maintainers ("Roman Scherer" . "roman.scherer@burningswell.com")) (:maintainer "Roman Scherer" . "roman.scherer@burningswell.com"))])
+ (ruby-tools . [(20151209 1615) nil "Collection of handy functions for ruby-mode" tar ((:url . "https://github.com/rejeep/ruby-tools") (:commit . "6b97066b58a4f82eb2ecea6434a0a7e981aa4c18") (:revdesc . "6b97066b58a4") (:keywords "speed" "convenience" "ruby") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (ruff-format . [(20241230 1856) ((emacs (24)) (reformatter (0 3))) "Ruff format Python source" tar ((:url . "https://github.com/JoshHayes/emacs-ruff-format") (:commit . "063a5e703b070103f405a4cb090af47396cfb00b") (:revdesc . "063a5e703b07") (:authors ("Ville Skyttä" . "ville.skytta@iki.fi")) (:maintainers ("Ville Skyttä" . "ville.skytta@iki.fi")) (:maintainer "Ville Skyttä" . "ville.skytta@iki.fi"))])
+ (rufo . [(20170718 1416) ((emacs (24 3))) "Use rufo to automatically format ruby files" tar ((:url . "https://github.com/danielma/rufo.el") (:commit . "85a6d80fb05fef396a8029b8f944c92a53faf8fe") (:revdesc . "85a6d80fb05f") (:authors ("Daniel Ma and contributors" . "danielhgma@gmail.com")) (:maintainers ("Daniel Ma and contributors" . "danielhgma@gmail.com")) (:maintainer "Daniel Ma and contributors" . "danielhgma@gmail.com"))])
+ (ruled-switch-buffer . [(20211205 636) ((emacs (24 3))) "Rule based buffer switching" tar ((:url . "https://github.com/kzkn/ruled-switch-buffer") (:commit . "99b53f7679e3eb868e4b4585085bbed102e5fce7") (:revdesc . "99b53f7679e3") (:keywords "convenience") (:authors ("Kazuki Nishikawa" . "kzkn@hey.com")) (:maintainers ("Kazuki Nishikawa" . "kzkn@hey.com")) (:maintainer "Kazuki Nishikawa" . "kzkn@hey.com"))])
+ (rum-mode . [(20180127 22) ((emacs (24))) "Major mode for Rum programming language" tar ((:url . "https://github.com/rumlang/rum-mode") (:commit . "161471e6476d232d479f9767535918920811d7bf") (:revdesc . "161471e6476d") (:keywords "rum" "languages" "lisp") (:authors ("Avelino" . "t@avelino.xxx")) (:maintainers ("Avelino" . "t@avelino.xxx")) (:maintainer "Avelino" . "t@avelino.xxx"))])
+ (run-command . [(20230317 2004) ((emacs (27 1))) "Run an external command from a context-dependent list" tar ((:url . "https://github.com/bard/emacs-run-command") (:commit . "477c42acce9e36ec59d18deaa73992f94faf7b99") (:revdesc . "477c42acce9e") (:keywords "processes") (:authors ("Massimiliano Mirra" . "hyperstruct@gmail.com")) (:maintainers ("Massimiliano Mirra" . "hyperstruct@gmail.com")) (:maintainer "Massimiliano Mirra" . "hyperstruct@gmail.com"))])
+ (run-command-recipes . [(20240708 1555) ((emacs (25 1)) (dash (2 18 0)) (f (0 20 0)) (run-command (1 0 0))) "Start pack of recipes to `run-command'" tar ((:url . "https://github.com/semenInRussia/emacs-run-command-recipes") (:commit . "5a249052933dfa5e8f768da6c73d926e167d6175") (:revdesc . "5a249052933d") (:keywords "extensions" "run-command") (:authors ("semenInRussia" . "hrams205@gmail.com")) (:maintainers ("semenInRussia" . "hrams205@gmail.com")) (:maintainer "semenInRussia" . "hrams205@gmail.com"))])
+ (run-stuff . [(20251209 1448) ((emacs (29 1))) "Context based command execution" tar ((:url . "https://codeberg.org/ideasman42/emacs-run-stuff") (:commit . "0873d04a8b18785bb8b1c9e49ac1ee6cea660d73") (:revdesc . "0873d04a8b18") (:keywords "files" "lisp" "convenience" "hypermedia") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (runner . [(20160524 1048) nil "Improved \"open with\" suggestions for dired" tar ((:url . "https://github.com/thamer/runner") (:commit . "a211d57ddc600410d07a8b534920ba905b093d87") (:revdesc . "a211d57ddc60") (:keywords "shell command" "dired" "file extension" "open with") (:authors ("Thamer Mahmoud" . "thamer.mahmoud@gmail.com")) (:maintainers ("Thamer Mahmoud" . "thamer.mahmoud@gmail.com")) (:maintainer "Thamer Mahmoud" . "thamer.mahmoud@gmail.com"))])
+ (runtests . [(20150807 831) nil "Run unit tests from Emacs" tar ((:url . "https://github.com/sunesimonsen/emacs-runtests") (:commit . "ed90249f24cc48290018df48b9b9b7172440be3e") (:revdesc . "ed90249f24cc") (:keywords "test") (:authors ("Sune Simonsen" . "sune@we-knowhow.dk")) (:maintainers ("Sune Simonsen" . "sune@we-knowhow.dk")) (:maintainer "Sune Simonsen" . "sune@we-knowhow.dk"))])
+ (russian-calendar . [(20260716 2030) ((emacs (29 4))) "Russian holidays and conferences. Updated 2025-09-30" tar ((:url . "https://github.com/Anoncheg1/emacs-russian-calendar") (:commit . "99077f02546a1a3619c46f95be926ceada155478") (:revdesc . "99077f02546a") (:keywords "calendar" "holidays"))])
+ (russian-holidays . [(20170109 2140) nil "Russian holidays for the calendar" tar ((:url . "https://github.com/grafov/russian-holidays") (:commit . "b285a30f29d85c48e3ea4eb93972d34a090c167b") (:revdesc . "b285a30f29d8") (:authors ("Alexander I.Grafov" . "siberian@laika.name")) (:maintainers ("Alexander I.Grafov" . "siberian@laika.name")) (:maintainer "Alexander I.Grafov" . "siberian@laika.name"))])
+ (russian-techwriter . [(20260101 1209) nil "Input methods for Russian technical writers" tar ((:url . "https://github.com/dunmaksim/emacs-russian-techwriter-input-method") (:commit . "10a82cb6e92db1e7c5c86d024a74a718d8d17005") (:revdesc . "10a82cb6e92d") (:keywords "multilingual" "input method" "cyrillic" "i18n") (:authors ("Maxim Dunaevskii" . "dunmaksim@yandex.ru")))])
+ (rust-auto-use . [(20200608 1359) nil "Utility to automatically insert Rust use statements" tar ((:url . "https://github.com/vmalloc/rust-auto-use.el") (:commit . "d5205f7b9b9eae0f7d0893f87d3391464719f9c0") (:revdesc . "d5205f7b9b9e") (:keywords "languages") (:authors ("Rotem Yaari" . "rotemy@MBP.local")) (:maintainers ("Rotem Yaari" . "rotemy@MBP.local")) (:maintainer "Rotem Yaari" . "rotemy@MBP.local"))])
+ (rust-mode . [(20260725 1442) ((emacs (25 1))) "A major-mode for editing Rust source code" tar ((:url . "https://github.com/rust-lang/rust-mode") (:commit . "0058837c048cc031ca1a13f598a6a6604777458b") (:revdesc . "0058837c048c") (:keywords "languages") (:authors ("Mozilla" . "rust-mode@noreply.github.com")) (:maintainers ("Mozilla" . "rust-mode@noreply.github.com")) (:maintainer "Mozilla" . "rust-mode@noreply.github.com"))])
+ (rust-playground . [(20200116 1043) ((emacs (24 3))) "Local Rust playground for short code snippets" tar ((:url . "https://github.com/grafov/rust-playground") (:commit . "5a117781dcb66065bea7830dd73618008fc34949") (:revdesc . "5a117781dcb6") (:keywords "tools" "rust") (:authors ("Alexander I.Grafov + all the contributors" . "grafov@gmail.com")) (:maintainers ("Alexander I.Grafov + all the contributors" . "grafov@gmail.com")) (:maintainer "Alexander I.Grafov + all the contributors" . "grafov@gmail.com"))])
+ (rustic . [(20260407 1712) ((emacs (28 2)) (rust-mode (1 0 6)) (dash (2 13 0)) (f (0 18 2)) (let-alist (1 0 4)) (markdown-mode (2 3)) (project (0 3 0)) (s (1 10 0)) (spinner (1 7 3)) (xterm-color (1 6))) "Rust development environment" tar ((:url . "https://github.com/emacs-rustic/rustic") (:commit . "b6c7e095145bb1fd0dc9cfb90ce36884e944556d") (:revdesc . "b6c7e095145b") (:keywords "languages"))])
+ (rutils . [(20260821 1405) ((emacs (27 1)) (ess (19)) (transient (0 4))) "R utilities with transient" tar ((:url . "https://github.com/ShuguangSun/rutils.el") (:commit . "c910dd21f5427896860ddc4d914d2fab3c5c0a23") (:revdesc . "c910dd21f542") (:keywords "convenience") (:authors ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainers ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainer "Shuguang Sun" . "shuguang79@qq.com"))])
+ (rvm . [(20220910 1558) nil "Emacs integration for rvm" tar ((:url . "http://www.emacswiki.org/emacs/RvmEl") (:commit . "e1e83b5466c132c066142ac63729ba833c530c83") (:revdesc . "e1e83b5466c1") (:keywords "ruby" "rvm") (:authors ("Yves Senn" . "yves.senn@gmx.ch")) (:maintainers ("Yves Senn" . "yves.senn@gmx.ch")) (:maintainer "Yves Senn" . "yves.senn@gmx.ch"))])
+ (ryo-modal . [(20240820 707) ((emacs (25 1))) "Roll your own modal mode" tar ((:url . "https://github.com/Kungsgeten/ryo-modal") (:commit . "83da38b2a816fda683d500eb4d3b10cff68c46e8") (:revdesc . "83da38b2a816") (:keywords "convenience" "modal" "keys") (:authors ("Erik Sjöstrand" . "sjostrand.erik@gmail.com")) (:maintainers ("Erik Sjöstrand" . "sjostrand.erik@gmail.com")) (:maintainer "Erik Sjöstrand" . "sjostrand.erik@gmail.com"))])
+ (s . [(20260522 135) nil "The long lost Emacs string manipulation library" tar ((:url . "https://github.com/magnars/s.el") (:commit . "7393fa6fa305403e628058c0ec78c35d610fab05") (:revdesc . "7393fa6fa305") (:keywords "strings") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (s-buffer . [(20130605 2124) ((s (1 6 0)) (noflet (0 0 3))) "S operations for buffers" tar ((:url . "https://github.com/nicferrier/emacs-s-buffer") (:commit . "f95d234282377f00a2c3a9846681080cb95bb1df") (:revdesc . "f95d23428237") (:keywords "lisp") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (s12cpuv2-mode . [(20171013 2051) ((emacs (24 3))) "Major-mode for S12CPUV2 assembly" tar ((:url . "https://github.com/AdamNiederer/s12cpuv2-mode") (:commit . "b17d4cf848dec1e20e66458e5c7ff77a2c051a8c") (:revdesc . "b17d4cf848de") (:keywords "s12cpuv2" "assembly" "languages") (:authors ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainers ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainer "Adam Niederer" . "adam.niederer@gmail.com"))])
+ (sackspace . [(20130719 956) nil "A better backspace" tar ((:url . "https://github.com/cofi/sackspace.el") (:commit . "fd0480eaaf6d3d11fd30ac5feb2da2f4f7572708") (:revdesc . "fd0480eaaf6d") (:keywords "delete" "convenience") (:authors ("Michael Markert" . "markert.michael@googlemail.com")) (:maintainers ("Michael Markert" . "markert.michael@googlemail.com")) (:maintainer "Michael Markert" . "markert.michael@googlemail.com"))])
+ (sage-shell-mode . [(20260523 1504) ((cl-lib (0 6 1)) (emacs (24 4)) (let-alist (1 0 5)) (deferred (0 5 1))) "A front-end for Sage Math" tar ((:url . "https://github.com/sagemath/sage-shell-mode") (:commit . "bb59cd559a9d7639d9ef16addbb0809ea4790392") (:revdesc . "bb59cd559a9d") (:keywords "sage" "math") (:authors ("Sho Takemori" . "stakemorii@gmail.com")) (:maintainers ("Sho Takemori" . "stakemorii@gmail.com")) (:maintainer "Sho Takemori" . "stakemorii@gmail.com"))])
+ (sail . [(20260209 411) ((emacs (25 1))) "NOAA tide and wind reports for sailors" tar ((:url . "https://github.com/brannala/esail") (:commit . "1cc38e174139dfb4732cfb5eb597829a982e1e99") (:revdesc . "1cc38e174139") (:keywords "comm") (:authors ("Bruce Rannala" . "brannala@ucdavis.edu")) (:maintainers ("Bruce Rannala" . "brannala@ucdavis.edu")) (:maintainer "Bruce Rannala" . "brannala@ucdavis.edu"))])
+ (sailfish-scratchbox . [(20171202 1332) nil "Sailfish OS scratchbox inside the emacs" tar ((:url . "https://github.com/vityafx/sailfish-scratchbox.el") (:commit . "bb5ed0f0b0cd72f2eb1af065b7587ec81866b089") (:revdesc . "bb5ed0f0b0cd") (:keywords "sb2" "mb2" "building" "scratchbox" "sailfish") (:authors ("V. V. Polevoy" . "fx@thefx.co")) (:maintainers ("V. V. Polevoy" . "fx@thefx.co")) (:maintainer "V. V. Polevoy" . "fx@thefx.co"))])
+ (sakura-theme . [(20240921 1028) ((autothemer (0 2)) (emacs (24))) "Filled with cherry blossoms" tar ((:url . "https://github.com/emacsfodder/emacs-theme-sakura") (:commit . "22d36d0a9b05e4e24ec701c585145b032e42bc7a") (:revdesc . "22d36d0a9b05") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (salesforce-utils . [(20160814 154) ((cl-lib (0 5))) "Simple utilities for Salesforce" tar ((:url . "https://github.com/grimnebulin/emacs-salesforce") (:commit . "73328baf0fb94ac0d0de645a8f6d42e5ae27f773") (:revdesc . "73328baf0fb9"))])
+ (salt-mode . [(20200210 1200) ((emacs (24 4)) (yaml-mode (0 0 12)) (mmm-mode (0 5 4)) (mmm-jinja2 (0 1))) "Major mode for Salt States" tar ((:url . "https://github.com/glynnforrest/salt-mode") (:commit . "e76e78d93e4770d42bdde9367a11d0e0836a21c9") (:revdesc . "e76e78d93e47") (:keywords "languages") (:authors ("Ben Hayden" . "hayden767@gmail.com")) (:maintainers ("Glynn Forrest" . "me@glynnforrest.com")) (:maintainer "Glynn Forrest" . "me@glynnforrest.com"))])
+ (samskritam . [(20260701 225) ((emacs (28 1)) (transient (0 3 0))) "Show samskrit word definitions" tar ((:url . "https://github.com/thapakrish/samskritam") (:commit . "30bbd177d2664c5a0d33f17b42c07705b8473b66") (:revdesc . "30bbd177d266") (:keywords "samskrit" "sanskrit" "संस्कृत" "dictionary" "devanagari" "convenience" "language") (:authors ("Krishna Thapa" . "thapakrish@gmail.com")) (:maintainers ("Krishna Thapa" . "thapakrish@gmail.com")) (:maintainer "Krishna Thapa" . "thapakrish@gmail.com"))])
+ (sas-py . [(20230131 523) ((emacs (28 1)) (ess (18 10 1))) "SAS with SASPy" tar ((:url . "https://github.com/ShuguangSun/sas-py") (:commit . "76a2226eb49ec37f211904c6395ee066bd440560") (:revdesc . "76a2226eb49e") (:keywords "tools") (:authors ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainers ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainer "Shuguang Sun" . "shuguang79@qq.com"))])
+ (sass-mode . [(20190502 53) ((haml-mode (3 0 15)) (cl-lib (0 5))) "Major mode for editing Sass files" tar ((:url . "https://github.com/nex3/haml/tree/master") (:commit . "247a0d4b509f10b28e4687cd8763492bca03599b") (:revdesc . "247a0d4b509f") (:keywords "markup" "language" "css"))])
+ (satysfi-ts-mode . [(20260109 532) ((emacs (29 1))) "A tree-sitter based major-mode for SATySFi" tar ((:url . "https://github.com/Kyure-A/satysfi-ts-mode") (:commit . "24bb037c8a45b3cd291f83cc4886cf9118c06777") (:revdesc . "24bb037c8a45") (:keywords "languages") (:authors ("Kyure_A" . "github.com/Kyure-A")) (:maintainers ("Kyure_A" . "github.com/Kyure-A")) (:maintainer "Kyure_A" . "github.com/Kyure-A"))])
+ (sauron . [(20201015 836) nil "Track (erc/org/dbus/...) events and react to them" tar ((:url . "https://github.com/djcb/sauron") (:commit . "5daade4836da5b1b2ab26d84128d6c38328a5d52") (:revdesc . "5daade4836da") (:keywords "comm" "frames") (:authors ("Dirk-Jan C. Binnema" . "djcb@djcbsoftware.nl")) (:maintainers ("Dirk-Jan C. Binnema" . "djcb@djcbsoftware.nl")) (:maintainer "Dirk-Jan C. Binnema" . "djcb@djcbsoftware.nl"))])
+ (save-load-path . [(20140206 1214) nil "Save load-path and reuse it to test" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/save-load-path.el") (:commit . "6cb763a37e2b8af505bff2bcd11fd49c9ea04d66") (:revdesc . "6cb763a37e2b") (:keywords "lisp") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (save-visited-files . [(20200212 414) nil "Save opened files across sessions" tar ((:url . "https://github.com/nflath/save-visited-files") (:commit . "8203a05a322324ec17b14437c8dfb38efdb53241") (:revdesc . "8203a05a3223") (:authors ("Nathaniel Flath" . "nflath@gmail.com")) (:maintainers ("Nathaniel Flath" . "nflath@gmail.com")) (:maintainer "Nathaniel Flath" . "nflath@gmail.com"))])
+ (savefold . [(20251002 924) ((emacs (28 1)) (compat (29 1))) "Persistence for various folding systems" tar ((:url . "https://github.com/jcfk/savefold.el") (:commit . "068f67dcfca6653187fe4c208d66a08b1f5e642a") (:revdesc . "068f67dcfca6") (:keywords "convenience") (:authors ("Jacob Fong" . "jacobcfong@gmail.com")) (:maintainers ("Jacob Fong" . "jacobcfong@gmail.com")) (:maintainer "Jacob Fong" . "jacobcfong@gmail.com"))])
+ (savekill . [(20140418 229) nil "Save kill ring to disk" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/savekill.el") (:commit . "67fc94e3d8fe8ce3ca16f90518f6a46479b63e34") (:revdesc . "67fc94e3d8fe") (:keywords "tools") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (saveplace-pdf-view . [(20250625 1437) ((emacs (29 1))) "Save place in pdf-view buffers" tar ((:url . "https://github.com/nicolaisingh/saveplace-pdf-view") (:commit . "dc1e0b28a5ed8319a0b6725abaffba7c2fa8c730") (:revdesc . "dc1e0b28a5ed") (:keywords "files" "convenience") (:authors ("Nicolai Singh" . "nicolaisinghatpm.me")) (:maintainers ("Nicolai Singh" . "nicolaisinghatpm.me")) (:maintainer "Nicolai Singh" . "nicolaisinghatpm.me"))])
+ (say-what-im-doing . [(20160706 1931) nil "Dictate what you're doing with text to speech" tar ((:url . "https://github.com/benaiah/say-what-im-doing") (:commit . "5b2ce6783b02805bcac1107a149bfba3852cd9d5") (:revdesc . "5b2ce6783b02") (:keywords "text to speech" "dumb" "funny"))])
+ (sayid . [(20260717 1435) ((emacs (28)) (cider (2 0))) "Sayid nREPL middleware client" tar ((:url . "https://github.com/clojure-emacs/sayid") (:commit . "16fe77228cb3f76eee52d1be336a505f23a31223") (:revdesc . "16fe77228cb3") (:keywords "clojure" "cider" "debugger") (:authors ("Bill Piel" . "bill@billpiel.com")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (sbt-mode . [(20260301 2016) ((emacs (24 4))) "Interactive support for sbt projects" tar ((:url . "https://github.com/hvesalai/emacs-sbt-mode") (:commit . "c353df6aa112c05dde6dc63ccf813c2203cb472b") (:revdesc . "c353df6aa112") (:keywords "languages"))])
+ (scad-mode . [(20260519 1039) ((emacs (29 1)) (compat (31))) "A major mode for editing OpenSCAD code" tar ((:url . "https://github.com/openscad/emacs-scad-mode") (:commit . "8798dca7e919705bcbc35d4ab5639556827ccb6f") (:revdesc . "8798dca7e919") (:keywords "languages") (:maintainers ("Len Trigg" . "lenbok@gmail.com") ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Len Trigg" . "lenbok@gmail.com"))])
+ (scad-ts-mode . [(20260418 410) ((emacs (29 3))) "Tree-sitter support for OpenSCAD" tar ((:url . "https://github.com/yoshinari-nomura/scad-ts-mode") (:commit . "9a61e0ad7a9cf2c4274553a35fc8643506d40c68") (:revdesc . "9a61e0ad7a9c") (:keywords "openscad" "languages" "tree-sitter") (:authors ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainers ("Yoshinari Nomura" . "nom@quickhack.net")) (:maintainer "Yoshinari Nomura" . "nom@quickhack.net"))])
+ (scala-mode . [(20260118 942) ((emacs (25 1))) "Major mode for editing Scala" tar ((:url . "https://github.com/hvesalai/emacs-scala-mode") (:commit . "50bcafa181baec7054e27f4bca55d5f9277c6350") (:revdesc . "50bcafa181ba") (:keywords "languages"))])
+ (scala-repl . [(20260315 730) ((emacs (29 1))) "Scala REPL Mode" tar ((:url . "https://github.com/sheepduke/scala-repl.el") (:commit . "5b7434af94edea2bb9de27fae4cbc3007e7397ea") (:revdesc . "5b7434af94ed") (:keywords "languages" "tools") (:authors ("Daian YUE" . "sheepduke@gmail.com")) (:maintainers ("Daian YUE" . "sheepduke@gmail.com")) (:maintainer "Daian YUE" . "sheepduke@gmail.com"))])
+ (scala-ts-mode . [(20260826 1159) ((emacs (29 1))) "An tree-sitter based major-mode for Scala" tar ((:url . "https://github.com/KaranAhlawat/scala-ts-mode") (:commit . "e14bc7c6a2a7404111ee124b83b4acf55c80321e") (:revdesc . "e14bc7c6a2a7") (:keywords "emacs" "scala" "languages" "tree-sitter" "scala-ts-mode") (:authors ("Karan Ahlawat" . "ahlawatkaran12@gmail.com")) (:maintainers ("Karan Ahlawat" . "ahlawatkaran12@gmail.com")) (:maintainer "Karan Ahlawat" . "ahlawatkaran12@gmail.com"))])
+ (scallop-mode . [(20250522 1432) ((emacs (24 3))) "Major mode for editing Scallop programming language" tar ((:url . "https://github.com/taquangtrung/emacs-scallop-mode") (:commit . "ba416989c3ec64369fe2fe1dafc521ca6821b23d") (:revdesc . "ba416989c3ec") (:keywords "languages"))])
+ (scf-mode . [(20151122 248) nil "Shorten file-names in compilation type buffers" tar ((:url . "https://github.com/lewang/scf-mode") (:commit . "dbfcdcd89034f208d65e181af58e0d73ad09f8b2") (:revdesc . "dbfcdcd89034") (:keywords "compilation"))])
+ (scheme-complete . [(20241205 111) nil "Smart auto completion for Scheme in Emacs" tar ((:url . "https://github.com/ashinn/scheme-complete") (:commit . "569277c0caa3edf8b28086b0efca6db4186184a8") (:revdesc . "569277c0caa3"))])
+ (schlau-compile . [(20260821 1643) ((emacs (24 3))) "Git-root-aware interface to `compile'" tar ((:url . "https://github.com/flajann2/schlau-compile") (:commit . "720f1c4e4ceddf5f36b236f92ac3270e49246234") (:revdesc . "720f1c4e4ced") (:keywords "tools" "unix" "processes" "compile" "compilation" "workflow" "development") (:authors ("Fred Mitchell" . "fred.mitchell@atomlogik.de")) (:maintainers ("Fred Mitchell" . "fred.mitchell@atomlogik.de")) (:maintainer "Fred Mitchell" . "fred.mitchell@atomlogik.de"))])
+ (scholar-import . [(20230412 1413) ((emacs (26 1)) (org (9 0)) (request (0 3 0)) (s (1 10 0)) (parsebib (4 2))) "Import Bibtex & PDF from Google Scholar" tar ((:url . "https://github.com/teeann/scholar-import") (:commit . "2456367578caa7fd768e30238ce080687faa0a25") (:revdesc . "2456367578ca") (:authors ("Anh T Nguyen" . "https://github.com/teeann")) (:maintainers ("Anh T Nguyen" . "https://github.com/teeann")) (:maintainer "Anh T Nguyen" . "https://github.com/teeann"))])
+ (schrute . [(20170521 1840) ((emacs (24 3))) "Help you remember there is a better way to do something" tar ((:url . "https://bitbucket.org/shackra/dwight-k.-schrute") (:commit . "59faa6c4232ae183cea93237301acad8c0763997") (:revdesc . "59faa6c4232a") (:keywords "convenience") (:authors ("Jorge Araya Navarro" . "elcorreo@deshackra.com")) (:maintainers ("Jorge Araya Navarro" . "elcorreo@deshackra.com")) (:maintainer "Jorge Araya Navarro" . "elcorreo@deshackra.com"))])
+ (scihub . [(20260131 420) ((emacs (27 1))) "Sci-Hub integration" tar ((:url . "https://github.com/emacs-pe/scihub.el") (:commit . "9bbc142be1dceff6705120017b75eeac3671cb36") (:revdesc . "9bbc142be1dc") (:keywords "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (sclang-extensions . [(20160509 338) ((auto-complete (1 4 0)) (s (1 3 1)) (dash (1 2 0)) (emacs (24 1))) "Extensions for the SuperCollider Emacs mode" tar ((:url . "https://github.com/chrisbarrett/sclang-extensions") (:commit . "e9cc79732f16fdb582129303110c163dcc0d6da0") (:revdesc . "e9cc79732f16") (:keywords "sclang" "supercollider" "languages" "tools") (:authors ("Chris Barrett" . "chris.d.barrett@me.com")) (:maintainers ("Chris Barrett" . "chris.d.barrett@me.com")) (:maintainer "Chris Barrett" . "chris.d.barrett@me.com"))])
+ (sclang-snippets . [(20130513 751) ((yasnippet (0 8 0))) "Snippets for the SuperCollider Emacs mode" tar ((:url . "https://github.com/ptrv/sclang-snippets") (:commit . "c840a416b96f83bdd70491e3d1fbe2f1ae8b3f58") (:revdesc . "c840a416b96f") (:keywords "snippets") (:authors ("ptrv" . "mail@petervasil.net")) (:maintainers ("ptrv" . "mail@petervasil.net")) (:maintainer "ptrv" . "mail@petervasil.net"))])
+ (scopeline . [(20250120 331) ((emacs (29 1))) "Show scope info of blocks in buffer at end of scope" tar ((:url . "https://github.com/meain/scopeline.el") (:commit . "5f2cd5aad329190ee3dc56d8003fc957dd65f211") (:revdesc . "5f2cd5aad329") (:keywords "scope" "context" "tree-sitter" "convenience"))])
+ (scpaste . [(20250706 1759) ((htmlize (1 39))) "Paste to the web via scp" tar ((:url . "https://git.sr.ht/~technomancy/scpaste") (:commit . "5203d3625c34e51433435dc466853aa36f4ebe21") (:revdesc . "5203d3625c34") (:keywords "convenience" "hypermedia"))])
+ (scratch . [(20220319 1705) ((emacs (25 1))) "Mode-specific scratch buffers" tar ((:url . "https://github.com/ieure/scratch-el") (:commit . "f000648c9663833a76a8de9b1e78c99a9d698e48") (:revdesc . "f000648c9663") (:keywords "convenience" "tools" "files") (:authors ("Ian Eure" . "ian.eure@gmail.com")) (:maintainers ("Ian Eure" . "ian.eure@gmail.com")) (:maintainer "Ian Eure" . "ian.eure@gmail.com"))])
+ (scratch-comment . [(20200812 1025) ((emacs (26 1))) "Insert Elisp result as comment in scratch buffer" tar ((:url . "https://github.com/conao3/scratch-comment.el") (:commit . "cf3e967b4def1308b6ef1cfeedd2cf15ee6e226c") (:revdesc . "cf3e967b4def") (:keywords "convenience") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (scratch-ext . [(20220617 132) ((emacs (24 1))) "Extensions for *scratch*" tar ((:url . "https://github.com/kyanagi/scratch-ext-el") (:commit . "8bbe1649503bb2e3676643e6e49fde155c1d6c70") (:revdesc . "8bbe1649503b") (:authors ("Kouhei Yanagita" . "yanagi@shakenbu.org")) (:maintainers ("Kouhei Yanagita" . "yanagi@shakenbu.org")) (:maintainer "Kouhei Yanagita" . "yanagi@shakenbu.org"))])
+ (scratch-log . [(20141115 743) nil "Utility for *scratch* buffer" tar ((:url . "https://github.com/mori-dev/scratch-log") (:commit . "1168f7f16d36ca0f4ddf2bb98881f8db62cc5dc0") (:revdesc . "1168f7f16d36") (:authors ("kmori" . "morihenotegami@gmail.com")) (:maintainers ("kmori" . "morihenotegami@gmail.com")) (:maintainer "kmori" . "morihenotegami@gmail.com"))])
+ (scratch-message . [(20220209 2207) nil "Changing message in your scratch buffer" tar ((:url . "https://github.com/thisirs/scratch-message.git") (:commit . "0d4198f6effd8f118bf03ee4979f566041ef6a9b") (:revdesc . "0d4198f6effd") (:keywords "util" "scratch") (:authors ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainers ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainer "Sylvain Rousseau" . "thisirsatgmaildotcom"))])
+ (scratch-palette . [(20250104 1359) nil "Make scratch buffer for each files" tar ((:url . "http://zk-phi.github.io/") (:commit . "e4389fbb97f2890c4caebba0588cbc5d5f1ecbc6") (:revdesc . "e4389fbb97f2"))])
+ (scratch-plus . [(20250728 109) ((emacs (29 1))) "Better Scratch Buffer Behavior" tar ((:url . "https://git.sr.ht/~swflint/scratch-plus") (:commit . "b794901f968000f6e338808307385b683b79ec8b") (:revdesc . "b794901f9680") (:keywords "convenience") (:authors ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (scratch-pop . [(20200910 226) nil "Generate, popup (& optionally backup) scratch buffer(s)" tar ((:url . "http://hins11.yu-yake.com/") (:commit . "545badcd840dd50b39dd7dfa37459c6f71d02ea6") (:revdesc . "545badcd840d"))])
+ (scratches . [(20151006 416) ((dash (2 11 0)) (f (0 17 0))) "Multiple scratches in any language" tar ((:url . "https://github.com/victorteokw/scratches") (:commit . "9441afe6396ca38f08029123fab5d87429cbf315") (:revdesc . "9441afe6396c") (:keywords "scratch") (:authors ("Zhang Kai Yu" . "yeannylam@gmail.com")) (:maintainers ("Zhang Kai Yu" . "yeannylam@gmail.com")) (:maintainer "Zhang Kai Yu" . "yeannylam@gmail.com"))])
+ (scribble-mode . [(20190912 200) ((emacs (24))) "Major mode for editing Scribble documents" tar ((:url . "https://github.com/emacs-pe/scribble-mode") (:commit . "5c3ea3cc9bbad585476eee41ea76dc056c2012bb") (:revdesc . "5c3ea3cc9bba") (:keywords "convenience") (:authors ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainers ("Mario Rodas" . "marsam@users.noreply.github.com")) (:maintainer "Mario Rodas" . "marsam@users.noreply.github.com"))])
+ (scroll-on-drag . [(20260108 1316) ((emacs (29 1))) "Interactive scrolling" tar ((:url . "https://codeberg.org/ideasman42/emacs-scroll-on-drag") (:commit . "eb38193bbcbf7559f3fb3b1d5d5f86b713786689") (:revdesc . "eb38193bbcbf") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (scroll-on-jump . [(20260730 1224) ((emacs (26 2))) "Scroll when jumping to a new point" tar ((:url . "https://codeberg.org/ideasman42/emacs-scroll-on-jump") (:commit . "4f903331db2c15fb4427ededca2d764d8f65db64") (:revdesc . "4f903331db2c") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (scrollable-quick-peek . [(20201224 329) ((quick-peek (1 0)) (emacs (24 4))) "Display scrollable overlays" tar ((:url . "https://github.com/jpablobr/scrollable-quick-peek") (:commit . "3e3492145a61831661d6e97fdcb47b5b66c73287") (:revdesc . "3e3492145a61") (:keywords "convenience" "extensions" "help" "tools") (:authors ("Pablo Barrantes" . "xjpablobrx@gmail.com")) (:maintainers ("Pablo Barrantes" . "xjpablobrx@gmail.com")) (:maintainer "Pablo Barrantes" . "xjpablobrx@gmail.com"))])
+ (scrollkeeper . [(20190109 629) ((emacs (25 1))) "Custom scrolling commands with visual guidelines" tar ((:url . "https://github.com/alphapapa/scrollkeeper.el") (:commit . "3c4ac6b6b44686d31c260ee0b19daaee59bdccd6") (:revdesc . "3c4ac6b6b446") (:keywords "convenience") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (scrooge . [(20180630 1022) ((emacs (24)) (cl-lib (0 5)) (dash (2 13 0)) (thrift (0 9 3))) "Major mode for Twitter Scrooge files" tar ((:url . "https://github.com/cosmicexplorer/emacs-scrooge") (:commit . "0a8c58e9e6708abe4ef7e415bc1e0472318bb1b0") (:revdesc . "0a8c58e9e670") (:keywords "scrooge" "thrift") (:authors ("Daniel McClanahan" . "danieldmcclanahan@gmail.com")) (:maintainers ("Daniel McClanahan" . "danieldmcclanahan@gmail.com")) (:maintainer "Daniel McClanahan" . "danieldmcclanahan@gmail.com"))])
+ (scss-mode . [(20180123 1708) nil "Major mode for editing SCSS files" tar ((:url . "https://github.com/antonj/scss-mode") (:commit . "cf58dbec5394280503eb5502938f3b5445d1b53d") (:revdesc . "cf58dbec5394") (:keywords "scss" "css" "mode"))])
+ (sculpture-themes . [(20260819 1348) ((emacs (26 1))) "Themes with vivid colors" tar ((:url . "https://github.com/precompute/sculpture-theme") (:commit . "b5bfd886bf253141a9a333836a542fced1fd8290") (:revdesc . "b5bfd886bf25") (:authors ("Precompute" . "git@precompute.net")) (:maintainers ("Precompute" . "git@precompute.net")) (:maintainer "Precompute" . "git@precompute.net"))])
+ (sdcv . [(20241227 319) ((emacs (24 3)) (popup (0 5 3)) (showtip (0 1)) (pos-tip (0 4 6)) (cl-lib (0 3))) "Interface for sdcv (StartDict console version)" tar ((:url . "https://repo.or.cz/sdcv.el.git") (:commit . "941ac2fbbb1be9ad595aed6dd782a842c4676a1a") (:revdesc . "941ac2fbbb1b") (:keywords "startdict" "sdcv") (:authors ("Andy Stewart" . "lazycat.manatee@gmail.com")) (:maintainers ("Andy Stewart" . "lazycat.manatee@gmail.com") (nil . "stardiviner(numbchild@gmail.com")) (:maintainer "Andy Stewart" . "lazycat.manatee@gmail.com"))])
+ (sdlang-mode . [(20161201 711) ((emacs (24 3))) "Major mode for Simple Declarative Language files" tar ((:url . "https://github.com/CyberShadow/sdlang-mode") (:commit . "d42a6eedefeb44919fbacf58d302b6df18f05bbc") (:revdesc . "d42a6eedefeb") (:keywords "languages"))])
+ (sdml-mode . [(20251030 1814) ((emacs (28 1)) (tree-sitter (0 18 0)) (tree-sitter-indent (0 4))) "Major mode for SDML" tar ((:url . "https://github.com/sdm-lang/emacs-sdml-mode") (:commit . "3b2430df46a026e70a69da019afa8f40a8ed9225") (:revdesc . "3b2430df46a0") (:keywords "languages" "tools") (:authors ("Simon Johnston" . "johnstonskj@gmail.com")) (:maintainers ("Simon Johnston" . "johnstonskj@gmail.com")) (:maintainer "Simon Johnston" . "johnstonskj@gmail.com"))])
+ (search-web . [(20150312 1103) nil "Post web search queries using `browse-url'" tar ((:url . "https://github.com/tomoya/search-web.el") (:commit . "c4ae86ac1acfc572b81f3d78764bd9a54034c331") (:revdesc . "c4ae86ac1acf") (:authors ("Tomoya Otake" . "tomoya.ton@gmail.com")) (:maintainers ("Tomoya Otake" . "tomoya.ton@gmail.com")) (:maintainer "Tomoya Otake" . "tomoya.ton@gmail.com"))])
+ (searcher . [(20260101 602) ((emacs (25 1)) (dash (2 10)) (f (0 20 0))) "Searcher in pure elisp" tar ((:url . "https://github.com/jcs-elpa/searcher") (:commit . "b9ffe260b8d5303a83e73ed44f81d77fb260c43d") (:revdesc . "b9ffe260b8d5") (:keywords "convenience" "search" "searcher" "string") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (searchq . [(20150829 1211) ((emacs (24 3))) "Framework of queued search tasks using GREP, ACK, AG and more" tar ((:url . "https://github.com/tcw165/searchq") (:commit . "dd510d55ad66a82c6ef022cfe7c4a73ad5365f82") (:revdesc . "dd510d55ad66"))])
+ (secretaria . [(20191128 250) ((emacs (24 4)) (alert (1 2)) (s (1 12)) (f (0 20 0)) (org (9))) "A personal assistant based on org-mode" tar ((:url . "https://gitlab.com/shackra/secretaria") (:commit . "03986130a2ada1fa952d45e83536729f20230fcf") (:revdesc . "03986130a2ad") (:keywords "org" "convenience") (:authors ("Jorge Araya Navarro" . "jorge@esavara.cr")) (:maintainers ("Jorge Araya Navarro" . "jorge@esavara.cr")) (:maintainer "Jorge Araya Navarro" . "jorge@esavara.cr"))])
+ (see-mode . [(20180511 41) ((emacs (24 4)) (language-detection (0 1 0))) "Edit string  in a separate buffer" tar ((:url . "https://github.com/marcelino-m/see-mode") (:commit . "db9e4324f9dcc14d5125cb6a79d6c9fad5b14626") (:revdesc . "db9e4324f9dc") (:keywords "convenience") (:authors ("Marcelo Muñoz" . "ma.munoz.araya@gmail.com")) (:maintainers ("Marcelo Muñoz" . "ma.munoz.araya@gmail.com")) (:maintainer "Marcelo Muñoz" . "ma.munoz.araya@gmail.com"))])
+ (seeing-is-believing . [(20170214 1320) nil "Minor mode for running the seeing-is-believing ruby gem" tar ((:url . "https://github.com/jcinnamond/seeing-is-believing") (:commit . "fbbe246c0fda87bb26227bb826eebadb418a220f") (:revdesc . "fbbe246c0fda"))])
+ (seethru . [(20150218 1829) ((shadchen (1 4))) "Easily change Emacs' transparency" tar ((:url . "https://github.com/benaiah/seethru") (:commit . "d87e231f99313bea75b1e69e48c0f32968c82060") (:revdesc . "d87e231f9931") (:keywords "lisp" "tools" "alpha" "transparency") (:authors ("Benaiah Mischenko" . "benaiah@mischenko.com")) (:maintainers ("Benaiah Mischenko" . "benaiah@mischenko.com")) (:maintainer "Benaiah Mischenko" . "benaiah@mischenko.com"))])
+ (sekka . [(20260422 1428) ((emacs (25 1)) (popup (0 5 2))) "Pure Elisp Japanese IME inspired by SKK" tar ((:url . "https://github.com/kiyoka/sekka") (:commit . "78dfe17b2e04b03b6248e39814f84a77b4f6f2b7") (:revdesc . "78dfe17b2e04") (:keywords "i18n") (:authors ("Kiyoka Nishiyama" . "kiyoka@sumibi.org")) (:maintainers ("Kiyoka Nishiyama" . "kiyoka@sumibi.org")) (:maintainer "Kiyoka Nishiyama" . "kiyoka@sumibi.org"))])
+ (selcand . [(20240430 1408) ((emacs (25 1))) "Select a candidate from a tree of hint characters" tar ((:url . "https://github.com/erjoalgo/selcand") (:commit . "6baa1771eacbcfe7ec854362bed17baea865424e") (:revdesc . "6baa1771eacb") (:keywords "lisp" "completing-read" "prompt" "combinations" "vimium") (:maintainers ("concat \"erjoalgo\" \"@\" \"gmail\" \".com\"" . "")) (:maintainer "concat \"erjoalgo\" \"@\" \"gmail\" \".com\"" . ""))])
+ (select-themes . [(20160221 106) nil "Color theme selection with completing-read" tar ((:url . "https://github.com/jasonm23/emacs-select-themes") (:commit . "236f54287519a3ea6dd7b3992d053e4f4ff5d0fe") (:revdesc . "236f54287519") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (selected . [(20260523 1823) nil "Keymap for when region is active" tar ((:url . "https://github.com/Kungsgeten/selected.el") (:commit . "9f5a6324e4911515972989841f143696472f2374") (:revdesc . "9f5a6324e491") (:keywords "convenience"))])
+ (selected-window-accent-mode . [(20260630 801) ((emacs (29 1))) "Accent Selected Window" tar ((:url . "https://github.com/captainflasmr/selected-window-accent-mode") (:commit . "57dfb3b4c65943f542eca322644cfa4d0731366c") (:revdesc . "57dfb3b4c659") (:keywords "convenience") (:authors ("James Dyer" . "captainflasmr@gmail.com")) (:maintainers ("James Dyer" . "captainflasmr@gmail.com")) (:maintainer "James Dyer" . "captainflasmr@gmail.com"))])
+ (selected-window-contrast . [(20260330 1542) ((emacs (26 1))) "Highlight window and cursor at switching" tar ((:url . "https://codeberg.org/Anoncheg/selected-window-contrast") (:commit . "ccf6687020dae9a6c36af4a5ae53e79d56ad8719") (:revdesc . "ccf6687020da") (:keywords "color" "windows" "faces" "buffer" "background") (:authors ("Anoncheg" . "vitalij@gmx.com")) (:maintainers ("Anoncheg" . "vitalij@gmx.com")) (:maintainer "Anoncheg" . "vitalij@gmx.com"))])
+ (selectric-mode . [(20200209 2107) nil "IBM Selectric mode for Emacs" tar ((:url . "https://github.com/rbanffy/selectric-mode") (:commit . "bb9e66678f34e9bc23624ff6292cf5e7857e8e5f") (:revdesc . "bb9e66678f34") (:keywords "multimedia" "convenience" "typewriter" "selectric") (:authors ("Ricardo Bánffy" . "rbanffy@gmail.com")) (:maintainers ("Ricardo Banffy" . "rbanffy@gmail.com")) (:maintainer "Ricardo Banffy" . "rbanffy@gmail.com"))])
+ (selectrum . [(20220513 2106) ((emacs (26 1))) "Easily select item from list" tar ((:url . "https://github.com/radian-software/selectrum") (:commit . "810ea697bdd559d97b86b795e01769cddfa3daf2") (:revdesc . "810ea697bdd5") (:keywords "extensions") (:authors ("Radian LLC" . "contact+selectrum@radian.codes")) (:maintainers ("Radian LLC" . "contact+selectrum@radian.codes")) (:maintainer "Radian LLC" . "contact+selectrum@radian.codes"))])
+ (selectrum-prescient . [(20260628 2243) ((emacs (25 1)) (prescient (6 1 0)) (selectrum (3 1))) "Prescient.el + Selectrum" tar ((:url . "https://github.com/raxod502/prescient.el") (:commit . "5649977fa7789e4615efeca09397ed7eccd06dfc") (:revdesc . "5649977fa778") (:keywords "extensions") (:authors ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainers ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainer "Radian LLC" . "contact+prescient@radian.codes"))])
+ (sema-mode . [(20260804 925) ((emacs (25 1))) "Major mode for editing Sema files" tar ((:url . "https://github.com/sema-lisp/emacs-sema") (:commit . "308b0075837a63fc49c2787e3255a5afa317831f") (:revdesc . "308b0075837a") (:keywords "languages" "lisp") (:authors ("Helge Sverre" . "helge.sverre@gmail.com")) (:maintainers ("Helge Sverre" . "helge.sverre@gmail.com")) (:maintainer "Helge Sverre" . "helge.sverre@gmail.com"))])
+ (semantic-thrift . [(20260103 340) ((thrift (0 0 1)) (emacs (28 2))) "Thrift LALR parser" tar ((:url . "https://github.com/jerryxgh/semantic-thrift") (:commit . "75d972e91ac97f1378eb6891300361044dfc6624") (:revdesc . "75d972e91ac9") (:keywords "extensions" "thrift" "semantic") (:authors (nil . "GuanghuiXugh_xu@qq.com")) (:maintainers (nil . "GuanghuiXugh_xu@qq.com")) (:maintainer nil . "GuanghuiXugh_xu@qq.com"))])
+ (semaphore . [(20190607 1949) ((emacs (26))) "Semaphore based on condition variables" tar ((:url . "https://github.com/webnf/semaphore.el") (:commit . "ec4c485c8e4cff63805ecc25523a031a6c2ad7cd") (:revdesc . "ec4c485c8e4c") (:keywords "processes" "unix") (:authors ("Herwig Hochleitner" . "herwig@bendlas.net")) (:maintainers ("Herwig Hochleitner" . "herwig@bendlas.net")) (:maintainer "Herwig Hochleitner" . "herwig@bendlas.net"))])
+ (semaphore-promise . [(20190607 2115) ((emacs (26)) (semaphore (1)) (promise (1))) "Semaphore integration with promise" tar ((:url . "https://github.com/webnf/semaphore.el") (:commit . "9cdfef91cc0293371af549ad41027aa5b73f30a4") (:revdesc . "9cdfef91cc02") (:keywords "processes" "unix") (:authors ("Herwig Hochleitner" . "herwig@bendlas.net")) (:maintainers ("Herwig Hochleitner" . "herwig@bendlas.net")) (:maintainer "Herwig Hochleitner" . "herwig@bendlas.net"))])
+ (semi . [(20251207 1834) ((emacs (24 5)) (apel (0)) (flim (0))) "MIME features" tar ((:url . "https://github.com/emacsmirror/semi") (:commit . "9904bd849a6243646f4db65d623f2b38b05d79bd") (:revdesc . "9904bd849a62") (:keywords "mime" "multimedia" "mail" "news") (:authors ("MORIOKA Tomohiko" . "tomo@m17n.org")) (:maintainers ("MORIOKA Tomohiko" . "tomo@m17n.org")) (:maintainer "MORIOKA Tomohiko" . "tomo@m17n.org"))])
+ (seml-mode . [(20260516 826) ((emacs (27 1)) (impatient-mode (1 1)) (htmlize (1 5)) (web-mode (16 0))) "Major-mode for SEML, S-Expression Markup Language, file" tar ((:url . "https://github.com/conao3/seml-mode.el") (:commit . "ec1efc3fb1a3d831a744bdaa0beb4ac5fcf59d2c") (:revdesc . "ec1efc3fb1a3") (:keywords "lisp" "html") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (sendto . [(20160425 1250) ((emacs (24 4))) "Send the region content to a function" tar ((:url . "https://github.com/lujun9972/sendto.el") (:commit . "076b81d7a53f75b0a59b0ef3448f35570567054c") (:revdesc . "076b81d7a53f") (:keywords "convenience" "region") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (sensei . [(20260125 933) ((emacs (27 1)) (projectile (2 5 0)) (request (0 3 2))) "A client for sensei" tar ((:url . "https://abailly.github.io/sensei") (:commit . "4257ca13aaabfeee7be245e1efd00a5b189e7c9a") (:revdesc . "4257ca13aaab") (:keywords "hypermedia") (:authors ("Arnaud Bailly" . "arnaud@pankzsoft.com")) (:maintainers ("Arnaud Bailly" . "arnaud@pankzsoft.com")) (:maintainer "Arnaud Bailly" . "arnaud@pankzsoft.com"))])
+ (sensitive . [(20170818 1251) ((emacs (24)) (sequences (0 1 0))) "A dead simple way to load sensitive information" tar ((:url . "https://github.com/timvisher/sensitive.el") (:commit . "69dd6125a41d8b55f4b6ba61daa4d1aa1f716fa8") (:revdesc . "69dd6125a41d") (:keywords "convenience") (:authors ("Tim Visher" . "tim.visher@gmail.com")) (:maintainers ("Tim Visher" . "tim.visher@gmail.com")) (:maintainer "Tim Visher" . "tim.visher@gmail.com"))])
+ (sentence-navigation . [(20220522 1137) ((ample-regexps (0 1)) (cl-lib (0 5)) (emacs (24 4))) "Commands to navigate one-spaced sentences" tar ((:url . "https://github.com/noctuid/emacs-sentence-navigation") (:commit . "ea6e94a5518643acda5b6e98e4e7f47dfc107d29") (:revdesc . "ea6e94a55186") (:keywords "sentence" "evil") (:authors ("Fox Kiester" . "noct@openmailbox.org")) (:maintainers ("Fox Kiester" . "noct@openmailbox.org")) (:maintainer "Fox Kiester" . "noct@openmailbox.org"))])
+ (sentex . [(20260805 1232) ((emacs (27 1))) "Regex-based sentence navigation rules" tar ((:url . "https://codeberg.org/martianh/sentex") (:commit . "f21da7c9451eefd8af587da5d5e8a1e619ded45a") (:revdesc . "f21da7c9451e") (:keywords "languages" "convenience" "translation" "sentences" "text" "wp") (:authors ("Marty Hiatt" . "martianh@disroot.org")) (:maintainers ("Marty Hiatt" . "martianh@disroot.org")) (:maintainer "Marty Hiatt" . "martianh@disroot.org"))])
+ (seoul256-theme . [(20180505 757) ((emacs (24 3))) "Low-contrast color scheme based on Seoul Colors" tar ((:url . "https://github.com/anandpiyer/seoul256-emacs") (:commit . "8e76d0207489964ef780420723d49e409f68f7d1") (:revdesc . "8e76d0207489") (:keywords "theme") (:authors ("Anand Iyer" . "anand.ucb@gmail.com")) (:maintainers ("Anand Iyer" . "anand.ucb@gmail.com")) (:maintainer "Anand Iyer" . "anand.ucb@gmail.com"))])
+ (separedit . [(20250506 833) ((emacs (25 1)) (dash (2 18)) (edit-indirect (0 1 11))) "Edit comment/string/docstring/code block in separate buffer" tar ((:url . "https://github.com/twlz0ne/separedit.el") (:commit . "5cb46a65fc6e12b753dce8f581fbfa144d011a80") (:revdesc . "5cb46a65fc6e") (:keywords "tools" "languages" "docs") (:authors ("Gong Qijian" . "gongqijian@gmail.com")) (:maintainers ("Gong Qijian" . "gongqijian@gmail.com")) (:maintainer "Gong Qijian" . "gongqijian@gmail.com"))])
+ (sequed . [(20260219 2234) ((emacs (25 2))) "Major mode for FASTA and phylip/bpp DNA alignments" tar ((:url . "https://github.com/brannala/sequed") (:commit . "0156c71a163b7d55b2a8b198eab0be3de9dc229d") (:revdesc . "0156c71a163b") (:authors ("Bruce Rannala" . "brannala@ucdavis.edu")) (:maintainers ("Bruce Rannala" . "brannala@ucdavis.edu")) (:maintainer "Bruce Rannala" . "brannala@ucdavis.edu"))])
+ (sequences . [(20170818 1252) ((emacs (24))) "Ports of some Clojure sequence functions" tar ((:url . "https://github.com/timvisher/sequences.el") (:commit . "564ebbd93b0beea4e75acfbf824350e90b5d5738") (:revdesc . "564ebbd93b0b") (:keywords "convenience") (:authors ("Tim Visher" . "tim.visher@gmail.com")) (:maintainers ("Tim Visher" . "tim.visher@gmail.com")) (:maintainer "Tim Visher" . "tim.visher@gmail.com"))])
+ (sequential-command . [(20170926 40) nil "Many commands into one command" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/sequential-command.el") (:commit . "a48cbcbe273b33edd3ae56e68f44b4100fa3a48a") (:revdesc . "a48cbcbe273b") (:keywords "convenience" "lisp") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (sequential-yank . [(20231126 1530) ((emacs (24 4))) "Minor mode to copy and paste strings sequentially" tar ((:url . "https://github.com/knu/sequential-yank.el") (:commit . "3c7f98a842c391b59379566cbf03f143004b26da") (:revdesc . "3c7f98a842c3") (:keywords "killing" "convenience") (:authors ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (seriestracker . [(20250315 1813) ((dash (2 12 1)) (transient (0 3 2)) (emacs (27 1))) "Series tracker" tar ((:url . "https://www.github.com/MaximeWack/seriesTracker") (:commit . "03e5937abe7911fef6286601cbe54e0a6bc9ec3f") (:revdesc . "03e5937abe79") (:keywords "multimedia") (:authors ("Maxime Wack" . "contactatmaximewackdotcom")) (:maintainers ("Maxime Wack" . "contactatmaximewackdotcom")) (:maintainer "Maxime Wack" . "contactatmaximewackdotcom"))])
+ (servant . [(20140216 1219) ((s (1 8 0)) (dash (2 2 0)) (f (0 11 0)) (ansi (0 3 0)) (commander (0 5 0)) (epl (0 2)) (shut-up (0 2 1)) (web-server (0 0 1))) "ELPA server written in Emacs Lisp" tar ((:url . "https://github.com/rejeep/servant.el") (:commit . "4d2aa8250b54b28e6e7ee4cd5ebd98a33db2c134") (:revdesc . "4d2aa8250b54") (:keywords "elpa" "server") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com") ("Sebastian Wiesner" . "lunaryorn@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com") ("Sebastian Wiesner" . "lunaryorn@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (services . [(20170802 1130) ((cl-lib (0 5))) "Services database access functions" tar ((:url . "https://github.com/davep/services.el") (:commit . "04c7986041a33dfa0b0ae57c7d6fbd600548c596") (:revdesc . "04c7986041a3") (:keywords "convenience" "net" "services") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (sesman . [(20260616 1239) ((emacs (25))) "Generic Session Manager" tar ((:url . "https://github.com/vspinu/sesman") (:commit . "7eb733acb33e610a53979fa7fc13393eeda3cc53") (:revdesc . "7eb733acb33e") (:keywords "process"))])
+ (session . [(20210422 53) nil "Use variables, registers and buffer places across sessions" tar ((:url . "http://emacs-session.sourceforge.net/") (:commit . "3be207c50dfe964de3cbf5cd8fa9b07fc7d2e609") (:revdesc . "3be207c50dfe") (:keywords "session" "session management" "desktop" "data" "tools") (:authors ("Christoph Wedler" . "wedler@users.sourceforge.net")) (:maintainers ("Christoph Wedler" . "wedler@users.sourceforge.net")) (:maintainer "Christoph Wedler" . "wedler@users.sourceforge.net"))])
+ (session-async . [(20231125 2106) ((emacs (27 1)) (jsonrpc (1 0 9))) "Asynchronous processing in a forked process session" tar ((:url . "https://codeberg.org/FelipeLema/session-async.el") (:commit . "6e361073256740ce546f4fa104045f2b3818ef94") (:revdesc . "6e3610732567") (:keywords "async" "comm" "data" "files" "internal" "maint" "processes" "tools") (:authors ("Felipe Lema" . "felipelema@mortemale.org")) (:maintainers ("Felipe Lema" . "felipelema@mortemale.org")) (:maintainer "Felipe Lema" . "felipelema@mortemale.org"))])
+ (seti-theme . [(20190201 1848) nil "A dark colored theme, inspired by Seti Atom Theme" tar ((:url . "https://github.com/caisah/seti-theme") (:commit . "9d76db0b91d4f574dd96ac80fad41da35bffa109") (:revdesc . "9d76db0b91d4") (:keywords "themes") (:authors ("Vlad Piersec" . "vlad.piersec@gmail.com")) (:maintainers ("Vlad Piersec" . "vlad.piersec@gmail.com")) (:maintainer "Vlad Piersec" . "vlad.piersec@gmail.com"))])
+ (sexp-diff . [(20200314 2018) ((emacs (25))) "Diff sexps based on Levenshtein-like edit distance" tar ((:url . "https://github.com/xuchunyang/sexp-diff.el") (:commit . "4fea80f7b04c64b160a95bdc9d6de68c71096706") (:revdesc . "4fea80f7b04c") (:keywords "lisp"))])
+ (sexp-move . [(20150915 1730) nil "Improved S-Expression Movement" tar ((:url . "https://gitlab.com/elzair/sexp-move") (:commit . "117f7a91ab7c25e438413753e916570122011ce7") (:revdesc . "117f7a91ab7c") (:keywords "sexp") (:authors ("Philip Woods" . "elzairthesorcerer@gmail.com")) (:maintainers ("Philip Woods" . "elzairthesorcerer@gmail.com")) (:maintainer "Philip Woods" . "elzairthesorcerer@gmail.com"))])
+ (sexy-monochrome-theme . [(20200115 2146) nil "A sexy dark Emacs >= 24 theme for your sexy code" tar ((:url . "https://github.com/voloyev/sexy-monochrome-theme") (:commit . "f3ad07d60c966ef34cb11026eaba053e114bb8f1") (:revdesc . "f3ad07d60c96") (:keywords "themes") (:authors ("Volodymyr Yevtushenko" . "voloyev@vivaldi.net")) (:maintainers ("Volodymyr Yevtushenko" . "voloyev@vivaldi.net")) (:maintainer "Volodymyr Yevtushenko" . "voloyev@vivaldi.net"))])
+ (sexy-theme . [(20260708 327) ((emacs (24 1))) "A strong colors variant of the Gruber Darker theme" tar ((:url . "https://github.com/bgcicca/sexy-theme.el") (:commit . "eb747facb5916d8cbcac3e5d086317ce5e1ff341") (:revdesc . "eb747facb591") (:authors ("Bruno Ciccarino" . "brunociccarinoo@gmail.com")) (:maintainers ("Bruno Ciccarino" . "brunociccarinoo@gmail.com")) (:maintainer "Bruno Ciccarino" . "brunociccarinoo@gmail.com"))])
+ (sfz-mode . [(20200716 1023) ((emacs (25 1))) "Major mode for SFZ files" tar ((:url . "https://github.com/sfztools/emacs-sfz-mode") (:commit . "aaf31d1b68817251affed7da719dfcb2acd4b51a") (:revdesc . "aaf31d1b6881") (:keywords "languages") (:authors ("Jean Pierre Cimalando" . "jp-dev@inbox.ru")) (:maintainers ("Jean Pierre Cimalando" . "jp-dev@inbox.ru")) (:maintainer "Jean Pierre Cimalando" . "jp-dev@inbox.ru"))])
+ (shackle . [(20240402 1315) ((emacs (24 3)) (cl-lib (0 5))) "Enforce rules for popups" tar ((:url . "https://depp.brause.cc/shackle") (:commit . "ae25e7e0e593520c8590440fe5e3c0ea8053dc26") (:revdesc . "ae25e7e0e593") (:keywords "convenience") (:authors ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (shadchen . [(20141102 1839) nil "Pattern matching for elisp" tar ((:url . "https://github.com/VincentToups/shadchen-el") (:commit . "35f2b9c304eec990c16efbd557198289dc7cbb1f") (:revdesc . "35f2b9c304ee"))])
+ (shader-mode . [(20220930 1052) ((emacs (24))) "Major mode for shader" tar ((:url . "https://github.com/midnightSuyama/shader-mode") (:commit . "fe5a1982ba69e4a98b834141a46a1908f132df15") (:revdesc . "fe5a1982ba69") (:authors ("midnightSuyama" . "midnightSuyama@gmail.com")) (:maintainers ("midnightSuyama" . "midnightSuyama@gmail.com")) (:maintainer "midnightSuyama" . "midnightSuyama@gmail.com"))])
+ (shades-of-purple-theme . [(20230421 2059) nil "A theme with bold shades of purple" tar ((:url . "https://github.com/arturovm/shades-of-purple-emacs") (:commit . "8757594c5f6265b09d156cf9f8671f78863b25db") (:revdesc . "8757594c5f62") (:authors ("Arturo Vergara" . "hello@dead.computer")) (:maintainers ("Arturo Vergara" . "hello@dead.computer")) (:maintainer "Arturo Vergara" . "hello@dead.computer"))])
+ (shadowenv . [(20250604 2048) ((emacs (24 3))) "Shadowenv integration" tar ((:url . "https://github.com/Shopify/shadowenv.el") (:commit . "2b8383b54cac9edf8204050d2a8d70a0e6f0d972") (:revdesc . "2b8383b54cac") (:keywords "shadowenv" "tools") (:authors ("Dante Catalfamo" . "dante.catalfamo@shopify.com")) (:maintainers ("Dante Catalfamo" . "dante.catalfamo@shopify.com")) (:maintainer "Dante Catalfamo" . "dante.catalfamo@shopify.com"))])
+ (shakespeare-mode . [(20180704 2138) nil "A major mode for editing Shakespearean templates" tar ((:url . "https://github.com/CodyReichert/shakespeare-mode") (:commit . "c442eeea9d585e1b1fbb8813e33d47feec348a57") (:revdesc . "c442eeea9d58") (:keywords "shakespeare" "hamlet" "lucius" "julius" "mode"))])
+ (shampoo . [(20230522 1722) ((emacs (24 1))) "A remote Smalltalk development mode" tar ((:url . "https://revival.sh/shampoo/") (:commit . "4112f3b9282be0ce1f334e148f5c89b03a5df40c") (:revdesc . "4112f3b9282b") (:keywords "languages") (:authors ("Dmitry Matveev" . "me@dmitrymatveev.co.uk")) (:maintainers ("Dmitry Matveev" . "me@dmitrymatveev.co.uk")) (:maintainer "Dmitry Matveev" . "me@dmitrymatveev.co.uk"))])
+ (shannon-max . [(20260505 1426) ((emacs (29 1))) "Analyze your keybindings with information theory" tar ((:url . "https://github.com/sstraust/shannonmax") (:commit . "539bd5f771b798973734696b3b0ae10f56d3966d") (:revdesc . "539bd5f771b7") (:authors ("Sam Straus" . "sam_straus@alumni.brown.edu")) (:maintainers ("Sam Straus" . "sam_straus@alumni.brown.edu")) (:maintainer "Sam Straus" . "sam_straus@alumni.brown.edu"))])
+ (shanty-themes . [(20230123 2111) ((emacs (24 5 1))) "The themes for digital workers" tar ((:url . "https://github.com/qhga/shanty-themes") (:commit . "3f678d953771c4a109bd16f6d7def6bd9bbc811d") (:revdesc . "3f678d953771") (:keywords "faces" "theme" "blue" "yellow" "gold" "dark" "light") (:authors ("Philip Gaber" . "phga@posteo.de")) (:maintainers ("Philip Gaber" . "phga@posteo.de")) (:maintainer "Philip Gaber" . "phga@posteo.de"))])
+ (share2computer . [(20200316 31) ((emacs (25 1))) "Elisp helper of android ShareToComputer" tar ((:url . "https://github.com/tumashu/share2computer") (:commit . "15da47625a800e3310b8dc714bd4e41e32966d6a") (:revdesc . "15da47625a80") (:keywords "convenience" "comm") (:authors ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Feng Shu" . "tumashu@163.com")) (:maintainer "Feng Shu" . "tumashu@163.com"))])
+ (sharper . [(20250403 1243) ((emacs (27 1)) (transient (0 2 0))) "A dotnet CLI wrapper, using Transient" tar ((:url . "https://github.com/sebasmonia/sharper") (:commit . "5049795848609e6508e4c9718a9f97ee481bf36c") (:revdesc . "504979584860") (:keywords "maint" "tool") (:authors ("Sebastian Monia" . "smonia@outlook.com")) (:maintainers ("Sebastian Monia" . "smonia@outlook.com")) (:maintainer "Sebastian Monia" . "smonia@outlook.com"))])
+ (shazam . [(20260824 255) ((emacs (30 1))) "Shazam Interface (macOS only)" tar ((:url . "https://github.com/kickingvegas/shazam") (:commit . "0e5a97c59b5972a728138fc06b2ff371d42c8b55") (:revdesc . "0e5a97c59b59") (:keywords "tools") (:authors ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainers ("Charles Choi" . "kickingvegas@gmail.com")) (:maintainer "Charles Choi" . "kickingvegas@gmail.com"))])
+ (shell-command-x . [(20231214 1) ((emacs (28 1))) "Extensions for shell commands" tar ((:url . "https://github.com/elizagamedev/shell-command-x.el") (:commit . "d2fe4d08be306d6570f3c316ea06b0e6931ea5d5") (:revdesc . "d2fe4d08be30") (:keywords "convenience" "processes" "unix"))])
+ (shell-current-directory . [(20140101 2354) nil "Create new shell based on buffer directory" tar ((:url . "https://github.com/metaperl/shell-current-directory") (:commit . "bf843771bf9a4aa05e054ade799eb8862f3be89a") (:revdesc . "bf843771bf9a") (:keywords "shell" "comint"))])
+ (shell-here . [(20220102 1703) nil "Open a shell relative to the working directory" tar ((:url . "https://codeberg.org/emacs-weirdware/shell-here") (:commit . "eeb437ff26d62a5009046b1b3b4503b768e3131a") (:revdesc . "eeb437ff26d6") (:keywords "unix" "tools" "processes") (:authors ("Ian Eure" . "ian.eure@gmail.com")) (:maintainers ("Ian Eure" . "ian.eure@gmail.com")) (:maintainer "Ian Eure" . "ian.eure@gmail.com"))])
+ (shell-history . [(20100505 839) nil "Integration with shell history" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/shell-history.el") (:commit . "ee371a81f2d2bf5a308344078329ca1e9b5ed38c") (:revdesc . "ee371a81f2d2") (:keywords "processes" "convenience") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (shell-maker . [(20260820 1245) ((emacs (27 1))) "Interaction mode for making comint shells" tar ((:url . "https://github.com/xenodium/shell-maker") (:commit . "ab4f8ebaf4ef7a7db4762c5d5075baea580044ba") (:revdesc . "ab4f8ebaf4ef"))])
+ (shell-pop . [(20260610 2231) ((emacs (26 1))) "Easily toggle a shell window with a single keystroke" tar ((:url . "https://github.com/kyagi/shell-pop-el") (:commit . "446b1691454e65be648dcb7e316639aa7dd73be2") (:revdesc . "446b1691454e") (:keywords "shell" "terminal" "tools") (:authors ("Kazuo YAGI" . "kazuo.yagi@gmail.com")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (shell-split-string . [(20151224 1008) nil "Split strings using shell-like syntax" tar ((:url . "https://github.com/10sr/shell-split-string-el") (:commit . "19f6f999c33cc66a4c91bacdcc3697c25d97bf5a") (:revdesc . "19f6f999c33c") (:keywords "utility" "library" "shell" "string") (:authors ("10sr" . "8.slashes+el[at]gmail[dot]com")) (:maintainers ("10sr" . "8.slashes+el[at]gmail[dot]com")) (:maintainer "10sr" . "8.slashes+el[at]gmail[dot]com"))])
+ (shell-switcher . [(20241229 1657) ((emacs (24))) "Provide fast switching between shell buffers" tar ((:url . "https://github.com/DamienCassou/shell-switcher") (:commit . "4c96dc27afb519bdbf7bbe42d49a51497f078192") (:revdesc . "4c96dc27afb5") (:keywords "emacs" "package" "elisp" "shell" "eshell" "term" "switcher") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (shell-toggle . [(20150226 1411) nil "Toggle to and from the shell buffer" tar ((:url . "https://github.com/knu/shell-toggle.el") (:commit . "0d01bd9a780fdb7fe6609c552523f4498649a3b9") (:revdesc . "0d01bd9a780f") (:keywords "processes") (:authors ("Mikael Sjödin" . "mic@docs.uu.se") ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Mikael Sjödin" . "mic@docs.uu.se") ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Mikael Sjödin" . "mic@docs.uu.se"))])
+ (shellcop . [(20220629 817) ((emacs (25 1))) "Analyze info&error in shell-mode" tar ((:url . "https://github.com/redguardtoo/shellcop") (:commit . "3f051e42288ddfe4cd7cd0ee62efad90227de24b") (:revdesc . "3f051e42288d") (:keywords "unix" "tools") (:authors ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainers ("Chen Bin" . "chenbin.sh@gmail.com")) (:maintainer "Chen Bin" . "chenbin.sh@gmail.com"))])
+ (shelldoc . [(20230207 250) ((cl-lib (0 3)) (s (1 9 0))) "Shell command editing support with man page" tar ((:url . "https://github.com/mhayashi1120/Emacs-shelldoc") (:commit . "178d78d08e94b273b23ab1a32c5be509fdfe2286") (:revdesc . "178d78d08e94") (:keywords "applications") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (shelldon . [(20220325 1305) ((emacs (27 1))) "An enhanced shell interface" tar ((:url . "https://github.com/Overdr0ne/shelldon") (:commit . "8d073ce580e7782ed863fc6e19dc33b4f73c0d79") (:revdesc . "8d073ce580e7") (:keywords "tools" "convenience") (:authors ("overdr0ne" . "scmorris.dev@gmail.com")) (:maintainers ("overdr0ne" . "scmorris.dev@gmail.com")) (:maintainer "overdr0ne" . "scmorris.dev@gmail.com"))])
+ (shelltest-mode . [(20180501 141) nil "Major mode for shelltestrunner" tar ((:url . "https://github.com/rtrn/shelltest-mode") (:commit . "5fea8c9394380e822971a171905b6b5ab9be812d") (:revdesc . "5fea8c939438") (:keywords "languages") (:authors ("Dustin Fechner" . "dfe@rtrn.io")) (:maintainers ("Dustin Fechner" . "dfe@rtrn.io")) (:maintainer "Dustin Fechner" . "dfe@rtrn.io"))])
+ (shen-elisp . [(20260726 1322) ((emacs (24 4))) "An implementation of the Shen programming language" tar ((:url . "https://github.com/deech/shen-elisp") (:commit . "0a58aca68c40c2a38b5634d7fe66829f88d44386") (:revdesc . "0a58aca68c40") (:keywords "shen" "elisp") (:authors ("Aditya Siram" . "aditya.siram@gmail.com")) (:maintainers ("Aditya Siram" . "aditya.siram@gmail.com")) (:maintainer "Aditya Siram" . "aditya.siram@gmail.com"))])
+ (shenshou . [(20241015 1227) ((emacs (27 1))) "Download&Extract subtitles from opensubtitles" tar ((:url . "https://github.com/redguardtoo/shenshou") (:commit . "65163b449131ed0946ca6e817a660b4bbb7d35e9") (:revdesc . "65163b449131") (:keywords "convenience" "tools") (:authors ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainers ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainer "Chen Bin" . "chenbinDOTshATgmailDOTcom"))])
+ (shexc-ts-mode . [(20260801 2313) ((emacs (29 1)) (transient (0 5 0)) (compat (29 1 4 4))) "Tree-sitter major mode for ShExC" tar ((:url . "https://github.com/ericprud/shexc-mode-for-emacs") (:commit . "626b85466d7885855288e0763c7783721052f2f1") (:revdesc . "626b85466d78") (:keywords "languages") (:authors ("Eric Prud'hommeaux" . "eric@w3.org")) (:maintainers ("Eric Prud'hommeaux" . "eric@w3.org")) (:maintainer "Eric Prud'hommeaux" . "eric@w3.org"))])
+ (shfmt . [(20250709 1443) ((emacs (24)) (reformatter (0 3))) "Reformat shell scripts using shfmt" tar ((:url . "https://github.com/purcell/emacs-shfmt") (:commit . "c81cb23fed1a77732b972ea036d74cbeb7c13bb1") (:revdesc . "c81cb23fed1a") (:keywords "languages") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (shift-number . [(20260620 1211) ((emacs (28 1))) "Increase/decrease the number at point" tar ((:url . "https://codeberg.org/ideasman42/emacs-shift-number") (:commit . "d5e8bece6e6ab21ad5a93330d49b2554e9eb72a9") (:revdesc . "d5e8bece6e6a") (:keywords "convenience") (:authors ("Alex Kost" . "alezost@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (shift-text . [(20130831 1655) ((cl-lib (1 0)) (es-lib (0 3))) "Move the region in 4 directions, in a way similar to Eclipse's" tar ((:url . "https://github.com/sabof/shift-text") (:commit . "1be9cbf994000022172ceb746fe1d597f57ea8ba") (:revdesc . "1be9cbf99400"))])
+ (shimbun . [(20260416 105) nil "Interfacing with web newspapers" tar ((:url . "https://github.com/emacs-w3m/emacs-w3m") (:commit . "d62c1225a1a9634eb5c6a76ba2b1460961befd08") (:revdesc . "d62c1225a1a9") (:keywords "news") (:authors ("TSUCHIYA Masatoshi" . "tsuchiya@namazu.org") ("Akihiro Arisawa" . "ari@mbf.sphere.ne.jp") ("Yuuichi Teranishi" . "teranisi@gohome.org") ("Katsumi Yamaoka" . "yamaoka@jpl.org")) (:maintainers ("TSUCHIYA Masatoshi" . "tsuchiya@namazu.org") ("Akihiro Arisawa" . "ari@mbf.sphere.ne.jp") ("Yuuichi Teranishi" . "teranisi@gohome.org") ("Katsumi Yamaoka" . "yamaoka@jpl.org")) (:maintainer "TSUCHIYA Masatoshi" . "tsuchiya@namazu.org"))])
+ (shm . [(20180327 57) nil "Structured Haskell Mode" tar ((:url . "https://github.com/projectional-haskell/structured-haskell-mode") (:commit . "7f9df73f45d107017c18ce4835bbc190dfe6782e") (:revdesc . "7f9df73f45d1") (:keywords "development" "haskell" "structured") (:authors ("Chris Done" . "chrisdone@gmail.com")) (:maintainers ("Chris Done" . "chrisdone@gmail.com")) (:maintainer "Chris Done" . "chrisdone@gmail.com"))])
+ (shortcuts-mode . [(20240707 1606) ((emacs (25 1))) "Minor mode providing a buffer shortcut bar" tar ((:url . "https://github.com/tetron/shortcuts-mode") (:commit . "a781ae97e33f5a0bf75058c21a7784032e22b28d") (:revdesc . "a781ae97e33f") (:keywords "lisp") (:authors ("Peter Amstutz" . "tetron@interreality.org")) (:maintainers ("Peter Amstutz" . "tetron@interreality.org")) (:maintainer "Peter Amstutz" . "tetron@interreality.org"))])
+ (shoulda . [(20140616 1833) ((cl-lib (0 5))) "Shoulda test support for ruby" tar ((:url . "https://github.com/marcwebbie/shoulda.el") (:commit . "24dc6b6138a06edde9c8d13a6aaa1654d1d7de54") (:revdesc . "24dc6b6138a0") (:keywords "ruby" "tests" "shoulda") (:authors ("Marcwebbie" . "marcwebbie@gmail.com")) (:maintainers ("Marcwebbie" . "marcwebbie@gmail.com")) (:maintainer "Marcwebbie" . "marcwebbie@gmail.com"))])
+ (show-css . [(20160210 1408) ((doom (1 3)) (s (1 10 0))) "Show the css of the html attribute the cursor is on" tar ((:url . "https://github.com/smmcg/showcss-mode") (:commit . "771daeddd4df7a7c10f66419a837145649bab63b") (:revdesc . "771daeddd4df") (:keywords "hypermedia") (:authors ("Sheldon McGrandle" . "developer@rednemesis.com")) (:maintainers ("Sheldon McGrandle" . "developer@rednemesis.com")) (:maintainer "Sheldon McGrandle" . "developer@rednemesis.com"))])
+ (show-eol . [(20260101 602) ((emacs (24 4))) "Show end of line symbol in buffer" tar ((:url . "https://github.com/jcs-elpa/show-eol") (:commit . "b484d2771f09666e2bccd0b19a8a1c9a1e16f614") (:revdesc . "b484d2771f09") (:keywords "convenience" "end" "eol" "line") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (show-font-mode . [(20201225 2217) ((emacs (25 1))) "Show font at point on mode line" tar ((:url . "https://github.com/melissaboiko/show-font-mode") (:commit . "c7328b85655688d257b769192d26b9f5c9bbe26d") (:revdesc . "c7328b856556") (:keywords "faces" "i18n" "unicode" "fonts" "fontsets") (:authors ("Melissa Boiko" . "melissa@namakajiri.net")) (:maintainers ("Melissa Boiko" . "melissa@namakajiri.net")) (:maintainer "Melissa Boiko" . "melissa@namakajiri.net"))])
+ (show-inactive-region . [(20260727 1142) ((emacs (28 1))) "Highlight the inactive region" tar ((:url . "https://codeberg.org/ideasman42/emacs-show-inactive-region") (:commit . "10549674ba0a785eddd03891eabfae3d6a952f7a") (:revdesc . "10549674ba0a") (:keywords "convenience" "faces") (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (showtip . [(20090830 1040) nil "Show tip at cursor" tar ((:url . "https://github.com/emacsorphanage/showtip") (:commit . "930da302809a4257e8d69425455b29e1cc91949b") (:revdesc . "930da302809a") (:keywords "help") (:authors ("Ye Wenbin" . "wenbinye@gmail.com")) (:maintainers ("Ye Wenbin" . "wenbinye@gmail.com")) (:maintainer "Ye Wenbin" . "wenbinye@gmail.com"))])
+ (shpec-mode . [(20150530 922) nil "Minor mode for shpec specification" tar ((:url . "https://github.com/shpec/shpec-mode") (:commit . "76bccd63e3b70233a6c9ca0798dd03550952cc76") (:revdesc . "76bccd63e3b7") (:keywords "languages" "tools") (:authors ("AdrieanKhisbe" . "adriean.khisbe@live.fr")) (:maintainers ("AdrieanKhisbe" . "adriean.khisbe@live.fr")) (:maintainer "AdrieanKhisbe" . "adriean.khisbe@live.fr"))])
+ (shr-tag-pre-highlight . [(20260821 1012) ((emacs (25 1)) (language-detection (0 1 0))) "Syntax highlighting code block in HTML" tar ((:url . "https://github.com/xuchunyang/shr-tag-pre-highlight.el") (:commit . "f2b390a6297a9bf6a4527f79527f582a1ecced66") (:revdesc . "f2b390a6297a") (:keywords "html") (:authors ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainers ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainer "Chunyang Xu" . "mail@xuchunyang.me"))])
+ (shrface . [(20260810 1312) ((emacs (25 1)) (org (9 0)) (language-detection (0 1 0))) "Extend shr/eww with org features and analysis capability" tar ((:url . "https://github.com/chenyanming/shrface") (:commit . "6dad83387dcdd7b018c34c9ec6799926e54e66ec") (:revdesc . "6dad83387dcd") (:keywords "faces") (:authors ("Damon Chan" . "elecming@gmail.com")) (:maintainers ("Damon Chan" . "elecming@gmail.com")) (:maintainer "Damon Chan" . "elecming@gmail.com"))])
+ (shrink-path . [(20190208 1335) ((emacs (24)) (s (1 6 1)) (dash (1 8 0)) (f (0 10 0))) "Fish-style path" tar ((:url . "https://gitlab.com/bennya/shrink-path.el") (:commit . "c14882c8599aec79a6e8ef2d06454254bb3e1e41") (:revdesc . "c14882c8599a"))])
+ (shrink-whitespace . [(20181003 321) nil "Whitespace removal DWIM key" tar ((:url . "https://gitlab.com/jcpetkovich/shrink-whitespace.el") (:commit . "0407b89c142bd17e65edb666f35e2c6755bd0867") (:revdesc . "0407b89c142b") (:keywords "convenience") (:authors ("Jean-Christophe Petkovich" . "jcpetkovich@gmail.com")) (:maintainers ("Jean-Christophe Petkovich" . "jcpetkovich@gmail.com")) (:maintainer "Jean-Christophe Petkovich" . "jcpetkovich@gmail.com"))])
+ (shroud . [(20210220 1952) ((emacs (25)) (epg (1 0 0)) (s (1 6 0)) (bui (1 2 0)) (dash (2 18 0))) "Shroud secrets" tar ((:url . "https://github.com/o-nly/emacs-shroud") (:commit . "2e6ff2bab4a1e798c090c9d7fbd90b7f3463d5c5") (:revdesc . "2e6ff2bab4a1") (:keywords "tools" "password") (:authors ("Amar Singh" . "nly@disroot.org")) (:maintainers ("Amar Singh" . "nly@disroot.org")) (:maintainer "Amar Singh" . "nly@disroot.org"))])
+ (shut-up . [(20240429 605) ((cl-lib (0 3)) (emacs (24))) "Shut up would you!" tar ((:url . "https://github.com/rejeep/shut-up.el") (:commit . "ed62a7fefdf04c81346061016f1bc69ca045aaf6") (:revdesc . "ed62a7fefdf0") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (shx . [(20251225 43) ((emacs (24 4))) "Extras for the comint-mode shell" tar ((:url . "https://github.com/riscy/shx-for-emacs") (:commit . "019975297b4abbf9474172f4981e565152e9aa34") (:revdesc . "019975297b4a") (:keywords "terminals" "processes" "comint" "shell" "repl") (:maintainers ("Chris Rayner" . "dchrisrayner@gmail.com")) (:maintainer "Chris Rayner" . "dchrisrayner@gmail.com"))])
+ (sibilant-mode . [(20151119 2145) nil "Support for the Sibilant programming language" tar ((:url . "http://sibilantjs.info") (:commit . "5baf8c3e80ee0736c7298a2a17fb615ba5ac0d2d") (:revdesc . "5baf8c3e80ee") (:keywords "languages") (:authors ("Jacob Rothstein" . "hi@jbr.me")) (:maintainers ("Jacob Rothstein" . "hi@jbr.me")) (:maintainer "Jacob Rothstein" . "hi@jbr.me"))])
+ (sicp . [(20240826 1844) nil "Structure and Interpretation of Computer Programs in info format" tar ((:url . "https://mitpress.mit.edu/sicp") (:commit . "552b44fd873b5cadde4e76d10cef4d6e21a4287a") (:revdesc . "552b44fd873b"))])
+ (side-hustle . [(20240625 1228) ((emacs (24 4)) (seq (2 20))) "Hustle through Imenu in a side window" tar ((:url . "https://github.com/rnkn/side-hustle") (:commit . "94450b58cec1b809afe08d0754a6662839efbc9d") (:revdesc . "94450b58cec1") (:keywords "convenience") (:authors ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainers ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainer "Paul W. Rankin" . "rnkn@rnkn.xyz"))])
+ (side-notes . [(20240629 1008) ((emacs (24 4))) "Easy access to a directory notes file" tar ((:url . "https://github.com/rnkn/side-notes") (:commit . "96a142dfd5768d66b1d574027e13c572e4c82a87") (:revdesc . "96a142dfd576") (:keywords "convenience") (:authors ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainers ("Paul W. Rankin" . "rnkn@rnkn.xyz")) (:maintainer "Paul W. Rankin" . "rnkn@rnkn.xyz"))])
+ (sidebuf . [(20260621 1644) ((emacs (27 1))) "Buffer list sidebar panel" tar ((:url . "https://github.com/rain-64/sidebuf") (:commit . "bac206ea46bdf8450317d29b98dfcd970aa6e85e") (:revdesc . "bac206ea46bd") (:keywords "convenience" "buffers") (:authors ("rain-64" . "https://github.com/rain-64")) (:maintainers ("rain-64" . "https://github.com/rain-64")) (:maintainer "rain-64" . "https://github.com/rain-64"))])
+ (sidecar-locals . [(20260108 324) ((emacs (28 1))) "A flexible alternative to built-in dir-locals" tar ((:url . "https://codeberg.org/ideasman42/emacs-sidecar-locals") (:commit . "0c969ab64bee11cce0917474eaf693418810712a") (:revdesc . "0c969ab64bee") (:keywords "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (sideline . [(20260716 349) ((emacs (28 1)) (ht (2 3))) "Show information on the side" tar ((:url . "https://github.com/emacs-sideline/sideline") (:commit . "247cd6f6a0a841c5da20b3cc179d77c118641d66") (:revdesc . "247cd6f6a0a8") (:keywords "convenience") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (sideline-blame . [(20260101 541) ((emacs (28 1)) (sideline (0 1 0)) (vc-msg (1 1 1))) "Show blame messages with sideline" tar ((:url . "https://github.com/emacs-sideline/sideline-blame") (:commit . "107479557021dbfcb27ad26a8e357c73e9b1249e") (:revdesc . "107479557021") (:keywords "convenience" "blame") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (sideline-eglot . [(20260101 541) ((emacs (29 1)) (eglot (1 12 29)) (sideline (0 1 0)) (ht (2 4))) "Show eglot information with sideline" tar ((:url . "https://github.com/emacs-sideline/sideline-eglot") (:commit . "aeb1991a7f25301438806a06c588e7e732c6f533") (:revdesc . "aeb1991a7f25") (:keywords "convenience" "eglot") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (sideline-flycheck . [(20260514 1443) ((emacs (28 1)) (sideline (0 1 1)) (flycheck (0 14)) (ht (2 4))) "Show flycheck errors with sideline" tar ((:url . "https://github.com/emacs-sideline/sideline-flycheck") (:commit . "ceacbb060c382e31a47b7c7c09da0b42f4d091f5") (:revdesc . "ceacbb060c38") (:keywords "convenience" "flycheck") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (sideline-flymake . [(20260101 541) ((emacs (28 1)) (sideline (0 1 0))) "Show flymake errors with sideline" tar ((:url . "https://github.com/emacs-sideline/sideline-flymake") (:commit . "ad296589a97ad7225f3f1e9519443577b2c5a49b") (:revdesc . "ad296589a97a") (:keywords "convenience" "flymake") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (sideline-lsp . [(20260503 1235) ((emacs (29 1)) (sideline (0 1 0)) (lsp-mode (6 0)) (dash (2 18 0)) (ht (2 4)) (s (1 12 0))) "Show lsp information with sideline" tar ((:url . "https://github.com/emacs-sideline/sideline-lsp") (:commit . "393459a7a947a62eb3f1d587fe576937afefb63f") (:revdesc . "393459a7a947") (:keywords "convenience" "lsp") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (sift . [(20200421 1423) nil "Front-end for sift, a fast and powerful grep alternative" tar ((:url . "https://github.com/nlamirault/sift.el") (:commit . "cdddba2d183146c340915003f1b5d09d13712c22") (:revdesc . "cdddba2d1831") (:keywords "sift" "ack" "pt" "ag" "grep" "search") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (signal . [(20160816 1438) ((emacs (24)) (cl-lib (0 5))) "Advanced hook" tar ((:url . "https://github.com/mola-T/signal") (:commit . "aa58327e2297df921d72a0370468b48663efd438") (:revdesc . "aa58327e2297") (:keywords "internal" "lisp" "processes" "tools") (:authors ("Mola-T" . "Mola@molamola.xyz")) (:maintainers ("Mola-T" . "Mola@molamola.xyz")) (:maintainer "Mola-T" . "Mola@molamola.xyz"))])
+ (signel . [(20260130 1719) ((emacs (27 1))) "Signal client via signal-cli JSON-RPC" tar ((:url . "https://github.com/keenban/signel") (:commit . "5b309ddd8668344310ae7e9f93b6b756da28d9b4") (:revdesc . "5b309ddd8668") (:authors ("Keenan Salandy" . "keenan@salandy.dev")) (:maintainers ("Keenan Salandy" . "keenan@salandy.dev")) (:maintainer "Keenan Salandy" . "keenan@salandy.dev"))])
+ (silkworm-theme . [(20210215 1120) ((emacs (24))) "Light theme with pleasant, low contrast colors" tar ((:url . "https://github.com/mswift42/silkworm-theme") (:commit . "ff80e9294da0fb093e15097ac62153ef4a64a889") (:revdesc . "ff80e9294da0"))])
+ (simp . [(20180607 254) nil "Simple project definition, chiefly for file finding, and grepping" tar ((:url . "https://github.com/re5et/simp") (:commit . "d4d4b8547055347828bedccbeffdb4fd2d5a5d34") (:revdesc . "d4d4b8547055") (:keywords "project" "grep" "find"))])
+ (simple-bookmarks . [(20190204 1426) ((cl-lib (0 5))) "Bookmark / functioncall manager" tar ((:url . "https://github.com/jtkDvlp/simple-bookmarks") (:commit . "54e8d771bcdb0eb235b31c0aa9642171369500e5") (:revdesc . "54e8d771bcdb") (:keywords "bookmark" "functioncall") (:authors ("Julian T. Knabenschuh" . "jtkdevelopments@gmail.com")) (:maintainers ("Julian T. Knabenschuh" . "jtkdevelopments@gmail.com")) (:maintainer "Julian T. Knabenschuh" . "jtkdevelopments@gmail.com"))])
+ (simple-call-tree . [(20260813 1859) ((emacs (24 3)) (anaphora (1 0 0))) "Analyze source code based on font-lock text-properties" tar ((:url . "http://www.emacswiki.org/emacs/download/simple-call-tree.el") (:commit . "a3c3c07461a06f41875fddad96daaf2e533ca147") (:revdesc . "a3c3c07461a0") (:keywords "programming") (:authors ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainers ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainer "Joe Bloggs" . "vapniks@yahoo.com"))])
+ (simple-httpd . [(20260623 1110) ((emacs (29 1)) (compat (31))) "Pure Elisp HTTP server" tar ((:url . "https://github.com/skeeto/emacs-http-server") (:commit . "ceb208f96601be09397fc9e64fa96014ac1c8739") (:revdesc . "ceb208f96601") (:keywords "network" "comm") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Philip Kaludercic" . "philipk@posteo.net") ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Philip Kaludercic" . "philipk@posteo.net"))])
+ (simple-indentation . [(20230625 1610) ((emacs (24 3)) (dash (2 18 0)) (s (1 12 0))) "Simplify writing indentation functions, alternative to SMIE" tar ((:url . "https://github.com/semenInRussia/simple-indentation.el") (:commit . "b5f97fc14b3f494cfe009938cf5ee9016a83d30e") (:revdesc . "b5f97fc14b3f") (:authors ("Semen Khramtsov" . "hrams205@gmail.com")) (:maintainers ("Semen Khramtsov" . "hrams205@gmail.com")) (:maintainer "Semen Khramtsov" . "hrams205@gmail.com"))])
+ (simple-modeline . [(20210312 1048) ((emacs (26 1))) "A simple mode-line configuration for Emacs" tar ((:url . "https://github.com/gexplorer/simple-modeline") (:commit . "119d8224a8ae0ee17b09ac1fed6cdb9cb1d048fd") (:revdesc . "119d8224a8ae") (:keywords "mode-line" "faces") (:authors ("Eder Elorriaga" . "gexplorer8@gmail.com")) (:maintainers ("Eder Elorriaga" . "gexplorer8@gmail.com")) (:maintainer "Eder Elorriaga" . "gexplorer8@gmail.com"))])
+ (simple-mpc . [(20220216 102) ((s (1 10 0))) "Provides a simple interface to mpc" tar ((:url . "https://github.com/jorenvo/simple-mpc") (:commit . "57ee14ada8aec477ddde5e4f632c8d3d99a66535") (:revdesc . "57ee14ada8ae") (:keywords "multimedia" "mpd" "mpc") (:authors ("Joren Van Onder" . "joren@jvo.sh")) (:maintainers ("Joren Van Onder" . "joren@jvo.sh")) (:maintainer "Joren Van Onder" . "joren@jvo.sh"))])
+ (simple-paren . [(20230810 729) ((emacs (24)) (cl-lib (0 5))) "Non-electrical insert paired delimiter, wrap" tar ((:url . "https://github.com/andreas-roehler/simple-paren") (:commit . "206d8f3f82123f61e7133a14f66c83a9632bd99e") (:revdesc . "206d8f3f8212") (:keywords "convenience"))])
+ (simple-rtm . [(20160222 1534) ((rtm (0 1)) (dash (2 0 0))) "Interactive Emacs mode for Remember The Milk" tar ((:url . "https://codeberg.org/mbunkus/simple-rtm") (:commit . "37c5feffea7c9b571279b6f549d06cf9c0720273") (:revdesc . "37c5feffea7c") (:keywords "remember" "the" "milk" "productivity" "todo") (:authors ("Moritz Bunkus" . "morit@bunkus.org")) (:maintainers ("Moritz Bunkus" . "morit@bunkus.org")) (:maintainer "Moritz Bunkus" . "morit@bunkus.org"))])
+ (simple-screen . [(20241228 113) nil "Simple screen configuration manager" tar ((:url . "https://github.com/wachikun/simple-screen") (:commit . "66eb5ddab259025ef5790084ca33018c266d6940") (:revdesc . "66eb5ddab259") (:keywords "tools") (:authors ("Tadashi Watanabe" . "wac@umiushi.org")) (:maintainers ("Tadashi Watanabe" . "wac@umiushi.org")) (:maintainer "Tadashi Watanabe" . "wac@umiushi.org"))])
+ (simpleclip . [(20250505 1710) nil "Simplified access to the system clipboard" tar ((:url . "https://github.com/rolandwalker/simpleclip") (:commit . "105b7adce212fdc9bbcbe7801531669a658c735b") (:revdesc . "105b7adce212") (:keywords "convenience") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (simplecov . [(20221206 350) ((dash (2 19)) (emacs (28))) "Colorize untested ruby code" tar ((:url . "https://github.org/zenspider/elisp") (:commit . "215f2bdc5d2ef9b4439779ba4d3129210c9f34ab") (:revdesc . "215f2bdc5d2e") (:keywords "tools" "languages") (:authors ("Ryan Davis" . "ryand-ruby@zenspider.com")) (:maintainers ("Ryan Davis" . "ryand-ruby@zenspider.com")) (:maintainer "Ryan Davis" . "ryand-ruby@zenspider.com"))])
+ (simplenote . [(20141118 1440) nil "Interact with simple-note.appspot.com" tar ((:url . "https://github.com/dotemacs/simplenote.el") (:commit . "734603e877b2d642162ca45f799d2f7b956d2ea0") (:revdesc . "734603e877b2") (:keywords "simplenote") (:authors ("Konstantinos Efstathiou" . "konstantinos@efstathiou.gr")) (:maintainers ("Konstantinos Efstathiou" . "konstantinos@efstathiou.gr")) (:maintainer "Konstantinos Efstathiou" . "konstantinos@efstathiou.gr"))])
+ (simplenote2 . [(20190321 933) ((request-deferred (0 2 0)) (uuidgen (20140918)) (unicode-escape (1 1))) "Interact with app.simplenote.com" tar ((:url . "https://github.com/alpha22jp/simplenote2.el") (:commit . "760ffecda63bd218876b623f46d332e3ef079be6") (:revdesc . "760ffecda63b") (:keywords "simplenote") (:authors ("alpha22jp" . "alpha22jp@gmail.com")) (:maintainers ("alpha22jp" . "alpha22jp@gmail.com")) (:maintainer "alpha22jp" . "alpha22jp@gmail.com"))])
+ (simplezen . [(20130421 1000) ((s (1 4 0)) (dash (1 1 0))) "A simple subset of zencoding-mode for Emacs" tar ((:url . "https://github.com/magnars/simplezen.el") (:commit . "9f91554a3f7f4e9b2b5ec009effafbf12b091973") (:revdesc . "9f91554a3f7f") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (simplicity-theme . [(20221016 1444) ((emacs (24 1))) "A minimalist dark theme" tar ((:url . "https://github.com/smallwat3r/emacs-simplicity-theme") (:commit . "f4aab6aa07b536688eb62355b83dde5fcd16e049") (:revdesc . "f4aab6aa07b5") (:keywords "faces" "theme" "minimal") (:authors ("Matthieu Petiteau" . "mpetiteau.pro@gmail.com")) (:maintainers ("Matthieu Petiteau" . "mpetiteau.pro@gmail.com")) (:maintainer "Matthieu Petiteau" . "mpetiteau.pro@gmail.com"))])
+ (simply-annotate . [(20260630 653) ((emacs (28 1)) (transient (0 4))) "Enhanced annotation system with threading" tar ((:url . "https://github.com/captainflasmr/simply-annotate") (:commit . "330c6b4014dcb42526b7a76affed345b1aba8b89") (:revdesc . "330c6b4014dc") (:keywords "applications" "tools" "convenience") (:authors ("James Dyer" . "captainflasmr@gmail.com")) (:maintainers ("James Dyer" . "captainflasmr@gmail.com")) (:maintainer "James Dyer" . "captainflasmr@gmail.com"))])
+ (simulacrum . [(20260601 35) ((emacs (29 1))) "Inject custom event types into the event stream" tar ((:url . "https://github.com/ErikPrantare/simulacrum.el") (:commit . "ad01fcf054f9fc573b7023e2fc86566d27ae45b1") (:revdesc . "ad01fcf054f9") (:keywords "convenience"))])
+ (sink . [(20240523 747) ((emacs (25 1))) "Receive messages from the plan9 plumber" tar ((:url . "https://github.com/alcah/sink.el") (:commit . "a14e1cc0a051543723c043a5ece081ce9a567ddd") (:revdesc . "a14e1cc0a051"))])
+ (siri-shortcuts . [(20211229 1833) ((emacs (25 2))) "Interact with Siri Shortcuts" tar ((:url . "https://github.com/DaniruKun/siri-shortcuts.el") (:commit . "190f242f71e071adfd89fa1f2f6ea22b62afd133") (:revdesc . "190f242f71e0") (:keywords "convenience" "multimedia") (:authors ("Daniils Petrovs" . "thedanpetrov@gmail.com")) (:maintainers ("Daniils Petrovs" . "thedanpetrov@gmail.com")) (:maintainer "Daniils Petrovs" . "thedanpetrov@gmail.com"))])
+ (sis . [(20260826 1753) ((emacs (27 1))) "Minimize manual input source (input method) switching" tar ((:url . "https://github.com/laishulu/emacs-smart-input-source") (:commit . "2becb4d66fdcfe89eccf43ac592557c6a402420a") (:revdesc . "2becb4d66fdc") (:keywords "convenience"))])
+ (sisyphus . [(20260813 1811) ((emacs (30 1)) (compat (31 0)) (cond-let (1 1)) (llama (1 0)) (magit (4 7))) "Create releases of Emacs packages" tar ((:url . "https://github.com/magit/sisyphus") (:commit . "4c75cbf6c3543322c08c280d2b9b6f37b79f220d") (:revdesc . "4c75cbf6c354") (:keywords "git" "tools" "vc") (:authors ("Jonas Bernoulli" . "emacs.sisyphus@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.sisyphus@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.sisyphus@jonas.bernoulli.dev"))])
+ (sixcolors-mode . [(20230406 1031) ((emacs (27 1))) "A customizable horizontal scrollbar" tar ((:url . "https://github.com/mastro35/sixcolors-mode") (:commit . "4124a8cf664b04a4bf4c39f7c3b7da3e480b99c8") (:revdesc . "4124a8cf664b") (:keywords "convenience" "colors") (:authors ("Davide Mastromatteo" . "mastro35@gmail.com")) (:maintainers ("Davide Mastromatteo" . "mastro35@gmail.com")) (:maintainer "Davide Mastromatteo" . "mastro35@gmail.com"))])
+ (sixcolors-theme . [(20260727 522) ((emacs (27 1))) "Just another theme" tar ((:url . "https://github.com/mastro35/sixcolors-theme") (:commit . "b547ee2c9501dbf0f70e2189d4a4eb189ebb3d1b") (:revdesc . "b547ee2c9501") (:keywords "faces" "colors" "apple" "sixcolors" "vintage" "dark") (:authors ("Davide Mastromatteo" . "mastro35@gmail.com")) (:maintainers ("Davide Mastromatteo" . "mastro35@gmail.com")) (:maintainer "Davide Mastromatteo" . "mastro35@gmail.com"))])
+ (skeletor . [(20210129 239) ((s (1 7 0)) (f (0 14 0)) (dash (2 2 0)) (cl-lib (0 3)) (let-alist (1 0 3)) (emacs (24 1))) "Provides project skeletons for Emacs" tar ((:url . "https://github.com/chrisbarrett/skeletor.el") (:commit . "f6e560a0bfe459e0b8a268047920ce1148f2ebf6") (:revdesc . "f6e560a0bfe4") (:authors ("Chris Barrett" . "chris.d.barrett@me.com")) (:maintainers ("Chris Barrett" . "chris.d.barrett@me.com")) (:maintainer "Chris Barrett" . "chris.d.barrett@me.com"))])
+ (skerrick . [(20220306 2139) ((emacs (27 1)) (request (0 3 2))) "REPL-driven development for NodeJS" tar ((:url . "https://github.com/anonimitoraf/skerrick") (:commit . "015de8369b8b6be0d4d1e21c24239a037350e87e") (:revdesc . "015de8369b8b") (:keywords "languages" "javascript" "js" "repl" "repl-driven") (:authors ("Rafael Nicdao" . "https://github.com/anonimitoraf")) (:maintainers ("Rafael Nicdao" . "nicdaoraf@gmail.com")) (:maintainer "Rafael Nicdao" . "nicdaoraf@gmail.com"))])
+ (sketch-themes . [(20230210 1507) ((emacs (26 1))) "Sketch color themes" tar ((:url . "https://github.com/dawranliou/sketch-themes/") (:commit . "5534254232f1a556ec20952c75b5506625573049") (:revdesc . "5534254232f1") (:keywords "faces") (:authors ("Daw-Ran Liou" . "hi@dawranliou.com")) (:maintainers ("Daw-Ran Liou" . "hi@dawranliou.com")) (:maintainer "Daw-Ran Liou" . "hi@dawranliou.com"))])
+ (skewer-less . [(20210510 532) ((skewer-mode (1 5 3))) "Skewer support for live LESS stylesheet updates" tar ((:url . "https://github.com/purcell/skewer-less") (:commit . "baa973581c2ab7326db65803df97d1a7382b6564") (:revdesc . "baa973581c2a") (:keywords "languages" "tools") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (skewer-mode . [(20200304 1142) ((simple-httpd (1 4 0)) (js2-mode (20090723)) (emacs (24))) "Live browser JavaScript, CSS, and HTML interaction" tar ((:url . "https://github.com/skeeto/skewer-mode") (:commit . "e5bed351939c92a1f788f78398583c2f83f1bb3c") (:revdesc . "e5bed351939c") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainer "Christopher Wellons" . "wellons@nullprogram.com"))])
+ (skewer-reload-stylesheets . [(20160725 1220) ((skewer-mode (1 5 3))) "Live-edit CSS, SCSS, Less, and friends" tar ((:url . "https://github.com/NateEag/skewer-reload-stylesheets") (:commit . "3207abca9551660407a6b009cb40fb32bbb550da") (:revdesc . "3207abca9551") (:authors ("Nate Eagleson" . "nate@nateeag.com")) (:maintainers ("Nate Eagleson" . "nate@nateeag.com")) (:maintainer "Nate Eagleson" . "nate@nateeag.com"))])
+ (skype . [(20160711 824) nil "Skype UI for emacs users." tar ((:url . "https://github.com/kiwanami/emacs-skype") (:commit . "8e3b33e620ed355522aa36434ff41e3ced080629") (:revdesc . "8e3b33e620ed") (:keywords "skype" "chat") (:authors ("SAKURAI Masashi" . "m.sakurai@kiwanami.net")) (:maintainers ("SAKURAI Masashi" . "m.sakurai@kiwanami.net")) (:maintainer "SAKURAI Masashi" . "m.sakurai@kiwanami.net"))])
+ (sl . [(20161217 1404) ((cl-lib (0 5))) "An Emacs clone of sl(1)" tar ((:url . "https://github.com/xuchunyang/sl.el") (:commit . "0882117728be91276b815e18c2a66106bf9d69d3") (:revdesc . "0882117728be") (:authors ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainers ("Chunyang Xu" . "mail@xuchunyang.me")) (:maintainer "Chunyang Xu" . "mail@xuchunyang.me"))])
+ (slack . [(20260825 1520) ((websocket (1 12)) (request (0 3 2)) (circe (2 11)) (alert (1 2)) (emojify (1 2 1)) (emacs (25 1)) (dash (2 19 1)) (s (1 13 1)) (ts (0 3))) "Slack client" tar ((:url . "https://github.com/emacs-slack/emacs-slack") (:commit . "c0a18be3aea898f79a38fee4907e6b4d54d555cb") (:revdesc . "c0a18be3aea8") (:keywords "tools") (:authors ("yuya.minami" . "yuya.minami@yuyaminami-no-MacBook-Pro.local")) (:maintainers ("yuya.minami" . "yuya.minami@yuyaminami-no-MacBook-Pro.local")) (:maintainer "yuya.minami" . "yuya.minami@yuyaminami-no-MacBook-Pro.local"))])
+ (sleek-modeline . [(20260720 2336) ((emacs (29 1))) "Minimal and elegant modeline" tar ((:url . "https://github.com/abidanBrito/sleek-modeline") (:commit . "c32ec1d448c5d673f75d0f7f8297dbc7a881d6fc") (:revdesc . "c32ec1d448c5") (:keywords "mode-line" "faces") (:authors ("Abidán Brito Clavijo" . "abidan.brito@gmail.com")) (:maintainers ("Abidán Brito Clavijo" . "abidan.brito@gmail.com")) (:maintainer "Abidán Brito Clavijo" . "abidan.brito@gmail.com"))])
+ (slideview . [(20250121 324) ((emacs (25 1))) "File slideshow" tar ((:url . "https://github.com/mhayashi1120/Emacs-slideview") (:commit . "4d7c8b91d339126b4c5a6365362aadb90ee0e7f9") (:revdesc . "4d7c8b91d339") (:keywords "files") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (slim-mode . [(20240513 2118) nil "Major mode for editing Slim files" tar ((:url . "https://github.com/slim-template/emacs-slim") (:commit . "8c92169817f2fa59255f547f0a9fb4fbb8309db9") (:revdesc . "8c92169817f2") (:keywords "markup" "language"))])
+ (slime . [(20260825 2153) ((emacs (24 3)) (macrostep (0 9))) "Superior Lisp Interaction Mode for Emacs" tar ((:url . "https://github.com/slime/slime") (:commit . "06e46196ad7d972c10559291d8a82f8beb735463") (:revdesc . "06e46196ad7d") (:keywords "languages" "lisp" "slime"))])
+ (slime-company . [(20250815 757) ((emacs (24 4)) (slime (2 13)) (company (0 9 0))) "Slime completion backend for company mode" tar ((:url . "https://github.com/anwyn/slime-company") (:commit . "38ab03e4015029de74cc23d499bf29de60da9bad") (:revdesc . "38ab03e40150") (:keywords "convenience" "lisp" "abbrev") (:authors ("Ole Arndt" . "anwyn@sugarshark.com")) (:maintainers ("Ole Arndt" . "anwyn@sugarshark.com")) (:maintainer "Ole Arndt" . "anwyn@sugarshark.com"))])
+ (slime-docker . [(20210426 1422) ((emacs (24 4)) (slime (2 16)) (docker-tramp (0 1))) "Integration of SLIME with Docker containers" tar ((:url . "https://gitlab.common-lisp.net/cl-docker-images/slime-docker") (:commit . "c7d073720f2bd8e9f72a20309fff2afa4c4e798d") (:revdesc . "c7d073720f2b") (:keywords "docker" "lisp" "slime"))])
+ (slime-repl-ansi-color . [(20230214 1453) ((emacs (24)) (slime (2 3 1))) "Turn on ANSI colors in REPL output;" tar ((:url . "https://gitlab.com/augfab/slime-repl-ansi-color") (:commit . "9e8af90490332217e45d7568f1690df3f4e25d4b") (:revdesc . "9e8af9049033") (:keywords "lisp") (:authors ("Max Mikhanosha" . "max@openchat.com")) (:maintainers ("Augustin Fabre" . "augustin@augfab.fr")) (:maintainer "Augustin Fabre" . "augustin@augfab.fr"))])
+ (slime-theme . [(20170808 1322) ((emacs (24 0))) "An Emacs 24 theme based on Slime (tmTheme)" tar ((:url . "https://github.com/emacsfodder/tmtheme-to-deftheme") (:commit . "8e5880ac69e0b6a079103001cc3a90bdb688998f") (:revdesc . "8e5880ac69e0"))])
+ (slime-volleyball . [(20190701 1624) nil "An SVG Slime Volleyball Game" tar ((:url . "https://github.com/fitzsim/slime-volleyball") (:commit . "6c135ad18897c3566d4dadfe847061532600ba2e") (:revdesc . "6c135ad18897") (:keywords "games") (:authors ("Thomas Fitzsimmons" . "fitzsim@fitzsim.org")) (:maintainers ("Thomas Fitzsimmons" . "fitzsim@fitzsim.org")) (:maintainer "Thomas Fitzsimmons" . "fitzsim@fitzsim.org"))])
+ (slint-mode . [(20240429 1333) ((emacs (24 4))) "Major-mode for the Slint UI language" tar ((:url . "https://github.com/nilclass/slint-mode") (:commit . "168a6cfb90b5e36360074c83f80d5bbac2f0287e") (:revdesc . "168a6cfb90b5") (:keywords "languages") (:authors ("Niklas Cathor" . "niklas.cathor@gmx.de")) (:maintainers ("Niklas Cathor" . "niklas.cathor@gmx.de")) (:maintainer "Niklas Cathor" . "niklas.cathor@gmx.de"))])
+ (slirm . [(20160201 1425) ((emacs (24 4))) "Systematic Literature Review Mode for Emacs" tar ((:url . "https://github.com/fbie/slirm") (:commit . "9adfbe1fc67580e7d0d90f7e927a25d63a797464") (:revdesc . "9adfbe1fc675") (:authors ("Florian Biermann" . "fbie@itu.dk")) (:maintainers ("Florian Biermann" . "fbie@itu.dk")) (:maintainer "Florian Biermann" . "fbie@itu.dk"))])
+ (slothbar . [(20251124 353) ((all-the-icons (5 0 0)) (backlight (1 4)) (compat (29 1)) (dash (2 1 0)) (f (0 20 0)) (fontsloth (0 19 1)) (log4e (0 3 3)) (nerd-icons (0 1 0)) (s (1 12 0)) (volume (1 0)) (xelb (0 18)) (emacs (28 1))) "Emacs X window manager status bar" tar ((:url . "https://codeberg.org/agnes-li/slothbar") (:commit . "52010da65a4688b2b2f16427f81dfeedf4443077") (:revdesc . "52010da65a46") (:keywords "frames" "hardware") (:authors ("Jo Gay" . "jo.gay@mailfence.com") ("Agnes Li" . "agnes.li@mailfence.com")) (:maintainers ("Jo Gay" . "jo.gay@mailfence.com") ("Agnes Li" . "agnes.li@mailfence.com")) (:maintainer "Jo Gay" . "jo.gay@mailfence.com"))])
+ (slovak-holidays . [(20211018 1754) nil "Adds a list of slovak holidays to Emacs calendar" tar ((:url . "https://github.com/Fuco1/slovak-holidays") (:commit . "bedd26dd45ca497c0028a11e94a905560fcdb2f1") (:revdesc . "bedd26dd45ca") (:keywords "calendar") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (slow-keys . [(20220807 1425) ((emacs (24 1))) "Slow keys mode to avoid RSI" tar ((:url . "https://github.com/manuel-uberti/slow-keys") (:commit . "b951ae4bdcea56ced03f227b82b28c3d91d15e61") (:revdesc . "b951ae4bdcea") (:keywords "convenience") (:authors ("Manuel Uberti" . "manuel.uberti@inventati.org")) (:maintainers ("Manuel Uberti" . "manuel.uberti@inventati.org")) (:maintainer "Manuel Uberti" . "manuel.uberti@inventati.org"))])
+ (slstats . [(20260414 1947) ((emacs (25 1))) "Acquire and display stats about Second Life" tar ((:url . "https://github.com/davep/slstats.el") (:commit . "d6f0c7428e886a39e6061d093b4ef7d8d240ba0d") (:revdesc . "d6f0c7428e88") (:keywords "games") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (slurm-mode . [(20210519 1109) nil "Interaction with the SLURM job scheduling system" tar ((:url . "https://github.com/ffevotte/slurm.el") (:commit . "4e6ac09245313cf4018b8e5784b2fca8604269d7") (:revdesc . "4e6ac0924531"))])
+ (slurpbarf . [(20251018 2247) ((emacs (29 1))) "Commands for slurping and barfing" tar ((:url . "https://codeberg.org/vilij/slurpbarf-elcute") (:commit . "20f209035ab01a798645efa29650dfd67d50fad4") (:revdesc . "20f209035ab0") (:keywords "convenience" "lisp" "xml"))])
+ (sly . [(20260402 2249) ((emacs (24 5))) "Sylvester the Cat's Common Lisp IDE" tar ((:url . "https://github.com/joaotavora/sly") (:commit . "759c0ff8741ced8793257f2b7ed95a23e13e1407") (:revdesc . "759c0ff8741c") (:keywords "languages" "lisp" "sly"))])
+ (sly-asdf . [(20260614 2139) ((emacs (24 3)) (sly (1 0 0 -2 2)) (popup (0 5 3))) "ASDF system support for SLY" tar ((:url . "https://github.com/mmgeorge/sly-asdf") (:commit . "c1fa52dadb2f453243dc522203b7a883adef63fb") (:revdesc . "c1fa52dadb2f") (:keywords "languages" "lisp" "sly" "asdf") (:maintainers ("Matt George" . "mmge93@gmail.com")) (:maintainer "Matt George" . "mmge93@gmail.com"))])
+ (sly-hello-world . [(20200225 1755) ((sly (1 0 0 -2 2))) "A template SLY contrib" tar ((:url . "https://github.com/capitaomorte/sly-hello-world") (:commit . "be257e9ad354db690c7378e89899335597348a0d") (:revdesc . "be257e9ad354") (:keywords "languages" "lisp" "sly") (:authors ("João Távora" . "joaotavora@gmail.com")) (:maintainers ("João Távora" . "joaotavora@gmail.com")) (:maintainer "João Távora" . "joaotavora@gmail.com"))])
+ (sly-macrostep . [(20191211 1630) ((sly (1 0 0 -2 2)) (macrostep (0 9))) "Fancy macro-expansion via macrostep.el" tar ((:url . "https://github.com/capitaomorte/sly-macrostep") (:commit . "5113e4e926cd752b1d0bcc1508b3ebad5def5fad") (:revdesc . "5113e4e926cd") (:keywords "languages" "lisp" "sly") (:authors ("Luís Oliveira" . "luismbo@gmail.com") ("Jon Oddie" . "j.j.oddie@gmail.com") ("João Távora" . "joaotavora@gmail.com")) (:maintainers ("Luís Oliveira" . "luismbo@gmail.com") ("Jon Oddie" . "j.j.oddie@gmail.com") ("João Távora" . "joaotavora@gmail.com")) (:maintainer "Luís Oliveira" . "luismbo@gmail.com"))])
+ (sly-named-readtables . [(20191013 2138) ((sly (1 0 0 -2 2))) "Support named readtables in Common Lisp files" tar ((:url . "https://github.com/capitaomorte/sly-named-readtables") (:commit . "a5a42674ccffa97ccd5e4e9742beaf3ea719931f") (:revdesc . "a5a42674ccff") (:keywords "languages" "lisp" "sly") (:authors ("João Távora" . "joaotavora@gmail.com")) (:maintainers ("João Távora" . "joaotavora@gmail.com")) (:maintainer "João Távora" . "joaotavora@gmail.com"))])
+ (sly-overlay . [(20240828 910) ((emacs (24 4)) (sly (1 0))) "Overlay Common Lisp evaluation results" tar ((:url . "https://github.com/fosskers/sly-overlay") (:commit . "d62945059035f8097a6f222ed2700cfd99609d11") (:revdesc . "d62945059035") (:keywords "lisp") (:authors ("Colin Woodbury" . "colin@fosskers.ca")) (:maintainers ("Colin Woodbury" . "colin@fosskers.ca")) (:maintainer "Colin Woodbury" . "colin@fosskers.ca"))])
+ (sly-quicklisp . [(20211206 948) ((sly (1 0 0 -2 2))) "Quicklisp support for SLY" tar ((:url . "https://github.com/capitaomorte/sly-quicklisp") (:commit . "34c73d43dd9066262387c626c17a9b486db07b2d") (:revdesc . "34c73d43dd90") (:keywords "languages" "lisp" "sly") (:authors ("João Távora" . "joaotavora@gmail.com")) (:maintainers ("João Távora" . "joaotavora@gmail.com")) (:maintainer "João Távora" . "joaotavora@gmail.com"))])
+ (sly-repl-ansi-color . [(20171020 1516) ((sly (0)) (cl-lib (0 5))) "Add ANSI colors support to the sly mrepl" tar ((:url . "https://github.com/PuercoPop/sly-repl-ansi-color") (:commit . "b9cd52d1cf927bf7e08582d46ab0bcf1d4fb5048") (:revdesc . "b9cd52d1cf92") (:keywords "sly") (:authors ("Javier PuercoPop Olaechea" . "pirata@gmail.com")) (:maintainers ("Javier PuercoPop Olaechea" . "pirata@gmail.com")) (:maintainer "Javier PuercoPop Olaechea" . "pirata@gmail.com"))])
+ (smali-mode . [(20260722 2103) ((emacs (24 1))) "Major mode for editing Smali/Baksmali files" tar ((:url . "https://github.com/strazzere/Emacs-Smali") (:commit . "564d914b0901628d4cac8051fb457119383c7fff") (:revdesc . "564d914b0901") (:keywords "languages" "smali") (:authors ("Tim Strazzere" . "diff@protonmail.com")) (:maintainers ("Tim Strazzere" . "diff@protonmail.com")) (:maintainer "Tim Strazzere" . "diff@protonmail.com"))])
+ (smart-backspace . [(20171014 526) nil "Intellj like backspace" tar ((:url . "https://github.com/itome/smart-backspace") (:commit . "acb390628a181a993aa0d137624f2e5283efa6d9") (:revdesc . "acb390628a18") (:authors ("Takeshi Tsukamoto" . "t.t.itm.0403@gmail.com")) (:maintainers ("Takeshi Tsukamoto" . "t.t.itm.0403@gmail.com")) (:maintainer "Takeshi Tsukamoto" . "t.t.itm.0403@gmail.com"))])
+ (smart-comment . [(20160322 1839) nil "Smarter commenting" tar ((:url . "https://github.com/paldepind/smart-comment") (:commit . "ad4e0de29115dc010733b9060d3dab02836b15e1") (:revdesc . "ad4e0de29115") (:keywords "lisp") (:authors ("Simon Friis Vindum" . "simon@vindum.io")) (:maintainers ("Simon Friis Vindum" . "simon@vindum.io")) (:maintainer "Simon Friis Vindum" . "simon@vindum.io"))])
+ (smart-compile . [(20251229 2123) nil "An interface to `compile'" tar ((:url . "https://github.com/zenitani/elisp") (:commit . "9f5e8387b0d703a11bff6133d2c5b556d8be0a17") (:revdesc . "9f5e8387b0d7") (:keywords "tools" "unix") (:authors ("Seiji Zenitani" . "zenitani@gmail.com")) (:maintainers ("Seiji Zenitani" . "zenitani@gmail.com")) (:maintainer "Seiji Zenitani" . "zenitani@gmail.com"))])
+ (smart-cursor-color . [(20201207 2228) nil "Change cursor color dynamically" tar ((:url . "https://github.com/7696122/smart-cursor-color/") (:commit . "d532f0b27e37cbd3bfc0be09d0b54aa38f1648f1") (:revdesc . "d532f0b27e37") (:keywords "cursor" "color" "face"))])
+ (smart-dash . [(20250101 2011) nil "Smart-Dash minor mode" tar ((:url . "https://github.com/malsyned/smart-dash") (:commit . "98ea891a885fbe54a754a46730be3527dfe24af3") (:revdesc . "98ea891a885f") (:authors ("Dennis Lambe Jr." . "malsyned@malsyned.net")) (:maintainers ("Dennis Lambe Jr." . "malsyned@malsyned.net")) (:maintainer "Dennis Lambe Jr." . "malsyned@malsyned.net"))])
+ (smart-delete . [(20230802 1113) ((emacs (24 1))) "IntelliJ-like backspace/delete" tar ((:url . "https://github.com/leodag/smart-delete") (:commit . "b1f90b9510caf21d87ba26e30d56dfbaec92d4e9") (:revdesc . "b1f90b9510ca") (:keywords "emulations" "wp"))])
+ (smart-forward . [(20140430 713) ((expand-region (0 8 0))) "Semantic navigation" tar ((:url . "https://github.com/magnars/smart-forward.el") (:commit . "7b6dbfdbd4b646376a567c70e1a161545431b72b") (:revdesc . "7b6dbfdbd4b6") (:keywords "navigation") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (smart-hungry-delete . [(20220516 1538) ((emacs (24 3))) "Smart hungry deletion of whitespace" tar ((:url . "https://github.com/hrehfeld/emacs-smart-hungry-delete") (:commit . "e06525cc1841805ebe470c876d6b966de90bc275") (:revdesc . "e06525cc1841") (:keywords "convenience") (:authors ("Hauke Rehfeld" . "emacs@haukerehfeld.de")) (:maintainers ("Hauke Rehfeld" . "emacs@haukerehfeld.de")) (:maintainer "Hauke Rehfeld" . "emacs@haukerehfeld.de"))])
+ (smart-indent-rigidly . [(20141206 15) nil "Smart rigid indenting" tar ((:url . "https://github.com/re5et/smart-indent-rigidly") (:commit . "323d1fe4d0b81e598249aad01bc44adb180ece0e") (:revdesc . "323d1fe4d0b8") (:keywords "indenting" "coffee-mode" "haml-mode" "sass-mode"))])
+ (smart-jump . [(20210304 844) ((emacs (25 1))) "Smart go to definition" tar ((:url . "https://github.com/jojojames/smart-jump") (:commit . "3392eb35e3cde37e6f5f2a48dc0db15ca535143c") (:revdesc . "3392eb35e3cd") (:keywords "tools") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (smart-mark . [(20241104 1311) nil "Restore point after C-g when mark" tar ((:url . "https://github.com/victorteokw/smart-mark") (:commit . "d326cc77495f57beb4bc85614804976f1ae06fb7") (:revdesc . "d326cc77495f") (:keywords "mark" "restore") (:authors ("Kai Yu" . "yeannylam@gmail.com")) (:maintainers ("Kai Yu" . "yeannylam@gmail.com")) (:maintainer "Kai Yu" . "yeannylam@gmail.com"))])
+ (smart-mode-line . [(20240924 2322) ((emacs (24 3)) (rich-minority (0 1 1))) "A color coded smart mode-line" tar ((:url . "https://github.com/Malabarba/smart-mode-line") (:commit . "bbed708eb8393697e01ab2474dfb54d7c5ea7905") (:revdesc . "bbed708eb839") (:keywords "mode-line" "faces" "themes") (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainers ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com"))])
+ (smart-mode-line-atom-one-dark-theme . [(20250103 1324) ((emacs (24 3)) (smart-mode-line (2 10))) "Atom-one-dark theme for smart-mode-line" tar ((:url . "https://github.com/daviderestivo/smart-mode-line-atom-one-dark-theme") (:commit . "318865f15d33c480216221baff4d1ef85e07552d") (:revdesc . "318865f15d33") (:keywords "mode-line" "themes" "faces") (:authors ("Davide Restivo" . "davide.restivo@yahoo.it")) (:maintainers ("Davide Restivo" . "davide.restivo@yahoo.it")) (:maintainer "Davide Restivo" . "davide.restivo@yahoo.it"))])
+ (smart-mode-line-powerline-theme . [(20211005 233) ((emacs (24 3)) (powerline (2 2)) (smart-mode-line (2 5))) "Smart-mode-line theme that mimics the powerline appearance" tar ((:url . "https://github.com/Bruce-Connor/smart-mode-line") (:commit . "abcb0ab6f7110a03d6c7428bae67cf8731496433") (:revdesc . "abcb0ab6f711") (:keywords "mode-line" "faces" "themes") (:authors ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainers ("Artur Malabarba" . "bruce.connor.am@gmail.com")) (:maintainer "Artur Malabarba" . "bruce.connor.am@gmail.com"))])
+ (smart-newline . [(20131208 340) nil "Provide smart newline for one keybind" tar ((:url . "https://github.com/ainame/smart-newline.el") (:commit . "c50ab035839b307c66d439083b6761cb7db5e972") (:revdesc . "c50ab035839b"))])
+ (smart-region . [(20150903 1403) ((emacs (24 4)) (expand-region (0 10 0)) (multiple-cursors (1 3 0)) (cl-lib (0 5))) "Smartly select region, rectangle, multi cursors" tar ((:url . "https://github.com/uk-ar/smart-region") (:commit . "5a8017fd8e8dc3483865951c4942cab3f96f69f6") (:revdesc . "5a8017fd8e8d") (:keywords "marking" "region") (:authors ("Yuuki Arisawa" . "yuuki.ari@gmail.com")) (:maintainers ("Yuuki Arisawa" . "yuuki.ari@gmail.com")) (:maintainer "Yuuki Arisawa" . "yuuki.ari@gmail.com"))])
+ (smart-semicolon . [(20200909 1412) ((emacs (26))) "Insert semicolon smartly" tar ((:url . "https://github.com/iquiw/smart-semicolon") (:commit . "dd52a3e1a7b043fb88f799827c7b3e39f60a14f1") (:revdesc . "dd52a3e1a7b0") (:authors ("Iku Iwasa" . "iku.iwasa@gmail.com")) (:maintainers ("Iku Iwasa" . "iku.iwasa@gmail.com")) (:maintainer "Iku Iwasa" . "iku.iwasa@gmail.com"))])
+ (smart-shift . [(20251125 1349) nil "Smart shift text left/right" tar ((:url . "https://github.com/hbin/smart-shift") (:commit . "b9958f042f974e09a7e9442431a1f9cbd8404f8a") (:revdesc . "b9958f042f97") (:keywords "convenience" "tools") (:authors ("Bin Huang" . "huangbin88@foxmail.com")) (:maintainers ("Bin Huang" . "huangbin88@foxmail.com")) (:maintainer "Bin Huang" . "huangbin88@foxmail.com"))])
+ (smart-tab . [(20210530 1743) ((emacs (24 3))) "Intelligent tab completion and indentation" tar ((:url . "https://git.genehack.net/genehack/smart-tab") (:commit . "2f1b4073904805c8454ebc9bc967b23836a2d577") (:revdesc . "2f1b40739048") (:keywords "extensions") (:authors ("John SJ Anderson" . "john@genehack.org") ("Sebastien Rocca Serra" . "sroccaserra@gmail.com") ("Daniel Hackney" . "dan@haxney.org")) (:maintainers ("John SJ Anderson" . "john@genehack.org")) (:maintainer "John SJ Anderson" . "john@genehack.org"))])
+ (smart-tabs-mode . [(20200907 2025) nil "Intelligently indent with tabs, align with spaces!" tar ((:url . "http://www.emacswiki.org/emacs/SmartTabs") (:commit . "1044c17e42479de943e69cdeb85e4d05ad9cca8c") (:revdesc . "1044c17e4247") (:keywords "languages") (:authors ("John Croisant" . "jacius@gmail.com") ("Alan Pearce" . "alan@alanpearce.co.uk") ("Daniel Dehennin" . "daniel.dehennin@baby-gnu.org") ("Matt Renaud" . "mrenaud92@gmail.com")) (:maintainers ("Joel C. Salomon" . "joelcsalomon@gmail.com")) (:maintainer "Joel C. Salomon" . "joelcsalomon@gmail.com"))])
+ (smart-window . [(20160717 130) ((cl-lib (0 5))) "Vim-like window controlling plugin" tar ((:url . "https://github.com/dryman/smart-window.el") (:commit . "5996461b7cbc5ab4509ac48537916eb29a8e4c16") (:revdesc . "5996461b7cbc") (:keywords "window") (:authors ("Felix Chern" . "idryman@gmail.com")) (:maintainers ("Felix Chern" . "idryman@gmail.com")) (:maintainer "Felix Chern" . "idryman@gmail.com"))])
+ (smartparens . [(20260129 1214) ((dash (2 13 0))) "Automatic insertion, wrapping and paredit-like navigation with user defined pairs" tar ((:url . "https://github.com/Fuco1/smartparens") (:commit . "82d2cf084a19b0c2c3812e0550721f8a61996056") (:revdesc . "82d2cf084a19") (:keywords "abbrev" "convenience" "editing") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (smartrep . [(20240416 2148) nil "Support sequential operation which omitted prefix keys" tar ((:url . "https://github.com/myuhe/smartrep.el") (:commit . "fdf135e3781b286174b5de4d613f12c318d2023c") (:revdesc . "fdf135e3781b") (:keywords "convenience") (:authors ("myuhe" . "yuhei.maeda_at_gmail.com")))])
+ (smartscan . [(20260723 1509) nil "Jumps between other symbols found at point" tar ((:url . "https://github.com/mickeynp/smart-scan") (:commit . "b330b21c4f6f1785d1da0f74031a2ac3bbc6da55") (:revdesc . "b330b21c4f6f") (:keywords "extensions") (:authors ("Mickey Petersen" . "mickey@masteringemacs.org")) (:maintainers ("Mickey Petersen" . "mickey@masteringemacs.org")) (:maintainer "Mickey Petersen" . "mickey@masteringemacs.org"))])
+ (smarty-mode . [(20100703 1158) nil "Major mode for editing smarty templates" tar ((:url . "none yet") (:commit . "3dfdfe1571f5e9ef55a29c51e5a80046d4cb7568") (:revdesc . "3dfdfe1571f5") (:keywords "smarty" "php" "languages" "templates"))])
+ (smbc . [(20171229 1808) nil "View SMBC from Emacs" tar ((:url . "https://github.com/sakshamsharma/emacs-smbc") (:commit . "10538e3d575ba6ef3c94d555af2744b42dfd36c7") (:revdesc . "10538e3d575b") (:keywords "smbc" "webcomic") (:authors ("Saksham Sharma" . "saksham0808@gmail.com")) (:maintainers ("Saksham Sharma" . "saksham0808@gmail.com")) (:maintainer "Saksham Sharma" . "saksham0808@gmail.com"))])
+ (smblog . [(20200424 938) ((emacs (24 3))) "Samba log viewer" tar ((:url . "https://github.com/aaptel/smblog-mode") (:commit . "fc949cff7051b31f0dbc7169774144533a27b92f") (:revdesc . "fc949cff7051") (:authors ("Aurélien Aptel" . "aaptel@suse.com")) (:maintainers ("Aurélien Aptel" . "aaptel@suse.com")) (:maintainer "Aurélien Aptel" . "aaptel@suse.com"))])
+ (smeargle . [(20200323 533) ((emacs (24 3))) "Highlighting region by last updated time" tar ((:url . "https://github.com/emacsorphanage/smeargle") (:commit . "1c5c1e1d66aa96b818fbfcdf9fbec84e509b87be") (:revdesc . "1c5c1e1d66aa") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Neil Okamoto" . "neil.okamoto+melpa@gmail.com")) (:maintainer "Neil Okamoto" . "neil.okamoto+melpa@gmail.com"))])
+ (smex . [(20151212 2209) ((emacs (24))) "M-x interface with Ido-style fuzzy matching" tar ((:url . "https://github.com/nonsequitur/smex/") (:commit . "55aaebe3d793c2c990b39a302eb26c184281c42c") (:revdesc . "55aaebe3d793") (:keywords "convenience" "usability") (:authors ("Cornelius Mika and contributors" . "cornelius.mika@gmail.com")) (:maintainers ("Cornelius Mika and contributors" . "cornelius.mika@gmail.com")) (:maintainer "Cornelius Mika and contributors" . "cornelius.mika@gmail.com"))])
+ (smilefjes . [(20240826 2107) ((emacs (24 4)) (request (0 3 2)) (ht (2 3)) (dash (2 19 1)) (helm (3 8 6))) "View Norwegian Food Safety Authority restaurant ratings" tar ((:url . "https://github.com/themkat/smilefjes.el") (:commit . "c7e4ebb06215e67e8bdd8299b4cc7405fc861f5b") (:revdesc . "c7e4ebb06215"))])
+ (smiles-mode . [(20220210 1413) nil "Major mode for SMILES" tar ((:url . "https://repo.or.cz/smiles-mode.git") (:commit . "950a8b3224f8f069c82faeb0282d041f872d5550") (:revdesc . "950a8b3224f8") (:keywords "smiles") (:authors (nil . "JohnKitchinjkitchin@andrew.cmu.edu")) (:maintainers (nil . "JohnKitchinjkitchin@andrew.cmu.edu")) (:maintainer nil . "JohnKitchinjkitchin@andrew.cmu.edu"))])
+ (smithers . [(20210531 2232) ((emacs (26 1)) (dash (2 17 0)) (org (9 4 5))) "A startup message featuring Mr C.M. Burns" tar ((:url . "https://gitlab.com/mtekman/smithers.el") (:commit . "db9ed12a8d2c131b6d37b4e7aff01b8e3cec81a6") (:revdesc . "db9ed12a8d2c") (:keywords "games"))])
+ (smithy-mode . [(20220619 1304) ((emacs (26 1))) "Major mode for editing Smithy IDL files" tar ((:url . "https://github.com/mnemitz/smithy-mode") (:commit . "7dff0e7a497a055577226c7ae7ecdeaf7078b4c1") (:revdesc . "7dff0e7a497a") (:keywords "tools" "languages" "smithy" "idl" "amazon") (:authors ("Matt Nemitz" . "matt.nemitz@gmail.com")) (:maintainers ("Matt Nemitz" . "matt.nemitz@gmail.com")) (:maintainer "Matt Nemitz" . "matt.nemitz@gmail.com"))])
+ (sml-basis . [(20210518 2040) ((emacs (24 5))) "Standard ML Basis Library lookup" tar ((:url . "https://github.com/lassik/emacs-sml-basis") (:commit . "c048d575e30a20ec825fd0c5eb9c8a4428a43298") (:revdesc . "c048d575e30a") (:keywords "languages" "util") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (sml-modeline . [(20170614 2111) nil "Show position in a scrollbar like way in mode-line" tar ((:url . "http://bazaar.launchpad.net/~nxhtml/nxhtml/main/annotate/head%3A/util/sml-modeline.el") (:commit . "d2f9f70174c4cf68c67eb3bb8088235735e34d9a") (:revdesc . "d2f9f70174c4"))])
+ (sml-ts-mode . [(20241015 632) ((emacs (29 1)) (sml-mode (6 12))) "SML major-mode using tree-sitter" tar ((:url . "https://github.com/nverno/sml-ts-mode") (:commit . "d2dabcc9d8f91eeee7048641e4c80fabb3583194") (:revdesc . "d2dabcc9d8f9") (:keywords "sml" "languages" "tree-sitter") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (smlfmt . [(20231102 853) ((emacs (24)) (reformatter (0 4))) "Format SML source code using the \"smlfmt\" program" tar ((:url . "https://github.com/diku-dk/smlfmt.el") (:commit . "7a70cce029a7c37c5e976ab6b426f62561e4e352") (:revdesc . "7a70cce029a7") (:keywords "files" "tools") (:authors ("Troels Henriksen" . "athas@sigkill")) (:maintainers ("Troels Henriksen" . "athas@sigkill")) (:maintainer "Troels Henriksen" . "athas@sigkill"))])
+ (smmry . [(20240718 947) nil "SMMRY client" tar ((:url . "https://github.com/microamp/smmry.el") (:commit . "d3473b139430d221b4c4587dae685cd67a02c099") (:revdesc . "d3473b139430") (:keywords "api" "smmry") (:authors ("Sangho Na" . "sangho@nsh.nz")) (:maintainers ("Sangho Na" . "sangho@nsh.nz")) (:maintainer "Sangho Na" . "sangho@nsh.nz"))])
+ (smog . [(20230530 843) ((emacs (24 1)) (org (8 1))) "Analyse the writing style, word use and readability of prose" tar ((:url . "https://github.com/zzkt/smog") (:commit . "2fc5fef0f5000027b3550495259a65966c68ec52") (:revdesc . "2fc5fef0f500") (:keywords "tools" "style" "readability" "prose") (:authors ("nik gaffney" . "nik@fo.am")) (:maintainers ("nik gaffney" . "nik@fo.am")) (:maintainer "nik gaffney" . "nik@fo.am"))])
+ (smooth-scroll . [(20240914 415) nil "Minor mode for smooth scrolling and in-place scrolling" tar ((:url . "http://www.emacswiki.org/emacs/download/smooth-scroll.el") (:commit . "d7b276fdb906708c26dccfdb520021f9b0eb9c6b") (:revdesc . "d7b276fdb906") (:keywords "convenience" "emulations" "frames") (:authors ("K-talo Miyazaki" . "KeitarodotMiyazakiatgmaildotcom")) (:maintainers ("K-talo Miyazaki" . "KeitarodotMiyazakiatgmaildotcom")) (:maintainer "K-talo Miyazaki" . "KeitarodotMiyazakiatgmaildotcom"))])
+ (smooth-scrolling . [(20161002 1949) nil "Make emacs scroll smoothly" tar ((:url . "https://github.com/aspiers/smooth-scrolling/") (:commit . "2462c13640aa4c75ab3ddad443fedc29acf68f84") (:revdesc . "2462c13640aa") (:keywords "convenience") (:authors ("Adam Spiers" . "emacs-ss@adamspiers.org") ("Jeremy Bondeson" . "jbondeson@gmail.com") ("Ryan C. Thompson" . "rct+github@thompsonclan.org")) (:maintainers ("Adam Spiers" . "emacs-ss@adamspiers.org")) (:maintainer "Adam Spiers" . "emacs-ss@adamspiers.org"))])
+ (smotitah . [(20150218 1030) nil "Modular emacs configuration framework" tar ((:url . "https://github.com/laynor/smotitah") (:commit . "f9ab562128a5460549d016913533778e8c94bcf3") (:revdesc . "f9ab562128a5") (:keywords "configuration") (:authors ("Alessandro Piras" . "laynor@gmail.com")) (:maintainers ("Alessandro Piras" . "laynor@gmail.com")) (:maintainer "Alessandro Piras" . "laynor@gmail.com"))])
+ (smtpmail-multi . [(20160218 2349) nil "Use different smtp servers for sending mail" tar ((:url . "https://github.com/vapniks/smtpmail-multi") (:commit . "81eabfe56f620ee044ff9dd52fa8b6148d0a9f30") (:revdesc . "81eabfe56f62") (:keywords "comm") (:authors ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainers ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainer "Joe Bloggs" . "vapniks@yahoo.com"))])
+ (smudge . [(20260203 20) ((emacs (27 1)) (simple-httpd (1 5 1)) (request (0 3)) (oauth2 (0 18))) "Control the Spotify app" tar ((:url . "https://github.com/danielfm/smudge") (:commit . "c90db830e84e34ac5724f57eda2f1112a589df5c") (:revdesc . "c90db830e84e") (:keywords "multimedia" "music" "spotify" "smudge"))])
+ (smyx-theme . [(20240914 1200) nil "Smyx Color Theme" tar ((:url . "https://github.com/tacit7/smyx") (:commit . "ce6dc4b1c25ff8c1d6c9b9015e0199355c46be4d") (:revdesc . "ce6dc4b1c25f") (:keywords "color" "theme" "smyx") (:authors ("Uriel G Maldonado" . "uriel781@gmail.com")) (:maintainers ("Uriel G Maldonado" . "uriel781@gmail.com")) (:maintainer "Uriel G Maldonado" . "uriel781@gmail.com"))])
+ (snakemake-mode . [(20250204 207) ((emacs (27 1)) (transient (0 3 0))) "Major mode for editing Snakemake files" tar ((:url . "https://git.kyleam.com/snakemake-mode/about") (:commit . "e4751a951a53c4d4610b2eb17469a21177cab6bc") (:revdesc . "e4751a951a53") (:keywords "tools") (:authors ("Kyle Meyer" . "kyle@kyleam.com")) (:maintainers ("Kyle Meyer" . "kyle@kyleam.com")) (:maintainer "Kyle Meyer" . "kyle@kyleam.com"))])
+ (snap-indent . [(20230704 1833) ((emacs (24 1))) "Simple automatic indentation" tar ((:url . "https://github.com/jeffvalk/snap-indent") (:commit . "c4e49295aa1a2678c0e9232c12448fd944aced8e") (:revdesc . "c4e49295aa1a") (:keywords "indent" "tools" "convenience") (:authors ("Jeff Valk" . "jv@jeffvalk.com")) (:maintainers ("Jeff Valk" . "jv@jeffvalk.com")) (:maintainer "Jeff Valk" . "jv@jeffvalk.com"))])
+ (snapshot-timemachine . [(20250612 1320) ((emacs (28 1))) "Step through (Btrfs, ZFS, ...) snapshots of files" tar ((:url . "https://github.com/mrBliss/snapshot-timemachine") (:commit . "88af8c045e5274b06ddd6ca5e8c6a746cef776e0") (:revdesc . "88af8c045e52") (:authors ("Thomas Winant" . "dewinant@gmail.com")) (:maintainers ("Thomas Winant" . "dewinant@gmail.com")) (:maintainer "Thomas Winant" . "dewinant@gmail.com"))])
+ (snapshot-timemachine-rsnapshot . [(20170324 1213) ((snapshot-timemachine (20160222 132)) (seq (2 19))) "Rsnapshot backend for snapshot-timemachine" tar ((:url . "https://github.com/NicolasPetton/snapshot-timemachine-rsnapshot") (:commit . "72b0b700d80f1a0442e62bbbb6a0c8c59182f97f") (:revdesc . "72b0b700d80f") (:authors ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainers ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainer "Nicolas Petton" . "nicolas@petton.fr"))])
+ (snazzy-theme . [(20170828 757) ((emacs (24)) (base16-theme (2 1))) "An elegant syntax theme with bright colors" tar ((:url . "https://github.com/weijiangan/emacs-snazzy/") (:commit . "578d7ebc4ed91c0a630b652c4b6fdd54d9ae16cd") (:revdesc . "578d7ebc4ed9") (:keywords "faces" "theme" "color" "snazzy"))])
+ (sniem . [(20250204 1138) ((emacs (27 1)) (s (2 12 0)) (dash (1 12 0))) "Hands-eased united editing method" tar ((:url . "https://github.com/SpringHan/sniem.git") (:commit . "89161d8b3c19ffba8b52411de36f28aec1e401f2") (:revdesc . "89161d8b3c19") (:keywords "convenience" "united-editing-method"))])
+ (snippy . [(20260727 1742) ((emacs (30 1)) (yasnippet (0 14 0))) "Vscode snippet support with Yasnippet" tar ((:url . "https://github.com/MiniApollo/snippy") (:commit . "62ae0641a2a7872b891122d7fbe1451df89cb907") (:revdesc . "62ae0641a2a7") (:keywords "convenience" "emulations") (:authors ("Mark Surmann" . "surmannmark@gmail.com")) (:maintainers ("Mark Surmann" . "surmannmark@gmail.com")) (:maintainer "Mark Surmann" . "surmannmark@gmail.com"))])
+ (snitch . [(20210202 1730) ((emacs (27 1))) "An Emacs firewall" tar ((:url . "https://github.com/mrmekon/snitch-el") (:commit . "3b3e7f1bf612c4624764d1ec4b1a96e4d2850b05") (:revdesc . "3b3e7f1bf612") (:keywords "processes" "comm") (:authors ("Trevor Bentley" . "snitch.el@x.mrmekon.com")) (:maintainers ("Trevor Bentley" . "snitch.el@x.mrmekon.com")) (:maintainer "Trevor Bentley" . "snitch.el@x.mrmekon.com"))])
+ (snoopy . [(20171008 2004) ((emacs (24)) (cl-lib (0 6))) "Minor mode for number row unshifted character insertion" tar ((:url . "https://github.com/anmonteiro/snoopy-mode") (:commit . "ec4123bdebfe0bb7bf4feaac2dc02b59caffe386") (:revdesc . "ec4123bdebfe") (:keywords "lisp") (:authors ("António Nuno Monteiro" . "anmonteiro@gmail.com")) (:maintainers ("António Nuno Monteiro" . "anmonteiro@gmail.com")) (:maintainer "António Nuno Monteiro" . "anmonteiro@gmail.com"))])
+ (snow . [(20221226 2238) ((emacs (26 3))) "Let it snow in Emacs!" tar ((:url . "https://github.com/alphapapa/snow.el") (:commit . "be17977677fa29709a726715a1a1cba1bd299f68") (:revdesc . "be17977677fa") (:keywords "games") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (soar-mode . [(20190503 1843) nil "A major mode for the Soar language" tar ((:url . "https://github.com/adeschamps/soar-mode") (:commit . "ebb79789cd35530aea2c6d0eb4f4b280e97107d4") (:revdesc . "ebb79789cd35") (:keywords "languages" "soar"))])
+ (soccer . [(20260823 615) ((emacs (29 1))) "Fixtures, results, table etc for soccer" tar ((:url . "https://github.com/md-arif-shaikh/soccer") (:commit . "55fa7c959cd51fb05fd1a65ce7ba24de8113caad") (:revdesc . "55fa7c959cd5") (:keywords "games" "soccer" "football") (:authors ("Md Arif Shaikh" . "arifshaikh.astro@gmail.com")) (:maintainers ("Md Arif Shaikh" . "arifshaikh.astro@gmail.com")) (:maintainer "Md Arif Shaikh" . "arifshaikh.astro@gmail.com"))])
+ (socyl . [(20170212 642) ((s (1 11 0)) (dash (2 12 0)) (pkg-info (0 5 0)) (cl-lib (0 5))) "Frontend for several search tools" tar ((:url . "https://github.com/nlamirault/socyl") (:commit . "1ef2da42f66f3ab31a34131e51648f352416f0ba") (:revdesc . "1ef2da42f66f") (:keywords "ripgrep" "sift" "ack" "pt" "ag" "grep" "search") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (soft-charcoal-theme . [(20140420 1643) nil "Dark charcoal theme with soft colors" tar ((:url . "https://github.com/mswift42/soft-charcoal-theme") (:commit . "5607ab977fae6638e78b1495e02da8955c9ba19f") (:revdesc . "5607ab977fae"))])
+ (soft-morning-theme . [(20150918 2041) nil "Emacs24 theme with a light background" tar ((:url . "https://github.com/mswift42/soft-morning-theme") (:commit . "c0f9c70c97ef2be2a093cf839c4bfe27740a111c") (:revdesc . "c0f9c70c97ef"))])
+ (soft-stone-theme . [(20140614 835) ((emacs (24))) "Emacs 24 theme with a light background" tar ((:url . "https://github.com/mswift42/soft-stone-theme") (:commit . "fb475514cfb02cf30ce358a61c48e46614344d48") (:revdesc . "fb475514cfb0"))])
+ (sol-mode . [(20260731 808) ((emacs (30 1))) "Major mode for editing Solidity code" tar ((:url . "https://github.com/nlordell/sol-mode") (:commit . "0d66f4ea4a113520e17ed60ddc237395392402e9") (:revdesc . "0d66f4ea4a11") (:keywords "solidity" "languages") (:authors ("Nicholas Rodrigues Lordello" . "n@lordello.net")) (:maintainers ("Nicholas Rodrigues Lordello" . "n@lordello.net")) (:maintainer "Nicholas Rodrigues Lordello" . "n@lordello.net"))])
+ (solaire-mode . [(20260403 16) ((emacs (25 1)) (cl-lib (0 5))) "Make certain buffers grossly incandescent" tar ((:url . "https://github.com/hlissner/emacs-solaire-mode") (:commit . "1bd0134194e48c8fe4089e9d505517935b2b15e3") (:revdesc . "1bd0134194e4") (:keywords "dim" "bright" "window" "buffer" "faces") (:authors ("Henrik Lissner" . "http://github/hlissner")) (:maintainers ("Henrik Lissner" . "contact@henrik.io")) (:maintainer "Henrik Lissner" . "contact@henrik.io"))])
+ (solarized-gruvbox-theme . [(20250305 936) ((emacs (24 1))) "Solarized Gruvbox theme" tar ((:url . "https://github.com/madara123pain/unique-emacs-theme-pack") (:commit . "43afeb68b3ba0394f8cc925ebb90e9a6620b4b28") (:revdesc . "43afeb68b3ba") (:keywords "faces" "theme" "solarized" "gruvbox" "dark"))])
+ (solarized-theme . [(20260728 833) ((emacs (24 1))) "The Solarized color theme" tar ((:url . "https://github.com/bbatsov/solarized-emacs") (:commit . "1443d6dce378ad2d65a8a8c45d5279481a79dfab") (:revdesc . "1443d6dce378") (:keywords "convenience" "themes" "solarized") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (solidity-flycheck . [(20221024 220) ((flycheck (32 -4)) (solidity-mode (0 1 9)) (dash (2 17 0))) "Flycheck integration for solidity emacs mode" tar ((:url . "https://github.com/ethereum/emacs-solidity") (:commit . "8cb8ac6d1311f5bc893cd72ee96e3e335ee8b2a1") (:revdesc . "8cb8ac6d1311") (:keywords "languages" "solidity" "flycheck") (:authors ("Lefteris Karapetsas" . "lefteris@refu.co")) (:maintainers ("Lefteris Karapetsas" . "lefteris@refu.co")) (:maintainer "Lefteris Karapetsas" . "lefteris@refu.co"))])
+ (solidity-mode . [(20230628 1637) nil "Major mode for ethereum's solidity language" tar ((:url . "https://github.com/ethereum/emacs-solidity") (:commit . "8ba549e429e86778a0e079648f3bc3463fcb15f6") (:revdesc . "8ba549e429e8") (:keywords "languages" "solidity") (:authors ("Lefteris Karapetsas" . "lefteris@refu.co")) (:maintainers ("Lefteris Karapetsas" . "lefteris@refu.co")) (:maintainer "Lefteris Karapetsas" . "lefteris@refu.co"))])
+ (solo-jazz-theme . [(20220117 2009) ((emacs (24 1))) "The Solo-Jazz color theme" tar ((:url . "https://github.com/cstby/solo-jazz-emacs-theme") (:commit . "51d63d8a2c855f4ea79eef9fc9c8a5c9702642c4") (:revdesc . "51d63d8a2c85"))])
+ (solo-rpg . [(20260319 912) ((emacs (27 1)) (transient (0 3 7))) "Solo roleplaying games and Lonelog support" tar ((:url . "https://github.com/enfors/solo-rpg") (:commit . "a64be1367d1b058d7caddd4dfc96a899c4c89d49") (:revdesc . "a64be1367d1b") (:keywords "games") (:authors ("Christer Enfors" . "christer.enfors@gmail.com")) (:maintainers ("Christer Enfors" . "christer.enfors@gmail.com")) (:maintainer "Christer Enfors" . "christer.enfors@gmail.com"))])
+ (somafm . [(20250316 2337) ((emacs (26 1)) (dash (2 12 0)) (request (0 3 2)) (cl-lib (0 6 1))) "A simple soma.fm interface" tar ((:url . "https://github.com/artenator/somafm.el") (:commit . "549fea7df8f7bb3c70939275c04f88ff84e0b5a8") (:revdesc . "549fea7df8f7") (:keywords "multimedia") (:authors ("Arte Ebrahimi" . "")) (:maintainers ("Arte Ebrahimi" . "")) (:maintainer "Arte Ebrahimi" . ""))])
+ (sonic-pi . [(20211214 1242) ((cl-lib (0 5)) (osc (0 1)) (dash (2 2 0)) (emacs (24)) (highlight (0))) "A Emacs client for SonicPi" tar ((:url . "http://www.github.com/repl-electric/sonic-pi.el") (:commit . "9ae16d0fd4cba77ae0bedac83f2cb46569be6ade") (:revdesc . "9ae16d0fd4cb") (:keywords "sonicpi" "ruby") (:authors ("Joseph Wilk" . "joe@josephwilk.net")) (:maintainers ("Joseph Wilk" . "joe@josephwilk.net")) (:maintainer "Joseph Wilk" . "joe@josephwilk.net"))])
+ (soong-mode . [(20221217 1243) ((emacs (27 1))) "Major mode for editing Soong build files" tar ((:url . "https://github.com/bobrofon/soong-mode") (:commit . "bf3dc1070b368b413958f54fbe9bcc2aaf77b56f") (:revdesc . "bf3dc1070b36") (:keywords "languages") (:authors ("Sergey Bobrenok" . "bobrofon@gmail.com")) (:maintainers ("Sergey Bobrenok" . "bobrofon@gmail.com")) (:maintainer "Sergey Bobrenok" . "bobrofon@gmail.com"))])
+ (soothe-theme . [(20240415 837) ((emacs (24 3)) (autothemer (0 2))) "A dark colorful theme" tar ((:url . "https://github.com/emacsfodder/emacs-soothe-theme") (:commit . "a8d3d964cfe9fc2157f45d2d26647a450ed9161a") (:revdesc . "a8d3d964cfe9") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (sops . [(20260518 350) ((emacs (29 1))) "Edit SOPS-encrypted files transparently" tar ((:url . "https://github.com/djgoku/sops") (:commit . "95b2178a71dcbf3e69729c52cba2bc23171e059d") (:revdesc . "95b2178a71dc") (:keywords "convenience" "files" "tools" "sops" "encrypt" "decrypt") (:authors ("Jonathan Carroll Otsuka" . "pitas.axioms0c@icloud.com")) (:maintainers ("Jonathan Carroll Otsuka" . "pitas.axioms0c@icloud.com")) (:maintainer "Jonathan Carroll Otsuka" . "pitas.axioms0c@icloud.com"))])
+ (sorcery-theme . [(20210101 1352) ((autothemer (0 2))) "A D&D (Dark and Dusty) Theme" tar ((:url . "https://github.com/vxid/emacs-theme-sorcery") (:commit . "5a1c4445b9e6e09589a299a9962a6973272a0c2f") (:revdesc . "5a1c4445b9e6") (:authors ("Maxime Tréca" . "maxime@gmail.com")) (:maintainers ("Maxime Tréca" . "maxime@gmail.com")) (:maintainer "Maxime Tréca" . "maxime@gmail.com"))])
+ (soria-theme . [(20260702 1424) ((emacs (25 1))) "A xoria256 theme with some colors from openSUSE" tar ((:url . "https://github.com/mssola/soria") (:commit . "bd83db9f83dff1cc717f9a6b4a2feab05031458a") (:revdesc . "bd83db9f83df") (:keywords "faces") (:authors ("Miquel Sabaté Solà" . "mikisabate@gmail.com")) (:maintainers ("Miquel Sabaté Solà" . "mikisabate@gmail.com")) (:maintainer "Miquel Sabaté Solà" . "mikisabate@gmail.com"))])
+ (sort-words . [(20160929 1335) nil "Sort words in a selected region" tar ((:url . "http://github.org/dotemacs/sort-words.el") (:commit . "7b6e108f80237363faf7ec28b2c58dec270b8601") (:revdesc . "7b6e108f8023") (:keywords "tools") (:authors ("Aleksandar Simic" . "asimic@gmail.com")) (:maintainers ("Aleksandar Simic" . "asimic@gmail.com")) (:maintainer "Aleksandar Simic" . "asimic@gmail.com"))])
+ (sotclojure . [(20170922 8) ((emacs (24 1)) (clojure-mode (4 0 0)) (cider (0 8)) (sotlisp (1 3))) "Write clojure at the speed of thought" tar ((:url . "https://github.com/Malabarba/speed-of-thought-clojure") (:commit . "ceac82aa691e8d98946471be6aaff9c9a4603c32") (:revdesc . "ceac82aa691e") (:keywords "convenience" "clojure") (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainers ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com"))])
+ (sotlisp . [(20220909 803) ((emacs (24 1))) "Write lisp at the speed of thought" tar ((:url . "https://github.com/Malabarba/speed-of-thought-lisp") (:commit . "04186129f2dccf48e288639b78adeb9c0e94be54") (:revdesc . "04186129f2dc") (:keywords "convenience" "lisp") (:authors ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainers ("Artur Malabarba" . "emacs@endlessparentheses.com")) (:maintainer "Artur Malabarba" . "emacs@endlessparentheses.com"))])
+ (sound-wav . [(20260103 1801) ((deferred (0 3 1)) (cl-lib (0 5))) "Play wav file" tar ((:url . "https://github.com/syohex/emacs-sound-wav") (:commit . "99eae68e7774ea1429cce1432facd47a95670254") (:revdesc . "99eae68e7774") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (soundcloud . [(20150502 326) ((emms (20131016)) (json (1 2)) (deferred (0 3 1)) (string-utils (0 3 2)) (request (20140316 417)) (request-deferred (20130526 1015))) "A SoundCloud client for Emacs" tar ((:url . "https://github.com/thieman/soundcloud.el") (:commit . "f998d4276ea90258909c698f6a5a51fccb667c08") (:revdesc . "f998d4276ea9") (:keywords "soundcloud" "music" "audio") (:authors ("Travis Thieman" . "travis.thieman@gmail.com")) (:maintainers ("Travis Thieman" . "travis.thieman@gmail.com")) (:maintainer "Travis Thieman" . "travis.thieman@gmail.com"))])
+ (soundklaus . [(20191220 2112) ((dash (2 12 1)) (emacs (24)) (emms (4 0)) (s (1 11 0)) (pkg-info (0 4)) (cl-lib (0 5)) (request (0 2 0))) "Play music on SoundCloud with Emacs via EMMS" tar ((:url . "https://github.com/r0man/soundklaus.el") (:commit . "15ce6e7f24a45e4f202d83cca9fa3bfdd94ca592") (:revdesc . "15ce6e7f24a4") (:keywords "soundcloud" "music" "emms") (:authors ("r0man" . "roman@burningswell.com")) (:maintainers ("r0man" . "roman@burningswell.com")) (:maintainer "r0man" . "roman@burningswell.com"))])
+ (sourcekit . [(20210430 2155) ((emacs (24 3)) (dash (2 18 0)) (request (0 2 0))) "Library to interact with sourcekittendaemon" tar ((:url . "https://github.com/nathankot/company-sourcekit") (:commit . "a1860ad4dd3a542acd2fa0dfac2a388cbdf4af0c") (:revdesc . "a1860ad4dd3a") (:keywords "tools" "processes") (:authors ("Nathan Kot" . "nk@nathankot.com")) (:maintainers ("Nathan Kot" . "nk@nathankot.com")) (:maintainer "Nathan Kot" . "nk@nathankot.com"))])
+ (sourcemap . [(20200315 1037) ((emacs (24 3))) "Sourcemap parser" tar ((:url . "https://github.com/syohex/emacs-sourcemap") (:commit . "bb2a56b2feb62b0c77d7f03ef2acd94f91be6b3f") (:revdesc . "bb2a56b2feb6") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (sourcepawn-mode . [(20260318 957) nil "SourcePawn major mode" tar ((:url . "https://rakeri.net/teamfortress2/sourcepawn-mode") (:commit . "1278cfe7e411385755b796ac7245ace7d0deb26d") (:revdesc . "1278cfe7e411") (:authors ("Aaron Griffith" . "aargri@gmail.com")) (:maintainers ("Aaron Griffith" . "aargri@gmail.com")) (:maintainer "Aaron Griffith" . "aargri@gmail.com"))])
+ (sourcerer-theme . [(20161014 1625) nil "A version of sourcerer by xero" tar ((:url . "https://github.com/gilbertw1/sourcerer-emacs") (:commit . "c7f8e665d53bb48fb72f95f706710d53d24bd407") (:revdesc . "c7f8e665d53b") (:keywords "themes") (:authors ("Bryan Gilbert" . "gilbertw1@gmail.com")) (:maintainers ("Bryan Gilbert" . "gilbertw1@gmail.com")) (:maintainer "Bryan Gilbert" . "gilbertw1@gmail.com"))])
+ (sozluk . [(20230730 1749) ((emacs (27 1)) (dash (2 11 0))) "An online Turkish dictionary" tar ((:url . "https://github.com/isamert/sozluk.el") (:commit . "420ace999fa0d27fbc6aa6011313488c8664a925") (:revdesc . "420ace999fa0") (:authors ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainers ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainer "Isa Mert Gurbuz" . "isamertgurbuz@gmail.com"))])
+ (space-theming . [(20200502 1032) ((emacs (24))) "Easilly override theme faces" tar ((:url . "https://github.com/p3r7/space-theming") (:commit . "31dca6954df643255175f7df68a86892aa3c71a7") (:revdesc . "31dca6954df6") (:keywords "faces"))])
+ (spacebar . [(20190719 334) ((eyebrowse (0 7 7)) (emacs (25 4 0))) "Workspaces Bar" tar ((:url . "https://github.com/matthias-margush/spacebar") (:commit . "2b2cd0e786877273103f048e62a06b0027deca2d") (:revdesc . "2b2cd0e78687") (:keywords "convenience") (:authors ("Matthias Margush" . "matthias.margush@gmail.com")) (:maintainers ("Matthias Margush" . "matthias.margush@gmail.com")) (:maintainer "Matthias Margush" . "matthias.margush@gmail.com"))])
+ (spacegray-theme . [(20150719 1931) ((emacs (24 1))) "A Hyperminimal UI Theme" tar ((:url . "https://github.com/bruce/emacs-spacegray-theme") (:commit . "7f70ee36297e5ccf9bc90b1f81472024f5a7a749") (:revdesc . "7f70ee36297e") (:keywords "themes") (:authors ("Bruce Williams" . "brwcodes@gmail.com")) (:maintainers ("Bruce Williams" . "brwcodes@gmail.com")) (:maintainer "Bruce Williams" . "brwcodes@gmail.com"))])
+ (spaceline . [(20230922 1127) ((emacs (24 4)) (cl-lib (0 5)) (powerline (2 3)) (dash (2 11 0)) (s (1 10 0))) "Modeline configuration library for powerline" tar ((:url . "https://github.com/TheBB/spaceline") (:commit . "086420d16e526c79b67fc1edec4c2ae1e699f372") (:revdesc . "086420d16e52") (:keywords "mode-line" "powerline" "spacemacs") (:authors ("Eivind Fonn" . "evfonn@gmail.com")) (:maintainers ("Eivind Fonn" . "evfonn@gmail.com")) (:maintainer "Eivind Fonn" . "evfonn@gmail.com"))])
+ (spaceline-all-the-icons . [(20190325 1602) ((emacs (24 4)) (all-the-icons (2 6 0)) (spaceline (2 0 0)) (memoize (1 0 1))) "A Spaceline theme using All The Icons" tar ((:url . "https://github.com/domtronn/spaceline-all-the-icons.el") (:commit . "5afd48c10f1bd42d9b9648c5e64596b72f3e9042") (:revdesc . "5afd48c10f1b") (:keywords "convenience" "lisp" "tools") (:authors ("Dominic Charlesworth" . "dgc336@gmail.com")) (:maintainers ("Dominic Charlesworth" . "dgc336@gmail.com")) (:maintainer "Dominic Charlesworth" . "dgc336@gmail.com"))])
+ (spacemacs-theme . [(20260812 1549) nil "Color theme with a dark and light versions" tar ((:url . "https://github.com/nashamri/spacemacs-theme") (:commit . "c1617a86bc18ae611b0c0cf1d51e5906a2676c6b") (:revdesc . "c1617a86bc18") (:keywords "color" "theme"))])
+ (spaces . [(20170809 2208) nil "Create and switch between named window configurations" tar ((:url . "https://github.com/chumpage/chumpy-windows") (:commit . "6bdb51e9a346907d60a9625f6180bddd06be6674") (:revdesc . "6bdb51e9a346") (:keywords "frames" "convenience"))])
+ (spanish-holidays . [(20251231 1119) nil "Spain holidays for calendar" tar ((:url . "https://gitlab.com/gnuhack/spanish-holidays") (:commit . "783e75d933d2b1eb4eecd549afb4a8b6f97e67a9") (:revdesc . "783e75d933d2") (:keywords "calendar") (:authors ("Carlos Pajuelo" . "carlospajuelo_@hotmail.com")) (:maintainers ("Carlos Pajuelo" . "carlospajuelo_@hotmail.com")) (:maintainer "Carlos Pajuelo" . "carlospajuelo_@hotmail.com"))])
+ (spark . [(20230406 2307) ((emacs (24 3))) "Sparkline generation" tar ((:url . "https://github.com/alvinfrancis/spark") (:commit . "0e58e5122cbb46fb6d850e3b72487431a3696861") (:revdesc . "0e58e5122cbb") (:keywords "lisp" "data"))])
+ (sparkline . [(20150101 1319) ((cl-lib (0 3))) "Make sparkline images from a list of numbers" tar ((:url . "https://github.com/woudshoo/sparkline") (:commit . "a2b5d817d272d6363b67ed8f8cc75499a19fa8d2") (:revdesc . "a2b5d817d272") (:keywords "extensions") (:authors ("Willem Rein Oudshoorn" . "woudshoo@xs4all.nl")) (:maintainers ("Willem Rein Oudshoorn" . "woudshoo@xs4all.nl")) (:maintainer "Willem Rein Oudshoorn" . "woudshoo@xs4all.nl"))])
+ (sparkweather . [(20260317 828) ((emacs (29 1))) "Weather forecasts with sparklines" tar ((:url . "https://github.com/aglet/sparkweather") (:commit . "4197bbbc21e4693b0e258b5a46429285f3419550") (:revdesc . "4197bbbc21e4") (:keywords "convenience" "weather") (:authors ("Robin Stephenson" . "robin@aglet.net")) (:maintainers ("Robin Stephenson" . "robin@aglet.net")) (:maintainer "Robin Stephenson" . "robin@aglet.net"))])
+ (sparql-mode . [(20250508 1044) ((cl-lib (0 5)) (emacs (24 3))) "Edit and interactively evaluate SPARQL queries" tar ((:url . "https://github.com/ljos/sparql-mode") (:commit . "be606dc08d808e7d996e531d2878ce5a27ad37f4") (:revdesc . "be606dc08d80") (:authors ("Craig Andera" . "canderaatwangderadotcom")) (:maintainers ("Bjarte Johansen" . "BjartedotJohansenatgmaildotcom")) (:maintainer "Bjarte Johansen" . "BjartedotJohansenatgmaildotcom"))])
+ (spatial-navigate . [(20260705 40) ((emacs (29 1))) "Directional navigation between blank-space blocks" tar ((:url . "https://codeberg.org/ideasman42/emacs-spatial-navigate") (:commit . "358337ddaef449ad0f1c6b9ab29f99db363ab319") (:revdesc . "358337ddaef4") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (spatial-window . [(20260808 2306) ((emacs (28 1)) (posframe (1 0 0))) "Jump to windows using keyboard spatial mapping" tar ((:url . "https://github.com/lewang/spatial-window") (:commit . "62cde160ca14a3527902605e6e45b64ead87f2fa") (:revdesc . "62cde160ca14") (:keywords "convenience" "windows") (:authors ("Le Wang" . "lewang.dev.26@gmail.com")) (:maintainers ("Le Wang" . "lewang.dev.26@gmail.com")) (:maintainer "Le Wang" . "lewang.dev.26@gmail.com"))])
+ (spdx . [(20260825 45) ((emacs (24 4))) "Insert SPDX license and copyright headers" tar ((:url . "https://github.com/condy0919/spdx.el") (:commit . "4f425ea54133444c5bc6a1377239c984778581c6") (:revdesc . "4f425ea54133") (:keywords "license" "tools") (:authors ("Zhiwei Chen" . "condy0919@gmail.com")) (:maintainers ("Zhiwei Chen" . "condy0919@gmail.com")) (:maintainer "Zhiwei Chen" . "condy0919@gmail.com"))])
+ (speech-tagger . [(20170728 1829) ((cl-lib (0 5))) "Tag parts of speech using coreNLP" tar ((:url . "https://github.com/cosmicexplorer/speech-tagger") (:commit . "61955b40d4e8b09e66a3e8033e82893f81657c06") (:revdesc . "61955b40d4e8") (:keywords "speech" "tag" "nlp" "language" "corenlp" "parsing" "natural") (:authors ("Danny McClanahan" . "danieldmcclanahan@gmail.com")) (:maintainers ("Danny McClanahan" . "danieldmcclanahan@gmail.com")) (:maintainer "Danny McClanahan" . "danieldmcclanahan@gmail.com"))])
+ (speechd-el . [(20250118 1141) nil "Client to speech synthesizers and Braille displays" tar ((:url . "https://github.com/brailcom/speechd-el") (:commit . "0e509d392c7f82ca2451a59b97d551382136d2d5") (:revdesc . "0e509d392c7f") (:authors ("Milan Zamazal" . "pdm@zamazal.org")) (:maintainers ("Milan Zamazal" . "pdm@zamazal.org")) (:maintainer "Milan Zamazal" . "pdm@zamazal.org"))])
+ (speed-type . [(20260611 1554) ((emacs (27 1)) (compat (29 1 3))) "Practice touch and speed typing" tar ((:url . "https://github.com/dakra/speed-type") (:commit . "f004cce95e0f5c5048d38f973b654587ed73abf6") (:revdesc . "f004cce95e0f") (:keywords "games") (:maintainers ("Daniel Kraus" . "daniel@kraus.my")) (:maintainer "Daniel Kraus" . "daniel@kraus.my"))])
+ (speedbar-git-respect . [(20200901 246) ((f (0 8 0)) (emacs (25 1))) "Particular respect git repo in speedbar" tar ((:url . "https://github.com/ukari/speedbar-git-respect") (:commit . "dd8f0849fc1dd21b42380e1a8c28a9a29acd9511") (:revdesc . "dd8f0849fc1d") (:authors ("Muromi Ukari" . "chendianbuji@gmail.com")) (:maintainers ("Muromi Ukari" . "chendianbuji@gmail.com")) (:maintainer "Muromi Ukari" . "chendianbuji@gmail.com"))])
+ (speeddating . [(20180319 723) ((emacs (25))) "Increase date and time at point" tar ((:url . "https://github.com/xuchunyang/emacs-speeddating") (:commit . "eeaf90cd10e376bff5a295590a3d5f7fd1402523") (:revdesc . "eeaf90cd10e3") (:keywords "date" "time") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (spell-fu . [(20260524 636) ((emacs (29 1))) "Fast & light spelling highlighter" tar ((:url . "https://codeberg.org/ideasman42/emacs-spell-fu") (:commit . "103c4aaf0d2ec452359e087bed50504e2bdf4661") (:revdesc . "103c4aaf0d2e") (:keywords "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (sphinx-doc . [(20210213 1250) ((s (1 9 0)) (cl-lib (0 5)) (dash (2 10 0))) "Sphinx friendly docstrings for Python functions" tar ((:url . "https://github.com/naiquevin/sphinx-doc.el") (:commit . "1eda612a44ef027e5229895daa77db99a21b8801") (:revdesc . "1eda612a44ef") (:keywords "sphinx" "python") (:authors ("Vineet Naik" . "naikvin@gmail.com")) (:maintainers ("Vineet Naik" . "naikvin@gmail.com")) (:maintainer "Vineet Naik" . "naikvin@gmail.com"))])
+ (sphinx-frontend . [(20161025 758) nil "Launch build process for rst documents via sphinx" tar ((:url . "https://github.com/kostafey/sphinx-frontend") (:commit . "0cbb03361c245382d3e679dded30c4fc1713c252") (:revdesc . "0cbb03361c24") (:keywords "compile" "sphinx" "restructuredtext") (:authors ("Kostafey" . "kostafey@gmail.com")) (:maintainers ("Kostafey" . "kostafey@gmail.com")) (:maintainer "Kostafey" . "kostafey@gmail.com"))])
+ (sphinx-mode . [(20250511 2023) ((dash (2 14 1)) (f (0 20))) "Minor mode providing sphinx support" tar ((:url . "https://github.com/Fuco1/sphinx-mode") (:commit . "038a9195b00636d38aa2fc3cf6cbff5cf84e0561") (:revdesc . "038a9195b006") (:keywords "languages") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (spice-mode . [(20220210 1414) ((emacs (24 3))) "Major mode for SPICE" tar ((:url . "https://repo.or.cz/spice-mode.git") (:commit . "f55c2b6dd35caace0ec7250b5c7b5d119235a23d") (:revdesc . "f55c2b6dd35c") (:keywords "spice" "spice2g6" "spice3" "eldo" "hspice" "layla" "mondriaan" "fasthenry" "cdl" "spectre compatibility" "netlist editing") (:authors ("Geert A. M. Van der Plas 1999-" . "geert_vanderplas@email.com") ("Emmanuel Rouat 1997-" . "emmanuel.rouat@wanadoo.fr") ("MIT AI Lab 1994" . "cvieri@ai.mit.edu")) (:maintainers ("Geert A. M. Van der Plas" . "geert_vanderplas@email.com")) (:maintainer "Geert A. M. Van der Plas" . "geert_vanderplas@email.com"))])
+ (spider-man-theme . [(20250305 936) ((emacs (24 1))) "A Vibrant Spider-Man Inspired Theme" tar ((:url . "https://github.com/madara123pain/unique-emacs-theme-pack") (:commit . "43afeb68b3ba0394f8cc925ebb90e9a6620b4b28") (:revdesc . "43afeb68b3ba") (:keywords "faces" "theme" "spiderman" "dark" "red" "blue"))])
+ (splitjoin . [(20150505 1432) ((cl-lib (0 5))) "Transition between multiline and single-line code" tar ((:url . "https://github.com/syohex/emacs-splitjoin") (:commit . "39a77f1c6c7406e79095eb0385667097172a770c") (:revdesc . "39a77f1c6c74") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (splitter . [(20170809 2208) nil "Manage window splits" tar ((:url . "https://github.com/chumpage/chumpy-windows") (:commit . "6bdb51e9a346907d60a9625f6180bddd06be6674") (:revdesc . "6bdb51e9a346") (:keywords "frames" "convenience"))])
+ (splunk-mode . [(20241002 1040) ((emacs (27 1))) "Major Mode for editing Splunk SPL source code" tar ((:url . "https://github.com/jakewilliami/splunk-mode/") (:commit . "bc0ad3ed26e2f6d46c430a3f1ab86c93c4483403") (:revdesc . "bc0ad3ed26e2") (:keywords "languages" "splunk" "mode" "query") (:authors ("Jake Ireland" . "jakewilliami@icloud.com")) (:maintainers ("Jake Ireland" . "jakewilliami@icloud.com")) (:maintainer "Jake Ireland" . "jakewilliami@icloud.com"))])
+ (spotify . [(20250106 1015) ((cl-lib (0 5))) "Control the spotify application from emacs" tar ((:url . "https://codeberg.org/rwv/spotify-el") (:commit . "d918b5187638e0c44a2a2584f3980244b6aae3fa") (:revdesc . "d918b5187638") (:keywords "convenience"))])
+ (spotlight . [(20200109 2137) ((emacs (24 1)) (swiper (0 6 0)) (counsel (0 6 0))) "Search files with Mac OS X spotlight" tar ((:url . "http://www.pragmaticemacs.com") (:commit . "ea71f4fd380c51e50c47bb25855af4f40e4d8da0") (:revdesc . "ea71f4fd380c") (:keywords "search" "external") (:authors ("Ben Maughan" . "benmaughan@gmail.com")) (:maintainers ("Ben Maughan" . "benmaughan@gmail.com")) (:maintainer "Ben Maughan" . "benmaughan@gmail.com"))])
+ (spray . [(20160304 2220) nil "A speed reading mode" tar ((:url . "https://github.com/ian-kelling/spray") (:commit . "69fe48e7bb079e3011476b9f4eb6ac9ae94d6d9b") (:revdesc . "69fe48e7bb07") (:keywords "convenience") (:authors ("Ian Kelling" . "ian@iankelling.org")) (:maintainers ("Ian Kelling" . "ian@iankelling.org")) (:maintainer "Ian Kelling" . "ian@iankelling.org"))])
+ (springboard . [(20170106 755) ((helm (1 6 9))) "Temporarily change default-directory for one command" tar ((:url . "https://github.com/jwiegley/springboard") (:commit . "263a8cd4582c81bfc29d7db37d5267e2488b148c") (:revdesc . "263a8cd4582c") (:keywords "helm") (:authors ("John Wiegley" . "jwiegley@gmail.com")) (:maintainers ("John Wiegley" . "jwiegley@gmail.com")) (:maintainer "John Wiegley" . "jwiegley@gmail.com"))])
+ (sprintly-mode . [(20121006 534) ((furl (0 0 2))) "Major mode for dealing with sprint.ly" tar ((:url . "https://github.com/sprintly/sprintly-mode") (:commit . "6695892bae5860b5268bf3ae62be990ee9b63c11") (:revdesc . "6695892bae58") (:authors ("Justin Lilly" . "justin@justinlilly.com")) (:maintainers ("Justin Lilly" . "justin@justinlilly.com")) (:maintainer "Justin Lilly" . "justin@justinlilly.com"))])
+ (sproto-mode . [(20151115 1805) nil "Major mode for editing sproto" tar ((:url . "https://github.com/m2q1n9/sproto-mode") (:commit . "1753277d9f2163fb3bc58b983a9892831cf9874b") (:revdesc . "1753277d9f21") (:keywords "sproto"))])
+ (sprunge . [(20160301 243) ((request (0 2 0)) (cl-lib (0 5))) "Upload pastes to sprunge.us" tar ((:url . "https://github.com/tomjakubowski/sprunge.el") (:commit . "0fd386b8b29c4175022a04ad70ea5643185b6726") (:revdesc . "0fd386b8b29c") (:keywords "tools"))])
+ (spu . [(20161214 324) ((emacs (24 4)) (signal (1 0)) (timp (1 2 0))) "Silently upgrade package in the background" tar ((:url . "https://github.com/mola-T/spu") (:commit . "41eec86b595816e3852e8ad1a8e07e51a27fd065") (:revdesc . "41eec86b5958") (:keywords "convenience" "package") (:authors ("Mola-T" . "Mola@molamola.xyz")) (:maintainers ("Mola-T" . "Mola@molamola.xyz")) (:maintainer "Mola-T" . "Mola@molamola.xyz"))])
+ (sq . [(20250522 1012) ((emacs (24 1))) "Bindings for Sequoia PGP's cli" tar ((:url . "https://gitlab.com/sequoia-pgp/sqel") (:commit . "2871a8d0680ceb1d8de28a52bd8b2241d0691c02") (:revdesc . "2871a8d0680c") (:keywords "tools" "data" "mail") (:authors ("Justus Winter" . "justus@sequoia-pgp.org")) (:maintainers ("Justus Winter" . "justus@sequoia-pgp.org")) (:maintainer "Justus Winter" . "justus@sequoia-pgp.org"))])
+ (sql-bigquery . [(20260502 1517) ((emacs (25 1))) "Adds BigQuery support to SQLi mode" tar ((:url . "https://github.com/regadas/sql-bigquery") (:commit . "1d068f7a7226d7af70d4ffceb86bc5e91826c29e") (:revdesc . "1d068f7a7226") (:keywords "languages" "sql" "bigquery") (:authors ("Martin Nowak" . "code+sql-bigquery@dawg.eu")) (:maintainers ("Filipe Regadas" . "oss@regadas.email")) (:maintainer "Filipe Regadas" . "oss@regadas.email"))])
+ (sql-clickhouse . [(20191209 1443) ((emacs (24))) "Support ClickHouse as SQL interpreter" tar ((:url . "https://github.com/leethargo/sql-clickhouse") (:commit . "8403a4a5d332dbb6459b7fbce6ea95c36d390a5b") (:revdesc . "8403a4a5d332") (:authors ("Robert Schwarz" . "mail@rschwarz.net")) (:maintainers ("Robert Schwarz" . "mail@rschwarz.net")) (:maintainer "Robert Schwarz" . "mail@rschwarz.net"))])
+ (sql-impala . [(20250616 110) nil "Comint support for Cloudera Impala" tar ((:url . "https://github.com/jterk/sql-impala") (:commit . "8968be95e493da3a3cc445e44a852186fa37df6b") (:revdesc . "8968be95e493") (:keywords "sql" "impala") (:authors ("Jason Terk" . "jason@goterkyourself.com")) (:maintainers ("Jason Terk" . "jason@goterkyourself.com")) (:maintainer "Jason Terk" . "jason@goterkyourself.com"))])
+ (sql-presto . [(20190113 1742) ((emacs (24 4))) "[No description available]" tar ((:url . "https://github.com/kat-co/sql-prestodb") (:commit . "bcda455e300a1af75c7bb805882329bc844703b2") (:revdesc . "bcda455e300a") (:keywords "sql" "presto" "database") (:authors ("Katherine Cox-Buday" . "cox.katherine.e@gmail.com")) (:maintainers ("Katherine Cox-Buday" . "cox.katherine.e@gmail.com")) (:maintainer "Katherine Cox-Buday" . "cox.katherine.e@gmail.com"))])
+ (sql-sqlline . [(20231109 2111) ((emacs (24 4))) "Adds SQLLine support to SQLi mode" tar ((:url . "https://gitlab.com/matteoredaelli/sql-sqlline") (:commit . "3d540a8cc9c6f816b241913042008f09323455af") (:revdesc . "3d540a8cc9c6") (:keywords "languages") (:authors ("Matteo Redaelli" . "matteo.redaelli@gmail.com")) (:maintainers ("Matteo Redaelli" . "matteo.redaelli@gmail.com")) (:maintainer "Matteo Redaelli" . "matteo.redaelli@gmail.com"))])
+ (sql-trino . [(20220826 632) ((emacs (24 4))) "Adds Trino support to SQLi mode" tar ((:url . "https://github.com/regadas/sql-trino") (:commit . "624a879ec0d03cae8a92f26d21d88c831e15eb41") (:revdesc . "624a879ec0d0") (:keywords "tools") (:authors ("Filipe Regadas" . "oss@regadas.email")) (:maintainers ("Filipe Regadas" . "oss@regadas.email")) (:maintainer "Filipe Regadas" . "oss@regadas.email"))])
+ (sqlformat . [(20240325 1006) ((emacs (24 3)) (reformatter (0 3))) "Reformat SQL using sqlformat or pgformatter" tar ((:url . "https://github.com/purcell/sqlformat") (:commit . "f1c8f864f11f4af65551de445dcf65543be0583b") (:revdesc . "f1c8f864f11f") (:keywords "languages") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (sqlite-mode-extras . [(20250827 1317) ((emacs (29 1))) "Extensions for sqlite-mode" tar ((:url . "https://github.com/xenodium/sqlite-mode-extras") (:commit . "83881ac1298eb15aaded2d579b59d7d9d25e403b") (:revdesc . "83881ac1298e"))])
+ (sqlite3 . [(20251014 536) ((emacs (25 1))) "Direct access to the core SQLite3 API" tar ((:url . "https://github.com/pekingduck/emacs-sqlite3-api") (:commit . "a6376d769cf0749930b9bc00170e962029210406") (:revdesc . "a6376d769cf0") (:keywords "comm" "data" "sql") (:authors ("Y. N. Lo" . "elisp@fastmail.com")) (:maintainers ("Y. N. Lo" . "elisp@fastmail.com")) (:maintainer "Y. N. Lo" . "elisp@fastmail.com"))])
+ (sqlup-mode . [(20170610 1537) nil "Upcase SQL words for you" tar ((:url . "https://github.com/trevoke/sqlup-mode.el") (:commit . "04970977b4abb4d44301651618bbf1cdb0b263dd") (:revdesc . "04970977b4ab") (:keywords "sql" "tools" "redis" "upcase") (:authors ("Aldric Giacomoni" . "trevoke@gmail.com")) (:maintainers ("Aldric Giacomoni" . "trevoke@gmail.com")) (:maintainer "Aldric Giacomoni" . "trevoke@gmail.com"))])
+ (squirrel-mode . [(20221227 232) ((emacs (24 3))) "A major mode for the Squirrel programming language" tar ((:url . "https://github.com/thechampagne/squirrel-mode") (:commit . "1af79dfe70c4c8e6f0f144bfd2eb65c077aca785") (:revdesc . "1af79dfe70c4") (:keywords "files" "squirrel"))])
+ (sr-speedbar . [(20220705 1231) nil "Same frame speedbar" tar ((:url . "http://www.emacswiki.org/emacs/download/sr-speedbar.el") (:commit . "73ecfc21cf38f0cb1dfbbebebdc3cf573eccf7d2") (:revdesc . "73ecfc21cf38") (:keywords "speedbar" "sr-speedbar.el") (:authors ("Sebastian Rose" . "sebastian_rose@gmx.de")) (:maintainers ("Sebastian Rose" . "sebastian_rose@gmx.de") ("Peter Lunicks" . "plunix@users.sourceforge.net")) (:maintainer "Sebastian Rose" . "sebastian_rose@gmx.de"))])
+ (srcery-theme . [(20250901 1751) ((emacs (24))) "Dark color theme" tar ((:url . "https://github.com/srcery-colors/srcery-emacs") (:commit . "eee86865bb7baa8f015ab57a42d9c12e51b8b6fb") (:revdesc . "eee86865bb7b") (:keywords "faces"))])
+ (srefactor . [(20230504 617) ((emacs (24 4))) "A refactoring tool based on Semantic parser framework" tar ((:url . "https://github.com/tuhdo/semantic-refactor") (:commit . "95c70a94b5aad4c85b35569e2f2325047791153a") (:revdesc . "95c70a94b5aa") (:keywords "c" "languages" "tools") (:authors ("Do Hoang" . "tuhdo1710@gmail.com")))])
+ (srfi . [(20260820 2259) ((emacs (25 1))) "Scheme Requests for Implementation browser" tar ((:url . "https://github.com/srfi-explorations/emacs-srfi") (:commit . "c39323f0caa6969fdcdcaf534fb3f6cc2c41703f") (:revdesc . "c39323f0caa6") (:keywords "languages" "util") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (srs . [(20260805 231) ((emacs (26 1))) "Spaced repetition in plain text" tar ((:url . "https://github.com/Duncan-Britt/srs.el") (:commit . "6523b4a29b61cd0399110c0d401ed576a58b0d5d") (:revdesc . "6523b4a29b61") (:keywords "hypermedia" "srs" "memory") (:authors ("Duncan Britt" . "duncanbritt.com")) (:maintainers ("Duncan Britt" . "duncanbritt.com")) (:maintainer "Duncan Britt" . "duncanbritt.com"))])
+ (srv . [(20180715 1959) ((emacs (24 3))) "Perform SRV DNS requests" tar ((:url . "https://github.com/legoscia/srv.el") (:commit . "714387d5a5cf34d8d8cd96bdb1f9cb8ded823ff7") (:revdesc . "714387d5a5cf") (:keywords "comm") (:authors ("Magnus Henoch" . "magnus.henoch@gmail.com")) (:maintainers ("Magnus Henoch" . "magnus.henoch@gmail.com")) (:maintainer "Magnus Henoch" . "magnus.henoch@gmail.com"))])
+ (ssass-mode . [(20200211 132) ((emacs (24 3))) "Edit Sass without a Turing Machine" tar ((:url . "https://github.com/AdamNiederer/ssass-mode") (:commit . "96f557887ad97a0066a60c54f92b7234b8407016") (:revdesc . "96f557887ad9") (:keywords "languages" "sass") (:authors ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainers ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainer "Adam Niederer" . "adam.niederer@gmail.com"))])
+ (ssh . [(20120904 2042) nil "Support for remote logins using ssh" tar ((:url . "https://codeberg.org/emacs-weirdware-abandoned/ssh") (:commit . "c17cf5b43df8ac4662a0580f85898e1f078df0d1") (:revdesc . "c17cf5b43df8") (:keywords "unix" "comm") (:authors ("Noah Friedman" . "friedman@splode.com")) (:maintainers ("Ian Eure" . "ian.eure@gmail.com")) (:maintainer "Ian Eure" . "ian.eure@gmail.com"))])
+ (ssh-agency . [(20251103 1834) ((emacs (26 1))) "Manage ssh-agent from Emacs" tar ((:url . "https://github.com/magit/ssh-agency") (:commit . "2a6e1784b42b6179da11c6c1077faaa0eb484e0d") (:revdesc . "2a6e1784b42b") (:authors ("Noam Postavsky" . "npostavs@user.sourceforge.net")) (:maintainers ("Noam Postavsky" . "npostavs@user.sourceforge.net")) (:maintainer "Noam Postavsky" . "npostavs@user.sourceforge.net"))])
+ (ssh-config-mode . [(20260706 1430) ((emacs (24 3))) "Mode for fontification of ~/.ssh/config" tar ((:url . "https://github.com/peterhoeg/ssh-config-mode-el") (:commit . "a171e48c3cef777556961323d4dd6172a94be0f1") (:revdesc . "a171e48c3cef") (:keywords "comm" "files") (:authors ("Harley Gorrell" . "harley@panix.com")) (:maintainers ("Peter Hoeg" . "peter@hoeg.com")) (:maintainer "Peter Hoeg" . "peter@hoeg.com"))])
+ (ssh-tunnels . [(20220721 1242) ((cl-lib (0 5)) (emacs (24))) "Manage SSH tunnels" tar ((:url . "https://github.com/death/ssh-tunnels") (:commit . "5010d779edef33f869065231b99d74723c9c7eaf") (:revdesc . "5010d779edef") (:keywords "tools" "convenience") (:authors ("death" . "github.com/death")) (:maintainers ("death" . "github.com/death")) (:maintainer "death" . "github.com/death"))])
+ (stan-mode . [(20211129 2051) ((emacs (24 4))) "Major mode for editing Stan files" tar ((:url . "https://github.com/stan-dev/stan-mode/tree/master/stan-mode") (:commit . "150bbbe5fd3ad2b5a3dbfba9d291e66eeea1a581") (:revdesc . "150bbbe5fd3a") (:keywords "languages" "c") (:authors ("Jeffrey Arnold" . "jeffrey.arnold@gmail.com") ("Daniel Lee" . "bearlee@alum.mit.edu") ("Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu")) (:maintainers ("Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu")) (:maintainer "Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu"))])
+ (stan-snippets . [(20211129 2051) ((emacs (24 3)) (stan-mode (10 3 0)) (yasnippet (0 8 0))) "Yasnippets for Stan" tar ((:url . "https://github.com/stan-dev/stan-mode/tree/master/stan-snippets") (:commit . "150bbbe5fd3ad2b5a3dbfba9d291e66eeea1a581") (:revdesc . "150bbbe5fd3a") (:keywords "languages" "tools") (:authors ("Jeffrey Arnold" . "jeffrey.arnold@gmail.com") ("Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu")) (:maintainers ("Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu")) (:maintainer "Kazuki Yoshida" . "kazukiyoshida@mail.harvard.edu"))])
+ (stan-ts-mode . [(20260421 1440) ((emacs (30 1))) "Major mode for editing Stan files" tar ((:url . "https://github.com/WardBrian/stan-ts-mode") (:commit . "96c039101367b854834a0f37761f8df18f18085b") (:revdesc . "96c039101367") (:keywords "stan" "languages" "tree-sitter") (:authors ("Brian Ward" . "bward@flatironinstitute.org")) (:maintainers ("Brian Ward" . "bward@flatironinstitute.org")) (:maintainer "Brian Ward" . "bward@flatironinstitute.org"))])
+ (standard-dirs . [(20200621 1603) ((emacs (26 1)) (f (0 20 0)) (s (1 7 0))) "Platform-specific paths for config, cache, and other data" tar ((:url . "https://github.com/lafrenierejm/standard-dirs.el") (:commit . "e37b7e1c714c7798cd8e3a6569e4d71b96718a60") (:revdesc . "e37b7e1c714c") (:keywords "files") (:authors ("Joseph M LaFreniere" . "joseph@lafreniere.xyz")) (:maintainers ("Joseph M LaFreniere" . "joseph@lafreniere.xyz")) (:maintainer "Joseph M LaFreniere" . "joseph@lafreniere.xyz"))])
+ (standoff-mode . [(20210810 1814) nil "Create stand-off markup, also called external markup" tar ((:url . "https://github.com/lueck/standoff-mode") (:commit . "5e603092410d9c393d19050bcbed3014a379f0e6") (:revdesc . "5e603092410d") (:keywords "text" "annotations" "ner" "humanities") (:authors ("Christian Lück" . "christian.lueck@ruhr-uni-bochum.de")) (:maintainers ("Christian Lück" . "christian.lueck@ruhr-uni-bochum.de")) (:maintainer "Christian Lück" . "christian.lueck@ruhr-uni-bochum.de"))])
+ (starhugger . [(20250216 948) ((emacs (28 2)) (compat (29 1 4 0)) (dash (2 18 0)) (s (1 13 1)) (spinner (1 7 4)) (request (0 3 2))) "Hugging Face/AI-powered text & code completion client" tar ((:url . "https://gitlab.com/daanturo/starhugger.el") (:commit . "c9753808184eaa9328b6ada18bfe418150b92eac") (:revdesc . "c9753808184e") (:keywords "completion" "convenience" "languages"))])
+ (starling . [(20260427 1351) ((emacs (29 1)) (plz (0 7 2))) "Starling bank interaction" tar ((:url . "https://codeberg.org/draxil/starling-el") (:commit . "9a5f3003d40a9c6bd64b5cf396973c4922006e4d") (:revdesc . "9a5f3003d40a") (:keywords "data" "applications" "banking") (:authors ("Joe Higton" . "draxil@gmail.com")) (:maintainers ("Joe Higton" . "draxil@gmail.com")) (:maintainer "Joe Higton" . "draxil@gmail.com"))])
+ (starlit-theme . [(20251221 2342) ((emacs (25 1))) "Deep blue dark theme with bright colors from the starlit sky" tar ((:url . "https://github.com/SFTtech/starlit-emacs") (:commit . "fe825da76006ba92ed5752f3d573c49014ab8107") (:revdesc . "fe825da76006") (:keywords "faces") (:authors ("Jonas Jelten" . "jj@sft.lol")) (:maintainers ("Jonas Jelten" . "jj@sft.lol")) (:maintainer "Jonas Jelten" . "jj@sft.lol"))])
+ (start-menu . [(20160426 1225) ((cl-lib (0 5)) (config-parser (0 1))) "Start-menu for executing external program like in windows" tar ((:url . "https://github.com/lujun9972/el-start-menu") (:commit . "f7d33fed7ad2dc61156f1c1cff9e1805366fbd69") (:revdesc . "f7d33fed7ad2") (:keywords "convenience" "menu") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (stash . [(20151117 1427) nil "Lightweight persistent caching" tar ((:url . "https://www.github.com/vermiculus/stash.el/") (:commit . "c2e494d20c752b80ebbdffbf66687b3cdfc425ad") (:revdesc . "c2e494d20c75") (:keywords "extensions" "data" "internal" "lisp") (:authors ("Sean Allred" . "code@seanallred.com")) (:maintainers ("Sean Allred" . "code@seanallred.com")) (:maintainer "Sean Allred" . "code@seanallred.com"))])
+ (state . [(20200727 1227) ((emacs (24))) "Quick navigation between workspaces" tar ((:url . "https://github.com/thisirs/state.git") (:commit . "8cd9210f17c1b134274a7352b996839aed9a7d8c") (:revdesc . "8cd9210f17c1") (:keywords "convenience" "workspaces") (:authors ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainers ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainer "Sylvain Rousseau" . "thisirsatgmaildotcom"))])
+ (status . [(20151230 1408) nil "This package adds support for status icons to Emacs" tar ((:url . "https://github.com/tromey/emacs-status") (:commit . "b62c74bf272566f82a68622f29fb9edafea0f241") (:revdesc . "b62c74bf2725") (:keywords "frames" "multimedia") (:authors ("Tom Tromey" . "tom@tromey.com")) (:maintainers ("Tom Tromey" . "tom@tromey.com")) (:maintainer "Tom Tromey" . "tom@tromey.com"))])
+ (steam . [(20220218 1707) ((cl-lib (0 5))) "Organize and launch Steam games" tar ((:url . "https://github.com/Kungsgeten/steam.el") (:commit . "20aa58c5ccd85f6c4f288a14e79adc66e691cd23") (:revdesc . "20aa58c5ccd8") (:keywords "games"))])
+ (stem . [(20131102 1109) nil "Routines for stemming" tar ((:url . "https://github.com/yuutayamada/stem") (:commit . "dd704c3447bd5d3f5ac0a4840f8987d4f855d87e") (:revdesc . "dd704c3447bd") (:keywords "stemming") (:authors ("Tsuchiya Masatoshi" . "tsuchiya@pine.kuee.kyoto-u.ac.jp")) (:maintainers ("Tsuchiya Masatoshi" . "tsuchiya@pine.kuee.kyoto-u.ac.jp")) (:maintainer "Tsuchiya Masatoshi" . "tsuchiya@pine.kuee.kyoto-u.ac.jp"))])
+ (stem-english . [(20180109 358) ((emacs (24 3))) "- routines for stemming English word" tar ((:url . "https://github.com/kawabata/stem-english") (:commit . "c9fc4c6ed6bf82382e479dae80912f4ae17d31f4") (:revdesc . "c9fc4c6ed6bf") (:keywords "text") (:authors ("Tsuchiya Masatoshi" . "tsuchiya@pine.kuee.kyoto-u.ac.jp")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (stem-reading-mode . [(20220522 1053) ((emacs (25 1))) "Highlight word stems for speed-reading" tar ((:url . "https://gitlab.com/wavexx/stem-reading-mode.el") (:commit . "6efc9962e3a19a452c7ab9636cf1e2566a51bd38") (:revdesc . "6efc9962e3a1") (:keywords "convenience" "wp") (:authors ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainers ("Yuri D'Elia" . "wavexx@thregr.org")) (:maintainer "Yuri D'Elia" . "wavexx@thregr.org"))])
+ (stgit . [(20260622 407) nil "Major mode for StGit interaction" tar ((:url . "http://stacked-git.github.io") (:commit . "faa026a62a423762b9821d332aa0f13d59b339e0") (:revdesc . "faa026a62a42") (:authors ("David Kågedal" . "davidk@lysator.liu.se")) (:maintainers ("David Kågedal" . "davidk@lysator.liu.se")) (:maintainer "David Kågedal" . "davidk@lysator.liu.se"))])
+ (sticky . [(20170926 36) nil "Sticky key for capital letters" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/sticky.el") (:commit . "fec4e1af38f17f5cd80eca361d8e8ef8772db366") (:revdesc . "fec4e1af38f1") (:keywords "convenience") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (sticky-scroll-mode . [(20241213 1543) ((emacs (29 4))) "Sticky scrolling" tar ((:url . "https://github.com/jclasley/sticky-mode") (:commit . "a1acf1065f88a586770d0eeddec376907d8320c6") (:revdesc . "a1acf1065f88") (:keywords "convenience" "extensions" "tools") (:authors ("Jon Lasley" . "jon.lasley+sticky@gmail.com")) (:maintainers ("Jon Lasley" . "jon.lasley+sticky@gmail.com")) (:maintainer "Jon Lasley" . "jon.lasley+sticky@gmail.com"))])
+ (sticky-shell . [(20240928 427) ((emacs (25 1))) "Minor mode to keep track of previous prompt in your shell" tar ((:url . "https://github.com/andyjda/sticky-shell") (:commit . "2aec19f60539faf21f567e89701a8e28492eccd1") (:revdesc . "2aec19f60539") (:keywords "processes" "terminals" "tools") (:authors ("Andrew De Angelis" . "bobodeangelis@gmail.com")) (:maintainers ("Andrew De Angelis" . "bobodeangelis@gmail.com")) (:maintainer "Andrew De Angelis" . "bobodeangelis@gmail.com"))])
+ (stickyfunc-enhance . [(20150429 1814) ((emacs (24 3))) "An enhancement to stock `semantic-stickyfunc-mode'" tar ((:url . "https://github.com/tuhdo/semantic-stickyfunc-enhance") (:commit . "13bdba51fcd83ccbc3267959d23afc94d458dcb0") (:revdesc . "13bdba51fcd8") (:keywords "c" "languages" "tools") (:authors ("Do Hoang" . "tuhdo1710@gmail.com")))])
+ (stillness-mode . [(20260826 1610) ((emacs (26 1)) (dash (2 18 0))) "Prevent windows from jumping on minibuffer activation" tar ((:url . "https://github.com/neeasade/stillness-mode.el") (:commit . "835b7fdcb40f2e183eab4157092a882fb52950f6") (:revdesc . "835b7fdcb40f") (:keywords "convenience"))])
+ (stimmung-themes . [(20250915 1420) ((emacs (25))) "Themes tuned to inner harmonies" tar ((:url . "https://github.com/motform/stimmung-themes") (:commit . "bb3410593bb7ecf3c4094396f488e5c64efdb051") (:revdesc . "bb3410593bb7") (:keywords "faces"))])
+ (stock-ticker . [(20150204 1052) ((s (1 9 0)) (request (0 2 0))) "Show stock prices in mode line" tar ((:url . "https://github.com/hagleitn/stock-ticker") (:commit . "74251cc810604af75f48333d51133326c053dd16") (:revdesc . "74251cc81060") (:keywords "comms"))])
+ (stock-tracker . [(20260713 303) ((emacs (27 1)) (dash (2 16 0)) (async (1 9 5))) "Track stock price" tar ((:url . "https://github.com/beacoder/stock-tracker") (:commit . "d3482bf03e738d70396412e2437da534b9059176") (:revdesc . "d3482bf03e73") (:keywords "convenience" "stock" "finance") (:authors ("Huming Chen" . "chenhuming@gmail.com")) (:maintainers ("Huming Chen" . "chenhuming@gmail.com")) (:maintainer "Huming Chen" . "chenhuming@gmail.com"))])
+ (strace-mode . [(20171116 2039) nil "Strace output syntax highlighting" tar ((:url . "https://github.com/pkmoore/strace-mode") (:commit . "2901baa968d5180ab985ac40ca22cc20914d01f5") (:revdesc . "2901baa968d5") (:keywords "languages") (:authors ("Preston Moore" . "(prestonkmoore@gmail.com)")) (:maintainers ("Preston Moore" . "(prestonkmoore@gmail.com)")) (:maintainer "Preston Moore" . "(prestonkmoore@gmail.com)"))])
+ (streak . [(20240106 2145) ((emacs (27 1))) "Track a daily streak in your Mode Line" tar ((:url . "https://github.com/fosskers/streak") (:commit . "2d56788cbbf6114e61c85dd57b05133f8f351ac6") (:revdesc . "2d56788cbbf6") (:keywords "calendar") (:authors ("Colin Woodbury" . "https://www.fosskers.ca")) (:maintainers ("Colin Woodbury" . "colin@fosskers.ca")) (:maintainer "Colin Woodbury" . "colin@fosskers.ca"))])
+ (streamlink . [(20210811 1429) ((s (1 12 0))) "A major mode for streamlink output" tar ((:url . "https://github.com/BenediktBroich/streamlink") (:commit . "13dff15121ac0276f693696db9b04ae5820058d5") (:revdesc . "13dff15121ac") (:keywords "multimedia" "streamlink"))])
+ (strie . [(20160211 2222) ((cl-lib (0 5))) "A simple trie data structure implementation" tar ((:url . "https://github.com/jcatw/strie.el") (:commit . "eb7efb0cccc127c414f6a64db11454869d9c10a8") (:revdesc . "eb7efb0cccc1") (:authors ("James Atwood" . "jatwood@cs.umass.edu")) (:maintainers ("James Atwood" . "jatwood@cs.umass.edu")) (:maintainer "James Atwood" . "jatwood@cs.umass.edu"))])
+ (string-edit-at-point . [(20230118 1933) ((dash (1 2 0))) "Avoid escape nightmares by editing string in separate buffer" tar ((:url . "https://github.com/magnars/string-edit.el") (:commit . "87936d816ae24184dd83688136531b6b6f1943fe") (:revdesc . "87936d816ae2") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (string-inflection . [(20251114 1041) nil "Foo_bar => FOO_BAR => FooBar => fooBar => foo-bar => Foo_Bar => foo_bar conversion of names" tar ((:url . "https://github.com/akicho8/string-inflection") (:commit . "072f7dff43140570788d64ac0ec9d930c3c2a96b") (:revdesc . "072f7dff4314") (:keywords "elisp") (:authors ("akicho8" . "akicho8@gmail.com")) (:maintainers ("akicho8" . "akicho8@gmail.com")) (:maintainer "akicho8" . "akicho8@gmail.com"))])
+ (string-utils . [(20140508 2041) ((list-utils (0 4 2))) "String-manipulation utilities" tar ((:url . "https://github.com/rolandwalker/string-utils") (:commit . "8b56e1f79d2de46d1e9b5e24d889e9f4c3cc85d4") (:revdesc . "8b56e1f79d2d") (:keywords "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (stripe-buffer . [(20141208 1508) ((cl-lib (1 0))) "Use a different background for even and odd lines" tar ((:url . "https://github.com/sabof/stripe-buffer") (:commit . "c252080f55cb78c951b19ebab9687f6d00237baf") (:revdesc . "c252080f55cb") (:authors ("Andy Stewart" . "lazycat.manatee@gmail.com")) (:maintainers ("sabof" . "esabof@gmail.com")) (:maintainer "sabof" . "esabof@gmail.com"))])
+ (stripes . [(20230402 1228) ((emacs (24 3))) "Highlight alternating lines differently" tar ((:url . "http://git.smrk.net/stripes.el") (:commit . "4683c9020da14bb1c1f74b90d27a4d9fdc7a9147") (:revdesc . "4683c9020da1") (:keywords "convenience" "faces") (:authors ("Michael Schierl" . "schierlm-public@gmx.de") ("těpán Němec" . "stepnem@smrk.net")) (:maintainers ("těpán Němec" . "stepnem@smrk.net")) (:maintainer "těpán Němec" . "stepnem@smrk.net"))])
+ (stripspace . [(20260826 244) ((emacs (24 3))) "Auto remove trailing whitespace and restore column" tar ((:url . "https://github.com/jamescherti/stripspace.el") (:commit . "2286cab28317283f1aa54a59cd4bbfcad106c50b") (:revdesc . "2286cab28317") (:keywords "convenience" "files") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (struct-completion . [(20260408 1712) ((emacs (29 1))) "Keyword slot completion for cl-defstruct constructors" tar ((:url . "https://github.com/gggion/struct-completion.el") (:commit . "68cc1742a8efa8967b76befe7df5473f7708a21c") (:revdesc . "68cc1742a8ef") (:keywords "lisp" "completion") (:authors ("Gino Cornejo" . "gggion123@gmail.com")) (:maintainers ("Gino Cornejo" . "gggion123@gmail.com")) (:maintainer "Gino Cornejo" . "gggion123@gmail.com"))])
+ (structurizr . [(20251124 1900) ((emacs (29 1))) "Major mode for Structurizr DSL" tar ((:url . "https://github.com/papadakis-k/structurizr.el") (:commit . "8ecf03c0cd911d72cae049bb01cf9142d6be02d8") (:revdesc . "8ecf03c0cd91") (:keywords "languages"))])
+ (stumpwm-mode . [(20171027 214) nil "Special lisp mode for evaluating code into running stumpwm" tar ((:url . "https://github.com/stumpwm/stumpwm-contrib") (:commit . "333d210cacc7ebac76e14dfc8c0139f0e399c9a7") (:revdesc . "333d210cacc7") (:keywords "comm" "lisp" "tools"))])
+ (stupid-indent-mode . [(20170525 1117) nil "Plain stupid indentation minor mode" tar ((:commit . "3295e7de5e2cfddc3bf0e462e852bf58972f5d70") (:revdesc . "3295e7de5e2c") (:authors ("Mihai Bazon" . "mihai.bazon@gmail.com")) (:maintainers ("Mihai Bazon" . "mihai.bazon@gmail.com")) (:maintainer "Mihai Bazon" . "mihai.bazon@gmail.com"))])
+ (stylefmt . [(20161025 824) nil "Stylefmt interface" tar ((:url . "https://github.com/KeenS/stylefmt.el") (:commit . "7a38f26bf8ff947215f34f0a064c7ca80575ccbc") (:revdesc . "7a38f26bf8ff") (:keywords "style" "code" "formatter"))])
+ (stylus-mode . [(20211019 2113) nil "Major mode for editing .styl files" tar ((:url . "https://github.com/brianc/jade-mode") (:commit . "1ad7c51f3c6a6ae64550d9510c5e4e8470014375") (:revdesc . "1ad7c51f3c6a") (:keywords "languages"))])
+ (su . [(20240320 1707) ((emacs (26 1))) "Automatically read and write files using su or sudo" tar ((:url . "https://github.com/PythonNut/su.el") (:commit . "e097f31b3bbb8581d045d0e684d3f129f90e8085") (:revdesc . "e097f31b3bbb") (:keywords "convenience" "helm" "fuzzy" "flx") (:authors ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainers ("PythonNut" . "pythonnut@pythonnut.com")) (:maintainer "PythonNut" . "pythonnut@pythonnut.com"))])
+ (subatomic-theme . [(20220128 1615) nil "Low contrast bluish color theme" tar ((:url . "https://github.com/cryon/subatomic") (:commit . "9d0ac6aa5272d0285965a48505eb35658c5472b0") (:revdesc . "9d0ac6aa5272") (:keywords "color-theme" "blue" "low contrast") (:authors ("John Olsson" . "john@cryon.se")) (:maintainers ("John Olsson" . "john@cryon.se")) (:maintainer "John Olsson" . "john@cryon.se"))])
+ (subatomic256-theme . [(20130621 210) nil "Fork of subatomic-theme for terminals" tar ((:url . "https://github.com/cryon/subatomic256") (:commit . "326177d6f99cd2b1d30df695e67ee3bc441cd96f") (:revdesc . "326177d6f99c") (:authors ("John Olsson" . "john@cryon.se")) (:maintainers ("John Olsson" . "john@cryon.se")) (:maintainer "John Olsson" . "john@cryon.se"))])
+ (subemacs . [(20170401 934) nil "Evaluating expressions in a fresh Emacs subprocess" tar ((:url . "https://github.com/kbauer/subemacs") (:commit . "18d53939fec8968c08dfc5aff7240ca07efb1aac") (:revdesc . "18d53939fec8") (:keywords "extensions" "lisp" "multiprocessing") (:authors ("Klaus-Dieter Bauer" . "bauer.klaus.dieter@gmail.com")) (:maintainers ("Klaus-Dieter Bauer" . "bauer.klaus.dieter@gmail.com")) (:maintainer "Klaus-Dieter Bauer" . "bauer.klaus.dieter@gmail.com"))])
+ (sublime-themes . [(20170606 1844) nil "A collection of themes based on Sublime Text" tar ((:url . "https://github.com/owainlewis/emacs-color-themes") (:commit . "60ee40af82eb55b79d5ed4026f1911326311603f") (:revdesc . "60ee40af82eb") (:keywords "faces") (:authors ("Owain Lewis" . "owain@owainlewis.com")) (:maintainers ("Owain Lewis" . "owain@owainlewis.com")) (:maintainer "Owain Lewis" . "owain@owainlewis.com"))])
+ (sublimity . [(20200905 1730) ((emacs (26 1))) "Smooth-scrolling, minimap and distraction-free mode" tar ((:url . "https://github.com/zk-phi/sublimity") (:commit . "8e2ffc4d62194106130014531e7b54fc9b4b9e6c") (:revdesc . "8e2ffc4d6219"))])
+ (subsonic . [(20260126 1705) ((emacs (27 1)) (transient (0 2))) "Browse and play music from subsonic servers with mpv" tar ((:url . "https://git.sr.ht/~amk/subsonic.el") (:commit . "d4f7502783fa06ba624ddc2314082340cea4ec9e") (:revdesc . "d4f7502783fa") (:keywords "multimedia") (:authors ("Alex McGrath" . "amk@amk.ie")) (:maintainers ("Alex McGrath" . "amk@amk.ie")) (:maintainer "Alex McGrath" . "amk@amk.ie"))])
+ (sudo-edit . [(20220801 1317) ((emacs (24)) (cl-lib (0 5))) "Open files as another user" tar ((:url . "https://github.com/nflath/sudo-edit") (:commit . "74eb1e6986461baed9a9269566ff838530b4379b") (:revdesc . "74eb1e698646") (:keywords "convenience") (:authors ("Nathaniel Flath" . "flat0103@gmail.com")) (:maintainers ("Nathaniel Flath" . "flat0103@gmail.com")) (:maintainer "Nathaniel Flath" . "flat0103@gmail.com"))])
+ (sudo-ext . [(20170126 1214) nil "Sudo support" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/sudo-ext.el") (:commit . "9d4580f304121ce7b8104bd4bd3b64e4dfa3c9b3") (:revdesc . "9d4580f30412") (:keywords "unix") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (sudo-utils . [(20210119 1930) ((emacs (25 1))) "Sudo utilities" tar ((:url . "https://github.com/alpha-catharsis/sudo-utils") (:commit . "089f7833fa256f293284a6286bf9cb2b78eff40d") (:revdesc . "089f7833fa25") (:keywords "processes" "unix") (:authors ("Alpha Catharsis" . "alpha.catharsis@gmail.com")) (:maintainers ("Alpha Catharsis" . "alpha.catharsis@gmail.com")) (:maintainer "Alpha Catharsis" . "alpha.catharsis@gmail.com"))])
+ (sudoku . [(20191015 1315) ((emacs (24 4))) "Simple sudoku game, can download puzzles" tar ((:url . "https://github.com/zevlg/sudoku.el") (:commit . "b1924fd244a5fa284de9d67b66fbd69164b37318") (:revdesc . "b1924fd244a5") (:keywords "games") (:authors ("Zajcev Evgeny" . "zevlg@yandex.ru")) (:maintainers ("Zajcev Evgeny" . "zevlg@yandex.ru")) (:maintainer "Zajcev Evgeny" . "zevlg@yandex.ru"))])
+ (suggest . [(20251128 933) ((emacs (24 4)) (loop (1 3)) (dash (2 13 0)) (s (1 11 0)) (f (0 18 2)) (spinner (1 7 3))) "Suggest elisp functions that give the output requested" tar ((:url . "https://github.com/Wilfred/suggest.el") (:commit . "d1395f18519527efc3b43a7b148ebb139017e9ae") (:revdesc . "d1395f185195") (:keywords "convenience") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (suggestion-box . [(20170830 807) ((emacs (25 1)) (popup (0 5 3))) "Show tooltip on the cursor" tar ((:url . "https://github.com/yuutayamada/suggestion-box-el") (:commit . "50af0776c8caf3c79c4d37fd51cbf304ea34b68e") (:revdesc . "50af0776c8ca") (:keywords "convenience") (:authors ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainers ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainer "Yuta Yamada" . "cokesboy\"at\"gmail.com"))])
+ (sumibi . [(20260719 559) ((emacs (29 0)) (popup (0 5 9)) (unicode-escape (1 1)) (deferred (0 5 1)) (markdown-mode (2 0))) "Japanese input method powered by ChatGPT API" tar ((:url . "https://github.com/kiyoka/Sumibi") (:commit . "9b191439bdaa0f6a36ad95429e725d096d564096") (:revdesc . "9b191439bdaa") (:keywords "lisp" "ime" "japanese") (:authors ("Kiyoka Nishiyama" . "kiyoka@sumibi.org")) (:maintainers ("Kiyoka Nishiyama" . "kiyoka@sumibi.org")) (:maintainer "Kiyoka Nishiyama" . "kiyoka@sumibi.org"))])
+ (sunburn-theme . [(20201216 1539) ((emacs (24))) "A low contrast color theme" tar ((:url . "https://github.com/mvarela/Sunburn-Theme") (:commit . "6b5c14c76dcdfdb099102ef7a388b2f0c6f1951d") (:revdesc . "6b5c14c76dcd") (:authors ("Martín Varela" . "(martin@varela.fi)")) (:maintainers ("Martín Varela" . "(martin@varela.fi)")) (:maintainer "Martín Varela" . "(martin@varela.fi)"))])
+ (sunny-day-theme . [(20140413 2125) nil "Emacs24 theme with a light background" tar ((:url . "https://github.com/mswift42/sunny-day-theme") (:commit . "420e0a6eb33fcc9b75c2c9e88ab60a975d782a00") (:revdesc . "420e0a6eb33f"))])
+ (sunshine . [(20200306 1711) ((cl-lib (0 5))) "Provide weather and forecast information" tar ((:url . "https://github.com/aaronbieber/sunshine.el") (:commit . "88256223539edcfe57017778a997a474c9c022f6") (:revdesc . "88256223539e") (:keywords "tools" "weather") (:authors ("Aaron Bieber" . "aaron@aaronbieber.com")) (:maintainers ("Aaron Bieber" . "aaron@aaronbieber.com")) (:maintainer "Aaron Bieber" . "aaron@aaronbieber.com"))])
+ (suomalainen-kalenteri . [(20250103 1003) nil "Finnish national and Christian holidays for calendar" tar ((:url . "https://github.com/tlikonen/suomalainen-kalenteri") (:commit . "4b63a82c3145bfff2dc1f7b45ce2463824462da0") (:revdesc . "4b63a82c3145") (:keywords "calendar" "holidays" "finnish") (:authors ("Teemu Likonen" . "tlikonen@iki.fi")) (:maintainers ("Teemu Likonen" . "tlikonen@iki.fi")) (:maintainer "Teemu Likonen" . "tlikonen@iki.fi"))])
+ (super-save . [(20260318 1214) ((emacs (27 1))) "Auto-save buffers, based on your activity" tar ((:url . "https://github.com/bbatsov/super-save") (:commit . "dae7cfe4bba83904d1567e14cbbd7ed141ab37a1") (:revdesc . "dae7cfe4bba8") (:keywords "convenience") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.com")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.com")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.com"))])
+ (surround . [(20250725 511) ((emacs (24 3))) "Easily add/delete/change parens, quotes, and more" tar ((:url . "https://github.com/mkleehammer/surround") (:commit . "6807bf69be1591a419a009adf8a5071b1cdcc76e") (:revdesc . "6807bf69be15") (:authors ("Michael Kleehammer" . "michael@kleehammer.com")) (:maintainers ("Michael Kleehammer" . "michael@kleehammer.com")) (:maintainer "Michael Kleehammer" . "michael@kleehammer.com"))])
+ (suscolors-theme . [(20190713 1009) nil "Colorful theme, inspired by Gruvbox" tar ((:url . "https://github.com/TheSuspiciousWombat/SusColors-emacs") (:commit . "b4a979ee23e26e255b9a63525b0a28e810fab9ae") (:revdesc . "b4a979ee23e2"))])
+ (sv-kalender-namnsdagar . [(20240620 1416) ((emacs (24 3))) "Swedish name day calendar" tar ((:url . "https://github.com/matsl/sv-kalender-namnsdagar") (:commit . "743aa9eec1364fa4194e11f7f10c29688cdd636b") (:revdesc . "743aa9eec136") (:keywords "calendar" "swedish" "localization") (:authors ("Mats Lidell" . "mats.lidell@lidells.se")) (:maintainers ("Mats Lidell" . "mats.lidell@lidells.se")) (:maintainer "Mats Lidell" . "mats.lidell@lidells.se"))])
+ (svelte-mode . [(20240920 609) ((emacs (26 1))) "Emacs major mode for Svelte" tar ((:url . "https://github.com/leafOfTree/svelte-mode") (:commit . "edfef1e0abbf92e18027f6f34f7b5a6f03c1a28a") (:revdesc . "edfef1e0abbf") (:keywords "wp" "languages") (:authors ("Leaf" . "leafvocation@gmail.com")) (:maintainers ("Leaf" . "leafvocation@gmail.com")) (:maintainer "Leaf" . "leafvocation@gmail.com"))])
+ (svg-mode-line-themes . [(20150425 2006) ((xmlgen (0 4))) "SVG-based themes for mode-line" tar ((:url . "https://github.com/sabof/svg-mode-line-themes") (:commit . "80a0e01839cafbd66899202e7764c33231974259") (:revdesc . "80a0e01839ca"))])
+ (svg-tag-mode . [(20241021 1341) ((emacs (27 1)) (svg-lib (0 2))) "Replace keywords with SVG tags" tar ((:url . "https://github.com/rougier/svg-tag-mode") (:commit . "13e888b8bd9a0664d060149a44a751b2113331b6") (:revdesc . "13e888b8bd9a") (:keywords "convenience") (:authors ("Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr")) (:maintainers ("Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr")) (:maintainer "Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr"))])
+ (svgo . [(20220525 2059) ((emacs (26 2))) "SVG optimization with SVGO" tar ((:url . "https://github.com/hupf/svgo.el/") (:commit . "9b01cc9eb1fdf2731cd2b931a7dfe1f601b70786") (:revdesc . "9b01cc9eb1fd") (:keywords "tools") (:authors ("Mathis Hofer" . "mathis@fsfe.org")) (:maintainers ("Mathis Hofer" . "mathis@fsfe.org")) (:maintainer "Mathis Hofer" . "mathis@fsfe.org"))])
+ (svnwrapper . [(20180414 1843) ((e2ansi (0 1 1))) "Highlighting and paging for shell command `svn'" tar ((:url . "https://github.com/Lindydancer/svnwrapper") (:commit . "de5069f5784e5d9e87a0af0159ba5f28a3716583") (:revdesc . "de5069f5784e") (:keywords "faces"))])
+ (swagg . [(20260419 1333) ((emacs (27 1)) (compat (29 1 4 0)) (request (0 3 3)) (dash (2 19 1)) (yaml (0 5 1)) (s (1 13 1))) "Swagger UI" tar ((:url . "https://github.com/isamert/swagg.el") (:commit . "efc457f6ab95814d806b43f1b83edfa8273f7f0c") (:revdesc . "efc457f6ab95") (:keywords "tools" "convenience") (:authors ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainers ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainer "Isa Mert Gurbuz" . "isamertgurbuz@gmail.com"))])
+ (swagger-to-org . [(20160611 56) ((emacs (24)) (cl-lib (0 5)) (json (1 4))) "Convert a swagger.json file into an org-mode file" tar ((:url . "https://github.com/ahungry/swagger-to-org") (:commit . "181357c71ea24bede263f5706d8781ad65e16877") (:revdesc . "181357c71ea2") (:keywords "ahungry" "emacs" "swagger" "openapi" "orgmode" "org" "export") (:authors ("Matthew Carter" . "m@ahungry.com")) (:maintainers ("Matthew Carter" . "m@ahungry.com")) (:maintainer "Matthew Carter" . "m@ahungry.com"))])
+ (swap-buffers . [(20150506 2139) nil "The quickest way to swap buffers between windows. Based on switch-window package" tar ((:url . "https://github.com/ekazakov/swap-buffers") (:commit . "46ab31359b70d935add6c6e9533443116dc51103") (:revdesc . "46ab31359b70") (:keywords "window" "swap" "buffer" "exchange") (:authors ("Evgeniy Kazakov" . "evgeniy.kazakov@gmail.com")) (:maintainers ("Evgeniy Kazakov" . "evgeniy.kazakov@gmail.com")) (:maintainer "Evgeniy Kazakov" . "evgeniy.kazakov@gmail.com"))])
+ (swap-regions . [(20180915 1346) ((emacs (24 3))) "Swap text in two regions" tar ((:url . "https://github.com/xuchunyang/swap-regions.el") (:commit . "f4fd9880cf690e003fcde88dcf2b46adbbbb03cd") (:revdesc . "f4fd9880cf69") (:keywords "convenience") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (sway . [(20231219 1842) ((emacs (28 1))) "Communication with the Sway window manager" tar ((:url . "https://github.com/thblt/sway.el") (:commit . "84eae5e16a643eb00b0a422ded751cceb17cc8f0") (:revdesc . "84eae5e16a64") (:keywords "frames") (:authors ("Thibault Polge" . "thibault@thb.lt")) (:maintainers ("Thibault Polge" . "thibault@thb.lt")) (:maintainer "Thibault Polge" . "thibault@thb.lt"))])
+ (sway-lang-mode . [(20230320 507) ((emacs (25 1)) (lsp-mode (6 0)) (rust-mode (1 0 5))) "Major mode for sway" tar ((:url . "https://github.com/hhamud/sway-mode") (:commit . "1d4615cc99d57280fb4b301d8339f408d987d317") (:revdesc . "1d4615cc99d5") (:keywords "languages"))])
+ (sweet-theme . [(20200708 1202) ((emacs (24 1))) "Sweet-looking theme" tar ((:url . "https://github.com/2bruh4me/sweet-theme") (:commit . "ccbfdb6a17e25ab18a0b64101675bc1dfef44006") (:revdesc . "ccbfdb6a17e2") (:keywords "faces"))])
+ (sweetgreen . [(20180605 335) ((dash (2 12 1)) (helm (1 5 6)) (request (0 2 0)) (cl-lib (0 5))) "Order Salads from sweetgreen.com" tar ((:url . "https://www.github.com/CestDiego/sweetgreen.el") (:commit . "e933fe466b5ef0e976967e203f88bd7a012469d1") (:revdesc . "e933fe466b5e") (:keywords "salad" "food" "sweetgreen" "request") (:authors ("Diego Berrocal" . "cestdiego@gmail.com")) (:maintainers ("Diego Berrocal" . "cestdiego@gmail.com")) (:maintainer "Diego Berrocal" . "cestdiego@gmail.com"))])
+ (swift-helpful . [(20220707 846) ((emacs (25 1)) (dash (2 12 0)) (lsp-mode (6 0)) (swift-mode (8 0 0))) "Show documentation for Swift programs" tar ((:url . "https://github.com/danielmartin/swift-helpful") (:commit . "b46c580e4b8f55761431ec677866de3fc66592e9") (:revdesc . "b46c580e4b8f") (:keywords "help" "swift") (:authors ("Daniel Martín" . "mardani29@yahoo.es")) (:maintainers ("Daniel Martín" . "mardani29@yahoo.es")) (:maintainer "Daniel Martín" . "mardani29@yahoo.es"))])
+ (swift-mode . [(20260822 1011) ((emacs (25 2))) "Major-mode for Apple's Swift programming language" tar ((:url . "https://github.com/swift-emacs/swift-mode") (:commit . "053336346073e6e2849c19cadd6c6e3e79985c2d") (:revdesc . "053336346073") (:keywords "languages" "swift") (:authors ("taku0" . "mxxouy6x3m_github@tatapa.org") ("Chris Barrett" . "chris.d.barrett@me.com") ("Bozhidar Batsov" . "bozhidar@batsov.com") ("Arthur Evstifeev" . "lod@pisem.net")) (:maintainers ("taku0" . "mxxouy6x3m_github@tatapa.org")) (:maintainer "taku0" . "mxxouy6x3m_github@tatapa.org"))])
+ (swift-ts-mode . [(20250915 759) ((emacs (29 1))) "Major mode for Swift based on tree-sitter" tar ((:url . "https://github.com/rechsteiner/swift-ts-mode") (:commit . "17806f6f56f09c86c5e70af239bea4313aaaf0b8") (:revdesc . "17806f6f56f0") (:keywords "swift" "languages" "tree-sitter"))])
+ (swift3-mode . [(20160918 1250) ((emacs (24 4))) "Major-mode for Apple's Swift programming language" tar ((:url . "https://github.com/taku0/swift3-mode") (:commit . "ea34d46bf9a4293e75ffdac9500d34989316d9e9") (:revdesc . "ea34d46bf9a4") (:keywords "languages" "swift") (:authors ("Chris Barrett" . "chris.d.barrett@me.com") ("Bozhidar Batsov" . "bozhidar@batsov.com") ("Arthur Evstifeev" . "lod@pisem.net")) (:maintainers ("Chris Barrett" . "chris.d.barrett@me.com") ("Bozhidar Batsov" . "bozhidar@batsov.com") ("Arthur Evstifeev" . "lod@pisem.net")) (:maintainer "Chris Barrett" . "chris.d.barrett@me.com"))])
+ (swiper . [(20260101 2125) ((emacs (24 5)) (ivy (0 15 1))) "Isearch with an overview.  Oh, man!" tar ((:url . "https://github.com/abo-abo/swiper") (:commit . "d489b4f0d48fd215119261d92de103c5b5580895") (:revdesc . "d489b4f0d48f") (:keywords "matching") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Basil L. Contovounesios" . "basil@contovou.net")) (:maintainer "Basil L. Contovounesios" . "basil@contovou.net"))])
+ (swiper-helm . [(20180131 1744) ((emacs (24 1)) (swiper (0 1 0)) (helm (1 5 3))) "Helm version of Swiper" tar ((:url . "https://github.com/abo-abo/swiper-helm") (:commit . "93fb6db87bc6a5967898b5fd3286954cc72a0008") (:revdesc . "93fb6db87bc6") (:keywords "matching") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (swiss-holidays . [(20200526 822) nil "Swiss holidays for the calendar" tar ((:url . "https://github.com/egli/swiss-holidays") (:commit . "0995c9685033a09466f5b2dceb7316362bde997a") (:revdesc . "0995c9685033") (:keywords "calendar") (:authors ("Christian Egli" . "christian.egli@alumni.ethz.ch")) (:maintainers ("Christian Egli" . "christian.egli@alumni.ethz.ch")) (:maintainer "Christian Egli" . "christian.egli@alumni.ethz.ch"))])
+ (switch-buffer-functions . [(20200127 409) nil "Hook run when current buffer changed" tar ((:url . "https://github.com/10sr/switch-buffer-functions-el") (:commit . "40cb0c9e2c84b30e1c5c7458a795cda1bd8ad8fa") (:revdesc . "40cb0c9e2c84") (:keywords "hook" "utility") (:authors ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainers ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainer "10sr" . "8slashes+el[at]gmail[dot]com"))])
+ (switch-window . [(20260316 257) ((emacs (24))) "A *visual* way to switch window" tar ((:url . "https://github.com/dimitri/switch-window") (:commit . "1ccbfa53df499cb31d5ebbe21306cdcc6b06c135") (:revdesc . "1ccbfa53df49") (:keywords "convenience") (:authors ("Dimitri Fontaine" . "dim@tapoueh.org") ("Feng Shu" . "tumashu@163.com")) (:maintainers ("Dimitri Fontaine" . "dim@tapoueh.org") ("Feng Shu" . "tumashu@163.com")) (:maintainer "Dimitri Fontaine" . "dim@tapoueh.org"))])
+ (swoop . [(20200618 905) ((emacs (24 3)) (ht (2 0)) (pcre2el (1 5)) (async (1 1))) "Peculiar buffer navigation" tar ((:url . "https://github.com/ShingoFukuyama/emacs-swoop") (:commit . "828ae0f17f3beaea50ee66d06c500f4847ccc7dd") (:revdesc . "828ae0f17f3b") (:keywords "tools" "swoop" "inner" "buffer" "search" "navigation"))])
+ (sws-mode . [(20210908 2121) nil "(S)ignificant (W)hite(S)pace mode" tar ((:url . "https://github.com/brianc/jade-mode") (:commit . "111460b056838854e470a6383041a99f843b93ee") (:revdesc . "111460b05683") (:keywords "languages"))])
+ (sx . [(20240126 2120) ((emacs (24 1)) (cl-lib (0 5)) (json (1 3)) (markdown-mode (2 0)) (let-alist (1 0 3))) "StackExchange client. Ask and answer questions on Stack Overflow, Super User, and the likes" tar ((:url . "https://github.com/vermiculus/sx.el/") (:commit . "8c1c28f33d714fc8869e49f5642e1a585c8c85af") (:revdesc . "8c1c28f33d71") (:keywords "help" "hypermedia" "tools") (:authors ("Sean Allred" . "code@seanallred.com")) (:maintainers ("Sean Allred" . "code@seanallred.com")) (:maintainer "Sean Allred" . "code@seanallred.com"))])
+ (sxiv . [(20220530 14) ((dash (2 16 0)) (emacs (25 1))) "Run the Simple X Image Viewer, with Dired integration" tar ((:url . "https://tildegit.org/contrapunctus/sxiv") (:commit . "47f5b2fbb94c569dc5e71cbe4de9c6eabbbc69e8") (:revdesc . "47f5b2fbb94c") (:keywords "multimedia") (:authors ("contrapunctus" . "xmpp:contrapunctus@jabber.fr")) (:maintainers ("contrapunctus" . "xmpp:contrapunctus@jabber.fr")) (:maintainer "contrapunctus" . "xmpp:contrapunctus@jabber.fr"))])
+ (symbol-navigation-hydra . [(20211010 2353) ((auto-highlight-symbol (1 61)) (hydra (0 15 0)) (emacs (24 4)) (multiple-cursors (1 4 0))) "A symbol-aware, range-aware hydra" tar ((:url . "https://github.com/bgwines/symbol-navigation-hydra") (:commit . "b3b1257e676514d93cd2d71a10a485bf00b5375f") (:revdesc . "b3b1257e6765") (:keywords "highlight" "face" "match" "convenience" "hydra" "symbol") (:authors ("Brett Wines" . "bgwines@cs.stanford.edu")) (:maintainers ("Brett Wines" . "bgwines@cs.stanford.edu")) (:maintainer "Brett Wines" . "bgwines@cs.stanford.edu"))])
+ (symbol-overlay . [(20260703 1437) ((emacs (24 3)) (seq (2 2))) "Highlight symbols with keymap-enabled overlays" tar ((:url . "https://github.com/wolray/symbol-overlay/") (:commit . "85d100b0cca35b70cee1b260e09af8e1fb2fcc08") (:revdesc . "85d100b0cca3") (:keywords "faces" "matching") (:authors ("wolray" . "wolray@foxmail.com")) (:maintainers ("wolray" . "wolray@foxmail.com")) (:maintainer "wolray" . "wolray@foxmail.com"))])
+ (symbol-overlay-mc . [(20241216 1436) ((emacs (28 1)) (multiple-cursors (1 4 0)) (symbol-overlay (4 1))) "Mark highlighted symbols with multiple cursors" tar ((:url . "https://github.com/xenodium/symbol-overlay-mc") (:commit . "188fa07fe5cc142dbabcd2b4a102a9ec5f132839") (:revdesc . "188fa07fe5cc") (:keywords "convenience"))])
+ (symbolist . [(20211107 1615) ((emacs (24 5))) "List and interactively unbind Emacs Lisp symbols" tar ((:url . "https://github.com/lassik/emacs-symbolist") (:commit . "92b712734941a45da7d47fd61b95e4013ff53481") (:revdesc . "92b712734941") (:keywords "lisp" "maint") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (symbols-outline . [(20250728 1231) ((emacs (27 1))) "Display symbols (functions, variables, etc) in outline view" tar ((:url . "https://github.com/liushihao456/symbols-outline.el") (:commit . "ee595d395d6137ce7d31da6bb4d6391ad9f6883c") (:revdesc . "ee595d395d61") (:keywords "outlines"))])
+ (symbolword-mode . [(20180401 1427) ((emacs (24)) (f (0 19 0))) "Modify word split" tar ((:url . "https://github.com/ncaq/symbolword-mode") (:commit . "920e57f4c2b09b28c5a0c8fe9ebdba9961822163") (:revdesc . "920e57f4c2b0") (:authors ("ncaq" . "ncaq@ncaq.net")) (:maintainers ("ncaq" . "ncaq@ncaq.net")) (:maintainer "ncaq" . "ncaq@ncaq.net"))])
+ (symon . [(20260411 1454) nil "Tiny graphical system monitor" tar ((:url . "http://zk-phi.github.io/") (:commit . "294668d63da642276a0003cb4e9d6f8b40a13788") (:revdesc . "294668d63da6"))])
+ (symon-lingr . [(20150719 1342) ((symon (1 1 2)) (cl-lib (0 5))) "A notification-based Lingr client powered by symon.el" tar ((:url . "http://hins11.yu-yake.com/") (:commit . "056d1a473e36992ff5881e5ce6fdc331cead975f") (:revdesc . "056d1a473e36"))])
+ (synaxis . [(20260804 1538) ((emacs (29 1)) (keymap-popup (0 2 1))) "Feed reader with SQLite storage" tar ((:url . "https://git.thanosapollo.org/synaxis") (:commit . "262669b3bfafe9b8695a97a726f32b05e88bf00a") (:revdesc . "262669b3bfaf") (:keywords "news" "hypermedia" "rss" "atom") (:authors ("Thanos Apollo" . "public@thanosapollo.org")) (:maintainers ("Thanos Apollo" . "public@thanosapollo.org")) (:maintainer "Thanos Apollo" . "public@thanosapollo.org"))])
+ (sync-recentf . [(20160326 2001) nil "Synchronize the recent files list between Emacs instances" tar ((:url . "https://github.com/ffevotte/sync-recentf") (:commit . "0052561d5c5b5c2684faedc3eead776aec06c3ed") (:revdesc . "0052561d5c5b") (:keywords "recentf") (:authors ("François Févotte" . "fevotte@gmail.com")) (:maintainers ("François Févotte" . "fevotte@gmail.com")) (:maintainer "François Févotte" . "fevotte@gmail.com"))])
+ (syncthing . [(20250612 206) ((emacs (27 1))) "Client for Syncthing" tar ((:url . "https://github.com/KeyWeeUsr/emacs-syncthing") (:commit . "eac37ecf5458b6d554544b1ddb76e3c6fbe3cb2f") (:revdesc . "eac37ecf5458") (:keywords "convenience" "syncthing" "sync" "client" "view") (:authors ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainers ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainer "Peter Badida" . "keyweeusr@gmail.com"))])
+ (synonymous . [(20180325 1817) ((emacs (24)) (cl-lib (0 5)) (request (0 2 0))) "A thesaurus at your fingertips" tar ((:url . "https://github.com/toroidal-code/synonymous.el") (:commit . "2cb9a674d84fddf3f1b00c9d6b13a853576acb87") (:revdesc . "2cb9a674d84f") (:keywords "utility") (:authors ("Katherine Whitlock" . "toroidalcode@gmail.com") ("authored by Manuel Serrano" . "Manuel.Serrano@inria.fr")) (:maintainers ("Katherine Whitlock" . "toroidalcode@gmail.com") ("authored by Manuel Serrano" . "Manuel.Serrano@inria.fr")) (:maintainer "Katherine Whitlock" . "toroidalcode@gmail.com"))])
+ (synosaurus . [(20250113 2057) ((cl-lib (0 5))) "An Emacs frontend for thesauri" tar ((:url . "https://github.com/hpdeifel/synosaurus") (:commit . "690755ce88a50e65ab0441ce9aabe6341aae3964") (:revdesc . "690755ce88a5") (:keywords "wp") (:authors ("Hans-Peter Deifel" . "hpd@hpdeifel.de")) (:maintainers ("Hans-Peter Deifel" . "hpd@hpdeifel.de")) (:maintainer "Hans-Peter Deifel" . "hpd@hpdeifel.de"))])
+ (synquid . [(20160930 1550) ((flycheck (27)) (emacs (24 3))) "Major mode for editing Synquid files" tar ((:url . "https://github.com/cpitclaudel/synquid-mode") (:commit . "28701ce1a15437202f53ab93a14bcba1de83fd2c") (:revdesc . "28701ce1a154") (:keywords "languages") (:authors ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainers ("Clément Pit-Claudel" . "clement.pitclaudel@live.com")) (:maintainer "Clément Pit-Claudel" . "clement.pitclaudel@live.com"))])
+ (syntactic-close . [(20250530 1921) ((emacs (24)) (cl-lib (0 5))) "Insert closing delimiter" tar ((:url . "https://github.com/emacs-berlin/syntactic-close") (:commit . "2c7d5e1841937e13fd1a2a2cb41ef5b636f497e3") (:revdesc . "2c7d5e184193") (:keywords "languages" "convenience") (:authors ("Andreas Röhler" . "andreas.roehler@online.de") ("Emacs User Group Berlin" . "emacs-berlin@emacs-berlin.org")) (:maintainers ("Andreas Röhler" . "andreas.roehler@online.de") ("Emacs User Group Berlin" . "emacs-berlin@emacs-berlin.org")) (:maintainer "Andreas Röhler" . "andreas.roehler@online.de"))])
+ (syntactic-sugar . [(20140508 2041) nil "Effect-free forms such as if/then/else" tar ((:url . "https://github.com/rolandwalker/syntactic-sugar") (:commit . "b6a49df4b6056e2619eea9ca554c105ae67e115f") (:revdesc . "b6a49df4b605") (:keywords "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (syntax-subword . [(20160205 2154) nil "Make operations on words more fine-grained" tar ((:url . "https://github.com/jpkotta/syntax-subword") (:commit . "9aa9b3f846bfe2474370642458a693ac4760d9fe") (:revdesc . "9aa9b3f846bf") (:authors ("Jonathan Kotta" . "jpkotta@gmail.com")) (:maintainers ("Jonathan Kotta" . "jpkotta@gmail.com")) (:maintainer "Jonathan Kotta" . "jpkotta@gmail.com"))])
+ (syntree . [(20230621 2048) ((emacs (27 1)) (org (9 2))) "Draw plain text constituency trees" tar ((:url . "https://github.com/enricoflor/syntree") (:commit . "7bbbd4904b0ffe452ec39630042dbc85a7a0b233") (:revdesc . "7bbbd4904b0f") (:authors ("Enrico Flor" . "enrico@eflor.net")) (:maintainers ("Enrico Flor" . "enrico@eflor.net")) (:maintainer "Enrico Flor" . "enrico@eflor.net"))])
+ (sysctl . [(20200615 1824) ((emacs (26))) "Manage sysctl though org-mode" tar ((:url . "https://github.com/dantecatalfamo/sysctl.el") (:commit . "d8c2e18de1d7a3b2999a4d5054c0bbf30cb10fed") (:revdesc . "d8c2e18de1d7") (:keywords "sysctl" "tools" "unix"))])
+ (syslog-mode . [(20250905 2333) ((hide-lines (20130623)) (ov (20150311)) (hsluv (20181127))) "Major-mode for viewing log files & strace output" tar ((:url . "https://github.com/vapniks/syslog-mode") (:commit . "f167635feae7365574755a7d61a27079c6b40aef") (:revdesc . "f167635feae7") (:keywords "unix") (:authors ("Harley Gorrell" . "harley@panix.com")) (:maintainers ("Joe Bloggs" . "vapniks@yahoo.com")) (:maintainer "Joe Bloggs" . "vapniks@yahoo.com"))])
+ (sysml-mode . [(20260528 1759) ((emacs (25 1))) "Major mode for SysML v2 (Systems Modeling Language)" tar ((:url . "https://github.com/decisym/sysml-mode") (:commit . "e8ff9eea7f8f5d18e6a74a48411a1b8e39dd0916") (:revdesc . "e8ff9eea7f8f") (:keywords "languages" "modeling" "systems engineering") (:authors ("Ph.D." . "don@decisym.ai")) (:maintainers ("Ph.D." . "don@decisym.ai")) (:maintainer "Ph.D." . "don@decisym.ai"))])
+ (system-idle . [(20260215 1611) ((emacs (29 1))) "Poll the system-wide idle time" tar ((:url . "https://github.com/meedstrom/system-idle") (:commit . "74ae4437f2b151aaada98fd5fa99177b21394b7c") (:revdesc . "74ae4437f2b1") (:keywords "lisp") (:authors ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainers ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainer "Martin Edström" . "meedstrom91@gmail.com"))])
+ (system-specific-settings . [(20140818 1457) nil "Apply settings only on certain systems" tar ((:url . "https://github.com/DarwinAwardWinner/emacs-system-specific-settings") (:commit . "0050d85b2175095aa5ecf580a2fe43c069b0eef3") (:revdesc . "0050d85b2175") (:keywords "configuration"))])
+ (systemd . [(20230201 302) ((emacs (24 4))) "Major mode for editing systemd units" tar ((:url . "https://github.com/holomorph/systemd-mode") (:commit . "8742607120fbc440821acbc351fda1e8e68a8806") (:revdesc . "8742607120fb") (:keywords "tools" "unix") (:authors ("Mark Oteiza" . "mvoteiza@udel.edu")) (:maintainers ("Mark Oteiza" . "mvoteiza@udel.edu")) (:maintainer "Mark Oteiza" . "mvoteiza@udel.edu"))])
+ (systemtap-mode . [(20151122 1940) nil "A mode for SystemTap" tar ((:url . "https://github.com/ruediger/systemtap-mode") (:commit . "8b5086d6b0050a12bb37e33c24c24d1f420afd3b") (:revdesc . "8b5086d6b005") (:keywords "tools" "languages") (:maintainers (nil . "ruediger@c-plusplus.de")) (:maintainer nil . "ruediger@c-plusplus.de"))])
+ (ta . [(20160619 1645) ((emacs (24 3)) (cl-lib (0 5))) "A tool to deal with Chinese homophonic characters" tar ((:url . "https://github.com/kuanyui/ta.el") (:commit . "668ad41e71f374f8c32c8d0532f3d8485b355d35") (:revdesc . "668ad41e71f3") (:keywords "tools") (:authors ("kuanyui" . "azazabc123@gmail.com")) (:maintainers ("kuanyui" . "azazabc123@gmail.com")) (:maintainer "kuanyui" . "azazabc123@gmail.com"))])
+ (tab-bar-buffers . [(20260511 1927) ((emacs (28 1))) "Use tab-bar-mode as a buffer manager" tar ((:url . "https://github.com/ajrosen/tab-bar-buffers") (:commit . "12f52b896eedd7a871df4ef985430b53bcd6c08b") (:revdesc . "12f52b896eed") (:keywords "convenience" "frames") (:authors ("Andy Rosen" . "ajr@corp.mlfs.org")) (:maintainers ("Andy Rosen" . "ajr@corp.mlfs.org")) (:maintainer "Andy Rosen" . "ajr@corp.mlfs.org"))])
+ (tab-bar-echo-area . [(20240809 1442) ((emacs (27 1))) "Display tab names of the tab bar in the echo area" tar ((:url . "https://github.com/fritzgrabo/tab-bar-echo-area") (:commit . "9ccff3b93385796bec1cd435674807c3907436dd") (:revdesc . "9ccff3b93385") (:keywords "convenience") (:authors ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainers ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainer "Fritz Grabo" . "hello@fritzgrabo.com"))])
+ (tab-bar-groups . [(20211013 2012) ((emacs (27 1)) (s (1 12 0))) "Tab groups for the tab bar" tar ((:url . "https://github.com/fritzgrabo/tab-bar-groups") (:commit . "a0389d87d2e793055dd74ae85b4593aa1d2720fd") (:revdesc . "a0389d87d2e7") (:keywords "convenience") (:authors ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainers ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainer "Fritz Grabo" . "hello@fritzgrabo.com"))])
+ (tab-bar-lost-commands . [(20211013 1945) ((emacs (27 1))) "The \"lost commands\" of the tab bar" tar ((:url . "https://github.com/fritzgrabo/tab-bar-lost-commands") (:commit . "989e03dc3d1057264b21b9a5d241fcba86cd297a") (:revdesc . "989e03dc3d10") (:keywords "convenience") (:authors ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainers ("Fritz Grabo" . "hello@fritzgrabo.com")) (:maintainer "Fritz Grabo" . "hello@fritzgrabo.com"))])
+ (tab-bar-notch . [(20241224 109) ((emacs (27 1))) "Adjust tab-bar height for MacBook Pro notch" tar ((:url . "https://github.com/jimeh/tab-bar-notch") (:commit . "49a0f4948bc3dc51ae36b026dec89698b26c0cb2") (:revdesc . "49a0f4948bc3") (:keywords "convenience" "hardware") (:authors ("Jim Myhrberg" . "contact@jimeh.me")) (:maintainers ("Jim Myhrberg" . "contact@jimeh.me")) (:maintainer "Jim Myhrberg" . "contact@jimeh.me"))])
+ (tab-group . [(20140306 1450) nil "Grouped tabs and their tabbar" tar ((:url . "https://github.com/tarao/tab-group-el") (:commit . "5a290ec2608e4100fb188fd60ecb77affcc3465b") (:revdesc . "5a290ec2608e") (:keywords "convenience" "tabs") (:authors ("INA Lintaro" . "tarao.gnnatgmail.com")) (:maintainers ("INA Lintaro" . "tarao.gnnatgmail.com")) (:maintainer "INA Lintaro" . "tarao.gnnatgmail.com"))])
+ (tab-jump-out . [(20251215 247) ((emacs (24 4))) "Use tab to jump out of delimiter pairs" tar ((:url . "https://github.com/mkleehammer/tab-jump-out") (:commit . "6287177b67cec1dc5c938841ce8f97c86f48ef5e") (:revdesc . "6287177b67ce") (:keywords "convenience") (:authors ("Zhang Kai Yu" . "yeannylam@gmail.com")) (:maintainers ("Michael Kleehammer" . "michael@kleehammer.com")) (:maintainer "Michael Kleehammer" . "michael@kleehammer.com"))])
+ (tab-line-nerd-icons . [(20250208 1059) ((emacs (28 1)) (nerd-icons (0 1))) "Add icons to tab-line tabs" tar ((:url . "https://github.com/lucius-martius/tab-line-nerd-icons") (:commit . "902a7bef60c64b58da9c6af028a0cb89f70b7684") (:revdesc . "902a7bef60c6") (:keywords "lisp") (:authors ("Lucius Martius" . "lucius-martius@dorsai.eu")) (:maintainers ("Lucius Martius" . "lucius-martius@dorsai.eu")) (:maintainer "Lucius Martius" . "lucius-martius@dorsai.eu"))])
+ (tabbar . [(20180726 1735) nil "Display a tab bar in the header line" tar ((:url . "https://github.com/dholm/tabbar") (:commit . "82bbda31cbe8ef367dd6501c3aa14b7f2c835910") (:revdesc . "82bbda31cbe8") (:keywords "convenience") (:authors ("David Ponce" . "david@dponce.com")) (:maintainers ("David Ponce" . "david@dponce.com")) (:maintainer "David Ponce" . "david@dponce.com"))])
+ (tabbar-ruler . [(20260426 1441) ((tabbar (2 0 1)) (powerline (2 3)) (mode-icons (0 4 0)) (cl-lib (0 5))) "Pretty tabbar, autohide, use both tabbar/ruler" tar ((:url . "https://github.com/mlf176f2/tabbar-ruler.el") (:commit . "306fc4f8e450704c68fca23791cfa50f2f9f99db") (:revdesc . "306fc4f8e450") (:keywords "tabbar" "ruler mode" "menu" "tool bar."))])
+ (tabby-mode . [(20240107 2124) ((emacs (25 1))) "Minor mode for the Tabby AI coding assistant" tar ((:url . "https://github.com/ragnard/tabby-mode") (:commit . "b656727247c5fc78690827fecf232edc1945a331") (:revdesc . "b656727247c5") (:keywords "tools" "convenience") (:authors ("Ragnar Dahlén" . "r.dahlen@gmail.com")) (:maintainers ("Ragnar Dahlén" . "r.dahlen@gmail.com")) (:maintainer "Ragnar Dahlén" . "r.dahlen@gmail.com"))])
+ (tabbymacs . [(20260126 1157) ((emacs (28 1))) "Inline AI code completions via Tabby LSP" tar ((:url . "https://github.com/Bastillan/tabbymacs") (:commit . "32b8c40774515c940a02c78874cf928b356478de") (:revdesc . "32b8c4077451") (:keywords "tools" "languages" "inline completions" "tabby" "llm") (:authors ("Jędrzej Kędzierski" . "kedzierski.jedrzej@gmail.com")) (:maintainers ("Jędrzej Kędzierski" . "kedzierski.jedrzej@gmail.com")) (:maintainer "Jędrzej Kędzierski" . "kedzierski.jedrzej@gmail.com"))])
+ (tabgo . [(20260624 1540) ((emacs (27 1))) "Jump to tabs, avy style" tar ((:url . "https://github.com/isamert/tabgo.el") (:commit . "7cf1142c3e194ded79632846830775b42830ce51") (:revdesc . "7cf1142c3e19") (:authors ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainers ("Isa Mert Gurbuz" . "isamertgurbuz@gmail.com")) (:maintainer "Isa Mert Gurbuz" . "isamertgurbuz@gmail.com"))])
+ (tablist . [(20260623 1855) ((emacs (25 1))) "Extended tabulated-list-mode" tar ((:url . "https://github.com/emacsorphanage/tablist") (:commit . "01f065e387ffe6b7a41f180f257cd12551c7a9c2") (:revdesc . "01f065e387ff") (:keywords "extensions" "lisp") (:authors ("Andreas Politz" . "politza@fh-trier.de")) (:maintainers ("Andreas Politz" . "politza@fh-trier.de")) (:maintainer "Andreas Politz" . "politza@fh-trier.de"))])
+ (tabnine . [(20250102 1608) ((emacs (27 1)) (dash (2 16 0)) (s (1 12 0)) (editorconfig (0 9 1)) (language-id (0 5 1)) (transient (0 4 0))) "An unofficial TabNine package with TabNine Chat supported" tar ((:url . "https://github.com/shuxiao9058/tabnine/") (:commit . "7c103aa9e1dd46e8507d341fee42ce30417e69f5") (:revdesc . "7c103aa9e1dd") (:keywords "convenience") (:authors ("Aaron Ji" . "shuxiao9058@gmail.com") ("Tommy Xiang" . "tommyx058@gmail.com") ("John Gong" . "gjtzone@hotmail.com")) (:maintainers ("Aaron Ji" . "shuxiao9058@gmail.com") ("Tommy Xiang" . "tommyx058@gmail.com") ("John Gong" . "gjtzone@hotmail.com")) (:maintainer "Aaron Ji" . "shuxiao9058@gmail.com"))])
+ (tabspaces . [(20260804 2140) ((emacs (27 1)) (project (0 8 1))) "Leverage tab-bar and project for buffer-isolated workspaces" tar ((:url . "https://codeberg.org/mclear-tools/tabspaces") (:commit . "12178ee68b42fabf975e23c6bb1fda6fd318ee07") (:revdesc . "12178ee68b42") (:keywords "convenience" "frames") (:authors ("Colin McLear" . "mclear@fastmail.com")))])
+ (tabula-rasa . [(20141216 547) ((emacs (24 4))) "Distraction free writing mode" tar ((:url . "https://github.com/idomagal/Tabula-Rasa/blob/master/tabula-rasa.el") (:commit . "e85fff9de18dc31bc6a7aca726e34a95cc5459f5") (:revdesc . "e85fff9de18d") (:keywords "distraction free" "writing") (:authors ("Ido Magal" . "misc@satans.church")) (:maintainers ("Ido Magal" . "misc@satans.church")) (:maintainer "Ido Magal" . "misc@satans.church"))])
+ (tagedit . [(20161121 855) ((s (1 3 1)) (dash (1 0 3))) "Some paredit-like features for html-mode" tar ((:url . "https://github.com/magnars/tagedit") (:commit . "b3a70101a0dcf85498c92b7fcfa7fdbac869746c") (:revdesc . "b3a70101a0dc") (:keywords "convenience") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (take-off . [(20140531 917) ((emacs (24 3)) (web-server (0 1 0))) "Emacs remote web access" tar ((:url . "https://github.com/tburette/take-off") (:commit . "aa9ea45566fc74febbb6ee9c409ecc4b59246215") (:revdesc . "aa9ea45566fc") (:authors ("Thomas Burette" . "burettethomas@gmail.com")) (:maintainers ("Thomas Burette" . "burettethomas@gmail.com")) (:maintainer "Thomas Burette" . "burettethomas@gmail.com"))])
+ (talonscript-mode . [(20231015 2358) ((emacs (24 3))) "Major mode for Talon Voice's .talon files" tar ((:url . "https://github.com/jcaw/talonscript-mode") (:commit . "b5e78b7866c9dee5f8bc5ce3924e1916c46e2b9b") (:revdesc . "b5e78b7866c9") (:keywords "languages") (:authors ("Jcaw" . "toastedjcaw@gmail.com")) (:maintainers ("Jcaw" . "toastedjcaw@gmail.com")) (:maintainer "Jcaw" . "toastedjcaw@gmail.com"))])
+ (tango-2-theme . [(20120312 2025) nil "Tango 2 color theme for GNU Emacs 24" tar ((:commit . "64e44c98e41ebbe3b827d54280e3b9615787daaa") (:revdesc . "64e44c98e41e"))])
+ (tango-plus-theme . [(20260615 1520) nil "A color theme based on the tango palette" tar ((:url . "https://github.com/tmalsburg/tango-plus-theme") (:commit . "e9be23b05e39591e0740c1a837a9f093a0e14419") (:revdesc . "e9be23b05e39") (:authors ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainers ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainer "Titus von der Malsburg" . "malsburg@posteo.de"))])
+ (tangonov-theme . [(20250416 340) ((emacs (27 1))) "A 256 color dark theme featuring bright pastels" tar ((:url . "https://codeberg.org/trevdev/tangonov-theme") (:commit . "cb62069f84c5a475b466e2cc1c252f655c673259") (:revdesc . "cb62069f84c5") (:keywords "faces" "theme" "dark" "fringe") (:authors ("Trevor Richards" . "trev@trevdev.ca")) (:maintainers ("Trevor Richards" . "trev@trevdev.ca")) (:maintainer "Trevor Richards" . "trev@trevdev.ca"))])
+ (tangotango-theme . [(20241117 1143) nil "Tango Palette color theme for Emacs 24" tar ((:url . "https://github.com/juba/color-theme-tangotango") (:commit . "897c1643bd2cfd3c0b265a5f7599d1d04de0c304") (:revdesc . "897c1643bd2c") (:keywords "tango" "palette" "color" "theme" "emacs") (:authors ("Julien Barnier" . "julien@nozav.org")) (:maintainers ("Julien Barnier" . "julien@nozav.org")) (:maintainer "Julien Barnier" . "julien@nozav.org"))])
+ (tao-theme . [(20250717 347) nil "This package provides two parametrized uncoloured color themes for Emacs: tao-yin and tao-yang" tar ((:url . "https://github.com/11111000000/tao-theme-emacs") (:commit . "33c0d44048afe444e7a8aee30fbc101a00453799") (:revdesc . "33c0d44048af") (:authors ("Peter Kosov" . "11111000000@email.com")) (:maintainers ("Peter Kosov" . "11111000000@email.com")) (:maintainer "Peter Kosov" . "11111000000@email.com"))])
+ (tardis-theme . [(20260401 2230) ((emacs (25 1))) "Quantum Country Theme" tar ((:url . "https://github.com/antonhibl/tardis-theme") (:commit . "15deab6b9234eb5e44ac8ecce0d307effa19c970") (:revdesc . "15deab6b9234") (:keywords "convenience") (:authors ("Anton Hibl" . "antonhibl11@gmail.com")) (:maintainers ("Anton Hibl" . "antonhibl11@gmail.com")) (:maintainer "Anton Hibl" . "antonhibl11@gmail.com"))])
+ (taskjuggler-mode . [(20260506 137) ((emacs (27 1))) "Major mode for TaskJuggler project files" tar ((:url . "https://github.com/devrintalen/taskjuggler-mode.el") (:commit . "e68d9e6d50c848b1a20b75af3ac1ddda95c9fe3e") (:revdesc . "e68d9e6d50c8") (:keywords "languages" "project-management") (:authors ("Devrin Talen" . "devrin@fastmail.com")) (:maintainers ("Devrin Talen" . "devrin@fastmail.com")) (:maintainer "Devrin Talen" . "devrin@fastmail.com"))])
+ (taskpaper-mode . [(20260715 1341) ((emacs (25 1))) "Major mode for TaskPaper files" tar ((:url . "https://github.com/saf-dmitry/taskpaper-mode") (:commit . "0f8747a8736a6e1bff6cc401144799bdef0e69ed") (:revdesc . "0f8747a8736a") (:keywords "outlines" "notetaking" "task management" "productivity" "taskpaper") (:authors ("Dmitry Safronov" . "saf.dmitry@gmail.com")) (:maintainers ("Dmitry Safronov" . "saf.dmitry@gmail.com")) (:maintainer "Dmitry Safronov" . "saf.dmitry@gmail.com"))])
+ (taskrunner . [(20190916 1608) ((emacs (25 1)) (projectile (2 0 0)) (async (1 9 3))) "Retrieve build system/taskrunner tasks" tar ((:url . "https://github.com/emacs-taskrunner/emacs-taskrunner") (:commit . "716323aff410b4d864d137c9ebe4bbb5b8587f5e") (:revdesc . "716323aff410") (:keywords "build-system" "taskrunner" "build" "task-runner" "tasks" "convenience") (:authors ("Yavor Konstantinov" . "ykonstantinov1ATgmailDOTcom")) (:maintainers ("Yavor Konstantinov" . "ykonstantinov1ATgmailDOTcom")) (:maintainer "Yavor Konstantinov" . "ykonstantinov1ATgmailDOTcom"))])
+ (tawny-mode . [(20260508 848) ((cider (0 12)) (emacs (25))) "Ontology Editing with Tawny-OWL" tar ((:url . "https://github.com/phillord/tawny-owl") (:commit . "5366ed3d12e7272e7a404040d7199b0a560f25a8") (:revdesc . "5366ed3d12e7") (:authors ("Phillip Lord" . "phillip.lord@newcastle.ac.uk")) (:maintainers ("Phillip Lord" . "phillip.lord@newcastle.ac.uk")) (:maintainer "Phillip Lord" . "phillip.lord@newcastle.ac.uk"))])
+ (tbindent . [(20251201 2003) ((emacs (24 3))) "Edit space-indented file in tab-indented buffer" tar ((:url . "https://github.com/pierre-rouleau/tab-based-indent") (:commit . "473e3bd7e13f7d5868688e3dc274b96e705c279f") (:revdesc . "473e3bd7e13f") (:keywords "convenience" "languages") (:authors ("Pierre Rouleau" . "prouleau001@gmail.com")) (:maintainers ("Pierre Rouleau" . "prouleau001@gmail.com")) (:maintainer "Pierre Rouleau" . "prouleau001@gmail.com"))])
+ (tblui . [(20231201 1100) ((dash (2 12 1)) (magit-popup (2 6 0)) (tablist (0 70)) (cl-lib (0 5))) "Define tabulated list UI easily" tar ((:url . "https://github.com/Yuki-Inoue/tblui.el") (:commit . "62ab5f62982c061a902fd3e54d94a68a4706572c") (:revdesc . "62ab5f62982c") (:authors ("Yuki Inoue" . "inouetakahiroki_at_gmail.com")) (:maintainers ("Yuki Inoue" . "inouetakahiroki_at_gmail.com")) (:maintainer "Yuki Inoue" . "inouetakahiroki_at_gmail.com"))])
+ (tbx2org . [(20140224 1559) ((dash (2 5 0)) (s (1 8 0)) (cl-lib (0 4))) "Tinderbox to org-mode conversion" tar ((:url . "https://github.com/istib/tbx2org") (:commit . "08e9816ba6066f56936050b58d07ceb2187ae6f7") (:revdesc . "08e9816ba606") (:keywords "org-mode"))])
+ (tc . [(20260112 1340) nil "A Japanese input method with T-Code on Emacs" tar ((:url . "https://github.com/kanchoku/tc") (:commit . "5d84e847cf34545a88dc2e1555dac3aef771b21f") (:revdesc . "5d84e847cf34") (:authors ("Kaoru Maeda" . "maeda@src.ricoh.co.jp") ("Yasushi Saito" . "yasushi@cs.washington.edu") ("KITAJIMA Akira" . "kitajima@isc.osakac.ac.jp")))])
+ (tco . [(20191129 2040) ((dash (1 2 0)) (emacs (24 3))) "Tail-call optimisation for Emacs lisp" tar ((:url . "https://github.com/Wilfred/tco.el") (:commit . "d82478d56568f60b3a82fd010b3ca0bab2ef5dc9") (:revdesc . "d82478d56568") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (tea-time . [(20120331 820) nil "Simple timer package, useful to make perfect tea" tar ((:url . "https://github.com/konzeptual/tea-time") (:commit . "1f6cf0bdd27c5eb3508989c5095427781f858eca") (:revdesc . "1f6cf0bdd27c") (:keywords "timer" "tea-time") (:authors ("konsty" . "antipin.konstantin@googlemail.com")) (:maintainers ("Gabriel Saldana" . "gsaldana@gmail.com")) (:maintainer "Gabriel Saldana" . "gsaldana@gmail.com"))])
+ (teacode-expand . [(20181231 640) ((emacs (24 4))) "Expansion of text by TeaCode program" tar ((:url . "https://github.com/raguay/TeaCode-Expand") (:commit . "7df6f9ec95da1fb47bbae489bb3f2c27ed3a9b3a") (:revdesc . "7df6f9ec95da") (:keywords "lisp") (:authors ("Richard Guay" . "raguay@customct.com")) (:maintainers ("Richard Guay" . "raguay@customct.com")) (:maintainer "Richard Guay" . "raguay@customct.com"))])
+ (teco . [(20200707 2309) nil "Teco interpreter" tar ((:url . "https://github.com/mtk/teco.git") (:commit . "2529eb0f7f35c526c1b6fca5250399718ff5138a") (:revdesc . "2529eb0f7f35") (:keywords "convenience" "emulations" "files") (:authors ("Dale R. Worley" . "worley@alum.mit.edu")) (:maintainers ("Mark T. Kennedy" . "mtk@acm.org")) (:maintainer "Mark T. Kennedy" . "mtk@acm.org"))])
+ (telega . [(20260817 621) ((emacs (27 1)) (visual-fill-column (1 9)) (transient (0 9 0))) "Telegram client (unofficial)" tar ((:url . "https://github.com/zevlg/telega.el") (:commit . "79c173562d3bd14e00e9d05d28bfe6d8dc2a9736") (:revdesc . "79c173562d3b") (:keywords "comm") (:authors ("Zajcev Evgeny" . "zevlg@yandex.ru")) (:maintainers ("Zajcev Evgeny" . "zevlg@yandex.ru")) (:maintainer "Zajcev Evgeny" . "zevlg@yandex.ru"))])
+ (telepathy . [(20131209 1258) nil "Access Telepathy from Emacs" tar ((:url . "https://github.com/NicolasPetton/telepathy.el") (:commit . "211d785b02a29ddc254422fdcc3db45262582f8c") (:revdesc . "211d785b02a2") (:keywords "telepathy" "tools") (:authors ("Nicolas Petton" . "petton.nicolas@gmail.com")) (:maintainers ("Nicolas Petton" . "petton.nicolas@gmail.com")) (:maintainer "Nicolas Petton" . "petton.nicolas@gmail.com"))])
+ (telephone-line . [(20240109 2021) ((emacs (24 4)) (cl-lib (0 5)) (cl-generic (0 2)) (seq (1 8))) "Rewrite of Powerline" tar ((:url . "https://github.com/dbordak/telephone-line") (:commit . "6016418a5e1e8e006cc202eff50ff28b594eeca4") (:revdesc . "6016418a5e1e") (:keywords "mode-line") (:authors ("Daniel Bordak" . "dbordak@fastmail.fm")) (:maintainers ("Daniel Bordak" . "dbordak@fastmail.fm")) (:maintainer "Daniel Bordak" . "dbordak@fastmail.fm"))])
+ (teleport . [(20251118 1056) ((emacs (28 1)) (dash (2 18 0))) "Integration for tsh (goteleport.com)" tar ((:url . "https://github.com/caramelhooves/teleport.el") (:commit . "0ff615c4b2f19019c9438075c75e0f94b4cec53c") (:revdesc . "0ff615c4b2f1") (:keywords "tools") (:authors ("Caramel Hooves" . "caramel.hooves@protonmail.com")) (:maintainers ("Caramel Hooves" . "caramel.hooves@protonmail.com")) (:maintainer "Caramel Hooves" . "caramel.hooves@protonmail.com"))])
+ (teletext . [(20231215 1524) ((emacs (24 3))) "Teletext broadcast viewer" tar ((:url . "https://github.com/lassik/emacs-teletext") (:commit . "d59ae5f9b79007646815a38f31882a114ca8aee0") (:revdesc . "d59ae5f9b790") (:keywords "comm" "help" "hypermedia") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (teletext-yle . [(20231215 1609) ((emacs (24 3)) (teletext (0 1))) "Teletext provider for Finnish national network YLE" tar ((:url . "https://github.com/lassik/emacs-teletext-yle") (:commit . "59a287c26571db07e191ac86cdf0be312fec1964") (:revdesc . "59a287c26571") (:keywords "comm" "help" "hypermedia") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (tempel . [(20260705 1258) ((emacs (29 1)) (compat (31))) "Tempo templates/snippets with in-buffer field editing" tar ((:url . "https://github.com/minad/tempel") (:commit . "c5fdc3806b486d9d86a54c50efac3d4a141e789d") (:revdesc . "c5fdc3806b48") (:keywords "abbrev" "languages" "tools" "text") (:authors ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (tempel-collection . [(20260516 1317) ((tempel (0 5)) (emacs (29 1))) "Collection of templates for Tempel" tar ((:url . "https://github.com/Crandel/tempel-collection") (:commit . "4ea6f92ecb69dc38c666bfa6c4a253ff94699c80") (:revdesc . "4ea6f92ecb69") (:keywords "tools") (:authors ("Vitalii Drevenchuk" . "cradlemann@gmail.com") ("Max Penet" . "mpenetr@s-exp.com") ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Vitalii Drevenchuk" . "cradlemann@gmail.com") ("Max Penet" . "mpenetr@s-exp.com") ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Vitalii Drevenchuk" . "cradlemann@gmail.com"))])
+ (templ-ts-mode . [(20250223 2347) ((emacs (29 1))) "Major mode for editing Templ files" tar ((:url . "https://github.com/danderson/templ-ts-mode") (:commit . "ddf13c1a08ed3d05d9701b1a2e8bb4b9febad57b") (:revdesc . "ddf13c1a08ed") (:keywords "languages") (:authors ("David Anderson" . "dave@natulte.net")) (:maintainers ("David Anderson" . "dave@natulte.net")) (:maintainer "David Anderson" . "dave@natulte.net"))])
+ (template-dumper . [(20260723 1912) ((emacs (28 1)) (yasnippet (0 14 0)) (f (0 20 0)) (templatel (20210902 228))) "Create files from yasnippet templates" tar ((:url . "https://resultsmotivated.com/") (:commit . "a60b7f840ffc1f2908e06baeff794f4026a0ca45") (:revdesc . "a60b7f840ffc") (:keywords "yasnippet" "templating" "convenience" "tools"))])
+ (template-literals-ts-mode . [(20260218 1632) ((emacs (30 1))) "Tree-sitter support for HTML/CSS in JS/TS template literals" tar ((:url . "https://github.com/ispringle/template-literals-ts-mode") (:commit . "cb5d55b4d962efff42d067463bee8cfc0a61a318") (:revdesc . "cb5d55b4d962") (:keywords "languages" "javascript" "typescript" "tree-sitter") (:authors ("Ian S. Pringle" . "ian@dapringles.org")) (:maintainers ("Ian S. Pringle" . "ian@dapringles.org")) (:maintainer "Ian S. Pringle" . "ian@dapringles.org"))])
+ (template-overlays . [(20180706 1132) ((emacs (24 4)) (ov (1 0 6))) "Display template regions using overlays" tar ((:url . "http://www.github.com/mmontone/template-overlays") (:commit . "3cbc9a4882dcbbddf9b168883d119a6af0848784") (:revdesc . "3cbc9a4882dc") (:keywords "faces" "convenience" "templates" "overlays") (:authors ("Mariano Montone" . "marianomontone@gmail.com")) (:maintainers ("Mariano Montone" . "marianomontone@gmail.com")) (:maintainer "Mariano Montone" . "marianomontone@gmail.com"))])
+ (templatel . [(20210902 228) ((emacs (25 1))) "Templating language;" tar ((:url . "https://clarete.li/templatel") (:commit . "e1ccb88cdc4b482b078276960f810b82ba3b7847") (:revdesc . "e1ccb88cdc4b") (:authors ("Lincoln Clarete" . "lincoln@clarete.li")) (:maintainers ("Lincoln Clarete" . "lincoln@clarete.li")) (:maintainer "Lincoln Clarete" . "lincoln@clarete.li"))])
+ (temporary-persistent . [(20230115 1425) ((emacs (24 3)) (names (20151201 0)) (dash (2 12 1)) (s (1 10 0))) "Keep temp notes buffers persistent" tar ((:url . "https://github.com/kostafey/temporary-persistent") (:commit . "edbde738769e79ac212ae84ae7898ffd5f19e0f1") (:revdesc . "edbde738769e") (:keywords "temp" "buffers" "notes") (:authors ("Kostafey" . "kostafey@gmail.com")) (:maintainers ("Kostafey" . "kostafey@gmail.com")) (:maintainer "Kostafey" . "kostafey@gmail.com"))])
+ (ten-hundred-mode . [(20161028 2236) ((cl-lib (0 5))) "Use only the ten hundred most usual words" tar ((:url . "https://github.com/aaron-em/ten-hundred-mode.el") (:commit . "bdcfda49b1819e82d61fe90947e50bb948cf7933") (:revdesc . "bdcfda49b181"))])
+ (tengo-mode . [(20260125 1430) ((emacs (24 4))) "Major mode for the Tengo programming language" tar ((:url . "https://github.com/CsBigDataHub/tengo-mode") (:commit . "faafdf361abd19024d02e3890684ab61e6637dc8") (:revdesc . "faafdf361abd") (:keywords "languages" "tengo") (:authors ("Chetan Koneru" . "hadoopchetan@gmail.com")) (:maintainers ("Chetan Koneru" . "hadoopchetan@gmail.com")) (:maintainer "Chetan Koneru" . "hadoopchetan@gmail.com"))])
+ (term+ . [(20170509 17) ((emacs (24)) (cl-lib (0 5))) "Term-mode enhancement" tar ((:url . "https://github.com/tarao/term-plus-el") (:commit . "c3c9239b339c127231860de43abfa08c44c0201a") (:revdesc . "c3c9239b339c") (:keywords "terminal" "emulation") (:authors ("INA Lintaro" . "tarao.gnnatgmail.com")) (:maintainers ("INA Lintaro" . "tarao.gnnatgmail.com")) (:maintainer "INA Lintaro" . "tarao.gnnatgmail.com"))])
+ (term+key-intercept . [(20140211 750) ((term+ (0 1)) (key-intercept (0 1))) "Term+ intercept key mapping" tar ((:url . "https://github.com/tarao/term+-el") (:commit . "fd0771fd66b8c7a909aaac972194485c79ba48c4") (:revdesc . "fd0771fd66b8") (:keywords "terminal" "emulation") (:authors ("INA Lintaro" . "tarao.gnnatgmail.com")) (:maintainers ("INA Lintaro" . "tarao.gnnatgmail.com")) (:maintainer "INA Lintaro" . "tarao.gnnatgmail.com"))])
+ (term+mux . [(20140211 749) ((term+ (0 1)) (tab-group (0 1))) "Term+ terminal multiplexer and session management" tar ((:url . "https://github.com/tarao/term+-el") (:commit . "81b60e80cf008472bfd7fad9233af2ef722c208a") (:revdesc . "81b60e80cf00") (:keywords "terminal" "emulation") (:authors ("INA Lintaro" . "tarao.gnnatgmail.com")) (:maintainers ("INA Lintaro" . "tarao.gnnatgmail.com")) (:maintainer "INA Lintaro" . "tarao.gnnatgmail.com"))])
+ (term-alert . [(20260117 1413) ((emacs (24 0)) (term-cmd (1 1)) (alert (1 1)) (f (0 18 2))) "Notifications when commands complete in term.el and eat" tar ((:url . "https://github.com/calliecameron/term-alert") (:commit . "093afcb21c79dc5c3ada1e7bed92325dd4dde701") (:revdesc . "093afcb21c79") (:keywords "notifications" "processes") (:authors ("Callie Cameron" . "cjcameron7@gmail.com")) (:maintainers ("Callie Cameron" . "cjcameron7@gmail.com")) (:maintainer "Callie Cameron" . "cjcameron7@gmail.com"))])
+ (term-cmd . [(20260510 1834) ((emacs (27 2)) (dash (2 12 0)) (f (0 18 2))) "Send commands from programs running in term.el" tar ((:url . "https://github.com/calliecameron/term-cmd") (:commit . "15f737427b21adc722a76a71c0aaeb2dcb95efbc") (:revdesc . "15f737427b21") (:keywords "processes") (:authors ("Callie Cameron" . "callie@calliecameron.com")) (:maintainers ("Callie Cameron" . "callie@calliecameron.com")) (:maintainer "Callie Cameron" . "callie@calliecameron.com"))])
+ (term-manager . [(20260220 840) ((dash (2 12 0)) (emacs (24 4))) "Contextual terminal management" tar ((:url . "https://www.github.com/IvanMalison/term-manager") (:commit . "1581a90ff9b359449e056da55259b9f42e749f0c") (:revdesc . "1581a90ff9b3") (:keywords "terminals" "tools") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (term-project . [(20240602 2356) ((emacs (28 1)) (term-manager (0 1 0))) "Terminal management for project.el" tar ((:url . "https://www.github.com/IvanMalison/term-manager") (:commit . "25353734c65cd5cc952e4893b552629ca1d0d37f") (:revdesc . "25353734c65c") (:keywords "project" "tools" "terminals" "vc") (:authors ("Ivan Malison" . "IvanMalison@gmail.com") ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com") ("ROCKTAKEY" . "rocktakey@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (term-projectile . [(20240602 2356) ((emacs (24)) (term-manager (0 1 0)) (projectile (0 13 0))) "Projectile terminal management" tar ((:url . "https://www.github.com/IvanMalison/term-manager") (:commit . "25353734c65cd5cc952e4893b552629ca1d0d37f") (:revdesc . "25353734c65c") (:keywords "projectile" "tools" "terminals" "vc") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (term-run . [(20200128 702) nil "Run arbitrary command in terminal buffer" tar ((:url . "https://github.com/10sr/term-run-el") (:commit . "0fd135d55fcf864598b1fb8dd880833a1a322910") (:revdesc . "0fd135d55fcf") (:keywords "utility" "shell" "command" "term-mode") (:authors ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainers ("10sr" . "8slashes+el[at]gmail[dot]com")) (:maintainer "10sr" . "8slashes+el[at]gmail[dot]com"))])
+ (termbright-theme . [(20151031 235) ((emacs (24 1))) "A more usable theme for white-on-black terminals" tar ((:url . "https://github.com/bmastenbrook/termbright-theme-el") (:commit . "bec6ab14336c0611e85f45486276004f16d20607") (:revdesc . "bec6ab14336c") (:keywords "themes") (:authors ("Brian Mastenbrook" . "brian@mastenbrook.net")) (:maintainers ("Brian Mastenbrook" . "brian@mastenbrook.net")) (:maintainer "Brian Mastenbrook" . "brian@mastenbrook.net"))])
+ (terminal-here . [(20260314 1048) ((emacs (25 1))) "Run an external terminal in current directory" tar ((:url . "https://github.com/davidshepherd7/terminal-here") (:commit . "d90bc3e1c8c660e11dba002a1ce1d82940b260b1") (:revdesc . "d90bc3e1c8c6") (:keywords "tools" "frames") (:authors ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainers ("David Shepherd" . "davidshepherd7@gmail.com")) (:maintainer "David Shepherd" . "davidshepherd7@gmail.com"))])
+ (terminal-toggle . [(20190226 1510) ((emacs (24)) (popwin (1 0 0))) "Simple pop-up terminal" tar ((:url . "https://github.com/mtekman/terminal-toggle.el") (:commit . "f824d634aef3600cb7a8e2ddf9e8444c6607c160") (:revdesc . "f824d634aef3") (:keywords "outlines"))])
+ (termint . [(20260804 551) ((emacs (29 1))) "Run REPLs in a terminal backend" tar ((:url . "https://github.com/milanglacier/termint.el") (:commit . "bf97d0a417902417febc2b6925152dab5610057f") (:revdesc . "bf97d0a41790") (:authors ("Milan Glacier" . "dev@milanglacier.com")) (:maintainers ("Milan Glacier" . "dev@milanglacier.com")) (:maintainer "Milan Glacier" . "dev@milanglacier.com"))])
+ (tern . [(20260514 1348) ((json (1 2)) (cl-lib (0 5)) (emacs (24))) "Tern-powered JavaScript integration" tar ((:url . "http://ternjs.github.io/") (:commit . "fab80daebd798b233a9a40d5a8b99359ace63b5e") (:revdesc . "fab80daebd79"))])
+ (tern-auto-complete . [(20191227 950) ((tern (0 0 1)) (auto-complete (1 4)) (cl-lib (0 5)) (emacs (24))) "Tern Completion by auto-complete.el" tar ((:url . "https://github.com/ternjs/tern") (:commit . "0d19800db70a6348c627a69f444b91d21ad89629") (:revdesc . "0d19800db70a") (:authors (nil . "m.sakuraiatkiwanami.net")) (:maintainers (nil . "m.sakuraiatkiwanami.net")) (:maintainer nil . "m.sakuraiatkiwanami.net"))])
+ (tern-context-coloring . [(20170102 2253) ((emacs (24 3)) (context-coloring (8 1 0)) (tern (0 0 1))) "Use Tern for context coloring" tar ((:url . "https://github.com/jacksonrayhamilton/tern-context-coloring") (:commit . "3a8e979d6cc83aabcb3dda3f5f31a6422532efba") (:revdesc . "3a8e979d6cc8") (:keywords "convenience" "faces" "tools") (:authors ("Jackson Ray Hamilton" . "jackson@jacksonrayhamilton.com")) (:maintainers ("Jackson Ray Hamilton" . "jackson@jacksonrayhamilton.com")) (:maintainer "Jackson Ray Hamilton" . "jackson@jacksonrayhamilton.com"))])
+ (terraform-doc . [(20240714 418) ((emacs (25 1)) (request (0 3 0)) (promise (1 1)) (org (9 2))) "Look up terraform documentation on the fly" tar ((:url . "https://github.com/TxGVNN/terraform-doc") (:commit . "26a6674fcf6f16e4865ff5e6600bb273fdc77779") (:revdesc . "26a6674fcf6f") (:keywords "comm" "docs" "tools" "terraform") (:authors ("Giap Tran" . "txgvnn@gmail.com")) (:maintainers ("Giap Tran" . "txgvnn@gmail.com")) (:maintainer "Giap Tran" . "txgvnn@gmail.com"))])
+ (terraform-docs . [(20241216 649) ((emacs (27 1))) "Generate Terraform modules documentation with terraform-docs" tar ((:url . "https://github.com/loispostula/terraform-docs.el") (:commit . "c70d19c4007d81244b276b9d150cdfe3c2e7b8dd") (:revdesc . "c70d19c4007d") (:keywords "terraform" "tools" "docs") (:authors ("Lois Postula" . "lois@postu.la")) (:maintainers ("Lois Postula" . "lois@postu.la")) (:maintainer "Lois Postula" . "lois@postu.la"))])
+ (terraform-mode . [(20251115 2210) ((emacs (24 3)) (hcl-mode (0 3)) (dash (2 17 0))) "Major mode for terraform configuration file" tar ((:url . "https://github.com/syohex/emacs-terraform-mode") (:commit . "01635df3625c0cec2bb4613a6f920b8569d41009") (:revdesc . "01635df3625c") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainer "Syohei YOSHIDA" . "syohex@gmail.com"))])
+ (tesouro . [(20221003 1303) ((request (0 3 2)) (emacs (24 4))) "Brazilian Portuguese synonym search in dicio.com.br" tar ((:url . "https://github.com/rberaldo/tesouro.el") (:commit . "3dbfc49209237215163be1ea338dea099ddc0795") (:revdesc . "3dbfc4920923"))])
+ (test-c . [(20180423 1720) ((emacs (24 3))) "Quickly test c code" tar ((:url . "https://github.com/aaptel/test-c") (:commit . "761a576f62c7021ba941f178f153c51289df1553") (:revdesc . "761a576f62c7") (:authors ("Aurélien Aptel" . "aurelien.aptel@gmail.com")) (:maintainers ("Aurélien Aptel" . "aurelien.aptel@gmail.com")) (:maintainer "Aurélien Aptel" . "aurelien.aptel@gmail.com"))])
+ (test-case-mode . [(20130525 1434) ((fringe-helper (0 1 1))) "Unit test front-end" tar ((:url . "http://nschum.de/src/emacs/test-case-mode/") (:commit . "26e397c0f930b7eb0be413ef7dd257b1da052bec") (:revdesc . "26e397c0f930") (:keywords "tools") (:authors ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainers ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainer "Nikolaj Schumacher" . "bugs*nschumde"))])
+ (test-cockpit . [(20260817 1924) ((emacs (28 1)) (projectile (2 7)) (transient (0 7 0)) (toml (0 2 0))) "A command center to run tests of a software project" tar ((:url . "https://github.com/johannes-mueller/test-cockpit.el") (:commit . "2187ace87a6bcc04cd61bd5a4f8d76221286682d") (:revdesc . "2187ace87a6b") (:authors ("Johannes Mueller" . "github@johannes-mueller.org")) (:maintainers ("Johannes Mueller" . "github@johannes-mueller.org")) (:maintainer "Johannes Mueller" . "github@johannes-mueller.org"))])
+ (test-simple . [(20260118 2141) ((emacs (24 4)) (compat (30 1 0 1))) "Simple Unit Test Framework for Emacs Lisp" tar ((:url . "https://github.com/rocky/emacs-test-simple") (:commit . "502b0d299724256b1bbb08dcff227ac528f1a01a") (:revdesc . "502b0d299724") (:keywords "lisp") (:authors ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainers ("Rocky Bernstein" . "rocky@gnu.org")) (:maintainer "Rocky Bernstein" . "rocky@gnu.org"))])
+ (tetris-60 . [(20260329 1134) ((emacs (29 1))) "Retro ASCII Tetris" tar ((:url . "https://github.com/suxiaogang223/tetris-60") (:commit . "7e56b57ef4bd769235ab60aaa77029239cc568b4") (:revdesc . "7e56b57ef4bd") (:keywords "games") (:authors ("Xiaogang Su" . "suxiaogang223@icloud.com")) (:maintainers ("Xiaogang Su" . "suxiaogang223@icloud.com")) (:maintainer "Xiaogang Su" . "suxiaogang223@icloud.com"))])
+ (tex-smart-umlauts . [(20230416 2051) nil "Smart umlaut conversion for TeX" tar ((:url . "http://hub.darcs.net/lyro/tex-smart-umlauts") (:commit . "b28bac71990e0442616157fdb64494179df5575e") (:revdesc . "b28bac71990e") (:keywords "tex" "wp") (:authors ("Frank Fischer" . "frank-fischeratshadow-soft.de")) (:maintainers ("Frank Fischer" . "frank-fischeratshadow-soft.de")) (:maintainer "Frank Fischer" . "frank-fischeratshadow-soft.de"))])
+ (texfrag . [(20240415 1043) ((emacs (25)) (auctex (11 90 2))) "Preview LaTeX fragments in alien major modes" tar ((:url . "https://github.com/TobiasZawada/texfrag") (:commit . "d4d78e9ba4ae14cc554c31bb641dea38ab38babb") (:revdesc . "d4d78e9ba4ae") (:keywords "tex" "languages" "wp") (:authors ("Tobias Zawada" . "i@tn-home.de")) (:maintainers ("Tobias Zawada" . "i@tn-home.de")) (:maintainer "Tobias Zawada" . "i@tn-home.de"))])
+ (text-categories . [(20240921 824) ((emacs (26 2)) (dash (2 19 1))) "Assign text categories to a buffer for mass deletion" tar ((:url . "https://github.com/Dspil/text-categories") (:commit . "ac1a5900c80a967572b80045b0dbc2a1cc3437f2") (:revdesc . "ac1a5900c80a") (:keywords "lisp") (:authors ("Dionisios Spiliopoulos" . "dennisspiliopoylos@gmail.com")) (:maintainers ("Dionisios Spiliopoulos" . "dennisspiliopoylos@gmail.com")) (:maintainer "Dionisios Spiliopoulos" . "dennisspiliopoylos@gmail.com"))])
+ (textile-mode . [(20240212 1755) nil "Textile markup editing major mode" tar ((:url . "https://github.com/juba/textile-mode") (:commit . "2ad90cb6ed2560ee147417a3ec65222cc2ad33f1") (:revdesc . "2ad90cb6ed25") (:keywords "wp" "languages") (:authors ("Julien Barnier" . "julien@nozav.org")) (:maintainers ("Julien Barnier" . "julien@nozav.org")) (:maintainer "Julien Barnier" . "julien@nozav.org"))])
+ (textmate . [(20110816 2146) nil "TextMate minor mode for Emacs" tar ((:url . "https://github.com/defunkt/textmate.el") (:commit . "350918b070148f0ace6d9d3cd4ebcaf15c1a8781") (:revdesc . "350918b07014") (:keywords "textmate" "osx" "mac") (:authors ("Chris Wanstrath" . "chris@ozmm.org")) (:maintainers ("Chris Wanstrath" . "chris@ozmm.org")) (:maintainer "Chris Wanstrath" . "chris@ozmm.org"))])
+ (textmate-to-yas . [(20160409 1708) nil "Import Textmate macros into yasnippet syntax" tar ((:url . "https://github.com/mlf176f2/textmate-to-yas.el/") (:commit . "be3a768b7ac4c2e24b9d4aa6e9ac1d916cdc5a73") (:revdesc . "be3a768b7ac4") (:keywords "yasnippet" "textmate"))])
+ (textsize . [(20251120 1819) ((emacs (26 1))) "Configure frame text size automatically" tar ((:url . "https://github.com/WJCFerguson/textsize") (:commit . "cfcc4d6a351c43692f408e5f0fd68de2974fcb9f") (:revdesc . "cfcc4d6a351c") (:keywords "convenience") (:authors ("James Ferguson" . "james@faff.org")) (:maintainers ("James Ferguson" . "james@faff.org")) (:maintainer "James Ferguson" . "james@faff.org"))])
+ (textx-mode . [(20230324 2020) ((emacs (24 3))) "Major mode for editing TextX files" tar ((:url . "https://github.com/novakboskov/textx-mode") (:commit . "ecf90abec508cfd82d5da68474e976be907d9a77") (:revdesc . "ecf90abec508") (:keywords "textx") (:authors ("Novak Boškov" . "gnovak.boskov@gmail.com")) (:maintainers ("Novak Boškov" . "gnovak.boskov@gmail.com")) (:maintainer "Novak Boškov" . "gnovak.boskov@gmail.com"))])
+ (tf2-conf-mode . [(20161209 1620) nil "TF2 Configuration files syntax highlighting" tar ((:url . "https://github.com/wynro/emacs-tf2-conf-mode") (:commit . "94c971da4a78d55da2848d1e76d513e5e0a8f7eb") (:revdesc . "94c971da4a78") (:keywords "languages") (:authors ("Guillermo Robles" . "guillerobles1995@gmail.com")) (:maintainers ("Guillermo Robles" . "guillerobles1995@gmail.com")) (:maintainer "Guillermo Robles" . "guillerobles1995@gmail.com"))])
+ (tfsmacs . [(20180911 2114) ((emacs (25)) (tablist (0 70))) "MS TFS source control interaction" tar ((:url . "https://github.com/sebasmonia/tfsmacs/") (:commit . "13ee3f528ff616880611f563a68d921250692ef8") (:revdesc . "13ee3f528ff6") (:keywords "tfs" "vc") (:authors ("Dino Chiesa" . "dpchiesa@outlook.com") ("Sebastian Monia" . "smonia@outlook.com")) (:maintainers ("Dino Chiesa" . "dpchiesa@outlook.com") ("Sebastian Monia" . "smonia@outlook.com")) (:maintainer "Dino Chiesa" . "dpchiesa@outlook.com"))])
+ (thankful-eyes-theme . [(20251010 1114) ((emacs (24 1))) "Theme for color blindness and visual impairments" tar ((:url . "https://github.com/tanrax/thankful-eyes-theme.el") (:commit . "2fdb4271ecb91c75408993b324e1edf8dd13702e") (:revdesc . "2fdb4271ecb9") (:keywords "faces") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (thanks . [(20250907 1400) ((emacs (25 1)) (gh (1 0 1))) "Say thanks to the authors of all your installed packages" tar ((:url . "https://github.com/FrostyX/thanks") (:commit . "7dcc186ea754695694f1ce7159ab8b6a2d663f3c") (:revdesc . "7dcc186ea754") (:keywords "tools") (:authors ("Jakub Kadlčík" . "frostyx@email.cz")) (:maintainers ("Jakub Kadlčík" . "frostyx@email.cz")) (:maintainer "Jakub Kadlčík" . "frostyx@email.cz"))])
+ (the-matrix-theme . [(20260615 1213) ((emacs (26 1))) "Green-on-black dark theme inspired by \"The Matrix\" movie" tar ((:url . "https://github.com/monkeyjunglejuice/matrix-emacs-theme") (:commit . "fe0b8776191744359767ecc4113dda1ade4a5adb") (:revdesc . "fe0b87761917") (:keywords "faces" "theme") (:authors ("Dan Dee" . "monkeyjunglejuice@pm.me")) (:maintainers ("Dan Dee" . "monkeyjunglejuice@pm.me")) (:maintainer "Dan Dee" . "monkeyjunglejuice@pm.me"))])
+ (theme-anchor . [(20250620 13) ((emacs (26))) "Apply theme in current buffer only" tar ((:url . "https://github.com/GongYiLiao/theme-anchor") (:commit . "a9143dbd6a073a6538f011d4095432152de127b7") (:revdesc . "a9143dbd6a07") (:keywords "extensions" "lisp" "theme") (:authors ("Kiong-Gē" . "gliao.tw@pm.me")) (:maintainers ("Kiong-Gē" . "gliao.tw@pm.me")) (:maintainer "Kiong-Gē" . "gliao.tw@pm.me"))])
+ (theme-changer . [(20230904 1706) ((cl-lib (0))) "Sunrise/Sunset Theme Changer for Emacs" tar ((:url . "https://github.com/hadronzoo/theme-changer") (:commit . "7febd7632451bb99a5d92f24623432c4de035ff1") (:revdesc . "7febd7632451") (:keywords "color-theme" "deftheme" "solar" "sunrise" "sunset") (:authors ("Joshua B. Griffith" . "josh.griffith@gmail.com")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (theme-looper . [(20210827 424) ((emacs (24)) (cl-lib (0 5))) "A package for switching themes in Emacs interactively" tar ((:url . "http://ismail.teamfluxion.com") (:commit . "e6e8efd740df0b68db89805ba72492818dba61ab") (:revdesc . "e6e8efd740df") (:keywords "convenience" "color-themes") (:authors ("Mohammed Ismail Ansari" . "team.terminal@gmail.com")) (:maintainers ("Mohammed Ismail Ansari" . "team.terminal@gmail.com")) (:maintainer "Mohammed Ismail Ansari" . "team.terminal@gmail.com"))])
+ (theme-magic . [(20190711 2034) ((emacs (25)) (seq (1 8))) "Apply your Emacs theme to the rest of Linux" tar ((:url . "https://github.com/jcaw/theme-magic.el") (:commit . "844c4311bd26ebafd4b6a1d72ddcc65d87f074e3") (:revdesc . "844c4311bd26") (:keywords "unix" "faces" "terminals" "extensions") (:authors ("GitHub user jcaw" . "40725916+jcaw@users.noreply.github.com")) (:maintainers ("GitHub user jcaw" . "40725916+jcaw@users.noreply.github.com")) (:maintainer "GitHub user jcaw" . "40725916+jcaw@users.noreply.github.com"))])
+ (therapy . [(20151113 1953) ((emacs (24))) "Hooks for managing multiple Python major versions" tar ((:url . "https://github.com/abingham/therapy") (:commit . "775a92bb7b6b0fcc5b38c0b5198a9d0a1bef788a") (:revdesc . "775a92bb7b6b") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (thingopt . [(20160520 2318) nil "Thing at Point optional utilities" tar ((:url . "https://github.com/emacsorphanage/thingopt") (:commit . "5679815852652479f3b3c9f3a98affc927384b2c") (:revdesc . "567981585265") (:keywords "convenience") (:authors ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainers ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainer "Tomohiro Matsuyama" . "m2ym.pub@gmail.com"))])
+ (thinks . [(20260331 1814) ((emacs (24 1)) (cl-lib (0 5))) "Insert text in a think bubble" tar ((:url . "https://github.com/davep/thinks.el") (:commit . "60c3d0adaabe78ea705466077fcdb2f7dcb15dde") (:revdesc . "60c3d0adaabe") (:keywords "convenience" "quoting") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (third-time . [(20240207 1621) ((emacs (27 1))) "Third Time: A Better Way to Work" tar ((:url . "https://git.sr.ht/~swflint/third-time") (:commit . "093b74be860fac389fb173caef5fabf61e417eef") (:revdesc . "093b74be860f") (:authors ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (thread-dump . [(20170816 1850) nil "Java thread dump viewer" tar ((:url . "https://github.com/nd/thread-dump.el") (:commit . "204c9600242756d4b514bb5ff6293e052bf4b49d") (:revdesc . "204c96002427"))])
+ (threes . [(20160820 1242) ((emacs (24)) (seq (1 11))) "A clone of Threes (a tiny puzzle game)" tar ((:url . "https://github.com/xuchunyang/threes.el") (:commit . "6981acb30b856c77cba6aba63fefbf102cbdfbb2") (:revdesc . "6981acb30b85") (:keywords "games") (:authors ("Chunyang Xu" . "xuchunyang.me@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang.me@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang.me@gmail.com"))])
+ (thrift . [(20260823 311) ((emacs (24))) "Major mode for fbthrift and Apache Thrift files" tar ((:url . "https://github.com/facebook/fbthrift") (:commit . "28b6907cb5c94ca2314adcbed5e3b34e61494484") (:revdesc . "28b6907cb5c9") (:keywords "languages"))])
+ (thumb-through . [(20120119 534) nil "Plain text reader of HTML documents" tar ((:url . "https://github.com/apg/thumb-through") (:commit . "08d8fb720f93c6172653e035191a8fa9c3305e63") (:revdesc . "08d8fb720f93") (:keywords "html"))])
+ (tickscript-mode . [(20171219 203) ((emacs (24 1))) "A major mode for Tickscript files" tar ((:url . "https://github.com/msherry/tickscript-mode") (:commit . "f0579f38ff14954df5002ce30ae6d4a2c978d461") (:revdesc . "f0579f38ff14") (:keywords "languages") (:authors ("Marc Sherry" . "msherry@gmail.com")) (:maintainers ("Marc Sherry" . "msherry@gmail.com")) (:maintainer "Marc Sherry" . "msherry@gmail.com"))])
+ (ticktick . [(20260117 1242) ((emacs (27 1)) (request (0 3 0)) (simple-httpd (1 5 0))) "Sync Org Mode tasks with TickTick" tar ((:url . "https://github.com/polhuang/ticktick.el") (:commit . "b9b6319464bd63c43c5edab1d72e73eea4234093") (:revdesc . "b9b6319464bd") (:keywords "tools" "ticktick" "org" "tasks" "todo"))])
+ (tidal . [(20260702 630) ((haskell-mode (16)) (emacs (25 1))) "Interact with TidalCycles for live coding patterns" tar ((:url . "https://codeberg.org/uzu/tidal") (:commit . "5ae655255d87c983a596f398a0385b21df97df3b") (:revdesc . "5ae655255d87") (:keywords "tools") (:authors (nil . "alex@slab.org")) (:maintainers (nil . "alex@slab.org")) (:maintainer nil . "alex@slab.org"))])
+ (tide . [(20260219 336) ((emacs (25 1)) (dash (2 10 0)) (s (1 11 0)) (flycheck (27)) (cl-lib (0 5))) "Typescript Interactive Development Environment" tar ((:url . "https://github.com/ananthakumaran/tide") (:commit . "9498c4c7fc97d8042fdff532f47f1dc79ebd163a") (:revdesc . "9498c4c7fc97") (:keywords "typescript") (:authors ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainers ("Anantha kumaran" . "ananthakumaran@gmail.com")) (:maintainer "Anantha kumaran" . "ananthakumaran@gmail.com"))])
+ (tiktoken . [(20240103 340) ((emacs (28 0)) (f (0 20 0))) "Count BPE Tokens" tar ((:url . "https://github.com/zkry/tiktoken.el") (:commit . "1dec1547024c10f32cd49129f937fa1d3ee39d01") (:revdesc . "1dec1547024c") (:keywords "tools"))])
+ (tikz . [(20220526 521) ((emacs (24 1))) "A minor mode to edit TikZ pictures" tar ((:url . "https://github.com/emiliotorres/tikz") (:commit . "4b205afc5c88f050639135d1d57f1276db323842") (:revdesc . "4b205afc5c88") (:keywords "tex") (:authors ("Emilio Torres-Manzanera" . "torres@uniovi.es")) (:maintainers ("Emilio Torres-Manzanera" . "torres@uniovi.es")) (:maintainer "Emilio Torres-Manzanera" . "torres@uniovi.es"))])
+ (tile . [(20161225 357) ((emacs (25 1)) (s (1 9 0)) (dash (2 12 0)) (stream (2 2 3))) "Tile windows with layouts" tar ((:url . "https://github.com/IvanMalison/tile") (:commit . "22660f21f6e95de5aba55cd5d293d4841e9a4661") (:revdesc . "22660f21f6e9") (:keywords "tile" "tiling" "window" "manager" "dynamic" "frames") (:authors ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainers ("Ivan Malison" . "IvanMalison@gmail.com")) (:maintainer "Ivan Malison" . "IvanMalison@gmail.com"))])
+ (tiles . [(20260603 1458) ((emacs (27 1))) "Tagged Instant Lightweight Emacs Snippets" tar ((:url . "https://github.com/ctanas/tiles") (:commit . "754b11764f8204ff1fce6d3aa80eca2150a8a164") (:revdesc . "754b11764f82") (:keywords "files" "text" "convenience") (:authors ("Claudiu Tănăselia" . "https://www.tanaselia.ro")) (:maintainers ("Claudiu Tănăselia" . "https://www.tanaselia.ro")) (:maintainer "Claudiu Tănăselia" . "https://www.tanaselia.ro"))])
+ (time-block . [(20230511 1434) ((emacs (25 1)) (ts (0 1))) "Block running commands using time" tar ((:url . "https://git.sr.ht/~swflint/time-block-command") (:commit . "0fdb488c3fa3da2934ee486613f5bf46712b97d6") (:revdesc . "0fdb488c3fa3") (:keywords "tools" "productivity" "convenience") (:authors ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (time-ext . [(20170126 1215) nil "More function for time/date" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/time-ext.el") (:commit . "d128becf660fe3f30178eb1b05cd266741f4784a") (:revdesc . "d128becf660f") (:keywords "lisp") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (time-uuid-mode . [(20240112 1005) ((emacs (24 3))) "Minor mode for previewing time uuids as an overlay" tar ((:url . "https://github.com/RobertPlant/time-uuid-mode") (:commit . "e30f50229c617bdd31a1edcd849cba1f3423fea1") (:revdesc . "e30f50229c61") (:keywords "extensions" "convenience" "data" "tools") (:authors ("Robert Plant" . "rob@robertplant.io")) (:maintainers ("Robert Plant" . "rob@robertplant.io")) (:maintainer "Robert Plant" . "rob@robertplant.io"))])
+ (time-zones . [(20260716 845) ((emacs (28 1))) "Time zone lookups" tar ((:url . "https://github.com/xenodium/time-zones") (:commit . "4cc37a54ba6447dc0570cd2e42052689d94f09ee") (:revdesc . "4cc37a54ba64"))])
+ (timecop . [(20240105 2100) ((emacs (26 3)) (datetime-format (0 0 1))) "Freeze Time for testing" tar ((:url . "https://github.com/emacs-php/emacs-datetime") (:commit . "090bfff5c28fa0a6cb629512003c49b3f43ed72d") (:revdesc . "090bfff5c28f") (:keywords "lisp" "datetime" "testing") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (timeout . [(20260504 2312) ((emacs (24 4))) "Throttle or debounce Elisp functions" tar ((:url . "https://github.com/karthink/timeout") (:commit . "b1212984709c4b50c509ef6d3bd959951e5dcc91") (:revdesc . "b1212984709c") (:keywords "convenience" "extensions") (:authors ("Karthik Chikmagalur" . "karthikchikmagalur@gmail.com")) (:maintainers ("Karthik Chikmagalur" . "karthikchikmagalur@gmail.com")) (:maintainer "Karthik Chikmagalur" . "karthikchikmagalur@gmail.com"))])
+ (timer-revert . [(20150122 2032) nil "Minor mode to revert buffer for a given time interval" tar ((:url . "https://github.com/yyr/timer-revert") (:commit . "615c91dec8b440d2b9b7c725dd733d7432564e45") (:revdesc . "615c91dec8b4") (:keywords "timer" "revert" "auto-revert.") (:maintainers (nil . "hi@yagnesh.org")) (:maintainer nil . "hi@yagnesh.org"))])
+ (timesheet . [(20221004 1702) ((s (1)) (org (9))) "Timesheet management add-on for org-mode" tar ((:url . "https://github.com/tmarble/timesheet.el") (:commit . "511751b239c84d7619ec1c61d7f108b732b64442") (:revdesc . "511751b239c8") (:keywords "org" "timesheet"))])
+ (timonier . [(20170411 800) ((emacs (24 4)) (s (1 11 0)) (f (0 19 0)) (dash (2 12 0)) (pkg-info (0 5 0)) (hydra (0 13 6)) (request (0 2 0)) (all-the-icons (2 0 0))) "Manage Kubernetes Applications" tar ((:url . "https://github.com/nlamirault/timonier") (:commit . "3460a878269424c8d19b7d5d8e04749d0a8bf203") (:revdesc . "3460a8782694") (:keywords "kubernetes" "docker") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (timp . [(20160618 803) ((emacs (24 4)) (cl-lib (0 5)) (fifo-class (1 0)) (signal (1 0))) "Multithreading library" tar ((:url . "https://github.com/mola-T/timp") (:commit . "59657bf603904635d88c3fe4ff1ce45ee6572428") (:revdesc . "59657bf60390") (:keywords "internal" "lisp" "processes" "tools") (:authors ("Mola-T" . "Mola@molamola.xyz")) (:maintainers ("Mola-T" . "Mola@molamola.xyz")) (:maintainer "Mola-T" . "Mola@molamola.xyz"))])
+ (timu-caribbean-theme . [(20250411 23) ((emacs (27 1))) "Color theme with cyan/coral as a dominant color" tar ((:url . "https://gitlab.com/aimebertrand/timu-caribbean-theme") (:commit . "ae8fbab1c3fbb14ca797b0207c45d723d7d25b22") (:revdesc . "ae8fbab1c3fb") (:keywords "faces" "themes") (:authors ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainers ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainer "Aimé Bertrand" . "aime.bertrand@macowners.club"))])
+ (timu-line . [(20260131 1904) ((emacs (29 1))) "Custom and simple mode line" tar ((:url . "https://gitlab.com/aimebertrand/timu-line") (:commit . "745f38f27e9bf73323d25d9624d462ba977131c3") (:revdesc . "745f38f27e9b") (:keywords "modeline" "frames" "ui") (:authors ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainers ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainer "Aimé Bertrand" . "aime.bertrand@macowners.club"))])
+ (timu-macos-theme . [(20260720 2019) ((emacs (27 1))) "Color theme inspired by the macOS UI" tar ((:url . "https://gitlab.com/aimebertrand/timu-macos-theme") (:commit . "3f9019a1ea467058388d2919b3d75c1feb859d7d") (:revdesc . "3f9019a1ea46") (:keywords "faces" "themes") (:authors ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainers ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainer "Aimé Bertrand" . "aime.bertrand@macowners.club"))])
+ (timu-rouge-theme . [(20260122 1354) ((emacs (27 1))) "Color theme inspired by the Rouge Theme for VSCode" tar ((:url . "https://gitlab.com/aimebertrand/timu-rouge-theme") (:commit . "a46e960a8f5aa078ec055bc1b819be52182fda0f") (:revdesc . "a46e960a8f5a") (:keywords "faces" "themes") (:authors ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainers ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainer "Aimé Bertrand" . "aime.bertrand@macowners.club"))])
+ (timu-spacegrey-theme . [(20250410 2248) ((emacs (26 1))) "Color theme inspired by the Spacegray theme in Sublime Text" tar ((:url . "https://gitlab.com/aimebertrand/timu-spacegrey-theme") (:commit . "a90616ae0b110920c8be134cb7ffacee75552ac7") (:revdesc . "a90616ae0b11") (:keywords "faces" "themes") (:authors ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainers ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainer "Aimé Bertrand" . "aime.bertrand@macowners.club"))])
+ (timu-symbol-extract . [(20260111 1243) ((emacs (28 1))) "Extract symbols to org table" tar ((:url . "https://gitlab.com/aimebertrand/timu-symbol-extract") (:commit . "5f3b778eb7446ca2b366daacb9f1e71f1d89e097") (:revdesc . "5f3b778eb744") (:keywords "defaults" "tools" "helper" "elisp") (:authors ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainers ("Aimé Bertrand" . "aime.bertrand@macowners.club")) (:maintainer "Aimé Bertrand" . "aime.bertrand@macowners.club"))])
+ (tinkerer . [(20200914 1756) ((s (1 2 0))) "Elisp wrapper for Tinkerer Blogging Engine" tar ((:url . "https://github.com/yyr/tinkerer.el") (:commit . "7cedeb264a44cd62bcd9c778dca52316d09e07e5") (:revdesc . "7cedeb264a44") (:keywords "tinkerer" "blog" "wrapper") (:authors ("Yagnesh Raghava Yakkala" . "hi@yagnesh.org")) (:maintainers ("Yagnesh Raghava Yakkala" . "hi@yagnesh.org")) (:maintainer "Yagnesh Raghava Yakkala" . "hi@yagnesh.org"))])
+ (tintin-mode . [(20260220 2337) ((emacs (24 3))) "Major mode for editing TinTin++ config files" tar ((:url . "https://github.com/lesharris/tintin-mode") (:commit . "b94c10c5ba7fef01c53c4d4d66532e7abe82086c") (:revdesc . "b94c10c5ba7f") (:authors ("Les Harris" . "les@lesharris.com")) (:maintainers ("Les Harris" . "les@lesharris.com")) (:maintainer "Les Harris" . "les@lesharris.com"))])
+ (tiny . [(20220910 1929) nil "Quickly generate linear ranges in Emacs" tar ((:url . "https://github.com/abo-abo/tiny") (:commit . "c107480fca7e42737c51b2afaa33ac31e92a7290") (:revdesc . "c107480fca7e") (:keywords "convenience") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (tiny-menu . [(20220725 1748) ((emacs (24 4))) "Display tiny menus" tar ((:url . "https://github.com/aaronbieber/tiny-menu.el") (:commit . "17eacfd1d44cd4d5482d32eac63229230c3cd3fc") (:revdesc . "17eacfd1d44c") (:keywords "menu" "tools") (:authors ("Aaron Bieber" . "aaron@aaronbieber.com")) (:maintainers ("Aaron Bieber" . "aaron@aaronbieber.com")) (:maintainer "Aaron Bieber" . "aaron@aaronbieber.com"))])
+ (tinypng . [(20200306 911) ((emacs (25 1))) "Compress PNG and JPEG with TinyPNG.com API" tar ((:url . "https://github.com/xuchunyang/tinypng.el") (:commit . "f7632e073ce13ef5ce30ae5584cb482a8bb9ffff") (:revdesc . "f7632e073ce1") (:keywords "multimedia") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (tinysegmenter . [(20141124 1013) ((cl-lib (0 5))) "Super compact Japanese tokenizer in Javascript ported to emacs lisp" tar ((:url . "https://github.com/myuhe/tinysegmenter.el") (:commit . "872134704bd25c13a4c59552433da4c6881b5230") (:revdesc . "872134704bd2") (:keywords "convenience") (:authors ("lugecy" . "lugecy@gmail.com")))])
+ (titlecase . [(20260622 446) ((emacs (25 1))) "Title-case phrases" tar ((:url . "https://codeberg.org/acdw/titlecase.el") (:commit . "eb75d7539243832761e8e75782252fd7a489fb37") (:revdesc . "eb75d7539243") (:authors ("Case Duckworth" . "acdw@acdw.net")) (:maintainers ("Case Duckworth" . "acdw@acdw.net")) (:maintainer "Case Duckworth" . "acdw@acdw.net"))])
+ (tj3-mode . [(20180519 1228) nil "Major mode for editing TaskJuggler 3 files" tar ((:url . "https://github.com/csrhodes/tj3-mode") (:commit . "1d98eb23f1606392f34ef1b80517cfc940fb9950") (:revdesc . "1d98eb23f160") (:authors ("Christophe Rhodes" . "christophe@rhodes.io")) (:maintainers ("Christophe Rhodes" . "christophe@rhodes.io")) (:maintainer "Christophe Rhodes" . "christophe@rhodes.io"))])
+ (tldr . [(20230301 136) ((emacs (24 3))) "Tldr client for Emacs" tar ((:url . "https://github.com/kuanyui/tldr.el") (:commit . "1b09d2032491d3904bd7ee9bf5ba7c7503db6593") (:revdesc . "1b09d2032491") (:keywords "tools" "docs") (:authors ("Ono Hiroko" . "azazabc123@gmail.com")) (:maintainers ("Ono Hiroko" . "azazabc123@gmail.com")) (:maintainer "Ono Hiroko" . "azazabc123@gmail.com"))])
+ (tmmofl . [(20121025 1101) nil "Calls functions dependant on font lock highlighting at point" tar ((:url . "https://github.com/phillord/tmmofl") (:commit . "532aa6978e994e2b069ffe37aaf9a0011a07dadc") (:revdesc . "532aa6978e99") (:keywords "minor mode" "font lock" "toggling.") (:authors ("Phillip Lord" . "p.lord@hgmp.mrc.ac.uk")) (:maintainers ("Phillip Lord" . "p.lord@hgmp.mrc.ac.uk")) (:maintainer "Phillip Lord" . "p.lord@hgmp.mrc.ac.uk"))])
+ (tmpl-mode . [(20260103 1717) ((emacs (25 1))) "Minor mode for \"tmpl\" template files" tar ((:url . "https://github.com/Lindydancer/tmpl-mode") (:commit . "ff9883cfa3b63005c64d556a5a5c2f81aa312ea7") (:revdesc . "ff9883cfa3b6") (:keywords "languages"))])
+ (tmsu . [(20260610 1429) ((emacs (28 1))) "A basic TMSU interface" tar ((:url . "https://github.com/vifon/tmsu.el") (:commit . "625d01d87f2820f648816f78b0c5bc220f14488b") (:revdesc . "625d01d87f28") (:keywords "files"))])
+ (tmux-csi-u . [(20260428 2220) ((emacs (27 1))) "Tmux CSI-u decoder" tar ((:url . "https://github.com/lajarre/tmux-csi-u.el") (:commit . "38e95db84ad02ad440e4fc0b18896e1c621e5f5d") (:revdesc . "38e95db84ad0") (:keywords "terminals" "tools") (:authors ("lajarre" . "1884912+lajarre@users.noreply.github.com")) (:maintainers ("lajarre" . "1884912+lajarre@users.noreply.github.com")) (:maintainer "lajarre" . "1884912+lajarre@users.noreply.github.com"))])
+ (tmux-mode . [(20231130 1249) ((emacs (26 1))) "Major mode for tmux configuration" tar ((:url . "https://github.com/nverno/tmux-mode") (:commit . "ee50d02721600c4b31cdafbb9f2ecc5becf1a5f6") (:revdesc . "ee50d0272160") (:keywords "languages" "tmux" "config") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (tmux-pane . [(20240106 131) ((names (0 5)) (emacs (24)) (s (0))) "Provide integration between emacs window and tmux pane" tar ((:url . "https://github.com/laishulu/emacs-tmux-pane") (:commit . "0ab0d40b497e984a589189358e04e322b8165985") (:revdesc . "0ab0d40b497e") (:keywords "convenience" "terminals" "tmux" "window" "pane" "navigation" "integration"))])
+ (toc-mode . [(20220926 530) ((emacs (26 1))) "Manage outlines/table of contents of pdf and djvu documents" tar ((:url . "https://github.com/dalanicolai/toc-mode") (:commit . "448a0ac00c110802f3124bbf9c5a72bdfc3c3c28") (:revdesc . "448a0ac00c11") (:keywords "tools" "outlines" "convenience") (:authors ("Daniel Laurens Nicolai" . "dalanicolai@gmail.com")) (:maintainers ("Daniel Laurens Nicolai" . "dalanicolai@gmail.com")) (:maintainer "Daniel Laurens Nicolai" . "dalanicolai@gmail.com"))])
+ (toc-org . [(20260514 1415) nil "Add table of contents to org-mode files (formerly, org-toc)" tar ((:url . "https://github.com/snosov1/toc-org") (:commit . "781376e9dc9a901116c0c39914aeb4d46e524e0a") (:revdesc . "781376e9dc9a") (:keywords "org-mode" "org-toc" "toc-org" "org" "toc" "table" "of" "contents") (:authors ("Sergei Nosov" . "sergei.nosov[at]gmail.com")) (:maintainers ("Sergei Nosov" . "sergei.nosov[at]gmail.com")) (:maintainer "Sergei Nosov" . "sergei.nosov[at]gmail.com"))])
+ (todoist . [(20240624 1512) ((dash (2 15 0)) (transient (0 1 0)) (org (8 3 5)) (emacs (25 3))) "Extension for interacting and managing todoist tasks" tar ((:url . "https://github.com/abrochard/emacs-todoist") (:commit . "205c730a4615dec20ea71ccd0a09479a420cb974") (:revdesc . "205c730a4615") (:keywords "todoist" "task" "todo" "comm"))])
+ (todotxt . [(20220204 1903) nil "A major mode for editing todo.txt files" tar ((:url . "https://github.com/rpdillon/todotxt.el") (:commit . "ddb25fb931b4bbc1af14c4c712d412af454794c4") (:revdesc . "ddb25fb931b4") (:keywords "todo.txt" "todotxt" "todotxt.el") (:authors ("Rick Dillon" . "rpdillon@killring.org")) (:maintainers ("Rick Dillon" . "rpdillon@killring.org")) (:maintainer "Rick Dillon" . "rpdillon@killring.org"))])
+ (todotxt-mode . [(20240802 604) nil "Major mode for editing todo.txt files" tar ((:url . "https://github.com/avillafiorita/todotxt-mode") (:commit . "ca4310cfcce4d1f3a6670b31412a9b56462e5b5d") (:revdesc . "ca4310cfcce4") (:keywords "wp" "files") (:authors ("Adolfo Villafiorita" . "adolfo.villafiorita@me.com")) (:maintainers ("Adolfo Villafiorita" . "adolfo.villafiorita@me.com")) (:maintainer "Adolfo Villafiorita" . "adolfo.villafiorita@me.com"))])
+ (togetherly . [(20170426 616) ((cl-lib (0 3))) "Allow multiple clients to edit a single buffer online" tar ((:url . "http://hins11.yu-yake.com/") (:commit . "65072b1d5e04c7098c318ebf1af279f596039ef9") (:revdesc . "65072b1d5e04"))])
+ (toggle-quotes . [(20140710 926) nil "Toggle between single and double quoted string" tar ((:url . "https://github.com/toctan/toggle-quotes.el") (:commit . "33abc221d6887f0518337851318065cd86c34b03") (:revdesc . "33abc221d688") (:keywords "convenience" "quotes") (:authors ("Jim Tian" . "tianjin.sc@gmail.com")) (:maintainers ("Jim Tian" . "tianjin.sc@gmail.com")) (:maintainer "Jim Tian" . "tianjin.sc@gmail.com"))])
+ (toggle-term . [(20260820 1011) ((emacs (25 1))) "Quickly toggle persistent term and shell buffers" tar ((:url . "https://github.com/justinlime/toggle-term.el") (:commit . "ebfce6283e53fda7f69ccda73109a02b646623af") (:revdesc . "ebfce6283e53") (:keywords "frames" "convenience" "terminals"))])
+ (toggle-test . [(20140723 537) nil "Toggle between source and test files in various programming languages" tar ((:url . "https://github.com/rags/toggle-test") (:commit . "a0b64834101c2b8b24da365baea1d36e57b069b5") (:revdesc . "a0b64834101c") (:keywords "tdd" "test" "toggle" "productivity") (:authors ("Raghunandan Rao" . "r.raghunandan@gmail.com")) (:maintainers ("Raghunandan Rao" . "r.raghunandan@gmail.com")) (:maintainer "Raghunandan Rao" . "r.raghunandan@gmail.com"))])
+ (toggle-window . [(20141207 1548) nil "Toggle current window size between half and full" tar ((:url . "https://github.com/deadghost/toggle-window") (:commit . "e82c60e543933880402ede11e9423e48a17dde53") (:revdesc . "e82c60e54393") (:keywords "hide" "window"))])
+ (tok-theme . [(20260216 949) ((emacs (27 0))) "Minimal monochromatic theme with restrained color highlights" tar ((:url . "https://github.com/topikettunen/tok-theme") (:commit . "f2af92c73108a55c383f3687b96b21e7f89e0782") (:revdesc . "f2af92c73108") (:authors ("Topi Kettunen" . "topi@topikettunen.com")) (:maintainers ("Topi Kettunen" . "topi@topikettunen.com")) (:maintainer "Topi Kettunen" . "topi@topikettunen.com"))])
+ (tokei . [(20250621 1500) ((emacs (27 1)) (magit-section (3 3 0))) "Display codebase statistics" tar ((:url . "https://github.com/nagy/tokei.el") (:commit . "b16b05c9bbddd046300725d0eb4f45b38677b2fb") (:revdesc . "b16b05c9bbdd") (:authors ("Daniel Nagy" . "https://github.com/nagy")) (:maintainers ("Daniel Nagy" . "danielnagy@posteo.de")) (:maintainer "Daniel Nagy" . "danielnagy@posteo.de"))])
+ (tokyo-night . [(20260729 1522) ((emacs (27 1))) "Tokyo Night color themes" tar ((:url . "https://github.com/bbatsov/tokyo-night-emacs") (:commit . "e8e33fc282ccbeebe01f883fc0cd55ab9897321a") (:revdesc . "e8e33fc282cc") (:keywords "faces" "themes") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.dev")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.dev"))])
+ (tomatinho . [(20180621 1748) nil "Simple and beautiful pomodoro timer" tar ((:url . "https://github.com/konr/tomatinho") (:commit . "b53354b9b9f496c0388d6a573b06b7d6fc53d0bd") (:revdesc . "b53354b9b9f4") (:keywords "time" "productivity" "pomodoro technique") (:authors ("Konrad Scorciapino" . "scorciapino@gmail.com")) (:maintainers ("Konrad Scorciapino" . "scorciapino@gmail.com")) (:maintainer "Konrad Scorciapino" . "scorciapino@gmail.com"))])
+ (toml . [(20260321 1321) nil "TOML (Tom's Obvious, Minimal Language) parser" tar ((:url . "https://github.com/gongo/emacs-toml") (:commit . "77d7ef684515c1b93ae23f52c450e7496ac4eb14") (:revdesc . "77d7ef684515") (:keywords "toml" "parser") (:authors ("Wataru MIYAGUNI" . "gonngo@gmail.com")) (:maintainers ("Wataru MIYAGUNI" . "gonngo@gmail.com")) (:maintainer "Wataru MIYAGUNI" . "gonngo@gmail.com"))])
+ (toml-mode . [(20161107 1800) ((emacs (24)) (cl-lib (0 5))) "Major mode for editing TOML files" tar ((:url . "https://github.com/dryman/toml-mode.el") (:commit . "f6c61817b00f9c4a3cab1bae9c309e0fc45cdd06") (:revdesc . "f6c61817b00f") (:keywords "data" "toml") (:authors ("Felix Chern" . "idryman@gmail.com")) (:maintainers ("Felix Chern" . "idryman@gmail.com")) (:maintainer "Felix Chern" . "idryman@gmail.com"))])
+ (tomlparse . [(20250512 1937) ((emacs (29 1))) "A straight-forward tree sitter based parser for toml data" tar ((:url . "https://github.com/johannes-mueller/tomlparse.el") (:commit . "637acb0a1e410b4db9ebe91598fb782c8e6c5ee9") (:revdesc . "637acb0a1e41") (:authors ("Johannes Mueller" . "github@johannes-mueller.org")) (:maintainers ("Johannes Mueller" . "github@johannes-mueller.org")) (:maintainer "Johannes Mueller" . "github@johannes-mueller.org"))])
+ (tommyh-theme . [(20131004 2330) nil "A bright, bold-colored theme for emacs" tar ((:url . "https://github.com/wglass/tommyh-theme") (:commit . "46d1c69ee0a1ca7c67b569b891a2f28fed89e7d5") (:revdesc . "46d1c69ee0a1") (:authors ("William Glass" . "william.glass@gmail.com")) (:maintainers ("William Glass" . "william.glass@gmail.com")) (:maintainer "William Glass" . "william.glass@gmail.com"))])
+ (tomorrow-night-deepblue-theme . [(20260710 1611) ((emacs (26 1))) "The Tomorrow Night Deepblue color theme" tar ((:url . "https://github.com/jamescherti/tomorrow-night-deepblue-theme.el") (:commit . "38e601d69e5741463e6d725100234d0c6e3e5741") (:revdesc . "38e601d69e57") (:keywords "faces" "themes") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (tongbu . [(20200414 507) ((emacs (25 1)) (web-server (0 1 2))) "A web server to share text or files between two devices" tar ((:url . "https://github.com/xuchunyang/tongbu.el") (:commit . "6f6e5c5446f0c5735357ab520b249ab97295653e") (:revdesc . "6f6e5c5446f0") (:keywords "tools"))])
+ (too-wide-minibuffer-mode . [(20250525 1932) ((emacs (30 1))) "Shrink minibuffer if the frame is too wide" tar ((:url . "https://github.com/hron/too-wide-minibuffer-mode") (:commit . "cde6da647ecd980644c02bf676923cd952cfeaf3") (:revdesc . "cde6da647ecd") (:keywords "convenience") (:authors ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainers ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainer "Aleksei Gusev" . "aleksei.gusev@gmail.com"))])
+ (topspace . [(20220824 134) ((emacs (25 1))) "Recenter line 1 with scrollable upper margin/padding" tar ((:url . "https://github.com/trevorpogue/topspace") (:commit . "33c2a6f0a11d1d88cdb2065c5a897e33507f4c86") (:revdesc . "33c2a6f0a11d") (:keywords "convenience" "scrolling" "center" "cursor" "margin" "padding") (:authors ("Trevor Edwin Pogue" . "trevor.pogue@gmail.com")) (:maintainers ("Trevor Edwin Pogue" . "trevor.pogue@gmail.com")) (:maintainer "Trevor Edwin Pogue" . "trevor.pogue@gmail.com"))])
+ (topsy . [(20231214 843) ((emacs (26 3)) (compat (29 1))) "Simple sticky header" tar ((:url . "https://github.com/alphapapa/topsy.el") (:commit . "8b6c6d5026ac72b4c3704ed7bb8fafe1ea343699") (:revdesc . "8b6c6d5026ac") (:keywords "convenience") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (tornado-template-mode . [(20141128 1008) nil "A major mode for editing tornado templates" tar ((:url . "https://github.com/paradoxxxzero/tornado-template-mode") (:commit . "667c0663dbbd279b6c345446b9f2bc50eb52b747") (:revdesc . "667c0663dbbd"))])
+ (torrent-mode . [(20260130 2140) ((emacs (26 1)) (tablist (1 0)) (bencoding (1 0))) "Display torrent files in a tabulated view" tar ((:url . "https://github.com/sarg/torrent-mode.el") (:commit . "a35a7c193b638207de0a266e8ded6e4e8a54505e") (:revdesc . "a35a7c193b63") (:authors ("Sergey Trofimov" . "sarg@sarg.org.ru")) (:maintainers ("Sergey Trofimov" . "sarg@sarg.org.ru")) (:maintainer "Sergey Trofimov" . "sarg@sarg.org.ru"))])
+ (torus . [(20190325 753) ((emacs (26))) "A buffer groups manager" tar ((:url . "https://github.com/chimay/torus") (:commit . "863886f10db77f3d1b16815d77561b6c81d88352") (:revdesc . "863886f10db7") (:keywords "files" "buffers" "groups" "persistent" "history" "layout" "tabs"))])
+ (total-lines . [(20171227 1239) ((emacs (24 3))) "Keep track of a buffer's total number of lines" tar ((:url . "https://github.com/hinrik/total-lines") (:commit . "c762f08d039c8103f71c747e00304f209c2254f4") (:revdesc . "c762f08d039c") (:keywords "convenience" "mode-line"))])
+ (total-recall . [(20250622 1434) ((emacs (29 4))) "Spaced repetition system" tar ((:url . "https://github.com/phf-1/total-recall") (:commit . "dba59b6f10829d5a3373f1ad6fc4b4a73134180b") (:revdesc . "dba59b6f1082") (:authors ("Pierre-Henry FRÖHRING" . "contact@phfrohring.com")) (:maintainers ("Pierre-Henry FRÖHRING" . "contact@phfrohring.com")) (:maintainer "Pierre-Henry FRÖHRING" . "contact@phfrohring.com"))])
+ (totd . [(20150519 1440) ((s (1 9 0)) (cl-lib (0 5))) "Display a random daily emacs command" tar ((:url . "https://gitlab.com/egh/emacs-totd") (:commit . "a715f7f2df416b8a6c827a9493ce7004180a3a4f") (:revdesc . "a715f7f2df41") (:keywords "help") (:authors ("Erik Hetzner" . "egh@e6h.org")) (:maintainers ("Erik Hetzner" . "egh@e6h.org")) (:maintainer "Erik Hetzner" . "egh@e6h.org"))])
+ (totp . [(20240102 1721) ((emacs (27 1))) "Time-based One-time Password (TOTP)" tar ((:url . "https://github.com/juergenhoetzel/emacs-totp") (:commit . "fe05ce6130ff1e9a76fc2aca289083475f70fd52") (:revdesc . "fe05ce6130ff") (:keywords "tools" "pass" "password") (:authors ("Jürgen Hötzel" . "juergen@hoetzel.info")) (:maintainers ("Jürgen Hötzel" . "juergen@hoetzel.info")) (:maintainer "Jürgen Hötzel" . "juergen@hoetzel.info"))])
+ (totp-auth . [(20250312 2000) ((emacs (27 1)) (base32 (0 1))) "RFC6238 TOTP" tar ((:url . "https://gitlab.com/fledermaus/totp.el") (:commit . "6acb5f3cdac840fc2d1e5c4b73a90f4c035d7116") (:revdesc . "6acb5f3cdac8") (:keywords "2fa" "two-factor" "totp" "otp" "password" "comm") (:authors ("Vivek Das Mohapatra" . "vivek@etla.org")) (:maintainers ("Vivek Das Mohapatra" . "vivek@etla.org")) (:maintainer "Vivek Das Mohapatra" . "vivek@etla.org"))])
+ (toxi-theme . [(20160424 2126) ((emacs (24))) "A dark color theme by toxi" tar ((:url . "http://bitbucket.org/postspectacular/toxi-theme/") (:commit . "9e572c6e149249b96f64722cf6f86c3aaf5f2ede") (:revdesc . "9e572c6e1492") (:authors ("Karsten Schmidt" . "info@postspectacular.com")) (:maintainers ("Karsten Schmidt" . "info@postspectacular.com")) (:maintainer "Karsten Schmidt" . "info@postspectacular.com"))])
+ (tp . [(20260509 802) ((emacs (28 1)) (transient (0 5 0))) "Utilities for transient menus that POST to an API" tar ((:url . "https://codeberg.org/martianh/tp.el") (:commit . "a83cd422cca09bc863a7179f1c5b5a35435e0d32") (:revdesc . "a83cd422cca0") (:keywords "convenience" "api" "requests") (:authors ("Marty Hiatt" . "martianh@disroot.org")) (:maintainers ("Marty Hiatt" . "martianh@disroot.org")) (:maintainer "Marty Hiatt" . "martianh@disroot.org"))])
+ (tql-mode . [(20170724 254) ((emacs (24))) "TQL mode" tar ((:url . "https://github.com/tiros-dev/tql-mode") (:commit . "488add79eb3fc8ec02aedaa997fe1ed9e5c3e638") (:revdesc . "488add79eb3f") (:keywords "languages" "tql") (:authors ("Sean McLaughlin" . "seanmcl@gmail.com")) (:maintainers ("Sean McLaughlin" . "seanmcl@gmail.com")) (:maintainer "Sean McLaughlin" . "seanmcl@gmail.com"))])
+ (tr-ime . [(20220604 1107) ((emacs (27 1)) (w32-ime (0 0 1))) "Emulator of IME patch for Windows" tar ((:url . "https://github.com/trueroad/tr-emacs-ime-module") (:commit . "87f0677220b755f947fe5f373b6a34e1afb82f3c") (:revdesc . "87f0677220b7") (:authors ("Masamichi Hosoda" . "trueroad@trueroad.jp")) (:maintainers ("Masamichi Hosoda" . "trueroad@trueroad.jp")) (:maintainer "Masamichi Hosoda" . "trueroad@trueroad.jp"))])
+ (traad . [(20180730 48) ((dash (2 13 0)) (deferred (0 3 2)) (popup (0 5 0)) (request (0 2 0)) (request-deferred (0 2 0)) (virtualenvwrapper (20151123)) (f (0 20 0)) (bind-map (1 1 1))) "Emacs interface to the traad refactoring server" tar ((:url . "https://github.com/abingham/traad") (:commit . "98e23363b7e8a590a2f55976123a8c3da75c87a5") (:revdesc . "98e23363b7e8") (:authors ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (tracking . [(20250831 39) nil "Buffer modification tracking" tar ((:url . "https://github.com/emacs-circe/circe/wiki/Tracking") (:commit . "254814886cb4fdeba0ab1a9df33f7cbcdc1900cf") (:revdesc . "254814886cb4") (:authors ("Jorgen Schaefer" . "forcer@forcix.cx")) (:maintainers ("Jorgen Schaefer" . "forcer@forcix.cx")) (:maintainer "Jorgen Schaefer" . "forcer@forcix.cx"))])
+ (tracwiki-mode . [(20150119 1621) ((xml-rpc (1 6 8))) "Emacs Major mode for working with Trac" tar ((:url . "https://github.com/merickson/tracwiki-mode") (:commit . "6a620444d59b438f42383b48cd4c19c03105dba6") (:revdesc . "6a620444d59b") (:keywords "trac" "wiki" "tickets") (:authors ("Matthew Erickson" . "peawee@peawee.net")) (:maintainers ("Matthew Erickson" . "peawee@peawee.net")) (:maintainer "Matthew Erickson" . "peawee@peawee.net"))])
+ (trailing-newline-indicator . [(20260516 2154) ((emacs (26 1))) "Show an indicator for the trailing newline" tar ((:url . "https://github.com/saulotoledo/trailing-newline-indicator") (:commit . "52af1d7d63499020b21d57147cd7d27bc1bb35d3") (:revdesc . "52af1d7d6349") (:keywords "convenience" "display" "editing") (:authors ("Saulo S. de Toledo" . "saulotoledo@gmail.com")) (:maintainers ("Saulo S. de Toledo" . "saulotoledo@gmail.com")) (:maintainer "Saulo S. de Toledo" . "saulotoledo@gmail.com"))])
+ (tramp-auto-auth . [(20191027 1419) ((emacs (24 4)) (tramp (0 0))) "TRAMP automatic authentication library" tar ((:url . "https://github.com/oitofelix/tramp-auto-auth") (:commit . "f15a12dfab651aff60f4a9d70f868030a12344ac") (:revdesc . "f15a12dfab65") (:keywords "comm" "processes") (:authors ("Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org")) (:maintainers ("Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org")) (:maintainer "Bruno Félix Rezende Ribeiro" . "oitofelix@gnu.org"))])
+ (tramp-hdfs . [(20210526 339) ((emacs (24 4))) "Tramp extension to access hadoop/hdfs file system in Emacs" tar ((:url . "https://github.com/raghavgautam/tramp-hdfs") (:commit . "aa93bdbb3d5619c262ce53af1981edcd2a0705e5") (:revdesc . "aa93bdbb3d56") (:keywords "tramp" "emacs" "hdfs" "hadoop" "webhdfs" "rest") (:authors ("Raghav Kumar Gautam" . "raghav@apache.org")) (:maintainers ("Raghav Kumar Gautam" . "raghav@apache.org")) (:maintainer "Raghav Kumar Gautam" . "raghav@apache.org"))])
+ (tramp-term . [(20250628 823) nil "Automatic setup of directory tracking in ssh sessions" tar ((:url . "https://github.com/randymorris/tramp-term.el") (:commit . "4af42a379bfdbb6549d52a7c3460ba59264f19da") (:revdesc . "4af42a379bfd") (:keywords "comm" "terminals") (:authors ("Randy Morris" . "randy.morris@archlinux.us")) (:maintainers ("Randy Morris" . "randy.morris@archlinux.us")) (:maintainer "Randy Morris" . "randy.morris@archlinux.us"))])
+ (transducers . [(20251118 2154) ((emacs (28 1))) "Ergonomic, efficient data processing" tar ((:url . "https://github.com/fosskers/transducers.el") (:commit . "7d36c9cdbd2179479314e4c277ecaa8020481078") (:revdesc . "7d36c9cdbd21") (:keywords "lisp") (:authors ("Colin Woodbury" . "colin@fosskers.ca")) (:maintainers ("Colin Woodbury" . "colin@fosskers.ca")) (:maintainer "Colin Woodbury" . "colin@fosskers.ca"))])
+ (transfer-sh . [(20200601 1708) ((emacs (24 3)) (async (1 0))) "Simple interface for sending buffer contents to transfer.sh" tar ((:url . "https://gitlab.com/tuedachu/transfer-sh.el") (:commit . "0621a66d00ec91a209a542c10b158095088bd44d") (:revdesc . "0621a66d00ec") (:keywords "comm" "convenience" "files") (:authors ("S. Roskamp" . "steffen.roskamp@gmail.com") ("A. Hoffmann" . "tuedachu@gmail.com")) (:maintainers ("S. Roskamp" . "steffen.roskamp@gmail.com") ("A. Hoffmann" . "tuedachu@gmail.com")) (:maintainer "S. Roskamp" . "steffen.roskamp@gmail.com"))])
+ (transform-symbol-at-point . [(20241202 1802) ((emacs (24)) (s (1 12 0)) (transient (0 3 7))) "Transforming your symbols at point" tar ((:url . "https://github.com/waymondo/transform-symbol-at-point") (:commit . "57911a5065a694bf0b404bde2ebf64b8ee8f5d89") (:revdesc . "57911a5065a6") (:keywords "convenience" "tools"))])
+ (transient . [(20260825 819) ((emacs (28 1)) (compat (31 0)) (cond-let (1 1)) (llama (1 0)) (seq (2 24))) "Transient commands" tar ((:url . "https://github.com/magit/transient") (:commit . "9ac2d48909e1d34890a4a17581d6693dcc867800") (:revdesc . "9ac2d48909e1") (:keywords "extensions") (:authors ("Jonas Bernoulli" . "emacs.transient@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.transient@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.transient@jonas.bernoulli.dev"))])
+ (transient-dwim . [(20260516 853) ((emacs (28 1)) (transient (0 13 3))) "Useful preset transient commands" tar ((:url . "https://github.com/conao3/transient-dwim.el") (:commit . "f1973c1f75a9c4fd122ebba878aac7f1d0d54111") (:revdesc . "f1973c1f75a9") (:keywords "tools") (:authors ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainer "Naoya Yamashita" . "conao3@gmail.com"))])
+ (transient-extras . [(20230721 839) ((emacs (28 1))) "Extra features for transient" tar ((:url . "https://github.com/haji-ali/transient-extras.git") (:commit . "ca0d5c597382615f0ee8300ff8718f54f8214359") (:revdesc . "ca0d5c597382") (:keywords "convenience") (:authors ("Al Haji-Ali" . "abdo.haji.ali@gmail.com") ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Al Haji-Ali" . "abdo.haji.ali@gmail.com") ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Al Haji-Ali" . "abdo.haji.ali@gmail.com"))])
+ (transient-extras-a2ps . [(20230303 1511) ((emacs (28 1)) (transient-extras (1 0 0))) "A transient interface to a2ps" tar ((:url . "https://git.sr.ht/~swflint/transient-extras-a2ps") (:commit . "e91a1cddb1f0cb8b99d2bd30db64d467e5fa7ea8") (:revdesc . "e91a1cddb1f0") (:keywords "convenience") (:authors ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainers ("Samuel W. Flint" . "swflint@flintfam.org")) (:maintainer "Samuel W. Flint" . "swflint@flintfam.org"))])
+ (transient-extras-lp . [(20230418 1112) ((emacs (28 1)) (transient-extras (1 0 0))) "A transient interface to lp" tar ((:url . "https://github.com/haji-ali/transient-extras.git") (:commit . "00a4b22882399c0355a2026b1a1c98974e669e62") (:revdesc . "00a4b2288239") (:keywords "convenience") (:authors ("Al Haji-Ali" . "abdo.haji.ali@gmail.com")) (:maintainers ("Al Haji-Ali" . "abdo.haji.ali@gmail.com")) (:maintainer "Al Haji-Ali" . "abdo.haji.ali@gmail.com"))])
+ (transient-posframe . [(20241212 940) ((emacs (26 1)) (posframe (1 4 4)) (transient (0 8 2))) "Using posframe to show transient" tar ((:url . "https://github.com/yanghaoxie/transient-posframe") (:commit . "1eb4ed61ad9f0272a887e05f00708f85f2d9efc5") (:revdesc . "1eb4ed61ad9f") (:keywords "convenience" "bindings" "tooltip") (:maintainers ("Yanghao Xie" . "yhaoxie@gmail.com")) (:maintainer "Yanghao Xie" . "yhaoxie@gmail.com"))])
+ (translate-mode . [(20220511 1357) ((emacs (24 3))) "Paragraph-oriented side-by-side doc translation workflow" tar ((:url . "https://github.com/rayw000/translate-mode") (:commit . "e1940b333241a4d0c224b7b875962736ca2b693b") (:revdesc . "e1940b333241") (:keywords "translate" "convenience" "editing") (:authors ("Ray Wang" . "rayw.public@gmail.com")) (:maintainers ("Ray Wang" . "rayw.public@gmail.com")) (:maintainer "Ray Wang" . "rayw.public@gmail.com"))])
+ (transmission . [(20250524 340) ((emacs (24 4)) (let-alist (1 0 5))) "Interface to a Transmission session" tar ((:url . "https://github.com/holomorph/transmission") (:commit . "ae36637fe63e530c7b8baa59bf566a99e40fbfe4") (:revdesc . "ae36637fe63e") (:keywords "comm" "tools") (:authors ("Mark Oteiza" . "mvoteiza@udel.edu")) (:maintainers ("Mark Oteiza" . "mvoteiza@udel.edu")) (:maintainer "Mark Oteiza" . "mvoteiza@udel.edu"))])
+ (transpose-frame . [(20221109 2053) nil "Transpose windows arrangement in a frame" tar ((:url . "https://github.com/emacsorphanage/transpose-frame") (:commit . "94c87794d53883a2358d13da264ad8dab9a52daa") (:revdesc . "94c87794d538") (:keywords "window"))])
+ (transpose-mark . [(20150405 716) nil "Transpose data using the Emacs mark" tar ((:url . "https://github.com/kwrooijen/transpose-mark") (:commit . "667327602004794de97214cf336ac61650ef75b7") (:revdesc . "667327602004") (:keywords "transpose" "convenience") (:authors ("Kevin W. van Rooijen" . "kevin.van.rooijen@attichacker.com")) (:maintainers ("Kevin W. van Rooijen" . "kevin.van.rooijen@attichacker.com")) (:maintainer "Kevin W. van Rooijen" . "kevin.van.rooijen@attichacker.com"))])
+ (transwin . [(20260101 603) ((emacs (24 3))) "Make window/frame transparent" tar ((:url . "https://github.com/jcs-elpa/transwin") (:commit . "fb78576162d0446fc5765d180aba98b0730b1f37") (:revdesc . "fb78576162d0") (:keywords "frames" "window" "transparent") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (trashed . [(20230811 157) ((emacs (25 1))) "Viewing/editing system trash can" tar ((:url . "https://github.com/shingo256/trashed") (:commit . "52a52a363ce53855790e7a59aed6976eec18c9ea") (:revdesc . "52a52a363ce5") (:keywords "files" "convenience" "unix") (:authors ("Shingo Tanaka" . "shingo.fg8@gmail.com")) (:maintainers ("Shingo Tanaka" . "shingo.fg8@gmail.com")) (:maintainer "Shingo Tanaka" . "shingo.fg8@gmail.com"))])
+ (travis . [(20150825 1138) ((s (1 9 0)) (dash (2 9 0)) (pkg-info (0 5 0)) (request (0 1 0))) "Emacs client for Travis" tar ((:url . "https://github.com/nlamirault/emacs-travis") (:commit . "c8769d3db10ed4604969049e3bd276afa0a0138e") (:revdesc . "c8769d3db10e") (:keywords "travis") (:authors ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainers ("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")) (:maintainer "Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))])
+ (tray . [(20260701 1300) ((emacs (28 1)) (compat (31 0)) (transient (0 13))) "Various transient menus" tar ((:url . "https://github.com/tarsius/tray") (:commit . "0e6f331dd7fcef6a591c4954808a6b262522fa40") (:revdesc . "0e6f331dd7fc") (:keywords "convenience") (:authors ("Jonas Bernoulli" . "emacs.tray@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.tray@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.tray@jonas.bernoulli.dev"))])
+ (tree-edit . [(20231124 1712) ((emacs (29 1)) (dash (2 19)) (reazon (0 4 0)) (s (0 0 0))) "A library for structural refactoring and editing" tar ((:url . "https://github.com/ethan-leba/tree-edit") (:commit . "3e71d276e7369ff4525f0e2b84356a31fe6b7782") (:revdesc . "3e71d276e736") (:authors ("Ethan Leba" . "ethanleba5@gmail.com")) (:maintainers ("Ethan Leba" . "ethanleba5@gmail.com")) (:maintainer "Ethan Leba" . "ethanleba5@gmail.com"))])
+ (tree-mode . [(20151104 1331) nil "A mode to manage tree widgets" tar ((:url . "https://github.com/emacsorphanage/tree-mode") (:commit . "b06078826d5875d74b0e7b7ac47b0d0917610534") (:revdesc . "b06078826d58") (:keywords "help" "convenience" "widget") (:authors (nil . "wenbinye@163.com")) (:maintainers (nil . "wenbinye@163.com")) (:maintainer nil . "wenbinye@163.com"))])
+ (tree-sitter . [(20260116 9) ((emacs (27 1)) (tsc (0 19 4))) "Incremental parsing system" tar ((:url . "https://github.com/emacs-tree-sitter/elisp-tree-sitter") (:commit . "8f0bd387ad7a1cf7e8fdd5977d386a17ea70a82d") (:revdesc . "8f0bd387ad7a") (:keywords "languages" "tools" "parsers" "tree-sitter") (:authors ("Tuấn-Anh Nguyễn" . "ubolonton@gmail.com")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (tree-sitter-ess-r . [(20250729 1500) ((emacs (26 1)) (ess (18 10 1)) (tree-sitter (0 12 1)) (tree-sitter-langs (0 12 0))) "R with tree-sitter" tar ((:url . "https://github.com/ShuguangSun/tree-sitter-ess-r") (:commit . "205b105c72220ae0db5e1cbbb1c54756c7492761") (:revdesc . "205b105c7222") (:keywords "tools") (:authors ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainers ("Shuguang Sun" . "shuguang79@qq.com")) (:maintainer "Shuguang Sun" . "shuguang79@qq.com"))])
+ (tree-sitter-indent . [(20220411 1439) ((emacs (26 1)) (tree-sitter (0 12 1)) (seq (2 20))) "Provide indentation with a Tree-sitter backend" tar ((:url . "https://codeberg.org/FelipeLema/tree-sitter-indent.el") (:commit . "4ef246db3e4ff99f672fe5e4b416c890f885c09e") (:revdesc . "4ef246db3e4f") (:keywords "convenience" "internal") (:authors ("Felipe Lema" . "felipelema@mortemale.org")) (:maintainers ("Felipe Lema" . "felipelema@mortemale.org")) (:maintainer "Felipe Lema" . "felipelema@mortemale.org"))])
+ (tree-sitter-ispell . [(20240610 2252) ((emacs (26 1)) (tree-sitter (0 15 0))) "Run ispell on tree-sitter text nodes" tar ((:url . "https://github.com/erickgnavar/tree-sitter-ispell.el") (:commit . "a06eff00affff85992d2a8ad0019034747ffeb70") (:revdesc . "a06eff00afff") (:authors ("Erick Navarro" . "erick@navarro.io")) (:maintainers ("Erick Navarro" . "erick@navarro.io")) (:maintainer "Erick Navarro" . "erick@navarro.io"))])
+ (tree-sitter-langs . [(20260729 1912) ((emacs (26 1)) (tree-sitter (0 15 0))) "Grammar bundle for tree-sitter" tar ((:url . "https://github.com/emacs-tree-sitter/tree-sitter-langs") (:commit . "1a827f821fbcb967db5eecccd569b7fa4b93d152") (:revdesc . "1a827f821fbc") (:keywords "languages" "tools" "parsers" "tree-sitter") (:authors ("Tuấn-Anh Nguyễn" . "ubolonton@gmail.com")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (treebundel . [(20260613 317) ((emacs (29 1))) "Bundle related git-worktrees together" tar ((:url . "https://github.com/purplg/treebundel") (:commit . "9b64c358338e90c02e9aedb4689a3c1a8be29abf") (:revdesc . "9b64c358338e") (:keywords "convenience" "vc"))])
+ (treefactor . [(20200516 1631) ((emacs (26 1)) (dash (2 16 0)) (f (0 20 0)) (org (9 2 6)) (avy (0 5 0))) "Restructure your messy Org documents" tar ((:url . "https://github.com/cyberthal/treefactor") (:commit . "75357757022a4399ab772ff0d92065bd114dabe9") (:revdesc . "75357757022a") (:keywords "outlines" "files" "convenience") (:authors ("Leo Littlebook" . "Leo.Littlebook@gmail.com")) (:maintainers ("Leo Littlebook" . "Leo.Littlebook@gmail.com")) (:maintainer "Leo Littlebook" . "Leo.Littlebook@gmail.com"))])
+ (treemacs . [(20251226 1307) ((emacs (26 1)) (cl-lib (0 5)) (dash (2 11 0)) (s (1 12 0)) (ace-window (0 9 0)) (pfuture (1 7)) (hydra (0 13 2)) (ht (2 2)) (cfrs (1 3 2))) "A tree style file explorer package" tar ((:url . "https://github.com/Alexander-Miller/treemacs") (:commit . "2ab5a3c89fa01bbbd99de9b8986908b2bc5a7b49") (:revdesc . "2ab5a3c89fa0") (:authors ("Alexander Miller" . "alexanderm@web.de")) (:maintainers ("Alexander Miller" . "alexanderm@web.de")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (treemacs-all-the-icons . [(20250320 2145) ((emacs (26 1)) (all-the-icons (4 0 1)) (treemacs (0 0))) "All-the-icons integration for treemacs" tar ((:url . "https://github.com/Alexander-Miller/treemacs") (:commit . "55079b017fb821a34ace398cd3d8c5b556a22f6d") (:revdesc . "55079b017fb8") (:authors ("Eric Dallo" . "ercdll1337@gmail.com")) (:maintainers ("Eric Dallo" . "ercdll1337@gmail.com")) (:maintainer "Eric Dallo" . "ercdll1337@gmail.com"))])
+ (treemacs-evil . [(20250320 2145) ((emacs (26 1)) (evil (1 2 12)) (treemacs (0 0))) "Evil mode integration for treemacs" tar ((:url . "https://github.com/Alexander-Miller/treemacs") (:commit . "55079b017fb821a34ace398cd3d8c5b556a22f6d") (:revdesc . "55079b017fb8") (:authors ("Alexander Miller" . "alexanderm@web.de")) (:maintainers ("Alexander Miller" . "alexanderm@web.de")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (treemacs-icons-dired . [(20250320 2145) ((treemacs (0 0)) (emacs (26 1))) "Treemacs icons for dired" tar ((:url . "https://github.com/Alexander-Miller/treemacs") (:commit . "55079b017fb821a34ace398cd3d8c5b556a22f6d") (:revdesc . "55079b017fb8") (:authors ("Alexander Miller" . "alexanderm@web.de")) (:maintainers ("Alexander Miller" . "alexanderm@web.de")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (treemacs-magit . [(20250726 2233) ((emacs (26 1)) (treemacs (0 0)) (pfuture (1 3)) (magit (2 90 0))) "Magit integration for treemacs" tar ((:url . "https://github.com/Alexander-Miller/treemacs") (:commit . "68e444e066a30d70a201fb162c8cf3d472226853") (:revdesc . "68e444e066a3") (:authors ("Alexander Miller" . "alexanderm@web.de")) (:maintainers ("Alexander Miller" . "alexanderm@web.de")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (treemacs-nerd-icons . [(20251024 1914) ((emacs (24 3)) (nerd-icons (0 0 1)) (treemacs (0 0))) "Emacs Nerd Font Icons theme for treemacs" tar ((:url . "https://github.com/rainstormstudio/treemacs-nerd-icons") (:commit . "0c5ddcb978da639f01ddb023febc40fc755171e5") (:revdesc . "0c5ddcb978da") (:keywords "lisp") (:authors ("Hongyu Ding" . "rainstormstudio@yahoo.com")) (:maintainers ("Hongyu Ding" . "rainstormstudio@yahoo.com")) (:maintainer "Hongyu Ding" . "rainstormstudio@yahoo.com"))])
+ (treemacs-persp . [(20250320 2145) ((emacs (26 1)) (treemacs (0 0)) (persp-mode (2 9 7)) (dash (2 11 0))) "Persp-mode integration for treemacs" tar ((:url . "https://github.com/Alexander-Miller/treemacs") (:commit . "55079b017fb821a34ace398cd3d8c5b556a22f6d") (:revdesc . "55079b017fb8") (:authors ("Alexander Miller" . "alexanderm@web.de")) (:maintainers ("Alexander Miller" . "alexanderm@web.de")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (treemacs-perspective . [(20250320 2145) ((emacs (26 1)) (treemacs (0 0)) (perspective (2 8)) (dash (2 11 0))) "Perspective integration for treemacs" tar ((:url . "https://github.com/Alexander-Miller/treemacs") (:commit . "55079b017fb821a34ace398cd3d8c5b556a22f6d") (:revdesc . "55079b017fb8") (:authors ("Alexander Miller" . "alexanderm@web.de") ("Jason Dufair" . "jase@dufair.org")) (:maintainers ("Alexander Miller" . "alexanderm@web.de") ("Jason Dufair" . "jase@dufair.org")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (treemacs-projectile . [(20250320 2206) ((emacs (26 1)) (projectile (0 14 0)) (treemacs (0 0))) "Projectile integration for treemacs" tar ((:url . "https://github.com/Alexander-Miller/treemacs") (:commit . "f80a309319c2374585babcb3e00ea6f3314160f3") (:revdesc . "f80a309319c2") (:authors ("Alexander Miller" . "alexanderm@web.de")) (:maintainers ("Alexander Miller" . "alexanderm@web.de")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (treemacs-tab-bar . [(20250320 2145) ((emacs (27 1)) (treemacs (0 0)) (dash (2 11 0))) "Tab bar integration for treemacs" tar ((:url . "https://github.com/Alexander-Miller/treemacs") (:commit . "55079b017fb821a34ace398cd3d8c5b556a22f6d") (:revdesc . "55079b017fb8") (:authors ("Alexander Miller" . "alexanderm@web.de") ("Jason Dufair" . "jase@dufair.org") ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainers ("Alexander Miller" . "alexanderm@web.de") ("Jason Dufair" . "jase@dufair.org") ("Aaron Jensen" . "aaronjensen@gmail.com")) (:maintainer "Alexander Miller" . "alexanderm@web.de"))])
+ (treepy . [(20260531 1144) ((emacs (27 1))) "Generic tree traversal tools" tar ((:url . "https://github.com/volrath/treepy.el") (:commit . "806c000bd40153d17dfa5709c6d19546d507a416") (:revdesc . "806c000bd401") (:keywords "lisp" "maint" "tools") (:authors ("Daniel Barreto" . "daniel.barreto.n@gmail.com")) (:maintainers ("Daniel Barreto" . "daniel.barreto.n@gmail.com")) (:maintainer "Daniel Barreto" . "daniel.barreto.n@gmail.com"))])
+ (treesit-auto . [(20260817 1304) ((emacs (29 0))) "Automatically use tree-sitter enhanced major modes" tar ((:url . "https://github.com/renzmann/treesit-auto.git") (:commit . "c227806dddd4b413009a453c450285d1123e7d72") (:revdesc . "c227806dddd4") (:keywords "treesitter" "auto" "automatic" "major" "mode" "fallback" "convenience") (:authors ("Robb Enzmann" . "robbenzmann@gmail.com")) (:maintainers ("Robb Enzmann" . "robbenzmann@gmail.com")) (:maintainer "Robb Enzmann" . "robbenzmann@gmail.com"))])
+ (treesit-ispell . [(20241104 1520) ((emacs (29 1))) "Run ispell on tree-sitter text nodes" tar ((:url . "https://github.com/erickgnavar/treesit-ispell.el") (:commit . "fd1598fb16fe99dc8d8245974641c3e474dc31d1") (:revdesc . "fd1598fb16fe") (:authors ("Erick Navarro" . "erick@navarro.io")) (:maintainers ("Erick Navarro" . "erick@navarro.io")) (:maintainer "Erick Navarro" . "erick@navarro.io"))])
+ (treeview . [(20241101 115) ((emacs (25 1))) "A generic tree navigation library" tar ((:url . "https://github.com/tilmanrassy/emacs-treeview") (:commit . "9a1a16f84fc3c368443641f7a71aa2407ad91d38") (:revdesc . "9a1a16f84fc3") (:keywords "lisp" "tools" "internal" "convenience") (:authors ("Tilman Rassy" . "tilman.rassy@googlemail.com")) (:maintainers ("Tilman Rassy" . "tilman.rassy@googlemail.com")) (:maintainer "Tilman Rassy" . "tilman.rassy@googlemail.com"))])
+ (trident-mode . [(20190410 2036) ((emacs (24)) (slime (20130526)) (skewer-mode (1 5 0)) (dash (1 0 3))) "Live Parenscript interaction" tar ((:url . "https://github.com/johnmastro/trident-mode.el") (:commit . "109a1bc10bd0c4b47679a6ca5c4cd27c7c8d4ccb") (:revdesc . "109a1bc10bd0") (:keywords "languages" "lisp" "processes" "tools") (:authors ("John Mastro" . "john.b.mastro@gmail.com")) (:maintainers ("John Mastro" . "john.b.mastro@gmail.com")) (:maintainer "John Mastro" . "john.b.mastro@gmail.com"))])
+ (trimspace-mode . [(20240629 1843) ((emacs (24 3))) "A minor mode to trim trailing whitespace and newlines" tar ((:url . "https://git.sr.ht/~bkhl/trimspace-mode") (:commit . "68fb627ba552644ddee0cf9048b2fefd722a59fb") (:revdesc . "68fb627ba552") (:keywords "files" "convenience") (:authors ("Björn Lindström" . "bkhl@elektrubadur.se")) (:maintainers ("Björn Lindström" . "bkhl@elektrubadur.se")) (:maintainer "Björn Lindström" . "bkhl@elektrubadur.se"))])
+ (trinary . [(20230301 2044) ((emacs (24))) "Trinary logic" tar ((:url . "https://github.com/emacs-elsa/trinary-logic") (:commit . "d4869d260f22d13a9a71327a6d40edc6980d022e") (:revdesc . "d4869d260f22") (:keywords "languages") (:authors ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matúš Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matúš Goljer" . "matus.goljer@gmail.com"))])
+ (tron-legacy-theme . [(20260610 1908) nil "An original retro-futuristic theme inspired by Tron: Legacy" tar ((:url . "https://github.com/ianpan870102/tron-legacy-emacs-theme") (:commit . "fab4946d6266f73d5ec25660f67bd186dc44d426") (:revdesc . "fab4946d6266"))])
+ (trope-mode . [(20250120 2029) ((emacs (29 1))) "Major mode to edit TV Tropes format \".trp\" files" tar ((:url . "https://github.com/TriAttack238/trope-mode") (:commit . "50ff6d4181a01115aa5a483eb16bc7bfc4b1aaa9") (:revdesc . "50ff6d4181a0") (:keywords "tv tropes" "trope" "wp") (:authors ("Sean Vo" . "triattack238@gmail.com")) (:maintainers ("Sean Vo" . "triattack238@gmail.com")) (:maintainer "Sean Vo" . "triattack238@gmail.com"))])
+ (trr . [(20191019 1403) nil "A type-writing training program on GNU Emacs" tar ((:url . "https://github.com/kawabata/emacs-trr") (:commit . "f841173e11213ac6916b2d3394b28fb202543871") (:revdesc . "f841173e1121") (:keywords "games" "faces") (:authors ("YAMAMOTO Hirotaka" . "ymmt@is.s.u-tokyo.ac.jp") ("KATO Kenji" . "kato@suri.co.jp") ("INAMURA You" . "inamura@icot.or.jp")) (:maintainers ("YAMAMOTO Hirotaka" . "ymmt@is.s.u-tokyo.ac.jp") ("KATO Kenji" . "kato@suri.co.jp") ("INAMURA You" . "inamura@icot.or.jp")) (:maintainer "YAMAMOTO Hirotaka" . "ymmt@is.s.u-tokyo.ac.jp"))])
+ (truename-cache . [(20260726 926) ((emacs (27 1)) (compat (30 1))) "Efficiently de-dup file-names" tar ((:url . "https://github.com/meedstrom/truename-cache") (:commit . "5de00fbb6df3e3636095dc02d5c726f200213753") (:revdesc . "5de00fbb6df3") (:keywords "lisp") (:authors ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainers ("Martin Edström" . "meedstrom91@gmail.com")) (:maintainer "Martin Edström" . "meedstrom91@gmail.com"))])
+ (trust-manager . [(20260724 1957) ((emacs (30 1))) "Convenient trust management" tar ((:url . "https://git.sr.ht/~eshel/trust-manager") (:commit . "0ff311bb59c9f1bb1ecdf413fa2bfa353bf389d7") (:revdesc . "0ff311bb59c9") (:keywords "security" "trust" "files") (:authors ("Eshel Yaron" . "me@eshelyaron.com")) (:maintainers ("Eshel Yaron" . "me@eshelyaron.com")) (:maintainer "Eshel Yaron" . "me@eshelyaron.com"))])
+ (truthy . [(20140508 2041) ((list-utils (0 4 2))) "Test the content of a value" tar ((:url . "https://github.com/rolandwalker/truthy") (:commit . "782cee08fbb13f9be71ce8e88d980ec14db24a0f") (:revdesc . "782cee08fbb1") (:keywords "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (try . [(20181204 236) ((emacs (24))) "Try out Emacs packages" tar ((:url . "https://github.com/larstvei/try") (:commit . "8831ded1784df43a2bd56c25ad3d0650cdb9df1d") (:revdesc . "8831ded1784d") (:keywords "packages") (:authors ("Lars Tveito" . "larstvei@ifi.uio.no")) (:maintainers ("Lars Tveito" . "larstvei@ifi.uio.no")) (:maintainer "Lars Tveito" . "larstvei@ifi.uio.no"))])
+ (ts . [(20220822 2313) ((emacs (26 1)) (dash (2 14 1)) (s (1 12 0))) "Timestamp and date/time library" tar ((:url . "https://github.com/alphapapa/ts.el") (:commit . "552936017cfdec89f7fc20c254ae6b37c3f22c5b") (:revdesc . "552936017cfd") (:keywords "calendar" "lisp") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (ts-comint . [(20181219 719) nil "Run a Typescript interpreter in an inferior process window" tar ((:url . "https://github.com/josteink/ts-comint") (:commit . "b280cfe9fe5ecec9d5970043b6b2866f644b39ad") (:revdesc . "b280cfe9fe5e") (:keywords "typescript" "node" "inferior-mode" "convenience") (:authors ("Paul Huff" . "paul.huff@gmail.com") ("Stefano Mazzucco" . "MYFIRSTNAME-AT-CURSO-DOT-RE")) (:maintainers ("Paul Huff" . "paul.huff@gmail.com") ("Stefano Mazzucco" . "MYFIRSTNAME-AT-CURSO-DOT-RE")) (:maintainer "Paul Huff" . "paul.huff@gmail.com"))])
+ (tsc . [(20260116 9) ((emacs (27 1))) "Core Tree-sitter APIs" tar ((:url . "https://github.com/emacs-tree-sitter/elisp-tree-sitter") (:commit . "8f0bd387ad7a1cf7e8fdd5977d386a17ea70a82d") (:revdesc . "8f0bd387ad7a") (:keywords "languages" "tools" "parsers" "dynamic-modules" "tree-sitter") (:authors ("Tuấn-Anh Nguyễn" . "ubolonton@gmail.com") ("Jorge Javier Araya Navarro" . "jorgejavieran@yahoo.com.mx")) (:maintainers ("Jen-Chieh Shen" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh Shen" . "jcs090218@gmail.com"))])
+ (tsort . [(20240417 120) ((emacs (24 4)) (compat (29 1 4 2))) "Topological sort for Emacs Lisp" tar ((:url . "https://github.com/ehawkvu/tsort.el") (:commit . "32e4f5b7b6de6f012a51f3d7ec151579d7b3e4a7") (:revdesc . "32e4f5b7b6de") (:keywords "algorithm" "tools") (:authors ("Ethan Hawk" . "ethan.hawk@valpo.edu")) (:maintainers ("Ethan Hawk" . "ethan.hawk@valpo.edu")) (:maintainer "Ethan Hawk" . "ethan.hawk@valpo.edu"))])
+ (tss . [(20150913 1408) ((auto-complete (1 4 0)) (json-mode (1 1 0)) (log4e (0 2 0)) (yaxception (0 1))) "Provide a interface for auto-complete.el/flymake.el on typescript-mode" tar ((:url . "https://github.com/aki2o/emacs-tss") (:commit . "81ac6351a2ae258fd0ebf916dae9bd5a179fefd0") (:revdesc . "81ac6351a2ae") (:keywords "typescript" "completion") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (tt-mode . [(20260403 1450) ((emacs (24 1))) "Major mode for editing Template Toolkit files" tar ((:url . "https://github.com/davorg/tt-mode") (:commit . "39f907c67d049c3c5d31db0b0b16e84edc323005") (:revdesc . "39f907c67d04") (:keywords "languages") (:authors ("Dave Cross" . "dave@dave.org.uk")) (:maintainers ("Dave Cross" . "dave@dave.org.uk")) (:maintainer "Dave Cross" . "dave@dave.org.uk"))])
+ (ttl-mode . [(20260210 1513) nil "Mode for Turtle (and Notation 3)" tar ((:url . "https://github.com/emacsattic/ttl-mode") (:commit . "66a9a27c828b6cc08cdd0184cfcf05beb5c2ac60") (:revdesc . "66a9a27c828b"))])
+ (tts . [(20260213 2049) ((emacs (29 1))) "Text-to-Speech (TTS)" tar ((:url . "https://github.com/DiogoDoreto/emacs-tts") (:commit . "315cec02dd3c90516165a84231820f151ac7fcdd") (:revdesc . "315cec02dd3c") (:keywords "convenience" "languages" "multimedia" "tools") (:authors ("Diogo Doreto" . "diogo@doreto.com.br")) (:maintainers ("Diogo Doreto" . "diogo@doreto.com.br")) (:maintainer "Diogo Doreto" . "diogo@doreto.com.br"))])
+ (ttx-mode . [(20260724 1803) ((emacs (30 0))) "TrueType/OpenType font viewer using ttx" tar ((:url . "https://github.com/wmedrano/ttx-mode") (:commit . "ba9b25a63abdbd97775cd8f0a7e2b81b9410d872") (:revdesc . "ba9b25a63abd") (:keywords "tools" "fonts") (:authors ("Will Medrano" . "will@wmedrano.dev")) (:maintainers ("Will Medrano" . "will@wmedrano.dev")) (:maintainer "Will Medrano" . "will@wmedrano.dev"))])
+ (tuareg . [(20260626 936) ((emacs (26 3))) "OCaml mode" tar ((:url . "https://github.com/ocaml/tuareg") (:commit . "2d67d53a66fbf9d83c0416dba3275080b1bc6dfd") (:revdesc . "2d67d53a66fb") (:keywords "ocaml" "languages") (:authors ("Albert Cohen" . "Albert.Cohen@inria.fr") ("Sam Steingold" . "sds@gnu.org") ("Christophe Troestler" . "Christophe.Troestler@umons.ac.be") ("Till Varoquaux" . "till@pps.jussieu.fr") ("Sean McLaughlin" . "seanmcl@gmail.com") ("Stefan Monnier" . "monnier@iro.umontreal.ca")) (:maintainers ("Christophe Troestler" . "Christophe.Troestler@umons.ac.be") ("Stefan Monnier" . "monnier@iro.umontreal.ca")) (:maintainer "Christophe Troestler" . "Christophe.Troestler@umons.ac.be"))])
+ (tubestatus . [(20250112 1642) ((emacs (26 1)) (request (0 3 2))) "Get the London Tube service status" tar ((:url . "https://github.com/smallwat3r/tubestatus.el") (:commit . "3d7bcfb12823c0084190b1a02bbeed3768db2bff") (:revdesc . "3d7bcfb12823") (:authors ("Matthieu Petiteau" . "matt@smallwat3r.com")) (:maintainers ("Matthieu Petiteau" . "matt@smallwat3r.com")) (:maintainer "Matthieu Petiteau" . "matt@smallwat3r.com"))])
+ (tumble . [(20160112 729) ((http-post-simple (0)) (cl-lib (0 5))) "An Tumblr mode for Emacs" tar ((:url . "https://github.com/febuiles/tumble") (:commit . "e8fd7643cccf2b6ea4170f0c5f1f87d007e7fa00") (:revdesc . "e8fd7643cccf") (:keywords "tumblr") (:authors ("Federico Builes" . "federico.builes@gmail.com")) (:maintainers ("Federico Builes" . "federico.builes@gmail.com")) (:maintainer "Federico Builes" . "federico.builes@gmail.com"))])
+ (tumblesocks . [(20250109 547) ((htmlize (1 39)) (oauth (1 0 3)) (markdown-mode (1 8 1))) "An Emacs tumblr client" tar ((:url . "https://github.com/gcr/tumblesocks") (:commit . "4e72482b21750f495bffa6785b873d86743e9c0a") (:revdesc . "4e72482b2175") (:authors ("gcr" . "gcr@sneakygcr.net")) (:maintainers ("gcr" . "gcr@sneakygcr.net")) (:maintainer "gcr" . "gcr@sneakygcr.net"))])
+ (turepo . [(20260106 1210) ((emacs (28 1))) "Open git repository in browser" tar ((:url . "https://github.com/swarnimcodes/turepo") (:commit . "4d75992fce9a78b4b8a2baedefc856d5a248576a") (:revdesc . "4d75992fce9a") (:keywords "vc" "git" "convenience" "github") (:authors ("Swarnim Barapatre" . "swarnim14.9@hotmail.com")) (:maintainers ("Swarnim Barapatre" . "swarnim14.9@hotmail.com")) (:maintainer "Swarnim Barapatre" . "swarnim14.9@hotmail.com"))])
+ (turing-machine . [(20260530 523) ((emacs (24 4))) "Single-tape Turing machine simulator" tar ((:url . "https://sr.ht/~dieggsy/turing-machine") (:commit . "165f868d5b47b93ca00bc73b0055cdcd7696449d") (:revdesc . "165f868d5b47") (:keywords "turing" "machine" "simulation") (:authors ("Diego A. Mundo" . "diegoamundo@gmail.com")) (:maintainers ("Diego A. Mundo" . "diegoamundo@gmail.com")) (:maintainer "Diego A. Mundo" . "diegoamundo@gmail.com"))])
+ (turkish . [(20260614 919) nil "Convert to Turkish characters on-the-fly" tar ((:url . "http://www.denizyuret.com/2006/11/emacs-turkish-mode.html") (:commit . "70196d4502759060bb2b0ac2f09f18ce1cbbcb20") (:revdesc . "70196d450275") (:keywords "turkish" "languages" "automatic" "conversion") (:maintainers ("Emre Sevinç" . "emre.sevinc@gmail.com")) (:maintainer "Emre Sevinç" . "emre.sevinc@gmail.com"))])
+ (turnip . [(20150309 629) ((dash (2 6 0)) (s (1 9 0))) "Interacting with tmux from Emacs" tar ((:url . "https://github.com/kljohann/turnip.el") (:commit . "2fd32562fc6fc1cda6d91aa939cfb29f9b16e9de") (:revdesc . "2fd32562fc6f") (:keywords "terminals" "tools") (:authors ("Johann Klähn" . "kljohann@gmail.com")) (:maintainers ("Johann Klähn" . "kljohann@gmail.com")) (:maintainer "Johann Klähn" . "kljohann@gmail.com"))])
+ (turtles . [(20250315 1650) ((emacs (26 1)) (compat (30 0 1 0))) "Screen-grabbing test utility" tar ((:url . "https://github.com/szermatt/turtles") (:commit . "7dca66a67173c63b27d5c6d8aa3e0248fd7f8b83") (:revdesc . "7dca66a67173") (:keywords "testing" "unix") (:authors ("Stephane Zermatten" . "szermatt@gmx.net")) (:maintainers ("Stephane Zermatten" . "szermatt@gmail.com")) (:maintainer "Stephane Zermatten" . "szermatt@gmail.com"))])
+ (twig-mode . [(20130220 1850) nil "A major mode for twig" tar ((:url . "https://github.com/moljac024/twig-mode") (:commit . "51bcd41666a234119a855b9fd348d3dae7832de1") (:revdesc . "51bcd41666a2"))])
+ (twilight-anti-bright-theme . [(20160622 848) nil "A soothing Emacs 24 light-on-dark theme" tar ((:url . "https://github.com/jimeh/twilight-anti-bright-theme.el") (:commit . "523b95fcdbf4a6a6483af314ad05354a3d80f23f") (:revdesc . "523b95fcdbf4") (:keywords "themes") (:authors ("Jim Myhrberg" . "contact@jimeh.me")) (:maintainers ("Jim Myhrberg" . "contact@jimeh.me")) (:maintainer "Jim Myhrberg" . "contact@jimeh.me"))])
+ (twilight-bright-theme . [(20130605 843) nil "A Emacs 24 faces port of the TextMate theme" tar ((:url . "https://github.com/jimeh/twilight-bright-theme.el") (:commit . "9859474333fee9f907474dbd8763f617e8bfd89c") (:revdesc . "9859474333fe") (:keywords "themes") (:authors ("Jim Myhrberg" . "contact@jimeh.me")) (:maintainers ("Jim Myhrberg" . "contact@jimeh.me")) (:maintainer "Jim Myhrberg" . "contact@jimeh.me"))])
+ (twilight-theme . [(20120412 1303) nil "Twilight theme for GNU Emacs 24 (deftheme)" tar ((:url . "https://github.com/developernotes/twilight-theme") (:commit . "77c4741cb3dcf16e53d06d6c2ffdc660c40afb5b") (:revdesc . "77c4741cb3dc") (:authors ("Nick Parker" . "nickp@developernotes.com")) (:maintainers ("Nick Parker" . "nickp@developernotes.com")) (:maintainer "Nick Parker" . "nickp@developernotes.com"))])
+ (twitch-api . [(20220420 1547) ((emacs (27 1)) (dash (2 19 0))) "An elisp interface for the Twitch.tv API" tar ((:url . "https://github.com/BenediktBroich/twitch-api") (:commit . "181681097d1fc8d7b78928f8a5b38c61d0e20ef5") (:revdesc . "181681097d1f") (:keywords "multimedia" "twitch-api"))])
+ (twtxt . [(20250604 516) ((emacs (25 1)) (request (0 2 0)) (visual-fill-column (2 4))) "A twtxt client for Emacs" tar ((:url . "https://codeberg.org/deadblackclover/twtxt-el") (:commit . "290d81bb944a20784f0c466fc4eebafb0b34dbe3") (:revdesc . "290d81bb944a") (:authors ("DEADBLACKCLOVER" . "deadblackclover@protonmail.com")) (:maintainers ("DEADBLACKCLOVER" . "deadblackclover@protonmail.com")) (:maintainer "DEADBLACKCLOVER" . "deadblackclover@protonmail.com"))])
+ (txl . [(20260202 1114) ((request (0 3 2)) (guess-language (0 0 1)) (emacs (24 4))) "Provides machine translation via DeepL's REST API" tar ((:url . "https://github.com/tmalsburg/txl.el") (:commit . "87fcd5f65cd572dd992abcbbff1b1f5990d8de7e") (:revdesc . "87fcd5f65cd5") (:keywords "wp") (:authors ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainers ("Titus von der Malsburg" . "malsburg@posteo.de")) (:maintainer "Titus von der Malsburg" . "malsburg@posteo.de"))])
+ (typescript-mode . [(20250118 2056) ((emacs (24 3))) "Major mode for editing typescript" tar ((:url . "https://github.com/ananthakumaran/typescript.el") (:commit . "481df3ad2cdf569d8e6697679669ff6206fbd2f9") (:revdesc . "481df3ad2cdf") (:keywords "typescript" "languages"))])
+ (typespec-ts-mode . [(20260802 453) ((emacs (29 1))) "Major mode for TypeSpec (using tree-sitter)" tar ((:url . "https://github.com/pradyuman/typespec-ts-mode") (:commit . "2da8117b717f290a585a136bf03a6f0a23a4bb82") (:revdesc . "2da8117b717f") (:keywords "languages" "tree-sitter" "typespec") (:authors ("Pradyuman Vig" . "me@pmn.co")) (:maintainers ("Pradyuman Vig" . "me@pmn.co")) (:maintainer "Pradyuman Vig" . "me@pmn.co"))])
+ (typewriter-roll-mode . [(20250718 2028) ((emacs (24 1))) "Aid for distraction-free writing" tar ((:url . "https://github.com/KeyWeeUsr/typewriter-roll-mode") (:commit . "dd6738e86db6492c945e3a9238e0cfbe154ad98b") (:revdesc . "dd6738e86db6") (:keywords "convenience" "line" "carriage" "writing" "distraction" "cr" "rewind") (:authors ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainers ("Peter Badida" . "keyweeusr@gmail.com")) (:maintainer "Peter Badida" . "keyweeusr@gmail.com"))])
+ (typing . [(20180830 2203) nil "The Typing Of Emacs" tar ((:url . "http://www.emacswiki.org/emacs/TypingOfEmacs") (:commit . "a2ef25dde2d8eb91bd9c0c6164cb5208208647fa") (:revdesc . "a2ef25dde2d8") (:keywords "games") (:authors ("Alex Schroeder" . "alex@gnu.org")) (:maintainers ("Alex Schroeder" . "alex@gnu.org")) (:maintainer "Alex Schroeder" . "alex@gnu.org"))])
+ (typit . [(20260802 937) ((emacs (24 4)) (f (0 18)) (mmt (0 1 1))) "Typing game similar to tests on 10 fast fingers" tar ((:url . "https://github.com/mrkkrp/typit") (:commit . "82914a7a4c437762f51f366d2f5f0e8dbb6c222c") (:revdesc . "82914a7a4c43") (:keywords "games") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))])
+ (typo . [(20200706 1714) nil "Minor mode for typographic editing" tar ((:url . "https://github.com/jorgenschaefer/typoel") (:commit . "173ebe4fc7ac38f344b16e6eaf41f79e38f20d57") (:revdesc . "173ebe4fc7ac") (:keywords "convenience" "wp") (:authors ("Jorgen Schaefer" . "forcer@forcix.cx")) (:maintainers ("Jorgen Schaefer" . "forcer@forcix.cx")) (:maintainer "Jorgen Schaefer" . "forcer@forcix.cx"))])
+ (typo-suggest . [(20200830 1143) ((emacs (24 3)) (helm (3 0)) (company (0 9 10)) (s (1 12 0)) (dash (2 13 0))) "Don't make typos with the help of helm and company" tar ((:url . "https://github.com/kadircancetin/typo-suggest") (:commit . "3014d18ae2f0b6b857bb613f373e034c743f4d2e") (:revdesc . "3014d18ae2f0") (:keywords "convenience" "wp") (:authors ("Kadir Can etin" . "kadircancetin@gmail.com")) (:maintainers ("Kadir Can etin" . "kadircancetin@gmail.com")) (:maintainer "Kadir Can etin" . "kadircancetin@gmail.com"))])
+ (typst-preview . [(20260617 2023) ((emacs (28 1)) (websocket (1 15)) (compat (30 1))) "Live preview of typst" tar ((:url . "https://github.com/havarddj/typst-preview.el") (:commit . "f2903a1b98e13be7c927de835ae0d9159dd9fb9a") (:revdesc . "f2903a1b98e1") (:keywords "convenience" "languages" "tools") (:authors ("Håvard Damm-Johnsen" . "havard-dj@proton.me")) (:maintainers ("Håvard Damm-Johnsen" . "havard-dj@proton.me")) (:maintainer "Håvard Damm-Johnsen" . "havard-dj@proton.me"))])
+ (tzc . [(20260212 715) ((emacs (28 1))) "Converts time between different time zones" tar ((:url . "https://github.com/md-arif-shaikh/tzc") (:commit . "05f97298e7b20aefb41c16abe3eeae162dd1e2f9") (:revdesc . "05f97298e7b2") (:keywords "convenience") (:authors ("Md Arif Shaikh" . "arifshaikh.astro@gmail.com")) (:maintainers ("Md Arif Shaikh" . "arifshaikh.astro@gmail.com")) (:maintainer "Md Arif Shaikh" . "arifshaikh.astro@gmail.com"))])
+ (ubuntu-theme . [(20150805 1506) nil "A theme inspired by the default terminal colors in Ubuntu" tar ((:url . "https://github.com/rocher/ubuntu-theme") (:commit . "88b0eefc75d4cbcde103057e1c5968d4c3052f69") (:revdesc . "88b0eefc75d4") (:authors ("Francesc Rocher" . "francesc.rocher@gmail.com")) (:maintainers ("Francesc Rocher" . "francesc.rocher@gmail.com")) (:maintainer "Francesc Rocher" . "francesc.rocher@gmail.com"))])
+ (uci-mode . [(20210626 1956) ((emacs (25 1))) "Major-mode for chess engine interaction" tar ((:url . "https://github.com/dwcoates/uci-mode") (:commit . "2cdf4de5af96d56108a0a5716416ef3c8ac7bb7c") (:revdesc . "2cdf4de5af96") (:keywords "data" "games" "chess"))])
+ (ucs-utils . [(20230119 2237) ((emacs (24 3)) (persistent-soft (0 8 10)) (pcache (0 5 1)) (list-utils (0 4 6))) "Utilities for Unicode characters" tar ((:url . "https://github.com/rolandwalker/ucs-utils") (:commit . "91b9e0207fff5883383fd39c45ad5522e9b90e65") (:revdesc . "91b9e0207fff") (:keywords "i18n" "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (udev-mode . [(20200702 1536) ((emacs (24))) "Major mode for editing udev rules files" tar ((:url . "https://github.com/benley/emacs-udev-mode") (:commit . "5ca236980662141518603672ebdbdf863756da5a") (:revdesc . "5ca236980662") (:keywords "languages" "unix") (:authors ("Benjamin Staffin" . "benley@gmail.com")) (:maintainers ("Benjamin Staffin" . "benley@gmail.com")) (:maintainer "Benjamin Staffin" . "benley@gmail.com"))])
+ (ue . [(20210929 1301) ((emacs (26 1)) (projectile (2 5 0))) "Minor mode for Unreal Engine projects" tar ((:url . "https://gitlab.com/unrealemacs/ue.el") (:commit . "7819d5b78e5b52a09b36c634ce404dc8bc3711ef") (:revdesc . "7819d5b78e5b") (:keywords "unreal engine" "languages" "tools") (:authors ("Oleksandr Manenko" . "seidfzehsd@use.startmail.com")) (:maintainers ("Oleksandr Manenko" . "seidfzehsd@use.startmail.com")) (:maintainer "Oleksandr Manenko" . "seidfzehsd@use.startmail.com"))])
+ (uimage . [(20160901 1221) nil "An iimage like mode with the ability to display url images" tar ((:url . "https://github.com/lujun9972/uimage") (:commit . "9893d09160ef7e8c0ecdcd74fca99ffeb5f9d70d") (:revdesc . "9893d09160ef") (:keywords "lisp" "url" "image") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (uiua-mode . [(20260618 822) ((emacs (27 1)) (reformatter (0 8))) "Uiua integration" tar ((:url . "https://github.com/crmsnbleyd/uiua-mode") (:commit . "4194e877aef707f8475c3632390179b03571d091") (:revdesc . "4194e877aef7") (:keywords "languages" "uiua"))])
+ (uiua-ts-mode . [(20231215 2007) ((emacs (29 1)) (uiua-mode (0 0 5))) "Uiua treesiter mode" tar ((:url . "https://github.com/crmsnbleyd/uiua-ts-mode") (:commit . "1d9b2d4929094e7df7dd23aa1204b4a47c654cc4") (:revdesc . "1d9b2d492909") (:keywords "languages" "uiua"))])
+ (ujelly-theme . [(20241111 822) nil "Ujelly theme for GNU Emacs 24 (deftheme)" tar ((:url . "https://github.com/marktran/color-theme-ujelly") (:commit . "7345ab821739aafa2ec079a71fa7de350a869f0e") (:revdesc . "7345ab821739") (:authors ("Mark Tran" . "mark.tran@gmail.com")) (:maintainers ("Mark Tran" . "mark.tran@gmail.com")) (:maintainer "Mark Tran" . "mark.tran@gmail.com"))])
+ (ukrainian-holidays . [(20130720 1349) nil "Ukrainian holidays for Emacs calendar" tar ((:url . "https://github.com/abo-abo/ukrainian-holidays") (:commit . "e52b0c92843e9f4d0415a7ba3b8559785497d23d") (:revdesc . "e52b0c92843e") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (ulisp-mode . [(20240807 1000) ((emacs (25 1))) "Major mode for editing and evaluate uLisp" tar ((:url . "https://codeberg.org/deadblackclover/ulisp-mode") (:commit . "7f52f030e5bf6e98ba9eee75631a6e2b95f90583") (:revdesc . "7f52f030e5bf") (:keywords "languages") (:authors ("DEADBLACKCLOVER" . "deadblackclover@protonmail.com")) (:maintainers ("DEADBLACKCLOVER" . "deadblackclover@protonmail.com")) (:maintainer "DEADBLACKCLOVER" . "deadblackclover@protonmail.com"))])
+ (ultisnips-mode . [(20260826 244) ((emacs (26 3))) "Major mode for editing Ultisnips snippets" tar ((:url . "https://github.com/jamescherti/ultisnips-mode.el") (:commit . "993076575d073544c8b7d683750d01c3d1030e31") (:revdesc . "993076575d07") (:keywords "languages" "convenience") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (ultra-scroll . [(20260826 1840) ((emacs (29 1))) "Fast and smooth scrolling" tar ((:url . "https://github.com/jdtsmith/ultra-scroll") (:commit . "8a43a60361db57c7f48c4e782c7e877d8ac3669a") (:revdesc . "8a43a60361db") (:keywords "convenience"))])
+ (uml-mode . [(20200129 1147) ((emacs (24 4)) (seq (0))) "Minor mode for ascii uml sequence diagrams" tar ((:url . "https://github.com/ianxm/emacs-uml") (:commit . "0ef88c74b48b5400d83ab93e3e089bbe45538fd7") (:revdesc . "0ef88c74b48b") (:keywords "docs") (:authors ("Ian Martins" . "ianxm@jhu.edu")) (:maintainers ("Ian Martins" . "ianxm@jhu.edu")) (:maintainer "Ian Martins" . "ianxm@jhu.edu"))])
+ (uncrustify-mode . [(20130707 1359) nil "Minor mode to automatically uncrustify" tar ((:url . "https://github.com/koko1000ban/emacs-uncrustify-mode") (:commit . "2c00d5cf2d1868a5955347438746f4dd82b3b9fc") (:revdesc . "2c00d5cf2d18") (:keywords "uncrustify") (:authors ("Tabito Ohtani" . "koko1000ban@gmail.com")) (:maintainers ("Tabito Ohtani" . "koko1000ban@gmail.com")) (:maintainer "Tabito Ohtani" . "koko1000ban@gmail.com"))])
+ (undercover . [(20210602 2119) ((emacs (24)) (dash (2 0 0)) (shut-up (0 3 2))) "Test coverage library for Emacs Lisp" tar ((:url . "https://github.com/sviridov/undercover.el") (:commit . "1d3587f1fad66a747688f36636b67b33b73447d3") (:revdesc . "1d3587f1fad6") (:keywords "lisp" "tests" "coverage" "tools") (:authors ("Sviridov Alexander" . "sviridov.vmi@gmail.com")) (:maintainers ("Sviridov Alexander" . "sviridov.vmi@gmail.com")) (:maintainer "Sviridov Alexander" . "sviridov.vmi@gmail.com"))])
+ (underline-with-char . [(20191128 2309) ((emacs (24))) "Underline with a char" tar ((:url . "https://gitlab.com/marcowahl/underline-with-char") (:commit . "36577e72aa4fbfa7f1abad01842359209f543751") (:revdesc . "36577e72aa4f") (:keywords "convenience") (:maintainers (nil . "marcowahlsoft@gmail.com")) (:maintainer nil . "marcowahlsoft@gmail.com"))])
+ (undersea-theme . [(20240101 1006) ((emacs (24 3))) "Theme styled after undersea imagery" tar ((:url . "https://github.com/jcs-elpa/undersea-theme") (:commit . "0730e21187367003c533e67cdb676a423a8dccd0") (:revdesc . "0730e2118736") (:keywords "theme" "sea") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (underwater-theme . [(20131118 2) nil "A gentle, deep blue color theme" tar ((:url . "https://github.com/jmdeldin/underwater-theme.el") (:commit . "1fbd4ecd4538256c6c46f9638f883072c73ac927") (:revdesc . "1fbd4ecd4538") (:keywords "faces") (:authors ("Jon-Michael Deldin" . "dev@jmdeldin.com")) (:maintainers ("Jon-Michael Deldin" . "dev@jmdeldin.com")) (:maintainer "Jon-Michael Deldin" . "dev@jmdeldin.com"))])
+ (undo-fu . [(20260308 1131) ((emacs (25 1))) "Undo helper with redo" tar ((:url . "https://codeberg.org/ideasman42/emacs-undo-fu") (:commit . "5684ef2aef5f60176472916b21869cf221e018cc") (:revdesc . "5684ef2aef5f") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (undo-fu-session . [(20260209 754) ((emacs (28 1))) "Persistent undo, available between sessions" tar ((:url . "https://codeberg.org/ideasman42/emacs-undo-fu-session") (:commit . "db5e165439c95bf36f3e48d0c87d3879cabb18f0") (:revdesc . "db5e165439c9") (:keywords "convenience") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (undo-propose . [(20210207 45) ((emacs (24 3))) "Simple and safe undo navigation" tar ((:url . "https://github.com/jackkamm/undo-propose.el") (:commit . "91a1dfe516d90dab69c368f6669bacb2458ec5e9") (:revdesc . "91a1dfe516d9") (:keywords "convenience" "files" "undo" "redo" "history"))])
+ (undohist . [(20260103 1801) ((cl-lib (1 0))) "Persistent undo history for GNU Emacs" tar ((:url . "https://github.com/emacsorphanage/undohist") (:commit . "8ff68451ff65da9dcc035607f82a0bac5cf4a545") (:revdesc . "8ff68451ff65") (:keywords "convenience") (:authors ("MATSUYAMA Tomohiro" . "m2ym.pub@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (unfill . [(20230227 1349) ((emacs (24 1))) "Do the opposite of fill-paragraph or fill-region" tar ((:url . "https://github.com/purcell/unfill") (:commit . "075052ce0b4451d7d3ede013ce5a77e6a7a92360") (:revdesc . "075052ce0b44") (:keywords "convenience") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (unicad . [(20230903 1356) ((emacs (24)) (nadvice (0 3))) "An elisp port of Mozilla Universal Charset Auto Detector" tar ((:url . "https://github.com/ukari/unicad") (:commit . "fcc220703798d140c86711e2feeb299fd765b5b5") (:revdesc . "fcc220703798") (:keywords "i18n") (:authors ("Qichen Huang" . "unicad.el@gmail.com")) (:maintainers ("Qichen Huang" . "unicad.el@gmail.com")) (:maintainer "Qichen Huang" . "unicad.el@gmail.com"))])
+ (unicode-emoticons . [(20150204 1108) nil "Shortcuts for common unicode emoticons" tar ((:url . "https://github.com/hagleitn/unicode-emoticons") (:commit . "52a09955c2afc1807c0f37f1467ccfc1e1da690a") (:revdesc . "52a09955c2af") (:keywords "games" "entertainment" "comms"))])
+ (unicode-enbox . [(20140508 2041) ((string-utils (0 3 2)) (ucs-utils (0 7 6)) (list-utils (0 4 2)) (persistent-soft (0 8 8)) (pcache (0 2 3))) "Surround a string with box-drawing characters" tar ((:url . "https://github.com/rolandwalker/unicode-enbox") (:commit . "4e8ac89b0460eaba6d6eaa8c463eb069660218fa") (:revdesc . "4e8ac89b0460") (:keywords "extensions" "interface") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (unicode-escape . [(20230109 1222) ((emacs (24)) (names (20151201 0)) (dash (2 12 1))) "Escape/Unescape unicode notations" tar ((:url . "https://github.com/kosh04/unicode-escape.el") (:commit . "afbb09c774571eefd4e639fc6163280476484363") (:revdesc . "afbb09c77457") (:keywords "i18n" "unicode") (:authors ("KOBAYASHI Shigeru" . "shigeru.kb@gmail.com")) (:maintainers ("KOBAYASHI Shigeru" . "shigeru.kb@gmail.com")) (:maintainer "KOBAYASHI Shigeru" . "shigeru.kb@gmail.com"))])
+ (unicode-fonts . [(20260202 1156) ((font-utils (0 7 8)) (ucs-utils (0 8 2)) (list-utils (0 4 2)) (persistent-soft (0 8 10)) (pcache (0 3 1))) "Configure Unicode fonts" tar ((:url . "https://github.com/rolandwalker/unicode-fonts") (:commit . "d4a0648a2206d9a896433817110957b3b9e1c17a") (:revdesc . "d4a0648a2206") (:keywords "i18n" "faces" "frames" "wp" "interface") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (unicode-math-input . [(20260601 734) ((emacs (28 1))) "Insert Unicode math symbols using TeX notation" tar ((:url . "https://codeberg.org/astoff/unicode-math-input.el") (:commit . "f0ad9e4bf23df653bc68d578e610a2d0431b87df") (:revdesc . "f0ad9e4bf23d"))])
+ (unicode-progress-reporter . [(20140508 2041) ((emacs (24 1 0)) (ucs-utils (0 7 6)) (list-utils (0 4 2)) (persistent-soft (0 8 8)) (pcache (0 2 3))) "Progress-reporter with fancy characters" tar ((:url . "https://github.com/rolandwalker/unicode-progress-reporter") (:commit . "17415a96144506e5ffa49377d4c814023e06f425") (:revdesc . "17415a961445") (:keywords "interface") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (unicode-troll-stopper . [(20190209 411) nil "Minor mode for Highlighting Unicode homoglyphs" tar ((:url . "https://github.com/camsaul/emacs-unicode-troll-stopper") (:commit . "5e8be35a7bf6382384a701663f7438ee27e4b67c") (:revdesc . "5e8be35a7bf6") (:keywords "unicode") (:authors ("Cam Saül" . "cammsaul@gmail.com")) (:maintainers ("Cam Saül" . "cammsaul@gmail.com")) (:maintainer "Cam Saül" . "cammsaul@gmail.com"))])
+ (unicode-whitespace . [(20140508 2041) ((ucs-utils (0 7 6)) (list-utils (0 4 2)) (persistent-soft (0 8 8)) (pcache (0 2 3))) "Teach whitespace-mode about fancy characters" tar ((:url . "https://github.com/rolandwalker/unicode-whitespace") (:commit . "b0cbfe4f9998a2c1eb4cba031efcb785ef518916") (:revdesc . "b0cbfe4f9998") (:keywords "faces" "wp" "interface") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (unidecode . [(20201213 1449) nil "Transliterate Unicode to ASCII" tar ((:url . "https://github.com/sindikat/unidecode") (:commit . "525b51b38f5b0435642005957740fe22ecb2a53c") (:revdesc . "525b51b38f5b") (:authors ("sindikat" . "sindikatatmail36dotnet")) (:maintainers ("John Mastro" . "john.b.mastro@gmail.com")) (:maintainer "John Mastro" . "john.b.mastro@gmail.com"))])
+ (unifdef . [(20250102 1047) nil "Delete code guarded by processor directives" tar ((:url . "https://github.com/Lindydancer/unifdef") (:commit . "4a428d544893e91835b625fab38fdac964dcff88") (:revdesc . "4a428d544893") (:keywords "convenience" "languages"))])
+ (unify-opening . [(20230903 844) ((emacs (24 4))) "Unify the mechanism to open files" tar ((:url . "https://github.com/DamienCassou/unify-opening") (:commit . "282ce0e35ecebbe602bec6f8d64f0192d8a18342") (:revdesc . "282ce0e35ece") (:authors ("Damien Cassou" . "damien.cassou@gmail.com")) (:maintainers ("Damien Cassou" . "damien.cassou@gmail.com")) (:maintainer "Damien Cassou" . "damien.cassou@gmail.com"))])
+ (uniline . [(20260825 819) ((emacs (29 1)) (hydra (0 15 0))) "Add▶ ■─UNICODE based diagrams─■ to▶ ■─text files─■" tar ((:url . "https://github.com/tbanel/uniline") (:commit . "7760962c0c2fd81fa9b001c343dd1a540dc68329") (:revdesc . "7760962c0c2f") (:keywords "convenience" "text"))])
+ (unipoint . [(20140113 2224) nil "A simple way to insert unicode characters by TeX name" tar ((:url . "https://github.com/apgwoz/unipoint") (:commit . "5da04aebac35a5c9e1d8704f2231808d42f4b36a") (:revdesc . "5da04aebac35") (:authors ("Andrew Gwozdziewycz" . "git@apgwoz.com")) (:maintainers ("Andrew Gwozdziewycz" . "git@apgwoz.com")) (:maintainer "Andrew Gwozdziewycz" . "git@apgwoz.com"))])
+ (unison . [(20160704 740) ((emacs (24 1))) "Sync with Unison" tar ((:url . "https://github.com/unhammer/unison.el") (:commit . "a78a04c0d1398d00f75a1bd4799622a65bcb0f28") (:revdesc . "a78a04c0d139") (:keywords "sync") (:authors ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainers ("Kevin Brubeck Unhammer" . "unhammer@fsfe.org")) (:maintainer "Kevin Brubeck Unhammer" . "unhammer@fsfe.org"))])
+ (unison-mode . [(20160513 1501) nil "Syntax highlighting for unison file synchronization program" tar ((:url . "https://github.com/impaktor/unison-mode") (:commit . "0bd6a65c0d12f87fcf7bdff15fe54444959b93bf") (:revdesc . "0bd6a65c0d12") (:keywords "symchronization" "unison") (:authors ("Karl Fogelmark" . "karlfogel@gmail.com")) (:maintainers ("Karl Fogelmark" . "karlfogel@gmail.com")) (:maintainer "Karl Fogelmark" . "karlfogel@gmail.com"))])
+ (unison-ts-mode . [(20260721 405) ((emacs (29 1))) "Tree-sitter support for Unison" tar ((:url . "https://github.com/fmguerreiro/unison-ts-mode") (:commit . "00cc3b64854afaec6d4ef38afd28ec06ffaa81ed") (:revdesc . "00cc3b64854a") (:keywords "languages" "unison" "tree-sitter") (:authors ("Filipe Guerreiro" . "filipe.m.guerreiro@gmail.com")) (:maintainers ("Filipe Guerreiro" . "filipe.m.guerreiro@gmail.com")) (:maintainer "Filipe Guerreiro" . "filipe.m.guerreiro@gmail.com"))])
+ (unisonlang-mode . [(20200803 808) ((emacs (25 1))) "Simple major mode for editing Unison" tar ((:url . "https://github.com/dariooddenino/unison-mode-emacs") (:commit . "b8da68fc2a6a62a255a6089b0c6794bfa2370f34") (:revdesc . "b8da68fc2a6a") (:keywords "languages"))])
+ (units-mode . [(20221027 303) ((emacs (24 4))) "Mode for conversion between different units" tar ((:url . "https://github.com/Atreyagaurav/units-mode") (:commit . "10c8de24180f87b1a8a3b0a9b3fbb29eec925417") (:revdesc . "10c8de24180f") (:keywords "units" "unit-conversion" "convenience") (:authors ("Gaurav Atreya" . "allmanpride@gmail.com")) (:maintainers ("Gaurav Atreya" . "allmanpride@gmail.com")) (:maintainer "Gaurav Atreya" . "allmanpride@gmail.com"))])
+ (universal-emotions-emoticons . [(20180729 1941) ((emacs (24 4))) "Emoticons For The Six Universal Expressions" tar ((:url . "https://github.com/grettke/universal-emotions-emoticons") (:commit . "9cedd09ee65cb9fa71f27b0ab46a8353bdc00902") (:revdesc . "9cedd09ee65c") (:keywords "convenience" "docs" "languages") (:authors ("Grant Rettke" . "gcr@wisdomandwonder.com")) (:maintainers (nil . "gcr@wisdomandwonder.com")) (:maintainer nil . "gcr@wisdomandwonder.com"))])
+ (universal-sidecar . [(20260314 1744) ((emacs (26 1)) (magit-section (3 0 0))) "A universal sidecar buffer" tar ((:url . "https://git.sr.ht/~swflint/emacs-universal-sidecar") (:commit . "3b6bd928f7adb840e62a63dd5bf1236ece912b13") (:revdesc . "3b6bd928f7ad") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (universal-sidecar-citeproc . [(20260314 1744) ((emacs (28 1)) (citeproc (0 9 4))) "Centralise Citeproc Support for Universal Sidecar" tar ((:url . "https://git.sr.ht/~swflint/emacs-universal-sidecar") (:commit . "3b6bd928f7adb840e62a63dd5bf1236ece912b13") (:revdesc . "3b6bd928f7ad") (:keywords "bib" "convenience") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (universal-sidecar-elfeed-related . [(20260314 1744) ((emacs (25 1)) (universal-sidecar (1 0 0)) (bibtex-completion (1 0 0)) (elfeed (3 4 1))) "Related Papers Sidecar Section for Elfeed" tar ((:url . "https://git.sr.ht/~swflint/emacs-universal-sidecar") (:commit . "3b6bd928f7adb840e62a63dd5bf1236ece912b13") (:revdesc . "3b6bd928f7ad") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (universal-sidecar-elfeed-score . [(20260314 1744) ((emacs (25 1)) (universal-sidecar (1 0 0)) (elfeed (3 4 1)) (elfeed-score (1 2 6))) "Show Elfeed Score information in sidecar" tar ((:url . "https://git.sr.ht/~swflint/emacs-universal-sidecar") (:commit . "3b6bd928f7adb840e62a63dd5bf1236ece912b13") (:revdesc . "3b6bd928f7ad") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (universal-sidecar-roam . [(20260314 1744) ((emacs (26 1)) (universal-sidecar (1 0 0)) (org-roam (2 0 0))) "Integrate universal-sidecar and org-roam" tar ((:url . "https://git.sr.ht/~swflint/emacs-universal-sidecar") (:commit . "3b6bd928f7adb840e62a63dd5bf1236ece912b13") (:revdesc . "3b6bd928f7ad") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (unkillable-scratch . [(20221015 1323) ((emacs (24))) "Disallow the \\*scratch\\* buffer from being killed" tar ((:url . "https://github.com/EricCrosson/unkillable-scratch") (:commit . "6c752e4cd4762bb4bcde2b0b96f2e83740efd104") (:revdesc . "6c752e4cd476") (:keywords "convenience") (:authors ("Eric Crosson" . "eric.s.crosson@utexas.com")) (:maintainers ("Eric Crosson" . "eric.s.crosson@utexas.com")) (:maintainer "Eric Crosson" . "eric.s.crosson@utexas.com"))])
+ (unmodified-buffer . [(20220129 2022) ((emacs (24 1))) "Auto revert modified buffer state" tar ((:url . "https://github.com/arthurcgusmao/unmodified-buffer") (:commit . "9095a3f870aa570804a11d75aba0952294199715") (:revdesc . "9095a3f870aa"))])
+ (unobtrusive-magit-theme . [(20260424 1659) ((emacs (24 1))) "An unobtrusive Magit theme" tar ((:url . "https://github.com/tee3/unobtrusive-magit-theme") (:commit . "33d265d08a0a215aab558550d1596ac0e57c9d63") (:revdesc . "33d265d08a0a") (:keywords "faces" "vc" "magit") (:authors ("Thomas A. Brown" . "tabsoftwareconsulting@gmail.com")) (:maintainers ("Thomas A. Brown" . "tabsoftwareconsulting@gmail.com")) (:maintainer "Thomas A. Brown" . "tabsoftwareconsulting@gmail.com"))])
+ (unspecified-theme . [(20260417 842) ((emacs (25)) (most-faces (0 0 3))) "Theme that unspecifies all attributes of all faces" tar ((:url . "https://codeberg.org/mekeor/unspecified-theme") (:commit . "50f87d04741e3fd6404c629a647299ae9e4f2f1d") (:revdesc . "50f87d04741e") (:keywords "faces" "theme") (:authors ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainers ("Mekeor Melire" . "mekeor@posteo.de")) (:maintainer "Mekeor Melire" . "mekeor@posteo.de"))])
+ (untappd . [(20250112 1604) ((emacs (26 1)) (request (0 3 2)) (emojify (1 2 1))) "Display your latest Untappd feed" tar ((:url . "https://github.com/smallwat3r/untappd.el") (:commit . "78b9b30e42135917ac68c9b3caab4984b3f491e2") (:revdesc . "78b9b30e4213") (:authors ("Matthieu Petiteau" . "matt@smallwat3r.com")) (:maintainers ("Matthieu Petiteau" . "matt@smallwat3r.com")) (:maintainer "Matthieu Petiteau" . "matt@smallwat3r.com"))])
+ (untitled-new-buffer . [(20161212 1508) ((emacs (24 4)) (magic-filetype (0 2 0))) "Open untitled new buffer like other text editors" tar ((:url . "https://github.com/zonuexe/untitled-new-buffer.el") (:commit . "e359ae63bc6310e315b7c25157858f9b9796ed3d") (:revdesc . "e359ae63bc63") (:keywords "files" "convenience") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (upbo . [(20180422 822) ((dash (2 12 0)) (emacs (24 4))) "Karma Test Runner Integration" tar ((:url . "https://github.com/shiren") (:commit . "63514c484e70cd6eeae828f7e58216e1a3429184") (:revdesc . "63514c484e70") (:keywords "javascript" "js" "test" "karma"))])
+ (uptimes . [(20231015 1458) ((cl-lib (0 5)) (emacs (24))) "Track and display session uptimes" tar ((:url . "https://github.com/davep/uptimes.el") (:commit . "84407aba479117344080ebf373e3e9186a96f05c") (:revdesc . "84407aba4791") (:keywords "processes" "uptime") (:authors ("Dave Pearson" . "davep@davep.org")) (:maintainers ("Dave Pearson" . "davep@davep.org")) (:maintainer "Dave Pearson" . "davep@davep.org"))])
+ (url-shortener . [(20170805 242) nil "Shorten long url and expand tinyurl" tar ((:url . "https://github.com/yuyang0/url-shortener") (:commit . "06db8270213b9e352d6c335b0663059a1353d05e") (:revdesc . "06db8270213b") (:authors ("Yu Yang" . "yy2012cn@NOSPAM.gmail.com")) (:maintainers ("Yu Yang" . "yy2012cn@NOSPAM.gmail.com")) (:maintainer "Yu Yang" . "yy2012cn@NOSPAM.gmail.com"))])
+ (urlenc . [(20140116 1456) nil "URL encoding/decoding utility for Emacs" tar ((:url . "https://github.com/buzztaiki/urlenc-el") (:commit . "835a6dcb783bbe84714bae87a3464aa0b128bfac") (:revdesc . "835a6dcb783b") (:keywords "url") (:authors ("Taiki SUGAWARA" . "buzz.taiki@gmail.com")) (:maintainers ("Taiki SUGAWARA" . "buzz.taiki@gmail.com")) (:maintainer "Taiki SUGAWARA" . "buzz.taiki@gmail.com"))])
+ (ursa-ts-mode . [(20260503 2249) ((emacs (29 1))) "Major mode for Ursa, using tree-sitter" tar ((:url . "https://github.com/ursalang/ursa-ts-mode") (:commit . "b76fb46721839ef210700ee6d00763f5646c30af") (:revdesc . "b76fb4672183") (:keywords "ursalang" "languages" "tree-sitter") (:authors ("Reuben Thomas" . "rrt@sc3d.org")) (:maintainers ("Reuben Thomas" . "rrt@sc3d.org")) (:maintainer "Reuben Thomas" . "rrt@sc3d.org"))])
+ (urscript-mode . [(20190219 1604) ((emacs (24 4))) "Major mode for editing URScript" tar ((:url . "https://github.com/guidoschmidt/urscript-mode") (:commit . "b341f96b129ead8fb74d680cb4f546985bf110a9") (:revdesc . "b341f96b129e") (:keywords "languages") (:authors ("Guido Schmidt" . "(git@guidoschmidt.cc)")) (:maintainers ("Guido Schmidt" . "(git@guidoschmidt.cc)")) (:maintainer "Guido Schmidt" . "(git@guidoschmidt.cc)"))])
+ (usage-memo . [(20170926 37) nil "Integration of Emacs help system and memo" tar ((:url . "http://www.emacswiki.org/cgi-bin/wiki/download/usage-memo.el") (:commit . "88e15a9942a3e0a6e36e9c3e51e3edb746067b1a") (:revdesc . "88e15a9942a3") (:keywords "convenience" "languages" "lisp" "help" "tools" "docs") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (use-package-chords . [(20250330 1852) ((use-package (2 1)) (bind-key (1 0)) (bind-chord (0 2 2)) (key-chord (0 6))) "Key-chord keyword for use-package" tar ((:url . "https://github.com/jwiegley/use-package") (:commit . "0793b50e2bf1ec8bfc532b10baeef716c5aa947a") (:revdesc . "0793b50e2bf1") (:keywords "convenience" "tools" "extensions") (:authors ("Justin Talbott" . "justin@waymondo.com")) (:maintainers ("Justin Talbott" . "justin@waymondo.com")) (:maintainer "Justin Talbott" . "justin@waymondo.com"))])
+ (use-package-hydra . [(20181228 745) ((emacs (24 3)) (use-package (2 4))) "Adds :hydra keyword to use-package macro" tar ((:url . "https://gitlab.com/to1ne/use-package-hydra") (:commit . "8cd55a1128fbdf6327bb38a199d206225896d146") (:revdesc . "8cd55a1128fb") (:keywords "convenience" "extensions" "tools") (:authors ("Toon Claes" . "toon@iotcl.com")) (:maintainers ("Toon Claes" . "toon@iotcl.com")) (:maintainer "Toon Claes" . "toon@iotcl.com"))])
+ (use-package-treesit . [(20260416 1048) ((emacs (30 0))) "Automatically use tree-sitter enhanced major modes" tar ((:url . "https://github.com/domq/use-package-treesit.git") (:commit . "398ca0df10f2894b87c07073a446a53d943a6c18") (:revdesc . "398ca0df10f2") (:keywords "lisp" "tree-sitter" "treesit" "auto" "automatic" "use-package") (:authors ("Dominique Quatravaux" . "dominique@quatravaux.org")) (:maintainers ("Dominique Quatravaux" . "dominique@quatravaux.org")) (:maintainer "Dominique Quatravaux" . "dominique@quatravaux.org"))])
+ (use-package-x . [(20260525 1628) ((emacs (30 1)) (compat (31)) (use-package (2 4))) "Additional keywords for use-package" tar ((:url . "https://github.com/DevelopmentCool2449/use-package-x") (:commit . "45ed391f1d6816b1fff0a3104c6c0d94d9bebd64") (:revdesc . "45ed391f1d68") (:keywords "convenience" "extensions") (:authors ("Elias G. Perez" . "eg642616@gmail.com")) (:maintainers ("Elias G. Perez" . "eg642616@gmail.com")) (:maintainer "Elias G. Perez" . "eg642616@gmail.com"))])
+ (use-proxy . [(20201209 853) ((exec-path-from-shell (1 12)) (emacs (26 2))) "Enable/Disable proxies respecting your HTTP/HTTPS env" tar ((:url . "https://github.com/rayw000/use-proxy") (:commit . "43499194224483b27628fdf99f6f9ff6e731d844") (:revdesc . "434991942244") (:keywords "proxy" "comm") (:authors ("Ray Wang" . "ray.hackmylife@gmail.com")) (:maintainers ("Ray Wang" . "ray.hackmylife@gmail.com")) (:maintainer "Ray Wang" . "ray.hackmylife@gmail.com"))])
+ (use-ttf . [(20260101 603) ((emacs (26 1))) "Keep font consistency across different OSs" tar ((:url . "https://github.com/jcs-elpa/use-ttf") (:commit . "af34fb0d5cc46851b7b567fe171759724b3cdfd4") (:revdesc . "af34fb0d5cc4") (:keywords "convenience" "customize" "font" "install" "ttf") (:authors ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (ushin-shapes . [(20241022 522) ((emacs (27 1)) (svg-tag-mode (0 3 3)) (svg-lib (0 3)) (compat (30 0 0 0))) "USHIN shapes in org-mode" tar ((:url . "https://git.sr.ht/~ushin/ushin-shapes.el") (:commit . "fd2c4289c7d336528f1f855eb9378615417f4483") (:revdesc . "fd2c4289c7d3") (:keywords "convenience") (:authors ("Joseph Turner" . "joseph@ushin.org")) (:maintainers ("Joseph Turner" . "joseph@ushin.org")) (:maintainer "Joseph Turner" . "joseph@ushin.org"))])
+ (utimeclock . [(20260108 1319) ((emacs (29 1))) "Simple utility for manual time tracking" tar ((:url . "https://codeberg.org/ideasman42/emacs-utimeclock") (:commit . "210b417d17770c7814c6177e9c787234807e65d0") (:revdesc . "210b417d1777") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (utop . [(20260319 1448) ((emacs (26))) "Universal toplevel for OCaml" tar ((:url . "https://github.com/ocaml-community/utop") (:commit . "8cd6716d0f90efd67da90afa5bc31c7abe9a7a57") (:revdesc . "8cd6716d0f90") (:keywords "ocaml" "languages") (:authors ("Jeremie Dimino" . "jeremie@dimino.org")) (:maintainers ("Jeremie Dimino" . "jeremie@dimino.org")) (:maintainer "Jeremie Dimino" . "jeremie@dimino.org"))])
+ (uuid . [(20120910 851) nil "UUID's for EmacsLisp" tar ((:url . "https://github.com/nicferrier/emacs-uuid") (:commit . "1519bfeb0e31602b840bc8dd35d7c7e732c159fe") (:revdesc . "1519bfeb0e31") (:keywords "lisp") (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (uuidgen . [(20240201 2318) nil "Provides various UUID generating functions" tar ((:url . "https://github.com/kanru/uuidgen-el") (:commit . "cebbe09d27c63abe61fe8c2e2248587d90265b59") (:revdesc . "cebbe09d27c6") (:keywords "extensions" "lisp" "tools") (:authors ("Kan-Ru Chen" . "kanru@kanru.info")) (:maintainers ("Kan-Ru Chen" . "kanru@kanru.info")) (:maintainer "Kan-Ru Chen" . "kanru@kanru.info"))])
+ (uv-mode . [(20250703 1540) ((emacs (25 1)) (pythonic (0 1 0))) "Integrate uv with python-mode" tar ((:url . "https://github.com/z80dev/uv-mode") (:commit . "7e7f9b90832210b65823c3d58e3255cd164394b7") (:revdesc . "7e7f9b908322") (:authors ("z80" . "z80@ophy.xyz")) (:maintainers ("z80" . "z80@ophy.xyz")) (:maintainer "z80" . "z80@ophy.xyz"))])
+ (uwu-theme . [(20260703 1803) ((emacs (24 1))) "An awesome dark color scheme" tar ((:url . "https://github.com/kborling/uwu-theme") (:commit . "10b07fae92e2b28d7f3948e5feba0e3172123370") (:revdesc . "10b07fae92e2") (:keywords "custom themes" "dark" "faces"))])
+ (uxntal-mode . [(20240327 153) ((emacs (27 1))) "Major mode for Uxntal assembly" tar ((:url . "https://github.com/non/uxntal-mode") (:commit . "1b114d97069a8c004f0ca58e0c69d61d897cef75") (:revdesc . "1b114d97069a") (:authors ("d_m" . "d_m@plastic-idolatry.com")) (:maintainers ("d_m" . "d_m@plastic-idolatry.com")) (:maintainer "d_m" . "d_m@plastic-idolatry.com"))])
+ (v-mode . [(20221007 635) ((emacs (25 1)) (dash (2 17 0)) (hydra (0 15 0))) "A major mode for the V programming language" tar ((:url . "https://github.com/damon-kwok/v-mode") (:commit . "84f26ab0f0f5b23133292674da9fa4558207c33d") (:revdesc . "84f26ab0f0f5") (:keywords "languages" "programming") (:authors ("Damon Kwok" . "damon-kwok@outlook.com")) (:maintainers ("Damon Kwok" . "damon-kwok@outlook.com")) (:maintainer "Damon Kwok" . "damon-kwok@outlook.com"))])
+ (v2ex-mode . [(20160720 345) ((cl-lib (0 5)) (request (0 2)) (let-alist (1 0 3))) "Major mode for visit http://v2ex.com/ site" tar ((:url . "https://github.com/aborn/v2ex-mode") (:commit . "b7d19bb594b43ea3824a6f215dd1e5d1d4c0e8ad") (:revdesc . "b7d19bb594b4") (:keywords "v2ex" "v2ex.com") (:authors ("Aborn Jiang" . "aborn.jiang@gmail.com")) (:maintainers ("Aborn Jiang" . "aborn.jiang@gmail.com")) (:maintainer "Aborn Jiang" . "aborn.jiang@gmail.com"))])
+ (vagrant . [(20220730 302) nil "Manage a vagrant box from emacs" tar ((:url . "https://github.com/ottbot/vagrant.el") (:commit . "eb4ec2053955eda1ac9e5ff92ded88f1919e13f2") (:revdesc . "eb4ec2053955") (:keywords "vagrant" "chef") (:authors ("Robert Crim" . "rob@servermilk.com")) (:maintainers ("Robert Crim" . "rob@servermilk.com")) (:maintainer "Robert Crim" . "rob@servermilk.com"))])
+ (vagrant-tramp . [(20220508 52) ((dash (2 12 0))) "Vagrant method for TRAMP" tar ((:url . "https://github.com/dougm/vagrant-tramp") (:commit . "2b7a4fabd328961384da06e0e302250cd97edc47") (:revdesc . "2b7a4fabd328") (:keywords "vagrant") (:authors ("Doug MacEachern" . "dougm@vmware.com") ("Ryan Prior" . "ryanprior@gmail.com")) (:maintainers ("Doug MacEachern" . "dougm@vmware.com") ("Ryan Prior" . "ryanprior@gmail.com")) (:maintainer "Doug MacEachern" . "dougm@vmware.com"))])
+ (vala-mode . [(20201218 2109) nil "Vala mode derived mode" tar ((:url . "https://github.com/rrthomas/vala-mode") (:commit . "d696a8177e94c81ea557ad364a3b3dcc3abbc50f") (:revdesc . "d696a8177e94") (:keywords "vala" "languages" "oop") (:maintainers ("tienne BERSAC" . "bersace03@laposte.net")) (:maintainer "tienne BERSAC" . "bersace03@laposte.net"))])
+ (vala-snippets . [(20150429 352) ((yasnippet (0 8 0))) "Yasnippets for Vala" tar ((:url . "https://github.com/gopar/vala-snippets") (:commit . "671439501060449bd100b9fffd524a86064fbfbb") (:revdesc . "671439501060"))])
+ (vale-mode . [(20190725 125) ((emacs (25))) "Major mode for writing Vale vaf files" tar ((:url . "https://github.com/jaybosamiya/vale-mode.el") (:commit . "48bbc4b4ee5bf0b1b73e52705c0fbc112b255cd0") (:revdesc . "48bbc4b4ee5b") (:keywords "convenience" "languages") (:authors ("Jay Bosamiya" . "jaybosamiya@gmail.com")) (:maintainers ("Jay Bosamiya" . "jaybosamiya@gmail.com")) (:maintainer "Jay Bosamiya" . "jaybosamiya@gmail.com"))])
+ (validate-html . [(20241023 2029) ((emacs (25 1))) "Compilation mode for W3C HTML Validator" tar ((:url . "https://github.com/arthurgleckler/validate-html") (:commit . "4285c492d8a28025ffce7ee717e2aefc905bea66") (:revdesc . "4285c492d8a2") (:keywords "languages" "tools") (:authors ("Arthur A. Gleckler" . "melpa4aag@speechcode.com")) (:maintainers ("Arthur A. Gleckler" . "melpa4aag@speechcode.com")) (:maintainer "Arthur A. Gleckler" . "melpa4aag@speechcode.com"))])
+ (varuga . [(20250618 2103) ((emacs (27 1))) "Send ical calendar invites by email" tar ((:url . "https://git.systemreboot.net/varuga") (:commit . "f055e8572b2e4d7a700392b8a71bacbfdc8e442a") (:revdesc . "f055e8572b2e") (:authors ("Arun Isaac" . "arunisaac@systemreboot.net")) (:maintainers ("Arun Isaac" . "arunisaac@systemreboot.net")) (:maintainer "Arun Isaac" . "arunisaac@systemreboot.net"))])
+ (vbasense . [(20140221 2353) ((auto-complete (1 4 0)) (log4e (0 2 0)) (yaxception (0 1))) "Provide a environment like Visual Basic Editor" tar ((:url . "https://github.com/aki2o/emacs-vbasense") (:commit . "8c61a492d7c15218ae1a96e2aebfe6f78bfff6db") (:revdesc . "8c61a492d7c1") (:keywords "vba" "completion") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (vc-auto-commit . [(20210216 1517) nil "Auto-committing feature for your repository" tar ((:url . "https://github.com/thisirs/vc-auto-commit.git") (:commit . "56f478016a541b395092a9d3cdc0da84a37b30a1") (:revdesc . "56f478016a54") (:keywords "vc" "convenience") (:authors ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainers ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainer "Sylvain Rousseau" . "thisirsatgmaildotcom"))])
+ (vc-check-status . [(20210216 1525) nil "Warn you when quitting emacs and leaving repo dirty" tar ((:url . "https://github.com/thisirs/vc-check-status") (:commit . "d95ef8f0799cd3dd83726ffa9b01b076f378ce34") (:revdesc . "d95ef8f0799c") (:keywords "vc" "convenience") (:authors ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainers ("Sylvain Rousseau" . "thisirsatgmaildotcom")) (:maintainer "Sylvain Rousseau" . "thisirsatgmaildotcom"))])
+ (vc-darcs . [(20230319 1149) ((emacs (24))) "A VC backend for darcs" tar ((:url . "https://github.com/velkyel/vc-darcs") (:commit . "097e03f119b4fedb0186fd45d730a1c5acac10dc") (:revdesc . "097e03f119b4") (:keywords "vc") (:authors ("Jorgen Schaefer" . "forcer@forcix.cx") ("Juliusz Chroboczek" . "jch@pps.univ-paris-diderot.fr")) (:maintainers ("Libor apák" . "capak@inputwish.com")) (:maintainer "Libor apák" . "capak@inputwish.com"))])
+ (vc-defer . [(20201116 701) ((emacs (25 1))) "Defer non-essential vc.el work" tar ((:url . "https://github.com/google/vc-defer") (:commit . "aeafc419c1788b3ac4f0590c635374eefd7c220c") (:revdesc . "aeafc419c178") (:keywords "vc" "tools") (:authors ("Matt Armstrong" . "marmstrong@google.com")) (:maintainers ("Tom Fitzhenry" . "tomfitzhenry@google.com")) (:maintainer "Tom Fitzhenry" . "tomfitzhenry@google.com"))])
+ (vc-fossil . [(20230504 1626) nil "VC backend for the fossil sofware configuraiton management system" tar ((:url . "https://github.com/venks1/emacs-fossil") (:commit . "4a4a3e4df83ba2f1ea8bfd8aa7e9f9b2c1c32ca9") (:revdesc . "4a4a3e4df83b") (:authors ("Venkat Iyer" . "venkat@comit.com")) (:maintainers ("Alfred M. Szmidt" . "ams@gnu.org")) (:maintainer "Alfred M. Szmidt" . "ams@gnu.org"))])
+ (vc-hgcmd . [(20211021 1704) ((emacs (25 1))) "VC mercurial backend that uses hg command server" tar ((:url . "https://github.com/muffinmad/emacs-vc-hgcmd") (:commit . "d044448965d31ca8214f8bca48487e4d9b9d9a0f") (:revdesc . "d044448965d3") (:keywords "vc") (:authors ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainers ("Andrii Kolomoiets" . "andreyk.mad@gmail.com")) (:maintainer "Andrii Kolomoiets" . "andreyk.mad@gmail.com"))])
+ (vc-msg . [(20250218 237) ((emacs (24 4)) (popup (0 5 0))) "Show commit information of current line" tar ((:url . "https://github.com/redguardtoo/vc-msg") (:commit . "d55a128616a876936f085e5af486924062e57d66") (:revdesc . "d55a128616a8") (:keywords "git" "vc" "svn" "hg" "messenger") (:authors ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainers ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainer "Chen Bin" . "chenbinDOTshATgmailDOTcom"))])
+ (vc-osc . [(20190402 2349) nil "Non-resident support for osc version-control" tar ((:url . "https://github.com/aspiers/vc-osc") (:commit . "bf5a515ed85f7d7cdfe66ed5bf4ef7554f8561e5") (:revdesc . "bf5a515ed85f") (:maintainers ("Adam Spiers" . "aspiers@suse.com")) (:maintainer "Adam Spiers" . "aspiers@suse.com"))])
+ (vcomp . [(20260701 1247) ((emacs (26 1))) "Compare version strings" tar ((:url . "https://github.com/tarsius/vcomp") (:commit . "ba2d07505dc29e3128ea915bb252969b82d2af08") (:revdesc . "ba2d07505dc2") (:keywords "versions") (:authors ("Jonas Bernoulli" . "jonas@bernoul.li")) (:maintainers ("Jonas Bernoulli" . "jonas@bernoul.li")) (:maintainer "Jonas Bernoulli" . "jonas@bernoul.li"))])
+ (vcsh . [(20230402 1229) ((emacs (25 1))) "Vcsh integration" tar ((:url . "http://git.smrk.net/vcsh.el") (:commit . "b9c0109a8c77446980de668785e6af1e46bdcdcd") (:revdesc . "b9c0109a8c77") (:keywords "vc" "files") (:authors ("těpán Němec" . "stepnem@smrk.net")) (:maintainers ("těpán Němec" . "stepnem@smrk.net")) (:maintainer "těpán Němec" . "stepnem@smrk.net"))])
+ (vdf-mode . [(20210303 714) ((emacs (24 3))) "Major mode for editing Valve VDF files" tar ((:url . "https://github.com/plapadoo/vdf-mode") (:commit . "0910d4f847e9c817eb8da5434b3879048ec4ac92") (:revdesc . "0910d4f847e9"))])
+ (vdiff . [(20230621 201) ((emacs (24 4)) (hydra (0 13 0))) "A diff tool similar to  vimdiff" tar ((:url . "https://github.com/justbur/emacs-vdiff") (:commit . "170e968c6a46a572b30c52c1b038232d418734cc") (:revdesc . "170e968c6a46") (:keywords "diff") (:authors ("Justin Burkett" . "justin@burkett.cc")) (:maintainers ("Justin Burkett" . "justin@burkett.cc")) (:maintainer "Justin Burkett" . "justin@burkett.cc"))])
+ (vdiff-magit . [(20250308 1214) ((emacs (24 4)) (vdiff (0 2 4)) (magit (2 10 0)) (transient (0 1 0))) "Magit integration for vdiff" tar ((:url . "https://github.com/justbur/emacs-vdiff-magit") (:commit . "cc9e2dbd81d7f717381981501472808b7a4c6d79") (:revdesc . "cc9e2dbd81d7") (:keywords "diff") (:authors ("Justin Burkett" . "justin@burkett.cc")) (:maintainers ("Justin Burkett" . "justin@burkett.cc")) (:maintainer "Justin Burkett" . "justin@burkett.cc"))])
+ (vdirel . [(20230906 1844) ((emacs (24 4)) (org-vcard (0 1 0)) (helm (1 7 0)) (seq (1 11))) "Manipulate vdir (i.e., vCard) repositories" tar ((:url . "https://github.com/DamienCassou/vdirel") (:commit . "d60439f0b2b55f2e220241fe73f7f79af80aaad8") (:revdesc . "d60439f0b2b5") (:authors ("Damien Cassou" . "damien@cassou.me")) (:maintainers ("Damien Cassou" . "damien@cassou.me")) (:maintainer "Damien Cassou" . "damien@cassou.me"))])
+ (vdm-comint . [(20181127 2023) ((emacs (25)) (vdm-mode (0 0 4))) "REPL support for vdm-mode" tar ((:url . "https://github.com/peterwvj/vdm-mode") (:commit . "e131edb0d35de28bd47d6128dd70d9a6fc46e0fa") (:revdesc . "e131edb0d35d") (:keywords "languages") (:authors ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainers ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainer "Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com"))])
+ (vdm-mode . [(20190328 1408) ((emacs (25))) "Major mode for the Vienna Development Method" tar ((:url . "https://github.com/peterwvj/vdm-mode") (:commit . "89e7db6ee1a89b8c1f7ce36ce6800c32b5c4ba2d") (:revdesc . "89e7db6ee1a8") (:keywords "languages") (:authors ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainers ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainer "Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com"))])
+ (vdm-snippets . [(20190313 1122) ((emacs (24)) (yasnippet (0 13 0))) "YASnippets for VDM mode" tar ((:url . "https://github.com/peterwvj/vdm-mode") (:commit . "dc1756dd151752b3f538d68326059f8861e4ac66") (:revdesc . "dc1756dd1517") (:keywords "languages") (:authors ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainers ("Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com")) (:maintainer "Peter W. V. Tran-Jørgensen" . "peter.w.v.jorgensen@gmail.com"))])
+ (vector-utils . [(20140508 2041) nil "Vector-manipulation utility functions" tar ((:url . "https://github.com/rolandwalker/vector-utils") (:commit . "5f9ced3960a318d611c3d20ffdc9ca74054fa8b7") (:revdesc . "5f9ced3960a3") (:keywords "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (vega-view . [(20250327 1716) ((emacs (25)) (cider (0 24 0)) (parseedn (0 1))) "Vega visualization viewer" tar ((:url . "https://www.github.com/applied-science/emacs-vega-view") (:commit . "36e7cc84b25e67b50c5ca677d5ca0f7b7c27469f") (:revdesc . "36e7cc84b25e") (:keywords "multimedia") (:authors ("Jack Rusher" . "jack@appliedscience.studio")) (:maintainers ("Jack Rusher" . "jack@appliedscience.studio")) (:maintainer "Jack Rusher" . "jack@appliedscience.studio"))])
+ (vegetative-theme . [(20220822 353) ((autothemer (0 2)) (emacs (24))) "A Theme based on green CRT terminals" tar ((:url . "https://github.com/emacsfodder/emacs-theme-vegetative") (:commit . "db60ce0fe327ae7e4371545179ed94483b1132a8") (:revdesc . "db60ce0fe327") (:authors ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainers ("Jason Milkins" . "jasonm23@gmail.com")) (:maintainer "Jason Milkins" . "jasonm23@gmail.com"))])
+ (verb . [(20260818 1921) ((emacs (26 3))) "Organize and send HTTP requests" tar ((:url . "https://github.com/federicotdn/verb") (:commit . "8eca8cdb9eaebc49a7da068c74cfe52f2d37d76e") (:revdesc . "8eca8cdb9eae") (:keywords "tools") (:authors ("Federico Tedin" . "federicotedin@gmail.com")) (:maintainers ("Federico Tedin" . "federicotedin@gmail.com")) (:maintainer "Federico Tedin" . "federicotedin@gmail.com"))])
+ (verdict . [(20260506 914) ((emacs (29 1)) (treemacs (3 0)) (dash (2 0))) "Generic test runner with treemacs results UI" tar ((:url . "https://github.com/tjarvstrand/verdict.el") (:commit . "ff29a0681f7cca17c0e7b467229b2a8441559a2e") (:revdesc . "ff29a0681f7c") (:keywords "tools" "processes") (:authors ("Thomas Järvstrand" . "https://github.com/tjarvstrand")) (:maintainers ("Thomas Järvstrand" . "https://github.com/tjarvstrand")) (:maintainer "Thomas Järvstrand" . "https://github.com/tjarvstrand"))])
+ (verdict-dart . [(20260505 1121) ((emacs (29 1)) (verdict (0 1)) (dash (2 0)) (f (0 20)) (yaml (0 5))) "Dart runner for verdict" tar ((:url . "https://github.com/tjarvstrand/verdict.el") (:commit . "84fff362b8068a1a8112b772fa927b56a6786482") (:revdesc . "84fff362b806") (:keywords "tools" "languages") (:authors ("Thomas Järvstrand" . "https://github.com/tjarvstrand")) (:maintainers ("Thomas Järvstrand" . "https://github.com/tjarvstrand")) (:maintainer "Thomas Järvstrand" . "https://github.com/tjarvstrand"))])
+ (veri-kompass . [(20200213 934) ((emacs (25)) (cl-lib (0 5)) (org (8 2 0))) "Verilog codebase navigation facility" tar ((:url . "https://gitlab.com/koral/veri-kompass") (:commit . "271903cdf92db05898ee7cffb65641f30fa08280") (:revdesc . "271903cdf92d") (:keywords "languages" "extensions" "verilog" "hardware" "rtl") (:maintainers (nil . "andrea_corallo@yahoo.it")) (:maintainer nil . "andrea_corallo@yahoo.it"))])
+ (verify-url . [(20160426 1228) ((cl-lib (0 5))) "Find out invalid urls in the buffer or region" tar ((:url . "https://github.com/lujun9972/verify-url") (:commit . "d6f3623cda8cd526a2d198619b137059cb1ba1ab") (:revdesc . "d6f3623cda8c") (:keywords "convenience" "usability" "url") (:authors ("DarkSun" . "lujun9972@gmail.com")) (:maintainers ("DarkSun" . "lujun9972@gmail.com")) (:maintainer "DarkSun" . "lujun9972@gmail.com"))])
+ (verilog-ext . [(20260716 1137) ((emacs (29 1)) (verilog-mode (2024 3 1 121933719)) (verilog-ts-mode (0 6 0)) (lsp-mode (8 0 0)) (rg (2 3 0)) (hydra (0 15 0)) (apheleia (3 1)) (yasnippet (0 14 0)) (flycheck (32)) (async (1 9 7))) "SystemVerilog Extensions" tar ((:url . "https://github.com/gmlarumbe/verilog-ext") (:commit . "f4c65a24724cd2d1eeb1e21ec10c9cee4bfcc385") (:revdesc . "f4c65a24724c") (:keywords "verilog" "ide" "tools") (:authors ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainers ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainer "Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com"))])
+ (verilog-ts-mode . [(20260716 1249) ((emacs (29 1)) (verilog-mode (2024 3 1 121933719))) "Verilog Tree-sitter major mode" tar ((:url . "https://github.com/gmlarumbe/verilog-ts-mode") (:commit . "fc19bce75747a578305130bb8ef1e7972b028def") (:revdesc . "fc19bce75747") (:keywords "systemverilog" "ide" "tools") (:authors ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainers ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainer "Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com"))])
+ (verona-mode . [(20200823 536) ((emacs (25 1)) (dash (2 17 0)) (hydra (0 15 0))) "A major mode for the Verona programming language" tar ((:url . "https://github.com/damon-kwok/verona-mode") (:commit . "72dd31ef847344d79409503f3c42169041eb3da4") (:revdesc . "72dd31ef8473") (:keywords "languages" "programming") (:authors ("Damon Kwok" . "damon-kwok@outlook.com")) (:maintainers ("Damon Kwok" . "damon-kwok@outlook.com")) (:maintainer "Damon Kwok" . "damon-kwok@outlook.com"))])
+ (verse-mode . [(20250910 2354) ((emacs (26 1))) "Major mode for Verse" tar ((:url . "https://github.com/sness23/verse-mode") (:commit . "d5facb02832e812d47c4354b26c60d2f73097165") (:revdesc . "d5facb02832e") (:keywords "languages" "tools") (:authors ("Steven Ness" . "sness@sness.net")) (:maintainers ("Steven Ness" . "sness@sness.net")) (:maintainer "Steven Ness" . "sness@sness.net"))])
+ (versuri . [(20211104 1301) ((emacs (26 1)) (dash (2 16 0)) (request (0 3 0)) (anaphora (1 0 4)) (esxml (0 1 0)) (s (1 12 0)) (esqlite (0 3 1))) "The lyrics package" tar ((:url . "https://github.com/mihaiolteanu/versuri/") (:commit . "c8ea562304194f3379ed8f9c6a785ce8ee72898e") (:revdesc . "c8ea56230419") (:keywords "multimedia") (:authors ("Mihai Olteanu" . "mihai_olteanu@fastmail.fm")) (:maintainers ("Mihai Olteanu" . "mihai_olteanu@fastmail.fm")) (:maintainer "Mihai Olteanu" . "mihai_olteanu@fastmail.fm"))])
+ (vertica . [(20131217 1511) ((sql (3 0))) "Vertica SQL mode extension" tar ((:url . "https://github.com/r0man/vertica-el") (:commit . "3c9647b425c5c13c30bf0cba483646af18196588") (:revdesc . "3c9647b425c5") (:keywords "sql" "vertica") (:authors ("Roman Scherer" . "roman@burningswell.com")) (:maintainers ("Roman Scherer" . "roman@burningswell.com")) (:maintainer "Roman Scherer" . "roman@burningswell.com"))])
+ (vertica-snippets . [(20250314 927) ((yasnippet (0 6 1))) "Yasnippets for Vertica" tar ((:url . "https://github.com/baron42bba/vertica-snippets") (:commit . "5a77be72074c196cc419852d58c14703ff5ba55a") (:revdesc . "5a77be72074c") (:keywords "convenience" "snippets") (:authors ("Andreas Gerler" . "baron@bundesbrandschatzamt.de")) (:maintainers ("Andreas Gerler" . "baron@bundesbrandschatzamt.de")) (:maintainer "Andreas Gerler" . "baron@bundesbrandschatzamt.de"))])
+ (vertico . [(20260826 2309) ((emacs (29 1)) (compat (31))) "VERTical Interactive COmpletion" tar ((:url . "https://github.com/minad/vertico") (:commit . "df51b901b78251be1e3bb54f173856f4cc395163") (:revdesc . "df51b901b782") (:keywords "convenience" "files" "matching" "completion") (:authors ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainers ("Daniel Mendler" . "mail@daniel-mendler.de")) (:maintainer "Daniel Mendler" . "mail@daniel-mendler.de"))])
+ (vertico-prescient . [(20260628 2243) ((emacs (27 1)) (prescient (6 1 0)) (vertico (0 28)) (compat (29 1))) "Prescient.el + Vertico" tar ((:url . "https://github.com/radian-software/prescient.el") (:commit . "5649977fa7789e4615efeca09397ed7eccd06dfc") (:revdesc . "5649977fa778") (:keywords "extensions") (:authors ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainers ("Radian LLC" . "contact+prescient@radian.codes")) (:maintainer "Radian LLC" . "contact+prescient@radian.codes"))])
+ (vertigo . [(20211224 1256) ((dash (2 11 0))) "Jump across lines using the home row" tar ((:url . "https://github.com/noctuid/vertigo.el") (:commit . "280b30518529242ee36cd436bd2349c34c35abb0") (:revdesc . "280b30518529") (:keywords "vim" "vertigo") (:authors ("Fox Kiester" . "noct@posteo.net")) (:maintainers ("Fox Kiester" . "noct@posteo.net")) (:maintainer "Fox Kiester" . "noct@posteo.net"))])
+ (vhdl-capf . [(20160221 1734) nil "Completion at point function (capf) for vhdl-mode" tar ((:url . "https://github.com/sh-ow/vhdl-capf") (:commit . "290abe217050f33532bc9ccb04f894123402f414") (:revdesc . "290abe217050") (:keywords "convenience" "usability" "vhdl" "completion") (:authors ("sh-ow" . "sh-ow@users.noreply.github.com")) (:maintainers ("sh-ow" . "sh-ow@users.noreply.github.com")) (:maintainer "sh-ow" . "sh-ow@users.noreply.github.com"))])
+ (vhdl-ext . [(20260716 1401) ((emacs (29 1)) (vhdl-ts-mode (0 3 3)) (lsp-mode (8 0 0)) (rg (2 3 0)) (hydra (0 15 0)) (flycheck (32)) (async (1 9 7))) "VHDL Extensions" tar ((:url . "https://github.com/gmlarumbe/vhdl-ext") (:commit . "fd400c09de24d3c7da9aed5884b6f114f595373c") (:revdesc . "fd400c09de24") (:keywords "vhdl" "ide" "tools") (:authors ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainers ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainer "Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com"))])
+ (vhdl-ts-mode . [(20260716 1206) ((emacs (29 1))) "VHDL Tree-sitter major mode" tar ((:url . "https://github.com/gmlarumbe/vhdl-ts-mode") (:commit . "a9bfb0dffb5f994b11b7921d5e145ea40e9a68a2") (:revdesc . "a9bfb0dffb5f") (:keywords "vhdl" "ide" "tools") (:authors ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainers ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainer "Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com"))])
+ (vi-tilde-fringe . [(20141028 242) ((emacs (24))) "Displays tildes in the fringe on empty lines a la Vi" tar ((:url . "https://github.com/syl20bnr/vi-tilde-fringe") (:commit . "e6e15638e8c45a5e68d0874d5d8c9a46c4f38a54") (:revdesc . "e6e15638e8c4") (:keywords "emulation") (:authors ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainers ("Sylvain Benner" . "sylvain.benner@gmail.com")) (:maintainer "Sylvain Benner" . "sylvain.benner@gmail.com"))])
+ (vice-mode . [(20260810 1820) ((emacs (29 1))) "VIm-like Commands Extension" tar ((:url . "https://github.com/gpapadok/vice") (:commit . "1de53ed04d7c2f084e6177e53e18d72e9716cb68") (:revdesc . "1de53ed04d7c") (:keywords "convenience" "emulations") (:authors ("Giorgos Papadokostakis" . "giorgos.papadokostakis@proton.me")) (:maintainers ("Giorgos Papadokostakis" . "giorgos.papadokostakis@proton.me")) (:maintainer "Giorgos Papadokostakis" . "giorgos.papadokostakis@proton.me"))])
+ (viewer . [(20170107 202) nil "View-mode extension" tar ((:url . "https://github.com/rubikitch/viewer/") (:commit . "6c8db025bf4021428f7f2c3ef9d74fb13f5d267a") (:revdesc . "6c8db025bf40") (:keywords "view" "extensions") (:authors ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainers ("rubikitch" . "rubikitch@ruby-lang.org")) (:maintainer "rubikitch" . "rubikitch@ruby-lang.org"))])
+ (viking-mode . [(20251218 802) nil "Kill first, ask later" tar ((:url . "https://codeberg.org/scip/viking-mode") (:commit . "de712eb6e7bb3958055868d73fe3dca1d639016b") (:revdesc . "de712eb6e7bb") (:keywords "kill" "delete") (:authors ("T.v.Dein" . "tlinden@cpan.org")) (:maintainers ("T.v.Dein" . "tlinden@cpan.org")) (:maintainer "T.v.Dein" . "tlinden@cpan.org"))])
+ (vim-empty-lines-mode . [(20150111 426) ((emacs (23))) "Vim-like empty line indicator at end of files" tar ((:url . "https://github.com/jmickelin/vim-empty-lines-mode") (:commit . "442a29b0ba1635a3b352c9dd1faf9ce99656d048") (:revdesc . "442a29b0ba16") (:keywords "emulations") (:authors ("Jonne Mickelin" . "jonne@ljhms.com")) (:maintainers ("Jonne Mickelin" . "jonne@ljhms.com")) (:maintainer "Jonne Mickelin" . "jonne@ljhms.com"))])
+ (vim-region . [(20140329 1624) ((expand-region (20140127))) "Select region as vim" tar ((:url . "https://github.com/ongaeshi/emacs-vim-region") (:commit . "7c4a99ce3678fee40c83ab88e8ad075d2a935fdf") (:revdesc . "7c4a99ce3678") (:authors ("ongaeshi" . "ongaeshi0621@gmail.com")) (:maintainers ("ongaeshi" . "ongaeshi0621@gmail.com")) (:maintainer "ongaeshi" . "ongaeshi0621@gmail.com"))])
+ (vim-tab-bar . [(20260826 244) ((emacs (28 1))) "Vim-like tab bar" tar ((:url . "https://github.com/jamescherti/vim-tab-bar.el") (:commit . "c2653f3bb2d102ae62901fb42da1507bdf60cff5") (:revdesc . "c2653f3bb2d1") (:keywords "convenience" "frames") (:authors ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainers ("James Cherti" . "https://www.jamescherti.com/contact/")) (:maintainer "James Cherti" . "https://www.jamescherti.com/contact/"))])
+ (vimgolf . [(20200205 1420) nil "VimGolf interface for the One True Editor" tar ((:url . "https://github.com/timvisher/vimgolf.el") (:commit . "f565447ed294898588a19438d56c116555d8c628") (:revdesc . "f565447ed294") (:keywords "games" "vimgolf" "vim") (:authors ("Tim Visher" . "tim.visher@gmail.com")) (:maintainers ("Tim Visher" . "tim.visher@gmail.com")) (:maintainer "Tim Visher" . "tim.visher@gmail.com"))])
+ (vimish-fold . [(20251023 1551) ((emacs (26 1)) (cl-lib (0 5)) (f (0 18 0))) "Fold text like in Vim" tar ((:url . "https://github.com/mrkkrp/vimish-fold") (:commit . "f71f374d28a83e5f15612fa64aac1b2e78be2dcd") (:revdesc . "f71f374d28a8") (:keywords "convenience") (:authors ("Sergey Matsievskiy" . "matsievskiysv@gmail.com")) (:maintainers ("Sergey Matsievskiy" . "matsievskiysv@gmail.com")) (:maintainer "Sergey Matsievskiy" . "matsievskiysv@gmail.com"))])
+ (vimrc-mode . [(20250128 635) ((emacs (24 3))) "Major mode for vimrc files" tar ((:url . "https://github.com/mcandre/vimrc-mode") (:commit . "f594392a0834193a1fe1522d007e1c8ce5b68e43") (:revdesc . "f594392a0834") (:keywords "languages" "vim") (:authors ("Alpha Tan" . "alphatan.zh@gmail.com")) (:maintainers ("Alpha Tan" . "alphatan.zh@gmail.com")) (:maintainer "Alpha Tan" . "alphatan.zh@gmail.com"))])
+ (vimscript-ts-mode . [(20241020 7) ((emacs (29 1))) "Vim-script major mode using tree-sitter" tar ((:url . "https://github.com/nverno/vimscript-ts-mode") (:commit . "8ebe7746172caaa88d463c58e0bfe76ec7fc971a") (:revdesc . "8ebe7746172c") (:keywords "languages" "vim" "tree-sitter") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (virtual-auto-fill . [(20200906 2038) ((emacs (25 2)) (adaptive-wrap (0 7)) (visual-fill-column (1 9))) "Readably display text without adding line breaks" tar ((:url . "https://github.com/luisgerhorst/virtual-auto-fill") (:commit . "a3991ce02d9a6a1624a3f04da80f4ac966a44092") (:revdesc . "a3991ce02d9a") (:keywords "convenience" "mail" "outlines" "files" "wp") (:authors ("Luis Gerhorst" . "virtual-auto-fill@luisgerhorst.de")) (:maintainers ("Luis Gerhorst" . "virtual-auto-fill@luisgerhorst.de")) (:maintainer "Luis Gerhorst" . "virtual-auto-fill@luisgerhorst.de"))])
+ (virtual-comment . [(20220921 221) ((emacs (26 1))) "Virtual Comments" tar ((:url . "https://github.com/thanhvg/emacs-virtual-comment") (:commit . "b0c2ac4a9d625b5f4f329bbab879ad86cd7056bd") (:revdesc . "b0c2ac4a9d62") (:authors ("Thanh Vuong" . "thanhvg@gmail.com")) (:maintainers ("Thanh Vuong" . "thanhvg@gmail.com")) (:maintainer "Thanh Vuong" . "thanhvg@gmail.com"))])
+ (virtual-ring . [(20250920 1541) ((emacs (25 1))) "Fixed size rings with virtual rotation" tar ((:url . "https://github.com/countvajhula/virtual-ring") (:commit . "2d53ba23ecdca94801cc88085c7df7346d98e514") (:revdesc . "2d53ba23ecdc") (:authors ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainers ("Sid Kasivajhula" . "sid@countvajhula.com")) (:maintainer "Sid Kasivajhula" . "sid@countvajhula.com"))])
+ (virtualenv . [(20140220 2301) nil "Virtualenv for Python" tar ((:url . "https://github.com/aculich/virtualenv.el") (:commit . "cc82856b6316d5e78073de717f0d5d1a4ee35fa6") (:revdesc . "cc82856b6316") (:keywords "python" "virtualenv") (:authors ("Aaron Culich" . "aculich@gmail.com")) (:maintainers ("Aaron Culich" . "aculich@gmail.com")) (:maintainer "Aaron Culich" . "aculich@gmail.com"))])
+ (virtualenvwrapper . [(20190223 1919) ((dash (1 5 0)) (s (1 6 1))) "A featureful virtualenv tool for Emacs" tar ((:url . "https://github.com/porterjamesj/virtualenvwrapper.el") (:commit . "f753e5ad91c2ff5d11bec424aa8cec141efa6925") (:revdesc . "f753e5ad91c2") (:keywords "python" "virtualenv" "virtualenvwrapper") (:authors ("James J Porter" . "porterjamesj@gmail.com")) (:maintainers ("James J Porter" . "porterjamesj@gmail.com")) (:maintainer "James J Porter" . "porterjamesj@gmail.com"))])
+ (visible-mark . [(20251228 614) ((emacs (28 1))) "Highlight marks in buffers" tar ((:url . "https://codeberg.org/ideasman42/emacs-visible-mark") (:commit . "1954c15a790701cdac5734318bd3b1ab4c87d3f9") (:revdesc . "1954c15a7907") (:keywords "convenience" "faces") (:authors ("Ian Kelling" . "ian@iankelling.org")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (visual-ascii-mode . [(20150129 1046) nil "Visualize ascii code (small integer) on buffer" tar ((:url . "https://github.com/Dewdrops/visual-ascii-mode") (:commit . "99285a099a17472ddd9f1b4f74e9d092dd8c5947") (:revdesc . "99285a099a17") (:keywords "presentation") (:authors ("Dewdrops" . "v_v_4474@126.com")) (:maintainers ("Dewdrops" . "v_v_4474@126.com")) (:maintainer "Dewdrops" . "v_v_4474@126.com"))])
+ (visual-fill-column . [(20251110 1039) ((emacs (25 1))) "Fill-column for visual-line-mode" tar ((:url . "https://codeberg.org/joostkremers/visual-fill-column") (:commit . "9c0ecc2af21d3024a2a838c30d574e86265a52be") (:revdesc . "9c0ecc2af21d") (:authors ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainers ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainer "Joost Kremers" . "joostkremers@fastmail.fm"))])
+ (visual-regexp . [(20210502 2019) ((cl-lib (0 2))) "A regexp/replace command for Emacs with interactive visual feedback" tar ((:url . "https://github.com/benma/visual-regexp.el/") (:commit . "48457d42a5e0fe10fa3a9c15854f1f127ade09b5") (:revdesc . "48457d42a5e0") (:keywords "regexp" "replace" "visual" "feedback") (:authors ("Marko Bencun" . "mbencun@gmail.com")) (:maintainers ("Marko Bencun" . "mbencun@gmail.com")) (:maintainer "Marko Bencun" . "mbencun@gmail.com"))])
+ (visual-regexp-steroids . [(20170222 253) ((visual-regexp (1 1))) "Extends visual-regexp to support other regexp engines" tar ((:url . "https://github.com/benma/visual-regexp-steroids.el/") (:commit . "a6420b25ec0fbba43bf57875827092e1196d8a9e") (:revdesc . "a6420b25ec0f") (:keywords "external" "foreign" "regexp" "replace" "python" "visual" "feedback") (:authors ("Marko Bencun" . "mbencun@gmail.com")) (:maintainers ("Marko Bencun" . "mbencun@gmail.com")) (:maintainer "Marko Bencun" . "mbencun@gmail.com"))])
+ (visual-replace . [(20250913 2103) ((emacs (26 1))) "A prompt for replace-string and query-replace" tar ((:url . "https://github.com/szermatt/visual-replace") (:commit . "cf6a02fae01d9962862920a6cfe2488df2f76684") (:revdesc . "cf6a02fae01d") (:keywords "convenience" "matching" "replace") (:authors ("Stephane Zermatten" . "szermatt@gmail.com")) (:maintainers ("Stephane Zermatten" . "szermatt@gmail.com")) (:maintainer "Stephane Zermatten" . "szermatt@gmail.com"))])
+ (visual-shorthands . [(20260104 2221) ((emacs (29 1))) "Visual abbreviations for symbol prefixes" tar ((:url . "https://github.com/gggion/visual-shorthands.el") (:commit . "0511154773533ec2e3c25efa5515ea548ee7e9e1") (:revdesc . "051115477353") (:keywords "convenience") (:maintainers ("Gino Cornejo" . "gggion123@gmail.com")) (:maintainer "Gino Cornejo" . "gggion123@gmail.com"))])
+ (vlc . [(20200328 1143) ((emacs (25 1))) "VideoLAN VLC Media Player Control" tar ((:url . "https://github.com/xuchunyang/vlc.el") (:commit . "07c4a12904f2700fb8420c4e71395fd59a5e6faa") (:revdesc . "07c4a12904f2") (:keywords "tools"))])
+ (vline . [(20210805 1528) ((emacs (24 3))) "Column highlighting (vertical line displaying) mode" tar ((:url . "https://www.emacswiki.org/emacs/VlineMode") (:commit . "f5d7b5743dceca75b81c8c95287cd5b0341debf9") (:revdesc . "f5d7b5743dce") (:keywords "faces" "editing" "emulating") (:authors ("Taiki SUGAWARA" . "buzz.taiki@gmail.com")) (:maintainers ("Taiki SUGAWARA" . "buzz.taiki@gmail.com")) (:maintainer "Taiki SUGAWARA" . "buzz.taiki@gmail.com"))])
+ (vmd-mode . [(20210524 27) ((emacs (24 3))) "Fast Github-flavored Markdown preview using a vmd subprocess" tar ((:url . "https://github.com/blak3mill3r/vmd-mode") (:commit . "b2bdf2ab54f8fc37780e6b473e4ad69c0e9ff4a6") (:revdesc . "b2bdf2ab54f8") (:keywords "markdown" "preview" "live" "vmd") (:authors ("Blake Miller" . "blak3mill3r@gmail.com")) (:maintainers ("Blake Miller" . "blak3mill3r@gmail.com")) (:maintainer "Blake Miller" . "blak3mill3r@gmail.com"))])
+ (voca-builder . [(20161101 1645) ((popup (0 5 2))) "Helps you build up your vocabulary" tar ((:url . "https://github.com/yitang/voca-builder") (:commit . "51573beec8cd8308477b0faf453aad93e17f57c5") (:revdesc . "51573beec8cd") (:keywords "english" "vocabulary") (:authors ("Yi Tang" . "yi.tang.uk@me.com")) (:maintainers ("Yi Tang" . "yi.tang.uk@me.com")) (:maintainer "Yi Tang" . "yi.tang.uk@me.com"))])
+ (volatile-highlights . [(20260315 1109) ((emacs (24 4))) "Transient visual feedback for edits" tar ((:url . "https://github.com/k-talo/volatile-highlights.el") (:commit . "f68ac37451c1226d6f13c1b299ec7516f74888a1") (:revdesc . "f68ac37451c1") (:keywords "editing" "emulations" "convenience" "wp") (:authors ("K-talo Miyazaki" . "Keitaro.Miyazaki@gmail.com")) (:maintainers ("K-talo Miyazaki" . "Keitaro.Miyazaki@gmail.com")) (:maintainer "K-talo Miyazaki" . "Keitaro.Miyazaki@gmail.com"))])
+ (volume . [(20220904 1727) nil "Tweak your sound card volume from Emacs" tar ((:url . "http://www.brockman.se/software/volume-el/") (:commit . "050d3e6d2543a6771a13f95612055864679b6301") (:revdesc . "050d3e6d2543") (:authors ("Daniel Brockman" . "daniel@brockman.se")) (:maintainers ("Daniel Brockman" . "daniel@brockman.se")) (:maintainer "Daniel Brockman" . "daniel@brockman.se"))])
+ (vs-dark-theme . [(20260217 1623) ((emacs (24 1))) "Visual Studio IDE dark theme" tar ((:url . "https://github.com/emacs-vs/vs-dark-theme") (:commit . "ebc176a83808772746c55c91420a95b28b84c869") (:revdesc . "ebc176a83808") (:keywords "faces"))])
+ (vs-light-theme . [(20260217 1623) ((emacs (24 1))) "Visual Studio IDE light theme" tar ((:url . "https://github.com/emacs-vs/vs-light-theme") (:commit . "105c9f2530b4834e1a0ea35964dbbe2c52bbbe5f") (:revdesc . "105c9f2530b4") (:keywords "faces"))])
+ (vscdark-theme . [(20191212 107) ((emacs (24 1))) "VS Code Dark+ like theme" tar ((:url . "https://github.com/abelikoff/vscdark-theme") (:commit . "f419553e2a2f091a8bc257fb5ab520326e93ddd4") (:revdesc . "f419553e2a2f"))])
+ (vscode-dark-plus-theme . [(20260606 209) nil "Default Visual Studio Code Dark+ theme" tar ((:url . "https://github.com/ianpan870102/vscode-dark-plus-emacs-theme") (:commit . "c401b44809bfbf5928582efddc19ddda4f271ed4") (:revdesc . "c401b44809bf"))])
+ (vscode-icon . [(20241201 2200) ((emacs (25 1))) "Utility package to provide Vscode style icons" tar ((:url . "https://github.com/jojojames/vscode-icon-emacs") (:commit . "27cbf4f178924de1e2a09b4d87f87b5fa67c8cf4") (:revdesc . "27cbf4f17892") (:keywords "files" "tools") (:authors ("James Nguyen" . "james@jojojames.com")) (:maintainers ("James Nguyen" . "james@jojojames.com")) (:maintainer "James Nguyen" . "james@jojojames.com"))])
+ (vsh-mode . [(20250901 1658) ((emacs (30 0))) "Alternate PTY interface for complex terminal sessions" tar ((:url . "https://github.com/hardenedapple/vsh") (:commit . "47c35e3062a20418340c8150c8d5ad41c1e7d6b4") (:revdesc . "47c35e3062a2") (:keywords "processes") (:authors ("Matthew Malcomson" . "hardenedapple@gmail.com")) (:maintainers ("Matthew Malcomson" . "hardenedapple@gmail.com")) (:maintainer "Matthew Malcomson" . "hardenedapple@gmail.com"))])
+ (vtab . [(20260209 1524) ((emacs (27 1))) "Vertical tab bar" tar ((:url . "https://github.com/mugen-void/vtab") (:commit . "ae2ef3915e19c6ebd36f7e87dc37219263744f23") (:revdesc . "ae2ef3915e19") (:keywords "convenience" "frames") (:authors ("mugen" . "mugen.void42@gmail.com")) (:maintainers ("mugen" . "mugen.void42@gmail.com")) (:maintainer "mugen" . "mugen.void42@gmail.com"))])
+ (vterm . [(20260730 1414) ((emacs (25 1))) "Fully-featured terminal emulator" tar ((:url . "https://github.com/akermu/emacs-libvterm") (:commit . "70921114908ebb260d6686db8cbe2445a64f90a2") (:revdesc . "70921114908e") (:keywords "terminals") (:authors ("Lukas Fürmetz" . "fuermetz@mailbox.org")) (:maintainers ("Lukas Fürmetz" . "fuermetz@mailbox.org")) (:maintainer "Lukas Fürmetz" . "fuermetz@mailbox.org"))])
+ (vterm-editor . [(20260330 845) ((emacs (25 1)) (vterm (0 0 1))) "Edit text in a buffer and send it to vterm" tar ((:url . "https://git.andros.dev/andros/vterm-editor.el") (:commit . "239782cdf2411aed27a4f053c30e05c90047351b") (:revdesc . "239782cdf241") (:keywords "terminals" "convenience") (:authors ("Andros Fenollosa" . "hi@andros.dev")) (:maintainers ("Andros Fenollosa" . "hi@andros.dev")) (:maintainer "Andros Fenollosa" . "hi@andros.dev"))])
+ (vterm-hotkey . [(20240702 1445) ((emacs (29 4)) (vterm (0 0))) "Control vterm buffers with hotkeys" tar ((:url . "https://github.com/rootatpixel/vterm-hotkey") (:commit . "039033a4c30dabca625d6924d1796bb9e13d85c7") (:revdesc . "039033a4c30d") (:keywords "terminals" "processes" "hotkeys") (:authors ("rootatpixel" . "rootatpixel@gmail.com")) (:maintainers ("rootatpixel" . "rootatpixel@gmail.com")) (:maintainer "rootatpixel" . "rootatpixel@gmail.com"))])
+ (vterm-toggle . [(20260601 1632) ((emacs (25 1)) (vterm (0 0 1))) "Toggles between the vterm buffer and other buffers" tar ((:url . "https://github.com/jixiuf/vterm-toggle") (:commit . "a0051a8b8eaa85f8df54ddb032f5710c1f62779d") (:revdesc . "a0051a8b8eaa") (:keywords "vterm" "terminals") (:authors (nil . "jixiufjixiuf@qq.com")) (:maintainers (nil . "jixiufjixiuf@qq.com")) (:maintainer nil . "jixiufjixiuf@qq.com"))])
+ (vtm . [(20200921 338) nil "Manages vterm buffers with configuration files" tar ((:url . "https://github.com/laishulu/emacs-vterm-manager") (:commit . "d770fd8cff7c24688199392ad93c01485c6a9569") (:revdesc . "d770fd8cff7c") (:keywords "convenience"))])
+ (vue-html-mode . [(20180428 2035) nil "Major mode for editing Vue.js templates" tar ((:url . "https://github.com/AdamNiederer/vue-html-mode") (:commit . "361a9fa117f044c3072dc5a7344ff7be31725849") (:revdesc . "361a9fa117f0") (:keywords "languages" "vue" "template") (:authors ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainers ("Adam Niederer" . "adam.niederer@gmail.com")) (:maintainer "Adam Niederer" . "adam.niederer@gmail.com"))])
+ (vue-mode . [(20240101 333) ((mmm-mode (0 5 5)) (vue-html-mode (0 2)) (ssass-mode (0 2)) (edit-indirect (0 1 4))) "Major mode for vue component based on mmm-mode" tar ((:url . "https://github.com/AdamNiederer/vue-mode") (:commit . "3a8056bc6ea6458265efb91067c7467860d2c118") (:revdesc . "3a8056bc6ea6") (:keywords "languages") (:authors ("codefalling" . "code.falling@gmail.com")) (:maintainers ("codefalling" . "code.falling@gmail.com")) (:maintainer "codefalling" . "code.falling@gmail.com"))])
+ (vue3-mode . [(20250331 1625) ((emacs (29 1)) (polymode (0 2 2)) (vue-html-mode (0 2))) "Syntax highlighting for modern Vue.js 3" tar ((:url . "https://github.com/vsalvino/vue3-mode") (:commit . "a1ad84c0cc5ea100dd11aeae9b52669918830730") (:revdesc . "a1ad84c0cc5e") (:keywords "languages" "vue") (:authors ("Vince Salvino" . "mvsalvino@gmail.com")) (:maintainers ("Vince Salvino" . "mvsalvino@gmail.com")) (:maintainer "Vince Salvino" . "mvsalvino@gmail.com"))])
+ (vui . [(20260825 1421) ((emacs (29 1))) "Declarative, component-based UI library" tar ((:url . "https://github.com/d12frosted/vui.el") (:commit . "5d4b70f6f5c12930166c6c0bcf68d80b90c96285") (:revdesc . "5d4b70f6f5c1") (:keywords "ui" "widgets" "tools") (:authors ("Boris Buliga" . "boris@d12frosted.io")) (:maintainers ("Boris Buliga" . "boris@d12frosted.io")) (:maintainer "Boris Buliga" . "boris@d12frosted.io"))])
+ (vuiet . [(20231231 1051) ((emacs (26 1)) (lastfm (1 1)) (versuri (1 0)) (s (1 12 0)) (bind-key (2 4)) (mpv (0 1 0)) (ivy (0 14 2))) "The music player and explorer for Emacs" tar ((:url . "https://github.com/mihaiolteanu/vuiet") (:commit . "25d79860b165f04d7d39395138ed4f23e982132f") (:revdesc . "25d79860b165") (:keywords "multimedia") (:authors ("Mihai Olteanu" . "mihai_olteanu@fastmail.fm")) (:maintainers ("Mihai Olteanu" . "mihai_olteanu@fastmail.fm")) (:maintainer "Mihai Olteanu" . "mihai_olteanu@fastmail.fm"))])
+ (vulpea . [(20260826 942) ((emacs (29 1)) (org (9 4 4)) (emacsql (4 3 0)) (s (1 12)) (dash (2 19))) "Note management library for Org mode" tar ((:url . "https://github.com/d12frosted/vulpea") (:commit . "db0f08fe836067296d494ca90e5888930832cb06") (:revdesc . "db0f08fe8360") (:authors ("Boris Buliga" . "boris@d12frosted.io")) (:maintainers ("Boris Buliga" . "boris@d12frosted.io")) (:maintainer "Boris Buliga" . "boris@d12frosted.io"))])
+ (vulpea-journal . [(20260808 656) ((emacs (29 1)) (vulpea (2 5 0)) (vulpea-ui (1 1 0)) (vui (1 3 0)) (dash (2 20 0))) "Daily note interface for vulpea" tar ((:url . "https://github.com/d12frosted/vulpea-journal") (:commit . "ec7131ad4bb8d70028ed765991286a0e16530288") (:revdesc . "ec7131ad4bb8") (:keywords "org-mode" "roam" "convenience") (:authors ("Boris Buliga" . "boris@d12frosted.io")) (:maintainers ("Boris Buliga" . "boris@d12frosted.io")) (:maintainer "Boris Buliga" . "boris@d12frosted.io"))])
+ (vulpea-ui . [(20260825 1747) ((emacs (29 1)) (vulpea (2 5 0)) (vui (1 3 0))) "Sidebar infrastructure and widget framework for vulpea notes" tar ((:url . "https://github.com/d12frosted/vulpea-ui") (:commit . "31ee4bd8ff820ada28bef9a116d746d7f8d133b3") (:revdesc . "31ee4bd8ff82") (:keywords "outlines" "hypermedia") (:authors ("Boris Buliga" . "boris@d12frosted.io")) (:maintainers ("Boris Buliga" . "boris@d12frosted.io")) (:maintainer "Boris Buliga" . "boris@d12frosted.io"))])
+ (vunit-mode . [(20250714 523) ((hydra (0 14 0)) (emacs (24 3))) "VUnit Runner Interface" tar ((:url . "https://github.com/embed-me") (:commit . "b26ecc46464a57eb00bf62b15c0d717774ec804e") (:revdesc . "b26ecc46464a") (:keywords "vunit" "python" "tools") (:authors ("Lukas Lichtl" . "support@embed-me.com")) (:maintainers ("Lukas Lichtl" . "support@embed-me.com")) (:maintainer "Lukas Lichtl" . "support@embed-me.com"))])
+ (vyper-mode . [(20180707 1935) ((emacs (24 3))) "Major mode for the Vyper programming language" tar ((:url . "https://github.com/ralexstokes/vyper-mode") (:commit . "323dfddfc38f0b11697e9ebaf04d1b53297e54e5") (:revdesc . "323dfddfc38f") (:keywords "languages") (:authors ("Alex Stokes" . "r.alex.stokes@gmail.com")) (:maintainers ("Alex Stokes" . "r.alex.stokes@gmail.com")) (:maintainer "Alex Stokes" . "r.alex.stokes@gmail.com"))])
+ (w32-browser . [(20170101 1954) nil "Run Windows application associated with a file" tar ((:url . "http://www.emacswiki.org/w32-browser.el") (:commit . "e5c60eafd8f8d3546a0fa295ad5af2414d36b4e6") (:revdesc . "e5c60eafd8f8") (:keywords "mouse" "dired" "w32" "explorer") (:maintainers ("Drew Adams (concat \"drew.adams\" \"oracle\" \".com\"" . "\"@\" ")) (:maintainer "Drew Adams (concat \"drew.adams\" \"oracle\" \".com\"" . "\"@\" "))])
+ (w32-ime . [(20201107 143) ((emacs (24 4))) "Windows IME UI/UX controler" tar ((:url . "https://github.com/trueroad/w32-ime.el") (:commit . "9c62273dce0ba685a591577885b1e216ba832ec1") (:revdesc . "9c62273dce0b") (:authors ("Masamichi Hosoda" . "trueroad@trueroad.jp") ("Naoya Yamashita" . "conao3@gmail.com")) (:maintainers ("Masamichi Hosoda" . "trueroad@trueroad.jp")) (:maintainer "Masamichi Hosoda" . "trueroad@trueroad.jp"))])
+ (w3m . [(20260813 1200) nil "An Emacs interface to w3m" tar ((:url . "https://github.com/emacs-w3m/emacs-w3m") (:commit . "4945c16910b5d3041db805c724604aad92ad0e69") (:revdesc . "4945c16910b5") (:keywords "w3m" "www" "hypermedia") (:authors ("TSUCHIYA Masatoshi" . "tsuchiya@namazu.org") ("Shun-ichi GOTO" . "gotoh@taiyo.co.jp") ("Satoru Takabayashi" . "satoru-t@is.aist-nara.ac.jp") ("Hideyuki SHIRAI" . "shirai@meadowy.org") ("Keisuke Nishida" . "kxn30@po.cwru.edu") ("Yuuichi Teranishi" . "teranisi@gohome.org") ("Akihiro Arisawa" . "ari@mbf.sphere.ne.jp") ("Katsumi Yamaoka" . "yamaoka@jpl.org") ("Tsuyoshi CHO" . "Tsuyoshi.CHO@Gmail.com")) (:maintainers ("TSUCHIYA Masatoshi" . "tsuchiya@namazu.org") ("Shun-ichi GOTO" . "gotoh@taiyo.co.jp") ("Satoru Takabayashi" . "satoru-t@is.aist-nara.ac.jp") ("Hideyuki SHIRAI" . "shirai@meadowy.org") ("Keisuke Nishida" . "kxn30@po.cwru.edu") ("Yuuichi Teranishi" . "teranisi@gohome.org") ("Akihiro Arisawa" . "ari@mbf.sphere.ne.jp") ("Katsumi Yamaoka" . "yamaoka@jpl.org") ("Tsuyoshi CHO" . "Tsuyoshi.CHO@Gmail.com")) (:maintainer "TSUCHIYA Masatoshi" . "tsuchiya@namazu.org"))])
+ (wacspace . [(20260427 2039) ((emacs (24)) (dash (1 2 0))) "The WACky WorkSPACE manager for emACS" tar ((:url . "https://github.com/shosti/wacspace.el") (:commit . "28b1fb7a124febb8dbf47aaae8d7dd8c185eea7d") (:revdesc . "28b1fb7a124f") (:keywords "workspace") (:authors ("Emanuel Evans" . "emanuel.evans@gmail.com")) (:maintainers ("Emanuel Evans" . "emanuel.evans@gmail.com")) (:maintainer "Emanuel Evans" . "emanuel.evans@gmail.com"))])
+ (waf-mode . [(20170403 1940) nil "Waf integration for Emacs" tar ((:url . "https://bitbucket.org/dvalchuk/waf-mode") (:commit . "91c761336aa137b85b88b53b3f0cc60786d70800") (:revdesc . "91c761336aa1") (:authors ("Denys Valchuk" . "dvalchuk@gmail.com")) (:maintainers ("Denys Valchuk" . "dvalchuk@gmail.com")) (:maintainer "Denys Valchuk" . "dvalchuk@gmail.com"))])
+ (waher-theme . [(20141115 1230) ((emacs (24 1))) "Emacs 24 theme based on waher for st2 by dduckster" tar ((:url . "https://github.com/jasonm23/emacs-waher-theme") (:commit . "60d31519fcfd8e797723d47961b255ae2f2e2c0a") (:revdesc . "60d31519fcfd") (:authors ("Jasonm23" . "jasonm23@gmail.com")) (:maintainers ("Jasonm23" . "jasonm23@gmail.com")) (:maintainer "Jasonm23" . "jasonm23@gmail.com"))])
+ (wakatime-mode . [(20260520 234) ((emacs (28 1))) "Automatic time tracking extension for WakaTime" tar ((:url . "https://github.com/wakatime/wakatime-mode") (:commit . "464ea0ea99696133553c565cdfc0966a496b1887") (:revdesc . "464ea0ea9969") (:keywords "calendar" "comm") (:authors ("Gabor Torok" . "gabor@20y.hu")) (:maintainers ("Alan Hamlett" . "alan@wakatime.com")) (:maintainer "Alan Hamlett" . "alan@wakatime.com"))])
+ (wakib-keys . [(20260420 1927) ((emacs (27 1))) "Minor Mode for Modern Keybindings" tar ((:url . "https://github.com/darkstego/wakib-keys/") (:commit . "39a8cd3c61b4d2b1f93e2de8e56906f4a648959b") (:revdesc . "39a8cd3c61b4") (:keywords "convenience" "keybindings" "keys"))])
+ (wal-mode . [(20220409 1214) ((emacs (25 1))) "A major mode for the WAL programming language" tar ((:url . "https://github.com/LucasKl/wal-major-mode") (:commit . "16733847f04af1929e590ff3e41f554baa3ba640") (:revdesc . "16733847f04a") (:keywords "languages") (:authors ("Lucas Klemmer" . "lucas.klemmer@jku.at")) (:maintainers ("Lucas Klemmer" . "lucas.klemmer@jku.at")) (:maintainer "Lucas Klemmer" . "lucas.klemmer@jku.at"))])
+ (walkclj . [(20220719 1610) ((emacs (25)) (parseclj (0 1 0)) (treepy (0 1 0)) (a (1 0 0))) "Manipulate Clojure parse trees" tar ((:url . "https://github.com/plexus/walkclj") (:commit . "875ee7a350f5141f425c4b5350a630e1ee1795e8") (:revdesc . "875ee7a350f5") (:keywords "languages"))])
+ (walkman . [(20260515 1746) ((transient (0 1 0)) (org (8 3 5)) (json-mode (1 6 0)) (emacs (26 3))) "Write HTTP requests in Org mode" tar ((:url . "https://github.com/abrochard/walkman") (:commit . "0328a6b8ca98926a4fed88e722eba66ddbc5b0a8") (:revdesc . "0328a6b8ca98") (:keywords "walkman" "http" "curl" "org" "comm"))])
+ (wallabag . [(20251226 1223) ((emacs (27 1)) (request (0 3 3)) (s (1 12 0)) (emacsql (3 0 0)) (gptel (0 8 6))) "Save and manage articles with wallabag" tar ((:url . "https://github.com/chenyanming/wallabag.el") (:commit . "ff44e102ab467dd5abf021b3e3581be0c4358d18") (:revdesc . "ff44e102ab46") (:keywords "tools") (:authors ("Damon Chan" . "elecming@gmail.com")) (:maintainers ("Damon Chan" . "elecming@gmail.com")) (:maintainer "Damon Chan" . "elecming@gmail.com"))])
+ (wallpaper . [(20201019 2123) ((emacs (25 1))) "Setting the wallpaper" tar ((:url . "https://github.com/farlado/emacs-wallpaper") (:commit . "cc0101726dd2fa2b4eda06924c7abfae54f663e2") (:revdesc . "cc0101726dd2") (:keywords "unix" "wallpaper" "extensions") (:authors ("Farlado" . "farlado@sdf.org")) (:maintainers ("Farlado" . "farlado@sdf.org")) (:maintainer "Farlado" . "farlado@sdf.org"))])
+ (wallpreview . [(20220703 1108) ((emacs (24 4))) "Set wallpapers with image-dired" tar ((:url . "https://github.com/nryotaro/wallpreview") (:commit . "6eae0549afdfe725b453ca4fb0878c728735892d") (:revdesc . "6eae0549afdf"))])
+ (wand . [(20220519 1214) nil "Magic wand for Emacs - Select and execute" tar ((:url . "https://github.com/cmpitg/wand") (:commit . "e4afc0469c818e7ce73ef31c38d911477947d72e") (:revdesc . "e4afc0469c81") (:keywords "extensions" "tools") (:authors ("Ha-Duong Nguyen" . "cmpitgATgmail")) (:maintainers ("Ha-Duong Nguyen" . "cmpitgATgmail")) (:maintainer "Ha-Duong Nguyen" . "cmpitgATgmail"))])
+ (wandbox . [(20170603 1231) ((emacs (24)) (request (0 3 0)) (s (1 10 0))) "Wandbox client" tar ((:url . "https://github.com/kosh04/emacs-wandbox") (:commit . "e002fe41f2cd9b4ce2b1dc80b83301176e9117f1") (:revdesc . "e002fe41f2cd") (:keywords "tools") (:authors ("KOBAYASHI Shigeru" . "shigeru.kb@gmail.com")) (:maintainers ("KOBAYASHI Shigeru" . "shigeru.kb@gmail.com")) (:maintainer "KOBAYASHI Shigeru" . "shigeru.kb@gmail.com"))])
+ (wanderlust . [(20251102 2110) ((emacs (24 5)) (apel (0)) (flim (0)) (semi (0))) "Yet Another Message Interface on Emacsen" tar ((:url . "https://github.com/emacsmirror/wanderlust") (:commit . "9414fc386945870913e5183817593596315eddd8") (:revdesc . "9414fc386945") (:keywords "mail" "net news") (:authors ("Yuuichi Teranishi" . "teranisi@gohome.org") ("Masahiro MURATA" . "muse@ba2.so-net.ne.jp")) (:maintainers ("Yuuichi Teranishi" . "teranisi@gohome.org") ("Masahiro MURATA" . "muse@ba2.so-net.ne.jp")) (:maintainer "Yuuichi Teranishi" . "teranisi@gohome.org"))])
+ (warm-mode . [(20260209 1810) ((emacs (27 1))) "Warm colors for nighttime coding" tar ((:url . "https://github.com/smallwat3r/emacs-warm-mode") (:commit . "27362826e970ed0e902bee3512d97dc02f196a7b") (:revdesc . "27362826e970") (:keywords "faces" "convenience") (:authors ("Matthieu Petiteau" . "mpetiteau.pro@gmail.com")) (:maintainers ("Matthieu Petiteau" . "mpetiteau.pro@gmail.com")) (:maintainer "Matthieu Petiteau" . "mpetiteau.pro@gmail.com"))])
+ (warm-night-theme . [(20161101 1428) ((emacs (24))) "Emacs 24 theme with a dark background" tar ((:url . "https://github.com/mswift42/warm-night-theme") (:commit . "020f084d23409b5035150508ba6e57c2509edd64") (:revdesc . "020f084d2340"))])
+ (wasp-mode . [(20230424 1307) ((emacs (24 3))) "A major mode for the Wasp programming language" tar ((:url . "https://github.com/thechampagne/wasp-mode") (:commit . "76198cdd5f0ece3770c3a586115caea3ea613169") (:revdesc . "76198cdd5f0e") (:keywords "files" "wasp"))])
+ (wat-ts-mode . [(20231006 223) ((emacs (29 1))) "Major modes for webassembly text formats using tree sitter" tar ((:url . "https://github.com/nverno/wat-ts-mode") (:commit . "d2bbd7dbb57482dc0407574d61b2dcad31b96204") (:revdesc . "d2bbd7dbb574") (:keywords "wasm" "wat" "wast" "languages" "tree-sitter") (:authors ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainers ("Noah Peart" . "noah.v.peart@gmail.com")) (:maintainer "Noah Peart" . "noah.v.peart@gmail.com"))])
+ (watch-buffer . [(20120331 2044) nil "Run a shell command when saving a buffer" tar ((:url . "https://github.com/mjsteger/watch-buffer") (:commit . "a01cf15608c5bf91df253104053041ca1afdf411") (:revdesc . "a01cf15608c5") (:keywords "automation" "convenience") (:authors ("Michael Steger" . "mjsteger1@gmail.com")) (:maintainers ("Michael Steger" . "mjsteger1@gmail.com")) (:maintainer "Michael Steger" . "mjsteger1@gmail.com"))])
+ (wavedrom-mode . [(20260715 1713) ((emacs (29 1))) "WaveDrom Integration" tar ((:url . "https://github.com/gmlarumbe/wavedrom-mode") (:commit . "5d59b7ca2bdf355d9d2f00d563acf4e17e8ba8b9") (:revdesc . "5d59b7ca2bdf") (:keywords "fpga" "asic" "tools") (:authors ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainers ("Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com")) (:maintainer "Gonzalo Larumbe" . "gonzalomlarumbe@gmail.com"))])
+ (wavefront-obj-mode . [(20170808 1716) nil "Major mode for Wavefront obj files" tar ((:url . "https://github.com/abend/wavefront-obj-mode") (:commit . "34027915de6496460d8e68b5991dd24d47d54859") (:revdesc . "34027915de64") (:authors ("Sasha Kovar" . "sasha-emacs@arcocene.org")) (:maintainers ("Sasha Kovar" . "sasha-emacs@arcocene.org")) (:maintainer "Sasha Kovar" . "sasha-emacs@arcocene.org"))])
+ (wc-goal-mode . [(20140829 1359) nil "Running word count with goals (minor mode)" tar ((:url . "https://github.com/bnbeckwith/wc-goal-mode") (:commit . "bf21ab9c5a449bcc20dd207a4915dcec218d2699") (:revdesc . "bf21ab9c5a44"))])
+ (wc-mode . [(20210418 47) ((emacs (24 1))) "Running word count with goals (minor mode)" tar ((:url . "https://github.com/bnbeckwith/wc-mode") (:commit . "63be1433b8a63cdc3239cc751e36360429c42b51") (:revdesc . "63be1433b8a6"))])
+ (wdl-mode . [(20180831 1946) nil "WDL (Workflow Definition Language) major mode" tar ((:url . "https://github.com/zhanxw/wdl-mode") (:commit . "cef86e5afc136ae5ad9324cd6e6d6f860b889bcf") (:revdesc . "cef86e5afc13") (:keywords "languages") (:authors ("Xiaowei Zhan" . "zhanxw@gmail.com")) (:maintainers ("Xiaowei Zhan" . "zhanxw@gmail.com")) (:maintainer "Xiaowei Zhan" . "zhanxw@gmail.com"))])
+ (weak-ref . [(20200217 2200) ((emacs (24 3))) "Weak references for Emacs Lisp" tar ((:url . "https://github.com/skeeto/elisp-weak-ref") (:commit . "24e8c37da6465e65ce9f866267bd3fa53c8899c6") (:revdesc . "24e8c37da646") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainer "Christopher Wellons" . "wellons@nullprogram.com"))])
+ (weather-metno . [(20250727 1642) ((emacs (24)) (cl-lib (0 3))) "Weather data from met.no in Emacs" tar ((:url . "https://github.com/ruediger/weather-metno-el") (:commit . "00eab9a9486e192917238145a4f2505d17fad77a") (:revdesc . "00eab9a9486e") (:keywords "comm") (:authors ("Rüdiger Sonderfeld" . "ruediger@c-plusplus.de")) (:maintainers ("Rüdiger Sonderfeld" . "ruediger@c-plusplus.de")) (:maintainer "Rüdiger Sonderfeld" . "ruediger@c-plusplus.de"))])
+ (weather-scout . [(20251226 1713) ((emacs (27 1)) (persist (0 6 1))) "Display weather forecast from MET Norway" tar ((:url . "https://github.com/hsolg/emacs-weather-scout") (:commit . "45163ef767452dea4bb9bb75e481bd1ca37acf6d") (:revdesc . "45163ef76745") (:authors ("Henrik Solgaard" . "henrik.solgaard@gmail.com")) (:maintainers ("Henrik Solgaard" . "henrik.solgaard@gmail.com")) (:maintainer "Henrik Solgaard" . "henrik.solgaard@gmail.com"))])
+ (web . [(20141231 2001) ((dash (2 9 0)) (s (1 5 0))) "Useful HTTP client" tar ((:url . "https://github.com/nicferrier/emacs-web") (:commit . "483188dac4bc6b409b985c9dae45f3324a425efd") (:revdesc . "483188dac4bc") (:keywords "lisp" "http" "hypermedia") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (web-beautify . [(20161115 2247) nil "Format HTML, CSS and JavaScript/JSON" tar ((:url . "https://github.com/yasuyk/web-beautify") (:commit . "e1b45321d8c11b404b12c8e55afe55eaa7c84ee9") (:revdesc . "e1b45321d8c1") (:authors ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainers ("Yasuyuki Oka" . "yasuyk@gmail.com")) (:maintainer "Yasuyuki Oka" . "yasuyk@gmail.com"))])
+ (web-completion-data . [(20160318 848) nil "Shared completion data for ac-html and company-web" tar ((:url . "https://github.com/osv/web-completion-data") (:commit . "c272c94e8a71b779c29653a532f619acad433a4f") (:revdesc . "c272c94e8a71") (:keywords "html" "auto-complete" "company") (:authors ("Olexandr Sydorchuk" . "olexandr.syd@gmail.com")) (:maintainers ("Olexandr Sydorchuk" . "olexandr.syd@gmail.com")) (:maintainer "Olexandr Sydorchuk" . "olexandr.syd@gmail.com"))])
+ (web-mode . [(20260824 1135) ((emacs (24 3 1))) "Major mode for editing web templates" tar ((:url . "https://web-mode.org") (:commit . "e417e389474f934f4f3c11c88ad6c476642e1f90") (:revdesc . "e417e389474f") (:keywords "languages") (:maintainers ("François-Xavier Bois" . "fxbois@gmail.com")) (:maintainer "François-Xavier Bois" . "fxbois@gmail.com"))])
+ (web-mode-edit-element . [(20190531 852) ((emacs (24 4)) (web-mode (14))) "Helper-functions for attribute- and element-handling" tar ((:url . "https://github.com/jtkDvlp/web-mode-edit-element") (:commit . "ad5d7e4dc2420bdd00ce65d9adffbd38a5904afa") (:revdesc . "ad5d7e4dc242") (:keywords "languages" "convenience") (:authors ("Julian T. Knabenschuh" . "jtkdevelopments@gmail.com")) (:maintainers ("Julian T. Knabenschuh" . "jtkdevelopments@gmail.com")) (:maintainer "Julian T. Knabenschuh" . "jtkdevelopments@gmail.com"))])
+ (web-narrow-mode . [(20170407 210) ((web-mode (14 0 27))) "Quick narrow code block in web-mode" tar ((:url . "https://github.com/Qquanwei/web-narrow-mode") (:commit . "b25fae07844875d5b62d14b98442c88817b7e139") (:revdesc . "b25fae078448") (:keywords "web-mode" "react" "narrow" "web") (:authors ("Qquanwei" . "quanwei9958@126.com")) (:maintainers ("Johan Andersson" . "quanwei9958@126.com")) (:maintainer "Johan Andersson" . "quanwei9958@126.com"))])
+ (web-search . [(20190620 602) ((emacs (24 3))) "Open a web search" tar ((:url . "https://github.com/xuchunyang/web-search.el") (:commit . "a22cbdc663a1895d5a5b69de91e1e3b9eb64b92f") (:revdesc . "a22cbdc663a1") (:keywords "web" "search") (:authors ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainers ("Xu Chunyang" . "mail@xuchunyang.me")) (:maintainer "Xu Chunyang" . "mail@xuchunyang.me"))])
+ (web-server . [(20210708 2242) ((emacs (24 1)) (cl-lib (0 6))) "Emacs Web Server" tar ((:url . "https://github.com/eschulte/emacs-web-server") (:commit . "6357a1c2d1718778503f7ee0909585094117525b") (:revdesc . "6357a1c2d171") (:keywords "http" "server" "network") (:authors ("Eric Schulte" . "schulte.eric@gmail.com")) (:maintainers ("Eric Schulte" . "schulte.eric@gmail.com")) (:maintainer "Eric Schulte" . "schulte.eric@gmail.com"))])
+ (webdriver . [(20250224 2303) ((emacs (27 1))) "WebDriver local end implementation" tar ((:url . "https://gitlab.com/mauroaranda/emacs-webdriver") (:commit . "dfe26adc9482d50c7c6ca765916443bd74cf548d") (:revdesc . "dfe26adc9482") (:keywords "tools") (:authors ("Mauro Aranda" . "maurooaranda@gmail.com")) (:maintainers ("Mauro Aranda" . "maurooaranda@gmail.com")) (:maintainer "Mauro Aranda" . "maurooaranda@gmail.com"))])
+ (webkit-color-picker . [(20180325 736) ((emacs (26 0)) (posframe (0 1 0))) "Insert and adjust colors using Webkit Widgets" tar ((:url . "https://github.com/osener/emacs-webkit-color-picker") (:commit . "765cac80144cad4bc0bf59025ea0199f0486f737") (:revdesc . "765cac80144c") (:keywords "tools") (:authors ("Ozan Sener" . "hi@ozan.email")) (:maintainers ("Ozan Sener" . "hi@ozan.email")) (:maintainer "Ozan Sener" . "hi@ozan.email"))])
+ (weblio . [(20250928 1117) ((request (0 3 3)) (emacs (25 1))) "Look up Japanese words on Weblio.jp" tar ((:url . "https://github.com/pzel/weblio") (:commit . "86adae50e51a74149d9805c0446edf10a7f5c3f7") (:revdesc . "86adae50e51a") (:keywords "langauges" "i18n"))])
+ (weblogger . [(20110926 1618) ((xml-rpc (1 6 8))) "Weblog maintenance via XML-RPC APIs" tar ((:url . "http://launchpad.net/weblogger-el") (:commit . "40cfbfc69be6a619173804441db2f407e3fa1731") (:revdesc . "40cfbfc69be6") (:keywords "weblog" "blogger" "cms" "movable" "type" "openweblog" "blog"))])
+ (weblorg . [(20240711 940) ((templatel (0 1 6)) (emacs (26 1))) "Static Site Generator for org-mode" tar ((:url . "https://emacs.love/weblorg") (:commit . "0db218bd6b2e083546d3a69a022dfb1a08900acd") (:revdesc . "0db218bd6b2e") (:authors ("Lincoln Clarete" . "lincoln@clarete.li")) (:maintainers ("Lincoln Clarete" . "lincoln@clarete.li")) (:maintainer "Lincoln Clarete" . "lincoln@clarete.li"))])
+ (webpaste . [(20241125 1418) ((emacs (24 4)) (request (0 2 0)) (cl-lib (0 5))) "Paste to pastebin-like services" tar ((:url . "https://github.com/etu/webpaste.el") (:commit . "e2a41530257f04b7ad2198d333adcf247a05277c") (:revdesc . "e2a41530257f") (:keywords "convenience" "comm" "paste") (:authors ("Elis etu Hirwing" . "elis@hirwing.se")) (:maintainers ("Elis etu Hirwing" . "elis@hirwing.se")) (:maintainer "Elis etu Hirwing" . "elis@hirwing.se"))])
+ (websearch . [(20251225 1437) ((emacs (24 4))) "Query search engines" tar ((:url . "https://gitlab.com/xgqt/xgqt-elisp-lib-websearch") (:commit . "d3403903f54d0ff5dd88d6675dae9bc9d738a32b") (:revdesc . "d3403903f54d") (:keywords "convenience" "hypermedia") (:authors ("Maciej Barć" . "xgqt@xgqt.org")) (:maintainers ("Maciej Barć" . "xgqt@xgqt.org")) (:maintainer "Maciej Barć" . "xgqt@xgqt.org"))])
+ (websocket . [(20260301 157) ((cl-lib (0 5))) "Emacs WebSocket client and server" tar ((:url . "https://github.com/ahyatt/emacs-websocket") (:commit . "2195e1247ecb04c30321702aa5f5618a51c329c5") (:revdesc . "2195e1247ecb") (:keywords "communication" "websocket" "server") (:authors ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainers ("Andrew Hyatt" . "ahyatt@gmail.com")) (:maintainer "Andrew Hyatt" . "ahyatt@gmail.com"))])
+ (wedge-ws . [(20140714 2149) nil "Wedge whitespace between columns in text" tar ((:url . "https://github.com/aes/wedge-ws") (:commit . "4669115f02d9c6fee067cc5369bb38c0f9db88b2") (:revdesc . "4669115f02d9") (:keywords "formatting" "indentation") (:authors ("Anders Eurenius" . "aes@spotify.com")) (:maintainers ("Anders Eurenius" . "aes@spotify.com")) (:maintainer "Anders Eurenius" . "aes@spotify.com"))])
+ (weibo . [(20150307 2242) ((cl-lib (0 5))) "Weibo client for Emacs" tar ((:url . "https://github.com/austin-----/weibo.emacs") (:commit . "a8abb50b7602fe15fe2bc6400ac29780e956b390") (:revdesc . "a8abb50b7602") (:keywords "weibo") (:authors ("Austin" . "austiny.cn@gmail.com")) (:maintainers ("Austin" . "austiny.cn@gmail.com")) (:maintainer "Austin" . "austiny.cn@gmail.com"))])
+ (weyland-yutani-theme . [(20210802 2251) ((emacs (24 1))) "Emacs theme based off Alien movie franchise" tar ((:url . "https://github.com/jstaursky/weyland-yutani-theme") (:commit . "e89a63a62e071180c9cdd9067679fadc3f7bf796") (:revdesc . "e89a63a62e07"))])
+ (wfnames . [(20260706 903) ((emacs (24 4))) "Edit filenames" tar ((:url . "https://github.com/thierryvolpiatto/wfnames") (:commit . "d8839fa42a24f7c781cd2d8c3f40eda31faa19be") (:revdesc . "d8839fa42a24") (:keywords "wfnames" "convenience" "files" "editing" "helm") (:authors ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainers ("Thierry Volpiatto" . "thievol@posteo.net")) (:maintainer "Thierry Volpiatto" . "thievol@posteo.net"))])
+ (wgrep . [(20230203 1214) ((emacs (25 1))) "Writable grep buffer" tar ((:url . "https://github.com/mhayashi1120/Emacs-wgrep/raw/master/wgrep.el") (:commit . "b4d69280d8a6a5ded1597e02afbaa811a160383b") (:revdesc . "b4d69280d8a6") (:keywords "grep" "edit" "extensions") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (wgrep-ack . [(20230207 1125) ((emacs (25 1)) (wgrep (3 0 0))) "Writable ack-and-a-half buffer" tar ((:url . "https://github.com/mhayashi1120/Emacs-wgrep/raw/master/wgrep-ack.el") (:commit . "edf768732a56840db6879706b64c5773c316d619") (:revdesc . "edf768732a56") (:keywords "grep" "edit" "extensions") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (wgrep-ag . [(20230202 315) ((emacs (25 1)) (wgrep (3 0 0))) "Writable ag buffer" tar ((:url . "https://github.com/mhayashi1120/Emacs-wgrep/raw/master/wgrep-ag.el") (:commit . "ff3cf631b6842432daa59bf604049ca916cce73b") (:revdesc . "ff3cf631b684") (:keywords "grep" "edit" "extensions") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (wgrep-deadgrep . [(20231215 1145) ((wgrep (2 3 0)) (emacs (25 1))) "Writable deadgrep buffer and apply the changes to files" tar ((:url . "https://github.com/mhayashi1120/Emacs-wgrep/raw/master/wgrep-deadgrep.el") (:commit . "07cd02dddefd99bd4128100579ecaca929a57d6e") (:revdesc . "07cd02dddefd") (:keywords "grep" "edit" "extensions") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com") ("Iku Iwasa" . "iku.iwasa@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com") ("Iku Iwasa" . "iku.iwasa@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (wgrep-helm . [(20230202 315) ((emacs (25 1)) (wgrep (3 0 0))) "Writable helm-grep-mode buffer" tar ((:url . "https://github.com/mhayashi1120/Emacs-wgrep/raw/master/wgrep-helm.el") (:commit . "ff3cf631b6842432daa59bf604049ca916cce73b") (:revdesc . "ff3cf631b684") (:keywords "grep" "edit" "extensions") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (wgrep-pt . [(20230207 1125) ((emacs (25 1)) (wgrep (3 0 0))) "Writable pt buffer" tar ((:url . "https://github.com/mhayashi1120/Emacs-wgrep/raw/master/wgrep-pt.el") (:commit . "edf768732a56840db6879706b64c5773c316d619") (:revdesc . "edf768732a56") (:keywords "grep" "edit" "extensions") (:authors ("Masahiro Hayashi" . "mhayashi1120@gmail.com") ("Bailey Ling" . "bling@live.ca")) (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com") ("Bailey Ling" . "bling@live.ca")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (wgsl-mode . [(20231118 1944) ((emacs (24))) "Syntax highlighting for the WebGPU Shading Language" tar ((:url . "https://github.com/acowley/wgsl-mode") (:commit . "003a4e99491fa2a0b777f74658e6ffc70fd3a8c2") (:revdesc . "003a4e99491f") (:keywords "wgsl" "c"))])
+ (whaler . [(20250310 1131) ((emacs (25 1)) (f (0 20 0)) (dash (2 19 1))) "Minimalistic and customizable project manager" tar ((:url . "https://github.com/salorak/whaler.el") (:commit . "9237c4c01b33dd3a6609372def616ae548fd49fc") (:revdesc . "9237c4c01b33") (:keywords "tools") (:authors ("Hector Salorak Alarcon" . "salorack@protonmail.com")) (:maintainers ("Hector Salorak Alarcon" . "salorack@protonmail.com")) (:maintainer "Hector Salorak Alarcon" . "salorack@protonmail.com"))])
+ (what-the-commit . [(20150901 1316) nil "Random commit message generator" tar ((:url . "http://barbarito.me/") (:commit . "42604410cfd5be715c8aa730aef4673773454e8b") (:revdesc . "42604410cfd5") (:keywords "git" "commit" "message") (:authors ("Dan Barbarito" . "dan@barbarito.me")) (:maintainers ("Dan Barbarito" . "dan@barbarito.me")) (:maintainer "Dan Barbarito" . "dan@barbarito.me"))])
+ (which-key . [(20240620 2145) ((emacs (25 1))) "Display available keybindings in popup" tar ((:url . "https://github.com/justbur/emacs-which-key") (:commit . "ed389312170df955aaf10c2e120cc533ed5c509e") (:revdesc . "ed389312170d") (:authors ("Justin Burkett" . "justin@burkett.cc")) (:maintainers ("Justin Burkett" . "justin@burkett.cc")) (:maintainer "Justin Burkett" . "justin@burkett.cc"))])
+ (which-key-posframe . [(20230313 1841) ((emacs (26 0)) (posframe (1 4 0)) (which-key (3 6 0))) "Using posframe to show which-key" tar ((:url . "https://github.com/emacsorphanage/which-key-posframe") (:commit . "e4a9ce9a1b20de550fca51f14d055821980d534a") (:revdesc . "e4a9ce9a1b20") (:keywords "convenience" "bindings" "tooltip") (:authors ("Yanghao Xie" . "yhaoxie@gmail.com")) (:maintainers ("Yanghao Xie" . "yhaoxie@gmail.com")) (:maintainer "Yanghao Xie" . "yhaoxie@gmail.com"))])
+ (whiley-mode . [(20220501 2219) ((emacs (24 1))) "Major mode for Whiley language" tar ((:url . "https://github.com/Whiley/WhileyEmacsMode") (:commit . "e7cc4759d46be589d421a2235af6771bcde9ae33") (:revdesc . "e7cc4759d46b") (:keywords "languages") (:authors ("David J. Pearce" . "dave01001110@gmail.com")) (:maintainers ("David J. Pearce" . "dave01001110@gmail.com")) (:maintainer "David J. Pearce" . "dave01001110@gmail.com"))])
+ (whitaker . [(20210203 1149) ((emacs (25))) "Comint interface for Whitaker's Words" tar ((:url . "https://github.com/Fuco1/whitaker") (:commit . "a6fda24ccb69a18c0706633326d5cc4fcfaed83a") (:revdesc . "a6fda24ccb69") (:keywords "processes") (:authors ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainers ("Matus Goljer" . "matus.goljer@gmail.com")) (:maintainer "Matus Goljer" . "matus.goljer@gmail.com"))])
+ (white-sand-theme . [(20210131 813) ((emacs (24))) "Emacs theme with a light background" tar ((:url . "https://github.com/mswift42/white-sand-theme") (:commit . "729dd52cc1936250183d6761eed406c4be514a71") (:revdesc . "729dd52cc193"))])
+ (white-theme . [(20250921 2105) ((emacs (24))) "Minimalistic light color theme inspired by basic-theme" tar ((:url . "https://github.com/nullvec/white-theme.el") (:commit . "7c42cb08425ac7f7e33e8d947a950a55dee3fadf") (:revdesc . "7c42cb08425a") (:keywords "color" "theme" "minimal" "basic" "simple" "white") (:authors ("A. Hdez" . "trefoil_chilled_7k@icloud.com")) (:maintainers ("A. Hdez" . "trefoil_chilled_7k@icloud.com")) (:maintainer "A. Hdez" . "trefoil_chilled_7k@icloud.com"))])
+ (whitespace-cleanup-mode . [(20210510 533) ((emacs (24 1))) "Intelligently call whitespace-cleanup on save" tar ((:url . "https://github.com/purcell/whitespace-cleanup-mode") (:commit . "b108b73ddf8f7e747d5a20a681560171e02ad037") (:revdesc . "b108b73ddf8f") (:keywords "convenience") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (whizzml-mode . [(20201013 239) ((emacs (24 4))) "Programming mode for editing WhizzML files" tar ((:url . "https://github.com/whizzml/whizzml-mode") (:commit . "3dce3be0c32b9b2d259e462b4b27c530af47466a") (:revdesc . "3dce3be0c32b") (:keywords "languages" "lisp") (:authors ("Jose Antonio Ortega Ruiz" . "jao@bigml.com")) (:maintainers ("Jose Antonio Ortega Ruiz" . "jao@bigml.com")) (:maintainer "Jose Antonio Ortega Ruiz" . "jao@bigml.com"))])
+ (whois . [(20240315 1929) ((emacs (24))) "Syntax highlighted domain name queries using system whois" tar ((:url . "https://github.com/lassik/emacs-whois") (:commit . "d4466b296721fa94b2ceab1c51bc9bfd8bbf4e0a") (:revdesc . "d4466b296721") (:keywords "network" "comm") (:authors ("Lassi Kortela" . "lassi@lassi.io")) (:maintainers ("Lassi Kortela" . "lassi@lassi.io")) (:maintainer "Lassi Kortela" . "lassi@lassi.io"))])
+ (whole-line-or-region . [(20240630 804) ((emacs (24 4))) "Operate on current line if region undefined" tar ((:url . "https://github.com/purcell/whole-line-or-region") (:commit . "f39fd03cf563ffdf57144a7586a5e845969fc641") (:revdesc . "f39fd03cf563") (:keywords "convenience" "wp") (:authors ("Joe Casadonte" . "emacs@northbound-train.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (why-this . [(20221129 817) ((emacs (27 1))) "Why is this line here?  Ask version control" tar ((:url . "https://codeberg.org/akib/emacs-why-this") (:commit . "5203d9379afaf6703746823a580c804e1dd98e08") (:revdesc . "5203d9379afa") (:keywords "tools" "convenience" "vc") (:authors ("Akib Azmain Turja" . "akib@disroot.org")) (:maintainers ("Akib Azmain Turja" . "akib@disroot.org")) (:maintainer "Akib Azmain Turja" . "akib@disroot.org"))])
+ (wide-column . [(20170925 1613) nil "Calls functions dependant on column position" tar ((:url . "https://github.com/phillord/wide-column") (:commit . "ce9ef4675485a7bea381077866368ef875226b10") (:revdesc . "ce9ef4675485") (:keywords "minor mode" "cursor colour" "column width") (:authors ("Phillip Lord" . "p.lord@russet.org.uk")) (:maintainers ("Phillip Lord" . "p.lord@russet.org.uk")) (:maintainer "Phillip Lord" . "p.lord@russet.org.uk"))])
+ (widget-mvc . [(20150102 406) nil "MVC framework for the emacs widgets" tar ((:url . "https://github.com/kiwanami/emacs-widget-mvc") (:commit . "2576e6f0c35d8dedfa9c2cd6ea4fb4c14cb72b63") (:revdesc . "2576e6f0c35d") (:keywords "lisp" "widget") (:authors ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainers ("SAKURAI Masashi" . "m.sakuraiatkiwanami.net")) (:maintainer "SAKURAI Masashi" . "m.sakuraiatkiwanami.net"))])
+ (wiki-nav . [(20230304 2212) ((button-lock (1 0 2)) (nav-flash (1 0 0))) "Simple file navigation using [[WikiStrings]]" tar ((:url . "https://github.com/rolandwalker/button-lock") (:commit . "1f7a89ca05b6167af7d1337ad23a5d923486caac") (:revdesc . "1f7a89ca05b6") (:keywords "mouse" "button" "hypermedia" "navigation") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (wiki-summary . [(20181010 1824) ((emacs (24))) "View Wikipedia summaries in Emacs easily" tar ((:url . "https://github.com/jozefg/wiki-summary.el") (:commit . "fa41ab6e50b3b80e54148af9d4bac18fd0405000") (:revdesc . "fa41ab6e50b3") (:keywords "wikipedia" "utility"))])
+ (wikinfo . [(20220906 1709) ((emacs (27 1))) "Scrape Wikipedia Infoboxes" tar ((:url . "https://github.com/progfolio/wikinfo") (:commit . "bf395c9aaf6be7fda371be611005737d52417fec") (:revdesc . "bf395c9aaf6b") (:keywords "org" "convenience") (:authors ("Nicholas Vollmer" . "progfolio@protonmail.com")) (:maintainers ("Nicholas Vollmer" . "progfolio@protonmail.com")) (:maintainer "Nicholas Vollmer" . "progfolio@protonmail.com"))])
+ (wikinforg . [(20260101 1716) ((emacs (27 1)) (wikinfo (0 0 0)) (org (9 3))) "Org-mode wikinfo integration" tar ((:url . "https://github.com/progfolio/wikinforg") (:commit . "9f1b72c2f2e5648f9b736470e350750b8726884c") (:revdesc . "9f1b72c2f2e5") (:keywords "org" "convenience") (:authors ("Nicholas Vollmer" . "progfolio@protonmail.com")) (:maintainers ("Nicholas Vollmer" . "progfolio@protonmail.com")) (:maintainer "Nicholas Vollmer" . "progfolio@protonmail.com"))])
+ (wiktionary-bro . [(20260824 2344) ((emacs (29 4)) (request (0 3 3))) "Lookup Wiktionary entries" tar ((:url . "https://github.com/agzam/wiktionary-bro.el") (:commit . "3e76e8171e306b6b1105b1dd63cc27f673b5f204") (:revdesc . "3e76e8171e30") (:keywords "convenience" "multimedia") (:authors ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainers ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainer "Ag Ibragimov" . "agzam.ibragimov@gmail.com"))])
+ (wildcharm-light-theme . [(20231127 537) ((emacs (24 1))) "Port of vim-wildcharm (light) colorscheme" tar ((:url . "https://github.com/habamax/wildcharm-theme") (:commit . "58662e13c179106ea7780e71bd3ef3c1cf74e929") (:revdesc . "58662e13c179") (:authors ("Maxim Kim" . "habamax@gmail.com")) (:maintainers ("Maxim Kim" . "habamax@gmail.com")) (:maintainer "Maxim Kim" . "habamax@gmail.com"))])
+ (wildcharm-theme . [(20231127 537) ((emacs (24 1))) "Port of vim-wildcharm colorscheme" tar ((:url . "https://github.com/habamax/wildcharm-theme") (:commit . "58662e13c179106ea7780e71bd3ef3c1cf74e929") (:revdesc . "58662e13c179") (:authors ("Maxim Kim" . "habamax@gmail.com")) (:maintainers ("Maxim Kim" . "habamax@gmail.com")) (:maintainer "Maxim Kim" . "habamax@gmail.com"))])
+ (wilt . [(20180220 854) ((emacs (24 3)) (dash (2 12 0)) (s (1 10 0))) "An extensions for calculating WILT in a buffer" tar ((:url . "https://github.com/sixty-north/emacs-wilt") (:commit . "04dbe37fa35d0b24c791421785d2c97a8cbfe2cc") (:revdesc . "04dbe37fa35d") (:authors ("Austin Bingham" . "austin@sixty-north.com")) (:maintainers ("Austin Bingham" . "austin@sixty-north.com")) (:maintainer "Austin Bingham" . "austin@sixty-north.com"))])
+ (win-switch . [(20161009 1627) nil "Fast, dynamic bindings for window-switching/resizing" tar ((:url . "http://www.stat.cmu.edu/~genovese/emacs/win-switch/") (:commit . "954eb5e4c5737f0c06368c42a7f1c3dd374d782f") (:revdesc . "954eb5e4c573") (:keywords "window" "switch" "key bindings" "ergonomic" "efficient") (:authors ("Christopher Genovese" . "genovese@cmu.edu")) (:maintainers ("Christopher R. Genovese" . "genovese@cmu.edu")) (:maintainer "Christopher R. Genovese" . "genovese@cmu.edu"))])
+ (windata . [(20090830 1040) nil "Convert window configuration to list" tar ((:url . "https://github.com/emacsorphanage/windata") (:commit . "a723fc446ceaec23d5f29ecc8245d94c99d91625") (:revdesc . "a723fc446cea") (:keywords "convenience" "frames") (:authors (nil . "wenbinye@gmail.com")) (:maintainers (nil . "wenbinye@gmail.com")) (:maintainer nil . "wenbinye@gmail.com"))])
+ (window-end-visible . [(20140508 2041) nil "Find the last visible point in a window" tar ((:url . "https://github.com/rolandwalker/window-end-visible") (:commit . "f0ed55aa5f7875634fb4c8b6fbaa93633bc57d85") (:revdesc . "f0ed55aa5f78") (:keywords "extensions") (:authors ("Roland Walker" . "walker@pobox.com")) (:maintainers ("Roland Walker" . "walker@pobox.com")) (:maintainer "Roland Walker" . "walker@pobox.com"))])
+ (window-jump . [(20170809 2208) nil "Move left/right/up/down through your windows" tar ((:url . "https://github.com/chumpage/chumpy-windows") (:commit . "6bdb51e9a346907d60a9625f6180bddd06be6674") (:revdesc . "6bdb51e9a346") (:keywords "frames" "convenience"))])
+ (window-layout . [(20241104 900) nil "Window layout manager" tar ((:url . "https://github.com/kiwanami/emacs-window-layout") (:commit . "277d0a8247adf13707703574cbbc16ddcff7c5fd") (:revdesc . "277d0a8247ad") (:keywords "window" "layout") (:authors ("SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net")) (:maintainers ("SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net")) (:maintainer "SAKURAI Masashi" . "m.sakuraiatmarkkiwanami.net"))])
+ (window-number . [(20170801 151) nil "Select windows by numbers" tar ((:url . "https://github.com/nikolas/window-number") (:commit . "d41722de646ffeb3f70d26e4a86a5a1ba5c6be87") (:revdesc . "d41722de646f") (:keywords "windows") (:authors ("Johann Myrkraverk Oskarsson" . "myrkraverk@users.sourceforge.net")) (:maintainers ("Nik Nyby" . "niknyby@riseup.net") ("Johann Myrkraverk Oskarsson" . "myrkraverk@users.sourceforge.net") ("Andy Stewart" . "lazycat.manatee@gmail.com")) (:maintainer "Nik Nyby" . "niknyby@riseup.net"))])
+ (window-numbering . [(20160809 1810) nil "Numbered window shortcuts" tar ((:url . "http://nschum.de/src/emacs/window-numbering-mode/") (:commit . "10809b3993a97c7b544240bf5d7ce9b1110a1b89") (:revdesc . "10809b3993a9") (:keywords "faces" "matching") (:authors ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainers ("Nikolaj Schumacher" . "bugs*nschumde")) (:maintainer "Nikolaj Schumacher" . "bugs*nschumde"))])
+ (window-purpose . [(20241207 148) ((emacs (25 1)) (let-alist (1 0 3)) (imenu-list (0 1))) "Purpose-based window management for Emacs" tar ((:url . "https://github.com/bmag/emacs-purpose") (:commit . "c827f45cd9b278b3eb9c2f4bcb55ef2fca5d3048") (:revdesc . "c827f45cd9b2") (:keywords "frames"))])
+ (winds . [(20201121 123) ((emacs (25 1))) "Window configuration switcher grouped by workspaces" tar ((:url . "https://github.com/Javyre/winds.el") (:commit . "5827e890059d0ce67ebb4779da63c15afccf0973") (:revdesc . "5827e890059d") (:keywords "convenience") (:authors ("Javier A. Pollak" . "javi.po.123@gmail.com")) (:maintainers ("Javier A. Pollak" . "javi.po.123@gmail.com")) (:maintainer "Javier A. Pollak" . "javi.po.123@gmail.com"))])
+ (windsize . [(20181029 2257) nil "Simple, intuitive window resizing" tar ((:url . "https://github.com/grammati/windsize") (:commit . "62c2846bbe95b0a73e996c75e4a644d05f57aaaa") (:revdesc . "62c2846bbe95") (:keywords "window" "resizing" "convenience") (:authors ("Chris Perkins" . "chrisperkins99@gmail.com")) (:maintainers ("Chris Perkins" . "chrisperkins99@gmail.com")) (:maintainer "Chris Perkins" . "chrisperkins99@gmail.com"))])
+ (windswap . [(20200722 411) ((emacs (24 3))) "Like windmove, but swaps buffers while moving point" tar ((:url . "https://github.com/purcell/windswap") (:commit . "1a334f6543e0a30c55ea1e6071e9732d948f9e4b") (:revdesc . "1a334f6543e0") (:keywords "frames" "convenience") (:authors ("Steve Purcell" . "steve@sanityinc.com")) (:maintainers ("Steve Purcell" . "steve@sanityinc.com")) (:maintainer "Steve Purcell" . "steve@sanityinc.com"))])
+ (windwow . [(20170816 148) ((dash (2 11 0)) (cl-lib (0 6 1)) (emacs (24))) "Simple workspace management" tar ((:url . "github.com/vijumathew/windwow") (:commit . "77bad26f651744b68d31b389389147014d250f23") (:revdesc . "77bad26f6517") (:keywords "frames") (:authors ("Viju Mathew" . "viju.jm@gmail.com")) (:maintainers ("Viju Mathew" . "viju.jm@gmail.com")) (:maintainer "Viju Mathew" . "viju.jm@gmail.com"))])
+ (winnow . [(20250502 1745) ((emacs (24))) "Winnow ag/grep results by matching/excluding lines" tar ((:url . "https://github.com/dgtized/winnow.el") (:commit . "858e74314c06c060596d6e6119471deef759be4d") (:revdesc . "858e74314c06") (:keywords "matching") (:authors ("Charles L.G. Comstock" . "dgtized@gmail.com")) (:maintainers ("Charles L.G. Comstock" . "dgtized@gmail.com")) (:maintainer "Charles L.G. Comstock" . "dgtized@gmail.com"))])
+ (winpoint . [(20131023 1713) nil "Remember buffer positions per-window, not per buffer" tar ((:url . "https://github.com/jorgenschaefer/winpoint") (:commit . "b32ab55f7b8797b9b042a8a89d89d6f79bc356a9") (:revdesc . "b32ab55f7b87") (:keywords "convenience") (:authors ("Jorgen Schaefer" . "forcer@forcix.cx")) (:maintainers ("Jorgen Schaefer" . "forcer@forcix.cx")) (:maintainer "Jorgen Schaefer" . "forcer@forcix.cx"))])
+ (winpulse . [(20260815 1947) ((emacs (28 1))) "Momentary window background flash animation" tar ((:url . "https://github.com/xenodium/winpulse") (:commit . "b130b86a57f8a2d8cb6c7a1088b202919f073a43") (:revdesc . "b130b86a57f8") (:authors ("Alvaro Ramirez" . "https://xenodium.com")) (:maintainers ("Alvaro Ramirez" . "https://xenodium.com")) (:maintainer "Alvaro Ramirez" . "https://xenodium.com"))])
+ (winring . [(20260826 7) nil "Window configuration rings" tar ((:url . "https://gitlab.com/warsaw/winring") (:commit . "e1ffacae7b4f2642d67898e643a5a47571bcfa25") (:revdesc . "e1ffacae7b4f") (:keywords "frames" "tools"))])
+ (winum . [(20190911 1607) ((cl-lib (0 5)) (dash (2 13 0))) "Navigate windows and frames using numbers" tar ((:url . "https://github.com/deb0ch/winum.el") (:commit . "098249c65042ee0308b8236d1ee838c8da8fdf25") (:revdesc . "098249c65042") (:keywords "convenience" "frames" "windows" "multi-screen") (:authors ("Thomas de Beauchêne" . "thomas.de.beauchene@gmail.com")) (:maintainers ("Thomas de Beauchêne" . "thomas.de.beauchene@gmail.com")) (:maintainer "Thomas de Beauchêne" . "thomas.de.beauchene@gmail.com"))])
+ (wisp-mode . [(20260711 2357) ((emacs (24 4))) "Tools for wisp: the Whitespace-to-Lisp preprocessor" tar ((:url . "http://www.draketo.de/english/wisp") (:commit . "97cdd788b49ea385cdc423b411af37dacd3bc5f9") (:revdesc . "97cdd788b49e") (:keywords "languages" "lisp" "scheme") (:authors ("Arne Babenhauserheide" . "arne_bab@web.de")) (:maintainers ("Arne Babenhauserheide" . "arne_bab@web.de")) (:maintainer "Arne Babenhauserheide" . "arne_bab@web.de"))])
+ (wispjs-mode . [(20170720 1919) ((clojure-mode (0))) "Major mode for Wisp code" tar ((:url . "https://github.com/krisajenkins/wispjs-mode") (:commit . "60f9f5fd9d1556e2d008939f67eb1b1d0f325fa8") (:revdesc . "60f9f5fd9d15") (:authors ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainers ("Kris Jenkins" . "krisajenkins@gmail.com")) (:maintainer "Kris Jenkins" . "krisajenkins@gmail.com"))])
+ (with-command-redo . [(20260710 942) ((emacs (29 1))) "Repeat commands with automatic undo" tar ((:url . "https://codeberg.org/ideasman42/emacs-with-command-redo") (:commit . "b3e3c86e2cbeb097552a1bff000905ad28de7907") (:revdesc . "b3e3c86e2cbe") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (with-editor . [(20260731 2234) ((emacs (28 1)) (compat (31 0)) (cond-let (1 1)) (llama (1 0))) "Use the Emacsclient as $EDITOR" tar ((:url . "https://github.com/magit/with-editor") (:commit . "a1f92a26e53033ec58e1d2ce9b132da7ebae816e") (:revdesc . "a1f92a26e530") (:keywords "processes" "terminals") (:authors ("Jonas Bernoulli" . "emacs.with-editor@jonas.bernoulli.dev")) (:maintainers ("Jonas Bernoulli" . "emacs.with-editor@jonas.bernoulli.dev")) (:maintainer "Jonas Bernoulli" . "emacs.with-editor@jonas.bernoulli.dev"))])
+ (with-emacs . [(20220814 444) ((emacs (24 4))) "Evaluate Emacs Lisp expressions in a separate Emacs process" tar ((:url . "https://github.com/twlz0ne/with-emacs.el") (:commit . "fb9ef454a4bb2d6de3415807b4858a20a9cc0dad") (:revdesc . "fb9ef454a4bb") (:keywords "tools") (:authors ("Gong Qijian" . "gongqijian@gmail.com")) (:maintainers ("Gong Qijian" . "gongqijian@gmail.com")) (:maintainer "Gong Qijian" . "gongqijian@gmail.com"))])
+ (with-namespace . [(20130407 1822) ((dash (1 1 0)) (loop (1 1))) "Interoperable elisp namespaces" tar ((:url . "https://github.com/Wilfred/with-namespace.el") (:commit . "36828a40428c8e53c117f2df830b2f7a59ddd306") (:revdesc . "36828a40428c") (:keywords "namespaces") (:authors ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainers ("Wilfred Hughes" . "me@wilfred.me.uk")) (:maintainer "Wilfred Hughes" . "me@wilfred.me.uk"))])
+ (with-proxy . [(20200510 414) ((emacs (24 4))) "Evaluate expressions with proxy" tar ((:url . "https://github.com/twlz0ne/with-proxy.el") (:commit . "93b1ed2f3060f305009fa71f4fb5bb10173a10e3") (:revdesc . "93b1ed2f3060") (:keywords "comm") (:authors ("Gong Qijian" . "gongqijian@gmail.com")) (:maintainers ("Gong Qijian" . "gongqijian@gmail.com")) (:maintainer "Gong Qijian" . "gongqijian@gmail.com"))])
+ (with-shell-interpreter . [(20260727 1522) ((emacs (25 1)) (cl-lib (0 6 1))) "Helper for shell command APIs" tar ((:url . "https://github.com/p3r7/with-shell-interpreter") (:commit . "8191d0b745dda30c7f6d225eb86598d8337c6b82") (:revdesc . "8191d0b745dd") (:keywords "processes" "terminals"))])
+ (with-simulated-input . [(20210527 2337) ((emacs (24 4))) "A macro to simulate user input non-interactively" tar ((:url . "https://github.com/DarwinAwardWinner/with-simulated-input") (:commit . "ee4d2b75fd99bac3de40675b0a0e03529718f59f") (:revdesc . "ee4d2b75fd99") (:keywords "lisp" "tools" "extensions") (:authors ("Ryan C. Thompson" . "rct@thompsonclan.org") ("Nikita Bloshchanevich" . "nikblos@outlook.com")) (:maintainers ("Ryan C Thompson" . "rct@thompsonclan.org")) (:maintainer "Ryan C Thompson" . "rct@thompsonclan.org"))])
+ (with-venv . [(20210925 2336) ((cl-lib (0 5)) (emacs (24 4))) "Execute with Python virtual environment activated" tar ((:url . "https://github.com/10sr/with-venv-el") (:commit . "773192d892ec0341e023d8b5e80639f8eb79f2a5") (:revdesc . "773192d892ec") (:keywords "processes" "python" "venv") (:authors ("10sr" . "8.slashes[at]gmail[dot]com")) (:maintainers ("10sr" . "8.slashes[at]gmail[dot]com")) (:maintainer "10sr" . "8.slashes[at]gmail[dot]com"))])
+ (wiz . [(20250107 2133) ((emacs (29 1)) (exec-path-from-shell (2 1))) "Macros to simplify startup initialization" tar ((:url . "https://github.com/zonuexe/emacs-wiz") (:commit . "1b8b8d54e011dd989a52cde9596e077aa09e5894") (:revdesc . "1b8b8d54e011") (:keywords "convenience" "lisp") (:authors ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainers ("USAMI Kenta" . "tadsan@zonu.me")) (:maintainer "USAMI Kenta" . "tadsan@zonu.me"))])
+ (wn-mode . [(20151110 552) ((emacs (24))) "Numeric window switching shortcuts" tar ((:url . "https://github.com/luismbo/wn-mode") (:commit . "f05c3151523e529af5a0a3fa8c948b61fb369f6e") (:revdesc . "f05c3151523e") (:keywords "buffers" "windows" "switching-windows") (:maintainers ("Luís Oliveira" . "luismbo@gmail.com")) (:maintainer "Luís Oliveira" . "luismbo@gmail.com"))])
+ (wolfram . [(20231220 1950) nil "Wolfram Alpha Integration" tar ((:url . "https://github.com/hsjunnesson/wolfram.el") (:commit . "743c92f88bb3b6a77bc84ac2221adc6222cebb94") (:revdesc . "743c92f88bb3") (:keywords "math") (:authors ("Hans Sjunnesson" . "hans.sjunnesson@gmail.com")) (:maintainers ("Hans Sjunnesson" . "hans.sjunnesson@gmail.com")) (:maintainer "Hans Sjunnesson" . "hans.sjunnesson@gmail.com"))])
+ (wolfram-mode . [(20180307 13) ((emacs (24 3))) "Mathematica editing and inferior mode" tar ((:url . "https://github.com/kawabata/wolfram-mode/") (:commit . "be680190cac6ccf579dbce107deaae495928d1b3") (:revdesc . "be680190cac6") (:keywords "languages" "processes" "tools") (:authors ("Daichi Mochihashi" . "daichiatcslab.kecl.ntt.co.jp")) (:maintainers ("Daichi Mochihashi" . "daichiatcslab.kecl.ntt.co.jp")) (:maintainer "Daichi Mochihashi" . "daichiatcslab.kecl.ntt.co.jp"))])
+ (wollok-mode . [(20241012 1950) ((emacs (24 4))) "Major mode for the Wollok programming language" tar ((:url . "https://github.com/tralph3/wollok-mode") (:commit . "bd52ad66d7c43d7e46f7edd6693619e47aeceef9") (:revdesc . "bd52ad66d7c4") (:keywords "wollok" "languages") (:authors ("Tomás Ralph" . "tomasralph2000@gmail.com")) (:maintainers ("Tomás Ralph" . "tomasralph2000@gmail.com")) (:maintainer "Tomás Ralph" . "tomasralph2000@gmail.com"))])
+ (wonderland . [(20130913 119) ((dash (2 0 0)) (dash-functional (1 0 0)) (multi (2 0 0)) (emacs (24))) "Declarative configuration for Emacsen" tar ((:url . "https://github.com/kurisuwhyte/emacs-wonderland") (:commit . "28cf6b37000c395ece9519db53147fb826a42bc4") (:revdesc . "28cf6b37000c") (:keywords "configuration" "profile" "wonderland") (:authors ("Christina Whyte" . "kurisu.whyte@gmail.com")) (:maintainers ("Christina Whyte" . "kurisu.whyte@gmail.com")) (:maintainer "Christina Whyte" . "kurisu.whyte@gmail.com"))])
+ (wordcount-section . [(20260314 1744) ((emacs (28 1)) (compat (29 1)) (universal-sidecar (1 5 1))) "Universal Sidecar Section to show Word Counts" tar ((:url . "https://git.sr.ht/~swflint/emacs-universal-sidecar") (:commit . "3b6bd928f7adb840e62a63dd5bf1236ece912b13") (:revdesc . "3b6bd928f7ad") (:keywords "text" "convenience") (:authors ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainers ("Samuel W. Flint" . "me@samuelwflint.com")) (:maintainer "Samuel W. Flint" . "me@samuelwflint.com"))])
+ (wordel . [(20260101 1717) ((emacs (27 1))) "An Elisp implementation of \"Wordle\" (aka \"Lingo\")" tar ((:url . "https://github.com/progfolio/wordel") (:commit . "e31bc8b285984c12efb9a667b080f9b9c570d7d7") (:revdesc . "e31bc8b28598") (:keywords "games") (:authors ("Nicholas Vollmer" . "iarchivedmywholelife@gmail.com")) (:maintainers ("Nicholas Vollmer" . "iarchivedmywholelife@gmail.com")) (:maintainer "Nicholas Vollmer" . "iarchivedmywholelife@gmail.com"))])
+ (wordgen . [(20170803 1820) ((emacs (24)) (cl-lib (0 5))) "Random word generator" tar ((:url . "https://github.com/Fanael/wordgen.el") (:commit . "aacad928ae99a953e034a831dfd0ebdf7d52ac1d") (:revdesc . "aacad928ae99") (:authors ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainers ("Fanael Linithien" . "fanael4@gmail.com")) (:maintainer "Fanael Linithien" . "fanael4@gmail.com"))])
+ (wordnut . [(20241229 739) ((emacs (24 4))) "[No description available]" tar ((:url . "https://github.com/gromnitsky/wordnut") (:commit . "dffc75a455d0d4458b7555f4c051c51d71c8e18a") (:revdesc . "dffc75a455d0"))])
+ (wordreference . [(20260805 1233) ((emacs (28 1))) "Interface for wordreference.com" tar ((:url . "https://codeberg.org/martianh/wordreference.el") (:commit . "b5bd5eab1e4981bae12d759da241d736cd0fa125") (:revdesc . "b5bd5eab1e49") (:keywords "convenience" "translate" "wp" "dictionary") (:authors ("Marty Hiatt" . "martianh@disroot.org")) (:maintainers ("Marty Hiatt" . "martianh@disroot.org")) (:maintainer "Marty Hiatt" . "martianh@disroot.org"))])
+ (wordsmith-mode . [(20210715 1517) nil "Syntax analysis and NLP text-processing in Emacs (OSX-only)" tar ((:url . "https://github.com/emacsattic/wordsmith-mode") (:commit . "5d40ceaa2b8d41ab3634ca377ceb6a74deeb2287") (:revdesc . "5d40ceaa2b8d") (:authors ("istib" . "istib@thebati.net")) (:maintainers ("istib" . "istib@thebati.net")) (:maintainer "istib" . "istib@thebati.net"))])
+ (worf . [(20220102 835) ((swiper (0 11 0)) (ace-link (0 1 0)) (hydra (0 13 0)) (zoutline (0 1 0))) "A warrior does not press so many keys! (in org-mode)" tar ((:url . "https://github.com/abo-abo/worf") (:commit . "8681241e118585824cd256e5b026978bf06c7e58") (:revdesc . "8681241e1185") (:keywords "lisp") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (workgroups . [(20110726 1641) nil "Workgroups for windows (for Emacs)" tar ((:url . "https://github.com/tlh/workgroups.el") (:commit . "9572b3492ee09054dc329f64ed846c962b395e39") (:revdesc . "9572b3492ee0") (:keywords "session" "management" "window-configuration" "persistence") (:authors ("tlh" . "thunkout@gmail.com")) (:maintainers ("tlh" . "thunkout@gmail.com")) (:maintainer "tlh" . "thunkout@gmail.com"))])
+ (workgroups2 . [(20230328 1331) ((emacs (25 1))) "Save&load multiple named workspaces (or \"workgroups\")" tar ((:url . "https://github.com/pashinin/workgroups2") (:commit . "aff9d76b7be5eed33f30be2fabf111818749cbd5") (:revdesc . "aff9d76b7be5") (:keywords "session" "management" "window-configuration" "persistence") (:authors ("Sergey Pashinin" . "sergeyatpashinindotcom")) (:maintainers ("Sergey Pashinin" . "sergeyatpashinindotcom")) (:maintainer "Sergey Pashinin" . "sergeyatpashinindotcom"))])
+ (workroom . [(20230926 1631) ((emacs (25 1)) (project (0 3 0)) (compat (28 1 2 2))) "Named rooms for work without irrelevant distracting buffers" tar ((:url . "https://codeberg.org/akib/emacs-workroom") (:commit . "cb8654191b23c9b02a79660c3d8c969709c6fcbe") (:revdesc . "cb8654191b23") (:keywords "tools" "convenience") (:authors ("Akib Azmain Turja" . "akib@disroot.org")) (:maintainers ("Akib Azmain Turja" . "akib@disroot.org")) (:maintainer "Akib Azmain Turja" . "akib@disroot.org"))])
+ (world-time-mode . [(20140627 807) nil "Show whole days of world-time diffs" tar ((:url . "https://github.com/nicferrier/emacs-world-time-mode") (:commit . "ce7a3b45c87eb24cfe61eee453175d64f741d7cc") (:revdesc . "ce7a3b45c87e") (:keywords "tools" "calendar") (:authors ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainers ("Nic Ferrier" . "nferrier@ferrier.me.uk")) (:maintainer "Nic Ferrier" . "nferrier@ferrier.me.uk"))])
+ (wotd . [(20170328 1948) ((emacs (24 4)) (org (8 2 10))) "Fetch word-of-the-day from multiple online sources" tar ((:url . "https://github.com/cute-jumper/emacs-word-of-the-day") (:commit . "d2937a3d91e014f8028a1f33d21c18cc0b065a64") (:revdesc . "d2937a3d91e0") (:keywords "extensions") (:authors ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainers ("Junpeng Qiu" . "qjpchmail@gmail.com")) (:maintainer "Junpeng Qiu" . "qjpchmail@gmail.com"))])
+ (wrap-region . [(20140117 720) ((dash (1 0 3))) "Wrap text with punctation or tag" tar ((:url . "https://github.com/rejeep/wrap-region") (:commit . "5a910ad23ebb0649e644bf62ad042587341da5da") (:revdesc . "5a910ad23ebb") (:keywords "speed" "convenience") (:authors ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainers ("Johan Andersson" . "johan.rejeep@gmail.com")) (:maintainer "Johan Andersson" . "johan.rejeep@gmail.com"))])
+ (wren-mode . [(20221227 227) ((emacs (24 3))) "A major mode for the Wren programming language" tar ((:url . "https://github.com/thechampagne/wren-mode") (:commit . "70b1b89f565679a15c8c9c1a9bda98b0d163e83e") (:revdesc . "70b1b89f5656") (:keywords "files" "wren"))])
+ (writefreely . [(20241222 1909) ((emacs (24 3)) (org (9 0)) (ox-hugo (0 12)) (request (0 3))) "Push your Org files as markdown to a writefreely instance" tar ((:url . "https://github.com/dangom/writefreely.el") (:commit . "cfcd21b82dc4a4543efb6209fc0a4f4bc3c78e4a") (:revdesc . "cfcd21b82dc4") (:keywords "convenience") (:authors ("Daniel Gomez" . "d.gomezatposteodotorg")) (:maintainers ("Daniel Gomez" . "d.gomezatposteodotorg")) (:maintainer "Daniel Gomez" . "d.gomezatposteodotorg"))])
+ (writegood-mode . [(20220511 2109) nil "Polish up poor writing on the fly" tar ((:url . "https://github.com/bnbeckwith/writegood-mode") (:commit . "d54eadeedb8bf3aa0e0a584c0a7373c69644f4b8") (:revdesc . "d54eadeedb8b") (:keywords "writing" "weasel-words" "grammar"))])
+ (writeroom-mode . [(20250204 2335) ((emacs (25 1)) (visual-fill-column (2 2))) "Minor mode for distraction-free writing" tar ((:url . "https://github.com/joostkremers/writeroom-mode") (:commit . "cca2b4b3cfcfea1919e1870519d79ed1a69aa5e2") (:revdesc . "cca2b4b3cfcf") (:keywords "text") (:authors ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainers ("Joost Kremers" . "joostkremers@fastmail.fm")) (:maintainer "Joost Kremers" . "joostkremers@fastmail.fm"))])
+ (ws-butler . [(20250310 205) ((emacs (24 1))) "Unobtrusively remove trailing whitespace" tar ((:url . "https://elpa.nongnu.org/nongnu/ws-butler.html") (:commit . "9ee5a7657a22e836618813c2e2b64a548d27d2ff") (:revdesc . "9ee5a7657a22") (:keywords "text") (:authors ("Le Wang" . "l26wang@gmail.com")) (:maintainers ("Sean Whitton" . "spwhitton@spwhitton.name")) (:maintainer "Sean Whitton" . "spwhitton@spwhitton.name"))])
+ (wsd-mode . [(20191031 1211) nil "Emacs major-mode for www.websequencediagrams.com" tar ((:url . "https://github.com/josteink/wsd-mode") (:commit . "44aac55afb57cb540559aa1015f9ad2d770dd5c8") (:revdesc . "44aac55afb57") (:keywords "wsd" "diagrams" "design" "process" "modelling" "uml") (:authors ("Jostein Kjønigsen" . "jostein@gmail.com")) (:maintainers ("Jostein Kjønigsen" . "jostein@gmail.com")) (:maintainer "Jostein Kjønigsen" . "jostein@gmail.com"))])
+ (wttrin . [(20260626 1725) ((emacs (24 4)) (xterm-color (1 0))) "Emacs Frontend for Service wttr.in" tar ((:url . "https://github.com/cjennings/emacs-wttrin") (:commit . "ee8fdeb692d666c12ce068a2b1ee90e9451ac892") (:revdesc . "ee8fdeb692d6") (:keywords "weather" "wttrin" "games") (:maintainers ("Craig Jennings" . "c@cjennings.net")) (:maintainer "Craig Jennings" . "c@cjennings.net"))])
+ (wucuo . [(20240929 610) ((emacs (25 1))) "Fastest solution to spell check camel case code or plain text" tar ((:url . "https://github.com/redguardtoo/wucuo") (:commit . "351997d1cfa02375ce8efd3414802a3507a73b76") (:revdesc . "351997d1cfa0") (:keywords "convenience") (:authors ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainers ("Chen Bin" . "chenbinDOTshATgmailDOTcom")) (:maintainer "Chen Bin" . "chenbinDOTshATgmailDOTcom"))])
+ (wwg . [(20210614 1527) ((emacs (25 1))) "Writer word goals" tar ((:url . "https://github.com/ag91/writer-word-goals") (:commit . "46c8a7c71275ced2c662c1222d4b85319f80dd83") (:revdesc . "46c8a7c71275") (:keywords "wp") (:authors (nil . "Andreaandrea-dev@hotmail.com")) (:maintainers (nil . "Andreaandrea-dev@hotmail.com")) (:maintainer nil . "Andreaandrea-dev@hotmail.com"))])
+ (wwtime . [(20151122 1610) nil "Insert a time of day with appropriate world-wide localization" tar ((:url . "https://github.com/ndw/wwtime") (:commit . "d04d8fa814b5d3644efaeb28f25520ada69acbbd") (:revdesc . "d04d8fa814b5") (:keywords "time") (:authors ("Norman Walsh" . "ndw@nwalsh.com")) (:maintainers ("Norman Walsh" . "ndw@nwalsh.com")) (:maintainer "Norman Walsh" . "ndw@nwalsh.com"))])
+ (www-synonyms . [(20170128 2251) ((request (0 2 0)) (cl-lib (0 5))) "Insert synonym for a word" tar ((:url . "https://github.com/spebern/www-synonyms") (:commit . "7e37ea35064ff31c9945f0198a653647d408c936") (:revdesc . "7e37ea35064f") (:keywords "lisp") (:authors ("Bernhard Specht" . "bernhard@specht.net")) (:maintainers ("Bernhard Specht" . "bernhard@specht.net")) (:maintainer "Bernhard Specht" . "bernhard@specht.net"))])
+ (x-path-walker . [(20220714 1056) ((helm-core (3 6 0))) "Navigation feature for JSON/XML/HTML based on path (imenu like)" tar ((:url . "https://github.com/Lompik/x-path-walker") (:commit . "c91deaaba0d5cc9018008a39c96222deacba3868") (:revdesc . "c91deaaba0d5") (:keywords "convenience") (:authors (nil . "lompik@ArchOrion")) (:maintainers (nil . "lompik@ArchOrion")) (:maintainer nil . "lompik@ArchOrion"))])
+ (x509-mode . [(20260818 1234) ((emacs (25 1)) (compat (29 1))) "View certificates, CRLs and keys using OpenSSL" tar ((:url . "https://github.com/jobbflykt/x509-mode") (:commit . "4f44db115e8ab34e4721c0a46d81b902b320477d") (:revdesc . "4f44db115e8a") (:authors ("Fredrik Axelsson" . "f.axelsson@gmail.com")) (:maintainers ("Fredrik Axelsson" . "f.axelsson@gmail.com")) (:maintainer "Fredrik Axelsson" . "f.axelsson@gmail.com"))])
+ (x86-lookup . [(20240823 1135) ((emacs (24 3)) (cl-lib (0 3))) "Jump to x86 instruction documentation" tar ((:url . "https://github.com/skeeto/x86-lookup") (:commit . "0a6e4faceb3c313c3ee0ac4b086326a7553c1d8b") (:revdesc . "0a6e4faceb3c") (:authors ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainers ("Christopher Wellons" . "wellons@nullprogram.com")) (:maintainer "Christopher Wellons" . "wellons@nullprogram.com"))])
+ (xbm-life . [(20210508 1640) ((emacs (24 1))) "A XBM version of Conway's Game of Life" tar ((:url . "https://depp.brause.cc/xbm-life") (:commit . "ec6abb0182068294a379cb49ad5346b1d757457d") (:revdesc . "ec6abb018206") (:keywords "games") (:authors ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (xcode-mode . [(20160907 1208) ((emacs (24 4)) (s (1 10 0)) (dash (2 11 0)) (multiple-cursors (1 0 0))) "A minor mode for emacs to perform Xcode like actions" tar ((:url . "https://github.com/nicklanasa/xcode-mode") (:commit . "5b5f0a4f505d44840a4924b24e3ef73b8528d98b") (:revdesc . "5b5f0a4f505d") (:keywords "conveniences") (:authors ("Nickolas Lanasa" . "nick@nytekproductions.com")) (:maintainers ("Nickolas Lanasa" . "nick@nytekproductions.com")) (:maintainer "Nickolas Lanasa" . "nick@nytekproductions.com"))])
+ (xcode-project . [(20200810 2010) ((emacs (25))) "A package for reading Xcode project files" tar ((:url . "https://github.com/nhojb/xcode-project.git") (:commit . "90aef198df5b51dfdb9ad205aa5b412c471fd418") (:revdesc . "90aef198df5b") (:keywords "languages" "tools") (:authors ("John Buckley" . "john@olivetoast.com")) (:maintainers ("John Buckley" . "john@olivetoast.com")) (:maintainer "John Buckley" . "john@olivetoast.com"))])
+ (xcscope . [(20260823 51) nil "Cscope interface for (X)Emacs" tar ((:url . "https://github.com/dkogan/xcscope.el") (:commit . "e27bf918978ac9d5e3383997dcb49d88d6135d91") (:revdesc . "e27bf918978a") (:keywords "languages" "c") (:authors ("Darryl Okahata" . "darrylo@sonic.net") ("Dima Kogan" . "dima@secretsauce.net")) (:maintainers ("Dima Kogan" . "dima@secretsauce.net")) (:maintainer "Dima Kogan" . "dima@secretsauce.net"))])
+ (xenops . [(20250318 1613) ((emacs (26 1)) (aio (1 0)) (auctex (12 2 0)) (avy (0 5 0)) (dash (2 18 0)) (f (0 20 0)) (s (1 12 0))) "A LaTeX editing environment for mathematical documents" tar ((:url . "https://github.com/dandavison/xenops") (:commit . "de8bce9af99476b58742679a77ac09bdb7ea0c76") (:revdesc . "de8bce9af994") (:authors ("Dan Davison" . "dandavison7@gmail.com")) (:maintainers ("Dan Davison" . "dandavison7@gmail.com")) (:maintainer "Dan Davison" . "dandavison7@gmail.com"))])
+ (xhair . [(20210801 222) ((emacs (24 3)) (vline (1 0))) "Highlight the current line and column" tar ((:url . "https://github.com/Boruch-Baum/emacs-xhair") (:commit . "c7bd7c501c3545aa99dadac386c882fe7c5edd9c") (:revdesc . "c7bd7c501c35") (:keywords "convenience" "faces" "maint"))])
+ (xkb-mode . [(20250421 840) ((emacs (25 1))) "Major mode for editing X Keyboard Extension (XKB) files" tar ((:url . "https://github.com/captainflasmr/xkb-mode") (:commit . "0e317a08dd665bfa8d1bbfbe23c7ca3ae0975519") (:revdesc . "0e317a08dd66") (:keywords "convenience") (:authors ("James Dyer" . "captainflasmr@gmail.com")) (:maintainers ("James Dyer" . "captainflasmr@gmail.com")) (:maintainer "James Dyer" . "captainflasmr@gmail.com"))])
+ (xkcd . [(20220503 1109) ((json (1 3))) "View xkcd from Emacs" tar ((:url . "https://github.com/vibhavp/emacs-xkcd") (:commit . "80011da2e7def8f65233d4e0d790ca60d287081d") (:revdesc . "80011da2e7de") (:keywords "xkcd" "webcomic") (:authors ("Vibhav Pant" . "vibhavp@gmail.com")) (:maintainers ("Vibhav Pant" . "vibhavp@gmail.com")) (:maintainer "Vibhav Pant" . "vibhavp@gmail.com"))])
+ (xmind-org . [(20240723 1455) ((emacs (27 1)) (org-ml (5 3)) (dash (2 12))) "Import XMind mindmaps into Org" tar ((:url . "https://github.com/akirak/xmind-org-el") (:commit . "01055f0b9a53d40c9ce6a7b1c259a3a73b4ff413") (:revdesc . "01055f0b9a53") (:keywords "outlines" "wp" "files") (:authors ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainers ("Akira Komamura" . "akira.komamura@gmail.com")) (:maintainer "Akira Komamura" . "akira.komamura@gmail.com"))])
+ (xml+ . [(20170727 2351) ((emacs (24 4)) (dash (2 12 0))) "Utilities for xml and html trees" tar ((:url . "https://github.com/bddean/xml-plus") (:commit . "232fa863c08fc159b21dd58c39ea45dce3334895") (:revdesc . "232fa863c08f") (:keywords "xml" "html") (:authors ("Ben Dean" . "bendean837@gmail.com")) (:maintainers ("Ben Dean" . "bendean837@gmail.com")) (:maintainer "Ben Dean" . "bendean837@gmail.com"))])
+ (xml-format . [(20191011 1159) ((emacs (25)) (reformatter (0 4))) "XML reformatter using xmllint" tar ((:url . "https://github.com/wbolster/emacs-xml-format") (:commit . "2861c4e33e18b077112efa072316b031bca4236c") (:revdesc . "2861c4e33e18") (:keywords "languages") (:authors ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainers ("wouter bolsterlee" . "wouter@bolsterl.ee")) (:maintainer "wouter bolsterlee" . "wouter@bolsterl.ee"))])
+ (xml-quotes . [(20200301 1222) nil "Read quotations from an XML document" tar ((:url . "https://github.com/ndw/xml-quotes") (:commit . "8fc21e43b45f9a50b24642412f05afcc3a316a1f") (:revdesc . "8fc21e43b45f") (:keywords "xml" "quotations") (:authors ("Norman Walsh" . "ndw@nwalsh.com")) (:maintainers ("Norman Walsh" . "ndw@nwalsh.com")) (:maintainer "Norman Walsh" . "ndw@nwalsh.com"))])
+ (xml-rpc . [(20231009 1432) ((emacs (24 1))) "An elisp implementation of clientside XML-RPC" tar ((:url . "https://github.com/xml-rpc-el/xml-rpc-el") (:commit . "fb6183597be1361be02f46c9a53257ac1dd9715e") (:revdesc . "fb6183597be1") (:keywords "xml" "rpc" "network" "comm") (:maintainers ("Mark A. Hershberger" . "mah@everybody.org")) (:maintainer "Mark A. Hershberger" . "mah@everybody.org"))])
+ (xmlgen . [(20170411 1317) nil "A DSL for generating XML" tar ((:url . "https://github.com/philjackson/xmlgen") (:commit . "dba66681f0c5e621a9e70e8afb34903c9ffe93c4") (:revdesc . "dba66681f0c5") (:authors ("Philip Jackson" . "phil@shellarchive.co.uk")) (:maintainers ("Philip Jackson" . "phil@shellarchive.co.uk")) (:maintainer "Philip Jackson" . "phil@shellarchive.co.uk"))])
+ (xmltokf . [(20250126 656) ((emacs (25 1))) "Functional wrappers around xmltok" tar ((:url . "https://github.com/paddymcall/xmltokf.el") (:commit . "b241550af98c7c367803d0fa34735c7aa0eb352c") (:revdesc . "b241550af98c") (:keywords "text" "hypermedia" "languages" "xml"))])
+ (xmlunicode . [(20230820 814) nil "Unicode support for XML" tar ((:url . "https://github.com/ndw/xmlunicode") (:commit . "5f1c3e48b90588eb56cec67d3efc869a4e95b03a") (:revdesc . "5f1c3e48b905") (:keywords "utf-8" "unicode" "xml" "characters") (:authors ("Norman Walsh" . "ndw@nwalsh.com")) (:maintainers ("Norman Walsh" . "ndw@nwalsh.com")) (:maintainer "Norman Walsh" . "ndw@nwalsh.com"))])
+ (xo . [(20160403 646) nil "XO linter integration with compilation mode" tar ((:url . "https://github.com/j-em/xo-emacs") (:commit . "72fcd867cfa332fdb82f732925cf8977e690af78") (:revdesc . "72fcd867cfa3") (:keywords "processes") (:authors ("J.A" . "jer.github@gmail.com")) (:maintainers ("J.A" . "jer.github@gmail.com")) (:maintainer "J.A" . "jer.github@gmail.com"))])
+ (xonsh-mode . [(20201020 52) ((emacs (24 3))) "Major mode for editing xonshrc files" tar ((:url . "https://github.com/seanfarley/xonsh-mode") (:commit . "7fa581524533a9b6b770426e4445e571a69e469d") (:revdesc . "7fa581524533") (:keywords "languages") (:authors ("Sean Farley" . "sean@farley.io")) (:maintainers ("Sean Farley" . "sean@farley.io")) (:maintainer "Sean Farley" . "sean@farley.io"))])
+ (xquery-mode . [(20170214 1119) ((cl-lib (0 5))) "A simple mode for editing xquery programs" tar ((:url . "https://github.com/xquery-mode/xquery-mode") (:commit . "19e6f9553ce05380843582b879712de00679e4ab") (:revdesc . "19e6f9553ce0"))])
+ (xquery-tool . [(20200907 811) nil "A simple interface to saxonb's xquery" tar ((:url . "https://github.com/paddymcall/xquery-tool.el") (:commit . "bd48e0f56b58e36309f7966dcf67db69d65100a4") (:revdesc . "bd48e0f56b58") (:keywords "xml" "xquery" "emacs") (:authors ("Patrick McAllister" . "pma@rdorte.org")) (:maintainers ("Patrick McAllister" . "pma@rdorte.org")) (:maintainer "Patrick McAllister" . "pma@rdorte.org"))])
+ (xref-js2 . [(20240504 1449) ((emacs (25 1)) (js2-mode (20150909))) "Jump to references/definitions using ag & js2-mode's AST" tar ((:url . "https://github.com/NicolasPetton/xref-js2") (:commit . "e215af9eedac69b40942fff9d5514704f9f4d43e") (:revdesc . "e215af9eedac") (:keywords "javascript" "convenience" "tools") (:authors ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainers ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainer "Nicolas Petton" . "nicolas@petton.fr"))])
+ (xref-rst . [(20260528 14) ((emacs (29 1))) "Lookup reStructuredText symbols" tar ((:url . "https://codeberg.org/ideasman42/emacs-xref-rst") (:commit . "e54656eff9138d71c5d9ad7717675575b9f2b636") (:revdesc . "e54656eff913") (:authors ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainers ("Campbell Barton" . "ideasman42@gmail.com")) (:maintainer "Campbell Barton" . "ideasman42@gmail.com"))])
+ (xresources-theme . [(20221208 2015) nil "Use your .Xresources as your emacs theme" tar ((:url . "https://github.com/martenlienen/xresources-theme") (:commit . "76532fc4330e9e31accc580708514b83b15d70a7") (:revdesc . "76532fc4330e") (:keywords "xresources" "theme") (:authors ("Marten Lienen" . "marten.lienen@gmail.com")) (:maintainers ("Marten Lienen" . "marten.lienen@gmail.com")) (:maintainer "Marten Lienen" . "marten.lienen@gmail.com"))])
+ (xterm-color . [(20260531 1854) ((emacs (25 1))) "ANSI, XTERM 256 and Truecolor support" tar ((:url . "https://github.com/atomontage/xterm-color") (:commit . "0b0d808f8bc5007037341dc5f63149cc32cf2c5b") (:revdesc . "0b0d808f8bc5") (:keywords "faces") (:authors ("xristos" . "xristos@sdf.org")) (:maintainers ("xristos" . "xristos@sdf.org")) (:maintainer "xristos" . "xristos@sdf.org"))])
+ (xterm-keybinder . [(20160523 56) ((emacs (24 3)) (cl-lib (0 5)) (let-alist (1 0 1))) "Let you extra keybinds in xterm/urxvt" tar ((:url . "https://github.com/yuutayamada/xterm-keybinder-el") (:commit . "b29c4f700b0fa0c9f627f6725b36462b8fab06d6") (:revdesc . "b29c4f700b0f") (:keywords "convenient") (:authors ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainers ("Yuta Yamada" . "cokesboy\"at\"gmail.com")) (:maintainer "Yuta Yamada" . "cokesboy\"at\"gmail.com"))])
+ (xtest . [(20141214 1706) ((cl-lib (0 5))) "Simple Testing with Emacs & ERT" tar ((:url . "https://github.com/promethial/xtest") (:commit . "8099be9c2d856f98489834ddb20a01c6fd8922f1") (:revdesc . "8099be9c2d85") (:keywords "testing" "ert"))])
+ (xwidgete . [(20171118 2116) ((emacs (25))) "Enhances usability of current xwidget browser" tar ((:url . "https://github.com/tuhdo/xwidgete") (:commit . "e4e8410fe32176df85b46234717824519443fb04") (:revdesc . "e4e8410fe321") (:keywords "xwidgete" "tools") (:authors ("Do Hoang" . "tuhdo1710@gmail.com")))])
+ (xwidgets-reuse . [(20240331 1644) ((emacs (26 1))) "Reuse xwidgets sessions to reduce resource consumption" tar ((:url . "https://github.com/lordpretzel/xwidgets-reuse") (:commit . "5653c8a3ac13615d171599b3ada87512bd1a6fb9") (:revdesc . "5653c8a3ac13") (:keywords "hypermedia") (:authors ("Boris Glavic" . "lordpretzel@gmail.com")) (:maintainers ("Boris Glavic" . "lordpretzel@gmail.com")) (:maintainer "Boris Glavic" . "lordpretzel@gmail.com"))])
+ (xwiki-mode . [(20211112 511) ((emacs (27 1))) "Major mode for xwiki-formatted text" tar ((:url . "https://github.com/ackerleytng/xwiki-mode") (:commit . "8b6f2caead8ec804e8d7d37d87eb3b46aa96b6e8") (:revdesc . "8b6f2caead8e") (:keywords "languages" "convenience" "tools") (:authors ("Ackerley Tng" . "ackerleytng@gmail.com")) (:maintainers ("Ackerley Tng" . "ackerleytng@gmail.com")) (:maintainer "Ackerley Tng" . "ackerleytng@gmail.com"))])
+ (xwwp . [(20240701 1040) ((emacs (26 1))) "Enhance xwidget webkit browser" tar ((:url . "https://github.com/canatella/xwwp") (:commit . "0c875e460d1c0637766204dc289ffbd0f2284194") (:revdesc . "0c875e460d1c") (:keywords "convenience"))])
+ (xwwp-follow-link-helm . [(20200917 642) ((emacs (26 1)) (xwwp (0 1))) "Link navigation in `xwidget-webkit' sessions using `helm'" tar ((:url . "https://github.com/canatella/xwwp") (:commit . "99670ec37e2083eada9691a342441d2fa4589002") (:revdesc . "99670ec37e20") (:keywords "convenience"))])
+ (xwwp-follow-link-ivy . [(20200917 642) ((emacs (26 1)) (xwwp (0 1))) "Link navigation in `xwidget-webkit' sessions using `ivy'" tar ((:url . "https://github.com/canatella/xwwp") (:commit . "1f1646feaf3328568da40200cc218337fbbabc1a") (:revdesc . "1f1646feaf33") (:keywords "convenience"))])
+ (yabaki-theme . [(20260201 1303) ((emacs (27 1))) "Yabaki, the cast shadow" tar ((:url . "https://codeberg.org/seahorse/yabaki-theme") (:commit . "eae3e0015da43f38a17b5a378f61c0f21fb83f79") (:revdesc . "eae3e0015da4") (:authors ("David Goudou" . "david.goudou@gmail.com")) (:maintainers ("David Goudou" . "david.goudou@gmail.com")) (:maintainer "David Goudou" . "david.goudou@gmail.com"))])
+ (yabin . [(20140206 351) nil "Yet Another Bignum package (A thin wrapper of calc.el)" tar ((:url . "https://github.com/d5884/yabin") (:commit . "db8c404507560ef9147fcce2b94cd706fbfa03b5") (:revdesc . "db8c40450756") (:keywords "data") (:authors ("Daisuke Kobayashi" . "d5884jp@gmail.com")) (:maintainers ("Daisuke Kobayashi" . "d5884jp@gmail.com")) (:maintainer "Daisuke Kobayashi" . "d5884jp@gmail.com"))])
+ (yafolding . [(20250601 2133) ((emacs (28 1))) "Folding code blocks based on indentation" tar ((:url . "https://github.com/emacsorphanage/yafolding") (:commit . "77d36147a07d82a558788b180e4f0a983a3ed906") (:revdesc . "77d36147a07d") (:keywords "folding") (:authors ("Zeno Zeng" . "zenoofzeng@gmail.com")) (:maintainers ("Zeno Zeng" . "zenoofzeng@gmail.com")) (:maintainer "Zeno Zeng" . "zenoofzeng@gmail.com"))])
+ (yagist . [(20160418 508) ((cl-lib (0 3))) "Yet Another Emacs integration for gist.github.com" tar ((:url . "https://github.com/mhayashi1120/yagist.el") (:commit . "10da4baa272ff0f7052f17debecc340764c7003f") (:revdesc . "10da4baa272f") (:keywords "tools") (:maintainers ("Masahiro Hayashi" . "mhayashi1120@gmail.com")) (:maintainer "Masahiro Hayashi" . "mhayashi1120@gmail.com"))])
+ (yahtzee . [(20220221 803) ((emacs (24 3))) "The yahtzee game" tar ((:url . "https://github.com/drdv/yahtzee") (:commit . "9b42ba4612d3043464414c08a3d60f6ad594566c") (:revdesc . "9b42ba4612d3") (:keywords "games") (:authors ("Dimitar Dimitrov" . "mail.mitko@gmail.com")) (:maintainers ("Dimitar Dimitrov" . "mail.mitko@gmail.com")) (:maintainer "Dimitar Dimitrov" . "mail.mitko@gmail.com"))])
+ (yalinum . [(20130217 1043) nil "Yet another display line numbers" tar ((:url . "https://github.com/tm8st/emacs-yalinum") (:commit . "d3e0cbe3f4f5ca311e3298e684901d6fea3ad973") (:revdesc . "d3e0cbe3f4f5") (:keywords "convenience" "tools") (:authors ("tm8st" . "tm8st@hotmail.co.jp")) (:maintainers ("tm8st" . "tm8st@hotmail.co.jp")) (:maintainer "tm8st" . "tm8st@hotmail.co.jp"))])
+ (yaml . [(20260605 834) ((emacs (25 1))) "YAML parser for Elisp" tar ((:url . "https://github.com/zkry/yaml.el") (:commit . "5546f36bde24a9a8c1934e0f6ce205cd41d72537") (:revdesc . "5546f36bde24") (:keywords "tools") (:authors ("Zachary Romero" . "zkry@posteo.org")) (:maintainers ("Zachary Romero" . "zkry@posteo.org")) (:maintainer "Zachary Romero" . "zkry@posteo.org"))])
+ (yaml-imenu . [(20250818 1432) ((emacs (27 1)) (yaml-mode (0))) "Enhancement of the imenu support in yaml-mode" tar ((:url . "https://github.com/knu/yaml-imenu.el") (:commit . "c2f32557c11cbd402853104da8f644df4ee88434") (:revdesc . "c2f32557c11c") (:keywords "outlining" "convenience" "imenu") (:authors ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainers ("Akinori MUSHA" . "knu@iDaemons.org")) (:maintainer "Akinori MUSHA" . "knu@iDaemons.org"))])
+ (yaml-mode . [(20260809 1724) ((emacs (24 1))) "Major mode for editing YAML files" tar ((:url . "https://github.com/yoshiki/yaml-mode") (:commit . "5d7347519c94eac1c9383a3b9bebe218d3e43318") (:revdesc . "5d7347519c94") (:keywords "data" "yaml") (:authors ("Yoshiki Kurihara" . "clouder@gmail.com") ("Marshall T. Vandegrift" . "llasram@gmail.com")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (yaml-pro . [(20250817 452) ((emacs (26 1)) (yaml (0 5 1))) "Parser-aided YAML editing features" tar ((:url . "https://github.com/zkry/yaml-pro") (:commit . "9b9509188e5b88bb933e98ab36ab992519b9554b") (:revdesc . "9b9509188e5b") (:keywords "tools"))])
+ (yaml-tomato . [(20151123 753) ((s (1 9))) "Copy or show the yaml path currently under cursor" tar ((:url . "https://github.com/RadekMolenda/yaml-tomato") (:commit . "1272c502fac6ce6b0f8b7f8a9beb353f0b35e13c") (:revdesc . "1272c502fac6") (:keywords "yaml"))])
+ (yang-mode . [(20250202 1003) nil "Emacs major mode for editing YANG files" tar ((:url . "https://github.com/mbj4668/yang-mode") (:commit . "b7a4c1734a60f70d80d5752ae058232df0b18336") (:revdesc . "b7a4c1734a60") (:authors ("Martin Bjorklund" . "mbj4668@gmail.com")) (:maintainers ("Martin Bjorklund" . "mbj4668@gmail.com")) (:maintainer "Martin Bjorklund" . "mbj4668@gmail.com"))])
+ (yankpad . [(20260506 850) ((emacs (25 1))) "Paste snippets from an org-mode file" tar ((:url . "https://github.com/Kungsgeten/yankpad") (:commit . "183b92a25a6fcc1496a8028d80397662e0bd5f19") (:revdesc . "183b92a25a6f") (:keywords "abbrev" "convenience"))])
+ (yapfify . [(20210914 634) nil "(automatically) format python buffers using YAPF" tar ((:url . "https://github.com/JorisE/yapfify") (:commit . "c9347e3b1dec5fc8d34883e206fcdc8500d22368") (:revdesc . "c9347e3b1dec") (:authors ("Joris Engbers" . "info@jorisengbers.nl")) (:maintainers ("Joris Engbers" . "info@jorisengbers.nl")) (:maintainer "Joris Engbers" . "info@jorisengbers.nl"))])
+ (yara-mode . [(20260702 151) ((emacs (24))) "Major mode for editing yara rule file" tar ((:url . "not distributed yet") (:commit . "2b097f685e2770d2c16e5f59e1434a8dcc38db86") (:revdesc . "2b097f685e27") (:keywords "yara") (:authors (nil . "binjo.cn@gmail.com")) (:maintainers (nil . "binjo.cn@gmail.com")) (:maintainer nil . "binjo.cn@gmail.com"))])
+ (yard-mode . [(20230505 1950) nil "Minor mode for Ruby YARD comments" tar ((:url . "https://github.com/pd/yard-mode.el") (:commit . "de1701753a64544c3376b015805f3661136d8038") (:revdesc . "de1701753a64"))])
+ (yari . [(20250120 851) nil "Yet Another RI interface for Emacs" tar ((:url . "https://github.com/hron/yari.el") (:commit . "de61285ceb21f56c29f4be12e2e65b2aa2bccf56") (:revdesc . "de61285ceb21") (:keywords "tools") (:authors ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainers ("Aleksei Gusev" . "aleksei.gusev@gmail.com")) (:maintainer "Aleksei Gusev" . "aleksei.gusev@gmail.com"))])
+ (yarn-mode . [(20200208 2332) ((emacs (24 3))) "Major mode for yarn.lock files" tar ((:url . "https://github.com/anachronic/yarn-mode") (:commit . "8239d4dc7d8a52fa1e3fa81bd32c904a359fcfc1") (:revdesc . "8239d4dc7d8a") (:keywords "convenience") (:authors ("Nicolás Salas V." . "nikosalas@gmail.com")) (:maintainers ("Nicolás Salas V." . "nikosalas@gmail.com")) (:maintainer "Nicolás Salas V." . "nikosalas@gmail.com"))])
+ (yascroll . [(20260103 1801) ((emacs (26 1))) "Yet Another Scroll Bar Mode" tar ((:url . "https://github.com/emacsorphanage/yascroll") (:commit . "c0a302e6a44169c290564174c48298572f418f62") (:revdesc . "c0a302e6a441") (:keywords "convenience") (:authors ("Tomohiro Matsuyama" . "m2ym.pub@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (yasnippet . [(20250602 1342) ((cl-lib (0 5)) (emacs (24 4))) "Yet another snippet extension for Emacs" tar ((:url . "https://github.com/joaotavora/yasnippet") (:commit . "dd570a6b22364212fff9769cbf4376bdbd7a63c5") (:revdesc . "dd570a6b2236") (:keywords "convenience" "emulation") (:authors ("pluskid" . "pluskid@gmail.com") ("João Távora" . "joaotavora@gmail.com") ("Noam Postavsky" . "npostavs@gmail.com")) (:maintainers ("Noam Postavsky" . "npostavs@gmail.com")) (:maintainer "Noam Postavsky" . "npostavs@gmail.com"))])
+ (yasnippet-capf . [(20250520 1105) ((emacs (25 1)) (yasnippet (0 14 0))) "Yasnippet Completion At Point Function" tar ((:url . "https://github.com/elken/yasnippet-capf") (:commit . "f53c42a996b86fc95b96bdc2deeb58581f48c666") (:revdesc . "f53c42a996b8") (:authors ("Ellis Kenyő" . "me@elken.dev")) (:maintainers ("Ellis Kenyő" . "me@elken.dev")) (:maintainer "Ellis Kenyő" . "me@elken.dev"))])
+ (yasnippet-snippets . [(20251215 1231) ((yasnippet (0 8 0))) "Collection of yasnippet snippets" tar ((:url . "https://github.com/AndreaCrotti/yasnippet-snippets") (:commit . "606ee926df6839243098de6d71332a697518cb86") (:revdesc . "606ee926df68") (:keywords "snippets") (:authors ("Andrea Crotti" . "andrea.crotti.0@gmail.com")) (:maintainers ("Andrea Crotti" . "andrea.crotti.0@gmail.com")) (:maintainer "Andrea Crotti" . "andrea.crotti.0@gmail.com"))])
+ (yatemplate . [(20211115 1208) ((yasnippet (0 8 1)) (emacs (24 3))) "File templates with yasnippet" tar ((:url . "https://github.com/mineo/yatemplate") (:commit . "275745ce1482edc08efb0b7807bc86d832bcc734") (:revdesc . "275745ce1482") (:keywords "files" "convenience") (:authors ("Wieland Hoffmann" . "themineo+yatemplate@gmail.com")) (:maintainers ("Wieland Hoffmann" . "themineo+yatemplate@gmail.com")) (:maintainer "Wieland Hoffmann" . "themineo+yatemplate@gmail.com"))])
+ (yatex . [(20260801 451) nil "Yet Another tex-mode for emacs //野鳥//" tar ((:commit . "6a0fea36298fdfdd32e8346eaa252cc358ec807a") (:revdesc . "6a0fea36298f"))])
+ (yaxception . [(20240107 504) ((emacs (28)) (dash (2 19 1))) "Provide framework about exception like Java for Elisp" tar ((:url . "https://github.com/aki2o/yaxception") (:commit . "5941de88b19752c14e0dce0d2bf562b1288055a0") (:revdesc . "5941de88b197") (:keywords "exception" "error" "signal") (:authors ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainers ("Hiroaki Otsu" . "ootsuhiroaki@gmail.com")) (:maintainer "Hiroaki Otsu" . "ootsuhiroaki@gmail.com"))])
+ (ycm . [(20150822 1836) nil "Emacs client for the YouCompleteMe auto-completion server" tar ((:url . "https://github.com/neuromage/ycm.el") (:commit . "4da8a14abcd0f4fa3235042ade2e12b5068c0601") (:revdesc . "4da8a14abcd0") (:keywords "c" "abbrev") (:authors ("Ajay Gopinathan" . "ajay@gopinathan.net")) (:maintainers ("Ajay Gopinathan" . "ajay@gopinathan.net")) (:maintainer "Ajay Gopinathan" . "ajay@gopinathan.net"))])
+ (ycmd . [(20190416 807) ((emacs (24 4)) (dash (2 13 0)) (s (1 11 0)) (deferred (0 5 1)) (cl-lib (0 6 1)) (let-alist (1 0 5)) (request (0 3 0)) (request-deferred (0 3 0)) (pkg-info (0 6))) "Emacs bindings to the ycmd completion server" tar ((:url . "https://github.com/abingham/emacs-ycmd") (:commit . "6f4f7384b82203cccf208e3ec09252eb079439f9") (:revdesc . "6f4f7384b822") (:authors ("Austin Bingham" . "austin.bingham@gmail.com") ("Peter Vasil" . "mail@petervasil.net")) (:maintainers ("Austin Bingham" . "austin.bingham@gmail.com") ("Peter Vasil" . "mail@petervasil.net")) (:maintainer "Austin Bingham" . "austin.bingham@gmail.com"))])
+ (ydk-mode . [(20170114 223) nil "Language support for Yu-Gi-Oh! deck files" tar ((:url . "https://github.com/jacksonrayhamilton/ydk-mode") (:commit . "f3f125b29408e0b0a34fec27dcb7c02c5dbfd04e") (:revdesc . "f3f125b29408") (:keywords "faces" "games" "languages" "ydk" "yugioh" "yu-gi-oh") (:authors ("Jackson Ray Hamilton" . "jackson@jacksonrayhamilton.com")) (:maintainers ("Jackson Ray Hamilton" . "jackson@jacksonrayhamilton.com")) (:maintainer "Jackson Ray Hamilton" . "jackson@jacksonrayhamilton.com"))])
+ (year-1984-theme . [(20250902 1120) ((emacs (27 1))) "A retro-futuristic theme" tar ((:url . "https://github.com/mastro35/year-1984-theme") (:commit . "d04b9b267085bb3606426dab2e26ea6489b31de3") (:revdesc . "d04b9b267085") (:keywords "themes" "faces" "colors" "apple" "beige" "light" "pastel" "vintage") (:authors ("Davide Mastromatteo" . "mastro35@gmail.com")) (:maintainers ("Davide Mastromatteo" . "mastro35@gmail.com")) (:maintainer "Davide Mastromatteo" . "mastro35@gmail.com"))])
+ (yeetube . [(20260804 953) ((emacs (29 1)) (compat (29 1 4 2)) (keymap-popup (0 2 0))) "Scrape YouTube, Play with mpv & Download with yt-dlp" tar ((:url . "https://thanosapollo.org/projects/yeetube/") (:commit . "f26e5db739af35c99d44607ef0fe992bf69bb8dd") (:revdesc . "f26e5db739af") (:keywords "extensions" "youtube" "videos") (:authors ("Thanos Apollo" . "public@thanosapollo.org")) (:maintainers ("Thanos Apollo" . "public@thanosapollo.org")) (:maintainer "Thanos Apollo" . "public@thanosapollo.org"))])
+ (yequake . [(20200219 2323) ((emacs (25 2)) (dash (2 14 1))) "Drop-down frames, like Yakuake" tar ((:url . "https://github.com/alphapapa/yequake") (:commit . "d18166e597414350117d0b82a29e509fc53c636d") (:revdesc . "d18166e59741") (:keywords "convenience" "window-system" "frames") (:authors ("Adam Porter" . "adam@alphapapa.net")) (:maintainers ("Adam Porter" . "adam@alphapapa.net")) (:maintainer "Adam Porter" . "adam@alphapapa.net"))])
+ (yesql-ghosts . [(20150220 1237) ((s (1 9 0)) (dash (2 10 0)) (cider (0 8 0))) "Display ghostly yesql defqueries inline" tar ((:url . "https://github.com/magnars/yesql-ghosts") (:commit . "416198cdc4f316b0912af5e413410937b9b8432b") (:revdesc . "416198cdc4f3") (:authors ("Magnar Sveen" . "magnars@gmail.com")) (:maintainers ("Magnar Sveen" . "magnars@gmail.com")) (:maintainer "Magnar Sveen" . "magnars@gmail.com"))])
+ (yesterbox . [(20200327 52) ((emacs (24 3))) "Count number of inbox messages by day" tar ((:url . "https://github.com/sje30/yesterbox") (:commit . "7d890ab3f012b1a48a0e8e437f5fcaeba9825fdc") (:revdesc . "7d890ab3f012") (:keywords "mail") (:authors ("Stephen J. Eglen" . "sje30@cam.ac.uk")) (:maintainers ("Stephen J. Eglen" . "sje30@cam.ac.uk")) (:maintainer "Stephen J. Eglen" . "sje30@cam.ac.uk"))])
+ (yoficator . [(20190509 1620) nil "Interactively yoficate Russian texts" tar ((:url . "https://gitlab.com/link2xt/yoficator") (:commit . "fa914f9648515bca54b5e558ca57d2b65fa57491") (:revdesc . "fa914f964851") (:authors ("Eugene Minkovskii" . "emin@mccme.ru") ("Alexander Krotov" . "ilabdsf@gmail.com")) (:maintainers ("Eugene Minkovskii" . "emin@mccme.ru") ("Alexander Krotov" . "ilabdsf@gmail.com")) (:maintainer "Eugene Minkovskii" . "emin@mccme.ru"))])
+ (yomikata . [(20260304 1811) ((emacs (29 1))) "Annotates Japanese text with reading tooltips" tar ((:url . "https://github.com/melissaboiko/yomikata-tips.el") (:commit . "697c04d958a999cf1e65c09b9bc144a67f9d4819") (:revdesc . "697c04d958a9") (:keywords "i18n" "mouse" "text") (:authors ("Melissa Boiko" . "melissa@namakajiri.net")) (:maintainers ("Melissa Boiko" . "melissa@namakajiri.net")) (:maintainer "Melissa Boiko" . "melissa@namakajiri.net"))])
+ (yoshi-theme . [(20230801 1741) nil "Theme named after my cat" tar ((:url . "http://projects.ryuslash.org/yoshi-theme/") (:commit . "61e4250ae32744e5434c8faef7d059c7b157f81a") (:revdesc . "61e4250ae327") (:keywords "faces") (:authors ("Tom Willemse" . "tom@ryuslash.org")) (:maintainers ("Tom Willemse" . "tom@ryuslash.org")) (:maintainer "Tom Willemse" . "tom@ryuslash.org"))])
+ (youdao-dictionary . [(20231005 1920) ((popup (0 5 0)) (pos-tip (0 4 6)) (chinese-word-at-point (0 2)) (names (0 5)) (emacs (24))) "Youdao Dictionary interface for Emacs" tar ((:url . "https://github.com/xuchunyang/youdao-dictionary.el") (:commit . "eae8efb1efd3fc82cfe87a357fe8f764116d94ef") (:revdesc . "eae8efb1efd3") (:keywords "convenience" "chinese" "dictionary") (:authors ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainers ("Chunyang Xu" . "xuchunyang56@gmail.com")) (:maintainer "Chunyang Xu" . "xuchunyang56@gmail.com"))])
+ (youdotcom . [(20240207 1853) ((emacs (25 1))) "You.com search package" tar ((:url . "https://github.com/SamuelVanie/youdotcom.el") (:commit . "0b835f143e88c3321006a3e48ac5190d071b872c") (:revdesc . "0b835f143e88") (:keywords "ai" "tools") (:authors ("Samuel Michael Vanié" . "samuelmichaelvanie@gmail.com")) (:maintainers ("Samuel Michael Vanié" . "samuelmichaelvanie@gmail.com")) (:maintainer "Samuel Michael Vanié" . "samuelmichaelvanie@gmail.com"))])
+ (youtube-music . [(20260717 1039) ((emacs (29 1))) "YouTube Music client" tar ((:url . "https://github.com/cyberkm/emacs-youtube-music") (:commit . "2a962d972d8a59fed718aec039c9c61ef3c0392d") (:revdesc . "2a962d972d8a") (:keywords "multimedia" "youtube" "music") (:authors ("Pavel Bibergal" . "pavel@keewano.com")) (:maintainers ("Pavel Bibergal" . "pavel@keewano.com")) (:maintainer "Pavel Bibergal" . "pavel@keewano.com"))])
+ (youtube-sub-extractor . [(20221116 653) ((emacs (27 1))) "Extract YouTube video subtitles" tar ((:url . "https://github.com/agzam/youtube-sub-extractor.el") (:commit . "d69f732299fdf256504e15767c1d7e5de771220e") (:revdesc . "d69f732299fd") (:keywords "convenience" "multimedia") (:authors ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainers ("Ag Ibragimov" . "agzam.ibragimov@gmail.com")) (:maintainer "Ag Ibragimov" . "agzam.ibragimov@gmail.com"))])
+ (ytdious . [(20210228 2111) ((emacs (25 3))) "Query / Preview YouTube via Invidious" tar ((:url . "https://github.com/spiderbit/ytdious") (:commit . "941460b51e43ef6764e15e2b9c4af54c3e56115f") (:revdesc . "941460b51e43") (:keywords "youtube" "matching" "multimedia"))])
+ (ytdl . [(20241025 1913) ((emacs (26 1)) (async (1 9 4)) (transient (0 2 0)) (dash (2 17 0))) "Emacs Interface for youtube-dl" tar ((:url . "https://gitlab.com/tuedachu/ytdl") (:commit . "309ad5ce95368ad2e35d1c1701a1f3c0043415a3") (:revdesc . "309ad5ce9536") (:keywords "comm" "multimedia") (:authors ("Arnaud Hoffmann" . "tuedachu@gmail.com")) (:maintainers ("Arnaud Hoffmann" . "tuedachu@gmail.com")) (:maintainer "Arnaud Hoffmann" . "tuedachu@gmail.com"))])
+ (yuck-mode . [(20230113 2304) ((emacs (25 1))) "Major mode for the yuck configuration language" tar ((:url . "https://github.com/mmcjimsey26/yuck-mode") (:commit . "e084416fa3e7f91bb429edbf7ff1585aa5674367") (:revdesc . "e084416fa3e7") (:keywords "languages" "yuck" "eww" "widgets"))])
+ (yul-mode . [(20220927 338) nil "Major mode for editing Ethereum Yul intermediate code" tar ((:url . "https://github.com/taquangtrung/emacs-yul-mode") (:commit . "56cba05549873fcf1b66e304969011dc1a1ad228") (:revdesc . "56cba0554987") (:keywords "languages"))])
+ (z3-mode . [(20211116 138) ((flycheck (0 23)) (emacs (24))) "A z3/SMTLIBv2 interactive development environment" tar ((:url . "https://github.com/zv/z3-mode") (:commit . "0356cbe1e1e2b780ba0ddb4aaa055fa246a67931") (:revdesc . "0356cbe1e1e2") (:keywords "z3" "yices" "mathsat" "smt" "beaver") (:authors ("Zephyr Pellerin" . "zephyr.pellerin@gmail.com")) (:maintainers ("Zephyr Pellerin" . "zephyr.pellerin@gmail.com")) (:maintainer "Zephyr Pellerin" . "zephyr.pellerin@gmail.com"))])
+ (zathura . [(20260603 1620) ((emacs (24 3))) "Summary" tar ((:url . "https://codeberg.org/treflip/zathura.el") (:commit . "874dadbf07e22811b6b309200cad32b4ccca0e51") (:revdesc . "874dadbf07e2") (:keywords "convenience"))])
+ (zeal-at-point . [(20180131 2354) nil "Search the word at point with Zeal" tar ((:url . "https://github.com/jinzhu/zeal-at-point") (:commit . "0fc3263f44e95acd3e9d91057677621ce4d297ee") (:revdesc . "0fc3263f44e9") (:authors ("Jinzhu" . "wosmvp@gmail.com")) (:maintainers ("Jinzhu" . "wosmvp@gmail.com")) (:maintainer "Jinzhu" . "wosmvp@gmail.com"))])
+ (zen-and-art-theme . [(20120622 1437) nil "Zen and art color theme for GNU Emacs 24" tar ((:url . "https://github.com/developernotes/zen-and-art-theme") (:commit . "a7226cbce0bca2501d69a620cb2aeabfc396c232") (:revdesc . "a7226cbce0bc"))])
+ (zen-mode . [(20200609 822) ((emacs (24 3))) "A major mode for the Zen programming language" tar ((:url . "https://github.com/zenlang/zen-mode") (:commit . "c1b1806358f3cce6c04b30699987d82dc7d42559") (:revdesc . "c1b1806358f3") (:keywords "zen" "languages") (:authors ("Andrea Orru" . "andreaorru1991@gmail.com") ("Andrew Kelley" . "superjoe30@gmail.com") ("kristopher tate" . "kt@connectfree.co.jp") ("Yoshitaka Takemoto" . "yt.3b8@connectfree.co.jp")) (:maintainers ("Andrea Orru" . "andreaorru1991@gmail.com") ("Andrew Kelley" . "superjoe30@gmail.com") ("kristopher tate" . "kt@connectfree.co.jp") ("Yoshitaka Takemoto" . "yt.3b8@connectfree.co.jp")) (:maintainer "Andrea Orru" . "andreaorru1991@gmail.com"))])
+ (zenburn-theme . [(20260726 649) nil "A low contrast color theme for Emacs" tar ((:url . "https://github.com/bbatsov/zenburn-emacs") (:commit . "ae3c4d2db271c1a486f0dcb4f24a2bb80f24b67d") (:revdesc . "ae3c4d2db271") (:authors ("Bozhidar Batsov" . "bozhidar@batsov.com")) (:maintainers ("Bozhidar Batsov" . "bozhidar@batsov.com")) (:maintainer "Bozhidar Batsov" . "bozhidar@batsov.com"))])
+ (zencoding-mode . [(20140213 822) nil "Unfold CSS-selector-like expressions to markup" tar ((:url . "https://github.com/rooney/zencoding") (:commit . "58e42af182c98cb9941d27cd042d227fbf4e146c") (:revdesc . "58e42af182c9") (:keywords "convenience") (:authors ("Chris Done" . "chrisdone@gmail.com")) (:maintainers ("Chris Done" . "chrisdone@gmail.com")) (:maintainer "Chris Done" . "chrisdone@gmail.com"))])
+ (zenity-color-picker . [(20160302 1154) ((emacs (24 4))) "Insert and adjust colors using Zenity" tar ((:url . "https://bitbucket.org/Soft/zenity-color-picker.el") (:commit . "bdece51052ef7037e0a3481fc1f487939f57777e") (:revdesc . "bdece51052ef") (:keywords "colors") (:authors ("Samuel Laurén" . "samuel.lauren@iki.fi")) (:maintainers ("Samuel Laurén" . "samuel.lauren@iki.fi")) (:maintainer "Samuel Laurén" . "samuel.lauren@iki.fi"))])
+ (zeno-theme . [(20211205 2148) ((emacs (24))) "A dark theme using different shades of blue" tar ((:url . "https://github.com/jbharat/zeno-theme") (:commit . "70fa7b7442f24ea25eab538b5a22da690745fef5") (:revdesc . "70fa7b7442f2") (:keywords "faces" "theme" "dark" "blue") (:authors ("Bharat Joshi" . "jbharat@outlook.com")) (:maintainers ("Bharat Joshi" . "jbharat@outlook.com")) (:maintainer "Bharat Joshi" . "jbharat@outlook.com"))])
+ (zenscript-mode . [(20210102 1350) ((emacs (25 1))) "Major mode for ZenScript" tar ((:url . "https://github.com/eutropius225/zenscript-mode") (:commit . "c33b4525502459fe60dd76b383e19919d450aeb8") (:revdesc . "c33b45255024"))])
+ (zephir-mode . [(20200417 830) ((cl-lib (0 5)) (pkg-info (0 4)) (emacs (25 1))) "Major mode for editing Zephir code" tar ((:url . "https://github.com/zephir-lang/zephir-mode") (:commit . "4e9618b77dff67c1c7b6fff78605a62311db88b8") (:revdesc . "4e9618b77dff") (:keywords "languages") (:authors ("Serghei Iakovlev" . "egrep@protonmail.ch")) (:maintainers ("Serghei Iakovlev" . "egrep@protonmail.ch")) (:maintainer "Serghei Iakovlev" . "egrep@protonmail.ch"))])
+ (zero-input . [(20240527 728) ((emacs (24 4)) (s (1 2 0))) "Zero Chinese input method framework" tar ((:url . "https://gitlab.emacsos.com/sylecn/zero-el") (:commit . "e87bbf24c1475a784ad9d1ba8447e038824d796b") (:revdesc . "e87bbf24c147"))])
+ (zero-input-panel-posframe . [(20240526 1604) ((emacs (24 4)) (zero-input (2 9 0)) (posframe (1 4 3))) "Posframe based zero-input panel implementation" tar ((:url . "https://gitlab.emacsos.com/sylecn/zero-el") (:commit . "714102090ba87b75a06b87792df696f6f48c2ea8") (:revdesc . "714102090ba8"))])
+ (zerodark-theme . [(20211115 841) ((all-the-icons (2 0 0))) "A dark, medium contrast theme for Emacs" tar ((:url . "https://github.com/NicolasPetton/zerodark-theme") (:commit . "b463528704f6eb00684c0ee003fbd8e42901cde0") (:revdesc . "b463528704f6") (:keywords "themes") (:authors ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainers ("Nicolas Petton" . "nicolas@petton.fr")) (:maintainer "Nicolas Petton" . "nicolas@petton.fr"))])
+ (zetteldeft . [(20221006 731) ((emacs (25 1)) (deft (0 8)) (ace-window (0 7 0))) "Turn deft into a zettelkasten system" tar ((:url . "https://efls.github.io/zetteldeft/") (:commit . "63be6478751376f04d36c6ea52fe65acd69f0927") (:revdesc . "63be64787513") (:keywords "deft" "zettelkasten" "zetteldeft" "wp" "files") (:authors ("EFLS" . "EliasStorms")) (:maintainers ("EFLS" . "EliasStorms")) (:maintainer "EFLS" . "EliasStorms"))])
+ (zetteldesk . [(20250405 1601) ((emacs (27 1)) (org-roam (2 0))) "A revision and outlining tool for org-roam" tar ((:url . "https://github.com/Vidianos-Giannitsis/zetteldesk.el") (:commit . "0196835c5d6df65d46a4f642b716e6901ad0f4c1") (:revdesc . "0196835c5d6d") (:authors ("Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com")) (:maintainers ("Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com")) (:maintainer "Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com"))])
+ (zetteldesk-info . [(20250405 1601) ((zetteldesk (0 4)) (emacs (27 1))) "A zetteldesk extension for interacting with the info program" tar ((:url . "https://github.com/Vidianos-Giannitsis/zetteldesk-info.el") (:commit . "0196835c5d6df65d46a4f642b716e6901ad0f4c1") (:revdesc . "0196835c5d6d") (:authors ("Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com")) (:maintainers ("Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com")) (:maintainer "Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com"))])
+ (zetteldesk-kb . [(20250405 1601) ((zetteldesk (1 0 1)) (hydra (0 15)) (major-mode-hydra (0 2)) (emacs (24 1))) "Keybindings for zetteldesk.el" tar ((:url . "https://github.com/Vidianos-Giannitsis/zetteldesk-kb.el") (:commit . "0196835c5d6df65d46a4f642b716e6901ad0f4c1") (:revdesc . "0196835c5d6d") (:authors ("Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com")) (:maintainers ("Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com")) (:maintainer "Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com"))])
+ (zetteldesk-ref . [(20250405 1601) ((zetteldesk (1 0)) (bibtex-completion (1 0)) (emacs (26 1))) "A zetteldesk extension for interfacing with literature nodes" tar ((:url . "https://github.com/Vidianos-Giannitsis/zetteldesk-ref.el") (:commit . "0196835c5d6df65d46a4f642b716e6901ad0f4c1") (:revdesc . "0196835c5d6d") (:authors ("Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com")) (:maintainers ("Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com")) (:maintainer "Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com"))])
+ (zetteldesk-remark . [(20250405 1601) ((zetteldesk (1 0)) (org-remark (1 0)) (emacs (27 2))) "Org-Remark integration for zetteldesk.el" tar ((:url . "https://github.com/Vidianos-Giannitsis/zetteldesk-remark.el") (:commit . "0196835c5d6df65d46a4f642b716e6901ad0f4c1") (:revdesc . "0196835c5d6d") (:authors ("Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com")) (:maintainers ("Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com")) (:maintainer "Vidianos Giannitsis" . "vidianosgiannitsis@gmail.com"))])
+ (zettelkasten . [(20240517 1319) ((emacs (25 1)) (s (1 10 0))) "Helper functions to organise notes in a Zettelkasten style" tar ((:url . "https://github.com/ymherklotz/emacs-zettelkasten") (:commit . "6a33faf7b4231b03d056099a1aff40bbeee6e720") (:revdesc . "6a33faf7b423") (:keywords "files" "hypermedia" "notes") (:authors ("Yann Herklotz" . "yann@ymhg.org")) (:maintainers ("Yann Herklotz" . "yann@ymhg.org")) (:maintainer "Yann Herklotz" . "yann@ymhg.org"))])
+ (zetz-mode . [(20200823 536) ((emacs (25 1)) (dash (2 17 0)) (hydra (0 15 0))) "A major mode for the ZetZ programming language" tar ((:url . "https://github.com/damon-kwok/zetz-mode") (:commit . "04da33f4ffa9db5b3556f423276f4fd1db13ec67") (:revdesc . "04da33f4ffa9") (:keywords "languages" "programming") (:authors ("Damon Kwok" . "damon-kwok@outlook.com")) (:maintainers ("Damon Kwok" . "damon-kwok@outlook.com")) (:maintainer "Damon Kwok" . "damon-kwok@outlook.com"))])
+ (zig-mode . [(20251128 256) ((emacs (26 1)) (reformatter (0 6))) "A major mode for the Zig programming language" tar ((:url . "https://codeberg.org/ziglang/zig-mode") (:commit . "20e395f940afe1e19e965050b0284ec418d6a9d5") (:revdesc . "20e395f940af") (:keywords "zig" "languages") (:authors ("Andrea Orru" . "andreaorru1991@gmail.com") ("Andrew Kelley" . "superjoe30@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (zig-ts-mode . [(20260316 1026) ((emacs (29 1))) "Major mode for Zig code" tar ((:url . "https://codeberg.org/meow_king/zig-ts-mode") (:commit . "bb1e8287800868ee338e986bda5b5a1f5abf7445") (:revdesc . "bb1e82878008") (:keywords "zig" "languages" "tree-sitter") (:authors ("meowking" . "mr.meowking@tutamail.com")) (:maintainers ("meowking" . "mr.meowking@tutamail.com")) (:maintainer "meowking" . "mr.meowking@tutamail.com"))])
+ (ziggy-mode . [(20251017 527) ((emacs (29 1)) (reformatter (0 6))) "Major mode for Ziggy, a data serialization language" tar ((:url . "https://github.com/dcolazin/ziggy-mode") (:commit . "5b42008a022ae1d9221add6f57ce65715d7f9947") (:revdesc . "5b42008a022a") (:authors ("2024 Robbie Lyman" . "rb.lymn@gmail.com")) (:maintainers ("Davide Colazingari" . "dcolazin@gmail.com")) (:maintainer "Davide Colazingari" . "dcolazin@gmail.com"))])
+ (zim-wiki-mode . [(20250824 157) ((emacs (25 1)) (dokuwiki-mode (0 1 1)) (helm-projectile (0 14 0)) (link-hint (0 1)) (pretty-hydra (0 2 2))) "Zim Desktop Wiki edit mode" tar ((:url . "https://github.com/WillForan/zim-wiki-mode") (:commit . "d376b456b275975946e03a393ce16b122962195d") (:revdesc . "d376b456b275") (:keywords "outlines") (:authors ("Will Foran" . "willforan+zim-wiki-mode@gmail.com")) (:maintainers ("Will Foran" . "willforan+zim-wiki-mode@gmail.com")) (:maintainer "Will Foran" . "willforan+zim-wiki-mode@gmail.com"))])
+ (zimports . [(20211011 2059) ((emacs (26 1)) (projectile (2 1 0))) "Reformat python imports with zimports" tar ((:url . "https://github.com/schmir/zimports.el") (:commit . "76cf76bdc871cb0454a6fc555aeb1aa94f1b6e57") (:revdesc . "76cf76bdc871"))])
+ (zine-mode . [(20251022 2145) ((emacs (29 1)) (reformatter (0 6)) (markdown-mode (2 8 -3)) (ziggy-mode (0 0 2))) "Major mode for zine, the static site generator" tar ((:url . "https://github.com/dcolazin/zine-mode") (:commit . "e54a3bde1f8ea5ed00b91c7bf038329a9b0da174") (:revdesc . "e54a3bde1f8e") (:authors ("2024 Robbie Lyman" . "rb.lymn@gmail.com")) (:maintainers ("Davide Colazingari" . "dcolazin@gmail.com")) (:maintainer "Davide Colazingari" . "dcolazin@gmail.com"))])
+ (zk . [(20260708 2048) ((emacs (28 1))) "Functions for working with Zettelkasten-style linked notes" tar ((:url . "https://github.com/localauthor/zk") (:commit . "3ecb5ac3c56f8727c99458b6d3ad8e2c7df25348") (:revdesc . "3ecb5ac3c56f") (:authors ("Grant Rosson" . "https://github.com/localauthor")) (:maintainers ("Grant Rosson" . "https://github.com/localauthor")) (:maintainer "Grant Rosson" . "https://github.com/localauthor"))])
+ (zk-consult . [(20260704 2129) ((emacs (27 1)) (zk (0 4)) (consult (0 14))) "Consult integration for zk" tar ((:url . "https://github.com/localauthor/zk") (:commit . "ad82465a4a65fba7cff07da419455947507080cc") (:revdesc . "ad82465a4a65") (:authors ("Grant Rosson" . "https://github.com/localauthor")) (:maintainers ("Grant Rosson" . "https://github.com/localauthor")) (:maintainer "Grant Rosson" . "https://github.com/localauthor"))])
+ (zk-desktop . [(20260704 2129) ((emacs (27 1)) (zk (0 6)) (zk-index (0 9))) "Desktop environment for zk" tar ((:url . "https://github.com/localauthor/zk") (:commit . "ad82465a4a65fba7cff07da419455947507080cc") (:revdesc . "ad82465a4a65") (:authors ("Grant Rosson" . "https://github.com/localauthor")) (:maintainers ("Grant Rosson" . "https://github.com/localauthor")) (:maintainer "Grant Rosson" . "https://github.com/localauthor"))])
+ (zk-index . [(20260708 2048) ((emacs (28 1)) (zk (0 9))) "Index for zk" tar ((:url . "https://github.com/localauthor/zk") (:commit . "3ecb5ac3c56f8727c99458b6d3ad8e2c7df25348") (:revdesc . "3ecb5ac3c56f") (:authors ("Grant Rosson" . "https://github.com/localauthor")) (:maintainers ("Grant Rosson" . "https://github.com/localauthor")) (:maintainer "Grant Rosson" . "https://github.com/localauthor"))])
+ (zk-luhmann . [(20260705 1412) ((emacs (25 1)) (zk (0 7)) (zk-index (0 10))) "Support for Luhmann-style IDs in zk" tar ((:url . "https://github.com/localauthor/zk-luhmann") (:commit . "8b34138abc432a37642d7d60f1c2d043e07bb680") (:revdesc . "8b34138abc43") (:authors ("Grant Rosson" . "https://github.com/localauthor")) (:maintainers ("Grant Rosson" . "https://github.com/localauthor")) (:maintainer "Grant Rosson" . "https://github.com/localauthor"))])
+ (zlc . [(20151011 157) nil "Provides zsh like completion system to Emacs" tar ((:url . "https://github.com/mooz/emacs-zlc") (:commit . "4dd2ba267ecdeac845a7cbb3147294ee7daa25f4") (:revdesc . "4dd2ba267ecd") (:keywords "matching" "convenience") (:authors ("mooz" . "stillpedant@gmail.com")) (:maintainers ("mooz" . "stillpedant@gmail.com")) (:maintainer "mooz" . "stillpedant@gmail.com"))])
+ (zmq . [(20241006 1857) ((cl-lib (0 5)) (emacs (26))) "ZMQ bindings in Emacs-Lisp" tar ((:url . "https://github.com/nnicandro/emacs-zmq") (:commit . "fe856c43286674aa6770d95a81d915363f5df399") (:revdesc . "fe856c432866") (:keywords "comm") (:authors ("Nathaniel Nicandro" . "nathanielnicandro@gmail.com")) (:maintainers ("Nathaniel Nicandro" . "nathanielnicandro@gmail.com")) (:maintainer "Nathaniel Nicandro" . "nathanielnicandro@gmail.com"))])
+ (znc . [(20210803 159) ((cl-lib (0 2))) "ZNC + ERC" tar ((:url . "https://github.com/sshirokov/ZNC.el") (:commit . "2605f78e37a8a759067dc14fa25a82824ba1bacc") (:revdesc . "2605f78e37a8"))])
+ (zombie . [(20141222 1616) nil "Major mode for editing ZOMBIE programs" tar ((:url . "http://hins11.yu-yake.com/") (:commit . "ff8cd1b4cdbb4b0b9b8fd1ec8f6fb93eba249345") (:revdesc . "ff8cd1b4cdbb"))])
+ (zombie-trellys-mode . [(20150304 1702) ((emacs (24)) (cl-lib (0 5)) (haskell-mode (1 5))) "A minor mode for interaction with Zombie Trellys" tar ((:url . "https://github.com/david-christiansen/zombie-trellys-mode") (:commit . "9e99d444a387dd1634cab62ef802683f5bf5d907") (:revdesc . "9e99d444a387") (:keywords "languages") (:authors ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainers ("David Raymond Christiansen" . "david@davidchristiansen.dk")) (:maintainer "David Raymond Christiansen" . "david@davidchristiansen.dk"))])
+ (zone-nyan . [(20210508 1642) ((emacs (24 3)) (esxml (0 3 1))) "Zone out with nyan cat" tar ((:url . "https://depp.brause.cc/zone-nyan") (:commit . "38b6e9f1f5871e9166b00a1db44680caa56773be") (:revdesc . "38b6e9f1f587") (:keywords "games") (:authors ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (zone-rainbow . [(20160120 1334) ((emacs (24 3))) "Zone out with rainbow" tar ((:url . "https://github.com/kawabata/zone-rainbow") (:commit . "2ba4f1a87c69c4712124ebf12c1f3ea171e1af36") (:revdesc . "2ba4f1a87c69") (:keywords "games") (:authors ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (zone-select . [(20160118 1419) ((emacs (24 3)) (dash (2 8))) "Select zone programs" tar ((:url . "https://github.com/kawabata/zone-select") (:commit . "bf30da12f1625fe6563448fccf3c506acad10af7") (:revdesc . "bf30da12f162") (:keywords "games") (:authors ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (zone-sl . [(20160201 1210) ((emacs (24 3))) "Zone out with steam locomotives" tar ((:url . "https://github.com/kawabata/zone-sl") (:commit . "737b21b4b35c28a487ad8a31598e745bc183b209") (:revdesc . "737b21b4b35c") (:keywords "games") (:authors ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainers ("Taichi" . "kawabata.taichi_at_gmail.com")) (:maintainer "Taichi" . "kawabata.taichi_at_gmail.com"))])
+ (zone-tmux-clock . [(20230507 2043) ((emacs (24 3))) "Zone out with a tmux style clock" tar ((:url . "https://depp.brause.cc/zone-tmux-clock") (:commit . "f8158aad57730e1611a3994cf921037770753d72") (:revdesc . "f8158aad5773") (:keywords "games") (:authors ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainers ("Vasilij Schneidermann" . "mail@vasilij.de")) (:maintainer "Vasilij Schneidermann" . "mail@vasilij.de"))])
+ (zoom . [(20260509 908) ((emacs (24 4))) "Fixed and automatic balanced window layout" tar ((:url . "https://github.com/cyrus-and/zoom") (:commit . "5e524d98c7f2b4dd6ed41d95573b29b263632eb2") (:revdesc . "5e524d98c7f2") (:keywords "frames") (:authors ("Andrea Cardaci" . "cyrus.and@gmail.com")) (:maintainers ("Andrea Cardaci" . "cyrus.and@gmail.com")) (:maintainer "Andrea Cardaci" . "cyrus.and@gmail.com"))])
+ (zoom-window . [(20260103 1801) ((emacs (24 3))) "Zoom window like tmux" tar ((:url . "https://github.com/syohex/emacs-zoom-window") (:commit . "8a0ae04de53583949a58e0aa8e7f64f03be7c9f8") (:revdesc . "8a0ae04de535") (:authors ("Syohei YOSHIDA" . "syohex@gmail.com")) (:maintainers ("Jen-Chieh" . "jcs090218@gmail.com")) (:maintainer "Jen-Chieh" . "jcs090218@gmail.com"))])
+ (zop-to-char . [(20260105 452) ((cl-lib (0 5))) "A replacement of zap-to-char" tar ((:url . "https://github.com/thierryvolpiatto/zop-to-char") (:commit . "09885546aa2ee8b78953f54fd14f23f834cf2dfd") (:revdesc . "09885546aa2e") (:authors ("Thierry Volpiatto" . "thierry.volpiatto@gmail.com")) (:maintainers ("Thierry Volpiatto" . "thierry.volpiatto@gmail.com")) (:maintainer "Thierry Volpiatto" . "thierry.volpiatto@gmail.com"))])
+ (zotelo . [(20160602 949) ((cl-lib (0 5))) "Manage Zotero collections from emacs" tar ((:url . "https://github.com/vitoshka/zotelo") (:commit . "d9dc089b9adfcc70a63f2a84269a12eb7cb4c748") (:revdesc . "d9dc089b9adf") (:keywords "zotero" "emacs" "reftex" "bibtex" "mozrepl" "bibliography manager"))])
+ (zotero . [(20240112 2111) ((emacs (27 1)) (ht (2 2)) (oauth (1 11)) (s (1 12 0))) "Library for the Zotero API" tar ((:url . "https://gitlab.com/fvdbeek/emacs-zotero") (:commit . "eef5080e6a2ed0cae12c3d21580864f4b394cd5f") (:revdesc . "eef5080e6a2e") (:keywords "zotero" "hypermedia") (:authors ("Folkert van der Beek" . "folkertvanderbeek@gmail.com")) (:maintainers ("Folkert van der Beek" . "folkertvanderbeek@gmail.com")) (:maintainer "Folkert van der Beek" . "folkertvanderbeek@gmail.com"))])
+ (zotra . [(20231014 2139) ((emacs (27 1))) "Import bibliographic data from (almost) everywhere" tar ((:url . "https://github.com/mpedramfar/zotra") (:commit . "fe9093b226a1678fc6c2fadd31a09d5a22ecdcf1") (:revdesc . "fe9093b226a1") (:authors ("Mohammad Pedramfar" . "https://github.com/mpedramfar")) (:maintainers ("Mohammad Pedramfar" . "https://github.com/mpedramfar")) (:maintainer "Mohammad Pedramfar" . "https://github.com/mpedramfar"))])
+ (zotxt . [(20250820 438) ((emacs (24 3)) (deferred (0 5 1)) (request (0 3 2))) "Interface emacs with Zotero via the zotxt extension" tar ((:url . "https://gitlab.com/egh/zotxt-emacs") (:commit . "b433f46b518574d5fe25f38c9c3afed542122d8b") (:revdesc . "b433f46b5185") (:keywords "bib") (:authors ("Erik Hetzner" . "egh@e6h.org")) (:maintainers ("Erik Hetzner" . "egh@e6h.org")) (:maintainer "Erik Hetzner" . "egh@e6h.org"))])
+ (zoutline . [(20220102 835) nil "Simple outline library" tar ((:url . "https://github.com/abo-abo/zoutline") (:commit . "32857c6c4b9b0bcbed14d825a10b91a98d5fed0a") (:revdesc . "32857c6c4b9b") (:keywords "outline") (:authors ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainers ("Oleh Krehel" . "ohwoeowho@gmail.com")) (:maintainer "Oleh Krehel" . "ohwoeowho@gmail.com"))])
+ (zoxide . [(20241003 1103) ((emacs (25 1))) "Find file by zoxide" tar ((:url . "https://gitlab.com/Vonfry/zoxide.el") (:commit . "6de851de46db51253350edd67f329dbc0587b97c") (:revdesc . "6de851de46db") (:keywords "converience" "matching") (:authors ("Ruoyu Feng" . "emacs@vonfry.name")) (:maintainers ("Ruoyu Feng" . "emacs@vonfry.name")) (:maintainer "Ruoyu Feng" . "emacs@vonfry.name"))])
+ (zpl-mode . [(20180906 1059) ((emacs (24 3))) "ZIMPL major mode" tar ((:url . "https://github.com/ax487/zpl-mode.git") (:commit . "35e7e23c6baf31b5e65dd7405c8ab9b13c70637e") (:revdesc . "35e7e23c6baf"))])
+ (zpresent . [(20201207 732) ((emacs (25 1)) (org-parser (0 4)) (dash (2 12 0)) (request (0 3 0))) "Simple presentation mode based on org files" tar ((:url . "https://hg.sr.ht/~zck/zpresent") (:commit . "341d1a4a91a8acff5be6b81f95695e17c79c5309") (:revdesc . "341d1a4a91a8") (:keywords "comm"))])
+ (zprint-mode . [(20240619 1639) ((emacs (24 3))) "Reformat Clojure(Script) code using zprint" tar ((:url . "https://github.com/pesterhazy/zprint-mode.el") (:commit . "ac3b25e250c83aedc49d1eab508142e3060e3833") (:revdesc . "ac3b25e250c8") (:keywords "tools") (:authors ("Paulus Esterhazy" . "(pesterhazy@gmail.com)")) (:maintainers ("Paulus Esterhazy" . "(pesterhazy@gmail.com)")) (:maintainer "Paulus Esterhazy" . "(pesterhazy@gmail.com)"))])
+ (ztree . [(20260726 2324) ((cl-lib (0))) "Text mode directory tree" tar ((:url . "https://github.com/fourier/ztree") (:commit . "48f17807ac6c765a66cf29b2fcdd08f1aa7da7d6") (:revdesc . "48f17807ac6c") (:keywords "files" "tools") (:authors ("Alexey Veretennikov" . "alexey.veretennikov@gmail.com")) (:maintainers ("Alexey Veretennikov" . "alexey.veretennikov@gmail.com")) (:maintainer "Alexey Veretennikov" . "alexey.veretennikov@gmail.com"))])
+ (zygospore . [(20140703 852) nil "Reversible C-x 1 (delete-other-windows)" tar ((:url . "https://github.com/louiskottmann/zygospore.el") (:commit . "1af5ee663f5a7aa08d96a77cacff834dcdf55ea8") (:revdesc . "1af5ee663f5a") (:authors ("Louis Kottmann" . "louis.kottmann@gmail.com")) (:maintainers ("Louis Kottmann" . "louis.kottmann@gmail.com")) (:maintainer "Louis Kottmann" . "louis.kottmann@gmail.com"))])
+ (zzz-to-char . [(20260802 944) ((emacs (24 4)) (avy (0 3 0))) "Fancy version of `zap-to-char' command" tar ((:url . "https://github.com/mrkkrp/zzz-to-char") (:commit . "876cdbf60b53153bb73cabb876ab141e274b5482") (:revdesc . "876cdbf60b53") (:keywords "convenience") (:authors ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainers ("Mark Karpov" . "markkarpov92@gmail.com")) (:maintainer "Mark Karpov" . "markkarpov92@gmail.com"))]))
diff --git a/emacs/.emacs.d/elpa/archives/org/archive-contents b/emacs/.emacs.d/elpa/archives/org/archive-contents
new file mode 100644
index 0000000..252a4cb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/archives/org/archive-contents
@@ -0,0 +1,2 @@
+(1 (org              . [(20210929) ( ) "Outline-based notes management and organizer" tar])
+   (org-plus-contrib . [(20210929) ( ) "Outline-based notes management and organizer" tar]))
diff --git a/emacs/.emacs.d/elpa/closql-20260601.1540/closql-autoloads.el b/emacs/.emacs.d/elpa/closql-20260601.1540/closql-autoloads.el
new file mode 100644
index 0000000..b458de9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/closql-20260601.1540/closql-autoloads.el
@@ -0,0 +1,28 @@
+;;; closql-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from closql.el
+
+(register-definition-prefixes "closql" '("closql-" "eieio-"))
+
+;;; End of scraped data
+
+(provide 'closql-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; closql-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/closql-20260601.1540/closql-pkg.el b/emacs/.emacs.d/elpa/closql-20260601.1540/closql-pkg.el
new file mode 100644
index 0000000..c619cd0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/closql-20260601.1540/closql-pkg.el
@@ -0,0 +1,14 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "closql" "20260601.1540"
+  "Store EIEIO objects using EmacSQL."
+  '((emacs    "28.1")
+    (compat   "31.0")
+    (cond-let "1.1")
+    (emacsql  "4.4")
+    (llama    "1.0"))
+  :url "https://github.com/emacscollective/closql"
+  :commit "d382e7427f5d375ffc872851b049e9f9c4a43dfc"
+  :revdesc "d382e7427f5d"
+  :keywords '("extensions")
+  :authors '(("Jonas Bernoulli" . "emacs.closql@jonas.bernoulli.dev"))
+  :maintainers '(("Jonas Bernoulli" . "emacs.closql@jonas.bernoulli.dev")))
diff --git a/emacs/.emacs.d/elpa/closql-20260601.1540/closql.el b/emacs/.emacs.d/elpa/closql-20260601.1540/closql.el
new file mode 100644
index 0000000..b99a2c0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/closql-20260601.1540/closql.el
@@ -0,0 +1,658 @@
+;;; closql.el --- Store EIEIO objects using EmacSQL  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2016-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.closql@jonas.bernoulli.dev>
+;; Homepage: https://github.com/emacscollective/closql
+;; Keywords: extensions
+
+;; Package-Version: 20260601.1540
+;; Package-Revision: d382e7427f5d
+;; Package-Requires: (
+;;     (emacs   "28.1")
+;;     (compat  "31.0")
+;;     (cond-let "1.1")
+;;     (emacsql  "4.4")
+;;     (llama    "1.0"))
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Store uniform EIEIO objects in an EmacSQL database.  SQLite is used
+;; as backend.  This library imposes some restrictions on what kind of
+;; objects can be stored; it isn't intended to store arbitrary objects.
+;; All objects have to share a common superclass and subclasses cannot
+;; add any additional instance slots.
+
+;;; Code:
+
+(require 'compat)
+(require 'cond-let)
+(require 'eieio)
+(require 'eieio-base)
+(require 'emacsql)
+(require 'emacsql-sqlite)
+(require 'llama)
+
+(eval-when-compile (require 'subr-x))
+
+(eval-when-compile
+  (cl-pushnew 'connection eieio--known-slot-names))
+
+(defmacro closql-with-transaction (db &rest body)
+  (declare (indent 1))
+  `(emacsql-with-transaction (oref ,db connection)
+     ,@body))
+
+;;; Objects
+
+(defclass closql-object ()
+  ((closql-class-prefix  :initform nil :allocation :class)
+   (closql-class-suffix  :initform nil :allocation :class)
+   (closql-table         :initform nil :allocation :class)
+   (closql-primary-key   :initform nil :allocation :class)
+   (closql-foreign-key   :initform nil :allocation :class)
+   (closql-order-by      :initform nil :allocation :class)
+   (closql-database      :initform nil :initarg :closql-database))
+  :abstract t)
+
+(defun closql--closql-object-p (obj)
+  ;; Prevent a recursive load when the class object is autoloaded.
+  ;; See c1a9b816ec.  Don't #'quote; doesn't exist in older releases.
+  (cl-letf (((symbol-function 'eieio--full-class-object)
+             #'eieio--class-object))
+    (closql-object--eieio-childp obj)))
+
+;;;; Oref
+
+(define-advice eieio-oref (:around (fn obj slot) closql-object)
+  "If OBJ is a `closql-object', delegate to `closql-oref'."
+  (if (closql--closql-object-p obj)
+      (closql-oref obj slot)
+    (funcall fn obj slot)))
+
+(defun closql--oref (obj slot)
+  (aref obj (eieio--slot-name-index (eieio--object-class obj) slot)))
+
+(defun closql--oref-default (class slot)
+  (let ((class (if (symbolp class)
+                   (cl--find-class class)
+                 (eieio--object-class class))))
+    (aref (eieio--class-class-allocation-values class)
+          (eieio--class-slot-name-index class slot))))
+
+(defun closql-oref (obj slot)
+  (cl-check-type slot symbol)
+  (let ((class (eieio--object-class obj)))
+    (cond-let
+      ([c (eieio--slot-name-index class slot)]
+       (let ((value (aref obj c)))
+         (if (eq value eieio--unbound)
+             (closql-dref obj slot)
+           value)))
+      ([c (eieio--class-slot-name-index class slot)]
+       (aref (eieio--class-class-allocation-values class) c))
+      ((slot-missing obj slot 'oref)))))
+
+(cl-defgeneric closql-dref (obj slot)
+  (let ((c (eieio--slot-name-index (eieio--object-class obj) slot))
+        (db (closql--oref obj 'closql-database))
+        (props (closql--slot-properties obj slot)))
+    (cond-let
+      ([class (alist-get :closql-class props)]
+       (aset obj c
+             (closql--remake-instances class db
+               (emacsql
+                db `[:select * :from $i1
+                     :where (= $i2 $s3)
+                     :order-by ,(or (closql--oref-default class 'closql-order-by)
+                                    [(asc $i4)])]
+                (closql--oref-default class 'closql-table)
+                (closql--oref-default class 'closql-foreign-key)
+                (closql--oref obj (closql--oref-default obj 'closql-primary-key))
+                (closql--oref-default class 'closql-primary-key)))))
+      ([table (alist-get :closql-table props)]
+       (let ((columns (closql--table-columns db table)))
+         (aset obj c
+               (mapcar
+                (if (length= columns 2) #'cadr #'cdr)
+                (emacsql
+                 db [:select * :from $i1
+                     :where (= $i2 $s3)
+                     :order-by [(asc $i4)]]
+                 table
+                 (car columns)
+                 (closql--oref obj (closql--oref-default obj 'closql-primary-key))
+                 (cadr columns))))))
+      ([tables (alist-get :closql-tables props)]
+       (pcase-let ((`(,slot-table ,data-table) tables))
+         (aset obj c
+               (mapcar
+                #'cdr
+                (emacsql
+                 db [:select $i1 :from $i2
+                     :join $i3 :on (= $i4 $i5)
+                     :where (= $i6 $s7)
+                     :order-by [(asc id)]]
+                 (intern (format "%s:*" data-table))
+                 data-table slot-table
+                 (intern (format "%s:id" slot-table))
+                 (intern (format "%s:id" data-table))
+                 (intern (format "%s:%s" slot-table
+                                 (closql--oref-default obj 'closql-table)))
+                 (closql--oref obj (closql--oref-default obj 'closql-primary-key))
+                 (closql--oref obj 'id))))))
+      ((slot-unbound obj (eieio--object-class obj) slot 'oref)))))
+
+;;;; Oset
+
+(define-advice eieio-oset (:around (fn obj slot value) closql-object)
+  "If OBJ is a `closql-object', delegate to `closql-oset'."
+  (if (closql--closql-object-p obj)
+      (closql-oset obj slot value)
+    (funcall fn obj slot value)))
+
+(defun closql--oset (obj slot value)
+  (aset obj (eieio--slot-name-index (eieio--object-class obj) slot) value))
+
+(defun closql-oset (obj slot value)
+  (cl-check-type slot symbol)
+  (let ((class (eieio--object-class obj)))
+    (cond-let
+      ([c (eieio--slot-name-index class slot)]
+       (eieio--validate-slot-value class c value slot)
+       (when (and (not (eq slot 'closql-database))
+                  (closql--oref obj 'closql-database))
+         (closql-dset obj slot value))
+       (aset obj c value))
+      ([c (eieio--class-slot-name-index class slot)]
+       (eieio--validate-class-slot-value class c value slot)
+       (aset (eieio--class-class-allocation-values class) c value))
+      ((slot-missing obj slot 'oset value)))))
+
+(cl-defgeneric closql-dset (obj slot value &optional drop-unknown)
+  (let* ((db    (closql--oref obj 'closql-database))
+         (key   (oref-default obj closql-primary-key))
+         (id    (closql--oref obj key))
+         (props (closql--slot-properties obj slot)))
+    (cond-let
+      ((alist-get :closql-class props)
+       (error "Not implemented for closql-class slots: oset"))
+      [[tables (alist-get :closql-tables props)]]
+      ([table (or (alist-get :closql-table props)
+                  (car tables))]
+       (closql-with-transaction db
+         (let ((columns (closql--table-columns db table)))
+           ;; Caller might have modified value in place.
+           (closql--oset obj slot eieio--unbound)
+           (let ((list1 (closql-oref obj slot))
+                 (list2 value)
+                 elt1 elt2)
+             (cond (tables
+                    (setq list1 (mapcar (##list (car %)) list1))
+                    (setq list2 (mapcar (if (atom (car list2))
+                                            #'list
+                                          (##list (car %)))
+                                        list2)))
+                   ((length= columns 2)
+                    (setq list1 (mapcar #'list list1))
+                    (setq list2 (mapcar #'list list2))))
+             ;; `list2' may not be sorted at all and `list1' has to
+             ;; be sorted because Elisp and SQLite sort differently.
+             (setq list1 (compat-call sort list1 :lessp #'string< :key #'car))
+             (setq list2 (compat-call sort list2 :lessp #'string< :key #'car))
+             (while (progn (setq elt1 (car list1))
+                           (setq elt2 (car list2))
+                           (or elt1 elt2))
+               (let ((key1 (car elt1))
+                     (key2 (car elt2)))
+                 (cond
+                   ((and elt1 (or (not elt2) (string< key1 key2)))
+                    (apply #'emacsql db
+                           `[:delete-from $i1
+                             :where ,(closql--where-equal (cons id elt1) 1)]
+                           table
+                           (cl-mapcan #'list columns (cons id elt1)))
+                    (pop list1))
+                   ((string= key1 key2)
+                    (unless (equal elt1 elt2)
+                      (cl-mapc
+                       (lambda (col val1 val2)
+                         (unless (equal val1 val2)
+                           (emacsql db [:update $i1 :set (= $i2 $s3)
+                                        :where (and (= $i4 $s5) (= $i6 $s7))]
+                                    table col val2
+                                    (car  columns) id
+                                    (cadr columns) key2)))
+                       (cddr columns)
+                       (cdr  elt1)
+                       (cdr  elt2)))
+                    (pop list1)
+                    (pop list2))
+                   (drop-unknown
+                    (ignore-errors
+                      (emacsql db [:insert-into $i1 :values $v2]
+                               table (vconcat (cons id elt2))))
+                    (pop list2))
+                   (t
+                    (emacsql db [:insert-into $i1 :values $v2]
+                             table (vconcat (cons id elt2)))
+                    (pop list2)))))))))
+      ((emacsql db [:update $i1 :set (= $i2 $s3) :where (= $i4 $s5)]
+                (oref-default obj closql-table)
+                slot
+                (if (eq value eieio--unbound) 'eieio-unbound value)
+                key id)))))
+
+;;;; Slot Properties
+
+(defun closql--slot-properties (object-or-class slot)
+  (and-let ((desc (cl-find slot
+                           (closql--object-slots object-or-class)
+                           :key #'cl--slot-descriptor-name)))
+    (cl--slot-descriptor-props desc)))
+
+(defun closql--object-slots (object-or-class)
+  (eieio-class-slots
+   (cond
+     ((eieio-object-p object-or-class) (eieio--object-class object-or-class))
+     ((eieio--class-p object-or-class) object-or-class)
+     ((find-class object-or-class 'error)))))
+
+(defconst closql--slot-properties '(:closql-class :closql-table :closql-tables))
+
+(define-advice eieio-defclass-internal
+    (:after (cname _superclasses slots _options) closql-object)
+  "Handle additional slot properties used by `closql-object' derived classes."
+  (when-let* ((class (cl--find-class cname))
+              (_(child-of-class-p class 'closql-object)))
+    (pcase-dolist (`(,name . ,slot) slots)
+      (let ((desc (cl-find name
+                           (cl-coerce (eieio--class-slots class) 'list)
+                           :key (lambda (elt) (aref elt 1)))))
+        (dolist (prop closql--slot-properties)
+          (when-let
+              ((v (plist-get slot prop)))
+            (setf (alist-get prop (cl--slot-descriptor-props desc)) v)))))))
+
+(define-advice eieio--slot-override
+    (:after (old new _skipnil) closql-object)
+  "Handle additional slot properties used by `closql-object' derived classes."
+  (dolist (prop closql--slot-properties)
+    (when-let
+        ((v (alist-get prop (cl--slot-descriptor-props new))))
+      (setf (alist-get prop (cl--slot-descriptor-props old)) v))))
+
+;;; Database
+
+(defclass closql-database (eieio-singleton)
+  ((name         :initform nil :allocation :class)
+   (object-class :initform nil :allocation :class)
+   (file         :initform nil :allocation :class)
+   (schemata     :initform nil :allocation :class)
+   (version      :initform nil :allocation :class)
+   (disabled     :initform nil :allocation :class)
+   (connection   :initform nil :initarg :connection))
+  :abstract t)
+
+(cl-defmethod closql-db ((class (subclass closql-database))
+                         &optional livep connection-class)
+  (cond-let*
+    ([db (oref-default class singleton)]
+     [conn (and (not (eq db eieio--unbound))
+                (oref db connection))]
+     [_(emacsql-live-p conn)]
+     db)
+    ((not livep)
+     (let* ((file (closql--db-prepare-storage class))
+            (connection-class (or connection-class
+                                  (emacsql-sqlite-default-connection)))
+            (conn (make-instance connection-class :file file))
+            (db (make-instance class))) ; ignores slot arguments
+       (oset db connection conn)
+       (emacsql conn [:pragma (= foreign-keys on)])
+       (cond-let
+         ((not (emacsql-sqlite-list-tables db))
+          (closql--db-create-schema db))
+         [[code-version (oref-default db version)]
+          [data-version (closql--db-get-version db)]]
+         ((< code-version data-version)
+          (message "Please update %s package (database schema version %s < %s)"
+                   (oref-default db name) code-version data-version)
+          (oset-default class disabled t)
+          (emacsql-close db)
+          (setq db nil))
+         ((closql--db-update-schema db)))
+       db))))
+
+(cl-defmethod closql--db-prepare-storage ((class (subclass closql-database)))
+  (when-let ((file (oref-default class file)))
+    (when (symbolp file)
+      (setq file (symbol-value file)))
+    (make-directory (file-name-directory file) t)
+    file))
+
+(cl-defmethod closql--db-create-schema ((db closql-database))
+  (closql-with-transaction db
+    (pcase-dolist (`(,table . ,schema)
+                   (symbol-value (oref-default db schemata)))
+      (emacsql db [:create-table $i1 $S2] table schema))
+    (closql--db-set-version db (oref-default db version))))
+
+(cl-defmethod closql--db-update-schema ((db closql-database))
+  (let ((code-version (oref-default db version))
+        (data-version (closql--db-get-version db)))
+    (when (< data-version code-version)
+      (oset-default db disabled t)
+      (emacsql-close db)
+      (error "Please update %s database (schema version %s < %s)"
+             (oref-default db name) data-version code-version))))
+
+(cl-defmethod emacsql-live-p ((db closql-database))
+  (and-let ((conn (oref db connection)))
+    (emacsql-live-p conn)))
+
+(cl-defmethod emacsql-enable-debugging ((db closql-database))
+  (emacsql-enable-debugging (oref db connection)))
+
+(cl-defmethod emacsql-close ((db closql-database))
+  (emacsql-close (oref db connection))
+  (oset db connection nil))
+
+(cl-defmethod emacsql ((db closql-database) sql &rest args)
+  (mapcar #'closql--extern-unbound
+          (apply #'emacsql (oref db connection) sql
+                 (mapcar (lambda (arg)
+                           (if (stringp arg)
+                               (let ((copy (copy-sequence arg)))
+                                 (set-text-properties 0 (length copy) nil copy)
+                                 copy)
+                             arg))
+                         args))))
+
+(cl-defmethod closql-insert ((db closql-database) obj &optional replace)
+  (closql--oset obj 'closql-database db)
+  (let (alist)
+    (dolist (slot (eieio-class-slots (eieio--object-class obj)))
+      (setq  slot (cl--slot-descriptor-name slot))
+      (when (alist-get :closql-table (closql--slot-properties obj slot))
+        (push (cons slot (closql-oref obj slot)) alist)
+        (closql--oset obj slot eieio--unbound)))
+    (closql-with-transaction db
+      (emacsql db
+               (if replace
+                   [:insert-or-replace-into $i1 :values $v2]
+                 [:insert-into $i1 :values $v2])
+               (oref-default obj closql-table)
+               (pcase-let ((`(,class ,_db . ,values)
+                            (closql--intern-unbound
+                             (closql--coerce obj 'list))))
+                 (vconcat (cons (closql--abbrev-class class) values))))
+      (pcase-dolist (`(,slot . ,value) alist)
+        (closql-dset obj slot value))))
+  obj)
+
+(cl-defmethod closql-delete ((obj closql-object))
+  (let ((key (oref-default obj closql-primary-key)))
+    (emacsql (closql--oref obj 'closql-database)
+             [:delete-from $i1 :where (= $i2 $s3)]
+             (oref-default obj closql-table)
+             key
+             (closql--oref obj key))))
+
+(cl-defmethod closql-reload ((obj closql-object))
+  (or (closql-get (closql--oref obj 'closql-database)
+                  (closql--oref obj (oref-default obj closql-primary-key))
+                  (eieio-object-class obj))
+      (error "Cannot reload object")))
+
+(cl-defmethod closql-get ((db closql-database) ident &optional class resolve)
+  (unless class
+    (setq class (oref-default db object-class)))
+  (and-let ((row (car (emacsql db [:select * :from $i1
+                                   :where (= $i2 $s3)]
+                               (oref-default class closql-table)
+                               (oref-default class closql-primary-key)
+                               ident))))
+    (closql--remake-instance class db row resolve)))
+
+(cl-defmethod closql-query ((db closql-database) &optional select pred class)
+  (if select
+      (let ((value (closql-select db select pred class)))
+        (if (and select (symbolp select))
+            (mapcar #'car value)
+          value))
+    (closql-entries db pred class)))
+
+(cl-defmethod closql-entries ((db closql-database) &optional pred class)
+  (unless class
+    (setq class (oref-default db object-class)))
+  (mapcar (lambda (row)
+            (closql--remake-instance class db row))
+          (closql-select db '* pred class)))
+
+(cl-defmethod closql-select ((db closql-database) select &optional pred class)
+  (unless class
+    (setq class (oref-default db object-class)))
+  (emacsql db
+           `[:select $i1 :from $i2
+             ,@(and pred [:where class :in $v3])
+             ,@(if-let ((order (oref-default class closql-order-by)))
+                   (list :order-by order)
+                 '(:order-by [(asc $i4)]))]
+           select
+           (oref-default class closql-table)
+           (and pred (closql-where-class-in pred db))
+           (oref-default class closql-primary-key)))
+
+(defun closql--table-columns (db table)
+  (mapcar #'cadr (emacsql db [:pragma (funcall table-info $i1)] table)))
+
+(defun closql--db-get-version (db)
+  (caar (emacsql db [:pragma user-version])))
+
+(defun closql--db-set-version (db version)
+  (cl-assert (integerp version))
+  (emacsql db [:pragma (= user-version $s1)] version))
+
+;;; Object/Row Conversion
+
+(cl-defmethod closql--remake-instance ((class (subclass closql-object))
+                                       db row &optional resolve)
+  (pcase-let*
+      ((`(,abbrev . ,values) (closql--extern-unbound row))
+       (class-sym (closql--expand-abbrev class abbrev))
+       (class-obj (eieio--class-object class-sym))
+       (obj (copy-sequence (eieio--class-default-object-cache class-obj)))
+       (values (apply #'vector (cons db values))))
+    (dotimes (i (length (eieio--class-slots class-obj)))
+      (aset obj (1+ i) (aref values i)))
+    (when resolve
+      (closql--resolve-slots obj))
+    (when eieio-backward-compatibility
+      (aset obj 0 class-sym))
+    obj))
+
+(defun closql--remake-instances (class db rows)
+  (declare (indent defun))
+  (mapcar (lambda (row)
+            (closql--remake-instance class db row))
+          rows))
+
+(cl-defmethod closql--resolve-slots ((obj closql-object))
+  (dolist (slot (eieio-class-slots (eieio--object-class obj)))
+    (setq  slot (cl--slot-descriptor-name slot))
+    (when (and (not (slot-boundp obj slot))
+               (let ((props (closql--slot-properties obj slot)))
+                 (or (alist-get :closql-class props)
+                     (alist-get :closql-table props))))
+      (closql--oset obj slot (closql-oref obj slot)))))
+
+(defun closql--intern-unbound (row)
+  (mapcar (lambda (elt)
+            (if (eq elt eieio--unbound) 'eieio-unbound elt))
+          row))
+
+(defun closql--extern-unbound (row)
+  (mapcar (lambda (elt)
+            (if (eq elt 'eieio-unbound) eieio--unbound elt))
+          row))
+
+(defun closql--coerce (object type)
+  (cl-coerce (let* ((length (length object))
+                    (vector (make-vector length -1)))
+               (dotimes (i length)
+                 (aset vector i (aref object i)))
+               ;; Do not assume eieio-backward-compatibility is enabled.
+               (when (eieio--class-p (aref vector 0))
+                 (aset vector 0 (eieio--class-name (aref vector 0))))
+               vector)
+             type))
+
+(cl-defmethod closql--abbrev-class ((class (subclass closql-object)))
+  (let ((name (symbol-name class))
+        (prefix (oref-default class closql-class-prefix))
+        (suffix (oref-default class closql-class-suffix)))
+    (intern (substring name
+                       (if prefix    (length prefix)    0)
+                       (if suffix (- (length suffix)) nil)))))
+
+(cl-defmethod closql--expand-abbrev ((class (subclass closql-object)) abbrev)
+  (intern (concat (oref-default class closql-class-prefix)
+                  (symbol-name abbrev)
+                  (oref-default class closql-class-suffix))))
+
+(defun closql--where-equal (value offset)
+  (vector
+   (cons 'and
+         (mapcar (lambda (v)
+                   (if v
+                       (list '=
+                             (intern (format "$i%i" (incf offset)))
+                             (intern (format "$s%i" (incf offset))))
+                     (list 'isnull
+                           (intern (format "$i%i" (1- (incf offset 2)))))))
+                 value))))
+
+(defun closql-where-class-in (args &optional db)
+  (when (symbolp args)
+    (setq args (list args)))
+  (cond
+    ((vectorp args)
+     (unless db
+       (error "closql-where-class-in: DB cannot be nil if ARGS is a vector"))
+     (let ((class (oref-default db object-class))
+           (abbrevs nil))
+       (mapc (lambda (arg)
+               (let ((str (symbol-name arg)))
+                 (unless (string-match "\\`\\(!\\)?\\([^*]+\\)\\(\\*\\)?\\'" str)
+                   (error "`closql-where-class-in': invalid type: %s" arg))
+                 (let* ((exclude (match-beginning 1))
+                        (a (intern (match-string 2 str)))
+                        (a (cond ((match-beginning 3)
+                                  (closql--list-subabbrevs
+                                   (closql--expand-abbrev class a)))
+                                 ((not (class-abstract-p
+                                        (closql--expand-abbrev class a)))
+                                  (list a)))))
+                   (setq abbrevs
+                         (if exclude
+                             (cl-set-difference abbrevs a)
+                           (nconc abbrevs a))))))
+             args)
+       (vconcat abbrevs)))
+    ((vconcat
+      (mapcar #'closql--abbrev-class
+              (mapcan (lambda (sym)
+                        (let ((str (symbol-name sym)))
+                          (cond ((string-suffix-p "--eieio-childp" str)
+                                 (closql--list-subclasses
+                                  (intern (substring str 0 -14)) nil))
+                                ((string-suffix-p "-p" str)
+                                 (list (intern (substring str 0 -2))))
+                                ((list sym)))))
+                      args))))))
+
+(defun closql--list-subclasses (class &optional result)
+  (unless (class-abstract-p class)
+    (cl-pushnew class result))
+  (dolist (child (eieio--class-children (cl--find-class class)))
+    (setq result (closql--list-subclasses child result)))
+  result)
+
+(cl-defmethod closql--list-subabbrevs ((class (subclass closql-object))
+                                       &optional wildcards)
+  (sort (named-let types ((class class))
+          (let ((children (eieio--class-children (cl--find-class class)))
+                ;; An abstract base-class may violate its own naming rules.
+                (abbrev (ignore-errors (closql--abbrev-class class))))
+            (nconc (and (not (class-abstract-p class)) (list abbrev))
+                   (and wildcards children
+                        (list (if abbrev (intern (format "%s*" abbrev)) '*)))
+                   (mapcan #'types children))))
+        #'string<))
+
+(cl-defmethod closql--set-object-class ((db closql-database) obj class)
+  (let* ((table (oref-default obj closql-table))
+         (key   (oref-default obj closql-primary-key))
+         (id    (closql--oref obj key)))
+    (aset obj 0
+          (aref (copy-sequence
+                 (eieio--class-default-object-cache
+                  (eieio--class-object class)))
+                0))
+    (emacsql db [:update $i1 :set (= class $s2) :where (= $i3 $s4)]
+             table
+             (closql--abbrev-class class)
+             key id)))
+
+;;; Utilities
+
+(defun closql-format (object string &rest slots)
+  "Format a string out of a format STRING and an OBJECT's SLOTS.
+
+STRING is a format-string like for `format'.  OBJECT is an Eieio
+object and SLOTS are slots of that object, their values are used
+like `format' uses its OBJECTS arguments (which are unrelated to
+this function's OBJECT argument, they just have similar names).
+
+While this function does not have much to do with the purpose of
+`closql', it is being defined here anyway because Eieio does not
+define a similar function under a more appropriate name such as
+`eieio-format'."
+  (apply #'format string
+         (mapcar (lambda (slot) (eieio-oref object slot)) slots)))
+
+;;; _
+(provide 'closql)
+;; Local Variables:
+;; indent-tabs-mode: nil
+;; lisp-indent-local-overrides: ((cond . 0) (interactive . 0))
+;; read-symbol-shorthands: (
+;;   ("and$"       . "cond-let--and$")
+;;   ("thread$"    . "cond-let--thread$")
+;;   ("when$"      . "cond-let--when$")
+;;   ("and-let*"   . "cond-let--and-let*")
+;;   ("and-let"    . "cond-let--and-let")
+;;   ("if-let*"    . "cond-let--if-let*")
+;;   ("if-let"     . "cond-let--if-let")
+;;   ("when-let*"  . "cond-let--when-let*")
+;;   ("when-let"   . "cond-let--when-let")
+;;   ("while-let*" . "cond-let--while-let*")
+;;   ("while-let"  . "cond-let--while-let"))
+;; End:
+;;; closql.el ends here
diff --git a/emacs/.emacs.d/elpa/closql-20260601.1540/closql.elc b/emacs/.emacs.d/elpa/closql-20260601.1540/closql.elc
new file mode 100644
index 0000000..61337ff
Binary files /dev/null and b/emacs/.emacs.d/elpa/closql-20260601.1540/closql.elc differ
diff --git a/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode-autoloads.el b/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode-autoloads.el
new file mode 100644
index 0000000..2d757a2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode-autoloads.el
@@ -0,0 +1,50 @@
+;;; command-log-mode-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from command-log-mode.el
+
+(autoload 'command-log-mode "command-log-mode" "\
+Toggle keyboard command logging.
+
+This is a minor mode.  If called interactively, toggle the
+`command-log mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `command-log-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(autoload 'clm/toggle-command-log-buffer "command-log-mode" "\
+Toggle the command log showing or not.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "command-log-mode" '("clm/" "command-log-mode-" "global-command-log-mode"))
+
+;;; End of scraped data
+
+(provide 'command-log-mode-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; command-log-mode-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode-pkg.el b/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode-pkg.el
new file mode 100644
index 0000000..7a119b1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "command-log-mode" "20160413.447"
+  "Log keyboard commands to buffer."
+  ()
+  :url "https://github.com/lewang/command-log-mode"
+  :commit "af600e6b4129c8115f464af576505ea8e789db27"
+  :revdesc "af600e6b4129"
+  :keywords '("help")
+  :authors '(("Michael Weber" . "michaelw@foldr.org"))
+  :maintainers '(("Michael Weber" . "michaelw@foldr.org")))
diff --git a/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode.el b/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode.el
new file mode 100644
index 0000000..18ea99f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode.el
@@ -0,0 +1,324 @@
+;;; command-log-mode.el --- log keyboard commands to buffer
+
+;; Package-Version: 20160413.447
+;; Package-Revision: af600e6b4129
+;; homepage: https://github.com/lewang/command-log-mode
+
+;; Copyright (C) 2013 Nic Ferrier
+;; Copyright (C) 2012 Le Wang
+;; Copyright (C) 2004  Free Software Foundation, Inc.
+
+;; Author: Michael Weber <michaelw@foldr.org>
+;; Keywords: help
+;; Initial-version: <2004-10-07 11:41:28 michaelw>
+;; Time-stamp: <2004-11-06 17:08:11 michaelw>
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 2, or (at your option)
+;; any later version.
+
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to
+;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+;; Boston, MA 02111-1307, USA.
+
+;;; Commentary:
+
+;; This add-on can be used to demo Emacs to an audience.  When
+;; activated, keystrokes get logged into a designated buffer, along
+;; with the command bound to them.
+
+;; To enable, use e.g.:
+;;
+;; (require 'command-log-mode)
+;; (add-hook 'LaTeX-mode-hook 'command-log-mode)
+;;
+;; To see the log buffer, call M-x clm/open-command-log-buffer.
+
+;; The key strokes in the log are decorated with ISO9601 timestamps on
+;; the property `:time' so if you want to convert the log for
+;; screencasting purposes you could use the time stamp as a key into
+;; the video beginning.
+
+;;; Code:
+
+(eval-when-compile (require 'cl))
+
+(defvar clm/log-text t
+  "A non-nil setting means text will be saved to the command log.")
+
+(defvar clm/log-repeat nil
+  "A nil setting means repetitions of the same command are merged into the single log line.")
+
+(defvar clm/recent-history-string ""
+  "This string will hold recently typed text.")
+
+(defun clm/recent-history ()
+  (setq clm/recent-history-string
+	(concat clm/recent-history-string
+		(buffer-substring-no-properties (- (point) 1) (point)))))
+
+(add-hook 'post-self-insert-hook 'clm/recent-history)
+
+(defun clm/zap-recent-history ()
+  (unless (or (member this-original-command
+		      clm/log-command-exceptions*)
+	      (eq this-original-command #'self-insert-command))
+    (setq clm/recent-history-string "")))
+
+(add-hook 'post-command-hook 'clm/zap-recent-history)
+
+(defvar clm/time-string "%Y-%m-%dT%H:%M:%S"
+  "The string sent to `format-time-string' when command time is logged.")
+
+(defvar clm/logging-dir "~/log/"
+  "Directory in which to store files containing logged commands.")
+
+(defvar clm/log-command-exceptions*
+  '(nil self-insert-command backward-char forward-char
+        delete-char delete-backward-char backward-delete-char
+        backward-delete-char-untabify
+        universal-argument universal-argument-other-key
+        universal-argument-minus universal-argument-more
+        beginning-of-line end-of-line recenter
+        move-end-of-line move-beginning-of-line
+        handle-switch-frame
+        newline previous-line next-line)
+  "A list commands which should not be logged, despite logging being enabled.
+Frequently used non-interesting commands (like cursor movements) should be put here.")
+
+(defvar clm/command-log-buffer nil
+  "Reference of the currenly used buffer to display logged commands.")
+(defvar clm/command-repetitions 0
+  "Count of how often the last keyboard commands has been repeated.")
+(defvar clm/last-keyboard-command nil
+  "Last logged keyboard command.")
+
+
+(defvar clm/log-command-indentation 11
+  "*Indentation of commands in command log buffer.")
+
+(defgroup command-log nil
+  "Customization for the command log.")
+
+(defcustom command-log-mode-auto-show nil
+  "Show the command-log window or frame automatically."
+  :group 'command-log
+  :type 'boolean)
+
+(defcustom command-log-mode-window-size 40
+  "The size of the command-log window."
+  :group 'command-log
+  :type 'integer)
+
+(defcustom command-log-mode-window-font-size 2
+  "The font-size of the command-log window."
+  :group 'command-log
+  :type 'integer)
+
+(defcustom command-log-mode-key-binding-open-log "C-c o"
+  "The key binding used to toggle the log window."
+  :group 'command-log
+  :type '(radio
+          (const :tag "No key" nil)
+          (key-sequence "C-c o"))) ;; this is not right though it works for kbd
+
+(defcustom command-log-mode-open-log-turns-on-mode nil
+  "Does opening the command log turn on the mode?"
+  :group 'command-log
+  :type 'boolean)
+
+(defcustom command-log-mode-is-global nil
+  "Does turning on command-log-mode happen globally?"
+  :group 'command-log
+  :type 'boolean)
+
+;;;###autoload
+(define-minor-mode command-log-mode
+  "Toggle keyboard command logging."
+  :init-value nil
+  :lighter " command-log"
+  :keymap nil
+  (if command-log-mode
+      (when (and
+             command-log-mode-auto-show
+             (not (get-buffer-window clm/command-log-buffer)))
+        (clm/open-command-log-buffer))
+      ;; We can close the window though
+      (clm/close-command-log-buffer)))
+
+(define-global-minor-mode global-command-log-mode command-log-mode
+  command-log-mode)
+
+(defun clm/buffer-log-command-p (cmd &optional buffer)
+  "Determines whether keyboard command CMD should be logged.
+If non-nil, BUFFER specifies the buffer used to determine whether CMD should be logged.
+If BUFFER is nil, the current buffer is assumed."
+  (let ((val (if buffer
+		 (buffer-local-value command-log-mode buffer)
+	       command-log-mode)))
+    (and (not (null val))
+	 (null (member cmd clm/log-command-exceptions*)))))
+
+(defmacro clm/save-command-environment (&rest body)
+  (declare (indent 0))
+  `(let ((deactivate-mark nil) ; do not deactivate mark in transient
+                                        ; mark mode
+	 ;; do not let random commands scribble over
+	 ;; {THIS,LAST}-COMMAND
+	 (this-command this-command)
+	 (last-command last-command))
+     ,@body))
+
+(defun clm/open-command-log-buffer (&optional arg)
+  "Opens (and creates, if non-existant) a buffer used for logging keyboard commands.
+If ARG is Non-nil, the existing command log buffer is cleared."
+  (interactive "P")
+  (with-current-buffer 
+      (setq clm/command-log-buffer
+            (get-buffer-create " *command-log*"))
+    (text-scale-set 1))
+  (when arg
+    (with-current-buffer clm/command-log-buffer
+      (erase-buffer)))
+  (let ((new-win (split-window-horizontally
+                  (- 0 command-log-mode-window-size))))
+    (set-window-buffer new-win clm/command-log-buffer)
+    (set-window-dedicated-p new-win t)))
+
+(defun clm/close-command-log-buffer ()
+  "Close the command log window."
+  (interactive)
+  (with-current-buffer
+      (setq clm/command-log-buffer
+            (get-buffer-create " *command-log*"))
+    (let ((win (get-buffer-window (current-buffer))))
+      (when (windowp win)
+        (delete-window win)))))
+
+;;;###autoload
+(defun clm/toggle-command-log-buffer (&optional arg)
+  "Toggle the command log showing or not."
+  (interactive "P")
+  (when (and command-log-mode-open-log-turns-on-mode
+             (not command-log-mode))
+    (if command-log-mode-is-global
+        (global-command-log-mode)
+        (command-log-mode)))
+  (with-current-buffer
+      (setq clm/command-log-buffer
+            (get-buffer-create " *command-log*"))
+    (let ((win (get-buffer-window (current-buffer))))
+      (if (windowp win)
+          (clm/close-command-log-buffer)
+          ;; Else open the window
+          (clm/open-command-log-buffer arg)))))
+
+(defun clm/scroll-buffer-window (buffer &optional move-fn)
+  "Updates `point' of windows containing BUFFER according to MOVE-FN.
+If non-nil, MOVE-FN is called on every window which displays BUFFER.
+If nil, MOVE-FN defaults to scrolling to the bottom, making the last line visible.
+
+Scrolling up can be accomplished with:
+\(clm/scroll-buffer-window buf (lambda () (goto-char (point-min))))
+"
+  (let ((selected (selected-window))
+	(point-mover (or move-fn
+			 (function (lambda () (goto-char (point-max)))))))
+    (walk-windows (function (lambda (window)
+			      (when (eq (window-buffer window) buffer)
+				(select-window window)
+				(funcall point-mover)
+				(select-window selected))))
+		  nil t)))
+
+(defmacro clm/with-command-log-buffer (&rest body)
+  (declare (indent 0))
+  `(when (and (not (null clm/command-log-buffer))
+	      (buffer-name clm/command-log-buffer))
+     (with-current-buffer clm/command-log-buffer
+       ,@body)))
+
+(defun clm/log-command (&optional cmd)
+  "Hook into `pre-command-hook' to intercept command activation."
+  (clm/save-command-environment
+    (setq cmd (or cmd this-command))
+    (when (clm/buffer-log-command-p cmd)
+      (clm/with-command-log-buffer
+        (let ((current (current-buffer)))
+          (goto-char (point-max))
+          (cond ((and (not clm/log-repeat) (eq cmd clm/last-keyboard-command))
+                 (incf clm/command-repetitions)
+                 (save-match-data
+                   (when (and (> clm/command-repetitions 1)
+                              (search-backward "[" (line-beginning-position -1) t))
+                     (delete-region (point) (line-end-position))))
+                 (backward-char) ; skip over either ?\newline or ?\space before ?\[
+                 (insert " [")
+                 (princ (1+ clm/command-repetitions) current)
+                 (insert " times]"))
+                (t ;; (message "last cmd: %s cur: %s" last-command cmd)
+                 ;; showing accumulated text with interleaved key presses isn't very useful
+		 (when (and clm/log-text (not clm/log-repeat))
+		   (if (eq clm/last-keyboard-command 'self-insert-command)
+		       (insert "[text: " clm/recent-history-string "]\n")))
+                 (setq clm/command-repetitions 0)
+                 (insert
+                  (propertize
+                   (key-description (this-command-keys))
+                   :time  (format-time-string clm/time-string (current-time))))
+                 (when (>= (current-column) clm/log-command-indentation)
+                   (newline))
+                 (move-to-column clm/log-command-indentation t)
+                 (princ (if (byte-code-function-p cmd) "<bytecode>" cmd) current)
+                 (newline)
+                 (setq clm/last-keyboard-command cmd)))
+          (clm/scroll-buffer-window current))))))
+
+(defun clm/command-log-clear ()
+  "Clear the command log buffer."
+  (interactive)
+  (with-current-buffer clm/command-log-buffer
+    (erase-buffer)))
+
+(defun clm/save-log-line (start end)
+  "Helper function for `clm/save-command-log' to export text properties."
+  (save-excursion
+    (goto-char start)
+    (let ((time (get-text-property (point) :time)))
+      (if time
+	  (list (cons start (if time 
+				(concat "[" (get-text-property (point) :time) "] ")
+			      "")))))))
+
+(defun clm/save-command-log ()
+  "Save commands to today's log.
+Clears the command log buffer after saving."
+  (interactive)
+  (save-window-excursion
+    (set-buffer (get-buffer " *command-log*"))
+    (goto-char (point-min))
+    (let ((now (format-time-string "%Y-%m-%d"))
+	  (write-region-annotate-functions '(clm/save-log-line)))
+      (while (and (re-search-forward "^.*" nil t)
+		  (not (eobp)))
+	(append-to-file (line-beginning-position) (1+ (line-end-position)) (concat clm/logging-dir now))))
+    (clm/command-log-clear)))
+
+(add-hook 'pre-command-hook 'clm/log-command)
+
+(eval-after-load 'command-log-mode
+  '(when command-log-mode-key-binding-open-log
+    (global-set-key
+     (kbd command-log-mode-key-binding-open-log)
+     'clm/toggle-command-log-buffer)))
+
+(provide 'command-log-mode)
+
+;;; command-log-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode.elc b/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode.elc
new file mode 100644
index 0000000..857801c
Binary files /dev/null and b/emacs/.emacs.d/elpa/command-log-mode-20160413.447/command-log-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-abbrev.el b/emacs/.emacs.d/elpa/company-20260721.100/company-abbrev.el
new file mode 100644
index 0000000..e074d3a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-abbrev.el
@@ -0,0 +1,54 @@
+;;; company-abbrev.el --- company-mode completion backend for abbrev  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2015, 2021, 2023  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+(require 'abbrev)
+
+(defun company-abbrev-insert (_match)
+  "Replace MATCH with the expanded abbrev."
+  (expand-abbrev))
+
+;;;###autoload
+(defun company-abbrev (command &optional arg &rest _ignored)
+  "`company-mode' completion backend for abbrev."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-abbrev
+                                        'company-abbrev-insert))
+    (prefix (company-grab-symbol))
+    (candidates (apply
+                 #'nconc
+                 (mapcar (lambda (table)
+                           (delete "" (all-completions arg table)))
+                         (abbrev--active-tables))))
+    (kind 'snippet)
+    (meta (abbrev-expansion arg))
+    (post-completion (expand-abbrev))))
+
+(provide 'company-abbrev)
+;;; company-abbrev.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-abbrev.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-abbrev.elc
new file mode 100644
index 0000000..72418e1
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-abbrev.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-autoloads.el b/emacs/.emacs.d/elpa/company-20260721.100/company-autoloads.el
new file mode 100644
index 0000000..f6c0093
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-autoloads.el
@@ -0,0 +1,338 @@
+;;; company-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from company.el
+
+(autoload 'company-mode "company" "\
+\"complete anything\"; is an in-buffer completion framework.
+
+Completion starts automatically, depending on the values
+`company-idle-delay' and `company-minimum-prefix-length'.
+
+Completion can be controlled with the commands:
+`company-complete-common', `company-complete-selection', `company-complete',
+`company-select-next', `company-select-previous'.  If these commands are
+called before `company-idle-delay', completion will also start.
+
+Completions can be searched with `company-search-candidates' or
+`company-filter-candidates'.  These can be used while completion is
+inactive, as well.
+
+The completion data is retrieved using `company-backends' and displayed
+using `company-frontends'.  If you want to start a specific backend, call
+it interactively or use `company-begin-backend'.
+
+By default, the completions list is sorted alphabetically, unless the
+backend chooses otherwise, or `company-transformers' changes it later.
+
+regular keymap (`company-mode-map'):
+
+\\{company-mode-map}
+keymap during active completions (`company-active-map'):
+
+\\{company-active-map}
+
+This is a minor mode.  If called interactively, toggle the
+`Company mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `company-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(put 'global-company-mode 'globalized-minor-mode t)
+(defvar global-company-mode nil "\
+Non-nil if Global Company mode is enabled.
+See the `global-company-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-company-mode'.")
+(custom-autoload 'global-company-mode "company" nil)
+(autoload 'global-company-mode "company" "\
+Toggle Company mode in all buffers.
+With prefix ARG, enable Global Company mode if ARG is positive;
+otherwise, disable it.
+
+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.
+
+Company mode is enabled in all buffers where `company-mode-on' would
+do it.
+
+See `company-mode' for more information on Company mode.
+
+(fn &optional ARG)" t)
+(autoload 'company-manual-begin "company" "\
+Start the completion interface.
+
+Unlike `company-complete-selection' or `company-complete', this command
+doesn't cause any immediate changes to the buffer text." t)
+(autoload 'company-complete "company" "\
+Insert the common part of all candidates or the current selection.
+The first time this is called, the common part is inserted, the second
+time, or when the selection has been changed, the selected candidate is
+inserted." t)
+(register-definition-prefixes "company" '("company-"))
+
+
+;;; Generated autoloads from company-abbrev.el
+
+(autoload 'company-abbrev "company-abbrev" "\
+`company-mode' completion backend for abbrev.
+
+(fn COMMAND &optional ARG &rest IGNORED)" t)
+(register-definition-prefixes "company-abbrev" '("company-abbrev-insert"))
+
+
+;;; Generated autoloads from company-bbdb.el
+
+(autoload 'company-bbdb "company-bbdb" "\
+`company-mode' completion backend for BBDB.
+
+(fn COMMAND &optional ARG &rest IGNORE)" t)
+(register-definition-prefixes "company-bbdb" '("company-bbdb-"))
+
+
+;;; Generated autoloads from company-capf.el
+
+(register-definition-prefixes "company-capf" '("company-"))
+
+
+;;; Generated autoloads from company-childframe.el
+
+(autoload 'company-childframe-frontend "company-childframe" "\
+`company-mode' frontend using childframe.
+For COMMAND refer to `company-frontends'.
+
+(fn COMMAND)")
+(autoload 'company-childframe-unless-just-one-frontend "company-childframe" "\
+`company-childframe-frontend', but not shown for single candidates.
+
+(fn COMMAND)")
+(register-definition-prefixes "company-childframe" '("company-childframe-"))
+
+
+;;; Generated autoloads from company-clang.el
+
+(register-definition-prefixes "company-clang" '("company-clang"))
+
+
+;;; Generated autoloads from company-cmake.el
+
+(register-definition-prefixes "company-cmake" '("company-cmake"))
+
+
+;;; Generated autoloads from company-css.el
+
+(autoload 'company-css "company-css" "\
+`company-mode' completion backend for `css-mode'.
+
+(fn COMMAND &optional ARG &rest IGNORED)" t)
+(register-definition-prefixes "company-css" '("company-css-"))
+
+
+;;; Generated autoloads from company-dabbrev.el
+
+(autoload 'company-dabbrev "company-dabbrev" "\
+dabbrev-like `company-mode' completion backend.
+
+(fn COMMAND &optional ARG &rest IGNORED)" t)
+(register-definition-prefixes "company-dabbrev" '("company-dabbrev-"))
+
+
+;;; Generated autoloads from company-dabbrev-code.el
+
+(autoload 'company-dabbrev-code "company-dabbrev-code" "\
+dabbrev-like `company-mode' backend for code.
+The backend looks for all symbols in the current buffer that aren't in
+comments or strings.
+
+(fn COMMAND &optional ARG &rest REST)" t)
+(register-definition-prefixes "company-dabbrev-code" '("company-dabbrev-"))
+
+
+;;; Generated autoloads from company-etags.el
+
+(autoload 'company-etags "company-etags" "\
+`company-mode' completion backend for etags.
+
+(fn COMMAND &optional ARG &rest REST)" t)
+(register-definition-prefixes "company-etags" '("company-etags-"))
+
+
+;;; Generated autoloads from company-files.el
+
+(autoload 'company-files "company-files" "\
+`company-mode' completion backend existing file names.
+Completions works for proper absolute and relative files paths.
+File paths with spaces are only supported inside strings.
+
+(fn COMMAND &optional ARG &rest REST)" t)
+(register-definition-prefixes "company-files" '("company-file"))
+
+
+;;; Generated autoloads from company-gtags.el
+
+(autoload 'company-gtags "company-gtags" "\
+`company-mode' completion backend for GNU Global.
+
+(fn COMMAND &optional ARG &rest IGNORED)" t)
+(register-definition-prefixes "company-gtags" '("company-gtags-"))
+
+
+;;; Generated autoloads from company-ispell.el
+
+(autoload 'company-ispell "company-ispell" "\
+`company-mode' completion backend using Ispell.
+
+(fn COMMAND &optional ARG &rest IGNORED)" t)
+(register-definition-prefixes "company-ispell" '("company-"))
+
+
+;;; Generated autoloads from company-keywords.el
+
+(autoload 'company-keywords "company-keywords" "\
+`company-mode' backend for programming language keywords.
+
+(fn COMMAND &optional ARG &rest IGNORED)" t)
+(register-definition-prefixes "company-keywords" '("company-keywords-"))
+
+
+;;; Generated autoloads from company-nxml.el
+
+(autoload 'company-nxml "company-nxml" "\
+`company-mode' completion backend for `nxml-mode'.
+
+(fn COMMAND &optional ARG &rest IGNORED)" t)
+(register-definition-prefixes "company-nxml" '("company-nxml-"))
+
+
+;;; Generated autoloads from company-oddmuse.el
+
+(autoload 'company-oddmuse "company-oddmuse" "\
+`company-mode' completion backend for `oddmuse-mode'.
+
+(fn COMMAND &optional ARG &rest IGNORED)" t)
+(register-definition-prefixes "company-oddmuse" '("company-oddmuse-"))
+
+
+;;; Generated autoloads from company-semantic.el
+
+(autoload 'company-semantic "company-semantic" "\
+`company-mode' completion backend using CEDET Semantic.
+
+(fn COMMAND &optional ARG &rest IGNORED)" t)
+(register-definition-prefixes "company-semantic" '("company-semantic-"))
+
+
+;;; Generated autoloads from company-template.el
+
+(register-definition-prefixes "company-template" '("company-template-"))
+
+
+;;; Generated autoloads from company-tempo.el
+
+(autoload 'company-tempo "company-tempo" "\
+`company-mode' completion backend for tempo.
+
+(fn COMMAND &optional ARG &rest IGNORED)" t)
+(register-definition-prefixes "company-tempo" '("company-tempo-"))
+
+
+;;; Generated autoloads from company-tng.el
+
+(autoload 'company-tng-frontend "company-tng" "\
+When the user changes the selection at least once, this
+frontend will display the candidate in the buffer as if it's
+already there and any key outside of `company-active-map' will
+confirm the selection and finish the completion.
+
+(fn COMMAND)")
+(define-obsolete-function-alias 'company-tng-configure-default 'company-tng-mode "0.10.0" "Applies the default configuration to enable company-tng.")
+(defvar company-tng-mode nil "\
+Non-nil if Company-Tng mode is enabled.
+See the `company-tng-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 `company-tng-mode'.")
+(custom-autoload 'company-tng-mode "company-tng" nil)
+(autoload 'company-tng-mode "company-tng" "\
+This minor mode enables `company-tng-frontend'.
+
+This is a global minor mode.  If called interactively, toggle the
+`Company-Tng mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='company-tng-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "company-tng" '("company-tng-"))
+
+
+;;; Generated autoloads from company-yasnippet.el
+
+(autoload 'company-yasnippet "company-yasnippet" "\
+`company-mode' backend for `yasnippet'.
+
+This backend should be used with care, because as long as there are
+snippets defined for the current major mode, this backend will always
+shadow backends that come after it.  Recommended usages:
+
+* In a buffer-local value of `company-backends', grouped with a backend or
+  several that provide actual text completions.
+
+  (add-hook \\='js-mode-hook
+            (lambda ()
+              (set (make-local-variable \\='company-backends)
+                   \\='((company-dabbrev-code company-yasnippet)))))
+
+* After keyword `:with', grouped with other backends.
+
+  (push \\='(company-semantic :with company-yasnippet) company-backends)
+
+* Not in `company-backends', just bound to a key.
+
+  (global-set-key (kbd \"C-c y\") \\='company-yasnippet)
+
+(fn COMMAND &optional ARG &rest IGNORE)" t)
+(register-definition-prefixes "company-yasnippet" '("company-yasnippet-"))
+
+;;; End of scraped data
+
+(provide 'company-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; company-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-bbdb.el b/emacs/.emacs.d/elpa/company-20260721.100/company-bbdb.el
new file mode 100644
index 0000000..d95e140
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-bbdb.el
@@ -0,0 +1,63 @@
+;;; company-bbdb.el --- company-mode completion backend for BBDB in message-mode  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2013-2016, 2020, 2023  Free Software Foundation, Inc.
+
+;; Author: Jan Tatarik <jan.tatarik@gmail.com>
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+(require 'company)
+(require 'cl-lib)
+
+(declare-function bbdb-record-get-field "bbdb")
+(declare-function bbdb-dwim-mail "bbdb-com")
+
+(defgroup company-bbdb nil
+  "Completion backend for BBDB."
+  :group 'company)
+
+(defcustom company-bbdb-modes '(message-mode)
+  "Major modes in which `company-bbdb' may complete."
+  :type '(repeat (symbol :tag "Major mode"))
+  :package-version '(company . "0.8.8"))
+
+(defun company-bbdb--candidates (arg)
+  (cl-mapcan (lambda (record)
+               (mapcar (lambda (mail) (bbdb-dwim-mail record mail))
+                       (bbdb-record-get-field record 'mail)))
+             (eval `(let ((arg ,arg))
+                      (bbdb-search (bbdb-records) :all-names arg :mail arg))
+                   t)))
+
+;;;###autoload
+(defun company-bbdb (command &optional arg &rest _ignore)
+  "`company-mode' completion backend for BBDB."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-bbdb))
+    (prefix (and (memq major-mode company-bbdb-modes)
+                 (featurep 'bbdb-com)
+                 (let ((case-fold-search t))
+                   (looking-back
+                    "^\\([^ :]*-\\)?\\(To\\|B?Cc\\|From\\):.*? *\\([^,;]*\\)"
+                    (line-beginning-position)))
+                 (match-string-no-properties 3)))
+    (candidates (company-bbdb--candidates arg))
+    (sorted t)
+    (no-cache t)))
+
+(provide 'company-bbdb)
+;;; company-bbdb.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-bbdb.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-bbdb.elc
new file mode 100644
index 0000000..fd356eb
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-bbdb.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-capf.el b/emacs/.emacs.d/elpa/company-20260721.100/company-capf.el
new file mode 100644
index 0000000..5c7b848
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-capf.el
@@ -0,0 +1,259 @@
+;;; company-capf.el --- company-mode completion-at-point-functions backend -*- lexical-binding: t -*-
+
+;; Copyright (C) 2013-2024  Free Software Foundation, Inc.
+
+;; Author: Stefan Monnier <monnier@iro.umontreal.ca>
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; The CAPF back-end provides a bridge to the standard
+;; completion-at-point-functions facility, and thus can support any major mode
+;; that defines a proper completion function, including emacs-lisp-mode,
+;; css-mode and nxml-mode.
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+
+(defgroup company-capf nil
+  "Completion backend as adapter for `completion-at-point-functions'."
+  :group 'company)
+
+(defcustom company-capf-disabled-functions '(tags-completion-at-point-function
+                                             ispell-completion-at-point
+                                             company--fake-capf-complete-common)
+  "List of completion functions which should be ignored in this backend.
+
+By default it contains the functions that duplicate the built-in backends
+but don't support the corresponding configuration options and/or alter the
+intended priority of the default backends' configuration."
+  :type 'hook
+  :package-version '(company . "1.0.0"))
+
+;; Amortizes several calls to a c-a-p-f from the same position.
+(defvar company--capf-cache nil)
+
+;; FIXME: Provide a way to save this info once in Company itself
+;; (https://github.com/company-mode/company-mode/pull/845).
+(defvar-local company-capf--current-completion-data nil
+  "Value last returned by `company-capf' in response to `candidates'.
+For most properties/actions, this is just what we need: the exact values
+that accompanied the completion table that's currently is use.
+
+`company-capf', however, could be called at some different positions during
+a completion session (most importantly, by `company-sort-by-occurrence'),
+so we can't just use the preceding variable instead.")
+
+(defvar-local company-capf--current-completion-metadata nil
+  "Metadata computed with the current prefix and data above.")
+
+(defun company--capf-data ()
+  (let ((cache company--capf-cache))
+    (if (and (equal (current-buffer) (car cache))
+             (equal (point) (car (setq cache (cdr cache))))
+             (equal (buffer-chars-modified-tick) (car (setq cache (cdr cache)))))
+        (cadr cache)
+      (let ((data (company--capf-data-real)))
+        (setq company--capf-cache
+              (list (current-buffer) (point) (buffer-chars-modified-tick) data))
+        data))))
+
+(defun company--capf-data-real ()
+  (let ((data (run-hook-wrapped 'completion-at-point-functions
+                                ;; Ignore disabled and misbehaving functions.
+                                #'company--capf-wrapper 'optimist)))
+    (when (and (consp (cdr data)) (integer-or-marker-p (nth 1 data))) data)))
+
+(defun company--capf-wrapper (fun which)
+  ;; E.g. tags-completion-at-point-function subverts company-etags in the
+  ;; default value of company-backends, where the latter comes later.
+  (unless (memq fun company-capf-disabled-functions)
+    (let ((buffer-read-only t)
+          (inhibit-read-only nil)
+          (completion-in-region-function
+           (lambda (beg end coll pred)
+             (throw 'company--illegal-completion-in-region
+                    (list fun beg end coll :predicate pred)))))
+      (catch 'company--illegal-completion-in-region
+        (condition-case nil
+            (completion--capf-wrapper fun which)
+          (buffer-read-only nil))))))
+
+(declare-function python-shell-get-process "python")
+
+(defun company-capf--save-current-data (data metadata)
+  (setq company-capf--current-completion-data data
+        company-capf--current-completion-metadata metadata)
+  (add-hook 'company-after-completion-hook
+            #'company-capf--clear-current-data nil t))
+
+(defun company-capf--clear-current-data (_ignored)
+  (setq company-capf--current-completion-data nil
+        company-capf--current-completion-metadata nil))
+
+(defvar-local company-capf--sorted nil)
+(defvar-local company-capf--current-boundaries nil)
+
+(defun company-capf (command &optional arg &rest rest)
+  "`company-mode' backend using `completion-at-point-functions'."
+  (interactive (list 'interactive))
+  (pcase command
+    (`interactive (company-begin-backend 'company-capf))
+    (`prefix
+     (company-capf--prefix))
+    (`candidates
+     (company-capf--candidates arg (car rest)))
+    (`sorted
+     company-capf--sorted)
+    (`match
+     ;; Ask the for the `:company-match' function.  If that doesn't help,
+     ;; fallback to sniffing for face changes to get a suitable value.
+     (let ((f (or (plist-get (nthcdr 4 company-capf--current-completion-data)
+                             :company-match)
+                  #'company--match-from-capf-face)))
+       (funcall f arg)))
+    (`duplicates t)
+    (`no-cache t)   ;Not much can be done here, as long as we handle
+                    ;non-prefix matches.
+    (`meta
+     (let ((f (plist-get (nthcdr 4 company-capf--current-completion-data)
+                         :company-docsig)))
+       (when f (funcall f arg))))
+    (`doc-buffer
+     (let ((f (plist-get (nthcdr 4 company-capf--current-completion-data)
+                         :company-doc-buffer)))
+       (when f (funcall f arg))))
+    (`location
+     (let ((f (plist-get (nthcdr 4 company-capf--current-completion-data)
+                         :company-location)))
+       (when f (funcall f arg))))
+    (`annotation
+     (company-capf--annotation arg))
+    (`kind
+     (let ((f (plist-get (nthcdr 4 company-capf--current-completion-data)
+                         :company-kind)))
+       (when f (funcall f arg))))
+    (`deprecated
+     (let ((f (plist-get (nthcdr 4 company-capf--current-completion-data)
+                         :company-deprecated)))
+       (when f (funcall f arg))))
+    (`require-match
+     (plist-get (nthcdr 4 (company--capf-data)) :company-require-match))
+    (`init nil)      ;Don't bother: plenty of other ways to initialize the code.
+    (`post-completion
+     (company-capf--post-completion arg))
+    (`adjust-boundaries
+     (company--capf-boundaries
+      company-capf--current-boundaries))
+    (`expand-common
+     (company-capf--expand-common arg (car rest)))
+    ))
+
+(defun company-capf--prefix ()
+  (let ((res (company--capf-data)))
+    (when res
+      (let ((length (plist-get (nthcdr 4 res) :company-prefix-length))
+            (prefix (buffer-substring-no-properties (nth 1 res) (point)))
+            (suffix (buffer-substring-no-properties (point) (nth 2 res))))
+        (list prefix suffix length)))))
+
+(defun company-capf--expand-common (prefix suffix)
+  (let* ((data company-capf--current-completion-data)
+         (table (nth 3 data))
+         (pred (plist-get (nthcdr 4 data) :predicate)))
+    (company--capf-expand-common prefix suffix table pred
+                                 company-capf--current-completion-metadata)))
+
+(defun company-capf--annotation (arg)
+  (let* ((f (or (plist-get (nthcdr 4 company-capf--current-completion-data)
+                           :annotation-function)
+                ;; FIXME: Add a test.
+                (cdr (assq 'annotation-function
+                           company-capf--current-completion-metadata))))
+         (annotation (when f (funcall f arg))))
+    (if (and company-format-margin-function
+             (equal annotation " <f>") ; elisp-completion-at-point, pre-icons
+             (plist-get (nthcdr 4 company-capf--current-completion-data)
+                        :company-kind))
+        nil
+      annotation)))
+
+(defun company-capf--candidates (input suffix)
+  (let* ((current-capf (car company-capf--current-completion-data))
+         (res (company--capf-data))
+         (table (nth 3 res))
+         (pred (plist-get (nthcdr 4 res) :predicate))
+         (meta (and res
+                    (completion-metadata
+                     (buffer-substring (nth 1 res) (nth 2 res))
+                     table pred))))
+    (when (and res
+               (or (not current-capf)
+                   (equal current-capf (car res))))
+      (let* ((interrupt (plist-get (nthcdr 4 res) :company-use-while-no-input))
+             (all-result (company-capf--candidates-1 input suffix
+                                                     table pred
+                                                     meta
+                                                     (and non-essential
+                                                          (eq interrupt t))))
+             (sortfun (cdr (assq 'display-sort-function meta)))
+             (candidates (assoc-default :completions all-result)))
+        (setq company-capf--sorted (functionp sortfun))
+        (when candidates
+          (company-capf--save-current-data res meta)
+          (setq company-capf--current-boundaries
+                (company--capf-boundaries-markers
+                 (assoc-default :boundaries all-result)
+                 company-capf--current-boundaries)))
+        (when sortfun
+          (setq candidates (funcall sortfun candidates)))
+        candidates))))
+
+(defun company-capf--candidates-1 (prefix suffix table pred meta interrupt-on-input)
+  (if (not interrupt-on-input)
+      (company--capf-completions prefix suffix table pred meta)
+    (let (res)
+      (and (while-no-input
+             (setq res
+                   (company--capf-completions prefix suffix table pred meta))
+             nil)
+           (throw 'interrupted 'new-input))
+      res)))
+
+(defun company-capf--post-completion (arg)
+  (let* ((res company-capf--current-completion-data)
+         (exit-function (plist-get (nthcdr 4 res) :exit-function))
+         (table (nth 3 res))
+         (prefix (nth 0 (company-capf--prefix))))
+    (if exit-function
+        ;; Follow the example of `completion--done'.
+        (funcall exit-function arg
+                 ;; FIXME: Should probably use an additional heuristic:
+                 ;; completion-at-point doesn't know when the user picked a
+                 ;; particular candidate explicitly (it only checks whether
+                 ;; further completions exist). Whereas company user can press
+                 ;; RET (or use implicit completion with company-tng).
+                 (if (= (car (completion-boundaries prefix table nil ""))
+                        (length prefix))
+                     'exact
+                   'finished)))))
+
+(provide 'company-capf)
+
+;;; company-capf.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-capf.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-capf.elc
new file mode 100644
index 0000000..5565cae
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-capf.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-childframe.el b/emacs/.emacs.d/elpa/company-20260721.100/company-childframe.el
new file mode 100644
index 0000000..87306b9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-childframe.el
@@ -0,0 +1,277 @@
+;;; company-childframe.el --- Graphical popup frontend for Company  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026  Free Software Foundation, Inc.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+;; Tooltip completion menu frontend for Company that uses a child frame.
+;;
+;; A lot of the code here was imported from the package `company-posframe',
+;; credit to Clément Pit-Claudel, Feng Shu and others.
+
+;;; Code:
+
+(require 'company)
+(require 'posframe)
+
+(defgroup company-childframe nil
+  "Group group group"
+  :group 'company)
+
+(defcustom company-childframe-font nil
+  "The font used by company-childframe's frame.
+Using current frame's font if it is nil."
+  :type 'face)
+
+(defcustom company-childframe-border-width 1
+  "The width of the popup's border, in graphical frames.
+
+Users of HiDPI screens might like to set it to 2."
+  :type 'integer)
+
+(defvar company-childframe-buffer " *company-childframe-buffer*"
+  "company-childframe's buffer which used by posframe.")
+
+(defvar company-childframe--frame nil)
+
+(defvar company-childframe-show-params nil
+  "List of extra parameters passed to `posframe-show' in
+  `company-childframe-show'.")
+
+(defvar company-childframe-last-status nil)
+
+(defvar company-childframe-buffer-map
+  (let ((keymap (make-sparse-keymap)))
+    (set-keymap-parent keymap company-active-map)
+    (define-key keymap [wheel-down] 'company-childframe-wheel-up)
+    (define-key keymap [wheel-up] 'company-childframe-wheel-down)
+    keymap)
+  "Keymap for the child frame's popup/buffer.")
+
+(defun company-childframe-wheel-up ()
+  "Scroll up the displayed candidates."
+  (interactive)
+  (company-childframe--wheel-scroll 3))
+
+(defun company-childframe-wheel-down ()
+  "Scroll up the displayed candidates."
+  (interactive)
+  (company-childframe--wheel-scroll -3))
+
+(defun company-childframe--wheel-scroll (amount)
+  (let ((parent-frame (frame-parameter nil 'parent-frame))
+        (parent-buffer (frame-parameter nil 'posframe-parent-buffer)))
+    (when (and parent-frame
+               parent-buffer)
+      (select-frame parent-frame)
+      (select-window (get-buffer-window (cdr parent-buffer)))
+      (company-select-next amount))))
+
+(defvar company-childframe-poshandler
+  #'company-childframe-show-at-prefix
+  "Poshandler for the completion dialog.")
+
+(defvar company-childframe--shown-above nil)
+
+(defun company-childframe-show-at-prefix (info)
+  "Poshandler showing `company-childframe' at `company-prefix'."
+  (let* ((parent-window (plist-get info :parent-window))
+         (point (- (plist-get info :position)
+                   (plist-get info :company-prefix-length)))
+         (after-string-width
+          (with-current-buffer (window-buffer parent-window)
+            (thread-last
+              (and (= point (point-max))
+                   (overlays-in point point))
+              (mapcar (lambda (o) (company--string-pixel-width
+                              (overlay-get o 'after-string))))
+              (cl-reduce #'+))))
+         (posn (posn-at-point point parent-window))
+         ;; TODO: Strictly speaking, if company-childframe-font is not nil, that
+         ;; should be used to find the default width...
+         (expected-margin-width (* (plist-get info :company-margin) (default-font-width)))
+         (border-width (if (display-graphic-p)
+                           company-childframe-border-width
+                         0))
+         (min-bottom-distance (+ (* company-tooltip-minimum
+                                    (+ (or (default-value 'line-spacing) 0)
+                                       (plist-get info :font-height)))
+                                 (* 2 border-width)))
+         (xy (posn-x-y posn))
+         handler-res)
+    (setcar xy (- (car xy) expected-margin-width
+                  border-width
+                  ;; Might bite us if the posn-at-point behavior changes
+                  ;; someday, but the odds seem low.
+                  after-string-width))
+    (when (< (plist-get info :posframe-height) min-bottom-distance)
+      (cl-decf (cadr (plist-member info :parent-frame-height))
+               (- min-bottom-distance (plist-get info :posframe-height))))
+    (setq handler-res
+          (posframe-poshandler-point-bottom-left-corner
+           (plist-put info :position posn)))
+    (setq company-childframe--shown-above
+          (> (+
+              (nth 1 (window-body-pixel-edges parent-window))
+              (cdr (posn-x-y posn)))
+             (cdr handler-res)))
+    handler-res))
+
+(defun company-childframe-show ()
+  "Show company-childframe candidate menu."
+  (defvar x-wait-for-event-timeout)
+  (defvar x-fast-protocol-requests)
+  (let* ((x-wait-for-event-timeout (and (>= emacs-major-version 31)
+                                        ;; debbugs#80662
+                                        (bound-and-true-p
+                                         x-wait-for-event-timeout)))
+         (before-make-frame-hook)
+         (after-make-frame-functions)
+         (x-fast-protocol-requests t)
+         (height (min company-tooltip-limit
+                      (if company-search-mode
+                          (1+ company-candidates-length)
+                        company-candidates-length)))
+         (company-lines (company--create-lines company-selection height))
+         (margin (car company-lines))
+         (lines (cdr company-lines))
+         (width (length (car lines)))
+         (contents (mapconcat #'identity lines "\n"))
+         (buffer (get-buffer-create company-childframe-buffer)))
+    (when (and (eq (frame-live-p company-childframe--frame) 'x)
+               (not (eq (car (frame-list)) company-childframe--frame)))
+      ;; Make sure it's the first in the list, to avoid premature sync when some
+      ;; other frame is redisplayed first.  Again, non-atomic updated on X11.
+      ;; https://debbugs.gnu.org/80662#185
+      (delete-frame company-childframe--frame))
+    (apply #'posframe-show buffer
+           :string contents
+           :height height
+           :width (if (or (<= company-candidates-length
+                              height)
+                          (not (display-graphic-p)))
+                      width
+                    (1- width))
+           :font company-childframe-font
+           :background-color (face-attribute 'company-tooltip :background)
+           :lines-truncate t
+           :override-parameters '((inhibit-double-buffering . t))
+           :border-width (and (display-graphic-p) company-childframe-border-width)
+           ;; :border-color "light salmon"
+           ;; :border-color "light steel blue"
+           ;; We'll probably want a separate face for it.
+           :border-color (face-attribute 'company-tooltip-scrollbar-track :background)
+           :poshandler company-childframe-poshandler
+           :poshandler-extra-info
+           (list :company-margin margin
+                 :company-prefix-length (length (car (company--boundaries))))
+           company-childframe-show-params)
+    (when (and company-childframe--shown-above
+               company-tooltip-flip-when-above)
+      (with-current-buffer buffer
+        (erase-buffer)
+        (insert (mapconcat #'identity (reverse lines) "\n"))))
+    (with-current-buffer buffer
+      (use-local-map company-childframe-buffer-map)
+      (setq company-childframe--frame posframe--frame)
+      ;; FIXME: Does not honor remappings by minor modes in the parent buffer,
+      ;; e.g. the special behavior of C-d with parent-mode, etc.
+      (add-hook 'pre-command-hook
+                #'company-childframe--pre-command
+                nil t))))
+
+(defun company-childframe-hide ()
+  "Hide company-childframe candidate menu."
+  (when (and (frame-live-p company-childframe--frame)
+             (frame-visible-p company-childframe--frame))
+    ;; PGTK/NS/W32 protocols can update the display atomically.
+    (when (and (eq window-system 'x)
+               ;; https://debbugs.gnu.org/80961
+               (< emacs-major-version 32))
+      ;; Seems to help avoid the final flicker - probably by keeping the parent's
+      ;; display matrix up to date (so it can repaint on Expose immediately).
+      (redisplay))
+    (make-frame-invisible company-childframe--frame)))
+
+;;;###autoload
+(defun company-childframe-frontend (command)
+  "`company-mode' frontend using childframe.
+For COMMAND refer to `company-frontends'."
+  (setq company-childframe-last-status
+        (list (selected-window)
+              (current-buffer)))
+  (cl-case command
+    (pre-command
+     (when (not (posframe-workable-p))
+       (user-error "Child frames not supported")))
+    (show (setq company--tooltip-current-width 0))
+    (hide
+     (company-childframe-hide))
+    (post-command
+     (when (equal (window-buffer (selected-window))
+                  (current-buffer))
+       (company-childframe-show)))
+    (select-mouse
+     (company-childframe--select-mouse))))
+
+(defun company-childframe--select-mouse ()
+  (let ((event-col-row (company--event-col-row company-mouse-event))
+        (event-window (posn-window (event-start company-mouse-event))))
+    (cond ((and event-window
+                (equal (buffer-name (window-buffer event-window))
+                       company-childframe-buffer))
+           (company-set-selection (+ (cdr event-col-row)
+                                     company-tooltip-offset
+                                     (if (and (eq company-tooltip-offset-display 'lines)
+                                              (not (zerop company-tooltip-offset)))
+                                         -1 0)))
+           t))))
+
+(defun company-childframe--pre-command ()
+  (let ((parent-frame (frame-parameter nil 'parent-frame))
+        (parent-buffer (cdr (frame-parameter nil 'posframe-parent-buffer))))
+    (when (and
+           (not (memq this-command
+                      '(company-childframe-wheel-up
+                        company-childframe-wheel-down)))
+           parent-frame parent-buffer)
+      (select-frame parent-frame)
+      (select-window (get-buffer-window parent-buffer)))))
+
+;;;###autoload
+(defun company-childframe-unless-just-one-frontend (command)
+  "`company-childframe-frontend', but not shown for single candidates."
+  (if (company--show-inline-p)
+      (and (member command '(post-command hide))
+           (company-childframe-hide))
+    (and (memq command '(post-command show unhide hide select-mouse))
+         (company-childframe-frontend command))))
+
+(defun company-childframe-window-change ()
+  "Hide posframe on window change."
+  (when (posframe-workable-p)
+    (unless (or (equal (buffer-name) company-childframe-buffer)
+                (equal company-childframe-last-status
+                       (list (selected-window)
+                             (current-buffer))))
+      (company-childframe-hide))))
+
+(add-hook 'window-configuration-change-hook
+          #'company-childframe-window-change)
+
+(provide 'company-childframe)
+;;; company-childframe.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-childframe.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-childframe.elc
new file mode 100644
index 0000000..2e7ad43
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-childframe.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-clang.el b/emacs/.emacs.d/elpa/company-20260721.100/company-clang.el
new file mode 100644
index 0000000..1602078
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-clang.el
@@ -0,0 +1,430 @@
+;;; company-clang.el --- company-mode completion backend for Clang  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2023  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'company-template)
+(require 'cl-lib)
+
+(defgroup company-clang nil
+  "Completion backend for Clang."
+  :group 'company)
+
+(defcustom company-clang-executable
+  (executable-find "clang")
+  "Location of clang executable."
+  :type 'file)
+
+(defcustom company-clang-begin-after-member-access t
+  "When non-nil, start automatic completion after member access operators.
+
+Automatic completion starts whenever the current symbol is preceded by
+\".\", \"->\" or \"::\", ignoring `company-minimum-prefix-length'.
+
+If `company-begin-commands' is a list, it should include `c-electric-lt-gt'
+and `c-electric-colon', for automatic completion right after \">\" and
+\":\"."
+  :type 'boolean)
+
+(defcustom company-clang-use-compile-flags-txt nil
+  "When non-nil, use flags from compile_flags.txt if present.
+
+The lines from that files will be appended to `company-clang-arguments'.
+
+And if such file is found, Clang is called from the directory containing
+it.  That allows the flags use relative file names within the project."
+  :type 'boolean
+  :safe 'booleanp)
+
+(defcustom company-clang-arguments nil
+  "A list of additional arguments to pass to clang when completing.
+Prefix files (-include ...) can be selected with `company-clang-set-prefix'
+or automatically through a custom `company-clang-prefix-guesser'."
+  :type '(repeat (string :tag "Argument")))
+
+(defcustom company-clang-prefix-guesser 'company-clang-guess-prefix
+  "A function to determine the prefix file for the current buffer."
+  :type '(function :tag "Guesser function" nil))
+
+(defvar company-clang-modes '(c-mode c++-mode objc-mode)
+  "Major modes which clang may complete.")
+
+(defcustom company-clang-insert-arguments t
+  "When non-nil, insert function arguments as a template after completion."
+  :type 'boolean
+  :package-version '(company . "0.8.0"))
+
+;; prefix ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defvar company-clang--prefix nil)
+
+(defsubst company-clang--guess-pch-file (file)
+  (let ((dir (directory-file-name (file-name-directory file))))
+    (when (equal (file-name-nondirectory dir) "Classes")
+      (setq dir (file-name-directory dir)))
+    (car (directory-files dir t "\\([^.]h\\|[^h]\\).pch\\'" t))))
+
+(defsubst company-clang--file-substring (file beg end)
+  (with-temp-buffer
+    (insert-file-contents-literally file nil beg end)
+    (buffer-string)))
+
+(defun company-clang-guess-prefix ()
+  "Try to guess the prefix file for the current buffer."
+  ;; Prefixes seem to be called .pch.  Pre-compiled headers do, too.
+  ;; So we look at the magic number to rule them out.
+  (let* ((file (company-clang--guess-pch-file buffer-file-name))
+         (magic-number (and file (company-clang--file-substring file 0 4))))
+    (unless (member magic-number '("CPCH" "gpch"))
+      file)))
+
+(defun company-clang-set-prefix (&optional prefix)
+  "Use PREFIX as a prefix (-include ...) file for clang completion."
+  (interactive (let ((def (funcall company-clang-prefix-guesser)))
+     (unless (stringp def)
+       (setq def default-directory))
+     (list (read-file-name "Prefix file: "
+                           (when def (file-name-directory def))
+                           def t (when def (file-name-nondirectory def))))))
+  ;; TODO: pre-compile?
+  (setq company-clang--prefix (and (stringp prefix)
+                                   (file-regular-p prefix)
+                                   prefix)))
+
+;; Clean-up on exit.
+(add-hook 'kill-emacs-hook 'company-clang-set-prefix)
+
+;; parsing ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+;; Do we ever see OVERLOAD (or OVERRIDE)?
+(defconst company-clang--completion-pattern
+  "^COMPLETION: \\_<\\(%s[a-zA-Z0-9_:]*\\|Pattern\\)\\(?:\\(?: (InBase)\\)? : \\(.*\\)$\\)?$")
+
+(defconst company-clang--error-buffer-name "*clang-error*")
+
+(defun company-clang--lang-option ()
+     (if (eq major-mode 'objc-mode)
+         (if (string= "m" (file-name-extension buffer-file-name))
+             "objective-c" "objective-c++")
+       (substring (symbol-name major-mode) 0 -5)))
+
+(defun company-clang--parse-output (prefix _objc)
+  (goto-char (point-min))
+  (let ((pattern (format company-clang--completion-pattern
+                         (regexp-quote prefix)))
+        (case-fold-search nil)
+        (results (make-hash-table :test 'equal :size (/ (point-max) 100)))
+        lines)
+    (while (re-search-forward pattern nil t)
+      (let ((match (match-string-no-properties 1))
+            (meta (match-string-no-properties 2)))
+        (when (equal match "Pattern")
+          (setq match (company-clang--pattern-to-match meta)))
+          (when (string-match ":" match)
+            (setq match (substring match 0 (match-beginning 0))))
+          ;; Avoiding duplicates:
+          ;; https://github.com/company-mode/company-mode/issues/841
+          (cond
+           ;; Either meta != completion (not a macro)
+           ((not (equal match meta))
+            (puthash match meta results))
+           ;; Or it's the first time we see this completion
+           ((eq (gethash match results 'none) 'none)
+            (puthash match nil results)))))
+    (maphash
+     (lambda (match meta)
+       (when meta
+         (put-text-property 0 1 'meta (company-clang--strip-formatting meta) match))
+       (push match lines))
+     results)
+    lines))
+
+(defun company-clang--pattern-to-match (pat)
+  (let ((start 0)
+        (end nil))
+    (when (string-match "#]" pat)
+      (setq start (match-end 0)))
+    (when (string-match "[ \(]<#" pat start)
+      (setq end (match-beginning 0)))
+    (substring pat start end)))
+
+(defun company-clang--meta (candidate)
+  (get-text-property 0 'meta candidate))
+
+(defun company-clang--annotation (candidate)
+  (let ((ann (company-clang--annotation-1 candidate)))
+    (if (not (and ann (string-prefix-p "(*)" ann)))
+        ann
+      (with-temp-buffer
+        (insert ann)
+        (search-backward ")")
+        (let ((pt (1+ (point))))
+          (re-search-forward ".\\_>" nil t)
+          (delete-region pt (point)))
+        (buffer-string)))))
+
+;; TODO: Parse the original formatting here, rather than guess.
+;; Strip it every time in the `meta' handler instead.
+(defun company-clang--annotation-1 (candidate)
+  (let ((meta (company-clang--meta candidate)))
+    (cond
+     ((null meta) nil)
+     ((string-match "[^:]:[^:]" meta)
+      (substring meta (1+ (match-beginning 0))))
+     ((string-match "(anonymous)" meta) nil)
+     ((string-match "\\((.*)[ a-z]*\\'\\)" meta)
+      (let ((paren (match-beginning 1)))
+        (if (not (eq (aref meta (1- paren)) ?>))
+            (match-string 1 meta)
+          (with-temp-buffer
+            (insert meta)
+            (goto-char paren)
+            (substring meta (1- (search-backward "<"))))))))))
+
+(defun company-clang--strip-formatting (text)
+  (replace-regexp-in-string
+   "#]" " "
+   (replace-regexp-in-string "[<{[]#\\|#[>}]" "" text t)
+   t))
+
+(defun company-clang--handle-error (res args)
+  (goto-char (point-min))
+  (let* ((buf (get-buffer-create company-clang--error-buffer-name))
+         (cmd (concat company-clang-executable " " (mapconcat 'identity args " ")))
+         (pattern (format company-clang--completion-pattern ""))
+         (message-truncate-lines t)
+         (err (if (and (re-search-forward pattern nil t)
+                       ;; Something in the Windows build?
+                       ;; Looks like Clang doesn't always include the error text
+                       ;; before completions (even if exited with error).
+                       (> (match-beginning 0) (point-min)))
+                  (buffer-substring-no-properties (point-min)
+                                                  (1- (match-beginning 0)))
+                ;; Warn the user more aggressively if no match was found.
+                (message "clang failed with error %d: %s" res cmd)
+                (buffer-string))))
+
+    (with-current-buffer buf
+      (let ((inhibit-read-only t))
+        (erase-buffer)
+        (insert (current-time-string)
+                (format "\nclang failed with error %d:\n" res)
+                cmd "\n\n")
+        (insert err)
+        (setq buffer-read-only t)
+        (goto-char (point-min))))))
+
+(defun company-clang--start-process (prefix callback &rest args)
+  (let* ((objc (derived-mode-p 'objc-mode))
+         (buf (get-buffer-create "*clang-output*"))
+         ;; Looks unnecessary in Emacs 25.1 and later.
+         ;; (Inconclusive, needs more testing):
+         ;; https://github.com/company-mode/company-mode/pull/288#issuecomment-72491808
+         (process-adaptive-read-buffering nil)
+         (existing-process (get-buffer-process buf)))
+    (when existing-process
+      (kill-process existing-process))
+    (with-current-buffer buf
+      (erase-buffer)
+      (setq buffer-undo-list t))
+    (let* ((process-connection-type nil)
+           (process (apply #'start-file-process "company-clang" buf
+                           company-clang-executable args)))
+      (set-process-sentinel
+       process
+       (lambda (proc status)
+         (unless (string-match-p "hangup\\|killed" status)
+           (funcall
+            callback
+            (let ((res (process-exit-status proc)))
+              (with-current-buffer buf
+                (unless (eq 0 res)
+                  (company-clang--handle-error res args))
+                ;; Still try to get any useful input.
+                (company-clang--parse-output prefix objc)))))))
+      (unless (company-clang--auto-save-p)
+        (send-region process (point-min) (point-max))
+        (send-string process "\n")
+        (process-send-eof process)))))
+
+(defsubst company-clang--build-location (pos)
+  (save-excursion
+    (goto-char pos)
+    (format "%s:%d:%d"
+            (if (company-clang--auto-save-p) buffer-file-name "-")
+            (line-number-at-pos)
+            (1+ (length
+                 (encode-coding-region
+                  (line-beginning-position)
+                  (point)
+                  'utf-8
+                  t))))))
+
+(defsubst company-clang--build-complete-args (pos)
+  (append '("-fsyntax-only" "-Xclang" "-code-completion-macros")
+          (unless (company-clang--auto-save-p)
+            (list "-x" (company-clang--lang-option)))
+          (company-clang--arguments)
+          (when (stringp company-clang--prefix)
+            (list "-include" (expand-file-name company-clang--prefix)))
+          (list "-Xclang" (format "-code-completion-at=%s"
+                                  (company-clang--build-location pos)))
+          (list (if (company-clang--auto-save-p) buffer-file-name "-"))))
+
+(defun company-clang--arguments ()
+  (let ((fname "compile_flags.txt")
+        (args company-clang-arguments)
+        current-dir-rel)
+    (when company-clang-use-compile-flags-txt
+      (let ((dir (locate-dominating-file default-directory fname)))
+        (when dir
+          (setq current-dir-rel (file-relative-name default-directory dir))
+          (setq default-directory dir)
+          (with-temp-buffer
+            (insert-file-contents fname)
+            (setq args
+                  (append
+                   args
+                   (split-string (buffer-substring-no-properties
+                                  (point-min) (point-max))
+                                 "[\n\r]+"
+                                 t
+                                 "[ \t]+"))))
+          (unless (equal current-dir-rel "./")
+            (push (format "-I%s" current-dir-rel) args)))))
+    args))
+
+(defun company-clang--candidates (prefix callback)
+  (and (company-clang--auto-save-p)
+       (buffer-modified-p)
+       (basic-save-buffer))
+  (when (null company-clang--prefix)
+    (company-clang-set-prefix (or (funcall company-clang-prefix-guesser)
+                                  'none)))
+  (let ((default-directory default-directory))
+    (apply 'company-clang--start-process
+           prefix
+           callback
+           (company-clang--build-complete-args
+            (if (company-clang--check-version 4.0 9.0)
+                (point)
+              (- (point) (length prefix)))))))
+
+(defun company-clang--prefix ()
+  (if company-clang-begin-after-member-access
+      (company-grab-symbol-parts "\\.\\|->\\|::" 2)
+    (company-grab-symbol-parts)))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defconst company-clang-required-version 1.1)
+
+(defvar company-clang--version nil)
+
+(defun company-clang--auto-save-p ()
+  (not
+   (company-clang--check-version 2.9 3.1)))
+
+(defun company-clang--check-version (min apple-min)
+  (pcase-exhaustive company-clang--version
+    (`(apple . ,ver) (>= ver apple-min))
+    (`(normal . ,ver) (>= ver min))))
+
+(defsubst company-clang-version ()
+  "Return the version of `company-clang-executable'."
+  (with-temp-buffer
+    (call-process company-clang-executable nil t nil "--version")
+    (goto-char (point-min))
+    (if (re-search-forward
+         "\\(clang\\|Apple LLVM\\|bcc32x\\|bcc64\\) version \\([0-9.]+\\)" nil t)
+        (cons
+         (if (equal (match-string-no-properties 1) "Apple LLVM")
+             'apple
+           'normal)
+         (string-to-number (match-string-no-properties 2)))
+      0)))
+
+(defun company-clang (command &optional arg &rest _ignored)
+  "`company-mode' completion backend for Clang.
+Clang is a parser for C and ObjC.  Clang version 1.1 or newer is required.
+
+Additional command line arguments can be specified in
+`company-clang-arguments'.  Prefix files (-include ...) can be selected
+with `company-clang-set-prefix' or automatically through a custom
+`company-clang-prefix-guesser'.
+
+With Clang versions before 2.9, we have to save the buffer before
+performing completion.  With Clang 2.9 and later, buffer contents are
+passed via standard input."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-clang))
+    (init (when (memq major-mode company-clang-modes)
+            (unless company-clang-executable
+              (error "Company found no clang executable"))
+            (setq company-clang--version (company-clang-version))
+            (unless (company-clang--check-version
+                     company-clang-required-version
+                     company-clang-required-version)
+              (error "Company requires clang version %s"
+                     company-clang-required-version))))
+    (prefix (and (memq major-mode company-clang-modes)
+                 buffer-file-name
+                 company-clang-executable
+                 (not (company-in-string-or-comment))
+                 (or (company-clang--prefix) 'stop)))
+    (candidates (cons :async
+                      (lambda (cb) (company-clang--candidates arg cb))))
+    (meta       (company-clang--meta arg))
+    (kind (company-clang--kind arg))
+    (annotation (company-clang--annotation arg))
+    (post-completion (let ((anno (company-clang--annotation arg)))
+                       (when (and company-clang-insert-arguments anno)
+                         (insert anno)
+                         (if (string-match "\\`:[^:]" anno)
+                             (company-template-objc-templatify anno)
+                           (company-template-c-like-templatify
+                            (concat arg anno))))))))
+
+(defun company-clang--kind (arg)
+  ;; XXX: Not very precise.
+  ;; E.g. it will say that an arg-less ObjC method is a variable (perhaps we
+  ;; could look around for brackets, etc, if there any actual users who's
+  ;; bothered by it).
+  ;; And we can't distinguish between local vars and struct fields.
+  ;; Or between keywords and macros.
+  (let ((meta (company-clang--meta arg)))
+    (cond
+     ((null meta) 'keyword)
+     ((string-match "(" meta)
+      (if (string-match-p (format "\\`%s *\\'" (regexp-quote arg))
+                          (substring meta 0 (match-beginning 0)))
+          'keyword ; Also macro, actually (no return type).
+        'function))
+     (t 'variable))))
+
+(provide 'company-clang)
+;;; company-clang.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-clang.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-clang.elc
new file mode 100644
index 0000000..66551c8
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-clang.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-cmake.el b/emacs/.emacs.d/elpa/company-20260721.100/company-cmake.el
new file mode 100644
index 0000000..724ed23
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-cmake.el
@@ -0,0 +1,204 @@
+;;; company-cmake.el --- company-mode completion backend for CMake  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2013-2015, 2017-2018, 2020, 2023  Free Software Foundation, Inc.
+
+;; Author: Chen Bin <chenbin DOT sh AT gmail>
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; company-cmake offers completions for module names, variable names and
+;; commands used by CMake.  And their descriptions.
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+
+(defgroup company-cmake nil
+  "Completion backend for CMake."
+  :group 'company)
+
+(defcustom company-cmake-executable
+  (executable-find "cmake")
+  "Location of cmake executable."
+  :type 'file)
+
+(defvar company-cmake-executable-arguments
+  '("--help-command-list"
+    "--help-module-list"
+    "--help-property-list"
+    "--help-variable-list")
+  "The arguments we pass to cmake, separately.
+They affect which types of symbols we get completion candidates for.")
+
+(defvar company-cmake--completion-pattern
+  "^\\(%s[a-zA-Z0-9_<>]%s\\)$"
+  "Regexp to match the candidates.")
+
+(defvar company-cmake-modes '(cmake-mode cmake-ts-mode)
+  "Major modes in which cmake may complete.")
+
+(defvar company-cmake--candidates-cache nil
+  "Cache for the raw candidates.")
+
+(defvar company-cmake--meta-command-cache nil
+  "Cache for command arguments to retrieve descriptions for the candidates.")
+
+(defun company-cmake--replace-tags (rlt)
+  (setq rlt (replace-regexp-in-string
+             "\\(.*?\\(IS_GNU\\)?\\)<LANG>\\(.*\\)"
+             (lambda (_match)
+               (mapconcat 'identity
+                          (if (match-beginning 2)
+                              '("\\1CXX\\3" "\\1C\\3" "\\1G77\\3")
+                            '("\\1CXX\\3" "\\1C\\3" "\\1Fortran\\3"))
+                          "\n"))
+             rlt t))
+  (setq rlt (replace-regexp-in-string
+             "\\(.*\\)<CONFIG>\\(.*\\)"
+             (mapconcat 'identity '("\\1DEBUG\\2" "\\1RELEASE\\2"
+                                    "\\1RELWITHDEBINFO\\2" "\\1MINSIZEREL\\2")
+                        "\n")
+             rlt))
+  rlt)
+
+(defun company-cmake--fill-candidates-cache (arg)
+  "Fill candidates cache if needed."
+  (let (rlt)
+    (unless company-cmake--candidates-cache
+      (setq company-cmake--candidates-cache (make-hash-table :test 'equal)))
+
+    ;; If hash is empty, fill it.
+    (unless (gethash arg company-cmake--candidates-cache)
+      (with-temp-buffer
+        (let ((res (call-process company-cmake-executable nil t nil arg)))
+          (unless (zerop res)
+            (message "cmake executable exited with error=%d" res)))
+        (setq rlt (buffer-string)))
+      (setq rlt (company-cmake--replace-tags rlt))
+      (puthash arg rlt company-cmake--candidates-cache))
+    ))
+
+(defun company-cmake--parse (prefix content cmd)
+  (let ((pattern (format company-cmake--completion-pattern
+                         (regexp-quote prefix)
+                         (if (zerop (length prefix)) "+" "*")))
+        (lines (split-string content "\n"))
+        rlt)
+    (dolist (line lines)
+      (when (string-match pattern line)
+        (let ((match (match-string 1 line)))
+          (when match
+            (puthash match cmd company-cmake--meta-command-cache)
+            (push match rlt)))))
+    rlt))
+
+(defun company-cmake--candidates (prefix)
+  (let (results
+        cmd-opts
+        str)
+
+    (unless company-cmake--meta-command-cache
+      (setq company-cmake--meta-command-cache (make-hash-table :test 'equal)))
+
+    (dolist (arg company-cmake-executable-arguments)
+      (company-cmake--fill-candidates-cache arg)
+      (setq cmd-opts (replace-regexp-in-string "-list$" "" arg) )
+
+      (setq str (gethash arg company-cmake--candidates-cache))
+      (when str
+        (setq results (nconc results
+                             (company-cmake--parse prefix str cmd-opts)))))
+    results))
+
+(defun company-cmake--unexpand-candidate (candidate)
+  (cond
+   ((string-match "^CMAKE_\\(C\\|CXX\\|Fortran\\)\\(_.*\\)$" candidate)
+    (setq candidate (concat "CMAKE_<LANG>" (match-string 2 candidate))))
+
+   ;; C flags
+   ((string-match "^\\(.*_\\)IS_GNU\\(C\\|CXX\\|G77\\)$" candidate)
+    (setq candidate (concat (match-string 1 candidate) "IS_GNU<LANG>")))
+
+   ;; C flags
+   ((string-match "^\\(.*_\\)OVERRIDE_\\(C\\|CXX\\|Fortran\\)$" candidate)
+    (setq candidate (concat (match-string 1 candidate) "OVERRIDE_<LANG>")))
+
+   ((string-match "^\\(.*\\)\\(_DEBUG\\|_RELEASE\\|_RELWITHDEBINFO\\|_MINSIZEREL\\)\\(.*\\)$" candidate)
+    (setq candidate (concat (match-string 1 candidate)
+                            "_<CONFIG>"
+                            (match-string 3 candidate)))))
+  candidate)
+
+(defun company-cmake--meta (candidate)
+  (let ((cmd-opts (gethash candidate company-cmake--meta-command-cache))
+        result)
+    (setq candidate (company-cmake--unexpand-candidate candidate))
+
+    ;; Don't cache the documentation of every candidate (command)
+    ;; Cache in this case will cost too much memory.
+    (with-temp-buffer
+      (call-process company-cmake-executable nil t nil cmd-opts candidate)
+      ;; Go to the third line, trim it and return the result.
+      ;; Tested with cmake 2.8.9.
+      (goto-char (point-min))
+      (forward-line 2)
+      (setq result (buffer-substring-no-properties (line-beginning-position)
+                                                   (line-end-position)))
+      (setq result (replace-regexp-in-string "^[ \t\n\r]+" "" result))
+      result)))
+
+(defun company-cmake--doc-buffer (candidate)
+  (let ((cmd-opts (gethash candidate company-cmake--meta-command-cache)))
+
+    (setq candidate (company-cmake--unexpand-candidate candidate))
+    (with-temp-buffer
+      (call-process company-cmake-executable nil t nil cmd-opts candidate)
+      ;; Go to the third line, trim it and return the doc buffer.
+      ;; Tested with cmake 2.8.9.
+      (goto-char (point-min))
+      (forward-line 2)
+      (company-doc-buffer
+       (buffer-substring-no-properties (line-beginning-position)
+                                       (point-max))))))
+
+(defun company-cmake-prefix-dollar-brace-p ()
+  "Test if the current symbol follows ${."
+  (save-excursion
+    (skip-syntax-backward "w_")
+    (and (eq (char-before (point)) ?\{)
+         (eq (char-before (1- (point))) ?$))))
+
+(defun company-cmake (command &optional arg &rest _ignored)
+  "`company-mode' completion backend for CMake.
+CMake is a cross-platform, open-source make system."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-cmake))
+    (init (when (memq major-mode company-cmake-modes)
+            (unless company-cmake-executable
+              (error "Company found no cmake executable"))))
+    (prefix (and (memq major-mode company-cmake-modes)
+                 (or (not (company-in-string-or-comment))
+                     (company-cmake-prefix-dollar-brace-p))
+                 (company-grab-symbol)))
+    (candidates (company-cmake--candidates arg))
+    (meta (company-cmake--meta arg))
+    (doc-buffer (company-cmake--doc-buffer arg))
+    ))
+
+(provide 'company-cmake)
+;;; company-cmake.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-cmake.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-cmake.elc
new file mode 100644
index 0000000..f54d930
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-cmake.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-css.el b/emacs/.emacs.d/elpa/company-20260721.100/company-css.el
new file mode 100644
index 0000000..21f5b76
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-css.el
@@ -0,0 +1,446 @@
+;;; company-css.el --- company-mode completion backend for css-mode  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2015, 2018  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; In Emacs >= 26, company-capf is used instead.
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+
+(declare-function web-mode-language-at-pos "web-mode" (&optional pos))
+
+(defconst company-css-property-alist
+  ;; see http://www.w3.org/TR/CSS21/propidx.html
+  '(("azimuth" angle "left-side" "far-left" "left" "center-left" "center"
+     "center-right" "right" "far-right" "right-side" "behind" "leftwards"
+     "rightwards")
+    ("background" background-color background-image background-repeat
+     background-attachment background-position
+     background-clip background-origin background-size)
+    ("background-attachment" "scroll" "fixed")
+    ("background-color" color "transparent")
+    ("background-image" uri "none")
+    ("background-position" percentage length "left" "center" "right" percentage
+     length "top" "center" "bottom" "left" "center" "right" "top" "center"
+     "bottom")
+    ("background-repeat" "repeat" "repeat-x" "repeat-y" "no-repeat")
+    ("border" border-width border-style border-color)
+    ("border-bottom" border)
+    ("border-bottom-color" border-color)
+    ("border-bottom-style" border-style)
+    ("border-bottom-width" border-width)
+    ("border-collapse" "collapse" "separate")
+    ("border-color" color "transparent")
+    ("border-left" border)
+    ("border-left-color" border-color)
+    ("border-left-style" border-style)
+    ("border-left-width" border-width)
+    ("border-right" border)
+    ("border-right-color" border-color)
+    ("border-right-style" border-style)
+    ("border-right-width" border-width)
+    ("border-spacing" length length)
+    ("border-style" border-style)
+    ("border-top" border)
+    ("border-top-color" border-color)
+    ("border-top-style" border-style)
+    ("border-top-width" border-width)
+    ("border-width" border-width)
+    ("bottom" length percentage "auto")
+    ("caption-side" "top" "bottom")
+    ("clear" "none" "left" "right" "both")
+    ("clip" shape "auto")
+    ("color" color)
+    ("content" "normal" "none" string uri counter "attr()" "open-quote"
+     "close-quote" "no-open-quote" "no-close-quote")
+    ("counter-increment" identifier integer "none")
+    ("counter-reset" identifier integer "none")
+    ("cue" cue-before cue-after)
+    ("cue-after" uri "none")
+    ("cue-before" uri "none")
+    ("cursor" uri "*" "auto" "crosshair" "default" "pointer" "move" "e-resize"
+     "ne-resize" "nw-resize" "n-resize" "se-resize" "sw-resize" "s-resize"
+     "w-resize" "text" "wait" "help" "progress")
+    ("direction" "ltr" "rtl")
+    ("display" "inline" "block" "list-item" "run-in" "inline-block" "table"
+     "inline-table" "table-row-group" "table-header-group" "table-footer-group"
+     "table-row" "table-column-group" "table-column" "table-cell"
+     "table-caption" "none")
+    ("elevation" angle "below" "level" "above" "higher" "lower")
+    ("empty-cells" "show" "hide")
+    ("float" "left" "right" "none")
+    ("font" font-style font-weight font-size "/" line-height
+     font-family "caption" "icon" "menu" "message-box" "small-caption"
+     "status-bar" "normal" "small-caps"
+     ;; CSS3
+     font-stretch)
+    ("font-family" family-name generic-family)
+    ("font-size" absolute-size relative-size length percentage)
+    ("font-style" "normal" "italic" "oblique")
+    ("font-weight" "normal" "bold" "bolder" "lighter" "100" "200" "300" "400"
+     "500" "600" "700" "800" "900")
+    ("height" length percentage "auto")
+    ("left" length percentage "auto")
+    ("letter-spacing" "normal" length)
+    ("line-height" "normal" number length percentage)
+    ("list-style" list-style-type list-style-position list-style-image)
+    ("list-style-image" uri "none")
+    ("list-style-position" "inside" "outside")
+    ("list-style-type" "disc" "circle" "square" "decimal" "decimal-leading-zero"
+     "lower-roman" "upper-roman" "lower-greek" "lower-latin" "upper-latin"
+     "armenian" "georgian" "lower-alpha" "upper-alpha" "none")
+    ("margin" margin-width)
+    ("margin-bottom" margin-width)
+    ("margin-left" margin-width)
+    ("margin-right" margin-width)
+    ("margin-top" margin-width)
+    ("max-height" length percentage "none")
+    ("max-width" length percentage "none")
+    ("min-height" length percentage)
+    ("min-width" length percentage)
+    ("orphans" integer)
+    ("outline" outline-color outline-style outline-width)
+    ("outline-color" color "invert")
+    ("outline-style" border-style)
+    ("outline-width" border-width)
+    ("overflow" "visible" "hidden" "scroll" "auto"
+     ;; CSS3:
+     "no-display" "no-content")
+    ("padding" padding-width)
+    ("padding-bottom" padding-width)
+    ("padding-left" padding-width)
+    ("padding-right" padding-width)
+    ("padding-top" padding-width)
+    ("page-break-after" "auto" "always" "avoid" "left" "right")
+    ("page-break-before" "auto" "always" "avoid" "left" "right")
+    ("page-break-inside" "avoid" "auto")
+    ("pause" time percentage)
+    ("pause-after" time percentage)
+    ("pause-before" time percentage)
+    ("pitch" frequency "x-low" "low" "medium" "high" "x-high")
+    ("pitch-range" number)
+    ("play-during" uri "mix" "repeat" "auto" "none")
+    ("position" "static" "relative" "absolute" "fixed")
+    ("quotes" string string "none")
+    ("richness" number)
+    ("right" length percentage "auto")
+    ("speak" "normal" "none" "spell-out")
+    ("speak-header" "once" "always")
+    ("speak-numeral" "digits" "continuous")
+    ("speak-punctuation" "code" "none")
+    ("speech-rate" number "x-slow" "slow" "medium" "fast" "x-fast" "faster"
+     "slower")
+    ("stress" number)
+    ("table-layout" "auto" "fixed")
+    ("text-align" "left" "right" "center" "justify")
+    ("text-indent" length percentage)
+    ("text-transform" "capitalize" "uppercase" "lowercase" "none")
+    ("top" length percentage "auto")
+    ("unicode-bidi" "normal" "embed" "bidi-override")
+    ("vertical-align" "baseline" "sub" "super" "top" "text-top" "middle"
+     "bottom" "text-bottom" percentage length)
+    ("visibility" "visible" "hidden" "collapse")
+    ("voice-family" specific-voice generic-voice "*" specific-voice
+     generic-voice)
+    ("volume" number percentage "silent" "x-soft" "soft" "medium" "loud"
+     "x-loud")
+    ("white-space" "normal" "pre" "nowrap" "pre-wrap" "pre-line")
+    ("widows" integer)
+    ("width" length percentage "auto")
+    ("word-spacing" "normal" length)
+    ("z-index" "auto" integer)
+    ;; CSS3
+    ("align-content" align-stretch "space-between" "space-around")
+    ("align-items" align-stretch "baseline")
+    ("align-self" align-items "auto")
+    ("animation" animation-name animation-duration animation-timing-function
+     animation-delay animation-iteration-count animation-direction
+     animation-fill-mode)
+    ("animation-delay" time)
+    ("animation-direction" "normal" "reverse" "alternate" "alternate-reverse")
+    ("animation-duration" time)
+    ("animation-fill-mode" "none" "forwards" "backwards" "both")
+    ("animation-iteration-count" integer "infinite")
+    ("animation-name" "none")
+    ("animation-play-state" "paused" "running")
+    ("animation-timing-function" transition-timing-function
+     "step-start" "step-end" "steps(,)")
+    ("backface-visibility" "visible" "hidden")
+    ("background-clip" background-origin)
+    ("background-origin" "border-box" "padding-box" "content-box")
+    ("background-size" length percentage "auto" "cover" "contain")
+    ("border-image" border-image-outset border-image-repeat border-image-source
+     border-image-slice border-image-width)
+    ("border-image-outset" length)
+    ("border-image-repeat" "stretch" "repeat" "round" "space")
+    ("border-image-source" uri "none")
+    ("border-image-slice" length)
+    ("border-image-width" length percentage)
+    ("border-radius" length)
+    ("border-top-left-radius" length)
+    ("border-top-right-radius" length)
+    ("border-bottom-left-radius" length)
+    ("border-bottom-right-radius" length)
+    ("box-decoration-break" "slice" "clone")
+    ("box-shadow" length color)
+    ("box-sizing" "content-box" "border-box")
+    ("break-after" "auto" "always" "avoid" "left" "right" "page" "column"
+     "avoid-page" "avoid-column")
+    ("break-before" break-after)
+    ("break-inside" "avoid" "auto")
+    ("columns" column-width column-count)
+    ("column-count" integer)
+    ("column-fill" "auto" "balance")
+    ("column-gap" length "normal")
+    ("column-rule" column-rule-width column-rule-style column-rule-color)
+    ("column-rule-color" color)
+    ("column-rule-style" border-style)
+    ("column-rule-width" border-width)
+    ("column-span" "all" "none")
+    ("column-width" length "auto")
+    ("filter" url "blur()" "brightness()" "contrast()" "drop-shadow()"
+     "grayscale()" "hue-rotate()" "invert()" "opacity()" "saturate()" "sepia()")
+    ("flex" flex-grow flex-shrink flex-basis)
+    ("flex-basis" percentage length "auto")
+    ("flex-direction" "row" "row-reverse" "column" "column-reverse")
+    ("flex-flow" flex-direction flex-wrap)
+    ("flex-grow" number)
+    ("flex-shrink" number)
+    ("flex-wrap" "nowrap" "wrap" "wrap-reverse")
+    ("font-feature-setting" normal string number)
+    ("font-kerning" "auto" "normal" "none")
+    ("font-language-override" "normal" string)
+    ("font-size-adjust" "none" number)
+    ("font-stretch" "normal" "ultra-condensed" "extra-condensed" "condensed"
+     "semi-condensed" "semi-expanded" "expanded" "extra-expanded" "ultra-expanded")
+    ("font-synthesis" "none" "weight" "style")
+    ("font-variant" font-variant-alternates font-variant-caps
+     font-variant-east-asian font-variant-ligatures font-variant-numeric
+     font-variant-position)
+    ("font-variant-alternates" "normal" "historical-forms" "stylistic()"
+     "styleset()" "character-variant()" "swash()" "ornaments()" "annotation()")
+    ("font-variant-caps" "normal" "small-caps" "all-small-caps" "petite-caps"
+     "all-petite-caps" "unicase" "titling-caps")
+    ("font-variant-east-asian" "jis78" "jis83" "jis90" "jis04" "simplified"
+     "traditional" "full-width" "proportional-width" "ruby")
+    ("font-variant-ligatures" "normal" "none" "common-ligatures"
+     "no-common-ligatures" "discretionary-ligatures" "no-discretionary-ligatures"
+     "historical-ligatures" "no-historical-ligatures" "contextual" "no-contextual")
+    ("font-variant-numeric" "normal" "ordinal" "slashed-zero"
+     "lining-nums" "oldstyle-nums" "proportional-nums" "tabular-nums"
+     "diagonal-fractions" "stacked-fractions")
+    ("font-variant-position" "normal" "sub" "super")
+    ("hyphens" "none" "manual" "auto")
+    ("justify-content" align-common "space-between" "space-around")
+    ("line-break" "auto" "loose" "normal" "strict")
+    ("marquee-direction" "forward" "reverse")
+    ("marquee-play-count" integer "infinite")
+    ("marquee-speed" "slow" "normal" "fast")
+    ("marquee-style" "scroll" "slide" "alternate")
+    ("opacity" number)
+    ("order" number)
+    ("outline-offset" length)
+    ("overflow-x" overflow)
+    ("overflow-y" overflow)
+    ("overflow-style" "auto" "marquee-line" "marquee-block")
+    ("overflow-wrap" "normal" "break-word")
+    ("perspective" "none" length)
+    ("perspective-origin" percentage length "left" "center" "right" "top" "bottom")
+    ("resize" "none" "both" "horizontal" "vertical")
+    ("tab-size" integer length)
+    ("text-align-last" "auto" "start" "end" "left" "right" "center" "justify")
+    ("text-decoration" text-decoration-color text-decoration-line text-decoration-style)
+    ("text-decoration-color" color)
+    ("text-decoration-line" "none" "underline" "overline" "line-through" "blink")
+    ("text-decoration-style" "solid" "double" "dotted" "dashed" "wavy")
+    ("text-overflow" "clip" "ellipsis")
+    ("text-shadow" color length)
+    ("text-underline-position" "auto" "under" "left" "right")
+    ("transform" "matrix(,,,,,)" "translate(,)" "translateX()" "translateY()"
+     "scale()" "scaleX()" "scaleY()" "rotate()" "skewX()" "skewY()" "none")
+    ("transform-origin" perspective-origin)
+    ("transform-style" "flat" "preserve-3d")
+    ("transition" transition-property transition-duration
+     transition-timing-function transition-delay)
+    ("transition-delay" time)
+    ("transition-duration" time)
+    ("transition-timing-function"
+     "ease" "linear" "ease-in" "ease-out" "ease-in-out" "cubic-bezier(,,,)")
+    ("transition-property" "none" "all" identifier)
+    ("word-wrap" overflow-wrap)
+    ("word-break" "normal" "break-all" "keep-all"))
+  "A list of CSS properties and their possible values.")
+
+(defconst company-css-value-classes
+  '((absolute-size "xx-small" "x-small" "small" "medium" "large" "x-large"
+                   "xx-large")
+    (align-common "flex-start" "flex-end" "center")
+    (align-stretch align-common "stretch")
+    (border-style "none" "hidden" "dotted" "dashed" "solid" "double" "groove"
+                  "ridge" "inset" "outset")
+    (border-width "thick" "medium" "thin")
+    (color "aqua" "black" "blue" "fuchsia" "gray" "green" "lime" "maroon" "navy"
+           "olive" "orange" "purple" "red" "silver" "teal" "white" "yellow")
+    (counter "counter(,)")
+    (family-name "Courier" "Helvetica" "Times")
+    (generic-family "serif" "sans-serif" "cursive" "fantasy" "monospace")
+    (generic-voice "male" "female" "child")
+    (margin-width "auto") ;; length percentage
+    (relative-size "larger" "smaller")
+    (shape "rect(,,,)")
+    (uri "url()"))
+  "A list of CSS property value classes and their contents.")
+;; missing, because not completable
+;; <angle><frequency><identifier><integer><length><number><padding-width>
+;; <percentage><specific-voice><string><time><uri>
+
+(defconst company-css-html-tags
+  '("a" "abbr" "acronym" "address" "applet" "area" "b" "base" "basefont" "bdo"
+    "big" "blockquote" "body" "br" "button" "caption" "center" "cite" "code"
+    "col" "colgroup" "dd" "del" "dfn" "dir" "div" "dl" "dt" "em" "fieldset"
+    "font" "form" "frame" "frameset" "h1" "h2" "h3" "h4" "h5" "h6" "head" "hr"
+    "html" "i" "iframe" "img" "input" "ins" "isindex" "kbd" "label" "legend"
+    "li" "link" "map" "menu" "meta" "noframes" "noscript" "object" "ol"
+    "optgroup" "option" "p" "param" "pre" "q" "s" "samp" "script" "select"
+    "small" "span" "strike" "strong" "style" "sub" "sup" "table" "tbody" "td"
+    "textarea" "tfoot" "th" "thead" "title" "tr" "tt" "u" "ul" "var"
+    ;; HTML5
+    "section" "article" "aside" "header" "footer" "nav" "figure" "figcaption"
+    "time" "mark" "main")
+  "A list of HTML tags for use in CSS completion.")
+
+(defconst company-css-pseudo-classes
+  '("active" "after" "before" "first" "first-child" "first-letter" "first-line"
+    "focus" "hover" "lang" "left" "link" "right" "visited")
+  "Identifiers for CSS pseudo-elements and pseudo-classes.")
+
+(defconst company-css-property-cache (make-hash-table :size 115 :test 'equal))
+
+(defun company-css-property-values (attribute)
+  "Access the `company-css-property-alist' cached and flattened."
+  (or (gethash attribute company-css-property-cache)
+      (let (results)
+        (dolist (value (cdr (assoc attribute company-css-property-alist)))
+          (if (symbolp value)
+              (dolist (child (or (cdr (assoc value company-css-value-classes))
+                                 (company-css-property-values
+                                  (symbol-name value))))
+                (push child results))
+            (push value results)))
+        (setq results (sort results 'string<))
+        (puthash attribute
+                 (if (fboundp 'delete-consecutive-dups)
+                     (delete-consecutive-dups results)
+                   (delete-dups results))
+                 company-css-property-cache)
+        results)))
+
+;;; bracket detection
+
+(defconst company-css-braces-syntax-table
+  (let ((table (make-syntax-table)))
+    (setf (aref table ?{) '(4 . 125))
+    (setf (aref table ?}) '(5 . 123))
+    table)
+  "A syntax table giving { and } paren syntax.")
+
+(defun company-css-inside-braces-p ()
+  "Return non-nil, if point is within matched { and }."
+  (ignore-errors
+    (with-syntax-table company-css-braces-syntax-table
+      (let ((parse-sexp-ignore-comments t))
+        (scan-lists (point) -1 1)))))
+
+;;; tags
+(defconst company-css-tag-regexp
+  (concat "\\(?:\\`\\|}\\)[[:space:]]*"
+          ;; multiple
+          "\\(?:"
+          ;; previous tags:
+          "\\(?:#\\|\\_<[[:alpha:]]\\)[[:alnum:]-#]*\\(?:\\[[^]]*\\]\\)?"
+          ;; space or selectors
+          "\\(?:[[:space:]]+\\|[[:space:]]*[+,>][[:space:]]*\\)"
+          "\\)*"
+          "\\(\\(?:#\\|\\_<[[:alpha:]]\\)\\(?:[[:alnum:]-#]*\\_>\\)?\\_>\\|\\)"
+          "\\=")
+  "A regular expression matching CSS tags.")
+
+;;; pseudo id
+(defconst company-css-pseudo-regexp
+  (concat "\\(?:\\`\\|}\\)[[:space:]]*"
+          ;; multiple
+          "\\(?:"
+          ;; previous tags:
+          "\\(?:#\\|\\_<[[:alpha:]]\\)[[:alnum:]-#]*\\(?:\\[[^]]*\\]\\)?"
+          ;; space or delimiters
+          "\\(?:[[:space:]]+\\|[[:space:]]*[+,>][[:space:]]*\\)"
+          "\\)*"
+          "\\(?:\\(?:\\#\\|\\_<[[:alpha:]]\\)[[:alnum:]-#]*\\):"
+          "\\([[:alpha:]-]+\\_>\\|\\)\\_>\\=")
+  "A regular expression matching CSS pseudo classes.")
+
+;;; properties
+
+(defun company-css-grab-property ()
+  "Return the CSS property before point, if any.
+Returns \"\" if no property found, but feasible at this position."
+  (when (company-css-inside-braces-p)
+    (company-grab-symbol)))
+
+;;; values
+(defconst company-css-property-value-regexp
+  "\\_<\\([[:alpha:]-]+\\):\\(?:[^{};]*[[:space:]]+\\)?\\([^{};]*\\_>\\|\\)\\="
+  "A regular expression matching CSS tags.")
+
+;;;###autoload
+(defun company-css (command &optional arg &rest _ignored)
+  "`company-mode' completion backend for `css-mode'."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-css))
+    (prefix (and (or (derived-mode-p 'css-mode)
+                     (and (derived-mode-p 'web-mode)
+                          (string= (web-mode-language-at-pos) "css")))
+                 (or (company-grab company-css-tag-regexp 1)
+                     (company-grab company-css-pseudo-regexp 1)
+                     (company-grab company-css-property-value-regexp 2
+                                   (line-beginning-position))
+                     (company-css-grab-property))))
+    (candidates
+     (cond
+      ((company-grab company-css-tag-regexp 1)
+       (all-completions arg company-css-html-tags))
+      ((company-grab company-css-pseudo-regexp 1)
+       (all-completions arg company-css-pseudo-classes))
+      ((company-grab company-css-property-value-regexp 2
+                     (line-beginning-position))
+       (all-completions arg
+                        (company-css-property-values
+                         (company-grab company-css-property-value-regexp 1))))
+      ((company-css-grab-property)
+       (all-completions arg company-css-property-alist))))
+    (sorted t)))
+
+(provide 'company-css)
+;;; company-css.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-css.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-css.elc
new file mode 100644
index 0000000..b7ad7d1
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-css.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev-code.el b/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev-code.el
new file mode 100644
index 0000000..7e69ff3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev-code.el
@@ -0,0 +1,187 @@
+;;; company-dabbrev-code.el --- dabbrev-like company-mode backend for code  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2016, 2021-2025  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'company-dabbrev)
+(require 'cl-lib)
+
+(defgroup company-dabbrev-code nil
+  "dabbrev-like completion backend for code."
+  :group 'company)
+
+(defcustom company-dabbrev-code-modes
+  '(prog-mode
+    batch-file-mode csharp-mode css-mode erlang-mode haskell-mode jde-mode
+    lua-mode python-mode)
+  "Modes that use `company-dabbrev-code'.
+In all these modes (and their derivatives) `company-dabbrev-code' will
+complete only symbols, not text in comments or strings.  In other modes
+`company-dabbrev-code' will pass control to other backends
+\(e.g. `company-dabbrev'\).  Value t means complete in all modes."
+  :type '(choice (repeat :tag "Some modes" (symbol :tag "Major mode"))
+                 (const :tag "All modes" t)))
+
+(defcustom company-dabbrev-code-other-buffers t
+  "Determines whether `company-dabbrev-code' should search other buffers.
+If `all', search all other buffers, except the ignored ones.  If t, search
+buffers with the same major mode.  If `code', search all
+buffers with major modes in `company-dabbrev-code-modes', or derived from one of
+them.  This can also be a function that takes the current buffer as
+parameter and returns a list of major modes to search.  See also
+`company-dabbrev-code-time-limit'."
+  :type '(choice (const :tag "Off" nil)
+                 (const :tag "Same major mode" t)
+                 (const :tag "Code major modes" code)
+                 (const :tag "All" all)
+                 (function :tag "Function to return similar major-modes" group)))
+
+(defcustom company-dabbrev-code-time-limit .1
+  "Determines how long `company-dabbrev-code' should look for matches."
+  :type '(choice (const :tag "Off" nil)
+                 (number :tag "Seconds")))
+
+(defcustom company-dabbrev-code-everywhere nil
+  "Non-nil to offer completions in comments and strings."
+  :type 'boolean)
+
+(defcustom company-dabbrev-code-ignore-case nil
+  "Non-nil to ignore case when collecting completion candidates."
+  :type 'boolean)
+
+(defcustom company-dabbrev-code-completion-styles nil
+  "Non-nil to use the completion styles for fuzzy matching."
+  :type '(choice (const :tag "Prefix matching only" nil)
+                 (const :tag "Matching according to `completion-styles'" t)
+                 (list :tag "Custom list of styles" symbol))
+  :package-version '(company . "1.0.0"))
+
+(defvar-local company-dabbrev--boundaries nil)
+(defvar-local company-dabbrev-code--sorted nil)
+
+(defun company-dabbrev-code--make-regexp (prefix)
+  (let ((prefix-re
+         (cond
+          ((string-empty-p prefix)
+           "\\([a-zA-Z]\\|\\s_\\)")
+          ((not company-dabbrev-code-completion-styles)
+           (regexp-quote prefix))
+          (t
+           ;; Use the cache at least after 2 chars.  We could also cache
+           ;; earlier, for users who set company-min-p-l to 1 or 0.
+           (let ((prefix (if (>= (length prefix) 2)
+                             (substring prefix 0 2)
+                           prefix)))
+             (concat
+              "\\(\\sw\\|\\s_\\)*"
+              (mapconcat #'regexp-quote
+                         (mapcar #'string prefix)
+                         "\\(\\sw\\|\\s_\\)*")))))))
+    (concat "\\_<" prefix-re "\\(\\sw\\|\\s_\\)*\\_>")))
+
+;;;###autoload
+(defun company-dabbrev-code (command &optional arg &rest rest)
+  "dabbrev-like `company-mode' backend for code.
+The backend looks for all symbols in the current buffer that aren't in
+comments or strings."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-dabbrev-code))
+    (prefix (and (or (eq t company-dabbrev-code-modes)
+                     (cl-some #'derived-mode-p company-dabbrev-code-modes))
+                 (or company-dabbrev-code-everywhere
+                     (not (company-in-string-or-comment)))
+                 (company-grab-symbol-parts)))
+    (candidates (company-dabbrev--candidates arg (car rest)))
+    (adjust-boundaries (and company-dabbrev-code-completion-styles
+                            (company--capf-boundaries
+                             company-dabbrev--boundaries)))
+    (expand-common (company-dabbrev-code--expand-common arg (car rest)))
+    (kind 'text)
+    (sorted company-dabbrev-code--sorted)
+    (no-cache t)
+    (ignore-case company-dabbrev-code-ignore-case)
+    (match (when company-dabbrev-code-completion-styles
+             (company--match-from-capf-face arg)))
+    (duplicates t)))
+
+(defun company-dabbrev-code--expand-common (prefix suffix)
+  (when company-dabbrev-code-completion-styles
+    (let ((completion-styles (if (listp company-dabbrev-code-completion-styles)
+                                 company-dabbrev-code-completion-styles
+                               completion-styles)))
+      (company--capf-expand-common prefix suffix
+                                   (company-dabbrev-code--table prefix)))))
+
+(defun company-dabbrev--candidates (prefix suffix)
+  (let* ((case-fold-search company-dabbrev-code-ignore-case))
+    (company-dabbrev-code--filter
+     prefix suffix
+     (company-dabbrev-code--table prefix))))
+
+(defun company-dabbrev-code--table (prefix)
+  (let ((regexp (company-dabbrev-code--make-regexp prefix)))
+    (company-cache-fetch
+     'dabbrev-code-candidates
+     (lambda ()
+       (company-dabbrev--search
+        regexp
+        company-dabbrev-code-time-limit
+        (pcase company-dabbrev-code-other-buffers
+          (`t (list major-mode))
+          (`code company-dabbrev-code-modes)
+          (`all `all)
+          ((pred functionp) (funcall company-dabbrev-code-other-buffers (current-buffer))))
+        (not company-dabbrev-code-everywhere)))
+     :expire t
+     :check-tag
+     (cons regexp company-dabbrev-code-completion-styles))))
+
+(defun company-dabbrev-code--filter (prefix suffix table)
+  (let ((completion-ignore-case company-dabbrev-code-ignore-case)
+        (completion-styles (if (listp company-dabbrev-code-completion-styles)
+                               company-dabbrev-code-completion-styles
+                             completion-styles))
+        (metadata (completion-metadata prefix table nil))
+        res)
+    (if (not company-dabbrev-code-completion-styles)
+        (all-completions prefix table)
+      (setq res (company--capf-completions
+                 prefix suffix
+                 table nil
+                 metadata))
+      (when-let* ((sort-fn (completion-metadata-get metadata 'display-sort-function)))
+        (setq company-dabbrev-code--sorted t)
+        (setf (alist-get :completions res)
+              (funcall sort-fn (alist-get :completions res))))
+      (setq company-dabbrev--boundaries
+            (company--capf-boundaries-markers
+             (assoc-default :boundaries res)
+             company-dabbrev--boundaries))
+      (assoc-default :completions res))))
+
+(provide 'company-dabbrev-code)
+;;; company-dabbrev-code.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev-code.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev-code.elc
new file mode 100644
index 0000000..1f2fd13
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev-code.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev.el b/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev.el
new file mode 100644
index 0000000..c228ada
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev.el
@@ -0,0 +1,226 @@
+;;; company-dabbrev.el --- dabbrev-like company-mode completion backend  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2018, 2021-2023  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+
+(defgroup company-dabbrev nil
+  "dabbrev-like completion backend."
+  :group 'company)
+
+(defcustom company-dabbrev-other-buffers 'all
+  "Determines whether `company-dabbrev' should search other buffers.
+If `all', search all other buffers, except the ignored ones.  If t, search
+buffers with the same major mode.  This can also be a function that takes
+the current buffer as parameter and returns a list of major modes to
+search.  See also `company-dabbrev-time-limit'."
+  :type '(choice (const :tag "Off" nil)
+                 (const :tag "Same major mode" t)
+                 (const :tag "All" all)
+                 (function :tag "Function to return similar major-modes" group)))
+
+(defcustom company-dabbrev-ignore-buffers "\\`[ *]"
+  "Regexp matching the names of buffers to ignore.
+Or a function that returns non-nil for such buffers."
+  :type '(choice (regexp :tag "Regexp")
+                 (function :tag "Predicate"))
+  :package-version '(company . "0.9.0"))
+
+(defcustom company-dabbrev-time-limit .1
+  "Determines how many seconds `company-dabbrev' should look for matches."
+  :type '(choice (const :tag "Off" nil)
+                 (number :tag "Seconds")))
+
+(defcustom company-dabbrev-char-regexp "\\sw"
+  "A regular expression matching the characters `company-dabbrev' looks for."
+  :type 'regexp)
+
+(defcustom company-dabbrev-ignore-case 'keep-prefix
+  "Non-nil to ignore case when collecting completion candidates.
+When it's `keep-prefix', the text before point will remain unchanged after
+candidate is inserted, even some of its characters have different case."
+  :type '(choice
+          (const :tag "Don't ignore case" nil)
+          (const :tag "Ignore case" t)
+          (const :tag "Keep case before point" keep-prefix)))
+
+(defcustom company-dabbrev-downcase 'case-replace
+  "Whether to downcase the returned candidates.
+
+The value of nil means keep them as-is.
+`case-replace' means use the value of `case-replace'.
+Any other value means downcase."
+  :type '(choice
+          (const :tag "Keep as-is" nil)
+          (const :tag "Downcase" t)
+          (const :tag "Use case-replace" case-replace)))
+
+(defcustom company-dabbrev-minimum-length 4
+  "The minimum length for the completion candidate to be included.
+This variable affects both `company-dabbrev' and `company-dabbrev-code'."
+  :type 'integer
+  :package-version '(company . "0.8.3"))
+
+(defcustom company-dabbrev-ignore-invisible nil
+  "Non-nil to skip invisible text."
+  :type 'boolean
+  :package-version '(company . "0.9.0"))
+
+(defmacro company-dabbrev--time-limit-while (test start limit freq &rest body)
+  (declare (indent 3) (debug t))
+  `(let ((company-time-limit-while-counter 0))
+     (catch 'done
+       (while ,test
+         ,@body
+         (and ,limit
+              (= (cl-incf company-time-limit-while-counter) ,freq)
+              (setq company-time-limit-while-counter 0)
+              (> (float-time (time-since ,start)) ,limit)
+              (throw 'done 'company-time-out))))))
+
+(defun company-dabbrev--make-regexp ()
+  (concat "\\(?:" company-dabbrev-char-regexp "\\)+"))
+
+(defun company-dabbrev--search-buffer (regexp pos symbols start limit
+                                       ignore-comments)
+  (save-excursion
+    (cl-labels ((maybe-collect-match
+                 ()
+                 (let ((match (match-string-no-properties 0)))
+                   (when (and (>= (length match) company-dabbrev-minimum-length)
+                              (not (and company-dabbrev-ignore-invisible
+                                        (invisible-p (match-beginning 0)))))
+                     (puthash match t symbols)))))
+      (goto-char (if pos (1- pos) (point-min)))
+      ;; Search before pos.
+      (let ((tmp-end (point)))
+        (company-dabbrev--time-limit-while (and (not (input-pending-p))
+                                                (> tmp-end (point-min)))
+            start limit 1
+          (ignore-errors
+            (forward-char -10000))
+          (forward-line 0)
+          (save-excursion
+            ;; Before, we used backward search, but it matches non-greedily, and
+            ;; that forced us to use the "beginning/end of word" anchors in
+            ;; `company-dabbrev--make-regexp'.  It's also about 2x slower.
+            (while (and (not (input-pending-p))
+                        (re-search-forward regexp tmp-end t))
+              (if (and ignore-comments (save-match-data (company-in-string-or-comment)))
+                  (re-search-forward "\\s>\\|\\s!\\|\\s\"" tmp-end t)
+                (maybe-collect-match))))
+          (setq tmp-end (point))))
+      (goto-char (or pos (point-min)))
+      ;; Search after pos.
+      (company-dabbrev--time-limit-while (and (not (input-pending-p))
+                                              (re-search-forward regexp nil t))
+          start limit 25
+        (if (and ignore-comments (save-match-data (company-in-string-or-comment)))
+            (re-search-forward "\\s>\\|\\s!\\|\\s\"" nil t)
+          (maybe-collect-match)))
+      symbols)))
+
+(defun company-dabbrev--search (regexp &optional limit other-buffer-modes
+                                ignore-comments)
+  (let* ((start (current-time))
+         (symbols (company-dabbrev--search-buffer regexp (point)
+                                                  (make-hash-table :test 'equal)
+                                                  start limit
+                                                  ignore-comments)))
+    (when other-buffer-modes
+      (cl-dolist (buffer (delq (current-buffer) (buffer-list)))
+        (unless (if (stringp company-dabbrev-ignore-buffers)
+                    (string-match-p company-dabbrev-ignore-buffers
+                                    (buffer-name buffer))
+                  (funcall company-dabbrev-ignore-buffers buffer))
+          (with-current-buffer buffer
+            (when (or (eq other-buffer-modes 'all)
+                      (cl-some #'derived-mode-p other-buffer-modes))
+              (setq symbols
+                    (company-dabbrev--search-buffer regexp nil symbols start
+                                                    limit ignore-comments)))))
+        (and limit
+             (> (float-time (time-since start)) limit)
+             (cl-return))))
+    symbols))
+
+(defun company-dabbrev--prefix ()
+  ;; Emacs can't do greedy backward-search.
+  (list
+   (company-grab-line (format "\\(?:^\\| \\)[^ ]*?\\(\\(?:%s\\)*\\)"
+                              company-dabbrev-char-regexp)
+                      1)
+   (and (looking-at (format "\\(?:%s\\)*" company-dabbrev-char-regexp))
+        (match-string 0))))
+
+(defun company-dabbrev--filter (prefix candidates)
+  (let* ((completion-ignore-case company-dabbrev-ignore-case)
+         (filtered (all-completions prefix candidates))
+         (lp (length prefix))
+         (downcase (if (eq company-dabbrev-downcase 'case-replace)
+                       case-replace
+                     company-dabbrev-downcase)))
+    (when downcase
+      (let ((ptr filtered))
+        (while ptr
+          (setcar ptr (downcase (car ptr)))
+          (setq ptr (cdr ptr)))))
+    (if (and (eq company-dabbrev-ignore-case 'keep-prefix)
+             (not (= lp 0)))
+        (company-substitute-prefix prefix filtered)
+      filtered)))
+
+(defun company-dabbrev--fetch ()
+  (company-dabbrev--search (company-dabbrev--make-regexp)
+                           company-dabbrev-time-limit
+                           (pcase company-dabbrev-other-buffers
+                             ('t (list major-mode))
+                             ;; `all' is a function starting with Emacs 31.
+                             ('all 'all)
+                             ((pred functionp) (funcall company-dabbrev-other-buffers (current-buffer)))
+                             )))
+
+;;;###autoload
+(defun company-dabbrev (command &optional arg &rest _ignored)
+  "dabbrev-like `company-mode' completion backend."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-dabbrev))
+    (prefix (company-dabbrev--prefix))
+    (candidates
+     (company-dabbrev--filter
+      arg
+      ;; FIXME: Only cache the result of non-interrupted scans?
+      (company-cache-fetch 'dabbrev-candidates #'company-dabbrev--fetch
+                           :expire t)))
+    (kind 'text)
+    (no-cache t)
+    (ignore-case (and company-dabbrev-ignore-case t))
+    (duplicates t)))
+
+(provide 'company-dabbrev)
+;;; company-dabbrev.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev.elc
new file mode 100644
index 0000000..1619e01
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-dabbrev.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-etags.el b/emacs/.emacs.d/elpa/company-20260721.100/company-etags.el
new file mode 100644
index 0000000..e494642
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-etags.el
@@ -0,0 +1,146 @@
+;;; company-etags.el --- company-mode completion backend for etags  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2015, 2018-2019, 2023-2024  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+(require 'etags)
+
+(defgroup company-etags nil
+  "Completion backend for etags."
+  :group 'company)
+
+(defcustom company-etags-use-main-table-list t
+  "Always search `tags-table-list' if set.
+If this is disabled, `company-etags' will try to find the one table for each
+buffer automatically."
+  :type '(choice (const :tag "off" nil)
+                 (const :tag "on" t)))
+
+(defcustom company-etags-ignore-case nil
+  "Non-nil to ignore case in completion candidates."
+  :type 'boolean
+  :package-version '(company . "0.7.3"))
+
+(defcustom company-etags-everywhere nil
+  "Non-nil to offer completions in comments and strings.
+Set it to t or to a list of major modes."
+  :type '(choice (const :tag "Off" nil)
+                 (const :tag "Any supported mode" t)
+                 (repeat :tag "Some major modes"
+                         (symbol :tag "Major mode")))
+  :package-version '(company . "0.9.0"))
+
+(defcustom company-etags-completion-styles nil
+  "Non-nil to use the completion styles for fuzzy matching."
+  :type '(choice (const :tag "Prefix matching only" nil)
+                 (const :tag "Matching according to `completion-styles'" t)
+                 (list :tag "Custom list of styles" symbol))
+  :package-version '(company . "1.0.0"))
+
+(defvar company-etags-modes '(prog-mode c-mode objc-mode c++-mode java-mode
+                              jde-mode pascal-mode perl-mode python-mode))
+
+(defvar-local company-etags-buffer-table 'unknown)
+(defvar-local company-etags--boundaries nil)
+
+(defun company-etags-find-table ()
+  (let ((file (expand-file-name
+               "TAGS"
+               (locate-dominating-file (or buffer-file-name
+                                           default-directory)
+                                       "TAGS"))))
+    (when (and file (file-regular-p file))
+      (list file))))
+
+(defun company-etags-buffer-table ()
+  (or (and company-etags-use-main-table-list tags-table-list)
+      (if (eq company-etags-buffer-table 'unknown)
+          (setq company-etags-buffer-table (company-etags-find-table))
+        company-etags-buffer-table)))
+
+(defun company-etags--candidates (prefix suffix)
+  (let ((completion-ignore-case company-etags-ignore-case)
+        (completion-styles (if (listp company-etags-completion-styles)
+                               company-etags-completion-styles
+                             completion-styles))
+        (table (company-etags--table)))
+    (and table
+         (if company-etags-completion-styles
+             (let ((res (company--capf-completions prefix suffix table)))
+               (setq company-etags--boundaries
+                     (company--capf-boundaries-markers
+                      (assoc-default :boundaries res)
+                      company-etags--boundaries))
+               (assoc-default :completions res))
+           (all-completions prefix table)))))
+
+(defun company-etags--table ()
+  (let ((tags-table-list (company-etags-buffer-table))
+        (tags-file-name tags-file-name))
+    (and (or tags-file-name tags-table-list)
+         (fboundp 'tags-completion-table)
+         (save-excursion
+           (visit-tags-table-buffer)
+           (tags-completion-table)))))
+
+(defun company-etags--expand-common (prefix suffix)
+  (when company-etags-completion-styles
+    (let ((completion-styles (if (listp company-etags-completion-styles)
+                                 company-etags-completion-styles
+                               completion-styles)))
+      (company--capf-expand-common prefix suffix
+                                   (company-etags--table)))))
+
+;;;###autoload
+(defun company-etags (command &optional arg &rest rest)
+  "`company-mode' completion backend for etags."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-etags))
+    (prefix (and (cl-some #'derived-mode-p company-etags-modes)
+                 (or (eq t company-etags-everywhere)
+                     (cl-some #'derived-mode-p company-etags-everywhere)
+                     (not (company-in-string-or-comment)))
+                 (company-etags-buffer-table)
+                 (company-grab-symbol-parts)))
+    (candidates (company-etags--candidates arg (car rest)))
+    (adjust-boundaries (and company-etags-completion-styles
+                            (company--capf-boundaries
+                             company-etags--boundaries)))
+    (expand-common (company-etags--expand-common arg (car rest)))
+    (no-cache company-etags-completion-styles)
+    (location (let ((tags-table-list (company-etags-buffer-table)))
+                (when (fboundp 'find-tag-noselect)
+                  (save-excursion
+                    (let ((buffer (find-tag-noselect arg)))
+                      (cons buffer (with-current-buffer buffer (point))))))))
+    (match (when company-etags-completion-styles
+             (company--match-from-capf-face arg)))
+    (ignore-case company-etags-ignore-case)))
+
+(provide 'company-etags)
+;;; company-etags.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-etags.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-etags.elc
new file mode 100644
index 0000000..406b1d5
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-etags.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-files.el b/emacs/.emacs.d/elpa/company-20260721.100/company-files.el
new file mode 100644
index 0000000..64c8969
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-files.el
@@ -0,0 +1,157 @@
+;;; company-files.el --- company-mode completion backend for file names  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2024  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+
+(defgroup company-files nil
+  "Completion backend for file names."
+  :group 'company)
+
+(defcustom company-files-exclusions nil
+  "A list of file name extensions and directory names to ignore.
+The values should use the same format as `completion-ignored-extensions'."
+  :type '(repeat (string :tag "File extension or directory name"))
+  :package-version '(company . "0.9.1"))
+
+(defun company-files--directory-files (dir prefix)
+  ;; Don't use directory-files. It produces directories without trailing /.
+  (condition-case _err
+      (let ((comp (sort (file-name-all-completions prefix dir)
+                        (lambda (s1 s2) (string-lessp (downcase s1) (downcase s2))))))
+        (when company-files-exclusions
+          (setq comp (company-files--exclusions-filtered comp)))
+        (if (string-empty-p prefix)
+            (delete "../" (delete "./" comp))
+          comp))
+    (file-error nil)))
+
+(defun company-files--exclusions-filtered (completions)
+  (let* ((dir-exclusions (cl-remove-if-not #'company-files--trailing-slash-p
+                                           company-files-exclusions))
+         (file-exclusions (cl-set-difference company-files-exclusions
+                                             dir-exclusions)))
+    (cl-loop for c in completions
+             unless (if (company-files--trailing-slash-p c)
+                        (member c dir-exclusions)
+                      (cl-find-if (lambda (exclusion)
+                                    (string-suffix-p exclusion c))
+                                  file-exclusions))
+             collect c)))
+
+(defvar company-files--regexps
+  (let* ((root (if (eq system-type 'windows-nt)
+                   "[a-zA-Z]:/"
+                 "/"))
+         (begin (concat "\\(?:\\.\\{1,2\\}/\\|~/\\|" root "\\)")))
+    (list (concat "\"\\(" begin "[^\"\n]*\\)")
+          (concat "\'\\(" begin "[^\'\n]*\\)")
+          (concat "\\(?:[ \t=\[]\\|^\\)\\(" begin "[^ \t\n]*\\)"))))
+
+(defun company-files--grab-existing-name ()
+  ;; Grab the file name.
+  ;; When surrounded with quotes, it can include spaces.
+  (let (file dir)
+    (and (cl-dolist (regexp company-files--regexps)
+           (when (setq file (company-grab-line regexp 1))
+             (cl-return file)))
+         (company-files--connected-p file)
+         (setq dir (file-name-directory file))
+         (not (string-match "//" dir))
+         (file-exists-p dir)
+         file)))
+
+(defun company-files--connected-p (file)
+  (or (not (file-remote-p file))
+      (file-remote-p file nil t)))
+
+(defun company-files--trailing-slash-p (file)
+  ;; `file-directory-p' is very expensive on remotes. We are relying on
+  ;; `file-name-all-completions' returning directories with trailing / instead.
+  (let ((len (length file)))
+    (and (> len 0) (eq (aref file (1- len)) ?/))))
+
+(defvar company-files--completion-cache nil)
+
+(defun company-files--complete (_prefix)
+  (let* ((full-prefix (company-files--grab-existing-name))
+         (dir (file-name-directory full-prefix))
+         (file (file-name-nondirectory full-prefix))
+         (key (list file
+                    (expand-file-name dir)
+                    (nth 5 (file-attributes dir))))
+         (completion-ignore-case read-file-name-completion-ignore-case))
+    (unless (or (company-file--keys-match-p key (car company-files--completion-cache))
+                (not (company-files--connected-p dir)))
+      (let* ((candidates (company-files--directory-files dir file))
+             (directories (unless (file-remote-p dir)
+                            (cl-remove-if-not (lambda (f)
+                                                (company-files--trailing-slash-p f))
+                                              candidates)))
+             (children (and directories
+                            (cl-mapcan (lambda (d)
+                                         (company-files--directory-files d ""))
+                                       directories))))
+        (setq company-files--completion-cache
+              (cons key (append candidates children)))))
+    (all-completions file (cdr company-files--completion-cache))))
+
+(defun company-files--prefix ()
+  (let ((existing (company-files--grab-existing-name)))
+    (when existing
+      (list existing (company-grab-suffix "[^] '\"\t\n\r/]*/?")))))
+
+(defun company-file--keys-match-p (new old)
+  (and (equal (cdr old) (cdr new))
+       (string-prefix-p (car old) (car new))))
+
+(defun company-files--adjust-boundaries (_file prefix suffix)
+  (cons
+   (file-name-nondirectory prefix)
+   suffix))
+
+;;;###autoload
+(defun company-files (command &optional arg &rest rest)
+  "`company-mode' completion backend existing file names.
+Completions works for proper absolute and relative files paths.
+File paths with spaces are only supported inside strings."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-files))
+    (prefix (company-files--prefix))
+    (candidates
+     (company-files--complete arg))
+    (adjust-boundaries
+     (company-files--adjust-boundaries arg (nth 0 rest) (nth 1 rest)))
+    (location (cons (dired-noselect
+                     (file-name-directory (directory-file-name arg))) 1))
+    (kind (if (string-suffix-p "/" arg) 'folder 'file))
+    (sorted t)
+    (no-cache t)))
+
+(provide 'company-files)
+;;; company-files.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-files.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-files.elc
new file mode 100644
index 0000000..92f8f68
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-files.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-gtags.el b/emacs/.emacs.d/elpa/company-20260721.100/company-gtags.el
new file mode 100644
index 0000000..9934338
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-gtags.el
@@ -0,0 +1,160 @@
+;;; company-gtags.el --- company-mode completion backend for GNU Global  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2021, 2023  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'company-template)
+(require 'cl-lib)
+
+(defgroup company-gtags nil
+  "Completion backend for GNU Global."
+  :group 'company)
+
+(define-obsolete-variable-alias
+  'company-gtags-gnu-global-program-name
+  'company-gtags-executable "earlier")
+
+(defcustom company-gtags-executable
+  (executable-find "global")
+  "Location of GNU global executable."
+  :type 'string)
+
+(defcustom company-gtags-insert-arguments t
+  "When non-nil, insert function arguments as a template after completion."
+  :type 'boolean
+  :package-version '(company . "0.8.1"))
+
+(defvar-local company-gtags--tags-available-p 'unknown)
+(defvar-local company-gtags--executable 'unknown)
+
+(defcustom company-gtags-modes '(prog-mode jde-mode)
+  "Modes that use `company-gtags'.
+In all these modes (and their derivatives) `company-gtags' will perform
+completion."
+  :type '(repeat (symbol :tag "Major mode"))
+  :package-version '(company . "0.8.4"))
+
+(defun company-gtags--tags-available-p ()
+  (if (eq company-gtags--tags-available-p 'unknown)
+      (setq company-gtags--tags-available-p
+            (locate-dominating-file buffer-file-name "GTAGS"))
+    company-gtags--tags-available-p))
+
+;; Avoid byte-compilation warnings on Emacs < 27.
+(declare-function with-connection-local-variables "files-x")
+(declare-function connection-local-set-profile-variables "files-x")
+(declare-function connection-local-set-profiles "files-x")
+
+(defun company-gtags--executable ()
+  (cond
+   ((not (eq company-gtags--executable 'unknown)) ;; the value is already cached
+    company-gtags--executable)
+   ((and (version<= "27" emacs-version)           ;; can search remotely to set
+         (file-remote-p default-directory))
+
+    (with-connection-local-variables
+     (if (boundp 'company-gtags--executable-connection)
+         (setq-local company-gtags--executable     ;; use if defined as connection-local
+                     company-gtags--executable-connection)
+
+       ;; Else search and set as connection local for next uses.
+       (setq-local company-gtags--executable
+                   (with-no-warnings (executable-find "global" t)))
+       (let* ((host (file-remote-p default-directory 'host))
+              (symvars (intern (concat host "-vars")))) ;; profile name
+
+         (connection-local-set-profile-variables
+          symvars
+          `((company-gtags--executable-connection . ,company-gtags--executable)))
+
+         (connection-local-set-profiles `(:machine ,host) symvars))
+       company-gtags--executable)))
+   (t     ;; use default value (searched locally)
+    company-gtags-executable)))
+
+(defun company-gtags--fetch-tags (prefix)
+  (with-temp-buffer
+      ;; For some reason Global v 6.6.3 is prone to returning exit status 1
+      ;; even on successful searches when '-T' is used.
+      (when (/= 3 (process-file (company-gtags--executable) nil
+                               ;; "-T" goes through all the tag files listed in GTAGSLIBPATH
+                               (list (current-buffer) nil) nil "-xGqT" (concat "^" prefix)))
+        (goto-char (point-min))
+        (cl-loop while
+                 (re-search-forward (concat
+                                     "^"
+                                     "\\([^ ]*\\)" ;; completion
+                                     "[ \t]+\\([[:digit:]]+\\)" ;; linum
+                                     "[ \t]+\\([^ \t]+\\)" ;; file
+                                     "[ \t]+\\(.*\\)" ;; definition
+                                     "$"
+                                     ) nil t)
+                 collect
+                 (propertize (match-string 1)
+                             'meta (match-string 4)
+                             'location (cons (expand-file-name (match-string 3))
+                                             (string-to-number (match-string 2)))
+                             )))))
+
+(defun company-gtags--annotation (arg)
+  (let ((meta (get-text-property 0 'meta arg)))
+    (when (string-match (concat (regexp-quote arg) " *(") meta)
+      (with-temp-buffer
+        (let ((start (match-end 0)))
+          (insert meta)
+          (goto-char start)
+          (condition-case nil
+              (forward-sexp)
+            (scan-error
+             (goto-char (point-max))))
+          (buffer-substring-no-properties
+           start (point)))))))
+
+;;;###autoload
+(defun company-gtags (command &optional arg &rest _ignored)
+  "`company-mode' completion backend for GNU Global."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-gtags))
+    (prefix (and (company-gtags--executable)
+                 buffer-file-name
+                 (cl-some #'derived-mode-p company-gtags-modes)
+                 (not (company-in-string-or-comment))
+                 (company-gtags--tags-available-p)
+                 (or (company-grab-symbol) 'stop)))
+    (candidates (company-gtags--fetch-tags arg))
+    (sorted t)
+    (duplicates t)
+    (annotation (company-gtags--annotation arg))
+    (meta (get-text-property 0 'meta arg))
+    (location (get-text-property 0 'location arg))
+    (post-completion (let ((anno (company-gtags--annotation arg)))
+                       (when (and company-gtags-insert-arguments anno)
+                         (insert anno)
+                         (company-template-c-like-templatify anno))))))
+
+(provide 'company-gtags)
+;;; company-gtags.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-gtags.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-gtags.elc
new file mode 100644
index 0000000..709dde2
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-gtags.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-ispell.el b/emacs/.emacs.d/elpa/company-20260721.100/company-ispell.el
new file mode 100644
index 0000000..6c5d833
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-ispell.el
@@ -0,0 +1,99 @@
+;;; company-ispell.el --- company-mode completion backend using Ispell  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2016, 2018, 2021, 2023  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+(require 'ispell)
+
+(defgroup company-ispell nil
+  "Completion backend using Ispell."
+  :group 'company)
+
+(defun company--set-dictionary (symbol value)
+  (set-default-toplevel-value symbol value)
+  (company-cache-delete 'ispell-candidates))
+
+(defcustom company-ispell-dictionary nil
+  "Dictionary to use for `company-ispell'.
+
+If nil, use `ispell-complete-word-dict' or `ispell-alternate-dictionary'."
+  :type '(choice (const :tag "default (nil)" nil)
+                 (file :tag "dictionary" t))
+  :set #'company--set-dictionary)
+
+(defvar company-ispell-available 'unknown)
+
+(defun company-ispell-available ()
+  (when (eq company-ispell-available 'unknown)
+    (condition-case err
+        (progn
+          (ispell-lookup-words "WHATEVER")
+          (setq company-ispell-available t))
+      (error
+       (message "Company-Ispell: %s" (error-message-string err))
+       (setq company-ispell-available nil))))
+  company-ispell-available)
+
+(defun company--ispell-dict ()
+  "Determine which dictionary to use."
+  (let ((dict (or company-ispell-dictionary
+                  ispell-complete-word-dict
+                  ispell-alternate-dictionary)))
+    (when dict
+      (expand-file-name dict))))
+
+;;;###autoload
+(defun company-ispell (command &optional arg &rest _ignored)
+  "`company-mode' completion backend using Ispell."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-ispell))
+    (prefix (when (company-ispell-available)
+              (list
+               (company-grab-word)
+               (company-grab-word-suffix))))
+    (candidates
+     (let* ((dict (company--ispell-dict))
+            (all-words
+             (company-cache-fetch 'ispell-candidates
+                                  (lambda () (ispell-lookup-words "" dict))
+                                  :check-tag dict))
+            (completion-ignore-case t))
+       (if (string-empty-p arg)
+           ;; Small optimization.
+           all-words
+         (company-substitute-prefix
+          arg
+          ;; Work around issue #284.
+          (all-completions arg all-words)))))
+    (kind 'text)
+    (no-cache t)
+    (sorted t)
+    (ignore-case t)))
+
+(provide 'company-ispell)
+;;; company-ispell.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-ispell.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-ispell.elc
new file mode 100644
index 0000000..d186216
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-ispell.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-keywords.el b/emacs/.emacs.d/elpa/company-20260721.100/company-keywords.el
new file mode 100644
index 0000000..93b0552
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-keywords.el
@@ -0,0 +1,481 @@
+;;; company-keywords.el --- A company backend for programming language keywords  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2018, 2020-2023  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+(eval-when-compile (require 'make-mode))
+
+(defgroup company-keywords nil
+  "Completion backend for keywords."
+  :group 'company)
+
+(defcustom company-keywords-ignore-case nil
+  "Non-nil to ignore case in completion candidates."
+  :type 'boolean)
+
+(defun company-keywords-upper-lower (&rest lst)
+  ;; Upcase order is different for _.
+  (nconc (sort (mapcar 'upcase lst) 'string<) lst))
+
+(defvar company-keywords-alist
+  ;; Please contribute corrections or additions.
+  `((c++-mode
+     ;; from https://en.cppreference.com/w/cpp/keyword
+     "alignas" "alignof" "and" "and_eq" "asm" "atomic_cancel" "atomic_commit"
+     "atomic_noexcept" "auto" "bitand" "bitor" "bool" "break" "case" "catch"
+     "char" "char16_t" "char32_t" "char8_t" "class" "co_await" "co_return"
+     "co_yield" "compl" "concept" "const" "const_cast" "consteval" "constexpr"
+     "constinit" "continue" "decltype" "default" "delete" "do" "double"
+     "dynamic_cast" "else" "enum" "explicit" "export" "extern" "false" "final"
+     "float" "for" "friend" "goto" "if" "import" "inline" "int" "long" "module"
+     "mutable" "namespace" "new" "noexcept" "not" "not_eq" "nullptr" "operator"
+     "or" "or_eq" "override" "private" "protected" "public" "reflexpr" "register"
+     "reinterpret_cast" "requires" "return" "short" "signed" "sizeof" "static"
+     "static_assert" "static_cast" "struct" "switch" "synchronized" "template"
+     "this" "thread_local" "throw" "true" "try" "typedef" "typeid" "typename"
+     "union" "unsigned" "using" "virtual" "void" "volatile" "wchar_t" "while"
+     "xor" "xor_eq")
+    (c-mode
+     ;; from https://en.cppreference.com/w/c/keyword
+     "_Alignas" "_Alignof" "_Atomic" "_Bool" "_Complex"
+     "_Decimal128" "_Decimal32" "_Decimal64" "_Generic" "_Imaginary"
+     "_Noreturn" "_Static_assert" "_Thread_local" "__asm__" "asm"
+     "auto" "break" "case" "char" "const" "continue" "default" "do"
+     "double" "else" "enum" "extern" "float" "for" "goto" "if" "inline"
+     "int" "long" "register" "restrict" "return" "short" "signed" "sizeof"
+     "static" "struct" "switch" "typedef" "union" "unsigned" "void" "volatile"
+     "while")
+    (crystal-mode
+     ;; from https://github.com/crystal-lang/crystal-book/issues/124#issuecomment-1008311227
+    "abstract" "alias" "annotation" "as" "as?" "asm" "begin" "break" "case" "class"
+    "def" "do" "else" "elsif" "end" "ensure" "enum" "extend" "false" "for" "fun"
+    "if" "in" "include" "instance_sizeof" "is_a?" "lib" "macro" "module" "next"
+    "nil" "nil?" "of" "offsetof" "out" "pointerof" "private" "protected" "require"
+    "rescue" "responds_to?" "return" "select" "self" "sizeof" "struct" "super"
+    "then" "true" "type" "typeof" "uninitialized" "union" "unless" "until" "verbatim"
+    "when" "while" "with" "yield")
+    (csharp-mode
+     "abstract" "add" "alias" "as" "base" "bool" "break" "byte" "case"
+     "catch" "char" "checked" "class" "const" "continue" "decimal" "default"
+     "delegate" "do" "double" "else" "enum" "event" "explicit" "extern"
+     "false" "finally" "fixed" "float" "for" "foreach" "get" "global" "goto"
+     "if" "implicit" "in" "int" "interface" "internal" "is" "lock" "long"
+     "namespace" "new" "null" "object" "operator" "out" "override" "params"
+     "partial" "private" "protected" "public" "readonly" "ref" "remove"
+     "return" "sbyte" "sealed" "set" "short" "sizeof" "stackalloc" "static"
+     "string" "struct" "switch" "this" "throw" "true" "try" "typeof" "uint"
+     "ulong" "unchecked" "unsafe" "ushort" "using" "value" "var" "virtual"
+     "void" "volatile" "where" "while" "yield")
+    (d-mode
+     ;; from http://www.digitalmars.com/d/2.0/lex.html
+     "abstract" "alias" "align" "asm"
+     "assert" "auto" "body" "bool" "break" "byte" "case" "cast" "catch"
+     "cdouble" "cent" "cfloat" "char" "class" "const" "continue" "creal"
+     "dchar" "debug" "default" "delegate" "delete" "deprecated" "do"
+     "double" "else" "enum" "export" "extern" "false" "final" "finally"
+     "float" "for" "foreach" "foreach_reverse" "function" "goto" "idouble"
+     "if" "ifloat" "import" "in" "inout" "int" "interface" "invariant"
+     "ireal" "is" "lazy" "long" "macro" "mixin" "module" "new" "nothrow"
+     "null" "out" "override" "package" "pragma" "private" "protected"
+     "public" "pure" "real" "ref" "return" "scope" "short" "static" "struct"
+     "super" "switch" "synchronized" "template" "this" "throw" "true" "try"
+     "typedef" "typeid" "typeof" "ubyte" "ucent" "uint" "ulong" "union"
+     "unittest" "ushort" "version" "void" "volatile" "wchar" "while" "with")
+    (elixir-mode
+     ;; from https://hexdocs.pm/elixir/Kernel.html
+     "__CALLER__" "__DIR__" "__ENV__" "__MODULE__" "__STACKTRACE__"
+     "__aliases__" "__block__" "abs" "alias" "alias!" "and" "apply"
+     "binary_part" "binary_slice" "binding" "bit_size" "byte_size" "case" "ceil"
+     "cond" "dbg" "def" "defdelegate" "defexception" "defguard" "defguardp"
+     "defimpl" "defmacro" "defmacrop" "defmodule" "defoverridable" "defp"
+     "defprotocol" "defstruct" "destructure" "div" "elem" "exit" "floor" "fn"
+     "for" "function_exported?" "get_and_update_in" "get_in" "hd" "if" "import"
+     "in" "inspect" "is_atom" "is_binary" "is_bitstring" "is_boolean"
+     "is_exception" "is_float" "is_function" "is_integer" "is_list" "is_map"
+     "is_map_key" "is_nil" "is_number" "is_pid" "is_port" "is_reference"
+     "is_struct" "is_tuple" "length" "macro_exported?" "make_ref" "map_size"
+     "match?" "max" "min" "node" "not" "or" "pop_in" "put_elem" "put_in" "quote"
+     "raise" "receive" "rem" "require" "reraise" "round" "self" "send" "spawn"
+     "spawn_link" "spawn_monitor" "struct" "struct!" "super" "tap" "then"
+     "throw" "tl" "to_charlist" "to_string" "trunc" "try" "tuple_size" "unless"
+     "unquote" "unquote_splicing" "update_in" "use" "var!" "with")
+    (erlang-mode
+     ;; from https://www.erlang.org/docs/20/reference_manual/introduction.html#id63536
+     "after" "and" "andalso" "band" "begin" "bnot" "bor" "bsl" "bsr" "bxor"
+     "case" "catch" "cond" "div" "end" "fun" "if" "let" "not" "of" "or" "orelse"
+     "receive" "rem" "try" "when" "xor")
+    (f90-mode .
+     ;; from f90.el
+     ;; ".AND." ".GE." ".GT." ".LT." ".LE." ".NE." ".OR." ".TRUE." ".FALSE."
+     ,(company-keywords-upper-lower
+      "abs" "abstract" "achar" "acos" "adjustl" "adjustr" "aimag" "aint"
+      "align" "all" "all_prefix" "all_scatter" "all_suffix" "allocatable"
+      "allocate" "allocated" "and" "anint" "any" "any_prefix" "any_scatter"
+      "any_suffix" "asin" "assign" "assignment" "associate" "associated"
+      "asynchronous" "atan" "atan2" "backspace" "bind" "bit_size" "block"
+      "btest" "c_alert" "c_associated" "c_backspace" "c_bool"
+      "c_carriage_return" "c_char" "c_double" "c_double_complex" "c_f_pointer"
+      "c_f_procpointer" "c_float" "c_float_complex" "c_form_feed" "c_funloc"
+      "c_funptr" "c_horizontal_tab" "c_int" "c_int16_t" "c_int32_t" "c_int64_t"
+      "c_int8_t" "c_int_fast16_t" "c_int_fast32_t" "c_int_fast64_t"
+      "c_int_fast8_t" "c_int_least16_t" "c_int_least32_t" "c_int_least64_t"
+      "c_int_least8_t" "c_intmax_t" "c_intptr_t" "c_loc" "c_long"
+      "c_long_double" "c_long_double_complex" "c_long_long" "c_new_line"
+      "c_null_char" "c_null_funptr" "c_null_ptr" "c_ptr" "c_short"
+      "c_signed_char" "c_size_t" "c_vertical_tab" "call" "case" "ceiling"
+      "char" "character" "character_storage_size" "class" "close" "cmplx"
+      "command_argument_count" "common" "complex" "conjg" "contains" "continue"
+      "copy_prefix" "copy_scatter" "copy_suffix" "cos" "cosh" "count"
+      "count_prefix" "count_scatter" "count_suffix" "cpu_time" "cshift"
+      "cycle" "cyclic" "data" "date_and_time" "dble" "deallocate" "deferred"
+      "digits" "dim" "dimension" "distribute" "do" "dot_product" "double"
+      "dprod" "dynamic" "elemental" "else" "elseif" "elsewhere" "end" "enddo"
+      "endfile" "endif" "entry" "enum" "enumerator" "eoshift" "epsilon" "eq"
+      "equivalence" "eqv" "error_unit" "exit" "exp" "exponent" "extends"
+      "extends_type_of" "external" "extrinsic" "false" "file_storage_size"
+      "final" "floor" "flush" "forall" "format" "fraction" "function" "ge"
+      "generic" "get_command" "get_command_argument" "get_environment_variable"
+      "goto" "grade_down" "grade_up" "gt" "hpf_alignment" "hpf_distribution"
+      "hpf_template" "huge" "iachar" "iall" "iall_prefix" "iall_scatter"
+      "iall_suffix" "iand" "iany" "iany_prefix" "iany_scatter" "iany_suffix"
+      "ibclr" "ibits" "ibset" "ichar" "ieee_arithmetic" "ieee_exceptions"
+      "ieee_features" "ieee_get_underflow_mode" "ieee_set_underflow_mode"
+      "ieee_support_underflow_control" "ieor" "if" "ilen" "implicit"
+      "import" "include" "independent" "index" "inherit" "input_unit"
+      "inquire" "int" "integer" "intent" "interface" "intrinsic" "ior"
+      "iostat_end" "iostat_eor" "iparity" "iparity_prefix" "iparity_scatter"
+      "iparity_suffix" "ishft" "ishftc" "iso_c_binding" "iso_fortran_env"
+      "kind" "lbound" "le" "leadz" "len" "len_trim" "lge" "lgt" "lle" "llt"
+      "log" "log10" "logical" "lt" "matmul" "max" "maxexponent" "maxloc"
+      "maxval" "maxval_prefix" "maxval_scatter" "maxval_suffix" "merge"
+      "min" "minexponent" "minloc" "minval" "minval_prefix" "minval_scatter"
+      "minval_suffix" "mod" "module" "modulo" "move_alloc" "mvbits" "namelist"
+      "ne" "nearest" "neqv" "new" "new_line" "nint" "non_intrinsic"
+      "non_overridable" "none" "nopass" "not" "null" "nullify"
+      "number_of_processors" "numeric_storage_size" "only" "onto" "open"
+      "operator" "optional" "or" "output_unit" "pack" "parameter" "parity"
+      "parity_prefix" "parity_scatter" "parity_suffix" "pass" "pause"
+      "pointer" "popcnt" "poppar" "precision" "present" "print" "private"
+      "procedure" "processors" "processors_shape" "product" "product_prefix"
+      "product_scatter" "product_suffix" "program" "protected" "public"
+      "pure" "radix" "random_number" "random_seed" "range" "read" "real"
+      "realign" "recursive" "redistribute" "repeat" "reshape" "result"
+      "return" "rewind" "rrspacing" "same_type_as" "save" "scale" "scan"
+      "select" "selected_char_kind" "selected_int_kind" "selected_real_kind"
+      "sequence" "set_exponent" "shape" "sign" "sin" "sinh" "size" "spacing"
+      "spread" "sqrt" "stop" "subroutine" "sum" "sum_prefix" "sum_scatter"
+      "sum_suffix" "system_clock" "tan" "tanh" "target" "template" "then"
+      "tiny" "transfer" "transpose" "trim" "true" "type" "ubound" "unpack"
+      "use" "value" "verify" "volatile" "wait" "where" "while" "with" "write"))
+    (go-mode
+     ;; 1. Keywords ref: https://golang.org/ref/spec#Keywords
+     ;; 2. Builtin functions and types ref: https://golang.org/pkg/builtin/
+     "append" "bool" "break" "byte" "cap" "case" "chan" "close" "complex" "complex128"
+     "complex64" "const" "continue" "copy" "default" "defer" "delete" "else" "error"
+     "fallthrough" "false" "float32" "float64" "for" "func" "go" "goto" "if" "imag"
+     "import" "int" "int16" "int32" "int64" "int8" "interface" "len" "make"
+     "map" "new" "nil" "package" "panic" "print" "println" "range" "real" "recover"
+     "return" "rune" "select" "string" "struct" "switch" "true" "type" "uint" "uint16"
+     "uint32" "uint64" "uint8" "uintptr" "var")
+    (java-mode
+     "abstract" "assert" "boolean" "break" "byte" "case" "catch" "char" "class"
+     "continue" "default" "do" "double" "else" "enum" "extends" "final"
+     "finally" "float" "for" "if" "implements" "import" "instanceof" "int"
+     "interface" "long" "native" "new" "package" "private" "protected" "public"
+     "return" "short" "static" "strictfp" "super" "switch" "synchronized"
+     "this" "throw" "throws" "transient" "try" "void" "volatile" "while")
+    (javascript-mode
+     ;; https://tc39.github.io/ecma262/ + async, static and undefined
+     "async" "await" "break" "case" "catch" "class" "const" "continue"
+     "debugger" "default" "delete" "do" "else" "enum" "export" "extends" "false"
+     "finally" "for" "function" "if" "import" "in" "instanceof" "let" "new"
+     "null" "return" "static" "super" "switch" "this" "throw" "true" "try"
+     "typeof" "undefined" "var" "void" "while" "with" "yield")
+    (kotlin-mode
+     "abstract" "annotation" "as" "break" "by" "catch" "class" "companion"
+     "const" "constructor" "continue" "data" "do" "else" "enum" "false" "final"
+     "finally" "for" "fun" "if" "import" "in" "init" "inner" "interface"
+     "internal" "is" "lateinit" "nested" "null" "object" "open" "out" "override"
+     "package" "private" "protected" "public" "return" "super" "this" "throw"
+     "trait" "true" "try" "typealias" "val" "var" "when" "while")
+    (lua-mode
+     ;; https://www.lua.org/manual/5.3/manual.html
+     "and" "break" "do" "else" "elseif" "end" "false" "for" "function" "goto" "if"
+     "in" "local" "nil" "not" "or" "repeat" "return" "then" "true" "until" "while")
+    (nim-mode
+     ;; https://nim-lang.org/docs/manual.html#lexical-analysis-identifiers-amp-keywords
+     "addr" "and" "as" "asm" "bind" "block" "break" "case" "cast" "concept" "const" "continue"
+     "converter" "defer" "discard" "distinct" "div" "do" "elif" "else" "end" "enum" "except"
+     "export" "finally" "for" "from" "func" "if" "import" "in" "include" "interface" "is" "isnot"
+     "iterator" "let" "macro" "method" "mixin" "mod" "nil" "not" "notin" "object" "of" "or" "out"
+     "proc" "ptr" "raise" "ref" "return" "shl" "shr" "static" "template" "try" "tuple" "type"
+     "using" "var" "when" "while" "xor" "yield")
+    (objc-mode
+     "@catch" "@class" "@encode" "@end" "@finally" "@implementation"
+     "@interface" "@private" "@protected" "@protocol" "@public"
+     "@selector" "@synchronized" "@throw" "@try" "alloc" "autorelease"
+     "bycopy" "byref" "in" "inout" "oneway" "out" "release" "retain")
+    (perl-mode
+     ;; from cperl.el
+     "AUTOLOAD" "BEGIN" "CHECK" "CORE" "DESTROY" "END" "INIT" "__END__"
+     "__FILE__" "__LINE__" "abs" "accept" "alarm" "and" "atan2" "bind"
+     "binmode" "bless" "caller" "chdir" "chmod" "chomp" "chop" "chown" "chr"
+     "chroot" "close" "closedir" "cmp" "connect" "continue" "cos"
+     "crypt" "dbmclose" "dbmopen" "defined" "delete" "die" "do" "dump" "each"
+     "else" "elsif" "endgrent" "endhostent" "endnetent" "endprotoent"
+     "endpwent" "endservent" "eof" "eq" "eval" "exec" "exists" "exit" "exp"
+     "fcntl" "fileno" "flock" "for" "foreach" "fork" "format" "formline"
+     "ge" "getc" "getgrent" "getgrgid" "getgrnam" "gethostbyaddr"
+     "gethostbyname" "gethostent" "getlogin" "getnetbyaddr" "getnetbyname"
+     "getnetent" "getpeername" "getpgrp" "getppid" "getpriority"
+     "getprotobyname" "getprotobynumber" "getprotoent" "getpwent" "getpwnam"
+     "getpwuid" "getservbyname" "getservbyport" "getservent" "getsockname"
+     "getsockopt" "glob" "gmtime" "goto" "grep" "gt" "hex" "if" "index" "int"
+     "ioctl" "join" "keys" "kill" "last" "lc" "lcfirst" "le" "length"
+     "link" "listen" "local" "localtime" "lock" "log" "lstat" "lt" "map"
+     "mkdir" "msgctl" "msgget" "msgrcv" "msgsnd" "my" "ne" "next" "no"
+     "not" "oct" "open" "opendir" "or" "ord" "our" "pack" "package" "pipe"
+     "pop" "pos" "print" "printf" "push" "q" "qq" "quotemeta" "qw" "qx"
+     "rand" "read" "readdir" "readline" "readlink" "readpipe" "recv" "redo"
+     "ref" "rename" "require" "reset" "return" "reverse" "rewinddir" "rindex"
+     "rmdir" "scalar" "seek" "seekdir" "select" "semctl" "semget" "semop"
+     "send" "setgrent" "sethostent" "setnetent" "setpgrp" "setpriority"
+     "setprotoent" "setpwent" "setservent" "setsockopt" "shift" "shmctl"
+     "shmget" "shmread" "shmwrite" "shutdown" "sin" "sleep" "socket"
+     "socketpair" "sort" "splice" "split" "sprintf" "sqrt" "srand" "stat"
+     "study" "sub" "substr" "symlink" "syscall" "sysopen" "sysread" "system"
+     "syswrite" "tell" "telldir" "tie" "time" "times" "tr" "truncate" "uc"
+     "ucfirst" "umask" "undef" "unless" "unlink" "unpack" "unshift" "untie"
+     "until" "use" "utime" "values" "vec" "wait" "waitpid"
+     "wantarray" "warn" "while" "write" "x" "xor" "y")
+    (php-mode ;; https://www.php.net/manual/reserved.php
+     "Closure" "Error" "Exception" "Generator" "Throwable"
+     "__CLASS__" "__DIR__" "__FILE__" "__FUNCTION__" "__LINE__" "__METHOD__"
+     "__NAMESPACE__" "__TRAIT__"
+     "abstract" "and" "array" "as" "bool" "break" "callable" "case" "catch"
+     "class" "clone" "const" "continue" "declare" "default" "die" "do" "echo"
+     "else" "elseif" "empty" "enddeclare" "endfor" "endforeach" "endif"
+     "endswitch" "endwhile" "enum" "eval" "exit" "extends" "false" "final" "finally"
+     "float" "fn" "for" "foreach" "function" "global" "goto" "if"
+     "implements" "include" "include_once" "instanceof" "insteadof" "interface"
+     "isset" "iterable" "list" "match" "namespace" "new" "null" "object" "or"
+     "print" "private" "protected" "public" "readonly" "require" "require_once"
+     "return" "self" "static" "string" "switch" "this" "throw" "trait" "true"
+     "try" "unset" "use" "var" "void" "while" "xor" "yield" "yield from")
+    (purescript-mode ;; purescript-font-lock.el
+     "ado" "case" "class" "data" "default" "deriving" "do" "else" "if" "import"
+     "in" "infix" "infixl" "infixr" "instance" "let" "module" "newtype" "of"
+     "then" "type" "where")
+    (python-mode
+     ;; https://docs.python.org/3/reference/lexical_analysis.html#keywords
+     "False" "None" "True" "and" "as" "assert" "async" "await" "break" "class"
+     "continue" "def" "del" "elif" "else" "except" "exec" "finally" "for" "from"
+     "global" "if" "import" "in" "is" "lambda" "nonlocal" "not" "or" "pass"
+     "print" "raise" "return" "try" "while" "with" "yield")
+    (ruby-mode
+     "BEGIN" "END" "alias" "and"  "begin" "break" "case" "class" "def" "defined?"
+     "do" "else" "elsif"  "end" "ensure" "false" "for" "if" "in" "module"
+     "next" "nil" "not" "or" "redo" "rescue" "retry" "return" "self" "super"
+     "then" "true" "undef" "unless" "until" "when" "while" "yield")
+    ;; From https://doc.rust-lang.org/grammar.html#keywords
+    ;; but excluding unused reserved words: https://www.reddit.com/r/rust/comments/34fq0k/is_there_a_good_list_of_rusts_keywords/cqucvnj
+    (rust-mode
+     "Self"
+     "as" "box" "break" "const" "continue" "crate" "else" "enum" "extern"
+     "false" "fn" "for" "if" "impl" "in" "let" "loop" "macro" "match" "mod"
+     "move" "mut" "pub" "ref" "return" "self" "static" "struct" "super"
+     "trait" "true" "type" "unsafe" "use" "where" "while")
+    ; Extract from R7RS-small Tex: https://small.r7rs.org/
+    (scheme-mode
+     "abs" "acos" "angle" "append" "apply" "asin" "assoc" "assq" "assv"
+     "atan" "binary-port?" "body" "boolean=?" "boolean?" "bytevector"
+     "bytevector-append" "bytevector-copy" "bytevector-copy!"
+     "bytevector-length" "bytevector-u8-ref" "bytevector-u8-set!"
+     "bytevector?" "caaaar" "caaadr" "caaar" "caadar" "caaddr" "caadr"
+     "caar" "cadaar" "cadadr" "cadar" "caddar" "cadddr" "caddr" "cadr"
+     "call-with-port" "call-with-values" "car" "car-internal" "cdaaar"
+     "cdaadr" "cdaar" "cdadar" "cdaddr" "cdadr" "cdar" "cddaar" "cddadr"
+     "cddar" "cdddar" "cddddr" "cdddr" "cddr" "cdr" "ceiling"
+     "char->integer" "char-alphabetic?" "char-ci<=?" "char-ci<?"
+     "char-ci=?" "char-ci>=?" "char-ci>?" "char-downcase" "char-foldcase"
+     "char-lower-case?" "char-numeric?" "char-ready?" "char-upcase"
+     "char-upper-case?" "char-whitespace?" "char<=?" "char<?" "char=?"
+     "char>=?" "char>?" "char?" "close-input-port" "close-output-port"
+     "close-port" "command-line" "complex?" "cons" "cos"
+     "current-error-port" "current-input-port" "current-jiffy"
+     "current-output-port" "current-second" "delete-file" "denominator"
+     "digit-value" "display" "dynamic-wind" "emergency-exit" "environment"
+     "eof-object" "eof-object?" "eq?" "equal?" "eqv?" "error"
+     "error-object-irritants" "error-object-message" "error-object?" "eval"
+     "even?" "exact" "exact-integer-sqrt" "exact-integer?" "exact?" "exit"
+     "exp" "expt" "features" "file-error?" "file-exists?" "finite?" "floor"
+     "floor-quotient" "floor-remainder" "floor/" "flush-output-port" "gcd"
+     "get-environment-variable" "get-environment-variables"
+     "get-output-bytevector" "get-output-string" "imag-part" "inexact"
+     "inexact?" "infinite?" "input-port-open?" "input-port?"
+     "integer->char" "integer?" "interaction-environment"
+     "jiffies-per-second" "lcm" "length" "list" "list->string"
+     "list->vector" "list-copy" "list-ref" "list-set!" "list-tail" "list?"
+     "load" "log" "magnitude" "make-bytevector" "make-list"
+     "make-parameter" "make-polar" "make-promise" "make-rectangular"
+     "make-string" "make-vector" "max" "member" "memq" "memv" "min"
+     "modulo" "nan?" "negative?" "newline" "nil" "not" "null-environment"
+     "null?" "number->string" "number?" "numerator" "odd?"
+     "open-binary-input-file" "open-binary-output-file"
+     "open-input-bytevector" "open-input-file" "open-input-string"
+     "open-output-bytevector" "open-output-file" "open-output-string"
+     "output-port-open?" "output-port?" "pair?" "peek-char" "peek-u8"
+     "port?" "positive?" "procedure?" "promise?" "quasiquote" "quote"
+     "quotient" "raise" "raise-continuable" "rational?" "rationalize"
+     "read" "read-bytevector" "read-bytevector!" "read-char" "read-error?"
+     "read-line" "read-string" "read-u8" "real-part" "real?" "remainder"
+     "reverse" "round" "scheme-report-environment" "set!" "set-car!"
+     "set-cdr!" "setcar" "sin" "sqrt" "square" "string" "string->list"
+     "string->number" "string->symbol" "string->utf" "string->vector"
+     "string-append" "string-ci<=?" "string-ci<?" "string-ci=?"
+     "string-ci>=?" "string-ci>?" "string-copy" "string-copy!"
+     "string-downcase" "string-fill!" "string-foldcase" "string-for-each"
+     "string-length" "string-map" "string-ref" "string-set!"
+     "string-upcase" "string<=?" "string<?" "string=?" "string>=?"
+     "string>?" "string?" "substring" "symbol->string" "symbol=?" "symbol?"
+     "tan" "textual-port?" "truncate" "truncate-quotient"
+     "truncate-remainder" "truncate/" "u8-ready?" "unquote"
+     "unquote-splicing" "utf->string" "values" "vector" "vector->list"
+     "vector->string" "vector-append" "vector-copy" "vector-copy!"
+     "vector-fill!" "vector-for-each" "vector-length" "vector-map"
+     "vector-ref" "vector-set!" "vector?" "with-exception-handler"
+     "with-input-from-file" "with-output-to-file" "write"
+     "write-bytevector" "write-char" "write-shared" "write-simple"
+     "write-string" "write-u8" "zero?")
+    (scala-mode
+     "abstract" "case" "catch" "class" "def" "do" "else" "extends" "false"
+     "final" "finally" "for" "forSome" "if" "implicit" "import" "lazy" "match"
+     "new" "null" "object" "override" "package" "private" "protected"
+     "return" "sealed" "super" "this" "throw" "trait" "true" "try" "type" "val"
+     "var" "while" "with" "yield")
+    (sh-mode
+     "break" "case" "continue" "do" "done" "elif" "else" "esac" "eval"
+     "exec" "exit" "export" "false" "fi" "for" "function" "if" "in" "readonly"
+     "return" "set" "shift" "test" "then" "time" "times" "trap" "true" "unset"
+     "until" "while")
+    (swift-mode
+     "Protocol" "Self" "Type" "and" "as" "assignment" "associatedtype"
+     "associativity" "available" "break" "case" "catch" "class" "column" "continue"
+     "convenience" "default" "defer" "deinit" "didSet" "do" "dynamic" "dynamicType"
+     "else" "elseif" "endif" "enum" "extension" "fallthrough" "false" "file"
+     "fileprivate" "final" "for" "func" "function" "get" "guard" "higherThan" "if"
+     "import" "in" "indirect" "infix" "init" "inout" "internal" "is" "lazy" "left"
+     "let" "line" "lowerThan" "mutating" "nil" "none" "nonmutating" "open"
+     "operator" "optional" "override" "postfix" "precedence" "precedencegroup"
+     "prefix" "private" "protocol" "public" "repeat" "required" "rethrows" "return"
+     "right" "selector" "self" "set" "static" "struct" "subscript" "super" "switch"
+     "throw" "throws" "true" "try" "typealias" "unowned" "var" "weak" "where"
+     "while" "willSet")
+    (julia-mode
+     "abstract" "break" "case" "catch" "const" "continue" "do" "else" "elseif"
+     "end" "eval" "export" "false" "finally" "for" "function" "global" "if"
+     "ifelse" "immutable" "import" "importall" "in" "let" "macro" "module"
+     "otherwise" "quote" "return" "switch" "throw" "true" "try" "type"
+     "typealias" "using" "while"
+     )
+    ;; From https://github.com/apache/thrift/blob/master/contrib/thrift.el
+    (thrift-mode
+     "binary" "bool" "byte" "const" "double" "enum" "exception" "extends"
+     "i16" "i32" "i64" "include" "list" "map" "oneway" "optional" "required"
+     "service" "set" "string" "struct" "throws" "typedef" "void"
+     )
+    (tuareg-mode 
+     ;; ocaml, from https://v2.ocaml.org/manual/lex.html#sss:keywords
+     "and" "as" "asr" "assert" "begin" "class"
+     "constraint" "do" "done" "downto" "else" "end" 
+     "exception" "external" "false" "for" "fun" "function"
+     "functor" "if" "in" "include" "inherit" "initializer"
+     "land" "lazy" "let" "lor" "lsl" "lsr"
+     "lxor" "match" "method" "mod" "module" "mutable"
+     "new" "nonrec" "object" "of" "open" "or"
+     "private" "rec" "sig" "struct" "then" "to" 
+     "true" "try" "type" "val" "virtual" "when" 
+     "while" "with" 
+    )
+    ;; aliases
+    (caml-mode . tuareg-mode)
+    (js2-mode . javascript-mode)
+    (js2-jsx-mode . javascript-mode)
+    (espresso-mode . javascript-mode)
+    (js-mode . javascript-mode)
+    (js-jsx-mode . javascript-mode)
+    (rjsx-mode . javascript-mode)
+    (cperl-mode . perl-mode)
+    (jde-mode . java-mode)
+    (ess-julia-mode . julia-mode)
+    (php-ts-mode . php-mode)
+    (phps-mode . php-mode)
+    (enh-ruby-mode . ruby-mode))
+  "Alist mapping major-modes to sorted keywords for `company-keywords'.")
+
+(with-eval-after-load 'make-mode
+  (mapc
+   (lambda (mode-stmnts)
+     (setf (alist-get (car mode-stmnts) company-keywords-alist)
+           (cl-remove-duplicates
+            (sort (append makefile-special-targets-list
+                          (cl-mapcan #'identity
+                                     (mapcar
+                                      #'split-string
+                                      (cl-remove-if-not
+                                       #'stringp
+                                       (symbol-value (cdr mode-stmnts))))))
+                  #'string<)
+            :test #'string=)))
+   '((makefile-automake-mode . makefile-automake-statements)
+     (makefile-gmake-mode    . makefile-gmake-statements)
+     (makefile-makepp-mode   . makefile-makepp-statements)
+     (makefile-bsdmake-mode  . makefile-bsdmake-statements)
+     (makefile-imake-mode    . makefile-statements)
+     (makefile-mode          . makefile-statements))))
+
+;;;###autoload
+(defun company-keywords (command &optional arg &rest _ignored)
+  "`company-mode' backend for programming language keywords."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-keywords))
+    (prefix (and (assq major-mode company-keywords-alist)
+                 (not (company-in-string-or-comment))
+                 (or (company-grab-symbol) 'stop)))
+    (candidates
+     (let ((completion-ignore-case company-keywords-ignore-case)
+           (symbols (cdr (assq major-mode company-keywords-alist))))
+       (all-completions arg (if (consp symbols)
+                                symbols
+                              (cdr (assq symbols company-keywords-alist))))))
+    (kind 'keyword)
+    (sorted t)
+    (ignore-case company-keywords-ignore-case)))
+
+(provide 'company-keywords)
+;;; company-keywords.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-keywords.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-keywords.elc
new file mode 100644
index 0000000..62644a2
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-keywords.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-nxml.el b/emacs/.emacs.d/elpa/company-20260721.100/company-nxml.el
new file mode 100644
index 0000000..2a77e36
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-nxml.el
@@ -0,0 +1,142 @@
+;;; company-nxml.el --- company-mode completion backend for nxml-mode  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2015, 2017-2018, 2023  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+;; In Emacs >= 26, company-capf is used instead.
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+
+(defvar rng-open-elements)
+(defvar rng-validate-mode)
+(defvar rng-in-attribute-regex)
+(defvar rng-in-attribute-value-regex)
+(declare-function rng-set-state-after "rng-nxml")
+(declare-function rng-match-possible-start-tag-names "rng-match")
+(declare-function rng-adjust-state-for-attribute "rng-nxml")
+(declare-function rng-match-possible-attribute-names "rng-match")
+(declare-function rng-adjust-state-for-attribute-value "rng-nxml")
+(declare-function rng-match-possible-value-strings "rng-match")
+
+(defconst company-nxml-token-regexp
+  "\\(?:[_[:alpha:]][-._[:alnum:]]*\\_>\\)")
+
+(defvar company-nxml-in-attribute-value-regexp
+  (replace-regexp-in-string "w" company-nxml-token-regexp
+   "<w\\(?::w\\)?\
+\\(?:[ \t\r\n]+w\\(?::w\\)?[ \t\r\n]*=\
+\[ \t\r\n]*\\(?:\"[^\"]*\"\\|'[^']*'\\)\\)*\
+\[ \t\r\n]+\\(w\\(:w\\)?\\)[ \t\r\n]*=[ \t\r\n]*\
+\\(\"\\([^\"]*\\>\\)\\|'\\([^']*\\>\\)\\)\\="
+   t t))
+
+(defvar company-nxml-in-tag-name-regexp
+  (replace-regexp-in-string "w" company-nxml-token-regexp
+                            "<\\(/?w\\(?::w?\\)?\\)?\\=" t t))
+
+(defun company-nxml-all-completions (prefix alist)
+  (let ((candidates (mapcar 'cdr alist))
+        (case-fold-search nil)
+        filtered)
+    (when (cdar rng-open-elements)
+      (push (concat "/" (cdar rng-open-elements)) candidates))
+    (setq candidates (sort (all-completions prefix candidates) 'string<))
+    (while candidates
+      (unless (equal (car candidates) (car filtered))
+        (push (car candidates) filtered))
+      (pop candidates))
+    (nreverse filtered)))
+
+(defmacro company-nxml-prepared (&rest body)
+  (declare (indent 0) (debug t))
+  `(let ((lt-pos (save-excursion (search-backward "<" nil t))))
+     (when (and lt-pos (= (rng-set-state-after lt-pos) lt-pos))
+       ,@body)))
+
+(defun company-nxml-tag (command &optional arg &rest _ignored)
+  (cl-case command
+    (prefix (and (derived-mode-p 'nxml-mode)
+                 rng-validate-mode
+                 (company-grab company-nxml-in-tag-name-regexp 1)))
+    (candidates (company-nxml-prepared
+                 (company-nxml-all-completions
+                  arg (rng-match-possible-start-tag-names))))
+    (sorted t)))
+
+(defun company-nxml-attribute (command &optional arg &rest _ignored)
+  (cl-case command
+    (prefix (and (derived-mode-p 'nxml-mode)
+                 rng-validate-mode
+                 (memq (char-after) '(?\  ?\t ?\n)) ;; outside word
+                 (company-grab rng-in-attribute-regex 1)))
+    (candidates (company-nxml-prepared
+                 (and (rng-adjust-state-for-attribute
+                       lt-pos (- (point) (length arg)))
+                      (company-nxml-all-completions
+                       arg (rng-match-possible-attribute-names)))))
+    (sorted t)))
+
+(defun company-nxml-attribute-value (command &optional arg &rest _ignored)
+  (cl-case command
+    (prefix (and (derived-mode-p 'nxml-mode)
+                 rng-validate-mode
+                 (and (memq (char-after) '(?' ?\" ?\  ?\t ?\n)) ;; outside word
+                      (looking-back company-nxml-in-attribute-value-regexp nil)
+                      (or (match-string-no-properties 4)
+                          (match-string-no-properties 5)
+                          ""))))
+    (candidates (company-nxml-prepared
+                 (let (attr-start attr-end colon)
+                   (and (looking-back rng-in-attribute-value-regex lt-pos)
+                        (setq colon (match-beginning 2)
+                              attr-start (match-beginning 1)
+                              attr-end (match-end 1))
+                        (rng-adjust-state-for-attribute lt-pos attr-start)
+                        (rng-adjust-state-for-attribute-value
+                         attr-start colon attr-end)
+                        (all-completions
+                         arg (rng-match-possible-value-strings))))))))
+
+;;;###autoload
+(defun company-nxml (command &optional arg &rest _ignored)
+  "`company-mode' completion backend for `nxml-mode'."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-nxml))
+    (prefix (or (company-nxml-tag 'prefix)
+                (company-nxml-attribute 'prefix)
+                (company-nxml-attribute-value 'prefix)))
+    (candidates (cond
+                 ((company-nxml-tag 'prefix)
+                  (company-nxml-tag 'candidates arg))
+                 ((company-nxml-attribute 'prefix)
+                  (company-nxml-attribute 'candidates arg))
+                 ((company-nxml-attribute-value 'prefix)
+                  (sort (company-nxml-attribute-value 'candidates arg)
+                        'string<))))
+    (sorted t)))
+
+(provide 'company-nxml)
+;;; company-nxml.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-nxml.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-nxml.elc
new file mode 100644
index 0000000..a8d617b
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-nxml.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-oddmuse.el b/emacs/.emacs.d/elpa/company-20260721.100/company-oddmuse.el
new file mode 100644
index 0000000..fd0b256
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-oddmuse.el
@@ -0,0 +1,57 @@
+;;; company-oddmuse.el --- company-mode completion backend for oddmuse-mode  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2016, 2022, 2023  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+(eval-when-compile (require 'yaoddmuse nil t))
+(eval-when-compile (require 'oddmuse nil t))
+
+(defvar company-oddmuse-link-regexp
+  "\\(\\<[A-Z][[:alnum:]]*\\>\\)\\|\\[\\[\\([[:alnum:]]+\\>\\|\\)")
+
+(defun company-oddmuse-get-page-table ()
+  (cl-case major-mode
+    (yaoddmuse-mode (with-no-warnings
+                      (yaoddmuse-get-pagename-table yaoddmuse-wikiname)))
+    (oddmuse-mode (with-no-warnings
+                    (oddmuse-make-completion-table oddmuse-wiki)))))
+
+;;;###autoload
+(defun company-oddmuse (command &optional arg &rest _ignored)
+  "`company-mode' completion backend for `oddmuse-mode'."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-oddmuse))
+    (prefix (let ((case-fold-search nil))
+              (and (memq major-mode '(oddmuse-mode yaoddmuse-mode))
+                   (looking-back company-oddmuse-link-regexp (line-beginning-position))
+                   (or (match-string 1)
+                       (match-string 2)))))
+    (candidates (all-completions arg (company-oddmuse-get-page-table)))))
+
+(provide 'company-oddmuse)
+;;; company-oddmuse.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-oddmuse.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-oddmuse.elc
new file mode 100644
index 0000000..d1746e2
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-oddmuse.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-pkg.el b/emacs/.emacs.d/elpa/company-20260721.100/company-pkg.el
new file mode 100644
index 0000000..0552cab
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "company" "20260721.100"
+  "Modular text completion framework."
+  '((emacs    "26.1")
+    (posframe "1.5.1"))
+  :url "http://company-mode.github.io/"
+  :commit "1cc907ac9e46ae4209eb5a341131787e0c678406"
+  :revdesc "1cc907ac9e46"
+  :keywords '("abbrev" "convenience" "matching")
+  :maintainers '(("Dmitry Gutov" . "dmitry@gutov.dev")))
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-semantic.el b/emacs/.emacs.d/elpa/company-20260721.100/company-semantic.el
new file mode 100644
index 0000000..de26744
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-semantic.el
@@ -0,0 +1,168 @@
+;;; company-semantic.el --- company-mode completion backend using Semantic  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2018, 2023  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'company-template)
+(require 'cl-lib)
+
+(defvar semantic-idle-summary-function)
+(declare-function semantic-documentation-for-tag "semantic/doc" )
+(declare-function semantic-analyze-current-context "semantic/analyze")
+(declare-function semantic-analyze-possible-completions "semantic/complete")
+(declare-function semantic-analyze-find-tags-by-prefix "semantic/analyze/fcn")
+(declare-function semantic-tag-class "semantic/tag")
+(declare-function semantic-tag-name "semantic/tag")
+(declare-function semantic-tag-start "semantic/tag")
+(declare-function semantic-tag-buffer "semantic/tag")
+(declare-function semantic-active-p "semantic")
+(declare-function semantic-format-tag-prototype "semantic/format")
+
+(defgroup company-semantic nil
+  "Completion backend using Semantic."
+  :group 'company)
+
+(defcustom company-semantic-metadata-function 'company-semantic-summary-and-doc
+  "The function turning a semantic tag into doc information."
+  :type 'function)
+
+(defcustom company-semantic-begin-after-member-access t
+  "When non-nil, automatic completion will start whenever the current
+symbol is preceded by \".\", \"->\" or \"::\", ignoring
+`company-minimum-prefix-length'.
+
+If `company-begin-commands' is a list, it should include `c-electric-lt-gt'
+and `c-electric-colon', for automatic completion right after \">\" and
+\":\"."
+  :type 'boolean)
+
+(defcustom company-semantic-insert-arguments t
+  "When non-nil, insert function arguments as a template after completion."
+  :type 'boolean
+  :package-version '(company . "0.9.0"))
+
+(defvar company-semantic-modes '(c-mode c++-mode jde-mode java-mode))
+
+(defvar-local company-semantic--current-tags nil
+  "Tags for the current context.")
+
+(defun company-semantic-documentation-for-tag (tag)
+  (when (semantic-tag-buffer tag)
+    ;; When TAG's buffer is unknown, the function below raises an error.
+    (semantic-documentation-for-tag tag)))
+
+(defun company-semantic-doc-or-summary (tag)
+  (or (company-semantic-documentation-for-tag tag)
+      (and (require 'semantic-idle nil t)
+           (require 'semantic/idle nil t)
+           (funcall semantic-idle-summary-function tag nil t))))
+
+(defun company-semantic-summary-and-doc (tag)
+  (let ((doc (company-semantic-documentation-for-tag tag))
+        (summary (funcall semantic-idle-summary-function tag nil t)))
+    (and (stringp doc)
+         (string-match "\n*\\(.*\\)$" doc)
+         (setq doc (match-string 1 doc)))
+    (concat summary
+            (when doc
+                  (if (< (+ (length doc) (length summary) 4) (window-width))
+                      " -- "
+                    "\n"))
+            doc)))
+
+(defun company-semantic-doc-buffer (tag)
+  (let ((doc (company-semantic-documentation-for-tag tag)))
+    (when doc
+      (company-doc-buffer
+       (concat (funcall semantic-idle-summary-function tag nil t)
+               "\n"
+               doc)))))
+
+(defsubst company-semantic-completions (prefix)
+  (ignore-errors
+    (let ((completion-ignore-case nil)
+          (context (semantic-analyze-current-context)))
+      (setq company-semantic--current-tags
+            (semantic-analyze-possible-completions context 'no-unique))
+      (all-completions prefix company-semantic--current-tags))))
+
+(defun company-semantic-completions-raw (prefix)
+  (setq company-semantic--current-tags nil)
+  (dolist (tag (semantic-analyze-find-tags-by-prefix prefix))
+    (unless (eq (semantic-tag-class tag) 'include)
+      (push tag company-semantic--current-tags)))
+  (delete "" (mapcar 'semantic-tag-name company-semantic--current-tags)))
+
+(defun company-semantic-annotation (argument tags)
+  (let* ((tag (assq argument tags))
+         (kind (when tag (elt tag 1))))
+    (cl-case kind
+      (function (let* ((prototype (semantic-format-tag-prototype tag nil nil))
+                       (par-pos (string-match "(" prototype)))
+                  (when par-pos (substring prototype par-pos)))))))
+
+(defun company-semantic--prefix ()
+  (if company-semantic-begin-after-member-access
+      (company-grab-symbol-parts "\\.\\|->\\|::" 2)
+    (company-grab-symbol-parts)))
+
+;;;###autoload
+(defun company-semantic (command &optional arg &rest _ignored)
+  "`company-mode' completion backend using CEDET Semantic."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-semantic))
+    (prefix (and (featurep 'semantic)
+                 (semantic-active-p)
+                 (memq major-mode company-semantic-modes)
+                 (not (company-in-string-or-comment))
+                 (or (company-semantic--prefix) 'stop)))
+    (candidates (if (and (string-empty-p arg)
+                         (not (looking-back "->\\|\\.\\|::" (- (point) 2))))
+                    (company-semantic-completions-raw arg)
+                  (company-semantic-completions arg)))
+    (meta (funcall company-semantic-metadata-function
+                   (assoc arg company-semantic--current-tags)))
+    (annotation (company-semantic-annotation arg
+                                             company-semantic--current-tags))
+    (doc-buffer (company-semantic-doc-buffer
+                 (assoc arg company-semantic--current-tags)))
+    ;; Because "" is an empty context and doesn't return local variables.
+    (no-cache (string-empty-p arg))
+    (duplicates t)
+    (location (let ((tag (assoc arg company-semantic--current-tags)))
+                (when (buffer-live-p (semantic-tag-buffer tag))
+                  (cons (semantic-tag-buffer tag)
+                        (semantic-tag-start tag)))))
+    (post-completion (let ((anno (company-semantic-annotation
+                                  arg company-semantic--current-tags)))
+                       (when (and company-semantic-insert-arguments anno)
+                         (insert anno)
+                         (company-template-c-like-templatify (concat arg anno)))
+                       ))))
+
+(provide 'company-semantic)
+;;; company-semantic.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-semantic.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-semantic.elc
new file mode 100644
index 0000000..80e2b89
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-semantic.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-template.el b/emacs/.emacs.d/elpa/company-20260721.100/company-template.el
new file mode 100644
index 0000000..8511bc4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-template.el
@@ -0,0 +1,273 @@
+;;; company-template.el --- utility library for template expansion  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2010, 2013-2017, 2019, 2023-2024  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'cl-lib)
+
+(defface company-template-field
+  '((((background dark)) (:background "yellow" :foreground "black"))
+    (((background light)) (:background "orange" :foreground "black")))
+  "Face used for editable text in template fields."
+  :group 'company-faces)
+
+(defvar company-template-forward-field-item
+  '(menu-item "" company-template-forward-field
+              :filter company-template--keymap-filter))
+
+(defvar company-template-nav-map
+  (let ((keymap (make-sparse-keymap)))
+    (define-key keymap [tab] company-template-forward-field-item)
+    (define-key keymap (kbd "TAB") company-template-forward-field-item)
+    keymap))
+
+(defvar company-template-clear-field-item
+  '(menu-item "" company-template-clear-field
+              :filter company-template--keymap-filter))
+
+(defvar company-template-field-map
+  (let ((keymap (make-sparse-keymap)))
+    (set-keymap-parent keymap company-template-nav-map)
+    (define-key keymap (kbd "C-d") company-template-clear-field-item)
+    keymap))
+
+(defvar-local company-template--buffer-templates nil)
+
+;; interactive ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defun company-template-templates-at (pos)
+  (let (os)
+    (dolist (o (overlays-at pos))
+      ;; FIXME: Always return the whole list of templates?
+      ;; We remove templates not at point after every command.
+      (when (memq o company-template--buffer-templates)
+        (push o os)))
+    os))
+
+(defun company-template-move-to-first (templ)
+  (interactive)
+  (goto-char (overlay-start templ))
+  (company-template-forward-field))
+
+(defun company-template-forward-field ()
+  (interactive)
+  (let ((start (point))
+        (next-field-start (company-template-find-next-field)))
+    (push-mark)
+    (goto-char next-field-start)
+    (company-template-remove-field (company-template-field-at start))))
+
+(defun company-template-clear-field ()
+  "Clear the field at point."
+  (interactive)
+  (let ((ovl (company-template-field-at (point))))
+    (when ovl
+      (company-template-remove-field ovl t)
+      (let ((after-clear-fn
+             (overlay-get ovl 'company-template-after-clear)))
+        (when (functionp after-clear-fn)
+          (funcall after-clear-fn))))))
+
+(defun company-template--keymap-filter (cmd)
+  (unless (run-hook-with-args-until-success 'yas-keymap-disable-hook)
+    cmd))
+
+(defun company-template--after-clear-c-like-field ()
+  "Function that can be called after deleting a field of a c-like template.
+For c-like templates it is set as `after-post-fn' property on fields in
+`company-template-add-field'.  If there is a next field, delete everything
+from point to it.  If there is no field after point, remove preceding comma
+if present."
+  (let* ((pos (point))
+         (next-field-start (company-template-find-next-field))
+         (last-field-p (not (company-template-field-at next-field-start))))
+    (cond ((and (not last-field-p)
+                (< pos next-field-start)
+                (string-match "^[ ]*,+[ ]*$" (buffer-substring-no-properties
+                                              pos next-field-start)))
+           (delete-region pos next-field-start))
+          ((and last-field-p
+                (looking-back ",+[ ]*" (line-beginning-position)))
+           (delete-region (match-beginning 0) pos)))))
+
+(defun company-template-find-next-field ()
+  (let* ((start (point))
+         (templates (company-template-templates-at start))
+         (minimum (apply 'max (mapcar 'overlay-end templates)))
+         (fields (cl-loop for templ in templates
+                          append (overlay-get templ 'company-template-fields))))
+    (dolist (pos (mapcar 'overlay-start fields) minimum)
+      (and pos
+           (> pos start)
+           (< pos minimum)
+           (setq minimum pos)))))
+
+(defun company-template-field-at (&optional point)
+  (cl-loop for ovl in (overlays-at (or point (point)))
+           when (overlay-get ovl 'company-template-parent)
+           return ovl))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defun company-template-declare-template (beg end)
+  (let ((ov (make-overlay beg end)))
+    ;; (overlay-put ov 'face 'highlight)
+    (overlay-put ov 'keymap company-template-nav-map)
+    (overlay-put ov 'priority 101)
+    (overlay-put ov 'evaporate t)
+    (push ov company-template--buffer-templates)
+    (add-hook 'post-command-hook 'company-template-post-command nil t)
+    ov))
+
+(defun company-template-remove-template (templ)
+  (mapc 'company-template-remove-field
+        (overlay-get templ 'company-template-fields))
+  (setq company-template--buffer-templates
+        (delq templ company-template--buffer-templates))
+  (delete-overlay templ))
+
+(defun company-template-add-field (templ beg end &optional display after-clear-fn)
+  "Add new field to template TEMPL spanning from BEG to END.
+When DISPLAY is non-nil, set the respective property on the overlay.
+Leave point at the end of the field.
+AFTER-CLEAR-FN is a function that can be used to apply custom behavior
+after deleting a field in `company-template-remove-field'."
+  (cl-assert templ)
+  (when (> end (overlay-end templ))
+    (move-overlay templ (overlay-start templ) end))
+  (let ((ov (make-overlay beg end))
+        (siblings (overlay-get templ 'company-template-fields)))
+    ;; (overlay-put ov 'evaporate t)
+    (overlay-put ov 'intangible t)
+    (overlay-put ov 'face 'company-template-field)
+    (when display
+      (overlay-put ov 'display display))
+    (overlay-put ov 'company-template-parent templ)
+    (overlay-put ov 'insert-in-front-hooks '(company-template-insert-hook))
+    (when after-clear-fn
+      (overlay-put ov 'company-template-after-clear after-clear-fn))
+    (overlay-put ov 'keymap company-template-field-map)
+    (overlay-put ov 'priority 101)
+    (push ov siblings)
+    (overlay-put templ 'company-template-fields siblings)))
+
+(defun company-template-remove-field (ovl &optional clear)
+  (when (overlayp ovl)
+    (when (overlay-buffer ovl)
+      (when clear
+        (delete-region (overlay-start ovl) (overlay-end ovl)))
+      (delete-overlay ovl))
+    (let* ((templ (overlay-get ovl 'company-template-parent))
+           (siblings (overlay-get templ 'company-template-fields)))
+      (setq siblings (delq ovl siblings))
+      (overlay-put templ 'company-template-fields siblings))))
+
+(defun company-template-clean-up (&optional pos)
+  "Clean up all templates that don't contain POS."
+  (let ((local-ovs (overlays-at (or pos (point)))))
+    (dolist (templ company-template--buffer-templates)
+      (unless (memq templ local-ovs)
+        (company-template-remove-template templ)))))
+
+;; hooks ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defun company-template-insert-hook (ovl after-p &rest _ignore)
+  "Called when a snippet input prompt is modified."
+  (unless after-p
+    (company-template-remove-field ovl t)))
+
+(defun company-template-post-command ()
+  (company-template-clean-up)
+  (unless company-template--buffer-templates
+    (remove-hook 'post-command-hook 'company-template-post-command t)))
+
+;; common ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defun company-template-c-like-templatify (call)
+  (let* ((end (point-marker))
+         (beg (- (point) (length call)))
+         (templ (company-template-declare-template beg end))
+         forward-sexp-function
+         paren-open paren-close)
+    (with-syntax-table (make-syntax-table (syntax-table))
+      (modify-syntax-entry ?< "(")
+      (modify-syntax-entry ?> ")")
+      (when (search-backward ")" beg t)
+        (setq paren-close (point-marker))
+        (forward-char 1)
+        (delete-region (point) end)
+        (backward-sexp)
+        (forward-char 1)
+        (setq paren-open (point-marker)))
+      (when (search-backward ">" beg t)
+        (let ((angle-close (point-marker)))
+          (forward-char 1)
+          (backward-sexp)
+          (forward-char)
+          (company-template--c-like-args templ angle-close)))
+      (when (looking-back "\\((\\*)\\)(" (line-beginning-position))
+        (delete-region (match-beginning 1) (match-end 1)))
+      (when paren-open
+        (goto-char paren-open)
+        (company-template--c-like-args templ paren-close)))
+    (if (overlay-get templ 'company-template-fields)
+        (company-template-move-to-first templ)
+      (company-template-remove-template templ)
+      (goto-char end))))
+
+(defun company-template--c-like-args (templ end)
+  (let ((last-pos (point)))
+    (while (re-search-forward "\\([^,]+\\),?" end 'move)
+      (when (zerop (car (parse-partial-sexp last-pos (point))))
+        (company-template-add-field templ last-pos (match-end 1) nil
+                                    #'company-template--after-clear-c-like-field)
+        (skip-chars-forward " ")
+        (setq last-pos (point))))))
+
+;; objc ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defun company-template-objc-templatify (selector)
+  (let* ((end (point-marker))
+         (beg (- (point) (length selector) 1))
+         (templ (company-template-declare-template beg end))
+         (cnt 0))
+    (save-excursion
+      (goto-char beg)
+      (catch 'stop
+        (while (search-forward ":" end t)
+          (if (looking-at "\\(([^)]*)\\) ?")
+              (company-template-add-field templ (point) (match-end 1))
+            ;; Not sure which conditions this case manifests under, but
+            ;; apparently it did before, when I wrote the first test for this
+            ;; function.  FIXME: Revisit it.
+            (company-template-add-field templ (point)
+                                        (progn
+                                          (insert (format "arg%d" cnt))
+                                          (point)))
+            (when (< (point) end)
+              (insert " "))
+            (cl-incf cnt))
+          (when (>= (point) end)
+            (throw 'stop t)))))
+    (company-template-move-to-first templ)))
+
+(provide 'company-template)
+;;; company-template.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-template.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-template.elc
new file mode 100644
index 0000000..d0d21ec
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-template.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-tempo.el b/emacs/.emacs.d/elpa/company-20260721.100/company-tempo.el
new file mode 100644
index 0000000..6126033
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-tempo.el
@@ -0,0 +1,72 @@
+;;; company-tempo.el --- company-mode completion backend for tempo  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2011, 2013-2016, 2023  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+(require 'tempo)
+
+(defgroup company-tempo nil
+  "Tempo completion backend."
+  :group 'company)
+
+(defcustom company-tempo-expand nil
+  "Whether to expand a tempo tag after completion."
+  :type '(choice (const :tag "Off" nil)
+                 (const :tag "On" t)))
+
+(defsubst company-tempo-lookup (match)
+  (cdr (assoc match (tempo-build-collection))))
+
+(defun company-tempo-insert (match)
+  "Replace MATCH with the expanded tempo template."
+  (search-backward match)
+  (goto-char (match-beginning 0))
+  (replace-match "")
+  (call-interactively (company-tempo-lookup match)))
+
+(defsubst company-tempo-meta (match)
+  (let ((templ (company-tempo-lookup match))
+        doc)
+    (and templ
+         (setq doc (documentation templ t))
+         (car (split-string doc "\n" t)))))
+
+;;;###autoload
+(defun company-tempo (command &optional arg &rest _ignored)
+  "`company-mode' completion backend for tempo."
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-tempo))
+    (prefix (or (car (tempo-find-match-string tempo-match-finder)) ""))
+    (candidates (all-completions arg (tempo-build-collection)))
+    (kind 'snippet)
+    (meta (company-tempo-meta arg))
+    (post-completion (when company-tempo-expand (company-tempo-insert arg)))
+    (sorted t)))
+
+(provide 'company-tempo)
+;;; company-tempo.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-tempo.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-tempo.elc
new file mode 100644
index 0000000..712422a
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-tempo.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-tng.el b/emacs/.emacs.d/elpa/company-20260721.100/company-tng.el
new file mode 100644
index 0000000..1de8513
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-tng.el
@@ -0,0 +1,201 @@
+;;; company-tng.el --- company-mode configuration for single-button interaction  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017-2024  Free Software Foundation, Inc.
+
+;; Author: Nikita Leshenko
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+;; company-tng (Tab and Go) allows you to perform completion using just TAB.
+;; Pressing it will both select the next completion candidate in the list and
+;; insert it into the buffer (or make it look like it's inserted, in fact).
+;;
+;; It cycles the candidates like `yank-pop' or `dabbrev-expand' or Vim:
+;; Pressing TAB selects the first item in the completion menu and inserts it in
+;; the buffer. Pressing TAB again selects the second item and replaces the
+;; "inserted" item with the second one. This can continue as long as the user
+;; wishes to cycle through the menu. You can also press S-TAB to select the
+;; previous candidate, of course.
+;;
+;; The benefits are that you only have to use one shortcut key and there is no
+;; need to confirm the entry.
+;;
+;; Usage:
+;;
+;; Enable `company-tng-mode' with:
+;;
+;;   (add-hook 'after-init-hook 'company-tng-mode)
+;;
+;; in your init script. It will set up the required frontend, as well as make a
+;; number of recommended configuration changes described below.
+;;
+;; To avoid these changes, if you want to tweak everything yourself, customize
+;;`company-tng-auto-configure' to nil.
+;;
+;; We recommend to bind TAB to `company-select-next', S-TAB to
+;; `company-select-previous', and unbind RET and other now-unnecessary
+;; keys from `company-active-map':
+;;
+;;   (define-key company-active-map (kbd "TAB") 'company-select-next)
+;;   (define-key company-active-map (kbd "<backtab>") 'company-select-previous)
+;;   (define-key company-active-map (kbd "RET") nil)
+;;
+;; Note that it's not necessary to rebind keys to use this frontend,
+;; you can use the arrow keys or M-n/M-p to select and insert
+;; candidates. You also need to decide which keys to unbind, depending
+;; on whether you want them to do the Company action or the default
+;; Emacs action (for example C-s or M-g).
+;;
+;; We recommend to disable `company-require-match' to allow free typing at any
+;; point.
+;;
+;; By default, company-tng doesn't work well with backends that insert function
+;; arguments into the buffer and (optionally) expand them into a snippet
+;; (usually performed in `post-completion' using yasnippet or company-template).
+;; In company-tng, completion candidates
+;; are inserted into the buffer as the user selects them and the completion is
+;; finished implicitly when the user continues typing after selecting a
+;; candidate. Modifying the buffer (by expanding a snippet) when the user
+;; continues typing would be surprising and undesirable, since the candidate was
+;; already inserted into the buffer.
+;;
+;; For this reason `company-tng-mode' by default disables arguments insertion
+;; for a number of popular backends. If the backend you are using is not among
+;; them, you might have to configure it not to do that yourself.
+;;
+;; YASnippet and company-tng both use TAB, which causes conflicts. The
+;; recommended way to use YASnippet with company-tng is to choose a different
+;; key for expanding a snippet and moving to the next snippet field:
+;;
+;;   (define-key yas-minor-mode-map "\C-j" 'yas-expand)
+;;   (define-key yas-keymap "\C-j" 'yas-next-field-or-maybe-expand)
+;;   (dolist (keymap (list yas-minor-mode-map yas-keymap))
+;;     (define-key keymap (kbd "TAB") nil)
+;;     (define-key keymap [(tab)] nil))
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+
+(defvar-local company-tng--overlay nil)
+
+;;;###autoload
+(defun company-tng-frontend (command)
+  "When the user changes the selection at least once, this
+frontend will display the candidate in the buffer as if it's
+already there and any key outside of `company-active-map' will
+confirm the selection and finish the completion."
+  (cl-case command
+    (show
+     (let ((ov (make-overlay (point) (point))))
+       (setq company-tng--overlay ov)
+       (overlay-put ov 'priority 2)))
+    (update
+     (let* ((ov company-tng--overlay)
+            (selected (and company-selection
+                           (nth company-selection company-candidates)))
+            (prefix (length (car (company--boundaries)))))
+       (move-overlay ov (- (point) prefix) (point))
+       (overlay-put ov
+                    (if (= prefix 0) 'after-string 'display)
+                    selected)))
+    (hide
+     (when company-tng--overlay
+       (delete-overlay company-tng--overlay)
+       (kill-local-variable 'company-tng--overlay)))
+    (pre-command
+     (when (and company-selection
+                (not (company--company-command-p (this-command-keys))))
+       (company--unread-this-command-keys)
+       (setq this-command 'company-complete-selection)))
+    (post-command
+     (when (and (eq this-command 'company-complete-selection)
+             (zerop (length (car (company--boundaries))))
+             (eql (preceding-char) (car unread-command-events)))
+       (delete-char -1)))))
+
+(defvar company-clang-insert-arguments)
+(defvar company-semantic-insert-arguments)
+(defvar company-rtags-insert-arguments)
+(defvar lsp-enable-snippet)
+
+(defgroup company-tng nil
+  "Company Tab and Go."
+  :group 'company)
+
+(defcustom company-tng-auto-configure t
+  "Automatically apply default configure when enable `company-tng-mode'."
+  :type 'boolean)
+
+;;;###autoload
+(define-obsolete-function-alias 'company-tng-configure-default 'company-tng-mode "0.10.0"
+  "Applies the default configuration to enable company-tng.")
+
+(declare-function eglot--snippet-expansion-fn "eglot")
+
+(defvar company-tng-map
+  (let ((keymap (make-sparse-keymap)))
+    (set-keymap-parent keymap company-active-map)
+    (define-key keymap [return] nil)
+    (define-key keymap (kbd "RET") nil)
+    (define-key keymap [tab] 'company-select-next)
+    (define-key keymap (kbd "TAB") 'company-select-next)
+    (define-key keymap [backtab] 'company-select-previous)
+    (define-key keymap (kbd "S-TAB") 'company-select-previous)
+    keymap))
+
+;;;###autoload
+(define-minor-mode company-tng-mode
+ "This minor mode enables `company-tng-frontend'."
+  :init-value nil
+  :global t
+  (cond
+   (company-tng-mode
+    (setq company-frontends
+          (add-to-list 'company-frontends 'company-tng-frontend))
+    (when company-tng-auto-configure
+      (setq company-frontends '(company-tng-frontend
+                                company-pseudo-tooltip-frontend
+                                company-echo-metadata-frontend))
+      (setq company-require-match nil
+            company-clang-insert-arguments nil
+            company-semantic-insert-arguments nil
+            company-rtags-insert-arguments nil
+            lsp-enable-snippet nil)
+      (advice-add #'eglot--snippet-expansion-fn :override #'ignore)
+      (setq company-active-map company-tng-map))
+    (setq company-selection-default nil))
+   (t
+    (setq company-frontends
+          '(company-pseudo-tooltip-unless-just-one-frontend
+            company-preview-if-just-one-frontend
+            company-echo-metadata-frontend))
+    (when company-tng-auto-configure
+      (setq company-require-match 'company-explicit-action-p
+            company-clang-insert-arguments t
+            company-semantic-insert-arguments t
+            company-rtags-insert-arguments t
+            lsp-enable-snippet t)
+      (advice-remove #'eglot--snippet-expansion-fn #'ignore)
+      (setq company-active-map (keymap-parent company-tng-map)))
+    (setq company-selection-default 0))))
+
+(provide 'company-tng)
+;;; company-tng.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-tng.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-tng.elc
new file mode 100644
index 0000000..060b614
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-tng.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-yasnippet.el b/emacs/.emacs.d/elpa/company-20260721.100/company-yasnippet.el
new file mode 100644
index 0000000..f5d6d90
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company-yasnippet.el
@@ -0,0 +1,200 @@
+;;; company-yasnippet.el --- company-mode completion backend for Yasnippet  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2014-2015, 2020-2023  Free Software Foundation, Inc.
+
+;; Author: Dmitry Gutov
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+(require 'company)
+(require 'cl-lib)
+
+(declare-function yas--table-hash "yasnippet")
+(declare-function yas--get-snippet-tables "yasnippet")
+(declare-function yas-expand-snippet "yasnippet")
+(declare-function yas--template-content "yasnippet")
+(declare-function yas--template-expand-env "yasnippet")
+(declare-function yas--warning "yasnippet")
+(declare-function yas-minor-mode "yasnippet")
+(declare-function yas--require-template-specific-condition-p "yasnippet")
+(declare-function yas--template-can-expand-p "yasnippet")
+(declare-function yas--template-condition "yasnippet")
+
+(defvar company-yasnippet-annotation-fn
+  (lambda (name)
+    (concat
+     (unless company-tooltip-align-annotations " -> ")
+     name))
+  "Function to format completion annotation.
+It has to accept one argument: the snippet's name.")
+
+(defun company-yasnippet--key-prefixes ()
+  ;; Mostly copied from `yas--templates-for-key-at-point'.
+  (defvar yas-key-syntaxes)
+  (save-excursion
+    (let ((original (point))
+          (methods yas-key-syntaxes)
+          prefixes
+          method)
+      (while methods
+        (unless (eq method (car methods))
+          (goto-char original))
+        (setq method (car methods))
+        (cond ((stringp method)
+               (skip-syntax-backward method)
+               (setq methods (cdr methods)))
+              ((functionp method)
+               (unless (eq (funcall method original)
+                           'again)
+                 (setq methods (cdr methods))))
+              (t
+               (setq methods (cdr methods))
+               (yas--warning "Invalid element `%s' in `yas-key-syntaxes'" method)))
+        (let ((prefix (buffer-substring-no-properties (point) original)))
+          (unless (equal prefix (car prefixes))
+            (push prefix prefixes))))
+      (nreverse prefixes))))
+
+(defun company-yasnippet--candidates (prefix)
+  ;; Process the prefixes in reverse: unlike Yasnippet, we look for prefix
+  ;; matches, so the longest prefix with any matches should be the most useful.
+  (cl-loop with tables = (yas--get-snippet-tables)
+           for key-prefix in (company-yasnippet--key-prefixes)
+           ;; Only consider keys at least as long as the symbol at point.
+           when (>= (length key-prefix) (length prefix))
+           thereis (company-yasnippet--completions-for-prefix prefix
+                                                              key-prefix
+                                                              tables)))
+
+(defun company-yasnippet--completions-for-prefix (prefix key-prefix tables)
+  (cl-mapcan
+   (lambda (table)
+     (let ((keyhash (yas--table-hash table))
+           (requirement (yas--require-template-specific-condition-p))
+           res)
+       (when keyhash
+         (maphash
+          (lambda (key value)
+            (when (and (stringp key)
+                       (string-prefix-p key-prefix key))
+              (maphash
+               (lambda (name template)
+                 (when (yas--template-can-expand-p
+                        (yas--template-condition template) requirement)
+                   (push
+                    (propertize key
+                                'yas-annotation name
+                                'yas-template template
+                                'yas-prefix-offset (- (length key-prefix)
+                                                      (length prefix)))
+                    res)))
+               value)))
+          keyhash))
+       res))
+   tables))
+
+(defun company-yasnippet--doc (arg)
+  (let ((template (get-text-property 0 'yas-template arg))
+        (mode major-mode)
+        (file-name (buffer-file-name)))
+    (defvar yas-prompt-functions)
+    (with-current-buffer (company-doc-buffer)
+      (let ((buffer-file-name file-name))
+        (yas-minor-mode 1)
+        (setq-local yas-prompt-functions '(yas-no-prompt))
+        (condition-case error
+            (yas-expand-snippet (yas--template-content template))
+          (error
+           (message "%s"  (error-message-string error))))
+        (delay-mode-hooks
+          (let ((inhibit-message t))
+            (if (eq mode 'web-mode)
+                (progn
+                  (setq mode 'html-mode)
+                  (funcall mode))
+              (funcall mode)))
+          (ignore-errors (font-lock-ensure))))
+      (current-buffer))))
+
+(defun company-yasnippet--prefix ()
+  ;; We can avoid the prefix length manipulations after GH#426 is fixed.
+  (let* ((prefix (company-grab-symbol))
+         (tables (yas--get-snippet-tables))
+         (key-prefixes (company-yasnippet--key-prefixes))
+         key-prefix)
+    (while (and key-prefixes
+                (setq key-prefix (pop key-prefixes)))
+      (when (company-yasnippet--completions-for-prefix
+             prefix key-prefix tables)
+        ;; Stop iteration.
+        (setq key-prefixes nil)))
+    (if (equal key-prefix prefix)
+        prefix
+      (cons prefix (length key-prefix)))))
+
+;;;###autoload
+(defun company-yasnippet (command &optional arg &rest _ignore)
+  "`company-mode' backend for `yasnippet'.
+
+This backend should be used with care, because as long as there are
+snippets defined for the current major mode, this backend will always
+shadow backends that come after it.  Recommended usages:
+
+* In a buffer-local value of `company-backends', grouped with a backend or
+  several that provide actual text completions.
+
+  (add-hook \\='js-mode-hook
+            (lambda ()
+              (set (make-local-variable \\='company-backends)
+                   \\='((company-dabbrev-code company-yasnippet)))))
+
+* After keyword `:with', grouped with other backends.
+
+  (push \\='(company-semantic :with company-yasnippet) company-backends)
+
+* Not in `company-backends', just bound to a key.
+
+  (global-set-key (kbd \"C-c y\") \\='company-yasnippet)
+"
+  (interactive (list 'interactive))
+  (cl-case command
+    (interactive (company-begin-backend 'company-yasnippet))
+    (prefix
+     (and (bound-and-true-p yas-minor-mode)
+          (company-yasnippet--prefix)))
+    (annotation
+     (funcall company-yasnippet-annotation-fn
+              (get-text-property 0 'yas-annotation arg)))
+    (candidates (company-yasnippet--candidates arg))
+    (doc-buffer (company-yasnippet--doc arg))
+    (no-cache t)
+    (kind 'snippet)
+    (post-completion
+     (let ((template (get-text-property 0 'yas-template arg))
+           (prefix-offset (get-text-property 0 'yas-prefix-offset arg)))
+       (yas-expand-snippet (yas--template-content template)
+                           (- (point) (length arg) prefix-offset)
+                           (point)
+                           (yas--template-expand-env template))))))
+
+(provide 'company-yasnippet)
+;;; company-yasnippet.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company-yasnippet.elc b/emacs/.emacs.d/elpa/company-20260721.100/company-yasnippet.elc
new file mode 100644
index 0000000..e5a31d1
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company-yasnippet.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company.el b/emacs/.emacs.d/elpa/company-20260721.100/company.el
new file mode 100644
index 0000000..d8ec2c1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company.el
@@ -0,0 +1,4901 @@
+;;; company.el --- Modular text completion framework  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2009-2026  Free Software Foundation, Inc.
+
+;; Author: Nikolaj Schumacher
+;; Maintainer: Dmitry Gutov <dmitry@gutov.dev>
+;; URL: http://company-mode.github.io/
+;; Package-Version: 20260721.100
+;; Package-Revision: 1cc907ac9e46
+;; Keywords: abbrev, convenience, matching
+;; Package-Requires: ((emacs "26.1") (posframe "1.5.1"))
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; Company is a modular completion framework.  Modules for retrieving completion
+;; candidates are called backends, modules for displaying them are frontends.
+;;
+;; Company comes with many backends, e.g. `company-etags'.  These are
+;; distributed in separate files and can be used individually.
+;;
+;; Enable `company-mode' in all buffers with M-x global-company-mode.  For
+;; further information look at the documentation for `company-mode' (C-h f
+;; company-mode RET).
+;;
+;; If you want to start a specific backend, call it interactively or use
+;; `company-begin-backend'.  For example:
+;; M-x company-abbrev will prompt for and insert an abbrev.
+;;
+;; To write your own backend, look at the documentation for `company-backends'.
+;; Here is a simple example completing "foo":
+;;
+;; (defun company-my-backend (command &optional arg &rest ignored)
+;;   (interactive (list 'interactive))
+;;   (pcase command
+;;     (`interactive (company-begin-backend 'company-my-backend))
+;;     (`prefix (company-grab-symbol))
+;;     (`candidates (list "foobar" "foobaz" "foobarbaz"))
+;;     (`meta (format "This value is named %s" arg))))
+;;
+;; Sometimes it is a good idea to mix several backends together, for example to
+;; enrich gtags with dabbrev-code results (to emulate local variables).  To do
+;; this, add a list with both backends as an element in `company-backends'.
+;;
+;;; Change Log:
+;;
+;; See NEWS.md in the repository.
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'subr-x)
+(require 'pcase)
+
+(defgroup company nil
+  "Extensible inline text completion mechanism."
+  :group 'abbrev
+  :group 'convenience
+  :group 'matching
+  :link '(custom-manual "(company) Top"))
+
+(defgroup company-faces nil
+  "Faces used by Company."
+  :group 'company
+  :group 'faces)
+
+(defface company-tooltip
+  '((((class color) (min-colors 88) (background light))
+     (:foreground "black" :background "ghostwhite"))
+    (((class color) (min-colors 88) (background dark))
+     (:background "gray26"))
+    (t (:foreground "black" :background "yellow")))
+  "Face used for the tooltip.")
+
+(defface company-tooltip-selection
+  '((((class color) (min-colors 88) (background light))
+     (:background "lavender"))
+    (((class color) (min-colors 88) (background dark))
+     (:background "gray31"))
+    (t (:background "green")))
+  "Face used for the selection in the tooltip.")
+
+(defface company-tooltip-deprecated
+  '((t (:strike-through t)))
+  "Face used for the deprecated items.")
+
+(defface company-tooltip-search
+  '((default :inherit isearch))
+  "Face used for the search string in the tooltip.")
+
+(defface company-tooltip-search-selection
+  '((default :inherit isearch))
+  "Face used for the search string inside the selection in the tooltip.")
+
+(defface company-tooltip-mouse
+  '((default :inherit highlight))
+  "Face used for the tooltip item under the mouse.")
+
+(defface company-tooltip-common
+  '((((background light))
+     :foreground "darkred")
+    (((background dark))
+     :foreground "pale turquoise"))
+  "Face used for the common completion in the tooltip.")
+
+(defface company-tooltip-common-selection
+  '((default :inherit company-tooltip-common))
+  "Face used for the selected common completion in the tooltip.")
+
+(defface company-tooltip-annotation
+  '((((background light))
+     :foreground "firebrick4")
+    (((background dark))
+     :foreground "LightCyan3"))
+  "Face used for the completion annotation in the tooltip.")
+
+(defface company-tooltip-annotation-selection
+  '((default :inherit company-tooltip-annotation))
+  "Face used for the selected completion annotation in the tooltip.")
+
+(defface company-tooltip-quick-access
+  '((default :inherit company-tooltip-annotation))
+  "Face used for the quick-access hints shown in the tooltip."
+  :package-version '(company . "0.10.0"))
+
+(defface company-tooltip-quick-access-selection
+  '((default :inherit company-tooltip-annotation-selection))
+  "Face used for the selected quick-access hints shown in the tooltip."
+  :package-version '(company . "0.10.0"))
+
+(define-obsolete-face-alias
+ 'company-scrollbar-fg
+ 'company-tooltip-scrollbar-thumb
+ "0.10.0")
+
+(defface company-tooltip-scrollbar-thumb
+  '((((background light))
+     :background "lightpink3")
+    (((background dark))
+     :background "gray33"))
+  "Face used for the tooltip scrollbar thumb (bar).")
+
+(define-obsolete-face-alias
+ 'company-scrollbar-bg
+ 'company-tooltip-scrollbar-track
+ "0.10.0")
+
+(defface company-tooltip-scrollbar-track
+  '((((background light))
+     :background "thistle")
+    (((background dark))
+     :background "gray28"))
+  "Face used for the tooltip scrollbar track (trough).")
+
+(defface company-preview
+  '((default :inherit (company-tooltip-selection company-tooltip)))
+  "Face used for the completion preview.")
+
+(defface company-preview-common
+  '((default :inherit company-tooltip-common-selection))
+  "Face used for the common part of the completion preview.")
+
+(defface company-preview-search
+  '((default :inherit isearch))
+  "Face used for the search string in the completion preview.")
+
+(defface company-echo nil
+  "Face used for completions in the echo area.")
+
+(defface company-echo-common
+  '((((background light)) (:foreground "firebrick4"))
+    (((background dark)) (:foreground "firebrick1")))
+  "Face used for the common part of completions in the echo area.")
+
+;; Too lazy to re-add :group to all defcustoms down below.
+(setcdr (assoc load-file-name custom-current-group-alist)
+        'company)
+
+(defun company-frontends-set (variable value)
+  ;; Uniquify.
+  (let ((value (delete-dups (copy-sequence value)))
+        (tooltip-frontends
+         '(company-pseudo-tooltip-frontend
+           company-pseudo-tooltip-unless-just-one-frontend
+           company-pseudo-tooltip-unless-just-one-frontend-with-delay
+           company-childframe-frontend
+           company-childframe-unless-just-one-frontend))
+        (preview-frontends
+         '(company-preview-if-just-one-frontend
+           company-preview-common-frontend
+           company-preview-frontend)))
+    (and (> (cl-count-if (lambda (el) (member el tooltip-frontends)) value)
+            1)
+         (user-error "Any tooltip frontend can be used only once"))
+    (and (> (cl-count-if (lambda (el) (member el preview-frontends)) value)
+            1)
+         (user-error "Preview frontend cannot be used twice"))
+    (and (memq 'company-echo value)
+         (memq 'company-echo-metadata-frontend value)
+         (user-error "Echo area cannot be used twice"))
+    ;; Preview must come last.
+    (dolist (f '(company-preview-if-just-one-frontend company-preview-frontend company-preview-common-frontend))
+      (when (cdr (memq f value))
+        (setq value (append (delq f value) (list f)))))
+    (set variable value)))
+
+(defcustom company-frontends `(,@(list
+                                  (if (or (memq window-system '(ns mac w32 pgtk))
+                                          (< 30 emacs-major-version))
+                                      'company-childframe-unless-just-one-frontend
+                                    'company-pseudo-tooltip-unless-just-one-frontend))
+                               company-preview-if-just-one-frontend
+                               company-echo-metadata-frontend)
+  "The list of active frontends (visualizations).
+Each frontend is a function that takes one argument.  It is called with
+one of the following arguments:
+
+`show': When the visualization should start.
+
+`hide': When the visualization should end.
+
+`update': When the data has been updated.
+
+`pre-command': Before every command that is executed while the
+visualization is active.
+
+`post-command': After every command that is executed while the
+visualization is active.
+
+`unhide': When an asynchronous backend is waiting for its completions.
+Only needed in frontends which hide their visualizations in `pre-command'
+for technical reasons.
+
+The visualized data is stored in `company-prefix', `company-candidates',
+`company-common', `company-selection', `company-point' and
+`company-search-string'."
+  :package-version '(company . "1.1.0")
+  :set 'company-frontends-set
+  :type '(repeat (choice (const :tag "echo" company-echo-frontend)
+                         (const :tag "echo, strip common"
+                                company-echo-strip-common-frontend)
+                         (const :tag "show completion's meta-data in echo"
+                                company-echo-metadata-frontend)
+                         (const :tag "graphical tooltip"
+                                company-childframe-frontend)
+                         (const :tag "graphical tooltip, multiple completions only"
+                                company-childframe-unless-just-one-frontend)
+                         (const :tag "overlays based tooltip"
+                                company-pseudo-tooltip-frontend)
+                         (const :tag "overlays based tooltip, multiple completions only"
+                                company-pseudo-tooltip-unless-just-one-frontend)
+                         (const :tag "overlays based tooltip, multiple completions only, delayed"
+                                company-pseudo-tooltip-unless-just-one-frontend-with-delay)
+                         (const :tag "preview" company-preview-frontend)
+                         (const :tag "preview, unique completion only"
+                                company-preview-if-just-one-frontend)
+                         (const :tag "preview, common"
+                                company-preview-common-frontend)
+                         (function :tag "custom function" nil))))
+
+(defcustom company-tooltip-limit 10
+  "The maximum number of candidates in the tooltip."
+  :type 'integer)
+
+(defcustom company-tooltip-minimum 6
+  "Ensure visibility of this number of candidates.
+When that many lines are not available between point and the bottom of the
+window, display the tooltip above point."
+  :type 'integer)
+
+(defcustom company-tooltip-minimum-width 15
+  "The minimum width of the tooltip's inner area.
+This doesn't include the margins and the scroll bar."
+  :type 'integer
+  :package-version '(company . "1.1.0"))
+
+(defcustom company-tooltip-maximum-width 100
+  "The maximum width of the tooltip's inner area.
+This doesn't include the margins and the scroll bar."
+  :type 'integer
+  :package-version '(company . "1.1.0"))
+
+(defcustom company-tooltip-width-grow-only 50
+  "When non-nil, the tooltip width is not allowed to decrease."
+  :type 'boolean
+  :package-version '(company . "1.1.0"))
+
+(defcustom company-tooltip-margin 1
+  "Width of margin columns to show around the toolip."
+  :type 'integer)
+
+(defcustom company-tooltip-offset-display 'scrollbar
+  "Method using which the tooltip displays scrolling position.
+`scrollbar' means draw a scrollbar to the right of the items.
+`lines' means wrap items in lines with \"before\" and \"after\" counters."
+  :type '(choice (const :tag "Scrollbar" scrollbar)
+                 (const :tag "Two lines" lines)))
+
+(defcustom company-tooltip-scrollbar-width 0.4
+  "Width of the scrollbar thumb, in columns."
+  :type 'number
+  :package-version '(company . "1.0.0"))
+
+(defcustom company-tooltip-align-annotations nil
+  "When non-nil, align annotations to the right tooltip border."
+  :type 'boolean
+  :package-version '(company . "0.7.1"))
+
+(defcustom company-tooltip-flip-when-above nil
+  "Whether to flip the tooltip when it's above the current line."
+  :type 'boolean
+  :package-version '(company . "0.8.1"))
+
+(defcustom company-tooltip-annotation-padding nil
+  "Non-nil to specify the padding before annotation.
+
+Depending on the value of `company-tooltip-align-annotations', the default
+padding is either 0 or 1 space.  This variable allows to override that
+value to increase the padding.  When annotations are right-aligned, it sets
+the minimum padding, and otherwise just the constant one."
+  :type 'number
+  :package-version '(company "0.10.0"))
+
+(defvar company-safe-backends
+  '((company-abbrev . "Abbrev")
+    (company-bbdb . "BBDB")
+    (company-capf . "completion-at-point-functions")
+    (company-clang . "Clang")
+    (company-cmake . "CMake")
+    (company-css . "CSS (obsolete backend)")
+    (company-dabbrev . "dabbrev for plain text")
+    (company-dabbrev-code . "dabbrev for code")
+    (company-elisp . "Emacs Lisp (obsolete backend)")
+    (company-etags . "etags")
+    (company-files . "Files")
+    (company-gtags . "GNU Global")
+    (company-ispell . "Ispell")
+    (company-keywords . "Programming language keywords")
+    (company-nxml . "nxml (obsolete backend)")
+    (company-oddmuse . "Oddmuse")
+    (company-semantic . "Semantic")
+    (company-tempo . "Tempo templates")))
+(put 'company-safe-backends 'risky-local-variable t)
+
+(defun company-safe-backends-p (backends)
+  (and (consp backends)
+       (not (cl-dolist (backend backends)
+              (unless (if (consp backend)
+                          (company-safe-backends-p backend)
+                        (assq backend company-safe-backends))
+                (cl-return t))))))
+
+(defcustom company-backends `(company-bbdb
+                              ,@(unless (version<= "26" emacs-version)
+                                  (list 'company-nxml))
+                              ,@(unless (version<= "26" emacs-version)
+                                  (list 'company-css))
+                              company-semantic
+                              company-cmake
+                              company-capf
+                              company-clang
+                              company-files
+                              (company-dabbrev-code company-gtags company-etags
+                               company-keywords)
+                              company-oddmuse company-dabbrev)
+  "The list of active backends (completion engines).
+
+Only one backend is used at a time.  The choice depends on the order of
+the items in this list, and on the values they return in response to the
+`prefix' command (see below).  But a backend can also be a \"grouped\"
+one (see below).
+
+`company-begin-backend' can be used to start a specific backend,
+`company-other-backend' will skip to the next matching backend in the list.
+
+To debug which backend is currently in use, try `M-x company-diag'.
+
+Each backend is a function that takes a variable number of arguments.
+The first argument is the command requested from the backend.  It is one
+of the following:
+
+`prefix': The backend should return the text to be completed.  Returning
+nil from this command passes control to the next backend.
+
+The expected return value looks like (PREFIX SUFFIX &optional PREFIX-LEN).
+Where PREFIX is the text to be completed before point, SUFFIX - the
+remainder after point (when e.g. inside a symbol), and PREFIX-LEN, when
+non-nil, is the number to use in place of PREFIX's length when comparing
+against `company-minimum-prefix-length'.  PREFIX-LEN can also be just t,
+and in the latter case the test automatically succeeds.
+
+The return value can also be just PREFIX, in which case SUFFIX is taken to
+be an empty string.
+
+`candidates': The second argument is the prefix to be completed.  The
+return value should be a list of candidates that match the prefix.
+
+Non-prefix matches are also supported (candidates that don't start with the
+prefix, but match it in some backend-defined way).  Backends that use this
+feature must disable cache (return t in response to `no-cache') and might
+also want to handle `match'.
+
+Optional commands
+=================
+
+`sorted': Return t here to indicate that the candidates are sorted and will
+not need to be sorted again.
+
+`duplicates': If non-nil, company will take care of removing duplicates
+from the list.
+
+`no-cache': Usually company doesn't ask for candidates again as completion
+progresses, unless the backend returns t for this command.  The second
+argument is the latest prefix.
+
+`ignore-case': Return t here if the backend returns case-insensitive
+matches.  This value is used to determine the longest common prefix (as
+used in `company-complete-common'), and to filter completions when fetching
+them from cache.
+
+`meta': The second argument is a completion candidate.  Return a (short)
+documentation string for it.
+
+`doc-buffer': The second argument is a completion candidate.  Return a
+buffer with documentation for it.  Preferably use `company-doc-buffer'.  If
+not all buffer contents pertain to this candidate, return a cons of buffer
+and window start position.
+
+`location': The second argument is a completion candidate.  Return a cons
+of buffer and buffer location, or of file and line number where the
+completion candidate was defined.
+
+`annotation': The second argument is a completion candidate.  Return a
+string to be displayed inline with the candidate in the popup.  If
+duplicates are removed by company, candidates with equal string values will
+be kept if they have different annotations.  For that to work properly,
+backends should store the related information on candidates using text
+properties.
+
+`deprecated': The second argument is a completion candidate.  Return
+non-nil if the completion candidate is deprecated.
+
+`match': The second argument is a completion candidate.  Return a positive
+integer, the index after the end of text matching `prefix' within the
+candidate string.  Alternatively, return a list of (CHUNK-START
+. CHUNK-END) elements, where CHUNK-START and CHUNK-END are indexes within
+the candidate string.  The corresponding regions are be used when rendering
+the popup.  This command only makes sense for backends that provide
+non-prefix completion.
+
+`require-match': If this returns t, the user is not allowed to enter
+anything not offered as a candidate.  Please don't use that value in normal
+backends.  The default value nil gives the user that choice with
+`company-require-match'.  Return value `never' overrides that option the
+other way around (using that value will indicate that the returned set of
+completions is often incomplete, so this behavior will not be useful).
+
+`init': Called once for each buffer. The backend can check for external
+programs and files and load any required libraries.  Raising an error here
+will show up in message log once, and the backend will not be used for
+completion.
+
+`post-completion': Called after a completion candidate has been inserted
+into the buffer.  The second argument is the candidate.  Can be used to
+modify it, e.g. to expand a snippet.
+
+`kind': The second argument is a completion candidate.  Return a symbol
+describing the kind of the candidate.  Refer to `company-vscode-icons-mapping'
+for the possible values.
+
+`adjust-boundaries': The second argument is prefix and the third argument
+is suffix (previously returned by the `prefix' command).  Return a
+cons (NEW-PREFIX . NEW-SUFFIX) where both parts correspond to the
+completion candidate.
+
+`expand-common': The first argument is prefix and the second argument is
+suffix.  Return a cons (NEW-PREFIX . NEW-SUFFIX) that denote an edit in the
+current buffer which would be performed by `company-complete-common'.  It
+should try to make the combined length of the prefix and suffix longer,
+while ensuring that the completions for the new inputs are the same.
+Othewise return the original inputs.  If there are no matching completions,
+return the symbol `no-match'.
+
+The backend should return nil for all commands it does not support or
+does not know about.  It should also be callable interactively and use
+`company-begin-backend' to start itself in that case.
+
+Grouped backends
+================
+
+An element of `company-backends' can also be a list of backends.  The
+completions from backends in such groups are merged, but only from those
+backends which return the same `prefix'.
+
+If a backend command takes a candidate as an argument (e.g. `meta'), the
+call is dispatched to the backend the candidate came from.  In other
+cases (except for `duplicates' and `sorted'), the first non-nil value among
+all the backends is returned.
+
+The group can also contain keywords.  Currently, `:with' and `:separate'
+keywords are defined.  If the group contains keyword `:with', the backends
+listed after this keyword are ignored for the purpose of the `prefix'
+command.  If the group contains keyword `:separate', the candidates that
+come from different backends are sorted separately in the combined list.
+
+Asynchronous backends
+=====================
+
+The return value of each command can also be a cons (:async . FETCHER)
+where FETCHER is a function of one argument, CALLBACK.  When the data
+arrives, FETCHER must call CALLBACK and pass it the appropriate return
+value, as described above.  That call must happen in the same buffer as
+where completion was initiated.
+
+True asynchronous operation is only supported for command `candidates', and
+only during idle completion.  Other commands will block the user interface,
+even if the backend uses the asynchronous calling convention."
+  :type `(repeat
+          (choice
+           :tag "backend"
+           ,@(mapcar (lambda (b) `(const :tag ,(cdr b) ,(car b)))
+                     company-safe-backends)
+           (symbol :tag "User defined")
+           (repeat :tag "Merged backends"
+                   (choice :tag "backend"
+                           ,@(mapcar (lambda (b)
+                                       `(const :tag ,(cdr b) ,(car b)))
+                                     company-safe-backends)
+                           (const :tag "With" :with)
+                           (symbol :tag "User defined"))))))
+
+(put 'company-backends 'safe-local-variable 'company-safe-backends-p)
+
+(defcustom company-transformers nil
+  "Functions to change the list of candidates received from backends.
+
+Each function is called with the return value of the previous one.
+The first one gets passed the list of candidates, already sorted and
+without duplicates (candidates with different annotations are considered to
+be distinct)."
+  :type '(choice
+          (const :tag "None" nil)
+          (const :tag "Sort by occurrence" (company-sort-by-occurrence))
+          (const :tag "Sort by backend importance"
+                 (company-sort-by-backend-importance))
+          (const :tag "Prefer case sensitive prefix"
+                 (company-sort-prefer-same-case-prefix))
+          (repeat :tag "User defined" function)))
+
+(defcustom company-completion-started-hook nil
+  "Hook run when company starts completing.
+The hook is called with one argument that is non-nil if the completion was
+started manually."
+  :type 'hook)
+
+(defcustom company-completion-cancelled-hook nil
+  "Hook run when company cancels completing.
+The hook is called with one argument that is non-nil if the completion was
+aborted manually."
+  :type 'hook)
+
+(defcustom company-completion-finished-hook nil
+  "Hook run when company successfully completes.
+The hook is called with the selected candidate as an argument.
+
+If you indend to use it to post-process candidates from a specific
+backend, consider using the `post-completion' command instead."
+  :type 'hook)
+
+(defcustom company-after-completion-hook nil
+  "Hook run at the end of completion, successful or not.
+The hook is called with one argument which is either a string or a symbol."
+  :type 'hook)
+
+(defcustom company-minimum-prefix-length 3
+  "The minimum prefix length for idle completion."
+  :type '(integer :tag "prefix length"))
+
+(defcustom company-abort-manual-when-too-short nil
+  "If enabled, cancel a manually started completion when the prefix gets
+shorter than both `company-minimum-prefix-length' and the length of the
+prefix it was started from."
+  :type 'boolean
+  :package-version '(company . "0.8.0"))
+
+(defcustom company-abort-on-unique-match t
+  "If non-nil, typing a full unique match aborts completion.
+
+You can still invoke `company-complete' manually to run the
+`post-completion' handler, though.
+
+If it's nil, completion will remain active until you type a prefix that
+doesn't match anything or finish it manually, e.g. with RET."
+  :type 'boolean)
+
+(defcustom company-require-match 'company-explicit-action-p
+  "If enabled, disallow non-matching input.
+This can be a function do determine if a match is required.
+
+This can be overridden by the backend, if it returns t or `never' to
+`require-match'.  `company-insertion-on-trigger' also takes precedence over
+this."
+  :type '(choice (const :tag "Off" nil)
+                 (function :tag "Predicate function")
+                 (const :tag "On, if user interaction took place"
+                        company-explicit-action-p)
+                 (const :tag "On" t)))
+
+(define-obsolete-variable-alias
+  'company-auto-complete
+  'company-insertion-on-trigger
+  "0.10.0")
+
+(define-obsolete-variable-alias
+  'company-auto-commit
+  'company-insertion-on-trigger
+  "0.10.0")
+
+(defcustom company-insertion-on-trigger nil
+  "If enabled, allow triggering insertion of the selected candidate.
+This can also be a predicate function, for example,
+`company-explicit-action-p'.
+
+See `company-insertion-triggers' for more details on how to define
+triggers."
+  :type '(choice (const :tag "Off" nil)
+                 (function :tag "Predicate function")
+                 (const :tag "On, if user interaction took place"
+                        company-explicit-action-p)
+                 (const :tag "On" t))
+  :package-version '(company . "0.10.0"))
+
+(define-obsolete-variable-alias
+  'company-auto-complete-chars
+  'company-insertion-triggers
+  "0.10.0")
+
+(define-obsolete-variable-alias
+  'company-auto-commit-chars
+  'company-insertion-triggers
+  "0.10.0")
+
+(defcustom company-insertion-triggers '(?\  ?\) ?.)
+  "Determine triggers for `company-insertion-on-trigger'.
+
+If this is a string, then each character in it can trigger insertion of the
+selected candidate.  If it is a list of syntax description characters (see
+`modify-syntax-entry'), then characters with any of those syntaxes can act
+as triggers.
+
+This can also be a function, which is called with the new input.  To
+trigger insertion, the function should return a non-nil value.
+
+Note that a character that is part of a valid completion never triggers
+insertion."
+  :type '(choice (string :tag "Characters")
+                 (set :tag "Syntax"
+                      (const :tag "Whitespace" ?\ )
+                      (const :tag "Symbol" ?_)
+                      (const :tag "Opening parentheses" ?\()
+                      (const :tag "Closing parentheses" ?\))
+                      (const :tag "Word constituent" ?w)
+                      (const :tag "Punctuation." ?.)
+                      (const :tag "String quote." ?\")
+                      (const :tag "Paired delimiter." ?$)
+                      (const :tag "Expression quote or prefix operator." ?\')
+                      (const :tag "Comment starter." ?<)
+                      (const :tag "Comment ender." ?>)
+                      (const :tag "Character-quote." ?/)
+                      (const :tag "Generic string fence." ?|)
+                      (const :tag "Generic comment fence." ?!))
+                 (function :tag "Predicate function"))
+  :package-version '(company . "0.10.0"))
+
+(defcustom company-idle-delay .2
+  "The idle delay in seconds until completion starts automatically.
+The prefix still has to satisfy `company-minimum-prefix-length' before that
+happens.  The value of nil means no idle completion."
+  :type '(choice (const :tag "never (nil)" nil)
+                 (const :tag "immediate (0)" 0)
+                 (function :tag "Predicate function")
+                 (number :tag "seconds")))
+
+(defcustom company-tooltip-idle-delay .5
+  "The idle delay in seconds until tooltip is shown when using
+`company-pseudo-tooltip-unless-just-one-frontend-with-delay'."
+  :type '(choice (const :tag "never (nil)" nil)
+                 (const :tag "immediate (0)" 0)
+                 (number :tag "seconds")))
+
+(defcustom company-inhibit-inside-symbols nil
+  "Non-nil to inhibit idle completion when typing in the middle of a symbol.
+The symbol is in a generalized sense, indicated by the `prefix' backend
+action returning a non-empty SUFFIX element.  When this variable is
+non-nil, completion inside symbol will onlytriggered by an explicit command
+invocation, such as \\[company-complete-common]."
+  :type 'boolean
+  :package-version '(company . "1.0.0"))
+
+(defcustom company-begin-commands '(self-insert-command
+                                    org-self-insert-command
+                                    orgtbl-self-insert-command
+                                    c-scope-operator
+                                    c-electric-colon
+                                    c-electric-lt-gt
+                                    c-electric-slash)
+  "A list of commands after which idle completion is allowed.
+If this is t, it can show completions after any command except a few from a
+pre-defined list.  See `company-idle-delay'.
+
+Alternatively, any command with a non-nil `company-begin' property is
+treated as if it was on this list."
+  :type '(choice (const :tag "Any command" t)
+                 (const :tag "Self insert command" (self-insert-command))
+                 (repeat :tag "Commands" function))
+  :package-version '(company . "0.8.4"))
+
+(defcustom company-continue-commands '(not save-buffer save-some-buffers
+                                           save-buffers-kill-terminal
+                                           save-buffers-kill-emacs
+                                           completion-at-point
+                                           complete-symbol
+                                           completion-help-at-point)
+  "A list of commands that are allowed during completion.
+If this is t, or if `company-begin-commands' is t, any command is allowed.
+Otherwise, the value must be a list of symbols.  If it starts with `not',
+the cdr is the list of commands that abort completion.  Otherwise, all
+commands except those in that list, or in `company-begin-commands', or
+commands in the `company-' namespace, abort completion."
+  :type '(choice (const :tag "Any command" t)
+                 (cons  :tag "Any except"
+                        (const not)
+                        (repeat :tag "Commands" function))
+                 (repeat :tag "Commands" function)))
+
+(defun company-custom--set-quick-access (option value)
+  "Re-bind quick-access key sequences on OPTION VALUE change."
+  ;; When upgrading from an earlier version of company, might not be.
+  (when (fboundp #'company-keymap--unbind-quick-access)
+    (when (boundp 'company-active-map)
+      (company-keymap--unbind-quick-access company-active-map))
+    (when (boundp 'company-search-map)
+      (company-keymap--unbind-quick-access company-search-map)))
+  (custom-set-default option value)
+  (when (fboundp #'company-keymap--bind-quick-access)
+    (when (boundp 'company-active-map)
+      (company-keymap--bind-quick-access company-active-map))
+    (when (boundp 'company-search-map)
+      (company-keymap--bind-quick-access company-search-map))))
+
+(defcustom company-quick-access-keys '("1" "2" "3" "4" "5" "6" "7" "8" "9" "0")
+  "Character strings used as a part of quick-access key sequences.
+To change this value without Customize interface, use `customize-set-variable'.
+
+To change the quick-access key sequences modifier, customize
+`company-quick-access-modifier'.
+
+If `company-show-quick-access' is non-nil, show quick-access hints
+beside the candidates."
+  :set #'company-custom--set-quick-access
+  :type '(choice
+          (const :tag "Digits" ("1" "2" "3" "4" "5" "6" "7" "8" "9" "0"))
+          (const :tag "QWERTY home row" ("a" "s" "d" "f" "g" "h" "j" "k" "l" ";"))
+          ;; TODO un-comment on removal of `M-n' `company--select-next-and-warn'.
+          ;; (const :tag "Dvorak home row" ("a" "o" "e" "u" "i" "d" "h" "t" "n" "s"))
+          (repeat :tag "User defined" string))
+  :package-version '(company . "0.10.0"))
+
+(defcustom company-quick-access-modifier 'meta
+  "Modifier key used for quick-access keys sequences.
+To change this value without Customize interface, use `customize-set-variable'.
+See `company-quick-access-keys' for more details."
+  :set #'company-custom--set-quick-access
+  :type '(choice (const :tag "Meta key" meta)
+                 (const :tag "Super key" super)
+                 (const :tag "Hyper key" hyper)
+                 (const :tag "Control key" control))
+  :package-version '(company . "0.10.0"))
+
+(defun company-keymap--quick-access-modifier ()
+  "Return string representation of the `company-quick-access-modifier'."
+  (if-let* ((modifier (assoc-default company-quick-access-modifier
+                                     '((meta . "M")
+                                       (super . "s")
+                                       (hyper . "H")
+                                       (control . "C")))))
+      modifier
+    (warn "company-quick-access-modifier value unknown: %S"
+          company-quick-access-modifier)
+    "M"))
+
+(defun company-keymap--unbind-quick-access (keymap)
+  (let ((modifier (company-keymap--quick-access-modifier)))
+    (dolist (key company-quick-access-keys)
+      (let ((key-seq (company-keymap--kbd-quick-access modifier key)))
+        (when (equal (lookup-key keymap key-seq) 'company-complete-quick-access)
+          (define-key keymap key-seq nil))))))
+
+(defun company-keymap--bind-quick-access (keymap)
+  (let ((modifier (company-keymap--quick-access-modifier)))
+    (dolist (key company-quick-access-keys)
+      (let ((key-seq (company-keymap--kbd-quick-access modifier key)))
+        (if (lookup-key keymap key-seq)
+            (warn "Key sequence %s already bound" (key-description key-seq))
+          (define-key keymap key-seq #'company-complete-quick-access))))))
+
+(defun company-keymap--kbd-quick-access (modifier key)
+  (kbd (format "%s-%s" modifier key)))
+
+(define-obsolete-variable-alias
+  'company-show-numbers
+  'company-show-quick-access
+  "0.10.0")
+
+(defcustom company-show-quick-access nil
+  "If non-nil, show quick-access hints beside the candidates.
+
+For a tooltip frontend, non-nil value enables a column with the hints
+on the right side of the tooltip, unless the configured value is `left'.
+
+To change the quick-access key bindings, customize `company-quick-access-keys'
+and `company-quick-access-modifier'.
+
+To change the shown quick-access hints, customize
+`company-quick-access-hint-function'."
+  :type '(choice (const :tag "off" nil)
+                 (const :tag "left" left)
+                 (const :tag "on" t)))
+
+(defcustom company-show-numbers-function nil
+  "Function called to get quick-access numbers for the first ten candidates.
+
+The function receives the candidate number (starting from 1) and should
+return a string prefixed with one space."
+  :type 'function)
+(make-obsolete-variable
+ 'company-show-numbers-function
+ "use `company-quick-access-hint-function' instead,
+but adjust the expected values appropriately."
+ "0.10.0")
+
+(defcustom company-quick-access-hint-function #'company-quick-access-hint-key
+  "Function called to get quick-access hints for the candidates.
+
+The function receives a candidate's 0-based number
+and should return a string.
+See `company-show-quick-access' for more details."
+  :type 'function)
+
+(defun company-quick-access-hint-key (candidate)
+  "Return a quick-access key for the CANDIDATE number.
+This is a default value of `company-quick-access-hint-function'."
+  (if company-show-numbers-function
+      (funcall company-show-numbers-function (1+ candidate))
+    (format "%s"
+            (if (< candidate (length company-quick-access-keys))
+                (nth candidate company-quick-access-keys)
+              ""))))
+
+(defcustom company-selection-wrap-around nil
+  "If enabled, selecting item before first or after last wraps around."
+  :type '(choice (const :tag "off" nil)
+                 (const :tag "on" t)))
+
+(defcustom company-async-redisplay-delay 0.005
+  "Delay before redisplay when fetching candidates asynchronously.
+
+You might want to set this to a higher value if your backends respond
+quickly, to avoid redisplaying twice per each typed character."
+  :type 'number)
+
+(defvar company-async-wait 0.03
+  "Pause between checks to see if the value's been set when turning an
+asynchronous call into synchronous.")
+
+(defvar company-async-timeout 2
+  "Maximum wait time for a value to be set during asynchronous call.")
+
+;;; mode ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defvar company-mode-map
+  (let ((keymap (make-sparse-keymap)))
+    (define-key keymap [remap indent-for-tab-command] 'company-indent-for-tab-command)
+    (define-key keymap [remap c-indent-line-or-region] 'company-indent-for-tab-command)
+    keymap)
+  "Keymap used by `company-mode'.")
+
+(defvar company-active-map
+  (let ((keymap (make-sparse-keymap)))
+    (define-key keymap "\e\e\e" 'company-abort)
+    (define-key keymap "\C-g" 'company-abort)
+    (define-key keymap (kbd "C-n") 'company-select-next-or-abort)
+    (define-key keymap (kbd "C-p") 'company-select-previous-or-abort)
+    (define-key keymap (kbd "<down>") 'company-select-next-or-abort)
+    (define-key keymap (kbd "<up>") 'company-select-previous-or-abort)
+    (define-key keymap [remap scroll-up-command] 'company-next-page)
+    (define-key keymap [remap scroll-down-command] 'company-previous-page)
+    (define-key keymap [down-mouse-1] 'ignore)
+    (define-key keymap [down-mouse-3] 'ignore)
+    (define-key keymap [mouse-1] 'company-complete-mouse)
+    (define-key keymap [mouse-3] 'company-select-mouse)
+    (define-key keymap [up-mouse-1] 'ignore)
+    (define-key keymap [up-mouse-3] 'ignore)
+    (define-key keymap [return] 'company-complete-selection)
+    (define-key keymap (kbd "RET") 'company-complete-selection)
+    (define-key keymap [tab] 'company-complete-common-or-cycle)
+    (define-key keymap (kbd "TAB") 'company-complete-common-or-cycle)
+    (define-key keymap [backtab] 'company-cycle-backward)
+    (define-key keymap (kbd "C-M-i") 'company-complete-common)
+    (define-key keymap (kbd "<f1>") 'company--show-doc-buffer-and-warn)
+    (define-key keymap (kbd "C-h") 'company--show-doc-buffer-and-warn)
+    (define-key keymap (kbd "M-h") 'company-show-doc-buffer)
+    (define-key keymap (kbd "C-w") 'company--show-location-and-warn)
+    (define-key keymap (kbd "M-g") 'company-show-location)
+    (define-key keymap "\C-s" 'company-search-candidates)
+    (define-key keymap "\C-\M-s" 'company-filter-candidates)
+    (company-keymap--bind-quick-access keymap)
+     keymap)
+  "Keymap that is enabled during an active completion.")
+
+(defvar company--disabled-backends nil)
+
+(defun company--warn-changed-binding ()
+  (interactive)
+  (run-with-idle-timer
+   0.01 nil
+   (lambda ()
+     (message "Warning: default bindings are being changed to M-h and M-g"))))
+
+(defun company-init-backend (backend)
+  (and (symbolp backend)
+       (not (fboundp backend))
+       (ignore-errors (require backend nil t)))
+  (cond
+   ((symbolp backend)
+    (condition-case err
+        (progn
+          (funcall backend 'init)
+          (put backend 'company-init t))
+      (error
+       (put backend 'company-init 'failed)
+       (unless (memq backend company--disabled-backends)
+         (message "Company backend '%s' could not be initialized:\n%s"
+                  backend (error-message-string err)))
+       (cl-pushnew backend company--disabled-backends)
+       nil)))
+   ;; No initialization for lambdas.
+   ((functionp backend) t)
+   (t ;; Must be a list.
+    (cl-dolist (b backend)
+      (unless (keywordp b)
+        (company-init-backend b))))))
+
+(defun company--maybe-init-backend (backend)
+  (or (not (symbolp backend))
+      (eq t (get backend 'company-init))
+      (unless (get backend 'company-init)
+        (company-init-backend backend))))
+
+(defcustom company-lighter-base "company"
+  "Base string to use for the `company-mode' lighter."
+  :type 'string
+  :package-version '(company . "0.8.10"))
+
+(defvar company-lighter '(" "
+                          (company-candidates
+                           (:eval
+                            (cond
+                             ((consp company-backend)
+                              (when company-selection
+                                (company--group-lighter (nth company-selection
+                                                             company-candidates)
+                                                        company-lighter-base)))
+                             ((symbolp company-backend)
+                              (symbol-name company-backend))
+                             ((functionp company-backend)
+                              "company-<lambda>")))
+                           company-lighter-base))
+  "Mode line lighter for Company.
+
+The value of this variable is a mode line template as in
+`mode-line-format'.")
+
+(put 'company-lighter 'risky-local-variable t)
+
+;;;###autoload
+(define-minor-mode company-mode
+  "\"complete anything\"; is an in-buffer completion framework.
+Completion starts automatically, depending on the values
+`company-idle-delay' and `company-minimum-prefix-length'.
+
+Completion can be controlled with the commands:
+`company-complete-common', `company-complete-selection', `company-complete',
+`company-select-next', `company-select-previous'.  If these commands are
+called before `company-idle-delay', completion will also start.
+
+Completions can be searched with `company-search-candidates' or
+`company-filter-candidates'.  These can be used while completion is
+inactive, as well.
+
+The completion data is retrieved using `company-backends' and displayed
+using `company-frontends'.  If you want to start a specific backend, call
+it interactively or use `company-begin-backend'.
+
+By default, the completions list is sorted alphabetically, unless the
+backend chooses otherwise, or `company-transformers' changes it later.
+
+regular keymap (`company-mode-map'):
+
+\\{company-mode-map}
+keymap during active completions (`company-active-map'):
+
+\\{company-active-map}"
+  :lighter company-lighter
+  (if company-mode
+      (progn
+        (add-hook 'pre-command-hook 'company-pre-command nil t)
+        (add-hook 'post-command-hook 'company-post-command nil t)
+        (add-hook 'yas-keymap-disable-hook 'company--active-p nil t)
+        (mapc 'company-init-backend company-backends))
+    (remove-hook 'pre-command-hook 'company-pre-command t)
+    (remove-hook 'post-command-hook 'company-post-command t)
+    (remove-hook 'yas-keymap-disable-hook 'company--active-p t)
+    (company-cancel)))
+
+(defcustom company-global-modes t
+  "Modes for which `company-mode' mode is turned on by `global-company-mode'.
+If nil, means no modes.  If t, then all major modes have it turned on.
+If a list, it should be a list of `major-mode' symbol names for which
+`company-mode' should be automatically turned on.  The sense of the list is
+negated if it begins with `not'.  For example:
+ (c-mode c++-mode)
+means that `company-mode' is turned on for buffers in C and C++ modes only.
+ (not message-mode)
+means that `company-mode' is always turned on except in `message-mode' buffers."
+  :type '(choice (const :tag "none" nil)
+                 (const :tag "all" t)
+                 (set :menu-tag "mode specific" :tag "modes"
+                      :value (not)
+                      (const :tag "Except" not)
+                      (repeat :inline t (symbol :tag "mode")))))
+
+(defcustom company-global-minibuffer t
+  "Non-nil to enable `company-mode' in the minibuffer.
+The value can be t (meaning only enable if the minibuffer has a local
+`completion-at-point-functions' value) or a custom predicate function.
+
+The overlay based popup is not supported, completion won't start in
+minibuffer if it's in configured frontends: use `company-childframe'."
+  :type 'boolean)
+
+;;;###autoload
+(define-globalized-minor-mode global-company-mode company-mode company-mode-on
+  (if global-company-mode
+      (add-hook 'minibuffer-setup-hook #'company--minibuffer-on 100)
+    (remove-hook 'minibuffer-setup-hook #'company--minibuffer-on)))
+
+(defun company-mode-on ()
+  (when (and (not (or noninteractive (eq (aref (buffer-name) 0) ?\s)))
+             (cond ((eq company-global-modes t)
+                    t)
+                   ((eq (car-safe company-global-modes) 'not)
+                    (not (memq major-mode (cdr company-global-modes))))
+                   (t (memq major-mode company-global-modes))))
+    (company-mode 1)))
+
+(defun company--minibuffer-on ()
+  (when (and company-global-minibuffer
+             (not (try-completion "company-pseudo-tooltip" company-frontends))
+             (if (eq company-global-minibuffer t)
+                 (local-variable-p 'completion-at-point-functions)
+               (funcall company-global-minibuffer)))
+    (company-mode 1)))
+
+(defsubst company-assert-enabled ()
+  (unless company-mode
+    (company-uninstall-map)
+    (user-error "Company not enabled")))
+
+;;; keymaps ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defvar-local company-my-keymap nil)
+
+(defvar company-emulation-alist '((t . nil)))
+
+(defun company-enable-overriding-keymap (keymap)
+  (company-uninstall-map)
+  (setq company-my-keymap keymap))
+
+(defun company-ensure-emulation-alist ()
+  (unless (eq 'company-emulation-alist (car emulation-mode-map-alists))
+    (setq emulation-mode-map-alists
+          (cons 'company-emulation-alist
+                (delq 'company-emulation-alist emulation-mode-map-alists)))))
+
+(defun company-install-map ()
+  (unless (or (cdar company-emulation-alist)
+              (null company-my-keymap))
+    (setq-local company-emulation-alist `((t . ,company-my-keymap)))))
+
+(defun company-uninstall-map ()
+  (kill-local-variable 'company-emulation-alist))
+
+(defun company--company-command-p (keys)
+  "Checks if the keys are part of company's overriding keymap"
+  (or (equal [company-dummy-event] keys)
+      (commandp (lookup-key company-my-keymap keys))))
+
+;; To avoid warnings in Emacs < 26.
+(declare-function line-number-display-width "indent.c")
+
+(defun company--posn-col-row (posn)
+  (let* ((col-row (if (>= emacs-major-version 29)
+                      (with-no-warnings  ;with 2 arguments, but accepts only 1
+                        (posn-col-row posn t))
+                    (posn-col-row posn)))
+         (col (car col-row))
+         ;; `posn-col-row' doesn't work well with lines of different height.
+         ;; `posn-actual-col-row' doesn't handle multiple-width characters.
+         (row (cdr (or (posn-actual-col-row posn)
+                       ;; When position is non-visible for some reason.
+                       col-row))))
+    ;; posn-col-row return value relative to the left
+    (when (eq (current-bidi-paragraph-direction) 'right-to-left)
+      ;; `remap' as 3rd argument to window-body-width is E30+ only :-(
+      (let ((ww (window-body-width)))
+        (setq col (- ww col))))
+    (when (bound-and-true-p display-line-numbers)
+      (cl-decf col (+ 2 (line-number-display-width))))
+    (cons (+ col (window-hscroll)) row)))
+
+(defun company--col-row (&optional pos)
+  (company--posn-col-row (posn-at-point pos)))
+
+(defun company--row (&optional pos)
+  (cdr (company--col-row pos)))
+
+;;; backends ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defvar-local company-backend nil)
+
+(defun company-grab (regexp &optional expression limit)
+  (when (looking-back regexp limit)
+    (or (match-string-no-properties (or expression 0)) "")))
+
+(defun company-grab-suffix (regexp &optional expression)
+  (when (looking-at regexp)
+    (or (match-string-no-properties (or expression 0)) "")))
+
+(defun company-grab-line (regexp &optional expression)
+  "Return a match string for REGEXP if it matches text before point.
+If EXPRESSION is non-nil, return the match string for the respective
+parenthesized expression in REGEXP.
+Matching is limited to the current line."
+  (let ((inhibit-field-text-motion t))
+    (company-grab regexp expression (line-beginning-position))))
+
+(defun company-grab-symbol ()
+  "Return buffer substring from the beginning of the symbol until point."
+  (buffer-substring (point) (save-excursion (skip-syntax-backward "w_")
+                                            (point))))
+
+(defun company-grab-symbol-suffix ()
+  "Return buffer substring from point until the end of the symbol."
+  (buffer-substring (point) (save-excursion (skip-syntax-forward "w_")
+                                            (point))))
+
+(defun company-grab-word ()
+  "Return buffer substring from the beginning of the word until point."
+  (buffer-substring (point) (save-excursion (skip-syntax-backward "w")
+                                            (point))))
+
+(defun company-grab-word-suffix ()
+  "Return buffer substring from the beginning of the word until point."
+  (buffer-substring (point) (save-excursion (skip-syntax-forward "w")
+                                            (point))))
+
+(defun company-grab-symbol-parts (&optional idle-begin-after-re max-len)
+  "Return a list (PREFIX SUFFIX &optional OVERRIDE).
+
+IDLE-BEGIN-AFTER-RE, if non-nil, must be a regexp.
+
+Where OVERRIDE might be t is IDLE-BEGIN-AFTER-RE is non-nil and the text
+before prefix matches it.  PREFIX and SUFFIX are as returned by
+`company-grab-symbol' and `company-grab-symbol-suffix'.
+MAX-LEN is how far back to try to match the IDLE-BEGIN-AFTER-RE regexp."
+  (let ((prefix (company-grab-symbol))
+        suffix override)
+    (setq suffix (company-grab-symbol-suffix))
+    (when idle-begin-after-re
+      (save-excursion
+        (forward-char (- (length prefix)))
+        (when (looking-back idle-begin-after-re (if max-len
+                                                    (- (point) max-len)
+                                                  (line-beginning-position)))
+          (setq override t))))
+    (list prefix suffix override)))
+
+(define-obsolete-function-alias
+  'company-grab-symbol-cons
+  'company-grab-symbol-parts "1.0")
+
+(defun company-in-string-or-comment ()
+  "Return non-nil if point is within a string or comment."
+  (let ((ppss (syntax-ppss)))
+    (or (car (setq ppss (nthcdr 3 ppss)))
+        (car (setq ppss (cdr ppss)))
+        (nth 3 ppss))))
+
+(defun company-substitute-prefix (prefix strings)
+  (let ((len (length prefix)))
+    (mapcar
+     (lambda (s)
+       (if (eq t (compare-strings prefix 0 len s 0 len))
+           s
+         (concat prefix (substring s len))))
+     strings)))
+
+(defun company--match-from-capf-face (str)
+  "Compute `match' result from a CAPF's completion fontification."
+  (let* ((match-start nil) (pos -1)
+         (prop-value nil)  (faces nil)
+         (has-face-p nil)  chunks
+         (limit (length str)))
+    (while (< pos limit)
+      (setq pos
+            (if (< pos 0) 0 (next-property-change pos str limit)))
+      (setq prop-value (or (get-text-property pos 'face str)
+                           (get-text-property pos 'font-lock-face str))
+            faces (if (listp prop-value) prop-value (list prop-value))
+            has-face-p (memq 'completions-common-part faces))
+      (cond ((and (not match-start) has-face-p)
+             (setq match-start pos))
+            ((and match-start (not has-face-p))
+             (push (cons match-start pos) chunks)
+             (setq match-start nil))))
+    (nreverse chunks)))
+
+(defun company--capf-completions (prefix suffix table &optional pred meta)
+  (cl-letf* ((keep-suffix t)
+             (wrapper
+              (lambda (&rest args)
+                ;; If emacs22 style is used, suffix is ignored.
+                ;; That's the only popular completion style that does this.
+                (let ((res (apply #'completion-emacs22-all-completions args)))
+                  (when res (setq keep-suffix nil))
+                  res)))
+             (completion-styles-alist (copy-tree completion-styles-alist))
+             ((nth 2 (assoc 'emacs22 completion-styles-alist))
+              wrapper)
+             (all (completion-all-completions (concat prefix suffix)
+                                              table pred
+                                              (length prefix)
+                                              meta))
+             (last (last all))
+             (base-size (or (cdr last) 0))
+             ;; base-suffix-size is not available, but it's usually simple.
+             (bounds (completion-boundaries prefix table pred suffix)))
+    (when last
+      (setcdr last nil))
+    (unless keep-suffix
+      (setcdr bounds 0))
+    `((:completions . ,all)
+      (:boundaries . ,(cons (substring prefix base-size)
+                            (substring suffix 0 (cdr bounds)))))))
+
+(defun company--capf-expand-common (prefix suffix table &optional pred metadata)
+  (let* ((res
+          (completion-try-completion (concat prefix suffix)
+                                     table pred (length prefix) metadata)))
+    (cond
+     ((null res)
+      'no-match)
+     ((memq res '(t nil))
+      (cons prefix suffix))
+     (t
+      (cons
+       (substring (car res) 0 (cdr res))
+       (substring (car res) (cdr res)))))))
+
+;; We store boundaries as markers because when the `unhide' frontend action is
+;; called, the completions are still being fetched. So the capf boundaries info
+;; can't be relied to be fresh by other means.
+(defun company--capf-boundaries-markers (string-pair &optional markers)
+  "STRING-PAIR is (PREFIX . SUFFIX) and MARKERS is a pair to reuse."
+  (when (or (not markers)
+            (stringp (car markers)))
+    (setq markers (cons (make-marker)
+                        (make-marker))))
+  (move-marker (car markers) (- (point) (length (car string-pair))))
+  (move-marker (cdr markers) (+ (point) (length (cdr string-pair))))
+  markers)
+
+(defun company--capf-boundaries (markers)
+  (let* ((beg (car markers))
+         (end (cdr markers))
+         res)
+    (when (> (point) end) (setq end (point)))
+    (setq res (cons (buffer-substring beg (point))
+                    (buffer-substring (point) end)))
+    res))
+
+(defvar company--cache (make-hash-table :test #'equal :size 10))
+
+(cl-defun company-cache-fetch (key
+                               fetcher
+                               &key expire check-tag)
+  "Fetch the value assigned to KEY in the cache.
+When not found, or when found to be stale, calls FETCHER to compute the
+result.  When EXPIRE is non-nil, the value will be deleted at the end of
+completion.  CHECK-TAG, when present, is saved as well, and the entry will
+be recomputed when this value changes."
+  ;; We could make EXPIRE accept a time value as well.
+  (let ((res (gethash key company--cache 'none))
+        value)
+    (if (and (not (eq res 'none))
+             (or (not check-tag)
+                 (equal check-tag (assoc-default :check-tag res))))
+        (assoc-default :value res)
+      (setq res (list (cons :value (setq value (funcall fetcher)))))
+      (if expire (push '(:expire . t) res))
+      (if check-tag (push `(:check-tag . ,check-tag) res))
+      (puthash key res company--cache)
+      value)))
+
+(defun company-cache-delete (key)
+  "Delete KEY from cache."
+  (remhash key company--cache))
+
+(defun company-cache-expire ()
+  "Delete all keys from the cache that are set to be expired."
+  (maphash (lambda (k v)
+             (when (assoc-default :expire v)
+               (remhash k company--cache)))
+           company--cache))
+
+(defun company-call-backend (&rest args)
+  (company--force-sync #'company-call-backend-raw args company-backend))
+
+(defun company--force-sync (fun args backend)
+  (let ((value (apply fun args)))
+    (if (not (eq (car-safe value) :async))
+        value
+      (let ((res 'trash)
+            (start (time-to-seconds)))
+        (funcall (cdr value)
+                 (lambda (result) (setq res result)))
+        (while (eq res 'trash)
+          (if (> (- (time-to-seconds) start) company-async-timeout)
+              (error "Company: backend %s async timeout with args %s"
+                     backend args)
+            ;; XXX: Reusing the trick from company--fetch-candidates here
+            ;; doesn't work well: sit-for isn't a good fit when we want to
+            ;; ignore pending input (results in too many calls).
+            ;; FIXME: We should deal with this by standardizing on a kind of
+            ;; Future object that knows how to sync itself. In most cases (but
+            ;; not all), by calling accept-process-output, probably.
+            (sleep-for company-async-wait)))
+        res))))
+
+(defun company-call-backend-raw (&rest args)
+  (condition-case-unless-debug err
+      (if (functionp company-backend)
+          (apply company-backend args)
+        (apply #'company--multi-backend-adapter company-backend args))
+    (user-error (user-error
+                 "Company: backend %s user-error: %s"
+                 company-backend (error-message-string err)))
+    (error (error "Company: backend %s error \"%s\" with args %s"
+                  company-backend (error-message-string err) args))))
+
+(defvar-local company--multi-uncached-backends nil)
+(defvar-local company--multi-min-prefix nil)
+
+(defun company--multi-backend-adapter (backends command &rest args)
+  (let ((backends (cl-loop for b in backends
+                           when (or (keywordp b)
+                                    (company--maybe-init-backend b))
+                           collect b))
+        (separate (memq :separate backends)))
+
+    (unless (eq command 'prefix)
+      (setq backends (cl-delete-if #'keywordp backends)))
+
+    (pcase command
+      (`candidates
+       (company--multi-backend-adapter-candidates backends
+                                                  (or company--multi-min-prefix 0)
+                                                  separate))
+      (`set-min-prefix (setq company--multi-min-prefix (car args)))
+      (`sorted separate)
+      (`duplicates (not separate))
+      ((and `no-cache
+            (pred (lambda (_)
+                    (let* (found
+                           (uncached company--multi-uncached-backends))
+                      (dolist (backend backends)
+                        (when
+                            (and (member backend uncached)
+                                 (company--good-prefix-p
+                                  (let ((company-backend backend))
+                                    (company-call-backend 'prefix))
+                                  (or company--multi-min-prefix 0)))
+                          (setq found t
+                                company--multi-uncached-backends
+                                (delete backend
+                                        company--multi-uncached-backends))))
+                      found))))
+       t)
+      ((or `ignore-case `no-cache `require-match)
+       (let (value)
+         (cl-dolist (backend backends)
+           (when (setq value (company--force-sync
+                              backend (cons command args) backend))
+             (when (and (eq command 'ignore-case)
+                        (eq value 'keep-prefix))
+               (setq value t))
+             (cl-return value)))))
+      (`prefix (company--multi-prefix backends))
+      (`adjust-boundaries
+       (let ((arg (car args)))
+         (when (> (length arg) 0)
+           (let* ((backend (or (get-text-property 0 'company-backend arg)
+                               (car backends)))
+                  (entity (company--force-sync backend '(prefix) backend))
+                  (prefix (company--prefix-str entity))
+                  (suffix (company--suffix-str entity))
+                  (company-backend backend))
+             (or
+              (company-call-backend 'adjust-boundaries arg prefix suffix)
+              (if (company--proper-suffix-p arg prefix suffix)
+                  (cons prefix suffix)
+                (cons prefix "")))))))
+      (`expand-common
+       (apply #'company--multi-expand-common
+              backends
+              (or company--multi-min-prefix 0)
+              args))
+      (_
+       (let ((arg (car args)))
+         (when (> (length arg) 0)
+           (let ((backend (or (get-text-property 0 'company-backend arg)
+                              (car backends))))
+             (apply backend command args))))))))
+
+(defun company--multi-prefix (backends)
+  (let* ((backends-after-with (cdr (member :with backends)))
+         prefix suffix len)
+
+    (dolist (backend backends)
+      (let* ((entity (and
+                      (not (keywordp backend))
+                      (company--force-sync backend '(prefix) backend)))
+             new-len)
+        (when (stringp (company--prefix-str entity))
+          (setq new-len (company--prefix-len entity))
+          (or (not backends-after-with)
+              (unless (memq backend backends-after-with)
+                (setq backends-after-with nil)))
+          (when (or
+                 (null prefix)
+                 (> (length (company--prefix-str entity))
+                    (length prefix)))
+            (setq prefix (company--prefix-str entity)))
+          (when (> (length (company--suffix-str entity))
+                   (length suffix))
+            (setq suffix (company--suffix-str entity)))
+          (when (or (eq t new-len)
+                    (and new-len
+                         (not (eq t len))
+                         (or (not len) (> new-len len))))
+            (setq len new-len)))))
+    (when (and prefix
+               (not backends-after-with))
+      (list prefix suffix len))))
+
+(defun company--multi-expand-common (backends min-length prefix suffix)
+  (let ((tuples
+         (cl-loop for backend in backends
+                  for bp = (let ((company-backend backend))
+                             (company-call-backend 'prefix))
+                  for expansion =
+                  (when (company--good-prefix-p bp min-length)
+                    (let ((inhibit-redisplay t)
+                          (company-backend backend))
+                      (company--expand-common (company--prefix-str bp)
+                                              (company--suffix-str bp))))
+                  when (consp expansion)
+                  collect
+                  (list backend bp expansion)))
+        replacements)
+    (dolist (tuple tuples)
+      (cl-assert (string-suffix-p (company--prefix-str (nth 1 tuple))
+                                  prefix))
+      (cl-assert (string-prefix-p (company--suffix-str (nth 1 tuple))
+                                  suffix)))
+    ;; We try to find the smallest possible edit for each backend's expansion
+    ;; (minimum prefix and suffix, beyond which the area is unchanged).
+    (setq replacements
+          (mapcar
+           (lambda (tuple)
+             (let* ((backend-prefix (company--prefix-str (nth 1 tuple)))
+                    (backend-suffix (company--suffix-str (nth 1 tuple)))
+                    (bplen (length backend-prefix))
+                    (bslen (length backend-suffix))
+                    (beg 0)
+                    (end 0)
+                    (rep-suffix-len (length (cdr (nth 2 tuple))))
+                    (max-beg (min bplen (length (car (nth 2 tuple)))))
+                    (max-end (min bslen rep-suffix-len)))
+               (while (and (< beg max-beg)
+                           (= (aref backend-prefix beg)
+                              (aref (car (nth 2 tuple)) beg)))
+                 (cl-incf beg))
+               (while (and (< end max-end)
+                           (= (aref suffix (- bslen end 1))
+                              (aref (cdr (nth 2 tuple))
+                                    (- rep-suffix-len end 1))))
+                 (cl-incf end))
+               (list (- bplen beg)
+                     (substring (car (nth 2 tuple)) beg)
+                     (- bslen end)
+                     (substring (cdr (nth 2 tuple)) 0 (- rep-suffix-len end))
+                     (nth 0 tuple))))
+           tuples))
+    (setq replacements (sort replacements
+                             (lambda (t1 t2) (< (- (length (nth 1 t1)) (nth 0 t1))
+                                           (- (length (nth 1 t2)) (nth 0 t2))))))
+    (or
+     (let ((choice (car replacements)))
+       ;; See if every replacement is similar enough to the one we selected:
+       ;; same suffix and beg/end and a prefix that starts with the proposed.
+       ;;
+       ;; More advanced checks seem possible, but with some backends reacting to
+       ;; buffer contents (not just string arguments) it seems we'd need to
+       ;; change the buffer contents first, then fetch `candidates' for each,
+       ;; and revert at the end.  Might be error-prone.
+       (and
+        choice
+        (cl-every
+         (lambda (replacement)
+           (and
+            (= (car replacement) (car choice))
+            (= (nth 2 replacement) (nth 2 choice))
+            (equal (nth 3 replacement) (nth 3 choice))
+            (string-prefix-p (nth 1 choice) (nth 1 replacement))))
+         (cdr replacements))
+        ;; Proposed edit applied to the group's prefix and suffix.
+        (cons (concat (substring prefix 0 (- (length prefix) (nth 0 choice)))
+                      (nth 1 choice))
+              (concat (nth 3 choice)
+                      (substring suffix (nth 2 choice))))))
+     (and (null replacements) 'no-match)
+     ;; Didn't find anything suitable - return entity parts unchanged.
+     (cons prefix suffix))))
+
+(defun company--multi-backend-adapter-candidates (backends min-length separate)
+  (let* (backend-prefix suffix
+         (pairs (cl-loop for backend in backends
+                         when (let ((bp (let ((company-backend backend))
+                                          (company-call-backend 'prefix))))
+                                ;; One might override min-length, another not.
+                                (if (company--good-prefix-p bp min-length)
+                                    (setq backend-prefix (company--prefix-str bp)
+                                          suffix (company--suffix-str bp))
+                                  (push backend company--multi-uncached-backends)
+                                  nil))
+                         collect (cons (funcall backend 'candidates backend-prefix suffix)
+                                       (company--multi-candidates-mapper
+                                        backend
+                                        separate
+                                        ;; Small perf optimization: don't tag the
+                                        ;; candidates received from the first
+                                        ;; backend in the group.
+                                        (not (eq backend (car backends))))))))
+    (company--merge-async pairs (lambda (values) (apply #'append values)))))
+
+(defun company--multi-candidates-mapper (backend separate tag)
+  (lambda (candidates)
+    (when separate
+      (let ((company-backend backend))
+        (setq candidates
+              (company--preprocess-candidates candidates))))
+    (when tag
+      (setq candidates
+            (mapcar
+             (lambda (str)
+               (propertize str 'company-backend backend))
+             candidates)))
+    candidates))
+
+(defun company--merge-async (pairs merger)
+  (let ((async (cl-loop for pair in pairs
+                        thereis
+                        (eq :async (car-safe (car pair))))))
+    (if (not async)
+        (funcall merger (cl-loop for (val . mapper) in pairs
+                                 collect (funcall mapper val)))
+      (cons
+       :async
+       (lambda (callback)
+         (let* (lst
+                (pending (mapcar #'car pairs))
+                (finisher (lambda ()
+                            (unless pending
+                              (funcall callback
+                                       (funcall merger
+                                                (nreverse lst)))))))
+           (dolist (pair pairs)
+             (push nil lst)
+             (let* ((cell lst)
+                    (val (car pair))
+                    (mapper (cdr pair))
+                    (this-finisher (lambda (res)
+                                     (setq pending (delq val pending))
+                                     (setcar cell (funcall mapper res))
+                                     (funcall-interactively finisher))))
+               (if (not (eq :async (car-safe val)))
+                   (funcall this-finisher val)
+                 (let ((fetcher (cdr val)))
+                   (funcall fetcher this-finisher)))))))))))
+
+(defun company--prefix-str (entity)
+  (or (car-safe entity) entity))
+
+(defun company--prefix-len (entity)
+  (let ((cdr (cdr-safe entity))
+        override)
+    (cond
+     ((consp cdr)
+      (setq override (cadr cdr)))
+     ((or (numberp cdr) (eq t cdr))
+      (setq override cdr)))
+    (or override
+        (length
+         (if (stringp entity)
+             entity
+           (car entity))))))
+
+(defun company--suffix-str (entity)
+  (if (stringp (car-safe (cdr-safe entity)))
+      (car-safe (cdr-safe entity))
+    ""))
+
+;;; completion mechanism ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defvar-local company-prefix nil)
+
+(defvar-local company-suffix nil)
+
+(defvar-local company-candidates nil)
+
+(defvar-local company-candidates-length nil)
+
+(defvar-local company-candidates-cache nil)
+
+(defvar-local company-candidates-predicate nil)
+
+(defvar-local company-common nil)
+
+(defvar company-selection-default 0
+  "The default value for `company-selection'.")
+(defvar-local company-selection company-selection-default)
+
+(defvar-local company-selection-changed nil)
+
+(defvar-local company--manual-action nil
+  "Non-nil if manual completion was performed by the user.")
+
+(defvar-local company--manual-now nil
+  "Non-nil if manual completion is being performed now.")
+
+(defvar-local company--manual-prefix nil)
+
+(defvar-local company--point-max nil)
+
+(defvar-local company-point nil)
+
+(defvar-local company-valid-point nil)
+
+(defvar company-timer nil)
+(defvar company-tooltip-timer nil)
+
+(defun company-strip-prefix (str prefix)
+  (substring str (length prefix)))
+
+(defun company--insert-candidate (candidate prefix)
+  (when (> (length candidate) 0)
+    (setq candidate (substring-no-properties candidate))
+    ;; XXX: Return value we check here is subject to change.
+    (if (eq (company-call-backend 'ignore-case) 'keep-prefix)
+        (insert (company-strip-prefix candidate prefix))
+      (unless (equal prefix candidate)
+        (delete-region (- (point) (length prefix)) (point))
+        (insert candidate)))))
+
+(defmacro company-with-candidate-inserted (candidate &rest body)
+  "Evaluate BODY with CANDIDATE temporarily inserted.
+This is a tool for backends that need candidates inserted before they
+can retrieve meta-data for them."
+  (declare (indent 1))
+  `(let ((inhibit-modification-hooks t)
+         (inhibit-point-motion-hooks t)
+         (modified-p (buffer-modified-p)))
+     (company--insert-candidate ,candidate company-prefix)
+     (unwind-protect
+         (progn ,@body)
+       (delete-region company-point (point))
+       (set-buffer-modified-p modified-p))))
+
+(defun company-explicit-action-p ()
+  "Return whether explicit completion action was taken by the user."
+  (or company--manual-action
+      company-selection-changed))
+
+(defun company-reformat (candidate)
+  ;; company-ispell needs this, because the results are always lower-case
+  ;; It's mory efficient to fix it only when they are displayed.
+  ;; FIXME: Adopt the current text's capitalization instead?
+  (if (eq (company-call-backend 'ignore-case) 'keep-prefix)
+      (concat company-prefix (substring candidate (length company-prefix)))
+    candidate))
+
+(defun company--should-complete ()
+  (and (eq company-idle-delay 'now)
+       (not (or buffer-read-only
+                overriding-local-map))
+       ;; Check if in the middle of entering a key combination.
+       (or (equal (this-command-keys-vector) [])
+           (not (keymapp (key-binding (this-command-keys-vector)))))
+       (not (and transient-mark-mode mark-active))))
+
+(defun company--should-continue ()
+  (or (eq t company-begin-commands)
+      (eq t company-continue-commands)
+      (if (eq 'not (car company-continue-commands))
+          (not (memq this-command (cdr company-continue-commands)))
+        (or (memq this-command company-begin-commands)
+            (memq this-command company-continue-commands)
+            (and (symbolp this-command)
+                 (string-match-p "\\`company-" (symbol-name this-command)))))))
+
+(defvar company-auto-update-doc nil
+  "If non-nil, update the documentation buffer on each selection change.
+To toggle the value of this variable, call `company-show-doc-buffer' with a
+prefix argument.")
+
+(defun company-call-frontends (command)
+  (cl-loop for frontend in company-frontends collect
+           (condition-case-unless-debug err
+               (funcall frontend command)
+             (error (error "Company: frontend %s error \"%s\" on command %s"
+                           frontend (error-message-string err) command)))))
+
+(defun company-set-selection (selection &optional force-update)
+  "Set SELECTION for company candidates.
+This will update `company-selection' and related variable.
+Only update when the current selection is changed, but optionally always
+update if FORCE-UPDATE."
+  (when selection
+    (let* ((offset (if company-selection-default 0 1))
+           (company-candidates-length
+            (+ company-candidates-length offset)))
+      (setq selection (+ selection offset))
+      (setq selection
+            (if company-selection-wrap-around
+                (mod selection company-candidates-length)
+              (max 0 (min (1- company-candidates-length) selection))))
+      (setq selection (unless (< selection offset)
+                        (- selection offset)))))
+  (when (or force-update (not (equal selection company-selection)))
+    (setq company-selection selection
+          company-selection-changed t)
+    (company-call-frontends 'update)))
+
+(defun company--group-lighter (candidate base)
+  (let ((backend (or (get-text-property 0 'company-backend candidate)
+                     (cl-some (lambda (x) (and (not (keywordp x)) x))
+                              company-backend))))
+    (when (and backend (symbolp backend))
+      (let ((name (replace-regexp-in-string "company-\\|-company" ""
+                                            (symbol-name backend))))
+        (format "%s-<%s>" base name)))))
+
+(defun company-update-candidates (candidates)
+  (setq company-candidates-length (length candidates)
+        company-valid-point company-point)
+  (if company-selection-changed
+      ;; Try to restore the selection
+      (let ((selected (and company-selection
+                           (nth company-selection company-candidates))))
+        (setq company-candidates candidates)
+        (when selected
+          (setq company-selection 0)
+          (catch 'found
+            (while candidates
+              (let ((candidate (pop candidates)))
+                (when (and (string= candidate selected)
+                           (equal (company-call-backend 'annotation candidate)
+                                  (company-call-backend 'annotation selected)))
+                  (throw 'found t)))
+              (cl-incf company-selection))
+            (setq company-selection company-selection-default
+                  company-selection-changed nil))))
+    (setq company-selection company-selection-default
+          company-candidates candidates))
+  ;; Calculate common.
+  (let ((completion-ignore-case (company-call-backend 'ignore-case)))
+    ;; We want to support non-prefix completion, so filtering is the
+    ;; responsibility of each respective backend, not ours.
+    ;; On the other hand, we don't want to replace non-prefix input in
+    ;; `company-complete-common', unless there's only one candidate.
+    (setq company-common
+          (if (cdr company-candidates)
+              (let ((common (try-completion "" company-candidates)))
+                (and (stringp common)
+                     common))
+            (car company-candidates)))))
+
+(defun company-calculate-candidates (prefix ignore-case suffix)
+  (let ((candidates (cdr (assoc prefix company-candidates-cache))))
+    (or candidates
+        (when company-candidates-cache
+          (let ((len (length prefix))
+                (completion-ignore-case ignore-case)
+                prev)
+            (cl-dotimes (i (1+ len))
+              (when (setq prev (cdr (assoc (substring prefix 0 (- len i))
+                                           company-candidates-cache)))
+                (setq candidates (all-completions prefix prev))
+                (cl-return t)))))
+        ;; No cache match, call the backend.
+        (let ((refresh-timer (run-with-timer company-async-redisplay-delay
+                                             nil
+                                             #'company--sneaky-refresh
+                                             prefix suffix)))
+          (unwind-protect
+              (setq candidates (company--preprocess-candidates
+                                (company--fetch-candidates prefix suffix)))
+            ;; If the backend is synchronous, no chance for the timer to run.
+            (cancel-timer refresh-timer))
+          ;; Save in cache.
+          (push (cons prefix candidates) company-candidates-cache)))
+    ;; Only now apply the predicate and transformers.
+    (company--postprocess-candidates candidates)))
+
+(defun company--unique-match-p (candidates prefix suffix ignore-case)
+  (and candidates
+       (not (cdr candidates))
+       (eq t (compare-strings (car candidates) nil nil
+                              (concat prefix suffix) nil nil ignore-case))
+       (not (eq (company-call-backend 'kind (car candidates))
+                'snippet))))
+
+(defun company--fetch-candidates (prefix suffix)
+  (let* ((non-essential (not company--manual-now))
+         (inhibit-redisplay t)
+         ;; At least we need "fresh" completions if the current command will
+         ;; rely on the result (e.g. insert common, or finish completion).
+         (c (if company--manual-now
+                (company-call-backend 'candidates prefix suffix)
+              (company-call-backend-raw 'candidates prefix suffix))))
+    (if (not (eq (car c) :async))
+        c
+      (let ((res 'none))
+        (funcall
+         (cdr c)
+         (lambda (candidates)
+           (when (eq res 'none)
+             (push 'company-foo unread-command-events))
+           (setq res candidates)))
+        (if (company--flyspell-workaround-p)
+            (while (and (eq res 'none)
+                        (not (input-pending-p)))
+              (sleep-for company-async-wait))
+          (while (and (eq res 'none)
+                      (sit-for 0.5 t))))
+        (while (member (car unread-command-events)
+                       '(company-foo (t . company-foo)))
+          (pop unread-command-events))
+        (let ((res-was res))
+          (setq res 'exited)
+          (if (eq 'none res-was)
+              (throw 'interrupted 'new-input)
+            res-was))))))
+
+(defun company--sneaky-refresh (prefix suffix)
+  (when company-candidates
+    (let* ((company-prefix prefix)
+           (company-suffix suffix))
+      (and prefix
+           (company-call-frontends 'unhide))))
+  (let (inhibit-redisplay)
+    (redisplay))
+  (when company-candidates (company-call-frontends 'pre-command)))
+
+(defun company--flyspell-workaround-p ()
+  ;; https://debbugs.gnu.org/23980
+  (and (bound-and-true-p flyspell-mode)
+       (version< emacs-version "27")))
+
+(defun company--preprocess-candidates (candidates)
+  (cl-assert (cl-every #'stringp candidates))
+  (unless (company-call-backend 'sorted)
+    (setq candidates (sort candidates 'string<)))
+  (when (company-call-backend 'duplicates)
+    (company--strip-duplicates candidates))
+  candidates)
+
+(defun company--postprocess-candidates (candidates)
+  (when (or company-candidates-predicate company-transformers)
+    (setq candidates (copy-sequence candidates)))
+  (when company-candidates-predicate
+    (setq candidates (cl-delete-if-not company-candidates-predicate candidates)))
+  (company--transform-candidates candidates))
+
+(defun company--strip-duplicates (candidates)
+  (let ((c2 candidates)
+        (extras 'unk))
+    (while c2
+      (setcdr c2
+              (let ((str (pop c2)))
+                (while (let ((str2 (car c2)))
+                         (if (not (equal str str2))
+                             (progn
+                               (setq extras 'unk)
+                               nil)
+                           (when (eq extras 'unk)
+                             (setq extras (list (cons (company-call-backend
+                                                       'annotation str)
+                                                      (company-call-backend
+                                                       'kind str)))))
+                           (let ((extra2 (cons (company-call-backend
+                                                'annotation str2)
+                                               (company-call-backend
+                                                'kind str2))))
+                             (if (member extra2 extras)
+                                 t
+                               (push extra2 extras)
+                               nil))))
+                  (pop c2))
+                c2)))))
+
+(defun company--transform-candidates (candidates)
+  (let ((c candidates))
+    (dolist (tr company-transformers)
+      (setq c (funcall tr c)))
+    c))
+
+(defcustom company-occurrence-weight-function
+  #'company-occurrence-prefer-closest-above
+  "Function to weigh matches in `company-sort-by-occurrence'.
+It's called with three arguments: cursor position, the beginning and the
+end of the match."
+  :type '(choice
+          (const :tag "First above point, then below point"
+                 company-occurrence-prefer-closest-above)
+          (const :tag "Prefer closest in any direction"
+                 company-occurrence-prefer-any-closest)))
+
+(defvar company-vscode-icons-mapping
+  '((array . "symbol-array.svg")
+    (boolean . "symbol-boolean.svg")
+    (class . "symbol-class.svg")
+    (color . "symbol-color.svg")
+    (constant . "symbol-constant.svg")
+    (constructor . "symbol-method.svg")
+    (enum-member . "symbol-enumerator-member.svg")
+    (enum . "symbol-enumerator.svg")
+    (event . "symbol-event.svg")
+    (field . "symbol-field.svg")
+    (file . "symbol-file.svg")
+    (filter . "filter.svg")
+    (folder . "folder.svg")
+    (interface . "symbol-interface.svg")
+    (keyword . "symbol-keyword.svg")
+    (method . "symbol-method.svg")
+    (function . "symbol-method.svg")
+    (module . "symbol-namespace.svg")
+    (numeric . "symbol-numeric.svg")
+    (operator . "symbol-operator.svg")
+    (property . "symbol-property.svg")
+    (reference . "references.svg")
+    (search . "search.svg")
+    (snippet . "symbol-snippet.svg")
+    (string . "symbol-string.svg")
+    (struct . "symbol-structure.svg")
+    (text . "symbol-key.svg")
+    (type-parameter . "symbol-parameter.svg")
+    (unit . "symbol-ruler.svg")
+    (value . "symbol-enumerator.svg")
+    (variable . "symbol-variable.svg")
+    (t . "symbol-misc.svg")))
+
+(defconst company-icons-root
+  (file-name-as-directory
+   (expand-file-name "icons"
+                     (file-name-directory (or load-file-name buffer-file-name)))))
+
+(defcustom company-icon-size '(auto-scale . 16)
+  "Size of icons indicating completion kind in the popup."
+  :type '(choice (integer :tag "Size in pixels" :value 16)
+                 (cons :tag "Size in pixels, scaled 2x on HiDPI screens"
+                       (const auto-scale)
+                       (integer :value 16))))
+
+(defcustom company-icon-margin 2
+  "Width of the margin that shows the icons, in characters."
+  :type 'integer)
+
+(defun company--render-icons-margin (icon-mapping root-dir candidate selected)
+  (if-let* ((ws (window-system))
+            (candidate candidate)
+            (kind (company-call-backend 'kind candidate))
+            (icon-file (or (alist-get kind icon-mapping)
+                           (alist-get t icon-mapping))))
+      (let* ((bkg (face-attribute (if selected
+                                      'company-tooltip-selection
+                                    'company-tooltip)
+                                  :background))
+             (dfw (default-font-width))
+             (icon-size (cond
+                         ((integerp company-icon-size)
+                          company-icon-size)
+                         ;; XXX: Also consider smooth scaling, e.g. using
+                         ;; (aref (font-info (face-font 'default)) 2)
+                         ((and (consp company-icon-size)
+                               (eq 'auto-scale (car company-icon-size)))
+                          (let ((base-size (cdr company-icon-size))
+                                (dfh (default-font-height)))
+                            (min
+                             (if (>= dfh (* 2 base-size))
+                                 (* 2 base-size)
+                               base-size)
+                             (* company-icon-margin dfw))))))
+             (spec (list 'image
+                         :file (expand-file-name icon-file root-dir)
+                         :type 'svg
+                         :width icon-size
+                         :height icon-size
+                         :ascent 'center
+                         ;; Transparency requires Emacs 28+.
+                         :background (unless (eq bkg 'unspecified)
+                                       bkg)))
+             (spacer-px-width (- (* company-icon-margin dfw) icon-size)))
+        (cond
+         ((<= company-icon-margin 2)
+          (concat
+           (propertize " " 'display spec)
+           (propertize (company-space-string (1- company-icon-margin))
+                       'display `(space . (:width (,spacer-px-width))))))
+         (t
+          (let* ((spacer-left (/ spacer-px-width 2))
+                 (spacer-right (- spacer-px-width spacer-left)))
+            (concat
+             (propertize (company-space-string 1)
+                         'display `(space . (:width (,spacer-left))))
+             (propertize " " 'display spec)
+             (propertize (company-space-string (- company-icon-margin 2))
+                         'display `(space . (:width (,spacer-right)))))))))
+    nil))
+
+(defun company-vscode-dark-icons-margin (candidate selected)
+  "Margin function which returns icons from vscode's dark theme."
+  (company--render-icons-margin company-vscode-icons-mapping
+                                (expand-file-name "vscode-dark" company-icons-root)
+                                candidate
+                                selected))
+
+(defun company-vscode-light-icons-margin (candidate selected)
+  "Margin function which returns icons from vscode's light theme."
+  (company--render-icons-margin company-vscode-icons-mapping
+                                (expand-file-name "vscode-light" company-icons-root)
+                                candidate
+                                selected))
+
+(defcustom company-text-icons-mapping
+  '((array "a" font-lock-type-face)
+    (boolean "b" font-lock-builtin-face)
+    (class "c" font-lock-type-face)
+    (color "#" success)
+    (constant "c" font-lock-constant-face)
+    (constructor "c" font-lock-function-name-face)
+    (enum-member "e" font-lock-builtin-face)
+    (enum "e" font-lock-builtin-face)
+    (field "f" font-lock-variable-name-face)
+    (file "f" font-lock-string-face)
+    (filter "!" minibuffer-prompt)
+    (folder "d" font-lock-doc-face)
+    (interface "i" font-lock-type-face)
+    (keyword "k" font-lock-keyword-face)
+    (method "m" font-lock-function-name-face)
+    (function "f" font-lock-function-name-face)
+    (module "{" font-lock-type-face)
+    (numeric "n" font-lock-builtin-face)
+    (operator "o" font-lock-comment-delimiter-face)
+    (property "p" font-lock-variable-name-face)
+    (reference "r" font-lock-doc-face)
+    (search "q" minibuffer-prompt)
+    (snippet "S" font-lock-string-face)
+    (string "s" font-lock-string-face)
+    (struct "%" font-lock-variable-name-face)
+    (text "w" shadow)
+    (type-parameter "p" font-lock-type-face)
+    (unit "u" shadow)
+    (value "v" font-lock-builtin-face)
+    (variable "v" font-lock-variable-name-face)
+    (t "." shadow))
+  "Mapping of the text icons.
+The format should be an alist of (KIND . CONF) where CONF is a list of the
+form (ICON FG BG) which is used to propertize the icon to be shown for a
+candidate of kind KIND. FG can either be color string or a face from which
+we can get a color string (using the :foreground face-property). BG must be
+of the same form as FG or a cons cell of (BG . BG-WHEN-SELECTED) which each
+should be of the same form as FG.
+
+The only mandatory element in CONF is ICON, you can omit both the FG and BG
+fields without issue.
+
+When BG is omitted and `company-text-icons-add-background' is non-nil, a BG
+color is generated using a gradient between the active tooltip color and
+the FG color."
+  :type '(repeat sexp))
+
+(defcustom company-text-face-extra-attributes '(:weight bold)
+  "Additional attributes to add to text/dot icons faces.
+If non-nil, an anonymous face is generated.
+
+Affects `company-text-icons-margin' and `company-dot-icons-margin'."
+  :type '(plist :tag "Face property list"))
+
+(defcustom company-text-icons-format " %s "
+  "Format string for printing the text icons."
+  :type 'string)
+
+(defcustom company-text-icons-add-background nil
+  "Generate a background color for text/dot icons when none is given.
+See `company-text-icons-mapping'."
+  :type 'boolean)
+
+(defun company-text-icons-margin (candidate selected)
+  "Margin function which returns unicode icons."
+  (when-let* ((candidate candidate)
+              (kind (company-call-backend 'kind candidate))
+              (conf (or (alist-get kind company-text-icons-mapping)
+                        (alist-get t company-text-icons-mapping))))
+    (cl-destructuring-bind (icon &optional fg bg) conf
+      (propertize
+       (format company-text-icons-format icon)
+       'face
+       (company-text-icons--face fg bg selected)))))
+
+(declare-function color-rgb-to-hex "color")
+(declare-function color-gradient "color")
+
+(defun company-text-icons--extract-property (face property)
+  "Try to extract PROPERTY from FACE.
+If FACE isn't a valid face return FACE as is. If FACE doesn't have
+PROPERTY return nil."
+  (if (facep face)
+      (let ((value (face-attribute face property)))
+        (unless (eq value 'unspecified)
+          value))
+    face))
+
+(defun company-text-icons--face (fg bg selected)
+  (let ((fg-color (company-text-icons--extract-property fg :foreground)))
+    `(,@company-text-face-extra-attributes
+      ,@(and fg-color
+             (list :foreground fg-color))
+      ,@(let* ((bg-is-cons (consp bg))
+               (bg (if bg-is-cons (if selected (cdr bg) (car bg)) bg))
+               (bg-color (company-text-icons--extract-property bg :background))
+               (tooltip-bg-color (company-text-icons--extract-property
+                                  (if selected
+                                      'company-tooltip-selection
+                                    'company-tooltip)
+                                  :background)))
+          (cond
+           ((and company-text-icons-add-background selected
+                 (not bg-is-cons) bg-color tooltip-bg-color)
+            ;; Adjust the coloring of the background when *selected* but user hasn't
+            ;; specified an alternate background color for selected item icons.
+            (list :background
+                  (apply #'color-rgb-to-hex
+                         (nth 0 (color-gradient (color-name-to-rgb tooltip-bg-color)
+                                                (color-name-to-rgb bg-color)
+                                                2)))))
+           (bg
+            ;; When background is configured we use it as is, even if it doesn't
+            ;; constrast well with other candidates when selected.
+            (and bg-color
+                 (list :background bg-color)))
+           ((and company-text-icons-add-background fg-color tooltip-bg-color)
+            ;; Lastly attempt to generate a background from the foreground.
+            (list :background
+                  (apply #'color-rgb-to-hex
+                         (nth 0 (color-gradient (color-name-to-rgb tooltip-bg-color)
+                                                (color-name-to-rgb fg-color)
+                                                10))))))))))
+
+(defcustom company-dot-icons-format "● "
+  "Format string for `company-dot-icons-margin'."
+  :type 'string)
+
+(defun company-dot-icons-margin (candidate selected)
+  "Margin function that uses a colored dot to display completion kind."
+  (when-let* ((kind (company-call-backend 'kind candidate))
+              (conf (or (assoc-default kind company-text-icons-mapping)
+                        (assoc-default t company-text-icons-mapping))))
+    (cl-destructuring-bind (_icon &optional fg bg) conf
+      (propertize company-dot-icons-format
+                  'face
+                  (company-text-icons--face fg bg selected)))))
+
+(defun company-detect-icons-margin (candidate selected)
+  "Margin function which picks the appropriate icon set automatically."
+  (if (and (display-graphic-p)
+           (image-type-available-p 'svg))
+      (cl-case (frame-parameter nil 'background-mode)
+        (light (company-vscode-light-icons-margin candidate selected))
+        (t (company-vscode-dark-icons-margin candidate selected)))
+    (company-text-icons-margin candidate selected)))
+
+(defcustom company-format-margin-function #'company-detect-icons-margin
+  "Function to format the margin.
+It accepts 2 params `candidate' and `selected' and can be used for
+inserting prefix/image before the completion items. Typically, the
+functions call the backends with `kind' and then insert the appropriate
+image for the returned kind image. Function is called with (nil nil) to get
+the default margin."
+  :type '(choice
+          (const :tag "Disabled" nil)
+          (const :tag "Detect icons theme base on conditions" company-detect-icons-margin)
+          (const :tag "Text characters as icons" company-text-icons-margin)
+          (const :tag "Colored dots as icons" company-dot-icons-margin)
+          (const :tag "VScode dark icons theme" company-vscode-dark-icons-margin)
+          (const :tag "VScode light icons theme" company-vscode-light-icons-margin)
+          (function :tag "Custom icon function.")))
+
+(defun company-occurrence-prefer-closest-above (pos match-beg match-end)
+  "Give priority to the matches above point, then those below point."
+  (if (< match-beg pos)
+      (- pos match-end)
+    (- match-beg (window-start))))
+
+(defun company-occurrence-prefer-any-closest (pos _match-beg match-end)
+  "Give priority to the matches closest to the point."
+  (abs (- pos match-end)))
+
+(defun company-sort-by-occurrence (candidates)
+  "Sort CANDIDATES according to their occurrences.
+Searches for each in the currently visible part of the current buffer and
+prioritizes the matches according to `company-occurrence-weight-function'.
+The rest of the list is appended unchanged.
+Keywords and function definition names are ignored."
+  (let* ((w-start (max (window-start) (field-beginning)))
+         (w-end (window-end))
+         (start-point (point))
+         occurs
+         (noccurs
+          (save-excursion
+            (cl-delete-if
+             (lambda (candidate)
+               (goto-char w-start)
+               (when (and (not (string-empty-p candidate))
+                          (search-forward candidate w-end t)
+                          ;; ^^^ optimize for large lists where most elements
+                          ;; won't have a match.
+                          (catch 'done
+                            (goto-char (1- start-point))
+                            (while (search-backward candidate w-start t)
+                              (when (save-match-data
+                                      (company--occurrence-predicate))
+                                (throw 'done t)))
+                            (goto-char start-point)
+                            (while (search-forward candidate w-end t)
+                              (when (save-match-data
+                                      (company--occurrence-predicate))
+                                (throw 'done t)))))
+                 (push
+                  (cons candidate
+                        (funcall company-occurrence-weight-function
+                                 start-point
+                                 (match-beginning 0)
+                                 (match-end 0)))
+                  occurs)
+                 t))
+             candidates))))
+    (nconc
+     (mapcar #'car (sort occurs (lambda (e1 e2) (<= (cdr e1) (cdr e2)))))
+     noccurs)))
+
+(defun company--occurrence-predicate ()
+  (defvar comint-last-prompt)
+  (let ((beg (match-beginning 0))
+        (end (match-end 0))
+        (comint-last-prompt (bound-and-true-p comint-last-prompt)))
+    (save-excursion
+      (goto-char end)
+      ;; Workaround for python-shell-completion-at-point's behavior:
+      ;; https://github.com/company-mode/company-mode/issues/759
+      ;; https://github.com/company-mode/company-mode/issues/549
+      (when (derived-mode-p 'inferior-python-mode)
+        (let ((lbp (line-beginning-position)))
+          (setq comint-last-prompt (cons lbp lbp))))
+      (and (not (memq (get-text-property (1- (point)) 'face)
+                      '(font-lock-function-name-face
+                        font-lock-keyword-face)))
+           (let ((prefix (company--prefix-str
+                          (company-call-backend 'prefix))))
+             (and (stringp prefix)
+                  (= (length prefix) (- end beg))))))))
+
+(defun company-sort-by-backend-importance (candidates)
+  "Sort CANDIDATES as two priority groups.
+If `company-backend' is a function, do nothing.  If it's a list, move
+candidates from backends before keyword `:with' to the front.  Candidates
+from the rest of the backends in the group, if any, will be left at the end."
+  (if (functionp company-backend)
+      candidates
+    (let ((low-priority (cdr (memq :with company-backend))))
+      (if (null low-priority)
+          candidates
+        (sort candidates
+              (lambda (c1 c2)
+                (and
+                 (let ((b2 (get-text-property 0 'company-backend c2)))
+                   (and b2 (memq b2 low-priority)))
+                 (let ((b1 (get-text-property 0 'company-backend c1)))
+                   (or (not b1) (not (memq b1 low-priority)))))))))))
+
+(defun company-sort-prefer-same-case-prefix (candidates)
+  "Prefer CANDIDATES with the exact same prefix.
+If a backend returns case insensitive matches, candidates with the an exact
+prefix match (same case) will be prioritized."
+  (cl-loop for candidate in candidates
+           if (string-prefix-p company-prefix candidate)
+           collect candidate into same-case
+           else collect candidate into other-case
+           finally return (append same-case other-case)))
+
+(defun company-idle-begin (buf win tick pos)
+  (and (eq buf (current-buffer))
+       (eq win (selected-window))
+       (eq tick (buffer-chars-modified-tick))
+       (eq pos (point))
+       (let ((non-essential t))
+         (when (company-auto-begin)
+           (let ((this-command 'company-idle-begin))
+             (company-post-command))))))
+
+(defun company-auto-begin ()
+  (and company-mode
+       (not company-candidates)
+       (let ((company-idle-delay 'now))
+         (condition-case-unless-debug err
+             (let ((inhibit-quit nil))
+               (company--perform)
+               ;; Return non-nil if active.
+               company-candidates)
+           (error (message "Company: An error occurred in auto-begin")
+                  (message "%s" (error-message-string err))
+                  (company-cancel))
+           (quit (company-cancel))))))
+
+;;;###autoload
+(defun company-manual-begin ()
+  "Start the completion interface.
+
+Unlike `company-complete-selection' or `company-complete', this command
+doesn't cause any immediate changes to the buffer text."
+  (interactive)
+  (company-assert-enabled)
+  (setq company--manual-action t)
+  (unwind-protect
+      (let ((company-minimum-prefix-length 0)
+            (company--manual-now t))
+        (or (and company-candidates
+                 (= company-valid-point (point)))
+            (company-auto-begin)))
+    (unless company-candidates
+      (setq company--manual-action nil))))
+
+(defun company-other-backend (&optional backward)
+  (interactive (list current-prefix-arg))
+  (company-assert-enabled)
+  (let* ((after (if company-backend
+                    (cdr (member company-backend company-backends))
+                  company-backends))
+         (before (cdr (member company-backend (reverse company-backends))))
+         (next (if backward
+                   (append before (reverse after))
+                 (append after (reverse before)))))
+    (company-cancel)
+    (cl-dolist (backend next)
+      (when (ignore-errors (company-begin-backend backend))
+        (cl-return t))))
+  (unless company-candidates
+    (user-error "No other backend")))
+
+(defun company-require-match-p ()
+  (let ((backend-value (company-call-backend 'require-match)))
+    (or (eq backend-value t)
+        (and (not (eq backend-value 'never))
+             (if (functionp company-require-match)
+                 (funcall company-require-match)
+               (eq company-require-match t))))))
+
+(defun company-insertion-on-trigger-p (input)
+  "Return non-nil if INPUT should trigger insertion.
+For more details see `company-insertion-on-trigger' and
+`company-insertion-triggers'."
+  (and (if (functionp company-insertion-on-trigger)
+           (funcall company-insertion-on-trigger)
+         company-insertion-on-trigger)
+       (if (functionp company-insertion-triggers)
+           (funcall company-insertion-triggers input)
+         (if (consp company-insertion-triggers)
+             (memq (char-syntax (string-to-char input))
+                   company-insertion-triggers)
+           (string-match-p (regexp-quote (substring input 0 1))
+                           company-insertion-triggers)))))
+
+(defun company--incremental-p ()
+  (and (> (point) company-point)
+       (> (point-max) company--point-max)
+       (not (eq this-command 'backward-delete-char-untabify))
+       (equal (buffer-substring (- company-point (length company-prefix))
+                                company-point)
+              company-prefix)))
+
+(defun company--continue-failed (new-prefix)
+  (cond
+   ((and (or (not (company-require-match-p))
+             ;; Don't require match if the new prefix
+             ;; doesn't continue the old one, and the latter was a match.
+             (not (stringp new-prefix))
+             (<= (length new-prefix) (length company-prefix)))
+         (member company-prefix company-candidates))
+    ;; Last input was a success,
+    ;; but we're treating it as an abort + input anyway,
+    ;; like the `unique' case below.
+    (company-cancel 'non-unique))
+   ((company-require-match-p)
+    ;; Wrong incremental input, but required match.
+    (delete-char (- company-valid-point (point)))
+    (ding)
+    (message "Matching input is required")
+    company-candidates)
+   (t (company-cancel))))
+
+(defun company--good-prefix-p (prefix min-length)
+  (and (stringp (company--prefix-str prefix)) ;excludes 'stop
+       (or (eq (company--prefix-len prefix) t)
+           (>= (company--prefix-len prefix)
+               min-length))))
+
+(defun company--prefix-min-length ()
+  (if company--manual-prefix
+      (if company-abort-manual-when-too-short
+          ;; Must not be less than minimum or initial length.
+          (min company-minimum-prefix-length
+               (if-let* ((mp-len-override (cdr-safe company--manual-prefix)))
+                   (if (numberp mp-len-override)
+                       mp-len-override
+                     (length (car-safe company--manual-prefix)))
+                 (length company--manual-prefix)))
+        0)
+    company-minimum-prefix-length))
+
+(defun company--continue ()
+  (when (company-call-backend 'no-cache company-prefix)
+    ;; Don't complete existing candidates, fetch new ones.
+    (setq company-candidates-cache nil))
+  (let* ((new-prefix (company-call-backend 'prefix))
+         (new-suffix (company--suffix-str new-prefix))
+         (ignore-case (company-call-backend 'ignore-case))
+         (c (catch 'interrupted
+              (when (and (company--good-prefix-p new-prefix
+                                                 (company--prefix-min-length))
+                         (setq new-prefix (company--prefix-str new-prefix))
+                         (= (- (point) (length new-prefix))
+                            (- company-point (length company-prefix))))
+                (company-calculate-candidates new-prefix ignore-case new-suffix)))))
+    (cond
+     ((eq c 'new-input) ; Keep the old completions, but update the rest.
+      (setq company-prefix new-prefix
+            company-suffix new-suffix
+            company-point (point))
+      t)
+     ((and company-abort-on-unique-match
+           (company--unique-match-p c new-prefix new-suffix ignore-case))
+      ;; Handle it like completion was aborted, to differentiate from user
+      ;; calling one of Company's commands to insert the candidate,
+      ;; not to trigger template expansion, etc.
+      (company-cancel 'unique))
+     ((consp c)
+      ;; incremental match
+      (setq company-prefix new-prefix
+            company-suffix new-suffix
+            company-point (point))
+      (company-update-candidates c)
+      c)
+     ((and (characterp last-command-event)
+           (company-insertion-on-trigger-p (string last-command-event)))
+      ;; Insertion on trigger.
+      (save-excursion
+        (goto-char company-point)
+        (company-complete-selection)
+        nil))
+     ((not (company--incremental-p))
+      (company-cancel))
+     (t (company--continue-failed new-prefix)))))
+
+(defun company--begin-new ()
+  (let ((min-prefix (company--prefix-min-length))
+        entity c)
+    (cl-dolist (backend (if company-backend
+                            ;; prefer manual override
+                            (list company-backend)
+                          company-backends))
+      (setq entity
+            (if (or (symbolp backend)
+                    (functionp backend))
+                (when (company--maybe-init-backend backend)
+                  (let ((company-backend backend))
+                    (company-call-backend 'prefix)))
+              (company--multi-backend-adapter backend 'prefix)))
+      (when entity
+        (when (and (company--good-prefix-p entity min-prefix)
+                   (or (not company-inhibit-inside-symbols)
+                       company--manual-action
+                       (zerop (length (company--suffix-str entity)))))
+          (let ((ignore-case (company-call-backend 'ignore-case)))
+            ;; Keep this undocumented, esp. while only 1 backend needs it.
+            (company-call-backend 'set-min-prefix min-prefix)
+            (setq company-prefix (company--prefix-str entity)
+                  company-suffix (company--suffix-str entity)
+                  company-point (point)
+                  company-backend backend
+                  c (catch 'interrupted
+                      (company-calculate-candidates company-prefix ignore-case
+                                                    company-suffix)))
+            (cond
+             ((or (null c) (eq c 'new-input))
+              (when company--manual-action
+                (message "No completion found")))
+             ((and company-abort-on-unique-match
+                   (company--unique-match-p c company-prefix company-suffix ignore-case)
+                   (if company--manual-action
+                       ;; If `company-manual-begin' was called, the user
+                       ;; really wants something to happen.  Otherwise...
+                       (ignore (message "Sole completion"))
+                     t))
+              ;; ...abort and run the hooks, e.g. to clear the cache.
+              (company-cancel 'unique))
+             (t ;; We got completions!
+              (when company--manual-action
+                (setq company--manual-prefix entity))
+              (company-update-candidates c)
+              (run-hook-with-args 'company-completion-started-hook
+                                  (company-explicit-action-p))
+              (company-call-frontends 'show)))))
+        (cl-return c)))))
+
+(defun company--perform ()
+  (cond
+   (company-candidates
+    (company--continue))
+   ((company--should-complete)
+    (company-cache-expire)
+    (company--begin-new)))
+  (if (not company-candidates)
+      (setq company-backend nil)
+    (setq company--point-max (point-max))
+    (company-ensure-emulation-alist)
+    (company-enable-overriding-keymap company-active-map)
+    (company-call-frontends 'update)))
+
+(defun company-cancel (&optional result)
+  (let ((prefix company-prefix)
+        (backend company-backend))
+    (setq company-backend nil
+          company-prefix nil
+          company-candidates nil
+          company-candidates-length nil
+          company-candidates-cache nil
+          company-candidates-predicate nil
+          company-common nil
+          company-selection company-selection-default
+          company-selection-changed nil
+          company--manual-action nil
+          company--manual-prefix nil
+          company--point-max nil
+          company--multi-uncached-backends nil
+          company--multi-min-prefix nil
+          company-point nil)
+    (when company-timer
+      (cancel-timer company-timer))
+    (company-echo-cancel t)
+    (company-search-mode 0)
+    (company-call-frontends 'hide)
+    (company-enable-overriding-keymap nil)
+    (when prefix
+      (if (stringp result)
+          (let ((company-backend backend))
+            (run-hook-with-args 'company-completion-finished-hook result)
+            (company-call-backend 'post-completion result))
+        (run-hook-with-args 'company-completion-cancelled-hook result))
+      (run-hook-with-args 'company-after-completion-hook result)))
+  ;; Make return value explicit.
+  nil)
+
+(defun company-abort ()
+  (interactive)
+  (company-cancel 'abort))
+
+(defun company-finish (result)
+  (pcase-let ((`(,prefix . ,suffix) (company--boundaries result)))
+    (company--insert-candidate result (or prefix company-prefix))
+    (and (> (length suffix) 0)
+         (delete-region (point) (+ (point) (length suffix))))
+    (let ((tick (buffer-chars-modified-tick))
+          (backend company-backend))
+      ;; Call backend's `post-completion' and run other hooks, then exit.
+      (company-cancel result)
+      ;; Try restarting completion, to see if we moved into a new field.
+      ;; Most commonly, this would be after entering a dir in file completion.
+      (when (= (buffer-chars-modified-tick) tick)
+        (let (company-require-match)
+          (setq company-backend backend
+                company--manual-prefix "")
+          (company--begin-new))
+        (unless (and company-candidates
+                     (equal (company--boundaries) '("" . "")))
+          (company-cancel))))))
+
+(defsubst company-keep (command)
+  (and (symbolp command) (get command 'company-keep)))
+
+(defun company--proper-suffix-p (candidate prefix suffix)
+  (and
+   (>= (length candidate)
+       (+ (length prefix)
+          (length suffix)))
+   (string-suffix-p suffix candidate
+                    (company-call-backend 'ignore-case))))
+
+(defun company--boundaries (&optional candidate)
+  (unless candidate
+    (setq candidate (nth (or company-selection 0) company-candidates)))
+  (or
+   (company-call-backend 'adjust-boundaries
+                         candidate
+                         company-prefix company-suffix)
+   (and
+    ;; Default to replacing the suffix only if the completion ends with it.
+    (company--proper-suffix-p candidate company-prefix company-suffix)
+    (cons company-prefix company-suffix))
+   (cons company-prefix "")))
+
+(defun company--active-p ()
+  company-candidates)
+
+(defun company-pre-command ()
+  (company--electric-restore-window-configuration)
+  (unless (company-keep this-command)
+    (condition-case-unless-debug err
+        (when company-candidates
+          (company-call-frontends 'pre-command)
+          (unless (company--should-continue)
+            (company-abort)))
+      (error (message "Company: An error occurred in pre-command")
+             (message "%s" (error-message-string err))
+             (company-cancel))))
+  (when company-timer
+    (cancel-timer company-timer)
+    (setq company-timer nil))
+  (company-echo-cancel t)
+  (unless (memq this-original-command
+                '(describe-key
+                  describe-key-briefly
+                  describe-map
+                  describe-bindings))
+    (company-uninstall-map)))
+
+(defun company-post-command ()
+  (when (and company-candidates
+             (null this-command))
+    ;; Happens when the user presses `C-g' while inside
+    ;; `flyspell-post-command-hook', for example.
+    ;; Or any other `post-command-hook' function that can call `sit-for',
+    ;; or any quittable timer function.
+    (company-abort)
+    (setq this-command 'company-abort))
+  (unless (company-keep this-command)
+    (condition-case-unless-debug err
+        (progn
+          (unless (and (equal (point) company-point)
+                       (equal (point-max) company--point-max))
+            (let (company-idle-delay) ; Against misbehavior while debugging.
+              (company--perform)))
+          (if company-candidates
+              (progn
+                (company-call-frontends 'post-command)
+                (when company-auto-update-doc
+                  (condition-case nil
+                      (unless (company--electric-command-p)
+                        (company-show-doc-buffer))
+                    (user-error nil)
+                    (quit nil))))
+            (let ((delay (company--idle-delay)))
+             (and (numberp delay)
+                  (not defining-kbd-macro)
+                  (company--should-begin)
+                  (setq company-timer
+                        (run-with-timer delay nil
+                                        'company-idle-begin
+                                        (current-buffer) (selected-window)
+                                        (buffer-chars-modified-tick) (point)))))))
+      (error (message "Company: An error occurred in post-command")
+             (message "%s" (error-message-string err))
+             (company-cancel))))
+  (company-install-map))
+
+(defun company--idle-delay ()
+  (let ((delay
+          (if (functionp company-idle-delay)
+              (funcall company-idle-delay)
+            company-idle-delay)))
+    (if (memql delay '(t 0 0.0))
+        0.01
+      delay)))
+
+(defvar company--begin-inhibit-commands '(company-abort
+                                          company-complete-mouse
+                                          company-complete
+                                          company-complete-common
+                                          company-complete-selection
+                                          company-complete-tooltip-row)
+  "List of commands after which idle completion is (still) disabled when
+`company-begin-commands' is t.")
+
+(defun company--should-begin ()
+  (if (eq t company-begin-commands)
+      (not (memq this-command company--begin-inhibit-commands))
+    (or
+     (memq this-command company-begin-commands)
+     (and (symbolp this-command) (get this-command 'company-begin)))))
+
+;;; search ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defcustom company-search-regexp-function #'company-search-words-in-any-order-regexp
+  "Function to construct the search regexp from input.
+It's called with one argument, the current search input.  It must return
+either a regexp without groups, or one where groups don't intersect and
+each one wraps a part of the input string."
+  :type '(choice
+          (const :tag "Exact match" regexp-quote)
+          (const :tag "Words separated with spaces" company-search-words-regexp)
+          (const :tag "Words separated with spaces, in any order"
+                 company-search-words-in-any-order-regexp)
+          (const :tag "All characters in given order, with anything in between"
+                 company-search-flex-regexp)
+          (const :tag "Space separated words in any order, all chars inside a word with anything in between"
+                 company-search-flex-words-in-any-order-regexp)))
+
+(defvar-local company-search-string "")
+
+;; FIXME: Delete later.
+(defvar company-search-lighter '(" "
+                                 (company-search-filtering "Filter" "Search")
+                                 ": \""
+                                 company-search-string
+                                 "\""))
+
+(defvar-local company-search-filtering nil
+  "Non-nil to filter the completion candidates by the search string")
+
+(defvar-local company--search-old-selection 0)
+
+(defvar-local company--search-old-changed nil)
+
+(defun company-search-words-regexp (input)
+  (mapconcat (lambda (word) (format "\\(%s\\)" (regexp-quote word)))
+             (split-string input " +" t) ".*"))
+
+(defun company-search-words-in-any-order-regexp (input)
+  (let* ((words (mapcar (lambda (word) (format "\\(%s\\)" (regexp-quote word)))
+                        (split-string input " +" t)))
+         (permutations (company--permutations words)))
+    (mapconcat (lambda (words)
+                 (mapconcat #'identity words ".*"))
+               permutations
+               "\\|")))
+
+(defun company-search-flex-regexp (input)
+  (if (zerop (length input))
+      ""
+    (concat (format "\\(%s\\)" (regexp-quote (string (aref input 0))))
+            (mapconcat (lambda (c)
+                         (concat "[^" (string c) "]*"
+                                 (format "\\(%s\\)"
+                                         (regexp-quote (string c)))))
+                       (substring input 1) ""))))
+
+(defun company-search-flex-words-in-any-order-regexp (input)
+  (let* ((words (mapcar (lambda (word) (format "\\(?:%s\\)"
+                                          (company-search-flex-regexp word)))
+                        (split-string input " +" t)))
+         (permutations (company--permutations words)))
+    (mapconcat (lambda (words)
+                 (mapconcat #'identity words ".*"))
+               permutations
+               "\\|")))
+
+(defun company--permutations (lst)
+  (if (not lst)
+      '(nil)
+    ;; FIXME: Replace with `mapcan' in Emacs 26.
+    (cl-mapcan
+     (lambda (e)
+       (mapcar (lambda (perm) (cons e perm))
+               (company--permutations (cl-remove e lst :count 1))))
+     lst)))
+
+(defun company--search (text lines)
+  (let ((re (funcall company-search-regexp-function text))
+        (i 0))
+    (cl-dolist (line lines)
+      (when (string-match-p re line)
+        (cl-return i))
+      (cl-incf i))))
+
+(defun company-search-printing-char ()
+  (interactive)
+  (company--search-assert-enabled)
+  (let* ((event-type (event-basic-type last-command-event))
+         (event-string (if (characterp event-type)
+                           (string last-command-event)
+                         ;; Handle key press on the keypad.
+                         (let ((name (symbol-name event-type)))
+                           (if (string-match "kp-\\([0-9]\\)" name)
+                               (match-string 1 name)
+                             (error "Unexpected printing char input")))))
+         (ss (concat company-search-string event-string)))
+    (when company-search-filtering
+      (company--search-update-predicate ss))
+    (company--search-update-string ss)))
+
+(defun company--search-update-predicate (ss)
+  (let* ((re (funcall company-search-regexp-function ss))
+         (company-candidates-predicate
+          (and (not (string-empty-p re))
+               company-search-filtering
+               (lambda (candidate) (string-match-p re candidate))))
+         (cc (company-calculate-candidates company-prefix
+                                           (company-call-backend 'ignore-case)
+                                           company-suffix)))
+    (unless cc (user-error "No match"))
+    (company-update-candidates cc)))
+
+(defun company--search-update-string (new)
+  (let* ((selection (or company-selection 0))
+         (pos (company--search new (nthcdr selection company-candidates))))
+    (if (null pos)
+        (let ((pos (company--search new (nthcdr (- company-candidates-length
+                                                   selection)
+                                                (reverse company-candidates)))))
+          (if (null pos)
+              (ding)
+            (setq company-search-string new)
+            (company-set-selection (- selection pos 1) t)))
+        (ding)
+        (setq company-search-string new)
+        (company-set-selection (+ selection pos) t))))
+
+(defun company--search-assert-input ()
+  (company--search-assert-enabled)
+  (when (string-empty-p company-search-string)
+    (user-error "Empty search string")))
+
+(defun company-search-repeat-forward ()
+  "Repeat the incremental search in completion candidates forward."
+  (interactive)
+  (company--search-assert-input)
+  (let* ((selection (or company-selection 0))
+         (pos (company--search company-search-string
+                               (cdr (nthcdr selection company-candidates)))))
+    (if (null pos)
+        (ding)
+      (company-set-selection (+ selection pos 1) t))))
+
+(defun company-search-repeat-backward ()
+  "Repeat the incremental search in completion candidates backwards."
+  (interactive)
+  (company--search-assert-input)
+  (let* ((selection (or company-selection 0))
+         (pos (company--search company-search-string
+                              (nthcdr (- company-candidates-length
+                                         selection)
+                                      (reverse company-candidates)))))
+    (if (null pos)
+        (ding)
+      (company-set-selection (- selection pos 1) t))))
+
+(defun company-search-toggle-filtering ()
+  "Toggle `company-search-filtering'."
+  (interactive)
+  (company--search-assert-enabled)
+  (setq company-search-filtering (not company-search-filtering))
+  (let ((ss company-search-string))
+    (company--search-update-predicate ss)
+    (company--search-update-string ss)))
+
+(defun company-search-abort ()
+  "Abort searching the completion candidates."
+  (interactive)
+  (company--search-assert-enabled)
+  (company-search-mode 0)
+  (company-set-selection company--search-old-selection t)
+  (setq company-selection-changed company--search-old-changed))
+
+(defun company-search-other-char ()
+  (interactive)
+  (company--search-assert-enabled)
+  (company-search-mode 0)
+  (company--unread-this-command-keys))
+
+(defun company-search-delete-char ()
+  (interactive)
+  (company--search-assert-enabled)
+  (if (string-empty-p company-search-string)
+      (ding)
+    (let ((ss (substring company-search-string 0 -1)))
+      (when company-search-filtering
+        (company--search-update-predicate ss))
+      (company--search-update-string ss))))
+
+(defvar company-search-map
+  (let ((i 0)
+        (keymap (make-keymap)))
+    (if (fboundp 'max-char)
+        (set-char-table-range (nth 1 keymap) (cons #x100 (max-char))
+                              'company-search-printing-char)
+      (with-no-warnings
+        ;; obsolete in Emacs 23
+        (let ((l (generic-character-list))
+              (table (nth 1 keymap)))
+          (while l
+            (set-char-table-default table (car l) 'company-search-printing-char)
+            (setq l (cdr l))))))
+    (define-key keymap [t] 'company-search-other-char)
+    (while (< i ?\s)
+      (define-key keymap (make-string 1 i) 'company-search-other-char)
+      (cl-incf i))
+    (while (< i 256)
+      (define-key keymap (vector i) 'company-search-printing-char)
+      (cl-incf i))
+    (dotimes (i 10)
+      (define-key keymap (kbd (format "<kp-%d>" i)) 'company-search-printing-char))
+    (let ((meta-map (make-sparse-keymap)))
+      (define-key keymap (char-to-string meta-prefix-char) meta-map)
+      (define-key keymap [escape] meta-map))
+    (define-key keymap (vector meta-prefix-char t) 'company-search-other-char)
+    (define-key keymap (kbd "C-n") 'company-select-next-or-abort)
+    (define-key keymap (kbd "C-p") 'company-select-previous-or-abort)
+    (define-key keymap (kbd "M-n") 'company--select-next-and-warn)
+    (define-key keymap (kbd "M-p") 'company--select-previous-and-warn)
+    (define-key keymap (kbd "<down>") 'company-select-next-or-abort)
+    (define-key keymap (kbd "<up>") 'company-select-previous-or-abort)
+    (define-key keymap "\e\e\e" 'company-search-other-char)
+    (define-key keymap [escape escape escape] 'company-search-other-char)
+    (define-key keymap (kbd "DEL") 'company-search-delete-char)
+    (define-key keymap [backspace] 'company-search-delete-char)
+    (define-key keymap "\C-g" 'company-search-abort)
+    (define-key keymap "\C-s" 'company-search-repeat-forward)
+    (define-key keymap "\C-r" 'company-search-repeat-backward)
+    (define-key keymap "\C-o" 'company-search-toggle-filtering)
+    (company-keymap--bind-quick-access keymap)
+    keymap)
+  "Keymap used for incrementally searching the completion candidates.")
+
+(define-minor-mode company-search-mode
+  "Search mode for completion candidates.
+Don't start this directly, use `company-search-candidates' or
+`company-filter-candidates'."
+  :lighter nil
+  (if company-search-mode
+      (if (company-manual-begin)
+          (progn
+            (setq company--search-old-selection company-selection
+                  company--search-old-changed company-selection-changed)
+            (company-call-frontends 'update)
+            (company-enable-overriding-keymap company-search-map))
+        (setq company-search-mode nil))
+    (kill-local-variable 'company-search-string)
+    (kill-local-variable 'company-search-filtering)
+    (kill-local-variable 'company--search-old-selection)
+    (kill-local-variable 'company--search-old-changed)
+    (when company-backend
+      (company--search-update-predicate "")
+      (company-call-frontends 'update))
+    (company-enable-overriding-keymap company-active-map)))
+
+(defun company--search-assert-enabled ()
+  (company-assert-enabled)
+  (unless company-search-mode
+    (company-uninstall-map)
+    (user-error "Company not in search mode")))
+
+(defun company-search-candidates ()
+  "Start searching the completion candidates incrementally.
+
+\\<company-search-map>Search can be controlled with the commands:
+- `company-search-repeat-forward' (\\[company-search-repeat-forward])
+- `company-search-repeat-backward' (\\[company-search-repeat-backward])
+- `company-search-abort' (\\[company-search-abort])
+- `company-search-delete-char' (\\[company-search-delete-char])
+
+Regular characters are appended to the search string.
+
+Customize `company-search-regexp-function' to change how the input
+is interpreted when searching.
+
+The command `company-search-toggle-filtering' (\\[company-search-toggle-filtering])
+uses the search string to filter the completion candidates."
+  (interactive)
+  (company-search-mode 1))
+
+(defun company-filter-candidates ()
+  "Start filtering the completion candidates incrementally.
+This works the same way as `company-search-candidates' immediately
+followed by `company-search-toggle-filtering'."
+  (interactive)
+  (setq company-search-filtering t)
+  (company-search-mode 1))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defun company-select-next (&optional arg)
+  "Select the next candidate in the list.
+
+With ARG, move by that many elements.
+When `company-selection-default' is nil, add a special pseudo candidates
+meant for no selection."
+  (interactive "p")
+  (when (company-manual-begin)
+    (let ((selection (+ (or arg 1)
+                        (or company-selection
+                            company-selection-default
+                            -1))))
+      (company-set-selection selection))))
+
+(defun company-select-previous (&optional arg)
+  "Select the previous candidate in the list.
+
+With ARG, move by that many elements."
+  (interactive "p")
+  (company-select-next (if arg (- arg) -1)))
+
+(defun company-select-next-or-abort (&optional arg)
+  "Select the next candidate if more than one, else abort
+and invoke the normal binding.
+
+With ARG, move by that many elements."
+  (interactive "p")
+  (if (or (not company-selection)
+          (> company-candidates-length 1))
+      (company-select-next arg)
+    (company-abort)
+    (company--unread-this-command-keys)))
+
+(defun company-select-previous-or-abort (&optional arg)
+  "Select the previous candidate if more than one, else abort
+and invoke the normal binding.
+
+With ARG, move by that many elements."
+  (interactive "p")
+  (if (> company-candidates-length 1)
+      (company-select-previous arg)
+    (company-abort)
+    (company--unread-this-command-keys)))
+
+(defun company-select-first ()
+  "Select the first completion candidate."
+  (interactive)
+  (company-set-selection 0))
+
+(defun company-select-last ()
+  "Select the last completion candidate."
+  (interactive)
+  (company-set-selection (1- company-candidates-length)))
+
+(defun company-next-page ()
+  "Select the candidate one page further."
+  (interactive)
+  (when (company-manual-begin)
+    (if (and company-selection-wrap-around
+             (= company-selection (1- company-candidates-length)))
+        (company-set-selection 0)
+      (let (company-selection-wrap-around)
+        (company-set-selection (+ company-selection
+                                  company-tooltip-limit))))))
+
+(defun company-previous-page ()
+  "Select the candidate one page earlier."
+  (interactive)
+  (when (company-manual-begin)
+    (if (and company-selection-wrap-around
+             (zerop company-selection))
+        (company-set-selection (1- company-candidates-length))
+      (let (company-selection-wrap-around)
+        (company-set-selection (- company-selection
+                                  company-tooltip-limit))))))
+
+(defun company--event-col-row (event)
+  (company--posn-col-row (event-start event)))
+
+(defvar company-mouse-event nil
+  "Holds the mouse event from `company-select-mouse'.
+For use in the `select-mouse' frontend action.  `let'-bound.")
+
+(defun company-select-mouse (event)
+  "Select the candidate picked by the mouse."
+  (interactive "e")
+  (or (let ((company-mouse-event event))
+        (cl-some #'identity (company-call-frontends 'select-mouse)))
+      (progn
+        (company-abort)
+        (company--unread-this-command-keys)
+        nil)))
+
+(defun company-complete-mouse (event)
+  "Insert the candidate picked by the mouse."
+  (interactive "e")
+  (when (company-select-mouse event)
+    (company-complete-selection)))
+
+(defun company-complete-selection ()
+  "Insert the selected candidate.
+
+Restart completion if a new field is entered. A field is indicated by
+`adjust-boundaries' as implemented in the backend. If both adjusted prefix
+and adjusted suffix are empty strings, that means a new field."
+  (interactive)
+  (when (and (company-manual-begin) company-selection)
+    (let ((result (nth company-selection company-candidates)))
+      (company-finish result))))
+
+(defun company--expand-common (prefix suffix)
+  (let ((expansion (company-call-backend 'expand-common prefix suffix)))
+    (unless expansion
+      ;; Backend doesn't implement this, try emulating.
+      (let* (;; XXX: We could also filter/group `company-candidates'.
+             (candidates (company-call-backend 'candidates prefix suffix))
+             ;; Assuming that boundaries don't vary between completions here.
+             ;; If they do, the backend should have a custom `expand-common'.
+             (boundaries-prefix (car (company--boundaries)))
+             (completion-ignore-case (company-call-backend 'ignore-case))
+             (trycmp (try-completion boundaries-prefix candidates))
+             (common (if (eq trycmp t) (car candidates) trycmp))
+             (max-len (when (and common
+                                 (cl-every (lambda (s) (string-suffix-p
+                                                   suffix s
+                                                   completion-ignore-case))
+                                           candidates))
+                        (-
+                         (apply #'min
+                                (mapcar #'length candidates))
+                         (length suffix))))
+             (common (if max-len
+                         (substring common 0
+                                    (min max-len (length common)))
+                       common)))
+        (setq expansion
+              (cond
+               ((null candidates)
+                'no-match)
+               ((string-prefix-p boundaries-prefix common t)
+                (cons (concat
+                       (substring prefix
+                                  0
+                                  (- (length prefix)
+                                     (length boundaries-prefix)))
+                       common)
+                      suffix))
+               (t (cons prefix suffix))))))
+    expansion))
+
+(defun company-complete-common ()
+  "Insert the common part of all candidates."
+  (interactive)
+  (when (company-manual-begin)
+    (if (and (not (cdr company-candidates))
+             (equal company-common (car company-candidates)))
+        (company-complete-selection)
+      (let ((expansion (company--expand-common company-prefix
+                                               company-suffix)))
+        (when (eq expansion 'no-match)
+          (user-error "No matches for the current input"))
+        (unless (equal (car expansion) company-prefix)
+          (if (eq (company-call-backend 'ignore-case) 'keep-prefix)
+              (insert (substring (car expansion) (length company-prefix)))
+            (delete-region (- (point) (length company-prefix)) (point))
+            (insert (car expansion))))
+        (unless (equal (cdr expansion) company-suffix)
+          (save-excursion
+            (delete-region (point) (+ (point) (length company-suffix)))
+            (insert (cdr expansion))))))))
+
+(defun company-complete-common-or-cycle (&optional arg)
+  "Insert the common part of all candidates, or select the next one.
+
+With ARG, move by that many elements."
+  (interactive "p")
+  (when (company-manual-begin)
+    (let ((tick (buffer-chars-modified-tick)))
+      (call-interactively 'company-complete-common)
+      (when (eq tick (buffer-chars-modified-tick))
+        (let ((company-selection-wrap-around t)
+              (current-prefix-arg arg))
+          (call-interactively 'company-select-next))))))
+
+(defun company-cycle-backward (&optional arg)
+  (interactive "p")
+  (let ((company-selection-wrap-around t))
+    (company-select-previous arg)))
+
+(defun company-complete-common-or-show-delayed-tooltip ()
+  "Insert the common part of all candidates, or show a tooltip."
+  (interactive)
+  (when (company-manual-begin)
+    (let ((tick (buffer-chars-modified-tick)))
+      (call-interactively 'company-complete-common)
+      (when (eq tick (buffer-chars-modified-tick))
+          (let ((company-tooltip-idle-delay 0.0))
+            (company-complete)
+            (and company-candidates
+                 (company-call-frontends 'post-command)))))))
+
+(defun company-indent-or-complete-common (arg)
+  "Indent the current line or region, or complete the common part."
+  (interactive "P")
+  (cond
+   ((use-region-p)
+    (indent-region (region-beginning) (region-end)))
+   ((memq indent-line-function
+          '(indent-relative indent-relative-maybe))
+    (company-complete-common))
+   ((let ((old-point (point))
+          (old-tick (buffer-chars-modified-tick))
+          (tab-always-indent t))
+      (indent-for-tab-command arg)
+      (when (and (eq old-point (point))
+                 (eq old-tick (buffer-chars-modified-tick)))
+        (company-complete-common))))))
+
+(defun company-select-next-if-tooltip-visible-or-complete-selection ()
+  "Insert selection if appropriate, or select the next candidate.
+Insert selection if only preview is showing or only one candidate,
+otherwise select the next candidate."
+  (interactive)
+  (if (and (company-tooltip-visible-p) (> company-candidates-length 1))
+      (call-interactively 'company-select-next)
+    (call-interactively 'company-complete-selection)))
+
+;;;###autoload
+(defun company-complete ()
+  "Insert the common part of all candidates or the current selection.
+The first time this is called, the common part is inserted, the second
+time, or when the selection has been changed, the selected candidate is
+inserted."
+  (interactive)
+  (when (company-manual-begin)
+    (if (or company-selection-changed
+            (and (eq real-last-command 'company-complete)
+                 (eq last-command 'company-complete-common)))
+        (call-interactively 'company-complete-selection)
+      (call-interactively 'company-complete-common)
+      (when company-candidates
+        (setq this-command 'company-complete-common)))
+    this-command))
+
+(define-obsolete-function-alias
+  'company-complete-number
+  'company-complete-tooltip-row
+  "0.10.0")
+
+(defun company-complete-tooltip-row (number)
+  "Insert a candidate visible on the tooltip's row NUMBER.
+
+Inserts one of the first ten candidates,
+numbered according to the current scrolling position starting with 1.
+
+When called interactively, uses the last typed digit, stripping the
+modifiers and translating 0 into 10, so `M-1' inserts the first visible
+candidate, and `M-0' insert to 10th one.
+
+To show hint numbers beside the candidates, enable `company-show-quick-access'."
+  (interactive
+   (list (let* ((type (event-basic-type last-command-event))
+                (char (if (characterp type)
+                          ;; Number on the main row.
+                          type
+                        ;; Keypad number, if bound directly.
+                        (car (last (string-to-list (symbol-name type))))))
+                (number (- char ?0)))
+           (if (zerop number) 10 number))))
+  (company--complete-nth (1- number)))
+
+(defun company-complete-quick-access (row)
+  "Insert a candidate visible on a ROW matched by a quick-access key binding.
+See `company-quick-access-keys' for more details."
+  (interactive
+   (list (let* ((event-type (event-basic-type last-command-event))
+                (event-string (if (characterp event-type)
+                                  (string event-type)
+                                (error "Unexpected input"))))
+           (cl-position event-string company-quick-access-keys :test 'equal))))
+  (when row
+    (company--complete-nth row)))
+
+(defvar-local company-tooltip-offset 0
+  "Current scrolling state of the tooltip.
+Represented by the index of the first visible completion candidate
+from the candidates list.")
+
+(defun company--complete-nth (row)
+  "Insert a candidate visible on the tooltip's zero-based ROW."
+  (when (company-manual-begin)
+    (and (or (< row 0) (>= row (- company-candidates-length
+                                  company-tooltip-offset)))
+         (user-error "No candidate on the row number %d" row))
+    (company-finish (nth (+ row company-tooltip-offset)
+                         company-candidates))))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defconst company-space-strings-limit 100)
+
+(defconst company-space-strings
+  (let (lst)
+    (dotimes (i company-space-strings-limit)
+      (push (make-string (- company-space-strings-limit 1 i) ?\  ) lst))
+    (apply 'vector lst)))
+
+(defun company-space-string (len)
+  (if (< len company-space-strings-limit)
+      (aref company-space-strings len)
+    (make-string len ?\ )))
+
+;; XXX: This is really a hack, but one that we could really get rid of only by
+;; moving to the one-overlay-per-line scheme.
+(defmacro company--with-face-remappings (&rest body)
+  `(let ((fra-local (and (local-variable-p 'face-remapping-alist)
+                         face-remapping-alist))
+         (bdt-local (and (local-variable-p 'buffer-display-table)
+                         buffer-display-table))
+         (bufs (list (get-buffer-create " *string-pixel-width*")
+                     (get-buffer-create " *company-sps*"))))
+     (unwind-protect
+         (progn
+           (dolist (buf bufs)
+             (with-current-buffer buf
+               (when (bound-and-true-p display-line-numbers)
+                 ;; Workaround for debbugs#67248.
+                 (setq-local display-line-numbers nil))
+               (when fra-local
+                 (setq-local face-remapping-alist fra-local))
+               (when bdt-local
+                 (setq-local buffer-display-table bdt-local))))
+           ,@body)
+       (dolist (buf bufs)
+         (and (buffer-live-p buf)
+              (with-current-buffer buf
+                (kill-local-variable 'face-remapping-alist)
+                (kill-local-variable 'buffer-display-table)))))))
+
+(declare-function buffer-text-pixel-size "xdisp.c")
+
+(defun company--string-pixel-width (string)
+  (if (zerop (length string))
+      0
+    ;; Keeping a work buffer around is more efficient than creating a
+    ;; new temporary buffer.
+    (with-current-buffer (get-buffer-create " *string-pixel-width*")
+      ;; `display-line-numbers-mode' is enabled in internal buffers
+      ;; that breaks width calculation, so need to disable (bug#59311)
+      (when (bound-and-true-p display-line-numbers-mode)
+        (with-no-warnings ;; Emacs 25
+          (display-line-numbers-mode -1)))
+      (delete-region (point-min) (point-max))
+      (insert string)
+      (if (fboundp #'buffer-text-pixel-size)
+          ;; Emacs 29.1+
+          (car (buffer-text-pixel-size nil nil t))
+        (let ((wb (window-buffer))
+              (hscroll (window-hscroll))
+              (dedicated (window-dedicated-p))
+              buffer-list-update-hook)
+          (unwind-protect
+              (progn
+                (when dedicated
+                  (set-window-dedicated-p nil nil))
+                (set-window-buffer nil (current-buffer))
+                (car
+                 (window-text-pixel-size nil nil nil 55555)))
+            (set-window-buffer nil wb)
+            (set-window-hscroll nil hscroll)
+            (when dedicated
+              (set-window-dedicated-p nil dedicated))))))))
+
+(defun company--string-width (str)
+  (if (display-graphic-p)
+      (ceiling (/ (company--string-pixel-width str)
+                  (float (default-font-width))))
+    (string-width str)))
+
+;; TODO: Add more tests!
+(defun company-safe-pixel-substring (str from &optional to)
+  (let ((from-chars 0)
+        (to-chars 0)
+        spw-from spw-to
+        spw-to-prev
+        front back
+        (orig-buf (window-buffer))
+        (bis buffer-invisibility-spec)
+        (inhibit-read-only t)
+        (inhibit-modification-hooks t)
+        (dedicated (window-dedicated-p))
+        (hscroll (window-hscroll))
+        window-configuration-change-hook
+        buffer-list-update-hook)
+    (with-current-buffer (get-buffer-create " *company-sps*")
+      (unwind-protect
+          (progn
+            (delete-region (point-min) (point-max))
+            (insert str)
+            (setq-local buffer-invisibility-spec bis)
+            (when dedicated (set-window-dedicated-p nil nil))
+            (set-window-buffer nil (current-buffer) t)
+
+            (vertical-motion (cons (/ from (frame-char-width)) 0))
+            (setq from-chars (point))
+            (setq spw-from
+                  (if (bobp) 0
+                    (car (window-text-pixel-size nil (point-min) (point) 55555))))
+            (while (and (< spw-from from)
+                        (not (eolp)))
+              (forward-char 1)
+              (setq spw-from
+                    (car (window-text-pixel-size nil (point-min) (point) 55555)))
+              (setq from-chars (point)))
+
+            (if (= from-chars (point-max))
+                (if (and to (> to from))
+                    (propertize " " 'display `(space . (:width (,(- to from)))))
+                  "")
+              (if (not to)
+                  (setq to-chars (point-max))
+                (vertical-motion (cons (/ to (frame-char-width)) 0))
+                (setq to-chars (point))
+                (setq spw-to
+                      (if (bobp) 0
+                        (car (window-text-pixel-size nil (point-min) (point) 55555))))
+                (while (and (< spw-to to)
+                            (not (eolp)))
+                  (setq spw-to-prev spw-to)
+                  (forward-char 1)
+                  (setq spw-to
+                        (car (window-text-pixel-size nil (point-min) (point) 55555)))
+                  (when (<= spw-to to)
+                    (setq to-chars (point)))))
+
+              (unless spw-to-prev (setq spw-to-prev spw-to))
+
+              (when (> spw-from from)
+                (setq front (propertize " " 'display
+                                        `(space . (:width (,(- spw-from from)))))))
+              (when (and to (/= spw-to to))
+                (setq back (propertize
+                            " " 'display
+                            `(space . (:width (,(- to
+                                                   (if (< spw-to to)
+                                                       spw-to
+                                                     spw-to-prev))))))))
+              (concat front (buffer-substring from-chars to-chars) back)))
+        (set-window-buffer nil orig-buf t)
+        (set-window-hscroll nil hscroll)
+        (when dedicated
+          (set-window-dedicated-p nil dedicated))))))
+
+(defun company-safe-substring (str from &optional to)
+  (let ((ll (length str)))
+    (if (> from ll)
+        ""
+      (if to
+          (concat (substring str from (min to ll))
+                  (company-space-string (max 0 (- to ll))))
+        (substring str from)))))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defvar-local company-last-metadata nil)
+
+(defun company-fetch-metadata ()
+  (let ((selected (nth (or company-selection 0) company-candidates)))
+    (unless (eq selected (car company-last-metadata))
+      (setq company-last-metadata
+            (cons selected (company-call-backend 'meta selected))))
+    (cdr company-last-metadata)))
+
+(defun company-doc-buffer (&optional string)
+  (with-current-buffer (get-buffer-create "*company-documentation*")
+    (erase-buffer)
+    (fundamental-mode)
+    (when string
+      (save-excursion
+        (insert string)
+        (visual-line-mode)))
+    (current-buffer)))
+
+(defvar company--electric-saved-window-configuration nil)
+
+(defvar company--electric-commands
+  '(scroll-other-window scroll-other-window-down mwheel-scroll)
+  "List of Commands that won't break out of electric commands.")
+
+(defun company--electric-command-p ()
+  (memq this-command company--electric-commands))
+
+(defun company--electric-restore-window-configuration ()
+  "Restore window configuration (after electric commands)."
+  (when (and company--electric-saved-window-configuration
+             (not (company--electric-command-p)))
+    (set-window-configuration company--electric-saved-window-configuration)
+    (setq company--electric-saved-window-configuration nil)))
+
+(defmacro company--electric-do (&rest body)
+  (declare (indent 0) (debug t))
+  `(when company-candidates
+     (cl-assert (null company--electric-saved-window-configuration))
+     (setq company--electric-saved-window-configuration (current-window-configuration))
+     (let ((height (window-height))
+           (row (company--row)))
+       ,@body
+       (and (< (window-height) height)
+            (< (- (window-height) row 2) company-tooltip-limit)
+            (recenter (- (window-height) row 2))))))
+
+(defun company--unread-this-command-keys ()
+  (when (> (length (this-command-keys)) 0)
+    (setq unread-command-events (nconc
+                                 (listify-key-sequence (this-command-keys))
+                                 unread-command-events))
+    (clear-this-command-keys t)))
+
+(defun company--show-doc-buffer ()
+  "Show the documentation buffer for the selection."
+  (let ((other-window-scroll-buffer)
+        (selection (or company-selection 0)))
+      (let* ((selected (nth selection company-candidates))
+             (doc-buffer (or (company-call-backend 'doc-buffer selected)
+                             (user-error "No documentation available")))
+             start)
+        (when (consp doc-buffer)
+          (setq start (cdr doc-buffer)
+                doc-buffer (car doc-buffer)))
+        (setq other-window-scroll-buffer (get-buffer doc-buffer))
+        (let ((win (display-buffer doc-buffer t)))
+          (set-window-start win (if start start (point-min)))))))
+
+(defun company--fake-capf-complete-common (&rest _)
+  (company-complete-common)
+  (list (point) (point) nil))
+
+(defun company-indent-for-tab-command (&optional arg)
+  "Like `indent-for-tab-command' which see but calls `company-complete-common'
+instead of `completion-at-point' as the fallback.  That only happens when
+`tab-always-indent' is `complete', and only when reindentation was a no-op."
+  (interactive)
+  (unwind-protect
+      (progn
+        (add-hook 'completion-at-point-functions
+                  #'company--fake-capf-complete-common
+                  nil t)
+        (funcall-interactively #'indent-for-tab-command arg))
+    (remove-hook 'completion-at-point-functions
+                 #'company--fake-capf-complete-common
+                 t)))
+
+(defun company-show-doc-buffer (&optional toggle-auto-update)
+  "Show the documentation buffer for the selection.
+With a prefix argument TOGGLE-AUTO-UPDATE, toggle the value of
+`company-auto-update-doc'.  When `company-auto-update-doc' is non-nil,
+automatically show the documentation buffer for each selection."
+  (interactive "P")
+  (when toggle-auto-update
+    (setq company-auto-update-doc (not company-auto-update-doc)))
+  (company--electric-do
+    (company--show-doc-buffer)))
+(put 'company-show-doc-buffer 'company-keep t)
+
+(defun company--show-doc-buffer-and-warn (&optional toggle-auto-update)
+  (interactive "P")
+  (company--warn-changed-binding)
+  (company-show-doc-buffer toggle-auto-update))
+(put 'company--show-doc-buffer-and-warn 'company-keep t)
+
+(defun company-show-location ()
+  "Temporarily display a buffer showing the selected candidate in context."
+  (interactive)
+  (let (other-window-scroll-buffer)
+    (company--electric-do
+      (let* ((selected (nth company-selection company-candidates))
+             (location (company-call-backend 'location selected))
+             (pos (or (cdr location) (user-error "No location available")))
+             (buffer (or (and (bufferp (car location)) (car location))
+                         (find-file-noselect (car location) t))))
+        (setq other-window-scroll-buffer (get-buffer buffer))
+        (with-selected-window (display-buffer buffer t)
+          (save-restriction
+            (widen)
+            (if (bufferp (car location))
+                (goto-char pos)
+              (goto-char (point-min))
+              (forward-line (1- pos))))
+          (set-window-start nil (point)))))))
+(put 'company-show-location 'company-keep t)
+
+(defun company--show-location-and-warn ()
+  (interactive)
+  (company--warn-changed-binding)
+  (company-show-location))
+(put 'company--show-location-and-warn 'company-keep t)
+
+;;; package functions ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defvar-local company-callback nil)
+
+(defun company-remove-callback (&optional _ignored)
+  (remove-hook 'company-completion-finished-hook company-callback t)
+  (remove-hook 'company-completion-cancelled-hook 'company-remove-callback t)
+  (remove-hook 'company-completion-finished-hook 'company-remove-callback t))
+
+(defun company-begin-backend (backend &optional callback)
+  "Start a completion at point using BACKEND."
+  (interactive (let ((val (completing-read "Company backend: "
+                                           obarray
+                                           'functionp nil "company-")))
+                 (when val
+                   (list (intern val)))))
+  (when (setq company-callback callback)
+    (add-hook 'company-completion-finished-hook company-callback nil t))
+  (add-hook 'company-completion-cancelled-hook 'company-remove-callback nil t)
+  (add-hook 'company-completion-finished-hook 'company-remove-callback nil t)
+  (setq company-backend backend)
+  ;; Return non-nil if active.
+  (or (company-manual-begin)
+      (user-error "Cannot complete at point")))
+
+(defun company-begin-with (candidates
+                           &optional prefix-length require-match callback)
+  "Start a completion at point.
+CANDIDATES is the list of candidates to use and PREFIX-LENGTH is the length
+of the prefix that already is in the buffer before point.
+It defaults to 0.
+
+CALLBACK is a function called with the selected result if the user
+successfully completes the input.
+
+Example: \(company-begin-with \\='\(\"foo\" \"foobar\" \"foobarbaz\"\)\)"
+  (let ((begin-marker (copy-marker (point) t)))
+    (company-begin-backend
+     (lambda (command &optional arg &rest _ignored)
+       (pcase command
+         (`prefix
+          (when (equal (point) (marker-position begin-marker))
+            (buffer-substring (- (point) (or prefix-length 0)) (point))))
+         (`candidates
+          (all-completions arg candidates))
+         (`require-match
+          require-match)))
+     callback)))
+
+(declare-function find-library-name "find-func")
+(declare-function lm-version "lisp-mnt")
+(declare-function lm-header "lisp-mnt")
+
+(defun company-version (&optional show-version)
+  "Get the Company version as string.
+
+If SHOW-VERSION is non-nil, show the version in the echo area."
+  (interactive (list t))
+  (with-temp-buffer
+    (require 'find-func)
+    (insert-file-contents (find-library-name "company"))
+    (require 'lisp-mnt)
+    ;; `lm-package-version' was added in 2025.
+    (let ((version (or (or (lm-header "package-version")
+                           (lm-version)))))
+      (if show-version
+          (message "Company version: %s" version)
+        version))))
+
+(defun company-diag ()
+  "Pop a buffer with information about completions at point."
+  (interactive)
+  (let* ((bb company-backends)
+         (mode (symbol-name major-mode))
+         backend
+         (prefix (cl-loop for b in bb
+                          thereis (let ((company-backend b))
+                                    (setq backend b)
+                                    (company-call-backend 'prefix))))
+         (c-a-p-f completion-at-point-functions)
+         cc annotations
+         current-capf)
+    (when (or (stringp prefix) (consp prefix))
+      (let ((company-backend backend))
+        (condition-case nil
+            (setq cc (company-call-backend 'candidates
+                                           (company--prefix-str prefix)
+                                           (company--suffix-str prefix))
+                  annotations
+                  (mapcar
+                   (lambda (c) (cons c (company-call-backend 'annotation c)))
+                   cc)
+                  current-capf (car (bound-and-true-p
+                                     company-capf--current-completion-data)))
+          (error (setq annotations 'error)))))
+    (pop-to-buffer (get-buffer-create "*company-diag*"))
+    (setq buffer-read-only nil)
+    (erase-buffer)
+    (insert (format "Emacs %s (%s) of %s on %s"
+                    emacs-version system-configuration
+                    (format-time-string "%Y-%m-%d" emacs-build-time)
+                    emacs-build-system))
+    (insert "\nCompany " (company-version) "\n\n")
+    (insert "company-backends: " (pp-to-string bb))
+    (insert "\n")
+    (insert "Used backend: " (pp-to-string backend))
+    (insert "\n")
+    (when (if (listp backend)
+              (memq 'company-capf backend)
+            (eq backend 'company-capf))
+      (insert "Value of c-a-p-f: "
+              (pp-to-string c-a-p-f))
+      (when current-capf
+        (insert "Current c-a-p-f: " (pp-to-string current-capf))))
+    (insert "Major mode: " mode)
+    (insert "\n")
+    (insert "Prefix: " (pp-to-string prefix))
+    (insert "\n")
+    (insert "Completions:")
+    (unless cc (insert " none"))
+    (if (eq annotations 'error)
+        (insert "(error fetching)")
+      (save-excursion
+        (dolist (c annotations)
+          (insert "\n  " (prin1-to-string (car c)))
+          (when (cdr c)
+            (insert " " (prin1-to-string (cdr c)))))))
+    (special-mode)))
+
+;;; pseudo-tooltip ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defvar-local company--tooltip-current-width 0)
+
+(defun company-tooltip--lines-update-offset (selection num-lines limit)
+  (cl-decf limit 2)
+  (setq company-tooltip-offset
+        (max (min selection company-tooltip-offset)
+             (- selection -1 limit)))
+
+  (when (<= company-tooltip-offset 1)
+    (cl-incf limit)
+    (setq company-tooltip-offset 0))
+
+  (when (>= company-tooltip-offset (- num-lines limit 1))
+    (cl-incf limit)
+    (when (= selection (1- num-lines))
+      (cl-decf company-tooltip-offset)
+      (when (<= company-tooltip-offset 1)
+        (setq company-tooltip-offset 0)
+        (cl-incf limit))))
+
+  limit)
+
+(defun company-tooltip--simple-update-offset (selection _num-lines limit)
+  (setq company-tooltip-offset
+        (if (< selection company-tooltip-offset)
+            selection
+          (max company-tooltip-offset
+               (- selection limit -1)))))
+
+;;; propertize
+
+(defun company-round-tab (arg)
+  (* (/ (+ arg tab-width) tab-width) tab-width))
+
+(defun company-plainify (str)
+  (let ((prefix (get-text-property 0 'line-prefix str)))
+    (when (stringp prefix) ; Keep the original value unmodified, for no special reason.
+      (setq str (concat prefix str))
+      (remove-text-properties 0 (length str) '(line-prefix) str)))
+  (let* ((pieces (split-string str "\t"))
+         (copy pieces))
+    (while (cdr copy)
+      (setcar copy (company-safe-substring
+                    (car copy) 0 (company-round-tab (string-width (car copy)))))
+      (pop copy))
+    (apply 'concat pieces)))
+
+(defun company--common-or-matches (value &optional suffix)
+  (let ((matches (company-call-backend 'match value)))
+    (when (integerp matches)
+      (setq matches `((0 . ,matches))))
+    (or matches
+        (and company-common `((0 . ,(length company-common))
+                              ,@(list
+                                 (cons
+                                  (- (length value)
+                                     (length (or suffix
+                                                 (cdr (company--boundaries value)))))
+                                  (length value)))))
+        nil)))
+
+(defun company-fill-propertize (value annotation width selected left right)
+  (let* ((margin (length left))
+         (common (company--common-or-matches value))
+         (_ (setq value
+                  (company--clean-string
+                   (company-reformat (company--pre-render value)))
+                  annotation (and annotation
+                                  (company--clean-string
+                                   (company--pre-render annotation t)))))
+         (ann-ralign company-tooltip-align-annotations)
+         (ann-padding (or company-tooltip-annotation-padding 0))
+         (ann-truncate (< width
+                          (+ (length value) (length annotation)
+                             ann-padding)))
+         (ann-start (+ margin
+                       (if ann-ralign
+                           (if ann-truncate
+                               (+ (length value) ann-padding)
+                             (- width (length annotation)))
+                         (+ (length value) ann-padding))))
+         (ann-end (min (+ ann-start (length annotation)) (+ margin width)))
+         (line (concat left
+                       (if (or ann-truncate (not ann-ralign))
+                           (company-safe-substring
+                            (concat value
+                                    (when annotation
+                                      (company-space-string ann-padding))
+                                    annotation)
+                            0 width)
+                         (concat
+                          (company-safe-substring value 0
+                                                  (- width (length annotation)))
+                          annotation))
+                       right)))
+    (setq width (+ width margin (length right)))
+
+    (font-lock-append-text-property 0 width 'mouse-face
+                                    'company-tooltip-mouse
+                                    line)
+    (when (< ann-start ann-end)
+      (add-face-text-property ann-start ann-end
+                              (if selected
+                                  'company-tooltip-annotation-selection
+                                'company-tooltip-annotation)
+                              t line))
+    (cl-loop
+     with width = (- width (length right))
+     for (comp-beg . comp-end) in common
+     for inline-beg = (+ margin comp-beg)
+     for inline-end = (min (+ margin comp-end) width)
+     when (< inline-beg width)
+     do (add-face-text-property inline-beg inline-end
+                                (if selected
+                                    'company-tooltip-common-selection
+                                  'company-tooltip-common)
+                                nil line))
+    (when (let ((re (funcall company-search-regexp-function
+                             company-search-string)))
+            (and (not (string-empty-p re))
+                 (string-match re value)))
+      (pcase-dolist (`(,mbeg . ,mend) (company--search-chunks))
+        (let ((beg (+ margin mbeg))
+              (end (+ margin mend))
+              (width (- width (length right))))
+          (when (< beg width)
+            (add-face-text-property beg (min end width)
+                                    (if selected
+                                        'company-tooltip-search-selection
+                                      'company-tooltip-search)
+                                    nil line)))))
+    (when selected
+      (add-face-text-property 0 width 'company-tooltip-selection t line))
+
+    (when (company-call-backend 'deprecated value)
+      (add-face-text-property margin
+                              (min
+                               (+ margin (length value))
+                               (- width (length right)))
+                              'company-tooltip-deprecated t line))
+
+    (add-face-text-property 0 width 'company-tooltip t line)
+    line))
+
+(defun company--search-chunks ()
+  (let ((md (match-data t))
+        res)
+    (if (<= (length md) 2)
+        (push (cons (nth 0 md) (nth 1 md)) res)
+      (while (setq md (nthcdr 2 md))
+        (when (car md)
+          (push (cons (car md) (cadr md)) res))))
+    res))
+
+(defun company--pre-render (str &optional annotation-p)
+  (or (company-call-backend 'pre-render str annotation-p)
+      (progn
+        (when (or (text-property-not-all 0 (length str) 'face nil str)
+                  (text-property-not-all 0 (length str) 'mouse-face nil str))
+          (setq str (copy-sequence str))
+          (remove-text-properties 0 (length str)
+                                  '(face nil font-lock-face nil mouse-face nil)
+                                  str))
+        str)))
+
+(defun company--clean-string (str)
+  (let* ((add-pixels 0)
+         (add-length 0)
+         (new-str
+          (replace-regexp-in-string
+           "\\([^[:graph:] ]\\)\\|\\(\ufeff\\)\\|[[:multibyte:]]+"
+           (lambda (match)
+             (cond
+              ((match-beginning 1)
+               ;; FIXME: Better char for 'non-printable'?
+               ;; We shouldn't get any of these, but sometimes we might.
+               ;; The official "replacement character" is not supported by some fonts.
+               ;;"\ufffd"
+               (if (equal match "\n")
+                   (propertize "\\\\n" 'face 'font-lock-escape-face)
+                 "?")
+               )
+              ((match-beginning 2)
+               ;; Zero-width non-breakable space.
+               "")
+              (t
+               ;; FIXME: Maybe move that counting later to a non-replacement loop.
+               (let ((msw (company--string-width match)))
+                 (cl-incf add-pixels
+                          (- (* (default-font-width)
+                                msw)
+                             (company--string-pixel-width match)))
+                 (cl-incf add-length (- msw (length match)))
+                 match
+                 ))
+              ))
+           str)))
+    (if (>= 0 add-length)
+        new-str
+      (concat new-str
+              (propertize
+               (make-string add-length ?\ufeff)
+               'display `(space . (:width (,add-pixels))))))))
+
+;;; replace
+
+(defun company-buffer-lines (beg end)
+  (goto-char beg)
+  (let (lines lines-moved)
+    (while (and (not (eobp))            ; http://debbugs.gnu.org/19553
+                (> (setq lines-moved (vertical-motion 1)) 0)
+                (<= (point) end))
+      (let ((bound (min end (point))))
+        ;; A visual line can contain several physical lines (e.g. with outline's
+        ;; folding overlay).  Take only the first one.
+        (push (buffer-substring beg
+                                (save-excursion
+                                  (goto-char beg)
+                                  (re-search-forward "$" bound 'move)
+                                  (point)))
+              lines))
+      ;; One physical line can be displayed as several visual ones as well:
+      ;; add empty strings to the list, to even the count.
+      (dotimes (_ (1- lines-moved))
+        (push "" lines))
+      (setq beg (point)))
+    (unless (eq beg end)
+      (push (buffer-substring beg end) lines))
+    (nreverse lines)))
+
+(defun company-modify-line (old new offset)
+  (if (not new)
+      ;; Avoid modifying OLD, e.g. to avoid "blinking" with half-spaces for
+      ;; double-width (or usually fractional) characters.
+      old
+    (concat (company-safe-pixel-substring old 0 offset)
+            new
+            (company-safe-pixel-substring old (+ offset (company--string-pixel-width new))))))
+
+(defun company--show-numbers (numbered)
+  (format " %s" (if (<= numbered 10)
+                    (mod numbered 10)
+                  " ")))
+(make-obsolete
+ 'company--show-numbers
+ "use `company-quick-access-hint-key' instead,
+but adjust the expected values appropriately."
+ "0.10.0")
+
+(defsubst company--window-height ()
+  (if (fboundp 'window-screen-lines)
+      (floor (window-screen-lines))
+    (window-body-height)))
+
+(defun company--window-width (&optional pixelwise)
+  (let ((ww (window-body-width nil pixelwise)))
+    ;; Account for the line continuation column.
+    (when (zerop (cadr (window-fringes)))
+      (cl-decf ww (if pixelwise (company--string-pixel-width ">") 1)))
+    (when (bound-and-true-p display-line-numbers)
+      (cl-decf ww
+               (if pixelwise
+                   (line-number-display-width t)
+                 (+ 2 (line-number-display-width)))))
+    ;; whitespace-mode with newline-mark
+    (when (and buffer-display-table
+               (aref buffer-display-table ?\n))
+      (cl-decf ww
+               (if pixelwise
+                   (company--string-pixel-width "\n")
+                 (1- (length (aref buffer-display-table ?\n))))))
+    ww))
+
+(defun company--face-attribute (face attr)
+  ;; Like `face-attribute', but accounts for faces that have been remapped to
+  ;; another face, a list of faces, or a face spec.
+  (cond ((null face) nil)
+        ((symbolp face)
+         (let ((remap (cdr (assq face face-remapping-alist))))
+           (if remap
+               (company--face-attribute
+                ;; Faces can be remapped to their unremapped selves, but that
+                ;; would cause us infinite recursion.
+                (if (listp remap) (remq face remap) remap)
+                attr)
+             (face-attribute face attr nil t))))
+        ((keywordp (car-safe face))
+         (or (plist-get face attr)
+             (company--face-attribute (plist-get face :inherit) attr)))
+        ((listp face)
+         (cl-find-if #'stringp
+                     (mapcar (lambda (f) (company--face-attribute f attr))
+                             face)))))
+
+(defun company--replacement-string (lines column-offset old column nl &optional align-top)
+  (cl-decf column column-offset)
+
+  (when (< column 0) (setq column 0))
+
+  (when (and align-top company-tooltip-flip-when-above)
+    (setq lines (reverse lines)))
+
+  (let* ((px-width (company--string-pixel-width (car lines)))
+         ;; The (display (space :width (..))) spec is only applied to the
+         ;; visible part of the buffer (past hscroll), so subtracting
+         ;; window-scroll here is a good idea.  But then we also need to slice
+         ;; the "old" strings so the hidden contents don't get shown.
+         ;; XXX: `auto-hscroll-mode' set to `current-line' is not supported.
+         (px-col (* (- column (window-hscroll)) (default-font-width)))
+         (remaining-px (- (company--window-width t) px-col))
+         (hscroll-space (when (> (window-hscroll) 0)
+                          (company-space-string (window-hscroll))))
+         new)
+    (when (> px-width remaining-px)
+      (cl-decf px-col (- px-width remaining-px)))
+    (when hscroll-space
+      (setq old (mapcar (lambda (s) (company-safe-substring s (window-hscroll)))
+                        old)))
+    (when align-top
+      ;; untouched lines first
+      (dotimes (_ (- (length old) (length lines)))
+        (push (pop old) new)))
+    ;; length into old lines.
+    (while old
+      (push (company-modify-line (pop old) (pop lines) px-col)
+            new))
+    ;; Append whole new lines.
+    (while lines
+      (push (concat (company-safe-pixel-substring "" 0 px-col) (pop lines))
+            new))
+
+    ;; XXX: Also see branch 'more-precise-extend'.
+    (let* ((nl-face `(,@(when (version<= "27" emacs-version)
+                          '(:extend t))
+                     :inverse-video nil
+                     :background ,(or (company--face-attribute 'default :background)
+                                     (face-attribute 'default :background nil t))))
+           (str (apply #'concat
+                       (when nl " \n")
+                       (cl-mapcan
+                        ;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=42552#23
+                        (lambda (line) (list hscroll-space line (propertize "\n" 'face nl-face)))
+                        (nreverse new)))))
+      ;; https://debbugs.gnu.org/38563
+      (add-face-text-property 0 (length str) 'default t str)
+      (when nl (put-text-property 0 1 'cursor t str))
+      str)))
+
+(defun company--create-lines (selection limit)
+  (let ((len company-candidates-length)
+        (window-width (company--window-width))
+        (company-tooltip-annotation-padding
+         (or company-tooltip-annotation-padding
+             (if company-tooltip-align-annotations 1 0)))
+        left-margins
+        left-margin-size
+        right-margin
+        lines
+        width
+        lines-copy
+        items
+        previous
+        remainder
+        scrollbar-bounds)
+    (when company-search-mode
+      (cl-decf limit))
+
+    ;; Maybe clear old offset.
+    (when (< len (+ company-tooltip-offset limit))
+      (setq company-tooltip-offset 0))
+
+    (let ((selection (or selection 0)))
+      ;; Scroll to offset.
+      (if (eq company-tooltip-offset-display 'lines)
+          (setq limit (company-tooltip--lines-update-offset selection len limit))
+        (company-tooltip--simple-update-offset selection len limit))
+
+      (cond
+       ((eq company-tooltip-offset-display 'scrollbar)
+        (setq scrollbar-bounds (company--scrollbar-bounds company-tooltip-offset
+                                                          limit len)))
+       ((eq company-tooltip-offset-display 'lines)
+        (when (> company-tooltip-offset 0)
+          (setq previous (format "...(%d)" company-tooltip-offset)))
+        (setq remainder (- len limit company-tooltip-offset)
+              remainder (when (> remainder 0)
+                          (setq remainder (format "...(%d)" remainder)))))))
+
+    (when selection
+      (cl-decf selection company-tooltip-offset))
+
+    (setq width (max (length previous) (length remainder))
+          lines (nthcdr company-tooltip-offset company-candidates)
+          right-margin (company--right-margin limit len)
+          len (min limit len)
+          lines-copy lines)
+
+    (when scrollbar-bounds (cl-decf window-width))
+
+    (when company-format-margin-function
+      (let ((lines-copy lines-copy)
+            res)
+        (dotimes (i len)
+          (push (funcall company-format-margin-function
+                         (pop lines-copy)
+                         (equal selection i))
+                res))
+        (setq left-margins (nreverse res))))
+
+    ;; XXX: format-function outputting shorter strings than the
+    ;; default margin is not supported (yet?).
+    (setq left-margin-size (apply #'max company-tooltip-margin
+                                  (mapcar #'length left-margins)))
+
+    (cl-decf window-width company-tooltip-margin)
+    (cl-decf window-width left-margin-size)
+
+    (dotimes (_ len)
+      (let* ((value (pop lines-copy))
+             (annotation (company-call-backend 'annotation value))
+             (left (or (pop left-margins)
+                       (company-space-string left-margin-size))))
+        (when annotation
+          (when company-tooltip-align-annotations
+            ;; `lisp-completion-at-point' adds a space.
+            (setq annotation (string-trim-left annotation))))
+        (push (list value annotation left) items)
+        (setq width (max (+ (company--string-width value)
+                            (if annotation
+                                (+ (company--string-width annotation)
+                                   company-tooltip-annotation-padding)
+                              0))
+                         width))))
+
+    (setq width (min window-width
+                     company-tooltip-maximum-width
+                     (max company-tooltip-minimum-width
+                          (if company-show-quick-access
+                              (+ 2 width)
+                            width))))
+
+    (when company-tooltip-width-grow-only
+      (setq width (max
+                   (min
+                    (if (numberp company-tooltip-width-grow-only)
+                        company-tooltip-width-grow-only
+                      most-positive-fixnum)
+                    company--tooltip-current-width)
+                   width))
+      (setq company--tooltip-current-width width))
+
+    (let ((items (nreverse items))
+          (row (if company-show-quick-access 0 99999))
+          new)
+      (when previous
+        (push (company--scrollpos-line previous width left-margin-size) new))
+
+      (dotimes (i len)
+        (let* ((item (pop items))
+               (str (car item))
+               (annotation (cadr item))
+               (left (nth 2 item))
+               (right right-margin)
+               (width width)
+               (selected (equal selection i)))
+          (when company-show-quick-access
+            (let ((quick-access (gv-ref (if (eq company-show-quick-access 'left)
+                                            left right)))
+                  (qa-hint (company-tooltip--format-quick-access-hint
+                            row selected)))
+              (cl-decf width (company--string-width qa-hint))
+              (setf (gv-deref quick-access)
+                    (concat qa-hint (gv-deref quick-access))))
+            (cl-incf row))
+          (push (concat
+                 (company-fill-propertize str annotation
+                                          width selected
+                                          left
+                                          right)
+                 (when scrollbar-bounds
+                   (company--scrollbar i scrollbar-bounds selected)))
+                new)))
+
+      (when remainder
+        (push (company--scrollpos-line remainder width left-margin-size) new))
+
+      (when company-search-mode
+        (push (company--search-line width right-margin)
+              new))
+
+      (cons
+       left-margin-size
+       (nreverse new)))))
+
+(defun company--scrollbar-bounds (offset limit length)
+  (when (> length limit)
+    (let* ((size (ceiling (* limit (float limit)) length))
+           (lower (floor (* limit (float offset)) length))
+           (upper (+ lower size -1)))
+      (cons lower upper))))
+
+(defun company--scrollbar (i bounds selected)
+  (let* ((scroll-width (ceiling (* (default-font-width)
+                                   company-tooltip-scrollbar-width))))
+    (propertize " "
+                'display `(space . (:width (,scroll-width)))
+                'face
+                (if (and (>= i (car bounds)) (<= i (cdr bounds)))
+                    'company-tooltip-scrollbar-thumb
+                  (if selected
+                      'company-tooltip-selection
+                    'company-tooltip)))))
+
+(defun company--right-margin (limit length)
+  (if (or (not (eq company-tooltip-offset-display 'scrollbar))
+          (not (display-graphic-p))
+          (= company-tooltip-scrollbar-width 1)
+          (<= length limit))
+      (company-space-string company-tooltip-margin)
+    (let* ((scroll-width (ceiling (* (default-font-width)
+                                     company-tooltip-scrollbar-width)))
+           (rest-width (- (* (default-font-width) company-tooltip-margin)
+                          scroll-width)))
+      (propertize
+       (company-space-string company-tooltip-margin)
+       'display `(space . (:width (,rest-width)))))))
+
+(defun company--scrollpos-line (text width fancy-margin-width)
+  (propertize (concat (company-space-string company-tooltip-margin)
+                      (company-safe-substring text 0 width)
+                      (company-space-string fancy-margin-width))
+              'face 'company-tooltip))
+
+(defun company-tooltip--format-quick-access-hint (row selected)
+  "Format a quick-access hint for outputting on a tooltip's ROW.
+Value of SELECTED determines the added face."
+  (propertize (format "%2s" (funcall company-quick-access-hint-function row))
+              'face
+              (if selected
+                  'company-tooltip-quick-access-selection
+                'company-tooltip-quick-access)))
+
+(defun company--search-line (width right-margin)
+  (let* ((company-backend (lambda (command &rest _)
+                            (and (eq command 'kind)
+                                 (if company-search-filtering
+                                     'filter
+                                   'search))))
+         (left (if company-format-margin-function
+                   (funcall company-format-margin-function "" nil)
+                 (concat
+                  (company-space-string company-tooltip-margin)
+                  (format "%s: " (company-call-backend 'kind)))))
+         (line (concat
+                company-search-string))
+         (width (+ (company--string-width left) width (length right-margin))))
+    (unless (display-graphic-p) (cl-incf width))
+    (setq line (company-safe-substring (concat left
+                                               (propertize
+                                                company-search-string
+                                                'face 'underline))
+                                       0 width))
+    (add-face-text-property 0 width 'company-tooltip nil line)
+    line))
+
+;; show
+
+(defvar-local company-pseudo-tooltip-overlay nil)
+
+(defun company--inside-tooltip-p (event-col-row row height)
+  (let* ((ovl company-pseudo-tooltip-overlay)
+         (column (overlay-get ovl 'company-column))
+         (width (overlay-get ovl 'company-width))
+         (evt-col (car event-col-row))
+         (evt-row (cdr event-col-row)))
+    (and (>= evt-col column)
+         (< evt-col (+ column width))
+         (if (> height 0)
+             (and (> evt-row row)
+                  (<= evt-row (+ row height) ))
+           (and (< evt-row row)
+                (>= evt-row (+ row height)))))))
+
+(defun company--pseudo-tooltip-height ()
+  "Calculate the appropriate tooltip height.
+Returns a negative number if the tooltip should be displayed above point."
+  (let* ((lines (company--row))
+         (below (- (company--window-height) 1 lines)))
+    (if (and (< below (min company-tooltip-minimum
+                           (if company-search-mode
+                               (1+ company-candidates-length)
+                             company-candidates-length)))
+             (> lines below))
+        (- (max 3 (min company-tooltip-limit lines)))
+      (max 3 (min company-tooltip-limit below)))))
+
+(defun company-pseudo-tooltip-show (row column selection)
+  (company-pseudo-tooltip-hide)
+
+    (let* ((height (company--pseudo-tooltip-height))
+           above)
+
+      (when (< height 0)
+        (setq row (+ row height -1)
+              above t))
+
+      ;; This can happen in Emacs versions which allow arbitrary scrolling,
+      ;; such as Yamamoto's Mac Port.
+      (unless (pos-visible-in-window-p (window-start))
+        (cl-decf row))
+
+      (let (nl beg end ov args)
+        (save-excursion
+          (setq nl (< (move-to-window-line row) row))
+          ;; HACK: Very specific to the log-edit buffer.  Could alternatively
+          ;; look up the `display-line-numbers-disable' property, but with
+          ;; larger consequences.
+          (when (and (not nl) (> height 0))
+            (while (eq (get-char-property (point) 'face)
+                       'log-edit-headers-separator)
+              (vertical-motion 1)))
+          (setq beg (point)
+                end (save-excursion
+                      (vertical-motion (abs height))
+                      (point))
+                ov (make-overlay beg end nil t t)
+                args (list (mapcar 'company-plainify
+                                   (company-buffer-lines beg end))
+                           column nl above)))
+
+        (setq company-pseudo-tooltip-overlay ov)
+        (overlay-put ov 'company-replacement-args args)
+
+        (let* ((lines-and-offset (company--create-lines selection (abs height)))
+               (lines (cdr lines-and-offset))
+               (column-offset (car lines-and-offset)))
+          (overlay-put ov 'company-display
+                       (apply 'company--replacement-string
+                              lines column-offset args))
+          (overlay-put ov 'company-width (company--string-width (car lines))))
+
+        (overlay-put ov 'company-column column)
+        (overlay-put ov 'company-height height))))
+
+(defun company-pseudo-tooltip-show-at-point (pos column-offset)
+  (let* ((col-row (company--col-row pos))
+         (col (- (car col-row) column-offset)))
+    (when (< col 0) (setq col 0))
+    (company--with-face-remappings
+     (company-pseudo-tooltip-show (1+ (cdr col-row)) col company-selection))))
+
+(defun company-pseudo-tooltip-edit (selection)
+  (let* ((height (overlay-get company-pseudo-tooltip-overlay 'company-height))
+         (lines-and-offset  (company--create-lines selection (abs height)))
+         (lines (cdr lines-and-offset))
+         (column-offset (car lines-and-offset)))
+    (overlay-put company-pseudo-tooltip-overlay 'company-width
+                 (company--string-width (car lines)))
+    (overlay-put company-pseudo-tooltip-overlay 'company-display
+                 (apply 'company--replacement-string
+                        lines column-offset
+                        (overlay-get company-pseudo-tooltip-overlay
+                                     'company-replacement-args)))))
+
+(defun company-pseudo-tooltip-hide ()
+  (when company-pseudo-tooltip-overlay
+    (delete-overlay company-pseudo-tooltip-overlay)
+    (setq company-pseudo-tooltip-overlay nil)))
+
+(defun company-pseudo-tooltip-hide-temporarily ()
+  (when (overlayp company-pseudo-tooltip-overlay)
+    (overlay-put company-pseudo-tooltip-overlay 'invisible nil)
+    (overlay-put company-pseudo-tooltip-overlay 'line-prefix nil)
+    (overlay-put company-pseudo-tooltip-overlay 'before-string nil)
+    (overlay-put company-pseudo-tooltip-overlay 'display nil)
+    (overlay-put company-pseudo-tooltip-overlay 'face nil)))
+
+(defun company-pseudo-tooltip-unhide ()
+  (when company-pseudo-tooltip-overlay
+    (let* ((ov company-pseudo-tooltip-overlay)
+           (disp (overlay-get ov 'company-display)))
+      ;; Beat outline's folding overlays.
+      ;; And Flymake (53). And Flycheck (110).
+      (overlay-put ov 'priority 111)
+      ;; visual-line-mode
+      (when (and (memq (char-before (overlay-start ov)) '(?\s ?\t))
+                 ;; not eob
+                 (not (nth 2 (overlay-get ov 'company-replacement-args))))
+        (setq disp (concat "\n" disp)))
+      ;; No (extra) prefix for the first line.
+      (overlay-put ov 'line-prefix "")
+      (overlay-put ov 'before-string disp)
+      ;; `display' is better than `invisible':
+      ;; https://debbugs.gnu.org/18285
+      ;; https://debbugs.gnu.org/20847
+      ;; https://debbugs.gnu.org/42521
+      (overlay-put ov 'display "")
+      (overlay-put ov 'window (selected-window)))))
+
+(defun company-pseudo-tooltip-guard (prefix)
+  (list
+   (- (point) (length prefix))
+   (save-excursion (beginning-of-visual-line))
+   (window-width)
+   (let ((ov company-pseudo-tooltip-overlay)
+         (overhang (save-excursion (end-of-visual-line)
+                                   (- (line-end-position) (point)))))
+     (when (>= (overlay-get ov 'company-height) 0)
+       (cons
+        (buffer-substring-no-properties (point) (overlay-start ov))
+        (when (>= overhang 0) overhang))))))
+
+(defun company-pseudo-tooltip-frontend (command)
+  "`company-mode' frontend similar to a tooltip but based on overlays."
+  (cl-case command
+    (pre-command (company-pseudo-tooltip-hide-temporarily))
+    (unhide
+     (let ((ov company-pseudo-tooltip-overlay))
+       (when (and ov (> (overlay-get ov 'company-height) 0))
+         ;; Sleight of hand: if the current line wraps, we adjust the
+         ;; start of the overlay so that the popup does not zig-zag,
+         ;; but don't update the popup's background.  This seems just
+         ;; non-annoying enough to avoid the work required for the latter.
+         (save-excursion
+           (vertical-motion 1)
+           (unless (= (point) (overlay-start ov))
+             (move-overlay ov (point) (overlay-end ov))))))
+     (company-pseudo-tooltip-unhide))
+    (post-command
+     (let ((prefix (car (company--boundaries)))
+           guard)
+       (unless (when (overlayp company-pseudo-tooltip-overlay)
+                 (let* ((ov company-pseudo-tooltip-overlay)
+                        (old-height (overlay-get ov 'company-height))
+                        (new-height (company--pseudo-tooltip-height)))
+                   (and
+                    (>= (* old-height new-height) 0)
+                    (>= (abs old-height) (abs new-height))
+                    (equal (setq guard (company-pseudo-tooltip-guard prefix))
+                           (overlay-get ov 'company-guard)))))
+         ;; Redraw needed.
+         (company-pseudo-tooltip-show-at-point (point)
+                                               (length prefix))
+         (overlay-put company-pseudo-tooltip-overlay
+                      'company-guard (or guard
+                                         (company-pseudo-tooltip-guard prefix)))))
+     (company-pseudo-tooltip-unhide))
+    (show (setq company--tooltip-current-width 0))
+    (hide (company-pseudo-tooltip-hide)
+          (setq company-tooltip-offset 0))
+    (update (when (overlayp company-pseudo-tooltip-overlay)
+              (company--with-face-remappings
+               (company-pseudo-tooltip-edit company-selection))))
+    (select-mouse
+     (let ((event-col-row (company--event-col-row company-mouse-event))
+           (ovl-row (company--row))
+           (ovl-height (and company-pseudo-tooltip-overlay
+                            (min (overlay-get company-pseudo-tooltip-overlay
+                                              'company-height)
+                                 company-candidates-length))))
+       (cond ((and ovl-height
+                   (company--inside-tooltip-p event-col-row ovl-row ovl-height))
+              (company-set-selection (+ (cdr event-col-row)
+                                        (1- company-tooltip-offset)
+                                        (if (and (eq company-tooltip-offset-display 'lines)
+                                                 (not (zerop company-tooltip-offset)))
+                                            -1 0)
+                                        (- ovl-row)
+                                        (if (< ovl-height 0)
+                                            (- 1 ovl-height)
+                                          0)))
+              t))))))
+
+(defun company-pseudo-tooltip-unless-just-one-frontend (command)
+  "`company-pseudo-tooltip-frontend', but not shown for single candidates."
+  (unless (and (memq command '(post-command unhide))
+               (company--show-inline-p))
+    (company-pseudo-tooltip-frontend command)))
+
+(defun company-pseudo-tooltip--ujofwd-on-timer (command)
+  (when company-candidates
+    (company-pseudo-tooltip-unless-just-one-frontend-with-delay command)))
+
+(defun company-pseudo-tooltip-unless-just-one-frontend-with-delay (command)
+  "`compandy-pseudo-tooltip-frontend', but shown after a delay.
+Delay is determined by `company-tooltip-idle-delay'."
+  (defvar company-preview-overlay)
+  (when (and (memq command '(pre-command hide))
+             company-tooltip-timer)
+    (cancel-timer company-tooltip-timer)
+    (setq company-tooltip-timer nil))
+  (cl-case command
+    (post-command
+     (if (or company-tooltip-timer
+             (overlayp company-pseudo-tooltip-overlay))
+         (if (not (overlayp company-preview-overlay))
+             (company-pseudo-tooltip-unless-just-one-frontend command)
+           (let (company-tooltip-timer)
+             (company-call-frontends 'pre-command))
+           (company-call-frontends 'post-command))
+       (setq company-tooltip-timer
+             (run-with-timer company-tooltip-idle-delay nil
+                             'company-pseudo-tooltip--ujofwd-on-timer
+                             'post-command))))
+    (unhide
+     (when (overlayp company-pseudo-tooltip-overlay)
+       (company-pseudo-tooltip-unless-just-one-frontend command)))
+    (t
+     (company-pseudo-tooltip-unless-just-one-frontend command))))
+
+;;; overlay ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defvar-local company-preview-overlay nil)
+
+(defun company-preview-show-at-point (pos completion &optional boundaries)
+  (when (minibufferp)
+    (company-echo-hide))
+
+  (company-preview-hide)
+
+  (let* ((boundaries (or boundaries (company--boundaries completion)))
+         (prefix (car boundaries))
+         (suffix (cdr boundaries))
+         (company-common (and company-common
+                              (string-prefix-p prefix company-common)
+                              company-common))
+         (common (company--common-or-matches completion suffix)))
+    (setq completion (copy-sequence (company--pre-render completion)))
+    (add-face-text-property 0 (length completion) 'company-preview
+                            nil completion)
+
+    (cl-loop for (beg . end) in common
+             do (add-face-text-property beg end 'company-preview-common
+                                        nil completion))
+
+    ;; Add search string
+    (and (string-match (funcall company-search-regexp-function
+                                company-search-string)
+                       completion)
+         (pcase-dolist (`(,mbeg . ,mend) (company--search-chunks))
+           (add-face-text-property mbeg mend 'company-preview-search
+                                   nil completion)))
+
+    (setq completion (if (string-prefix-p prefix completion
+                                          (eq (company-call-backend 'ignore-case)
+                                              'keep-prefix))
+                         (company-strip-prefix completion prefix)
+                       completion))
+
+    (when (string-prefix-p "\n" completion)
+      (setq completion (concat (propertize " " 'face 'company-preview) "\n"
+                               (substring completion 1))))
+
+    (and (equal pos (point))
+         (not (string-empty-p completion))
+         (add-text-properties 0 1 '(cursor 1) completion))
+
+    (let* ((beg pos)
+           (pto company-pseudo-tooltip-overlay)
+           (ptf-workaround (and
+                            pto
+                            (char-before pos)
+                            (eq pos (overlay-start pto))))
+           (end pos))
+      ;; Try to accommodate for the pseudo-tooltip overlay,
+      ;; which may start at the same position if it's at eol.
+      (when ptf-workaround
+        (cl-decf beg)
+        (setq completion (concat (buffer-substring beg pos) completion)))
+
+      (when (string-suffix-p suffix completion)
+        (cl-incf end (length suffix)))
+
+      (setq company-preview-overlay (make-overlay beg end))
+
+      (let ((ov company-preview-overlay))
+        (overlay-put ov (if (> end beg) 'display 'after-string)
+                     completion)
+        ;; Show before minibuffer-message-overlay if there.
+        (overlay-put ov 'priority 1101)
+        (overlay-put ov 'window (selected-window))))))
+
+(defun company-preview-hide ()
+  (when company-preview-overlay
+    (delete-overlay company-preview-overlay)
+    (setq company-preview-overlay nil)))
+
+(defun company-preview-frontend (command)
+  "`company-mode' frontend showing the selection as if it had been inserted."
+  (pcase command
+    (`pre-command (company-preview-hide))
+    (`unhide
+     (when company-selection
+       (let* ((current (nth company-selection company-candidates)))
+         (company-preview-show-at-point (point) current))))
+    (`post-command
+     (when company-selection
+       (company-preview-show-at-point (point)
+                                      (nth company-selection company-candidates))))
+    (`hide (company-preview-hide))))
+
+(defun company-preview-if-just-one-frontend (command)
+  "`company-preview-frontend', but only shown for single candidates."
+  (when (or (not (memq command '(post-command unhide)))
+            (company--show-inline-p))
+    (company-preview-frontend command)))
+
+(defun company--show-inline-p ()
+  (let* ((boundaries (and company-candidates (company--boundaries)))
+         (prefix (car boundaries))
+         (suffix (cdr boundaries))
+         (ignore-case (company-call-backend 'ignore-case))
+         (candidate (car company-candidates)))
+    (and (not (cdr company-candidates))
+         company-common
+         (not (eq t (compare-strings prefix nil nil
+                                     candidate nil nil
+                                     t)))
+         (string-suffix-p suffix candidate ignore-case)
+         (or (eq ignore-case 'keep-prefix)
+             (string-prefix-p prefix company-common)))))
+
+(defun company-tooltip-visible-p ()
+  "Returns whether the tooltip is visible."
+  (when (overlayp company-pseudo-tooltip-overlay)
+    (not (overlay-get company-pseudo-tooltip-overlay 'invisible))))
+
+(defun company-preview-common--show-p ()
+  "Returns whether the preview of common can be showed or not"
+  (and company-common
+       (or (eq (company-call-backend 'ignore-case) 'keep-prefix)
+           (string-prefix-p company-prefix company-common))))
+
+(defun company-preview-common-frontend (command)
+  "`company-mode' frontend preview the common part of candidates."
+  (when (or (not (memq command '(post-command unhide)))
+            (company-preview-common--show-p))
+    (pcase command
+      (`pre-command (company-preview-hide))
+      ((or 'post-command 'unhide)
+       (company-preview-show-at-point (point) company-common))
+      (`hide (company-preview-hide)))))
+
+;;; echo ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defvar-local company-echo-last-msg nil)
+
+(defvar company-echo-timer nil)
+
+(defvar company-echo-delay .01)
+
+(defcustom company-echo-truncate-lines t
+  "Whether frontend messages written to the echo area should be truncated."
+  :type 'boolean
+  :package-version '(company . "0.9.3"))
+
+(defun company-echo-show (&optional getter)
+  (let ((last-msg company-echo-last-msg)
+        (message-log-max nil)
+        (preview-o company-preview-overlay)
+        (message-truncate-lines company-echo-truncate-lines))
+    (when getter
+      (setq company-echo-last-msg (funcall getter)))
+    (when-let* ((mini-window (and company-echo-truncate-lines
+                                  (active-minibuffer-window)))
+                (posn (posn-at-point
+                       (with-current-buffer (window-buffer mini-window)
+                         (max (point-min)
+                              (1- (point-max))))
+                       mini-window))
+                (max-len (max 0
+                              (- (window-width mini-window)
+                                 (car
+                                  (posn-col-row posn))
+                                 (if preview-o
+                                     (company--string-width
+                                      (or
+                                       (overlay-get preview-o 'display)
+                                       (overlay-get preview-o 'after-string)
+                                       ""))
+                                   0)
+                                 5))))
+      (when (> (length company-echo-last-msg) max-len)
+        (setq company-echo-last-msg (substring company-echo-last-msg 0 max-len))))
+    ;; Avoid modifying the echo area if we don't have anything to say, and we
+    ;; didn't put the previous message there (thus there's nothing to clear),
+    ;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=62816#20
+    (if (not (member company-echo-last-msg '(nil "")))
+        (message "%s" company-echo-last-msg)
+      (unless (member last-msg '(nil ""))
+        (message "")))))
+
+(defun company-echo-show-soon (&optional getter delay)
+  (company-echo-cancel)
+  (setq company-echo-timer (run-with-timer (or delay company-echo-delay)
+                                           nil
+                                           'company-echo-show getter)))
+
+(defun company-echo-cancel (&optional unset)
+  (when company-echo-timer
+    (cancel-timer company-echo-timer))
+  (when unset
+    (setq company-echo-timer nil)))
+
+(defun company-echo-format ()
+  (let ((selection (or company-selection 0)))
+    (let ((limit (window-body-width (minibuffer-window)))
+          (len -1)
+          (candidates (nthcdr selection company-candidates))
+          (numbered (if company-show-quick-access selection 99999))
+          (qa-keys-len (length company-quick-access-keys))
+          comp msg)
+
+      (while candidates
+        (setq comp (propertize
+                    (company-reformat (company--clean-string (pop candidates)))
+                    'face
+                    'company-echo)
+              len (+ len 1 (length comp)))
+        (let ((beg 0)
+              (end (company--string-width (or company-common ""))))
+          (when (< numbered qa-keys-len)
+            (let ((qa-hint
+                   (format "%s: " (funcall
+                                   company-quick-access-hint-function
+                                   numbered))))
+              (setq beg (company--string-width qa-hint)
+                    end (+ beg end))
+              (cl-incf len beg)
+              (setq comp (propertize (concat qa-hint comp) 'face 'company-echo)))
+            (cl-incf numbered))
+          ;; FIXME: Add support for the `match' backend action, and thus,
+          ;; non-prefix matches.
+          (add-text-properties beg end '(face company-echo-common) comp))
+        (if (>= len limit)
+            (setq candidates nil)
+          (push comp msg)))
+
+      (mapconcat 'identity (nreverse msg) " "))))
+
+(defun company-echo-strip-common-format ()
+  (let ((selection (or company-selection 0)))
+    (let ((limit (window-body-width (minibuffer-window)))
+          (len (+ (length company-prefix) 2))
+          (candidates (nthcdr selection company-candidates))
+          (numbered (if company-show-quick-access selection 99999))
+          (qa-keys-len (length company-quick-access-keys))
+          comp msg)
+
+      (while candidates
+        (setq comp (company-strip-prefix (pop candidates) company-prefix)
+              len (+ len 2 (length comp)))
+        (when (< numbered qa-keys-len)
+          (let ((qa-hint (format " (%s)"
+                                 (funcall company-quick-access-hint-function
+                                          numbered))))
+            (setq comp (concat comp qa-hint))
+            (cl-incf len (company--string-width qa-hint)))
+          (cl-incf numbered))
+        (if (>= len limit)
+            (setq candidates nil)
+          (push (propertize comp 'face 'company-echo) msg)))
+
+      (concat (propertize company-prefix 'face 'company-echo-common) "{"
+              (mapconcat 'identity (nreverse msg) ", ")
+              "}"))))
+
+(defun company-echo-hide ()
+  (unless (string-empty-p company-echo-last-msg)
+    (company-echo-show #'ignore)))
+
+(defun company-echo-frontend (command)
+  "`company-mode' frontend showing the candidates in the echo area."
+  (pcase command
+    (`post-command (company-echo-show-soon 'company-echo-format 0))
+    (`hide (company-echo-hide))))
+
+(defun company-echo-strip-common-frontend (command)
+  "`company-mode' frontend showing the candidates in the echo area."
+  (pcase command
+    (`post-command (company-echo-show-soon 'company-echo-strip-common-format 0))
+    (`hide (company-echo-hide))))
+
+(defun company-echo-metadata-frontend (command)
+  "`company-mode' frontend showing the documentation in the echo area."
+  (pcase command
+    (`pre-command
+     (when (and (> company-echo-delay 0)
+                (or (not (minibufferp))
+                    (memq this-command
+                          '(self-insert-command
+                            delete-backward-char
+                            company-select-next
+                            company-select-previous
+                            company-select-next-or-abort
+                            company-select-previous-or-abort
+                            company-next-page
+                            company-previous-page
+                            company-search-repeat-forward
+                            company-search-repeat-backward
+                            company-complete-common-or-cycle))))
+       (company-echo-show)))
+    (`post-command (company-echo-show-soon 'company-fetch-metadata))
+    (`unhide (company-echo-show))
+    (`hide (company-echo-hide))))
+
+(eldoc-add-command-completions "company-")
+
+(defun company--eldoc-no-inteference-p ()
+  (or (not company-candidates)
+      (member company-echo-last-msg '(nil ""))))
+
+(advice-add #'eldoc-display-message-no-interference-p
+            :after-while
+            #'company--eldoc-no-inteference-p)
+
+(provide 'company)
+;;; company.el ends here
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company.elc b/emacs/.emacs.d/elpa/company-20260721.100/company.elc
new file mode 100644
index 0000000..25a90c0
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/company.elc differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/company.info b/emacs/.emacs.d/elpa/company-20260721.100/company.info
new file mode 100644
index 0000000..3ddaa9e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/company.info
@@ -0,0 +1,1891 @@
+This is company.info, produced by makeinfo version 7.1.1 from
+company.texi.
+
+This user manual is for Company version 1.1.0 (3 July 2026).
+
+Copyright © 2021-2026 Free Software Foundation, Inc.
+
+     Permission is granted to copy, distribute and/or modify this
+     document under the terms of the GNU Free Documentation License,
+     Version 1.3 or any later version published by the Free Software
+     Foundation, with no Invariant Sections, no Front-Cover Texts, and
+     no Back-Cover Texts.
+INFO-DIR-SECTION Emacs misc features
+START-INFO-DIR-ENTRY
+* Company: (company).           A modular text completion framework.
+END-INFO-DIR-ENTRY
+
+
+File: company.info,  Node: Top,  Next: Overview,  Up: (dir)
+
+Company
+*******
+
+Company is a modular text completion framework for GNU Emacs.
+
+The goal of this document is to lay out the foundational knowledge of
+the package, so that the readers of the manual could competently start
+adapting Company to their needs and preferences.
+
+This user manual is for Company version 1.1.0 (3 July 2026).
+
+Copyright © 2021-2026 Free Software Foundation, Inc.
+
+     Permission is granted to copy, distribute and/or modify this
+     document under the terms of the GNU Free Documentation License,
+     Version 1.3 or any later version published by the Free Software
+     Foundation, with no Invariant Sections, no Front-Cover Texts, and
+     no Back-Cover Texts.
+
+* Menu:
+
+* Overview:: Terminology and Structure
+* Getting Started:: Quick Start Guide
+* Customization:: User Options
+* Frontends:: Frontends Usage Instructions
+* Backends:: Backends Usage Instructions
+* Troubleshooting:: When Something Goes Wrong
+* Index::
+
+-- The Detailed Node Listing --
+
+Overview
+
+* Terminology::
+* Structure::
+
+Getting Started
+
+* Installation::
+* Initial Setup::
+* Usage Basics::
+* Commands::
+
+Customization
+
+* Customization Interface::
+* Configuration File::
+
+Frontends
+
+* Tooltip Frontends::
+* Preview Frontends::
+* Echo Frontends::
+* Candidates Search::
+* Filter Candidates::
+* Quick Access a Candidate::
+
+Backends
+
+* Backends Usage Basics::
+* Grouped Backends::
+* Package Backends::
+* Candidates Post-Processing::
+
+
+
+File: company.info,  Node: Overview,  Next: Getting Started,  Prev: Top,  Up: Top
+
+1 Overview
+**********
+
+“Company” is a modular text completion framework for GNU Emacs.
+
+In other words, it is a package for collecting, displaying, and acting
+on completion candidates.  It aims to help developers, writers, and
+scientists write code and prose.
+
+* Menu:
+
+* Terminology::
+* Structure::
+
+
+File: company.info,  Node: Terminology,  Next: Structure,  Up: Overview
+
+1.1 Terminology
+===============
+
+“Completion” is the process of suggesting possible text based on what
+has already been typed.  To “complete” text means to insert one of those
+suggestions into the buffer.
+
+A “candidate” is one possible completion.  Candidates usually match the
+text before point either at the beginning (“prefix matches”) or
+somewhere inside the candidate (“non-prefix matches”).  The matching
+method depends on the current _backend_ (*note Structure::).  For
+example, ‘company-capf’ supports several non-prefix matching styles
+configured through the user option ‘completion-styles’, which see.  For
+examples of how Company shows matches, *note Frontends::.
+
+The package name ‘Company’ combines ‘Complete’ and ‘Anything’,
+reflecting its extensible design.
+
+
+File: company.info,  Node: Structure,  Prev: Terminology,  Up: Overview
+
+1.2 Structure
+=============
+
+Company is extensible because its main building blocks are pluggable
+modules: backends (*note Backends::) and frontends (*note Frontends::).
+
+“Backends” collect completion candidates, and “frontends” display them.
+Company comes with preconfigured sets of the backends and frontends,
+which can be adjusted to fit particular needs and preferences.  It is
+also common to use backends from third-party packages
+(https://github.com/company-mode/company-mode/wiki/Third-Party-Packages).
+
+Around these modules, Company provides the coordination logic, commands,
+and user options.  For more details, *note Customization:: and *note
+Commands::.
+
+Company is also bundled with an alternative workflow configuration
+called “company-tng”.  It defines ‘company-tng-frontend’,
+‘company-tng-mode’, and ‘company-tng-map’, and allows performing
+completion with just <TAB>.  To enable this configuration, add the
+following line to the Emacs initialization file (*note (emacs)Init
+File::):
+
+     (add-hook 'after-init-hook 'company-tng-mode)
+
+
+File: company.info,  Node: Getting Started,  Next: Customization,  Prev: Overview,  Up: Top
+
+2 Getting Started
+*****************
+
+This chapter provides basic instructions for Company setup and usage.
+
+* Menu:
+
+* Installation::
+* Initial Setup::
+* Usage Basics::
+* Commands::
+
+
+File: company.info,  Node: Installation,  Next: Initial Setup,  Up: Getting Started
+
+2.1 Installation
+================
+
+Company package is distributed via commonly used package archives in a
+form of both stable and development releases.  To install Company, type
+‘M-x package-install <RET> company <RET>’.
+
+For more details on Emacs package archives, *note (emacs)Packages::.
+
+
+File: company.info,  Node: Initial Setup,  Next: Usage Basics,  Prev: Installation,  Up: Getting Started
+
+2.2 Initial Setup
+=================
+
+The package Company provides a minor mode “company-mode”.
+
+To activate the _company-mode_, execute the command ‘M-x company-mode’
+that toggles the mode on and off.  When it is switched on, the mode line
+(*note (emacs)Mode line::) should indicate its presence with an
+indicator ‘company’.
+
+After _company-mode_ had been enabled, the package auto-starts
+suggesting completion candidates.  The candidates are retrieved and
+shown according to the typed characters and the default (until the user
+specifies otherwise) configurations.
+
+To have Company always enabled for the following sessions, add the line
+‘(global-company-mode)’ to the Emacs configuration file (*note
+(emacs)Init File::).
+
+When ‘company-global-minibuffer’ is non-nil (the default), Company can
+be used in the minibuffer as well.  The necessary conditions are that a
+supported popup frontend is configured (any of
+‘company-childframe-*-frontend’), and the minibuffer has a local value
+of ‘completion-at-point-functions’.
+
+
+File: company.info,  Node: Usage Basics,  Next: Commands,  Prev: Initial Setup,  Up: Getting Started
+
+2.3 Usage Basics
+================
+
+By default -- having _company-mode_ enabled (*note Initial Setup::) -- a
+tooltip with completion candidates is shown when the user types a few
+characters.
+
+To initiate completion manually, use the command ‘M-x company-complete’.
+
+To select next or previous of the shown completion candidates, use
+respectively key bindings ‘C-n’ and ‘C-p’, then do one of the following:
+
+   • Hit <RET> to choose a selected candidate for completion.
+
+   • Hit <TAB> to expand the “common part” of all completions.  Exactly
+     what that means, can vary by backend.  In the simplest case it is
+     the longest string that all completions start with, but when a
+     backend returns _non-prefix matches_, it can implement the same
+     kind of expansion logic for the input string.
+
+   • Hit ‘C-g’ to stop activity of Company.
+
+
+File: company.info,  Node: Commands,  Prev: Usage Basics,  Up: Getting Started
+
+2.4 Commands
+============
+
+Under the hood, mentioned in the previous section keys are bound to the
+commands of the out-of-the-box Company.
+
+‘C-n’
+‘M-n’
+     Select the next candidate (‘company-select-next-or-abort’,
+     ‘company-select-next’).
+
+‘C-p’
+‘M-p’
+     Select the previous candidate (‘company-select-previous-or-abort’,
+     ‘company-select-previous’).
+
+‘RET’
+‘<return>’
+     Insert the selected candidate (‘company-complete-selection’).
+     Restart completion if a new field is entered.
+
+‘TAB’
+‘<tab>’
+     Insert the _common part_ of all completion candidates or -- if no
+     _common part_ is present -- select the next candidate
+     (‘company-complete-common-or-cycle’).  In the latter case,
+     wraparound is implicitly enabled (*note
+     company-selection-wrap-around::).  The _common part_ behavior can
+     add characters before and after point, as decided by the backend's
+     implementation.
+
+‘S-TAB’
+‘<backtab>’
+     Select the previous candidate, with wraparound implicitly enabled.
+
+‘C-M-i’
+     Insert the _common part_ of all completion candidates.
+
+‘C-g’
+‘<ESC ESC ESC>’
+     Cancel _company-mode_ activity (‘company-abort’).
+
+‘M-h’
+     Display a buffer with the documentation for the selected candidate
+     (‘company-show-doc-buffer’).  With a prefix argument (‘C-u M-h’),
+     this command toggles between temporary showing the documentation
+     and keeping the documentation buffer up-to-date whenever the
+     selection changes.
+
+‘M-g’
+     Display a buffer with the definition of the selected candidate
+     (‘company-show-location’).
+
+The full list of the default key bindings is stored in the variables
+‘company-active-map’ and ‘company-search-map’ (1).
+
+Moreover, Company is bundled with a number of convenience commands that
+do not have default key bindings defined.  The following examples
+illustrate how to assign key bindings to such commands.
+
+     (global-set-key (kbd "<tab>") #'company-indent-or-complete-common)
+
+     (with-eval-after-load 'company
+       (define-key company-active-map (kbd "M-/") #'company-complete)
+       (define-key company-active-map (kbd "C-M-/") #'company-complete-common))
+
+In the same manner, an additional key can be assigned to a command or a
+command can be unbound from a key.  For instance:
+
+     (with-eval-after-load 'company
+       (define-key company-active-map (kbd "M-.") #'company-show-location)
+       (define-key company-active-map (kbd "RET") nil))
+
+   ---------- Footnotes ----------
+
+   (1) For a more user-friendly output of the pre-defined key bindings,
+utilize ‘M-x describe-keymap <RET> company-active-map’ or
+‘C-h f <RET> company-mode’.
+
+
+File: company.info,  Node: Customization,  Next: Frontends,  Prev: Getting Started,  Up: Top
+
+3 Customization
+***************
+
+Emacs provides two equally acceptable ways for user preferences
+configuration: via customization interface (for more details, *note
+(emacs)Easy Customization::) and a configuration file (*note (emacs)Init
+File::).  Naturally, Company can be configured by both of these
+approaches.
+
+* Menu:
+
+* Customization Interface::
+* Configuration File::
+
+
+File: company.info,  Node: Customization Interface,  Next: Configuration File,  Up: Customization
+
+3.1 Customization Interface
+===========================
+
+In order to employ the customization interface, run
+‘M-x customize-group <RET> company’.
+
+This interface outputs all the options available for user customization,
+so you may find it beneficial to review this list even if you are going
+to configure Company with the configuration file.
+
+For instructions on how to change the settings, *note (emacs)Changing a
+Variable::.
+
+
+File: company.info,  Node: Configuration File,  Prev: Customization Interface,  Up: Customization
+
+3.2 Configuration File
+======================
+
+Company is a customization-rich package.  This section lists some of the
+core settings that influence its overall behavior.
+
+ -- User Option: company-minimum-prefix-length
+     This is one of the values (together with ‘company-idle-delay’),
+     based on which Company auto-starts looking up completion
+     candidates.  This option configures how many characters have to be
+     typed in by a user before candidates start to be collected and
+     displayed.  An often choice nowadays is to configure this option to
+     a lower number than the default value of ‘3’.
+
+ -- User Option: company-idle-delay
+     This is the second of the options that configure Company's
+     auto-start behavior (together with
+     ‘company-minimum-prefix-length’).  The value of this option defines
+     how fast Company is going to react to the typed input, such that
+     setting ‘company-idle-delay’ to ‘0’ makes Company react
+     immediately, ‘nil’ disables auto-starting, and a larger value
+     postpones completion auto-start for that number of seconds.  For an
+     even fancier setup, set this option value to a predicate function,
+     as shown in the following example:
+
+          (setq company-idle-delay
+                (lambda () (if (company-in-string-or-comment) nil 0.3)))
+
+ -- User Option: company-inhibit-inside-symbols
+     You can set this option to ‘t’ to disable the auto-start behavior
+     when in the middle of a symbol.
+
+ -- User Option: company-global-modes
+     This option allows to specify in which major modes _company-mode_
+     can be enabled by ‘(global-company-mode)’.  *Note Initial Setup::.
+     The default value of ‘t’ enables Company in all major modes.
+     Setting ‘company-global-modes’ to ‘nil’ is equal in action to
+     toggling off _global-company-mode_.  Providing a list of major
+     modes results in having _company-mode_ enabled in the listed modes
+     only.  For the opposite result, provide a list of major modes with
+     ‘not’ being the first element of the list, as shown in the
+     following example:
+
+          (setq company-global-modes '(not erc-mode message-mode eshell-mode))
+
+ -- User Option: company-selection-wrap-around
+     Enable this option to loop (cycle) the candidates' selection: after
+     selecting the last candidate on the list, a command to select the
+     next candidate does so with the first candidate.  By default, this
+     option is disabled, which means the selection of the next candidate
+     stops on the last item.  The selection of the previous candidate is
+     influenced by this option similarly.
+
+ -- User Option: company-require-match
+     To allow typing in characters that don't match the candidates, set
+     the value of this option to ‘nil’.  For an opposite behavior (that
+     is, to disallow non-matching input), set it to ‘t’.  By default,
+     Company is configured to require a matching input only if the user
+     invokes completion manually or selects a candidate; by having the
+     option configured to call the function ‘company-explicit-action-p’.
+
+ -- User Option: company-lighter-base
+     This user option allows configuring a string indicator of the
+     enabled _company-mode_ in the mode line.  The default value is
+     ‘company’.
+
+ -- User Option: company-insertion-on-trigger
+     One more pair of the user options may instruct Company to complete
+     with the selected candidate by typing one of the
+     ‘company-insertion-triggers’.  The user option
+     ‘company-insertion-on-trigger’ can be enabled or disabled by
+     setting its value to one of: ‘nil’, ‘t’, or a predicate function
+     name.  *note Predicate: (eintr)Wrong Type of Argument.
+
+ -- User Option: company-insertion-triggers
+     This option has an effect only when ‘company-insertion-on-trigger’
+     is enabled.  The value can be one of: a string of characters, a
+     list of syntax description characters (*note (elisp)Syntax Class
+     Table::), or a predicate function.  By default, this user option is
+     set to the list of the syntax characters: ‘(?\ ?\) ?.)’, which
+     translates to the whitespace, close parenthesis, and punctuation.
+     It is safe to configure the value to a character that can
+     potentially be part of a valid completion; in this case, Company
+     does not treat such characters as triggers.
+
+Hooks
+-----
+
+Company exposes the following life-cycle hooks:
+
+ -- User Option: company-completion-started-hook
+
+ -- User Option: company-completion-cancelled-hook
+
+ -- User Option: company-completion-finished-hook
+
+ -- User Option: company-after-completion-hook
+
+
+File: company.info,  Node: Frontends,  Next: Backends,  Prev: Customization,  Up: Top
+
+4 Frontends
+***********
+
+Company is packaged with several frontends and provides a predefined set
+of enabled frontends.  A list of the enabled frontends can be changed by
+configuring the user option ‘company-frontends’.
+
+Each frontend is simply a function that receives a command and acts
+accordingly to it: outputs candidates, hides its output, refreshes
+displayed data, and so on.
+
+All of the Company frontends can be categorized by the type of the
+output into the three groups: “tooltip-”, “preview-”, and “echo-”
+frontends.  We overview these groups in the first sections of this
+chapter.  The sections that follow are dedicated to the ways the
+displayed candidates can be searched, filtered, and quick-accessed.
+
+* Menu:
+
+* Tooltip Frontends::
+* Preview Frontends::
+* Echo Frontends::
+* Candidates Search::
+* Filter Candidates::
+* Quick Access a Candidate::
+
+
+File: company.info,  Node: Tooltip Frontends,  Next: Preview Frontends,  Up: Frontends
+
+4.1 Tooltip Frontends
+=====================
+
+This group of frontends displays completion candidates in a rectangular
+tooltip (aka popup).  Company provides two sets of _tooltip frontends_.
+They are described in this section, together with user options and
+_faces_ that affect them.
+
+* Menu:
+
+* Childframe Frontends::
+* Pseudo-Tooltip Frontends::
+* User Options::
+* Candidates Icons::
+* Faces::
+
+
+File: company.info,  Node: Childframe Frontends,  Next: Pseudo-Tooltip Frontends,  Up: Tooltip Frontends
+
+4.1.1 Childframe Frontends
+--------------------------
+
+The "childframe" family of frontends naturally uses a special frame to
+show the popup above the buffer.  It can cross window boundaries and
+works in the minibuffer.  On some builds it is implemented using X11
+child windows, while on others it uses native widgets.  It also works in
+the terminal starting with Emacs 31.
+
+ -- Function: company-childframe-unless-just-one-frontend
+     This is one of the default frontends (except in Emacs<31.1 under
+     X11).  It starts displaying its graphical tooltip only if more than
+     one completion candidate is available, which nicely combines -- and
+     it is done so by default -- with
+     ‘company-preview-if-just-one-frontend’, *note Preview Frontends::.
+
+ -- Function: company-childframe-frontend
+     This frontend shows its tooltip for any number of completion
+     candidates.  It is the basic version that related frontends extend.
+
+
+File: company.info,  Node: Pseudo-Tooltip Frontends,  Next: User Options,  Prev: Childframe Frontends,  Up: Tooltip Frontends
+
+4.1.2 Pseudo-Tooltip Frontends
+------------------------------
+
+The "pseudo-tooltip" family of frontends uses "overlays" (a display
+engine feature) to render the popup inside the buffer.  It has a stable
+and fast implementation, with known caveats: it is limited to the bounds
+of the buffer's window, and rendering might be partially incorrect in
+buffers with mixed fonts, complex formatting involving faces, display
+specs, or certain glyphs.
+
+ -- Function: company-pseudo-tooltip-unless-just-one-frontend
+     This has been the default frontend before the introduction of the
+     "childframe" family of frontends (now it remains such in Emacs<31.1
+     under X11).  It starts displaying a tooltip only if more than one
+     completion candidate is available, which nicely combines with
+     ‘company-preview-if-just-one-frontend’, *note Preview Frontends::.
+
+ -- Function: company-pseudo-tooltip-frontend
+     This frontend outputs a tooltip for any number of completion
+     candidates.  It is the basic version that related frontends extend.
+
+ -- Function: company-pseudo-tooltip-unless-just-one-frontend-with-delay
+     This is a peculiar frontend that displays a tooltip only if more
+     than one candidate is available, and only after a delay.  The delay
+     can be configured with the user option
+     ‘company-tooltip-idle-delay’.  A typical use case for plugging in
+     this frontend would be displaying a tooltip only on a manual
+     request (when needed), as shown in the following example:
+
+          (setq company-idle-delay 0
+                company-tooltip-idle-delay 10
+                company-require-match nil
+                company-frontends
+                '(company-pseudo-tooltip-unless-just-one-frontend-with-delay
+                  company-preview-frontend
+                  company-echo-metadata-frontend)
+                company-backends '(company-capf))
+
+          (global-set-key (kbd "<tab>")
+                          (lambda ()
+                            (interactive)
+                            (let ((company-tooltip-idle-delay 0.0))
+                              (company-complete)
+                              (and company-candidates
+                                   (company-call-frontends 'post-command)))))
+
+
+File: company.info,  Node: User Options,  Next: Candidates Icons,  Prev: Pseudo-Tooltip Frontends,  Up: Tooltip Frontends
+
+4.1.3 User Options
+------------------
+
+To change the _tooltip frontends_ configuration, adjust the following
+user options.
+
+ -- User Option: company-tooltip-align-annotations
+     An “annotation” is a string that carries additional information
+     about a candidate; such as a data type, function arguments, or
+     whatever a backend appoints to be a valuable piece of information
+     about a candidate.  By default, the annotations are shown right
+     beside the candidates.  Setting the option value to ‘t’ aligns
+     annotations to the right side of the tooltip.
+
+          (setq company-tooltip-align-annotations t)
+
+         [image src="./images/small/tooltip-annotations.png"]
+
+ -- User Option: company-tooltip-annotation-padding
+     Adds left padding to the candidates' annotations.  It is disabled
+     by default.  If ‘company-tooltip-align-annotations’ is enabled,
+     ‘company-tooltip-annotation-padding’ defines the minimum spacing
+     between a candidate and annotation, with the default value of 1.
+
+          (setq company-tooltip-annotation-padding 1)
+
+ -- User Option: company-tooltip-limit
+     Controls the maximum number of the candidates shown simultaneously
+     in the tooltip (the default value is ‘10’).  When the number of the
+     available candidates is larger than this option's value, Company
+     paginates the results.
+
+          (setq company-tooltip-limit 5)
+
+            [image src="./images/small/tooltip-limit.png"]
+
+ -- User Option: company-tooltip-offset-display
+     Use this option to choose in which way to output paginated results.
+     The default value is ‘scrollbar’.  Another supported value is
+     ‘lines’; choose it to show the quantity of the candidates not
+     displayed by the current tooltip page.
+
+          (setq company-tooltip-offset-display 'lines)
+
+        [image src="./images/small/tooltip-offset-display.png"]
+
+ -- User Option: company-tooltip-minimum
+     This user option acts only when a tooltip is shown close to the
+     bottom of a window.  It guarantees visibility of this number of
+     completion candidates below point.  When the number of lines
+     between point and the bottom of a window is less than
+     ‘company-tooltip-minimum’ value, the tooltip is displayed above
+     point.
+
+          (setq company-tooltip-minimum 5)
+
+        [image src="./images/small/tooltip-minimum-below.png"]
+
+
+        [image src="./images/small/tooltip-minimum-above.png"]
+
+ -- User Option: company-tooltip-flip-when-above
+     When this setting is enabled, no matter if a tooltip is shown above
+     or below point, the candidates are always listed starting near
+     point.  (Putting it differently, the candidates are mirrored
+     vertically if a tooltip changes its position, instead of being
+     commonly listed top-to-bottom.)  This is only supported by the
+     "pseudo tooltip" backends for now.
+
+          (setq company-tooltip-flip-when-above t)
+
+             [image src="./images/small/tooltip-flip.png"]
+
+ -- User Option: company-tooltip-minimum-width
+     Sets the minimum width of a tooltip, excluding the margins and the
+     scroll bar.  Changing this value especially makes sense if the user
+     navigates between tooltip pages.  The default value of ‘15’ helps
+     reduce how often the tooltip's size changes when you are typing or
+     paging.  Set it to a higher value to limit the resizes further.  Or
+     vice versa, to ‘0’, to always adapt to the longest shown candidate.
+     And see the related option ‘company-tooltip-width-grow-only’.
+
+ -- User Option: company-tooltip-width-grow-only
+     This is another way to reduce how often the tooltip resizes (in
+     addition to ‘company-tooltip-minimum-width’), prohibiting reducing
+     the width within one completion session when this option is
+     non-nil.  And when the value is a number, this is the maximum width
+     up to which the non-shrink behavior has effect.  The default value
+     is ‘50’.
+
+ -- User Option: company-tooltip-maximum-width
+     This user option controls the maximum width of the tooltip inner
+     area.  By default, its value is ‘100’.  Change it to allow
+     different limits.
+
+ -- User Option: company-tooltip-margin
+     Controls the width of the “margin” on the sides of the tooltip
+     inner area.  If ‘company-format-margin-function’ is set,
+     ‘company-tooltip-margin’ defines only the right margin.
+
+          (setq company-tooltip-margin 3)
+
+            [image src="./images/small/tooltip-margin.png"]
+
+
+File: company.info,  Node: Candidates Icons,  Next: Faces,  Prev: User Options,  Up: Tooltip Frontends
+
+4.1.4 Candidates Icons
+----------------------
+
+An “icon” is an image or a text that represents a candidate's kind; it
+is displayed in front of a candidate.  The term “kind” here stands for a
+high-level category a candidate fits into.  (Such as ‘array’,
+‘function’, ‘file’, ‘string’, ‘color’, etc.  For an extended list of the
+possible _kinds_, see the user option ‘company-text-icons-mapping’ or
+the variable ‘company-vscode-icons-mapping’.)
+
+ -- User Option: company-format-margin-function
+     Allows setting a function to format the left margin of a tooltip
+     inner area; namely, to output candidates' _icons_.  The predefined
+     formatting functions are listed below.  The user may also set this
+     option to a custom function.  To disable left margin formatting,
+     set the value of the option to ‘nil’ (this way control over the
+     size of the left margin returns to the user option
+     ‘company-tooltip-margin’).
+
+ -- Function: company-vscode-dark-icons-margin
+ -- Function: company-vscode-light-icons-margin
+     These functions utilize VSCode dark and light theme icon sets (1).
+     The related two user options are ‘company-icon-size’ and
+     ‘company-icon-margin’.
+
+         [image src="./images/small/tooltip-icons-vscode.png"]
+
+ -- Function: company-text-icons-margin
+     This function produces letters and symbols formatted according to
+     ‘company-text-icons-format’.  The rest of the user options
+     affecting this function behavior are listed below.
+
+          [image src="./images/small/tooltip-icons-text.png"]
+
+ -- Function: company-dot-icons-margin
+     This function produces a colored Unicode symbol of a circle
+     formatted according to the ‘company-dot-icons-format’.  Other user
+     options that affect the resulting output are listed below.
+
+          [image src="./images/small/tooltip-icons-dot.png"]
+
+The following user options influence appearance of the _text_ and _dot_
+_icons_.
+
+ -- User Option: company-text-icons-mapping
+     Lists candidates' _kinds_ with their corresponding _icons_
+     configurations.
+
+ -- User Option: company-text-face-extra-attributes
+     A list of face attributes to be applied to the _icons_.
+
+          (setq company-text-face-extra-attributes
+                '(:weight bold :slant italic))
+
+          [image src="./images/small/tooltip-icon-face.png"]
+
+ -- User Option: company-text-icons-add-background
+     If this option is enabled, when an _icon_ doesn't have a background
+     configured by ‘company-text-icons-mapping’, then a generated
+     background is applied.
+
+          (setq company-text-icons-add-background t)
+
+           [image src="./images/small/tooltip-icon-bg.png"]
+
+ -- Function: company-detect-icons-margin
+     This is the default margin formatting function that applies one of
+     the ‘company-vscode-*-icons-margin’ functions if ‘vscode’ icons set
+     is supported; otherwise applies a ‘company-text-icons-margin’
+     function.
+
+   ---------- Footnotes ----------
+
+   (1) SVG images support has to be enabled in Emacs for these icons set
+to be used.  The supported images types can be checked with ‘C-h v
+image-types’.  Before compiling Emacs, make sure ‘librsvg’ is installed
+on your system.
+
+
+File: company.info,  Node: Faces,  Prev: Candidates Icons,  Up: Tooltip Frontends
+
+4.1.5 Faces
+-----------
+
+Out-of-the-box Company defines and configures distinguished faces (*note
+(emacs)Faces::) for light and dark themes.  Moreover, some of the
+built-in and third-party themes fine-tune Company to fit their palettes.
+That is why there's often no real need to make such adjustments on the
+user's side.  However, this chapter presents some hints on where to
+start customizing Company interface.
+
+Namely, the look of a tooltip is controlled by the ‘company-tooltip*’
+named faces.
+
+The following example suggests how users may approach tooltip face
+customization:
+
+     (custom-set-faces
+      '(company-tooltip
+        ((t (:background "ivory" :foreground "MistyRose3"))))
+      '(company-tooltip-selection
+        ((t (:background "LemonChiffon1" :foreground "MistyRose4"))))
+      '(company-tooltip-common ((t (:weight bold :foreground "pink1"))))
+      '(company-tooltip-scrollbar-thumb ((t (:background "ivory3"))))
+      '(company-tooltip-scrollbar-track ((t (:background "ivory2"))))
+      '(company-tooltip-annotation ((t (:foreground "MistyRose2")))))
+
+         [image src="./images/small/tooltip-faces-light.png"]
+
+
+File: company.info,  Node: Preview Frontends,  Next: Echo Frontends,  Prev: Tooltip Frontends,  Up: Frontends
+
+4.2 Preview Frontends
+=====================
+
+Frontends in this group output a completion candidate or a common part
+of the candidates temporarily inline, as if the word had already been
+completed (1).
+
+ -- Function: company-preview-if-just-one-frontend
+     This is one of the frontends enabled by default.  This frontend
+     outputs a preview if only one completion candidate is available; it
+     is a good suit to be combined with
+     ‘company-pseudo-tooltip-unless-just-one-frontend’, *note Tooltip
+     Frontends::.
+
+ -- Function: company-preview-frontend
+     This frontend outputs the first of the available completion
+     candidates inline for a preview.
+
+ -- Function: company-preview-common-frontend
+     As the name of this frontend suggests, it outputs for a preview
+     only a common part of the candidates.
+
+The look of the preview is controlled by the following faces:
+‘company-preview’, ‘company-preview-common’, and
+‘company-preview-search’.
+
+            [image src="./images/small/preview-light.png"]
+
+
+             [image src="./images/small/preview-dark.png"]
+
+   ---------- Footnotes ----------
+
+   (1) The candidates retrieved according to ‘non-prefix’ matches (*note
+Terminology::) may be shown in full after point.
+
+
+File: company.info,  Node: Echo Frontends,  Next: Candidates Search,  Prev: Preview Frontends,  Up: Frontends
+
+4.3 Echo Frontends
+==================
+
+The frontends listed in this section display information in the Emacs
+echo area, *note (emacs)Echo Area::.
+
+ -- Function: company-echo-metadata-frontend
+     This frontend is a part of the predefined frontends set.  Its
+     responsibility is to output a short documentation string for a
+     completion candidate in the echo area.
+
+              [image src="./images/small/echo-meta.png"]
+
+
+The last pair of the built-in frontends isn't that commonly used and not
+as full-featured as the previously reviewed _tooltip-_ and _preview-_
+frontends, but still, feel free to play with them and have some fun!
+
+ -- Function: company-echo-frontend
+     This frontend outputs all the available completion candidates in
+     the echo area.
+
+                 [image src="./images/small/echo.png"]
+
+ -- Function: company-echo-strip-common-frontend
+     It acts similarly to the previous frontend but outputs a common
+     part of the candidates once for all of them.
+
+              [image src="./images/small/echo-strip.png"]
+
+ -- User Option: company-echo-truncate-lines
+     This is the only _echo frontends_ targeted setting.  When enabled,
+     the output is truncated to fit the echo area.  This setting is set
+     to ‘t’ by default.
+
+To apply visual changes to the output of these frontends, configure the
+faces ‘company-echo’ and ‘company-echo-common’.
+
+
+File: company.info,  Node: Candidates Search,  Next: Filter Candidates,  Prev: Echo Frontends,  Up: Frontends
+
+4.4 Candidates Search
+=====================
+
+By default, when _company-mode_ is in action, a key binding ‘C-s’ starts
+looking for matches to additionally typed characters among the displayed
+candidates.  When a search is initiated, an indicator
+‘Search: CHARACTERS’ is shown in the Emacs mode line.
+
+To quit the search mode, hit ‘C-g’.
+
+ -- User Option: company-search-regexp-function
+     The value of this user option must be a function that interprets
+     the search input.  By default it is set to the function
+     ‘company-search-words-in-any-order-regexp’, which looks for
+     matching words in any order.  Company defines several more
+     functions suitable for this option.  They are listed below.
+
+ -- Function: company-search-words-regexp
+     Searches for words separated with spaces in the given order.
+
+ -- Function: company-search-words-in-any-order-regexp
+     Searches for words separated with spaces in any order.
+
+ -- Function: company-search-flex-regexp
+     Searches for characters in the given order, with anything in
+     between.
+
+ -- Function: company-search-flex-words-in-any-order-regexp
+     Searches for words separated with spaces in any order, with
+     anything in between the characters of each word.
+
+Search matches are distinguished by the ‘company-tooltip-search’ and
+‘company-tooltip-search-selection’ faces.
+
+            [image src="./images/small/tooltip-search.png"]
+
+
+File: company.info,  Node: Filter Candidates,  Next: Quick Access a Candidate,  Prev: Candidates Search,  Up: Frontends
+
+4.5 Filter Candidates
+=====================
+
+Candidates filtering is started by typing the default key binding
+‘C-M-s’.  Filtering acts on a par with the search (*note Candidates
+Search::), indicating its activation by the text ‘Filter: CHARACTERS’ in
+the mode line and influencing the displayed candidates.  The difference
+is that the filtering, as its name suggests, keeps displaying only the
+matching candidates (in addition to distinguishing the matches with a
+face).
+
+To quit the filtering, hit ‘C-g’.  To toggle between search and filter
+states, use key binding ‘C-o’.
+
+            [image src="./images/small/tooltip-filter.png"]
+
+
+File: company.info,  Node: Quick Access a Candidate,  Prev: Filter Candidates,  Up: Frontends
+
+4.6 Quick Access a Candidate
+============================
+
+Company provides a way to choose a candidate for completion without
+having to navigate to that candidate: by hitting one of the quick-access
+keys.  By default, quick-access key bindings utilize a modifier <META>
+and one of the digits, such that pressing ‘M-1’ completes with the first
+candidate on the list and ‘M-0’ with the tenth candidate.
+
+If ‘company-show-quick-access’ is enabled, _tooltip-_ and _echo-_
+frontends show quick-access hints.
+
+     (setq company-show-quick-access 'left)
+
+         [image src="./images/small/tooltip-quick-access.png"]
+
+
+               [image src="./images/small/echo-qa.png"]
+
+
+            [image src="./images/small/echo-strip-qa.png"]
+
+To customize the key bindings, either do it via Customization Interface
+(*note Customization Interface::) or use the following approach:
+
+     (custom-set-variables
+      '(company-quick-access-keys '("a" "o" "e" "u" "i"))
+      '(company-quick-access-modifier 'super))
+
+A modifier should be one of ‘meta’, ‘super’, ‘hyper’, ‘control’.
+
+The following example applies a bit of customization and demonstrates
+how to change quick-access hint faces.
+
+     (setq company-show-quick-access t)
+
+     (custom-set-faces
+      '(company-tooltip-quick-access ((t (:foreground "pink1"))))
+      '(company-tooltip-quick-access-selection
+        ((t (:foreground "pink1" :slant italic)))))
+
+        [image src="./images/small/tooltip-qa-faces-light.png"]
+
+
+File: company.info,  Node: Backends,  Next: Troubleshooting,  Prev: Frontends,  Up: Top
+
+5 Backends
+**********
+
+We can metaphorically say that each backend is like an engine.  (The
+reality is even better since backends are just functions.)  Firing such
+an engine with a command causes the production of material for Company
+to work on.  Typically, that means showing that output to the user via
+one or several configured frontends, *note Frontends::.
+
+Just like Company provides a preconfigured list of the enabled
+frontends, it also defines a list of the backends to rely on by default.
+This list is stored in the user option ‘company-backends’.  The
+docstring of this variable has the full description of what a backend is
+and how to implement one.  So we suggest reading the output of ‘C-h v
+company-backends’ for more details.  Nevertheless, the fundamental
+concepts are described in this user manual too.
+
+* Menu:
+
+* Backends Usage Basics::
+* Grouped Backends::
+* Package Backends::
+* Candidates Post-Processing::
+
+
+File: company.info,  Node: Backends Usage Basics,  Next: Grouped Backends,  Up: Backends
+
+5.1 Backends Usage Basics
+=========================
+
+One of the significant concepts to understand about Company is that the
+package relies on one backend at a time (1).  The backends are invoked
+one by one, in the sequential order of the items on the
+‘company-backends’ list.  The first one that reports itself applicable
+in the current context (usually based on the value of ‘major-mode’ and
+the text around point), is used for completion.
+
+The name of the currently active backend is shown in the mode line and
+in the output of the command ‘M-x company-diag’.
+
+In most cases (mainly to exclude false-positive results), if the current
+applicable backend returned no completions, the ones after it in the
+list are not invoked.  If you do want to query the next one, use the
+command ‘company-other-backend’: either by calling it with ‘M-x’ or by
+binding the command to the keys of your choice, like:
+
+     (global-set-key (kbd "C-c C-/") #'company-other-backend)
+
+It is also possible to specifically start a backend with the command
+‘M-x company-begin-backend’ or by calling a backend by its name, for
+instance: ‘M-x company-capf’.  As usual for Emacs, such backend calls
+can be assigned to key bindings, for example:
+
+     (global-set-key (kbd "C-c y") 'company-yasnippet)
+
+   ---------- Footnotes ----------
+
+   (1) The grouped backends act as one complex backend.  *Note Grouped
+Backends::.
+
+
+File: company.info,  Node: Grouped Backends,  Next: Package Backends,  Prev: Backends Usage Basics,  Up: Backends
+
+5.2 Grouped Backends
+====================
+
+In many cases, it can be desirable to receive candidates from several
+backends simultaneously.  This can be achieved by configuring “grouped
+backends”: a sub-list of backends in the ‘company-backends’ list, that
+is handled specifically by Company.
+
+The most important part of this handling is the merge of the completion
+candidates from the grouped backends.
+
+To keep the candidates organized in accordance with the grouped backends
+order, add the keyword ‘:separate’ to the list of the grouped backends.
+The following example illustrates this.
+
+     (defun my-text-mode-hook ()
+       (setq-local company-backends
+                   '((company-dabbrev company-ispell :separate)
+                     company-files)))
+
+     (add-hook 'text-mode-hook #'my-text-mode-hook)
+
+Another keyword ‘:with’ helps to make sure the results from major/minor
+mode agnostic backends (such as _company-yasnippet_,
+_company-dabbrev-code_) are returned without preventing results from
+context-aware backends (such as _company-capf_ or _company-clang_).  For
+this feature to work, put backends dependent on a mode at the beginning
+of the grouped backends list, then put a keyword ‘:with’, and only then
+put context agnostic backend(s), as shown in the following concise
+example:
+
+     (setq company-backends '((company-capf :with company-yasnippet)))
+
+
+File: company.info,  Node: Package Backends,  Next: Candidates Post-Processing,  Prev: Grouped Backends,  Up: Backends
+
+5.3 Package Backends
+====================
+
+The following sections give a short overview of the commonly used
+backends bundled with Company.  Each section is devoted to one of the
+roughly outlined groups of the backends.
+
+Some of the backends expose user options for customization; a few of
+these options are introduced below.  For those who would like to fetch
+the full list of a backend's user options, we suggest doing one of the
+following:
+
+   • Execute command ‘M-x customize-group <RET> <backend-name>’.
+
+   • Open the source file of the backend and run
+     ‘M-x occur <RET> ^(defcustom’.
+
+        − Optionally, search for the matches with
+          ‘M-x isearch <RET> (defcustom’.
+
+* Menu:
+
+* Code Completion::
+* Text Completion::
+* File Name Completion::
+* Template Expansion::
+
+
+File: company.info,  Node: Code Completion,  Next: Text Completion,  Up: Package Backends
+
+5.3.1 Code Completion
+---------------------
+
+ -- Function: company-capf
+     The current trend in the Emacs's world is to delegate completion
+     logic to the hook ‘completion-at-point-functions’ (CAPF) assigned
+     to by the major or minor modes.  It supports a common subset of
+     features which is well-supported across different completion UIs.
+     [Among other things, this is what the most popular Emacs clients
+     for the language server protocol (LSP) also rely on.]
+
+     For that reason, it is probably the most used and recommended
+     backend nowadays, including for Emacs Lisp coding.
+
+     Just to illustrate, the following minimal backends setup
+
+          (setq company-backends '((company-capf company-dabbrev-code)))
+
+     might cover a large number of basic use cases, especially so in
+     major modes that have CAPF support implemented.
+
+     For more details on CAPF, *note (elisp)Completion in Buffers::.
+
+ -- User Option: company-capf-disabled-functions
+     List of completion functions which should be ignored by this
+     backend.  By default it contains the functions that duplicate the
+     built-in backends but don't support the corresponding configuration
+     options and/or alter the intended priority of the default backends'
+     configuration.
+
+ -- Function: company-dabbrev-code
+     This backend works similarly to the built-in Emacs package
+     _dabbrev_, searching for completion candidates inside the contents
+     of the open buffer(s).  Internally, it reuses code from the other
+     backend, ‘company-dabbrev’ (*note Text Completion::).
+
+ -- User Option: company-dabbrev-code-modes
+     This variable lists the modes that use ‘company-dabbrev-code’.  The
+     backend will only perform completion in these major modes and their
+     derivatives.  Otherwise it passes control to other backends.  Value
+     t means complete in all modes.
+
+ -- User Option: company-dabbrev-code-other-buffers
+     This variable determines whether ‘company-dabbrev-code’ will search
+     other buffers for completions.  If ‘all’, it will search all other
+     buffers except the ignored ones (names starting with a space).  If
+     ‘t’, it will search buffers with the same major mode.  If ‘code’,
+     it will search buffers with major modes in
+     ‘company-dabbrev-code-modes’ or derived from one of them.  This can
+     also be a function that takes the current buffer as parameter and
+     returns a list of major modes to search.
+
+ -- User Option: company-dabbrev-code-everywhere
+     This is a boolean option which determines whether this backend will
+     perform completion in strings and comments as well.  The default
+     value ‘nil’ means it will pass on control to other backends in such
+     contexts.
+
+ -- User Option: company-dabbrev-code-completion-styles
+     Non-nil to use ‘completion-styles’ for matching completions in this
+     backend.  It can be set to ‘t’ to use the global value of
+     ‘completion-styles’, or to a list of symbols to use specific
+     completion styles with this backend.  The default value is nil.
+
+ -- Function: company-keywords
+     This backend provides completions for many of the widely spread
+     programming languages _keywords_: words bearing specific meaning in
+     a language.
+
+ -- Function: company-clang
+     As the name suggests, use this backend to get completions from
+     _Clang_ compiler; that is, for the languages in the _C_ language
+     family: _C_, _C++_, _Objective-C_. It uses the command-line
+     interface of the program ‘clang’, but without any advanced caching
+     across calls, or automatic detection of the project structure.
+     Which makes it more suitable for small to medium projects,
+     especially if you're willing to customize
+     ‘company-clang-arguments’.  Otherwise we recommend using one of the
+     LSP clients available for Emacs, together with the backend
+     ‘company-capf’.
+
+ -- User Option: company-clang-arguments
+     This option can be set to a list of strings which will be passed to
+     _clang_ during completion.  These can include elements like ‘"-I"
+     "path/to/includes/dir"’ to indicate the header directories and
+     other compiler options.
+
+ -- Function: company-semantic
+     This backend relies on a built-in Emacs package that provides
+     language-aware editing commands based on source code parsers, *note
+     (emacs)Semantic::.  Having enabled _semantic-mode_ makes it to be
+     used by the CAPF mechanism (*note (emacs)Symbol Completion::),
+     hence the user may consider enabling _company-capf_ backend
+     instead.
+
+ -- Function: company-etags
+     This backend uses tags tables as produced by the built-in Emacs
+     program _etags_, *note (emacs)Tags Tables::.
+
+ -- User Option: company-etags-ignore-case
+     Non-nil to ignore case in this backend's completions.
+
+ -- User Option: company-etags-everywhere
+     Non-nil to offer completions in comments and strings.  It can also
+     be set to ‘t’ or a list of major modes in which this would happen.
+
+ -- User Option: company-etags-completion-styles
+     Non-nil to use ‘completion-styles’ for matching completions in this
+     backend.  It can be set to ‘t’ to use the global value of
+     ‘completion-styles’, or to a list of symbols to use specific
+     completion styles with this backend.  The default value is nil.
+
+
+File: company.info,  Node: Text Completion,  Next: File Name Completion,  Prev: Code Completion,  Up: Package Backends
+
+5.3.2 Text Completion
+---------------------
+
+ -- Function: company-dabbrev
+     This backend works similarly to the built-in Emacs package
+     _dabbrev_, searching for completion candidates inside the contents
+     of the open buffer(s).  It is one of the often used backends, and
+     it has several interesting options for configuration.  Let's review
+     a few of them.
+
+      -- User Option: company-dabbrev-minimum-length
+          This option sets the minimum length of a completion candidate
+          to collect from the text.  The default value of ‘4’ is
+          intended to prevent potential performance issues.  But in many
+          scenarios, it may be acceptable to lower this value.  Note
+          that this option also affects the behavior of the
+          _company-dabbrev-code_ backend.
+
+               (setq company-dabbrev-minimum-length 2)
+
+      -- User Option: company-dabbrev-other-buffers
+          By default, _company-dabbrev_ collects completion candidates
+          from all not ignored buffers (see more on that below).  This
+          behavior can be changed to collecting candidates from the
+          current buffer only (by setting the value to ‘nil’) or from
+          the buffers with the same major mode:
+
+               (setq company-dabbrev-other-buffers t)
+
+      -- User Option: company-dabbrev-ignore-buffers
+          The value of this option should be a regexp or a predicate
+          function that can be used to match a buffer name.  The matched
+          buffers are omitted from the search for completion candidates.
+
+     The last two options described here relate to handling uppercase
+     and lowercase letters in completion candidates.  The illustrative
+     examples given below can be reproduced in the ‘*scratch*’ buffer,
+     with the word ‘Enjoy’ typed in, and with this initial setup:
+
+          (setq-local company-backends '(company-dabbrev)
+                      company-dabbrev-other-buffers nil
+                      company-dabbrev-ignore-case nil
+                      company-dabbrev-downcase nil)
+
+      -- User Option: company-dabbrev-ignore-case
+          This user option controls whether the case is ignored when
+          collecting completion candidates.  When the option is set to
+          ‘nil’, ‘Enjoy’ is suggested as a completion candidate for the
+          typed ‘Enj’ letters, but not for ‘enj’.  When the option is
+          set to ‘t’, ‘Enjoy’ is suggested as a candidate for both ‘Enj’
+          and ‘enj’ input; note that ‘enj’ prefix is "overwritten" by
+          completing with the ‘Enjoy’ candidate.  The third, default,
+          type of behavior solves this issue, keeping the case of the
+          typed prefix (and still collecting candidates
+          case-insensitively):
+
+               (setq company-dabbrev-ignore-case 'keep-prefix)
+
+          Now we can type ‘enj’, complete it with the suggested ‘Enjoy’,
+          and _enjoy_ the result.
+
+      -- User Option: company-dabbrev-downcase
+          This user option controls whether completion candidates are
+          down-cased before their display.  When the option is set to
+          ‘nil’, no transformation is performed; in the environment
+          described above, typing ‘Enj’ results in the candidate ‘Enjoy’
+          being suggested.  When the option is set to ‘t’, the
+          down-cased candidate ‘enjoy’ is suggested.  By default, this
+          option is set to ‘case-replace’, meaning taking the value of
+          the Emacs variable ‘case-replace’ (‘t’ is the current
+          default).
+
+
+ -- Function: company-ispell
+     This backend returns completion candidates collected by _Ispell_, a
+     built-in Emacs package that performs spell-checking.  *Note
+     Checking and Correcting Spelling: (emacs)Spelling.  Note that
+     _Ispell_ uses only one dictionary at a time (combining several
+     dictionaries into one file is an accepted practice).  By default,
+     _company-ispell_ suggests candidates from a dictionary specified by
+     the Emacs setting ‘ispell-complete-word-dict’.
+
+      -- User Option: company-ispell-dictionary
+          Optionally, set a file path for _company-ispell_ to use
+          another dictionary.
+
+
+File: company.info,  Node: File Name Completion,  Next: Template Expansion,  Prev: Text Completion,  Up: Package Backends
+
+5.3.3 File Name Completion
+--------------------------
+
+ -- Function: company-files
+     This backend can be used to retrieve completion candidates for the
+     absolute and relative paths in the directory structure of an
+     operating system.  The behavior of the _company-files_ backend can
+     be adjusted with the two user options.
+
+      -- User Option: company-files-exclusions
+          It may be desirable to exclude directories or files from the
+          list of suggested completion candidates.  For example,
+          someone's setup might look this way:
+
+               (setq company-files-exclusions '(".git/" ".DS_Store"))
+
+
+File: company.info,  Node: Template Expansion,  Prev: File Name Completion,  Up: Package Backends
+
+5.3.4 Template Expansion
+------------------------
+
+ -- Function: company-abbrev
+     This is a completion backend for a built-in word abbreviation mode
+     (*note (emacs)Abbrevs::), that allows completing abbreviations with
+     their expansions.
+
+ -- Function: company-tempo
+     A backend for users of Tempo
+     (https://www.lysator.liu.se/~davidk/elisp/), one more built-in
+     Emacs package for creating and inserting (expanding) templates.
+
+ -- Function: company-yasnippet
+     Used as a completion backend for the popular third-party template
+     system YASnippet (https://github.com/joaotavora/yasnippet).
+
+
+File: company.info,  Node: Candidates Post-Processing,  Prev: Package Backends,  Up: Backends
+
+5.4 Candidates Post-Processing
+==============================
+
+A list of completion candidates supplied by backends can be manipulated
+before output: reorganized, reduced, sorted, etc.  To apply adjustments,
+add a processing function name to the user option ‘company-transformers’
+list.
+
+The transformer functions are called in a sequence, each with the return
+value of the previous one.  The first function receives a sorted list of
+distinct completion candidates.  Note that the default sorting behavior
+may be overridden by backends and influenced by the use of the keyword
+‘:separate’ in the grouped backends list (*note Grouped Backends::).
+
+Since Company does not treat candidates with differing annotations as
+duplicates, it may sometimes be desirable to condense completion lists
+containing such entries.  In the example below, post-processing begins
+with their removal.  Then, the weighted ordering of the candidates is
+performed.
+
+     ;; Set grouped backends.
+     (setq company-backends '((company-capf company-dabbrev-code)))
+
+     ;; Apply post-processing.
+     (setq company-transformers '(delete-consecutive-dups
+                                  company-sort-by-occurrence))
+
+If a grouped backend contains the keyword ‘:separate’, you can use the
+‘delete-dups’ function instead.
+
+     ;; Set grouped backends.
+     (setq company-backends
+           '((:separate company-capf company-dabbrev-code)))
+
+     ;; Apply post-processing.
+     (setq company-transformers '(delete-dups
+                                  company-sort-by-occurrence))
+
+Company is bundled with several transformer functions.
+
+ -- Function: company-sort-by-occurrence
+     Sorts candidates using ‘company-occurrence-weight-function’
+     algorithm.
+
+ -- User Option: company-occurrence-weight-function
+     Can be set to one of ‘company-occurrence-prefer-closest-above’
+     (default) or ‘company-occurrence-prefer-any-closest’.  This user
+     option defines the behavior of the ‘company-sort-by-occurrence’
+     transformer function.
+
+ -- Function: company-sort-by-backend-importance
+     Sorts candidates as two priority groups, differentiated by the
+     keyword ‘:with’ (*note Grouped Backends::).  Backends positioned in
+     the backends list before the keyword ‘:with’ are treated as more
+     important.
+
+ -- Function: company-sort-prefer-same-case-prefix
+     Gives preference to the candidates that match the prefix
+     case-insensitively.
+
+
+File: company.info,  Node: Troubleshooting,  Next: Index,  Prev: Backends,  Up: Top
+
+6 Troubleshooting
+*****************
+
+If something goes wrong, the first thing we recommend doing is to
+execute command ‘M-x company-diag’ and thoroughly study its output.
+
+This command outputs important details about the internal workings of
+Company at the moment of the ‘company-diag’ command execution, including
+a responsible backend and a list of completion candidates provided by
+it.
+
+Based on the value of the ‘Used backend’ in the output of the command
+‘M-x company-diag’, these possible actions may follow:
+
+   • If the used backend does not belong to the Company package, report
+     the issue to the corresponding third-party package maintainer(s).
+
+   • If the used backend is ‘company-capf’, then take a look at the line
+     starting with ‘Value of c-a-p-f:’.  The issue could have been
+     caused by a function listed there.  To identify to which package it
+     belongs, type ‘M-x find-function <RET> <function-name> <RET>’.
+
+If the aforementioned steps didn't help to find the cause of the issue,
+then file a bug report to
+the Company Issue Tracker (https://github.com/company-mode/company-mode/issues),
+attaching the following information:
+
+  1. Output of the ‘M-x company-diag’.
+
+  2. The exact error message: you can find it in the ‘*Messages*’
+     buffer.
+
+  3. The steps to reproduce the behavior.  Ideally, if you can, starting
+     with a bare Emacs session: ‘emacs -Q’.
+
+  4. The backtrace of the error, which you can get by running the
+     command: ‘M-x toggle-debug-on-error’ before reproducing the error.
+
+
+File: company.info,  Node: Index,  Prev: Troubleshooting,  Up: Top
+
+Index
+*****
+
+* Menu:
+
+* Key Index::
+* Variable Index::
+* Function Index::
+* Concept Index::
+
+
+File: company.info,  Node: Key Index,  Next: Variable Index,  Up: Index
+
+Key Index
+=========
+
+[index]
+* Menu:
+
+* C-g:                                   Usage Basics.         (line 23)
+* C-g <1>:                               Commands.             (line 43)
+* C-g <2>:                               Candidates Search.    (line 11)
+* C-g <3>:                               Filter Candidates.    (line 14)
+* C-M-i:                                 Commands.             (line 39)
+* C-M-s:                                 Filter Candidates.    (line  6)
+* C-n:                                   Usage Basics.         (line 12)
+* C-n <1>:                               Commands.             (line 11)
+* C-o:                                   Filter Candidates.    (line 14)
+* C-p:                                   Usage Basics.         (line 12)
+* C-p <1>:                               Commands.             (line 16)
+* C-s:                                   Candidates Search.    (line  6)
+* M-<digit>:                             Quick Access a Candidate.
+                                                               (line  6)
+* M-g:                                   Commands.             (line 53)
+* M-h:                                   Commands.             (line 46)
+* RET:                                   Usage Basics.         (line 15)
+* RET <1>:                               Commands.             (line 21)
+* S-TAB:                                 Commands.             (line 36)
+* TAB:                                   Usage Basics.         (line 17)
+* TAB <1>:                               Commands.             (line 26)
+
+
+File: company.info,  Node: Variable Index,  Next: Function Index,  Prev: Key Index,  Up: Index
+
+Variable Index
+==============
+
+[index]
+* Menu:
+
+* company-after-completion-hook:         Configuration File.  (line  99)
+* company-backends:                      Backends.            (line  12)
+* company-backends <1>:                  Backends Usage Basics.
+                                                              (line   6)
+* company-backends <2>:                  Grouped Backends.    (line   6)
+* company-capf-disabled-functions:       Code Completion.     (line  26)
+* company-clang-arguments:               Code Completion.     (line  84)
+* company-completion-cancelled-hook:     Configuration File.  (line  95)
+* company-completion-finished-hook:      Configuration File.  (line  97)
+* company-completion-started-hook:       Configuration File.  (line  93)
+* company-dabbrev-code-completion-styles: Code Completion.    (line  61)
+* company-dabbrev-code-everywhere:       Code Completion.     (line  55)
+* company-dabbrev-code-modes:            Code Completion.     (line  39)
+* company-dabbrev-code-other-buffers:    Code Completion.     (line  45)
+* company-dabbrev-downcase:              Text Completion.     (line  64)
+* company-dabbrev-ignore-buffers:        Text Completion.     (line  32)
+* company-dabbrev-ignore-case:           Text Completion.     (line  47)
+* company-dabbrev-minimum-length:        Text Completion.     (line  13)
+* company-dabbrev-other-buffers:         Text Completion.     (line  23)
+* company-dot-icons-format:              Candidates Icons.    (line  38)
+* company-echo-truncate-lines:           Echo Frontends.      (line  33)
+* company-etags-completion-styles:       Code Completion.     (line 109)
+* company-etags-everywhere:              Code Completion.     (line 105)
+* company-etags-ignore-case:             Code Completion.     (line 102)
+* company-files-exclusions:              File Name Completion.
+                                                              (line  12)
+* company-format-margin-function:        Candidates Icons.    (line  13)
+* company-frontends:                     Frontends.           (line   6)
+* company-global-minibuffer:             Initial Setup.       (line  22)
+* company-global-modes:                  Configuration File.  (line  35)
+* company-icon-margin:                   Candidates Icons.    (line  24)
+* company-icon-size:                     Candidates Icons.    (line  24)
+* company-idle-delay:                    Configuration File.  (line  17)
+* company-inhibit-inside-symbols:        Configuration File.  (line  31)
+* company-insertion-on-trigger:          Configuration File.  (line  69)
+* company-insertion-triggers:            Configuration File.  (line  77)
+* company-ispell-dictionary:             Text Completion.     (line  85)
+* company-lighter-base:                  Configuration File.  (line  64)
+* company-minimum-prefix-length:         Configuration File.  (line   9)
+* company-mode:                          Initial Setup.       (line   6)
+* company-occurrence-weight-function:    Candidates Post-Processing.
+                                                              (line  47)
+* company-require-match:                 Configuration File.  (line  56)
+* company-search-regexp-function:        Candidates Search.   (line  13)
+* company-selection-wrap-around:         Configuration File.  (line  48)
+* company-show-quick-access:             Quick Access a Candidate.
+                                                              (line  12)
+* company-text-face-extra-attributes:    Candidates Icons.    (line  51)
+* company-text-icons-add-background:     Candidates Icons.    (line  59)
+* company-text-icons-format:             Candidates Icons.    (line  31)
+* company-text-icons-mapping:            Candidates Icons.    (line  47)
+* company-tooltip-align-annotations:     User Options.        (line   9)
+* company-tooltip-annotation-padding:    User Options.        (line  21)
+* company-tooltip-flip-when-above:       User Options.        (line  64)
+* company-tooltip-idle-delay:            Pseudo-Tooltip Frontends.
+                                                              (line  25)
+* company-tooltip-limit:                 User Options.        (line  29)
+* company-tooltip-margin:                User Options.        (line  98)
+* company-tooltip-maximum-width:         User Options.        (line  93)
+* company-tooltip-minimum:               User Options.        (line  49)
+* company-tooltip-minimum-width:         User Options.        (line  76)
+* company-tooltip-offset-display:        User Options.        (line  39)
+* company-tooltip-width-grow-only:       User Options.        (line  85)
+* company-transformers:                  Candidates Post-Processing.
+                                                              (line   6)
+
+
+File: company.info,  Node: Function Index,  Next: Concept Index,  Prev: Variable Index,  Up: Index
+
+Function Index
+==============
+
+[index]
+* Menu:
+
+* company-abbrev:                        Template Expansion.   (line  6)
+* company-abort:                         Commands.             (line 43)
+* company-begin-backend:                 Backends Usage Basics.
+                                                               (line 24)
+* company-capf:                          Code Completion.      (line  6)
+* company-childframe-frontend:           Childframe Frontends. (line 19)
+* company-childframe-unless-just-one-frontend: Childframe Frontends.
+                                                               (line 12)
+* company-clang:                         Code Completion.      (line 72)
+* company-complete:                      Usage Basics.         (line 10)
+* company-complete <1>:                  Commands.             (line 59)
+* company-complete-common:               Commands.             (line 39)
+* company-complete-common-or-cycle:      Commands.             (line 26)
+* company-complete-selection:            Commands.             (line 21)
+* company-cycle-backward:                Commands.             (line 36)
+* company-dabbrev:                       Text Completion.      (line  6)
+* company-dabbrev-code:                  Code Completion.      (line 33)
+* company-detect-icons-margin:           Candidates Icons.     (line 68)
+* company-diag:                          Backends Usage Basics.
+                                                               (line 13)
+* company-diag <1>:                      Troubleshooting.      (line  6)
+* company-dot-icons-margin:              Candidates Icons.     (line 37)
+* company-echo-frontend:                 Echo Frontends.       (line 21)
+* company-echo-metadata-frontend:        Echo Frontends.       (line  9)
+* company-echo-strip-common-frontend:    Echo Frontends.       (line 27)
+* company-etags:                         Code Completion.      (line 98)
+* company-files:                         File Name Completion. (line  6)
+* company-indent-or-complete-common:     Commands.             (line 59)
+* company-ispell:                        Text Completion.      (line 76)
+* company-keywords:                      Code Completion.      (line 67)
+* company-mode:                          Initial Setup.        (line  6)
+* company-other-backend:                 Backends Usage Basics.
+                                                               (line 16)
+* company-preview-common-frontend:       Preview Frontends.    (line 21)
+* company-preview-frontend:              Preview Frontends.    (line 17)
+* company-preview-if-just-one-frontend:  Preview Frontends.    (line 10)
+* company-pseudo-tooltip-frontend:       Pseudo-Tooltip Frontends.
+                                                               (line 20)
+* company-pseudo-tooltip-unless-just-one-frontend: Pseudo-Tooltip Frontends.
+                                                               (line 13)
+* company-pseudo-tooltip-unless-just-one-frontend-with-delay: Pseudo-Tooltip Frontends.
+                                                               (line 24)
+* company-search-flex-regexp:            Candidates Search.    (line 26)
+* company-search-flex-words-in-any-order-regexp: Candidates Search.
+                                                               (line 30)
+* company-search-words-in-any-order-regexp: Candidates Search. (line 23)
+* company-search-words-regexp:           Candidates Search.    (line 20)
+* company-select-next:                   Commands.             (line 11)
+* company-select-next-or-abort:          Commands.             (line 11)
+* company-select-previous:               Commands.             (line 16)
+* company-select-previous-or-abort:      Commands.             (line 16)
+* company-semantic:                      Code Completion.      (line 90)
+* company-show-doc-buffer:               Commands.             (line 46)
+* company-show-location:                 Commands.             (line 53)
+* company-sort-by-backend-importance:    Candidates Post-Processing.
+                                                               (line 53)
+* company-sort-by-occurrence:            Candidates Post-Processing.
+                                                               (line 43)
+* company-sort-prefer-same-case-prefix:  Candidates Post-Processing.
+                                                               (line 59)
+* company-tempo:                         Template Expansion.   (line 11)
+* company-text-icons-margin:             Candidates Icons.     (line 30)
+* company-tng-frontend:                  Structure.            (line 19)
+* company-tng-mode:                      Structure.            (line 19)
+* company-vscode-dark-icons-margin:      Candidates Icons.     (line 22)
+* company-vscode-light-icons-margin:     Candidates Icons.     (line 23)
+* company-yasnippet:                     Template Expansion.   (line 16)
+* global-company-mode:                   Initial Setup.        (line 18)
+
+
+File: company.info,  Node: Concept Index,  Prev: Function Index,  Up: Index
+
+Concept Index
+=============
+
+[index]
+* Menu:
+
+* :separate:                             Grouped Backends.     (line 14)
+* :separate <1>:                         Candidates Post-Processing.
+                                                               (line 11)
+* :separate <2>:                         Candidates Post-Processing.
+                                                               (line 30)
+* :with:                                 Grouped Backends.     (line 25)
+* abbrev:                                Template Expansion.   (line  6)
+* abort:                                 Usage Basics.         (line 23)
+* abort <1>:                             Commands.             (line 43)
+* activate:                              Initial Setup.        (line  8)
+* active backend:                        Backends Usage Basics.
+                                                               (line 13)
+* active backend <1>:                    Troubleshooting.      (line 14)
+* annotation:                            User Options.         (line 10)
+* annotation <1>:                        Candidates Post-Processing.
+                                                               (line 17)
+* auto-start:                            Initial Setup.        (line 13)
+* backend:                               Structure.            (line  6)
+* backend <1>:                           Structure.            (line  9)
+* backend <2>:                           Backends Usage Basics.
+                                                               (line 13)
+* backend <3>:                           Backends Usage Basics.
+                                                               (line 16)
+* backend <4>:                           Troubleshooting.      (line 14)
+* backends:                              Backends.             (line  6)
+* backends <1>:                          Backends Usage Basics.
+                                                               (line  6)
+* backends <2>:                          Grouped Backends.     (line  6)
+* backends <3>:                          Package Backends.     (line  6)
+* backends <4>:                          Candidates Post-Processing.
+                                                               (line 11)
+* basics:                                Usage Basics.         (line  6)
+* bug:                                   Troubleshooting.      (line  6)
+* bug <1>:                               Troubleshooting.      (line 25)
+* bundled backends:                      Package Backends.     (line  6)
+* cancel:                                Usage Basics.         (line 23)
+* cancel <1>:                            Commands.             (line 43)
+* candidate:                             Terminology.          (line 10)
+* candidate <1>:                         Usage Basics.         (line 12)
+* candidate <2>:                         Usage Basics.         (line 15)
+* candidate <3>:                         Preview Frontends.    (line  6)
+* childframe:                            Childframe Frontends. (line  6)
+* color:                                 Faces.                (line  6)
+* color <1>:                             Quick Access a Candidate.
+                                                               (line 34)
+* common part:                           Usage Basics.         (line 17)
+* common part <1>:                       Commands.             (line 26)
+* common part <2>:                       Commands.             (line 39)
+* common part <3>:                       Preview Frontends.    (line  6)
+* company-echo:                          Echo Frontends.       (line  6)
+* company-preview:                       Preview Frontends.    (line  6)
+* company-tng:                           Structure.            (line 19)
+* company-tooltip:                       Faces.                (line  6)
+* company-tooltip-search:                Candidates Search.    (line  6)
+* complete:                              Terminology.          (line  6)
+* complete <1>:                          Usage Basics.         (line 12)
+* complete <2>:                          Usage Basics.         (line 15)
+* complete <3>:                          Usage Basics.         (line 17)
+* complete <4>:                          Commands.             (line 21)
+* complete <5>:                          Preview Frontends.    (line  6)
+* completion:                            Terminology.          (line  6)
+* completion <1>:                        Usage Basics.         (line 12)
+* completion <2>:                        Usage Basics.         (line 15)
+* completion <3>:                        Usage Basics.         (line 17)
+* configure:                             Customization.        (line  6)
+* configure <1>:                         Customization Interface.
+                                                               (line  6)
+* configure <2>:                         Configuration File.   (line  6)
+* configure <3>:                         User Options.         (line  6)
+* configure <4>:                         Faces.                (line  6)
+* configure <5>:                         Preview Frontends.    (line 25)
+* configure <6>:                         Echo Frontends.       (line 38)
+* configure <7>:                         Candidates Search.    (line 34)
+* configure <8>:                         Quick Access a Candidate.
+                                                               (line 25)
+* configure <9>:                         Quick Access a Candidate.
+                                                               (line 34)
+* custom:                                Customization.        (line  6)
+* custom <1>:                            Customization Interface.
+                                                               (line  6)
+* custom <2>:                            Configuration File.   (line  6)
+* custom <3>:                            User Options.         (line  6)
+* custom <4>:                            Faces.                (line  6)
+* custom <5>:                            Preview Frontends.    (line 25)
+* custom <6>:                            Echo Frontends.       (line 38)
+* custom <7>:                            Candidates Search.    (line 34)
+* custom <8>:                            Quick Access a Candidate.
+                                                               (line 25)
+* custom <9>:                            Quick Access a Candidate.
+                                                               (line 34)
+* cycle backwards:                       Commands.             (line 36)
+* definition:                            Commands.             (line 53)
+* distribution:                          Installation.         (line  6)
+* doc:                                   Commands.             (line 46)
+* duplicates:                            Candidates Post-Processing.
+                                                               (line 17)
+* duplicates <1>:                        Candidates Post-Processing.
+                                                               (line 30)
+* echo:                                  Echo Frontends.       (line  6)
+* enable:                                Initial Setup.        (line  8)
+* error:                                 Troubleshooting.      (line  6)
+* error <1>:                             Troubleshooting.      (line 25)
+* expansion:                             Template Expansion.   (line  6)
+* extensible:                            Structure.            (line  6)
+* face:                                  Faces.                (line  6)
+* face <1>:                              Preview Frontends.    (line  6)
+* face <2>:                              Preview Frontends.    (line 25)
+* face <3>:                              Echo Frontends.       (line  6)
+* face <4>:                              Echo Frontends.       (line 38)
+* face <5>:                              Candidates Search.    (line  6)
+* face <6>:                              Candidates Search.    (line 34)
+* face <7>:                              Filter Candidates.    (line  6)
+* face <8>:                              Quick Access a Candidate.
+                                                               (line 34)
+* filter:                                Filter Candidates.    (line  6)
+* finish:                                Usage Basics.         (line 23)
+* finish <1>:                            Commands.             (line 43)
+* font:                                  Faces.                (line  6)
+* font <1>:                              Quick Access a Candidate.
+                                                               (line 34)
+* frontend:                              Structure.            (line  6)
+* frontend <1>:                          Structure.            (line  9)
+* frontends:                             Frontends.            (line  6)
+* grouped backends:                      Grouped Backends.     (line  6)
+* grouped backends <1>:                  Candidates Post-Processing.
+                                                               (line 11)
+* icon:                                  Candidates Icons.     (line  6)
+* install:                               Installation.         (line  6)
+* interface:                             User Options.         (line  6)
+* interface <1>:                         Faces.                (line  6)
+* interface <2>:                         Preview Frontends.    (line 25)
+* interface <3>:                         Echo Frontends.       (line 38)
+* interface <4>:                         Candidates Search.    (line 34)
+* interface <5>:                         Quick Access a Candidate.
+                                                               (line 34)
+* intro:                                 Initial Setup.        (line  6)
+* issue:                                 Troubleshooting.      (line  6)
+* issue tracker:                         Troubleshooting.      (line 25)
+* kind:                                  Candidates Icons.     (line  6)
+* location:                              Commands.             (line 53)
+* manual:                                Initial Setup.        (line  8)
+* manual <1>:                            Usage Basics.         (line 10)
+* margin:                                User Options.         (line 99)
+* margin <1>:                            Candidates Icons.     (line 14)
+* minor-mode:                            Initial Setup.        (line  6)
+* module:                                Structure.            (line  6)
+* module <1>:                            Structure.            (line  9)
+* navigate:                              Usage Basics.         (line 12)
+* next backend:                          Backends Usage Basics.
+                                                               (line 16)
+* non-prefix matches:                    Terminology.          (line 10)
+* package:                               Installation.         (line  6)
+* package backends:                      Package Backends.     (line  6)
+* pluggable:                             Structure.            (line  6)
+* pop-up:                                Tooltip Frontends.    (line  6)
+* popup:                                 Tooltip Frontends.    (line  6)
+* post-processing:                       Candidates Post-Processing.
+                                                               (line  6)
+* prefix matches:                        Terminology.          (line 10)
+* preview:                               Preview Frontends.    (line  6)
+* pseudo-tooltip:                        Pseudo-Tooltip Frontends.
+                                                               (line  6)
+* quick start:                           Initial Setup.        (line  6)
+* quick-access:                          Quick Access a Candidate.
+                                                               (line  6)
+* quit:                                  Usage Basics.         (line 23)
+* quit <1>:                              Commands.             (line 43)
+* search:                                Candidates Search.    (line  6)
+* select:                                Usage Basics.         (line 12)
+* select <1>:                            Commands.             (line 11)
+* select <2>:                            Commands.             (line 16)
+* snippet:                               Template Expansion.   (line  6)
+* sort:                                  Candidates Post-Processing.
+                                                               (line  6)
+* stop:                                  Usage Basics.         (line 23)
+* stop <1>:                              Commands.             (line 43)
+* TAB:                                   Structure.            (line 19)
+* Tab and Go:                            Structure.            (line 19)
+* template:                              Template Expansion.   (line  6)
+* third-party:                           Structure.            (line  9)
+* third-party <1>:                       Troubleshooting.      (line 17)
+* tooltip:                               Tooltip Frontends.    (line  6)
+* troubleshoot:                          Troubleshooting.      (line  6)
+* usage:                                 Usage Basics.         (line  6)
+
+
+
+Tag Table:
+Node: Top642
+Node: Overview2136
+Node: Terminology2526
+Node: Structure3415
+Node: Getting Started4566
+Node: Installation4844
+Node: Initial Setup5227
+Node: Usage Basics6385
+Node: Commands7361
+Ref: Commands-Footnote-110029
+Node: Customization10196
+Node: Customization Interface10668
+Node: Configuration File11201
+Ref: company-selection-wrap-around13523
+Node: Frontends16009
+Node: Tooltip Frontends16978
+Node: Childframe Frontends17463
+Node: Pseudo-Tooltip Frontends18517
+Node: User Options20910
+Node: Candidates Icons25623
+Ref: Candidates Icons-Footnote-128805
+Node: Faces29042
+Node: Preview Frontends30276
+Ref: Preview Frontends-Footnote-131534
+Node: Echo Frontends31661
+Node: Candidates Search33188
+Node: Filter Candidates34740
+Node: Quick Access a Candidate35520
+Node: Backends37136
+Node: Backends Usage Basics38166
+Ref: Backends Usage Basics-Footnote-139597
+Node: Grouped Backends39681
+Node: Package Backends41192
+Node: Code Completion42119
+Node: Text Completion47636
+Node: File Name Completion52068
+Node: Template Expansion52833
+Node: Candidates Post-Processing53552
+Node: Troubleshooting56129
+Node: Index57800
+Node: Key Index57963
+Node: Variable Index59608
+Node: Function Index64465
+Node: Concept Index69549
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/dir b/emacs/.emacs.d/elpa/company-20260721.100/dir
new file mode 100644
index 0000000..a7ea2be
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/dir
@@ -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 misc features
+* Company: (company).           A modular text completion framework.
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/LICENSE b/emacs/.emacs.d/elpa/company-20260721.100/icons/LICENSE
new file mode 100644
index 0000000..52bd145
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/LICENSE
@@ -0,0 +1,395 @@
+Attribution 4.0 International
+
+=======================================================================
+
+Creative Commons Corporation ("Creative Commons") is not a law firm and
+does not provide legal services or legal advice. Distribution of
+Creative Commons public licenses does not create a lawyer-client or
+other relationship. Creative Commons makes its licenses and related
+information available on an "as-is" basis. Creative Commons gives no
+warranties regarding its licenses, any material licensed under their
+terms and conditions, or any related information. Creative Commons
+disclaims all liability for damages resulting from their use to the
+fullest extent possible.
+
+Using Creative Commons Public Licenses
+
+Creative Commons public licenses provide a standard set of terms and
+conditions that creators and other rights holders may use to share
+original works of authorship and other material subject to copyright
+and certain other rights specified in the public license below. The
+following considerations are for informational purposes only, are not
+exhaustive, and do not form part of our licenses.
+
+     Considerations for licensors: Our public licenses are
+     intended for use by those authorized to give the public
+     permission to use material in ways otherwise restricted by
+     copyright and certain other rights. Our licenses are
+     irrevocable. Licensors should read and understand the terms
+     and conditions of the license they choose before applying it.
+     Licensors should also secure all rights necessary before
+     applying our licenses so that the public can reuse the
+     material as expected. Licensors should clearly mark any
+     material not subject to the license. This includes other CC-
+     licensed material, or material used under an exception or
+     limitation to copyright. More considerations for licensors:
+	wiki.creativecommons.org/Considerations_for_licensors
+
+     Considerations for the public: By using one of our public
+     licenses, a licensor grants the public permission to use the
+     licensed material under specified terms and conditions. If
+     the licensor's permission is not necessary for any reason--for
+     example, because of any applicable exception or limitation to
+     copyright--then that use is not regulated by the license. Our
+     licenses grant only permissions under copyright and certain
+     other rights that a licensor has authority to grant. Use of
+     the licensed material may still be restricted for other
+     reasons, including because others have copyright or other
+     rights in the material. A licensor may make special requests,
+     such as asking that all changes be marked or described.
+     Although not required by our licenses, you are encouraged to
+     respect those requests where reasonable. More_considerations
+     for the public:
+	wiki.creativecommons.org/Considerations_for_licensees
+
+=======================================================================
+
+Creative Commons Attribution 4.0 International Public License
+
+By exercising the Licensed Rights (defined below), You accept and agree
+to be bound by the terms and conditions of this Creative Commons
+Attribution 4.0 International Public License ("Public License"). To the
+extent this Public License may be interpreted as a contract, You are
+granted the Licensed Rights in consideration of Your acceptance of
+these terms and conditions, and the Licensor grants You such rights in
+consideration of benefits the Licensor receives from making the
+Licensed Material available under these terms and conditions.
+
+
+Section 1 -- Definitions.
+
+  a. Adapted Material means material subject to Copyright and Similar
+     Rights that is derived from or based upon the Licensed Material
+     and in which the Licensed Material is translated, altered,
+     arranged, transformed, or otherwise modified in a manner requiring
+     permission under the Copyright and Similar Rights held by the
+     Licensor. For purposes of this Public License, where the Licensed
+     Material is a musical work, performance, or sound recording,
+     Adapted Material is always produced where the Licensed Material is
+     synched in timed relation with a moving image.
+
+  b. Adapter's License means the license You apply to Your Copyright
+     and Similar Rights in Your contributions to Adapted Material in
+     accordance with the terms and conditions of this Public License.
+
+  c. Copyright and Similar Rights means copyright and/or similar rights
+     closely related to copyright including, without limitation,
+     performance, broadcast, sound recording, and Sui Generis Database
+     Rights, without regard to how the rights are labeled or
+     categorized. For purposes of this Public License, the rights
+     specified in Section 2(b)(1)-(2) are not Copyright and Similar
+     Rights.
+
+  d. Effective Technological Measures means those measures that, in the
+     absence of proper authority, may not be circumvented under laws
+     fulfilling obligations under Article 11 of the WIPO Copyright
+     Treaty adopted on December 20, 1996, and/or similar international
+     agreements.
+
+  e. Exceptions and Limitations means fair use, fair dealing, and/or
+     any other exception or limitation to Copyright and Similar Rights
+     that applies to Your use of the Licensed Material.
+
+  f. Licensed Material means the artistic or literary work, database,
+     or other material to which the Licensor applied this Public
+     License.
+
+  g. Licensed Rights means the rights granted to You subject to the
+     terms and conditions of this Public License, which are limited to
+     all Copyright and Similar Rights that apply to Your use of the
+     Licensed Material and that the Licensor has authority to license.
+
+  h. Licensor means the individual(s) or entity(ies) granting rights
+     under this Public License.
+
+  i. Share means to provide material to the public by any means or
+     process that requires permission under the Licensed Rights, such
+     as reproduction, public display, public performance, distribution,
+     dissemination, communication, or importation, and to make material
+     available to the public including in ways that members of the
+     public may access the material from a place and at a time
+     individually chosen by them.
+
+  j. Sui Generis Database Rights means rights other than copyright
+     resulting from Directive 96/9/EC of the European Parliament and of
+     the Council of 11 March 1996 on the legal protection of databases,
+     as amended and/or succeeded, as well as other essentially
+     equivalent rights anywhere in the world.
+
+  k. You means the individual or entity exercising the Licensed Rights
+     under this Public License. Your has a corresponding meaning.
+
+
+Section 2 -- Scope.
+
+  a. License grant.
+
+       1. Subject to the terms and conditions of this Public License,
+          the Licensor hereby grants You a worldwide, royalty-free,
+          non-sublicensable, non-exclusive, irrevocable license to
+          exercise the Licensed Rights in the Licensed Material to:
+
+            a. reproduce and Share the Licensed Material, in whole or
+               in part; and
+
+            b. produce, reproduce, and Share Adapted Material.
+
+       2. Exceptions and Limitations. For the avoidance of doubt, where
+          Exceptions and Limitations apply to Your use, this Public
+          License does not apply, and You do not need to comply with
+          its terms and conditions.
+
+       3. Term. The term of this Public License is specified in Section
+          6(a).
+
+       4. Media and formats; technical modifications allowed. The
+          Licensor authorizes You to exercise the Licensed Rights in
+          all media and formats whether now known or hereafter created,
+          and to make technical modifications necessary to do so. The
+          Licensor waives and/or agrees not to assert any right or
+          authority to forbid You from making technical modifications
+          necessary to exercise the Licensed Rights, including
+          technical modifications necessary to circumvent Effective
+          Technological Measures. For purposes of this Public License,
+          simply making modifications authorized by this Section 2(a)
+          (4) never produces Adapted Material.
+
+       5. Downstream recipients.
+
+            a. Offer from the Licensor -- Licensed Material. Every
+               recipient of the Licensed Material automatically
+               receives an offer from the Licensor to exercise the
+               Licensed Rights under the terms and conditions of this
+               Public License.
+
+            b. No downstream restrictions. You may not offer or impose
+               any additional or different terms or conditions on, or
+               apply any Effective Technological Measures to, the
+               Licensed Material if doing so restricts exercise of the
+               Licensed Rights by any recipient of the Licensed
+               Material.
+
+       6. No endorsement. Nothing in this Public License constitutes or
+          may be construed as permission to assert or imply that You
+          are, or that Your use of the Licensed Material is, connected
+          with, or sponsored, endorsed, or granted official status by,
+          the Licensor or others designated to receive attribution as
+          provided in Section 3(a)(1)(A)(i).
+
+  b. Other rights.
+
+       1. Moral rights, such as the right of integrity, are not
+          licensed under this Public License, nor are publicity,
+          privacy, and/or other similar personality rights; however, to
+          the extent possible, the Licensor waives and/or agrees not to
+          assert any such rights held by the Licensor to the limited
+          extent necessary to allow You to exercise the Licensed
+          Rights, but not otherwise.
+
+       2. Patent and trademark rights are not licensed under this
+          Public License.
+
+       3. To the extent possible, the Licensor waives any right to
+          collect royalties from You for the exercise of the Licensed
+          Rights, whether directly or through a collecting society
+          under any voluntary or waivable statutory or compulsory
+          licensing scheme. In all other cases the Licensor expressly
+          reserves any right to collect such royalties.
+
+
+Section 3 -- License Conditions.
+
+Your exercise of the Licensed Rights is expressly made subject to the
+following conditions.
+
+  a. Attribution.
+
+       1. If You Share the Licensed Material (including in modified
+          form), You must:
+
+            a. retain the following if it is supplied by the Licensor
+               with the Licensed Material:
+
+                 i. identification of the creator(s) of the Licensed
+                    Material and any others designated to receive
+                    attribution, in any reasonable manner requested by
+                    the Licensor (including by pseudonym if
+                    designated);
+
+                ii. a copyright notice;
+
+               iii. a notice that refers to this Public License;
+
+                iv. a notice that refers to the disclaimer of
+                    warranties;
+
+                 v. a URI or hyperlink to the Licensed Material to the
+                    extent reasonably practicable;
+
+            b. indicate if You modified the Licensed Material and
+               retain an indication of any previous modifications; and
+
+            c. indicate the Licensed Material is licensed under this
+               Public License, and include the text of, or the URI or
+               hyperlink to, this Public License.
+
+       2. You may satisfy the conditions in Section 3(a)(1) in any
+          reasonable manner based on the medium, means, and context in
+          which You Share the Licensed Material. For example, it may be
+          reasonable to satisfy the conditions by providing a URI or
+          hyperlink to a resource that includes the required
+          information.
+
+       3. If requested by the Licensor, You must remove any of the
+          information required by Section 3(a)(1)(A) to the extent
+          reasonably practicable.
+
+       4. If You Share Adapted Material You produce, the Adapter's
+          License You apply must not prevent recipients of the Adapted
+          Material from complying with this Public License.
+
+
+Section 4 -- Sui Generis Database Rights.
+
+Where the Licensed Rights include Sui Generis Database Rights that
+apply to Your use of the Licensed Material:
+
+  a. for the avoidance of doubt, Section 2(a)(1) grants You the right
+     to extract, reuse, reproduce, and Share all or a substantial
+     portion of the contents of the database;
+
+  b. if You include all or a substantial portion of the database
+     contents in a database in which You have Sui Generis Database
+     Rights, then the database in which You have Sui Generis Database
+     Rights (but not its individual contents) is Adapted Material; and
+
+  c. You must comply with the conditions in Section 3(a) if You Share
+     all or a substantial portion of the contents of the database.
+
+For the avoidance of doubt, this Section 4 supplements and does not
+replace Your obligations under this Public License where the Licensed
+Rights include other Copyright and Similar Rights.
+
+
+Section 5 -- Disclaimer of Warranties and Limitation of Liability.
+
+  a. UNLESS OTHERWISE SEPARATELY UNDERTAKEN BY THE LICENSOR, TO THE
+     EXTENT POSSIBLE, THE LICENSOR OFFERS THE LICENSED MATERIAL AS-IS
+     AND AS-AVAILABLE, AND MAKES NO REPRESENTATIONS OR WARRANTIES OF
+     ANY KIND CONCERNING THE LICENSED MATERIAL, WHETHER EXPRESS,
+     IMPLIED, STATUTORY, OR OTHER. THIS INCLUDES, WITHOUT LIMITATION,
+     WARRANTIES OF TITLE, MERCHANTABILITY, FITNESS FOR A PARTICULAR
+     PURPOSE, NON-INFRINGEMENT, ABSENCE OF LATENT OR OTHER DEFECTS,
+     ACCURACY, OR THE PRESENCE OR ABSENCE OF ERRORS, WHETHER OR NOT
+     KNOWN OR DISCOVERABLE. WHERE DISCLAIMERS OF WARRANTIES ARE NOT
+     ALLOWED IN FULL OR IN PART, THIS DISCLAIMER MAY NOT APPLY TO YOU.
+
+  b. TO THE EXTENT POSSIBLE, IN NO EVENT WILL THE LICENSOR BE LIABLE
+     TO YOU ON ANY LEGAL THEORY (INCLUDING, WITHOUT LIMITATION,
+     NEGLIGENCE) OR OTHERWISE FOR ANY DIRECT, SPECIAL, INDIRECT,
+     INCIDENTAL, CONSEQUENTIAL, PUNITIVE, EXEMPLARY, OR OTHER LOSSES,
+     COSTS, EXPENSES, OR DAMAGES ARISING OUT OF THIS PUBLIC LICENSE OR
+     USE OF THE LICENSED MATERIAL, EVEN IF THE LICENSOR HAS BEEN
+     ADVISED OF THE POSSIBILITY OF SUCH LOSSES, COSTS, EXPENSES, OR
+     DAMAGES. WHERE A LIMITATION OF LIABILITY IS NOT ALLOWED IN FULL OR
+     IN PART, THIS LIMITATION MAY NOT APPLY TO YOU.
+
+  c. The disclaimer of warranties and limitation of liability provided
+     above shall be interpreted in a manner that, to the extent
+     possible, most closely approximates an absolute disclaimer and
+     waiver of all liability.
+
+
+Section 6 -- Term and Termination.
+
+  a. This Public License applies for the term of the Copyright and
+     Similar Rights licensed here. However, if You fail to comply with
+     this Public License, then Your rights under this Public License
+     terminate automatically.
+
+  b. Where Your right to use the Licensed Material has terminated under
+     Section 6(a), it reinstates:
+
+       1. automatically as of the date the violation is cured, provided
+          it is cured within 30 days of Your discovery of the
+          violation; or
+
+       2. upon express reinstatement by the Licensor.
+
+     For the avoidance of doubt, this Section 6(b) does not affect any
+     right the Licensor may have to seek remedies for Your violations
+     of this Public License.
+
+  c. For the avoidance of doubt, the Licensor may also offer the
+     Licensed Material under separate terms or conditions or stop
+     distributing the Licensed Material at any time; however, doing so
+     will not terminate this Public License.
+
+  d. Sections 1, 5, 6, 7, and 8 survive termination of this Public
+     License.
+
+
+Section 7 -- Other Terms and Conditions.
+
+  a. The Licensor shall not be bound by any additional or different
+     terms or conditions communicated by You unless expressly agreed.
+
+  b. Any arrangements, understandings, or agreements regarding the
+     Licensed Material not stated herein are separate from and
+     independent of the terms and conditions of this Public License.
+
+
+Section 8 -- Interpretation.
+
+  a. For the avoidance of doubt, this Public License does not, and
+     shall not be interpreted to, reduce, limit, restrict, or impose
+     conditions on any use of the Licensed Material that could lawfully
+     be made without permission under this Public License.
+
+  b. To the extent possible, if any provision of this Public License is
+     deemed unenforceable, it shall be automatically reformed to the
+     minimum extent necessary to make it enforceable. If the provision
+     cannot be reformed, it shall be severed from this Public License
+     without affecting the enforceability of the remaining terms and
+     conditions.
+
+  c. No term or condition of this Public License will be waived and no
+     failure to comply consented to unless expressly agreed to by the
+     Licensor.
+
+  d. Nothing in this Public License constitutes or may be interpreted
+     as a limitation upon, or waiver of, any privileges and immunities
+     that apply to the Licensor or You, including from the legal
+     processes of any jurisdiction or authority.
+
+
+=======================================================================
+
+Creative Commons is not a party to its public
+licenses. Notwithstanding, Creative Commons may elect to apply one of
+its public licenses to material it publishes and in those instances
+will be considered the “Licensor.” The text of the Creative Commons
+public licenses is dedicated to the public domain under the CC0 Public
+Domain Dedication. Except for the limited purpose of indicating that
+material is shared under a Creative Commons public license or as
+otherwise permitted by the Creative Commons policies published at
+creativecommons.org/policies, Creative Commons does not authorize the
+use of the trademark "Creative Commons" or any other trademark or logo
+of Creative Commons without its prior written consent including,
+without limitation, in connection with any unauthorized modifications
+to any of its public licenses or any other arrangements,
+understandings, or agreements concerning use of licensed material. For
+the avoidance of doubt, this paragraph does not form part of the
+public licenses.
+
+Creative Commons may be contacted at creativecommons.org.
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/attribution.md b/emacs/.emacs.d/elpa/company-20260721.100/icons/attribution.md
new file mode 100644
index 0000000..33513fc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/attribution.md
@@ -0,0 +1,5 @@
+The icons in this directory have been made by "Microsoft and any contributors",
+see the [development repository](https://github.com/microsoft/vscode-icons/).
+
+They are distributed under Creative Commons Attribution 4.0 International Public
+License, see the LICENSE file in this directory.
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/filter.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/filter.svg
new file mode 100644
index 0000000..5af9646
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/filter.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M15 2V3.66963L10 8.42874V14H6V8.42874L1 3.66963V2H15ZM7 8V13H9V8L14 3.24089V3H2V3.24089L7 8Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/folder.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/folder.svg
new file mode 100644
index 0000000..7387525
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/folder.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M14.5 3H7.70996L6.85999 2.15002L6.51001 2H1.51001L1.01001 2.5V6.5V13.5L1.51001 14H14.51L15.01 13.5V9V3.5L14.5 3ZM13.99 11.49V13H1.98999V11.49V7.48999V7H6.47998L6.82996 6.84998L7.68994 5.98999H14V7.48999L13.99 11.49ZM13.99 5H7.48999L7.14001 5.15002L6.28003 6.01001H2V3.01001H6.29004L7.14001 3.85999L7.5 4.01001H14L13.99 5Z" fill="#C5C5C5"/>
+</svg>
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/references.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/references.svg
new file mode 100644
index 0000000..9e4c78e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/references.svg
@@ -0,0 +1,3 @@
+<svg width="24" height="24" viewBox="0 0 24 24" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M11.1052 4.5613L7.67505 7.98827L6.54072 6.86834L8.61098 4.78848H3.81131C3.17483 4.78848 2.56442 5.04132 2.11436 5.49138C1.6643 5.94144 1.41147 6.55184 1.41147 7.18832C1.41147 7.8248 1.6643 8.43521 2.11436 8.88527C2.56442 9.33532 3.17483 9.58816 3.81131 9.58816H4.70085V11.1881H3.8209C2.7921 11.142 1.8207 10.7009 1.10896 9.95661C0.397222 9.21231 0 8.22216 0 7.19232C0 6.16249 0.397222 5.17234 1.10896 4.42803C1.8207 3.68373 2.7921 3.24263 3.8209 3.19659H8.62058L6.54072 1.13112L7.67505 0L11.1052 3.43177V4.5613ZM16.6201 24H7.0207L6.22075 23.2V10.4121L7.0207 9.61215H16.6201L17.42 10.4121V23.2L16.6201 24ZM7.82064 22.4001H15.8201V11.212H7.82064V22.4001ZM13.4203 1.6015H23.0196L23.8196 2.40145V15.1878L23.0196 15.9877H19.0199V14.3878H22.2197V3.20139H14.2202V7.98828H12.6203V2.40145L13.4203 1.6015ZM14.2202 12.7879H9.42053V14.3878H14.2202V12.7879ZM9.42053 15.9877H14.2202V17.5876H9.42053V15.9877ZM14.2202 19.1875H9.42053V20.7874H14.2202V19.1875ZM15.8201 4.78848H20.6198V6.38838H15.8201V4.78848ZM20.6198 11.188H19.0199V12.7879H20.6198V11.188ZM17.2824 8.01228V7.98828H20.6198V9.58817H18.8583L17.2824 8.01228Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/search.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/search.svg
new file mode 100644
index 0000000..eba698f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/search.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 24 24" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M15.25 1.02546e-06C13.6605 -0.000791296 12.1046 0.457574 10.7694 1.32007C9.43422 2.18256 8.37657 3.4124 7.72375 4.8617C7.07094 6.31099 6.85077 7.91801 7.0896 9.4895C7.32843 11.061 8.01604 12.5301 9.06995 13.72L1 22.88L2.12 23.88L10.17 14.76C11.2055 15.5693 12.4192 16.1196 13.7103 16.365C15.0014 16.6104 16.3325 16.5437 17.5927 16.1707C18.8528 15.7976 20.0055 15.1288 20.955 14.2201C21.9044 13.3114 22.623 12.1891 23.0509 10.9465C23.4789 9.70396 23.6038 8.37703 23.4153 7.07642C23.2267 5.77581 22.7302 4.53915 21.967 3.46924C21.2039 2.39933 20.1962 1.52711 19.0278 0.925416C17.8595 0.323719 16.5642 0.00991516 15.25 0.0100108V1.02546e-06ZM15.25 15C13.915 15 12.6099 14.6041 11.4999 13.8624C10.3898 13.1207 9.52469 12.0665 9.01379 10.8331C8.5029 9.59973 8.36919 8.24248 8.62964 6.93311C8.89009 5.62373 9.53305 4.42106 10.4771 3.47705C11.4211 2.53305 12.6237 1.89009 13.9331 1.62964C15.2425 1.36919 16.5997 1.5029 17.8331 2.01379C19.0665 2.52469 20.1207 3.38985 20.8624 4.49988C21.6041 5.60991 22 6.91498 22 8.25C22 10.0402 21.2888 11.7571 20.0229 13.023C18.7571 14.2888 17.0402 15 15.25 15Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-array.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-array.svg
new file mode 100644
index 0000000..e92131d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-array.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M1.5 2L1 2.5V13.5L1.5 14H4V13H2V3H4V2H1.5ZM14.5 14L15 13.5L15 2.5L14.5 2H12V3L14 3L14 13H12V14H14.5Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-boolean.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-boolean.svg
new file mode 100644
index 0000000..e009568
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-boolean.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M1 3.5L1.5 3H14.5L15 3.5L15 12.5L14.5 13H1.5L1 12.5V3.5ZM14 4H8L8 7.49297L7.89793 7.49285L7.5 7.49225V7.49237L3.92614 7.48807L6.01638 5.39784L5.30927 4.69073L2.35356 7.64645L2.35356 8.35355L5.30927 11.3093L6.01638 10.6022L3.90228 8.48807L7.8976 8.49285L8 8.493V7.50702L11.9073 7.51222L9.79289 5.39784L10.5 4.69073L13.4557 7.64645V8.35355L10.5 11.3093L9.79289 10.6022L11.8828 8.51222L8 8.50702V12H14V4Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-class.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-class.svg
new file mode 100644
index 0000000..b35a6bb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-class.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M11.34 9.70998H12.05L14.72 7.04005V6.32997L13.38 5.00001H12.68L10.86 6.81007H5.86V5.56007L7.71999 3.70997V3L5.71998 1H5.00001L1 5.00001V5.70997L3 7.70998H3.71003L4.84998 6.56007V12.35L5.34998 12.85H10V13.37L11.33 14.71H12.04L14.7101 12.0401V11.33L13.37 10H12.67L10.81 11.85H5.81001V7.84999H10V8.32997L11.34 9.70998ZM13.0301 6.06007L13.66 6.68995L11.66 8.68996L11.0301 8.06007L13.0301 6.06007ZM13.0301 11.0601L13.66 11.69L11.66 13.69L11.0301 13.0601L13.0301 11.0601ZM3.34998 6.65004L2.06 5.34998L5.34998 2.06006L6.65004 3.34998L3.34998 6.65004Z" fill="#EE9D28"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-color.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-color.svg
new file mode 100644
index 0000000..91469f9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-color.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M8 1.00305C6.14348 1.00305 4.36299 1.74059 3.05023 3.05334C1.73748 4.3661 1 6.14654 1 8.00305V8.43311C1.09 9.94311 2.91 10.2231 4 9.13306C4.35648 8.81625 4.82054 8.64759 5.29724 8.66162C5.77395 8.67565 6.22729 8.87127 6.56451 9.2085C6.90174 9.54572 7.09736 9.99912 7.11139 10.4758C7.12542 10.9525 6.95682 11.4166 6.64001 11.7731C5.54001 12.9331 5.85 14.843 7.44 14.973H8.03998C9.89649 14.973 11.677 14.2356 12.9897 12.9229C14.3025 11.6101 15.04 9.82954 15.04 7.97302C15.04 6.11651 14.3025 4.33607 12.9897 3.02332C11.677 1.71056 9.89649 0.973022 8.03998 0.973022L8 1.00305ZM8 14.0031H7.47998C7.34751 13.9989 7.22047 13.9495 7.12 13.863C7.04052 13.7807 6.98815 13.6761 6.96997 13.5631C6.9381 13.3682 6.95328 13.1684 7.01416 12.9806C7.07504 12.7927 7.17989 12.6222 7.32001 12.483C7.84048 11.9474 8.13165 11.2299 8.13165 10.483C8.13165 9.73615 7.84048 9.0187 7.32001 8.48303C7.05348 8.21635 6.73699 8.00481 6.38867 7.86047C6.04036 7.71614 5.66702 7.64185 5.28998 7.64185C4.91294 7.64185 4.5396 7.71614 4.19128 7.86047C3.84297 8.00481 3.52654 8.21635 3.26001 8.48303C3.15068 8.61081 3.01089 8.709 2.85358 8.76843C2.69626 8.82786 2.52649 8.84657 2.35999 8.823C2.27593 8.80694 2.19903 8.76498 2.14001 8.703C2.07131 8.6224 2.03556 8.5189 2.03998 8.41309V8.04309C2.03998 6.8564 2.39192 5.69629 3.05121 4.70959C3.7105 3.7229 4.64754 2.95388 5.7439 2.49976C6.84025 2.04563 8.04669 1.92681 9.21057 2.15833C10.3745 2.38984 11.4435 2.9613 12.2827 3.80042C13.1218 4.63953 13.6932 5.70867 13.9247 6.87256C14.1562 8.03644 14.0374 9.24275 13.5833 10.3391C13.1291 11.4355 12.3601 12.3726 11.3734 13.0319C10.3867 13.6911 9.22667 14.0431 8.03998 14.0431L8 14.0031ZM9 3.99683C9 4.54911 8.55228 4.99683 8 4.99683C7.44771 4.99683 7 4.54911 7 3.99683C7 3.44454 7.44771 2.99683 8 2.99683C8.55228 2.99683 9 3.44454 9 3.99683ZM12 11.0037C12 11.5559 11.5523 12.0037 11 12.0037C10.4477 12.0037 10 11.5559 10 11.0037C10 10.4514 10.4477 10.0037 11 10.0037C11.5523 10.0037 12 10.4514 12 11.0037ZM5 6.00415C5.55229 6.00415 6 5.55644 6 5.00415C6 4.45187 5.55229 4.00415 5 4.00415C4.44772 4.00415 4 4.45187 4 5.00415C4 5.55644 4.44772 6.00415 5 6.00415ZM12 5.00415C12 5.55644 11.5523 6.00415 11 6.00415C10.4477 6.00415 10 5.55644 10 5.00415C10 4.45187 10.4477 4.00415 11 4.00415C11.5523 4.00415 12 4.45187 12 5.00415ZM13.0001 7.99939C13.0001 8.55167 12.5524 8.99939 12.0001 8.99939C11.4478 8.99939 11.0001 8.55167 11.0001 7.99939C11.0001 7.4471 11.4478 6.99939 12.0001 6.99939C12.5524 6.99939 13.0001 7.4471 13.0001 7.99939Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-constant.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-constant.svg
new file mode 100644
index 0000000..0e90eca
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-constant.svg
@@ -0,0 +1,4 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M4 6H12V7H4V6ZM12 9H4V10H12V9Z" fill="#C5C5C5"/>
+<path fill-rule="evenodd" clip-rule="evenodd" d="M1 4L2 3H14L15 4V12L14 13H2L1 12V4ZM2 4V12H14V4H2Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-enumerator-member.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-enumerator-member.svg
new file mode 100644
index 0000000..53735c1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-enumerator-member.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M7 3L8 2H14L15 3V8L14 9H10V8H14V3H8V6H7V3ZM9 9V8L8 7H7H2L1 8V13L2 14H8L9 13V9ZM8 8V9V13H2V8H7H8ZM9.41421 7L9 6.58579V6H13V7H9.41421ZM9 4H13V5H9V4ZM7 10H3V11H7V10Z" fill="#75BEFF"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-enumerator.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-enumerator.svg
new file mode 100644
index 0000000..2197f66
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-enumerator.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M14 2H8L7 3V6H8V3H14V8H10V9H14L15 8V3L14 2ZM9 6H13V7H9.41L9 6.59V6ZM7 7H2L1 8V13L2 14H8L9 13V8L8 7H7ZM8 13H2V8H8V9V13ZM3 9H7V10H3V9ZM3 11H7V12H3V11ZM9 4H13V5H9V4Z" fill="#EE9D28"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-event.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-event.svg
new file mode 100644
index 0000000..051bef3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-event.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M7.41354 1.55996L8.31152 1H11.6056L12.424 2.57465L10.2356 6H12.0174L12.7363 7.69512L5.61943 15L4.01675 13.837L6.11943 10H4.89798L4 8.55996L7.41354 1.55996ZM7.78033 9L4.90054 14.3049L12.0174 7H8.31152L11.6056 2H8.31152L4.89798 9H7.78033Z" fill="#EE9D28"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-field.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-field.svg
new file mode 100644
index 0000000..f7b9e28
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-field.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M14.45 4.5L9.44995 2H8.55005L1.55005 5.5L1 6.39001V10.89L1.55005 11.79L6.55005 14.29H7.44995L14.45 10.79L15 9.89001V5.39001L14.45 4.5ZM6.44995 13.14L1.94995 10.89V7.17004L6.44995 9.17004V13.14ZM6.94995 8.33997L2.29004 6.22998L8.94995 2.89001L13.62 5.22998L6.94995 8.33997ZM13.95 9.89001L7.44995 13.14V9.20996L13.95 6.20996V9.89001Z" fill="#75BEFF"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-file.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-file.svg
new file mode 100644
index 0000000..c9b6a03
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-file.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M13.85 4.44L10.57 1.14L10.22 1H2.5L2 1.5V14.5L2.5 15H13.5L14 14.5V4.8L13.85 4.44ZM13 5H10V2L13 5ZM3 14V2H9V5.5L9.5 6H13V14H3Z" fill="#C5C5C5"/>
+</svg>
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-interface.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-interface.svg
new file mode 100644
index 0000000..b8ff0ab
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-interface.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M11.4965 4C10.655 3.9989 9.84136 4.30189 9.20557 4.85315C8.56977 5.40442 8.15465 6.16684 8.0365 7H4.9364C4.8147 6.52867 4.52533 6.11794 4.12244 5.84473C3.71955 5.57152 3.23083 5.45466 2.74792 5.51599C2.26502 5.57733 1.82106 5.81261 1.49927 6.17786C1.17747 6.54311 1 7.01322 1 7.5C1 7.98679 1.17747 8.45689 1.49927 8.82215C1.82106 9.1874 2.26502 9.42267 2.74792 9.48401C3.23083 9.54535 3.71955 9.42848 4.12244 9.15528C4.52533 8.88207 4.8147 8.47133 4.9364 8H8.0365C8.13236 8.66418 8.41717 9.28683 8.85693 9.7937C9.2967 10.3006 9.87284 10.6703 10.5168 10.8589C11.1609 11.0475 11.8455 11.047 12.4893 10.8574C13.133 10.6679 13.7087 10.2973 14.1477 9.7898C14.5867 9.28227 14.8706 8.65919 14.9655 7.99488C15.0603 7.33056 14.9621 6.65298 14.6827 6.04285C14.4034 5.43272 13.9545 4.91578 13.3895 4.55359C12.8246 4.19141 12.1675 3.99922 11.4965 4V4ZM11.4965 10C11.002 10 10.5187 9.85332 10.1075 9.57862C9.69642 9.30391 9.37599 8.91348 9.18677 8.45667C8.99755 7.99985 8.94809 7.49728 9.04456 7.01233C9.14102 6.52738 9.37901 6.08181 9.72864 5.73218C10.0783 5.38255 10.5238 5.14456 11.0088 5.0481C11.4937 4.95164 11.9963 5.00109 12.4531 5.19031C12.9099 5.37953 13.3004 5.69996 13.5751 6.11109C13.8498 6.52221 13.9965 7.00555 13.9965 7.5C13.9965 8.16304 13.7331 8.79898 13.2643 9.26783C12.7954 9.73667 12.1595 10 11.4965 10V10Z" fill="#75BEFF"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-key.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-key.svg
new file mode 100644
index 0000000..80fb9d6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-key.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M7.22289 10.933C7.54863 11.1254 7.92163 11.2231 8.29989 11.215C8.63777 11.2218 8.97254 11.1492 9.27721 11.003C9.58188 10.8567 9.84792 10.6409 10.0539 10.373C10.5091 9.76519 10.7402 9.01867 10.7079 8.25998C10.7412 7.58622 10.5374 6.9221 10.1319 6.38298C9.93575 6.14161 9.68577 5.94957 9.402 5.82228C9.11824 5.69498 8.80858 5.63597 8.49789 5.64997C8.07522 5.64699 7.65994 5.76085 7.29789 5.97898C7.18304 6.04807 7.0749 6.12775 6.97489 6.21698V3.47498H5.98389V11.1H6.97889V10.756C7.05516 10.8217 7.13677 10.8809 7.22289 10.933ZM7.84981 6.70006C8.03598 6.62105 8.23807 6.58677 8.43989 6.59998C8.61257 6.59452 8.78404 6.63054 8.93994 6.70501C9.09583 6.77948 9.23161 6.89023 9.33589 7.02798C9.59253 7.39053 9.7184 7.82951 9.69289 8.27297C9.71972 8.79748 9.57969 9.31701 9.29289 9.75698C9.18822 9.91527 9.04546 10.0447 8.87773 10.1335C8.70999 10.2223 8.52264 10.2675 8.33289 10.265C8.14934 10.2732 7.9663 10.24 7.79734 10.1678C7.62838 10.0956 7.47784 9.98628 7.35689 9.84797C7.10152 9.55957 6.96501 9.18506 6.97489 8.79998V8.19998C6.96299 7.78332 7.10263 7.3765 7.36789 7.05498C7.49858 6.90064 7.66364 6.77908 7.84981 6.70006ZM3.28902 5.67499C2.97011 5.67933 2.65388 5.734 2.35202 5.83699C2.06417 5.92293 1.79347 6.05828 1.55202 6.23699L1.45202 6.31399V7.51399L1.87502 7.15499C2.24579 6.80478 2.73133 6.60146 3.24102 6.58299C3.36593 6.57164 3.4917 6.59147 3.60706 6.64068C3.72243 6.6899 3.82377 6.76697 3.90202 6.86499C4.0522 7.0971 4.13239 7.36754 4.13302 7.64399L2.90002 7.82499C2.39435 7.87781 1.91525 8.07772 1.52202 8.39999C1.36697 8.55181 1.24339 8.73271 1.15835 8.93235C1.07331 9.13199 1.02848 9.34644 1.02644 9.56343C1.0244 9.78042 1.06517 9.99568 1.14644 10.1969C1.2277 10.3981 1.34786 10.5813 1.50002 10.736C1.6687 10.8904 1.86622 11.01 2.08125 11.0879C2.29627 11.1659 2.52456 11.2005 2.75302 11.19C3.147 11.1931 3.53278 11.0774 3.86002 10.858C3.96153 10.7897 4.0572 10.7131 4.14602 10.629V11.073H5.08702V7.71499C5.12137 7.17422 4.9543 6.63988 4.61802 6.21499C4.44979 6.03285 4.24348 5.89003 4.01378 5.7967C3.78407 5.70336 3.53661 5.66181 3.28902 5.67499ZM4.14602 8.71599C4.16564 9.13435 4.02592 9.54459 3.75502 9.864C3.63689 10.0005 3.48998 10.1092 3.32486 10.1821C3.15973 10.2551 2.98049 10.2906 2.80002 10.286C2.69049 10.2945 2.58035 10.2812 2.47599 10.2469C2.37163 10.2125 2.27511 10.1579 2.19202 10.086C2.06079 9.93455 1.98856 9.74088 1.98856 9.54049C1.98856 9.34011 2.06079 9.14644 2.19202 8.99499C2.47322 8.82131 2.79233 8.71837 3.12202 8.69499L4.14202 8.54699L4.14602 8.71599ZM12.4588 11.0325C12.766 11.1638 13.0983 11.2261 13.4322 11.215C13.927 11.227 14.4153 11.1006 14.8422 10.85L14.9652 10.775L14.9782 10.768V9.61504L14.5322 9.93504C14.216 10.1592 13.8356 10.2747 13.4482 10.264C13.2497 10.2719 13.052 10.2342 12.8703 10.1538C12.6886 10.0733 12.5278 9.95232 12.4002 9.80004C12.1144 9.42453 11.9725 8.95911 12.0002 8.48804C11.9737 7.98732 12.1352 7.49475 12.4532 7.10704C12.5934 6.94105 12.7695 6.80914 12.9682 6.7213C13.167 6.63346 13.3831 6.592 13.6002 6.60004C13.9439 6.59844 14.2808 6.69525 14.5712 6.87904L15.0002 7.14404V5.97004L14.8312 5.89704C14.4626 5.73432 14.0641 5.6502 13.6612 5.65004C13.2999 5.63991 12.9406 5.70762 12.6078 5.84859C12.2749 5.98956 11.9763 6.20048 11.7322 6.46704C11.2261 7.02683 10.9581 7.76186 10.9852 8.51604C10.9567 9.22346 11.1955 9.91569 11.6542 10.455C11.8769 10.704 12.1516 10.9012 12.4588 11.0325Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-keyword.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-keyword.svg
new file mode 100644
index 0000000..70ba6ea
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-keyword.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M15 4H10V3H15V4ZM14 7H12V8H14V7ZM10 7H1V8H10V7ZM12 13H1V14H12V13ZM7 10H1V11H7V10ZM15 10H10V11H15V10ZM8 2V5H1V2H8ZM7 3H2V4H7V3Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-method.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-method.svg
new file mode 100644
index 0000000..cccf5a0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-method.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M13.51 4L8.51001 1H7.51001L2.51001 4L2.02002 4.85999V10.86L2.51001 11.71L7.51001 14.71H8.51001L13.51 11.71L14 10.86V4.85999L13.51 4ZM7.51001 13.5601L3.01001 10.86V5.69995L7.51001 8.15002V13.5601ZM3.27002 4.69995L8.01001 1.85999L12.75 4.69995L8.01001 7.29004L3.27002 4.69995ZM13.01 10.86L8.51001 13.5601V8.15002L13.01 5.69995V10.86Z" fill="#B180D7"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-misc.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-misc.svg
new file mode 100644
index 0000000..8880923
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-misc.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M4 2H12V6C12.3415 6.03511 12.6774 6.11234 13 6.22998V1H3V9.47998L4 7.72998V2ZM6.14001 10L5 8L4 9.75L3.29004 11L1 15H9L6.70996 11L6.14001 10ZM2.71997 14L4.43994 11L5 10L5.56006 11L7.28003 14H2.71997ZM9.55552 7.58984C10.1311 7.20526 10.8077 7 11.5 7C12.4282 7 13.3185 7.36877 13.9748 8.02515C14.6312 8.68152 15 9.57174 15 10.5C15 11.1922 14.7947 11.8689 14.4101 12.4445C14.0256 13.02 13.4789 13.4686 12.8393 13.7335C12.1998 13.9984 11.4961 14.0678 10.8171 13.9327C10.1382 13.7977 9.51461 13.4643 9.02513 12.9749C8.53564 12.4854 8.20229 11.8618 8.06724 11.1829C7.93219 10.5039 8.00155 9.80019 8.26646 9.16064C8.53137 8.5211 8.97995 7.97443 9.55552 7.58984ZM10.1111 12.5786C10.5222 12.8533 11.0055 13 11.5 13C12.163 13 12.799 12.7367 13.2678 12.2678C13.7366 11.799 14 11.163 14 10.5C14 10.0055 13.8533 9.52221 13.5786 9.11108C13.3039 8.69996 12.9135 8.37953 12.4566 8.19031C11.9998 8.00109 11.4973 7.95163 11.0123 8.0481C10.5274 8.14456 10.0818 8.38255 9.73216 8.73218C9.38253 9.08181 9.14454 9.52738 9.04808 10.0123C8.95161 10.4973 9.00107 10.9998 9.19029 11.4567C9.37951 11.9135 9.69994 12.3039 10.1111 12.5786Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-namespace.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-namespace.svg
new file mode 100644
index 0000000..9a725bb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-namespace.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M6 2.98361V2.97184V2H5.91083C5.59743 2 5.29407 2.06161 5.00128 2.18473C4.70818 2.30798 4.44942 2.48474 4.22578 2.71498C4.00311 2.94422 3.83792 3.19498 3.73282 3.46766L3.73233 3.46898C3.63382 3.7352 3.56814 4.01201 3.53533 4.29917L3.53519 4.30053C3.50678 4.5805 3.4987 4.86844 3.51084 5.16428C3.52272 5.45379 3.52866 5.74329 3.52866 6.03279C3.52866 6.23556 3.48974 6.42594 3.412 6.60507L3.4116 6.60601C3.33687 6.78296 3.23423 6.93866 3.10317 7.07359C2.97644 7.20405 2.82466 7.31055 2.64672 7.3925C2.4706 7.46954 2.28497 7.5082 2.08917 7.5082H2V7.6V8.4V8.4918H2.08917C2.28465 8.4918 2.47001 8.53238 2.64601 8.61334L2.64742 8.61396C2.82457 8.69157 2.97577 8.79762 3.10221 8.93161L3.10412 8.93352C3.23428 9.0637 3.33659 9.21871 3.41129 9.39942L3.41201 9.40108C3.48986 9.58047 3.52866 9.76883 3.52866 9.96721C3.52866 10.2567 3.52272 10.5462 3.51084 10.8357C3.4987 11.1316 3.50677 11.4215 3.53516 11.7055L3.53535 11.7072C3.56819 11.9903 3.63387 12.265 3.73232 12.531L3.73283 12.5323C3.83793 12.805 4.00311 13.0558 4.22578 13.285C4.44942 13.5153 4.70818 13.692 5.00128 13.8153C5.29407 13.9384 5.59743 14 5.91083 14H6V13.2V13.0164H5.91083C5.71095 13.0164 5.52346 12.9777 5.34763 12.9008C5.17396 12.8191 5.02194 12.7126 4.89086 12.5818C4.76386 12.4469 4.66104 12.2911 4.58223 12.1137C4.50838 11.9346 4.47134 11.744 4.47134 11.541C4.47134 11.3127 4.4753 11.0885 4.48321 10.8686C4.49125 10.6411 4.49127 10.4195 4.48324 10.2039C4.47914 9.98246 4.46084 9.76883 4.42823 9.56312C4.39513 9.35024 4.33921 9.14757 4.26039 8.95536C4.18091 8.76157 4.07258 8.57746 3.93616 8.40298C3.82345 8.25881 3.68538 8.12462 3.52283 8C3.68538 7.87538 3.82345 7.74119 3.93616 7.59702C4.07258 7.42254 4.18091 7.23843 4.26039 7.04464C4.33913 6.85263 4.39513 6.65175 4.42826 6.44285C4.46082 6.2333 4.47914 6.01973 4.48324 5.80219C4.49127 5.58262 4.49125 5.36105 4.48321 5.13749C4.4753 4.9134 4.47134 4.68725 4.47134 4.45902C4.47134 4.26019 4.50833 4.07152 4.58238 3.89205C4.66135 3.71034 4.76421 3.55475 4.89086 3.42437C5.02193 3.28942 5.17461 3.18275 5.34802 3.10513C5.5238 3.02427 5.71113 2.98361 5.91083 2.98361H6ZM10 13.0164V13.0282V14H10.0892C10.4026 14 10.7059 13.9384 10.9987 13.8153C11.2918 13.692 11.5506 13.5153 11.7742 13.285C11.9969 13.0558 12.1621 12.805 12.2672 12.5323L12.2677 12.531C12.3662 12.2648 12.4319 11.988 12.4647 11.7008L12.4648 11.6995C12.4932 11.4195 12.5013 11.1316 12.4892 10.8357C12.4773 10.5462 12.4713 10.2567 12.4713 9.96721C12.4713 9.76444 12.5103 9.57406 12.588 9.39493L12.5884 9.39399C12.6631 9.21704 12.7658 9.06134 12.8968 8.92642C13.0236 8.79595 13.1753 8.68945 13.3533 8.6075C13.5294 8.53046 13.715 8.4918 13.9108 8.4918H14V8.4V7.6V7.5082H13.9108C13.7153 7.5082 13.53 7.46762 13.354 7.38666L13.3526 7.38604C13.1754 7.30844 13.0242 7.20238 12.8978 7.06839L12.8959 7.06648C12.7657 6.9363 12.6634 6.78129 12.5887 6.60058L12.588 6.59892C12.5101 6.41953 12.4713 6.23117 12.4713 6.03279C12.4713 5.74329 12.4773 5.45379 12.4892 5.16428C12.5013 4.86842 12.4932 4.57848 12.4648 4.29454L12.4646 4.29285C12.4318 4.00971 12.3661 3.73502 12.2677 3.46897L12.2672 3.46766C12.1621 3.19499 11.9969 2.94422 11.7742 2.71498C11.5506 2.48474 11.2918 2.30798 10.9987 2.18473C10.7059 2.06161 10.4026 2 10.0892 2H10V2.8V2.98361H10.0892C10.2891 2.98361 10.4765 3.0223 10.6524 3.09917C10.826 3.18092 10.9781 3.28736 11.1091 3.41823C11.2361 3.55305 11.339 3.70889 11.4178 3.88628C11.4916 4.0654 11.5287 4.25596 11.5287 4.45902C11.5287 4.68727 11.5247 4.91145 11.5168 5.13142C11.5088 5.35894 11.5087 5.58049 11.5168 5.79605C11.5209 6.01754 11.5392 6.23117 11.5718 6.43688C11.6049 6.64976 11.6608 6.85243 11.7396 7.04464C11.8191 7.23843 11.9274 7.42254 12.0638 7.59702C12.1765 7.74119 12.3146 7.87538 12.4772 8C12.3146 8.12462 12.1765 8.25881 12.0638 8.40298C11.9274 8.57746 11.8191 8.76157 11.7396 8.95536C11.6609 9.14737 11.6049 9.34825 11.5717 9.55715C11.5392 9.7667 11.5209 9.98027 11.5168 10.1978C11.5087 10.4174 11.5087 10.6389 11.5168 10.8625C11.5247 11.0866 11.5287 11.3128 11.5287 11.541C11.5287 11.7398 11.4917 11.9285 11.4176 12.1079C11.3386 12.2897 11.2358 12.4452 11.1091 12.5756C10.9781 12.7106 10.8254 12.8173 10.652 12.8949C10.4762 12.9757 10.2889 13.0164 10.0892 13.0164H10Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-numeric.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-numeric.svg
new file mode 100644
index 0000000..a1573df
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-numeric.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M11 1V5H15V6H11L11 10H15V11H11V15H10V11H6V15H5L5 11H1V10H5L5 6H1V5H5L5 1H6V5H10V1H11ZM6 6L6 10H10L10 6H6Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-operator.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-operator.svg
new file mode 100644
index 0000000..957f5f4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-operator.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M2.87289 1.10023C3.20768 1.23579 3.47545 1.498 3.61802 1.82988C3.69032 1.99959 3.72675 2.18242 3.72502 2.36688C3.72617 2.54999 3.68975 2.7314 3.61802 2.89988C3.51299 3.14567 3.33782 3.35503 3.11442 3.50177C2.89102 3.64851 2.6293 3.72612 2.36202 3.72488C2.17924 3.72592 1.99818 3.68951 1.83002 3.61788C1.58298 3.51406 1.37227 3.33932 1.22453 3.11575C1.0768 2.89219 0.998666 2.62984 1.00002 2.36188C0.99913 2.17921 1.03519 1.99825 1.10602 1.82988C1.24337 1.50314 1.50328 1.24323 1.83002 1.10588C2.16332 0.966692 2.53809 0.964661 2.87289 1.10023ZM2.57502 2.86488C2.7054 2.80913 2.80927 2.70526 2.86502 2.57488C2.8929 2.50838 2.90718 2.43698 2.90702 2.36488C2.90813 2.2654 2.88215 2.1675 2.83185 2.08167C2.78156 1.99584 2.70884 1.92531 2.62151 1.87767C2.53418 1.83002 2.43553 1.80705 2.33614 1.81121C2.23674 1.81537 2.14035 1.8465 2.05731 1.90128C1.97426 1.95606 1.9077 2.03241 1.86475 2.12215C1.8218 2.21188 1.80409 2.31161 1.81352 2.41065C1.82294 2.50968 1.85915 2.60428 1.91825 2.6843C1.97736 2.76433 2.05713 2.82675 2.14902 2.86488C2.28549 2.92089 2.43854 2.92089 2.57502 2.86488ZM6.42995 1.1095L1.10967 6.42977L1.79557 7.11567L7.11584 1.7954L6.42995 1.1095ZM11.5 8.99999H12.5V11.5H15V12.5H12.5V15H11.5V12.5H9V11.5H11.5V8.99999ZM5.76777 9.52509L6.47487 10.2322L4.70711 12L6.47487 13.7677L5.76777 14.4748L4 12.7071L2.23223 14.4748L1.52513 13.7677L3.29289 12L1.52513 10.2322L2.23223 9.52509L4 11.2929L5.76777 9.52509ZM7.11802 5.32988C7.01442 5.08268 6.83973 4.87183 6.61612 4.72406C6.3925 4.57629 6.13004 4.49826 5.86202 4.49988C5.67935 4.49899 5.49839 4.53505 5.33002 4.60588C5.00328 4.74323 4.74337 5.00314 4.60602 5.32988C4.53588 5.49478 4.49897 5.67191 4.49741 5.8511C4.49586 6.0303 4.52967 6.20804 4.59693 6.37414C4.66419 6.54024 4.76356 6.69143 4.88936 6.81906C5.01516 6.94669 5.1649 7.04823 5.33002 7.11788C5.49867 7.18848 5.67968 7.22484 5.86252 7.22484C6.04535 7.22484 6.22636 7.18848 6.39502 7.11788C6.64201 7.01388 6.8527 6.83913 7.00058 6.61563C7.14845 6.39213 7.22689 6.12987 7.22602 5.86188C7.22655 5.67905 7.1898 5.49803 7.11802 5.32988ZM6.36502 6.07488C6.33766 6.13937 6.29829 6.19808 6.24902 6.24788C6.19908 6.29724 6.14042 6.33691 6.07602 6.36488C6.00854 6.39297 5.93611 6.40725 5.86302 6.40688C5.78991 6.40744 5.71744 6.39315 5.65002 6.36488C5.58541 6.33729 5.52668 6.29757 5.47702 6.24788C5.42691 6.19856 5.38713 6.13975 5.36002 6.07488C5.30401 5.9384 5.30401 5.78536 5.36002 5.64888C5.41536 5.51846 5.51941 5.41477 5.65002 5.35988C5.71737 5.33126 5.78984 5.31663 5.86302 5.31688C5.93618 5.31685 6.0086 5.33147 6.07602 5.35988C6.14037 5.38749 6.19904 5.42682 6.24902 5.47588C6.29786 5.52603 6.33717 5.58465 6.36502 5.64888C6.3934 5.7163 6.40802 5.78872 6.40802 5.86188C6.40802 5.93503 6.3934 6.00745 6.36502 6.07488ZM14 3H10V4H14V3Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-parameter.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-parameter.svg
new file mode 100644
index 0000000..425ced3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-parameter.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M11 6H10V5.5C10 5.22386 9.77616 5 9.50001 5H8.47902V10.5C8.47902 10.7761 8.70288 11 8.97902 11H9.47902V12H6.47902V11H6.97902C7.25516 11 7.47902 10.7761 7.47902 10.5V5H6.50001C6.22387 5 6.00001 5.22386 6.00001 5.5V6H5.00001V4H11V6ZM13.9142 8.0481L12.4519 6.58581L13.159 5.87871L14.9749 7.69454V8.40165L13.2071 10.1694L12.5 9.46231L13.9142 8.0481ZM3.5481 9.4623L2.08581 8.00002L3.50002 6.58581L2.79291 5.8787L1.02515 7.64647V8.35357L2.841 10.1694L3.5481 9.4623Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-property.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-property.svg
new file mode 100644
index 0000000..7137a9d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-property.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M2.80723 14.9754C2.57119 14.9721 2.33826 14.9211 2.12247 14.8254C1.90667 14.7297 1.71248 14.5913 1.55158 14.4186C1.2385 14.1334 1.04433 13.7408 1.00775 13.3189C0.966225 12.8828 1.09269 12.4473 1.36133 12.1013C2.56779 10.8289 4.9473 8.4494 6.67811 6.75479C6.30983 5.75887 6.32704 4.66127 6.72637 3.67739C7.05474 2.85876 7.63869 2.16805 8.39129 1.70807C8.9817 1.31706 9.66031 1.07944 10.3657 1.01673C11.0711 0.954022 11.7809 1.06819 12.4311 1.34892L13.0482 1.6162L10.1824 4.56738L11.4371 5.82582L14.3809 2.94887L14.6482 3.56788C14.8735 4.08976 14.993 4.65119 14.9997 5.21961C15.0064 5.78802 14.9002 6.35211 14.6872 6.87915C14.476 7.40029 14.1623 7.87368 13.7647 8.27122C13.5394 8.49169 13.2904 8.68653 13.0222 8.85218C12.4673 9.22275 11.8324 9.45636 11.1697 9.5338C10.5069 9.61124 9.83521 9.5303 9.20982 9.29764C8.11194 10.4113 5.37142 13.1704 3.89119 14.5522C3.59426 14.8219 3.20832 14.9726 2.80723 14.9754ZM10.7448 1.92802C10.087 1.92637 9.44359 2.12018 8.89614 2.48485C8.68265 2.6152 8.48437 2.76897 8.30498 2.9433C7.82789 3.42423 7.50926 4.03953 7.39182 4.70669C7.27438 5.37385 7.36374 6.06098 7.64792 6.67591L7.78342 6.97288L7.55048 7.20025C5.81224 8.89672 3.28146 11.4201 2.06479 12.7045C1.95646 12.8658 1.91012 13.0608 1.93435 13.2535C1.95857 13.4463 2.05171 13.6238 2.19657 13.7532C2.28005 13.8462 2.38177 13.9211 2.49541 13.9731C2.59557 14.0184 2.70383 14.043 2.81373 14.0455C2.98064 14.0413 3.14044 13.977 3.26383 13.8646C4.83687 12.3964 7.87622 9.32641 8.76807 8.42435L8.9973 8.19326L9.29242 8.32783C9.80617 8.56732 10.3731 8.66985 10.9382 8.62545C11.5033 8.58106 12.0473 8.39125 12.5174 8.07447C12.7313 7.9426 12.9296 7.78694 13.1085 7.61045C13.4183 7.30153 13.6631 6.93374 13.8286 6.52874C13.994 6.12375 14.0767 5.68974 14.0719 5.25228C14.0719 5.03662 14.0505 4.82148 14.0078 4.61007L11.4306 7.12508L8.87944 4.57759L11.3944 1.98834C11.1804 1.94674 10.9628 1.92653 10.7448 1.92802Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-ruler.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-ruler.svg
new file mode 100644
index 0000000..1957dba
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-ruler.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M4 1L3 2V14L4 15H12L13 14V2L12 1H4ZM4 3V2H12V14H4V13H6V12H4V10H8V9H4V7H6V6H4V4H8V3H4Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-snippet.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-snippet.svg
new file mode 100644
index 0000000..79799f9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-snippet.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M2.5 1L2 1.5V13H3V2H14V13H15V1.5L14.5 1H2.5ZM2 15V14H3V15H2ZM5 14.0001H4V15.0001H5V14.0001ZM6 14.0001H7V15.0001H6V14.0001ZM9 14.0001H8V15.0001H9V14.0001ZM10 14.0001H11V15.0001H10V14.0001ZM15 15.0001V14.0001H14V15.0001H15ZM12 14.0001H13V15.0001H12V14.0001Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-string.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-string.svg
new file mode 100644
index 0000000..ef5f226
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-string.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M2 2L1 3V12L2 13H14L15 12V3L14 2H2ZM2 12V3H14V12H2ZM5.3556 8.93017H6V7.22067C6 6.40689 5.68534 6 5.05603 6C4.92098 6 4.77083 6.02421 4.6056 6.07263C4.44181 6.12104 4.3125 6.17691 4.21767 6.24022V6.90503C4.45474 6.70205 4.70474 6.60056 4.96767 6.60056C5.22917 6.60056 5.35991 6.75698 5.35991 7.06983L4.76078 7.17318C4.25359 7.25885 4 7.57914 4 8.13408C4 8.39665 4.06106 8.60708 4.18319 8.76536C4.30675 8.92179 4.47557 9 4.68966 9C4.97989 9 5.19899 8.83985 5.34698 8.51955H5.3556V8.93017ZM5.35991 7.57542V7.76816C5.35991 7.9432 5.31968 8.08845 5.23922 8.20391C5.15876 8.3175 5.0546 8.3743 4.92672 8.3743C4.83477 8.3743 4.76149 8.34264 4.7069 8.27933C4.65374 8.21415 4.62716 8.13128 4.62716 8.03073C4.62716 7.80912 4.73779 7.6797 4.95905 7.64246L5.35991 7.57542ZM7.60094 8.62622H7.59343V8.93511H7V5H7.59343V6.67683H7.60094C7.74742 6.36708 7.95587 6.2122 8.22629 6.2122C8.47418 6.2122 8.6651 6.32987 8.79906 6.56522C8.93302 6.80056 9 7.12243 9 7.53082C9 7.97383 8.92175 8.32944 8.76526 8.59766C8.60876 8.86589 8.39969 9 8.13803 9C7.90141 9 7.72238 8.87541 7.60094 8.62622ZM7.58404 7.50487V7.77742C7.58404 7.94873 7.61972 8.09063 7.69108 8.20311C7.76244 8.3156 7.85383 8.37184 7.96526 8.37184C8.10047 8.37184 8.20501 8.30002 8.27887 8.15639C8.35399 8.01103 8.39155 7.80597 8.39155 7.54121C8.39155 7.32144 8.35712 7.15012 8.28826 7.02726C8.22066 6.90266 8.12363 6.84036 7.99718 6.84036C7.87825 6.84036 7.77934 6.9018 7.70047 7.02466C7.62285 7.14752 7.58404 7.30759 7.58404 7.50487ZM11.2616 9C11.5834 9 11.8295 8.94227 12 8.82682V8.11732C11.82 8.25512 11.636 8.32402 11.448 8.32402C11.2362 8.32402 11.0697 8.25233 10.9486 8.10894C10.8276 7.96369 10.767 7.76443 10.767 7.51117C10.767 7.25047 10.8299 7.04656 10.9558 6.89944C11.0832 6.75047 11.2553 6.67598 11.4719 6.67598C11.6663 6.67598 11.8423 6.74488 12 6.88268V6.13408C11.871 6.04469 11.6623 6 11.374 6C10.9566 6 10.6229 6.1406 10.3728 6.42179C10.1243 6.70112 10 7.0838 10 7.56983C10 7.99069 10.1163 8.33426 10.3489 8.60056C10.5814 8.86685 10.8857 9 11.2616 9Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-structure.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-structure.svg
new file mode 100644
index 0000000..13766a5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-structure.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M2 2L1 3V6L2 7H14L15 6V3L14 2H2ZM2 3H3H13H14V4V5V6H13H3H2V5V4V3ZM1 10L2 9H5L6 10V13L5 14H2L1 13V10ZM3 10H2V11V12V13H3H4H5V12V11V10H4H3ZM10 10L11 9H14L15 10V13L14 14H11L10 13V10ZM12 10H11V11V12V13H12H13H14V12V11V10H13H12Z" fill="#C5C5C5"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-variable.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-variable.svg
new file mode 100644
index 0000000..5ee50e0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-dark/symbol-variable.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M2 5H4V4H1.5L1 4.5V12.5L1.5 13H4V12H2V5ZM14.5 4H12V5H14V12H12V13H14.5L15 12.5V4.5L14.5 4ZM11.76 6.56995L12 7V9.51001L11.7 9.95996L7.19995 11.96H6.73999L4.23999 10.46L4 10.03V7.53003L4.30005 7.06995L8.80005 5.06995H9.26001L11.76 6.56995ZM5 9.70996L6.5 10.61V9.28003L5 8.38V9.70996ZM5.57996 7.56006L7.03003 8.43005L10.42 6.93005L8.96997 6.06006L5.57996 7.56006ZM7.53003 10.73L11.03 9.17004V7.77002L7.53003 9.31995V10.73Z" fill="#75BEFF"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/filter.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/filter.svg
new file mode 100644
index 0000000..30a559d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/filter.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M15.0002 2V3.66963L10.0002 8.42874V14H6.00024V8.42874L1.00024 3.66963V2H15.0002ZM7.00024 8V13H9.00024V8L14.0002 3.24089V3H2.00024V3.24089L7.00024 8Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/folder.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/folder.svg
new file mode 100644
index 0000000..c0939fe
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/folder.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M14.5002 3H7.71021L6.86023 2.15002L6.51025 2H1.51025L1.01025 2.5V6.5V13.5L1.51025 14H14.5103L15.0103 13.5V9V3.5L14.5002 3ZM13.9902 11.49V13H1.99023V11.49V7.48999V7H6.48022L6.8302 6.84998L7.69019 5.98999H14.0002V7.48999L13.9902 11.49ZM13.9902 5H7.49023L7.14026 5.15002L6.28027 6.01001H2.00024V3.01001H6.29028L7.14026 3.85999L7.50024 4.01001H14.0002L13.9902 5Z" fill="#424242"/>
+</svg>
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/references.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/references.svg
new file mode 100644
index 0000000..eea62e0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/references.svg
@@ -0,0 +1,10 @@
+<svg width="24" height="24" viewBox="0 0 24 24" fill="none" xmlns="http://www.w3.org/2000/svg">
+<g clip-path="url(#clip0)">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M11.1055 4.5613L7.67529 7.98827L6.54097 6.86834L8.61123 4.78848H3.81155C3.17507 4.78848 2.56466 5.04132 2.11461 5.49138C1.66455 5.94144 1.41171 6.55184 1.41171 7.18832C1.41171 7.8248 1.66455 8.43521 2.11461 8.88527C2.56466 9.33532 3.17507 9.58816 3.81155 9.58816H4.70109V11.1881H3.82115C2.79234 11.142 1.82094 10.7009 1.1092 9.95661C0.397467 9.21231 0.000244141 8.22216 0.000244141 7.19232C0.000244141 6.16249 0.397467 5.17234 1.1092 4.42803C1.82094 3.68373 2.79234 3.24263 3.82115 3.19659H8.62083L6.54097 1.13112L7.67529 0L11.1055 3.43177V4.5613ZM16.6203 24H7.02094L6.22099 23.2V10.4121L7.02094 9.61215H16.6203L17.4202 10.4121V23.2L16.6203 24ZM7.82089 22.4001H15.8204V11.212H7.82089V22.4001ZM13.4205 1.6015H23.0199L23.8198 2.40145V15.1878L23.0199 15.9877H19.0201V14.3878H22.2199V3.20139H14.2205V7.98828H12.6206V2.40145L13.4205 1.6015ZM14.2205 12.7879H9.42078V14.3878H14.2205V12.7879ZM9.42078 15.9877H14.2205V17.5876H9.42078V15.9877ZM14.2205 19.1875H9.42078V20.7874H14.2205V19.1875ZM15.8203 4.78848H20.62V6.38838H15.8203V4.78848ZM20.62 11.188H19.0201V12.7879H20.62V11.188ZM17.2827 8.01228V7.98828H20.62V9.58817H18.8585L17.2827 8.01228Z" fill="#424242"/>
+</g>
+<defs>
+<clipPath id="clip0">
+<rect width="24" height="24" fill="white" transform="translate(0.000244141)"/>
+</clipPath>
+</defs>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/search.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/search.svg
new file mode 100644
index 0000000..578a48a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/search.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 24 24" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M15.2502 1.02546e-06C13.6607 -0.000791296 12.1048 0.457574 10.7697 1.32007C9.43447 2.18256 8.37681 3.4124 7.724 4.8617C7.07118 6.31099 6.85102 7.91801 7.08984 9.4895C7.32867 11.061 8.01628 12.5301 9.07019 13.72L1.00024 22.88L2.12024 23.88L10.1703 14.76C11.2057 15.5693 12.4195 16.1196 13.7106 16.365C15.0017 16.6104 16.3328 16.5437 17.5929 16.1707C18.853 15.7976 20.0058 15.1288 20.9552 14.2201C21.9046 13.3114 22.6232 12.1891 23.0511 10.9465C23.4791 9.70396 23.6041 8.37703 23.4155 7.07642C23.227 5.77581 22.7304 4.53915 21.9673 3.46924C21.2041 2.39933 20.1964 1.52711 19.0281 0.925416C17.8597 0.323719 16.5644 0.00991516 15.2502 0.0100108V1.02546e-06ZM15.2502 15C13.9152 15 12.6102 14.6041 11.5001 13.8624C10.3901 13.1207 9.52493 12.0665 9.01404 10.8331C8.50315 9.59973 8.36943 8.24248 8.62988 6.93311C8.89033 5.62373 9.53329 4.42106 10.4773 3.47705C11.4213 2.53305 12.624 1.89009 13.9333 1.62964C15.2427 1.36919 16.6 1.5029 17.8334 2.01379C19.0668 2.52469 20.121 3.38985 20.8627 4.49988C21.6044 5.60991 22.0002 6.91498 22.0002 8.25C22.0002 10.0402 21.2891 11.7571 20.0232 13.023C18.7573 14.2888 17.0405 15 15.2502 15Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-array.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-array.svg
new file mode 100644
index 0000000..9d7a388
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-array.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M1.50024 2L1.00024 2.5V13.5L1.50024 14H4.00024V13H2.00024V3H4.00024V2H1.50024ZM14.5002 14L15.0002 13.5L15.0002 2.5L14.5002 2H12.0002V3L14.0002 3L14.0002 13H12.0002V14H14.5002Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-boolean.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-boolean.svg
new file mode 100644
index 0000000..8cee69d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-boolean.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M1.00024 3.5L1.50024 3H14.5002L15.0002 3.5L15.0002 12.5L14.5002 13H1.50024L1.00024 12.5V3.5ZM14.0002 4H8.00024L8.00024 7.49297L7.89818 7.49285L7.50024 7.49225V7.49237L3.92639 7.48807L6.01662 5.39784L5.30951 4.69073L2.3538 7.64645L2.3538 8.35355L5.30951 11.3093L6.01662 10.6022L3.90253 8.48807L7.89785 8.49285L8.00024 8.493V7.50702L11.9075 7.51222L9.79313 5.39784L10.5002 4.69073L13.456 7.64645V8.35355L10.5002 11.3093L9.79313 10.6022L11.8831 8.51222L8.00024 8.50702V12H14.0002V4Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-class.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-class.svg
new file mode 100644
index 0000000..7b0c2b9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-class.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M11.3403 9.70998H12.0503L14.7202 7.04005V6.32997L13.3803 5.00001H12.6803L10.8603 6.81007H5.86024V5.56007L7.72023 3.70997V3L5.72022 1H5.00025L1.00024 5.00001V5.70997L3.00025 7.70998H3.71027L4.85023 6.56007V12.35L5.35023 12.85H10.0003V13.37L11.3303 14.71H12.0402L14.7103 12.0401V11.33L13.3703 10H12.6703L10.8103 11.85H5.81025V7.84999H10.0003V8.32997L11.3403 9.70998ZM13.0303 6.06007L13.6602 6.68995L11.6602 8.68996L11.0303 8.06007L13.0303 6.06007ZM13.0303 11.0601L13.6602 11.69L11.6602 13.69L11.0303 13.0601L13.0303 11.0601ZM3.35022 6.65004L2.06024 5.34998L5.35023 2.06006L6.65028 3.34998L3.35022 6.65004Z" fill="#D67E00"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-color.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-color.svg
new file mode 100644
index 0000000..a67efd3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-color.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M8.00024 1.00305C6.14373 1.00305 4.36323 1.74059 3.05048 3.05334C1.73772 4.3661 1.00024 6.14654 1.00024 8.00305V8.43311C1.09024 9.94311 2.91024 10.2231 4.00024 9.13306C4.35673 8.81625 4.82078 8.64759 5.29749 8.66162C5.77419 8.67565 6.22753 8.87127 6.56476 9.2085C6.90199 9.54572 7.0976 9.99912 7.11163 10.4758C7.12567 10.9525 6.95707 11.4166 6.64026 11.7731C5.54026 12.9331 5.85025 14.843 7.44025 14.973H8.04022C9.89674 14.973 11.6772 14.2356 12.99 12.9229C14.3027 11.6101 15.0402 9.82954 15.0402 7.97302C15.0402 6.11651 14.3027 4.33607 12.99 3.02332C11.6772 1.71056 9.89674 0.973022 8.04022 0.973022L8.00024 1.00305ZM8.00024 14.0031H7.48022C7.34775 13.9989 7.22072 13.9495 7.12024 13.863C7.04076 13.7807 6.98839 13.6761 6.97021 13.5631C6.93834 13.3682 6.95353 13.1684 7.0144 12.9806C7.07528 12.7927 7.18013 12.6222 7.32025 12.483C7.84072 11.9474 8.1319 11.2299 8.1319 10.483C8.1319 9.73615 7.84072 9.0187 7.32025 8.48303C7.05373 8.21635 6.73723 8.00481 6.38892 7.86047C6.0406 7.71614 5.66726 7.64185 5.29022 7.64185C4.91318 7.64185 4.53984 7.71614 4.19153 7.86047C3.84321 8.00481 3.52678 8.21635 3.26025 8.48303C3.15093 8.61081 3.01113 8.709 2.85382 8.76843C2.69651 8.82786 2.52673 8.84657 2.36023 8.823C2.27617 8.80694 2.19927 8.76498 2.14026 8.703C2.07155 8.6224 2.0358 8.5189 2.04022 8.41309V8.04309C2.04022 6.8564 2.39216 5.69629 3.05145 4.70959C3.71074 3.7229 4.64778 2.95388 5.74414 2.49976C6.8405 2.04563 8.04693 1.92681 9.21082 2.15833C10.3747 2.38984 11.4438 2.9613 12.2829 3.80042C13.122 4.63953 13.6934 5.70867 13.9249 6.87256C14.1564 8.03644 14.0376 9.24275 13.5835 10.3391C13.1294 11.4355 12.3604 12.3726 11.3737 13.0319C10.387 13.6911 9.22691 14.0431 8.04022 14.0431L8.00024 14.0031ZM9.00024 3.99683C9.00024 4.54911 8.55253 4.99683 8.00024 4.99683C7.44796 4.99683 7.00024 4.54911 7.00024 3.99683C7.00024 3.44454 7.44796 2.99683 8.00024 2.99683C8.55253 2.99683 9.00024 3.44454 9.00024 3.99683ZM12.0002 11.0037C12.0002 11.5559 11.5525 12.0037 11.0002 12.0037C10.448 12.0037 10.0002 11.5559 10.0002 11.0037C10.0002 10.4514 10.448 10.0037 11.0002 10.0037C11.5525 10.0037 12.0002 10.4514 12.0002 11.0037ZM5.00024 6.00415C5.55253 6.00415 6.00024 5.55644 6.00024 5.00415C6.00024 4.45187 5.55253 4.00415 5.00024 4.00415C4.44796 4.00415 4.00024 4.45187 4.00024 5.00415C4.00024 5.55644 4.44796 6.00415 5.00024 6.00415ZM12.0002 5.00415C12.0002 5.55644 11.5525 6.00415 11.0002 6.00415C10.448 6.00415 10.0002 5.55644 10.0002 5.00415C10.0002 4.45187 10.448 4.00415 11.0002 4.00415C11.5525 4.00415 12.0002 4.45187 12.0002 5.00415ZM13.0003 7.99939C13.0003 8.55167 12.5526 8.99939 12.0003 8.99939C11.448 8.99939 11.0003 8.55167 11.0003 7.99939C11.0003 7.4471 11.448 6.99939 12.0003 6.99939C12.5526 6.99939 13.0003 7.4471 13.0003 7.99939Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-constant.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-constant.svg
new file mode 100644
index 0000000..5f185bc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-constant.svg
@@ -0,0 +1,4 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M4.00024 6H12.0002V7H4.00024V6ZM12.0002 9H4.00024V10H12.0002V9Z" fill="#424242"/>
+<path fill-rule="evenodd" clip-rule="evenodd" d="M1.00024 4L2.00024 3H14.0002L15.0002 4V12L14.0002 13H2.00024L1.00024 12V4ZM2.00024 4V12H14.0002V4H2.00024Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-enumerator-member.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-enumerator-member.svg
new file mode 100644
index 0000000..31d1654
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-enumerator-member.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M7.00024 3L8.00024 2H14.0002L15.0002 3V8L14.0002 9H10.0002V8H14.0002V3H8.00024V6H7.00024V3ZM9.00024 9V8L8.00024 7H7.00024H2.00024L1.00024 8V13L2.00024 14H8.00024L9.00024 13V9ZM8.00024 8V9V13H2.00024V8H7.00024H8.00024ZM9.41446 7L9.00024 6.58579V6H13.0002V7H9.41446ZM9.00024 4H13.0002V5H9.00024V4ZM7.00024 10H3.00024V11H7.00024V10Z" fill="#007ACC"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-enumerator.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-enumerator.svg
new file mode 100644
index 0000000..dbbc5fd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-enumerator.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M14.0002 2H8.00024L7.00024 3V6H8.00024V3H14.0002V8H10.0002V9H14.0002L15.0002 8V3L14.0002 2ZM9.00024 6H13.0002V7H9.41024L9.00024 6.59V6ZM7.00024 7H2.00024L1.00024 8V13L2.00024 14H8.00024L9.00024 13V8L8.00024 7H7.00024ZM8.00024 13H2.00024V8H8.00024V9V13ZM3.00024 9H7.00024V10H3.00024V9ZM3.00024 11H7.00024V12H3.00024V11ZM9.00024 4H13.0002V5H9.00024V4Z" fill="#D67E00"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-event.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-event.svg
new file mode 100644
index 0000000..31e574b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-event.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M7.41379 1.55996L8.31177 1H11.6059L12.4243 2.57465L10.2358 6H12.0176L12.7365 7.69512L5.61967 15L4.01699 13.837L6.11967 10H4.89822L4.00024 8.55996L7.41379 1.55996ZM7.78058 9L4.90078 14.3049L12.0176 7H8.31177L11.6059 2H8.31177L4.89822 9H7.78058Z" fill="#D67E00"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-field.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-field.svg
new file mode 100644
index 0000000..5151b2a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-field.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M14.4502 4.5L9.4502 2H8.55029L1.55029 5.5L1.00024 6.39001V10.89L1.55029 11.79L6.55029 14.29H7.4502L14.4502 10.79L15.0002 9.89001V5.39001L14.4502 4.5ZM6.4502 13.14L1.9502 10.89V7.17004L6.4502 9.17004V13.14ZM6.9502 8.33997L2.29028 6.22998L8.9502 2.89001L13.6202 5.22998L6.9502 8.33997ZM13.9502 9.89001L7.4502 13.14V9.20996L13.9502 6.20996V9.89001Z" fill="#007ACC"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-file.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-file.svg
new file mode 100644
index 0000000..781e39e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-file.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M13.8502 4.44L10.5702 1.14L10.2202 1H2.50024L2.00024 1.5V14.5L2.50024 15H13.5002L14.0002 14.5V4.8L13.8502 4.44ZM13.0002 5H10.0002V2L13.0002 5ZM3.00024 14V2H9.00024V5.5L9.50024 6H13.0002V14H3.00024Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-interface.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-interface.svg
new file mode 100644
index 0000000..3b83725
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-interface.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M11.4967 4C10.6552 3.9989 9.8416 4.30189 9.20581 4.85315C8.57002 5.40442 8.15489 6.16684 8.03674 7H4.93665C4.81495 6.52867 4.52557 6.11794 4.12268 5.84473C3.71979 5.57152 3.23108 5.45466 2.74817 5.51599C2.26526 5.57733 1.82131 5.81261 1.49951 6.17786C1.17772 6.54311 1.00024 7.01322 1.00024 7.5C1.00024 7.98679 1.17772 8.45689 1.49951 8.82215C1.82131 9.1874 2.26526 9.42267 2.74817 9.48401C3.23108 9.54535 3.71979 9.42848 4.12268 9.15528C4.52557 8.88207 4.81495 8.47133 4.93665 8H8.03674C8.13261 8.66418 8.41741 9.28683 8.85718 9.7937C9.29695 10.3006 9.87308 10.6703 10.5171 10.8589C11.1611 11.0475 11.8458 11.047 12.4895 10.8574C13.1332 10.6679 13.7089 10.2973 14.1479 9.7898C14.587 9.28227 14.8708 8.65919 14.9657 7.99488C15.0606 7.33056 14.9624 6.65298 14.683 6.04285C14.4036 5.43272 13.9547 4.91578 13.3898 4.55359C12.8248 4.19141 12.1678 3.99922 11.4967 4V4ZM11.4967 10C11.0023 10 10.5189 9.85332 10.1078 9.57862C9.69667 9.30391 9.37623 8.91348 9.18701 8.45667C8.99779 7.99985 8.94834 7.49728 9.0448 7.01233C9.14126 6.52738 9.37925 6.08181 9.72888 5.73218C10.0785 5.38255 10.5241 5.14456 11.009 5.0481C11.494 4.95164 11.9966 5.00109 12.4534 5.19031C12.9102 5.37953 13.3006 5.69996 13.5753 6.11109C13.85 6.52221 13.9967 7.00555 13.9967 7.5C13.9967 8.16304 13.7334 8.79898 13.2645 9.26783C12.7957 9.73667 12.1597 10 11.4967 10V10Z" fill="#007ACC"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-key.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-key.svg
new file mode 100644
index 0000000..6af4c1a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-key.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M7.22313 10.933C7.54888 11.1254 7.92188 11.2231 8.30013 11.215C8.63802 11.2218 8.97279 11.1492 9.27746 11.003C9.58213 10.8567 9.84817 10.6409 10.0541 10.373C10.5094 9.76519 10.7404 9.01867 10.7081 8.25998C10.7414 7.58622 10.5376 6.9221 10.1321 6.38298C9.93599 6.14161 9.68601 5.94957 9.40225 5.82228C9.11848 5.69498 8.80883 5.63597 8.49813 5.64997C8.07546 5.64699 7.66018 5.76085 7.29813 5.97898C7.18328 6.04807 7.07515 6.12775 6.97513 6.21698V3.47498H5.98413V11.1H6.97913V10.756C7.0554 10.8217 7.13702 10.8809 7.22313 10.933ZM7.85005 6.70006C8.03622 6.62105 8.23832 6.58677 8.44013 6.59998C8.61281 6.59452 8.78429 6.63054 8.94018 6.70501C9.09608 6.77948 9.23185 6.89023 9.33613 7.02798C9.59277 7.39053 9.71865 7.82951 9.69313 8.27297C9.71996 8.79748 9.57993 9.31701 9.29313 9.75698C9.18846 9.91527 9.04571 10.0447 8.87797 10.1335C8.71023 10.2223 8.52289 10.2675 8.33313 10.265C8.14958 10.2732 7.96654 10.24 7.79758 10.1678C7.62862 10.0956 7.47809 9.98628 7.35713 9.84797C7.10176 9.55957 6.96525 9.18506 6.97513 8.79998V8.19998C6.96324 7.78332 7.10287 7.3765 7.36813 7.05498C7.49883 6.90064 7.66388 6.77908 7.85005 6.70006ZM3.28926 5.67499C2.97035 5.67933 2.65412 5.734 2.35226 5.83699C2.06442 5.92293 1.79372 6.05828 1.55226 6.23699L1.45226 6.31399V7.51399L1.87526 7.15499C2.24603 6.80478 2.73158 6.60146 3.24126 6.58299C3.36617 6.57164 3.49194 6.59147 3.60731 6.64068C3.72267 6.6899 3.82402 6.76697 3.90226 6.86499C4.05245 7.0971 4.13264 7.36754 4.13326 7.64399L2.90026 7.82499C2.39459 7.87781 1.9155 8.07772 1.52226 8.39999C1.36721 8.55181 1.24363 8.73271 1.15859 8.93235C1.07355 9.13199 1.02873 9.34644 1.02668 9.56343C1.02464 9.78042 1.06542 9.99568 1.14668 10.1969C1.22795 10.3981 1.3481 10.5813 1.50026 10.736C1.66895 10.8904 1.86647 11.01 2.08149 11.0879C2.29651 11.1659 2.5248 11.2005 2.75326 11.19C3.14725 11.1931 3.53302 11.0774 3.86026 10.858C3.96178 10.7897 4.05744 10.7131 4.14626 10.629V11.073H5.08726V7.71499C5.12161 7.17422 4.95454 6.63988 4.61826 6.21499C4.45004 6.03285 4.24373 5.89003 4.01402 5.7967C3.78431 5.70336 3.53686 5.66181 3.28926 5.67499ZM4.14626 8.71599C4.16588 9.13435 4.02616 9.54459 3.75526 9.864C3.63714 10.0005 3.49023 10.1092 3.3251 10.1821C3.15998 10.2551 2.98073 10.2906 2.80026 10.286C2.69073 10.2945 2.5806 10.2812 2.47624 10.2469C2.37187 10.2125 2.27536 10.1579 2.19226 10.086C2.06104 9.93455 1.9888 9.74088 1.9888 9.54049C1.9888 9.34011 2.06104 9.14644 2.19226 8.99499C2.47347 8.82131 2.79258 8.71837 3.12226 8.69499L4.14226 8.54699L4.14626 8.71599ZM12.459 11.0325C12.7663 11.1638 13.0985 11.2261 13.4324 11.215C13.9273 11.227 14.4156 11.1006 14.8424 10.85L14.9654 10.775L14.9784 10.768V9.61504L14.5324 9.93504C14.2163 10.1592 13.8359 10.2747 13.4484 10.264C13.2499 10.2719 13.0522 10.2342 12.8705 10.1538C12.6889 10.0733 12.5281 9.95232 12.4004 9.80004C12.1146 9.42453 11.9728 8.95911 12.0004 8.48804C11.9739 7.98732 12.1355 7.49475 12.4534 7.10704C12.5936 6.94105 12.7698 6.80914 12.9685 6.7213C13.1672 6.63346 13.3833 6.592 13.6004 6.60004C13.9441 6.59844 14.281 6.69525 14.5714 6.87904L15.0004 7.14404V5.97004L14.8314 5.89704C14.4628 5.73432 14.0644 5.6502 13.6614 5.65004C13.3001 5.63991 12.9409 5.70762 12.608 5.84859C12.2752 5.98956 11.9766 6.20048 11.7324 6.46704C11.2263 7.02683 10.9584 7.76186 10.9854 8.51604C10.9569 9.22346 11.1958 9.91569 11.6544 10.455C11.8772 10.704 12.1518 10.9012 12.459 11.0325Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-keyword.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-keyword.svg
new file mode 100644
index 0000000..e040064
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-keyword.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M15.0002 4H10.0002V3H15.0002V4ZM14.0002 7H12.0002V8H14.0002V7ZM10.0002 7H1.00024V8H10.0002V7ZM12.0002 13H1.00024V14H12.0002V13ZM7.00024 10H1.00024V11H7.00024V10ZM15.0002 10H10.0002V11H15.0002V10ZM8.00024 2V5H1.00024V2H8.00024ZM7.00024 3H2.00024V4H7.00024V3Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-method.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-method.svg
new file mode 100644
index 0000000..f922a9a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-method.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M13.5103 4L8.51025 1H7.51025L2.51025 4L2.02026 4.85999V10.86L2.51025 11.71L7.51025 14.71H8.51025L13.5103 11.71L14.0002 10.86V4.85999L13.5103 4ZM7.51025 13.5601L3.01025 10.86V5.69995L7.51025 8.15002V13.5601ZM3.27026 4.69995L8.01025 1.85999L12.7502 4.69995L8.01025 7.29004L3.27026 4.69995ZM13.0103 10.86L8.51025 13.5601V8.15002L13.0103 5.69995V10.86Z" fill="#652D90"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-misc.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-misc.svg
new file mode 100644
index 0000000..57467b3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-misc.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M4.00024 2H12.0002V6C12.3418 6.03511 12.6777 6.11234 13.0002 6.22998V1H3.00024V9.47998L4.00024 7.72998V2ZM6.14026 10L5.00024 8L4.00024 9.75L3.29028 11L1.00024 15H9.00024L6.71021 11L6.14026 10ZM2.72021 14L4.44019 11L5.00024 10L5.5603 11L7.28027 14H2.72021ZM9.55577 7.58984C10.1313 7.20526 10.808 7 11.5002 7C12.4285 7 13.3187 7.36877 13.9751 8.02515C14.6315 8.68152 15.0002 9.57174 15.0002 10.5C15.0002 11.1922 14.795 11.8689 14.4104 12.4445C14.0258 13.02 13.4791 13.4686 12.8396 13.7335C12.2 13.9984 11.4963 14.0678 10.8174 13.9327C10.1384 13.7977 9.51485 13.4643 9.02537 12.9749C8.53589 12.4854 8.20253 11.8618 8.06748 11.1829C7.93244 10.5039 8.0018 9.80019 8.2667 9.16064C8.53161 8.5211 8.98019 7.97443 9.55577 7.58984ZM10.1113 12.5786C10.5224 12.8533 11.0058 13 11.5002 13C12.1633 13 12.7992 12.7367 13.268 12.2678C13.7369 11.799 14.0002 11.163 14.0002 10.5C14.0002 10.0055 13.8535 9.52221 13.5788 9.11108C13.3041 8.69996 12.9137 8.37953 12.4569 8.19031C12.0001 8.00109 11.4975 7.95163 11.0126 8.0481C10.5276 8.14456 10.082 8.38255 9.7324 8.73218C9.38277 9.08181 9.14478 9.52738 9.04832 10.0123C8.95186 10.4973 9.00131 10.9998 9.19053 11.4567C9.37975 11.9135 9.70018 12.3039 10.1113 12.5786Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-namespace.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-namespace.svg
new file mode 100644
index 0000000..8d1c0f4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-namespace.svg
@@ -0,0 +1,10 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<g clip-path="url(#clip0)">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M6.00024 2.98361V2.97184V2H5.91107C5.59767 2 5.29431 2.06161 5.00152 2.18473C4.70842 2.30798 4.44967 2.48474 4.22602 2.71498C4.00336 2.94422 3.83816 3.19498 3.73306 3.46766L3.73257 3.46898C3.63406 3.7352 3.56839 4.01201 3.53557 4.29917L3.53543 4.30053C3.50702 4.5805 3.49894 4.86844 3.51108 5.16428C3.52297 5.45379 3.52891 5.74329 3.52891 6.03279C3.52891 6.23556 3.48999 6.42594 3.41225 6.60507L3.41185 6.60601C3.33712 6.78296 3.23447 6.93866 3.10341 7.07359C2.97669 7.20405 2.8249 7.31055 2.64696 7.3925C2.47084 7.46954 2.28522 7.5082 2.08942 7.5082H2.00024V7.6V8.4V8.4918H2.08942C2.2849 8.4918 2.47026 8.53238 2.64625 8.61334L2.64766 8.61396C2.82482 8.69157 2.97602 8.79762 3.10245 8.93161L3.10436 8.93352C3.23452 9.0637 3.33684 9.21871 3.41153 9.39942L3.41225 9.40108C3.49011 9.58047 3.52891 9.76883 3.52891 9.96721C3.52891 10.2567 3.52297 10.5462 3.51108 10.8357C3.49894 11.1316 3.50701 11.4215 3.5354 11.7055L3.5356 11.7072C3.56844 11.9903 3.63412 12.265 3.73256 12.531L3.73307 12.5323C3.83817 12.805 4.00336 13.0558 4.22602 13.285C4.44967 13.5153 4.70842 13.692 5.00152 13.8153C5.29431 13.9384 5.59767 14 5.91107 14H6.00024V13.2V13.0164H5.91107C5.71119 13.0164 5.52371 12.9777 5.34787 12.9008C5.17421 12.8191 5.02218 12.7126 4.89111 12.5818C4.76411 12.4469 4.66128 12.2911 4.58247 12.1137C4.50862 11.9346 4.47158 11.744 4.47158 11.541C4.47158 11.3127 4.47554 11.0885 4.48346 10.8686C4.49149 10.6411 4.49151 10.4195 4.48349 10.2039C4.47938 9.98246 4.46109 9.76883 4.42847 9.56312C4.39537 9.35024 4.33946 9.14757 4.26063 8.95536C4.18115 8.76157 4.07282 8.57746 3.9364 8.40298C3.8237 8.25881 3.68563 8.12462 3.52307 8C3.68563 7.87538 3.8237 7.74119 3.9364 7.59702C4.07282 7.42254 4.18115 7.23843 4.26063 7.04464C4.33938 6.85263 4.39537 6.65175 4.4285 6.44285C4.46107 6.2333 4.47938 6.01973 4.48349 5.80219C4.49151 5.58262 4.4915 5.36105 4.48345 5.13749C4.47554 4.9134 4.47158 4.68725 4.47158 4.45902C4.47158 4.26019 4.50857 4.07152 4.58263 3.89205C4.6616 3.71034 4.76445 3.55475 4.8911 3.42437C5.02218 3.28942 5.17485 3.18275 5.34826 3.10513C5.52404 3.02427 5.71138 2.98361 5.91107 2.98361H6.00024ZM10.0002 13.0164V13.0282V14H10.0894C10.4028 14 10.7062 13.9384 10.999 13.8153C11.2921 13.692 11.5508 13.5153 11.7745 13.285C11.9971 13.0558 12.1623 12.805 12.2674 12.5323L12.2679 12.531C12.3664 12.2648 12.4321 11.988 12.4649 11.7008L12.4651 11.6995C12.4935 11.4195 12.5015 11.1316 12.4894 10.8357C12.4775 10.5462 12.4716 10.2567 12.4716 9.96721C12.4716 9.76444 12.5105 9.57406 12.5882 9.39493L12.5886 9.39399C12.6634 9.21704 12.766 9.06134 12.8971 8.92642C13.0238 8.79595 13.1756 8.68945 13.3535 8.6075C13.5296 8.53046 13.7153 8.4918 13.9111 8.4918H14.0002V8.4V7.6V7.5082H13.9111C13.7156 7.5082 13.5302 7.46762 13.3542 7.38666L13.3528 7.38604C13.1757 7.30844 13.0245 7.20238 12.898 7.06839L12.8961 7.06648C12.766 6.9363 12.6637 6.78129 12.589 6.60058L12.5882 6.59892C12.5104 6.41953 12.4716 6.23117 12.4716 6.03279C12.4716 5.74329 12.4775 5.45379 12.4894 5.16428C12.5015 4.86842 12.4935 4.57848 12.4651 4.29454L12.4649 4.29285C12.4321 4.00971 12.3664 3.73502 12.2679 3.46897L12.2674 3.46766C12.1623 3.19499 11.9971 2.94422 11.7745 2.71498C11.5508 2.48474 11.2921 2.30798 10.999 2.18473C10.7062 2.06161 10.4028 2 10.0894 2H10.0002V2.8V2.98361H10.0894C10.2893 2.98361 10.4768 3.0223 10.6526 3.09917C10.8263 3.18092 10.9783 3.28736 11.1094 3.41823C11.2364 3.55305 11.3392 3.70889 11.418 3.88628C11.4919 4.0654 11.5289 4.25596 11.5289 4.45902C11.5289 4.68727 11.5249 4.91145 11.517 5.13142C11.509 5.35894 11.509 5.58049 11.517 5.79605C11.5211 6.01754 11.5394 6.23117 11.572 6.43688C11.6051 6.64976 11.661 6.85243 11.7399 7.04464C11.8193 7.23843 11.9277 7.42254 12.0641 7.59702C12.1768 7.74119 12.3149 7.87538 12.4774 8C12.3149 8.12462 12.1768 8.25881 12.0641 8.40298C11.9277 8.57746 11.8193 8.76157 11.7399 8.95536C11.6611 9.14737 11.6051 9.34825 11.572 9.55715C11.5394 9.7667 11.5211 9.98027 11.517 10.1978C11.509 10.4174 11.509 10.6389 11.517 10.8625C11.5249 11.0866 11.5289 11.3128 11.5289 11.541C11.5289 11.7398 11.4919 11.9285 11.4179 12.1079C11.3389 12.2897 11.236 12.4452 11.1094 12.5756C10.9783 12.7106 10.8256 12.8173 10.6522 12.8949C10.4764 12.9757 10.2891 13.0164 10.0894 13.0164H10.0002Z" fill="#424242"/>
+</g>
+<defs>
+<clipPath id="clip0">
+<rect width="16" height="16" fill="white" transform="translate(0.000244141)"/>
+</clipPath>
+</defs>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-numeric.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-numeric.svg
new file mode 100644
index 0000000..0ab24fa
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-numeric.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M11.0002 1V5H15.0002V6H11.0002L11.0002 10H15.0002V11H11.0002V15H10.0002V11H6.00024V15H5.00024L5.00024 11H1.00024V10H5.00024L5.00024 6H1.00024V5H5.00024L5.00024 1H6.00024V5H10.0002V1H11.0002ZM6.00024 6L6.00024 10H10.0002L10.0002 6H6.00024Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-operator.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-operator.svg
new file mode 100644
index 0000000..23d0d19
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-operator.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M2.87313 1.10023C3.20793 1.23579 3.4757 1.498 3.61826 1.82988C3.69056 1.99959 3.72699 2.18242 3.72526 2.36688C3.72642 2.54999 3.69 2.7314 3.61826 2.89988C3.51324 3.14567 3.33807 3.35503 3.11466 3.50177C2.89126 3.64851 2.62955 3.72612 2.36226 3.72488C2.17948 3.72592 1.99842 3.68951 1.83026 3.61788C1.58322 3.51406 1.37252 3.33932 1.22478 3.11575C1.07704 2.89219 0.99891 2.62984 1.00026 2.36188C0.999374 2.17921 1.03543 1.99825 1.10626 1.82988C1.24362 1.50314 1.50353 1.24323 1.83026 1.10588C2.16357 0.966692 2.53834 0.964661 2.87313 1.10023ZM2.57526 2.86488C2.70564 2.80913 2.80951 2.70526 2.86526 2.57488C2.89314 2.50838 2.90742 2.43698 2.90726 2.36488C2.90838 2.2654 2.88239 2.1675 2.8321 2.08167C2.7818 1.99584 2.70909 1.92531 2.62176 1.87767C2.53443 1.83002 2.43577 1.80705 2.33638 1.81121C2.23698 1.81537 2.1406 1.8465 2.05755 1.90128C1.97451 1.95606 1.90794 2.03241 1.865 2.12215C1.82205 2.21188 1.80434 2.31161 1.81376 2.41065C1.82319 2.50968 1.85939 2.60428 1.9185 2.6843C1.9776 2.76433 2.05738 2.82675 2.14926 2.86488C2.28574 2.92089 2.43878 2.92089 2.57526 2.86488ZM6.43019 1.1095L1.10992 6.42977L1.79581 7.11567L7.11608 1.7954L6.43019 1.1095ZM11.5002 8.99999H12.5002V11.5H15.0002V12.5H12.5002V15H11.5002V12.5H9.00024V11.5H11.5002V8.99999ZM5.76801 9.52509L6.47512 10.2322L4.70735 12L6.47512 13.7677L5.76801 14.4748L4.00024 12.7071L2.23248 14.4748L1.52537 13.7677L3.29314 12L1.52537 10.2322L2.23248 9.52509L4.00024 11.2929L5.76801 9.52509ZM7.11826 5.32988C7.01466 5.08268 6.83997 4.87183 6.61636 4.72406C6.39275 4.57629 6.13028 4.49826 5.86226 4.49988C5.6796 4.49899 5.49864 4.53505 5.33026 4.60588C5.00353 4.74323 4.74362 5.00314 4.60626 5.32988C4.53612 5.49478 4.49922 5.67191 4.49766 5.8511C4.4961 6.0303 4.52992 6.20804 4.59718 6.37414C4.66443 6.54024 4.76381 6.69143 4.88961 6.81906C5.0154 6.94669 5.16515 7.04823 5.33026 7.11788C5.49892 7.18848 5.67993 7.22484 5.86276 7.22484C6.0456 7.22484 6.22661 7.18848 6.39526 7.11788C6.64225 7.01388 6.85295 6.83913 7.00082 6.61563C7.1487 6.39213 7.22713 6.12987 7.22626 5.86188C7.22679 5.67905 7.19005 5.49803 7.11826 5.32988ZM6.36526 6.07488C6.3379 6.13937 6.29854 6.19808 6.24926 6.24788C6.19932 6.29724 6.14066 6.33691 6.07626 6.36488C6.00878 6.39297 5.93635 6.40725 5.86326 6.40688C5.79015 6.40744 5.71769 6.39315 5.65026 6.36488C5.58565 6.33729 5.52693 6.29757 5.47726 6.24788C5.42715 6.19856 5.38738 6.13975 5.36026 6.07488C5.30425 5.9384 5.30425 5.78536 5.36026 5.64888C5.41561 5.51846 5.51965 5.41477 5.65026 5.35988C5.71761 5.33126 5.79008 5.31663 5.86326 5.31688C5.93642 5.31685 6.00884 5.33147 6.07626 5.35988C6.14062 5.38749 6.19928 5.42682 6.24926 5.47588C6.2981 5.52603 6.33741 5.58465 6.36526 5.64888C6.39364 5.7163 6.40827 5.78872 6.40827 5.86188C6.40827 5.93503 6.39364 6.00745 6.36526 6.07488ZM14.0002 3H10.0002V4H14.0002V3Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-parameter.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-parameter.svg
new file mode 100644
index 0000000..940524d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-parameter.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M11.0003 6H10.0003V5.5C10.0003 5.22386 9.7764 5 9.50026 5H8.47926V10.5C8.47926 10.7761 8.70312 11 8.97926 11H9.47926V12H6.47926V11H6.97926C7.2554 11 7.47926 10.7761 7.47926 10.5V5H6.50026C6.22412 5 6.00026 5.22386 6.00026 5.5V6H5.00026V4H11.0003V6ZM13.9145 8.0481L12.4522 6.58581L13.1593 5.87871L14.9751 7.69454V8.40165L13.2074 10.1694L12.5003 9.46231L13.9145 8.0481ZM3.54835 9.4623L2.08605 8.00002L3.50026 6.58581L2.79316 5.8787L1.02539 7.64647V8.35357L2.84124 10.1694L3.54835 9.4623Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-property.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-property.svg
new file mode 100644
index 0000000..efffad4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-property.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path d="M2.80747 14.9754C2.57144 14.9721 2.33851 14.9211 2.12271 14.8254C1.90692 14.7297 1.71273 14.5913 1.55183 14.4186C1.23875 14.1334 1.04458 13.7408 1.00799 13.3189C0.966469 12.8828 1.09293 12.4473 1.36158 12.1013C2.56804 10.8289 4.94755 8.4494 6.67836 6.75479C6.31007 5.75887 6.32729 4.66127 6.72661 3.67739C7.05499 2.85876 7.63893 2.16805 8.39153 1.70807C8.98195 1.31706 9.66055 1.07944 10.3659 1.01673C11.0713 0.954022 11.7812 1.06819 12.4313 1.34892L13.0485 1.6162L10.1827 4.56738L11.4374 5.82582L14.3811 2.94887L14.6484 3.56788C14.8738 4.08976 14.9933 4.65119 14.9999 5.21961C15.0066 5.78802 14.9004 6.35211 14.6874 6.87915C14.4763 7.40029 14.1626 7.87368 13.7649 8.27122C13.5396 8.49169 13.2907 8.68653 13.0225 8.85218C12.4676 9.22275 11.8327 9.45636 11.1699 9.5338C10.5071 9.61124 9.83546 9.5303 9.21007 9.29764C8.11219 10.4113 5.37167 13.1704 3.89143 14.5522C3.5945 14.8219 3.20856 14.9726 2.80747 14.9754ZM10.7451 1.92802C10.0873 1.92637 9.44383 2.12018 8.89639 2.48485C8.68289 2.6152 8.48461 2.76897 8.30522 2.9433C7.82813 3.42423 7.5095 4.03953 7.39206 4.70669C7.27462 5.37385 7.36398 6.06098 7.64816 6.67591L7.78366 6.97288L7.55072 7.20025C5.81249 8.89672 3.28171 11.4201 2.06504 12.7045C1.9567 12.8658 1.91037 13.0608 1.93459 13.2535C1.95881 13.4463 2.05195 13.6238 2.19682 13.7532C2.28029 13.8462 2.38201 13.9211 2.49565 13.9731C2.59581 14.0184 2.70408 14.043 2.81397 14.0455C2.98089 14.0413 3.14068 13.977 3.26407 13.8646C4.83711 12.3964 7.87646 9.32641 8.76832 8.42435L8.99754 8.19326L9.29266 8.32783C9.80642 8.56732 10.3734 8.66985 10.9385 8.62545C11.5036 8.58106 12.0476 8.39125 12.5176 8.07447C12.7316 7.9426 12.9299 7.78694 13.1088 7.61045C13.4186 7.30153 13.6634 6.93374 13.8288 6.52874C13.9943 6.12375 14.077 5.68974 14.0721 5.25228C14.0722 5.03662 14.0507 4.82148 14.0081 4.61007L11.4309 7.12508L8.87968 4.57759L11.3947 1.98834C11.1807 1.94674 10.9631 1.92653 10.7451 1.92802Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-ruler.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-ruler.svg
new file mode 100644
index 0000000..0a0b9a4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-ruler.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M4.00024 1L3.00024 2V14L4.00024 15H12.0002L13.0002 14V2L12.0002 1H4.00024ZM4.00024 3V2H12.0002V14H4.00024V13H6.00024V12H4.00024V10H8.00024V9H4.00024V7H6.00024V6H4.00024V4H8.00024V3H4.00024Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-snippet.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-snippet.svg
new file mode 100644
index 0000000..ebb8a11
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-snippet.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M2.50024 1L2.00024 1.5V13H3.00024V2H14.0002V13H15.0002V1.5L14.5002 1H2.50024ZM2.00024 15V14H3.00024V15H2.00024ZM5.00024 14.0001H4.00024V15.0001H5.00024V14.0001ZM6.00024 14.0001H7.00024V15.0001H6.00024V14.0001ZM9.00024 14.0001H8.00024V15.0001H9.00024V14.0001ZM10.0002 14.0001H11.0002V15.0001H10.0002V14.0001ZM15.0002 15.0001V14.0001H14.0002V15.0001H15.0002ZM12.0002 14.0001H13.0002V15.0001H12.0002V14.0001Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-string.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-string.svg
new file mode 100644
index 0000000..2fabca5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-string.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M2.00024 2L1.00024 3V12L2.00024 13H14.0002L15.0002 12V3L14.0002 2H2.00024ZM2.00024 12V3H14.0002V12H2.00024ZM5.35585 8.93017H6.00024V7.22067C6.00024 6.40689 5.68559 6 5.05628 6C4.92122 6 4.77108 6.02421 4.60585 6.07263C4.44205 6.12104 4.31274 6.17691 4.21792 6.24022V6.90503C4.45499 6.70205 4.70499 6.60056 4.96792 6.60056C5.22941 6.60056 5.36016 6.75698 5.36016 7.06983L4.76102 7.17318C4.25384 7.25885 4.00024 7.57914 4.00024 8.13408C4.00024 8.39665 4.06131 8.60708 4.18343 8.76536C4.307 8.92179 4.47582 9 4.6899 9C4.98013 9 5.19924 8.83985 5.34723 8.51955H5.35585V8.93017ZM5.36016 7.57542V7.76816C5.36016 7.9432 5.31993 8.08845 5.23947 8.20391C5.15901 8.3175 5.05484 8.3743 4.92697 8.3743C4.83501 8.3743 4.76174 8.34264 4.70714 8.27933C4.65398 8.21415 4.6274 8.13128 4.6274 8.03073C4.6274 7.80912 4.73803 7.6797 4.9593 7.64246L5.36016 7.57542ZM7.60118 8.62622H7.59367V8.93511H7.00024V5H7.59367V6.67683H7.60118C7.74766 6.36708 7.95611 6.2122 8.22653 6.2122C8.47442 6.2122 8.66535 6.32987 8.7993 6.56522C8.93326 6.80056 9.00024 7.12243 9.00024 7.53082C9.00024 7.97383 8.922 8.32944 8.7655 8.59766C8.60901 8.86589 8.39993 9 8.13827 9C7.90165 9 7.72262 8.87541 7.60118 8.62622ZM7.58428 7.50487V7.77742C7.58428 7.94873 7.61996 8.09063 7.69132 8.20311C7.76269 8.3156 7.85408 8.37184 7.9655 8.37184C8.10071 8.37184 8.20525 8.30002 8.27912 8.15639C8.35423 8.01103 8.39179 7.80597 8.39179 7.54121C8.39179 7.32144 8.35736 7.15012 8.28851 7.02726C8.2209 6.90266 8.12387 6.84036 7.99743 6.84036C7.87849 6.84036 7.77959 6.9018 7.70071 7.02466C7.62309 7.14752 7.58428 7.30759 7.58428 7.50487ZM11.2619 9C11.5837 9 11.8298 8.94227 12.0002 8.82682V8.11732C11.8202 8.25512 11.6362 8.32402 11.4483 8.32402C11.2364 8.32402 11.0699 8.25233 10.9489 8.10894C10.8278 7.96369 10.7673 7.76443 10.7673 7.51117C10.7673 7.25047 10.8302 7.04656 10.956 6.89944C11.0835 6.75047 11.2555 6.67598 11.4722 6.67598C11.6665 6.67598 11.8425 6.74488 12.0002 6.88268V6.13408C11.8712 6.04469 11.6625 6 11.3742 6C10.9568 6 10.6231 6.1406 10.373 6.42179C10.1245 6.70112 10.0002 7.0838 10.0002 7.56983C10.0002 7.99069 10.1165 8.33426 10.3491 8.60056C10.5817 8.86685 10.8859 9 11.2619 9Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-structure.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-structure.svg
new file mode 100644
index 0000000..2b8c0d9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-structure.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M2.00024 2L1.00024 3V6L2.00024 7H14.0002L15.0002 6V3L14.0002 2H2.00024ZM2.00024 3H3.00024H13.0002H14.0002V4V5V6H13.0002H3.00024H2.00024V5V4V3ZM1.00024 10L2.00024 9H5.00024L6.00024 10V13L5.00024 14H2.00024L1.00024 13V10ZM3.00024 10H2.00024V11V12V13H3.00024H4.00024H5.00024V12V11V10H4.00024H3.00024ZM10.0002 10L11.0002 9H14.0002L15.0002 10V13L14.0002 14H11.0002L10.0002 13V10ZM12.0002 10H11.0002V11V12V13H12.0002H13.0002H14.0002V12V11V10H13.0002H12.0002Z" fill="#424242"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-variable.svg b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-variable.svg
new file mode 100644
index 0000000..3656d9e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/company-20260721.100/icons/vscode-light/symbol-variable.svg
@@ -0,0 +1,3 @@
+<svg width="16" height="16" viewBox="0 0 16 16" fill="none" xmlns="http://www.w3.org/2000/svg">
+<path fill-rule="evenodd" clip-rule="evenodd" d="M2.00024 5H4.00024V4H1.50024L1.00024 4.5V12.5L1.50024 13H4.00024V12H2.00024V5ZM14.5002 4H12.0002V5H14.0002V12H12.0002V13H14.5002L15.0002 12.5V4.5L14.5002 4ZM11.7603 6.56995L12.0002 7V9.51001L11.7002 9.95996L7.2002 11.96H6.74023L4.24023 10.46L4.00024 10.03V7.53003L4.30029 7.06995L8.80029 5.06995H9.26025L11.7603 6.56995ZM5.00024 9.70996L6.50024 10.61V9.28003L5.00024 8.38V9.70996ZM5.5802 7.56006L7.03027 8.43005L10.4203 6.93005L8.97021 6.06006L5.5802 7.56006ZM7.53027 10.73L11.0303 9.17004V7.77002L7.53027 9.31995V10.73Z" fill="#007ACC"/>
+</svg>
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-meta.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-meta.png
new file mode 100755
index 0000000..7f4f079
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-meta.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-qa.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-qa.png
new file mode 100755
index 0000000..8d924a7
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-qa.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-strip-qa.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-strip-qa.png
new file mode 100755
index 0000000..3a4b986
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-strip-qa.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-strip.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-strip.png
new file mode 100755
index 0000000..7909842
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo-strip.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo.png
new file mode 100755
index 0000000..5150239
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/echo.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/preview-dark.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/preview-dark.png
new file mode 100755
index 0000000..80c1701
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/preview-dark.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/preview-light.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/preview-light.png
new file mode 100755
index 0000000..eb93189
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/preview-light.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-annotations.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-annotations.png
new file mode 100755
index 0000000..c602a89
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-annotations.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-faces-light.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-faces-light.png
new file mode 100755
index 0000000..71de7ae
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-faces-light.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-filter.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-filter.png
new file mode 100755
index 0000000..57b761f
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-filter.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-flip.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-flip.png
new file mode 100755
index 0000000..a5152f6
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-flip.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icon-bg.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icon-bg.png
new file mode 100755
index 0000000..1102ad8
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icon-bg.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icon-face.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icon-face.png
new file mode 100755
index 0000000..0ead3dd
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icon-face.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icons-dot.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icons-dot.png
new file mode 100755
index 0000000..7945871
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icons-dot.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icons-text.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icons-text.png
new file mode 100755
index 0000000..00bd58c
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icons-text.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icons-vscode.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icons-vscode.png
new file mode 100755
index 0000000..7dba78a
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-icons-vscode.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-limit.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-limit.png
new file mode 100755
index 0000000..8e24e4b
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-limit.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-margin.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-margin.png
new file mode 100755
index 0000000..c3da93b
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-margin.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-minimum-above.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-minimum-above.png
new file mode 100644
index 0000000..ae9e462
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-minimum-above.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-minimum-below.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-minimum-below.png
new file mode 100644
index 0000000..2bd90a3
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-minimum-below.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-offset-display.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-offset-display.png
new file mode 100755
index 0000000..b0f75eb
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-offset-display.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-qa-faces-light.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-qa-faces-light.png
new file mode 100755
index 0000000..47960d0
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-qa-faces-light.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-quick-access.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-quick-access.png
new file mode 100755
index 0000000..11452bb
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-quick-access.png differ
diff --git a/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-search.png b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-search.png
new file mode 100755
index 0000000..8bdfa84
Binary files /dev/null and b/emacs/.emacs.d/elpa/company-20260721.100/images/small/tooltip-search.png differ
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2.signed b/emacs/.emacs.d/elpa/compat-31.0.0.2.signed
new file mode 100644
index 0000000..c428c5b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2.signed
@@ -0,0 +1 @@
+Good signature from 645357D2883A0966 GNU ELPA Signing Agent (2023) <elpasign@elpa.gnu.org> (trust undefined) created at 2026-07-10T05:05:01+0800 using EDDSA
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/NEWS.org b/emacs/.emacs.d/elpa/compat-31.0.0.2/NEWS.org
new file mode 100644
index 0000000..fdb7b72
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/NEWS.org
@@ -0,0 +1,407 @@
+#+link:    compat-gh   https://github.com/emacs-compat/compat/issues/
+#+options: toc:nil num:nil author:nil
+
+* Release of "Compat" Version 31.0.0.2
+
+- compat-31: Fix extended function =seconds-to-string=.
+
+(Release <2026-07-09 Thu>)
+
+* Release of "Compat" Version 31.0.0.1
+
+- compat-31: Improve =with-work-buffer= implementation.
+
+(Release <2026-05-03 Sun>)
+
+* Release of "Compat" Version 31.0.0.0
+
+- compat-28: New pcase pattern =cl-type=.
+- compat-29: Add =string-glyph-compose= and =string-glyph-decompose=.
+- compat-31: New macros =static-when= and =static-unless=.
+- compat-31: New functions =oddp= and =evenp=.
+- compat-31: New functions =minusp= and =plusp=.
+- compat-31: New macros =incf= and =decf=.
+- compat-31: New function =color-blend=.
+- compat-31: New function =completion-table-with-metadata=.
+- compat-31: New function =completion-list-candidate-at-point=.
+- compat-31: New macro =with-work-buffer=.
+- compat-31: New function =unbuttonize-region=.
+- compat-31: New extended function =seconds-to-string=.
+- compat-31: New function =hash-table-contains-p=.
+- compat-31: New function =remove-display-text-property=.
+- compat-31: New functions =drop-while=, =take-while=, =member-if=, =any=, =all=.
+- compat-31: New function =set-local=.
+- compat-31: New function =ensure-proper-list=.
+- compat-31: New error API functions =error-type-p=, =error-has-type-p=, =error-type=
+  and =error-slot-value=.
+- Drop support for Emacs 24.x. Emacs 25.1 is required now. In case
+  Emacs 24.x support is still needed, Compat 30 can be used.
+
+(Release <2026-05-01 Fri>)
+
+* Release of "Compat" Version 30.1.0.1
+
+- compat-28: Fix =named-let= tail recursion.
+
+(Release <2025-06-19 Thu>)
+
+* Release of "Compat" Version 30.1.0.0
+
+- compat-30: Add oklab color functions.
+
+(Release <2025-04-02 Wed>)
+
+* Release of "Compat" Version 30.0.2.0
+
+- compat-30: Rename =trusted-files= to =trusted-content=.
+
+(Release <2025-01-04 Sat>)
+
+* Release of "Compat" Version 30.0.1.0
+
+- compat-30: New variable =untrusted-content=.
+- compat-30: New variable =trusted-files=.
+- compat-30: New function =trusted-content-p=.
+
+(Release <2024-12-15 Sun>)
+
+* Release of "Compat" Version 30.0.0.0
+
+- compat-28: Mark =subr-native-elisp-p= as obsolete (renamed in Emacs 30).
+- compat-30: New function =char-to-name=.
+- compat-30: New function =obarray-clear=.
+- compat-30: New function =interpreted-function-p=.
+- compat-30: New function =primitive-function-p=.
+- compat-30: New function =closurep=.
+- compat-30: Add extended function =sort= with keyword arguments.
+- compat-30: New function =value<=.
+- compat-30: Add extended =copy-tree= with support for copying records with
+  non-nil optional second argument.
+- compat-30: New macro =static-if=.
+- compat-30: New alias =drop=.
+- compat-30: New function =merge-ordered-lists=.
+- compat-30: New variables =completion-lazy-hilit= and =completion-lazy-hilit-fn=
+  and new function =completion-lazy-hilit=.
+- compat-30: New function =require-with-check=.
+- compat-30: New functions =find-buffer= and =get-truename-buffer=.
+- compat-30: Add extended =completion-metadata-get= with support for
+  =completion-category-overrides= and =completion-extra-properties=.
+
+(Release <2024-07-08 Mon>)
+
+* Release of "Compat" Version 29.1.4.5
+
+- Minor optimization of ~plist-get~ and ~plist-put~.
+- Minor compatibility adjustments for the Emacs 30 development version.
+- A minimal version of =compat.el= will be part of Emacs 30. Emacs :core packages
+  can directly ~(require 'compat)~ without the ~NOERROR~ flag. Furthermore Compat
+  will not be installed unnecessarily. If a package depending on Emacs 25.1 and
+  Compat 29.1 is installed on Emacs 30.1, Compat 29.1 will not be installed from
+  ELPA, since Emacs 30.1 already provides the required functionality.
+
+(Release <2024-03-16 Sat>)
+
+* Release of "Compat" Version 29.1.4.4
+
+- Fix ~Package-Requires~ header in compat.el
+- Fix ~Maintainer~ header in compat.el
+
+(Release <2023-11-13 Mon>)
+
+* Release of "Compat" Version 29.1.4.3
+
+- compat-29: Add function =char-uppercase-p=.
+- compat-29: Add function =window-configuration-equal-p=.
+
+(Release <2023-11-04 Sat>)
+
+* Release of "Compat" Version 29.1.4.2
+
+- compat-28: Improve =make-separator-line= visuals on graphic displays.
+- compat-28: Add =native-comp-available-p=, which always returns nil.
+- compat-29: Add variable =lisp-directory=.
+
+(Release <2023-07-30 Sun>)
+
+* Release of "Compat" Version 29.1.4.1
+
+- compat-29: Add ~directory-abbrev-apply~.
+- compat-29: Add ~directory-abbrev-make-regexp~.
+
+(Release <2023-03-26 Sun>)
+
+* Release of "Compat" Version 29.1.4.0
+
+- compat-27: Drop obsolete ~compat-call dired-get-marked-files~.
+- compat-28: Add support for ~defcustom~ type ~natnum~.
+- compat-29: Add ~with-restriction~ and ~without-restriction~.
+- compat-29: Add ~cl-constantly~.
+- compat-29: Drop ~with-narrowing~ which was renamed to ~with-restriction~.
+- compat-28: Add support for ~defcustom~ type ~key~.
+
+(Release <2023-03-05 Sun>)
+
+* Release of "Compat" Version 29.1.3.4
+
+- Ensure that ~seq~ is required properly both at compile time and runtime, such
+  that compilation of downstream packages works even if Compat itself is not
+  compiled. Magit uses a complex continuous integration system, where Magit is
+  compiled and tested, while the Compat dependency is not compiled.
+- compat-28: Add ~process-lines-handling-status~ and ~process-lines-ignore-status~.
+
+(Release <2023-02-11 Sat>)
+
+* Release of "Compat" Version 29.1.3.3
+
+- compat-27: Add ~with-suppressed-warnings~.
+- compat-29: Add ~cl-with-gensyms~ and ~cl-once-only~.
+- compat-29: Load ~seq~, which is preloaded on Emacs 29.
+
+(Release <2023-02-08 Wed>)
+
+* Release of "Compat" Version 29.1.3.2
+
+- compat-26: Add ~make-temp-file~ with optional argument TEXT.
+- compat-27: Mark ~compat-call dired-get-marked-files~ as obsolete. See the
+  section limitations in the Compat manual.
+- compat-29: Add ~funcall-with-delayed-message~ and ~with-delayed-message~.
+- compat-29: Add ~ert-with-temp-file~ and ~ert-with-temp-directory~.
+- compat-29: Add ~set-transient-map~ with optional arguments MESSAGE and TIMEOUT.
+
+(Release <2023-02-01 Wed>)
+
+* Release of "Compat" Version 29.1.3.1
+
+- Fix regression, which prevented loading Compat in interpreted mode. We ensure
+  that Compat works interpreted and byte compiled by running the entire test
+  suite twice in the CI. See https://github.com/magit/magit/issues/4858 for the
+  corresponding Magit issue.
+- compat-27: Add ~file-name-unquote~.
+- compat-28: Add ~mark-thing-at-mouse~.
+- compat-29: Replace ~string-lines~ with version from Emacs 29, support optional
+  KEEP-NEWLINES argument.
+
+(Release <2023-01-25 Wed>)
+
+* Release of "Compat" Version 29.1.3.0
+
+- compat-25: Add ~hash-table-empty-p~.
+- compat-25: Add ~macroexp-parse-body~ and ~macroexp-quote~.
+- compat-25: Add ~region-noncontiguous-p~.
+- compat-25: Add ~save-mark-and-excursion~.
+- compat-26: Add ~read-answer~.
+- compat-26: Add ~region-bounds~.
+- compat-27: Add ~date-ordinal-to-time~.
+- compat-27: Add ~file-size-human-readable-iec~.
+- compat-27: Add ~major-mode-suspend~ and ~major-mode-restore~.
+- compat-27: Add ~make-decoded-time~.
+- compat-27: Add ~minibuffer-history-value~.
+- compat-27: Add ~read-char-from-minibuffer~.
+- compat-27: Add ~ring-resize~.
+- compat-28: Add ~color-dark-p~.
+- compat-28: Add ~directory-files-and-attributes~ with COUNT argument.
+- compat-28: Add ~text-quoting-style~.
+- compat-28: Add ~with-window-non-dedicated~.
+- compat-29: Add ~buffer-local-set-state~ and ~buffer-local-restore-state~.
+- compat-29: Add ~compiled-function-p~.
+- compat-29: Add ~count-sentences~.
+- compat-29: Add ~delete-line~.
+- compat-29: Add ~get-scratch-buffer-create~.
+- compat-29: Add ~list-of-strings-p~.
+- compat-29: Add ~plist-get~ generalized variable.
+- compat-29: Add ~plistp~.
+- compat-29: Add ~read-multiple-choice~ with LONG-FORM argument.
+- compat-29: Add ~readablep~.
+- compat-29: Add ~substitute-quotes~.
+- compat-29: Add ~use-region-beginning~, ~use-region-end~ and ~use-region-noncontiguous-p~.
+- compat-29: Add ~with-narrowing~.
+
+(Release <2023-01-22 Sun>)
+
+* Release of "Compat" Version 29.1.2.0
+
+- All compatibility functions are covered by tests!
+- Add links from compatibility definitions to tests.
+- BREAKING: Drop JSON parsing support (libjansson API, unused downstream).
+- BREAKING: Drop ~null-device~ (unused downstream).
+- BREAKING: Drop ~unlock-buffer~ (unused downstream).
+- compat-26: Add ~buffer-hash~.
+- compat-27: Add ~fixnump~ and ~bignump~.
+- compat-27: Add ~with-minibuffer-selected-window~.
+- compat-27: Add generalized variables for ~decoded-time-*~.
+- compat-28: Add ~macroexp-warn-and-return~.
+- compat-28: Add ~subr-native-elisp-p~.
+- compat-28: Add ~bounds-of-thing-at-mouse~.
+- compat-29: Add ~with-buffer-unmodified-if-unchanged~.
+- compat-29: Fix and test ~define-key~ with REMOVE argument.
+
+(Release <2023-01-16 Mon>)
+
+* Release of "Compat" Version 29.1.1.1
+
+- Add tests, 167 out of 203 definitions tested (82%).
+- compat-25: Improve algorithmic complexity of ~sort~.
+- compat-28: Add ~make-separator-line~.
+- compat-29: Minor fixes to ~keymap-*~ functions.
+- compat-29: Add ~with-memoization~.
+- compat-29: Add ~buttonize~ and ~buttonize-region~.
+
+(Release <2023-01-14 Sat>)
+
+* Release of "Compat" Version 29.1.1.0
+
+- The macros in ~compat-macs.el~ have been rewritten and simplified. The
+  refactoring allows to further refine the criteria under which compatibility
+  aliases, functions, macros and variables are installed.
+- Remove deprecated, prefixed compatibility functions.
+- Remove deprecated features ~compat-help~, ~compat-font-lock~ and ~compat-24~.
+- Compat uses runtime checks (~boundp~, ~fboundp~) to ensure that existing
+  definitions are never overridden, when Compat is loaded on a newer Emacs than
+  it was compiled on.
+- Compat compiles without byte compilation warnings on all supported Emacs
+  versions. Warnings are treated as errors in the test suite.
+- Compat takes great care to remove unneeded definitions at compile time. On
+  recent Emacs 29 the byte compiled files are empty and not loaded, such that
+  Compat does not any cost to the Emacs process.
+- compat-26: Fix and test ~image-property~ setter.
+- compat-26: Fix and test ~read-multiple-choice~.
+- compat-28: Fix and test ~with-existing-directory~.
+- compat-28: Drop obsolete function ~make-directory-autoloads~.
+- compat-29: Drop broken functions ~string-pixel-width~ and
+  ~buffer-text-pixel-size~. These functions had poor performance which lead to a
+  downstream issue in the doom-modeline package. If a more efficient solution is
+  possible, the function will be added back. See [[compat-gh:8]] for the bug report.
+- compat-29: Drop broken function ~string-limit~.
+- compat-29: Drop broken macro ~with-buffer-unmodified-if-unchanged~, which relied
+  on ~buffer-hash~ which does not exist on all supported Emacs versions.
+- compat-29: Add ~pos-bol~ and ~pos-eol~.
+
+(Release <2023-01-07 Sat>)
+
+* Release of "Compat" Version 29.1.0.1
+
+- Add multiple new tests for existing APIs.
+- Fix bugs in compatibility functions: ~setq-local~, ~proper-list-p, prop-match-p~,
+  ~file-name-concat~, ~replace-regexp-in-region~, ~replace-string-in-region~.
+- Add new Emacs 29 APIs. Some of them are still untested and may change. If you
+  intend to use an Emacs 29 API please be careful and if possible contribute
+  test cases. All untested functions are marked in the Compat code. Over time
+  tests for all functions will be added gradually.
+- Add the macros ~compat-call~ and ~compat-function~ to call compatibility
+  functions. Since Compat avoids overwriting already existing functions, we must
+  define separate compatibility function definitions for functions which changed
+  their calling convention or behavior. These compatibility definitions can be
+  looked up using ~compat-function~ and called with ~compat-call~. For example ~assoc~
+  can be called with a ~TESTFN~ since Emacs 26. In Emacs 25 and older the calling
+  convention was ~(assoc KEY ALIST)~. In order to use the new calling convention
+  you can use ~(compat-call assoc KEY ALIST TESTFN)~.
+- Deprecate all ~compat-*~ prefixed functions. Instead use the aforementioned
+  ~compat-call~ or ~compat-function~ macros.
+- Deprecate ~compat-help.el~ and ~compat-font-lock.el.~
+- Development moved to GitHub.
+- BREAKING: Drop broken function ~func-arity~. Using ~func-arity~ is generally
+  discouraged and the function is hard to implement properly due to all the
+  various function types. There it is unlikely that the function will get
+  reintroduced in Compat.
+- BREAKING: Drop broken function ~directory-files-recursively~. In case you need
+  this function, a patch including tests is welcome.
+- BREAKING: Drop support for Emacs 24.3. Emacs 24.4 is required now. In case you
+  still need Emacs 24.3 support, you can rely on Compat 28.1.2.2.
+
+(Release <2023-01-05 Thu>)
+
+* Release of "Compat" Version 28.1.2.2
+
+This is a minor release.
+
+(Release <2022-08-25 Thu>)
+
+* Release of "Compat" Version 28.1.2.1
+
+This is a minor release adding the following changes:
+
+- Add =derived-mode-p= defined in Emacs 27
+- Add =provided-mode-derived-p= defined in Emacs 27
+- Add =read-multiple-choice= defined in Emacs 26
+- Add =file-name-absolute-p= defined in Emacs 28
+
+The only other notable change is that the manual has been rewritten to
+include much more documentation that had been the case previously.
+
+(Release <2022-08-24 Wed>)
+
+* Release of "Compat" Version 28.1.2.0
+
+The main change of this release has been the major simplification of
+Compat's initialisation system, improving the situation around issues
+people had been reporting with unconventional or unpopular packaging
+systems.
+
+In addition to this, the following functional changes have been made:
+
+- Fix =format-prompt= of an empty string as "default" argument
+- Add =decoded-time-period= defined in Emacs 28
+- Add =subr-primitive-p= defined in Emacs 28
+
+Minor improvements to manual are also part of this release.
+
+(Release <2022-07-18 Mon>)
+
+* Release of "Compat" Version 28.1.1.3
+
+This release just contains a hot-fix for an issue introduced in the
+last version, where compat.el raises an error during byte compilation.
+
+(Release <2022-06-19 Sun>)
+
+* Release of "Compat" Version 28.1.1.2
+
+Two main changes have necessitated a new patch release:
+
+1. Fix issues related to the loading of compat when uncompiled.
+2. Fix issues related to the loading of compat on old pre-releases
+   (think of 28.0.50).
+
+(Released <2022-06-22 Wed>)
+
+* Release of "Compat" Version 28.1.1.1
+
+This is a minor release fixing a bug in =json-serialize=, that could
+cause unintended side-effects, not related to packages using Compat
+directly.
+
+(Released <2022-05-05 Thu>)
+
+* Release of "Compat" Version 28.1.1.0
+
+This release mostly fixes a number of smaller bugs that were not
+identified as of 28.1.0.0.  Nevertheless these warrant a version bump,
+as some of these changes a functional.  These include:
+
+- The addition of the =file-attribute-*= accessor functions.
+- The addition of =file-attribute-collect=.
+- Improvements to the Texinfo manual (via Jonas Bernoulli's recent
+  work on =ox-texinfo=).  For the time being, the Texinfo file is
+  maintained in the repository itself, next to the =MANUAL= file.
+  This might change in the future.
+- Adding a prefix to =string-trim=, =string-trim-left= and
+  =string-trim-right= (i.e. now =compat-string-trim=,
+  =compat-string-trim-left= and =compat-string-trim-right=)
+- Improving the version inference used in the =compat-*= macros.
+  This improves the compile-time optimisation that strips away
+  functions that are known to be defined for a specific version.
+- The addition of generalised variable (=setf=) support for
+  =compat-alist-get=.
+- The addition of =image-property= and generalised variable support
+  for =image-property=.
+- The addition of the function =compat-executable-find=.
+- The addition of the function =compat-dired-get-marked-files=.
+- The addition of the function =exec-path=.
+- The addition of the function =make-lock-file-name=.
+- The addition of the function =null-device=.
+- The addition of the function =time-equal-p=.
+- The addition of the function =date-days-in-month=.
+- Handling out-of-directory byte compilation better.
+- Fixing the usage and edge-cases of =and-let*=.
+
+(Released <2022-04-22 Fri>)
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-26.el b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-26.el
new file mode 100644
index 0000000..6e99ba3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-26.el
@@ -0,0 +1,550 @@
+;;; compat-26.el --- Functionality added in Emacs 26 -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021-2026 Free Software Foundation, Inc.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Functionality added in Emacs 26, needed by older Emacs versions.
+
+;;; Code:
+
+(eval-when-compile (load "compat-macs.el" nil t t))
+(compat-require compat-25 "25.1")
+
+(compat-version "26.1")
+
+;;;; Defined in fns.c
+
+(compat-defun buffer-hash (&optional buffer-or-name) ;; <compat-tests:buffer-hash>
+   "Return a hash of the contents of BUFFER-OR-NAME.
+This hash is performed on the raw internal format of the buffer,
+disregarding any coding systems.  If nil, use the current buffer.
+
+This function is useful for comparing two buffers running in the same
+Emacs, but is not guaranteed to return the same hash between different
+Emacs versions.  It should be somewhat more efficient on larger
+buffers than `secure-hash' is, and should not allocate more memory.
+
+It should not be used for anything security-related.  See
+`secure-hash' for these applications."
+   (with-current-buffer (or buffer-or-name (current-buffer))
+     (save-restriction
+       (widen)
+       (sha1 (current-buffer) (point-min) (point-max)))))
+
+(compat-defun mapcan (func sequence) ;; <compat-tests:mapcan>
+  "Apply FUNC to each element of SEQUENCE.
+Concatenate the results by altering them (using `nconc').
+SEQUENCE may be a list, a vector, a boolean vector, or a string."
+  (apply #'nconc (mapcar func sequence)))
+
+(compat-defun line-number-at-pos (&optional position absolute) ;; <compat-tests:line-number-at-pos>
+  "Handle optional argument ABSOLUTE."
+  :extended t
+  (if absolute
+      (save-restriction
+        (widen)
+        (line-number-at-pos position))
+    (line-number-at-pos position)))
+
+;;;; Defined in simple.el
+
+(compat-defun region-bounds () ;; <compat-tests:region-bounds>
+  "Return the boundaries of the region.
+Value is a list of one or more cons cells of the form (START . END).
+It will have more than one cons cell when the region is non-contiguous,
+see `region-noncontiguous-p' and `extract-rectangle-bounds'."
+  (funcall region-extract-function 'bounds))
+
+;;;; Defined in subr.el
+
+(compat-defun provided-mode-derived-p (mode &rest modes) ;; <compat-tests:provided-mode-derived-p>
+  "Non-nil if MODE is derived from one of MODES.
+Uses the `derived-mode-parent' property of the symbol to trace backwards.
+If you just want to check `major-mode', use `derived-mode-p'."
+  ;; If MODE is an alias, then look up the real mode function first.
+  (let ((alias (symbol-function mode)))
+    (when (and alias (symbolp alias))
+      (setq mode alias)))
+  (while
+      (and
+       (not (memq mode modes))
+       (let* ((parent (get mode 'derived-mode-parent))
+              (parentfn (symbol-function parent)))
+         (setq mode (if (and parentfn (symbolp parentfn)) parentfn parent)))))
+  mode)
+
+(compat-defun assoc (key alist &optional testfn) ;; <compat-tests:assoc>
+  "Handle the optional TESTFN."
+  :extended t
+  (cond
+   ((or (eq testfn #'eq)
+        (and (not testfn) (or (symbolp key) (integerp key)))) ;; eq_comparable_value
+    (assq key alist))
+   ((or (eq testfn #'equal) (not testfn))
+    (assoc key alist))
+   (t
+    (catch 'found
+      (dolist (ent alist)
+        (when (funcall testfn (car ent) key)
+          (throw 'found ent)))))))
+
+(compat-defun alist-get (key alist &optional default remove testfn) ;; <compat-tests:alist-get>
+  "Handle optional argument TESTFN."
+  :extended t
+  (ignore remove)
+  (let ((x (if (not testfn)
+               (assq key alist)
+             (compat--assoc key alist testfn))))
+    (if x (cdr x) default)))
+
+(compat-guard t ;; <compat-tests:alist-get-gv>
+  (gv-define-expander compat--alist-get
+    (lambda (do key alist &optional default remove testfn)
+      (macroexp-let2 macroexp-copyable-p k key
+        (gv-letplace (getter setter) alist
+          (macroexp-let2 nil p `(compat--assoc ,k ,getter ,testfn)
+            (funcall do (if (null default) `(cdr ,p)
+                          `(if ,p (cdr ,p) ,default))
+                     (lambda (v)
+                       (macroexp-let2 nil v v
+                         (let ((set-exp
+                                `(if ,p (setcdr ,p ,v)
+                                   ,(funcall setter
+                                             `(cons (setq ,p (cons ,k ,v))
+                                                    ,getter)))))
+                           `(progn
+                              ,(cond
+                                ((null remove) set-exp)
+                                ((or (eql v default)
+                                     (and (eq (car-safe v) 'quote)
+                                          (eq (car-safe default) 'quote)
+                                          (eql (cadr v) (cadr default))))
+                                 `(if ,p ,(funcall setter `(delq ,p ,getter))))
+                                (t
+                                 `(cond
+                                   ((not (eql ,default ,v)) ,set-exp)
+                                   (,p ,(funcall setter
+                                                 `(delq ,p ,getter))))))
+                              ,v))))))))))
+    (unless (get 'alist-get 'gv-expander)
+      (put 'alist-get 'gv-expander (get 'compat--alist-get 'gv-expander))))
+
+(compat-defun string-trim-left (string &optional regexp) ;; <compat-tests:string-trim-left>
+  "Handle optional argument REGEXP."
+  :extended t
+  (if (string-match (concat "\\`\\(?:" (or regexp "[ \t\n\r]+") "\\)") string)
+      (substring string (match-end 0))
+    string))
+
+(compat-defun string-trim-right (string &optional regexp) ;; <compat-tests:string-trim-right>
+  "Handle optional argument REGEXP."
+  :extended t
+  (let ((i (string-match-p
+            (concat "\\(?:" (or regexp "[ \t\n\r]+") "\\)\\'")
+            string)))
+    (if i (substring string 0 i) string)))
+
+(compat-defun string-trim (string &optional trim-left trim-right) ;; <compat-tests:string-trim>
+  "Handle optional arguments TRIM-LEFT and TRIM-RIGHT."
+  :extended t
+  (compat--string-trim-left
+   (compat--string-trim-right
+    string
+    trim-right)
+   trim-left))
+
+(compat-defun caaar (x) ;; <compat-tests:cXXXr>
+  "Return the `car' of the `car' of the `car' of X."
+  (declare (pure t))
+  (car (car (car x))))
+
+(compat-defun caadr (x) ;; <compat-tests:cXXXr>
+  "Return the `car' of the `car' of the `cdr' of X."
+  (declare (pure t))
+  (car (car (cdr x))))
+
+(compat-defun cadar (x) ;; <compat-tests:cXXXr>
+  "Return the `car' of the `cdr' of the `car' of X."
+  (declare (pure t))
+  (car (cdr (car x))))
+
+(compat-defun caddr (x) ;; <compat-tests:cXXXr>
+  "Return the `car' of the `cdr' of the `cdr' of X."
+  (declare (pure t))
+  (car (cdr (cdr x))))
+
+(compat-defun cdaar (x) ;; <compat-tests:cXXXr>
+  "Return the `cdr' of the `car' of the `car' of X."
+  (declare (pure t))
+  (cdr (car (car x))))
+
+(compat-defun cdadr (x) ;; <compat-tests:cXXXr>
+  "Return the `cdr' of the `car' of the `cdr' of X."
+  (declare (pure t))
+  (cdr (car (cdr x))))
+
+(compat-defun cddar (x) ;; <compat-tests:cXXXr>
+  "Return the `cdr' of the `cdr' of the `car' of X."
+  (declare (pure t))
+  (cdr (cdr (car x))))
+
+(compat-defun cdddr (x) ;; <compat-tests:cXXXr>
+  "Return the `cdr' of the `cdr' of the `cdr' of X."
+  (declare (pure t))
+  (cdr (cdr (cdr x))))
+
+(compat-defun caaaar (x) ;; <compat-tests:cXXXXr>
+  "Return the `car' of the `car' of the `car' of the `car' of X."
+  (declare (pure t))
+  (car (car (car (car x)))))
+
+(compat-defun caaadr (x) ;; <compat-tests:cXXXXr>
+  "Return the `car' of the `car' of the `car' of the `cdr' of X."
+  (declare (pure t))
+  (car (car (car (cdr x)))))
+
+(compat-defun caadar (x) ;; <compat-tests:cXXXXr>
+  "Return the `car' of the `car' of the `cdr' of the `car' of X."
+  (declare (pure t))
+  (car (car (cdr (car x)))))
+
+(compat-defun caaddr (x) ;; <compat-tests:cXXXXr>
+  "Return the `car' of the `car' of the `cdr' of the `cdr' of X."
+  (declare (pure t))
+  (car (car (cdr (cdr x)))))
+
+(compat-defun cadaar (x) ;; <compat-tests:cXXXXr>
+  "Return the `car' of the `cdr' of the `car' of the `car' of X."
+  (declare (pure t))
+  (car (cdr (car (car x)))))
+
+(compat-defun cadadr (x) ;; <compat-tests:cXXXXr>
+  "Return the `car' of the `cdr' of the `car' of the `cdr' of X."
+  (declare (pure t))
+  (car (cdr (car (cdr x)))))
+
+(compat-defun caddar (x) ;; <compat-tests:cXXXXr>
+  "Return the `car' of the `cdr' of the `cdr' of the `car' of X."
+  (declare (pure t))
+  (car (cdr (cdr (car x)))))
+
+(compat-defun cadddr (x) ;; <compat-tests:cXXXXr>
+  "Return the `car' of the `cdr' of the `cdr' of the `cdr' of X."
+  (declare (pure t))
+  (car (cdr (cdr (cdr x)))))
+
+(compat-defun cdaaar (x) ;; <compat-tests:cXXXXr>
+  "Return the `cdr' of the `car' of the `car' of the `car' of X."
+  (declare (pure t))
+  (cdr (car (car (car x)))))
+
+(compat-defun cdaadr (x) ;; <compat-tests:cXXXXr>
+  "Return the `cdr' of the `car' of the `car' of the `cdr' of X."
+  (declare (pure t))
+  (cdr (car (car (cdr x)))))
+
+(compat-defun cdadar (x) ;; <compat-tests:cXXXXr>
+  "Return the `cdr' of the `car' of the `cdr' of the `car' of X."
+  (declare (pure t))
+  (cdr (car (cdr (car x)))))
+
+(compat-defun cdaddr (x) ;; <compat-tests:cXXXXr>
+  "Return the `cdr' of the `car' of the `cdr' of the `cdr' of X."
+  (declare (pure t))
+  (cdr (car (cdr (cdr x)))))
+
+(compat-defun cddaar (x) ;; <compat-tests:cXXXXr>
+  "Return the `cdr' of the `cdr' of the `car' of the `car' of X."
+  (declare (pure t))
+  (cdr (cdr (car (car x)))))
+
+(compat-defun cddadr (x) ;; <compat-tests:cXXXXr>
+  "Return the `cdr' of the `cdr' of the `car' of the `cdr' of X."
+  (declare (pure t))
+  (cdr (cdr (car (cdr x)))))
+
+(compat-defun cdddar (x) ;; <compat-tests:cXXXXr>
+  "Return the `cdr' of the `cdr' of the `cdr' of the `car' of X."
+  (declare (pure t))
+  (cdr (cdr (cdr (car x)))))
+
+(compat-defun cddddr (x) ;; <compat-tests:cXXXXr>
+  "Return the `cdr' of the `cdr' of the `cdr' of the `cdr' of X."
+  (declare (pure t))
+  (cdr (cdr (cdr (cdr x)))))
+
+(compat-defvar gensym-counter 0 ;; <compat-tests:gensym>
+  "Number used to construct the name of the next symbol created by `gensym'.")
+
+(compat-defun gensym (&optional prefix) ;; <compat-tests:gensym>
+  "Return a new uninterned symbol.
+The name is made by appending `gensym-counter' to PREFIX.
+PREFIX is a string, and defaults to \"g\"."
+  (let ((num (prog1 gensym-counter
+               (setq gensym-counter
+                     (1+ gensym-counter)))))
+    (make-symbol (format "%s%d" (or prefix "g") num))))
+
+(compat-defmacro if-let* (varlist then &rest else) ;; <compat-tests:if-let*>
+  "Bind variables according to VARLIST and evaluate THEN or ELSE.
+This is like `if-let' but doesn't handle a VARLIST of the form
+\(SYMBOL SOMETHING) specially."
+  (declare (indent 2)
+           (debug ((&rest [&or symbolp (symbolp form) (form)])
+                   body)))
+  (let ((empty (make-symbol "s"))
+        (last t) list)
+    (dolist (var varlist)
+      (push `(,(if (cdr var) (car var) empty)
+              (and ,last ,(if (cdr var) (cadr var) (car var))))
+            list)
+      (when (or (cdr var) (consp (car var)))
+        (setq last (caar list))))
+    `(let* ,(nreverse list)
+       (if ,(caar list) ,then ,@else))))
+
+(compat-defmacro when-let* (varlist &rest body) ;; <compat-tests:when-let*>
+  "Bind variables according to VARLIST and conditionally evaluate BODY.
+This is like `when-let' but doesn't handle a VARLIST of the form
+\(SYMBOL SOMETHING) specially."
+  (declare (indent 1) (debug if-let*))
+  (list 'if-let* varlist (macroexp-progn body)))
+
+(compat-defmacro and-let* (varlist &rest body) ;; <compat-tests:and-let*>
+  "Bind variables according to VARLIST and conditionally evaluate BODY.
+Like `when-let*', except if BODY is empty and all the bindings
+are non-nil, then the result is non-nil."
+  (declare (indent 1)
+           (debug ((&rest [&or symbolp (symbolp form) (form)])
+                   body)))
+  (let ((empty (make-symbol "s"))
+        (last t) list)
+    (dolist (var varlist)
+      (push `(,(if (cdr var) (car var) empty)
+              (and ,last ,(if (cdr var) (cadr var) (car var))))
+            list)
+      (when (or (cdr var) (consp (car var)))
+        (setq last (caar list))))
+    `(let* ,(nreverse list)
+       (if ,(caar list) ,(macroexp-progn (or body '(t)))))))
+
+;;;; Defined in files.el
+
+(compat-defvar mounted-file-systems ;; <compat-tests:mounted-file-systems>
+    (eval-when-compile
+      (if (memq system-type '(windows-nt cygwin))
+          "^//[^/]+/"
+        (concat
+         "^" (regexp-opt '("/afs/" "/media/" "/mnt" "/net/" "/tmp_mnt/")))))
+  "File systems that ought to be mounted.")
+
+(compat-defun file-local-name (file) ;; <compat-tests:file-local-name>
+  "Return the local name component of FILE.
+This function removes from FILE the specification of the remote host
+and the method of accessing the host, leaving only the part that
+identifies FILE locally on the remote system.
+The returned file name can be used directly as argument of
+`process-file', `start-file-process', or `shell-command'."
+  (or (file-remote-p file 'localname) file))
+
+(compat-defun temporary-file-directory () ;; <compat-tests:temporary-file-directory>
+  "The directory for writing temporary files.
+In case of a remote `default-directory', this is a directory for
+temporary files on that remote host.  If such a directory does
+not exist, or `default-directory' ought to be located on a
+mounted file system (see `mounted-file-systems'), the function
+returns `default-directory'.
+For a non-remote and non-mounted `default-directory', the value of
+the variable `temporary-file-directory' is returned."
+  ;; NOTE: The handler may fail with an error, since the
+  ;; `temporary-file-directory' handler was introduced in Emacs 26.
+  (let ((handler (find-file-name-handler
+                  default-directory 'temporary-file-directory)))
+    (or (and handler (ignore-errors (funcall handler 'temporary-file-directory)))
+        (if-let ((remote (file-remote-p default-directory)))
+            (concat remote "/tmp/") ;; FIXME: Guess /tmp on remote host
+          (if (string-match mounted-file-systems default-directory)
+              default-directory
+            temporary-file-directory)))))
+
+(compat-defun make-temp-file (prefix &optional dir-flag suffix text) ;; <compat-tests:make-temp-file>
+  "Handle optional argument TEXT."
+  :extended t
+  (let ((file (make-temp-file prefix dir-flag suffix)))
+    (when text
+      (with-temp-buffer
+        (insert text)
+        (write-region (point-min) (point-max) file)))
+    file))
+
+(compat-defun make-nearby-temp-file (prefix &optional dir-flag suffix) ;; <compat-tests:make-nearby-temp-file>
+  "Create a temporary file as close as possible to `default-directory'.
+If PREFIX is a relative file name, and `default-directory' is a
+remote file name or located on a mounted file systems, the
+temporary file is created in the directory returned by the
+function `temporary-file-directory'.  Otherwise, the function
+`make-temp-file' is used.  PREFIX, DIR-FLAG and SUFFIX have the
+same meaning as in `make-temp-file'."
+  ;; NOTE: The handler may fail with an error, since the
+  ;; `make-nearby-temp-file' handler was introduced in Emacs 26.
+  (let ((handler (and (not (file-name-absolute-p default-directory))
+                      (find-file-name-handler
+                       default-directory 'make-nearby-temp-file))))
+    (or (and handler (ignore-errors (funcall handler 'make-nearby-temp-file
+                                             prefix dir-flag suffix)))
+        (let ((temporary-file-directory (temporary-file-directory)))
+          (make-temp-file prefix dir-flag suffix)))))
+
+(compat-defun file-attribute-type (attributes) ;; <compat-tests:file-attribute-getters>
+  "The type field in ATTRIBUTES returned by `file-attributes'.
+The value is either t for directory, string (name linked to) for
+symbolic link, or nil."
+  (nth 0 attributes))
+
+(compat-defun file-attribute-link-number (attributes) ;; <compat-tests:file-attribute-getters>
+  "Return the number of links in ATTRIBUTES returned by `file-attributes'."
+  (nth 1 attributes))
+
+(compat-defun file-attribute-user-id (attributes) ;; <compat-tests:file-attribute-getters>
+  "The UID field in ATTRIBUTES returned by `file-attributes'.
+This is either a string or a number.  If a string value cannot be
+looked up, a numeric value, either an integer or a float, is
+returned."
+  (nth 2 attributes))
+
+(compat-defun file-attribute-group-id (attributes) ;; <compat-tests:file-attribute-getters>
+  "The GID field in ATTRIBUTES returned by `file-attributes'.
+This is either a string or a number.  If a string value cannot be
+looked up, a numeric value, either an integer or a float, is
+returned."
+  (nth 3 attributes))
+
+(compat-defun file-attribute-access-time (attributes) ;; <compat-tests:file-attribute-getters>
+  "The last access time in ATTRIBUTES returned by `file-attributes'.
+This a Lisp timestamp in the style of `current-time'."
+  (nth 4 attributes))
+
+(compat-defun file-attribute-modification-time (attributes) ;; <compat-tests:file-attribute-getters>
+  "The modification time in ATTRIBUTES returned by `file-attributes'.
+This is the time of the last change to the file's contents, and
+is a Lisp timestamp in the style of `current-time'."
+  (nth 5 attributes))
+
+(compat-defun file-attribute-status-change-time (attributes) ;; <compat-tests:file-attribute-getters>
+  "The status modification time in ATTRIBUTES returned by `file-attributes'.
+This is the time of last change to the file's attributes: owner
+and group, access mode bits, etc., and is a Lisp timestamp in the
+style of `current-time'."
+  (nth 6 attributes))
+
+(compat-defun file-attribute-size (attributes) ;; <compat-tests:file-attribute-getters>
+  "The integer size (in bytes) in ATTRIBUTES returned by `file-attributes'."
+  (nth 7 attributes))
+
+(compat-defun file-attribute-modes (attributes) ;; <compat-tests:file-attribute-getters>
+  "The file modes in ATTRIBUTES returned by `file-attributes'.
+This is a string of ten letters or dashes as in ls -l."
+  (nth 8 attributes))
+
+(compat-defun file-attribute-inode-number (attributes) ;; <compat-tests:file-attribute-getters>
+  "The inode number in ATTRIBUTES returned by `file-attributes'.
+It is a nonnegative integer."
+  (nth 10 attributes))
+
+(compat-defun file-attribute-device-number (attributes) ;; <compat-tests:file-attribute-getters>
+  "The file system device number in ATTRIBUTES returned by `file-attributes'.
+It is an integer."
+  (nth 11 attributes))
+
+(compat-defun file-attribute-collect (attributes &rest attr-names) ;; <compat-tests:file-attribute-collect>
+  "Return a sublist of ATTRIBUTES returned by `file-attributes'.
+ATTR-NAMES are symbols with the selected attribute names.
+
+Valid attribute names are: type, link-number, user-id, group-id,
+access-time, modification-time, status-change-time, size, modes,
+inode-number and device-number."
+  (let ((idx '((type . 0)
+               (link-number . 1)
+               (user-id . 2)
+               (group-id . 3)
+               (access-time . 4)
+               (modification-time . 5)
+               (status-change-time . 6)
+               (size . 7)
+               (modes . 8)
+               (inode-number . 10)
+               (device-number . 11)))
+        result)
+    (while attr-names
+      (let ((attr (pop attr-names)))
+        (if (assq attr idx)
+            (push (nth (cdr (assq attr idx))
+                       attributes)
+                  result)
+          (error "Wrong attribute name '%S'" attr))))
+    (nreverse result)))
+
+;;;; Defined in mouse.el
+
+(compat-defvar mouse-select-region-move-to-beginning nil ;; <compat-tests:thing-at-mouse>
+  "Effect of selecting a region extending backward from double click.
+Nil means keep point at the position clicked (region end);
+non-nil means move point to beginning of region.")
+
+;;;; Defined in image.el
+
+(compat-defun image-property (image property) ;; <compat-tests:image-property>
+  "Return the value of PROPERTY in IMAGE.
+Properties can be set with
+
+  (setf (image-property IMAGE PROPERTY) VALUE)
+
+If VALUE is nil, PROPERTY is removed from IMAGE."
+  :feature image
+  (plist-get (cdr image) property))
+
+;;;; Defined in rmc.el
+
+(compat-defun read-multiple-choice (prompt choices) ;; <compat-tests:read-multiple-choice>
+  "Ask user to select an entry from CHOICES, promting with PROMPT.
+This function allows to ask the user a multiple-choice question.
+
+CHOICES should be a list of the form (KEY NAME [DESCRIPTION]).
+KEY is a character the user should type to select the entry.
+NAME is a short name for the entry to be displayed while prompting
+\(if there's no room, it might be shortened).
+
+NOTE: This is a partial implementation of `read-multiple-choice', that
+among other things doesn't offer any help and ignores the
+optional DESCRIPTION field."
+  (let ((options
+         (mapconcat
+          (lambda (opt)
+            (format
+             "[%s] %s"
+             (key-description (string (car opt)))
+             (cadr opt)))
+          choices " "))
+        choice)
+    (setq prompt (concat prompt " (" options "): "))
+    (while (not (setq choice (assq (read-event prompt) choices)))
+      (message "Invalid choice")
+      (sit-for 1))
+    choice))
+
+(provide 'compat-26)
+;;; compat-26.el ends here
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-26.elc b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-26.elc
new file mode 100644
index 0000000..2ef2c99
Binary files /dev/null and b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-26.elc differ
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-27.el b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-27.el
new file mode 100644
index 0000000..41d298c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-27.el
@@ -0,0 +1,885 @@
+;;; compat-27.el --- Functionality added in Emacs 27 -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021-2026 Free Software Foundation, Inc.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Functionality added in Emacs 27, needed by older Emacs versions.
+
+;;; Code:
+
+(eval-when-compile (load "compat-macs.el" nil t t))
+(compat-require compat-26 "26.1")
+
+(compat-version "27.1")
+
+;;;; Defined in fns.c
+
+(compat-defun proper-list-p (object) ;; <compat-tests:proper-list-p>
+  "Return OBJECT's length if it is a proper list, nil otherwise.
+A proper list is neither circular nor dotted (i.e., its last cdr
+is nil)."
+  (if (eval-when-compile (< emacs-major-version 26))
+      ;; On older Emacs than 26.1 use Tortoise and Hare algorithm
+      (when (listp object)
+        (catch 'cycle
+          (let ((hare object) (tortoise object)
+                (max 2) (q 2))
+            (while (consp hare)
+              (setq hare (cdr hare))
+              (when (and (or (/= 0 (setq q (1- q)))
+                             (ignore
+                              (setq max (ash max 1)
+                                    q max
+                                    tortoise hare)))
+                         (eq hare tortoise))
+                (throw 'cycle nil)))
+            (and (null hare) (length object)))))
+    ;; Errors on 26.1 and newer
+    (and (listp object) (ignore-errors (length object)))))
+
+(compat-defun string-distance (string1 string2 &optional bytecompare) ;; <compat-tests:string-distance>
+  "Return Levenshtein distance between STRING1 and STRING2.
+The distance is the number of deletions, insertions, and substitutions
+required to transform STRING1 into STRING2.
+If BYTECOMPARE is nil or omitted, compute distance in terms of characters.
+If BYTECOMPARE is non-nil, compute distance in terms of bytes.
+Letter-case is significant, but text properties are ignored."
+  ;; https://en.wikipedia.org/wiki/Levenshtein_distance
+  (let ((s1 (if bytecompare
+                (encode-coding-string string1 'raw-text)
+              (concat string1 "")))
+        (s2 (if bytecompare
+                (encode-coding-string string2 'raw-text)
+              string2)))
+    (let* ((len1 (length s1))
+           (len2 (length s2))
+           (column (make-vector (1+ len1) 0)))
+      (dotimes (y len1)
+        (setf (aref column (1+ y)) y))
+      (dotimes (x len2)
+        (setf (aref column 0) (1+ x))
+        (let ((lastdiag x) olddiag)
+          (dotimes (y len1)
+            (setf olddiag (aref column (1+ y))
+                  (aref column (1+ y))
+                  (min (+ (if (= (aref s1 y) (aref s2 x)) 0 1)
+                          lastdiag)
+                       (1+ (aref column (1+ y)))
+                       (1+ (aref column y)))
+                  lastdiag olddiag))))
+      (aref column len1))))
+
+;;;; Defined in window.c
+
+(compat-defun recenter (&optional arg redisplay) ;; <compat-tests:recenter>
+  "Handle optional argument REDISPLAY."
+  :extended t
+  (recenter arg)
+  (when (and redisplay recenter-redisplay)
+    (redisplay)))
+
+;;;; Defined in keymap.c
+
+(compat-defun lookup-key (keymap key &optional accept-default) ;; <compat-tests:lookup-key>
+  "Allow for KEYMAP to be a list of keymaps."
+  :extended t
+  (cond
+   ((keymapp keymap)
+    (lookup-key keymap key accept-default))
+   ((listp keymap)
+    (catch 'found
+      (dolist (map keymap)
+        (when-let ((fn (lookup-key map key accept-default)))
+          (throw 'found fn)))))
+   ((signal 'wrong-type-argument (list 'keymapp keymap)))))
+
+;;;; Defined in timefns.c
+
+(compat-defun time-equal-p (t1 t2) ;; <compat-tests:time-equal-p>
+  "Return non-nil if time value T1 is equal to time value T2.
+A nil value for either argument stands for the current time.
+
+NOTE: This function is not as accurate as the actual `time-equal-p'."
+  (cond
+   ((eq t1 t2))
+   ((and (consp t1) (consp t2))
+    (equal t1 t2))
+   (t
+    ;; Due to inaccuracies and the relatively slow evaluating of
+    ;; Emacs Lisp compared to C, we allow for slight inaccuracies
+    ;; (less than a millisecond) when comparing time values.
+    (< (abs (- (float-time t1) (float-time t2)))
+       (if (and t1 t2) 1e-6 1e-5)))))
+
+;;;; Defined in subr.el
+
+(compat-defalias fixnump integerp) ;; <compat-tests:fixnump>
+(compat-defalias bignump ignore) ;; <compat-tests:bignump>
+
+(compat-defmacro setq-local (&rest pairs) ;; <compat-tests:setq-local>
+  "Handle multiple assignments."
+  :extended t
+  (unless (zerop (mod (length pairs) 2))
+    (error "PAIRS must have an even number of variable/value members"))
+  (let (body)
+    (while pairs
+      (let* ((sym (pop pairs))
+             (val (pop pairs)))
+        (unless (symbolp sym)
+          (error "Attempting to set a non-symbol: %s" (car pairs)))
+        (push `(set (make-local-variable ',sym) ,val)
+              body)))
+    (cons 'progn (nreverse body))))
+
+(compat-defmacro ignore-error (condition &rest body) ;; <compat-tests:ignore-error>
+  "Execute BODY; if the error CONDITION occurs, return nil.
+Otherwise, return result of last form in BODY.
+
+CONDITION can also be a list of error conditions."
+  (declare (debug t) (indent 1))
+  `(condition-case nil (progn ,@body) (,condition nil)))
+
+(compat-defmacro dolist-with-progress-reporter (spec reporter-or-message &rest body) ;; <compat-tests:dolist-with-progress-reporter>
+  "Loop over a list and report progress in the echo area.
+Evaluate BODY with VAR bound to each car from LIST, in turn.
+Then evaluate RESULT to get return value, default nil.
+
+REPORTER-OR-MESSAGE is a progress reporter object or a string.  In the latter
+case, use this string to create a progress reporter.
+
+At each iteration, print the reporter message followed by progress
+percentage in the echo area.  After the loop is finished,
+print the reporter message followed by the word \"done\".
+
+\(fn (VAR LIST [RESULT]) REPORTER-OR-MESSAGE BODY...)"
+  (declare (indent 2) (debug ((symbolp form &optional form) form body)))
+  (let ((prep (make-symbol "--dolist-progress-reporter--"))
+        (count (make-symbol "--dolist-count--"))
+        (list (make-symbol "--dolist-list--")))
+    `(let ((,prep ,reporter-or-message)
+           (,count 0)
+           (,list ,(cadr spec)))
+       (when (stringp ,prep)
+         (setq ,prep (make-progress-reporter ,prep 0 (length ,list))))
+       (dolist (,(car spec) ,list)
+         ,@body
+         (progress-reporter-update ,prep (setq ,count (1+ ,count))))
+       (progress-reporter-done ,prep)
+       (or ,@(cdr (cdr spec)) nil))))
+
+(compat-defun flatten-tree (tree) ;; <compat-tests:flatten-tree>
+  "Return a \"flattened\" copy of TREE.
+In other words, return a list of the non-nil terminal nodes, or
+leaves, of the tree of cons cells rooted at TREE.  Leaves in the
+returned list are in the same order as in TREE.
+
+\(flatten-tree \\='(1 (2 . 3) nil (4 5 (6)) 7))
+=> (1 2 3 4 5 6 7)"
+  (let (elems)
+    (while (consp tree)
+      (let ((elem (pop tree)))
+        (while (consp elem)
+          (push (cdr elem) tree)
+          (setq elem (car elem)))
+        (if elem (push elem elems))))
+    (if tree (push tree elems))
+    (nreverse elems)))
+
+(compat-defun xor (cond1 cond2) ;; <compat-tests:xor>
+  "Return the boolean exclusive-or of COND1 and COND2.
+If only one of the arguments is non-nil, return it; otherwise
+return nil."
+  (declare (pure t) (side-effect-free error-free))
+  (cond ((not cond1) cond2)
+        ((not cond2) cond1)))
+
+(compat-defvar regexp-unmatchable "\\`a\\`" ;; <compat-tests:regexp-unmatchable>
+  "Standard regexp guaranteed not to match any string at all."
+  :constant t)
+
+(compat-defun assoc-delete-all (key alist &optional test) ;; <compat-tests:assoc-delete-all>
+  "Handle optional argument TEST."
+  :extended "26.2"
+  (unless test (setq test #'equal))
+  (while (and (consp (car alist))
+              (funcall test (caar alist) key))
+    (setq alist (cdr alist)))
+  (let ((tail alist) tail-cdr)
+    (while (setq tail-cdr (cdr tail))
+      (if (and (consp (car tail-cdr))
+               (funcall test (caar tail-cdr) key))
+          (setcdr tail (cdr tail-cdr))
+        (setq tail tail-cdr))))
+  alist)
+
+(compat-defvar major-mode--suspended nil ;; <compat-tests:major-mode-suspend>
+  "Suspended major mode."
+  :local permanent)
+
+(compat-defun major-mode-suspend () ;; <compat-tests:major-mode-suspend>
+  "Exit current major mode, remembering it."
+  (let* ((prev-major-mode (or major-mode--suspended
+                              (unless (eq major-mode 'fundamental-mode)
+                                major-mode))))
+    (kill-all-local-variables)
+    (setq-local major-mode--suspended prev-major-mode)))
+
+(compat-defun major-mode-restore (&optional avoided-modes) ;; <compat-tests:major-mode-suspend>
+  "Restore major mode earlier suspended with `major-mode-suspend'.
+If there was no earlier suspended major mode, then fallback to `normal-mode',
+though trying to avoid AVOIDED-MODES."
+  (if major-mode--suspended
+      (funcall (prog1 major-mode--suspended
+                 (kill-local-variable 'major-mode--suspended)))
+    (let ((auto-mode-alist
+           (let ((alist (copy-sequence auto-mode-alist)))
+             (dolist (mode avoided-modes)
+               (setq alist (rassq-delete-all mode alist)))
+             alist))
+          (magic-fallback-mode-alist
+           (let ((alist (copy-sequence magic-fallback-mode-alist)))
+             (dolist (mode avoided-modes)
+               (setq alist (rassq-delete-all mode alist)))
+             alist)))
+      (normal-mode))))
+
+(compat-defun read-char-from-minibuffer-insert-char () ;; <compat-tests:read-char-from-minibuffer>
+  "Insert the character you type into the minibuffer and exit minibuffer.
+Discard all previous input before inserting and exiting the minibuffer."
+  (interactive)
+  (when (minibufferp)
+    (delete-minibuffer-contents)
+    (insert last-command-event)
+    (exit-minibuffer)))
+
+(compat-defun read-char-from-minibuffer-insert-other () ;; <compat-tests:read-char-from-minibuffer>
+  "Reject a disallowed character typed into the minibuffer.
+This command is intended to be bound to keys that users are not
+allowed to type into the minibuffer.  When the user types any
+such key, this command discard all minibuffer input and displays
+an error message."
+  (interactive)
+  (when (minibufferp)
+    (delete-minibuffer-contents)
+    (ding)
+    (discard-input)
+    (minibuffer-message "Wrong answer")
+    (sit-for 2)))
+
+(compat-defvar read-char-history nil ;; <compat-tests:read-char-from-minibuffer>
+  "The default history for the `read-char-from-minibuffer' function.")
+
+(compat-defvar read-char-from-minibuffer-map ;; <compat-tests:read-char-from-minibuffer>
+  (let ((map (make-sparse-keymap)))
+    (set-keymap-parent map minibuffer-local-map)
+    (define-key map [remap self-insert-command] #'read-char-from-minibuffer-insert-char)
+    (define-key map [remap exit-minibuffer] #'read-char-from-minibuffer-insert-other)
+    map)
+  "Keymap for the `read-char-from-minibuffer' function.")
+
+(compat-defvar read-char-from-minibuffer-map-hash  ;; <compat-tests:read-char-from-minibuffer>
+  (make-hash-table :test 'equal)
+  "Hash table of keymaps used by `read-char-from-minibuffer'."
+  :constant t)
+
+(compat-defun read-char-from-minibuffer (prompt &optional chars history) ;; <compat-tests:read-char-from-minibuffer>
+  "Read a character from the minibuffer, prompting for it with PROMPT.
+Like `read-char', but uses the minibuffer to read and return a character.
+Optional argument CHARS, if non-nil, should be a list of characters;
+the function will ignore any input that is not one of CHARS.
+Optional argument HISTORY, if non-nil, should be a symbol that
+specifies the history list variable to use for navigating in input
+history using \\`M-p' and \\`M-n', with \\`RET' to select a character from
+history.
+If you bind the variable `help-form' to a non-nil value
+while calling this function, then pressing `help-char'
+causes it to evaluate `help-form' and display the result.
+There is no need to explicitly add `help-char' to CHARS;
+`help-char' is bound automatically to `help-form-show'."
+  (let* ((map (if (consp chars)
+                  (or (gethash (list help-form (cons help-char chars))
+                               read-char-from-minibuffer-map-hash)
+                      (let ((map (make-sparse-keymap))
+                            (msg help-form))
+                        (set-keymap-parent map read-char-from-minibuffer-map)
+                        ;; If we have a dynamically bound `help-form'
+                        ;; here, then the `C-h' (i.e., `help-char')
+                        ;; character should output that instead of
+                        ;; being a command char.
+                        (when help-form
+                          (define-key map (vector help-char)
+                            (lambda ()
+                              (interactive)
+                              (let ((help-form msg)) ; lexically bound msg
+                                (help-form-show)))))
+                        (dolist (char chars)
+                          (define-key map (vector char)
+                            #'read-char-from-minibuffer-insert-char))
+                        (define-key map [remap self-insert-command]
+                          #'read-char-from-minibuffer-insert-other)
+                        (puthash (list help-form (cons help-char chars))
+                                 map read-char-from-minibuffer-map-hash)
+                        map))
+                read-char-from-minibuffer-map))
+         ;; Protect this-command when called from pre-command-hook (bug#45029)
+         (this-command this-command)
+         (result (read-from-minibuffer prompt nil map nil (or history t)))
+         (char
+          (if (> (length result) 0)
+              ;; We have a string (with one character), so return the first one.
+              (elt result 0)
+            ;; The default value is RET.
+            (when history (push "\r" (symbol-value history)))
+            ?\r)))
+    ;; Display the question with the answer.
+    (message "%s%s" prompt (char-to-string char))
+    char))
+
+;;;; Defined in simple.el
+
+(compat-guard (not (fboundp 'decoded-time-second)) ;; <compat-tests:decoded-time>
+  (cl-defstruct (decoded-time
+                 (:constructor nil)
+                 (:copier nil)
+                 (:type list))
+    (second nil :documentation "\
+This is an integer or a Lisp timestamp (TICKS . HZ) representing a nonnegative
+number of seconds less than 61.  (If not less than 60, it is a leap second,
+which only some operating systems support.)")
+    (minute nil :documentation "This is an integer between 0 and 59 (inclusive).")
+    (hour nil :documentation "This is an integer between 0 and 23 (inclusive).")
+    (day nil :documentation "This is an integer between 1 and 31 (inclusive).")
+    (month nil :documentation "\
+This is an integer between 1 and 12 (inclusive).  January is 1.")
+    (year nil :documentation "This is a four digit integer.")
+    (weekday nil :documentation "\
+This is a number between 0 and 6, and 0 is Sunday.")
+    (dst -1 :documentation "\
+This is t if daylight saving time is in effect, nil if it is not
+in effect, and -1 if daylight saving information is not available.
+Also see `decoded-time-dst'.")
+    (zone nil :documentation "\
+This is an integer indicating the UTC offset in seconds, i.e.,
+the number of seconds east of Greenwich.")))
+
+(compat-defun minibuffer-history-value () ;; <compat-tests:minibuffer-history-value>
+  "Return the value of the minibuffer input history list.
+If `minibuffer-history-variable' points to a buffer-local variable and
+the minibuffer is active, return the buffer-local value for the buffer
+that was current when the minibuffer was activated."
+  (buffer-local-value minibuffer-history-variable
+                      (window-buffer (minibuffer-selected-window))))
+
+;;;; Defined in minibuffer.el
+
+(compat-defmacro with-minibuffer-selected-window (&rest body) ;; <compat-tests:with-minibuffer-selected-window>
+  "Execute the forms in BODY from the minibuffer in its original window.
+When used in a minibuffer window, select the window selected just before
+the minibuffer was activated, and execute the forms."
+  (declare (indent 0) (debug t))
+  `(when-let ((window (minibuffer-selected-window)))
+     (with-selected-window window
+       ,@body)))
+
+;;;; Defined in byte-run.el
+
+(compat-defmacro with-suppressed-warnings (_warnings &rest body) ;; <compat-tests:with-suppressed-warnings>
+  "Like `progn', but prevents compiler WARNINGS in BODY.
+NOTE: The compatibility version behaves like `with-no-warnings'."
+  `(with-no-warnings ,@body))
+
+;;;; Defined in image.el
+
+(compat-defun image--set-property (image property value) ;; <compat-tests:image-property>
+  "Set PROPERTY in IMAGE to VALUE, internal use only."
+  :extended "26.1"
+  :feature image
+  (if (null value)
+      (while (cdr image)
+        (if (eq (cadr image) property)
+            (setcdr image (cdddr image))
+          (setq image (cddr image))))
+    (setcdr image (plist-put (cdr image) property value)))
+  value)
+
+;; HACK: image--set-property was broken with an off-by-one error on Emacs 26.
+;; The bug was fixed in a4ad7bed187493c1c230f223b52c71f5c34f7c89. Therefore we
+;; override the gv expander until Emacs 27.1.
+(compat-guard ;; <compat-tests:image-property>
+    (or (= emacs-major-version 26) (not (get 'image-property 'gv-expander)))
+  :feature image
+  (gv-define-setter image-property (value image prop)
+    `(,(if (< emacs-major-version 26) 'image--set-property 'compat--image--set-property)
+      ,image ,prop ,value)))
+
+;;;; Defined in files.el
+
+(compat-defun file-name-quoted-p (name &optional top) ;; <compat-tests:file-name-quoted-p>
+  "Handle optional argument TOP."
+  :extended "26.1"
+  (let ((file-name-handler-alist (unless top file-name-handler-alist)))
+    (string-prefix-p "/:" (file-local-name name))))
+
+(compat-defun file-name-quote (name &optional top) ;; <compat-tests:file-name-quote>
+  "Handle optional argument TOP."
+  :extended "26.1"
+  (let* ((file-name-handler-alist (unless top file-name-handler-alist))
+         (localname (file-local-name name)))
+    (if (string-prefix-p "/:" localname)
+        name
+      (concat (file-remote-p name) "/:" localname))))
+
+(compat-defun file-name-unquote (name &optional top) ;; <compat-tests:file-name-unquote>
+  "Handle optional argument TOP."
+  :extended "26.1"
+  (let* ((file-name-handler-alist (unless top file-name-handler-alist))
+         (localname (file-local-name name)))
+    (when (string-prefix-p "/:" localname)
+      (setq localname (if (= (length localname) 2) "/" (substring localname 2))))
+    (concat (file-remote-p name) localname)))
+
+(compat-defun file-size-human-readable (file-size &optional flavor space unit) ;; <compat-tests:file-size-human-readable>
+  "Handle the optional arguments SPACE and UNIT."
+  :extended t
+  (let ((power (if (or (null flavor) (eq flavor 'iec))
+                   1024.0
+                 1000.0))
+        (prefixes '("" "k" "M" "G" "T" "P" "E" "Z" "Y")))
+    (while (and (>= file-size power) (cdr prefixes))
+      (setq file-size (/ file-size power)
+            prefixes (cdr prefixes)))
+    (let* ((prefix (car prefixes))
+           (prefixed-unit (if (eq flavor 'iec)
+                              (concat
+                               (if (string= prefix "k") "K" prefix)
+                               (if (string= prefix "") "" "i")
+                               (or unit "B"))
+                            (concat prefix unit))))
+      (format (if (and (>= (mod file-size 1.0) 0.05)
+                       (< (mod file-size 1.0) 0.95))
+                  "%.1f%s%s"
+                "%.0f%s%s")
+              file-size
+              (if (string= prefixed-unit "") "" (or space ""))
+              prefixed-unit))))
+
+(compat-defun file-size-human-readable-iec (size) ;; <compat-tests:file-size-human-readable-iec>
+  "Human-readable string for SIZE bytes, using IEC prefixes."
+  (compat--file-size-human-readable size 'iec " "))
+
+(compat-defun exec-path () ;; <compat-tests:exec-path>
+  "Return list of directories to search programs to run in remote subprocesses.
+The remote host is identified by `default-directory'.  For remote
+hosts that do not support subprocesses, this returns nil.
+If `default-directory' is a local directory, this function returns
+the value of the variable `exec-path'."
+  (let ((handler (find-file-name-handler default-directory 'exec-path)))
+    ;; NOTE: The handler may fail since it was added in 27.1.
+    (or (and handler (ignore-errors (funcall handler 'exec-path)))
+        (if (file-remote-p default-directory)
+            ;; FIXME: Just return some standard path on remote
+            '("/bin" "/usr/bin" "/sbin" "/usr/sbin" "/usr/local/bin" "/usr/local/sbin")
+          exec-path))))
+
+(compat-defun executable-find (command &optional remote) ;; <compat-tests:executable-find>
+  "Handle optional argument REMOTE."
+  :extended t
+  (if (and remote (file-remote-p default-directory))
+      (let ((res (locate-file
+                  command
+                  (mapcar
+                   (apply-partially
+                    #'concat (file-remote-p default-directory))
+                   (exec-path))
+                  exec-suffixes 'file-executable-p)))
+        (when (stringp res) (file-local-name res)))
+    (executable-find command)))
+
+(compat-defun make-empty-file (filename &optional parents) ;; <compat-tests:make-empty-file>
+  "Create an empty file FILENAME.
+Optional arg PARENTS, if non-nil then creates parent dirs as needed."
+  (when (and (file-exists-p filename) (null parents))
+    (signal 'file-already-exists (list "File exists" filename)))
+  (let ((paren-dir (file-name-directory filename)))
+    (when (and paren-dir (not (file-exists-p paren-dir)))
+      (make-directory paren-dir parents)))
+  (write-region "" nil filename nil 0))
+
+;;;; Defined in regexp-opt.el
+
+(compat-defun regexp-opt (strings &optional paren) ;; <compat-tests:regexp-opt>
+  "Handle an empty list of STRINGS."
+  :extended t
+  (if (null strings)
+      (let ((re "\\`a\\`"))
+        (cond ((null paren)
+               (concat "\\(?:" re "\\)"))
+              ((stringp paren)
+               (concat paren re "\\)"))
+              ((eq paren 'words)
+               (concat "\\<\\(" re "\\)\\>"))
+              ((eq paren 'symbols)
+               (concat "\\_\\(<" re "\\)\\_>"))
+              ((concat "\\(" re "\\)"))))
+    (regexp-opt strings paren)))
+
+;;;; Defined in package.el
+
+(declare-function lm-header "lisp-mnt")
+(declare-function macroexp-file-name nil)
+
+(compat-defun package-get-version () ;; <compat-tests:package-get-version>
+  "Return the version number of the package in which this is used.
+Assumes it is used from an Elisp file placed inside the top-level directory
+of an installed ELPA package.
+The return value is a string (or nil in case we can’t find it)."
+  ;; No :feature since the function is autoloaded.
+  ;; In a sense, this is a lie, but it does just what we want: precompute
+  ;; the version at compile time and hardcodes it into the .elc file!
+  (declare (pure t))
+  ;; Hack alert!
+  (let ((file (or (macroexp-file-name) buffer-file-name)))
+    (cond
+     ((null file) nil)
+     ;; Packages are normally installed into directories named "<pkg>-<vers>",
+     ;; so get the version number from there.
+     ((string-match
+       "/[^/]+-\\([0-9]\\(?:[0-9.]\\|pre\\|beta\\|alpha\\|snapshot\\)+\\)/[^/]+\\'"
+       file)
+      (match-string 1 file))
+     ;; For packages run straight from the an elpa.git clone, there's no
+     ;; "-<vers>" in the directory name, so we have to fetch the version
+     ;; the hard way.
+     ((let* ((pkgdir (file-name-directory file))
+             (pkgname (file-name-nondirectory (directory-file-name pkgdir)))
+             (mainfile (expand-file-name (concat pkgname ".el") pkgdir)))
+        (when (file-readable-p mainfile)
+          (require 'lisp-mnt)
+          (with-temp-buffer
+            (insert-file-contents mainfile)
+            (or (lm-header "package-version")
+                (lm-header "version")))))))))
+
+;;;; Defined in time-date.el
+
+(compat-defun make-decoded-time ;; <compat-tests:make-decoded-time>
+              (&key second minute hour day month year (dst -1) zone)
+  "Return a `decoded-time' structure with only the keywords given filled out."
+  :feature time-date
+  (list second minute hour day month year nil dst zone))
+
+(compat-defun date-days-in-month (year month) ;; <compat-tests:date-days-in-month>
+  "The number of days in MONTH in YEAR."
+  :feature time-date
+  (unless (and (numberp month)
+               (<= 1 month)
+               (<= month 12))
+    (error "Month %s is invalid" month))
+  (if (= month 2)
+      (if (date-leap-year-p year)
+          29
+        28)
+    (if (memq month '(1 3 5 7 8 10 12))
+        31
+      30)))
+
+(compat-defun date-ordinal-to-time (year ordinal) ;; <compat-tests:date-ordinal-to-time>
+  "Convert a YEAR/ORDINAL to the equivalent `decoded-time' structure.
+ORDINAL is the number of days since the start of the year, with
+January 1st being 1."
+  (let ((month 1))
+    (while (> ordinal (date-days-in-month year month))
+      (setq ordinal (- ordinal (date-days-in-month year month))
+            month (1+ month)))
+    (list nil nil nil ordinal month year nil nil nil)))
+
+;;;; Defined in text-property-search.el
+
+(declare-function make-prop-match nil)
+(compat-guard (not (fboundp 'make-prop-match)) ;; <compat-tests:prop-match>
+  (cl-defstruct (prop-match) beginning end value))
+
+(compat-defun text-property-search-forward ;; <compat-tests:text-property-search-forward>
+    (property &optional value predicate not-current)
+  "Search for the next region of text where PREDICATE is true.
+PREDICATE is used to decide whether a value of PROPERTY should be
+considered as matching VALUE.
+
+If PREDICATE is a function, it will be called with two arguments:
+VALUE and the value of PROPERTY.  The function should return
+non-nil if these two values are to be considered a match.
+
+Two special values of PREDICATE can also be used:
+If PREDICATE is t, that means a value must `equal' VALUE to be
+considered a match.
+If PREDICATE is nil (which is the default value), a value will
+match if is not `equal' to VALUE.  Furthermore, a nil PREDICATE
+means that the match region is ended if the value changes.  For
+instance, this means that if you loop with
+
+  (while (setq prop (text-property-search-forward \\='face))
+    ...)
+
+you will get all distinct regions with non-nil `face' values in
+the buffer, and the `prop' object will have the details about the
+match.  See the manual for more details and examples about how
+VALUE and PREDICATE interact.
+
+If NOT-CURRENT is non-nil, the function will search for the first
+region that doesn't include point and has a value of PROPERTY
+that matches VALUE.
+
+If no matches can be found, return nil and don't move point.
+If found, move point to the end of the region and return a
+`prop-match' object describing the match.  To access the details
+of the match, use `prop-match-beginning' and `prop-match-end' for
+the buffer positions that limit the region, and
+`prop-match-value' for the value of PROPERTY in the region."
+  (let* ((match-p
+          (lambda (prop-value)
+            (funcall
+             (cond
+              ((eq predicate t)
+               #'equal)
+              ((eq predicate nil)
+               (lambda (val p-val)
+                 (not (equal val p-val))))
+              (predicate))
+             value prop-value)))
+         (find-end
+          (lambda (start)
+            (let (end)
+              (if (and value
+                       (null predicate))
+                  ;; This is the normal case: We're looking for areas where the
+                  ;; values aren't, so we aren't interested in sub-areas where the
+                  ;; property has different values, all non-matching value.
+                  (let ((ended nil))
+                    (while (not ended)
+                      (setq end (next-single-property-change (point) property))
+                      (if (not end)
+                          (progn
+                            (goto-char (point-max))
+                            (setq end (point)
+                                  ended t))
+                        (goto-char end)
+                        (unless (funcall match-p (get-text-property (point) property))
+                          (setq ended t)))))
+                ;; End this at the first place the property changes value.
+                (setq end (next-single-property-change (point) property nil (point-max)))
+                (goto-char end))
+              (make-prop-match
+               :beginning start
+               :end end
+               :value (get-text-property start property))))))
+    (cond
+     ;; No matches at the end of the buffer.
+     ((eobp)
+      nil)
+     ;; We're standing in the property we're looking for, so find the
+     ;; end.
+     ((and (funcall match-p (get-text-property (point) property))
+           (not not-current))
+      (funcall find-end (point)))
+     (t
+      (let ((origin (point))
+            (ended nil)
+            pos)
+        ;; Find the next candidate.
+        (while (not ended)
+          (setq pos (next-single-property-change (point) property))
+          (if (not pos)
+              (progn
+                (goto-char origin)
+                (setq ended t))
+            (goto-char pos)
+            (if (funcall match-p (get-text-property (point) property))
+                (setq ended (funcall find-end (point)))
+              ;; Skip past this section of non-matches.
+              (setq pos (next-single-property-change (point) property))
+              (unless pos
+                (goto-char origin)
+                (setq ended t)))))
+        (and (not (eq ended t))
+             ended))))))
+
+(compat-defun text-property-search-backward ;; <compat-tests:text-property-search-backward>
+    (property &optional value predicate not-current)
+  "Search for the previous region of text whose PROPERTY matches VALUE.
+
+Like `text-property-search-forward', which see, but searches backward,
+and if a matching region is found, place point at the start of the region."
+  (let* ((match-p
+          (lambda (prop-value)
+            (funcall
+             (cond
+              ((eq predicate t)
+               #'equal)
+              ((eq predicate nil)
+               (lambda (val p-val)
+                 (not (equal val p-val))))
+              (predicate))
+             value prop-value)))
+         (find-end
+          (lambda (start)
+            (let (end)
+              (if (and value
+                       (null predicate))
+                  ;; This is the normal case: We're looking for areas where the
+                  ;; values aren't, so we aren't interested in sub-areas where the
+                  ;; property has different values, all non-matching value.
+                  (let ((ended nil))
+                    (while (not ended)
+                      (setq end (previous-single-property-change (point) property))
+                      (if (not end)
+                          (progn
+                            (goto-char (point-min))
+                            (setq end (point)
+                                  ended t))
+                        (goto-char (1- end))
+                        (unless (funcall match-p (get-text-property (point) property))
+                          (goto-char end)
+                          (setq ended t)))))
+                ;; End this at the first place the property changes value.
+                (setq end (previous-single-property-change
+                           (point) property nil (point-min)))
+                (goto-char end))
+              (make-prop-match
+               :beginning end
+               :end (1+ start)
+               :value (get-text-property end property))))))
+    (cond
+     ;; We're at the start of the buffer; no previous matches.
+     ((bobp)
+      nil)
+     ;; We're standing in the property we're looking for, so find the
+     ;; end.
+     ((funcall match-p (get-text-property (1- (point)) property))
+      (let ((origin (point))
+            (match (funcall find-end (1- (point)) property value predicate)))
+        ;; When we want to ignore the current element, then repeat the
+        ;; search if we haven't moved out of it yet.
+        (if (and not-current
+                 (equal (get-text-property (point) property)
+                        (get-text-property origin property)))
+            (text-property-search-backward property value predicate)
+          match)))
+     (t
+      (let ((origin (point))
+            (ended nil)
+            pos)
+        ;; Find the previous candidate.
+        (while (not ended)
+          (setq pos (previous-single-property-change (point) property))
+          (if (not pos)
+              (progn
+                (goto-char origin)
+                (setq ended t))
+            (goto-char (1- pos))
+            (if (funcall match-p (get-text-property (point) property))
+                (setq ended
+                      (funcall find-end (point)))
+              ;; Skip past this section of non-matches.
+              (setq pos (previous-single-property-change (point) property))
+              (unless pos
+                (goto-char origin)
+                (setq ended t)))))
+        (and (not (eq ended t))
+             ended))))))
+
+;;;; Defined in ring.el
+
+(compat-defun ring-resize (ring size) ;; <compat-tests:ring-resize>
+  "Set the size of RING to SIZE.
+If the new size is smaller, then the oldest items in the ring are
+discarded."
+  :feature ring
+  (when (integerp size)
+    (let ((length (ring-length ring))
+          (new-vec (make-vector size nil)))
+      (if (= length 0)
+          (setcdr ring (cons 0 new-vec))
+        (let* ((hd (car ring))
+               (old-size (ring-size ring))
+               (old-vec (cddr ring))
+               (copy-length (min size length))
+               (copy-hd (mod (+ hd (- length copy-length)) length)))
+          (setcdr ring (cons copy-length new-vec))
+          ;; If the ring is wrapped, the existing elements must be written
+          ;; out in the right order.
+          (dotimes (j copy-length)
+            (aset new-vec j (aref old-vec (mod (+ copy-hd j) old-size))))
+          (setcar ring 0))))))
+
+;;;; Defined in map-ynp.el
+
+(compat-version "26.2")
+
+(compat-defvar read-answer-short 'auto ;; <compat-tests:read-answer>
+  "If non-nil, the `read-answer' function accepts single-character answers.
+If t, accept short (single key-press) answers to the question.
+If nil, require long answers.  If `auto', accept short answers if
+`use-short-answers' is non-nil, or the function cell of `yes-or-no-p'
+is set to `y-or-n-p'.
+
+Note that this variable does not affect calls to the more
+commonly-used `yes-or-no-p' function; it only affects calls to
+the `read-answer' function.  To control whether `yes-or-no-p'
+requires a long or a short answer, see the `use-short-answers'
+variable.")
+
+(compat-defun read-answer (question answers) ;; <compat-tests:read-answer>
+  "Read an answer either as a complete word or its character abbreviation.
+Ask user a question and accept an answer from the list of possible answers.
+
+QUESTION should end in a space; this function adds a list of answers to it.
+
+ANSWERS is an alist with elements in the following format:
+  (LONG-ANSWER SHORT-ANSWER HELP-MESSAGE)
+where
+  LONG-ANSWER is a complete answer,
+  SHORT-ANSWER is an abbreviated one-character answer,
+  HELP-MESSAGE is a string describing the meaning of the answer.
+
+SHORT-ANSWER is not necessarily a single character answer.  It can be
+also a function key like F1, a character event such as C-M-h, or
+a control character like C-h.
+
+Example:
+  \\='((\"yes\"  ?y \"perform the action\")
+    (\"no\"   ?n \"skip to the next\")
+    (\"all\"  ?! \"accept all remaining without more questions\")
+    (\"help\" ?h \"show help\")
+    (\"quit\" ?q \"exit\"))
+
+When `read-answer-short' is non-nil, accept short answers.
+
+Return a long answer even in case of accepting short ones.
+
+When `use-dialog-box' is t, pop up a dialog window to get user input."
+  ;; NOTE: For simplicity we provide a primitive implementation based on
+  ;; `read-multiple-choice', which does neither support long answers nor the the
+  ;; gui dialog box.
+  (cadr (read-multiple-choice
+         (string-trim-right question)
+         (delq nil
+               (mapcar (lambda (x) (unless (equal "help" (car x))
+                                     (list (cadr x) (car x) (caddr x))))
+                       answers)))))
+
+(provide 'compat-27)
+;;; compat-27.el ends here
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-27.elc b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-27.elc
new file mode 100644
index 0000000..beadcb1
Binary files /dev/null and b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-27.elc differ
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-28.el b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-28.el
new file mode 100644
index 0000000..e73ff07
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-28.el
@@ -0,0 +1,865 @@
+;;; compat-28.el --- Functionality added in Emacs 28 -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021-2026 Free Software Foundation, Inc.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Functionality added in Emacs 28, needed by older Emacs versions.
+
+;;; Code:
+
+(eval-when-compile (load "compat-macs.el" nil t t))
+(compat-require compat-27 "27.1")
+
+(compat-version "28.1")
+
+;;;; Defined in comp.c
+
+(compat-defalias native-comp-available-p ignore) ;; <compat-tests:native-comp-available-p>
+
+;;;; Defined in fns.c
+
+;; FIXME Should handle multibyte regular expressions
+(compat-defun string-search (needle haystack &optional start-pos) ;; <compat-tests:string-search>
+  "Search for the string NEEDLE in the string HAYSTACK.
+
+The return value is the position of the first occurrence of
+NEEDLE in HAYSTACK, or nil if no match was found.
+
+The optional START-POS argument says where to start searching in
+HAYSTACK and defaults to zero (start at the beginning).
+It must be between zero and the length of HAYSTACK, inclusive.
+
+Case is always significant and text properties are ignored.
+
+NOTE: Prior to Emacs 27 `string-match' has issues handling
+multibyte regular expressions.  As the compatibility function
+for `string-search' is implemented via `string-match', these
+issues are inherited."
+  (when (and start-pos (or (< (length haystack) start-pos)
+                           (< start-pos 0)))
+    (signal 'args-out-of-range (list start-pos)))
+  (let (case-fold-search)
+    (string-match-p (regexp-quote needle) haystack start-pos)))
+
+(compat-defun length= (sequence length) ;; [[compat-tests:length=]]
+  "Returns non-nil if SEQUENCE has a length equal to LENGTH."
+  (cond
+   ((null sequence) (zerop length))
+   ((consp sequence)
+    (and (null (nthcdr length sequence))
+         (nthcdr (1- length) sequence)
+         t))
+   ((arrayp sequence)
+    (= (length sequence) length))
+   (t (signal 'wrong-type-argument (list 'sequencep sequence)))))
+
+(compat-defun length< (sequence length) ;; [[compat-tests:length<]]
+  "Returns non-nil if SEQUENCE is shorter than LENGTH."
+  (cond
+   ((null sequence) (not (zerop length)))
+   ((listp sequence)
+    (null (nthcdr (1- length) sequence)))
+   ((arrayp sequence)
+    (< (length sequence) length))
+   (t (signal 'wrong-type-argument (list 'sequencep sequence)))))
+
+(compat-defun length> (sequence length) ;; [[compat-tests:length>]]
+  "Returns non-nil if SEQUENCE is longer than LENGTH."
+  (cond
+   ((listp sequence)
+    (and (nthcdr length sequence) t))
+   ((arrayp sequence)
+    (> (length sequence) length))
+   (t (signal 'wrong-type-argument (list 'sequencep sequence)))))
+
+;;;; Defined in fileio.c
+
+(compat-defun file-name-concat (directory &rest components) ;; <compat-tests:file-name-concat>
+  "Append COMPONENTS to DIRECTORY and return the resulting string.
+Elements in COMPONENTS must be a string or nil.
+DIRECTORY or the non-final elements in COMPONENTS may or may not end
+with a slash -- if they don’t end with a slash, a slash will be
+inserted before contatenating."
+  (let ((separator (eval-when-compile
+                     (if (memq system-type '(ms-dos windows-nt cygwin))
+                         "\\" "/")))
+        (components (delq nil
+                          (mapcar (lambda (x) (and (not (equal "" x)) x))
+                                  (cons directory components))))
+        (result ""))
+    (while components
+      (let ((c (pop components)))
+        (setq result (concat result c
+                             (and components
+                                  (not (string-suffix-p separator c))
+                                  separator)))))
+    result))
+
+;;;; Defined in alloc.c
+
+(compat-defalias garbage-collect-maybe ignore) ;; <compat-tests:garbage-collect-maybe>
+
+;;;; Defined in characters.c
+
+(compat-defun string-width (string &optional from to) ;; <compat-tests:string-width>
+  "Handle optional arguments FROM and TO."
+  :extended t
+  (let* ((len (length string))
+         (from (or from 0))
+         (to (or to len)))
+    (if (and (= from 0) (= to len))
+        (string-width string)
+      (string-width (substring string from to)))))
+
+;;;; Defined in dired.c
+
+(compat-defun directory-files (directory &optional full match nosort count) ;; <compat-tests:directory-files>
+  "Handle additional optional argument COUNT."
+  :extended t
+  (let ((files (directory-files directory full match nosort)))
+    (when (natnump count)
+      (setf (nthcdr count files) nil))
+    files))
+
+(compat-defun directory-files-and-attributes (directory &optional full match nosort id-format count) ;; <compat-tests:directory-files-and-attributes>
+  "Handle additional optional argument COUNT."
+  :extended t
+  (let ((files (directory-files-and-attributes directory full match nosort id-format)))
+    (when (natnump count)
+      (setf (nthcdr count files) nil))
+    files))
+
+;;;; xfaces.c
+
+(compat-defun color-values-from-color-spec (spec) ;; <compat-tests:color-values-from-color-spec>
+  "Parse color SPEC as a numeric color and return (RED GREEN BLUE).
+This function recognises the following formats for SPEC:
+
+ #RGB, where R, G and B are hex numbers of equal length, 1-4 digits each.
+ rgb:R/G/B, where R, G, and B are hex numbers, 1-4 digits each.
+ rgbi:R/G/B, where R, G and B are floating-point numbers in [0,1].
+
+If SPEC is not in one of the above forms, return nil.
+
+Each of the 3 integer members of the resulting list, RED, GREEN,
+and BLUE, is normalized to have its value in [0,65535]."
+  (let ((case-fold-search nil))
+    (save-match-data
+      (cond
+       ((string-match
+         ;; (rx bos "#"
+         ;;     (or (: (group-n 1 (= 1 hex)) (group-n 2 (= 1 hex)) (group-n 3 (= 1 hex)))
+         ;;         (: (group-n 1 (= 2 hex)) (group-n 2 (= 2 hex)) (group-n 3 (= 2 hex)))
+         ;;         (: (group-n 1 (= 3 hex)) (group-n 2 (= 3 hex)) (group-n 3 (= 3 hex)))
+         ;;         (: (group-n 1 (= 4 hex)) (group-n 2 (= 4 hex)) (group-n 3 (= 4 hex))))
+         ;;     eos)
+         "\\`#\\(?:\\(?1:[[:xdigit:]]\\{1\\}\\)\\(?2:[[:xdigit:]]\\{1\\}\\)\\(?3:[[:xdigit:]]\\{1\\}\\)\\|\\(?1:[[:xdigit:]]\\{2\\}\\)\\(?2:[[:xdigit:]]\\{2\\}\\)\\(?3:[[:xdigit:]]\\{2\\}\\)\\|\\(?1:[[:xdigit:]]\\{3\\}\\)\\(?2:[[:xdigit:]]\\{3\\}\\)\\(?3:[[:xdigit:]]\\{3\\}\\)\\|\\(?1:[[:xdigit:]]\\{4\\}\\)\\(?2:[[:xdigit:]]\\{4\\}\\)\\(?3:[[:xdigit:]]\\{4\\}\\)\\)\\'"
+         spec)
+        (let ((max (1- (ash 1 (* (- (match-end 1) (match-beginning 1)) 4)))))
+          (list (/ (* (string-to-number (match-string 1 spec) 16) 65535) max)
+                (/ (* (string-to-number (match-string 2 spec) 16) 65535) max)
+                (/ (* (string-to-number (match-string 3 spec) 16) 65535) max))))
+       ((string-match
+         ;; (rx bos "rgb:"
+         ;;     (group (** 1 4 hex)) "/"
+         ;;     (group (** 1 4 hex)) "/"
+         ;;     (group (** 1 4 hex))
+         ;;     eos)
+         "\\`rgb:\\([[:xdigit:]]\\{1,4\\}\\)/\\([[:xdigit:]]\\{1,4\\}\\)/\\([[:xdigit:]]\\{1,4\\}\\)\\'"
+         spec)
+        (list (/ (* (string-to-number (match-string 1 spec) 16) 65535)
+                 (1- (ash 1 (* (- (match-end 1) (match-beginning 1)) 4))))
+              (/ (* (string-to-number (match-string 2 spec) 16) 65535)
+                 (1- (ash 1 (* (- (match-end 2) (match-beginning 2)) 4))))
+              (/ (* (string-to-number (match-string 3 spec) 16) 65535)
+                 (1- (ash 1 (* (- (match-end 3) (match-beginning 3)) 4))))))
+       ;; The "RGBi" (RGB Intensity) specification is defined by
+       ;; XCMS[0], see [1] for the implementation in Xlib.
+       ;;
+       ;; [0] https://www.nic.funet.fi/pub/X11/X11R4/DOCS/color/Xcms.text
+       ;; [1] https://gitlab.freedesktop.org/xorg/lib/libx11/-/blob/master/src/xcms/LRGB.c#L1392
+       ((string-match
+         ;; (rx bos "rgbi:" (* space)
+         ;;     (group (? (or "-" "+"))
+         ;;            (or (: (+ digit) (? "." (* digit)))
+         ;;                (: "." (+ digit)))
+         ;;            (? "e" (? (or "-" "+")) (+ digit)))
+         ;;     "/" (* space)
+         ;;     (group (? (or "-" "+"))
+         ;;            (or (: (+ digit) (? "." (* digit)))
+         ;;                (: "." (+ digit)))
+         ;;            (? "e" (? (or "-" "+")) (+ digit)))
+         ;;     "/" (* space)
+         ;;     (group (? (or "-" "+"))
+         ;;            (or (: (+ digit) (? "." (* digit)))
+         ;;                (: "." (+ digit)))
+         ;;            (? "e" (? (or "-" "+")) (+ digit)))
+         ;;     eos)
+         "\\`rgbi:[[:space:]]*\\([+-]?\\(?:[[:digit:]]+\\(?:\\.[[:digit:]]*\\)?\\|\\.[[:digit:]]+\\)\\(?:e[+-]?[[:digit:]]+\\)?\\)/[[:space:]]*\\([+-]?\\(?:[[:digit:]]+\\(?:\\.[[:digit:]]*\\)?\\|\\.[[:digit:]]+\\)\\(?:e[+-]?[[:digit:]]+\\)?\\)/[[:space:]]*\\([+-]?\\(?:[[:digit:]]+\\(?:\\.[[:digit:]]*\\)?\\|\\.[[:digit:]]+\\)\\(?:e[+-]?[[:digit:]]+\\)?\\)\\'"
+         spec)
+        (let ((r (round (* (string-to-number (match-string 1 spec)) 65535)))
+              (g (round (* (string-to-number (match-string 2 spec)) 65535)))
+              (b (round (* (string-to-number (match-string 3 spec)) 65535))))
+          (when (and (<= 0 r) (<= r 65535)
+                     (<= 0 g) (<= g 65535)
+                     (<= 0 b) (<= b 65535))
+            (list r g b))))))))
+
+;;;; Defined in simple.el
+
+(compat-defun make-separator-line (&optional length) ;; <compat-tests:make-separator-line>
+  "Make a string appropriate for usage as a visual separator line.
+If LENGTH is nil, use the window width."
+  (if (display-graphic-p)
+      (if length
+          (concat (propertize (make-string length ?\s) 'face '(:underline t)) "\n")
+        (propertize "\n" 'face '(:extend t :height 0.1 :inverse-video t)))
+    (concat (make-string (or length (1- (window-width))) ?-) "\n")))
+
+;;;; Defined in subr.el
+
+(compat-defun process-lines-handling-status (program status-handler &rest args) ;; <compat-tests:process-lines-handling-status>
+  "Execute PROGRAM with ARGS, returning its output as a list of lines.
+If STATUS-HANDLER is non-nil, it must be a function with one
+argument, which will be called with the exit status of the
+program before the output is collected.  If STATUS-HANDLER is
+nil, an error is signaled if the program returns with a non-zero
+exit status."
+  (with-temp-buffer
+    (let ((status (apply #'call-process program nil (current-buffer) nil args)))
+      (if status-handler
+          (funcall status-handler status)
+        (unless (eq status 0)
+          (error "%s exited with status %s" program status)))
+      (goto-char (point-min))
+      (let (lines)
+        (while (not (eobp))
+          (setq lines (cons (buffer-substring-no-properties
+                             (line-beginning-position)
+                             (line-end-position))
+                            lines))
+          (forward-line 1))
+        (nreverse lines)))))
+
+(compat-defun process-lines-ignore-status (program &rest args) ;; <compat-tests:process-lines-ignore-status>
+  "Execute PROGRAM with ARGS, returning its output as a list of lines.
+The exit status of the program is ignored.
+Also see `process-lines'."
+  (apply 'process-lines-handling-status program #'ignore args))
+
+;; FIXME Should handle multibyte regular expressions
+(compat-defun string-replace (fromstring tostring instring) ;; <compat-tests:string-replace>
+  "Replace FROMSTRING with TOSTRING in INSTRING each time it occurs."
+  (when (equal fromstring "")
+    (signal 'wrong-length-argument '(0)))
+  (let ((case-fold-search nil))
+    (replace-regexp-in-string
+     (regexp-quote fromstring)
+     tostring instring
+     t t)))
+
+(compat-defun always (&rest _arguments) ;; <compat-tests:always>
+  "Do nothing and return t.
+This function accepts any number of ARGUMENTS, but ignores them.
+Also see `ignore'."
+  t)
+
+(compat-defun insert-into-buffer (buffer &optional start end) ;; <compat-tests:insert-into-buffer>
+  "Insert the contents of the current buffer into BUFFER.
+If START/END, only insert that region from the current buffer.
+Point in BUFFER will be placed after the inserted text."
+  (let ((current (current-buffer)))
+    (with-current-buffer buffer
+      (insert-buffer-substring current start end))))
+
+(compat-defun replace-string-in-region (string replacement &optional start end) ;; <compat-tests:replace-string-in-region>
+  "Replace STRING with REPLACEMENT in the region from START to END.
+The number of replaced occurrences are returned, or nil if STRING
+doesn't exist in the region.
+
+If START is nil, use the current point.  If END is nil, use `point-max'.
+
+Comparisons and replacements are done with fixed case."
+  (if start
+      (when (< start (point-min))
+        (error "Start before start of buffer"))
+    (setq start (point)))
+  (if end
+      (when (> end (point-max))
+        (error "End after end of buffer"))
+    (setq end (point-max)))
+  (save-excursion
+    (goto-char start)
+    (save-restriction
+      (narrow-to-region start end)
+      (let ((matches 0)
+            (case-fold-search nil))
+        (while (search-forward string nil t)
+          (delete-region (match-beginning 0) (match-end 0))
+          (insert replacement)
+          (setq matches (1+ matches)))
+        (and (not (zerop matches))
+             matches)))))
+
+(compat-defun replace-regexp-in-region (regexp replacement &optional start end) ;; <compat-tests:replace-regexp-in-region>
+  "Replace REGEXP with REPLACEMENT in the region from START to END.
+The number of replaced occurrences are returned, or nil if REGEXP
+doesn't exist in the region.
+
+If START is nil, use the current point.  If END is nil, use `point-max'.
+
+Comparisons and replacements are done with fixed case.
+
+REPLACEMENT can use the following special elements:
+
+  `\\&' in NEWTEXT means substitute original matched text.
+  `\\N' means substitute what matched the Nth `\\(...\\)'.
+       If Nth parens didn't match, substitute nothing.
+  `\\\\' means insert one `\\'.
+  `\\?' is treated literally."
+  (if start
+      (when (< start (point-min))
+        (error "Start before start of buffer"))
+    (setq start (point)))
+  (if end
+      (when (> end (point-max))
+        (error "End after end of buffer"))
+    (setq end (point-max)))
+  (save-excursion
+    (goto-char start)
+    (save-restriction
+      (narrow-to-region start end)
+      (let ((matches 0)
+            (case-fold-search nil))
+          (while (re-search-forward regexp nil t)
+          (replace-match replacement t)
+          (setq matches (1+ matches)))
+        (and (not (zerop matches))
+             matches)))))
+
+(compat-defun buffer-local-boundp (symbol buffer) ;; <compat-tests:buffer-local-boundp>
+  "Return non-nil if SYMBOL is bound in BUFFER.
+Also see `local-variable-p'."
+  (condition-case nil
+      (progn (buffer-local-value symbol buffer)
+             t)
+    (void-variable nil)))
+
+(compat-defmacro with-existing-directory (&rest body) ;; <compat-tests:with-existing-directory>
+  "Execute BODY with `default-directory' bound to an existing directory.
+If `default-directory' is already an existing directory, it's not changed."
+  (declare (indent 0) (debug t))
+  `(let ((default-directory
+          (or (catch 'quit
+                (dolist (dir (list default-directory
+                                   (expand-file-name "~/")
+                                   temporary-file-directory
+                                   (getenv "TMPDIR")
+                                   "/tmp/"))
+                  (when (and dir (file-exists-p dir))
+                    (throw 'quit dir))))
+              "/")))
+     ,@body))
+
+(compat-defmacro dlet (binders &rest body) ;; <compat-tests:dlet>
+  "Like `let' but using dynamic scoping."
+  (declare (indent 1) (debug let))
+  `(let (_)
+     ,@(mapcar (lambda (binder)
+                 `(defvar ,(if (consp binder) (car binder) binder)))
+               binders)
+     (let ,binders ,@body)))
+
+(compat-defun ensure-list (object) ;; <compat-tests:ensure-list>
+  "Return OBJECT as a list.
+If OBJECT is already a list, return OBJECT itself.  If it's
+not a list, return a one-element list containing OBJECT."
+  (if (listp object)
+      object
+    (list object)))
+
+(compat-defalias subr-primitive-p subrp) ;; <compat-tests:subr-primitive-p>
+
+;;;; Defined in data.c
+
+;; Renamed in Emacs 30 to `native-comp-function-p'.
+(compat-defalias subr-native-elisp-p ignore :obsolete t) ;; <compat-tests:obsolete-subr-native-elisp-p>
+
+;;;; Defined in subr-x.el
+
+(compat-defun string-clean-whitespace (string) ;; <compat-tests:string-clean-whitespace>
+  "Clean up whitespace in STRING.
+All sequences of whitespaces in STRING are collapsed into a
+single space character, and leading/trailing whitespace is
+removed."
+  (let ((blank "[[:blank:]\r\n]+"))
+    (replace-regexp-in-string
+     "^[[:blank:]\r\n]+\\|[[:blank:]\r\n]+$"
+     ""
+     (replace-regexp-in-string
+      blank " " string))))
+
+(compat-defun string-fill (string length) ;; <compat-tests:string-fill>
+  "Clean up whitespace in STRING.
+All sequences of whitespaces in STRING are collapsed into a
+single space character, and leading/trailing whitespace is
+removed."
+  (with-temp-buffer
+    (insert string)
+    (goto-char (point-min))
+    (let ((fill-column length)
+          (adaptive-fill-mode nil))
+      (fill-region (point-min) (point-max)))
+    (buffer-string)))
+
+(compat-defun string-pad (string length &optional padding start) ;; <compat-tests:string-pad>
+  "Pad STRING to LENGTH using PADDING.
+If PADDING is nil, the space character is used.  If not nil, it
+should be a character.
+
+If STRING is longer than the absolute value of LENGTH, no padding
+is done.
+
+If START is nil (or not present), the padding is done to the end
+of the string, and if non-nil, padding is done to the start of
+the string."
+  (unless (natnump length)
+    (signal 'wrong-type-argument (list 'natnump length)))
+  (let ((pad-length (- length (length string))))
+    (if (< pad-length 0)
+        string
+      (concat (and start
+                   (make-string pad-length (or padding ?\s)))
+              string
+              (and (not start)
+                   (make-string pad-length (or padding ?\s)))))))
+
+(compat-defun string-chop-newline (string) ;; <compat-tests:string-chop-newline>
+  "Remove the final newline (if any) from STRING."
+  (if (and (>= (length string) 1) (= (aref string (1- (length string))) ?\n))
+      (substring string 0 -1)
+    string))
+
+(compat-defmacro named-let (name bindings &rest body) ;; <compat-tests:named-let>
+  "Looping construct taken from Scheme.
+Like `let', bind variables in BINDINGS and then evaluate BODY,
+but with the twist that BODY can evaluate itself recursively by
+calling NAME, where the arguments passed to NAME are used
+as the new values of the bound variables in the recursive invocation."
+  (declare (indent 2) (debug (symbolp (&rest (symbolp form)) body)))
+  (let ((fargs (mapcar (lambda (b)
+                         (let ((var (if (consp b) (car b) b)))
+                           (make-symbol (symbol-name var))))
+                       bindings))
+        (aargs (mapcar (lambda (b) (if (consp b) (cadr b))) bindings))
+        rargs)
+    (dotimes (i (length bindings))
+      (let ((b (nth i bindings)))
+        (push (list (if (consp b) (car b) b) (nth i fargs))
+              rargs)
+        (setf (if (consp b) (car b) b)
+              (nth i fargs))))
+    (letrec
+        ((quit (make-symbol "quit")) (self (make-symbol "self"))
+         (total-tco t)
+         (macro (lambda (&rest args)
+                  (setq total-tco nil)
+                  `(funcall ,self . ,args)))
+         ;; Based on `cl--self-tco':
+         (tco-progn (lambda (exprs)
+                      (append
+                       (butlast exprs)
+                       (list (funcall tco (car (last exprs)))))))
+         (tco (lambda (expr)
+                (cond
+                 ((eq (car-safe expr) 'if)
+                  (append (list 'if
+                                (cadr expr)
+                                (funcall tco (nth 2 expr)))
+                          (funcall tco-progn (nthcdr 3 expr))))
+                 ((eq (car-safe expr) 'cond)
+                  (let ((conds (cdr expr)) body)
+                    (while conds
+                      (let ((branch (pop conds)))
+                        (push (cond
+                               ((cdr branch) ;has tail
+                                (funcall tco-progn branch))
+                               ((null conds) ;last element
+                                (list t (funcall tco (car branch))))
+                               ((progn
+                                  branch)))
+                              body)))
+                    (cons 'cond (nreverse body))))
+                 ((eq (car-safe expr) 'or)
+                  (if (cddr expr)
+                      (let ((var (make-symbol "var")))
+                        `(let ((,var ,(cadr expr)))
+                           (if ,var ,(funcall tco var)
+                             ,(funcall tco (cons 'or (cddr expr))))))
+                    (funcall tco (cadr expr))))
+                 ((eq (car-safe expr) 'condition-case)
+                  (append (list 'condition-case (cadr expr) (nth 2 expr))
+                          (mapcar
+                           (lambda (handler)
+                             (cons (car handler)
+                                   (funcall tco-progn (cdr handler))))
+                           (nthcdr 3 expr))))
+                 ((eq (car-safe expr) 'and)
+                  (if (cddr expr)
+                      (funcall tco `(if ,(cadr expr) ,(cons 'and (cddr expr))))
+                    (funcall tco (cadr expr))))
+                 ((eq (car-safe expr) 'progn)
+                  (cons (car expr) (funcall tco-progn (cdr expr))))
+                 ((memq (car-safe expr) '(let let*))
+                  (append (list (car expr) (cadr expr))
+                          (funcall tco-progn (cddr expr))))
+                 ((eq (car-safe expr) name)
+                  (let (sets (args (cdr expr)))
+                    (dolist (farg fargs)
+                      (push (list farg (pop args))
+                            sets))
+                    (cons 'setq (apply #'nconc (nreverse sets)))))
+                 (`(throw ',quit ,expr))))))
+      (when-let ((tco-body (funcall tco (macroexpand-all (macroexp-progn body)))))
+        (setq body `((catch ',quit
+                       (while t (let ,rargs ,@(macroexp-unprogn tco-body)))))))
+      (let ((expand (macroexpand-all (macroexp-progn body) (list (cons name macro)))))
+        (if total-tco
+            `(let ,bindings ,expand)
+          `(funcall
+            (letrec ((,self (lambda ,fargs ,expand))) ,self)
+            ,@aargs))))))
+
+;;;; Defined in files.el
+
+(compat-defun file-name-with-extension (filename extension) ;; <compat-tests:file-name-with-extension>
+  "Set the EXTENSION of a FILENAME.
+The extension (in a file name) is the part that begins with the last \".\".
+
+Trims a leading dot from the EXTENSION so that either \"foo\" or
+\".foo\" can be given.
+
+Errors if the FILENAME or EXTENSION are empty, or if the given
+FILENAME has the format of a directory.
+
+See also `file-name-sans-extension'."
+  (let ((extn (string-remove-prefix "." extension)))
+    (cond
+     ((string= filename "")
+      (error "Empty filename"))
+     ((string= extn "")
+      (error "Malformed extension: %s" extension))
+     ((directory-name-p filename)
+      (error "Filename is a directory: %s" filename))
+     (t
+      (concat (file-name-sans-extension filename) "." extn)))))
+
+(compat-defun directory-empty-p (dir) ;; <compat-tests:directory-empty-p>
+  "Return t if DIR names an existing directory containing no other files.
+Return nil if DIR does not name a directory, or if there was
+trouble determining whether DIR is a directory or empty.
+
+Symbolic links to directories count as directories.
+See `file-symlink-p' to distinguish symlinks."
+  (and (file-directory-p dir)
+       (null (directory-files dir nil directory-files-no-dot-files-regexp t))))
+
+(compat-defun file-modes-number-to-symbolic (mode &optional filetype) ;; <compat-tests:file-modes-number-to-symbolic>
+  "Return a string describing a file's MODE.
+For instance, if MODE is #o700, then it produces `-rwx------'.
+FILETYPE if provided should be a character denoting the type of file,
+such as `?d' for a directory, or `?l' for a symbolic link and will override
+the leading `-' char."
+  (string
+   (or filetype
+       (pcase (ash mode -12)
+         ;; POSIX specifies that the file type is included in st_mode
+         ;; and provides names for the file types but values only for
+         ;; the permissions (e.g., S_IWOTH=2).
+
+         ;; (#o017 ??) ;; #define S_IFMT  00170000
+         (#o014 ?s)    ;; #define S_IFSOCK 0140000
+         (#o012 ?l)    ;; #define S_IFLNK  0120000
+         ;; (8  ??)    ;; #define S_IFREG  0100000
+         (#o006  ?b)   ;; #define S_IFBLK  0060000
+         (#o004  ?d)   ;; #define S_IFDIR  0040000
+         (#o002  ?c)   ;; #define S_IFCHR  0020000
+         (#o001  ?p)   ;; #define S_IFIFO  0010000
+         (_ ?-)))
+   (if (zerop (logand   256 mode)) ?- ?r)
+   (if (zerop (logand   128 mode)) ?- ?w)
+   (if (zerop (logand    64 mode))
+       (if (zerop (logand  2048 mode)) ?- ?S)
+     (if (zerop (logand  2048 mode)) ?x ?s))
+   (if (zerop (logand    32 mode)) ?- ?r)
+   (if (zerop (logand    16 mode)) ?- ?w)
+   (if (zerop (logand     8 mode))
+       (if (zerop (logand  1024 mode)) ?- ?S)
+     (if (zerop (logand  1024 mode)) ?x ?s))
+   (if (zerop (logand     4 mode)) ?- ?r)
+   (if (zerop (logand     2 mode)) ?- ?w)
+   (if (zerop (logand 512 mode))
+       (if (zerop (logand   1 mode)) ?- ?x)
+     (if (zerop (logand   1 mode)) ?T ?t))))
+
+(compat-defun file-backup-file-names (filename) ;; <compat-tests:file-backup-file-names>
+  "Return a list of backup files for FILENAME.
+The list will be sorted by modification time so that the most
+recent files are first."
+  ;; `make-backup-file-name' will get us the right directory for
+  ;; ordinary or numeric backups.  It might create a directory for
+  ;; backups as a side-effect, according to `backup-directory-alist'.
+  (let* ((filename (file-name-sans-versions
+                    (make-backup-file-name (expand-file-name filename))))
+         (dir (file-name-directory filename))
+         files)
+    (dolist (file (file-name-all-completions
+                   (file-name-nondirectory filename) dir))
+      (let ((candidate (concat dir file)))
+        (when (and (backup-file-name-p candidate)
+                   (string= (file-name-sans-versions candidate) filename))
+          (push candidate files))))
+    (sort files #'file-newer-than-file-p)))
+
+(compat-defun make-lock-file-name (filename) ;; <compat-tests:make-lock-file-name>
+  "Make a lock file name for FILENAME.
+This prepends \".#\" to the non-directory part of FILENAME, and
+doesn't respect `lock-file-name-transforms', as Emacs 28.1 and
+onwards does."
+  (expand-file-name
+   (concat
+    ".#" (file-name-nondirectory filename))
+   (file-name-directory filename)))
+
+;;;; Defined in minibuffer.el
+
+(compat-defun format-prompt (prompt default &rest format-args) ;; <compat-tests:format-prompt>
+  "Format PROMPT with DEFAULT.
+If FORMAT-ARGS is nil, PROMPT is used as a plain string.  If
+FORMAT-ARGS is non-nil, PROMPT is used as a format control
+string, and FORMAT-ARGS are the arguments to be substituted into
+it.  See `format' for details.
+
+If DEFAULT is a list, the first element is used as the default.
+If not, the element is used as is.
+
+If DEFAULT is nil or an empty string, no \"default value\" string
+is included in the return value."
+  (concat
+   (if (null format-args)
+       prompt
+     (apply #'format prompt format-args))
+   (and default
+        (or (not (stringp default))
+            (> (length default) 0))
+        (format " (default %s)"
+                (if (consp default)
+                    (car default)
+                  default)))
+   ": "))
+
+;;;; Defined in faces.el
+
+(compat-defvar color-luminance-dark-limit 0.325 ;; <compat-tests:color-dark-p>
+  "The relative luminance below which a color is considered \"dark\".
+A \"dark\" color in this sense provides better contrast with white
+than with black; see `color-dark-p'.
+This value was determined experimentally."
+  :constant t)
+
+(compat-defun color-dark-p (rgb) ;; <compat-tests:color-dark-p>
+  "Whether RGB is more readable against white than black.
+RGB is a 3-element list (R G B), each component in the range [0,1].
+This predicate can be used both for determining a suitable (black or white)
+contrast color with RGB as background and as foreground."
+  (unless (<= 0 (apply #'min rgb) (apply #'max rgb) 1)
+    (error "RGB components %S not in [0,1]" rgb))
+  ;; Compute the relative luminance after gamma-correcting (assuming sRGB),
+  ;; and compare to a cut-off value determined experimentally.
+  ;; See https://en.wikipedia.org/wiki/Relative_luminance for details.
+  (let* ((sr (nth 0 rgb))
+         (sg (nth 1 rgb))
+         (sb (nth 2 rgb))
+         ;; Gamma-correct the RGB components to linear values.
+         ;; Use the power 2.2 as an approximation to sRGB gamma;
+         ;; it should be good enough for the purpose of this function.
+         (r (expt sr 2.2))
+         (g (expt sg 2.2))
+         (b (expt sb 2.2))
+         (y (+ (* r 0.2126) (* g 0.7152) (* b 0.0722))))
+    (< y color-luminance-dark-limit)))
+
+;;;; Defined in window.el
+
+(compat-defmacro with-window-non-dedicated (window &rest body) ;; <compat-tests:with-window-non-dedicated>
+  "Evaluate BODY with WINDOW temporarily made non-dedicated.
+If WINDOW is nil, use the selected window.  Return the value of
+the last form in BODY."
+  (declare (indent 1) (debug t))
+  (let ((window-dedicated-sym (gensym))
+        (window-sym (gensym)))
+    `(let* ((,window-sym (window-normalize-window ,window t))
+            (,window-dedicated-sym (window-dedicated-p ,window-sym)))
+       (set-window-dedicated-p ,window-sym nil)
+       (unwind-protect
+           (progn ,@body)
+         (set-window-dedicated-p ,window-sym ,window-dedicated-sym)))))
+
+(compat-defun count-windows (&optional minibuf all-frames) ;; <compat-tests:count-windows>
+  "Handle optional argument ALL-FRAMES."
+  :extended t
+  (if all-frames
+      (let ((sum 0))
+        (dolist (frame (frame-list))
+          (with-selected-frame frame
+            (setq sum (+ (count-windows minibuf) sum))))
+        sum)
+    (count-windows minibuf)))
+
+;;;; Defined in thingatpt.el
+
+(compat-defun thing-at-mouse (event thing &optional no-properties) ;; <compat-tests:thing-at-mouse>
+  "Return the THING at mouse click.
+Like `thing-at-point', but tries to use the event
+where the mouse button is clicked to find a thing nearby."
+  ;; No :feature specified, since the function is autoloaded.
+  (save-excursion
+    (mouse-set-point event)
+    (thing-at-point thing no-properties)))
+
+(compat-defun bounds-of-thing-at-mouse (event thing) ;; <compat-tests:thing-at-mouse>
+  "Determine start and end locations for THING at mouse click given by EVENT.
+Like `bounds-of-thing-at-point', but tries to use the position in EVENT
+where the mouse button is clicked to find the thing nearby."
+  ;; No :feature specified, since the function is autoloaded.
+  (save-excursion
+    (mouse-set-point event)
+    (bounds-of-thing-at-point thing)))
+
+;;;; Defined in mouse.el
+
+(compat-defun mark-thing-at-mouse (click thing) ;; <compat-tests:thing-at-mouse>
+  "Activate the region around THING found near the mouse CLICK."
+  (when-let ((bounds (bounds-of-thing-at-mouse click thing)))
+    (goto-char (if mouse-select-region-move-to-beginning
+                   (car bounds) (cdr bounds)))
+    (push-mark (if mouse-select-region-move-to-beginning
+                   (cdr bounds) (car bounds))
+               t 'activate)))
+
+;;;; Defined in macroexp.el
+
+(compat-defun macroexp-warn-and-return (msg form &optional _category _compile-only _arg) ;; <compat-tests:macroexp-warn-and-return>
+  "Return code equivalent to FORM labeled with warning MSG.
+CATEGORY is the category of the warning, like the categories that
+can appear in `byte-compile-warnings'.
+COMPILE-ONLY non-nil means no warning should be emitted if the code
+is executed without being compiled first.
+ARG is a symbol (or a form) giving the source code position for the message.
+It should normally be a symbol with position and it defaults to FORM."
+  (macroexp--warn-and-return msg form))
+
+(compat-defun macroexp-file-name () ;; <compat-tests:macroexp-file-name>
+  "Return the name of the file from which the code comes.
+Returns nil when we do not know.
+A non-nil result is expected to be reliable when called from a macro in order
+to find the file in which the macro's call was found, and it should be
+reliable as well when used at the top-level of a file.
+Other uses risk returning non-nil value that point to the wrong file."
+  (let ((file (car (last current-load-list))))
+    (or (if (stringp file) file)
+        (bound-and-true-p byte-compile-current-file))))
+
+;;;; Defined in env.el
+
+(compat-defmacro with-environment-variables (variables &rest body) ;; <compat-tests:with-environment-variables>
+  "Set VARIABLES in the environment and execute BODY.
+VARIABLES is a list of variable settings of the form (VAR VALUE),
+where VAR is the name of the variable (a string) and VALUE
+is its value (also a string).
+
+The previous values will be be restored upon exit."
+  (declare (indent 1) (debug (sexp body)))
+  (unless (consp variables)
+    (error "Invalid VARIABLES: %s" variables))
+  `(let ((process-environment (copy-sequence process-environment)))
+     ,@(mapcar (lambda (elem)
+                 `(setenv ,(car elem) ,(cadr elem)))
+               variables)
+     ,@body))
+
+;;;; Defined in time-data.el
+
+(compat-defun decoded-time-period (time) ;; <compat-tests:decoded-time-period>
+  "Interpret DECODED as a period and return its length in seconds.
+For computational purposes, years are 365 days long and months
+are 30 days long."
+  :feature time-date
+  (+ (if (consp (decoded-time-second time))
+         (/ (float (car (decoded-time-second time)))
+            (cdr (decoded-time-second time)))
+       (or (decoded-time-second time) 0))
+     (* (or (decoded-time-minute time) 0) 60)
+     (* (or (decoded-time-hour time) 0) 60 60)
+     (* (or (decoded-time-day time) 0) 60 60 24)
+     (* (or (decoded-time-month time) 0) 60 60 24 30)
+     (* (or (decoded-time-year time) 0) 60 60 24 365)))
+
+;;;; Defined in doc.c
+
+(compat-defun text-quoting-style () ;; <compat-tests:text-quoting-style>
+  "Return the current effective text quoting style.
+If the variable `text-quoting-style' is `grave', `straight' or
+`curve', just return that value.  If it is nil (the default), return
+`grave' if curved quotes cannot be displayed (for instance, on a
+terminal with no support for these characters), otherwise return
+`quote'.  Any other value is treated as `grave'.
+
+Note that in contrast to the variable `text-quoting-style', this
+function will never return nil."
+  (cond
+   ((memq text-quoting-style '(grave straight curve))
+    text-quoting-style)
+   ((not text-quoting-style) 'grave)
+   (t 'curve)))
+
+;;;; Defined in button.el
+
+;; Obsolete Alias since 29
+(compat-defalias button-buttonize buttonize :obsolete t) ;; <compat-tests:obsolete-button-buttonize>
+
+;;;; Defined in wid-edit.el
+
+(compat-guard t ;; <compat-tests:widget-natnum>
+  :feature wid-edit
+  (define-widget 'natnum 'restricted-sexp
+    "A nonnegative integer."
+    :tag "Integer (positive)"
+    :value 0
+    :type-error "This field should contain a nonnegative integer"
+    :match-alternatives '(natnump)))
+
+;;;; Defined in pcase.el
+
+(compat-guard t ;; <compat-tests:pcase-cl-type>
+  (pcase-defmacro cl-type (type)
+    "Pcase pattern that matches objects of TYPE.
+TYPE is a type descriptor as accepted by `cl-typep', which see."
+    `(pred (lambda (x) (cl-typep x ',type)))))
+
+(provide 'compat-28)
+;;; compat-28.el ends here
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-28.elc b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-28.elc
new file mode 100644
index 0000000..3539187
Binary files /dev/null and b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-28.elc differ
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-29.el b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-29.el
new file mode 100644
index 0000000..af5aa32
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-29.el
@@ -0,0 +1,1591 @@
+;;; compat-29.el --- Functionality added in Emacs 29 -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021-2026 Free Software Foundation, Inc.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Functionality added in Emacs 29, needed by older Emacs versions.
+
+;;; Code:
+
+(eval-when-compile (load "compat-macs.el" nil t t))
+(compat-require compat-28 "28.1")
+
+;; Preloaded in loadup.el
+(compat-require seq "29.1") ;; <compat-tests:seq>
+
+(compat-version "29.1")
+
+;;;; Defined in startup.el
+
+(compat-defvar lisp-directory ;; <compat-tests:lisp-directory>
+    (file-truename
+     (file-name-directory
+      (locate-file "simple" load-path (get-load-suffixes))))
+  "Directory where Emacs's own *.el and *.elc Lisp files are installed.")
+
+;;;; Defined in window.c
+
+(compat-defalias window-configuration-equal-p compare-window-configurations) ;; <compat-tests:window-configuration-equal-p>
+
+;;;; Defined in xdisp.c
+
+(compat-defun get-display-property (position prop &optional object properties) ;; <compat-tests:get-display-property>
+  "Get the value of the `display' property PROP at POSITION.
+If OBJECT, this should be a buffer or string where the property is
+fetched from.  If omitted, OBJECT defaults to the current buffer.
+
+If PROPERTIES, look for value of PROP in PROPERTIES instead of
+the properties at POSITION."
+  (if properties
+      (unless (listp properties)
+        (signal 'wrong-type-argument (list 'listp properties)))
+    (setq properties (get-text-property position 'display object)))
+  (cond
+   ((vectorp properties)
+    (catch 'found
+      (dotimes (i (length properties))
+        (let ((ent (aref properties i)))
+          (when (eq (car ent) prop)
+            (throw 'found (cadr ent )))))))
+   ((consp (car properties))
+    (condition-case nil
+        (cadr (assq prop properties))
+      ;; Silently handle improper lists:
+      (wrong-type-argument nil)))
+   ((and (consp (cdr properties))
+         (eq (car properties) prop))
+    (cadr properties))))
+
+;;;; Defined in fns.c
+
+(compat-defun ntake (n list) ;; <compat-tests:ntake>
+  "Modify LIST to keep only the first N elements.
+If N is zero or negative, return nil.
+If N is greater or equal to the length of LIST, return LIST unmodified.
+Otherwise, return LIST after truncating it."
+  (and (> n 0) (let ((cons (nthcdr (1- n) list)))
+                 (when cons (setcdr cons nil))
+                 list)))
+
+(compat-defun take (n list) ;; <compat-tests:take>
+  "Return the first N elements of LIST.
+If N is zero or negative, return nil.
+If N is greater or equal to the length of LIST, return LIST (or a copy)."
+  (declare (pure t) (side-effect-free t))
+  (let (copy)
+    (while (and (< 0 n) list)
+      (push (pop list) copy)
+      (setq n (1- n)))
+    (nreverse copy)))
+
+(compat-defun string-equal-ignore-case (string1 string2) ;; <compat-tests:string-equal-ignore-case>
+  "Like `string-equal', but case-insensitive.
+Upper-case and lower-case letters are treated as equal.
+Unibyte strings are converted to multibyte for comparison."
+  (declare (pure t) (side-effect-free t))
+  (eq t (compare-strings string1 0 nil string2 0 nil t)))
+
+(compat-defun plist-get (plist prop &optional predicate) ;; <compat-tests:plist-get>
+  "Handle optional argument PREDICATE."
+  :extended t
+  (pcase predicate
+    ((or `nil `eq) (plist-get plist prop))
+    (`equal (lax-plist-get plist prop))
+    (_ (catch 'found
+         (while (consp plist)
+           (when (funcall predicate prop (car plist))
+             (throw 'found (cadr plist)))
+           (setq plist (cddr plist)))))))
+
+(compat-defun plist-put (plist prop val &optional predicate) ;; <compat-tests:plist-get>
+  "Handle optional argument PREDICATE."
+  :extended t
+  (pcase predicate
+    ((or `nil `eq) (plist-put plist prop val))
+    (`equal (lax-plist-put plist prop val))
+    (_ (catch 'found
+         (let ((tail plist))
+           (while (consp tail)
+             (when (funcall predicate prop (car tail))
+               (setcar (cdr tail) val)
+               (throw 'found plist))
+             (setq tail (cddr tail))))
+         (nconc plist (list prop val))))))
+
+(compat-defun plist-member (plist prop &optional predicate) ;; <compat-tests:plist-get>
+  "Handle optional argument PREDICATE."
+  :extended t
+  (pcase predicate
+    ((or `nil `eq) (plist-member plist prop))
+    (_ (catch 'found
+         (while (consp plist)
+           (when (funcall predicate prop (car plist))
+             (throw 'found plist))
+           (setq plist (cddr plist)))))))
+
+;;;; Defined in gv.el
+
+(compat-guard t ;; <compat-tests:plist-get-gv>
+  (gv-define-expander compat--plist-get
+    (lambda (do plist prop &optional predicate)
+      (macroexp-let2 macroexp-copyable-p key prop
+        (gv-letplace (getter setter) plist
+          (macroexp-let2 nil p `(cdr (compat--plist-member ,getter ,key ,predicate))
+            (funcall do
+                     `(car ,p)
+                     (lambda (val)
+                       `(if ,p
+                            (setcar ,p ,val)
+                          ,(funcall setter
+                                    `(cons ,key (cons ,val ,getter)))))))))))
+  (unless (get 'plist-get 'gv-expander)
+    (put 'plist-get 'gv-expander (get 'compat--plist-get 'gv-expander))))
+
+;;;; Defined in editfns.c
+
+(compat-defun pos-bol (&optional n) ;; <compat-tests:pos-bol>
+  "Return the position of the first character on the current line.
+With optional argument N, scan forward N - 1 lines first.
+If the scan reaches the end of the buffer, return that position.
+
+This function ignores text display directionality; it returns the
+position of the first character in logical order, i.e. the smallest
+character position on the logical line.  See `vertical-motion' for
+movement by screen lines.
+
+This function does not move point.  Also see `line-beginning-position'."
+  (declare (side-effect-free t))
+  (let ((inhibit-field-text-motion t))
+    (line-beginning-position n)))
+
+(compat-defun pos-eol (&optional n) ;; <compat-tests:pos-bol>
+  "Return the position of the last character on the current line.
+With argument N not nil or 1, move forward N - 1 lines first.
+If scan reaches end of buffer, return that position.
+
+This function ignores text display directionality; it returns the
+position of the last character in logical order, i.e. the largest
+character position on the line.
+
+This function does not move point.  Also see `line-end-position'."
+  (declare (side-effect-free t))
+  (let ((inhibit-field-text-motion t))
+    (line-end-position n)))
+
+;;;; Defined in subr.el
+
+(compat-defmacro with-delayed-message (_args &rest body) ;; <compat-tests:with-delayed-message>
+  "Like `progn', but display MESSAGE if BODY takes longer than TIMEOUT seconds.
+The MESSAGE form will be evaluated immediately, but the resulting
+string will be displayed only if BODY takes longer than TIMEOUT seconds.
+
+NOTE: The compatibility function never displays the message,
+which is not problematic since the only effect of the function is
+to display a progress message to the user.  Backporting this
+feature is not possible, since the implementation is directly
+baked into the Elisp interpreter.
+
+\(fn (timeout message) &rest body)"
+  (declare (indent 1))
+  (macroexp-progn body))
+
+(compat-defun funcall-with-delayed-message (timeout message function) ;; <compat-tests:with-delayed-message>
+  "Like `funcall', but display MESSAGE if FUNCTION takes longer than TIMEOUT.
+TIMEOUT is a number of seconds, and can be an integer or a
+floating point number.  If FUNCTION takes less time to execute
+than TIMEOUT seconds, MESSAGE is not displayed.
+
+NOTE: The compatibility function never displays the message,
+which is not problematic since the only effect of the function is
+to display a progress message to the user.  Backporting this
+feature is not possible, since the implementation is directly
+baked into the Elisp interpreter."
+  (ignore timeout message)
+  (funcall function))
+
+(compat-defun string-lines (string &optional omit-nulls keep-newlines) ;; <compat-tests:string-lines>
+  "Handle additional KEEP-NEWLINES argument."
+  :extended "28.1"
+  (if (equal string "")
+      (if omit-nulls
+          nil
+        (list ""))
+    (let ((lines nil)
+          (start 0))
+      (while (< start (length string))
+        (let ((newline (string-search "\n" string start)))
+          (if newline
+              (progn
+                (when (or (not omit-nulls)
+                          (not (= start newline)))
+                  (let ((line (substring string start
+                                         (if keep-newlines
+                                             (1+ newline)
+                                           newline))))
+                    (when (not (and keep-newlines omit-nulls
+                                    (equal line "\n")))
+                      (push line lines))))
+                (setq start (1+ newline)))
+            (if (zerop start)
+                (push string lines)
+              (push (substring string start) lines))
+            (setq start (length string)))))
+      (nreverse lines))))
+
+(compat-defun readablep (object) ;; <compat-tests:readablep>
+  "Say whether OBJECT has a readable syntax.
+This means that OBJECT can be printed out and then read back
+again by the Lisp reader.  This function returns nil if OBJECT is
+unreadable, and the printed representation (from `prin1') of
+OBJECT if it is readable."
+  (declare (side-effect-free error-free))
+  (ignore-errors (equal object (read (prin1-to-string object)))))
+
+(compat-defun buffer-local-restore-state (states) ;; <compat-tests:buffer-local-set-state>
+  "Restore values of buffer-local variables recorded in STATES.
+STATES should be an object returned by `buffer-local-set-state'."
+  (dolist (state states)
+    (if (cadr state)
+        (set (car state) (caddr state))
+      (kill-local-variable (car state)))))
+
+(compat-defun buffer-local-set-state--get (pairs) ;; <compat-tests:buffer-local-set-state>
+  "Internal helper function."
+  (let ((states nil))
+    (while pairs
+      (push (list (car pairs)
+                  (and (boundp (car pairs))
+                       (local-variable-p (car pairs)))
+                  (and (boundp (car pairs))
+                       (symbol-value (car pairs))))
+            states)
+      (setq pairs (cddr pairs)))
+    (nreverse states)))
+
+(compat-defmacro buffer-local-set-state (&rest pairs) ;; <compat-tests:buffer-local-set-state>
+  "Like `setq-local', but allow restoring the previous state of locals later.
+This macro returns an object that can be passed to `buffer-local-restore-state'
+in order to restore the state of the local variables set via this macro.
+
+\(fn [VARIABLE VALUE]...)"
+  (declare (debug setq))
+  (unless (zerop (mod (length pairs) 2))
+    (error "PAIRS must have an even number of variable/value members"))
+  `(prog1
+       (buffer-local-set-state--get ',pairs)
+     (,(if (fboundp 'compat--setq-local) 'compat--setq-local 'setq-local)
+      ,@pairs)))
+
+(compat-defun list-of-strings-p (object) ;; <compat-tests:list-of-strings-p>
+  "Return t if OBJECT is nil or a list of strings."
+  (declare (pure t) (side-effect-free t))
+  (while (and (consp object) (stringp (car object)))
+    (setq object (cdr object)))
+  (null object))
+
+(compat-defun plistp (object) ;; <compat-tests:plistp>
+  "Non-nil if and only if OBJECT is a valid plist."
+  (let ((len (proper-list-p object)))
+    (and len (zerop (% len 2)))))
+
+(compat-defun delete-line () ;; <compat-tests:delete-line>
+  "Delete the current line."
+  (delete-region (pos-bol) (pos-bol 2)))
+
+(compat-defmacro with-restriction (start end &rest rest) ;; <compat-tests:with-restriction>
+  "Execute BODY with restrictions set to START and END.
+
+The current restrictions, if any, are restored upon return.
+
+When the optional :label LABEL argument is present, in which
+LABEL is a symbol, inside BODY, `narrow-to-region' and `widen'
+can be used only within the START and END limits.  To gain access
+to other portions of the buffer, use `without-restriction' with the
+same LABEL argument.
+
+\(fn START END [:label LABEL] BODY)"
+  (declare (indent 0) (debug t))
+  `(save-restriction
+     (narrow-to-region ,start ,end)
+     ;; Locking is ignored
+     ,@(if (eq (car rest) :label) (cddr rest) rest)))
+
+(compat-defmacro without-restriction (&rest rest) ;; <compat-tests:without-restriction>
+  "Execute BODY without restrictions.
+
+The current restrictions, if any, are restored upon return.
+
+When the optional :label LABEL argument is present, the
+restrictions set by `with-restriction' with the same LABEL argument
+are lifted.
+
+\(fn [:label LABEL] BODY)"
+  (declare (indent 0) (debug t))
+  `(save-restriction
+     (widen)
+     ;; Locking is ignored
+     ,@(if (eq (car rest) :label) (cddr rest) rest)))
+
+(compat-defmacro with-memoization (place &rest code) ;; <compat-tests:with-memoization>
+  "Return the value of CODE and stash it in PLACE.
+If PLACE's value is non-nil, then don't bother evaluating CODE
+and return the value found in PLACE instead."
+  (declare (indent 1))
+  (gv-letplace (getter setter) place
+    `(or ,getter
+         ,(macroexp-let2 nil val (macroexp-progn code)
+            `(progn
+               ,(funcall setter val)
+               ,val)))))
+
+(compat-defalias string-split split-string) ;; <compat-tests:string-split>
+
+(compat-defun compiled-function-p (object) ;; <compat-tests:compiled-function-p>
+  "Return non-nil if OBJECT is a function that has been compiled.
+Does not distinguish between functions implemented in machine code
+or byte-code."
+  (or (subrp object) (byte-code-function-p object)))
+
+(compat-defun function-alias-p (func &optional noerror) ;; <compat-tests:function-alias-p>
+  "Return nil if FUNC is not a function alias.
+If FUNC is a function alias, return the function alias chain.
+
+If the function alias chain contains loops, an error will be
+signalled.  If NOERROR, the non-loop parts of the chain is returned."
+  (declare (side-effect-free t))
+  (let ((chain nil)
+        (orig-func func))
+    (nreverse
+     (catch 'loop
+       (while (and (symbolp func)
+                   (setq func (symbol-function func))
+                   (symbolp func))
+         (when (or (memq func chain)
+                   (eq func orig-func))
+           (if noerror
+               (throw 'loop chain)
+             (signal 'cyclic-function-indirection (list orig-func))))
+         (push func chain))
+       chain))))
+
+(compat-defun buffer-match-p (condition buffer-or-name &optional arg) ;; <compat-tests:buffer-match-p>
+  "Return non-nil if BUFFER-OR-NAME matches CONDITION.
+CONDITION is either:
+- the symbol t, to always match,
+- the symbol nil, which never matches,
+- a regular expression, to match a buffer name,
+- a predicate function that takes a buffer object and ARG as
+  arguments, and returns non-nil if the buffer matches,
+- a cons-cell, where the car describes how to interpret the cdr.
+  The car can be one of the following:
+  * `derived-mode': the buffer matches if the buffer's major mode
+    is derived from the major mode in the cons-cell's cdr.
+  * `major-mode': the buffer matches if the buffer's major mode
+    is eq to the cons-cell's cdr.  Prefer using `derived-mode'
+    instead when both can work.
+  * `not': the cadr is interpreted as a negation of a condition.
+  * `and': the cdr is a list of recursive conditions, that all have
+    to be met.
+  * `or': the cdr is a list of recursive condition, of which at
+    least one has to be met."
+  (letrec
+      ((buffer (get-buffer buffer-or-name))
+       (match
+        (lambda (conditions)
+          (catch 'match
+            (dolist (condition conditions)
+              (when (cond
+                     ((eq condition t))
+                     ((stringp condition)
+                      (string-match-p condition (buffer-name buffer)))
+                     ((functionp condition)
+                      (condition-case nil
+                          (funcall condition buffer)
+                        (wrong-number-of-arguments
+                         (funcall condition buffer arg))))
+                     ((eq (car-safe condition) 'major-mode)
+                      (eq
+                       (buffer-local-value 'major-mode buffer)
+                       (cdr condition)))
+                     ((eq (car-safe condition) 'derived-mode)
+                      (provided-mode-derived-p
+                       (buffer-local-value 'major-mode buffer)
+                       (cdr condition)))
+                     ((eq (car-safe condition) 'not)
+                      (not (funcall match (cdr condition))))
+                     ((eq (car-safe condition) 'or)
+                      (funcall match (cdr condition)))
+                     ((eq (car-safe condition) 'and)
+                      (catch 'fail
+                        (dolist (c (cdr condition))
+                          (unless (funcall match (list c))
+                            (throw 'fail nil)))
+                        t)))
+                (throw 'match t)))))))
+    (funcall match (list condition))))
+
+(compat-defun match-buffers (condition &optional buffers arg) ;; <compat-tests:match-buffers>
+  "Return a list of buffers that match CONDITION.
+See `buffer-match' for details on CONDITION.  By default all
+buffers are checked, this can be restricted by passing an
+optional argument BUFFERS, set to a list of buffers to check.
+ARG is passed to `buffer-match', for predicate conditions in
+CONDITION."
+  (let (bufs)
+    (dolist (buf (or buffers (buffer-list)))
+      (when (buffer-match-p condition (get-buffer buf) arg)
+        (push buf bufs)))
+    bufs))
+
+(compat-defvar set-transient-map-timeout nil ;; <compat-tests:set-transient-map>
+  "Timeout in seconds for deactivation of a transient keymap.
+If this is a number, it specifies the amount of idle time
+after which to deactivate the keymap set by `set-transient-map',
+thus overriding the value of the TIMEOUT argument to that function.")
+
+(compat-defvar set-transient-map-timer nil ;; <compat-tests:set-transient-map>
+  "Timer for `set-transient-map-timeout'.")
+
+(declare-function format-spec "format-spec")
+(compat-defun set-transient-map (map &optional keep-pred on-exit message timeout) ;; <compat-tests:set-transient-map>
+  "Handle the optional arguments MESSAGE and TIMEOUT."
+  :extended t
+  (unless (fboundp 'format-spec)
+    (require 'format-spec))
+  (let* ((timeout (or set-transient-map-timeout timeout))
+         (message
+          (when message
+            (let (keys)
+              (map-keymap (lambda (key cmd) (and cmd (push key keys))) map)
+              (format-spec (if (stringp message) message "Repeat with %k")
+                           `((?k . ,(mapconcat
+                                     (lambda (key)
+                                       (substitute-command-keys
+                                        (format "\\`%s'"
+                                                (key-description (vector key)))))
+                                     keys ", ")))))))
+         (clearfun (make-symbol "clear-transient-map"))
+         (exitfun
+          (lambda ()
+            (internal-pop-keymap map 'overriding-terminal-local-map)
+            (remove-hook 'pre-command-hook clearfun)
+            (when message (message ""))
+            (when set-transient-map-timer (cancel-timer set-transient-map-timer))
+            (when on-exit (funcall on-exit)))))
+    (fset clearfun
+          (lambda ()
+            (with-demoted-errors "set-transient-map PCH: %S"
+              (if (cond
+                       ((null keep-pred) nil)
+                       ((and (not (eq map (cadr overriding-terminal-local-map)))
+                             (memq map (cddr overriding-terminal-local-map)))
+                        t)
+                       ((eq t keep-pred)
+                        (let ((mc (lookup-key map (this-command-keys-vector))))
+                          (when (and mc (symbolp mc))
+                            (setq mc (or (command-remapping mc) mc)))
+                          (and mc (eq this-command mc))))
+                       (t (funcall keep-pred)))
+                  (when message (message "%s" message))
+                (funcall exitfun)))))
+    (add-hook 'pre-command-hook clearfun)
+    (internal-push-keymap map 'overriding-terminal-local-map)
+    (when timeout
+      (when set-transient-map-timer (cancel-timer set-transient-map-timer))
+      (setq set-transient-map-timer (run-with-idle-timer timeout nil exitfun)))
+    (when message (message "%s" message))
+    exitfun))
+
+;;;; Defined in simple.el
+
+(compat-defun char-uppercase-p (char) ;; <compat-tests:char-uppercase-p>
+  "Return non-nil if CHAR is an upper-case character.
+If the Unicode tables are not yet available, e.g. during bootstrap,
+then gives correct answers only for ASCII characters."
+  (cond ((unicode-property-table-internal 'lowercase)
+         (characterp (get-char-code-property char 'lowercase)))
+        ((and (>= char ?A) (<= char ?Z)))))
+
+(compat-defun use-region-noncontiguous-p () ;; <compat-tests:region-noncontiguous-p>
+  "Return non-nil for a non-contiguous region if `use-region-p'."
+  (and (use-region-p) (region-noncontiguous-p)))
+
+(compat-defun use-region-beginning () ;; <compat-tests:use-region>
+  "Return the start of the region if `use-region-p'."
+  (and (use-region-p) (region-beginning)))
+
+(compat-defun use-region-end () ;; <compat-tests:use-region>
+  "Return the end of the region if `use-region-p'."
+  (and (use-region-p) (region-end)))
+
+(compat-defun get-scratch-buffer-create () ;; <compat-tests:get-scratch-buffer-create>
+  "Return the *scratch* buffer, creating a new one if needed."
+  (or (get-buffer "*scratch*")
+      (let ((scratch (get-buffer-create "*scratch*")))
+        ;; Don't touch the buffer contents or mode unless we know that
+        ;; we just created it.
+        (with-current-buffer scratch
+          (when initial-scratch-message
+            (insert (substitute-command-keys initial-scratch-message))
+            (set-buffer-modified-p nil))
+          (funcall initial-major-mode))
+        scratch)))
+
+;;;; Defined in subr-x.el
+
+(compat-defmacro with-buffer-unmodified-if-unchanged (&rest body) ;; <compat-tests:with-buffer-unmodified-if-unchanged>
+  "Like `progn', but change buffer-modified status only if buffer text changes.
+If the buffer was unmodified before execution of BODY, and
+buffer text after execution of BODY is identical to what it was
+before, ensure that buffer is still marked unmodified afterwards.
+For example, the following won't change the buffer's modification
+status:
+
+  (with-buffer-unmodified-if-unchanged
+    (insert \"a\")
+    (delete-char -1))
+
+Note that only changes in the raw byte sequence of the buffer text,
+as stored in the internal representation, are monitored for the
+purpose of detecting the lack of changes in buffer text.  Any other
+changes that are normally perceived as \"buffer modifications\", such
+as changes in text properties, `buffer-file-coding-system', buffer
+multibyteness, etc. -- will not be noticed, and the buffer will still
+be marked unmodified, effectively ignoring those changes."
+  (declare (debug t) (indent 0))
+  (let ((hash (gensym))
+        (buffer (gensym)))
+    `(let ((,hash (and (not (buffer-modified-p))
+                       (buffer-hash)))
+           (,buffer (current-buffer)))
+       (prog1
+           (progn
+             ,@body)
+         ;; If we didn't change anything in the buffer (and the buffer
+         ;; was previously unmodified), then flip the modification status
+         ;; back to "unchanged".
+         (when (and ,hash (buffer-live-p ,buffer))
+           (with-current-buffer ,buffer
+             (when (and (buffer-modified-p)
+                        (equal ,hash (buffer-hash)))
+               (restore-buffer-modified-p nil))))))))
+
+(compat-defun add-display-text-property (start end spec value &optional object) ;; <compat-tests:add-display-text-property>
+  "Add the display specification (SPEC VALUE) to the text from START to END.
+If any text in the region has a non-nil `display' property, the existing
+display specifications are retained.
+
+OBJECT is either a string or a buffer to add the specification to.
+If omitted, OBJECT defaults to the current buffer."
+  (declare-function add-remove--display-text-property "compat-31")
+  (add-remove--display-text-property start end spec value object))
+
+(compat-defmacro while-let (spec &rest body) ;; <compat-tests:while-let>
+  "Bind variables according to SPEC and conditionally evaluate BODY.
+Evaluate each binding in turn, stopping if a binding value is nil.
+If all bindings are non-nil, eval BODY and repeat.
+
+The variable list SPEC is the same as in `if-let*'."
+  (declare (indent 1) (debug if-let))
+  (let ((done (gensym "done")))
+    `(catch ',done
+       (while t
+         (if-let* ,spec
+             (progn
+               ,@body)
+           (throw ',done nil))))))
+
+;;;; Defined in ucs-normalize.el
+
+(compat-defun string-glyph-compose (string) ;; <compat-tests:string-glyph-compose>
+  "Compose STRING according to the Unicode NFC.
+This returns a new string obtained by canonical decomposition
+of STRING (see `ucs-normalize-NFC-string') followed by canonical
+composition, a.k.a. the \"Unicode Normalization Form C\" of STRING.
+For instance:
+
+  (string-glyph-compose \"Å\") => \"Å\""
+  (unless (fboundp 'ucs-normalize-NFC-string)
+    (require 'ucs-normalize))
+  (ucs-normalize-NFC-string string))
+
+(compat-defun string-glyph-decompose (string) ;; <compat-tests:string-glyph-decompose>
+  "Decompose STRING according to the Unicode NFD.
+This returns a new string that is the canonical decomposition of STRING,
+a.k.a. the \"Unicode Normalization Form D\" of STRING.  For instance:
+
+  (ucs-normalize-NFD-string \"Å\") => \"Å\""
+  (unless (fboundp 'ucs-normalize-NFD-string)
+    (require 'ucs-normalize))
+  (ucs-normalize-NFD-string string))
+
+;;;; Defined in files.el
+
+(compat-defun directory-abbrev-make-regexp (directory) ;; <compat-tests:directory-abbrev-make-regexp>
+  "Create a regexp to match DIRECTORY for `directory-abbrev-alist'."
+  (let ((regexp
+         ;; We include a slash at the end, to avoid spurious
+         ;; matches such as `/usr/foobar' when the home dir is
+         ;; `/usr/foo'.
+         (concat "\\`" (regexp-quote directory) "\\(/\\|\\'\\)")))
+    ;; The value of regexp could be multibyte or unibyte.  In the
+    ;; latter case, we need to decode it.
+    (if (multibyte-string-p regexp)
+        regexp
+      (decode-coding-string regexp
+                            (if (eq system-type 'windows-nt)
+                                'utf-8
+                              locale-coding-system)))))
+
+(compat-defun directory-abbrev-apply (filename) ;; <compat-tests:directory-abbrev-apply>
+  "Apply the abbreviations in `directory-abbrev-alist' to FILENAME.
+Note that when calling this, you should set `case-fold-search' as
+appropriate for the filesystem used for FILENAME."
+  (dolist (dir-abbrev directory-abbrev-alist filename)
+    (when (string-match (car dir-abbrev) filename)
+         (setq filename (concat (cdr dir-abbrev)
+                                (substring filename (match-end 0)))))))
+
+(compat-defun file-name-split (filename) ;; <compat-tests:file-name-split>
+  "Return a list of all the components of FILENAME.
+On most systems, this will be true:
+
+  (equal (string-join (file-name-split filename) \"/\") filename)"
+  (let ((components nil))
+    ;; If this is a directory file name, then we have a null file name
+    ;; at the end.
+    (when (directory-name-p filename)
+      (push "" components)
+      (setq filename (directory-file-name filename)))
+    ;; Loop, chopping off components.
+    (while (length> filename 0)
+      (push (file-name-nondirectory filename) components)
+      (let ((dir (file-name-directory filename)))
+        (setq filename (and dir (directory-file-name dir)))
+        ;; If there's nothing left to peel off, we're at the root and
+        ;; we can stop.
+        (when (and dir (equal dir filename))
+          (push (if (equal dir "") ""
+                  ;; On Windows, the first component might be "c:" or
+                  ;; the like.
+                  (substring dir 0 -1))
+                components)
+          (setq filename nil))))
+    components))
+
+(compat-defun file-attribute-file-identifier (attributes) ;; <compat-tests:file-attribute-getters>
+  "The inode and device numbers in ATTRIBUTES returned by `file-attributes'.
+The value is a list of the form (INODENUM DEVICE), where DEVICE could be
+either a single number or a cons cell of two numbers.
+This tuple of numbers uniquely identifies the file."
+  (nthcdr 10 attributes))
+
+(compat-defun file-name-parent-directory (filename) ;; <compat-tests:file-name-parent-directory>
+  "Return the directory name of the parent directory of FILENAME.
+If FILENAME is at the root of the filesystem, return nil.
+If FILENAME is relative, it is interpreted to be relative
+to `default-directory', and the result will also be relative."
+  (let* ((expanded-filename (expand-file-name filename))
+         (parent (file-name-directory (directory-file-name expanded-filename))))
+    (cond
+     ;; filename is at top-level, therefore no parent
+     ((or (null parent)
+          ;; `equal' is enough, we don't need to resolve symlinks here
+          ;; with `file-equal-p', also for performance
+          (equal parent expanded-filename))
+      nil)
+     ;; filename is relative, return relative parent
+     ((not (file-name-absolute-p filename))
+      (file-relative-name parent))
+     (t
+      parent))))
+
+(compat-defvar file-has-changed-p--hash-table ;; <compat-tests:file-has-changed-p>
+               (make-hash-table :test #'equal)
+  "Internal variable used by `file-has-changed-p'.")
+
+(compat-defun file-has-changed-p (file &optional tag) ;; <compat-tests:file-has-changed-p>
+  "Return non-nil if FILE has changed.
+The size and modification time of FILE are compared to the size
+and modification time of the same FILE during a previous
+invocation of `file-has-changed-p'.  Thus, the first invocation
+of `file-has-changed-p' always returns non-nil when FILE exists.
+The optional argument TAG, which must be a symbol, can be used to
+limit the comparison to invocations with identical tags; it can be
+the symbol of the calling function, for example."
+  (let* ((file (directory-file-name (expand-file-name file)))
+         (remote-file-name-inhibit-cache t)
+         (fileattr (file-attributes file 'integer))
+         (attr (and fileattr
+                    (cons (file-attribute-size fileattr)
+                          (file-attribute-modification-time fileattr))))
+         (sym (concat (symbol-name tag) "@" file))
+         (cachedattr (gethash sym file-has-changed-p--hash-table)))
+    (unless (equal attr cachedattr)
+      (puthash sym attr file-has-changed-p--hash-table))))
+
+;;;; Defined in keymap.el
+
+(compat-defun key-valid-p (keys) ;; <compat-tests:key-valid-p>
+  "Say whether KEYS is a valid key.
+A key is a string consisting of one or more key strokes.
+The key strokes are separated by single space characters.
+
+Each key stroke is either a single character, or the name of an
+event, surrounded by angle brackets.  In addition, any key stroke
+may be preceded by one or more modifier keys.  Finally, a limited
+number of characters have a special shorthand syntax.
+
+Here's some example key sequences.
+
+  \"f\"           (the key `f')
+  \"S o m\"       (a three key sequence of the keys `S', `o' and `m')
+  \"C-c o\"       (a two key sequence of the keys `c' with the control modifier
+                 and then the key `o')
+  \"H-<left>\"    (the key named \"left\" with the hyper modifier)
+  \"M-RET\"       (the \"return\" key with a meta modifier)
+  \"C-M-<space>\" (the \"space\" key with both the control and meta modifiers)
+
+These are the characters that have shorthand syntax:
+NUL, RET, TAB, LFD, ESC, SPC, DEL.
+
+Modifiers have to be specified in this order:
+
+   A-C-H-M-S-s
+
+which is
+
+   Alt-Control-Hyper-Meta-Shift-super"
+  (declare (pure t) (side-effect-free t))
+  (let ((case-fold-search nil))
+    (and
+     (stringp keys)
+     (string-match-p "\\`[^ ]+\\( [^ ]+\\)*\\'" keys)
+     (save-match-data
+       (catch 'exit
+         (let ((prefixes
+                "\\(A-\\)?\\(C-\\)?\\(H-\\)?\\(M-\\)?\\(S-\\)?\\(s-\\)?"))
+           (dolist (key (split-string keys " "))
+             ;; Every key might have these modifiers, and they should be
+             ;; in this order.
+             (when (string-match (concat "\\`" prefixes) key)
+               (setq key (substring key (match-end 0))))
+             (unless (or (and (= (length key) 1)
+                              ;; Don't accept control characters as keys.
+                              (not (< (aref key 0) ?\s))
+                              ;; Don't accept Meta'd characters as keys.
+                              (or (multibyte-string-p key)
+                                  (not (<= 127 (aref key 0) 255))))
+                         (and (string-match-p "\\`<[-_A-Za-z0-9]+>\\'" key)
+                              ;; Don't allow <M-C-down>.
+                              (= (progn
+                                   (string-match
+                                    (concat "\\`<" prefixes) key)
+                                   (match-end 0))
+                                 1))
+                         (string-match-p
+                          "\\`\\(NUL\\|RET\\|TAB\\|LFD\\|ESC\\|SPC\\|DEL\\)\\'"
+                          key))
+               ;; Invalid.
+               (throw 'exit nil)))
+           t))))))
+
+(compat-defun keymap--check (key) ;; <compat-tests:keymap--check>
+  "Signal an error if KEY doesn't have a valid syntax."
+  (unless (key-valid-p key)
+    (error "%S is not a valid key definition; see `key-valid-p'" key)))
+
+(compat-defun key-parse (keys) ;; <compat-tests:key-parse>
+  "Convert KEYS to the internal Emacs key representation.
+See `kbd' for a descripion of KEYS."
+  (declare (pure t) (side-effect-free t))
+  ;; A pure function is expected to preserve the match data.
+  (save-match-data
+    (let ((case-fold-search nil)
+          (len (length keys)) ; We won't alter keys in the loop below.
+          (pos 0)
+          (res []))
+      (while (and (< pos len)
+                  (string-match "[^ \t\n\f]+" keys pos))
+        (let* ((word-beg (match-beginning 0))
+               (word-end (match-end 0))
+               (word (substring keys word-beg len))
+               (times 1)
+               key)
+          ;; Try to catch events of the form "<as df>".
+          (if (string-match "\\`<[^ <>\t\n\f][^>\t\n\f]*>" word)
+              (setq word (match-string 0 word)
+                    pos (+ word-beg (match-end 0)))
+            (setq word (substring keys word-beg word-end)
+                  pos word-end))
+          (when (string-match "\\([0-9]+\\)\\*." word)
+            (setq times (string-to-number (substring word 0 (match-end 1))))
+            (setq word (substring word (1+ (match-end 1)))))
+          (cond ((string-match "^<<.+>>$" word)
+                 (setq key (vconcat (if (eq (key-binding [?\M-x])
+                                            'execute-extended-command)
+                                        [?\M-x]
+                                      (or (car (where-is-internal
+                                                'execute-extended-command))
+                                          [?\M-x]))
+                                    (substring word 2 -2) "\r")))
+                ((and (string-match "^\\(\\([ACHMsS]-\\)*\\)<\\(.+\\)>$" word)
+                      (progn
+                        (setq word (concat (match-string 1 word)
+                                           (match-string 3 word)))
+                        (not (string-match
+                              "\\<\\(NUL\\|RET\\|LFD\\|ESC\\|SPC\\|DEL\\)$"
+                              word))))
+                 (setq key (list (intern word))))
+                ((or (equal word "REM") (string-match "^;;" word))
+                 (setq pos (string-match "$" keys pos)))
+                (t
+                 (let ((orig-word word) (prefix 0) (bits 0))
+                   (while (string-match "^[ACHMsS]-." word)
+                     (setq bits (+ bits
+                                   (cdr
+                                    (assq (aref word 0)
+                                          '((?A . ?\A-\0) (?C . ?\C-\0)
+                                            (?H . ?\H-\0) (?M . ?\M-\0)
+                                            (?s . ?\s-\0) (?S . ?\S-\0))))))
+                     (setq prefix (+ prefix 2))
+                     (setq word (substring word 2)))
+                   (when (string-match "^\\^.$" word)
+                     (setq bits (+ bits ?\C-\0))
+                     (setq prefix (1+ prefix))
+                     (setq word (substring word 1)))
+                   (let ((found (assoc word '(("NUL" . "\0") ("RET" . "\r")
+                                              ("LFD" . "\n") ("TAB" . "\t")
+                                              ("ESC" . "\e") ("SPC" . " ")
+                                              ("DEL" . "\177")))))
+                     (when found (setq word (cdr found))))
+                   (when (string-match "^\\\\[0-7]+$" word)
+                     (let ((n 0))
+                       (dolist (ch (cdr (string-to-list word)))
+                         (setq n (+ (* n 8) ch -48)))
+                       (setq word (vector n))))
+                   (cond ((= bits 0)
+                          (setq key word))
+                         ((and (= bits ?\M-\0) (stringp word)
+                               (string-match "^-?[0-9]+$" word))
+                          (setq key (mapcar (lambda (x) (+ x bits))
+                                            (append word nil))))
+                         ((/= (length word) 1)
+                          (error "%s must prefix a single character, not %s"
+                                 (substring orig-word 0 prefix) word))
+                         ((and (/= (logand bits ?\C-\0) 0) (stringp word)
+                               ;; We used to accept . and ? here,
+                               ;; but . is simply wrong,
+                               ;; and C-? is not used (we use DEL instead).
+                               (string-match "[@-_a-z]" word))
+                          (setq key (list (+ bits (- ?\C-\0)
+                                             (logand (aref word 0) 31)))))
+                         (t
+                          (setq key (list (+ bits (aref word 0)))))))))
+          (when key
+            (dolist (_ (number-sequence 1 times))
+              (setq res (vconcat res key))))))
+      res)))
+
+(compat-defun keymap-set (keymap key definition) ;; <compat-tests:defvar-keymap>
+  "Set KEY to DEFINITION in KEYMAP.
+KEY is a string that satisfies `key-valid-p'.
+
+DEFINITION is anything that can be a key's definition:
+ nil (means key is undefined in this keymap),
+ a command (a Lisp function suitable for interactive calling),
+ a string (treated as a keyboard macro),
+ a keymap (to define a prefix key),
+ a symbol (when the key is looked up, the symbol will stand for its
+    function definition, which should at that time be one of the above,
+    or another symbol whose function definition is used, etc.),
+ a cons (STRING . DEFN), meaning that DEFN is the definition
+    (DEFN should be a valid definition in its own right) and
+    STRING is the menu item name (which is used only if the containing
+    keymap has been created with a menu name, see `make-keymap'),
+ or a cons (MAP . CHAR), meaning use definition of CHAR in keymap MAP,
+ or an extended menu item definition.
+ (See info node `(elisp)Extended Menu Items'.)"
+  (keymap--check key)
+  (when (stringp definition)
+    (keymap--check definition)
+    (setq definition (key-parse definition)))
+  (define-key keymap (key-parse key) definition))
+
+(compat-defun keymap-unset (keymap key &optional remove) ;; <compat-tests:keymap-unset>
+  "Remove key sequence KEY from KEYMAP.
+KEY is a string that satisfies `key-valid-p'.
+
+If REMOVE, remove the binding instead of unsetting it.  This only
+makes a difference when there's a parent keymap.  When unsetting
+a key in a child map, it will still shadow the same key in the
+parent keymap.  Removing the binding will allow the key in the
+parent keymap to be used."
+  (keymap--check key)
+  (compat--define-key keymap (key-parse key) nil remove))
+
+(compat-defun keymap-global-set (key command) ;; <compat-tests:keymap-global-set>
+  "Give KEY a global binding as COMMAND.
+COMMAND is the command definition to use; usually it is
+a symbol naming an interactively-callable function.
+
+KEY is a string that satisfies `key-valid-p'.
+
+Note that if KEY has a local binding in the current buffer,
+that local binding will continue to shadow any global binding
+that you make with this function.
+
+NOTE: The compatibility version is not a command."
+  (keymap-set (current-global-map) key command))
+
+(compat-defun keymap-local-set (key command) ;; <compat-tests:keymap-local-set>
+  "Give KEY a local binding as COMMAND.
+COMMAND is the command definition to use; usually it is
+a symbol naming an interactively-callable function.
+
+KEY is a string that satisfies `key-valid-p'.
+
+The binding goes in the current buffer's local map, which in most
+cases is shared with all other buffers in the same major mode.
+
+NOTE: The compatibility version is not a command."
+  (let ((map (current-local-map)))
+    (unless map
+      (use-local-map (setq map (make-sparse-keymap))))
+    (keymap-set map key command)))
+
+(compat-defun keymap-global-unset (key &optional remove) ;; <compat-tests:keymap-global-unset>
+  "Remove global binding of KEY (if any).
+KEY is a string that satisfies `key-valid-p'.
+
+If REMOVE (interactively, the prefix arg), remove the binding
+instead of unsetting it.  See `keymap-unset' for details.
+
+NOTE: The compatibility version is not a command."
+  (keymap-unset (current-global-map) key remove))
+
+(compat-defun keymap-local-unset (key &optional remove) ;; <compat-tests:keymap-local-unset>
+  "Remove local binding of KEY (if any).
+KEY is a string that satisfies `key-valid-p'.
+
+If REMOVE (interactively, the prefix arg), remove the binding
+instead of unsetting it.  See `keymap-unset' for details.
+
+NOTE: The compatibility version is not a command."
+  (when (current-local-map)
+    (keymap-unset (current-local-map) key remove)))
+
+(compat-defun keymap-substitute (keymap olddef newdef &optional oldmap prefix) ;; <compat-tests:keymap-substitute>
+  "Replace OLDDEF with NEWDEF for any keys in KEYMAP now defined as OLDDEF.
+In other words, OLDDEF is replaced with NEWDEF wherever it appears.
+Alternatively, if optional fourth argument OLDMAP is specified, we redefine
+in KEYMAP as NEWDEF those keys that are defined as OLDDEF in OLDMAP.
+
+If you don't specify OLDMAP, you can usually get the same results
+in a cleaner way with command remapping, like this:
+  (define-key KEYMAP [remap OLDDEF] NEWDEF)
+\n(fn OLDDEF NEWDEF KEYMAP &optional OLDMAP)"
+  ;; Don't document PREFIX in the doc string because we don't want to
+  ;; advertise it.  It's meant for recursive calls only.  Here's its
+  ;; meaning
+
+  ;; If optional argument PREFIX is specified, it should be a key
+  ;; prefix, a string.  Redefined bindings will then be bound to the
+  ;; original key, with PREFIX added at the front.
+  (unless prefix
+    (setq prefix ""))
+  (let* ((scan (or oldmap keymap))
+         (prefix1 (vconcat prefix [nil]))
+         (key-substitution-in-progress
+          (cons scan key-substitution-in-progress)))
+    ;; Scan OLDMAP, finding each char or event-symbol that
+    ;; has any definition, and act on it with hack-key.
+    (map-keymap
+     (lambda (char defn)
+       (aset prefix1 (length prefix) char)
+       (substitute-key-definition-key defn olddef newdef prefix1 keymap))
+     scan)))
+
+(compat-defun keymap-set-after (keymap key definition &optional after) ;; <compat-tests:keymap-set-after>
+  "Add binding in KEYMAP for KEY => DEFINITION, right after AFTER's binding.
+This is like `keymap-set' except that the binding for KEY is placed
+just after the binding for the event AFTER, instead of at the beginning
+of the map.  Note that AFTER must be an event type (like KEY), NOT a command
+\(like DEFINITION).
+
+If AFTER is t or omitted, the new binding goes at the end of the keymap.
+AFTER should be a single event type--a symbol or a character, not a sequence.
+
+Bindings are always added before any inherited map.
+
+The order of bindings in a keymap matters only when it is used as
+a menu, so this function is not useful for non-menu keymaps."
+  (keymap--check key)
+  (when (eq after t) (setq after nil)) ; nil and t are treated the same
+  (when (stringp after)
+    (keymap--check after)
+    (setq after (key-parse after)))
+  ;; If we're binding this key to another key, then parse that other
+  ;; key, too.
+  (when (stringp definition)
+    (keymap--check definition)
+    (setq definition (key-parse definition)))
+  (define-key-after keymap (key-parse key) definition
+    after))
+
+(compat-defun keymap-lookup ;; <compat-tests:keymap-lookup>
+    (keymap key &optional accept-default no-remap position)
+  "Return the binding for command KEY.
+KEY is a string that satisfies `key-valid-p'.
+
+If KEYMAP is nil, look up in the current keymaps.  If non-nil, it
+should either be a keymap or a list of keymaps, and only these
+keymap(s) will be consulted.
+
+The binding is probably a symbol with a function definition.
+
+Normally, `keymap-lookup' ignores bindings for t, which act as
+default bindings, used when nothing else in the keymap applies;
+this makes it usable as a general function for probing keymaps.
+However, if the optional second argument ACCEPT-DEFAULT is
+non-nil, `keymap-lookup' does recognize the default bindings,
+just as `read-key-sequence' does.
+
+Like the normal command loop, `keymap-lookup' will remap the
+command resulting from looking up KEY by looking up the command
+in the current keymaps.  However, if the optional third argument
+NO-REMAP is non-nil, `keymap-lookup' returns the unmapped
+command.
+
+If KEY is a key sequence initiated with the mouse, the used keymaps
+will depend on the clicked mouse position with regard to the buffer
+and possible local keymaps on strings.
+
+If the optional argument POSITION is non-nil, it specifies a mouse
+position as returned by `event-start' and `event-end', and the lookup
+occurs in the keymaps associated with it instead of KEY.  It can also
+be a number or marker, in which case the keymap properties at the
+specified buffer position instead of point are used."
+  (keymap--check key)
+  (when (and keymap position)
+    (error "Can't pass in both keymap and position"))
+  (if keymap
+      (let ((value (lookup-key keymap (key-parse key) accept-default)))
+        (if (and (not no-remap)
+                   (symbolp value))
+            (or (command-remapping value) value)
+          value))
+    (key-binding (key-parse key) accept-default no-remap position)))
+
+(compat-defun keymap-local-lookup (keys &optional accept-default) ;; <compat-tests:keymap-local-lookup>
+  "Return the binding for command KEYS in current local keymap only.
+KEY is a string that satisfies `key-valid-p'.
+
+The binding is probably a symbol with a function definition.
+
+If optional argument ACCEPT-DEFAULT is non-nil, recognize default
+bindings; see the description of `keymap-lookup' for more details
+about this."
+  (when-let ((map (current-local-map)))
+    (keymap-lookup map keys accept-default)))
+
+(compat-defun keymap-global-lookup (keys &optional accept-default _message) ;; <compat-tests:keymap-global-lookup>
+  "Return the binding for command KEYS in current global keymap only.
+KEY is a string that satisfies `key-valid-p'.
+
+The binding is probably a symbol with a function definition.
+This function's return values are the same as those of `keymap-lookup'
+\(which see).
+
+If optional argument ACCEPT-DEFAULT is non-nil, recognize default
+bindings; see the description of `keymap-lookup' for more details
+about this.
+
+NOTE: The compatibility version is not a command."
+  (keymap-lookup (current-global-map) keys accept-default))
+
+(compat-defun define-keymap (&rest definitions) ;; <compat-tests:defvar-keymap>
+  "Create a new keymap and define KEY/DEFINITION pairs as key bindings.
+The new keymap is returned.
+
+Options can be given as keywords before the KEY/DEFINITION
+pairs.  Available keywords are:
+
+:full      If non-nil, create a chartable alist (see `make-keymap').
+             If nil (i.e., the default), create a sparse keymap (see
+             `make-sparse-keymap').
+
+:suppress  If non-nil, the keymap will be suppressed (see `suppress-keymap').
+             If `nodigits', treat digits like other chars.
+
+:parent    If non-nil, this should be a keymap to use as the parent
+             (see `set-keymap-parent').
+
+:keymap    If non-nil, instead of creating a new keymap, the given keymap
+             will be destructively modified instead.
+
+:name      If non-nil, this should be a string to use as the menu for
+             the keymap in case you use it as a menu with `x-popup-menu'.
+
+:prefix    If non-nil, this should be a symbol to be used as a prefix
+             command (see `define-prefix-command').  If this is the case,
+             this symbol is returned instead of the map itself.
+
+KEY/DEFINITION pairs are as KEY and DEF in `keymap-set'.  KEY can
+also be the special symbol `:menu', in which case DEFINITION
+should be a MENU form as accepted by `easy-menu-define'.
+
+\(fn &key FULL PARENT SUPPRESS NAME PREFIX KEYMAP &rest [KEY DEFINITION]...)"
+  (declare (indent defun))
+  (let (full suppress parent name prefix keymap)
+    ;; Handle keywords.
+    (while (and definitions
+                (keywordp (car definitions))
+                (not (eq (car definitions) :menu)))
+      (let ((keyword (pop definitions)))
+        (unless definitions
+          (error "Missing keyword value for %s" keyword))
+        (let ((value (pop definitions)))
+          (pcase keyword
+            (:full (setq full value))
+            (:keymap (setq keymap value))
+            (:parent (setq parent value))
+            (:suppress (setq suppress value))
+            (:name (setq name value))
+            (:prefix (setq prefix value))
+            (_ (error "Invalid keyword: %s" keyword))))))
+
+    (when (and prefix
+               (or full parent suppress keymap))
+      (error "A prefix keymap can't be defined with :full/:parent/:suppress/:keymap keywords"))
+
+    (when (and keymap full)
+      (error "Invalid combination: :keymap with :full"))
+
+    (let ((keymap (cond
+                   (keymap keymap)
+                   (prefix (define-prefix-command prefix nil name))
+                   (full (make-keymap name))
+                   (t (make-sparse-keymap name))))
+          seen-keys)
+      (when suppress
+        (suppress-keymap keymap (eq suppress 'nodigits)))
+      (when parent
+        (set-keymap-parent keymap parent))
+
+      ;; Do the bindings.
+      (while definitions
+        (let ((key (pop definitions)))
+          (unless definitions
+            (error "Uneven number of key/definition pairs"))
+          (let ((def (pop definitions)))
+            (if (eq key :menu)
+                (easy-menu-define nil keymap "" def)
+              (if (member key seen-keys)
+                  (error "Duplicate definition for key: %S %s" key keymap)
+                (push key seen-keys))
+              (keymap-set keymap key def)))))
+      keymap)))
+
+(compat-defmacro defvar-keymap (variable-name &rest defs) ;; <compat-tests:defvar-keymap>
+  "Define VARIABLE-NAME as a variable with a keymap definition.
+See `define-keymap' for an explanation of the keywords and KEY/DEFINITION.
+
+In addition to the keywords accepted by `define-keymap', this
+macro also accepts a `:doc' keyword, which (if present) is used
+as the variable documentation string.
+
+The `:repeat' keyword can also be specified; it controls the
+`repeat-mode' behavior of the bindings in the keymap.  When it is
+non-nil, all commands in the map will have the `repeat-map'
+symbol property.
+
+More control is available over which commands are repeatable; the
+value can also be a property list with properties `:enter' and
+`:exit', for example:
+
+     :repeat (:enter (commands ...) :exit (commands ...))
+
+`:enter' specifies the list of additional commands that only
+enter `repeat-mode'.  When the list is empty, then only the
+commands defined in the map enter `repeat-mode'.  Specifying a
+list of commands is useful when there are commands that have the
+`repeat-map' symbol property, but don't exist in this specific
+map.
+
+`:exit' is a list of commands that exit `repeat-mode'.  When the
+list is empty, no commands in the map exit `repeat-mode'.
+Specifying a list of commands is useful when those commands exist
+in this specific map, but should not have the `repeat-map' symbol
+property.
+
+\(fn VARIABLE-NAME &key DOC FULL PARENT SUPPRESS NAME PREFIX KEYMAP REPEAT &rest [KEY DEFINITION]...)"
+  (declare (indent 1))
+  (let ((opts nil)
+        doc repeat props)
+    (while (and defs
+                (keywordp (car defs))
+                (not (eq (car defs) :menu)))
+      (let ((keyword (pop defs)))
+        (unless defs
+          (error "Uneven number of keywords"))
+        (cond
+         ((eq keyword :doc) (setq doc (pop defs)))
+         ((eq keyword :repeat) (setq repeat (pop defs)))
+         (t (push keyword opts)
+            (push (pop defs) opts)))))
+    (unless (zerop (% (length defs) 2))
+      (error "Uneven number of key/definition pairs: %s" defs))
+
+    (let ((defs defs)
+          key seen-keys)
+      (while defs
+        (setq key (pop defs))
+        (pop defs)
+        (unless (eq key :menu)
+          (if (member key seen-keys)
+              (error "Duplicate definition for key '%s' in keymap '%s'"
+                     key variable-name)
+            (push key seen-keys)))))
+
+    (when repeat
+      (let ((defs defs)
+            def)
+        (dolist (def (plist-get repeat :enter))
+          (push `(put ',def 'repeat-map ',variable-name) props))
+        (while defs
+          (pop defs)
+          (setq def (pop defs))
+          (when (and (memq (car def) '(function quote))
+                     (not (memq (cadr def) (plist-get repeat :exit))))
+            (push `(put ,def 'repeat-map ',variable-name) props)))))
+
+    (let ((defvar-form
+           `(defvar ,variable-name
+              (define-keymap ,@(nreverse opts) ,@defs)
+              ,@(and doc (list doc)))))
+      (if props
+          `(progn
+             ,defvar-form
+             ,@(nreverse props))
+        defvar-form))))
+
+;;;; Defined in keymap.c
+
+(compat-defun define-key (keymap key def &optional remove) ;; <compat-tests:define-key>
+  "Handle optional argument REMOVE."
+  :extended t
+  (if (not remove)
+      (define-key keymap key def)
+    ;; Canonicalize key
+    (setq key (key-parse (key-description key)))
+    (define-key keymap key nil)
+    ;; Split M-key in ESC key
+    (setq key (mapcan (lambda (k)
+                        (if (and (integerp k) (/= (logand k ?\M-\0) 0))
+                            (list ?\e (logxor k ?\M-\0))
+                          (list k)))
+                      key))
+    ;; Delete single keys directly
+    (if (length= key 1)
+        (delete key keymap)
+      ;; Lookup submap and delete key from there
+      (let ((submap (lookup-key keymap (vconcat (butlast key)))))
+        (unless (keymapp submap)
+          (error "Not a keymap for %s" key))
+        (when (symbolp submap)
+          (setq submap (symbol-function submap)))
+        (delete (last key) submap)))
+    def))
+
+;;;; Defined in help.el
+
+(compat-defun substitute-quotes (string) ;; <compat-tests:substitute-quotes>
+  "Substitute quote characters for display.
+Each grave accent \\=` is replaced by left quote, and each
+apostrophe \\=' is replaced by right quote.  Left and right quote
+characters are specified by `text-quoting-style'."
+  (cond ((eq (text-quoting-style) 'curve)
+         (string-replace "`" "‘"
+                         (string-replace "'" "’" string)))
+        ((eq (text-quoting-style) 'straight)
+         (string-replace "`" "'" string))
+        (t string)))
+
+;;;; Defined in button.el
+
+(compat-defun button--properties (callback data help-echo) ;; <compat-tests:buttonize>
+  "Helper function."
+  (list 'font-lock-face 'button
+        'mouse-face 'highlight
+        'help-echo help-echo
+        'button t
+        'follow-link t
+        'category t
+        'button-data data
+        'keymap button-map
+        'action callback))
+
+(compat-defun buttonize (string callback &optional data help-echo) ;; <compat-tests:buttonize>
+  "Make STRING into a button and return it.
+When clicked, CALLBACK will be called with the DATA as the
+function argument.  If DATA isn't present (or is nil), the button
+itself will be used instead as the function argument.
+
+If HELP-ECHO, use that as the `help-echo' property.
+
+Also see `buttonize-region'."
+  (let ((string
+         (apply #'propertize string
+                (button--properties callback data help-echo))))
+    ;; Add the face to the end so that it can be overridden.
+    (add-face-text-property 0 (length string) 'button t string)
+    string))
+
+(compat-defun buttonize-region (start end callback &optional data help-echo) ;; <compat-tests:buttonize-region>
+  "Make the region between START and END into a button.
+When clicked, CALLBACK will be called with the DATA as the
+function argument.  If DATA isn't present (or is nil), the button
+itself will be used instead as the function argument.
+
+If HELP-ECHO, use that as the `help-echo' property.
+
+Also see `buttonize'."
+  (add-text-properties start end (button--properties callback data help-echo))
+  (add-face-text-property start end 'button t))
+
+;;;; Defined in rmc.el
+
+(compat-defun read-multiple-choice  ;; <compat-tests:read-multiple-choice>
+    (prompt choices &optional _help-str _show-help long-form)
+    "Handle LONG-FORM argument."
+  :extended t
+  (if (not long-form)
+      (read-multiple-choice prompt choices)
+    (let ((answer
+           (completing-read
+            (concat prompt " ("
+                    (mapconcat #'identity (mapcar #'cadr choices) "/")
+                    ") ")
+            (mapcar #'cadr choices) nil t)))
+      (catch 'found
+        (dolist (c choices)
+          (when (equal answer (cadr c))
+            (throw 'found c)))))))
+
+;;;; Defined in paragraphs.el
+
+(compat-defun count-sentences (start end) ;; <compat-tests:count-sentences>
+  "Count sentences in current buffer from START to END."
+  (let ((sentences 0)
+        (inhibit-field-text-motion t))
+    (save-excursion
+      (save-restriction
+        (narrow-to-region start end)
+        (goto-char (point-min))
+        (while (ignore-errors (forward-sentence))
+          (setq sentences (1+ sentences)))
+        (when (/= (skip-chars-backward " \t\n") 0)
+          (setq sentences (1- sentences)))
+        sentences))))
+
+;;;; Defined in cl-lib.el
+
+(compat-defun cl-constantly (value) ;; <compat-tests:cl-constantly>
+  "Return a function that takes any number of arguments, but returns VALUE."
+  :feature cl-lib
+  (lambda (&rest _) value))
+
+;;;; Defined in cl-macs.el
+
+(compat-defmacro cl-with-gensyms (names &rest body) ;; <compat-tests:cl-with-gensyms>
+  "Bind each of NAMES to an uninterned symbol and evaluate BODY."
+  ;; No :feature since macro is autoloaded
+  (declare (debug (sexp body)) (indent 1))
+  `(let ,(cl-loop for name in names collect
+                  `(,name (gensym (symbol-name ',name))))
+     ,@body))
+
+(compat-defmacro cl-once-only (names &rest body) ;; <compat-tests:cl-once-only>
+  "Generate code to evaluate each of NAMES just once in BODY.
+
+This macro helps with writing other macros.  Each of names is
+either (NAME FORM) or NAME, which latter means (NAME NAME).
+During macroexpansion, each NAME is bound to an uninterned
+symbol.  The expansion evaluates each FORM and binds it to the
+corresponding uninterned symbol.
+
+For example, consider this macro:
+
+    (defmacro my-cons (x)
+      (cl-once-only (x)
+        \\=`(cons ,x ,x)))
+
+The call (my-cons (pop y)) will expand to something like this:
+
+    (let ((g1 (pop y)))
+      (cons g1 g1))
+
+The use of `cl-once-only' ensures that the pop is performed only
+once, as intended.
+
+See also `macroexp-let2'."
+  ;; No :feature since macro is autoloaded
+  (declare (debug (sexp body)) (indent 1))
+  (setq names (mapcar #'ensure-list names))
+  (let ((our-gensyms (cl-loop for _ in names collect (gensym))))
+    `(let ,(cl-loop for sym in our-gensyms collect `(,sym (gensym)))
+       `(let ,(list
+               ,@(cl-loop for name in names for gensym in our-gensyms
+                          for to-eval = (or (cadr name) (car name))
+                          collect ``(,,gensym ,,to-eval)))
+          ,(let ,(cl-loop for name in names for gensym in our-gensyms
+                          collect `(,(car name) ,gensym))
+             ,@body)))))
+
+;;;; Defined in ert-x.el
+
+(compat-defmacro ert-with-temp-file (name &rest body) ;; <compat-tests:ert-with-temp-file>
+  "Bind NAME to the name of a new temporary file and evaluate BODY.
+Delete the temporary file after BODY exits normally or
+non-locally.  NAME will be bound to the file name of the temporary
+file.
+
+The following keyword arguments are supported:
+
+:prefix STRING  If non-nil, pass STRING to `make-temp-file' as
+                the PREFIX argument.  Otherwise, use the value of
+                `ert-temp-file-prefix'.
+
+:suffix STRING  If non-nil, pass STRING to `make-temp-file' as the
+                SUFFIX argument.  Otherwise, use the value of
+                `ert-temp-file-suffix'; if the value of that
+                variable is nil, generate a suffix based on the
+                name of the file that `ert-with-temp-file' is
+                called from.
+
+:text STRING    If non-nil, pass STRING to `make-temp-file' as
+                the TEXT argument.
+
+:buffer SYMBOL  Open the temporary file using `find-file-noselect'
+                and bind SYMBOL to the buffer.  Kill the buffer
+                after BODY exits normally or non-locally.
+
+:coding CODING  If non-nil, bind `coding-system-for-write' to CODING
+                when executing BODY.  This is handy when STRING includes
+                non-ASCII characters or the temporary file must have a
+                specific encoding or end-of-line format.
+
+See also `ert-with-temp-directory'."
+  :feature ert-x
+  (declare (indent 1) (debug (symbolp body)))
+  (cl-check-type name symbol)
+  (let (keyw prefix suffix directory text extra-keywords buffer coding)
+    (while (keywordp (setq keyw (car body)))
+      (setq body (cdr body))
+      (pcase keyw
+        (:prefix (setq prefix (pop body)))
+        (:suffix (setq suffix (pop body)))
+        ;; This is only for internal use by `ert-with-temp-directory'
+        ;; and is therefore not documented.
+        (:directory (setq directory (pop body)))
+        (:text (setq text (pop body)))
+        (:buffer (setq buffer (pop body)))
+        (:coding (setq coding (pop body)))
+        (_ (push keyw extra-keywords) (pop body))))
+    (when extra-keywords
+      (error "Invalid keywords: %s" (mapconcat #'symbol-name extra-keywords " ")))
+    (let ((temp-file (make-symbol "temp-file"))
+          (prefix (or prefix "emacs-test-"))
+          (suffix (or suffix
+                      (thread-last
+                        (file-name-base (or (macroexp-file-name) buffer-file-name))
+                        (replace-regexp-in-string (rx string-start
+                                                      (group (+? not-newline))
+                                                      (regexp "-?tests?")
+                                                      string-end)
+                                                  "\\1")
+                        (concat "-")))))
+      `(let* ((coding-system-for-write ,(or coding coding-system-for-write))
+              (,temp-file (,(if directory 'file-name-as-directory 'identity)
+                           (,(if (fboundp 'compat--make-temp-file)
+                                 'compat--make-temp-file 'make-temp-file)
+                            ,prefix ,directory ,suffix ,text)))
+              (,name ,(if directory
+                          `(file-name-as-directory ,temp-file)
+                        temp-file))
+              ,@(when buffer
+                  (list `(,buffer (find-file-literally ,temp-file)))))
+         (unwind-protect
+             (progn ,@body)
+           (ignore-errors
+             ,@(when buffer
+                 (list `(with-current-buffer ,buffer
+                          (set-buffer-modified-p nil))
+                       `(kill-buffer ,buffer))))
+           (ignore-errors
+             ,(if directory
+                  `(delete-directory ,temp-file :recursive)
+                `(delete-file ,temp-file))))))))
+
+(compat-defmacro ert-with-temp-directory (name &rest body) ;; <compat-tests:ert-with-temp-directory>
+  "Bind NAME to the name of a new temporary directory and evaluate BODY.
+Delete the temporary directory after BODY exits normally or
+non-locally.
+
+NAME is bound to the directory name, not the directory file
+name.  (In other words, it will end with the directory delimiter;
+on Unix-like systems, it will end with \"/\".)
+
+The same keyword arguments are supported as in
+`ert-with-temp-file' (which see), except for :text."
+  :feature ert-x
+  (declare (indent 1) (debug (symbolp body)))
+  (let ((tail body) keyw)
+    (while (keywordp (setq keyw (car tail)))
+      (setq tail (cddr tail))
+      (pcase keyw (:text (error "Invalid keyword for directory: :text")))))
+  `(ert-with-temp-file ,name
+     :directory t
+     ,@body))
+
+;;;; Defined in wid-edit.el
+
+(compat-guard (not (fboundp 'widget-key-validate)) ;; <compat-tests:widget-key>
+  :feature wid-edit
+  (defvar widget-key-prompt-value-history nil
+    "History of input to `widget-key-prompt-value'.")
+  (define-widget 'key 'editable-field
+    "A key sequence."
+    :prompt-value 'widget-field-prompt-value
+    :match 'widget-key-valid-p
+    :format "%{%t%}: %v"
+    :validate 'widget-key-validate
+    :keymap widget-key-sequence-map
+    :help-echo "C-q: insert KEY, EVENT, or CODE; RET: enter value"
+    :tag "Key")
+  (defun widget-key-valid-p (_widget value)
+    (key-valid-p value))
+  (defun widget-key-validate (widget)
+    (unless (and (stringp (widget-value widget))
+                 (key-valid-p (widget-value widget)))
+      (widget-put widget :error (format "Invalid key: %S"
+                                        (widget-value widget)))
+      widget)))
+
+(provide 'compat-29)
+;;; compat-29.el ends here
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-29.elc b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-29.elc
new file mode 100644
index 0000000..56e37d6
Binary files /dev/null and b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-29.elc differ
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-30.el b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-30.el
new file mode 100644
index 0000000..a3c9dcd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-30.el
@@ -0,0 +1,460 @@
+;;; compat-30.el --- Functionality added in Emacs 30 -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023-2026 Free Software Foundation, Inc.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Functionality added in Emacs 30, needed by older Emacs versions.
+
+;;; Code:
+
+(eval-when-compile (load "compat-macs.el" nil t t))
+(compat-require compat-29 "29.1")
+
+(compat-version "29.3")
+(compat-defvar untrusted-content nil ;; <compat-tests:untrusted-content>
+  "Non-nil means that current buffer originated from an untrusted source.
+Email clients and some other modes may set this non-nil to mark the
+buffer contents as untrusted.
+
+This variable might be subject to change without notice."
+  :local permanent)
+
+(compat-version "30.1")
+
+;;;; Defined in lread.c
+
+(compat-defun obarray-clear (ob) ;; <compat-tests:obarray-clear>
+  "Remove all symbols from obarray OB."
+  (fillarray ob 0))
+
+;;;; Defined in buffer.c
+
+(compat-defun find-buffer (variable value) ;; <compat-tests:find-buffer>
+  "Return the buffer with buffer-local VARIABLE equal to VALUE.
+If there is no such live buffer, return nil."
+  (cl-loop for buffer the buffers
+           if (equal (buffer-local-value variable buffer) value)
+           return buffer))
+
+(compat-defun get-truename-buffer (filename) ;; <compat-tests:get-truename-buffer>
+  "Return the buffer with `file-truename' equal to FILENAME (a string).
+If there is no such live buffer, return nil.
+See also `find-buffer-visiting'."
+  (find-buffer 'buffer-file-truename filename))
+
+;;;; Defined in files.el
+
+(compat-defvar trusted-content nil ;; <compat-tests:trusted-content>
+  "List of files and directories whose content we trust.
+Be extra careful here since trusting means that Emacs might execute the
+code contained within those files and directories without an explicit
+request by the user.
+One important case when this might happen is when `flymake-mode' is
+enabled (for example, when it is added to a mode hook).
+Each element of the list should be a string:
+- If it ends in \"/\", it is considered as a directory name and means that
+  Emacs should trust all the files whose name has this directory as a prefix.
+- else it is considered as a file name.
+Use abbreviated file names.  For example, an entry \"~/mycode\" means
+that Emacs will trust all the files in your directory \"mycode\".
+This variable can also be set to `:all', in which case Emacs will trust
+all files, which opens a gaping security hole."
+  :risky t)
+
+(compat-defun trusted-content-p () ;; <compat-tests:trusted-content-p>
+  "Return non-nil if we trust the contents of the current buffer.
+Here, \"trust\" means that we are willing to run code found inside of it.
+See also `trusted-content'."
+  (and (not untrusted-content)
+       (or
+        (eq trusted-content :all)
+        (and
+         buffer-file-truename
+         (with-demoted-errors "trusted-content-p: %S"
+           (let ((exists (file-exists-p buffer-file-truename)))
+             (or
+              (if (and exists user-init-file)
+                  (file-equal-p buffer-file-truename user-init-file)
+                (equal buffer-file-truename user-init-file))
+              (let ((file (abbreviate-file-name buffer-file-truename))
+                    (trusted nil))
+                (dolist (tf trusted-content)
+                  (when (or (if exists (file-equal-p tf file) (equal tf file))
+                            (and (string-suffix-p "/" tf)
+                                 (string-prefix-p tf file)))
+                    (setq trusted t)))
+                trusted))))))))
+
+(compat-defun require-with-check (feature &optional filename noerror) ;; <compat-tests:require-with-check>
+  "If FEATURE is not already loaded, load it from FILENAME.
+This is like `require' except if FEATURE is already a member of the list
+`features’, then check if it was provided by a different file than the
+one that is about to be loaded now (presumably because `load-path' has
+been changed since FILENAME was loaded).  If that is the case, either
+signal an error (the default), or forcibly reload the new file (if
+NOERROR is equal to `reload'), or otherwise emit a warning."
+  (let ((lh load-history)
+        (res (require feature filename (if (eq noerror 'reload) nil noerror))))
+    ;; If the `feature' was not yet provided, `require' just loaded the right
+    ;; file, so we're done.
+    (when (and res (eq lh load-history))
+      ;; If `require' did nothing, we need to make sure that was warranted.
+      (let* ((fn (locate-file (or filename (symbol-name feature))
+                              load-path (get-load-suffixes) nil
+                              )) ;; load-prefer-newer
+             ;; We used to look for `fn' in `load-history' with `assoc'
+             ;; which works in most cases, but in some cases (e.g. when
+             ;; `load-prefer-newer' is set) `locate-file' can return a
+             ;; different file than the file that `require' would load,
+             ;; so the file won't be found in `load-history' even though
+             ;; we did load "it".  (bug#74040)
+             ;; So use a "permissive" search which doesn't pay attention to
+             ;; differences between file extensions.
+             (prefix (if (string-match
+                          (concat (regexp-opt (get-load-suffixes)) "\\'") fn)
+                         (concat (substring fn 0 (match-beginning 0)) ".")
+                       fn))
+             (lh load-history))
+        (while (and lh (let ((file (car-safe (car lh))))
+                         (not (and file (string-prefix-p prefix file)))))
+          (setq lh (cdr lh)))
+        (cond
+         (lh nil)                       ;We loaded the right file.
+         ((eq noerror 'reload) (load fn nil 'nomessage))
+         ((and fn (memq feature features))
+          (funcall (if noerror #'warn #'error)
+                   "Feature `%S' is now provided by a different file %s"
+                   feature fn))
+         (fn
+          (funcall (if noerror #'warn #'error)
+                   "Could not load file %s" fn))
+         (t
+          (funcall (if noerror #'warn #'error)
+                   "Could not locate file %s in load path"
+                   (or filename (symbol-name feature)))))))
+    res))
+
+;;;; Defined in minibuffer.el
+
+(compat-defun completion--metadata-get-1 (metadata prop) ;; <compat-tests:completion-metadata-get>
+  "Helper function.
+See for `completion-metadata-get' for METADATA and PROP arguments."
+  (or (alist-get prop metadata)
+      (plist-get completion-extra-properties
+                 (or (get prop 'completion-extra-properties--keyword)
+                     (put prop 'completion-extra-properties--keyword
+                          (intern (concat ":" (symbol-name prop))))))))
+
+(compat-defun completion-metadata-get (metadata prop) ;; <compat-tests:completion-metadata-get>
+  "Get property PROP from completion METADATA.
+If the metadata specifies a completion category, the variables
+`completion-category-overrides' and
+`completion-category-defaults' take precedence for
+category-specific overrides.  If the completion metadata does not
+specify the property, the `completion-extra-properties' plist is
+consulted.  Note that the keys of the
+`completion-extra-properties' plist are keyword symbols, not
+plain symbols."
+  :extended t
+  (if-let ((cat (and (not (eq prop 'category))
+                     (completion--metadata-get-1 metadata 'category)))
+           (over (completion--category-override cat prop)))
+      (cdr over)
+    (completion--metadata-get-1 metadata prop)))
+
+(compat-defvar completion-lazy-hilit nil ;; <compat-tests:completion-lazy-hilit>
+  "If non-nil, request lazy highlighting of completion candidates.
+
+Lisp programs (a.k.a. \"front ends\") that present completion
+candidates may opt to bind this variable to a non-nil value when
+calling functions (such as `completion-all-completions') which
+produce completion candidates.  This tells the underlying
+completion styles that they do not need to fontify (i.e.,
+propertize with the `face' property) completion candidates in a
+way that highlights the matching parts.  Then it is the front end
+which presents the candidates that becomes responsible for this
+fontification.  The front end does that by calling the function
+`completion-lazy-hilit' on each completion candidate that is to be
+displayed to the user.
+
+Note that only some completion styles take advantage of this
+variable for optimization purposes.  Other styles will ignore the
+hint and fontify eagerly as usual.  It is still safe for a
+front end to call `completion-lazy-hilit' in these situations.
+
+To author a completion style that takes advantage of this variable,
+see `completion-lazy-hilit-fn' and `completion-pcm--hilit-commonality'.")
+
+(compat-defvar completion-lazy-hilit-fn nil ;; <compat-tests:completion-lazy-hilit>
+  "Fontification function set by lazy-highlighting completions styles.
+When a given style wants to enable support for `completion-lazy-hilit'
+\(which see), that style should set this variable to a function of one
+argument.  It will be called with each completion candidate, a string, to
+be displayed to the user, and should destructively propertize these
+strings with the `face' property.")
+
+(compat-defun completion-lazy-hilit (str) ;; <compat-tests:completion-lazy-hilit>
+  "Return a copy of completion candidate STR that is `face'-propertized.
+See documentation of the variable `completion-lazy-hilit' for more
+details."
+  (if (and completion-lazy-hilit completion-lazy-hilit-fn)
+      (funcall completion-lazy-hilit-fn (copy-sequence str))
+    str))
+
+;;;; Defined in color.el
+
+(compat-defun color-oklab-to-xyz (l a b) ;; <compat-tests:color-oklab-to-xyz>
+  "Convert the OkLab color represented by L A B to CIE XYZ.
+Oklab is a perceptual color space created by Björn Ottosson
+<https://bottosson.github.io/posts/oklab/>.  It has the property that
+changes in the hue and saturation of a color can be made while maintaining
+the same perceived lightness."
+  :feature color
+  (let ((ll (expt (+ (* 1.0 l) (* 0.39633779 a) (* 0.21580376 b)) 3))
+        (mm (expt (+ (* 1.00000001 l) (* -0.10556134 a) (* -0.06385417 b)) 3))
+        (ss (expt (+ (* 1.00000005 l) (* -0.08948418 a) (* -1.29148554 b)) 3)))
+    (list (+ (* ll 1.22701385) (* mm -0.55779998) (* ss 0.28125615))
+          (+ (* ll -0.04058018) (* mm 1.11225687) (* ss -0.07167668))
+          (+ (* ll -0.07638128) (* mm -0.42148198) (* ss 1.58616322)))))
+
+(compat-defun color-xyz-to-oklab (x y z) ;; <compat-tests:color-xyz-to-oklab>
+  "Convert the CIE XYZ color represented by X Y Z to Oklab."
+  :feature color
+  (let ((ll (+ (* x 0.8189330101) (* y 0.3618667424) (* z -0.1288597137)))
+        (mm (+ (* x 0.0329845436) (* y 0.9293118715) (* z 0.0361456387)))
+        (ss (+ (* x 0.0482003018) (* y 0.2643662691) (* z 0.6338517070))))
+    (let*
+        ((cube-root (lambda (f)
+                      (if (< f 0)
+                          (- (expt (- f) (/ 1.0 3.0)))
+                        (expt f (/ 1.0 3.0)))))
+         (lll (funcall cube-root ll))
+         (mmm (funcall cube-root mm))
+         (sss (funcall cube-root ss)))
+      (list (+ (* lll 0.2104542553) (* mmm 0.7936177850) (* sss -0.0040720468))
+            (+ (* lll 1.9779984951) (* mmm -2.4285922050) (* sss 0.4505937099))
+            (+ (* lll 0.0259040371) (* mmm 0.7827717662) (* sss -0.8086757660))))))
+
+(compat-defun color-oklab-to-srgb (l a b) ;; <compat-tests:color-oklab-to-srgb>
+  "Convert the Oklab color represented by L A B to sRGB."
+  :feature color
+  (apply #'color-xyz-to-srgb (color-oklab-to-xyz l a b)))
+
+(compat-defun color-srgb-to-oklab (r g b) ;; <compat-tests:color-srgb-to-oklab>
+  "Convert the sRGB color R G B to Oklab."
+  :feature color
+  (apply #'color-xyz-to-oklab (color-srgb-to-xyz r g b)))
+
+;;;; Defined in subr.el
+
+(compat-defmacro static-if (condition then-form &rest else-forms) ;; <compat-tests:static-if>
+  "A conditional compilation macro.
+Evaluate CONDITION at macro-expansion time.  If it is non-nil,
+expand the macro to THEN-FORM.  Otherwise expand it to ELSE-FORMS
+enclosed in a `progn' form.  ELSE-FORMS may be empty."
+  (declare (indent 2) (debug (sexp sexp &rest sexp)))
+  (if (eval condition lexical-binding)
+      then-form
+    (cons 'progn else-forms)))
+
+(compat-defun closurep (object) ;; <compat-tests:closurep>
+  "Return t if OBJECT is a function of type closure."
+  (declare (side-effect-free error-free))
+  (eq (car-safe object) 'closure))
+
+(compat-defalias interpreted-function-p closurep) ;; <compat-tests:closurep>
+
+(compat-defun primitive-function-p (object) ;; <compat-tests:primitive-function-p>
+  "Return t if OBJECT is a built-in primitive function.
+This excludes special forms, since they are not functions."
+  (declare (side-effect-free error-free))
+  (and (subrp object)
+       (not (or (with-no-warnings (subr-native-elisp-p object))
+                (special-form-p object)))))
+
+(compat-defalias drop nthcdr) ;; <compat-tests:drop>
+
+(compat-defun merge-ordered-lists (lists &optional error-function) ;; <compat-tests:merge-ordered-lists>
+  "Merge LISTS in a consistent order.
+LISTS is a list of lists of elements.
+Merge them into a single list containing the same elements (removing
+duplicates), obeying their relative positions in each list.
+The order of the (sub)lists determines the final order in those cases where
+the order within the sublists does not impose a unique choice.
+Equality of elements is tested with `eql'.
+
+If a consistent order does not exist, call ERROR-FUNCTION with
+a remaining list of lists that we do not know how to merge.
+It should return the candidate to use to continue the merge, which
+has to be the head of one of the lists.
+By default we choose the head of the first list."
+  (let ((result '()))
+    (setq lists (remq nil lists))
+    (while (cdr (setq lists (delq nil lists)))
+      (let* ((next nil)
+             (tail lists))
+        (while tail
+          (let ((candidate (caar tail))
+                (other-lists lists))
+            (while other-lists
+              (if (not (memql candidate (cdr (car other-lists))))
+                  (setq other-lists (cdr other-lists))
+                (setq candidate nil)
+                (setq other-lists nil)))
+            (if (not candidate)
+                (setq tail (cdr tail))
+              (setq next candidate)
+              (setq tail nil))))
+        (unless next
+          (setq next (funcall (or error-function #'caar) lists))
+          (unless (funcall
+                   (eval-when-compile (if (fboundp 'compat--assoc) 'compat--assoc 'assoc))
+                   next lists #'eql)
+            (error "Invalid candidate returned by error-function: %S" next)))
+        (push next result)
+        (setq lists
+              (mapcar (lambda (l) (if (eql (car l) next) (cdr l) l))
+                      lists))))
+    (if (null result) (car lists)
+      (append (nreverse result) (car lists)))))
+
+(compat-defun copy-tree (tree &optional vectors-and-records) ;; <compat-tests:copy-tree>
+  "Handle copying records when optional arg is non-nil."
+  :extended t
+  (declare (side-effect-free error-free))
+  (if (fboundp 'recordp)
+      (if (consp tree)
+          (let (result)
+            (while (consp tree)
+              (let ((newcar (car tree)))
+                (if (or (consp (car tree))
+                        (and vectors-and-records
+                             (or (vectorp (car tree)) (recordp (car tree)))))
+                    (setq newcar (compat--copy-tree (car tree) vectors-and-records)))
+                (push newcar result))
+              (setq tree (cdr tree)))
+            (nconc (nreverse result)
+                   (if (and vectors-and-records (or (vectorp tree) (recordp tree)))
+                       (compat--copy-tree tree vectors-and-records)
+                     tree)))
+        (if (and vectors-and-records (or (vectorp tree) (recordp tree)))
+            (let ((i (length (setq tree (copy-sequence tree)))))
+              (while (>= (setq i (1- i)) 0)
+                (aset tree i (compat--copy-tree (aref tree i) vectors-and-records)))
+              tree)
+          tree))
+    (copy-tree tree vectors-and-records)))
+
+;;;; Defined in fns.c
+
+(compat-defun value< (a b) ;; <compat-tests:value<>
+  "Return non-nil if A precedes B in standard value order.
+A and B must have the same basic type.
+Numbers are compared with <.
+Strings and symbols are compared with string-lessp.
+Lists, vectors, bool-vectors and records are compared lexicographically.
+Markers are compared lexicographically by buffer and position.
+Buffers and processes are compared by name.
+Other types are considered unordered and the return value will be ‘nil’."
+  (cond
+   ((or (and (numberp a) (numberp b))
+        (and (markerp a) (markerp b)))
+    (< a b))
+   ((or (and (stringp a) (stringp b))
+        (and (symbolp a) (symbolp b)))
+    (string< a b))
+   ((and (listp a) (listp b))
+    (while (and (consp a) (consp b) (equal (car a) (car b)))
+      (setq a (cdr a) b (cdr b)))
+    (cond
+     ((not b) nil)
+     ((not a) t)
+     ((and (consp a) (consp b)) (value< (car a) (car b)))
+     (t (value< a b))))
+   ((and (vectorp a) (vectorp b))
+    (let* ((na (length a))
+           (nb (length b))
+           (n (min na nb))
+           (i 0))
+      (while (and (< i n) (equal (aref a i) (aref b i)))
+        (cl-incf i))
+      (if (< i n) (value< (aref a i) (aref b i)) (< n nb))))
+   ((and (bufferp a) (bufferp b))
+    ;; `buffer-name' is nil for killed buffers.
+    (setq a (buffer-name a)
+          b (buffer-name b))
+    (cond
+     ((and a b) (string< a b))
+     (b t)))
+   ((and (processp a) (processp b))
+    (string< (process-name a) (process-name b)))
+   ;; TODO Add support for more types here.
+   ;; Other values of equal type are considered unordered (return value nil).
+   ((eq (type-of a) (type-of b)) nil)
+   ;; Different types.
+   (t (error "value< type mismatch: %S %S" a b))))
+
+(compat-defun sort (seq &optional lessp &rest rest) ;; <compat-tests:sort>
+  "Sort function with support for keyword arguments.
+The following arguments are defined:
+
+:key FUNC -- FUNC is a function that takes a single element from SEQ and
+  returns the key value to be used in comparison.  If absent or nil,
+  `identity' is used.
+
+:lessp FUNC -- FUNC is a function that takes two arguments and returns
+  non-nil if the first element should come before the second.
+  If absent or nil, `value<' is used.
+
+:reverse BOOL -- if BOOL is non-nil, the sorting order implied by FUNC is
+  reversed.  This does not affect stability: equal elements still retain
+  their order in the input sequence.
+
+:in-place BOOL -- if BOOL is non-nil, SEQ is sorted in-place and returned.
+  Otherwise, a sorted copy of SEQ is returned and SEQ remains unmodified;
+  this is the default.
+
+For compatibility, the calling convention (sort SEQ LESSP) can also be used;
+in this case, sorting is always done in-place."
+  :extended t
+  (let ((in-place t) (reverse nil))
+    (when (or (not lessp) rest)
+      (setq
+       rest (if lessp (cons lessp rest) rest)
+       in-place (plist-get rest :in-place)
+       reverse (plist-get rest :reverse)
+       lessp (let ((key (plist-get rest :key))
+                   (< (or (plist-get rest :lessp) #'value<)))
+               (if key
+                 (lambda (a b) (funcall < (funcall key a) (funcall key b)))
+                 <))
+       seq (if in-place seq (copy-sequence seq))))
+    (if reverse
+        (nreverse (sort (nreverse seq) lessp))
+      (sort seq lessp))))
+
+;;;; Defined in mule-cmds.el
+
+(compat-defun char-to-name (char) ;; <compat-tests:char-to-name>
+  "Return the Unicode name for CHAR, if it has one, else nil.
+Return nil if CHAR is not a character."
+  (and (characterp char)
+       (or (get-char-code-property char 'name)
+           (get-char-code-property char 'old-name))))
+
+(provide 'compat-30)
+;;; compat-30.el ends here
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-30.elc b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-30.elc
new file mode 100644
index 0000000..e257125
Binary files /dev/null and b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-30.elc differ
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-31.el b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-31.el
new file mode 100644
index 0000000..bf9c476
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-31.el
@@ -0,0 +1,416 @@
+;;; compat-31.el --- Functionality added in Emacs 31 -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2025-2026 Free Software Foundation, Inc.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Functionality added in Emacs 31, needed by older Emacs versions.
+
+;;; Code:
+
+(eval-when-compile (load "compat-macs.el" nil t t))
+(compat-require compat-30 "30.1")
+
+;; TODO Update to 31.1 as soon as the Emacs emacs-31 branch version bumped
+(compat-version "31.0.50")
+
+;;;; Defined in subr.el
+
+(compat-defun error-type-p (symbol) ;; <compat-tests:error-api>
+  "Return non-nil if SYMBOL is a condition type."
+  (get symbol 'error-conditions))
+
+(compat-defun error-has-type-p (error condition) ;; <compat-tests:error-api>
+  "Return non-nil if ERROR is of type CONDITION (or a subtype of it)."
+  (unless (let ((type (car-safe error)))
+            (and type (symbolp type) (listp (cdr error))
+                 (error-type-p type)))
+    (signal 'wrong-type-argument (list error)))
+  (or (eq condition t)
+      (memq condition (get (car error) 'error-conditions))))
+
+(compat-defalias error-type car ;; <compat-tests:error-api>
+ "Return the symbol which represents the type of ERROR.
+\n(fn ERROR)")
+
+(compat-defalias error-slot-value elt ;; <compat-tests:error-api>
+  "Access the SLOT of object ERROR.
+Slots are specified by position, and slot 0 is the error symbol.
+\n(fn ERROR SLOT)")
+
+(compat-defun ensure-proper-list (object) ;; <compat-tests:ensure-proper-list>
+  "Return OBJECT as a list.
+If OBJECT is already a proper list, return OBJECT itself.  If it's not a
+proper list, return a one-element list containing OBJECT.
+
+`ensure-list' is usually preferable because that function runs in
+constant time, but this one has to traverse the whole of OBJECT."
+  (declare (side-effect-free error-free))
+  (if (proper-list-p object)
+      object
+    (list object)))
+
+(compat-defun set-local (variable value) ;; <compat-tests:set-local>
+  "Make VARIABLE buffer local and set it to VALUE."
+  (set (make-local-variable variable) value))
+
+(compat-defun take-while (pred list) ;; <compat-tests:take-while>
+  "Return the longest prefix of LIST whose elements satisfy PRED."
+  (let ((r nil))
+    (while (and list (funcall pred (car list)))
+      (push (car list) r)
+      (setq list (cdr list)))
+    (nreverse r)))
+
+(compat-defun drop-while (pred list) ;; <compat-tests:drop-while>
+  "Skip initial elements of LIST satisfying PRED and return the rest."
+  (while (and list (funcall pred (car list)))
+    (setq list (cdr list)))
+  list)
+
+(compat-defun all (pred list) ;; <compat-tests:all>
+  "Non-nil if PRED is true for all elements in LIST."
+  (not (drop-while pred list)))
+
+(compat-defun member-if (pred list) ;; <compat-tests:member-if>
+  "Non-nil if PRED is true for at least one element in LIST.
+Returns the LIST suffix starting at the first element that satisfies PRED,
+or nil if none does."
+  (drop-while (lambda (x) (not (funcall pred x))) list))
+
+(compat-defalias any member-if) ;; <compat-tests:member-if>
+
+(compat-defun hash-table-contains-p (key table) ;; <compat-tests:hash-table-contains-p>
+  "Return non-nil if TABLE has an element with KEY."
+  (declare (side-effect-free t))
+  (let ((missing '#:missing))
+    (not (eq (gethash key table missing) missing))))
+
+(compat-defmacro static-when (condition &rest body) ;; <compat-tests:static-when>
+  "A conditional compilation macro.
+Evaluate CONDITION at macro-expansion time.  If it is non-nil,
+expand the macro to evaluate all BODY forms sequentially and return
+the value of the last one, or nil if there are none."
+  (declare (indent 1) (debug t))
+  (if body
+      (if (eval condition lexical-binding)
+          (cons 'progn body)
+        nil)
+    (macroexp-warn-and-return (format-message "`static-when' with empty body")
+                              (list 'progn nil nil) '(empty-body static-when) t)))
+
+(compat-defmacro static-unless (condition &rest body) ;; <compat-tests:static-unless>
+  "A conditional compilation macro.
+Evaluate CONDITION at macro-expansion time.  If it is nil,
+expand the macro to evaluate all BODY forms sequentially and return
+the value of the last one, or nil if there are none."
+  (declare (indent 1) (debug t))
+  (if body
+      (if (eval condition lexical-binding)
+          nil
+        (cons 'progn body))
+    (macroexp-warn-and-return (format-message "`static-unless' with empty body")
+                              (list 'progn nil nil) '(empty-body static-unless) t)))
+
+(compat-defun oddp (integer) ;; <compat-tests:oddp>
+  "Return t if INTEGER is odd."
+  (not (eq (% integer 2) 0)))
+
+(compat-defun evenp (integer) ;; <compat-tests:evenp>
+  "Return t if INTEGER is even."
+  (eq (% integer 2) 0))
+
+(compat-defun plusp (number) ;; <compat-tests:plusp>
+  "Return t if NUMBER is positive."
+  (> number 0))
+
+(compat-defun minusp (number) ;; <compat-tests:minusp>
+  "Return t if NUMBER is negative."
+  (< number 0))
+
+(compat-defmacro incf (place &optional delta) ;; <compat-tests:incf>
+  "Increment PLACE by DELTA (default to 1).
+
+The DELTA is first added to PLACE, and then stored in PLACE.
+Return the incremented value of PLACE.
+
+See also `decf'."
+  (gv-letplace (getter setter) place
+    (funcall setter `(+ ,getter ,(or delta 1)))))
+
+(compat-defmacro decf (place &optional delta) ;; <compat-tests:decf>
+  "Decrement PLACE by DELTA (default to 1).
+
+The DELTA is first subtracted from PLACE, and then stored in PLACE.
+Return the decremented value of PLACE.
+
+See also `incf'."
+  (gv-letplace (getter setter) place
+    (funcall setter `(- ,getter ,(or delta 1)))))
+
+;;;; Defined in color.el
+
+(compat-defun color-blend (a b &optional alpha) ;; <compat-tests:color-blend>
+  "Blend the two colors A and B in linear space with ALPHA.
+A and B should be lists (RED GREEN BLUE), where each element is
+between 0.0 and 1.0, inclusive.  ALPHA controls the influence A
+has on the result and should be between 0.0 and 1.0, inclusive.
+
+For instance:
+
+   (color-blend \\='(1 0.5 1) \\='(0 0 0) 0.75)
+      => (0.75 0.375 0.75)"
+  (setq alpha (or alpha 0.5))
+  (let (blend)
+    (dotimes (i 3)
+      (push (+ (* (nth i a) alpha) (* (nth i b) (- 1 alpha))) blend))
+    (nreverse blend)))
+
+;;;; Defined in time-date.el
+
+(compat-defvar seconds-to-string ;; <compat-tests:seconds-to-string>
+  (list (list 1 "ms" 0.001)
+        (list 100 "s" 1)
+        (list (* 60 100) "m" 60.0)
+        (list (* 3600 30) "h" 3600.0)
+        (list (* 3600 24 400) "d" (* 3600.0 24.0))
+        (list nil "y" (* 365.25 24 3600)))
+  "Formatting used by the function `seconds-to-string'.")
+
+(compat-defvar seconds-to-string-readable ;; <compat-tests:seconds-to-string>
+  `(("Y" "year"   "years"   ,(round (* 60 60 24 365.2425)))
+    ("M" "month"  "months"  ,(round (* 60 60 24 30.436875)))
+    ("w" "week"   "weeks"   ,(* 60 60 24 7))
+    ("d" "day"    "days"    ,(* 60 60 24))
+    ("h" "hour"   "hours"   ,(* 60 60))
+    ("m" "minute" "minutes" 60)
+    ("s" "second" "seconds" 1))
+  "Formatting used by the function `seconds-to-string' with READABLE set.
+The format is an alist, with string keys ABBREV-UNIT, and elements like:
+
+  (ABBREV-UNIT UNIT UNIT-PLURAL SECS)
+
+where UNIT is a unit of time, ABBREV-UNIT is the abbreviated form of
+UNIT, UNIT-PLURAL is the plural form of UNIT, and SECS is the number of
+seconds per UNIT.")
+
+(compat-defun seconds-to-string (delay &optional readable abbrev precision) ;; <compat-tests:seconds-to-string>
+  "Handle optional arguments READABLE, ABBREV and PRECISION."
+  :extended t
+  (cond
+   ((< delay 0)
+    (concat "-" (compat--seconds-to-string (- delay) readable precision)))
+   (readable
+    (let* ((stsa seconds-to-string-readable)
+           (expanded (eq readable 'expanded))
+           digits
+           (round-to (cond
+                      ((wholenump precision)
+                       (setq digits precision)
+                       (expt 10 (- precision)))
+                      ((and (floatp precision) (< precision 1.))
+                       (setq digits (- (floor (log precision 10))))
+                       precision)
+                      (t (setq digits 0) 1)))
+           (dformat (if (> digits 0) (format "%%0.%df" digits)))
+           (padding (if abbrev "" " "))
+           here cnt cnt-pre here-pre cnt-val isfloatp)
+      (if (= (round delay round-to) 0)
+          (format "0%s" (if abbrev "s" " seconds"))
+        (while (and (setq here (pop stsa)) stsa
+                    (< (/ delay (nth 3 here)) 1)))
+        (or (and
+             expanded stsa 	; smaller unit remains
+             (progn
+               (setq
+                here-pre here here (car stsa)
+                cnt-pre (floor (/ (float delay) (nth 3 here-pre)))
+                cnt (round
+                     (/ (- (float delay) (* cnt-pre (nth 3 here-pre)))
+                        (nth 3 here))
+                     round-to))
+               (if (> cnt 0) t (setq cnt cnt-pre here here-pre here-pre nil))))
+            (setq cnt (round (/ (float delay) (nth 3 here)) round-to)))
+        (setq cnt-val (* cnt round-to)
+              isfloatp (and (> digits 0)
+                            (> (- cnt-val (floor cnt-val)) 0.)))
+        (cl-labels
+            ((unit (val here &optional plural)
+               (cond (abbrev (car here))
+                     ((and (not plural) (<= (floor val) 1)) (nth 1 here))
+                     (t (nth 2 here)))))
+          (concat
+           (when here-pre
+             (concat (number-to-string cnt-pre) padding
+                     (unit cnt-pre here-pre) " "))
+           (if isfloatp (format dformat cnt-val)
+             (number-to-string (floor cnt-val)))
+           padding
+           (unit cnt-val here isfloatp)))))) ; float formats are always plural
+   ((= 0 delay) "0s")
+   (t (let ((sts seconds-to-string) here)
+        (while (and (car (setq here (pop sts)))
+                    (<= (car here) delay)))
+        (concat (format "%.2f" (/ delay (car (cddr here)))) (cadr here))))))
+
+;;;; Defined in minibuffer.el
+
+(compat-defun completion-list-candidate-at-point (&optional pt) ;; <compat-tests:completion-list-candidate-at-point>
+  "Candidate string and bounds at PT in completions buffer.
+The return value has the format (STR BEG END).
+The optional argument PT defaults to (point)."
+  (let ((pt (or pt (point))) beg end)
+    (cond
+     ((and (/= pt (point-max)) (get-text-property pt 'mouse-face))
+      (setq end pt beg (1+ pt)))
+     ((and (/= pt (point-min)) (get-text-property (1- pt) 'mouse-face))
+      (setq end (1- pt) beg pt)))
+    (when (and beg end)
+      (setq beg (previous-single-property-change beg 'mouse-face))
+      (setq end (or (next-single-property-change end 'mouse-face) (point-max)))
+      (list (or (get-text-property beg 'completion--string)
+                (buffer-substring beg end))
+            beg end))))
+
+(compat-defun completion-table-with-metadata (table metadata) ;; <compat-tests:completion-table-with-metadata>
+  "Return new completion TABLE with METADATA.
+METADATA should be an alist of completion metadata.  See
+`completion-metadata' for a list of supported metadata."
+  (lambda (string pred action)
+    (if (eq action 'metadata)
+        `(metadata . ,metadata)
+      (complete-with-action action table string pred))))
+
+;;;; Defined in subr-x.el
+
+(compat-defun add-remove--display-text-property (start end spec value &optional object remove)  ;; <compat-tests:add-display-text-property>
+  "Helper function for `add-display-text-property' and `remove-display-text-property'."
+  (let ((sub-start start)
+        (sub-end 0)
+        (limit (if (stringp object)
+                   (min (length object) end)
+                 (min end (point-max))))
+        disp)
+    (while (< sub-end end)
+      (setq sub-end (next-single-property-change sub-start 'display object
+                                                 limit))
+      (if (not (setq disp (get-text-property sub-start 'display object)))
+          (unless remove
+            (put-text-property sub-start sub-end 'display (list spec value)
+                               object))
+        (let ((changed nil)
+              type)
+          (setq disp
+                (cond
+                 ((vectorp disp)
+                  (setq type 'vector)
+                  (seq-into disp 'list))
+                 ((or (not (consp (car-safe disp)))
+                      (eq (caar disp) 'margin))
+                  (setq type 'scalar)
+                  (list disp))
+                 (t
+                  (setq type 'list)
+                  disp)))
+          (when-let* ((old (assoc spec disp)))
+            (setq disp (if (eq type 'list)
+                           (remove old disp)
+                         (delete old disp))
+                  changed t))
+          (unless remove
+            (setq disp (cons (list spec value) disp)
+                  changed t))
+          (when changed
+            (if (not disp)
+                (remove-text-properties sub-start sub-end '(display nil) object)
+              (when (eq type 'vector)
+                (setq disp (seq-into disp 'vector)))
+              (put-text-property sub-start sub-end 'display disp object)))))
+      (setq sub-start sub-end))))
+
+(compat-defun remove-display-text-property (start end spec &optional object) ;; <compat-tests:remove-display-text-property>
+  "Remove the display specification SPEC from the text from START to END.
+SPEC is the car of the display specification to remove, e.g. `height'.
+If any text in the region has other display specifications, those specs
+are retained.
+
+OBJECT is either a string or a buffer to remove the specification from.
+If omitted, OBJECT defaults to the current buffer."
+  (add-remove--display-text-property start end spec nil object 'remove))
+
+(compat-defvar work-buffer-limit 10 ;; <compat-tests:with-work-buffer>
+  "Maximum number of reusable work buffers.
+When this limit is exceeded, newly allocated work buffers are
+automatically killed, which means that in a such case
+`with-work-buffer' becomes equivalent to `with-temp-buffer'.")
+
+;; On Emacs 29 and newer `kill-all-local-variables' has a KILL-PERMANENT argument.
+(static-if (< emacs-major-version 29) nil
+  (compat-defvar work-buffer--list nil ;; <compat-tests:with-work-buffer>
+    "List of work buffers.")
+
+  (compat-defun work-buffer--get () ;; <compat-tests:with-work-buffer>
+    "Get a work buffer."
+    (let ((buffer (pop work-buffer--list)))
+      (if (buffer-live-p buffer)
+          buffer
+        (generate-new-buffer " *work*" t))))
+
+  (compat-defun work-buffer--release (buffer) ;; <compat-tests:with-work-buffer>
+    "Release work BUFFER."
+    (if (buffer-live-p buffer)
+        (with-current-buffer buffer
+          (let ((inhibit-read-only t))
+            (erase-buffer)
+            (delete-all-overlays))
+          (let (change-major-mode-hook)
+            (setq buffer-read-only nil)
+            (kill-all-local-variables t))
+          (push buffer work-buffer--list)))
+    (when (> (length work-buffer--list) work-buffer-limit)
+      (mapc #'kill-buffer (nthcdr work-buffer-limit work-buffer--list))
+      (setq work-buffer--list (ntake work-buffer-limit work-buffer--list)))))
+
+(compat-defmacro with-work-buffer (&rest body) ;; <compat-tests:with-work-buffer>
+  "Create a work buffer, and evaluate BODY there like `progn'.
+Like `with-temp-buffer', but reuse an already created temporary buffer
+when possible, instead of creating a new one on each call.  Avoid
+retaining state referring to a work buffer, and kill any indirect
+buffers you create that use a work buffer as a base."
+  (declare (indent 0) (debug t))
+  (static-if (< emacs-major-version 29)
+      `(with-temp-buffer ,@body)
+    (let ((work-buffer (make-symbol "work-buffer")))
+      `(let ((,work-buffer (work-buffer--get)))
+         (with-current-buffer ,work-buffer
+           (unwind-protect
+               (progn ,@body)
+             (work-buffer--release ,work-buffer)))))))
+
+;;;; Defined in button.el
+
+(compat-defun unbuttonize-region (start end) ;; <compat-tests:buttonize-region>
+  "Remove all the buttons between START and END.
+This removes both text-property and overlay based buttons."
+  (dolist (o (overlays-in start end))
+    (when (overlay-get o 'button)
+      (delete-overlay o)))
+  (with-silent-modifications
+    (remove-text-properties start end (button--properties nil nil nil))
+    (add-face-text-property start end 'button nil)))
+
+(provide 'compat-31)
+;;; compat-31.el ends here
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-31.elc b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-31.elc
new file mode 100644
index 0000000..77d5f70
Binary files /dev/null and b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-31.elc differ
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-autoloads.el b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-autoloads.el
new file mode 100644
index 0000000..676fd32
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-autoloads.el
@@ -0,0 +1,33 @@
+;;; compat-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from compat.el
+
+(register-definition-prefixes "compat" '("compat-"))
+
+
+;;; Generated autoloads from compat-macs.el
+
+(register-definition-prefixes "compat-macs" '("compat-"))
+
+;;; End of scraped data
+
+(provide 'compat-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; compat-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-macs.el b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-macs.el
new file mode 100644
index 0000000..b3206f7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-macs.el
@@ -0,0 +1,272 @@
+;;; compat-macs.el --- Compatibility Macros -*- lexical-binding: t; no-byte-compile: t; -*-
+
+;; Copyright (C) 2021-2026 Free Software Foundation, Inc.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; WARNING: This file provides *internal* macros.  The macros are used
+;; by Compat to facilitate the definition of compatibility functions,
+;; compatibility macros and compatibility variables.  The
+;; `compat-macs' feature should never be loaded at runtime in your
+;; Emacs and will only be used during byte compilation.  Every
+;; definition provided here is internal, may change any time between
+;; Compat releases and must not be used by other packages.
+
+;;; Code:
+
+;; We always require subr-x at compile time for the fboundp check
+;; since definitions have been moved around. The cl-lib macros are
+;; needed by compatibility definitions.
+(require 'subr-x)
+(require 'cl-lib)
+
+(defvar compat-macs--version nil
+  "Version of the currently defined compatibility definitions.")
+
+(defun compat-macs--strict (cond &rest error)
+  "Assert strict COND, otherwise fail with ERROR."
+  (when (bound-and-true-p compat-strict)
+    (apply #'compat-macs--assert cond error)))
+
+(defun compat-macs--assert (cond &rest error)
+  "Assert COND, otherwise fail with ERROR."
+  (unless cond (apply #'error error)))
+
+(defun compat-macs--docstring (type name docstring)
+  "Format DOCSTRING for NAME of TYPE.
+Prepend compatibility notice to the actual documentation string."
+  (with-temp-buffer
+    (insert
+     (format
+      "[Compatibility %s for `%s', defined in Emacs %s. \
+See (compat) Emacs %s' for more details.]\n\n%s"
+      type name compat-macs--version compat-macs--version docstring))
+    (let ((fill-column 80))
+      (fill-region (point-min) (point-max)))
+    (buffer-string)))
+
+(defun compat-macs--check-attributes (attrs preds)
+  "Check ATTRS given PREDS predicate plist and return rest."
+  (while (keywordp (car attrs))
+    (compat-macs--assert (cdr attrs) "Attribute list length is odd")
+    (compat-macs--assert (let ((p (plist-get preds (car attrs))))
+                           (and p (or (eq p t) (funcall p (cadr attrs)))))
+                         "Invalid attribute %s" (car attrs))
+    (setq attrs (cddr attrs)))
+  attrs)
+
+(defun compat-macs--guard (attrs preds fun)
+  "Guard compatibility definition generation.
+The version constraints specified by ATTRS are checked.  PREDS is
+a plist of predicates for arguments which are passed to FUN."
+  (declare (indent 2))
+  (compat-macs--assert compat-macs--version "No `compat-version' was declared")
+  (let* ((body (compat-macs--check-attributes
+                attrs `(,@preds :feature symbolp)))
+         (feature (plist-get attrs :feature))
+         (attrs `(:body ,body ,@attrs))
+         args)
+    ;; Require feature at compile time
+    (when feature
+      (compat-macs--assert (not (eq feature 'subr-x)) "Invalid feature subr-x")
+      (require feature))
+    ;; The current Emacs must be older than the currently declared version.
+    (when (version< emacs-version compat-macs--version)
+      (while preds
+        (push (plist-get attrs (car preds)) args)
+        (setq preds (cddr preds)))
+      (setq body (apply fun (nreverse args)))
+      (if (and feature body)
+          `(with-eval-after-load ',feature ,@body)
+        (macroexp-progn body)))))
+
+(defun compat-macs--defun (type name arglist docstring rest)
+  "Define function NAME of TYPE with ARGLIST and DOCSTRING.
+REST are attributes and the function BODY."
+  (compat-macs--guard
+     rest (list :extended (lambda (x) (or (booleanp x) (version-to-list x)))
+                :obsolete (lambda (x) (or (booleanp x) (stringp x)))
+                :body t)
+    (lambda (extended obsolete body)
+      (when (stringp extended)
+        (compat-macs--assert
+         (and (version< extended compat-macs--version) (version< "25.1" extended))
+         "Invalid :extended version %s for %s %s" extended type name)
+        (setq extended (version<= extended emacs-version)))
+      (compat-macs--strict (eq extended (fboundp name))
+                           "Wrong :extended flag for %s %s" type name)
+      ;; Remove unsupported declares.  It might be possible to set these
+      ;; properties otherwise.  That should be looked into and implemented
+      ;; if it is the case.
+      (when (and (listp (car-safe body)) (eq (caar body) 'declare) (<= emacs-major-version 25))
+        (setcar body (assq-delete-all 'pure (assq-delete-all
+                                             'side-effect-free (car body)))))
+      ;; Use `:extended' name if the function is already defined.
+      (let* ((defname (if (and extended (fboundp name))
+                          (intern (format "compat--%s" name))
+                        name))
+             (def `(,(if (memq '&key arglist)
+                         (if (eq type 'macro) 'cl-defmacro 'cl-defun)
+                       (if (eq type 'macro) 'defmacro 'defun))
+                    ,defname ,arglist
+                    ,(compat-macs--docstring type name docstring)
+                    ,@body)))
+        `(,@(if (eq defname name)
+                ;; An additional fboundp check is performed at runtime to make
+                ;; sure that we never redefine an existing definition if Compat
+                ;; is loaded on a newer Emacs version.  Declare the function,
+                ;; such that the byte compiler does not complain about possibly
+                ;; missing functions at runtime. The warnings are generated due
+                ;; to the fboundp check.
+                `((declare-function ,name nil)
+                  (unless (fboundp ',name) ,def))
+              (list def))
+          ,@(when obsolete
+              `((make-obsolete
+                 ',defname ,(if (stringp obsolete) obsolete "No substitute")
+                 ,compat-macs--version))))))))
+
+(defmacro compat-guard (cond &rest rest)
+  "Guard definition with a runtime COND and a version check.
+The runtime condition must make sure that no definition is
+overridden.  REST is an attribute plist followed by the definition
+body.  The attributes specify the conditions under which the
+definition is generated.
+
+- :feature :: Wrap the definition with `with-eval-after-load' for
+  the given feature."
+  (declare (debug ([&rest keywordp sexp] def-body))
+           (indent 1))
+  (compat-macs--guard rest '(:body t)
+    (lambda (body)
+      (compat-macs--assert body "The guarded body is empty")
+      (if (eq cond t)
+          body
+        (compat-macs--strict (eval cond t) "Guard %S failed" cond)
+        `((when ,cond ,@body))))))
+
+(defmacro compat-defalias (name def &rest attrs)
+  "Define compatibility alias NAME as DEF.
+ATTRS is a plist of attributes, which specify the conditions
+under which the definition is generated.
+
+- :obsolete :: Mark the alias as obsolete if t.
+
+- :feature :: See `compat-guard'."
+  (declare (debug (name symbolp [&rest keywordp sexp])))
+  (compat-macs--guard attrs '(:obsolete booleanp)
+    (lambda (obsolete)
+      (compat-macs--strict (not (fboundp name)) "%s already defined" name)
+      ;; The fboundp check is performed at runtime to make sure that we never
+      ;; redefine an existing definition if Compat is loaded on a newer Emacs
+      ;; version.
+      `((unless (fboundp ',name)
+          (defalias ',name ',def
+            ,(compat-macs--docstring 'function name
+                                (get name 'function-documentation)))
+          ,@(when obsolete
+              `((make-obsolete ',name ',def ,compat-macs--version))))))))
+
+(defmacro compat-defun (name arglist docstring &rest rest)
+  "Define compatibility function NAME with arguments ARGLIST.
+The function must be documented in DOCSTRING.  REST is an
+attribute plist followed by the function body.  The attributes
+specify the conditions under which the definition is generated.
+
+- :extended :: Mark the function as extended if t.  The function
+  must be called explicitly via `compat-call'.  This attribute
+  should be used for functions which extend already existing
+  functions, e.g., functions which changed their calling
+  convention or their behavior.  The value can also be a version
+  string, which specifies the Emacs version when the original
+  version of the function was introduced.
+
+- :obsolete :: Mark the function as obsolete if t, can be a
+  string describing the obsoletion.
+
+- :feature :: See `compat-guard'."
+  (declare (debug (&define name (&rest symbolp)
+                           stringp
+                           [&rest keywordp sexp]
+                           def-body))
+           (doc-string 3) (indent 2))
+  (compat-macs--defun 'function name arglist docstring rest))
+
+(defmacro compat-defmacro (name arglist docstring &rest rest)
+  "Define compatibility macro NAME with arguments ARGLIST.
+The macro must be documented in DOCSTRING.  REST is an attribute
+plist followed by the macro body.  See `compat-defun' for
+details."
+  (declare (debug compat-defun) (doc-string 3) (indent 2))
+  (compat-macs--defun 'macro name arglist docstring rest))
+
+(defmacro compat-defvar (name initval docstring &rest attrs)
+  "Define compatibility variable NAME with initial value INITVAL.
+The variable must be documented in DOCSTRING.  ATTRS is a plist
+of attributes, which specify the conditions under which the
+definition is generated.
+
+- :constant :: Mark the variable as constant if t.
+
+- :risky :: Mark the variable as risky if t.
+
+- :local :: Make the variable buffer-local if t.  If the value is
+  `permanent' make the variable additionally permanently local.
+
+- :obsolete :: Mark the variable as obsolete if t, can be a
+  string describing the obsoletion.
+
+- :feature :: See `compat-guard'."
+  (declare (debug (name form stringp [&rest keywordp sexp]))
+           (doc-string 3) (indent 2))
+  (compat-macs--guard
+      attrs (list :constant #'booleanp
+                  :risky #'booleanp
+                  :local (lambda (x) (memq x '(nil t permanent)))
+                  :obsolete (lambda (x) (or (booleanp x) (stringp x))))
+    (lambda (constant risky local obsolete)
+      (compat-macs--strict (not (boundp name)) "%s already defined" name)
+      (compat-macs--assert (not (and constant local)) "Both :constant and :local")
+      (compat-macs--assert (not (and local risky)) "Both :risky and :local")
+      ;; The boundp check is performed at runtime to make sure that we never
+      ;; redefine an existing definition if Compat is loaded on a newer Emacs
+      ;; version.
+      `((defvar ,name)
+        (unless (boundp ',name)
+          (,(if constant 'defconst 'defvar)
+           ,name ,initval
+           ,(compat-macs--docstring 'variable name docstring))
+          ,@(when obsolete
+              `((make-obsolete-variable
+                 ',name ,(if (stringp obsolete) obsolete "No substitute")
+                 ,compat-macs--version))))
+        ,@(and local `((make-variable-buffer-local ',name)))
+        ,@(and risky `((put ',name 'risky-local-variable t)))
+        ,@(and (eq local 'permanent) `((put ',name 'permanent-local t)))))))
+
+(defmacro compat-version (version)
+  "Set the Emacs version that is currently being handled to VERSION."
+  (setq compat-macs--version version)
+  nil)
+
+(defmacro compat-require (feature version)
+  "Require FEATURE if the Emacs version is less than VERSION."
+  (when (version< emacs-version version)
+    (require feature)
+    `(require ',feature)))
+
+(provide 'compat-macs)
+;;; compat-macs.el ends here
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-pkg.el b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-pkg.el
new file mode 100644
index 0000000..3361ea3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat-pkg.el
@@ -0,0 +1,2 @@
+;; Generated package description from compat.el  -*- no-byte-compile: t; lexical-binding:t -*-
+(define-package "compat" "31.0.0.2" "Emacs Lisp Compatibility Library" '((emacs "25.1")) :commit "df03e91f1fc47503ca71e11dd507ed18ca8b5ab0" :authors '(("Philip Kaludercic" . "philipk@posteo.net") ("Daniel Mendler" . "mail@daniel-mendler.de")) :maintainer '(("Philip Kaludercic" . "philipk@posteo.net") ("Daniel Mendler" . "mail@daniel-mendler.de")) :keywords '("lisp" "maint") :url "https://github.com/emacs-compat/compat")
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat.el b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat.el
new file mode 100644
index 0000000..d4e6bf4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat.el
@@ -0,0 +1,93 @@
+;;; compat.el --- Emacs Lisp Compatibility Library -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021-2026 Free Software Foundation, Inc.
+
+;; Author: Philip Kaludercic <philipk@posteo.net>, Daniel Mendler <mail@daniel-mendler.de>
+;; Maintainer: Philip Kaludercic <philipk@posteo.net>, Daniel Mendler <mail@daniel-mendler.de>
+;; Version: 31.0.0.2
+;; URL: https://github.com/emacs-compat/compat
+;; Package-Requires: ((emacs "25.1"))
+;; Keywords: lisp, maint
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Compat is the Elisp forwards compatibility library, which provides
+;; definitions introduced in newer Emacs versions.  The definitions
+;; are only installed if necessary for your current Emacs version.  If
+;; Compat is compiled on a recent version of Emacs, all of the
+;; definitions are disabled at compile time, such that no negative
+;; performance impact is incurred.  The provided compatibility
+;; implementations of functions and macros are at least subsets of the
+;; actual implementations.  Be sure to read the documentation string
+;; and the Compat manual.
+;;
+;; Not every function provided in newer versions of Emacs is provided
+;; here.  Some depend on new features from the C core, others cannot
+;; be implemented to a meaningful degree.  Please consult the Compat
+;; manual for details regarding the usage of the Compat library and
+;; the provided functionality.
+
+;; The main audience for this library are not regular users, but
+;; package maintainers.  Therefore no commands, user-facing modes or
+;; user options are implemented here.
+
+;;; Code:
+
+;; Ensure that the newest compatibility layer is required at compile
+;; time and runtime, but only if needed.
+(eval-when-compile
+  (defmacro compat--maybe-require ()
+    (when (< emacs-major-version 31)
+      (require 'compat-31)
+      '(require 'compat-31))))
+(compat--maybe-require)
+
+;;;; Macros for extended compatibility function calls
+
+(defmacro compat-function (fun)
+  "Return compatibility function symbol for FUN.
+
+If the Emacs version provides a sufficiently recent version of
+FUN, the symbol FUN is returned itself.  Otherwise the macro
+returns the symbol of a compatibility function which supports the
+behavior and calling convention of the current stable Emacs
+version.  For example Compat 29.1 will provide compatibility
+functions which implement the behavior and calling convention of
+Emacs 29.1.
+
+See also `compat-call' to directly call compatibility functions."
+  (let ((compat (intern (format "compat--%s" fun))))
+    `#',(if (fboundp compat) compat fun)))
+
+(defmacro compat-call (fun &rest args)
+  "Call compatibility function or macro FUN with ARGS.
+
+A good example function is `plist-get' which was extended with an
+additional predicate argument in Emacs 29.1.  The compatibility
+function, which supports this additional argument, can be
+obtained via (compat-function plist-get) and called
+via (compat-call plist-get plist prop predicate).  It is not
+possible to directly call (plist-get plist prop predicate) on
+Emacs older than 29.1, since the original `plist-get' function
+does not yet support the predicate argument.  Note that the
+Compat library never overrides existing functions.
+
+See also `compat-function' to lookup compatibility functions."
+  (let ((compat (intern (format "compat--%s" fun))))
+    `(,(if (fboundp compat) compat fun) ,@args)))
+
+(provide 'compat)
+;;; compat.el ends here
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat.elc b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat.elc
new file mode 100644
index 0000000..41ac659
Binary files /dev/null and b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat.elc differ
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/compat.info b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat.info
new file mode 100644
index 0000000..080285f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/compat.info
@@ -0,0 +1,3344 @@
+This is compat.info, produced by makeinfo version 7.1.1 from
+compat.texi.
+
+Copyright © 2022-2026 Free Software Foundation, Inc.
+
+     Permission is granted to copy, distribute and/or modify this
+     document under the terms of the GNU Free Documentation License,
+     Version 1.3 or any later version published by the Free Software
+     Foundation; with no Invariant Sections, with the Front-Cover Texts
+     being “A GNU Manual,” and with the Back-Cover Texts as in (a)
+     below.  A copy of the license is included in the section entitled
+     “GNU Free Documentation License.”
+
+     (a) The FSF’s Back-Cover Text is: “You have the freedom to copy and
+     modify this GNU manual.”
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Compat: (compat).     Compatibility Library for Emacs Lisp.
+END-INFO-DIR-ENTRY
+
+
+File: compat.info,  Node: Top,  Next: Introduction,  Up: (dir)
+
+"Compat" Manual
+***************
+
+This manual documents the usage of the "Compat" Emacs lisp library, the
+forward-compatibility library for Emacs Lisp, corresponding to version
+31.0.0.2.
+
+   Copyright © 2022-2026 Free Software Foundation, Inc.
+
+     Permission is granted to copy, distribute and/or modify this
+     document under the terms of the GNU Free Documentation License,
+     Version 1.3 or any later version published by the Free Software
+     Foundation; with no Invariant Sections, with the Front-Cover Texts
+     being “A GNU Manual,” and with the Back-Cover Texts as in (a)
+     below.  A copy of the license is included in the section entitled
+     “GNU Free Documentation License.”
+
+     (a) The FSF’s Back-Cover Text is: “You have the freedom to copy and
+     modify this GNU manual.”
+
+* Menu:
+
+* Introduction::
+* Support::
+* Development::
+* Function Index::
+* Variable Index::
+
+-- The Detailed Node Listing --
+
+Introduction
+
+* Overview::
+* Usage::
+* Limitations::
+
+Support
+
+* Emacs 26.1::                   Compatibility support for Emacs 26.1
+* Emacs 27.1::                   Compatibility support for Emacs 27.1
+* Emacs 28.1::                   Compatibility support for Emacs 28.1
+* Emacs 29.1::                   Compatibility support for Emacs 29.1
+* Emacs 30.1::                   Compatibility support for Emacs 30.1
+* Emacs 31.1::                   Compatibility support for Emacs 31.1
+
+
+
+File: compat.info,  Node: Introduction,  Next: Support,  Prev: Top,  Up: Top
+
+1 Introduction
+**************
+
+* Menu:
+
+* Overview::
+* Usage::
+* Limitations::
+
+
+File: compat.info,  Node: Overview,  Next: Usage,  Up: Introduction
+
+1.1 Overview
+============
+
+The objective of Compat is to provide "forwards compatibility" library
+for Emacs Lisp.  By using Compat, an Elisp package does not have to make
+the decision to either use new and useful functionality or support old
+versions of Emacs.
+
+   The library provides support back until Emacs 25.1.  The intended
+audience are package developers that are interested in using newer
+developments, without having to break compatibility.
+
+
+File: compat.info,  Node: Usage,  Next: Limitations,  Prev: Overview,  Up: Introduction
+
+1.2 Usage
+=========
+
+The intended use-case for this library is for package developers to add
+as a dependency in the header.  The version of the Compat library
+mirrors the version of Emacs releases.  The current version of Compat
+corresponds to the current Emacs release.
+
+     ;; Package-Requires: ((emacs "25.1") (compat "31.0.0.2"))
+
+   There is no need to depend on ‘emacs 25.1’ specifically.  One can
+choose any newer version, if features not provided by Compat necessitate
+it, for example bug fixes or UI improvements.
+
+   In any file where compatibility forms are used, a
+
+     (require 'compat)
+
+   should be added early on.  This will load all necessary Compat
+definitions.  Compat loads the ‘seq’ library which is preloaded by
+default on Emacs 29.  Note that if Compat is installed on a recent
+version of Emacs, all of the definitions are disabled at compile time,
+such that no negative performance impact is incurred.
+
+   A minimal version of Compat will be present in Emacs version 30 and
+newer.  Packages which are part of Emacs itself and want to take
+advantage of Compat, can also use ‘(require 'compat)’.  The advantage of
+the inclusion of a minimal Compat in Emacs is that Compat will not be
+installed if you require a version older or equal than the current Emacs
+version.  For example, if a package depending on Emacs 25.1 and Compat
+29.1 is installed on Emacs 30.1, Compat will not be pulled in as
+dependency, since Emacs 30.1 already provides the required
+functionality.
+
+   Compat provides replacement functions with extended functionality for
+functions that are already defined, e.g., ‘sort’ or ‘assoc’.  These
+functions may have changed their calling convention (additional optional
+arguments) or may have changed their behavior.  These functions must be
+looked up explicitly with ‘compat-function’ or called explicitly with
+‘compat-call’.  We call them “Extended Definitions”.  In contrast, newly
+“Added Definitions” can be called as usual.  The Compat manual
+explicitly documents the calling convention of each compatibility
+function.
+
+     (compat-call assoc key alist testfn) ;; Call extended `assoc'
+     (mapcan fun seq)                     ;; Call newly added `mapcan'
+
+ -- Macro: compat-call fun &rest args
+     This macro calls the compatibility function FUN with ARGS.  Many
+     functions provided by Compat can be called directly without this
+     macro.  However in the case where Compat provides an alternative
+     version of an existing function, the function call has to go
+     through ‘compat-call’.  This happens for example when the calling
+     convention of a function has changed.
+
+ -- Macro: compat-function fun
+     This macro returns the compatibility function symbol for FUN.  See
+     ‘compat-call’ for a more convenient macro to directly call
+     compatibility functions.
+
+   If Compat is used in Emacs core packages, the macros ‘compat-call’
+and ‘compat-function’ will be available in Emacs version 30 and newer.
+
+   The macros ‘compat-call’ and ‘compat-function’ are introduced by
+Compat, since Compat does not advise or override existing functions.
+Generally Compat is written in defensive style which is supposed to
+reduce potential breakage, and to increase the chances of staying binary
+compatible across releases.  The extensive test coverage ensures that we
+can maintain high quality, which is crucial for Compat which is not
+restricted to a namespace like usual libraries.
+
+   If you intend to use a compatibility function in your code it is
+recommended that you take a look at the test suite ‘compat-tests.el’.
+There you can see the supported calling conventions, which are
+guaranteed to work on the supported Emacs versions.  We ensure this
+using continuous integration.  All functions provided by Compat are
+covered by the test suite.  There is a link to the corresponding test on
+the first line of each definition.
+
+
+File: compat.info,  Node: Limitations,  Prev: Usage,  Up: Introduction
+
+1.3 Limitations
+===============
+
+The Compat library has a number of limitations.  Complete backwards
+compatibility cannot be provided due to the scope of Compat and for
+technical reasons.  The scope is intentionally restricted in order to
+limit the size of Compat and to ensure that the library stays
+maintainable.
+
+   Emacs version 25.1 is chosen as the oldest version supported by
+Compat, since Elisp has seen significant changes at that version.  Since
+25.1 Emacs major versions consistently bump the major version number.
+On the library level, seq and generics were introduced in 25.1.  Most
+popular Emacs packages already require 25.1 or even newer versions of
+Emacs.  Supporting for more historical Emacs versions would complicate
+maintenance while only few packages and users would benefit.
+
+   Below we list a number of reasons why certain functionality cannot be
+provided.  Note that in some special cases exceptions can be made and
+functions can still be added to Compat even if they satisfy the criteria
+from the list.  In case you miss functionality which you think should
+belong here, a *note report: Development. would be much appreciated.
+
+   • The additional functionality is a command or a user-facing minor or
+     major mode.  Compat is limited to functionality on the "library
+     level".  Generally functions provided by Compat are
+     non-interactive, such that the user interface (M-x) is unaffected
+     by the presence of Compat.
+
+   • The function is not useful for package authors or not intended to
+     be used by packages, but is only useful on the configuration level.
+     The macro ‘setopt’ is such an example.
+
+   • Private (double dashed) functions are not ported back.  If Compat
+     includes some private functions, they are meant purely for internal
+     usage.
+
+   • The added or extended function belongs to the "application level"
+     and not the "library level".  Features which are not preloaded
+     often belong to the "application level".  Application examples are
+     programming modes or modes like Dired, IRC and Gnus.  If these
+     modes are extended with new functions, these are not ported back.
+
+   • An existing function or macro was extended by some new
+     functionality.  To support these cases, the function or macro would
+     have to be advised.  Since this is invasive and adds significant
+     overhead, even when the new feature is not used, Compat does not
+     use advices.  As a compromise, compatibility functions and macros
+     with a changed calling convention or behavior can be accessed via
+     the ‘compat-function’ and ‘compat-call’ macros.  In this manual we
+     call such definitions “Extended Definitions”.  An example is the
+     function ‘plist-get’.  Note that extended functions are subject to
+     closer scrutiny, since their usage via ‘compat-call’ is not
+     completely painless.  If a particular extended function does not
+     see much usage or the extension yields only marginal benefits, we
+     may not provide it as part of Compat.
+
+   • Bug fixes are usually not ported back as part of Compat.  Sometimes
+     library functions show wrong behavior for edge cases.  In those
+     cases Compat could in principle provide a compatibility function
+     which is invoked via ‘compat-call’.  Such extended definitions
+     would increase the maintenance burden of Compat.  At the same time
+     the benefits would be small given that Compat does not override
+     existing definitions.
+
+   • The definition belongs to an Emacs core package, which is also
+     distributed via ELPA. Compat does not have to provide backward
+     compatibility for core packages since the updated package can be
+     installed directly from ELPA. Examples include the libraries xref,
+     project, seq, map and transient.
+
+   • New functionality depends on an entire new, non-trivial core
+     library, which is infeasible to duplicate within Compat.  If a
+     backport of such a library is required, the preferred approach is
+     to either release the library separately on GNU ELPA as a core
+     package or as a separately maintained GNU ELPA package.  An example
+     is the iso8601 library.
+
+   • New functionality was implemented in the C core, or depends on
+     external libraries that cannot be reasonably duplicated in the
+     scope of a compatibility library.  Sometimes new functions on the C
+     level rely on internal data structures, which we cannot access,
+     rendering a backport impossible.  For example a missing libxml or
+     libtreesitter cannot be emulated.
+
+   • The semantics of Elisp changed on a deep level.  For example the
+     addition of big integer support in Emacs 27.1 cannot be replicated
+     on the level of Compat.
+
+
+File: compat.info,  Node: Support,  Next: Development,  Prev: Introduction,  Up: Top
+
+2 Support
+*********
+
+This section goes into the features that Compat manages and doesn't
+manage to provide for each Emacs version.
+
+* Menu:
+
+* Emacs 26.1::                   Compatibility support for Emacs 26.1
+* Emacs 27.1::                   Compatibility support for Emacs 27.1
+* Emacs 28.1::                   Compatibility support for Emacs 28.1
+* Emacs 29.1::                   Compatibility support for Emacs 29.1
+* Emacs 30.1::                   Compatibility support for Emacs 30.1
+* Emacs 31.1::                   Compatibility support for Emacs 31.1
+
+
+File: compat.info,  Node: Emacs 26.1,  Next: Emacs 27.1,  Up: Support
+
+2.1 Emacs 26.1
+==============
+
+2.1.1 Added Definitions
+-----------------------
+
+The following functions and macros are implemented in Emacs 26.1.  These
+functions are made available by Compat on Emacs versions older than
+26.1.
+
+ -- Function: assoc-delete-all key alist
+     This function is like ‘assq-delete-all’ except that it uses ‘equal’
+     to compare elements.
+
+ -- Function: read-answer question answers
+     This function prompts the user with text in QUESTION, which should
+     end in the ‘SPC’ character.  The function includes in the prompt
+     the possible responses in ANSWERS by appending them to the end of
+     QUESTION.  The possible responses are provided in ANSWERS as an
+     alist whose elements are of the following form:
+
+          (LONG-ANSWER SHORT-ANSWER HELP-MESSAGE)
+
+     where LONG-ANSWER is the complete text of the user response, a
+     string; SHORT-ANSWER is a short form of the same response, a single
+     character or a function key; and HELP-MESSAGE is the text that
+     describes the meaning of the answer.  If the variable
+     ‘read-answer-short’ is non-‘nil’, the prompt will show the short
+     variants of the possible answers and the user is expected to type
+     the single characters/keys shown in the prompt; otherwise the
+     prompt will show the long variants of the answers, and the user is
+     expected to type the full text of one of the answers and end by
+     pressing <RET>.  If ‘use-dialog-box’ is non-‘nil’, and this
+     function was invoked by mouse events, the question and the answers
+     will be displayed in a GUI dialog box.
+
+     The function returns the text of the LONG-ANSWER selected by the
+     user, regardless of whether long or short answers were shown in the
+     prompt and typed by the user.
+
+     Here is an example of using this function:
+
+          (let ((read-answer-short t))
+            (read-answer "Foo "
+               '(("yes"  ?y "perform the action")
+                 ("no"   ?n "skip to the next")
+                 ("all"  ?! "perform for the rest without more questions")
+                 ("help" ?h "show help")
+                 ("quit" ?q "exit"))))
+
+ -- Function: mapcan function sequence
+     This function applies FUNCTION to each element of SEQUENCE, like
+     ‘mapcar’, but instead of collecting the results into a list, it
+     returns a single list with all the elements of the results (which
+     must be lists), by altering the results (using ‘nconc’; *note
+     (elisp)Rearrangement::).  Like with ‘mapcar’, SEQUENCE can be of
+     any type except a char-table.
+
+          ;; Contrast this: (mapcar #'list '(a b c d)) ⇒ ((a) (b) (c)
+          (d)) ;; with this: (mapcan #'list '(a b c d)) ⇒ (a b c d)
+
+     *Note (elisp)Mapping Functions::.
+
+ -- Function: cXXXr
+ -- Function: cXXXXr
+     *Note (elisp)List Elements::.
+
+ -- Function: gensym &optional prefix
+     This function returns a symbol using ‘make-symbol’, whose name is
+     made by appending ‘gensym-counter’ to PREFIX and incrementing that
+     counter, guaranteeing that no two calls to this function will
+     generate a symbol with the same name.  The prefix defaults to
+     ‘"g"’.
+
+ -- Variable: gensym-counter
+     See ‘gensym’.
+
+ -- Function: buffer-hash &optional buffer-or-name
+     Return a hash of BUFFER-OR-NAME.  If ‘nil’, this defaults to the
+     current buffer.  As opposed to ‘secure-hash’, this function
+     computes the hash based on the internal representation of the
+     buffer, disregarding any coding systems.  It's therefore only
+     useful when comparing two buffers running in the same Emacs, and is
+     not guaranteed to return the same hash between different Emacs
+     versions.  It should be somewhat more efficient on larger buffers
+     than ‘secure-hash’ is, and should not allocate more memory.
+
+ -- Macro: file-name-unquote name
+     This macro removes the quotation prefix ‘/:’ from the file NAME, if
+     any.  If NAME is a remote file name, the local part of NAME is
+     unquoted.
+
+ -- Function: file-name-quoted-p name
+     This macro returns non-‘nil’, when NAME is quoted with the prefix
+     ‘/:’.  If NAME is a remote file name, the local part of NAME is
+     checked.
+
+     *Note (elisp)File Name Expansion::.
+
+ -- Function: file-name-quote name
+     This macro adds the quotation prefix ‘/:’ to the file NAME.  For a
+     local file NAME, it prefixes NAME with ‘/:’.  If NAME is a remote
+     file name, the local part of NAME (*note (elisp)Magic File Names::)
+     is quoted.  If NAME is already a quoted file name, NAME is returned
+     unchanged.
+
+          (substitute-in-file-name (compat-call file-name-quote "bar/~/foo")) ⇒
+               "/:bar/~/foo"
+
+          (substitute-in-file-name (compat-call file-name-quote "/ssh:host:bar/~/foo"))
+               ⇒ "/ssh:host:/:bar/~/foo"
+
+     The macro cannot be used to suppress file name handlers from magic
+     file names (*note (elisp)Magic File Names::).
+
+     *Note (elisp)File Name Expansion::.
+
+ -- Function: make-nearby-temp-file prefix &optional dir-flag suffix
+     This function is similar to ‘make-temp-file’, but it creates a
+     temporary file as close as possible to ‘default-directory’.  If
+     PREFIX is a relative file name, and ‘default-directory’ is a remote
+     file name or located on a mounted file systems, the temporary file
+     is created in the directory returned by the function
+     ‘temporary-file-directory’.  Otherwise, the function
+     ‘make-temp-file’ is used.  PREFIX, DIR-FLAG and SUFFIX have the
+     same meaning as in ‘make-temp-file’.
+
+          (let ((default-directory "/ssh:remotehost:")) (make-nearby-temp-file
+            "foo")) ⇒ "/ssh:remotehost:/tmp/foo232J6v"
+
+ -- Variable: mounted-file-systems
+     A regular expression matching files names that are probably on a
+     mounted file system.
+
+ -- Function: temporary-file-directory
+     The directory for writing temporary files via
+     ‘make-nearby-temp-file’.  In case of a remote ‘default-directory’,
+     this is a directory for temporary files on that remote host.  If
+     such a directory does not exist, or ‘default-directory’ ought to be
+     located on a mounted file system (see ‘mounted-file-systems’), the
+     function returns ‘default-directory’.  For a non-remote and
+     non-mounted ‘default-directory’, the value of the variable
+     ‘temporary-file-directory’ is returned.
+
+     *Note (elisp)Unique File Names::.
+
+ -- Macro: if-let* (bindings...) then &rest else
+     ‘if-let*’ is mostly equivalent to ‘if-let’, with the exception that
+     the legacy ‘(if (VAR (test)) foo bar)’ syntax is not permitted.
+
+ -- Macro: when-let* (bindings...) then &rest else
+     ‘when-let*’ is mostly equivalent to ‘when-let’, with the exception
+     that the legacy ‘(when-let (VAR (test)) foo bar)’ syntax is not
+     permitted.
+
+ -- Macro: and-let* (bindings...) &rest body
+     A combination of LET* and AND, analogous to ‘when-let*’.  If all
+     BINDINGS are non-‘nil’ and BODY is ‘nil’, then the result of the
+     ‘and-let*’ form will be the last value bound in BINDINGS.
+
+     **Please Note:** The implementation provided by Compat does not
+     include a bug that was observed with Emacs 26 (see
+     <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=31840>).
+
+ -- Function: file-local-name filename
+     This function returns the _local part_ of FILENAME.  This is the
+     part of the file's name that identifies it on the remote host, and
+     is typically obtained by removing from the remote file name the
+     parts that specify the remote host and the method of accessing it.
+     For example:
+
+          (file-local-name "/ssh:USER@HOST:/foo/bar") ⇒
+               "/foo/bar"
+
+     For a remote FILENAME, this function returns a file name which
+     could be used directly as an argument of a remote process (*note
+     (elisp)Asynchronous Processes::, and *note (elisp)Synchronous
+     Processes::), and as the program to run on the remote host.  If
+     FILENAME is local, this function returns it unchanged.
+
+     *Note (elisp)Magic File Names::.
+
+ -- Function: read-multiple-choice prompt choices
+     Ask user a multiple choice question.  PROMPT should be a string
+     that will be displayed as the prompt.
+
+     CHOICES is an alist where the first element in each entry is a
+     character to be entered, the second element is a short name for the
+     entry to be displayed while prompting (if there's room, it might be
+     shortened), and the third, optional entry is a longer explanation
+     that will be displayed in a help buffer if the user requests more
+     help.
+
+     See *note Reading One Event: (elisp)Reading One Event.
+
+ -- Function: image-property
+     Defined in ‘image.el’.
+
+     This function can also be used as a generalised variable.
+
+ -- Function: file-attribute-type
+     Return the field _type_ as generated by ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-attribute-link-number
+     Return the field _link-number_ as generated by ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-attribute-user-id
+     Return the field _user-id_ as generated by ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-attribute-group-id
+     Return the field _group-id_ as generated by ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-attribute-access-time
+     Return the field _access-time_ as generated by ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-attribute-modification-time
+     Return the field _modification-time_ as generated by
+     ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-attribute-status-change-time
+     Return the field _modification-time_ as generated by
+     ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-attribute-size
+     Return the field _size_ as generated by ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-attribute-modes
+     Return the field _modes_ as generated by ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-attribute-inode-number
+     Return the field _inode-number_ as generated by ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-attribute-device-number
+     Return the field _device-number_ as generated by ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-attribute-collect attributes &rest attr-names
+     Filter the file attributes ATTRIBUTES, as generated by
+     ‘file-attributes’, according to ATTR-NAMES.
+
+     Valid attribute names for ATTR-NAMES are: type, link-number,
+     user-id, group-id, access-time, modification-time,
+     status-change-time, size, modes, inode-number and device-number.
+
+          (file-attributes ".") ⇒ (t 1 1000 1000 (25329 18215 325481 96000) (25325 15364 530263 840000) (25325 15364 530263 840000) 788 "drwxr-xr-x" t 137819 40)
+          (file-attribute-collect (file-attributes ".") 'type 'modes
+          'inode-number) ⇒ (t "drwxr-xr-x" 137819)
+
+2.1.2 Extended Definitions
+--------------------------
+
+These functions must be called explicitly via ‘compat-call’, since their
+calling convention or behavior was extended in Emacs 26.1:
+
+ -- Function: compat-call make-temp-file prefix &optional dir-flag
+          suffix text
+     This function creates a temporary file and returns its name.  Emacs
+     creates the temporary file's name by adding to PREFIX some random
+     characters that are different in each Emacs job.  The result is
+     guaranteed to be a newly created file, containing TEXT if that's
+     given as a string and empty otherwise.  On MS-DOS, this function
+     can truncate PREFIX to fit into the 8+3 file-name limits.  If
+     PREFIX is a relative file name, it is expanded against
+     ‘temporary-file-directory’.
+
+     The compatibility version adds support for handling the optional
+     argument TEXT.
+
+          (make-temp-file "foo")
+               ⇒ "/tmp/foo232J6v"
+
+     When ‘make-temp-file’ returns, the file has been created and is
+     empty.  At that point, you should write the intended contents into
+     the file.
+
+     If DIR-FLAG is non-‘nil’, ‘make-temp-file’ creates an empty
+     directory instead of an empty file.  It returns the file name, not
+     the directory name, of that directory.  *Note (elisp)Directory
+     Names::.
+
+     If SUFFIX is non-‘nil’, ‘make-temp-file’ adds it at the end of the
+     file name.
+
+     If TEXT is a string, ‘make-temp-file’ inserts it in the file.
+
+     To prevent conflicts among different libraries running in the same
+     Emacs, each Lisp program that uses ‘make-temp-file’ should have its
+     own PREFIX.  The number added to the end of PREFIX distinguishes
+     between the same application running in different Emacs jobs.
+     Additional added characters permit a large number of distinct names
+     even in one Emacs job.
+
+ -- Function: compat-call assoc key alist &optional testfn
+     This function returns the first association for KEY in ALIST,
+     comparing KEY against the alist elements using TESTFN if it is a
+     function, and ‘equal’ otherwise (*note (elisp)Equality
+     Predicates::).  If TESTFN is a function, it is called with two
+     arguments: the CAR of an element from ALIST and KEY.  The function
+     returns ‘nil’ if no association in ALIST has a CAR equal to KEY, as
+     tested by TESTFN.
+
+     *Note (elisp)Association Lists::.
+
+     The compatibility version adds support for handling the optional
+     argument TESTFN.
+
+ -- Function: compat-call line-number-at-pos &optional pos absolute
+     This function returns the line number in the current buffer
+     corresponding to the buffer position POS.  If POS is ‘nil’ or
+     omitted, the current buffer position is used.  If ABSOLUTE is
+     ‘nil’, the default, counting starts at ‘(point-min)’, so the value
+     refers to the contents of the accessible portion of the
+     (potentially narrowed) buffer.  If ABSOLUTE is non-‘nil’, ignore
+     any narrowing and return
+
+     *Note (elisp)Text Lines::.
+
+     The compatibility version adds support for handling the optional
+     argument ABSOLUTE.
+
+ -- Function: compat-call alist-get key alist &optional default remove
+          testfn
+     *Note (elisp)Association Lists::.  This function is similar to
+     ‘assq’.  It finds the first association ‘(KEY . VALUE)’ by
+     comparing KEY with ALIST elements, and, if found, returns the VALUE
+     of that association.  If no association is found, the function
+     returns DEFAULT.  Comparison of KEY against ALIST elements uses the
+     function specified by TESTFN, defaulting to ‘eq’.
+
+     *Note (elisp)Association Lists::.
+
+     The compatibility version handles the optional argument TESTFN.  It
+     can also be used as a *note Generalized Variables:
+     (elisp)generalised variable.
+
+ -- Function: compat-call string-trim-left string &optional regexp
+     Remove the leading text that matches REGEXP from STRING.  REGEXP
+     defaults to ‘[ \t\n\r]+’.
+
+     *Note (elisp)Creating Strings::.
+
+     The compatibility version handles the optional argument REGEXP.
+
+ -- Function: compat-call string-trim-right string &optional regexp
+     Remove the trailing text that matches REGEXP from STRING.  REGEXP
+     defaults to ‘[ \t\n\r]+’.
+
+     *Note (elisp)Creating Strings::.
+
+     The compatibility version handles the optional argument REGEXP.
+
+ -- Function: compat-call string-trim string &optional trim-left
+          trim-right
+     Remove the leading text that matches TRIM-LEFT and trailing text
+     that matches TRIM-RIGHT from STRING.  Both regexps default to ‘[
+     \t\n\r]+’.
+
+     *Note (elisp)Creating Strings::.
+
+     The compatibility version handles the optional arguments TRIM-LEFT
+     and TRIM-RIGHT.
+
+2.1.3 Missing Definitions
+-------------------------
+
+Compat does not provide support for the following Lisp features
+implemented in 26.1:
+
+   • The function ‘func-arity’.
+   • The function ‘secure-hash-algorithms’.
+   • The function ‘gnutls-available-p’.
+   • Support for records and record functions.
+   • The function ‘mapbacktrace’.
+   • The function ‘file-name-case-insensitive-p’.
+   • The additional elements of ‘parse-partial-sexp’.
+   • The function ‘add-variable-watcher’.
+   • The function ‘undo-amalgamate-change-group’.
+   • The function ‘char-from-name’
+   • Signalling errors when ‘length’ or ‘member’ deal with list cycles.
+   • The function ‘frame-list-z-order’.
+   • The function ‘frame-restack’.
+   • All changes related to ‘display-buffer’.
+   • The function ‘window-swap-states’.
+   • The function ‘string-version-lessp’.
+   • The ‘xdg’ library.
+   • The ‘svg’ library (published separately as a :core package).
+
+
+File: compat.info,  Node: Emacs 27.1,  Next: Emacs 28.1,  Prev: Emacs 26.1,  Up: Support
+
+2.2 Emacs 27.1
+==============
+
+2.2.1 Added Definitions
+-----------------------
+
+The following functions and macros are implemented in Emacs 27.1.  These
+functions are made available by Compat on Emacs versions older than
+27.1.
+
+ -- Function: major-mode-suspend
+     This function works like ‘fundamental-mode’, in that it kills all
+     buffer-local variables, but it also records the major mode in
+     effect, so that it could subsequently be restored.  This function
+     and ‘major-mode-restore’ (described next) are useful when you need
+     to put a buffer under some specialized mode other than the one
+     Emacs chooses for it automatically, but would also like to be able
+     to switch back to the original mode later.
+
+ -- Function: major-mode-restore &optional avoided-modes
+     This function restores the major mode recorded by
+     ‘major-mode-suspend’.  If no major mode was recorded, this function
+     calls ‘normal-mode’, but tries to force it not to choose any modes
+     in AVOIDED-MODES, if that argument is non-‘nil’.
+
+ -- Function: ring-resize ring size
+     Set the size of RING to SIZE.  If the new size is smaller, then the
+     oldest items in the ring are discarded.
+
+ -- Function: minibuffer-history-value
+     Return the value of the minibuffer input history list.  If
+     MINIBUFFER-HISTORY-VARIABLE points to a buffer-local variable and
+     the minibuffer is active, return the buffer-local value for the
+     buffer that was current when the minibuffer was activated."
+
+ -- Macro: with-minibuffer-selected-window &rest body
+     Execute the forms in BODY from the minibuffer in its original
+     window.  When used in a minibuffer window, select the window
+     selected just before the minibuffer was activated, and execute the
+     forms.
+
+ -- Function: read-char-from-minibuffer prompt &optional chars history
+     This function uses the minibuffer to read and return a single
+     character.  Optionally, it ignores any input that is not a member
+     of CHARS, a list of accepted characters.  The HISTORY argument
+     specifies the history list symbol to use; if it is omitted or
+     ‘nil’, this function doesn't use the history.
+
+     If you bind ‘help-form’ to a non-‘nil’ value while calling
+     ‘read-char-from-minibuffer’, then pressing ‘help-char’ causes it to
+     evaluate ‘help-form’ and display the result.
+
+ -- Function: bignump object
+     This predicate tests whether its argument is a large integer, and
+     returns ‘t’ if so, ‘nil’ otherwise.  Unlike small integers, large
+     integers can be ‘=’ or ‘eql’ even if they are not ‘eq’.
+
+ -- Function: fixnump object
+     This predicate tests whether its argument is a small integer, and
+     returns ‘t’ if so, ‘nil’ otherwise.  Small integers can be compared
+     with ‘eq’.
+
+ -- Special Form: with-suppressed-warnings warnings body...
+     In execution, this is equivalent to ‘(progn BODY...)’, but the
+     compiler does not issue warnings for the specified conditions in
+     BODY.  WARNINGS is an association list of warning symbols and
+     function/variable symbols they apply to.  For instance, if you wish
+     to call an obsolete function called ‘foo’, but want to suppress the
+     compilation warning, say:
+
+          (with-suppressed-warnings ((obsolete foo))
+            (foo ...))
+
+ -- Function: proper-list-p object
+     This function returns the length of OBJECT if it is a proper list,
+     ‘nil’ otherwise (*note (elisp)Cons Cells::).  In addition to
+     satisfying ‘listp’, a proper list is neither circular nor dotted.
+
+          (proper-list-p '(a b c)) ⇒ 3
+          (proper-list-p '(a b . c)) ⇒ nil
+
+     *Note (elisp)List-related Predicates::.
+
+ -- Function: string-distance string1 string2 &optional bytecompare
+     This function returns the _Levenshtein distance_ between the source
+     string STRING1 and the target string STRING2.  The Levenshtein
+     distance is the number of single-character changes--deletions,
+     insertions, or replacements--required to transform the source
+     string into the target string; it is one possible definition of the
+     _edit distance_ between strings.
+
+     Letter-case of the strings is significant for the computed
+     distance, but their text properties are ignored.  If the optional
+     argument BYTECOMPARE is non-‘nil’, the function calculates the
+     distance in terms of bytes instead of characters.  The byte-wise
+     comparison uses the internal Emacs representation of characters, so
+     it will produce inaccurate results for multibyte strings that
+     include raw bytes (*note (elisp)Text Representations::); make the
+     strings unibyte by encoding them (*note (elisp)Explicit Encoding::)
+     if you need accurate results with raw bytes.
+
+     *Note (elisp)Text Comparison::.
+
+ -- Macro: ignore-errors body...
+     This construct executes BODY, ignoring any errors that occur during
+     its execution.  If the execution is without error, ‘ignore-errors’
+     returns the value of the last form in BODY; otherwise, it returns
+     ‘nil’.
+
+     Here's the example at the beginning of this subsection rewritten
+     using ‘ignore-errors’:
+
+            (ignore-errors (delete-file filename))
+
+     *Note (elisp)Handling Errors::.
+
+ -- Macro: dolist-with-progress-reporter (var count [result])
+          reporter-or-message body...
+     This is another convenience macro that works the same way as
+     ‘dolist’ does, but also reports loop progress using the functions
+     described above.  As in ‘dotimes-with-progress-reporter’,
+     ‘reporter-or-message’ can be a progress reporter or a string.  You
+     can rewrite the previous example with this macro as follows:
+
+          (dolist-with-progress-reporter (k (number-sequence 0 500)) "Collecting
+              some mana for Emacs..."  (sit-for 0.01))
+
+     *Note (elisp)Progress::.
+
+ -- Function: flatten-tree tree
+     This function returns a "flattened" copy of TREE, that is, a list
+     containing all the non-‘nil’ terminal nodes, or leaves, of the tree
+     of cons cells rooted at TREE.  Leaves in the returned list are in
+     the same order as in TREE.
+
+          (flatten-tree '(1 (2 . 3) nil (4 5 (6)) 7)) ⇒(1 2 3 4 5 6 7)
+
+     *Note (elisp)Building Lists::.
+
+ -- Function: xor condition1 condition2
+     This function returns the boolean exclusive-or of CONDITION1 and
+     CONDITION2.  That is, ‘xor’ returns ‘nil’ if either both arguments
+     are ‘nil’, or both are non-‘nil’.  Otherwise, it returns the value
+     of that argument which is non-‘nil’.
+
+     Note that in contrast to ‘or’, both arguments are always evaluated.
+
+     *Note (elisp)Combining Conditions::.
+
+ -- Variable: regexp-unmatchable
+     This variable contains a regexp that is guaranteed not to match any
+     string at all.  It is particularly useful as default value for
+     variables that may be set to a pattern that actually matches
+     something.
+
+     *Note (elisp)Regexp Functions::
+
+ -- Function: decoded-time-second time
+     Return the SECONDS field of a ‘decoded-time’ record TIME.  It can
+     also be used as a *note Generalized Variables: (elisp)generalised
+     variable.
+
+ -- Function: decoded-time-minute time
+     Return the MINUTE field of a ‘decoded-time’ record TIME.  It can
+     also be used as a *note Generalized Variables: (elisp)generalised
+     variable.
+
+ -- Function: decoded-time-hour time
+     Return the HOUR field of a ‘decoded-time’ record TIME.  It can also
+     be used as a *note Generalized Variables: (elisp)generalised
+     variable.
+
+ -- Function: decoded-time-day time
+     Return the DAY field of a ‘decoded-time’ record TIME.  It can also
+     be used as a *note Generalized Variables: (elisp)generalised
+     variable.
+
+ -- Function: decoded-time-month time
+     Return the MONTH field of a ‘decoded-time’ record TIME.  It can
+     also be used as a *note Generalized Variables: (elisp)generalised
+     variable.
+
+ -- Function: decoded-time-year time
+     Return the YEAR field of a ‘decoded-time’ record TIME.  It can also
+     be used as a *note Generalized Variables: (elisp)generalised
+     variable.
+
+ -- Function: decoded-time-weekday time
+     Return the WEEKDAY field of a ‘decoded-time’ record TIME.  It can
+     also be used as a *note Generalized Variables: (elisp)generalised
+     variable.
+
+ -- Function: decoded-time-dst time
+     Return the DST (daylight saving time indicator) field of a
+     ‘decoded-time’ record TIME.  It can also be used as a *note
+     Generalized Variables: (elisp)generalised variable.
+
+ -- Function: decoded-time-zone time
+     Return the ZONE field of a ‘decoded-time’ record TIME.  It can also
+     be used as a *note Generalized Variables: (elisp)generalised
+     variable.
+
+ -- Function: package-get-version
+     Return the version number of the package in which this is used.
+
+ -- Function: time-equal-p t1 t2
+     This returns ‘t’ if the two time values T1 and T2 are equal.
+
+     *Note (elisp)Time Calculations::.
+
+ -- Function: date-days-in-month year month
+     Return the number of days in MONTH in YEAR.  For instance, February
+     2020 has 29 days.
+
+     *Note (elisp)Time Calculations::.  This function requires the
+     ‘time-date’ feature to be loaded.
+
+ -- Function: date-ordinal-to-time year ordinal
+     Convert a YEAR/ORDINAL to the equivalent decoded-time structure.
+     ORDINAL is the number of days since the start of the year, with
+     January 1st being 1.
+
+     *Note (elisp)Time Calculations::.  This function requires the
+     ‘time-date’ feature to be loaded.
+
+ -- User Option: exec-path
+     The value of this variable is a list of directories to search for
+     programs to run in subprocesses.  Each element is either the name
+     of a directory (i.e., a string), or ‘nil’, which stands for the
+     default directory (which is the value of ‘default-directory’).
+     *Note executable-find: (elisp)Locating Files, for the details of
+     this search.
+
+     The value of ‘exec-path’ is used by ‘call-process’ and
+     ‘start-process’ when the PROGRAM argument is not an absolute file
+     name.
+
+     Generally, you should not modify ‘exec-path’ directly.  Instead,
+     ensure that your ‘PATH’ environment variable is set appropriately
+     before starting Emacs.  Trying to modify ‘exec-path’ independently
+     of ‘PATH’ can lead to confusing results.
+
+     *Note (elisp)Subprocess Creation::.
+
+ -- Function: provided-mode-derived-p mode &rest modes
+     This function returns non-‘nil’ if MODE is derived from any of the
+     major modes given by the symbols MODES.
+
+ -- Function: file-size-human-readable-iec size
+     Human-readable string for SIZE bytes, using IEC prefixes.
+
+ -- Function: make-empty-file filename &optional parents
+     This function creates an empty file named FILENAME.  As
+     ‘make-directory’, this function creates parent directories if
+     PARENTS is non-‘nil’.  If FILENAME already exists, this function
+     signals an error.
+
+ -- Function: text-property-search-forward prop &optional value
+          predicate not-current
+     Search for the next region that has text property PROP set to VALUE
+     according to PREDICATE.
+
+     This function is modeled after ‘search-forward’ and friends in that
+     it moves point, but it returns a structure that describes the match
+     instead of returning it in ‘match-beginning’ and friends.
+
+     If the text property can't be found, the function returns ‘nil’.
+     If it's found, point is placed at the end of the region that has
+     this text property match, and a ‘prop-match’ structure is returned.
+
+     PREDICATE can either be ‘t’ (which is a synonym for ‘equal’), ‘nil’
+     (which means "not equal"), or a predicate that will be called with
+     two parameters: The first is VALUE, and the second is the value of
+     the text property we're inspecting.
+
+     If NOT-CURRENT, if point is in a region where we have a match, then
+     skip past that and find the next instance instead.
+
+     The ‘prop-match’ structure has the following accessors:
+     ‘prop-match-beginning’ (the start of the match), ‘prop-match-end’
+     (the end of the match), and ‘prop-match-value’ (the value of
+     PROPERTY at the start of the match).
+
+     In the examples below, imagine that you're in a buffer that looks
+     like this:
+
+          This is a bold and here's bolditalic and this is the end.
+
+     That is, the "bold" words are the ‘bold’ face, and the "italic"
+     word is in the ‘italic’ face.
+
+     With point at the start:
+
+          (while (setq match (text-property-search-forward 'face 'bold t))
+            (push (buffer-substring (prop-match-beginning match)
+                                    (prop-match-end match))
+                  words))
+
+     This will pick out all the words that use the ‘bold’ face.
+
+          (while (setq match (text-property-search-forward 'face nil t))
+            (push (buffer-substring (prop-match-beginning match)
+                                    (prop-match-end match))
+                  words))
+
+     This will pick out all the bits that have no face properties, which
+     will result in the list ‘("This is a " "and here's " "and this is
+     the end")’ (only reversed, since we used ‘push’).
+
+          (while (setq match (text-property-search-forward 'face nil nil))
+            (push (buffer-substring (prop-match-beginning match)
+                                    (prop-match-end match))
+                  words))
+
+     This will pick out all the regions where ‘face’ is set to
+     something, but this is split up into where the properties change,
+     so the result here will be ‘("bold" "bold" "italic")’.
+
+     For a more realistic example where you might use this, consider
+     that you have a buffer where certain sections represent URLs, and
+     these are tagged with ‘shr-url’.
+
+          (while (setq match (text-property-search-forward 'shr-url nil nil))
+            (push (prop-match-value match) urls))
+
+     This will give you a list of all those URLs.
+
+     *Note (Property Search)elisp::.
+
+ -- Function: text-property-search-backward prop &optional value
+          predicate not-current
+     This is just like ‘text-property-search-forward’, but searches
+     backward instead.  Point is placed at the beginning of the matched
+     region instead of the end, though.
+
+     *Note (Property Search)elisp::.
+
+2.2.2 Extended Definitions
+--------------------------
+
+These functions must be called explicitly via ‘compat-call’, since their
+calling convention or behavior was extended in Emacs 27.1:
+
+ -- Function: compat-call recenter &optional count redisplay
+     This function scrolls the text in the selected window so that point
+     is displayed at a specified vertical position within the window.
+     It does not move point with respect to the text.
+
+     *Note (elisp)Textual Scrolling::.
+
+     This compatibility version adds support for the optional argument
+     REDISPLAY.
+
+ -- Function: compat-call lookup-key keymap key &optional
+          accept-defaults
+     This function returns the definition of KEY in KEYMAP.  If the
+     string or vector KEY is not a valid key sequence according to the
+     prefix keys specified in KEYMAP, it must be too long and have extra
+     events at the end that do not fit into a single key sequence.  Then
+     the value is a number, the number of events at the front of KEY
+     that compose a complete key.
+
+     *Note (elisp)Low-Level Key Binding::.
+
+     This compatibility version allows for KEYMAP to be a list of
+     keymaps, instead of just a singular keymap.
+
+ -- Macro: compat-call setq-local &rest pairs
+     PAIRS is a list of variable and value pairs.  This macro creates a
+     buffer-local binding in the current buffer for each of the
+     variables, and gives them a buffer-local value.  It is equivalent
+     to calling ‘make-local-variable’ followed by ‘setq’ for each of the
+     variables.  The variables should be unquoted symbols.
+
+          (setq-local var1 "value1"
+                      var2 "value2")
+
+     *Note (elisp)Creating Buffer-Local::.
+
+     This compatibility version allows for more than one variable to be
+     set at once, as can be done with ‘setq’.
+
+ -- Function: compat-call regexp-opt strings &optional paren
+     This function returns an efficient regular expression that will
+     match any of the strings in the list STRINGS.  This is useful when
+     you need to make matching or searching as fast as possible--for
+     example, for Font Lock mode.
+
+     *Note (elisp)Regexp Functions::.
+
+     The compatibility version of this functions handles the case where
+     STRINGS in an empty list.  In that case, a regular expression is
+     generated that never matches anything (see ‘regexp-unmatchable’).
+
+ -- Function: compat-call file-size-human-readable file-size &optional
+          flavor space unit
+     Return a string with a human readable representation of FILE-SIZE.
+
+     The optional second argument FLAVOR controls the units and the
+     display format.  If FLAVOR is...
+
+        • ‘si’, each kilobyte is 1000 bytes and the produced suffixes
+          are ‘k’, ‘M’, ‘G’, ‘T’, etc.
+        • ‘iec’, each kilobyte is 1024 bytes and the produced suffixes
+          are ‘KiB’, ‘MiB’, ‘GiB’, ‘TiB’, etc.
+        • ‘nil’ or omitted, each kilobyte is 1024 bytes and the produced
+          suffixes are ‘k’, ‘M’, ‘G’, ‘T’, etc.
+
+     The compatibility version handles the optional third (SPACE) and
+     forth (UNIT) arguments.  The argument SPACE can be a string that is
+     placed between the number and the unit.  The argument UNIT
+     determines the unit to use.  By default it will be an empty string,
+     unless FLAVOR is ‘iec’, in which case it will be ‘B’.
+
+ -- Function: compat-call assoc-delete-all key alist &optional test
+     This function is like ‘assq-delete-all’ except that it accepts an
+     optional argument TEST, a predicate function to compare the keys in
+     ALIST.  If omitted or ‘nil’, TEST defaults to ‘equal’.  As
+     ‘assq-delete-all’, this function often modifies the original list
+     structure of ALIST.
+
+     *Note (elisp)Association Lists::.
+
+     This compatibility version handles the optional third (TESTFN)
+     argument.
+
+ -- Function: compat-call executable-find program &optional remote
+     This function searches for the executable file of the named PROGRAM
+     and returns the absolute file name of the executable, including its
+     file-name extensions, if any.  It returns ‘nil’ if the file is not
+     found.  The function searches in all the directories in
+     ‘exec-path’, and tries all the file-name extensions in
+     ‘exec-suffixes’ (*note (elisp)Subprocess Creation::).
+
+     If REMOTE is non-‘nil’, and ‘default-directory’ is a remote
+     directory, PROGRAM is searched on the respective remote host.
+
+     *Note (elisp)Locating Files::.
+
+     This compatibility version adds support to handle the optional
+     second (REMOTE) argument.
+
+2.2.3 Missing Definitions
+-------------------------
+
+Compat does not provide support for the following Lisp features
+implemented in 27.1:
+
+   • The functions ‘base64url-encode-*’.
+   • The function ‘decoded-time-add’.
+   • The function ‘decoded-time-set-defaults’.
+   • The function ‘time-convert’.
+   • The macro ‘benchmark-progn’.
+   • Support for ‘condition-case’ to handle t.
+   • The function ‘file-system-info’.
+   • The function ‘group-name’.
+   • The function ‘face-extend-p’ and ‘set-face-extend’.
+   • Additional ‘format-spec’ modifiers.
+   • Support for additional body forms for
+     ‘define-globalized-minor-mode’.
+   • The macro ‘with-connection-local-variables’ and related
+     functionality.
+   • The ‘iso8601’ library.
+   • The ‘exif’ library.
+   • The ‘image-converter’ library.
+
+
+File: compat.info,  Node: Emacs 28.1,  Next: Emacs 29.1,  Prev: Emacs 27.1,  Up: Support
+
+2.3 Emacs 28.1
+==============
+
+2.3.1 Added Definitions
+-----------------------
+
+The following functions and macros are implemented in Emacs 28.1.  These
+functions are made available by Compat on Emacs versions older than
+28.1.
+
+   The ‘defcustom’ type ‘natnum’ and the ‘pcase’ pattern ‘cl-type’
+introduced in Emacs 28.1 are made available by Compat.
+
+ -- Function: process-lines-ignore-status program &rest args
+     This function is just like ‘process-lines’, but does not signal an
+     error if PROGRAM exits with a non-zero exit status.
+
+ -- Function: process-lines-handling-status program status-handler &rest
+          args
+     Execute PROGRAM with ARGS, returning its output as a list of lines.
+     If STATUS-HANDLER is non-nil, it must be a function with one
+     argument, which will be called with the exit status of the program
+     before the output is collected.  If STATUS-HANDLER is nil, an error
+     is signaled if the program returns with a non-zero exit status.
+
+ -- Function: text-quoting-style
+     You should not read the value of the variable ‘text-quoting-style’
+     directly.  Instead, use this function with the same name to
+     dynamically compute the correct quoting style on the current
+     terminal in the ‘nil’ case described above.
+
+ -- Function: string-search needle haystack &optional start-pos
+     Return the position of the first instance of NEEDLE in HAYSTACK,
+     both of which are strings.  If START-POS is non-‘nil’, start
+     searching from that position in NEEDLE.  Return ‘nil’ if no match
+     was found.  This function only considers the characters in the
+     strings when doing the comparison; text properties are ignored.
+     Matching is always case-sensitive.
+
+ -- Function: length= sequence length
+     Return non-‘nil’ if the length of SEQUENCE is equal to LENGTH.
+
+ -- Function: length< sequence length
+     Return non-‘nil’ if SEQUENCE is shorter than LENGTH.  This may be
+     more efficient than computing the length of SEQUENCE if SEQUENCE is
+     a long list.
+
+ -- Function: length> sequence length
+     Return non-‘nil’ if SEQUENCE is longer than LENGTH.
+
+ -- Function: file-name-concat directory &rest components
+     Concatenate COMPONENTS to DIRECTORY, inserting a slash before the
+     components if DIRECTORY or the preceding component didn't end with
+     a slash.
+
+          (file-name-concat "/tmp" "foo") ⇒ "/tmp/foo"
+
+     A DIRECTORY or components that are ‘nil’ or the empty string are
+     ignored--they are filtered out first and do not affect the results
+     in any way.
+
+     This is almost the same as using ‘concat’, but DIRNAME (and the
+     non-final components) may or may not end with slash characters, and
+     this function will not double those characters.
+
+ -- Function: garbage-collect-maybe factor
+     Suggest to run garbage collection, if _enough_ data has been
+     allocated.  This is determined by the positive numerical argument
+     FACTOR, that would proportionally increase the likelihood of
+     garbage collection taking place.
+
+     This compatibility function does nothing and ignores any
+     suggestion.
+
+ -- Function: string-replace from-string to-string in-string
+     This function replaces all occurrences of FROM-STRING with
+     TO-STRING in IN-STRING and returns the result.  It may return one
+     of its arguments unchanged, a constant string or a new string.
+     Case is significant, and text properties are ignored.
+
+ -- Function: always &rest arguments
+     This function ignores any ARGUMENTS and returns ‘t’.
+
+     *Note (elisp)Calling Functions::.
+
+ -- Function: make-separator-line &optional length
+     Make a string appropriate for usage as a visual separator line.  If
+     LENGTH is nil, use the window width.
+
+ -- Function: insert-into-buffer to-buffer &optional start end
+     This is like ‘insert-buffer-substring’, but works in the opposite
+     direction: The text is copied from the current buffer into
+     TO-BUFFER.  The block of text is copied to the current point in
+     TO-BUFFER, and point (in that buffer) is advanced to after the end
+     of the copied text.  Is ‘start’/‘end’ is ‘nil’, the entire text in
+     the current buffer is copied over.
+
+     *Note (elisp)Insertion::.
+
+ -- Function: replace-string-in-region string replacement &optional
+          start end
+     This function works similarly to ‘replace-regexp-in-region’, but
+     searches for, and replaces, literal STRINGs instead of regular
+     expressions.
+
+ -- Function: replace-regexp-in-string regexp rep string &optional
+          fixedcase literal subexp start
+     This function copies STRING and searches it for matches for REGEXP,
+     and replaces them with REP.  It returns the modified copy.  If
+     START is non-‘nil’, the search for matches starts at that index in
+     STRING, and the returned value does not include the first START
+     characters of STRING.  To get the whole transformed string,
+     concatenate the first START characters of STRING with the return
+     value.
+
+     This function uses ‘replace-match’ to do the replacement, and it
+     passes the optional arguments FIXEDCASE, LITERAL and SUBEXP along
+     to ‘replace-match’.
+
+     Instead of a string, REP can be a function.  In that case,
+     ‘replace-regexp-in-string’ calls REP for each match, passing the
+     text of the match as its sole argument.  It collects the value REP
+     returns and passes that to ‘replace-match’ as the replacement
+     string.  The match data at this point are the result of matching
+     REGEXP against a substring of STRING.
+
+ -- Function: buffer-local-boundp variable buffer
+     This returns non-‘nil’ if there's either a buffer-local binding of
+     VARIABLE (a symbol) in buffer BUFFER, or VARIABLE has a global
+     binding.
+
+     *Note (elisp)Creating Buffer-Local::.
+
+ -- Macro: with-existing-directory body...
+     This macro ensures that ‘default-directory’ is bound to an existing
+     directory before executing BODY.  If ‘default-directory’ already
+     exists, that's preferred, and otherwise some other directory is
+     used.  This macro can be useful, for instance, when calling an
+     external command that requires that it's running in a directory
+     that exists.  The chosen directory is not guaranteed to be
+     writable.
+
+     *Note (elisp)Testing Accessibility::.
+
+ -- Macro: dlet (bindings...) forms...
+     This special form is like ‘let’, but it binds all variables
+     dynamically.  This is rarely useful--you usually want to bind
+     normal variables lexically, and special variables (i.e., variables
+     that are defined with ‘defvar’) dynamically, and this is what ‘let’
+     does.
+
+     ‘dlet’ can be useful when interfacing with old code that assumes
+     that certain variables are dynamically bound (*note (elisp)Dynamic
+     Binding::), but it's impractical to ‘defvar’ these variables.
+     ‘dlet’ will temporarily make the bound variables special, execute
+     the forms, and then make the variables non-special again.
+
+     *Note (elisp)Local Variables::.
+
+ -- Function: ensure-list object
+     This function returns OBJECT as a list.  If OBJECT is already a
+     list, the function returns it; otherwise, the function returns a
+     one-element list containing OBJECT.
+
+     This is usually useful if you have a variable that may or may not
+     be a list, and you can then say, for instance:
+
+          (dolist (elem (ensure-list foo))
+            (princ elem))
+
+     *Note (elisp)Building Lists::.
+
+ -- Function: string-clean-whitespace string
+     Clean up the whitespace in STRING by collapsing stretches of
+     whitespace to a single space character, as well as removing all
+     whitespace from the start and the end of STRING.
+
+     *Note (elisp)Creating Strings::.
+
+ -- Function: string-fill string length
+     Attempt to Word-wrap STRING so that no lines are longer than
+     LENGTH.  Filling is done on whitespace boundaries only.  If there
+     are individual words that are longer than LENGTH, these will not be
+     shortened.
+
+     *Note (elisp)Creating Strings::.
+
+ -- Function: string-lines string &optional omit-nulls
+     Split STRING into a list of strings on newline boundaries.  If the
+     optional argument OMIT-NULLS is non-‘nil’, remove empty lines from
+     the results.  Note that this function returns trailing newlines on
+     Emacs 28, use ‘compat-call string-lines’ instead if you want
+     consistent behavior.
+
+ -- Function: string-pad string length &optional padding start
+     Pad STRING to be of the given LENGTH using PADDING as the padding
+     character.  PADDING defaults to the space character.  If STRING is
+     longer than LENGTH, no padding is done.  If START is ‘nil’ or
+     omitted, the padding is appended to the characters of STRING, and
+     if it's non-‘nil’, the padding is prepended to STRING's characters.
+
+     *Note (elisp)Creating Strings::.
+
+ -- Function: string-chop-newline string
+     Remove the final newline, if any, from STRING.
+
+     *Note (elisp)Creating Strings::.
+
+ -- Macro: named-let name bindings &rest body
+     This special form is a looping construct inspired from the Scheme
+     language.  It is similar to ‘let’: It binds the variables in
+     BINDINGS, and then evaluates BODY.  However, ‘named-let’ also binds
+     NAME to a local function whose formal arguments are the variables
+     in BINDINGS and whose body is BODY.  This allows BODY to call
+     itself recursively by calling NAME, where the arguments passed to
+     NAME are used as the new values of the bound variables in the
+     recursive invocation.
+
+     Recursive calls to NAME that occur in _tail positions_ in BODY are
+     guaranteed to be optimized as _tail calls_, which means that they
+     will not consume any additional stack space no matter how deeply
+     the recursion runs.  Such recursive calls will effectively jump to
+     the top of the loop with new values for the variables.
+
+     *Note (elisp)Local Variables::.
+
+ -- Function: file-name-with-extension filename extension
+     This function returns FILENAME with its extension set to EXTENSION.
+     A single leading dot in the EXTENSION will be stripped if there is
+     one.  For example:
+
+          (file-name-with-extension "file" "el")
+               ⇒ "file.el"
+          (file-name-with-extension "file" ".el")
+               ⇒ "file.el"
+          (file-name-with-extension "file.c" "el")
+               ⇒ "file.el"
+
+     Note that this function will error if FILENAME or EXTENSION are
+     empty, or if the FILENAME is shaped like a directory (i.e., if
+     ‘directory-name-p’ returns non-‘nil’).
+
+     *Note File Name Components: (elisp)File Name Components.
+
+ -- Function: directory-empty-p directory
+     This utility function returns ‘t’ if given DIRECTORY is an
+     accessible directory and it does not contain any files, i.e., is an
+     empty directory.  It will ignore ‘.’ and ‘..’ on systems that
+     return them as files in a directory.
+
+     Symbolic links to directories count as directories.  See
+     FILE-SYMLINK-P to distinguish symlinks.
+
+     *Note (elisp)Contents of Directories::.
+
+ -- Function: format-prompt prompt default &rest format-args
+     Format PROMPT with default value DEFAULT according to the
+     ‘minibuffer-default-prompt-format’ variable.
+
+     ‘minibuffer-default-prompt-format’ is a format string (defaulting
+     to ‘" (default %s)"’ that says how the "default" bit in prompts
+     like ‘"Local filename (default somefile): "’ are to be formatted.
+
+     To allow the users to customize how this is displayed, code that
+     prompts the user for a value (and has a default) should look
+     something along the lines of this code snippet:
+
+          (read-file-name
+           (format-prompt "Local filename" file)
+           nil file)
+
+     If FORMAT-ARGS is ‘nil’, PROMPT is used as a literal string.  If
+     FORMAT-ARGS is non-‘nil’, PROMPT is used as a format control
+     string, and PROMPT and FORMAT-ARGS are passed to ‘format’ (*note
+     (elisp)Formatting Strings::).
+
+     ‘minibuffer-default-prompt-format’ can be ‘""’, in which case no
+     default values are displayed.
+
+     If DEFAULT is ‘nil’, there is no default value, and therefore no
+     "default value" string is included in the result value.  If DEFAULT
+     is a non-‘nil’ list, the first element of the list is used in the
+     prompt.
+
+     *Note (elisp)Text from Minibuffer::.
+
+ -- Function: thing-at-mouse event thing &optional no-properties
+     Mouse-EVENT equivalent of ‘thing-at-point’.  THING can be ‘symbol’,
+     ‘list’, ‘sexp’, ‘filename’, ‘url’, ... among other things.
+
+     When NO-PROPERTIES has a non-‘nil’ value, any text properties that
+     might have been present in the buffer are stripped away.
+
+ -- Function: bounds-of-thing-at-mouse event thing
+     Determine start and end locations for THING at mouse click given by
+     EVENT.  Like ‘bounds-of-thing-at-point’, but tries to use the
+     position in EVENT where the mouse button is clicked to find the
+     thing nearby.
+
+ -- Function: mark-thing-at-mouse click thing
+     Activate the region around THING found near the mouse CLICK.
+
+ -- Function: macroexp-file-name
+     Return the name of the file in which the code is currently being
+     evaluated, or ‘nil’ if it cannot be determined.
+
+ -- Function: macroexp-warn-and-return msg form &optional category
+          compile-only arg
+     Return code equivalent to ‘form’ labeled with warning ‘msg’.
+
+ -- Macro: with-environment-variables variables body...
+     This macro sets the environment variables according to VARIABLES
+     temporarily when executing BODY.  The previous values are restored
+     when the form finishes.  The argument VARIABLES should be a list of
+     pairs of strings of the form ‘(VAR VALUE)’, where VAR is the name
+     of the environment variable and VALUE is that variable's value.
+
+          (with-environment-variables (("LANG" "C")
+                                       ("LANGUAGE" "en_US:en"))
+            (call-process "ls" nil t))
+
+     *Note System Environment: (elisp)System Environment.
+
+ -- Function: color-dark-p rgb
+     Whether RGB is more readable against white than black.  RGB is a
+     3-element list (R G B), each component in the range [0,1].  This
+     predicate can be used both for determining a suitable (black or
+     white) contrast color with RGB as background and as foreground.
+
+ -- Function: color-values-from-color-spec spec
+     Convert the textual color specification SPEC to a color triple
+     ‘(RED GREEN blue)’.  Each of RED, GREEN and ‘blue’ is a integer
+     value between 0 and 65535.
+
+     The specification SPEC can be one of the following
+        • ‘#RGB’, where R, G and B are hex numbers of equal length, 1-4
+          digits each.
+        • ‘rgb:R/G/B’, where R, G, and B are hex numbers, 1-4 digits
+          each.
+        • ‘rgbi:R/G/B’, where R, G and B are floating-point numbers in
+          [0,1].
+
+ -- Function: file-modes-number-to-symbolic modes
+     This function converts a numeric file mode specification in MODES
+     into the equivalent symbolic form.
+
+     *Note Changing Files: (elisp)Changing Files.
+
+ -- Function: file-backup-file-names filename
+     This function returns a list of all the backup file names for
+     FILENAME, or ‘nil’ if there are none.  The files are sorted by
+     modification time, descending, so that the most recent files are
+     first.
+
+     *Note (elisp)Backup Names::.
+
+ -- Function: make-lock-file-name filename
+     Return a string containing a lock file name for FILENAME, obeying
+     ‘lock-file-name-transforms’.
+
+ -- Function: decoded-time-period time
+     Interpret TIME as a period and return its length in seconds.  For
+     computational purposes, years are 365 days long and months are 30
+     days long.
+
+ -- Function: subr-primitive-p object
+     Return ‘t’ if OBJECT is a primitive, built-in function.  On systems
+     with native compilation ‘subrp’ does not distinguish between
+     built-in functions and functions that have been compiled.  If
+     native compilation is not available, this function behaves
+     identically to ‘subrp’.
+
+ -- Function: native-comp-available-p
+     This function returns non-‘nil’ if the running Emacs process has
+     the native-compilation support compiled into it.  On systems that
+     load ‘libgccjit’ dynamically, it also makes sure that library is
+     available and can be loaded.  Lisp programs that need to know up
+     front whether native-compilation is available should use this
+     predicate.
+
+ -- Macro: with-window-non-dedicated window &rest body
+     Evaluate BODY with WINDOW temporarily made non-dedicated.  If
+     WINDOW is nil, use the selected window.  Return the value of the
+     last form in BODY.
+
+2.3.2 Extended Definitions
+--------------------------
+
+These functions must be called explicitly via ‘compat-call’, since their
+calling convention or behavior was extended in Emacs 28.1:
+
+ -- Function: compat-call string-width string &optional from to
+     This function returns the width in columns of the string STRING, if
+     it were displayed in the current buffer and the selected window.
+     Optional arguments FROM and TO specify the substring of STRING to
+     consider, and are interpreted as in ‘substring’ (*note
+     (elisp)Creating Strings::).
+
+     The return value is an approximation: it only considers the values
+     returned by ‘char-width’ for the constituent characters, always
+     takes a tab character as taking ‘tab-width’ columns, ignores
+     display properties and fonts, etc.
+
+     *Note (elisp)Size of Displayed Text::.
+
+     This compatibility version handles the optional arguments FROM and
+     TO.
+
+ -- Function: compat-call count-windows
+     Return the number of live windows on the selected frame.
+
+     The optional argument MINIBUF specifies whether the minibuffer
+     window is included in the count.
+
+     If ALL-FRAMES is non-‘nil’, count the windows in all frames instead
+     just the selected frame.
+
+     This compatibility version handles the optional argument
+     ALL-FRAMES.
+
+2.3.3 Missing Definitions
+-------------------------
+
+Compat does not provide support for the following Lisp features
+implemented in 28.1:
+
+   • Support for ‘interactive’ or ‘declare’ to list applicable modes.
+   • Support for ‘:interactive’ argument to ‘define-minor-mode’ and
+     ‘define-derived-mode’.
+   • Support for ‘:predicate’ argument to
+     ‘define-globalized-minor-mode’.
+   • Support for the ‘:success’ handler of ‘condition-case’.
+   • The function ‘benchmark-call’.
+   • Additional Edebug keywords.
+   • The libjansson JSON APIs, e.g., ‘json-parse-string’.
+   • The macro ‘pcase-setq’.
+   • The function ‘custom-add-choice’.
+   • The functions ‘dom-print’ and ‘dom-remove-attribute’.
+   • The function ‘dns-query-asynchronous’.
+   • The function ‘get-locale-names’.
+   • The functions ‘mail-header-parse-addresses-lax’ and
+     ‘mail-header-parse-address-lax’.
+   • The function ‘num-processors’.
+   • The function ‘object-intervals’.
+   • The function ‘require-theme’.
+   • The function ‘syntax-class-to-char’.
+   • The function ‘path-separator’.
+   • The function ‘null-device’.
+   • The function ‘macroexp-compiling-p’.
+   • The function ‘split-string-shell-command’.
+   • The function ‘string-limit’.
+   • The functions ‘innermost-minibuffer-p’ and
+     ‘minibuffer-innermost-command-loop-p’.
+   • The function ‘max-mini-window-lines’.
+   • The function ‘lock-file’ and ‘unlock-file’.
+   • The ‘multisession’ library.
+
+
+File: compat.info,  Node: Emacs 29.1,  Next: Emacs 30.1,  Prev: Emacs 28.1,  Up: Support
+
+2.4 Emacs 29.1
+==============
+
+2.4.1 Added Definitions
+-----------------------
+
+The following functions and macros are implemented in Emacs 29.1.  These
+functions are made available by Compat on Emacs versions older than
+29.1.  Note that due to upstream changes, it might happen that there
+will be the need for changes, so use these functions with care.
+
+   The ‘defcustom’ type ‘key’ introduced in Emacs 29.1 is made available
+by Compat.
+
+ -- Variable: untrusted-content
+     Non-nil means that current buffer originated from an untrusted
+     source.  Email clients and some other modes may set this non-nil to
+     mark the buffer contents as untrusted.  This variable might be
+     subject to change without notice.
+
+ -- Variable: lisp-directory
+     This variable holds a string naming the directory which holds
+     Emacs's own ‘*.el’ and ‘*.elc’ files.  This is usually the place
+     where those files are located in the Emacs installation tree,
+     unless Emacs is run from its build directory in which case it
+     points to the ‘lisp’ subdirectory in the source directory from
+     which Emacs was built.
+
+ -- Function: count-sentences start end
+     Count sentences in current buffer from START to END.
+
+ -- Function: readablep object
+     This predicate says whether OBJECT has “readable syntax”, i.e., it
+     can be written out and then read back by the Emacs Lisp reader.  If
+     it can't, this function returns ‘nil’; if it can, this function
+     returns a printed representation (via ‘prin1’).
+
+ -- Function: substitute-quotes string
+     This function works like ‘substitute-command-keys’, but only
+     replaces quote characters.
+
+ -- Function: get-scratch-buffer-create
+     Return the *scratch* buffer, creating a new one if needed.
+
+ -- Function: use-region-noncontiguous-p
+     Return non-nil for a non-contiguous region if ‘use-region-p’.
+
+ -- Function: use-region-end
+     Return the end of the region if ‘use-region-p’.
+
+ -- Function: use-region-beginning
+     Return the start of the region if ‘use-region-p’.
+
+ -- Macro: buffer-local-set-state variable value...
+     Minor modes often set buffer-local variables that affect some
+     features in Emacs.  When a minor mode is switched off, the mode is
+     expected to restore the previous state of these variables.  This
+     convenience macro helps with doing that: It works much like
+     ‘setq-local’, but returns an object that can be used to restore
+     these values back to their previous values/states (using the
+     companion function ‘buffer-local-restore-state’).
+
+ -- Function: delete-line
+     Delete the current line.
+
+ -- Function: list-of-strings-p object
+     Return ‘t’ if OBJECT is ‘nil’ or a list of strings.
+
+ -- Function: plistp object
+     Non-nil if and only if OBJECT is a valid plist.
+
+ -- Macro: with-memoization PLACE CODE...
+     This macro provides a simple way to do memoization.  CODE is
+     evaluated and then stashed in PLACE.  If PLACE's value is
+     non-‘nil’, return that value instead of evaluating CODE.
+
+ -- Special Form: with-restriction start end [:label label] body
+     This special form saves the current bounds of the accessible
+     portion of the buffer, sets the accessible portion to start at
+     START and end at END, evaluates the BODY forms, and restores the
+     saved bounds.  In that case it is equivalent to
+
+          (save-restriction
+            (narrow-to-region start end)
+            body)
+
+     When the optional argument LABEL, a symbol, is present, the
+     narrowing is “labeled”.  A labeled narrowing differs from a
+     non-labeled one in several ways:
+
+        • During the evaluation of the BODY form, ‘narrow-to-region’ and
+          ‘widen’ can be used only within the START and END limits.
+
+        • To lift the restriction introduced by ‘with-restriction’ and
+          gain access to other portions of the buffer, use
+          ‘without-restriction’ with the same LABEL argument.  (Another
+          way to gain access to other portions of the buffer is to use
+          an indirect buffer (*note (elisp)Indirect Buffers::).)
+
+        • Labeled narrowings can be nested.
+
+        • Labeled narrowings can only be used in Lisp programs: they are
+          never visible on display, and never interfere with narrowings
+          set by the user.
+
+     If you use ‘with-restriction’ with the optional LABEL argument, we
+     recommend documenting the LABEL in the doc strings of the functions
+     which use it, so that other Lisp programs your code calls could
+     lift the labeled narrowing if and when it needs.
+
+ -- Special Form: without-restriction [:label label] body
+     This special form saves the current bounds of the accessible
+     portion of the buffer, widens the buffer, evaluates the BODY forms,
+     and restores the saved bounds.  In that case it is equivalent to
+
+          (save-restriction
+            (widen)
+            body)
+
+     When the optional argument LABEL is present, the narrowing set by
+     ‘with-restriction’ with the same LABEL argument is lifted.
+
+ -- Function: pos-bol &optional count
+     Like ‘line-beginning-position’, but ignores fields (and is more
+     efficient).
+
+ -- Function: pos-eol &optional count
+     Like ‘line-end-position’, but ignores fields (and is more
+     efficient).
+
+ -- Function: char-uppercase-p char
+     Return non-‘nil’ if CHAR is an uppercase character according to
+     Unicode.
+
+ -- Macro: with-delayed-message (timeout message) body...
+     Sometimes it's unclear whether an operation will take a long time
+     to execute or not, or it can be inconvenient to implement a
+     progress reporter.  This macro can be used in those situations.
+
+          (with-delayed-message (2 (format "Gathering data for %s" entry))
+            (setq data (gather-data entry)))
+
+     In this example, if the body takes more than two seconds to
+     execute, the message will be displayed.  If it takes a shorter time
+     than that, the message won't be displayed.  In either case, the
+     body is evaluated as normally, and the return value of the final
+     element in the body is the return value of the macro.
+
+     The MESSAGE element is evaluated before BODY, and is always
+     evaluated, whether the message is displayed or not.
+
+ -- Function: funcall-with-delayed-message timeout message function
+     Like ‘funcall’, but display MESSAGE if FUNCTION takes longer than
+     TIMEOUT.  TIMEOUT is a number of seconds, and can be an integer or
+     a floating point number.
+
+     If FUNCTION takes less time to execute than TIMEOUT seconds,
+     MESSAGE is not displayed.
+
+ -- Function: buttonize string callback &optional data help-echo
+     Sometimes it's more convenient to make a string into a button
+     without inserting it into a buffer immediately, for instance when
+     creating data structures that may then, later, be inserted into a
+     buffer.  This function makes STRING into such a string, and
+     CALLBACK will be called when the user clicks on the button.  The
+     optional DATA parameter will be used as the parameter when CALLBACK
+     is called.  If ‘nil’, the button is used as the parameter instead.
+
+ -- Function: buttonize-region start end callback &optional data
+          help-echo
+     Make the region between START and END into a button.  When clicked,
+     CALLBACK will be called with the DATA as the function argument.  If
+     DATA isn't present (or is nil), the button itself will be used
+     instead as the function argument.  If HELP-ECHO, use that as the
+     help-echo property.
+
+ -- Function: get-display-property position prop &optional object
+          properties
+     This convenience function can be used to get a specific display
+     property, no matter whether the ‘display’ property is a vector, a
+     list or a simple property.  This is like ‘get-text-property’ (*note
+     Examining Properties: (elisp)Examining Properties.), but works on
+     the ‘display’ property only.
+
+     POSITION is the position in the buffer or string to examine, and
+     PROP is the ‘display’ property to return.  The optional OBJECT
+     argument should be either a string or a buffer, and defaults to the
+     current buffer.  If the optional PROPERTIES argument is non-‘nil’,
+     it should be a ‘display’ property, and in that case, POSITION and
+     OBJECT are ignored.  (This can be useful if you've already gotten
+     the ‘display’ property with ‘get-char-property’, for instance
+     (*note Examining Properties: (elisp)Examining Properties.).
+
+ -- Function: add-display-text-property start end prop value &optional
+          object
+     Add display property PROP with VALUE to the text from START to END.
+     If any text in the region has a non-nil ‘display’ property, those
+     properties are retained.
+
+     If OBJECT is non-‘nil’, it should be a string or a buffer.  If
+     ‘nil’, this defaults to the current buffer.
+
+ -- Function: take n list
+     This function returns the N first elements of LIST.  Essentially,
+     it returns the part of LIST that ‘nthcdr’ skips.
+
+     ‘take’ returns LIST if shorter than N elements; it returns ‘nil’ if
+     N is zero or negative.
+
+          (take 3 '(a b c d))
+               ⇒ (a b c)
+          (take 10 '(a b c d))
+               ⇒ (a b c d)
+          (take 0 '(a b c d))
+               ⇒ nil
+
+ -- Function: ntake n list
+     This is a version of ‘take’ that works by destructively modifying
+     the list structure of the argument.  That makes it faster, but the
+     original value of LIST may be lost.
+
+     ‘ntake’ returns LIST unmodified if shorter than N elements; it
+     returns ‘nil’ if N is zero or negative.  Otherwise, it returns LIST
+     truncated to its first N elements.
+
+     This means that it is usually a good idea to use the return value
+     and not just rely on the truncation effect unless N is known to be
+     positive.
+
+ -- Function: compiled-function-p object
+     This function returns ‘t’ if OBJECT is a function object that is
+     not in the form of ELisp source code but something like machine
+     code or byte code instead.  More specifically it returns ‘t’ if the
+     function is built-in, or byte-compiled, or natively-compiled, or a
+     function loaded from a dynamic module.
+
+ -- Function: function-alias-p object &optional noerror
+     Checks whether OBJECT is a function alias.  If it is, it returns a
+     list of symbols representing the function alias chain, else ‘nil’.
+     For instance, if ‘a’ is an alias for ‘b’, and ‘b’ is an alias for
+     ‘c’:
+
+          (function-alias-p 'a)
+              ⇒ (b c)
+
+     If there's a loop in the definitions, an error will be signalled.
+     If NOERROR is non-‘nil’, the non-looping parts of the chain is
+     returned instead.
+
+ -- Function: string-equal-ignore-case string1 string2
+     ‘string-equal-ignore-case’ compares strings ignoring case
+     differences, like ‘char-equal’ when ‘case-fold-search’ is ‘t’.
+
+     *Note (elisp)Text Comparison::.
+
+ -- Function: string-split string &optional separators omit-nulls trim
+     ‘string-split’ is an alias for the function ‘split-string’.  The
+     name follows the convention of other string functions.
+
+     *Note (elisp)Creating Strings::.
+
+ -- Function: buffer-match-p condition buffer-or-name &optional arg
+     This function checks if a buffer designated by ‘buffer-or-name’
+     satisfies a ‘condition’.  Optional third argument ARG is passed to
+     the predicate function in CONDITION.  A condition can be one of the
+     following:
+        • A string, interpreted as a regular expression.  The buffer
+          satisfies the condition if the regular expression matches the
+          buffer name.
+        • A predicate function, which should return non-‘nil’ if the
+          buffer matches.  If the function expects one argument, it is
+          called with BUFFER-OR-NAME as the argument; if it expects 2
+          arguments, the first argument is BUFFER-OR-NAME and the second
+          is ARG (or ‘nil’ if ARG is omitted).
+        • A cons-cell ‘(OPER . EXPR)’ where OPER is one of
+          ‘not’
+               Satisfied if EXPR doesn't satisfy ‘buffer-match-p’ with
+               the same buffer and ‘arg’.
+          ‘or’
+               Satisfied if EXPR is a list and _any_ condition in EXPR
+               satisfies ‘buffer-match-p’, with the same buffer and
+               ‘arg’.
+          ‘and’
+               Satisfied if EXPR is a list and _all_ conditions in EXPR
+               satisfy ‘buffer-match-p’, with the same buffer and ‘arg’.
+          ‘derived-mode’
+               Satisfied if the buffer's major mode derives from EXPR.
+          ‘major-mode’
+               Satisfied if the buffer's major mode is equal to EXPR.
+               Prefer using ‘derived-mode’ instead when both can work.
+        • t Satisfied by any buffer.  A convenient alternative to ‘""’
+          (empty string), ‘(and)’ (empty conjunction) or ‘always’.
+
+     *Note (elisp)Buffer List::.
+
+ -- Function: match-buffers condition &optional buffers arg
+     This function returns a list of all buffers that satisfy a
+     ‘condition’, as defined for ‘buffer-match-p’.  By default all
+     buffers are considered, but this can be restricted via the second
+     optional ‘buffer-list’ argument.  Optional third argument ARG will
+     be used by CONDITION in the same way as ‘buffer-match-p’ does.
+
+     *Note (elisp)Buffer List::.
+
+ -- Function: string-glyph-split string
+     When character compositions are in effect, sequence of characters
+     can be composed for display to form _grapheme clusters_, for
+     example to display accented characters, or ligatures, or Emoji, or
+     when complex text shaping requires that for some scripts.  When
+     that happens, characters no longer map in a simple way to display
+     columns, and display layout decisions with such strings, such as
+     truncating too wide strings, can be a complex job.  This function
+     helps in performing such jobs: it splits up its argument STRING
+     into a list of substrings, where each substring produces a single
+     grapheme cluster that should be displayed as a unit.  Lisp programs
+     can then use this list to construct visually-valid substrings of
+     STRING which will look correctly on display, or compute the width
+     of any substring of STRING by adding the width of its constituents
+     in the returned list, etc.
+
+     For instance, if you want to display a string without the first
+     glyph, you can say:
+
+          (apply #'insert (cdr (string-glyph-split string))))
+
+     *Note (elisp)Size of Displayed Text::.
+
+ -- Function: string-glyph-compose string
+     Compose STRING according to the Unicode NFC. This returns a new
+     string obtained by canonical decomposition of STRING followed by
+     canonical composition, a.k.a.  the "Unicode Normalization Form C"
+     of STRING.
+
+ -- Function: string-glyph-decompose string
+     Decompose STRING according to the Unicode NFD. This returns a new
+     string that is the canonical decomposition of STRING, a.k.a.  the
+     "Unicode Normalization Form D" of STRING.
+
+ -- Macro: with-buffer-unmodified-if-unchanged &rest body...
+     Evaluate BODY like ‘progn’, but change buffer-modified status only
+     if buffer text changes.  If the buffer was unmodified before
+     execution of BODY, and buffer text after execution of BODY is
+     identical to what it was before, ensure that buffer is still marked
+     unmodified afterwards.
+
+     Note that only changes in the raw byte sequence of the buffer text,
+     as stored in the internal representation, are monitored for the
+     purpose of detecting the lack of changes in buffer text.  Any other
+     changes that are normally perceived as "buffer modifications", such
+     as changes in text properties, ‘buffer-file-coding-system’, buffer
+     multibyteness, etc.  - will not be noticed, and the buffer will
+     still be marked unmodified, effectively ignoring those changes.
+
+ -- Function: file-attribute-file-identifier
+     Return the fields ‘(inodenum device)’ as a list from attributes
+     generated by ‘file-attributes’.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: file-name-split filename
+     This function splits a file name into its components, and can be
+     thought of as the inverse of ‘string-join’ with the appropriate
+     directory separator.  For example,
+
+          (file-name-split "/tmp/foo.txt")
+              ⇒ ("" "tmp" "foo.txt")
+          (string-join (file-name-split "/tmp/foo.txt") "/")
+              ⇒ "/tmp/foo.txt"
+
+ -- Function: file-name-parent-directory filename
+     This function returns the directory name of the parent directory of
+     FILENAME.  If FILENAME is at the root directory of the filesystem,
+     it returns ‘nil’.  A relative FILENAME is assumed to be relative to
+     ‘default-directory’, and the return value will also be relative in
+     that case.  If the return value is non-‘nil’, it ends in a slash.
+
+     *Note (elisp)Directory Names::.
+
+ -- Function: file-has-changed-p file &optional tag
+     This function returns non-‘nil’ if the time stamp of FILENAME has
+     changed since the last call.  When called for the first time for
+     some FILENAME, it records the last modification time and size of
+     the file, and returns non-‘nil’ when FILENAME exists.  Thereafter,
+     when called for the same FILENAME, it compares the current time
+     stamp and size with the recorded ones, and returns non-‘nil’ only
+     if either the time stamp or the size (or both) are different.  This
+     is useful when a Lisp program wants to re-read a file whenever it
+     changes.  With an optional argument TAG, which must be a symbol,
+     the size and modification time comparisons are limited to calls
+     with the same tag.
+
+     *Note (elisp)File Attributes::.
+
+ -- Function: directory-abbrev-make-regexp directory
+     Create a regexp to match DIRECTORY for ‘directory-abbrev-alist’.
+
+ -- Function: directory-abbrev-apply filename
+     Apply the abbreviations in ‘directory-abbrev-alist’ to FILENAME.
+     Note that when calling this, you should set ‘case-fold-search’ as
+     appropriate for the filesystem used for FILENAME.
+
+ -- Function: key-valid-p keys
+     Say whether KEYS is a valid key.  A key is a string consisting of
+     one or more key strokes.  The key strokes are separated by single
+     space characters.
+
+     Each key stroke is either a single character, or the name of an
+     event, surrounded by angle brackets.  In addition, any key stroke
+     may be preceded by one or more modifier keys.  Finally, a limited
+     number of characters have a special shorthand syntax.
+
+     Here's some example key sequences.
+
+     ‘f’
+          The key ‘f’.
+     ‘S o m’
+          A three key sequence of the keys ‘S’, ‘o’ and ‘m’.
+     ‘C-c o’
+          A two key sequence of the keys ‘c’ with the control modifier
+          and then the key ‘o’.
+     ‘H-<left>’
+          The key named "left" with the hyper modifier.
+     ‘M-RET’
+          The "return" key with a meta modifier.
+     ‘C-M-<space>’
+          The "space" key with both the control and meta modifiers.
+
+     These are the characters that have shorthand syntax: ‘NUL’, ‘RET’,
+     ‘TAB’, ‘LFD’, ‘ESC’, ‘SPC’, ‘DEL’.
+
+     Modifiers have to be specified in this order
+     Alt (A)-Control (C)-Hyper (H)-Meta (M)-Shift (s)-Super (s)
+
+ -- Function: key-parse keys
+     Convert KEYS to the internal Emacs key representation.  See
+     ‘key-valid-p’ for a description of valid key sequences.  Examples
+     include ‘f’, ‘C-c C-c’, ‘H-<left>’, ‘M-RET’ or ‘C-M-<return>’.
+
+ -- Function: keymap-set keymap key definition
+     This function sets the binding for KEY in KEYMAP.  (If KEY is more
+     than one event long, the change is actually made in another keymap
+     reached from KEYMAP.)  The argument BINDING can be any Lisp object,
+     but only certain types are meaningful.  (For a list of meaningful
+     types, see *note (elisp)Key Lookup::.)  The value returned by
+     ‘keymap-set’ is BINDING.
+
+     If KEY is ‘<t>’, this sets the default binding in KEYMAP.  When an
+     event has no binding of its own, the Emacs command loop uses the
+     keymap's default binding, if there is one.
+
+     Every prefix of KEY must be a prefix key (i.e., bound to a keymap)
+     or undefined; otherwise an error is signaled.  If some prefix of
+     KEY is undefined, then ‘keymap-set’ defines it as a prefix key so
+     that the rest of KEY can be defined as specified.
+
+     If there was previously no binding for KEY in KEYMAP, the new
+     binding is added at the beginning of KEYMAP.  The order of bindings
+     in a keymap makes no difference for keyboard input, but it does
+     matter for menu keymaps (*note (elisp)Menu Keymaps::).
+
+     *Note (elisp)Changing Key Bindings::.
+
+ -- Function: keymap-global-set key command
+     This function sets the binding of KEY in the current global map to
+     BINDING.
+
+          (keymap-global-set KEY BINDING)
+          ≡
+          (keymap-set (current-global-map) KEY BINDING)
+
+     *Note (elisp)Key Binding Commands::.
+
+ -- Function: keymap-local-set key command
+     This function sets the binding of KEY in the current local keymap
+     to BINDING.
+
+          (keymap-local-set KEY BINDING)
+          ≡
+          (keymap-set (current-local-map) KEY BINDING)
+
+     *Note (elisp)Key Binding Commands::.
+
+ -- Function: keymap-global-unset key &optional remove
+     This function removes the binding of KEY from the current global
+     map.
+
+     One use of this function is in preparation for defining a longer
+     key that uses KEY as a prefix--which would not be allowed if KEY
+     has a non-prefix binding.  For example:
+
+          (keymap-global-unset "C-l")
+              ⇒ nil
+          (keymap-global-set "C-l C-l" 'redraw-display)
+              ⇒ nil
+
+     *Note (elisp)Key Binding Commands::.
+
+ -- Function: keymap-local-unset key &optional remove
+     This function removes the binding of KEY from the current local
+     map.
+
+     *Note (elisp)Key Binding Commands::.
+
+ -- Function: keymap-substitute keymap olddef newdef &optional oldmap
+          prefix
+     Replace OLDDEF with NEWDEF for any keys in KEYMAP now defined as
+     OLDDEF.  In other words, OLDDEF is replaced with NEWDEF wherever it
+     appears.  Alternatively, if optional fourth argument OLDMAP is
+     specified, we redefine in KEYMAP as NEWDEF those keys that are
+     defined as OLDDEF in OLDMAP.
+
+ -- Function: keymap-lookup keymap key &optional accept-default no-remap
+          position
+     This function returns the definition of KEY in KEYMAP.  All the
+     other functions described in this chapter that look up keys use
+     ‘keymap-lookup’.  Here are examples:
+
+          (keymap-lookup (current-global-map) "C-x C-f")
+              ⇒ find-file
+          (keymap-lookup (current-global-map) "C-x C-f 1 2 3 4 5")
+              ⇒ 2
+
+     *Note (elisp)Functions for Key Lookup::.
+
+ -- Function: keymap-local-lookup keys &optional accept-default
+     Like ‘keymap-lookup’, but restricting the search for commands bound
+     to KEYS to the current local keymap.
+
+ -- Function: keymap-global-lookup keys &optional accept-default
+     Like ‘keymap-lookup’, but restricting the search for commands bound
+     to KEYS to the current global keymap.
+
+ -- Function: define-keymap &rest definitions
+     You can create a keymap with the functions described above, and
+     then use ‘keymap-set’ (*note (elisp)Changing Key Bindings::) to
+     specify key bindings in that map.  When writing modes, however, you
+     frequently have to bind a large number of keys at once, and using
+     ‘keymap-set’ on them all can be tedious and error-prone.  Instead
+     you can use ‘define-keymap’, which creates a keymap and binds a
+     number of keys.  Here's a very basic example:
+
+          (define-keymap
+            "n" #'forward-line
+            "f" #'previous-line
+            "C-c C-c" #'quit-window)
+
+     This function creates a new sparse keymap, defines the keystrokes
+     in PAIRS, and returns the new keymap.
+
+     PAIRS is a list of alternating key bindings and key definitions, as
+     accepted by ‘keymap-set’.  In addition, the key can be the special
+     symbol ‘:menu’, in which case the definition should be a menu
+     definition as accepted by ‘easy-menu-define’ (*note (elisp)Easy
+     Menu::).  Here's a brief example of this usage:
+
+          (define-keymap :full t
+            "g" #'eww-reload
+            :menu '("Eww"
+                    ["Exit" quit-window t]
+                    ["Reload" eww-reload t]))
+
+     A number of keywords can be used before the key/definition pairs to
+     change features of the new keymap.  If any of the feature keywords
+     is missing from the ‘define-keymap’ call, the default value for
+     that feature is ‘nil’.  Here's a list of the available feature
+     keywords:
+
+     ‘:full’
+          If non-‘nil’, create a char-table keymap (as from
+          ‘make-keymap’) instead of a sparse keymap (as from
+          ‘make-sparse-keymap’ (*note (elisp)Creating Keymaps::).  A
+          sparse keymap is the default.
+
+     ‘:parent’
+          If non-‘nil’, the value should be a keymap to use as the
+          parent (*note (elisp)Inheritance and Keymaps::).
+
+     ‘:keymap’
+          If non-‘nil’, the value should be a keymap.  Instead of
+          creating a new keymap, the specified keymap is modified
+          instead.
+
+     ‘:suppress’
+          If non-‘nil’, the keymap will be suppressed with
+          ‘suppress-keymap’ (*note (elisp)Changing Key Bindings::).  By
+          default, digits and the minus sign are exempt from
+          suppressing, but if the value is ‘nodigits’, this suppresses
+          digits and minus-sign like it does with other characters.
+
+     ‘:name’
+          If non-‘nil’, the value should be a string to use as the menu
+          for the keymap if you use it as a menu with ‘x-popup-menu’
+          (*note (elisp)Pop-Up Menus::).
+
+     ‘:prefix’
+          If non-‘nil’, the value should be a symbol to be used as a
+          prefix command (*note (elisp)Prefix Keys::).  If this is the
+          case, this symbol is returned by ‘define-keymap’ instead of
+          the map itself.
+
+ -- Function: defvar-keymap (variable-name &rest defs)
+     By far, the most common thing to do with a keymap is to bind it to
+     a variable.  This is what virtually all modes do--a mode called
+     ‘foo’ almost always has a variable called ‘foo-mode-map’.
+
+     This macro defines NAME as a variable, passes OPTIONS and PAIRS to
+     ‘define-keymap’, and uses the result as the default value for the
+     variable.
+
+     OPTIONS is like the keywords in ‘define-keymap’, but there's an
+     additional ‘:doc’ keyword that provides the doc string for the
+     defined variable.
+
+     Here's an example:
+
+          (defvar-keymap eww-textarea-map
+            :parent text-mode-map
+            "RET" #'forward-line
+            "TAB" #'shr-next-link)
+
+ -- Macro: while-let spec then-forms...
+     Like ‘when-let’, but repeat until a binding in SPEC is ‘nil’.  The
+     return value is always ‘nil’.
+
+     This is comparable to ‘and-let*’.
+
+ -- Function: window-configuration-equal-p config1 config2
+     This function says whether two window configurations have the same
+     window layout, but ignores the values of point and the saved
+     scrolling positions--it can return ‘t’ even if those aspects
+     differ.
+
+ -- Macro: ert-with-temp-file name &rest body
+     Bind NAME to the name of a new temporary file and evaluate BODY.
+     Delete the temporary file after BODY exits normally or non-locally.
+     NAME will be bound to the file name of the temporary file.  See the
+     docstring for supported keyword arguments.
+
+ -- Macro: ert-with-temp-directory name &rest body
+     Bind NAME to the name of a new temporary directory and evaluate
+     BODY.  Delete the temporary directory after BODY exits normally or
+     non-locally.
+
+     NAME is bound to the directory name, not the directory file name.
+     (In other words, it will end with the directory delimiter; on
+     Unix-like systems, it will end with "/".)
+
+     The same keyword arguments are supported as in ‘ert-with-temp-file’
+     (which see), except for ‘:text’.
+
+ -- Function: cl-constantly value
+     Return a function that takes any number of arguments, but returns
+     VALUE.
+
+ -- Macro: cl-with-gensyms names... body
+     This macro expands to code that executes BODY with each of the
+     variables in NAMES bound to a fresh uninterned symbol, or “gensym”,
+     in Common Lisp parlance.  For macros requiring more than one
+     gensym, use of ‘cl-with-gensyms’ shortens the code and renders
+     one's intentions clearer.  Compare:
+
+          (defmacro my-macro (foo)
+            (let ((bar (gensym "bar"))
+                  (baz (gensym "baz"))
+                  (quux (gensym "quux")))
+              `(let ((,bar (+ ...)))
+                 ...)))
+
+          (defmacro my-macro (foo)
+            (cl-with-gensyms (bar baz quux)
+              `(let ((,bar (+ ...)))
+                 ...)))
+
+ -- Macro: cl-once-only ((variable form)...) body
+     This macro is primarily to help the macro programmer ensure that
+     forms supplied by the user of the macro are evaluated just once by
+     its expansion even though the result of evaluating the form is to
+     occur more than once.  Less often, this macro is used to ensure
+     that forms supplied by the macro programmer are evaluated just
+     once.
+
+     Each VARIABLE may be used to refer to the result of evaluating FORM
+     in BODY.  ‘cl-once-only’ binds each VARIABLE to a fresh uninterned
+     symbol during the evaluation of BODY.  Then, ‘cl-once-only’ wraps
+     the final expansion in code to evaluate each FORM and bind the
+     result to the corresponding uninterned symbol.  Thus, when the
+     macro writer substitutes the value for VARIABLE into the expansion
+     they are effectively referring to the result of evaluating FORM,
+     rather than FORM itself.  Another way to put this is that each
+     VARIABLE is bound to an expression for the (singular) result of
+     evaluating FORM.
+
+     The most common case is where VARIABLE is one of the arguments to
+     the macro being written, so ‘(variable variable)’ may be
+     abbreviated to just ‘variable’.
+
+     For example, consider this macro:
+
+          (defmacro my-list (x y &rest forms)
+            (let ((x-result (gensym))
+                  (y-result (gensym)))
+              `(let ((,x-result ,x)
+                     (,y-result ,y))
+                 (list ,x-result ,y-result ,x-result ,y-result
+                       (progn ,@forms))))
+
+     In a call like ‘(my-list (pop foo) ...)’ the intermediate binding
+     to ‘x-result’ ensures that the ‘pop’ is not done twice.  But as a
+     result the code is rather complex: the reader must keep track of
+     how ‘x-result’ really just means the first parameter of the call to
+     the macro, and the required use of multiple gensyms to avoid
+     variable capture by ‘(progn ,@forms)’ obscures things further.
+     ‘cl-once-only’ takes care of these details:
+
+          (defmacro my-list (x y &rest forms)
+            (cl-once-only (x y)
+              `(list ,x ,y ,x ,y
+                     (progn ,@forms))))
+
+2.4.2 Extended Definitions
+--------------------------
+
+These functions must be called explicitly via ‘compat-call’, since their
+calling convention or behavior was extended in Emacs 29.1:
+
+ -- Function: compat-call set-transient-map keymap &optional keep-pred
+          on-exit message timeout
+     This function adds KEYMAP as a “transient” keymap, which takes
+     precedence over other keymaps for one (or more) subsequent keys.
+
+     Normally, KEYMAP is used just once, to look up the very next key.
+     If the optional argument KEEP-PRED is ‘t’, the map stays active as
+     long as the user types keys defined in KEYMAP; when the user types
+     a key that is not in KEYMAP, the transient keymap is deactivated
+     and normal key lookup continues for that key.
+
+     The KEEP-PRED argument can also be a function.  In that case, the
+     function is called with no arguments, prior to running each
+     command, while KEYMAP is active; it should return non-‘nil’ if
+     KEYMAP should stay active.
+
+     The optional argument ON-EXIT, if non-‘nil’, specifies a function
+     that is called, with no arguments, after KEYMAP is deactivated.
+
+     The optional argument MESSAGE specifies the message to display
+     after activating the transient map.  If MESSAGE is a string, it is
+     the format string for the message, and any ‘%k’ specifier in that
+     string is replaced with the list of keys from the transient map.
+     Any other non-‘nil’ value of MESSAGE stands for the default message
+     format ‘Repeat with %k’.
+
+     If the optional argument TIMEOUT is non-‘nil’, it should be a
+     number that specifies how many seconds of idle time to wait before
+     deactivating KEYMAP.  The value of the variable
+     ‘set-transient-map-timeout’, if non-‘nil’, overrides the value of
+     this argument.
+
+     This function works by adding and removing KEYMAP from the variable
+     ‘overriding-terminal-local-map’, which takes precedence over all
+     other active keymaps (*note (Searching Keymaps)elisp::).
+
+ -- Function: compat-call string-lines string &optional omit-nulls
+          keep-newlines
+     Split STRING into a list of strings on newline boundaries.  If the
+     optional argument OMIT-NULLS is non-‘nil’, remove empty lines from
+     the results.  If the optional argument KEEP-NEWLINES is non-‘nil’,
+     don't remove the trailing newlines from the result strings.
+
+     *Note (elisp)Creating Strings::.
+
+ -- Function: compat-call define-key
+     This function is like ‘keymap-set’ (*note (elisp)Changing Key
+     Bindings::, but understands only the legacy key syntaxes.
+
+     In addition, this function also has a REMOVE argument.  If it is
+     non-‘nil’, the definition will be removed.  This is almost the same
+     as setting the definition to ‘nil’, but makes a difference if the
+     KEYMAP has a parent, and KEY is shadowing the same binding in the
+     parent.  With REMOVE, subsequent lookups will return the binding in
+     the parent, whereas with a ‘nil’ definition the lookups will return
+     ‘nil’.
+
+     *Note (elisp)Low-Level Key Binding::.
+
+     This compatibility version handles the optional argument REMOVE.
+
+ -- Function: compat-call plist-get plist prop &optional predicate
+     This returns the value of the PROPERTY property stored in the
+     property list PLIST.  Comparisons are done with PREDICATE, and
+     defaults to ‘eq’.  It accepts a malformed PLIST argument.  If
+     PROPERTY is not found in the PLIST, it returns ‘nil’.
+
+     *Note (elisp)Plist Access::.
+
+     This compatibility version handles the optional argument PREDICATE.
+     This is a generalized variable (*note (elisp)Generalized
+     Variables::) that can be used to change a value with ‘setf’.
+
+ -- Function: compat-call plist-put plist prop val &optional predicate
+     This stores VALUE as the value of the PROPERTY property in the
+     property list PLIST.  Comparisons are done with PREDICATE, and
+     defaults to ‘eq’.  It may modify PLIST destructively, or it may
+     construct a new list structure without altering the old.  The
+     function returns the modified property list, so you can store that
+     back in the place where you got PLIST.
+
+     *Note (elisp)Plist Access::.
+
+     This compatibility version handles the optional argument PREDICATE.
+
+ -- Function: compat-call plist-member plist prop &optional predicate
+     This returns non-‘nil’ if PLIST contains the given PROPERTY.
+     Comparisons are done with PREDICATE, and defaults to ‘eq’.  Unlike
+     ‘plist-get’, this allows you to distinguish between a missing
+     property and a property with the value ‘nil’.  The value is
+     actually the tail of PLIST whose ‘car’ is PROPERTY.
+
+     *Note (elisp)Plist Access::.
+
+     This compatibility version handles the optional argument PREDICATE.
+
+2.4.3 Missing Definitions
+-------------------------
+
+Compat does not provide support for the following Lisp features
+implemented in 29.1:
+
+   • The function ‘imagep’.
+   • The function ‘image-at-point-p’.
+   • The function ‘function-documentation’.
+   • The macro ‘with-undo-amalgamate’.
+   • The function ‘string-glyph-split’.
+   • The function ‘string-limit’.
+   • The function ‘string-pixel-width’ and ‘buffer-text-pixel-size’.
+   • The function ‘minibuffer-lazy-highlight-setup’.
+   • The function ‘pp-emacs-lisp-code’.
+   • The function ‘bidi-string-strip-control-characters’.
+   • The native function ‘current-cpu-time’.
+   • The functions ‘xdg-state-home’, ‘xdg-current-desktop’ and
+     ‘xdg-session-type’.
+   • The macro ‘setopt’.
+   • The ‘oclosure’ library.
+   • The ‘textsec’ library.
+   • The ‘range’ library.
+   • The ‘string-edit’ library.
+   • The ‘vtable’ library.
+   • The ‘pixel-fill’ library.
+   • Support for symbols with position information.
+
+
+File: compat.info,  Node: Emacs 30.1,  Next: Emacs 31.1,  Prev: Emacs 29.1,  Up: Support
+
+2.5 Emacs 30.1
+==============
+
+2.5.1 Added Definitions
+-----------------------
+
+The following functions and macros are implemented in Emacs 30.1.  These
+functions are made available by Compat on Emacs versions older than
+30.1.  Note that due to upstream changes, it might happen that there
+will be the need for changes, so use these functions with care.
+
+ -- Variable: trusted-content
+     List of files and directories whose content we trust.  Be extra
+     careful here since trusting means that Emacs might execute the code
+     contained within those files and directories without an explicit
+     request by the user.  One important case when this might happen is
+     when ‘flymake-mode’ is enabled (for example, when it is added to a
+     mode hook).  Each element of the list should be a string: - If it
+     ends in "/", it is considered as a directory name and means that
+     Emacs should trust all the files whose name has this directory as a
+     prefix.  - else it is considered as a file name.  Use abbreviated
+     file names.  For example, an entry "~/mycode" means that Emacs will
+     trust all the files in your directory "mycode".  This variable can
+     also be set to ‘:all’, in which case Emacs will trust all files,
+     which opens a gaping security hole.
+
+ -- Function: trusted-content-p
+     Return non-nil if we trust the contents of the current buffer.
+     Here, "trust" means that we are willing to run code found inside of
+     it.  See also ‘trusted-content’.
+
+ -- Function: color-oklab-to-xyz l a b
+     Convert the OkLab color represented by L A B to CIE XYZ. Oklab is a
+     perceptual color space created by Björn Ottosson
+     <https://bottosson.github.io/posts/oklab/>.  It has the property
+     that changes in the hue and saturation of a color can be made while
+     maintaining the same perceived lightness.
+
+ -- Function: color-xyz-to-oklab x y z
+     Convert the CIE XYZ color represented by X Y Z to Oklab.
+
+ -- Function: color-oklab-to-srgb l a b
+     Convert the Oklab color represented by L A B to sRGB.
+
+ -- Function: color-srgb-to-oklab r g b
+     Convert the sRGB color R G B to Oklab.
+
+ -- Function: char-to-name char
+     This function returns the Unicode name of CHAR.  It returns ‘nil’
+     if CHAR is not a character or has no Unicode name.
+
+ -- Function: obarray-clear obarray
+     This function removes all symbols from OBARRAY.
+
+ -- Function: closurep object
+     This function returns ‘t’ if OBJECT is a closure, which is a
+     particular kind of function object.  Currently closures are used
+     for all byte-code functions and all interpreted functions.
+
+ -- Function: interpreted-function-p object
+     This function returns ‘t’ if OBJECT is an interpreted function.
+
+ -- Function: primitive-function-p object
+     Return ‘t’ if OBJECT is a built-in primitive function.  This
+     excludes special forms, since they are not functions.
+
+ -- Function: value< a b
+     This function returns non-‘nil’ if A comes before B in the standard
+     sorting order; this means that it returns ‘nil’ when B comes before
+     A, or if they are equal or unordered.
+
+     The arguments A and B must have the same type.  Specifically:
+
+        • Numbers are compared using ‘<’.
+        • Strings are compared using ‘string<’ and symbols are compared
+          by comparing their names as strings.
+        • Conses, lists, vectors and records are compared
+          lexicographically.  This means that the two sequences are
+          compared element-wise from left to right until they differ,
+          and the result is then that of ‘value<’ on the first pair of
+          differing elements.  If one sequence runs out of elements
+          before the other, the shorter sequence comes before the
+          longer.
+        • Markers are compared first by buffer, then by position.
+        • Buffers and processes are compared by comparing their names as
+          strings.  Dead buffers (whose name is ‘nil’) will compare
+          before any live buffer.
+        • Other types are considered unordered and the return value will
+          be ‘nil’.
+
+     Examples:
+          (value< -4 3.5) ⇒ t
+          (value< "dog" "cat") ⇒ nil
+          (value< 'yip 'yip) ⇒ nil
+          (value< '(3 2) '(3 2 0)) ⇒ t
+          (value< [3 2 "a"] [3 2 "b"]) ⇒ t
+
+     Note that ‘nil’ is treated as either a symbol or an empty list,
+     depending on what it is compared against:
+
+          (value< nil '(0)) ⇒ t
+          (value< 'nib nil) ⇒ t
+
+     There is no limit to the length of sequences (lists, vectors and so
+     on) that can be compared, but ‘value<’ may fail with an error if
+     used to compare circular or deeply nested data structures.
+
+ -- Function: drop n list
+     This function is an alias for ‘nthcdr’.  It returns the Nth CDR of
+     LIST.  In other words, it skips past the first N links of LIST and
+     returns what follows.
+
+ -- Function: get-truename-buffer filename
+     Return the buffer with ‘file-truename’ equal to FILENAME (a
+     string).  If there is no such live buffer, return nil.  See also
+     ‘find-buffer-visiting’.
+
+ -- Function: find-buffer variable value
+     Return the buffer with buffer-local VARIABLE equal to VALUE.  If
+     there is no such live buffer, return nil.
+
+ -- Function: require-with-check feature &optional filename noerror
+     This function works like ‘require’, except if FEATURE is already
+     loaded (i.e. is already a member of the list in ‘features’, see
+     below).  If FEATURE is already loaded, this function checks if
+     FEATURE was provided by a file different from FILENAME, and if so,
+     it by default signals an error.  If the value of the optional
+     argument NOERROR is ‘reload’, the function doesn't signal an error,
+     but instead forcibly reloads FILENAME; if NOERROR is some other
+     non-‘nil’ value, the function emits a warning about FEATURE being
+     already provided by another file.
+
+ -- Function: merge-ordered-lists lists &optional error-function
+     Merge LISTS in a consistent order.  LISTS is a list of lists of
+     elements.  Merge them into a single list containing the same
+     elements (removing duplicates), obeying their relative positions in
+     each list.  The order of the (sub)lists determines the final order
+     in those cases where the order within the sublists does not impose
+     a unique choice.  Equality of elements is tested with ‘eql’.
+
+     If a consistent order does not exist, call ERROR-FUNCTION with a
+     remaining list of lists that we do not know how to merge.  It
+     should return the candidate to use to continue the merge, which has
+     to be the head of one of the lists.  By default we choose the head
+     of the first list.
+
+ -- Variable: completion-lazy-hilit
+     If non-nil, request lazy highlighting of completion candidates.
+
+     Lisp programs (a.k.a.  "front ends") that present completion
+     candidates may opt to bind this variable to a non-nil value when
+     calling functions (such as ‘completion-all-completions’) which
+     produce completion candidates.  This tells the underlying
+     completion styles that they do not need to fontify (i.e.,
+     propertize with the ‘face’ property) completion candidates in a way
+     that highlights the matching parts.  Then it is the front end which
+     presents the candidates that becomes responsible for this
+     fontification.  The front end does that by calling the function
+     ‘completion-lazy-hilit’ on each completion candidate that is to be
+     displayed to the user.
+
+     Note that only some completion styles take advantage of this
+     variable for optimization purposes.  Other styles will ignore the
+     hint and fontify eagerly as usual.  It is still safe for a front
+     end to call ‘completion-lazy-hilit’ in these situations.
+
+     To author a completion style that takes advantage of this variable,
+     see ‘completion-lazy-hilit-fn’ and
+     ‘completion-pcm--hilit-commonality’.
+
+ -- Variable: completion-lazy-hilit-fn
+     Fontification function set by lazy-highlighting completions styles.
+     When a given style wants to enable support for
+     ‘completion-lazy-hilit’ (which see), that style should set this
+     variable to a function of one argument.  It will be called with
+     each completion candidate, a string, to be displayed to the user,
+     and should destructively propertize these strings with the ‘face’
+     property.
+
+ -- Function: completion-lazy-hilit str
+     Return a copy of completion candidate STR that is face-propertized.
+     See documentation of the variable ‘completion-lazy-hilit’ for more
+     details.
+
+ -- Macro: static-if condition then-form else-forms...
+     Test CONDITION at macro-expansion time.  If its value is non-‘nil’,
+     expand the macro to THEN-FORM, otherwise expand it to ELSE-FORMS
+     enclosed in a ‘progn’.  ELSE-FORMS may be empty.
+
+     Here is an example of its use from CC Mode, which prevents a
+     ‘defadvice’ form being compiled in newer versions of Emacs:
+          (static-if (boundp 'comment-line-break-function)
+              (progn)
+            (defvar c-inside-line-break-advice nil)
+            (defadvice indent-new-comment-line (around c-line-break-advice
+                                                       activate preactivate)
+              "Call `c-indent-new-comment-line' if in CC Mode."
+              (if (or c-inside-line-break-advice
+                      (not c-buffer-is-cc-mode))
+                  ad-do-it
+                (let ((c-inside-line-break-advice t))
+                  (c-indent-new-comment-line (ad-get-arg 0))))))
+
+2.5.2 Extended Definitions
+--------------------------
+
+These functions must be called explicitly via ‘compat-call’, since their
+calling convention or behavior was extended in Emacs 30.1:
+
+ -- Function: compat-call sort sequence &rest keyword-args
+     This function sorts SEQUENCE, which must be a list or vector, and
+     returns a sorted sequence of the same type.  The sort is stable,
+     which means that elements with equal sort keys maintain their
+     relative order.  It takes the following optional keyword arguments:
+
+     ‘:key KEYFUNC’
+          Use KEYFUNC, a function that takes a single element from
+          SEQUENCE and returns its key value, to generate the keys used
+          in comparison.  If this argument is absent or if KEYFUNC is
+          ‘nil’ then ‘identity’ is assumed; that is, the elements
+          themselves are used as sorting keys.
+
+     ‘:lessp PREDICATE’
+          Use PREDICATE to order the keys.  PREDICATE is a function that
+          takes two sort keys as arguments and returns non-‘nil’ if the
+          first should come before the second.  If this argument is
+          absent or PREDICATE is ‘nil’, then ‘value<’ is used, which is
+          applicable to many different Lisp types and generally sorts in
+          ascending order.
+
+          For consistency, any predicate must obey the following rules:
+             • It must be “antisymmetric”: it cannot both order A before
+               B and B before A.
+             • It must be “transitive”: if it orders A before B and B
+               before C, then it must also order A before C.
+
+     ‘:reverse FLAG’
+          If FLAG is non-‘nil’, the sorting order is reversed.  With the
+          default ‘:lessp’ predicate this means sorting in descending
+          order.
+
+     ‘:in-place FLAG’
+          If FLAG is non-‘nil’, then SEQUENCE is sorted in-place
+          (destructively) and returned.  If ‘nil’, or if this argument
+          is not given, a sorted copy of the input is returned and
+          SEQUENCE itself remains unmodified.  In-place sorting is
+          slightly faster, but the original sequence is lost.
+
+     If the default behaviour is not suitable for your needs, it is
+     usually easier and faster to supply a new ‘:key’ function than a
+     different ‘:lessp’ predicate.  For example, consider sorting these
+     strings:
+
+          (setq numbers '("one" "two" "three" "four" "five" "six"))
+          (sort numbers)
+               ⇒ ("five" "four" "one" "six" "three" "two")
+
+     You can sort the strings by length instead by supplying a different
+     key function:
+
+          (sort numbers :key #'length)
+               ⇒ ("one" "two" "six" "four" "five" "three")
+
+     Note how strings of the same length keep their original order,
+     thanks to the sorting stability.  Now suppose you want to sort by
+     length, but use the string contents to break ties.  The easiest way
+     is to specify a key function that transforms an element to a value
+     that is sorted this way.  Since ‘value<’ orders compound objects
+     (conses, lists, vectors and records) lexicographically, you could
+     do:
+
+          (sort numbers :key (lambda (x) (cons (length x) x)))
+               ⇒ ("one" "six" "two" "five" "four" "three")
+
+     because ‘(3 . "six")’ is ordered before ‘(3 . "two")’ and so on.
+
+     For compatibility with previous versions of Emacs, the ‘sort’
+     function can also be called using the fixed two-argument form:
+
+          (sort SEQUENCE PREDICATE)
+
+     where PREDICATE is the ‘:lessp’ argument.  When using this form,
+     sorting is always done in-place.
+
+ -- Function: compat-call completion-metadata-get metadata prop
+     Get property PROP from completion METADATA.  If the metadata
+     specifies a completion category, the variables
+     ‘completion-category-overrides’ and ‘completion-category-defaults’
+     take precedence for category-specific overrides.  If the completion
+     metadata does not specify the property, the
+     ‘completion-extra-properties’ plist is consulted.  Note that the
+     keys of the ‘completion-extra-properties’ plist are keyword
+     symbols, not plain symbols.
+
+ -- Function: compat-call copy-tree tree &optional vectors-and-records
+     This function returns a copy of the tree TREE.  If TREE is a cons
+     cell, this makes a new cons cell with the same CAR and CDR, then
+     recursively copies the CAR and CDR in the same way.
+
+     Normally, when TREE is anything other than a cons cell, ‘copy-tree’
+     simply returns TREE.  However, if VECTORS-AND-RECORDS is non-‘nil’,
+     it copies vectors and records too (and operates recursively on
+     their elements).  The TREE argument must not contain cycles.
+
+2.5.3 Missing Definitions
+-------------------------
+
+Compat does not provide support for the following Lisp features
+implemented in 30.1:
+
+
+File: compat.info,  Node: Emacs 31.1,  Prev: Emacs 30.1,  Up: Support
+
+2.6 Emacs 31.1
+==============
+
+2.6.1 Added Definitions
+-----------------------
+
+The following functions and macros are implemented in Emacs 31.1.  These
+functions are made available by Compat on Emacs versions older than
+31.1.  Note that due to upstream changes, it might happen that there
+will be the need for changes, so use these functions with care.
+
+ -- Function: error-type-p symbol
+     This function returns non-‘nil’ if SYMBOL is a valid error
+     condition name.
+
+ -- Function: error-has-type-p error condition
+     This function tests whether CONDITION is a parent of the error
+     symbol of the error descriptor ERROR.  It returns non-‘nil’ if the
+     type of the error descriptor ERROR belongs to the condition name
+     CONDITION.
+
+ -- Function: error-type error
+     This function returns the error symbol of the error descriptor
+     ERROR.
+
+ -- Function: error-slot-value error pos
+     This function returns the value in the field number POS of the
+     error descriptor ERROR.  The fields are numbered starting with 1.
+     E.g., for an error of type ‘wrong-type-argument’,
+     ‘(error-slot-value ERROR 2)’ returns the object that failed the
+     type test, and ‘(error-slot-value ERROR 1)’ returns the predicate
+     that failed.
+
+ -- Function: ensure-proper-list object
+     This function returns OBJECT as a proper list (*note (elisp) Cons
+     Cells::).  If OBJECT is already a proper list, the function returns
+     it; otherwise, the function returns a one-element list containing
+     OBJECT.
+
+     If OBJECT might be a long list, prefer ‘ensure-list’, because the
+     latter function runs in constant time, whereas ‘ensure-proper-list’
+     runs in linear time.  For short lists this function is a convenient
+     way to treat cons-cells as non-lists:
+
+          (ensure-list '(1 . 2))
+              ⇒(1 . 2)
+
+          (ensure-proper-list '(1 . 2))
+              ⇒((1 . 2))
+
+ -- Function: set-local variable value
+     Make VARIABLE buffer local and set it to VALUE.
+
+ -- Function: drop-while pred list
+     This function skips leading list elements for which the predicate
+     PRED returns non-‘nil’, and returns the rest.
+
+          (drop-while #'numberp '(1 2 a b 3 4))
+               ⇒ (a b 3 4)
+
+ -- Function: take-while pred list
+     This function returns the leading list elements for which the
+     predicate PRED returns non-‘nil’, and ignores the rest.
+
+     In general, ‘(append (take-while P LIST) (drop-while P LIST))’ will
+     return a list equal to LIST.
+
+          (take-while #'numberp '(1 2 a b 3 4))
+               ⇒ (1 2)
+
+ -- Function: all pred list
+     This function returns ‘t’ if PRED is true for all elements in LIST.
+
+          (all #'numberp '(1 2 3 4))     ⇒ t
+          (all #'numberp '(1 2 a b 3 4)) ⇒ nil
+          (all #'numberp '())            ⇒ t
+
+ -- Function: any pred list
+     This function returns non-‘nil’ if PRED is true for at least one
+     element in LIST.  The returned value is the longest LIST suffix
+     whose first element satisfies PRED.
+
+          (any #'symbolp '(1 2 3 4))     ⇒ nil
+          (any #'symbolp '(1 2 a b 3 4)) ⇒ (a b 3 4)
+          (any #'symbolp '())            ⇒ nil
+
+ -- Function: remove-display-text-property start end spec &optional
+          object
+     Remove the display specification SPEC from the text from START to
+     END.  SPEC is the CAR of the display specification to remove, e.g.
+     ‘height’ or ‘'(margin nil)’.
+
+     If any text in the region has any other ‘display’ properties, those
+     properties are retained.  For instance:
+
+          (add-display-text-property 1 8 'raise 0.5)
+          (add-display-text-property 4 8 'height 2.0)
+          (remove-display-text-property 2 6 'raise)
+
+     After doing this, the text will have the following ‘display’
+     properties:
+
+        • The region from 1 to 2, only ‘raise’
+
+        • The region from 2 to 4, no properties
+
+        • The region from 4 to 6, only ‘height’
+
+        • The region from 6 to 8, both ‘raise’ and ‘height’
+
+     OBJECT is either a string or a buffer to remove the specification
+     from.  If omitted, OBJECT defaults to the current buffer.
+
+ -- Macro: hash-table-contains-p key table
+     Return non-nil if TABLE has an element with KEY.
+
+ -- Macro: static-when condition body...
+     Test CONDITION at macro-expansion time.  If its value is non-‘nil’,
+     expand the macro to evaluate all BODY forms sequentially and return
+     the value of the last one, or ‘nil’ if there are none.
+
+ -- Macro: static-unless condition body...
+     Test CONDITION at macro-expansion time.  If its value is ‘nil’,
+     expand the macro to evaluate all BODY forms sequentially and return
+     the value of the last one, or ‘nil’ if there are none.
+
+ -- Function: unbuttonize-region start end
+     This function removes all buttons between START and END in the
+     current buffer (both overlay and text-property based ones).
+
+ -- Function: completion-table-with-metadata table metadata
+     Return new completion TABLE with METADATA.  METADATA should be an
+     alist of completion metadata.  See ‘completion-metadata’ for a list
+     of supported metadata.
+
+ -- Function: completion-list-candidate-at-point &optional pt
+     Candidate string and bounds at PT in completions buffer.  The
+     return value has the format (STR BEG END).  The optional argument
+     PT defaults to ‘(point)’.
+
+ -- Macro: with-work-buffer &rest body
+     Create a work buffer, and evaluate BODY there like ‘progn’.  Like
+     ‘with-temp-buffer’, but reuse an already created temporary buffer
+     when possible, instead of creating a new one on each call.
+
+ -- Function: plusp number
+     This predicate tests whether its argument is positive, and returns
+     ‘t’ if so, ‘nil’ otherwise.  The argument must be a number.
+
+ -- Function: minusp number
+     This predicate tests whether its argument is negative, and returns
+     ‘t’ if so, ‘nil’ otherwise.  The argument must be a number.
+
+ -- Function: oddp integer
+     This predicate tests whether its argument is an odd number, and
+     returns ‘t’ if so, ‘nil’ otherwise.  The argument must be an
+     integer.
+
+ -- Function: evenp integer
+     This predicate tests whether its argument is an even number, and
+     returns ‘t’ if so, ‘nil’ otherwise.  The argument must be an
+     integer.
+
+ -- Macro: incf place &optional delta
+     This macro increments the number stored in PLACE by one, or by
+     DELTA if specified.  It returns the incremented value.
+
+     PLACE can be a symbol or a generalized variable, *note Generalized
+     Variables: (elisp)generalised variable.  For example, ‘(incf i)’ is
+     equivalent to ‘(setq i (1+ i))’, and ‘(incf (car x) 2)’ is
+     equivalent to ‘(setcar x (+ (car x) 2))’.
+
+ -- Macro: decf place &optional delta
+     This macro decrements the number stored in PLACE by one, or by
+     DELTA if specified.  It returns the decremented value.
+
+ -- Function: color-blend a b &optional alpha
+     Interpolate between the two colors A and B.  Both arguments are a
+     list of three numbers ‘(RED GREEN BLUE)’ representing a coordinate
+     in a (0,1)-RGB color space.  The optional argument ALPHA should be
+     a value between 0 and 1 and adjusts how strongly the function will
+     skew in either direction: Values towards 1 tend towards A, while
+     values towards 0 tend towards B.  By default, the argument defaults
+     to 0.5.
+
+2.6.2 Extended Definitions
+--------------------------
+
+These functions must be called explicitly via ‘compat-call’, since their
+calling convention or behavior was extended in Emacs 31.1:
+
+ -- Function: compat-call seconds-to-string delay &optional readable
+          abbrev precision
+     Return a string describing a given DELAY (in seconds).  By default,
+     this function formats the returned string as a floating-point
+     number in units selected according to the value of DELAY.  For
+     example, a delay of 9861.5 seconds yields ‘2.74h’, since the value
+     of DELAY is longer than 1 hour, but shorter than 1 day.  The output
+     formatting can be further controlled by the optional arguments, if
+     optional argument READABLE is non-‘nil’.  If READABLE's value is
+     ‘expanded’, the returned string will describe DELAY using two
+     units; for example, a delay of 9861.5 seconds with READABLE set to
+     the symbol ‘expanded’ returns ‘2 hours 44 minutes’, but if READABLE
+     is ‘t’, the function returns ‘3 hours’.  Optional argument ABBREV,
+     if non-‘nil’, means to abbreviate the units: use ‘h’ instead of
+     ‘hours’, ‘m’ instead of ‘minutes’, etc.  If PRECISION is a whole
+     integer number, the function rounds the value of the smallest unit
+     it produces to that many digits after the decimal point; thus,
+     9861.5 with PRECISION set to 3 yields ‘2.739 hours’.  If PRECISION
+     is a non-negative float smaller than 1, the function rounds to that
+     value.
+
+2.6.3 Missing Definitions
+-------------------------
+
+Compat does not provide support for the following Lisp features
+implemented in 31.1:
+
+
+File: compat.info,  Node: Development,  Next: Function Index,  Prev: Support,  Up: Top
+
+3 Development
+*************
+
+Compat is developed on GitHub.
+
+   Bug reports, patches and comments are best sent to the issue tracker
+(https://github.com/emacs-compat/compat/issues).  These may include
+issues in the compatibility code, missing definitions or performance
+issues.
+
+   Please note that as a GNU ELPA package, Compat requires contributors
+to have signed the FSF copyright assignment
+(https://www.gnu.org/software/emacs/manual/html_node/emacs/Copyright-Assignment.html),
+before any non-trivial contribution (roughly 15 lines of code) can be
+applied.
+
+   It is important that you provide tests when you contribute new
+functionality.  Compat has 100% test coverage by the test suite.  We use
+continuous integration to check if patches preserve existing
+functionality.
+
+   Development for the currently stable Emacs version happens in the
+main branch of the Compat Git repository.  ELPA-devel nightly builds are
+created from this branch.  New features, which are not yet ready to be
+merged directly into the main branch, are developed in feature branches.
+Furthermore the Git repository has a branch emacs-<version> where the
+development for the upcoming Emacs release takes place.  This branch is
+separate from the main branch since the new functionality should not be
+made available (neither via ELPA nor ELPA-devel) before the new Emacs
+version has been reasonably stabilized, e.g., around the time when the
+Emacs version branch is created in the Emacs repository on Savannah.
+
+
+File: compat.info,  Node: Function Index,  Next: Variable Index,  Prev: Development,  Up: Top
+
+Appendix A Function Index
+*************************
+
+[index]
+* Menu:
+
+* add-display-text-property:             Emacs 29.1.          (line 196)
+* all:                                   Emacs 31.1.          (line  73)
+* always:                                Emacs 28.1.          (line  83)
+* and-let*:                              Emacs 26.1.          (line 158)
+* any:                                   Emacs 31.1.          (line  80)
+* assoc-delete-all:                      Emacs 26.1.          (line  13)
+* bignump:                               Emacs 27.1.          (line  55)
+* bounds-of-thing-at-mouse:              Emacs 28.1.          (line 296)
+* buffer-hash:                           Emacs 26.1.          (line  80)
+* buffer-local-boundp:                   Emacs 28.1.          (line 129)
+* buffer-local-restore-state:            Emacs 29.1.          (line  56)
+* buffer-local-set-state:                Emacs 29.1.          (line  56)
+* buffer-match-p:                        Emacs 29.1.          (line 264)
+* buttonize:                             Emacs 29.1.          (line 162)
+* buttonize-region:                      Emacs 29.1.          (line 171)
+* char-to-name:                          Emacs 30.1.          (line  50)
+* char-uppercase-p:                      Emacs 29.1.          (line 133)
+* cl-constantly:                         Emacs 29.1.          (line 653)
+* cl-once-only:                          Emacs 29.1.          (line 676)
+* cl-with-gensyms:                       Emacs 29.1.          (line 657)
+* closurep:                              Emacs 30.1.          (line  57)
+* color-blend:                           Emacs 31.1.          (line 179)
+* color-dark-p:                          Emacs 28.1.          (line 326)
+* color-oklab-to-srgb:                   Emacs 30.1.          (line  44)
+* color-oklab-to-xyz:                    Emacs 30.1.          (line  34)
+* color-srgb-to-oklab:                   Emacs 30.1.          (line  47)
+* color-values-from-color-spec:          Emacs 28.1.          (line 332)
+* color-xyz-to-oklab:                    Emacs 30.1.          (line  41)
+* compat-call:                           Usage.               (line  50)
+* compat-call alist-get:                 Emacs 26.1.          (line 344)
+* compat-call assoc:                     Emacs 26.1.          (line 316)
+* compat-call assoc-delete-all:          Emacs 27.1.          (line 417)
+* compat-call completion-metadata-get:   Emacs 30.1.          (line 287)
+* compat-call copy-tree:                 Emacs 30.1.          (line 297)
+* compat-call count-windows:             Emacs 28.1.          (line 411)
+* compat-call define-key:                Emacs 29.1.          (line 773)
+* compat-call executable-find:           Emacs 27.1.          (line 429)
+* compat-call file-size-human-readable:  Emacs 27.1.          (line 397)
+* compat-call line-number-at-pos:        Emacs 26.1.          (line 330)
+* compat-call lookup-key:                Emacs 27.1.          (line 356)
+* compat-call make-temp-file:            Emacs 26.1.          (line 278)
+* compat-call plist-get:                 Emacs 29.1.          (line 789)
+* compat-call plist-member:              Emacs 29.1.          (line 813)
+* compat-call plist-put:                 Emacs 29.1.          (line 801)
+* compat-call recenter:                  Emacs 27.1.          (line 346)
+* compat-call regexp-opt:                Emacs 27.1.          (line 385)
+* compat-call seconds-to-string:         Emacs 31.1.          (line 194)
+* compat-call set-transient-map:         Emacs 29.1.          (line 728)
+* compat-call setq-local:                Emacs 27.1.          (line 370)
+* compat-call sort:                      Emacs 30.1.          (line 212)
+* compat-call string-lines:              Emacs 29.1.          (line 764)
+* compat-call string-trim:               Emacs 26.1.          (line 375)
+* compat-call string-trim-left:          Emacs 26.1.          (line 359)
+* compat-call string-trim-right:         Emacs 26.1.          (line 367)
+* compat-call string-width:              Emacs 28.1.          (line 394)
+* compat-function:                       Usage.               (line  58)
+* compiled-function-p:                   Emacs 29.1.          (line 232)
+* completion-lazy-hilit:                 Emacs 30.1.          (line 182)
+* completion-list-candidate-at-point:    Emacs 31.1.          (line 138)
+* completion-table-with-metadata:        Emacs 31.1.          (line 133)
+* count-sentences:                       Emacs 29.1.          (line  31)
+* cXXXr:                                 Emacs 26.1.          (line  66)
+* cXXXXr:                                Emacs 26.1.          (line  67)
+* date-days-in-month:                    Emacs 27.1.          (line 213)
+* date-ordinal-to-time:                  Emacs 27.1.          (line 220)
+* decf:                                  Emacs 31.1.          (line 175)
+* decoded-time-day:                      Emacs 27.1.          (line 175)
+* decoded-time-dst:                      Emacs 27.1.          (line 195)
+* decoded-time-hour:                     Emacs 27.1.          (line 170)
+* decoded-time-minute:                   Emacs 27.1.          (line 165)
+* decoded-time-month:                    Emacs 27.1.          (line 180)
+* decoded-time-period:                   Emacs 28.1.          (line 363)
+* decoded-time-second:                   Emacs 27.1.          (line 160)
+* decoded-time-weekday:                  Emacs 27.1.          (line 190)
+* decoded-time-year:                     Emacs 27.1.          (line 185)
+* decoded-time-zone:                     Emacs 27.1.          (line 200)
+* define-keymap:                         Emacs 29.1.          (line 535)
+* defvar-keymap:                         Emacs 29.1.          (line 603)
+* delete-line:                           Emacs 29.1.          (line  65)
+* directory-abbrev-apply:                Emacs 29.1.          (line 399)
+* directory-abbrev-make-regexp:          Emacs 29.1.          (line 396)
+* directory-empty-p:                     Emacs 28.1.          (line 247)
+* dlet:                                  Emacs 28.1.          (line 147)
+* dolist-with-progress-reporter:         Emacs 27.1.          (line 119)
+* drop:                                  Emacs 30.1.          (line 110)
+* drop-while:                            Emacs 31.1.          (line  56)
+* ensure-list:                           Emacs 28.1.          (line 162)
+* ensure-proper-list:                    Emacs 31.1.          (line  36)
+* error-has-type-p:                      Emacs 31.1.          (line  18)
+* error-slot-value:                      Emacs 31.1.          (line  28)
+* error-type:                            Emacs 31.1.          (line  24)
+* error-type-p:                          Emacs 31.1.          (line  14)
+* ert-with-temp-directory:               Emacs 29.1.          (line 641)
+* ert-with-temp-file:                    Emacs 29.1.          (line 635)
+* evenp:                                 Emacs 31.1.          (line 161)
+* file-attribute-access-time:            Emacs 26.1.          (line 223)
+* file-attribute-collect:                Emacs 26.1.          (line 260)
+* file-attribute-device-number:          Emacs 26.1.          (line 255)
+* file-attribute-file-identifier:        Emacs 29.1.          (line 356)
+* file-attribute-group-id:               Emacs 26.1.          (line 218)
+* file-attribute-inode-number:           Emacs 26.1.          (line 250)
+* file-attribute-link-number:            Emacs 26.1.          (line 208)
+* file-attribute-modes:                  Emacs 26.1.          (line 245)
+* file-attribute-modification-time:      Emacs 26.1.          (line 228)
+* file-attribute-size:                   Emacs 26.1.          (line 240)
+* file-attribute-status-change-time:     Emacs 26.1.          (line 234)
+* file-attribute-type:                   Emacs 26.1.          (line 203)
+* file-attribute-user-id:                Emacs 26.1.          (line 213)
+* file-backup-file-names:                Emacs 28.1.          (line 351)
+* file-has-changed-p:                    Emacs 29.1.          (line 381)
+* file-local-name:                       Emacs 26.1.          (line 167)
+* file-modes-number-to-symbolic:         Emacs 28.1.          (line 345)
+* file-name-concat:                      Emacs 28.1.          (line  53)
+* file-name-parent-directory:            Emacs 29.1.          (line 372)
+* file-name-quote:                       Emacs 26.1.          (line 102)
+* file-name-quoted-p:                    Emacs 26.1.          (line  95)
+* file-name-split:                       Emacs 29.1.          (line 362)
+* file-name-unquote:                     Emacs 26.1.          (line  90)
+* file-name-with-extension:              Emacs 28.1.          (line 229)
+* file-size-human-readable-iec:          Emacs 27.1.          (line 251)
+* find-buffer:                           Emacs 30.1.          (line 120)
+* fixnump:                               Emacs 27.1.          (line  60)
+* flatten-tree:                          Emacs 27.1.          (line 132)
+* format-prompt:                         Emacs 28.1.          (line 258)
+* funcall-with-delayed-message:          Emacs 29.1.          (line 154)
+* function-alias-p:                      Emacs 29.1.          (line 239)
+* garbage-collect-maybe:                 Emacs 28.1.          (line  68)
+* gensym:                                Emacs 26.1.          (line  70)
+* get-display-property:                  Emacs 29.1.          (line 179)
+* get-scratch-buffer-create:             Emacs 29.1.          (line  44)
+* get-truename-buffer:                   Emacs 30.1.          (line 115)
+* hash-table-contains-p:                 Emacs 31.1.          (line 116)
+* if-let*:                               Emacs 26.1.          (line 149)
+* ignore-errors:                         Emacs 27.1.          (line 106)
+* image-property:                        Emacs 26.1.          (line 198)
+* incf:                                  Emacs 31.1.          (line 166)
+* insert-into-buffer:                    Emacs 28.1.          (line  92)
+* interpreted-function-p:                Emacs 30.1.          (line  62)
+* key-parse:                             Emacs 29.1.          (line 436)
+* key-valid-p:                           Emacs 29.1.          (line 404)
+* keymap-global-lookup:                  Emacs 29.1.          (line 531)
+* keymap-global-set:                     Emacs 29.1.          (line 465)
+* keymap-global-unset:                   Emacs 29.1.          (line 485)
+* keymap-local-lookup:                   Emacs 29.1.          (line 527)
+* keymap-local-set:                      Emacs 29.1.          (line 475)
+* keymap-local-unset:                    Emacs 29.1.          (line 500)
+* keymap-lookup:                         Emacs 29.1.          (line 514)
+* keymap-set:                            Emacs 29.1.          (line 441)
+* keymap-substitute:                     Emacs 29.1.          (line 506)
+* length<:                               Emacs 28.1.          (line  45)
+* length=:                               Emacs 28.1.          (line  42)
+* length>:                               Emacs 28.1.          (line  50)
+* list-of-strings-p:                     Emacs 29.1.          (line  68)
+* macroexp-file-name:                    Emacs 28.1.          (line 305)
+* macroexp-warn-and-return:              Emacs 28.1.          (line 309)
+* major-mode-restore:                    Emacs 27.1.          (line  22)
+* major-mode-suspend:                    Emacs 27.1.          (line  13)
+* make-empty-file:                       Emacs 27.1.          (line 254)
+* make-lock-file-name:                   Emacs 28.1.          (line 359)
+* make-nearby-temp-file:                 Emacs 26.1.          (line 120)
+* make-separator-line:                   Emacs 28.1.          (line  88)
+* mapcan:                                Emacs 26.1.          (line  53)
+* mark-thing-at-mouse:                   Emacs 28.1.          (line 302)
+* match-buffers:                         Emacs 29.1.          (line 298)
+* merge-ordered-lists:                   Emacs 30.1.          (line 135)
+* minibuffer-history-value:              Emacs 27.1.          (line  32)
+* minusp:                                Emacs 31.1.          (line 152)
+* named-let:                             Emacs 28.1.          (line 211)
+* native-comp-available-p:               Emacs 28.1.          (line 375)
+* ntake:                                 Emacs 29.1.          (line 219)
+* obarray-clear:                         Emacs 30.1.          (line  54)
+* oddp:                                  Emacs 31.1.          (line 156)
+* package-get-version:                   Emacs 27.1.          (line 205)
+* plistp:                                Emacs 29.1.          (line  71)
+* plusp:                                 Emacs 31.1.          (line 148)
+* pos-bol:                               Emacs 29.1.          (line 125)
+* pos-eol:                               Emacs 29.1.          (line 129)
+* primitive-function-p:                  Emacs 30.1.          (line  65)
+* process-lines-handling-status:         Emacs 28.1.          (line  20)
+* process-lines-ignore-status:           Emacs 28.1.          (line  16)
+* proper-list-p:                         Emacs 27.1.          (line  76)
+* provided-mode-derived-p:               Emacs 27.1.          (line 247)
+* read-answer:                           Emacs 26.1.          (line  17)
+* read-char-from-minibuffer:             Emacs 27.1.          (line  44)
+* read-multiple-choice:                  Emacs 26.1.          (line 185)
+* readablep:                             Emacs 29.1.          (line  34)
+* remove-display-text-property:          Emacs 31.1.          (line  89)
+* replace-regexp-in-string:              Emacs 28.1.          (line 108)
+* replace-string-in-region:              Emacs 28.1.          (line 102)
+* require-with-check:                    Emacs 30.1.          (line 124)
+* ring-resize:                           Emacs 27.1.          (line  28)
+* set-local:                             Emacs 31.1.          (line  53)
+* static-if:                             Emacs 30.1.          (line 187)
+* static-unless:                         Emacs 31.1.          (line 124)
+* static-when:                           Emacs 31.1.          (line 119)
+* string-chop-newline:                   Emacs 28.1.          (line 206)
+* string-clean-whitespace:               Emacs 28.1.          (line 175)
+* string-distance:                       Emacs 27.1.          (line  86)
+* string-equal-ignore-case:              Emacs 29.1.          (line 252)
+* string-fill:                           Emacs 28.1.          (line 182)
+* string-glyph-compose:                  Emacs 29.1.          (line 330)
+* string-glyph-decompose:                Emacs 29.1.          (line 336)
+* string-glyph-split:                    Emacs 29.1.          (line 307)
+* string-lines:                          Emacs 28.1.          (line 190)
+* string-pad:                            Emacs 28.1.          (line 197)
+* string-replace:                        Emacs 28.1.          (line  77)
+* string-search:                         Emacs 28.1.          (line  34)
+* string-split:                          Emacs 29.1.          (line 258)
+* subr-primitive-p:                      Emacs 28.1.          (line 368)
+* substitute-quotes:                     Emacs 29.1.          (line  40)
+* take:                                  Emacs 29.1.          (line 205)
+* take-while:                            Emacs 31.1.          (line  63)
+* temporary-file-directory:              Emacs 26.1.          (line 137)
+* text-property-search-backward:         Emacs 27.1.          (line 332)
+* text-property-search-forward:          Emacs 27.1.          (line 260)
+* text-quoting-style:                    Emacs 28.1.          (line  28)
+* thing-at-mouse:                        Emacs 28.1.          (line 289)
+* time-equal-p:                          Emacs 27.1.          (line 208)
+* trusted-content-p:                     Emacs 30.1.          (line  29)
+* unbuttonize-region:                    Emacs 31.1.          (line 129)
+* use-region-beginning:                  Emacs 29.1.          (line  53)
+* use-region-end:                        Emacs 29.1.          (line  50)
+* use-region-noncontiguous-p:            Emacs 29.1.          (line  47)
+* value<:                                Emacs 30.1.          (line  69)
+* when-let*:                             Emacs 26.1.          (line 153)
+* while-let:                             Emacs 29.1.          (line 623)
+* window-configuration-equal-p:          Emacs 29.1.          (line 629)
+* with-buffer-unmodified-if-unchanged:   Emacs 29.1.          (line 341)
+* with-delayed-message:                  Emacs 29.1.          (line 137)
+* with-environment-variables:            Emacs 28.1.          (line 313)
+* with-existing-directory:               Emacs 28.1.          (line 136)
+* with-memoization:                      Emacs 29.1.          (line  74)
+* with-minibuffer-selected-window:       Emacs 27.1.          (line  38)
+* with-restriction:                      Emacs 29.1.          (line  79)
+* with-suppressed-warnings:              Emacs 27.1.          (line  65)
+* with-window-non-dedicated:             Emacs 28.1.          (line 383)
+* with-work-buffer:                      Emacs 31.1.          (line 143)
+* without-restriction:                   Emacs 29.1.          (line 113)
+* xor:                                   Emacs 27.1.          (line 142)
+
+
+File: compat.info,  Node: Variable Index,  Prev: Function Index,  Up: Top
+
+Appendix B Variable Index
+*************************
+
+[index]
+* Menu:
+
+* completion-lazy-hilit:                 Emacs 30.1.          (line 149)
+* completion-lazy-hilit-fn:              Emacs 30.1.          (line 173)
+* exec-path:                             Emacs 27.1.          (line 228)
+* gensym-counter:                        Emacs 26.1.          (line  77)
+* lisp-directory:                        Emacs 29.1.          (line  23)
+* mounted-file-systems:                  Emacs 26.1.          (line 133)
+* regexp-unmatchable:                    Emacs 27.1.          (line 152)
+* set-transient-map-timeout:             Emacs 29.1.          (line 754)
+* trusted-content:                       Emacs 30.1.          (line  14)
+* untrusted-content:                     Emacs 29.1.          (line  17)
+
+
+
+Tag Table:
+Node: Top828
+Node: Introduction2322
+Node: Overview2482
+Node: Usage3005
+Node: Limitations7043
+Node: Support11902
+Node: Emacs 26.112552
+Node: Emacs 27.129814
+Node: Emacs 28.150177
+Node: Emacs 29.170327
+Node: Emacs 30.1108464
+Node: Emacs 31.1123290
+Node: Development132642
+Node: Function Index134221
+Node: Variable Index151840
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/dir b/emacs/.emacs.d/elpa/compat-31.0.0.2/dir
new file mode 100644
index 0000000..de02c6e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/dir
@@ -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
+* Compat: (compat).             Compatibility Library for Emacs Lisp.
diff --git a/emacs/.emacs.d/elpa/compat-31.0.0.2/news b/emacs/.emacs.d/elpa/compat-31.0.0.2/news
new file mode 100644
index 0000000..7a284d4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/compat-31.0.0.2/news
@@ -0,0 +1,136 @@
+Release of "Compat" Version 31.0.0.2
+════════════════════════════════════
+
+  • compat-31: Fix extended function `seconds-to-string'.
+
+  (Release <2026-07-09 Thu>)
+
+
+Release of "Compat" Version 31.0.0.1
+════════════════════════════════════
+
+  • compat-31: Improve `with-work-buffer' implementation.
+
+  (Release <2026-05-03 Sun>)
+
+
+Release of "Compat" Version 31.0.0.0
+════════════════════════════════════
+
+  • compat-28: New pcase pattern `cl-type'.
+  • compat-29: Add `string-glyph-compose' and `string-glyph-decompose'.
+  • compat-31: New macros `static-when' and `static-unless'.
+  • compat-31: New functions `oddp' and `evenp'.
+  • compat-31: New functions `minusp' and `plusp'.
+  • compat-31: New macros `incf' and `decf'.
+  • compat-31: New function `color-blend'.
+  • compat-31: New function `completion-table-with-metadata'.
+  • compat-31: New function `completion-list-candidate-at-point'.
+  • compat-31: New macro `with-work-buffer'.
+  • compat-31: New function `unbuttonize-region'.
+  • compat-31: New extended function `seconds-to-string'.
+  • compat-31: New function `hash-table-contains-p'.
+  • compat-31: New function `remove-display-text-property'.
+  • compat-31: New functions `drop-while', `take-while', `member-if',
+    `any', `all'.
+  • compat-31: New function `set-local'.
+  • compat-31: New function `ensure-proper-list'.
+  • compat-31: New error API functions `error-type-p',
+    `error-has-type-p', `error-type' and `error-slot-value'.
+  • Drop support for Emacs 24.x. Emacs 25.1 is required now. In case
+    Emacs 24.x support is still needed, Compat 30 can be used.
+
+  (Release <2026-05-01 Fri>)
+
+
+Release of "Compat" Version 30.1.0.1
+════════════════════════════════════
+
+  • compat-28: Fix `named-let' tail recursion.
+
+  (Release <2025-06-19 Thu>)
+
+
+Release of "Compat" Version 30.1.0.0
+════════════════════════════════════
+
+  • compat-30: Add oklab color functions.
+
+  (Release <2025-04-02 Wed>)
+
+
+Release of "Compat" Version 30.0.2.0
+════════════════════════════════════
+
+  • compat-30: Rename `trusted-files' to `trusted-content'.
+
+  (Release <2025-01-04 Sat>)
+
+
+Release of "Compat" Version 30.0.1.0
+════════════════════════════════════
+
+  • compat-30: New variable `untrusted-content'.
+  • compat-30: New variable `trusted-files'.
+  • compat-30: New function `trusted-content-p'.
+
+  (Release <2024-12-15 Sun>)
+
+
+Release of "Compat" Version 30.0.0.0
+════════════════════════════════════
+
+  • compat-28: Mark `subr-native-elisp-p' as obsolete (renamed in Emacs
+    30).
+  • compat-30: New function `char-to-name'.
+  • compat-30: New function `obarray-clear'.
+  • compat-30: New function `interpreted-function-p'.
+  • compat-30: New function `primitive-function-p'.
+  • compat-30: New function `closurep'.
+  • compat-30: Add extended function `sort' with keyword arguments.
+  • compat-30: New function `value<'.
+  • compat-30: Add extended `copy-tree' with support for copying records
+    with non-nil optional second argument.
+  • compat-30: New macro `static-if'.
+  • compat-30: New alias `drop'.
+  • compat-30: New function `merge-ordered-lists'.
+  • compat-30: New variables `completion-lazy-hilit' and
+    `completion-lazy-hilit-fn' and new function `completion-lazy-hilit'.
+  • compat-30: New function `require-with-check'.
+  • compat-30: New functions `find-buffer' and `get-truename-buffer'.
+  • compat-30: Add extended `completion-metadata-get' with support for
+    `completion-category-overrides' and `completion-extra-properties'.
+
+  (Release <2024-07-08 Mon>)
+
+
+Release of "Compat" Version 29.1.4.5
+════════════════════════════════════
+
+  • Minor optimization of `plist-get' and `plist-put'.
+  • Minor compatibility adjustments for the Emacs 30 development
+    version.
+  • A minimal version of `compat.el' will be part of Emacs 30. Emacs
+    :core packages can directly `(require 'compat)' without the
+    `NOERROR' flag. Furthermore Compat will not be installed
+    unnecessarily. If a package depending on Emacs 25.1 and Compat 29.1
+    is installed on Emacs 30.1, Compat 29.1 will not be installed from
+    ELPA, since Emacs 30.1 already provides the required functionality.
+
+  (Release <2024-03-16 Sat>)
+
+
+Release of "Compat" Version 29.1.4.4
+════════════════════════════════════
+
+  • Fix `Package-Requires' header in compat.el
+  • Fix `Maintainer' header in compat.el
+
+  (Release <2023-11-13 Mon>)
+
+
+Release of "Compat" Version 29.1.4.3
+════════════════════════════════════
+
+  • compat-29: Add function `char-uppercase-p'.
+  …  …
diff --git a/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let-autoloads.el b/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let-autoloads.el
new file mode 100644
index 0000000..f869c66
--- /dev/null
+++ b/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let-autoloads.el
@@ -0,0 +1,55 @@
+;;; cond-let-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from cond-let.el
+
+(defvar cond-let-fontify-mode nil "\
+Non-nil if Cond-Let-Fontify mode is enabled.
+See the `cond-let-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 `cond-let-fontify-mode'.")
+(custom-autoload 'cond-let-fontify-mode "cond-let" nil)
+(autoload 'cond-let-fontify-mode "cond-let" "\
+In Emacs Lisp mode, highlight `$' using `font-lock-variable-name-face'.
+
+This is a global minor mode.  If called interactively, toggle the
+`Cond-Let-Fontify mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='cond-let-fontify-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "cond-let" '("cond-let"))
+
+;;; End of scraped data
+
+(provide 'cond-let-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; cond-let-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let-pkg.el b/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let-pkg.el
new file mode 100644
index 0000000..e9a4e8c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "cond-let" "20260817.452"
+  "Additional and improved binding conditionals."
+  '((emacs "28.1"))
+  :url "https://github.com/tarsius/cond-let"
+  :commit "bbe1f1c7389b16ad0e6c3bc7b28ba8fb27afb6f5"
+  :revdesc "bbe1f1c7389b"
+  :keywords '("extensions")
+  :authors '(("Jonas Bernoulli" . "emacs.cond-let@jonas.bernoulli.dev"))
+  :maintainers '(("Jonas Bernoulli" . "emacs.cond-let@jonas.bernoulli.dev")))
diff --git a/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let.el b/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let.el
new file mode 100644
index 0000000..e625790
--- /dev/null
+++ b/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let.el
@@ -0,0 +1,577 @@
+;;; cond-let.el --- Additional and improved binding conditionals  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2025-2026 Jonas Bernoulli
+
+;; May contain traces of Emacs, which is
+;; Copyright (C) 1985-2025 Free Software Foundation, Inc.
+
+;; Author: Jonas Bernoulli <emacs.cond-let@jonas.bernoulli.dev>
+;; Homepage: https://github.com/tarsius/cond-let
+;; Keywords: extensions
+
+;; Package-Version: 20260817.452
+;; Package-Revision: bbe1f1c7389b
+;; Package-Requires: ((emacs "28.1"))
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Emacs provides the binding conditionals `if-let', `if-let*',
+;; `when-let', `when-let*', `and-let*' and `while-let'.
+
+;; This package implements the missing `and-let' and `while-let*';
+;; and the original `cond-let', `cond-let*', `when$', `and$' and
+;; `thread$'.
+
+;; This package additionally provides more consistent and improved
+;; implementations of the binding conditionals already provided by
+;; Emacs.  Merely loading this library does not shadow the built-in
+;; implementations; this can optionally be done in the context of
+;; an individual library, as described below.
+
+;; `cond-let' and `cond-let*' are provided exactly under these names.
+;; The names of all other macros implemented by this package begin
+;; with `cond-let--', the package's prefix for private symbol.
+
+;; Users of this package are not expected to use these unwieldy
+;; names.  Instead one should use Emacs' shorthand feature to use
+;; all or some of these macros by their conceptual names.  E.g., if
+;; you want to use all of the available macros, add this at the end
+;; of a library.
+
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"       . "cond-let--and$")
+;;   ("thread$"    . "cond-let--thread$")
+;;   ("when$"      . "cond-let--when$")
+;;   ("and-let*"   . "cond-let--and-let*")
+;;   ("and-let"    . "cond-let--and-let")
+;;   ("if-let*"    . "cond-let--if-let*")
+;;   ("if-let"     . "cond-let--if-let")
+;;   ("when-let*"  . "cond-let--when-let*")
+;;   ("when-let"   . "cond-let--when-let")
+;;   ("while-let*" . "cond-let--while-let*")
+;;   ("while-let"  . "cond-let--while-let"))
+;; End:
+
+;; You can think of these file-local settings as import statements of
+;; sorts.  If you do this, then this package's implementations shadow
+;; the built-in implementations.  Doing so does not affect any other
+;; libraries, which continue to use the built-in implementations.
+
+;; Due to limitations of the shorthand implementation this has to be
+;; done for each individual library.  ".dir-locals.el" cannot be used.
+
+;; If you use `when$', `and$' and `thread$', you might want to add
+;; this to your configuration:
+
+;;   (with-eval-after-load 'cond-let
+;;     (font-lock-add-keywords 'emacs-lisp-mode
+;;                             cond-let-font-lock-keywords t))
+
+;; For information about the individual macros, please refer to their
+;; docstrings.
+
+;; See also https://github.com/tarsius/cond-let/wiki.
+
+;;; Code:
+;;; Cond
+
+(defun cond-let--prepare-clauses (tag sequential clauses)
+  "Used by macros `cond-let*' and `cond-let'."
+  (let (body)
+    (dolist (clause (nreverse clauses))
+      (cond
+        ((vectorp clause)
+         (setq body
+               `((,(if (and sequential (length> clause 1)) 'let* 'let)
+                  ,(mapcar (lambda (vec) (append vec nil)) clause)
+                  ,@body))))
+        ((let (varlist)
+           (while (vectorp (car clause))
+             (push (append (pop clause) nil) varlist))
+           (push (cond
+                   (varlist
+                    `(,(pcase (list (and body t)
+                                    (and sequential (length> varlist 1)))
+                         ('(t   t ) 'cond-let--when-let*)
+                         (`(t   ,_) 'cond-let--when-let)
+                         ('(nil t ) 'cond-let--and-let*)
+                         (`(nil ,_) 'cond-let--and-let))
+                      ,(nreverse varlist)
+                      ,(if body
+                           `(throw ',tag ,(macroexp-progn clause))
+                         (macroexp-progn clause))))
+                   ((length= clause 1)
+                    (if body
+                        (let ((a (gensym "anon")))
+                          `(let ((,a ,(car clause)))
+                             (when ,a (throw ',tag ,a))))
+                      (car clause)))
+                   ((and (eq (car clause) t) (not body))
+                    (macroexp-progn (cdr clause)))
+                   (t
+                    `(when ,(pop clause)
+                       (throw ',tag ,(macroexp-progn clause)))))
+                 body)))))
+    body))
+
+(defmacro cond-let* (&rest clauses)
+  "Try each clause until one succeeds.
+
+Each clause has one of these forms:
+- a plain clause   (CONDITION BODY...)
+- a binding clause ([SYMBOL VALUEFORM]... BODY...)
+- a binding vector [[SYMBOL VALUEFORM]...]
+
+A (CONDITION BODY...) clause works as for `cond'.  Evaluate CONDITION,
+and if it yields non-nil, the clause succeeds.  Then evaluate BODY forms
+sequentially and return the value of the last; or if there are no BODY
+forms, return the value of CONDITION.  If CONDITION yields nil, do not
+evaluate the BODY forms and instead proceed to the next clause.
+
+A ([SYMBOL VALUEFORM]... BODY...) clause begins with one or more binding
+vectors, followed by one or more BODY forms.  Bind SYMBOL to the value
+of VALUEFORM.  Each VALUEFORM can refer to symbols already bound by this
+VARLIST (as for `let*').
+
+If all VALUEFORMs yield non-nil, evaluate BODY forms sequentially, with
+VARLIST's bindings in effect, and return the value of the last form.
+
+If any VALUEFORM yields nil, evaluate neither the remaining VALUEFORMs
+nor the BODY forms, and proceed to the next clause.
+
+A [[SYMBOL VALUEFORM]...] form creates bindings, which extend to all
+remaining clauses and binding vectors.  Unlike for the previous form,
+always bind all SYMBOLs, even if a VALUEFORM yields nil.  Always proceed
+to the next clause."
+  (declare (indent 0)
+           (debug (&rest [&or
+                          (vector &rest (vector symbolp form))
+                          ([&rest (vector symbolp form)] body)
+                          (form body)])))
+  (let ((tag (gensym ":cond-let*")))
+    `(catch ',tag
+       ,@(cond-let--prepare-clauses tag t clauses))))
+
+(defmacro cond-let (&rest clauses)
+  "Try each clause until one succeeds.
+
+Each clause has one of these forms:
+- a plain clause   (CONDITION BODY...)
+- a binding clause ([SYMBOL VALUEFORM]... BODY...)
+- a binding vector [[SYMBOL VALUEFORM]...]
+
+A (CONDITION BODY...) clause works as for `cond'.  Evaluate CONDITION,
+and if it yields non-nil, the clause succeeds.  Then evaluate BODY forms
+sequentially and return the value of the last; or if there are no BODY
+forms, return the value of CONDITION.  If CONDITION yields nil, do not
+evaluate the BODY forms and instead proceed to the next clause.
+
+A ([SYMBOL VALUEFORM]... BODY...) clause begins with one or more binding
+vectors, followed by one or more BODY forms.  Bind SYMBOL to the value
+of VALUEFORM.  Evaluate all VALUEFORMs before binding their respective
+SYMBOLs (as for `let').
+
+If all VALUEFORMs yield non-nil, evaluate BODY forms sequentially, with
+VARLIST's bindings in effect, and return the value of the last form.
+
+If any VALUEFORM yields nil, evaluate neither the remaining VALUEFORMs
+nor the BODY forms, and proceed to the next clause.
+
+A [[SYMBOL VALUEFORM]...] form creates bindings, which extend to all
+remaining clauses and binding vectors.  Evaluate all VALUEFORMs before
+binding their respective SYMBOLs.  Unlike for the previous form, bind
+all SYMBOLs, even if a VALUEFORM yields nil.  Always proceed to the
+next clause."
+  (declare (indent 0)
+           (debug cond-let*))
+  (let ((tag (gensym ":cond-let")))
+    `(catch ',tag
+       ,@(cond-let--prepare-clauses tag nil clauses))))
+
+;;; Common
+
+(defun cond-let--prepare-varlist (varlist)
+  "Used by Cond-Let's `when-let*', `and-let*' and `while-let*'.
+Also used by other macros via `cond-let--prepare-varforms'.
+Return (VARLIST LASTVAR)."
+  (let (prevvar)
+    (list (mapcar (lambda (binding)
+                    (unless (length= binding 2)
+                      (signal 'error (cons "Invalid binding" binding)))
+                    (pcase-let ((`(,var ,form) binding))
+                      (when (string-prefix-p "_" (symbol-name var))
+                        (setq var (gensym "anon")))
+                      (prog1 (if prevvar
+                                 `(,var (and ,prevvar ,form))
+                               (list var form))
+                        (setq prevvar var))))
+                  varlist)
+          prevvar)))
+
+(defun cond-let--prepare-varforms (varlist &optional if-let)
+  "Used by Cond-Let's `when-let', `and-let', `while-let' and `if-let'.
+Return (ANON-VARLIST ANON-SETQ VARLIST LASTVAR), or if the length of
+VARLIST is 1 and IF-LET is nil, return (nil nil VARLIST LASTVAR)."
+  (if (and (not if-let)
+           (length= varlist 1))
+      `(nil nil ,@(cond-let--prepare-varlist varlist))
+    (let ((triples
+           (mapcar (lambda (binding)
+                     (unless (length= binding 2)
+                       (signal 'error (cons "Invalid binding" binding)))
+                     (pcase-let ((`(,var ,form) binding))
+                       (when (string-prefix-p "_" (symbol-name var))
+                         (setq var nil))
+                       (list (and var (gensym "anon"))
+                             var
+                             form)))
+                   varlist)))
+      (list (mapcan (pcase-lambda (`(,anon ,_ ,_))
+                      (and anon (list anon)))
+                    triples)
+            (mapcar (pcase-lambda (`(,anon ,_ ,form))
+                      (if anon
+                          `(setq ,anon ,form)
+                        form))
+                    triples)
+            (mapcan (pcase-lambda (`(,anon ,var ,_))
+                      (and var `((,var ,anon))))
+                    triples)
+            (cadr (car (last triples)))))))
+
+;;; And
+
+(defmacro cond-let--and-let* (varlist &optional bodyform)
+  "Bind according to VARLIST until one yields nil, else evaluate BODYFORM.
+
+Each element of VARLIST is a list (SYMBOL VALUEFORM), which binds SYMBOL
+to the value of VALUEFORM.  Each VALUEFORM can refer to symbols already
+bound by this VARLIST (as for `let*').
+
+Evaluate VALUEFORMs until on of them yields nil.  If that happens return
+nil, and evaluate neither the remaining VALUEFORMs nor BODYFORM.  If all
+VALUEFORMs yield non-nil, evaluate BODYFORM with the bindings in effect,
+and return its value; or if there is no BODYFORM, the value of the last
+VALUEFORM."
+  (declare (indent 1)
+           (debug ((&rest (symbolp form)) form)))
+  (pcase-let ((`(,varlist ,lastvar)
+               (cond-let--prepare-varlist varlist)))
+    `(let* ,varlist
+       ,(if bodyform
+            `(and ,lastvar ,bodyform)
+          lastvar))))
+
+(defmacro cond-let--and-let (varlist &optional bodyform)
+  "Bind according to VARLIST until one yields nil, else evaluate BODYFORM.
+
+Each element of VARLIST is a list (SYMBOL VALUEFORM), which binds SYMBOL
+to the value of VALUEFORM.  Evaluate all VALUEFORMs before binding their
+respective SYMBOLs (as for `let').
+
+Evaluate VALUEFORMs until on of them yields nil.  If that happens return
+nil, and evaluate neither the remaining VALUEFORMs nor BODYFORM.  If all
+VALUEFORMs yield non-nil, evaluate BODYFORM with the bindings in effect,
+and return its value; or if there is no BODYFORM, the value of the last
+VALUEFORM."
+  (declare (indent 1)
+           (debug cond-let--and-let*))
+  (pcase-let ((`(,anon ,set ,bind ,lastvar)
+               (cond-let--prepare-varforms varlist)))
+    (cond (anon
+           `(let ,anon
+              (and ,@set
+                   (let ,bind
+                     ,(or bodyform lastvar)))))
+          (t
+           `(let ,bind
+              ,(if bodyform
+                   `(and ,lastvar ,bodyform)
+                 lastvar))))))
+
+;;; Thread
+
+(defmacro cond-let--and$ (form form2 &rest forms)
+  "Bind variables according to each FORM until one of them yields nil.
+
+Evaluate the first FORM and if that yields a non-nil value, bind the
+symbol `$' to that value, and evaluate the next FORM with that binding
+in effect.  Repeat this process with subsequent FORMs until one yields
+nil, then return nil without evaluate the remaining FORMs.  If all
+FORMs yield non-nil, return the value of the last FORM.
+
+\(fn FORM FORM...)"
+  (declare (indent 0)
+           (debug t))
+  `(,(if forms 'let* 'let)
+    (($ ,form)
+     ,@(and forms
+            (mapcar (lambda (form)
+                      `($ (and $ ,form)))
+                    (cons form2 (butlast forms)))))
+    (and $
+         ,(or (car (last forms))
+              form2))))
+
+(defmacro cond-let--thread$ (form form2 &rest forms)
+  "Bind variable `$' to value of nth FORM before evaluating nth+1 FORM.
+
+Evaluate the first FORM and bind the symbol `$' to its value.
+Then evaluate the next FORM with that binding in effect.  Repeat this
+process with subsequent FORMs, and return the value of the last FORM.
+
+\(fn FORM FORM...)"
+  (declare (indent 0)
+           (debug t))
+  `(,(if forms 'let* 'let)
+    (($ ,form)
+     ,@(and forms
+            (mapcar (lambda (form)
+                      `($ ,form))
+                    (cons form2 (butlast forms)))))
+    ,(or (car (last forms))
+         form2)))
+
+;;; If
+
+(defmacro cond-let--if-let* (varlist then &rest else)
+  "Bind variables according to VARLIST and evaluate THEN or ELSE.
+
+Each element of VARLIST is a list (SYMBOL VALUEFORM), which binds SYMBOL
+to the value of VALUEFORM.  Each VALUEFORM can refer to symbols already
+bound by this VARLIST (as for `let*').
+
+If all VALUEFORMs yield non-nil, evaluate THEN with VARLIST's bindings
+in effect, and return its value.  THEN must be one expression.
+
+If any VALUEFORM yields nil, evaluate ELSE sequentially and return the
+value of the last form; or if there are no ELSE forms return nil.  The
+bindings from VARLIST do _not_ extend to the ELSE forms.
+
+\(fn VARLIST THEN [ELSE...])"
+  (declare (indent 2)
+           (debug ((&rest (symbolp form)) form body)))
+  (pcase-let ((`(,varlist ,lastvar)
+               (cond-let--prepare-varlist varlist))
+              (tag (gensym ":if-let*")))
+    `(catch ',tag
+       (let* ,varlist
+         (when ,lastvar
+           (throw ',tag ,then)))
+       ,@else)))
+
+(defmacro cond-let--if-let (varlist then &rest else)
+  "Bind variables according to VARLIST and evaluate THEN or ELSE.
+
+Each element of VARLIST is a list (SYMBOL VALUEFORM), which binds SYMBOL
+to the value of VALUEFORM.  Evaluate all VALUEFORMs before binding their
+respective SYMBOLs (as for `let').
+
+If all VALUEFORMs yield non-nil, evaluate THEN with VARLIST's bindings
+in effect, and return its value.  THEN must be one expression.
+
+If any VALUEFORM yields nil, evaluate ELSE sequentially and return the
+value of the last form; or if there are no ELSE forms return nil.  The
+bindings from VARLIST do _not_ extend to the ELSE forms.
+
+\(fn VARLIST THEN [ELSE...])"
+  (declare (indent 2)
+           (debug cond-let--if-let*))
+  (pcase-let* ((`(,anon ,set ,bind ,_)
+                (cond-let--prepare-varforms varlist t))
+               (set (if (length= set 1) (car set) (cons 'and set))))
+    `(let ,anon
+       (if ,set
+           (let ,bind
+             ,then)
+         ,@else))))
+
+;;; When
+
+(defmacro cond-let--when-let* (varlist bodyform &rest body)
+  "Bind variables according to VARLIST and conditionally evaluate BODY.
+
+Each element of VARLIST is a list (SYMBOL VALUEFORM), which binds SYMBOL
+to the value of VALUEFORM.  Each VALUEFORM can refer to symbols already
+bound by this VARLIST (as for `let*').
+
+If all VALUEFORMs yield non-nil, evaluate BODY forms sequentially, with
+VARLIST's bindings in effect, and return the value of the last form.
+
+If any VALUEFORM yields nil, evaluate neither the remaining VALUEFORMs
+nor the BODY forms, and instead return nil.
+
+BODY must be one or more expressions.  If VARLIST is empty, do nothing
+and return nil.
+
+\(fn VARLIST BODY...)"
+  (declare (indent 1)
+           (debug ((&rest (symbolp form)) form body)))
+  (pcase-let ((`(,varlist ,lastvar)
+               (cond-let--prepare-varlist varlist)))
+    `(let* ,varlist
+       (when ,lastvar
+         ,bodyform ,@body))))
+
+(defmacro cond-let--when-let (varlist bodyform &rest body)
+  "Bind variables according to VARLIST and conditionally evaluate BODY.
+
+Each element of VARLIST is a list (SYMBOL VALUEFORM), which binds SYMBOL
+to the value of VALUEFORM.  Evaluate all VALUEFORMs before binding their
+respective SYMBOLs (as for `let').
+
+If all VALUEFORMs yield non-nil, evaluate BODY forms sequentially, with
+VARLIST's bindings in effect, and return the value of the last form.
+
+If any VALUEFORM yields nil, evaluate neither the remaining VALUEFORMs
+nor the BODY forms, and instead return nil.
+
+BODY must be one or more expressions.  If VARLIST is empty, do nothing
+and return nil.
+
+\(fn VARLIST BODY...)"
+  (declare (indent 1)
+           (debug cond-let--when-let*))
+  (pcase-let ((`(,anon ,set ,bind ,lastvar)
+               (cond-let--prepare-varforms varlist)))
+    (cond (anon
+           `(let ,anon
+              (when (and ,@set)
+                (let ,bind
+                  ,bodyform ,@body))))
+          (t
+           `(let ,bind
+              (when ,lastvar
+                ,bodyform ,@body))))))
+
+(defmacro cond-let--when$ (varform bodyform &rest body)
+  "Bind variable `$' to value of VARFORM and conditionally evaluate BODY.
+
+If VARFORM yields a non-nil value, bind the symbol `$' to that value,
+evaluate BODY with that binding in effect, and return the value of the
+last form.  If VARFORM yields nil, do not evaluate BODY, and return nil.
+BODY must be one or more expressions.  If VARLIST is empty, do nothing
+and return nil.
+
+\(fn VARFORM BODY...)"
+  (declare (indent 1)
+           (debug t))
+  `(let (($ ,varform))
+     (when $
+       ,bodyform ,@body)))
+
+;;; While
+
+(defmacro cond-let--while-let* (varlist &rest body)
+  "Bind variables according to VARLIST, conditionally evaluate BODY, and repeat.
+
+Each element of VARLIST is a list (SYMBOL VALUEFORM), which binds SYMBOL
+to the value of VALUEFORM.  Each VALUEFORM can refer to symbols already
+bound by this VARLIST (as for `let*').
+
+If all VALUEFORMs yield non-nil, evaluate BODY forms sequentially, with
+VARLIST's bindings in effect, and repeat the loop.
+
+If any VALUEFORM yields nil, evaluate neither the remaining VALUEFORMs
+nor the BODY forms, and instead return, always yielding nil.
+
+BODY can be zero or more expressions.
+
+\(fn VARLIST [BODY...])"
+  (declare (indent 1)
+           (debug ((&rest (symbolp form)) body)))
+  (pcase-let ((`(,varlist ,lastvar)
+               (cond-let--prepare-varlist varlist))
+              (tag (gensym ":while-let*")))
+    `(catch ',tag
+       (while t
+         (let* ,varlist
+           (if ,lastvar
+               ,(macroexp-progn body)
+             (throw ',tag nil)))))))
+
+(defmacro cond-let--while-let (varlist bodyform &rest body)
+  "Bind variables according to VARLIST, conditionally evaluate BODY, and repeat.
+
+Each element of VARLIST is a list (SYMBOL VALUEFORM), which binds SYMBOL
+to the value of VALUEFORM.  Evaluate all VALUEFORMs before binding their
+respective SYMBOLs (as for `let').
+
+If all VALUEFORMs yield non-nil, evaluate BODY forms sequentially, with
+VARLIST's bindings in effect, and repeat the loop.
+
+If any VALUEFORM yields nil, evaluate neither the remaining VALUEFORMs
+nor the BODY forms, and instead return, always yielding nil.
+
+BODY can be one or more expressions.
+
+\(fn VARLIST BODY...)"
+  (declare (indent 1)
+           (debug ((&rest (symbolp form)) form body)))
+  (pcase-let ((`(,anon ,set ,bind ,lastvar)
+               (cond-let--prepare-varforms varlist))
+              (tag (gensym ":while-let")))
+    (cond (anon
+           `(catch ',tag
+              (while t
+                (let ,anon
+                  (if (and ,@set)
+                      (let ,bind
+                        ,bodyform ,@body)
+                    (throw ',tag nil))))))
+          (t
+           `(catch ',tag
+              (while t
+                (let ,bind
+                  (if ,lastvar
+                      ,(macroexp-progn (cons bodyform body))
+                    (throw ',tag nil)))))))))
+
+;;; Font-Lock
+
+(defvar cond-let-font-lock-keywords
+  '(("\\_<\\$\\_>" 0 'font-lock-variable-name-face))
+  "Highlight `$' using `font-lock-variable-name-face'.
+To add these keywords, add this to your configuration:
+\(font-lock-add-keywords \\='emacs-lisp-mode cond-let-font-lock-keywords t)")
+
+;;;###autoload
+(define-minor-mode cond-let-fontify-mode
+  "In Emacs Lisp mode, highlight `$' using `font-lock-variable-name-face'."
+  :global t
+  :group 'font-lock-extra-types
+  (if cond-let-fontify-mode
+      (font-lock-add-keywords  'emacs-lisp-mode cond-let-font-lock-keywords t)
+    (font-lock-remove-keywords 'emacs-lisp-mode cond-let-font-lock-keywords)))
+
+;;; Compatibility
+
+(defalias 'cond-let--and> #'cond-let--and$
+  "Instead of this alias, use `cond-let--and$' via `and$' shorthand.
+
+This alias will likely be declared obsolete in 2027.  If you would like
+to continue to use it, please get in contact before then.  This alias
+might eventually be removed altogether; again subject to user feedback.
+
+If you do not care about the symbol `cond-let--and>', but want to keep
+using the respective `and>' shorthand, you can future-proof that now,
+by changing the shorthand definition to (\"and>\" . \"cond-let--and$\").")
+
+(provide 'cond-let)
+;;; cond-let.el ends here
diff --git a/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let.elc b/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let.elc
new file mode 100644
index 0000000..5d489f2
Binary files /dev/null and b/emacs/.emacs.d/elpa/cond-let-20260817.452/cond-let.elc differ
diff --git a/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel-autoloads.el b/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel-autoloads.el
new file mode 100644
index 0000000..537ec28
--- /dev/null
+++ b/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel-autoloads.el
@@ -0,0 +1,433 @@
+;;; counsel-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from counsel.el
+
+(autoload 'counsel-company "counsel" "\
+Complete using `company-candidates'." t)
+(autoload 'counsel-irony "counsel" "\
+Inline C/C++ completion using Irony." t)
+(autoload 'counsel-describe-variable "counsel" "\
+Forward to `describe-variable'.
+
+Variables declared using `defcustom' are highlighted according to
+`ivy-highlight-face'." t)
+(autoload 'counsel-describe-function "counsel" "\
+Forward to `describe-function'.
+
+Interactive functions (i.e., commands) are highlighted according
+to `ivy-highlight-face'." t)
+(autoload 'counsel-describe-symbol "counsel" "\
+Forward to `describe-symbol'." t)
+(autoload 'counsel-set-variable "counsel" "\
+Set a variable SYM, with completion.
+
+When the selected variable is a `defcustom' with the type boolean
+or radio, offer completion of all possible values.
+
+Otherwise, offer a variant of `eval-expression', with the initial
+input corresponding to the chosen variable.
+
+With a prefix arg, restrict list to variables defined using
+`defcustom'.
+
+(fn SYM)" t)
+(autoload 'counsel-apropos "counsel" "\
+Show all matching symbols.
+See `apropos' for further information on what is considered
+a symbol and how to search for them." t)
+(autoload 'counsel-info-lookup-symbol "counsel" "\
+Forward SYMBOL to `info-lookup-symbol' with ivy completion.
+With prefix arg MODE a query for the symbol help mode is offered.
+
+(fn SYMBOL &optional MODE)" t)
+(autoload 'counsel-M-x "counsel" "\
+Ivy version of `execute-extended-command'.
+Optional INITIAL-INPUT is the initial input in the minibuffer.
+This function integrates with either the `amx' or `smex' package when
+available, in that order of precedence; see `counsel-M-x-collection'.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'counsel-command-history "counsel" "\
+Show the history of commands." t)
+(autoload 'counsel-load-library "counsel" "\
+Load a selected the Emacs Lisp library.
+The libraries are offered from `load-path'." t)
+(autoload 'counsel-find-library "counsel" "\
+Visit a selected the Emacs Lisp library.
+The libraries are offered from `load-path'." t)
+(autoload 'counsel-load-theme "counsel" "\
+Forward to `load-theme'.
+Usable with `ivy-resume', `ivy-next-line-and-call' and
+`ivy-previous-line-and-call'." t)
+(autoload 'counsel-descbinds "counsel" "\
+Show a list of all defined keys and their definitions.
+If non-nil, show only bindings that start with PREFIX.
+BUFFER defaults to the current one.
+
+(fn &optional PREFIX BUFFER)" t)
+(autoload 'counsel-describe-face "counsel" "\
+Completion for `describe-face'." t)
+(autoload 'counsel-faces "counsel" "\
+Complete faces with preview.
+Actions are provided by default for describing or customizing the
+selected face." t)
+(autoload 'counsel-minor "counsel" "\
+Enable or disable minor mode.
+
+Disabled minor modes are prefixed with \"+\", and
+selecting one of these will enable it.
+Enabled minor modes are prefixed with \"-\", and
+selecting one of these will enable it.
+
+Additional actions:\\<ivy-minibuffer-map>
+
+  \\[ivy-dispatching-done] d: Go to minor mode definition
+  \\[ivy-dispatching-done] h: Describe minor mode" t)
+(autoload 'counsel-major "counsel" nil t)
+(autoload 'counsel-git "counsel" "\
+Find file in the current Git repository.
+INITIAL-INPUT can be given as the initial minibuffer input.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'counsel-git-grep "counsel" "\
+Grep for a string in the current Git repository.
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search.
+When CMD is a string, use it as a \"git grep\" command.
+When CMD is non-nil, prompt for a specific \"git grep\" command.
+
+(fn &optional INITIAL-INPUT INITIAL-DIRECTORY CMD)" t)
+(autoload 'counsel-git-stash "counsel" "\
+Search through all available git stashes." t)
+(autoload 'counsel-git-change-worktree "counsel" "\
+Find the file corresponding to the current buffer on a different worktree." t)
+(autoload 'counsel-git-checkout "counsel" "\
+Call the \"git checkout\" command." t)
+(autoload 'counsel-git-log "counsel" "\
+Call the \"git log --grep\" shell command." t)
+(autoload 'counsel-find-file "counsel" "\
+Forward to `find-file'.
+When INITIAL-INPUT is non-nil, use it in the minibuffer during completion.
+
+(fn &optional INITIAL-INPUT INITIAL-DIRECTORY)" t)
+(autoload 'counsel-dired "counsel" "\
+Forward to `dired'.
+When INITIAL-INPUT is non-nil, use it in the minibuffer during completion.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'counsel-recentf "counsel" "\
+Find a file on `recentf-list'." t)
+(autoload 'counsel-buffer-or-recentf "counsel" "\
+Find a buffer visiting a file or file on `recentf-list'." t)
+(autoload 'counsel-bookmark "counsel" "\
+Forward to `bookmark-jump' or `bookmark-set' if bookmark doesn't exist." t)
+(autoload 'counsel-bookmarked-directory "counsel" "\
+Ivy interface for bookmarked directories.
+
+With a prefix argument, this command creates a new bookmark which points
+to the current value of `default-directory'." t)
+(autoload 'counsel-file-register "counsel" "\
+Search file in register.
+
+You cannot use Emacs' normal register commands to create file
+registers.  Instead you must use the `set-register' function like
+so: `(set-register ?i \"/home/eric/.emacs.d/init.el\")'.  Now you
+can use `C-x r j i' to open that file." t)
+(autoload 'counsel-locate-action-extern "counsel" "\
+Pass X to `xdg-open' or equivalent command via the shell.
+
+(fn X)" t)
+(autoload 'counsel-locate "counsel" "\
+Call a \"locate\" style shell command.
+INITIAL-INPUT can be given as the initial minibuffer input.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'counsel-tracker "counsel" nil t)
+(autoload 'counsel-fzf "counsel" "\
+Open a file using the fzf shell command.
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search.
+FZF-PROMPT, if non-nil, is passed as `ivy-read' prompt argument.
+
+(fn &optional INITIAL-INPUT INITIAL-DIRECTORY FZF-PROMPT)" t)
+(autoload 'counsel-dpkg "counsel" "\
+Call the \"dpkg\" shell command." t)
+(autoload 'counsel-rpm "counsel" "\
+Call the \"rpm\" shell command." t)
+(autoload 'counsel-file-jump "counsel" "\
+Jump to a file below the current directory.
+List all files within the current directory or any of its sub-directories.
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search.
+
+(fn &optional INITIAL-INPUT INITIAL-DIRECTORY)" t)
+(autoload 'counsel-dired-jump "counsel" "\
+Jump to a directory (see `dired-jump') below the current directory.
+List all sub-directories within the current directory.
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search.
+
+(fn &optional INITIAL-INPUT INITIAL-DIRECTORY)" t)
+(autoload 'counsel-ag "counsel" "\
+Grep for a string in a root directory using `ag'.
+
+By default, the root directory is the first directory containing
+a .git subdirectory.
+
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search.
+EXTRA-AG-ARGS, if non-nil, is appended to `counsel-ag-base-command'.
+AG-PROMPT, if non-nil, is passed as `ivy-read' prompt argument.
+CALLER is passed to `ivy-read'.
+
+With a `\\[universal-argument]' prefix argument, prompt for INITIAL-DIRECTORY.
+With a `\\[universal-argument] \\[universal-argument]' prefix argument, prompt additionally for EXTRA-AG-ARGS.
+
+(fn &optional INITIAL-INPUT INITIAL-DIRECTORY EXTRA-AG-ARGS AG-PROMPT &key CALLER)" t)
+(autoload 'counsel-pt "counsel" "\
+Grep for a string in the current directory using pt.
+INITIAL-INPUT can be given as the initial minibuffer input.
+This uses `counsel-ag' with `counsel-pt-base-command' instead of
+`counsel-ag-base-command'.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'counsel-ack "counsel" "\
+Grep for a string in the current directory using ack.
+INITIAL-INPUT can be given as the initial minibuffer input.
+This uses `counsel-ag' with `counsel-ack-base-command' replacing
+`counsel-ag-base-command'.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'counsel-rg "counsel" "\
+Grep for a string in the current directory using `rg'.
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search.
+EXTRA-RG-ARGS string, if non-nil, is appended to `counsel-rg-base-command'.
+RG-PROMPT, if non-nil, is passed as `ivy-read' prompt argument.
+
+Example input with inclusion and exclusion file patterns:
+    require i -- -g*.el
+
+(fn &optional INITIAL-INPUT INITIAL-DIRECTORY EXTRA-RG-ARGS RG-PROMPT)" t)
+(autoload 'counsel-grep "counsel" "\
+Grep for a string in the file visited by the current buffer.
+When non-nil, INITIAL-INPUT is the initial search pattern.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'counsel-grep-backward "counsel" "\
+Grep for a string in the file visited by the current buffer going
+backward similar to `swiper-backward'. When non-nil, INITIAL-INPUT is
+the initial search pattern.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'counsel-grep-or-swiper "counsel" "\
+Call `swiper' for small buffers and `counsel-grep' for large ones.
+When non-nil, INITIAL-INPUT is the initial search pattern.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'counsel-grep-or-swiper-backward "counsel" "\
+Call `swiper-backward' for small buffers and `counsel-grep-backward' for
+large ones.  When non-nil, INITIAL-INPUT is the initial search pattern.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'counsel-recoll "counsel" "\
+Search for a string in the recoll database.
+You'll be given a list of files that match.
+Selecting a file will launch `swiper' for that file.
+INITIAL-INPUT can be given as the initial minibuffer input.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'counsel--org-get-tags "counsel")
+(autoload 'counsel-org-tag "counsel" "\
+Add or remove tags in `org-mode'." t)
+(autoload 'counsel-org-tag-agenda "counsel" "\
+Set tags for the current agenda item." t)
+(defalias 'counsel-org-goto #'counsel-outline)
+(autoload 'counsel-org-goto-all "counsel" "\
+Go to a different location in any org file." t)
+(autoload 'counsel-org-file "counsel" "\
+Browse all attachments for current Org file." t)
+(autoload 'counsel-org-entity "counsel" "\
+Complete Org entities using Ivy." t)
+(autoload 'counsel-org-capture "counsel" "\
+Capture something." t)
+(autoload 'counsel-org-agenda-headlines "counsel" "\
+Choose from headers of `org-mode' files in the agenda." t)
+(autoload 'counsel-org-link "counsel" "\
+Insert a link to an headline with completion." t)
+(autoload 'counsel-mark-ring "counsel" "\
+Browse `mark-ring' interactively.
+Obeys `widen-automatically', which see." t)
+(autoload 'counsel-evil-marks "counsel" "\
+Ivy replacement for `evil-show-marks'.
+By default, this function respects `counsel-evil-marks-exclude-registers'.
+When ARG is non-nil, display all active evil registers.
+
+(fn &optional ARG)" t)
+(autoload 'counsel-package "counsel" "\
+Install or delete packages.
+
+Packages not currently installed are prefixed with \"+\", and
+selecting one of these will try to install it.
+Packages currently installed are prefixed with \"-\", and
+selecting one of these will try to delete it.
+
+Additional actions:\\<ivy-minibuffer-map>
+
+  \\[ivy-dispatching-done] d: Describe package
+  \\[ivy-dispatching-done] h: Visit package's homepage" t)
+(autoload 'counsel-tmm "counsel" "\
+Text-mode emulation of looking and choosing from a menu bar." t)
+(autoload 'counsel-yank-pop "counsel" "\
+Ivy replacement for `yank-pop'.
+With a plain prefix argument (\\[universal-argument]),
+temporarily toggle the value of `counsel-yank-pop-after-point'.
+Any other value of ARG has the same meaning as in `yank-pop', but
+`counsel-yank-pop-preselect-last' determines its default value.
+See also `counsel-yank-pop-filter' for how to filter candidates.
+
+Note: Duplicate elements of `kill-ring' are always deleted.
+
+(fn &optional ARG)" t)
+(autoload 'counsel-register "counsel" "\
+Interactively choose a register." t)
+(autoload 'counsel-evil-registers "counsel" "\
+Ivy replacement for `evil-show-registers'." t)
+(autoload 'counsel-imenu "counsel" "\
+Jump to a buffer position indexed by imenu." t)
+(autoload 'counsel-list-processes "counsel" "\
+Offer completion for `process-list'.
+The default action deletes the selected process.
+An extra action allows to switch to the process buffer." t)
+(autoload 'counsel-minibuffer-history "counsel" "\
+Browse minibuffer history." t)
+(autoload 'counsel-esh-history "counsel" "\
+Browse Eshell history." t)
+(autoload 'counsel-shell-history "counsel" "\
+Browse shell history." t)
+(autoload 'counsel-slime-repl-history "counsel" "\
+Browse Slime REPL history." t)
+(autoload 'counsel-hydra-heads "counsel" "\
+Call a head of the current/last hydra." t)
+(autoload 'counsel-semantic "counsel" "\
+Jump to a semantic tag in the current buffer." t)
+(autoload 'counsel-semantic-or-imenu "counsel" nil t)
+(autoload 'counsel-outline "counsel" "\
+Jump to an outline heading with completion." t)
+(autoload 'counsel-ibuffer "counsel" "\
+Use ibuffer to switch to another buffer.
+NAME specifies the name of the buffer (defaults to \"*Ibuffer*\").
+
+(fn &optional NAME)" t)
+(autoload 'counsel-switch-to-shell-buffer "counsel" "\
+Switch to a shell buffer, or create one." t)
+(autoload 'counsel-unicode-char "counsel" "\
+Insert COUNT copies of a Unicode character at point.
+COUNT defaults to 1.
+
+(fn &optional COUNT)" t)
+(autoload 'counsel-colors-emacs "counsel" "\
+Show a list of all supported colors for a particular frame.
+
+You can insert or kill the name or hexadecimal RGB value of the
+selected color." t)
+(autoload 'counsel-colors-web "counsel" "\
+Show a list of all W3C web colors for use in CSS.
+
+You can insert or kill the name or hexadecimal RGB value of the
+selected color." t)
+(autoload 'counsel-fonts "counsel" "\
+Show a list of all supported font families for a particular frame.
+
+You can insert or kill the name of the selected font." t)
+(autoload 'counsel-kmacro "counsel" "\
+Interactively choose and execute a keyboard macro.
+
+With a prefix argument, execute the macro that many times.
+
+Macros are executed using their respective `kmacro-counter' value and
+counter format; these values are also displayed next to each completion
+candidate.
+
+The default actions include the ability to copy one macro's counter
+value or format as the basis for another macro execution or definition.
+
+The following key bindings are also available:
+\\{counsel-kmacro-map}" t)
+(autoload 'counsel-geiser-doc-look-up-manual "counsel" "\
+Search Scheme documentation." t)
+(autoload 'counsel-rhythmbox "counsel" "\
+Choose a song from the Rhythmbox library to play or enqueue.
+
+(fn &optional ARG)" t)
+(autoload 'counsel-linux-app "counsel" "\
+Launch a Linux desktop application, similar to Alt-<F2>.
+When ARG is non-nil, ignore NoDisplay property in *.desktop files.
+
+(fn &optional ARG)" t)
+(autoload 'counsel-wmctrl "counsel" "\
+Select a desktop window using wmctrl." t)
+(autoload 'counsel-switch-buffer "counsel" "\
+Switch to another buffer.
+Display a preview of the selected ivy completion candidate buffer
+in the current window." t)
+(autoload 'counsel-switch-buffer-other-window "counsel" "\
+Switch to another buffer in another window.
+Display a preview of the selected ivy completion candidate buffer
+in the current window." t)
+(autoload 'counsel-compile "counsel" "\
+Call `compile' completing with smart suggestions, optionally for DIR.
+
+Additional actions:
+
+\\{counsel-compile-map}
+
+(fn &optional DIR)" t)
+(autoload 'counsel-compile-env "counsel" "\
+Update `counsel-compile-env' interactively." t)
+(autoload 'counsel-compilation-errors "counsel" "\
+Compilation errors." t)
+(autoload 'counsel-flycheck "counsel" "\
+Flycheck errors." t)
+(defvar counsel-mode nil "\
+Non-nil if counsel mode is enabled.
+See the `counsel-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 `counsel-mode'.")
+(custom-autoload 'counsel-mode "counsel" nil)
+(autoload 'counsel-mode "counsel" "\
+Toggle Counsel mode on or off.
+Turn Counsel mode on if ARG is positive, off otherwise. Counsel
+mode remaps built-in emacs functions that have counsel
+replacements.
+
+Local bindings (`counsel-mode-map'):
+\\{counsel-mode-map}
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "counsel" '("counsel-" "ivy-function-called-at-point"))
+
+;;; End of scraped data
+
+(provide 'counsel-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; counsel-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel-pkg.el b/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel-pkg.el
new file mode 100644
index 0000000..4da2757
--- /dev/null
+++ b/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel-pkg.el
@@ -0,0 +1,12 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "counsel" "20260214.1004"
+  "Various completion functions using Ivy."
+  '((emacs  "24.5")
+    (ivy    "0.15.1")
+    (swiper "0.15.1"))
+  :url "https://github.com/abo-abo/swiper"
+  :commit "ee79f68215ae7e2b8a38ba6bf7f82b3fe57dc16c"
+  :revdesc "ee79f68215ae"
+  :keywords '("convenience" "matching" "tools")
+  :authors '(("Oleh Krehel" . "ohwoeowho@gmail.com"))
+  :maintainers '(("Basil L. Contovounesios" . "basil@contovou.net")))
diff --git a/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel.el b/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel.el
new file mode 100644
index 0000000..3f5c202
--- /dev/null
+++ b/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel.el
@@ -0,0 +1,7456 @@
+;;; counsel.el --- Various completion functions using Ivy -*- lexical-binding: t -*-
+
+;; Copyright (C) 2015-2026 Free Software Foundation, Inc.
+
+;; Author: Oleh Krehel <ohwoeowho@gmail.com>
+;; Maintainer: Basil L. Contovounesios <basil@contovou.net>
+;; URL: https://github.com/abo-abo/swiper
+;; Package-Version: 20260214.1004
+;; Package-Revision: ee79f68215ae
+;; Package-Requires: ((emacs "24.5") (ivy "0.15.1") (swiper "0.15.1"))
+;; Keywords: convenience, matching, tools
+
+;; This file is part of GNU Emacs.
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; For a full copy of the GNU General Public License
+;; see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Just call one of the interactive functions in this file to complete
+;; the corresponding thing using `ivy'.
+;;
+;; Currently available:
+;; - Symbol completion for Elisp, Common Lisp, Python, Clojure, C, C++.
+;; - Describe functions for Elisp: function, variable, library, command,
+;;   bindings, theme.
+;; - Navigation functions: imenu, ace-line, semantic, outline.
+;; - Git utilities: git-files, git-grep, git-log, git-stash, git-checkout.
+;; - Grep utilities: grep, ag, pt, recoll, ack, rg.
+;; - System utilities: process list, rhythmbox, linux-app.
+;; - Many more.
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'ivy)
+(require 'swiper)
+
+(eval-when-compile
+  (require 'subr-x))
+
+(eval-when-compile
+  (unless (fboundp 'static-if)
+    (defmacro static-if (condition then-form &rest else-forms)
+      "Expand to THEN-FORM or ELSE-FORMS based on compile-time CONDITION.
+Polyfill for Emacs 30 `static-if'."
+      (declare (debug (sexp sexp &rest sexp)) (indent 2))
+      (if (eval condition lexical-binding)
+          then-form
+        (macroexp-progn else-forms)))))
+
+(defgroup counsel nil
+  "Completion functions using Ivy."
+  :group 'matching
+  :prefix "counsel-")
+
+;;; Utility
+
+(defun counsel--elisp-to-pcre (regex &optional look-around)
+  "Convert REGEX from Elisp format to PCRE format, on best-effort basis.
+REGEX may be of any format returned by an Ivy regex function,
+namely a string or a list.  The return value is always a string.
+
+Note that incorrect results may be returned for sufficiently
+complex regexes."
+  (if (consp regex)
+      (if (and look-around
+               (or (cdr regex)
+                   (not (cdar regex))))
+          (concat
+           "^"
+           (mapconcat
+            (lambda (pair)
+              (let ((subexp (counsel--elisp-to-pcre (car pair))))
+                (format "(?%c.*%s)"
+                        (if (cdr pair) ?= ?!)
+                        subexp)))
+            regex
+            ""))
+        (mapconcat
+         (lambda (pair)
+           (let ((subexp (counsel--elisp-to-pcre (car pair))))
+             (if (ivy--string-search "|" subexp)
+                 (format "(?:%s)" subexp)
+               subexp)))
+         (cl-remove-if-not #'cdr regex)
+         ".*"))
+    (replace-regexp-in-string
+     "\\\\[(){}|`']\\|[()]"
+     (lambda (s)
+       (or (cdr (assoc s '(("\\(" . "(")
+                           ("\\)" . ")")
+                           ("(" . "\\(")
+                           (")" . "\\)")
+                           ("\\{" . "{")
+                           ("\\}" . "}")
+                           ("\\|" . "|")
+                           ("\\`" . "^")
+                           ("\\'" . "$"))))
+           (error
+            "Unexpected error in `counsel--elisp-to-pcre' (got match %S)" s)))
+     regex t t)))
+
+(defun counsel-directory-name (dir)
+  "Return the name of directory DIR with a slash."
+  (file-name-as-directory
+   (file-name-nondirectory
+    (directory-file-name dir))))
+
+(defun counsel-string-compose (prefix str)
+  "Make PREFIX the display prefix of STR through text properties."
+  (let ((str (copy-sequence str)))
+    (put-text-property
+     0 1 'display
+     (concat prefix (substring str 0 1))
+     str)
+    str))
+
+(defalias 'counsel--executable-find
+  ;; Gained optional argument in 27.1.
+  (if (>= emacs-major-version 27)
+      #'executable-find
+    (lambda (command &optional _remote)
+      (executable-find command)))
+  "Compatibility shim for `executable-find'.")
+
+(defun counsel-require-program (cmd &optional noerror)
+  "Check system for program used in CMD, printing error if not found.
+CMD is either a string or a list of strings.
+To skip the `executable-find' check, start the string with a space.
+When NOERROR is non-nil, return nil instead of raising an error."
+  (unless (and (stringp cmd) (string-prefix-p " " cmd))
+    (let ((program (if (listp cmd)
+                       (car cmd)
+                     (car (split-string cmd)))))
+      (or (and (stringp program)
+               (not (string= program ""))
+               (counsel--executable-find program t))
+          (unless noerror
+            (user-error "Required program \"%s\" not found in your path" program))))))
+
+(defun counsel-prompt-function-dir ()
+  "Return prompt appended with the parent directory."
+  (declare (obsolete "it is no longer used." "0.15.1"))
+  (require 'esh-util)
+  (let* ((dir (ivy-state-directory ivy-last))
+         (parts (nthcdr 3 (funcall (if (fboundp 'eshell-split-filename)
+                                       ;; New name since Emacs 30.
+                                       #'eshell-split-filename
+                                     'eshell-split-path)
+                                   dir)))
+         (dir (format " [%s]: " (if parts (apply #'concat "..." parts) dir))))
+    (ivy-add-prompt-count
+     (replace-regexp-in-string          ; Insert dir before any trailing colon.
+      "\\(?:: ?\\)?\\'" dir (ivy-state-prompt ivy-last) t t))))
+
+(defalias 'counsel--flatten
+  ;; Added in Emacs 27.1
+  (if (fboundp 'flatten-tree)
+      #'flatten-tree
+    (lambda (tree)
+      (let (elems)
+        (while (consp tree)
+          (let ((elem (pop tree)))
+            (while (consp elem)
+              (push (cdr elem) tree)
+              (setq elem (car elem)))
+            (if elem (push elem elems))))
+        (if tree (push tree elems))
+        (nreverse elems))))
+  "Compatibility shim for `flatten-tree'.")
+
+(defun counsel--format (formatter &rest args)
+  "Like `format' but FORMATTER can be a list.
+When FORMATTER is a list, only `%s' is replaced with ARGS.
+
+Return a list or string depending on input."
+  (cond
+   ((listp formatter)
+    (counsel--flatten (mapcar
+                       (lambda (it) (if (equal it "%s") (pop args) it))
+                       formatter)))
+   (t (apply #'format formatter args))))
+
+(defalias 'counsel--null-device
+  (if (fboundp 'null-device) #'null-device (lambda () null-device))
+  "Compatibility shim for Emacs 28 function `null-device'.")
+
+;;;; Async utility
+
+(defvar counsel--async-time nil
+  "Store the time when a new process was started.
+Or the time of the last minibuffer update.")
+
+(defvar counsel--async-start nil
+  "Store the time when a new process was started.")
+
+(defvar counsel--async-timer nil
+  "Timer used to dispose `counsel--async-command.")
+
+(defvar counsel--async-duration nil
+  "Store the time a process takes to gather all its candidates.
+The time is measured in seconds.")
+
+(defvar counsel--async-exit-code-plist ()
+  "Associate commands with their exit code descriptions.
+This plist maps commands to a plist mapping their exit codes to
+descriptions.")
+
+(defvar counsel--async-last-error-string nil
+  "When the process returned non-0, store the output here.")
+
+(defun counsel-set-async-exit-code (cmd number str)
+  "For CMD, associate NUMBER exit code with STR."
+  (let ((plist (plist-get counsel--async-exit-code-plist cmd)))
+    (setq counsel--async-exit-code-plist
+          (plist-put counsel--async-exit-code-plist
+                     cmd
+                     (plist-put plist number str)))))
+
+(defvar counsel-async-split-string-re-alist '((t . "[\r\n]"))
+  "Store the regexp for splitting shell command output.")
+
+(defvar counsel-async-ignore-re-alist nil
+  "An alist of regexp matching candidates to ignore in `counsel--async-filter'.")
+
+(defvar counsel--async-last-command nil
+  "Store the last command ran by `counsel--async-command-1'.")
+
+(defun counsel--async-command-1 (cmd &optional sentinel filter name)
+  "Start and return new counsel process by calling CMD.
+CMD can be either a shell command as a string, or a list of the
+program name to be called directly, followed by its arguments.
+If the default counsel process or one with NAME already exists,
+kill it and its associated buffer before starting a new one.
+Give the process the functions SENTINEL and FILTER, which default
+to `counsel--async-sentinel' and `counsel--async-filter',
+respectively."
+  (counsel-delete-process name)
+  (setq name (or name " *counsel*"))
+  (when (get-buffer name)
+    (kill-buffer name))
+  (setq counsel--async-last-command cmd)
+  (let* ((buf (get-buffer-create name))
+         (proc (if (listp cmd)
+                   (apply #'start-file-process name buf cmd)
+                 (start-file-process-shell-command name buf cmd))))
+    (setq counsel--async-time (current-time))
+    (setq counsel--async-start counsel--async-time)
+    (set-process-sentinel proc (or sentinel #'counsel--async-sentinel))
+    (set-process-filter proc (or filter #'counsel--async-filter))
+    proc))
+
+(defcustom counsel-async-command-delay 0
+  "Number of seconds to wait before spawning another async command."
+  :type 'number)
+
+(defun counsel--async-command (&rest args)
+  "Like `counsel--async-command-1', with same ARGS, but debounced.
+Calls to `counsel--async-command-1' are separated by at least
+`counsel-async-command-delay' seconds, so as to avoid issues
+caused by spawning too many subprocesses too quickly."
+  (if (zerop counsel-async-command-delay)
+      (apply #'counsel--async-command-1 args)
+    (when counsel--async-timer
+      (cancel-timer counsel--async-timer))
+    (setq counsel--async-timer
+          (apply #'run-with-timer
+                 counsel-async-command-delay
+                 nil
+                 #'counsel--async-command-1
+                 args))))
+
+(defun counsel--split-string (&optional str)
+  (split-string
+   (or str (buffer-string))
+   (ivy-alist-setting counsel-async-split-string-re-alist)
+   t))
+
+(defun counsel--sync-sentinel-on-exit (process)
+  (if (zerop (process-exit-status process))
+      (let ((cur (ivy-state-current ivy-last)))
+        (ivy--set-candidates
+         (ivy--sort-maybe
+          (with-current-buffer (process-buffer process)
+            (counsel--split-string))))
+        (when counsel--async-start
+          (setq counsel--async-duration
+                (time-to-seconds (time-since counsel--async-start))))
+        (let ((re (ivy-re-to-str ivy-regex)))
+          (if ivy--old-cands
+              (if (eq (ivy-alist-setting ivy-index-functions-alist) 'ivy-recompute-index-zero)
+                  (ivy-set-index 0)
+                (ivy--recompute-index re ivy--all-candidates))
+            ;; index was changed before a long-running query exited
+            (unless (string= cur (nth ivy--index ivy--all-candidates))
+              (let ((func (ivy-alist-setting ivy-index-functions-alist)))
+                (if func
+                    (funcall func re ivy--all-candidates)
+                  (ivy--preselect-index
+                   (if (> (length re) 0)
+                       cur
+                     (ivy-state-preselect ivy-last))
+                   ivy--all-candidates))))))
+        (setq ivy--old-cands ivy--all-candidates)
+        (if ivy--all-candidates
+            (ivy--exhibit)
+          (ivy--insert-minibuffer "")))
+    (setq counsel--async-last-error-string
+          (with-current-buffer (process-buffer process) (buffer-string)))
+    (setq ivy--all-candidates
+          (let ((status (process-exit-status process))
+                (plist (plist-get counsel--async-exit-code-plist
+                                  (ivy-state-caller ivy-last))))
+            (list (or (plist-get plist status)
+                      (format "error code %d" status)))))
+    (setq ivy--old-cands ivy--all-candidates)
+    (ivy--exhibit)))
+
+(defun counsel--async-sentinel (process _msg)
+  "Sentinel function for an asynchronous counsel PROCESS."
+  (when (eq (process-status process) 'exit)
+    (counsel--sync-sentinel-on-exit process)))
+
+(defcustom counsel-async-filter-update-time 500000
+  "The amount of microseconds to wait until updating `counsel--async-filter'."
+  :type 'integer)
+
+(defalias 'counsel--async-filter-update-time
+  (if (fboundp 'time-convert)
+      ;; Preferred (TICKS . HZ) format since Emacs 27.1.
+      (lambda () (cons counsel-async-filter-update-time 1000000))
+    (lambda () (list 0 0 counsel-async-filter-update-time)))
+  "Return `counsel-async-filter-update-time' as a time value.")
+
+(defun counsel--async-filter (process str)
+  "Receive from PROCESS the output STR.
+Update the minibuffer with the amount of lines collected every
+`counsel-async-filter-update-time' microseconds since the last update."
+  (with-current-buffer (process-buffer process)
+    (insert str))
+  (when (time-less-p (counsel--async-filter-update-time)
+                     (time-since counsel--async-time))
+    (let (numlines)
+      (with-current-buffer (process-buffer process)
+        (setq numlines (count-lines (point-min) (point-max)))
+        (ivy--set-candidates
+         (let ((lines (counsel--split-string))
+               (ignore-re (ivy-alist-setting counsel-async-ignore-re-alist)))
+           (if (stringp ignore-re)
+               (cl-delete-if (lambda (line)
+                               (string-match-p ignore-re line))
+                             lines)
+             lines))))
+      (let ((ivy--prompt (format "%d++ %s" numlines (ivy-state-prompt ivy-last))))
+        (ivy--insert-minibuffer (ivy--format ivy--all-candidates)))
+      (setq counsel--async-time (current-time)))))
+
+(defun counsel-delete-process (&optional name)
+  "Delete current counsel process or that with NAME."
+  (let ((process (get-process (or name " *counsel*"))))
+    (when process
+      (delete-process process))))
+
+;;; Completion at point
+
+(define-obsolete-function-alias 'counsel-el
+  #'complete-symbol "0.13.2 (2020-05-20)")
+(define-obsolete-function-alias 'counsel-cl
+  #'complete-symbol "0.13.2 (2020-05-20)")
+(define-obsolete-function-alias 'counsel-jedi
+  #'complete-symbol "0.13.2 (2020-05-20)")
+(define-obsolete-function-alias 'counsel-clj
+  #'complete-symbol "0.13.2 (2020-05-20)")
+
+;;;; `counsel-company'
+
+(defvar company-candidates)
+(declare-function company-abort "ext:company")
+(declare-function company-complete "ext:company")
+(declare-function company-mode "ext:company")
+(declare-function company-call-backend "ext:company")
+(declare-function company--clean-string "ext:company")
+(declare-function company--continue "ext:company")
+
+;;;###autoload
+(defun counsel-company ()
+  "Complete using `company-candidates'."
+  (interactive)
+  (company-mode 1)
+  (unless company-candidates
+    (company-complete))
+  (when company-candidates
+    (company--continue)
+    (ivy-read "Candidate: " company-candidates
+              :action 'company-finish
+              :caller 'counsel-company)))
+
+(ivy-configure 'counsel-company
+  :display-transformer-fn #'counsel--company-display-transformer
+  :unwind-fn (lambda() (unless ivy-exit (company-abort))))
+
+(defun counsel--company-display-transformer (s)
+  (concat s (let ((annot (company-call-backend 'annotation s)))
+              (when annot
+                (company--clean-string annot)))))
+
+;;;; `counsel-irony'
+
+(declare-function irony-completion-candidates-async "ext:irony-completion")
+(declare-function irony-completion-symbol-bounds "ext:irony-completion")
+(declare-function irony-completion-annotation "ext:irony-completion")
+
+;;;###autoload
+(defun counsel-irony ()
+  "Inline C/C++ completion using Irony."
+  (interactive)
+  (irony-completion-candidates-async #'counsel-irony-callback))
+
+(defun counsel-irony-callback (candidates)
+  "Callback function for Irony to search among CANDIDATES."
+  (let* ((symbol-bounds (irony-completion-symbol-bounds))
+         (beg (car symbol-bounds))
+         (end (cdr symbol-bounds))
+         (prefix (buffer-substring-no-properties beg end)))
+    (setq ivy-completion-beg beg
+          ivy-completion-end end)
+    (ivy-read "code: " (mapcar #'counsel-irony-annotate candidates)
+              :predicate (lambda (candidate)
+                           (string-prefix-p prefix (car candidate)))
+              :caller 'counsel-irony
+              :action #'ivy-completion-in-region-action)))
+
+(defun counsel-irony-annotate (x)
+  "Make Ivy candidate from Irony candidate X."
+  (cons (concat (car x) (irony-completion-annotation x))
+        (car x)))
+
+(ivy-configure #'counsel-irony
+  :display-fn #'ivy-display-function-overlay)
+
+;;; Elisp symbols
+;;;; `counsel-describe-variable'
+
+(defvar counsel-describe-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-.") #'counsel-find-symbol)
+    (define-key map (kbd "C-,") #'counsel--info-lookup-symbol)
+    map)
+  "Keymap for Counsel commands that describe symbols.")
+
+(ivy-set-actions
+ 'counsel-describe-variable
+ `(("I" ,#'counsel-info-lookup-symbol "info")
+   ("d" ,#'counsel--find-symbol "definition")))
+
+(defvar counsel-describe-symbol-history ()
+  "History list for variable and function names.
+Used by commands `counsel-describe-symbol',
+`counsel-describe-variable', and `counsel-describe-function'.")
+
+(defun counsel-find-symbol ()
+  "Jump to the definition of the current symbol."
+  (interactive)
+  (ivy-exit-with-action #'counsel--find-symbol))
+(ivy--no-M-x #'counsel-find-symbol #'ivy--minibuffer-p)
+
+(defun counsel--info-lookup-symbol ()
+  "Lookup the current symbol in the info docs."
+  (interactive)
+  (ivy-exit-with-action
+   (lambda (x)
+     (counsel-info-lookup-symbol (ivy--action-cand-to-str x)))))
+(ivy--no-M-x #'counsel--info-lookup-symbol #'ivy--minibuffer-p)
+
+(defun counsel--push-xref-marker (&optional m)
+  "Compatibility shim for `xref-push-marker-stack'."
+  (static-if (require 'xref nil t)
+      ;; Added in Emacs 25.1.
+      (progn
+        (unless (fboundp 'xref-push-marker-stack)
+          (require 'xref))
+        (xref-push-marker-stack m))
+    (unless (boundp 'find-tag-marker-ring)
+      (require 'etags))
+    (unless (fboundp 'ring-insert)
+      (require 'ring))
+    (defvar find-tag-marker-ring)
+    (declare-function ring-insert "ring" (ring item))
+    (ring-insert find-tag-marker-ring (or m (point-marker)))))
+
+(defun counsel--find-symbol (x)
+  "Find symbol definition that corresponds to action candidate X."
+  (with-ivy-window
+    (counsel--push-xref-marker)
+    (let* ((x (ivy--action-cand-to-str x))
+           (full-name (get-text-property 0 'full-name x)))
+      (if full-name
+          (find-library full-name)
+        (let ((sym (read x)))
+          (cond ((and (eq (ivy-state-caller ivy-last)
+                          'counsel-describe-variable)
+                      (boundp sym))
+                 (find-variable sym))
+                ((fboundp sym)
+                 (find-function sym))
+                ((boundp sym)
+                 (find-variable sym))
+                ((or (featurep sym)
+                     (locate-library
+                      (prin1-to-string sym)))
+                 (find-library
+                  (prin1-to-string sym)))
+                (t
+                 (error "Couldn't find definition of %s"
+                        sym))))))))
+
+(defun counsel--variable-p (symbol)
+  "Return non-nil if SYMBOL is a bound or documented variable."
+  (or (and (boundp symbol)
+           (not (keywordp symbol)))
+      (get symbol 'variable-documentation)))
+
+(defcustom counsel-describe-variable-function #'describe-variable
+  "Function to call to describe a variable passed as parameter."
+  :type 'function)
+
+(defun counsel-describe-variable-transformer (var)
+  "Propertize VAR if it's a custom variable."
+  (if (custom-variable-p (intern-soft var))
+      (ivy-append-face var 'ivy-highlight-face)
+    var))
+
+;;;###autoload
+(defun counsel-describe-variable ()
+  "Forward to `describe-variable'.
+
+Variables declared using `defcustom' are highlighted according to
+`ivy-highlight-face'."
+  (interactive)
+  (let ((enable-recursive-minibuffers t))
+    (ivy-read "Describe variable: " obarray
+              :predicate #'counsel--variable-p
+              :require-match t
+              :history 'counsel-describe-symbol-history
+              :keymap counsel-describe-map
+              :preselect (ivy-thing-at-point)
+              :action (lambda (x)
+                        (funcall counsel-describe-variable-function
+                                 (counsel--action-cand-to-interned x)))
+              :caller 'counsel-describe-variable)))
+
+(ivy-configure 'counsel-describe-variable
+  :parent 'counsel-describe-symbol
+  :display-transformer-fn #'counsel-describe-variable-transformer)
+
+;;;; `counsel-describe-function'
+
+(ivy-set-actions
+ 'counsel-describe-function
+ `(("I" ,#'counsel-info-lookup-symbol "info")
+   ("d" ,#'counsel--find-symbol "definition")))
+
+(defcustom counsel-describe-function-function #'describe-function
+  "Function to call to describe a function passed as parameter."
+  :type 'function)
+
+(defun counsel-describe-function-transformer (function-name)
+  "Propertize FUNCTION-NAME if it's an interactive function."
+  (if (commandp (intern-soft function-name))
+      (ivy-append-face function-name 'ivy-highlight-face)
+    function-name))
+
+(defun ivy-function-called-at-point ()
+  (let ((f (function-called-at-point)))
+    (and f (symbol-name f))))
+
+(defcustom counsel-describe-function-preselect #'ivy-thing-at-point
+  "Determine what `counsel-describe-function' should preselect."
+  :type '(radio
+          (function-item ivy-thing-at-point)
+          (function-item ivy-function-called-at-point)))
+
+(defun counsel--action-cand-to-interned (x)
+  "Try to return Ivy action argument X as an existing symbol.
+Not quite the dual of `ivy--action-cand-to-str'."
+  (intern-soft (if (consp x) (car x) x)))
+
+(defun counsel--describe-function (candidate)
+  "Pass string CANDIDATE to `counsel-describe-function-function'."
+  (funcall counsel-describe-function-function
+           (counsel--action-cand-to-interned candidate)))
+
+;;;###autoload
+(defun counsel-describe-function ()
+  "Forward to `describe-function'.
+
+Interactive functions (i.e., commands) are highlighted according
+to `ivy-highlight-face'."
+  (interactive)
+  (let ((enable-recursive-minibuffers t))
+    (ivy-read "Describe function: " obarray
+              :predicate (lambda (sym)
+                           (or (fboundp sym)
+                               (function-get sym 'function-documentation)))
+              :require-match t
+              :history 'counsel-describe-symbol-history
+              :keymap counsel-describe-map
+              :preselect (funcall counsel-describe-function-preselect)
+              :action #'counsel--describe-function
+              :caller 'counsel-describe-function)))
+
+(ivy-configure 'counsel-describe-function
+  :parent 'counsel-describe-symbol
+  :display-transformer-fn #'counsel-describe-function-transformer)
+
+;;;; `counsel-describe-symbol'
+
+(defcustom counsel-describe-symbol-function 'describe-symbol
+  "Function to call to describe a symbol passed as parameter."
+  :type 'function)
+
+;;;###autoload
+(defun counsel-describe-symbol ()
+  "Forward to `describe-symbol'."
+  (interactive)
+  (unless (functionp 'describe-symbol)
+    (user-error "This command requires Emacs 25.1 or later"))
+  (require 'help-mode)
+  (defvar describe-symbol-backends)
+  (let ((enable-recursive-minibuffers t))
+    (ivy-read "Describe symbol: " obarray
+              :predicate (lambda (sym)
+                           (cl-some (lambda (backend)
+                                      (funcall (cadr backend) sym))
+                                    describe-symbol-backends))
+              :require-match t
+              :history 'counsel-describe-symbol-history
+              :keymap counsel-describe-map
+              :preselect (ivy-thing-at-point)
+              :action (lambda (x)
+                        (funcall counsel-describe-symbol-function
+                                 (counsel--action-cand-to-interned x)))
+              :caller 'counsel-describe-symbol)))
+
+(ivy-configure 'counsel-describe-symbol
+  :initial-input "^"
+  :sort-fn #'ivy-string<)
+
+(ivy-set-actions
+ 'counsel-describe-symbol
+ `(("I" ,#'counsel-info-lookup-symbol "info")
+   ("d" ,#'counsel--find-symbol "definition")))
+
+;;;; `counsel-set-variable'
+
+(defvar counsel-set-variable-history nil
+  "Store history for `counsel-set-variable'.")
+
+(defun counsel-read-setq-expression (sym)
+  "Read and eval a setq expression for SYM."
+  (setq this-command 'eval-expression)
+  (let* ((sym-value (symbol-value sym))
+         (init (format "(setq %s%S)"
+                       (if (or (consp sym-value)
+                               (and sym-value (symbolp sym-value)))
+                           "'"
+                         "")
+                       sym-value)))
+    ;; Most of this duplicates `read--expression'.
+    (minibuffer-with-setup-hook
+        (lambda ()
+          (set-syntax-table emacs-lisp-mode-syntax-table)
+          ;; Added in Emacs 25.1.
+          (when (fboundp 'elisp-completion-at-point)
+            (add-hook 'completion-at-point-functions
+                      #'elisp-completion-at-point nil t))
+          ;; Emacs 27+ already sets up ElDoc in this hook.  Emacs 25 added
+          ;; `elisp-eldoc-documentation-function' and Emacs 28 obsoletes it.
+          (when (< emacs-major-version 27)
+            (when (fboundp 'elisp-eldoc-documentation-function)
+              (add-function :before-until (local 'eldoc-documentation-function)
+                            #'elisp-eldoc-documentation-function))
+            (eldoc-mode))
+          (run-hooks 'eval-expression-minibuffer-setup-hook)
+          ;; The following diverges from `read--expression'.
+          (goto-char (minibuffer-prompt-end))
+          (forward-char 6)
+          (insert (format "%S " sym)))
+      (read-from-minibuffer "Eval: " init read-expression-map t
+                            'read-expression-history))))
+
+(defun counsel--setq-doconst (x)
+  "Return a cons of description and value for X.
+X is an item of a radio- or choice-type defcustom."
+  (when (listp x)
+    (let ((v (car-safe (last x)))
+          (tag (and (eq (car x) 'const)
+                    (plist-get (cdr x) :tag))))
+      (when (and (or v tag) (not (eq v 'function)))
+        (cons
+         (concat
+          (when tag
+            (concat tag ": "))
+          (if (stringp v) v (prin1-to-string v)))
+         (if (symbolp v)
+             (list 'quote v)
+           v))))))
+
+(declare-function lv-message "ext:lv")
+(declare-function lv-delete-window "ext:lv")
+(declare-function custom-variable-documentation "cus-edit")
+
+(defface counsel-variable-documentation
+  '((t :inherit font-lock-comment-face))
+  "Face for displaying Lisp documentation."
+  :group 'ivy-faces)
+
+;;;###autoload
+(defun counsel-set-variable (sym)
+  "Set a variable SYM, with completion.
+
+When the selected variable is a `defcustom' with the type boolean
+or radio, offer completion of all possible values.
+
+Otherwise, offer a variant of `eval-expression', with the initial
+input corresponding to the chosen variable.
+
+With a prefix arg, restrict list to variables defined using
+`defcustom'."
+  (interactive (list (intern
+                      (ivy-read "Set variable: " obarray
+                                :predicate (if current-prefix-arg
+                                               #'custom-variable-p
+                                             #'counsel--variable-p)
+                                :history 'counsel-set-variable-history
+                                :preselect (ivy-thing-at-point)))))
+  (let ((doc (and (require 'cus-edit)
+                  (require 'lv nil t)
+                  (not (string= "nil" (custom-variable-documentation sym)))
+                  (propertize (custom-variable-documentation sym)
+                              'face 'counsel-variable-documentation)))
+        sym-type
+        cands)
+    (unwind-protect
+         (progn
+           (when doc
+             (lv-message (ivy--quote-format-string doc)))
+           (if (and (boundp sym)
+                    (setq sym-type (get sym 'custom-type))
+                    (cond
+                      ((and (consp sym-type)
+                            (memq (car sym-type) '(choice radio)))
+                       (setq cands (delq nil (mapcar #'counsel--setq-doconst
+                                                     (cdr sym-type)))))
+                      ((eq sym-type 'boolean)
+                       (setq cands '(("nil" . nil) ("t" . t))))
+                      (t nil)))
+               (let* ((sym-val (symbol-value sym))
+                      (res (ivy-read (format "Set (%S <%s>): " sym sym-val)
+                                     cands
+                                     :preselect (prin1-to-string sym-val))))
+                 (when res
+                   (setq res
+                         (if (assoc res cands)
+                             (cdr (assoc res cands))
+                           (read res)))
+                   (kill-new (format "(setq %S %S)" sym res))
+                   (set sym (if (and (listp res) (eq (car res) 'quote))
+                                (cadr res)
+                              res))))
+             (unless (boundp sym)
+               (set sym nil))
+             (let ((expr (counsel-read-setq-expression sym)))
+               (kill-new (format "%S" expr))
+               (eval-expression expr))))
+      (when doc
+        (lv-delete-window)))))
+
+;;;; `counsel-apropos'
+
+;;;###autoload
+(defun counsel-apropos ()
+  "Show all matching symbols.
+See `apropos' for further information on what is considered
+a symbol and how to search for them."
+  (interactive)
+  (ivy-read "Search for symbol (word list or regexp): " obarray
+            :predicate (lambda (sym)
+                         (or (fboundp sym)
+                             (boundp sym)
+                             (facep sym)
+                             (symbol-plist sym)))
+            :history 'counsel-apropos-history
+            :preselect (ivy-thing-at-point)
+            :action (lambda (pattern)
+                      (when (string= pattern "")
+                        (user-error "Please specify a pattern"))
+                      ;; If the user selected a candidate form the list, we use
+                      ;; a pattern which matches only the selected symbol.
+                      (if (memq this-command '(ivy-immediate-done ivy-alt-done))
+                          ;; Regexp pattern are passed verbatim, other input is
+                          ;; split into words.
+                          (if (string= (regexp-quote pattern) pattern)
+                              (apropos (split-string pattern "[ \t]+" t))
+                            (apropos pattern))
+                        (apropos (concat "\\`" pattern "\\'"))))
+            :caller 'counsel-apropos))
+
+(ivy-configure 'counsel-apropos
+  :sort-fn #'ivy-string<)
+
+;;;; `counsel-info-lookup-symbol'
+
+(defvar info-lookup-mode)
+(declare-function info-lookup-guess-default "info-look")
+(declare-function info-lookup->completions "info-look")
+(declare-function info-lookup->mode-value "info-look")
+(declare-function info-lookup-select-mode "info-look")
+(declare-function info-lookup-change-mode "info-look")
+(declare-function info-lookup "info-look")
+
+;;;###autoload
+(defun counsel-info-lookup-symbol (symbol &optional mode)
+  "Forward SYMBOL to `info-lookup-symbol' with ivy completion.
+With prefix arg MODE a query for the symbol help mode is offered."
+  (interactive
+   (progn
+     (require 'info-look)
+     ;; Courtesy of `info-lookup-interactive-arguments'
+     (let* ((topic 'symbol)
+            (mode (cond (current-prefix-arg
+                         (info-lookup-change-mode topic))
+                        ((info-lookup->mode-value
+                          topic (info-lookup-select-mode))
+                         info-lookup-mode)
+                        ((info-lookup-change-mode topic))))
+            (enable-recursive-minibuffers t))
+       (list (ivy-read "Describe symbol: " (info-lookup->completions topic mode)
+                       :history 'info-lookup-history
+                       :preselect (info-lookup-guess-default topic mode)
+                       :caller 'counsel-info-lookup-symbol)
+             mode))))
+  (info-lookup-symbol symbol mode))
+
+(ivy-configure 'counsel-info-lookup-symbol
+  :sort-fn #'ivy-string<)
+
+;;;; `counsel-M-x'
+
+(defface counsel-key-binding
+  ;; Default Emacs 28 `help-key-binding' doesn't look great in parentheses.
+  '((t :inherit font-lock-keyword-face))
+  "Face used by `counsel-M-x' for key bindings."
+  :group 'ivy-faces)
+
+(defface counsel-active-mode
+  '((t :inherit font-lock-builtin-face))
+  "Face used by `counsel-M-x' for activated modes."
+  :group 'ivy-faces)
+
+(defcustom counsel-alias-expand t
+  "When non-nil, show the expansion of aliases in `counsel-M-x'."
+  :type 'boolean
+  :group 'ivy)
+
+(defun counsel-M-x-transformer (cmd)
+  "Return CMD annotated with its active key binding, if any."
+  (let* ((sym (intern cmd))
+         (alias (symbol-function sym))
+         (key (where-is-internal sym nil t)))
+    (when (or (eq sym major-mode)
+              (and
+               (memq sym minor-mode-list)
+               (boundp sym)
+               (buffer-local-value sym (ivy-state-buffer ivy-last))))
+      (setq cmd (propertize cmd 'face 'counsel-active-mode)))
+    (concat cmd
+            (when (and (symbolp alias) counsel-alias-expand)
+              (format " (%s)" alias))
+            (when (and key suggest-key-bindings)
+              ;; Prefer `<f2>' over `C-x 6' where applicable
+              (let ((i (cl-search [?\C-x ?6] key)))
+                (when i
+                  (let ((dup (vconcat (substring key 0 i) [f2] (substring key (+ i 2))))
+                        (map (current-global-map)))
+                    (when (equal (lookup-key map key)
+                                 (lookup-key map dup))
+                      (setq key dup)))))
+              (setq key (key-description key))
+              (setq key (propertize key 'face 'counsel-key-binding))
+              (format " (%s)" key)))))
+
+(defcustom counsel-M-x-collection 'auto
+  "Where to source `counsel-M-x' completion candidates from.
+`obarray' - Use the default M-x collection built into Emacs.
+`amx'     - Source candidates from the external `amx' package.
+`smex'    - Source candidates from the external `smex' package.
+`auto'    - Automatically detect one of the previous options,
+            falling back to `obarray'.  This is the default.
+The value can alternatively be a function of no arguments
+that returns a completion table suitable for `ivy-read'."
+  :package-version '(counsel . "0.16.0")
+  :type '(choice (const :tag "Built-in" obarray)
+                 (const :tag "Amx package" amx)
+                 (const :tag "Smex package" smex)
+                 (const :tag "Auto-detect" auto)
+                 (function :tag "Custom function")))
+
+(defun counsel--M-x-collection ()
+  "Return a completion table obeying `counsel-M-x-collection'."
+  (let ((src counsel-M-x-collection))
+    (cond ((eq src 'obarray) obarray)
+          ((eq src 'auto)
+           (cond ((ivy--feature-p 'amx)
+                  (counsel--amx-collection))
+                 ((ivy--feature-p 'smex)
+                  (counsel--smex-collection))
+                 (obarray)))
+          ((eq src 'amx)
+           (unless (ivy--feature-p 'amx)
+             (user-error "Package `amx' not installed"))
+           (counsel--amx-collection))
+          ((eq src 'smex)
+           (unless (ivy--feature-p 'smex)
+             (user-error "Package `smex' not installed"))
+           (counsel--smex-collection))
+          ((functionp src) (funcall src))
+          ((user-error "Unknown `counsel-M-x-collection': %S" src)))))
+
+(defun counsel--M-x-extern-rank (cmd)
+  "Tell external `counsel-M-x-collection' that CMD was selected."
+  (declare-function amx-rank "ext:amx")
+  (declare-function smex-rank "ext:smex")
+  (let ((src counsel-M-x-collection))
+    (cond ((and (memq src '(auto amx))
+                (bound-and-true-p amx-initialized))
+           (amx-rank cmd))
+          ((and (memq src '(auto smex))
+                (bound-and-true-p smex-initialized-p))
+           (smex-rank cmd)))))
+
+(defun counsel--amx-collection ()
+  "Return `counsel-M-x' candidates from the `amx' package."
+  (declare-function amx-detect-new-commands "ext:amx")
+  (declare-function amx-initialize "ext:amx")
+  (declare-function amx-update "ext:amx")
+  (defvar amx-cache)
+  (defvar amx-initialized)
+  (unless amx-initialized
+    (amx-initialize))
+  (when (amx-detect-new-commands)
+    (amx-update))
+  amx-cache)
+
+(defun counsel--smex-collection ()
+  "Return `counsel-M-x' candidates from the `smex' package."
+  (declare-function smex-detect-new-commands "ext:smex")
+  (declare-function smex-initialize "ext:smex")
+  (declare-function smex-update "ext:smex")
+  (defvar smex-ido-cache)
+  (defvar smex-initialized-p)
+  (unless smex-initialized-p
+    (smex-initialize))
+  (when (smex-detect-new-commands)
+    (smex-update))
+  smex-ido-cache)
+
+(defun counsel--M-x-predicate ()
+  "Return a predicate for `counsel-M-x' in the current buffer."
+  (let ((buf (current-buffer)))
+    ;; Should work with all completion table types.
+    (lambda (key &optional _val)
+      (when (consp key) (setq key (car key)))
+      (when (stringp key) (setq key (intern key)))
+      (and (commandp key)
+           (not (function-get key 'byte-obsolete-info))
+           (not (function-get key 'no-counsel-M-x))
+           ;; New in Emacs 28.
+           (let ((pred (bound-and-true-p read-extended-command-predicate)))
+             (or (not (functionp pred))
+                 (condition-case-unless-debug err
+                     (funcall pred key buf)
+                   (error (message "read-extended-command-predicate: %s: %s"
+                                   key (error-message-string err))))))))))
+
+(defun counsel--M-x-prompt (arg)
+  "Prompt for `counsel-M-x' preceded by a printed form of prefix ARG."
+  (concat (cond ((null arg) ())
+                ((eq (car-safe arg) 4) "C-u ")
+                ((or (eq arg '-)
+                     (integerp (or (car-safe arg) arg)))
+                 (format "%s " (or (car-safe arg) arg))))
+          "M-x "))
+
+(defvar counsel-M-x-history nil
+  "History for `counsel-M-x'.")
+
+(defun counsel-M-x-action (cmd)
+  "Execute CMD from `counsel-M-x'."
+  ;; Currently CMD is a string either following `ivy-immediate-done',
+  ;; or for all collection types but alist, where CMD is the original
+  ;; cons.  There is no harm in allowing other atoms through.
+  (setq cmd (cond ((stringp cmd)
+                   (or (intern-soft cmd)
+                       ;; For the benefit of `ivy-immediate-done'.
+                       (intern (subst-char-in-string
+                                ?\s ?- (string-remove-prefix "^" cmd)))))
+                  ((consp cmd) (intern-soft (car cmd)))
+                  (cmd)))
+  (counsel--M-x-extern-rank cmd)
+  ;; As per `execute-extended-command'.
+  (setq this-command cmd)
+  (setq real-this-command cmd)
+  (let ((prefix-arg (or ivy-current-prefix-arg current-prefix-arg)))
+    (command-execute cmd 'record)))
+
+;;;###autoload
+(defun counsel-M-x (&optional initial-input)
+  "Ivy version of `execute-extended-command'.
+Optional INITIAL-INPUT is the initial input in the minibuffer.
+This function integrates with either the `amx' or `smex' package when
+available, in that order of precedence; see `counsel-M-x-collection'."
+  (interactive)
+  (ivy-read (counsel--M-x-prompt current-prefix-arg)
+            (counsel--M-x-collection)
+            :predicate (counsel--M-x-predicate)
+            :require-match t
+            :history 'counsel-M-x-history
+            :action #'counsel-M-x-action
+            :keymap counsel-describe-map
+            :initial-input initial-input
+            :caller 'counsel-M-x))
+
+(ivy-configure 'counsel-M-x
+  :initial-input "^"
+  :display-transformer-fn #'counsel-M-x-transformer)
+
+(ivy-set-actions
+ 'counsel-M-x
+ `(("d" ,#'counsel--find-symbol "definition")
+   ("h" ,#'counsel--describe-function "help")))
+
+;;;; `counsel-command-history'
+
+(defun counsel-command-history-action-eval (cmd)
+  "Eval the command CMD."
+  (eval (read cmd) t))
+
+(defun counsel-command-history-action-edit-and-eval (cmd)
+  "Edit and eval the command CMD."
+  (edit-and-eval-command "Eval: " (read cmd)))
+
+(ivy-set-actions
+ 'counsel-command-history
+ '(("r" counsel-command-history-action-eval           "eval command")
+   ("e" counsel-command-history-action-edit-and-eval  "edit and eval command")))
+
+;;;###autoload
+(defun counsel-command-history ()
+  "Show the history of commands."
+  (interactive)
+  (ivy-read "Command: " (mapcar #'prin1-to-string command-history)
+            :require-match t
+            :action #'counsel-command-history-action-eval
+            :caller 'counsel-command-history))
+
+;;;; `counsel-load-library'
+
+(defun counsel-library-candidates ()
+  "Return a list of completion candidates for `counsel-load-library'."
+  (let ((suffix (concat (regexp-opt '(".el" ".el.gz") t) "\\'"))
+        (cands (make-hash-table :test #'equal))
+        short-name
+        old-val
+        dir-parent
+        res)
+    (dolist (dir load-path)
+      (setq dir (or dir default-directory)) ;; interpret nil in load-path as default-directory
+      (when (file-directory-p dir)
+        (dolist (file (file-name-all-completions "" dir))
+          (when (string-match suffix file)
+            (unless (string-match "pkg.elc?$" file)
+              (setq short-name (substring file 0 (match-beginning 0)))
+              (if (setq old-val (gethash short-name cands))
+                  (progn
+                    ;; assume going up directory once will resolve name clash
+                    (setq dir-parent (counsel-directory-name (cdr old-val)))
+                    (puthash short-name
+                             (cons
+                              (counsel-string-compose dir-parent (car old-val))
+                              (cdr old-val))
+                             cands)
+                    (setq dir-parent (counsel-directory-name dir))
+                    (puthash (concat dir-parent short-name)
+                             (cons
+                              (propertize
+                               (counsel-string-compose
+                                dir-parent short-name)
+                               'full-name (expand-file-name file dir))
+                              dir)
+                             cands))
+                (puthash short-name
+                         (cons (propertize
+                                short-name
+                                'full-name (expand-file-name file dir))
+                               dir)
+                         cands)))))))
+    (maphash (lambda (_k v) (push (car v) res)) cands)
+    (nreverse res)))
+
+;;;###autoload
+(defun counsel-load-library ()
+  "Load a selected the Emacs Lisp library.
+The libraries are offered from `load-path'."
+  (interactive)
+  (let ((cands (counsel-library-candidates)))
+    (ivy-read "Load library: " cands
+              :action (lambda (x)
+                        (load-library
+                         (get-text-property 0 'full-name x)))
+              :keymap counsel-describe-map)))
+
+(ivy-set-actions
+ 'counsel-load-library
+ `(("d" ,#'counsel--find-symbol "definition")))
+
+;;;; `counsel-find-library'
+
+(declare-function find-library-name "find-func")
+(defun counsel-find-library-other-window (library)
+  (let ((buf (find-file-noselect (find-library-name library))))
+    (pop-to-buffer buf 'other-window)))
+
+(defun counsel-find-library-other-frame (library)
+  (let ((buf (find-file-noselect (find-library-name library))))
+    (condition-case nil
+        (switch-to-buffer-other-frame buf)
+      (error (pop-to-buffer buf)))))
+
+(ivy-set-actions
+ 'counsel-find-library
+ '(("j" counsel-find-library-other-window "other window")
+   ("f" counsel-find-library-other-frame "other frame")))
+
+;;;###autoload
+(defun counsel-find-library ()
+  "Visit a selected the Emacs Lisp library.
+The libraries are offered from `load-path'."
+  (interactive)
+  (let ((cands (counsel-library-candidates)))
+    (ivy-read "Find library: " cands
+              :action #'counsel--find-symbol
+              :keymap counsel-describe-map
+              :caller 'counsel-find-library)))
+
+;;;; `counsel-load-theme'
+
+(declare-function powerline-reset "ext:powerline")
+
+(defun counsel-load-theme-action (x)
+  "Disable current themes and load theme X."
+  (condition-case nil
+      (progn
+        (mapc #'disable-theme custom-enabled-themes)
+        (load-theme (intern x) t)
+        (when (fboundp 'powerline-reset)
+          (powerline-reset)))
+    (error "Problem loading theme %s" x)))
+
+;;;###autoload
+(defun counsel-load-theme ()
+  "Forward to `load-theme'.
+Usable with `ivy-resume', `ivy-next-line-and-call' and
+`ivy-previous-line-and-call'."
+  (interactive)
+  (ivy-read "Load custom theme: "
+            (mapcar #'symbol-name
+                    (custom-available-themes))
+            :action #'counsel-load-theme-action
+            :caller 'counsel-load-theme))
+
+;;;; `counsel-descbinds'
+
+(ivy-set-actions
+ 'counsel-descbinds
+ '(("d" counsel-descbinds-action-find "definition")
+   ("I" counsel-descbinds-action-info "info")
+   ("x" counsel-descbinds-action-exec "execute")))
+
+(defvar counsel-descbinds-history nil
+  "History for `counsel-descbinds'.")
+
+(defun counsel--descbinds-cands (&optional prefix buffer)
+  "Get key bindings starting with PREFIX in BUFFER.
+See `describe-buffer-bindings' for further information."
+  (let ((buffer (or buffer (current-buffer)))
+        (re-exclude (regexp-opt
+                     '("<vertical-line>" "<bottom-divider>" "<right-divider>"
+                       "<mode-line>" "<C-down-mouse-2>" "<left-fringe>"
+                       "<right-fringe>" "<header-line>"
+                       "<vertical-scroll-bar>" "<horizontal-scroll-bar>")))
+        res)
+    (with-temp-buffer
+      (let ((indent-tabs-mode t))
+        (describe-buffer-bindings buffer prefix))
+      (goto-char (point-min))
+      ;; Skip the "Key translations" section
+      (skip-chars-forward "^\C-l")
+      (forward-char 2)
+      (while (not (eobp))
+        (when (looking-at "^\\([^\t\n]+\\)[\t ]*\\(.*\\)$")
+          (let ((key (match-string 1))
+                (fun (match-string 2))
+                cmd)
+            (unless (or (member fun '("??" "self-insert-command"))
+                        (string-match-p re-exclude key)
+                        (not (or (commandp (setq cmd (intern-soft fun)))
+                                 (equal fun "Prefix Command"))))
+              (push
+               (cons (format
+                      "%-15s %s"
+                      (propertize key 'face 'counsel-key-binding)
+                      fun)
+                     (cons key cmd))
+               res))))
+        (forward-line)))
+    (nreverse res)))
+
+(defcustom counsel-descbinds-function #'describe-function
+  "Function to call to describe a function passed as parameter."
+  :type 'function)
+
+(defun counsel-descbinds-action-describe (x)
+  "Describe function of candidate X.
+See `describe-function' for further information."
+  (let ((cmd (cddr x)))
+    (funcall counsel-descbinds-function cmd)))
+
+(defun counsel-descbinds-action-exec (x)
+  "Run candidate X.
+See `execute-extended-command' for further information."
+  (let ((cmd (cddr x)))
+    (command-execute cmd 'record)))
+
+(defun counsel-descbinds-action-find (x)
+  "Find symbol definition of candidate X.
+See `counsel--find-symbol' for further information."
+  (let ((cmd (cddr x)))
+    (counsel--find-symbol cmd)))
+
+(defun counsel-descbinds-action-info (x)
+  "Display symbol definition of candidate X, as found in the relevant manual.
+See `info-lookup-symbol' for further information."
+  (let ((cmd (cddr x)))
+    (counsel-info-lookup-symbol cmd)))
+
+;;;###autoload
+(defun counsel-descbinds (&optional prefix buffer)
+  "Show a list of all defined keys and their definitions.
+If non-nil, show only bindings that start with PREFIX.
+BUFFER defaults to the current one."
+  (interactive)
+  (ivy-read "Bindings: " (counsel--descbinds-cands prefix buffer)
+            :action #'counsel-descbinds-action-describe
+            :history 'counsel-descbinds-history
+            :caller 'counsel-descbinds))
+
+;;;; `counsel-describe-face'
+
+(defcustom counsel-describe-face-function #'describe-face
+  "Function to call to describe a face or face name argument."
+  :type 'function)
+
+(defun counsel--face-at-point ()
+  "Return name of face around point.
+Try detecting a face name in the text around point before falling
+back to the face of the character after point, and finally the
+`default' face."
+  (symbol-name (or (face-at-point t) 'default)))
+
+;;;###autoload
+(defun counsel-describe-face ()
+  "Completion for `describe-face'."
+  (interactive)
+  (ivy-read "Face: " (face-list)
+            :require-match t
+            :history 'face-name-history
+            :preselect (counsel--face-at-point)
+            :action counsel-describe-face-function
+            :caller 'counsel-describe-face))
+
+(ivy-configure 'counsel-describe-face
+  :sort-fn #'ivy-string<)
+
+(defun counsel-customize-face (name)
+  "Customize face with NAME."
+  (customize-face (intern name)))
+
+(defun counsel-customize-face-other-window (name)
+  "Customize face with NAME in another window."
+  (customize-face-other-window (intern name)))
+
+(declare-function hi-lock-set-pattern "hi-lock")
+(defun counsel-highlight-with-face (face)
+  "Highlight thing-at-point with FACE."
+  (hi-lock-mode 1)
+  (let ((thing (ivy-thing-at-point)))
+    (when (use-region-p)
+      (deactivate-mark))
+    (hi-lock-set-pattern (regexp-quote thing) (intern face))))
+
+(ivy-set-actions
+ 'counsel-describe-face
+ '(("c" counsel-customize-face "customize")
+   ("C" counsel-customize-face-other-window "customize other window")))
+
+;;;; `counsel-faces'
+
+(defvar counsel--faces-format "%-40s %s")
+
+(defun counsel--faces-format-function (names)
+  "Format NAMES according to `counsel--faces-format'."
+  (let ((formatter
+         (lambda (name)
+           (format counsel--faces-format name
+                   (propertize list-faces-sample-text
+                               'face (intern name))))))
+    (ivy--format-function-generic
+     (lambda (name)
+       (funcall formatter (ivy--add-face name 'ivy-current-match)))
+     formatter names "\n")))
+
+;;;###autoload
+(defun counsel-faces ()
+  "Complete faces with preview.
+Actions are provided by default for describing or customizing the
+selected face."
+  (interactive)
+  (let* ((names (mapcar #'symbol-name (face-list)))
+         (counsel--faces-format
+          (format "%%-%ds %%s"
+                  (apply #'max 0 (mapcar #'string-width names)))))
+    (ivy-read "Face: " names
+              :require-match t
+              :history 'face-name-history
+              :preselect (counsel--face-at-point)
+              :action counsel-describe-face-function
+              :caller 'counsel-faces)))
+
+(ivy-configure 'counsel-faces
+  :parent 'counsel-describe-face
+  :format-fn #'counsel--faces-format-function)
+
+(ivy-set-actions
+ 'counsel-faces
+ '(("c" counsel-customize-face "customize")
+   ("C" counsel-customize-face-other-window "customize other window")
+   ("h" counsel-highlight-with-face "highlight")))
+
+;;;; Modes
+
+(defvar counsel-minor-history nil
+  "History for `counsel-minor'.")
+
+(defun counsel--minor-candidates ()
+  "Return completion alist for `counsel-minor'.
+
+The alist element is cons of minor mode string with its lighter
+and minor mode symbol."
+  (cl-mapcan
+   (let ((suffix (propertize " \"%s\"" 'face 'font-lock-string-face)))
+     (lambda (mode)
+       (when (and (boundp mode) (commandp mode))
+         (let ((lighter (cdr (assq mode minor-mode-alist))))
+           (list (cons (concat
+                        (if (symbol-value mode) "-" "+")
+                        (symbol-name mode)
+                        (and lighter
+                             (format suffix
+                                     (format-mode-line (cons t lighter)))))
+                       mode))))))
+   minor-mode-list))
+
+;;;###autoload
+(defun counsel-minor ()
+  "Enable or disable minor mode.
+
+Disabled minor modes are prefixed with \"+\", and
+selecting one of these will enable it.
+Enabled minor modes are prefixed with \"-\", and
+selecting one of these will enable it.
+
+Additional actions:\\<ivy-minibuffer-map>
+
+  \\[ivy-dispatching-done] d: Go to minor mode definition
+  \\[ivy-dispatching-done] h: Describe minor mode"
+
+  (interactive)
+  (ivy-read "Minor modes (enable +mode or disable -mode): "
+            (counsel--minor-candidates)
+            :require-match t
+            :history 'counsel-minor-history
+            :action (lambda (x)
+                      (call-interactively (cdr x)))))
+
+(ivy-configure 'counsel-minor
+  :initial-input "^+"
+  :sort-fn #'ivy-string<)
+
+(ivy-set-actions
+ 'counsel-minor
+ `(("d" ,(lambda (x) (find-function (cdr x))) "definition")
+   ("h" ,(lambda (x) (describe-function (cdr x))) "help")))
+
+;;;###autoload
+(defun counsel-major ()
+  (interactive)
+  (ivy-read "Major modes: " obarray
+            :predicate (lambda (f)
+                         (and (commandp f)
+                              (string-suffix-p "-mode" (symbol-name f))
+                              (or (and (autoloadp (symbol-function f))
+                                       (let ((doc-split (help-split-fundoc (documentation f) f)))
+                                         ;; major mode starters have no arguments
+                                         (and doc-split (null (cdr (read (car doc-split)))))))
+                                  (null (help-function-arglist f)))))
+            :action #'counsel-M-x-action
+            :caller 'counsel-major))
+
+;;; Git
+;;;; `counsel-git'
+
+(defvar counsel-git-cmd "git ls-files -z --full-name --"
+  "Command for `counsel-git'.")
+
+(ivy-set-actions
+ 'counsel-git
+ '(("j" find-file-other-window "other window")
+   ("x" counsel-find-file-extern "open externally")))
+
+(defun counsel--dominating-file (file &optional dir)
+  "Look up directory hierarchy for FILE, starting in DIR.
+Like `locate-dominating-file', but DIR defaults to
+`default-directory' and the return value is expanded."
+  (and (setq dir (locate-dominating-file (or dir default-directory) file))
+       (expand-file-name dir)))
+
+(defun counsel-locate-git-root ()
+  "Return the root of the Git repository containing the current buffer."
+  (or (counsel--git-root)
+      (error "Not in a Git repository")))
+
+(defun counsel-git-cands (dir)
+  (let ((default-directory dir))
+    (split-string
+     (shell-command-to-string counsel-git-cmd)
+     "\0"
+     t)))
+
+(defvar counsel-git-history nil
+  "History for `counsel-git'.")
+
+;;;###autoload
+(defun counsel-git (&optional initial-input)
+  "Find file in the current Git repository.
+INITIAL-INPUT can be given as the initial minibuffer input."
+  (interactive)
+  (counsel-require-program counsel-git-cmd)
+  (let ((default-directory (counsel-locate-git-root)))
+    (ivy-read "Find file: " (counsel-git-cands default-directory)
+              :initial-input initial-input
+              :action #'counsel-git-action
+              :history 'counsel-git-history
+              :caller 'counsel-git)))
+
+(ivy-configure 'counsel-git
+  :occur #'counsel-git-occur)
+
+(defun counsel-git-action (x)
+  "Find file X in current Git repository."
+  (with-ivy-window
+    (let ((default-directory (ivy-state-directory ivy-last)))
+      (find-file x))))
+
+(defun counsel-git-occur (&optional _cands)
+  "Occur function for `counsel-git' using `counsel-cmd-to-dired'."
+  (cd (ivy-state-directory ivy-last))
+  (counsel-cmd-to-dired
+   (counsel--expand-ls
+    (format "%s | %s | xargs ls"
+            (replace-regexp-in-string
+             "\\(-0\\)\\|\\(-z\\)" "" counsel-git-cmd t t)
+            (counsel--file-name-filter)))))
+
+(defvar counsel-dired-listing-switches "-alh"
+  "Switches passed to `ls' for `counsel-cmd-to-dired'.")
+
+(defun counsel-cmd-to-dired (full-cmd &optional filter)
+  "Adapted from `find-dired'."
+  (let ((inhibit-read-only t))
+    (erase-buffer)
+    (dired-mode default-directory counsel-dired-listing-switches)
+    (defvar dired-sort-inhibit)
+    (defvar dired-subdir-alist)
+    (declare-function dired-insert-set-properties "dired")
+    (declare-function dired-move-to-filename "dired")
+    (insert "  " default-directory ":\n")
+    (let ((point (point)))
+      (insert "  " full-cmd "\n")
+      (dired-insert-set-properties point (point)))
+    (setq-local dired-sort-inhibit t)
+    (setq-local revert-buffer-function
+                (lambda (_1 _2) (counsel-cmd-to-dired full-cmd)))
+    (setq-local dired-subdir-alist
+                (list (cons default-directory (point-min-marker))))
+    (let ((proc (start-process-shell-command
+                 "counsel-cmd" (current-buffer) full-cmd)))
+      (set-process-filter proc filter)
+      (set-process-sentinel
+       proc
+       (lambda (process _msg)
+         (when (and (eq (process-status process) 'exit)
+                    (zerop (process-exit-status process)))
+           (goto-char (point-min))
+           (forward-line 2)
+           (dired-move-to-filename)))))))
+
+;;;; `counsel-git-grep'
+
+(defvar counsel-git-grep-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-l") #'ivy-call-and-recenter)
+    (define-key map (kbd "M-q") #'counsel-git-grep-query-replace)
+    (define-key map (kbd "C-c C-m") #'counsel-git-grep-switch-cmd)
+    (define-key map (kbd "C-x C-d") #'counsel-cd)
+    map))
+
+(defvar counsel-git-grep-cmd-default "git --no-pager grep -n --no-color -I -e \"%s\""
+  "Initial command for `counsel-git-grep'.")
+
+(defvar counsel-git-grep-cmd nil
+  "Store the command for `counsel-git-grep'.")
+
+(defvar counsel-git-grep-history nil
+  "History for `counsel-git-grep'.")
+
+(defvar counsel-git-grep-cmd-history
+  (list counsel-git-grep-cmd-default)
+  "History for `counsel-git-grep' shell commands.")
+
+(defcustom counsel-grep-post-action-hook nil
+  "Hook that runs after the point moves to the next candidate.
+A typical example of what to add to this hook is the function
+`recenter'."
+  :type 'hook
+  :options '(recenter))
+
+(defcustom counsel-git-grep-cmd-function #'counsel-git-grep-cmd-function-default
+  "How a git-grep shell call is built from the input.
+This function should set `ivy--old-re'."
+  :type '(radio
+          (function-item counsel-git-grep-cmd-function-default)
+          (function-item counsel-git-grep-cmd-function-ignore-order)
+          (function :tag "Other")))
+
+(defun counsel-git-grep-cmd-function-default (str)
+  (format counsel-git-grep-cmd
+          (setq ivy--old-re
+                (if (eq ivy--regex-function #'ivy--regex-fuzzy)
+                    (ivy--string-replace "\n" "" (ivy--regex-fuzzy str))
+                  (ivy--regex str t)))))
+
+(defun counsel-git-grep-cmd-function-ignore-order (str)
+  (setq ivy--old-re (ivy--regex str t))
+  (let ((parts (split-string str " " t)))
+    (concat
+     "git --no-pager grep --full-name -n --no-color -i -e "
+     (mapconcat #'shell-quote-argument parts " --and -e "))))
+
+(defun counsel-git-grep-function (string)
+  "Grep in the current Git repository for STRING."
+  (or
+   (ivy-more-chars)
+   (ignore
+    (counsel--async-command
+     (concat
+      (funcall counsel-git-grep-cmd-function string)
+      (and (ivy--case-fold-p string) " -i"))))))
+
+(defun counsel-git-grep-action (x)
+  "Go to occurrence X in current Git repository."
+  (counsel--git-grep-visit x))
+
+(defun counsel-git-grep-action-other-window (x)
+  "Go to occurrence X in current Git repository in another window."
+  (counsel--git-grep-visit x t))
+
+(defun counsel--git-grep-file-and-line (x)
+  "Extract file name and line number from `counsel-git-grep' line X.
+Return a pair (FILE . LINE) on success; nil otherwise."
+  (and (string-match "\\`\\(.*?\\):\\([0-9]+\\):\\(.*\\)\\'" x)
+       (cons (match-string-no-properties 1 x)
+             (string-to-number (match-string-no-properties 2 x)))))
+
+(defun counsel--git-grep-visit (cand &optional other-window)
+  "Visit `counsel-git-grep' CAND, optionally in OTHER-WINDOW."
+  (let ((file-and-line (counsel--git-grep-file-and-line cand)))
+    (when file-and-line
+      (funcall (if other-window #'find-file-other-window #'find-file)
+               (expand-file-name (car file-and-line)
+                                 (ivy-state-directory ivy-last)))
+      (goto-char (point-min))
+      (forward-line (1- (cdr file-and-line)))
+      (when (re-search-forward (ivy--regex ivy-text t) (line-end-position) t)
+        (when swiper-goto-start-of-match
+          (goto-char (match-beginning 0))))
+      (swiper--ensure-visible)
+      (run-hooks 'counsel-grep-post-action-hook)
+      (unless (eq ivy-exit 'done)
+        (swiper--cleanup)
+        (swiper--add-overlays (ivy--regex ivy-text))))))
+
+(ivy-set-actions
+ 'counsel-git-grep
+ '(("j" counsel-git-grep-action-other-window "other window")))
+
+(defun counsel-git-grep-transformer (str)
+  "Highlight file and line number in STR."
+  (when (string-match "\\`\\([^:]+\\):\\([^:]+\\):" str)
+    (add-face-text-property (match-beginning 1) (match-end 1)
+                            'ivy-grep-info nil str)
+    (add-face-text-property (match-beginning 2) (match-end 2)
+                            'ivy-grep-line-number nil str))
+  str)
+
+(defvar counsel-git-grep-projects-alist nil
+  "An alist of project directory to \"git-grep\" command.
+Allows to automatically use a custom \"git-grep\" command for all
+files in a project.")
+
+(defun counsel--git-grep-cmd-and-proj (cmd)
+  (let ((dd (expand-file-name default-directory))
+        proj)
+    (cond
+      ((stringp cmd))
+      (current-prefix-arg
+       (if (setq proj
+                 (cl-find-if
+                  (lambda (x)
+                    (string-match-p (car x) dd))
+                  counsel-git-grep-projects-alist))
+           (setq cmd (cdr proj))
+         (setq cmd
+               (ivy-read "cmd: " counsel-git-grep-cmd-history
+                         :history 'counsel-git-grep-cmd-history
+                         :re-builder #'ivy--regex))
+         (setq counsel-git-grep-cmd-history
+               (delete-dups counsel-git-grep-cmd-history))))
+      (t
+       (setq cmd counsel-git-grep-cmd-default)))
+    (cons proj cmd)))
+
+(defun counsel--call (command &optional result-fn)
+  "Synchronously call COMMAND and return its output as a string.
+COMMAND comprises the program name followed by its arguments, as
+in `make-process'.  Signal `file-error' and emit a warning if
+COMMAND fails.  Obey file handlers based on `default-directory'.
+On success, RESULT-FN is called in output buffer with no arguments."
+  (let ((stderr (make-temp-file "counsel-call-stderr-"))
+        status)
+    (unwind-protect
+         (with-temp-buffer
+           (setq status (apply #'process-file (car command) nil
+                               (list t stderr) nil (cdr command)))
+           (if (eq status 0)
+               (if result-fn
+                   (funcall result-fn)
+                 ;; Return all output except trailing newline.
+                 (buffer-substring (point-min)
+                                   (- (point)
+                                      (if (eq (bobp) (bolp))
+                                          0
+                                        1))))
+             ;; Convert process status into error list.
+             (setq status (list 'file-error
+                                (mapconcat #'identity `(,@command "failed") " ")
+                                status))
+             ;; Print stderr contents, if any, to *Warnings* buffer.
+             (let ((msg (condition-case err
+                            (unless (zerop (cadr (insert-file-contents
+                                                  stderr nil nil nil t)))
+                              (buffer-string))
+                          (error (error-message-string err)))))
+               (lwarn 'ivy :warning "%s" (apply #'concat
+                                                (error-message-string status)
+                                                (and msg (list "\n" msg)))))
+             ;; Signal `file-error' with process status.
+             (signal (car status) (cdr status))))
+      (delete-file stderr))))
+
+(defun counsel--command (&rest command)
+  "Forward COMMAND to `counsel--call'."
+  (counsel--call command))
+
+(defun counsel--grep-unwind ()
+  (counsel-delete-process)
+  (swiper--cleanup))
+
+;;;###autoload
+(defun counsel-git-grep (&optional initial-input initial-directory cmd)
+  "Grep for a string in the current Git repository.
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search.
+When CMD is a string, use it as a \"git grep\" command.
+When CMD is non-nil, prompt for a specific \"git grep\" command."
+  (interactive)
+  (let ((proj-and-cmd (counsel--git-grep-cmd-and-proj cmd))
+        proj)
+    (setq proj (car proj-and-cmd))
+    (setq counsel-git-grep-cmd (cdr proj-and-cmd))
+    (counsel-require-program counsel-git-grep-cmd)
+    (let ((collection-function
+           (if proj
+               #'counsel-git-grep-proj-function
+             #'counsel-git-grep-function))
+          (default-directory (or initial-directory
+                                 (if proj
+                                     (car proj)
+                                   (counsel-locate-git-root)))))
+      (ivy-read "git grep: " collection-function
+                :initial-input initial-input
+                :dynamic-collection t
+                :keymap counsel-git-grep-map
+                :action #'counsel-git-grep-action
+                :history 'counsel-git-grep-history
+                :require-match t
+                :caller 'counsel-git-grep))))
+
+(defun counsel--git-grep-index (_re-str cands)
+  (let (name ln)
+    (cond
+      (ivy--old-cands
+       (ivy-recompute-index-swiper-async nil cands))
+      ((unless (with-ivy-window
+                 (when buffer-file-name
+                   (setq ln (line-number-at-pos))
+                   (setq name (file-name-nondirectory buffer-file-name))))
+         0))
+      ;; Closest to current line going forwards.
+      ((let ((beg (1+ (length name))))
+         (cl-position-if (lambda (x)
+                           (and (string-prefix-p name x)
+                                (>= (string-to-number (substring x beg)) ln)))
+                         cands)))
+      ;; Closest to current line going backwards.
+      ((cl-position-if (lambda (x)
+                         (string-prefix-p name x))
+                       cands
+                       :from-end t))
+      (t 0))))
+
+(ivy-configure 'counsel-git-grep
+  :occur #'counsel-git-grep-occur
+  :unwind-fn #'counsel--grep-unwind
+  :index-fn #'counsel--git-grep-index
+  :display-transformer-fn #'counsel-git-grep-transformer
+  :grep-p t
+  :exit-codes '(1 "No matches found"))
+
+(defun counsel-git-grep-proj-function (str)
+  "Grep for STR in the current Git repository."
+  (or
+   (ivy-more-chars)
+   (let ((regex (setq ivy--old-re
+                      (ivy--regex str t))))
+     (counsel--async-command
+      (concat
+       (format counsel-git-grep-cmd regex)
+       (if (ivy--case-fold-p str) " -i" "")))
+     nil)))
+
+(defun counsel-git-grep-switch-cmd ()
+  "Set `counsel-git-grep-cmd' to a different value."
+  (interactive)
+  (setq counsel-git-grep-cmd
+        (ivy-read "cmd: " counsel-git-grep-cmd-history
+                  :history 'counsel-git-grep-cmd-history))
+  (setq counsel-git-grep-cmd-history
+        (delete-dups counsel-git-grep-cmd-history))
+  (unless (ivy-state-dynamic-collection ivy-last)
+    (setq ivy--all-candidates
+          (all-completions "" #'counsel-git-grep-function))))
+(ivy--no-M-x #'counsel-git-grep-switch-cmd #'ivy--minibuffer-p t)
+
+(defun counsel--normalize-grep-match (str)
+  ;; Prepend ./ if necessary:
+  (unless (ivy--starts-with-dotslash str)
+    (setq str (concat "./" str)))
+  ;; Remove column info if any:
+  (save-match-data
+    (when (string-match
+           "[^\n:]+?[^\n/:]:[\t ]*[1-9][0-9]*[\t ]*:\\([1-9][0-9]*:\\)"
+           str)
+      (setq str (replace-match "" t t str 1))))
+  str)
+
+(defun counsel--git-grep-occur-cmd (input)
+  (let* ((regex ivy--old-re)
+         (positive-pattern ;; git-grep can't handle .*?
+          (ivy--string-replace ".*?" ".*" (ivy-re-to-str regex)))
+         (negative-patterns
+          (if (stringp regex) ""
+            (mapconcat (lambda (x)
+                         (and (null (cdr x))
+                              (format "| grep -v %s" (car x))))
+                       regex
+                       " "))))
+    (concat
+     (format counsel-git-grep-cmd positive-pattern)
+     negative-patterns
+     (if (ivy--case-fold-p input) " -i" ""))))
+
+(defun counsel-git-grep-occur (&optional _cands)
+  "Generate a custom occur buffer for `counsel-git-grep'."
+  (counsel-grep-like-occur #'counsel--git-grep-occur-cmd))
+
+(defun counsel-git-grep-query-replace ()
+  "Start `query-replace' with string to replace from last search string."
+  (interactive)
+  (unless (window-minibuffer-p)
+    (user-error
+     "Should only be called in the minibuffer through `counsel-git-grep-map'"))
+  (let* ((enable-recursive-minibuffers t)
+         (from (ivy--regex ivy-text))
+         (to (query-replace-read-to from "Query replace" t)))
+    (ivy-exit-with-action
+     (lambda (_)
+       (let (done-buffers)
+         (dolist (cand ivy--old-cands)
+           (when (string-match "\\`\\(.*?\\):\\([0-9]+\\):\\(.*\\)\\'" cand)
+             (with-ivy-window
+               (let ((file-name (match-string-no-properties 1 cand)))
+                 (setq file-name (expand-file-name
+                                  file-name
+                                  (ivy-state-directory ivy-last)))
+                 (unless (member file-name done-buffers)
+                   (push file-name done-buffers)
+                   (find-file file-name)
+                   (goto-char (point-min)))
+                 (perform-replace from to t t nil))))))))))
+(ivy--no-M-x #'counsel-git-grep-query-replace #'ivy--minibuffer-p)
+
+;;;; `counsel-git-stash'
+
+(defun counsel-git-stash-kill-action (x)
+  "Add git stash command to kill ring.
+The git command applies the stash entry where candidate X was found in."
+  (when (string-match "\\([^:]+\\):" x)
+    (kill-new (message (format "git stash apply %s" (match-string 1 x))))))
+
+;;;###autoload
+(defun counsel-git-stash ()
+  "Search through all available git stashes."
+  (interactive)
+  (let* ((default-directory (counsel-locate-git-root))
+         (cands (split-string (shell-command-to-string
+                               "IFS=$'\n'
+for i in `git stash list --format=\"%gd\"`; do
+    git stash show -p $i | grep -H --label=\"$i\" \"$1\"
+done") "\n" t)))
+    (ivy-read "git stash: " cands
+              :action #'counsel-git-stash-kill-action
+              :caller 'counsel-git-stash)))
+
+;;;; `counsel-git-log'
+
+(defvar counsel-git-log-cmd "GIT_PAGER=cat git log --no-color --grep '%s'"
+  "Command used for \"git log\".")
+
+(defun counsel-git-log-function (_)
+  "Search for `ivy-regex' in git log."
+  (or
+   (ivy-more-chars)
+   (progn
+     ;; `counsel--yank-pop-format-function' uses this
+     (setq ivy--old-re ivy-regex)
+     (counsel--async-command
+      ;; "git log --grep" likes to have groups quoted e.g. \(foo\).
+      ;; But it doesn't like the non-greedy ".*?".
+      (format counsel-git-log-cmd
+              (ivy--string-replace ".*?" ".*" (ivy-re-to-str ivy--old-re))))
+     nil)))
+
+(defun counsel-git-log-action (x)
+  "Add candidate X to kill ring."
+  (message "%S" (kill-new x)))
+
+(declare-function magit-show-commit "ext:magit-diff")
+
+(defun counsel-git-log-show-commit-action (log-entry)
+  "Visit the commit corresponding to LOG-ENTRY."
+  (require 'magit-diff)
+  (let ((commit (substring-no-properties log-entry 0 (string-match-p "\\W" log-entry))))
+    (magit-show-commit commit)))
+
+(ivy-set-actions
+ 'counsel-git-log
+ '(("v" counsel-git-log-show-commit-action "visit commit")))
+
+;;;; `counsel-git-change-worktree'
+
+(defun counsel-git-change-worktree-action (git-root-dir tree)
+  "Find the corresponding file in the worktree located at tree.
+The current buffer is assumed to be in a subdirectory of GIT-ROOT-DIR.
+TREE is the selected candidate."
+  (let* ((new-root-dir (counsel-git-worktree-parse-root tree))
+         (tree-filename (file-relative-name buffer-file-name git-root-dir))
+         (file-name (expand-file-name tree-filename new-root-dir)))
+    (find-file file-name)))
+
+(defun counsel-git-worktree-list ()
+  "List worktrees in the Git repository containing the current buffer."
+  (let ((default-directory (counsel-locate-git-root)))
+    (split-string (shell-command-to-string "git worktree list") "\n" t)))
+
+(defun counsel-git-worktree-parse-root (tree)
+  "Return worktree from candidate TREE."
+  (substring tree 0 (ivy--string-search " " tree)))
+
+(defun counsel-git-close-worktree-files-action (root-dir)
+  "Close all buffers from the worktree located at ROOT-DIR."
+  (setq root-dir (counsel-git-worktree-parse-root root-dir))
+  (save-excursion
+    (dolist (buf (buffer-list))
+      (set-buffer buf)
+      (and buffer-file-name
+           (string= "." (file-relative-name root-dir (counsel-locate-git-root)))
+           (kill-buffer buf)))))
+
+(ivy-set-actions
+ 'counsel-git-change-worktree
+ '(("k" counsel-git-close-worktree-files-action "kill all")))
+
+;;;###autoload
+(defun counsel-git-change-worktree ()
+  "Find the file corresponding to the current buffer on a different worktree."
+  (interactive)
+  (let ((default-directory (counsel-locate-git-root)))
+    (ivy-read "Select worktree: "
+              (or (cl-delete default-directory (counsel-git-worktree-list)
+                             :key #'counsel-git-worktree-parse-root :test #'string=)
+                  (error "No other worktrees"))
+              :action (lambda (tree)
+                        (counsel-git-change-worktree-action
+                         (ivy-state-directory ivy-last) tree))
+              :require-match t
+              :caller 'counsel-git-change-worktree)))
+
+;;;; `counsel-git-checkout'
+
+(defun counsel-git-checkout-action (branch)
+  "Switch branch by invoking git-checkout(1).
+The command is passed a single argument comprising all characters
+in BRANCH up to, but not including, the first space
+character (#x20), or the string's end if it lacks a space."
+  (shell-command
+   (format "git checkout %s"
+           (shell-quote-argument
+            (substring branch 0 (ivy--string-search " " branch))))))
+
+(defun counsel-git-branch-list ()
+  "Return list of branches in the current Git repository.
+Value comprises all local and remote branches bar the one
+currently checked out."
+  (cl-mapcan (lambda (line)
+               (and (string-match "\\`[[:blank:]]+" line)
+                    (list (substring line (match-end 0)))))
+             (let ((default-directory (counsel-locate-git-root)))
+               (split-string (shell-command-to-string
+                              "git branch -vv --all --no-color")
+                             "\n" t))))
+
+;;;###autoload
+(defun counsel-git-checkout ()
+  "Call the \"git checkout\" command."
+  (interactive)
+  (ivy-read "Checkout branch: " (counsel-git-branch-list)
+            :action #'counsel-git-checkout-action
+            :caller 'counsel-git-checkout))
+
+(defvar counsel-yank-pop-truncate-radius)
+
+(defun counsel--git-log-format-function (str)
+  (let ((counsel-yank-pop-truncate-radius 5))
+    (counsel--yank-pop-format-function str)))
+
+;;;###autoload
+(defun counsel-git-log ()
+  "Call the \"git log --grep\" shell command."
+  (interactive)
+  (ivy-read "Grep log: " #'counsel-git-log-function
+            :dynamic-collection t
+            :action #'counsel-git-log-action
+            :caller 'counsel-git-log))
+
+(ivy-configure 'counsel-git-log
+  :height 4
+  :unwind-fn #'counsel-delete-process
+  :format-fn #'counsel--git-log-format-function)
+
+(add-to-list 'counsel-async-split-string-re-alist '(counsel-git-log . "^commit "))
+(add-to-list 'counsel-async-ignore-re-alist '(counsel-git-log . "^[ \n]*$"))
+
+;;; File
+;;;; `counsel-find-file'
+
+(defun counsel-file-jump-from-find ()
+  "Switch to `counsel-file-jump' from `counsel-find-file'."
+  (interactive)
+  (ivy-quit-and-run
+    (counsel-file-jump ivy-text (ivy-state-directory ivy-last))))
+(ivy--no-M-x #'counsel-file-jump-from-find #'ivy--minibuffer-p)
+
+(when (executable-find "git")
+  (add-to-list 'ivy-ffap-url-functions 'counsel-github-url-p)
+  (add-to-list 'ivy-ffap-url-functions 'counsel-emacs-url-p))
+(add-to-list 'ivy-ffap-url-functions 'counsel-url-expand)
+(defun counsel-find-file-cd-bookmark-action (_)
+  "Reset `counsel-find-file' from selected directory."
+  (ivy-read "cd: "
+            (progn
+              (ivy--virtual-buffers)
+              (delete-dups
+               (mapcar (lambda (x) (file-name-directory (cdr x)))
+                       ivy--virtual-buffers)))
+            :action (lambda (x)
+                      (let ((default-directory (file-name-directory x)))
+                        (counsel-find-file)))))
+
+(defcustom counsel-root-command "sudo"
+  "Command to gain root privileges."
+  :type 'string)
+
+(defun counsel-find-file-as-root (x)
+  "Find file X with root privileges."
+  (counsel-require-program counsel-root-command)
+  (let* ((host (file-remote-p x 'host))
+         (file-name (format "/%s:%s:%s"
+                            counsel-root-command
+                            (or host "")
+                            (expand-file-name
+                             (if host
+                                 (file-remote-p x 'localname)
+                               x)))))
+    ;; If the current buffer visits the same file we are about to open,
+    ;; replace the current buffer with the new one.
+    (if (eq (current-buffer) (get-file-buffer x))
+        (find-alternate-file file-name)
+      (find-file file-name))))
+
+(defun counsel--yes-or-no-p (fmt &rest args)
+  "Ask user a yes or no question created using FMT and ARGS.
+If Emacs 26 user option `read-answer-short' is bound, use it to
+choose between `yes-or-no-p' and `y-or-n-p'; otherwise default to
+`yes-or-no-p'."
+  (funcall (if (and (boundp 'read-answer-short)
+                    (cond ((eq read-answer-short t))
+                          ((eq read-answer-short 'auto)
+                           (eq (symbol-function 'yes-or-no-p) 'y-or-n-p))))
+               #'y-or-n-p
+             #'yes-or-no-p)
+           (apply #'format fmt args)))
+
+(defun counsel-find-file-copy (x)
+  "Copy file X."
+  ;; Autoloaded by `dired'.
+  (declare-function dired-copy-file "dired-aux")
+  (counsel--find-file-1 "Copy file to: "
+                        ivy--directory
+                        (lambda (new-name)
+                          (dired-copy-file x new-name 1))
+                        'counsel-find-file-copy))
+
+(defun counsel-find-file-delete (x)
+  "Delete file X."
+  (defvar dired-recursive-deletes)
+  (declare-function dired-clean-up-after-deletion "dired")
+  (declare-function dired-delete-file "dired")
+  (when (or delete-by-moving-to-trash
+            ;; `dired-delete-file', which see, already prompts for directories
+            (eq t (car (file-attributes x)))
+            (counsel--yes-or-no-p "Delete %s? " x))
+    (dired-delete-file x dired-recursive-deletes delete-by-moving-to-trash)
+    (dired-clean-up-after-deletion x)
+    (let ((win (and (not (eq ivy-exit 'done))
+                    (active-minibuffer-window))))
+      (when win (with-selected-window win (ivy--cd ivy--directory))))))
+
+(defun counsel-find-file-move (x)
+  "Move or rename file X."
+  ;; Autoloaded by `dired'.
+  (declare-function dired-rename-file "dired-aux")
+  (counsel--find-file-1 "Rename file to: "
+                        ivy--directory
+                        (lambda (new-name)
+                          (dired-rename-file x new-name 1))
+                        'counsel-find-file-move))
+
+(defun counsel-find-file-mkdir-action (_x)
+  "Create a directory and any nonexistent parent dirs from `ivy-text'."
+  (let ((dir (file-name-as-directory
+              (expand-file-name ivy-text ivy--directory)))
+        (win (and (not (eq ivy-exit 'done))
+                  (active-minibuffer-window))))
+    (make-directory dir t)
+    (when win (with-selected-window win (ivy--cd dir)))))
+
+(ivy-set-actions
+ #'counsel-find-file
+ `(("j" ,#'find-file-other-window "other window")
+   ("f" ,#'find-file-other-frame "other frame")
+   ("b" ,#'counsel-find-file-cd-bookmark-action "cd bookmark")
+   ("x" ,#'counsel-find-file-extern "open externally")
+   ("r" ,#'counsel-find-file-as-root "open as root")
+   ("R" ,#'find-file-read-only "read only")
+   ("l" ,#'find-file-literally "open literally")
+   ("k" ,#'counsel-find-file-delete "delete")
+   ("c" ,#'counsel-find-file-copy "copy file")
+   ("m" ,#'counsel-find-file-move "move or rename")
+   ("d" ,#'counsel-find-file-mkdir-action "mkdir")))
+
+(defvar counsel-find-file-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-DEL") #'counsel-up-directory)
+    (define-key map (kbd "C-<backspace>") #'counsel-up-directory)
+    (define-key map (kbd "`") #'counsel-file-jump-from-find)
+    ;; Needs to come after "b" action is defined.
+    (define-key map (kbd "C-`") (ivy-make-magic-action #'counsel-find-file "b"))
+    (define-key map `[remap ,#'undo] #'counsel-find-file-undo)
+    map)
+  "Keymap used during Counsel file name completion.")
+
+(defcustom counsel-find-file-at-point nil
+  "When non-nil, add file-at-point to the list of candidates."
+  :type 'boolean)
+
+(defcustom counsel-preselect-current-file nil
+  "When non-nil, preselect current file in list of candidates."
+  :type 'boolean)
+
+(defcustom counsel-find-file-ignore-regexp nil
+  "A regexp of files to ignore while in `counsel-find-file'.
+These files are un-ignored if `ivy-text' matches them.  The
+common way to show all files is to start `ivy-text' with a dot.
+
+Example value: \"\\\\=`[#.]\\|[#~]\\\\='\".
+This will hide temporary and lock files.
+\\<ivy-minibuffer-map>
+Choosing the dotfiles option, \"\\\\=`\\.\", might be convenient,
+since you can still access the dotfiles if your input starts with
+a dot.  The generic way to toggle ignored files is \\[ivy-toggle-ignore],
+but the leading dot is a lot faster."
+  :type `(choice
+          (const :tag "None" nil)
+          (const :tag "Dotfiles and Lockfiles" "\\(?:\\`\\|[/\\]\\)\\(?:[#.]\\)")
+          (const :tag "Ignored Extensions"
+                 ,(concat (regexp-opt completion-ignored-extensions) "\\'"))
+          (regexp :tag "Regex")))
+
+(defvar counsel--find-file-predicate nil
+  "When non-nil, `counsel--find-file-matcher' will use this predicate.")
+
+(defun counsel--find-file-matcher (regexp candidates)
+  "Return REGEXP matching CANDIDATES.
+Skip some dotfiles unless `ivy-text' requires them."
+  (let ((res
+         (ivy--re-filter
+          regexp candidates
+          (lambda (re-str)
+            (lambda (x)
+              (string-match re-str (directory-file-name x)))))))
+    (when counsel--find-file-predicate
+      (let ((default-directory ivy--directory))
+        (setq res (cl-remove-if-not counsel--find-file-predicate res))))
+    (if (or (null ivy-use-ignore)
+            (null counsel-find-file-ignore-regexp)
+            (string-match-p counsel-find-file-ignore-regexp ivy-text))
+        res
+      (or (cl-remove-if
+           (lambda (x)
+             (and
+              (string-match-p counsel-find-file-ignore-regexp x)
+              (not (member x ivy-extra-directories))))
+           res)
+          res))))
+
+(declare-function ffap-guesser "ffap")
+
+(defvar counsel-find-file-speedup-remote t
+  "Speed up opening remote files by disabling `find-file-hook' for them.")
+
+(defcustom counsel-find-file-extern-extensions '("mp4" "mkv" "xlsx")
+  "List of extensions that make `counsel-find-file' use `counsel-find-file-extern'."
+  :type '(repeat string))
+
+(defun counsel-find-file-action (x)
+  "Find file X."
+  (cond ((and counsel-find-file-speedup-remote
+              (file-remote-p ivy--directory))
+         (let ((find-file-hook nil))
+           (find-file (expand-file-name x ivy--directory))))
+        ((member (file-name-extension x) counsel-find-file-extern-extensions)
+         (counsel-find-file-extern x))
+        (t
+         (find-file (expand-file-name x ivy--directory)))))
+
+(defun counsel--preselect-file ()
+  "Return candidate to preselect during filename completion.
+The preselect behavior can be customized via user options
+`counsel-find-file-at-point' and
+`counsel-preselect-current-file', which see."
+  (or
+   (when counsel-find-file-at-point
+     (require 'ffap)
+     (let ((f (ffap-guesser)))
+       (when (and f (not (ivy-ffap-url-p f)))
+         (expand-file-name f))))
+   (and counsel-preselect-current-file
+        buffer-file-name
+        (file-name-nondirectory buffer-file-name))))
+
+(defun counsel--find-file-1 (prompt initial-input action caller)
+  (declare-function dired-current-directory "dired")
+  (let ((default-directory
+         (if (derived-mode-p 'dired-mode)
+             (dired-current-directory)
+           default-directory)))
+    (ivy-read prompt #'read-file-name-internal
+              :matcher #'counsel--find-file-matcher
+              :initial-input initial-input
+              :action action
+              :preselect (counsel--preselect-file)
+              :require-match 'confirm-after-completion
+              :history 'file-name-history
+              :keymap counsel-find-file-map
+              :caller caller)))
+
+;;;###autoload
+(defun counsel-find-file (&optional initial-input initial-directory)
+  "Forward to `find-file'.
+When INITIAL-INPUT is non-nil, use it in the minibuffer during completion."
+  (interactive)
+  (require 'dired)
+  (defvar tramp-archive-enabled)
+  (let ((tramp-archive-enabled nil)
+        (default-directory (or initial-directory default-directory)))
+    (counsel--find-file-1 "Find file: " initial-input
+                          #'counsel-find-file-action
+                          'counsel-find-file)))
+
+(ivy-configure 'counsel-find-file
+  :parent 'read-file-name-internal
+  :occur #'counsel-find-file-occur)
+
+(defvar counsel-find-file-occur-cmd "ls -a | %s | xargs -d '\\n' ls -d --group-directories-first"
+  "Format string for `counsel-find-file-occur'.")
+
+(defvar counsel-find-file-occur-use-find (not (eq system-type 'gnu/linux))
+  "When non-nil, `counsel-find-file-occur' will use \"find\" as the base cmd.")
+
+(defun counsel--expand-ls (cmd)
+  "Expand CMD that ends in \"ls\" with switches."
+  (concat cmd " " counsel-dired-listing-switches " | sed -e \"s/^/  /\""))
+
+(defvar counsel-file-name-filter-alist
+  '(("ag -i '%s'" . t)
+    ("ack -i '%s'" . t)
+    ("perl -ne '/(.*%s.*)/i && print \"$1\\n\";'" . t)
+    ("grep -i -E '%s'"))
+  "Alist of file name filtering commands.
+The car is a shell command and the cdr is t when the shell
+command supports look-arounds.  The executable for the commands
+will be checked for existence via `executable-find'.  The first
+one that exists will be used.")
+
+(defun counsel--file-name-filter (&optional use-ignore)
+  "Return a command that filters a file list to match ivy candidates.
+If USE-IGNORE is non-nil, try to generate a command that respects
+`counsel-find-file-ignore-regexp'."
+  (let ((regex ivy--old-re))
+    (if (= 0 (length regex))
+        "cat"
+      (let ((filter-cmd (cl-assoc-if
+                         (lambda (cmd)
+                           (executable-find
+                            (car (split-string cmd))))
+                         counsel-file-name-filter-alist))
+            cmd)
+        (when (and use-ignore ivy-use-ignore
+                   counsel-find-file-ignore-regexp
+                   (cdr filter-cmd)
+                   (not (string-match-p counsel-find-file-ignore-regexp ivy-text))
+                   (not (string-match-p counsel-find-file-ignore-regexp
+                                        (or (car ivy--old-cands) ""))))
+          (let ((ignore-re (list (counsel--elisp-to-pcre
+                                  counsel-find-file-ignore-regexp))))
+            (setq regex (if (stringp regex)
+                            (list ignore-re (cons regex t))
+                          (cons ignore-re regex)))))
+        (setq cmd (format (car filter-cmd)
+                          (counsel--elisp-to-pcre regex (cdr filter-cmd))))
+        (if (string-suffix-p "csh" shell-file-name)
+            (ivy--string-replace "?!" "?\\!" cmd)
+          cmd)))))
+
+(defun counsel--occur-cmd-find ()
+  (let ((cmd (format
+              "find . -maxdepth 1 | %s | xargs -I {} find {} -maxdepth 0 -ls"
+              (counsel--file-name-filter t))))
+    (concat
+     (counsel--cmd-to-dired-by-type "d" cmd)
+     " && "
+     (counsel--cmd-to-dired-by-type "f" cmd))))
+
+(defun counsel--cmd-to-dired-by-type (type cmd)
+  (let ((exclude-dots
+         (unless (string-prefix-p "." ivy-text)
+           " | grep -v '/\\.'")))
+    (ivy--string-replace
+     " | grep"
+     (concat " -type " type exclude-dots " | grep") cmd)))
+
+(defun counsel-find-file-occur (&optional _cands)
+  (require 'find-dired)
+  (cd ivy--directory)
+  (if counsel-find-file-occur-use-find
+      (counsel-cmd-to-dired
+       (counsel--occur-cmd-find)
+       'find-dired-filter)
+    (counsel-cmd-to-dired
+     (counsel--expand-ls
+      (format counsel-find-file-occur-cmd
+              (if (ivy--string-search "grep" counsel-find-file-occur-cmd)
+                  ;; for backwards compatibility
+                  (counsel--elisp-to-pcre ivy--old-re)
+                (counsel--file-name-filter t)))))))
+
+(defvar counsel-up-directory-level t
+  "Control whether `counsel-up-directory' goes up a level or always a directory.
+
+If non-nil, then `counsel-up-directory' will remove the final level of the path.
+For example: /a/long/path/file.jpg => /a/long/path/
+             /a/long/path/     =>     /a/long/
+
+If nil, then `counsel-up-directory' will go up a directory.
+For example: /a/long/path/file.jpg => /a/long/
+             /a/long/path/     =>     /a/long/")
+
+(defun counsel-up-directory ()
+  "Go to the parent directory preselecting the current one.
+
+If the current directory is remote and it's not possible to go up any
+further, make the remote prefix editable.
+
+See variable `counsel-up-directory-level'."
+  (interactive)
+  (let* ((cur-dir (directory-file-name (expand-file-name ivy--directory)))
+         (up-dir (file-name-directory cur-dir)))
+    (if (and (file-remote-p cur-dir) (string-equal cur-dir up-dir))
+        (progn
+          ;; make the remote prefix editable
+          (setq ivy--old-cands nil)
+          (setq ivy--old-re nil)
+          (ivy-set-index 0)
+          (setq ivy--directory "")
+          (setq ivy--all-candidates nil)
+          (ivy-set-text "")
+          (delete-minibuffer-contents)
+          (insert up-dir))
+      (if (and counsel-up-directory-level (not (string= ivy-text "")))
+          (delete-region (line-beginning-position) (line-end-position))
+        (ivy--cd up-dir)
+        (setf (ivy-state-preselect ivy-last)
+              (file-name-as-directory (file-name-nondirectory cur-dir)))))))
+(ivy--no-M-x #'counsel-up-directory #'ivy--minibuffer-p)
+
+(defun counsel-down-directory ()
+  "Descend into the current directory."
+  (interactive)
+  (ivy--directory-enter))
+(ivy--no-M-x #'counsel-down-directory #'ivy--minibuffer-p)
+
+(defun counsel-find-file-undo ()
+  (interactive)
+  (if (string= ivy-text "")
+      (let ((dir (progn
+                   (pop ivy--directory-hist)
+                   (pop ivy--directory-hist))))
+        (when dir
+          (ivy--cd dir)))
+    (undo)))
+(ivy--no-M-x #'counsel-find-file-undo #'ivy--minibuffer-p)
+
+(defun counsel-at-git-issue-p ()
+  "When point is at an issue in a Git-versioned file, return the issue string."
+  (and (looking-at "#[0-9]+")
+       (save-match-data
+         (or (eq (vc-backend buffer-file-name) 'Git)
+             (memq major-mode '(magit-commit-mode vc-git-log-view-mode))
+             (bound-and-true-p magit-commit-mode)))
+       (match-string-no-properties 0)))
+
+(defun counsel-github-url-p ()
+  "Return a Github issue URL at point."
+  (when (counsel-require-program "git" t)
+    (let ((url (counsel-at-git-issue-p)))
+      (when url
+        (let ((origin (shell-command-to-string
+                       "git remote get-url origin"))
+              user repo)
+          (cond ((string-match "\\`git@github.com:\\([^/]+\\)/\\(.*\\)\\.git$"
+                               origin)
+                 (setq user (match-string 1 origin))
+                 (setq repo (match-string 2 origin)))
+                ((string-match "\\`https://github.com/\\([^/]+\\)/\\(.*\\)$"
+                               origin)
+                 (setq user (match-string 1 origin))
+                 (setq repo (match-string 2 origin))))
+          (when user
+            (setq url (format "https://github.com/%s/%s/issues/%s"
+                              user repo (substring url 1)))))))))
+
+(defun counsel-emacs-url-p ()
+  "Return a Debbugs issue URL at point."
+  (let ((url (and (counsel-require-program "git" t)
+                  (counsel-at-git-issue-p))))
+    (when url
+      (let ((origin (shell-command-to-string "git remote get-url origin")))
+        (when (string-match-p "git.sv.gnu.org:/srv/git/emacs.git" origin)
+          (format "https://bugs.gnu.org/%s" (substring url 1)))))))
+
+(defvar counsel-url-expansions-alist nil
+  "Map of regular expressions to expansions.
+
+The value of this variable is a list of pairs (REGEXP . FORMAT).
+
+`counsel-url-expand' expands the word at point according to
+FORMAT for the first matching REGEXP.  FORMAT can be either a
+string or a function.  If it is a string, it is used as the
+format string for the function `format', with the word at point
+as the next argument.  If it is a function, it is called with the
+word at point as the sole argument.
+
+For example, a pair of the form:
+  \\='(\"\\\\\\=`BSERV-[[:digit:]]+\\\\\\='\" .
+    \"https://jira.atlassian.com/browse/%s\")
+expands to the URL `https://jira.atlassian.com/browse/BSERV-100'
+when the word at point is \"BSERV-100\".
+
+If FORMAT is a function, more powerful transformations are
+possible.  As an example,
+  \\='(\"\\\\\\=`issue\\\\([[:digit:]]+\\\\)\\\\\\='\" .
+    (lambda (word)
+      (concat \"https://bugs.gnu.org/\" (match-string 1 word))))
+trims the \"issue\" prefix from the word at point before creating
+the URL.")
+
+(defun counsel-url-expand ()
+  "Expand word at point using `counsel-url-expansions-alist'.
+The first pair in the list whose regexp matches the word at point
+will be expanded according to its format.  This function is
+intended to be used in `ivy-ffap-url-functions' to browse the
+result as a URL."
+  (let ((word-at-point (current-word)))
+    (when word-at-point
+      (cl-some
+       (lambda (pair)
+         (let ((regexp (car pair))
+               (formatter (cdr pair)))
+           (when (string-match regexp word-at-point)
+             (if (functionp formatter)
+                 (funcall formatter word-at-point)
+               (format formatter word-at-point)))))
+       counsel-url-expansions-alist))))
+
+;;;; `counsel-dired'
+
+;;;###autoload
+(defun counsel-dired (&optional initial-input)
+  "Forward to `dired'.
+When INITIAL-INPUT is non-nil, use it in the minibuffer during completion."
+  (interactive)
+  (require 'dired)
+  (let ((counsel--find-file-predicate #'file-directory-p))
+    (counsel--find-file-1
+     "Dired (directory): " initial-input
+     (lambda (d) (dired (expand-file-name d)))
+     'counsel-dired)))
+
+(ivy-configure 'counsel-dired
+  :parent 'read-file-name-internal)
+
+;;;; `counsel-recentf'
+
+(defvar recentf-list)
+(declare-function recentf-mode "recentf")
+
+(defcustom counsel-recentf-include-xdg-list nil
+  "Include recently used files listed by XDG-compliant environments.
+Examples of such environments are GNOME and KDE.  See the URL
+`https://www.freedesktop.org/wiki/Specifications/desktop-bookmark-spec'."
+  :type 'boolean
+  :link '(url-link "\
+https://www.freedesktop.org/wiki/Specifications/desktop-bookmark-spec"))
+
+;;;###autoload
+(defun counsel-recentf ()
+  "Find a file on `recentf-list'."
+  (interactive)
+  (recentf-mode)
+  (ivy-read "Recentf: " (counsel-recentf-candidates)
+            :action (lambda (f)
+                      (with-ivy-window
+                        (find-file f)))
+            :require-match t
+            :caller 'counsel-recentf))
+
+(ivy-set-actions
+ 'counsel-recentf
+ `(("j" find-file-other-window "other window")
+   ("f" find-file-other-frame "other frame")
+   ("x" counsel-find-file-extern "open externally")
+   ("d" ,(lambda (file) (setq recentf-list (delete file recentf-list)))
+    "delete from recentf")))
+
+(defun counsel-recentf-candidates ()
+  "Return candidates for `counsel-recentf'.
+
+When `counsel-recentf-include-xdg-list' is non-nil, also include
+the files in said list, sorting the combined list by file access
+time."
+  (if (and counsel-recentf-include-xdg-list
+           (>= emacs-major-version 26))
+      (delete-dups
+       (sort (nconc (mapcar #'substring-no-properties recentf-list)
+                    (counsel--recentf-get-xdg-recent-files))
+             (lambda (file1 file2)
+               (cond ((file-remote-p file1)
+                      nil)
+                     ((file-remote-p file2))
+                     (t
+                      ;; Added in Emacs 26.1.
+                      (declare-function file-attribute-access-time "files"
+                                        (attributes))
+                      (time-less-p (file-attribute-access-time
+                                    (file-attributes file2))
+                                   (file-attribute-access-time
+                                    (file-attributes file1))))))))
+    (mapcar #'substring-no-properties recentf-list)))
+
+(defalias 'counsel--xml-parse-region
+  (if (cond ((fboundp 'libxml-available-p)
+             ;; Added in Emacs 27.1.
+             (libxml-available-p))
+            ((fboundp 'libxml-parse-xml-region)
+             ;; Checking for `fboundp' is not enough on Windows, where it
+             ;; will return non-nil even if the library is not installed.
+             (with-temp-buffer
+               (insert "<xml/>")
+               (libxml-parse-xml-region (point-min) (point-max)))))
+      (lambda (&optional beg end)
+        (libxml-parse-xml-region (or beg (point-min)) (or end (point-max))))
+    #'xml-parse-region)
+  "Compatibility shim for `libxml-parse-xml-region'.
+For convenience, BEG and END default to `point-min' and
+`point-max', respectively.
+
+\(fn &optional BEG END)")
+
+(defun counsel--recentf-get-xdg-recent-files ()
+  "Return list of XDG recent files.
+
+This information is parsed from the file \"recently-used.xbel\",
+which lists both files and directories, under `xdg-data-home'.
+This function uses the `dom' library from Emacs 25.1 or later."
+  (unless (eval-and-compile (require 'dom nil t))
+    (user-error "This function requires Emacs 25.1 or later"))
+  (declare-function dom-by-tag "dom" (dom tag))
+  (let ((file-of-recent-files
+         (expand-file-name "recently-used.xbel" (counsel--xdg-data-home))))
+    (unless (file-readable-p file-of-recent-files)
+      (user-error "List of XDG recent files not found: %s"
+                  file-of-recent-files))
+    (when (fboundp 'dom-attr) ;; Pacify Emacs 24.
+      (cl-mapcan (lambda (bookmark-node)
+                   (let* ((file (dom-attr bookmark-node 'href))
+                          (file (string-remove-prefix "file://" file))
+                          (file (url-unhex-string file t))
+                          (file (decode-coding-string file 'utf-8 t)))
+                     (and (file-exists-p file)
+                          (list file))))
+                 (let ((dom (with-temp-buffer
+                              (insert-file-contents file-of-recent-files)
+                              (counsel--xml-parse-region))))
+                   (nreverse (dom-by-tag dom 'bookmark)))))))
+
+(defun counsel-buffer-or-recentf-candidates ()
+  "Return candidates for `counsel-buffer-or-recentf'."
+  (recentf-mode)
+  (let ((buffers (delq nil (mapcar #'buffer-file-name (buffer-list)))))
+    (nconc buffers (cl-set-difference (counsel-recentf-candidates)
+                                      buffers :test #'equal))))
+
+;;;###autoload
+(defun counsel-buffer-or-recentf ()
+  "Find a buffer visiting a file or file on `recentf-list'."
+  (interactive)
+  (ivy-read "Buffer File or Recentf: " (counsel-buffer-or-recentf-candidates)
+            :action (lambda (s)
+                      (with-ivy-window
+                        (if (bufferp s)
+                            (switch-to-buffer s)
+                          (find-file s))))
+            :require-match t
+            :caller 'counsel-buffer-or-recentf))
+
+(ivy-configure 'counsel-buffer-or-recentf
+  :display-transformer-fn #'counsel-buffer-or-recentf-transformer)
+
+(ivy-set-actions
+ 'counsel-buffer-or-recentf
+ '(("j" find-file-other-window "other window")
+   ("f" find-file-other-frame "other frame")
+   ("x" counsel-find-file-extern "open externally")))
+
+(defun counsel-buffer-or-recentf-transformer (var)
+  "Propertize VAR if it's a buffer visiting a file."
+  (if (member var (mapcar #'buffer-file-name (buffer-list)))
+      (ivy-append-face var 'ivy-highlight-face)
+    var))
+
+;;;; `counsel-bookmark'
+
+(defcustom counsel-bookmark-avoid-dired nil
+  "If non-nil, open directory bookmarks with `counsel-find-file'.
+By default `counsel-bookmark' opens a dired buffer for directories."
+  :type 'boolean)
+
+(defvar bookmark-alist)
+(declare-function bookmark-location "bookmark")
+(declare-function bookmark-all-names "bookmark")
+(declare-function bookmark-get-filename "bookmark")
+(declare-function bookmark-maybe-load-default-file "bookmark")
+
+;;;###autoload
+(defun counsel-bookmark ()
+  "Forward to `bookmark-jump' or `bookmark-set' if bookmark doesn't exist."
+  (interactive)
+  (require 'bookmark)
+  (ivy-read "Create or jump to bookmark: "
+            (bookmark-all-names)
+            :history 'bookmark-history
+            :action (lambda (x)
+                      (cond ((and counsel-bookmark-avoid-dired
+                                  (member x (bookmark-all-names))
+                                  (file-directory-p (bookmark-location x)))
+                             (with-ivy-window
+                               (let ((default-directory (bookmark-location x)))
+                                 (counsel-find-file))))
+                            ((member x (bookmark-all-names))
+                             (with-ivy-window
+                               (bookmark-jump x)))
+                            (t
+                             (bookmark-set x))))
+            :caller 'counsel-bookmark))
+
+(defun counsel--apply-bookmark-fn (fn)
+  "Return a function applying FN to a bookmark's location."
+  (lambda (bookmark)
+    (funcall fn (bookmark-location bookmark))))
+
+(ivy-set-actions
+ 'counsel-bookmark
+ `(("j" bookmark-jump-other-window "other window")
+   ("d" bookmark-delete "delete")
+   ("e" bookmark-rename "edit")
+   ("s" bookmark-set "overwrite")
+   ("x" ,(counsel--apply-bookmark-fn #'counsel-find-file-extern)
+        "open externally")
+   ("r" ,(counsel--apply-bookmark-fn #'counsel-find-file-as-root)
+        "open as root")))
+
+;;;; `counsel-bookmarked-directory'
+
+(defun counsel--bookmarked-dirs ()
+  "Return a list of bookmarked directories sorted by file name."
+  (bookmark-maybe-load-default-file)
+  (sort (cl-mapcan (lambda (bm)
+                     (let ((dir (bookmark-get-filename bm)))
+                       (and dir (ivy--dirname-p dir) (list dir))))
+                   bookmark-alist)
+        #'string<))
+
+;;;###autoload
+(defun counsel-bookmarked-directory ()
+  "Ivy interface for bookmarked directories.
+
+With a prefix argument, this command creates a new bookmark which points
+to the current value of `default-directory'."
+  (interactive)
+  (require 'bookmark)
+  (ivy-read "Bookmarked directory: " (counsel--bookmarked-dirs)
+            :caller 'counsel-bookmarked-directory
+            :action #'dired))
+
+(ivy-set-actions 'counsel-bookmarked-directory
+                 `(("j" ,#'dired-other-window "other window")
+                   ("x" ,#'counsel-find-file-extern "open externally")
+                   ("r" ,#'counsel-find-file-as-root "open as root")
+                   ("f" ,(lambda (dir)
+                           (let ((default-directory dir))
+                             (call-interactively #'find-file)))
+                    "find-file")))
+
+;;;; `counsel-file-register'
+
+;;;###autoload
+(defun counsel-file-register ()
+  "Search file in register.
+
+You cannot use Emacs' normal register commands to create file
+registers.  Instead you must use the `set-register' function like
+so: `(set-register ?i \"/home/eric/.emacs.d/init.el\")'.  Now you
+can use `C-x r j i' to open that file."
+  (interactive)
+  (ivy-read "File Register: "
+            ;; Use the `register-alist' variable to filter out file
+            ;; registers.  Each entry for a file register will have the
+            ;; following layout:
+            ;;
+            ;;     (NUMBER 'file . "string/path/to/file")
+            ;;
+            ;; So we go through each entry and see if the `cadr' is
+            ;; `eq' to the symbol `file'.  If so then add the filename
+            ;; (`cddr') which `ivy-read' will use for its choices.
+            (mapcar (lambda (register-alist-entry)
+                      (if (eq 'file (cadr register-alist-entry))
+                          (cddr register-alist-entry)))
+                    register-alist)
+            :require-match t
+            :history 'counsel-file-register
+            :caller 'counsel-file-register
+            :action (lambda (register-file)
+                      (with-ivy-window (find-file register-file)))))
+
+(ivy-configure 'counsel-file-register
+  :sort-fn #'ivy-string<)
+
+(ivy-set-actions
+ 'counsel-file-register
+ '(("j" find-file-other-window "other window")))
+
+;;;; `counsel-locate'
+
+(defcustom counsel-locate-cmd (cond ((memq system-type '(darwin berkeley-unix))
+                                     #'counsel-locate-cmd-noregex)
+                                    ((and (eq system-type 'windows-nt)
+                                          (executable-find "es.exe"))
+                                     #'counsel-locate-cmd-es)
+                                    (t
+                                     #'counsel-locate-cmd-default))
+  "The function for producing a `locate' command string from the input.
+
+The function takes a string - the current input, and returns a
+string - the full shell command to run."
+  :type '(choice
+          (const :tag "Default" counsel-locate-cmd-default)
+          (const :tag "No regex" counsel-locate-cmd-noregex)
+          (const :tag "mdfind" counsel-locate-cmd-mdfind)
+          (const :tag "everything" counsel-locate-cmd-es)
+          (function :tag "Custom")))
+
+(ivy-set-actions
+ 'counsel-locate
+ '(("x" counsel-locate-action-extern "xdg-open")
+   ("r" counsel-find-file-as-root "open as root")
+   ("d" counsel-locate-action-dired "dired")))
+
+(defvar counsel-locate-history nil
+  "History for `counsel-locate'.")
+
+;;;###autoload
+(defun counsel-locate-action-extern (x)
+  "Pass X to `xdg-open' or equivalent command via the shell."
+  (interactive "FFile: ")
+  (if (and (eq system-type 'windows-nt)
+           (fboundp 'w32-shell-execute))
+      (w32-shell-execute "open" x)
+    (call-process-shell-command (format "%s %s"
+                                        (cl-case system-type
+                                          (darwin "open")
+                                          (cygwin "cygstart")
+                                          (t "xdg-open"))
+                                        (shell-quote-argument x))
+                                nil 0)))
+
+(defalias 'counsel-find-file-extern #'counsel-locate-action-extern)
+
+(eval-and-compile
+  ;; Autoloaded by `dired' since Emacs 28.
+  (unless (fboundp 'dired-jump)
+    (autoload 'dired-jump "dired-x" nil t)))
+
+(defun counsel-locate-action-dired (x)
+  "Use `dired-jump' on X."
+  (dired-jump nil x))
+
+(defvar locate-command)
+
+(defun counsel-locate-cmd-default (input)
+  "Return a `locate' shell command based on regexp INPUT.
+This uses the user option `locate-command' from the `locate'
+library, which see."
+  (counsel-require-program locate-command)
+  (format "%s -i --regex %s"
+          locate-command
+          (shell-quote-argument
+           (counsel--elisp-to-pcre
+            (ivy--regex input)))))
+
+(defun counsel-locate-cmd-noregex (input)
+  "Return a `locate' shell command based on INPUT.
+This uses the user option `locate-command' from the `locate'
+library, which see."
+  (counsel-require-program locate-command)
+  (format "%s -i %s"
+          locate-command
+          (shell-quote-argument input)))
+
+(defun counsel-locate-cmd-mdfind (input)
+  "Return a `mdfind' shell command based on INPUT."
+  (counsel-require-program "mdfind")
+  (format "mdfind -name %s 2>%s"
+          (shell-quote-argument input)
+          (shell-quote-argument (counsel--null-device))))
+
+(defun counsel-locate-cmd-es (input)
+  "Return a `es' shell command based on INPUT."
+  (defvar w32-ansi-code-page)
+  (counsel-require-program "es.exe")
+  (let ((raw-string (format "es.exe -i -p -r %s"
+                            (counsel--elisp-to-pcre
+                             (ivy--regex input t)))))
+    ;; W32 doesn't use Unicode by default, so we encode search command
+    ;; to local codepage to support searching file names containing
+    ;; non-ASCII characters.
+    (if (and (eq system-type 'windows-nt)
+             (boundp 'w32-ansi-code-page))
+        (encode-coding-string raw-string
+                              (intern (format "cp%d" w32-ansi-code-page)))
+      raw-string)))
+
+(defun counsel-locate-function (input)
+  "Call a \"locate\" style shell command with INPUT."
+  (or
+   (ivy-more-chars)
+   (progn
+     (counsel--async-command
+      (funcall counsel-locate-cmd input))
+     '("" "working..."))))
+
+(defcustom counsel-locate-db-path "~/.local/mlocate.db"
+  "Location where to put the locatedb in case your home folder is encrypted."
+  :type 'file)
+
+(defun counsel-file-stale-p (file seconds)
+  "Return non-nil if FILE was modified more than SECONDS ago.
+Also return non-nil if FILE does not exist."
+  (let ((mtime (nth 5 (file-attributes file))))
+    (or (not mtime)
+        (> (float-time (time-since mtime))
+           seconds))))
+
+(defun counsel--locate-updatedb ()
+  (when (file-exists-p "~/.Private")
+    (let ((db-fname (expand-file-name counsel-locate-db-path)))
+      (setenv "LOCATE_PATH" db-fname)
+      (when (counsel-file-stale-p db-fname 60)
+        (message "Updating %s..." db-fname)
+        (counsel--command
+         "updatedb" "-l" "0" "-o" db-fname "-U" (expand-file-name "~"))))))
+
+;;;###autoload
+(defun counsel-locate (&optional initial-input)
+  "Call a \"locate\" style shell command.
+INITIAL-INPUT can be given as the initial minibuffer input."
+  (interactive)
+  ;; For `locate-command', which is honored in some options of `counsel-locate-cmd'.
+  (require 'locate)
+  (counsel--locate-updatedb)
+  (ivy-read "Locate: " #'counsel-locate-function
+            :initial-input initial-input
+            :dynamic-collection t
+            :history 'counsel-locate-history
+            :action (lambda (file)
+                      (when file
+                        (with-ivy-window
+                          (find-file
+                           (concat (file-remote-p default-directory) file)))))
+            :caller 'counsel-locate))
+
+(ivy-configure 'counsel-locate
+  :unwind-fn #'counsel-delete-process
+  :exit-codes '(1 "Nothing found"))
+
+;;;; `counsel-tracker'
+
+(defun counsel-tracker-function (input)
+  "Call the \"tracker\" shell command with INPUT."
+  (or
+   (ivy-more-chars)
+   (progn
+     (counsel--async-command
+      (format
+       "tracker sparql -q \"SELECT ?url WHERE { ?s a nfo:FileDataObject ; nie:url ?url . FILTER (STRSTARTS (?url, 'file://$HOME/')) . FILTER regex(?url, '%s') }\" | tail -n +2 | head -n -1"
+       (counsel--elisp-to-pcre (funcall ivy--regex-function input))))
+     '("" "working..."))))
+
+(defun counsel-tracker-transformer (str)
+  (if (string-match "file:///" str)
+      (decode-coding-string (url-unhex-string (substring str 9)) 'utf-8)
+    str))
+
+;;;###autoload
+(defun counsel-tracker ()
+  (interactive)
+  (ivy-read "Tracker: " 'counsel-tracker-function
+            :dynamic-collection t
+            :action (lambda (s) (find-file (counsel-tracker-transformer s)))
+            :caller 'counsel-tracker))
+
+(ivy-configure 'counsel-tracker
+  :display-transformer-fn #'counsel-tracker-transformer
+  :unwind-fn #'counsel-delete-process)
+
+;;;; `counsel-fzf'
+
+(defvar counsel-fzf-cmd "fzf -f \"%s\""
+  "Command for `counsel-fzf'.")
+
+(defvar counsel--fzf-dir nil
+  "Store the base fzf directory.")
+
+(defvar counsel-fzf-dir-function #'counsel-fzf-dir-function-projectile
+  "Function that returns a directory for fzf to use.")
+
+(defun counsel-fzf-dir-function-projectile ()
+  (if (and
+       (fboundp 'projectile-project-p)
+       (fboundp 'projectile-project-root)
+       (projectile-project-p))
+      (projectile-project-root)
+    default-directory))
+
+(defun counsel-fzf-function (str)
+  (let ((default-directory counsel--fzf-dir))
+    (setq ivy--old-re (ivy--regex-fuzzy str))
+    (counsel--async-command
+     (format counsel-fzf-cmd str)))
+  nil)
+
+;;;###autoload
+(defun counsel-fzf (&optional initial-input initial-directory fzf-prompt)
+  "Open a file using the fzf shell command.
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search.
+FZF-PROMPT, if non-nil, is passed as `ivy-read' prompt argument."
+  (interactive
+   (let ((fzf-basename (car (split-string counsel-fzf-cmd))))
+     (list nil
+           (when current-prefix-arg
+             (counsel-read-directory-name (concat
+                                           fzf-basename
+                                           " in directory: "))))))
+  (counsel-require-program counsel-fzf-cmd)
+  (setq counsel--fzf-dir
+        (or initial-directory
+            (funcall counsel-fzf-dir-function)))
+  (ivy-read (or fzf-prompt "fzf: ")
+            #'counsel-fzf-function
+            :initial-input initial-input
+            :re-builder #'ivy--regex-fuzzy
+            :dynamic-collection t
+            :action #'counsel-fzf-action
+            :caller 'counsel-fzf))
+
+(ivy-configure 'counsel-fzf
+  :occur #'counsel-fzf-occur
+  :unwind-fn #'counsel-delete-process
+  :exit-codes '(1 "Nothing found"))
+
+(defun counsel-fzf-action (x)
+  "Find file X in current fzf directory."
+  (with-ivy-window
+    (let ((default-directory counsel--fzf-dir))
+      (find-file x))))
+
+(defun counsel-fzf-occur (&optional _cands)
+  "Occur function for `counsel-fzf' using `counsel-cmd-to-dired'."
+  (cd counsel--fzf-dir)
+  (counsel-cmd-to-dired
+   (counsel--expand-ls
+    (format
+     "%s --print0 | xargs -0 ls"
+     (format counsel-fzf-cmd ivy-text)))))
+
+(ivy-set-actions
+ 'counsel-fzf
+ '(("x" counsel-locate-action-extern "xdg-open")
+   ("d" counsel-locate-action-dired "dired")))
+
+;;;; `counsel-dpkg'
+
+;;;###autoload
+(defun counsel-dpkg ()
+  "Call the \"dpkg\" shell command."
+  (interactive)
+  (counsel-require-program "dpkg")
+  (let ((cands (mapcar
+                (lambda (x)
+                  (let ((y (split-string x "  +")))
+                    (cons (format "%-40s   %s"
+                                  (ivy--truncate-string
+                                   (nth 1 y) 40)
+                                  (nth 4 y))
+                          (mapconcat #'identity y " "))))
+                (split-string
+                 (shell-command-to-string "dpkg -l | tail -n+6") "\n" t))))
+    (ivy-read "dpkg: " cands
+              :action (lambda (x)
+                        (message (cdr x)))
+              :caller 'counsel-dpkg)))
+
+;;;; `counsel-rpm'
+
+;;;###autoload
+(defun counsel-rpm ()
+  "Call the \"rpm\" shell command."
+  (interactive)
+  (counsel-require-program "rpm")
+  (let ((cands (mapcar
+                (lambda (x)
+                  (let ((y (split-string x "|")))
+                    (cons (format "%-40s   %s"
+                                  (ivy--truncate-string
+                                   (nth 0 y) 40)
+                                  (nth 1 y))
+                          (mapconcat #'identity y " "))))
+                (split-string
+                 (shell-command-to-string "rpm -qa --qf \"%{NAME}|%{SUMMARY}\\n\"") "\n" t))))
+    (ivy-read "rpm: " cands
+              :action (lambda (x)
+                        (message (cdr x)))
+              :caller 'counsel-rpm)))
+
+(defun counsel--find-return-list (args)
+  (unless (listp args)
+    (user-error
+     "`counsel-file-jump-args' is a list now; please customize accordingly"))
+  (counsel--call
+   (cons find-program args)
+   (lambda ()
+     (let (files)
+       (goto-char (point-min))
+       (while (< (point) (point-max))
+         (when (looking-at "\\./")
+           (goto-char (match-end 0)))
+         (push (buffer-substring (point) (line-end-position)) files)
+         (beginning-of-line 2))
+       (nreverse files)))))
+
+(defcustom counsel-file-jump-args (split-string ". -name .git -prune -o -type f -print")
+  "Arguments for the `find-command' when using `counsel-file-jump'."
+  :type '(repeat string))
+
+;;;; `counsel-file-jump'
+
+(defvar counsel-file-jump-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "`") #'counsel-find-file-from-jump)
+    map)
+  "Key bindings to be used when in a file-jump minibuffer.")
+
+(defun counsel-find-file-from-jump ()
+  "Switch to `counsel-find-file' from `counsel-file-jump'."
+  (interactive)
+  (ivy-quit-and-run
+    (counsel-find-file ivy-text (ivy-state-directory ivy-last))))
+(ivy--no-M-x #'counsel-find-file-from-jump #'ivy--minibuffer-p)
+
+;;;###autoload
+(defun counsel-file-jump (&optional initial-input initial-directory)
+  "Jump to a file below the current directory.
+List all files within the current directory or any of its sub-directories.
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search."
+  (interactive
+   (list nil
+         (when current-prefix-arg
+           (counsel-read-directory-name "From directory: "))))
+  (counsel-require-program find-program)
+  (let ((default-directory (or initial-directory default-directory)))
+    (ivy-read "Find file: "
+              (counsel--find-return-list counsel-file-jump-args)
+              :matcher #'counsel--find-file-matcher
+              :initial-input initial-input
+              :action #'find-file
+              :preselect (counsel--preselect-file)
+              :require-match 'confirm-after-completion
+              :history 'file-name-history
+              :keymap counsel-file-jump-map
+              :caller 'counsel-file-jump)))
+
+(ivy-set-actions
+ 'counsel-file-jump
+ `(("d" ,(lambda (x)
+           (dired (or (file-name-directory x) default-directory)))
+    "open in dired")))
+
+;;;; `counsel-dired-jump'
+
+(defcustom counsel-dired-jump-args (split-string ". -name .git -prune -o -type d -print")
+  "Arguments for the `find-command' when using `counsel-dired-jump'."
+  :type '(repeat string))
+
+;;;###autoload
+(defun counsel-dired-jump (&optional initial-input initial-directory)
+  "Jump to a directory (see `dired-jump') below the current directory.
+List all sub-directories within the current directory.
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search."
+  (interactive
+   (list nil
+         (when current-prefix-arg
+           (counsel-read-directory-name "From directory: "))))
+  (counsel-require-program find-program)
+  (let ((default-directory (or initial-directory default-directory)))
+    (ivy-read "Find directory: "
+              (cdr
+               (counsel--find-return-list counsel-dired-jump-args))
+              :matcher #'counsel--find-file-matcher
+              :initial-input initial-input
+              :action (lambda (d) (dired-jump nil (expand-file-name d)))
+              :history 'file-name-history
+              :keymap counsel-find-file-map
+              :caller 'counsel-dired-jump)))
+
+;;; Grep
+;;;; `counsel-ag'
+
+(defvar counsel-ag-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-l") #'ivy-call-and-recenter)
+    (define-key map (kbd "M-q") #'counsel-git-grep-query-replace)
+    (define-key map (kbd "C-x C-d") #'counsel-cd)
+    map)
+  "Keymap for `counsel-ag'.")
+
+(defcustom counsel-ag-base-command (list "ag" "--vimgrep" "%s")
+  "Template for default `counsel-ag' command.
+The value should be either a list of strings, starting with the
+`ag' executable file name and followed by its arguments, or a
+single string describing a full `ag' shell command.
+
+If the command is specified as a list, `ag' is called directly
+using `process-file'; otherwise, it is called as a shell command.
+Calling `ag' directly avoids various shell quoting pitfalls, so
+it is generally recommended.
+
+If the string \"%s\" appears as an element of the list, or as a
+substring of the command string, it is replaced by any optional
+`ag' arguments followed by the search regexp specified during the
+`counsel-ag' session."
+  :package-version '(counsel . "0.14.0")
+  :type '(choice (repeat :tag "Command list to call directly" string)
+                 (string :tag "Shell command")))
+
+(defvar counsel-ag-command nil)
+
+(defvar counsel--grep-tool-look-around t)
+
+(defvar counsel--regex-look-around nil)
+
+(defconst counsel--command-args-separator " -- ")
+
+(defun counsel--split-command-args (arguments)
+  "Split ARGUMENTS into its switches and search-term parts.
+Return pair of corresponding strings (SWITCHES . SEARCH-TERM)."
+  (if (string-match counsel--command-args-separator arguments)
+      (let ((args (substring arguments (match-end 0)))
+            (search-term (substring arguments 0 (match-beginning 0))))
+        (if (string-prefix-p "-" arguments)
+            (cons search-term args)
+          (cons args search-term)))
+    (cons "" arguments)))
+
+(defun counsel--format-ag-command (extra-args needle)
+  "Construct a complete `counsel-ag-command' as a string.
+EXTRA-ARGS is a string of the additional arguments.
+NEEDLE is the search string."
+  (counsel--format counsel-ag-command
+                   (if (listp counsel-ag-command)
+                       (if (string-match " \\(--\\) " extra-args)
+                           (counsel--format
+                            (split-string (replace-match "%s" t t extra-args 1))
+                            needle)
+                         (nconc (split-string extra-args) needle))
+                     (if (string-match " \\(--\\) " extra-args)
+                         (replace-match needle t t extra-args 1)
+                       (concat extra-args " " needle)))))
+
+(defun counsel--grep-regex (str)
+  (counsel--elisp-to-pcre
+   (setq ivy--old-re
+         (funcall (ivy-state-re-builder ivy-last) str))
+   counsel--regex-look-around))
+
+(defun counsel--ag-extra-switches (regex)
+  "Get additional switches needed for look-arounds."
+  (and (stringp counsel--regex-look-around)
+       ;; using look-arounds
+       (string-match-p "\\`\\^(\\?[=!]" regex)
+       (concat " " counsel--regex-look-around " ")))
+
+(defun counsel-ag-function (string)
+  "Grep in the current directory for STRING."
+  (let* ((command-args (counsel--split-command-args string))
+         (search-term (cdr command-args)))
+    (or
+     (let ((ivy-text search-term))
+       (ivy-more-chars))
+     (let* ((default-directory (ivy-state-directory ivy-last))
+            (regex (counsel--grep-regex search-term))
+            (switches (concat (if (ivy--case-fold-p string)
+                                  " -i "
+                                " -s ")
+                              (counsel--ag-extra-switches regex)
+                              (car command-args))))
+       (counsel--async-command (counsel--format-ag-command
+                                switches
+                                (funcall (if (listp counsel-ag-command) #'identity
+                                           #'shell-quote-argument)
+                                         regex)))
+       nil))))
+
+;;;###autoload
+(cl-defun counsel-ag (&optional initial-input initial-directory extra-ag-args ag-prompt
+                      &key caller)
+  "Grep for a string in a root directory using `ag'.
+
+By default, the root directory is the first directory containing
+a .git subdirectory.
+
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search.
+EXTRA-AG-ARGS, if non-nil, is appended to `counsel-ag-base-command'.
+AG-PROMPT, if non-nil, is passed as `ivy-read' prompt argument.
+CALLER is passed to `ivy-read'.
+
+With a `\\[universal-argument]' prefix argument, prompt for INITIAL-DIRECTORY.
+With a `\\[universal-argument] \\[universal-argument]' prefix argument, \
+prompt additionally for EXTRA-AG-ARGS."
+  (interactive)
+  (setq counsel-ag-command counsel-ag-base-command)
+  (setq counsel--regex-look-around counsel--grep-tool-look-around)
+  (counsel-require-program counsel-ag-command)
+  (let ((prog-name (car (if (listp counsel-ag-command) counsel-ag-command
+                          (split-string counsel-ag-command))))
+        (arg (prefix-numeric-value current-prefix-arg)))
+    (when (>= arg 4)
+      (setq initial-directory
+            (or initial-directory
+                (counsel-read-directory-name (concat
+                                              prog-name
+                                              " in directory: ")))))
+    (when (>= arg 16)
+      (setq extra-ag-args
+            (or extra-ag-args
+                (read-from-minibuffer (format "%s args: " prog-name)))))
+    (setq counsel-ag-command (counsel--format-ag-command (or extra-ag-args "") "%s"))
+    (let ((default-directory (or initial-directory
+                                 (counsel--git-root)
+                                 default-directory)))
+      (ivy-read (or ag-prompt
+                    (concat prog-name ": "))
+                #'counsel-ag-function
+                :initial-input initial-input
+                :dynamic-collection t
+                :keymap counsel-ag-map
+                :history 'counsel-git-grep-history
+                :action #'counsel-git-grep-action
+                :require-match t
+                :caller (or caller 'counsel-ag)))))
+
+(ivy-configure 'counsel-ag
+  :occur #'counsel-ag-occur
+  :unwind-fn #'counsel--grep-unwind
+  :display-transformer-fn #'counsel-git-grep-transformer
+  :grep-p t
+  :exit-codes '(1 "No matches found"))
+
+(defun counsel-read-directory-name (prompt &optional default)
+  "Read a directory name.
+This is intended as a (partial) replacement for
+`read-directory-name'."
+  (let ((counsel--find-file-predicate #'file-directory-p))
+    (ivy-read prompt
+              #'read-file-name-internal
+              :matcher #'counsel--find-file-matcher
+              :def default
+              :history 'file-name-history
+              :keymap counsel-find-file-map
+              :caller 'counsel-read-directory-name)))
+
+(ivy-configure 'counsel-read-directory-name
+  :parent 'read-file-name-internal)
+
+(defun counsel-cd ()
+  "Change the directory for the currently running Ivy grep-like command.
+Works for `counsel-git-grep', `counsel-ag', etc."
+  (interactive)
+  (counsel-delete-process)
+  (let* ((input ivy-text)
+         (enable-recursive-minibuffers t)
+         (def-dir (buffer-file-name (ivy-state-buffer ivy-last)))
+         (def-dir (and def-dir (file-name-directory def-dir)))
+         (new-dir (counsel-read-directory-name "cd: " def-dir)))
+    (ivy-quit-and-run
+      (funcall (ivy-state-caller ivy-last) input new-dir))))
+(ivy--no-M-x #'counsel-cd #'ivy--minibuffer-p)
+
+(defun counsel--grep-smart-case-flag ()
+  (if (ivy--case-fold-p ivy-text)
+      "-i"
+    (if (and (stringp counsel-ag-base-command)
+             (string-prefix-p "pt" counsel-ag-base-command))
+        "-S"
+      "-s")))
+
+(defun counsel-grep-like-occur (cmd-template)
+  (unless (eq major-mode 'ivy-occur-grep-mode)
+    (ivy-occur-grep-mode)
+    (setq default-directory (ivy-state-directory ivy-last)))
+  (ivy-set-text
+   (let ((name (buffer-name)))
+     (if (string-match "\"\\(.*\\)\"" name)
+         (match-string 1 name)
+       (ivy-state-text ivy-occur-last))))
+  (let* ((cmd
+          (if (functionp cmd-template)
+              (funcall cmd-template ivy-text)
+            (let* ((command-args (counsel--split-command-args ivy-text))
+                   (regex (counsel--grep-regex (cdr command-args)))
+                   (extra-switches (counsel--ag-extra-switches regex))
+                   (all-args (append
+                              (when (car command-args)
+                                (split-string (car command-args)))
+                              (when extra-switches
+                                (split-string extra-switches))
+                              (list
+                               (counsel--grep-smart-case-flag)
+                               regex))))
+              (if (stringp cmd-template)
+                  (counsel--format
+                   cmd-template
+                   (mapconcat #'shell-quote-argument all-args " "))
+                (cl-mapcan
+                 (lambda (x) (if (string= x "%s") (copy-sequence all-args) (list x)))
+                 cmd-template)))))
+         (cands (counsel--split-string
+                 (if (stringp cmd)
+                     (shell-command-to-string cmd)
+                   (counsel--call cmd)))))
+    (swiper--occur-insert-lines (mapcar #'counsel--normalize-grep-match cands))))
+
+(defun counsel-ag-occur (&optional _cands)
+  "Generate a custom occur buffer for `counsel-ag'."
+  (counsel-grep-like-occur
+   counsel-ag-command))
+
+;;;; `counsel-pt'
+
+(defcustom counsel-pt-base-command "pt --nocolor --nogroup -e %s"
+  "Alternative to `counsel-ag-base-command' using pt."
+  :type 'string)
+
+;;;###autoload
+(defun counsel-pt (&optional initial-input)
+  "Grep for a string in the current directory using pt.
+INITIAL-INPUT can be given as the initial minibuffer input.
+This uses `counsel-ag' with `counsel-pt-base-command' instead of
+`counsel-ag-base-command'."
+  (interactive)
+  (let ((counsel-ag-base-command counsel-pt-base-command)
+        (counsel--grep-tool-look-around nil))
+    (counsel-ag initial-input nil nil nil :caller 'counsel-pt)))
+
+(ivy-configure 'counsel-pt
+  :unwind-fn #'counsel--grep-unwind
+  :display-transformer-fn #'counsel-git-grep-transformer
+  :grep-p t)
+
+;;;; `counsel-ack'
+
+(defcustom counsel-ack-base-command
+  (concat
+   (file-name-nondirectory
+    (or (executable-find "ack-grep") "ack"))
+   " --nocolor --nogroup %s")
+  "Alternative to `counsel-ag-base-command' using ack."
+  :type 'string)
+
+;;;###autoload
+(defun counsel-ack (&optional initial-input)
+  "Grep for a string in the current directory using ack.
+INITIAL-INPUT can be given as the initial minibuffer input.
+This uses `counsel-ag' with `counsel-ack-base-command' replacing
+`counsel-ag-base-command'."
+  (interactive)
+  (let ((counsel-ag-base-command counsel-ack-base-command)
+        (counsel--grep-tool-look-around t))
+    (counsel-ag
+     initial-input nil nil nil
+     :caller 'counsel-ack)))
+
+;;;; `counsel-rg'
+
+(defcustom counsel-rg-base-command
+  `("rg"
+    "--max-columns" "240"
+    "--with-filename"
+    "--no-heading"
+    "--line-number"
+    "--color" "never"
+    "%s"
+    ,@(and (memq system-type '(ms-dos windows-nt))
+           (list "--path-separator" "/" ".")))
+  "Like `counsel-ag-base-command', but for `counsel-rg'.
+
+Note: don't use single quotes for the regexp."
+  :package-version '(counsel . "0.14.0")
+  :type '(choice (repeat :tag "Command list to call directly" string)
+                 (string :tag "Shell command")))
+
+(defun counsel--rg-targets ()
+  "Return a list of files to operate on, based on `dired-mode' marks."
+  (when (derived-mode-p 'dired-mode)
+    (declare-function dired-get-marked-files "dired")
+    (declare-function dired-toggle-marks "dired")
+    (let ((files
+           (dired-get-marked-files 'no-dir nil nil t)))
+      (when (or (cdr files)
+                (when (ivy--string-search "*ivy-occur" (buffer-name))
+                  (dired-toggle-marks)
+                  (setq files (dired-get-marked-files 'no-dir))
+                  (dired-toggle-marks)
+                  t))
+        (delq t files)))))
+
+;;;###autoload
+(defun counsel-rg (&optional initial-input initial-directory extra-rg-args rg-prompt)
+  "Grep for a string in the current directory using `rg'.
+INITIAL-INPUT can be given as the initial minibuffer input.
+INITIAL-DIRECTORY, if non-nil, is used as the root directory for search.
+EXTRA-RG-ARGS string, if non-nil, is appended to `counsel-rg-base-command'.
+RG-PROMPT, if non-nil, is passed as `ivy-read' prompt argument.
+
+Example input with inclusion and exclusion file patterns:
+    require i -- -g*.el"
+  (interactive)
+  (let ((counsel-ag-base-command
+         (if (listp counsel-rg-base-command)
+             (append counsel-rg-base-command (counsel--rg-targets))
+           (concat counsel-rg-base-command " "
+                   (mapconcat #'shell-quote-argument (counsel--rg-targets) " "))))
+        (counsel--grep-tool-look-around
+         (let ((rg (car (if (listp counsel-rg-base-command) counsel-rg-base-command
+                          (split-string counsel-rg-base-command))))
+               (switch "--pcre2"))
+           (and (eq 0 (call-process rg nil nil nil switch "--pcre2-version"))
+                switch))))
+    (counsel-ag initial-input initial-directory extra-rg-args rg-prompt
+                :caller 'counsel-rg)))
+
+(ivy-configure 'counsel-rg
+  :occur #'counsel-ag-occur
+  :unwind-fn #'counsel--grep-unwind
+  :display-transformer-fn #'counsel-git-grep-transformer
+  :grep-p t
+  :exit-codes '(1 "No matches found"))
+
+;;;; `counsel-grep'
+
+(defvar counsel-grep-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-l") #'ivy-call-and-recenter)
+    (define-key map (kbd "M-q") #'swiper-query-replace)
+    map)
+  "Keymap for `counsel-grep'.")
+
+(defcustom counsel-grep-base-command "grep -E -n -e %s %s"
+  "Format string used by `counsel-grep' to build a shell command.
+It should contain two %-sequences (see function `format') to be
+substituted by the search regexp and file, respectively.  Neither
+%-sequence should be contained in single quotes."
+  :type 'string)
+
+(defvar counsel-grep-command nil)
+
+(defun counsel-grep-function (string)
+  "Grep in the current directory for STRING."
+  (or
+   (ivy-more-chars)
+   (let* ((regex (counsel--grep-regex string))
+          (cmd (counsel--format
+                counsel-grep-command
+                (funcall (if (listp counsel-grep-command) #'identity
+                           #'shell-quote-argument)
+                         regex))))
+     (counsel--async-command
+      (if (ivy--case-fold-p regex)
+          (if (listp cmd) (nconc (list (car cmd) "-i") (cdr cmd))
+            (string-match " " cmd)
+            (replace-match " -i " nil nil cmd))
+        cmd))
+     nil)))
+
+(defvar counsel--grep-last-pos nil
+  "Store the last point and line that `counsel-grep-action' scrolled to.
+This speeds up scrolling: instead of going to `point-min' and
+`forward-line' with a huge arg (e.g. to scroll 50K lines), scroll
+relative to the last position stored here.")
+
+(defun counsel-grep-action (x)
+  "Go to candidate X."
+  (with-ivy-window
+    (swiper--cleanup)
+    (let ((default-directory
+           (file-name-directory
+            (ivy-state-directory ivy-last)))
+          file-name line-number)
+      (when (cond ((string-match "\\`\\([0-9]+\\):\\(.*\\)\\'" x)
+                   (setq file-name (buffer-file-name (ivy-state-buffer ivy-last)))
+                   (setq line-number (match-string-no-properties 1 x)))
+                  ((string-match "\\`\\([^:]+\\):\\([0-9]+\\):\\(.*\\)\\'" x)
+                   (setq file-name (match-string-no-properties 1 x))
+                   (setq line-number (match-string-no-properties 2 x))))
+        ;; If the file buffer is already open, just get it. Prevent doing
+        ;; `find-file', as that file could have already been opened using
+        ;; `find-file-literally'.
+        (with-current-buffer (or (get-file-buffer file-name)
+                                 (find-file file-name))
+          (setq line-number (string-to-number line-number))
+          (if (and counsel--grep-last-pos (= (point) (car counsel--grep-last-pos)))
+              (forward-line (- line-number (cdr counsel--grep-last-pos)))
+            (goto-char (point-min))
+            (forward-line (1- line-number)))
+          (setq counsel--grep-last-pos (cons (point) line-number))
+          (when (re-search-forward (ivy--regex ivy-text t) (line-end-position) t)
+            (when swiper-goto-start-of-match
+              (goto-char (match-beginning 0))))
+          (run-hooks 'counsel-grep-post-action-hook)
+          (if (eq ivy-exit 'done)
+              (swiper--ensure-visible)
+            (isearch-range-invisible (line-beginning-position)
+                                     (line-end-position))
+            (swiper--add-overlays (ivy--regex ivy-text))))))))
+
+(defun counsel-grep-occur (&optional _cands)
+  "Generate a custom Occur buffer for `counsel-grep'."
+  (let ((file (buffer-file-name (ivy-state-buffer ivy-last))))
+    (counsel-grep-like-occur
+     (format "grep -niE %%s %s %s"
+             (if file (shell-quote-argument (file-name-nondirectory file)) "")
+             (shell-quote-argument (counsel--null-device))))))
+
+(defvar counsel-grep-history nil
+  "History for `counsel-grep'.")
+
+;;;###autoload
+(defun counsel-grep (&optional initial-input)
+  "Grep for a string in the file visited by the current buffer.
+When non-nil, INITIAL-INPUT is the initial search pattern."
+  (interactive)
+  (unless buffer-file-name
+    (user-error "Current buffer is not visiting a file"))
+  (counsel-require-program counsel-grep-base-command)
+  (setq counsel-grep-command
+        (counsel--format counsel-grep-base-command "%s"
+                         (funcall (if (listp counsel-grep-base-command) #'identity
+                                    #'shell-quote-argument)
+                                  (file-name-nondirectory
+                                   buffer-file-name))))
+  (let ((default-directory (file-name-directory buffer-file-name))
+        (init-point (point))
+        res)
+    (unwind-protect
+         (setq res (ivy-read "grep: " #'counsel-grep-function
+                             :initial-input initial-input
+                             :dynamic-collection t
+                             :require-match t
+                             :preselect
+                             (when (< (- (line-end-position) (line-beginning-position)) 300)
+                               (format "%d:%s"
+                                       (line-number-at-pos)
+                                       (regexp-quote
+                                        (buffer-substring-no-properties
+                                         (line-beginning-position)
+                                         (line-end-position)))))
+                             :keymap counsel-grep-map
+                             :history 'counsel-grep-history
+                             :re-builder #'ivy--regex
+                             :action #'counsel-grep-action
+                             :caller 'counsel-grep))
+      (unless res
+        (goto-char init-point)))))
+
+(ivy-configure 'counsel-grep
+  :update-fn 'auto
+  :unwind-fn #'counsel--grep-unwind
+  :index-fn #'ivy-recompute-index-swiper-async
+  :occur #'counsel-grep-occur
+  :more-chars 2
+  :grep-p t
+  :exit-codes '(1 ""))
+
+;;;###autoload
+(defun counsel-grep-backward (&optional initial-input)
+  "Grep for a string in the file visited by the current buffer going
+backward similar to `swiper-backward'. When non-nil, INITIAL-INPUT is
+the initial search pattern."
+  (interactive)
+  (let ((ivy-index-functions-alist
+         '((counsel-grep . ivy-recompute-index-swiper-async-backward))))
+    (counsel-grep initial-input)))
+
+;;;; `counsel-grep-or-swiper'
+
+(defcustom counsel-grep-swiper-limit 300000
+  "Buffer size threshold for `counsel-grep-or-swiper'.
+When the number of characters in a buffer exceeds this threshold,
+`counsel-grep' will be used instead of `swiper'."
+  :type 'integer)
+
+(defcustom counsel-grep-use-swiper-p #'counsel-grep-use-swiper-p-default
+  "When this function returns non-nil, call `swiper', else `counsel-grep'."
+  :type '(choice
+          (const :tag "Rely on `counsel-grep-swiper-limit'."
+           counsel-grep-use-swiper-p-default)
+          (const :tag "Always use `counsel-grep'." ignore)
+          (function :tag "Custom")))
+
+(defun counsel-grep-use-swiper-p-default ()
+  (<= (buffer-size)
+      (/ counsel-grep-swiper-limit
+         (if (eq major-mode 'org-mode) 4 1))))
+
+;;;###autoload
+(defun counsel-grep-or-swiper (&optional initial-input)
+  "Call `swiper' for small buffers and `counsel-grep' for large ones.
+When non-nil, INITIAL-INPUT is the initial search pattern."
+  (interactive)
+  (if (or (not buffer-file-name)
+          (buffer-narrowed-p)
+          (ignore-errors
+            (file-remote-p buffer-file-name))
+          (jka-compr-get-compression-info buffer-file-name)
+          (funcall counsel-grep-use-swiper-p))
+      (swiper initial-input)
+    (when (file-writable-p buffer-file-name)
+      (save-buffer))
+    (counsel-grep initial-input)))
+
+;;;; `counsel-grep-or-swiper-backward'
+
+;;;###autoload
+(defun counsel-grep-or-swiper-backward (&optional initial-input)
+  "Call `swiper-backward' for small buffers and `counsel-grep-backward' for
+large ones.  When non-nil, INITIAL-INPUT is the initial search pattern."
+  (interactive)
+  (let ((ivy-index-functions-alist
+         '((swiper . ivy-recompute-index-swiper-backward)
+           (counsel-grep . ivy-recompute-index-swiper-async-backward))))
+    (counsel-grep-or-swiper initial-input)))
+
+;;;; `counsel-recoll'
+
+(defun counsel-recoll-function (str)
+  "Run recoll for STR."
+  (or
+   (ivy-more-chars)
+   (progn
+     (counsel--async-command
+      (format "recoll -t -b %s"
+              (shell-quote-argument str)))
+     nil)))
+
+;; This command uses the recollq command line tool that comes together
+;; with the recoll (the document indexing database) source:
+;;     https://www.lesbonscomptes.com/recoll/download.html
+;; You need to build it yourself (together with recoll):
+;;     cd ./query && make && sudo cp recollq /usr/local/bin
+;; You can try the GUI version of recoll with:
+;;     sudo apt-get install recoll
+;; Unfortunately, that does not install recollq.
+;;;###autoload
+(defun counsel-recoll (&optional initial-input)
+  "Search for a string in the recoll database.
+You'll be given a list of files that match.
+Selecting a file will launch `swiper' for that file.
+INITIAL-INPUT can be given as the initial minibuffer input."
+  (interactive)
+  (counsel-require-program "recoll")
+  (ivy-read "recoll: " 'counsel-recoll-function
+            :initial-input initial-input
+            :dynamic-collection t
+            :history 'counsel-git-grep-history
+            :action (lambda (x)
+                      (when (string-match "file://\\(.*\\)\\'" x)
+                        (let ((file-name (match-string 1 x)))
+                          (find-file file-name)
+                          (unless (string-match "pdf$" x)
+                            (swiper ivy-text)))))
+            :caller 'counsel-recoll))
+
+(ivy-configure 'counsel-recoll
+  :unwind-fn #'counsel-delete-process)
+
+;;; Org
+;;;; `counsel-org-tag'
+
+(defvar counsel-org-tags nil
+  "Store the current list of tags.")
+
+(defvar org-outline-regexp)
+(defvar org-indent-mode)
+(defvar org-indent-indentation-per-level)
+(defvar org-tags-column)
+(declare-function org-get-tags "org")
+(declare-function org-move-to-column "org-compat")
+
+(defun counsel--org-make-tag-string ()
+  (if (fboundp 'org-make-tag-string)
+      ;; >= Org 9.2
+      (org-make-tag-string (counsel--org-get-tags))
+    (with-no-warnings
+      (org-get-tags-string))))
+
+(defun counsel-org-change-tags (tags)
+  "Change tags of current org headline to TAGS."
+  (let ((current (counsel--org-make-tag-string))
+        (col (current-column))
+        level)
+    ;; Insert new tags at the correct column
+    (beginning-of-line 1)
+    (setq level (or (and (looking-at org-outline-regexp)
+                         (- (match-end 0) (point) 1))
+                    1))
+    (cond
+      ((and (equal current "") (equal tags "")))
+      ((re-search-forward
+        (concat "\\([ \t]*" (regexp-quote current) "\\)[ \t]*$")
+        (line-end-position) t)
+       (if (equal tags "")
+           (delete-region
+            (match-beginning 0)
+            (match-end 0))
+         (goto-char (match-beginning 0))
+         (let* ((c0 (current-column))
+                ;; compute offset for the case of org-indent-mode active
+                (di (if (bound-and-true-p org-indent-mode)
+                        (* (1- org-indent-indentation-per-level) (1- level))
+                      0))
+                (p0 (if (equal (char-before) ?*) (1+ (point)) (point)))
+                (tc (+ org-tags-column (if (> org-tags-column 0) (- di) di)))
+                (c1 (max (1+ c0) (if (> tc 0) tc (- (- tc) (string-width tags)))))
+                (rpl (concat (make-string (max 0 (- c1 c0)) ?\ ) tags)))
+           (replace-match rpl t t)
+           (and c0 indent-tabs-mode (tabify p0 (point)))
+           tags)))
+      (t (error "Tags alignment failed")))
+    (org-move-to-column col)))
+
+(defun counsel-org--set-tags ()
+  "Set tags of current org headline to `counsel-org-tags'."
+  (counsel-org-change-tags
+   (if counsel-org-tags
+       (format ":%s:"
+               (mapconcat #'identity counsel-org-tags ":"))
+     "")))
+
+(defvar org-agenda-bulk-marked-entries)
+
+;; Moved from `org' to `org-macs' in Emacs 27.
+(declare-function org-get-at-bol "org-macs")
+(declare-function org-trim "org-macs")
+
+(declare-function org-agenda-error "org-agenda")
+
+(defun counsel-org-tag-action (x)
+  "Add tag X to `counsel-org-tags'.
+If X is already part of the list, remove it instead.  Quit the selection if
+X is selected by either `ivy-done', `ivy-alt-done' or `ivy-immediate-done',
+otherwise continue prompting for tags."
+  (if (member x counsel-org-tags)
+      (progn
+        (setq counsel-org-tags (delete x counsel-org-tags)))
+    (unless (equal x "")
+      (setq counsel-org-tags (append counsel-org-tags (list x)))
+      (unless (member x ivy--all-candidates)
+        (setq ivy--all-candidates (append ivy--all-candidates (list x))))))
+  (let ((prompt (counsel-org-tag-prompt)))
+    (setf (ivy-state-prompt ivy-last) prompt)
+    (setq ivy--prompt (concat "%-4d " prompt)))
+  (cond ((memq this-command '(ivy-done
+                              ivy-alt-done
+                              ivy-immediate-done))
+         (if (eq major-mode 'org-agenda-mode)
+             (if (null org-agenda-bulk-marked-entries)
+                 (let ((hdmarker (or (org-get-at-bol 'org-hd-marker)
+                                     (org-agenda-error))))
+                   (with-current-buffer (marker-buffer hdmarker)
+                     (goto-char hdmarker)
+                     (counsel-org--set-tags)))
+               (let ((add-tags (copy-sequence counsel-org-tags)))
+                 (dolist (m org-agenda-bulk-marked-entries)
+                   (with-current-buffer (marker-buffer m)
+                     (save-excursion
+                       (goto-char m)
+                       (setq counsel-org-tags
+                             (delete-dups
+                              (append (counsel--org-get-tags) add-tags)))
+                       (counsel-org--set-tags))))))
+           (counsel-org--set-tags)
+           (unless (member x counsel-org-tags)
+             (message "Tag %S has been removed." x))))
+        ((eq this-command 'ivy-call)
+         (with-selected-window (active-minibuffer-window)
+           (delete-minibuffer-contents)))))
+
+(defun counsel-org-tag-prompt ()
+  "Return prompt for `counsel-org-tag'."
+  (format "Tags (%s): "
+          (mapconcat #'identity counsel-org-tags ", ")))
+
+(defvar org-setting-tags)
+(defvar org-last-tags-completion-table)
+(defvar org-tag-persistent-alist)
+(defvar org-tag-alist)
+(defvar org-complete-tags-always-offer-all-agenda-tags)
+
+(declare-function org-at-heading-p "org")
+(declare-function org-back-to-heading "org")
+(declare-function org-get-buffer-tags "org")
+(declare-function org-global-tags-completion-table "org")
+(declare-function org-agenda-files "org")
+(declare-function org-agenda-set-tags "org-agenda")
+(declare-function org-tags-completion-function "org")
+
+;;;###autoload
+(defun counsel--org-get-tags ()
+  (delete "" (condition-case nil
+                 (org-get-tags nil t)
+               (error (org-get-tags)))))
+
+;;;###autoload
+(defun counsel-org-tag ()
+  "Add or remove tags in `org-mode'."
+  (interactive)
+  (save-excursion
+    (if (eq major-mode 'org-agenda-mode)
+        (if org-agenda-bulk-marked-entries
+            (setq counsel-org-tags nil)
+          (let ((hdmarker (or (org-get-at-bol 'org-hd-marker)
+                              (org-agenda-error))))
+            (with-current-buffer (marker-buffer hdmarker)
+              (goto-char hdmarker)
+              (setq counsel-org-tags (counsel--org-get-tags)))))
+      (unless (org-at-heading-p)
+        (org-back-to-heading t))
+      (setq counsel-org-tags (counsel--org-get-tags)))
+    (let ((org-last-tags-completion-table
+           (append (and (or org-complete-tags-always-offer-all-agenda-tags
+                            (eq major-mode 'org-agenda-mode))
+                        (org-global-tags-completion-table
+                         (org-agenda-files)))
+                   (unless (boundp 'org-current-tag-alist)
+                     org-tag-persistent-alist)
+                   (or (if (boundp 'org-current-tag-alist)
+                           org-current-tag-alist
+                         org-tag-alist)
+                       (org-get-buffer-tags)))))
+      (ivy-read (counsel-org-tag-prompt)
+                (lambda (str _pred _action)
+                  (delete-dups
+                   (all-completions str #'org-tags-completion-function)))
+                :history 'org-tags-history
+                :action #'counsel-org-tag-action
+                :caller 'counsel-org-tag))))
+
+(defvar org-version)
+
+;;;###autoload
+(defun counsel-org-tag-agenda ()
+  "Set tags for the current agenda item."
+  (interactive)
+  (cl-letf (((symbol-function (if (version< org-version "9.2")
+                                  'org-set-tags
+                                'org-set-tags-command))
+             #'counsel-org-tag))
+    (org-agenda-set-tags)))
+
+(defcustom counsel-org-headline-display-tags nil
+  "If non-nil, display tags in matched `org-mode' headlines."
+  :type 'boolean)
+
+(defcustom counsel-org-headline-display-todo nil
+  "If non-nil, display todo keywords in matched `org-mode' headlines."
+  :type 'boolean)
+
+(defcustom counsel-org-headline-display-priority nil
+  "If non-nil, display priorities in matched `org-mode' headlines."
+  :type 'boolean)
+
+(defcustom counsel-org-headline-display-comment nil
+  "If non-nil, display COMMENT string in matched `org-mode' headlines."
+  :type 'boolean)
+
+(defcustom counsel-org-headline-display-statistics nil
+  "If non-nil, display statistics cookie in matched `org-mode' headlines."
+  :type 'boolean)
+
+(declare-function org-get-heading "org")
+(declare-function org-goto-marker-or-bmk "org")
+(declare-function outline-next-heading "outline")
+
+;;;###autoload
+(defalias 'counsel-org-goto #'counsel-outline)
+
+(defcustom counsel-org-goto-all-outline-path-prefix nil
+  "Prefix for outline candidates in `counsel-org-goto-all'."
+  :type '(choice
+          (const :tag "None" nil)
+          (const :tag "File name" file-name)
+          (const :tag "File name (nondirectory part)" file-name-nondirectory)
+          (const :tag "Buffer name" buffer-name)))
+
+(defun counsel-org-goto-all--outline-path-prefix ()
+  (cl-case counsel-org-goto-all-outline-path-prefix
+    (file-name buffer-file-name)
+    (file-name-nondirectory (file-name-nondirectory buffer-file-name))
+    (buffer-name (buffer-name))))
+
+(defvar counsel-outline-settings
+  '((emacs-lisp-mode
+     :outline-regexp ";;[;*]+[\s\t]+"
+     :outline-level counsel-outline-level-emacs-lisp)
+    (org-mode
+     :outline-title counsel-outline-title-org
+     :action counsel-org-goto-action
+     :history counsel-org-goto-history
+     :caller counsel-org-goto)
+    ;; markdown-mode package
+    (markdown-mode
+     :outline-title counsel-outline-title-markdown)
+    ;; Built-in mode or AUCTeX package
+    (latex-mode
+     :outline-title counsel-outline-title-latex))
+  "Alist mapping major modes to their `counsel-outline' settings.
+
+Each entry is a pair (MAJOR-MODE . PLIST).  `counsel-outline'
+checks whether an entry exists for the current buffer's
+MAJOR-MODE and, if so, loads the settings specified by PLIST
+instead of the default settings.  The following settings are
+recognized:
+
+- `:outline-regexp' is a regexp to match the beginning of an
+  outline heading.  It is only checked at the start of a line and
+  so need not start with \"^\".
+  Defaults to the value of the variable `outline-regexp'.
+
+- `:outline-level' is a function of no arguments which computes
+  the level of an outline heading.  It is called with point at
+  the beginning of `outline-regexp' and with the match data
+  corresponding to `outline-regexp'.
+  Defaults to the value of the variable `outline-level'.
+
+- `:outline-title' is a function of no arguments which returns
+  the title of an outline heading.  It is called with point at
+  the end of `outline-regexp' and with the match data
+  corresponding to `outline-regexp'.
+  Defaults to the function `counsel-outline-title'.
+
+- `:action' is a function of one argument, the selected outline
+  heading to jump to.  This setting corresponds directly to its
+  eponymous `ivy-read' keyword, as used by `counsel-outline', so
+  the type of the function's argument depends on the value
+  returned by `counsel-outline-candidates'.
+  Defaults to the function `counsel-outline-action'.
+
+- `:history' is a history list, usually a symbol representing a
+  history list variable.  It corresponds directly to its
+  eponymous `ivy-read' keyword, as used by `counsel-outline'.
+  Defaults to the symbol `counsel-outline-history'.
+
+- `:caller' is a symbol to uniquely identify the caller to
+  `ivy-read'.  It corresponds directly to its eponymous
+  `ivy-read' keyword, as used by `counsel-outline'.
+  Defaults to the symbol `counsel-outline'.
+
+- `:display-style' overrides the variable
+  `counsel-outline-display-style'.
+
+- `:path-separator' overrides the variable
+  `counsel-outline-path-separator'.
+
+- `:face-style' overrides the variable
+  `counsel-outline-face-style'.
+
+- `:custom-faces' overrides the variable
+  `counsel-outline-custom-faces'.")
+
+;;;###autoload
+(defun counsel-org-goto-all ()
+  "Go to a different location in any org file."
+  (interactive)
+  (let (entries)
+    (dolist (b (buffer-list))
+      (with-current-buffer b
+        (when (derived-mode-p 'org-mode)
+          (setq entries
+                (nconc entries
+                       (counsel-outline-candidates
+                        (cdr (assq 'org-mode counsel-outline-settings))
+                        (counsel-org-goto-all--outline-path-prefix)))))))
+    (ivy-read "Goto: " entries
+              :history 'counsel-org-goto-history
+              :action #'counsel-org-goto-action
+              :caller 'counsel-org-goto-all)))
+
+(defun counsel-org-goto-action (x)
+  "Go to headline in candidate X."
+  (org-goto-marker-or-bmk (cdr x)))
+
+(defun counsel--org-get-heading-args ()
+  "Return list of arguments for `org-get-heading'.
+Try to return the right number of arguments for the current Org
+version.  Argument values are based on the
+`counsel-org-headline-display-*' user options."
+  (nbutlast (mapcar #'not (list counsel-org-headline-display-tags
+                                counsel-org-headline-display-todo
+                                counsel-org-headline-display-priority
+                                counsel-org-headline-display-comment))
+            ;; Added in Emacs 26.1.
+            (if (if (fboundp 'func-arity)
+                    (< (cdr (func-arity #'org-get-heading)) 3)
+                  (version< org-version "9.1.1"))
+                2 0)))
+
+;;;; `counsel-org-file'
+
+(declare-function org-attach-dir "org-attach")
+(declare-function org-attach-file-list "org-attach")
+(defvar org-attach-directory)
+
+(defun counsel-org-files ()
+  "Return list of all files under current Org attachment directories.
+Filenames returned are relative to `default-directory'.  For each
+attachment directory associated with the current buffer, all
+contained files are listed, so the return value could conceivably
+include attachments of other Org buffers."
+  (require 'org-attach)
+  (let (dirs)
+    (save-excursion
+      (goto-char (point-min))
+      (while (re-search-forward ":\\(?:ATTACH_DIR\\|ID\\):[\t ]+.*$" nil t)
+        (let ((dir (org-attach-dir)))
+          (when dir
+            (push dir dirs)))))
+    (cl-mapcan
+     (lambda (dir)
+       (mapcar (lambda (file)
+                 (file-relative-name (expand-file-name file dir)))
+               (org-attach-file-list dir)))
+     (nreverse dirs))))
+
+;;;###autoload
+(defun counsel-org-file ()
+  "Browse all attachments for current Org file."
+  (interactive)
+  (ivy-read "file: " (counsel-org-files)
+            :action #'counsel-locate-action-dired
+            :caller 'counsel-org-file))
+
+;;;; `counsel-org-entity'
+
+;;;###autoload
+(defun counsel-org-entity ()
+  "Complete Org entities using Ivy."
+  (interactive)
+  (require 'org)
+  (defvar org-entities)
+  (defvar org-entities-user)
+  (ivy-read "Entity: "
+            (cl-loop for element in (append org-entities org-entities-user)
+                     when (consp element)
+                     collect (cons
+                              (format "%20s | %20s | %20s | %s"
+                                      (nth 0 element)  ; Name.
+                                      (nth 1 element)  ; LaTeX.
+                                      (nth 3 element)  ; HTML.
+                                      (nth 6 element)) ; UTF-8.
+                              element))
+            :require-match t
+            :action `(1
+                      ("u" ,(lambda (candidate)
+                              (insert (nth 6 (cdr candidate))))
+                       "UTF-8")
+                      ("o" ,(lambda (candidate)
+                              (insert "\\" (nth 0 (cdr candidate))))
+                       "Org entity")
+                      ("l" ,(lambda (candidate)
+                              (insert (nth 1 (cdr candidate))))
+                       "LaTeX")
+                      ("h" ,(lambda (candidate)
+                              (insert (nth 3 (cdr candidate))))
+                       "HTML")
+                      ("a" ,(lambda (candidate)
+                              (insert (nth 4 (cdr candidate))))
+                       "ASCII")
+                      ("L" ,(lambda (candidate)
+                              (insert (nth 5 (cdr candidate))))
+                       "Latin-1"))))
+
+;;;; `counsel-org-capture'
+
+(defvar org-capture-templates)
+(defvar org-capture-templates-contexts)
+(declare-function org-contextualize-keys "org")
+(declare-function org-capture-goto-last-stored "org-capture")
+(declare-function org-capture-goto-target "org-capture")
+(declare-function org-capture-upgrade-templates "org-capture")
+
+;;;###autoload
+(defun counsel-org-capture ()
+  "Capture something."
+  (interactive)
+  (require 'org-capture)
+  (ivy-read "Capture template: "
+            ;; We build the list of capture templates as in `org-capture-select-template':
+            (let (prefixes)
+              (cl-mapcan
+               (lambda (x)
+                 (let ((x-keys (car x)))
+                   ;; Remove prefixed keys until we get one that matches the current item.
+                   (while (and prefixes
+                               (let ((p1-keys (caar prefixes)))
+                                 (or
+                                  (<= (length x-keys) (length p1-keys))
+                                  (not (string-prefix-p p1-keys x-keys)))))
+                     (pop prefixes))
+                   (if (> (length x) 2)
+                       (let ((desc (mapconcat #'cadr (reverse (cons x prefixes)) " | ")))
+                         (list (format "%-5s %s" x-keys desc)))
+                     (push x prefixes)
+                     nil)))
+               (or (org-contextualize-keys
+                    (org-capture-upgrade-templates org-capture-templates)
+                    org-capture-templates-contexts)
+                   '(("t" "Task" entry (file+headline "" "Tasks")
+                      "* TODO %?\n  %u\n  %a")))))
+            :require-match t
+            :action (lambda (x)
+                      (org-capture nil (car (split-string x))))
+            :caller 'counsel-org-capture))
+
+(ivy-configure 'counsel-org-capture
+  :initial-input "^")
+
+(ivy-set-actions
+ 'counsel-org-capture
+ `(("t" ,(lambda (x)
+           (org-capture-goto-target (car (split-string x))))
+        "go to target")
+   ("l" ,(lambda (_x)
+           (org-capture-goto-last-stored))
+        "go to last stored")
+   ("p" ,(lambda (x)
+           (org-capture 0 (car (split-string x))))
+        "insert template at point")
+   ("c" ,(lambda (_x)
+           (customize-variable 'org-capture-templates))
+        "customize org-capture-templates")))
+
+;;;; `counsel-org-agenda-headlines'
+
+(defvar org-odd-levels-only)
+(declare-function org-map-entries "org")
+(declare-function org-heading-components "org")
+
+(defun counsel-org-agenda-headlines-action-goto (headline)
+  "Go to the `org-mode' agenda HEADLINE."
+  (find-file (nth 1 headline))
+  (if (fboundp 'org-cycle-set-startup-visibility)
+      (org-cycle-set-startup-visibility)
+    ;; Obsolete alias since Org 9.6 / Emacs 29.
+    (with-no-warnings
+      (org-set-startup-visibility)))
+  (goto-char (nth 2 headline))
+  (if (fboundp 'org-fold-show-entry)
+      (org-fold-show-entry)
+    ;; Obsolete alias since Org 9.6 / Emacs 29.
+    (with-no-warnings
+      (org-show-entry))))
+
+(ivy-set-actions
+ 'counsel-org-agenda-headlines
+ '(("g" counsel-org-agenda-headlines-action-goto "goto headline")))
+
+(defvar counsel-org-agenda-headlines-history nil
+  "History for `counsel-org-agenda-headlines'.")
+
+(defcustom counsel-outline-display-style 'path
+  "The style used when displaying matched outline headings.
+
+If `headline', the title is displayed with leading stars
+indicating the outline level.
+
+If `path', the path hierarchy is displayed.  For each entry the
+title is shown.  Entries are separated with
+`counsel-outline-path-separator'.
+
+If `title' or any other value, only the title of the heading is
+displayed.
+
+For displaying tags and TODO keywords in `org-mode' buffers, see
+`counsel-org-headline-display-tags' and
+`counsel-org-headline-display-todo', respectively."
+  :type '(choice
+          (const :tag "Title only" title)
+          (const :tag "Headline" headline)
+          (const :tag "Path" path)))
+
+(defcustom counsel-outline-path-separator "/"
+  "String separating path entries in matched outline headings.
+This variable has no effect unless
+`counsel-outline-display-style' is set to `path'."
+  :type 'string)
+
+(declare-function org-get-outline-path "org")
+
+(defun counsel-org-agenda-headlines--candidates ()
+  "Return a list of completion candidates for `counsel-org-agenda-headlines'."
+  (org-map-entries
+   (lambda ()
+     (let* ((components (org-heading-components))
+            (level (and (eq counsel-outline-display-style 'headline)
+                        (make-string
+                         (if org-odd-levels-only
+                             (nth 1 components)
+                           (nth 0 components))
+                         ?*)))
+            (todo (and counsel-org-headline-display-todo
+                       (nth 2 components)))
+            (path (and (eq counsel-outline-display-style 'path)
+                       (org-get-outline-path)))
+            (priority (and counsel-org-headline-display-priority
+                           (nth 3 components)))
+            (text (nth 4 components))
+            (tags (and counsel-org-headline-display-tags
+                       (nth 5 components))))
+       (list (string-join
+              (delq nil (list level
+                              todo
+                              (and priority (format "[#%c]" priority))
+                              (string-join (append path (list text))
+                                           counsel-outline-path-separator)
+                              tags))
+              " ")
+             buffer-file-name
+             (point))))
+   nil
+   'agenda))
+
+;;;###autoload
+(defun counsel-org-agenda-headlines ()
+  "Choose from headers of `org-mode' files in the agenda."
+  (interactive)
+  (require 'org)
+  (let ((minibuffer-allow-text-properties t))
+    (ivy-read "Org headline: "
+              (counsel-org-agenda-headlines--candidates)
+              :action #'counsel-org-agenda-headlines-action-goto
+              :history 'counsel-org-agenda-headlines-history
+              :caller 'counsel-org-agenda-headlines)))
+
+;;;; `counsel-org-link'
+
+;; Moved from `org' to `ol' in Emacs 27.
+(declare-function org-insert-link "ol")
+(declare-function org-id-get-create "org-id")
+
+(defun counsel-org-link-action (x)
+  "Insert a link to X."
+  (let ((id (save-excursion
+              (goto-char (cdr x))
+              (org-id-get-create))))
+    (org-insert-link nil (concat "id:" id) (car x))))
+
+;;;###autoload
+(defun counsel-org-link ()
+  "Insert a link to an headline with completion."
+  (interactive)
+  (ivy-read "Link: " (counsel-outline-candidates
+                      '(:outline-title counsel-outline-title-org ))
+            :action #'counsel-org-link-action
+            :history 'counsel-org-link-history
+            :caller 'counsel-org-link))
+
+;;; Misc. Emacs
+;;;; `counsel-mark-ring'
+
+(defface counsel--mark-ring-highlight
+  '((t :inherit highlight))
+  "Face for current `counsel-mark-ring' line."
+  :group 'ivy-faces)
+
+(defvar counsel--mark-ring-overlay nil
+  "Internal overlay to highlight line by candidate of `counsel-mark-ring'.")
+
+(defun counsel--mark-ring-add-highlight ()
+  "Add highlight to current line."
+  (setq counsel--mark-ring-overlay
+        (make-overlay (line-beginning-position) (1+ (line-end-position))))
+  (with-ivy-window
+    (overlay-put counsel--mark-ring-overlay 'face
+                 'counsel--mark-ring-highlight)))
+
+(defun counsel--mark-ring-delete-highlight ()
+  "If `counsel-mark-ring' have highlight, delete highlight."
+  (if counsel--mark-ring-overlay (delete-overlay counsel--mark-ring-overlay)))
+
+(defvar counsel--mark-ring-calling-point 0
+  "Internal variable to remember calling position.")
+
+(defun counsel--mark-ring-unwind ()
+  "Return back to calling position of `counsel-mark-ring'."
+  (goto-char counsel--mark-ring-calling-point)
+  (counsel--mark-ring-delete-highlight))
+
+(defun counsel--mark-ring-update-fn ()
+  "Show preview by candidate."
+  (let ((pos (get-text-property 0 'point (ivy-state-current ivy-last))))
+    (counsel--mark-ring-delete-highlight)
+    (with-ivy-window
+      (goto-char pos)
+      (counsel--mark-ring-add-highlight))))
+
+;;;###autoload
+(defun counsel-mark-ring ()
+  "Browse `mark-ring' interactively.
+Obeys `widen-automatically', which see."
+  (interactive)
+  (let* ((counsel--mark-ring-calling-point (point))
+         (marks (copy-sequence mark-ring))
+         (marks (delete-dups marks))
+         (marks
+          ;; mark-marker is empty?
+          (if (equal (mark-marker) (make-marker))
+              marks
+            (cons (copy-marker (mark-marker)) marks)))
+         (candidates (counsel-mark--get-candidates marks)))
+    (if candidates
+        (counsel-mark--ivy-read "Mark: " candidates 'counsel-mark-ring)
+      (message "Mark ring is empty"))))
+
+(defun counsel-mark--get-candidates (marks)
+  "Convert a list of MARKS into mark candidates.
+candidates are simply strings formatted to have the line number of the
+associated mark prepended to them and having an extra text property of
+point to indicarte where the candidate mark is."
+  (when marks
+    (save-excursion
+      (save-restriction
+        ;; Widen, both to save `line-number-at-pos' the trouble
+        ;; and for `buffer-substring' to work.
+        (widen)
+        (let* ((width (length (number-to-string (line-number-at-pos (point-max)))))
+               (fmt (format "%%%dd %%s" width)))
+          (mapcar (lambda (mark)
+                    (goto-char (marker-position mark))
+                    (let ((linum (line-number-at-pos))
+                          (line  (buffer-substring
+                                  (line-beginning-position) (line-end-position))))
+                      (propertize (format fmt linum line) 'point (point))))
+                  marks))))))
+
+(defun counsel-mark--ivy-read (prompt candidates caller)
+  "Call `ivy-read' with sane defaults for traversing marks.
+CANDIDATES should be an alist with the `car' of the list being
+the completion candidate string and the `cdr' being the point that
+mark should take you to.
+
+This subroutine is intended to be used by both `counsel-mark-ring' and
+`counsel-evil-marks'."
+  (ivy-read prompt candidates
+            :require-match t
+            :update-fn #'counsel--mark-ring-update-fn
+            :action (lambda (cand)
+                      (let ((pos (get-text-property 0 'point cand)))
+                        (when pos
+                          (unless (<= (point-min) pos (point-max))
+                            (if widen-automatically
+                                (widen)
+                              (error "\
+Position of selected mark outside accessible part of buffer")))
+                          (goto-char pos))))
+            :unwind #'counsel--mark-ring-unwind
+            :caller caller))
+
+(ivy-configure 'counsel-mark-ring
+  :update-fn #'counsel--mark-ring-update-fn
+  :unwind-fn #'counsel--mark-ring-unwind
+  :sort-fn #'ivy-string<)
+
+;;;; `counsel-evil-marks'
+
+(defvar counsel-evil-marks-exclude-registers nil
+  "List of evil registers to not display in `counsel-evil-marks' by default.
+Each member of the list should be a character (stored as an integer).")
+
+(defvar evil-markers-alist)
+(declare-function evil-global-marker-p "ext:evil-common")
+
+(defun counsel-mark--get-evil-candidates (all-markers-p)
+  "Convert all evil MARKS in the current buffer to mark candidates.
+Works like `counsel-mark--get-candidates' but also prepends the
+register tied to a mark in the message string."
+  ;; evil doesn't provide a standalone method to access the list of
+  ;; marks in the current buffer, as it does with registers.
+  (let* ((all-markers
+          (append
+           (cl-remove-if (lambda (m)
+                           (or (evil-global-marker-p (car m))
+                               (not (markerp (cdr m)))))
+                         evil-markers-alist)
+           (cl-remove-if (lambda (m)
+                           (or (not (evil-global-marker-p (car m)))
+                               (not (markerp (cdr m)))))
+                         (default-value 'evil-markers-alist))))
+
+         (all-markers
+          ;; with prefix, ignore register exclusion list.
+          (if all-markers-p
+              all-markers
+            (cl-remove-if
+             (lambda (x) (member (car x) counsel-evil-marks-exclude-registers))
+             all-markers)))
+         ;; separate the markers from the evil registers
+         ;; for call to `counsel-mark--get-candidates'
+         (registers (mapcar #'car all-markers))
+         (markers (mapcar #'cdr all-markers))
+         (candidates (counsel-mark--get-candidates markers)))
+    (when candidates
+      (let (register candidate result)
+        (while (and (setq register (pop registers))
+                    (setq candidate (pop candidates)))
+          (let ((point (get-text-property 0 'point candidate))
+                (evil-candidate
+                 (format "[%s]: %s"
+                         (propertize (char-to-string register)
+                                     'face 'counsel-evil-register-face)
+                         candidate)))
+            (push (propertize evil-candidate 'point point) result)))
+        result))))
+
+;;;###autoload
+(defun counsel-evil-marks (&optional arg)
+  "Ivy replacement for `evil-show-marks'.
+By default, this function respects `counsel-evil-marks-exclude-registers'.
+When ARG is non-nil, display all active evil registers."
+  (interactive "P")
+  (if (and (boundp 'evil-markers-alist)
+           (fboundp 'evil-global-marker-p))
+      (let* ((counsel--mark-ring-calling-point (point))
+             (candidates (counsel-mark--get-evil-candidates arg)))
+        (if candidates
+            (counsel-mark--ivy-read "Evil mark: " candidates 'counsel-evil-marks)
+          (message "No evil marks are active")))
+    (user-error "Required feature `evil' not installed or loaded")))
+
+;;;; `counsel-package'
+
+(defvar package--initialized)
+(defvar package-alist)
+(defvar package-archive-contents)
+(defvar package-archives)
+(defvar package-user-dir)
+(declare-function package-installed-p "package")
+(declare-function package-delete "package")
+(declare-function package-desc-extras "package" t t)
+
+(defvar counsel-package-history nil
+  "History for `counsel-package'.")
+
+(defun counsel--package-candidates ()
+  "Return completion alist for `counsel-package'."
+  (unless package--initialized
+    (package-initialize t))
+  (when (or (null package-archive-contents)
+            (cl-some (lambda (archive)
+                       (let* ((fname (format "archives/%s/archive-contents"
+                                             (car archive)))
+                              (fname (expand-file-name fname package-user-dir)))
+                         (counsel-file-stale-p fname (* 4 60 60))))
+                     package-archives))
+    (package-refresh-contents))
+  (sort (mapcar (lambda (entry)
+                  (cons (let ((pkg (car entry)))
+                          (concat (if (package-installed-p pkg) "-" "+")
+                                  (symbol-name pkg)))
+                        entry))
+                package-archive-contents)
+        #'counsel--package-sort))
+
+;;;###autoload
+(defun counsel-package ()
+  "Install or delete packages.
+
+Packages not currently installed are prefixed with \"+\", and
+selecting one of these will try to install it.
+Packages currently installed are prefixed with \"-\", and
+selecting one of these will try to delete it.
+
+Additional actions:\\<ivy-minibuffer-map>
+
+  \\[ivy-dispatching-done] d: Describe package
+  \\[ivy-dispatching-done] h: Visit package's homepage"
+  (interactive)
+  (require 'package)
+  (ivy-read "Packages (install +pkg or delete -pkg): "
+            (counsel--package-candidates)
+            :action #'counsel-package-action
+            :require-match t
+            :history 'counsel-package-history
+            :caller 'counsel-package))
+
+(ivy-configure 'counsel-package
+  :initial-input "^+")
+
+(defun counsel-package-action (package)
+  "Delete or install PACKAGE."
+  (setq package (cadr package))
+  (if (package-installed-p package)
+      (package-delete (cadr (assq package package-alist)))
+    (package-install package)))
+
+(defun counsel-package-action-describe (package)
+  "Call `describe-package' on PACKAGE."
+  (describe-package (cadr package)))
+
+(defun counsel-package-action-homepage (package)
+  "Open homepage for PACKAGE in a WWW browser."
+  (let ((url (cdr (assq :url (package-desc-extras (nth 2 package))))))
+    (if url
+        (browse-url url)
+      (message "No homepage specified for package `%s'" (nth 1 package)))))
+
+(defun counsel--package-sort (a b)
+  "Sort function for `counsel-package' candidates."
+  (let* ((a (car a))
+         (b (car b))
+         (a-inst (= (string-to-char a) ?+))
+         (b-inst (= (string-to-char b) ?+)))
+    (or (and a-inst (not b-inst))
+        (and (eq a-inst b-inst) (string-lessp a b)))))
+
+(ivy-set-actions
+ 'counsel-package
+ '(("d" counsel-package-action-describe "describe package")
+   ("h" counsel-package-action-homepage "open package homepage")))
+
+;;;; `counsel-tmm'
+
+(declare-function tmm-get-keymap "tmm" (elt &optional in-x-menu))
+
+(defalias 'counsel--menu-keymap
+  ;; Added in Emacs 28.1.
+  (if (fboundp 'menu-bar-keymap)
+      #'menu-bar-keymap
+    ;; Removed in Emacs 28.1.
+    (declare-function tmm-get-keybind "tmm" (keyseq) t)
+    (lambda () (tmm-get-keybind [menu-bar])))
+  "Compatibility shim for `menu-bar-keymap'.")
+
+(defun counsel-tmm-prompt (menu)
+  "Select and call an item from the MENU keymap."
+  (defvar tmm-km-list)
+  (let (out
+        choice
+        chosen-string)
+    (setq tmm-km-list nil)
+    (map-keymap (lambda (k v) (tmm-get-keymap (cons k v))) menu)
+    (let ((items (setq tmm-km-list (nreverse tmm-km-list))))
+      (setq out (ivy-read "Menu bar: "
+                          ;; From `tmm--completion-table', removed in Emacs 31.
+                          (lambda (str pred action)
+                            (if (eq action 'metadata)
+                                '(metadata (display-sort-function . identity))
+                              (complete-with-action action items str pred)))
+                          :require-match t)))
+    (setq choice (cdr (assoc out tmm-km-list)))
+    (setq chosen-string (car choice))
+    (setq choice (cdr choice))
+    (cond ((keymapp choice)
+           (counsel-tmm-prompt choice))
+          ((and choice chosen-string)
+           (setq last-command-event chosen-string)
+           (call-interactively choice)))))
+
+;;;###autoload
+(defun counsel-tmm ()
+  "Text-mode emulation of looking and choosing from a menu bar."
+  (interactive)
+  (require 'tmm)
+  (defvar tmm-table-undef)
+  (run-hooks 'menu-bar-update-hook)
+  (setq tmm-table-undef nil)
+  (counsel-tmm-prompt (counsel--menu-keymap)))
+
+;;;; `counsel-yank-pop'
+
+(defcustom counsel-yank-pop-truncate-radius 2
+  "Number of context lines around `counsel-yank-pop' candidates."
+  :type 'integer)
+
+(defun counsel--yank-pop-truncate (str)
+  "Truncate STR for use in `counsel-yank-pop'."
+  (condition-case nil
+      (let* ((lines (split-string str "\n" t))
+             (n (length lines))
+             (re (ivy-re-to-str ivy--old-re))
+             (first-match (cl-position-if
+                           (lambda (s) (string-match re s))
+                           lines))
+             (beg (max 0 (- first-match
+                            counsel-yank-pop-truncate-radius)))
+             (end (min n (+ first-match
+                            counsel-yank-pop-truncate-radius
+                            1)))
+             (seq (cl-subseq lines beg end)))
+        (if (null first-match)
+            (error "Could not match %s" str)
+          (when (> beg 0)
+            (setcar seq (concat "[...] " (car seq))))
+          (when (< end n)
+            (setcar (last seq)
+                    (concat (car (last seq)) " [...]")))
+          (mapconcat #'identity seq "\n")))
+    (error str)))
+
+(defcustom counsel-yank-pop-separator "\n"
+  "Separator for the kill ring strings in `counsel-yank-pop'."
+  :type '(choice
+          (const :tag "Plain" "\n")
+          (const :tag "Dashes" "\n----\n")
+          string))
+
+(defun counsel--yank-pop-format-function (cand-pairs)
+  "Transform CAND-PAIRS into a string for `counsel-yank-pop'."
+  (ivy--format-function-generic
+   (lambda (str)
+     (mapconcat
+      (lambda (s)
+        (ivy--add-face s 'ivy-current-match))
+      (split-string
+       (counsel--yank-pop-truncate str) "\n" t)
+      "\n"))
+   (lambda (str)
+     (counsel--yank-pop-truncate str))
+   cand-pairs
+   (propertize counsel-yank-pop-separator 'face 'ivy-separator)))
+
+;; Macro to leverage `compiler-macro' of `cl-member' in Emacs >= 24.
+(defmacro counsel--idx-of (elt list test)
+  "Return index of ELT in LIST, comparing with TEST.
+Typically faster than `cl-position' using `equal' on large LIST."
+  ;; No `macroexp-let2*' before Emacs 25.
+  (macroexp-let2 nil elt elt
+    (macroexp-let2 nil list list
+      (macroexp-let2 nil tail `(cl-member ,elt ,list :test ,test)
+        `(and ,tail (- (length ,list) (length ,tail)))))))
+
+(defun counsel--yank-pop-position (s)
+  "Return position of S in `kill-ring' relative to last yank."
+  (or (counsel--idx-of s kill-ring-yank-pointer #'equal-including-properties)
+      (counsel--idx-of s kill-ring-yank-pointer #'equal)
+      (+ (or (counsel--idx-of s kill-ring #'equal-including-properties)
+             (counsel--idx-of s kill-ring #'equal))
+         (- (length kill-ring-yank-pointer)
+            (length kill-ring)))))
+
+(defun counsel-string-non-blank-p (s)
+  "Return non-nil if S includes non-blank characters.
+Newlines and carriage returns are considered blank."
+  (string-match-p "[^\n\r[:blank:]]" s))
+
+(defcustom counsel-yank-pop-filter #'counsel-string-non-blank-p
+  "Unary filter function applied to `counsel-yank-pop' candidates.
+All elements of `kill-ring' for which this function returns nil
+will be destructively removed from `kill-ring' before completion.
+All blank strings are deleted from `kill-ring' by default."
+  :type '(radio
+          (function-item counsel-string-non-blank-p)
+          (function-item identity) ;; Faster than the newer `always'.
+          (function :tag "Other")))
+
+(defun counsel--equal-w-props ()
+  "Return a `hash-table-test' using `equal-including-properties'.
+If not available, return nil."
+  ;; Added in Emacs 28.
+  (when (fboundp 'sxhash-equal-including-properties)
+    (let ((name 'counsel--equal-w-props))
+      ;; Define the test only once.
+      (unless (get name 'hash-table-test)
+        (define-hash-table-test name #'equal-including-properties
+                                #'sxhash-equal-including-properties))
+      name)))
+
+(defun counsel--yank-pop-filter (kills)
+  "Apply `counsel-yank-pop-filter' to and deduplicate KILLS.
+Equality is defined by `equal-including-properties' for some consistency
+with `kill-do-not-save-duplicates' (which is otherwise ignored).  This
+function tries to be faster than `cl-delete-duplicates' when possible."
+  (let* ((pred counsel-yank-pop-filter)
+         (len (length kills))
+         ;; Same threshold as `delete-dups'.
+         (test (and (> len 100) (counsel--equal-w-props))))
+    (if (not test) ;; Slow fallback.
+        (cl-delete-duplicates (cl-delete-if-not pred kills)
+                              :test #'equal-including-properties
+                              :from-end t)
+      ;; The rest is `delete-dups' combined with `delete' in a single pass.
+      ;; Find first (or no) element that passes through filter.
+      (while (unless (funcall pred (car kills))
+               (cl-decf len)
+               (setq kills (cdr kills))))
+      (let ((ht (make-hash-table :test test :size len))
+            (tail kills)
+            retail)
+        ;; Mark it and continue with the rest.
+        (puthash (car tail) t ht)
+        (while (setq retail (cdr tail))
+          (let ((elt (car retail)))
+            (if (or (gethash elt ht)
+                    (not (funcall pred elt)))
+                (setcdr tail (cdr retail))
+              (puthash elt t ht)
+              (setq tail retail)))))
+      kills)))
+
+(defun counsel--yank-pop-kills ()
+  "Return filtered `kill-ring' for `counsel-yank-pop' completion.
+Both `kill-ring' and `kill-ring-yank-pointer' may be
+destructively modified to eliminate duplicates under
+`equal-including-properties', satisfy `counsel-yank-pop-filter',
+and incorporate `interprogram-paste-function'."
+  ;; Protect against `kill-ring' and result of
+  ;; `interprogram-paste-function' both being nil
+  (ignore-errors (current-kill 0))
+  ;; Keep things consistent with the rest of Emacs
+  (prog1 (setq kill-ring (counsel--yank-pop-filter kill-ring))
+    (setq kill-ring-yank-pointer
+          (counsel--yank-pop-filter kill-ring-yank-pointer))))
+
+(defcustom counsel-yank-pop-after-point nil
+  "Whether `counsel-yank-pop' yanks after point.
+Nil means `counsel-yank-pop' puts point at the end of the yanked
+text and mark at its beginning, as per the default \\[yank].
+Non-nil means `counsel-yank-pop' swaps the resulting point and
+mark, as per \\[universal-argument] \\[yank]."
+  :type 'boolean)
+
+(defun counsel-yank-pop-action (s)
+  "Like `yank-pop', but insert the kill corresponding to S.
+Signal a `buffer-read-only' error if called from a read-only
+buffer position."
+  (when (and (eq major-mode 'vterm-mode)
+             (fboundp 'vterm-insert))
+    (let ((inhibit-read-only t))
+      (vterm-insert s)))
+  (barf-if-buffer-read-only)
+  (setq yank-window-start (window-start))
+  (unless (eq last-command 'yank)
+    ;; Avoid unexpected deletions with `yank-handler' properties.
+    (setq yank-undo-function nil))
+  (condition-case nil
+      (let (;; Deceive `yank-pop'.
+            (last-command 'yank)
+            ;; Avoid unexpected additions to `kill-ring'.
+            interprogram-paste-function)
+        (yank-pop (counsel--yank-pop-position s)))
+    (error
+     ;; Support strings not present in the kill ring.
+     (insert s)))
+  (when (funcall (if counsel-yank-pop-after-point #'> #'<)
+                 (point) (mark t))
+    (exchange-point-and-mark t)))
+
+(defun counsel-yank-pop-action-remove (s)
+  "Remove all occurrences of S from the kill ring."
+  (setq kill-ring
+        (cl-delete s kill-ring :test #'equal-including-properties))
+  (setq kill-ring-yank-pointer
+        (cl-delete s kill-ring-yank-pointer :test #'equal-including-properties))
+  ;; Update collection and preselect for next `ivy-call'
+  (setf (ivy-state-collection ivy-last) kill-ring)
+  (setf (ivy-state-preselect ivy-last)
+        (nth (min ivy--index (1- (length kill-ring)))
+             kill-ring))
+  (ivy--reset-state ivy-last))
+
+(defun counsel-yank-pop-action-rotate (s)
+  "Rotate the yanking point to S in the kill ring.
+See `current-kill' for how this interacts with the window system
+selection."
+  (let ((i (counsel--yank-pop-position s)))
+    ;; Avoid unexpected additions to `kill-ring'
+    (let (interprogram-paste-function)
+      (setf (ivy-state-preselect ivy-last) (current-kill i)))
+    ;; Manually change window system selection because `current-kill' won't
+    (when (and (zerop i)
+               yank-pop-change-selection
+               interprogram-cut-function)
+      (funcall interprogram-cut-function (car kill-ring-yank-pointer))))
+  (ivy--reset-state ivy-last))
+
+(defcustom counsel-yank-pop-preselect-last nil
+  "Whether `counsel-yank-pop' preselects the last kill by default.
+
+The command `counsel-yank-pop' always preselects the same kill
+that `yank-pop' would have inserted, given the same prefix
+argument.
+
+When `counsel-yank-pop-preselect-last' is nil (the default), the
+prefix argument of `counsel-yank-pop' defaults to 1 (as per
+`yank-pop'), which causes the next-to-last kill to be
+preselected.  Otherwise, the prefix argument defaults to 0, which
+results in the most recent kill being preselected."
+  :type 'boolean)
+
+;;;###autoload
+(defun counsel-yank-pop (&optional arg)
+  "Ivy replacement for `yank-pop'.
+With a plain prefix argument (\\[universal-argument]),
+temporarily toggle the value of `counsel-yank-pop-after-point'.
+Any other value of ARG has the same meaning as in `yank-pop', but
+`counsel-yank-pop-preselect-last' determines its default value.
+See also `counsel-yank-pop-filter' for how to filter candidates.
+
+Note: Duplicate elements of `kill-ring' are always deleted."
+  ;; Do not specify `*' to allow browsing `kill-ring' in read-only buffers
+  (interactive "P")
+  (let ((kills (or (counsel--yank-pop-kills)
+                   (error "Kill ring is empty or blank")))
+        (preselect (let (interprogram-paste-function)
+                     (current-kill (cond ((nlistp arg)
+                                          (prefix-numeric-value arg))
+                                         (counsel-yank-pop-preselect-last 0)
+                                         (t 1))
+                                   t)))
+        (counsel-yank-pop-after-point
+         (xor (consp arg) counsel-yank-pop-after-point)))
+    (unless (eq last-command 'yank)
+      (push-mark))
+    (ivy-read "kill-ring: " kills
+              :require-match t
+              :preselect preselect
+              :action #'counsel-yank-pop-action
+              :caller 'counsel-yank-pop)))
+
+(function-put #'counsel-yank-pop 'delete-selection 'yank)
+
+(ivy-configure 'counsel-yank-pop
+  :height 5
+  :format-fn #'counsel--yank-pop-format-function)
+
+(ivy-set-actions
+ 'counsel-yank-pop
+ '(("d" counsel-yank-pop-action-remove "delete")
+   ("r" counsel-yank-pop-action-rotate "rotate")))
+
+;;;; `counsel-register'
+
+(defvar counsel-register-actions
+  '(("\\`buffer" . jump-to-register)
+    ("\\`text" . insert-register)
+    ("\\`rectangle" . insert-register)
+    ("\\`window" . jump-to-register)
+    ("\\`frame" . jump-to-register)
+    ("\\`[-+]?[0-9]+\\(?:\\.[0-9]\\)?\\'" . insert-register)
+    ("\\`\\(?:the \\)?file " . jump-to-register)
+    ("\\`keyboard" . jump-to-register)
+    ("\\`file-query" . jump-to-register))
+  "Alist of (REGEXP . FUNCTION) pairs for `counsel-register'.
+Selecting a register whose description matches REGEXP specifies
+FUNCTION as the action to take on the register.")
+
+(defvar counsel-register-history nil
+  "History for `counsel-register'.")
+
+(defun counsel-register-action (register)
+  "Default action for `counsel-register'.
+
+Call a function on REGISTER.  The function is determined by
+matching the register's value description against a regexp in
+`counsel-register-actions'."
+  (let* ((val (get-text-property 0 'register register))
+         (desc (register-describe-oneline val))
+         (action (cdr (cl-assoc-if (lambda (re) (string-match-p re desc))
+                                   counsel-register-actions))))
+    (if action
+        (funcall action val)
+      (error "No action was found for register %s"
+             (single-key-description val)))))
+
+;;;###autoload
+(defun counsel-register ()
+  "Interactively choose a register."
+  (interactive)
+  (ivy-read "Register: "
+            (cl-mapcan
+             (lambda (reg)
+               (let ((s (funcall register-preview-function reg)))
+                 (setq s (substring s 0 (string-match-p "[ \t\n\r]+\\'" s)))
+                 (unless (string= s "")
+                   (put-text-property 0 1 'register (car reg) s)
+                   (list s))))
+             register-alist)
+            :require-match t
+            :history 'counsel-register-history
+            :action #'counsel-register-action
+            :caller 'counsel-register))
+
+(ivy-configure 'counsel-register
+  :sort-fn #'ivy-string<)
+
+;;;; `counsel-evil-registers'
+
+(defface counsel-evil-register-face
+  '((t :inherit counsel-outline-1))
+  "Face for highlighting `evil' registers in ivy."
+  :group 'ivy-faces)
+
+;;;###autoload
+(defun counsel-evil-registers ()
+  "Ivy replacement for `evil-show-registers'."
+  (interactive)
+  (if (fboundp 'evil-register-list)
+      (ivy-read "evil-registers: "
+                (cl-loop for (key . val) in (evil-register-list)
+                   collect (format "[%s]: %s"
+                                   (propertize (char-to-string key)
+                                               'face 'counsel-evil-register-face)
+                                   (if (stringp val) val "")))
+                :require-match t
+                :action #'counsel-evil-registers-action
+                :caller 'counsel-evil-registers)
+    (user-error "Required feature `evil' not installed")))
+
+(ivy-configure 'counsel-evil-registers
+  :height 5
+  :format-fn #'counsel--yank-pop-format-function)
+
+(defun counsel-evil-registers-action (s)
+  "Paste contents of S, trimming the register part.
+
+S will be of the form \"[register]: content\"."
+  (with-ivy-window
+    (insert
+     (replace-regexp-in-string "\\`\\[.*?]: " "" s t t))))
+
+;;;; `counsel-imenu'
+
+(declare-function imenu--subalist-p "imenu")
+(declare-function imenu--make-index-alist "imenu")
+
+(defun counsel--imenu-candidates ()
+  (require 'imenu)
+  (defvar imenu-auto-rescan)
+  (defvar imenu-auto-rescan-maxout)
+  (let* ((imenu-auto-rescan t)
+         (imenu-auto-rescan-maxout (if current-prefix-arg
+                                       (buffer-size)
+                                     imenu-auto-rescan-maxout))
+         (items (imenu--make-index-alist t))
+         (items (delete (assoc "*Rescan*" items) items))
+         (items (cond ((eq major-mode 'emacs-lisp-mode)
+                       (counsel-imenu-categorize-functions items))
+                      ((and (derived-mode-p 'python-mode)
+                            (fboundp 'python-imenu-create-flat-index))
+                       (python-imenu-create-flat-index))
+                      (t
+                       items))))
+    (counsel-imenu-get-candidates-from items)))
+
+(defun counsel-imenu-get-candidates-from (alist &optional prefix)
+  "Create a list of (key . value) from ALIST.
+PREFIX is used to create the key."
+  (cl-mapcan
+   (lambda (elm)
+     (if (imenu--subalist-p elm)
+         (counsel-imenu-get-candidates-from
+          (cl-loop for (e . v) in (cdr elm) collect
+               (cons e (if (integerp v) (copy-marker v) v)))
+          ;; pass the prefix to next recursive call
+          (concat prefix (if prefix ".") (car elm)))
+       (let ((key (concat
+                   (when prefix
+                     (concat
+                      (propertize prefix 'face 'ivy-grep-info)
+                      ": "))
+                   (car elm))))
+         (list (cons key
+                     (cons key (if (overlayp (cdr elm))
+                                   (overlay-start (cdr elm))
+                                 (cdr elm))))))))
+   alist))
+
+(defvar counsel-imenu-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-l") #'ivy-call-and-recenter)
+    map))
+
+(defun counsel-imenu-categorize-functions (items)
+  "Categorize all the functions of imenu."
+  (let ((fns (cl-remove-if #'listp items :key #'cdr)))
+    (if fns
+        (append (cl-remove-if #'nlistp items :key #'cdr)
+                `(("Functions" ,@fns)))
+      items)))
+
+(defun counsel-imenu-action (x)
+  (imenu (cdr x)))
+
+(defvar counsel-imenu-history nil
+  "History for `counsel-imenu'.")
+
+;;;###autoload
+(defun counsel-imenu ()
+  "Jump to a buffer position indexed by imenu."
+  (interactive)
+  (ivy-read "imenu items: " (counsel--imenu-candidates)
+            :preselect (thing-at-point 'symbol)
+            :require-match t
+            :action #'counsel-imenu-action
+            :keymap counsel-imenu-map
+            :history 'counsel-imenu-history
+            :caller 'counsel-imenu))
+
+;;;; `counsel-list-processes'
+
+(defun counsel-list-processes-action-delete (x)
+  "Delete process X."
+  (delete-process x)
+  (setf (ivy-state-collection ivy-last)
+        (setq ivy--all-candidates
+              (delete x ivy--all-candidates))))
+
+(defun counsel-list-processes-action-switch (x)
+  "Switch to buffer of process X."
+  (let* ((proc (get-process x))
+         (buf (and proc (process-buffer proc))))
+    (if buf
+        (switch-to-buffer buf)
+      (message "Process %s doesn't have a buffer" x))))
+
+;;;###autoload
+(defun counsel-list-processes ()
+  "Offer completion for `process-list'.
+The default action deletes the selected process.
+An extra action allows to switch to the process buffer."
+  (interactive)
+  (with-temp-buffer
+    (list-processes--refresh))
+  (ivy-read "Process: " (mapcar #'process-name (process-list))
+            :require-match t
+            :action
+            '(1
+              ("o" counsel-list-processes-action-delete "kill")
+              ("s" counsel-list-processes-action-switch "switch"))
+            :caller 'counsel-list-processes))
+
+;;;; `counsel-ace-link'
+
+(defun counsel-ace-link ()
+  "Use Ivy completion for `ace-link'."
+  (interactive)
+  (let (collection action)
+    (cond ((eq major-mode 'Info-mode)
+           (setq collection 'ace-link--info-collect)
+           (setq action 'ace-link--info-action))
+          ((eq major-mode 'help-mode)
+           (setq collection 'ace-link--help-collect)
+           (setq action 'ace-link--help-action))
+          ((eq major-mode 'woman-mode)
+           (setq collection 'ace-link--woman-collect)
+           (setq action 'ace-link--woman-action))
+          ((eq major-mode 'eww-mode)
+           (setq collection 'ace-link--eww-collect)
+           (setq action 'ace-link--eww-action))
+          ((eq major-mode 'compilation-mode)
+           (setq collection 'ace-link--eww-collect)
+           (setq action 'ace-link--compilation-action))
+          ((eq major-mode 'org-mode)
+           (setq collection 'ace-link--org-collect)
+           (setq action 'ace-link--org-action)))
+    (if (null collection)
+        (error "%S is not supported" major-mode)
+      (ivy-read "Ace-Link: " (funcall collection)
+                :action (lambda (x) (funcall action (cdr x)))
+                :require-match t
+                :caller 'counsel-ace-link))))
+
+;;;; `counsel-minibuffer-history'
+
+;;;###autoload
+(defun counsel-minibuffer-history ()
+  "Browse minibuffer history."
+  (interactive)
+  (let ((enable-recursive-minibuffers t))
+    (ivy-read "History: " (ivy-history-contents minibuffer-history-variable)
+              :keymap ivy-reverse-i-search-map
+              :action (lambda (x)
+                        (delete-minibuffer-contents)
+                        (insert (substring-no-properties (car x))))
+              :caller 'counsel-minibuffer-history)))
+(ivy--no-M-x #'counsel-minibuffer-history '(minibuffer-mode) t)
+
+;;;; `counsel-esh-history'
+
+(defvar comint-input-ring-index)
+(defvar eshell-history-index)
+(defvar slime-repl-input-history-position)
+
+(defvar counsel-esh--index-last nil
+  "Index corresponding to last selection with `counsel-esh-history'.")
+
+(defvar counsel-shell-history--index-last nil
+  "Index corresponding to last selection with `counsel-shell-history'.")
+
+(defun counsel--browse-history-action (pair)
+  (let ((snd (cdr pair)))
+    (cl-case (ivy-state-caller ivy-last)
+      (counsel-esh-history
+       (setq eshell-history-index snd
+             counsel-esh--index-last snd))
+      (counsel-shell-history
+       (setq comint-input-ring-index snd
+             counsel-shell-history--index-last snd))
+      ;; Leave this as a no-op. If someone decides to patch
+      ;; `slime-repl-previous-input' or one of its utility functions,
+      ;; or to add history-replay to Slime, then this section can be
+      ;; updated to add the relevant support for those commands.
+      (counsel-slime-repl-history
+       nil))
+    (ivy-completion-in-region-action (car pair))))
+
+(cl-defun counsel--browse-history (ring &key caller)
+  "Use Ivy to navigate through RING."
+  (let* ((proc (get-buffer-process (current-buffer)))
+         (end (point))
+         (beg (if proc
+                  (min (process-mark proc) end)
+                end))
+         (input (when (< beg end)
+                  (concat "^" (buffer-substring beg end)))))
+    (setq ivy-completion-beg beg)
+    (setq ivy-completion-end end)
+    (ivy-read "History: " (ivy-history-contents ring)
+              :keymap ivy-reverse-i-search-map
+              :initial-input input
+              :action #'counsel--browse-history-action
+              :caller caller)))
+
+(defvar eshell-history-ring)
+(defvar eshell-matching-input-from-input-string)
+
+;;;###autoload
+(defun counsel-esh-history ()
+  "Browse Eshell history."
+  (interactive)
+  (require 'em-hist)
+  (counsel--browse-history eshell-history-ring
+                           :caller #'counsel-esh-history))
+
+(advice-add 'eshell-previous-matching-input
+            :before #'counsel--set-eshell-history-index)
+(defun counsel--set-eshell-history-index (&rest _)
+  "Reassign `eshell-history-index'."
+  (when (and (memq last-command '(ivy-alt-done ivy-done))
+             (equal (ivy-state-caller ivy-last) 'counsel-esh-history))
+    (setq eshell-history-index counsel-esh--index-last)))
+
+(defvar comint-input-ring)
+(defvar comint-matching-input-from-input-string)
+
+;;;###autoload
+(defun counsel-shell-history ()
+  "Browse shell history."
+  (interactive)
+  (require 'comint)
+  (counsel--browse-history comint-input-ring
+                           :caller #'counsel-shell-history))
+
+(advice-add 'comint-previous-matching-input
+            :before #'counsel--set-comint-history-index)
+(defun counsel--set-comint-history-index (&rest _)
+  "Reassign `comint-input-ring-index'."
+  (when (and (memq last-command '(ivy-alt-done ivy-done))
+             (equal (ivy-state-caller ivy-last) 'counsel-shell-history))
+    (setq comint-input-ring-index counsel-shell-history--index-last)))
+
+(defvar slime-repl-input-history)
+
+;;;###autoload
+(defun counsel-slime-repl-history ()
+  "Browse Slime REPL history."
+  (interactive)
+  (require 'slime-repl)
+  (counsel--browse-history slime-repl-input-history
+                           :caller #'counsel-slime-repl-history))
+
+;; TODO: add advice for slime-repl-input-previous/next to properly
+;; reassign the ring index and match string.  This requires a case for
+;; `counsel-slime-repl-history' within
+;; `counsel--browse-history-action'.
+
+;;;; `counsel-hydra-heads'
+
+(defvar hydra-curr-body-fn)
+(declare-function hydra-keyboard-quit "ext:hydra")
+
+;;;###autoload
+(defun counsel-hydra-heads ()
+  "Call a head of the current/last hydra."
+  (interactive)
+  (let* ((base (substring
+                (prin1-to-string hydra-curr-body-fn)
+                0 -4))
+         (heads (symbol-value (intern (concat base "heads"))))
+         (keymap (symbol-value (intern (concat base "keymap"))))
+         (head-names
+          (mapcar (lambda (x)
+                    (cons
+                     (if (nth 2 x)
+                         (format "[%s] %S (%s)" (nth 0 x) (nth 1 x) (nth 2 x))
+                       (format "[%s] %S" (nth 0 x) (nth 1 x)))
+                     (lookup-key keymap (kbd (nth 0 x)))))
+                  heads)))
+    (ivy-read "head: " head-names
+              :action (lambda (x) (call-interactively (cdr x))))
+    (hydra-keyboard-quit)))
+
+;;;; `counsel-semantic'
+
+(declare-function semantic-tag-start "semantic/tag")
+(declare-function semantic-tag-class "semantic/tag")
+(declare-function semantic-tag-name "semantic/tag")
+(declare-function semantic-tag-put-attribute "semantic/tag")
+(declare-function semantic-tag-get-attribute "semantic/tag")
+(declare-function semantic-fetch-tags "semantic")
+(declare-function semantic-format-tag-summarize "semantic/format")
+(declare-function semantic-active-p "semantic/fw")
+
+(defun counsel-semantic-action (x)
+  "Got to semantic TAG."
+  (goto-char (semantic-tag-start (cdr x))))
+
+(defvar counsel-semantic-history nil
+  "History for `counsel-semantic'.")
+
+(defun counsel-semantic-format-tag (tag)
+  "Return a pretty string representation of TAG."
+  (let ((depth (or (semantic-tag-get-attribute tag :depth) 0))
+        (parent (semantic-tag-get-attribute tag :parent)))
+    (concat (make-string (* depth 2) ?\ )
+            (if parent
+                (concat "(" parent ") ")
+              "")
+            (semantic-format-tag-summarize tag nil t))))
+
+(defun counsel-flatten-forest (func treep forest)
+  "Use FUNC and TREEP to flatten FOREST.
+FUNC is applied to each node.
+TREEP is used to expand internal nodes."
+  (cl-labels ((reducer (forest out depth)
+                (dolist (tree forest)
+                  (let ((this (cons (funcall func tree depth) out))
+                        (leafs (funcall treep tree)))
+                    (setq out
+                          (if leafs
+                              (reducer leafs this (1+ depth))
+                            this))))
+                out))
+    (nreverse (reducer forest nil 0))))
+
+(defun counsel-semantic-tags ()
+  "Fetch semantic tags."
+  (counsel-flatten-forest
+   (lambda (tree depth)
+     (semantic-tag-put-attribute tree :depth depth))
+   (lambda (tag)
+     (when (eq (semantic-tag-class tag) 'type)
+       (let ((name (semantic-tag-name tag)))
+         (mapcar
+          (lambda (x) (semantic-tag-put-attribute x :parent name))
+          (semantic-tag-get-attribute tag :members)))))
+   (semantic-fetch-tags)))
+
+;;;###autoload
+(defun counsel-semantic ()
+  "Jump to a semantic tag in the current buffer."
+  (interactive)
+  (let ((tags (mapcar
+               (lambda (x)
+                 (cons
+                  (counsel-semantic-format-tag x)
+                  x))
+               (counsel-semantic-tags))))
+    (ivy-read "tag: " tags
+              :action #'counsel-semantic-action
+              :history 'counsel-semantic-history
+              :caller 'counsel-semantic)))
+
+;;;###autoload
+(defun counsel-semantic-or-imenu ()
+  (interactive)
+  (require 'semantic/fw)
+  (if (semantic-active-p)
+      (counsel-semantic)
+    (counsel-imenu)))
+
+;;;; `counsel-outline'
+
+(defcustom counsel-outline-face-style nil
+  "Determines how to style outline headings during completion.
+
+If `org', the faces `counsel-outline-1' through
+`counsel-outline-8' are applied in a similar way to Org.
+Note that no cycling is performed, so headings on levels 9 and
+higher are not styled.
+
+If `verbatim', the faces used in the buffer are applied.  For
+simple headlines in `org-mode' buffers, this is usually the same
+as the `org' setting, except that it depends on how much of the
+buffer has been completely fontified.  If your buffer exceeds a
+certain size, headlines are styled lazily depending on which
+parts of the tree are visible.  Headlines which are not yet
+styled in the buffer will appear unstyled in the minibuffer as
+well.  If your headlines contain parts which are fontified
+differently than the headline itself (e.g. TODO keywords, tags,
+links) and you want these parts to be styled properly, verbatim
+is the way to go; otherwise you are probably better off using the
+`org' setting instead.
+
+If `custom', the faces defined in `counsel-outline-custom-faces'
+are applied.  Note that no cycling is performed, so if there is
+no face defined for a certain level, headlines on that level will
+not be styled.
+
+If `nil', all headlines are highlighted using
+`counsel-outline-default'.
+
+For displaying tags and TODO keywords in `org-mode' buffers, see
+`counsel-org-headline-display-tags' and
+`counsel-org-headline-display-todo', respectively."
+  :type '(choice
+          (const :tag "Same as org-mode" org)
+          (const :tag "Verbatim" verbatim)
+          (const :tag "Custom" custom)
+          (const :tag "No style" nil)))
+
+(defcustom counsel-outline-custom-faces nil
+  "List of faces for custom display of outline headings.
+
+Headlines on level N are fontified with the Nth entry of this
+list, starting with N = 1.  Headline levels with no corresponding
+entry in this list will not be styled.
+
+This variable has no effect unless `counsel-outline-face-style'
+is set to `custom'."
+  :type '(repeat face))
+
+(defun counsel-outline-title ()
+  "Return title of current outline heading.
+Intended as a value for the `:outline-title' setting in
+`counsel-outline-settings', which see."
+  (buffer-substring (point) (line-end-position)))
+
+(defun counsel-outline-title-org ()
+  "Return title of current outline heading.
+Like `counsel-outline-title' (which see), but for `org-mode'
+buffers."
+  (let ((statistics-re "\\[[0-9]*\\(?:%\\|/[0-9]*\\)]")
+        (heading (apply #'org-get-heading (counsel--org-get-heading-args))))
+    (cond (counsel-org-headline-display-statistics
+           heading)
+          (heading
+           (org-trim (replace-regexp-in-string
+                      statistics-re " " heading t t))))))
+
+(defun counsel-outline-title-markdown ()
+  "Return title of current outline heading.
+Like `counsel-outline-title' (which see), but for
+`markdown-mode' (from the eponymous package) buffers."
+  ;; `outline-regexp' is set by `markdown-mode' to match both setext
+  ;; (underline) and atx (hash) headings (see
+  ;; `markdown-regex-header').
+  (or (match-string 1)                  ; setext heading title
+      (match-string 5)))                ; atx heading title
+
+(defun counsel-outline-title-latex ()
+  "Return title of current outline heading.
+Like `counsel-outline-title' (which see), but for `latex-mode'
+buffers."
+  ;; `outline-regexp' is set by `latex-mode' (see variable
+  ;; `latex-section-alist' for the built-in mode or function
+  ;; `LaTeX-outline-regexp' for the AUCTeX package) to match section
+  ;; macros, in which case we get the section name, as well as
+  ;; `\appendix', `\documentclass', `\begin{document}', and
+  ;; `\end{document}', in which case we simply return that.
+  (if (and (assoc (match-string 1)                             ; Macro name
+                  (or (bound-and-true-p LaTeX-section-list)    ; AUCTeX
+                      (bound-and-true-p latex-section-alist))) ; Built-in
+           (progn
+             ;; Point is at end of macro name, skip stars and optional args
+             (skip-chars-forward "*")
+             (while (looking-at-p "\\[")
+               (forward-list))
+             ;; First mandatory arg should be section title
+             (looking-at-p "{")))
+      (buffer-substring (1+ (point)) (1- (progn (forward-list) (point))))
+    (buffer-substring (line-beginning-position) (point))))
+
+(defun counsel-outline-level-emacs-lisp ()
+  "Return level of current outline heading.
+Like `lisp-outline-level', but adapted for the `:outline-level'
+setting in `counsel-outline-settings', which see."
+  (if (looking-at ";;\\([;*]+\\)")
+      (- (match-end 1) (match-beginning 1))
+    (funcall outline-level)))
+
+(defvar counsel-outline--preselect 0
+  "Index of the preselected candidate in `counsel-outline'.")
+
+(defun counsel-outline-candidates (&optional settings prefix)
+  "Return an alist of outline heading completion candidates.
+Each element is a pair (HEADING . MARKER), where the string
+HEADING is located at the position of MARKER.  SETTINGS is a
+plist entry from `counsel-outline-settings', which see.
+PREFIX is a string prepended to all candidates."
+  (let* ((bol-regex (concat "^\\(?:"
+                            (or (plist-get settings :outline-regexp)
+                                outline-regexp)
+                            "\\)"))
+         (outline-title-fn (or (plist-get settings :outline-title)
+                               #'counsel-outline-title))
+         (outline-level-fn (or (plist-get settings :outline-level)
+                               outline-level))
+         (display-style (or (plist-get settings :display-style)
+                            counsel-outline-display-style))
+         (path-separator (or (plist-get settings :path-separator)
+                             counsel-outline-path-separator))
+         (face-style (or (plist-get settings :face-style)
+                         counsel-outline-face-style))
+         (custom-faces (or (plist-get settings :custom-faces)
+                           counsel-outline-custom-faces))
+         (stack-level 0)
+         (orig-point (point))
+         (stack (and prefix (list (counsel-outline--add-face
+                                   prefix 0 face-style custom-faces))))
+         cands name level marker)
+    (save-excursion
+      (setq counsel-outline--preselect 0)
+      (goto-char (point-min))
+      (while (re-search-forward bol-regex nil t)
+        (save-excursion
+          (setq name (or (save-match-data
+                           (funcall outline-title-fn))
+                         ""))
+          (goto-char (match-beginning 0))
+          (setq marker (point-marker))
+          (setq level (funcall outline-level-fn))
+          (cond ((eq display-style 'path)
+                 ;; Update stack.  The empty entry guards against incorrect
+                 ;; headline hierarchies, e.g. a level 3 headline
+                 ;; immediately following a level 1 entry.
+                 (while (<= level stack-level)
+                   (pop stack)
+                   (cl-decf stack-level))
+                 (while (> level stack-level)
+                   (push "" stack)
+                   (cl-incf stack-level))
+                 (setf (car stack)
+                       (counsel-outline--add-face
+                        name level face-style custom-faces))
+                 (setq name (mapconcat #'identity
+                                       (reverse stack)
+                                       path-separator)))
+                (t
+                 (when (eq display-style 'headline)
+                   (setq name (concat (make-string level ?*) " " name)))
+                 (setq name (counsel-outline--add-face
+                             name level face-style custom-faces))))
+          (push (cons name marker) cands))
+        (unless (or (string= name "")
+                    (< orig-point marker))
+          (cl-incf counsel-outline--preselect))))
+    (nreverse cands)))
+
+(defun counsel-outline--add-face (name level &optional face-style custom-faces)
+  "Set the `face' property on headline NAME according to LEVEL.
+FACE-STYLE and CUSTOM-FACES override `counsel-outline-face-style'
+and `counsel-outline-custom-faces', respectively, which determine
+the face to apply."
+  (let ((face (cl-case (or face-style counsel-outline-face-style)
+                (verbatim)
+                (custom (nth (1- level)
+                             (or custom-faces counsel-outline-custom-faces)))
+                (org (format "counsel-outline-%d" level))
+                (t 'counsel-outline-default))))
+    (when face
+      (put-text-property 0 (length name) 'face face name)))
+  name)
+
+(defun counsel-outline-action (x)
+  "Go to outline X."
+  (goto-char (cdr x)))
+
+;;;###autoload
+(defun counsel-outline ()
+  "Jump to an outline heading with completion."
+  (interactive)
+  (let ((settings (cdr (assq major-mode counsel-outline-settings))))
+    (ivy-read "Outline: " (counsel-outline-candidates settings)
+              :action (or (plist-get settings :action)
+                          #'counsel-outline-action)
+              :history (or (plist-get settings :history)
+                           'counsel-outline-history)
+              :preselect (max (1- counsel-outline--preselect) 0)
+              :caller (or (plist-get settings :caller)
+                          'counsel-outline))))
+
+;;;; `counsel-ibuffer'
+
+(defvar counsel-ibuffer--buffer-name nil
+  "Name of the buffer to use for `counsel-ibuffer'.")
+
+;;;###autoload
+(defun counsel-ibuffer (&optional name)
+  "Use ibuffer to switch to another buffer.
+NAME specifies the name of the buffer (defaults to \"*Ibuffer*\")."
+  (interactive)
+  (setq counsel-ibuffer--buffer-name (or name "*Ibuffer*"))
+  (ivy-read "Switch to buffer: " (counsel--ibuffer-get-buffers)
+            :history 'counsel-ibuffer-history
+            :action #'counsel-ibuffer-visit-buffer
+            :caller 'counsel-ibuffer))
+
+(declare-function ibuffer-update "ibuffer")
+(declare-function ibuffer-current-buffer "ibuffer")
+(declare-function ibuffer-forward-line "ibuffer")
+(defvar ibuffer-movement-cycle)
+
+(defun counsel--ibuffer-get-buffers ()
+  "Return an alist with buffer completion candidates from Ibuffer.
+The keys are buffer-related lines from Ibuffer as strings, and
+the values are the corresponding buffer objects."
+  (let ((oldbuf (get-buffer counsel-ibuffer--buffer-name)))
+    (unless oldbuf
+      ;; Avoid messing with the user's precious window/frame configuration.
+      (save-window-excursion
+        (let ((display-buffer-overriding-action
+               '(display-buffer-same-window (inhibit-same-window . nil))))
+          (ibuffer nil counsel-ibuffer--buffer-name nil t))))
+    (with-current-buffer counsel-ibuffer--buffer-name
+      (when oldbuf
+        ;; Forcibly update possibly stale existing buffer.
+        (ibuffer-update nil t))
+      (goto-char (point-min))
+      (let ((ibuffer-movement-cycle nil)
+            entries)
+        (while (not (eobp))
+          (ibuffer-forward-line 1 t)
+          (let ((buf (ibuffer-current-buffer)))
+            ;; We are only interested in buffers we can actually visit.
+            ;; This filters out headings and other unusable entries.
+            (when (buffer-live-p buf)
+              (push (cons (buffer-substring-no-properties
+                           (line-beginning-position)
+                           (line-end-position))
+                          buf)
+                    entries))))
+        (nreverse entries)))))
+
+(defun counsel-ibuffer-visit-buffer (x)
+  "Switch to buffer of candidate X."
+  (switch-to-buffer (or (cdr-safe x) x)))
+
+(defun counsel-ibuffer-visit-buffer-other-window (x)
+  "Switch to buffer of candidate X in another window."
+  (switch-to-buffer-other-window (or (cdr-safe x) x)))
+
+(defun counsel-ibuffer-visit-ibuffer (_)
+  "Switch to Ibuffer buffer."
+  (switch-to-buffer counsel-ibuffer--buffer-name))
+
+(ivy-set-actions
+ 'counsel-ibuffer
+ '(("j" counsel-ibuffer-visit-buffer-other-window "other window")
+   ("v" counsel-ibuffer-visit-ibuffer "switch to Ibuffer")))
+
+;;;; `counsel-switch-to-shell-buffer'
+
+(defun counsel--buffers-with-mode (mode)
+  "Return names of buffers with MODE as their `major-mode'."
+  (let (bufs)
+    (dolist (buf (buffer-list))
+      (when (eq (buffer-local-value 'major-mode buf) mode)
+        (push (buffer-name buf) bufs)))
+    (nreverse bufs)))
+
+(declare-function shell-mode "shell")
+
+;;;###autoload
+(defun counsel-switch-to-shell-buffer ()
+  "Switch to a shell buffer, or create one."
+  (interactive)
+  (ivy-read "Shell buffer: " (counsel--buffers-with-mode #'shell-mode)
+            :action #'counsel--switch-to-shell
+            :caller 'counsel-switch-to-shell-buffer))
+
+(defun counsel--switch-to-shell (name)
+  "Display shell buffer with NAME and select its window.
+Reuse any existing window already displaying the named buffer.
+If there is no such buffer, start a new `shell' with NAME."
+  (if (get-buffer name)
+      (pop-to-buffer name '((display-buffer-reuse-window
+                             display-buffer-same-window)
+                            (inhibit-same-window . nil)
+                            (reusable-frames . visible)))
+    (shell name)))
+
+;;;; `counsel-unicode-char'
+
+(defvar counsel-unicode-char-history nil
+  "History for `counsel-unicode-char'.")
+
+(defun counsel--unicode-names ()
+  "Return formatted and sorted list of `ucs-names'.
+The result of `ucs-names' is mostly, but not completely, sorted,
+so this function ensures lexicographic order."
+  (let* (cands
+         (table (ucs-names))            ; Either hash map or alist
+         (fmt (lambda (name code)       ; Common format function
+                (let ((cand (format "%06X %-58s %c" code name code)))
+                  (put-text-property 0 1 'code code cand)
+                  (push cand cands)))))
+    (if (not (hash-table-p table))
+        ;; Support `ucs-names' returning an alist in Emacs < 26.
+        ;; The result of `ucs-names' comes pre-reversed so no need to repeat.
+        (dolist (entry table)
+          (funcall fmt (car entry) (cdr entry)))
+      (maphash fmt table)
+      ;; Reverse to speed up sorting
+      (setq cands (nreverse cands)))
+    (sort cands #'string-lessp)))
+
+(defvar counsel--unicode-table
+  (lazy-completion-table counsel--unicode-table counsel--unicode-names)
+  "Lazy completion table for `counsel-unicode-char'.
+Candidates comprise `counsel--unicode-names', which see.")
+
+;;;###autoload
+(defun counsel-unicode-char (&optional count)
+  "Insert COUNT copies of a Unicode character at point.
+COUNT defaults to 1."
+  (interactive "p")
+  (setq ivy-completion-beg (point))
+  (setq ivy-completion-end (point))
+  (ivy-read "Unicode name: " counsel--unicode-table
+            :history 'counsel-unicode-char-history
+            :action (lambda (name)
+                      (with-ivy-window
+                        (delete-region ivy-completion-beg ivy-completion-end)
+                        (setq ivy-completion-beg (point))
+                        (insert-char (get-text-property 0 'code name) count)
+                        (setq ivy-completion-end (point))))
+            :caller 'counsel-unicode-char))
+
+(ivy-configure 'counsel-unicode-char
+  :sort-fn #'ivy-string<)
+
+(defun counsel-unicode-copy (name)
+  "Ivy action to copy the unicode from NAME to the kill ring."
+  (kill-new (char-to-string (get-text-property 0 'code name))))
+
+(ivy-set-actions
+ 'counsel-unicode-char
+ '(("w" counsel-unicode-copy "copy")))
+
+;;;; Colors
+
+(defun counsel-colors-action-insert-hex (color)
+  "Insert the hexadecimal RGB value of COLOR."
+  (insert (get-text-property 0 'hex color)))
+
+(defun counsel-colors-action-kill-hex (color)
+  "Kill the hexadecimal RGB value of COLOR."
+  (kill-new (get-text-property 0 'hex color)))
+
+;;;;; `counsel-colors-emacs'
+
+(defvar counsel-colors-emacs-history ()
+  "History for `counsel-colors-emacs'.")
+
+(defun counsel-colors--name-to-hex (name)
+  "Return hexadecimal RGB value of color with NAME.
+
+Return nil if NAME does not designate a valid color."
+  (let ((rgb (color-name-to-rgb name)))
+    (when rgb
+      (apply #'color-rgb-to-hex rgb))))
+
+(defvar shr-color-visible-luminance-min)
+(declare-function shr-color-visible "shr-color")
+(defvar counsel--colors-format "%-20s %s %s%s")
+
+(defun counsel--colors-emacs-format-function (colors)
+  "Format function for `counsel-colors-emacs'."
+  (require 'shr-color)
+  (let* ((blank (make-string 10 ?\s))
+         (formatter
+          (lambda (color)
+            (let ((fg (list :foreground color)))
+              (format counsel--colors-format color
+                      (propertize (get-text-property 0 'hex color) 'face fg)
+                      (propertize blank 'face (list :background color))
+                      (propertize (mapconcat (lambda (dup)
+                                               (concat " " dup))
+                                             (get-text-property 0 'dups color)
+                                             ",")
+                                  'face fg))))))
+    (ivy--format-function-generic
+     (lambda (color)
+       (let* ((hex (get-text-property 0 'hex color))
+              (shr-color-visible-luminance-min 100)
+              (fg (cadr (shr-color-visible hex "black" t))))
+         (propertize (funcall formatter color)
+                     'face (list :foreground fg :background hex))))
+     formatter colors "\n")))
+
+(defun counsel--colors-web-format-function (colors)
+  "Format function for `counsel-colors-web'."
+  (require 'shr-color)
+  (let* ((blank (make-string 10 ?\s))
+         (formatter (lambda (color)
+                      (let ((hex (get-text-property 0 'hex color)))
+                        (format counsel--colors-format color
+                                (propertize hex 'face (list :foreground hex))
+                                (propertize blank 'face (list :background hex)))))))
+    (ivy--format-function-generic
+     (lambda (color)
+       (let* ((hex (get-text-property 0 'hex color))
+              (shr-color-visible-luminance-min 100)
+              (fg (cadr (shr-color-visible hex "black" t))))
+         (propertize (funcall formatter color)
+                     'face (list :foreground fg :background hex))))
+     formatter colors "\n")))
+
+;; No longer preloaded in Emacs 28.
+(autoload 'list-colors-duplicates "facemenu")
+
+;;;###autoload
+(defun counsel-colors-emacs ()
+  "Show a list of all supported colors for a particular frame.
+
+You can insert or kill the name or hexadecimal RGB value of the
+selected color."
+  (interactive)
+  (let* ((colors
+          (delete nil
+                  (mapcar (lambda (cell)
+                            (let* ((name (car cell))
+                                   (dups (cdr cell))
+                                   (hex (counsel-colors--name-to-hex name)))
+                              (when hex
+                                (propertize name 'hex hex 'dups dups))))
+                          (list-colors-duplicates))))
+         (counsel--colors-format
+          (format "%%-%ds %%s %%s%%s"
+                  (apply #'max 0 (mapcar #'string-width colors)))))
+    (ivy-read "Emacs color: " colors
+              :require-match t
+              :history 'counsel-colors-emacs-history
+              :action #'insert
+              :caller 'counsel-colors-emacs)))
+(ivy-configure 'counsel-colors-emacs
+  :format-fn #'counsel--colors-emacs-format-function)
+
+(ivy-set-actions
+ 'counsel-colors-emacs
+ '(("h" counsel-colors-action-insert-hex "insert hexadecimal value")
+   ("H" counsel-colors-action-kill-hex "kill hexadecimal value")))
+
+;;;;; `counsel-colors-web'
+
+(defvar shr-color-html-colors-alist)
+
+(defun counsel-colors--web-alist ()
+  "Return list of CSS colors for `counsel-colors-web'."
+  (require 'shr-color)
+  (let* ((alist (copy-alist shr-color-html-colors-alist))
+         (mp  (assoc "MediumPurple"  alist))
+         (pvr (assoc "PaleVioletRed" alist))
+         (rp  (assoc "RebeccaPurple" alist)))
+    ;; Backport GNU Emacs bug#30377
+    (when mp (setcdr mp "#9370db"))
+    (when pvr (setcdr pvr "#db7093"))
+    (unless rp (push (cons "rebeccapurple" "#663399") alist))
+    (sort (mapcar (lambda (cell)
+                    (propertize (downcase (car cell))
+                                'hex (downcase (cdr cell))))
+                  alist)
+          #'string-lessp)))
+
+(defvar counsel-colors-web-history ()
+  "History for `counsel-colors-web'.")
+
+;;;###autoload
+(defun counsel-colors-web ()
+  "Show a list of all W3C web colors for use in CSS.
+
+You can insert or kill the name or hexadecimal RGB value of the
+selected color."
+  (interactive)
+  (let* ((colors (counsel-colors--web-alist))
+         (counsel--colors-format
+          (format "%%-%ds %%s %%s"
+                  (apply #'max 0 (mapcar #'string-width colors)))))
+    (ivy-read "Web color: " colors
+              :require-match t
+              :history 'counsel-colors-web-history
+              :action #'insert
+              :caller 'counsel-colors-web)))
+
+(ivy-configure 'counsel-colors-web
+  :sort-fn #'ivy-string<
+  :format-fn #'counsel--colors-web-format-function)
+
+(ivy-set-actions
+ 'counsel-colors-web
+ '(("h" counsel-colors-action-insert-hex "insert hexadecimal value")
+   ("H" counsel-colors-action-kill-hex "kill hexadecimal value")))
+
+;;;; `counsel-fonts'
+
+(defvar counsel-fonts-history ()
+  "History for `counsel-fonts'.")
+
+;;;###autoload
+(defun counsel-fonts ()
+  "Show a list of all supported font families for a particular frame.
+
+You can insert or kill the name of the selected font."
+  (interactive)
+  (let ((current-font
+         (symbol-name (font-get (face-attribute 'default :font) :family))))
+    (ivy-read "Font: " (delete-dups (font-family-list))
+              :preselect current-font
+              :require-match t
+              :history 'counsel-fonts-history
+              :action #'insert
+              :caller 'counsel-fonts)))
+
+(ivy-configure 'counsel-fonts
+  :display-transformer-fn #'counsel--font-with-sample)
+
+(defun counsel--font-with-sample (font-name)
+  "Format function for `counsel-fonts'."
+  (format "%-75s%s" font-name
+          (propertize "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"
+                      'face (list :family font-name))))
+
+;;;; `counsel-kmacro'
+
+(defvar counsel-kmacro-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-k") #'counsel-kmacro-kill)
+    map))
+
+(defun counsel-kmacro-kill ()
+  "Kill the line, or delete the currently selected keyboard macro."
+  (interactive)
+  (unless (window-minibuffer-p)
+    (user-error "No completion session is active"))
+  (if (not (eolp))
+      (ivy-kill-line)
+    (counsel-kmacro-action-delete-kmacro
+     (assoc
+      (ivy-state-current ivy-last)
+      (ivy-state-collection ivy-last)))
+    (ivy--kill-current-candidate)))
+(ivy--no-M-x #'counsel-kmacro-kill #'ivy--minibuffer-p)
+
+(defvar kmacro-counter)
+(defvar kmacro-counter-format-start)
+(defvar kmacro-ring)
+(declare-function kmacro-cycle-ring-next "kmacro" (&optional arg))
+(declare-function kmacro-cycle-ring-previous "kmacro" (&optional arg))
+(declare-function kmacro-delete-ring-head "kmacro" (&optional arg))
+(declare-function kmacro-ring-head "kmacro" ())
+(declare-function kmacro-set-counter "kmacro" (arg))
+(declare-function kmacro-set-format "kmacro" (format))
+(declare-function kmacro-split-ring-element "kmacro" (elt))
+
+;;;###autoload
+(defun counsel-kmacro ()
+  "Interactively choose and execute a keyboard macro.
+
+With a prefix argument, execute the macro that many times.
+
+Macros are executed using their respective `kmacro-counter' value and
+counter format; these values are also displayed next to each completion
+candidate.
+
+The default actions include the ability to copy one macro's counter
+value or format as the basis for another macro execution or definition.
+
+The following key bindings are also available:
+\\{counsel-kmacro-map}"
+  (interactive)
+  (require 'kmacro)
+  (ivy-read "Execute macro: "
+            (or (counsel--kmacro-candidates)
+                (user-error "No keyboard macros defined"))
+            :keymap counsel-kmacro-map
+            :require-match t
+            :action #'counsel-kmacro-action-run
+            :caller 'counsel-kmacro))
+
+(ivy-configure 'counsel-kmacro
+  :format-fn #'counsel--kmacro-format-function)
+
+(defcustom counsel-kmacro-separator "\n------------------------\n"
+  "Separator displayed between keyboard macros in `counsel-kmacro'."
+  :type 'string)
+
+(defun counsel--kmacro-format-function (formatted-kmacro)
+  "Transform FORMATTED-KMACRO into a string for `counsel-kmacro'."
+  (ivy--format-function-generic
+   (lambda (str) (ivy--add-face str 'ivy-current-match))
+   #'identity
+   formatted-kmacro
+   (propertize counsel-kmacro-separator 'face 'ivy-separator)))
+
+(defmacro counsel--with-kmacro (kmacro &rest body)
+  "Split KMACRO slots into corresponding dynvars around BODY."
+  (declare (debug t) (indent 1))
+  `(let ((last-kbd-macro nil)
+         (kmacro-counter nil)
+         (kmacro-counter-format-start nil))
+     ;; Works with both older triplets and Emacs 29 OClosures.
+     (kmacro-split-ring-element ,kmacro)
+     ,@body))
+
+(defun counsel--format-kmacro ()
+  "Return string representation of current keyboard macro."
+  (format "(%s,%s): %s" kmacro-counter-format-start kmacro-counter
+          (condition-case err
+              (format-kbd-macro last-kbd-macro 1)
+            ;; Recover from error in `edmacro-fix-menu-commands',
+            ;; especially prior to mouse event support in Emacs 27.
+            (error
+             (format (propertize "[Unprintable macro: %s]" 'face 'warning)
+                     (error-message-string err))))))
+
+(defun counsel--kmacro-candidates ()
+  "Return an alist of known keyboard macros for `counsel-kmacro'.
+The cdrs are the original `kmacro' objects from `kmacro-ring-head' and
+`kmacro-ring'; the cars are a corresponding string representation."
+  (mapcar (lambda (km)
+            (cons (counsel--with-kmacro km
+                    (counsel--format-kmacro))
+                  km))
+          (let ((head (kmacro-ring-head)))
+            (and head (cons head kmacro-ring)))))
+
+(defun counsel--kmacro-exec (kmacro n)
+  "Execute KMACRO ring item N times."
+  (funcall (if (and (fboundp 'kmacro-p) (kmacro-p kmacro))
+               #'funcall ;; Emacs 29 OClosure.
+             'kmacro-exec-ring-item)
+           kmacro n))
+
+(defun counsel-kmacro-action-run (candidate)
+  "Execute keyboard macro from `counsel-kmacro' CANDIDATE.
+With a prefix argument, execute the macro that many times."
+  ;; Action prefix overrides `counsel-kmacro' prefix.
+  (let* ((pre (or ivy-current-prefix-arg current-prefix-arg))
+         (km (cdr candidate))
+         (head (equal km (kmacro-ring-head))))
+    (counsel--kmacro-exec km (prefix-numeric-value pre))
+    (when head
+      ;; Executing pseudo `kmacro-ring-head' updates that object's counter,
+      ;; but not the current `kmacro-counter', so reconcile them here.
+      (kmacro-split-ring-element km))
+    ;; Update state for next `ivy-call'.
+    (counsel--with-kmacro km
+      (setcar candidate (counsel--format-kmacro))))
+  (setf (ivy-state-current ivy-last) (car candidate))
+  (setf (ivy-state-preselect ivy-last) ivy--index)
+  (ivy--reset-state ivy-last))
+
+(defun counsel-kmacro-action-delete-kmacro (candidate)
+  "Delete the keyboard macro in `counsel-kmacro' CANDIDATE.
+Either delete it from `kmacro-ring', or set `last-kbd-macro'
+to the popped head of the ring."
+  (let ((km (cdr candidate)))
+    (if (memq km kmacro-ring)
+        (setq kmacro-ring (delq km kmacro-ring))
+      (kmacro-delete-ring-head)))
+  ;; Update state for next `ivy-call'.
+  ;; TODO: Is `ivy--kill-current-candidate' required?
+  (let ((kms (ivy-state-collection ivy-last)))
+    (setf (ivy-state-collection ivy-last) (delq candidate kms))
+    (setf (ivy-state-preselect ivy-last)
+          (max 0 (min ivy--index (1- (length kms))))))
+  (ivy--reset-state ivy-last))
+
+(defun counsel-kmacro-action-copy-initial-counter-value (candidate)
+  "Pass `counsel-kmacro' CANDIDATE's counter value to `kmacro-set-counter'.
+This value will be used by the next executed macro, or as a
+starting value by the next macro defined.
+
+Note that executing an existing macro that itself uses a counter
+effectively resets the starting counter value for the next macro
+definition to 0."
+  (kmacro-set-counter (counsel--with-kmacro (cdr candidate)
+                        kmacro-counter)))
+
+(defun counsel-kmacro-action-copy-counter-format-for-new-macro (candidate)
+  "Pass `counsel-kmacro' CANDIDATE's counter format to `kmacro-set-format'.
+
+When no keyboard macro is being defined or executed, this affects the
+default for all subsequent macro definitions."
+  (kmacro-set-format (counsel--with-kmacro (cdr candidate)
+                       kmacro-counter-format-start)))
+
+(defun counsel--kmacro-cycle-until (kmacro)
+  "Cycle macro ring until KMACRO is the head; return number of steps."
+  (let ((i 0)
+        ;; Purely defensive; infloop should never happen.
+        ;; Purely defensive; infloop should never happen.
+        ;; Purely defensive; infloop should never happen.[Quit]
+        (fuel (* 4 (1+ (length kmacro-ring)))))
+    (while (not (equal kmacro (kmacro-ring-head)))
+      (unless (natnump (cl-decf fuel))
+        (error "`counsel-kmacro' bug: exceeded cycle limit"))
+      (kmacro-cycle-ring-previous)
+      (cl-incf i))
+    i))
+
+(defun counsel-kmacro-action-cycle-ring-to-macro (candidate)
+  "Cycle `kmacro-ring' until `last-kbd-macro' is the selected macro.
+This is convenient when using \\[kmacro-end-or-call-macro] to call macros."
+  (counsel--kmacro-cycle-until (cdr candidate))
+  ;; Update state for next `ivy-call'.
+  (setf (ivy-state-collection ivy-last) (counsel--kmacro-candidates))
+  (ivy--reset-state ivy-last))
+
+(defun counsel-kmacro-action-set-saved-starting-counter (candidate)
+  "Set the counter value of `counsel-kmacro' CANDIDATE.
+Interactively reads a new counter value from the minibuffer.
+
+Note that this requires cycling the keyboard macro ring until CANDIDATE,
+and then cycling back."
+  (let* ((km (cdr candidate))
+         (cnt (counsel--with-kmacro km kmacro-counter))
+         (cnt (if (zerop cnt) cnt (list 0 cnt)))
+         (i (counsel--kmacro-cycle-until km)))
+    (setq kmacro-counter (read-number "New macro counter: " cnt))
+    (dotimes (_ i) (kmacro-cycle-ring-next)))
+  ;; Update state for next `ivy-call'.
+  (setf (ivy-state-collection ivy-last) (counsel--kmacro-candidates))
+  (setf (ivy-state-preselect ivy-last) ivy--index)
+  ;; Emacs 28 seems to have some bug where the text of the candidates
+  ;; in the minibuffer is not immediately refreshed.
+  (ivy--reset-state ivy-last))
+
+(defun counsel-kmacro-action-execute-after-prompt (candidate)
+  "Execute selected keyboard macro with a different counter and format.
+
+Prompt for the number of times to execute the macro, the starting
+counter, and the counter format.  The corresponding values from the
+selected `counsel-kmacro' CANDIDATE serve as defaults.  If this action
+is called with a prefix argument, its numeric value also serves as a
+default option for the number of iterations and counter.
+
+The existing CANDIDATE, its counter and format, are left unchanged."
+  (let* ((pre (or ivy-current-prefix-arg current-prefix-arg))
+         (pre (and pre (prefix-numeric-value pre))))
+    (counsel--with-kmacro (cdr candidate)
+      (let ((times (read-number "Number of macro iterations: "
+                                (let ((def '(1 2)))
+                                  (if pre (cons pre def) def)))))
+        (setq kmacro-counter
+              (read-number "Macro counter value: "
+                           (if pre (list pre kmacro-counter) kmacro-counter)))
+        (setq kmacro-counter-format-start
+              (let ((prompt "Macro counter format")
+                    (def kmacro-counter-format-start))
+                (read-string (if (fboundp 'format-prompt)
+                                 (format-prompt prompt def)
+                               (format "%s (default: %s): " prompt def))
+                             nil nil def)))
+        (counsel--kmacro-exec (kmacro-ring-head) times)))))
+
+(ivy-set-actions
+ 'counsel-kmacro
+ `(("c" ,#'counsel-kmacro-action-cycle-ring-to-macro
+    "cycle to")
+   ("d" ,#'counsel-kmacro-action-delete-kmacro
+    "delete")
+   ("e" ,#'counsel-kmacro-action-execute-after-prompt
+    "execute after prompt")
+   ("f" ,#'counsel-kmacro-action-copy-counter-format-for-new-macro
+    "copy counter format for new macro")
+   ("s" ,#'counsel-kmacro-action-set-saved-starting-counter
+    "set this counter value")
+   ("v" ,#'counsel-kmacro-action-copy-initial-counter-value
+    "copy starting counter value")))
+
+;;;; `counsel-geiser-doc-look-up-manual'
+
+(declare-function geiser-doc-manual-for-symbol "ext:geiser-doc")
+(defvar geiser-completion-symbol-list-func)
+
+(defvar counsel-geiser-doc-look-up-manual-history ()
+  "History for `counsel-geiser-doc-look-up-manual'.")
+
+;;;###autoload
+(defun counsel-geiser-doc-look-up-manual ()
+  "Search Scheme documentation."
+  (interactive)
+  (ivy-read "Symbol: " geiser-completion-symbol-list-func
+            :require-match t
+            :history 'counsel-geiser-doc-look-up-manual-history
+            :action (lambda (cand)
+                      (geiser-doc-manual-for-symbol (intern cand)))
+            :caller 'counsel-geiser-doc-look-up-manual))
+
+;;; Misc. OS
+;;;; `counsel-rhythmbox'
+
+(declare-function dbus-call-method "dbus")
+(declare-function dbus-get-property "dbus")
+
+(defun counsel--run (&rest program-and-args)
+  (let ((name (mapconcat #'identity program-and-args " ")))
+    (apply #'start-process name nil program-and-args)
+    name))
+
+(defun counsel--sl (cmd)
+  "Shell command to list."
+  (split-string (shell-command-to-string cmd) "\n" t))
+
+(defun counsel-rhythmbox-play-song (song)
+  "Let Rhythmbox play SONG."
+  (let ((first (string= (shell-command-to-string "pidof rhythmbox") ""))
+        (service "org.gnome.Rhythmbox3")
+        (path "/org/mpris/MediaPlayer2")
+        (interface "org.mpris.MediaPlayer2.Player"))
+    (when first
+      (counsel--run "nohup" "rhythmbox")
+      (sit-for 1.5))
+    (dbus-call-method :session service path interface
+                      "OpenUri" (cdr song))
+    (let ((id (and first
+                   (cdr (counsel--wmctrl-parse
+                         (shell-command-to-string
+                          "wmctrl -l -p | grep $(pidof rhythmbox)"))))))
+      (when id
+        (sit-for 0.2)
+        (counsel--run "wmctrl" "-ic" id)))))
+
+(defun counsel-rhythmbox-enqueue-song (song)
+  "Let Rhythmbox enqueue SONG."
+  (let ((service "org.gnome.Rhythmbox3")
+        (path "/org/gnome/Rhythmbox3/PlayQueue")
+        (interface "org.gnome.Rhythmbox3.PlayQueue"))
+    (dbus-call-method :session service path interface
+                      "AddToQueue" (cdr song))))
+
+(defun counsel-rhythmbox-playpause-current-song ()
+  "Play/pause the current song."
+  (interactive)
+  (let ((service "org.gnome.Rhythmbox3")
+        (path "/org/mpris/MediaPlayer2")
+        (interface "org.mpris.MediaPlayer2.Player"))
+    (dbus-call-method :session service path interface
+                      "PlayPause")))
+
+(defun counsel-rhythmbox-toggle-shuffle (_song)
+  "Toggle Rhythmbox shuffle setting."
+  (let* ((old-order (counsel--command "dconf" "read" "/org/gnome/rhythmbox/player/play-order"))
+         (new-order (if (string= old-order "'shuffle'")
+                        "'linear'"
+                      "'shuffle'")))
+    (counsel--command
+     "dconf"
+     "write"
+     "/org/gnome/rhythmbox/player/play-order"
+     new-order)
+    (message (if (string= new-order "'shuffle'")
+                 "shuffle on"
+               "shuffle off"))))
+
+(defvar counsel-rhythmbox-history nil
+  "History for `counsel-rhythmbox'.")
+
+(defvar counsel-rhythmbox-songs nil)
+
+(defun counsel-rhythmbox-current-song ()
+  "Return the currently playing song title."
+  (ignore-errors
+    (let* ((entry (dbus-get-property
+                   :session
+                   "org.mpris.MediaPlayer2.rhythmbox"
+                   "/org/mpris/MediaPlayer2"
+                   "org.mpris.MediaPlayer2.Player"
+                   "Metadata"))
+           (artist (caar (cadr (assoc "xesam:artist" entry))))
+           (album (cl-caadr (assoc "xesam:album" entry)))
+           (title (cl-caadr (assoc "xesam:title" entry))))
+      (format "%s - %s - %s" artist album title))))
+
+;;;###autoload
+(defun counsel-rhythmbox (&optional arg)
+  "Choose a song from the Rhythmbox library to play or enqueue."
+  (interactive "P")
+  (require 'dbus)
+  (when (or arg (null counsel-rhythmbox-songs))
+    (let* ((service "org.gnome.Rhythmbox3")
+           (path "/org/gnome/UPnP/MediaServer2/Library/all")
+           (interface "org.gnome.UPnP.MediaContainer2")
+           (nb-songs (dbus-get-property
+                      :session service path interface "ChildCount")))
+      (if (not nb-songs)
+          (error "Couldn't connect to Rhythmbox")
+        (setq counsel-rhythmbox-songs
+              (mapcar (lambda (x)
+                        (cons
+                         (format
+                          "%s - %s - %s"
+                          (cl-caadr (assoc "Artist" x))
+                          (cl-caadr (assoc "Album" x))
+                          (cl-caadr (assoc "DisplayName" x)))
+                         (cl-caaadr (assoc "URLs" x))))
+                      (dbus-call-method
+                       :session service path interface "ListChildren"
+                       0 nb-songs '("*")))))))
+  (ivy-read "Rhythmbox: " counsel-rhythmbox-songs
+            :require-match t
+            :history 'counsel-rhythmbox-history
+            :preselect (counsel-rhythmbox-current-song)
+            :action
+            '(1
+              ("p" counsel-rhythmbox-play-song "Play song")
+              ("e" counsel-rhythmbox-enqueue-song "Enqueue song")
+              ("s" counsel-rhythmbox-toggle-shuffle "Shuffle on/off"))
+            :caller 'counsel-rhythmbox))
+
+;;;; `counsel-linux-app'
+
+;; Added in Emacs 26.1.
+(require 'xdg nil t)
+
+(defalias 'counsel--xdg-data-home
+  (if (fboundp 'xdg-data-home)
+      #'xdg-data-home
+    (lambda ()
+      (let ((directory (getenv "XDG_DATA_HOME")))
+        (if (or (null directory) (string= directory ""))
+            "~/.local/share"
+          directory))))
+  "Compatibility shim for `xdg-data-home'.")
+
+(defalias 'counsel--xdg-data-dirs
+  (if (fboundp 'xdg-data-dirs)
+      #'xdg-data-dirs
+    (lambda ()
+      (let ((path (getenv "XDG_DATA_DIRS")))
+        (if (or (null path) (string= path ""))
+            '("/usr/local/share" "/usr/share")
+          (parse-colon-path path)))))
+  "Compatibility shim for `xdg-data-dirs'.")
+
+(defcustom counsel-linux-apps-directories
+  (mapcar (lambda (dir) (expand-file-name "applications" dir))
+          (cons (counsel--xdg-data-home)
+                (counsel--xdg-data-dirs)))
+  "Directories in which to search for applications (.desktop files)."
+  :type '(repeat directory))
+
+(defcustom counsel-linux-app-format-function #'counsel-linux-app-format-function-default
+  "Function to format Linux application names the `counsel-linux-app' menu.
+The format function will be passed the application's name, comment, and command
+as arguments."
+  :type '(choice
+          (const :tag "Command : Name - Comment" counsel-linux-app-format-function-default)
+          (const :tag "Name - Comment (Command)" counsel-linux-app-format-function-name-first)
+          (const :tag "Name - Comment" counsel-linux-app-format-function-name-only)
+          (const :tag "Name - Comment (Pretty)" counsel-linux-app-format-function-name-pretty)
+          (const :tag "Command" counsel-linux-app-format-function-command-only)
+          (function :tag "Custom")))
+
+(defface counsel-application-name
+  '((t :inherit font-lock-builtin-face))
+  "Face for displaying executable names."
+  :group 'ivy-faces)
+
+(defface counsel-outline-1
+  '((t :inherit org-level-1))
+  "Face for displaying level 1 headings."
+  :group 'ivy-faces)
+
+(defface counsel-outline-2
+  '((t :inherit org-level-2))
+  "Face for displaying level 2 headings."
+  :group 'ivy-faces)
+
+(defface counsel-outline-3
+  '((t :inherit org-level-3))
+  "Face for displaying level 3 headings."
+  :group 'ivy-faces)
+
+(defface counsel-outline-4
+  '((t :inherit org-level-4))
+  "Face for displaying level 4 headings."
+  :group 'ivy-faces)
+
+(defface counsel-outline-5
+  '((t :inherit org-level-5))
+  "Face for displaying level 5 headings."
+  :group 'ivy-faces)
+
+(defface counsel-outline-6
+  '((t :inherit org-level-6))
+  "Face for displaying level 6 headings."
+  :group 'ivy-faces)
+
+(defface counsel-outline-7
+  '((t :inherit org-level-7))
+  "Face for displaying level 7 headings."
+  :group 'ivy-faces)
+
+(defface counsel-outline-8
+  '((t :inherit org-level-8))
+  "Face for displaying level 8 headings."
+  :group 'ivy-faces)
+
+(defface counsel-outline-default
+  '((t :inherit minibuffer-prompt))
+  "Face for displaying headings."
+  :group 'ivy-faces)
+
+(defvar counsel-linux-apps-faulty nil
+  "List of faulty desktop files.")
+
+(defvar counsel--linux-apps-cache nil
+  "Cache of desktop files data.")
+
+(defvar counsel--linux-apps-cached-files nil
+  "List of cached desktop files.")
+
+(defvar counsel--linux-apps-cache-timestamp nil
+  "Time when we last updated the cached application list.")
+
+(defvar counsel--linux-apps-cache-format-function nil
+  "The function used to format the cached Linux application menu.")
+
+(defun counsel-linux-app-format-function-default (name comment exec)
+  "Default Linux application name formatter.
+NAME is the name of the application, COMMENT its comment and EXEC
+the command to launch it."
+  (format "% -45s: %s%s"
+          (propertize
+           (ivy--truncate-string
+            (replace-regexp-in-string "env +[^ ]+ +" "" exec t t)
+            45)
+           'face 'counsel-application-name)
+          name
+          (if comment
+              (concat " - " comment)
+            "")))
+
+(defun counsel-linux-app-format-function-name-first (name comment exec)
+  "Format Linux application names with the NAME (and COMMENT) first.
+EXEC is the command to launch the application."
+  (format "%s%s (%s)"
+          name
+          (if comment
+              (concat " - " comment)
+            "")
+          (propertize exec 'face 'counsel-application-name)))
+
+(defun counsel-linux-app-format-function-name-only (name comment _exec)
+  "Format Linux application names with the NAME (and COMMENT) only."
+  (format "%s%s"
+          name
+          (if comment
+              (concat " - " comment)
+            "")))
+
+(defun counsel-linux-app-format-function-command-only (_name _comment exec)
+  "Display only the command EXEC when formatting Linux application names."
+  exec)
+
+(defun counsel-linux-app-format-function-name-pretty (name comment _exec)
+  "Format Linux application names with the NAME (and COMMENT) only, but pretty."
+  (format "% -45s%s"
+          (propertize
+           (ivy--truncate-string name 45)
+           'face 'counsel-application-name)
+          (if comment
+              (concat ": " comment)
+            "")))
+
+(defun counsel-linux-apps-list-desktop-files ()
+  "Return an alist of all Linux applications.
+Each list entry is a pair of (desktop-name . desktop-file).
+This function always returns its elements in a stable order."
+  (let ((hash (make-hash-table :test #'equal))
+        result)
+    (dolist (dir counsel-linux-apps-directories)
+      (when (file-exists-p dir)
+        (let ((dir (file-name-as-directory dir)))
+          ;; Function `directory-files-recursively' added in Emacs 25.1.
+          (dolist (file (and (fboundp 'directory-files-recursively)
+                             (directory-files-recursively dir "\\.desktop\\'")))
+            (let ((id (subst-char-in-string ?/ ?- (file-relative-name file dir))))
+              (when (and (not (gethash id hash)) (file-readable-p file))
+                (push (cons id file) result)
+                (puthash id file hash)))))))
+    result))
+
+(defun counsel-linux-app--parse-file (file)
+  (with-temp-buffer
+    (insert-file-contents file)
+    (goto-char (point-min))
+    (let ((start (re-search-forward "^\\[Desktop Entry\\] *$" nil t))
+          (end (re-search-forward "^\\[" nil t))
+          (visible t)
+          name comment exec)
+      (catch 'break
+        (unless start
+          (push file counsel-linux-apps-faulty)
+          (message "Warning: File %s has no [Desktop Entry] group" file)
+          (throw 'break nil))
+
+        (goto-char start)
+        (when (re-search-forward "^\\(Hidden\\|NoDisplay\\) *= *\\(1\\|true\\) *$" end t)
+          (setq visible nil))
+        (setq name (match-string 1))
+
+        (goto-char start)
+        (unless (re-search-forward "^Type *= *Application *$" end t)
+          (throw 'break nil))
+        (setq name (match-string 1))
+
+        (goto-char start)
+        (unless (re-search-forward "^Name *= *\\(.+\\)$" end t)
+          (push file counsel-linux-apps-faulty)
+          (message "Warning: File %s has no Name" file)
+          (throw 'break nil))
+        (setq name (match-string 1))
+
+        (goto-char start)
+        (when (re-search-forward "^Comment *= *\\(.+\\)$" end t)
+          (setq comment (match-string 1)))
+
+        (goto-char start)
+        (unless (re-search-forward "^Exec *= *\\(.+\\)$" end t)
+          ;; Don't warn because this can technically be a valid desktop file.
+          (throw 'break nil))
+        (setq exec (match-string 1))
+
+        (goto-char start)
+        (when (re-search-forward "^TryExec *= *\\(.+\\)$" end t)
+          (let ((try-exec (match-string 1)))
+            (unless (locate-file try-exec exec-path nil #'file-executable-p)
+              (throw 'break nil))))
+        (propertize
+         (funcall counsel-linux-app-format-function name comment exec)
+         'visible visible)))))
+
+(defun counsel-linux-apps-parse (desktop-entries-alist)
+  "Parse the given alist of Linux desktop entries.
+Each entry in DESKTOP-ENTRIES-ALIST is a pair of ((id . file-name)).
+Any desktop entries that fail to parse are recorded in
+`counsel-linux-apps-faulty'."
+  (let (result)
+    (setq counsel-linux-apps-faulty nil)
+    (dolist (entry desktop-entries-alist result)
+      (let* ((id (car entry))
+             (file (cdr entry))
+             (r (counsel-linux-app--parse-file file)))
+        (when r
+          (push (cons r id) result))))))
+
+(defun counsel-linux-apps-list ()
+  "Return list of all Linux desktop applications."
+  (let* ((new-desktop-alist (counsel-linux-apps-list-desktop-files))
+         (new-files (mapcar #'cdr new-desktop-alist)))
+    (unless (and
+             (eq counsel-linux-app-format-function
+                 counsel--linux-apps-cache-format-function)
+             (equal new-files counsel--linux-apps-cached-files)
+             (cl-notany (lambda (file)
+                          (time-less-p
+                           counsel--linux-apps-cache-timestamp
+                           (nth 5 (file-attributes file))))
+                        new-files))
+      (setq counsel--linux-apps-cache (counsel-linux-apps-parse new-desktop-alist))
+      (setq counsel--linux-apps-cache-format-function counsel-linux-app-format-function)
+      (setq counsel--linux-apps-cache-timestamp (current-time))
+      (setq counsel--linux-apps-cached-files new-files)))
+  counsel--linux-apps-cache)
+
+
+(defun counsel-linux-app-action-default (desktop-shortcut)
+  "Launch DESKTOP-SHORTCUT."
+  (call-process "gtk-launch" nil 0 nil (cdr desktop-shortcut)))
+
+(defun counsel-linux-app-action-file (desktop-shortcut)
+  "Launch DESKTOP-SHORTCUT with a selected file."
+  (call-process "gtk-launch" nil 0 nil
+                (cdr desktop-shortcut)
+                (read-file-name "File: ")))
+
+(defun counsel-linux-app-action-open-desktop (desktop-shortcut)
+  "Open DESKTOP-SHORTCUT."
+  (let* ((app (cdr desktop-shortcut))
+         (file (cdr (assoc app (counsel-linux-apps-list-desktop-files)))))
+    (if file
+        (find-file file)
+      (error "Could not find location of file %s" app))))
+
+(ivy-set-actions
+ 'counsel-linux-app
+ '(("f" counsel-linux-app-action-file "run on a file")
+   ("d" counsel-linux-app-action-open-desktop "open desktop file")))
+
+;;;###autoload
+(defun counsel-linux-app (&optional arg)
+  "Launch a Linux desktop application, similar to Alt-<F2>.
+When ARG is non-nil, ignore NoDisplay property in *.desktop files."
+  (interactive "P")
+  (ivy-read "Run application: " (counsel-linux-apps-list)
+            :predicate (unless arg (lambda (x) (get-text-property 0 'visible (car x))))
+            :action #'counsel-linux-app-action-default
+            :caller 'counsel-linux-app))
+
+;;;; `counsel-wmctrl'
+
+(defun counsel-wmctrl-action (x)
+  "Select the desktop window that corresponds to X."
+  (counsel--run "wmctrl" "-i" "-a" (cdr x)))
+
+(defvar counsel-wmctrl-ignore '("XdndCollectionWindowImp"
+                                "unity-launcher" "unity-panel" "unity-dash"
+                                "Hud" "Desktop")
+  "List of window titles to ignore for `counsel-wmctrl'.")
+
+(defun counsel--wmctrl-parse (s)
+  (when (string-match "\\`\\([0-9a-fx]+\\) +\\([-0-9]+\\) +\\(?:[0-9]+\\) +\\([^ ]+\\) \\(.+\\)$" s)
+    (let ((title (match-string 4 s))
+          (id (match-string 1 s)))
+      (unless (member title counsel-wmctrl-ignore)
+        (cons title id)))))
+
+;;;###autoload
+(defun counsel-wmctrl ()
+  "Select a desktop window using wmctrl."
+  (interactive)
+  (let* ((cands1 (counsel--sl "wmctrl -l -p"))
+         (cands2 (delq nil (mapcar #'counsel--wmctrl-parse cands1))))
+    (ivy-read "window: " cands2
+              :action #'counsel-wmctrl-action
+              :caller 'counsel-wmctrl)))
+
+(defvar counsel--switch-buffer-temporary-buffers nil
+  "Internal.")
+
+(defvar counsel--switch-buffer-previous-buffers nil
+  "Internal.")
+
+(defun counsel--switch-buffer-unwind ()
+  "Clear temporary file buffers and restore `buffer-list'.
+The buffers are those opened during a session of `counsel-switch-buffer'."
+  (mapc #'kill-buffer counsel--switch-buffer-temporary-buffers)
+  (dolist (buf counsel--switch-buffer-previous-buffers)
+    (when (buffer-live-p buf) (bury-buffer buf)))
+  (setq counsel--switch-buffer-temporary-buffers ())
+  (setq counsel--switch-buffer-previous-buffers ()))
+
+(defcustom counsel-switch-buffer-preview-virtual-buffers t
+  "When non-nil, `counsel-switch-buffer' will preview virtual buffers."
+  :type 'boolean)
+
+(defun counsel--switch-buffer-update-fn ()
+  (unless counsel--switch-buffer-previous-buffers
+    (setq counsel--switch-buffer-previous-buffers (buffer-list)))
+  (let* ((virtual (assoc (ivy-state-current ivy-last) ivy--virtual-buffers)))
+    (when (member (ivy-state-current ivy-last) ivy-marked-candidates)
+      (setf (ivy-state-current ivy-last)
+            (substring (ivy-state-current ivy-last) (length ivy-mark-prefix))))
+    (cond
+      ((get-buffer (ivy-state-current ivy-last))
+       (let ((ivy-marked-candidates nil))
+         (ivy-call)))
+      ((and counsel-switch-buffer-preview-virtual-buffers virtual (file-exists-p (cdr virtual)))
+       (let ((buf (ignore-errors
+                    ;; may not open due to `large-file-warning-threshold' etc.
+                    (find-file-noselect (cdr virtual)))))
+         (if buf
+             (progn
+               (push buf counsel--switch-buffer-temporary-buffers)
+               (ivy-call))
+           ;; clean up the minibuffer so that there's no delay before
+           ;; the Ivy candidates are displayed once again
+           (message ""))))
+      (t
+       (with-ivy-window
+         (switch-to-buffer (ivy-state-buffer ivy-last)))))))
+
+;;;###autoload
+(defun counsel-switch-buffer ()
+  "Switch to another buffer.
+Display a preview of the selected ivy completion candidate buffer
+in the current window."
+  (interactive)
+  (let ((ivy-update-fns-alist
+         '((ivy-switch-buffer . counsel--switch-buffer-update-fn)))
+        (ivy-unwind-fns-alist
+         '((ivy-switch-buffer . counsel--switch-buffer-unwind))))
+    (ivy-switch-buffer)))
+
+;;;###autoload
+(defun counsel-switch-buffer-other-window ()
+  "Switch to another buffer in another window.
+Display a preview of the selected ivy completion candidate buffer
+in the current window."
+  (interactive)
+  (let ((ivy-update-fns-alist
+         '((ivy-switch-buffer-other-window . counsel--switch-buffer-update-fn)))
+        (ivy-unwind-fns-alist
+         '((ivy-switch-buffer-other-window . counsel--switch-buffer-unwind))))
+    (ivy-switch-buffer-other-window)))
+
+(defun counsel-open-buffer-file-externally (buffer)
+  "Open the file associated with BUFFER with an external program."
+  (when (zerop (length buffer))
+    (user-error "Can't open that"))
+  (let* ((virtual (assoc buffer ivy--virtual-buffers))
+         (filename (if virtual
+                       (cdr virtual)
+                     (buffer-file-name (get-buffer buffer)))))
+    (unless filename
+      (user-error "Can't open `%s' externally" buffer))
+    (counsel-locate-action-extern (expand-file-name filename))))
+
+(ivy-add-actions
+ 'ivy-switch-buffer
+ '(("x" counsel-open-buffer-file-externally "open externally")))
+
+(ivy-set-actions
+ 'counsel-switch-buffer
+ '(("x" counsel-open-buffer-file-externally "open externally")
+   ("j" ivy--switch-buffer-other-window-action "other window")))
+
+;;;; `counsel-compile'
+
+(defvar counsel-compile-history nil
+  "History for `counsel-compile'.
+
+This is a list of strings with additional properties which allow
+the history to be filtered depending on the context of the call.
+The properties include:
+
+`srcdir'
+    the root directory of the source code
+`blddir'
+    the root directory of the build (in or outside the `srcdir')
+`bldenv'
+    the build environment as passed to `compilation-environment'
+`recursive'
+    the completion should be run again in `blddir' of this result
+`cmd'
+    if set, pass only the substring with this property to `compile'
+
+This variable is suitable for addition to
+`savehist-additional-variables'.")
+
+(defvar counsel-compile-root-functions
+  '(counsel--projectile-root
+    counsel--project-current
+    counsel--configure-root
+    counsel--git-root
+    counsel--dir-locals-root)
+  "Special hook to find the project root for compile commands.
+Each function on this hook is called in turn with no arguments
+and should return either a directory, or nil if no root was
+found.")
+
+(defun counsel--compile-root ()
+  "Return root of current project or signal an error on failure.
+The root is determined by `counsel-compile-root-functions'."
+  (or (run-hook-with-args-until-success 'counsel-compile-root-functions)
+      (error "Couldn't find project root")))
+
+(defun counsel--projectile-root ()
+  "Return root of current projectile project or nil on failure.
+Use `projectile-project-root' to determine the root."
+  (and (fboundp 'projectile-project-root)
+       (projectile-project-root)))
+
+(defun counsel--project-current ()
+  "Return root of current project or nil on failure.
+Use `project-current' to determine the root."
+  (let ((proj (and (fboundp 'project-current)
+                   (project-current))))
+    (cond ((not proj) nil)
+          ((fboundp 'project-root)
+           (project-root proj))
+          ((fboundp 'project-roots)
+           (car (project-roots proj))))))
+
+(defun counsel--configure-root ()
+  "Return root of current project or nil on failure.
+Use the presence of a \"configure\" file to determine the root."
+  (counsel--dominating-file "configure"))
+
+(defun counsel--git-root ()
+  "Return root of current project or nil on failure.
+Use the presence of a \".git\" file to determine the root."
+  (counsel--dominating-file ".git"))
+
+(defun counsel--dir-locals-root ()
+  "Return root of current project or nil on failure.
+Use the presence of a `dir-locals-file' to determine the root."
+  (counsel--dominating-file dir-locals-file))
+
+(defvar counsel-compile-local-builds
+  '(counsel-compile-get-filtered-history
+    counsel-compile-get-build-directories
+    counsel-compile-get-make-invocation
+    counsel-compile-get-make-help-invocations)
+  "Additional compile invocations to feed into `counsel-compile'.
+
+This can either be a list of compile invocation strings or
+functions that will provide such a list.  You should customize
+this if you want to provide specific non-standard build types to
+`counsel-compile'.  The default helpers are set up to handle
+common build environments.")
+
+(defcustom counsel-compile-make-args "-k"
+  "Additional arguments for make.
+You may, for example, want to add \"-jN\" for the number of cores
+N in your system."
+  :type 'string)
+
+(defcustom counsel-compile-env nil
+  "List of environment variables for compilation to inherit.
+Each element should be a string of the form ENVVARNAME=VALUE.  This
+list is passed to `compilation-environment'."
+  :type '(repeat (string :tag "ENVVARNAME=VALUE")))
+
+(defvar counsel-compile-env-history nil
+  "History for `counsel-compile-env'.")
+
+(defvar counsel-compile-env-pattern
+  "[_[:digit:][:upper:]]+=[/[:alnum:]]*"
+  "Pattern to match valid environment variables.")
+
+(defcustom counsel-compile-make-pattern "\\`\\(?:GNUm\\|[Mm]\\)akefile\\'"
+  "Regexp for matching the names of Makefiles."
+  :type 'regexp)
+
+(defcustom counsel-compile-build-directories
+  '("build" "builds" "bld" ".build")
+  "List of potential build subdirectory names to check for."
+  :type '(repeat directory))
+
+(defvar counsel-compile-phony-pattern "^\\.PHONY:[\t ]+\\(.+\\)$"
+  "Regexp for extracting phony targets from Makefiles.")
+
+(defvar counsel-compile-help-pattern
+  "\\(?:^\\(\\*\\)?[[:space:]]+\\([^[:space:]]+\\)[[:space:]]+-\\)"
+  "Regexp for extracting help targets from a make help call.")
+
+;; This is loosely based on the Bash Make completion code which
+;; relies on GNUMake having the following return codes:
+;;   0 = no-rebuild, -q & 1 needs rebuild, 2 error
+(defun counsel-compile--probe-make-targets (dir)
+  "Return a list of Make targets for DIR.
+
+Return a single blank target (so we invoke the default target)
+if Make exits with an error.  This might happen because some sort
+of configuration needs to be done first or the source tree is
+pristine and being used for multiple build trees."
+  (with-temp-buffer
+    (let* ((default-directory dir)
+           (res (call-process "make" nil t nil "-nqp"))
+           targets)
+      (if (or (not (numberp res)) (> res 1))
+          (list "")
+        (goto-char (point-min))
+        (while (re-search-forward counsel-compile-phony-pattern nil t)
+          (push (split-string (match-string-no-properties 1)) targets))
+        (sort (apply #'nconc targets) #'string-lessp)))))
+
+(defun counsel-compile--pretty-propertize (leader text face)
+  "Return a pretty string of the form \" LEADER TEXT\".
+LEADER is propertized with a warning face and the remaining
+text with FACE."
+  (concat (propertize (concat " " leader " ")
+                      'face
+                      'font-lock-warning-face)
+          (propertize text 'face face)))
+
+(defun counsel--compile-get-make-targets (probe-fn srcdir &optional blddir)
+  "Return propertized make targets returned by PROBE-FN in SRCDIR.
+
+The optional BLDDIR allows for handling build directories.  We
+search the Makefile for a list of phony targets which are
+generally the top level targets a Make system provides.  The
+resulting strings are tagged with properties that
+`counsel-compile-history' can use for filtering results."
+  (let ((fmt (format (propertize "make %s %%s" 'cmd t)
+                     counsel-compile-make-args))
+        (suffix (and blddir
+                     (counsel-compile--pretty-propertize "in" blddir
+                                                         'dired-directory)))
+        (build-env (and counsel-compile-env
+                        (counsel-compile--pretty-propertize
+                         "with"
+                         (mapconcat #'identity counsel-compile-env " ")
+                         'font-lock-variable-name-face)))
+        (props `(srcdir ,srcdir blddir ,blddir bldenv ,counsel-compile-env)))
+    (mapcar (lambda (target)
+              (setq target (concat (format fmt target) suffix build-env))
+              (add-text-properties 0 (length target) props target)
+              target)
+            (funcall probe-fn (or blddir srcdir)))))
+
+(defun counsel-compile-get-make-invocation (&optional blddir)
+  "Have a look in the root directory for any build control files.
+
+The optional BLDDIR is useful for other helpers that have found
+sub-directories that builds may be invoked in."
+  (let ((srcdir (counsel--compile-root)))
+    (when (directory-files (or blddir srcdir) nil
+                           counsel-compile-make-pattern t)
+      (counsel--compile-get-make-targets
+       #'counsel-compile--probe-make-targets srcdir blddir))))
+
+(defun counsel-compile--probe-make-help (dir)
+  "Return a list of Make targets based on help for DIR.
+
+It is quite common for a \"make help\" invocation to return a
+human readable list of targets.  Often common targets are marked
+with a leading asterisk.  The exact search pattern is controlled
+by `counsel-compile-help-pattern'."
+  (let ((default-directory dir)
+        primary-targets targets)
+    ;; Only proceed if the help target exists.
+    (when (eql 1 (apply #'call-process "make" nil nil nil "-q" "help"
+                        counsel-compile-env))
+      (with-temp-buffer
+        (when (eql 0 (apply #'call-process "make" nil t nil "help"
+                            counsel-compile-env))
+          (goto-char (point-min))
+          (while (re-search-forward counsel-compile-help-pattern nil t)
+            (push (match-string 2)
+                  (if (match-beginning 1) primary-targets targets)))
+          (nconc (sort primary-targets #'string-lessp)
+                 (sort targets #'string-lessp)))))))
+
+(defun counsel-compile-get-make-help-invocations (&optional blddir)
+  "Query the root directory for makefiles with help output.
+
+The optional BLDDIR is useful for other helpers that have found
+sub-directories that builds may be invoked in."
+  (let ((srcdir (counsel--compile-root)))
+    (when (directory-files (or blddir srcdir) nil
+                           counsel-compile-make-pattern t)
+      (counsel--compile-get-make-targets
+       #'counsel-compile--probe-make-help srcdir blddir))))
+
+(defun counsel--find-build-subdir (srcdir)
+  "Return builds subdirectory of SRCDIR, if one exists."
+  (cl-some (lambda (dir)
+             (setq dir (expand-file-name dir srcdir))
+             (and (file-directory-p dir) dir))
+           counsel-compile-build-directories))
+
+(defun counsel--get-build-subdirs (blddir)
+  "Return all subdirs under BLDDIR sorted by modification time.
+If there are non-directory files in BLDDIR, include BLDDIR in the
+list as it may also be a build directory."
+  (let* ((files (directory-files-and-attributes
+                 blddir t directory-files-no-dot-files-regexp t))
+         (total (length files))
+         (dirs (cl-delete-if-not
+                (lambda (entry)
+                  (let ((dir (nth 1 entry)))
+                    (and dir (or (eq dir t)
+                                 ;; Symlink.
+                                 (file-directory-p (nth 0 entry))))))
+                files)))
+    ;; Any non-dir files?
+    (when (< (length dirs) total)
+      (push (cons blddir (file-attributes blddir)) dirs))
+    (mapcar #'car (sort dirs (lambda (x y)
+                               (time-less-p (nth 6 y) (nth 6 x)))))))
+
+(defun counsel-compile-get-build-directories (&optional dir)
+  "Return a list of potential build directories."
+  (let* ((srcdir (or dir (counsel--compile-root)))
+         (blddir (counsel--find-build-subdir srcdir))
+         (props `(srcdir ,srcdir recursive t))
+         (fmt (concat (propertize "Select build in "
+                                  'face 'font-lock-warning-face)
+                      (propertize "%s" 'face 'dired-directory))))
+    (mapcar (lambda (subdir)
+              (let ((s (format fmt subdir)))
+                (add-text-properties 0 (length s) `(blddir ,subdir ,@props) s)
+                s))
+            (and blddir (counsel--get-build-subdirs blddir)))))
+
+;; This is a workaround for the fact there is no concept of "project"
+;; local variables (as opposed to for example buffer-local).  So we
+;; store all our history in a global list filter out the results we
+;; don't want.
+(defun counsel-compile-get-filtered-history (&optional dir)
+  "Return a compile history relevant to current project."
+  (let ((root (or dir (counsel--compile-root)))
+        history)
+    (dolist (item counsel-compile-history)
+      (let ((srcdir (get-text-property 0 'srcdir item))
+            (blddir (get-text-property 0 'blddir item)))
+        (when (or (and srcdir (file-in-directory-p srcdir root))
+                  (and blddir (file-in-directory-p blddir root)))
+          (push item history))))
+    (nreverse history)))
+
+(defun counsel--get-compile-candidates (&optional dir)
+  "Return the list of compile commands.
+This is determined by `counsel-compile-local-builds', which see."
+  (let (cands)
+    (dolist (cmds counsel-compile-local-builds)
+      (when (functionp cmds)
+        (setq cmds (funcall cmds dir)))
+      (when cmds
+        (push (if (listp cmds) cmds (list cmds)) cands)))
+    (apply #'append (nreverse cands))))
+
+;; This is a workaround to ensure we tag all the relevant metadata in
+;; our compile history.  This also allows M-x compile to do fancy
+;; things like infer `default-directory' from 'cd's in the string.
+(defun counsel-compile--update-history (_proc)
+  "Update `counsel-compile-history' from the compilation state."
+  (defvar compilation-arguments)
+  (defvar compilation-environment)
+  (let* ((srcdir (counsel--compile-root))
+         (blddir default-directory)
+         (bldenv compilation-environment)
+         (cmd (concat
+               (propertize (car compilation-arguments) 'cmd t)
+               (unless (file-equal-p blddir srcdir)
+                 (counsel-compile--pretty-propertize "in" blddir
+                                                     'dired-directory))
+               (when bldenv
+                 (counsel-compile--pretty-propertize "with"
+                                                     (mapconcat #'identity bldenv " ")
+                                                     'font-lock-variable-name-face)))))
+    (add-text-properties 0 (length cmd)
+                         `(srcdir ,srcdir blddir ,blddir bldenv ,bldenv) cmd)
+    (add-to-history 'counsel-compile-history cmd)))
+
+(defvar counsel-compile--current-build-dir nil
+  "Tracks the last directory `counsel-compile' was called with.
+
+This state allows us to set it correctly if the user has manually
+edited the command, thus losing our embedded state.")
+
+(defun counsel-compile--action (cmd)
+  "Process CMD to call `compile'.
+
+If CMD has the `recursive' property set we call `counsel-compile'
+again to further refine the compile options in the directory
+specified by the `blddir' property."
+  (defvar compilation-environment)
+  (let ((blddir (get-text-property 0 'blddir cmd))
+        (bldenv (get-text-property 0 'bldenv cmd)))
+    (if (get-text-property 0 'recursive cmd)
+        (counsel-compile blddir)
+      (when (get-char-property 0 'cmd cmd)
+        (setq cmd (substring-no-properties
+                   cmd 0 (next-single-property-change 0 'cmd cmd))))
+      (let ((default-directory (or blddir
+                                   counsel-compile--current-build-dir
+                                   default-directory))
+            (compilation-environment bldenv))
+        ;; No need to specify `:history' because of this hook.
+        (add-hook 'compilation-start-hook #'counsel-compile--update-history)
+        (unwind-protect
+             (compile cmd)
+          (remove-hook 'compilation-start-hook #'counsel-compile--update-history))))))
+
+(defun counsel-compile-edit-command ()
+  "Insert current compile command into the minibuffer for editing.
+
+This mirrors the behavior of `ivy-insert-current' but with specific
+handling for the `counsel-compile' metadata."
+  (interactive)
+  (delete-minibuffer-contents)
+  (let* ((cmd (ivy-state-current ivy-last))
+         (blddir (get-text-property 0 'blddir cmd)))
+    (when blddir
+      (setq counsel-compile--current-build-dir blddir))
+    (insert (substring-no-properties
+             cmd 0 (and (get-text-property 0 'cmd cmd)
+                        (next-single-property-change 0 'cmd cmd))))))
+(ivy--no-M-x #'counsel-compile-edit-command #'ivy--minibuffer-p)
+
+;; Currently the only thing we do is override Ivy's default insert
+;; operation which doesn't include the metadata we want.
+(defvar counsel-compile-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map `[remap ,#'ivy-insert-current]
+                #'counsel-compile-edit-command)
+    map)
+  "Additional Ivy keybindings during command selection.")
+
+;;;###autoload
+(defun counsel-compile (&optional dir)
+  "Call `compile' completing with smart suggestions, optionally for DIR.
+
+Additional actions:
+
+\\{counsel-compile-map}"
+  (interactive)
+  (require 'compile)
+  (require 'dired) ;; For face `dired-directory'.
+  (setq counsel-compile--current-build-dir (or dir
+                                               (counsel--compile-root)
+                                               default-directory))
+  (ivy-read "Compile command: "
+            (delete-dups (counsel--get-compile-candidates dir))
+            :action #'counsel-compile--action
+            :keymap counsel-compile-map
+            :caller 'counsel-compile))
+
+(ivy-add-actions
+ 'counsel-compile
+ '(("d" counsel-compile-forget-command "delete")))
+
+(defun counsel-compile-forget-command (cmd)
+  "Delete CMD from `counsel-compile-history'."
+  (setq counsel-compile-history
+        (delete cmd counsel-compile-history)))
+
+(defun counsel-compile-env--format-hint (cands)
+  "Return a formatter for compile-env CANDS."
+  (let ((rmstr
+         (propertize "remove" 'face 'font-lock-warning-face))
+        (addstr
+         (propertize "add" 'face 'font-lock-variable-name-face)))
+    (ivy--format-function-generic
+     (lambda (selected)
+       (format "%s %s"
+               (if (member selected counsel-compile-env) rmstr addstr)
+               selected))
+     #'identity
+     cands
+     "\n")))
+
+(defun counsel-compile-env--update (var)
+  "Update `counsel-compile-env' either adding or removing VAR."
+  (cond ((member var counsel-compile-env)
+         (setq counsel-compile-env (delete var counsel-compile-env)))
+        ((string-match-p counsel-compile-env-pattern var)
+         (push var counsel-compile-env))
+        (t (user-error "Ignoring malformed variable: '%s'" var))))
+
+;;;###autoload
+(defun counsel-compile-env ()
+  "Update `counsel-compile-env' interactively."
+  (interactive)
+  (ivy-read "Compile environment variable: "
+            (delete-dups (append
+                          counsel-compile-env counsel-compile-env-history))
+            :action #'counsel-compile-env--update
+            :predicate (lambda (cand)
+                         (string-match-p counsel-compile-env-pattern
+                                         cand))
+            :history 'counsel-compile-env-history
+            :caller 'counsel-compile-env))
+
+(ivy-configure 'counsel-compile-env
+  :format-fn #'counsel-compile-env--format-hint)
+
+;;;; `counsel-search'
+
+(defcustom counsel-search-engine 'ddg
+  "The search engine choice in `counsel-search-engines-alist'."
+  :type '(choice
+          (const :tag "DuckDuckGo" ddg)
+          (const :tag "Google" google)))
+
+(defcustom counsel-search-engines-alist
+  '((ddg
+     "https://duckduckgo.com/ac/"
+     "https://duckduckgo.com/html/?q="
+     counsel--search-request-data-ddg)
+    (google
+     "https://suggestqueries.google.com/complete/search"
+     "https://www.google.com/search?q="
+     counsel--search-request-data-google))
+  "List of search engine parameters for `counsel-search'.
+Each element is of the form (SYMBOL SUGGEST BROWSE EXTRACT), where:
+SYMBOL identifies the search engine, as per `counsel-search-engine'.
+SUGGEST is the URL to query for suggestions.
+BROWSE is the URL prefix for visiting the selected result.
+EXTRACT is a function that takes the object parsed from the SUGGEST
+ endpoint and transforms it into a set of Ivy candidates."
+  :package-version '(counsel . "0.15.1")
+  :type '(alist :key-type symbol :value-type (list string string function)))
+
+(defun counsel--search-request-data-google (data)
+  "Extract Google suggestions from parsed JSON DATA.
+Expects input of the form [\"a\" [\"ab\" \"ac\"] ...]."
+  (append (aref data 1) ()))
+
+(defun counsel--search-request-data-ddg (data)
+  "Extract DuckDuckGo suggestions from parsed JSON DATA.
+Expects input of the form [((phrase . \"ab\")) ...]."
+  (mapcar #'cdar data))
+
+(defvar counsel--native-json)
+(put 'counsel--native-json 'variable-documentation
+     "Non-nil if Emacs supports JSON natively, or void.")
+
+(defun counsel--search-update (extract str type)
+  "Call EXTRACT on JSON STR of Content-TYPE."
+  (unless (fboundp 'mail-header-parse-content-type)
+    (require 'mail-parse))
+  (declare-function json-parse-string "json.c")
+  (declare-function json-read-from-string "json")
+  (declare-function mail-content-type-get "mail-parse")
+  (declare-function mail-header-parse-content-type "mail-parse")
+  (let* ((ct (and type (mail-header-parse-content-type type)))
+         (coding (coding-system-from-name (mail-content-type-get ct 'charset))))
+    (when coding
+      (setq str (decode-coding-string str coding t))))
+  (let ((obj (if counsel--native-json
+                 (json-parse-string str :object-type 'alist)
+               (defvar json-array-type)
+               (defvar json-object-type)
+               (let ((json-array-type 'vector)
+                     (json-object-type 'alist))
+                 (json-read-from-string str)))))
+    (ivy-update-candidates (funcall extract obj))))
+
+(defun counsel--search-plz (url extract)
+  "Fetch URL with `plz' and EXTRACT its JSON payload."
+  (declare-function plz "ext:plz")
+  (declare-function plz-response-body "ext:plz")
+  (declare-function plz-response-headers "ext:plz")
+  ;; Doesn't handle Content-Type, so defer decoding+parsing until :then.
+  ;; (See URL `https://github.com/alphapapa/plz.el/pull/66'.)
+  ;; Ask for a `plz-response' object because it already contains the parsed
+  ;; headers (though just widening the response buffer could be quicker).
+  (plz 'get url :as 'response :decode nil :noquery t
+    :then (lambda (response)
+            (let* ((heads (plz-response-headers response))
+                   (body (plz-response-body response))
+                   (ct (cdr (assq 'content-type heads))))
+              (counsel--search-update extract body ct)))))
+
+(defun counsel--search-request (url extract)
+  "Fetch URL with `request' and EXTRACT its JSON payload."
+  (declare-function request "ext:request")
+  (declare-function request-response-header "ext:request")
+  ;; Doesn't handle Content-Type (expects coding system a priori),
+  ;; so defer decoding+parsing until :success.
+  (request url :type "GET"
+    :success (cl-function
+              (lambda (&key data response &allow-other-keys)
+                (let ((ct (request-response-header response "content-type")))
+                  (counsel--search-update extract data ct))))))
+
+(defvar counsel--search-backend)
+(put 'counsel--search-backend 'variable-documentation
+     "Feature symbol indicating available HTTP library, or void.
+Valid values are the keys of `counsel--search-backends'.")
+
+(defvar counsel--search-backends
+  `((plz ,#'counsel--search-plz)
+    (request ,#'counsel--search-request))
+  "List of (BACKEND GETTER) for `counsel-search'.
+BACKEND is a feature symbol like `counsel--search-backend'.
+GETTER is a function taking a URL and an EXTRACT function as in
+ `counsel-search-engines-alist'.")
+
+(defun counsel-search-function (input)
+  "Create a request to a search engine with INPUT.
+Return 0 tells `ivy--exhibit' not to update the minibuffer.
+We update it in the callback with `ivy-update-candidates'."
+  (or
+   (ivy-more-chars)
+   (let* ((backend (assq counsel--search-backend counsel--search-backends))
+          (engine (assq counsel-search-engine counsel-search-engines-alist))
+          (suggest (nth 1 engine))
+          (extract (nth 3 engine))
+          (url (concat suggest (if (ivy--string-search "?" suggest) "&" "?")
+                       ;; FIXME: `client' needed only for `google'?
+                       (url-build-query-string `(("client" "firefox")
+                                                 ("q" ,input))))))
+     ;; Do we need to cancel requests already in flight?
+     (funcall (nth 1 backend) url extract)
+     0)))
+
+(defun counsel-search-action (candidate)
+  "Browse the search results for `counsel-search' CANDIDATE."
+  (let ((engine (assq counsel-search-engine counsel-search-engines-alist)))
+    (browse-url (concat (nth 2 engine) (url-hexify-string candidate)))))
+
+(defun counsel-search ()
+  "Ivy interface for querying a search engine.
+Dynamically displays search suggestions for the current input.
+The user options `counsel-search-engine' and
+`counsel-search-engines-alist' determine the engine."
+  (interactive)
+  (unless (boundp 'counsel--search-backend)
+    (setq counsel--search-backend
+          ;; `plz' is on GNU ELPA; `request' on NonGNU ELPA.
+          (or (require 'plz nil t)
+              (require 'request nil t)
+              (user-error
+               "Required package `plz' (or `request') not installed"))))
+  ;; - Emacs 27: optional native JSON support.
+  ;; - Emacs 28: `json-available-p'.
+  ;; - Emacs 30: unconditional native JSON support.
+  ;; That means the following sets `counsel--native-json' to nil even for
+  ;; Emacs 27 with native JSON support, in the interest of simplicity.
+  (or (boundp 'counsel--native-json)
+      (setq counsel--native-json
+            (and (fboundp 'json-available-p)
+                 (json-available-p)))
+      (require 'json))
+  (ivy-read "search: " #'counsel-search-function
+            :action #'counsel-search-action
+            :dynamic-collection t
+            :caller 'counsel-search))
+
+(define-obsolete-function-alias 'counsel-google
+    #'counsel-search "0.13.2 (2019-10-17)")
+
+;;;; `counsel-compilation-errors'
+
+(declare-function compilation--message->loc "compile" t t)
+(declare-function compilation-buffer-p "compile")
+(declare-function compilation-next-single-property-change "compile")
+(declare-function compile-goto-error "compile")
+
+(defun counsel--compilation-errors-buffer (buf)
+  (with-current-buffer buf
+    (let ((res nil)
+          (pt (point-min)))
+      (save-excursion
+        (while (setq pt (compilation-next-single-property-change
+                         pt 'compilation-message))
+          (let ((loc (get-text-property pt 'compilation-message)))
+            (when (and loc (setq loc (compilation--message->loc loc)))
+              (goto-char pt)
+              (push
+               (propertize
+                (buffer-substring-no-properties pt (line-end-position))
+                'pt pt
+                'buffer buf)
+               res)))))
+      (nreverse res))))
+
+(defun counsel-compilation-errors-cands ()
+  (cl-loop
+     for buf in (buffer-list)
+     when (compilation-buffer-p buf)
+     nconc (counsel--compilation-errors-buffer buf)))
+
+(defun counsel-compilation-errors-action (x)
+  (pop-to-buffer (get-text-property 0 'buffer x))
+  (goto-char (get-text-property 0 'pt x))
+  (compile-goto-error))
+
+;;;###autoload
+(defun counsel-compilation-errors ()
+  "Compilation errors."
+  (interactive)
+  (require 'compile)
+  (ivy-read "compilation errors: " (counsel-compilation-errors-cands)
+            :require-match t
+            :action #'counsel-compilation-errors-action
+            :history 'counsel-compilation-errors-history))
+
+;;;; `counsel-flycheck'
+
+(defvar flycheck-current-errors)
+(declare-function flycheck-error-filename "ext:flycheck")
+(declare-function flycheck-error-line "ext:flycheck")
+(declare-function flycheck-error-message "ext:flycheck")
+(declare-function flycheck-jump-to-error "ext:flycheck")
+
+(defun counsel-flycheck-errors-cands ()
+  (mapcar
+   (lambda (err)
+     (propertize
+      (format "%s:%d:%s"
+              (file-name-base (flycheck-error-filename err))
+              (flycheck-error-line err)
+              (flycheck-error-message err)) 'error err))
+   flycheck-current-errors))
+
+(defun counsel-flycheck-occur (cands)
+  "Generate a custom occur buffer for `counsel-flycheck'."
+  (unless (eq major-mode 'ivy-occur-grep-mode)
+    (ivy-occur-grep-mode)
+    (setq default-directory (ivy-state-directory ivy-last)))
+  (swiper--occur-insert-lines
+   (mapcar
+    (lambda (cand)
+      (let ((err (get-text-property 0 'error cand)))
+        (propertize
+         (format
+          "%s:%d:%s"
+          (flycheck-error-filename err)
+          (flycheck-error-line err)
+          cand)
+         'error err)))
+    cands)))
+
+(defun counsel-flycheck-errors-action (err)
+  (flycheck-jump-to-error (get-text-property 0 'error err)))
+
+(ivy-configure 'counsel-flycheck
+  :occur #'counsel-flycheck-occur)
+
+;;;###autoload
+(defun counsel-flycheck ()
+  "Flycheck errors."
+  (interactive)
+  (require 'flycheck)
+  (ivy-read "flycheck errors: " (counsel-flycheck-errors-cands)
+            :require-match t
+            :action #'counsel-flycheck-errors-action
+            :history 'counsel-flycheck-errors-history))
+
+;;; `counsel-mode'
+
+(defvar counsel-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map `[remap ,#'execute-extended-command] #'counsel-M-x)
+    (define-key map `[remap ,#'describe-bindings] #'counsel-descbinds)
+    (define-key map `[remap ,#'describe-function] #'counsel-describe-function)
+    (define-key map `[remap ,#'describe-variable] #'counsel-describe-variable)
+    (define-key map [remap describe-symbol] #'counsel-describe-symbol)
+    (define-key map `[remap ,#'apropos-command] #'counsel-apropos)
+    (define-key map `[remap ,#'describe-face] #'counsel-describe-face)
+    (define-key map `[remap ,#'list-faces-display] #'counsel-faces)
+    (define-key map `[remap ,#'find-file] #'counsel-find-file)
+    (define-key map `[remap ,#'find-library] #'counsel-find-library)
+    (define-key map `[remap ,#'imenu] #'counsel-imenu)
+    (define-key map `[remap ,#'load-library] #'counsel-load-library)
+    (define-key map `[remap ,#'load-theme] #'counsel-load-theme)
+    (define-key map `[remap ,#'yank-pop] #'counsel-yank-pop)
+    (define-key map `[remap ,#'info-lookup-symbol] #'counsel-info-lookup-symbol)
+    (define-key map `[remap ,#'pop-to-mark-command] #'counsel-mark-ring)
+    (define-key map [remap geiser-doc-look-up-manual]
+                #'counsel-geiser-doc-look-up-manual)
+    (define-key map `[remap ,#'bookmark-jump] #'counsel-bookmark)
+    map)
+  "Keymap for `counsel-mode'.
+Remaps built-in and external functions to Counsel replacements.")
+
+(defcustom counsel-mode-override-describe-bindings nil
+  "Whether to override `describe-bindings' when `counsel-mode' is active."
+  :type 'boolean)
+
+;;;###autoload
+(define-minor-mode counsel-mode
+  "Toggle Counsel mode on or off.
+Turn Counsel mode on if ARG is positive, off otherwise. Counsel
+mode remaps built-in emacs functions that have counsel
+replacements.
+
+Local bindings (`counsel-mode-map'):
+\\{counsel-mode-map}"
+  :global t
+  :keymap counsel-mode-map
+  :lighter " counsel"
+  (if counsel-mode
+      (progn
+        (when counsel-mode-override-describe-bindings
+          (advice-add #'describe-bindings :override #'counsel-descbinds))
+        (define-key minibuffer-local-map (kbd "C-r")
+          #'counsel-minibuffer-history))
+    (advice-remove #'describe-bindings #'counsel-descbinds)))
+
+(provide 'counsel)
+
+;;; counsel.el ends here
diff --git a/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel.elc b/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel.elc
new file mode 100644
index 0000000..d1cbab4
Binary files /dev/null and b/emacs/.emacs.d/elpa/counsel-20260214.1004/counsel.elc differ
diff --git a/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile-autoloads.el b/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile-autoloads.el
new file mode 100644
index 0000000..4ff2e12
--- /dev/null
+++ b/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile-autoloads.el
@@ -0,0 +1,166 @@
+;;; counsel-projectile-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from counsel-projectile.el
+
+(autoload 'counsel-projectile-find-file "counsel-projectile" "\
+Jump to a file in the current project.
+
+With a prefix ARG, invalidate the cache first.  If DWIM is
+non-nil, use completion based on context.
+
+(fn &optional ARG DWIM)" t)
+(autoload 'counsel-projectile-find-file-dwim "counsel-projectile" "\
+Jump to a file in the current project using completion based on context.
+
+With a prefix ARG, invalidate the cache first.
+
+(fn &optional ARG)" t)
+(autoload 'counsel-projectile-find-dir "counsel-projectile" "\
+Jump to a directory in the current project.
+
+With a prefix ARG, invalidate the cache first.
+
+(fn &optional ARG)" t)
+(autoload 'counsel-projectile-switch-to-buffer "counsel-projectile" "\
+Jump to a buffer in the current project.
+
+If `counsel-projectile-preview-buffers' is non-nil, display a
+preview of the selected ivy completion candidate buffer as in
+`counsel-switch-buffer', falling back to the current buffer or
+optionally FROM-BUFFER.
+
+(fn &optional FROM-BUFFER)" t)
+(autoload 'counsel-projectile-grep "counsel-projectile" "\
+Search the current project with grep.
+
+If inside a git project and `projectile-use-git-grep' is non-nil,
+use git grep. Otherwise use grep recursively.
+
+OPTIONS-OR-CMD, if non-nil, is a string containing either
+additional options to be passed to grep, or an alternative git
+grep command. It is read from the minibuffer if the function is
+called with a `\\[universal-argument]' prefix argument.
+
+(fn &optional OPTIONS-OR-CMD)" t)
+(autoload 'counsel-projectile-git-grep "counsel-projectile" "\
+Search the current project with git grep.
+
+CMD, if non-nil, is a string containing an alternative git grep
+command. It is read from the minibuffer if the function is called
+with a `\\[universal-argument]' prefix argument.
+
+(fn &optional CMD)" t)
+(autoload 'counsel-projectile-ag "counsel-projectile" "\
+Search the current project with ag.
+
+OPTIONS, if non-nil, is a string containing additional options to
+be passed to ag. It is read from the minibuffer if the function
+is called with a `\\[universal-argument]' prefix argument.
+
+(fn &optional OPTIONS)" t)
+(autoload 'counsel-projectile-rg "counsel-projectile" "\
+Search the current project with rg.
+
+OPTIONS, if non-nil, is a string containing additional options to
+be passed to rg. It is read from the minibuffer if the function
+is called with a `\\[universal-argument]' prefix argument.
+
+(fn &optional OPTIONS)" t)
+(autoload 'counsel-projectile-org-capture "counsel-projectile" "\
+Capture into the current project.
+
+This command is a replacement for `org-capture' (or
+`counsel-org-capture') offering project-specific capture
+templates, in addition to the regular templates available from
+`org-capture'. These project templates, which are \"expanded\"
+relatively to the current project, are determined by the
+variables `counsel-projectile-org-capture-templates' and
+`counsel-projectile-org-capture-templates-contexts'. See the
+former variable in particular for details.
+
+Optional argument FROM-BUFFER specifies the buffer from which to
+capture.
+
+(fn &optional FROM-BUFFER)" t)
+(autoload 'counsel-projectile-org-agenda "counsel-projectile" "\
+Open project agenda.
+
+This command simply calls `org-agenda' after filtering out all
+agenda files that do not belong to the current project.
+
+Optional arguments ARG, KEYS, and RESTRICTION are as in
+`org-agenda'.
+
+(fn &optional ARG KEYS RESTRICTION)" t)
+(autoload 'counsel-projectile-switch-project "counsel-projectile" "\
+Switch project.
+
+Optional argument DEFAULT-ACTION is the key, function, name, or
+index in the list `counsel-projectile-switch-project-action' (1
+for the first action, etc) of the action to set as default.
+
+(fn &optional DEFAULT-ACTION)" t)
+(autoload 'counsel-projectile "counsel-projectile" "\
+Jump to a buffer or file in the current project.
+
+With a prefix ARG, invalidate the cache first.
+
+If `counsel-projectile-preview-buffers' is non-nil, display a
+preview of the selected ivy completion candidate buffer as in
+`counsel-switch-buffer', falling back to the current buffer or
+optionally FROM-BUFFER.
+
+If `counsel-switch-buffer-preview-virtual-buffers' is also
+non-nil, also display a preview of the selected ivy completion
+candidate non-visited file.
+
+(fn &optional ARG FROM-BUFFER)" t)
+(defvar counsel-projectile-mode nil "\
+Non-nil if Counsel-Projectile mode is enabled.
+See the `counsel-projectile-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 `counsel-projectile-mode'.")
+(custom-autoload 'counsel-projectile-mode "counsel-projectile" nil)
+(autoload 'counsel-projectile-mode "counsel-projectile" "\
+Toggle Counsel-Projectile mode on or off.
+
+With a prefix argument ARG, enable the mode if ARG is positive,
+and disable it otherwise.  If called from Lisp, enable the mode
+if ARG is omitted or nil, and toggle it if ARG is `toggle'.
+
+Counsel-Projectile mode turns on Projectile mode, thus enabling
+all projectile key bindings, and adds the counsel-projectile key
+bindings on top of them.
+
+The counsel-projectile key bindings either remap existing
+projectile commands to their counsel-projectile replacements or
+bind keys to counsel-projectile commands that have no projectile
+counterparts.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "counsel-projectile" '("counsel-projectile-"))
+
+;;; End of scraped data
+
+(provide 'counsel-projectile-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; counsel-projectile-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile-pkg.el b/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile-pkg.el
new file mode 100644
index 0000000..d40b3dd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile-pkg.el
@@ -0,0 +1,9 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "counsel-projectile" "20211004.2003"
+  "Ivy integration for Projectile."
+  '((counsel    "0.13.4")
+    (projectile "2.5.0"))
+  :url "https://github.com/ericdanan/counsel-projectile"
+  :commit "e30150792a96968f55f34638cbfe63eaa30839cc"
+  :revdesc "e30150792a96"
+  :keywords '("project" "convenience"))
diff --git a/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile.el b/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile.el
new file mode 100644
index 0000000..f4971b3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile.el
@@ -0,0 +1,1709 @@
+;;; counsel-projectile.el --- Ivy integration for Projectile -*- lexical-binding: t -*-
+
+;; Copyright (C) 2016-2021 Eric Danan
+
+;; Author: Eric Danan
+;; URL: https://github.com/ericdanan/counsel-projectile
+;; Keywords: project, convenience
+;; Package-Version: 20211004.2003
+;; Package-Revision: e30150792a96
+;; Package-Requires: ((counsel "0.13.4") (projectile "2.5.0"))
+
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License as
+;; published by the Free Software Foundation; either version 3, or (at
+;; your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
+
+;;; Commentary:
+;;
+;; Projectile has native support for using ivy as its completion
+;; system. Counsel-projectile provides further ivy integration into
+;; projectile by taking advantage of ivy's support for selecting from
+;; a list of actions and applying an action without leaving the
+;; completion session. Concretely, counsel-projectile defines
+;; replacements for existing projectile commands as well as new
+;; commands that have no projectile counterparts. A minor mode is also
+;; provided that adds key bindings for all these commands on top of
+;; the projectile key bindings.
+;;
+;;; Code:
+
+;;* require
+
+(require 'counsel)
+(require 'projectile)
+
+;;* global
+
+(defgroup counsel-projectile nil
+  "Ivy integration for Projectile."
+  :group 'ivy
+  :group 'projectile)
+
+(defun counsel-projectile--defcustom-action (command action group)
+  "Create a custom variable named \"COMMAND-action\" in GROUP,
+with default value ACTION, to be used as `:action' parameter for
+COMMAND's `ivy-read' call.
+
+This variable holds either a single action function, or an action
+list whose first element is the index of the default action in
+the list and the remaining elements are the actions (a key, a
+function, and a name for each action)."
+  (eval
+   `(defcustom ,(intern (format "%s-action" command))
+      ',action
+      ,(format "Action(s) for `%s'.
+
+This variable holds either a single action function (function of
+one variable, the selected candidate) or an action list
+consisting of:
+
+- the index of the default action in the list (1 for the first
+  action, etc),
+- the available actions, each of which consists of:
+  - a key (string) to call the action,
+  - an action function of one variable,
+  - a name (string) for the action.
+
+In both cases, extra actions can be added with `ivy-set-actions'.
+An action is triggered for the selected candidate with `M-o
+<key>' or `C-M-o <key>'.  The default action can also be
+triggered with `M-RET' or `C-M-RET'. If this variable holds a
+single action function, this action becomes the default action
+and is assigned the key \"o\".  For an action list, it is also
+usual to assign the key \"o\" to the default action." command)
+      :type '(choice
+              (function :tag "Single action function")
+              (cons :tag "Action list"
+                    (integer :tag "Index of default action" :value 1)
+                    (repeat :tag "Actions"
+                            (list :tag "Action"
+                                  (string   :tag "     key")
+                                  (function :tag "function")
+                                  (string   :tag "    name")))))
+      :group ',group)))
+
+(defun counsel-projectile--action-index (action-item action-list)
+  "Return the index in ACTION-LIST of the action whose key,
+function, name, or index in the list (1 for the first action,
+etc) is ACTION-ITEM.  If there is no such action, throw an error.
+
+ACTION-LIST is an action list whose first element is the index of
+the default action in the list and the remaining elements are the
+actions (a key, a function, and a name for each action)."
+  (let (index)
+    (if (integerp action-item)
+        (when (< 0 action-item (length action-list))
+          (setq index action-item))
+      (setq index (cl-position-if
+                   (cond
+                    ((functionp action-item)
+                     (lambda (action)
+                       (equal action-item
+                              (cadr action))))
+                    ((stringp action-item)
+                     (lambda (action)
+                       (member action-item
+                               (list (car action) (cl-caddr action))))))
+                   (cdr action-list)))
+      (when index
+        (setq index (1+ index))))
+    (or index
+        (error "Action not found: %s" action-item))))
+
+(defun counsel-projectile-modify-action (action-var modifications)
+  "Make MODIFICATIONS to ACTION-VAR.
+
+ACTION-VAR is a variable holding an action list whose first
+element is the index of the default action in the list and the
+remaining elements are the actions (a key, a function, and a name
+for each action).
+
+MODIFICATIONS is a list of modifications to be applied
+sequentially to ACTION-LIST. Each modification has one of the
+following formats:
+
+    (remove ACTION-ITEM)
+        Remove the action whose key, function, name, or index in
+        the list (1 for the first action, etc) is ACTION-ITEM
+        from the list.
+
+    (add ACTION TARGET-ITEM)
+        Add ACTION (a list containing a key, a function, and a
+        name) to the list, just before the action whose key,
+        function, name, or index in the list (1 for the first
+        action, etc) is TARGET-ITEM.  If TARGET-ITEM is omitted,
+        add the action at the end of the list.
+
+    (move ACTION-ITEM TARGET-ITEM)
+        Move the action whose key, function, name, or index in
+        the list (1 for the first action, etc) is ACTION-ITEM
+        just before the action whose key, function, name, or
+        index in the list (1 for the first action, etc) is
+        TARGET-ITEM.  If TARGET-ITEM is omitted, move the action
+        to the end of the list.
+
+    (setkey ACTION-ITEM KEY)
+        Set the key of the action whose key, function, name, or
+        index in the list (1 for the first action, etc) is
+        ACTION-ITEM to KEY.
+
+    (setfun ACTION-ITEM FUNCTION)
+        Set the function of the action whose key, function, name,
+        or index in the list (1 for the first action, etc) is
+        ACTION-ITEM to FUNCTION.
+
+    (setname ACTION-ITEM NAME)
+        Set the name of the action whose key, function, name, or
+        index in the list (1 for the first action, etc) is
+        ACTION-ITEM to NAME.
+
+    (default ACTION-ITEM)
+        Set the index of the default action in the list to that
+        of the action whose key, function, name, or index in the
+        list (1 for the first action, etc) is ACTION-ITEM.
+
+If anything goes wrong, throw an error and do not modify ACTION-VAR."
+  (let ((action-list (symbol-value action-var))
+        mod)
+    ;; Make sure ACTION-VAR actually holds a list and not a single
+    ;; action function
+    (unless (listp action-list)
+      (error "%s's value is not a list" action-var))
+    (while (setq mod (pop modifications))
+      (pcase mod
+        (`(remove ,action-item)
+         (setq action-list
+               (remove (nth (counsel-projectile--action-index action-item action-list)
+                            action-list)
+                       action-list)))
+        (`(add ,action ,target-item)
+         (let ((index (counsel-projectile--action-index target-item action-list)))
+           ;; copied from `helm-append-at-nth'
+           (setq action-list (cl-loop for a in action-list
+                                      for count from 1
+                                      collect a
+                                      when (= count index)
+                                      collect action))))
+        (`(add ,action)
+         (setq action-list (append action-list (list action))))
+        (`(move ,action-item ,target-item)
+         (push `(add ,(nth (counsel-projectile--action-index action-item action-list)
+                           action-list)
+                     ,target-item)
+               modifications)
+         (push `(remove ,action-item)
+               modifications))
+        (`(move ,action-item)
+         (push `(add ,(nth (counsel-projectile--action-index action-item action-list)
+                           action-list))
+               modifications)
+         (push `(remove ,action-item)
+               modifications))
+        (`(setkey ,action-item ,key)
+         (let ((index (counsel-projectile--action-index action-item action-list)))
+           (setq action-list (cl-loop for a in action-list
+                                      for count from 0
+                                      if (= count index)
+                                      collect (cons key (cdr a))
+                                      else
+                                      collect a))))
+        (`(setfun ,action-item ,fun)
+         (let ((index (counsel-projectile--action-index action-item action-list)))
+           (setq action-list (cl-loop for a in action-list
+                                      for count from 0
+                                      if (= count index)
+                                      collect (list (car a) fun (cl-caddr a))
+                                      else
+                                      collect a))))
+        (`(setname ,action-item ,name)
+         (let ((index (counsel-projectile--action-index action-item action-list)))
+           (setq action-list (cl-loop for a in action-list
+                                      for count from 0
+                                      if (= count index)
+                                      collect (list (car a) (cadr a) name)
+                                      else
+                                      collect a))))
+        (`(default ,action-item)
+         (setq action-list
+               (cons (counsel-projectile--action-index action-item action-list)
+                     (cdr action-list))))))
+    (set action-var action-list)))
+
+;;* counsel-projectile-find-file
+
+(defcustom counsel-projectile-sort-files nil
+  "Non-nil if files should be sorted in
+`counsel-projectile-find-file' and `counsel-projectile'.
+
+The sorting function can be modified by adding an entry for
+`counsel-projectile-find-file' in `ivy-sort-functions-alist'."
+  :type 'boolean
+  :group 'counsel-projectile)
+
+(defcustom counsel-projectile-find-file-matcher 'counsel--find-file-matcher
+  "Function returning candidates matching minibuffer input in
+`counsel-projectile-find-file', also used to match files in
+`counsel-projectile'.
+
+Several choices are proposed:
+
+- Ivy generic matcher (`ivy--re-filter'). This is the matcher
+  used by default in all ivy commands.
+
+- Counsel matcher (`counsel--find-file-matcher').  This is the
+  matcher used in `counsel-find-file', allowing to ignore some
+  files based on `counsel-find-file-ignore-regexp'.
+
+- Counsel-projectile basename
+  matcher (`counsel-projectile-basename-matcher').  This one only
+  displays files whose basename matches minibuffer input, or if
+  there is none all files whose name (relative to the project
+  root) matches. It also uses the counsel matcher to ignore some
+  files.
+
+It is also possible to use a custom matcher.  It must be a function taking two argument, the regexp and the candidates (see e.g. `counsel--find-file-matcher')."
+  :type '(choice
+          (const :tag "Ivy generic matcher" ivy--re-filter)
+          (const :tag "Counsel matcher" counsel--find-file-matcher)
+          (const :tag "Counsel-projectile basename matcher" counsel-projectile-find-file-matcher-basename)
+          (function :tag "Custom function"))
+  :group 'counsel-projectile)
+
+(defcustom counsel-projectile-find-file-more-chars 0
+  "Number of characters to input before matching project files are shown.
+
+Setting it to a strictly positive value can improve performance in large projects."
+  :type 'integer
+  :group 'counsel-projectile)
+
+(counsel-projectile--defcustom-action
+ 'counsel-projectile-find-file
+ '(1
+   ("o" counsel-projectile-find-file-action
+    "current window")
+   ("j" counsel-projectile-find-file-action-other-window
+    "other window")
+   ("x" counsel-projectile-find-file-action-extern
+    "open externally")
+   ("r" counsel-projectile-find-file-action-root
+    "open as root")
+   ("m" counsel-projectile-find-file-action-find-file-manually
+    "find file manually")
+   ("k" counsel-projectile-find-file-action-delete
+    "delete")
+   ("p" counsel-projectile-find-file-action-switch-project
+    "switch project"))
+ 'counsel-projectile)
+
+(defun counsel-projectile--find-file-matcher (regexp candidates)
+  (let ((ivy-more-chars-alist
+         `((t . ,counsel-projectile-find-file-more-chars))))
+    (or (ivy-more-chars)
+        (funcall counsel-projectile-find-file-matcher regexp candidates))))
+
+(defun counsel-projectile-find-file-matcher-basename (regexp candidates)
+  "Return the list of CANDIDATES whose basename matches REGEXP,
+or if there is none the list of all CANDIDATES matching REGEXP.
+Also uses `counsel--find-file-matcher' to ignore candidates based
+on `counsel-find-file-ignore-regexp'."
+  (let ((cands (ivy--re-filter regexp candidates)))
+    (or (and (not (string= ivy-text ""))
+             ;; We first filter `cands' to retain only matches in file
+             ;; basename. This is almost copied from `ivy--re-filter'
+             ;; because we can't quite use it directly.
+             (let ((re-list (if (stringp regexp)
+                                (list (cons regexp t))
+                              regexp))
+                   (res cands))
+               (dolist (re re-list)
+                 (setq res
+                       (ignore-errors
+                         (funcall
+                          (if (cdr re)
+                              #'cl-remove-if-not
+                            #'cl-remove-if)
+                          (let ((re-str (car re)))
+                            (lambda (x)
+                              (string-match re-str
+                                            (file-name-nondirectory x))))
+                          res))))
+               ;; We then apply `counsel--find-file-matcher' to `res'
+               ;; so we can honor `ivy-use-ignore', but we don't need
+               ;; to filter again.
+               (counsel--find-file-matcher nil res)))
+        ;; We apply `counsel--find-file-matcher' to `cands' so we can
+        ;; honor `ivy-use-ignore', but we don't need to filter
+        ;; again.
+        (counsel--find-file-matcher nil cands))))     
+
+(defun counsel-projectile-find-file-action (file)
+  "Find FILE and run `projectile-find-file-hook'."
+  (find-file (projectile-expand-root file))
+  (run-hooks 'projectile-find-file-hook))
+
+(defun counsel-projectile-find-file-action-other-window (file)
+  "Find FILE in another window and run
+`projectile-find-file-hook'."
+  (find-file-other-window (projectile-expand-root file))
+  (run-hooks 'projectile-find-file-hook))
+
+(defun counsel-projectile-find-file-action-find-file-manually (file)
+  "Call `counsel-find-file' from FILE's directory."
+  (let* ((f (projectile-expand-root file))
+         (default-directory (file-name-directory f)))
+    (counsel-find-file)))
+
+(defun counsel-projectile-find-file-action-extern (file)
+  "Find FILE externally and run `projectile-find-file-hook'."
+  (counsel-find-file-extern (projectile-expand-root file))
+  (run-hooks 'projectile-find-file-hook))
+
+(defun counsel-projectile-find-file-action-root (file)
+  "Find FILE as root and run `projectile-find-file-hook'."
+  (counsel-find-file-as-root (projectile-expand-root file))
+  (run-hooks 'projectile-find-file-hook))
+
+(defun counsel-projectile-find-file-action-delete (file)
+  "Delete FILE."
+  (counsel-find-file-delete (projectile-expand-root file)))
+
+(defun counsel-projectile-find-file-action-switch-project (&optional _)
+  "Switch project action for `counsel-projectile-find-file'."
+  (counsel-projectile-switch-project 'counsel-projectile-switch-project-action-find-file))
+
+(defun counsel-projectile-find-file-transformer (str)
+  "Transform non-visited file names with `ivy-virtual' face."
+  (if (not (get-file-buffer (projectile-expand-root str)))
+      (propertize str 'face 'ivy-virtual)
+    str))
+
+;;;###autoload
+(defun counsel-projectile-find-file (&optional arg dwim)
+  "Jump to a file in the current project.
+
+With a prefix ARG, invalidate the cache first.  If DWIM is
+non-nil, use completion based on context."
+  (interactive "P")
+  (if (and (eq projectile-require-project-root 'prompt)
+           (not (projectile-project-p)))
+      (counsel-projectile-find-file-action-switch-project)
+    (projectile-maybe-invalidate-cache arg)
+    (let* ((project-files (projectile-current-project-files))
+           (files (and dwim (projectile-select-files project-files))))
+      (ivy-read (projectile-prepend-project-name "Find file: ")
+                (or files project-files)
+                :matcher #'counsel-projectile--find-file-matcher
+                :require-match t
+                :sort counsel-projectile-sort-files
+                :action counsel-projectile-find-file-action
+                :caller 'counsel-projectile-find-file))))
+
+(ivy-configure 'counsel-projectile-find-file
+ :display-transformer-fn #'counsel-projectile-find-file-transformer)
+
+;;;###autoload
+(defun counsel-projectile-find-file-dwim (&optional arg)
+  "Jump to a file in the current project using completion based on context.
+
+With a prefix ARG, invalidate the cache first."
+  (interactive "P")
+  (counsel-projectile-find-file arg t))
+
+;;* counsel-projectile-find-dir
+
+(defcustom counsel-projectile-sort-directories nil
+  "Non-nil if directories should be sorted in
+`counsel-projectile-find-dir'.
+
+The sorting function can be modified by adding an entry for
+`counsel-projectile-find-dir' in `ivy-sort-functions-alist'."
+  :type 'boolean
+  :group 'counsel-projectile)
+
+(counsel-projectile--defcustom-action
+ 'counsel-projectile-find-dir
+ '(1
+   ("o" counsel-projectile-find-dir-action
+    "current window")
+   ("j" counsel-projectile-find-dir-action-other-window
+    "other window")
+   ("x" counsel-projectile-find-dir-action-extern
+    "open externally")
+   ("r" counsel-projectile-find-dir-action-root
+    "open as root")
+   ("m" counsel-projectile-find-file-action-find-file-manually
+    "find file manually")
+   ("p" counsel-projectile-find-dir-action-switch-project
+    "switch project"))
+ 'counsel-projectile)
+ 
+(defun counsel-projectile--project-directories ()
+  "Return a list of current project's directories."
+  (if projectile-find-dir-includes-top-level
+      (append '("./") (projectile-current-project-dirs))
+    (projectile-current-project-dirs)))
+
+(defun counsel-projectile-find-dir-action (dir)
+  "Visit DIR with dired and run `projectile-find-dir-hook'."
+  (dired (projectile-expand-root dir))
+  (run-hooks 'projectile-find-dir-hook))
+
+(defun counsel-projectile-find-dir-action-other-window (dir)
+  "Visit DIR with dired in another window and run
+`projectile-find-dir-hook'."
+  (dired-other-window (projectile-expand-root dir))
+  (run-hooks 'projectile-find-dir-hook))
+
+(defun counsel-projectile-find-dir-action-extern (dir)
+  "Visit DIR externally and run `projectile-find-dir-hook'."
+  (counsel-find-file-extern (projectile-expand-root dir))
+  (run-hooks 'projectile-find-dir-hook))
+
+(defun counsel-projectile-find-dir-action-root (dir)
+  "Visit DIR as root and run `projectile-find-dir-hook'."
+  (counsel-find-file-as-root (projectile-expand-root dir))
+  (run-hooks 'projectile-find-dir-hook))
+
+(defun counsel-projectile-find-dir-action-switch-project (&optional _)
+  "Switch project action for `counsel-projectile-find-dir'."
+  (counsel-projectile-switch-project 'counsel-projectile-switch-project-action-find-dir))
+
+(defun counsel-projectile-find-dir-transformer (str)
+  "Transform candidates with `ivy-subdir' face."
+  (propertize str 'face 'ivy-subdir))
+
+;;;###autoload
+(defun counsel-projectile-find-dir (&optional arg)
+  "Jump to a directory in the current project.
+
+With a prefix ARG, invalidate the cache first."
+  (interactive "P")
+  (if (and (eq projectile-require-project-root 'prompt)
+           (not (projectile-project-p)))
+      (counsel-projectile-find-dir-action-switch-project)
+    (projectile-maybe-invalidate-cache arg)
+    (ivy-read (projectile-prepend-project-name "Find dir: ")
+              (counsel-projectile--project-directories)
+              :require-match t
+              :sort counsel-projectile-sort-directories
+              :action counsel-projectile-find-dir-action
+              :caller 'counsel-projectile-find-dir)))
+
+(ivy-configure 'counsel-projectile-find-dir
+ :display-transformer-fn #'counsel-projectile-find-dir-transformer)
+
+;;* counsel-projectile-switch-to-buffer
+
+(defcustom counsel-projectile-sort-buffers nil
+  "Non-nil if buffers should be sorted in
+`counsel-projectile-switch-to-buffer' and `counsel-projectile'.
+
+The sorting function can be modified by adding an entry for
+`counsel-projectile-switch-to-buffer' in
+`ivy-sort-functions-alist'."
+  :type 'boolean
+  :group 'counsel-projectile)
+
+(defcustom counsel-projectile-remove-current-buffer nil
+  "Non-nil if current buffer should be removed from the
+candidates list of `counsel-projectile-switch-to-buffer' and
+`counsel-projectile'."
+  :type 'boolean
+  :group 'counsel-projectile)
+
+(defcustom counsel-projectile-preview-buffers nil
+  "When non-nil, `counsel-projectile-switch-to-buffer' and `counsel-projectile'
+display a preview of the selected buffer in the current window.
+
+This makes these commands behave similarly to `counsel-switch-buffer'.  If
+`counsel-switch-buffer-preview-virtual-buffers' is also non-nil,
+`counsel-projectile' also displays a preview of the selected
+non-visited file."
+  :type 'boolean
+  :group 'counsel-projectile)
+
+(counsel-projectile--defcustom-action
+ 'counsel-projectile-switch-to-buffer
+ '(1
+   ("o" counsel-projectile-switch-to-buffer-action
+    "current window")
+   ("j" switch-to-buffer-other-window
+    "other window")
+   ("k" ivy--kill-buffer-action
+    "kill")
+   ("m" counsel-projectile-switch-to-buffer-action-find-file-manually
+    "find file manually")
+   ("p" counsel-projectile-switch-to-buffer-action-switch-project
+    "switch project"))
+ 'counsel-projectile)
+
+(defvar counsel-projectile-switch-to-buffer-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-c C-k") (lambda ()
+                                      (interactive)
+                                      (ivy--kill-buffer-action (ivy-state-current ivy-last))))
+    map)
+  "Keymap for `counsel-projectile-switch-to-buffer'.")
+
+(defun counsel-projectile--project-buffers (&rest _)
+  ;; The ignored arguments are so that the function can be used as
+  ;; collection function in `counsel-projectile-switch-to-buffer'.
+  "Return a list of buffers in the current project.
+
+Like `projectile-project-buffer-names', but propertize buffer
+names as in `ivy--buffer-list', and remove current buffer if
+`counsel-projectile-remove-currennt-buffer' is non-nil."
+  (let ((buffer-names (projectile-project-buffer-names)))
+    (when counsel-projectile-remove-current-buffer
+      (setq buffer-names (delete (buffer-name (current-buffer)) buffer-names)))
+    (ivy--buffer-list "" nil
+                      (lambda (x)
+                        (member (car x) buffer-names)))))
+
+(defun counsel-projectile-switch-to-buffer-action (buffer)
+  "Switch to BUFFER."
+  (switch-to-buffer buffer nil 'force-same-window))
+
+(defun counsel-projectile-switch-to-buffer-action-find-file-manually (buffer)
+  "Call `counsel-find-file' from BUFFER's default directory."
+  (let* ((b (get-buffer buffer))
+         (default-directory
+           (or (and b (buffer-local-value 'default-directory b))
+               (projectile-project-root))))
+    (counsel-find-file)))
+
+(defun counsel-projectile-switch-to-buffer-action-switch-project (&optional _)
+  "Switch project action for `counsel-projectile-switch-to-buffer'."
+  (counsel-projectile-switch-project 'counsel-projectile-switch-project-action-switch-to-buffer))
+
+(defun counsel-projectile-switch-to-buffer-transformer (str)
+  "Transform candidate STR when switching project buffers.
+
+This simply applies the same transformer as in `ivy-switch-buffer', which is `ivy-switch-buffer-transformer' by default but could have been modified e.g. by the ivy-rich package."
+  (funcall (ivy-alist-setting ivy--display-transformers-alist 'ivy-switch-buffer)
+           str))
+
+(defun counsel-projectile--switch-to-buffer-update-fn ()
+  "Update function for `counsel-projectile--switch-to-buffer'."
+  ;; Adapted from counsel--switch-buffer-update-fn.
+  (unless counsel--switch-buffer-previous-buffers
+    (setq counsel--switch-buffer-previous-buffers (buffer-list)))
+  (when counsel-projectile-preview-buffers
+    (when (member (ivy-state-current ivy-last) ivy-marked-candidates)
+      (setf (ivy-state-current ivy-last)
+            (substring (ivy-state-current ivy-last) (length ivy-mark-prefix))))
+    ;; Unlike in `counsel-switch-buffer' we could have an empty string
+    ;; as candidate if no project buffer is open.
+    (cond
+     ((and (not (string= (ivy-state-current ivy-last) ""))
+           (get-buffer (ivy-state-current ivy-last)))
+      (let ((ivy-marked-candidates nil))
+        (ivy-call)))
+     ;; Following case if for use in `counsel-projectile'.
+     ((and (not (string= (ivy-state-current ivy-last) ""))
+           counsel-switch-buffer-preview-virtual-buffers
+           (file-exists-p (projectile-expand-root (ivy-state-current ivy-last))))
+      (let ((buf (ignore-errors
+                   ;; may not open due to `large-file-warning-threshold' etc.
+                   (find-file-noselect (projectile-expand-root (ivy-state-current ivy-last))))))
+        (if buf
+            (progn
+              (push buf counsel--switch-buffer-temporary-buffers)
+              (ivy-call))
+          ;; clean up the minibuffer so that there's no delay before
+          ;; the Ivy candidates are displayed once again
+          (message ""))))
+     (t
+      (with-ivy-window
+        (switch-to-buffer (or (plist-get (ivy-state-extra-props ivy-last) :from-buffer)
+                              (ivy-state-buffer ivy-last))))))))
+
+;;;###autoload
+(defun counsel-projectile-switch-to-buffer (&optional from-buffer)
+  "Jump to a buffer in the current project.
+
+If `counsel-projectile-preview-buffers' is non-nil, display a
+preview of the selected ivy completion candidate buffer as in
+`counsel-switch-buffer', falling back to the current buffer or
+optionally FROM-BUFFER."
+  (interactive)
+  (if (and (eq projectile-require-project-root 'prompt)
+           (not (projectile-project-p)))
+      (counsel-projectile-switch-to-buffer-action-switch-project)
+    (ivy-read (projectile-prepend-project-name "Switch to buffer: ")
+              ;; We use a collection function so that it is called each
+              ;; time the `ivy-state' is reset. This is needed for the
+              ;; "kill buffer" action.
+              #'counsel-projectile--project-buffers
+              :matcher #'ivy--switch-buffer-matcher
+              :require-match t
+              :sort counsel-projectile-sort-buffers
+              :action counsel-projectile-switch-to-buffer-action
+              :keymap counsel-projectile-switch-to-buffer-map
+              :extra-props (list :from-buffer from-buffer)
+              :caller 'counsel-projectile-switch-to-buffer)))
+
+(ivy-configure 'counsel-projectile-switch-to-buffer
+  :display-transformer-fn #'counsel-projectile-switch-to-buffer-transformer
+  :update-fn #'counsel-projectile--switch-to-buffer-update-fn
+  :unwind-fn #'counsel--switch-buffer-unwind)
+
+;;* counsel-projectile-grep
+
+(defcustom counsel-projectile-grep-initial-input nil
+  "Initial minibuffer input for `counsel-projectile-grep'.  If
+non-nil, it should be a Lisp expression whose evaluation yields
+the initial input string.
+
+Note that you can always insert the value
+of `(ivy-thing-at-point)' by hitting \"M-n\" in the minibuffer."
+  :type '(choice
+          (const :tag "None" nil)
+          (const :tag "Symbol at point (generic)" (thing-at-point 'symbol t))
+          (const :tag "Symbol or selection at point (projectile)" (projectile-symbol-or-selection-at-point))
+          (const :tag "Thing at point (ivy)" (ivy-thing-at-point))
+          (sexp  :tag "Custom expression"))
+  :group 'counsel-projectile)
+
+(counsel-projectile--defcustom-action
+ 'counsel-projectile-grep
+ '(1
+   ("o" counsel-git-grep-action
+    "default")
+   ("p" counsel-projectile-grep-action-switch-project
+    "switch project"))
+ 'counsel-projectile)
+
+(defcustom counsel-projectile-git-grep-extra-actions
+  '(("p" counsel-projectile-git-grep-action-switch-project
+     "switch project"))
+  "List of extra actions to add to
+`counsel-projectile-git-grep' (in addition to the actions of
+`counsel-git-grep')."
+  :type '(repeat :tag "Actions"
+                 (list :tag "Action"
+                       (string   :tag "     key")
+                       (function :tag "function")
+                       (string   :tag "    name")))
+  :group 'counsel-projectile)
+
+(defvar counsel-projectile-grep-base-command "grep -rnEI %s"
+  "Format string to use in `cousel-projectile-grep' to
+construct the command.")
+
+(defun counsel-projectile-grep-action-switch-project (&optional _)
+  "Switch project action for `counsel-projectile-grep'."
+  (counsel-projectile-switch-project 'counsel-projectile-switch-project-action-grep))
+
+(defun counsel-projectile-git-grep-action-switch-project (&optional _)
+  "Switch project action for `counsel-projectile-git-grep'."
+  (counsel-projectile-switch-project 'counsel-projectile-switch-project-action-git-grep))
+
+;;;###autoload
+(defun counsel-projectile-grep (&optional options-or-cmd)
+  "Search the current project with grep.
+
+If inside a git project and `projectile-use-git-grep' is non-nil,
+use git grep. Otherwise use grep recursively.
+
+OPTIONS-OR-CMD, if non-nil, is a string containing either
+additional options to be passed to grep, or an alternative git
+grep command. It is read from the minibuffer if the function is
+called with a `\\[universal-argument]' prefix argument."
+  (interactive)
+  (if (and (eq projectile-require-project-root 'prompt)
+           (not (projectile-project-p)))
+      (counsel-projectile-grep-action-switch-project)
+    (if (and (eq (projectile-project-vcs) 'git)
+             projectile-use-git-grep)
+        (counsel-projectile-git-grep options-or-cmd)
+      (let* ((ignored-files
+              (mapconcat (lambda (i)
+                           (concat "--exclude=" (shell-quote-argument i)))
+			 (append
+                          (projectile--globally-ignored-file-suffixes-glob)
+                          (projectile-ignored-files-rel))
+			 " "))
+             (ignored-dirs
+              (mapconcat (lambda (i)
+                           (concat "--exclude-dir=" (shell-quote-argument i)))
+			 (projectile-ignored-directories-rel)
+			 " "))
+             (ignored (concat ignored-files " " ignored-dirs))
+             (counsel-ag-base-command
+              (let ((counsel-ag-command counsel-projectile-grep-base-command))
+		(counsel--format-ag-command ignored "%s"))))
+	;; `counsel-ag' requires a single `\\[universal-argument]'
+	;; prefix argument to prompt for initial directory and a double
+	;; `\\[universal-argument]' prefix argument to prompt for extra
+	;; options. But since the initial directory is always the
+	;; project root here, prompt for ortpions with a single
+	;; `\\[universal-argument]' prefix argument prefix argument as
+	;; well.
+	(when (= (prefix-numeric-value current-prefix-arg) 4)
+          (setq current-prefix-arg '(16)))
+	(counsel-ag (eval counsel-projectile-grep-initial-input)
+                    (projectile-project-root)
+                    options-or-cmd
+                    (projectile-prepend-project-name
+                     (concat (car (if (listp counsel-ag-base-command)
+                                      counsel-ag-base-command
+                                    (split-string counsel-ag-base-command)))
+                             ": "))
+                    :caller 'counsel-projectile-grep)))))
+
+(ivy-configure 'counsel-projectile-grep
+  :occur #'counsel-ag-occur
+  :unwind-fn #'counsel--grep-unwind
+  :display-transformer-fn #'counsel-git-grep-transformer
+  :grep-p t
+  :exit-codes '(1 "No matches found"))
+
+;;;###autoload
+(defun counsel-projectile-git-grep (&optional cmd)
+  "Search the current project with git grep.
+
+CMD, if non-nil, is a string containing an alternative git grep
+command. It is read from the minibuffer if the function is called
+with a `\\[universal-argument]' prefix argument."
+  (interactive)
+  (if (and (eq projectile-require-project-root 'prompt)
+           (not (projectile-project-p)))
+      (counsel-projectile-git-grep-action-switch-project)
+    (let ((ivy--actions-list (copy-sequence ivy--actions-list)))
+      (ivy-add-actions
+       'counsel-git-grep
+       counsel-projectile-git-grep-extra-actions)
+      (counsel-git-grep (eval counsel-projectile-grep-initial-input)
+                        (projectile-project-root)
+                        (or current-prefix-arg cmd)))))
+
+;;* counsel-projectile-ag
+
+(defcustom counsel-projectile-ag-initial-input nil
+  "Initial minibuffer input for `counsel-projectile-ag'.  If
+non-nil, it should be a Lisp expression whose evaluation yields
+the initial input string.
+
+Note that you can always insert the value
+of `(ivy-thing-at-point)' by hitting \"M-n\" in the minibuffer."
+  :type '(choice
+          (const :tag "None" nil)
+          (const :tag "Symbol at point (generic)" (thing-at-point 'symbol t))
+          (const :tag "Symbol or selection at point (projectile)" (projectile-symbol-or-selection-at-point))
+          (const :tag "Thing at point (ivy)" (ivy-thing-at-point))
+          (sexp  :tag "Custom expression"))
+  :group 'counsel-projectile)
+
+(defcustom counsel-projectile-ag-extra-actions
+  '(("p" counsel-projectile-ag-action-switch-project
+     "switch project"))
+  "List of extra actions to add to
+`counsel-projectile-ag' (in addition to the actions of
+`counsel-ag')."
+  :type '(repeat :tag "Actions"
+                 (list :tag "Action"
+                       (string   :tag "     key")
+                       (function :tag "function")
+                       (string   :tag "    name")))
+  :group 'counsel-projectile)
+
+(defun counsel-projectile-ag-action-switch-project (&optional _)
+  "Switch project action for `counsel-projectile-ag'."
+  (counsel-projectile-switch-project 'counsel-projectile-switch-project-action-ag))
+
+;;;###autoload
+(defun counsel-projectile-ag (&optional options)
+  "Search the current project with ag.
+
+OPTIONS, if non-nil, is a string containing additional options to
+be passed to ag. It is read from the minibuffer if the function
+is called with a `\\[universal-argument]' prefix argument."
+  (interactive)
+  (if (and (eq projectile-require-project-root 'prompt)
+           (not (projectile-project-p)))
+      (counsel-projectile-ag-action-switch-project)
+    (let* ((ivy--actions-list (copy-sequence ivy--actions-list))
+           (ignored
+            (mapconcat (lambda (i)
+                         (concat "--ignore " (shell-quote-argument i)))
+                       (append
+                        (projectile--globally-ignored-file-suffixes-glob)
+                        (projectile-ignored-files-rel)
+                        (projectile-ignored-directories-rel))
+                       " "))
+           (counsel-ag-base-command
+            (let ((counsel-ag-command counsel-ag-base-command))
+              (counsel--format-ag-command ignored "%s"))))
+      (ivy-add-actions
+       'counsel-ag
+       counsel-projectile-ag-extra-actions)
+      ;; `counsel-ag' requires a single `\\[universal-argument]'
+      ;; prefix argument to prompt for initial directory and a double
+      ;; `\\[universal-argument]' prefix argument to prompt for extra
+      ;; options. But since the initial directory is always the
+      ;; project root here, prompt for ortpions with a single
+      ;; `\\[universal-argument]' prefix argument prefix argument as
+      ;; well.
+      (when (= (prefix-numeric-value current-prefix-arg) 4)
+        (setq current-prefix-arg '(16)))
+      (counsel-ag (eval counsel-projectile-ag-initial-input)
+                  (projectile-project-root)
+                  options
+                  (projectile-prepend-project-name
+                   (concat (car (if (listp counsel-ag-base-command)
+                                    counsel-ag-base-command
+                                  (split-string counsel-ag-base-command)))
+                           ": "))))))
+
+;;* counsel-projectile-rg
+
+(defcustom counsel-projectile-rg-initial-input nil
+  "Initial minibuffer input for `counsel-projectile-rg'.  If
+non-nil, it should be a Lisp expression whose evaluation yields
+the initial input string.
+
+Note that you can always insert the value
+of `(ivy-thing-at-point)' by hitting \"M-n\" in the minibuffer."
+  :type '(choice
+          (const :tag "None" nil)
+          (const :tag "Symbol at point (generic)" (thing-at-point 'symbol t))
+          (const :tag "Symbol or selection at point (projectile)" (projectile-symbol-or-selection-at-point))
+          (const :tag "Thing at point (ivy)" (ivy-thing-at-point))
+          (sexp  :tag "Custom expression"))
+  :group 'counsel-projectile)
+
+(defcustom counsel-projectile-rg-extra-actions
+  '(("p" counsel-projectile-rg-action-switch-project
+     "switch project"))
+  "List of extra actions to add to
+`counsel-projectile-rg' (in addition to the actions of
+`counsel-rg')."
+  :type '(repeat :tag "Actions"
+                 (list :tag "Action"
+                       (string   :tag "     key")
+                       (function :tag "function")
+                       (string   :tag "    name")))
+  :group 'counsel-projectile)
+
+(defun counsel-projectile-rg-action-switch-project (&optional _)
+  "Switch project action for `counsel-projectile-rg'."
+  (counsel-projectile-switch-project 'counsel-projectile-switch-project-action-rg))
+
+;;;###autoload
+(defun counsel-projectile-rg (&optional options)
+  "Search the current project with rg.
+
+OPTIONS, if non-nil, is a string containing additional options to
+be passed to rg. It is read from the minibuffer if the function
+is called with a `\\[universal-argument]' prefix argument."
+  (interactive)
+  (if (and (eq projectile-require-project-root 'prompt)
+           (not (projectile-project-p)))
+      (counsel-projectile-rg-action-switch-project)
+    (let* ((ivy--actions-list (copy-sequence ivy--actions-list))
+           (ignored
+            (mapconcat (lambda (i)
+                         (concat "--glob !" (shell-quote-argument i)))
+                       (append
+                        (projectile--globally-ignored-file-suffixes-glob)
+                        (projectile-ignored-files-rel)
+                        (projectile-ignored-directories-rel))
+                       " "))        
+           (counsel-rg-base-command
+            (let ((counsel-ag-command counsel-rg-base-command))
+              (counsel--format-ag-command ignored "%s"))))
+      (ivy-add-actions
+       'counsel-rg
+       counsel-projectile-rg-extra-actions)
+      ;; `counsel-rg' requires a single `\\[universal-argument]'
+      ;; prefix argument to prompt for initial directory and a double
+      ;; `\\[universal-argument]' prefix argument to prompt for extra
+      ;; options. But since the initial directory is always the
+      ;; project root here, prompt for ortpions with a single
+      ;; `\\[universal-argument]' prefix argument prefix argument as
+      ;; well.
+      (when (= (prefix-numeric-value current-prefix-arg) 4)
+        (setq current-prefix-arg '(16)))
+      (counsel-rg (eval counsel-projectile-rg-initial-input)
+                  (projectile-project-root)
+                  options
+                  (projectile-prepend-project-name
+                   (concat (car (if (listp counsel-rg-base-command)
+                                    counsel-rg-base-command
+                                  (split-string counsel-rg-base-command)))
+                           ": "))))))
+
+;;* counsel-projectile-org-capture
+
+(defvar org-capture-templates)
+(defvar org-capture-templates-contexts)
+
+(defcustom counsel-projectile-org-capture-templates
+  '(("t" "[${name}] Task" entry (file+headline "${root}/notes.org" "Tasks")
+     "* TODO %?\n  %u\n  %a"))
+  "Project-specific templates for the creation of new entries
+with `counsel-projectile-org-capture'.
+
+The format is the same as in `org-capture-templates', except that
+in a template's name or target, the placeholders \"${root}\" and
+\"${name}\" can be used to stand for the current project root and
+name, respectively.
+
+The default value contains a single template, whose name is
+\"[${name}] Task\" and whose target is:
+
+    \(file+headline \"${root}/notes.org}\" \"Tasks\"\)
+
+This points to headline \"Tasks\" in file \"notes.org\" in the
+project root directory (one file per project).
+
+Two other examples of valid targets are:
+
+    \(file+headline \"${root}/${name}.org}\" \"Tasks\"\)
+    \(file+olp \"~/notes.org\" \"${root}\" \"Tasks\"\)
+
+The first one is similar to the default value's target, except
+that the file is named after the project name (this can be handy
+if you use org-mode's agenda since the project name is then
+displayed as category). The second one points to outline path
+\"<project-root>/Tasks\" in file \"~/notes.org\" (same file for
+all projects)."
+  :type ;; copied from `org-capture-templates'
+  (let ((file-variants '(choice :tag "Filename       "
+                                (file :tag "Literal")
+                                (function :tag "Function")
+                                (variable :tag "Variable")
+                                (sexp :tag "Form"))))
+    `(repeat
+      (choice :value ("" "" entry (file "~/org/notes.org") "")
+              (list :tag "Multikey description"
+                    (string :tag "Keys       ")
+                    (string :tag "Description"))
+              (list :tag "Template entry"
+                    (string :tag "Keys           ")
+                    (string :tag "Description    ")
+                    (choice :tag "Capture Type   " :value entry
+                            (const :tag "Org entry" entry)
+                            (const :tag "Plain list item" item)
+                            (const :tag "Checkbox item" checkitem)
+                            (const :tag "Plain text" plain)
+                            (const :tag "Table line" table-line))
+                    (choice :tag "Target location"
+                            (list :tag "File"
+                                  (const :format "" file)
+                                  ,file-variants)
+                            (list :tag "ID"
+                                  (const :format "" id)
+                                  (string :tag "  ID"))
+                            (list :tag "File & Headline"
+                                  (const :format "" file+headline)
+                                  ,file-variants
+                                  (string :tag "  Headline"))
+                            (list :tag "File & Outline path"
+                                  (const :format "" file+olp)
+                                  ,file-variants
+                                  (repeat :tag "Outline path" :inline t
+                                          (string :tag "Headline")))
+                            (list :tag "File & Regexp"
+                                  (const :format "" file+regexp)
+                                  ,file-variants
+                                  (regexp :tag "  Regexp"))
+                            (list :tag "File [ & Outline path ] & Date tree"
+                                  (const :format "" file+olp+datetree)
+                                  ,file-variants
+                                  (option (repeat :tag "Outline path" :inline t
+                                                  (string :tag "Headline"))))
+                            (list :tag "File & function"
+                                  (const :format "" file+function)
+                                  ,file-variants
+                                  (sexp :tag "  Function"))
+                            (list :tag "Current clocking task"
+                                  (const :format "" clock))
+                            (list :tag "Function"
+                                  (const :format "" function)
+                                  (sexp :tag "  Function")))
+                    (choice :tag "Template       "
+                            (string)
+                            (list :tag "File"
+                                  (const :format "" file)
+                                  (file :tag "Template file"))
+                            (list :tag "Function"
+                                  (const :format "" function)
+                                  (function :tag "Template function")))
+                    (plist :inline t
+                           ;; Give the most common options as checkboxes
+                           :options (((const :format "%v " :prepend) (const t))
+                                     ((const :format "%v " :immediate-finish) (const t))
+                                     ((const :format "%v " :jump-to-captured) (const t))
+                                     ((const :format "%v " :empty-lines) (const 1))
+                                     ((const :format "%v " :empty-lines-before) (const 1))
+                                     ((const :format "%v " :empty-lines-after) (const 1))
+                                     ((const :format "%v " :clock-in) (const t))
+                                     ((const :format "%v " :clock-keep) (const t))
+                                     ((const :format "%v " :clock-resume) (const t))
+                                     ((const :format "%v " :time-prompt) (const t))
+                                     ((const :format "%v " :tree-type) (const week))
+                                     ((const :format "%v " :unnarrowed) (const t))
+                                     ((const :format "%v " :table-line-pos) (string))
+                                     ((const :format "%v " :kill-buffer) (const t))))))))
+  :group 'counsel-projectile)
+
+(defcustom counsel-projectile-org-capture-templates-contexts nil
+  "Alist of capture templates and valid contexts for `counsel-projectile-org-capture'.
+
+The format is the same as in `org-capture-templates-contexts'."
+  :type ;; copied from `org-capture-target-templates'
+  '(repeat (list :tag "Rule"
+                 (string :tag "        Capture key")
+                 (string :tag "Replace by template")
+                 (repeat :tag "Available when"
+                         (choice
+                          (cons :tag "Condition"
+                                (choice
+                                 (const :tag "In file" in-file)
+                                 (const :tag "Not in file" not-in-file)
+                                 (const :tag "In buffer" in-buffer)
+                                 (const :tag "Not in buffer" not-in-buffer)
+                                 (const :tag "In mode" in-mode)
+                                 (const :tag "Not in mode" not-in-mode))
+                                (regexp))
+                          (function :tag "Custom function")))))
+  :group 'counsel-projectile)
+
+(defcustom counsel-projectile-org-capture-extra-actions
+  '(("P" counsel-projectile-org-capture-action-switch-project
+     "switch project"))
+  "List of extra actions to add to
+`counsel-projectile-org-capture' (in addition to the actions of
+`counsel-org-capture')."
+  :type '(repeat :tag "Actions"
+                 (list :tag "Action"
+                       (string   :tag "     key")
+                       (function :tag "function")
+                       (string   :tag "    name")))
+  :group 'counsel-projectile)
+
+(defcustom counsel-projectile-org-capture-templates-first-p t
+  "Non-nil if `counsel-projectile-org-capture' should display templates from `counsel-projectile-org-capture-templates' before those from `org-capture-templates'."
+  :type 'boolean
+  :group 'counsel-projectile)
+
+(defvar counsel-projectile--org-capture-templates-backup nil
+  "Stores a backup of `org-capture-templates'.")
+
+(defun counsel-projectile-org-capture-action-switch-project (&optional _)
+  "Switch project action for `counsel-projectile-org-capture'."
+  (setq org-capture-templates counsel-projectile--org-capture-templates-backup)
+  (counsel-projectile-switch-project 'counsel-projectile-switch-project-action-org-capture))
+  
+;;;###autoload
+(defun counsel-projectile-org-capture (&optional from-buffer)
+  "Capture into the current project.
+
+This command is a replacement for `org-capture' (or
+`counsel-org-capture') offering project-specific capture
+templates, in addition to the regular templates available from
+`org-capture'. These project templates, which are \"expanded\"
+relatively to the current project, are determined by the
+variables `counsel-projectile-org-capture-templates' and
+`counsel-projectile-org-capture-templates-contexts'. See the
+former variable in particular for details.
+
+Optional argument FROM-BUFFER specifies the buffer from which to
+capture."
+  (interactive)
+  (require 'org-capture)
+  (setq counsel-projectile--org-capture-templates-backup org-capture-templates)
+  (let* ((ivy--actions-list (copy-sequence ivy--actions-list))
+         (root (ignore-errors (projectile-project-root)))
+         (name (projectile-project-name))
+         (org-capture-templates-contexts
+          (append (when root
+                    counsel-projectile-org-capture-templates-contexts)
+                  org-capture-templates-contexts))
+         (org-capture-templates
+          (append
+           (unless counsel-projectile-org-capture-templates-first-p
+             org-capture-templates)
+           (when root
+             (cl-loop
+              with replace-fun = `(lambda (string)
+                                    (replace-regexp-in-string
+                                     "\\${[^}]+}"
+                                     (lambda (s)
+                                       (pcase s
+                                         ("${root}" ,root)
+                                         ("${name}" ,name)))
+                                     string))
+              for template in counsel-projectile-org-capture-templates
+              collect (cl-loop
+                       for item in template
+                       if (= (cl-position item template) 1) ;; template's name
+                       collect (funcall replace-fun item)
+                       else if (= (cl-position item template) 3) ;; template's target
+                       collect (cl-loop
+                                for x in item
+                                if (stringp x)
+                                collect (funcall replace-fun x)
+                                else
+                                collect x)
+                       else
+                       collect item)))
+           (when counsel-projectile-org-capture-templates-first-p
+             org-capture-templates))))
+    (ivy-add-actions
+     'counsel-org-capture
+     counsel-projectile-org-capture-extra-actions)
+    (with-current-buffer (or from-buffer (current-buffer))
+      (counsel-org-capture))))
+
+;;* counsel-projectile-org-agenda
+
+(declare-function org-agenda-files "org")
+(defvar org-agenda-files)
+
+;;;###autoload
+(defun counsel-projectile-org-agenda (&optional arg keys restriction)
+  "Open project agenda.
+
+This command simply calls `org-agenda' after filtering out all
+agenda files that do not belong to the current project.
+
+Optional arguments ARG, KEYS, and RESTRICTION are as in
+`org-agenda'."
+  (interactive "P")
+  (if (and (eq projectile-require-project-root 'prompt)
+           (not (projectile-project-p)))
+      (counsel-projectile-switch-project
+       'counsel-projectile-switch-project-action-org-agenda)
+  (require 'org-agenda)
+  (let* ((root (projectile-project-root))
+         (org-agenda-files
+          (cl-remove-if-not (lambda (file)
+                              (string-prefix-p root (expand-file-name file)))
+                            (org-agenda-files t 'ifmode))))
+    (org-agenda arg keys restriction))))
+
+;;* counsel-projectile-switch-project
+
+(defcustom counsel-projectile-sort-projects nil
+  "Non-nil if projects should be sorted in
+`counsel-projectile-switch-project'.
+
+The sorting function can be modified by adding an entry for
+`counsel-projectile-switch-project' in
+`ivy-sort-functions-alist'."
+  :type 'boolean
+  :group 'counsel-projectile)
+
+(defcustom counsel-projectile-remove-current-project nil
+  "Non-nil if current project should be removed from the
+candidates list of `counsel-projectile-switch-project'."
+  :type 'boolean
+  :group 'counsel-projectile)
+
+(counsel-projectile--defcustom-action
+ 'counsel-projectile-switch-project
+ '(1
+   ("o" counsel-projectile-switch-project-action
+    "jump to a project buffer or file")
+   ("f" counsel-projectile-switch-project-action-find-file
+    "jump to a project file")
+   ("d" counsel-projectile-switch-project-action-find-dir
+    "jump to a project directory")
+   ("D" counsel-projectile-switch-project-action-dired
+    "open project in dired")
+   ("b" counsel-projectile-switch-project-action-switch-to-buffer
+    "jump to a project buffer")
+   ("m" counsel-projectile-switch-project-action-find-file-manually
+    "find file manually from project root")
+   ("S" counsel-projectile-switch-project-action-save-all-buffers
+    "save all project buffers")
+   ("k" counsel-projectile-switch-project-action-kill-buffers
+    "kill all project buffers")
+   ("K" counsel-projectile-switch-project-action-remove-known-project
+    "remove project from known projects")
+   ("c" counsel-projectile-switch-project-action-compile
+    "run project compilation command")
+   ("C" counsel-projectile-switch-project-action-configure
+    "run project configure command")
+   ("E" counsel-projectile-switch-project-action-edit-dir-locals
+    "edit project dir-locals")
+   ("v" counsel-projectile-switch-project-action-vc
+    "open project in vc-dir / magit / monky")
+   ("sg" counsel-projectile-switch-project-action-grep
+    "search project with grep")
+   ("si" counsel-projectile-switch-project-action-git-grep
+    "search project with git grep")
+   ("ss" counsel-projectile-switch-project-action-ag
+    "search project with ag")
+   ("sr" counsel-projectile-switch-project-action-rg
+    "search project with rg")
+   ("xs" counsel-projectile-switch-project-action-run-shell
+    "invoke shell from project root")
+   ("xe" counsel-projectile-switch-project-action-run-eshell
+    "invoke eshell from project root")
+   ("xt" counsel-projectile-switch-project-action-run-term
+    "invoke term from project root")
+   ("xv" counsel-projectile-switch-project-action-run-vterm
+    "invoke vterm from project root")
+   ("Oc" counsel-projectile-switch-project-action-org-capture
+    "capture into project")
+   ("Oa" counsel-projectile-switch-project-action-org-agenda
+    "open project agenda"))
+ 'counsel-projectile)
+
+(defun counsel-projectile-switch-project-by-name (project)
+  "Switch to PROJECT.
+Invokes the command referenced by
+`projectile-switch-project-action' on switch.
+
+This is a replacement for `projectile-switch-project-by-name'
+with a different switching mechanism: the switch-project action
+is called from a dedicated buffer rather than the initial buffer.
+Also, PROJECT's dir-local variables are loaded before calling the
+action."
+  (run-hooks 'projectile-before-switch-project-hook)
+  ;; Kill and recreate the switch buffer to get rid of any local
+  ;; variable
+  (ignore-errors (kill-buffer " *counsel-projectile*"))
+  (set-buffer (get-buffer-create " *counsel-projectile*"))
+  (setq default-directory project)
+  ;; Load the project dir-local variables into the switch buffer, so
+  ;; the action can make use of them
+  (hack-dir-local-variables-non-file-buffer)
+  (funcall projectile-switch-project-action)
+  ;; If the action relies on `ivy-read' then, after one of its
+  ;; `ivy-read' actions is executed, the current buffer will be set
+  ;; back to the initial buffer. Hence we make sure tu evaluate
+  ;; `projectile-after-switch-project-hook' from the switch buffer.
+  (with-current-buffer " *counsel-projectile*"
+    (run-hooks 'projectile-after-switch-project-hook)))
+
+(defun counsel-projectile-switch-project-action (project)
+  "Jump to a file or buffer in PROJECT."
+  (let* ((from-buffer (ivy-state-buffer ivy-last))
+         (projectile-switch-project-action
+          `(lambda ()
+             (counsel-projectile ivy-current-prefix-arg ,from-buffer))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-find-file (project)
+  "Jump to a file in PROJECT."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (counsel-projectile-find-file ivy-current-prefix-arg))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-find-file-manually (project)
+  "Call `find-file' from PROJECT's root."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (counsel-find-file project))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-find-dir (project)
+  "Jump to a directory in PROJECT."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (counsel-projectile-find-dir ivy-current-prefix-arg))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-dired (project)
+  "Open `dired' at PROJECT root."
+  (let ((projectile-switch-project-action 'projectile-dired))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-switch-to-buffer (project)
+  "Jump to a buffer in PROJECT."
+  (let* ((from-buffer (ivy-state-buffer ivy-last))
+         (projectile-switch-project-action
+          `(lambda ()
+            (counsel-projectile-switch-to-buffer ,from-buffer))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-save-all-buffers (project)
+  "Save all buffers in PROJECT."
+  (let ((projectile-switch-project-action 'projectile-save-project-buffers))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-kill-buffers (project)
+  "Kill all buffers in PROJECT."
+  (let ((projectile-switch-project-action 'projectile-kill-buffers))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-remove-known-project (project)
+  "Remove PROJECT from the list of known projects."
+  (projectile-remove-known-project project)
+  (setq ivy--all-candidates
+        (delete project ivy--all-candidates))
+  (ivy--reset-state ivy-last))
+
+(defun counsel-projectile-switch-project-action-compile (project)
+  "Run PROJECT compliation command."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (projectile-compile-project ivy-current-prefix-arg))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-configure (project)
+  "Run PROJECT configure command."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (projectile-configure-project ivy-current-prefix-arg))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-edit-dir-locals (project)
+  "Edit PROJECT's dir-locals."
+  (let ((projectile-switch-project-action 'projectile-edit-dir-locals))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-vc (project)
+  "Open PROJECT in vc-dir / magit / monky."
+  (let ((projectile-switch-project-action 'projectile-vc))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-run-shell (project)
+  "Invoke `shell' from PROJECT's root."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (projectile-run-shell ivy-current-prefix-arg))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-run-eshell (project)
+  "Invoke `eshell' from PROJECT's root."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (projectile-run-eshell ivy-current-prefix-arg))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-run-term (project)
+  "Invoke `term' from PROJECT's root."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (projectile-run-term ivy-current-prefix-arg))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-run-vterm (project)
+  "Invoke `vterm' from PROJECT's root."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (projectile-run-vterm ivy-current-prefix-arg))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-grep (project)
+  "Search PROJECT with grep."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (setq current-prefix-arg ivy-current-prefix-arg)
+           (counsel-projectile-grep))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-git-grep (project)
+  "Search PROJECT with git grep."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (setq current-prefix-arg ivy-current-prefix-arg)
+           (counsel-projectile-git-grep))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-ag (project)
+  "Search PROJECT with ag."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (setq current-prefix-arg ivy-current-prefix-arg)
+           (counsel-projectile-ag))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-rg (project)
+  "Search PROJECT with rg."
+  (let ((projectile-switch-project-action
+         (lambda ()
+           (setq current-prefix-arg ivy-current-prefix-arg)
+           (counsel-projectile-rg))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-org-capture (project)
+  "Capture into PROJECT."
+  (let* ((from-buffer (ivy-state-buffer ivy-last))
+         (projectile-switch-project-action
+          `(lambda ()
+             (counsel-projectile-org-capture ,from-buffer))))
+    (counsel-projectile-switch-project-by-name project)))
+
+(defun counsel-projectile-switch-project-action-org-agenda (project)
+  "Open PROJECT agenda."
+  (let ((projectile-switch-project-action 'counsel-projectile-org-agenda))
+    (counsel-projectile-switch-project-by-name project)))
+
+;;;###autoload
+(defun counsel-projectile-switch-project (&optional default-action)
+  "Switch project.
+
+Optional argument DEFAULT-ACTION is the key, function, name, or
+index in the list `counsel-projectile-switch-project-action' (1
+for the first action, etc) of the action to set as default."
+  (interactive)
+  (ivy-read (projectile-prepend-project-name "Switch to project: ")
+            (if counsel-projectile-remove-current-project
+                (projectile-relevant-known-projects)
+              projectile-known-projects)
+            :preselect (and (projectile-project-p)
+                            (abbreviate-file-name (projectile-project-root)))
+            :action (or (and default-action
+                             (listp counsel-projectile-switch-project-action)
+                             (integerp (car counsel-projectile-switch-project-action))
+                             (cons (counsel-projectile--action-index
+                                    default-action
+                                    counsel-projectile-switch-project-action)
+                                   (cdr counsel-projectile-switch-project-action)))
+                        counsel-projectile-switch-project-action)
+            :require-match t
+            :sort counsel-projectile-sort-projects
+            :caller 'counsel-projectile-switch-project))
+
+;;* counsel-projectile
+
+(counsel-projectile--defcustom-action
+ 'counsel-projectile
+ '(1
+   ("o" counsel-projectile-action
+    "current window")
+   ("j" counsel-projectile-action-other-window
+    "other window")
+   ("k" counsel-projectile-action-kill-delete
+    "kill buffer / delete-file")
+   ("x" counsel-projectile-action-file-extern
+    "open file externally")
+   ("r" counsel-projectile-action-file-root
+    "open file as root")
+   ("m" counsel-projectile-action-find-file-manually
+    "find file manually")
+   ("p" counsel-projectile-action-switch-project
+    "switch project"))
+ 'counsel-projectile)
+
+(defvar counsel-projectile-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-c C-k") (lambda ()
+                                      (interactive)
+                                      (counsel-projectile-action-kill-delete (ivy-state-current ivy-last))))
+    map)
+  "Keymap for `counsel-projectile'.")
+
+(defvar counsel-projectile--buffers nil
+  "Stores a list of project buffers.")
+
+(defvar counsel-projectile--non-visited-files nil
+  "Stores a list of project files that are not currently
+  visited by a buffer.")
+
+(defun counsel-projectile--project-buffers-and-files (&rest _)
+  ;; The ignored arguments are so that the function can be used as
+  ;; collection function in `counsel-projectile'.
+  "Return a list of buffers and non-visited files in the current
+  project.  Buffers and files are separately sorted depending on
+  `counsel-projectile-sort-buffers' and
+  `counsel-projectile-sort-files', respectively."
+  (let ((buffers (counsel-projectile--project-buffers))
+        (files (projectile-current-project-files))
+        (root (projectile-project-root))
+        file sort-fn)
+    ;; Remove files that are visited by a buffer:
+    (dolist (buffer buffers files)
+      (when (setq file (buffer-file-name (get-buffer buffer)))
+        (setq files (remove (file-relative-name file root) files))))
+    ;; Sort buffers and files depending on
+    ;; `counsel-projectile-sort-buffers' and
+    ;; `counsel-projectile-sort-files', respectively.
+    ;; We need to do this here because matching will be done against
+    ;; the variables `counsel-projectile--buffers' and
+    ;; `counsel-projectile--non-visited-files', not against the
+    ;; returned collection, so ivy's native sorting mechanism won't
+    ;; work.
+    (when (and counsel-projectile-sort-buffers
+               (<= (length buffers) ivy-sort-max-size)
+               (setq sort-fn (ivy--sort-function 'counsel-projectile-switch-to-buffer)))
+      (setq buffers (sort (copy-sequence buffers) sort-fn)))
+    (when (and counsel-projectile-sort-files
+               (<= (length files) ivy-sort-max-size)
+               (setq sort-fn (ivy--sort-function 'counsel-projectile-find-file)))
+      (setq files (sort (copy-sequence files) sort-fn)))
+    ;; Finally, bind `counsel-projectile--buffers' and
+    ;; `counsel-projectile--non-visited-files' and return the whole
+    ;; collection.
+    (append (setq counsel-projectile--buffers buffers)
+            (setq counsel-projectile--non-visited-files files))))
+
+(defun counsel-projectile--matcher (regexp _candidates)
+  "Return REGEXP-matching CANDIDATES for `counsel-projectile'.
+
+Relies on `ivy--switch-buffer-matcher' for buffers and the
+matcher specified in `counsel-projectile-find-file-matcher' for
+files."
+  (append (ivy--switch-buffer-matcher regexp counsel-projectile--buffers)
+          (counsel-projectile--find-file-matcher regexp counsel-projectile--non-visited-files)))
+
+(defun counsel-projectile-action (name)
+  "Switch to buffer or find file named NAME."
+  (if (member name counsel-projectile--buffers)
+      (counsel-projectile-switch-to-buffer-action name)
+    (counsel-projectile-find-file-action name)))
+
+(defun counsel-projectile-action-other-window (name)
+  "Switch to buffer or find file named NAME in another window."
+  (if (member name counsel-projectile--buffers)
+      (switch-to-buffer-other-window name)
+    (counsel-projectile-find-file-action-other-window name)))
+
+(defun counsel-projectile-action-kill-delete (name)
+  "Kill buffer or delete-file named NAME."
+  (if (member name counsel-projectile--buffers)
+      (ivy--kill-buffer-action name)
+    (counsel-projectile-find-file-action-delete name)))
+  
+(defun counsel-projectile-action-find-file-manually (name)
+  "Call `counsel-find-file' from default directory of buffer
+directory of file named NAME."
+  (if (member name counsel-projectile--buffers)
+      (counsel-projectile-switch-to-buffer-action-find-file-manually name)
+    (counsel-projectile-find-file-action-find-file-manually name)))
+
+(defun counsel-projectile-action-file-extern (name)
+  "Find file named NAME externally."
+  (if (member name counsel-projectile--buffers)
+      (message "This action does not apply to buffers.")
+    (counsel-projectile-find-file-action-extern name)))
+
+(defun counsel-projectile-action-file-root (name)
+  "Find file named NAME as root."
+  (if (member name counsel-projectile--buffers)
+      (message "This action does not apply to buffers.")
+    (counsel-projectile-find-file-action-root name)))
+
+(defun counsel-projectile-action-switch-project (&optional _)
+  "Switch project action for `counsel-projectile'."
+  (counsel-projectile-switch-project 'counsel-projectile-switch-project-action))
+
+(defun counsel-projectile-transformer (str)
+  "Fontifies modified, file-visiting buffers as well as non-visited files."
+  (if (member str counsel-projectile--buffers)
+      (counsel-projectile-switch-to-buffer-transformer str)
+    (propertize str 'face 'ivy-virtual)))
+
+;;;###autoload
+(defun counsel-projectile (&optional arg from-buffer)
+  "Jump to a buffer or file in the current project.
+
+With a prefix ARG, invalidate the cache first.
+
+If `counsel-projectile-preview-buffers' is non-nil, display a
+preview of the selected ivy completion candidate buffer as in
+`counsel-switch-buffer', falling back to the current buffer or
+optionally FROM-BUFFER.
+
+If `counsel-switch-buffer-preview-virtual-buffers' is also
+non-nil, also display a preview of the selected ivy completion
+candidate non-visited file."
+  (interactive "P")
+  (if (and (eq projectile-require-project-root 'prompt)
+           (not (projectile-project-p)))
+      (counsel-projectile-action-switch-project)
+    (projectile-maybe-invalidate-cache arg)
+    (ivy-read (projectile-prepend-project-name "Load buffer or file: ")
+              ;; We use a collection function so that it is called each
+              ;; time the `ivy-state' is reset. This is needed for the
+              ;; "kill buffer" action.
+              #'counsel-projectile--project-buffers-and-files
+              :matcher #'counsel-projectile--matcher
+              :require-match t
+              :action counsel-projectile-action
+              :keymap counsel-projectile-map
+              :extra-props (list :from-buffer from-buffer)
+              :caller 'counsel-projectile)))
+
+(ivy-configure 'counsel-projectile
+:display-transformer-fn #'counsel-projectile-transformer
+ :update-fn #'counsel-projectile--switch-to-buffer-update-fn
+ :unwind-fn #'counsel--switch-buffer-unwind)
+
+;;* counsel-projectile-mode
+
+(defcustom counsel-projectile-key-bindings
+  '((projectile-find-file        . counsel-projectile-find-file)
+    (projectile-find-file-dwim   . counsel-projectile-find-file-dwim)
+    (projectile-find-dir         . counsel-projectile-find-dir)
+    (projectile-switch-to-buffer . counsel-projectile-switch-to-buffer)
+    (projectile-grep             . counsel-projectile-grep)
+    (projectile-ag               . counsel-projectile-ag)
+    (projectile-ripgrep          . counsel-projectile-rg)
+    (projectile-switch-project   . counsel-projectile-switch-project)
+    (" "                         . counsel-projectile)
+    ("si"                        . counsel-projectile-git-grep)
+    ("Oc"                        . counsel-projectile-org-capture)
+    ("Oa"                        . counsel-projectile-org-agenda))
+  "Alist of counsel-projectile key bindings.
+
+Each element is of the form \(KEY . DEF\) where KEY is either a
+key sequence to bind in `projectile-command-map' or a projectile
+command to remap in `projectile-mode-map', and DEF is the
+counsel-projectile command to which KEY is remapped or bound."
+  :type '(alist :key-type (choice (function :tag "Projectile command")
+                                  key-sequence)
+                :value-type (function :tag "Counsel-projectile command"))
+  :group 'counsel-projectile)
+
+;;;###autoload
+(define-minor-mode counsel-projectile-mode
+  "Toggle Counsel-Projectile mode on or off.
+
+With a prefix argument ARG, enable the mode if ARG is positive,
+and disable it otherwise.  If called from Lisp, enable the mode
+if ARG is omitted or nil, and toggle it if ARG is `toggle'.
+
+Counsel-Projectile mode turns on Projectile mode, thus enabling
+all projectile key bindings, and adds the counsel-projectile key
+bindings on top of them.
+
+The counsel-projectile key bindings either remap existing
+projectile commands to their counsel-projectile replacements or
+bind keys to counsel-projectile commands that have no projectile
+counterparts."
+  :group 'counsel-projectile
+  :require 'counsel-projectile
+  :global t
+  (cond
+   (counsel-projectile-mode
+    (projectile-mode)
+    (dolist (binding counsel-projectile-key-bindings)
+      (if (functionp (car binding))
+          (define-key projectile-mode-map `[remap ,(car binding)] (cdr binding))
+        (define-key projectile-command-map (car binding) (cdr binding)))))
+   (t
+    (dolist (binding counsel-projectile-key-bindings)
+      (if (functionp (car binding))
+          (define-key projectile-mode-map `[remap ,(car binding)] nil)
+        (define-key projectile-command-map (car binding) nil)))
+    (projectile-mode -1))))
+
+;;* provide
+
+(provide 'counsel-projectile)
+
+;;; counsel-projectile.el ends here
diff --git a/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile.elc b/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile.elc
new file mode 100644
index 0000000..326a5bc
Binary files /dev/null and b/emacs/.emacs.d/elpa/counsel-projectile-20211004.2003/counsel-projectile.elc differ
diff --git a/emacs/.emacs.d/elpa/dash-20260221.1346/dash-autoloads.el b/emacs/.emacs.d/elpa/dash-20260221.1346/dash-autoloads.el
new file mode 100644
index 0000000..f908413
--- /dev/null
+++ b/emacs/.emacs.d/elpa/dash-20260221.1346/dash-autoloads.el
@@ -0,0 +1,83 @@
+;;; dash-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from dash.el
+
+(autoload 'dash-fontify-mode "dash" "\
+Toggle fontification of Dash special variables.
+
+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'.
+
+This is a minor mode.  If called interactively, toggle the
+`Dash-Fontify mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `dash-fontify-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(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, 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.
+
+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)
+(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)
+(register-definition-prefixes "dash" '("!cdr" "!cons" "--" "->" "-a" "-butlast" "-c" "-d" "-e" "-f" "-gr" "-i" "-juxt" "-keep" "-l" "-m" "-no" "-o" "-p" "-r" "-s" "-t" "-u" "-value-to-list" "-when-let" "-zip" "dash-"))
+
+;;; End of scraped data
+
+(provide 'dash-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; dash-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/dash-20260221.1346/dash-pkg.el b/emacs/.emacs.d/elpa/dash-20260221.1346/dash-pkg.el
new file mode 100644
index 0000000..707dcce
--- /dev/null
+++ b/emacs/.emacs.d/elpa/dash-20260221.1346/dash-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "dash" "20260221.1346"
+  "A modern list library for Emacs."
+  '((emacs "24"))
+  :url "https://github.com/magnars/dash.el"
+  :commit "d3a84021dbe48dba63b52ef7665651e0cf02e915"
+  :revdesc "d3a84021dbe4"
+  :keywords '("extensions" "lisp")
+  :authors '(("Magnar Sveen" . "magnars@gmail.com"))
+  :maintainers '(("Basil L. Contovounesios" . "basil@contovou.net")))
diff --git a/emacs/.emacs.d/elpa/dash-20260221.1346/dash.el b/emacs/.emacs.d/elpa/dash-20260221.1346/dash.el
new file mode 100644
index 0000000..e515800
--- /dev/null
+++ b/emacs/.emacs.d/elpa/dash-20260221.1346/dash.el
@@ -0,0 +1,4177 @@
+;;; dash.el --- A modern list library for Emacs  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2012-2026 Free Software Foundation, Inc.
+
+;; Author: Magnar Sveen <magnars@gmail.com>
+;; Maintainer: Basil L. Contovounesios <basil@contovou.net>
+;; Package-Version: 20260221.1346
+;; Package-Revision: d3a84021dbe4
+;; Package-Requires: ((emacs "24"))
+;; Keywords: extensions, lisp
+;; URL: https://github.com/magnars/dash.el
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; A modern list API for Emacs.
+;;
+;; Dash is a utility library that affords functional programming
+;; patterns inspired by Clojure, particularly in the realm of list
+;; manipulation.  Examples include higher-order functions (map, reduce,
+;; filter) and derivatives (drop, flatten, sum); function combinators
+;; (partial application, argument flipping, composition); and threading
+;; and anaphoric macros with destructuring support.
+;;
+;; Dash is particularly useful in providing a broad and consistent API
+;; across many Emacs versions.
+;;
+;; Documentation and examples are in the manual at Info node `(dash) Top'
+;; and on the web at https://elpa.gnu.org/packages/doc/dash.html, as well
+;; as in the project’s README.md file.
+
+;;; Code:
+
+(eval-when-compile
+  (unless (fboundp 'static-if)
+    (defmacro static-if (condition then-form &rest else-forms)
+      "Expand to THEN-FORM or ELSE-FORMS based on compile-time CONDITION.
+Polyfill for Emacs 30 `static-if'."
+      (declare (debug (sexp sexp &rest sexp)) (indent 2))
+      (if (eval condition lexical-binding)
+          then-form
+        (cons 'progn else-forms))))
+
+  ;; TODO: Emacs 24.3 first introduced `gv', so remove this and all
+  ;; calls to `defsetf' when support for earlier versions is dropped.
+  (unless (fboundp 'gv-define-setter)
+    (require 'cl))
+
+  ;; - 24.3 started complaining about unknown `declare' props.
+  ;; - 25 introduced `pure' and `side-effect-free'.
+  ;; - 30 introduced `important-return-value'.
+  (when (boundp 'defun-declarations-alist)
+    (dolist (prop '(important-return-value pure side-effect-free))
+      (unless (assq prop defun-declarations-alist)
+        (push (list prop #'ignore) defun-declarations-alist)))))
+
+(defgroup dash ()
+  "Customize group for Dash, a modern list library."
+  :group 'extensions
+  :group 'lisp
+  :prefix "dash-")
+
+(defmacro !cons (car cdr)
+  "Destructive: Set CDR to the cons of CAR and CDR."
+  (declare (debug (form symbolp)))
+  `(setq ,cdr (cons ,car ,cdr)))
+
+(defmacro !cdr (list)
+  "Destructive: Set LIST to the cdr of LIST."
+  (declare (debug (symbolp)))
+  `(setq ,list (cdr ,list)))
+
+(defmacro --each (list &rest body)
+  "Evaluate BODY for each element of LIST and return nil.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating BODY.
+This is the anaphoric counterpart to `-each'."
+  (declare (debug (form body)) (indent 1))
+  (let ((l (make-symbol "list"))
+        (i (make-symbol "i")))
+    `(let ((,l ,list)
+           (,i 0))
+       (while ,l
+         (let ((it (pop ,l)) (it-index ,i))
+           (ignore it it-index)
+           ,@body)
+         (setq ,i (1+ ,i))))))
+
+(defun -each (list fn)
+  "Call FN on each element of LIST.
+Return nil; this function is intended for side effects.
+
+Its anaphoric counterpart is `--each'.
+
+For access to the current element's index in LIST, see
+`-each-indexed'."
+  (declare (indent 1))
+  (ignore (mapc fn list)))
+
+(defalias '--each-indexed '--each)
+
+(defun -each-indexed (list fn)
+  "Call FN on each index and element of LIST.
+For each ITEM at INDEX in LIST, call (funcall FN INDEX ITEM).
+Return nil; this function is intended for side effects.
+
+See also: `-map-indexed'."
+  (declare (indent 1))
+  (--each list (funcall fn it-index it)))
+
+(defmacro --each-while (list pred &rest body)
+  "Evaluate BODY for each item in LIST, while PRED evaluates to non-nil.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating PRED or BODY.  Once
+an element is reached for which PRED evaluates to nil, no further
+BODY is evaluated.  The return value is always nil.
+This is the anaphoric counterpart to `-each-while'."
+  (declare (debug (form form body)) (indent 2))
+  (let ((l (make-symbol "list"))
+        (i (make-symbol "i"))
+        (elt (make-symbol "elt")))
+    `(let ((,l ,list)
+           (,i 0)
+           ,elt)
+       (while (when ,l
+                (setq ,elt (car-safe ,l))
+                (let ((it ,elt) (it-index ,i))
+                  (ignore it it-index)
+                  ,pred))
+         (let ((it ,elt) (it-index ,i))
+           (ignore it it-index)
+           ,@body)
+         (setq ,i (1+ ,i) ,l (cdr ,l))))))
+
+(defun -each-while (list pred fn)
+  "Call FN on each ITEM in LIST, while (PRED ITEM) is non-nil.
+Once an ITEM is reached for which PRED returns nil, FN is no
+longer called.  Return nil; this function is intended for side
+effects.
+
+Its anaphoric counterpart is `--each-while'."
+  (declare (indent 2))
+  (--each-while list (funcall pred it) (funcall fn it)))
+
+(defmacro --each-r (list &rest body)
+  "Evaluate BODY for each element of LIST in reversed order.
+Each element of LIST in turn, starting at its end, is bound to
+`it' and its index within LIST to `it-index' before evaluating
+BODY.  The return value is always nil.
+This is the anaphoric counterpart to `-each-r'."
+  (declare (debug (form body)) (indent 1))
+  (let ((v (make-symbol "vector"))
+        (i (make-symbol "i")))
+    ;; Implementation note: building a vector is considerably faster
+    ;; than building a reversed list (vector takes less memory, so
+    ;; there is less GC), plus `length' comes naturally.  In-place
+    ;; `nreverse' would be faster still, but BODY would be able to see
+    ;; that, even if the modification was undone before we return.
+    `(let* ((,v (vconcat ,list))
+            (,i (length ,v))
+            it it-index)
+       (ignore it it-index)
+       (while (> ,i 0)
+         (setq ,i (1- ,i) it-index ,i it (aref ,v ,i))
+         ,@body))))
+
+(defun -each-r (list fn)
+  "Call FN on each element of LIST in reversed order.
+Return nil; this function is intended for side effects.
+
+Its anaphoric counterpart is `--each-r'."
+  (--each-r list (funcall fn it)))
+
+(defmacro --each-r-while (list pred &rest body)
+  "Eval BODY for each item in reversed LIST, while PRED evals to non-nil.
+Each element of LIST in turn, starting at its end, is bound to
+`it' and its index within LIST to `it-index' before evaluating
+PRED or BODY.  Once an element is reached for which PRED
+evaluates to nil, no further BODY is evaluated.  The return value
+is always nil.
+This is the anaphoric counterpart to `-each-r-while'."
+  (declare (debug (form form body)) (indent 2))
+  (let ((v (make-symbol "vector"))
+        (i (make-symbol "i"))
+        (elt (make-symbol "elt")))
+    `(let* ((,v (vconcat ,list))
+            (,i (length ,v))
+            ,elt it it-index)
+       (ignore it it-index)
+       (while (when (> ,i 0)
+                (setq ,i (1- ,i) it-index ,i)
+                (setq ,elt (aref ,v ,i) it ,elt)
+                ,pred)
+         (setq it-index ,i it ,elt)
+         ,@body))))
+
+(defun -each-r-while (list pred fn)
+  "Call FN on each ITEM in reversed LIST, while (PRED ITEM) is non-nil.
+Once an ITEM is reached for which PRED returns nil, FN is no
+longer called.  Return nil; this function is intended for side
+effects.
+
+Its anaphoric counterpart is `--each-r-while'."
+  (--each-r-while list (funcall pred it) (funcall fn it)))
+
+(defmacro --dotimes (num &rest body)
+  "Evaluate BODY NUM times, presumably for side effects.
+BODY is evaluated with the local variable `it' temporarily bound
+to successive integers running from 0, inclusive, to NUM,
+exclusive.  BODY is not evaluated if NUM is less than 1.
+This is the anaphoric counterpart to `-dotimes'."
+  (declare (debug (form body)) (indent 1))
+  (let ((n (make-symbol "num"))
+        (i (make-symbol "i")))
+    `(let ((,n ,num)
+           (,i 0)
+           it)
+       (ignore it)
+       (while (< ,i ,n)
+         (setq it ,i ,i (1+ ,i))
+         ,@body))))
+
+(defun -dotimes (num fn)
+  "Call FN NUM times, presumably for side effects.
+FN is called with a single argument on successive integers
+running from 0, inclusive, to NUM, exclusive.  FN is not called
+if NUM is less than 1.
+
+This function's anaphoric counterpart is `--dotimes'."
+  (declare (indent 1))
+  (--dotimes num (funcall fn it)))
+
+(defun -map (fn list)
+  "Apply FN to each item in LIST and return the list of results.
+
+This function's anaphoric counterpart is `--map'."
+  (declare (important-return-value t))
+  (mapcar fn list))
+
+(defmacro --map (form list)
+  "Eval FORM for each item in LIST and return the list of results.
+Each element of LIST in turn is bound to `it' before evaluating
+FORM.
+This is the anaphoric counterpart to `-map'."
+  (declare (debug (def-form form)))
+  `(mapcar (lambda (it) (ignore it) ,form) ,list))
+
+(defmacro --reduce-from (form init list)
+  "Accumulate a value by evaluating FORM across LIST.
+This macro is like `--each' (which see), but it additionally
+provides an accumulator variable `acc' which it successively
+binds to the result of evaluating FORM for the current LIST
+element before processing the next element.  For the first
+element, `acc' is initialized with the result of evaluating INIT.
+The return value is the resulting value of `acc'.  If LIST is
+empty, FORM is not evaluated, and the return value is the result
+of INIT.
+This is the anaphoric counterpart to `-reduce-from'."
+  (declare (debug (form form form)))
+  `(let ((acc ,init))
+     (--each ,list (setq acc ,form))
+     acc))
+
+(defun -reduce-from (fn init list)
+  "Reduce the function FN across LIST, starting with INIT.
+Return the result of applying FN to INIT and the first element of
+LIST, then applying FN to that result and the second element,
+etc.  If LIST is empty, return INIT without calling FN.
+
+This function's anaphoric counterpart is `--reduce-from'.
+
+For other folds, see also `-reduce' and `-reduce-r'."
+  (declare (important-return-value t))
+  (--reduce-from (funcall fn acc it) init list))
+
+(defmacro --reduce (form list)
+  "Accumulate a value by evaluating FORM across LIST.
+This macro is like `--reduce-from' (which see), except the first
+element of LIST is taken as INIT.  Thus if LIST contains a single
+item, it is returned without evaluating FORM.  If LIST is empty,
+FORM is evaluated with `it' and `acc' bound to nil.
+This is the anaphoric counterpart to `-reduce'."
+  (declare (debug (form form)))
+  (let ((lv (make-symbol "list-value")))
+    `(let ((,lv ,list))
+       (if ,lv
+           (--reduce-from ,form (car ,lv) (cdr ,lv))
+         ;; Explicit nil binding pacifies lexical "variable left uninitialized"
+         ;; warning.  See issue #377 and upstream https://bugs.gnu.org/47080.
+         (let ((acc nil) (it nil))
+           (ignore acc it)
+           ,form)))))
+
+(defun -reduce (fn list)
+  "Reduce the function FN across LIST.
+Return the result of applying FN to the first two elements of
+LIST, then applying FN to that result and the third element, etc.
+If LIST contains a single element, return it without calling FN.
+If LIST is empty, return the result of calling FN with no
+arguments.
+
+This function's anaphoric counterpart is `--reduce'.
+
+For other folds, see also `-reduce-from' and `-reduce-r'."
+  (declare (important-return-value t))
+  (if list
+      (-reduce-from fn (car list) (cdr list))
+    (funcall fn)))
+
+(defmacro --reduce-r-from (form init list)
+  "Accumulate a value by evaluating FORM across LIST in reverse.
+This macro is like `--reduce-from', except it starts from the end
+of LIST.
+This is the anaphoric counterpart to `-reduce-r-from'."
+  (declare (debug (form form form)))
+  `(let ((acc ,init))
+     (--each-r ,list (setq acc ,form))
+     acc))
+
+(defun -reduce-r-from (fn init list)
+  "Reduce the function FN across LIST in reverse, starting with INIT.
+Return the result of applying FN to the last element of LIST and
+INIT, then applying FN to the second-to-last element and the
+previous result of FN, etc.  That is, the first argument of FN is
+the current element, and its second argument the accumulated
+value.  If LIST is empty, return INIT without calling FN.
+
+This function is like `-reduce-from' but the operation associates
+from the right rather than left.  In other words, it starts from
+the end of LIST and flips the arguments to FN.  Conceptually, it
+is like replacing the conses in LIST with applications of FN, and
+its last link with INIT, and evaluating the resulting expression.
+
+This function's anaphoric counterpart is `--reduce-r-from'.
+
+For other folds, see also `-reduce-r' and `-reduce'."
+  (declare (important-return-value t))
+  (--reduce-r-from (funcall fn it acc) init list))
+
+(defmacro --reduce-r (form list)
+  "Accumulate a value by evaluating FORM across LIST in reverse order.
+This macro is like `--reduce', except it starts from the end of
+LIST.
+This is the anaphoric counterpart to `-reduce-r'."
+  (declare (debug (form form)))
+  `(--reduce ,form (reverse ,list)))
+
+(defun -reduce-r (fn list)
+  "Reduce the function FN across LIST in reverse.
+Return the result of applying FN to the last two elements of
+LIST, then applying FN to the third-to-last element and the
+previous result of FN, etc.  That is, the first argument of FN is
+the current element, and its second argument the accumulated
+value.  If LIST contains a single element, return it without
+calling FN.  If LIST is empty, return the result of calling FN
+with no arguments.
+
+This function is like `-reduce' but the operation associates from
+the right rather than left.  In other words, it starts from the
+end of LIST and flips the arguments to FN.  Conceptually, it is
+like replacing the conses in LIST with applications of FN,
+ignoring its last link, and evaluating the resulting expression.
+
+This function's anaphoric counterpart is `--reduce-r'.
+
+For other folds, see also `-reduce-r-from' and `-reduce'."
+  (declare (important-return-value t))
+  (if list
+      (--reduce-r (funcall fn it acc) list)
+    (funcall fn)))
+
+(defmacro --reductions-from (form init list)
+  "Return a list of FORM's intermediate reductions across LIST.
+That is, a list of the intermediate values of the accumulator
+when `--reduce-from' (which see) is called with the same
+arguments.
+This is the anaphoric counterpart to `-reductions-from'."
+  (declare (debug (form form form)))
+  `(nreverse
+    (--reduce-from (cons (let ((acc (car acc))) (ignore acc) ,form) acc)
+                   (list ,init)
+                   ,list)))
+
+(defun -reductions-from (fn init list)
+  "Return a list of FN's intermediate reductions across LIST.
+That is, a list of the intermediate values of the accumulator
+when `-reduce-from' (which see) is called with the same
+arguments.
+
+This function's anaphoric counterpart is `--reductions-from'.
+
+For other folds, see also `-reductions' and `-reductions-r'."
+  (declare (important-return-value t))
+  (--reductions-from (funcall fn acc it) init list))
+
+(defmacro --reductions (form list)
+  "Return a list of FORM's intermediate reductions across LIST.
+That is, a list of the intermediate values of the accumulator
+when `--reduce' (which see) is called with the same arguments.
+This is the anaphoric counterpart to `-reductions'."
+  (declare (debug (form form)))
+  (let ((lv (make-symbol "list-value")))
+    `(let ((,lv ,list))
+       (if ,lv
+           (--reductions-from ,form (car ,lv) (cdr ,lv))
+         ;; Explicit nil binding pacifies lexical "variable left uninitialized"
+         ;; warning.  See issue #377 and upstream https://bugs.gnu.org/47080.
+         (let ((acc nil) (it nil))
+           (ignore acc it)
+           (list ,form))))))
+
+(defun -reductions (fn list)
+  "Return a list of FN's intermediate reductions across LIST.
+That is, a list of the intermediate values of the accumulator
+when `-reduce' (which see) is called with the same arguments.
+
+This function's anaphoric counterpart is `--reductions'.
+
+For other folds, see also `-reductions' and `-reductions-r'."
+  (declare (important-return-value t))
+  (if list
+      (--reductions-from (funcall fn acc it) (car list) (cdr list))
+    (list (funcall fn))))
+
+(defmacro --reductions-r-from (form init list)
+  "Return a list of FORM's intermediate reductions across reversed LIST.
+That is, a list of the intermediate values of the accumulator
+when `--reduce-r-from' (which see) is called with the same
+arguments.
+This is the anaphoric counterpart to `-reductions-r-from'."
+  (declare (debug (form form form)))
+  `(--reduce-r-from (cons (let ((acc (car acc))) (ignore acc) ,form) acc)
+                    (list ,init)
+                    ,list))
+
+(defun -reductions-r-from (fn init list)
+  "Return a list of FN's intermediate reductions across reversed LIST.
+That is, a list of the intermediate values of the accumulator
+when `-reduce-r-from' (which see) is called with the same
+arguments.
+
+This function's anaphoric counterpart is `--reductions-r-from'.
+
+For other folds, see also `-reductions' and `-reductions-r'."
+  (declare (important-return-value t))
+  (--reductions-r-from (funcall fn it acc) init list))
+
+(defmacro --reductions-r (form list)
+  "Return a list of FORM's intermediate reductions across reversed LIST.
+That is, a list of the intermediate values of the accumulator
+when `--reduce-re' (which see) is called with the same arguments.
+This is the anaphoric counterpart to `-reductions-r'."
+  (declare (debug (form list)))
+  (let ((lv (make-symbol "list-value")))
+    `(let ((,lv (reverse ,list)))
+       (if ,lv
+           (--reduce-from (cons (let ((acc (car acc))) (ignore acc) ,form) acc)
+                          (list (car ,lv))
+                          (cdr ,lv))
+         ;; Explicit nil binding pacifies lexical "variable left uninitialized"
+         ;; warning.  See issue #377 and upstream https://bugs.gnu.org/47080.
+         (let ((acc nil) (it nil))
+           (ignore acc it)
+           (list ,form))))))
+
+(defun -reductions-r (fn list)
+  "Return a list of FN's intermediate reductions across reversed LIST.
+That is, a list of the intermediate values of the accumulator
+when `-reduce-r' (which see) is called with the same arguments.
+
+This function's anaphoric counterpart is `--reductions-r'.
+
+For other folds, see also `-reductions-r-from' and
+`-reductions'."
+  (declare (important-return-value t))
+  (if list
+      (--reductions-r (funcall fn it acc) list)
+    (list (funcall fn))))
+
+(defmacro --filter (form list)
+  "Return a new list of the items in LIST for which FORM evals to non-nil.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.
+This is the anaphoric counterpart to `-filter'.
+For the opposite operation, see also `--remove'."
+  (declare (debug (form form)))
+  (let ((r (make-symbol "result")))
+    `(let (,r)
+       (--each ,list (when ,form (push it ,r)))
+       (nreverse ,r))))
+
+(defun -filter (pred list)
+  "Return a new list of the items in LIST for which PRED returns non-nil.
+
+Alias: `-select'.
+
+This function's anaphoric counterpart is `--filter'.
+
+For similar operations, see also `-keep' and `-remove'."
+  (declare (important-return-value t))
+  (--filter (funcall pred it) list))
+
+(defalias '-select '-filter)
+(defalias '--select '--filter)
+
+(defmacro --remove (form list)
+  "Return a new list of the items in LIST for which FORM evals to nil.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.
+This is the anaphoric counterpart to `-remove'.
+For the opposite operation, see also `--filter'."
+  (declare (debug (form form)))
+  `(--filter (not ,form) ,list))
+
+(defun -remove (pred list)
+  "Return a new list of the items in LIST for which PRED returns nil.
+
+Alias: `-reject'.
+
+This function's anaphoric counterpart is `--remove'.
+
+For similar operations, see also `-keep' and `-filter'."
+  (declare (important-return-value t))
+  (--remove (funcall pred it) list))
+
+(defalias '-reject '-remove)
+(defalias '--reject '--remove)
+
+(defmacro --remove-first (form list)
+  "Remove the first item from LIST for which FORM evals to non-nil.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.  This is a
+non-destructive operation, but only the front of LIST leading up
+to the removed item is a copy; the rest is LIST's original tail.
+If no item is removed, then the result is a complete copy.
+This is the anaphoric counterpart to `-remove-first'."
+  (declare (debug (form form)))
+  (let ((front (make-symbol "front"))
+        (tail (make-symbol "tail")))
+    `(let ((,tail ,list) ,front)
+       (--each-while ,tail (not ,form)
+         (push (pop ,tail) ,front))
+       (if ,tail
+           (nconc (nreverse ,front) (cdr ,tail))
+         (nreverse ,front)))))
+
+(defun -remove-first (pred list)
+  "Remove the first item from LIST for which PRED returns non-nil.
+This is a non-destructive operation, but only the front of LIST
+leading up to the removed item is a copy; the rest is LIST's
+original tail.  If no item is removed, then the result is a
+complete copy.
+
+Alias: `-reject-first'.
+
+This function's anaphoric counterpart is `--remove-first'.
+
+See also `-map-first', `-remove-item', and `-remove-last'."
+  (declare (important-return-value t))
+  (--remove-first (funcall pred it) list))
+
+;; TODO: #'-quoting the macro upsets Emacs 24.
+(defalias '-reject-first #'-remove-first)
+(defalias '--reject-first '--remove-first)
+
+(defmacro --remove-last (form list)
+  "Remove the last item from LIST for which FORM evals to non-nil.
+Each element of LIST in turn is bound to `it' before evaluating
+FORM.  The result is a copy of LIST regardless of whether an
+element is removed.
+This is the anaphoric counterpart to `-remove-last'."
+  (declare (debug (form form)))
+  `(nreverse (--remove-first ,form (reverse ,list))))
+
+(defun -remove-last (pred list)
+  "Remove the last item from LIST for which PRED returns non-nil.
+The result is a copy of LIST regardless of whether an element is
+removed.
+
+Alias: `-reject-last'.
+
+This function's anaphoric counterpart is `--remove-last'.
+
+See also `-map-last', `-remove-item', and `-remove-first'."
+  (declare (important-return-value t))
+  (--remove-last (funcall pred it) list))
+
+(defalias '-reject-last '-remove-last)
+(defalias '--reject-last '--remove-last)
+
+(defalias '-remove-item #'remove
+  "Return a copy of LIST with all occurrences of ITEM removed.
+The comparison is done with `equal'.
+\n(fn ITEM LIST)")
+
+(defmacro --keep (form list)
+  "Eval FORM for each item in LIST and return the non-nil results.
+Like `--filter', but returns the non-nil results of FORM instead
+of the corresponding elements of LIST.  Each element of LIST in
+turn is bound to `it' and its index within LIST to `it-index'
+before evaluating FORM.
+This is the anaphoric counterpart to `-keep'."
+  (declare (debug (form form)))
+  (let ((r (make-symbol "result"))
+        (m (make-symbol "mapped")))
+    `(let (,r)
+       (--each ,list (let ((,m ,form)) (when ,m (push ,m ,r))))
+       (nreverse ,r))))
+
+(defun -keep (fn list)
+  "Return a new list of the non-nil results of applying FN to each item in LIST.
+Like `-filter', but returns the non-nil results of FN instead of
+the corresponding elements of LIST.
+
+Its anaphoric counterpart is `--keep'."
+  (declare (important-return-value t))
+  (--keep (funcall fn it) list))
+
+(defun -non-nil (list)
+  "Return a copy of LIST with all nil items removed."
+  (declare (side-effect-free t))
+  (--filter it list))
+
+(defmacro --map-indexed (form list)
+  "Eval FORM for each item in LIST and return the list of results.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.  This is like
+`--map', but additionally makes `it-index' available to FORM.
+
+This is the anaphoric counterpart to `-map-indexed'."
+  (declare (debug (form form)))
+  (let ((r (make-symbol "result")))
+    `(let (,r)
+       (--each ,list
+         (push ,form ,r))
+       (nreverse ,r))))
+
+(defun -map-indexed (fn list)
+  "Apply FN to each index and item in LIST and return the list of results.
+This is like `-map', but FN takes two arguments: the index of the
+current element within LIST, and the element itself.
+
+This function's anaphoric counterpart is `--map-indexed'.
+
+For a side-effecting variant, see also `-each-indexed'."
+  (declare (important-return-value t))
+  (--map-indexed (funcall fn it-index it) list))
+
+(defmacro --map-when (pred rep list)
+  "Anaphoric form of `-map-when'."
+  (declare (debug (form form form)))
+  (let ((r (make-symbol "result")))
+    `(let (,r)
+       (--each ,list (!cons (if ,pred ,rep it) ,r))
+       (nreverse ,r))))
+
+(defun -map-when (pred rep list)
+  "Use PRED to conditionally apply REP to each item in LIST.
+Return a copy of LIST where the items for which PRED returns nil
+are unchanged, and the rest are mapped through the REP function.
+
+Alias: `-replace-where'
+
+See also: `-update-at'"
+  (declare (important-return-value t))
+  (--map-when (funcall pred it) (funcall rep it) list))
+
+(defalias '-replace-where '-map-when)
+(defalias '--replace-where '--map-when)
+
+(defun -map-first (pred rep list)
+  "Use PRED to determine the first item in LIST to call REP on.
+Return a copy of LIST where the first item for which PRED returns
+non-nil is replaced with the result of calling REP on that item.
+
+See also: `-map-when', `-replace-first'"
+  (declare (important-return-value t))
+  (let (front)
+    (while (and list (not (funcall pred (car list))))
+      (push (car list) front)
+      (!cdr list))
+    (if list
+        (-concat (nreverse front) (cons (funcall rep (car list)) (cdr list)))
+      (nreverse front))))
+
+(defmacro --map-first (pred rep list)
+  "Anaphoric form of `-map-first'."
+  (declare (debug (def-form def-form form)))
+  `(-map-first (lambda (it) (ignore it) ,pred)
+               (lambda (it) (ignore it) ,rep)
+               ,list))
+
+(defun -map-last (pred rep list)
+  "Use PRED to determine the last item in LIST to call REP on.
+Return a copy of LIST where the last item for which PRED returns
+non-nil is replaced with the result of calling REP on that item.
+
+See also: `-map-when', `-replace-last'"
+  (declare (important-return-value t))
+  (nreverse (-map-first pred rep (reverse list))))
+
+(defmacro --map-last (pred rep list)
+  "Anaphoric form of `-map-last'."
+  (declare (debug (def-form def-form form)))
+  `(-map-last (lambda (it) (ignore it) ,pred)
+              (lambda (it) (ignore it) ,rep)
+              ,list))
+
+(defun -replace (old new list)
+  "Replace all OLD items in LIST with NEW.
+
+Elements are compared using `equal'.
+
+See also: `-replace-at'"
+  (declare (pure t) (side-effect-free t))
+  (--map-when (equal it old) new list))
+
+(defun -replace-first (old new list)
+  "Replace the first occurrence of OLD with NEW in LIST.
+
+Elements are compared using `equal'.
+
+See also: `-map-first'"
+  (declare (pure t) (side-effect-free t))
+  (--map-first (equal old it) new list))
+
+(defun -replace-last (old new list)
+  "Replace the last occurrence of OLD with NEW in LIST.
+
+Elements are compared using `equal'.
+
+See also: `-map-last'"
+  (declare (pure t) (side-effect-free t))
+  (--map-last (equal old it) new list))
+
+(defmacro --mapcat (form list)
+  "Anaphoric form of `-mapcat'."
+  (declare (debug (form form)))
+  `(apply #'append (--map ,form ,list)))
+
+(defun -mapcat (fn list)
+  "Return the concatenation of the result of mapping FN over LIST.
+Thus function FN should return a list."
+  (declare (important-return-value t))
+  (--mapcat (funcall fn it) list))
+
+(defmacro --iterate (form init n)
+  "Anaphoric version of `-iterate'."
+  (declare (debug (form form form)))
+  (let ((res (make-symbol "result"))
+        (len (make-symbol "n")))
+    `(let ((,len ,n))
+       (when (> ,len 0)
+         (let* ((it ,init)
+                (,res (list it)))
+           (dotimes (_ (1- ,len))
+             (push (setq it ,form) ,res))
+           (nreverse ,res))))))
+
+(defun -iterate (fun init n)
+  "Return a list of iterated applications of FUN to INIT.
+
+This means a list of the form:
+
+  (INIT (FUN INIT) (FUN (FUN INIT)) ...)
+
+N is the length of the returned list."
+  (declare (important-return-value t))
+  (--iterate (funcall fun it) init n))
+
+(defun -flatten (l)
+  "Take a nested list L and return its contents as a single, flat list.
+
+Note that because nil represents a list of zero elements (an
+empty list), any mention of nil in L will disappear after
+flattening.  If you need to preserve nils, consider `-flatten-n'
+or map them to some unique symbol and then map them back.
+
+Conses of two atoms are considered \"terminals\", that is, they
+aren't flattened further.
+
+See also: `-flatten-n'"
+  (declare (pure t) (side-effect-free t))
+  (if (and (listp l) (listp (cdr l)))
+      (-mapcat '-flatten l)
+    (list l)))
+
+(defun -flatten-n (num list)
+  "Flatten NUM levels of a nested LIST.
+
+See also: `-flatten'"
+  (declare (pure t) (side-effect-free t))
+  (dotimes (_ num)
+    (setq list (apply #'append (mapcar #'-list list))))
+  list)
+
+(defalias '-concat #'append
+  "Concatenate all SEQUENCES and make the result a list.
+The result is a list whose elements are the elements of all the arguments.
+Each argument may be a list, vector or string.
+
+All arguments except the last argument are copied.  The last argument
+is just used as the tail of the new list.  If the last argument is not
+a list, this results in a dotted list.
+
+As an exception, if all the arguments except the last are nil, and the
+last argument is not a list, the return value is that last argument
+unaltered, not a list.
+
+\(fn &rest SEQUENCES)")
+
+(defalias '-copy #'copy-sequence
+  "Create a shallow copy of LIST.
+The elements of LIST are not copied; they are shared with the original.
+\n(fn LIST)")
+
+(defmacro --splice (pred form list)
+  "Splice lists generated by FORM in place of items satisfying PRED in LIST.
+
+Evaluate PRED for each element of LIST in turn bound to `it'.
+Whenever the result of PRED is nil, leave that `it' is-is.
+Otherwise, evaluate FORM with the same `it' binding still in
+place.  The result should be a (possibly empty) list of items to
+splice in place of `it' in LIST.
+
+This can be useful as an alternative to the `,@' construct in a
+`\\=`' structure, in case you need to splice several lists at
+marked positions (for example with keywords).
+
+This is the anaphoric counterpart to `-splice'."
+  (declare (debug (form form form)))
+  (let ((r (make-symbol "result")))
+    `(let (,r)
+       (--each ,list
+         (if ,pred
+             (--each ,form (push it ,r))
+           (push it ,r)))
+       (nreverse ,r))))
+
+(defun -splice (pred fun list)
+  "Splice lists generated by FUN in place of items satisfying PRED in LIST.
+
+Call PRED on each element of LIST.  Whenever the result of PRED
+is nil, leave that `it' as-is.  Otherwise, call FUN on the same
+`it' that satisfied PRED.  The result should be a (possibly
+empty) list of items to splice in place of `it' in LIST.
+
+This can be useful as an alternative to the `,@' construct in a
+`\\=`' structure, in case you need to splice several lists at
+marked positions (for example with keywords).
+
+This function's anaphoric counterpart is `--splice'.
+
+See also: `-splice-list', `-insert-at'."
+  (declare (important-return-value t))
+  (--splice (funcall pred it) (funcall fun it) list))
+
+(defun -splice-list (pred new-list list)
+  "Splice NEW-LIST in place of elements matching PRED in LIST.
+
+See also: `-splice', `-insert-at'"
+  (declare (important-return-value t))
+  (-splice pred (lambda (_) new-list) list))
+
+(defmacro --splice-list (pred new-list list)
+  "Anaphoric form of `-splice-list'."
+  (declare (debug (def-form form form)))
+  `(-splice-list (lambda (it) (ignore it) ,pred) ,new-list ,list))
+
+(defun -cons* (&rest args)
+  "Make a new list from the elements of ARGS.
+The last 2 elements of ARGS are used as the final cons of the
+result, so if the final element of ARGS is not a list, the result
+is a dotted list.  With no ARGS, return nil."
+  (declare (side-effect-free t))
+  (let* ((len (length args))
+         (tail (nthcdr (- len 2) args))
+         (last (cdr tail)))
+    (if (null last)
+        (car args)
+      (setcdr tail (car last))
+      args)))
+
+(defun -snoc (list elem &rest elements)
+  "Append ELEM to the end of the list.
+
+This is like `cons', but operates on the end of list.
+
+If any ELEMENTS are given, append them to the list as well."
+  (declare (side-effect-free t))
+  (-concat list (list elem) elements))
+
+(defmacro --first (form list)
+  "Return the first item in LIST for which FORM evals to non-nil.
+Return nil if no such element is found.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.
+This is the anaphoric counterpart to `-first'."
+  (declare (debug (form form)))
+  (let ((n (make-symbol "needle")))
+    `(let (,n)
+       (--each-while ,list (or (not ,form)
+                               (ignore (setq ,n it))))
+       ,n)))
+
+(defun -first (pred list)
+  "Return the first item in LIST for which PRED returns non-nil.
+Return nil if no such element is found.
+
+To get the first item in the list no questions asked,
+use `-first-item'.
+
+Alias: `-find'.
+
+This function's anaphoric counterpart is `--first'."
+  (declare (important-return-value t))
+  (--first (funcall pred it) list))
+
+(defalias '-find #'-first)
+(defalias '--find '--first)
+
+(defmacro --some (form list)
+  "Return non-nil if FORM evals to non-nil for at least one item in LIST.
+If so, return the first such result of FORM.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.
+This is the anaphoric counterpart to `-some'."
+  (declare (debug (form form)))
+  (let ((n (make-symbol "needle")))
+    `(let (,n)
+       (--each-while ,list (not (setq ,n ,form)))
+       ,n)))
+
+(defun -some (pred list)
+  "Return (PRED x) for the first LIST item where (PRED x) is non-nil, else nil.
+
+Alias: `-any'.
+
+This function's anaphoric counterpart is `--some'."
+  (declare (important-return-value t))
+  (--some (funcall pred it) list))
+
+(defalias '-any '-some)
+(defalias '--any '--some)
+
+(defmacro --every (form list)
+  "Return non-nil if FORM evals to non-nil for all items in LIST.
+If so, return the last such result of FORM.  Otherwise, once an
+item is reached for which FORM yields nil, return nil without
+evaluating FORM for any further LIST elements.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.
+
+This macro is like `--every-p', but on success returns the last
+non-nil result of FORM instead of just t.
+
+This is the anaphoric counterpart to `-every'."
+  (declare (debug (form form)))
+  (let ((a (make-symbol "all")))
+    `(let ((,a t))
+       (--each-while ,list (setq ,a ,form))
+       ,a)))
+
+(defun -every (pred list)
+  "Return non-nil if PRED returns non-nil for all items in LIST.
+If so, return the last such result of PRED.  Otherwise, once an
+item is reached for which PRED returns nil, return nil without
+calling PRED on any further LIST elements.
+
+This function is like `-every-p', but on success returns the last
+non-nil result of PRED instead of just t.
+
+This function's anaphoric counterpart is `--every'."
+  (declare (important-return-value t))
+  (--every (funcall pred it) list))
+
+(defmacro --last (form list)
+  "Anaphoric form of `-last'."
+  (declare (debug (form form)))
+  (let ((n (make-symbol "needle")))
+    `(let (,n)
+       (--each ,list
+         (when ,form (setq ,n it)))
+       ,n)))
+
+(defun -last (pred list)
+  "Return the last x in LIST where (PRED x) is non-nil, else nil."
+  (declare (important-return-value t))
+  (--last (funcall pred it) list))
+
+(defalias '-first-item #'car
+  "Return the first item of LIST, or nil on an empty list.
+
+See also: `-second-item', `-last-item', etc.
+
+\(fn LIST)")
+
+;; Ensure that calls to `-first-item' are compiled to a single opcode,
+;; just like `car'.
+(put '-first-item 'byte-opcode 'byte-car)
+(put '-first-item 'byte-compile 'byte-compile-one-arg)
+(put '-first-item 'pure t)
+(put '-first-item 'side-effect-free t)
+
+(defalias '-second-item #'cadr
+  "Return the second item of LIST, or nil if LIST is too short.
+
+See also: `-first-item', `-third-item', etc.
+
+\(fn LIST)")
+
+(put '-second-item 'pure t)
+(put '-second-item 'side-effect-free t)
+
+(defalias '-third-item
+  (if (fboundp 'caddr)
+      #'caddr
+    (lambda (list) (car (cddr list))))
+  "Return the third item of LIST, or nil if LIST is too short.
+
+See also: `-second-item', `-fourth-item', etc.
+
+\(fn LIST)")
+
+(put '-third-item 'pure t)
+(put '-third-item 'side-effect-free t)
+
+(defalias '-fourth-item
+  (if (fboundp 'cadddr)
+      #'cadddr
+    (lambda (list) (cadr (cddr list))))
+  "Return the fourth item of LIST, or nil if LIST is too short.
+
+See also: `-third-item', `-fifth-item', etc.
+
+\(fn LIST)")
+
+(put '-fourth-item 'pure t)
+(put '-fourth-item 'side-effect-free t)
+
+(defun -fifth-item (list)
+  "Return the fifth item of LIST, or nil if LIST is too short.
+
+See also: `-fourth-item', `-last-item', etc."
+  (declare (pure t) (side-effect-free t))
+  (car (cddr (cddr list))))
+
+(defun -last-item (list)
+  "Return the last item of LIST, or nil on an empty list.
+
+See also: `-first-item', etc."
+  (declare (pure t) (side-effect-free t))
+  (car (last list)))
+
+(static-if (fboundp 'gv-define-setter)
+    (gv-define-setter -last-item (val x) `(setcar (last ,x) ,val))
+  (defsetf -last-item (x) (val) `(setcar (last ,x) ,val)))
+
+(defun -butlast (list)
+  "Return a list of all items in list except for the last."
+  ;; no alias as we don't want magic optional argument
+  (declare (pure t) (side-effect-free t))
+  (butlast list))
+
+(defmacro --count (pred list)
+  "Anaphoric form of `-count'."
+  (declare (debug (form form)))
+  (let ((r (make-symbol "result")))
+    `(let ((,r 0))
+       (--each ,list (when ,pred (setq ,r (1+ ,r))))
+       ,r)))
+
+(defun -count (pred list)
+  "Counts the number of items in LIST where (PRED item) is non-nil."
+  (declare (important-return-value t))
+  (--count (funcall pred it) list))
+
+(defun ---truthy? (obj)
+  "Return OBJ as a boolean value (t or nil)."
+  (declare (pure t) (side-effect-free error-free))
+  (and obj t))
+
+(defmacro --any? (form list)
+  "Anaphoric form of `-any?'."
+  (declare (debug (form form)))
+  `(and (--some ,form ,list) t))
+
+(defun -any? (pred list)
+  "Return t if (PRED X) is non-nil for any X in LIST, else nil.
+
+Alias: `-any-p', `-some?', `-some-p'"
+  (declare (important-return-value t))
+  (--any? (funcall pred it) list))
+
+(defalias '-some? '-any?)
+(defalias '--some? '--any?)
+(defalias '-any-p '-any?)
+(defalias '--any-p '--any?)
+(defalias '-some-p '-any?)
+(defalias '--some-p '--any?)
+
+(defmacro --all? (form list)
+  "Return t if FORM evals to non-nil for all items in LIST.
+Otherwise, once an item is reached for which FORM yields nil,
+return nil without evaluating FORM for any further LIST elements.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.
+
+The similar macro `--every' is more widely useful, since it
+returns the last non-nil result of FORM instead of just t on
+success.
+
+Alias: `--all-p', `--every-p', `--every?'.
+
+This is the anaphoric counterpart to `-all?'."
+  (declare (debug (form form)))
+  `(and (--every ,form ,list) t))
+
+(defun -all? (pred list)
+  "Return t if (PRED X) is non-nil for all X in LIST, else nil.
+In the latter case, stop after the first X for which (PRED X) is
+nil, without calling PRED on any subsequent elements of LIST.
+
+The similar function `-every' is more widely useful, since it
+returns the last non-nil result of PRED instead of just t on
+success.
+
+Alias: `-all-p', `-every-p', `-every?'.
+
+This function's anaphoric counterpart is `--all?'."
+  (declare (important-return-value t))
+  (--all? (funcall pred it) list))
+
+(defalias '-every? '-all?)
+(defalias '--every? '--all?)
+(defalias '-all-p '-all?)
+(defalias '--all-p '--all?)
+(defalias '-every-p '-all?)
+(defalias '--every-p '--all?)
+
+(defmacro --none? (form list)
+  "Anaphoric form of `-none?'."
+  (declare (debug (form form)))
+  `(--all? (not ,form) ,list))
+
+(defun -none? (pred list)
+  "Return t if (PRED X) is nil for all X in LIST, else nil.
+
+Alias: `-none-p'"
+  (declare (important-return-value t))
+  (--none? (funcall pred it) list))
+
+(defalias '-none-p '-none?)
+(defalias '--none-p '--none?)
+
+(defmacro --only-some? (form list)
+  "Anaphoric form of `-only-some?'."
+  (declare (debug (form form)))
+  (let ((y (make-symbol "yes"))
+        (n (make-symbol "no")))
+    `(let (,y ,n)
+       (--each-while ,list (not (and ,y ,n))
+         (if ,form (setq ,y t) (setq ,n t)))
+       (---truthy? (and ,y ,n)))))
+
+(defun -only-some? (pred list)
+  "Return t if different LIST items both satisfy and do not satisfy PRED.
+That is, if PRED returns both nil for at least one item, and
+non-nil for at least one other item in LIST.  Return nil if all
+items satisfy the predicate or none of them do.
+
+Alias: `-only-some-p'"
+  (declare (important-return-value t))
+  (--only-some? (funcall pred it) list))
+
+(defalias '-only-some-p '-only-some?)
+(defalias '--only-some-p '--only-some?)
+
+(defun -slice (list from &optional to step)
+  "Return copy of LIST, starting from index FROM to index TO.
+
+FROM or TO may be negative.  These values are then interpreted
+modulo the length of the list.
+
+If STEP is a number, only each STEPth item in the resulting
+section is returned.  Defaults to 1."
+  (declare (side-effect-free t))
+  (let ((length (length list))
+        (new-list nil))
+    ;; to defaults to the end of the list
+    (setq to (or to length))
+    (setq step (or step 1))
+    ;; handle negative indices
+    (when (< from 0)
+      (setq from (mod from length)))
+    (when (< to 0)
+      (setq to (mod to length)))
+
+    ;; iterate through the list, keeping the elements we want
+    (--each-while list (< it-index to)
+      (when (and (>= it-index from)
+                 (= (mod (- from it-index) step) 0))
+        (push it new-list)))
+    (nreverse new-list)))
+
+(defmacro --take-while (form list)
+  "Take successive items from LIST for which FORM evals to non-nil.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.  Return a new
+list of the successive elements from the start of LIST for which
+FORM evaluates to non-nil.
+This is the anaphoric counterpart to `-take-while'."
+  (declare (debug (form form)))
+  (let ((r (make-symbol "result")))
+    `(let (,r)
+       (--each-while ,list ,form (push it ,r))
+       (nreverse ,r))))
+
+(defun -take-while (pred list)
+  "Take successive items from LIST for which PRED returns non-nil.
+PRED is a function of one argument.  Return a new list of the
+successive elements from the start of LIST for which PRED returns
+non-nil.
+
+This function's anaphoric counterpart is `--take-while'.
+
+For another variant, see also `-drop-while'."
+  (declare (important-return-value t))
+  (--take-while (funcall pred it) list))
+
+(defmacro --drop-while (form list)
+  "Drop successive items from LIST for which FORM evals to non-nil.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.  Return the
+tail (not a copy) of LIST starting from its first element for
+which FORM evaluates to nil.
+This is the anaphoric counterpart to `-drop-while'."
+  (declare (debug (form form)))
+  (let ((l (make-symbol "list")))
+    `(let ((,l ,list))
+       (--each-while ,l ,form (pop ,l))
+       ,l)))
+
+(defun -drop-while (pred list)
+  "Drop successive items from LIST for which PRED returns non-nil.
+PRED is a function of one argument.  Return the tail (not a copy)
+of LIST starting from its first element for which PRED returns
+nil.
+
+This function's anaphoric counterpart is `--drop-while'.
+
+For another variant, see also `-take-while'."
+  (declare (important-return-value t))
+  (--drop-while (funcall pred it) list))
+
+;; Added in Emacs 29.
+(static-if (fboundp 'take)
+    (defun dash--take (n list)
+      "Return the first N elements of LIST.
+Like `take', but ensure result is fresh."
+      (let ((prefix (take n list)))
+        (if (eq prefix list)
+            ;; If same list is returned, make a copy.
+            (copy-sequence prefix)
+          prefix))))
+
+(defun -take (n list)
+  "Return a copy of the first N items in LIST.
+Return a copy of LIST if it contains N items or fewer.
+Return nil if N is zero or less.
+
+See also: `-take-last'."
+  (declare (side-effect-free t))
+  (static-if (fboundp 'dash--take)
+      (dash--take n list)
+    (--take-while (< it-index n) list)))
+
+(defun -take-last (n list)
+  "Return a copy of the last N items of LIST in order.
+Return a copy of LIST if it contains N items or fewer.
+Return nil if N is zero or less.
+
+See also: `-take'."
+  (declare (side-effect-free t))
+  (copy-sequence (last list n)))
+
+(defalias '-drop #'nthcdr
+  "Return the tail (not a copy) of LIST without the first N items.
+Return nil if LIST contains N items or fewer.
+Return LIST if N is zero or less.
+
+For another variant, see also `-drop-last'.
+\n(fn N LIST)")
+
+(defun -drop-last (n list)
+  "Return a copy of LIST without its last N items.
+Return a copy of LIST if N is zero or less.
+Return nil if LIST contains N items or fewer.
+
+See also: `-drop'."
+  (declare (side-effect-free t))
+  (static-if (fboundp 'dash--take)
+      (dash--take (- (length list) n) list)
+    (nbutlast (copy-sequence list) n)))
+
+(defun -split-at (n list)
+  "Split LIST into two sublists after the Nth element.
+The result is a list of two elements (TAKE DROP) where TAKE is a
+new list of the first N elements of LIST, and DROP is the
+remaining elements of LIST (not a copy).  TAKE and DROP are like
+the results of `-take' and `-drop', respectively, but the split
+is done in a single list traversal."
+  (declare (side-effect-free t))
+  (let (result)
+    (--each-while list (< it-index n)
+      (push (pop list) result))
+    (list (nreverse result) list)))
+
+(defun -rotate (n list)
+  "Rotate LIST N places to the right (left if N is negative).
+The time complexity is O(n)."
+  (declare (pure t) (side-effect-free t))
+  (cond ((null list) ())
+        ((zerop n) (copy-sequence list))
+        ((let* ((len (length list))
+                (n-mod-len (mod n len))
+                (new-tail-len (- len n-mod-len)))
+           (append (nthcdr new-tail-len list) (-take new-tail-len list))))))
+
+(defun -insert-at (n x list)
+  "Return a list with X inserted into LIST at position N.
+
+See also: `-splice', `-splice-list'"
+  (declare (pure t) (side-effect-free t))
+  (let ((split-list (-split-at n list)))
+    (nconc (car split-list) (cons x (cadr split-list)))))
+
+(defun -replace-at (n x list)
+  "Return a list with element at Nth position in LIST replaced with X.
+
+See also: `-replace'"
+  (declare (pure t) (side-effect-free t))
+  (let ((split-list (-split-at n list)))
+    (nconc (car split-list) (cons x (cdr (cadr split-list))))))
+
+(defun -update-at (n func list)
+  "Use FUNC to update the Nth element of LIST.
+Return a copy of LIST where the Nth element is replaced with the
+result of calling FUNC on it.
+
+See also: `-map-when'"
+  (declare (important-return-value t))
+  (let ((split-list (-split-at n list)))
+    (nconc (car split-list)
+           (cons (funcall func (car (cadr split-list)))
+                 (cdr (cadr split-list))))))
+
+(defmacro --update-at (n form list)
+  "Anaphoric version of `-update-at'."
+  (declare (debug (form def-form form)))
+  `(-update-at ,n (lambda (it) (ignore it) ,form) ,list))
+
+(defun -remove-at (n list)
+  "Return LIST with its element at index N removed.
+That is, remove any element selected as (nth N LIST) from LIST
+and return the result.
+
+This is a non-destructive operation: parts of LIST (but not
+necessarily all of it) are copied as needed to avoid
+destructively modifying it.
+
+See also: `-remove-at-indices', `-remove'."
+  (declare (pure t) (side-effect-free t))
+  (if (zerop n)
+      (cdr list)
+    (--remove-first (= it-index n) list)))
+
+(defun -remove-at-indices (indices list)
+  "Return LIST with its elements at INDICES removed.
+That is, for each index I in INDICES, remove any element selected
+as (nth I LIST) from LIST.
+
+This is a non-destructive operation: parts of LIST (but not
+necessarily all of it) are copied as needed to avoid
+destructively modifying it.
+
+See also: `-remove-at', `-remove'."
+  (declare (pure t) (side-effect-free t))
+  (setq indices (--drop-while (< it 0) (-sort #'< indices)))
+  (let ((i (pop indices)) res)
+    (--each-while list i
+      (pop list)
+      (if (/= it-index i)
+          (push it res)
+        (while (and indices (= (car indices) i))
+          (pop indices))
+        (setq i (pop indices))))
+    (nconc (nreverse res) list)))
+
+(defmacro --split-with (pred list)
+  "Anaphoric form of `-split-with'."
+  (declare (debug (form form)))
+  (let ((l (make-symbol "list"))
+        (r (make-symbol "result"))
+        (c (make-symbol "continue")))
+    `(let ((,l ,list)
+           (,r nil)
+           (,c t))
+       (while (and ,l ,c)
+         (let ((it (car ,l)))
+           (if (not ,pred)
+               (setq ,c nil)
+             (!cons it ,r)
+             (!cdr ,l))))
+       (list (nreverse ,r) ,l))))
+
+(defun -split-with (pred list)
+  "Split LIST into a prefix satisfying PRED, and the rest.
+The first sublist is the prefix of LIST with successive elements
+satisfying PRED, and the second sublist is the remaining elements
+that do not.  The result is like performing
+
+  ((-take-while PRED LIST) (-drop-while PRED LIST))
+
+but in no more than a single pass through LIST."
+  (declare (important-return-value t))
+  (--split-with (funcall pred it) list))
+
+(defmacro -split-on (item list)
+  "Split the LIST each time ITEM is found.
+
+Unlike `-partition-by', the ITEM is discarded from the results.
+Empty lists are also removed from the result.
+
+Comparison is done by `equal'.
+
+See also `-split-when'"
+  (declare (debug (def-form form)))
+  `(-split-when (lambda (it) (equal it ,item)) ,list))
+
+(defmacro --split-when (form list)
+  "Anaphoric version of `-split-when'."
+  (declare (debug (def-form form)))
+  `(-split-when (lambda (it) (ignore it) ,form) ,list))
+
+(defun -split-when (fn list)
+  "Split the LIST on each element where FN returns non-nil.
+
+Unlike `-partition-by', the \"matched\" element is discarded from
+the results.  Empty lists are also removed from the result.
+
+This function can be thought of as a generalization of
+`split-string'."
+  (declare (important-return-value t))
+  (let (r s)
+    (while list
+      (if (not (funcall fn (car list)))
+          (push (car list) s)
+        (when s (push (nreverse s) r))
+        (setq s nil))
+      (!cdr list))
+    (when s (push (nreverse s) r))
+    (nreverse r)))
+
+(defmacro --separate (form list)
+  "Anaphoric form of `-separate'."
+  (declare (debug (form form)))
+  (let ((y (make-symbol "yes"))
+        (n (make-symbol "no")))
+    `(let (,y ,n)
+       (--each ,list (if ,form (!cons it ,y) (!cons it ,n)))
+       (list (nreverse ,y) (nreverse ,n)))))
+
+(defun -separate (pred list)
+  "Split LIST into two sublists based on whether items satisfy PRED.
+The result is like performing
+
+  ((-filter PRED LIST) (-remove PRED LIST))
+
+but in a single pass through LIST."
+  (declare (important-return-value t))
+  (--separate (funcall pred it) list))
+
+(defun dash--partition-all-in-steps-reversed (n step list)
+  "Like `-partition-all-in-steps', but the result is reversed."
+  (when (< step 1)
+    (signal 'wrong-type-argument
+            `("Step size < 1 results in juicy infinite loops" ,step)))
+  (let (result)
+    (while list
+      (push (-take n list) result)
+      (setq list (nthcdr step list)))
+    result))
+
+(defun -partition-all-in-steps (n step list)
+  "Partition LIST into sublists of length N that are STEP items apart.
+Adjacent groups may overlap if N exceeds the STEP stride.
+Trailing groups may contain less than N items."
+  (declare (pure t) (side-effect-free t))
+  (nreverse (dash--partition-all-in-steps-reversed n step list)))
+
+(defun -partition-in-steps (n step list)
+  "Partition LIST into sublists of length N that are STEP items apart.
+Like `-partition-all-in-steps', but if there are not enough items
+to make the last group N-sized, those items are discarded."
+  (declare (pure t) (side-effect-free t))
+  (let ((result (dash--partition-all-in-steps-reversed n step list)))
+    (while (and result (< (length (car result)) n))
+      (pop result))
+    (nreverse result)))
+
+(defun -partition-all (n list)
+  "Return a new list with the items in LIST grouped into N-sized sublists.
+The last group may contain less than N items."
+  (declare (pure t) (side-effect-free t))
+  (-partition-all-in-steps n n list))
+
+(defun -partition (n list)
+  "Return a new list with the items in LIST grouped into N-sized sublists.
+If there are not enough items to make the last group N-sized,
+those items are discarded."
+  (declare (pure t) (side-effect-free t))
+  (-partition-in-steps n n list))
+
+(defmacro --partition-by (form list)
+  "Anaphoric form of `-partition-by'."
+  (declare (debug (form form)))
+  (let ((r (make-symbol "result"))
+        (s (make-symbol "sublist"))
+        (v (make-symbol "value"))
+        (n (make-symbol "new-value"))
+        (l (make-symbol "list")))
+    `(let ((,l ,list))
+       (when ,l
+         (let* ((,r nil)
+                (it (car ,l))
+                (,s (list it))
+                (,v ,form)
+                (,l (cdr ,l)))
+           (while ,l
+             (let* ((it (car ,l))
+                    (,n ,form))
+               (unless (equal ,v ,n)
+                 (!cons (nreverse ,s) ,r)
+                 (setq ,s nil)
+                 (setq ,v ,n))
+               (!cons it ,s)
+               (!cdr ,l)))
+           (!cons (nreverse ,s) ,r)
+           (nreverse ,r))))))
+
+(defun -partition-by (fn list)
+  "Apply FN to each item in LIST, splitting it each time FN returns a new value."
+  (declare (important-return-value t))
+  (--partition-by (funcall fn it) list))
+
+(defmacro --partition-by-header (form list)
+  "Anaphoric form of `-partition-by-header'."
+  (declare (debug (form form)))
+  (let ((r (make-symbol "result"))
+        (s (make-symbol "sublist"))
+        (h (make-symbol "header-value"))
+        (b (make-symbol "seen-body?"))
+        (n (make-symbol "new-value"))
+        (l (make-symbol "list")))
+    `(let ((,l ,list))
+       (when ,l
+         (let* ((,r nil)
+                (it (car ,l))
+                (,s (list it))
+                (,h ,form)
+                (,b nil)
+                (,l (cdr ,l)))
+           (while ,l
+             (let* ((it (car ,l))
+                    (,n ,form))
+               (if (equal ,h ,n)
+                   (when ,b
+                     (!cons (nreverse ,s) ,r)
+                     (setq ,s nil)
+                     (setq ,b nil))
+                 (setq ,b t))
+               (!cons it ,s)
+               (!cdr ,l)))
+           (!cons (nreverse ,s) ,r)
+           (nreverse ,r))))))
+
+(defun -partition-by-header (fn list)
+  "Apply FN to the first item in LIST. That is the header
+value. Apply FN to each item in LIST, splitting it each time FN
+returns the header value, but only after seeing at least one
+other value (the body)."
+  (declare (important-return-value t))
+  (--partition-by-header (funcall fn it) list))
+
+(defmacro --partition-after-pred (form list)
+  "Partition LIST after each element for which FORM evaluates to non-nil.
+Each element of LIST in turn is bound to `it' before evaluating
+FORM.
+
+This is the anaphoric counterpart to `-partition-after-pred'."
+  (let ((l (make-symbol "list"))
+        (r (make-symbol "result"))
+        (s (make-symbol "sublist")))
+    `(let ((,l ,list) ,r ,s)
+       (when ,l
+         (--each ,l
+           (push it ,s)
+           (when ,form
+             (push (nreverse ,s) ,r)
+             (setq ,s ())))
+         (when ,s
+           (push (nreverse ,s) ,r))
+         (nreverse ,r)))))
+
+(defun -partition-after-pred (pred list)
+  "Partition LIST after each element for which PRED returns non-nil.
+
+This function's anaphoric counterpart is `--partition-after-pred'."
+  (declare (important-return-value t))
+  (--partition-after-pred (funcall pred it) list))
+
+(defun -partition-before-pred (pred list)
+  "Partition directly before each time PRED is true on an element of LIST."
+  (declare (important-return-value t))
+  (nreverse (-map #'reverse
+                  (-partition-after-pred pred (reverse list)))))
+
+(defun -partition-after-item (item list)
+  "Partition directly after each time ITEM appears in LIST."
+  (declare (pure t) (side-effect-free t))
+  (-partition-after-pred (lambda (ele) (equal ele item))
+                         list))
+
+(defun -partition-before-item (item list)
+  "Partition directly before each time ITEM appears in LIST."
+  (declare (pure t) (side-effect-free t))
+  (-partition-before-pred (lambda (ele) (equal ele item))
+                          list))
+
+(defmacro --group-by (form list)
+  "Anaphoric form of `-group-by'."
+  (declare (debug t))
+  (let ((n (make-symbol "n"))
+        (k (make-symbol "k"))
+        (grp (make-symbol "grp")))
+    `(nreverse
+      (-map
+       (lambda (,n)
+         (cons (car ,n)
+               (nreverse (cdr ,n))))
+       (--reduce-from
+        (let* ((,k (,@form))
+               (,grp (assoc ,k acc)))
+          (if ,grp
+              (setcdr ,grp (cons it (cdr ,grp)))
+            (push
+             (list ,k it)
+             acc))
+          acc)
+        nil ,list)))))
+
+(defun -group-by (fn list)
+  "Separate LIST into an alist whose keys are FN applied to the
+elements of LIST.  Keys are compared by `equal'."
+  (declare (important-return-value t))
+  (--group-by (funcall fn it) list))
+
+(defun -interpose (sep list)
+  "Return a new list of all elements in LIST separated by SEP."
+  (declare (side-effect-free t))
+  (let (result)
+    (when list
+      (!cons (car list) result)
+      (!cdr list))
+    (while list
+      (setq result (cons (car list) (cons sep result)))
+      (!cdr list))
+    (nreverse result)))
+
+(defun -interleave (&rest lists)
+  "Return a new list of the first item in each list, then the second etc."
+  (declare (side-effect-free t))
+  (when lists
+    (let (result)
+      (while (-none? 'null lists)
+        (--each lists (!cons (car it) result))
+        (setq lists (-map 'cdr lists)))
+      (nreverse result))))
+
+(defmacro --zip-with (form list1 list2)
+  "Zip LIST1 and LIST2 into a new list according to FORM.
+That is, evaluate FORM for each item pair from the two lists, and
+return the list of results.  The result is as long as the shorter
+list.
+
+Each element of LIST1 and each element of LIST2 in turn are bound
+pairwise to `it' and `other', respectively, and their index
+within the list to `it-index', before evaluating FORM.
+
+This is the anaphoric counterpart to `-zip-with'."
+  (declare (debug (form form form)))
+  (let ((r (make-symbol "result"))
+        (l2 (make-symbol "list2")))
+    `(let ((,l2 ,list2) ,r)
+       (--each-while ,list1 ,l2
+         (let ((other (pop ,l2)))
+           (ignore other)
+           (push ,form ,r)))
+       (nreverse ,r))))
+
+(defun -zip-with (fn list1 list2)
+  "Zip LIST1 and LIST2 into a new list using the function FN.
+That is, apply FN pairwise taking as first argument the next
+element of LIST1 and as second argument the next element of LIST2
+at the corresponding position.  The result is as long as the
+shorter list.
+
+This function's anaphoric counterpart is `--zip-with'.
+
+For other zips, see also `-zip-lists' and `-zip-fill'."
+  (declare (important-return-value t))
+  (--zip-with (funcall fn it other) list1 list2))
+
+(defun -zip-lists (&rest lists)
+  "Zip LISTS together.
+
+Group the head of each list, followed by the second element of
+each list, and so on.  The number of returned groupings is equal
+to the length of the shortest input list, and the length of each
+grouping is equal to the number of input LISTS.
+
+The return value is always a list of proper lists, in contrast to
+`-zip' which returns a list of dotted pairs when only two input
+LISTS are provided.
+
+See also: `-zip-pair'."
+  (declare (pure t) (side-effect-free t))
+  (when lists
+    (let (results)
+      (while (--every it lists)
+        (push (mapcar #'car lists) results)
+        (setq lists (mapcar #'cdr lists)))
+      (nreverse results))))
+
+(defun -zip-lists-fill (fill-value &rest lists)
+  "Zip LISTS together, padding shorter lists with FILL-VALUE.
+This is like `-zip-lists' (which see), except it retains all
+elements at positions beyond the end of the shortest list.  The
+number of returned groupings is equal to the length of the
+longest input list, and the length of each grouping is equal to
+the number of input LISTS."
+  (declare (pure t) (side-effect-free t))
+  (when lists
+    (let (results)
+      (while (--some it lists)
+        (push (--map (if it (car it) fill-value) lists) results)
+        (setq lists (mapcar #'cdr lists)))
+      (nreverse results))))
+
+(defun -unzip-lists (lists)
+  "Unzip LISTS.
+
+This works just like `-zip-lists' (which see), but takes a list
+of lists instead of a variable number of arguments, such that
+
+  (-unzip-lists (-zip-lists ARGS...))
+
+is identity (given that the lists comprising ARGS are of the same
+length)."
+  (declare (pure t) (side-effect-free t))
+  (apply #'-zip-lists lists))
+
+(defalias 'dash--length=
+  (if (fboundp 'length=)
+      #'length=
+    (lambda (list length)
+      (cond ((< length 0) nil)
+            ((zerop length) (null list))
+            ((let ((last (nthcdr (1- length) list)))
+               (and last (null (cdr last))))))))
+  "Return non-nil if LIST is of LENGTH.
+This is a compatibility shim for `length=' in Emacs 28.
+\n(fn LIST LENGTH)")
+
+(defun dash--zip-lists-or-pair (_form &rest lists)
+  "Return a form equivalent to applying `-zip' to LISTS.
+This `compiler-macro' warns about discouraged `-zip' usage and
+delegates to `-zip-lists' or `-zip-pair' depending on the number
+of LISTS."
+  (if (not (dash--length= lists 2))
+      (cons #'-zip-lists lists)
+    (let ((pair (cons #'-zip-pair lists))
+          (msg "Use -zip-pair instead of -zip to get a list of pairs"))
+      (if (fboundp 'macroexp-warn-and-return)
+          (macroexp-warn-and-return msg pair)
+        (message msg)
+        pair))))
+
+(defun -zip (&rest lists)
+  "Zip LISTS together.
+
+Group the head of each list, followed by the second element of
+each list, and so on.  The number of returned groupings is equal
+to the length of the shortest input list, and the number of items
+in each grouping is equal to the number of input LISTS.
+
+If only two LISTS are provided as arguments, return the groupings
+as a list of dotted pairs.  Otherwise, return the groupings as a
+list of proper lists.
+
+Since the return value changes form depending on the number of
+arguments, it is generally recommended to use `-zip-lists'
+instead, or `-zip-pair' if a list of dotted pairs is desired.
+
+See also: `-unzip'."
+  (declare (compiler-macro dash--zip-lists-or-pair)
+           (pure t) (side-effect-free t))
+  ;; For backward compatibility, return a list of dotted pairs if two
+  ;; arguments were provided.
+  (apply (if (dash--length= lists 2) #'-zip-pair #'-zip-lists) lists))
+
+(defun -zip-pair (&rest lists)
+  "Zip LIST1 and LIST2 together.
+
+Make a pair with the head of each list, followed by a pair with
+the second element of each list, and so on.  The number of pairs
+returned is equal to the length of the shorter input list.
+
+See also: `-zip-lists'."
+  (declare (advertised-calling-convention (list1 list2) "2.20.0")
+           (pure t) (side-effect-free t))
+  (if (dash--length= lists 2)
+      (--zip-with (cons it other) (car lists) (cadr lists))
+    (apply #'-zip-lists lists)))
+
+(defun -zip-fill (fill-value &rest lists)
+  "Zip LISTS together, padding shorter lists with FILL-VALUE.
+This is like `-zip' (which see), except it retains all elements
+at positions beyond the end of the shortest list.  The number of
+returned groupings is equal to the length of the longest input
+list, and the length of each grouping is equal to the number of
+input LISTS.
+
+Since the return value changes form depending on the number of
+arguments, it is generally recommended to use `-zip-lists-fill'
+instead, unless a list of dotted pairs is explicitly desired."
+  (declare (pure t) (side-effect-free t))
+  (cond ((null lists) ())
+        ((dash--length= lists 2)
+         (let ((list1 (car lists))
+               (list2 (cadr lists))
+               results)
+           (while (or list1 list2)
+             (push (cons (if list1 (pop list1) fill-value)
+                         (if list2 (pop list2) fill-value))
+                   results))
+           (nreverse results)))
+        ((apply #'-zip-lists-fill fill-value lists))))
+
+(defun -unzip (lists)
+  "Unzip LISTS.
+
+This works just like `-zip' (which see), but takes a list of
+lists instead of a variable number of arguments, such that
+
+  (-unzip (-zip L1 L2 L3 ...))
+
+is identity (given that the lists are of the same length, and
+that `-zip' is not called with two arguments, because of the
+caveat described in its docstring).
+
+Note in particular that calling `-unzip' on a list of two lists
+will return a list of dotted pairs.
+
+Since the return value changes form depending on the number of
+LISTS, it is generally recommended to use `-unzip-lists' instead."
+  (declare (pure t) (side-effect-free t))
+  (apply #'-zip lists))
+
+(defun -cycle (list)
+  "Return an infinite circular copy of LIST.
+The returned list cycles through the elements of LIST and repeats
+from the beginning."
+  (declare (side-effect-free t))
+  ;; Also works with sequences that aren't lists.
+  (let ((newlist (append list ())))
+    (nconc newlist newlist)))
+
+(defun -pad (fill-value &rest lists)
+  "Pad each of LISTS with FILL-VALUE until they all have equal lengths.
+
+Ensure all LISTS are as long as the longest one by repeatedly
+appending FILL-VALUE to the shorter lists, and return the
+resulting LISTS."
+  (declare (pure t) (side-effect-free t))
+  (let* ((lens (mapcar #'length lists))
+         (maxlen (apply #'max 0 lens)))
+    (--map (append it (make-list (- maxlen (pop lens)) fill-value)) lists)))
+
+(defmacro --annotate (form list)
+  "Pair each item in LIST with the result of evaluating FORM.
+
+Return an alist of (RESULT . ITEM), where each ITEM is the
+corresponding element of LIST, and RESULT is the value obtained
+by evaluating FORM with ITEM bound to `it'.
+
+This is the anaphoric counterpart to `-annotate'."
+  (declare (debug (form form)))
+  `(--map (cons ,form it) ,list))
+
+(defun -annotate (fn list)
+  "Pair each item in LIST with the result of passing it to FN.
+
+Return an alist of (RESULT . ITEM), where each ITEM is the
+corresponding element of LIST, and RESULT is the value obtained
+by calling FN on ITEM.
+
+This function's anaphoric counterpart is `--annotate'."
+  (declare (important-return-value t))
+  (--annotate (funcall fn it) list))
+
+(defun dash--table-carry (lists restore-lists &optional re)
+  "Helper for `-table' and `-table-flat'.
+
+If a list overflows, carry to the right and reset the list."
+  (while (not (or (car lists)
+                  (equal lists '(nil))))
+    (setcar lists (car restore-lists))
+    (pop (cadr lists))
+    (!cdr lists)
+    (!cdr restore-lists)
+    (when re
+      (push (nreverse (car re)) (cadr re))
+      (setcar re nil)
+      (!cdr re))))
+
+(defun -table (fn &rest lists)
+  "Compute outer product of LISTS using function FN.
+
+The function FN should have the same arity as the number of
+supplied lists.
+
+The outer product is computed by applying fn to all possible
+combinations created by taking one element from each list in
+order.  The dimension of the result is (length lists).
+
+See also: `-table-flat'"
+  (declare (important-return-value t))
+  (let ((restore-lists (copy-sequence lists))
+        (last-list (last lists))
+        (re (make-list (length lists) nil)))
+    (while (car last-list)
+      (let ((item (apply fn (-map 'car lists))))
+        (push item (car re))
+        (setcar lists (cdar lists)) ;; silence byte compiler
+        (dash--table-carry lists restore-lists re)))
+    (nreverse (car (last re)))))
+
+(defun -table-flat (fn &rest lists)
+  "Compute flat outer product of LISTS using function FN.
+
+The function FN should have the same arity as the number of
+supplied lists.
+
+The outer product is computed by applying fn to all possible
+combinations created by taking one element from each list in
+order.  The results are flattened, ignoring the tensor structure
+of the result.  This is equivalent to calling:
+
+  (-flatten-n (1- (length lists)) (apply \\='-table fn lists))
+
+but the implementation here is much more efficient.
+
+See also: `-flatten-n', `-table'"
+  (declare (important-return-value t))
+  (let ((restore-lists (copy-sequence lists))
+        (last-list (last lists))
+        re)
+    (while (car last-list)
+      (let ((item (apply fn (-map 'car lists))))
+        (push item re)
+        (setcar lists (cdar lists)) ;; silence byte compiler
+        (dash--table-carry lists restore-lists)))
+    (nreverse re)))
+
+(defmacro --find-index (form list)
+  "Return the first index in LIST for which FORM evals to non-nil.
+Return nil if no such index is found.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.
+This is the anaphoric counterpart to `-find-index'."
+  (declare (debug (form form)))
+  `(--some (and ,form it-index) ,list))
+
+(defun -find-index (pred list)
+  "Return the index of the first item satisfying PRED in LIST.
+Return nil if no such item is found.
+
+PRED is called with one argument, the current list element, until
+it returns non-nil, at which point the search terminates.
+
+This function's anaphoric counterpart is `--find-index'.
+
+See also: `-first', `-find-last-index'."
+  (declare (important-return-value t))
+  (--find-index (funcall pred it) list))
+
+(defun -elem-index (elem list)
+  "Return the first index of ELEM in LIST.
+That is, the index within LIST of the first element that is
+`equal' to ELEM.  Return nil if there is no such element.
+
+See also: `-find-index'."
+  (declare (pure t) (side-effect-free t))
+  (--find-index (equal elem it) list))
+
+(defmacro --find-indices (form list)
+  "Return the list of indices in LIST for which FORM evals to non-nil.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.
+This is the anaphoric counterpart to `-find-indices'."
+  (declare (debug (form form)))
+  `(--keep (and ,form it-index) ,list))
+
+(defun -find-indices (pred list)
+  "Return the list of indices in LIST satisfying PRED.
+
+Each element of LIST in turn is passed to PRED.  If the result is
+non-nil, the index of that element in LIST is included in the
+result.  The returned indices are in ascending order, i.e., in
+the same order as they appear in LIST.
+
+This function's anaphoric counterpart is `--find-indices'.
+
+See also: `-find-index', `-elem-indices'."
+  (declare (important-return-value t))
+  (--find-indices (funcall pred it) list))
+
+(defun -elem-indices (elem list)
+  "Return the list of indices at which ELEM appears in LIST.
+That is, the indices of all elements of LIST `equal' to ELEM, in
+the same ascending order as they appear in LIST."
+  (declare (pure t) (side-effect-free t))
+  (--find-indices (equal elem it) list))
+
+(defmacro --find-last-index (form list)
+  "Return the last index in LIST for which FORM evals to non-nil.
+Return nil if no such index is found.
+Each element of LIST in turn is bound to `it' and its index
+within LIST to `it-index' before evaluating FORM.
+This is the anaphoric counterpart to `-find-last-index'."
+  (declare (debug (form form)))
+  (let ((i (make-symbol "index")))
+    `(let (,i)
+       (--each ,list
+         (when ,form (setq ,i it-index)))
+       ,i)))
+
+(defun -find-last-index (pred list)
+  "Return the index of the last item satisfying PRED in LIST.
+Return nil if no such item is found.
+
+Predicate PRED is called with one argument each time, namely the
+current list element.
+
+This function's anaphoric counterpart is `--find-last-index'.
+
+See also: `-last', `-find-index'."
+  (declare (important-return-value t))
+  (--find-last-index (funcall pred it) list))
+
+(defun -select-by-indices (indices list)
+  "Return a list whose elements are elements from LIST selected
+as `(nth i list)` for all i from INDICES."
+  (declare (pure t) (side-effect-free t))
+  (let (r)
+    (--each indices
+      (!cons (nth it list) r))
+    (nreverse r)))
+
+(defun -select-columns (columns table)
+  "Select COLUMNS from TABLE.
+
+TABLE is a list of lists where each element represents one row.
+It is assumed each row has the same length.
+
+Each row is transformed such that only the specified COLUMNS are
+selected.
+
+See also: `-select-column', `-select-by-indices'"
+  (declare (pure t) (side-effect-free t))
+  (--map (-select-by-indices columns it) table))
+
+(defun -select-column (column table)
+  "Select COLUMN from TABLE.
+
+TABLE is a list of lists where each element represents one row.
+It is assumed each row has the same length.
+
+The single selected column is returned as a list.
+
+See also: `-select-columns', `-select-by-indices'"
+  (declare (pure t) (side-effect-free t))
+  (--mapcat (-select-by-indices (list column) it) table))
+
+(defmacro -> (x &optional form &rest more)
+  "Thread the expr through the forms. Insert X as the second item
+in the first form, making a list of it if it is not a list
+already. If there are more forms, insert the first form as the
+second item in second form, etc."
+  (declare (debug (form &rest [&or symbolp (sexp &rest form)])))
+  (cond
+   ((null form) x)
+   ((null more) (if (listp form)
+                    `(,(car form) ,x ,@(cdr form))
+                  (list form x)))
+   (:else `(-> (-> ,x ,form) ,@more))))
+
+(defmacro ->> (x &optional form &rest more)
+  "Thread the expr through the forms. Insert X as the last item
+in the first form, making a list of it if it is not a list
+already. If there are more forms, insert the first form as the
+last item in second form, etc."
+  (declare (debug ->))
+  (cond
+   ((null form) x)
+   ((null more) (if (listp form)
+                    `(,@form ,x)
+                  (list form x)))
+   (:else `(->> (->> ,x ,form) ,@more))))
+
+(defmacro --> (x &rest forms)
+  "Starting with the value of X, thread each expression through FORMS.
+
+Insert X at the position signified by the symbol `it' in the first
+form.  If there are more forms, insert the first form at the position
+signified by `it' in the second form, etc."
+  (declare (debug (form body)))
+  `(-as-> ,x it ,@forms))
+
+(defmacro -as-> (value variable &rest forms)
+  "Starting with VALUE, thread VARIABLE through FORMS.
+
+In the first form, bind VARIABLE to VALUE.  In the second form, bind
+VARIABLE to the result of the first form, and so forth."
+  (declare (debug (form symbolp body)))
+  (if (null forms)
+      `,value
+    `(let ((,variable ,value))
+       (-as-> ,(if (symbolp (car forms))
+                   (list (car forms) variable)
+                 (car forms))
+              ,variable
+              ,@(cdr forms)))))
+
+(defmacro -some-> (x &optional form &rest more)
+  "When expr is non-nil, thread it through the first form (via `->'),
+and when that result is non-nil, through the next form, etc."
+  (declare (debug ->)
+           (indent 1))
+  (if (null form) x
+    (let ((result (make-symbol "result")))
+      `(-some-> (-when-let (,result ,x)
+                  (-> ,result ,form))
+         ,@more))))
+
+(defmacro -some->> (x &optional form &rest more)
+  "When expr is non-nil, thread it through the first form (via `->>'),
+and when that result is non-nil, through the next form, etc."
+  (declare (debug ->)
+           (indent 1))
+  (if (null form) x
+    (let ((result (make-symbol "result")))
+      `(-some->> (-when-let (,result ,x)
+                   (->> ,result ,form))
+         ,@more))))
+
+(defmacro -some--> (expr &rest forms)
+  "Thread EXPR through FORMS via `-->', while the result is non-nil.
+When EXPR evaluates to non-nil, thread the result through the
+first of FORMS, and when that result is non-nil, thread it
+through the next form, etc."
+  (declare (debug (form &rest &or symbolp consp)) (indent 1))
+  (if (null forms) expr
+    (let ((result (make-symbol "result")))
+      `(-some--> (-when-let (,result ,expr)
+                   (--> ,result ,(car forms)))
+         ,@(cdr forms)))))
+
+(defmacro -doto (init &rest forms)
+  "Evaluate INIT and pass it as argument to FORMS with `->'.
+The RESULT of evaluating INIT is threaded through each of FORMS
+individually using `->', which see.  The return value is RESULT,
+which FORMS may have modified by side effect."
+  (declare (debug (form &rest &or symbolp consp)) (indent 1))
+  (let ((retval (make-symbol "result")))
+    `(let ((,retval ,init))
+       ,@(mapcar (lambda (form) `(-> ,retval ,form)) forms)
+       ,retval)))
+
+(defmacro --doto (init &rest forms)
+  "Anaphoric form of `-doto'.
+This just evaluates INIT, binds the result to `it', evaluates
+FORMS, and returns the final value of `it'.
+Note: `it' need not be used in each form."
+  (declare (debug (form body)) (indent 1))
+  `(let ((it ,init))
+     ,@forms
+     it))
+
+(defun -grade-up (comparator list)
+  "Grade elements of LIST using COMPARATOR relation.
+This yields a permutation vector such that applying this
+permutation to LIST sorts it in ascending order."
+  (declare (important-return-value t))
+  (->> (--map-indexed (cons it it-index) list)
+       (-sort (lambda (it other) (funcall comparator (car it) (car other))))
+       (mapcar #'cdr)))
+
+(defun -grade-down (comparator list)
+  "Grade elements of LIST using COMPARATOR relation.
+This yields a permutation vector such that applying this
+permutation to LIST sorts it in descending order."
+  (declare (important-return-value t))
+  (->> (--map-indexed (cons it it-index) list)
+       (-sort (lambda (it other) (funcall comparator (car other) (car it))))
+       (mapcar #'cdr)))
+
+(defvar dash--source-counter 0
+  "Monotonic counter for generated symbols.")
+
+(defun dash--match-make-source-symbol ()
+  "Generate a new dash-source symbol.
+
+All returned symbols are guaranteed to be unique."
+  (prog1 (make-symbol (format "--dash-source-%d--" dash--source-counter))
+    (setq dash--source-counter (1+ dash--source-counter))))
+
+(defun dash--match-ignore-place-p (symbol)
+  "Return non-nil if SYMBOL is a symbol and starts with _."
+  (and (symbolp symbol)
+       (eq (aref (symbol-name symbol) 0) ?_)))
+
+(defun dash--match-cons-skip-cdr (skip-cdr source)
+  "Helper function generating idiomatic shifting code."
+  (cond
+   ((= skip-cdr 0)
+    `(pop ,source))
+   (t
+    `(prog1 ,(dash--match-cons-get-car skip-cdr source)
+       (setq ,source ,(dash--match-cons-get-cdr (1+ skip-cdr) source))))))
+
+(defun dash--match-cons-get-car (skip-cdr source)
+  "Helper function generating idiomatic code to get nth car."
+  (cond
+   ((= skip-cdr 0)
+    `(car ,source))
+   ((= skip-cdr 1)
+    `(cadr ,source))
+   (t
+    `(nth ,skip-cdr ,source))))
+
+(defun dash--match-cons-get-cdr (skip-cdr source)
+  "Helper function generating idiomatic code to get nth cdr."
+  (cond
+   ((= skip-cdr 0)
+    source)
+   ((= skip-cdr 1)
+    `(cdr ,source))
+   (t
+    `(nthcdr ,skip-cdr ,source))))
+
+(defun dash--match-cons (match-form source)
+  "Setup a cons matching environment and call the real matcher."
+  (let ((s (dash--match-make-source-symbol))
+        (n 0)
+        (m match-form))
+    (while (and (consp m)
+                (dash--match-ignore-place-p (car m)))
+      (setq n (1+ n)) (!cdr m))
+    (cond
+     ;; when we only have one pattern in the list, we don't have to
+     ;; create a temporary binding (--dash-source--) for the source
+     ;; and just use the input directly
+     ((and (consp m)
+           (not (cdr m)))
+      (dash--match (car m) (dash--match-cons-get-car n source)))
+     ;; handle other special types
+     ((> n 0)
+      (dash--match m (dash--match-cons-get-cdr n source)))
+     ;; this is the only entry-point for dash--match-cons-1, that's
+     ;; why we can't simply use the above branch, it would produce
+     ;; infinite recursion
+     (t
+      (cons (list s source) (dash--match-cons-1 match-form s))))))
+
+(defun dash--get-expand-function (type)
+  "Get expand function name for TYPE."
+  (intern-soft (format "dash-expand:%s" type)))
+
+(defun dash--match-cons-1 (match-form source &optional props)
+  "Match MATCH-FORM against SOURCE.
+
+MATCH-FORM is a proper or improper list.  Each element of
+MATCH-FORM is either a symbol, which gets bound to the respective
+value in source or another match form which gets destructured
+recursively.
+
+If the cdr of last cons cell in the list is nil, matching stops
+there.
+
+SOURCE is a proper or improper list."
+  (let ((skip-cdr (or (plist-get props :skip-cdr) 0)))
+    (cond
+     ((consp match-form)
+      (cond
+       ((cdr match-form)
+        (cond
+         ((and (symbolp (car match-form))
+               (functionp (dash--get-expand-function (car match-form))))
+          (dash--match-kv (dash--match-kv-normalize-match-form match-form) (dash--match-cons-get-cdr skip-cdr source)))
+         ((dash--match-ignore-place-p (car match-form))
+          (dash--match-cons-1 (cdr match-form) source
+                              (plist-put props :skip-cdr (1+ skip-cdr))))
+         (t
+          (-concat (dash--match (car match-form) (dash--match-cons-skip-cdr skip-cdr source))
+                   (dash--match-cons-1 (cdr match-form) source)))))
+       (t ;; Last matching place, no need for shift
+        (dash--match (car match-form) (dash--match-cons-get-car skip-cdr source)))))
+     ((eq match-form nil)
+      nil)
+     (t ;; Handle improper lists.  Last matching place, no need for shift
+      (dash--match match-form (dash--match-cons-get-cdr skip-cdr source))))))
+
+(defun dash--match-vector (match-form source)
+  "Setup a vector matching environment and call the real matcher."
+  (let ((s (dash--match-make-source-symbol)))
+    (cond
+     ;; don't bind `s' if we only have one sub-pattern
+     ((= (length match-form) 1)
+      (dash--match (aref match-form 0) `(aref ,source 0)))
+     ;; if the source is a symbol, we don't need to re-bind it
+     ((symbolp source)
+      (dash--match-vector-1 match-form source))
+     ;; don't bind `s' if we only have one sub-pattern which is not ignored
+     ((let* ((ignored-places (mapcar 'dash--match-ignore-place-p match-form))
+             (ignored-places-n (length (-remove 'null ignored-places))))
+        (when (= ignored-places-n (1- (length match-form)))
+          (let ((n (-find-index 'null ignored-places)))
+            (dash--match (aref match-form n) `(aref ,source ,n))))))
+     (t
+      (cons (list s source) (dash--match-vector-1 match-form s))))))
+
+(defun dash--match-vector-1 (match-form source)
+  "Match MATCH-FORM against SOURCE.
+
+MATCH-FORM is a vector.  Each element of MATCH-FORM is either a
+symbol, which gets bound to the respective value in source or
+another match form which gets destructured recursively.
+
+If second-from-last place in MATCH-FORM is the symbol &rest, the
+next element of the MATCH-FORM is matched against the tail of
+SOURCE, starting at index of the &rest symbol.  This is
+conceptually the same as the (head . tail) match for improper
+lists, where dot plays the role of &rest.
+
+SOURCE is a vector.
+
+If the MATCH-FORM vector is shorter than SOURCE vector, only
+the (length MATCH-FORM) places are bound, the rest of the SOURCE
+is discarded."
+  (let ((i 0)
+        (l (length match-form))
+        (re))
+    (while (< i l)
+      (let ((m (aref match-form i)))
+        (push (cond
+               ((and (symbolp m)
+                     (eq m '&rest))
+                (prog1 (dash--match
+                        (aref match-form (1+ i))
+                        `(substring ,source ,i))
+                  (setq i l)))
+               ((and (symbolp m)
+                     ;; do not match symbols starting with _
+                     (not (eq (aref (symbol-name m) 0) ?_)))
+                (list (list m `(aref ,source ,i))))
+               ((not (symbolp m))
+                (dash--match m `(aref ,source ,i))))
+              re)
+        (setq i (1+ i))))
+    (-flatten-n 1 (nreverse re))))
+
+(defun dash--match-kv-normalize-match-form (pattern)
+  "Normalize kv PATTERN.
+
+This method normalizes PATTERN to the format expected by
+`dash--match-kv'.  See `-let' for the specification."
+  (let ((normalized (list (car pattern)))
+        (skip nil)
+        (fill-placeholder (make-symbol "--dash-fill-placeholder--")))
+    (-each (-zip-fill fill-placeholder (cdr pattern) (cddr pattern))
+      (lambda (pair)
+        (let ((current (car pair))
+              (next (cdr pair)))
+          (if skip
+              (setq skip nil)
+            (if (or (eq fill-placeholder next)
+                    (not (or (and (symbolp next)
+                                  (not (keywordp next))
+                                  (not (eq next t))
+                                  (not (eq next nil)))
+                             (and (consp next)
+                                  (not (eq (car next) 'quote)))
+                             (vectorp next))))
+                (progn
+                  (cond
+                   ((keywordp current)
+                    (push current normalized)
+                    (push (intern (substring (symbol-name current) 1)) normalized))
+                   ((stringp current)
+                    (push current normalized)
+                    (push (intern current) normalized))
+                   ((and (consp current)
+                         (eq (car current) 'quote))
+                    (push current normalized)
+                    (push (cadr current) normalized))
+                   (t (error "-let: found key `%s' in kv destructuring but its pattern `%s' is invalid and can not be derived from the key" current next)))
+                  (setq skip nil))
+              (push current normalized)
+              (push next normalized)
+              (setq skip t))))))
+    (nreverse normalized)))
+
+(defun dash--match-kv (match-form source)
+  "Setup a kv matching environment and call the real matcher.
+
+kv can be any key-value store, such as plist, alist or hash-table."
+  (let ((s (dash--match-make-source-symbol)))
+    (cond
+     ;; don't bind `s' if we only have one sub-pattern (&type key val)
+     ((= (length match-form) 3)
+      (dash--match-kv-1 (cdr match-form) source (car match-form)))
+     ;; if the source is a symbol, we don't need to re-bind it
+     ((symbolp source)
+      (dash--match-kv-1 (cdr match-form) source (car match-form)))
+     (t
+      (cons (list s source) (dash--match-kv-1 (cdr match-form) s (car match-form)))))))
+
+(defun dash-expand:&hash (key source)
+  "Generate extracting KEY from SOURCE for &hash destructuring."
+  `(gethash ,key ,source))
+
+(defun dash-expand:&plist (key source)
+  "Generate extracting KEY from SOURCE for &plist destructuring."
+  `(plist-get ,source ,key))
+
+(defun dash-expand:&alist (key source)
+  "Generate extracting KEY from SOURCE for &alist destructuring."
+  `(cdr (assoc ,key ,source)))
+
+(defun dash-expand:&hash? (key source)
+  "Generate extracting KEY from SOURCE for &hash? destructuring.
+Similar to &hash but check whether the map is not nil."
+  (let ((src (make-symbol "src")))
+    `(let ((,src ,source))
+       (when ,src (gethash ,key ,src)))))
+
+(defalias 'dash-expand:&keys #'dash-expand:&plist)
+
+(defun dash--match-kv-1 (match-form source type)
+  "Match MATCH-FORM against SOURCE of type TYPE.
+
+MATCH-FORM is a proper list of the form (key1 place1 ... keyN
+placeN).  Each placeK is either a symbol, which gets bound to the
+value of keyK retrieved from the key-value store, or another
+match form which gets destructured recursively.
+
+SOURCE is a key-value store of type TYPE, which can be a plist,
+an alist or a hash table.
+
+TYPE is a token specifying the type of the key-value store.
+Valid values are &plist, &alist and &hash."
+  (-flatten-n 1 (-map
+                 (lambda (kv)
+                   (let* ((k (car kv))
+                          (v (cadr kv))
+                          (getter
+                           (funcall (dash--get-expand-function type) k source)))
+                     (cond
+                      ((symbolp v)
+                       (list (list v getter)))
+                      (t (dash--match v getter)))))
+                 (-partition 2 match-form))))
+
+(defun dash--match-symbol (match-form source)
+  "Bind a symbol.
+
+This works just like `let', there is no destructuring."
+  (list (list match-form source)))
+
+(defun dash--match (match-form source)
+  "Match MATCH-FORM against SOURCE.
+
+This function tests the MATCH-FORM and dispatches to specific
+matchers based on the type of the expression.
+
+Key-value stores are disambiguated by placing a token &plist,
+&alist or &hash as a first item in the MATCH-FORM."
+  (cond
+   ((and (symbolp match-form)
+         ;; Don't bind things like &keys as if they were vars (#395).
+         (not (functionp (dash--get-expand-function match-form))))
+    (dash--match-symbol match-form source))
+   ((consp match-form)
+    (cond
+     ;; Handle the "x &as" bindings first.
+     ((and (consp (cdr match-form))
+           (symbolp (car match-form))
+           (eq '&as (cadr match-form)))
+      (let ((s (car match-form)))
+        (cons (list s source)
+              (dash--match (cddr match-form) s))))
+     ((functionp (dash--get-expand-function (car match-form)))
+      (dash--match-kv (dash--match-kv-normalize-match-form match-form) source))
+     (t (dash--match-cons match-form source))))
+   ((vectorp match-form)
+    ;; We support the &as binding in vectors too
+    (cond
+     ((and (> (length match-form) 2)
+           (symbolp (aref match-form 0))
+           (eq '&as (aref match-form 1)))
+      (let ((s (aref match-form 0)))
+        (cons (list s source)
+              (dash--match (substring match-form 2) s))))
+     (t (dash--match-vector match-form source))))))
+
+(defun dash--normalize-let-varlist (varlist)
+  "Normalize VARLIST so that every binding is a list.
+
+`let' allows specifying a binding which is not a list but simply
+the place which is then automatically bound to nil, such that all
+three of the following are identical and evaluate to nil.
+
+  (let (a) a)
+  (let ((a)) a)
+  (let ((a nil)) a)
+
+This function normalizes all of these to the last form."
+  (--map (if (consp it) it (list it nil)) varlist))
+
+(defmacro -let* (varlist &rest body)
+  "Bind variables according to VARLIST then eval BODY.
+
+VARLIST is a list of lists of the form (PATTERN SOURCE).  Each
+PATTERN is matched against the SOURCE structurally.  SOURCE is
+only evaluated once for each PATTERN.
+
+Each SOURCE can refer to the symbols already bound by this
+VARLIST.  This is useful if you want to destructure SOURCE
+recursively but also want to name the intermediate structures.
+
+See `-let' for the list of all possible patterns."
+  (declare (debug ((&rest [&or (sexp form) sexp]) body))
+           (indent 1))
+  (let* ((varlist (dash--normalize-let-varlist varlist))
+         (bindings (--mapcat (dash--match (car it) (cadr it)) varlist)))
+    `(let* ,bindings
+       ,@body)))
+
+(defmacro -let (varlist &rest body)
+  "Bind variables according to VARLIST then eval BODY.
+
+VARLIST is a list of lists of the form (PATTERN SOURCE).  Each
+PATTERN is matched against the SOURCE \"structurally\".  SOURCE
+is only evaluated once for each PATTERN.  Each PATTERN is matched
+recursively, and can therefore contain sub-patterns which are
+matched against corresponding sub-expressions of SOURCE.
+
+All the SOURCEs are evalled before any symbols are
+bound (i.e. \"in parallel\").
+
+If VARLIST only contains one (PATTERN SOURCE) element, you can
+optionally specify it using a vector and discarding the
+outer-most parens.  Thus
+
+  (-let ((PATTERN SOURCE)) ...)
+
+becomes
+
+  (-let [PATTERN SOURCE] ...).
+
+`-let' uses a convention of not binding places (symbols) starting
+with _ whenever it's possible.  You can use this to skip over
+entries you don't care about.  However, this is not *always*
+possible (as a result of implementation) and these symbols might
+get bound to undefined values.
+
+Following is the overview of supported patterns.  Remember that
+patterns can be matched recursively, so every a, b, aK in the
+following can be a matching construct and not necessarily a
+symbol/variable.
+
+Symbol:
+
+  a - bind the SOURCE to A.  This is just like regular `let'.
+
+Conses and lists:
+
+  (a) - bind `car' of cons/list to A
+
+  (a . b) - bind car of cons to A and `cdr' to B
+
+  (a b) - bind car of list to A and `cadr' to B
+
+  (a1 a2 a3 ...) - bind 0th car of list to A1, 1st to A2, 2nd to A3...
+
+  (a1 a2 a3 ... aN . rest) - as above, but bind the Nth cdr to REST.
+
+Vectors:
+
+  [a] - bind 0th element of a non-list sequence to A (works with
+        vectors, strings, bit arrays...)
+
+  [a1 a2 a3 ...] - bind 0th element of non-list sequence to A0, 1st to
+                   A1, 2nd to A2, ...
+                   If the PATTERN is shorter than SOURCE, the values at
+                   places not in PATTERN are ignored.
+                   If the PATTERN is longer than SOURCE, an `error' is
+                   thrown.
+
+  [a1 a2 a3 ... &rest rest] - as above, but bind the rest of
+                              the sequence to REST.  This is
+                              conceptually the same as improper list
+                              matching (a1 a2 ... aN . rest)
+
+Key/value stores:
+
+  (&plist key0 a0 ... keyN aN) - bind value mapped by keyK in the
+                                 SOURCE plist to aK.  If the
+                                 value is not found, aK is nil.
+                                 Uses `plist-get' to fetch values.
+
+  (&alist key0 a0 ... keyN aN) - bind value mapped by keyK in the
+                                 SOURCE alist to aK.  If the
+                                 value is not found, aK is nil.
+                                 Uses `assoc' to fetch values.
+
+  (&hash key0 a0 ... keyN aN) - bind value mapped by keyK in the
+                                SOURCE hash table to aK.  If the
+                                value is not found, aK is nil.
+                                Uses `gethash' to fetch values.
+
+Further, special keyword &keys supports \"inline\" matching of
+plist-like key-value pairs, similarly to &keys keyword of
+`cl-defun'.
+
+  (a1 a2 ... aN &keys key1 b1 ... keyN bK)
+
+This binds N values from the list to a1 ... aN, then interprets
+the cdr as a plist (see key/value matching above).
+
+A shorthand notation for kv-destructuring exists which allows the
+patterns be optionally left out and derived from the key name in
+the following fashion:
+
+- a key :foo is converted into `foo' pattern,
+- a key \\='bar is converted into `bar' pattern,
+- a key \"baz\" is converted into `baz' pattern.
+
+That is, the entire value under the key is bound to the derived
+variable without any further destructuring.
+
+This is possible only when the form following the key is not a
+valid pattern (i.e. not a symbol, a cons cell or a vector).
+Otherwise the matching proceeds as usual and in case of an
+invalid spec fails with an error.
+
+Thus the patterns are normalized as follows:
+
+   ;; derive all the missing patterns
+   (&plist :foo \\='bar \"baz\") => (&plist :foo foo \\='bar bar \"baz\" baz)
+
+   ;; we can specify some but not others
+   (&plist :foo \\='bar explicit-bar) => (&plist :foo foo \\='bar explicit-bar)
+
+   ;; nothing happens, we store :foo in x
+   (&plist :foo x) => (&plist :foo x)
+
+   ;; nothing happens, we match recursively
+   (&plist :foo (a b c)) => (&plist :foo (a b c))
+
+You can name the source using the syntax SYMBOL &as PATTERN.
+This syntax works with lists (proper or improper), vectors and
+all types of maps.
+
+  (list &as a b c) (list 1 2 3)
+
+binds A to 1, B to 2, C to 3 and LIST to (1 2 3).
+
+Similarly:
+
+  (bounds &as beg . end) (cons 1 2)
+
+binds BEG to 1, END to 2 and BOUNDS to (1 . 2).
+
+  (items &as first . rest) (list 1 2 3)
+
+binds FIRST to 1, REST to (2 3) and ITEMS to (1 2 3)
+
+  [vect &as _ b c] [1 2 3]
+
+binds B to 2, C to 3 and VECT to [1 2 3] (_ avoids binding as usual).
+
+  (plist &as &plist :b b) (list :a 1 :b 2 :c 3)
+
+binds B to 2 and PLIST to (:a 1 :b 2 :c 3).  Same for &alist and &hash.
+
+This is especially useful when we want to capture the result of a
+computation and destructure at the same time.  Consider the
+form (function-returning-complex-structure) returning a list of
+two vectors with two items each.  We want to capture this entire
+result and pass it to another computation, but at the same time
+we want to get the second item from each vector.  We can achieve
+it with pattern
+
+  (result &as [_ a] [_ b]) (function-returning-complex-structure)
+
+Note: Clojure programmers may know this feature as the \":as
+binding\".  The difference is that we put the &as at the front
+because we need to support improper list binding."
+  (declare (debug ([&or (&rest [&or (sexp form) sexp])
+                        (vector [&rest [sexp form]])]
+                   body))
+           (indent 1))
+  (if (vectorp varlist)
+      `(let* ,(dash--match (aref varlist 0) (aref varlist 1))
+         ,@body)
+    (let* ((varlist (dash--normalize-let-varlist varlist))
+           (inputs (--map-indexed (list (make-symbol (format "input%d" it-index)) (cadr it)) varlist))
+           (new-varlist (--zip-with (list (car it) (car other))
+                                    varlist inputs)))
+      `(let ,inputs
+         (-let* ,new-varlist ,@body)))))
+
+(defmacro -lambda (match-form &rest body)
+  "Return a lambda which destructures its input as MATCH-FORM and executes BODY.
+
+Note that you have to enclose the MATCH-FORM in a pair of parens,
+such that:
+
+  (-lambda (x) body)
+  (-lambda (x y ...) body)
+
+has the usual semantics of `lambda'.  Furthermore, these get
+translated into normal `lambda', so there is no performance
+penalty.
+
+See `-let' for a description of the destructuring mechanism."
+  (declare (doc-string 2) (indent defun)
+           (debug (&define sexp
+                           [&optional stringp]
+                           [&optional ("interactive" interactive)]
+                           def-body)))
+  (cond
+   ((nlistp match-form)
+    (signal 'wrong-type-argument (list #'listp match-form)))
+   ;; No destructuring, so just return regular `lambda' for speed.
+   ((-all? #'symbolp match-form)
+    `(lambda ,match-form ,@body))
+   ((let ((inputs (--map-indexed
+                   (list it (make-symbol (format "input%d" it-index)))
+                   match-form)))
+      ;; TODO: because inputs to the `lambda' are evaluated only once,
+      ;; `-let*' need not create the extra bindings to ensure that.
+      ;; We should find a way to optimize that.  Not critical however.
+      `(lambda ,(mapcar #'cadr inputs)
+         (-let* ,inputs ,@body))))))
+
+(defmacro -setq (&rest forms)
+  "Bind each MATCH-FORM to the value of its VAL.
+
+MATCH-FORM destructuring is done according to the rules of `-let'.
+
+This macro allows you to bind multiple variables by destructuring
+the value, so for example:
+
+  (-setq (a b) x
+         (&plist :c c) plist)
+
+expands roughly speaking to the following code
+
+  (setq a (car x)
+        b (cadr x)
+        c (plist-get plist :c))
+
+Care is taken to only evaluate each VAL once so that in case of
+multiple assignments it does not cause unexpected side effects.
+
+\(fn [MATCH-FORM VAL]...)"
+  (declare (debug (&rest sexp form))
+           (indent 1))
+  (when (= (mod (length forms) 2) 1)
+    (signal 'wrong-number-of-arguments (list '-setq (1+ (length forms)))))
+  (let* ((forms-and-sources
+          ;; First get all the necessary mappings with all the
+          ;; intermediate bindings.
+          (-map (lambda (x) (dash--match (car x) (cadr x)))
+                (-partition 2 forms)))
+         ;; To preserve the logic of dynamic scoping we must ensure
+         ;; that we `setq' the variables outside of the `let*' form
+         ;; which holds the destructured intermediate values.  For
+         ;; this we generate for each variable a placeholder which is
+         ;; bound to (lexically) the result of the destructuring.
+         ;; Then outside of the helper `let*' form we bind all the
+         ;; original variables to their respective placeholders.
+         ;; TODO: There is a lot of room for possible optimization,
+         ;; for start playing with `special-variable-p' to eliminate
+         ;; unnecessary re-binding.
+         (variables-to-placeholders
+          (-mapcat
+           (lambda (bindings)
+             (-map
+              (lambda (binding)
+                (let ((var (car binding)))
+                  (list var (make-symbol (concat "--dash-binding-" (symbol-name var) "--")))))
+              (--filter (not (string-prefix-p "--" (symbol-name (car it)))) bindings)))
+           forms-and-sources)))
+    `(let ,(-map 'cadr variables-to-placeholders)
+       (let* ,(-flatten-n 1 forms-and-sources)
+         (setq ,@(-flatten (-map 'reverse variables-to-placeholders))))
+       (setq ,@(-flatten variables-to-placeholders)))))
+
+(defmacro -if-let* (vars-vals then &rest else)
+  "If all VALS evaluate to true, bind them to their corresponding
+VARS and do THEN, otherwise do ELSE. VARS-VALS should be a list
+of (VAR VAL) pairs.
+
+Note: binding is done according to `-let*'.  VALS are evaluated
+sequentially, and evaluation stops after the first nil VAL is
+encountered."
+  (declare (debug ((&rest (sexp form)) form body))
+           (indent 2))
+  (->> vars-vals
+       (--mapcat (dash--match (car it) (cadr it)))
+       (--reduce-r-from
+        (let ((var (car it))
+              (val (cadr it)))
+          `(let ((,var ,val))
+             (if ,var ,acc ,@else)))
+        then)))
+
+(defmacro -if-let (var-val then &rest else)
+  "If VAL evaluates to non-nil, bind it to VAR and do THEN,
+otherwise do ELSE.
+
+Note: binding is done according to `-let'.
+
+\(fn (VAR VAL) THEN &rest ELSE)"
+  (declare (debug ((sexp form) form body))
+           (indent 2))
+  `(-if-let* (,var-val) ,then ,@else))
+
+(defmacro --if-let (val then &rest else)
+  "If VAL evaluates to non-nil, bind it to symbol `it' and do THEN,
+otherwise do ELSE."
+  (declare (debug (form form body))
+           (indent 2))
+  `(-if-let (it ,val) ,then ,@else))
+
+(defmacro -when-let* (vars-vals &rest body)
+  "If all VALS evaluate to true, bind them to their corresponding
+VARS and execute body. VARS-VALS should be a list of (VAR VAL)
+pairs.
+
+Note: binding is done according to `-let*'.  VALS are evaluated
+sequentially, and evaluation stops after the first nil VAL is
+encountered."
+  (declare (debug ((&rest (sexp form)) body))
+           (indent 1))
+  `(-if-let* ,vars-vals (progn ,@body)))
+
+(defmacro -when-let (var-val &rest body)
+  "If VAL evaluates to non-nil, bind it to VAR and execute body.
+
+Note: binding is done according to `-let'.
+
+\(fn (VAR VAL) &rest BODY)"
+  (declare (debug ((sexp form) body))
+           (indent 1))
+  `(-if-let ,var-val (progn ,@body)))
+
+(defmacro --when-let (val &rest body)
+  "If VAL evaluates to non-nil, bind it to symbol `it' and
+execute body."
+  (declare (debug (form body))
+           (indent 1))
+  `(--if-let ,val (progn ,@body)))
+
+;; TODO: Get rid of this dynamic variable, passing it as an argument
+;; instead?
+(defvar -compare-fn nil
+  "Tests for equality use this function, or `equal' if this is nil.
+
+As a dynamic variable, this should be temporarily bound around
+the relevant operation, rather than permanently modified.  For
+example:
+
+  (let ((-compare-fn #\\='=))
+    (-union \\='(1 2 3) \\='(2 3 4)))")
+
+(defun dash--member-fn ()
+  "Return the flavor of `member' that goes best with `-compare-fn'."
+  (declare (side-effect-free error-free))
+  (let ((cmp -compare-fn))
+    (cond ((memq cmp '(nil equal)) #'member)
+          ((eq cmp #'eq) #'memq)
+          ((eq cmp #'eql) #'memql)
+          ((lambda (elt list)
+             (while (and list (not (funcall cmp elt (car list))))
+               (pop list))
+             list)))))
+
+(defun dash--assoc-fn ()
+  "Return the flavor of `assoc' that goes best with `-compare-fn'."
+  (declare (side-effect-free error-free))
+  (let ((cmp -compare-fn))
+    (cond ((memq cmp '(nil equal)) #'assoc)
+          ((eq cmp #'eq) #'assq)
+          ((lambda (key alist)
+             ;; Since Emacs 26, `assoc' accepts a custom `testfn'.
+             ;; Version testing would be simpler here, but feature
+             ;; testing gets more brownie points, I guess.
+             (static-if (condition-case nil
+                            (assoc nil () #'eql)
+                          (wrong-number-of-arguments t))
+                 (--first (and (consp it) (funcall cmp (car it) key)) alist)
+               (assoc key alist cmp)))))))
+
+(defun dash--hash-test-fn ()
+  "Return the hash table test function corresponding to `-compare-fn'.
+Return nil if `-compare-fn' is not a known test function."
+  (declare (side-effect-free error-free))
+  ;; In theory this could also recognize values that are custom
+  ;; `hash-table-test's, but too often the :test name is different
+  ;; from the equality function, so it doesn't seem worthwhile.
+  (car (memq (or -compare-fn #'equal) '(equal eq eql))))
+
+(defvar dash--short-list-length 32
+  "Maximum list length considered short, for optimizations.
+For example, the speedup afforded by hash table lookup may start
+to outweigh its runtime and memory overhead for problem sizes
+greater than this value.  See also the discussion in PR #305.")
+
+(defun -distinct (list)
+  "Return a copy of LIST with all duplicate elements removed.
+
+The test for equality is done with `equal', or with `-compare-fn'
+if that is non-nil.
+
+Alias: `-uniq'."
+  (declare (important-return-value t))
+  (let (test len)
+    (cond ((null list) ())
+          ;; Use a hash table if `-compare-fn' is a known hash table
+          ;; test function and the list is long enough.
+          ((and (setq test (dash--hash-test-fn))
+                (> (setq len (length list)) dash--short-list-length))
+           (let ((ht (make-hash-table :test test :size len)))
+             (--filter (unless (gethash it ht) (puthash it t ht)) list)))
+          ((let ((member (dash--member-fn)) uniq)
+             (--each list (unless (funcall member it uniq) (push it uniq)))
+             (nreverse uniq))))))
+
+(defalias '-uniq #'-distinct)
+
+(defun dash--size+ (size1 size2)
+  "Return the sum of nonnegative fixnums SIZE1 and SIZE2.
+Return `most-positive-fixnum' on overflow.  This ensures the
+result is a valid size, particularly for allocating hash tables,
+even in the presence of bignum support."
+  (declare (side-effect-free t))
+  (if (< size1 (- most-positive-fixnum size2))
+      (+ size1 size2)
+    most-positive-fixnum))
+
+(defun -union (list1 list2)
+  "Return a new list of distinct elements appearing in either LIST1 or LIST2.
+
+The test for equality is done with `equal', or with `-compare-fn'
+if that is non-nil."
+  (declare (important-return-value t))
+  (let ((lists (list list1 list2)) test len union)
+    (cond ((null (or list1 list2)))
+          ;; Use a hash table if `-compare-fn' is a known hash table
+          ;; test function and the lists are long enough.
+          ((and (setq test (dash--hash-test-fn))
+                (> (setq len (dash--size+ (length list1) (length list2)))
+                   dash--short-list-length))
+           (let ((ht (make-hash-table :test test :size len)))
+             (dolist (l lists)
+               (--each l (unless (gethash it ht)
+                           (puthash it t ht)
+                           (push it union))))))
+          ((let ((member (dash--member-fn)))
+             (dolist (l lists)
+               (--each l (unless (funcall member it union) (push it union)))))))
+    (nreverse union)))
+
+(defun -intersection (list1 list2)
+  "Return a new list of distinct elements appearing in both LIST1 and LIST2.
+
+The test for equality is done with `equal', or with `-compare-fn'
+if that is non-nil."
+  (declare (important-return-value t))
+  (let (test len)
+    (cond ((null (and list1 list2)) ())
+          ;; Use a hash table if `-compare-fn' is a known hash table
+          ;; test function and either list is long enough.
+          ((and (setq test (dash--hash-test-fn))
+                (> (setq len (length list2)) dash--short-list-length))
+           (let ((ht (make-hash-table :test test :size len)))
+             (--each list2 (puthash it t ht))
+             ;; Remove visited elements to avoid duplicates.
+             (--filter (when (gethash it ht) (remhash it ht) t) list1)))
+          ((let ((member (dash--member-fn)) intersection)
+             (--each list1 (and (funcall member it list2)
+                                (not (funcall member it intersection))
+                                (push it intersection)))
+             (nreverse intersection))))))
+
+(defun -difference (list1 list2)
+  "Return a new list with the distinct members of LIST1 that are not in LIST2.
+
+The test for equality is done with `equal', or with `-compare-fn'
+if that is non-nil."
+  (declare (important-return-value t))
+  (let (test len1 len2)
+    (cond ((null list1) ())
+          ((null list2) (-distinct list1))
+          ;; Use a hash table if `-compare-fn' is a known hash table
+          ;; test function and the subtrahend is long enough.
+          ((and (setq test (dash--hash-test-fn))
+                (setq len1 (length list1))
+                (setq len2 (length list2))
+                (> (max len1 len2) dash--short-list-length))
+           (let ((ht1 (make-hash-table :test test :size len1))
+                 (ht2 (make-hash-table :test test :size len2)))
+             (--each list2 (puthash it t ht2))
+             ;; Avoid duplicates by tracking visited items in `ht1'.
+             (--filter (unless (or (gethash it ht2) (gethash it ht1))
+                         (puthash it t ht1))
+                       list1)))
+          ((let ((member (dash--member-fn)) difference)
+             (--each list1
+               (unless (or (funcall member it list2)
+                           (funcall member it difference))
+                 (push it difference)))
+             (nreverse difference))))))
+
+(defun -powerset (list)
+  "Return the power set of LIST."
+  (declare (pure t) (side-effect-free t))
+  (if (null list) (list ())
+    (let ((last (-powerset (cdr list))))
+      (nconc (mapcar (lambda (x) (cons (car list) x)) last)
+             last))))
+
+(defun -frequencies (list)
+  "Count the occurrences of each distinct element of LIST.
+
+Return an alist of (ELEMENT . N), where each ELEMENT occurs N
+times in LIST.
+
+The test for equality is done with `equal', or with `-compare-fn'
+if that is non-nil.
+
+See also `-count' and `-group-by'."
+  (declare (important-return-value t))
+  (let (test len freqs)
+    (cond ((null list))
+          ((and (setq test (dash--hash-test-fn))
+                (> (setq len (length list)) dash--short-list-length))
+           (let ((ht (make-hash-table :test test :size len)))
+             ;; Share structure between hash table and returned list.
+             ;; This affords a single pass that preserves the input
+             ;; order, conses less garbage, and is faster than a
+             ;; second traversal (e.g., with `maphash').
+             (--each list
+               (let ((freq (gethash it ht)))
+                 (if freq
+                     (setcdr freq (1+ (cdr freq)))
+                   (push (puthash it (cons it 1) ht) freqs))))))
+          ((let ((assoc (dash--assoc-fn)))
+             (--each list
+               (let ((freq (funcall assoc it freqs)))
+                 (if freq
+                     (setcdr freq (1+ (cdr freq)))
+                   (push (cons it 1) freqs)))))))
+    (nreverse freqs)))
+
+(defun dash--numbers<= (nums)
+  "Return non-nil if NUMS is a list of non-decreasing numbers."
+  (declare (pure t) (side-effect-free t))
+  (or (null nums)
+      (let ((prev (pop nums)))
+        (and (numberp prev)
+             (--every (and (numberp it) (<= prev (setq prev it))) nums)))))
+
+(defun dash--next-lex-perm (array n)
+  "Update ARRAY of N numbers with its next lexicographic permutation.
+Return nil if there is no such successor.  N should be nonzero.
+
+This implements the salient steps of Algorithm L (Lexicographic
+permutation generation) as described in DE Knuth's The Art of
+Computer Programming, Volume 4A / Combinatorial Algorithms,
+Part I, Addison-Wesley, 2011, § 7.2.1.2, p. 319."
+  (setq n (1- n))
+  (let* ((l n)
+         (j (1- n))
+         (al (aref array n))
+         (aj al))
+    ;; L2. [Find j].
+    ;; Decrement j until a[j] < a[j+1].
+    (while (and (<= 0 j)
+                (<= aj (setq aj (aref array j))))
+      (setq j (1- j)))
+    ;; Terminate algorithm if j not found.
+    (when (>= j 0)
+      ;; L3. [Increase a[j]].
+      ;; Decrement l until a[j] < a[l].
+      (while (>= aj al)
+        (setq l (1- l) al (aref array l)))
+      ;; Swap a[j] and a[l].
+      (aset array j al)
+      (aset array l aj)
+      ;; L4. [Reverse a[j+1]...a[n]].
+      (setq l n)
+      (while (< (setq j (1+ j)) l)
+        (setq aj (aref array j))
+        (aset array j (aref array l))
+        (aset array l aj)
+        (setq l (1- l)))
+      array)))
+
+(defun dash--lex-perms (vec &optional original)
+  "Return a list of permutations of VEC in lexicographic order.
+Specifically, return only the successors of VEC in lexicographic
+order.  Each returned permutation is a list.  VEC should comprise
+one or more numbers, and may be destructively modified.
+
+If ORIGINAL is a vector, then VEC is interpreted as a set of
+indices into ORIGINAL.  In this case, the indices are permuted,
+and the resulting index permutations are used to dereference
+elements of ORIGINAL."
+  (let ((len (length vec)) perms)
+    (while vec
+      (push (if original
+                (--map (aref original it) vec)
+              (append vec ()))
+            perms)
+      (setq vec (dash--next-lex-perm vec len)))
+    (nreverse perms)))
+
+(defun dash--uniq-perms (list)
+  "Return a list of permutations of LIST.
+LIST is treated as if all its elements are distinct."
+  (let* ((vec (vconcat list))
+         (idxs (copy-sequence vec)))
+    ;; Just construct a vector of the list's indices and permute that.
+    (dotimes (i (length idxs))
+      (aset idxs i i))
+    (dash--lex-perms idxs vec)))
+
+(defun dash--multi-perms (list freqs)
+  "Return a list of permutations of the multiset LIST.
+FREQS should be an alist describing the frequency of each element
+in LIST, as returned by `-frequencies'."
+  (let (;; Distinct items in `list', aka the cars of `freqs'.
+        (uniq (make-vector (length freqs) nil))
+        ;; Indices into `uniq'.
+        (idxs (make-vector (length list) nil))
+        ;; Current index into `idxs'.
+        (i 0))
+    (--each freqs
+      (aset uniq it-index (car it))
+      ;; Populate `idxs' with as many copies of each `it-index' as
+      ;; there are corresponding duplicates.
+      (dotimes (_ (cdr it))
+        (aset idxs i it-index)
+        (setq i (1+ i))))
+    (dash--lex-perms idxs uniq)))
+
+(defun -permutations (list)
+  "Return the distinct permutations of LIST.
+
+Duplicate elements of LIST are determined by `equal', or by
+`-compare-fn' if that is non-nil."
+  (declare (important-return-value t))
+  (cond ((null list) (list ()))
+        ;; Optimization: a traversal of `list' is faster than the
+        ;; round trip via `dash--uniq-perms' or `dash--multi-perms'.
+        ((dash--numbers<= list)
+         (dash--lex-perms (vconcat list)))
+        ((let ((freqs (-frequencies list)))
+           ;; Is each element distinct?
+           (unless (--every (= (cdr it) 1) freqs)
+             (dash--multi-perms list freqs))))
+        ((dash--uniq-perms list))))
+
+(defun -inits (list)
+  "Return all prefixes of LIST."
+  (declare (pure t) (side-effect-free t))
+  (let ((res (list list)))
+    (setq list (reverse list))
+    (while list
+      (push (reverse (!cdr list)) res))
+    res))
+
+(defun -tails (list)
+  "Return all suffixes of LIST."
+  (declare (pure t) (side-effect-free t))
+  (-reductions-r-from #'cons nil list))
+
+(defun -common-prefix (&rest lists)
+  "Return the longest common prefix of LISTS."
+  (declare (pure t) (side-effect-free t))
+  (--reduce (--take-while (and acc (equal (pop acc) it)) it)
+            lists))
+
+(defun -common-suffix (&rest lists)
+  "Return the longest common suffix of LISTS."
+  (declare (pure t) (side-effect-free t))
+  (nreverse (apply #'-common-prefix (mapcar #'reverse lists))))
+
+(defun -contains? (list element)
+  "Return non-nil if LIST contains ELEMENT.
+
+The test for equality is done with `equal', or with `-compare-fn'
+if that is non-nil.  As with `member', the return value is
+actually the tail of LIST whose car is ELEMENT.
+
+Alias: `-contains-p'."
+  (declare (important-return-value t))
+  (funcall (dash--member-fn) element list))
+
+(defalias '-contains-p #'-contains?)
+
+(defun -same-items? (list1 list2)
+  "Return non-nil if LIST1 and LIST2 have the same distinct elements.
+
+The order of the elements in the lists does not matter.  The
+lists may be of different lengths, i.e., contain duplicate
+elements.  The test for equality is done with `equal', or with
+`-compare-fn' if that is non-nil.
+
+Alias: `-same-items-p'."
+  (declare (important-return-value t))
+  (let (test len1 len2)
+    (cond ((null (or list1 list2)))
+          ((null (and list1 list2)) nil)
+          ;; Use a hash table if `-compare-fn' is a known hash table
+          ;; test function and either list is long enough.
+          ((and (setq test (dash--hash-test-fn))
+                (setq len1 (length list1))
+                (setq len2 (length list2))
+                (> (max len1 len2) dash--short-list-length))
+           (let ((ht1 (make-hash-table :test test :size len1))
+                 (ht2 (make-hash-table :test test :size len2)))
+             (--each list1 (puthash it t ht1))
+             ;; Move visited elements from `ht1' to `ht2'.  This way,
+             ;; if visiting all of `list2' leaves `ht1' empty, then
+             ;; all elements from both lists have been accounted for.
+             (and (--every (cond ((gethash it ht1)
+                                  (remhash it ht1)
+                                  (puthash it t ht2))
+                                 ((gethash it ht2)))
+                           list2)
+                  (zerop (hash-table-count ht1)))))
+          ((let ((member (dash--member-fn)))
+             (and (--all? (funcall member it list2) list1)
+                  (--all? (funcall member it list1) list2)))))))
+
+(defalias '-same-items-p #'-same-items?)
+
+(defun -is-prefix? (prefix list)
+  "Return non-nil if PREFIX is a prefix of LIST.
+
+Alias: `-is-prefix-p'."
+  (declare (pure t) (side-effect-free t))
+  (--each-while list (and (equal (car prefix) it)
+                          (!cdr prefix)))
+  (null prefix))
+
+(defun -is-suffix? (suffix list)
+  "Return non-nil if SUFFIX is a suffix of LIST.
+
+Alias: `-is-suffix-p'."
+  (declare (pure t) (side-effect-free t))
+  (equal suffix (last list (length suffix))))
+
+(defun -is-infix? (infix list)
+  "Return non-nil if INFIX is infix of LIST.
+
+This operation runs in O(n^2) time
+
+Alias: `-is-infix-p'"
+  (declare (pure t) (side-effect-free t))
+  (let (done)
+    (while (and (not done) list)
+      (setq done (-is-prefix? infix list))
+      (!cdr list))
+    done))
+
+(defalias '-is-prefix-p '-is-prefix?)
+(defalias '-is-suffix-p '-is-suffix?)
+(defalias '-is-infix-p '-is-infix?)
+
+(defun -sort (comparator list)
+  "Sort LIST, stably, comparing elements using COMPARATOR.
+Return the sorted list.  LIST is NOT modified by side effects.
+COMPARATOR is called with two elements of LIST, and should return non-nil
+if the first element should sort before the second."
+  (declare (important-return-value t))
+  (static-if (condition-case nil (sort []) (wrong-number-of-arguments))
+      ;; Since Emacs 30.
+      (sort list :lessp comparator)
+    (sort (copy-sequence list) comparator)))
+
+(defmacro --sort (form list)
+  "Anaphoric form of `-sort'."
+  (declare (debug (def-form form)))
+  `(-sort (lambda (it other) (ignore it other) ,form) ,list))
+
+(defun -list (&optional arg &rest args)
+  "Ensure ARG is a list.
+If ARG is already a list, return it as is (not a copy).
+Otherwise, return a new list with ARG as its only element.
+
+Another supported calling convention is (-list &rest ARGS).
+In this case, if ARG is not a list, a new list with all of
+ARGS as elements is returned.  This use is supported for
+backward compatibility and is otherwise deprecated."
+  (declare (advertised-calling-convention (arg) "2.18.0")
+           (pure t) (side-effect-free error-free))
+  (if (listp arg) arg (cons arg args)))
+
+(defun -repeat (n x)
+  "Return a new list of length N with each element being X.
+Return nil if N is less than 1."
+  (declare (side-effect-free t))
+  (and (>= n 0) (make-list n x)))
+
+(defun -sum (list)
+  "Return the sum of LIST."
+  (declare (pure t) (side-effect-free t))
+  (apply #'+ list))
+
+(defun -running-sum (list)
+  "Return a list with running sums of items in LIST.
+LIST must be non-empty."
+  (declare (pure t) (side-effect-free t))
+  (or list (signal 'wrong-type-argument (list #'consp list)))
+  (-reductions #'+ list))
+
+(defun -product (list)
+  "Return the product of LIST."
+  (declare (pure t) (side-effect-free t))
+  (apply #'* list))
+
+(defun -running-product (list)
+  "Return a list with running products of items in LIST.
+LIST must be non-empty."
+  (declare (pure t) (side-effect-free t))
+  (or list (signal 'wrong-type-argument (list #'consp list)))
+  (-reductions #'* list))
+
+(defun -max (list)
+  "Return the largest value from LIST of numbers or markers."
+  (declare (pure t) (side-effect-free t))
+  (apply #'max list))
+
+(defun -min (list)
+  "Return the smallest value from LIST of numbers or markers."
+  (declare (pure t) (side-effect-free t))
+  (apply #'min list))
+
+(defun -max-by (comparator list)
+  "Take a comparison function COMPARATOR and a LIST and return
+the greatest element of the list by the comparison function.
+
+See also combinator `-on' which can transform the values before
+comparing them."
+  (declare (important-return-value t))
+  (--reduce (if (funcall comparator it acc) it acc) list))
+
+(defun -min-by (comparator list)
+  "Take a comparison function COMPARATOR and a LIST and return
+the least element of the list by the comparison function.
+
+See also combinator `-on' which can transform the values before
+comparing them."
+  (declare (important-return-value t))
+  (--reduce (if (funcall comparator it acc) acc it) list))
+
+(defmacro --max-by (form list)
+  "Anaphoric version of `-max-by'.
+
+The items for the comparator form are exposed as \"it\" and \"other\"."
+  (declare (debug (def-form form)))
+  `(-max-by (lambda (it other) (ignore it other) ,form) ,list))
+
+(defmacro --min-by (form list)
+  "Anaphoric version of `-min-by'.
+
+The items for the comparator form are exposed as \"it\" and \"other\"."
+  (declare (debug (def-form form)))
+  `(-min-by (lambda (it other) (ignore it other) ,form) ,list))
+
+(defun -iota (count &optional start step)
+  "Return a list containing COUNT numbers.
+Starts from START and adds STEP each time.  The default START is
+zero, the default STEP is 1.
+This function takes its name from the corresponding primitive in
+the APL language."
+  (declare (side-effect-free t))
+  (unless (natnump count)
+    (signal 'wrong-type-argument (list #'natnump count)))
+  (or start (setq start 0))
+  (or step (setq step 1))
+  (if (zerop step)
+      (make-list count start)
+    (--iterate (+ it step) start count)))
+
+(defun -fix (fn list)
+  "Compute the (least) fixpoint of FN with initial input LIST.
+
+FN is called at least once, results are compared with `equal'."
+  (declare (important-return-value t))
+  (let ((re (funcall fn list)))
+    (while (not (equal list re))
+      (setq list re)
+      (setq re (funcall fn re)))
+    re))
+
+(defmacro --fix (form list)
+  "Anaphoric form of `-fix'."
+  (declare (debug (def-form form)))
+  `(-fix (lambda (it) (ignore it) ,form) ,list))
+
+(defun -unfold (fun seed)
+  "Build a list from SEED using FUN.
+
+This is \"dual\" operation to `-reduce-r': while -reduce-r
+consumes a list to produce a single value, `-unfold' takes a
+seed value and builds a (potentially infinite!) list.
+
+FUN should return nil to stop the generating process, or a
+cons (A . B), where A will be prepended to the result and B is
+the new seed."
+  (declare (important-return-value t))
+  (let ((last (funcall fun seed)) r)
+    (while last
+      (push (car last) r)
+      (setq last (funcall fun (cdr last))))
+    (nreverse r)))
+
+(defmacro --unfold (form seed)
+  "Anaphoric version of `-unfold'."
+  (declare (debug (def-form form)))
+  `(-unfold (lambda (it) (ignore it) ,form) ,seed))
+
+(defun -cons-pair? (obj)
+  "Return non-nil if OBJ is a true cons pair.
+That is, a cons (A . B) where B is not a list.
+
+Alias: `-cons-pair-p'."
+  (declare (pure t) (side-effect-free error-free))
+  (nlistp (cdr-safe obj)))
+
+(defalias '-cons-pair-p '-cons-pair?)
+
+(defun -cons-to-list (con)
+  "Convert a cons pair to a list with `car' and `cdr' of the pair respectively."
+  (declare (pure t) (side-effect-free t))
+  (list (car con) (cdr con)))
+
+(defun -value-to-list (val)
+  "Convert a value to a list.
+
+If the value is a cons pair, make a list with two elements, `car'
+and `cdr' of the pair respectively.
+
+If the value is anything else, wrap it in a list."
+  (declare (pure t) (side-effect-free t))
+  (if (-cons-pair? val) (-cons-to-list val) (list val)))
+
+(defun -tree-mapreduce-from (fn folder init-value tree)
+  "Apply FN to each element of TREE, and make a list of the results.
+If elements of TREE are lists themselves, apply FN recursively to
+elements of these nested lists.
+
+Then reduce the resulting lists using FOLDER and initial value
+INIT-VALUE. See `-reduce-r-from'.
+
+This is the same as calling `-tree-reduce-from' after `-tree-map'
+but is twice as fast as it only traverse the structure once."
+  (declare (important-return-value t))
+  (cond
+   ((null tree) ())
+   ((-cons-pair? tree) (funcall fn tree))
+   ((consp tree)
+    (-reduce-r-from
+     folder init-value
+     (mapcar (lambda (x) (-tree-mapreduce-from fn folder init-value x)) tree)))
+   ((funcall fn tree))))
+
+(defmacro --tree-mapreduce-from (form folder init-value tree)
+  "Anaphoric form of `-tree-mapreduce-from'."
+  (declare (debug (def-form def-form form form)))
+  `(-tree-mapreduce-from (lambda (it) (ignore it) ,form)
+                         (lambda (it acc) (ignore it acc) ,folder)
+                         ,init-value
+                         ,tree))
+
+(defun -tree-mapreduce (fn folder tree)
+  "Apply FN to each element of TREE, and make a list of the results.
+If elements of TREE are lists themselves, apply FN recursively to
+elements of these nested lists.
+
+Then reduce the resulting lists using FOLDER and initial value
+INIT-VALUE. See `-reduce-r-from'.
+
+This is the same as calling `-tree-reduce' after `-tree-map'
+but is twice as fast as it only traverse the structure once."
+  (declare (important-return-value t))
+  (cond
+   ((null tree) ())
+   ((-cons-pair? tree) (funcall fn tree))
+   ((consp tree)
+    (-reduce-r folder (mapcar (lambda (x) (-tree-mapreduce fn folder x)) tree)))
+   ((funcall fn tree))))
+
+(defmacro --tree-mapreduce (form folder tree)
+  "Anaphoric form of `-tree-mapreduce'."
+  (declare (debug (def-form def-form form)))
+  `(-tree-mapreduce (lambda (it) (ignore it) ,form)
+                    (lambda (it acc) (ignore it acc) ,folder)
+                    ,tree))
+
+(defun -tree-map (fn tree)
+  "Apply FN to each element of TREE while preserving the tree structure."
+  (declare (important-return-value t))
+  (cond
+   ((null tree) ())
+   ((-cons-pair? tree) (funcall fn tree))
+   ((consp tree)
+    (mapcar (lambda (x) (-tree-map fn x)) tree))
+   ((funcall fn tree))))
+
+(defmacro --tree-map (form tree)
+  "Anaphoric form of `-tree-map'."
+  (declare (debug (def-form form)))
+  `(-tree-map (lambda (it) (ignore it) ,form) ,tree))
+
+(defun -tree-reduce-from (fn init-value tree)
+  "Use FN to reduce elements of list TREE.
+If elements of TREE are lists themselves, apply the reduction recursively.
+
+FN is first applied to INIT-VALUE and first element of the list,
+then on this result and second element from the list etc.
+
+The initial value is ignored on cons pairs as they always contain
+two elements."
+  (declare (important-return-value t))
+  (cond
+   ((null tree) ())
+   ((-cons-pair? tree) tree)
+   ((consp tree)
+    (-reduce-r-from
+     fn init-value
+     (mapcar (lambda (x) (-tree-reduce-from fn init-value x)) tree)))
+   (tree)))
+
+(defmacro --tree-reduce-from (form init-value tree)
+  "Anaphoric form of `-tree-reduce-from'."
+  (declare (debug (def-form form form)))
+  `(-tree-reduce-from (lambda (it acc) (ignore it acc) ,form)
+                      ,init-value ,tree))
+
+(defun -tree-reduce (fn tree)
+  "Use FN to reduce elements of list TREE.
+If elements of TREE are lists themselves, apply the reduction recursively.
+
+FN is first applied to first element of the list and second
+element, then on this result and third element from the list etc.
+
+See `-reduce-r' for how exactly are lists of zero or one element handled."
+  (declare (important-return-value t))
+  (cond
+   ((null tree) ())
+   ((-cons-pair? tree) tree)
+   ((consp tree)
+    (-reduce-r fn (mapcar (lambda (x) (-tree-reduce fn x)) tree)))
+   (tree)))
+
+(defmacro --tree-reduce (form tree)
+  "Anaphoric form of `-tree-reduce'."
+  (declare (debug (def-form form)))
+  `(-tree-reduce (lambda (it acc) (ignore it acc) ,form) ,tree))
+
+(defun -tree-map-nodes (pred fun tree)
+  "Call FUN on each node of TREE that satisfies PRED.
+
+If PRED returns nil, continue descending down this node.  If PRED
+returns non-nil, apply FUN to this node and do not descend
+further."
+  (cond ((funcall pred tree) (funcall fun tree))
+        ((and (listp tree) (listp (cdr tree)))
+         (-map (lambda (x) (-tree-map-nodes pred fun x)) tree))
+        (tree)))
+
+(defmacro --tree-map-nodes (pred form tree)
+  "Anaphoric form of `-tree-map-nodes'."
+  (declare (debug (def-form def-form form)))
+  `(-tree-map-nodes (lambda (it) (ignore it) ,pred)
+                    (lambda (it) (ignore it) ,form)
+                    ,tree))
+
+(defun -tree-seq (branch children tree)
+  "Return a sequence of the nodes in TREE, in depth-first search order.
+
+BRANCH is a predicate of one argument that returns non-nil if the
+passed argument is a branch, that is, a node that can have children.
+
+CHILDREN is a function of one argument that returns the children
+of the passed branch node.
+
+Non-branch nodes are simply copied."
+  (declare (important-return-value t))
+  (cons tree
+        (and (funcall branch tree)
+             (-mapcat (lambda (x) (-tree-seq branch children x))
+                      (funcall children tree)))))
+
+(defmacro --tree-seq (branch children tree)
+  "Anaphoric form of `-tree-seq'."
+  (declare (debug (def-form def-form form)))
+  `(-tree-seq (lambda (it) (ignore it) ,branch)
+              (lambda (it) (ignore it) ,children)
+              ,tree))
+
+(defun -clone (list)
+  "Create a deep copy of LIST.
+The new list has the same elements and structure but all cons are
+replaced with new ones.  This is useful when you need to clone a
+structure such as plist or alist."
+  (declare (side-effect-free t))
+  (-tree-map #'identity list))
+
+;;; Combinators
+
+(defalias '-partial #'apply-partially
+  "Return a function that is a partial application of FUN to ARGS.
+ARGS is a list of the first N arguments to pass to FUN.
+The result is a new function which does the same as FUN, except that
+the first N arguments are fixed at the values with which this function
+was called.
+\n(fn FUN &rest ARGS)")
+
+(defun -rpartial (fn &rest args)
+  "Return a function that is a partial application of FN to ARGS.
+ARGS is a list of the last N arguments to pass to FN.  The result
+is a new function which does the same as FN, except that the last
+N arguments are fixed at the values with which this function was
+called.  This is like `-partial', except the arguments are fixed
+starting from the right rather than the left."
+  (declare (pure t) (side-effect-free error-free))
+  (lambda (&rest args-before) (apply fn (append args-before args))))
+
+(defun -juxt (&rest fns)
+  "Return a function that is the juxtaposition of FNS.
+The returned function takes a variable number of ARGS, applies
+each of FNS in turn to ARGS, and returns the list of results."
+  (declare (pure t) (side-effect-free error-free))
+  (lambda (&rest args) (mapcar (lambda (x) (apply x args)) fns)))
+
+(defun -compose (&rest fns)
+  "Compose FNS into a single composite function.
+Return a function that takes a variable number of ARGS, applies
+the last function in FNS to ARGS, and returns the result of
+calling each remaining function on the result of the previous
+function, right-to-left.  If no FNS are given, return a variadic
+`identity' function."
+  (declare (pure t) (side-effect-free error-free))
+  (let* ((fns (nreverse fns))
+         (head (car fns))
+         (tail (cdr fns)))
+    (cond (tail
+           (lambda (&rest args)
+             (--reduce-from (funcall it acc) (apply head args) tail)))
+          (fns head)
+          ((lambda (&optional arg &rest _) arg)))))
+
+(defun -applify (fn)
+  "Return a function that applies FN to a single list of args.
+This changes the arity of FN from taking N distinct arguments to
+taking 1 argument which is a list of N arguments."
+  (declare (pure t) (side-effect-free error-free))
+  (lambda (args) (apply fn args)))
+
+(defun -on (op trans)
+  "Return a function that calls TRANS on each arg and OP on the results.
+The returned function takes a variable number of arguments, calls
+the function TRANS on each one in turn, and then passes those
+results as the list of arguments to OP, in the same order.
+
+For example, the following pairs of expressions are morally
+equivalent:
+
+  (funcall (-on #\\='+ #\\='1+) 1 2 3) = (+ (1+ 1) (1+ 2) (1+ 3))
+  (funcall (-on #\\='+ #\\='1+))       = (+)"
+  (declare (pure t) (side-effect-free error-free))
+  (lambda (&rest args)
+    ;; This unrolling seems to be a relatively cheap way to keep the
+    ;; overhead of `mapcar' + `apply' in check.
+    (cond ((cddr args)
+           (apply op (mapcar trans args)))
+          ((cdr args)
+           (funcall op (funcall trans (car args)) (funcall trans (cadr args))))
+          (args
+           (funcall op (funcall trans (car args))))
+          ((funcall op)))))
+
+(defun -flip (fn)
+  "Return a function that calls FN with its arguments reversed.
+The returned function takes the same number of arguments as FN.
+
+For example, the following two expressions are morally
+equivalent:
+
+  (funcall (-flip #\\='-) 1 2) = (- 2 1)
+
+See also: `-rotate-args'."
+  (declare (pure t) (side-effect-free error-free))
+  (lambda (&rest args) ;; Open-code for speed.
+    (cond ((cddr args) (apply fn (nreverse args)))
+          ((cdr args) (funcall fn (cadr args) (car args)))
+          (args (funcall fn (car args)))
+          ((funcall fn)))))
+
+(defun -rotate-args (n fn)
+  "Return a function that calls FN with args rotated N places to the right.
+The returned function takes the same number of arguments as FN,
+rotates the list of arguments N places to the right (left if N is
+negative) just like `-rotate', and applies FN to the result.
+
+See also: `-flip'."
+  (declare (pure t) (side-effect-free t))
+  (if (zerop n)
+      fn
+    (let ((even (= (% n 2) 0)))
+      (lambda (&rest args)
+        (cond ((cddr args) ;; Open-code for speed.
+               (apply fn (-rotate n args)))
+              ((cdr args)
+               (let ((fst (car args))
+                     (snd (cadr args)))
+                 (funcall fn (if even fst snd) (if even snd fst))))
+              (args
+               (funcall fn (car args)))
+              ((funcall fn)))))))
+
+(defun -const (c)
+  "Return a function that returns C ignoring any additional arguments.
+
+In types: a -> b -> a"
+  (declare (pure t) (side-effect-free error-free))
+  (lambda (&rest _) c))
+
+(defmacro -cut (&rest params)
+  "Take n-ary function and n arguments and specialize some of them.
+Arguments denoted by <> will be left unspecialized.
+
+See SRFI-26 for detailed description."
+  (declare (debug (&optional sexp &rest &or "<>" form)))
+  (let* ((i 0)
+         (args (--keep (when (eq it '<>)
+                         (setq i (1+ i))
+                         (make-symbol (format "D%d" i)))
+                       params)))
+    `(lambda ,args
+       ,(let ((body (--map (if (eq it '<>) (pop args) it) params)))
+          (if (eq (car params) '<>)
+              (cons #'funcall body)
+            body)))))
+
+(defun -not (pred)
+  "Return a predicate that negates the result of PRED.
+The returned predicate passes its arguments to PRED.  If PRED
+returns nil, the result is non-nil; otherwise the result is nil.
+
+See also: `-andfn' and `-orfn'."
+  (declare (pure t) (side-effect-free error-free))
+  (lambda (&rest args) (not (apply pred args))))
+
+(defun -orfn (&rest preds)
+  "Return a predicate that returns the first non-nil result of PREDS.
+The returned predicate takes a variable number of arguments,
+passes them to each predicate in PREDS in turn until one of them
+returns non-nil, and returns that non-nil result without calling
+the remaining PREDS.  If all PREDS return nil, or if no PREDS are
+given, the returned predicate returns nil.
+
+See also: `-andfn' and `-not'."
+  (declare (pure t) (side-effect-free error-free))
+  ;; Open-code for speed.
+  (cond ((cdr preds) (lambda (&rest args) (--some (apply it args) preds)))
+        (preds (car preds))
+        (#'ignore)))
+
+(defun -andfn (&rest preds)
+  "Return a predicate that returns non-nil if all PREDS do so.
+The returned predicate P takes a variable number of arguments and
+passes them to each predicate in PREDS in turn.  If any one of
+PREDS returns nil, P also returns nil without calling the
+remaining PREDS.  If all PREDS return non-nil, P returns the last
+such value.  If no PREDS are given, P always returns non-nil.
+
+See also: `-orfn' and `-not'."
+  (declare (pure t) (side-effect-free error-free))
+  ;; Open-code for speed.
+  (cond ((cdr preds) (lambda (&rest args) (--every (apply it args) preds)))
+        (preds (car preds))
+        ((static-if (fboundp 'always)
+             #'always
+           (lambda (&rest _) t)))))
+
+(defun -iteratefn (fn n)
+  "Return a function FN composed N times with itself.
+
+FN is a unary function.  If you need to use a function of higher
+arity, use `-applify' first to turn it into a unary function.
+
+With n = 0, this acts as identity function.
+
+In types: (a -> a) -> Int -> a -> a.
+
+This function satisfies the following law:
+
+  (funcall (-iteratefn fn n) init) = (-last-item (-iterate fn init (1+ n)))."
+  (declare (pure t) (side-effect-free error-free))
+  (lambda (x) (--dotimes n (setq x (funcall fn x))) x))
+
+(defun -counter (&optional beg end inc)
+  "Return a closure that counts from BEG to END, with increment INC.
+
+The closure will return the next value in the counting sequence
+each time it is called, and nil after END is reached. BEG
+defaults to 0, INC defaults to 1, and if END is nil, the counter
+will increment indefinitely.
+
+The closure accepts any number of arguments, which are discarded."
+  (declare (pure t) (side-effect-free error-free))
+  (let ((inc (or inc 1))
+        (n (or beg 0)))
+    (lambda (&rest _)
+      (when (or (not end) (< n end))
+        (prog1 n
+          (setq n (+ n inc)))))))
+
+(defvar -fixfn-max-iterations 1000
+  "The default maximum number of iterations performed by `-fixfn'
+  unless otherwise specified.")
+
+(defun -fixfn (fn &optional equal-test halt-test)
+  "Return a function that computes the (least) fixpoint of FN.
+
+FN must be a unary function. The returned lambda takes a single
+argument, X, the initial value for the fixpoint iteration. The
+iteration halts when either of the following conditions is satisfied:
+
+ 1. Iteration converges to the fixpoint, with equality being
+    tested using EQUAL-TEST. If EQUAL-TEST is not specified,
+    `equal' is used. For functions over the floating point
+    numbers, it may be necessary to provide an appropriate
+    approximate comparison test.
+
+ 2. HALT-TEST returns a non-nil value. HALT-TEST defaults to a
+    simple counter that returns t after `-fixfn-max-iterations',
+    to guard against infinite iteration. Otherwise, HALT-TEST
+    must be a function that accepts a single argument, the
+    current value of X, and returns non-nil as long as iteration
+    should continue. In this way, a more sophisticated
+    convergence test may be supplied by the caller.
+
+The return value of the lambda is either the fixpoint or, if
+iteration halted before converging, a cons with car `halted' and
+cdr the final output from HALT-TEST.
+
+In types: (a -> a) -> a -> a."
+  (declare (important-return-value t))
+  (let ((eqfn   (or equal-test 'equal))
+        (haltfn (or halt-test
+                    (-not
+                     (-counter 0 -fixfn-max-iterations)))))
+    (lambda (x)
+      (let ((re (funcall fn x))
+            (halt? (funcall haltfn x)))
+        (while (and (not halt?) (not (funcall eqfn x re)))
+          (setq x     re
+                re    (funcall fn re)
+                halt? (funcall haltfn re)))
+        (if halt? (cons 'halted halt?)
+          re)))))
+
+(defun -prodfn (&rest fns)
+  "Return a function that applies each of FNS to each of a list of arguments.
+
+Takes a list of N functions and returns a function that takes a
+list of length N, applying Ith function to Ith element of the
+input list.  Returns a list of length N.
+
+In types (for N=2): ((a -> b), (c -> d)) -> (a, c) -> (b, d)
+
+This function satisfies the following laws:
+
+    (-compose (-prodfn f g ...)
+              (-prodfn f\\=' g\\=' ...))
+  = (-prodfn (-compose f f\\=')
+             (-compose g g\\=')
+             ...)
+
+    (-prodfn f g ...)
+  = (-juxt (-compose f (-partial #\\='nth 0))
+           (-compose g (-partial #\\='nth 1))
+           ...)
+
+    (-compose (-prodfn f g ...)
+              (-juxt f\\=' g\\=' ...))
+  = (-juxt (-compose f f\\=')
+           (-compose g g\\=')
+           ...)
+
+    (-compose (-partial #\\='nth n)
+              (-prod f1 f2 ...))
+  = (-compose fn (-partial #\\='nth n))"
+  (declare (pure t) (side-effect-free t))
+  (lambda (x) (--zip-with (funcall it other) fns x)))
+
+;;; Font lock
+
+(defvar dash--keywords
+  `(;; TODO: Do not fontify the following automatic variables
+    ;; globally; detect and limit to their local anaphoric scope.
+    (,(rx symbol-start (| "acc" "it" "it-index" "other") symbol-end)
+     . 'font-lock-variable-name-face)
+    ;; Macros in dev/examples.el.  Based on `lisp-mode-symbol-regexp'.
+    (,(rx ?\( (group (| "defexamples" "def-example-group")) symbol-end
+          (+ (in "\t "))
+          (group (* (| (syntax word) (syntax symbol) (: ?\\ nonl)))))
+     (1 'font-lock-keyword-face)
+     (2 'font-lock-function-name-face))
+    ;; Symbols in dev/examples.el.
+    ,(rx symbol-start (| "=>" "~>" "!!>") symbol-end)
+    ;; Elisp macro fontification was static prior to Emacs 25.
+    ,@(when (< emacs-major-version 25)
+        (let ((macs '("!cdr"
+                      "!cons"
+                      "-->"
+                      "--all-p"
+                      "--all?"
+                      "--annotate"
+                      "--any"
+                      "--any-p"
+                      "--any?"
+                      "--count"
+                      "--dotimes"
+                      "--doto"
+                      "--drop-while"
+                      "--each"
+                      "--each-indexed"
+                      "--each-r"
+                      "--each-r-while"
+                      "--each-while"
+                      "--every"
+                      "--every-p"
+                      "--every?"
+                      "--filter"
+                      "--find"
+                      "--find-index"
+                      "--find-indices"
+                      "--find-last-index"
+                      "--first"
+                      "--fix"
+                      "--group-by"
+                      "--if-let"
+                      "--iterate"
+                      "--keep"
+                      "--last"
+                      "--map"
+                      "--map-first"
+                      "--map-indexed"
+                      "--map-last"
+                      "--map-when"
+                      "--mapcat"
+                      "--max-by"
+                      "--min-by"
+                      "--none-p"
+                      "--none?"
+                      "--only-some-p"
+                      "--only-some?"
+                      "--partition-after-pred"
+                      "--partition-by"
+                      "--partition-by-header"
+                      "--reduce"
+                      "--reduce-from"
+                      "--reduce-r"
+                      "--reduce-r-from"
+                      "--reductions"
+                      "--reductions-from"
+                      "--reductions-r"
+                      "--reductions-r-from"
+                      "--reject"
+                      "--reject-first"
+                      "--reject-last"
+                      "--remove"
+                      "--remove-first"
+                      "--remove-last"
+                      "--replace-where"
+                      "--select"
+                      "--separate"
+                      "--some"
+                      "--some-p"
+                      "--some?"
+                      "--sort"
+                      "--splice"
+                      "--splice-list"
+                      "--split-when"
+                      "--split-with"
+                      "--take-while"
+                      "--tree-map"
+                      "--tree-map-nodes"
+                      "--tree-mapreduce"
+                      "--tree-mapreduce-from"
+                      "--tree-reduce"
+                      "--tree-reduce-from"
+                      "--tree-seq"
+                      "--unfold"
+                      "--update-at"
+                      "--when-let"
+                      "--zip-with"
+                      "->"
+                      "->>"
+                      "-as->"
+                      "-cut"
+                      "-doto"
+                      "-if-let"
+                      "-if-let*"
+                      "-lambda"
+                      "-let"
+                      "-let*"
+                      "-setq"
+                      "-some-->"
+                      "-some->"
+                      "-some->>"
+                      "-split-on"
+                      "-when-let"
+                      "-when-let*")))
+          `((,(concat "(" (regexp-opt macs 'symbols)) . 1)))))
+  "Font lock keywords for `dash-fontify-mode'.")
+
+(defcustom dash-fontify-mode-lighter nil
+  "Mode line lighter for `dash-fontify-mode'.
+Either a string to display in the mode line when
+`dash-fontify-mode' is on, or nil to display
+nothing (the default)."
+  :package-version '(dash . "2.18.0")
+  :type '(choice (string :tag "Lighter" :value " Dash")
+                 (const :tag "Nothing" nil)))
+
+;;;###autoload
+(define-minor-mode dash-fontify-mode
+  "Toggle fontification of Dash special variables.
+
+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'."
+  :lighter dash-fontify-mode-lighter
+  (if dash-fontify-mode
+      (font-lock-add-keywords nil dash--keywords t)
+    (font-lock-remove-keywords nil dash--keywords))
+  (static-if (fboundp 'font-lock-flush)
+      ;; Added in Emacs 25.
+      (font-lock-flush)
+    (when font-lock-mode
+      ;; Unconditionally enables `font-lock-mode' and is marked
+      ;; `interactive-only' in later Emacs versions which have
+      ;; `font-lock-flush'.
+      (font-lock-fontify-buffer))))
+
+(defun dash--turn-on-fontify-mode ()
+  "Enable `dash-fontify-mode' if in an Emacs Lisp buffer."
+  (when (derived-mode-p #'emacs-lisp-mode)
+    (dash-fontify-mode)))
+
+;;;###autoload
+(define-globalized-minor-mode global-dash-fontify-mode
+  dash-fontify-mode dash--turn-on-fontify-mode)
+
+(defcustom dash-enable-fontlock nil
+  "If non-nil, fontify Dash macro calls and special variables."
+  :set (lambda (sym val)
+         (set-default sym val)
+         (global-dash-fontify-mode (if val 1 0)))
+  :type 'boolean)
+
+(make-obsolete-variable
+ 'dash-enable-fontlock #'global-dash-fontify-mode "2.18.0")
+
+(define-obsolete-function-alias
+  'dash-enable-font-lock #'global-dash-fontify-mode "2.18.0")
+
+;;; Info
+
+(defvar dash--info-doc-spec '("(dash) Index" nil "^ -+ .*: " "\\( \\|$\\)")
+  "The Dash :doc-spec entry for `info-lookup-alist'.
+It is based on that for `emacs-lisp-mode'.")
+
+(defun dash--info-elisp-docs ()
+  "Return the `emacs-lisp-mode' symbol docs from `info-lookup-alist'.
+Specifically, return the cons containing their
+`info-lookup->doc-spec' so that we can modify it."
+  (defvar info-lookup-alist)
+  (nthcdr 3 (assq #'emacs-lisp-mode (cdr (assq 'symbol info-lookup-alist)))))
+
+;;;###autoload
+(defun dash-register-info-lookup ()
+  "Register the Dash Info manual with `info-lookup-symbol'.
+This allows Dash symbols to be looked up with \\[info-lookup-symbol]."
+  (interactive)
+  (require 'info-look)
+  (let ((docs (dash--info-elisp-docs)))
+    (setcar docs (append (car docs) (list dash--info-doc-spec)))
+    (info-lookup-reset)))
+
+(defun dash-unload-function ()
+  "Remove Dash from `info-lookup-alist'.
+Used by `unload-feature', which see."
+  (let ((docs (and (featurep 'info-look)
+                   (dash--info-elisp-docs))))
+    (when (member dash--info-doc-spec (car docs))
+      (setcar docs (remove dash--info-doc-spec (car docs)))
+      (info-lookup-reset)))
+  nil)
+
+(provide 'dash)
+;;; dash.el ends here
diff --git a/emacs/.emacs.d/elpa/dash-20260221.1346/dash.elc b/emacs/.emacs.d/elpa/dash-20260221.1346/dash.elc
new file mode 100644
index 0000000..35d6795
Binary files /dev/null and b/emacs/.emacs.d/elpa/dash-20260221.1346/dash.elc differ
diff --git a/emacs/.emacs.d/elpa/dash-20260221.1346/dash.info b/emacs/.emacs.d/elpa/dash-20260221.1346/dash.info
new file mode 100644
index 0000000..ede38a9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/dash-20260221.1346/dash.info
@@ -0,0 +1,4954 @@
+This is dash.info, produced by makeinfo version 7.1.1 from dash.texi.
+
+This manual is for Dash version 2.20.0.
+
+   Copyright © 2012-2026 Free Software Foundation, Inc.
+
+     Permission is granted to copy, distribute and/or modify this
+     document under the terms of the GNU Free Documentation License,
+     Version 1.3 or any later version published by the Free Software
+     Foundation; with the Invariant Sections being "GNU General Public
+     License," and no Front-Cover Texts or Back-Cover Texts.  A copy of
+     the license is included in the section entitled "GNU Free
+     Documentation License".
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Dash: (dash.info).    A modern list library for GNU Emacs.
+END-INFO-DIR-ENTRY
+
+
+File: dash.info,  Node: Top,  Next: Installation,  Up: (dir)
+
+Dash
+****
+
+This manual is for Dash version 2.20.0.
+
+   Copyright © 2012-2026 Free Software Foundation, Inc.
+
+     Permission is granted to copy, distribute and/or modify this
+     document under the terms of the GNU Free Documentation License,
+     Version 1.3 or any later version published by the Free Software
+     Foundation; with the Invariant Sections being "GNU General Public
+     License," and no Front-Cover Texts or Back-Cover Texts.  A copy of
+     the license is included in the section entitled "GNU Free
+     Documentation License".
+
+* Menu:
+
+* Installation::        Installing and configuring Dash.
+* Functions::           Dash API reference.
+* Development::         Contributing to Dash development.
+
+Appendices
+
+* FDL::                 The license for this documentation.
+* GPL::                 Conditions for copying and changing Dash.
+* Index::               Index including functions and macros.
+
+ -- The Detailed Node Listing --
+
+Installation
+
+* Using in a package::  Listing Dash as a package dependency.
+* Fontification of special variables::  Font Lock of anaphoric macro variables.
+* Info symbol lookup::  Looking up Dash symbols in this manual.
+
+Functions
+
+* Maps::
+* Sublist selection::
+* List to list::
+* Reductions::
+* Unfolding::
+* Predicates::
+* Partitioning::
+* Indexing::
+* Set operations::
+* Other list operations::
+* Tree operations::
+* Threading macros::
+* Binding::
+* Side effects::
+* Destructive operations::
+* Function combinators::
+
+Development
+
+* Contribute::          How to contribute.
+* Contributors::        List of contributors.
+
+
+File: dash.info,  Node: Installation,  Next: Functions,  Prev: Top,  Up: Top
+
+1 Installation
+**************
+
+Dash is available on GNU ELPA (https://elpa.gnu.org/), GNU-devel ELPA
+(https://elpa.gnu.org/devel/), and MELPA (https://melpa.org/), and can
+be installed with the standard command ‘package-install’ (*note
+(emacs)Package Installation::).
+
+‘M-x package-install <RET> dash <RET>’
+     Install the Dash library.
+
+   Alternatively, you can just dump ‘dash.el’ in your ‘load-path’
+somewhere (*note (emacs)Lisp Libraries::).
+
+* Menu:
+
+* Using in a package::  Listing Dash as a package dependency.
+* Fontification of special variables::  Font Lock of anaphoric macro variables.
+* Info symbol lookup::  Looking up Dash symbols in this manual.
+
+
+File: dash.info,  Node: Using in a package,  Next: Fontification of special variables,  Up: Installation
+
+1.1 Using in a package
+======================
+
+If you use Dash in your own package, be sure to list it as a dependency
+in the library's headers as follows (*note (elisp)Library Headers::).
+
+     ;; Package-Requires: ((dash "2.20.0"))
+
+
+File: dash.info,  Node: Fontification of special variables,  Next: Info symbol lookup,  Prev: Using in a package,  Up: Installation
+
+1.2 Fontification of special variables
+======================================
+
+The autoloaded minor mode ‘dash-fontify-mode’ is provided for optional
+fontification of anaphoric Dash variables (‘it’, ‘acc’, etc.) in Emacs
+Lisp buffers using search-based Font Lock (*note (emacs)Font Lock::).
+In older Emacs versions which do not dynamically detect macros, the
+minor mode also fontifies calls to Dash macros.
+
+   To automatically enable the minor mode in all Emacs Lisp buffers,
+just call its autoloaded global counterpart ‘global-dash-fontify-mode’,
+either interactively or from your ‘user-init-file’:
+
+     (global-dash-fontify-mode)
+
+
+File: dash.info,  Node: Info symbol lookup,  Prev: Fontification of special variables,  Up: Installation
+
+1.3 Info symbol lookup
+======================
+
+While editing Elisp files, you can use ‘C-h S’ (‘info-lookup-symbol’) to
+look up Elisp symbols in the relevant Info manuals (*note (emacs)Info
+Lookup::).  To enable the same for Dash symbols, use the command
+‘dash-register-info-lookup’.  It can be called directly when needed, or
+automatically from your ‘user-init-file’.  For example:
+
+     (with-eval-after-load 'info-look
+       (dash-register-info-lookup))
+
+
+File: dash.info,  Node: Functions,  Next: Development,  Prev: Installation,  Up: Top
+
+2 Functions
+***********
+
+This chapter contains reference documentation for the Dash API
+(Application Programming Interface).  The names of all public functions
+defined in the library are prefixed with a dash character (‘-’).
+
+   The library also provides anaphoric macro versions of functions where
+that makes sense.  The names of these macros are prefixed with two
+dashes (‘--’) instead of one.
+
+   For instance, while the function ‘-map’ applies a function to each
+element of a list, its anaphoric counterpart ‘--map’ evaluates a form
+with the local variable ‘it’ temporarily bound to the current list
+element instead.
+
+     ;; Normal version.
+     (-map (lambda (n) (* n n)) '(1 2 3 4))
+         ⇒ (1 4 9 16)
+
+     ;; Anaphoric version.
+     (--map (* it it) '(1 2 3 4))
+         ⇒ (1 4 9 16)
+
+   The normal version can, of course, also be written as in the
+following example, which demonstrates the utility of both versions.
+
+     (defun my-square (n)
+       "Return N multiplied by itself."
+       (* n n))
+
+     (-map #'my-square '(1 2 3 4))
+         ⇒ (1 4 9 16)
+
+* Menu:
+
+* Maps::
+* Sublist selection::
+* List to list::
+* Reductions::
+* Unfolding::
+* Predicates::
+* Partitioning::
+* Indexing::
+* Set operations::
+* Other list operations::
+* Tree operations::
+* Threading macros::
+* Binding::
+* Side effects::
+* Destructive operations::
+* Function combinators::
+
+
+File: dash.info,  Node: Maps,  Next: Sublist selection,  Up: Functions
+
+2.1 Maps
+========
+
+Functions in this category take a transforming function, which is then
+applied sequentially to each or selected elements of the input list.
+The results are collected in order and returned as a new list.
+
+ -- Function: -map (fn list)
+     Apply FN to each item in LIST and return the list of results.
+
+     This function's anaphoric counterpart is ‘--map’.
+
+          (-map (lambda (num) (* num num)) '(1 2 3 4))
+              ⇒ (1 4 9 16)
+          (-map #'1+ '(1 2 3 4))
+              ⇒ (2 3 4 5)
+          (--map (* it it) '(1 2 3 4))
+              ⇒ (1 4 9 16)
+
+ -- Function: -map-when (pred rep list)
+     Use PRED to conditionally apply REP to each item in LIST.  Return a
+     copy of LIST where the items for which PRED returns ‘nil’ are
+     unchanged, and the rest are mapped through the REP function.
+
+     Alias: ‘-replace-where’
+
+     See also: ‘-update-at’ (*note -update-at::)
+
+          (-map-when 'even? 'square '(1 2 3 4))
+              ⇒ (1 4 3 16)
+          (--map-when (> it 2) (* it it) '(1 2 3 4))
+              ⇒ (1 2 9 16)
+          (--map-when (= it 2) 17 '(1 2 3 4))
+              ⇒ (1 17 3 4)
+
+ -- Function: -map-first (pred rep list)
+     Use PRED to determine the first item in LIST to call REP on.
+     Return a copy of LIST where the first item for which PRED returns
+     non-‘nil’ is replaced with the result of calling REP on that item.
+
+     See also: ‘-map-when’ (*note -map-when::), ‘-replace-first’ (*note
+     -replace-first::)
+
+          (-map-first 'even? 'square '(1 2 3 4))
+              ⇒ (1 4 3 4)
+          (--map-first (> it 2) (* it it) '(1 2 3 4))
+              ⇒ (1 2 9 4)
+          (--map-first (= it 2) 17 '(1 2 3 2))
+              ⇒ (1 17 3 2)
+
+ -- Function: -map-last (pred rep list)
+     Use PRED to determine the last item in LIST to call REP on.  Return
+     a copy of LIST where the last item for which PRED returns non-‘nil’
+     is replaced with the result of calling REP on that item.
+
+     See also: ‘-map-when’ (*note -map-when::), ‘-replace-last’ (*note
+     -replace-last::)
+
+          (-map-last 'even? 'square '(1 2 3 4))
+              ⇒ (1 2 3 16)
+          (--map-last (> it 2) (* it it) '(1 2 3 4))
+              ⇒ (1 2 3 16)
+          (--map-last (= it 2) 17 '(1 2 3 2))
+              ⇒ (1 2 3 17)
+
+ -- Function: -map-indexed (fn list)
+     Apply FN to each index and item in LIST and return the list of
+     results.  This is like ‘-map’ (*note -map::), but FN takes two
+     arguments: the index of the current element within LIST, and the
+     element itself.
+
+     This function's anaphoric counterpart is ‘--map-indexed’.
+
+     For a side-effecting variant, see also ‘-each-indexed’ (*note
+     -each-indexed::).
+
+          (-map-indexed (lambda (index item) (- item index)) '(1 2 3 4))
+              ⇒ (1 1 1 1)
+          (--map-indexed (- it it-index) '(1 2 3 4))
+              ⇒ (1 1 1 1)
+          (-map-indexed #'* '(1 2 3 4))
+              ⇒ (0 2 6 12)
+
+ -- Function: -annotate (fn list)
+     Pair each item in LIST with the result of passing it to FN.
+
+     Return an alist of (RESULT .  ITEM), where each ITEM is the
+     corresponding element of LIST, and RESULT is the value obtained by
+     calling FN on ITEM.
+
+     This function's anaphoric counterpart is ‘--annotate’.
+
+          (-annotate #'1+ '(1 2 3))
+              ⇒ ((2 . 1) (3 . 2) (4 . 3))
+          (-annotate #'length '((f o o) (bar baz)))
+              ⇒ ((3 f o o) (2 bar baz))
+          (--annotate (> it 1) '(0 1 2 3))
+              ⇒ ((nil . 0) (nil . 1) (t . 2) (t . 3))
+
+ -- Function: -splice (pred fun list)
+     Splice lists generated by FUN in place of items satisfying PRED in
+     LIST.
+
+     Call PRED on each element of LIST.  Whenever the result of PRED is
+     ‘nil’, leave that ‘it’ as-is.  Otherwise, call FUN on the same ‘it’
+     that satisfied PRED.  The result should be a (possibly empty) list
+     of items to splice in place of ‘it’ in LIST.
+
+     This can be useful as an alternative to the ‘,@’ construct in a ‘`’
+     structure, in case you need to splice several lists at marked
+     positions (for example with keywords).
+
+     This function's anaphoric counterpart is ‘--splice’.
+
+     See also: ‘-splice-list’ (*note -splice-list::), ‘-insert-at’
+     (*note -insert-at::).
+
+          (-splice #'numberp (lambda (n) (list n n)) '(a 1 b 2))
+              ⇒ (a 1 1 b 2 2)
+          (--splice t (list it it) '(1 2 3 4))
+              ⇒ (1 1 2 2 3 3 4 4)
+          (--splice (eq it :magic) '((magical) (code)) '((foo) :magic (bar)))
+              ⇒ ((foo) (magical) (code) (bar))
+
+ -- Function: -splice-list (pred new-list list)
+     Splice NEW-LIST in place of elements matching PRED in LIST.
+
+     See also: ‘-splice’ (*note -splice::), ‘-insert-at’ (*note
+     -insert-at::)
+
+          (-splice-list 'keywordp '(a b c) '(1 :foo 2))
+              ⇒ (1 a b c 2)
+          (-splice-list 'keywordp nil '(1 :foo 2))
+              ⇒ (1 2)
+          (--splice-list (keywordp it) '(a b c) '(1 :foo 2))
+              ⇒ (1 a b c 2)
+
+ -- Function: -mapcat (fn list)
+     Return the concatenation of the result of mapping FN over LIST.
+     Thus function FN should return a list.
+
+          (-mapcat 'list '(1 2 3))
+              ⇒ (1 2 3)
+          (-mapcat (lambda (item) (list 0 item)) '(1 2 3))
+              ⇒ (0 1 0 2 0 3)
+          (--mapcat (list 0 it) '(1 2 3))
+              ⇒ (0 1 0 2 0 3)
+
+ -- Function: -copy (list)
+     Create a shallow copy of LIST.  The elements of LIST are not
+     copied; they are shared with the original.
+
+          (-copy '(1 2 3))
+              ⇒ (1 2 3)
+          (let ((a '(1 2 3))) (eq a (-copy a)))
+              ⇒ nil
+
+
+File: dash.info,  Node: Sublist selection,  Next: List to list,  Prev: Maps,  Up: Functions
+
+2.2 Sublist selection
+=====================
+
+Functions returning a sublist of the original list.
+
+ -- Function: -filter (pred list)
+     Return a new list of the items in LIST for which PRED returns
+     non-‘nil’.
+
+     Alias: ‘-select’.
+
+     This function's anaphoric counterpart is ‘--filter’.
+
+     For similar operations, see also ‘-keep’ (*note -keep::) and
+     ‘-remove’ (*note -remove::).
+
+          (-filter (lambda (num) (= 0 (% num 2))) '(1 2 3 4))
+              ⇒ (2 4)
+          (-filter #'natnump '(-2 -1 0 1 2))
+              ⇒ (0 1 2)
+          (--filter (= 0 (% it 2)) '(1 2 3 4))
+              ⇒ (2 4)
+
+ -- Function: -remove (pred list)
+     Return a new list of the items in LIST for which PRED returns
+     ‘nil’.
+
+     Alias: ‘-reject’.
+
+     This function's anaphoric counterpart is ‘--remove’.
+
+     For similar operations, see also ‘-keep’ (*note -keep::) and
+     ‘-filter’ (*note -filter::).
+
+          (-remove (lambda (num) (= 0 (% num 2))) '(1 2 3 4))
+              ⇒ (1 3)
+          (-remove #'natnump '(-2 -1 0 1 2))
+              ⇒ (-2 -1)
+          (--remove (= 0 (% it 2)) '(1 2 3 4))
+              ⇒ (1 3)
+
+ -- Function: -remove-first (pred list)
+     Remove the first item from LIST for which PRED returns non-‘nil’.
+     This is a non-destructive operation, but only the front of LIST
+     leading up to the removed item is a copy; the rest is LIST's
+     original tail.  If no item is removed, then the result is a
+     complete copy.
+
+     Alias: ‘-reject-first’.
+
+     This function's anaphoric counterpart is ‘--remove-first’.
+
+     See also ‘-map-first’ (*note -map-first::), ‘-remove-item’ (*note
+     -remove-item::), and ‘-remove-last’ (*note -remove-last::).
+
+          (-remove-first #'natnump '(-2 -1 0 1 2))
+              ⇒ (-2 -1 1 2)
+          (-remove-first #'stringp '(1 2 "first" "second"))
+              ⇒ (1 2 "second")
+          (--remove-first (> it 3) '(1 2 3 4 5 6))
+              ⇒ (1 2 3 5 6)
+
+ -- Function: -remove-last (pred list)
+     Remove the last item from LIST for which PRED returns non-‘nil’.
+     The result is a copy of LIST regardless of whether an element is
+     removed.
+
+     Alias: ‘-reject-last’.
+
+     This function's anaphoric counterpart is ‘--remove-last’.
+
+     See also ‘-map-last’ (*note -map-last::), ‘-remove-item’ (*note
+     -remove-item::), and ‘-remove-first’ (*note -remove-first::).
+
+          (-remove-last #'natnump '(1 3 5 4 7 8 10 -11))
+              ⇒ (1 3 5 4 7 8 -11)
+          (-remove-last #'stringp '(1 2 "last" "second"))
+              ⇒ (1 2 "last")
+          (--remove-last (> it 3) '(1 2 3 4 5 6 7 8 9 10))
+              ⇒ (1 2 3 4 5 6 7 8 9)
+
+ -- Function: -remove-item (item list)
+     Return a copy of LIST with all occurrences of ITEM removed.  The
+     comparison is done with ‘equal’.
+
+          (-remove-item 3 '(1 2 3 2 3 4 5 3))
+              ⇒ (1 2 2 4 5)
+          (-remove-item 'foo '(foo bar baz foo))
+              ⇒ (bar baz)
+          (-remove-item "bob" '("alice" "bob" "eve" "bob"))
+              ⇒ ("alice" "eve")
+
+ -- Function: -non-nil (list)
+     Return a copy of LIST with all ‘nil’ items removed.
+
+          (-non-nil '(nil 1 nil 2 nil nil 3 4 nil 5 nil))
+              ⇒ (1 2 3 4 5)
+          (-non-nil '((nil)))
+              ⇒ ((nil))
+          (-non-nil ())
+              ⇒ ()
+
+ -- Function: -slice (list from &optional to step)
+     Return copy of LIST, starting from index FROM to index TO.
+
+     FROM or TO may be negative.  These values are then interpreted
+     modulo the length of the list.
+
+     If STEP is a number, only each STEPth item in the resulting section
+     is returned.  Defaults to 1.
+
+          (-slice '(1 2 3 4 5) 1)
+              ⇒ (2 3 4 5)
+          (-slice '(1 2 3 4 5) 0 3)
+              ⇒ (1 2 3)
+          (-slice '(1 2 3 4 5 6 7 8 9) 1 -1 2)
+              ⇒ (2 4 6 8)
+
+ -- Function: -take (n list)
+     Return a copy of the first N items in LIST.  Return a copy of LIST
+     if it contains N items or fewer.  Return ‘nil’ if N is zero or
+     less.
+
+     See also: ‘-take-last’ (*note -take-last::).
+
+          (-take 3 '(1 2 3 4 5))
+              ⇒ (1 2 3)
+          (-take 17 '(1 2 3 4 5))
+              ⇒ (1 2 3 4 5)
+          (-take 0 '(1 2 3 4 5))
+              ⇒ ()
+
+ -- Function: -take-last (n list)
+     Return a copy of the last N items of LIST in order.  Return a copy
+     of LIST if it contains N items or fewer.  Return ‘nil’ if N is zero
+     or less.
+
+     See also: ‘-take’ (*note -take::).
+
+          (-take-last 3 '(1 2 3 4 5))
+              ⇒ (3 4 5)
+          (-take-last 17 '(1 2 3 4 5))
+              ⇒ (1 2 3 4 5)
+          (-take-last 1 '(1 2 3 4 5))
+              ⇒ (5)
+
+ -- Function: -drop (n list)
+     Return the tail (not a copy) of LIST without the first N items.
+     Return ‘nil’ if LIST contains N items or fewer.  Return LIST if N
+     is zero or less.
+
+     For another variant, see also ‘-drop-last’ (*note -drop-last::).
+
+          (-drop 3 '(1 2 3 4 5))
+              ⇒ (4 5)
+          (-drop 17 '(1 2 3 4 5))
+              ⇒ ()
+          (-drop 0 '(1 2 3 4 5))
+              ⇒ (1 2 3 4 5)
+
+ -- Function: -drop-last (n list)
+     Return a copy of LIST without its last N items.  Return a copy of
+     LIST if N is zero or less.  Return ‘nil’ if LIST contains N items
+     or fewer.
+
+     See also: ‘-drop’ (*note -drop::).
+
+          (-drop-last 3 '(1 2 3 4 5))
+              ⇒ (1 2)
+          (-drop-last 17 '(1 2 3 4 5))
+              ⇒ ()
+          (-drop-last 0 '(1 2 3 4 5))
+              ⇒ (1 2 3 4 5)
+
+ -- Function: -take-while (pred list)
+     Take successive items from LIST for which PRED returns non-‘nil’.
+     PRED is a function of one argument.  Return a new list of the
+     successive elements from the start of LIST for which PRED returns
+     non-‘nil’.
+
+     This function's anaphoric counterpart is ‘--take-while’.
+
+     For another variant, see also ‘-drop-while’ (*note -drop-while::).
+
+          (-take-while #'even? '(1 2 3 4))
+              ⇒ ()
+          (-take-while #'even? '(2 4 5 6))
+              ⇒ (2 4)
+          (--take-while (< it 4) '(1 2 3 4 3 2 1))
+              ⇒ (1 2 3)
+
+ -- Function: -drop-while (pred list)
+     Drop successive items from LIST for which PRED returns non-‘nil’.
+     PRED is a function of one argument.  Return the tail (not a copy)
+     of LIST starting from its first element for which PRED returns
+     ‘nil’.
+
+     This function's anaphoric counterpart is ‘--drop-while’.
+
+     For another variant, see also ‘-take-while’ (*note -take-while::).
+
+          (-drop-while #'even? '(1 2 3 4))
+              ⇒ (1 2 3 4)
+          (-drop-while #'even? '(2 4 5 6))
+              ⇒ (5 6)
+          (--drop-while (< it 4) '(1 2 3 4 3 2 1))
+              ⇒ (4 3 2 1)
+
+ -- Function: -select-by-indices (indices list)
+     Return a list whose elements are elements from LIST selected as
+     '(nth i list)' for all i from INDICES.
+
+          (-select-by-indices '(4 10 2 3 6) '("v" "e" "l" "o" "c" "i" "r" "a" "p" "t" "o" "r"))
+              ⇒ ("c" "o" "l" "o" "r")
+          (-select-by-indices '(2 1 0) '("a" "b" "c"))
+              ⇒ ("c" "b" "a")
+          (-select-by-indices '(0 1 2 0 1 3 3 1) '("f" "a" "r" "l"))
+              ⇒ ("f" "a" "r" "f" "a" "l" "l" "a")
+
+ -- Function: -select-columns (columns table)
+     Select COLUMNS from TABLE.
+
+     TABLE is a list of lists where each element represents one row.  It
+     is assumed each row has the same length.
+
+     Each row is transformed such that only the specified COLUMNS are
+     selected.
+
+     See also: ‘-select-column’ (*note -select-column::),
+     ‘-select-by-indices’ (*note -select-by-indices::)
+
+          (-select-columns '(0 2) '((1 2 3) (a b c) (:a :b :c)))
+              ⇒ ((1 3) (a c) (:a :c))
+          (-select-columns '(1) '((1 2 3) (a b c) (:a :b :c)))
+              ⇒ ((2) (b) (:b))
+          (-select-columns nil '((1 2 3) (a b c) (:a :b :c)))
+              ⇒ (nil nil nil)
+
+ -- Function: -select-column (column table)
+     Select COLUMN from TABLE.
+
+     TABLE is a list of lists where each element represents one row.  It
+     is assumed each row has the same length.
+
+     The single selected column is returned as a list.
+
+     See also: ‘-select-columns’ (*note -select-columns::),
+     ‘-select-by-indices’ (*note -select-by-indices::)
+
+          (-select-column 1 '((1 2 3) (a b c) (:a :b :c)))
+              ⇒ (2 b :b)
+
+
+File: dash.info,  Node: List to list,  Next: Reductions,  Prev: Sublist selection,  Up: Functions
+
+2.3 List to list
+================
+
+Functions returning a modified copy of the input list.
+
+ -- Function: -keep (fn list)
+     Return a new list of the non-‘nil’ results of applying FN to each
+     item in LIST.  Like ‘-filter’ (*note -filter::), but returns the
+     non-‘nil’ results of FN instead of the corresponding elements of
+     LIST.
+
+     Its anaphoric counterpart is ‘--keep’.
+
+          (-keep #'cdr '((1 2 3) (4 5) (6)))
+              ⇒ ((2 3) (5))
+          (-keep (lambda (n) (and (> n 3) (* 10 n))) '(1 2 3 4 5 6))
+              ⇒ (40 50 60)
+          (--keep (and (> it 3) (* 10 it)) '(1 2 3 4 5 6))
+              ⇒ (40 50 60)
+
+ -- Function: -concat (&rest sequences)
+     Concatenate all SEQUENCES and make the result a list.  The result
+     is a list whose elements are the elements of all the arguments.
+     Each argument may be a list, vector or string.
+
+     All arguments except the last argument are copied.  The last
+     argument is just used as the tail of the new list.  If the last
+     argument is not a list, this results in a dotted list.
+
+     As an exception, if all the arguments except the last are ‘nil’,
+     and the last argument is not a list, the return value is that last
+     argument unaltered, not a list.
+
+          (-concat '(1))
+              ⇒ (1)
+          (-concat '(1) '(2))
+              ⇒ (1 2)
+          (-concat '(1) '(2 3) '(4))
+              ⇒ (1 2 3 4)
+
+ -- Function: -flatten (l)
+     Take a nested list L and return its contents as a single, flat
+     list.
+
+     Note that because ‘nil’ represents a list of zero elements (an
+     empty list), any mention of ‘nil’ in L will disappear after
+     flattening.  If you need to preserve nils, consider ‘-flatten-n’
+     (*note -flatten-n::) or map them to some unique symbol and then map
+     them back.
+
+     Conses of two atoms are considered "terminals", that is, they
+     aren't flattened further.
+
+     See also: ‘-flatten-n’ (*note -flatten-n::)
+
+          (-flatten '((1)))
+              ⇒ (1)
+          (-flatten '((1 (2 3) (((4 (5)))))))
+              ⇒ (1 2 3 4 5)
+          (-flatten '(1 2 (3 . 4)))
+              ⇒ (1 2 (3 . 4))
+
+ -- Function: -flatten-n (num list)
+     Flatten NUM levels of a nested LIST.
+
+     See also: ‘-flatten’ (*note -flatten::)
+
+          (-flatten-n 1 '((1 2) ((3 4) ((5 6)))))
+              ⇒ (1 2 (3 4) ((5 6)))
+          (-flatten-n 2 '((1 2) ((3 4) ((5 6)))))
+              ⇒ (1 2 3 4 (5 6))
+          (-flatten-n 3 '((1 2) ((3 4) ((5 6)))))
+              ⇒ (1 2 3 4 5 6)
+
+ -- Function: -replace (old new list)
+     Replace all OLD items in LIST with NEW.
+
+     Elements are compared using ‘equal’.
+
+     See also: ‘-replace-at’ (*note -replace-at::)
+
+          (-replace 1 "1" '(1 2 3 4 3 2 1))
+              ⇒ ("1" 2 3 4 3 2 "1")
+          (-replace "foo" "bar" '("a" "nice" "foo" "sentence" "about" "foo"))
+              ⇒ ("a" "nice" "bar" "sentence" "about" "bar")
+          (-replace 1 2 nil)
+              ⇒ nil
+
+ -- Function: -replace-first (old new list)
+     Replace the first occurrence of OLD with NEW in LIST.
+
+     Elements are compared using ‘equal’.
+
+     See also: ‘-map-first’ (*note -map-first::)
+
+          (-replace-first 1 "1" '(1 2 3 4 3 2 1))
+              ⇒ ("1" 2 3 4 3 2 1)
+          (-replace-first "foo" "bar" '("a" "nice" "foo" "sentence" "about" "foo"))
+              ⇒ ("a" "nice" "bar" "sentence" "about" "foo")
+          (-replace-first 1 2 nil)
+              ⇒ nil
+
+ -- Function: -replace-last (old new list)
+     Replace the last occurrence of OLD with NEW in LIST.
+
+     Elements are compared using ‘equal’.
+
+     See also: ‘-map-last’ (*note -map-last::)
+
+          (-replace-last 1 "1" '(1 2 3 4 3 2 1))
+              ⇒ (1 2 3 4 3 2 "1")
+          (-replace-last "foo" "bar" '("a" "nice" "foo" "sentence" "about" "foo"))
+              ⇒ ("a" "nice" "foo" "sentence" "about" "bar")
+          (-replace-last 1 2 nil)
+              ⇒ nil
+
+ -- Function: -insert-at (n x list)
+     Return a list with X inserted into LIST at position N.
+
+     See also: ‘-splice’ (*note -splice::), ‘-splice-list’ (*note
+     -splice-list::)
+
+          (-insert-at 1 'x '(a b c))
+              ⇒ (a x b c)
+          (-insert-at 12 'x '(a b c))
+              ⇒ (a b c x)
+
+ -- Function: -replace-at (n x list)
+     Return a list with element at Nth position in LIST replaced with X.
+
+     See also: ‘-replace’ (*note -replace::)
+
+          (-replace-at 0 9 '(0 1 2 3 4 5))
+              ⇒ (9 1 2 3 4 5)
+          (-replace-at 1 9 '(0 1 2 3 4 5))
+              ⇒ (0 9 2 3 4 5)
+          (-replace-at 4 9 '(0 1 2 3 4 5))
+              ⇒ (0 1 2 3 9 5)
+
+ -- Function: -update-at (n func list)
+     Use FUNC to update the Nth element of LIST.  Return a copy of LIST
+     where the Nth element is replaced with the result of calling FUNC
+     on it.
+
+     See also: ‘-map-when’ (*note -map-when::)
+
+          (-update-at 0 (lambda (x) (+ x 9)) '(0 1 2 3 4 5))
+              ⇒ (9 1 2 3 4 5)
+          (-update-at 1 (lambda (x) (+ x 8)) '(0 1 2 3 4 5))
+              ⇒ (0 9 2 3 4 5)
+          (--update-at 2 (length it) '("foo" "bar" "baz" "quux"))
+              ⇒ ("foo" "bar" 3 "quux")
+
+ -- Function: -remove-at (n list)
+     Return LIST with its element at index N removed.  That is, remove
+     any element selected as (nth N LIST) from LIST and return the
+     result.
+
+     This is a non-destructive operation: parts of LIST (but not
+     necessarily all of it) are copied as needed to avoid destructively
+     modifying it.
+
+     See also: ‘-remove-at-indices’ (*note -remove-at-indices::),
+     ‘-remove’ (*note -remove::).
+
+          (-remove-at 0 '(a b c))
+              ⇒ (b c)
+          (-remove-at 1 '(a b c))
+              ⇒ (a c)
+          (-remove-at 2 '(a b c))
+              ⇒ (a b)
+
+ -- Function: -remove-at-indices (indices list)
+     Return LIST with its elements at INDICES removed.  That is, for
+     each index I in INDICES, remove any element selected as (nth I
+     LIST) from LIST.
+
+     This is a non-destructive operation: parts of LIST (but not
+     necessarily all of it) are copied as needed to avoid destructively
+     modifying it.
+
+     See also: ‘-remove-at’ (*note -remove-at::), ‘-remove’ (*note
+     -remove::).
+
+          (-remove-at-indices '(0) '(a b c d e))
+              ⇒ (b c d e)
+          (-remove-at-indices '(1 3) '(a b c d e))
+              ⇒ (a c e)
+          (-remove-at-indices '(4 0 2) '(a b c d e))
+              ⇒ (b d)
+
+
+File: dash.info,  Node: Reductions,  Next: Unfolding,  Prev: List to list,  Up: Functions
+
+2.4 Reductions
+==============
+
+Functions reducing lists to a single value (which may also be a list).
+
+ -- Function: -reduce-from (fn init list)
+     Reduce the function FN across LIST, starting with INIT.  Return the
+     result of applying FN to INIT and the first element of LIST, then
+     applying FN to that result and the second element, etc.  If LIST is
+     empty, return INIT without calling FN.
+
+     This function's anaphoric counterpart is ‘--reduce-from’.
+
+     For other folds, see also ‘-reduce’ (*note -reduce::) and
+     ‘-reduce-r’ (*note -reduce-r::).
+
+          (-reduce-from #'- 10 '(1 2 3))
+              ⇒ 4
+          (-reduce-from #'list 10 '(1 2 3))
+              ⇒ (((10 1) 2) 3)
+          (--reduce-from (concat acc " " it) "START" '("a" "b" "c"))
+              ⇒ "START a b c"
+
+ -- Function: -reduce-r-from (fn init list)
+     Reduce the function FN across LIST in reverse, starting with INIT.
+     Return the result of applying FN to the last element of LIST and
+     INIT, then applying FN to the second-to-last element and the
+     previous result of FN, etc.  That is, the first argument of FN is
+     the current element, and its second argument the accumulated value.
+     If LIST is empty, return INIT without calling FN.
+
+     This function is like ‘-reduce-from’ (*note -reduce-from::) but the
+     operation associates from the right rather than left.  In other
+     words, it starts from the end of LIST and flips the arguments to
+     FN.  Conceptually, it is like replacing the conses in LIST with
+     applications of FN, and its last link with INIT, and evaluating the
+     resulting expression.
+
+     This function's anaphoric counterpart is ‘--reduce-r-from’.
+
+     For other folds, see also ‘-reduce-r’ (*note -reduce-r::) and
+     ‘-reduce’ (*note -reduce::).
+
+          (-reduce-r-from #'- 10 '(1 2 3))
+              ⇒ -8
+          (-reduce-r-from #'list 10 '(1 2 3))
+              ⇒ (1 (2 (3 10)))
+          (--reduce-r-from (concat it " " acc) "END" '("a" "b" "c"))
+              ⇒ "a b c END"
+
+ -- Function: -reduce (fn list)
+     Reduce the function FN across LIST.  Return the result of applying
+     FN to the first two elements of LIST, then applying FN to that
+     result and the third element, etc.  If LIST contains a single
+     element, return it without calling FN.  If LIST is empty, return
+     the result of calling FN with no arguments.
+
+     This function's anaphoric counterpart is ‘--reduce’.
+
+     For other folds, see also ‘-reduce-from’ (*note -reduce-from::) and
+     ‘-reduce-r’ (*note -reduce-r::).
+
+          (-reduce #'- '(1 2 3 4))
+              ⇒ -8
+          (-reduce #'list '(1 2 3 4))
+              ⇒ (((1 2) 3) 4)
+          (--reduce (format "%s-%d" acc it) '(1 2 3))
+              ⇒ "1-2-3"
+
+ -- Function: -reduce-r (fn list)
+     Reduce the function FN across LIST in reverse.  Return the result
+     of applying FN to the last two elements of LIST, then applying FN
+     to the third-to-last element and the previous result of FN, etc.
+     That is, the first argument of FN is the current element, and its
+     second argument the accumulated value.  If LIST contains a single
+     element, return it without calling FN.  If LIST is empty, return
+     the result of calling FN with no arguments.
+
+     This function is like ‘-reduce’ (*note -reduce::) but the operation
+     associates from the right rather than left.  In other words, it
+     starts from the end of LIST and flips the arguments to FN.
+     Conceptually, it is like replacing the conses in LIST with
+     applications of FN, ignoring its last link, and evaluating the
+     resulting expression.
+
+     This function's anaphoric counterpart is ‘--reduce-r’.
+
+     For other folds, see also ‘-reduce-r-from’ (*note -reduce-r-from::)
+     and ‘-reduce’ (*note -reduce::).
+
+          (-reduce-r #'- '(1 2 3 4))
+              ⇒ -2
+          (-reduce-r #'list '(1 2 3 4))
+              ⇒ (1 (2 (3 4)))
+          (--reduce-r (format "%s-%d" acc it) '(1 2 3))
+              ⇒ "3-2-1"
+
+ -- Function: -reductions-from (fn init list)
+     Return a list of FN's intermediate reductions across LIST.  That
+     is, a list of the intermediate values of the accumulator when
+     ‘-reduce-from’ (*note -reduce-from::) (which see) is called with
+     the same arguments.
+
+     This function's anaphoric counterpart is ‘--reductions-from’.
+
+     For other folds, see also ‘-reductions’ (*note -reductions::) and
+     ‘-reductions-r’ (*note -reductions-r::).
+
+          (-reductions-from #'max 0 '(2 1 4 3))
+              ⇒ (0 2 2 4 4)
+          (-reductions-from #'* 1 '(1 2 3 4))
+              ⇒ (1 1 2 6 24)
+          (--reductions-from (format "(FN %s %d)" acc it) "INIT" '(1 2 3))
+              ⇒ ("INIT" "(FN INIT 1)" "(FN (FN INIT 1) 2)" "(FN (FN (FN INIT 1) 2) 3)")
+
+ -- Function: -reductions-r-from (fn init list)
+     Return a list of FN's intermediate reductions across reversed LIST.
+     That is, a list of the intermediate values of the accumulator when
+     ‘-reduce-r-from’ (*note -reduce-r-from::) (which see) is called
+     with the same arguments.
+
+     This function's anaphoric counterpart is ‘--reductions-r-from’.
+
+     For other folds, see also ‘-reductions’ (*note -reductions::) and
+     ‘-reductions-r’ (*note -reductions-r::).
+
+          (-reductions-r-from #'max 0 '(2 1 4 3))
+              ⇒ (4 4 4 3 0)
+          (-reductions-r-from #'* 1 '(1 2 3 4))
+              ⇒ (24 24 12 4 1)
+          (--reductions-r-from (format "(FN %d %s)" it acc) "INIT" '(1 2 3))
+              ⇒ ("(FN 1 (FN 2 (FN 3 INIT)))" "(FN 2 (FN 3 INIT))" "(FN 3 INIT)" "INIT")
+
+ -- Function: -reductions (fn list)
+     Return a list of FN's intermediate reductions across LIST.  That
+     is, a list of the intermediate values of the accumulator when
+     ‘-reduce’ (*note -reduce::) (which see) is called with the same
+     arguments.
+
+     This function's anaphoric counterpart is ‘--reductions’.
+
+     For other folds, see also ‘-reductions’ (*note -reductions::) and
+     ‘-reductions-r’ (*note -reductions-r::).
+
+          (-reductions #'+ '(1 2 3 4))
+              ⇒ (1 3 6 10)
+          (-reductions #'* '(1 2 3 4))
+              ⇒ (1 2 6 24)
+          (--reductions (format "(FN %s %d)" acc it) '(1 2 3))
+              ⇒ (1 "(FN 1 2)" "(FN (FN 1 2) 3)")
+
+ -- Function: -reductions-r (fn list)
+     Return a list of FN's intermediate reductions across reversed LIST.
+     That is, a list of the intermediate values of the accumulator when
+     ‘-reduce-r’ (*note -reduce-r::) (which see) is called with the same
+     arguments.
+
+     This function's anaphoric counterpart is ‘--reductions-r’.
+
+     For other folds, see also ‘-reductions-r-from’ (*note
+     -reductions-r-from::) and ‘-reductions’ (*note -reductions::).
+
+          (-reductions-r #'+ '(1 2 3 4))
+              ⇒ (10 9 7 4)
+          (-reductions-r #'* '(1 2 3 4))
+              ⇒ (24 24 12 4)
+          (--reductions-r (format "(FN %d %s)" it acc) '(1 2 3))
+              ⇒ ("(FN 1 (FN 2 3))" "(FN 2 3)" 3)
+
+ -- Function: -count (pred list)
+     Counts the number of items in LIST where (PRED item) is non-‘nil’.
+
+          (-count 'even? '(1 2 3 4 5))
+              ⇒ 2
+          (--count (< it 4) '(1 2 3 4))
+              ⇒ 3
+
+ -- Function: -sum (list)
+     Return the sum of LIST.
+
+          (-sum ())
+              ⇒ 0
+          (-sum '(1))
+              ⇒ 1
+          (-sum '(1 2 3 4))
+              ⇒ 10
+
+ -- Function: -running-sum (list)
+     Return a list with running sums of items in LIST.  LIST must be
+     non-empty.
+
+          (-running-sum '(1 2 3 4))
+              ⇒ (1 3 6 10)
+          (-running-sum '(1))
+              ⇒ (1)
+          (-running-sum ())
+              error→ Wrong type argument: consp, nil
+
+ -- Function: -product (list)
+     Return the product of LIST.
+
+          (-product ())
+              ⇒ 1
+          (-product '(1))
+              ⇒ 1
+          (-product '(1 2 3 4))
+              ⇒ 24
+
+ -- Function: -running-product (list)
+     Return a list with running products of items in LIST.  LIST must be
+     non-empty.
+
+          (-running-product '(1 2 3 4))
+              ⇒ (1 2 6 24)
+          (-running-product '(1))
+              ⇒ (1)
+          (-running-product ())
+              error→ Wrong type argument: consp, nil
+
+ -- Function: -inits (list)
+     Return all prefixes of LIST.
+
+          (-inits '(1 2 3 4))
+              ⇒ (nil (1) (1 2) (1 2 3) (1 2 3 4))
+          (-inits nil)
+              ⇒ (nil)
+          (-inits '(1))
+              ⇒ (nil (1))
+
+ -- Function: -tails (list)
+     Return all suffixes of LIST.
+
+          (-tails '(1 2 3 4))
+              ⇒ ((1 2 3 4) (2 3 4) (3 4) (4) nil)
+          (-tails nil)
+              ⇒ (nil)
+          (-tails '(1))
+              ⇒ ((1) nil)
+
+ -- Function: -common-prefix (&rest lists)
+     Return the longest common prefix of LISTS.
+
+          (-common-prefix '(1))
+              ⇒ (1)
+          (-common-prefix '(1 2) '(3 4) '(1 2))
+              ⇒ ()
+          (-common-prefix '(1 2) '(1 2 3) '(1 2 3 4))
+              ⇒ (1 2)
+
+ -- Function: -common-suffix (&rest lists)
+     Return the longest common suffix of LISTS.
+
+          (-common-suffix '(1))
+              ⇒ (1)
+          (-common-suffix '(1 2) '(3 4) '(1 2))
+              ⇒ ()
+          (-common-suffix '(1 2 3 4) '(2 3 4) '(3 4))
+              ⇒ (3 4)
+
+ -- Function: -min (list)
+     Return the smallest value from LIST of numbers or markers.
+
+          (-min '(0))
+              ⇒ 0
+          (-min '(3 2 1))
+              ⇒ 1
+          (-min '(1 2 3))
+              ⇒ 1
+
+ -- Function: -min-by (comparator list)
+     Take a comparison function COMPARATOR and a LIST and return the
+     least element of the list by the comparison function.
+
+     See also combinator ‘-on’ (*note -on::) which can transform the
+     values before comparing them.
+
+          (-min-by '> '(4 3 6 1))
+              ⇒ 1
+          (--min-by (> (car it) (car other)) '((1 2 3) (2) (3 2)))
+              ⇒ (1 2 3)
+          (--min-by (> (length it) (length other)) '((1 2 3) (2) (3 2)))
+              ⇒ (2)
+
+ -- Function: -max (list)
+     Return the largest value from LIST of numbers or markers.
+
+          (-max '(0))
+              ⇒ 0
+          (-max '(3 2 1))
+              ⇒ 3
+          (-max '(1 2 3))
+              ⇒ 3
+
+ -- Function: -max-by (comparator list)
+     Take a comparison function COMPARATOR and a LIST and return the
+     greatest element of the list by the comparison function.
+
+     See also combinator ‘-on’ (*note -on::) which can transform the
+     values before comparing them.
+
+          (-max-by '> '(4 3 6 1))
+              ⇒ 6
+          (--max-by (> (car it) (car other)) '((1 2 3) (2) (3 2)))
+              ⇒ (3 2)
+          (--max-by (> (length it) (length other)) '((1 2 3) (2) (3 2)))
+              ⇒ (1 2 3)
+
+ -- Function: -frequencies (list)
+     Count the occurrences of each distinct element of LIST.
+
+     Return an alist of (ELEMENT .  N), where each ELEMENT occurs N
+     times in LIST.
+
+     The test for equality is done with ‘equal’, or with ‘-compare-fn’
+     if that is non-‘nil’.
+
+     See also ‘-count’ (*note -count::) and ‘-group-by’ (*note
+     -group-by::).
+
+          (-frequencies ())
+              ⇒ ()
+          (-frequencies '(1 2 3 1 2 1))
+              ⇒ ((1 . 3) (2 . 2) (3 . 1))
+          (let ((-compare-fn #'string=)) (-frequencies '(a "a")))
+              ⇒ ((a . 2))
+
+
+File: dash.info,  Node: Unfolding,  Next: Predicates,  Prev: Reductions,  Up: Functions
+
+2.5 Unfolding
+=============
+
+Operations dual to reductions, building lists from a seed value rather
+than consuming a list to produce a single value.
+
+ -- Function: -iterate (fun init n)
+     Return a list of iterated applications of FUN to INIT.
+
+     This means a list of the form:
+
+     (INIT (FUN INIT) (FUN (FUN INIT)) ...)
+
+     N is the length of the returned list.
+
+          (-iterate #'1+ 1 10)
+              ⇒ (1 2 3 4 5 6 7 8 9 10)
+          (-iterate (lambda (x) (+ x x)) 2 5)
+              ⇒ (2 4 8 16 32)
+          (--iterate (* it it) 2 5)
+              ⇒ (2 4 16 256 65536)
+
+ -- Function: -unfold (fun seed)
+     Build a list from SEED using FUN.
+
+     This is "dual" operation to ‘-reduce-r’ (*note -reduce-r::): while
+     -reduce-r consumes a list to produce a single value, ‘-unfold’
+     (*note -unfold::) takes a seed value and builds a (potentially
+     infinite!)  list.
+
+     FUN should return ‘nil’ to stop the generating process, or a cons
+     (A .  B), where A will be prepended to the result and B is the new
+     seed.
+
+          (-unfold (lambda (x) (unless (= x 0) (cons x (1- x)))) 10)
+              ⇒ (10 9 8 7 6 5 4 3 2 1)
+          (--unfold (when it (cons it (cdr it))) '(1 2 3 4))
+              ⇒ ((1 2 3 4) (2 3 4) (3 4) (4))
+          (--unfold (when it (cons it (butlast it))) '(1 2 3 4))
+              ⇒ ((1 2 3 4) (1 2 3) (1 2) (1))
+
+ -- Function: -repeat (n x)
+     Return a new list of length N with each element being X.  Return
+     ‘nil’ if N is less than 1.
+
+          (-repeat 3 :a)
+              ⇒ (:a :a :a)
+          (-repeat 1 :a)
+              ⇒ (:a)
+          (-repeat 0 :a)
+              ⇒ ()
+
+ -- Function: -cycle (list)
+     Return an infinite circular copy of LIST.  The returned list cycles
+     through the elements of LIST and repeats from the beginning.
+
+          (-take 5 (-cycle '(1 2 3)))
+              ⇒ (1 2 3 1 2)
+          (-take 7 (-cycle '(1 "and" 3)))
+              ⇒ (1 "and" 3 1 "and" 3 1)
+          (-zip-lists (-cycle '(3)) '(1 2))
+              ⇒ ((3 1) (3 2))
+
+
+File: dash.info,  Node: Predicates,  Next: Partitioning,  Prev: Unfolding,  Up: Functions
+
+2.6 Predicates
+==============
+
+Reductions of one or more lists to a boolean value.
+
+ -- Function: -some (pred list)
+     Return (PRED x) for the first LIST item where (PRED x) is
+     non-‘nil’, else ‘nil’.
+
+     Alias: ‘-any’.
+
+     This function's anaphoric counterpart is ‘--some’.
+
+          (-some #'stringp '(1 "2" 3))
+              ⇒ t
+          (--some (string-match-p "x" it) '("foo" "axe" "xor"))
+              ⇒ 1
+          (--some (= it-index 3) '(0 1 2))
+              ⇒ nil
+
+ -- Function: -every (pred list)
+     Return non-‘nil’ if PRED returns non-‘nil’ for all items in LIST.
+     If so, return the last such result of PRED.  Otherwise, once an
+     item is reached for which PRED returns ‘nil’, return ‘nil’ without
+     calling PRED on any further LIST elements.
+
+     This function is like ‘-every-p’, but on success returns the last
+     non-‘nil’ result of PRED instead of just ‘t’.
+
+     This function's anaphoric counterpart is ‘--every’.
+
+          (-every #'numberp '(1 2 3))
+              ⇒ t
+          (--every (string-match-p "x" it) '("axe" "xor"))
+              ⇒ 0
+          (--every (= it it-index) '(0 1 3))
+              ⇒ nil
+
+ -- Function: -any? (pred list)
+     Return ‘t’ if (PRED X) is non-‘nil’ for any X in LIST, else ‘nil’.
+
+     Alias: ‘-any-p’, ‘-some?’, ‘-some-p’
+
+          (-any? #'numberp '(nil 0 t))
+              ⇒ t
+          (-any? #'numberp '(nil t t))
+              ⇒ nil
+          (-any? #'null '(1 3 5))
+              ⇒ nil
+
+ -- Function: -all? (pred list)
+     Return ‘t’ if (PRED X) is non-‘nil’ for all X in LIST, else ‘nil’.
+     In the latter case, stop after the first X for which (PRED X) is
+     ‘nil’, without calling PRED on any subsequent elements of LIST.
+
+     The similar function ‘-every’ (*note -every::) is more widely
+     useful, since it returns the last non-‘nil’ result of PRED instead
+     of just ‘t’ on success.
+
+     Alias: ‘-all-p’, ‘-every-p’, ‘-every?’.
+
+     This function's anaphoric counterpart is ‘--all?’.
+
+          (-all? #'numberp '(1 2 3))
+              ⇒ t
+          (-all? #'numberp '(2 t 6))
+              ⇒ nil
+          (--all? (= 0 (% it 2)) '(2 4 6))
+              ⇒ t
+
+ -- Function: -none? (pred list)
+     Return ‘t’ if (PRED X) is ‘nil’ for all X in LIST, else ‘nil’.
+
+     Alias: ‘-none-p’
+
+          (-none? 'even? '(1 2 3))
+              ⇒ nil
+          (-none? 'even? '(1 3 5))
+              ⇒ t
+          (--none? (= 0 (% it 2)) '(1 2 3))
+              ⇒ nil
+
+ -- Function: -only-some? (pred list)
+     Return ‘t’ if different LIST items both satisfy and do not satisfy
+     PRED.  That is, if PRED returns both ‘nil’ for at least one item,
+     and non-‘nil’ for at least one other item in LIST.  Return ‘nil’ if
+     all items satisfy the predicate or none of them do.
+
+     Alias: ‘-only-some-p’
+
+          (-only-some? 'even? '(1 2 3))
+              ⇒ t
+          (-only-some? 'even? '(1 3 5))
+              ⇒ nil
+          (-only-some? 'even? '(2 4 6))
+              ⇒ nil
+
+ -- Function: -contains? (list element)
+     Return non-‘nil’ if LIST contains ELEMENT.
+
+     The test for equality is done with ‘equal’, or with ‘-compare-fn’
+     if that is non-‘nil’.  As with ‘member’, the return value is
+     actually the tail of LIST whose car is ELEMENT.
+
+     Alias: ‘-contains-p’.
+
+          (-contains? '(1 2 3) 1)
+              ⇒ (1 2 3)
+          (-contains? '(1 2 3) 2)
+              ⇒ (2 3)
+          (-contains? '(1 2 3) 4)
+              ⇒ ()
+
+ -- Function: -is-prefix? (prefix list)
+     Return non-‘nil’ if PREFIX is a prefix of LIST.
+
+     Alias: ‘-is-prefix-p’.
+
+          (-is-prefix? '(1 2 3) '(1 2 3 4 5))
+              ⇒ t
+          (-is-prefix? '(1 2 3 4 5) '(1 2 3))
+              ⇒ nil
+          (-is-prefix? '(1 3) '(1 2 3 4 5))
+              ⇒ nil
+
+ -- Function: -is-suffix? (suffix list)
+     Return non-‘nil’ if SUFFIX is a suffix of LIST.
+
+     Alias: ‘-is-suffix-p’.
+
+          (-is-suffix? '(3 4 5) '(1 2 3 4 5))
+              ⇒ t
+          (-is-suffix? '(1 2 3 4 5) '(3 4 5))
+              ⇒ nil
+          (-is-suffix? '(3 5) '(1 2 3 4 5))
+              ⇒ nil
+
+ -- Function: -is-infix? (infix list)
+     Return non-‘nil’ if INFIX is infix of LIST.
+
+     This operation runs in O(n^2) time
+
+     Alias: ‘-is-infix-p’
+
+          (-is-infix? '(1 2 3) '(1 2 3 4 5))
+              ⇒ t
+          (-is-infix? '(2 3 4) '(1 2 3 4 5))
+              ⇒ t
+          (-is-infix? '(3 4 5) '(1 2 3 4 5))
+              ⇒ t
+
+ -- Function: -cons-pair? (obj)
+     Return non-‘nil’ if OBJ is a true cons pair.  That is, a cons (A .
+     B) where B is not a list.
+
+     Alias: ‘-cons-pair-p’.
+
+          (-cons-pair? '(1 . 2))
+              ⇒ t
+          (-cons-pair? '(1 2))
+              ⇒ nil
+          (-cons-pair? '(1))
+              ⇒ nil
+
+
+File: dash.info,  Node: Partitioning,  Next: Indexing,  Prev: Predicates,  Up: Functions
+
+2.7 Partitioning
+================
+
+Functions partitioning the input list into a list of lists.
+
+ -- Function: -split-at (n list)
+     Split LIST into two sublists after the Nth element.  The result is
+     a list of two elements (TAKE DROP) where TAKE is a new list of the
+     first N elements of LIST, and DROP is the remaining elements of
+     LIST (not a copy).  TAKE and DROP are like the results of ‘-take’
+     (*note -take::) and ‘-drop’ (*note -drop::), respectively, but the
+     split is done in a single list traversal.
+
+          (-split-at 3 '(1 2 3 4 5))
+              ⇒ ((1 2 3) (4 5))
+          (-split-at 17 '(1 2 3 4 5))
+              ⇒ ((1 2 3 4 5) nil)
+          (-split-at 0 '(1 2 3 4 5))
+              ⇒ (nil (1 2 3 4 5))
+
+ -- Function: -split-with (pred list)
+     Split LIST into a prefix satisfying PRED, and the rest.  The first
+     sublist is the prefix of LIST with successive elements satisfying
+     PRED, and the second sublist is the remaining elements that do not.
+     The result is like performing
+
+     ((-take-while PRED LIST) (-drop-while PRED LIST))
+
+     but in no more than a single pass through LIST.
+
+          (-split-with 'even? '(1 2 3 4))
+              ⇒ (nil (1 2 3 4))
+          (-split-with 'even? '(2 4 5 6))
+              ⇒ ((2 4) (5 6))
+          (--split-with (< it 4) '(1 2 3 4 3 2 1))
+              ⇒ ((1 2 3) (4 3 2 1))
+
+ -- Macro: -split-on (item list)
+     Split the LIST each time ITEM is found.
+
+     Unlike ‘-partition-by’ (*note -partition-by::), the ITEM is
+     discarded from the results.  Empty lists are also removed from the
+     result.
+
+     Comparison is done by ‘equal’.
+
+     See also ‘-split-when’ (*note -split-when::)
+
+          (-split-on '| '(Nil | Leaf a | Node [Tree a]))
+              ⇒ ((Nil) (Leaf a) (Node [Tree a]))
+          (-split-on :endgroup '("a" "b" :endgroup "c" :endgroup "d" "e"))
+              ⇒ (("a" "b") ("c") ("d" "e"))
+          (-split-on :endgroup '("a" "b" :endgroup :endgroup "d" "e"))
+              ⇒ (("a" "b") ("d" "e"))
+
+ -- Function: -split-when (fn list)
+     Split the LIST on each element where FN returns non-‘nil’.
+
+     Unlike ‘-partition-by’ (*note -partition-by::), the "matched"
+     element is discarded from the results.  Empty lists are also
+     removed from the result.
+
+     This function can be thought of as a generalization of
+     ‘split-string’.
+
+          (-split-when 'even? '(1 2 3 4 5 6))
+              ⇒ ((1) (3) (5))
+          (-split-when 'even? '(1 2 3 4 6 8 9))
+              ⇒ ((1) (3) (9))
+          (--split-when (memq it '(&optional &rest)) '(a b &optional c d &rest args))
+              ⇒ ((a b) (c d) (args))
+
+ -- Function: -separate (pred list)
+     Split LIST into two sublists based on whether items satisfy PRED.
+     The result is like performing
+
+     ((-filter PRED LIST) (-remove PRED LIST))
+
+     but in a single pass through LIST.
+
+          (-separate (lambda (num) (= 0 (% num 2))) '(1 2 3 4 5 6 7))
+              ⇒ ((2 4 6) (1 3 5 7))
+          (--separate (< it 5) '(3 7 5 9 3 2 1 4 6))
+              ⇒ ((3 3 2 1 4) (7 5 9 6))
+          (-separate 'cdr '((1 2) (1) (1 2 3) (4)))
+              ⇒ (((1 2) (1 2 3)) ((1) (4)))
+
+ -- Function: -partition (n list)
+     Return a new list with the items in LIST grouped into N-sized
+     sublists.  If there are not enough items to make the last group
+     N-sized, those items are discarded.
+
+          (-partition 2 '(1 2 3 4 5 6))
+              ⇒ ((1 2) (3 4) (5 6))
+          (-partition 2 '(1 2 3 4 5 6 7))
+              ⇒ ((1 2) (3 4) (5 6))
+          (-partition 3 '(1 2 3 4 5 6 7))
+              ⇒ ((1 2 3) (4 5 6))
+
+ -- Function: -partition-all (n list)
+     Return a new list with the items in LIST grouped into N-sized
+     sublists.  The last group may contain less than N items.
+
+          (-partition-all 2 '(1 2 3 4 5 6))
+              ⇒ ((1 2) (3 4) (5 6))
+          (-partition-all 2 '(1 2 3 4 5 6 7))
+              ⇒ ((1 2) (3 4) (5 6) (7))
+          (-partition-all 3 '(1 2 3 4 5 6 7))
+              ⇒ ((1 2 3) (4 5 6) (7))
+
+ -- Function: -partition-in-steps (n step list)
+     Partition LIST into sublists of length N that are STEP items apart.
+     Like ‘-partition-all-in-steps’ (*note -partition-all-in-steps::),
+     but if there are not enough items to make the last group N-sized,
+     those items are discarded.
+
+          (-partition-in-steps 2 1 '(1 2 3 4))
+              ⇒ ((1 2) (2 3) (3 4))
+          (-partition-in-steps 3 2 '(1 2 3 4))
+              ⇒ ((1 2 3))
+          (-partition-in-steps 3 2 '(1 2 3 4 5))
+              ⇒ ((1 2 3) (3 4 5))
+
+ -- Function: -partition-all-in-steps (n step list)
+     Partition LIST into sublists of length N that are STEP items apart.
+     Adjacent groups may overlap if N exceeds the STEP stride.  Trailing
+     groups may contain less than N items.
+
+          (-partition-all-in-steps 2 1 '(1 2 3 4))
+              ⇒ ((1 2) (2 3) (3 4) (4))
+          (-partition-all-in-steps 3 2 '(1 2 3 4))
+              ⇒ ((1 2 3) (3 4))
+          (-partition-all-in-steps 3 2 '(1 2 3 4 5))
+              ⇒ ((1 2 3) (3 4 5) (5))
+
+ -- Function: -partition-by (fn list)
+     Apply FN to each item in LIST, splitting it each time FN returns a
+     new value.
+
+          (-partition-by 'even? ())
+              ⇒ ()
+          (-partition-by 'even? '(1 1 2 2 2 3 4 6 8))
+              ⇒ ((1 1) (2 2 2) (3) (4 6 8))
+          (--partition-by (< it 3) '(1 2 3 4 3 2 1))
+              ⇒ ((1 2) (3 4 3) (2 1))
+
+ -- Function: -partition-by-header (fn list)
+     Apply FN to the first item in LIST.  That is the header value.
+     Apply FN to each item in LIST, splitting it each time FN returns
+     the header value, but only after seeing at least one other value
+     (the body).
+
+          (--partition-by-header (= it 1) '(1 2 3 1 2 1 2 3 4))
+              ⇒ ((1 2 3) (1 2) (1 2 3 4))
+          (--partition-by-header (> it 0) '(1 2 0 1 0 1 2 3 0))
+              ⇒ ((1 2 0) (1 0) (1 2 3 0))
+          (-partition-by-header 'even? '(2 1 1 1 4 1 3 5 6 6 1))
+              ⇒ ((2 1 1 1) (4 1 3 5) (6 6 1))
+
+ -- Function: -partition-after-pred (pred list)
+     Partition LIST after each element for which PRED returns non-‘nil’.
+
+     This function's anaphoric counterpart is ‘--partition-after-pred’.
+
+          (-partition-after-pred #'booleanp ())
+              ⇒ ()
+          (-partition-after-pred #'booleanp '(t t))
+              ⇒ ((t) (t))
+          (-partition-after-pred #'booleanp '(0 0 t t 0 t))
+              ⇒ ((0 0 t) (t) (0 t))
+
+ -- Function: -partition-before-pred (pred list)
+     Partition directly before each time PRED is true on an element of
+     LIST.
+
+          (-partition-before-pred #'booleanp ())
+              ⇒ ()
+          (-partition-before-pred #'booleanp '(0 t))
+              ⇒ ((0) (t))
+          (-partition-before-pred #'booleanp '(0 0 t 0 t t))
+              ⇒ ((0 0) (t 0) (t) (t))
+
+ -- Function: -partition-before-item (item list)
+     Partition directly before each time ITEM appears in LIST.
+
+          (-partition-before-item 3 ())
+              ⇒ ()
+          (-partition-before-item 3 '(1))
+              ⇒ ((1))
+          (-partition-before-item 3 '(3))
+              ⇒ ((3))
+
+ -- Function: -partition-after-item (item list)
+     Partition directly after each time ITEM appears in LIST.
+
+          (-partition-after-item 3 ())
+              ⇒ ()
+          (-partition-after-item 3 '(1))
+              ⇒ ((1))
+          (-partition-after-item 3 '(3))
+              ⇒ ((3))
+
+ -- Function: -group-by (fn list)
+     Separate LIST into an alist whose keys are FN applied to the
+     elements of LIST.  Keys are compared by ‘equal’.
+
+          (-group-by 'even? ())
+              ⇒ ()
+          (-group-by 'even? '(1 1 2 2 2 3 4 6 8))
+              ⇒ ((nil 1 1 3) (t 2 2 2 4 6 8))
+          (--group-by (car (split-string it "/")) '("a/b" "c/d" "a/e"))
+              ⇒ (("a" "a/b" "a/e") ("c" "c/d"))
+
+
+File: dash.info,  Node: Indexing,  Next: Set operations,  Prev: Partitioning,  Up: Functions
+
+2.8 Indexing
+============
+
+Functions retrieving or sorting based on list indices and related
+predicates.
+
+ -- Function: -elem-index (elem list)
+     Return the first index of ELEM in LIST.  That is, the index within
+     LIST of the first element that is ‘equal’ to ELEM.  Return ‘nil’ if
+     there is no such element.
+
+     See also: ‘-find-index’ (*note -find-index::).
+
+          (-elem-index 2 '(6 7 8 3 4))
+              ⇒ nil
+          (-elem-index "bar" '("foo" "bar" "baz"))
+              ⇒ 1
+          (-elem-index '(1 2) '((3) (5 6) (1 2) nil))
+              ⇒ 2
+
+ -- Function: -elem-indices (elem list)
+     Return the list of indices at which ELEM appears in LIST.  That is,
+     the indices of all elements of LIST ‘equal’ to ELEM, in the same
+     ascending order as they appear in LIST.
+
+          (-elem-indices 2 '(6 7 8 3 4 1))
+              ⇒ ()
+          (-elem-indices "bar" '("foo" "bar" "baz"))
+              ⇒ (1)
+          (-elem-indices '(1 2) '((3) (1 2) (5 6) (1 2) nil))
+              ⇒ (1 3)
+
+ -- Function: -find-index (pred list)
+     Return the index of the first item satisfying PRED in LIST.  Return
+     ‘nil’ if no such item is found.
+
+     PRED is called with one argument, the current list element, until
+     it returns non-‘nil’, at which point the search terminates.
+
+     This function's anaphoric counterpart is ‘--find-index’.
+
+     See also: ‘-first’ (*note -first::), ‘-find-last-index’ (*note
+     -find-last-index::).
+
+          (-find-index #'numberp '(a b c))
+              ⇒ nil
+          (-find-index #'natnump '(1 0 -1))
+              ⇒ 0
+          (--find-index (> it 5) '(2 4 1 6 3 3 5 8))
+              ⇒ 3
+
+ -- Function: -find-last-index (pred list)
+     Return the index of the last item satisfying PRED in LIST.  Return
+     ‘nil’ if no such item is found.
+
+     Predicate PRED is called with one argument each time, namely the
+     current list element.
+
+     This function's anaphoric counterpart is ‘--find-last-index’.
+
+     See also: ‘-last’ (*note -last::), ‘-find-index’ (*note
+     -find-index::).
+
+          (-find-last-index #'numberp '(a b c))
+              ⇒ nil
+          (--find-last-index (> it 5) '(2 7 1 6 3 8 5 2))
+              ⇒ 5
+          (-find-last-index (-partial #'string< 'a) '(c b a))
+              ⇒ 1
+
+ -- Function: -find-indices (pred list)
+     Return the list of indices in LIST satisfying PRED.
+
+     Each element of LIST in turn is passed to PRED.  If the result is
+     non-‘nil’, the index of that element in LIST is included in the
+     result.  The returned indices are in ascending order, i.e., in the
+     same order as they appear in LIST.
+
+     This function's anaphoric counterpart is ‘--find-indices’.
+
+     See also: ‘-find-index’ (*note -find-index::), ‘-elem-indices’
+     (*note -elem-indices::).
+
+          (-find-indices #'numberp '(a b c))
+              ⇒ ()
+          (-find-indices #'numberp '(8 1 d 2 b c a 3))
+              ⇒ (0 1 3 7)
+          (--find-indices (> it 5) '(2 4 1 6 3 3 5 8))
+              ⇒ (3 7)
+
+ -- Function: -grade-up (comparator list)
+     Grade elements of LIST using COMPARATOR relation.  This yields a
+     permutation vector such that applying this permutation to LIST
+     sorts it in ascending order.
+
+          (-grade-up #'< '(3 1 4 2 1 3 3))
+              ⇒ (1 4 3 0 5 6 2)
+          (let ((l '(3 1 4 2 1 3 3))) (-select-by-indices (-grade-up #'< l) l))
+              ⇒ (1 1 2 3 3 3 4)
+
+ -- Function: -grade-down (comparator list)
+     Grade elements of LIST using COMPARATOR relation.  This yields a
+     permutation vector such that applying this permutation to LIST
+     sorts it in descending order.
+
+          (-grade-down #'< '(3 1 4 2 1 3 3))
+              ⇒ (2 0 5 6 3 1 4)
+          (let ((l '(3 1 4 2 1 3 3))) (-select-by-indices (-grade-down #'< l) l))
+              ⇒ (4 3 3 3 2 1 1)
+
+
+File: dash.info,  Node: Set operations,  Next: Other list operations,  Prev: Indexing,  Up: Functions
+
+2.9 Set operations
+==================
+
+Operations pretending lists are sets.
+
+ -- Function: -union (list1 list2)
+     Return a new list of distinct elements appearing in either LIST1 or
+     LIST2.
+
+     The test for equality is done with ‘equal’, or with ‘-compare-fn’
+     if that is non-‘nil’.
+
+          (-union '(1 2 3) '(3 4 5))
+              ⇒ (1 2 3 4 5)
+          (-union '(1 2 2 4) ())
+              ⇒ (1 2 4)
+          (-union '(1 1 2 2) '(4 4 3 2 1))
+              ⇒ (1 2 4 3)
+
+ -- Function: -difference (list1 list2)
+     Return a new list with the distinct members of LIST1 that are not
+     in LIST2.
+
+     The test for equality is done with ‘equal’, or with ‘-compare-fn’
+     if that is non-‘nil’.
+
+          (-difference () ())
+              ⇒ ()
+          (-difference '(1 2 3) '(4 5 6))
+              ⇒ (1 2 3)
+          (-difference '(1 2 3 4) '(3 4 5 6))
+              ⇒ (1 2)
+
+ -- Function: -intersection (list1 list2)
+     Return a new list of distinct elements appearing in both LIST1 and
+     LIST2.
+
+     The test for equality is done with ‘equal’, or with ‘-compare-fn’
+     if that is non-‘nil’.
+
+          (-intersection () ())
+              ⇒ ()
+          (-intersection '(1 2 3) '(4 5 6))
+              ⇒ ()
+          (-intersection '(1 2 2 3) '(4 3 3 2))
+              ⇒ (2 3)
+
+ -- Function: -powerset (list)
+     Return the power set of LIST.
+
+          (-powerset ())
+              ⇒ (nil)
+          (-powerset '(x y))
+              ⇒ ((x y) (x) (y) nil)
+          (-powerset '(x y z))
+              ⇒ ((x y z) (x y) (x z) (x) (y z) (y) (z) nil)
+
+ -- Function: -permutations (list)
+     Return the distinct permutations of LIST.
+
+     Duplicate elements of LIST are determined by ‘equal’, or by
+     ‘-compare-fn’ if that is non-‘nil’.
+
+          (-permutations ())
+              ⇒ (nil)
+          (-permutations '(a a b))
+              ⇒ ((a a b) (a b a) (b a a))
+          (-permutations '(a b c))
+              ⇒ ((a b c) (a c b) (b a c) (b c a) (c a b) (c b a))
+
+ -- Function: -distinct (list)
+     Return a copy of LIST with all duplicate elements removed.
+
+     The test for equality is done with ‘equal’, or with ‘-compare-fn’
+     if that is non-‘nil’.
+
+     Alias: ‘-uniq’.
+
+          (-distinct ())
+              ⇒ ()
+          (-distinct '(1 1 2 3 3))
+              ⇒ (1 2 3)
+          (-distinct '(t t t))
+              ⇒ (t)
+
+ -- Function: -same-items? (list1 list2)
+     Return non-‘nil’ if LIST1 and LIST2 have the same distinct
+     elements.
+
+     The order of the elements in the lists does not matter.  The lists
+     may be of different lengths, i.e., contain duplicate elements.  The
+     test for equality is done with ‘equal’, or with ‘-compare-fn’ if
+     that is non-‘nil’.
+
+     Alias: ‘-same-items-p’.
+
+          (-same-items? '(1 2 3) '(1 2 3))
+              ⇒ t
+          (-same-items? '(1 1 2 3) '(3 3 2 1))
+              ⇒ t
+          (-same-items? '(1 2 3) '(1 2 3 4))
+              ⇒ nil
+
+
+File: dash.info,  Node: Other list operations,  Next: Tree operations,  Prev: Set operations,  Up: Functions
+
+2.10 Other list operations
+==========================
+
+Other list functions not fit to be classified elsewhere.
+
+ -- Function: -rotate (n list)
+     Rotate LIST N places to the right (left if N is negative).  The
+     time complexity is O(n).
+
+          (-rotate 3 '(1 2 3 4 5 6 7))
+              ⇒ (5 6 7 1 2 3 4)
+          (-rotate -3 '(1 2 3 4 5 6 7))
+              ⇒ (4 5 6 7 1 2 3)
+          (-rotate 16 '(1 2 3 4 5 6 7))
+              ⇒ (6 7 1 2 3 4 5)
+
+ -- Function: -cons* (&rest args)
+     Make a new list from the elements of ARGS.  The last 2 elements of
+     ARGS are used as the final cons of the result, so if the final
+     element of ARGS is not a list, the result is a dotted list.  With
+     no ARGS, return ‘nil’.
+
+          (-cons* 1 2)
+              ⇒ (1 . 2)
+          (-cons* 1 2 3)
+              ⇒ (1 2 . 3)
+          (-cons* 1)
+              ⇒ 1
+
+ -- Function: -snoc (list elem &rest elements)
+     Append ELEM to the end of the list.
+
+     This is like ‘cons’, but operates on the end of list.
+
+     If any ELEMENTS are given, append them to the list as well.
+
+          (-snoc '(1 2 3) 4)
+              ⇒ (1 2 3 4)
+          (-snoc '(1 2 3) 4 5 6)
+              ⇒ (1 2 3 4 5 6)
+          (-snoc '(1 2 3) '(4 5 6))
+              ⇒ (1 2 3 (4 5 6))
+
+ -- Function: -interpose (sep list)
+     Return a new list of all elements in LIST separated by SEP.
+
+          (-interpose "-" ())
+              ⇒ ()
+          (-interpose "-" '("a"))
+              ⇒ ("a")
+          (-interpose "-" '("a" "b" "c"))
+              ⇒ ("a" "-" "b" "-" "c")
+
+ -- Function: -interleave (&rest lists)
+     Return a new list of the first item in each list, then the second
+     etc.
+
+          (-interleave '(1 2) '("a" "b"))
+              ⇒ (1 "a" 2 "b")
+          (-interleave '(1 2) '("a" "b") '("A" "B"))
+              ⇒ (1 "a" "A" 2 "b" "B")
+          (-interleave '(1 2 3) '("a" "b"))
+              ⇒ (1 "a" 2 "b")
+
+ -- Function: -iota (count &optional start step)
+     Return a list containing COUNT numbers.  Starts from START and adds
+     STEP each time.  The default START is zero, the default STEP is 1.
+     This function takes its name from the corresponding primitive in
+     the APL language.
+
+          (-iota 6)
+              ⇒ (0 1 2 3 4 5)
+          (-iota 4 2.5 -2)
+              ⇒ (2.5 0.5 -1.5 -3.5)
+          (-iota -1)
+              error→ Wrong type argument: natnump, -1
+
+ -- Function: -zip-with (fn list1 list2)
+     Zip LIST1 and LIST2 into a new list using the function FN.  That
+     is, apply FN pairwise taking as first argument the next element of
+     LIST1 and as second argument the next element of LIST2 at the
+     corresponding position.  The result is as long as the shorter list.
+
+     This function's anaphoric counterpart is ‘--zip-with’.
+
+     For other zips, see also ‘-zip-lists’ (*note -zip-lists::) and
+     ‘-zip-fill’ (*note -zip-fill::).
+
+          (-zip-with #'+ '(1 2 3 4) '(5 6 7))
+              ⇒ (6 8 10)
+          (-zip-with #'cons '(1 2 3) '(4 5 6 7))
+              ⇒ ((1 . 4) (2 . 5) (3 . 6))
+          (--zip-with (format "%s & %s" it other) '(Batman Jekyll) '(Robin Hyde))
+              ⇒ ("Batman & Robin" "Jekyll & Hyde")
+
+ -- Function: -zip-pair (list1 list2)
+     Zip LIST1 and LIST2 together.
+
+     Make a pair with the head of each list, followed by a pair with the
+     second element of each list, and so on.  The number of pairs
+     returned is equal to the length of the shorter input list.
+
+     See also: ‘-zip-lists’ (*note -zip-lists::).
+
+          (-zip-pair '(1 2 3 4) '(5 6 7))
+              ⇒ ((1 . 5) (2 . 6) (3 . 7))
+          (-zip-pair '(1 2 3) '(4 5 6))
+              ⇒ ((1 . 4) (2 . 5) (3 . 6))
+          (-zip-pair '(1 2) '(3))
+              ⇒ ((1 . 3))
+
+ -- Function: -zip-lists (&rest lists)
+     Zip LISTS together.
+
+     Group the head of each list, followed by the second element of each
+     list, and so on.  The number of returned groupings is equal to the
+     length of the shortest input list, and the length of each grouping
+     is equal to the number of input LISTS.
+
+     The return value is always a list of proper lists, in contrast to
+     ‘-zip’ (*note -zip::) which returns a list of dotted pairs when
+     only two input LISTS are provided.
+
+     See also: ‘-zip-pair’ (*note -zip-pair::).
+
+          (-zip-lists '(1 2 3) '(4 5 6))
+              ⇒ ((1 4) (2 5) (3 6))
+          (-zip-lists '(1 2 3) '(4 5 6 7))
+              ⇒ ((1 4) (2 5) (3 6))
+          (-zip-lists '(1 2) '(3 4 5) '(6))
+              ⇒ ((1 3 6))
+
+ -- Function: -zip-lists-fill (fill-value &rest lists)
+     Zip LISTS together, padding shorter lists with FILL-VALUE.  This is
+     like ‘-zip-lists’ (*note -zip-lists::) (which see), except it
+     retains all elements at positions beyond the end of the shortest
+     list.  The number of returned groupings is equal to the length of
+     the longest input list, and the length of each grouping is equal to
+     the number of input LISTS.
+
+          (-zip-lists-fill 0 '(1 2) '(3 4 5) '(6))
+              ⇒ ((1 3 6) (2 4 0) (0 5 0))
+          (-zip-lists-fill 0 '(1 2) '(3 4) '(5 6))
+              ⇒ ((1 3 5) (2 4 6))
+          (-zip-lists-fill 0 '(1 2 3) nil)
+              ⇒ ((1 0) (2 0) (3 0))
+
+ -- Function: -zip (&rest lists)
+     Zip LISTS together.
+
+     Group the head of each list, followed by the second element of each
+     list, and so on.  The number of returned groupings is equal to the
+     length of the shortest input list, and the number of items in each
+     grouping is equal to the number of input LISTS.
+
+     If only two LISTS are provided as arguments, return the groupings
+     as a list of dotted pairs.  Otherwise, return the groupings as a
+     list of proper lists.
+
+     Since the return value changes form depending on the number of
+     arguments, it is generally recommended to use ‘-zip-lists’ (*note
+     -zip-lists::) instead, or ‘-zip-pair’ (*note -zip-pair::) if a list
+     of dotted pairs is desired.
+
+     See also: ‘-unzip’ (*note -unzip::).
+
+          (-zip '(1 2 3 4) '(5 6 7) '(8 9))
+              ⇒ ((1 5 8) (2 6 9))
+          (-zip '(1 2 3) '(4 5 6) '(7 8 9))
+              ⇒ ((1 4 7) (2 5 8) (3 6 9))
+          (-zip '(1 2 3))
+              ⇒ ((1) (2) (3))
+
+ -- Function: -zip-fill (fill-value &rest lists)
+     Zip LISTS together, padding shorter lists with FILL-VALUE.  This is
+     like ‘-zip’ (*note -zip::) (which see), except it retains all
+     elements at positions beyond the end of the shortest list.  The
+     number of returned groupings is equal to the length of the longest
+     input list, and the length of each grouping is equal to the number
+     of input LISTS.
+
+     Since the return value changes form depending on the number of
+     arguments, it is generally recommended to use ‘-zip-lists-fill’
+     (*note -zip-lists-fill::) instead, unless a list of dotted pairs is
+     explicitly desired.
+
+          (-zip-fill 0 '(1 2 3) '(4 5))
+              ⇒ ((1 . 4) (2 . 5) (3 . 0))
+          (-zip-fill 0 () '(1 2 3))
+              ⇒ ((0 . 1) (0 . 2) (0 . 3))
+          (-zip-fill 0 '(1 2) '(3 4) '(5 6))
+              ⇒ ((1 3 5) (2 4 6))
+
+ -- Function: -unzip-lists (lists)
+     Unzip LISTS.
+
+     This works just like ‘-zip-lists’ (*note -zip-lists::) (which see),
+     but takes a list of lists instead of a variable number of
+     arguments, such that
+
+     (-unzip-lists (-zip-lists ARGS...))
+
+     is identity (given that the lists comprising ARGS are of the same
+     length).
+
+          (-unzip-lists (-zip-lists '(1 2) '(3 4) '(5 6)))
+              ⇒ ((1 2) (3 4) (5 6))
+          (-unzip-lists '((1 2 3) (4 5) (6 7) (8 9)))
+              ⇒ ((1 4 6 8) (2 5 7 9))
+          (-unzip-lists '((1 2 3) (4 5 6)))
+              ⇒ ((1 4) (2 5) (3 6))
+
+ -- Function: -unzip (lists)
+     Unzip LISTS.
+
+     This works just like ‘-zip’ (*note -zip::) (which see), but takes a
+     list of lists instead of a variable number of arguments, such that
+
+     (-unzip (-zip L1 L2 L3 ...))
+
+     is identity (given that the lists are of the same length, and that
+     ‘-zip’ (*note -zip::) is not called with two arguments, because of
+     the caveat described in its docstring).
+
+     Note in particular that calling ‘-unzip’ (*note -unzip::) on a list
+     of two lists will return a list of dotted pairs.
+
+     Since the return value changes form depending on the number of
+     LISTS, it is generally recommended to use ‘-unzip-lists’ (*note
+     -unzip-lists::) instead.
+
+          (-unzip (-zip '(1 2) '(3 4) '(5 6)))
+              ⇒ ((1 . 2) (3 . 4) (5 . 6))
+          (-unzip '((1 2 3) (4 5 6)))
+              ⇒ ((1 . 4) (2 . 5) (3 . 6))
+          (-unzip '((1 2 3) (4 5) (6 7) (8 9)))
+              ⇒ ((1 4 6 8) (2 5 7 9))
+
+ -- Function: -pad (fill-value &rest lists)
+     Pad each of LISTS with FILL-VALUE until they all have equal
+     lengths.
+
+     Ensure all LISTS are as long as the longest one by repeatedly
+     appending FILL-VALUE to the shorter lists, and return the resulting
+     LISTS.
+
+          (-pad 0 ())
+              ⇒ (nil)
+          (-pad 0 '(1 2) '(3 4))
+              ⇒ ((1 2) (3 4))
+          (-pad 0 '(1 2) '(3 4 5 6) '(7 8 9))
+              ⇒ ((1 2 0 0) (3 4 5 6) (7 8 9 0))
+
+ -- Function: -table (fn &rest lists)
+     Compute outer product of LISTS using function FN.
+
+     The function FN should have the same arity as the number of
+     supplied lists.
+
+     The outer product is computed by applying fn to all possible
+     combinations created by taking one element from each list in order.
+     The dimension of the result is (length lists).
+
+     See also: ‘-table-flat’ (*note -table-flat::)
+
+          (-table '* '(1 2 3) '(1 2 3))
+              ⇒ ((1 2 3) (2 4 6) (3 6 9))
+          (-table (lambda (a b) (-sum (-zip-with '* a b))) '((1 2) (3 4)) '((1 3) (2 4)))
+              ⇒ ((7 15) (10 22))
+          (apply '-table 'list (-repeat 3 '(1 2)))
+              ⇒ ((((1 1 1) (2 1 1)) ((1 2 1) (2 2 1))) (((1 1 2) (2 1 2)) ((1 2 2) (2 2 2))))
+
+ -- Function: -table-flat (fn &rest lists)
+     Compute flat outer product of LISTS using function FN.
+
+     The function FN should have the same arity as the number of
+     supplied lists.
+
+     The outer product is computed by applying fn to all possible
+     combinations created by taking one element from each list in order.
+     The results are flattened, ignoring the tensor structure of the
+     result.  This is equivalent to calling:
+
+     (-flatten-n (1- (length lists)) (apply '-table fn lists))
+
+     but the implementation here is much more efficient.
+
+     See also: ‘-flatten-n’ (*note -flatten-n::), ‘-table’ (*note
+     -table::)
+
+          (-table-flat 'list '(1 2 3) '(a b c))
+              ⇒ ((1 a) (2 a) (3 a) (1 b) (2 b) (3 b) (1 c) (2 c) (3 c))
+          (-table-flat '* '(1 2 3) '(1 2 3))
+              ⇒ (1 2 3 2 4 6 3 6 9)
+          (apply '-table-flat 'list (-repeat 3 '(1 2)))
+              ⇒ ((1 1 1) (2 1 1) (1 2 1) (2 2 1) (1 1 2) (2 1 2) (1 2 2) (2 2 2))
+
+ -- Function: -first (pred list)
+     Return the first item in LIST for which PRED returns non-‘nil’.
+     Return ‘nil’ if no such element is found.
+
+     To get the first item in the list no questions asked, use
+     ‘-first-item’ (*note -first-item::).
+
+     Alias: ‘-find’.
+
+     This function's anaphoric counterpart is ‘--first’.
+
+          (-first #'natnump '(-1 0 1))
+              ⇒ 0
+          (-first #'null '(1 2 3))
+              ⇒ nil
+          (--first (> it 2) '(1 2 3))
+              ⇒ 3
+
+ -- Function: -last (pred list)
+     Return the last x in LIST where (PRED x) is non-‘nil’, else ‘nil’.
+
+          (-last 'even? '(1 2 3 4 5 6 3 3 3))
+              ⇒ 6
+          (-last 'even? '(1 3 7 5 9))
+              ⇒ nil
+          (--last (> (length it) 3) '("a" "looong" "word" "and" "short" "one"))
+              ⇒ "short"
+
+ -- Function: -first-item (list)
+     Return the first item of LIST, or ‘nil’ on an empty list.
+
+     See also: ‘-second-item’ (*note -second-item::), ‘-last-item’
+     (*note -last-item::), etc.
+
+          (-first-item ())
+              ⇒ ()
+          (-first-item '(1 2 3 4 5))
+              ⇒ 1
+          (let ((list (list 1 2 3))) (setf (-first-item list) 5) list)
+              ⇒ (5 2 3)
+
+ -- Function: -second-item (list)
+     Return the second item of LIST, or ‘nil’ if LIST is too short.
+
+     See also: ‘-first-item’ (*note -first-item::), ‘-third-item’ (*note
+     -third-item::), etc.
+
+          (-second-item ())
+              ⇒ ()
+          (-second-item '(1 2 3 4 5))
+              ⇒ 2
+          (let ((list (list 1 2))) (setf (-second-item list) 5) list)
+              ⇒ (1 5)
+
+ -- Function: -third-item (list)
+     Return the third item of LIST, or ‘nil’ if LIST is too short.
+
+     See also: ‘-second-item’ (*note -second-item::), ‘-fourth-item’
+     (*note -fourth-item::), etc.
+
+          (-third-item ())
+              ⇒ ()
+          (-third-item '(1 2))
+              ⇒ ()
+          (-third-item '(1 2 3 4 5))
+              ⇒ 3
+
+ -- Function: -fourth-item (list)
+     Return the fourth item of LIST, or ‘nil’ if LIST is too short.
+
+     See also: ‘-third-item’ (*note -third-item::), ‘-fifth-item’ (*note
+     -fifth-item::), etc.
+
+          (-fourth-item ())
+              ⇒ ()
+          (-fourth-item '(1 2 3))
+              ⇒ ()
+          (-fourth-item '(1 2 3 4 5))
+              ⇒ 4
+
+ -- Function: -fifth-item (list)
+     Return the fifth item of LIST, or ‘nil’ if LIST is too short.
+
+     See also: ‘-fourth-item’ (*note -fourth-item::), ‘-last-item’
+     (*note -last-item::), etc.
+
+          (-fifth-item ())
+              ⇒ ()
+          (-fifth-item '(1 2 3 4))
+              ⇒ ()
+          (-fifth-item '(1 2 3 4 5))
+              ⇒ 5
+
+ -- Function: -last-item (list)
+     Return the last item of LIST, or ‘nil’ on an empty list.
+
+     See also: ‘-first-item’ (*note -first-item::), etc.
+
+          (-last-item ())
+              ⇒ ()
+          (-last-item '(1 2 3 4 5))
+              ⇒ 5
+          (let ((list (list 1 2 3))) (setf (-last-item list) 5) list)
+              ⇒ (1 2 5)
+
+ -- Function: -butlast (list)
+     Return a list of all items in list except for the last.
+
+          (-butlast '(1 2 3))
+              ⇒ (1 2)
+          (-butlast '(1 2))
+              ⇒ (1)
+          (-butlast '(1))
+              ⇒ nil
+
+ -- Function: -sort (comparator list)
+     Sort LIST, stably, comparing elements using COMPARATOR.  Return the
+     sorted list.  LIST is NOT modified by side effects.  COMPARATOR is
+     called with two elements of LIST, and should return non-‘nil’ if
+     the first element should sort before the second.
+
+          (-sort #'< '(3 1 2))
+              ⇒ (1 2 3)
+          (-sort #'> '(3 1 2))
+              ⇒ (3 2 1)
+          (--sort (< it other) '(3 1 2))
+              ⇒ (1 2 3)
+
+ -- Function: -list (arg)
+     Ensure ARG is a list.  If ARG is already a list, return it as is
+     (not a copy).  Otherwise, return a new list with ARG as its only
+     element.
+
+     Another supported calling convention is (-list &rest ARGS).  In
+     this case, if ARG is not a list, a new list with all of ARGS as
+     elements is returned.  This use is supported for backward
+     compatibility and is otherwise deprecated.
+
+          (-list 1)
+              ⇒ (1)
+          (-list ())
+              ⇒ ()
+          (-list '(1 2 3))
+              ⇒ (1 2 3)
+
+ -- Function: -fix (fn list)
+     Compute the (least) fixpoint of FN with initial input LIST.
+
+     FN is called at least once, results are compared with ‘equal’.
+
+          (-fix (lambda (l) (-non-nil (--mapcat (-split-at (/ (length it) 2) it) l))) '((1 2 3)))
+              ⇒ ((1) (2) (3))
+          (let ((l '((starwars scifi) (jedi starwars warrior)))) (--fix (-uniq (--mapcat (cons it (cdr (assq it l))) it)) '(jedi book)))
+              ⇒ (jedi starwars warrior scifi book)
+
+
+File: dash.info,  Node: Tree operations,  Next: Threading macros,  Prev: Other list operations,  Up: Functions
+
+2.11 Tree operations
+====================
+
+Functions pretending lists are trees.
+
+ -- Function: -tree-seq (branch children tree)
+     Return a sequence of the nodes in TREE, in depth-first search
+     order.
+
+     BRANCH is a predicate of one argument that returns non-‘nil’ if the
+     passed argument is a branch, that is, a node that can have
+     children.
+
+     CHILDREN is a function of one argument that returns the children of
+     the passed branch node.
+
+     Non-branch nodes are simply copied.
+
+          (-tree-seq 'listp 'identity '(1 (2 3) 4 (5 (6 7))))
+              ⇒ ((1 (2 3) 4 (5 (6 7))) 1 (2 3) 2 3 4 (5 (6 7)) 5 (6 7) 6 7)
+          (-tree-seq 'listp 'reverse '(1 (2 3) 4 (5 (6 7))))
+              ⇒ ((1 (2 3) 4 (5 (6 7))) (5 (6 7)) (6 7) 7 6 5 4 (2 3) 3 2 1)
+          (--tree-seq (vectorp it) (append it nil) [1 [2 3] 4 [5 [6 7]]])
+              ⇒ ([1 [2 3] 4 [5 [6 7]]] 1 [2 3] 2 3 4 [5 [6 7]] 5 [6 7] 6 7)
+
+ -- Function: -tree-map (fn tree)
+     Apply FN to each element of TREE while preserving the tree
+     structure.
+
+          (-tree-map '1+ '(1 (2 3) (4 (5 6) 7)))
+              ⇒ (2 (3 4) (5 (6 7) 8))
+          (-tree-map '(lambda (x) (cons x (expt 2 x))) '(1 (2 3) 4))
+              ⇒ ((1 . 2) ((2 . 4) (3 . 8)) (4 . 16))
+          (--tree-map (length it) '("<body>" ("<p>" "text" "</p>") "</body>"))
+              ⇒ (6 (3 4 4) 7)
+
+ -- Function: -tree-map-nodes (pred fun tree)
+     Call FUN on each node of TREE that satisfies PRED.
+
+     If PRED returns ‘nil’, continue descending down this node.  If PRED
+     returns non-‘nil’, apply FUN to this node and do not descend
+     further.
+
+          (-tree-map-nodes 'vectorp (lambda (x) (-sum (append x nil))) '(1 [2 3] 4 (5 [6 7] 8)))
+              ⇒ (1 5 4 (5 13 8))
+          (-tree-map-nodes 'keywordp (lambda (x) (symbol-name x)) '(1 :foo 4 ((5 6 :bar) :baz 8)))
+              ⇒ (1 ":foo" 4 ((5 6 ":bar") ":baz" 8))
+          (--tree-map-nodes (eq (car-safe it) 'add-mode) (-concat it (list :mode 'emacs-lisp-mode)) '(with-mode emacs-lisp-mode (foo bar) (add-mode a b) (baz (add-mode c d))))
+              ⇒ (with-mode emacs-lisp-mode (foo bar) (add-mode a b :mode emacs-lisp-mode) (baz (add-mode c d :mode emacs-lisp-mode)))
+
+ -- Function: -tree-reduce (fn tree)
+     Use FN to reduce elements of list TREE.  If elements of TREE are
+     lists themselves, apply the reduction recursively.
+
+     FN is first applied to first element of the list and second
+     element, then on this result and third element from the list etc.
+
+     See ‘-reduce-r’ (*note -reduce-r::) for how exactly are lists of
+     zero or one element handled.
+
+          (-tree-reduce '+ '(1 (2 3) (4 5)))
+              ⇒ 15
+          (-tree-reduce 'concat '("strings" (" on" " various") ((" levels"))))
+              ⇒ "strings on various levels"
+          (--tree-reduce (cond ((stringp it) (concat it " " acc)) (t (let ((sn (symbol-name it))) (concat "<" sn ">" acc "</" sn ">")))) '(body (p "some words") (div "more" (b "bold") "words")))
+              ⇒ "<body><p>some words</p> <div>more <b>bold</b> words</div></body>"
+
+ -- Function: -tree-reduce-from (fn init-value tree)
+     Use FN to reduce elements of list TREE.  If elements of TREE are
+     lists themselves, apply the reduction recursively.
+
+     FN is first applied to INIT-VALUE and first element of the list,
+     then on this result and second element from the list etc.
+
+     The initial value is ignored on cons pairs as they always contain
+     two elements.
+
+          (-tree-reduce-from '+ 1 '(1 (1 1) ((1))))
+              ⇒ 8
+          (--tree-reduce-from (-concat acc (list it)) nil '(1 (2 3 (4 5)) (6 7)))
+              ⇒ ((7 6) ((5 4) 3 2) 1)
+
+ -- Function: -tree-mapreduce (fn folder tree)
+     Apply FN to each element of TREE, and make a list of the results.
+     If elements of TREE are lists themselves, apply FN recursively to
+     elements of these nested lists.
+
+     Then reduce the resulting lists using FOLDER and initial value
+     INIT-VALUE.  See ‘-reduce-r-from’ (*note -reduce-r-from::).
+
+     This is the same as calling ‘-tree-reduce’ (*note -tree-reduce::)
+     after ‘-tree-map’ (*note -tree-map::) but is twice as fast as it
+     only traverse the structure once.
+
+          (-tree-mapreduce 'list 'append '(1 (2 (3 4) (5 6)) (7 (8 9))))
+              ⇒ (1 2 3 4 5 6 7 8 9)
+          (--tree-mapreduce 1 (+ it acc) '(1 (2 (4 9) (2 1)) (7 (4 3))))
+              ⇒ 9
+          (--tree-mapreduce 0 (max acc (1+ it)) '(1 (2 (4 9) (2 1)) (7 (4 3))))
+              ⇒ 3
+
+ -- Function: -tree-mapreduce-from (fn folder init-value tree)
+     Apply FN to each element of TREE, and make a list of the results.
+     If elements of TREE are lists themselves, apply FN recursively to
+     elements of these nested lists.
+
+     Then reduce the resulting lists using FOLDER and initial value
+     INIT-VALUE.  See ‘-reduce-r-from’ (*note -reduce-r-from::).
+
+     This is the same as calling ‘-tree-reduce-from’ (*note
+     -tree-reduce-from::) after ‘-tree-map’ (*note -tree-map::) but is
+     twice as fast as it only traverse the structure once.
+
+          (-tree-mapreduce-from 'identity '* 1 '(1 (2 (3 4) (5 6)) (7 (8 9))))
+              ⇒ 362880
+          (--tree-mapreduce-from (+ it it) (cons it acc) nil '(1 (2 (4 9) (2 1)) (7 (4 3))))
+              ⇒ (2 (4 (8 18) (4 2)) (14 (8 6)))
+          (concat "{" (--tree-mapreduce-from (cond ((-cons-pair? it) (concat (symbol-name (car it)) " -> " (symbol-name (cdr it)))) (t (concat (symbol-name it) " : {"))) (concat it (unless (or (equal acc "}") (equal (substring it (1- (length it))) "{")) ", ") acc) "}" '((elisp-mode (foo (bar . booze)) (baz . qux)) (c-mode (foo . bla) (bum . bam)))))
+              ⇒ "{elisp-mode : {foo : {bar -> booze}, baz -> qux}, c-mode : {foo -> bla, bum -> bam}}"
+
+ -- Function: -clone (list)
+     Create a deep copy of LIST.  The new list has the same elements and
+     structure but all cons are replaced with new ones.  This is useful
+     when you need to clone a structure such as plist or alist.
+
+          (let* ((a (list (list 1))) (b (-clone a))) (setcar (car a) 2) b)
+              ⇒ ((1))
+
+
+File: dash.info,  Node: Threading macros,  Next: Binding,  Prev: Tree operations,  Up: Functions
+
+2.12 Threading macros
+=====================
+
+Macros that conditionally combine sequential forms for brevity or
+readability.
+
+ -- Macro: -> (x &optional form &rest more)
+     Thread the expr through the forms.  Insert X as the second item in
+     the first form, making a list of it if it is not a list already.
+     If there are more forms, insert the first form as the second item
+     in second form, etc.
+
+          (-> '(2 3 5))
+              ⇒ (2 3 5)
+          (-> '(2 3 5) (append '(8 13)))
+              ⇒ (2 3 5 8 13)
+          (-> '(2 3 5) (append '(8 13)) (-slice 1 -1))
+              ⇒ (3 5 8)
+
+ -- Macro: ->> (x &optional form &rest more)
+     Thread the expr through the forms.  Insert X as the last item in
+     the first form, making a list of it if it is not a list already.
+     If there are more forms, insert the first form as the last item in
+     second form, etc.
+
+          (->> '(1 2 3) (-map 'square))
+              ⇒ (1 4 9)
+          (->> '(1 2 3) (-map 'square) (-remove 'even?))
+              ⇒ (1 9)
+          (->> '(1 2 3) (-map 'square) (-reduce '+))
+              ⇒ 14
+
+ -- Macro: --> (x &rest forms)
+     Starting with the value of X, thread each expression through FORMS.
+
+     Insert X at the position signified by the symbol ‘it’ in the first
+     form.  If there are more forms, insert the first form at the
+     position signified by ‘it’ in the second form, etc.
+
+          (--> "def" (concat "abc" it "ghi"))
+              ⇒ "abcdefghi"
+          (--> "def" (concat "abc" it "ghi") (upcase it))
+              ⇒ "ABCDEFGHI"
+          (--> "def" (concat "abc" it "ghi") upcase)
+              ⇒ "ABCDEFGHI"
+
+ -- Macro: -as-> (value variable &rest forms)
+     Starting with VALUE, thread VARIABLE through FORMS.
+
+     In the first form, bind VARIABLE to VALUE.  In the second form,
+     bind VARIABLE to the result of the first form, and so forth.
+
+          (-as-> 3 my-var (1+ my-var) (list my-var) (mapcar (lambda (ele) (* 2 ele)) my-var))
+              ⇒ (8)
+          (-as-> 3 my-var 1+)
+              ⇒ 4
+          (-as-> 3 my-var)
+              ⇒ 3
+
+ -- Macro: -some-> (x &optional form &rest more)
+     When expr is non-‘nil’, thread it through the first form (via ‘->’
+     (*note ->::)), and when that result is non-‘nil’, through the next
+     form, etc.
+
+          (-some-> '(2 3 5))
+              ⇒ (2 3 5)
+          (-some-> 5 square)
+              ⇒ 25
+          (-some-> 5 even? square)
+              ⇒ nil
+
+ -- Macro: -some->> (x &optional form &rest more)
+     When expr is non-‘nil’, thread it through the first form (via ‘->>’
+     (*note ->>::)), and when that result is non-‘nil’, through the next
+     form, etc.
+
+          (-some->> '(1 2 3) (-map 'square))
+              ⇒ (1 4 9)
+          (-some->> '(1 3 5) (-last 'even?) (+ 100))
+              ⇒ nil
+          (-some->> '(2 4 6) (-last 'even?) (+ 100))
+              ⇒ 106
+
+ -- Macro: -some--> (expr &rest forms)
+     Thread EXPR through FORMS via ‘-->’ (*note -->::), while the result
+     is non-‘nil’.  When EXPR evaluates to non-‘nil’, thread the result
+     through the first of FORMS, and when that result is non-‘nil’,
+     thread it through the next form, etc.
+
+          (-some--> "def" (concat "abc" it "ghi"))
+              ⇒ "abcdefghi"
+          (-some--> nil (concat "abc" it "ghi"))
+              ⇒ nil
+          (-some--> '(0 1) (-remove #'natnump it) (append it it) (-map #'1+ it))
+              ⇒ ()
+
+ -- Macro: -doto (init &rest forms)
+     Evaluate INIT and pass it as argument to FORMS with ‘->’ (*note
+     ->::).  The RESULT of evaluating INIT is threaded through each of
+     FORMS individually using ‘->’ (*note ->::), which see.  The return
+     value is RESULT, which FORMS may have modified by side effect.
+
+          (-doto (list 1 2 3) pop pop)
+              ⇒ (3)
+          (-doto (cons 1 2) (setcar 3) (setcdr 4))
+              ⇒ (3 . 4)
+          (gethash 'k (--doto (make-hash-table) (puthash 'k 'v it)))
+              ⇒ v
+
+
+File: dash.info,  Node: Binding,  Next: Side effects,  Prev: Threading macros,  Up: Functions
+
+2.13 Binding
+============
+
+Macros that combine ‘let’ and ‘let*’ with destructuring and flow
+control.
+
+ -- Macro: -when-let ((var val) &rest body)
+     If VAL evaluates to non-‘nil’, bind it to VAR and execute body.
+
+     Note: binding is done according to ‘-let’ (*note -let::).
+
+          (-when-let (match-index (string-match "d" "abcd")) (+ match-index 2))
+              ⇒ 5
+          (-when-let ((&plist :foo foo) (list :foo "foo")) foo)
+              ⇒ "foo"
+          (-when-let ((&plist :foo foo) (list :bar "bar")) foo)
+              ⇒ nil
+
+ -- Macro: -when-let* (vars-vals &rest body)
+     If all VALS evaluate to true, bind them to their corresponding VARS
+     and execute body.  VARS-VALS should be a list of (VAR VAL) pairs.
+
+     Note: binding is done according to ‘-let*’ (*note -let*::).  VALS
+     are evaluated sequentially, and evaluation stops after the first
+     ‘nil’ VAL is encountered.
+
+          (-when-let* ((x 5) (y 3) (z (+ y 4))) (+ x y z))
+              ⇒ 15
+          (-when-let* ((x 5) (y nil) (z 7)) (+ x y z))
+              ⇒ nil
+
+ -- Macro: -if-let ((var val) then &rest else)
+     If VAL evaluates to non-‘nil’, bind it to VAR and do THEN,
+     otherwise do ELSE.
+
+     Note: binding is done according to ‘-let’ (*note -let::).
+
+          (-if-let (match-index (string-match "d" "abc")) (+ match-index 3) 7)
+              ⇒ 7
+          (--if-let (even? 4) it nil)
+              ⇒ t
+
+ -- Macro: -if-let* (vars-vals then &rest else)
+     If all VALS evaluate to true, bind them to their corresponding VARS
+     and do THEN, otherwise do ELSE.  VARS-VALS should be a list of (VAR
+     VAL) pairs.
+
+     Note: binding is done according to ‘-let*’ (*note -let*::).  VALS
+     are evaluated sequentially, and evaluation stops after the first
+     ‘nil’ VAL is encountered.
+
+          (-if-let* ((x 5) (y 3) (z 7)) (+ x y z) "foo")
+              ⇒ 15
+          (-if-let* ((x 5) (y nil) (z 7)) (+ x y z) "foo")
+              ⇒ "foo"
+          (-if-let* (((_ _ x) '(nil nil 7))) x)
+              ⇒ 7
+
+ -- Macro: -let (varlist &rest body)
+     Bind variables according to VARLIST then eval BODY.
+
+     VARLIST is a list of lists of the form (PATTERN SOURCE).  Each
+     PATTERN is matched against the SOURCE "structurally".  SOURCE is
+     only evaluated once for each PATTERN.  Each PATTERN is matched
+     recursively, and can therefore contain sub-patterns which are
+     matched against corresponding sub-expressions of SOURCE.
+
+     All the SOURCEs are evalled before any symbols are bound (i.e.  "in
+     parallel").
+
+     If VARLIST only contains one (PATTERN SOURCE) element, you can
+     optionally specify it using a vector and discarding the outer-most
+     parens.  Thus
+
+     (-let ((PATTERN SOURCE)) ...)
+
+     becomes
+
+     (-let [PATTERN SOURCE] ...).
+
+     ‘-let’ (*note -let::) uses a convention of not binding places
+     (symbols) starting with _ whenever it's possible.  You can use this
+     to skip over entries you don't care about.  However, this is not
+     *always* possible (as a result of implementation) and these symbols
+     might get bound to undefined values.
+
+     Following is the overview of supported patterns.  Remember that
+     patterns can be matched recursively, so every a, b, aK in the
+     following can be a matching construct and not necessarily a
+     symbol/variable.
+
+     Symbol:
+
+     a - bind the SOURCE to A.  This is just like regular ‘let’.
+
+     Conses and lists:
+
+     (a) - bind ‘car’ of cons/list to A
+
+     (a .  b) - bind car of cons to A and ‘cdr’ to B
+
+     (a b) - bind car of list to A and ‘cadr’ to B
+
+     (a1 a2 a3 ...) - bind 0th car of list to A1, 1st to A2, 2nd to
+     A3...
+
+     (a1 a2 a3 ... aN .  rest) - as above, but bind the Nth cdr to REST.
+
+     Vectors:
+
+     [a] - bind 0th element of a non-list sequence to A (works with
+     vectors, strings, bit arrays...)
+
+     [a1 a2 a3 ...] - bind 0th element of non-list sequence to A0, 1st
+     to A1, 2nd to A2, ...  If the PATTERN is shorter than SOURCE, the
+     values at places not in PATTERN are ignored.  If the PATTERN is
+     longer than SOURCE, an ‘error’ is thrown.
+
+     [a1 a2 a3 ... &rest rest] - as above, but bind the rest of the
+     sequence to REST.  This is conceptually the same as improper list
+     matching (a1 a2 ... aN .  rest)
+
+     Key/value stores:
+
+     (&plist key0 a0 ... keyN aN) - bind value mapped by keyK in the
+     SOURCE plist to aK. If the value is not found, aK is ‘nil’.  Uses
+     ‘plist-get’ to fetch values.
+
+     (&alist key0 a0 ... keyN aN) - bind value mapped by keyK in the
+     SOURCE alist to aK. If the value is not found, aK is ‘nil’.  Uses
+     ‘assoc’ to fetch values.
+
+     (&hash key0 a0 ... keyN aN) - bind value mapped by keyK in the
+     SOURCE hash table to aK. If the value is not found, aK is ‘nil’.
+     Uses ‘gethash’ to fetch values.
+
+     Further, special keyword &keys supports "inline" matching of
+     plist-like key-value pairs, similarly to &keys keyword of
+     ‘cl-defun’.
+
+     (a1 a2 ... aN &keys key1 b1 ... keyN bK)
+
+     This binds N values from the list to a1 ... aN, then interprets the
+     cdr as a plist (see key/value matching above).
+
+     A shorthand notation for kv-destructuring exists which allows the
+     patterns be optionally left out and derived from the key name in
+     the following fashion:
+
+     - a key :foo is converted into ‘foo’ pattern, - a key 'bar is
+     converted into ‘bar’ pattern, - a key "baz" is converted into ‘baz’
+     pattern.
+
+     That is, the entire value under the key is bound to the derived
+     variable without any further destructuring.
+
+     This is possible only when the form following the key is not a
+     valid pattern (i.e.  not a symbol, a cons cell or a vector).
+     Otherwise the matching proceeds as usual and in case of an invalid
+     spec fails with an error.
+
+     Thus the patterns are normalized as follows:
+
+     ;; derive all the missing patterns (&plist :foo 'bar "baz") =>
+     (&plist :foo foo 'bar bar "baz" baz)
+
+     ;; we can specify some but not others (&plist :foo 'bar
+     explicit-bar) => (&plist :foo foo 'bar explicit-bar)
+
+     ;; nothing happens, we store :foo in x (&plist :foo x) => (&plist
+     :foo x)
+
+     ;; nothing happens, we match recursively (&plist :foo (a b c)) =>
+     (&plist :foo (a b c))
+
+     You can name the source using the syntax SYMBOL &as PATTERN.  This
+     syntax works with lists (proper or improper), vectors and all types
+     of maps.
+
+     (list &as a b c) (list 1 2 3)
+
+     binds A to 1, B to 2, C to 3 and LIST to (1 2 3).
+
+     Similarly:
+
+     (bounds &as beg .  end) (cons 1 2)
+
+     binds BEG to 1, END to 2 and BOUNDS to (1 .  2).
+
+     (items &as first .  rest) (list 1 2 3)
+
+     binds FIRST to 1, REST to (2 3) and ITEMS to (1 2 3)
+
+     [vect &as _ b c] [1 2 3]
+
+     binds B to 2, C to 3 and VECT to [1 2 3] (_ avoids binding as
+     usual).
+
+     (plist &as &plist :b b) (list :a 1 :b 2 :c 3)
+
+     binds B to 2 and PLIST to (:a 1 :b 2 :c 3).  Same for &alist and
+     &hash.
+
+     This is especially useful when we want to capture the result of a
+     computation and destructure at the same time.  Consider the form
+     (function-returning-complex-structure) returning a list of two
+     vectors with two items each.  We want to capture this entire result
+     and pass it to another computation, but at the same time we want to
+     get the second item from each vector.  We can achieve it with
+     pattern
+
+     (result &as [_ a] [_ b]) (function-returning-complex-structure)
+
+     Note: Clojure programmers may know this feature as the ":as
+     binding".  The difference is that we put the &as at the front
+     because we need to support improper list binding.
+
+          (-let (([a (b c) d] [1 (2 3) 4])) (list a b c d))
+              ⇒ (1 2 3 4)
+          (-let [(a b c . d) (list 1 2 3 4 5 6)] (list a b c d))
+              ⇒ (1 2 3 (4 5 6))
+          (-let [(&plist :foo foo :bar bar) (list :baz 3 :foo 1 :qux 4 :bar 2)] (list foo bar))
+              ⇒ (1 2)
+
+ -- Macro: -let* (varlist &rest body)
+     Bind variables according to VARLIST then eval BODY.
+
+     VARLIST is a list of lists of the form (PATTERN SOURCE).  Each
+     PATTERN is matched against the SOURCE structurally.  SOURCE is only
+     evaluated once for each PATTERN.
+
+     Each SOURCE can refer to the symbols already bound by this VARLIST.
+     This is useful if you want to destructure SOURCE recursively but
+     also want to name the intermediate structures.
+
+     See ‘-let’ (*note -let::) for the list of all possible patterns.
+
+          (-let* (((a . b) (cons 1 2)) ((c . d) (cons 3 4))) (list a b c d))
+              ⇒ (1 2 3 4)
+          (-let* (((a . b) (cons 1 (cons 2 3))) ((c . d) b)) (list a b c d))
+              ⇒ (1 (2 . 3) 2 3)
+          (-let* (((&alist "foo" foo "bar" bar) (list (cons "foo" 1) (cons "bar" (list 'a 'b 'c)))) ((a b c) bar)) (list foo a b c bar))
+              ⇒ (1 a b c (a b c))
+
+ -- Macro: -lambda (match-form &rest body)
+     Return a lambda which destructures its input as MATCH-FORM and
+     executes BODY.
+
+     Note that you have to enclose the MATCH-FORM in a pair of parens,
+     such that:
+
+     (-lambda (x) body) (-lambda (x y ...) body)
+
+     has the usual semantics of ‘lambda’.  Furthermore, these get
+     translated into normal ‘lambda’, so there is no performance
+     penalty.
+
+     See ‘-let’ (*note -let::) for a description of the destructuring
+     mechanism.
+
+          (-map (-lambda ((x y)) (+ x y)) '((1 2) (3 4) (5 6)))
+              ⇒ (3 7 11)
+          (-map (-lambda ([x y]) (+ x y)) '([1 2] [3 4] [5 6]))
+              ⇒ (3 7 11)
+          (funcall (-lambda ((_ . a) (_ . b)) (-concat a b)) '(1 2 3) '(4 5 6))
+              ⇒ (2 3 5 6)
+
+ -- Macro: -setq ([match-form val] ...)
+     Bind each MATCH-FORM to the value of its VAL.
+
+     MATCH-FORM destructuring is done according to the rules of ‘-let’
+     (*note -let::).
+
+     This macro allows you to bind multiple variables by destructuring
+     the value, so for example:
+
+     (-setq (a b) x (&plist :c c) plist)
+
+     expands roughly speaking to the following code
+
+     (setq a (car x) b (cadr x) c (plist-get plist :c))
+
+     Care is taken to only evaluate each VAL once so that in case of
+     multiple assignments it does not cause unexpected side effects.
+
+          (let (a) (-setq a 1) a)
+              ⇒ 1
+          (let (a b) (-setq (a b) (list 1 2)) (list a b))
+              ⇒ (1 2)
+          (let (c) (-setq (&plist :c c) (list :c "c")) c)
+              ⇒ "c"
+
+
+File: dash.info,  Node: Side effects,  Next: Destructive operations,  Prev: Binding,  Up: Functions
+
+2.14 Side effects
+=================
+
+Functions iterating over lists for side effect only.
+
+ -- Function: -each (list fn)
+     Call FN on each element of LIST.  Return ‘nil’; this function is
+     intended for side effects.
+
+     Its anaphoric counterpart is ‘--each’.
+
+     For access to the current element's index in LIST, see
+     ‘-each-indexed’ (*note -each-indexed::).
+
+          (let (l) (-each '(1 2 3) (lambda (x) (push x l))) l)
+              ⇒ (3 2 1)
+          (let (l) (--each '(1 2 3) (push it l)) l)
+              ⇒ (3 2 1)
+          (-each '(1 2 3) #'identity)
+              ⇒ nil
+
+ -- Function: -each-while (list pred fn)
+     Call FN on each ITEM in LIST, while (PRED ITEM) is non-‘nil’.  Once
+     an ITEM is reached for which PRED returns ‘nil’, FN is no longer
+     called.  Return ‘nil’; this function is intended for side effects.
+
+     Its anaphoric counterpart is ‘--each-while’.
+
+          (let (l) (-each-while '(2 4 5 6) #'even? (lambda (x) (push x l))) l)
+              ⇒ (4 2)
+          (let (l) (--each-while '(1 2 3 4) (< it 3) (push it l)) l)
+              ⇒ (2 1)
+          (let ((s 0)) (--each-while '(1 3 4 5) (< it 5) (setq s (+ s it))) s)
+              ⇒ 8
+
+ -- Function: -each-indexed (list fn)
+     Call FN on each index and element of LIST.  For each ITEM at INDEX
+     in LIST, call (funcall FN INDEX ITEM).  Return ‘nil’; this function
+     is intended for side effects.
+
+     See also: ‘-map-indexed’ (*note -map-indexed::).
+
+          (let (l) (-each-indexed '(a b c) (lambda (i x) (push (list x i) l))) l)
+              ⇒ ((c 2) (b 1) (a 0))
+          (let (l) (--each-indexed '(a b c) (push (list it it-index) l)) l)
+              ⇒ ((c 2) (b 1) (a 0))
+          (let (l) (--each-indexed () (push it l)) l)
+              ⇒ ()
+
+ -- Function: -each-r (list fn)
+     Call FN on each element of LIST in reversed order.  Return ‘nil’;
+     this function is intended for side effects.
+
+     Its anaphoric counterpart is ‘--each-r’.
+
+          (let (l) (-each-r '(1 2 3) (lambda (x) (push x l))) l)
+              ⇒ (1 2 3)
+          (let (l) (--each-r '(1 2 3) (push it l)) l)
+              ⇒ (1 2 3)
+          (-each-r '(1 2 3) #'identity)
+              ⇒ nil
+
+ -- Function: -each-r-while (list pred fn)
+     Call FN on each ITEM in reversed LIST, while (PRED ITEM) is
+     non-‘nil’.  Once an ITEM is reached for which PRED returns ‘nil’,
+     FN is no longer called.  Return ‘nil’; this function is intended
+     for side effects.
+
+     Its anaphoric counterpart is ‘--each-r-while’.
+
+          (let (l) (-each-r-while '(2 4 5 6) #'even? (lambda (x) (push x l))) l)
+              ⇒ (6)
+          (let (l) (--each-r-while '(1 2 3 4) (>= it 3) (push it l)) l)
+              ⇒ (3 4)
+          (let ((s 0)) (--each-r-while '(1 2 3 5) (> it 1) (setq s (+ s it))) s)
+              ⇒ 10
+
+ -- Function: -dotimes (num fn)
+     Call FN NUM times, presumably for side effects.  FN is called with
+     a single argument on successive integers running from 0, inclusive,
+     to NUM, exclusive.  FN is not called if NUM is less than 1.
+
+     This function's anaphoric counterpart is ‘--dotimes’.
+
+          (let (s) (-dotimes 3 (lambda (n) (push n s))) s)
+              ⇒ (2 1 0)
+          (let (s) (-dotimes 0 (lambda (n) (push n s))) s)
+              ⇒ ()
+          (let (s) (--dotimes 5 (push it s)) s)
+              ⇒ (4 3 2 1 0)
+
+
+File: dash.info,  Node: Destructive operations,  Next: Function combinators,  Prev: Side effects,  Up: Functions
+
+2.15 Destructive operations
+===========================
+
+Macros that modify variables holding lists.
+
+ -- Macro: !cons (car cdr)
+     Destructive: Set CDR to the cons of CAR and CDR.
+
+          (let (l) (!cons 5 l) l)
+              ⇒ (5)
+          (let ((l '(3))) (!cons 5 l) l)
+              ⇒ (5 3)
+
+ -- Macro: !cdr (list)
+     Destructive: Set LIST to the cdr of LIST.
+
+          (let ((l '(3))) (!cdr l) l)
+              ⇒ ()
+          (let ((l '(3 5))) (!cdr l) l)
+              ⇒ (5)
+
+
+File: dash.info,  Node: Function combinators,  Prev: Destructive operations,  Up: Functions
+
+2.16 Function combinators
+=========================
+
+Functions that manipulate and compose other functions.
+
+ -- Function: -partial (fun &rest args)
+     Return a function that is a partial application of FUN to ARGS.
+     ARGS is a list of the first N arguments to pass to FUN.  The result
+     is a new function which does the same as FUN, except that the first
+     N arguments are fixed at the values with which this function was
+     called.
+
+          (funcall (-partial #'+ 5))
+              ⇒ 5
+          (funcall (-partial #'- 5) 3)
+              ⇒ 2
+          (funcall (-partial #'+ 5 2) 3)
+              ⇒ 10
+
+ -- Function: -rpartial (fn &rest args)
+     Return a function that is a partial application of FN to ARGS.
+     ARGS is a list of the last N arguments to pass to FN.  The result
+     is a new function which does the same as FN, except that the last N
+     arguments are fixed at the values with which this function was
+     called.  This is like ‘-partial’ (*note -partial::), except the
+     arguments are fixed starting from the right rather than the left.
+
+          (funcall (-rpartial #'- 5))
+              ⇒ -5
+          (funcall (-rpartial #'- 5) 8)
+              ⇒ 3
+          (funcall (-rpartial #'- 5 2) 10)
+              ⇒ 3
+
+ -- Function: -juxt (&rest fns)
+     Return a function that is the juxtaposition of FNS.  The returned
+     function takes a variable number of ARGS, applies each of FNS in
+     turn to ARGS, and returns the list of results.
+
+          (funcall (-juxt) 1 2)
+              ⇒ ()
+          (funcall (-juxt #'+ #'- #'* #'/) 7 5)
+              ⇒ (12 2 35 1)
+          (mapcar (-juxt #'number-to-string #'1+) '(1 2))
+              ⇒ (("1" 2) ("2" 3))
+
+ -- Function: -compose (&rest fns)
+     Compose FNS into a single composite function.  Return a function
+     that takes a variable number of ARGS, applies the last function in
+     FNS to ARGS, and returns the result of calling each remaining
+     function on the result of the previous function, right-to-left.  If
+     no FNS are given, return a variadic ‘identity’ function.
+
+          (funcall (-compose #'- #'1+ #'+) 1 2 3)
+              ⇒ -7
+          (funcall (-compose #'identity #'1+) 3)
+              ⇒ 4
+          (mapcar (-compose #'not #'stringp) '(nil ""))
+              ⇒ (t nil)
+
+ -- Function: -applify (fn)
+     Return a function that applies FN to a single list of args.  This
+     changes the arity of FN from taking N distinct arguments to taking
+     1 argument which is a list of N arguments.
+
+          (funcall (-applify #'+) nil)
+              ⇒ 0
+          (mapcar (-applify #'+) '((1 1 1) (1 2 3) (5 5 5)))
+              ⇒ (3 6 15)
+          (funcall (-applify #'<) '(3 6))
+              ⇒ t
+
+ -- Function: -on (op trans)
+     Return a function that calls TRANS on each arg and OP on the
+     results.  The returned function takes a variable number of
+     arguments, calls the function TRANS on each one in turn, and then
+     passes those results as the list of arguments to OP, in the same
+     order.
+
+     For example, the following pairs of expressions are morally
+     equivalent:
+
+     (funcall (-on #'+ #'1+) 1 2 3) = (+ (1+ 1) (1+ 2) (1+ 3)) (funcall
+     (-on #'+ #'1+)) = (+)
+
+          (-sort (-on #'< #'length) '((1 2 3) (1) (1 2)))
+              ⇒ ((1) (1 2) (1 2 3))
+          (funcall (-on #'min #'string-to-number) "22" "2" "1" "12")
+              ⇒ 1
+          (-min-by (-on #'> #'length) '((1 2 3) (4) (1 2)))
+              ⇒ (4)
+
+ -- Function: -flip (fn)
+     Return a function that calls FN with its arguments reversed.  The
+     returned function takes the same number of arguments as FN.
+
+     For example, the following two expressions are morally equivalent:
+
+     (funcall (-flip #'-) 1 2) = (- 2 1)
+
+     See also: ‘-rotate-args’ (*note -rotate-args::).
+
+          (-sort (-flip #'<) '(4 3 6 1))
+              ⇒ (6 4 3 1)
+          (funcall (-flip #'-) 3 2 1 10)
+              ⇒ 4
+          (funcall (-flip #'1+) 1)
+              ⇒ 2
+
+ -- Function: -rotate-args (n fn)
+     Return a function that calls FN with args rotated N places to the
+     right.  The returned function takes the same number of arguments as
+     FN, rotates the list of arguments N places to the right (left if N
+     is negative) just like ‘-rotate’ (*note -rotate::), and applies FN
+     to the result.
+
+     See also: ‘-flip’ (*note -flip::).
+
+          (funcall (-rotate-args -1 #'list) 1 2 3 4)
+              ⇒ (2 3 4 1)
+          (funcall (-rotate-args 1 #'-) 1 10 100)
+              ⇒ 89
+          (funcall (-rotate-args 2 #'list) 3 4 5 1 2)
+              ⇒ (1 2 3 4 5)
+
+ -- Function: -const (c)
+     Return a function that returns C ignoring any additional arguments.
+
+     In types: a -> b -> a
+
+          (funcall (-const 2) 1 3 "foo")
+              ⇒ 2
+          (mapcar (-const 1) '("a" "b" "c" "d"))
+              ⇒ (1 1 1 1)
+          (-sum (mapcar (-const 1) '("a" "b" "c" "d")))
+              ⇒ 4
+
+ -- Macro: -cut (&rest params)
+     Take n-ary function and n arguments and specialize some of them.
+     Arguments denoted by <> will be left unspecialized.
+
+     See SRFI-26 for detailed description.
+
+          (funcall (-cut list 1 <> 3 <> 5) 2 4)
+              ⇒ (1 2 3 4 5)
+          (-map (-cut funcall <> 5) `(1+ 1- ,(lambda (x) (/ 1.0 x))))
+              ⇒ (6 4 0.2)
+          (-map (-cut <> 1 2 3) '(list vector string))
+              ⇒ ((1 2 3) [1 2 3] "\1\2\3")
+
+ -- Function: -not (pred)
+     Return a predicate that negates the result of PRED.  The returned
+     predicate passes its arguments to PRED.  If PRED returns ‘nil’, the
+     result is non-‘nil’; otherwise the result is ‘nil’.
+
+     See also: ‘-andfn’ (*note -andfn::) and ‘-orfn’ (*note -orfn::).
+
+          (funcall (-not #'numberp) "5")
+              ⇒ t
+          (-sort (-not #'<) '(5 2 1 0 6))
+              ⇒ (6 5 2 1 0)
+          (-filter (-not (-partial #'< 4)) '(1 2 3 4 5 6 7 8))
+              ⇒ (1 2 3 4)
+
+ -- Function: -orfn (&rest preds)
+     Return a predicate that returns the first non-‘nil’ result of
+     PREDS.  The returned predicate takes a variable number of
+     arguments, passes them to each predicate in PREDS in turn until one
+     of them returns non-‘nil’, and returns that non-‘nil’ result
+     without calling the remaining PREDS.  If all PREDS return ‘nil’, or
+     if no PREDS are given, the returned predicate returns ‘nil’.
+
+     See also: ‘-andfn’ (*note -andfn::) and ‘-not’ (*note -not::).
+
+          (-filter (-orfn #'natnump #'booleanp) '(1 nil "a" -4 b c t))
+              ⇒ (1 nil t)
+          (funcall (-orfn #'symbolp (-cut string-match-p "x" <>)) "axe")
+              ⇒ 1
+          (funcall (-orfn #'= #'+) 1 1)
+              ⇒ t
+
+ -- Function: -andfn (&rest preds)
+     Return a predicate that returns non-‘nil’ if all PREDS do so.  The
+     returned predicate P takes a variable number of arguments and
+     passes them to each predicate in PREDS in turn.  If any one of
+     PREDS returns ‘nil’, P also returns ‘nil’ without calling the
+     remaining PREDS.  If all PREDS return non-‘nil’, P returns the last
+     such value.  If no PREDS are given, P always returns non-‘nil’.
+
+     See also: ‘-orfn’ (*note -orfn::) and ‘-not’ (*note -not::).
+
+          (-filter (-andfn #'numberp (-cut < <> 5)) '(a 1 b 6 c 2))
+              ⇒ (1 2)
+          (mapcar (-andfn #'numberp #'1+) '(a 1 b 6))
+              ⇒ (nil 2 nil 7)
+          (funcall (-andfn #'= #'+) 1 1)
+              ⇒ 2
+
+ -- Function: -iteratefn (fn n)
+     Return a function FN composed N times with itself.
+
+     FN is a unary function.  If you need to use a function of higher
+     arity, use ‘-applify’ (*note -applify::) first to turn it into a
+     unary function.
+
+     With n = 0, this acts as identity function.
+
+     In types: (a -> a) -> Int -> a -> a.
+
+     This function satisfies the following law:
+
+     (funcall (-iteratefn fn n) init) = (-last-item (-iterate fn init
+     (1+ n))).
+
+          (funcall (-iteratefn (lambda (x) (* x x)) 3) 2)
+              ⇒ 256
+          (funcall (-iteratefn '1+ 3) 1)
+              ⇒ 4
+          (funcall (-iteratefn 'cdr 3) '(1 2 3 4 5))
+              ⇒ (4 5)
+
+ -- Function: -fixfn (fn &optional equal-test halt-test)
+     Return a function that computes the (least) fixpoint of FN.
+
+     FN must be a unary function.  The returned lambda takes a single
+     argument, X, the initial value for the fixpoint iteration.  The
+     iteration halts when either of the following conditions is
+     satisfied:
+
+     1.  Iteration converges to the fixpoint, with equality being tested
+     using EQUAL-TEST.  If EQUAL-TEST is not specified, ‘equal’ is used.
+     For functions over the floating point numbers, it may be necessary
+     to provide an appropriate approximate comparison test.
+
+     2.  HALT-TEST returns a non-‘nil’ value.  HALT-TEST defaults to a
+     simple counter that returns ‘t’ after ‘-fixfn-max-iterations’, to
+     guard against infinite iteration.  Otherwise, HALT-TEST must be a
+     function that accepts a single argument, the current value of X,
+     and returns non-‘nil’ as long as iteration should continue.  In
+     this way, a more sophisticated convergence test may be supplied by
+     the caller.
+
+     The return value of the lambda is either the fixpoint or, if
+     iteration halted before converging, a cons with car ‘halted’ and
+     cdr the final output from HALT-TEST.
+
+     In types: (a -> a) -> a -> a.
+
+          (funcall (-fixfn #'cos #'approx=) 0.7)
+              ⇒ 0.7390851332151607
+          (funcall (-fixfn (lambda (x) (expt (+ x 10) 0.25))) 2.0)
+              ⇒ 1.8555845286409378
+          (funcall (-fixfn #'sin #'approx=) 0.1)
+              ⇒ (halted . t)
+
+ -- Function: -prodfn (&rest fns)
+     Return a function that applies each of FNS to each of a list of
+     arguments.
+
+     Takes a list of N functions and returns a function that takes a
+     list of length N, applying Ith function to Ith element of the input
+     list.  Returns a list of length N.
+
+     In types (for N=2): ((a -> b), (c -> d)) -> (a, c) -> (b, d)
+
+     This function satisfies the following laws:
+
+     (-compose (-prodfn f g ...) (-prodfn f' g' ...)) = (-prodfn
+     (-compose f f') (-compose g g') ...)
+
+     (-prodfn f g ...) = (-juxt (-compose f (-partial #'nth 0))
+     (-compose g (-partial #'nth 1)) ...)
+
+     (-compose (-prodfn f g ...) (-juxt f' g' ...)) = (-juxt (-compose f
+     f') (-compose g g') ...)
+
+     (-compose (-partial #'nth n) (-prod f1 f2 ...)) = (-compose fn
+     (-partial #'nth n))
+
+          (funcall (-prodfn #'1+ #'1- #'number-to-string) '(1 2 3))
+              ⇒ (2 1 "3")
+          (-map (-prodfn #'1- #'1+) '((1 2) (3 4) (5 6)))
+              ⇒ ((0 3) (2 5) (4 7))
+          (apply #'+ (funcall (-prodfn #'length #'string-to-number) '((t) "5")))
+              ⇒ 6
+
+
+File: dash.info,  Node: Development,  Next: FDL,  Prev: Functions,  Up: Top
+
+3 Development
+*************
+
+The Dash repository is hosted on GitHub at
+<https://github.com/magnars/dash.el>.
+
+* Menu:
+
+* Contribute::          How to contribute.
+* Contributors::        List of contributors.
+
+
+File: dash.info,  Node: Contribute,  Next: Contributors,  Up: Development
+
+3.1 Contribute
+==============
+
+Yes, please do.  Pure functions in the list manipulation realm only,
+please.  There's a suite of examples/tests in ‘dev/examples.el’, so
+remember to add tests for your additions, or they may get broken later.
+
+   Run the tests with ‘make check’.  Regenerate the docs with ‘make
+docs’.  Contributors are encouraged to install these commands as a Git
+pre-commit hook, so that the tests are always running and the docs are
+always in sync:
+
+     $ cp dev/pre-commit.sh .git/hooks/pre-commit
+
+   Oh, and don't edit ‘README.md’ or ‘dash.texi’ directly, as they are
+auto-generated.  Instead, change their respective templates
+‘readme-template.md’ or ‘dash-template.texi’.
+
+   To ensure that Dash can be distributed with GNU ELPA or Emacs, we
+require that all contributors assign copyright to the Free Software
+Foundation.  For more on this, *note (emacs)Copyright Assignment::.
+
+
+File: dash.info,  Node: Contributors,  Prev: Contribute,  Up: Development
+
+3.2 Contributors
+================
+
+   • Matus Goljer (https://github.com/Fuco1) contributed lots of
+     features and functions.
+   • Takafumi Arakaki (https://github.com/tkf) contributed ‘-group-by’.
+   • tali713 (https://github.com/tali713) is the author of ‘-applify’.
+   • Víctor M. Valenzuela (https://github.com/vemv) contributed
+     ‘-repeat’.
+   • Nic Ferrier (https://github.com/nicferrier) contributed ‘-cons*’.
+   • Wilfred Hughes (https://github.com/Wilfred) contributed ‘-slice’,
+     ‘-first-item’, and ‘-last-item’.
+   • Emanuel Evans (https://github.com/shosti) contributed ‘-if-let’,
+     ‘-when-let’, and ‘-insert-at’.
+   • Johan Andersson (https://github.com/rejeep) contributed ‘-sum’,
+     ‘-product’, and ‘-same-items?’.
+   • Christina Whyte (https://github.com/kurisuwhyte) contributed
+     ‘-compose’.
+   • Steve Lamb (https://github.com/steventlamb) contributed ‘-cycle’,
+     ‘-pad’, ‘-annotate’, ‘-zip-fill’, and a variadic version of ‘-zip’.
+   • Fredrik Bergroth (https://github.com/fbergroth) made the ‘-if-let’
+     family use ‘-let’ destructuring and improved the script for
+     generating documentation.
+   • Mark Oteiza (https://github.com/holomorph) contributed ‘-iota’ and
+     the script to create an Info manual.
+   • Vasilij Schneidermann (https://github.com/wasamasa) contributed
+     ‘-some’.
+   • William West (https://github.com/occidens) made ‘-fixfn’ more
+     robust at handling floats.
+   • Cam Saul (https://github.com/camsaul) contributed ‘-some->’,
+     ‘-some->>’, and ‘-some-->’.
+   • Basil L. Contovounesios (https://github.com/basil-conto)
+     contributed ‘-common-prefix’, ‘-common-suffix’, and various other
+     improvements.
+   • Paul Pogonyshev (https://github.com/doublep) contributed ‘-each-r’
+     and ‘-each-r-while’.
+
+   Thanks!
+
+   New contributors are very welcome.  *Note Contribute::.
+
+
+File: dash.info,  Node: FDL,  Next: GPL,  Prev: Development,  Up: Top
+
+Appendix A GNU Free Documentation License
+*****************************************
+
+                     Version 1.3, 3 November 2008
+
+     Copyright © 2000, 2001, 2002, 2007, 2008 Free Software Foundation, Inc.
+     <https://fsf.org/>
+
+     Everyone is permitted to copy and distribute verbatim copies
+     of this license document, but changing it is not allowed.
+
+  0. PREAMBLE
+
+     The purpose of this License is to make a manual, textbook, or other
+     functional and useful document “free” in the sense of freedom: to
+     assure everyone the effective freedom to copy and redistribute it,
+     with or without modifying it, either commercially or
+     noncommercially.  Secondarily, this License preserves for the
+     author and publisher a way to get credit for their work, while not
+     being considered responsible for modifications made by others.
+
+     This License is a kind of "copyleft", which means that derivative
+     works of the document must themselves be free in the same sense.
+     It complements the GNU General Public License, which is a copyleft
+     license designed for free software.
+
+     We have designed this License in order to use it for manuals for
+     free software, because free software needs free documentation: a
+     free program should come with manuals providing the same freedoms
+     that the software does.  But this License is not limited to
+     software manuals; it can be used for any textual work, regardless
+     of subject matter or whether it is published as a printed book.  We
+     recommend this License principally for works whose purpose is
+     instruction or reference.
+
+  1. APPLICABILITY AND DEFINITIONS
+
+     This License applies to any manual or other work, in any medium,
+     that contains a notice placed by the copyright holder saying it can
+     be distributed under the terms of this License.  Such a notice
+     grants a world-wide, royalty-free license, unlimited in duration,
+     to use that work under the conditions stated herein.  The
+     "Document", below, refers to any such manual or work.  Any member
+     of the public is a licensee, and is addressed as "you".  You accept
+     the license if you copy, modify or distribute the work in a way
+     requiring permission under copyright law.
+
+     A "Modified Version" of the Document means any work containing the
+     Document or a portion of it, either copied verbatim, or with
+     modifications and/or translated into another language.
+
+     A "Secondary Section" is a named appendix or a front-matter section
+     of the Document that deals exclusively with the relationship of the
+     publishers or authors of the Document to the Document's overall
+     subject (or to related matters) and contains nothing that could
+     fall directly within that overall subject.  (Thus, if the Document
+     is in part a textbook of mathematics, a Secondary Section may not
+     explain any mathematics.)  The relationship could be a matter of
+     historical connection with the subject or with related matters, or
+     of legal, commercial, philosophical, ethical or political position
+     regarding them.
+
+     The "Invariant Sections" are certain Secondary Sections whose
+     titles are designated, as being those of Invariant Sections, in the
+     notice that says that the Document is released under this License.
+     If a section does not fit the above definition of Secondary then it
+     is not allowed to be designated as Invariant.  The Document may
+     contain zero Invariant Sections.  If the Document does not identify
+     any Invariant Sections then there are none.
+
+     The "Cover Texts" are certain short passages of text that are
+     listed, as Front-Cover Texts or Back-Cover Texts, in the notice
+     that says that the Document is released under this License.  A
+     Front-Cover Text may be at most 5 words, and a Back-Cover Text may
+     be at most 25 words.
+
+     A "Transparent" copy of the Document means a machine-readable copy,
+     represented in a format whose specification is available to the
+     general public, that is suitable for revising the document
+     straightforwardly with generic text editors or (for images composed
+     of pixels) generic paint programs or (for drawings) some widely
+     available drawing editor, and that is suitable for input to text
+     formatters or for automatic translation to a variety of formats
+     suitable for input to text formatters.  A copy made in an otherwise
+     Transparent file format whose markup, or absence of markup, has
+     been arranged to thwart or discourage subsequent modification by
+     readers is not Transparent.  An image format is not Transparent if
+     used for any substantial amount of text.  A copy that is not
+     "Transparent" is called "Opaque".
+
+     Examples of suitable formats for Transparent copies include plain
+     ASCII without markup, Texinfo input format, LaTeX input format,
+     SGML or XML using a publicly available DTD, and standard-conforming
+     simple HTML, PostScript or PDF designed for human modification.
+     Examples of transparent image formats include PNG, XCF and JPG.
+     Opaque formats include proprietary formats that can be read and
+     edited only by proprietary word processors, SGML or XML for which
+     the DTD and/or processing tools are not generally available, and
+     the machine-generated HTML, PostScript or PDF produced by some word
+     processors for output purposes only.
+
+     The "Title Page" means, for a printed book, the title page itself,
+     plus such following pages as are needed to hold, legibly, the
+     material this License requires to appear in the title page.  For
+     works in formats which do not have any title page as such, "Title
+     Page" means the text near the most prominent appearance of the
+     work's title, preceding the beginning of the body of the text.
+
+     The "publisher" means any person or entity that distributes copies
+     of the Document to the public.
+
+     A section "Entitled XYZ" means a named subunit of the Document
+     whose title either is precisely XYZ or contains XYZ in parentheses
+     following text that translates XYZ in another language.  (Here XYZ
+     stands for a specific section name mentioned below, such as
+     "Acknowledgements", "Dedications", "Endorsements", or "History".)
+     To "Preserve the Title" of such a section when you modify the
+     Document means that it remains a section "Entitled XYZ" according
+     to this definition.
+
+     The Document may include Warranty Disclaimers next to the notice
+     which states that this License applies to the Document.  These
+     Warranty Disclaimers are considered to be included by reference in
+     this License, but only as regards disclaiming warranties: any other
+     implication that these Warranty Disclaimers may have is void and
+     has no effect on the meaning of this License.
+
+  2. VERBATIM COPYING
+
+     You may copy and distribute the Document in any medium, either
+     commercially or noncommercially, provided that this License, the
+     copyright notices, and the license notice saying this License
+     applies to the Document are reproduced in all copies, and that you
+     add no other conditions whatsoever to those of this License.  You
+     may not use technical measures to obstruct or control the reading
+     or further copying of the copies you make or distribute.  However,
+     you may accept compensation in exchange for copies.  If you
+     distribute a large enough number of copies you must also follow the
+     conditions in section 3.
+
+     You may also lend copies, under the same conditions stated above,
+     and you may publicly display copies.
+
+  3. COPYING IN QUANTITY
+
+     If you publish printed copies (or copies in media that commonly
+     have printed covers) of the Document, numbering more than 100, and
+     the Document's license notice requires Cover Texts, you must
+     enclose the copies in covers that carry, clearly and legibly, all
+     these Cover Texts: Front-Cover Texts on the front cover, and
+     Back-Cover Texts on the back cover.  Both covers must also clearly
+     and legibly identify you as the publisher of these copies.  The
+     front cover must present the full title with all words of the title
+     equally prominent and visible.  You may add other material on the
+     covers in addition.  Copying with changes limited to the covers, as
+     long as they preserve the title of the Document and satisfy these
+     conditions, can be treated as verbatim copying in other respects.
+
+     If the required texts for either cover are too voluminous to fit
+     legibly, you should put the first ones listed (as many as fit
+     reasonably) on the actual cover, and continue the rest onto
+     adjacent pages.
+
+     If you publish or distribute Opaque copies of the Document
+     numbering more than 100, you must either include a machine-readable
+     Transparent copy along with each Opaque copy, or state in or with
+     each Opaque copy a computer-network location from which the general
+     network-using public has access to download using public-standard
+     network protocols a complete Transparent copy of the Document, free
+     of added material.  If you use the latter option, you must take
+     reasonably prudent steps, when you begin distribution of Opaque
+     copies in quantity, to ensure that this Transparent copy will
+     remain thus accessible at the stated location until at least one
+     year after the last time you distribute an Opaque copy (directly or
+     through your agents or retailers) of that edition to the public.
+
+     It is requested, but not required, that you contact the authors of
+     the Document well before redistributing any large number of copies,
+     to give them a chance to provide you with an updated version of the
+     Document.
+
+  4. MODIFICATIONS
+
+     You may copy and distribute a Modified Version of the Document
+     under the conditions of sections 2 and 3 above, provided that you
+     release the Modified Version under precisely this License, with the
+     Modified Version filling the role of the Document, thus licensing
+     distribution and modification of the Modified Version to whoever
+     possesses a copy of it.  In addition, you must do these things in
+     the Modified Version:
+
+       A. Use in the Title Page (and on the covers, if any) a title
+          distinct from that of the Document, and from those of previous
+          versions (which should, if there were any, be listed in the
+          History section of the Document).  You may use the same title
+          as a previous version if the original publisher of that
+          version gives permission.
+
+       B. List on the Title Page, as authors, one or more persons or
+          entities responsible for authorship of the modifications in
+          the Modified Version, together with at least five of the
+          principal authors of the Document (all of its principal
+          authors, if it has fewer than five), unless they release you
+          from this requirement.
+
+       C. State on the Title page the name of the publisher of the
+          Modified Version, as the publisher.
+
+       D. Preserve all the copyright notices of the Document.
+
+       E. Add an appropriate copyright notice for your modifications
+          adjacent to the other copyright notices.
+
+       F. Include, immediately after the copyright notices, a license
+          notice giving the public permission to use the Modified
+          Version under the terms of this License, in the form shown in
+          the Addendum below.
+
+       G. Preserve in that license notice the full lists of Invariant
+          Sections and required Cover Texts given in the Document's
+          license notice.
+
+       H. Include an unaltered copy of this License.
+
+       I. Preserve the section Entitled "History", Preserve its Title,
+          and add to it an item stating at least the title, year, new
+          authors, and publisher of the Modified Version as given on the
+          Title Page.  If there is no section Entitled "History" in the
+          Document, create one stating the title, year, authors, and
+          publisher of the Document as given on its Title Page, then add
+          an item describing the Modified Version as stated in the
+          previous sentence.
+
+       J. Preserve the network location, if any, given in the Document
+          for public access to a Transparent copy of the Document, and
+          likewise the network locations given in the Document for
+          previous versions it was based on.  These may be placed in the
+          "History" section.  You may omit a network location for a work
+          that was published at least four years before the Document
+          itself, or if the original publisher of the version it refers
+          to gives permission.
+
+       K. For any section Entitled "Acknowledgements" or "Dedications",
+          Preserve the Title of the section, and preserve in the section
+          all the substance and tone of each of the contributor
+          acknowledgements and/or dedications given therein.
+
+       L. Preserve all the Invariant Sections of the Document, unaltered
+          in their text and in their titles.  Section numbers or the
+          equivalent are not considered part of the section titles.
+
+       M. Delete any section Entitled "Endorsements".  Such a section
+          may not be included in the Modified Version.
+
+       N. Do not retitle any existing section to be Entitled
+          "Endorsements" or to conflict in title with any Invariant
+          Section.
+
+       O. Preserve any Warranty Disclaimers.
+
+     If the Modified Version includes new front-matter sections or
+     appendices that qualify as Secondary Sections and contain no
+     material copied from the Document, you may at your option designate
+     some or all of these sections as invariant.  To do this, add their
+     titles to the list of Invariant Sections in the Modified Version's
+     license notice.  These titles must be distinct from any other
+     section titles.
+
+     You may add a section Entitled "Endorsements", provided it contains
+     nothing but endorsements of your Modified Version by various
+     parties--for example, statements of peer review or that the text
+     has been approved by an organization as the authoritative
+     definition of a standard.
+
+     You may add a passage of up to five words as a Front-Cover Text,
+     and a passage of up to 25 words as a Back-Cover Text, to the end of
+     the list of Cover Texts in the Modified Version.  Only one passage
+     of Front-Cover Text and one of Back-Cover Text may be added by (or
+     through arrangements made by) any one entity.  If the Document
+     already includes a cover text for the same cover, previously added
+     by you or by arrangement made by the same entity you are acting on
+     behalf of, you may not add another; but you may replace the old
+     one, on explicit permission from the previous publisher that added
+     the old one.
+
+     The author(s) and publisher(s) of the Document do not by this
+     License give permission to use their names for publicity for or to
+     assert or imply endorsement of any Modified Version.
+
+  5. COMBINING DOCUMENTS
+
+     You may combine the Document with other documents released under
+     this License, under the terms defined in section 4 above for
+     modified versions, provided that you include in the combination all
+     of the Invariant Sections of all of the original documents,
+     unmodified, and list them all as Invariant Sections of your
+     combined work in its license notice, and that you preserve all
+     their Warranty Disclaimers.
+
+     The combined work need only contain one copy of this License, and
+     multiple identical Invariant Sections may be replaced with a single
+     copy.  If there are multiple Invariant Sections with the same name
+     but different contents, make the title of each such section unique
+     by adding at the end of it, in parentheses, the name of the
+     original author or publisher of that section if known, or else a
+     unique number.  Make the same adjustment to the section titles in
+     the list of Invariant Sections in the license notice of the
+     combined work.
+
+     In the combination, you must combine any sections Entitled
+     "History" in the various original documents, forming one section
+     Entitled "History"; likewise combine any sections Entitled
+     "Acknowledgements", and any sections Entitled "Dedications".  You
+     must delete all sections Entitled "Endorsements."
+
+  6. COLLECTIONS OF DOCUMENTS
+
+     You may make a collection consisting of the Document and other
+     documents released under this License, and replace the individual
+     copies of this License in the various documents with a single copy
+     that is included in the collection, provided that you follow the
+     rules of this License for verbatim copying of each of the documents
+     in all other respects.
+
+     You may extract a single document from such a collection, and
+     distribute it individually under this License, provided you insert
+     a copy of this License into the extracted document, and follow this
+     License in all other respects regarding verbatim copying of that
+     document.
+
+  7. AGGREGATION WITH INDEPENDENT WORKS
+
+     A compilation of the Document or its derivatives with other
+     separate and independent documents or works, in or on a volume of a
+     storage or distribution medium, is called an "aggregate" if the
+     copyright resulting from the compilation is not used to limit the
+     legal rights of the compilation's users beyond what the individual
+     works permit.  When the Document is included in an aggregate, this
+     License does not apply to the other works in the aggregate which
+     are not themselves derivative works of the Document.
+
+     If the Cover Text requirement of section 3 is applicable to these
+     copies of the Document, then if the Document is less than one half
+     of the entire aggregate, the Document's Cover Texts may be placed
+     on covers that bracket the Document within the aggregate, or the
+     electronic equivalent of covers if the Document is in electronic
+     form.  Otherwise they must appear on printed covers that bracket
+     the whole aggregate.
+
+  8. TRANSLATION
+
+     Translation is considered a kind of modification, so you may
+     distribute translations of the Document under the terms of section
+     4.  Replacing Invariant Sections with translations requires special
+     permission from their copyright holders, but you may include
+     translations of some or all Invariant Sections in addition to the
+     original versions of these Invariant Sections.  You may include a
+     translation of this License, and all the license notices in the
+     Document, and any Warranty Disclaimers, provided that you also
+     include the original English version of this License and the
+     original versions of those notices and disclaimers.  In case of a
+     disagreement between the translation and the original version of
+     this License or a notice or disclaimer, the original version will
+     prevail.
+
+     If a section in the Document is Entitled "Acknowledgements",
+     "Dedications", or "History", the requirement (section 4) to
+     Preserve its Title (section 1) will typically require changing the
+     actual title.
+
+  9. TERMINATION
+
+     You may not copy, modify, sublicense, or distribute the Document
+     except as expressly provided under this License.  Any attempt
+     otherwise to copy, modify, sublicense, or distribute it is void,
+     and will automatically terminate your rights under this License.
+
+     However, if you cease all violation of this License, then your
+     license from a particular copyright holder is reinstated (a)
+     provisionally, unless and until the copyright holder explicitly and
+     finally terminates your license, and (b) permanently, if the
+     copyright holder fails to notify you of the violation by some
+     reasonable means prior to 60 days after the cessation.
+
+     Moreover, your license from a particular copyright holder is
+     reinstated permanently if the copyright holder notifies you of the
+     violation by some reasonable means, this is the first time you have
+     received notice of violation of this License (for any work) from
+     that copyright holder, and you cure the violation prior to 30 days
+     after your receipt of the notice.
+
+     Termination of your rights under this section does not terminate
+     the licenses of parties who have received copies or rights from you
+     under this License.  If your rights have been terminated and not
+     permanently reinstated, receipt of a copy of some or all of the
+     same material does not give you any rights to use it.
+
+  10. FUTURE REVISIONS OF THIS LICENSE
+
+     The Free Software Foundation may publish new, revised versions of
+     the GNU Free Documentation License from time to time.  Such new
+     versions will be similar in spirit to the present version, but may
+     differ in detail to address new problems or concerns.  See
+     <https://www.gnu.org/licenses/>.
+
+     Each version of the License is given a distinguishing version
+     number.  If the Document specifies that a particular numbered
+     version of this License "or any later version" applies to it, you
+     have the option of following the terms and conditions either of
+     that specified version or of any later version that has been
+     published (not as a draft) by the Free Software Foundation.  If the
+     Document does not specify a version number of this License, you may
+     choose any version ever published (not as a draft) by the Free
+     Software Foundation.  If the Document specifies that a proxy can
+     decide which future versions of this License can be used, that
+     proxy's public statement of acceptance of a version permanently
+     authorizes you to choose that version for the Document.
+
+  11. RELICENSING
+
+     "Massive Multiauthor Collaboration Site" (or "MMC Site") means any
+     World Wide Web server that publishes copyrightable works and also
+     provides prominent facilities for anybody to edit those works.  A
+     public wiki that anybody can edit is an example of such a server.
+     A "Massive Multiauthor Collaboration" (or "MMC") contained in the
+     site means any set of copyrightable works thus published on the MMC
+     site.
+
+     "CC-BY-SA" means the Creative Commons Attribution-Share Alike 3.0
+     license published by Creative Commons Corporation, a not-for-profit
+     corporation with a principal place of business in San Francisco,
+     California, as well as future copyleft versions of that license
+     published by that same organization.
+
+     "Incorporate" means to publish or republish a Document, in whole or
+     in part, as part of another Document.
+
+     An MMC is "eligible for relicensing" if it is licensed under this
+     License, and if all works that were first published under this
+     License somewhere other than this MMC, and subsequently
+     incorporated in whole or in part into the MMC, (1) had no cover
+     texts or invariant sections, and (2) were thus incorporated prior
+     to November 1, 2008.
+
+     The operator of an MMC Site may republish an MMC contained in the
+     site under CC-BY-SA on the same site at any time before August 1,
+     2009, provided the MMC is eligible for relicensing.
+
+ADDENDUM: How to use this License for your documents
+====================================================
+
+To use this License in a document you have written, include a copy of
+the License in the document and put the following copyright and license
+notices just after the title page:
+
+       Copyright (C)  YEAR  YOUR NAME.
+       Permission is granted to copy, distribute and/or modify this document
+       under the terms of the GNU Free Documentation License, Version 1.3
+       or any later version published by the Free Software Foundation;
+       with no Invariant Sections, no Front-Cover Texts, and no Back-Cover
+       Texts.  A copy of the license is included in the section entitled ``GNU
+       Free Documentation License''.
+
+   If you have Invariant Sections, Front-Cover Texts and Back-Cover
+Texts, replace the "with...Texts." line with this:
+
+         with the Invariant Sections being LIST THEIR TITLES, with
+         the Front-Cover Texts being LIST, and with the Back-Cover Texts
+         being LIST.
+
+   If you have Invariant Sections without Cover Texts, or some other
+combination of the three, merge those two alternatives to suit the
+situation.
+
+   If your document contains nontrivial examples of program code, we
+recommend releasing these examples in parallel under your choice of free
+software license, such as the GNU General Public License, to permit
+their use in free software.
+
+
+File: dash.info,  Node: GPL,  Next: Index,  Prev: FDL,  Up: Top
+
+Appendix B GNU General Public License
+*************************************
+
+                        Version 3, 29 June 2007
+
+     Copyright © 2007 Free Software Foundation, Inc. <https://fsf.org/>
+
+     Everyone is permitted to copy and distribute verbatim copies of this
+     license document, but changing it is not allowed.
+
+Preamble
+========
+
+The GNU General Public License is a free, copyleft license for software
+and other kinds of works.
+
+   The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+the GNU General Public License is intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.  We, the Free Software Foundation, use the
+GNU General Public License for most of our software; it applies also to
+any other work released this way by its authors.  You can apply it to
+your programs, too.
+
+   When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+   To protect your rights, we need to prevent others from denying you
+these rights or asking you to surrender the rights.  Therefore, you have
+certain responsibilities if you distribute copies of the software, or if
+you modify it: responsibilities to respect the freedom of others.
+
+   For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must pass on to the recipients the same
+freedoms that you received.  You must make sure that they, too, receive
+or can get the source code.  And you must show them these terms so they
+know their rights.
+
+   Developers that use the GNU GPL protect your rights with two steps:
+(1) assert copyright on the software, and (2) offer you this License
+giving you legal permission to copy, distribute and/or modify it.
+
+   For the developers' and authors' protection, the GPL clearly explains
+that there is no warranty for this free software.  For both users' and
+authors' sake, the GPL requires that modified versions be marked as
+changed, so that their problems will not be attributed erroneously to
+authors of previous versions.
+
+   Some devices are designed to deny users access to install or run
+modified versions of the software inside them, although the manufacturer
+can do so.  This is fundamentally incompatible with the aim of
+protecting users' freedom to change the software.  The systematic
+pattern of such abuse occurs in the area of products for individuals to
+use, which is precisely where it is most unacceptable.  Therefore, we
+have designed this version of the GPL to prohibit the practice for those
+products.  If such problems arise substantially in other domains, we
+stand ready to extend this provision to those domains in future versions
+of the GPL, as needed to protect the freedom of users.
+
+   Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish to
+avoid the special danger that patents applied to a free program could
+make it effectively proprietary.  To prevent this, the GPL assures that
+patents cannot be used to render the program non-free.
+
+   The precise terms and conditions for copying, distribution and
+modification follow.
+
+TERMS AND CONDITIONS
+====================
+
+  0. Definitions.
+
+     "This License" refers to version 3 of the GNU General Public
+     License.
+
+     "Copyright" also means copyright-like laws that apply to other
+     kinds of works, such as semiconductor masks.
+
+     "The Program" refers to any copyrightable work licensed under this
+     License.  Each licensee is addressed as "you".  "Licensees" and
+     "recipients" may be individuals or organizations.
+
+     To "modify" a work means to copy from or adapt all or part of the
+     work in a fashion requiring copyright permission, other than the
+     making of an exact copy.  The resulting work is called a "modified
+     version" of the earlier work or a work "based on" the earlier work.
+
+     A "covered work" means either the unmodified Program or a work
+     based on the Program.
+
+     To "propagate" a work means to do anything with it that, without
+     permission, would make you directly or secondarily liable for
+     infringement under applicable copyright law, except executing it on
+     a computer or modifying a private copy.  Propagation includes
+     copying, distribution (with or without modification), making
+     available to the public, and in some countries other activities as
+     well.
+
+     To "convey" a work means any kind of propagation that enables other
+     parties to make or receive copies.  Mere interaction with a user
+     through a computer network, with no transfer of a copy, is not
+     conveying.
+
+     An interactive user interface displays "Appropriate Legal Notices"
+     to the extent that it includes a convenient and prominently visible
+     feature that (1) displays an appropriate copyright notice, and (2)
+     tells the user that there is no warranty for the work (except to
+     the extent that warranties are provided), that licensees may convey
+     the work under this License, and how to view a copy of this
+     License.  If the interface presents a list of user commands or
+     options, such as a menu, a prominent item in the list meets this
+     criterion.
+
+  1. Source Code.
+
+     The "source code" for a work means the preferred form of the work
+     for making modifications to it.  "Object code" means any non-source
+     form of a work.
+
+     A "Standard Interface" means an interface that either is an
+     official standard defined by a recognized standards body, or, in
+     the case of interfaces specified for a particular programming
+     language, one that is widely used among developers working in that
+     language.
+
+     The "System Libraries" of an executable work include anything,
+     other than the work as a whole, that (a) is included in the normal
+     form of packaging a Major Component, but which is not part of that
+     Major Component, and (b) serves only to enable use of the work with
+     that Major Component, or to implement a Standard Interface for
+     which an implementation is available to the public in source code
+     form.  A "Major Component", in this context, means a major
+     essential component (kernel, window system, and so on) of the
+     specific operating system (if any) on which the executable work
+     runs, or a compiler used to produce the work, or an object code
+     interpreter used to run it.
+
+     The "Corresponding Source" for a work in object code form means all
+     the source code needed to generate, install, and (for an executable
+     work) run the object code and to modify the work, including scripts
+     to control those activities.  However, it does not include the
+     work's System Libraries, or general-purpose tools or generally
+     available free programs which are used unmodified in performing
+     those activities but which are not part of the work.  For example,
+     Corresponding Source includes interface definition files associated
+     with source files for the work, and the source code for shared
+     libraries and dynamically linked subprograms that the work is
+     specifically designed to require, such as by intimate data
+     communication or control flow between those subprograms and other
+     parts of the work.
+
+     The Corresponding Source need not include anything that users can
+     regenerate automatically from other parts of the Corresponding
+     Source.
+
+     The Corresponding Source for a work in source code form is that
+     same work.
+
+  2. Basic Permissions.
+
+     All rights granted under this License are granted for the term of
+     copyright on the Program, and are irrevocable provided the stated
+     conditions are met.  This License explicitly affirms your unlimited
+     permission to run the unmodified Program.  The output from running
+     a covered work is covered by this License only if the output, given
+     its content, constitutes a covered work.  This License acknowledges
+     your rights of fair use or other equivalent, as provided by
+     copyright law.
+
+     You may make, run and propagate covered works that you do not
+     convey, without conditions so long as your license otherwise
+     remains in force.  You may convey covered works to others for the
+     sole purpose of having them make modifications exclusively for you,
+     or provide you with facilities for running those works, provided
+     that you comply with the terms of this License in conveying all
+     material for which you do not control copyright.  Those thus making
+     or running the covered works for you must do so exclusively on your
+     behalf, under your direction and control, on terms that prohibit
+     them from making any copies of your copyrighted material outside
+     their relationship with you.
+
+     Conveying under any other circumstances is permitted solely under
+     the conditions stated below.  Sublicensing is not allowed; section
+     10 makes it unnecessary.
+
+  3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+     No covered work shall be deemed part of an effective technological
+     measure under any applicable law fulfilling obligations under
+     article 11 of the WIPO copyright treaty adopted on 20 December
+     1996, or similar laws prohibiting or restricting circumvention of
+     such measures.
+
+     When you convey a covered work, you waive any legal power to forbid
+     circumvention of technological measures to the extent such
+     circumvention is effected by exercising rights under this License
+     with respect to the covered work, and you disclaim any intention to
+     limit operation or modification of the work as a means of
+     enforcing, against the work's users, your or third parties' legal
+     rights to forbid circumvention of technological measures.
+
+  4. Conveying Verbatim Copies.
+
+     You may convey verbatim copies of the Program's source code as you
+     receive it, in any medium, provided that you conspicuously and
+     appropriately publish on each copy an appropriate copyright notice;
+     keep intact all notices stating that this License and any
+     non-permissive terms added in accord with section 7 apply to the
+     code; keep intact all notices of the absence of any warranty; and
+     give all recipients a copy of this License along with the Program.
+
+     You may charge any price or no price for each copy that you convey,
+     and you may offer support or warranty protection for a fee.
+
+  5. Conveying Modified Source Versions.
+
+     You may convey a work based on the Program, or the modifications to
+     produce it from the Program, in the form of source code under the
+     terms of section 4, provided that you also meet all of these
+     conditions:
+
+       a. The work must carry prominent notices stating that you
+          modified it, and giving a relevant date.
+
+       b. The work must carry prominent notices stating that it is
+          released under this License and any conditions added under
+          section 7.  This requirement modifies the requirement in
+          section 4 to "keep intact all notices".
+
+       c. You must license the entire work, as a whole, under this
+          License to anyone who comes into possession of a copy.  This
+          License will therefore apply, along with any applicable
+          section 7 additional terms, to the whole of the work, and all
+          its parts, regardless of how they are packaged.  This License
+          gives no permission to license the work in any other way, but
+          it does not invalidate such permission if you have separately
+          received it.
+
+       d. If the work has interactive user interfaces, each must display
+          Appropriate Legal Notices; however, if the Program has
+          interactive interfaces that do not display Appropriate Legal
+          Notices, your work need not make them do so.
+
+     A compilation of a covered work with other separate and independent
+     works, which are not by their nature extensions of the covered
+     work, and which are not combined with it such as to form a larger
+     program, in or on a volume of a storage or distribution medium, is
+     called an "aggregate" if the compilation and its resulting
+     copyright are not used to limit the access or legal rights of the
+     compilation's users beyond what the individual works permit.
+     Inclusion of a covered work in an aggregate does not cause this
+     License to apply to the other parts of the aggregate.
+
+  6. Conveying Non-Source Forms.
+
+     You may convey a covered work in object code form under the terms
+     of sections 4 and 5, provided that you also convey the
+     machine-readable Corresponding Source under the terms of this
+     License, in one of these ways:
+
+       a. Convey the object code in, or embodied in, a physical product
+          (including a physical distribution medium), accompanied by the
+          Corresponding Source fixed on a durable physical medium
+          customarily used for software interchange.
+
+       b. Convey the object code in, or embodied in, a physical product
+          (including a physical distribution medium), accompanied by a
+          written offer, valid for at least three years and valid for as
+          long as you offer spare parts or customer support for that
+          product model, to give anyone who possesses the object code
+          either (1) a copy of the Corresponding Source for all the
+          software in the product that is covered by this License, on a
+          durable physical medium customarily used for software
+          interchange, for a price no more than your reasonable cost of
+          physically performing this conveying of source, or (2) access
+          to copy the Corresponding Source from a network server at no
+          charge.
+
+       c. Convey individual copies of the object code with a copy of the
+          written offer to provide the Corresponding Source.  This
+          alternative is allowed only occasionally and noncommercially,
+          and only if you received the object code with such an offer,
+          in accord with subsection 6b.
+
+       d. Convey the object code by offering access from a designated
+          place (gratis or for a charge), and offer equivalent access to
+          the Corresponding Source in the same way through the same
+          place at no further charge.  You need not require recipients
+          to copy the Corresponding Source along with the object code.
+          If the place to copy the object code is a network server, the
+          Corresponding Source may be on a different server (operated by
+          you or a third party) that supports equivalent copying
+          facilities, provided you maintain clear directions next to the
+          object code saying where to find the Corresponding Source.
+          Regardless of what server hosts the Corresponding Source, you
+          remain obligated to ensure that it is available for as long as
+          needed to satisfy these requirements.
+
+       e. Convey the object code using peer-to-peer transmission,
+          provided you inform other peers where the object code and
+          Corresponding Source of the work are being offered to the
+          general public at no charge under subsection 6d.
+
+     A separable portion of the object code, whose source code is
+     excluded from the Corresponding Source as a System Library, need
+     not be included in conveying the object code work.
+
+     A "User Product" is either (1) a "consumer product", which means
+     any tangible personal property which is normally used for personal,
+     family, or household purposes, or (2) anything designed or sold for
+     incorporation into a dwelling.  In determining whether a product is
+     a consumer product, doubtful cases shall be resolved in favor of
+     coverage.  For a particular product received by a particular user,
+     "normally used" refers to a typical or common use of that class of
+     product, regardless of the status of the particular user or of the
+     way in which the particular user actually uses, or expects or is
+     expected to use, the product.  A product is a consumer product
+     regardless of whether the product has substantial commercial,
+     industrial or non-consumer uses, unless such uses represent the
+     only significant mode of use of the product.
+
+     "Installation Information" for a User Product means any methods,
+     procedures, authorization keys, or other information required to
+     install and execute modified versions of a covered work in that
+     User Product from a modified version of its Corresponding Source.
+     The information must suffice to ensure that the continued
+     functioning of the modified object code is in no case prevented or
+     interfered with solely because modification has been made.
+
+     If you convey an object code work under this section in, or with,
+     or specifically for use in, a User Product, and the conveying
+     occurs as part of a transaction in which the right of possession
+     and use of the User Product is transferred to the recipient in
+     perpetuity or for a fixed term (regardless of how the transaction
+     is characterized), the Corresponding Source conveyed under this
+     section must be accompanied by the Installation Information.  But
+     this requirement does not apply if neither you nor any third party
+     retains the ability to install modified object code on the User
+     Product (for example, the work has been installed in ROM).
+
+     The requirement to provide Installation Information does not
+     include a requirement to continue to provide support service,
+     warranty, or updates for a work that has been modified or installed
+     by the recipient, or for the User Product in which it has been
+     modified or installed.  Access to a network may be denied when the
+     modification itself materially and adversely affects the operation
+     of the network or violates the rules and protocols for
+     communication across the network.
+
+     Corresponding Source conveyed, and Installation Information
+     provided, in accord with this section must be in a format that is
+     publicly documented (and with an implementation available to the
+     public in source code form), and must require no special password
+     or key for unpacking, reading or copying.
+
+  7. Additional Terms.
+
+     "Additional permissions" are terms that supplement the terms of
+     this License by making exceptions from one or more of its
+     conditions.  Additional permissions that are applicable to the
+     entire Program shall be treated as though they were included in
+     this License, to the extent that they are valid under applicable
+     law.  If additional permissions apply only to part of the Program,
+     that part may be used separately under those permissions, but the
+     entire Program remains governed by this License without regard to
+     the additional permissions.
+
+     When you convey a copy of a covered work, you may at your option
+     remove any additional permissions from that copy, or from any part
+     of it.  (Additional permissions may be written to require their own
+     removal in certain cases when you modify the work.)  You may place
+     additional permissions on material, added by you to a covered work,
+     for which you have or can give appropriate copyright permission.
+
+     Notwithstanding any other provision of this License, for material
+     you add to a covered work, you may (if authorized by the copyright
+     holders of that material) supplement the terms of this License with
+     terms:
+
+       a. Disclaiming warranty or limiting liability differently from
+          the terms of sections 15 and 16 of this License; or
+
+       b. Requiring preservation of specified reasonable legal notices
+          or author attributions in that material or in the Appropriate
+          Legal Notices displayed by works containing it; or
+
+       c. Prohibiting misrepresentation of the origin of that material,
+          or requiring that modified versions of such material be marked
+          in reasonable ways as different from the original version; or
+
+       d. Limiting the use for publicity purposes of names of licensors
+          or authors of the material; or
+
+       e. Declining to grant rights under trademark law for use of some
+          trade names, trademarks, or service marks; or
+
+       f. Requiring indemnification of licensors and authors of that
+          material by anyone who conveys the material (or modified
+          versions of it) with contractual assumptions of liability to
+          the recipient, for any liability that these contractual
+          assumptions directly impose on those licensors and authors.
+
+     All other non-permissive additional terms are considered "further
+     restrictions" within the meaning of section 10.  If the Program as
+     you received it, or any part of it, contains a notice stating that
+     it is governed by this License along with a term that is a further
+     restriction, you may remove that term.  If a license document
+     contains a further restriction but permits relicensing or conveying
+     under this License, you may add to a covered work material governed
+     by the terms of that license document, provided that the further
+     restriction does not survive such relicensing or conveying.
+
+     If you add terms to a covered work in accord with this section, you
+     must place, in the relevant source files, a statement of the
+     additional terms that apply to those files, or a notice indicating
+     where to find the applicable terms.
+
+     Additional terms, permissive or non-permissive, may be stated in
+     the form of a separately written license, or stated as exceptions;
+     the above requirements apply either way.
+
+  8. Termination.
+
+     You may not propagate or modify a covered work except as expressly
+     provided under this License.  Any attempt otherwise to propagate or
+     modify it is void, and will automatically terminate your rights
+     under this License (including any patent licenses granted under the
+     third paragraph of section 11).
+
+     However, if you cease all violation of this License, then your
+     license from a particular copyright holder is reinstated (a)
+     provisionally, unless and until the copyright holder explicitly and
+     finally terminates your license, and (b) permanently, if the
+     copyright holder fails to notify you of the violation by some
+     reasonable means prior to 60 days after the cessation.
+
+     Moreover, your license from a particular copyright holder is
+     reinstated permanently if the copyright holder notifies you of the
+     violation by some reasonable means, this is the first time you have
+     received notice of violation of this License (for any work) from
+     that copyright holder, and you cure the violation prior to 30 days
+     after your receipt of the notice.
+
+     Termination of your rights under this section does not terminate
+     the licenses of parties who have received copies or rights from you
+     under this License.  If your rights have been terminated and not
+     permanently reinstated, you do not qualify to receive new licenses
+     for the same material under section 10.
+
+  9. Acceptance Not Required for Having Copies.
+
+     You are not required to accept this License in order to receive or
+     run a copy of the Program.  Ancillary propagation of a covered work
+     occurring solely as a consequence of using peer-to-peer
+     transmission to receive a copy likewise does not require
+     acceptance.  However, nothing other than this License grants you
+     permission to propagate or modify any covered work.  These actions
+     infringe copyright if you do not accept this License.  Therefore,
+     by modifying or propagating a covered work, you indicate your
+     acceptance of this License to do so.
+
+  10. Automatic Licensing of Downstream Recipients.
+
+     Each time you convey a covered work, the recipient automatically
+     receives a license from the original licensors, to run, modify and
+     propagate that work, subject to this License.  You are not
+     responsible for enforcing compliance by third parties with this
+     License.
+
+     An "entity transaction" is a transaction transferring control of an
+     organization, or substantially all assets of one, or subdividing an
+     organization, or merging organizations.  If propagation of a
+     covered work results from an entity transaction, each party to that
+     transaction who receives a copy of the work also receives whatever
+     licenses to the work the party's predecessor in interest had or
+     could give under the previous paragraph, plus a right to possession
+     of the Corresponding Source of the work from the predecessor in
+     interest, if the predecessor has it or can get it with reasonable
+     efforts.
+
+     You may not impose any further restrictions on the exercise of the
+     rights granted or affirmed under this License.  For example, you
+     may not impose a license fee, royalty, or other charge for exercise
+     of rights granted under this License, and you may not initiate
+     litigation (including a cross-claim or counterclaim in a lawsuit)
+     alleging that any patent claim is infringed by making, using,
+     selling, offering for sale, or importing the Program or any portion
+     of it.
+
+  11. Patents.
+
+     A "contributor" is a copyright holder who authorizes use under this
+     License of the Program or a work on which the Program is based.
+     The work thus licensed is called the contributor's "contributor
+     version".
+
+     A contributor's "essential patent claims" are all patent claims
+     owned or controlled by the contributor, whether already acquired or
+     hereafter acquired, that would be infringed by some manner,
+     permitted by this License, of making, using, or selling its
+     contributor version, but do not include claims that would be
+     infringed only as a consequence of further modification of the
+     contributor version.  For purposes of this definition, "control"
+     includes the right to grant patent sublicenses in a manner
+     consistent with the requirements of this License.
+
+     Each contributor grants you a non-exclusive, worldwide,
+     royalty-free patent license under the contributor's essential
+     patent claims, to make, use, sell, offer for sale, import and
+     otherwise run, modify and propagate the contents of its contributor
+     version.
+
+     In the following three paragraphs, a "patent license" is any
+     express agreement or commitment, however denominated, not to
+     enforce a patent (such as an express permission to practice a
+     patent or covenant not to sue for patent infringement).  To "grant"
+     such a patent license to a party means to make such an agreement or
+     commitment not to enforce a patent against the party.
+
+     If you convey a covered work, knowingly relying on a patent
+     license, and the Corresponding Source of the work is not available
+     for anyone to copy, free of charge and under the terms of this
+     License, through a publicly available network server or other
+     readily accessible means, then you must either (1) cause the
+     Corresponding Source to be so available, or (2) arrange to deprive
+     yourself of the benefit of the patent license for this particular
+     work, or (3) arrange, in a manner consistent with the requirements
+     of this License, to extend the patent license to downstream
+     recipients.  "Knowingly relying" means you have actual knowledge
+     that, but for the patent license, your conveying the covered work
+     in a country, or your recipient's use of the covered work in a
+     country, would infringe one or more identifiable patents in that
+     country that you have reason to believe are valid.
+
+     If, pursuant to or in connection with a single transaction or
+     arrangement, you convey, or propagate by procuring conveyance of, a
+     covered work, and grant a patent license to some of the parties
+     receiving the covered work authorizing them to use, propagate,
+     modify or convey a specific copy of the covered work, then the
+     patent license you grant is automatically extended to all
+     recipients of the covered work and works based on it.
+
+     A patent license is "discriminatory" if it does not include within
+     the scope of its coverage, prohibits the exercise of, or is
+     conditioned on the non-exercise of one or more of the rights that
+     are specifically granted under this License.  You may not convey a
+     covered work if you are a party to an arrangement with a third
+     party that is in the business of distributing software, under which
+     you make payment to the third party based on the extent of your
+     activity of conveying the work, and under which the third party
+     grants, to any of the parties who would receive the covered work
+     from you, a discriminatory patent license (a) in connection with
+     copies of the covered work conveyed by you (or copies made from
+     those copies), or (b) primarily for and in connection with specific
+     products or compilations that contain the covered work, unless you
+     entered into that arrangement, or that patent license was granted,
+     prior to 28 March 2007.
+
+     Nothing in this License shall be construed as excluding or limiting
+     any implied license or other defenses to infringement that may
+     otherwise be available to you under applicable patent law.
+
+  12. No Surrender of Others' Freedom.
+
+     If conditions are imposed on you (whether by court order, agreement
+     or otherwise) that contradict the conditions of this License, they
+     do not excuse you from the conditions of this License.  If you
+     cannot convey a covered work so as to satisfy simultaneously your
+     obligations under this License and any other pertinent obligations,
+     then as a consequence you may not convey it at all.  For example,
+     if you agree to terms that obligate you to collect a royalty for
+     further conveying from those to whom you convey the Program, the
+     only way you could satisfy both those terms and this License would
+     be to refrain entirely from conveying the Program.
+
+  13. Use with the GNU Affero General Public License.
+
+     Notwithstanding any other provision of this License, you have
+     permission to link or combine any covered work with a work licensed
+     under version 3 of the GNU Affero General Public License into a
+     single combined work, and to convey the resulting work.  The terms
+     of this License will continue to apply to the part which is the
+     covered work, but the special requirements of the GNU Affero
+     General Public License, section 13, concerning interaction through
+     a network will apply to the combination as such.
+
+  14. Revised Versions of this License.
+
+     The Free Software Foundation may publish revised and/or new
+     versions of the GNU General Public License from time to time.  Such
+     new versions will be similar in spirit to the present version, but
+     may differ in detail to address new problems or concerns.
+
+     Each version is given a distinguishing version number.  If the
+     Program specifies that a certain numbered version of the GNU
+     General Public License "or any later version" applies to it, you
+     have the option of following the terms and conditions either of
+     that numbered version or of any later version published by the Free
+     Software Foundation.  If the Program does not specify a version
+     number of the GNU General Public License, you may choose any
+     version ever published by the Free Software Foundation.
+
+     If the Program specifies that a proxy can decide which future
+     versions of the GNU General Public License can be used, that
+     proxy's public statement of acceptance of a version permanently
+     authorizes you to choose that version for the Program.
+
+     Later license versions may give you additional or different
+     permissions.  However, no additional obligations are imposed on any
+     author or copyright holder as a result of your choosing to follow a
+     later version.
+
+  15. Disclaimer of Warranty.
+
+     THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
+     APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE
+     COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS"
+     WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED,
+     INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+     MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE
+     RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.
+     SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL
+     NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+  16. Limitation of Liability.
+
+     IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN
+     WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES
+     AND/OR CONVEYS THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR
+     DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR
+     CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE
+     THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA
+     BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
+     PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+     PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF
+     THE POSSIBILITY OF SUCH DAMAGES.
+
+  17. Interpretation of Sections 15 and 16.
+
+     If the disclaimer of warranty and limitation of liability provided
+     above cannot be given local legal effect according to their terms,
+     reviewing courts shall apply local law that most closely
+     approximates an absolute waiver of all civil liability in
+     connection with the Program, unless a warranty or assumption of
+     liability accompanies a copy of the Program in return for a fee.
+
+END OF TERMS AND CONDITIONS
+===========================
+
+How to Apply These Terms to Your New Programs
+=============================================
+
+If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these
+terms.
+
+   To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+state the exclusion of warranty; and each file should have at least the
+"copyright" line and a pointer to where the full notice is found.
+
+     ONE LINE TO GIVE THE PROGRAM'S NAME AND A BRIEF IDEA OF WHAT IT DOES.
+     Copyright (C) YEAR NAME OF AUTHOR
+
+     This program is free software: you can redistribute it and/or modify
+     it under the terms of the GNU General Public License as published by
+     the Free Software Foundation, either version 3 of the License, or (at
+     your option) any later version.
+
+     This program is distributed in the hope that it will be useful, but
+     WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+     You should have received a copy of the GNU General Public License
+     along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+   Also add information on how to contact you by electronic and paper
+mail.
+
+   If the program does terminal interaction, make it output a short
+notice like this when it starts in an interactive mode:
+
+     PROGRAM Copyright (C) YEAR NAME OF AUTHOR
+     This program comes with ABSOLUTELY NO WARRANTY; for details type ‘show w’.
+     This is free software, and you are welcome to redistribute it
+     under certain conditions; type ‘show c’ for details.
+
+   The hypothetical commands ‘show w’ and ‘show c’ should show the
+appropriate parts of the General Public License.  Of course, your
+program's commands might be different; for a GUI interface, you would
+use an "about box".
+
+   You should also get your employer (if you work as a programmer) or
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  For more information on this, and how to apply and follow
+the GNU GPL, see <https://www.gnu.org/licenses/>.
+
+   The GNU General Public License does not permit incorporating your
+program into proprietary programs.  If your program is a subroutine
+library, you may consider it more useful to permit linking proprietary
+applications with the library.  If this is what you want to do, use the
+GNU Lesser General Public License instead of this License.  But first,
+please read <https://www.gnu.org/licenses/why-not-lgpl.html>.
+
+
+File: dash.info,  Node: Index,  Prev: GPL,  Up: Top
+
+Index
+*****
+
+[index]
+* Menu:
+
+* -->:                                   Threading macros.    (line  35)
+* ->:                                    Threading macros.    (line   9)
+* ->>:                                   Threading macros.    (line  22)
+* -all?:                                 Predicates.          (line  53)
+* -andfn:                                Function combinators.
+                                                              (line 184)
+* -annotate:                             Maps.                (line  86)
+* -any?:                                 Predicates.          (line  41)
+* -applify:                              Function combinators.
+                                                              (line  63)
+* -as->:                                 Threading macros.    (line  49)
+* -butlast:                              Other list operations.
+                                                              (line 405)
+* -clone:                                Tree operations.     (line 123)
+* -common-prefix:                        Reductions.          (line 242)
+* -common-suffix:                        Reductions.          (line 252)
+* -compose:                              Function combinators.
+                                                              (line  49)
+* -concat:                               List to list.        (line  23)
+* -cons-pair?:                           Predicates.          (line 154)
+* -cons*:                                Other list operations.
+                                                              (line  19)
+* -const:                                Function combinators.
+                                                              (line 128)
+* -contains?:                            Predicates.          (line 100)
+* -copy:                                 Maps.                (line 151)
+* -count:                                Reductions.          (line 172)
+* -cut:                                  Function combinators.
+                                                              (line 140)
+* -cycle:                                Unfolding.           (line  55)
+* -difference:                           Set operations.      (line  22)
+* -distinct:                             Set operations.      (line  73)
+* -dotimes:                              Side effects.        (line  80)
+* -doto:                                 Threading macros.    (line  99)
+* -drop:                                 Sublist selection.   (line 149)
+* -drop-last:                            Sublist selection.   (line 163)
+* -drop-while:                           Sublist selection.   (line 194)
+* -each:                                 Side effects.        (line   8)
+* -each-indexed:                         Side effects.        (line  38)
+* -each-r:                               Side effects.        (line  52)
+* -each-r-while:                         Side effects.        (line  65)
+* -each-while:                           Side effects.        (line  24)
+* -elem-index:                           Indexing.            (line   9)
+* -elem-indices:                         Indexing.            (line  23)
+* -every:                                Predicates.          (line  23)
+* -fifth-item:                           Other list operations.
+                                                              (line 380)
+* -filter:                               Sublist selection.   (line   8)
+* -find-index:                           Indexing.            (line  35)
+* -find-indices:                         Indexing.            (line  73)
+* -find-last-index:                      Indexing.            (line  54)
+* -first:                                Other list operations.
+                                                              (line 300)
+* -first-item:                           Other list operations.
+                                                              (line 328)
+* -fix:                                  Other list operations.
+                                                              (line 445)
+* -fixfn:                                Function combinators.
+                                                              (line 224)
+* -flatten:                              List to list.        (line  43)
+* -flatten-n:                            List to list.        (line  65)
+* -flip:                                 Function combinators.
+                                                              (line  95)
+* -fourth-item:                          Other list operations.
+                                                              (line 367)
+* -frequencies:                          Reductions.          (line 310)
+* -grade-down:                           Indexing.            (line 103)
+* -grade-up:                             Indexing.            (line  93)
+* -group-by:                             Partitioning.        (line 205)
+* -if-let:                               Binding.             (line  34)
+* -if-let*:                              Binding.             (line  45)
+* -inits:                                Reductions.          (line 222)
+* -insert-at:                            List to list.        (line 119)
+* -interleave:                           Other list operations.
+                                                              (line  56)
+* -interpose:                            Other list operations.
+                                                              (line  46)
+* -intersection:                         Set operations.      (line  36)
+* -iota:                                 Other list operations.
+                                                              (line  67)
+* -is-infix?:                            Predicates.          (line 140)
+* -is-prefix?:                           Predicates.          (line 116)
+* -is-suffix?:                           Predicates.          (line 128)
+* -iterate:                              Unfolding.           (line   9)
+* -iteratefn:                            Function combinators.
+                                                              (line 201)
+* -juxt:                                 Function combinators.
+                                                              (line  37)
+* -keep:                                 List to list.        (line   8)
+* -lambda:                               Binding.             (line 247)
+* -last:                                 Other list operations.
+                                                              (line 318)
+* -last-item:                            Other list operations.
+                                                              (line 393)
+* -let:                                  Binding.             (line  61)
+* -let*:                                 Binding.             (line 227)
+* -list:                                 Other list operations.
+                                                              (line 428)
+* -map:                                  Maps.                (line  10)
+* -map-first:                            Maps.                (line  38)
+* -map-indexed:                          Maps.                (line  68)
+* -map-last:                             Maps.                (line  53)
+* -map-when:                             Maps.                (line  22)
+* -mapcat:                               Maps.                (line 140)
+* -max:                                  Reductions.          (line 286)
+* -max-by:                               Reductions.          (line 296)
+* -min:                                  Reductions.          (line 262)
+* -min-by:                               Reductions.          (line 272)
+* -non-nil:                              Sublist selection.   (line  95)
+* -none?:                                Predicates.          (line  73)
+* -not:                                  Function combinators.
+                                                              (line 153)
+* -on:                                   Function combinators.
+                                                              (line  75)
+* -only-some?:                           Predicates.          (line  85)
+* -orfn:                                 Function combinators.
+                                                              (line 167)
+* -pad:                                  Other list operations.
+                                                              (line 241)
+* -partial:                              Function combinators.
+                                                              (line   8)
+* -partition:                            Partitioning.        (line  90)
+* -partition-after-item:                 Partitioning.        (line 195)
+* -partition-after-pred:                 Partitioning.        (line 162)
+* -partition-all:                        Partitioning.        (line 102)
+* -partition-all-in-steps:               Partitioning.        (line 126)
+* -partition-before-item:                Partitioning.        (line 185)
+* -partition-before-pred:                Partitioning.        (line 174)
+* -partition-by:                         Partitioning.        (line 138)
+* -partition-by-header:                  Partitioning.        (line 149)
+* -partition-in-steps:                   Partitioning.        (line 113)
+* -permutations:                         Set operations.      (line  60)
+* -powerset:                             Set operations.      (line  50)
+* -prodfn:                               Function combinators.
+                                                              (line 258)
+* -product:                              Reductions.          (line 201)
+* -reduce:                               Reductions.          (line  53)
+* -reduce-from:                          Reductions.          (line   8)
+* -reduce-r:                             Reductions.          (line  72)
+* -reduce-r-from:                        Reductions.          (line  26)
+* -reductions:                           Reductions.          (line 136)
+* -reductions-from:                      Reductions.          (line 100)
+* -reductions-r:                         Reductions.          (line 154)
+* -reductions-r-from:                    Reductions.          (line 118)
+* -remove:                               Sublist selection.   (line  26)
+* -remove-at:                            List to list.        (line 156)
+* -remove-at-indices:                    List to list.        (line 175)
+* -remove-first:                         Sublist selection.   (line  44)
+* -remove-item:                          Sublist selection.   (line  84)
+* -remove-last:                          Sublist selection.   (line  65)
+* -repeat:                               Unfolding.           (line  44)
+* -replace:                              List to list.        (line  77)
+* -replace-at:                           List to list.        (line 130)
+* -replace-first:                        List to list.        (line  91)
+* -replace-last:                         List to list.        (line 105)
+* -rotate:                               Other list operations.
+                                                              (line   8)
+* -rotate-args:                          Function combinators.
+                                                              (line 112)
+* -rpartial:                             Function combinators.
+                                                              (line  22)
+* -running-product:                      Reductions.          (line 211)
+* -running-sum:                          Reductions.          (line 190)
+* -same-items?:                          Set operations.      (line  88)
+* -second-item:                          Other list operations.
+                                                              (line 341)
+* -select-by-indices:                    Sublist selection.   (line 211)
+* -select-column:                        Sublist selection.   (line 241)
+* -select-columns:                       Sublist selection.   (line 222)
+* -separate:                             Partitioning.        (line  75)
+* -setq:                                 Binding.             (line 270)
+* -slice:                                Sublist selection.   (line 105)
+* -snoc:                                 Other list operations.
+                                                              (line  32)
+* -some:                                 Predicates.          (line   8)
+* -some-->:                              Threading macros.    (line  86)
+* -some->:                               Threading macros.    (line  62)
+* -some->>:                              Threading macros.    (line  74)
+* -sort:                                 Other list operations.
+                                                              (line 415)
+* -splice:                               Maps.                (line 102)
+* -splice-list:                          Maps.                (line 127)
+* -split-at:                             Partitioning.        (line   8)
+* -split-on:                             Partitioning.        (line  40)
+* -split-when:                           Partitioning.        (line  58)
+* -split-with:                           Partitioning.        (line  23)
+* -sum:                                  Reductions.          (line 180)
+* -table:                                Other list operations.
+                                                              (line 256)
+* -table-flat:                           Other list operations.
+                                                              (line 275)
+* -tails:                                Reductions.          (line 232)
+* -take:                                 Sublist selection.   (line 121)
+* -take-last:                            Sublist selection.   (line 135)
+* -take-while:                           Sublist selection.   (line 177)
+* -third-item:                           Other list operations.
+                                                              (line 354)
+* -tree-map:                             Tree operations.     (line  28)
+* -tree-map-nodes:                       Tree operations.     (line  39)
+* -tree-mapreduce:                       Tree operations.     (line  85)
+* -tree-mapreduce-from:                  Tree operations.     (line 104)
+* -tree-reduce:                          Tree operations.     (line  53)
+* -tree-reduce-from:                     Tree operations.     (line  70)
+* -tree-seq:                             Tree operations.     (line   8)
+* -unfold:                               Unfolding.           (line  25)
+* -union:                                Set operations.      (line   8)
+* -unzip:                                Other list operations.
+                                                              (line 215)
+* -unzip-lists:                          Other list operations.
+                                                              (line 196)
+* -update-at:                            List to list.        (line 142)
+* -when-let:                             Binding.             (line   9)
+* -when-let*:                            Binding.             (line  21)
+* -zip:                                  Other list operations.
+                                                              (line 150)
+* -zip-fill:                             Other list operations.
+                                                              (line 176)
+* -zip-lists:                            Other list operations.
+                                                              (line 114)
+* -zip-lists-fill:                       Other list operations.
+                                                              (line 135)
+* -zip-pair:                             Other list operations.
+                                                              (line  98)
+* -zip-with:                             Other list operations.
+                                                              (line  80)
+* !cdr:                                  Destructive operations.
+                                                              (line  16)
+* !cons:                                 Destructive operations.
+                                                              (line   8)
+* dash-fontify-mode:                     Fontification of special variables.
+                                                              (line   6)
+* dash-register-info-lookup:             Info symbol lookup.  (line   6)
+* global-dash-fontify-mode:              Fontification of special variables.
+                                                              (line  12)
+
+
+
+Tag Table:
+Node: Top734
+Node: Installation2377
+Node: Using in a package3139
+Node: Fontification of special variables3482
+Node: Info symbol lookup4272
+Node: Functions4855
+Node: Maps6339
+Ref: -map6636
+Ref: -map-when7007
+Ref: -map-first7581
+Ref: -map-last8176
+Ref: -map-indexed8766
+Ref: -annotate9450
+Ref: -splice10052
+Ref: -splice-list11125
+Ref: -mapcat11584
+Ref: -copy11957
+Node: Sublist selection12223
+Ref: -filter12416
+Ref: -remove12967
+Ref: -remove-first13514
+Ref: -remove-last14358
+Ref: -remove-item15086
+Ref: -non-nil15486
+Ref: -slice15768
+Ref: -take16297
+Ref: -take-last16715
+Ref: -drop17152
+Ref: -drop-last17599
+Ref: -take-while18031
+Ref: -drop-while18656
+Ref: -select-by-indices19287
+Ref: -select-columns19794
+Ref: -select-column20497
+Node: List to list20960
+Ref: -keep21152
+Ref: -concat21728
+Ref: -flatten22508
+Ref: -flatten-n23268
+Ref: -replace23652
+Ref: -replace-first24113
+Ref: -replace-last24608
+Ref: -insert-at25096
+Ref: -replace-at25421
+Ref: -update-at25808
+Ref: -remove-at26349
+Ref: -remove-at-indices26976
+Node: Reductions27666
+Ref: -reduce-from27862
+Ref: -reduce-r-from28584
+Ref: -reduce29845
+Ref: -reduce-r30594
+Ref: -reductions-from31870
+Ref: -reductions-r-from32672
+Ref: -reductions33498
+Ref: -reductions-r34205
+Ref: -count34946
+Ref: -sum35176
+Ref: -running-sum35364
+Ref: -product35685
+Ref: -running-product35893
+Ref: -inits36234
+Ref: -tails36479
+Ref: -common-prefix36724
+Ref: -common-suffix37018
+Ref: -min37312
+Ref: -min-by37538
+Ref: -max38059
+Ref: -max-by38284
+Ref: -frequencies38810
+Node: Unfolding39425
+Ref: -iterate39666
+Ref: -unfold40113
+Ref: -repeat40918
+Ref: -cycle41202
+Node: Predicates41599
+Ref: -some41776
+Ref: -every42203
+Ref: -any?42915
+Ref: -all?43264
+Ref: -none?44004
+Ref: -only-some?44324
+Ref: -contains?44869
+Ref: -is-prefix?45375
+Ref: -is-suffix?45707
+Ref: -is-infix?46039
+Ref: -cons-pair?46399
+Node: Partitioning46730
+Ref: -split-at46918
+Ref: -split-with47582
+Ref: -split-on48222
+Ref: -split-when48893
+Ref: -separate49536
+Ref: -partition50070
+Ref: -partition-all50519
+Ref: -partition-in-steps50944
+Ref: -partition-all-in-steps51490
+Ref: -partition-by52004
+Ref: -partition-by-header52382
+Ref: -partition-after-pred52983
+Ref: -partition-before-pred53434
+Ref: -partition-before-item53819
+Ref: -partition-after-item54126
+Ref: -group-by54428
+Node: Indexing54861
+Ref: -elem-index55063
+Ref: -elem-indices55550
+Ref: -find-index56009
+Ref: -find-last-index56676
+Ref: -find-indices57325
+Ref: -grade-up58085
+Ref: -grade-down58492
+Node: Set operations58906
+Ref: -union59089
+Ref: -difference59519
+Ref: -intersection59947
+Ref: -powerset60376
+Ref: -permutations60653
+Ref: -distinct61091
+Ref: -same-items?61485
+Node: Other list operations62094
+Ref: -rotate62319
+Ref: -cons*62672
+Ref: -snoc63094
+Ref: -interpose63506
+Ref: -interleave63800
+Ref: -iota64166
+Ref: -zip-with64649
+Ref: -zip-pair65455
+Ref: -zip-lists66021
+Ref: -zip-lists-fill66819
+Ref: -zip67529
+Ref: -zip-fill68556
+Ref: -unzip-lists69470
+Ref: -unzip70093
+Ref: -pad71086
+Ref: -table71571
+Ref: -table-flat72357
+Ref: -first73360
+Ref: -last73891
+Ref: -first-item74237
+Ref: -second-item74649
+Ref: -third-item75066
+Ref: -fourth-item75441
+Ref: -fifth-item75819
+Ref: -last-item76194
+Ref: -butlast76555
+Ref: -sort76800
+Ref: -list77294
+Ref: -fix77863
+Node: Tree operations78352
+Ref: -tree-seq78548
+Ref: -tree-map79409
+Ref: -tree-map-nodes79849
+Ref: -tree-reduce80713
+Ref: -tree-reduce-from81595
+Ref: -tree-mapreduce82195
+Ref: -tree-mapreduce-from83054
+Ref: -clone84339
+Node: Threading macros84677
+Ref: ->84902
+Ref: ->>85390
+Ref: -->85893
+Ref: -as->86450
+Ref: -some->86904
+Ref: -some->>87289
+Ref: -some-->87736
+Ref: -doto88303
+Node: Binding88856
+Ref: -when-let89063
+Ref: -when-let*89524
+Ref: -if-let90053
+Ref: -if-let*90419
+Ref: -let91042
+Ref: -let*97118
+Ref: -lambda98055
+Ref: -setq98861
+Node: Side effects99662
+Ref: -each99856
+Ref: -each-while100381
+Ref: -each-indexed101001
+Ref: -each-r101593
+Ref: -each-r-while102035
+Ref: -dotimes102679
+Node: Destructive operations103230
+Ref: !cons103448
+Ref: !cdr103652
+Node: Function combinators103845
+Ref: -partial104049
+Ref: -rpartial104567
+Ref: -juxt105215
+Ref: -compose105667
+Ref: -applify106274
+Ref: -on106704
+Ref: -flip107468
+Ref: -rotate-args107990
+Ref: -const108619
+Ref: -cut108961
+Ref: -not109441
+Ref: -orfn109985
+Ref: -andfn110778
+Ref: -iteratefn111565
+Ref: -fixfn112267
+Ref: -prodfn113841
+Node: Development114968
+Node: Contribute115257
+Node: Contributors116265
+Node: FDL118358
+Node: GPL143477
+Node: Index181023
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/dash-20260221.1346/dir b/emacs/.emacs.d/elpa/dash-20260221.1346/dir
new file mode 100644
index 0000000..7d473f4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/dash-20260221.1346/dir
@@ -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.
diff --git a/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-autoloads.el b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-autoloads.el
new file mode 100644
index 0000000..d96c96a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-autoloads.el
@@ -0,0 +1,80 @@
+;;; doom-modeline-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from doom-modeline.el
+
+(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)")
+(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.
+
+This is a global minor mode.  If called interactively, toggle the
+`Doom-Modeline mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='doom-modeline-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "doom-modeline" '("doom-modeline-"))
+
+
+;;; Generated autoloads from doom-modeline-core.el
+
+(register-definition-prefixes "doom-modeline-core" '("doom-modeline"))
+
+
+;;; 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-"))
+
+
+;;; Generated autoloads from doom-modeline-segments.el
+
+(register-definition-prefixes "doom-modeline-segments" '("doom-modeline-"))
+
+;;; End of scraped data
+
+(provide 'doom-modeline-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; doom-modeline-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-core.el b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-core.el
new file mode 100644
index 0000000..f3d7096
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-core.el
@@ -0,0 +1,1937 @@
+;;; doom-modeline-core.el --- The core libraries for doom-modeline -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2018-2026 Vincent Zhang
+
+;; This file is not part of GNU Emacs.
+
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+
+;;; Commentary:
+;;
+;; The core libraries for doom-modeline.
+;;
+
+;;; Code:
+
+(require 'compat)
+(eval-when-compile
+  (require 'cl-lib)
+  (require 'subr-x))
+(require 'nerd-icons)
+(require 'shrink-path)
+
+
+;;
+;; Compatibility
+;;
+
+(unless (boundp 'mode-line-right-align-edge)
+  (defcustom mode-line-right-align-edge 'window
+    "Where function `mode-line-format-right-align' should align to.
+Internally, that function uses `:align-to' in a display property,
+so aligns to the left edge of the given area.  See info node
+`(elisp)Pixel Specification'.
+
+Must be set to a symbol.  Acceptable values are:
+- `window': align to extreme right of window, regardless of margins
+  or fringes
+- `right-fringe': align to right-fringe
+- `right-margin': align to right-margin"
+    :type '(choice (const right-margin)
+                   (const right-fringe)
+                   (const window))
+    :group 'mode-line))
+
+
+;;
+;; Optimization
+;;
+
+;; Don’t compact font caches during GC.
+(when (eq system-type 'windows-nt)
+  (setq inhibit-compacting-font-caches t))
+
+
+;;
+;; Customization
+;;
+
+(defgroup doom-modeline nil
+  "A minimal and modern mode-line."
+  :group 'mode-line
+  :link '(url-link :tag "Homepage" "https://github.com/seagle0128/doom-modeline"))
+
+(defcustom doom-modeline-support-imenu nil
+  "If non-nil, cause imenu to see `doom-modeline' declarations.
+This is done by adjusting `lisp-imenu-generic-expression' to
+include support for finding `doom-modeline-def-*' forms.
+
+Must be set before loading `doom-modeline'."
+  :type 'boolean
+  :set (lambda (_sym val)
+         (if val
+             (add-hook 'emacs-lisp-mode-hook #'doom-modeline-add-imenu)
+           (remove-hook 'emacs-lisp-mode-hook #'doom-modeline-add-imenu)))
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-height (+ (window-font-height nil 'mode-line) 4)
+  "How tall the mode-line should be.  It's only respected in GUI.
+If the actual char height is larger, it respects the actual char height."
+  :type 'integer
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-bar-width 4
+  "How wide the mode-line bar should be.  It's only respected in GUI."
+  :type 'integer
+  :set (lambda (sym val)
+         (set sym (if (> val 0) val 1)))
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-hud nil
+  "Whether to use hud instead of default bar.  It's only respected in GUI."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-hud-min-height 2
+  "Minimum height in pixels of the \"thumb\" of the hud.
+Only respected in GUI."
+  :type 'integer
+  :set (lambda (sym val)
+         (set sym (if (> val 1) val 1)))
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-window-width-limit 85
+  "The limit of the window width.
+
+If `window-width' is smaller than the limit, some information won't be
+displayed.  It can be an integer or a float number.  nil means no limit."
+  :type '(choice integer
+                 float
+                 (const :tag "Disable" nil))
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-spc-face-overrides nil
+  "Property list of face attributes for whitespace in the modeline.
+
+These face attributes override any attributes for spacing produced by
+`doom-modeline-spc', `doom-modeline-wspc', and `doom-modeline-vspc'.
+
+See `defface' for possible attributes and values in this property list."
+  :type 'plist
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-project-detection 'auto
+  "How to detect the project root.
+
+nil means to use `default-directory'.
+
+The project management packages have some issues on detecting project root.
+E.g., `projectile' doesn't handle symlink folders well, while `project' is
+unable to handle sub-projects.
+Specify another one if you encounter the issue."
+  :type '(choice (const :tag "Auto-detect" auto)
+                 (const :tag "Find File in Project" ffip)
+                 (const :tag "Projectile" projectile)
+                 (const :tag "Built-in Project" project)
+                 (const :tag "Disable" nil))
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-buffer-file-name-style 'auto
+  "Determines the style used by `doom-modeline-buffer-file-name'.
+
+Given ~/Projects/FOSS/emacs/lisp/comint.el
+  auto => emacs/l/comint.el (in a project) or comint.el
+  truncate-upto-project => ~/P/F/emacs/lisp/comint.el
+  truncate-from-project => ~/Projects/FOSS/emacs/l/comint.el
+  truncate-with-project => emacs/l/comint.el
+  truncate-except-project => ~/P/F/emacs/l/comint.el
+  truncate-upto-root => ~/P/F/e/lisp/comint.el
+  truncate-all => ~/P/F/e/l/comint.el
+  truncate-nil => ~/Projects/FOSS/emacs/lisp/comint.el
+  relative-from-project => emacs/lisp/comint.el
+  relative-to-project => lisp/comint.el
+  file-name => comint.el
+  file-name-with-project => FOSS|comint.el
+  project => FOSS
+  buffer-name => comint.el<2> (uniquify buffer name)"
+  :type '(choice (const auto)
+                 (const truncate-upto-project)
+                 (const truncate-from-project)
+                 (const truncate-with-project)
+                 (const truncate-except-project)
+                 (const truncate-upto-root)
+                 (const truncate-all)
+                 (const truncate-nil)
+                 (const relative-from-project)
+                 (const relative-to-project)
+                 (const file-name)
+                 (const file-name-with-project)
+                 (const project)
+                 (const buffer-name))
+  :group'doom-modeline)
+
+(defcustom doom-modeline-buffer-file-true-name nil
+  "Use `file-truename' on buffer file name.
+
+Project detection(projectile.el) may uses `file-truename' on directory path.
+Turn on this to provide right relative path for buffer file name."
+  :type 'boolean
+  :group'doom-modeline)
+
+(defcustom doom-modeline-icon t
+  "Whether display the icons in the mode-line.
+
+While using the server mode in GUI, should set the value explicitly."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-major-mode-icon t
+  "Whether display the icon for `major-mode'.
+
+It respects option `doom-modeline-icon'."
+  :type 'boolean
+  :group'doom-modeline)
+
+(defcustom doom-modeline-major-mode-color-icon t
+  "Whether display the colorful icon for `major-mode'.
+
+It respects option `nerd-icons-color-icons'."
+  :type 'boolean
+  :group'doom-modeline)
+
+(defcustom doom-modeline-buffer-state-icon t
+  "Whether display the icon for the buffer state.
+
+It respects option `doom-modeline-icon'."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-buffer-modification-icon t
+  "Whether display the modification icon for the buffer.
+
+It respects option `doom-modeline-icon' and `doom-modeline-buffer-state-icon'."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-lsp-icon t
+  "Whether display the icon of lsp client.
+
+It respects option `doom-modeline-icon'."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-time-icon t
+  "Whether display the icon of time.
+
+It respects option `doom-modeline-icon'."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-time-live-icon t
+  "Whether display the live icons of time.
+
+It respects option `doom-modeline-icon' and option `doom-modeline-time-icon'."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-time-analogue-clock t
+  "Whether to draw an analogue clock SVG as the live time icon.
+It respects the option `doom-modeline-icon', option `doom-modeline-time-icon',
+and option `doom-modeline-time-live-icon'."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-time-clock-minute-resolution 1
+  "The clock will be updated every this many minutes, truncated.
+See `doom-modeline-time-analogue-clock'."
+  :type 'natnum
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-time-clock-size 0.7
+  "Size of the analogue clock drawn, either in pixels or as a proportional height.
+An integer value is used as the diameter of clock in pixels.
+A floating point value sets the diameter of the clock relative to
+`doom-modeline-height'.
+
+Only relevant when `doom-modeline-time-analogue-clock' is non-nil, which see."
+  :type 'number
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-unicode-number t
+  "Whether to use unicode numbers."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-unicode-fallback nil
+  "Whether to use unicode as a fallback (instead of ASCII) when not using icons."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-buffer-name t
+  "Whether display the buffer name."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-highlight-modified-buffer-name t
+  "Whether highlight the modified buffer name."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-column-zero-based t
+  "When non-nil, mode line display column numbers zero-based.
+See `column-number-indicator-zero-based'."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-percent-position '(-3 "%p")
+  "Specification of \"percentage offset\" of window through buffer.
+See `mode-line-percent-position'."
+  :type '(radio
+          (const :tag "nil:  No offset is displayed" nil)
+          (const :tag "\"%o\": Proportion of \"travel\" of the window through the buffer"
+            (-3 "%o"))
+          (const :tag "\"%p\": Percentage offset of top of window"
+            (-3 "%p"))
+          (const :tag "\"%P\": Percentage offset of bottom of window"
+            (-3 "%P"))
+          (const :tag "\"%q\": Offsets of both top and bottom of window"
+            (6 "%q")))
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-position-line-format '("L%l")
+  "Format used to display line numbers in the mode line.
+See `mode-line-position-line-format'."
+  :type '(list string)
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-position-column-format '("C%c")
+  "Format used to display column numbers in the mode line.
+See `mode-line-position-column-format'."
+  :type '(list string)
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-position-column-line-format '("%l:%c")
+  "Format used to display combined line/column numbers in the mode line.
+See `mode-line-position-column-line-format'."
+  :type '(list string)
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-minor-modes nil
+  "Whether display the minor modes in the mode-line."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-selection-info t
+  "Whether display the selection information."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-enable-word-count nil
+  "If non-nil, a word count will be added to the selection-info modeline segment."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-continuous-word-count-modes
+  '(markdown-mode gfm-mode org-mode)
+  "Major modes in which to display word count continuously.
+
+It respects `doom-modeline-enable-word-count'."
+  :type '(repeat (symbol :tag "Major-Mode") )
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-enable-buffer-position t
+  "Whether display the buffer position information."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-buffer-encoding t
+  "Whether display the buffer encoding."
+  :type '(choice (const :tag "Always" t)
+                 (const :tag "When non-default" nondefault)
+                 (const :tag "Never" nil))
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-default-coding-system 'utf-8
+  "Default coding system for `doom-modeline-buffer-encoding' `nondefault'."
+  :type 'coding-system
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-default-eol-type 0
+  "Default EOL type for `doom-modeline-buffer-encoding' `nondefault'."
+  :type '(choice (const :tag "Unix-style LF" 0)
+                 (const :tag "DOS-style CRLF" 1)
+                 (const :tag "Mac-style CR" 2))
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-indent-info nil
+  "Whether display the indentation information."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-total-line-number nil
+  "Whether display the total line number."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-remote-host t
+  "Whether to display remote host information."
+  :type 'boolean
+  :group 'doom-modeline)
+
+;; It is based upon `editorconfig-indentation-alist' but is used to read indentation levels instead
+;; of setting them. (https://github.com/editorconfig/editorconfig-emacs)
+(defcustom doom-modeline-indent-alist
+  '((ada-mode ada-indent)
+    (ada-ts-mode ada-ts-mode-indent-offset)
+    (apache-mode apache-indent-level)
+    (awk-mode c-basic-offset)
+    (awk-ts-mode awk-ts-mode-indent-level)
+    (bash-ts-mode sh-basic-offset sh-indentation)
+    (bpftrace-mode c-basic-offset)
+    (c++-mode c-basic-offset)
+    (c++-ts-mode c-ts-mode-indent-offset)
+    (c-mode c-basic-offset)
+    (c-ts-mode c-ts-mode-indent-offset)
+    (cmake-mode cmake-tab-width)
+    (cmake-ts-mode cmake-ts-mode-indent-offset)
+    (coffee-mode coffee-tab-width)
+    (cperl-mode cperl-indent-level)
+    (crystal-mode crystal-indent-level)
+    (csharp-mode c-basic-offset)
+    (csharp-ts-mode csharp-ts-mode-indent-offset)
+    (css-mode css-indent-offset)
+    (css-ts-mode css-indent-offset)
+    (d-mode c-basic-offset)
+    (elixir-mode elixir-basic-offset)
+    (elixir-ts-mode elixir-ts-indent-offset)
+    (emacs-lisp-mode lisp-indent-offset)
+    (enh-ruby-mode enh-ruby-indent-level)
+    (erlang-mode erlang-indent-level)
+    (ess-mode ess-indent-offset)
+    (f90-mode f90-associate-indent
+              f90-continuation-indent
+              f90-critical-indent
+              f90-do-indent
+              f90-if-indent
+              f90-program-indent
+              f90-type-indent)
+    (feature-mode feature-indent-offset
+                  feature-indent-level)
+    (fish-mode fish-indent-offset)
+    (fsharp-mode fsharp-continuation-offset
+                 fsharp-indent-level
+                 fsharp-indent-offset)
+    (go-mod-ts-mode go-ts-mode-indent-offset)
+    (go-ts-mode go-ts-mode-indent-offset)
+    (gpr-mode gpr-indent)
+    (gpr-ts-mode gpr-ts-mode-indent-offset)
+    (groovy-mode groovy-indent-offset)
+    (haskell-mode haskell-indent-spaces
+                  haskell-indent-offset
+                  haskell-indentation-layout-offset
+                  haskell-indentation-left-offset
+                  haskell-indentation-starter-offset
+                  haskell-indentation-where-post-offset
+                  haskell-indentation-where-pre-offset
+                  shm-indent-spaces)
+    (haskell-ts-mode)
+    (haxor-mode haxor-tab-width)
+    (html-ts-mode html-ts-mode-indent-offset)
+    (idl-mode c-basic-offset)
+    (jade-mode jade-tab-width)
+    (java-mode c-basic-offset)
+    (java-ts-mode java-ts-mode-indent-offset
+                  c-ts-common-indent-offset
+                  c-basic-offset)
+    (js-mode js-indent-level)
+    (js-ts-mode js-indent-level)
+    (js-json-mode js-indent-level)
+    (js-jsx-mode js-indent-level
+                 sgml-basic-offset)
+    (js2-mode js2-basic-offset)
+    (js2-jsx-mode js2-basic-offset
+                  sgml-basic-offset)
+    (js3-mode js3-indent-level)
+    (json-mode js-indent-level)
+    (json-ts-mode json-ts-mode-indent-offset)
+    (jsonian-mode jsonian-default-indentation)
+    (julia-mode julia-indent-offset)
+    (julia-ts-mode julia-ts-indent-offset)
+    (kotlin-mode kotlin-tab-width)
+    (kotlin-ts-mode kotlin-ts-mode-indent-offset)
+    (latex-mode tex-indent-basic)
+    (lisp-mode lisp-indent-offset)
+    (livescript-mode livescript-tab-width)
+    (lua-mode lua-indent-level)
+    (lua-ts-mode lua-ts-indent-offset)
+    (matlab-mode matlab-indent-level)
+    (magik-ts-mode magik-indent-level)
+    (meson-mode meson-indent-basic)
+    (mips-mode mips-tab-width)
+    (mustache-mode mustache-basic-offset)
+    (nasm-mode nasm-basic-offset)
+    (nginx-mode nginx-indent-level)
+    (nxml-mode nxml-child-indent)
+    (objc-mode c-basic-offset)
+    (octave-mode octave-block-offset)
+    (perl-mode perl-indent-level)
+    (php-mode c-basic-offset)
+    (php-ts-mode php-ts-mode-indent-offset)
+    (pike-mode c-basic-offset)
+    (powershell-mode powershell-indent-level)
+    (protobuf-mode c-basic-offset)
+    (ps-mode ps-mode-tab)
+    (pug-mode pug-tab-width)
+    (puppet-mode puppet-indent-level)
+    (python-mode python-indent-offset)
+    (python-ts-mode python-indent-offset)
+    (rjsx-mode js-indent-level sgml-basic-offset)
+    (ruby-mode ruby-indent-level)
+    (ruby-ts-mode ruby-indent-level)
+    (rust-mode rust-indent-offset)
+    (rust-ts-mode rust-ts-mode-indent-offset)
+    (rustic-mode rustic-indent-offset)
+    (scala-mode scala-indent:step)
+    (scala-ts-mode scala-ts-indent-offset)
+    (scss-mode css-indent-offset)
+    (sgml-mode sgml-basic-offset)
+    (sh-mode sh-basic-offset sh-indentation)
+    (slim-mode slim-indent-offset)
+    (sml-mode sml-indent-level)
+    (swift-mode swift-mode:basic-offset)
+    (tcl-mode tcl-indent-level
+              tcl-continued-indent-level)
+    (templ-ts-mode go-ts-mode-indent-offset js-indent-level)
+    (terra-mode terra-indent-level)
+    (toml-ts-mode toml-ts-mode-indent-offset)
+    (typescript-mode typescript-indent-level)
+    (typescript-ts-base-mode typescript-ts-mode-indent-offset)
+    (typescript-ts-mode typescript-ts-mode-indent-offset)
+    (verilog-mode verilog-indent-level
+                  verilog-indent-level-behavioral
+                  verilog-indent-level-declaration
+                  verilog-indent-level-module
+                  verilog-cexp-indent
+                  verilog-case-indent)
+    (web-mode web-mode-attr-indent-offset
+              web-mode-attr-value-indent-offset
+              web-mode-code-indent-offset
+              web-mode-css-indent-offset
+              web-mode-markup-indent-offset
+              web-mode-sql-indent-offset
+              web-mode-block-padding
+              web-mode-script-padding
+              web-mode-style-padding)
+    (yaml-mode yaml-indent-offset)
+    (yaml-ts-mode yaml-indent-offset))
+  "Indentation retrieving variables matched to major modes.
+
+Which is used when `doom-modeline-indent-info' is non-nil.
+When multiple variables are specified for a mode, they will be tried resolved
+in the given order."
+  :type '(alist :key-type symbol :value-type sexp)
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-vcs-icon t
+  "Whether display the icon of vcs segment.
+
+It respects option `doom-modeline-icon'."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-vcs-max-length 15
+  "The maximum displayed length of the branch name of version control."
+  :type 'integer
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-vcs-display-function #'doom-modeline-vcs-name
+  "The function to display the branch name."
+  :type 'function
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-vcs-state-faces-alist
+  '((needs-update . (doom-modeline-warning bold))
+    (removed . (doom-modeline-urgent bold))
+    (conflict . (doom-modeline-urgent bold))
+    (unregistered . (doom-modeline-urgent bold)))
+  "Alist mapping VCS states to their corresponding faces.
+
+See `vc-state' for possible values of the state.
+
+For states not explicitly listed, the `doom-modeline-vcs-default' face
+is used."
+  :type '(alist :key-type symbol :value-type sexp)
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-check-icon t
+  "Whether display the icon of check segment.
+
+It respects option `doom-modeline-icon'."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-check 'auto
+  "How to display the check segment.
+
+auto mode adapts to window width (see `doom-modeline-window-width-limit').
+full displays all detailed error information.
+simple summarizes error counts.
+nil disables the check segment."
+  :type '(choice (const :tag "Auto format" auto)
+                 (const :tag "Full format" full)
+                 (const :tag "Simple format" simple)
+                 (const :tag "Disable" nil))
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-number-limit 99
+  "The maximum number displayed for notifications."
+  :type 'integer
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-project-name (bound-and-true-p project-mode-line)
+  "Whether display the project name.
+
+Non-nil to display in the mode-line."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-workspace-name t
+  "Whether display the workspace name.
+
+Non-nil to display in the mode-line."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-persp-name t
+  "Whether display the perspective name.
+
+Non-nil to display in the mode-line."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-display-default-persp-name nil
+  "If non-nil, the default perspective name is displayed in the mode-line."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-persp-icon t
+  "If non-nil, the perspective name is displayed alongside a folder icon."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-repl t
+  "Whether display the `repl' state.
+
+Non-nil to display in the mode-line."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-lsp t
+  "Whether display the `lsp' state.
+
+Non-nil to display in the mode-line."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-github nil
+  "Whether display the GitHub notifications.
+
+It requires `ghub' and `async' packages.  Additionally, your GitHub personal
+access token must have `notifications' permissions.
+
+If you use `pass' to manage your secrets, you also need to add this hook:
+  (add-hook \\='doom-modeline-before-github-fetch-notification-hook
+	   #\\='auth-source-pass-enable)"
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-github-interval 1800 ; (* 30 60)
+  "The interval of checking GitHub."
+  :type 'integer
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-env-version t
+  "Whether display the environment version."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-modal t
+  "Whether display the modal state.
+
+Including `evil', `overwrite', `god', `ryo' and `xah-fly-keys', etc."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-modal-icon t
+  "Whether display the modal state icon.
+
+Including `evil', `overwrite', `god', `ryo' and `xah-fly-keys', etc."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-modal-modern-icon t
+  "Whether display the modern icons for modals."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-always-show-macro-register nil
+  "When non-nil, always show the register name when recording an evil macro."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-mu4e nil
+  "Whether display the mu4e notifications.
+
+It requires `mu4e-alert' package."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-gnus nil
+  "Whether to display notifications from gnus.
+
+It requires `gnus' to be setup"
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-gnus-timer 2
+  "The wait time in minutes before gnus fetches mail.
+
+If nil, don't set up a hook."
+  :type 'integer
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-gnus-idle nil
+  "Whether to wait an idle time to scan for news.
+
+When t, sets `doom-modeline-gnus-timer' as an idle timer.  If a
+number, Emacs must have been idle this given time, checked after
+reach the defined timer, to fetch news.  The time step can be
+configured in `gnus-demon-timestep'."
+  :type '(choice
+	      (boolean :tag "Set `doom-modeline-gnus-timer' as an idle timer")
+	      (number :tag "Set a custom idle timer"))
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-gnus-excluded-groups nil
+  "A list of groups to be excluded from the unread count.
+Groups' names list in `gnus-newsrc-alist'`"
+  :type '(repeat string)
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-irc t
+  "Whether display the irc notifications.
+
+It requires either `circe' , `erc' or `rcirc' package."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-irc-buffers nil
+  "Whether display the unread irc buffers."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-irc-priority-only nil
+  "Only show IRC notifications for buffers matching a filter.
+This lets you filter out general channel activity and only show what
+matters to you.  Requires `circe' and `tracking-faces-priorities' or
+`rcirc' and `rcirc-keywords' to be configured."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-irc-stylize #'doom-modeline-shorten-irc
+  "Which function to call to stylize IRC buffer names.
+
+Buffer names are stylized using the selected `function'.
+By default buffer names are shortened, you may want to disable or call
+your own function.
+The function must accept `buffer-name' and return `shortened-name'."
+  :type '(radio (function-item :tag "Shorten"
+                               :format "%t: %v\n %h"
+                               doom-modeline-shorten-irc)
+                (function-item
+                 :tag "Leave unchanged"
+                 :format "%t: %v\n"
+                 identity)
+                (function
+                 :tag "Other function"))
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-battery t
+  "Whether display the battery status.
+
+It respects `display-battery-mode'."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-time t
+  "Whether display the time.
+
+It respects `display-time-mode'."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-display-misc-in-all-mode-lines t
+  "Whether display the misc segment on all mode lines.
+
+If nil, display only if the mode line is active."
+  :type 'boolean
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-always-visible-segments nil
+  "A list of segments that should be visible even in inactive windows."
+  :type '(repeat symbol)
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-buffer-file-name-function #'identity
+  "The function to handle variable `buffer-file-name'."
+  :type 'function
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-buffer-file-truename-function #'identity
+  "The function to handle `buffer-file-truename'."
+  :type 'function
+  :group 'doom-modeline)
+
+(defcustom doom-modeline-k8s-show-namespace t
+  "Whether to show the current Kubernetes context's default namespace."
+  :type 'boolean
+  :group 'doom-modeline)
+
+
+;;
+;; Faces
+;;
+
+(defgroup doom-modeline-faces nil
+  "The faces of `doom-modeline'."
+  :group 'doom-modeline
+  :group 'faces
+  :link '(url-link :tag "Homepage" "https://github.com/seagle0128/doom-modeline"))
+
+(defface doom-modeline
+  '((t ()))
+  "Default face."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-emphasis
+  '((t (:inherit (doom-modeline mode-line-emphasis))))
+  "Face used for emphasis."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-highlight
+  '((t (:inherit (doom-modeline mode-line-highlight))))
+  "Face used for highlighting."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-buffer-path
+  '((t (:inherit (doom-modeline-emphasis bold))))
+  "Face used for the dirname part of the buffer path."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-buffer-file
+  '((t (:inherit (doom-modeline mode-line-buffer-id bold))))
+  "Face used for the filename part of the mode-line buffer path."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-buffer-modified
+  '((t (:inherit (doom-modeline warning bold) :background unspecified)))
+  "Face used for the \\='unsaved\\=' symbol in the mode-line."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-buffer-major-mode
+  '((t (:inherit (doom-modeline-emphasis bold))))
+  "Face used for the major-mode segment in the mode-line."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-buffer-minor-mode
+  '((t (:inherit (doom-modeline font-lock-doc-face) :weight normal :slant normal)))
+  "Face used for the minor-modes segment in the mode-line."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-project-parent-dir
+  '((t (:inherit (doom-modeline font-lock-comment-face bold))))
+  "Face used for the project parent directory of the mode-line buffer path."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-project-dir
+  '((t (:inherit (doom-modeline font-lock-string-face bold))))
+  "Face used for the project directory of the mode-line buffer path."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-project-root-dir
+  '((t (:inherit (doom-modeline-emphasis bold))))
+  "Face used for the project part of the mode-line buffer path."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-panel
+  '((t (:inherit doom-modeline-highlight)))
+  "Face for \\='X out of Y\\=' segments.
+This applies to `anzu', `evil-substitute', `iedit' etc."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-host
+  '((t (:inherit (doom-modeline italic))))
+  "Face for remote hosts in the mode-line."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-input-method
+  '((t (:inherit (doom-modeline-emphasis))))
+  "Face for input method in the mode-line."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-input-method-alt
+  '((t (:inherit (doom-modeline font-lock-doc-face) :slant normal)))
+  "Alternative face for input method in the mode-line."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-debug
+  '((t (:inherit (doom-modeline font-lock-doc-face) :slant normal)))
+  "Face for debug-level messages in the mode-line.  Used by vcs, check, etc."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-info
+  '((t (:inherit (doom-modeline success))))
+  "Face for info-level messages in the mode-line.  Used by vcs, check, etc."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-warning
+  '((t (:inherit (doom-modeline warning))))
+  "Face for warnings in the mode-line.  Used by vcs, check, etc."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-urgent
+  '((t (:inherit (doom-modeline error))))
+  "Face for errors in the mode-line.  Used by vcs, check, etc."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-notification
+  '((t (:inherit doom-modeline-warning)))
+  "Face for notifications in the mode-line.  Used by GitHub, mu4e, etc.
+Also see the face `doom-modeline-unread-number'."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-unread-number
+  '((t (:inherit doom-modeline :slant italic)))
+  "Face for unread number in the mode-line.  Used by GitHub, mu4e, etc."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-bar
+  '((t (:inherit doom-modeline-highlight)))
+  "The face used for the left-most bar in the mode-line of an active window."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-bar-inactive
+  `((t ()))
+  "The face used for the left-most bar in the mode-line of an inactive window."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-debug-visual
+  '((((background light)) :foreground "#D4843E" :inherit doom-modeline)
+    (((background dark)) :foreground "#915B2D" :inherit doom-modeline))
+  "Face to use for the mode-line while debugging."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-evil-emacs-state
+  '((t (:inherit (doom-modeline font-lock-builtin-face))))
+  "Face for the Emacs state tag in evil indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-evil-insert-state
+  '((t (:inherit (doom-modeline font-lock-keyword-face))))
+  "Face for the insert state tag in evil indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-evil-motion-state
+  '((t (:inherit (doom-modeline font-lock-doc-face) :slant normal)))
+  "Face for the motion state tag in evil indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-evil-normal-state
+  '((t (:inherit doom-modeline-info)))
+  "Face for the normal state tag in evil indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-evil-operator-state
+  '((t (:inherit (doom-modeline mode-line))))
+  "Face for the operator state tag in evil indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-evil-visual-state
+  '((t (:inherit doom-modeline-warning)))
+  "Face for the visual state tag in evil indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-evil-replace-state
+  '((t (:inherit doom-modeline-urgent)))
+  "Face for the replace state tag in evil indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-evil-user-state
+  '((t (:inherit doom-modeline-warning)))
+  "Face for the replace state tag in evil indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-overwrite
+  '((t (:inherit doom-modeline-urgent)))
+  "Face for overwrite indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-god
+  '((t (:inherit doom-modeline-info)))
+  "Face for god-mode indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-ryo
+  '((t (:inherit doom-modeline-info)))
+  "Face for RYO indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-fly-insert-state
+  '((t (:inherit (doom-modeline font-lock-keyword-face))))
+  "Face for the insert state in xah-fly-keys indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-fly-normal-state
+  '((t (:inherit doom-modeline-info)))
+  "Face for the normal state in xah-fly-keys indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-boon-command-state
+  '((t (:inherit doom-modeline-info)))
+  "Face for the command state tag in boon indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-boon-insert-state
+  '((t (:inherit (doom-modeline font-lock-keyword-face))))
+  "Face for the insert state tag in boon indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-boon-special-state
+  '((t (:inherit (doom-modeline font-lock-builtin-face))))
+  "Face for the special state tag in boon indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-boon-off-state
+  '((t (:inherit (doom-modeline mode-line))))
+  "Face for the off state tag in boon indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-meow-normal-state
+  '((t (:inherit doom-modeline-evil-normal-state)))
+  "Face for the normal state in meow-edit indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-meow-insert-state
+  '((t (:inherit doom-modeline-evil-insert-state)))
+  "Face for the insert state in meow-edit indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-meow-beacon-state
+  '((t (:inherit doom-modeline-evil-visual-state)))
+  "Face for the beacon state in meow-edit indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-meow-motion-state
+  '((t (:inherit doom-modeline-evil-motion-state)))
+  "Face for the motion state in meow-edit indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-meow-keypad-state
+  '((t (:inherit doom-modeline-evil-operator-state)))
+  "Face for the keypad state in meow-edit indicator."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-project-name
+  '((t (:inherit (doom-modeline font-lock-comment-face italic))))
+  "Face for the project name."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-workspace-name
+  '((t (:inherit (doom-modeline-emphasis italic))))
+  "Face for the workspace name."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-persp-name
+  '((t (:inherit (doom-modeline font-lock-comment-face italic))))
+  "Face for the persp name."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-persp-buffer-not-in-persp
+  '((t (:inherit (doom-modeline font-lock-doc-face italic))))
+  "Face for the buffers which are not in the persp."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-repl-success
+  '((t (:inherit doom-modeline-info)))
+  "Face for REPL success state."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-repl-warning
+  '((t (:inherit doom-modeline-warning)))
+  "Face for REPL warning state."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-vcs-default
+  '((t (:inherit (doom-modeline-info bold))))
+  "Default face for VCS states.
+
+Which are not explicitly listed in `doom-modeline-vcs-state-faces-alist'."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-lsp-success
+  '((t (:inherit doom-modeline-info)))
+  "Face for LSP success state."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-lsp-warning
+  '((t (:inherit doom-modeline-warning)))
+  "Face for LSP warning state."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-lsp-error
+  '((t (:inherit doom-modeline-urgent)))
+  "Face for LSP error state."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-lsp-running
+  '((t (:inherit (doom-modeline compilation-mode-line-run) :weight normal :slant normal)))
+  "Face for LSP running state."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-battery-charging
+  '((t (:inherit doom-modeline-info)))
+  "Face for battery charging status."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-battery-full
+  '((t (:inherit doom-modeline-info)))
+  "Face for battery full status."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-battery-normal
+  '((t (:inherit doom-modeline)))
+  "Face for battery normal status."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-battery-warning
+  '((t (:inherit doom-modeline-warning)))
+  "Face for battery warning status."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-battery-critical
+  '((t (:inherit doom-modeline-urgent)))
+  "Face for battery critical status."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-battery-error
+  '((t (:inherit doom-modeline-urgent)))
+  "Face for battery error status."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-time
+  '((t (:inherit doom-modeline)))
+  "Face for display time."
+  :group 'doom-modeline-faces)
+
+(defface doom-modeline-compilation
+  '((t (:inherit doom-modeline-warning :slant italic :height 0.9)))
+  "Face for compilation progress."
+  :group 'doom-modeline-faces)
+
+
+;;
+;; Externals
+;;
+
+(declare-function doom-modeline-shorten-irc "doom-modeline-segments")
+(declare-function ffip-project-root "ext:find-file-in-project")
+(declare-function project-root "project")
+(declare-function projectile-project-root "ext:projectile")
+
+
+;;
+;; Utilities
+;;
+
+(defun doom-modeline-add-font-lock ()
+  "Fontify `doom-modeline-def-*' statements."
+  (font-lock-add-keywords
+   'emacs-lisp-mode
+   '(("(\\(doom-modeline-def-.+\\)\\_> +\\(.*?\\)\\_>"
+      (1 font-lock-keyword-face)
+      (2 font-lock-constant-face)))))
+(doom-modeline-add-font-lock)
+
+(defun doom-modeline-add-imenu ()
+  "Add to `imenu' index."
+  (add-to-list
+   'imenu-generic-expression
+   '("Modelines"
+     "^\\s-*(\\(doom-modeline-def-modeline\\)\\s-+\\(\\(?:\\sw\\|\\s_\\|\\s'\\|\\\\.\\)+\\)"
+     2))
+  (add-to-list
+   'imenu-generic-expression
+   '("Segments"
+     "^\\s-*(\\(doom-modeline-def-segment\\)\\s-+\\(\\(?:\\sw\\|\\s_\\|\\\\.\\)+\\)"
+     2))
+  (add-to-list
+   'imenu-generic-expression
+   '("Envs"
+     "^\\s-*(\\(doom-modeline-def-env\\)\\s-+\\(\\(?:\\sw\\|\\s_\\|\\\\.\\)+\\)"
+     2)))
+
+
+;;
+;; Core helpers
+;;
+
+;; FIXME #183: Force to calculate mode-line height
+;; @see https://github.com/seagle0128/doom-modeline/issues/183
+;; @see https://github.com/seagle0128/doom-modeline/issues/483
+(unless (>= emacs-major-version 29)
+  (eval-and-compile
+    (defun doom-modeline-redisplay (&rest _)
+      "Call `redisplay' to trigger mode-line height calculations.
+
+Certain functions, including e.g. `fit-window-to-buffer', base
+their size calculations on values which are incorrect if the
+mode-line has a height different from that of the `default' face
+and certain other calculations have not yet taken place for the
+window in question.
+
+These calculations can be triggered by calling `redisplay'
+explicitly at the appropriate time and this functions purpose
+is to make it easier to do so.
+
+This function is like `redisplay' with non-nil FORCE argument,
+but it will only trigger a redisplay when there is a non-nil
+`mode-line-format' and the height of the mode-line is different
+from that of the `default' face.  This function is intended to be
+used as an advice to window creation functions."
+      (when (and (bound-and-true-p doom-modeline-mode)
+                 mode-line-format
+                 (/= (frame-char-height) (window-mode-line-height)))
+        (redisplay t))))
+  (advice-add #'fit-window-to-buffer :before #'doom-modeline-redisplay))
+
+;; For `flycheck-color-mode-line'
+(with-eval-after-load 'flycheck-color-mode-line
+  (defvar flycheck-color-mode-line-face-to-color)
+  (setq flycheck-color-mode-line-face-to-color 'doom-modeline))
+
+(defun doom-modeline-icon-displayable-p ()
+  "Return non-nil if icons are displayable."
+  (and doom-modeline-icon (featurep 'nerd-icons)))
+
+(defun doom-modeline-mwheel-available-p ()
+  "Whether mouse wheel is available."
+  (and (featurep 'mwheel) (bound-and-true-p mouse-wheel-mode)))
+
+;; Keep `doom-modeline-current-window' up-to-date
+(defun doom-modeline--selected-window (&optional frame)
+  "Get the selected window of FRAME."
+  (frame-selected-window frame))
+
+(defvar doom-modeline-current-window (doom-modeline--selected-window)
+  "Current window.")
+
+(defun doom-modeline--active ()
+  "Whether is an active window."
+  (unless (and (bound-and-true-p mini-frame-frame)
+               (and (frame-live-p mini-frame-frame)
+                    (frame-visible-p mini-frame-frame)))
+    (and doom-modeline-current-window
+         (eq (doom-modeline--selected-window) doom-modeline-current-window))))
+
+(defvar-local doom-modeline--limited-width-p nil)
+
+(defun doom-modeline--segment-visible (name)
+  "Whether the segment NAME should be displayed."
+  (and
+   (or (doom-modeline--active)
+       (member name doom-modeline-always-visible-segments))
+   (not doom-modeline--limited-width-p)))
+
+(defun doom-modeline-set-selected-window (&rest _)
+  "Set `doom-modeline-current-window' appropriately."
+  (setq doom-modeline-current-window
+        (let ((win (doom-modeline--selected-window)))
+          (if (minibuffer-window-active-p win)
+              (minibuffer-selected-window)
+            win))))
+
+(defun doom-modeline-unset-selected-window ()
+  "Unset `doom-modeline-current-window' appropriately."
+  (setq doom-modeline-current-window nil))
+
+(defun doom-modeline-focus-change (&rest _)
+  "Focus change."
+  ;; (if (frame-focus-state)
+  ;;     (doom-modeline-set-selected-window)
+  ;;   (doom-modeline-unset-selected-window))
+  )
+
+
+
+;;
+;; Core
+;;
+
+(defvar doom-modeline--fn-alist ())
+(defvar doom-modeline--var-alist ())
+(defvar doom-modeline--modelines ()
+  "Alist of modeline definitions.
+Each element is (NAME . ((lhs-segments...) (rhs-segments...))).")
+
+(defmacro doom-modeline-def-segment (name &rest body)
+  "Define a modeline segment NAME with BODY and byte compiles it."
+  (declare (indent defun) (doc-string 2))
+  (let ((sym (intern (format "doom-modeline-segment--%s" name)))
+        (docstring (if (stringp (car body))
+                       (pop body)
+                     (format "%s modeline segment" name))))
+    (cond ((and (symbolp (car body))
+                (not (cdr body)))
+           `(add-to-list 'doom-modeline--var-alist (cons ',name ',(car body))))
+          (t
+           `(progn
+              (defun ,sym () ,docstring ,@body)
+              (add-to-list 'doom-modeline--fn-alist (cons ',name ',sym))
+              ,(unless (bound-and-true-p byte-compile-current-file)
+                 `(let (byte-compile-warnings)
+                    (unless (and (fboundp 'subr-native-elisp-p)
+                                 (subr-native-elisp-p (symbol-function #',sym)))
+                      (byte-compile #',sym)))))))))
+
+(defun doom-modeline--prepare-segments (segments)
+  "Prepare mode-line `SEGMENTS'."
+  (let (forms it)
+    (dolist (seg segments)
+      (cond ((stringp seg)
+             (push seg forms))
+            ((symbolp seg)
+             (cond ((setq it (alist-get seg doom-modeline--fn-alist))
+                    (push (list :eval (list it)) forms))
+                   ((setq it (alist-get seg doom-modeline--var-alist))
+                    (push it forms))
+                   ((error "%s is not a defined segment" seg))))
+            ((error "%s is not a valid segment" seg))))
+    (nreverse forms)))
+
+(defun doom-modeline-def-modeline (name lhs &optional rhs)
+  "Define a modeline format and byte-compiles it.
+NAME is a symbol to identify it (used by `doom-modeline' for retrieval).
+LHS and RHS are lists of symbols of modeline segments defined with
+`doom-modeline-def-segment'.
+
+Example:
+  (doom-modeline-def-modeline \\='minimal
+    \\='(bar matches \" \" buffer-info)
+    \\='(media-info major-mode))
+  (doom-modeline-set-modeline \\='minimal t)"
+  ;; Register the modeline definition for runtime manipulation
+  (let ((def (assq name doom-modeline--modelines)))
+    (if def
+        (setcdr def (list lhs rhs))
+      (push (cons name (list lhs rhs)) doom-modeline--modelines)))
+  (let ((sym (intern (format "doom-modeline-format--%s" name)))
+        (lhs-forms (doom-modeline--prepare-segments lhs))
+        (rhs-forms (doom-modeline--prepare-segments rhs)))
+    (defalias sym
+      (lambda ()
+        (list lhs-forms
+              (let* ((rhs-str (format-mode-line `("" ,@rhs-forms)))
+                     (rhs-width (progn
+                                  (add-face-text-property
+                                   0 (length rhs-str) 'mode-line t rhs-str)
+                                  (doom-modeline-string-pixel-width rhs-str))))
+                (propertize
+                 " "
+                 'face (doom-modeline-face)
+                 'display
+                 ;; Backport from `mode-line-right-align-edge' in 30
+                 (if (and (display-graphic-p)
+                          (not (eq mode-line-right-align-edge 'window)))
+		             `(space :align-to (- ,mode-line-right-align-edge
+                                          (,rhs-width)))
+		           `(space :align-to (,(- (window-pixel-width)
+                                          (window-scroll-bar-width)
+                                          (window-right-divider-width)
+                                          (* (or (car (window-margins)) 1)
+                                             (frame-char-width))
+                                          ;; Manually account for value of
+                                          ;; `mode-line-right-align-edge' even
+                                          ;; when display is non-graphical
+                                          (pcase mode-line-right-align-edge
+                                            ('right-margin
+                                             (or (cdr (window-margins)) 0))
+                                            ('right-fringe
+                                             (or (cadr (window-fringes)) 0))
+                                            (_ 0))
+                                          rhs-width))))))
+              rhs-forms))
+      (concat "Modeline:\n"
+              (format "  %s\n  %s"
+                      (prin1-to-string lhs)
+                      (prin1-to-string rhs))))))
+(put 'doom-modeline-def-modeline 'lisp-indent-function 'defun)
+
+(defun doom-modeline (key)
+  "Return a mode-line configuration associated with KEY (a symbol).
+Throws an error if it doesn't exist."
+  (let ((fn (intern-soft (format "doom-modeline-format--%s" key))))
+    (when (functionp fn)
+      `(:eval (,fn)))))
+
+(defun doom-modeline-set-modeline (key &optional default)
+  "Set the modeline format.  Does nothing if the modeline KEY doesn't exist.
+If DEFAULT is non-nil, set the default mode-line for all buffers."
+  (when-let* ((modeline (doom-modeline key)))
+    (setf (if default
+              (default-value 'mode-line-format)
+            mode-line-format)
+          (list "%e" modeline))))
+
+;;
+;; Modeline Segment Management
+;;
+
+(defcustom doom-modeline-excluded-modelines nil
+  "List of modeline names to exclude from `doom-modeline-add-segment'.
+These modelines will not be modified when adding segments programmatically."
+  :type '(repeat symbol)
+  :group 'doom-modeline)
+
+(defun doom-modeline--insert-segment-in-list (list anchor segment position)
+  "Insert SEGMENT in LIST relative to ANCHOR at POSITION.
+POSITION can be :before or :after.
+Returns the modified list."
+  (cond ((null list) (list segment))
+        ((eq (car list) anchor)
+         (if (eq position :before)
+             (cons segment list)
+           (cons anchor (cons segment (cdr list)))))
+        (t
+         (cons (car list)
+               (doom-modeline--insert-segment-in-list (cdr list) anchor segment position)))))
+
+(defun doom-modeline--remove-segment-from-list (list segment)
+  "Remove SEGMENT from LIST.
+Returns the modified list."
+  (cond ((null list) nil)
+        ((eq (car list) segment)
+         (doom-modeline--remove-segment-from-list (cdr list) segment))
+        (t
+         (cons (car list)
+               (doom-modeline--remove-segment-from-list (cdr list) segment)))))
+
+(defun doom-modeline-add-segment (segment anchor &optional position modeline)
+  "Add SEGMENT to modeline(s) relative to ANCHOR segment.
+SEGMENT is the segment name to add (a symbol).
+ANCHOR is the segment name to anchor to (a symbol).
+POSITION can be :before or :after (default: :after).
+MODELINE can be a modeline name (symbol) to add to a specific modeline,
+or nil/'all to add to all modelines (respecting
+`doom-modeline-excluded-modelines').
+
+Modelines listed in `doom-modeline-excluded-modelines' are not modified
+when adding to all modelines."
+  (let ((modelines (if (or (null modeline) (eq modeline 'all))
+                       doom-modeline--modelines
+                     (list (assq modeline doom-modeline--modelines)))))
+    (dolist (modeline-def modelines)
+      (when modeline-def
+        (pcase-let ((`(,name . (,lhs ,rhs)) modeline-def))
+          (unless (memq name doom-modeline-excluded-modelines)
+            (let ((new-lhs lhs)
+                  (new-rhs rhs))
+              ;; Try to add to LHS
+              (when (memq anchor lhs)
+                (setq new-lhs (doom-modeline--insert-segment-in-list lhs anchor segment
+                                                                     (or position :after))))
+              ;; Try to add to RHS
+              (when (memq anchor rhs)
+                (setq new-rhs (doom-modeline--insert-segment-in-list rhs anchor segment
+                                                                     (or position :after))))
+              ;; Only redefine if at least one list was modified
+              (when (or (not (eq new-lhs lhs))
+                        (not (eq new-rhs rhs)))
+                (doom-modeline-def-modeline name new-lhs new-rhs)))))))))
+
+(defun doom-modeline-remove-segment (segment &optional modeline)
+  "Remove SEGMENT from modeline(s).
+SEGMENT is the segment name to remove (a symbol).
+MODELINE can be a modeline name (symbol) to remove from a specific modeline,
+or nil/'all to remove from all modelines (respecting
+`doom-modeline-excluded-modelines').
+
+Modelines listed in `doom-modeline-excluded-modelines' are not modified
+when removing segments programmatically."
+  (let ((modelines (if (or (null modeline) (eq modeline 'all))
+                       doom-modeline--modelines
+                     (list (assq modeline doom-modeline--modelines)))))
+    (dolist (modeline-def modelines)
+      (when modeline-def
+        (pcase-let ((`(,name . (,lhs ,rhs)) modeline-def))
+          (unless (memq name doom-modeline-excluded-modelines)
+            (let ((new-lhs lhs)
+                  (new-rhs rhs))
+              ;; Try to remove from LHS
+              (when (memq segment lhs)
+                (setq new-lhs (doom-modeline--remove-segment-from-list lhs segment)))
+              ;; Try to remove from RHS
+              (when (memq segment rhs)
+                (setq new-rhs (doom-modeline--remove-segment-from-list rhs segment)))
+              ;; Only redefine if at least one list was modified
+              (when (or (not (eq new-lhs lhs))
+                        (not (eq new-rhs rhs)))
+                (doom-modeline-def-modeline name new-lhs new-rhs)))))))))
+
+
+;;
+;; Helpers
+;;
+
+(defconst doom-modeline-ellipsis
+  (if (char-displayable-p ?…) "…" "...")
+  "Ellipsis.")
+
+(defsubst doom-modeline-spc ()
+  "Whitespace."
+  (propertize " " 'face (doom-modeline-spc-face)))
+
+(defsubst doom-modeline-wspc ()
+  "Wide Whitespace."
+  (propertize "  " 'face (doom-modeline-spc-face)))
+
+(defsubst doom-modeline-vspc ()
+  "Thin whitespace."
+  (propertize " "
+              'face (doom-modeline-spc-face)
+              'display '((space :relative-width 0.5))))
+
+(defun doom-modeline-face (&optional face inactive-face)
+  "Display FACE in active window, and INACTIVE-FACE in inactive window.
+IF FACE is nil, `mode-line' face will be used.
+If INACTIVE-FACE is nil, `mode-line-inactive' face will be added."
+  (if (doom-modeline--active)
+      `(:inherit (doom-modeline
+                  ,(cond ((facep face) face)
+                         ((facep 'mode-line-active) 'mode-line-active)
+                         (t 'mode-line))))
+    `(:inherit (doom-modeline
+                ,(if (facep inactive-face) inactive-face
+                   `(:inherit (mode-line-inactive ,face)))))))
+
+(defun doom-modeline-spc-face (&optional face)
+  "Apply FACE or `doom-modeline-spc-face-overrides' to `doom-modeline-face'."
+  `(:inherit (,(doom-modeline-face) ,face ,doom-modeline-spc-face-overrides)))
+
+(defun doom-modeline-string-pixel-width (str)
+  "Return the width of STR in pixels."
+  (if (fboundp 'string-pixel-width)
+      (string-pixel-width str)
+    (* (string-width str) (window-font-width nil 'mode-line)
+       (if (display-graphic-p) 1.05 1.0))))
+
+;; Per-frame cache for mode-line font height.
+(defvar doom-modeline--font-height-cache (make-hash-table :test 'eq :weakness 'key)
+  "Per-frame cache for mode-line font height.
+Keys are frame objects, values are cons cells (HEIGHT . FACE-HEIGHT-ATTR).")
+
+(defun doom-modeline--reset-font-height-cache (&rest _)
+  "Reset cached font height for all frames."
+  (clrhash doom-modeline--font-height-cache))
+
+(defun doom-modeline--font-height ()
+  "Calculate the actual char height of the mode-line for the current frame.
+The result is cached per-frame to avoid expensive calculations during redisplay."
+  (let* ((frame (selected-frame))
+         (current-face-height-attr (face-attribute 'mode-line :height frame)) ; Get attribute for the specific frame
+         (cache-entry (gethash frame doom-modeline--font-height-cache)))
+    (if (and cache-entry
+             (equal (cdr cache-entry) current-face-height-attr))
+        ;; Return cached value if frame exists in cache and face attribute matches
+        (car cache-entry)
+      ;; Else, recalculate and update cache for this frame
+      (let* ((base-char-height (window-font-height nil 'mode-line)) ; Use window-font-height in the context of the frame/window
+             (new-height (round
+                          (* 1.0 (cond
+                                  ((integerp current-face-height-attr)
+                                   (/ current-face-height-attr 10.0)) ; Ensure float division
+                                  ((floatp current-face-height-attr)
+                                   (* current-face-height-attr base-char-height))
+                                  (t base-char-height))))))
+        ;; Update cache for the current frame
+        (puthash frame (cons new-height current-face-height-attr) doom-modeline--font-height-cache)
+        new-height))))
+
+(defun doom-modeline--original-value (sym)
+  "Return the original value for SYM, if any.
+
+If SYM has an original value, return it in a list.  Return nil
+otherwise."
+  (let* ((orig-val-expr (get sym 'standard-value)))
+    (when (consp orig-val-expr)
+      (ignore-errors
+        (list
+         (eval (car orig-val-expr)))))))
+
+(defun doom-modeline-add-variable-watcher (symbol watch-function)
+  "Cause WATCH-FUNCTION to be called when SYMBOL is set if possible.
+
+See docs of `add-variable-watcher'."
+  (when (fboundp 'add-variable-watcher)
+    (add-variable-watcher symbol watch-function)))
+
+(defun doom-modeline-propertize-text (text &optional face)
+  "Propertize TEXT with FACE."
+  (propertize text 'face `(:inherit (doom-modeline
+                                     ,face
+                                     ,(get-text-property 0 'face text)))))
+
+(defun doom-modeline-propertize-icon (icon &optional face)
+  "Propertize the ICON with the specified FACE.
+
+The face should be the first attribute, or the font family may be overridden.
+So convert the face \":family XXX :height XXX :inherit XXX\" to
+\":inherit XXX :family XXX :height XXX\".
+See https://github.com/seagle0128/doom-modeline/issues/301."
+  (if (doom-modeline-icon-displayable-p)
+      (when-let* ((props (get-text-property 0 'face icon)))
+        (when (listp props)
+          (cl-destructuring-bind (&key family height inherit &allow-other-keys) props
+            (propertize icon 'face `(:inherit (doom-modeline ,(or face inherit props))
+                                     :family  ,(or family "")
+                                     :height  ,(or height 1.0))))))
+    (doom-modeline-propertize-text icon face)))
+
+(defun doom-modeline-icon (icon-set icon-name unicode text &rest args)
+  "Display icon of ICON-NAME with ARGS in mode-line.
+
+ICON-SET includes `ipsicon', `octicon', `pomicon', `powerline', `faicon',
+`wicon', `sucicon', `devicon', `codicon', `flicon' and `mdicon', etc.
+UNICODE is the unicode char fallback.  TEXT is the ASCII char fallback.
+ARGS is same as `nerd-icons-octicon' and others."
+  (let ((face `(:inherit (doom-modeline
+                          ,(or (plist-get args :face) 'mode-line)))))
+    (cond
+     ;; Icon
+     ((and (doom-modeline-icon-displayable-p)
+           icon-name
+           (not (string-empty-p icon-name)))
+      (let* ((func (nerd-icons--function-name icon-set))
+             (icon (and (fboundp func) (apply func icon-name args))))
+        (doom-modeline-propertize-icon icon face)))
+     ;; Unicode fallback
+     ((and doom-modeline-unicode-fallback
+           unicode
+           (not (string-empty-p unicode))
+           (char-displayable-p (string-to-char unicode)))
+      (doom-modeline-propertize-text unicode face))
+     ;; ASCII text
+     (text
+      (doom-modeline-propertize-text text face))
+     ;; Fallback
+     (t ""))))
+
+(defun doom-modeline-icon-for-buffer ()
+  "Get the formatted icon for the current buffer."
+  (nerd-icons-icon-for-buffer))
+
+(defun doom-modeline-display-icon (icon)
+  "Display ICON in mode-line."
+  (let ((icon (or icon "")))
+    (if (doom-modeline--active)
+        icon
+      (doom-modeline-propertize-icon icon 'mode-line-inactive))))
+
+(defun doom-modeline-display-text (text)
+  "Display TEXT in mode-line."
+  (let ((text (string-replace "%" "%%" (or text ""))))
+    (if (doom-modeline--active)
+        text
+      (doom-modeline-propertize-text text 'mode-line-inactive))))
+
+(defun doom-modeline-vcs-name ()
+  "Display the vcs name."
+  (and vc-mode (cadr (split-string (string-trim vc-mode) "^[A-Z]+[-:]+"))))
+
+(defun doom-modeline--create-bar-image (face width height)
+  "Create the bar image.
+
+Use FACE for the bar, WIDTH and HEIGHT are the image size in pixels."
+  (when (and (image-type-available-p 'pbm)
+             (numberp width) (> width 0)
+             (numberp height) (> height 0))
+    (propertize
+     " " 'display
+     (let ((color (or (face-background face nil t) "None")))
+       (ignore-errors
+         (create-image
+          (concat (format "P1\n%i %i\n" width height)
+                  (make-string (* width height) ?1)
+                  "\n")
+          'pbm t :scale 1 :foreground color :ascent 'center))))))
+
+(defun doom-modeline--create-hud-image
+    (face1 face2 width height top-margin bottom-margin)
+  "Create the hud image.
+
+Use FACE1 for the bar, FACE2 for the background.
+WIDTH and HEIGHT are the image size in pixels.
+TOP-MARGIN and BOTTOM-MARGIN are the size of the margin above and below the bar,
+respectively."
+  (when (and (display-graphic-p)
+             (image-type-available-p 'pbm)
+             (numberp width) (> width 0)
+             (numberp height) (> height 0))
+    (let ((min-height (min height doom-modeline-hud-min-height)))
+      (unless (> (- height top-margin bottom-margin) min-height)
+        (let ((margin (- height min-height)))
+          (setq top-margin (/ (* margin top-margin) (+ top-margin bottom-margin))
+                bottom-margin (- margin top-margin)))))
+    (propertize
+     " " 'display
+     (let ((color1 (or (face-background face1 nil t) "None"))
+           (color2 (or (face-background face2 nil t) "None")))
+       (create-image
+        (concat
+         (format "P1\n%i %i\n" width height)
+         (make-string (* top-margin width) ?0)
+         (make-string (* (- height top-margin bottom-margin) width) ?1)
+         (make-string (* bottom-margin width) ?0)
+         "\n")
+        'pbm t :foreground color1 :background color2 :ascent 'center)))))
+
+;; Check whether `window-total-width' is smaller than the limit
+(defun doom-modeline-window-size-change (&rest _)
+  "Handles while window size is changed."
+  (setq doom-modeline--limited-width-p
+        (cond
+         ((integerp doom-modeline-window-width-limit)
+          (<= (window-total-width) doom-modeline-window-width-limit))
+         ((floatp doom-modeline-window-width-limit)
+          (<= (/ (window-total-width) (frame-width) 1.0)
+              doom-modeline-window-width-limit)))))
+(add-hook 'after-revert-hook #'doom-modeline-window-size-change)
+(add-hook 'buffer-list-update-hook #'doom-modeline-window-size-change)
+(add-hook 'window-size-change-functions #'doom-modeline-window-size-change)
+
+(defvar-local doom-modeline--project-root nil)
+(defun doom-modeline--project-root ()
+  "Get the path to the project root.
+Return nil if no project was found."
+  (or doom-modeline--project-root
+      (setq doom-modeline--project-root
+            (cond
+             ((and (memq doom-modeline-project-detection '(auto ffip))
+                   (fboundp 'ffip-project-root))
+              (let ((inhibit-message t))
+                (ffip-project-root)))
+             ((and (memq doom-modeline-project-detection '(auto projectile))
+                   (bound-and-true-p projectile-mode))
+              (projectile-project-root))
+             ((and (memq doom-modeline-project-detection '(auto project))
+                   (fboundp 'project-current))
+              (when-let* ((project (project-current)))
+                (expand-file-name
+                 (if (fboundp 'project-root)
+                     (project-root project)
+                   (car (with-no-warnings
+                          (project-roots project)))))))))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-project-detection
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-project-detection val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (setq doom-modeline--project-root nil)
+         (and buffer-file-name (revert-buffer t t)))))))
+
+(defun doom-modeline-project-p ()
+  "Check if the file is in a project."
+  (doom-modeline--project-root))
+
+(defun doom-modeline-project-root ()
+  "Get the path to the root of your project.
+Return `default-directory' if no project was found."
+  (abbreviate-file-name
+   (or (doom-modeline--project-root) default-directory)))
+
+(defun doom-modeline--format-buffer-file-name ()
+  "Get and format the buffer file name."
+  (let ((buffer-file-name (file-local-name
+                           (or (buffer-file-name (buffer-base-buffer)) ""))))
+    (or (and doom-modeline-buffer-file-name-function
+             (funcall doom-modeline-buffer-file-name-function buffer-file-name))
+        buffer-file-name)))
+
+(defun doom-modeline--format-buffer-file-truename (b-f-n)
+  "Get and format buffer file truename via B-F-N."
+  (let ((buffer-file-truename (file-local-name
+                               (or (file-truename b-f-n) ""))))
+    (or (and doom-modeline-buffer-file-truename-function
+             (funcall doom-modeline-buffer-file-truename-function buffer-file-truename))
+        buffer-file-truename)))
+
+(defun doom-modeline-buffer-file-name ()
+  "Propertize file name based on `doom-modeline-buffer-file-name-style'."
+  (let* ((buffer-file-name (doom-modeline--format-buffer-file-name))
+         (buffer-file-truename (doom-modeline--format-buffer-file-truename buffer-file-name))
+         (file-name
+          (pcase doom-modeline-buffer-file-name-style
+            ('auto
+             (if (doom-modeline-project-p)
+                 (doom-modeline--buffer-file-name buffer-file-name buffer-file-truename 'shrink 'shrink 'hide)
+               (propertize (buffer-name) 'face 'doom-modeline-buffer-file)))
+            ('truncate-upto-project
+             (doom-modeline--buffer-file-name buffer-file-name buffer-file-truename 'shrink))
+            ('truncate-from-project
+             (doom-modeline--buffer-file-name buffer-file-name buffer-file-truename nil 'shrink))
+            ('truncate-with-project
+             (doom-modeline--buffer-file-name buffer-file-name buffer-file-truename 'shrink 'shrink 'hide))
+            ('truncate-except-project
+             (doom-modeline--buffer-file-name buffer-file-name buffer-file-truename 'shrink 'shrink))
+            ('truncate-upto-root
+             (doom-modeline--buffer-file-name-truncate buffer-file-name buffer-file-truename))
+            ('truncate-all
+             (doom-modeline--buffer-file-name-truncate buffer-file-name buffer-file-truename t))
+            ('truncate-nil
+             (doom-modeline--buffer-file-name buffer-file-name buffer-file-truename))
+            ('relative-to-project
+             (doom-modeline--buffer-file-name-relative buffer-file-name buffer-file-truename))
+            ('relative-from-project
+             (doom-modeline--buffer-file-name buffer-file-name buffer-file-truename nil nil 'hide))
+            ('file-name
+             (propertize (file-name-nondirectory buffer-file-name)
+                         'face 'doom-modeline-buffer-file))
+            ('file-name-with-project
+             (format "%s|%s"
+                     (propertize (file-name-nondirectory
+                                  (directory-file-name (file-local-name (doom-modeline-project-root))))
+                                 'face 'doom-modeline-project-dir)
+                     (propertize (file-name-nondirectory buffer-file-name)
+                                 'face 'doom-modeline-buffer-file)))
+            ('project
+             (propertize (file-name-nondirectory
+                          (directory-file-name (file-local-name (doom-modeline-project-root))))
+                         'face 'doom-modeline-project-dir))
+            ((or 'buffer-name _)
+             (propertize (buffer-name) 'face 'doom-modeline-buffer-file)))))
+    (propertize file-name
+                'mouse-face 'mode-line-highlight
+                'help-echo (concat buffer-file-truename
+                                   (unless (string= (file-name-nondirectory buffer-file-truename)
+                                                    (buffer-name))
+                                     (concat "\n" (buffer-name)))
+                                   "\nmouse-1: Previous buffer\nmouse-3: Next buffer")
+                'local-map mode-line-buffer-identification-keymap)))
+
+(defun doom-modeline--buffer-file-name-truncate (file-path true-file-path &optional truncate-tail)
+  "Propertize file name that truncates every dir along path.
+
+If TRUNCATE-TAIL is t also truncate the parent directory of the file."
+  (let ((dirs (shrink-path-prompt (file-name-directory true-file-path))))
+    (if (null dirs)
+        (propertize (buffer-name) 'face 'doom-modeline-buffer-file)
+      (let ((dirname (car dirs))
+            (basename (cdr dirs)))
+        (concat (propertize (concat dirname
+                                    (if truncate-tail (substring basename 0 1) basename)
+                                    "/")
+                            'face 'doom-modeline-project-root-dir)
+                (propertize (file-name-nondirectory file-path)
+                            'face 'doom-modeline-buffer-file))))))
+
+(defun doom-modeline--buffer-file-name-relative (_file-path true-file-path &optional include-project)
+  "Propertize file name showing directories relative to project's root only.
+
+If INCLUDE-PROJECT is non-nil, the project path will be included."
+  (let ((root (file-local-name (doom-modeline-project-root))))
+    (if (null root)
+        (propertize (buffer-name) 'face 'doom-modeline-buffer-file)
+      (let ((relative-dirs (file-relative-name (file-name-directory true-file-path)
+                                               (if include-project (concat root "../") root))))
+        (and (equal "./" relative-dirs) (setq relative-dirs ""))
+        (concat (propertize relative-dirs 'face 'doom-modeline-buffer-path)
+                (propertize (file-name-nondirectory true-file-path)
+                            'face 'doom-modeline-buffer-file))))))
+
+(defun doom-modeline--buffer-file-name (file-path
+                                        true-file-path
+                                        &optional
+                                        truncate-project-root-parent
+                                        truncate-project-relative-path
+                                        hide-project-root-parent)
+  "Propertize buffer name given by FILE-PATH or TRUE-FILE-PATH.
+
+If TRUNCATE-PROJECT-ROOT-PARENT is non-nil will be saved by truncating project
+root parent down fish-shell style.
+
+Example:
+  ~/Projects/FOSS/emacs/lisp/comint.el => ~/P/F/emacs/lisp/comint.el
+
+If TRUNCATE-PROJECT-RELATIVE-PATH is non-nil will be saved by truncating project
+relative path down fish-shell style.
+
+Example:
+  ~/Projects/FOSS/emacs/lisp/comint.el => ~/Projects/FOSS/emacs/l/comint.el
+
+If HIDE-PROJECT-ROOT-PARENT is non-nil will hide project root parent.
+
+Example:
+  ~/Projects/FOSS/emacs/lisp/comint.el => emacs/lisp/comint.el"
+  (let ((project-root (file-local-name (doom-modeline-project-root))))
+    (concat
+     ;; Project root parent
+     (unless hide-project-root-parent
+       (when-let* ((root-path-parent
+                    (file-name-directory (directory-file-name project-root))))
+         (propertize
+          (if (and truncate-project-root-parent
+                   (not (string-empty-p root-path-parent))
+                   (not (string= root-path-parent "/")))
+              (shrink-path--dirs-internal root-path-parent t)
+            (abbreviate-file-name root-path-parent))
+          'face 'doom-modeline-project-parent-dir)))
+     ;; Project directory
+     (propertize
+      (concat (file-name-nondirectory (directory-file-name project-root)) "/")
+      'face 'doom-modeline-project-dir)
+     ;; relative path
+     (propertize
+      (when-let* ((relative-path (file-relative-name
+                                  (or (file-name-directory
+                                       (if doom-modeline-buffer-file-true-name
+                                           true-file-path file-path))
+                                      "./")
+                                  project-root)))
+        (if (string= relative-path "./")
+            ""
+          (if truncate-project-relative-path
+              (substring (shrink-path--dirs-internal relative-path t) 1)
+            relative-path)))
+      'face 'doom-modeline-buffer-path)
+     ;; File name
+     (propertize (file-name-nondirectory file-path)
+                 'face 'doom-modeline-buffer-file))))
+
+(provide 'doom-modeline-core)
+
+;;; doom-modeline-core.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-core.elc b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-core.elc
new file mode 100644
index 0000000..5d9ce14
Binary files /dev/null and b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-core.elc differ
diff --git a/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-env.el b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-env.el
new file mode 100644
index 0000000..dd177db
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-env.el
@@ -0,0 +1,293 @@
+;;; doom-modeline-env.el --- A environment parser for doom-modeline -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019-2026 Vincent Zhang, Justin Barclay
+
+;; This file is not part of GNU Emacs.
+
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;; Parse programming environment.
+;;
+
+;;; Code:
+
+(require 'doom-modeline-core)
+(eval-when-compile
+  (require 'subr-x))
+
+
+;; Externals
+(defvar python-shell-interpreter)
+
+
+;; Customization
+
+(defgroup doom-modeline-env nil
+  "The environment parser for `doom-modeline'."
+  :group 'doom-modeline
+  :link '(url-link :tag "Homepage" "https://github.com/seagle0128/doom-modeline"))
+
+(defcustom doom-modeline-env-load-string doom-modeline-ellipsis
+  "What to display as the version while a new one is being loaded."
+  :type 'string
+  :group 'doom-modeline-env)
+
+(defcustom doom-modeline-before-update-env-hook nil
+  "Hooks that run before the modeline version string is updated."
+  :type 'hook
+  :group 'doom-modeline-env)
+
+(defcustom doom-modeline-after-update-env-hook nil
+  "Hooks that run after the modeline version string is updated."
+  :type 'hook
+  :group 'doom-modeline-env)
+
+
+;; Variables
+
+;; Show version string for multi-version managers like rvm, rbenv, pyenv, etc.
+(defvar-local doom-modeline-env--version nil
+  "The version to display with major-mode in mode-line.
+Example: \"2.6.0\"")
+
+(defvar-local doom-modeline-env--command nil
+  "A program that we're looking to extract version information from.
+Example: \"ruby\"")
+
+(defvar-local doom-modeline-env--command-args nil
+  "A list of arguments for the command to extract the version from.
+Example: \\='(\"--version\")")
+
+(defvar-local doom-modeline-env--parser nil
+  "A function that returns version number from a command --version (or similar).
+Example: \\='doom-modeline-env--ruby")
+
+
+;; Functions & Macros
+
+(defun doom-modeline-update-env ()
+  "Update environment info on mode-line."
+  (when (and doom-modeline-env-version
+             doom-modeline-env--command
+             (executable-find doom-modeline-env--command)
+             doom-modeline-env--command-args
+             doom-modeline-env--parser)
+    (let ((default-directory (doom-modeline-project-root))
+          (buffer (current-buffer)))
+      (run-hooks 'doom-modeline-before-update-env-hook)
+      (setq doom-modeline-env--version doom-modeline-env-load-string)
+      (doom-modeline-env--get
+       doom-modeline-env--command
+       doom-modeline-env--command-args
+       (lambda (prog-version)
+         (with-current-buffer buffer
+           (setq doom-modeline-env--version
+                 (funcall doom-modeline-env--parser prog-version))
+           (run-hooks 'doom-modeline-after-update-env-hook)))))))
+
+(add-hook 'find-file-hook #'doom-modeline-update-env)
+(if (boundp 'after-focus-change-function)
+    (add-function
+     :after after-focus-change-function
+     (lambda ()
+       (if (frame-focus-state)
+           (doom-modeline-update-env))))
+  (with-no-warnings
+    (add-hook 'focus-in-hook #'doom-modeline-update-env)))
+
+(defun doom-modeline-env--get (prog args callback)
+  "Start a sub process using PROG and apply the ARGS to the sub process.
+Once it receives information from STDOUT, it closes off the subprocess and
+passes on the information into the CALLBACK.
+Example:
+  (doom-modeline-env--get
+     \"ruby\"
+     \\='(\"--version\")
+     (lambda (line)
+        (message (doom-modeline-parser--ruby line)))"
+  (when-let* ((proc (ignore-errors
+                      (apply 'start-process
+                             ;; Flatten process-args into a single list so we can handle
+                             ;; variadic length args
+                             (append
+                              (list "doom-modeline-env" nil prog)
+                              args))))
+              (parser callback))
+    (set-process-filter proc
+                        (lambda (_proc line)
+                          (ignore-errors
+                            (funcall parser line))))))
+
+(cl-defmacro doom-modeline-def-env (name &key hooks command parser)
+  "Define a handler for updating & displaying a version string for a language.
+
+NAME is an unquoted symbol representing the handler's unique ID.
+HOOKS is a list of hook symbols where this handler should be triggered.
+COMMAND should be a function that returns a shell command and its arguments (as
+  a list). It is run on HOOKS. It takes no arguments.
+PARSER should be a function for parsing COMMAND's output line-by-line, to
+  extract the version string."
+  (declare (indent defun))
+  (unless (and hooks command parser)
+    (error "'%s' env is missing either :hooks, :command or :parser" name))
+  (let ((parse-fn  (intern (format "doom-modeline-env--%s-parse" name)))
+        (action-fn (intern (format "doom-modeline-env--%s-args"  name)))
+        (setup-fn  (intern (format "doom-modeline-env-setup-%s"  name)))
+        (update-fn (intern (format "doom-modeline-env-update-%s" name)))
+        (enable-var  (intern (format "doom-modeline-env-enable-%s" name)))
+        (command-var (intern (format "doom-modeline-env-%s-command" name)))
+        (parser-var  (intern (format "doom-modeline-env-%s-parser-fn" name)))
+        (exe-var     (intern (format "doom-modeline-env-%s-executable" name))))
+    (macroexp-progn
+     `((defcustom ,enable-var t
+         ,(format "Whether to display the version string for %s buffers." name)
+         :type 'boolean
+         :group 'doom-modeline-env)
+       (defvar ,command-var ',action-fn
+         ,(concat "A function that returns the shell command and arguments (as a list) to\n"
+                  "produce a version string."))
+       (defvar ,parser-var ',parse-fn
+         ,(format "The function to parse each line of `%s'\'s output." command-var))
+       (defcustom ,exe-var nil
+         ,(format (concat "What executable to use for the version indicator in %s buffers.\n\n"
+                          "If nil, the default binary for this language is used.")
+                  name)
+         :type 'string
+         :group 'doom-modeline-env)
+       (defalias ',parse-fn ,parser
+         (format "The line parser for %s buffers.\n\nUsed by `%s'."
+                 ',name ',update-fn))
+       (defalias ',action-fn ,command
+         (format "The command resolver for %s buffers.\n\nUsed by `%s'."
+                 ',name ',update-fn))
+       (defalias ',setup-fn
+         (lambda ()
+           (if enable-local-variables
+               (add-hook 'hack-local-variables-hook #',update-fn nil t)
+             (,update-fn)))
+         (format "Prepares the modeline to later display the %s version string."
+                 ',name))
+       (defalias ',update-fn
+         (lambda ()
+           (when ,enable-var
+             (when-let* ((command-list (funcall ,command-var))
+                         (exe (executable-find (car command-list))))
+               (setq doom-modeline-env--command exe
+                     doom-modeline-env--command-args (cdr command-list)
+                     doom-modeline-env--parser ,parser-var)
+               (doom-modeline-update-env))))
+         (format "Updates the %s version string in the modeline." ',name))
+       (let ((hooks ',(eval hooks)))
+         (dolist (hook (if (listp hooks) hooks (list hooks)))
+           (add-hook hook #',setup-fn)))))))
+
+
+;; Bootstrap
+;; Versions, support Python, Ruby, Perl and Golang, etc.
+
+;;;###autoload (autoload 'doom-modeline-env-setup-python "doom-modeline-env")
+(doom-modeline-def-env python
+  :hooks   '(python-mode-hook python-ts-mode-hook)
+  :command (lambda () (cond ((and (executable-find "pipenv")
+                             (locate-dominating-file default-directory "Pipfile"))
+                        (list "pipenv" "run"
+                              (or doom-modeline-env-python-executable
+                                  python-shell-interpreter
+                                  "python")
+                              "--version"))
+                       ((executable-find "pyenv") (list "pyenv" "version-name"))
+                       ((and (executable-find "direnv")
+                             (locate-dominating-file default-directory ".envrc"))
+                        (list "bash"
+                              "-c"
+                              ;; Direnv unfortunately writes crao on stderr
+                              ;; so we need to pipe that to /dev/null
+                              (format "direnv exec %s %s --version 2>/dev/null"
+                                      (file-truename default-directory)
+                                      (or doom-modeline-env-python-executable
+                                          python-shell-interpreter
+                                          "python"))))
+                       ((list (or doom-modeline-env-python-executable
+                                  python-shell-interpreter
+                                  "python")
+                              "--version"))))
+  :parser  (lambda (line) (let ((version (split-string line)))
+                       (if (length> version 1)
+                           (cadr version)
+                         (car version)))))
+
+;;;###autoload (autoload 'doom-modeline-env-setup-ruby "doom-modeline-env")
+(doom-modeline-def-env ruby
+  :hooks   '(ruby-mode-hook ruby-ts-mode-hook enh-ruby-mode-hook)
+  :command (lambda () (list (or doom-modeline-env-ruby-executable "ruby") "--version"))
+  :parser  (lambda (line)
+             (car (split-string
+                   (cadr
+                    (split-string line))
+                   "p"))))
+
+;;;###autoload (autoload 'doom-modeline-env-setup-perl "doom-modeline-env")
+(doom-modeline-def-env perl
+  :hooks   'perl-mode-hook
+  :command (lambda () (list (or doom-modeline-env-perl-executable "perl") "--version"))
+  :parser  (lambda (line)
+             (cadr
+              (split-string
+               (car
+                (split-string
+                 (cadr
+                  (split-string line "("))
+                 ")"))
+               "v"))))
+
+;;;###autoload (autoload 'doom-modeline-env-setup-go "doom-modeline-env")
+(doom-modeline-def-env go
+  :hooks   '(go-mode-hook go-ts-mode-hook)
+  :command (lambda () (list (or doom-modeline-env-go-executable "go") "version"))
+  :parser  (lambda (line)
+             (cadr
+              (split-string
+               (cadr
+                (cdr
+                 (split-string line)))
+               "go"))))
+
+;;;###autoload (autoload 'doom-modeline-env-setup-elixir "doom-modeline-env")
+(doom-modeline-def-env elixir
+  :hooks   '(elixir-mode-hook elixir-ts-mode-hook)
+  :command (lambda () (list (or doom-modeline-env-elixir-executable "elixir") "--version"))
+  :parser  (lambda (line)
+             (cond
+              ((string-match
+                "Elixir[[:space:]]+\\([^[:space:]]+\\).*Erlang/OTP[[:space:]]+\\([0-9]+\\)"
+                line)
+               (format "%s/OTP%s" (match-string 1 line) (match-string 2 line))))))
+
+;;;###autoload (autoload 'doom-modeline-env-setup-rust "doom-modeline-env")
+(doom-modeline-def-env rust
+  :hooks   '(rust-mode-hook rust-ts-mode-hook)
+  :command (lambda () (list (or doom-modeline-env-rust-executable "rustc") "--version"))
+  :parser  (lambda (line)
+             (car
+              (split-string
+               (cadr
+                (split-string line))
+               "-"))))
+
+(provide 'doom-modeline-env)
+
+;;; doom-modeline-env.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-env.elc b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-env.elc
new file mode 100644
index 0000000..0961380
Binary files /dev/null and b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-env.elc differ
diff --git a/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-pkg.el b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-pkg.el
new file mode 100644
index 0000000..11cb32b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-pkg.el
@@ -0,0 +1,13 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "doom-modeline" "20260805.643"
+  "A minimal and modern mode-line."
+  '((emacs       "25.1")
+    (compat      "30.1.0.0")
+    (nerd-icons  "0.1.0")
+    (shrink-path "0.3.1"))
+  :url "https://github.com/seagle0128/doom-modeline"
+  :commit "2d6828870bce42c3de6feebe1e70d9edc46515a6"
+  :revdesc "2d6828870bce"
+  :keywords '("faces" "mode-line")
+  :authors '(("Vincent Zhang" . "seagle0128@gmail.com"))
+  :maintainers '(("Vincent Zhang" . "seagle0128@gmail.com")))
diff --git a/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-segments.el b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-segments.el
new file mode 100644
index 0000000..45b6fa9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-segments.el
@@ -0,0 +1,3561 @@
+;;; doom-modeline-segments.el --- The segments for doom-modeline -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2018-2026 Vincent Zhang
+
+;; This file is not part of GNU Emacs.
+
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+
+;;; Commentary:
+;;
+;; The segments for doom-modeline.
+;; Use `doom-modeline-def-segment' to create a new segment.
+;;
+
+;;; Code:
+
+(require 'doom-modeline-core)
+(require 'doom-modeline-env)
+(eval-when-compile
+  (require 'cl-lib)
+  (require 'seq)
+  (require 'subr-x))
+
+
+;;
+;; Externals
+;;
+
+(defvar Info-current-file)
+(defvar Info-current-node)
+(defvar Info-mode-line-node-keymap)
+(defvar anzu--cached-count)
+(defvar anzu--current-position)
+(defvar anzu--overflow-p)
+(defvar anzu--state)
+(defvar anzu--total-matched)
+(defvar anzu-cons-mode-line-p)
+(defvar aw-keys)
+(defvar battery-echo-area-format)
+(defvar battery-load-critical)
+(defvar battery-mode-line-format)
+(defvar battery-mode-line-limit)
+(defvar battery-mode-line-string)
+(defvar battery-update-functions)
+(defvar battery-status-function)
+(defvar boon-command-state)
+(defvar boon-insert-state)
+(defvar boon-off-state)
+(defvar boon-special-state)
+(defvar display-time-string)
+(defvar edebug-execution-mode)
+(defvar eglot--managed-mode)
+(defvar eglot-menu)
+(defvar eglot-menu-string)
+(defvar eglot-server-menu)
+(defvar erc-modified-channels-alist)
+(defvar evil-ex-active-highlights-alist)
+(defvar evil-ex-argument)
+(defvar evil-ex-range)
+(defvar evil-mc-frozen)
+(defvar evil-state)
+(defvar evil-visual-beginning)
+(defvar evil-visual-end)
+(defvar evil-visual-selection)
+(defvar flycheck-current-errors)
+(defvar flycheck-last-status-change)
+(defvar flycheck-mode-menu-map)
+(defvar flymake--state)
+(defvar flymake-menu)
+(defvar gnus-newsrc-alist)
+(defvar gnus-newsrc-hashtb)
+(defvar grip--process)
+(defvar helm--mode-line-display-prefarg)
+(defvar iedit-occurrences-overlays)
+(defvar kele-menu-map)
+(defvar meow--indicator)
+(defvar meow--current-state)
+(defvar minions-mode-line-lighter)
+(defvar minions-mode-line-minor-modes-map)
+(defvar mlscroll-right-align)
+(defvar mu4e--modeline-item)
+(defvar mu4e-alert-mode-line)
+(defvar mu4e-alert-modeline-formatter)
+(defvar mu4e-modeline-mode)
+(defvar objed--obj-state)
+(defvar objed--object)
+(defvar objed-modeline-setup-func)
+(defvar persp-nil-name)
+(defvar phi-replace--mode-line-format)
+(defvar phi-search--overlays)
+(defvar phi-search--selection)
+(defvar phi-search-mode-line-format)
+(defvar projectile-mode-map)
+(defvar reader-current-doc-pagenumber)
+(defvar reader-current-doc-pagecount)
+(defvar rcirc-activity)
+(defvar rcirc-activity-types)
+(defvar symbol-overlay-keywords-alist)
+(defvar symbol-overlay-temp-symbol)
+(defvar text-scale-mode-amount)
+(defvar tracking-buffers)
+(defvar tracking-faces-priorities)
+(defvar visual-replace--calling-buffer)
+(defvar visual-replace--match-ovs)
+(defvar winum-auto-setup-mode-line)
+(defvar xah-fly-insert-state-p)
+
+(declare-function anzu--reset-status "ext:anzu")
+(declare-function anzu--where-is-here "ext:anzu")
+(declare-function async-inject-variables "ext:async")
+(declare-function async-start "ext:async")
+(declare-function avy-traverse "ext:avy")
+(declare-function avy-tree "ext:avy")
+(declare-function aw-update "ext:ace-window")
+(declare-function aw-window-list "ext:ace-window")
+(declare-function battery-format "battery")
+(declare-function battery-update "battery")
+(declare-function boon-modeline-string "ext:boon")
+(declare-function boon-state-string "ext:boon")
+(declare-function cider--connection-info "ext:cider")
+(declare-function cider-connected-p "ext:cider")
+(declare-function cider-current-repl "ext:cider")
+(declare-function cider-jack-in "ext:cider")
+(declare-function cider-quit "ext:cider")
+(declare-function citre-mode "ext:citre-basic-tools")
+(declare-function compilation-goto-in-progress-buffer "compile")
+(declare-function dap--cur-session "ext:dap-mode")
+(declare-function dap--debug-session-name "ext:dap-mode")
+(declare-function dap--debug-session-state "ext:dap-mode")
+(declare-function dap--session-running "ext:dap-mode")
+(declare-function dap-debug-recent "ext:dap-mode")
+(declare-function dap-disconnect "ext:dap-mode")
+(declare-function dap-hydra "ext:dap-hydra")
+(declare-function edebug-help "edebug")
+(declare-function edebug-next-mode "edebug")
+(declare-function edebug-stop "edebug")
+(declare-function eglot--major-modes "eglot")
+(declare-function eglot--server-info "eglot" t t)
+(declare-function eglot-current-server "eglot")
+(declare-function eglot-managed-p "eglot")
+(declare-function eglot-project-nickname "eglot" t t)
+(declare-function erc-switch-to-buffer "erc")
+(declare-function erc-track-switch-buffer "erc-track")
+(declare-function evil-delimited-arguments "ext:evil-common")
+(declare-function evil-emacs-state-p "ext:evil-states" t t)
+(declare-function evil-force-normal-state "ext:evil-commands" t t)
+(declare-function evil-insert-state-p "ext:evil-states" t t)
+(declare-function evil-motion-state-p "ext:evil-states" t t)
+(declare-function evil-normal-state-p "ext:evil-states" t t)
+(declare-function evil-operator-state-p "ext:evil-states" t t)
+(declare-function evil-replace-state-p "ext:evil-states" t t)
+(declare-function evil-state-property "ext:evil-common")
+(declare-function evil-visual-state-p "ext:evil-states" t t)
+(declare-function eyebrowse--get "ext:eyebrowse")
+(declare-function eyebrowse-switch-to-window-config "ext:eyebrowse")
+(declare-function face-remap-remove-relative "face-remap")
+(declare-function fancy-narrow-active-p "ext:fancy-narrow")
+(declare-function flycheck-buffer "ext:flycheck")
+(declare-function flycheck-count-errors "ext:flycheck")
+(declare-function flycheck-error-level-compilation-level "ext:flycheck")
+(declare-function flycheck-list-errors "ext:flycheck")
+(declare-function flycheck-next-error "ext:flycheck")
+(declare-function flycheck-previous-error "ext:flycheck")
+(declare-function flymake--diag-type "flymake" t t)
+(declare-function flymake--handle-report "flymake")
+(declare-function flymake--lookup-type-property "flymake")
+(declare-function flymake--state-diags "flymake" t t)
+(declare-function flymake-disabled-backends "flymake")
+(declare-function flymake-goto-next-error "flymake")
+(declare-function flymake-goto-prev-error "flymake")
+(declare-function flymake-reporting-backends "flymake")
+(declare-function flymake-running-backends "flymake")
+(declare-function flymake-show-buffer-diagnostics "flymake")
+(declare-function flymake-show-buffer-diagnostics "flymake")
+(declare-function flymake-start "flymake")
+(declare-function follow-all-followers "follow")
+(declare-function gnus-demon-add-handler "gnus-demon")
+(declare-function grip--preview-url "ext:grip-mode")
+(declare-function grip-browse-preview "ext:grip-mode")
+(declare-function grip-restart-preview "ext:grip-mode")
+(declare-function grip-stop-preview "ext:grip-mode")
+(declare-function helm-candidate-number-at-point "ext:helm-core")
+(declare-function helm-get-candidate-number "ext:helm-core")
+(declare-function iedit-find-current-occurrence-overlay "ext:iedit-lib")
+(declare-function iedit-prev-occurrence "ext:iedit-lib")
+(declare-function image-compute-scaling-factor "image")
+(declare-function image-get-display-property "image-mode")
+(declare-function jsonrpc--request-continuations "jsonrpc" t t)
+(declare-function jsonrpc-last-error "jsonrpc" t t)
+(declare-function jsonrpc-name "jsonrpc" t t)
+(declare-function kele-current-context-name "ext:kele")
+(declare-function kele-current-namespace "ext:kele")
+(declare-function lsp--workspace-print "ext:lsp-mode")
+(declare-function lsp-describe-session "ext:lsp-mode")
+(declare-function lsp-workspace-folders-open "ext:lsp-mode")
+(declare-function lsp-workspace-restart "ext:lsp-mode")
+(declare-function lsp-workspace-shutdown "ext:lsp-mode")
+(declare-function lsp-workspaces "ext:lsp-mode")
+(declare-function lv-message "ext:lv")
+(declare-function mc/num-cursors "ext:multiple-cursors-core")
+(declare-function minions--prominent-modes "ext:minions")
+(declare-function mlscroll-mode-line "ext:mlscroll")
+(declare-function mu4e--modeline-string "ext:mu4e-modeline")
+(declare-function mu4e-alert-default-mode-line-formatter "ext:mu4e-alert")
+(declare-function mu4e-alert-enable-mode-line-display "ext:mu4e-alert")
+(declare-function mu4e-alert-view-unread-mails "ext:mu4e")
+(declare-function mu4e-bookmark-favorite "ext:mu4e-bookmarks")
+(declare-function mu4e-search "ext:mu4e")
+(declare-function nyan-create "ext:nyan-mode")
+(declare-function org-edit-src-save "org-src")
+(declare-function parrot-create "ext:parrot")
+(declare-function pdf-cache-number-of-pages "ext:pdf-cache" t t)
+(declare-function persp-add-buffer "ext:persp-mode")
+(declare-function persp-contain-buffer-p "ext:persp-mode")
+(declare-function persp-switch "ext:persp-mode")
+(declare-function phi-search--initialize "ext:phi-search")
+(declare-function poke-line-create "ext:poke-line")
+(declare-function popup-create "ext:popup")
+(declare-function popup-delete "ext:popup")
+(declare-function project-name "project")
+(declare-function projectile-project-name "ext:projectile")
+(declare-function rcirc-next-active-buffer "rcirc")
+(declare-function rcirc-short-buffer-name "rcirc")
+(declare-function rcirc-switch-to-server-buffer "rcirc")
+(declare-function rcirc-window-configuration-change "rcirc")
+(declare-function rime--should-enable-p "ext:rime")
+(declare-function rime--should-inline-ascii-p "ext:rime")
+(declare-function sml-modeline-create "ext:sml-modeline")
+(declare-function svg-circle "svg")
+(declare-function svg-create "svg")
+(declare-function svg-image "svg")
+(declare-function svg-line "svg")
+(declare-function symbol-overlay-assoc "ext:symbol-overlay")
+(declare-function symbol-overlay-get-list "ext:symbol-overlay")
+(declare-function symbol-overlay-get-symbol "ext:symbol-overlay")
+(declare-function symbol-overlay-rename "ext:symbol-overlay")
+(declare-function tab-bar--current-tab "tab-bar")
+(declare-function tab-bar--current-tab-index "tab-bar")
+(declare-function tracking-next-buffer "ext:tracking")
+(declare-function tracking-previous-buffer "ext:tracking")
+(declare-function tracking-shorten "ext:tracking")
+(declare-function warning-numeric-level "warnings")
+(declare-function window-numbering-clear-mode-line "ext:window-numbering")
+(declare-function window-numbering-get-number-string "ext:window-numbering")
+(declare-function window-numbering-install-mode-line "ext:window-numbering")
+(declare-function winum--clear-mode-line "ext:winum")
+(declare-function winum--install-mode-line "ext:winum")
+(declare-function winum-get-number-string "ext:winum")
+
+
+
+;;
+;; Buffer information
+;;
+
+(defvar-local doom-modeline--buffer-file-icon nil)
+(defun doom-modeline-update-buffer-file-icon (&rest _)
+  "Update file icon in mode-line."
+  (setq doom-modeline--buffer-file-icon
+        (when (and doom-modeline-major-mode-icon
+                   (doom-modeline-icon-displayable-p))
+          (let ((icon (doom-modeline-icon-for-buffer)))
+            (propertize (if (or (null icon) (symbolp icon))
+                            (doom-modeline-icon 'faicon "nf-fa-file_o" nil nil
+                                                :face 'nerd-icons-dsilver)
+                          (doom-modeline-propertize-icon icon))
+                        'help-echo (format "Major-mode: %s" (format-mode-line mode-name)))))))
+(add-hook 'find-file-hook #'doom-modeline-update-buffer-file-icon)
+(add-hook 'after-change-major-mode-hook #'doom-modeline-update-buffer-file-icon)
+(add-hook 'clone-indirect-buffer-hook #'doom-modeline-update-buffer-file-icon)
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-icon
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-icon val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-buffer-file-icon))))))
+
+(defun doom-modeline-buffer-file-state-icon (icon unicode text face)
+  "Displays an ICON of buffer state with FACE.
+UNICODE and TEXT are the alternatives if it is not applicable.
+Uses `nerd-icons-mdicon' to fetch the icon."
+  (doom-modeline-icon 'mdicon icon unicode text :face face))
+
+(defvar-local doom-modeline--buffer-file-state-icon nil)
+(defun doom-modeline-update-buffer-file-state-icon (&rest _)
+  "Update the buffer or file state in mode-line."
+  (setq doom-modeline--buffer-file-state-icon
+        (when doom-modeline-buffer-state-icon
+          (ignore-errors
+            (concat
+             (cond (buffer-read-only
+                    (doom-modeline-buffer-file-state-icon
+                     "nf-md-lock" "🔒" "%1*"
+                     'doom-modeline-warning))
+                   ((and doom-modeline-buffer-modification-icon
+                         buffer-file-name
+                         (buffer-modified-p))
+                    (doom-modeline-buffer-file-state-icon
+                     "nf-md-content_save_edit" "💾" "%1*"
+                     'doom-modeline-warning))
+                   ((and buffer-file-name
+                         ;; Avoid freezing while connection is lost
+                         (not (file-remote-p buffer-file-name))
+                         (not (file-exists-p buffer-file-name)))
+                    (doom-modeline-buffer-file-state-icon
+                     "nf-md-cancel" "🚫" "!"
+                     'doom-modeline-urgent))
+                   ((not (or (and buffer-file-name
+                                  (file-remote-p buffer-file-name))
+                             (verify-visited-file-modtime (current-buffer))))
+                    (doom-modeline-buffer-file-state-icon
+                     "nf-md-reload_alert" "⟳" "%1*"
+                     'doom-modeline-warning))
+                   (t ""))
+             (when (or (buffer-narrowed-p)
+                       (and (bound-and-true-p fancy-narrow-mode)
+                            (fancy-narrow-active-p))
+                       (bound-and-true-p dired-narrow-mode))
+               (doom-modeline-buffer-file-state-icon
+                "nf-md-unfold_less_horizontal" "↕" "><"
+                'doom-modeline-warning)))))))
+
+(defvar-local doom-modeline--buffer-file-name nil)
+(defun doom-modeline-update-buffer-file-name (&rest _)
+  "Update buffer file name in mode-line."
+  (setq doom-modeline--buffer-file-name
+        (ignore-errors
+          (save-match-data
+            (if buffer-file-name
+                (doom-modeline-buffer-file-name)
+              (propertize (buffer-name)
+                          'face 'doom-modeline-buffer-file
+                          'mouse-face 'doom-modeline-highlight
+                          'help-echo "Buffer name
+mouse-1: Previous buffer\nmouse-3: Next buffer"
+                          'local-map mode-line-buffer-identification-keymap))))))
+(add-hook 'find-file-hook #'doom-modeline-update-buffer-file-name)
+(add-hook 'after-save-hook #'doom-modeline-update-buffer-file-name)
+(add-hook 'clone-indirect-buffer-hook #'doom-modeline-update-buffer-file-name)
+(add-hook 'evil-insert-state-exit-hook #'doom-modeline-update-buffer-file-name)
+(add-hook 'Info-selection-hook #'doom-modeline-update-buffer-file-name)
+(advice-add #'rename-buffer :after #'doom-modeline-update-buffer-file-name)
+(advice-add #'set-visited-file-name :after #'doom-modeline-update-buffer-file-name)
+(advice-add #'pop-to-buffer :after #'doom-modeline-update-buffer-file-name)
+(advice-add #'popup-create :after #'doom-modeline-update-buffer-file-name)
+(advice-add #'popup-delete :after #'doom-modeline-update-buffer-file-name)
+;; (advice-add #'primitive-undo :after #'doom-modeline-update-buffer-file-name)
+;; (advice-add #'set-buffer-modified-p :after #'doom-modeline-update-buffer-file-name)
+
+(defvar doom-modeline-tab-bar-string '(""))
+(defun doom-modeline-tab-bar-format-global ()
+  "Alternative to `tab-bar-format-global'."
+  (mapcar (lambda (string)
+            `(global menu-item ,(format-mode-line string) ignore))
+          doom-modeline-tab-bar-string))
+
+(if (boundp 'after-focus-change-function)
+    (add-function :after after-focus-change-function
+      #'doom-modeline-update-buffer-file-name)
+  (with-no-warnings
+    (add-hook 'focus-in-hook #'doom-modeline-update-buffer-file-name)))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-buffer-file-name-style
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-buffer-file-name-style val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (when buffer-file-name
+           (doom-modeline-update-buffer-file-name)))))))
+
+(defsubst doom-modeline--buffer-mode-icon ()
+  "The icon of the current major mode."
+  (when (and doom-modeline-icon doom-modeline-major-mode-icon)
+    (when-let* ((icon (or doom-modeline--buffer-file-icon
+                          (doom-modeline-update-buffer-file-icon))))
+      (unless (string-empty-p icon)
+        (concat
+         (if doom-modeline-major-mode-color-icon
+             (doom-modeline-display-icon icon)
+           (doom-modeline-propertize-icon icon (doom-modeline-face)))
+         (doom-modeline-vspc))))))
+
+(defsubst doom-modeline--buffer-state-icon ()
+  "The icon of the current buffer state."
+  (when doom-modeline-buffer-state-icon
+    (when-let* ((icon (doom-modeline-update-buffer-file-state-icon)))
+      (unless (string-empty-p icon)
+        (concat
+         (doom-modeline-display-icon icon)
+         (doom-modeline-vspc))))))
+
+(defsubst doom-modeline--buffer-simple-name ()
+  "The buffer simple name."
+  (propertize (buffer-name)
+              'face (doom-modeline-face
+                     (if (and doom-modeline-highlight-modified-buffer-name
+                              (buffer-modified-p))
+                         'doom-modeline-buffer-modified
+                       'doom-modeline-buffer-file))
+              'mouse-face 'doom-modeline-highlight
+              'help-echo "Buffer name
+mouse-1: Previous buffer\nmouse-3: Next buffer"
+              'local-map mode-line-buffer-identification-keymap))
+
+(defsubst doom-modeline--buffer-name ()
+  "The current buffer name."
+  (when doom-modeline-buffer-name
+    (if (and (not (eq doom-modeline-buffer-file-name-style 'file-name))
+             doom-modeline--limited-width-p)
+        ;; Only display the buffer name if the window is small, and doesn't
+        ;; need to respect file-name style.
+        (doom-modeline--buffer-simple-name)
+      (when-let* ((name (or doom-modeline--buffer-file-name
+                            (doom-modeline-update-buffer-file-name))))
+        ;; Check if the buffer is modified
+        (if (and doom-modeline-highlight-modified-buffer-name
+                 (buffer-modified-p))
+            (propertize name 'face (doom-modeline-face 'doom-modeline-buffer-modified))
+          (doom-modeline-display-text name))))))
+
+(doom-modeline-def-segment buffer-info
+  "Combined information about the current buffer.
+
+Including the current working directory, the file name, and its state (modified,
+read-only or non-existent)."
+  (concat
+   (doom-modeline-spc)
+   (doom-modeline--buffer-mode-icon)
+   (doom-modeline--buffer-state-icon)
+   (doom-modeline--buffer-name)))
+
+(doom-modeline-def-segment buffer-info-simple
+  "Display only the current buffer's name, but with fontification."
+  (concat
+   (doom-modeline-spc)
+   (doom-modeline--buffer-mode-icon)
+   (doom-modeline--buffer-state-icon)
+   (doom-modeline--buffer-simple-name)))
+
+(doom-modeline-def-segment calc
+  "Display calculator icons and info."
+  (concat
+   (doom-modeline-spc)
+   (when-let* ((icon (doom-modeline-icon 'faicon "nf-fa-calculator" "🖩" "")))
+     (concat
+      (doom-modeline-display-icon icon)
+      (doom-modeline-vspc)))
+   (doom-modeline--buffer-simple-name)))
+
+(doom-modeline-def-segment buffer-default-directory
+  "Displays `default-directory' with the icon and state.
+
+This is for special buffers like the scratch buffer where knowing the current
+project directory is important."
+  (let ((face (doom-modeline-face
+               (if (and buffer-file-name (buffer-modified-p))
+                   'doom-modeline-buffer-modified
+                 'doom-modeline-buffer-path))))
+    (concat
+     (doom-modeline-spc)
+     (and doom-modeline-major-mode-icon
+          (concat
+           (doom-modeline-icon
+            'octicon "nf-oct-file_directory_fill" "🖿" "" :face face)
+           (doom-modeline-vspc)))
+     (doom-modeline--buffer-state-icon)
+     (propertize (abbreviate-file-name default-directory) 'face face))))
+
+(doom-modeline-def-segment buffer-default-directory-simple
+  "Displays `default-directory'.
+
+This is for special buffers like the scratch buffer where knowing the current
+project directory is important."
+  (let ((face (doom-modeline-face 'doom-modeline-buffer-path)))
+    (concat
+     (doom-modeline-spc)
+     (and doom-modeline-major-mode-icon
+          (concat
+           (doom-modeline-icon
+            'octicon "nf-oct-file_directory_fill" "🖿" "" :face face)
+           (doom-modeline-vspc)))
+     (propertize (abbreviate-file-name default-directory) 'face face))))
+
+
+;;
+;; Encoding
+;;
+
+(doom-modeline-def-segment buffer-encoding
+  "Displays the eol and the encoding style of the buffer."
+  (when doom-modeline-buffer-encoding
+    (let* ((sep (doom-modeline-spc))
+           (face (doom-modeline-face))
+           (mouse-face 'doom-modeline-highlight)
+           ;; eol type
+           (eol (coding-system-eol-type buffer-file-coding-system))
+           (eol-part (when (or (eq doom-modeline-buffer-encoding t)
+                               (and (eq doom-modeline-buffer-encoding 'nondefault)
+                                    (not (equal eol doom-modeline-default-eol-type))))
+                       (propertize
+                        (pcase eol
+                          (0 "LF")
+                          (1 "CRLF")
+                          (2 "CR")
+                          (_ ""))
+                        'face face
+                        'mouse-face mouse-face
+                        'help-echo (format "End-of-line style: %s\nmouse-1: Cycle"
+                                           (pcase eol
+                                             (0 "Unix-style LF")
+                                             (1 "DOS-style CRLF")
+                                             (2 "Mac-style CR")
+                                             (_ "Undecided")))
+                        'local-map (let ((map (make-sparse-keymap)))
+                                     (define-key map [mode-line mouse-1] #'mode-line-change-eol)
+                                     map))))
+           ;; coding system
+           (sys (coding-system-plist buffer-file-coding-system))
+           (cat (plist-get sys :category))
+           (sym (if (memq cat
+                          '(coding-category-undecided coding-category-utf-8))
+                    'utf-8
+                  (plist-get sys :name)))
+           (sys-part (when (or (eq doom-modeline-buffer-encoding t)
+                               (and (eq doom-modeline-buffer-encoding 'nondefault)
+                                    (not (eq cat 'coding-category-undecided))
+                                    (not (eq sym doom-modeline-default-coding-system))))
+                       (propertize
+                        (upcase (symbol-name sym))
+                        'face face
+                        'mouse-face mouse-face
+                        'help-echo 'mode-line-mule-info-help-echo
+                        'local-map mode-line-coding-system-map))))
+      (when (or eol-part sys-part)
+        (concat sep
+                eol-part
+                (when (and eol-part sys-part) sep)
+                sys-part
+                sep)))))
+
+
+;;
+;; Indentation
+;;
+
+(doom-modeline-def-segment indent-info
+  "Displays the indentation information."
+  (when doom-modeline-indent-info
+    (let ((do-propertize
+           (lambda (mode size)
+             (propertize
+              (format " %s %d " mode size)
+              'face (doom-modeline-face)))))
+      (if indent-tabs-mode
+          (funcall do-propertize "TAB" tab-width)
+        (let ((lookup-var
+               (seq-find (lambda (var)
+                           (and var (boundp var) (symbol-value var)))
+                         (cdr (assoc major-mode doom-modeline-indent-alist)) nil)))
+          (funcall do-propertize "SPC"
+                   (if lookup-var
+                       (symbol-value lookup-var)
+                     tab-width)))))))
+
+;;
+;; Remote host
+;;
+
+(doom-modeline-def-segment remote-host
+  "Hostname for remote buffers."
+  (when (and doom-modeline-remote-host default-directory)
+    (when-let* ((host (file-remote-p default-directory 'host)))
+      (propertize
+       (concat "@" host)
+       'face (doom-modeline-face 'doom-modeline-host)))))
+
+
+;;
+;; Major mode
+;;
+
+(doom-modeline-def-segment major-mode
+  "The major mode, including environment and text-scale info."
+  (let ((sep (doom-modeline-spc))
+        (face (doom-modeline-face 'doom-modeline-buffer-major-mode)))
+    (concat
+     sep
+     (propertize (concat
+                  (format-mode-line
+                   (or (and (boundp 'delighted-modes)
+                            (cadr (assq major-mode delighted-modes)))
+                       mode-name))
+                  (when (and doom-modeline-env-version doom-modeline-env--version)
+                    (format " %s" doom-modeline-env--version)))
+                 'help-echo "Major mode\n\
+mouse-1: Display major mode menu\n\
+mouse-2: Show help for major mode\n\
+mouse-3: Toggle minor modes"
+                 'face face
+                 'mouse-face 'doom-modeline-highlight
+                 'local-map mode-line-major-mode-keymap)
+     (and (boundp 'text-scale-mode-amount)
+          (/= text-scale-mode-amount 0)
+          (propertize
+           (format
+            (if (> text-scale-mode-amount 0) " (%+d)" " (%-d)")
+            text-scale-mode-amount)
+           'face face))
+     sep)))
+
+
+;;
+;; Process
+;;
+
+(doom-modeline-def-segment process
+  "The process info."
+  (doom-modeline-display-text
+   (format-mode-line mode-line-process)))
+
+
+;;
+;; Minor modes
+;;
+
+(doom-modeline-def-segment minor-modes
+  (when (and doom-modeline-minor-modes
+             (not doom-modeline--limited-width-p))
+    (let ((sep (doom-modeline-spc))
+          (face (doom-modeline-face 'doom-modeline-buffer-minor-mode))
+          (mouse-face 'doom-modeline-highlight)
+          (help-echo "Minor mode
+  mouse-1: Display minor mode menu
+  mouse-2: Show help for minor mode
+  mouse-3: Toggle minor modes"))
+      (if (bound-and-true-p minions-mode)
+          `((:propertize ("" ,(minions--prominent-modes))
+             face ,face
+		     mouse-face ,mouse-face
+		     help-echo ,help-echo
+		     local-map ,mode-line-minor-mode-keymap)
+            ,sep
+            (:propertize ("" ,(doom-modeline-icon 'octicon "nf-oct-gear" "⚙"
+                                                  minions-mode-line-lighter
+                                                  :face face))
+             mouse-face ,mouse-face
+             help-echo "Minions
+mouse-1: Display minor modes menu"
+             local-map ,minions-mode-line-minor-modes-map)
+            ,sep)
+        `((:propertize ("" minor-mode-alist)
+           face ,face
+           mouse-face ,mouse-face
+           help-echo ,help-echo
+           local-map ,mode-line-minor-mode-keymap)
+          ,sep)))))
+
+
+;;
+;; VCS
+;;
+
+(defun doom-modeline-vcs-icon (icon &optional unicode text face)
+  "Displays the vcs ICON with FACE and VOFFSET.
+
+UNICODE and TEXT are fallbacks.
+Uses `nerd-icons-octicon' to fetch the icon."
+  (doom-modeline-icon 'devicon (and doom-modeline-vcs-icon icon)
+                      unicode text :face face))
+
+(defun doom-modeline--in-git-worktree-p ()
+  "Return non-nil if the current buffer's file is in a git worktree."
+  (when-let* ((git-dir (and buffer-file-name
+                            (not (file-remote-p buffer-file-name)) ; avoid tramp hangs
+                            (locate-dominating-file buffer-file-name ".git"))))
+    ;; In a worktree, .git is a file (not a directory)
+    (file-regular-p (expand-file-name ".git" git-dir))))
+
+(defvar-local doom-modeline--vcs nil)
+(defun doom-modeline-update-vcs (&rest _)
+  "Update vcs state in mode-line."
+  (setq doom-modeline--vcs
+        (when (and vc-mode buffer-file-name)
+          (let* ((backend (vc-backend buffer-file-name))
+                 (state (vc-state buffer-file-name backend))
+                 (icon (cond ((memq state '(edited added))
+                              (doom-modeline-vcs-icon "nf-dev-git_compare" "🔃" "*" 'doom-modeline-info))
+                             ((eq state 'needs-merge)
+                              (doom-modeline-vcs-icon "nf-dev-git_merge" "🔀" "?" 'doom-modeline-info))
+                             ((eq state 'needs-update)
+                              (doom-modeline-vcs-icon "nf-dev-git_pull_request" "⬇" "!" 'doom-modeline-warning))
+                             ((memq state '(removed conflict unregistered))
+                              (doom-modeline-icon 'octicon "nf-oct-alert" "⚠" "!" :face 'doom-modeline-urgent))
+                             (t (doom-modeline-vcs-icon "nf-dev-git_branch" "" "@" 'doom-modeline-info))))
+                 (str (or (and vc-display-status
+                               (functionp doom-modeline-vcs-display-function)
+                               (funcall doom-modeline-vcs-display-function))
+                          ""))
+                 (face (or (cdr (assq state doom-modeline-vcs-state-faces-alist))
+                           'doom-modeline-vcs-default))
+                 (text (propertize (if (length> str doom-modeline-vcs-max-length)
+                                       (concat
+                                        (substring str 0 (- doom-modeline-vcs-max-length 3))
+                                        doom-modeline-ellipsis)
+                                     str)
+                                   'face face)))
+            `((icon . ,icon) (text . ,text))))))
+(add-hook 'find-file-hook #'doom-modeline-update-vcs)
+(add-hook 'after-save-hook #'doom-modeline-update-vcs)
+(advice-add #'vc-refresh-state :after #'doom-modeline-update-vcs)
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-icon
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-icon val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-vcs))))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-unicode-fallback
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-unicode-fallback val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-vcs))))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-vcs-icon
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-vcs-icon val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-vcs))))))
+
+(doom-modeline-add-variable-watcher
+ 'vc-display-status
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq vc-display-status val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-vcs))))))
+
+(doom-modeline-def-segment vcs
+  "Displays the current branch, colored based on its state."
+  (when doom-modeline--vcs
+    (let-alist doom-modeline--vcs
+      (let ((sep (doom-modeline-spc))
+            (vsep (doom-modeline-vspc))
+            (worktree-indicator (when (doom-modeline--in-git-worktree-p)
+                                  (propertize "WT" 'face 'doom-modeline-warning))))
+        (concat sep
+                (propertize (concat
+                             (doom-modeline-display-icon .icon)
+                             (when worktree-indicator
+                               (concat vsep worktree-indicator))
+                             (unless doom-modeline--limited-width-p
+                               (concat
+                                vsep
+                                (doom-modeline-display-text .text))))
+                            'help-echo (get-text-property 1 'help-echo vc-mode)
+                            'mouse-face 'doom-modeline-highlight
+                            'local-map (get-text-property 1 'local-map vc-mode))
+                sep)))))
+
+
+;;
+;; Check
+;;
+
+(defun doom-modeline-check-icon (icon unicode text face)
+  "Displays the check ICON with FACE.
+
+UNICODE and TEXT are fallbacks.
+Uses `nerd-icons-mdicon' to fetch the icon."
+  (doom-modeline-icon 'mdicon (and doom-modeline-check-icon icon)
+                      unicode text :face face))
+
+(defun doom-modeline-check-text (text &optional face)
+  "Displays the check TEXT with FACE."
+  (propertize text 'face (or face 'mode-line)))
+
+;; Flycheck
+
+(defun doom-modeline--flycheck-count-errors ()
+  "Count the number of ERRORS, grouped by level.
+
+Return an alist, where each ITEM is a cons cell whose `car' is an
+error level, and whose `cdr' is the number of errors of that
+level."
+  (let ((info 0) (warning 0) (error 0))
+    (mapc
+     (lambda (item)
+       (let ((count (cdr item)))
+         (pcase (flycheck-error-level-compilation-level (car item))
+           (0 (cl-incf info count))
+           (1 (cl-incf warning count))
+           (2 (cl-incf error count)))))
+     (flycheck-count-errors flycheck-current-errors))
+    `((info . ,info) (warning . ,warning) (error . ,error))))
+
+(defvar-local doom-modeline--flycheck nil)
+(defun doom-modeline-update-flycheck (&optional status)
+  "Update flycheck via STATUS."
+  (setq doom-modeline--flycheck
+        (when (bound-and-true-p flycheck-mode)
+          ;; Ensure status is valid
+          ;; `window-state-change-functions' will pass window or frame
+          (unless (and status (symbolp status))
+            (setq status flycheck-last-status-change))
+
+          (let-alist (doom-modeline--flycheck-count-errors)
+            (let* ((vsep (doom-modeline-vspc))
+                   (seg (cond
+                         ((or (eq doom-modeline-check 'simple)
+                              (and doom-modeline--limited-width-p (eq doom-modeline-check 'auto)))
+                          (let ((count (+ .error .warning .info)))
+                            (pcase status
+                              ('finished
+                               (if (> count 0)
+                                   (let ((face (if (> .error 0) 'doom-modeline-urgent 'doom-modeline-warning)))
+                                     (concat
+                                      (doom-modeline-check-icon "nf-md-alert_circle_outline" "⚠" "!" face)
+                                      vsep
+                                      (doom-modeline-check-text (number-to-string count) face)))
+                                 (doom-modeline-check-icon "nf-md-check_circle_outline" "✔" "*" 'doom-modeline-info)))
+                              ('running
+                               (concat
+                                (doom-modeline-check-icon "nf-md-timer_sand" "⏳" "*" 'doom-modeline-debug)
+                                (when (> count 0)
+                                  (concat
+                                   vsep
+                                   (doom-modeline-check-text (number-to-string count) 'doom-modeline-debug)))))
+                              ('no-checker
+                               (doom-modeline-check-icon "nf-md-alert_box_outline" "⚠" "-" 'doom-modeline-debug))
+                              ('errored
+                               (doom-modeline-check-icon "nf-md-alert_box_outline" "⚠" "!" 'doom-modeline-urgent))
+                              ('interrupted
+                               (doom-modeline-check-icon "nf-md-pause_circle_outline" "⦷" "." 'doom-modeline-debug))
+                              ('suspicious
+                               (doom-modeline-check-icon "nf-md-file_question_outline" "❓" "?" 'doom-modeline-debug))
+                              (_ ""))))
+                         ((or (eq doom-modeline-check 'full)
+                              (and (not doom-modeline--limited-width-p) (eq doom-modeline-check 'auto)))
+                          (concat
+                           (doom-modeline-check-icon "nf-md-close_circle_outline" "⮾" "!" 'doom-modeline-urgent)
+                           vsep
+                           (doom-modeline-check-text (number-to-string .error) 'doom-modeline-urgent)
+                           vsep
+                           (doom-modeline-check-icon "nf-md-alert_outline" "⚠" "!" 'doom-modeline-warning)
+                           vsep
+                           (doom-modeline-check-text (number-to-string .warning) 'doom-modeline-warning)
+                           vsep
+                           (doom-modeline-check-icon "nf-md-information_outline" "🛈" "!" 'doom-modeline-info)
+                           vsep
+                           (doom-modeline-check-text (number-to-string .info) 'doom-modeline-info)))
+                         (t ""))))
+              (propertize seg
+                          'help-echo (concat "Flycheck\n"
+                                             (pcase status
+                                               ('finished (format "error: %d, warning: %d, info: %d" .error .warning .info))
+                                               ('running "Checking...")
+                                               ('no-checker "No Checker")
+                                               ('errored "Error")
+                                               ('interrupted "Interrupted")
+                                               ('suspicious "Suspicious"))
+                                             "\nmouse-1: Display minor mode menu\nmouse-2: Show help for minor mode")
+                          'mouse-face 'doom-modeline-highlight
+                          'local-map (let ((map (make-sparse-keymap)))
+                                       (define-key map [mode-line down-mouse-1]
+                                         flycheck-mode-menu-map)
+                                       (define-key map [mode-line mouse-2]
+                                         (lambda ()
+                                           (interactive)
+                                           (describe-function 'flycheck-mode)))
+                                       map)))))))
+(add-hook 'flycheck-status-changed-functions #'doom-modeline-update-flycheck)
+(add-hook 'window-state-change-functions #'doom-modeline-update-flycheck)
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-icon
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-icon val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-flycheck))))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-check-icon
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-check-icon val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-flycheck))))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-unicode-fallback
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-unicode-fallback val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-flycheck))))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-check
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-check val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-flycheck))))))
+
+;; Flymake
+
+;; Compatibility
+;; @see https://github.com/emacs-mirror/emacs/commit/6e100869012da9244679696634cab6b9cac96303.
+(with-eval-after-load 'flymake
+  (unless (boundp 'flymake--state)
+    (defvaralias 'flymake--state 'flymake--backend-state))
+  (unless (fboundp 'flymake--state-diags)
+    (defalias 'flymake--state-diags 'flymake--backend-state-diags)))
+
+(defun doom-modeline--flymake-count-errors ()
+  "Count the number of ERRORS, grouped by level."
+  (let ((warning-level (warning-numeric-level :warning))
+        (note-level (warning-numeric-level :debug))
+        (note 0) (warning 0) (error 0))
+    (maphash (lambda (_b state)
+               (cl-loop
+                with diags = (flymake--state-diags state)
+                for diag in diags do
+                (let ((severity (flymake--lookup-type-property (flymake--diag-type diag) 'severity
+                                                               (warning-numeric-level :error))))
+                  (cond ((> severity warning-level) (cl-incf error))
+                        ((> severity note-level) (cl-incf warning))
+                        (t (cl-incf note))))))
+             flymake--state)
+    `((note . ,note) (warning . ,warning) (error . ,error))))
+
+(defvar-local doom-modeline--flymake nil)
+(defun doom-modeline-update-flymake (&rest _)
+  "Update flymake."
+  (setq doom-modeline--flymake
+        (when (and (bound-and-true-p flymake-mode)
+                   (bound-and-true-p flymake--state))
+          (let* ((known (hash-table-keys flymake--state))
+                 (running (flymake-running-backends))
+                 (disabled (flymake-disabled-backends))
+                 (reported (flymake-reporting-backends))
+                 (all-disabled (and disabled (null running)))
+                 (some-waiting (cl-set-difference running reported)))
+            (let-alist (doom-modeline--flymake-count-errors)
+              (let* ((vsep (doom-modeline-vspc))
+                     (seg (cond
+                           ((or (eq doom-modeline-check 'simple)
+                                (and doom-modeline--limited-width-p (eq doom-modeline-check 'auto)))
+                            (let ((count (+ .error .warning .note)))
+                              (cond
+                               (some-waiting
+                                (concat
+                                 (doom-modeline-check-icon "nf-md-timer_sand" "⏳" "*" 'doom-modeline-debug)
+                                 (when (> count 0)
+                                   (concat
+                                    vsep
+                                    (doom-modeline-check-text (number-to-string count) 'doom-modeline-debug)))))
+                               ((null known)
+                                (doom-modeline-check-icon "nf-md-alert_box_outline" "⚠" "!" 'doom-modeline-urgent))
+                               (all-disabled
+                                (doom-modeline-check-icon "nf-md-alert_box_outline" "⚠" "!" 'doom-modeline-warning))
+                               (t
+                                (if (> count 0)
+                                    (let ((face (cond ((> .error 0) 'doom-modeline-urgent)
+                                                      ((> .warning 0) 'doom-modeline-warning)
+                                                      (t 'doom-modeline-info))))
+                                      (concat
+                                       (doom-modeline-check-icon "nf-md-alert_circle_outline" "⚠" "!" face)
+                                       vsep
+                                       (doom-modeline-check-text (number-to-string count) face)))
+                                  (doom-modeline-check-icon "nf-md-check_circle_outline" "✔" "*" 'doom-modeline-info))))))
+                           ((or (eq doom-modeline-check 'full)
+                                (and (not doom-modeline--limited-width-p) (eq doom-modeline-check 'auto)))
+                            (concat
+                             (doom-modeline-check-icon "nf-md-close_circle_outline" "⮾" "!" 'doom-modeline-urgent)
+                             vsep
+                             (doom-modeline-check-text (number-to-string .error) 'doom-modeline-urgent)
+                             vsep
+                             (doom-modeline-check-icon "nf-md-alert_outline" "⚠" "!" 'doom-modeline-warning)
+                             vsep
+                             (doom-modeline-check-text (number-to-string .warning) 'doom-modeline-warning)
+                             vsep
+                             (doom-modeline-check-icon "nf-md-information_outline" "🛈" "!" 'doom-modeline-info)
+                             vsep
+                             (doom-modeline-check-text (number-to-string .note) 'doom-modeline-info)))
+                           (t ""))))
+                (propertize
+                 seg
+                 'help-echo (concat
+                             "Flymake\n"
+                             (cond (some-waiting "Checking...")
+                                   ((null known) "No Checker")
+                                   (all-disabled "All Checkers Disabled")
+                                   (t (format "%d/%d backends running\nerror: %d, warning: %d, note: %d"
+                                              (length running) (length known) .error .warning .note)))
+                             "\nmouse-1: Display minor mode menu\nmouse-2: Show help for minor mode")
+                 'mouse-face 'doom-modeline-highlight
+                 'local-map (let ((map (make-sparse-keymap)))
+                              (define-key map [mode-line down-mouse-1]
+                                flymake-menu)
+                              (define-key map [mode-line mouse-2]
+                                (lambda ()
+                                  (interactive)
+                                  (describe-function 'flymake-mode)))
+                              map))))))))
+(advice-add #'flymake--handle-report :after #'doom-modeline-update-flymake)
+(add-hook 'window-state-change-functions #'doom-modeline-update-flymake)
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-icon
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-icon val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-flymake))))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-check-icon
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-check-icon val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-flymake))))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-unicode-fallback
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-unicode-fallback val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (when (bound-and-true-p flymake-mode)
+           (doom-modeline-update-flymake)))))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-check
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-check val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (when (bound-and-true-p flymake-mode)
+           (doom-modeline-update-flymake)))))))
+
+(doom-modeline-def-segment check
+  "Displays color-coded error status in the current buffer with pretty icons."
+  (when-let* ((sep (doom-modeline-spc))
+              (vsep (doom-modeline-vspc))
+              (seg (cond
+                    ((bound-and-true-p flymake-mode)
+                     doom-modeline--flymake)
+                    ((bound-and-true-p flycheck-mode)
+                     doom-modeline--flycheck))))
+    (concat
+     sep
+     (let ((str))
+       (dolist (s (split-string seg " "))
+         (setq str
+               (concat str
+                       (if (string-match-p "^[0-9]+$" s)
+                           (concat vsep
+                                   (doom-modeline-display-text s)
+                                   vsep)
+                         (doom-modeline-display-icon s)))))
+       (propertize str
+                   'help-echo (get-text-property 0 'help-echo seg)
+                   'mouse-face 'doom-modeline-highlight
+                   'local-map (get-text-property 0 'local-map seg)))
+     sep)))
+
+
+;;
+;; Word Count
+;;
+
+(doom-modeline-def-segment word-count
+  "The buffer word count.
+Displayed when in a major mode in `doom-modeline-continuous-word-count-modes'.
+Respects `doom-modeline-enable-word-count'."
+  (when (and doom-modeline-enable-word-count
+             (member major-mode doom-modeline-continuous-word-count-modes))
+    (propertize (format " %dW" (count-words (point-min) (point-max)))
+                'face (doom-modeline-face))))
+
+
+;;
+;; Selection
+;;
+
+(defsubst doom-modeline-column (pos)
+  "Get the column of the position `POS'."
+  (save-excursion (goto-char pos)
+                  (current-column)))
+
+(doom-modeline-def-segment selection-info
+  "Information about the current selection.
+
+Such as how many characters and lines are selected, or the NxM dimensions of a
+block selection."
+  (when (and doom-modeline-selection-info
+             (or mark-active (and (bound-and-true-p evil-local-mode)
+                                  (eq evil-state 'visual)))
+             (doom-modeline--active))
+    (cl-destructuring-bind (beg . end)
+      (if (and (bound-and-true-p evil-local-mode) (eq evil-state 'visual))
+          (cons evil-visual-beginning evil-visual-end)
+        (cons (region-beginning) (region-end)))
+      (propertize
+       (let ((lines (count-lines beg (min end (point-max)))))
+         (concat
+          " "
+          (cond ((or (bound-and-true-p rectangle-mark-mode)
+                     (and (bound-and-true-p evil-visual-selection)
+                          (eq 'block evil-visual-selection)))
+                 (let ((cols (abs (- (doom-modeline-column end)
+                                     (doom-modeline-column beg)))))
+                   (format "%dx%dB" lines cols)))
+                ((and (bound-and-true-p evil-visual-selection)
+                      (eq evil-visual-selection 'line))
+                 (format "%dL" lines))
+                ((> lines 1)
+                 (format "%dC %dL" (- end beg) lines))
+                (t
+                 (format "%dC" (- end beg))))
+          (when doom-modeline-enable-word-count
+            (format " %dW" (count-words beg end)))
+          " "))
+       'face 'doom-modeline-emphasis))))
+
+;; Ensure selection info updates on cursor movements
+;; NOTE: No issue with mouse movements
+(add-hook 'post-command-hook
+          (lambda ()
+            (and mark-active (force-mode-line-update))))
+
+
+;;
+;; Matches (macro, anzu, evil-substitute, iedit, symbol-overlay and multi-cursors)
+;;
+
+(defsubst doom-modeline--macro-recording ()
+  "Display current Emacs or evil macro being recorded."
+  (when (and (doom-modeline--active)
+             (or defining-kbd-macro executing-kbd-macro))
+    (let ((sep (propertize " " 'face 'doom-modeline-panel))
+          (vsep (propertize " " 'face
+                            '(:inherit (doom-modeline-panel variable-pitch))))
+          (macro-name (if (bound-and-true-p evil-this-macro)
+                          (format " @%s "
+                                  (char-to-string evil-this-macro))
+                        "Macro")))
+      (concat
+       sep
+       (if doom-modeline-always-show-macro-register
+           (propertize macro-name 'face 'doom-modeline-panel)
+         (concat
+          (doom-modeline-icon 'mdicon "nf-md-record" "●"
+                              macro-name
+                              :face '(:inherit (doom-modeline-urgent doom-modeline-panel))
+                              :v-adjust 0.15)
+          vsep
+          (doom-modeline-icon 'mdicon "nf-md-menu_right" "▶" ">"
+                              :face 'doom-modeline-panel
+                              :v-adjust 0.15)))
+       sep))))
+
+;; `anzu' and `evil-anzu' expose current/total state that can be displayed in the
+;; mode-line.
+(defun doom-modeline-fix-anzu-count (positions here)
+  "Calculate anzu count via POSITIONS and HERE."
+  (cl-loop with i = 0
+           for (start . end) in positions
+           do (cl-incf i)
+           when (and (>= here start) (<= here end))
+           return i
+           finally return 0))
+
+(advice-add #'anzu--where-is-here :override #'doom-modeline-fix-anzu-count)
+
+(setq anzu-cons-mode-line-p nil) ; manage modeline segment ourselves
+;; Ensure anzu state is cleared when searches & iedit are done
+(with-eval-after-load 'anzu
+  (add-hook 'isearch-mode-end-hook #'anzu--reset-status t)
+  (add-hook 'iedit-mode-end-hook #'anzu--reset-status)
+  (advice-add #'evil-force-normal-state :after #'anzu--reset-status)
+  ;; Fix matches segment mirroring across all buffers
+  (mapc #'make-variable-buffer-local
+        '(anzu--total-matched
+          anzu--current-position anzu--state anzu--cached-count
+          anzu--cached-positions anzu--last-command
+          anzu--last-isearch-string anzu--overflow-p)))
+
+(defsubst doom-modeline--anzu ()
+  "Show the match index and total number thereof.
+Requires `anzu', also `evil-anzu' if using `evil-mode' for compatibility with
+`evil-search'."
+  (when (and (bound-and-true-p anzu--state)
+             (not (bound-and-true-p iedit-mode)))
+    (propertize
+     (let ((here anzu--current-position)
+           (total anzu--total-matched))
+       (cond ((eq anzu--state 'replace-query)
+              (format " %d replace " anzu--cached-count))
+             ((eq anzu--state 'replace)
+              (format " %d/%d " here total))
+             (anzu--overflow-p
+              (format " %s+ " total))
+             (t
+              (format " %s/%d " here total))))
+     'face (doom-modeline-face 'doom-modeline-panel))))
+
+(defsubst doom-modeline--visual-replace ()
+  "Show the match index and total number of `visual-replace'.
+It respects `visual-replace-display-total'."
+  (when (and (bound-and-true-p visual-replace--match-ovs)
+             (not (bound-and-true-p iedit-mode))
+             (fboundp 'visual-replace--preview-is-complete)
+             (visual-replace--preview-is-complete))
+    (propertize
+     (let ((total (length visual-replace--match-ovs)))
+       (format " %s "
+               (if-let* ((ov
+                          (seq-find
+                           (lambda (ov) (overlay-get ov 'visual-replace-idx))
+                           (with-current-buffer visual-replace--calling-buffer
+                             (overlays-at (point))))))
+                   (format "%d/%d" (1+ (overlay-get ov 'visual-replace-idx)) total)
+                 (number-to-string total))))
+     'face (doom-modeline-face 'doom-modeline-panel))))
+
+(defsubst doom-modeline--evil-substitute ()
+  "Show number of matches for `evil-ex' in real time.
+The number of matches contains substitutions and highlightings."
+  (when (and (bound-and-true-p evil-local-mode)
+             (or (assq 'evil-ex-substitute evil-ex-active-highlights-alist)
+                 (assq 'evil-ex-global-match evil-ex-active-highlights-alist)
+                 (assq 'evil-ex-buffer-match evil-ex-active-highlights-alist)))
+    (propertize
+     (let ((range (if evil-ex-range
+                      (cons (car evil-ex-range) (cadr evil-ex-range))
+                    (cons (line-beginning-position) (line-end-position))))
+           (pattern (car-safe (evil-delimited-arguments evil-ex-argument 2))))
+       (if pattern
+           (format " %s matches " (how-many pattern (car range) (cdr range)))
+         " - "))
+     'face (doom-modeline-face 'doom-modeline-panel))))
+
+(defun doom-modeline-themes--overlay-sort (a b)
+  "Sort overlay A and B."
+  (< (overlay-start a) (overlay-start b)))
+
+(defsubst doom-modeline--iedit ()
+  "Show the number of iedit regions matches + what match you're on."
+  (when (and (bound-and-true-p iedit-mode)
+             (bound-and-true-p iedit-occurrences-overlays))
+    (propertize
+     (let ((this-oc (or (let ((inhibit-message t))
+                          (iedit-find-current-occurrence-overlay))
+                        (save-excursion (iedit-prev-occurrence)
+                                        (iedit-find-current-occurrence-overlay))))
+           (length (length iedit-occurrences-overlays)))
+       (format " %s/%d "
+               (if this-oc
+                   (- length
+                      (length (memq this-oc (sort (append iedit-occurrences-overlays nil)
+                                                  #'doom-modeline-themes--overlay-sort)))
+                      -1)
+                 "-")
+               length))
+     'face (doom-modeline-face 'doom-modeline-panel))))
+
+(defsubst doom-modeline--symbol-overlay ()
+  "Show the number of matches for symbol overlay."
+  (when (and (doom-modeline--active)
+             (bound-and-true-p symbol-overlay-keywords-alist)
+             (not (bound-and-true-p symbol-overlay-temp-symbol))
+             (not (bound-and-true-p iedit-mode)))
+    (let* ((keyword (symbol-overlay-assoc (symbol-overlay-get-symbol t)))
+           (symbol (car keyword))
+           (before (symbol-overlay-get-list -1 symbol))
+           (after (symbol-overlay-get-list 1 symbol))
+           (count (length before)))
+      (if (symbol-overlay-assoc symbol)
+          (propertize
+           (format (concat  " %d/%d " (and (cadr keyword) "in scope "))
+                   (+ count 1)
+                   (+ count (length after)))
+           'face (doom-modeline-face 'doom-modeline-panel))))))
+
+(defsubst doom-modeline--multiple-cursors ()
+  "Show the number of multiple cursors."
+  (cl-destructuring-bind (count . face)
+    (cond ((bound-and-true-p multiple-cursors-mode)
+           (cons (mc/num-cursors)
+                 (doom-modeline-face 'doom-modeline-panel)))
+          ((bound-and-true-p evil-mc-cursor-list)
+           (cons (length evil-mc-cursor-list)
+                 (doom-modeline-face (if evil-mc-frozen
+                                         'doom-modeline-bar
+                                       'doom-modeline-panel))))
+          ((cons nil nil)))
+    (when count
+      (concat (propertize " " 'face face)
+              (if (doom-modeline-icon-displayable-p)
+                  (doom-modeline-icon 'faicon "nf-fa-i_cursor" "" "" :face face)
+                (propertize "I"
+                            'face `(:inherit ,face :height 1.4 :weight normal)
+                            'display '(raise -0.1)))
+              (propertize " "
+                          'face `(:inherit (variable-pitch ,face)))
+              (propertize (format "%d " count)
+                          'face face)))))
+
+(defsubst doom-modeline--phi-search ()
+  "Show the number of matches for `phi-search' and `phi-replace'."
+  (when (and (doom-modeline--active)
+             (bound-and-true-p phi-search--overlays))
+    (let ((total (length phi-search--overlays))
+          (selection phi-search--selection))
+      (when selection
+        (propertize
+         (format " %d/%d " (1+ selection) total)
+         'face (doom-modeline-face 'doom-modeline-panel))))))
+
+(defun doom-modeline--override-phi-search (orig-fun &rest args)
+  "Override the mode-line of `phi-search' and `phi-replace'.
+Apply ORIG-FUN with ARGS."
+  (if (bound-and-true-p doom-modeline-mode)
+      (apply orig-fun mode-line-format (cdr args))
+    (apply orig-fun args)))
+(advice-add #'phi-search--initialize :around #'doom-modeline--override-phi-search)
+
+(defsubst doom-modeline--buffer-size ()
+  "Show buffer size."
+  (when size-indication-mode
+    (let ((sep (doom-modeline-spc)))
+      (concat sep
+              (propertize "%I"
+                          'face (doom-modeline-face)
+                          'help-echo "Buffer size
+mouse-1: Display Line and Column Mode Menu"
+                          'mouse-face 'doom-modeline-highlight
+                          'local-map mode-line-column-line-number-mode-map)
+              sep))))
+
+(doom-modeline-def-segment matches
+  "Displays matches.
+
+Including:
+1. the currently recording macro, 2. A current/total for the
+current search term (with `anzu'), 3. The number of substitutions being
+conducted with `evil-ex-substitute', and/or 4. The number of active `iedit'
+regions, 5. The current/total for the highlight term (with `symbol-overlay'),
+6. The number of active `multiple-cursors'."
+  (let ((meta (concat (doom-modeline--macro-recording)
+                      (doom-modeline--anzu)
+                      (doom-modeline--visual-replace)
+                      (doom-modeline--phi-search)
+                      (doom-modeline--evil-substitute)
+                      (doom-modeline--iedit)
+                      (doom-modeline--symbol-overlay)
+                      (doom-modeline--multiple-cursors))))
+    (or (and (not (string-empty-p meta)) meta)
+        (doom-modeline--buffer-size))))
+
+(doom-modeline-def-segment buffer-size
+  "Display buffer size."
+  (doom-modeline--buffer-size))
+
+;;
+;; Media
+;;
+
+(doom-modeline-def-segment media-info
+  "Metadata regarding the current file, such as dimensions for images."
+  ;; TODO: Include other information
+  (cond ((eq major-mode 'image-mode)
+         (cl-destructuring-bind (width . height)
+           (when (fboundp 'image-size)
+             (image-size (image-get-display-property) :pixels))
+           (format "  %dx%d  " width height)))))
+
+
+;;
+;; Bars
+;;
+
+(defvar doom-modeline--bar-active nil)
+(defvar doom-modeline--bar-inactive nil)
+
+(defsubst doom-modeline--bar ()
+  "The default bar regulates the height of the mode-line in GUI."
+  (unless (and doom-modeline--bar-active doom-modeline--bar-inactive)
+    (let ((width doom-modeline-bar-width)
+          (height (max doom-modeline-height (doom-modeline--font-height))))
+      (setq doom-modeline--bar-active
+            (doom-modeline--create-bar-image 'doom-modeline-bar width height)
+            doom-modeline--bar-inactive
+            (doom-modeline--create-bar-image
+             'doom-modeline-bar-inactive width height))))
+  (if (doom-modeline--active)
+      doom-modeline--bar-active
+    doom-modeline--bar-inactive))
+
+(defun doom-modeline-refresh-bars ()
+  "Refresh mode-line bars on next redraw."
+  (setq doom-modeline--bar-active nil
+        doom-modeline--bar-inactive nil))
+
+(cl-defstruct doom-modeline--hud-cache active inactive top-margin bottom-margin)
+
+(defsubst doom-modeline--hud ()
+  "Powerline's hud segment reimplemented in the style of Doom's bar segment."
+  (let* ((ws (window-start))
+         (we (window-end))
+         (bs (buffer-size))
+         (height (max doom-modeline-height (doom-modeline--font-height)))
+         (top-margin (if (zerop bs)
+                         0
+                       (/ (* height (1- ws)) bs)))
+         (bottom-margin (if (zerop bs)
+                            0
+                          (max 0 (/ (* height (- bs we 1)) bs))))
+         (cache (or (window-parameter nil 'doom-modeline--hud-cache)
+                    (set-window-parameter
+                     nil
+                     'doom-modeline--hud-cache
+                     (make-doom-modeline--hud-cache)))))
+    (unless (and (doom-modeline--hud-cache-active cache)
+                 (doom-modeline--hud-cache-inactive cache)
+                 (= top-margin (doom-modeline--hud-cache-top-margin cache))
+                 (= bottom-margin
+                    (doom-modeline--hud-cache-bottom-margin cache)))
+      (setf (doom-modeline--hud-cache-active cache)
+            (doom-modeline--create-hud-image
+             'doom-modeline-bar 'default doom-modeline-bar-width
+             height top-margin bottom-margin)
+            (doom-modeline--hud-cache-inactive cache)
+            (doom-modeline--create-hud-image
+             'doom-modeline-bar-inactive 'default doom-modeline-bar-width
+             height top-margin bottom-margin)
+            (doom-modeline--hud-cache-top-margin cache) top-margin
+            (doom-modeline--hud-cache-bottom-margin cache) bottom-margin))
+    (if (doom-modeline--active)
+        (doom-modeline--hud-cache-active cache)
+      (doom-modeline--hud-cache-inactive cache))))
+
+(defun doom-modeline-invalidate-huds ()
+  "Invalidate all cached hud images."
+  (dolist (frame (frame-list))
+    (dolist (window (window-list frame))
+      (set-window-parameter window 'doom-modeline--hud-cache nil))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-height
+ (lambda (_sym val op _where)
+   (when (and (eq op 'set) (integerp val))
+     (doom-modeline-refresh-bars)
+     (doom-modeline-invalidate-huds))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-bar-width
+ (lambda (_sym val op _where)
+   (when (and (eq op 'set) (integerp val))
+     (doom-modeline-refresh-bars)
+     (doom-modeline-invalidate-huds))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-icon
+ (lambda (_sym _val op _where)
+   (when (eq op 'set)
+     (doom-modeline-refresh-bars)
+     (doom-modeline-invalidate-huds))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-unicode-fallback
+ (lambda (_sym _val op _where)
+   (when (eq op 'set)
+     (doom-modeline-refresh-bars)
+     (doom-modeline-invalidate-huds))))
+
+(add-hook 'window-configuration-change-hook #'doom-modeline-refresh-bars)
+(add-hook 'window-configuration-change-hook #'doom-modeline-invalidate-huds)
+
+(doom-modeline-def-segment bar
+  "The bar regulates the height of the `doom-modeline' in GUI."
+  (when (display-graphic-p)
+    (concat
+     (if doom-modeline-hud
+         (doom-modeline--hud)
+       (doom-modeline--bar))
+     (doom-modeline-spc))))
+
+(doom-modeline-def-segment hud
+  "Powerline's hud segment reimplemented in the style of bar segment."
+  (when (display-graphic-p)
+    (concat
+     (doom-modeline--hud)
+     (doom-modeline-spc))))
+
+
+;;
+;; Window state
+;;
+
+;; Port from Emacs 30
+(unless (fboundp 'toggle-window-dedicated)
+  (defun toggle-window-dedicated (&optional window flag interactive)
+    "Toggle whether WINDOW is dedicated to its current buffer.
+
+WINDOW must be a live window and defaults to the selected one.
+If FLAG is t (interactively, the prefix argument), make the window
+\"strongly\" dedicated to its buffer.  FLAG defaults to a non-nil,
+non-t value, and is passed to `set-window-dedicated-p', which see.
+If INTERACTIVE is non-nil, print a message describing the dedication
+status of WINDOW, after toggling it.  Interactively, this argument is
+always non-nil.
+
+When a window is dedicated to its buffer, `display-buffer' will avoid
+displaying another buffer in it, if possible.  When a window is
+strongly dedicated to its buffer, changing the buffer shown in the
+window will usually signal an error.
+
+You can control the default of FLAG with
+`toggle-window-dedicated-flag'.  Consequently, if you set that
+variable to t, strong dedication will be used by default and
+\\[universal-argument] will make the window weakly dedicated.
+
+See the info node `(elisp)Dedicated Windows' for more details."
+    (interactive "i\nP\np")
+    (setq window (window-normalize-window window))
+    (setq flag (cond
+                ((consp flag)
+                 (if (eq toggle-window-dedicated-flag t)
+                     'interactive
+                   t))
+                ((null flag) toggle-window-dedicated-flag)
+                (t flag)))
+    (if (window-dedicated-p window)
+        (set-window-dedicated-p window nil)
+      (set-window-dedicated-p window flag))
+    (when interactive
+      (message "Window is %s dedicated to buffer %s"
+               (let ((status (window-dedicated-p window)))
+                 (cond
+                  ((null status) "no longer")
+                  ((eq status t) "now strongly")
+                  (t "now")))
+               (current-buffer))
+      (force-mode-line-update)))
+
+  (defvar mode-line-window-dedicated-keymap
+    (let ((map (make-sparse-keymap)))
+      (define-key map [mode-line mouse-1] #'toggle-window-dedicated)
+      (purecopy map)) "\
+Keymap for what is displayed by `mode-line-window-dedicated'."))
+
+(doom-modeline-def-segment window-state
+  (let ((face (if (doom-modeline--active)
+                  'doom-modeline-emphasis
+                'doom-modeline)))
+    (cond
+     ((eq (window-dedicated-p) t)
+      (propertize
+       (format " %s " (doom-modeline-icon 'mdicon "nf-md-pin" "⍑" "D" :face face))
+       'help-echo "Window strongly dedicated to its buffer\nmouse-1: Toggle"
+       'local-map mode-line-window-dedicated-keymap
+       'mouse-face 'mode-line-highlight))
+     ((window-dedicated-p)
+      (propertize
+       (format " %s " (doom-modeline-icon 'mdicon "nf-md-pin_outline" "⊤" "d" :face face))
+       'help-echo "Window dedicated to its buffer\nmouse-1: Toggle"
+       'local-map mode-line-window-dedicated-keymap
+       'mouse-face 'mode-line-highlight))
+     (t ""))))
+
+
+;;
+;; Window number
+;;
+
+(defun doom-modeline-override-window-number ()
+  "Override window number in original mode-line."
+  (if (bound-and-true-p doom-modeline-mode)
+      (progn
+        (setq-default mode-line-format
+                      (assq-delete-all 'ace-window-display-mode
+                                       (default-value 'mode-line-format)))
+        (advice-add #'window-numbering-install-mode-line :override #'ignore)
+        (advice-add #'window-numbering-clear-mode-line :override #'ignore)
+        (advice-add #'winum--install-mode-line :override #'ignore)
+        (advice-add #'winum--clear-mode-line :override #'ignore))
+    (progn
+      (advice-remove #'window-numbering-install-mode-line #'ignore)
+      (advice-remove #'window-numbering-clear-mode-line #'ignore)
+      (advice-remove #'winum--install-mode-line #'ignore)
+      (advice-remove #'winum--clear-mode-line #'ignore))))
+(add-hook 'ace-window-display-mode-hook #'doom-modeline-override-window-number)
+(add-hook 'doom-modeline-mode-hook #'doom-modeline-override-window-number)
+
+(defun doom-modeline--unicode-number (num)
+  "Return a nice unicode representation of NUM."
+  (cond
+   ((not num) "")
+   ((string= "1" num) "➊")
+   ((string= "2" num) "➋")
+   ((string= "3" num) "➌")
+   ((string= "4" num) "➍")
+   ((string= "5" num) "➎")
+   ((string= "6" num) "➏")
+   ((string= "7" num) "➐")
+   ((string= "8" num) "➑")
+   ((string= "9" num) "➒")
+   ((string= "10" num) "➓")
+   (t num)))
+
+(doom-modeline-def-segment window-number
+  "The current window number."
+  (let ((num (cond
+              ((bound-and-true-p ace-window-display-mode)
+               (aw-update)
+               (window-parameter (selected-window) 'ace-window-path))
+              ((bound-and-true-p winum-mode)
+               (setq winum-auto-setup-mode-line nil)
+               (winum-get-number-string))
+              ((bound-and-true-p window-numbering-mode)
+               (window-numbering-get-number-string))
+              (t ""))))
+    (when (and (length> num 0)
+               (length> (cl-mapcan
+                         (lambda (frame)
+                           ;; Exclude minibuffer, tooltip and child frames
+                           (unless (or (and (fboundp 'frame-parent) (frame-parent frame))
+                                       (string= (frame-parameter frame 'name)
+                                                (alist-get 'name (bound-and-true-p tooltip-frame-parameters))))
+                             (window-list frame 'never)))
+                         (visible-frame-list))
+                        1))
+      (propertize (format " %s " (if doom-modeline-unicode-number
+                                     (doom-modeline--unicode-number num)
+                                   num))
+                  'face (doom-modeline-face 'doom-modeline-buffer-major-mode)))))
+
+;;
+;; Project
+;;
+
+(defvar doom-modeline-project-map
+  (cond
+   ((and (memq doom-modeline-project-detection '(auto projectile))
+         (bound-and-true-p projectile-mode))
+    projectile-mode-map)
+   ((and (memq doom-modeline-project-detection '(auto project))
+         (fboundp 'project-current))
+    (let ((map (make-sparse-keymap)))
+      (define-key map [mode-line down-mouse-1]
+        (bound-and-true-p menu-bar-project-item))
+      map))))
+
+(defvar-local doom-modeline--project-name nil)
+(defun doom-modeline-project-name ()
+  "Get the project name."
+  (or doom-modeline--project-name
+      (setq doom-modeline--project-name
+            (let ((name (cond
+                         ((and (memq doom-modeline-project-detection '(auto projectile))
+                               (bound-and-true-p projectile-mode))
+                          (projectile-project-name))
+                         ((and (memq doom-modeline-project-detection '(auto project))
+                               (fboundp 'project-current))
+                          (when-let* ((project (project-current)))
+                            (project-name project))))))
+              (if (and name (not (string-empty-p name)))
+                  (format " [%s] " name)
+                "")))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-project-detection
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-project-detection val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (setq doom-modeline--project-name nil)
+         (and buffer-file-name (revert-buffer t t)))))))
+
+(doom-modeline-def-segment project-name
+  "The current perspective name."
+  (when (and doom-modeline-project-name
+             (doom-modeline--segment-visible 'project-name))
+    (propertize (doom-modeline-project-name)
+                'face (doom-modeline-face 'doom-modeline-project-name)
+                'mouse-face 'mode-line-highlight
+                'help-echo "mouse-1: Project menu"
+                'local-map doom-modeline-project-map)))
+
+
+;;
+;; Workspace
+;;
+
+(doom-modeline-def-segment workspace-name
+  "The current workspace name.
+Requires `eyebrowse-mode' to be enabled or `tab-bar-mode' tabs to be created."
+  (when (and doom-modeline-workspace-name
+             (not doom-modeline--limited-width-p))
+    (when-let*
+        ((name (cond
+                ((and (bound-and-true-p eyebrowse-mode)
+                      (length> (eyebrowse--get 'window-configs) 1))
+                 (setq mode-line-misc-info
+                       (assq-delete-all 'eyebrowse-mode mode-line-misc-info))
+                 (when-let*
+                     ((num (eyebrowse--get 'current-slot))
+                      (tag (nth 2 (assoc num (eyebrowse--get 'window-configs)))))
+                   (if (length> tag 0) tag (int-to-string num))))
+                ((and (fboundp 'tab-bar-mode)
+                      (length> (frame-parameter nil 'tabs) 1))
+                 (let* ((current-tab (tab-bar--current-tab))
+                        (tab-index (tab-bar--current-tab-index))
+                        (explicit-name (alist-get 'explicit-name current-tab))
+                        (tab-name (alist-get 'name current-tab)))
+                   (if explicit-name tab-name (+ 1 tab-index))))))
+         (keymap (let ((map (make-sparse-keymap)))
+                   (cond ((and (bound-and-true-p eyebrowse-mode)
+                               (length> (eyebrowse--get 'window-configs) 1))
+                          (define-key map [mode-line mouse-1] #'eyebrowse-switch-to-window-config)
+                          (define-key map [mode-line mouse-2]
+                            (lambda ()
+                              (interactive)
+                              (describe-function 'eyebrowse-mode))))
+                         ((and (fboundp 'tab-bar-mode)
+                               (length> (frame-parameter nil 'tabs) 1))
+                          (define-key map [mode-line mouse-1] #'tab-bar-switch-to-tab)
+                          (define-key map [mode-line mouse-2]
+                            (lambda ()
+                              (interactive)
+                              (describe-function 'tab-bar-mode)))))
+                   map)))
+      (propertize (format " %s " name)
+                  'face (doom-modeline-face 'doom-modeline-workspace-name)
+                  'mouse-face 'mode-line-highlight
+                  'help-echo "mouse-1: Switch workspace
+mouse-2: Show help for minor mode"
+                  'local-map keymap))))
+
+
+;;
+;; Perspective
+;;
+
+(defvar-local doom-modeline--persp-name nil)
+(defun doom-modeline-update-persp-name (&rest _)
+  "Update perspective name in mode-line."
+  (setq doom-modeline--persp-name
+        ;; Support `persp-mode', while not support `perspective'
+        (when (and doom-modeline-persp-name
+                   (bound-and-true-p persp-mode)
+                   (fboundp 'safe-persp-name)
+                   (fboundp 'get-current-persp))
+          (let* ((persp (get-current-persp))
+                 (name (safe-persp-name persp))
+                 (face (if (and persp
+                                (not (persp-contain-buffer-p (current-buffer) persp)))
+                           'doom-modeline-persp-buffer-not-in-persp
+                         'doom-modeline-persp-name))
+                 (icon (doom-modeline-icon 'octicon "nf-oct-repo" "🖿" "#"
+                                           :face `(:inherit ,face :slant normal))))
+            (when (or doom-modeline-display-default-persp-name
+                      (not (string= persp-nil-name name)))
+              (concat " "
+                      (propertize (concat (and doom-modeline-persp-icon
+                                               (concat icon (doom-modeline-vspc)))
+                                          (propertize name 'face face))
+                                  'help-echo "mouse-1: Switch perspective
+mouse-2: Show help for minor mode"
+                                  'mouse-face 'doom-modeline-highlight
+                                  'local-map (let ((map (make-sparse-keymap)))
+                                               (define-key map [mode-line mouse-1]
+                                                 #'persp-switch)
+                                               (define-key map [mode-line mouse-2]
+                                                 (lambda ()
+                                                   (interactive)
+                                                   (describe-function 'persp-mode)))
+                                               map))
+                      " "))))))
+
+(add-hook 'buffer-list-update-hook #'doom-modeline-update-persp-name)
+(add-hook 'find-file-hook #'doom-modeline-update-persp-name)
+(add-hook 'persp-activated-functions #'doom-modeline-update-persp-name)
+(add-hook 'persp-renamed-functions #'doom-modeline-update-persp-name)
+(advice-add #'lv-message :after #'doom-modeline-update-persp-name)
+
+(doom-modeline-def-segment persp-name
+  "The current perspective name."
+  (when (doom-modeline--segment-visible 'persp-name)
+    doom-modeline--persp-name))
+
+
+;;
+;; Misc info
+;;
+
+(doom-modeline-def-segment misc-info
+  "Mode line construct for miscellaneous information.
+By default, this shows the information specified by `global-mode-string'."
+  (when (or doom-modeline-display-misc-in-all-mode-lines
+            (doom-modeline--segment-visible 'misc-info))
+    (doom-modeline-display-text (format-mode-line mode-line-misc-info))))
+
+
+;;
+;; Position
+;;
+
+(doom-modeline-def-segment buffer-position
+  "The buffer position information.
+Respects `doom-modeline-enable-buffer-position'."
+  (when doom-modeline-enable-buffer-position
+    (let ((visible (doom-modeline--segment-visible 'buffer-position))
+          (sep (doom-modeline-spc))
+          (wsep (doom-modeline-wspc))
+          (face (doom-modeline-face))
+          (help-echo "Buffer percentage\n\
+mouse-1: Display Line and Column Mode Menu")
+          (mouse-face 'doom-modeline-highlight)
+          (local-map mode-line-column-line-number-mode-map))
+      `(,wsep
+
+        ;; Line and column
+        (:propertize
+         ((line-number-mode
+           (column-number-mode
+            (doom-modeline-column-zero-based
+             doom-modeline-position-column-line-format
+             ,(string-replace
+               "%c" "%C" (car doom-modeline-position-column-line-format)))
+            doom-modeline-position-line-format)
+           (column-number-mode
+            (doom-modeline-column-zero-based
+             doom-modeline-position-column-format
+             ,(string-replace
+               "%c" "%C" (car doom-modeline-position-column-format)))))
+          (doom-modeline-total-line-number
+           ,(and doom-modeline-total-line-number
+                 (format "/%d" (line-number-at-pos (point-max))))))
+         face ,face
+         help-echo ,help-echo
+         mouse-face ,mouse-face
+         local-map ,local-map)
+
+        ((or line-number-mode column-number-mode)
+         ,sep)
+
+        ;; Visual position
+        (,visible
+         ,(cond
+           ((bound-and-true-p nyan-mode)
+            (concat sep (nyan-create) sep))
+           ((bound-and-true-p poke-line-mode)
+            (concat sep (poke-line-create) sep))
+           ((bound-and-true-p mlscroll-mode)
+            (concat sep
+                    (let ((mlscroll-right-align nil))
+                      (format-mode-line (mlscroll-mode-line)))
+                    sep))
+           ((bound-and-true-p sml-modeline-mode)
+            (concat sep (sml-modeline-create) sep))
+           (t "")))
+
+        ;; Percent position
+        (doom-modeline-percent-position
+         ((:propertize ("" doom-modeline-percent-position)
+           face ,face
+           help-echo ,help-echo
+           mouse-face ,mouse-face
+           local-map ,local-map)
+          ,sep))))))
+
+;;
+;; Party parrot
+;;
+(doom-modeline-def-segment parrot
+  "The party parrot animated icon. Requires `parrot-mode' to be enabled."
+  (when (and (doom-modeline--segment-visible 'parrot)
+             (bound-and-true-p parrot-mode))
+    (concat (doom-modeline-wspc)
+            (parrot-create)
+            (doom-modeline-spc))))
+
+;;
+;; Modals (evil, overwrite, god, ryo and xah-fly-keys, etc.)
+;;
+
+(defun doom-modeline--modal-icon (text face help-echo &optional icon unicode)
+  "Display the model icon with FACE and HELP-ECHO.
+TEXT is alternative if icon is not available."
+  (propertize (doom-modeline-icon
+               'mdicon
+               (and doom-modeline-modal-icon
+                    (or (and doom-modeline-modal-modern-icon icon)
+                        "nf-md-record"))
+               (or (and doom-modeline-modal-modern-icon unicode) "●")
+               text
+               :face (doom-modeline-face face))
+              'help-echo help-echo))
+
+(defsubst doom-modeline--evil ()
+  "The current evil state. Requires `evil-mode' to be enabled."
+  (when (bound-and-true-p evil-local-mode)
+    (let-alist (cond
+                ((evil-normal-state-p)   '((face    . doom-modeline-evil-normal-state)
+                                           (icon    . "nf-md-alpha_n_circle")
+                                           (unicode . "🅝")))
+                ((evil-emacs-state-p)    '((face    . doom-modeline-evil-emacs-state)
+                                           (icon    . "nf-md-alpha_e_circle")
+                                           (unicode . "🅔")))
+                ((evil-insert-state-p)   '((face    . doom-modeline-evil-insert-state)
+                                           (icon    . "nf-md-alpha_i_circle")
+                                           (unicode . "🅘")))
+                ((evil-motion-state-p)   '((face    . doom-modeline-evil-motion-state)
+                                           (icon    . "nf-md-alpha_m_circle")
+                                           (unicode . "🅜")))
+                ((evil-visual-state-p)   '((face    . doom-modeline-evil-visual-state)
+                                           (icon    . "nf-md-alpha_v_circle")
+                                           (unicode . "🅥")))
+                ((evil-operator-state-p) '((face    . doom-modeline-evil-operator-state)
+                                           (icon    . "nf-md-alpha_o_circle")
+                                           (unicode . "🅞")))
+                ((evil-replace-state-p)  '((face    . doom-modeline-evil-replace-state)
+                                           (icon    . "nf-md-alpha_r_circle")
+                                           (unicode . "🅡")))
+                (t                       '((face    . doom-modeline-evil-user-state)
+                                           (icon    . "nf-md-alpha_u_circle")
+                                           (unicode . "🅤"))))
+      (doom-modeline--modal-icon
+       ;; Users can set `evil-xxx-state-tag'
+       (let ((tag (evil-state-property evil-state :tag t)))
+         (if (stringp tag) tag (funcall tag)))
+       .face
+       (evil-state-property evil-state :name t)
+       .icon
+       .unicode))))
+
+(defsubst doom-modeline--overwrite ()
+  "The current overwrite state which is enabled by command `overwrite-mode'."
+  (when (and (bound-and-true-p overwrite-mode)
+             (not (bound-and-true-p evil-local-mode)))
+    (doom-modeline--modal-icon
+     "<W>" 'doom-modeline-overwrite "Overwrite mode"
+     "nf-md-marker" "✍")))
+
+(defsubst doom-modeline--god ()
+  "The current god state which is enabled by the command `god-mode'."
+  (when (bound-and-true-p god-local-mode)
+    (doom-modeline--modal-icon
+     "<G>" 'doom-modeline-god "God mode"
+     "nf-md-account_circle" "🙏")))
+
+(defsubst doom-modeline--ryo ()
+  "The current ryo-modal state which is enabled by the command `ryo-modal-mode'."
+  (when (bound-and-true-p ryo-modal-mode)
+    (doom-modeline--modal-icon
+     "<R>" 'doom-modeline-ryo "Ryo modal"
+     "nf-md-star_circle" "✪")))
+
+(defsubst doom-modeline--xah-fly-keys ()
+  "The current `xah-fly-keys' state."
+  (when (bound-and-true-p xah-fly-keys)
+    (if xah-fly-insert-state-p
+        (doom-modeline--modal-icon
+         "<I>" 'doom-modeline-fly-insert-state "Xah-fly insert mode"
+         "nf-md-airplane_edit" "🛧")
+      (doom-modeline--modal-icon
+       "<C>" 'doom-modeline-fly-normal-state "Xah-fly command mode"
+       "nf-md-airplane_cog" "🛧"))))
+
+(defsubst doom-modeline--boon ()
+  "The current Boon state. Requires `boon-mode' to be enabled."
+  (when (bound-and-true-p boon-local-mode)
+    (doom-modeline--modal-icon
+     (boon-state-string)
+     (cond
+      (boon-command-state 'doom-modeline-boon-command-state)
+      (boon-insert-state 'doom-modeline-boon-insert-state)
+      (boon-special-state 'doom-modeline-boon-special-state)
+      (boon-off-state 'doom-modeline-boon-off-state)
+      (t 'doom-modeline-boon-off-state))
+     (boon-modeline-string)
+     "nf-md-coffee" "🍵")))
+
+(defsubst doom-modeline--meow ()
+  "The current Meow state. Requires `meow-mode' to be enabled."
+  (when (bound-and-true-p meow-mode)
+    (let-alist (pcase meow--current-state
+                 ('normal '((face    . doom-modeline-meow-normal-state)
+                            (icon    . "nf-md-alpha_n_circle")
+                            (unicode . "🅝")))
+                 ('insert '((face    . doom-modeline-meow-insert-state)
+                            (icon    . "nf-md-alpha_i_circle")
+                            (unicode . "🅘")))
+                 ('beacon '((face    . doom-modeline-meow-beacon-state)
+                            (icon    . "nf-md-alpha_b_circle")
+                            (unicode . "🅑")))
+                 ('motion '((face    . doom-modeline-meow-motion-state)
+                            (icon    . "nf-md-alpha_m_circle")
+                            (unicode . "🅜")))
+                 ('keypad '((face    . doom-modeline-meow-keypad-state)
+                            (icon    . "nf-md-alpha_k_circle")
+                            (unicode . "🅚")))
+                 (_       '((face    . doom-modeline-meow-normal-state)
+                            (icon    . "nf-md-alpha_n_circle")
+                            (unicode . "🅝"))))
+      (doom-modeline--modal-icon
+       (substring-no-properties meow--indicator)
+       .face
+       (symbol-name meow--current-state)
+       .icon
+       .unicode))))
+
+(doom-modeline-def-segment modals
+  "Displays modal editing states.
+
+Including `evil', `overwrite', `god', `ryo' and `xha-fly-kyes', etc."
+  (when doom-modeline-modal
+    (let* ((evil (doom-modeline--evil))
+           (ow (doom-modeline--overwrite))
+           (god (doom-modeline--god))
+           (ryo (doom-modeline--ryo))
+           (xf (doom-modeline--xah-fly-keys))
+           (boon (doom-modeline--boon))
+           (meow (doom-modeline--meow))
+           (vsep (doom-modeline-vspc))
+           (sep (and (or evil ow god ryo xf boon meow) (doom-modeline-spc))))
+      (concat sep
+              (and evil (concat evil (and (or ow god ryo xf boon meow) vsep)))
+              (and ow (concat ow (and (or god ryo xf boon meow) vsep)))
+              (and god (concat god (and (or ryo xf boon meow) vsep)))
+              (and ryo (concat ryo (and (or xf boon meow) vsep)))
+              (and xf (concat xf (and (or boon meow) vsep)))
+              (and boon (concat boon (and meow vsep)))
+              meow
+              sep))))
+
+;;
+;; Objed state
+;;
+
+(defvar doom-modeline--objed-active nil)
+
+(defun doom-modeline-update-objed (_ &optional reset)
+  "Update `objed' status, inactive when RESET is true."
+  (setq doom-modeline--objed-active (not reset)))
+
+(setq objed-modeline-setup-func #'doom-modeline-update-objed)
+
+(doom-modeline-def-segment objed-state ()
+  "The current objed state."
+  (when (and doom-modeline--objed-active
+             (doom-modeline--active))
+    (propertize (format " %s(%s) "
+                        (symbol-name objed--object)
+                        (char-to-string (aref (symbol-name objed--obj-state) 0)))
+                'face 'doom-modeline-evil-emacs-state
+                'help-echo (format "Objed object: %s (%s)"
+                                   (symbol-name objed--object)
+                                   (symbol-name objed--obj-state)))))
+
+
+;;
+;; Input method
+;;
+
+(doom-modeline-def-segment input-method
+  "The current input method."
+  (when-let* ((im (cond
+                   (current-input-method
+                    current-input-method-title)
+                   ((and (bound-and-true-p evil-local-mode)
+                         (bound-and-true-p evil-input-method))
+                    (nth 3 (assoc default-input-method input-method-alist)))
+                   (t nil)))
+              (sep (doom-modeline-spc)))
+    (concat
+     sep
+     (propertize im
+                 'face (doom-modeline-face
+                        (if (and (bound-and-true-p rime-mode)
+                                 (equal current-input-method "rime"))
+                            (if (and (rime--should-enable-p)
+                                     (not (rime--should-inline-ascii-p)))
+                                'doom-modeline-input-method
+                              'doom-modeline-input-method-alt)
+                          'doom-modeline-input-method))
+                 'help-echo (concat
+                             "Current input method: "
+                             current-input-method
+                             "\n\
+mouse-2: Disable input method\n\
+mouse-3: Describe current input method")
+                 'mouse-face 'doom-modeline-highlight
+                 'local-map mode-line-input-method-map)
+     sep)))
+
+
+;;
+;; Info
+;;
+
+(doom-modeline-def-segment info-nodes
+  "The topic and nodes in the Info buffer."
+  (concat
+   " ("
+   ;; topic
+   (propertize (if (stringp Info-current-file)
+                   (replace-regexp-in-string
+                    "%" "%%"
+                    (file-name-sans-extension
+                     (file-name-nondirectory Info-current-file)))
+                 (format "*%S*" Info-current-file))
+               'face (doom-modeline-face 'doom-modeline-info))
+   ") "
+   ;; node
+   (when Info-current-node
+     (propertize (replace-regexp-in-string
+                  "%" "%%" Info-current-node)
+                 'face (doom-modeline-face 'doom-modeline-buffer-path)
+                 'help-echo
+                 "mouse-1: scroll forward, mouse-3: scroll back"
+                 'mouse-face 'doom-modeline-highlight
+                 'local-map Info-mode-line-node-keymap))))
+
+
+;;
+;; REPL
+;;
+
+(defun doom-modeline-repl-icon (text face)
+  "Display REPL icon (or TEXT in terminal) with FACE."
+  (doom-modeline-icon 'faicon "nf-fa-terminal" "$" text :face face))
+
+(defvar doom-modeline--cider nil)
+
+(defun doom-modeline-update-cider ()
+  "Update cider repl state."
+  (setq doom-modeline--cider
+        (let* ((connected (cider-connected-p))
+               (face (if connected 'doom-modeline-repl-success 'doom-modeline-repl-warning))
+               (repl-buffer (cider-current-repl nil nil))
+               (cider-info (when repl-buffer
+                             (cider--connection-info repl-buffer t)))
+               (icon (doom-modeline-repl-icon "REPL" face)))
+          (propertize icon
+                      'help-echo
+                      (if connected
+                          (format "CIDER Connected %s\nmouse-2: CIDER quit" cider-info)
+                        "CIDER Disconnected\nmouse-1: CIDER jack-in")
+                      'mouse-face 'doom-modeline-highlight
+                      'local-map (let ((map (make-sparse-keymap)))
+                                   (if connected
+                                       (define-key map [mode-line mouse-2]
+                                         #'cider-quit)
+                                     (define-key map [mode-line mouse-1]
+                                       #'cider-jack-in))
+                                   map)))))
+
+(add-hook 'cider-connected-hook #'doom-modeline-update-cider)
+(add-hook 'cider-disconnected-hook #'doom-modeline-update-cider)
+(add-hook 'cider-mode-hook #'doom-modeline-update-cider)
+
+(doom-modeline-def-segment repl
+  "The REPL state."
+  (when doom-modeline-repl
+    (when-let* ((icon (when (bound-and-true-p cider-mode)
+                        doom-modeline--cider))
+                (sep (doom-modeline-spc)))
+      (concat
+       sep
+       (doom-modeline-display-icon icon)
+       sep))))
+
+
+;;
+;; LSP
+;;
+
+(defun doom-modeline-lsp-icon (text face)
+  "Display LSP icon (or TEXT in terminal) with FACE."
+  (if doom-modeline-lsp-icon
+      (doom-modeline-icon 'octicon "nf-oct-rocket" "🚀" text :face face)
+    (propertize text 'face face)))
+
+(defvar-local doom-modeline--lsp nil)
+(defun doom-modeline-update-lsp (&rest _)
+  "Update `lsp-mode' state."
+  (setq doom-modeline--lsp
+        (let* ((workspaces (lsp-workspaces))
+               (face (if workspaces 'doom-modeline-lsp-success 'doom-modeline-lsp-warning))
+               (icon (doom-modeline-lsp-icon "LSP" face)))
+          (propertize icon
+                      'help-echo
+                      (if workspaces
+                          (concat "LSP connected "
+                                  (string-join
+                                   (mapcar (lambda (w)
+                                             (format "[%s]\n" (lsp--workspace-print w)))
+                                           workspaces))
+                                  "C-mouse-1: Switch to another workspace folder
+mouse-1: Describe current session
+mouse-2: Quit server
+mouse-3: Reconnect to server")
+                        "LSP Disconnected
+mouse-1: Reload to start server")
+                      'mouse-face 'doom-modeline-highlight
+                      'local-map (let ((map (make-sparse-keymap)))
+                                   (if workspaces
+                                       (progn
+                                         (define-key map [mode-line C-mouse-1]
+                                           #'lsp-workspace-folders-open)
+                                         (define-key map [mode-line mouse-1]
+                                           #'lsp-describe-session)
+                                         (define-key map [mode-line mouse-2]
+                                           #'lsp-workspace-shutdown)
+                                         (define-key map [mode-line mouse-3]
+                                           #'lsp-workspace-restart))
+                                     (progn
+                                       (define-key map [mode-line mouse-1]
+                                         (lambda ()
+                                           (interactive)
+                                           (ignore-errors (revert-buffer t t))))))
+                                   map)))))
+(add-hook 'lsp-before-initialize-hook #'doom-modeline-update-lsp)
+(add-hook 'lsp-after-initialize-hook #'doom-modeline-update-lsp)
+(add-hook 'lsp-after-uninitialized-functions #'doom-modeline-update-lsp)
+(add-hook 'lsp-before-open-hook #'doom-modeline-update-lsp)
+(add-hook 'lsp-after-open-hook #'doom-modeline-update-lsp)
+
+(defun doom-modeline--eglot-pending-count (server)
+  "Get count of pending eglot requests to SERVER."
+  (if (fboundp 'jsonrpc-continuation-count)
+      (jsonrpc-continuation-count server)
+    (hash-table-count (jsonrpc--request-continuations server))))
+
+(defvar-local doom-modeline--eglot nil)
+(defun doom-modeline-update-eglot ()
+  "Update eglot state."
+  (setq doom-modeline--eglot
+        (let* ((server (and (eglot-managed-p) (eglot-current-server)))
+               (nick (and server (eglot-project-nickname server)))
+               (pending (and server (doom-modeline--eglot-pending-count server)))
+               (last-error (and server (jsonrpc-last-error server)))
+               (face (cond (last-error 'doom-modeline-lsp-error)
+                           ((and pending (cl-plusp pending)) 'doom-modeline-lsp-warning)
+                           (nick 'doom-modeline-lsp-success)
+                           (t 'doom-modeline-lsp-warning)))
+               (server-info (and server (eglot--server-info server)))
+               (server-name (or (plist-get server-info :name)
+                                (and server (jsonrpc-name server)) ""))
+               (major-modes (or (and server (eglot--major-modes server)) ""))
+               (icon (doom-modeline-lsp-icon eglot-menu-string face)))
+          (propertize icon
+                      'help-echo (format "Eglot connected [%s]\n%s %s
+mouse-1: Display minor mode menu
+mouse-3: LSP server control menu"
+                                         nick server-name major-modes)
+                      'mouse-face 'doom-modeline-highlight
+                      'local-map (let ((map (make-sparse-keymap)))
+                                   (define-key map [mode-line mouse-1] eglot-menu)
+                                   (define-key map [mode-line mouse-3] eglot-server-menu)
+                                   map)))))
+(add-hook 'eglot-managed-mode-hook #'doom-modeline-update-eglot)
+
+(defvar-local doom-modeline--tags nil)
+(defun doom-modeline-update-tags ()
+  "Update tags state."
+  (setq doom-modeline--tags
+        (propertize
+         (doom-modeline-lsp-icon "Tags" 'doom-modeline-lsp-success)
+         'help-echo "Tags: Citre mode
+mouse-1: Toggle citre mode"
+         'mouse-face 'doom-modeline-highlight
+         'local-map (make-mode-line-mouse-map 'mouse-1 #'citre-mode))))
+(add-hook 'citre-mode-hook #'doom-modeline-update-tags)
+
+(defun doom-modeline-update-lsp-icon ()
+  "Update lsp icon."
+  (cond ((bound-and-true-p lsp-mode)
+         (doom-modeline-update-lsp))
+        ((bound-and-true-p eglot--managed-mode)
+         (doom-modeline-update-eglot))
+        ((bound-and-true-p citre-mode)
+         (doom-modeline-update-tags))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-lsp-icon
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-lsp-icon val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-lsp-icon))))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-icon
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-icon val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-lsp-icon))))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-unicode-fallback
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-unicode-fallback val)
+     (dolist (buf (buffer-list))
+       (with-current-buffer buf
+         (doom-modeline-update-lsp-icon))))))
+
+(doom-modeline-def-segment lsp
+  "The LSP server state."
+  (when doom-modeline-lsp
+    (when-let* ((icon (cond ((bound-and-true-p lsp-mode)
+                             doom-modeline--lsp)
+                            ((bound-and-true-p eglot--managed-mode)
+                             doom-modeline--eglot)
+                            ((bound-and-true-p citre-mode)
+                             doom-modeline--tags)))
+                (sep (doom-modeline-spc)))
+      (concat
+       sep
+       (doom-modeline-display-icon icon)
+       sep))))
+
+(defun doom-modeline-override-eglot ()
+  "Override `eglot' mode-line."
+  (if (and doom-modeline-lsp
+           (bound-and-true-p doom-modeline-mode))
+      (setq mode-line-misc-info
+            (delq (assq 'eglot--managed-mode mode-line-misc-info) mode-line-misc-info))
+    (add-to-list 'mode-line-misc-info
+                 `(eglot--managed-mode (" [" eglot--mode-line-format "] ")))))
+(add-hook 'eglot-managed-mode-hook #'doom-modeline-override-eglot)
+(add-hook 'doom-modeline-mode-hook #'doom-modeline-override-eglot)
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-battery
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-lsp val)
+     (doom-modeline-override-eglot))))
+
+
+;;
+;; GitHub
+;;
+
+(defvar doom-modeline--github-notification-number 0)
+(defvar doom-modeline-before-github-fetch-notification-hook nil
+  "Hooks before fetching GitHub notifications.
+Example:
+  (add-hook \\='doom-modeline-before-github-fetch-notification-hook
+          #\\='auth-source-pass-enable)")
+
+(defvar doom-modeline-after-github-fetch-notification-hook nil
+  "Hooks after fetching GitHub notifications.")
+
+(defun doom-modeline--github-fetch-notifications ()
+  "Fetch GitHub notifications.
+It requires `async' and `ghub' packages."
+  (when (and doom-modeline-github
+             (require 'async nil t))
+    (async-start
+     `(lambda ()
+        ,(async-inject-variables
+          "\\`\\(load-path\\|auth-sources\\|doom-modeline-before-github-fetch-notification-hook\\)\\'")
+        (run-hooks 'doom-modeline-before-github-fetch-notification-hook)
+        (when (require 'ghub nil t)
+          (with-timeout (10)
+            (ignore-errors
+              (when-let* ((host (alist-get 'github ghub-default-host-alist))
+			              (username (ghub--username host))
+                          (token (or (ghub--token host username 'forge t)
+                                     (ghub--token host username 'ghub t))))
+                (ghub-get "/notifications"
+                          '((notifications . t))
+                          :host host
+                          :username username
+                          :auth token
+                          :unpaginate t
+                          :noerror t))))))
+     (lambda (result)
+       (message "")                     ; suppress message
+       (setq doom-modeline--github-notification-number (length result))
+       (run-hooks 'doom-modeline-after-github-fetch-notification-hook)))))
+
+(defvar doom-modeline--github-timer nil)
+(defun doom-modeline-github-timer ()
+  "Start/Stop the timer for GitHub fetching."
+  (if (timerp doom-modeline--github-timer)
+      (cancel-timer doom-modeline--github-timer))
+  (setq doom-modeline--github-timer
+        (and doom-modeline-github
+             (run-with-idle-timer 30
+                                  doom-modeline-github-interval
+                                  #'doom-modeline--github-fetch-notifications))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-github
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-github val)
+     (doom-modeline-github-timer))))
+
+(doom-modeline-github-timer)
+
+(doom-modeline-def-segment github
+  "The GitHub notifications."
+  (when (and doom-modeline-github
+             (doom-modeline--segment-visible 'github)
+             (numberp doom-modeline--github-notification-number))
+    (let ((sep (doom-modeline-spc)))
+      (concat
+       sep
+       (propertize
+        (concat
+         (doom-modeline-icon 'octicon "nf-oct-mark_github" "🔔" "&"
+                             :face 'doom-modeline-notification)
+         (and (> doom-modeline--github-notification-number 0) (doom-modeline-vspc))
+         (propertize
+          (cond
+           ((<= doom-modeline--github-notification-number 0) "")
+           ((> doom-modeline--github-notification-number 99) "99+")
+           (t (number-to-string doom-modeline--github-notification-number)))
+          'face '(:inherit
+                  (doom-modeline-unread-number doom-modeline-notification))))
+        'help-echo "Github Notifications
+mouse-1: Show notifications
+mouse-3: Fetch notifications"
+        'mouse-face 'doom-modeline-highlight
+        'local-map (let ((map (make-sparse-keymap)))
+                     (define-key map [mode-line mouse-1]
+                       (lambda ()
+                         "Open GitHub notifications page."
+                         (interactive)
+                         (run-with-idle-timer 300 nil #'doom-modeline--github-fetch-notifications)
+                         (browse-url "https://github.com/notifications")))
+                     (define-key map [mode-line mouse-3]
+                       (lambda ()
+                         "Fetching GitHub notifications."
+                         (interactive)
+                         (message "Fetching GitHub notifications...")
+                         (doom-modeline--github-fetch-notifications)))
+                     map))
+       sep))))
+
+
+;;
+;; Debug states
+;;
+
+;; Highlight the doom-modeline while debugging.
+(defvar-local doom-modeline--debug-cookie nil)
+(defun doom-modeline--debug-visual (&rest _)
+  "Update the face of mode-line for debugging."
+  (mapc (lambda (buffer)
+          (with-current-buffer buffer
+            (setq doom-modeline--debug-cookie
+                  (face-remap-add-relative 'doom-modeline 'doom-modeline-debug-visual))
+            (force-mode-line-update)))
+        (buffer-list)))
+
+(defun doom-modeline--normal-visual (&rest _)
+  "Restore the face of mode-line."
+  (mapc (lambda (buffer)
+          (with-current-buffer buffer
+            (when doom-modeline--debug-cookie
+              (face-remap-remove-relative doom-modeline--debug-cookie)
+              (force-mode-line-update))))
+        (buffer-list)))
+
+(add-hook 'dap-session-created-hook #'doom-modeline--debug-visual)
+(add-hook 'dap-terminated-hook #'doom-modeline--normal-visual)
+
+(defun doom-modeline-debug-icon (face)
+  "Display debug icon with FACE and ARGS."
+  (doom-modeline-icon 'codicon "nf-cod-debug" "🐛" "!" :face face))
+
+(defun doom-modeline--debug-dap ()
+  "The current `dap-mode' state."
+  (when (and (bound-and-true-p dap-mode)
+             (bound-and-true-p lsp-mode))
+    (when-let* ((session (dap--cur-session)))
+      (when (dap--session-running session)
+        (propertize (doom-modeline-debug-icon 'doom-modeline-info)
+                    'help-echo (format "DAP (%s - %s)
+mouse-1: Display debug hydra
+mouse-2: Display recent configurations
+mouse-3: Disconnect session"
+                                       (dap--debug-session-name session)
+                                       (dap--debug-session-state session))
+                    'mouse-face 'doom-modeline-highlight
+                    'local-map (let ((map (make-sparse-keymap)))
+                                 (define-key map [mode-line mouse-1] #'dap-hydra)
+                                 (define-key map [mode-line mouse-2] #'dap-debug-recent)
+                                 (define-key map [mode-line mouse-3] #'dap-disconnect)
+                                 map))))))
+
+(defvar-local doom-modeline--debug-dap nil)
+(defun doom-modeline-update-debug-dap (&rest _)
+  "Update dap debug state."
+  (setq doom-modeline--debug-dap (doom-modeline--debug-dap)))
+
+(add-hook 'dap-session-created-hook #'doom-modeline-update-debug-dap)
+(add-hook 'dap-session-changed-hook #'doom-modeline-update-debug-dap)
+(add-hook 'dap-terminated-hook #'doom-modeline-update-debug-dap)
+
+(defsubst doom-modeline--debug-edebug ()
+  "The current `edebug' state."
+  (when (bound-and-true-p edebug-mode)
+    (propertize (doom-modeline-debug-icon 'doom-modeline-info)
+                'help-echo (format "EDebug (%s)
+mouse-1: Show help
+mouse-2: Next
+mouse-3: Stop debugging"
+                                   edebug-execution-mode)
+                'mouse-face 'doom-modeline-highlight
+                'local-map (let ((map (make-sparse-keymap)))
+                             (define-key map [mode-line mouse-1]
+                               #'edebug-help)
+                             (define-key map [mode-line mouse-2]
+                               #'edebug-next-mode)
+                             (define-key map [mode-line mouse-3]
+                               #'edebug-stop)
+                             map))))
+
+(defsubst doom-modeline--debug-on-error ()
+  "The current `debug-on-error' state."
+  (when debug-on-error
+    (propertize (doom-modeline-debug-icon 'doom-modeline-urgent)
+                'help-echo "Debug on Error
+mouse-1: Toggle Debug on Error"
+                'mouse-face 'doom-modeline-highlight
+                'local-map (make-mode-line-mouse-map 'mouse-1 #'toggle-debug-on-error))))
+
+(defsubst doom-modeline--debug-on-quit ()
+  "The current `debug-on-quit' state."
+  (when debug-on-quit
+    (propertize (doom-modeline-debug-icon 'doom-modeline-warning)
+                'help-echo "Debug on Quit
+mouse-1: Toggle Debug on Quit"
+                'mouse-face 'doom-modeline-highlight
+                'local-map (make-mode-line-mouse-map 'mouse-1 #'toggle-debug-on-quit))))
+
+(doom-modeline-def-segment debug
+  "The current debug state."
+  (when (doom-modeline--segment-visible 'debug)
+    (let* ((dap doom-modeline--debug-dap)
+           (edebug (doom-modeline--debug-edebug))
+           (on-error (doom-modeline--debug-on-error))
+           (on-quit (doom-modeline--debug-on-quit))
+           (vsep (doom-modeline-vspc))
+           (sep (and (or dap edebug on-error on-quit) (doom-modeline-spc))))
+      (concat sep
+              (and dap (concat dap (and (or edebug on-error on-quit) vsep)))
+              (and edebug (concat edebug (and (or on-error on-quit) vsep)))
+              (and on-error (concat on-error (and on-quit vsep)))
+              on-quit
+              sep))))
+
+
+;;
+;; PDF pages
+;;
+
+(defvar-local doom-modeline--pdf-pages nil)
+(defun doom-modeline-update-pdf-pages ()
+  "Update PDF pages."
+  (setq doom-modeline--pdf-pages
+        (format "  P%d/%d "
+                (or (eval `(pdf-view-current-page)) 0)
+                (pdf-cache-number-of-pages))))
+(add-hook 'pdf-view-after-change-page-hook #'doom-modeline-update-pdf-pages)
+
+(doom-modeline-def-segment pdf-pages
+  "Display PDF pages."
+  doom-modeline--pdf-pages)
+
+
+;;
+;; Reader Pages
+;;
+
+(defvar-local doom-modeline--reader-pages nil)
+(defun doom-modeline-update-reader-pages ()
+  "Update Emacs Reader document pages."
+  (setq doom-modeline--reader-pages
+        (format "  P%d/P%d "
+                (or (eval `(reader-current-doc-pagenumber)) 0)
+                (or reader-current-doc-pagecount 0))))
+
+(add-hook 'reader-mode-hook
+          (lambda () (add-hook 'post-command-hook #'doom-modeline-update-reader-pages nil t)))
+
+(doom-modeline-def-segment reader-pages
+  "Display Emacs Reader document pages."
+  doom-modeline--reader-pages)
+
+;;
+;; `mu4e' notifications
+;;
+
+(doom-modeline-def-segment mu4e
+  "Show notifications of any unread emails in `mu4e'."
+  (when (and doom-modeline-mu4e
+             (doom-modeline--segment-visible 'mu4e))
+    (when-let* ((sep (doom-modeline-spc))
+                (vsep (doom-modeline-vspc))
+                (icon (doom-modeline-icon 'mdicon "nf-md-email" "📧" "#"
+                                          :face 'doom-modeline-notification))
+                (values (cond ((and (bound-and-true-p mu4e-alert-mode-line)
+                                    (numberp mu4e-alert-mode-line))
+                               `(,mu4e-alert-mode-line ,#'mu4e-alert-view-unread-mails))
+                              ((and (bound-and-true-p mu4e-modeline-mode)
+                                    (fboundp 'mu4e-bookmark-favorite))
+                               `(,(plist-get (mu4e-bookmark-favorite) :unread)
+                                 ,(lambda ()
+                                    (interactive)
+                                    (mu4e-search (plist-get (mu4e-bookmark-favorite) :query)))))))
+                (unread-count (nth 0 values))
+                (open-fun (nth 1 values)))
+      (when (> unread-count 0)
+        (concat
+         sep
+         (propertize
+          (concat
+           icon
+           vsep
+           (propertize
+            (if (> unread-count doom-modeline-number-limit)
+                (format "%d+" doom-modeline-number-limit)
+              (number-to-string unread-count))
+            'face '(:inherit
+                    (doom-modeline-unread-number doom-modeline-notification))))
+          'mouse-face 'doom-modeline-highlight
+          'keymap `(mode-line keymap
+                              (mouse-1 . ,open-fun)
+                              (mouse-2 . ,open-fun)
+                              (mouse-3 . ,open-fun))
+          'help-echo (concat (if (= unread-count 1)
+                                 "You have an unread email"
+                               (format "You have %s unread emails" unread-count))
+                             "\nClick here to view "
+                             (if (= unread-count 1) "it" "them")))
+         sep)))))
+
+(defun doom-modeline-override-mu4e-alert (&rest _)
+  "Delete `mu4e-alert-mode-line' from global modeline string."
+  (when (and (featurep 'mu4e-alert)
+             (bound-and-true-p mu4e-alert-mode-line))
+    (if (and doom-modeline-mu4e
+             (bound-and-true-p doom-modeline-mode))
+        ;; Delete original modeline
+        (progn
+          (setq global-mode-string
+                (delete '(:eval mu4e-alert-mode-line) global-mode-string))
+          (setq mu4e-alert-modeline-formatter #'identity))
+      ;; Recover default settings
+      (setq mu4e-alert-modeline-formatter #'mu4e-alert-default-mode-line-formatter))))
+(advice-add #'mu4e-alert-enable-mode-line-display
+            :after #'doom-modeline-override-mu4e-alert)
+(add-hook 'doom-modeline-mode-hook #'doom-modeline-override-mu4e-alert)
+
+(defun doom-modeline-override-mu4e-modeline (&rest _)
+  "Delete `mu4e-alert-mode-line' from global modeline string."
+  (when (bound-and-true-p mu4e-modeline-mode)
+    (if (and doom-modeline-mu4e
+             (bound-and-true-p doom-modeline-mode))
+        ;; Delete original modeline
+        (setq global-mode-string
+              (delete mu4e--modeline-item global-mode-string))
+      ;; Recover default settings
+      (add-to-list 'global-mode-string mu4e--modeline-item))))
+(add-hook 'mu4e-modeline-mode-hook #'doom-modeline-override-mu4e-modeline)
+(add-hook 'doom-modeline-mode-hook #'doom-modeline-override-mu4e-modeline)
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-mu4e
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-mu4e val)
+     (doom-modeline-override-mu4e-alert)
+     (doom-modeline-override-mu4e-modeline))))
+
+
+;;
+;; `gnus' notifications
+;;
+
+(defvar doom-modeline--gnus-unread-mail 0)
+(defvar doom-modeline--gnus-started nil
+  "Used to determine if gnus has started.")
+(defun doom-modeline-update-gnus-status (&rest _)
+  "Get the total number of unread news of gnus group."
+  (setq doom-modeline--gnus-unread-mail
+        (when (and doom-modeline-gnus
+                   doom-modeline--gnus-started)
+          (let ((total-unread-news-number 0))
+            (mapc (lambda (g)
+                    (let* ((group (car g))
+                           (unread (eval `(gnus-group-unread ,group))))
+                      (when (and (not (seq-contains-p doom-modeline-gnus-excluded-groups group))
+                                 (numberp unread)
+                                 (> unread 0))
+                        (setq total-unread-news-number (+ total-unread-news-number unread)))))
+                  gnus-newsrc-alist)
+            total-unread-news-number))))
+
+;; Update the modeline after changes have been made
+(add-hook 'gnus-group-update-hook #'doom-modeline-update-gnus-status)
+(add-hook 'gnus-summary-update-hook #'doom-modeline-update-gnus-status)
+(add-hook 'gnus-group-update-group-hook #'doom-modeline-update-gnus-status)
+(add-hook 'gnus-after-getting-new-news-hook #'doom-modeline-update-gnus-status)
+
+;; Only start to listen to gnus when gnus is actually running
+(defun doom-modeline-start-gnus-listener ()
+  "Start GNUS listener."
+  (when (and doom-modeline-gnus
+             (not doom-modeline--gnus-started))
+    (setq doom-modeline--gnus-started t)
+    ;; Scan gnus in the background if the timer is higher than 0
+    (doom-modeline-update-gnus-status)
+    (if (> doom-modeline-gnus-timer 0)
+        (gnus-demon-add-handler 'gnus-demon-scan-news doom-modeline-gnus-timer doom-modeline-gnus-idle))))
+(add-hook 'gnus-started-hook #'doom-modeline-start-gnus-listener)
+
+;; Stop the listener if gnus isn't running
+(defun doom-modeline-stop-gnus-listener ()
+  "Stop GNUS listener."
+  (setq doom-modeline--gnus-started nil))
+(add-hook 'gnus-exit-gnus-hook #'doom-modeline-stop-gnus-listener)
+
+(doom-modeline-def-segment gnus
+  "Show notifications of any unread emails in `gnus'."
+  (when (and (doom-modeline--segment-visible 'gnus)
+             doom-modeline-gnus
+             doom-modeline--gnus-started
+             ;; Don't display if the unread mails count is zero
+             (numberp doom-modeline--gnus-unread-mail)
+             (> doom-modeline--gnus-unread-mail 0))
+    (let ((sep (doom-modeline-spc))
+          (vsep (doom-modeline-vspc)))
+      (concat
+       sep
+       (propertize
+        (concat
+         (doom-modeline-icon 'mdicon "nf-md-email" "📧" "#"
+                             :face 'doom-modeline-notification)
+         vsep
+         (propertize
+          (if (> doom-modeline--gnus-unread-mail doom-modeline-number-limit)
+              (format "%d+" doom-modeline-number-limit)
+            (number-to-string doom-modeline--gnus-unread-mail))
+          'face '(:inherit
+                  (doom-modeline-unread-number doom-modeline-notification))))
+        'mouse-face 'doom-modeline-highlight
+        'help-echo (if (= doom-modeline--gnus-unread-mail 1)
+                       "You have an unread email"
+                     (format "You have %s unread emails" doom-modeline--gnus-unread-mail)))
+       sep))))
+
+
+;;
+;; IRC notifications
+;;
+
+(defun doom-modeline-shorten-irc (name)
+  "Shorten IRC buffer `name' according to IRC mode.
+
+Calls the mode specific function to return the shortened
+version of `NAME' if applicable:
+- Circe: `tracking-shorten'
+- ERC: `erc-track-shorten-function'
+- rcirc: `rcirc-shorten-buffer-name'
+
+The specific function will decide how to stylize the buffer name,
+read the individual functions documentation for more."
+  (or (and (fboundp 'tracking-shorten)
+           (car (tracking-shorten (list name))))
+      (and (boundp 'erc-track-shorten-function)
+           (functionp erc-track-shorten-function)
+	       (car (funcall erc-track-shorten-function (list name))))
+      (and (fboundp 'rcirc-short-buffer-name)
+           (rcirc-short-buffer-name name))
+      name))
+
+(defun doom-modeline--tracking-buffers (buffers)
+  "Logic to convert some irc BUFFERS to their font-awesome icon."
+  (mapconcat
+   (lambda (b)
+     (propertize
+      (funcall doom-modeline-irc-stylize b)
+      'face '(:inherit (doom-modeline-unread-number doom-modeline-notification))
+      'help-echo (format "IRC Notification: %s\nmouse-1: Switch to buffer" b)
+      'mouse-face 'doom-modeline-highlight
+      'local-map (make-mode-line-mouse-map
+                  'mouse-1
+                  (lambda ()
+                    (interactive)
+                    (when (buffer-live-p (get-buffer b))
+                      (switch-to-buffer b))))))
+   buffers
+   (doom-modeline-vspc)))
+
+(defun doom-modeline--circe-p ()
+  "Check if `circe' is in use."
+  (boundp 'tracking-mode-line-buffers))
+
+(defun doom-modeline--erc-p ()
+  "Check if `erc' is in use."
+  (boundp 'erc-modified-channels-alist))
+
+(defun doom-modeline--rcirc-p ()
+  "Check if `rcirc' is in use."
+  (bound-and-true-p rcirc-track-minor-mode))
+
+(defun doom-modeline--circe-mention-buffers ()
+  "Return filtered `circe' buffers.
+The return value is based on the variable `tracking-faces-priorities'."
+  (if doom-modeline-irc-priority-only
+      (seq-filter
+       (lambda (buf)
+         (memq (get-text-property 0 'face buf)
+               tracking-faces-priorities))
+       tracking-buffers)
+    tracking-buffers))
+
+(defun doom-modeline--rcirc-mention-buffers ()
+  "Return filtered `rcirc' buffers based on variable `rcirc-keywords'."
+  (if doom-modeline-irc-priority-only
+      (seq-filter
+       (lambda (buf)
+         (with-current-buffer buf
+           (memq 'keyword rcirc-activity-types)))
+       rcirc-activity)
+    rcirc-activity))
+
+(defun doom-modeline--get-buffers ()
+  "Gets the buffers that have activity."
+  (cond
+   ((doom-modeline--circe-p)
+    (doom-modeline--circe-mention-buffers))
+   ((doom-modeline--erc-p)
+    (mapcar (lambda (l)
+              (buffer-name (car l)))
+            erc-modified-channels-alist))
+   ((doom-modeline--rcirc-p)
+    (mapcar (lambda (b)
+              (buffer-name b))
+            (doom-modeline--rcirc-mention-buffers)))
+   ))
+
+;; Create a modeline segment that contains all the irc tracked buffers
+(doom-modeline-def-segment irc-buffers
+  "The list of shortened, unread irc buffers."
+  (when (and doom-modeline-irc
+             (doom-modeline--segment-visible 'irc-buffers))
+    (let* ((buffers (doom-modeline--get-buffers))
+           (number (length buffers))
+           (sep (doom-modeline-spc)))
+      (when (> number 0)
+        (concat
+         sep
+         (doom-modeline--tracking-buffers buffers)
+         sep)))))
+
+(doom-modeline-def-segment irc
+  "A notification icon for any unread irc buffer."
+  (when (and doom-modeline-irc
+             (doom-modeline--segment-visible 'irc))
+    (let* ((buffers (doom-modeline--get-buffers))
+           (number (length buffers))
+           (sep (doom-modeline-spc))
+           (vsep (doom-modeline-vspc)))
+      (when (> number 0)
+        (concat
+         sep
+
+         (propertize (concat
+                      (doom-modeline-icon 'mdicon "nf-md-message_processing" "🗊" "#"
+                                          :face 'doom-modeline-notification)
+                      vsep
+                      ;; Display the number of unread buffers
+                      (propertize (number-to-string number)
+                                  'face '(:inherit
+                                          (doom-modeline-unread-number
+                                           doom-modeline-notification))))
+                     'help-echo (format "IRC Notifications: %s\n%s"
+                                        (mapconcat
+                                         (lambda (b) (funcall doom-modeline-irc-stylize b))
+                                         buffers
+                                         ", ")
+                                        (cond
+                                         ((doom-modeline--circe-p)
+                                          "mouse-1: Switch to previous unread buffer
+mouse-3: Switch to next unread buffer")
+                                         ((doom-modeline--erc-p)
+                                          "mouse-1: Switch to buffer
+mouse-3: Switch to next unread buffer")
+                                         ((doom-modeline--rcirc-p)
+                                          "mouse-1: Switch to server buffer
+mouse-3: Switch to next unread buffer")))
+                     'mouse-face 'doom-modeline-highlight
+                     'local-map (let ((map (make-sparse-keymap)))
+                                  (cond
+                                   ((doom-modeline--circe-p)
+                                    (define-key map [mode-line mouse-1]
+                                      #'tracking-previous-buffer)
+                                    (define-key map [mode-line mouse-3]
+                                      #'tracking-next-buffer))
+                                   ((doom-modeline--erc-p)
+                                    (define-key map [mode-line mouse-1]
+                                      #'erc-switch-to-buffer)
+                                    (define-key map [mode-line mouse-3]
+                                      #'erc-track-switch-buffer))
+                                   ((doom-modeline--rcirc-p)
+                                    (define-key map [mode-line mouse-1]
+                                      #'rcirc-switch-to-server-buffer)
+                                    (define-key map [mode-line mouse-3]
+                                      #'rcirc-next-active-buffer)))
+                                  map))
+
+         ;; Display the unread irc buffers as well
+         (when doom-modeline-irc-buffers
+           (concat sep (doom-modeline--tracking-buffers buffers)))
+
+         sep)))))
+
+(defun doom-modeline-override-rcirc ()
+  "Override default `rcirc' mode-line."
+  (if (and doom-modeline-irc
+           (bound-and-true-p doom-modeline-mode))
+      (progn
+        (when (and rcirc-track-minor-mode
+                   (not (memq 'rcirc-activity-string doom-modeline-tab-bar-string)))
+          (setq doom-modeline-tab-bar-string
+                (append doom-modeline-tab-bar-string '(rcirc-activity-string))))
+        (setq global-mode-string
+              (delq 'rcirc-activity-string global-mode-string)))
+    (when (and rcirc-track-minor-mode
+               (not (memq 'rcirc-activity-string global-mode-string)))
+      (progn
+        (when (memq 'rcirc-activity-string doom-modeline-tab-bar-string)
+          (setq doom-modeline-tab-bar-string
+                (delq 'rcirc-activity-string doom-modeline-tab-bar-string)))
+        (setq global-mode-string
+              (append global-mode-string '(rcirc-activity-string)))))))
+(add-hook 'rcirc-track-minor-mode-hook #'doom-modeline-override-rcirc)
+(add-hook 'doom-modeline-mode-hook #'doom-modeline-override-rcirc)
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-irc
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-irc val)
+     (doom-modeline-override-rcirc))))
+
+
+;;
+;; Battery status
+;;
+
+(defun doom-modeline-battery-icon (icon unicode text face)
+  "Displays the battery ICON with FACE.
+
+UNICODE and TEXT are fallbacks.
+Uses `nerd-icons-mdicon' to fetch the icon."
+  (doom-modeline-icon 'mdicon icon unicode text :face face))
+
+(defvar doom-modeline--battery-status nil)
+(defun doom-modeline-update-battery-status ()
+  "Update battery status."
+  (setq doom-modeline--battery-status
+        (when (and doom-modeline-battery
+                   (bound-and-true-p display-battery-mode))
+          (let* ((data (and battery-status-function
+                            (funcall battery-status-function)))
+                 (status (cdr (assoc ?L data)))
+                 (charging? (or (string= "AC" status)
+                                (string= "on-line" status)))
+                 (percentage (car (read-from-string (or (cdr (assq ?p data)) "ERR"))))
+                 (valid-percentage? (and (numberp percentage)
+                                         (>= percentage 0)
+                                         (<= percentage battery-mode-line-limit)))
+                 (face (if valid-percentage?
+                           (cond (charging? 'doom-modeline-battery-charging)
+                                 ((< percentage battery-load-critical) 'doom-modeline-battery-critical)
+                                 ((< percentage 25) 'doom-modeline-battery-warning)
+                                 ((< percentage 95) 'doom-modeline-battery-normal)
+                                 (t 'doom-modeline-battery-full))
+                         'doom-modeline-battery-error))
+                 (icon (if valid-percentage?
+                           (cond
+                            ((>= percentage 100)
+                             (doom-modeline-battery-icon (if charging?
+                                                             "nf-md-battery_charging_100"
+                                                           "nf-md-battery")
+                                                         "🔋" "-" face))
+                            ((>= percentage 90)
+                             (doom-modeline-battery-icon (if charging?
+                                                             "nf-md-battery_charging_90"
+                                                           "nf-md-battery_90")
+                                                         "🔋" "-" face))
+                            ((>= percentage 80)
+                             (doom-modeline-battery-icon (if charging?
+                                                             "nf-md-battery_charging_80"
+                                                           "nf-md-battery_80")
+                                                         "🔋" "-" face))
+                            ((>= percentage 70)
+                             (doom-modeline-battery-icon (if charging?
+                                                             "nf-md-battery_charging_70"
+                                                           "nf-md-battery_70")
+                                                         "🔋" "-" face))
+                            ((>= percentage 60)
+                             (doom-modeline-battery-icon (if charging?
+                                                             "nf-md-battery_charging_60"
+                                                           "nf-md-battery_60")
+                                                         "🔋" "-" face))
+                            ((>= percentage 50)
+                             (doom-modeline-battery-icon (if charging?
+                                                             "nf-md-battery_charging_50"
+                                                           "nf-md-battery_50")
+                                                         "🔋" "-" face))
+                            ((>= percentage 40)
+                             (doom-modeline-battery-icon (if charging?
+                                                             "nf-md-battery_charging_40"
+                                                           "nf-md-battery_40")
+                                                         "🔋" "-" face))
+                            ((>= percentage 30)
+                             (doom-modeline-battery-icon (if charging?
+                                                             "nf-md-battery_charging_30"
+                                                           "nf-md-battery_30")
+                                                         "🔋" "-" face))
+                            ((>= percentage 20)
+                             (doom-modeline-battery-icon (if charging?
+                                                             "nf-md-battery_charging_20"
+                                                           "nf-md-battery_20")
+                                                         "🔋" "-" face))
+                            ((>= percentage 10)
+                             (doom-modeline-battery-icon (if charging?
+                                                             "nf-md-battery_charging_10"
+                                                           "nf-md-battery_10")
+                                                         "🪫" "-" face))
+                            (t (doom-modeline-battery-icon (if charging?
+                                                               "nf-md-battery_charging_outline"
+                                                             "nf-md-battery_outline")
+                                                           "🪫" "!" face)))
+                         (doom-modeline-battery-icon "nf-md-battery_alert" "⚠" "N/A" face)))
+                 (text (if valid-percentage? (format "%d%s" percentage "%%") ""))
+                 (help-echo (if (and battery-echo-area-format data valid-percentage?)
+                                (battery-format battery-echo-area-format data)
+                              "Battery status not available")))
+            (run-hook-with-args 'battery-update-functions data)
+            (cons (propertize icon 'help-echo help-echo)
+                  (propertize text 'face face 'help-echo help-echo)))))
+  (when doom-modeline--battery-status
+    (setq battery-mode-line-string (substring
+                                    (concat
+                                     (let* ((status (car doom-modeline--battery-status))
+                                            (substr (substring-no-properties status))
+                                            (char   (string-to-char substr)))
+                                       (unless (or (eq (char-displayable-p char) 'unicode)
+                                                   (null (char-displayable-p char)))
+                                         substr))
+                                     (substring-no-properties (cdr doom-modeline--battery-status)))
+                                    0 -1)))
+  (force-mode-line-update t))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-icon
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-icon val)
+     (doom-modeline-update-battery-status))))
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-unicode-fallback
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-unicode-fallback val)
+     (doom-modeline-update-battery-status))))
+
+(doom-modeline-def-segment battery
+  "Display battery status."
+  (when (and doom-modeline-battery
+             (bound-and-true-p display-battery-mode)
+             (doom-modeline--segment-visible 'battery))
+    (let ((sep (doom-modeline-spc))
+          (vsep (doom-modeline-vspc)))
+      (concat sep
+              (car doom-modeline--battery-status)
+              vsep
+              (cdr doom-modeline--battery-status)
+              sep))))
+
+(defun doom-modeline-override-battery ()
+  "Override default battery mode-line."
+  (if (and doom-modeline-battery
+           (bound-and-true-p doom-modeline-mode))
+      (progn
+        (advice-add #'battery-update :override #'doom-modeline-update-battery-status)
+        (when (not (memq 'battery-mode-line-string doom-modeline-tab-bar-string))
+          (setq doom-modeline-tab-bar-string
+                (append doom-modeline-tab-bar-string '(battery-mode-line-string))))
+        (setq global-mode-string
+	          (delq 'battery-mode-line-string global-mode-string))
+        (and (bound-and-true-p display-battery-mode) (battery-update)))
+    (progn
+      (advice-remove #'battery-update #'doom-modeline-update-battery-status)
+      (when (and display-battery-mode battery-status-function battery-mode-line-format
+                 (not (memq 'battery-mode-line-string global-mode-string)))
+        (progn
+          (when (memq 'battery-mode-line-string doom-modeline-tab-bar-string)
+            (setq doom-modeline-tab-bar-string
+                  (delq 'battery-mode-line-string doom-modeline-tab-bar-string)))
+          (setq global-mode-string
+		        (append global-mode-string '(battery-mode-line-string))))))))
+(add-hook 'display-battery-mode-hook #'doom-modeline-override-battery)
+(add-hook 'doom-modeline-mode-hook #'doom-modeline-override-battery)
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-battery
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-battery val)
+     (doom-modeline-override-battery))))
+
+
+;;
+;; Package information
+;;
+
+(doom-modeline-def-segment package
+  "Show package information."
+  (concat
+   (doom-modeline-display-text
+    (format-mode-line 'mode-line-front-space))
+
+   (when (and doom-modeline-icon doom-modeline-major-mode-icon)
+     (concat
+      (doom-modeline-spc)
+      (doom-modeline-icon 'faicon "nf-fa-archive" nil nil
+                          :face (doom-modeline-face
+                                 (if doom-modeline-major-mode-color-icon
+                                     'nerd-icons-silver
+                                   'mode-line)))
+      (doom-modeline-vspc)))
+   (doom-modeline-display-text
+    (format-mode-line 'mode-line-buffer-identification))))
+
+
+;;
+;; Helm
+;;
+
+(defvar doom-modeline--helm-buffer-ids
+  '(("*helm*" . "HELM")
+    ("*helm M-x*" . "HELM M-x")
+    ("*swiper*" . "SWIPER")
+    ("*Projectile Perspectives*" . "HELM Projectile Perspectives")
+    ("*Projectile Layouts*" . "HELM Projectile Layouts")
+    ("*helm-ag*" . (lambda ()
+                     (format "HELM Ag: Using %s"
+                             (car (split-string helm-ag-base-command))))))
+  "Alist of custom helm buffer names to use.
+The cdr can also be a function that returns a name to use.")
+
+(doom-modeline-def-segment helm-buffer-id
+  "Helm session identifier."
+  (when (bound-and-true-p helm-alive-p)
+    (let ((sep (doom-modeline-spc)))
+      (concat
+       sep
+       (when doom-modeline-icon
+         (concat
+          (doom-modeline-icon 'sucicon "nf-custom-emacs" nil nil
+                              :face (doom-modeline-face
+                                     (and doom-modeline-major-mode-color-icon
+                                          'nerd-icons-blue)))
+          sep))
+       (propertize
+        (let ((custom (cdr (assoc (buffer-name) doom-modeline--helm-buffer-ids)))
+              (case-fold-search t)
+              (name (replace-regexp-in-string "-" " " (buffer-name))))
+          (cond ((stringp custom) custom)
+                ((functionp custom) (funcall custom))
+                (t
+                 (string-match "\\*helm:? \\(mode \\)?\\([^\\*]+\\)\\*" name)
+                 (concat "HELM " (capitalize (match-string 2 name))))))
+        'face (doom-modeline-face 'doom-modeline-buffer-file))
+       sep))))
+
+(doom-modeline-def-segment helm-number
+  "Number of helm candidates."
+  (when (bound-and-true-p helm-alive-p)
+    (concat
+     (propertize (format " %d/%d"
+                         (helm-candidate-number-at-point)
+                         (helm-get-candidate-number t))
+                 'face (doom-modeline-face 'doom-modeline-buffer-path))
+     (propertize (format " (%d total) " (helm-get-candidate-number))
+                 'face (doom-modeline-face 'doom-modeline-info)))))
+
+(doom-modeline-def-segment helm-help
+  "Helm keybindings help."
+  (when (bound-and-true-p helm-alive-p)
+    (mapcar
+     (lambda (s)
+       (if (string-prefix-p "\\<" s)
+           (propertize (substitute-command-keys s)
+                       'face (doom-modeline-face
+                              'doom-modeline-buffer-file))
+         s))
+     '("\\<helm-map>\\[helm-help]" "(help) "
+       "\\<helm-map>\\[helm-select-action]" "(actions) "
+       "\\<helm-map>\\[helm-maybe-exit-minibuffer]/F1/F2..." "(action) "))))
+
+(doom-modeline-def-segment helm-prefix-argument
+  "Helm prefix argument."
+  (when (and (bound-and-true-p helm-alive-p)
+             helm--mode-line-display-prefarg)
+    (let ((arg (prefix-numeric-value (or prefix-arg current-prefix-arg))))
+      (unless (= arg 1)
+        (propertize (format "C-u %s" arg)
+                    'face (doom-modeline-face 'doom-modeline-info))))))
+
+(defvar doom-modeline--helm-current-source nil
+  "The currently active helm source.")
+(doom-modeline-def-segment helm-follow
+  "Helm follow indicator."
+  (and (bound-and-true-p helm-alive-p)
+       doom-modeline--helm-current-source
+       (eq 1 (cdr (assq 'follow doom-modeline--helm-current-source)))
+       "HF"))
+
+;;
+;; Git timemachine
+;;
+
+(doom-modeline-def-segment git-timemachine
+  (concat
+   (doom-modeline-spc)
+   (doom-modeline--buffer-mode-icon)
+   (doom-modeline--buffer-state-icon)
+   (format-mode-line mode-line-buffer-identification)))
+
+;;
+;; Markdown/Org preview
+;;
+
+(doom-modeline-def-segment grip
+  (when (bound-and-true-p grip-mode)
+    (let ((sep (doom-modeline-spc)))
+      (concat
+       sep
+       (let ((face (doom-modeline-face
+                    (if grip--process
+                        (pcase (process-status grip--process)
+                          ('run 'doom-modeline-info)
+                          ('exit 'doom-modeline-warning)
+                          (_ 'doom-modeline-urgent))
+                      'doom-modeline-urgent))))
+         (propertize
+          (doom-modeline-icon 'codicon "nf-cod-preview" "🗐" "@" :face face)
+          'help-echo (format "Preview on %s
+mouse-1: Preview in browser
+mouse-2: Stop preview
+mouse-3: Restart preview"
+                             (grip--preview-url))
+          'mouse-face 'doom-modeline-highlight
+          'local-map (let ((map (make-sparse-keymap)))
+                       (define-key map [mode-line mouse-1]
+                         #'grip-browse-preview)
+                       (define-key map [mode-line mouse-2]
+                         #'grip-stop-preview)
+                       (define-key map [mode-line mouse-3]
+                         #'grip-restart-preview)
+                       map)))
+       sep))))
+
+;;
+;; Follow mode
+;;
+
+(doom-modeline-def-segment follow
+  (when (bound-and-true-p follow-mode)
+    (let* ((windows (follow-all-followers))
+           (nwindows (length windows))
+           (nfollowing (- (length (memq (selected-window) windows)) 1)))
+      (concat
+       (doom-modeline-spc)
+       (propertize (format "Follow %d/%d" (- nwindows nfollowing) nwindows)
+                   'face 'doom-modeline-buffer-minor-mode)))))
+
+;;
+;; Display time
+;;
+
+(defconst doom-modeline--clock-hour-hand-ratio 0.45
+  "Length of the hour hand as a proportion of the radius.")
+
+(defconst doom-modeline--clock-minute-hand-ratio 0.7
+  "Length of the minute hand as a proportion of the radius.")
+
+(defun doom-modeline--create-clock-svg (hour minute radius color)
+  "Construct an SVG clock showing the time HOUR:MINUTE.
+The clock will be of the specified RADIUS and COLOR."
+  (let ((thickness-factor (image-compute-scaling-factor 'auto))
+        (hour-x (* radius (sin (* (- 6 hour (/ minute 60.0)) (/ float-pi 6)))
+                   doom-modeline--clock-hour-hand-ratio))
+        (hour-y (* radius (cos (* (- 6 hour (/ minute 60.0)) (/ float-pi 6)))
+                   doom-modeline--clock-hour-hand-ratio))
+        (minute-x (* radius (sin (* (- 30 minute) (/ float-pi 30)))
+                     doom-modeline--clock-minute-hand-ratio))
+        (minute-y (* radius (cos (* (- 30 minute) (/ float-pi 30)))
+                     doom-modeline--clock-minute-hand-ratio))
+        (svg (svg-create (* 2 radius) (* 2 radius) :stroke color)))
+    (svg-circle svg radius radius (- radius thickness-factor)
+                :fill "none" :stroke-width (* 2 thickness-factor))
+    (svg-circle svg radius radius thickness-factor
+                :fill color :stroke "none")
+    (svg-line svg radius radius (+ radius hour-x) (+ radius hour-y)
+              :stroke-width (* 2 thickness-factor))
+    (svg-line svg radius radius (+ radius minute-x) (+ radius minute-y)
+              :stroke-width (* 1.5 thickness-factor))
+    svg))
+
+(defvar doom-modeline--clock-cache nil
+  "The last result of `doom-modeline--generate-clock'.")
+
+(defun doom-modeline--generate-clock ()
+  "Return a string containing the current time as an analogue clock svg.
+When the svg library is not available, return nil."
+  (cdr
+   (or (and (equal (truncate (float-time)
+                             (* doom-modeline-time-clock-minute-resolution 60))
+                   (car doom-modeline--clock-cache))
+            doom-modeline--clock-cache)
+       (and (require 'svg nil t)
+            (setq doom-modeline--clock-cache
+                  (cons (truncate (float-time)
+                                  (* doom-modeline-time-clock-minute-resolution 60))
+                        (propertize
+                         " "
+                         'display
+                         (svg-image
+                          (doom-modeline--create-clock-svg
+                           (string-to-number (format-time-string "%-I")) ; hour
+                           (* (truncate (string-to-number (format-time-string "%-M"))
+                                        doom-modeline-time-clock-minute-resolution)
+                              doom-modeline-time-clock-minute-resolution) ; minute
+                           (if (integerp doom-modeline-time-clock-size) ; radius
+                               doom-modeline-time-clock-size
+                             (* doom-modeline-height 0.5 doom-modeline-time-clock-size))
+                           "currentColor")
+                          :scale 1 :ascent 'center)
+                         'face 'doom-modeline-time
+                         'help-echo (lambda (_window _object _pos)
+                                      (format-time-string "%c")))))))))
+
+(defun doom-modeline-time-icon ()
+  "Displays the time icon."
+  (or (and doom-modeline-time-live-icon
+           doom-modeline-time-analogue-clock
+           (display-graphic-p)
+           (doom-modeline--generate-clock))
+      (doom-modeline-icon
+       'mdicon
+       (if doom-modeline-time-live-icon
+           (pcase (% (caddr (decode-time)) 12)
+             (0 "nf-md-clock_time_twelve_outline")
+             (1 "nf-md-clock_time_one_outline")
+             (2 "nf-md-clock_time_two_outline")
+             (3 "nf-md-clock_time_three_outline")
+             (4 "nf-md-clock_time_four_outline")
+             (5 "nf-md-clock_time_five_outline")
+             (6 "nf-md-clock_time_six_outline")
+             (7 "nf-md-clock_time_seven_outline")
+             (8 "nf-md-clock_time_eight_outline")
+             (9 "nf-md-clock_time_nine_outline")
+             (10 "nf-md-clock_time_ten_outline")
+             (11 "nf-md-clock_time_eleven_outline"))
+         "nf-md-clock_outline")
+       "⏰"
+       ""
+       :face '(:inherit doom-modeline-time :weight normal))))
+
+(doom-modeline-def-segment time
+  (when (and doom-modeline-time
+             (bound-and-true-p display-time-mode)
+             (doom-modeline--segment-visible 'time))
+    (concat
+     (doom-modeline-spc)
+     (when doom-modeline-time-icon
+       (concat
+        (doom-modeline-time-icon)
+        (and (or doom-modeline-icon doom-modeline-unicode-fallback)
+             (doom-modeline-vspc))))
+     (propertize display-time-string
+                 'face (doom-modeline-face 'doom-modeline-time)))))
+
+(defun doom-modeline-override-time ()
+  "Override default `display-time' mode-line."
+  (or global-mode-string (setq global-mode-string '("")))
+  (if (and doom-modeline-time
+           (bound-and-true-p doom-modeline-mode))
+      (progn
+        (when (not (memq 'display-time-string doom-modeline-tab-bar-string))
+          (setq doom-modeline-tab-bar-string
+                (append doom-modeline-tab-bar-string '(display-time-string))))
+        (setq global-mode-string
+              (delq 'display-time-string global-mode-string))
+        )
+    (or (memq 'display-time-string global-mode-string)
+        (progn
+          (when (memq 'display-time-string doom-modeline-tab-bar-string)
+            (setq doom-modeline-tab-bar-string
+                  (delq 'display-time-string doom-modeline-tab-bar-string)))
+	      (setq global-mode-string
+		        (append global-mode-string '(display-time-string)))))))
+(add-hook 'display-time-mode-hook #'doom-modeline-override-time)
+(add-hook 'doom-modeline-mode-hook #'doom-modeline-override-time)
+
+(doom-modeline-add-variable-watcher
+ 'doom-modeline-time
+ (lambda (_sym val op _where)
+   (when (eq op 'set)
+     (setq doom-modeline-time val)
+     (doom-modeline-override-time))))
+
+;;
+;; Compilation
+;;
+
+(doom-modeline-def-segment compilation
+  (and (bound-and-true-p compilation-in-progress)
+       (propertize "[Compiling] "
+                   'face (doom-modeline-face 'doom-modeline-compilation)
+	               'help-echo "Compiling; mouse-2: Goto Buffer"
+                   'mouse-face 'doom-modeline-highlight
+                   'local-map
+                   (make-mode-line-mouse-map
+                    'mouse-2
+                    #'compilation-goto-in-progress-buffer))))
+
+;;
+;; Eldoc
+;;
+
+(doom-modeline-def-segment eldoc
+  (and (bound-and-true-p eldoc-mode)
+       '(eldoc-mode-line-string
+		 (" " eldoc-mode-line-string " "))))
+
+(defun doom-modeline-eldoc-minibuffer-message (format-string &rest args)
+  "Display message specified by FORMAT-STRING and ARGS on the mode-line as needed.
+This function displays the message produced by formatting ARGS
+with FORMAT-STRING on the mode line when the current buffer is a minibuffer.
+Otherwise, it displays the message like `message' would."
+  (if (minibufferp)
+      (progn
+	    (add-hook 'minibuffer-exit-hook
+		          (lambda () (setq eldoc-mode-line-string nil
+			                       ;; https://debbugs.gnu.org/16920
+			                       eldoc-last-message nil))
+		          nil t)
+	    (with-current-buffer
+	        (window-buffer
+	         (or (window-in-direction 'above (minibuffer-window))
+                 (minibuffer-selected-window)
+		         (get-largest-window)))
+          (setq eldoc-mode-line-string
+                (when (stringp format-string)
+                  (apply #'format-message format-string args)))
+          (force-mode-line-update)))
+    (apply #'message format-string args)))
+
+;;
+;; Speedbar
+;;
+
+(doom-modeline-def-segment speedbar-info
+  (concat
+   (propertize "%l"
+               'face (doom-modeline-face)
+               'mouse-face 'doom-modeline-highlight)
+   (doom-modeline-spc)))
+
+;;
+;; Kubernetes
+;;
+
+(doom-modeline-def-segment k8s
+  (when (and (bound-and-true-p kele-mode) (doom-modeline--segment-visible 'k8s))
+    (let* ((ctx (kele-current-context-name :wait nil))
+           (ns (kele-current-namespace :wait nil))
+           (icon (doom-modeline-icon 'mdicon "nf-md-kubernetes" "K8s:" "K8s:"))
+           (sep (doom-modeline-spc))
+           (help-msg (let ((msgs (list (format "Current context: %s" ctx))))
+                       (when ns
+                         (setq msgs (append msgs (list (format "Current namespace: %s" ns)))))
+                       (string-join msgs "\n"))))
+      (propertize (concat
+                   icon sep ctx
+                   (when (and doom-modeline-k8s-show-namespace ns) (format "(%s)" ns))
+                   sep)
+                  'local-map (let ((map (make-sparse-keymap)))
+                               (define-key map [mode-line down-mouse-1] kele-menu-map)
+                               map)
+                  'mouse-face 'doom-modeline-highlight
+                  'help-echo help-msg))))
+
+(provide 'doom-modeline-segments)
+
+;;; doom-modeline-segments.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-segments.elc b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-segments.elc
new file mode 100644
index 0000000..752b89b
Binary files /dev/null and b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline-segments.elc differ
diff --git a/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline.el b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline.el
new file mode 100644
index 0000000..9895748
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline.el
@@ -0,0 +1,318 @@
+;;; doom-modeline.el --- A minimal and modern mode-line -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2018-2026 Vincent Zhang
+
+;; Author: Vincent Zhang <seagle0128@gmail.com>
+;; Homepage: https://github.com/seagle0128/doom-modeline
+;; Package-Version: 20260805.643
+;; Package-Revision: 2d6828870bce
+;; Package-Requires: ((emacs "25.1") (compat "30.1.0.0") (nerd-icons "0.1.0") (shrink-path "0.3.1"))
+;; Keywords: faces mode-line
+
+;; This file is not part of GNU Emacs.
+
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+
+;;; Commentary:
+;;
+;; This package offers a fancy and fast mode-line inspired by minimalism design.
+;;
+;; It's integrated into Doom Emacs (https://github.com/hlissner/doom-emacs) and
+;; Centaur Emacs (https://github.com/seagle0128/.emacs.d).
+;;
+;; The doom-modeline offers:
+;; - A match count panel (for anzu, iedit, multiple-cursors, symbol-overlay,
+;;   evil-search and evil-substitute)
+;; - An indicator for recording a macro
+;; - Current environment version (e.g. python, ruby, go, etc.) in the major-mode
+;; - A customizable mode-line height (see doom-modeline-height)
+;; - A minor modes segment which is compatible with minions
+;; - An error/warning count segment for flymake/flycheck
+;; - A workspace name segment for eyebrowse/tab-bar
+;; - A perspective name segment for persp-mode
+;; - A window number segment for winum and window-numbering
+;; - An indicator for modal editing state, including evil, overwrite, god, ryo
+;;   and xah-fly-keys, etc.
+;; - An indicator for battery status
+;; - An indicator for current input method
+;; - An indicator for debug state
+;; - An indicator for remote host
+;; - An indicator for LSP state with lsp-mode or eglot
+;; - An indicator for github notifications
+;; - An indicator for unread emails with mu4e-alert
+;; - An indicator for unread emails with gnus (basically builtin)
+;; - An indicator for irc notifications with circe, rcirc or erc.
+;; - An indicator for buffer position which is compatible with nyan-mode or poke-line
+;; - An indicator for party parrot
+;; - An indicator for PDF page number with pdf-tools
+;; - An indicator for markdown/org previews with grip
+;; - Truncated file name, file icon, buffer state and project name in buffer
+;;   information segment, which is compatible with project, find-file-in-project
+;;   and projectile
+;; - New mode-line for Info-mode buffers
+;; - New package mode-line for paradox
+;; - New mode-line for helm buffers
+;; - New mode-line for git-timemachine buffers
+;;
+;; Installation:
+;; From melpa, `M-x package-install RET doom-modeline RET`.
+;; In `init.el`,
+;; (require 'doom-modeline)
+;; (doom-modeline-mode 1)
+;; or
+;; (use-package doom-modeline
+;;   :ensure t
+;;   :init (doom-modeline-mode 1))
+;;
+
+;;; Code:
+
+(require 'doom-modeline-core)
+(require 'doom-modeline-segments)
+
+
+;;
+;; Mode lines
+;;
+
+(doom-modeline-def-modeline 'main
+  '(eldoc bar window-state workspace-name window-number modals matches follow buffer-info remote-host buffer-position word-count parrot selection-info)
+  '(compilation objed-state misc-info project-name persp-name battery grip irc mu4e gnus github debug repl lsp minor-modes input-method indent-info buffer-encoding major-mode process vcs check time))
+
+(doom-modeline-def-modeline 'minimal
+  '(bar window-number modals matches buffer-info-simple)
+  '(media-info major-mode time))
+
+(doom-modeline-def-modeline 'special
+  '(eldoc bar window-state window-number modals matches buffer-info remote-host buffer-position word-count parrot selection-info)
+  '(compilation objed-state misc-info battery irc-buffers debug minor-modes input-method indent-info buffer-encoding major-mode process time))
+
+(doom-modeline-def-modeline 'project
+  '(bar window-number modals buffer-default-directory remote-host buffer-position)
+  '(compilation misc-info battery irc mu4e gnus github debug minor-modes input-method major-mode process time))
+
+(doom-modeline-def-modeline 'dashboard
+  '(bar window-number modals buffer-default-directory-simple remote-host)
+  '(compilation misc-info battery irc mu4e gnus github debug minor-modes input-method major-mode process time))
+
+(doom-modeline-def-modeline 'vcs
+  '(bar window-state window-number modals matches buffer-info remote-host buffer-position parrot selection-info)
+  '(compilation misc-info battery irc mu4e gnus github debug minor-modes buffer-encoding major-mode process time))
+
+(doom-modeline-def-modeline 'package
+  '(bar window-number modals matches package buffer-position parrot)
+  '(compilation misc-info major-mode process time))
+
+(doom-modeline-def-modeline 'info
+  '(bar window-number modals matches buffer-info info-nodes buffer-position parrot selection-info)
+  '(compilation misc-info buffer-encoding major-mode time))
+
+(doom-modeline-def-modeline 'media
+  '(bar window-number modals buffer-size buffer-info)
+  '(compilation misc-info media-info major-mode process vcs time))
+
+(doom-modeline-def-modeline 'message
+  '(eldoc bar window-state window-number modals matches buffer-info-simple buffer-position word-count parrot selection-info)
+  '(compilation objed-state misc-info battery debug minor-modes input-method indent-info buffer-encoding major-mode time))
+
+(doom-modeline-def-modeline 'pdf
+  '(bar window-number modals matches buffer-info pdf-pages reader-pages)
+  '(compilation misc-info major-mode process vcs time))
+
+(doom-modeline-def-modeline 'org-src
+  '(eldoc bar window-state window-number modals matches buffer-info buffer-position word-count parrot selection-info)
+  '(compilation objed-state misc-info debug lsp minor-modes input-method indent-info buffer-encoding major-mode process check time))
+
+(doom-modeline-def-modeline 'helm
+  '(bar helm-buffer-id helm-number helm-follow helm-prefix-argument)
+  '(helm-help time))
+
+(doom-modeline-def-modeline 'git-timemachine
+  '(eldoc bar window-number modals matches git-timemachine buffer-position word-count parrot selection-info)
+  '(misc-info minor-modes indent-info buffer-encoding major-mode time))
+
+(doom-modeline-def-modeline 'calculator
+  '(window-number modals matches calc buffer-position)
+  '(misc-info minor-modes major-mode process))
+
+(doom-modeline-def-modeline 'speedbar
+  '(bar " " major-mode)
+  '(speedbar-info))
+
+
+;;
+;; Interfaces
+;;
+
+;;;###autoload
+(defun doom-modeline-set-main-modeline (&optional default)
+  "Set main mode-line.
+If DEFAULT is non-nil, set the default mode-line for all buffers."
+  (doom-modeline-set-modeline 'main default))
+
+
+;;
+;; Minor mode
+;;
+
+;; Suppress warnings
+(defvar 2C-mode-line-format)
+(defvar flymake-mode-line-format)
+(defvar helm-ag-show-status-function)
+(defvar speedbar-buffer)
+(declare-function helm-display-mode-line "ext:helm-core")
+(declare-function speedbar-set-mode-line-format "speedbar")
+
+(defvar doom-modeline-mode-map (make-sparse-keymap))
+
+(defvar doom-modeline-mode-alist
+  '((message-mode         . message)
+    (git-commit-mode      . message)
+    (magit-mode           . vcs)
+    (dashboard-mode       . dashboard)
+    (Info-mode            . info)
+    (image-mode           . media)
+    (pdf-view-mode        . pdf)
+    (reader-mode          . pdf)
+    (org-src-mode         . org-src)
+    (package-menu-mode    . package)
+    (paradox-menu-mode    . package)
+    (xwidget-webkit-mode  . minimal)
+    (calc-mode            . calculator)
+    (calc-trail-mode      . calculator)
+    (circe-mode           . special)
+    (erc-mode             . special)
+    (rcirc-mode           . special)
+    (speedbar-mode        . speedbar))
+  "Alist of major modes and mode-lines.")
+
+(defun doom-modeline-auto-set-modeline ()
+  "Set mode-line base on major-mode."
+  (catch 'found
+    (dolist (x doom-modeline-mode-alist)
+      (when (derived-mode-p (car x))
+        (doom-modeline-set-modeline (cdr x))
+        (throw 'found x)))))
+
+(defun doom-modeline-set-speebar-modeline (&rest _)
+  "Set speedbar mode-line."
+  (when (and (bound-and-true-p speedbar-buffer)
+             (buffer-live-p speedbar-buffer))
+    (with-current-buffer speedbar-buffer
+      (doom-modeline-set-modeline 'speedbar))))
+
+(defun doom-modeline-set-git-timemachine-modeline (&rest _)
+  "Set `git-timmachie' mode-line."
+  (doom-modeline-set-modeline 'git-timemachine))
+
+(defun doom-modeline-set-helm-modeline (&rest _)
+  "Set `helm' mode-line."
+  (doom-modeline-set-modeline 'helm))
+
+;;;###autoload
+(define-minor-mode doom-modeline-mode
+  "Toggle `doom-modeline' on or off."
+  :group 'doom-modeline
+  :global t
+  :lighter nil
+  :keymap doom-modeline-mode-map
+  (if doom-modeline-mode
+      (progn
+        (doom-modeline-refresh-bars)        ; Create bars
+        (doom-modeline-set-main-modeline t) ; Set default mode-line
+
+        ;; Apply to all existing buffers.
+        (dolist (buf (buffer-list))
+          (with-current-buffer buf
+            (when (and mode-line-format
+                       (not (doom-modeline-auto-set-modeline)))
+              (doom-modeline-set-main-modeline))))
+
+        ;; For flymake
+        (setq flymake-mode-line-format nil) ; remove the lighter of minor mode
+
+        ;; For Eldoc
+        (setq eldoc-message-function #'doom-modeline-eldoc-minibuffer-message)
+
+        ;; For two-column editing
+        (setq 2C-mode-line-format (doom-modeline 'special))
+
+        ;; For window
+        (if (boundp 'after-focus-change-function)
+            (add-function :after after-focus-change-function #'doom-modeline-focus-change)
+          (with-no-warnings
+            (add-hook 'focus-in-hook #'doom-modeline-set-selected-window)
+            (add-hook 'focus-out-hook #'doom-modeline-unset-selected-window)))
+        (add-hook 'window-selection-change-functions #'doom-modeline-set-selected-window)
+
+        ;; Automatically set mode-lines
+        (add-hook 'after-change-major-mode-hook #'doom-modeline-auto-set-modeline)
+
+        ;; Setup font height cache
+        (add-hook 'after-setting-font-hook #'doom-modeline--reset-font-height-cache)
+
+        ;; Special handles
+        (advice-add #'speedbar-set-mode-line-format :override #'doom-modeline-set-speebar-modeline)
+
+        (add-hook 'git-timemachine-mode-hook #'doom-modeline-set-git-timemachine-modeline)
+
+        (advice-add #'helm-display-mode-line :after #'doom-modeline-set-helm-modeline)
+        (setq helm-ag-show-status-function #'doom-modeline-set-helm-modeline))
+    (progn
+      ;; Restore mode-line
+      (let ((original-format (doom-modeline--original-value 'mode-line-format)))
+        (setq-default mode-line-format original-format)
+        (dolist (buf (buffer-list))
+          (with-current-buffer buf
+            (when mode-line-format
+              (setq mode-line-format original-format)))))
+
+      ;; For flymake
+      (setq flymake-mode-line-format (doom-modeline--original-value 'flymake-mode-line-format))
+
+      ;; For Eldoc
+      (setq eldoc-message-function #'eldoc-minibuffer-message)
+
+      ;; For two-column editing
+      (setq 2C-mode-line-format (doom-modeline--original-value '2C-mode-line-format))
+
+      ;; Cleanup
+      ;; For window
+      (if (boundp 'after-focus-change-function)
+          (remove-function after-focus-change-function #'doom-modeline-focus-change)
+        (with-no-warnings
+          (remove-hook 'focus-in-hook #'doom-modeline-set-selected-window)
+          (remove-hook 'focus-out-hook #'doom-modeline-unset-selected-window)))
+      (remove-hook 'window-selection-change-functions #'doom-modeline-set-selected-window)
+
+      ;; For major modes
+      (remove-hook 'after-change-major-mode-hook #'doom-modeline-auto-set-modeline)
+
+      ;; For font height cache
+      (remove-hook 'after-setting-font-hook #'doom-modeline--reset-font-height-cache)
+
+      ;; For special handles
+      (advice-remove #'speedbar-set-mode-line-format #'doom-modeline-set-speebar-modeline)
+      (and (fboundp 'speedbar-set-mode-line-format) (speedbar-set-mode-line-format)) ; reset speedbar
+
+      (remove-hook 'git-timemachine-mode-hook #'doom-modeline-set-git-timemachine-modeline)
+
+      (advice-remove #'helm-display-mode-line #'doom-modeline-set-helm-modeline)
+      (setq helm-ag-show-status-function (default-value 'helm-ag-show-status-function)))))
+
+(provide 'doom-modeline)
+
+;;; doom-modeline.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline.elc b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline.elc
new file mode 100644
index 0000000..12ceda7
Binary files /dev/null and b/emacs/.emacs.d/elpa/doom-modeline-20260805.643/doom-modeline.elc differ
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-1337-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-1337-theme.el
new file mode 100644
index 0000000..67654cd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-1337-theme.el
@@ -0,0 +1,210 @@
+;;; doom-1337-theme.el --- ported from VSCode's 1337 theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 22, 2021 (#545)
+;; Author: ccmywish <https://github.com/ccmywish>
+;; Maintainer:
+;; Source: https://github.com/microsoft/vscode-themes/tree/main/1337
+;; Source: https://github.com/MarkMichos/1337-Scheme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-1337-theme nil
+  "Options for the doom-1337 theme."
+  :group 'doom-themes)
+
+(defcustom doom-1337-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-1337-theme
+  :type '(choice integer boolean))
+
+(defcustom doom-1337-blue-modeline nil
+  "If non-nil, mode-line's color will be blue instead of the default purple."
+  :group 'doom-1337-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-1337
+  "A dark theme inspired by 1337 Theme."
+
+  ;; name        default   256       16
+  ((bg         '("#191919" "#191919" nil))
+   (bg-alt     '("#252526" "#222222"  nil))
+   (base0      '("#171F24" "#111122"   "black"))
+   (base1      '("#1C1C1C" "#1C1C1C" "brightblack"))
+   (base2      '("#121212" "#626262" "brightblack"))
+   (base3      '("#3D3D3D" "#3D3D3D" "brightblack"))
+   (base4      '("#4b474c" "#444444" "brightblack"))
+   (base5      '("#515151" "#515151" "brightblack"))
+   (base6      '("#6D6D6D" "#6D6D6D" "brightblack"))
+   (base7      '("#777778" "#767676" "brightblack"))
+   (base8      '("#f4f4f4" "#a8a8a8" "white"))
+   (fg         '("#d4d4d4" "#d4d4d4" "brightwhite"))
+   (fg-alt     '("#AEAFAD" "#bcbcbc" "white"))
+
+   (grey base7)
+   (white        '("#FFFFFF" "#FFFFFF" "white"))
+   (red          '("#FF5E5E" "#FF5E5E" "red"))
+   (orange       '("#FC9354" "#FC9354" "brightred"))
+   (green        '("#468800" "#468800" "green"))
+   (light-green  '("#B5CEA8" "#BBCCAA" "green"))
+   (teal         '("#35CDAF" "#33CCAA" "brightgreen"))
+   (yellow       '("#E9FDAC" "#E9FDAC" "brightyellow"))
+   (light-yellow '("#FBE3BF" "#FBE3BF" "brightyellow"))
+   (blue         '("#8CDAFF" "#8CDAFF" "brightblue"))
+   (dark-blue    '("#6699CC" "#6699CC" "blue"))
+   (magenta      '("#C586C0" "#CC88CC" "brightmagenta"))
+   (violet       '("#BB80B3" "#BB88BB" "magenta"))
+   (dark-violet  '("#68217A" "#662277" "magenta"))
+   (cyan         '("#85DDFF" "#5FD7FF" "brightcyan"))
+   (dark-cyan    '("#207FA1" "#2277AA" "cyan"))
+
+   ;; component focused
+   (bottomline-blue '("#2467D0" "#2467D0" "blue"))
+   (vcmodified-blue '("#007B9F" "#007B9F" "blue"))
+   (vcdeleted-red '("#9D0012" "#9D0012" "red"))
+
+   ;; face categories -- required for all themes
+   (highlight      white)
+   (vertical-bar   base2)
+   (selection      base5)
+   (builtin        dark-blue)
+   (comments       base6)
+   (doc-comments   base6)
+   (constants      orange)
+   (functions      blue)
+   (keywords       red)
+   (methods        dark-blue)
+   (operators      red)
+   (type           yellow)
+   (strings        light-yellow)
+   (variables      yellow)
+   (numbers        orange)
+   (region         (doom-darken base5 0.5))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    vcmodified-blue)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (modeline-bg     (if doom-1337-blue-modeline base8 bottomline-blue))
+   (modeline-bg-alt (doom-darken bg 0.01))
+   (modeline-fg     base8)
+   (modeline-fg-alt blue)
+
+   (-modeline-pad
+    (when doom-1337-padded-modeline
+      (if (integerp doom-1337-padded-modeline) doom-1337-padded-modeline 4))))
+
+  ;;;; Base theme face overrides
+  (((highlight &override) :foreground base0)
+   (lazy-highlight :background base4 :foreground fg :weight 'bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (tooltip :background base2 :foreground fg)
+
+   ;;;; all-the-icons
+   (all-the-icons-dblue    :foreground bottomline-blue)
+   ;;;; man <built-in>
+   (Man-overstrike :inherit 'bold :foreground magenta)
+   (Man-underline :inherit 'underline :foreground blue)
+   ;;;; centaur-tabs
+   (centaur-tabs-active-bar-face :background base6)
+   (centaur-tabs-selected-modified
+    :inherit 'centaur-tabs-selected :foreground fg :weight 'bold)
+   (centaur-tabs-unselected-modified
+    :inherit 'centaur-tabs-unselected :foreground fg :weight 'bold)
+   (centaur-tabs-modified-marker-selected
+    :inherit 'centaur-tabs-selected :foreground fg)
+   (centaur-tabs-modified-marker-unselected
+    :inherit 'centaur-tabs-unselected :foreground fg)
+   ;;;; company
+   (company-tooltip-selection     :background region)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; dashboard
+   (dashboard-heading :foreground green :weight 'bold)
+   ;;;; dired-k
+   (dired-k-commited :foreground base4)
+   (dired-k-modified :foreground vc-modified)
+   (dired-k-ignored :foreground cyan)
+   (dired-k-added    :foreground vc-added)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if doom-1337-blue-modeline base8 bottomline-blue))
+   (doom-modeline-buffer-file :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path)
+   (doom-modeline-buffer-minor-mode :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-modified :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :inherit 'mode-line-emphasis)
+   (doom-modeline-debug :inherit 'mode-line-emphasis)
+   (doom-modeline-evil-insert-state :foreground cyan)
+   (doom-modeline-evil-visual-state :foreground yellow)
+   (doom-modeline-info :inherit 'mode-line-emphasis)
+   (doom-modeline-lsp-success :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-persp-name :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-project-dir :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-project-parent-dir :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-urgent :inherit 'mode-line-emphasis)
+   (doom-modeline-warning :inherit 'mode-line-emphasis)
+   ;;;; doom-themes
+   (doom-themes-treemacs-root-face :foreground fg :weight 'ultra-bold :height 1.2)
+   (doom-themes-treemacs-file-face :foreground fg)
+   ;;;; ivy
+   (counsel-active-mode :foreground (doom-lighten base6 0.1))
+   (ivy-current-match :background bg-alt)
+   (ivy-minibuffer-match-face-2 :foreground (doom-lighten base6 0.1) :weight 'extra-bold)
+   ;;;; js2-mode
+   (js2-jsdoc-tag              :foreground magenta)
+   (js2-object-property        :foreground cyan)
+   (js2-object-property-access :foreground cyan)
+   (js2-function-param         :foreground violet)
+   (js2-jsdoc-type             :foreground base8)
+   (js2-jsdoc-value            :foreground cyan)
+   ;;;; lsp-mode
+   (lsp-lens-face              :foreground base7 :height 0.8)
+   ;;;; org <built-in>
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;; org-pomodoro
+   (org-pomodoro-mode-line :inherit 'mode-line-emphasis) ; unreadable otherwise
+   (org-pomodoro-mode-line-overtime :inherit 'org-pomodoro-mode-line)
+   (org-pomodoro-mode-line-break :inherit 'org-pomodoro-mode-line)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground magenta)
+   (rainbow-delimiters-depth-2-face :foreground orange)
+   (rainbow-delimiters-depth-3-face :foreground green)
+   (rainbow-delimiters-depth-4-face :foreground cyan)
+   (rainbow-delimiters-depth-5-face :foreground violet)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground blue)
+   (rainbow-delimiters-depth-8-face :foreground teal)
+   (rainbow-delimiters-depth-9-face :foreground dark-cyan)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground blue)
+   (rjsx-attr :foreground cyan :slant 'italic :weight 'medium)
+   ;;;; treemacs
+   (treemacs-root-face :foreground fg :weight 'ultra-bold :height 1.2)
+   (treemacs-directory-face :foreground fg)
+   (treemacs-git-modified-face :foreground blue)))
+
+;;; doom-1337-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-Iosvkem-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-Iosvkem-theme.el
new file mode 100644
index 0000000..f1d633d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-Iosvkem-theme.el
@@ -0,0 +1,211 @@
+;;; doom-Iosvkem-theme.el --- ported from the default dark theme for Adobe Brackets -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: September 12, 2018 (#220)
+;; Author: neutaaaaan <https://github.com/neutaaaaan>
+;; Maintainer:
+;; Source: https://github.com/neutaaaaan/iosvkem
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-Iosvkem-theme nil
+  "Options for the `doom-theme.el' theme."
+  :group 'doom-themes)
+
+(defcustom doom-Iosvkem-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-Iosvkem-theme
+  :type 'boolean)
+
+(defcustom doom-Iosvkem-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-Iosvkem-theme
+  :type 'boolean)
+
+(defcustom doom-Iosvkem-comment-bg doom-Iosvkem-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-Iosvkem-theme
+  :type 'boolean)
+
+(defcustom doom-Iosvkem-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-Iosvkem-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-Iosvkem
+  "A dark theme inspired by VIM Iosvkem"
+
+  ;; name        default   256       16
+  ((bg         '("#1b1d1e" "#1b1d1e" nil))
+   (bg-alt     '("#262829" "#262829" nil))
+   (base0      '("#1b1d1e" "#1b1d1e" "black"))
+   (base1      '("#202020" "#202020" "brightblack"))
+   (base2      '("#303030" "#303030" "brightblack"))
+   (base3      '("#303030" "#303030" "brightblack"))
+   (base4      '("#505050" "#505050" "brightblack"))
+   (base5      '("#505050" "#505050" "brightblack"))
+   (base6      '("#808080" "#808080" "brightblack"))
+   (base7      '("#808080" "#808080" "brightblack"))
+   (base8      '("#DFDFDF" "#dfdfdf" "white"))
+   (fg         '("#dddddd" "#dddddd" "white"))
+   (fg-alt     '("#5B6268" "#2d2d2d" "white"))
+
+   (grey       base4)
+   (red        '("#d02b61" "#d02b61" "red"))
+   (orange     '("#da8548" "#dd8844" "brightred"))
+   (green      '("#60aa00" "#60aa00" "green"))
+   (teal       '("#4db5bd" "#44b9b1" "brightgreen"))
+   (yellow     '("#d08928" "#d08928" "yellow"))
+   (blue       '("#6c9ef8" "#6c9ef8" "brightblue"))
+   (dark-blue  '("#6688aa" "#6688aa" "blue"))
+   (magenta    '("#b77fdb" "#b77fdb" "magenta"))
+   (violet     '("#a9a1e1" "#a9a1e1" "brightmagenta"))
+   (cyan       '("#00aa80" "#00aa80" "brightcyan"))
+   (dark-cyan  '("#5699AF" "#5699AF" "cyan"))
+   (urlblue    '("#57aadd" "#57aadd" "blue"))
+   (iolime     '("#bbfc20" "#bbfc20" "green"))
+   (iopurple   '("#bb20fc" "#bb20fc" "magenta"))
+   (iocyan     '("#20bbfc" "#20bbfc" "cyan"))
+   (iopink     '("#fc20bb" "#fc20bb" "red"))
+   (ioteal     '("#20fcbb" "#20fcbb" "brightgreen"))
+
+   ;; face categories -- required for all themes
+   (highlight      iopink)
+   (vertical-bar   base2)
+   (selection      bg-alt)
+   (builtin        magenta)
+   (comments       (if doom-Iosvkem-brighter-comments dark-cyan base6))
+   (doc-comments   (doom-lighten (if doom-Iosvkem-brighter-comments dark-cyan base6) 0.25))
+   (constants      green)
+   (functions      magenta)
+   (keywords       blue)
+   (methods        teal)
+   (operators      blue)
+   (type           cyan)
+   (strings        yellow)
+   (variables      dark-cyan)
+   (numbers        green)
+   (region         `(,(doom-lighten (car bg-alt) 0.15) ,@(doom-lighten (cdr base0) 0.35)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-Iosvkem-brighter-modeline)
+   (-modeline-pad
+    (when doom-Iosvkem-padded-modeline
+      (if (integerp doom-Iosvkem-padded-modeline) doom-Iosvkem-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base6)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      `(,(doom-darken (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-alt
+    (if -modeline-bright
+        (doom-darken blue 0.475)
+      `(,(doom-darken (car bg-alt) 0.15) ,@(cdr base0))))
+   (modeline-bg-inactive     `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-alt `(,(doom-darken (car bg-alt) 0.1) ,@(cdr bg-alt))))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-Iosvkem-comment-bg (doom-lighten bg 0.05) 'unspecified)
+    :slant 'italic)
+   ((font-lock-function-name-face &override) :weight 'bold)
+   ((font-lock-doc-face &override) :slant 'normal)
+   (lazy-highlight :background iocyan :foreground bg :weight 'bold)
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground iocyan :background bg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   ((tooltip &override) :background bg)
+
+   ;;;; company
+   ((company-tooltip-selection &override) :foreground iopink)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; highlight-escape-sequences
+   ((hes-escape-backslash-face &override) :inherit 'normal :foreground red)
+   ((hes-escape-sequence-face &override) :inherit 'normal :foreground red)
+   ;;;; highlight-numbers
+   (highlight-numbers-number :foreground numbers)
+   ;;;; ivy
+   (ivy-current-match :background dark-blue :distant-foreground base0 :weight 'normal)
+   ;;;; js2-mode
+   ((js2-function-param &override) :foreground fg :slant 'italic)
+   ((js2-object-property &override) :foreground fg)
+   ;;;; markdown-mode
+   ((markdown-bold-face &override) :foreground cyan)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   (markdown-header-delimiter-face :inherit 'bold :foreground red)
+   (markdown-header-face :inherit 'bold :foreground fg)
+   ((markdown-italic-face &override) :foreground cyan)
+   ((markdown-link-face &override) :foreground blue)
+   ((markdown-list-face &override) :foreground magenta)
+   (markdown-markup-face :foreground red)
+   ((markdown-url-face &override) :foreground base5)
+   ;;;; nav-flash
+   ((nav-flash-face &override) :background bg-alt :foreground iopink)
+   ;;;; outline
+   ((outline-1 &override) :foreground blue)
+   ((outline-2 &override) :foreground magenta)
+   ((outline-3 &override) :foreground dark-cyan)
+   ((outline-6 &override) :foreground (doom-lighten dark-cyan 0.2))
+   ((outline-7 &override) :foreground (doom-lighten blue 0.4))
+   ((outline-8 &override) :foreground (doom-lighten magenta 0.4))
+   ;;;; org <built-in>
+   (org-hide :foreground hidden)
+   (org-link :foreground urlblue :underline t)
+   ((org-block &override) :background bg-alt)
+   ((org-quote &override) :background bg-alt)
+   ((org-block-begin-line &override) :foreground comments :background bg)
+   ;;;; mic-paren
+   ((paren-face-match &override) :foreground iopink :background bg :weight 'ultra-bold)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt)))
+   ;;;; whitespace <built-in>
+   ((whitespace-tab &override) :background bg))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-Iosvkem-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-acario-dark-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-acario-dark-theme.el
new file mode 100644
index 0000000..0d08916
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-acario-dark-theme.el
@@ -0,0 +1,268 @@
+;;; doom-acario-dark-theme.el --- an original dark theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: August 12, 2019 (#319)
+;; Author: gagbo <https://github.com/gagbo>
+;; Maintainer: gagbo <https://github.com/gagbo>
+;; Source: original
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+;;; Variables
+(defgroup doom-acario-dark-theme nil
+  "Options for the `doom-acario-dark' theme."
+  :group 'doom-themes)
+
+(defcustom doom-acario-dark-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-acario-dark-theme
+  :type 'boolean)
+
+(defcustom doom-acario-dark-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-acario-dark-theme
+  :type 'boolean)
+
+(defcustom doom-acario-dark-comment-bg doom-acario-dark-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-acario-dark-theme
+  :type 'boolean)
+
+(defcustom doom-acario-dark-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-acario-dark-theme
+  :type '(or integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-acario-dark
+  "A dark theme inspired by Acario"
+  :family 'doom-acario
+  :background-mode 'dark
+
+  ;; name        default   256         16
+  ((bg         '("#0D0E16" "color-233" "black"        ))
+   (bg-alt     '("#040408" "color-232" "brightblack"  ))
+   (base0      '("#0F1019" "color-234" "black"        ))
+   (base1      '("#121212" "color-233" "brightblack"  ))
+   (base2      '("#1E1E33" "color-236" "brightblack"  ))
+   (base3      '("#464A56" "color-240" "brightblack"  ))
+   (base4      '("#585C6C" "color-60"  "brightblack"  ))
+   (base5      '("#767676" "color-243" "brightblack"  ))
+   (base6      '("#959EA5" "color-109" "white"        ))
+   (base7      '("#B2B2B2" "color-249" "white"        ))
+   (base8      '("#D0D0D0" "color-252" "brightwhite"  ))
+   (fg         '("#CEDBE5" "color-152" "brightwhite"  ))
+   (fg-alt     '("#E5F4FF" "color-195" "brightwhite"  ))
+
+   (grey       base5)
+
+   (red        '("#D83441" "color-167" "red"          ))
+   (green      '("#79D836" "color-113" "green"        ))
+   (yellow     '("#D8B941" "color-179" "yellow"       ))
+   (blue       '("#3679D8" "color-68"  "blue"         ))
+   (magenta    '("#8041D8" "color-98"  "magenta"      ))
+   (cyan       '("#36D8BD" "color-79"  "cyan"         ))
+
+   (orange     '("#D85F00" "color-166"   "brightred"    ))
+   (teal       '("#2D9574" "color-29"  "brightcyan"   ))
+   (violet     '("#AB11D8" "color-128" "brightmagenta"))
+
+   (bg-blue    '("#0C213E" "color-17"  "brightblack"  ))
+   (dark-blue  bg-blue)
+   (bg-cyan    '("#092D27" "color-23"   "brightblack"  ))
+   (dark-cyan  bg-cyan)
+
+   ;; face categories -- required for all themes
+   (highlight      orange)
+   (vertical-bar   base0)
+   (selection      bg-blue)
+   (builtin        blue)
+   (comments       (if doom-acario-dark-brighter-comments bg-cyan grey))
+   (doc-comments   (doom-lighten (if doom-acario-dark-brighter-comments bg-cyan green) 0.25))
+   (constants      magenta)
+   (functions      yellow)
+   (keywords       red)
+   (methods        cyan)
+   (operators      blue)
+   (type           blue)
+   (strings        green)
+   (variables      (doom-lighten cyan 0.4))
+   (numbers        orange)
+   (region         base2)
+   (error          red)
+   (warning        orange)
+   (success        green)
+   (vc-modified    yellow)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden bg)
+   (-modeline-bright doom-acario-dark-brighter-modeline)
+   (-modeline-pad
+    (when doom-acario-dark-padded-modeline
+      (if (integerp doom-acario-dark-padded-modeline) doom-acario-dark-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base7)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-blend blue bg 0.35)
+      `(,(car base3) ,@(cdr base1))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-blend blue bg-alt 0.35)
+      `(,(car base2) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(doom-darken (car bg-alt) 0.2) ,@(cdr base0)))
+   (modeline-bg-inactive-l (doom-darken bg 0.20)))
+
+
+  ;;;; Base theme face overrides
+  ((font-lock-comment-face
+    :slant 'italic
+    :foreground comments
+    :background (if doom-acario-dark-comment-bg
+                    (doom-lighten bg 0.05)
+                  'unspecified))
+   (font-lock-doc-face
+    :inherit 'font-lock-comment-face
+    :foreground doc-comments)
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground orange :bold bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; all-the-icons
+   ((all-the-icons-dblue &override) :foreground teal)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background bg-blue :foreground fg-alt)
+   ;;;; flycheck
+   (flycheck-popup-tip-face :background bg-blue :foreground fg-alt)
+   (flycheck-posframe-info-face :background bg-blue :foreground fg-alt)
+   (flycheck-posframe-warning-face :inherit 'warning)
+   (flycheck-posframe-error-face :inherit 'error)
+   ;;;; hl-fill-column-face
+   (hl-fill-column-face :background bg-alt :foreground fg-alt)
+   ;;;; ivy
+   (ivy-current-match :background bg-blue :distant-foreground base0 :weight 'normal)
+   (ivy-posframe :background base1 :foreground fg)
+   (internal-border :background base7)
+   ;;;; lsp-mode and lsp-ui-mode
+   (lsp-ui-peek-highlight :foreground yellow)
+   (lsp-ui-sideline-symbol-info :foreground (doom-blend comments bg 0.85)
+                                :background bg-alt)
+   ;;;; magit
+   (magit-blame-culprit :foreground yellow)
+   (magit-blame-header :foreground green)
+   (magit-blame-sha1 :foreground yellow)
+   (magit-blame-subject :foreground yellow)
+   (magit-blame-time :foreground green)
+   (magit-blame-name :foreground yellow)
+   (magit-blame-heading :foreground green)
+   (magit-blame-hash :foreground yellow)
+   (magit-blame-summary :foreground yellow)
+   (magit-blame-date :foreground green)
+   (magit-log-date :foreground fg-alt)
+   (magit-log-graph :foreground fg-alt)
+   (magit-reflog-amend :foreground magenta)
+   (magit-reflog-other :foreground cyan)
+   (magit-reflog-rebase :foreground magenta)
+   (magit-reflog-remote :foreground cyan)
+   (magit-reflog-reset :foreground red)
+   (magit-branch :foreground magenta :weight 'bold)
+   (magit-branch-current :foreground blue :weight 'bold :box t)
+   (magit-branch-local :foreground blue :weight 'bold)
+   (magit-branch-remote :foreground orange :weight 'bold)
+   (magit-diff-file-header :foreground yellow)
+   (magit-diff-file-heading :foreground blue :weight 'light)
+   (magit-diff-file-heading-highlight :foreground blue :weight 'bold)
+   (magit-diff-file-heading-selection :foreground blue :weight 'bold :background base1)
+   (magit-diff-hunk-heading :foreground yellow :weight 'light)
+   (magit-diff-hunk-heading-highlight :foreground yellow :weight 'bold)
+   (magit-diff-hunk-heading-selection :inherit 'selection :weight 'bold)
+   (magit-diff-added :foreground green :weight 'light)
+   (magit-diff-removed :foreground red :weight 'light)
+   (magit-diff-context :foreground fg :weight 'light)
+   (magit-diff-added-highlight :foreground green :weight 'bold)
+   (magit-diff-removed-highlight :foreground red :weight 'bold)
+   (magit-diff-context-highlight :foreground fg :weight 'bold)
+   (magit-diff-base :foreground fg :weight 'light)
+   (magit-diff-base-highlight :foreground fg :weight 'bold)
+   (magit-diff-lines-boundary :background fg :foreground base2)
+   (magit-diff-lines-heading :background fg :foreground base2)
+   (magit-hash :foreground yellow)
+   (magit-item-highlight :background grey)
+   (magit-log-author :foreground yellow)
+   (magit-log-head-label-head :background yellow :foreground bg-alt :weight 'bold)
+   (magit-log-head-label-local :background red :foreground bg-alt :weight 'bold)
+   (magit-log-head-label-remote :background green :foreground bg-alt :weight 'bold)
+   (magit-log-head-label-tags :background magenta :foreground bg-alt :weight 'bold)
+   (magit-log-head-label-wip :background cyan :foreground bg-alt :weight 'bold)
+   (magit-log-sha1 :foreground green)
+   (magit-process-ng :foreground orange :weight 'bold)
+   (magit-process-ok :foreground yellow :weight 'bold)
+   (magit-section-heading :foreground red)
+   (magit-section-highlight :weight 'bold)
+   (section-heading-selection :foreground red :weight 'bold)
+   (magit-section-title :background bg-alt :foreground red :weight 'bold)
+   (magit-cherry-equivalent :foreground magenta)
+   (magit-cherry-unmatched :foreground cyan)
+   (magit-reflog-checkout :foreground blue)
+   (magit-reflog-cherry-pick :foreground green)
+   (magit-bisect-bad :foreground red)
+   (magit-bisect-good :foreground green)
+   (magit-bisect-skip :foreground fg)
+   (magit-diff-conflict-heading :foreground fg)
+   (magit-dimmed :foreground base8)
+   (magithub-ci-no-status :foreground grey)
+   (magithub-issue-number :foreground fg)
+   (magithub-notification-reason :foreground fg)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; org <built-in>
+   ((org-block &override) :background bg-alt)
+   ((org-block-begin-line &override) :background bg :foreground comments :slant 'italic)
+   ((org-quote &override) :background base1)
+   (org-hide :foreground hidden)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; whitespace <built-in>
+   (whitespace-indentation :inherit 'default)
+   (whitespace-big-indent :inherit 'default))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-acario-dark-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-acario-light-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-acario-light-theme.el
new file mode 100644
index 0000000..827fbe7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-acario-light-theme.el
@@ -0,0 +1,267 @@
+;;; doom-acario-light-theme.el --- an original light theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: August 12, 2019 (#319)
+;; Author: gagbo <https://github.com/gagbo>
+;; Maintainer: gagbo <https://github.com/gagbo>
+;; Source: original
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-acario-light-theme nil
+  "Options for the `doom-acario-light' theme."
+  :group 'doom-themes)
+
+(defcustom doom-acario-light-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-acario-light-theme
+  :type 'boolean)
+
+(defcustom doom-acario-light-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-acario-light-theme
+  :type 'boolean)
+
+(defcustom doom-acario-light-comment-bg doom-acario-light-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-acario-light-theme
+  :type 'boolean)
+
+(defcustom doom-acario-light-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-acario-light-theme
+  :type '(or integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-acario-light
+  "A light theme inspired by Acario light"
+  :family 'doom-acario
+  :background-mode 'light
+
+;;;; Colors
+  ;; name        default   256         16
+  ((bg         '("#F5F5F9" "color-255" "black"        ))
+   (bg-alt     '("#E9E9F2" "color-254" "brightblack"  ))
+   (base0      '("#D0D0E3" "color-188" "black"        ))
+   (base1      '("#D0D0E3" "color-188" "brightblack"  ))
+   (base2      '("#C0CCD0" "color-152" "brightblack"  ))
+   (base3      '("#9EA6B0" "color-103" "brightblack"  ))
+   (base4      '("#585C6C" "color-60"  "brightblack"  ))
+   (base5      '("#4E4E4E" "color-239" "brightblack"  ))
+   (base6      '("#3A3A3A" "color-237" "white"        ))
+   (base7      '("#303030" "color-236" "white"        ))
+   (base8      '("#1E1E33" "color-236" "brightwhite"  ))
+   (fg         '("#0F1019" "color-234" "brightwhite"  ))
+   (fg-alt     '("#0D0E16" "color-233" "brightwhite"  ))
+
+   (grey       base5)
+
+   (red        '("#D70000" "color-160" "red"          ))
+   (green      '("#005F00" "color-22"  "green"        ))
+   (yellow     '("#AF8700" "color-136" "yellow"       ))
+   (blue       '("#1F55A0" "color-25"  "blue"         ))
+   (magenta    '("#AF005F" "color-125" "magenta"      ))
+   (cyan       '("#007687" "color-30"  "cyan"         ))
+
+   (orange     '("#D75F00" "color-166" "brightred"    ))
+   (teal       '("#009B7C" "color-36"  "brightgreen"  ))
+   (violet     '("#8700AF" "color-91"  "brightmagenta"))
+
+   (bg-blue    '("#DEEAF8" "color-189"   "blue"         ))
+   (dark-blue  bg-blue)
+   (bg-cyan    '("#D5FAFF" "color-195"   "cyan"         ))
+   (dark-cyan  bg-cyan)
+
+;;;; face categories -- required for all themes
+   (highlight      teal)
+   (vertical-bar   base0)
+   (selection      bg-blue)
+   (builtin        blue)
+   (comments       (if doom-acario-light-brighter-comments cyan grey))
+   (doc-comments   (doom-darken (if doom-acario-light-brighter-comments cyan green) 0.25))
+   (constants      magenta)
+   (functions      yellow)
+   (keywords       red)
+   (methods        cyan)
+   (operators      blue)
+   (type           blue)
+   (strings        green)
+   (variables      (doom-darken cyan 0.4))
+   (numbers        orange)
+   (region         base2)
+   (error          red)
+   (warning        orange)
+   (success        green)
+   (vc-modified    yellow)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden bg)
+   (-modeline-dark doom-acario-light-brighter-modeline)
+   (-modeline-bright -modeline-dark)
+   (-modeline-pad
+    (when doom-acario-light-padded-modeline
+      (if (integerp doom-acario-light-padded-modeline) doom-acario-light-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-dark
+        (doom-blend blue bg 0.35)
+      `(,(car base3) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-dark
+        (doom-blend blue bg-alt 0.35)
+      `(,(car base2) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(doom-darken (car bg-alt) 0.2) ,@(cdr base0)))
+   (modeline-bg-inactive-l (doom-darken bg 0.20)))
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :slant 'italic
+    :background (if doom-acario-light-comment-bg (doom-darken bg 0.05) 'unspecified))
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground orange)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis
+    :foreground (if -modeline-dark base8 highlight))
+
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background bg-blue :foreground fg-alt)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-dark modeline-bg highlight))
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   ;;;; doom-themes
+   (doom-themes-treemacs-file-face :foreground comments)
+   ;;;; comments and doc
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; Flycheck
+   (flycheck-popup-tip-face :background bg-blue :foreground fg-alt)
+   (flycheck-posframe-info-face :background bg-blue :foreground fg-alt)
+   (flycheck-posframe-warning-face :inherit 'warning)
+   (flycheck-posframe-error-face :inherit 'error)
+   ;;;; Magit
+   (magit-bisect-skip :foreground fg)
+   (magit-blame-date :foreground green)
+   (magit-blame-header :foreground green)
+   (magit-blame-heading :foreground green)
+   (magit-blame-name :foreground cyan)
+   (magit-blame-sha1 :foreground cyan)
+   (magit-blame-subject :foreground cyan)
+   (magit-blame-summary :foreground cyan)
+   (magit-blame-time :foreground green)
+   (magit-branch :foreground magenta :weight 'bold)
+   ((magit-branch-current &override) :weight 'bold :box t)
+   (magit-branch-local :foreground blue :weight 'bold)
+   (magit-branch-remote :foreground orange :weight 'bold)
+   (magit-cherry-equivalent :foreground magenta)
+   (magit-cherry-unmatched :foreground orange)
+   (magit-diff-added :foreground green :weight 'light)
+   (magit-diff-added-highlight :foreground green :weight 'bold)
+   (magit-diff-base :foreground fg :weight 'light)
+   (magit-diff-base-highlight :foreground fg :weight 'bold)
+   (magit-diff-conflict-heading :foreground fg)
+   (magit-diff-context :foreground fg :weight 'light)
+   (magit-diff-context-highlight :foreground fg :weight 'bold)
+   (magit-diff-file-header :foreground yellow)
+   (magit-diff-file-heading :foreground blue :weight 'light)
+   (magit-diff-file-heading-highlight :foreground blue :weight 'bold)
+   (magit-diff-file-heading-selection :foreground blue :weight 'bold :background base1)
+   (magit-diff-hunk-heading :foreground yellow :weight 'light)
+   (magit-diff-hunk-heading-highlight :foreground yellow :weight 'bold)
+   (magit-diff-hunk-heading-selection :inherit 'selection :weight 'bold)
+   (magit-diff-lines-boundary :background fg :foreground base2)
+   (magit-diff-lines-heading :background fg :foreground base2)
+   (magit-diff-removed :foreground red :weight 'light)
+   (magit-diff-removed-highlight :foreground red :weight 'bold)
+   (magit-dimmed :foreground base8)
+   (magit-hash :foreground cyan)
+   (magit-item-highlight :background grey)
+   (magit-log-author :foreground cyan)
+   (magit-log-date :foreground fg-alt)
+   (magit-log-graph :foreground fg-alt)
+   (magit-log-head-label-head :background cyan :foreground bg-alt :weight 'bold)
+   (magit-log-head-label-local :background red :foreground bg-alt :weight 'bold)
+   (magit-log-head-label-remote :background green :foreground bg-alt :weight 'bold)
+   (magit-log-head-label-tags :background magenta :foreground bg-alt :weight 'bold)
+   (magit-log-head-label-wip :background yellow :foreground bg-alt :weight 'bold)
+   (magit-log-sha1 :foreground green)
+   (magit-process-ng :foreground orange :weight 'bold)
+   (magit-process-ok :foreground cyan :weight 'bold)
+   (magit-reflog-amend :foreground magenta)
+   (magit-reflog-checkout :foreground blue)
+   (magit-reflog-cherry-pick :foreground green)
+   (magit-reflog-other :foreground yellow)
+   (magit-reflog-rebase :foreground magenta)
+   (magit-reflog-remote :foreground yellow)
+   (magit-reflog-reset :foreground red)
+   (magit-section-heading :foreground red)
+   (magit-section-highlight :weight 'bold)
+   (magit-section-title :background bg-alt :foreground red :weight 'bold)
+   (magit-section-heading-selection :foreground red :weight 'bold)
+   ;;;; magithub
+   (magithub-ci-no-status :foreground grey)
+   (magithub-issue-number :foreground fg)
+   (magithub-notification-reason :foreground fg)
+   ;;;; hl-fill-column-face
+   (hl-fill-column-face :background bg-alt :foreground fg-alt)
+   ;;;; ivy
+   (ivy-current-match :background bg-blue :distant-foreground base0 :weight 'normal)
+   (ivy-posframe :background base1 :foreground fg)
+   (internal-border :background base7)
+   ;;;; lsp-mode and lsp-ui-mode
+   (lsp-ui-peek-highlight :foreground yellow)
+   (lsp-ui-sideline-symbol-info :foreground (doom-blend comments bg 0.85)
+                                :background bg-alt)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; org <built-in>
+   ((org-block &override) :background bg-alt)
+   ((org-block-begin-line &override) :background bg :slant 'italic)
+   ((org-quote &override) :background base1)
+   (org-hide :foreground hidden)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; treemacs
+   (treemacs-root-face :foreground strings :weight 'bold :height 1.2)
+   ;;;; whitespace <built-in>
+   (whitespace-indentation :inherit 'default)
+   (whitespace-big-indent :inherit 'default))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-acario-light-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ayu-dark-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ayu-dark-theme.el
new file mode 100644
index 0000000..455fa10
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ayu-dark-theme.el
@@ -0,0 +1,246 @@
+;;; doom-ayu-dark-theme.el --- inspired by Ayu Dark -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: March 24, 2022 (#717)
+;; Author: ashton <https://github.com/ashton>
+;; Maintainer:
+;; Source: https://github.com/dempfi/ayu
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-ayu-dark-theme nil
+  "Options for the `doom-ayu-dark' theme."
+  :group 'doom-themes)
+
+(defcustom doom-ayu-dark-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-ayu-dark-theme
+  :type 'boolean)
+
+(defcustom doom-ayu-dark-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-ayu-dark-theme
+  :type 'boolean)
+
+(defcustom doom-ayu-dark-comment-bg doom-ayu-dark-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-ayu-dark-theme
+  :type 'boolean)
+
+(defcustom doom-ayu-dark-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-ayu-dark-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-ayu-dark
+  "A dark theme inspired by Ayu dark"
+  :family 'doom-ayu
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  (
+   ;; common
+   (common-accent   '("#e6b450" "orange"  "orange" ))
+   (common-bg       '("#0d1017" "black"   "black"  ))
+   (common-line     '("#131721" "grey"    "grey"  ))
+   (common-fg       '("#bfbdb6" "grey"    "grey"   ))
+   (common-ui       '("#565b66" "grey"    "grey"   ))
+   (test            '("#73b8ff" "grey"    "grey"   ))
+   ;; syntax
+   (syntax-tag      '("#39bae6" "cyan"    "blue"   ))
+   (syntax-func     '("#ffb454" "yellow"  "yellow" ))
+   (syntax-entity   '("#59c2ff" "blue"    "blue"   ))
+   (syntax-string   '("#7fd962" "green"   "green"  ))
+   (syntax-regexp   '("#95e6cb" "teal"    "green"  ))
+   (syntax-markup   '("#f07178" "red"     "red"    ))
+   (syntax-keyword  '("#ff8f40" "orange"  "orange" ))
+   (syntax-special  '("#e6b673" "yellow"  "yellow" ))
+   (syntax-comment  '("#475266" "grey"    "grey"   ))
+   (syntax-constant '("#d2a6ff" "magenta" "purple" ))
+   (syntax-operator '("#f29668" "orange"  "orange" ))
+   (syntax-error    '("#d95757" "red"     "red"    ))
+   ;; editor
+   (editor-selection-active '("#1B3A5B" "grey" "grey"))
+   ;; ui
+   (alt-accent            (doom-lighten common-accent 0.4))
+   (ui-line               (doom-darken common-bg 0.25))
+   (ui-panel-shadow       (doom-darken common-bg 0.35))
+   (ui-panel-border       (doom-darken common-bg 0.45))
+   (ui-gutter-normal      (doom-darken common-ui 0.45))
+   (ui-gutter-active      common-ui)
+   (ui-selection-bg       (doom-blend common-bg test 0.8))
+   (ui-selection-inactive (doom-lighten test 0.93))
+   (ui-selection-border   (doom-lighten test 0.93))
+   (ui-guide-normal       (doom-darken common-ui 0.35))
+   (ui-guide-active       (doom-darken common-ui 0.75))
+   (ui-org-block          (doom-darken common-bg 0.10))
+   (elscreen-bg           (doom-darken common-ui 0.55))
+   (elscreen-fg           ui-line)
+   ;; vcs
+   (vcs-added    '("#aad94c" "green" "green" ))
+   (vcs-modified '("#39bae6" "blue"  "blue"  ))
+   (vcs-removed  '("#f26d78" "red"   "red"   ))
+   
+
+   (bg         common-bg)
+   (bg-alt     ui-line)
+   (base0      ui-gutter-normal)
+   (base1      ui-gutter-active)
+   (base2      ui-selection-bg)
+   (base3      ui-org-block)
+   (base4      ui-selection-border)
+   (base5      ui-guide-normal)
+   (base6      ui-guide-normal)
+   (base7      ui-panel-shadow)
+   (base8      ui-panel-border)
+   (fg         common-fg)
+   (fg-alt     common-ui)
+
+   (grey       ui-line)
+   (red        syntax-markup)
+   (orange     syntax-keyword)
+   (green      syntax-string)
+   (teal       syntax-regexp)
+   (yellow     syntax-func)
+   (blue       syntax-entity)
+   (dark-blue  (doom-darken syntax-entity 0.2))
+   (magenta    syntax-constant)
+   (violet     (doom-lighten syntax-constant 0.2))
+   (cyan       syntax-tag)
+   (dark-cyan  test)
+
+   ;; face categories -- required for all themes
+   (highlight      common-accent)
+   (vertical-bar   ui-panel-border)
+   (selection      nil)
+   (builtin        nil)
+   (comments       (if doom-ayu-dark-brighter-comments dark-cyan base5))
+   (doc-comments   (doom-lighten (if doom-ayu-dark-brighter-comments dark-cyan base5) 0.25))
+   (constants      syntax-constant)
+   (functions      syntax-func)
+   (keywords       syntax-keyword)
+   (methods        syntax-func)
+   (operators      syntax-operator)
+   (type           syntax-special)
+   (strings        syntax-string)
+   (variables      common-fg)
+   (numbers        syntax-func)
+   (region         ui-selection-bg)
+   (error          syntax-error)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    vcs-modified)
+   (vc-added       vcs-added)
+   (vc-deleted     vcs-removed)
+
+   ;; custom categories
+   (hidden     (car bg))
+   (-modeline-bright doom-ayu-dark-brighter-modeline)
+   (-modeline-pad
+    (when doom-ayu-dark-padded-modeline
+      (if (integerp doom-ayu-dark-padded-modeline) doom-ayu-dark-padded-modeline 4)))
+
+   (modeline-fg     common-fg)
+   (modeline-fg-alt common-accent)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      `(,(doom-darken (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken blue 0.475)
+      `(,(doom-darken (car bg-alt) 0.15) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-l `(,(doom-darken (car bg-alt) 0.1) ,@(cdr bg-alt))))
+
+  ;;;; Base theme face overrides
+  ((hl-line :background common-line) 
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   (diff-removed :foreground vcs-removed)
+   (font-lock-comment-face
+    :foreground comments
+    :background (if doom-ayu-dark-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (font-lock-doc-face
+    :inherit 'font-lock-comment-face
+    :foreground doc-comments)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; LSP
+   (lsp-face-highlight-textual :background alt-accent :foreground common-ui)
+
+   ;;;; company
+   (company-tooltip :foreground common-fg :background common-bg)
+   (company-tooltip-annotation :foreground common-fg)
+   (company-tooltip-selection :background ui-line)
+   (company-tooltip-search :foreground common-accent :weight 'bold)
+   (company-scrollbar-bg :background common-bg)
+   (company-scrollbar-fg :background syntax-comment)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg modeline-bg) :weight 'normal)
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'normal)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'normal)
+   (doom-modeline-buffer-project-root :foreground green :weight 'normal)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background elscreen-bg :foreground elscreen-fg)
+   ;;;; ivy
+   (ivy-current-match :background common-ui)
+   (ivy-minibuffer-match-face-1 :foreground common-accent :weight 'bold)
+   (ivy-minibuffer-match-face-2 :foreground common-accent :weight 'bold)
+   (ivy-minibuffer-match-face-3 :foreground common-accent :weight 'bold)
+   (ivy-minibuffer-match-face-4 :foreground common-accent :weight 'bold)
+   ;;;; LaTeX-mode
+   (font-latex-math-face :foreground green)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten common-bg 0.05))
+   ;;;; org-mode
+   (org-hide :foreground hidden)
+   (org-headline-done :foreground syntax-comment)
+   (org-document-info-keyword :foreground comments)
+   (org-macro :foreground syntax-operator)
+   ;;;; mic-paren
+   ((paren-face-match &override) :foreground fg :background ui-selection-bg :weight 'ultra-bold)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground cyan)
+   (rjsx-tag-bracket-face :foreground (doom-darken cyan 0.5))
+   (rjsx-attr :foreground syntax-func)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; web-mode
+   (web-mode-html-tag-face :foreground cyan)
+   (web-mode-html-tag-bracket-face :foreground (doom-darken cyan 0.5))
+   (web-mode-html-attr-name-face :foreground syntax-func)))
+
+;;; doom-ayu-dark-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ayu-light-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ayu-light-theme.el
new file mode 100644
index 0000000..8a4c5e3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ayu-light-theme.el
@@ -0,0 +1,237 @@
+;;; doom-ayu-light-theme.el --- inspirted by Ayu Light -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: February 5, 2021 (#499)
+;; Author: LoveSponge <https://github.com/LoveSponge>
+;; Maintainer:
+;; Source: https://github.com/dempfi/ayu
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-ayu-light-theme nil
+  "Options for the `doom-ayu-light' theme."
+  :group 'doom-themes)
+
+(defcustom doom-ayu-light-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-ayu-light-theme
+  :type 'boolean)
+
+(defcustom doom-ayu-light-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-ayu-light-theme
+  :type 'boolean)
+
+(defcustom doom-ayu-light-comment-bg doom-ayu-light-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-ayu-light-theme
+  :type 'boolean)
+
+(defcustom doom-ayu-light-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-ayu-light-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-ayu-light
+  "A light theme inspired by Ayu Light"
+  :family 'doom-ayu
+  :background-mode 'light
+
+  ;; name        default   256       16
+  (
+   ;; common
+   (common-accent   '("#ff9940" "orange"  "orange" ))
+   (common-bg       '("#fafafa" "black"   "black"  ))
+   (common-fg       '("#575f66" "grey"    "grey"   ))
+   (common-ui       '("#ba9199" "grey"    "grey"   ))
+   (test            '("#2ea8e6" "grey"    "grey"   ))
+   ;; syntax
+   (syntax-tag      '("#55b4d4" "cyan"    "blue"   ))
+   (syntax-func     '("#f2ae49" "yellow"  "yellow" ))
+   (syntax-entity   '("#399ee6" "blue"    "blue"   ))
+   (syntax-string   '("#86b300" "green"   "green"  ))
+   (syntax-regexp   '("#4cbf99" "teal"    "green"  ))
+   (syntax-markup   '("#f07171" "red"     "red"    ))
+   (syntax-keyword  '("#fa8d3e" "orange"  "orange" ))
+   (syntax-special  '("#e6ba7e" "yellow"  "yellow" ))
+   (syntax-comment  '("#abb0b6" "grey"    "grey"   ))
+   (syntax-constant '("#a37acc" "magenta" "purple" ))
+   (syntax-operator '("#ed9366" "orange"  "orange" ))
+   (syntax-error    '("#f51818" "red"     "red"    ))
+   ;; ui
+   (ui-line               (doom-darken common-bg 0.07))
+   (ui-panel-shadow       (doom-lighten common-bg 0.35))
+   (ui-panel-border       (doom-lighten common-bg 0.45))
+   (ui-gutter-normal      (doom-lighten common-ui 0.45))
+   (ui-gutter-active      common-ui)
+   (ui-selection-bg       (doom-blend common-bg test 0.7))
+   (ui-selection-inactive (doom-lighten test 0.93))
+   (ui-selection-border   (doom-lighten test 0.93))
+   (ui-guide-active       (doom-lighten common-ui 0.75))
+   (ui-guide-normal       (doom-lighten common-ui 0.35))
+   (ui-org-block          (doom-lighten test 0.95))
+   (elscreen-bg           (doom-lighten common-fg 0.65))
+   (elscreen-fg           (doom-darken common-fg 0.85))
+   ;; vcs
+   (vcs-added    '("#99bf4d" "green" "green" ))
+   (vcs-modified '("#709ecc" "blue"  "blue"  ))
+   (vcs-removed  '("#f27983" "red"   "red"   ))
+
+   (bg         common-bg)
+   (bg-alt     common-bg)
+   (base0      ui-gutter-normal)
+   (base1      ui-gutter-active)
+   (base2      ui-selection-bg)
+   (base3      ui-selection-border)
+   (base4      ui-selection-inactive)
+   (base5      ui-guide-active)
+   (base6      ui-guide-normal)
+   (base7      ui-panel-shadow)
+   (base8      ui-panel-border)
+   (fg         common-fg)
+   (fg-alt     common-ui)
+
+   (grey       syntax-comment)
+   (red        syntax-markup)
+   (orange     syntax-keyword)
+   (green      syntax-string)
+   (teal       syntax-regexp)
+   (yellow     syntax-func)
+   (blue       syntax-entity)
+   (dark-blue  (doom-darken syntax-entity 0.2))
+   (magenta    syntax-constant)
+   (violet     (doom-lighten syntax-constant 0.2))
+   (cyan       syntax-tag)
+   (dark-cyan  (doom-darken syntax-tag 0.2))
+
+   ;; face categories -- required for all themes
+   (highlight      common-accent)
+   (vertical-bar   ui-panel-border)
+   (selection      ui-selection-inactive)
+   (builtin        syntax-func)
+   (comments       (if doom-ayu-light-brighter-comments syntax-comment elscreen-bg))
+   (doc-comments   (doom-lighten (if doom-ayu-light-brighter-comments syntax-comment elscreen-bg) 0.25))
+   (constants      syntax-constant)
+   (functions      syntax-func)
+   (keywords       syntax-keyword)
+   (methods        syntax-func)
+   (operators      syntax-operator)
+   (type           syntax-special)
+   (strings        syntax-string)
+   (variables      common-fg)
+   (numbers        syntax-func)
+   (region         ui-selection-bg)
+   (error          syntax-error)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    vcs-modified)
+   (vc-added       vcs-added)
+   (vc-deleted     vcs-removed)
+
+   ;; custom categories
+   (hidden     (car bg))
+   (-modeline-bright doom-ayu-light-brighter-modeline)
+   (-modeline-pad
+    (when doom-ayu-light-padded-modeline
+      (if (integerp doom-ayu-light-padded-modeline) doom-ayu-light-padded-modeline 4)))
+
+   (modeline-fg     common-ui)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-lighten blue 0.475)
+      `(,(doom-lighten (car bg) 0.15) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-lighten blue 0.45)
+      `(,(doom-lighten (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(doom-lighten (car bg) 0.1) ,@(cdr bg)))
+   (modeline-bg-inactive-l `(,(car bg) ,@(cdr base1))))
+
+  ;;;; Base theme face overrides
+  (((line-number &override) :foreground base5)
+   ((line-number-current-line &override) :foreground fg)
+   ((font-lock-comment-face &override)
+    :background (if doom-ayu-light-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+
+   ;;;; company
+   (company-tooltip :foreground common-fg :background common-bg)
+   (company-tooltip-annotation :foreground common-fg)
+   (company-tooltip-selection :background ui-line)
+   (company-tooltip-search :foreground common-accent :weight 'bold)
+   (company-scrollbar-bg :background common-bg)
+   (company-scrollbar-fg :background syntax-comment)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; diff-mode <built-in>
+   (diff-removed :foreground vcs-removed)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight) :weight 'normal)
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'normal)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'normal)
+   (doom-modeline-buffer-project-root :foreground green :weight 'normal)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background elscreen-bg :foreground elscreen-fg)
+   ;;;; highlight-numbers
+   (highlight-numbers-number :foreground syntax-func :weight 'normal)
+   ;;;; ivy
+   (ivy-current-match :background ui-line)
+   (ivy-minibuffer-match-face-1 :foreground common-accent :weight 'bold)
+   (ivy-minibuffer-match-face-2 :foreground common-accent :weight 'bold)
+   (ivy-minibuffer-match-face-3 :foreground common-accent :weight 'bold)
+   (ivy-minibuffer-match-face-4 :foreground common-accent :weight 'bold)
+   ;;;; js2-mode
+   (js2-object-property :foreground common-fg)
+   ;;;; LaTeX-mode
+   (font-latex-math-face :foreground green)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten common-bg 0.05))
+   ;;;; org <built-in>
+   (org-hide :foreground hidden)
+   (org-headline-done :foreground syntax-comment)
+   (org-document-info-keyword :foreground comments)
+   (org-macro :foreground syntax-operator)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground cyan)
+   (rjsx-tag-bracket-face :foreground (doom-lighten cyan 0.5))
+   (rjsx-attr :foreground syntax-func)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; web-mode
+   (web-mode-html-tag-face :foreground cyan)
+   (web-mode-html-tag-bracket-face :foreground (doom-lighten cyan 0.5))
+   (web-mode-html-attr-name-face :foreground syntax-func)))
+
+;;; doom-ayu-light-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ayu-mirage-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ayu-mirage-theme.el
new file mode 100644
index 0000000..212cd32
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ayu-mirage-theme.el
@@ -0,0 +1,237 @@
+;;; doom-ayu-mirage-theme.el --- inspired by Ayu Mirage -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: February 5, 2021 (#499)
+;; Author: LoveSponge <https://github.com/LoveSponge>
+;; Maintainer:
+;; Source: https://github.com/dempfi/ayu
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-ayu-mirage-theme nil
+  "Options for the `doom-ayu-mirage' theme."
+  :group 'doom-themes)
+
+(defcustom doom-ayu-mirage-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-ayu-mirage-theme
+  :type 'boolean)
+
+(defcustom doom-ayu-mirage-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-ayu-mirage-theme
+  :type 'boolean)
+
+(defcustom doom-ayu-mirage-comment-bg doom-ayu-mirage-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-ayu-mirage-theme
+  :type 'boolean)
+
+(defcustom doom-ayu-mirage-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-ayu-mirage-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-ayu-mirage
+  "A dark theme inspired by Ayu Mirage"
+  :family 'doom-ayu
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  (
+   ;; common
+   (common-accent   '("#ffcc66" "orange"  "orange" ))
+   (common-bg       '("#1f2430" "black"   "black"  ))
+   (common-fg       '("#cbccc6" "grey"    "grey"   ))
+   (common-ui       '("#707a8c" "grey"    "grey"   ))
+   (test            '("#7399e6" "grey"    "grey"   ))
+   ;; syntax
+   (syntax-tag      '("#5ccfe6" "cyan"    "blue"   ))
+   (syntax-func     '("#ffd580" "yellow"  "yellow" ))
+   (syntax-entity   '("#73d0ff" "blue"    "blue"   ))
+   (syntax-string   '("#bae67e" "green"   "green"  ))
+   (syntax-regexp   '("#95e6cb" "teal"    "green"  ))
+   (syntax-markup   '("#f28779" "red"     "red"    ))
+   (syntax-keyword  '("#ffa759" "orange"  "orange" ))
+   (syntax-special  '("#ffe6b3" "yellow"  "yellow" ))
+   (syntax-comment  '("#5c6773" "grey"    "grey"   ))
+   (syntax-constant '("#d4bfff" "magenta" "purple" ))
+   (syntax-operator '("#f29e74" "orange"  "orange" ))
+   (syntax-error    '("#ff3333" "red"     "red"    ))
+   ;; ui
+   (ui-line               (doom-darken common-bg 0.25))
+   (ui-panel-shadow       (doom-darken common-bg 0.35))
+   (ui-panel-border       (doom-darken common-bg 0.45))
+   (ui-gutter-normal      (doom-darken common-ui 0.45))
+   (ui-gutter-active      common-ui)
+   (ui-selection-bg       (doom-blend common-bg test 0.8))
+   (ui-selection-inactive (doom-lighten test 0.93))
+   (ui-selection-border   (doom-lighten test 0.93))
+   (ui-guide-normal       (doom-darken common-ui 0.35))
+   (ui-guide-active       (doom-darken common-ui 0.75))
+   (ui-org-block          (doom-darken common-bg 0.10))
+   (elscreen-bg           (doom-darken common-ui 0.55))
+   (elscreen-fg           ui-line)
+   ;; vcs
+   (vcs-added    '("#a6cc70" "green" "green" ))
+   (vcs-modified '("#77a8d9" "blue"  "blue"  ))
+   (vcs-removed  '("#f27983" "red"   "red"   ))
+
+   (bg         common-bg)
+   (bg-alt     ui-line)
+   (base0      ui-gutter-normal)
+   (base1      ui-gutter-active)
+   (base2      ui-selection-bg)
+   (base3      ui-org-block)
+   (base4      ui-selection-border)
+   (base5      ui-guide-normal)
+   (base6      ui-guide-normal)
+   (base7      ui-panel-shadow)
+   (base8      ui-panel-border)
+   (fg         common-fg)
+   (fg-alt     common-ui)
+
+   (grey       ui-line)
+   (red        syntax-markup)
+   (orange     syntax-keyword)
+   (green      syntax-string)
+   (teal       syntax-regexp)
+   (yellow     syntax-func)
+   (blue       syntax-entity)
+   (dark-blue  (doom-darken syntax-entity 0.2))
+   (magenta    syntax-constant)
+   (violet     (doom-lighten syntax-constant 0.2))
+   (cyan       syntax-tag)
+   (dark-cyan  test)
+
+   ;; face categories -- required for all themes
+   (highlight      common-accent)
+   (vertical-bar   ui-panel-border)
+   (selection      nil)
+   (builtin        nil)
+   (comments       (if doom-ayu-mirage-brighter-comments dark-cyan base5))
+   (doc-comments   (doom-lighten (if doom-ayu-mirage-brighter-comments dark-cyan base5) 0.25))
+   (constants      syntax-constant)
+   (functions      syntax-func)
+   (keywords       syntax-keyword)
+   (methods        syntax-func)
+   (operators      syntax-operator)
+   (type           syntax-special)
+   (strings        syntax-string)
+   (variables      common-fg)
+   (numbers        syntax-func)
+   (region         ui-selection-bg)
+   (error          syntax-error)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    vcs-modified)
+   (vc-added       vcs-added)
+   (vc-deleted     vcs-removed)
+
+   ;; custom categories
+   (hidden     (car bg))
+   (-modeline-bright doom-ayu-mirage-brighter-modeline)
+   (-modeline-pad
+    (when doom-ayu-mirage-padded-modeline
+      (if (integerp doom-ayu-mirage-padded-modeline) doom-ayu-mirage-padded-modeline 4)))
+
+   (modeline-fg     common-fg)
+   (modeline-fg-alt common-accent)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      `(,(doom-darken (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken blue 0.475)
+      `(,(doom-darken (car bg-alt) 0.15) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-l `(,(doom-darken (car bg-alt) 0.1) ,@(cdr bg-alt))))
+
+  ;;;; Base theme face overrides
+  (((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   (diff-removed :foreground vcs-removed)
+   (font-lock-comment-face
+    :foreground comments
+    :background (if doom-ayu-mirage-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (font-lock-doc-face
+    :inherit 'font-lock-comment-face
+    :foreground doc-comments)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; company
+   (company-tooltip :foreground common-fg :background common-bg)
+   (company-tooltip-annotation :foreground common-fg)
+   (company-tooltip-selection :background ui-line)
+   (company-tooltip-search :foreground common-accent :weight 'bold)
+   (company-scrollbar-bg :background common-bg)
+   (company-scrollbar-fg :background syntax-comment)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg modeline-bg) :weight 'normal)
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'normal)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'normal)
+   (doom-modeline-buffer-project-root :foreground green :weight 'normal)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background elscreen-bg :foreground elscreen-fg)
+   ;;;; ivy
+   (ivy-current-match :background common-bg)
+   (ivy-minibuffer-match-face-1 :foreground common-accent :weight 'bold)
+   (ivy-minibuffer-match-face-2 :foreground common-accent :weight 'bold)
+   (ivy-minibuffer-match-face-3 :foreground common-accent :weight 'bold)
+   (ivy-minibuffer-match-face-4 :foreground common-accent :weight 'bold)
+   ;;;; LaTeX-mode
+   (font-latex-math-face :foreground green)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten common-bg 0.05))
+   ;;;; org-mode
+   (org-hide :foreground hidden)
+   (org-headline-done :foreground syntax-comment)
+   (org-document-info-keyword :foreground comments)
+   (org-macro :foreground syntax-operator)
+   ;;;; mic-paren
+   ((paren-face-match &override) :foreground fg :background ui-selection-bg :weight 'ultra-bold)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground cyan)
+   (rjsx-tag-bracket-face :foreground (doom-darken cyan 0.5))
+   (rjsx-attr :foreground syntax-func)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; web-mode
+   (web-mode-html-tag-face :foreground cyan)
+   (web-mode-html-tag-bracket-face :foreground (doom-darken cyan 0.5))
+   (web-mode-html-attr-name-face :foreground syntax-func)))
+
+;;; doom-ayu-mirage-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-badger-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-badger-theme.el
new file mode 100644
index 0000000..5b462a7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-badger-theme.el
@@ -0,0 +1,239 @@
+;;; doom-badger-theme.el --- inspired by cann's Badger colorscheme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: April 19, 2020 (#443)
+;; Author: jsoa <https://github.com/jsoa>
+;; Maintainer:
+;; Source: https://github.com/ccann/badger-theme/
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-badger-theme nil
+  "Options for the `doom-badger' theme."
+  :group 'doom-themes)
+
+(defcustom doom-badger-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-badger-theme
+  :type 'boolean)
+
+(defcustom doom-badger-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-badger-theme
+  :type 'boolean)
+
+(defcustom doom-badger-comment-bg doom-badger-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-badger-theme
+  :type 'boolean)
+
+(defcustom doom-badger-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-badger-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-badger
+  "A dark theme inspired by original badger theme"
+
+  ;; name        default   256       16
+  ((bg         '("#171717" nil       nil            )) ;; badger-bg
+   (bg-alt     '("#2f2f2f" nil       nil            )) ;; badger-bg+1
+   (base0      '("#1D1D1D" "black"   "black"        )) ;; badger-hl
+   (base1      '("#1c1f24" "#1e1e1e" "brightblack"  )) ;;
+   (base2      '("#202328" "#2e2e2e" "brightblack"  )) ;;
+   (base3      '("#23272e" "#262626" "brightblack"  )) ;;
+   (base4      '("#433F4f" "#3f3f3f" "brightblack"  )) ;;
+   (base5      '("#635770" "#525252" "brightblack"  )) ;;
+   (base6      '("#656868" "#6b6b6b" "brightblack"  )) ;; badger-charcoal
+   (base7      '("#9ca0a4" "#979797" "brightblack"  )) ;;
+   (base8      '("#DFDFDF" "#dfdfdf" "white"        )) ;;
+   (fg         '("#F6F3E8" "#bfbfbf" "brightwhite"  )) ;; badger-fg
+   (fg-alt     '("#FBF9F3" "#2d2d2d" "white"        )) ;; badger-fg+1
+
+   (grey       base4)
+   (red        '("#E2434C" "#ff6655" "red"          )) ;; badger-red
+   (orange     '("#EA9847" "#dd8844" "brightred"    )) ;; badger-orange
+   (green      '("#86B187" "#99bb66" "green"        )) ;; badger-green
+   (teal       '("#65A399" "#44b9b1" "brightgreen"  )) ;; badger-teal
+   (yellow     '("#E0D063" "#ECBE7B" "yellow"       )) ;; badger-yellow
+   (blue       '("#8AC6F2" "#51afef" "brightblue"   )) ;; badger-blue
+   (dark-blue  '("#2257A0" "#2257A0" "blue"         )) ;;
+   (magenta    '("#E18Cbb" "#c678dd" "brightmagenta")) ;; badger-pink
+   (violet     '("#BF93C3" "#a9a1e1" "magenta"      )) ;; badger-violet
+   (cyan       '("cyan"    "#46D9FF" "brightcyan"   )) ;; badger-succ
+   (dark-cyan  '("#5699AF" "#5699AF" "cyan"         )) ;;
+
+   ;; Custom
+   (olive          '("#9AA68E")) ;; badger-olice
+   (lime           '("#84C452")) ;; badger-lime
+   (link           '("#8ACDAA")) ;; badger-link
+   (dull-red       '("#A55662")) ;; badger-dull-red
+   (brown          '("#AC8952")) ;; badger-brown
+   (sand           '("#C7B299")) ;; badger-sand
+   (salmon         '("#F28B86")) ;; badger-salmon
+   (dark-violet    '("#635770")) ;; badger-dark-violet
+   ;; (darker-violet  '("#433F4F")) ;; badger-darker-violet
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base4 0.1))
+   (selection      dark-blue)
+   (builtin        salmon)
+   (comments       (if doom-badger-brighter-comments base7 base6))
+   (doc-comments   (doom-lighten (if doom-badger-brighter-comments base7 base6) 0.25))
+   (constants      dark-violet)
+   (functions      orange)
+   (keywords       blue)
+   (methods        cyan)
+   (operators      sand)
+   (type           sand)
+   (strings        green)
+   (variables      violet)
+   (numbers        fg)
+   (region         `(,(doom-lighten (car bg-alt) 0.1) ,@(doom-lighten (cdr base0) 0.1)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-badger-brighter-modeline)
+   (-modeline-pad
+    (when doom-badger-padded-modeline
+      (if (integerp doom-badger-padded-modeline) doom-badger-padded-modeline 4)))
+
+   (modeline-fg     fg)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.475)
+      `(,(doom-darken (car bg-alt) 0.15) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      `(,(doom-darken (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(doom-darken (car bg-alt) 0.1) ,@(cdr bg-alt)))
+   (modeline-bg-inactive-l `(,(car bg-alt) ,@(cdr base1))))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-badger-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   ((line-number &override) :foreground base6)
+   ((line-number-current-line &override) :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis
+    :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; centaur tabs
+   (centaur-tabs-selected-modified   :background bg :foreground yellow)
+   (centaur-tabs-unselected-modified :background bg-alt :foreground yellow)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; ivy
+   (ivy-current-match :background dark-blue :distant-foreground base0 :weight 'normal)
+   ;;;; linum
+   (linum :foreground base6 :background base6)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; org <built-in>
+   (org-agenda-date :foreground blue)
+   (org-agenda-date-today  :foreground salmon :weight 'light :slant 'italic)
+   (org-agenda-structure  :inherit font-lock-comment-face)
+   (org-archived :foreground fg :weight 'bold)
+   ((org-code &override) :foreground olive)
+   (org-column :background "black")
+   (org-column-title :background "black" :foreground lime :underline t)
+   (org-date :foreground link :underline t)
+   (org-deadline-announce :foreground dull-red)
+   (org-document-info-keyword :foreground olive)
+   (org-document-title :foreground salmon :height 1.50)
+   (org-done :foreground lime :strike-through t)
+   (org-footnote :foreground link :underline t)
+   (org-formula :foreground violet)
+   (org-headline-done :strike-through t :foreground base6)
+   (org-hide :foreground bg)
+   (org-hide :foreground hidden)
+   (org-level-1 :foreground blue)
+   (org-level-2 :foreground violet)
+   (org-level-3 :foreground orange)
+   (org-level-4 :foreground yellow)
+   (org-level-5 :foreground salmon)
+   (org-level-6 :foreground green)
+   (org-level-7 :foreground brown)
+   (org-level-8 :foreground teal)
+   (org-link :foreground link :underline t)
+   (org-mode-line-clock :foreground yellow)
+   (org-special-keyword :foreground olive :weight 'normal)
+   (org-table :foreground olive)
+   (org-tag :bold t :foreground orange :strike-through nil)
+   (org-todo :foreground red)
+   (org-verbatim :inherit 'org-code)
+   (org-warning :bold t :foreground magenta :weight 'bold)
+   ;;;; popup
+   (popup-tip-face :background sand :foreground "black")
+   (popup-scroll-bar-foreground-face :background dark-violet)
+   (popup-scroll-bar-background-face :background olive)
+   (popup-isearch-match :background yellow :foreground "black")
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; treemacs
+   (treemacs-directory-face    :foreground base6)
+   (treemacs-git-modified-face :foreground yellow)
+   (treemacs-file-face         :foreground base8)
+   (treemacs-root-face         :foreground blue :weight 'bold)
+   (doom-themes-treemacs-file-face :foreground blue)
+   ;;;; web-mode
+   (web-mode-block-control-face    :foreground orange)
+   (web-mode-block-delimiter-face  :foreground sand)
+   (web-mode-html-attr-equal-face  :foreground fg)
+   (web-mode-html-attr-name-face   :foreground base8)
+   (web-mode-html-tag-bracket-face :foreground sand)
+   (web-mode-html-tag-face         :foreground blue)
+   (web-mode-keyword-face          :foreground blue)
+   (web-mode-variable-name-face    :foreground (doom-lighten constants 0.3)))
+
+  ;;;; Base theme variable overrides-
+  ()
+  )
+
+;;; doom-badger-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-bluloco-dark-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-bluloco-dark-theme.el
new file mode 100644
index 0000000..cdeef49
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-bluloco-dark-theme.el
@@ -0,0 +1,239 @@
+;;; doom-bluloco-dark-theme.el --- ported from VSCode's Bluloco Dark Theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Author: RazikSF <https://github.com/RazikSF>
+;; Maintainer:
+;; Source: https://github.com/uloco/theme-bluloco-dark
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+;;
+;;; Variables
+
+(defgroup doom-bluloco-dark-theme nil
+  "Options for the `doom-bluloco' themes."
+  :group 'doom-themes)
+
+(defcustom doom-bluloco-dark-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to determine the exact padding."
+  :group 'doom-bluloco-dark-theme
+  :type '(choice integer boolean))
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-bluloco-dark
+  "A dark theme inspired by bluloco dark theme"
+  :family 'doom-bluloco
+  :background-mode 'dark
+
+  ;; name        default     256       16
+  ((bg           '("#282c34" "#303030" "black"        ))
+   (fg           '("#abb2bf" "#b2b2b2" "white"        ))
+
+   (bg-alt       '("#23252A" "#262626" "black"        ))
+   (fg-alt       '("#7a808b" "#808080" "white"        ))
+
+   (base0        '("#1e222a" "#262626" "black"        ))
+   (base1        '("#2E333C" "#303030" "brightblack"  ))
+   (base2        '("#404450" "#3a3a3a" "brightblack"  ))
+   (base3        '("#494e57" "#4e4e4e" "brightblack"  ))
+   (base4        '("#595e68" "#5f5f5f" "brightblack"  ))
+   (base5        '("#7a808b" "#808080" "white"  ))
+   (base6        '("#8a919c" "#949494" "white"        ))
+   (base7        '("#9ba1ae" "#9e9e9e" "white"        ))
+   (base8        '("#b5bbc9" "#bcbcbc" "white"        ))
+
+   (grey         '("#636d83" "#5f5f87" "brightblack"  ))
+   (red          '("#ff6480" "#ff5f87" "red"          ))
+   (orange       '("#ff936a" "#ff875f" "brightred"    ))
+   (brown        '("#ce9887" "#d78787" "brown"        ))
+   (green        '("#3fc56b" "#5fd75f" "green"        ))
+   (teal         '("#8bcdef" "#87d7ff" "brightgreen"  ))
+   (yellow       '("#f9c859" "#ffd75f" "yellow"       ))
+   (blue         '("#10b1fe" "#00afff" "brightblue"   ))
+   (dark-blue    '("#3691ff" "#5f87ff" "blue"         ))
+   (magenta      '("#ff78f8" "#ff87ff" "magenta"      ))
+   (violet       '("#9f7efe" "#af87ff" "brightmagenta"))
+   (dark-violet  '("#7a82da" "#8787d7" "brightmagenta"))
+   (cyan         '("#78F8FF" "#87ffff" "brightcyan"   ))
+   (dark-cyan    '("#4d9ea3" "#5fafaf" "brightcyan"   ))
+
+   ;; custom colours
+   (rainbow-red       '("#FF6666"))
+   (rainbow-yellow    '("#f4ff78"))
+   (rainbow-blue      '("#44A5FF"))
+   (rainbow-orange    '("#ffa023"))
+   (rainbow-green     '("#92f535"))
+   (rainbow-violet    '("#ff78ff"))
+   (rainbow-cyan      '("#28e4eb"))
+   (rainbow-indigo    '("#9F7EFE"))
+
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.1))
+   (selection      dark-blue)
+   (builtin        green)
+   (comments       base5)
+   (doc-comments   yellow)
+   (constants      violet)
+   (functions      green)
+   (keywords       blue)
+   (methods        green)
+   (operators      dark-violet)
+   (type           red)
+   (strings        yellow)
+   (variables      teal)
+   (numbers        magenta)
+   (region         `(,(doom-lighten (car bg-alt) 0.15) ,@(doom-lighten (cdr base1) 0.35)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+
+   (modeline-fg              fg)
+   (modeline-fg-alt          base5)
+   (modeline-bg              (doom-darken bg-alt 0.1))
+   (modeline-bg-alt          `(,(doom-darken (car bg-alt) 0.15) ,@(cdr bg)))
+   (modeline-bg-inactive     `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-alt `(,(doom-darken (car bg-alt) 0.1) ,@(cdr bg)))
+
+   (-modeline-pad
+    (when doom-bluloco-dark-padded-modeline
+      (if (integerp doom-bluloco-dark-padded-modeline) doom-bluloco-dark-padded-modeline 4))))
+
+;;;; Base theme face overrides
+
+(((font-lock-operator-face &override) :foreground dark-violet)
+
+   ;; mode-line
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground highlight)
+
+   ;; css-mode / scss-mode
+   (css-proprietary-property :foreground brown :background base2)
+   (css-property             :foreground brown)
+   (css-selector             :foreground dark-blue)
+
+   ;; diredfl
+   (diredfl-date-time :foreground cyan :weight 'normal)
+
+   ;; posframe
+   (ivy-posframe :background base0)
+
+   ;; js2-mode
+   (js2-object-property :foreground brown)
+   (js2-object-property-access :foreground brown)
+
+   ;; latex
+   ((font-latex-math-face &override) :foreground yellow)
+
+   ;; magit
+   (magit-blame-heading :foreground orange :background bg-alt)
+   (magit-diff-removed :foreground (doom-darken red 0.2) :background (doom-blend red bg 0.1))
+   (magit-diff-removed-highlight :foreground red :background (doom-blend red bg 0.2) :bold bold)
+
+   ;; markdown
+   ((markdown-blockquote-face &override) :foreground violet)
+   ((markdown-bold-face &override) :foreground red :weight 'bold)
+   ((markdown-code-face &override) :foreground brown :background bg-alt)
+   ((markdown-header-face &override) :inherit 'bold :foreground yellow)
+   ((markdown-italic-face &override) :foreground orange :slant 'italic)
+   ((markdown-link-face &override) :foreground dark-blue :underline t)
+   ((markdown-markup-face &override) :foreground red)
+   ((markdown-metadata-key-face &override) :foreground brown)
+   ((markdown-pre-face &override) :foreground brown)
+   ((markdown-url-face &override) :foreground blue)
+   (markdown-footnote-marker-face :foreground dark-blue)
+   (markdown-language-keyword-face :foreground brown)
+   (markdown-strike-through-face :foreground grey :strike-through t)
+
+   ;; outline
+   ((outline-1 &override) :foreground rainbow-red)
+   ((outline-2 &override) :foreground rainbow-yellow)
+   ((outline-3 &override) :foreground rainbow-blue)
+   ((outline-4 &override) :foreground rainbow-orange)
+   ((outline-5 &override) :foreground rainbow-green)
+   ((outline-6 &override) :foreground rainbow-violet)
+   ((outline-7 &override) :foreground rainbow-cyan)
+   ((outline-8 &override) :foreground rainbow-indigo)
+
+   ;; org-mode
+   ((org-block &override) :background bg-alt)
+   ((org-code &override) :foreground brown :background bg)
+   ((org-document-title &override) :inherit 'bold :foreground green :height 1.25)
+   ((org-link &override) :foreground dark-blue :weight 'normal)
+   ((org-meta-line &override) :foreground yellow)
+   ((org-quote &override) :foreground violet :background bg-alt)
+   ((org-table &override) :foreground brown)
+   ((org-verbatim &override) :foreground brown :background bg)
+   (org-ellipsis :underline nil :background bg)
+   (org-level-1 :inherit 'bold :foreground rainbow-red :height 1.2)
+   (org-level-2 :inherit 'bold :foreground rainbow-yellow :height 1.15)
+   (org-level-3 :inherit 'bold :foreground rainbow-blue :height 1.1)
+   (org-level-4 :inherit 'bold :foreground rainbow-orange :height 1.05)
+   (org-level-5 :inherit 'bold :foreground rainbow-green)
+   (org-level-6 :inherit 'bold :foreground rainbow-violet)
+   (org-level-7 :inherit 'bold :foreground rainbow-cyan)
+   (org-level-8 :inherit 'bold :foreground rainbow-indigo)
+   (org-macro :foreground dark-violet)
+
+   ;; org-modern-indent
+   (org-modern-indent-line :inherit 'org-block-begin-line)
+
+   ;; rainbow delimiters
+   (rainbow-delimiters-depth-1-face :foreground rainbow-red)
+   (rainbow-delimiters-depth-2-face :foreground rainbow-yellow)
+   (rainbow-delimiters-depth-3-face :foreground rainbow-blue)
+   (rainbow-delimiters-depth-4-face :foreground rainbow-orange)
+   (rainbow-delimiters-depth-5-face :foreground rainbow-green)
+   (rainbow-delimiters-depth-6-face :foreground rainbow-violet)
+   (rainbow-delimiters-depth-7-face :foreground rainbow-cyan)
+   (rainbow-delimiters-depth-8-face :foreground rainbow-indigo)
+
+   ;; selectrum
+   (selectrum-current-candidate :background base1)
+
+   ;; solaire-mode
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt)))
+
+   ;; tree-sitter
+   (tree-sitter-hl-face:constant.builtin :foreground violet)
+   (tree-sitter-hl-face:escape :foreground orange)
+   (tree-sitter-hl-face:function.call :foreground functions)
+   (tree-sitter-hl-face:function.special :foreground operators)
+   (tree-sitter-hl-face:label :foreground variables)
+   (tree-sitter-hl-face:number :foreground numbers)
+   (tree-sitter-hl-face:operator :foreground operators)
+   (tree-sitter-hl-face:property :foreground brown :slant 'italic)
+   (tree-sitter-hl-face:punctution :foreground operators)
+   (tree-sitter-hl-face:tag :foreground keywords)
+   (tree-sitter-hl-face:type :foreground type)
+   (tree-sitter-hl-face:type.builtin :foreground type)
+
+   ;; vertico
+   (vertico-current :background base1)
+
+   ;; web-mode
+   (web-mode-html-entity-face :foreground violet)
+   (web-mode-html-attr-name-face :foreground orange)
+   (web-mode-html-tag-bracket-face :foreground dark-blue)
+   (web-mode-html-tag-face :foreground dark-blue))
+
+;;;; Base theme variable overrides-
+())
+
+;;; doom-bluloco-dark-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-bluloco-light-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-bluloco-light-theme.el
new file mode 100644
index 0000000..ffdcd22
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-bluloco-light-theme.el
@@ -0,0 +1,245 @@
+;;; doom-bluloco-light-theme.el --- ported from VSCode's Bluloco Light Theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Author: RazikSF <https://github.com/RazikSF>
+;; Maintainer:
+;; Source: https://github.com/uloco/theme-bluloco-light
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+;;
+;;; Variables
+
+(defgroup doom-bluloco-light-theme nil
+  "Options for the `doom-bluloco' themes."
+  :group 'doom-themes)
+
+(defcustom doom-bluloco-light-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to determine the exact padding."
+  :group 'doom-bluloco-light-theme
+  :type '(choice integer boolean))
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-bluloco-light
+  "A light theme inspired by bluloco light theme"
+  :family 'doom-bluloco
+  :background-mode 'light
+
+  ;; name        default     256       16
+  ((bg           '("#f9f9f9" "white"   "white"        ))
+   (fg           '("#383a42" "#424242" "black"        ))
+
+   (bg-alt       '("#e7e7e7" "white"   "white"        ))
+   (fg-alt       '("#c6c7c7" "#c7c7c7" "brightblack"  ))
+
+   (base0        '("#f1f1f1" "#f0f0f0" "white"        ))
+   (base1        '("#e7e7e7" "#e7e7e7" "brightblack"  ))
+   (base2        '("#dfdfdf" "#dfdfdf" "brightblack"  ))
+   (base3        '("#c6c7c7" "#c6c7c7" "brightblack"  ))
+   (base4        '("#9ca0a4" "#9ca0a4" "brightblack"  ))
+   (base5        '("#383a42" "#424242" "brightblack"  ))
+   (base6        '("#202328" "#2e2e2e" "brightblack"  ))
+   (base7        '("#1c1f24" "#1e1e1e" "brightblack"  ))
+   (base8        '("#1b2229" "black"   "black"        ))
+
+   (grey         '("#a0a1a7" "#a0a1a7" "brightblack"  ))
+   (red          '("#d52753" "#d7005f" "red"          ))
+   (orange       '("#df631c" "#d75f00" "brightred"    ))
+   (brown        '("#a05a48" "#af5f5f" "brown"        ))
+   (green        '("#23974a" "#00875f" "green"        ))
+   (teal         '("#40B8C5" "#5fafd7" "brightgreen"  ))
+   (yellow       '("#c5a332" "#d7af5f" "yellow"       ))
+   (blue         '("#0098dd" "#0087d7" "brightblue"   ))
+   (dark-blue    '("#275fe4" "#005fd7" "blue"         ))
+   (magenta      '("#ce33c0" "#d75faf" "magenta"      ))
+   (violet       '("#823ff1" "#875fff" "brightmagenta"))
+   (dark-violet  '("#7a82da" "#8787d7" "brightmagenta"))
+   (cyan         '("#33c0ce" "#5fafd7" "brightcyan"   ))
+   (dark-cyan    '("#217b84" "#008080" "brightcyan"   ))
+
+   ;; custom colours
+   (rainbow-red       '("#f067f0"))
+   (rainbow-yellow    '("#B3BA00"))
+   (rainbow-blue      '("#0ab6ff"))
+   (rainbow-orange    '("#ffa023"))
+   (rainbow-green     '("#1fc255"))
+   (rainbow-violet    '("#a557ff"))
+   (rainbow-cyan      '("#0e91a8"))
+   (rainbow-indigo    '("#383A42"))
+
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.1))
+   (selection      dark-blue)
+   (builtin        green)
+   (comments       grey)
+   (doc-comments   yellow)
+   (constants      violet)
+   (functions      green)
+   (keywords       blue)
+   (methods        green)
+   (operators      dark-violet)
+   (type           red)
+   (strings        yellow)
+   (variables      teal)
+   (numbers        magenta)
+   (region         `(,(doom-darken (car bg-alt) 0.075) ,@(doom-darken (cdr base0) 0.075)))
+   (error          red)
+   (warning        orange)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+
+   (modeline-fg               fg)
+   (modeline-fg-alt           (doom-blend violet base4 0.2))
+   (modeline-bg               base1)
+   (modeline-bg-alt           base2)
+   (modeline-bg-inactive      (doom-darken bg 0.1))
+   (modeline-bg-alt-inactive  `(,(doom-darken (car bg-alt) 0.05) ,@(cdr base1)))
+
+   (-modeline-pad
+    (when doom-bluloco-light-padded-modeline
+      (if (integerp doom-bluloco-light-padded-modeline) doom-bluloco-light-padded-modeline 4))))
+
+;;;; Base theme face overrides
+
+(((font-lock-operator-face &override) :foreground dark-violet)
+
+   ;; line-number
+   (line-number :foreground comments)
+   (line-number-current-line :foreground comments)
+
+   ;; mode-line
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground highlight)
+
+   ;; css-mode / scss-mode
+   (css-proprietary-property :foreground brown :background base2)
+   (css-property             :foreground brown)
+   (css-selector             :foreground dark-blue)
+
+   ;; diredfl
+   (diredfl-date-time :foreground cyan :weight 'normal)
+
+   ;; posframe
+   (ivy-posframe :background base2)
+
+   ;; js2-mode
+   (js2-object-property :foreground brown)
+   (js2-object-property-access :foreground brown)
+
+   ;; latex
+   ((font-latex-math-face &override) :foreground yellow)
+
+   ;; magit
+   (magit-blame-heading :foreground orange :background bg-alt)
+   (magit-diff-removed :foreground (doom-darken red 0.2) :background (doom-blend red bg 0.1))
+   (magit-diff-removed-highlight :foreground red :background (doom-blend red bg 0.2) :bold bold)
+
+   ;; markdown
+   ((markdown-blockquote-face &override) :foreground violet)
+   ((markdown-bold-face &override) :foreground red :weight 'bold)
+   ((markdown-code-face &override) :foreground brown :background (doom-lighten base1 0.3))
+   ((markdown-header-face &override) :inherit 'bold :foreground yellow)
+   ((markdown-italic-face &override) :foreground orange :slant 'italic)
+   ((markdown-link-face &override) :foreground dark-blue :underline t)
+   ((markdown-markup-face &override) :foreground dark-violet)
+   ((markdown-metadata-key-face &override) :foreground brown)
+   ((markdown-pre-face &override) :foreground brown)
+   ((markdown-url-face &override) :foreground blue)
+   (markdown-footnote-marker-face :foreground dark-blue)
+   (markdown-language-keyword-face :foreground brown)
+   (markdown-strike-through-face :foreground grey :strike-through t)
+
+   ;; outline
+   ((outline-1 &override) :foreground rainbow-red)
+   ((outline-2 &override) :foreground rainbow-yellow)
+   ((outline-3 &override) :foreground rainbow-blue)
+   ((outline-4 &override) :foreground rainbow-orange)
+   ((outline-5 &override) :foreground rainbow-green)
+   ((outline-6 &override) :foreground rainbow-violet)
+   ((outline-7 &override) :foreground rainbow-cyan)
+   ((outline-8 &override) :foreground rainbow-indigo)
+
+   ;; org-mode
+   ((org-block &override) :background (doom-lighten base1 0.3))
+   ((org-code &override) :foreground brown :background bg)
+   ((org-document-title &override) :inherit 'bold :foreground green :height 1.25)
+   ((org-link &override) :foreground dark-blue :weight 'normal)
+   ((org-meta-line &override) :foreground yellow)
+   ((org-quote &override) :foreground violet :background bg-alt)
+   ((org-table &override) :foreground brown)
+   ((org-verbatim &override) :foreground brown :background bg)
+   (org-ellipsis :underline nil :background bg)
+   (org-level-1 :inherit 'bold :foreground rainbow-red :height 1.2)
+   (org-level-2 :inherit 'bold :foreground rainbow-yellow :height 1.15)
+   (org-level-3 :inherit 'bold :foreground rainbow-blue :height 1.1)
+   (org-level-4 :inherit 'bold :foreground rainbow-orange :height 1.05)
+   (org-level-5 :inherit 'bold :foreground rainbow-green)
+   (org-level-6 :inherit 'bold :foreground rainbow-violet)
+   (org-level-7 :inherit 'bold :foreground rainbow-cyan)
+   (org-level-8 :inherit 'bold :foreground rainbow-indigo)
+
+   ;; org-modern-indent
+   (org-modern-indent-line :inherit 'org-block-begin-line)
+
+   ;; rainbow delimiters
+   (rainbow-delimiters-depth-1-face :foreground rainbow-red)
+   (rainbow-delimiters-depth-2-face :foreground rainbow-yellow)
+   (rainbow-delimiters-depth-3-face :foreground rainbow-blue)
+   (rainbow-delimiters-depth-4-face :foreground rainbow-orange)
+   (rainbow-delimiters-depth-5-face :foreground rainbow-green)
+   (rainbow-delimiters-depth-6-face :foreground rainbow-violet)
+   (rainbow-delimiters-depth-7-face :foreground rainbow-cyan)
+   (rainbow-delimiters-depth-8-face :foreground rainbow-indigo)
+
+   ;; selectrum
+   (selectrum-current-candidate :background base2)
+
+   ;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-alt-inactive
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt-inactive)))
+
+   ;; tree-sitter
+   (tree-sitter-hl-face:constant.builtin :foreground violet)
+   (tree-sitter-hl-face:escape :foreground orange)
+   (tree-sitter-hl-face:function.call :foreground functions)
+   (tree-sitter-hl-face:function.special :foreground operators)
+   (tree-sitter-hl-face:label :foreground variables)
+   (tree-sitter-hl-face:number :foreground numbers)
+   (tree-sitter-hl-face:operator :foreground operators)
+   (tree-sitter-hl-face:property :foreground brown :slant 'italic)
+   (tree-sitter-hl-face:punctution :foreground operators)
+   (tree-sitter-hl-face:tag :foreground keywords)
+   (tree-sitter-hl-face:type :foreground type)
+
+   ;;vertico
+   (vertico-current :background base2)
+
+   ;; web-mode
+   (web-mode-html-entity-face :foreground violet)
+   (web-mode-html-attr-name-face :foreground orange)
+   (web-mode-html-tag-bracket-face :foreground dark-blue)
+   (web-mode-html-tag-face :foreground dark-blue))
+
+;;;; Base theme variable overrides-
+())
+
+;;; doom-bluloco-light-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-challenger-deep-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-challenger-deep-theme.el
new file mode 100644
index 0000000..18134ff
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-challenger-deep-theme.el
@@ -0,0 +1,172 @@
+;;; doom-challenger-deep-theme.el --- inspired by Vim's Challenger Deep theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: April 5, 2016 (#163)
+;; Author: fuxialexander <https://github.com/fuxialexander>
+;; Maintainer:
+;; Source: https://github.com/challenger-deep-theme/vim
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-challenger-deep-theme nil
+  "Options for the `doom-challenger-deep' theme."
+  :group 'doom-themes)
+
+(defcustom doom-challenger-deep-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-challenger-deep-theme
+  :type 'boolean)
+
+(defcustom doom-challenger-deep-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-challenger-deep-theme
+  :type 'boolean)
+
+(defcustom doom-challenger-deep-comment-bg doom-challenger-deep-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-challenger-deep-theme
+  :type 'boolean)
+
+(defcustom doom-challenger-deep-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-challenger-deep-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-challenger-deep
+  "A dark theme inspired by VIM Challenger Deep"
+
+  ;; name        default   256       16
+  ((bg         '("#1E1C31" "#121212" "black"        ))
+   (bg-alt     '("#12111E" "#111111" "black"        ))
+   (base0      '("#100E23" "#080808" "black"        ))
+   (base1      '("#292F37" "#262626" "brightblack"  ))
+   (base2      '("#3D4551" "#3A3A3A" "brightblack"  ))
+   (base3      '("#4C4B68" "#444466" "brightblack"  ))
+   (base4      '("#565575" "#555577" "brightblack"  ))
+   (base5      '("#858FA5" "#8888AA" "brightblack"  ))
+   (base6      '("#9BA7BF" "#99AABB" "brightblack"  ))
+   (base7      '("#B0BED8" "#BBBBDD" "brightblack"  ))
+   (base8      '("#BAC9E4" "#BBCCEE" "white"        ))
+   (fg-alt     '("#B2B2B2" "#BBBBBB" "brightwhite"  ))
+   (fg         '("#CBE3E7" "#CCEEEE" "white"        ))
+
+   (grey       base4)
+   (red        '("#FF8080" "#FF8888" "red"          ))
+   (orange     '("#FFB378" "#FFBB77" "brightred"    ))
+   (green      '("#95FFA4" "#99FFAA" "green"        ))
+   (teal       '("#63F2F1" "#66FFFF" "brightgreen"  ))
+   (yellow     '("#FFE9AA" "#FFEEAA" "yellow"       ))
+   (blue       '("#91DDFF" "#99DDFF" "brightblue"   ))
+   (dark-blue  '("#65B2FF" "#66BBFF" "blue"         ))
+   (magenta    '("#C991E1" "#CC99EE" "magenta"      ))
+   (violet     '("#906CFF" "#9966FF" "brightmagenta"))
+   (cyan       '("#AAFFE4" "#AAFFEE" "brightcyan"   ))
+   (dark-cyan  '("#62D196" "#66DD99" "cyan"   ))
+
+   ;; face categories -- required for all themes
+   (highlight      violet)
+   (vertical-bar base1)
+   (selection      violet)
+   (builtin        magenta)
+   (comments       (if doom-challenger-deep-brighter-comments dark-blue base4))
+   (doc-comments   (if doom-challenger-deep-brighter-comments (doom-darken dark-cyan 0.3) base5) )
+   (constants      cyan)
+   (functions      magenta)
+   (keywords       red)
+   (methods        magenta)
+   (operators      teal)
+   (type           blue)
+   (strings        yellow)
+   (variables      yellow)
+   (numbers        orange)
+   (region         base2)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-challenger-deep-brighter-modeline)
+   (-modeline-pad
+    (when doom-challenger-deep-padded-modeline
+      (if (integerp doom-challenger-deep-padded-modeline) doom-challenger-deep-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.1) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.15) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(car bg) ,@(cdr base1)))
+   (modeline-bg-inactive-l (doom-darken bg 0.1)))
+
+
+  ;;;; Base theme face overrides
+  (((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   ((font-lock-comment-face &override)
+    :background (if doom-challenger-deep-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   ((secondary-selection &override) :background base0)
+   (tooltip :background base0 :foreground fg)
+
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground blue :background 'unspecified)
+   ;;;; org <built-in>
+   ((org-block &override) :background base1)
+   ((org-block-begin-line &override) :background base1 :foreground comments)
+   (org-hide :foreground hidden)
+   (org-link :foreground orange :underline t :weight 'bold)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l))))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-challenger-deep-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-city-lights-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-city-lights-theme.el
new file mode 100644
index 0000000..3976d11
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-city-lights-theme.el
@@ -0,0 +1,191 @@
+;;; doom-city-lights-theme.el --- inspired by Atom's City Lights theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: March 8, 2018 (7d6ff334c45a)
+;; Author: fuxialexander <https://github.com/fuxialexander>
+;; Maintainer:
+;; Source: https://citylights.xyz
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-city-lights-theme nil
+  "Options for the `doom-city-lights' theme."
+  :group 'doom-themes)
+
+(defcustom doom-city-lights-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-city-lights-theme
+  :type 'boolean)
+
+(defcustom doom-city-lights-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-city-lights-theme
+  :type 'boolean)
+
+(defcustom doom-city-lights-comment-bg doom-city-lights-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-city-lights-theme
+  :type 'boolean)
+
+(defcustom doom-city-lights-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-city-lights-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-city-lights
+  "A dark theme inspired by Atom City Lights"
+
+  ;; name        default   256       16
+  ((bg         '("#1D252C" nil       nil            ))
+   (bg-alt     '("#181E24" nil       nil            ))
+   (base0      '("#10151C" "black"   "black"        ))
+   (base1      '("#171D22" "#111122" "brightblack"  ))
+   (base2      '("#20282F" "#222222" "brightblack"  ))
+   (base3      '("#28323B" "#223333" "brightblack"  ))
+   (base4      '("#384551" "#334455" "brightblack"  ))
+   (base5      '("#56697A" "#556677" "brightblack"  ))
+   (base6      '("#688094" "#668899" "brightblack"  ))
+   (base7      '("#7FA0B7" "#77AABB" "brightblack"  ))
+   (base8      '("#9CAABB" "#99AABB" "white"        ))
+   (fg-alt     '("#728CA0" "#7788AA" "brightwhite"  ))
+   (fg         '("#A0B3C5" "#AABBCC" "white"        ))
+
+   (grey        '("#41505E" "#ff6655" "red"          ))
+   (red         '("#D95468" "#ff6655" "red"          ))
+   (orange      '("#D98E48" "#dd8844" "brightred"    ))
+   (green       '("#8BD49C" "#99bb66" "green"        ))
+   (teal        '("#33CED8" "#33CCDD" "brightgreen"  ))
+   (yellow      '("#EBBF83" "#EEBB88" "yellow"       ))
+   (blue        '("#5EC4FF" "#55CCFF" "brightblue"   ))
+   (bright-blue '("#539AFC" "#5599FF" "blue"         ))
+   (dark-blue   '("#718CA1" "#7788AA" "blue"         ))
+   (magenta     '("#E27E8D" "#EE7788" "magenta"      ))
+   (violet      '("#B62D65" "#BB2266" "brightmagenta"))
+   (cyan        '("#70E1E8" "#77EEEE" "brightcyan"   ))
+   (dark-cyan   '("#008B94" "#008899" "cyan"   ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.5))
+   (selection      dark-blue)
+   (builtin        blue)
+   (comments       (if doom-city-lights-brighter-comments dark-cyan grey))
+   (doc-comments   (doom-lighten (if doom-city-lights-brighter-comments dark-cyan grey) 0.25))
+   (constants      magenta)
+   (functions      teal)
+   (keywords       blue)
+   (methods        cyan)
+   (operators      blue)
+   (type           yellow)
+   (strings        bright-blue)
+   (variables      dark-blue)
+   (numbers        magenta)
+   (region         base3)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-city-lights-brighter-modeline)
+   (-modeline-pad
+    (when doom-city-lights-padded-modeline
+      (if (integerp doom-city-lights-padded-modeline) doom-city-lights-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.15) ,@(cdr base0))))
+   (modeline-bg-l modeline-bg)
+   (modeline-bg-inactive   `(,(car bg) ,@(cdr base1)))
+   (modeline-bg-inactive-l (doom-darken bg 0.1)))
+
+
+  ;;;; Base theme face overrides
+  (((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   ((font-lock-comment-face &override)
+    :background (if doom-city-lights-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis
+    :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; company
+   (company-tooltip-selection     :background base3)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; magit
+   (magit-diff-hunk-heading-highlight :foreground fg :background base4 :weight 'bold)
+   (magit-diff-hunk-heading :foreground fg-alt :background base3 :weight 'normal)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   (markdown-url-face    :foreground teal :weight 'normal)
+   (markdown-reference-face :foreground base6)
+   ((markdown-bold-face &override)   :foreground fg)
+   ((markdown-italic-face &override) :foreground fg-alt)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground blue)
+   ((outline-2 &override) :foreground green)
+   ((outline-3 &override) :foreground teal)
+   ((outline-4 &override) :foreground (doom-darken blue 0.2))
+   ((outline-5 &override) :foreground (doom-darken green 0.2))
+   ((outline-6 &override) :foreground (doom-darken teal 0.2))
+   ((outline-7 &override) :foreground (doom-darken blue 0.4))
+   ((outline-8 &override) :foreground (doom-darken green 0.4))
+   ;;;; org <built-in>
+   ((org-block &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   (org-hide :foreground hidden)
+   ;;;; ivy
+   (ivy-minibuffer-match-face-2 :foreground blue :weight 'bold)
+   ;;;; js2-mode
+   (js2-object-property :foreground dark-blue)
+   (js2-object-property-access :foreground dark-cyan)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground dark-cyan)
+   (rjsx-attr :foreground cyan :slant 'italic :weight 'medium)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l))))
+
+  ;;;; Base theme variable overrides-
+  ()
+  )
+
+;;; doom-city-lights-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-dark+-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-dark+-theme.el
new file mode 100644
index 0000000..00c70f2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-dark+-theme.el
@@ -0,0 +1,201 @@
+;;; doom-dark+-theme.el --- ported from equinusocio's VSCode Theme, dark+ -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: January 20, 2020 (b0c255037cbd)
+;; Author: ema2159 <https://github.com/ema2159>
+;; Maintainer:
+;; Source:
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-dark+-theme nil
+  "Options for the `doom-dark' theme."
+  :group 'doom-themes)
+
+(defcustom doom-dark+-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-dark+-theme
+  :type '(choice integer boolean))
+
+(defcustom doom-dark+-blue-modeline nil
+  "If non-nil, mode-line's color will be blue instead of the default purple."
+  :group 'doom-dark+-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-dark+
+  "A dark theme inspired by dark+ Theme by equinusocio"
+
+  ;; name        default   256       16
+  ((bg         '("#1e1e1e" "#1e1e1e" nil))
+   (bg-alt     '("#252526" "#222222"  nil))
+   (base0      '("#171F24" "#111122"   "black"))
+   (base1      '("#1C1C1C" "#1C1C1C" "brightblack"))
+   (base2      '("#121212" "#626262" "brightblack"))
+   (base3      '("#313131" "#3a3a3a" "brightblack"))
+   (base4      '("#4b474c" "#444444" "brightblack"))
+   (base5      '("#37474F" "#585858" "brightblack"))
+   (base6      '("#237AD3" "#2277DD" "brightblack"))
+   (base7      '("#777778" "#767676" "brightblack"))
+   (base8      '("#f4f4f4" "#a8a8a8" "white"))
+   (fg         '("#d4d4d4" "#e4e4e4" "brightwhite"))
+   (fg-alt     '("#AEAFAD" "#bcbcbc" "white"))
+
+   (grey base7)
+   (red          '("#D16969" "#DD6666" "red"))
+   (orange       '("#DB8E73" "#DD8877" "brightred"))
+   (green        '("#579C4C" "#559944" "green"))
+   (light-green  '("#B5CEA8" "#BBCCAA" "green"))
+   (teal         '("#35CDAF" "#33CCAA" "brightgreen"))
+   (yellow       '("#D7BA7D" "#DDBB77" "brightyellow"))
+   (light-yellow '("#D9DAA2" "#DDDDAA" "brightyellow"))
+   (blue         '("#339CDB" "#3399DD" "brightblue"))
+   (dark-blue    '("#124F7B" "#114477" "blue"))
+   (magenta      '("#C586C0" "#CC88CC" "brightmagenta"))
+   (violet       '("#BB80B3" "#BB88BB" "magenta"))
+   (dark-violet  '("#68217A" "#662277" "magenta"))
+   (cyan         '("#85DDFF" "#5FD7FF" "brightcyan"))
+   (dark-cyan    '("#207FA1" "#2277AA" "cyan"))
+
+   ;; face categories -- required for all themes
+   (highlight      base6)
+   (vertical-bar   bg-alt)
+   (selection      base4)
+   (builtin        magenta)
+   (comments       green)
+   (doc-comments   base7)
+   (constants      blue)
+   (functions      light-yellow)
+   (keywords       blue)
+   (methods        light-yellow)
+   (operators      cyan)
+   (type           teal)
+   (strings        orange)
+   (variables      cyan)
+   (numbers        light-green)
+   (region         (doom-darken base6 0.5))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    blue)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (modeline-bg     (if doom-dark+-blue-modeline base6 dark-violet))
+   (modeline-bg-alt (doom-darken bg 0.01))
+   (modeline-fg     base8)
+   (modeline-fg-alt blue)
+
+   (-modeline-pad
+    (when doom-dark+-padded-modeline
+      (if (integerp doom-dark+-padded-modeline) doom-dark+-padded-modeline 4))))
+
+  ;;;; Base theme face overrides
+  ((lazy-highlight :background base4 :foreground fg :distant-foreground fg :weight 'bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (mode-line-emphasis
+    :foreground fg
+    :weight 'bold)
+
+   ;;;; all-the-icons
+   (all-the-icons-dblue :foreground blue)
+   ;;;; centaur-tabs
+   (centaur-tabs-active-bar-face :background base6)
+   (centaur-tabs-selected-modified
+    :inherit 'centaur-tabs-selected :foreground fg :weight 'bold)
+   (centaur-tabs-unselected-modified
+    :inherit 'centaur-tabs-unselected :foreground fg :weight 'bold)
+   (centaur-tabs-modified-marker-selected
+    :inherit 'centaur-tabs-selected :foreground fg)
+   (centaur-tabs-modified-marker-unselected
+    :inherit 'centaur-tabs-unselected :foreground fg)
+   ;;;; company
+   (company-tooltip-selection     :background region)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; dashboard
+   (dashboard-heading :foreground green :weight 'bold)
+   ;;;; dired-k
+   (dired-k-commited :foreground base4)
+   (dired-k-modified :foreground vc-modified)
+   (dired-k-ignored :foreground cyan)
+   (dired-k-added    :foreground vc-added)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if doom-dark+-blue-modeline base6 dark-violet))
+   (doom-modeline-buffer-file :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path)
+   (doom-modeline-buffer-modified :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-debug :inherit 'mode-line-emphasis)
+   (doom-modeline-evil-insert-state :foreground cyan)
+   (doom-modeline-evil-visual-state :foreground yellow)
+   (doom-modeline-info :inherit 'mode-line-emphasis)
+   (doom-modeline-lsp-success :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-persp-name :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-project-dir :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-project-parent-dir :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-urgent :inherit 'mode-line-emphasis)
+   (doom-modeline-warning :inherit 'mode-line-emphasis)
+   ;;;; ivy
+   (counsel-active-mode :foreground (doom-lighten base6 0.1))
+   (ivy-minibuffer-match-face-2 :foreground (doom-lighten base6 0.1) :weight 'extra-bold)
+   ;;;; js2-mode
+   (js2-jsdoc-tag              :foreground magenta)
+   (js2-object-property        :foreground cyan)
+   (js2-object-property-access :foreground cyan)
+   (js2-function-param         :foreground violet)
+   (js2-jsdoc-type             :foreground base8)
+   (js2-jsdoc-value            :foreground cyan)
+   ;;;; lsp-mode
+   (lsp-lens-face              :foreground base7 :height 0.8)
+   ;;;; man <built-in>
+   (Man-overstrike :inherit 'bold :foreground magenta)
+   (Man-underline :inherit 'underline :foreground blue)
+   ;;;; org <built-in>
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;; org-pomodoro
+   (org-pomodoro-mode-line :inherit 'mode-line-emphasis) ; unreadable otherwise
+   (org-pomodoro-mode-line-overtime :inherit 'org-pomodoro-mode-line)
+   (org-pomodoro-mode-line-break :inherit 'org-pomodoro-mode-line)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground magenta)
+   (rainbow-delimiters-depth-2-face :foreground orange)
+   (rainbow-delimiters-depth-3-face :foreground green)
+   (rainbow-delimiters-depth-4-face :foreground cyan)
+   (rainbow-delimiters-depth-5-face :foreground violet)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground blue)
+   (rainbow-delimiters-depth-8-face :foreground teal)
+   (rainbow-delimiters-depth-9-face :foreground dark-cyan)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground blue)
+   (rjsx-attr :foreground cyan :slant 'italic :weight 'medium)
+   ;;;; tooltip
+   (tooltip :background base2 :foreground fg)
+   ;;;; treemacs
+   (treemacs-root-face :foreground fg :weight 'ultra-bold :height 1.2)
+   (doom-themes-treemacs-root-face :foreground fg :weight 'ultra-bold :height 1.2)
+   (doom-themes-treemacs-file-face :foreground fg)
+   (treemacs-directory-face :foreground fg)
+   (treemacs-git-modified-face :foreground blue)))
+
+;;; doom-dark+-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-dracula-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-dracula-theme.el
new file mode 100644
index 0000000..bc95467
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-dracula-theme.el
@@ -0,0 +1,266 @@
+;;; doom-dracula-theme.el --- inspired by the popular Dracula theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: March 8, 2018 (1337e9b2c4bb)
+;; Author: fuxialexander <https://github.com/fuxialexander>
+;; Maintainer: hlissner <https://github.com/hlissner>
+;; Source: https://draculatheme.com
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-dracula-theme nil
+  "Options for the `doom-dracula' theme."
+  :group 'doom-themes)
+
+(defcustom doom-dracula-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-dracula-theme
+  :type 'boolean)
+
+(defcustom doom-dracula-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-dracula-theme
+  :type 'boolean)
+
+(defcustom doom-dracula-colorful-headers nil
+  "If non-nil, headers in org-mode will be more colorful; which is truer to the
+original Dracula Emacs theme."
+  :group 'doom-dracula-theme
+  :type 'boolean)
+
+(defcustom doom-dracula-comment-bg doom-dracula-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-dracula-theme
+  :type 'boolean)
+
+(defcustom doom-dracula-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-dracula-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-dracula
+  "A dark theme based on Dracula theme"
+
+  ;; name        default   256       16
+  ((bg         '("#282a36" "#262626" "black"        ))
+   (bg-alt     '("#1E2029" "#1c1c1c" "black"        ))
+   (base0      '("#1E2029" "#1c1c1c" "black"        ))
+   (base1      '("#282a36" "#1e1e1e" "brightblack"  ))
+   (base2      '("#373844" "#2e2e2e" "brightblack"  ))
+   (base3      '("#44475a" "#262626" "brightblack"  ))
+   (base4      '("#565761" "#3f3f3f" "brightblack"  ))
+   (base5      '("#6272a4" "#525252" "brightblack"  ))
+   (base6      '("#b6b6b2" "#bbbbbb" "brightblack"  ))
+   (base7      '("#ccccc7" "#cccccc" "brightblack"  ))
+   (base8      '("#f8f8f2" "#dfdfdf" "white"        ))
+   (fg         '("#f8f8f2" "#ffffff" "white"        ))
+   (fg-alt     '("#e2e2dc" "#bfbfbf" "brightwhite"  ))
+
+   (grey       base4)
+   (red        '("#ff5555" "#ff6655" "red"          ))
+   (orange     '("#ffb86c" "#ffbb66" "brightred"    ))
+   (green      '("#50fa7b" "#55ff77" "green"        ))
+   (teal       '("#0189cc" "#0088cc" "brightgreen"  ))
+   (yellow     '("#f1fa8c" "#ffff88" "yellow"       ))
+   (blue       '("#61bfff" "#66bbff" "brightblue"   ))
+   (dark-blue  '("#0189cc" "#0088cc" "blue"         ))
+   (magenta    '("#ff79c6" "#ff77cc" "magenta"      ))
+   (violet     '("#bd93f9" "#bb99ff" "brightmagenta"))
+   (cyan       '("#8be9fd" "#88eeff" "brightcyan"   ))
+   (dark-cyan  '("#8be9fd" "#88eeff" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      violet)
+   (vertical-bar   (doom-darken base1 0.1))
+   (selection      dark-blue)
+   (builtin        orange)
+   (comments       (if doom-dracula-brighter-comments dark-cyan base5))
+   (doc-comments   (doom-lighten (if doom-dracula-brighter-comments dark-cyan base5) 0.25))
+   (constants      cyan)
+   (functions      green)
+   (keywords       magenta)
+   (methods        teal)
+   (operators      violet)
+   (type           violet)
+   (strings        yellow)
+   (variables      (doom-lighten magenta 0.6))
+   (numbers        violet)
+   (region         `(,(car base3) ,@(cdr base1)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (level1 magenta)
+   (level2 violet)
+   (level3 (if doom-dracula-colorful-headers green   (doom-lighten violet 0.35)))
+   (level4 (if doom-dracula-colorful-headers yellow  (doom-lighten magenta 0.35)))
+   (level5 (if doom-dracula-colorful-headers cyan    (doom-lighten violet 0.6)))
+   (level6 (if doom-dracula-colorful-headers orange  (doom-lighten magenta 0.6)))
+   (level7 (if doom-dracula-colorful-headers blue    (doom-lighten violet 0.85)))
+   (level8 (if doom-dracula-colorful-headers magenta (doom-lighten magenta 0.85)))
+   (level9 (if doom-dracula-colorful-headers violet  (doom-lighten violet 0.95)))
+
+   (-modeline-bright doom-dracula-brighter-modeline)
+   (-modeline-pad
+    (when doom-dracula-padded-modeline
+      (if (integerp doom-dracula-padded-modeline) doom-dracula-padded-modeline 4)))
+
+   (region-alt `(,(car base3) ,@(cdr base4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken magenta 0.6)
+      `(,(doom-darken (car bg) 0.15) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken  magenta 0.675)
+      `(,(car bg) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(doom-darken (car bg) 0.075) ,@(cdr base1)))
+   (modeline-bg-inactive-l (doom-darken bg 0.1)))
+
+
+  ;;;; Base theme face overrides
+  (((line-number &override) :foreground base5)
+   ((line-number-current-line &override) :foreground fg)
+   ((font-lock-comment-face &override)
+    :background (if doom-dracula-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; company
+   (company-tooltip-selection     :background base3)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground violet)
+   (css-property             :foreground violet)
+   (css-selector             :foreground green)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; helm
+   (helm-bookmark-w3m :foreground violet)
+   (helm-buffer-not-saved :foreground violet)
+   (helm-buffer-process :foreground orange)
+   (helm-buffer-saved-out :foreground fg)
+   (helm-buffer-size :foreground fg)
+   (helm-candidate-number :foreground bg :background fg)
+   (helm-ff-directory :foreground green :weight 'bold)
+   (helm-ff-executable :foreground dark-blue :inherit 'italic)
+   (helm-ff-invalid-symlink :foreground magenta :weight 'bold)
+   (helm-ff-prefix :foreground bg :background magenta)
+   (helm-ff-symlink :foreground magenta :weight 'bold)
+   (helm-grep-finish :foreground base2)
+   (helm-grep-running :foreground green)
+   (helm-header :foreground base2 :underline nil :box nil)
+   (helm-moccur-buffer :foreground green)
+   (helm-separator :foreground violet)
+   (helm-source-go-package-godoc-description :foreground yellow)
+   ((helm-source-header &override) :foreground magenta)
+   (helm-time-zone-current :foreground orange)
+   (helm-time-zone-home :foreground violet)
+   (helm-visible-mark :foreground bg :background base3)
+   ;;;; highlight-quoted-mode
+   (highlight-quoted-symbol :foreground cyan)
+   (highlight-quoted-quote  :foreground magenta)
+   ;;;; js2-mode
+   (js2-external-variable :foreground violet)
+   (js2-function-param :foreground cyan)
+   (js2-jsdoc-html-tag-delimiter :foreground yellow)
+   (js2-jsdoc-html-tag-name :foreground dark-blue)
+   (js2-jsdoc-value :foreground yellow)
+   (js2-private-function-call :foreground cyan)
+   (js2-private-member :foreground base7)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-darken 'bg 0.075))
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground level1)
+   (outline-2 :inherit 'outline-1 :foreground level2)
+   (outline-3 :inherit 'outline-2 :foreground level3)
+   (outline-4 :inherit 'outline-3 :foreground level4)
+   (outline-5 :inherit 'outline-4 :foreground level5)
+   (outline-6 :inherit 'outline-5 :foreground level6)
+   (outline-7 :inherit 'outline-6 :foreground level7)
+   (outline-8 :inherit 'outline-7 :foreground level8)
+   ;;;; org <built-in>
+   (org-agenda-date :foreground cyan)
+   (org-agenda-dimmed-todo-face :foreground comments)
+   (org-agenda-done :foreground base4)
+   (org-agenda-structure :foreground violet)
+   ((org-block &override) :background (doom-darken base1 0.125) :foreground violet)
+   ((org-block-begin-line &override) :background (doom-darken base1 0.125))
+   ((org-code &override) :foreground yellow)
+   (org-column :background base1)
+   (org-column-title :background base1 :bold t :underline t)
+   (org-date :foreground cyan)
+   ((org-document-info &override) :foreground blue)
+   ((org-document-info-keyword &override) :foreground comments)
+   (org-done :foreground green :background base2 :weight 'bold)
+   (org-footnote :foreground blue)
+   (org-headline-base :foreground comments :strike-through t :bold nil)
+   (org-headline-done :foreground base4 :strike-through nil)
+   ((org-link &override) :foreground orange)
+   (org-priority :foreground cyan)
+   ((org-quote &override) :background (doom-darken base1 0.125))
+   (org-scheduled :foreground green)
+   (org-scheduled-previously :foreground yellow)
+   (org-scheduled-today :foreground orange)
+   (org-sexp-date :foreground base4)
+   ((org-special-keyword &override) :foreground yellow)
+   (org-table :foreground violet)
+   ((org-tag &override) :foreground (doom-lighten orange 0.3))
+   (org-todo :foreground orange :bold 'inherit :background (doom-darken base1 0.02))
+   (org-upcoming-deadline :foreground yellow)
+   (org-warning :foreground magenta)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground magenta)
+   (rjsx-attr :foreground green :slant 'italic :weight 'medium)
+   ;;;; solaire-mode
+   (solaire-hl-line-face :background base2)
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   (solaire-region-face :background region-alt)
+   ;;;; web-mode
+   (web-mode-builtin-face :foreground orange)
+   (web-mode-css-selector-face :foreground green)
+   (web-mode-html-attr-name-face :foreground green)
+   (web-mode-html-tag-bracket-face :inherit 'default)
+   (web-mode-html-tag-face :foreground magenta :weight 'bold)
+   (web-mode-preprocessor-face :foreground orange))
+
+  ;;;; Base theme variable overrides-
+  ()
+  )
+
+;;; doom-dracula-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-earl-grey-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-earl-grey-theme.el
new file mode 100644
index 0000000..d7e6d81
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-earl-grey-theme.el
@@ -0,0 +1,599 @@
+;;; doom-earl-grey-theme.el --- a gentle color scheme, for code -*- no-byte-compile: t; -*-
+;;
+;; Added: August 30, 2021 (#653)
+;; Author: JuneKelly <https://github.com/JuneKelly>
+;; Maintainer:
+;; Source: original
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-earl-grey-theme nil
+  "Options for doom-themes"
+  :group 'doom-themes)
+
+(defcustom doom-earl-grey-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-earl-grey-theme
+  :type 'boolean)
+
+(defcustom doom-earl-grey-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-earl-grey-theme
+  :type 'boolean)
+
+(defcustom doom-earl-grey-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-earl-grey-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-earl-grey
+  "A gentle color scheme for code."
+
+  ;; name        default   256       16
+  (
+   ;; Earl Grey Colors
+   (eg-fg       '("#605A52" "#626262" ""))
+   (eg-fg2      '("#4C4741" "#4e4e4e" ""))
+   (eg-bg       '("#FCFBF9" "#FFFFFF"   "white"))
+   (eg-bg2      '("#F7F3EE" "#FFFFFF"   "white"))
+
+   (eg-purple   '("#83577D" "#875FAF" "magenta"))
+   (eg-blue     '("#556995" "#5F87AF" "brightblue"))
+   (eg-teal     '("#477A7B" "#87AFAF" "brightgreen"))
+   (eg-orange   '("#886A44" "#875F00" "brightred"))
+   (eg-green    '("#747B4D" "#5F875F" "green"))
+   (eg-red      '("#8F5652" "#870000" "red"))
+   (eg-berry    '("#AA5087" "#996699" "brightmagenta"))
+
+   (eg-grey1    '("#ECEBE8" "#E4E4E4" "white"))
+   (eg-grey2    '("#DDDBD8" "#DADADA" "brightblack"))
+   (eg-grey3    '("#CDCBC7" "#C6C6C6" "brightblack"))
+   (eg-grey4    '("#BEBBB6" "#B2B2B2" "brightblack"))
+   (eg-grey5    '("#AEABA6" "#A8A8A8" "brightblack"))
+   (eg-grey6    '("#9E9A95" "#949494" "brightblack"))
+   (eg-grey7    '("#8F8A84" "#8A8A8A" "brightblack"))
+   (eg-grey8    '("#7F7A73" "#767676" "brightblack"))
+   (eg-grey9    '("#706A63" "#6C6C6C" "brightblack"))
+
+   (eg-purple1  '("#F0EBED" "#D7D7FF" "brightmagenta"))
+   (eg-purple2  '("#E4DAE0" "#D7D7FF" "brightmagenta"))
+   (eg-purple3  '("#D8CAD4" "#D7D7FF" "brightmagenta"))
+   (eg-purple4  '("#CCB9C7" "#D7D7FF" "brightmagenta"))
+   (eg-purple5  '("#C0A9BB" "#AF87FF" "brightmagenta"))
+   (eg-purple6  '("#B399AF" "#AF87FF" "brightmagenta"))
+   (eg-purple7  '("#A788A2" "#AF87FF" "brightmagenta"))
+   (eg-purple8  '("#9B7896" "#AF87FF" "magenta"))
+   (eg-purple9  '("#8F6789" "#AF87FF" "magenta"))
+
+   (eg-blue1    '("#EBECEF" "#87D7FF" "brightblue"))
+   (eg-blue2    '("#DBDEE5" "#87D7FF" "brightblue"))
+   (eg-blue3    '("#CACFDB" "#87D7FF" "brightblue"))
+   (eg-blue4    '("#B9C1D1" "#87D7FF" "brightblue"))
+   (eg-blue5    '("#A9B2C7" "#87D7FF" "brightblue"))
+   (eg-blue6    '("#98A3BD" "#87AFFF" "brightblue"))
+   (eg-blue7    '("#8795B3" "#87AFFF" "brightblue"))
+   (eg-blue8    '("#7686A9" "#87AFFF" "blue"))
+   (eg-blue9    '("#66789F" "#87AFFF" "blue"))
+
+   (eg-teal1    '("#EAEEEC" "#5FD7D7" "brightgreen"))
+   (eg-teal2    '("#D8E1E0" "#5FD7D7" "brightgreen"))
+   (eg-teal3    '("#C6D4D3" "#5FD7D7" "brightgreen"))
+   (eg-teal4    '("#B4C7C7" "#5FD7D7" "brightgreen"))
+   (eg-teal5    '("#A2BBBA" "#5FD7D7" "brightgreen"))
+   (eg-teal6    '("#8FAEAD" "#00AFAF" "brightgreen"))
+   (eg-teal7    '("#7DA1A1" "#00AFAF" "brightgreen"))
+   (eg-teal8    '("#6B9494" "#00AFAF" "brightgreen"))
+   (eg-teal9    '("#598788" "#00AFAF" "brightgreen"))
+
+   (eg-orange1  '("#F0EDE7" "#D7AF5F" "brightred"))
+   (eg-orange2  '("#E5DED5" "#D7AF5F" "brightred"))
+   (eg-orange3  '("#D9D0C3" "#D7AF5F" "brightred"))
+   (eg-orange4  '("#CEC1B1" "#D7AF5F" "brightred"))
+   (eg-orange5  '("#C2B39F" "#D7AF5F" "brightred"))
+   (eg-orange6  '("#B6A48C" "#D7AF5F" "brightred"))
+   (eg-orange7  '("#AB967A" "#D7AF5F" "brightred"))
+   (eg-orange8  '("#9F8768" "#D7AF5F" "brightred"))
+   (eg-orange9  '("#947956" "#D7AF5F" "brightred"))
+
+   (eg-green1   '("#EEEEE8" "#5FAF5F" "green"))
+   (eg-green2   '("#E1E1D7" "#5FAF5F" "green"))
+   (eg-green3   '("#D3D5C5" "#5FAF5F" "green"))
+   (eg-green4   '("#C6C8B4" "#5FAF5F" "green"))
+   (eg-green5   '("#B8BBA3" "#5FAF5F" "green"))
+   (eg-green6   '("#AAAE92" "#5F875F" "green"))
+   (eg-green7   '("#9DA181" "#5F875F" "green"))
+   (eg-green8   '("#8F956F" "#5F875F" "green"))
+   (eg-green9   '("#82885E" "#5F875F" "green"))
+
+   (eg-red1     '("#F1EBE8" "#D78787" "brightred"))
+   (eg-red2     '("#E6DAD8" "#D78787" "brightred"))
+   (eg-red3     '("#DBCAC7" "#D78787" "brightred"))
+   (eg-red4     '("#D0B9B6" "#D78787" "brightred"))
+   (eg-red5     '("#C6A9A6" "#D78787" "brightred"))
+   (eg-red6     '("#BB9895" "#D75F5F" "brightred"))
+   (eg-red7     '("#B08884" "#D75F5F" "brightred"))
+   (eg-red8     '("#A57773" "#D75F5F" "red"))
+   (eg-red9     '("#9A6763" "#D75F5F" "red"))
+
+   (eg-berry1     '("#F4EAEE" "#D787D7" "brightmagenta"))
+   (eg-berry2     '("#ECD9E2" "#D787D7" "brightmagenta"))
+   (eg-berry3     '("#E3C8D7" "#D787D7" "brightmagenta"))
+   (eg-berry4     '("#DBB7CB" "#D787D7" "brightmagenta"))
+   (eg-berry5     '("#D3A6C0" "#D787D7" "brightmagenta"))
+   (eg-berry6     '("#CB94B5" "#AF00AF" "brightmagenta"))
+   (eg-berry7     '("#C383A9" "#AF00AF" "brightmagenta"))
+   (eg-berry8     '("#BA729E" "#AF00AF" "brightmagenta"))
+   (eg-berry9     '("#B26192" "#AF00AF" "brightmagenta"))
+
+   (bg         eg-bg)
+   (bg-alt     eg-bg2)
+   (base0      (doom-lighten bg 0.1))
+   (base1      eg-grey2)
+   (base2      eg-grey3)
+   (base3      eg-grey4)
+   (base4      eg-grey5)
+   (base5      eg-grey6)
+   (base6      eg-grey7)
+   (base7      eg-grey8)
+   (base8      eg-fg2)
+   (fg         eg-fg)
+   (fg-alt     eg-grey8)
+
+   (grey base5)
+   (red       eg-red)
+   (orange    eg-orange)
+   (green     eg-green)
+   (teal      eg-teal)
+   (yellow    eg-orange)
+   (blue      eg-blue)
+   (dark-blue eg-blue)
+   (magenta   eg-purple)
+   (violet    eg-purple)
+   (cyan      eg-teal)
+   (dark-cyan eg-teal)
+
+   ;; face categories -- required for all themes
+   (highlight eg-blue8)
+   (vertical-bar base2)
+   (selection eg-purple4)
+   (builtin fg)
+   (comments (if doom-earl-grey-brighter-comments
+                 eg-grey7
+                 eg-grey6))
+   (doc-comments comments)
+   (constants teal)
+   (functions fg)
+   (keywords magenta)
+   (methods fg)
+   (operators fg)
+   (type fg)
+   (strings green)
+   (variables blue)
+   (numbers teal)
+   (region eg-berry1)
+   (error red)
+   (warning yellow)
+   (success green)
+   (vc-modified eg-orange8)
+   (vc-added eg-green8)
+   (vc-deleted eg-red8)
+
+   ;; custom categories
+   (hidden `(,(car bg) "black" "black"))
+   (-modeline-bright doom-earl-grey-brighter-modeline)
+   (-modeline-pad
+    (when doom-earl-grey-padded-modeline
+      (if (integerp doom-earl-grey-padded-modeline)
+          doom-earl-grey-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt eg-grey6)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken eg-grey2 0.1)
+      eg-grey2))
+   (modeline-bg-l
+    (if -modeline-bright
+        base2
+      (doom-blend base1 fg 0.96)))
+   (modeline-bg-inactive eg-grey1)
+   (modeline-bg-inactive-l `(,(doom-darken (car bg-alt) 0.05) ,@(cdr base1))))
+
+  ;; --- extra faces ------------------------
+  (
+   ;; Modeline
+   (doom-modeline-buffer-path       :foreground blue)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path
+                                    :bold 'bold)
+   (doom-modeline-info              :foreground green)
+   (doom-modeline-project-dir       :foreground magenta)
+   (doom-modeline-evil-insert-state :foreground teal)
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis
+    :foreground (if -modeline-bright base8 highlight))
+   (doom-modeline-project-root-dir :foreground base6)
+
+   ;; solaire
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+
+   ;; Font-Lock
+   (font-lock-comment-face
+    :foreground comments
+    :inherit 'italic)
+   (font-lock-doc-face
+    :inherit 'font-lock-comment-face
+    :foreground doc-comments)
+    (font-lock-comment-delimiter-face    :inherit font-lock-comment-face)
+    (font-lock-builtin-face              :foreground fg
+                                         :inherit 'italic :extend t)
+    (font-lock-type-face                 :foreground fg
+                                         :inherit 'italic :extend t)
+    (font-lock-variable-name-face        :foreground blue)
+    (font-lock-warning-face              :foreground red)
+    (font-lock-negation-char-face        :foreground orange
+                                         :inherit 'default
+                                         :extend t)
+    (font-lock-preprocessor-face         :foreground orange
+                                         :inherit 'default
+                                         :extend t)
+    (font-lock-preprocessor-char-face    :inherit 'default)
+    (font-lock-regexp-grouping-backslash :inherit 'default)
+    (font-lock-regexp-grouping-construct :inherit 'default)
+    (font-lock-constant-face             :foreground teal)
+    (font-lock-function-name-face        :foreground fg
+                                         :inherit 'italic :extend t)
+
+    ;; makefile-*-mode
+    (makefile-targets :foreground magenta)
+    (makefile-space :background eg-red2)
+    (makefile-makepp-perl :background eg-blue1)
+
+    ;; which-key
+    (which-key-key-face                   :foreground eg-purple8)
+    (which-key-group-description-face     :foreground eg-blue8)
+    (which-key-command-description-face   :foreground fg)
+    (which-key-local-map-description-face :foreground orange)
+    (which-key-separator-face             :background bg-alt
+                                          :foreground comments)
+
+    ;; highlight-numbers-mode
+    (highlight-numbers-number :foreground teal)
+
+    ;; web-mode
+    (web-mode-doctype-face           :foreground comments)
+    (web-mode-html-tag-face          :foreground magenta)
+    (web-mode-html-attr-name-face    :foreground blue)
+    (web-mode-html-attr-value-face   :inherit 'font-lock-string-face)
+    (web-mode-html-entity-face       :foreground orange
+                                     :inherit 'italic)
+    (web-mode-block-control-face     :foreground magenta)
+    (web-mode-html-tag-bracket-face  :foreground fg-alt)
+    (web-mode-symbol-face            :foreground blue)
+    (web-mode-string-face            :inherit 'font-lock-string-face)
+    (web-mode-current-element-highlight-face :foreground bg)
+
+    ;; xml
+    (nxml-element-local-name :foreground magenta)
+
+    ;; ocaml
+    (tuareg-font-lock-governing-face :foreground magenta)
+    (tuareg-font-lock-operator-face :foreground orange)
+
+    ;; haskell
+    (haskell-constructor-face :foreground teal)
+    (haskell-operator-face :foreground fg)
+    ((haskell-type-face &override)
+     :foreground blue
+     :inherit 'font-lock-type-face
+     :extend t)
+    ((haskell-definition-face &override)
+     :foreground magenta
+     :inherit 'font-lock-function-name-face
+     :extend t)
+
+    ;; Highlight
+    (lazy-highlight :foreground eg-fg2
+                    :background eg-berry2 :inherit 'default :extend t)
+
+    ;; php
+    (php-$this :foreground orange)
+
+
+    ;; rjsx-mode
+    (rjsx-tag  :foreground magenta)
+    (rjsx-text :inherit 'default)
+    (rjsx-tag-bracket-face :foreground fg-alt)
+    (rjsx-attr :foreground blue)
+
+    ;; highlight-quoted-mode
+    (highlight-quoted-symbol :foreground blue)
+    (highlight-quoted-quote  :foreground teal)
+
+    ;; rainbow-delimiters
+    (rainbow-delimiters-depth-1-face :foreground eg-blue6)
+    (rainbow-delimiters-depth-2-face :foreground eg-purple6)
+    (rainbow-delimiters-depth-3-face :foreground eg-green6)
+    (rainbow-delimiters-depth-4-face :foreground eg-orange6)
+    (rainbow-delimiters-depth-5-face :foreground eg-teal6)
+    (rainbow-delimiters-depth-6-face :foreground eg-blue6)
+    (rainbow-delimiters-depth-7-face :foreground eg-purple6)
+    (rainbow-delimiters-unmatched-face  :foreground red
+                                        :weight 'bold
+                                        :inverse-video t)
+    (rainbow-delimiters-mismatched-face
+     :inherit 'rainbow-delimiters-unmatched-face)
+
+    ;; swiper
+    (swiper-line-face    :background  eg-purple2
+                         :foreground fg
+                         :weight 'semi-bold)
+    (swiper-match-face-1 :inherit 'unspecified
+                         :background  eg-purple1
+                         :foreground fg)
+    (swiper-background-match-face-1 :inherit 'unspecified
+                         :background  eg-bg2
+                         :foreground fg)
+    (swiper-match-face-2 :inherit 'unspecified
+                         :background eg-purple1
+                         :foreground eg-purple)
+    (swiper-background-match-face-2 :inherit 'unspecified
+                         :background eg-purple1
+                         :foreground eg-purple
+                         :weight 'semi-bold)
+    (swiper-match-face-3 :inherit 'unspecified
+                         :background eg-blue1
+                         :foreground blue)
+    (swiper-background-match-face-3 :inherit 'unspecified
+                         :background eg-blue1
+                         :foreground blue
+                         :weight 'semi-bold)
+    (swiper-match-face-4 :inherit 'unspecified
+                         :background eg-teal1
+                         :foreground teal)
+    (swiper-background-match-face-4 :inherit 'unspecified
+                         :background eg-teal1
+                         :foreground teal
+                         :weight 'semi-bold)
+
+    ;; tooltip
+    (tooltip :background bg-alt :foreground fg)
+
+    ;; company
+    (company-tooltip            :inherit 'tooltip)
+    (company-tooltip-annotation            :foreground magenta)
+    (company-tooltip-annotation-selection  :foreground magenta )
+    (company-tooltip-common                :foreground magenta
+                                           :distant-foreground bg-alt
+                                           :weight 'bold)
+    (company-tooltip-search     :background magenta
+                                :foreground bg
+                                :distant-foreground fg
+                                :weight 'bold)
+    (company-tooltip-search-selection :background eg-purple1)
+    (company-tooltip-selection  :background eg-purple1
+                                :weight 'bold)
+    (company-tooltip-mouse      :background eg-purple8
+                                :foreground bg
+                                :distant-foreground fg)
+    (company-tooltip-annotation :foreground magenta
+                                :distant-foreground bg)
+    (company-scrollbar-bg       :inherit 'tooltip)
+    (company-scrollbar-fg       :background highlight)
+    (company-preview            :foreground comments)
+    (company-preview-common     :background base3
+                                :foreground highlight)
+    (company-preview-search     :inherit 'company-tooltip-search)
+    (company-template-field     :inherit 'match)
+    (company-echo-common        :background eg-red2
+                                :foreground fg)
+
+    ;; company-box
+    (company-box-candidate :foreground fg)
+
+   ((region &override)
+    :foreground fg)
+
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground base6)
+   ((paren-face-match &override) :foreground red :background eg-grey1 :weight 'ultra-bold)
+   ((paren-face-mismatch &override) :foreground base3 :background red :weight 'ultra-bold)
+   ((vimish-fold-overlay &override) :inherit 'font-lock-comment-face :background base3 :weight 'light)
+   ((vimish-fold-fringe &override) :foreground teal)
+
+   ;; parens
+   ((show-paren-match &override)
+    :background eg-grey1)
+
+   ;; elscreen
+   (elscreen-tab-other-screen-face :background bg-alt :foreground fg)
+
+   ;; Magit / Diff
+   (magit-diff-hunk-heading-highlight :foreground bg :background eg-blue8 :weight 'bold)
+   (magit-diff-hunk-heading :foreground bg :background eg-blue5)
+   (magit-blame-heading     :foreground magenta
+                            :background eg-grey1 :extend t)
+   (magit-blame-date       :foreground blue)
+
+   (magit-diff-removed :background eg-red1
+                       :foreground eg-red)
+   (magit-diff-removed-highlight :background eg-red3
+                                 :foreground eg-red)
+   (diff-refine-removed :background eg-red9
+                        :foreground eg-red1)
+
+   (magit-diff-added :background eg-green1
+                     :foreground eg-green)
+   (magit-diff-added-highlight :background eg-green3
+                               :foreground eg-green)
+   (diff-refine-added :background eg-green
+                      :foreground bg)
+
+   (diff-refine-changed :background eg-purple9
+                        :foreground bg)
+
+   (git-commit-summary :foreground fg)
+
+
+   ;; Dired
+   (diredfl-date-time    :foreground blue)
+   (diredfl-dir-heading  :foreground magenta :weight 'bold)
+
+   ;; ivy
+   (ivy-posframe :background eg-blue1)
+   (ivy-virtual :foreground eg-blue8)
+   (ivy-cursor :foreground bg-alt
+               :background fg)
+   (ivy-minibuffer-match-face-1
+    :background nil
+    :foreground comments
+    :weight 'semi-bold)
+    (ivy-minibuffer-match-face-2
+     :inherit 'ivy-minibuffer-match-face-1
+     :foreground eg-purple :background eg-purple1)
+    (ivy-minibuffer-match-face-3
+     :inherit 'ivy-minibuffer-match-face-2
+     :foreground blue :background eg-orange1)
+    (ivy-minibuffer-match-face-4
+     :inherit 'ivy-minibuffer-match-face-2
+     :foreground teal :background eg-teal1)
+
+   (internal-border
+    :foreground eg-blue8
+    :background eg-blue1)
+   ;; --- major-mode faces -------------------
+   ;; css-mode / scss-mode
+   (css-property             :foreground blue
+                             :inherit 'italic)
+   (css-proprietary-property :foreground orange)
+   (css-selector             :foreground magenta)
+   (web-mode-css-property-name-face :foreground fg)
+
+   ;; markdown-mode
+   (markdown-header-face           :inherit 'bold
+                                   :foreground magenta)
+   (markdown-header-delimiter-face :inherit 'markdown-header-face)
+   (markdown-metadata-key-face     :foreground green)
+   (markdown-list-face             :foreground fg
+                                   :inherit 'bold)
+   (markdown-link-face             :foreground teal)
+   (markdown-url-face              :foreground blue)
+   (markdown-italic-face           :inherit 'italic
+                                   :foreground fg)
+   (markdown-bold-face             :inherit 'bold
+                                   :foreground fg)
+   (markdown-markup-face           :foreground fg
+                                   :inherit 'bold)
+   (markdown-blockquote-face       :inherit 'italic
+                                   :foreground orange)
+   (markdown-pre-face              :foreground orange
+                                   :extend t)
+   (markdown-code-face             :foreground orange
+                                   :extend t)
+   (markdown-reference-face        :foreground blue)
+   (markdown-inline-code-face      :inherit '(markdown-code-face markdown-pre-face)
+                                   :extend nil)
+   (markdown-html-attr-name-face     :inherit 'font-lock-variable-name-face)
+   (markdown-html-attr-value-face    :inherit 'font-lock-string-face)
+   (markdown-html-entity-face        :inherit 'font-lock-variable-name-face)
+   (markdown-html-tag-delimiter-face :inherit 'default)
+   (markdown-html-tag-name-face      :inherit 'font-lock-keyword-face)
+
+   (nav-flash-face :background eg-purple1 :foreground fg :weight 'bold)
+
+   ;; org-mode
+   ((outline-1 &override) :foreground magenta)
+   ((outline-2 &override) :foreground red)
+   ((outline-3 &override) :foreground teal)
+   ((outline-4 &override) :foreground orange)
+   ((outline-5 &override) :foreground magenta)
+   ((outline-6 &override) :foreground red)
+   ((outline-7 &override) :foreground teal)
+   ((outline-8 &override) :foreground orange)
+
+   (org-drawer  :foreground eg-orange)
+   (org-ellipsis :underline nil :background bg     :foreground red)
+   ((org-block-begin-line &override)
+    :foreground orange
+    :background bg-alt
+    :weight 'semi-bold
+    :extend t)
+   ((org-block &override)
+    :background bg-alt
+    :foreground fg
+    :extend t)
+   ((org-quote &override)
+    :foreground orange
+    :background bg-alt
+    :extend t)
+   ((org-document-title &override)
+    :foreground magenta)
+
+   ;; js2-mode
+   (js2-function-param    :foreground blue)
+   (js2-function-call     :foreground fg :inherit 'italic)
+   (js2-object-property   :foreground fg)
+   (js2-jsdoc-tag         :foreground doc-comments)
+   (js2-external-variable :foreground fg)
+
+   ;; racket
+   (racket-keyword-argument-face :foreground orange)
+   (racket-selfeval-face :foreground teal)
+   (racket-debug-break-face :foreground bg :background red)
+
+   ;; clojure
+   (clojure-keyword-face :foreground blue)
+
+   ;; elixir
+   (elixir-atom-face :foreground blue)
+   (elixir-attribute-face :foreground teal)
+
+   ;; lsp
+   (lsp-ui-doc-background      :background bg-alt)
+   (lsp-face-highlight-read    :inherit 'lazy-highlight)
+   (lsp-face-highlight-textual :inherit 'lsp-face-highlight-read)
+   (lsp-face-highlight-write   :inherit 'lsp-face-highlight-read)
+
+   ;; doom dashboard
+   (doom-dashboard-banner      :foreground eg-grey5)
+   (doom-dashboard-menu-title  :foreground eg-purple8)
+   (doom-dashboard-menu-desc   :foreground eg-green8)
+   (doom-dashboard-footer-icon :foreground eg-orange8)
+   (doom-dashboard-loaded      :foreground eg-blue8)
+
+   ;; evil-snipe
+   (evil-snipe-first-match-face :foreground bg :background blue)
+
+   ;; End
+   )
+
+  ;; --- extra variables ---------------------
+  ()
+  )
+
+;;; doom-earl-grey-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ephemeral-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ephemeral-theme.el
new file mode 100644
index 0000000..e96f031
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ephemeral-theme.el
@@ -0,0 +1,248 @@
+;;; doom-ephemeral-theme.el --- inspired by the Ephemeral Theme from elenapan's dotfiles -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: January 27, 2020 (#384)
+;; Author: karetsu <https://github.com/karetsu>
+;; Maintainer:
+;; Source: https://github.com/elenapan/dotfiles
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-ephemeral-theme nil
+  "Options for the `doom-ephemeral' theme."
+  :group 'doom-themes)
+
+(defcustom doom-ephemeral-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-ephemeral-theme
+  :type 'boolean)
+
+(defcustom doom-ephemeral-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-ephemeral-theme
+  :type 'boolean)
+
+(defcustom doom-ephemeral-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to determine the exact padding."
+  :group 'doom-ephemeral-theme
+  :type '(choice integer boolean))
+
+(defcustom doom-ephemeral-region-highlight t
+  "Determines the selection highlight style. Can be 'frost, 'snowstorm or t
+(default)."
+  :group 'doom-ephemeral-theme
+  :type 'symbol)
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-ephemeral
+  "A dark theme inspired by Nord."
+
+  ;; name        default   256       16
+  ((bg          '("#323f4e" "#000000" "black"        ))
+   (fg          '("#f8f8f2" "#f8f8f2" "white"        ))
+
+   (bg-alt      '("#28323e" "#000000" "black"        ))
+   (fg-alt      '("#fdfdfd" "#fdfdfd" "brightwhite"  ))
+
+   (base0       '("#181e26" "black"   "black"        ))
+   (base1       '("#1e262d" "#1e262f" "brightblack"  ))
+   (base2       '("#242d39" "#242d39" "brightblack"  ))
+   (base3       '("#2a3542" "#2a3542" "brightblack"  ))
+   (base4       '("#323f4e" "#323f4e" "brightblack"  ))
+   (base5       '("#364455" "#364455" "brightblack"  ))
+   (base6       '("#505d6f" "#505d6f" "brightblack"  ))
+   (base7       '("#77818f" "#77818f" "brightblack"  ))
+   (base8       '("#ebedef" "#ebedef" "white"        ))
+
+   (grey        '("#3d4c5f" "#3d4c5f" "grey"         ))
+   (red         '("#f48fb1" "#f48fb1" "red"          ))
+   (orange      '("#f2a272" "#f2a272" "brightred"    ))
+   (green       '("#53e2ae" "#53e2ae" "green"        ))
+   (teal        '("#a1efd3" "#a1efd3" "brightgreen"  ))
+   (yellow      '("#f1fa8c" "#f1fa8c" "yellow"       ))
+   (blue        '("#92b6f4" "#92b6f4" "brightblue"   ))
+   (dark-blue   '("#9f92f4" "#9f92f4" "blue"         ))
+   (magenta     '("#BD99FF" "#c574dd" "magenta"      ))
+   (violet      '("#8897f4" "#8897f4" "brightmagenta"))
+   (dark-violet '("#985EFF" "#8897f4" "brightmagenta"))
+   (cyan        '("#79e6f3" "#87dfeb" "brightcyan"   ))
+   (dark-cyan   '("#24d1e7" "#24d1e7" "cyan"         ))
+
+   ;; ephemeral colours
+   (pink        '("#c574dd" "#c574dd" "grey"         ))
+   (light-pink  (doom-lighten pink 0.6))
+   (dark-grey   (doom-darken grey 0.3)                )
+   (light-grey  '("#56687e" "#56687e" "grey"         ))
+   (alt-blue    '("#87DFEB" "#87dfeb" "brightblue"   ))
+
+   ;; face categories -- required for all themes
+   (highlight      alt-blue)
+   (vertical-bar   bg-alt)
+   (selection      blue)
+   (builtin        yellow)
+   (comments       light-grey)
+   (doc-comments   light-grey)
+   (constants      dark-violet)
+   (functions      alt-blue)
+   (keywords       yellow)
+   (methods        teal)
+   (operators      blue)
+   (type           cyan)
+   (strings        red)
+   (variables      light-pink)
+   (numbers        green)
+   (region         base1)
+   (error          orange)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    teal)
+   (vc-added       blue)
+   (vc-deleted     orange)
+
+   ;; custom categories
+   (-modeline-bright doom-ephemeral-brighter-modeline)
+   (-modeline-pad
+    (when doom-ephemeral-padded-modeline
+      (if (integerp doom-ephemeral-padded-modeline) doom-ephemeral-padded-modeline 4)))
+
+   (region-fg
+    (when (memq doom-ephemeral-region-highlight '(frost snowstorm))
+      bg-alt))
+
+   (modeline-fg            fg)
+   (modeline-fg-alt        light-grey)
+   (modeline-bg            bg)
+   (modeline-bg-l          base2)
+   (modeline-bg-inactive   base3)
+   (modeline-bg-inactive-l `(,(car base3), (cdr base6))))
+
+
+  ;;;; Base theme face overrides
+  (((line-number &override) :foreground grey)
+   ((line-number-current-line &override) :foreground blue)
+   (link :foreground (doom-lighten light-grey 0.3) :inherit 'underline)
+   ((font-lock-comment-face &override)
+    :inherit 'bold :background (if doom-ephemeral-brighter-comments (doom-lighten bg 0.05) 'unspecified))
+   ((font-lock-builtin-face &override) :inherit 'italic)
+   ((font-lock-keyword-face &override) :inherit 'bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   ((region &override) :foreground region-fg)
+   (shadow :foreground base6)
+   ((tooltip &override) :background base1)
+
+   ;;;; company
+   (company-tooltip-common :foreground violet)
+   (company-tooltip-selection :background base0 :foreground red)
+   ;;;; company-box
+   (company-box-background :background base0 :foreground fg)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-property             :foreground fg)
+   (css-proprietary-property :foreground violet)
+   (css-selector             :foreground red)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-buffer-file :foreground fg)
+   (doom-modeline-buffer-major-mode :foreground teal :weight 'bold)
+   (doom-modeline-buffer-modified :foreground violet)
+   (doom-modeline-buffer-path :foreground red)
+   (doom-modeline-highlight :foreground (doom-lighten base2 0.3))
+   (doom-modeline-info :inherit 'bold :foreground cyan)
+   (doom-modeline-panel :background base0)
+   (doom-modeline-project-dir :foreground teal :inherit 'bold)
+   (doom-modeline-urgent :foreground modeline-fg)
+   ;;;; ediff <built-in>
+   (ediff-fine-diff-A    :background (doom-darken violet 0.4) :weight 'bold)
+   (ediff-current-diff-A :background (doom-darken base0 0.25))
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; evil
+   (evil-ex-lazy-highlight      :background base1  :foreground fg)
+   (evil-ex-search              :background base1  :foreground fg)
+   (evil-snipe-first-match-face :background base1  :foreground orange)
+   ;;;; haskell-mode
+   (haskell-constructor-face :inherit 'bold :foreground alt-blue)
+   (haskell-definition-face :inherit 'bold :foreground functions)
+   (haskell-keyword-face :inherit 'italic :foreground blue)
+   (haskell-literate-comment-face :foreground doc-comments)
+   (haskell-operator-face :foreground light-pink)
+   (haskell-type-face :inherit 'bold :foreground violet)
+   ;;;; highlight-symbol
+   (highlight-symbol-face :background region :distant-foreground fg-alt)
+   ;;;; highlight-thing
+   (highlight-thing :background region :distant-foreground fg-alt)
+   ;;;; ivy
+   (ivy-current-match           :background base0      :distant-foreground nil)
+   (ivy-posframe-cursor         :background alt-blue   :foreground base0)
+   (ivy-minibuffer-match-face-2 :foreground red        :weight 'bold)
+   ;;;; lsp-mode
+   (lsp-headerline-breadcrumb-symbols-face :foreground functions :weight 'bold)
+   ;;;; magit
+   (magit-diff-hunk-heading           :foreground bg :background (doom-blend magenta bg 0.3) :extend t)
+   (magit-diff-hunk-heading-highlight :foreground bg :background magenta :weight 'bold :extend t)
+   (magit-section-heading :foreground red)
+   (magit-branch-remote   :foreground orange)
+   ;;;; markdown-mode
+   (markdown-markup-face           :foreground red)
+   (markdown-link-face             :foreground teal)
+   (markdown-link-title-face       :foreground alt-blue)
+   (markdown-header-face           :foreground red :inherit 'bold)
+   (markdown-header-delimiter-face :foreground red :inherit 'bold)
+   (markdown-language-keyword-face :foreground pink :inherit 'italic)
+   (markdown-markup-face           :foreground blue)
+   (markdown-bold-face             :foreground blue)
+   (markdown-table-face            :foreground fg :background bg)
+   ((markdown-code-face &override) :foreground teal :background base1)
+   ;;;; notmuch
+   (notmuch-wash-cited-text :foreground base6)
+   ;;;; outline <built-in>
+   (outline-1 :foreground alt-blue)
+   (outline-2 :foreground violet)
+   (outline-3 :foreground blue)
+   (outline-4 :foreground red)
+   (outline-5 :foreground pink)
+   (outline-6 :foreground light-grey)
+   (outline-7 :foreground yellow)
+   (outline-8 :foreground cyan)
+   ;;;; org <built-in>
+   (org-agenda-done :foreground teal)
+   ((org-block &override) :background base2)
+   ((org-block-begin-line &override) :inherit 'bold :background base2 :foreground light-grey)
+   (org-document-info-keyword :foreground comments)
+   (org-headline-done :foreground red)
+   (org-link :inherit 'underline :foreground pink)
+   (org-list-dt :foreground light-grey)
+   (org-todo :foreground red)
+   ;;;; mic-paren
+   ((paren-face-match &override) :background base3)
+   ((paren-face-mismatch &override) :foreground base3)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground magenta)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; vimish-fold
+   ((vimish-fold-overlay &override) :background base3)
+   ((vimish-fold-fringe &override)  :foreground teal)))
+
+;;; doom-ephemeral-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-fairy-floss-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-fairy-floss-theme.el
new file mode 100644
index 0000000..7cf0947
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-fairy-floss-theme.el
@@ -0,0 +1,202 @@
+;;; doom-fairy-floss-theme.el --- a candy colored theme by sailorhg -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: July 28, 2019 (651a69d79c88)
+;; Author: ema2159 <https://github.com/ema2159>
+;; Maintainer:
+;; Source: https://github.com/sailorhg/fairyfloss
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-fairy-floss-theme nil
+  "Options for doom-themes."
+  :group 'doom-themes)
+
+(defcustom doom-fairy-floss-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-fairy-floss-theme
+  :type 'boolean)
+
+(defcustom doom-fairy-floss-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-fairy-floss-theme
+  :type 'boolean)
+
+(defcustom doom-fairy-floss-comment-bg doom-fairy-floss-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-fairy-floss-theme
+  :type 'boolean)
+
+(defcustom doom-fairy-floss-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-fairy-floss-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-fairy-floss
+  "A candy colored theme inspired by Sublime's Fairy Floss"
+
+  ;; name        default   256       16
+  ((bg         '("#5a5475" nil       nil           ))
+   (bg-alt     '("#343145" nil       nil           ))
+   (base0      '("#464258" "black"   "black"       ))
+   (base1      '("#514C66" "#1e1e1e" "brightblack" ))
+   (base2      '("#6A6483" "#2e2e2e" "brightblack" ))
+   (base3      '("#9673D3" "#262626" "brightblack" ))
+   (base4      '("#A0A0C0" "#3f3f3f" "brightblack" ))
+   (base5      '("#B8A2CE" "#525252" "brightblack" ))
+   (base6      '("#726C8A" "#6b6b6b" "brightblack" ))
+   (base7      '("#5B576C" "#979797" "brightblack" ))
+   (base8      '("#716799" "#dfdfdf" "white"       ))
+   (fg-alt     '("#B5B2Bd" "#2d2d2d" "white"       ))
+   (fg         '("#F8F8F0" "#bfbfbf" "brightwhite" ))
+
+   (grey       '("#656565" "#515154" "brightblack"  ))
+   (red        '("#CC6666" "#CC6666" "red"          ))
+   (orange     '("#E6C000" "#E6C000" "brightred"    ))
+   (green      '("#C2FFDF" "#C2FFDF" "green"        ))
+   (yellow     '("#FFEA00" "#FFEA00" "yellow"       ))
+   (blue       '("#55b3cc" "#55b3cc" "brightblue"   ))
+   (teal       '("#8295D6" "#8295D6" "brightgreen"  ))
+   (dark-blue  '("#167be2" "#3F88AD" "blue"         ))
+   (magenta    '("#FFB8D1" "#FFB8D1" "magenta"      ))
+   (violet     '("#C5A3FF" "#C5A3FF" "brightmagenta"))
+   (cyan       '("#96CBFE" "#C2FFDF" "brightcyan"   ))
+   (dark-cyan  '("#204052" "#204052" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      violet)
+   (vertical-bar   (doom-darken base1 0.5))
+   (selection      dark-blue)
+   (builtin        blue)
+   (comments       (if doom-fairy-floss-brighter-comments cyan orange))
+   (doc-comments   violet)
+   (constants      violet)
+   (functions      green)
+   (keywords       cyan)
+   (methods        green)
+   (operators      orange)
+   (type           cyan)
+   (strings        yellow)
+   (variables      magenta)
+   (numbers        violet)
+   (region         base0)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-fairy-floss-brighter-modeline)
+   (-modeline-pad
+    (when doom-fairy-floss-padded-modeline
+      (if (integerp doom-fairy-floss-padded-modeline) doom-fairy-floss-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.15) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.1) ,@(cdr base0))))
+   (modeline-bg-inactive   (doom-darken bg 0.1))
+   (modeline-bg-inactive-l `(,(car bg) ,@(cdr base1))))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-fairy-floss-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   ((font-lock-keyword-face &override ) :slant 'italic)
+   ((hl-line &override) :background base2)
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright cyan highlight))
+
+   ;;;; centaur-tabs
+   (centaur-tabs-active-bar-face :background blue)
+   (centaur-tabs-modified-marker-selected :inherit 'centaur-tabs-selected
+                                          :foreground blue)
+   (centaur-tabs-modified-marker-unselected :inherit 'centaur-tabs-unselected
+                                            :foreground blue)
+   ;;;; company
+   (company-tooltip-selection     :background base3)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background blue)
+   ;;;; ediff
+   (ediff-current-diff-A :background (doom-blend red base5 0.2) :foreground red)
+   (ediff-fine-diff-A    :background (doom-blend red base5 0.3) :foreground red :weight 'bold)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; highlight-symbol
+   (highlight-symbol-face :background region :distant-foreground fg-alt)
+   ;;;; highlight-thing
+   (highlight-thing :background region :distant-foreground fg-alt)
+   ;;;; magit
+   (magit-diff-removed                :foreground (doom-darken red 0.2) :background (doom-blend red base5 0.1))
+   (magit-diff-removed-highlight      :foreground red                   :background (doom-blend red base5 0.2) :weight 'bold)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   (markdown-url-face    :foreground teal :weight 'normal)
+   (markdown-reference-face :foreground base6)
+   ((markdown-bold-face &override)   :foreground fg)
+   ((markdown-italic-face &override) :foreground fg-alt)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground orange)
+   ((outline-2 &override) :foreground green)
+   ((outline-3 &override) :foreground teal)
+   ((outline-4 &override) :foreground (doom-darken orange 0.2))
+   ((outline-5 &override) :foreground (doom-darken green 0.2))
+   ((outline-6 &override) :foreground (doom-darken teal 0.2))
+   ((outline-7 &override) :foreground (doom-darken orange 0.4))
+   ((outline-8 &override) :foreground (doom-darken green 0.4))
+   ;;;; org <built-in>
+   ((org-block &override) :background base0)
+   ((org-block-begin-line &override) :background base0)
+   (org-scheduled         :foreground green)
+   (org-scheduled-previously :foreground yellow)
+   (org-scheduled-today   :foreground orange)
+   (org-hide              :foreground hidden)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l))))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-fairy-floss-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-feather-dark-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-feather-dark-theme.el
new file mode 100644
index 0000000..0f8ac37
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-feather-dark-theme.el
@@ -0,0 +1,206 @@
+;;; doom-feather-dark-theme.el --- a purple-tinted theme, inspired by doom-one -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Date: November 12, 2022
+;; Author: Lena SAVY-LARIGALDIE <https://gitlab.com/Plunne>
+;; Maintainer: Lena SAVY-LARIGALDIE <https://gitlab.com/Plunne>
+;; Source: https://github.com/Plunne/doom-feather-theme
+;;
+;;; Code:
+
+(require 'doom-themes)
+
+;;
+;;; Variables
+
+(defgroup doom-feather-dark-theme nil
+  "Options for the `doom-feather' theme."
+  :group 'doom-themes)
+
+(defcustom doom-feather-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-feather-dark-theme
+  :type 'boolean)
+
+(defcustom doom-feather-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-feather-dark-theme
+  :type 'boolean)
+
+(defcustom doom-feather-dark-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-feather-dark-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-feather-dark
+  "A dark theme based on Doom One Dark."
+  :family 'doom-feather
+  :background-mode 'dark
+
+  ;; name        default   256           16
+  ((bg         '("#251D2F" "#262626"    "black"                         ))
+   (fg         '("#c4b8d3" "#c6c6c6"    "brightwhite"   ))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#1A1521" "#1c1c1c"    "black"                         ))
+   (fg-alt     '("#503F65" "#2d2d2d"    "white"                         ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#0F0C13" "#000000"    "black"                         ))
+   (base1      '("#130F18" "#080808"    "brightblack"   ))
+   (base2      '("#16121C" "#121212"    "brightblack"   ))
+   (base3      '("#1E1826" "#1c1c1c"    "brightblack"   ))
+   (base4      '("#342942" "#303030"    "brightblack"   ))
+   (base5      '("#503F65" "#4e4e4e"    "brightblack"   ))
+   (base6      '("#6C5689" "#666666"    "brightblack"   ))
+   (base7      '("#9783b1" "#949494"    "brightblack"   ))
+   (base8      '("#D3CADE" "#dadada"    "white"                         ))
+
+   (grey       base4)
+   (red        '("#ff6c6b" "#ff5f5f"    "red"                   ))
+   (orange     '("#da8548" "#ff8700"    "brightred"             ))
+   (green      '("#98be65" "#87af5f"    "green"                         ))
+   (teal       '("#1abc9c" "#00af87"    "brightgreen"   ))
+   (yellow     '("#ECBE7B" "#d7af5f"    "yellow"                ))
+   (blue       '("#51afef" "#00afff"    "brightblue"    ))
+   (dark-blue  '("#2257A0" "#005faf"    "blue"                  ))
+   (magenta    '("#7A619A" "#875faf"    "brightmagenta"         ))
+   (violet     '("#9783b1" "#8787af"    "magenta"               ))
+   (cyan       '("#7dcfff" "#87d7ff"    "brightcyan"    ))
+   (dark-cyan  '("#5699AF" "#5fafd7"    "cyan"                  ))
+
+   ;; These are the "universal syntax classes" that doom-themes establishes.
+   ;; These *must* be included in every doom themes, or your theme will throw an
+   ;; error, as they are used in the base theme defined in doom-themes-base.
+   (highlight      violet)
+   (vertical-bar   (doom-darken base1 0.1))
+   (selection      dark-blue)
+   (builtin        magenta)
+   (comments       (if doom-feather-brighter-comments dark-cyan base5))
+   (doc-comments   (doom-lighten (if doom-feather-brighter-comments dark-cyan base5) 0.25))
+   (constants      orange)
+   (functions      blue)
+   (keywords       violet)
+   (methods        cyan)
+   (operators      teal)
+   (type           teal)
+   (strings        green)
+   (variables      (doom-lighten cyan 0.4))
+   (numbers        orange)
+   (region         `(,(doom-lighten (car bg-alt) 0.15) ,@(doom-lighten (cdr base1) 0.35)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; These are extra color variables used only in this theme; i.e. they aren't
+   ;; mandatory for derived themes.
+   (modeline-fg              fg)
+   (modeline-fg-alt          base5)
+   (modeline-bg              (if doom-feather-brighter-modeline
+                                 (doom-darken blue 0.45)
+                               (doom-darken bg-alt 0.1)))
+   (modeline-bg-alt          (if doom-feather-brighter-modeline
+                                 (doom-darken blue 0.475)
+                               `(,(doom-darken (car bg-alt) 0.15) ,@(cdr bg))))
+   (modeline-bg-inactive     `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-alt `(,(doom-darken (car bg-alt) 0.1) ,@(cdr bg)))
+
+   (-modeline-pad
+    (when doom-feather-dark-padded-modeline
+      (if (integerp doom-feather-dark-padded-modeline) doom-feather-dark-padded-modeline 4))))
+
+
+  ;;;; Base theme face overrides
+  (((line-number &override) :foreground base5)
+   ((line-number-current-line &override) :background (doom-lighten bg 0.00) :foreground base7 :weight 'bold)
+   ((font-lock-comment-face &override)
+    :background (if doom-feather-brighter-comments (doom-lighten bg 0.05) 'unspecified) :italic t)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if doom-feather-brighter-modeline base8 highlight))
+   ;;;; button (#include "strings")
+   (button :foreground strings)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; dashboard
+   (dashboard-navigator :foreground teal)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if doom-feather-brighter-modeline modeline-bg highlight))
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; ivy
+   (ivy-current-match :background base7 :distant-foreground bg-alt :weight 'normal)
+   ;;;; LaTeX-mode
+   (font-latex-math-face :foreground green)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; Outlines
+   (outline-1 :height 1.8 :foreground blue :weight 'bold)
+   (outline-2 :height 1.2 :foreground magenta :weight 'bold)
+   (outline-3 :height 1.1 :foreground violet :weight 'bold)
+   (outline-4 :height 1.0 :foreground (doom-lighten blue 0.25) :weight 'bold)
+   (outline-5 :height 1.0 :foreground (doom-lighten magenta 0.25) :weight 'bold)
+   (outline-6 :height 1.0 :foreground (doom-lighten blue 0.5) :weight 'bold)
+   (outline-7 :height 1.0 :foreground (doom-lighten magenta 0.5) :weight 'bold)
+   (outline-8 :height 1.0 :foreground (doom-lighten blue 0.8) :weight 'bold)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground blue)
+   (rainbow-delimiters-depth-2-face :foreground green)
+   (rainbow-delimiters-depth-3-face :foreground orange)
+   (rainbow-delimiters-depth-4-face :foreground blue)
+   (rainbow-delimiters-depth-5-face :foreground green)
+   (rainbow-delimiters-depth-6-face :foreground red)
+   (rainbow-delimiters-depth-7-face :foreground cyan)
+   (rainbow-delimiters-depth-8-face :foreground teal)
+   (rainbow-delimiters-depth-9-face :foreground yellow)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground red)
+   (rjsx-attr :foreground orange)
+   ;;;; Treemacs
+   (treemacs-root-face :foreground teal :weight 'bold :height 1.4)
+   (doom-themes-treemacs-root-face :foreground teal :weight 'ultra-bold :height 1.2)
+   ;;;; Tree-sitter
+   (tree-sitter-hl-face:punctuation.bracket :foreground comments)
+   (tree-sitter-hl-face:attribute :foreground blue)
+   (tree-sitter-hl-face:function\.call :foreground blue)
+   (tree-sitter-hl-face:function\.macro :foreground magenta)
+   (tree-sitter-hl-face:type\.builtin :foreground teal :italic t)
+   (tree-sitter-hl-face:variable\.special :foreground constants)
+   (tree-sitter-hl-face:operator :foreground operators)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt))))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-feather-dark-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-feather-light-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-feather-light-theme.el
new file mode 100644
index 0000000..f9060c3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-feather-light-theme.el
@@ -0,0 +1,235 @@
+;;; doom-feather-light-theme.el --- a light variable of feather-dark, inspired by doom-one -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Date: November 12, 2022
+;; Author: Lena SAVY-LARIGALDIE <https://gitlab.com/Plunne>
+;; Maintainer: Lena SAVY-LARIGALDIE <https://gitlab.com/Plunne>
+;; Source: https://github.com/Plunne/doom-feather-theme
+;;
+;;; Code:
+
+(require 'doom-themes)
+
+;;
+;;; Variables
+
+(defgroup doom-feather-light-theme nil
+  "Options for the `doom-feather-light' theme."
+  :group 'doom-themes)
+
+(defcustom doom-feather-light-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-feather-light-theme
+  :type 'boolean)
+
+(defcustom doom-feather-light-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-feather-light-theme
+  :type 'boolean)
+
+(defcustom doom-feather-light-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-feather-light-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-feather-light
+  "A light theme based on Doom One Light."
+  :family 'doom-feather
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  ((bg         '("#F0EDF4" "#ffffff" "white"        ))
+   (fg         '("#4A3B5E" "#424242" "black"        ))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#E8E4EE" "#e4e4e4" "white"        ))
+   (fg-alt     '("#9783B1" "#949494" "brightblack"  ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#E8E4EE" "#eeeeee" "white"        ))
+   (base1      '("#E1DBE9" "#e4e4e4" "brightblack"  ))
+   (base2      '("#D9D2E3" "#dadada" "brightblack"  ))
+   (base3      '("#C3B7D2" "#c6c6c6" "brightblack"  ))
+   (base4      '("#B4A5C7" "#b2b2b2" "brightblack"  ))
+   (base5      '("#9783B1" "#949494" "brightblack"  ))
+   (base6      '("#4A3B5E" "#424242" "brightblack"  ))
+   (base7      '("#2A2236" "#262626" "brightblack"  ))
+   (base8      '("#15111B" "#121212" "black"        ))
+
+   (grey       base4)
+   (red        '("#dc322f" "#dc322f" "red"          ))
+   (orange     '("#d75f00" "#d75f00" "brightred"    ))
+   (green      '("#5f8700" "#578700" "green"        ))
+   (teal       '("#008070" "#008787" "brightgreen"  ))
+   (yellow     '("#a07000" "#875f00" "yellow"       ))
+   (blue       '("#007daf" "#0087d7" "brightblue"   ))
+   (dark-blue  '("#2257A0" "#005faf" "blue"         ))
+   (magenta    '("#f4649b" "#ff5f87" "magenta"      ))
+   (violet     '("#875faf" "#875faf" "brightmagenta"))
+   (cyan       '("#008ea1" "#0087af" "brightcyan"   ))
+   (dark-cyan  '("#204052" "#005f5f" "cyan"         ))
+
+   ;; These are the "universal syntax classes" that doom-themes establishes.
+   ;; These *must* be included in every doom themes, or your theme will throw an
+   ;; error, as they are used in the base theme defined in doom-themes-base.
+   (highlight      base5)
+   (vertical-bar   (doom-darken base2 0.1))
+   (selection      dark-blue)
+   (builtin        blue)
+   (comments       (if doom-feather-light-brighter-comments cyan base4))
+   (doc-comments   (doom-darken comments 0.15))
+   (constants      teal)
+   (functions      blue)
+   (keywords       violet)
+   (methods        cyan)
+   (operators      magenta)
+   (type           magenta)
+   (strings        green)
+   (variables      (doom-darken violet 0.4))
+   (numbers        teal)
+   (region         `(,(doom-darken (car bg-alt) 0.1) ,@(doom-darken (cdr base0) 0.3)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; These are extra color variables used only in this theme; i.e. they aren't
+   ;; mandatory for derived themes.
+   (modeline-fg              fg)
+   (modeline-fg-alt          (doom-blend
+                              violet base4
+                              (if doom-feather-light-brighter-modeline 0.5 0.2)))
+   (modeline-bg              (if doom-feather-light-brighter-modeline
+                                 (doom-darken base2 0.05)
+                               base1))
+   (modeline-bg-alt          (if doom-feather-light-brighter-modeline
+                                 (doom-darken base2 0.1)
+                               base2))
+   (modeline-bg-inactive     (doom-darken bg 0.1))
+   (modeline-bg-alt-inactive `(,(doom-darken (car bg-alt) 0.05) ,@(cdr base1)))
+
+   (-modeline-pad
+    (when doom-feather-light-padded-modeline
+      (if (integerp doom-feather-light-padded-modeline) doom-feather-light-padded-modeline 4))))
+
+  ;;;; Base theme face overrides
+   (((line-number &override) :foreground (doom-lighten base4 0.15))
+   ((line-number-current-line &override) :background bg :foreground base5)
+   ((font-lock-comment-face &override) :background (if doom-feather-light-brighter-comments base0 'unspecified) :italic t)
+   ((font-lock-doc-face &override) :slant 'italic)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis
+    :foreground (if doom-feather-light-brighter-modeline base8 highlight))
+   (shadow :foreground base4)
+   (tooltip :background base1 :foreground fg)
+   ;;;; button (#include "strings")
+   (button :foreground strings)
+   ;;;; centaur-tabs
+   (centaur-tabs-unselected :background bg-alt :foreground base4)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; dashboard
+   (dashboard-navigator :foreground magenta)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if doom-feather-light-brighter-modeline modeline-bg highlight))
+   ;;;; ediff <built-in>
+   (ediff-current-diff-A        :foreground red   :background (doom-lighten red 0.8))
+   (ediff-current-diff-B        :foreground green :background (doom-lighten green 0.8))
+   (ediff-current-diff-C        :foreground blue  :background (doom-lighten blue 0.8))
+   (ediff-current-diff-Ancestor :foreground teal  :background (doom-lighten teal 0.8))
+   ;;;; helm
+   (helm-candidate-number :background blue :foreground bg)
+   ;;;; ivy
+   (ivy-current-match :background base2 :distant-foreground fg :weight 'normal)
+   ;;;; lsp-mode
+   (lsp-ui-doc-background      :background base0)
+   ;;;; magit
+   (magit-blame-heading     :foreground orange :background bg-alt)
+   (magit-diff-removed :foreground (doom-darken red 0.2) :background (doom-blend red bg 0.1))
+   (magit-diff-removed-highlight :foreground red :background (doom-blend red bg 0.2) :bold bold)
+   ;;;; markdown-mode
+   (markdown-markup-face     :foreground base5)
+   (markdown-header-face     :inherit 'bold :foreground red)
+   ((markdown-code-face &override)       :background base1)
+   (mmm-default-submode-face :background base1)
+   ;;;; Outlines
+   (outline-1 :height 1.8 :foreground magenta :weight 'bold)
+   (outline-2 :height 1.2 :foreground violet :weight 'bold)
+   (outline-3 :height 1.1 :foreground teal :weight 'bold)
+   (outline-4 :height 1.0 :foreground (doom-darken violet 0.25) :weight 'bold)
+   (outline-5 :height 1.0 :foreground (doom-darken teal 0.25) :weight 'bold)
+   (outline-6 :height 1.0 :foreground (doom-darken violet 0.5) :weight 'bold)
+   (outline-7 :height 1.0 :foreground (doom-darken teal 0.5) :weight 'bold)
+   (outline-8 :height 1.0 :foreground (doom-darken violet 0.8) :weight 'bold)
+   ;;;; org <built-in>
+   ((org-block &override) :background base1)
+   ((org-block-begin-line &override) :foreground comments)
+   (org-ellipsis :underline nil :background bg     :foreground red)
+   ((org-quote &override) :background base1)
+   ;;;; posframe
+   (ivy-posframe               :background base0)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground blue)
+   (rainbow-delimiters-depth-2-face :foreground green)
+   (rainbow-delimiters-depth-3-face :foreground magenta)
+   (rainbow-delimiters-depth-4-face :foreground blue)
+   (rainbow-delimiters-depth-5-face :foreground green)
+   (rainbow-delimiters-depth-6-face :foreground orange)
+   (rainbow-delimiters-depth-7-face :foreground red)
+   (rainbow-delimiters-depth-8-face :foreground yellow)
+   (rainbow-delimiters-depth-9-face :foreground violet)
+   ;;;; selectrum
+   (selectrum-current-candidate :background base2)
+   ;;;; Treemacs
+   (treemacs-root-face :foreground teal :weight 'bold :height 1.4)
+   (doom-themes-treemacs-root-face :foreground teal :weight 'ultra-bold :height 1.2)
+   ;;;; Tree-sitter
+   (tree-sitter-hl-face:punctuation.bracket :foreground comments)
+   (tree-sitter-hl-face:attribute :foreground violet)
+   (tree-sitter-hl-face:function\.call :foreground blue)
+   (tree-sitter-hl-face:function\.macro :foreground blue)
+   (tree-sitter-hl-face:type\.builtin :foreground magenta :italic t)
+   (tree-sitter-hl-face:variable\.special :foreground constants)
+   (tree-sitter-hl-face:operator :foreground operators)
+   ;;;; vertico
+   (vertico-current :background base2)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-alt-inactive
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt-inactive)))
+   ;;;; web-mode
+   (web-mode-current-element-highlight-face :background dark-blue :foreground bg)
+   ;;;; wgrep <built-in>
+   (wgrep-face :background base1)
+   ;;;; whitespace
+   ((whitespace-tab &override)         :background (if (not (default-value 'indent-tabs-mode)) base0 'unspecified))
+   ((whitespace-indentation &override) :background (if (default-value 'indent-tabs-mode) base0 'unspecified)))
+
+  ;;;; Base theme variable overrides-
+  ()
+  )
+
+;;; doom-feather-light-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-flatwhite-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-flatwhite-theme.el
new file mode 100644
index 0000000..600bd72
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-flatwhite-theme.el
@@ -0,0 +1,604 @@
+;;; doom-flatwhite-theme.el --- inspired by Atom's Flatwhite Syntax theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: August 9, 2020 (#507)
+;; Author: JuneKelly <https://github.com/JuneKelly>
+;; Maintainer:
+;; Source: https://github.com/biletskyy/flatwhite-syntax
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-flatwhite-theme nil
+  "Options for the `doom-flatwhite' theme."
+  :group 'doom-themes)
+
+(defcustom doom-flatwhite-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-flatwhite-theme
+  :type 'boolean)
+
+(defcustom doom-flatwhite-no-highlight-variables nil
+  "If non-nil, removes highlight on variable names"
+  :group 'doom-flatwhite-theme
+  :type 'boolean)
+
+(defcustom doom-fw-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-flatwhite-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-flatwhite
+  "A minimal light syntax theme"
+
+  ;; name        default   256       16
+  (
+   (fw-base1           '("#605a52" "#666666" "black"))
+   (fw-base2           '("#93836c" "#999966" "brightblack"))
+   (fw-base3           '("#b9a992" "#cc9999" "brightblack"))
+   (fw-base4           '("#dcd3c6" "#cccccc" "brightblack"))
+   (fw-base5           '("#e4ddd2" "#cccccc" "brightblack"))
+   (fw-base6           '("#f1ece4" "#ffffcc" "brightblack"))
+   (fw-base7           '("#f7f3ee" "#ffffff" "brightblack"))
+
+   (fw-accent          '("#6a4dff" "#6666ff" "brightblue"))
+
+   (fw-orange-text     '("#5b5143" "#666633" "brightblack"))
+   (fw-orange-text-sec '("#957f5f" "#996666" "brightblack"))
+   (fw-orange          '("#f08c00" "#ff9900" "orange"))
+   (fw-orange-blend    '("#f7e0c3" "#ffcccc" "brightorange"))
+
+   (fw-red-text        '("#5b4343" "#663333" "brightblack"))
+   (fw-red-text-sec    '("#955f5f" "#996666" "brightblack"))
+   (fw-red             '("#f00000" "#ff0000" "red"))
+   (fw-red-blend       '("#f6cfcb" "#ffcccc" "brightred"))
+
+   (fw-green-text      '("#525643" "#666633" "brightblack"))
+   (fw-green-text-sec  '("#81895d" "#999966" "brightblack"))
+   (fw-green           '("#84bd00" "#99cc00" "green"))
+   (fw-green-blend     '("#e2e9c1" "#ccffcc" "brightgreen"))
+
+   (fw-teal-text       '("#465953" "#336666" "brightblack"))
+   (fw-teal-text-sec   '("#5f8c7d" "#669966" "brightblack"))
+   (fw-teal            '("#00bda4" "#00cc99" "cyan"))
+   (fw-teal-blend      '("#d2ebe3" "#ccffcc" "brightcyan"))
+
+   (fw-blue-text       '("#4c5361" "#336666" "brightblack"))
+   (fw-blue-text-sec   '("#7382a0" "#669999" "brightblack"))
+   (fw-blue            '("#75a3ff" "#6699ff" "blue"))
+   (fw-blue-blend      '("#dde4f2" "#ccccff" "brightblue"))
+
+   (fw-purple-text     '("#614c61" "#663366" "brightblack"))
+   (fw-purple-text-sec '("#9c739c" "#996699" "brightblack"))
+   (fw-purple          '("#ce5cff" "#cc66ff" "purple"))
+   (fw-purple-blend    '("#f1ddf1" "#ffccff" "brightpurple"))
+
+   (bg         `(,(car fw-base7) nil       nil            ))
+   (bg-alt     `(,(car fw-base6) nil       nil            ))
+   (base0      fw-base6)
+   (base1      fw-base5 )
+   (base2      fw-base4 )
+   (base3      fw-base3 )
+   (base4      fw-base2 )
+   (base5      fw-base1 )
+   (base6      '("#202328"       nil "brightblack"  ))
+   (base7      '("#1c1f24"       nil "brightblack"  ))
+   (base8      '("#1b2229"       nil "black"        ))
+   (fg         `(,(car fw-base1) nil "black"        ))
+   (fg-alt     `(,(car fw-base2) nil "brightblack"  ))
+
+   (grey       base3)
+   (red        fw-red-text-sec)
+   (orange     fw-orange-text-sec)
+   (green      fw-green-text-sec)
+   (teal       fw-teal-text-sec)
+   (yellow     fw-orange-text-sec)
+   (blue       fw-blue-text-sec)
+   (dark-blue  fw-blue-text-sec)
+   (magenta    fw-purple-text-sec)
+   (violet     fw-purple-text-sec)  ;; TODO fix these
+   (cyan       fw-teal-text-sec)
+   (dark-cyan  fw-teal-text-sec)
+
+   (fw--light-accent (doom-lighten fw-accent 0.85))
+
+   ;; face categories -- required for all themes
+   (highlight       blue)
+   (vertical-bar   (doom-darken base2 0.1))
+   (selection      dark-blue)
+   (builtin        magenta)
+   (comments       base3)
+   (doc-comments   (doom-darken comments 0.15))
+   (constants      violet)
+   (functions      magenta)
+   (keywords       red)
+   (methods        cyan)
+   (operators      blue)
+   (type           orange)
+   (strings        green)
+   (variables      (doom-darken magenta 0.36))
+   (numbers        orange)
+   (region         `(,(doom-darken (car bg-alt) 0.1) ,@(doom-darken (cdr base0) 0.3)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (-modeline-bright doom-flatwhite-brighter-modeline)
+   (-no-highlight-variables doom-flatwhite-no-highlight-variables)
+   (-modeline-pad
+    (when doom-fw-padded-modeline
+      (if (integerp doom-fw-padded-modeline) doom-fw-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt fw-base2)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken base2 0.05)
+      base1))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken base2 0.1)
+      base2))
+   (modeline-bg-inactive (doom-darken bg 0.1))
+   (modeline-bg-inactive-l `(,(doom-darken (car bg-alt) 0.05) ,@(cdr base1))))
+
+
+  ;;;; Base theme face overrides
+  ((font-lock-builtin-face :inherit 'italic :foreground fg :extend t)
+   ((font-lock-doc-face &override) :slant 'italic)
+   (font-lock-type-face :inherit 'default)
+   (font-lock-variable-name-face
+    :foreground (if -no-highlight-variables fg fw-blue-text)
+    :background (if -no-highlight-variables bg fw-blue-blend))
+   (font-lock-warning-face              :background fw-red-blend
+                                        :foreground fw-red-text)
+   (font-lock-negation-char-face        :inherit 'default)
+   (font-lock-preprocessor-face         :inherit 'default)
+   (font-lock-preprocessor-char-face    :inherit 'default)
+   (font-lock-regexp-grouping-backslash :inherit 'default)
+   (font-lock-regexp-grouping-construct :inherit 'default)
+   (font-lock-constant-face             :background fw-teal-blend
+                                        :foreground fw-teal-text)
+   (font-lock-function-name-face        :foreground fg
+                                        :weight 'semi-bold)
+   (font-lock-keyword-face              :background fw-purple-blend
+                                        :foreground fw-purple-text)
+   (font-lock-string-face               :background fw-green-blend
+                                        :foreground fw-green-text )
+
+   (lazy-highlight :background fw--light-accent
+                   :foreground fw-blue-text
+                   :distant-foreground base0
+                   :weight 'bold)
+
+   ((line-number &override) :foreground (doom-lighten base4 0.15))
+   ((line-number-current-line &override) :foreground base8)
+
+   (mode-line
+    :background modeline-bg
+    :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive
+    :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; centaur-tabs
+   (centaur-tabs-unselected :background bg-alt :foreground base4)
+   ;;;; swiper
+   (swiper-line-face    :background fw--light-accent
+                        :foreground fw-blue-text)
+   (swiper-match-face-1 :inherit 'unspecified
+                        :background base0
+                        :foreground fg)
+   (swiper-background-match-face-1 :inherit 'unspecified
+                                   :background base0
+                                   :foreground fg-alt)
+   (swiper-match-face-2 :inherit 'unspecified
+                        :background fw-orange-blend
+                        :foreground fw-orange-text
+                        :weight 'bold)
+   (swiper-background-match-face-2 :inherit 'unspecified
+                                   :background fw-orange-blend
+                                   :foreground fw-orange-text-sec
+                                   :weight 'bold)
+   (swiper-match-face-3 :inherit 'unspecified
+                        :background fw-green-blend
+                        :foreground fw-green-text
+                        :weight 'bold)
+   (swiper-background-match-face-3 :inherit 'unspecified
+                                   :background fw-green-blend
+                                   :foreground fw-green-text-sec
+                                   :weight 'bold)
+   (swiper-match-face-4 :inherit 'unspecified
+                        :background fw-teal-blend
+                        :foreground fw-teal-text
+                        :weight 'bold)
+   (swiper-background-match-face-4 :inherit 'unspecified
+                                   :background fw-teal-blend
+                                   :foreground fw-teal-text-sec
+                                   :weight 'bold)
+   ;;;; company
+   (company-tooltip            :inherit 'tooltip)
+   (company-tooltip-annotation            :foreground fw-purple-text-sec )
+   (company-tooltip-annotation-selection  :foreground fw-purple-text )
+   (company-tooltip-common                :foreground highlight
+                                          :distant-foreground base0
+                                          :weight 'bold)
+   (company-tooltip-search     :background highlight
+                               :foreground bg
+                               :distant-foreground fg
+                               :weight 'bold)
+   (company-tooltip-search-selection :background fw-blue-blend)
+   (company-tooltip-selection  :background fw--light-accent
+                               :weight 'bold)
+   (company-tooltip-mouse      :background magenta
+                               :foreground bg
+                               :distant-foreground fg)
+   (company-tooltip-annotation :foreground violet
+                               :distant-foreground bg)
+   (company-scrollbar-bg       :inherit 'tooltip)
+   (company-scrollbar-fg       :background highlight)
+   (company-preview            :foreground comments)
+   (company-preview-common     :background base3
+                               :foreground highlight)
+   (company-preview-search     :inherit 'company-tooltip-search)
+   (company-template-field     :inherit 'match)
+   ;;;; clojure
+   (clojure-keyword-face :foreground fw-orange-text
+                         :background fw-orange-blend)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-property             :foreground fg
+                             :inherit 'italic)
+   (css-proprietary-property :foreground fw-orange-text
+                             :background fw-orange-blend)
+   (css-selector             :foreground fw-purple-text
+                             :background fw-purple-blend)
+   ;;;; company-box
+   (company-box-candidate :foreground fg)
+   ;;;; doom-emacs
+   (doom-dashboard-banner      :foreground comments)
+   (doom-dashboard-menu-title  :foreground fw-purple-text-sec)
+   (doom-dashboard-menu-desc   :foreground fw-green-text-sec)
+   (doom-dashboard-footer-icon :foreground (doom-darken yellow 0.4))
+   (doom-dashboard-loaded      :foreground fw-orange-text)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-buffer-path       :foreground fw-blue-text-sec
+                                    :bold bold)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path )
+   (doom-modeline-info              :foreground fw-green-text-sec)
+   (doom-modeline-project-dir       :foreground fw-purple-text-sec)
+   (doom-modeline-evil-insert-state :foreground fw-teal)
+   ;;;; diff-mode
+   (diff-removed :foreground red
+                 :background fw-red-blend)
+   ;;;; ediff <built-in>
+   (ediff-current-diff-A        :foreground red
+                                :background (doom-lighten red 0.8))
+   (ediff-current-diff-B        :foreground green
+                                :background (doom-lighten green 0.8))
+   (ediff-current-diff-C        :foreground blue
+                                :background (doom-lighten blue 0.8))
+   (ediff-current-diff-Ancestor :foreground teal
+                                :background (doom-lighten teal 0.8))
+   ;;;; elixir
+   (elixir-atom-face :foreground fw-blue-text
+                     :background fw-blue-blend)
+   (elixir-attribute-face :foreground fw-teal-text
+                          :background fw-teal-blend)
+   ;;;; fill column
+   (hl-fill-column-face :foreground fg
+                        :background fw--light-accent)
+   ;;;; git-commit
+   (git-commit-summary :foreground fg)
+   ;;;; highlight-numbers-mode
+   (highlight-numbers-number :foreground fw-teal-text
+                             :background fw-teal-blend)
+   ;;;; highlight-quoted-mode
+   (highlight-quoted-symbol :background fw-blue-blend
+                            :foreground fw-blue-text)
+   (highlight-quoted-quote  :foreground fw-teal-blend
+                            :foreground fw-teal-text)
+   ;;;; ivy
+   (ivy-current-match :background fw-base5
+                      :distant-foreground nil
+                      :extend t)
+   (ivy-minibuffer-match-face-1
+    :background nil
+    :foreground fg
+    :weight 'light)
+   (ivy-minibuffer-match-face-2
+    :inherit 'ivy-minibuffer-match-face-1
+    :foreground fw-orange-text
+    :background fw-orange-blend
+    :weight 'semi-bold)
+   (ivy-minibuffer-match-face-3
+    :inherit 'ivy-minibuffer-match-face-2
+    :foreground fw-blue-text
+    :background fw-blue-blend
+    :weight 'semi-bold)
+   (ivy-minibuffer-match-face-4
+    :inherit 'ivy-minibuffer-match-face-2
+    :foreground fw-green-text
+    :background fw-green-blend
+    :weight 'semi-bold)
+   (ivy-minibuffer-match-highlight :foreground bg
+                                   :background fw-purple-text-sec)
+   (ivy-highlight-face :foreground fw-purple-text)
+   (ivy-confirm-face :foreground success)
+   (ivy-match-required-face :foreground error)
+   (ivy-virtual :inherit 'italic :foreground doc-comments)
+   (ivy-modified-buffer :inherit 'bold :foreground vc-modified)
+   ;;;; ivy-posframe
+   (ivy-posframe               :background base0)
+   ;;;; js2-mode
+   (js2-function-param    :foreground fg)
+   (js2-function-call     :foreground fg )
+   (js2-object-property   :foreground fg :inherit 'italic)
+   (js2-jsdoc-tag         :foreground doc-comments)
+   (js2-external-variable :foreground fg)
+   ;;;; lsp-mode
+   (lsp-ui-doc-background      :background base0)
+   (lsp-face-highlight-read    :background (doom-blend red bg 0.3))
+   (lsp-face-highlight-textual :inherit 'lsp-face-highlight-read)
+   (lsp-face-highlight-write   :inherit 'lsp-face-highlight-read)
+   ;;;; magit
+   (magit-bisect-bad        :background fw-red-blend
+                            :foreground fw-red-text)
+   (magit-bisect-good       :background fw-green-blend
+                            :foreground fw-green-text)
+   (magit-bisect-skip       :background fw-orange-blend
+                            :foreground fw-orange-text)
+   (magit-blame-date        :background fw-base4
+                            :foreground fw-red-text)
+   (magit-blame-heading     :background fw-base4
+                            :foreground fw-orange-text)
+   (magit-branch-current    :background bg-alt
+                            :foreground fw-blue-text)
+   (magit-branch-local      :background bg-alt
+                            :foreground fw-teal-text)
+   (magit-branch-remote     :background bg-alt
+                            :foreground fw-green-text)
+   (magit-cherry-equivalent :background fw-base7
+                            :foreground fw-purple-text)
+   (magit-cherry-unmatched  :background fw-base7
+                            :foreground fw-teal-text)
+
+   (magit-diff-added             :foreground fw-green-text-sec
+                                 :background fw-green-blend
+                                 :extend t)
+   (magit-diff-added-highlight   :foreground fw-green-text
+                                 :background fw-green-blend
+                                 :weight 'bold :extend t)
+
+   (magit-diff-base              :foreground fw-orange-text-sec
+                                 :background fw-orange-blend
+                                 :extend t)
+   (magit-diff-base-highlight    :foreground fw-orange-text
+                                 :background fw-orange-blend
+                                 :weight 'bold
+                                 :extend t)
+
+   (magit-diff-context           :foreground (doom-darken fg 0.4)
+                                 :background bg
+                                 :extend t)
+   (magit-diff-context-highlight :foreground fg
+                                 :background bg-alt
+                                 :extend t)
+   (magit-diff-file-heading           :foreground fw-purple-text-sec
+                                      :background fw-purple-blend
+                                      :weight 'bold
+                                      :extend t)
+   (magit-diff-file-heading-selection :foreground fw-purple-text
+                                      :background fw-purple-blend
+                                      :weight 'bold
+                                      :extend t)
+   (magit-diff-hunk-heading           :foreground fw-purple-text-sec
+                                      :background fw-purple-blend
+                                      :extend t)
+   (magit-diff-hunk-heading-selection :foreground fw-purple-text-sec
+                                      :background fw-purple-blend
+                                      :extend t)
+   (magit-diff-hunk-heading-highlight :foreground fw-purple-blend
+                                      :background fw-purple-text-sec
+                                      :weight 'bold
+                                      :extend t)
+
+   (magit-diff-removed                :foreground fw-red-text-sec
+                                      :background fw-red-blend
+                                      :extend t)
+   (magit-diff-removed-highlight      :foreground fw-red-text
+                                      :background fw-red-blend
+                                      :weight 'bold
+                                      :extend t)
+
+   (magit-diff-lines-heading          :foreground yellow
+                                      :background red
+                                      :extend t)
+   (magit-diffstat-added              :foreground fw-green)
+   (magit-diffstat-removed            :foreground fw-red)
+   (magit-dimmed                      :foreground comments)
+   (magit-hash                        :foreground fg-alt)
+   (magit-header-line :background fw-blue-blend
+                      :foreground fw-blue-text
+                      :weight 'bold
+                      :box `(:line-width 3 :color ,fw-blue-blend))
+   (magit-log-author :foreground fw-orange-text-sec)
+   (magit-log-date   :foreground fw-blue-text-sec)
+   (magit-log-graph  :foreground comments)
+   (magit-process-ng :inherit 'error)
+   (magit-process-ok :inherit 'success)
+   (magit-reflog-amend :foreground magenta)
+   (magit-reflog-checkout :foreground blue)
+   (magit-reflog-cherry-pick :foreground green)
+   (magit-reflog-commit :foreground green)
+   (magit-reflog-merge :foreground green)
+   (magit-reflog-other :foreground cyan)
+   (magit-reflog-rebase :foreground magenta)
+   (magit-reflog-remote :foreground cyan)
+   (magit-reflog-reset :inherit 'error)
+   (magit-refname :foreground comments)
+   (magit-section-heading :foreground blue
+                          :weight 'bold
+                          :extend t)
+   (magit-section-heading-selection :foreground orange
+                                    :weight 'bold
+                                    :extend t)
+   (magit-section-highlight :inherit 'hl-line)
+   (magit-sequence-drop :foreground red)
+   (magit-sequence-head :foreground blue)
+   (magit-sequence-part :foreground orange)
+   (magit-sequence-stop :foreground green)
+   (magit-signature-bad :inherit 'error)
+   (magit-signature-error :inherit 'error)
+   (magit-signature-expired :foreground orange)
+   (magit-signature-good :inherit 'success)
+   (magit-signature-revoked :foreground magenta)
+   (magit-signature-untrusted :foreground yellow)
+   (magit-tag :foreground yellow)
+   (magit-filename :foreground violet)
+   (magit-section-secondary-heading :foreground violet
+                                    :weight 'bold
+                                    :extend t)
+   ;;;; makefile-*-mode
+   (makefile-targets :foreground fw-purple-text
+                     :background fw-purple-blend)
+   ;;;; markdown-mode
+   (markdown-header-face           :inherit 'bold
+                                   :foreground fw-purple-text
+                                   :background fw-purple-blend)
+   (markdown-header-delimiter-face :inherit 'markdown-header-face)
+   (markdown-metadata-key-face     :foreground fw-green-text
+                                   :background fw-green-blend)
+   (markdown-list-face             :foreground fg
+                                   :inherit 'bold)
+   (markdown-link-face             :foreground fw-blue-text
+                                   :background fw-blue-blend)
+   (markdown-url-face              :foreground fw-blue-text
+                                   :background fw-blue-blend)
+   (markdown-italic-face           :inherit 'italic
+                                   :foreground fg)
+   (markdown-bold-face             :inherit 'bold
+                                   :foreground fg)
+   (markdown-markup-face           :foreground fg
+                                   :inherit 'bold)
+   (markdown-blockquote-face       :inherit 'italic
+                                   :foreground doc-comments)
+   (markdown-pre-face              :foreground fg)
+   (markdown-code-face             :background fw-orange-blend
+                                   :foreground fw-orange-text
+                                   :extend t)
+   (markdown-reference-face        :foreground doc-comments)
+   (markdown-inline-code-face      :inherit '(markdown-code-face markdown-pre-face)
+                                   :extend nil)
+   (markdown-html-attr-name-face     :inherit 'font-lock-variable-name-face)
+   (markdown-html-attr-value-face    :inherit 'font-lock-string-face)
+   (markdown-html-entity-face        :inherit 'font-lock-variable-name-face)
+   (markdown-html-tag-delimiter-face :inherit 'markdown-markup-face)
+   (markdown-html-tag-name-face      :inherit 'font-lock-keyword-face)
+   ;;;; org-mode
+   ((outline-1 &override) :foreground red)
+   ((outline-2 &override) :foreground orange)
+   (org-ellipsis :underline nil :background bg     :foreground red)
+   ((org-block-begin-line &override)
+    :background fw-orange-blend
+    :foreground fw-orange-text
+    :weight 'semi-bold)
+   ((org-block &override)
+    :background fw-orange-blend
+    :foreground fw-orange-text)
+   ((org-quote &override)
+    :background fw-orange-blend
+    :foreground fw-orange-text)
+   ;;;; racket
+   (racket-keyword-argument-face :foreground fw-orange-text
+                                 :background fw-orange-blend)
+   (racket-selfeval-face :foreground fw-teal-text
+                         :background fw-teal-blend)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground fw-blue-text-sec)
+   (rainbow-delimiters-depth-2-face :foreground fw-purple-text-sec)
+   (rainbow-delimiters-depth-3-face :foreground fw-green-text-sec)
+   (rainbow-delimiters-depth-4-face :foreground fw-orange-text-sec)
+   (rainbow-delimiters-depth-5-face :foreground fw-teal-text-sec)
+   (rainbow-delimiters-depth-6-face :foreground fw-red-text-sec)
+   (rainbow-delimiters-depth-7-face :foreground fw-green-text-sec)
+   (rainbow-delimiters-unmatched-face  :foreground red
+                                       :weight 'bold
+                                       :inverse-video t)
+   (rainbow-delimiters-mismatched-face :inherit 'rainbow-delimiters-unmatched-face)
+   ;;;; rjsx-mode
+   (rjsx-tag  :background fw-purple-blend
+              :foreground fw-purple-text)
+   (rjsx-text :inherit 'default)
+   (rjsx-tag-bracket-face :background bg
+                          :foreground fg-alt)
+   (rjsx-attr :background bg
+              :foreground fg
+              :inherit 'italic)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; web-mode
+   (web-mode-current-element-highlight-face :background dark-blue
+                                            :foreground bg)
+   (web-mode-css-property-name-face :foreground fg
+                                    :inherit 'italic)
+   (web-mode-doctype-face           :background bg
+                                    :foreground comments)
+   (web-mode-html-tag-face          :background fw-purple-blend
+                                    :foreground fw-purple-text)
+   (web-mode-html-attr-name-face    :background bg
+                                    :foreground fg
+                                    :inherit 'italic)
+   (web-mode-html-attr-value-face   :inherit 'font-lock-string-face)
+   (web-mode-html-entity-face       :background fw-orange-blend
+                                    :foreground fw-orange-text
+                                    :inherit 'italic)
+   (web-mode-block-control-face     :background bg
+                                    :foreground fw-base1)
+   (web-mode-html-tag-bracket-face  :background bg
+                                    :foreground fg-alt)
+   (web-mode-symbol-face            :foreground fw-blue-text
+                                    :background fw-blue-blend)
+   (web-mode-string-face            :inherit 'font-lock-string-face)
+   ;;;; wgrep <built-in>
+   (wgrep-face :background base1)
+   ;;;; which-key
+   (which-key-key-face                   :foreground fw-green-text-sec)
+   (which-key-group-description-face     :foreground fw-purple-text-sec)
+   (which-key-command-description-face   :foreground fg)
+   (which-key-local-map-description-face :foreground fw-orange-text-sec)
+   (which-key-separator-face             :background bg-alt :foreground comments)
+   ;;;; whitespace
+   ((whitespace-tab &override)         :background (if (not (default-value 'indent-tabs-mode)) base0 'unspecified))
+   ((whitespace-indentation &override) :background (if (default-value 'indent-tabs-mode) base0 'unspecified)))
+
+  ;;;; Base theme variable overrides-
+  ()
+  )
+
+;;; doom-flatwhite-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-gruvbox-light-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-gruvbox-light-theme.el
new file mode 100644
index 0000000..8d3229c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-gruvbox-light-theme.el
@@ -0,0 +1,515 @@
+;;; doom-gruvbox-light-theme.el --- inspired by morhetz's Gruvbox (light) -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 6, 2020 (#446)
+;; Author: jsoa <https://github.com/jsoa>
+;; Maintainer:
+;; Source: https://github.com/morhetz/gruvbox
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-gruvbox-light-theme nil
+  "Options for the `doom-gruvbox-light' theme."
+  :group 'doom-themes)
+
+(defcustom doom-gruvbox-light-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-gruvbox-light-theme
+  :type 'boolean)
+
+(defcustom doom-gruvbox-light-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-gruvbox-light-theme
+  :type 'boolean)
+
+(defcustom doom-gruvbox-light-comment-bg doom-gruvbox-light-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-gruvbox-light-theme
+  :type 'boolean)
+
+(defcustom doom-gruvbox-light-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-gruvbox-light-theme
+  :type '(choice integer boolean))
+
+(defcustom doom-gruvbox-light-variant nil
+  "A choice of \"hard\" or \"soft\" can be used to change the
+background contrast. All other values default to \"medium\"."
+  :group 'doom-gruvbox-light-theme
+  :type  'string)
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-gruvbox-light
+  "gruvbox light theme"
+  :family 'doom-gruvbox
+  :background-mode 'light
+
+  ;; name        default   256       16
+  ((bg
+    (cond ((equal doom-gruvbox-light-variant "hard") '("#f9f5d7" "#ffffd7" nil))   ; bg0_h
+          ((equal doom-gruvbox-light-variant "soft") '("#f2e5bc" "#ffffd7" nil))   ; bg0_s
+          (t                                         '("#fbf1c7" "#ffffd7" nil)))) ; bg0
+   (bg-alt
+    (cond ((equal doom-gruvbox-light-variant "hard") '("#fbf1c7" "#ffffd7" nil))
+          ((equal doom-gruvbox-light-variant "soft") '("#ebdbb2" "#ffffaf" nil))
+          (t                                         '("#f2e5bc" "#ffffd7" nil))))
+   (base0      '("#f0f0f0" "#f0f0f0" "white"           )) ;;
+   (base1      '("#ebdbb2" "#ffffaf" "brightblack"     )) ;; gruvbox-dark1
+   (base2      '("#d5c4a1" "#d7d6af" "brightblack"     )) ;; gruvbox-dark2
+   (base3      '("#bdae93" "#afaf87" "brightblack"     )) ;; gruvbox-dark3
+   (base4      '("#a89984" "#afafaf" "brightblack"     )) ;; gruvbox-dark4
+   (base5      '("#504945" "#4e4e4e" "brightblack"     )) ;; gruvbox-light2
+   (base6      '("#3c3836" "#3a3a3a" "brightblack"     )) ;; gruvbox-light1
+   (base7      '("#282828" "#262626" "brightblack"     )) ;; gruvbox-light0
+   (base8      '("#1d2021" "#1c1c1c"  "black"          )) ;; gruvbox-light0_hard
+   (fg         '("#282828" "#262626" "black"           )) ;; gruvbox-light0
+   (fg-alt     '("#1c1c1c" "#1c1c1c" "brightblack"     )) ;;
+
+
+   (grey       '("#928374" "#8a8a8a" "grey"            )) ;; gruvbox-gray
+   (red        '("#9d0006" "#870000" "red"             )) ;; gruvbox-bright_red
+   (orange     '("#af3a03" "#af5f00" "brightred"       )) ;; gruvbox-bright_orange
+   (green      '("#79740e" "#878700" "green"           )) ;; gruvbox-bright_green
+   (teal       '("#4db5bd" "#44b9b1" "brightgreen"     )) ;; gruvbox-
+   (yellow     '("#b57614" "#af8700" "yellow"          )) ;; gruvbox-bright_yellow
+   (blue       '("#076678" "#005f87" "brightblue"      )) ;; gruvbox-bright_blue
+   (dark-blue  '("#2b3c44" "#000087" "blue"            )) ;; gruvbox-dark_blue
+   (magenta    '("#b16286" "#d75f87" "magenta"         )) ;; gruvbox-faded_purple
+   (violet     '("#8f3f71" "#875f87" "brightmagenta"   )) ;; gruvbox-bright_purple
+   (cyan       '("#427b58" "#5f8787" "brightcyan"      )) ;; gruvbox-bright_aqua
+   (dark-cyan  '("#36473a" "#005f5f" "cyan"            )) ;; gruvbox-dark_aqua
+
+   ;; Extra
+   (delimiter-3       '("#8ec07c" "#87af87"                 ))
+   (light3            '("#665c54" "#626262" "grey"          ))
+   (light4            '("#7c6f64" "#767676" "grey"          ))
+   (faded-red         '("#cc241d" "#d75f5f" "red"           ))
+   (faded-green       '("#98971a" "#afaf00" "green"         ))
+   (faded-yellow      '("#d79921" "#ffaf00" "yellow"        ))
+   (faded-blue        '("#458588" "#87afaf" "blue"          ))
+   (faded-orange      '("#d65d0e" "#ff8700" "brightorange"  ))
+   (faded-aqua        '("#689d6a" "#87af87" "brightcyan"    ))
+   (dark-red          '("#421E1E" "#5f0000"                 ))
+   (dark-blue         '("#2B3C44" "#000087"                 ))
+   (dark-aqua         '("#36473A" "#005f5f"                 ))
+   (sienna            '("#dd6f48" "d7875f"                  ))
+   (lightblue4        '("#66999D" "#5fafaf" "brightblue"    ))
+   (burlywood4        '("#BBAA97" "#aafaf87"                ))
+   (aquamarine4       '("#83af98" "#87af87"                 ))
+   (turquoise4        '("#61ACBB" "#5fafaf" "brightblue"    ))
+
+   ;; face categories -- required for all themes
+   (highlight      base4)
+   (vertical-bar   (doom-darken base1 0.1))
+   (selection      base3)
+   (builtin        orange)
+   (comments       (if doom-gruvbox-light-brighter-comments base5 base4))
+   (doc-comments   green)
+   (constants      violet)
+   (functions      yellow)
+   (keywords       red)
+   (methods        cyan)
+   (operators      blue)
+   (type           violet)
+   (strings        green)
+   (variables      blue)
+   (numbers        violet)
+   (region         `(,(doom-darken (car bg-alt) 0.1) ,@(doom-darken (cdr base0) 0.3)))
+   (error          red)
+   (warning        orange)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (-modeline-bright doom-gruvbox-light-brighter-modeline)
+   (-modeline-pad
+    (when doom-gruvbox-light-padded-modeline
+      (if (integerp doom-gruvbox-light-padded-modeline) doom-gruvbox-light-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt (doom-blend violet base4 (if -modeline-bright 0.5 0.2)))
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken base2 0.05)
+      base1))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken base2 0.1)
+      base2))
+   (modeline-bg-inactive (doom-darken bg 0.1))
+   (modeline-bg-inactive-l `(,(doom-darken (car bg-alt) 0.05) ,@(cdr base1))))
+
+
+  ;;;; Base theme face overrides
+  ((cursor :background base4)
+   ((font-lock-comment-face &override) :background (if doom-gruvbox-light-comment-bg base0 'unspecified))
+   ((font-lock-doc-face &override) :slant 'italic)
+   (isearch           :foreground "black" :background orange)
+   (isearch-fail      :foreground fg :background red)
+   (lazy-highlight    :background base2  :foreground base8 :distant-foreground base0 :weight 'bold)
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground orange)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   (tooltip :background base1 :foreground base6)
+
+   ;;;; anzu
+   (anzu-mode-line         :foreground yellow :weight 'bold)
+   (anzu-match-1           :background green)
+   (anzu-match-2           :background faded-yellow)
+   (anzu-match-3           :background aquamarine4)
+   (anzu-replace-to        :foreground yellow)
+   (anzu-replace-highlight :inherit 'isearch)
+   ;;;; centaur-tabs
+   (centaur-tabs-unselected :background bg-alt :foreground base4)
+   ;;;; company
+   (company-scrollbar-bg                      :background base1)
+   (company-scrollbar-fg                      :background bg-alt)
+   (company-tooltip                           :background bg-alt)
+   (company-tooltip-annotation                :foreground green)
+   (company-tooltip-annotation-selection      :inherit 'company-tooltip-annotation)
+   (company-tooltip-selection                 :foreground violet :background base2)
+   (company-tooltip-common                    :foreground blue :underline t)
+   (company-tooltip-common-selection          :foreground blue :underline t)
+   (company-preview-common                    :foreground base7)
+   (company-preview                           :background lightblue4)
+   (company-preview-search                    :background turquoise4)
+   (company-template-field                    :foreground "black" :background yellow)
+   (company-echo-common                       :foreground faded-red)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; diredfl
+   (diredfl-autofile-name :foreground base5)
+   (diredfl-compressed-file-name :foreground base5)
+   (diredfl-compressed-file-suffix :foreground faded-blue)
+   (diredfl-dir-priv :foreground blue :backgtround dark-blue)
+   (diredfl-exec-priv :foreground blue :backgrond dark-blue)
+   (diredfl-file-name :foreground base5)
+   (diredfl-file-suffix :foreground light4)
+   (diredfl-link-priv :foreground magenta)
+   (diredfl-no-priv :foreground base5)
+   (diredfl-number :foreground yellow)
+   (diredfl-other-priv :foreground violet)
+   (diredfl-rare-priv :foreground base5)
+   ;;;; diredp
+   (diredp-file-name :foreground base5)
+   (diredp-file-suffix :foreground light4)
+   (diredp-compressed-file-suffix :foreground faded-blue)
+   (diredp-dir-name :foreground faded-blue)
+   (diredp-symlink :foreground orange)
+   (diredp-date-time :foreground light3)
+   (diredp-number :foreground faded-blue)
+   (diredp-no-priv :foreground base4)
+   (diredp-other-priv :foreground base2)
+   (diredp-rare-priv :foreground base4)
+   (diredp-ignored-file-name :foreground base5)
+   (diredp-dir-priv :foreground faded-blue :background dark-blue)
+   ((diredp-dir-exec-priv &inherit diredp-dir-priv))
+   (diredp-link-priv :foreground faded-aqua)
+   ;;;; doom-emacs
+   (doom-dashboard-banner      :foreground (doom-darken base4 0.3))
+   (doom-dashboard-menu-title  :foreground green)
+   (doom-dashboard-menu-desc   :foreground green)
+   (doom-dashboard-footer-icon :foreground (doom-darken yellow 0.4))
+   (doom-dashboard-loaded      :foreground yellow)
+   ;;;; diff-mode
+   (diff-changed                   :foreground base6)
+   (diff-removed                   :foreground red)
+   (diff-indicator-changed         :inherit 'diff-changed)
+   (diff-indicator-added           :inherit 'diff-added)
+   (diff-indicator-removed         :inherit 'diff-removed)
+   ;;;; ediff <built-in>
+   (ediff-current-diff-A        :foreground red   :background (doom-lighten red 0.8))
+   (ediff-current-diff-B        :foreground green :background (doom-lighten green 0.8))
+   (ediff-current-diff-C        :foreground blue  :background (doom-lighten blue 0.8))
+   (ediff-current-diff-Ancestor :foreground teal  :background (doom-lighten teal 0.8))
+   ;;;; elfeed
+   (elfeed-search-title-face :foreground grey)
+   (elfeed-search-date-face :inherit 'font-lock-builtin-face :underline t)
+   (elfeed-search-tag-face :inherit 'font-lock-keyword-face)
+   (elfeed-search-unread-count-face :inherit 'font-lock-comment-face)
+   (elfeed-search-filter-face :inherit 'font-lock-string-face)
+   ;;;; flycheck
+   (flycheck-info :underline `(:style wave :color ,blue))
+   ;;;; git-gutter
+   (git-gutter:modified :foreground faded-blue :background blue)
+   (git-gutter:added    :foreground faded-green :background green)
+   (git-gutter:deleted  :foreground faded-red :backgrond red)
+   ;;;; git-gutter+
+   (git-gutter+-modified :foreground faded-blue :background blue)
+   (git-gutter+-added    :foreground faded-green :background green)
+   (git-gutter+-deleted  :foreground faded-red :backgrond red)
+   ;;;; helm
+   (helm-candidate-number       :background blue :foreground bg)
+   (helm-M-x-key                :foreground orange)
+   (helm-action                 :foreground base8 :underline t)
+   (helm-bookmark-addressbook   :foreground red)
+   (helm-bookmark-directory     :foreground violet)
+   (helm-bookmark-file          :foreground faded-blue)
+   (helm-bookmark-gnus          :foreground magenta)
+   (helm-bookmark-info          :foreground turquoise4)
+   (helm-bookmark-man           :foreground sienna)
+   (helm-bookmark-w3m           :foreground yellow)
+   (helm-buffer-directory       :foreground "white" :background blue)
+   (helm-buffer-not-saved       :foreground red)
+   (helm-buffer-process         :foreground burlywood4)
+   (helm-buffer-saved-out       :foreground red)
+   (helm-buffer-size            :foreground violet)
+   (helm-candidate-number       :foreground green)
+   (helm-ff-directory           :foreground violet)
+   (helm-ff-executable          :foreground turquoise4)
+   (helm-ff-file                :foreground sienna)
+   (helm-ff-invalid-symlink     :foreground "white" :background red)
+   (helm-ff-prefix              :foreground "black" :background yellow)
+   (helm-ff-symlink             :foreground orange)
+   (helm-grep-cmd-line          :foreground green)
+   (helm-grep-file              :foreground magenta)
+   (helm-grep-finish            :foreground turquoise4)
+   (helm-grep-lineno            :foreground orange)
+   (helm-grep-match             :foreground yellow)
+   (helm-grep-running           :foreground red)
+   (helm-header                 :foreground aquamarine4)
+   (helm-helper                 :foreground aquamarine4)
+   (helm-history-deleted        :foreground "black" :background red)
+   (helm-history-remote         :foreground faded-red)
+   (helm-lisp-completion-info   :foreground faded-orange)
+   (helm-lisp-show-completion   :foreground red)
+   (helm-locate-finish          :foreground "white" :background aquamarine4)
+   (helm-match                  :foreground orange)
+   (helm-moccur-buffer          :foreground cyan :underline t)
+   (helm-prefarg                :foreground turquoise4)
+   (helm-selection              :foreground "white" :background base2)
+   (helm-selection-line         :foreground "white" :background base2)
+   (helm-separator              :foreground faded-red)
+   (helm-source-header          :foreground base5)
+   (helm-visible-mark           :foreground "black" :background light3)
+   ;;;; ivy
+   (ivy-minibuffer-match-face-1     :foreground orange)
+   (ivy-minibuffer-match-face-2     :foreground yellow)
+   (ivy-minibuffer-match-face-3     :foreground faded-orange)
+   (ivy-minibuffer-match-face-4     :foreground faded-yellow)
+   ;;;; ivy-posframe
+   (ivy-posframe               :background bg-alt)
+   ;;;; js2-mode
+   (js2-warning                    :underline `(:style wave :color ,yellow))
+   (js2-error                      :underline `(:style wave :color ,red))
+   (js2-external-variable          :underline `(:style wave :color ,cyan))
+   (js2-jsdoc-tag                  :foreground grey)
+   (js2-jsdoc-type                 :foreground light4)
+   (js2-jsdoc-value                :foreground light3)
+   (js2-function-param             :foreground cyan)
+   (js2-function-call              :foreground blue)
+   (js2-instance-member            :foreground orange)
+   (js2-private-member             :foreground yellow)
+   (js2-private-function-call      :foreground faded-aqua)
+   (js2-jsdoc-html-tag-name        :foreground light4)
+   (js2-jsdoc-html-tag-delimiter   :foreground light3)
+   ;;;; lsp-mode
+   (lsp-face-highlight-textual     :background (doom-blend bg orange 0.9) :foreground base0 :distant-foreground base8)
+   ;;;; lsp-ui
+   (lsp-ui-doc-background          :background base2)
+   ;;;; magit
+   (magit-bisect-bad                      :foreground faded-red)
+   (magit-bisect-good                     :foreground faded-green)
+   (magit-bisect-skip                     :foreground faded-yellow)
+   (magit-blame-heading                   :foreground base7 :background base2)
+   (magit-branch-local                    :foreground blue)
+   (magit-branch-current                  :underline blue :inherit 'magit-branch-local)
+   (magit-branch-remote                   :foreground green)
+   (magit-cherry-equivalent               :foreground violet)
+   (magit-cherry-unmatched                :foreground cyan)
+   (magit-diff-added                      :foreground green)
+   (magit-diff-added-highlight            :foreground green :inherit 'magit-diff-context-highlight)
+   (magit-diff-base                       :background faded-yellow :foreground base5)
+   (magit-diff-base-highlight             :background faded-yellow :foreground base7)
+   (magit-diff-context                    :foreground base1  :foreground base6)
+   (magit-diff-context-highlight          :background base1 :foreground base7)
+   (magit-diff-hunk-heading               :background base3 :foreground base5)
+   (magit-diff-hunk-heading-highlight     :background base2 :foreground base7)
+   (magit-diff-hunk-heading-selection     :background base2 :foreground orange)
+   (magit-diff-lines-heading              :background faded-orange :foreground base7)
+   (magit-diff-removed                    :foreground red)
+   (magit-diff-removed-highlight          :foreground red :inherit 'magit-diff-context-highlight)
+   (magit-diffstat-added                  :foreground faded-green)
+   (magit-diffstat-removed                :foreground faded-red)
+   (magit-dimmed                          :foreground base4)
+   (magit-hash                            :foreground blue)
+   (magit-log-author                      :foreground red)
+   (magit-log-date                        :foreground cyan)
+   (magit-log-graph                       :foreground base4)
+   (magit-process-ng                      :foreground red :weight 'bold)
+   (magit-process-ok                      :foreground green :weight 'bold)
+   (magit-reflog-amend                    :foreground violet)
+   (magit-reflog-checkout                 :foreground blue)
+   (magit-reflog-cherry-pick              :foreground green)
+   (magit-reflog-commit                   :foreground green)
+   (magit-reflog-merge                    :foreground green)
+   (magit-reflog-other                    :foreground cyan)
+   (magit-reflog-rebase                   :foreground violet)
+   (magit-reflog-remote                   :foreground blue)
+   (magit-reflog-reset                    :foreground red)
+   (magit-refname                         :foreground light4)
+   (magit-section-heading                 :foreground yellow :weight 'bold)
+   (magit-section-heading-selection       :foreground faded-yellow)
+   (magit-section-highlight               :background base1)
+   (magit-sequence-drop                   :foreground faded-yellow)
+   (magit-sequence-head                   :foreground cyan)
+   (magit-sequence-part                   :foreground yellow)
+   (magit-sequence-stop                   :foreground green)
+   (magit-signature-bad                   :foreground red :weight 'bold)
+   (magit-signature-error                 :foreground red)
+   (magit-signature-expired               :foreground orange)
+   (magit-signature-good                  :foreground green)
+   (magit-signature-revoked               :foreground violet)
+   (magit-signature-untrusted             :foreground blue)
+   (magit-tag                             :foreground yellow)
+   ;;;; markdown-mode
+   (markdown-markup-face     :foreground base5)
+   (markdown-header-face     :inherit 'bold :foreground red)
+   ((markdown-code-face &override)       :background base1)
+   (mmm-default-submode-face :background base1)
+   (markdown-header-face-1          :foreground blue)
+   (markdown-header-face-2          :foreground yellow)
+   (markdown-header-face-3          :foreground violet)
+   (markdown-header-face-4          :foreground red)
+   (markdown-header-face-5          :foreground green)
+   (markdown-header-face-6          :foreground dark-cyan)
+   ;;;; message <built-in>
+   (message-header-cc :inherit 'font-lock-variable-name-face)
+   (message-header-subject :foreground orange :weight 'bold)
+   (message-header-other :inherit 'font-lock-variable-name-face)
+   (message-header-name :inherit 'font-lock-keyword-face)
+   (message-cited-text :inherit 'font-lock-comment-face)
+   (message-mml :foregrond faded-green :weight 'bold)
+   ;;;; mu4e
+   (mu4e-highlight-face :foreground green)
+   (mu4e-unread-face :foreground blue :weight 'bold)
+   (mu4e-header-key-face :foreground green :weight 'bold)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground red)
+   ((outline-2 &override) :foreground orange)
+   ;;;; org <built-in>
+   (org-agenda-date-today       :foreground base7 :weight 'bold :italic t)
+   (org-agenda-done             :foreground cyan)
+   (org-agenda-structure        :inherit 'font-lock-comment-face)
+   (org-archived                :foreground base7 :weight 'bold)
+   (org-block                   :background base1 :extend t)
+   (org-block-begin-line        :background base2 :extend t)
+   (org-block-end-line          :background base2 :extend t)
+   (org-date                    :foreground blue :underline t)
+   (org-deadline-announce       :foreground faded-red)
+   (org-document-info           :foreground faded-blue)
+   (org-document-title          :foreground faded-blue)
+   (org-done                    :foreground cyan :weight 'bold :bold t)
+   (org-drawer                  :inherit 'font-lock-function-name-face)
+   (org-ellipsis                :foreground light4)
+   (org-footnote                :foreground cyan :underline t)
+   (org-formula                 :foreground yellow)
+   (org-headline-done           :foreground cyan)
+   (org-latex-and-related       :foreground blue)
+   (org-level-1                 :foreground blue)
+   (org-level-2                 :foreground yellow)
+   (org-level-3                 :foreground violet)
+   (org-level-4                 :foreground red)
+   (org-level-5                 :foreground green)
+   (org-level-6                 :foreground cyan)
+   (org-level-7                 :foreground faded-blue)
+   (org-level-8                 :foreground orange)
+   (org-link                    :foreground faded-aqua :underline t)
+   (org-scheduled               :foreground yellow)
+   (org-scheduled-previously    :foreground faded-red)
+   (org-scheduled-today         :foreground blue)
+   (org-sexp-date               :foreground faded-blue :underline t)
+   (org-table                   :foreground blue)
+   (org-tag                     :bold t :weight 'bold)
+   (org-time-grid               :foreground faded-orange)
+   (org-todo                    :foreground red :weight 'bold :bold t)
+   (org-upcoming-deadline       :inherit 'font-lock-keyword-face)
+   (org-warning                 :foreground red :weight 'bold :bold t)
+   ;;;; org-habit
+   (org-habit-clear-face          :background faded-blue)
+   (org-habit-clear-future-face   :background blue)
+   (org-habit-ready-face          :background faded-green)
+   (org-habit-ready-future-face   :background green)
+   (org-habit-alert-face          :background faded-yellow)
+   (org-habit-alert-future-face   :background yellow)
+   (org-habit-overdue-face        :background faded-red)
+   (org-habit-overdue-future-face :background red)
+   ;;;; popup
+   (popup-face :foreground base6  :background base1)
+   (popup-menu-selection-face :foreground fg :background faded-green)
+   (popup-menu-mouse-face :foreground fg :background faded-green)
+   (popup-tip-face :foreground base5 :background base2)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-3-face :foreground delimiter-3)
+   (rainbow-delimiters-depth-4-face :foreground faded-orange)
+   (rainbow-delimiters-depth-7-face :foreground delimiter-3)
+   (rainbox-delimiters-depth-8-face :foreground faded-orange)
+   (rainbow-delimiters-depth-11-face :foreground delimiter-3)
+   (rainbox-delimiters-depth-12-face :foreground faded-orange)
+   (rainbow-delimiters-unmatched-face: :foreground fg)
+   ;;;; swiper
+   (swiper-line-face    :background base3 :foreground base0)
+   (swiper-match-face-1 :inherit 'unspecified :background base1  :foreground base5)
+   (swiper-match-face-2 :inherit 'unspecified :background orange :foreground base0 :weight 'bold)
+   (swiper-match-face-3 :inherit 'unspecified :background violet :foreground base1 :weight 'bold)
+   (swiper-match-face-4 :inherit 'unspecified :background green  :foreground base2 :weight 'bold)
+   (swiper-background-match-face-1 :inherit 'unspecified :background base2)
+   (swiper-background-match-face-2 :inherit 'unspecified :background base3)
+   (swiper-background-match-face-3 :inherit 'unspecified :background base4)
+   (swiper-background-match-face-4 :inherit 'unspecified :background base5)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; vterm
+   (vterm-color-black   :background grey    :foreground base1)
+   (vterm-color-red     :background red     :foreground faded-red)
+   (vterm-color-green   :background green   :foreground faded-green)
+   (vterm-color-yellow  :background yellow  :foreground faded-yellow)
+   (vterm-color-blue    :background blue    :foreground faded-blue)
+   (vterm-color-magenta :background violet  :foreground magenta)
+   (vterm-color-cyan    :background cyan    :foreground faded-aqua)
+   (vterm-color-white   :background base7   :foreground light4)
+   ;;;; web-mode
+   (web-mode-current-element-highlight-face :background dark-blue :foreground bg)
+   ;;;; wgrep <built-in>
+   (wgrep-face :background base1)
+   ;;;; whitespace <built-in>
+   (whitespace-trailing :foreground red :background base1)
+   (whitespace-line :foreground red :background base1)
+   (whitespace-indentation :foreground base4 :background bg)
+   (whitespace-empty))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-gruvbox-light-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-gruvbox-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-gruvbox-theme.el
new file mode 100644
index 0000000..4f81212
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-gruvbox-theme.el
@@ -0,0 +1,302 @@
+;;; doom-gruvbox-theme.el --- inspired by morhetz's Gruvbox -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 1, 2019 (#277)
+;; Author: JongW <https://github.com/JongW>
+;; Maintainer:
+;; Source: https://github.com/morhetz/gruvbox
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+;; Compiler pacifier
+(defvar modeline-bg)
+
+
+;;
+;;; Variables
+
+(defgroup doom-gruvbox-theme nil
+  "Options for doom-gruvbox."
+  :group 'doom-themes)
+
+(defcustom doom-gruvbox-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-gruvbox-theme
+  :type 'boolean)
+
+(defcustom doom-gruvbox-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-gruvbox-theme
+  :type '(choice integer boolean))
+
+(defcustom doom-gruvbox-dark-variant nil
+  "A choice of \"hard\" or \"soft\" can be used to change the
+background contrast. All other values default to \"medium\"."
+  :group 'doom-gruvbox-theme
+  :type  'string)
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-gruvbox
+  "Dark theme with pastel 'retro groove' colors."
+  :family 'doom-gruvbox
+  :background-mode 'dark
+
+  ;; name        gui       256       16
+  ((bg
+    (cond ((equal doom-gruvbox-dark-variant "hard") '("#1d2021" "#1e1e1e" nil))   ; bg0_h
+          ((equal doom-gruvbox-dark-variant "soft") '("#32302f" "#323232" nil))   ; bg0_s
+          (t                                        '("#282828" "#282828" nil)))) ; bg0
+   (bg-alt
+    (cond ((equal doom-gruvbox-dark-variant "hard") '("#0d1011" "black" nil))     ; (self-defined)
+          ((equal doom-gruvbox-dark-variant "soft") '("#282828" "#282828" nil))   ; bg0
+          (t                                        '("#1d2021" "#1e1e1e" nil)))) ; bg_h
+   (bg-alt2    '("#504945" "#504945" "brown"      )) ; bg2 (for region, selection etc.)
+
+   (base0      '("#0d1011" "black"   "black"      )) ; (self-defined)
+   (base1      '("#1d2021" "#1d1d1d" "brightblack")) ; bg0_h
+   (base2      '("#282828" "#282828" "brightblack")) ; bg0
+   (base3      '("#3c3836" "#383838" "brightblack")) ; bg1
+   (base4      '("#665c54" "#5c5c5c" "brightblack")) ; bg3
+   (base5      '("#7c6f64" "#6f6f6f" "brightblack")) ; bg4
+   (base6      '("#928374" "#909090" "brightblack")) ; gray
+   (base7      '("#d5c4a1" "#cccccc" "brightblack")) ; fg2
+   (base8      '("#fbf1c7" "#fbfbfb" "brightwhite")) ; fg0
+   (fg         '("#ebdbb2" "#dfdfdf" "brightwhite")) ; fg/fg1
+   (fg-alt     '("#d5c4a1" "#cccccc" "brightwhite")) ; fg2
+
+   ;; Standardized official colours from gruvbox
+   (grey        '("#928374" "#909090" "brightblack"))   ; gray
+   (red         '("#fb4934" "#e74c3c" "red"))           ; bright-red
+   (magenta     '("#b16286" "#b16286" "magenta"))       ; red
+   (violet      '("#d3869b" "#d3869b" "brightmagenta")) ; bright-purple
+   (orange      '("#fe8019" "#fd971f" "orange"))        ; bright-orange
+   (yellow      '("#fabd2f" "#fabd2f" "yellow"))        ; bright-yellow
+   (dark-yellow '("#d79921" "#fabd2f" "yellow"))        ; yellow
+   (teal        '("#8ec07c" "#8ec07c" "green"))         ; bright-aqua
+   (green       '("#b8bb26" "#b8bb26" "green"))         ; bright-green
+   (dark-green  '("#98971a" "#98971a" "green"))         ; green
+   (blue        '("#83a598" "#83a598" "brightblue"))    ; bright-blue
+   (dark-blue   '("#458588" "#458588" "blue"))          ; blue
+   (cyan        '("#8ec07c" "#8ec07c" "brightcyan"))    ; bright-aqua
+   (my-black    '("#37302f" "#37302f" "black"))
+   (dark-cyan   '("#689d6a" "#689d6a" "cyan"))          ; aqua
+
+   ;; face categories
+   (highlight      yellow)
+   (vertical-bar   bg-alt2)
+   (selection      bg-alt2)
+   (builtin        orange)
+   (comments       (if doom-gruvbox-brighter-comments magenta grey))
+   (doc-comments   (if doom-gruvbox-brighter-comments (doom-lighten magenta 0.2) (doom-lighten fg-alt 0.25)))
+   (constants      violet)
+   (functions      green)
+   (keywords       red)
+   (methods        green)
+   (operators      fg)
+   (type           yellow)
+   (strings        green)
+   (variables      blue)
+   (numbers        violet)
+   (region         bg-alt2)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+
+   (vc-modified    (doom-darken cyan 0.15))
+   (vc-added       (doom-darken green 0.15))
+   (vc-deleted     (doom-darken red 0.15))
+
+   ;; custom categories
+   (-modeline-pad
+    (when doom-gruvbox-padded-modeline
+      (if (integerp doom-gruvbox-padded-modeline)
+          doom-gruvbox-padded-modeline
+        4)))
+   (modeline-bg bg-alt2)
+   (modeline-fg (doom-lighten fg-alt 0.25))
+   (modeline-inactive-bg (doom-darken modeline-bg 0.15))
+   (modeline-inactive-fg base6)
+
+   (org-quote `(,(doom-lighten (car bg) 0.05) "#1f1f1f")))
+
+
+  ;;;; Base theme face overrides
+  ((button :foreground cyan :underline t :weight 'bold)
+   (cursor :background "white")
+   (hl-line :background base3)
+   ((line-number &override) :foreground base5)
+   ((line-number-current-line &override) :background base3 :foreground yellow)
+   (isearch :foreground base0 :background orange)
+   (lazy-highlight :background yellow :foreground base0 :distant-foreground base0 :bold bold)
+   ((link &override) :foreground violet)
+   (minibuffer-prompt :foreground cyan)
+   (mode-line
+    :background my-black :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background bg :foreground base4
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-inactive-bg)))
+
+   ;;;; company
+   (company-preview-common :foreground cyan)
+   (company-tooltip-common :foreground cyan)
+   (company-tooltip-common-selection :foreground cyan)
+   (company-tooltip-annotation :foreground cyan)
+   (company-tooltip-annotation-selection :foreground cyan)
+   (company-scrollbar-bg :background base3)
+   (company-scrollbar-fg :background cyan)
+   (company-tooltip-selection :background bg-alt2)
+   (company-tooltip-mouse :background bg-alt2 :foreground nil)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground keywords)
+   ;;;; doom-emacs
+   (+workspace-tab-selected-face :background dark-green :foreground "white")
+   ;;;; doom-modeline
+   (doom-modeline-project-dir :bold t :foreground cyan)
+   (doom-modeline-buffer-path :inherit 'bold :foreground green)
+   (doom-modeline-buffer-file :inherit 'bold :foreground fg)
+   (doom-modeline-buffer-modified :inherit 'bold :foreground yellow)
+   (doom-modeline-error :background bg)
+   (doom-modeline-buffer-major-mode :foreground green :bold t)
+   (doom-modeline-info :bold t :foreground cyan)
+   (doom-modeline-bar :background dark-green)
+   (doom-modeline-panel :background dark-green :foreground fg)
+   ;;;; doom-themes
+   (doom-themes-neotree-file-face :foreground fg)
+   (doom-themes-neotree-hidden-file-face :foreground (doom-lighten fg-alt 0.25))
+   (doom-themes-neotree-media-file-face :foreground (doom-lighten fg-alt 0.25))
+   ;;;; emacs-lisp-mode
+   (highlight-quoted-symbol :foreground dark-cyan)
+   ;;;; ediff <built-in>
+   (ediff-fine-diff-A    :background (doom-blend red bg 0.4) :weight 'bold)
+   (ediff-current-diff-A :background (doom-blend red bg 0.2))
+   ;;;; evil
+   (evil-search-highlight-persist-highlight-face :background yellow)
+   (evil-ex-substitute-replacement :foreground cyan :strike-through nil :inherit 'evil-ex-substitute-matches)
+   ;;;; evil-snipe
+   (evil-snipe-first-match-face :foreground "white" :background yellow)
+   (evil-snipe-matches-face     :foreground yellow :bold t :underline t)
+   ;;;; flycheck
+   (flycheck-error   :underline `(:style wave :color ,red)    :background base3)
+   (flycheck-warning :underline `(:style wave :color ,yellow) :background base3)
+   (flycheck-info    :underline `(:style wave :color ,blue)   :background base3)
+   ;;;; dired
+   (dired-directory :foreground cyan)
+   (dired-marked :foreground yellow)
+   (dired-symlink :foreground cyan)
+   (dired-header :foreground cyan)
+   ;;;; helm
+   (helm-swoop-target-line-face :foreground magenta :inverse-video t)
+   ;;;; highlight-thing
+   (highlight-thing :background (doom-lighten base3 0.03) :distant-foreground fg-alt)
+   ;;;; highlight-symbol
+   (highlight-symbol-face :background (doom-lighten base3 0.03) :distant-foreground fg-alt)
+   ;;;; ivy
+   (ivy-current-match :background bg-alt2)
+   (ivy-subdir :background nil :foreground cyan)
+   (ivy-action :background nil :foreground cyan)
+   (ivy-grep-line-number :background nil :foreground cyan)
+   (ivy-minibuffer-match-face-1 :background nil :foreground yellow)
+   (ivy-minibuffer-match-face-2 :background nil :foreground yellow)
+   (ivy-minibuffer-match-highlight :foreground cyan)
+   (counsel-key-binding :foreground cyan)
+   ;;;; ivy-posframe
+   (ivy-posframe :background base3)
+   (ivy-posframe-border :background base1)
+   ;;;; LaTeX-mode
+   (font-latex-math-face :foreground dark-cyan)
+   ;;;; magit
+   (magit-section-heading             :foreground cyan :weight 'bold)
+   (magit-branch-current              :underline green :inherit 'magit-branch-local)
+   (magit-diff-hunk-heading           :background base3 :foreground fg-alt)
+   (magit-diff-hunk-heading-highlight :background bg-alt2 :foreground fg)
+   (magit-diff-context                :foreground base3 :foreground fg-alt)
+   ;;;; markdown-mode
+   (markdown-header-face :inherit 'bold :foreground green)
+   (markdown-header-delimiter-face :foreground orange)
+   (markdown-blockquote-face :inherit 'italic :foreground grey)
+   (markdown-list-face :foreground grey)
+   (markdown-url-face :foreground violet)
+   (markdown-pre-face  :foreground cyan)
+   (markdown-link-face :inherit 'underline :foreground grey)
+   ((markdown-code-face &override) :background (doom-lighten base2 0.045))
+   ;;;; mu4e-view
+   (mu4e-header-key-face :foreground red :weight 'bold)
+   ;;;; neotree
+   (neo-root-dir-face   :foreground cyan)
+   (doom-neotree-dir-face :foreground cyan)
+   (neo-dir-link-face   :foreground cyan)
+   (neo-expand-btn-face :foreground magenta)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground violet)
+   ((outline-2 &override) :foreground cyan)
+   ((outline-3 &override) :foreground green)
+   ((outline-4 &override) :foreground (doom-lighten violet 0.2))
+   ((outline-5 &override) :foreground (doom-lighten dark-cyan 0.25))
+   ((outline-6 &override) :foreground (doom-lighten violet 0.4))
+   ((outline-7 &override) :foreground (doom-lighten dark-cyan 0.5))
+   ((outline-8 &override) :foreground (doom-lighten violet 0.6))
+   ; ((outline-1 &override) :foreground green)
+   ; ((outline-2 &override) :foreground green)
+   ; ((outline-3 &override) :foreground yellow)
+   ; ((outline-4 &override) :foreground yellow)
+   ; ((outline-5 &override) :foreground dark-yellow)
+   ; ((outline-6 &override) :foreground dark-yellow)
+   ;;;; org <built-in>
+   ((org-code &override) :foreground orange)
+   (org-date :foreground green)
+   (org-document-info :foreground red)
+   (org-document-title :foreground red)
+   (org-drawer :foreground (doom-lighten cyan 0.4))
+   (org-ellipsis :underline nil :foreground orange)
+   (org-formula :foreground green)
+   (org-meta-line :foreground comments)
+   (org-list-dt :foreground cyan)
+   ; (org-list-dt :foreground yellow)
+   ((org-quote &override) :inherit 'italic :foreground base7 :background org-quote)
+   (org-table :foreground cyan)
+   (org-tag :foreground (doom-darken comments 0.15) :weight 'normal)
+   ; (org-tag :foreground yellow :bold nil)
+   (org-todo :foreground green :bold 'inherit)
+   ; (org-todo :foreground yellow :bold 'inherit)
+   (org-verbatim :foreground yellow)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground orange)
+   (rainbow-delimiters-depth-2-face :foreground magenta)
+   (rainbow-delimiters-depth-3-face :foreground green)
+   (rainbow-delimiters-depth-4-face :foreground blue)
+   ;;;; show-paren <built-in>
+   ((show-paren-match &override) :foreground 'unspecified :background base5 :bold t)
+   ((show-paren-mismatch &override) :foreground 'unspecified :background "red")
+   ;;;; swiper
+   (swiper-line-face :background bg-alt2)
+   ;;;; undo-tree
+   (undo-tree-visualizer-active-branch-face :foreground cyan)
+   (undo-tree-visualizer-current-face :foreground yellow)
+   ;;;; vimish-fold
+   ((vimish-fold-overlay &override) :inherit 'font-lock-comment-face :background bg-alt2 :weight 'light)
+   ((vimish-fold-mouse-face &override) :foreground "white" :background yellow :weight 'light)
+   ((vimish-fold-fringe &override) :foreground magenta :background magenta)
+   ;;;; web-mode
+   (web-mode-html-tag-bracket-face :foreground blue)
+   (web-mode-html-tag-face         :foreground cyan)
+   (web-mode-html-attr-name-face   :foreground cyan)
+   (web-mode-json-key-face         :foreground green)
+   (web-mode-json-context-face     :foreground cyan)
+   ;;;; which-key
+   (which-key-key-face                   :foreground green)
+   (which-key-group-description-face     :foreground red)
+   (which-key-command-description-face   :foreground blue)
+   (which-key-local-map-description-face :foreground orange))
+
+  ;;;; Base theme variable overrides
+  ;; ()
+  )
+
+;;; doom-gruvbox-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-henna-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-henna-theme.el
new file mode 100644
index 0000000..40d6c26
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-henna-theme.el
@@ -0,0 +1,285 @@
+;;; doom-henna-theme.el --- based on VSCode's Henna theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: April 18, 2020 (#441)
+;; Author: jsoa <https://github.com/jsoa>
+;; Maintainer:
+;; Source: https://github.com/httpsterio/vscode-henna
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-henna-theme nil
+  "Options for the `doom-henna' theme."
+  :group 'doom-themes)
+
+(defcustom doom-henna-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-henna-theme
+  :type 'boolean)
+
+(defcustom doom-henna-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-henna-theme
+  :type 'boolean)
+
+(defcustom doom-henna-comment-bg doom-henna-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-henna-theme
+  :type 'boolean)
+
+(defcustom doom-henna-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-henna-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-henna
+  "A dark theme inspired by VSCode's Henna theme"
+
+  ;; name        default   256       16
+  ((bg         '("#21272e" nil       nil            ))
+   (bg-alt     '("#1B1F23" nil       nil            ))
+   (base0      '("#10151a" "black"   "black"        ))
+   (base1      '("#181A1F" "#2e2e2e" "brightblack"  ))
+   (base2      '("#1B1F23" "#262626" "brightblack"  ))
+   (base3      '("#262D35" "#3f3f3f" "brightblack"  ))
+   (base4      '("#282C34" "#525252" "brightblack"  ))
+   (base5      '("#2c313a" "#6b6b6b" "brightblack"  ))
+   (base6      '("#3B4048" "#979797" "brightblack"  ))
+   (base7      '("#495162" "#dfdfdf" "white"        ))
+   (base8      '("#606F73" "#1e1e1e" "brightblack"  ))
+   (fg         '("#f8f8f0" "#bfbfbf" "brightwhite"  ))
+   (fg-alt     '("#6B717D" "#979797" "white"        ))
+   (grey       '("#737c8c"))
+   (red        '("#e74c3c" "#ff6655" "red"          ))
+   (green      '("#53df83" "#99bb66" "green"        ))
+   (teal       '("#1abc9c" "#44b9b1" "brightgreen"  ))
+   (blue       '("#56b5c2" "#51afef" "brightblue"   ))
+   (cyan       '("#56b6c2" "#46D9FF" "brightcyan"   ))
+
+   ;; Not used, so remap to other (henna) colors
+   (orange     red)
+   (yellow     '("#ECBE7B" "#ECBE7B" "yellow"       ))
+   (magenta    '("#FFB8D1" "#FFB8D1" "magenta"      ))
+   (violet     '("#C5A3FF" "#C5A3FF" "brightmagenta"))
+   (dark-blue  '("#2257A0" "#2257A0" "blue"         ))
+   (dark-cyan  '("#2e4a54" "#204052" "cyan"         ))
+
+   ;; custom
+   (green-alt  '("#9cd230"                          ))
+   (green-dark '("#30c965"                          ))
+
+   ;; face categories -- required for all themes
+   (highlight      red)
+   (vertical-bar   (doom-darken base1 0.1))
+   (selection      cyan)
+   (builtin        teal)
+   (comments       base8)
+   (doc-comments   base8)
+   (constants      teal)
+   (functions      red)
+   (keywords       teal)
+   (methods        red)
+   (operators      red)
+   (type           red)
+   (strings        green)
+   (variables      fg)
+   (numbers        teal)
+   (region         dark-cyan)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    blue)
+   (vc-added       green-alt)
+   (vc-deleted     (doom-darken red 0.2))
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-henna-brighter-modeline)
+   (-modeline-pad
+    (when doom-henna-padded-modeline
+      (if (integerp doom-henna-padded-modeline) doom-henna-padded-modeline 4)))
+
+
+   (modeline-fg     fg)
+   (modeline-fg-alt base7)
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.475)
+      `(,(doom-darken (car bg-alt) 0.15) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      `(,(doom-darken (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(doom-darken (car bg-alt) 0.1) ,@(cdr bg-alt)))
+   (modeline-bg-inactive-l `(,(car bg-alt) ,@(cdr base1))))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-henna-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   ((line-number &override) :foreground base7)
+   ((line-number-current-line &override) :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   (solaire-default-face  :inherit 'default :background base1)
+   ;;;; hl-todo
+   (hl-todo :foreground red :weight 'bold)
+   ;;;; iedit
+   (iedit-occurrence            :foreground blue :weight 'bold :inverse-video t)
+   (iedit-read-only-occurrence  :inherit 'region)
+   ;;;; doom-modeline
+   (doom-modeline-bar                 :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-buffer-file         :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path         :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   ;;;; centaur-tabs
+   (centaur-tabs-selected                   :background base3 :foreground fg)
+   (centaur-tabs-unselected                 :background base2 :foreground grey)
+   (centaur-tabs-selected-modified          :background bg :foreground green-alt)
+   (centaur-tabs-unselected-modified        :background base1 :foreground magenta)
+   (centaur-tabs-active-bar-face            :background green)
+   (centaur-tabs-modified-marker-selected   :inherit 'centaur-tabs-selected-modified :foreground green)
+   (centaur-tabs-modified-marker-unselected :inherit 'centaur-tabs-unselected-modified :foreground green)
+   ;;;; doom-emacs
+   (doom-dashboard-banner      :foreground red)
+   (doom-dashboard-footer-icon :foreground green-alt)
+   (doom-dashboard-loaded      :foreground green-alt)
+   ;;;; which-key
+   (which-key-key-face                   :foreground red)
+   (which-key-group-description-face     :foreground green)
+   (which-key-command-description-face   :foreground teal)
+   (which-key-local-map-description-face :foreground green)
+   ;;;; highlight-numbers
+   (highlight-numbers-number :foreground blue)
+   ;;;; ivy
+   (ivy-minibuffer-match-highlight  :foreground red)
+   (ivy-highlight-face              :foreground red)
+   (ivy-minibuffer-match-face-2
+    :inherit 'ivy-minibuffer-match-face-1
+    :foreground red :background base1 :weight 'semi-bold)
+   (ivy-minibuffer-match-face-4
+    :inherit 'ivy-minibuffer-match-face-2
+    :foreground red :weight 'semi-bold)
+   (ivy-current-match :background red :distant-foreground base0 :weight 'normal)
+   ;;;; treemacs
+   (treemacs-directory-face     :foreground base8)
+   (treemacs-git-modified-face  :foreground yellow)
+   (treemacs-git-added-face     :foreground green)
+   (treemacs-git-untracked-face :foreground green-alt)
+   (treemacs-file-face          :foreground fg)
+   (treemacs-root-face          :foreground red :weight 'bold)
+   ;;;; magit
+   (magit-blame-headling              :foreground magenta :background base3)
+   (magit-cherry-equvalent            :foreground red)
+   (magit-log-author                  :foreground magenta)
+   (magit-section-heading             :foreground red :weight 'bold)
+   (magit-tag                         :foreground (doom-lighten green-alt 0.5))
+   (magit-filename                    :foreground teal)
+   (magit-diff-hunk-heading           :background (doom-darken teal 0.5))
+   (magit-diff-hunk-heading-highlight :background (doom-darken teal 0.2))
+   (magit-branch-current              :foreground green-alt)
+   ;;;; popup
+   (popup-tip-face        :background base8 :foreground fg)
+   (popup-menu-mouse-face :background base8 :foreground fg)
+   (popup-summary-face    :background base7 :foreground fg)
+   ;;;; rainbow delimiters
+   (rainbow-delimiters-depth-1-face :foreground red)
+   (rainbow-delimiters-depth-2-face :foreground green)
+   (rainbow-delimiters-depth-3-face :foreground teal)
+   (rainbow-delimiters-depth-4-face :foreground green)
+   (rainbow-delimiters-depth-5-face :foreground blue)
+   (rainbow-delimiters-depth-6-face :foreground green-alt)
+   (rainbow-delimiters-depth-7-face :foreground cyan)
+   ;;;; Dired
+   (diredfl-date-time    :foreground teal)
+   (diredfl-number       :foreground green)
+   (diredfl-dir-heading  :foreground teal :weight 'bold)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground cyan)
+   (css-property             :foreground teal)
+   (css-selector             :foreground red)
+   ;;;; markdown-mode
+   (markdown-markup-face           :foreground grey)
+   (markdown-header-face           :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   (markdown-bold-face             :foreground green :weight 'bold)
+   (markdown-url-face              :foreground fg :underline t)
+   (markdown-link-face             :foreground green)
+   (markdown-list-face             :foregroung fg)
+   (markdown-header-face-1         :foreground fg)
+   (markdown-header-face-2         :foreground fg)
+   (markdown-header-face-3         :foreground fg)
+   (markdown-header-face-4         :foreground fg)
+   (markdown-header-face-5         :foreground fg)
+   (markdown-header-face-6         :foreground fg)
+   (markdown-header-delimiter-face :foreground fg)
+   (markdown-inline-code-face      :foreground teal)
+   ;;;; outline <built-in>
+   (outline-1 :foreground red                         :weight 'bold :extend t)
+   (outline-2 :foreground teal                        :weight 'bold :extend t)
+   (outline-3 :foreground green                       :weight 'bold :extend t)
+   (outline-4 :foreground (doom-lighten red 0.25)     :weight 'bold :extend t)
+   (outline-5 :foreground (doom-lighten green 0.25)   :weight 'bold :extend t)
+   (outline-6 :foreground (doom-lighten blue 0.5)     :weight 'bold :extend t)
+   (outline-7 :foreground (doom-lighten red 0.5)      :weight 'bold :extend t)
+   (outline-8 :foreground (doom-lighten blue 0.8)     :weight 'bold :extend t)
+   ;;;; org <built-in>
+   (org-hide              :foreground hidden)
+   ((org-code &override)  :foreground blue)
+   (org-table             :foreground fg-alt)
+   ;;;; web-mode
+   (web-mode-html-attr-equal-face  :foreground teal)
+   (web-mode-html-tag-face         :foreground green-alt)
+   (web-mode-html-tag-bracket-face :foreground teal)
+   (web-mode-keyword-face          :foreground teal)
+   (web-mode-block-control-face    :foreground red)
+   (web-mode-variable-name-face    :foreground (doom-lighten green 0.5))
+   ;;;; typescript
+   (typescript-access-modifier-face :foreground green-alt)
+   (typescript-this-face            :foreground green-alt)
+   ;;;; LSP
+   (lsp-face-highlight-textual :background "black")
+   (lsp-face-highlight-read    :background (doom-darken dark-blue 0.3))
+   ;;;; js
+   (js2-object-property          :foreground fg)
+   (js2-object-property-access   :foreground green)
+   (js2-jsdoc-value              :foreground red)
+   (js2-jsdoc-tag                :foreground teal)
+   (js2-jsdoc-html-tag-delimiter :foreground base8)
+   (js2-jsdoc-html-tag-name      :foreground base8)
+   ;;;; rjsx
+   (rjsx-attr :foreground blue))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-henna-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-homage-black-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-homage-black-theme.el
new file mode 100644
index 0000000..fa194d3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-homage-black-theme.el
@@ -0,0 +1,225 @@
+;;; doom-homage-black-theme.el --- a minimalistic, colorless theme inspired by eziam, tao, and jbeans -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: February 4, 2021 (#497)
+;; Author: mskorzhinskiy <https://github.com/mskorzhinskiy>
+;; Maintainer:
+;; Source: original
+;;
+;;; Commentary:
+;;
+;; Theme is (manually) inverted homage-white theme with a focus of having
+;; pitch-black backgrounds. I'm also incorporated a several ideas from jbeans
+;; theme (synic/jbeans-emacs).
+;;
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-homage-black-theme nil
+  "Options for the `doom-homage-black' theme."
+  :group 'doom-themes)
+
+(defcustom doom-homage-black-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-homage-black-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-homage-black
+  "A light theme inspired by eziam"
+  :family 'doom-homage
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  ((bg         '("#000000" nil       nil            ))
+   (bg-alt     '("#000000" nil       nil            ))
+   (base0      '("#1B2229" "black"   "black"        ))
+   (base1      '("#1c1f24" "#1e1e1e" "brightblack"  ))
+   (base2      '("#202328" "#2e2e2e" "brightblack"  ))
+   (base3      '("#23272e" "#262626" "brightblack"  ))
+   (base4      '("#3f444a" "#3f3f3f" "brightblack"  ))
+   (base5      '("#5B6268" "#525252" "brightblack"  ))
+   (base6      '("#73797e" "#6b6b6b" "brightblack"  ))
+   (base7      '("#9ca0a4" "#979797" "brightblack"  ))
+   (base8      '("#DFDFDF" "#dfdfdf" "white"        ))
+   (fg         '("#bbc2cf" "#bfbfbf" "brightwhite"  ))
+   (fg-alt     '("#5B6268" "#2d2d2d" "white"        ))
+
+   (grey       base5)
+   (red        '("#ff6c6b" "#ff6655" "red"          ))
+   (orange     '("#b4916d" "#b4916d" "brightred"    ))
+   (green      '("#98be65" "#99bb66" "green"        ))
+   (teal       '("#4db5bd" "#44b9b1" "brightgreen"  ))
+   (yellow     '("#ECBE7B" "#ECBE7B" "yellow"       ))
+   (blue       '("#0170bf" "#0170bf" "brightblue"   ))
+   (dark-blue  '("#003c64" "#0170bf" "blue"         ))
+   (magenta    '("#c678dd" "#c678dd" "brightmagenta"))
+   (violet     '("#a9a1e1" "#a9a1e1" "magenta"      ))
+   (cyan       '("#46D9FF" "#46D9FF" "brightcyan"   ))
+   (dark-cyan  '("#5699AF" "#5699AF" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base2 0.1))
+   (selection      dark-blue)
+   (builtin        fg)
+   (comments       green)
+   (doc-comments   (doom-darken comments 0.15))
+   (constants      fg)
+   (functions      blue)
+   (keywords       fg)
+   (methods        fg)
+   (operators      fg)
+   (type           fg)
+   (strings        orange)
+   (variables      fg)
+   (numbers        orange)
+   (region         `(,(doom-darken (car dark-blue) 0.1) ,@(doom-darken (cdr base0) 0.3)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (-modeline-bright t)
+   (-modeline-pad
+    (when doom-homage-black-padded-modeline
+      (if (integerp doom-homage-black-padded-modeline) doom-homage-black-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt (doom-blend violet base4 (if -modeline-bright 0.5 0.2)))
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken base2 0.05)
+      base1))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken base2 0.1)
+      base2))
+   (modeline-bg-inactive (doom-darken bg 0.1))
+   (modeline-bg-inactive-l `(,(doom-darken (car bg-alt) 0.05) ,@(cdr base1))))
+
+  ;;;; Base theme face overrides
+  ((font-lock-builtin-face       :inherit 'bold :foreground base8)
+   ((font-lock-doc-face &override) :slant 'italic)
+   (font-lock-function-name-face :inherit 'bold :foreground base8)
+   (font-lock-keyword-face       :inherit 'bold :foreground base8)
+   (font-lock-type-face          :inherit 'bold :foreground base8)
+   ((hl-line &override) :background (doom-darken highlight 0.75))
+   ((line-number &override) :foreground (doom-lighten base4 0.15))
+   ((line-number-current-line &override) :foreground base8)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   (tooltip :background base1 :foreground fg)
+   ((secondary-selection &override) :background base0)
+
+   ;;;; centaur-tabs
+   (centaur-tabs-unselected :background bg-alt :foreground base4)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; ediff <built-in>
+   (ediff-current-diff-A        :foreground red   :background (doom-lighten red 0.8))
+   (ediff-current-diff-B        :foreground green :background (doom-lighten green 0.8))
+   (ediff-current-diff-C        :foreground blue  :background (doom-lighten blue 0.8))
+   (ediff-current-diff-Ancestor :foreground teal  :background (doom-lighten teal 0.8))
+   ;;;; magit
+   ((magit-diff-hunk-heading           &override) :foreground fg    :background bg-alt :bold bold)
+   ((magit-diff-hunk-heading-highlight &override) :foreground base8 :background bg-alt :bold bold)
+   (magit-blame-heading     :foreground orange :background bg-alt)
+   (magit-diff-removed :foreground (doom-darken red 0.2) :background (doom-blend red bg 0.1))
+   (magit-diff-removed-highlight :foreground red :background (doom-blend red bg 0.2) :bold bold)
+   ;;;; markdown-mode
+   (markdown-markup-face     :foreground base5)
+   (markdown-header-face     :inherit 'bold :foreground red)
+   ((markdown-code-face &override)       :background base1)
+   (mmm-default-submode-face :background base1)
+   ;;;; mu4e
+   (mu4e-highlight-face :background bg :inherit 'bold)
+   ;;;; helm
+   (helm-candidate-number :background blue :foreground bg)
+   ;;;; ivy
+   ;; bg/fg are too close
+   ((ivy-minibuffer-match-face-1 &override) :foreground (doom-lighten grey 0.70))
+   ;;;; ivy-posframe
+   (ivy-posframe               :background base0)
+   ;;;; lsp-mode
+   (lsp-ui-doc-background      :background base0)
+   (lsp-face-highlight-read    :background (doom-blend red bg 0.3))
+   (lsp-face-highlight-textual :inherit 'lsp-face-highlight-read)
+   (lsp-face-highlight-write   :inherit 'lsp-face-highlight-read)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground fg)
+   ((outline-2 &override) :foreground fg)
+   ((outline-3 &override) :foreground fg)
+   ((outline-4 &override) :foreground fg)
+   ((outline-5 &override) :foreground fg)
+   ((outline-6 &override) :foreground fg)
+   ((outline-7 &override) :foreground fg)
+   ((outline-8 &override) :foreground fg)
+   ;;;; org <built-in>
+   ;; make unfinished cookie & todo keywords bright to grab attention
+   ((org-todo &override) :foreground red)
+   ;; make tags and dates to have pretty box around them
+   ((org-tag &override)   :foreground fg :background base1
+    :box `(:line-width -1 :color ,base5 :style released-button))
+   ((org-date &override)  :foreground fg :background base1
+    :box `(:line-width -1 :color ,base5 :style released-button))
+   ;; Make drawers and special keywords (like scheduled) to be very bleak
+   ((org-special-keyword &override)  :foreground grey)
+   ((org-drawer          &override)  :foreground grey)
+   ;; Make ellipsis as bleak as possible and reset underlines/boxing
+   (org-ellipsis :underline nil :box nil :foreground fg :background bg)
+   ;; Make blocks have a slightly different background
+   ((org-block &override) :background base1)
+   ((org-block-begin-line &override) :foreground fg :slant 'italic)
+   ((org-quote &override) :background base1)
+   ((org-table &override) :foreground fg)
+   ;; org-agendamode: make "unimportant" things like distant deadlines and
+   ;; things scheduled for today to be bleak.
+   (org-upcoming-deadline         :foreground base8)
+   (org-upcoming-distant-deadline :foreground fg)
+   (org-scheduled                 :foreground fg)
+   (org-scheduled-today           :foreground fg)
+   (org-scheduled-previously      :foreground base8)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; swiper
+   ;; bg/fg are too close
+   ((swiper-match-face-1 &override) :background fg        :foreground bg)
+   ((swiper-line-face    &override) :background dark-blue :foreground fg)
+   ;;;; web-mode
+   (web-mode-current-element-highlight-face :background dark-blue :foreground bg)
+   ;;;; wgrep <built-in>
+   (wgrep-face :background base1))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-homage-black-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-homage-white-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-homage-white-theme.el
new file mode 100644
index 0000000..51fbe37
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-homage-white-theme.el
@@ -0,0 +1,229 @@
+;;; doom-homage-white-theme.el --- minimal white theme inspired by editors from 2000s -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: February 4, 2021 (#497)
+;; Author: mskorzhinskiy <https://github.com/mskorzhinskiy>
+;; Maintainer:
+;; Source: original
+;;
+;;; Commentary:
+;;
+;; Theme is using palette inspired by various editors from 2000s, with a lot of
+;; inspiration from eziam theme (thblt/eziam-theme-emacs) and tao themes
+;; (11111000000/tao-theme-emacs).
+;;
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-homage-white-theme nil
+  "Options for the `doom-homage-white' theme."
+  :group 'doom-themes)
+
+(defcustom doom-homage-white-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-homage-white-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-homage-white
+  "A light theme inspired by editors from 2000s"
+  :family 'doom-homage
+  :background-mode 'light
+
+  ;; name        default   256       16
+  ((bg         '("#fafafa" nil       nil            ))
+   (bg-alt     '("#f0f0f0" nil       nil            ))
+   (base0      '("#f0f0f0" "#f0f0f0" "white"        ))
+   (base1      '("#e7e7e7" "#e7e7e7" "brightblack"  ))
+   (base2      '("#dfdfdf" "#dfdfdf" "brightblack"  ))
+   (base3      '("#c6c7c7" "#c6c7c7" "brightblack"  ))
+   (base4      '("#9ca0a4" "#9ca0a4" "brightblack"  ))
+   (base5      '("#383a42" "#424242" "brightblack"  ))
+   (base6      '("#202328" "#2e2e2e" "brightblack"  ))
+   (base7      '("#1c1f24" "#1e1e1e" "brightblack"  ))
+   (base8      '("#1b2229" "black"   "black"        ))
+   (fg         '("#383a42" "#424242" "black"        ))
+   (fg-alt     '("#c6c7c7" "#c7c7c7" "brightblack"  ))
+
+   (grey       base5)
+   (red        '("#e45649" "#e45649" "red"          ))
+   (orange     '("#8a3b3c" "#dd8844" "brightred"    ))
+   (green      '("#556b2f" "#556b2f" "green"        ))
+   (teal       '("#4db5bd" "#44b9b1" "brightgreen"  ))
+   (yellow     '("#986801" "#986801" "yellow"       ))
+   (yellow-alt '("#fafadd" "#fafadd" "yellow"       ))
+   (blue       '("#014980" "#014980" "brightblue"   ))
+   (dark-blue  '("#030f64" "#030f64" "blue"         ))
+   (magenta    '("#a626a4" "#a626a4" "magenta"      ))
+   (violet     '("#b751b6" "#b751b6" "brightmagenta"))
+   (cyan       '("#0184bc" "#0184bc" "brightcyan"   ))
+   (dark-cyan  '("#005478" "#005478" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base2 0.1))
+   (selection      base3)
+   (builtin        fg)
+   (comments       green)
+   (doc-comments   (doom-darken comments 0.15))
+   (constants      fg)
+   (functions      blue)
+   (keywords       fg)
+   (methods        fg)
+   (operators      fg)
+   (type           fg)
+   (strings        orange)
+   (variables      fg)
+   (numbers        orange)
+   (region         `(,(doom-darken (car bg-alt) 0.1) ,@(doom-darken (cdr base0) 0.3)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (-modeline-bright t)
+   (-modeline-pad
+    (when doom-homage-white-padded-modeline
+      (if (integerp doom-homage-white-padded-modeline) doom-homage-white-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt (doom-blend violet base4 (if -modeline-bright 0.5 0.2)))
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken base2 0.05)
+      base1))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken base2 0.1)
+      base2))
+   (modeline-bg-inactive (doom-darken bg 0.1))
+   (modeline-bg-inactive-l `(,(doom-darken (car bg-alt) 0.05) ,@(cdr base1))))
+
+  ;;;; Base theme face overrides
+  ((font-lock-builtin-face       :inherit 'bold)
+   ((font-lock-doc-face &override) :slant 'italic)
+   (font-lock-function-name-face :inherit 'bold)
+   (font-lock-keyword-face       :inherit 'bold)
+   (font-lock-type-face          :inherit 'bold)
+   ((line-number &override) :foreground (doom-lighten base4 0.15))
+   ((line-number-current-line &override) :foreground base8)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   (tooltip :background base1 :foreground fg)
+
+   ;; Override secondary selection
+   ((secondary-selection &override) :background base0)
+
+   ;;;; centaur-tabs
+   (centaur-tabs-unselected :background bg-alt :foreground base4)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; ediff <built-in>
+   (ediff-current-diff-A        :foreground red   :background (doom-lighten red 0.8))
+   (ediff-current-diff-B        :foreground green :background (doom-lighten green 0.8))
+   (ediff-current-diff-C        :foreground blue  :background (doom-lighten blue 0.8))
+   (ediff-current-diff-Ancestor :foreground teal  :background (doom-lighten teal 0.8))
+   ;;;; magit
+   ((magit-diff-hunk-heading           &override) :foreground base4 :background bg :bold bold)
+   ((magit-diff-hunk-heading-highlight &override) :foreground fg    :background bg :bold bold)
+   (magit-blame-heading     :foreground orange :background bg-alt)
+   (magit-diff-removed :foreground (doom-darken red 0.2) :background (doom-blend red bg 0.1))
+   (magit-diff-removed-highlight :foreground red :background (doom-blend red bg 0.2) :bold bold)
+   ;;;; helm
+   (helm-candidate-number :background blue :foreground bg)
+   ;;;; highlight-indent-guides
+   (highlight-indent-guides-character-face :foreground base2)
+   ;;;; ivy
+   ((ivy-minibuffer-match-face-1 &override) :foreground (doom-darken grey 0.70))
+   ;;;; ivy-posframe
+   (ivy-posframe               :background base0)
+   ;;;; lsp-mode
+   (lsp-ui-doc-background      :background base0)
+   (lsp-face-highlight-read    :background (doom-blend red bg 0.3))
+   (lsp-face-highlight-textual :inherit 'lsp-face-highlight-read)
+   (lsp-face-highlight-write   :inherit 'lsp-face-highlight-read)
+   ;;;; markdown-mode
+   (markdown-markup-face     :foreground base5)
+   (markdown-header-face     :inherit 'bold :foreground red)
+   ((markdown-code-face &override)       :background base1)
+   (mmm-default-submode-face :background base1)
+   ;;;; mu4e
+   (mu4e-highlight-face         :background bg :inherit 'bold)
+   (mu4e-header-highlight-face :foreground dark-blue :inherit 'bold)
+   (mu4e-unread-face :foreground blue)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground fg)
+   ((outline-2 &override) :foreground fg)
+   ((outline-3 &override) :foreground fg)
+   ((outline-4 &override) :foreground fg)
+   ((outline-5 &override) :foreground fg)
+   ((outline-6 &override) :foreground fg)
+   ((outline-7 &override) :foreground fg)
+   ((outline-8 &override) :foreground fg)
+   ;;;; org <built-in>
+   ;; Make unfinished cookie & todo keywords bright to grab attention
+   ((org-todo &override) :foreground red)
+   ;; Make tags and dates to have pretty box around them
+   ((org-tag &override)   :foreground fg :background yellow-alt
+    :box `(:line-width -1 :color ,base5 :style released-button))
+   ((org-date &override)  :foreground fg :background base1
+    :box `(:line-width -1 :color ,base5 :style released-button))
+   ;; Make drawers and special keywords (like scheduled) to be very bleak
+   ((org-special-keyword &override)  :foreground grey)
+   ((org-drawer          &override)  :foreground grey)
+   ;; Make ellipsis as bleak as possible and reset underline/boxing
+   (org-ellipsis :underline nil :box nil :foreground fg :background bg)
+   ;; Make blocks have a slightly different background
+   ((org-block &override) :background base1)
+   ((org-block-begin-line &override) :foreground fg :slant 'italic)
+   ((org-quote &override) :background base1)
+   ((org-table &override) :foreground fg)
+   ;; Make "unimportant" things like distant deadlines and things scheduled for
+   ;; today to be bleak.
+   (org-upcoming-deadline         :foreground base8)
+   (org-upcoming-distant-deadline :foreground fg)
+   (org-scheduled                 :foreground fg)
+   (org-scheduled-today           :foreground fg)
+   (org-scheduled-previously      :foreground base8)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; swiper
+   ((swiper-match-face-1 &override) :foreground bg :background fg)
+   ((swiper-line-face    &override) :background (doom-lighten blue 0.70) :foreground fg)
+   ;;;; web-mode
+   (web-mode-current-element-highlight-face :background dark-blue :foreground bg)
+   ;;;; wgrep <built-in>
+   (wgrep-face :background base1))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-homage-white-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-horizon-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-horizon-theme.el
new file mode 100644
index 0000000..a96d21e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-horizon-theme.el
@@ -0,0 +1,223 @@
+;;; doom-horizon-theme.el --- ported from VSCode Horizon -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: January 21, 2020 (#374)
+;; Author: karetsu <https://github.com/karetsu>
+;; Maintainer:
+;; Source: https://github.com/aodhneine/horizon-theme.el
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-horizon-theme nil
+  "Options for the `doom-horizon' theme."
+  :group 'doom-themes)
+
+(defcustom doom-horizon-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-horizon-theme
+  :type 'boolean)
+
+(defcustom doom-horizon-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-horizon-theme
+  :type 'boolean)
+
+(defcustom doom-horizon-comment-bg doom-horizon-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their legibility."
+  :group 'doom-horizon-theme
+  :type 'boolean)
+
+(defcustom doom-horizon-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to determine the exact padding."
+  :group 'doom-horizon-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-horizon
+  "A port of the port of the Visual Studio Code theme Horizon"
+
+  ;; name       default    256       16
+  ((bg         '("#232530" nil       nil            ))
+   (bg-alt     '("#1c1e26" nil       nil            ))
+   (base0      '("#16161c" "black"   "black"        ))
+   (base1      '("#1a1c23" "#111111" "brightblack"  ))
+   (base2      '("#1d1f27" "#333333" "brightblack"  ))
+   (base3      '("#232530" "#555555" "white"        ))
+   (base4      '("#6a6a6a" "#6a6a6a" "white"        ))
+   (base5      '("#f9cec3" "#f9cec3" "white"        ))
+   (base6      '("#f9cbbe" "#f9cbbe" "white"        ))
+   (base7      '("#fadad1" "#fadad1" "white"        ))
+   (base8      '("#fdf0ed" "#fdf0ed" "white"        ))
+   (fg-alt     '("#fdf0ed" "#fdf0ed" "brightwhite"  ))
+   (fg         '("#c7c9cb" "#c7c9cb" "white"        ))
+
+   (grey       base4)
+   (red        '("#e95678" "#e95678" "red"          ))
+   (orange     '("#f09383" "#f09383" "brightred"    ))
+   (green      '("#09f7a0" "#09f7a0" "green"        ))
+   (teal       '("#87ceeb" "#87ceeb" "brightgreen"  ))
+   (yellow     '("#fab795" "#fab795" "yellow"       ))
+   (blue       '("#21bfc2" "#21bfc2" "brightblue"   ))
+   (dark-blue  '("#25b2bc" "#25b2bc" "blue"         ))
+   (magenta    '("#6c6f93" "#6c6f93" "magenta"      ))
+   (violet     '("#b877db" "#b877db" "brightmagenta"))
+   (cyan       '("#59e3e3" "#59e3e3" "brightcyan"   ))
+   (dark-cyan  '("#27d797" "#27d797" "cyan"   ))
+
+   ;; additional highlighting colours for horizon
+   (hor-highlight  `(,(doom-lighten (car base3) 0.05) ,@(cdr base2)))
+   (hor-highlight-selected (doom-lighten base3 0.1))
+   (hor-highlight-bright (doom-lighten base3 0.2))
+   (hor-highlight-brighter (doom-lighten base3 0.5))
+
+   ;; face categories -- required for all themes
+   (highlight      red)
+   (vertical-bar   base0)
+   (selection      violet)
+   (builtin        violet)
+   (comments       (if doom-horizon-brighter-comments magenta hor-highlight-bright))
+   (doc-comments   yellow)
+   (constants      orange)
+   (functions      teal)
+   (keywords       violet)
+   (methods        magenta)
+   (operators      teal)
+   (type           teal)
+   (strings        yellow)
+   (variables      red)
+   (numbers        orange)
+   (region         hor-highlight)
+   (error          red)
+   (warning        dark-cyan)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-horizon-brighter-modeline)
+   (-modeline-pad
+    (when doom-horizon-padded-modeline
+      (if (integerp doom-horizon-padded-modeline) doom-horizon-padded-modeline 4)))
+
+   (modeline-fg     `(,(doom-darken (car fg) 0.2) ,@(cdr fg-alt)))
+   (modeline-fg-alt `(,(doom-lighten (car bg) 0.2) ,@(cdr base3)))
+
+   (modeline-bg (if -modeline-bright base4 base1))
+   (modeline-bg-inactive base1))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :slant 'italic
+    :background (if doom-horizon-comment-bg (doom-lighten bg 0.03) 'unspecified))
+   (fringe :background bg)
+   (link :foreground yellow :inherit 'underline)
+   ((line-number &override) :foreground hor-highlight-selected)
+   ((line-number-current-line &override) :foreground hor-highlight-brighter)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   (mode-line-highlight :background base1 :foreground fg)
+   (tooltip :background base0 :foreground fg)
+
+   ;;;; company
+   (company-box-background    :background base0 :foreground fg)
+   (company-tooltip-common    :foreground red :weight 'bold)
+   (company-tooltip-selection :background hor-highlight :foreground fg)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground violet)
+   (css-property             :foreground fg)
+   (css-selector             :foreground red)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-highlight :foreground (doom-lighten bg 0.3))
+   (doom-modeline-project-dir :foreground red :inherit 'bold )
+   (doom-modeline-buffer-path :foreground red)
+   (doom-modeline-buffer-file :foreground fg)
+   (doom-modeline-buffer-modified :foreground violet)
+   (doom-modeline-panel :background base1)
+   (doom-modeline-urgent :foreground modeline-fg)
+   (doom-modeline-info :foreground cyan)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; evil
+   (evil-ex-search          :background hor-highlight-selected :foreground fg)
+   (evil-ex-lazy-highlight  :background hor-highlight :foreground fg)
+   ;;;; haskell-mode
+   (haskell-type-face :foreground violet)
+   (haskell-constructor-face :foreground yellow)
+   (haskell-operator-face :foreground fg)
+   (haskell-literate-comment-face :foreground hor-highlight-selected)
+   ;;;; ivy
+   (ivy-current-match       :background hor-highlight :distant-foreground nil)
+   (ivy-posframe-cursor     :background red :foreground base0)
+   (ivy-minibuffer-match-face-2 :foreground red :weight 'bold)
+   ;;;; js2-mode
+   (js2-object-property        :foreground red)
+   ;;;; markdown-mode
+   (markdown-markup-face           :foreground cyan)
+   (markdown-link-face             :foreground orange)
+   (markdown-link-title-face       :foreground yellow)
+   (markdown-header-face           :foreground red :inherit 'bold)
+   (markdown-header-delimiter-face :foreground red :inherit 'bold)
+   (markdown-language-keyword-face :foreground orange)
+   (markdown-markup-face           :foreground fg)
+   (markdown-bold-face             :foreground violet)
+   (markdown-table-face            :foreground fg :background base1)
+   ((markdown-code-face &override) :foreground orange :background base1)
+   ;;;; orderless
+   (orderless-match-face-1 :weight 'bold :foreground (doom-blend red fg 0.6) :background (doom-blend red bg 0.1))
+   ;;;; mic-paren
+   (paren-face-match    :foreground green   :background base0 :weight 'ultra-bold)
+   (paren-face-mismatch :foreground yellow :background base0   :weight 'ultra-bold)
+   (paren-face-no-match :inherit 'paren-face-mismatch :weight 'ultra-bold)
+   ;;;; magit
+   (magit-section-heading :foreground red)
+   (magit-branch-remote   :foreground orange)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground blue :background nil)
+   ;;;; org <built-in>
+   ((org-block &override) :background base1)
+   ((org-block-begin-line &override) :background base1 :foreground comments)
+   (org-hide :foreground hidden)
+   (org-link :inherit 'underline :foreground yellow)
+   (org-agenda-done :foreground cyan)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground red)
+   (rjsx-tag-bracket-face :foreground red)
+   (rjsx-attr :foreground cyan :slant 'italic :weight 'medium)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   ;;;; treemacs
+   (treemacs-root-face :foreground fg :weight 'bold :height 1.2)
+   (doom-themes-treemacs-root-face :foreground fg :weight 'ultra-bold :height 1.2)
+   (doom-themes-treemacs-file-face :foreground fg)
+   (treemacs-directory-face :foreground fg)
+   (treemacs-git-modified-face :foreground green)
+   ;;;; web-mode
+   (web-mode-html-tag-bracket-face :foreground red)
+   (web-mode-html-tag-face         :foreground red)
+   (web-mode-html-attr-name-face   :foreground orange)))
+
+;;; doom-horizon-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ir-black-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ir-black-theme.el
new file mode 100644
index 0000000..1096f17
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-ir-black-theme.el
@@ -0,0 +1,145 @@
+;;; doom-ir-black-theme.el --- ported from Vim's ir_black colorscheme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: January 10, 2019 (#255)
+;; Author: Kevin Kainan Li <https://github.com/legendre6891>
+;; Maintainer:
+;; Source: https://github.com/twerth/ir_black
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-ir-black-theme nil
+  "Options for the `doom-ir-black' theme."
+  :group 'doom-themes)
+
+(defcustom doom-ir-black-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-ir-black-theme
+  :type 'boolean)
+
+(defcustom doom-ir-black-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-ir-black-theme
+  :type '(or integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-ir-black
+  "A port of the original IR Black colorscheme."
+
+  ;; name        default   256       16
+  ((bg         '("#000000" "black"   "black"        ))
+   (fg         '("#f6f3e8" "#f6f3e8" "brightwhite"  ))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#121212" "black"   "black"        ))
+   (fg-alt     '("#5B6268" "#2d2d2d" "white"        ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#1B2229" "black"   "black"        ))
+   (base1      '("#1c1f24" "#1e1e1e" "brightblack"  ))
+   (base2      '("#202328" "#2e2e2e" "brightblack"  ))
+   (base3      '("#23272e" "#262626" "brightblack"  ))
+   (base4      '("#3f444a" "#3f3f3f" "brightblack"  ))
+   (base5      '("#5B6268" "#525252" "brightblack"  ))
+   (base6      '("#73797e" "#6b6b6b" "brightblack"  ))
+   (base7      '("#9ca0a4" "#979797" "brightblack"  ))
+   (base8      '("#DFDFDF" "#dfdfdf" "white"        ))
+
+   (white      '("#ffffff" "#ffffff" "white"))
+   (grey       base4)
+   (red        '("#ff6c60" "#ff6c60" "red"          ))
+   (orange     '("#E9C062" "#E9C062" "brightred"    ))
+   (orange-alt '("#FFD2A7" "#FFD2A7" "brightred"    ))
+   (green      '("#A8FF60" "#A8FF60" "green"        ))
+   (green-alt  '("#99CC99" "#99CC99" "green"        ))
+   (teal       '("#00A0A0" "#00A0A0" "brightgreen"  ))
+   (yellow     '("#FFFFB6" "#FFFFB6" "yellow"       ))
+   (blue       '("#96CBFE" "#96CBFE" "brightblue"   ))
+   (dark-blue  '("#2257A0" "#2257A0" "blue"         ))
+   (magenta    '("#FF73FD" "#FF73FD" "magenta"      ))
+   (violet     '("#a9a1e1" "#a9a1e1" "brightmagenta"))
+   (cyan       '("#C6C5FE" "#C6C5FE" "brightcyan"   ))
+   (dark-cyan  '("#5699AF" "#5699AF" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   base5)
+   (selection      cyan)
+   (builtin        magenta)
+   (comments       (if doom-ir-black-brighter-comments dark-cyan base5))
+   (doc-comments   (doom-lighten (if doom-ir-black-brighter-comments dark-cyan base5) 0.25))
+   (constants      green-alt)
+   (functions      orange-alt)
+   (keywords       blue)
+   (methods        cyan)
+   (operators      white)
+   (type           yellow)
+   (strings        green)
+   (variables      (doom-lighten magenta 0.4))
+   (numbers        magenta)
+   (region         `(,(doom-lighten (car bg-alt) 0.15) ,@(doom-lighten (cdr base0) 0.35)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (-modeline-pad
+    (when doom-ir-black-padded-modeline
+      (if (integerp doom-ir-black-padded-modeline) doom-ir-black-padded-modeline 4)))
+
+   (modeline-fg          white)
+   (modeline-fg-alt      base5)
+   (modeline-bg          base4)
+   (modeline-bg-inactive base3))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-ir-black-brighter-comments (doom-lighten bg 0.05) 'unspecified))
+   ((line-number &override) :foreground base5)
+   ((line-number-current-line &override) :foreground "#FFFF00" :weight 'bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; evil
+   (evil-goggles-default-face :inherit 'region :background (doom-blend region bg 0.5))
+   ;;;; ivy
+   (ivy-current-match :background dark-blue :distant-foreground base0 :weight 'normal)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   (markdown-code-face :background (doom-lighten base3 0.05)))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-ir-black-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-lantern-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-lantern-theme.el
new file mode 100644
index 0000000..4475b1b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-lantern-theme.el
@@ -0,0 +1,190 @@
+;;; doom-lantern-theme.el --- based on Gitleptune's Lantern theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: February 22, 2022 (#708)
+;; Author: paladhammika <https://github.com/paladhammika>
+;; Maintainer:
+;; Source: https://github.com/Gitleptune/lantern-theme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-lantern-theme nil
+  "Options for the `doom-lantern' theme."
+  :group 'doom-themes)
+
+(defcustom doom-lantern-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-lantern-theme
+  :type 'boolean)
+
+(defcustom doom-lantern-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-lantern-theme
+  :type 'boolean)
+
+(defcustom doom-lantern-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-lantern-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-lantern
+  "A brown and ochre theme based of https://github.com/Gitleptune/lantern-theme"
+
+  ;; name        default   256           16
+  ((bg         '("#261b17" "black"       "black"  ))
+   (fg         '("#e4cbb3" "#bfbfbf"     "brightwhite"  ))
+
+   (bg-alt     '("#291812" "black"       "black"        ))
+   (fg-alt     '("#5B6268" "#2d2d2d"     "white"        ))
+
+   (base0      '("#1b110e" "#1b110e"     "black"        ))
+   (base1      '("#1E1310" "#1e1e1e"     "brightblack"  ))
+   (base2      '("#2D1F1A" "#2D1F1A"     "brightblack"  ))
+   (base3      '("#2D1E19" "#231713"     "brightblack"  ))
+   (base4      '("#3F2F2A" "#3F2F2A"     "brightblack"  ))
+   (base5      '("#554541" "#554541"     "brightblack"  ))
+   (base6      '("#694949" "#694949"     "brightblack"  ))
+   (base7      '("#987070" "#987070"     "brightblack"  ))
+   (base8      '("#C18E76" "#C18E76"     "white"        ))
+
+   (grey       base4)
+   (brown      "#532f28")
+   (dark-brown "#291812")
+   (ochre      "#aa6a1f")
+   (red        '("#cc241d" "#e04220" "red"          ))
+   (orange     '("#e35b15" "#dd8844" "brightred"    ))
+   (green      '("#98971a" "#b8bb26" "green"        ))
+   (teal       '("#4db5bd" "#44b9b1" "brightgreen"  ))
+   (yellow     '("#d79921" "#d79921" "yellow"       ))
+   (blue       '("#66a4a4" "#66a4a4" "brightblue"   ))
+   (dark-blue  '("#4395a3" "#2257A0" "blue"         ))
+   (magenta    '("#d3869b" "#d3869b" "brightmagenta"))
+   (violet     '("#805b87" "#805b87" "magenta"      ))
+   (cyan       '("#46D9FF" "#46D9FF" "brightcyan"   ))
+   (dark-cyan  '("#5699AF" "#5699AF" "cyan"         ))
+
+   (highlight      ochre)
+   (vertical-bar   (doom-darken base1 0.1))
+   (selection      dark-brown)
+   (builtin        orange)
+   (comments       (if doom-lantern-brighter-comments dark-cyan base8))
+   (doc-comments   (doom-lighten (if doom-lantern-brighter-comments dark-cyan base5) 0.25))
+   (constants      violet)
+   (functions      orange)
+   (keywords       blue)
+   (methods        cyan)
+   (operators      blue)
+   (type           yellow)
+   (strings        green)
+   (variables      (doom-lighten magenta 0.4))
+   (numbers        yellow)
+   (region         brown)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   (modeline-fg              fg)
+   (modeline-fg-alt          base5)
+   (modeline-bg              (if doom-lantern-brighter-modeline
+                                 (doom-darken blue 0.45)
+                               (doom-darken bg-alt 0.1)))
+   (modeline-bg-alt          (if doom-lantern-brighter-modeline
+                                 (doom-darken blue 0.475)
+                               `(,(doom-darken (car bg-alt) 0.15) ,@(cdr bg))))
+   (modeline-bg-inactive     `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-alt `(,(doom-darken (car bg-alt) 0.1) ,@(cdr bg)))
+
+   (-modeline-pad
+    (when doom-lantern-padded-modeline
+      (if (integerp doom-lantern-padded-modeline) doom-lantern-padded-modeline 4))))
+
+  ;;;; Base theme face overrides
+  (((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   ((font-lock-comment-face &override)
+    :background (if doom-lantern-brighter-comments (doom-lighten bg 0.05) 'unspecified))
+   ;; (hl-line                                     :background brown)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if doom-lantern-brighter-modeline base8 highlight))
+
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if doom-lantern-brighter-modeline modeline-bg highlight))
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+    ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#261b17" :foreground "#1b110e")
+
+   ;;;; ivy
+   (ivy-current-match :background ochre :distant-foreground brown :weight 'bold)
+   (ivy-cursor :foreground bg-alt
+               :background fg)
+   (ivy-minibuffer-match-highlight  :foreground yellow :weight 'bold)
+   (ivy-highlight-face              :foreground yellow :weight 'bold)
+
+   ;;;; orderless
+   (orderless-match-face-0 :weight 'bold :foreground (doom-blend ochre   fg 0.8) :background (doom-blend ochre  bg 0.1))
+   (orderless-match-face-1 :weight 'bold :foreground (doom-blend red     fg 0.6) :background (doom-blend red    bg 0.1))
+   (orderless-match-face-2 :weight 'bold :foreground (doom-blend green   fg 0.6) :background (doom-blend green  bg 0.1))
+   (orderless-match-face-3 :weight 'bold :foreground (doom-blend cyan    fg 0.6) :background (doom-blend cyan   bg 0.1))
+
+   ;;;; LaTeX-mode
+   (font-latex-math-face :foreground green)
+
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground red)
+   (rjsx-attr :foreground orange)
+
+   ;;;; ediff <built-in>
+   (ediff-current-diff-A        :foreground red :weight 'bold :background (doom-lighten red 0.4))
+   (ediff-current-diff-B        :foreground green :weight 'bold :background (doom-lighten green 0.4))
+   (ediff-current-diff-C        :foreground blue :weight 'bold :background (doom-lighten blue 0.4))
+
+   ;;;; org <built-in>
+   (org-level-1 :bold t :foreground ochre :weight 'bold)
+   (org-level-2 :foreground yellow)
+   (org-level-3 :foreground orange)
+
+   ;;;; solaire-mode
+   (solaire-hl-line-face :background brown)
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt))))
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-lantern-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-laserwave-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-laserwave-theme.el
new file mode 100644
index 0000000..4a8e309
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-laserwave-theme.el
@@ -0,0 +1,178 @@
+;;; doom-laserwave-theme.el --- a clean synthwave/outrun theme inspired by VSCode's Laserwave -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: October 29, 2019 (#352)
+;; Author: hyakt <https://github.com/hyakt>
+;; Maintainer:
+;; Source: https://github.com/Jaredk3nt/laserwave
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-laserwave-theme nil
+  "Options for the `doom-laserwave' theme."
+  :group 'doom-themes)
+
+(defcustom doom-laserwave-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-laserwave-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-laserwave
+  "An clean 80's synthwave / outrun theme inspired by VS Code laserwave."
+
+  ;; name        default   256       16
+  ((bg         '("#27212E" nil       nil            ))
+   (bg-alt     '("#1B1720" nil       nil            ))
+   (base0      '("#222228" "black"   "black"        ))
+   (base1      '("#24262D" "#222222" "brightblack"  ))
+   (base2      '("#282b33" "#222233" "brightblack"  ))
+   (base3      '("#3E3549" "#333344" "brightblack"  ))
+   (base4      '("#4E415C" "#444455" "brightblack"  ))
+   (base5      '("#544863" "#554466" "brightblack"  ))
+   (base6      '("#ED60BA" "#EE66BB" "brightblack"  ))
+   (base7      '("#91889B" "#998899" "brightblack"  ))
+   (base8      '("#ECEFF4" "#EEEEFF" "white"        ))
+   (fg-alt     '("#EEEEEE" "#EEEEEE" "brightwhite"  ))
+   (fg         '("#FFFFFF" "#FFFFFF" "white"        ))
+
+   (grey       base4)
+   (red        '("#964C7B" "#964477" "red"          ))
+   (orange     '("#FFB85B" "#FFBB55" "brightred"    ))
+   (green      '("#74DFC4" "#77DDCC" "green"        ))
+   (teal       '("#4D8079" "#448877" "brightgreen"  ))
+   (yellow     '("#FFE261" "#FFEE66" "yellow"       ))
+   (blue       '("#40B4C4" "#44BBCC" "brightblue"   ))
+   (dark-blue  '("#336A79" "#336677" "blue"         ))
+   (magenta    '("#EB64B9" "#EE66BB" "brightmagenta"))
+   (violet     '("#B381C5" "#BB88CC" "magenta"      ))
+   (cyan       '("#B4DCE7" "#BBDDEE" "brightcyan"   ))
+   (dark-cyan  '("#6D7E8A" "#667788" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      magenta)
+   (vertical-bar   (doom-darken base1 0.2))
+   (selection      dark-blue)
+   (builtin        magenta)
+   (comments       base7)
+   (doc-comments   (doom-lighten dark-cyan 0.25))
+   (constants      violet)
+   (functions      magenta)
+   (keywords       blue)
+   (methods        cyan)
+   (operators      blue)
+   (type           yellow)
+   (strings        cyan)
+   (variables      fg)
+   (numbers        orange)
+   (region         `(,(doom-blend (car bg) (car magenta) 0.8) ,@(doom-lighten (cdr base1) 0.35)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-pad
+    (when doom-laserwave-padded-modeline
+      (if (integerp doom-laserwave-padded-modeline) doom-laserwave-padded-modeline 4)))
+
+   (modeline-fg     bg-alt)
+   (modeline-fg-alt base6)
+   (modeline-bg base6)
+   (modeline-bg-inactive (doom-darken bg 0.1)))
+
+
+  ;;;; Base theme face overrides
+  ((lazy-highlight :background (doom-darken magenta 0.4) :foreground fg)
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground bg-alt)
+   (mode-line-highlight :background orange :weight 'bold)
+   ;;;; centaur-tabs
+   (centaur-tabs-active-bar-face :background magenta)
+   (centaur-tabs-modified-marker-selected
+    :inherit 'centaur-tabs-selected :foreground magenta)
+   (centaur-tabs-modified-marker-unselected
+    :inherit 'centaur-tabs-unselected :foreground magenta)
+   ;;;; company
+   (company-box-background :foreground fg :background bg-alt)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background base6)
+   (doom-modeline-info :inherit 'mode-line-emphasis)
+   (doom-modeline-urgent :inherit 'mode-line-emphasis)
+   (doom-modeline-warning :inherit 'mode-line-emphasis)
+   (doom-modeline-debug :inherit 'mode-line-emphasis)
+   (doom-modeline-buffer-minor-mode :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-project-dir :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-project-parent-dir :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-persp-name :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-file :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-modified :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-lsp-success :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :inherit 'mode-line-emphasis)
+   (doom-modeline-evil-visual-state :foreground yellow)
+   (doom-modeline-evil-replace-state :foreground orange)
+   (doom-modeline-evil-operator-state :foreground teal)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; ivy
+   (ivy-current-match :background base2 :distant-foreground nil)
+   ;;;; markdown-mode
+   (markdown-header-delimiter-face :foreground base7)
+   (markdown-metadata-key-face     :foreground base7)
+   (markdown-list-face             :foreground base7)
+   (markdown-link-face             :foreground cyan)
+   (markdown-url-face              :inherit 'link :foreground fg :weight 'normal)
+   (markdown-italic-face           :inherit 'italic :foreground magenta)
+   (markdown-bold-face             :inherit 'bold :foreground magenta)
+   (markdown-markup-face           :foreground base7)
+   (markdown-gfm-checkbox-face :foreground cyan)
+   ;;;; mic-paren
+   (paren-face-match  :foreground yellow   :background (doom-darken bg 0.2) :weight 'ultra-bold)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground blue)
+   ((outline-2 &override) :foreground green)
+   ((outline-3 &override) :foreground teal)
+   ((outline-4 &override) :foreground (doom-darken blue 0.2))
+   ((outline-5 &override) :foreground (doom-darken green 0.2))
+   ((outline-6 &override) :foreground (doom-darken teal 0.2))
+   ((outline-7 &override) :foreground (doom-darken blue 0.4))
+   ((outline-8 &override) :foreground (doom-darken green 0.4))
+   ;;;; org <built-in>
+   ((org-block &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   (org-hide :foreground hidden)
+   ;;;; org-pomodoro
+   (org-pomodoro-mode-line :inherit 'mode-line-emphasis :weight 'bold) ; unreadable otherwise
+   (org-pomodoro-mode-line-overtime :inherit 'org-pomodoro-mode-line)
+   (org-pomodoro-mode-line-break :inherit 'org-pomodoro-mode-line)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))))
+
+;;; doom-laserwave-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-manegarm-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-manegarm-theme.el
new file mode 100644
index 0000000..02c4c09
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-manegarm-theme.el
@@ -0,0 +1,225 @@
+;;; doom-manegarm-theme.el --- an original autumn-inspired dark theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: December 25, 2019 (#367)
+;; Author: kenranunderscore <https://github.com/kenranunderscore>
+;; Maintainer:
+;; Source: original
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-manegarm-theme nil
+  "Options for the `doom-manegarm' theme."
+  :group 'doom-themes)
+
+(defcustom doom-manegarm-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-manegarm-theme
+  :type '(choice integer boolean))
+
+(defcustom doom-manegarm-muted-modeline nil
+  "If non-nil, the modeline will be in a more muted tone.
+Otherwise it's in a dark green color similar to visual mode
+selections."
+  :group 'doom-manegarm-theme
+  :type 'boolean)
+
+(defcustom doom-manegarm-darker-background nil
+  "If non-nil, the background color will be a bit darker.
+This also affects solaire-mode, where the background colors of
+real file buffers will now be brighter instead."
+  :group 'doom-manegarm-theme
+  :type 'boolean)
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-manegarm
+  "A dark theme with autumn-inspired colors"
+
+  ;; name        default   256       16
+  (
+   (-bg        '("#1c1408" nil       nil            ))
+   (-bg-alt    '("#181107" nil       nil            ))
+   (bg         (if doom-manegarm-darker-background -bg-alt -bg))
+   (bg-alt     (if doom-manegarm-darker-background -bg -bg-alt))
+   (base0      '("#1B2229" "black"   "black"        ))
+   (base1      '("#1c1f24" "#1c1f24" "brightblack"  ))
+   (base2      '("#202328" "#202328" "brightblack"  ))
+   (base3      '("#23272e" "#23272e" "brightblack"  ))
+   (base4      '("#3f444a" "#3f444a" "brightblack"  ))
+   (base5      '("#95836f" "#95836f" "brightblack"  ))
+   (base6      '("#73797e" "#73797e" "brightblack"  ))
+   (base7      '("#9ca0a4" "#9ca0a4" "brightblack"  ))
+   (base8      '("#dfdfdf" "#dfdfdf" "white"        ))
+   (fg         '("#5b8512" "#5b8512" "brightwhite"  ))
+   (fg-alt     '("#4f7410" "#4f7410" "white"        ))
+
+   (grey       '("#707a6a" "#707a6a" "brightblack"  ))
+   (red        '("#ff4e00" "#ff4e00" "red"          ))
+   (orange     '("#ff7000" "#ff7000" "brightred"    ))
+   (green      '("#7cb518" "#7cb518" "green"        ))
+   (teal       '("#dbc077" "#dbc077" "brightgreen"  )) ;; more of a sand/beige color
+   (yellow     '("#ffbf00" "#ffbf00" "yellow"       ))
+   (blue       '("#0075c4" "#0075c4" "brightblue"   ))
+   (dark-blue  '("#0060a1" "#0060a1" "blue"         ))
+   (magenta    '("#d72638" "#d72638" "brightmagenta"))
+   (violet     '("#76597b" "#76597b" "magenta"      ))
+   (cyan       '("#898989" "#898989" "brightcyan"   ))
+   (dark-cyan  '("#4f7410" "#4f7410" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      yellow)
+   (vertical-bar   (doom-darken grey 0.4))
+   (selection      (doom-darken dark-cyan 0.8))
+   (builtin        yellow)
+   (comments       grey)
+   (doc-comments   grey)
+   (constants      orange)
+   (functions      orange)
+   (keywords       red)
+   (methods        red)
+   (operators      yellow)
+   (type           green)
+   (strings        (doom-darken teal 0.1))
+   (variables      green)
+   (numbers        teal)
+   (region         (doom-darken dark-cyan 0.7))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-pad
+    (when doom-manegarm-padded-modeline
+      (if (integerp doom-manegarm-padded-modeline) doom-manegarm-padded-modeline 4)))
+
+   (modeline-fg     green)
+   (modeline-fg-alt vertical-bar)
+
+   (modeline-bg
+    `(,(car (if doom-manegarm-muted-modeline (doom-darken teal 0.75) (doom-darken green 0.8)))
+      ,@(cdr base0)))
+   (modeline-bg-inactive   `(,(doom-darken (car bg) 0.2) ,@(cdr base0))))
+
+  ;;;; Base theme face overrides
+  ((button :foreground teal :weight 'bold :underline t)
+   (custom-button :foreground teal :weight 'bold :underline t :background bg)
+   ((font-lock-comment-face &override)
+    :slant 'italic
+    :background nil)
+   ((line-number &override) :foreground vertical-bar)
+   ((line-number-current-line &override) :foreground orange)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground highlight)
+
+   ;;;; company
+   (company-tooltip :background (doom-darken region 0.1))
+   (company-tooltip-search-selection :foreground yellow)
+   (company-tooltip-mouse :inherit 'company-tooltip-search-selection)
+   (company-tooltip-selection :inherit 'company-tooltip-search-selection)
+   (company-tooltip-annotation :foreground (doom-darken blue 0.2))
+   (company-tooltip-annotation-selection :foreground blue)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; dired
+   (dired-directory :foreground green :bold 'bold)
+   ;;;; diredfl
+   (diredfl-dir-heading :foreground yellow :weight 'bold)
+   (diredfl-dir-name :foreground green :bold 'bold)
+   (diredfl-dir-priv :foreground teal)
+   (diredfl-number :foreground red)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background highlight)
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   (doom-modeline-project-dir :bold t :foreground orange)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; evil
+   (evil-ex-search :inverse-radio t)
+   (evil-ex-lazy-highlight :inverse-radio t)
+   ;;;; helm
+   (helm-match :inherit 'bold :foreground yellow :background nil)
+   (helm-selection :inherit 'normal :background region)
+   ;;;; highlight-numbers
+   ((highlight-numbers-number &override) :inherit 'normal :foreground numbers)
+   ;;;; isearch
+   (isearch :inverse-radio t :weight 'bold)
+   ;;;; ivy
+   (ivy-current-match :background region :distant-foreground teal :weight 'normal)
+   (ivy-minibuffer-match-highlight :foreground yellow)
+   (ivy-minibuffer-match-face-1 :foreground green :background nil) ;; seems to be used for weird space between matches
+   (ivy-minibuffer-match-face-2 :inherit 'ivy-minibuffer-match-face-1 :foreground orange)
+   (ivy-minibuffer-match-face-3 :inherit 'ivy-minibuffer-match-face-2 :foreground yellow)
+   (ivy-minibuffer-match-face-4 :inherit 'ivy-minibuffer-match-face-2 :foreground magenta)
+   (ivy-highlight-face :foreground green)
+   ;;;; lsp-mode
+   (lsp-face-highlight-textual
+    :background (doom-darken blue 0.5) :foreground yellow :weight 'bold)
+   ;;;; magit
+   (magit-branch-current :foreground yellow)
+   (magit-branch-remote :foreground orange)
+   (magit-section-heading :foreground blue :weight 'bold)
+   (magit-section-heading-selection :foreground yellow :weight 'bold)
+   (magit-section-secondary-heading :foreground green)
+   (magit-filename :foreground green)
+   (magit-diff-hunk-heading-highlight :foreground bg :background fg)
+   (magit-branch-local :foreground yellow)
+   (magit-diff-file-heading :weight 'regular)
+   (magit-header-line :background nil :foreground blue :weight 'bold)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   (markdown-code-face :background (doom-lighten base3 0.05))
+   ;;;; navigation
+   (nav-flash-face :background fg :foreground yellow)
+   ;;;; org <built-in>
+   (org-level-1 :foreground orange :bold t)
+   (org-level-2 :foreground blue :bold t)
+   (org-level-3 :foreground magenta :bold t)
+   (org-level-4 :foreground violet :bold t)
+   (org-level-5 :foreground red :bold t)
+   (org-level-6 :foreground yellow :bold t)
+   (org-hide :foreground hidden)
+   (org-todo :foreground strings :bold 'inherit)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground yellow)
+   (rainbow-delimiters-depth-2-face :foreground orange)
+   (rainbow-delimiters-depth-3-face :foreground green)
+   (rainbow-delimiters-depth-4-face :foreground teal)
+   (rainbow-delimiters-depth-5-face :foreground magenta)
+   (rainbow-delimiters-depth-6-face :foreground blue)
+   (rainbow-delimiters-depth-7-face :foreground fg)
+   (rainbow-delimiters-depth-8-face :foreground violet)
+   (rainbow-delimiters-depth-9-face :foreground red)
+   ;;;; which-key
+   (which-func :foreground green)
+   (which-key-command-description-face :foreground fg)
+   (which-key-group-description-face :foreground yellow)
+   (which-key-local-map-description-face :foreground yellow))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-manegarm-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-material-dark-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-material-dark-theme.el
new file mode 100644
index 0000000..bbf4d2c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-material-dark-theme.el
@@ -0,0 +1,194 @@
+;;; doom-material-dark-theme.el --- inspired by Material Theme by xrei -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: July 31, 2021 (#643)
+;; Author: trev-dev <https://github.com/trev-dev>
+;; Maintainer:
+;; Source: https://github.com/xrei/material-dark-vscode
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-material-dark-theme nil
+  "Options for the `material dark' theme."
+  :group 'doom-themes)
+
+(defcustom doom-material-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-material-dark-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-material-dark
+  "A darker version of the Material Theme inspired by xrei"
+  :family 'doom-material
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  ((bg         '("#212121" nil       nil))
+   (bg-alt     '("#3e3e3e" nil       nil))
+   (base0      '("#171F24" "black"   "black"))
+   (base1      '("#262626" "#262626" "brightblack"))
+   (base2      '("#303030" "#303030" "brightblack"))
+   (base3      '("#3A3A3A" "#3A3A3A" "brightblack"))
+   (base4      '("#4a4a4a" "#444444" "brightblack"))
+   (base5      '("#585858" "#585858" "brightblack"))
+   (base6      '("#626262" "#626262" "brightblack"))
+   (base7      '("#767676" "#767676" "brightblack"))
+   (base8      '("#A8A8A8" "#a8a8a8" "white"))
+   (fg         '("#EEFFFF" "#e4e4e4" "brightwhite"))
+   (fg-alt     '("#BFC7D5" "#bcbcbc" "white"))
+
+   (grey base5)
+
+   (red         '("#f57373" "#ff0000" "red"))
+   (orange      '("#F78C6C" "#ff5f00" "brightred"))
+   (green       '("#c3e88d" "#afff00" "green"))
+   (teal        '("#44b9b1" "#00d7af" "brightgreen"))
+   (yellow      '("#ffcb6b" "#ffd700" "brightyellow"))
+   (blue        '("#82aaff" "#5fafff" "brightblue"))
+   (dark-blue   '("#7986E7" "#d7ffff" "blue"))
+   (magenta     '("#c792ea" "#d787d7" "brightmagenta"))
+   (violet      '("#bb80b3" "#d787af" "magenta"))
+   (cyan        '("#89DDFF" "#5fd7ff" "brightcyan"))
+   (dark-cyan   '("#80cbc4" "#00d7af" "cyan"))
+
+   ;; face categories -- required for all themes
+   (highlight      magenta)
+   (vertical-bar   base2)
+   (selection      base4)
+   (builtin        blue)
+   (comments       base6)
+   (doc-comments   base6)
+   (constants      orange)
+   (functions      blue)
+   (keywords       cyan)
+   (methods        blue)
+   (operators      cyan)
+   (type           magenta)
+   (strings        green)
+   (variables      yellow)
+   (numbers        orange)
+   (region         base3)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    blue)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (modeline-bg     base2)
+   (modeline-bg-alt (doom-darken bg 0.01))
+   (modeline-fg     base8)
+   (modeline-fg-alt comments)
+
+   (-modeline-pad
+    (when doom-material-padded-modeline
+      (if (integerp doom-material-padded-modeline) doom-material-padded-modeline 4))))
+
+  ;;;; Base theme face overrides
+  (;;;; emacs
+   (lazy-highlight :background (doom-darken green 0.5) :foreground green :weight 'bold)
+   (minibuffer-prompt :foreground yellow)
+   (region :background (doom-darken dark-cyan 0.5) :foreground dark-cyan :distant-foreground (doom-darken fg 0.2) :extend t)
+   (hl-line :background base2 :foreground nil)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (tooltip :background (doom-darken bg-alt 0.2) :foreground fg)
+   (cursor :background yellow)
+   (line-number-current-line
+     :inherit '(hl-line default)
+     :foreground cyan :distant-foreground nil
+     :weight 'normal :italic nil :underline nil :strike-through nil)
+   (completions-first-difference :foreground yellow)
+   (icomplete-first-match :foreground green :underline t :weight 'bold)
+
+   ;;;; doom-modeline
+   (doom-modeline-buffer-path       :foreground green :weight 'bold)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path)
+   ;;;; highlight-thing highlight-symbol
+   (highlight-symbol-face :background region :distant-foreground fg-alt)
+   ;;;; highlight-thing
+   (highlight-thing :background region :distant-foreground fg-alt)
+   ;;;; man <built-in>
+   (Man-overstrike :inherit 'bold :foreground magenta)
+   (Man-underline :inherit 'underline :foreground blue)
+   ;;;; org <built-in>
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; dired-k
+   (dired-k-commited :foreground base4)
+   (dired-k-modified :foreground vc-modified)
+   (dired-k-ignored :foreground cyan)
+   (dired-k-added    :foreground vc-added)
+   ;;;; ivy
+   (ivy-current-match :background base3)
+   (ivy-minibuffer-match-face-2
+    :inherit 'ivy-minibuffer-match-face-1
+    :foreground dark-cyan :background base1 :weight 'semi-bold)
+   ;;;; js2-mode
+   (js2-jsdoc-tag              :foreground magenta)
+   (js2-object-property        :foreground yellow)
+   (js2-object-property-access :foreground cyan)
+   (js2-function-param         :foreground violet)
+   (js2-jsdoc-type             :foreground base8)
+   (js2-jsdoc-value            :foreground cyan)
+   ;;;; lsp
+   (lsp-headerline-breadcrumb-symbols-face :foreground base7)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground magenta)
+   (rainbow-delimiters-depth-2-face :foreground orange)
+   (rainbow-delimiters-depth-3-face :foreground green)
+   (rainbow-delimiters-depth-4-face :foreground cyan)
+   (rainbow-delimiters-depth-5-face :foreground violet)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground blue)
+   (rainbow-delimiters-depth-8-face :foreground teal)
+   (rainbow-delimiters-depth-9-face :foreground dark-cyan)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground red)
+   (rjsx-attr :foreground yellow :slant 'italic :weight 'medium)
+   (rjsx-tag-bracket-face :foreground cyan)
+   ;;;; Magit
+   (magit-header-line :background (doom-lighten modeline-bg 0.2) :foreground green :weight 'bold
+                      :box `(:line-width 3 :color ,(doom-lighten modeline-bg 0.2)))
+   ;;;; Treemacs
+   (treemacs-git-modified-face :foreground vc-modified)
+   ;;;; Web Mode
+   (web-mode-html-tag-face :foreground red)
+   (web-mode-html-attr-equal-face :foreground cyan)
+   ;;;; Org Mode
+   (org-level-1 :foreground green)
+   (org-level-2 :foreground yellow)
+   (org-level-3 :foreground red)
+   (org-level-4 :foreground cyan)
+   (org-level-5 :foreground blue)
+   (org-level-6 :foreground magenta)
+   (org-level-7 :foreground teal)
+   (org-level-8 :foreground violet)
+   (org-todo :foreground orange)
+   ;;;; css
+   (css-property :foreground orange)
+   (css-proprietary-property :foreground magenta)
+   (css-selector :foreground yellow)))
+
+;;; Doom-material-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-material-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-material-theme.el
new file mode 100644
index 0000000..e564020
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-material-theme.el
@@ -0,0 +1,158 @@
+;;; doom-material-theme.el --- adapted from equinusocio's Material themes -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: December 12, 2019 (#363)
+;; Author: tam5 <https://github.com/tam5>
+;; Maintainer:
+;; Source: https://github.com/equinusocio/vsc-material-theme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-material-theme nil
+  "Options for the `material' theme."
+  :group 'doom-themes)
+
+(defcustom doom-material-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-material-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-material
+  "A dark theme inspired by Material Theme by equinusocio"
+  :family 'doom-material
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  ((bg         '("#263238" nil       nil))
+   (bg-alt     '("#1C262B" nil       nil))
+   (base0      '("#171F24" "black"   "black"))
+   (base1      '("#1C262B" "#262626" "brightblack"))
+   (base2      '("#222D32" "#303030" "brightblack"))
+   (base3      '("#171F24" "#3a3a3a" "brightblack"))
+   (base4      '("#314048" "#444444" "brightblack"))
+   (base5      '("#37474F" "#585858" "brightblack"))
+   (base6      '("#556369" "#626262" "brightblack"))
+   (base7      '("#737E84" "#767676" "brightblack"))
+   (base8      '("#9BA3A7" "#a8a8a8" "white"))
+   (fg         '("#EEFFFF" "#e4e4e4" "brightwhite"))
+   (fg-alt     '("#BFC7D5" "#bcbcbc" "white"))
+
+   (grey base5)
+
+   (red         '("#ff5370" "#ff0000" "red"))
+   (orange      '("#f78c6c" "#ff5f00" "brightred"))
+   (green       '("#c3e88d" "#afff00" "green"))
+   (teal        '("#44b9b1" "#00d7af" "brightgreen"))
+   (yellow      '("#ffcb6b" "#ffd700" "brightyellow"))
+   (blue        '("#82aaff" "#5fafff" "brightblue"))
+   (dark-blue   '("#7986E7" "#d7ffff" "blue"))
+   (magenta     '("#c792ea" "#d787d7" "brightmagenta"))
+   (violet      '("#bb80b3" "#d787af" "magenta"))
+   (cyan        '("#89DDFF" "#5fd7ff" "brightcyan"))
+   (dark-cyan   '("#80cbc4" "#00d7af" "cyan"))
+
+   ;; face categories -- required for all themes
+   (highlight      magenta)
+   (vertical-bar   base2)
+   (selection      base4)
+   (builtin        blue)
+   (comments       base6)
+   (doc-comments   base6)
+   (constants      orange)
+   (functions      blue)
+   (keywords       cyan)
+   (methods        blue)
+   (operators      cyan)
+   (type           magenta)
+   (strings        green)
+   (variables      yellow)
+   (numbers        orange)
+   (region         base3)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    blue)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (modeline-bg     base2)
+   (modeline-bg-alt (doom-darken bg 0.01))
+   (modeline-fg     base8)
+   (modeline-fg-alt comments)
+
+   (-modeline-pad
+    (when doom-material-padded-modeline
+      (if (integerp doom-material-padded-modeline) doom-material-padded-modeline 4))))
+
+  ;;;; Base theme face overrides
+  (;;;; emacs
+   (lazy-highlight :background base4 :foreground fg :weight 'bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (tooltip :background (doom-darken bg-alt 0.2) :foreground fg)
+
+   ;;;; doom-modeline
+   (doom-modeline-buffer-path       :foreground green :weight 'bold)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path)
+   ;;;; highlight-thing highlight-symbol
+   (highlight-symbol-face :background region :distant-foreground fg-alt)
+   ;;;; highlight-thing
+   (highlight-thing :background region :distant-foreground fg-alt)
+   ;;;; man <built-in>
+   (Man-overstrike :inherit 'bold :foreground magenta)
+   (Man-underline :inherit 'underline :foreground blue)
+   ;;;; org <built-in>
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; dired-k
+   (dired-k-commited :foreground base4)
+   (dired-k-modified :foreground vc-modified)
+   (dired-k-ignored :foreground cyan)
+   (dired-k-added    :foreground vc-added)
+   ;;;; ivy
+   (ivy-current-match :background base5)
+   ;;;; js2-mode
+   (js2-jsdoc-tag              :foreground magenta)
+   (js2-object-property        :foreground yellow)
+   (js2-object-property-access :foreground cyan)
+   (js2-function-param         :foreground violet)
+   (js2-jsdoc-type             :foreground base8)
+   (js2-jsdoc-value            :foreground cyan)
+   ;;;; lsp
+   (lsp-headerline-breadcrumb-symbols-face :foreground base7)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground magenta)
+   (rainbow-delimiters-depth-2-face :foreground orange)
+   (rainbow-delimiters-depth-3-face :foreground green)
+   (rainbow-delimiters-depth-4-face :foreground cyan)
+   (rainbow-delimiters-depth-5-face :foreground violet)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground blue)
+   (rainbow-delimiters-depth-8-face :foreground teal)
+   (rainbow-delimiters-depth-9-face :foreground dark-cyan)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground red)
+   (rjsx-attr :foreground yellow :slant 'italic :weight 'medium)))
+
+;;; doom-material-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-meltbus-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-meltbus-theme.el
new file mode 100644
index 0000000..14c2aac
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-meltbus-theme.el
@@ -0,0 +1,472 @@
+;;; doom-meltbus-theme.el --- a dark (mostly) monochromatic theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: November 20, 2021 (#683)
+;; Author: spacefrogg <https://github.com/spacefrogg>
+;; Maintainer:
+;; Source: https://github.com/equinusocio/vsc-material-theme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-meltbus-theme nil
+  "Options for the `meltbus' theme."
+  :group 'doom-themes)
+
+(defcustom doom-meltbus-hl-line t
+  "If non-nil, highlight the current line with an underline."
+  :group 'doom-meltbus-theme
+  :type 'boolean)
+
+(defcustom doom-meltbus-uniform-font-size nil
+  "If non-nil, all faces use the basic font size."
+  :group 'doom-meltbus-theme
+  :type 'boolean)
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-meltbus
+  "A dark mostly monochromatic theme inspired by the eltbus theme.
+
+Colours are only used to distinguish states and priorities, and to
+highlight interactive elements."
+
+  ;;     default   256       16
+  ((bg '("black"    "black"  "black"))
+   (fg '("#dddddd" "#dddddd" "white"))
+
+   (bg-alt '("black"   "black"   "black"))
+   (fg-alt '("#dddddd" "#dddddd" "white"))
+
+   (base0 '("black"   "black"   "black"))
+   (base1 '("#111111" "#111111" "brightblack"))
+   (base2 '("#353535" "#333333" "brightblack"))
+   (base3 '("#464646" "#444444" "brightblack"))
+   (base4 '("#686868" "#666666" "brightblack"))
+   (base5 '("#8a8a8a" "#888888" "brightblack"))
+   (base6 '("#acacac" "#aaaaaa" "brightblack"))
+   (base7 '("#cecece" "#cccccc" "brightblack"))
+   (base8 '("#efefef" "#eeeeee" "white"))
+
+   (grey base4)
+   (red       '("#f88080" "#ff8888" "red"))
+   (dark-red  '("#b22222" "#bb2222" "red"))
+   (orange    '("#da8548" "#dd8844" "brightred"))
+   (green     '("#448844" "#448844" "green"))
+   (teal      '("#c0f860" "#aaffaa" "brightgreen"))
+   (yellow    '("#cdad00" "#ccaa00" "yellow"))
+   (blue      '("#87afff" "#88aaff" "brightblue"))
+   (dark-blue '("#6c8ccc" "#6688cc" "blue"))
+   (magenta   '("#db7093" "#ee6688" "brightmagenta"))
+   (violet    '("#a9a1e1" "#a9a1e1" "magenta"))
+   (cyan      '("#3fc3e5" "#33ccee" "brightcyan"))
+   (dark-cyan '("#5699af" "#5599ff" "cyan"))
+   (white     '("#ffffff" "#ffffff" "white"))
+
+   ;; faded colors for running text
+   (faded-red     '("#fac7c7" "#ffcccc" "red"))
+   (faded-blue    '("#abc7ff" "#aaccff" "brightblue"))
+   (faded-green   '("#7cab7c" "#77aa77" "green"))
+   (faded-yellow  '("#dcc54c" "#ddcc44" "yellow"))
+   (faded-magenta '("#e59ab3" "#ee99bb" "brightmagenta"))
+   (faded-cyan    '("#7de4ff" "#77eeff" "brightcyan"))
+
+   ;; "universal syntax classes"; *mandatory*
+   (highlight blue)
+   (vertical-bar base1)
+   (selection base3)
+   (builtin base5)
+   (comments base4)
+   (doc-comments base5)
+   (constants base5)
+   (functions fg)
+   (keywords fg)
+   (methods fg)
+   (operators base5)
+   (type base6)
+   (strings base6)
+   (variables fg)
+   (numbers fg)
+   (region base2)
+   (error       red)
+   (warning     orange)
+   (success     green)
+   (vc-modified orange)
+   (vc-added    faded-green)
+   (vc-deleted  faded-red)
+   (vc-conflict magenta)
+
+   ;; theme-local variables
+   (almost-invisible base3))
+
+  ;; Base theme face overrides
+  (((cursor &override) :background base7)
+   (region :inverse-video t)
+   (lazy-highlight :foreground base0 :background (doom-darken highlight 0.1))
+   (hl-line :underline doom-meltbus-hl-line)
+   ((link &override) :weight 'normal :underline 'unspecified :foreground highlight)
+   (link-visited :inherit 'link)
+   (minibuffer-prompt :foreground base5 :background base2 :weight 'bold)
+   (mode-line-emphasis :foreground fg :weight 'bold :distant-foreground bg)
+   (mode-line-highlight :foreground fg :weight 'bold :distant-foreground bg)
+   (mode-line-inactive :foreground base5)
+
+   ;;;; adoc
+   (adoc-align-face :inherit 'adoc-meta-face)
+   (adoc-anchor-face :inherit 'adoc-meta-face)
+   (adoc-attribute-face :inherit 'adoc-meta-face :slant 'italic)
+   (adoc-bold-face :inherit 'bold)
+   (adoc-code-face :inherit 'font-lock-string-face)
+   (adoc-emphasis-face :inherit 'italic)
+   (adoc-gen-face :foreground functions)
+   (adoc-language-info-face :inherit 'adoc-secondary-text-face)
+   (adoc-language-keyword-face :inherit 'adoc-secondary-text-face)
+   ((adoc-list-face &inherit org-list-dt))
+   ((adoc-markup-face &inherit org-code))
+   (adoc-meta-face :foreground constants)
+   (adoc-meta-hide-face :inherit 'adoc-meta-face)
+   (adoc-preprocessor-face :inherit 'adoc-secondary-text-face)
+   (adoc-secondary-text-face :foreground builtin)
+   ((adoc-table-face &inherit org-table))
+   ((adoc-title-0-face &inherit org-document-title))
+   ((adoc-title-1-face &inherit outline-1))
+   ((adoc-title-2-face &inherit outline-2))
+   ((adoc-title-3-face &inherit outline-3))
+   ((adoc-title-4-face &inherit outline-4))
+   ((adoc-title-5-face &inherit outline-5))
+   (adoc-value-face :inherit 'adoc-meta-face)
+   ((adoc-verbatim-face &inherit org-verbatim))
+   (adoc-warning-face :foreground warning)
+   ;;;; ansi-term <built-in>
+   ;; Fix bright black producing full black making some text unreadable.
+   (ansi-color-bright-black :foreground base3 :background base3)
+   ;;;; compilation <built-in>
+   (compilation-line-number :foreground fg :weight 'bold)
+   ;;;; coq
+   (coq-solve-tactics-face :foreground highlight)
+   ;;;; custom <built-in>
+   ((custom-button &override) :foreground highlight)
+   ((custom-button-unraised &override) :foreground comments)
+   ((custom-button-pressed-unraised &override) :background comments)
+   ((custom-button-pressed &override) :background highlight)
+   ((custom-button-mouse &override) :background highlight)
+   ((custom-variable-button &override) :foreground fg)
+   (custom-saved :inherit 'custom-state)
+   (custom-modified :inherit 'custom-changed)
+   (custom-variable-tag :foreground fg)
+   ((custom-visibility &override) :foreground fg)
+   (custom-group-tag :foreground base8 :weight 'bold)
+   (custom-group-tag-1 :foreground fg)
+   (custom-group-subtitle :foreground fg)
+   ((custom-invalid &override) :foreground error)
+   (custom-state :foreground green)
+   (custom-changed :foreground orange)
+   ;;;; diff <built-in>
+   (diff-added :foreground vc-added)
+   (diff-changed :foreground vc-modified)
+   (diff-header :foreground fg :weight 'bold)
+   (diff-hunk-header :foreground base7 :background base3)
+   (diff-file-header :foreground fg :background base3 :weight 'bold)
+   (diff-refine-added :foreground bg :background vc-added :distant-foreground fg)
+   (diff-refine-changed :foreground bg :background vc-modified :distant-foreground fg)
+   (diff-refine-removed :foreground bg :background vc-deleted :distant-foreground fg)
+   (diff-removed :foreground vc-deleted)
+   ;;;; dired <built-in>
+   (dired-header :foreground doc-comments :weight 'bold)
+   (dired-mark :foreground builtin)
+   (dired-marked :foreground orange :weight 'bold)
+   (dired-symlink :foreground doc-comments :weight 'bold)
+   ;;;; diredfl
+   (diredfl-deletion :inherit 'dired-mark)
+   (diredfl-deletion-file-name :inherit 'dired-flagged)
+   (diredfl-flag-mark :inherit 'dired-mark)
+   (diredfl-flag-mark-line :inherit 'dired-marked)
+   (diredfl-read-priv :foreground fg)
+   (diredfl-symlink :foreground cyan :weight 'bold)
+   (diredfl-date-time :foreground base6)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background fg :foreground bg)
+   (doom-modeline-bar-inactive :background base4 :foreground bg)
+   (doom-modeline-info :foreground fg :weight 'bold)
+   (doom-modeline-lsp-running :inherit 'doom-modeline-info)
+   (doom-modeline-evil-insert-state :foreground green)
+   (doom-modeline-evil-emacs-state :foreground cyan)
+   (doom-modeline-evil-normal-state :foreground base5)
+   (doom-modeline-evil-visual-state :foreground white)
+   (doom-modeline-evil-operator-state :inherit 'doom-modeline-evil-visual-state)
+   ;;;; ediff <built-in>
+   (ediff-current-diff-A :background base2 :inherit 'diff-removed)
+   (ediff-current-diff-B :background base2 :inherit 'diff-added)
+   (ediff-current-diff-C :background base2 :inherit 'diff-changed)
+   (ediff-fine-diff-A :inherit 'diff-refine-removed)
+   (ediff-fine-diff-B :inherit 'diff-refine-added)
+   (ediff-fine-diff-C :inherit 'diff-refine-changed)
+   (ediff-even-diff-A :background base3)
+   (ediff-even-diff-B :background base3)
+   (ediff-even-diff-C :background base3)
+   (ediff-odd-diff-A :background base3)
+   (ediff-odd-diff-B :background base3)
+   (ediff-odd-diff-C :background base3)
+   ;;;; embark
+   (embark-target :underline t)
+   (embark-keybinding :foreground builtin)
+   ;;;; evil
+   ((evil-ex-substitute-replacement &override) :foreground cyan)
+   ;;;; evil-snipe
+   ((evil-snipe-first-match-face &override) :background bg)
+   ;;;; flycheck
+   (flycheck-error :underline `(:style wave :color ,error))
+   (flycheck-info :underline `(:style wave :color ,success))
+   (flycheck-warning :underline `(:style wave :color ,warning))
+   ;;;; flymake
+   (flymake-error :underline `(:style wave :color ,error))
+   (flymake-note :underline `(:style wave :color ,success))
+   (flymake-warning :underline `(:style wave :color ,warning))
+   ;;;; flx-ido
+   ((flx-highlight-face &override) :foreground highlight)
+   ;;;; git-commit (part of magit)
+   ((git-commit-keyword &override) :foreground keywords)
+   (git-commit-comment-branch-local :inherit 'magit-branch-local)
+   (git-commit-comment-branch-remote :inherit 'magit-branch-remote)
+   (git-commit-comment-detached :foreground warning)
+   (git-commit-comment-file :foreground doc-comments)
+   ;;;; magit
+   (magit-blame-hash :foreground fg)
+   (magit-blame-date :foreground base6)
+   (magit-blame-heading :inherit 'magit-log-author :background base3 :extend t)
+   (magit-branch-current :foreground fg :weight 'bold :underline t)
+   (magit-branch-local :foreground bg :background fg :weight 'bold :distant-foreground fg)
+   (magit-branch-remote :foreground fg :weight 'bold)
+   (magit-diff-added :inherit 'diff-added)
+   (magit-diff-added-highlight :inherit 'magit-diff-context-highlight :foreground vc-added)
+   (magit-diff-base :foreground (doom-darken orange 0.2))
+   (magit-diff-base-highlight :foreground orange)
+   (magit-diff-context-highlight :foreground base7 :background base1)
+   (magit-diff-file-heading-selection :inherit 'magit-diff-hunk-heading-selection)
+   (magit-diff-hunk-heading :inherit 'diff-hunk-header)
+   (magit-diff-hunk-heading-highlight :inherit 'diff-file-header)
+   (magit-diff-hunk-heading-selection :inherit 'magit-diff-hunk-heading-highlight :foreground base7)
+   (magit-diff-lines-heading :inherit 'magit-diff-hunk-heading-highlight)
+   (magit-diff-removed :inherit 'diff-removed)
+   (magit-diff-removed-highlight :inherit 'magit-diff-context-highlight :foreground vc-deleted)
+   (magit-diff-whitespace-warning :foreground bg :background vc-deleted)
+   (magit-diffstat-added :inherit 'diff-added)
+   (magit-diffstat-removed :inherit 'diff-removed)
+   (magit-header-line :background base2 :foreground base6 :weight 'bold :box `(:line-width 3 :color ,base2))
+   (magit-filename :foreground fg)
+   (magit-item-highlight :weight 'bold)
+   (magit-log-author :foreground fg)
+   (magit-log-date :foreground fg)
+   (magit-section-heading :weight 'bold :extend t)
+   (magit-section-highlight :background base1)
+   (magit-section-heading-selection :foreground base7 :weight 'bold)
+   (magit-tag :foreground vc-added)
+   ;;;; marginalia
+   ((marginalia-date &inherit diredfl-date-time))
+   (marginalia-documentation :foreground fg)
+   (marginalia-size :inherit 'marginalia-date)
+   ((marginalia-file-priv-no &inherit diredfl-no-priv))
+   ((marginalia-file-priv-dir &inherit diredfl-dir-priv))
+   ((marginalia-file-priv-exec &inherit diredfl-exec-priv))
+   ((marginalia-file-priv-link &inherit diredfl-link-priv))
+   ((marginalia-file-priv-rare &inherit diredfl-rare-priv))
+   ((marginalia-file-priv-rare &inherit diredfl-rare-priv))
+   ((marginalia-file-priv-read &inherit diredfl-read-priv))
+   ((marginalia-file-priv-other &inherit diredfl-other-priv))
+   ((marginalia-file-priv-write &inherit diredfl-write-priv))
+   ;;;; markdown <modes:markdown-mode,gfm-mode>
+   (markdown-header-face :inherit 'bold :foreground fg)
+   (markdown-metadata-key-face :foreground builtin)
+   (markdown-list-face :foreground builtin)
+   (markdown-link-face :foreground fg)
+   (markdown-url-face :inherit 'link)
+   (markdown-italic-face :inherit 'italic)
+   (markdown-bold-face :inherit 'bold)
+   ((markdown-blockquote-face &inherit org-quote))
+   ((markdown-code-face &inherit org-code))
+   ;;;; message <built-in>
+   (message-cited-text-1  :foreground base7 :background base2)
+   (message-cited-text-2 :foreground base5 :background base2)
+   (message-cited-text-3 :inherit 'message-cited-text-1)
+   (message-cited-text-4 :inherit 'message-cited-text-2)
+   (message-header-cc :foreground fg :background bg :weight 'bold)
+   (message-header-name :foreground base5)
+   (message-header-newsgroups :inherit 'message-cited-text)
+   (message-header-other :foreground almost-invisible)
+   (message-header-subject :inherit 'message-cited-text)
+   (message-header-to :inherit 'message-header-cc)
+   (message-header-xheader :inherit 'message-header-other)
+   (message-header-mml :inherit 'message-header-other)
+   (message-header-separator :foreground highlight)
+   ;;;; mu4e
+   (mu4e-header-face :foreground base4)
+   (mu4e-header-highlight-face :inherit 'hl-line)
+   (mu4e-thread-fold-face :inherit 'mu4e-header-face)
+   (mu4e-unread-face :foreground fg)
+   (mu4e-flagged-face :foreground yellow)
+   (mu4e-related-face :inherit 'mu4e-header-face :slant 'italic)
+   (mu4e-replied-face :foreground faded-blue)
+   ;;;; neotree
+   ((neo-vc-added-face &inherit treemacs-git-added-face))
+   ((neo-vc-conflict-face &inherit treemacs-git-conflict-face))
+   ((neo-vc-modified-face &inherit treemacs-git-modified-face))
+   (doom-neotree-data-file-face :foreground comments)
+   ;;;; notmuch
+   (notmuch-crypto-signature-bad :foreground error)
+   (notmuch-crypto-signature-good :foreground almost-invisible)
+   (notmuch-crypto-signature-unknown :foreground warning)
+   (notmuch-crypto-signature-good-key :foreground error)
+   (notmuch-crypto-decryption :foreground error)
+   (notmuch-message-summary-face :background base2)
+   (notmuch-search-matching-authros :foreground highlight)
+   (notmuch-tag-face :inherit 'message-header-separator)
+   (notmuch-tree-match-tag-face :inherit 'notmuch-tag-face)
+   (notmuch-tree-match-author-face :inherit 'notmuch-tree-match-tag-face)
+   ;;;; lsp-ui
+   (lsp-ui-peek-header :foreground base8 :background base3 :bold bold)
+   (lsp-ui-peek-highlight :inherit 'lsp-ui-peek-header :background base4 :foreground fg)
+   (lsp-ui-peek-list :background base2)
+   (lsp-ui-peek-peek :background bg)
+   (lsp-ui-peek-line-number :foreground fg)
+   (lsp-ui-peek-selection :foreground bg :background highlight :bold bold)
+   (lsp-ui-sideline-code-action :foreground base8)
+   (lsp-ui-sideline-current-symbol :inherit 'lsp-ui-sideline-code-action)
+   ;;;; org <built-in> <modes:org-mode>
+   (org-code :foreground doc-comments)
+   (org-date :inherit 'link)
+   (org-date-selected :inherit 'lazy-highlight)
+   (org-document-title :height (if doom-meltbus-uniform-font-size 1.0 1.7)
+                       :foreground (if doom-meltbus-uniform-font-size base8 doc-comments)
+                       :weight 'bold :slant 'normal)
+   (org-done :foreground success :weight 'bold)
+   (org-done-keyword-face :foreground success)
+   (org-drawer :foreground comments)
+   (org-block :foreground fg :background 'unspecified :weight 'normal :slant 'normal :underline 'unspecified :inverse-video 'unspecified)
+   (org-block-begin-line :foreground base5 :weight 'bold)
+   (org-block-end-line :inherit 'org-block-begin-line)
+   (org-footnote :foreground doc-comments)
+   (org-formula :foreground doc-comments)
+   (org-list-dt :foreground base8 :weight 'bold)
+   ;; org-level-N inherits from outline-N
+   (org-property-value :foreground fg)
+   (org-table :foreground fg)
+   (org-todo :foreground error :weight 'bold)
+   (org-todo-keyword-face :foreground error)
+   (org-verbatim :inherit 'org-code)
+   ;;;; org-agenda <built-in>
+   (org-agenda-clocking :background base3)
+   ; (org-agenda-date :foreground fg)
+   ; (org-agenda-date-today :inherit 'default :bold bold :underline t)
+   ; (org-agenda-date-weekend :inherit 'default :foreground (doom-darken (face-foreground 'org-agenda-date) 0.3))
+   (org-scheduled-previously :foreground base6 :bold bold)
+   ;;;; org-journal <modes:org-journal-mode>
+   (org-journal-calendar-entry-face :foreground fg :slant 'italic :underline t)
+   (org-journal-calendar-scheduled-face :foreground bg :background fg :slant 'italic )
+   ;;;; org-ref
+   (org-ref-acronym-face :foreground red)
+   (org-ref-cite-face :foreground green)
+   (org-ref-glossary-face :foreground dark-red)
+   (org-ref-label-face :foreground blue)
+   (org-ref-ref-face :foreground teal)
+   (+org-todo-cancel :inherit '(font-lock-doc-face org-todo)) ; Subdue canceled TODOs
+   ;;;; outline
+   (outline-1 :height (if doom-meltbus-uniform-font-size 1.0 1.5)
+              :background base1 :weight 'bold)
+   (outline-2 :height (if doom-meltbus-uniform-font-size 1.0 1.4)
+              :foreground (if doom-meltbus-uniform-font-size (doom-darken fg 0.2) 'unspecified)
+              :background base1 :weight 'bold)
+   (outline-3 :height (if doom-meltbus-uniform-font-size 1.0 1.3)
+              :foreground (if doom-meltbus-uniform-font-size (doom-darken fg 0.3) 'unspecified)
+              :background base1 :weight 'bold)
+   (outline-4 :height (if doom-meltbus-uniform-font-size 1.0 1.2)
+              :foreground (if doom-meltbus-uniform-font-size (doom-darken fg 0.4) 'unspecified)
+              :background base1 :weight 'bold)
+   (outline-5 :height (if doom-meltbus-uniform-font-size 1.0 1.1)
+              :background base1
+              :weight (if doom-meltbus-uniform-font-size 'normal 'bold))
+   (outline-6 :height (if doom-meltbus-uniform-font-size 1.0 1.0)
+              :foreground (if doom-meltbus-uniform-font-size (doom-darken fg 0.2) 'unspecified)
+              :background base1
+              :weight (if doom-meltbus-uniform-font-size 'normal 'bold))
+   (outline-7 :height (if doom-meltbus-uniform-font-size 1.0 1.0)
+              :foreground (if doom-meltbus-uniform-font-size (doom-darken fg 0.3) 'unspecified)
+              :background base1 :weight 'normal)
+   (outline-8 :height (if doom-meltbus-uniform-font-size 1.0 1.0)
+              :foreground (if doom-meltbus-uniform-font-size (doom-darken fg 0.4) 'unspecified)
+              :background base1 :weight 'normal)
+   ;;;; pkgbuild-mode <modes:pkgbuild-mode>
+   (pkgbuild-error-face :underline `(:style wave :color ,error))
+   ;;;; popup
+   (popup-tip-face :inherit 'popup-face :foreground fg :background bg :bold bold :underline t)
+   ;;;; proof
+   (proof-boring-face :foreground comments)
+   (proof-debug-message-face :foreground doc-comments)
+   (proof-error-face :foreground error)
+   (proof-locked-face :background (doom-lighten base1 0.05))
+   (proof-queue-face :foreground warning)
+   (proof-warning-face :foreground warning)
+   (proof-script-highlight-error-face :foreground error :weight 'bold)
+   (proof-script-sticky-error-face :foreground error)
+   (proof-tactics-name-face :foreground builtin)
+   (proof-tacticals-name-face :foreground keywords :weight 'bold)
+   (proof-eager-annotation-face :foreground success)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground green)
+   (rainbow-delimiters-depth-2-face :foreground dark-red)
+   (rainbow-delimiters-depth-3-face :foreground red)
+   (rainbow-delimiters-depth-4-face :inherit 'rainbow-delimiters-depth-1-face)
+   (rainbow-delimiters-depth-5-face :inherit 'rainbow-delimiters-depth-2-face)
+   (rainbow-delimiters-depth-6-face :inherit 'rainbow-delimiters-depth-3-face)
+   (rainbow-delimiters-depth-7-face :inherit 'rainbow-delimiters-depth-1-face)
+   (rainbow-delimiters-depth-8-face :inherit 'rainbow-delimiters-depth-2-face)
+   (rainbow-delimiters-depth-9-face :inherit 'rainbow-delimiters-depth-3-face)
+   (rainbow-delimiters-base-face :inherit 'default)
+   ;;;; smerge-tool
+   ((smerge-markers &inherit magit-diff-conflict-heading))
+   (smerge-lower :inherit 'diff-added)
+   (smerge-upper :inherit 'diff-removed)
+   (smerge-base :inherit 'diff-changed)
+   (smerge-refined-added :inherit 'diff-refine-added)
+   (smerge-refined-removed :inherit 'diff-refine-removed)
+   ;;;; treemacs
+   (treemacs-git-conflict-face :foreground vc-conflict)
+   (treemacs-git-modified-face :foreground vc-modified)
+   ;;;; vertico
+   ((vertico-current &inherit embark-target))
+   (vertico-group-title :inherit 'shadow)
+   ;;;; vterm
+   ((vterm-color-black &override) :background base0 :foreground base3)
+   ((vterm-color-red &override) :background red :foreground faded-red)
+   ((vterm-color-blue &override) :background blue :foreground faded-blue)
+   ((vterm-color-green &override) :background green :foreground faded-green)
+   ((vterm-color-yellow &override) :background yellow :foreground faded-yellow)
+   ((vterm-color-magenta &override) :background magenta :foreground faded-magenta)
+   ((vterm-color-cyan &override) :background cyan :foreground faded-cyan)
+   ((vterm-color-white &override) :background base7 :foreground base8)
+   (vterm-color-bright-black :foreground base3 :background base3)
+   (vterm-color-bright-red :foreground faded-red :background faded-red)
+   (vterm-color-bright-blue :foreground faded-blue :background faded-blue)
+   (vterm-color-bright-green :foreground faded-green :background faded-green)
+   (vterm-color-bright-yellow :foreground faded-yellow :background faded-yellow)
+   (vterm-color-bright-magenta :foreground faded-magenta :background faded-magenta)
+   (vterm-color-bright-cyan :foreground faded-cyan :background faded-cyan)
+   (vterm-color-bright-white :foreground base8 :background base8)
+   ;;;; wgrep
+   (wgrep-face :background base2)
+   ;;;; which-key
+   (which-key-key-face :foreground base5)
+   (which-key-group-description-face :foreground base5)
+   (which-key-command-description-face :foreground fg :weight 'bold)
+   (which-key-local-map-description-face :foreground fg))
+
+  ;; Base theme variable overrides
+  ())
+
+;;; doom-meltbus-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-miramare-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-miramare-theme.el
new file mode 100644
index 0000000..d9dfa95
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-miramare-theme.el
@@ -0,0 +1,269 @@
+;;; doom-miramare-theme.el --- a port of Franbach's Miramare theme; a variant of Grubox -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: July 11, 2020 (#492)
+;; Author: sagittaros <https://github.com/sagittaros>
+;; Maintainer:
+;; Source: https://github.com/franbach/miramare
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+;; Compiler pacifier
+(defvar modeline-bg)
+
+
+;;
+;;; Variables
+
+(defgroup doom-miramare-theme nil
+  "Options for doom-miramare."
+  :group 'doom-themes)
+
+(defcustom doom-miramare-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-miramare-theme
+  :type 'boolean)
+
+(defcustom doom-miramare-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-miramare-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-miramare
+  "A gruvbox variant with comfortable and pleasant colors."
+
+  ;; name        gui       256       16
+  ((bg         '("#2a2426" "#2a2426" nil          )) ; bg1
+   (bg-alt     '("#242021" "#242021" nil          )) ; bg1
+   (bg-alt2    '("#504945" "#504945" "brown"      )) ; bg2 (for region, selection etc.)
+
+   (base0      '("#0d1011" "black"   "black"      )) ; (self-defined)
+   (base1      '("#1d2021" "#1d1d1d" "brightblack")) ; bg0_h
+   (base2      '("#282828" "#282828" "brightblack")) ; bg0
+   (base3      '("#3c3836" "#383838" "brightblack")) ; bg1
+   (base4      '("#5b5b5b" "#5c5c5c" "brightblack")) ; bg3
+   (base5      '("#7c6f64" "#6f6f6f" "brightblack")) ; bg4
+   (base6      '("#928374" "#909090" "brightblack")) ; gray
+   (base7      '("#d5c4a1" "#cccccc" "brightblack")) ; fg2
+   (base8      '("#fbf1c7" "#fbfbfb" "brightwhite")) ; fg0
+   (fg         '("#e6d6ac" "#e6d6ac" "brightwhite")) ; fg/fg1
+   (fg-alt     '("#d8caac" "#d8caac" "brightwhite")) ; fg2
+
+   (grey       '("#5b5b5b" "#5b5b5b" "brightblack"))   ; gray
+   (red        '("#e68183" "#e68183" "red"))           ; bright-red
+   (magenta    '("#e68183" "#e68183" "magenta"))       ; red
+   (violet     '("#d3a0bc" "#d3a0bc" "brightmagenta")) ; bright-purple
+   (orange     '("#e39b7b" "#e39b7b" "orange"))        ; bright-orange
+   (yellow     '("#d9bb80" "#d9bb80" "yellow"))        ; bright-yellow
+   (teal       '("#87af87" "#87af87" "green"))         ; bright-aqua
+   (green      '("#87af87" "#87af87" "green"))         ; bright-green
+   (dark-green '("#678f67" "#678f67" "green"))         ; green
+   (blue       '("#89beba" "#89beba" "brightblue"))    ; bright-blue
+   (dark-blue  '("#458588" "#458588" "blue"))          ; blue
+   (cyan       '("#87c095" "#87c095" "brightcyan"))    ; bright-aqua
+   (dark-cyan  '("#67a075" "#67a075" "cyan"))          ; aqua
+
+   ;; face categories
+   (highlight      yellow)
+   (vertical-bar   grey)
+   (selection      bg-alt2)
+   (builtin        orange)
+   (comments       (if doom-miramare-brighter-comments magenta grey))
+   (doc-comments   (if doom-miramare-brighter-comments (doom-lighten magenta 0.2) (doom-lighten fg-alt 0.25)))
+   (constants      violet)
+   (functions      cyan)
+   (keywords       red)
+   (methods        cyan)
+   (operators      cyan)
+   (type           yellow)
+   (strings        green)
+   (variables      cyan)
+   (numbers        violet)
+   (region         bg-alt2)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+
+   (vc-modified    (doom-darken blue 0.15))
+   (vc-added       (doom-darken green 0.15))
+   (vc-deleted     (doom-darken red 0.15))
+
+   ;; custom categories
+   (-modeline-pad
+    (when doom-miramare-padded-modeline
+      (if (integerp doom-miramare-padded-modeline)
+          doom-miramare-padded-modeline
+        4)))
+
+   (org-quote `(,(doom-lighten (car bg) 0.05) "#1f1f1f")))
+
+
+  ;;;; Base theme face overrides
+  ((button :foreground cyan :underline t :bold t)
+   (cursor :background "white")
+   (font-lock-variable-name-face :foreground cyan :italic t)
+   (hl-line :background bg-alt)
+   (isearch :foreground base0 :background orange)
+   (lazy-highlight
+    :background yellow :foreground base0 :distant-foreground base0
+    :weight 'bold)
+   ((line-number &override) :foreground base5)
+   ((line-number-current-line &override) :background bg-alt2 :foreground fg :bold t)
+   (minibuffer-prompt :foreground cyan)
+   (mode-line
+    :background bg-alt2 :foreground (doom-lighten fg-alt 0.25)
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,bg-alt2)))
+   (mode-line-inactive
+    :background bg :foreground base4
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,bg)))
+
+   ;; vimish-fold
+   ((vimish-fold-overlay &override) :inherit 'font-lock-comment-face :background bg-alt2 :weight 'light)
+   ((vimish-fold-mouse-face &override) :foreground "white" :background yellow :weight 'light)
+   ((vimish-fold-fringe &override) :foreground magenta :background magenta)
+   ;;;; company
+   (company-preview-common :foreground cyan)
+   (company-tooltip-common :foreground cyan)
+   (company-tooltip-common-selection :foreground cyan)
+   (company-tooltip-annotation :foreground cyan)
+   (company-tooltip-annotation-selection :foreground cyan)
+   (company-scrollbar-bg :background bg-alt)
+   (company-scrollbar-fg :background cyan)
+   (company-tooltip-selection :background bg-alt2)
+   (company-tooltip-mouse :background bg-alt2 :foreground nil)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground keywords)
+   ;;;; dired
+   (dired-directory :foreground cyan)
+   (dired-marked :foreground yellow)
+   (dired-symlink :foreground cyan)
+   (dired-header :foreground cyan)
+   ;;;; doom-emacs
+   (+workspace-tab-selected-face :background dark-green :foreground "white")
+   ;;;; doom-modeline
+   (doom-modeline-bar :background dark-green)
+   (doom-modeline-buffer-file :inherit 'bold :foreground fg)
+   (doom-modeline-buffer-major-mode :foreground green :bold t)
+   (doom-modeline-buffer-modified :inherit 'bold :foreground yellow)
+   (doom-modeline-buffer-path :inherit 'bold :foreground green)
+   (doom-modeline-error :background bg)
+   (doom-modeline-info :bold t :foreground cyan)
+   (doom-modeline-panel :background dark-green :foreground fg)
+   (doom-modeline-project-dir :bold t :foreground cyan)
+   (doom-modeline-warning :foreground red :bold t)
+   ;;;; doom-themes
+   (doom-themes-neotree-file-face :foreground fg)
+   (doom-themes-neotree-hidden-file-face :foreground (doom-lighten fg-alt 0.25))
+   (doom-themes-neotree-media-file-face :foreground (doom-lighten fg-alt 0.25))
+   ;;;; ediff <built-in>
+   (ediff-fine-diff-A    :background (doom-blend red bg 0.4) :weight 'bold)
+   (ediff-current-diff-A :background (doom-blend red bg 0.2))
+   ;;;; evil
+   (evil-search-highlight-persist-highlight-face :background yellow)
+   (evil-ex-substitute-replacement :foreground cyan :inherit 'evil-ex-substitute-matches)
+   ;;;; evil-snipe
+   (evil-snipe-first-match-face :foreground "white" :background yellow)
+   (evil-snipe-matches-face     :foreground yellow :bold t :underline t)
+   ;;;; flycheck
+   (flycheck-error   :underline `(:style wave :color ,red)    :background base3)
+   (flycheck-warning :underline `(:style wave :color ,yellow) :background base3)
+   (flycheck-info    :underline `(:style wave :color ,cyan)  :background base3)
+   ;;;; helm
+   (helm-swoop-target-line-face :foreground magenta :inverse-video t)
+   ;;;; highlight-quoted
+   (highlight-quoted-symbol :foreground dark-cyan)
+   ;;;; highlight-symbol
+   (highlight-symbol-face :background (doom-lighten base3 0.03) :distant-foreground fg-alt)
+   ;;;; highlight-thing
+   (highlight-thing :background (doom-lighten base3 0.03) :distant-foreground fg-alt)
+   ;;;; ivy
+   (ivy-current-match :background bg-alt2)
+   (ivy-subdir :background nil :foreground cyan)
+   (ivy-action :background nil :foreground cyan)
+   (ivy-grep-line-number :background nil :foreground cyan)
+   (ivy-minibuffer-match-face-1 :background nil :foreground yellow :bold t)
+   (ivy-minibuffer-match-face-2 :background nil :foreground red :bold t)
+   (ivy-minibuffer-match-highlight :foreground cyan)
+   (counsel-key-binding :foreground cyan)
+   ;;;; ivy-posframe
+   (ivy-posframe :background bg-alt)
+   (ivy-posframe-border :background base1)
+   ;;;; LaTeX-mode
+   (font-latex-math-face :foreground dark-cyan)
+   ;;;; magit
+   (magit-section-heading             :foreground yellow :weight 'bold)
+   (magit-branch-current              :underline cyan :inherit 'magit-branch-local)
+   (magit-diff-hunk-heading           :background base3 :foreground fg-alt)
+   (magit-diff-hunk-heading-highlight :background bg-alt2 :foreground fg)
+   (magit-diff-context                :foreground bg-alt :foreground fg-alt)
+   ;;;; markdown-mode
+   (markdown-blockquote-face :inherit 'italic :foreground cyan)
+   (markdown-list-face :foreground red)
+   (markdown-url-face :foreground red)
+   (markdown-pre-face  :foreground cyan)
+   (markdown-link-face :inherit 'bold :foreground cyan)
+   ((markdown-code-face &override) :background (doom-lighten base2 0.045))
+   ;;;; mu4e-view
+   (mu4e-header-key-face :foreground red)
+   ;;;; neotree
+   (neo-root-dir-face   :foreground cyan)
+   (doom-neotree-dir-face :foreground cyan)
+   (neo-dir-link-face   :foreground cyan)
+   (neo-expand-btn-face :foreground magenta)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground yellow)
+   ((outline-2 &override) :foreground cyan)
+   ((outline-3 &override) :foreground cyan)
+   ;;;; org <built-in>
+   (org-ellipsis :underline nil :foreground orange)
+   (org-tag :foreground yellow :bold nil)
+   ((org-quote &override) :inherit 'italic :foreground base7 :background org-quote)
+   (org-todo :foreground yellow :bold 'inherit)
+   (org-list-dt :foreground yellow)
+   ;;;; show-paren
+   ((show-paren-match &override) :foreground nil :background base5 :bold t)
+   ((show-paren-mismatch &override) :foreground nil :background "red")
+   ;;;; which-func
+   (which-func :foreground cyan)
+   ;;;; which-key
+   (which-key-command-description-face :foreground fg)
+   (which-key-group-description-face :foreground (doom-lighten fg-alt 0.25))
+   (which-key-local-map-description-face :foreground cyan)
+   ;;;; undo-tree
+   (undo-tree-visualizer-active-branch-face :foreground cyan)
+   (undo-tree-visualizer-current-face :foreground yellow)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground red)
+   (rainbow-delimiters-depth-2-face :foreground yellow)
+   (rainbow-delimiters-depth-3-face :foreground cyan)
+   (rainbow-delimiters-depth-4-face :foreground red)
+   (rainbow-delimiters-depth-5-face :foreground yellow)
+   (rainbow-delimiters-depth-6-face :foreground cyan)
+   (rainbow-delimiters-depth-7-face :foreground red)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground cyan :weight 'semi-bold)
+   (rjsx-text :foreground fg)
+   (rjsx-attr :foreground violet)
+   ;;;; solaire-mode
+   (solaire-hl-line-face :background bg-alt2)
+   ;;;; swiper
+   (swiper-line-face :background bg-alt2)
+   ;;;; web-mode
+   (web-mode-html-tag-bracket-face :foreground blue)
+   (web-mode-html-tag-face         :foreground cyan :weight 'semi-bold)
+   (web-mode-html-attr-name-face   :foreground violet)
+   (web-mode-json-key-face         :foreground green)
+   (web-mode-json-context-face     :foreground cyan))
+
+  ;; --- extra variables --------------------
+  ;; ()
+  )
+
+;;; doom-miramare-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-molokai-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-molokai-theme.el
new file mode 100644
index 0000000..62b2e6c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-molokai-theme.el
@@ -0,0 +1,199 @@
+;;; doom-molokai-theme.el --- inspired by Tomas Restrepo's Molokai -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: September 15, 2016 (32f8b5ae5feb)
+;; Author: Henrik Lissner <https://github.com/hlissner>
+;; Maintainer:
+;; Source: https://github.com/tomasr/molokai
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-molokai-theme nil
+  "Options for the `doom-molokai' theme."
+  :group 'doom-themes)
+
+(defcustom doom-molokai-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-molokai-theme
+  :type 'boolean)
+
+(defcustom doom-molokai-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-molokai-theme
+  :type 'boolean)
+
+(defcustom doom-molokai-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-molokai-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-molokai
+  "A dark, vibrant theme inspired by Textmate's Monokai."
+  :family 'doom-molokai
+  :background-mode 'dark
+
+  ;; name        gui       256       16
+  ((bg         '("#1c1e1f" "black"   "black"        ))
+   (fg         '("#d6d6d4" "#dfdfdf" "brightwhite"  ))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#222323" "black"   "black"        ))
+   (fg-alt     '("#556172" "#4d4d4d" "white"        ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#1B2229" "black"   "black"        ))
+   (base1      '("#151617" "#101010" "brightblack"  ))
+   (base2      '("#1d1f20" "#191919" "brightblack"  ))
+   (base3      '("#2d2e2e" "#252525" "brightblack"  ))
+   (base4      '("#4e4e4e" "#454545" "brightblack"  ))
+   (base5      '("#555556" "#6b6b6b" "brightblack"  ))
+   (base6      '("#767679" "#7b7b7b" "brightblack"  ))
+   (base7      '("#cfc0c5" "#c1c1c1" "brightblack"  ))
+   (base8      '("#ffffff" "#ffffff" "brightwhite"  ))
+
+   (grey       '("#525254" "#515154" "brightblack"  ))
+   (red        '("#e74c3c" "#e74c3c" "red"          ))
+   (orange     '("#fd971f" "#fd971f" "brightred"    ))
+   (green      '("#b6e63e" "#b6e63e" "green"        ))
+   (teal       green)
+   (yellow     '("#e2c770" "#e2c770" "yellow"       ))
+   (blue       '("#268bd2" "#2686D6" "brightblue"   ))
+   (dark-blue  '("#727280" "#727280" "blue"         ))
+   (magenta    '("#fb2874" "#fb2874" "magenta"      ))
+   (violet     '("#9c91e4" "#9c91e4" "brightmagenta"))
+   (cyan       '("#66d9ef" "#66d9ef" "brightcyan"   ))
+   (dark-cyan  '("#8fa1b3" "#8FA1B3" "cyan"         ))
+
+   ;; These are the "universal syntax classes" that doom-themes establishes.
+   ;; These *must* be included in every doom themes, or your theme will throw an
+   ;; error, as they are used in the base theme defined in doom-themes-base.
+   (highlight      orange)
+   (vertical-bar   (doom-lighten bg 0.1))
+   (selection      base5)
+   (builtin        orange)
+   (comments       (if doom-molokai-brighter-comments violet base5))
+   (doc-comments   (if doom-molokai-brighter-comments
+                       (doom-lighten violet 0.1)
+                     (doom-lighten base5 0.25)))
+   (constants      orange)
+   (functions      green)
+   (keywords       magenta)
+   (methods        cyan)
+   (operators      violet)
+   (type           cyan)
+   (strings        yellow)
+   (variables      orange)
+   (numbers        violet)
+   (region         base4)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    cyan)
+   (vc-added       (doom-darken green 0.15))
+   (vc-deleted     red)
+
+   ;; These are extra color variables used only in this theme; i.e. they aren't
+   ;; mandatory for derived themes.
+   (modeline-fg          fg)
+   (modeline-fg-alt      base4)
+   (modeline-bg          (if doom-molokai-brighter-modeline base4 base3))
+   (modeline-bg-inactive (doom-darken (if doom-molokai-brighter-modeline
+                                          base3
+                                        base2)
+                                      0.2))
+   (org-quote `(,(doom-lighten (car bg) 0.05) "#1f1f1f"))
+
+   (-modeline-pad
+    (when doom-molokai-padded-modeline
+      (if (integerp doom-molokai-padded-modeline) doom-molokai-padded-modeline 4))))
+
+
+  ;;;; Base theme face overrides
+  ((cursor :background magenta)
+   (lazy-highlight :background violet :foreground base0 :distant-foreground base0 :bold bold)
+   ((line-number &override) :foreground base5 :distant-foreground 'unspecified)
+   ((line-number-current-line &override) :foreground base7 :distant-foreground 'unspecified)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (isearch :foreground base0 :background green)
+
+   ;;;; centaur-tabs
+   (centaur-tabs-active-bar-face :background green)
+   (centaur-tabs-modified-marker-selected :inherit 'centaur-tabs-selected :foreground green)
+   (centaur-tabs-modified-marker-unselected :inherit 'centaur-tabs-unselected :foreground green)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground keywords)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background green)
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'bold :foreground green)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   (doom-modeline-buffer-modified :inherit 'bold :foreground orange)
+   ;;;; ediff <built-in>
+   (ediff-fine-diff-A :background (doom-blend magenta bg 0.3) :weight 'bold)
+   ;;;; evil
+   (evil-search-highlight-persist-highlight-face :background violet)
+   ;;;; evil-snipe
+   (evil-snipe-first-match-face :foreground base0 :background green)
+   (evil-snipe-matches-face     :foreground green :underline t)
+   ;;;; flycheck
+   (flycheck-error   :underline `(:style wave :color ,red)    :background base3)
+   (flycheck-warning :underline `(:style wave :color ,yellow) :background base3)
+   (flycheck-info    :underline `(:style wave :color ,green)  :background base3)
+   ;;;; helm
+   (helm-swoop-target-line-face :foreground magenta :inverse-video t)
+   ;;;; ivy
+   (ivy-current-match :background base3)
+   (ivy-minibuffer-match-face-1 :background base1 :foreground base4)
+   ;;;; markdown-mode
+   (markdown-blockquote-face :inherit 'italic :foreground dark-blue)
+   (markdown-list-face :foreground magenta)
+   (markdown-pre-face  :foreground cyan)
+   (markdown-link-face :inherit 'bold :foreground blue)
+   ((markdown-code-face &override) :background (doom-lighten base2 0.045))
+   ;;;; neotree
+   (neo-dir-link-face   :foreground cyan)
+   (neo-expand-btn-face :foreground magenta)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground magenta)
+   ((outline-2 &override) :foreground orange)
+   ;;;; org <built-in>
+   (org-ellipsis :foreground orange)
+   (org-tag :foreground yellow :bold nil)
+   ((org-quote &override) :foreground base7)
+   (org-todo :foreground yellow :bold 'inherit)
+   (org-list-dt :foreground yellow)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground magenta)
+   (rainbow-delimiters-depth-2-face :foreground orange)
+   (rainbow-delimiters-depth-3-face :foreground green)
+   (rainbow-delimiters-depth-4-face :foreground cyan)
+   (rainbow-delimiters-depth-5-face :foreground magenta)
+   (rainbow-delimiters-depth-6-face :foreground orange)
+   (rainbow-delimiters-depth-7-face :foreground green))
+
+  ;;;; Base theme variable overrides
+  ;; ()
+  )
+
+;;; doom-molokai-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-classic-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-classic-theme.el
new file mode 100644
index 0000000..b6af34a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-classic-theme.el
@@ -0,0 +1,199 @@
+;;; doom-monokai-classic-theme.el --- port of Monokai Classic -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: March 12, 2020 (3767e6854429)
+;; Author: ema2159 <https://github.com/ema2159>
+;; Maintainer:
+;; Source: https://monokai.pro
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-monokai-classic-theme nil
+  "Options for doom-molokai."
+  :group 'doom-themes)
+
+(defcustom doom-monokai-classic-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-monokai-classic-theme
+  :type 'boolean)
+
+(defcustom doom-monokai-classic-comment-bg doom-monokai-classic-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-monokai-classic-theme
+  :type 'boolean)
+
+(defcustom doom-monokai-classic-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-monokai-classic-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-monokai-classic
+  "A dark, vibrant theme inspired by Textmate's Monokai."
+  :family 'doom-molokai
+  :background-mode 'dark
+
+  ;; name        gui       256       16
+  ((bg         '("#272822" nil       nil          ))
+   (bg-alt     '("#1D1E19" nil       nil          ))
+   (base0      '("#1B2229" "black"   "black"      ))
+   (base1      '("#161613" "#101010" "brightblack"))
+   (base2      '("#1D1F20" "#191919" "brightblack"))
+   (base3      '("#2D2E2E" "#252525" "brightblack"))
+   (base4      '("#4E4E4E" "#454545" "brightblack"))
+   (base5      '("#555556" "#6B6B6B" "brightblack"))
+   (base6      '("#767679" "#7B7B7B" "brightblack"))
+   (base7      '("#CFC0C5" "#C1C1C1" "brightblack"))
+   (base8      '("#FFFFFF" "#FFFFFF" "brightwhite"))
+   (fg         '("#F8F8F2" "#DFDFDF" "brightwhite"))
+   (fg-alt     '("#556172" "#4D4D4D" "white"))
+
+   (grey       '("#525254" "#525254" "brightblack"))
+   (red        '("#E74C3C" "#E74C3C" "red"))
+   (orange     '("#FD971F" "#FD971F" "brightred"))
+   (green      '("#A6E22E" "#A6E22E" "green"))
+   (teal       green)
+   (yellow     '("#E6DB74" "#E6DB74" "yellow"))
+   (blue       '("#268bd2" "#268bd2" "brightblue"))
+   (dark-blue  '("#727280" "#727280" "blue"))
+   (magenta    '("#F92660" "#F92660" "magenta"))
+   (violet     '("#9C91E4" "#9C91E4" "brightmagenta"))
+   (cyan       '("#66D9EF" "#66D9EF" "brightcyan"))
+   (dark-cyan  '("#8FA1B3" "#8FA1B3" "cyan"))
+
+   ;; face categories
+   (highlight      orange)
+   (vertical-bar   (doom-lighten bg 0.1))
+   (selection      base5)
+   (builtin        orange)
+   (comments       (if doom-monokai-classic-brighter-comments violet base5))
+   (doc-comments   (if doom-monokai-classic-brighter-comments (doom-lighten violet 0.1) (doom-lighten base5 0.25)))
+   (constants      violet)
+   (functions      green)
+   (keywords       magenta)
+   (methods        green)
+   (operators      magenta)
+   (type           cyan)
+   (strings        yellow)
+   (variables      fg)
+   (numbers        violet)
+   (region         base4)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    cyan)
+   (vc-added       (doom-darken green 0.15))
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-pad
+    (when doom-monokai-classic-padded-modeline
+      (if (integerp doom-monokai-classic-padded-modeline) doom-monokai-classic-padded-modeline 4)))
+
+   (modeline-fg 'unspecified)
+   (modeline-fg-alt base4)
+
+   (modeline-bg base1)
+   (modeline-bg-inactive (doom-darken base2 0.2))
+
+   (org-quote `(,(doom-lighten (car bg) 0.05) "#1f1f1f")))
+
+
+  ;;;; Base theme face overrides
+  ((cursor :background magenta)
+   ((font-lock-comment-face &override) :slant 'italic)
+   ((font-lock-type-face &override) :slant 'italic)
+   (lazy-highlight :background violet :foreground base0 :distant-foreground base0 :bold bold)
+   ((line-number &override) :foreground base5 :distant-foreground nil)
+   ((line-number-current-line &override) :foreground base7 :distant-foreground nil)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+
+   ;;;; centaur-tabs
+   (centaur-tabs-selected-modified :inherit 'centaur-tabs-selected
+                                   :background bg
+                                   :foreground yellow)
+   (centaur-tabs-unselected-modified :inherit 'centaur-tabs-unselected
+                                     :background bg-alt
+                                     :foreground yellow)
+   (centaur-tabs-active-bar-face :background yellow)
+   (centaur-tabs-modified-marker-selected :inherit 'centaur-tabs-selected :foreground fg)
+   (centaur-tabs-modified-marker-unselected :inherit 'centaur-tabs-unselected :foreground fg)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground keywords)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background yellow)
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'bold :foreground green)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   (doom-modeline-buffer-modified :inherit 'bold :foreground orange)
+
+
+   (isearch :foreground base0 :background green)
+   ;;;; ediff <built-in>
+   (ediff-fine-diff-A :background (doom-blend magenta bg 0.3) :weight 'bold)
+   ;;;; evil
+   (evil-search-highlight-persist-highlight-face :background violet)
+   ;;;; evil-snipe
+   (evil-snipe-first-match-face :foreground base0 :background green)
+   (evil-snipe-matches-face     :foreground green :underline t)
+   ;;;; flycheck
+   (flycheck-error   :underline `(:style wave :color ,red)    :background base3)
+   (flycheck-warning :underline `(:style wave :color ,yellow) :background base3)
+   (flycheck-info    :underline `(:style wave :color ,green)  :background base3)
+   ;;;; helm
+   (helm-swoop-target-line-face :foreground magenta :inverse-video t)
+   ;;;; ivy
+   (ivy-current-match :background base3)
+   (ivy-minibuffer-match-face-1 :background base1 :foreground base4)
+   ;;;; markdown-mode
+   (markdown-blockquote-face :inherit 'italic :foreground dark-blue)
+   (markdown-list-face :foreground magenta)
+   (markdown-pre-face  :foreground cyan)
+   (markdown-link-face :inherit 'bold :foreground blue)
+   ((markdown-code-face &override) :background (doom-lighten base2 0.045))
+   ;;;; neotree
+   (neo-dir-link-face   :foreground cyan)
+   (neo-expand-btn-face :foreground magenta)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground magenta)
+   ((outline-2 &override) :foreground orange)
+   ;;;; org <built-in>
+   (org-ellipsis :foreground orange)
+   (org-tag :foreground yellow :bold nil)
+   ((org-quote &override) :inherit 'italic :foreground base7 :background org-quote)
+   (org-todo :foreground yellow :bold 'inherit)
+   (org-list-dt :foreground yellow)
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground magenta)
+   (rainbow-delimiters-depth-2-face :foreground orange)
+   (rainbow-delimiters-depth-3-face :foreground green)
+   (rainbow-delimiters-depth-4-face :foreground cyan)
+   (rainbow-delimiters-depth-5-face :foreground magenta)
+   (rainbow-delimiters-depth-6-face :foreground orange)
+   (rainbow-delimiters-depth-7-face :foreground green))
+
+  ;;;; Base theme variable overrides
+  ;; ()
+  )
+
+;;; doom-monokai-classic-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-machine-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-machine-theme.el
new file mode 100644
index 0000000..1a3c0fb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-machine-theme.el
@@ -0,0 +1,324 @@
+;;; doom-monokai-machine-theme.el --- port of Monokai Classic -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 23, 2021 (#601)
+;; Author: minikN <https://github.com/minikN>
+;; Maintainer:
+;; Source: https://monokai.pro
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-monokai-machine-theme nil
+  "Options for doom-molokai."
+  :group 'doom-themes)
+
+(defcustom doom-monokai-machine-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-monokai-machine-theme
+  :type 'boolean)
+
+(defcustom doom-monokai-machine-comment-bg doom-monokai-machine-brighter-comments
+  "If non-nil, comments will have a subtle, darker background.
+Enhancing their legibility."
+  :group 'doom-monokai-machine-theme
+  :type 'boolean)
+
+(defcustom doom-monokai-machine-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-monokai-machine-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-monokai-machine
+  "A dark, vibrant theme inspired by Textmate's Monokai."
+  :family 'doom-molokai
+  :background-mode 'dark
+
+  ;; name        gui       256       16
+  ((bg         '("#273136" nil       nil            ))
+   (bg-alt     '("#1E2528" nil       nil            ))
+   (base0      '("#131313" "#121212" "black"        ))
+   (base1      '("#161b1e" "#1c1c1c" "black"        ))
+   (base2      '("#2e363b" "#262626" "brightblack"  ))
+   (base3      '("#3a4449" "#3a3a3a" "brightblack"  ))
+   (base4      '("#545f62" "#585858" "brightblack"  ))
+   (base5      '("#5a6568" "#585858" "brightblack"  ))
+   (base6      '("#6b7678" "#6c6c6c" "brightblack"  ))
+   (base7      '("#8b9798" "#8a8a8a" "brightblack"  ))
+   (base8      '("#b4c1c0" "#bcbcbc" "white"        ))
+   (fg         '("#f2fffc" "#ffffff" "brightwhite"  ))
+   (fg-alt     '("#c6c6c6" "#c6c6c6" "white"        ))
+
+   (grey       base4)
+   (red        '("#ff6d7e" "#ff69bf" "red"          ))
+   (orange     '("#ffb270" "#ff7f50" "brightred"    ))
+   (green      '("#a2e57b" "#90ee90" "green"        ))
+   (yellow     '("#ffed72" "#f0e68c" "yellow"       ))
+   (violet     '("#baa0f8" "#9370db" "magenta"      ))
+   (cyan       '("#7cd5f1" "#40e0d0" "brightcyan"   ))
+   (magenta     cyan)
+   (blue        cyan)
+   (dark-blue   cyan)
+   (teal        cyan)
+   (dark-cyan   cyan)
+
+   ;; face categories
+   (highlight      yellow)
+   (vertical-bar   (doom-lighten bg 0.1))
+   (selection      base2)
+   (builtin        violet)
+   (comments       (if doom-monokai-machine-brighter-comments violet base6))
+   (doc-comments   (if doom-monokai-machine-brighter-comments (doom-lighten violet 0.1) (doom-lighten base6 0.25)))
+   (constants      violet)
+   (functions      green)
+   (keywords       magenta)
+   (methods        green)
+   (operators      red)
+   (type           cyan)
+   (strings        yellow)
+   (variables      fg)
+   (numbers        violet)
+   (region         base3)
+   (error          red)
+   (warning        orange)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-pad
+    (when doom-monokai-machine-padded-modeline
+      (if (integerp doom-monokai-machine-padded-modeline) doom-monokai-machine-padded-modeline 4)))
+
+
+   (org-quote `(,(doom-lighten (car bg) 0.05) "#1f1f1f")))
+
+
+  ;;;; Base theme face overrides
+  ((cursor                                       :background fg)
+   ;; I-search
+   (match                                        :foreground fg :background base3)
+   (isearch                                      :inherit 'match :box `(:line-width 2 :color ,yellow))
+   (lazy-highlight                               :inherit 'match)
+   (isearch-fail                                 :foreground red)
+   ;; current line
+   (hl-line                                      :background base3)
+   ;; line-numbers
+   ((line-number &override)                      :foreground base4 :distant-foreground nil)
+   ((line-number-current-line &override)         :foreground base7 :distant-foreground nil)
+   ;; mode-line
+   (mode-line                                    :background base3 :foreground fg
+                                                 :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,base3)))
+   (mode-line-inactive                           :background bg :foreground fg
+                                                 :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,bg)))
+
+   ;;;; centaur-tabs
+   (centaur-tabs-selected-modified               :inherit 'centaur-tabs-selected :foreground yellow)
+   (centaur-tabs-unselected-modified             :inherit 'centaur-tabs-unselected :foreground yellow)
+   (centaur-tabs-active-bar-face                 :background yellow)
+   (centaur-tabs-modified-marker-selected        :inherit 'centaur-tabs-selected :foreground fg)
+   (centaur-tabs-modified-marker-unselected      :inherit 'centaur-tabs-unselected :foreground fg)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property                     :foreground keywords)
+   ;;;; deadgrep
+   (deadgrep-match-face                          :inherit 'match :box `(:line-width 2 :color ,yellow))
+
+   ;;;; doom-modeline
+   (doom-modeline-bar                            :background yellow)
+   (doom-modeline-buffer-file                    :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path                    :inherit 'bold :foreground green)
+   (doom-modeline-buffer-project-root            :foreground green :weight 'bold)
+   (doom-modeline-buffer-modified                :inherit 'bold :foreground orange)
+   ;;;; doom-emacs
+   (doom-dashboard-menu-title                    :foreground yellow)
+   ;;;; ediff <built-in>
+   (ediff-fine-diff-A                            :background (doom-blend red bg 0.3) :weight 'bold)
+   ;;;; evil
+   (evil-search-highlight-persist-highlight-face :background violet)
+   ;;;; evil-snipe
+   (evil-snipe-first-match-face                  :foreground base0 :background green)
+   (evil-snipe-matches-face                      :foreground green :underline t)
+   ;;;; flycheck
+   ((flycheck-error &override)                   :background base3)
+   ((flycheck-warning &override)                 :background base3)
+   ((flycheck-info &override)                    :background base3)
+   ;;;; helm
+   (helm-swoop-target-line-face                  :foreground red :inverse-video t)
+   ;;;; ivy
+   (ivy-action                                   :foreground violet)
+   (ivy-confirm-face                             :foreground green)
+   (ivy-current-match                            :background base3)
+   (ivy-cursor                                   :foreground bg :background fg)
+   (ivy-grep-info                                :foreground red)
+   (ivy-grep-line-number                         :foreground red)
+   (ivy-highlight-face                           :background base3 :foreground fg)
+   (ivy-match-required-face                      :foreground red)
+   (ivy-minibuffer-match-face-1                  :foreground yellow)
+   (ivy-minibuffer-match-face-2                  :foreground yellow :weight 'bold)
+   (ivy-minibuffer-match-face-3                  :foreground green)
+   (ivy-minibuffer-match-face-4                  :foreground green :weight 'bold)
+   (ivy-minibuffer-match-highlight               :foreground base6 :background base3)
+   (ivy-modified-buffer                          :foreground fg)
+   (ivy-modified-outside-buffer                  :foreground fg)
+   (ivy-org                                      :foreground base3 :italic italic)
+   (ivy-prompt-match                             :foreground bg :background yellow)
+   (ivy-remote                                   :foreground violet)
+   (ivy-separator                                :foreground base3)
+   (ivy-subdir                                   :foreground green)
+   (ivy-virtual                                  :foreground violet)
+   (ivy-yanked-word                              :foreground base6 :background base3)
+   ;;;; lsp-mode
+   (lsp-face-highlight-read                     :background base3)
+   (lsp-face-highlight-textual                  :background base3)
+   (lsp-face-highlight-write                    :background base4)
+   ;;;; lsp-ui
+   ;; HIGHLY recommended: (setq lsp-ui-peek-fontify 'always)
+   (lsp-ui-peek-header                          :foreground fg :background base5)
+   (lsp-ui-peek-footer                          :inherit 'lsp-ui-peek-header)
+   (lsp-ui-peek-selection                       :foreground bg :background yellow)
+   (lsp-ui-peek-list                            :background base3)
+   (lsp-ui-peek-peek                            :inherit 'lsp-ui-peek-list)
+   (lsp-ui-peek-highlight                       :inherit 'isearch)
+   (lsp-ui-peek-filename                        :foreground base8 :weight 'bold)
+   ;;;; markdown-mode
+   (markdown-blockquote-face                     :inherit 'italic :foreground dark-blue)
+   (markdown-list-face                           :foreground red)
+   (markdown-pre-face                            :foreground cyan)
+   (markdown-link-face                           :inherit 'bold :foreground blue)
+   ((markdown-code-face &override)               :background (doom-lighten base2 0.045))
+   ;;;; neotree
+   (neo-dir-link-face                            :foreground cyan)
+   (neo-expand-btn-face                          :foreground red)
+   ;;;; outline <built-in>
+   ((outline-1 &override)                        :foreground yellow)
+   ((outline-2 &override)                        :foreground blue)
+   ((outline-3 &override)                        :foreground green)
+   ((outline-4 &override)                        :foreground fg)
+   (outline-5                                    :inherit 'outline-4)
+   (outline-6                                    :inherit 'outline-5)
+   (outline-7                                    :inherit 'outline-6)
+   (outline-8                                    :inherit 'outline-7)
+   ;;;; org <built-in>
+   (org-ellipsis                                 :foreground orange)
+   (org-tag                                      :foreground yellow :weight 'normal)
+   ((org-quote &override)                        :inherit 'italic :foreground base7 :background org-quote)
+   (org-todo                                     :foreground yellow)
+   (org-list-dt                                  :foreground yellow)
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;;;; php-mode
+   (php-php-tag                                  :foreground orange)
+   (php-function-name                            :foreground green)
+   (php-function-call                            :foreground green)
+   (php-string                                   :foreground yellow)
+   (php-keyword                                  :foreground blue)
+   (php-builtin                                  :foreground violet)
+   (php-method-call                              :foreground green)
+   (php-static-method-call                       :foreground green)
+   (php-variable-name                            :foreground fg)
+   (php-property-name                            :foreground fg)
+   (php-variable-sigil                           :foreground base8)
+   (php-operator                                 :foreground red)
+   (php-paamayim-nekudotayim                     :foreground red)
+   (php-type                                     :foreground blue :italic italic)
+   (php-class                                    :foreground red)
+   (php-constant                                 :foreground violet)
+   (php-constant-assign                          :foreground blue)
+   (php-magical-constant                         :foreground violet)
+   (php-$this                                    :foreground base8 :italic italic)
+   (php-$this-sigil                              :foreground base8 :italic italic)
+   (php-errorcontrol-op                          :foreground red)
+   (php-doc-annotation-tag                       :foreground blue)
+   (php-doc-variable-sigil                       :foreground base6)
+   (php-doc-$this                                :foreground base6)
+   (php-doc-$this-sigil                          :foreground base6)
+   (php-doc-class-name                           :foreground base6)
+   ;; As soon as https://github.com/emacs-php/php-mode/pull/606
+   ;; is merged these can be uncommented.
+   ;;(php-class-declaration-spec                   :foreground red)
+   ;;(php-class-modifier                           :foreground red)
+   ;;(php-namespace-declaration                    :foreground red)
+   ;;(php-import-declaration                       :foreground red)
+   ;;(php-method-modifier                          :foreground red :italic italic)
+   ;;(php-method-access                            :foreground red :italic italic)
+   ;;(php-method-static                            :foreground red :italic italic)
+   ;;(php-property-access                          :foreground red :italic italic)
+   ;;(php-property-const                           :foreground red :italic italic)
+   ;;(php-property-static                          :foreground red :italic italic)
+   ;;(php-block-delimiter                          :foreground base7)
+   ;;(php-flow-control-statement                   :foreground red)
+   ;;(php-block-statement                          :foreground red)
+   ;;(php-include-statement                        :foreground green)
+   ;;(php-constant-keyword                         :foreground violet)
+   ;;(php-number                                   :foreground violet)
+   ;;(php-string-quote                             :foreground base7)
+   ;;(php-type-operator                            :foreground red)
+   ;;(php-print-statement                          :foreground green)
+   ;;(php-return-type-colon                        :foreground red)
+   ;;(php-function-keyword                         :foreground blue :italic italic)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face              :foreground red)
+   (rainbow-delimiters-depth-2-face              :foreground orange)
+   (rainbow-delimiters-depth-3-face              :foreground green)
+   (rainbow-delimiters-depth-4-face              :foreground cyan)
+   (rainbow-delimiters-depth-5-face              :foreground red)
+   (rainbow-delimiters-depth-6-face              :foreground orange)
+   (rainbow-delimiters-depth-7-face              :foreground green)
+   ;;;; show-paren-mode
+   (show-paren-match                             :weight 'bold :foreground green)
+   (show-paren-mismatch                          :weight 'bold :foreground red)
+   ;;;; swiper
+   (swiper-background-match-face-1               :inherit 'match :weight 'bold)
+   (swiper-background-match-face-2               :inherit 'match)
+   (swiper-background-match-face-3               :inherit 'match :foreground green)
+   (swiper-background-match-face-4               :inherit 'match :weight 'bold :foreground green)
+   (swiper-match-face-1                          :inherit 'isearch :weight 'bold)
+   (swiper-match-face-2                          :inherit 'isearch)
+   (swiper-match-face-3                          :inherit 'isearch :foreground green)
+   (swiper-match-face-4                          :inherit 'isearch :weight 'bold :foreground green)
+   (swiper-line-face                             :inherit 'hl-line)
+   ;;;; term <built-in>
+   (term-color-black                            :foreground base3)
+   (term-color-blue                             :foreground blue)
+   (term-color-cyan                             :foreground violet)
+   (term-color-green                            :foreground green)
+   (term-color-magenta                          :foreground red)
+   (term-color-red                              :foreground red)
+   (term-color-white                            :foreground fg)
+   (term-color-yellow                           :foreground yellow)
+   ;;;; treemacs
+   (treemacs-git-added-face                     :foreground green)
+   (treemacs-git-conflict-face                  :foreground red)
+   (treemacs-git-ignored-face                   :foreground base6)
+   (treemacs-git-modified-face                  :foreground violet)
+   (treemacs-git-renamed-face                   :foreground orange)
+   (treemacs-git-untracked-face                 :inherit 'treemacs-git-renamed-face)
+   (treemacs-on-failure-pulse-face              :foreground base0 :background red)
+   (treemacs-on-success-pulse-face              :foreground base0 :background green)
+   ;;;; web-mode
+   (web-mode-html-tag-face                      :foreground red)
+   (web-mode-html-tag-bracket-face              :foreground base7)
+   (web-mode-html-attr-name-face                :foreground cyan :italic italic)
+   (web-mode-html-attr-equal-face               :inherit 'web-mode-html-tag-bracket-face)
+   ;; Apparently web-mode has no face for values of css properties.
+   (web-mode-css-selector-face                  :foreground green)
+   (web-mode-css-property-name-face             :foreground base7))
+
+  ;;;; Base theme variable overrides
+  ;; ()
+  )
+
+;;; doom-monokai-machine-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-octagon-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-octagon-theme.el
new file mode 100644
index 0000000..7e71d77
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-octagon-theme.el
@@ -0,0 +1,324 @@
+;;; doom-monokai-octagon-theme.el --- port of Monokai Octagon -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 23, 2021 (#601)
+;; Author: minikN <https://github.com/minikN>
+;; Maintainer:
+;; Source: https://monokai.pro
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-monokai-octagon-theme nil
+  "Options for doom-molokai."
+  :group 'doom-themes)
+
+(defcustom doom-monokai-octagon-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-monokai-octagon-theme
+  :type 'boolean)
+
+(defcustom doom-monokai-octagon-comment-bg doom-monokai-octagon-brighter-comments
+  "If non-nil, comments will have a subtle, darker background.
+Enhancing their legibility."
+  :group 'doom-monokai-octagon-theme
+  :type 'boolean)
+
+(defcustom doom-monokai-octagon-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-monokai-octagon-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-monokai-octagon
+  "A dark, vibrant theme inspired by Textmate's Monokai."
+  :family 'doom-molokai
+  :background-mode 'dark
+
+  ;; name        gui       256       16
+  ((bg         '("#282a3a" nil       nil            ))
+   (bg-alt     '("#1E1F2B" nil       nil            ))
+   (base0      '("#131313" "#121212" "black"        ))
+   (base1      '("#161821" "#1c1c1c" "black"        ))
+   (base2      '("#2e313d" "#262626" "brightblack"  ))
+   (base3      '("#3a3d4b" "#3a3a3a" "brightblack"  ))
+   (base4      '("#535763" "#585858" "brightblack"  ))
+   (base5      '("#595d68" "#585858" "brightblack"  ))
+   (base6      '("#696d77" "#6c6c6c" "brightblack"  ))
+   (base7      '("#888d94" "#8a8a8a" "brightblack"  ))
+   (base8      '("#afb5b9" "#bcbcbc" "white"        ))
+   (fg         '("#eaf2f1" "#ffffff" "brightwhite"  ))
+   (fg-alt     '("#c6c6c6" "#c6c6c6" "white"        ))
+
+   (grey       base4)
+   (red        '("#ff657a" "#ff69bf" "red"          ))
+   (orange     '("#ff95be" "#ff7f50" "brightred"    ))
+   (green      '("#bad761" "#90ee90" "green"        ))
+   (yellow     '("#ffd76d" "#f0e68c" "yellow"       ))
+   (violet     '("#c39ac9" "#9370db" "magenta"      ))
+   (cyan       '("#9cd1bb" "#40e0d0" "brightcyan"   ))
+   (magenta     cyan)
+   (blue        cyan)
+   (dark-blue   cyan)
+   (teal        cyan)
+   (dark-cyan   cyan)
+
+   ;; face categories
+   (highlight      yellow)
+   (vertical-bar   (doom-lighten bg 0.1))
+   (selection      base2)
+   (builtin        violet)
+   (comments       (if doom-monokai-octagon-brighter-comments violet base6))
+   (doc-comments   (if doom-monokai-octagon-brighter-comments (doom-lighten violet 0.1) (doom-lighten base6 0.25)))
+   (constants      violet)
+   (functions      green)
+   (keywords       magenta)
+   (methods        green)
+   (operators      red)
+   (type           cyan)
+   (strings        yellow)
+   (variables      fg)
+   (numbers        violet)
+   (region         base3)
+   (error          red)
+   (warning        orange)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-pad
+    (when doom-monokai-octagon-padded-modeline
+      (if (integerp doom-monokai-octagon-padded-modeline) doom-monokai-octagon-padded-modeline 4)))
+
+
+   (org-quote `(,(doom-lighten (car bg) 0.05) "#1f1f1f")))
+
+
+  ;;;; Base theme face overrides
+  ((cursor                                       :background fg)
+   ;; I-search
+   (match                                        :foreground fg :background base3)
+   (isearch                                      :inherit 'match :box `(:line-width 2 :color ,yellow))
+   (lazy-highlight                               :inherit 'match)
+   (isearch-fail                                 :foreground red)
+   ;; current line
+   (hl-line                                      :background base3)
+   ;; line-numbers
+   ((line-number &override)                      :foreground base4 :distant-foreground nil)
+   ((line-number-current-line &override)         :foreground base7 :distant-foreground nil)
+   ;; mode-line
+   (mode-line                                    :background base3 :foreground fg
+                                                 :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,base3)))
+   (mode-line-inactive                           :background bg :foreground fg
+                                                 :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,bg)))
+   ;;;; centaur-tabs
+   (centaur-tabs-selected-modified               :inherit 'centaur-tabs-selected :foreground yellow)
+   (centaur-tabs-unselected-modified             :inherit 'centaur-tabs-unselected :foreground yellow)
+   (centaur-tabs-active-bar-face                 :background yellow)
+   (centaur-tabs-modified-marker-selected        :inherit 'centaur-tabs-selected :foreground fg)
+   (centaur-tabs-modified-marker-unselected      :inherit 'centaur-tabs-unselected :foreground fg)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property                     :foreground keywords)
+   ;;;; deadgrep
+   (deadgrep-match-face                          :inherit 'match :box `(:line-width 2 :color ,yellow))
+   ;;;; doom-emacs
+   (doom-dashboard-menu-title                    :foreground yellow)
+   ;;;; doom-modeline
+   (doom-modeline-bar                            :background yellow)
+   (doom-modeline-buffer-file                    :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path                    :inherit 'bold :foreground green)
+   (doom-modeline-buffer-project-root            :foreground green :weight 'bold)
+   (doom-modeline-buffer-modified                :inherit 'bold :foreground orange)
+   ;;;; ediff <built-in>
+   (ediff-fine-diff-A                            :background (doom-blend red bg 0.3) :bold 'bold)
+   ;;;; evil
+   (evil-search-highlight-persist-highlight-face :background violet)
+   ;;;; evil-snipe
+   (evil-snipe-first-match-face                  :foreground base0 :background green)
+   (evil-snipe-matches-face                      :foreground green :underline t)
+   ;;;; flycheck
+   ((flycheck-error &override)                   :background base3)
+   ((flycheck-warning &override)                 :background base3)
+   ((flycheck-info &override)                    :background base3)
+   ;;;; helm
+   (helm-swoop-target-line-face                  :foreground red :inverse-video t)
+   ;;;; ivy
+   (ivy-action                                   :foreground violet)
+   (ivy-confirm-face                             :foreground green)
+   (ivy-current-match                            :background base3)
+   (ivy-cursor                                   :foreground bg :background fg)
+   (ivy-grep-info                                :foreground red)
+   (ivy-grep-line-number                         :foreground red)
+   (ivy-highlight-face                           :background base3 :foreground fg)
+   (ivy-match-required-face                      :foreground red)
+   (ivy-minibuffer-match-face-1                  :background base2 :foreground base4)
+   (ivy-minibuffer-match-face-2                  :foreground yellow :bold bold)
+   (ivy-minibuffer-match-face-3                  :foreground green)
+   (ivy-minibuffer-match-face-4                  :foreground green :bold bold)
+   (ivy-minibuffer-match-highlight               :foreground base6 :background base3)
+   (ivy-modified-buffer                          :foreground fg)
+   (ivy-modified-outside-buffer                  :foreground fg)
+   (ivy-org                                      :foreground base3 :italic italic)
+   (ivy-prompt-match                             :foreground bg :background yellow)
+   (ivy-remote                                   :foreground violet)
+   (ivy-separator                                :foreground base3)
+   (ivy-subdir                                   :foreground green)
+   (ivy-virtual                                  :foreground violet)
+   (ivy-yanked-word                              :foreground base6 :background base3)
+   ;;;; lsp-mode
+   (lsp-face-highlight-read                     :background base3)
+   (lsp-face-highlight-textual                  :background base3)
+   (lsp-face-highlight-write                    :background base4)
+   ;;;; lsp-ui
+   ;; HIGHLY recommended: (setq lsp-ui-peek-fontify 'always)
+   (lsp-ui-peek-header                          :foreground fg :background base5)
+   (lsp-ui-peek-footer                          :inherit 'lsp-ui-peek-header)
+   (lsp-ui-peek-selection                       :foreground bg :background yellow)
+   (lsp-ui-peek-list                            :background base3)
+   (lsp-ui-peek-peek                            :inherit 'lsp-ui-peek-list)
+   (lsp-ui-peek-highlight                       :inherit 'isearch)
+   (lsp-ui-peek-filename                        :foreground base8 :bold bold)
+   ;;;; markdown-mode
+   (markdown-blockquote-face                     :inherit 'italic :foreground dark-blue)
+   (markdown-list-face                           :foreground red)
+   (markdown-pre-face                            :foreground cyan)
+   (markdown-link-face                           :inherit 'bold :foreground blue)
+   ((markdown-code-face &override)               :background (doom-lighten base2 0.045))
+   ;;;; neotree
+   (neo-dir-link-face                            :foreground cyan)
+   (neo-expand-btn-face                          :foreground red)
+   ;;;; outline <built-in>
+   ((outline-1 &override)                        :foreground yellow)
+   ((outline-2 &override)                        :foreground blue)
+   ((outline-3 &override)                        :foreground green)
+   ((outline-4 &override)                        :foreground fg)
+   ((outline-5 &override)                        :inherit 'outline-4)
+   ((outline-6 &override)                        :inherit 'outline-5)
+   ((outline-7 &override)                        :inherit 'outline-6)
+   ((outline-8 &override)                        :inherit 'outline-7)
+   ;;;; org <built-in>
+   (org-ellipsis                                 :foreground orange)
+   (org-tag                                      :foreground yellow :bold nil)
+   ((org-quote &override)                        :inherit 'italic :foreground base7 :background org-quote)
+   (org-todo                                     :foreground yellow :bold 'inherit)
+   (org-list-dt                                  :foreground yellow)
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;;;; php-mode
+   (php-php-tag                                  :foreground orange)
+   (php-function-name                            :foreground green)
+   (php-function-call                            :foreground green)
+   (php-string                                   :foreground yellow)
+   (php-keyword                                  :foreground blue)
+   (php-builtin                                  :foreground violet)
+   (php-method-call                              :foreground green)
+   (php-static-method-call                       :foreground green)
+   (php-variable-name                            :foreground fg)
+   (php-property-name                            :foreground fg)
+   (php-variable-sigil                           :foreground base8)
+   (php-operator                                 :foreground red)
+   (php-paamayim-nekudotayim                     :foreground red)
+   (php-type                                     :foreground blue :italic italic)
+   (php-class                                    :foreground red)
+   (php-constant                                 :foreground violet)
+   (php-constant-assign                          :foreground blue)
+   (php-magical-constant                         :foreground violet)
+   (php-$this                                    :foreground base8 :italic italic)
+   (php-$this-sigil                              :foreground base8 :italic italic)
+   (php-errorcontrol-op                          :foreground red)
+   (php-doc-annotation-tag                       :foreground blue)
+   (php-doc-variable-sigil                       :foreground base6)
+   (php-doc-$this                                :foreground base6)
+   (php-doc-$this-sigil                          :foreground base6)
+   (php-doc-class-name                           :foreground base6)
+   ;; As soon as https://github.com/emacs-php/php-mode/pull/606
+   ;; is merged these can be uncommented.
+   ;;(php-class-declaration-spec                   :foreground red)
+   ;;(php-class-modifier                           :foreground red)
+   ;;(php-namespace-declaration                    :foreground red)
+   ;;(php-import-declaration                       :foreground red)
+   ;;(php-method-modifier                          :foreground red :italic italic)
+   ;;(php-method-access                            :foreground red :italic italic)
+   ;;(php-method-static                            :foreground red :italic italic)
+   ;;(php-property-access                          :foreground red :italic italic)
+   ;;(php-property-const                           :foreground red :italic italic)
+   ;;(php-property-static                          :foreground red :italic italic)
+   ;;(php-block-delimiter                          :foreground base7)
+   ;;(php-flow-control-statement                   :foreground red)
+   ;;(php-block-statement                          :foreground red)
+   ;;(php-include-statement                        :foreground green)
+   ;;(php-constant-keyword                         :foreground violet)
+   ;;(php-number                                   :foreground violet)
+   ;;(php-string-quote                             :foreground base7)
+   ;;(php-type-operator                            :foreground red)
+   ;;(php-print-statement                          :foreground green)
+   ;;(php-return-type-colon                        :foreground red)
+   ;;(php-function-keyword                         :foreground blue :italic italic)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face              :foreground red)
+   (rainbow-delimiters-depth-2-face              :foreground orange)
+   (rainbow-delimiters-depth-3-face              :foreground green)
+   (rainbow-delimiters-depth-4-face              :foreground cyan)
+   (rainbow-delimiters-depth-5-face              :foreground red)
+   (rainbow-delimiters-depth-6-face              :foreground orange)
+   (rainbow-delimiters-depth-7-face              :foreground green)
+   ;;;; show-paren-mode
+   (show-paren-match                             :bold bold :foreground green)
+   (show-paren-mismatch                          :bold bold :foreground red)
+   ;;;; swiper
+   (swiper-background-match-face-1               :inherit 'match :bold bold)
+   (swiper-background-match-face-2               :inherit 'match)
+   (swiper-background-match-face-3               :inherit 'match :foreground green)
+   (swiper-background-match-face-4               :inherit 'match :bold bold :foreground green)
+   (swiper-match-face-1                          :inherit 'isearch :bold bold)
+   (swiper-match-face-2                          :inherit 'isearch)
+   (swiper-match-face-3                          :inherit 'isearch :foreground green)
+   (swiper-match-face-4                          :inherit 'isearch :bold bold :foreground green)
+   (swiper-line-face                             :inherit 'hl-line)
+   ;;;; term <built-in>
+   (term-color-black                            :foreground base3)
+   (term-color-blue                             :foreground blue)
+   (term-color-cyan                             :foreground violet)
+   (term-color-green                            :foreground green)
+   (term-color-magenta                          :foreground red)
+   (term-color-red                              :foreground red)
+   (term-color-white                            :foreground fg)
+   (term-color-yellow                           :foreground yellow)
+   ;;;; treemacs
+   (treemacs-git-added-face                     :foreground green)
+   (treemacs-git-conflict-face                  :foreground red)
+   (treemacs-git-ignored-face                   :foreground base6)
+   (treemacs-git-modified-face                  :foreground violet)
+   (treemacs-git-renamed-face                   :foreground orange)
+   (treemacs-git-untracked-face                 :inherit 'treemacs-git-renamed-face)
+   (treemacs-on-failure-pulse-face              :foreground base0 :background red)
+   (treemacs-on-success-pulse-face              :foreground base0 :background green)
+   ;;;; web-mode
+   ;; html
+   (web-mode-html-tag-face                      :foreground red)
+   (web-mode-html-tag-bracket-face              :foreground base7)
+   (web-mode-html-attr-name-face                :foreground cyan :italic italic)
+   (web-mode-html-attr-equal-face               :inherit 'web-mode-html-tag-bracket-face)
+   ;; css
+   ;; Apparently web-mode has no face for values of css properties.
+   (web-mode-css-selector-face                  :foreground green)
+   (web-mode-css-property-name-face             :foreground base7))
+
+  ;;;; Base theme variable overrides
+  ;; ()
+  )
+
+;;; doom-monokai-octagon-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-pro-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-pro-theme.el
new file mode 100644
index 0000000..b49f46c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-pro-theme.el
@@ -0,0 +1,165 @@
+;;; doom-monokai-pro-theme.el --- Port of Monokai Pro -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 23, 2021 (#601)
+;; Author: minikN <https://github.com/minikN>
+;; Maintainer:
+;; Source: https://monokai.pro
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-monokai-pro-theme nil
+  "Options for the `doom-monokai-pro' theme."
+  :group 'doom-themes)
+
+(defcustom doom-monokai-pro-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-monokai-pro-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-monokai-pro
+  "A port of VS Code's Monokai Pro"
+  :family 'doom-molokai
+  :background-mode 'dark
+
+  ;; name        gui       256       16
+  ((bg         '("#2D2A2E" nil       nil          ))
+   (bg-alt     '("#221F22" nil       nil          ))
+   (base0      '("#19181A" "black"   "black"      ))
+   (base1      '("#1B1B1B" "#1B1B1B"              ))
+   (base2      '("#212122" "#212122"              ))
+   (base3      '("#2B2B2B" "#2B2B2B" "brightblack"))
+   (base4      '("#383539" "#3F4040" "brightblack"))
+   (base5      '("#4C4A4D" "#5C5E5E" "brightblack"))
+   (base6      '("#727072" "#757878" "brightblack"))
+   (base7      '("#c1c0c0" "#969896" "brightblack"))
+   (base8      '("#FCFCFA" "#FCFCFA" "white"      ))
+   (fg         '("#FCFCFA" "#939293" "white"))
+   (fg-alt     '("#939293" "#A3A2A3" "white"))
+
+   (grey       '("#727072" "#727072" "brightblack"))
+   (red        '("#CC6666" "#CC6666" "red"))
+   (orange     '("#FC9867" "#FC9867" "orange"))
+   (green      '("#A9DC76" "#A9DC76" "green"))
+   (teal       green)
+   (yellow     '("#FFD866" "#FFD866" "yellow"))
+   (blue       '("#78DCE8" "#78DCE8" "blue"))
+   (dark-blue  '("#81A2BE" "#81A2BE" "blue"))
+   (magenta    '("#FF6188" "#FF6188" "violet"))
+   (violet     '("#AB9DF2" "#AB9DF2" "violet"))
+   (cyan       blue)
+   (dark-cyan  dark-blue)
+
+   ;; face categories
+   (highlight      base8)
+   (vertical-bar   (doom-lighten bg 0.1))
+   (selection      base5)
+   (builtin        blue)
+   (comments       grey)
+   (doc-comments   yellow)
+   (constants      violet)
+   (functions      green)
+   (keywords       magenta)
+   (methods        green)
+   (operators      magenta)
+   (type           blue)
+   (strings        yellow)
+   (variables      base8)
+   (numbers        violet)
+   (region         selection)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    fg-alt)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (modeline-bg     bg-alt)
+   (modeline-bg-alt `(,(car bg) ,@(cdr base1)))
+   (modeline-fg     fg-alt)
+   (modeline-fg-alt comments)
+   (-modeline-pad
+    (when doom-monokai-pro-padded-modeline
+      (if (integerp doom-monokai-pro-padded-modeline)
+          doom-monokai-pro-padded-modeline
+        4))))
+
+  ;; --- faces ------------------------------
+  (
+   ;; I-search
+   (match                                        :foreground fg :background base3)
+   (isearch                                      :inherit 'match :box `(:line-width 2 :color ,yellow))
+   (lazy-highlight                               :inherit 'match)
+   (isearch-fail                                 :foreground red)
+
+   ;;;; deadgrep
+   (deadgrep-match-face                          :inherit 'match :box `(:line-width 2 :color ,yellow))
+
+   ;;;; swiper
+   (swiper-background-match-face-1               :inherit 'match :bold bold)
+   (swiper-background-match-face-2               :inherit 'match)
+   (swiper-background-match-face-3               :inherit 'match :foreground green)
+   (swiper-background-match-face-4               :inherit 'match :bold bold :foreground green)
+   (swiper-match-face-1                          :inherit 'isearch :bold bold)
+   (swiper-match-face-2                          :inherit 'isearch)
+   (swiper-match-face-3                          :inherit 'isearch :foreground green)
+   (swiper-match-face-4                          :inherit 'isearch :bold bold :foreground green)
+   (swiper-line-face                             :inherit 'hl-line)
+
+   ;;;; centaur-tabs
+   (centaur-tabs-selected :foreground yellow :background bg)
+   (centaur-tabs-unselected :foreground fg-alt :background bg-alt)
+   (centaur-tabs-selected-modified :foreground yellow :background bg)
+   (centaur-tabs-unselected-modified :foreground fg-alt :background bg-alt)
+   (centaur-tabs-active-bar-face :background yellow)
+   (centaur-tabs-modified-marker-selected :inherit 'centaur-tabs-selected :foreground base8)
+   (centaur-tabs-modified-marker-unselected :inherit 'centaur-tabs-unselected :foreground base8)
+
+   ;;;; doom-modeline
+   (doom-modeline-bar :background yellow)
+   (doom-modeline-buffer-path       :foreground blue :bold bold)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path)
+
+   ((line-number &override) :foreground base5)
+   ((line-number-current-line &override) :foreground yellow :bold bold)
+
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground violet)
+   (rainbow-delimiters-depth-2-face :foreground blue)
+   (rainbow-delimiters-depth-3-face :foreground orange)
+   (rainbow-delimiters-depth-4-face :foreground green)
+   (rainbow-delimiters-depth-5-face :foreground violet)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground blue)
+
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   
+   ;;;; treemacs
+   (treemacs-file-face :foreground fg-alt)
+
+   ;; tooltip
+   (tooltip :background base2 :foreground fg-alt))
+
+  ;; --- variables --------------------------
+  ;; ()
+  )
+
+(provide 'doom-monokai-pro-theme)
+;;; doom-monokai-pro-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-ristretto-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-ristretto-theme.el
new file mode 100644
index 0000000..3b35ea8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-ristretto-theme.el
@@ -0,0 +1,328 @@
+;;; doom-monokai-ristretto-theme.el --- Port of Monokai Ristretto -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 23, 2021 (#601)
+;; Author: minikN <https://github.com/minikN>
+;; Maintainer:
+;; Source: https://monokai.pro
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-monokai-ristretto-theme nil
+  "Options for doom-molokai."
+  :group 'doom-themes)
+
+(defcustom doom-monokai-ristretto-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-monokai-ristretto-theme
+  :type 'boolean)
+
+(defcustom doom-monokai-ristretto-comment-bg doom-monokai-ristretto-brighter-comments
+  "If non-nil, comments will have a subtle, darker background.
+Enhancing their legibility."
+  :group 'doom-monokai-ristretto-theme
+  :type 'boolean)
+
+(defcustom doom-monokai-ristretto-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-monokai-ristretto-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-monokai-ristretto
+  "A dark, vibrant theme inspired by Textmate's Monokai."
+  :family 'doom-molokai
+  :background-mode 'dark
+
+  ;; name        gui       256       16
+  ((bg         '("#2c2525" nil       nil            ))
+   (bg-alt     '("#201C1C" nil       nil            ))
+   (base0      '("#131313" "#121212" "black"        ))
+   (base1      '("#191515" "#1c1c1c" "black"        ))
+   (base2      '("#332c2c" "#262626" "brightblack"  ))
+   (base3      '("#403838" "#3a3a3a" "brightblack"  ))
+   (base4      '("#5b5353" "#585858" "brightblack"  ))
+   (base5      '("#615959" "#585858" "brightblack"  ))
+   (base6      '("#72696a" "#6c6c6c" "brightblack"  ))
+   (base7      '("#948a8b" "#8a8a8a" "brightblack"  ))
+   (base8      '("#bfb3b5" "#bcbcbc" "white"        ))
+   (fg         '("#fff1f3" "#ffffff" "brightwhite"  ))
+   (fg-alt     '("#c6c6c6" "#c6c6c6" "white"        ))
+
+   (grey       base4)
+   (red        '("#fd6883" "#ff69bf" "red"          ))
+   (orange     '("#f38d70" "#ff7f50" "brightred"    ))
+   (green      '("#adda78" "#90ee90" "green"        ))
+   (yellow     '("#f9cc6c" "#f0e68c" "yellow"       ))
+   (violet     '("#a8a9eb" "#9370db" "magenta"      ))
+   (cyan       '("#85dacc" "#40e0d0" "brightcyan"   ))
+   (magenta     cyan)
+   (blue        cyan)
+   (dark-blue   cyan)
+   (teal        cyan)
+   (dark-cyan   cyan)
+
+   ;; face categories
+   (highlight      yellow)
+   (vertical-bar   (doom-lighten bg 0.1))
+   (selection      base2)
+   (builtin        violet)
+   (comments       (if doom-monokai-ristretto-brighter-comments violet base6))
+   (doc-comments   (if doom-monokai-ristretto-brighter-comments (doom-lighten violet 0.1) (doom-lighten base6 0.25)))
+   (constants      violet)
+   (functions      green)
+   (keywords       magenta)
+   (methods        green)
+   (operators      red)
+   (type           cyan)
+   (strings        yellow)
+   (variables      fg)
+   (numbers        violet)
+   (region         base3)
+   (error          red)
+   (warning        orange)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-pad
+    (when doom-monokai-ristretto-padded-modeline
+      (if (integerp doom-monokai-ristretto-padded-modeline) doom-monokai-ristretto-padded-modeline 4)))
+
+
+   (org-quote `(,(doom-lighten (car bg) 0.05) "#1f1f1f")))
+
+
+  ;;;; Base theme face overrides
+  ((cursor                                       :background fg)
+   ;; I-search
+   (match                                        :foreground fg :background base3)
+   (isearch                                      :inherit 'match :box `(:line-width 2 :color ,yellow))
+   (lazy-highlight                               :inherit 'match)
+   (isearch-fail                                 :foreground red)
+   ;; current line
+   (hl-line                                      :background base3)
+   ;; line-numbers
+   ((line-number &override)                      :foreground base4 :distant-foreground nil)
+   ((line-number-current-line &override)         :foreground base7 :distant-foreground nil)
+   ;; mode-line
+   (mode-line                                    :background base3 :foreground fg
+                                                 :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,base3)))
+   (mode-line-inactive                           :background bg :foreground fg
+                                                 :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,bg)))
+
+   ;;;; centaur-tabs
+   (centaur-tabs-selected-modified               :inherit 'centaur-tabs-selected :foreground yellow)
+   (centaur-tabs-unselected-modified             :inherit 'centaur-tabs-unselected :foreground yellow)
+   (centaur-tabs-active-bar-face                 :background yellow)
+   (centaur-tabs-modified-marker-selected        :inherit 'centaur-tabs-selected :foreground fg)
+   (centaur-tabs-modified-marker-unselected      :inherit 'centaur-tabs-unselected :foreground fg)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property                     :foreground keywords)
+   ;;;; deadgrep
+   (deadgrep-match-face                          :inherit 'match :box `(:line-width 2 :color ,yellow))
+   ;;;; doom-modeline
+   (doom-modeline-bar                            :background yellow)
+   (doom-modeline-buffer-file                    :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path                    :inherit 'bold :foreground green)
+   (doom-modeline-buffer-project-root            :foreground green :weight 'bold)
+   (doom-modeline-buffer-modified                :inherit 'bold :foreground orange)
+   ;;;; ivy
+   (ivy-action                                   :foreground violet)
+   (ivy-confirm-face                             :foreground green)
+   (ivy-current-match                            :foreground bg :background yellow)
+   (ivy-cursor                                   :foreground bg :background fg)
+   (ivy-grep-info                                :foreground red)
+   (ivy-grep-line-number                         :foreground red)
+   (ivy-highlight-face                           :background base3 :foreground fg)
+   (ivy-match-required-face                      :foreground red)
+   (ivy-minibuffer-match-face-1                  :foreground yellow)
+   (ivy-minibuffer-match-face-2                  :foreground yellow :bold bold)
+   (ivy-minibuffer-match-face-3                  :foreground green)
+   (ivy-minibuffer-match-face-4                  :foreground green :bold bold)
+   (ivy-minibuffer-match-highlight               :foreground base6 :background base3)
+   (ivy-modified-buffer                          :foreground fg)
+   (ivy-modified-outside-buffer                  :foreground fg)
+   (ivy-org                                      :foreground base3 :italic italic)
+   (ivy-prompt-match                             :foreground bg :background yellow)
+   (ivy-remote                                   :foreground violet)
+   (ivy-separator                                :foreground base3)
+   (ivy-subdir                                   :foreground green)
+   (ivy-virtual                                  :foreground violet)
+   (ivy-yanked-word                              :foreground base6 :background base3)
+   ;;;; doom-emacs
+   (doom-dashboard-menu-title                    :foreground yellow)
+   ;;;; ediff <built-in>
+   (ediff-fine-diff-A                            :background (doom-blend red bg 0.3) :bold 'bold)
+   ;;;; evil
+   (evil-search-highlight-persist-highlight-face :background violet)
+   ;;;; evil-snipe
+   (evil-snipe-first-match-face                  :foreground base0 :background green)
+   (evil-snipe-matches-face                      :foreground green :underline t)
+   ;;;; flycheck
+   ((flycheck-error &override)                   :background base3)
+   ((flycheck-warning &override)                 :background base3)
+   ((flycheck-info &override)                    :background base3)
+   ;;;; helm
+   (helm-swoop-target-line-face                  :foreground red :inverse-video t)
+   ;;;; ivy
+   (ivy-current-match                            :background base3)
+   (ivy-minibuffer-match-face-1                  :background base2 :foreground base4)
+   ;;;; lsp-mode
+   (lsp-face-highlight-read                     :background base3)
+   (lsp-face-highlight-textual                  :background base3)
+   (lsp-face-highlight-write                    :background base4)
+   ;;;; lsp-ui
+   ;; HIGHLY recommended: (setq lsp-ui-peek-fontify 'always)
+   (lsp-ui-peek-header                          :foreground fg :background base5)
+   (lsp-ui-peek-footer                          :inherit 'lsp-ui-peek-header)
+   (lsp-ui-peek-selection                       :foreground bg :background yellow)
+   (lsp-ui-peek-list                            :background base3)
+   (lsp-ui-peek-peek                            :inherit 'lsp-ui-peek-list)
+   (lsp-ui-peek-highlight                       :inherit 'isearch)
+   (lsp-ui-peek-filename                        :foreground base8 :bold bold)
+   ;;;; markdown-mode
+   (markdown-blockquote-face                     :inherit 'italic :foreground dark-blue)
+   (markdown-list-face                           :foreground red)
+   (markdown-pre-face                            :foreground cyan)
+   (markdown-link-face                           :inherit 'bold :foreground blue)
+   ((markdown-code-face &override)               :background (doom-lighten base2 0.045))
+   ;;;; neotree
+   (neo-dir-link-face                            :foreground cyan)
+   (neo-expand-btn-face                          :foreground red)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face              :foreground red)
+   (rainbow-delimiters-depth-2-face              :foreground orange)
+   (rainbow-delimiters-depth-3-face              :foreground green)
+   (rainbow-delimiters-depth-4-face              :foreground cyan)
+   (rainbow-delimiters-depth-5-face              :foreground red)
+   (rainbow-delimiters-depth-6-face              :foreground orange)
+   (rainbow-delimiters-depth-7-face              :foreground green)
+   ;;;; outline <built-in>
+   ((outline-1 &override)                        :foreground yellow)
+   ((outline-2 &override)                        :foreground blue)
+   ((outline-3 &override)                        :foreground green)
+   ((outline-4 &override)                        :foreground fg)
+   ((outline-5 &override)                        :inherit 'outline-4)
+   ((outline-6 &override)                        :inherit 'outline-5)
+   ((outline-7 &override)                        :inherit 'outline-6)
+   ((outline-8 &override)                        :inherit 'outline-7)
+   ;;;; org <built-in>
+   (org-ellipsis                                 :foreground orange)
+   (org-tag                                      :foreground yellow :bold nil)
+   ((org-quote &override)                        :inherit 'italic :foreground base7 :background org-quote)
+   (org-todo                                     :foreground yellow :bold 'inherit)
+   (org-list-dt                                  :foreground yellow)
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;; php-mode
+   (php-php-tag                                  :foreground orange)
+   (php-function-name                            :foreground green)
+   (php-function-call                            :foreground green)
+   (php-string                                   :foreground yellow)
+   (php-keyword                                  :foreground blue)
+   (php-builtin                                  :foreground violet)
+   (php-method-call                              :foreground green)
+   (php-static-method-call                       :foreground green)
+   (php-variable-name                            :foreground fg)
+   (php-property-name                            :foreground fg)
+   (php-variable-sigil                           :foreground base8)
+   (php-operator                                 :foreground red)
+   (php-paamayim-nekudotayim                     :foreground red)
+   (php-type                                     :foreground blue :italic italic)
+   (php-class                                    :foreground red)
+   (php-constant                                 :foreground violet)
+   (php-constant-assign                          :foreground blue)
+   (php-magical-constant                         :foreground violet)
+   (php-$this                                    :foreground base8 :italic italic)
+   (php-$this-sigil                              :foreground base8 :italic italic)
+   (php-errorcontrol-op                          :foreground red)
+   (php-doc-annotation-tag                       :foreground blue)
+   (php-doc-variable-sigil                       :foreground base6)
+   (php-doc-$this                                :foreground base6)
+   (php-doc-$this-sigil                          :foreground base6)
+   (php-doc-class-name                           :foreground base6)
+   ;; As soon as https://github.com/emacs-php/php-mode/pull/606
+   ;; is merged these can be uncommented.
+   ;;(php-class-declaration-spec                   :foreground red)
+   ;;(php-class-modifier                           :foreground red)
+   ;;(php-namespace-declaration                    :foreground red)
+   ;;(php-import-declaration                       :foreground red)
+   ;;(php-method-modifier                          :foreground red :italic italic)
+   ;;(php-method-access                            :foreground red :italic italic)
+   ;;(php-method-static                            :foreground red :italic italic)
+   ;;(php-property-access                          :foreground red :italic italic)
+   ;;(php-property-const                           :foreground red :italic italic)
+   ;;(php-property-static                          :foreground red :italic italic)
+   ;;(php-block-delimiter                          :foreground base7)
+   ;;(php-flow-control-statement                   :foreground red)
+   ;;(php-block-statement                          :foreground red)
+   ;;(php-include-statement                        :foreground green)
+   ;;(php-constant-keyword                         :foreground violet)
+   ;;(php-number                                   :foreground violet)
+   ;;(php-string-quote                             :foreground base7)
+   ;;(php-type-operator                            :foreground red)
+   ;;(php-print-statement                          :foreground green)
+   ;;(php-return-type-colon                        :foreground red)
+   ;;(php-function-keyword                         :foreground blue :italic italic)
+   ;;;; show-paren-mode
+   (show-paren-match                             :bold bold :foreground green)
+   (show-paren-mismatch                          :bold bold :foreground red)
+   ;;;; swiper
+   (swiper-background-match-face-1               :inherit 'match :bold bold)
+   (swiper-background-match-face-2               :inherit 'match)
+   (swiper-background-match-face-3               :inherit 'match :foreground green)
+   (swiper-background-match-face-4               :inherit 'match :bold bold :foreground green)
+   (swiper-match-face-1                          :inherit 'isearch :bold bold)
+   (swiper-match-face-2                          :inherit 'isearch)
+   (swiper-match-face-3                          :inherit 'isearch :foreground green)
+   (swiper-match-face-4                          :inherit 'isearch :bold bold :foreground green)
+   (swiper-line-face                             :inherit 'hl-line)
+   ;;;; term <built-in>
+   (term-color-black                            :foreground base3)
+   (term-color-blue                             :foreground blue)
+   (term-color-cyan                             :foreground violet)
+   (term-color-green                            :foreground green)
+   (term-color-magenta                          :foreground red)
+   (term-color-red                              :foreground red)
+   (term-color-white                            :foreground fg)
+   (term-color-yellow                           :foreground yellow)
+   ;;;; treemacs
+   (treemacs-git-added-face                     :foreground green)
+   (treemacs-git-conflict-face                  :foreground red)
+   (treemacs-git-ignored-face                   :foreground base6)
+   (treemacs-git-modified-face                  :foreground violet)
+   (treemacs-git-renamed-face                   :foreground orange)
+   (treemacs-git-untracked-face                 :inherit 'treemacs-git-renamed-face)
+   (treemacs-on-failure-pulse-face              :foreground base0 :background red)
+   (treemacs-on-success-pulse-face              :foreground base0 :background green)
+   ;;;; web-mode
+   ;; html
+   (web-mode-html-tag-face                      :foreground red)
+   (web-mode-html-tag-bracket-face              :foreground base7)
+   (web-mode-html-attr-name-face                :foreground cyan :italic italic)
+   (web-mode-html-attr-equal-face               :inherit 'web-mode-html-tag-bracket-face)
+   ;; css
+   ;; Apparently web-mode has no face for values of css properties.
+   (web-mode-css-selector-face                  :foreground green)
+   (web-mode-css-property-name-face             :foreground base7))
+
+  ;;;; Base theme variable overrides
+  ;; ()
+  )
+
+;;; doom-monokai-ristretto-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-spectrum-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-spectrum-theme.el
new file mode 100644
index 0000000..d6fac80
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-monokai-spectrum-theme.el
@@ -0,0 +1,325 @@
+;;; doom-monokai-spectrum-theme.el --- port of Monokai Spectrum -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 23, 2021 (#601)
+;; Author: minikN <https://github.com/minikN>
+;; Maintainer:
+;; Source: https://monokai.pro
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-monokai-spectrum-theme nil
+  "Options for doom-molokai."
+  :group 'doom-themes)
+
+(defcustom doom-monokai-spectrum-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-monokai-spectrum-theme
+  :type 'boolean)
+
+(defcustom doom-monokai-spectrum-comment-bg doom-monokai-spectrum-brighter-comments
+  "If non-nil, comments will have a subtle, darker background.
+Enhancing their legibility."
+  :group 'doom-monokai-spectrum-theme
+  :type 'boolean)
+
+(defcustom doom-monokai-spectrum-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-monokai-spectrum-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-monokai-spectrum
+  "A dark, vibrant theme inspired by Textmate's Monokai."
+  :family 'doom-molokai
+  :background-mode 'dark
+
+  ;; name        gui       256       16
+  ((bg         '("#222222" nil       nil            ))
+   (bg-alt     '("#191919" nil       nil            ))
+   (base0      '("#131313" "#121212" "black"        ))
+   (base1      '("#191919" "#1c1c1c" "black"        ))
+   (base2      '("#2c2c2d" "#262626" "brightblack"  ))
+   (base3      '("#363537" "#3a3a3a" "brightblack"  ))
+   (base4      '("#525053" "#585858" "brightblack"  ))
+   (base5      '("#585659" "#585858" "brightblack"  ))
+   (base6      '("#69676c" "#6c6c6c" "brightblack"  ))
+   (base7      '("#8b888f" "#8a8a8a" "brightblack"  ))
+   (base8      '("#b6b2bc" "#bcbcbc" "white"        ))
+   (fg         '("#f7f1ff" "#ffffff" "brightwhite"  ))
+   (fg-alt     '("#c6c6c6" "#c6c6c6" "white"        ))
+
+   (grey       base4)
+   (red        '("#fc618d" "#ff69bf" "red"          ))
+   (orange     '("#fd9353" "#ff7f50" "brightred"    ))
+   (green      '("#7bd88f" "#90ee90" "green"        ))
+   (yellow     '("#fce566" "#f0e68c" "yellow"       ))
+   (violet     '("#948ae3" "#9370db" "magenta"      ))
+   (cyan       '("#5ad4e6" "#40e0d0" "brightcyan"   ))
+   (magenta     cyan)
+   (blue        cyan)
+   (dark-blue   cyan)
+   (teal        cyan)
+   (dark-cyan   cyan)
+
+   ;; face categories
+   (highlight      yellow)
+   (vertical-bar   (doom-lighten bg 0.1))
+   (selection      base2)
+   (builtin        violet)
+   (comments       (if doom-monokai-spectrum-brighter-comments violet base6))
+   (doc-comments   (if doom-monokai-spectrum-brighter-comments (doom-lighten violet 0.1) (doom-lighten base6 0.25)))
+   (constants      violet)
+   (functions      green)
+   (keywords       magenta)
+   (methods        green)
+   (operators      red)
+   (type           cyan)
+   (strings        yellow)
+   (variables      fg)
+   (numbers        violet)
+   (region         base3)
+   (error          red)
+   (warning        orange)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-pad
+    (when doom-monokai-spectrum-padded-modeline
+      (if (integerp doom-monokai-spectrum-padded-modeline) doom-monokai-spectrum-padded-modeline 4)))
+
+
+   (org-quote `(,(doom-lighten (car bg) 0.05) "#1f1f1f")))
+
+
+  ;;;; Base theme face overrides
+  ((cursor                                       :background fg)
+   ;; I-search
+   (match                                        :foreground fg :background base3)
+   (isearch                                      :inherit 'match :box `(:line-width 2 :color ,yellow))
+   (lazy-highlight                               :inherit 'match)
+   (isearch-fail                                 :foreground red)
+   ;; current line
+   (hl-line                                      :background base3)
+   ;; line-numbers
+   ((line-number &override)                      :foreground base4 :distant-foreground nil)
+   ((line-number-current-line &override)         :foreground base7 :distant-foreground nil)
+   ;; mode-line
+   (mode-line                                    :background base3 :foreground fg
+                                                 :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,base3)))
+   (mode-line-inactive                           :background bg :foreground fg
+                                                 :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,bg)))
+
+   ;;;; centaur-tabs
+   (centaur-tabs-selected-modified               :inherit 'centaur-tabs-selected :foreground yellow)
+   (centaur-tabs-unselected-modified             :inherit 'centaur-tabs-unselected :foreground yellow)
+   (centaur-tabs-active-bar-face                 :background yellow)
+   (centaur-tabs-modified-marker-selected        :inherit 'centaur-tabs-selected :foreground fg)
+   (centaur-tabs-modified-marker-unselected      :inherit 'centaur-tabs-unselected :foreground fg)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property                     :foreground keywords)
+   ;;;; deadgrep
+   (deadgrep-match-face                          :inherit 'match :box `(:line-width 2 :color ,yellow))
+   ;;;; doom-emacs
+   (doom-dashboard-menu-title                    :foreground yellow)
+   ;;;; doom-modeline
+   (doom-modeline-bar                            :background yellow)
+   (doom-modeline-buffer-file                    :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path                    :inherit 'bold :foreground green)
+   (doom-modeline-buffer-project-root            :foreground green :weight 'bold)
+   (doom-modeline-buffer-modified                :inherit 'bold :foreground orange)
+   ;;;; ediff <built-in>
+   (ediff-fine-diff-A                            :background (doom-blend red bg 0.3) :bold 'bold)
+   ;;;; evil
+   (evil-search-highlight-persist-highlight-face :background violet)
+   ;;;; evil-snipe
+   (evil-snipe-first-match-face                  :foreground base0 :background green)
+   (evil-snipe-matches-face                      :foreground green :underline t)
+   ;;;; flycheck
+   ((flycheck-error &override)                   :background base3)
+   ((flycheck-warning &override)                 :background base3)
+   ((flycheck-info &override)                    :background base3)
+   ;;;; helm
+   (helm-swoop-target-line-face                  :foreground red :inverse-video t)
+   ;;;; ivy
+   (ivy-action                                   :foreground violet)
+   (ivy-confirm-face                             :foreground green)
+   (ivy-current-match                            :background base3)
+   (ivy-cursor                                   :foreground bg :background fg)
+   (ivy-grep-info                                :foreground red)
+   (ivy-grep-line-number                         :foreground red)
+   (ivy-highlight-face                           :background base3 :foreground fg)
+   (ivy-match-required-face                      :foreground red)
+   (ivy-minibuffer-match-face-1                  :background base2 :foreground base4)
+   (ivy-minibuffer-match-face-2                  :foreground yellow :bold bold)
+   (ivy-minibuffer-match-face-3                  :foreground green)
+   (ivy-minibuffer-match-face-4                  :foreground green :bold bold)
+   (ivy-minibuffer-match-highlight               :foreground base6 :background base3)
+   (ivy-modified-buffer                          :foreground fg)
+   (ivy-modified-outside-buffer                  :foreground fg)
+   (ivy-org                                      :foreground base3 :italic italic)
+   (ivy-prompt-match                             :foreground bg :background yellow)
+   (ivy-remote                                   :foreground violet)
+   (ivy-separator                                :foreground base3)
+   (ivy-subdir                                   :foreground green)
+   (ivy-virtual                                  :foreground violet)
+   (ivy-yanked-word                              :foreground base6 :background base3)
+   ;;;; lsp-mode
+   (lsp-face-highlight-read                     :background base3)
+   (lsp-face-highlight-textual                  :background base3)
+   (lsp-face-highlight-write                    :background base4)
+   ;;;; lsp-ui
+   ;; HIGHLY recommended: (setq lsp-ui-peek-fontify 'always)
+   (lsp-ui-peek-header                          :foreground fg :background base5)
+   (lsp-ui-peek-footer                          :inherit 'lsp-ui-peek-header)
+   (lsp-ui-peek-selection                       :foreground bg :background yellow)
+   (lsp-ui-peek-list                            :background base3)
+   (lsp-ui-peek-peek                            :inherit 'lsp-ui-peek-list)
+   (lsp-ui-peek-highlight                       :inherit 'isearch)
+   (lsp-ui-peek-filename                        :foreground base8 :bold bold)
+   ;;;; markdown-mode
+   (markdown-blockquote-face                     :inherit 'italic :foreground dark-blue)
+   (markdown-list-face                           :foreground red)
+   (markdown-pre-face                            :foreground cyan)
+   (markdown-link-face                           :inherit 'bold :foreground blue)
+   ((markdown-code-face &override)               :background (doom-lighten base2 0.045))
+   ;;;; neotree
+   (neo-dir-link-face                            :foreground cyan)
+   (neo-expand-btn-face                          :foreground red)
+   ;;;; outline <built-in>
+   ((outline-1 &override)                        :foreground yellow)
+   ((outline-2 &override)                        :foreground blue)
+   ((outline-3 &override)                        :foreground green)
+   ((outline-4 &override)                        :foreground fg)
+   ((outline-5 &override)                        :inherit 'outline-4)
+   ((outline-6 &override)                        :inherit 'outline-5)
+   ((outline-7 &override)                        :inherit 'outline-6)
+   ((outline-8 &override)                        :inherit 'outline-7)
+   ;;;; org <built-in>
+   (org-ellipsis                                 :foreground orange)
+   (org-tag                                      :foreground yellow :bold nil)
+   ((org-quote &override)                        :inherit 'italic :foreground base7 :background org-quote)
+   (org-todo                                     :foreground yellow :bold 'inherit)
+   (org-list-dt                                  :foreground yellow)
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;; php-mode
+   (php-php-tag                                  :foreground orange)
+   (php-function-name                            :foreground green)
+   (php-function-call                            :foreground green)
+   (php-string                                   :foreground yellow)
+   (php-keyword                                  :foreground blue)
+   (php-builtin                                  :foreground violet)
+   (php-method-call                              :foreground green)
+   (php-static-method-call                       :foreground green)
+   (php-variable-name                            :foreground fg)
+   (php-property-name                            :foreground fg)
+   (php-variable-sigil                           :foreground base8)
+   (php-operator                                 :foreground red)
+   (php-paamayim-nekudotayim                     :foreground red)
+   (php-type                                     :foreground blue :italic italic)
+   (php-class                                    :foreground red)
+   (php-constant                                 :foreground violet)
+   (php-constant-assign                          :foreground blue)
+   (php-magical-constant                         :foreground violet)
+   (php-$this                                    :foreground base8 :italic italic)
+   (php-$this-sigil                              :foreground base8 :italic italic)
+   (php-errorcontrol-op                          :foreground red)
+   (php-doc-annotation-tag                       :foreground blue)
+   (php-doc-variable-sigil                       :foreground base6)
+   (php-doc-$this                                :foreground base6)
+   (php-doc-$this-sigil                          :foreground base6)
+   (php-doc-class-name                           :foreground base6)
+   ;; As soon as https://github.com/emacs-php/php-mode/pull/606
+   ;; is merged these can be uncommented.
+   ;;(php-class-declaration-spec                   :foreground red)
+   ;;(php-class-modifier                           :foreground red)
+   ;;(php-namespace-declaration                    :foreground red)
+   ;;(php-import-declaration                       :foreground red)
+   ;;(php-method-modifier                          :foreground red :italic italic)
+   ;;(php-method-access                            :foreground red :italic italic)
+   ;;(php-method-static                            :foreground red :italic italic)
+   ;;(php-property-access                          :foreground red :italic italic)
+   ;;(php-property-const                           :foreground red :italic italic)
+   ;;(php-property-static                          :foreground red :italic italic)
+   ;;(php-block-delimiter                          :foreground base7)
+   ;;(php-flow-control-statement                   :foreground red)
+   ;;(php-block-statement                          :foreground red)
+   ;;(php-include-statement                        :foreground green)
+   ;;(php-constant-keyword                         :foreground violet)
+   ;;(php-number                                   :foreground violet)
+   ;;(php-string-quote                             :foreground base7)
+   ;;(php-type-operator                            :foreground red)
+   ;;(php-print-statement                          :foreground green)
+   ;;(php-return-type-colon                        :foreground red)
+   ;;(php-function-keyword                         :foreground blue :italic italic)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face              :foreground red)
+   (rainbow-delimiters-depth-2-face              :foreground orange)
+   (rainbow-delimiters-depth-3-face              :foreground green)
+   (rainbow-delimiters-depth-4-face              :foreground cyan)
+   (rainbow-delimiters-depth-5-face              :foreground red)
+   (rainbow-delimiters-depth-6-face              :foreground orange)
+   (rainbow-delimiters-depth-7-face              :foreground green)
+   ;;;; show-paren-mode
+   (show-paren-match                             :bold bold :foreground green)
+   (show-paren-mismatch                          :bold bold :foreground red)
+   ;;;; swiper
+   (swiper-background-match-face-1               :inherit 'match :bold bold)
+   (swiper-background-match-face-2               :inherit 'match)
+   (swiper-background-match-face-3               :inherit 'match :foreground green)
+   (swiper-background-match-face-4               :inherit 'match :bold bold :foreground green)
+   (swiper-match-face-1                          :inherit 'isearch :bold bold)
+   (swiper-match-face-2                          :inherit 'isearch)
+   (swiper-match-face-3                          :inherit 'isearch :foreground green)
+   (swiper-match-face-4                          :inherit 'isearch :bold bold :foreground green)
+   (swiper-line-face                             :inherit 'hl-line)
+   ;;;; term <built-in>
+   (term-color-black                            :foreground base3)
+   (term-color-blue                             :foreground blue)
+   (term-color-cyan                             :foreground violet)
+   (term-color-green                            :foreground green)
+   (term-color-magenta                          :foreground red)
+   (term-color-red                              :foreground red)
+   (term-color-white                            :foreground fg)
+   (term-color-yellow                           :foreground yellow)
+   ;;;; treemacs
+   (treemacs-git-added-face                     :foreground green)
+   (treemacs-git-conflict-face                  :foreground red)
+   (treemacs-git-ignored-face                   :foreground base6)
+   (treemacs-git-modified-face                  :foreground violet)
+   (treemacs-git-renamed-face                   :foreground orange)
+   (treemacs-git-untracked-face                 :inherit 'treemacs-git-renamed-face)
+   (treemacs-on-failure-pulse-face              :foreground base0 :background red)
+   (treemacs-on-success-pulse-face              :foreground base0 :background green)
+   ;;;; web-mode
+   ;; html
+   (web-mode-html-tag-face                      :foreground red)
+   (web-mode-html-tag-bracket-face              :foreground base7)
+   (web-mode-html-attr-name-face                :foreground cyan :italic italic)
+   (web-mode-html-attr-equal-face               :inherit 'web-mode-html-tag-bracket-face)
+   ;; css
+   ;; Apparently web-mode has no face for values of css properties.
+   (web-mode-css-selector-face                  :foreground green)
+   (web-mode-css-property-name-face             :foreground base7))
+
+  ;;;; Base theme variable overrides
+  ;; ()
+  )
+
+;;; doom-monokai-spectrum-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-moonlight-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-moonlight-theme.el
new file mode 100644
index 0000000..8e642cb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-moonlight-theme.el
@@ -0,0 +1,268 @@
+;;; doom-moonlight-theme.el --- inspired by VS code's Moonlight -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: August 12, 2019 (741defec2c08)
+;; Author: Brettm12345 <https://github.com/Brettm12345>
+;; Maintainer:
+;; Source: https://github.com/atomiks/moonlight-vscode-theme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+;;
+(defgroup doom-moonlight-theme nil
+  "Options for the `doom-moonlight' theme."
+  :group 'doom-themes)
+
+(defcustom doom-moonlight-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-moonlight-theme
+  :type '(choice integer boolean))
+
+;;
+(def-doom-theme doom-moonlight
+  "A dark theme inspired by VS code's Moonlight"
+
+  ;; name        default   256       16
+  ((bg         '("#212337" "#212337"  "black"))
+   (bg-alt     '("#191a2a" "#191a2a" "black"))
+   (base0      '("#161a2a" "#161a2a" "black"))
+   (base1      '("#191a2a" "#191a2a" "brightblack"))
+   (base2      '("#1e2030" "#1e2030" "brightblack"))
+   (base3      '("#222436" "#222436" "brightblack"))
+   (base4      '("#2f334d" "#2f334d" "brightblack"))
+   (base5      '("#444a73" "#444a73" "brightblack"))
+   (base6      '("#828bb8" "#828bb8" "brightblack"))
+   (base7      '("#a9b8e8" "#a9b8e8" "brightblack"))
+   (base8      '("#b4c2f0" "#b4c2f0" "white"))
+   (indigo     '("#7a88cf" "#7a88cf" "brightblack"))
+   (region     '("#383e5c" "#383e5c" "brightblack"))
+   (fg         '("#c8d3f5" "#c8d3f5" "brightwhite"))
+   (fg-alt     '("#b4c2f0" "#b4c2f0" "white"))
+
+   (grey base5)
+
+   (dark-red      '("#ff5370" "#ff5370" "red"))
+   (red           '("#ff757f" "#ff757f" "red"))
+   (light-red     '("#ff98a4" "#ff98a4" "brightred"))
+   (orange        '("#ff995e" "#ff995e" "brightred"))
+   (green         '("#c3e88d" "#c3e88d" "green"))
+   (dark-teal     '("#4fd6be" "#4fd6be" "green"))
+   (teal          '("#77e0c6" "#77e0c6" "brightgreen"))
+   (light-teal    '("#7af8ca" "#7af8ca" "brightgreen"))
+   (yellow        '("#ffc777" "#ffc777" "brightyellow"))
+   (blue          '("#82aaff" "#82aaff" "brightblue"))
+   (dark-blue     '("#4976eb" "#4976eb" "brightblue"))
+   (light-blue    '("#50c4fa" "#50c4fa" "blue"))
+   (light-magenta '("#baacff" "#baacff" "brightmagenta"))
+   (magenta       '("#c099ff" "#c099ff" "brightmagenta"))
+   (violet        '("#f989d3" "#f989d3" "magenta"))
+   (light-pink    '("#fca7ea" "#fca7ea" "magenta"))
+   (pink          '("#f3c1ff" "#f3c1ff" "magenta"))
+   (cyan          '("#b4f9f8" "#b4f9f8" "brightcyan"))
+   (dark-cyan     '("#86e1fc" "#86e1fc" "cyan"))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   base0)
+   (line-highlight base4)
+   (selection      region)
+   (builtin        magenta)
+   (comments       indigo)
+   (doc-comments   (doom-lighten comments 0.25))
+   (constants      orange)
+   (functions      blue)
+   (keywords       magenta)
+   (methods        red)
+   (operators      dark-cyan)
+   (type           yellow)
+   (strings        green)
+   (variables      light-red)
+   (numbers        orange)
+   (region         region)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    blue)
+   (vc-added       teal)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (modeline-bg     (doom-darken base2 0.1))
+   (modeline-bg-alt (doom-darken bg 0.1))
+   (modeline-fg     base8)
+   (modeline-fg-alt comments)
+
+   (-modeline-pad
+    (when doom-moonlight-padded-modeline
+      (if (integerp doom-moonlight-padded-modeline) doom-moonlight-padded-modeline 4))))
+
+  ;;;; Base theme face overrides
+  ((font-lock-keyword-face :foreground keywords)
+   (font-lock-comment-face :foreground comments)
+   (font-lock-doc-face :foreground doc-comments)
+   (hl-line :background line-highlight)
+   (lazy-highlight :background base4 :foreground fg)
+   ((line-number &override) :foreground base5 :background (doom-darken bg 0.06))
+   ((line-number-current-line &override) :foreground fg :background line-highlight)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (tooltip :background base0 :foreground fg)
+
+   ;;;; all-the-icons
+   (all-the-icons-cyan       :foreground dark-cyan)
+   (all-the-icons-cyan-alt   :foreground dark-cyan)
+   (all-the-icons-dblue      :foreground (doom-darken blue 0.1))
+   (all-the-icons-dgreen     :foreground dark-teal)
+   (all-the-icons-dmaroon    :foreground magenta)
+   (all-the-icons-dorange    :foreground orange)
+   (all-the-icons-dpink      :foreground pink)
+   (all-the-icons-dpurple    :foreground magenta)
+   (all-the-icons-dred       :foreground dark-red)
+   (all-the-icons-dsilver    :foreground grey)
+   (all-the-icons-dyellow    :foreground orange)
+   (all-the-icons-green      :foreground teal)
+   (all-the-icons-lcyan      :foreground (doom-lighten dark-cyan 0.3))
+   (all-the-icons-lgreen     :foreground green)
+   (all-the-icons-lmaroon    :foreground light-magenta)
+   (all-the-icons-lorange    :foreground orange)
+   (all-the-icons-lpink      :foreground light-pink)
+   (all-the-icons-lpurple    :foreground light-magenta)
+   (all-the-icons-lred       :foreground light-red)
+   (all-the-icons-lsilver    :foreground (doom-lighten grey 0.4))
+   (all-the-icons-lyellow    :foreground (doom-lighten yellow 0.3))
+   (all-the-icons-orange     :foreground orange)
+   (all-the-icons-pink       :foreground pink)
+   (all-the-icons-purple     :foreground magenta)
+   (all-the-icons-purple-alt :foreground magenta)
+   (all-the-icons-red-alt    :foreground red)
+   (all-the-icons-silver     :foreground (doom-lighten grey 0.2))
+   ;;;; all-the-icons-dired
+   (all-the-icons-dired-dir-face :foreground indigo)
+   ;;;; company
+   (company-tooltip :inherit 'tooltip)
+   (company-tooltip-common :foreground highlight)
+   ;;;; company-box
+   (company-box-annotation :foreground base7)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-emacs
+   (doom-dashboard-menu-desc :foreground dark-cyan)
+   (doom-dashboard-menu-tile :foreground dark-teal)
+   ;;;; diredfl
+   (diredfl-date-time    :foreground blue)
+   (diredfl-file-name    :foreground base7)
+   (diredfl-file-suffix  :foreground base6)
+   (diredfl-symlink      :foreground dark-cyan)
+   ;;;; dired+
+   (diredp-number :foreground orange)
+   ;;;; dired-k
+   (dired-k-commited :foreground base4)
+   (dired-k-modified :foreground vc-modified)
+   (dired-k-ignored  :foreground cyan)
+   (dired-k-added    :foreground vc-added)
+   ;;;; doom-emacs
+   (+workspace-tab-selected-face :background region :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-buffer-file       :foreground base7)
+   (doom-modeline-icon-inactive     :foreground indigo)
+   (doom-modeline-evil-normal-state :foreground dark-cyan)
+   (doom-modeline-evil-insert-state :foreground blue)
+   (doom-modeline-project-dir       :foreground light-teal)
+   (doom-modeline-buffer-path       :foreground blue)
+   (doom-modeline-buffer-modified :inherit 'bold :foreground yellow)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path)
+   ;;;; ivy-posframe
+   (ivy-posframe :background base0)
+   (ivy-posframe-border :background base0)
+   ;;;; js2-mode
+   (js2-jsdoc-tag              :foreground magenta)
+   (js2-object-property        :foreground dark-teal)
+   (js2-object-property-access :foreground fg-alt)
+   (js2-function-param         :foreground pink)
+   (js2-jsdoc-type             :foreground base8)
+   (js2-jsdoc-value            :foreground cyan)
+   ;;;; linum
+   ((linum &inherit line-number))
+   ;;;; lsp-mode
+   (lsp-face-highlight-read :background region)
+   (lsp-face-highlight-textual :background region)
+   (lsp-face-highlight-write :background region)
+   (lsp-face-semhl-type-primative :foreground orange)
+   (lsp-face-semhl-method :foreground magenta)
+   ;;;; magit
+   (magit-filename :foreground teal)
+   ;;;; man <built-in>
+   (Man-overstrike :inherit 'bold :foreground magenta)
+   (Man-underline :inherit 'underline :foreground blue)
+   ;;;; markdown-mode
+   (markdown-header-face           :inherit 'bold :foreground yellow)
+   (markdown-header-delimiter-face :inherit 'markdown-header-face)
+   (markdown-metadata-key-face     :foreground magenta :inherit 'italic)
+   (markdown-list-face             :foreground red)
+   (markdown-url-face              :inherit 'underline :foreground orange)
+   (markdown-gfm-checkbox-face     :foreground blue)
+   (markdown-blockquote-face       :inherit 'italic :foreground fg)
+   (mmm-default-submode-face       :background base1)
+   ;;;; message <built-in>
+   (message-header-name       :foreground green)
+   (message-header-subject    :foreground highlight :weight 'bold)
+   (message-header-to         :foreground highlight :weight 'bold)
+   (message-header-cc         :inherit 'message-header-to :foreground (doom-darken highlight 0.15))
+   (message-header-other      :foreground violet)
+   (message-header-newsgroups :foreground yellow)
+   (message-header-xheader    :foreground doc-comments)
+   (message-separator         :foreground comments)
+   (message-mml               :foreground comments :slant 'italic)
+   (message-cited-text        :foreground magenta)
+   ;;;; nav-flash
+   (nav-flash-face :background region)
+   ;;;; nix-mode
+   (nix-attribute-face :foreground blue)
+   (nix-builtin-face :foreground dark-teal)
+   ;;;; org <built-in>
+   ((outline-1 &override) :foreground light-blue)
+   ((outline-2 &override) :foreground dark-cyan)
+   ((outline-3 &override) :foreground light-red)
+   ((outline-4 &override) :foreground blue)
+   ((outline-5 &override) :foreground magenta)
+   ((outline-6 &override) :foreground red)
+   ((outline-7 &override) :foreground violet)
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;; popup
+   (popup-face :inherit 'tooltip)
+   (popup-selection-face :inherit 'tooltip)
+   ;;;; pos-tip
+   (popup-tip-face :inherit 'tooltip)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground magenta)
+   (rainbow-delimiters-depth-2-face :foreground orange)
+   (rainbow-delimiters-depth-3-face :foreground light-red)
+   (rainbow-delimiters-depth-4-face :foreground cyan)
+   (rainbow-delimiters-depth-5-face :foreground violet)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground blue)
+   (rainbow-delimiters-depth-8-face :foreground teal)
+   (rainbow-delimiters-depth-9-face :foreground dark-cyan)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground violet)
+   (rjsx-attr :foreground yellow :slant 'italic :weight 'medium)
+   ;;;; treemacs
+   (treemacs-directory-face :foreground highlight)
+   (treemacs-git-modified-face :foreground highlight)
+   ;;;; which-key
+   (which-key-command-description-face :foreground fg)
+   (which-key-group-description-face :foreground magenta)
+   (which-key-local-map-description-face :foreground cyan)))
+
+;;; doom-moonlight-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nord-aurora-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nord-aurora-theme.el
new file mode 100644
index 0000000..c8b263a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nord-aurora-theme.el
@@ -0,0 +1,211 @@
+;;; doom-nord-aurora-theme.el --- a light variant of Nord -*- no-byte-compile: t; -*-
+;;
+;; Added: January 27, 2022 (#703)
+;; Author: MoskitoHero <https://github.com/MoskitoHero>
+;; Maintainer:
+;; Source: https://www.nordtheme.com
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-nord-aurora-theme nil
+  "Options for doom-themes"
+  :group 'doom-themes)
+
+(defcustom doom-nord-aurora-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-nord-aurora-theme
+  :type 'boolean)
+
+(defcustom doom-nord-aurora-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-nord-aurora-theme
+  :type 'boolean)
+
+(defcustom doom-nord-aurora-comment-bg doom-nord-aurora-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-nord-aurora-theme
+  :type 'boolean)
+
+(defcustom doom-nord-aurora-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-nord-aurora-theme
+  :type '(choice integer boolean))
+
+(eval-and-compile
+  (defcustom doom-nord-aurora-region-highlight t
+    "Determines the selection highlight style. Can be 'frost, 'snowstorm or t
+(default)."
+    :group 'doom-nord-aurora-theme
+    :type 'symbol))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-nord-aurora
+  "A dark theme inspired by Nord. Aurora flavour."
+  :family 'doom-nord
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  ((bg         '("#2E3440" nil       nil            ))
+   (bg-alt     '("#272C36" nil       nil            ))
+   (base0      '("#191C25" "black"   "black"        ))
+   (base1      '("#242832" "#1e1e1e" "brightblack"  ))
+   (base2      '("#2C333F" "#2e2e2e" "brightblack"  ))
+   (base3      '("#373E4C" "#262626" "brightblack"  ))
+   (base4      '("#434C5E" "#3f3f3f" "brightblack"  ))
+   (base5      '("#4C566A" "#525252" "brightblack"  ))
+   (base6      '("#9099AB" "#6b6b6b" "brightblack"  ))
+   (base7      '("#D8DEE9" "#979797" "brightblack"  ))
+   (base8      '("#F0F4FC" "#dfdfdf" "white"        ))
+   (fg         '("#ECEFF4" "#ECECEC" "white"        ))
+   (fg-alt     '("#E5E9F0" "#bfbfbf" "brightwhite"  ))
+
+   (grey       base4)
+   (red        '("#BF616A" "#ff6655" "red"          )) ;; Nord11
+   (orange     '("#D08770" "#dd8844" "brightred"    )) ;; Nord12
+   (green      '("#A3BE8C" "#99bb66" "green"        )) ;; Nord14
+   (teal       '("#8FBCBB" "#44b9b1" "brightgreen"  )) ;; Nord7
+   (yellow     '("#EBCB8B" "#ECBE7B" "yellow"       )) ;; Nord13
+   (blue       '("#81A1C1" "#51afef" "brightblue"   )) ;; Nord9
+   (dark-blue  '("#5E81AC" "#2257A0" "blue"         )) ;; Nord10
+   (magenta    '("#B48EAD" "#c678dd" "magenta"      )) ;; Nord15
+   (violet     '("#5D80AE" "#a9a1e1" "brightmagenta")) ;; ??
+   (cyan       '("#88C0D0" "#46D9FF" "brightcyan"   )) ;; Nord8
+   (dark-cyan  '("#507681" "#5699AF" "cyan"         )) ;; ??
+
+   ;; face categories -- required for all themes
+   (highlight      base6)
+   (vertical-bar   (doom-darken base1 0.2))
+   (selection      dark-blue)
+   (builtin        magenta)
+   (comments       (if doom-nord-aurora-brighter-comments cyan base6))
+   (doc-comments   (if doom-nord-aurora-brighter-comments (doom-lighten cyan 0.5) base7))
+   (constants      blue)
+   (functions      yellow)
+   (keywords       blue)
+   (methods        yellow)
+   (operators      cyan)
+   (type           green)
+   (strings        teal)
+   (variables      cyan)
+   (numbers        orange)
+   (region         (pcase doom-nord-aurora-region-highlight
+                     (`frost teal)
+                     (`snowstorm base7)
+                     (_ base4)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    blue)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-nord-aurora-brighter-modeline)
+   (-modeline-pad
+    (when doom-nord-aurora-padded-modeline
+      (if (integerp doom-nord-aurora-padded-modeline) doom-nord-aurora-padded-modeline 4)))
+
+   (region-fg
+    (when (memq doom-nord-aurora-region-highlight '(frost snowstorm))
+      base0))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base6)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-blend bg base5 0.2)
+      base1))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-blend bg base5 0.2)
+      `(,(doom-darken (car bg) 0.1) ,@(cdr base0))))
+   (modeline-bg-inactive   (doom-darken bg 0.1))
+   (modeline-bg-inactive-l `(,(car bg) ,@(cdr base1))))
+
+
+  ;; --- extra faces ------------------------
+  (((region &override) :foreground region-fg)
+
+   ((line-number &override) :foreground (doom-lighten 'base5 0.2))
+   ((line-number-current-line &override) :foreground base7)
+   ((paren-face-match &override) :foreground red :background base3 :weight 'ultra-bold)
+   ((paren-face-mismatch &override) :foreground base3 :background red :weight 'ultra-bold)
+   ((vimish-fold-overlay &override) :inherit 'font-lock-comment-face :background base3 :weight 'light)
+   ((vimish-fold-fringe &override)  :foreground teal)
+
+   (font-lock-comment-face
+    :foreground comments
+    :background (if doom-nord-aurora-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (font-lock-doc-face
+    :inherit 'font-lock-comment-face
+    :foreground doc-comments)
+
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis
+    :foreground (if -modeline-bright base8 highlight))
+
+   (doom-modeline-project-root-dir :foreground base6)
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+
+   ;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+
+   ;; highlight-symbol
+   (highlight-symbol-face :background (doom-lighten base4 0.1) :distant-foreground fg-alt)
+
+   ;; highlight-thing
+   (highlight-thing :background (doom-lighten base4 0.1) :distant-foreground fg-alt)
+
+   ;; ivy
+   ((ivy-current-match &override) :foreground region-fg :weight 'semi-bold)
+
+
+   ;; --- major-mode faces -------------------
+   ;; css-mode / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+
+   ;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+
+   ;; org-mode
+   (org-hide :foreground hidden)
+   (solaire-org-hide-face :foreground hidden))
+
+
+  ;; --- extra variables ---------------------
+  ()
+  )
+
+;;; doom-nord-aurora-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nord-light-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nord-light-theme.el
new file mode 100644
index 0000000..fe08270
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nord-light-theme.el
@@ -0,0 +1,199 @@
+;;; doom-nord-light-theme.el --- light variant of Nord -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: April 18, 2018 (#163)
+;; Author: fuxialexander <https://github.com/fuxialexander>
+;; Maintainer:
+;; Source: https://github.com/arcticicestudio/nord
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-nord-light-theme nil
+  "Options for the `doom-nord-light' theme."
+  :group 'doom-themes)
+
+(defcustom doom-nord-light-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-nord-light-theme
+  :type 'boolean)
+
+(defcustom doom-nord-light-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-nord-light-theme
+  :type 'boolean)
+
+(defcustom doom-nord-light-comment-bg doom-nord-light-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-nord-light-theme
+  :type 'boolean)
+
+(defcustom doom-nord-light-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-nord-light-theme
+  :type '(choice integer boolean))
+
+(defcustom doom-nord-light-region-highlight t
+  "Determines the selection highlight style. Can be 'frost, 'snowstorm or t
+(default)."
+  :group 'doom-nord-light-theme
+  :type 'symbol)
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-nord-light
+  "A light theme inspired by Nord-Light."
+  :family 'doom-nord
+  :background-mode 'light
+
+  ;; name        default   256       16
+  ((bg         '("#E5E9F0" nil       nil))
+   (bg-alt     '("#D8DEE9" nil       nil))
+   (base0      '("#F0F4FC" "black"   "black"))
+   (base1      '("#E3EAF5" "#1e1e1e" "brightblack"))
+   (base2      '("#D8DEE9" "#2e2e2e" "brightblack"))
+   (base3      '("#C2D0E7" "#262626" "brightblack"))
+   (base4      '("#B8C5DB" "#3f3f3f" "brightblack"))
+   (base5      '("#AEBACF" "#525252" "brightblack"))
+   (base6      '("#A1ACC0" "#6b6b6b" "brightblack"))
+   (base7      '("#60728C" "#979797" "brightblack"))
+   (base8      '("#485163" "#dfdfdf" "white"))
+   (fg         '("#3B4252" "#2d2d2d" "white"))
+   (fg-alt     '("#2E3440" "#bfbfbf" "brightwhite"))
+
+   (grey base4)
+   (red       '("#99324B" "#ff6655" "red"))
+   (orange    '("#AC4426" "#dd8844" "brightred"))
+   (green     '("#4F894C" "#99bb66" "green"))
+   (teal      '("#29838D" "#44b9b1" "brightgreen"))
+   (yellow    '("#9A7500" "#ECBE7B" "yellow"))
+   (blue      '("#3B6EA8" "#51afef" "brightblue"))
+   (dark-blue '("#5272AF" "#2257A0" "blue"))
+   (magenta   '("#97365B" "#c678dd" "magenta"))
+   (violet    '("#842879" "#a9a1e1" "brightmagenta"))
+   (cyan      '("#398EAC" "#46D9FF" "brightcyan"))
+   (dark-cyan '("#2C7088" "#5699AF" "cyan"))
+
+   ;; face categories -- required for all themes
+   (highlight (doom-blend blue bg 0.8))
+   (vertical-bar (doom-darken bg 0.15))
+   (selection (doom-blend blue bg 0.5))
+   (builtin teal)
+   (comments (if doom-nord-light-brighter-comments dark-cyan (doom-darken base5 0.2)))
+   (doc-comments (doom-darken (if doom-nord-light-brighter-comments dark-cyan base5) 0.25))
+   (constants magenta)
+   (functions teal)
+   (keywords blue)
+   (methods teal)
+   (operators blue)
+   (type yellow)
+   (strings green)
+   (variables violet)
+   (numbers magenta)
+   (region (pcase doom-nord-light-region-highlight
+             ((\` frost) (doom-lighten teal 0.5))
+             ((\` snowstorm) base0)
+             (_ base4)))
+   (error red)
+   (warning yellow)
+   (success green)
+   (vc-modified orange)
+   (vc-added green)
+   (vc-deleted red)
+
+   ;; custom categories
+   (hidden `(,(car bg) "black" "black"))
+   (-modeline-bright doom-nord-light-brighter-modeline)
+   (-modeline-pad
+    (when doom-nord-light-padded-modeline
+      (if (integerp doom-nord-light-padded-modeline) doom-nord-light-padded-modeline 4)))
+
+   (modeline-fg 'unspecified)
+   (modeline-fg-alt base6)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-blend bg blue 0.7)
+      `(,(doom-darken (car bg) 0.02) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-blend bg blue 0.7)
+      `(,(doom-darken (car bg) 0.03) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(car bg) ,@(cdr base1)))
+   (modeline-bg-inactive-l (doom-darken bg 0.01)))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-nord-light-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   ((line-number &override) :foreground (doom-lighten 'base5 0.2))
+   ((line-number-current-line &override) :foreground base7)
+   (internal-border :foreground (doom-blend blue bg 0.2) :background (doom-blend blue bg 0.2))
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis
+    :foreground (if -modeline-bright base8 highlight))
+   ((region &override)
+    :foreground (if (memq doom-nord-light-region-highlight '(frost snowstorm))
+                    bg-alt
+                  'unspecified))
+
+   ;;;; css-mode <built-in> / scss-mode <built-in>
+   (css-proprietary-property :foreground orange)
+   (css-property :foreground green)
+   (css-selector :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-project-root-dir :foreground base6)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; ivy
+   (ivy-minibuffer-match-face-1 :foreground (doom-blend fg bg 0.5) :weight 'light)
+   (ivy-virtual :foreground (doom-blend blue bg 0.8))
+   ;;;; ivy-posframe
+   (ivy-posframe :background (doom-blend blue bg 0.2))
+   ;;;; magit
+   (magit-diff-hunk-heading-highlight :foreground bg :background blue :weight 'bold)
+   (magit-diff-hunk-heading :foreground bg :background (doom-blend blue bg 0.3))
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; mic-paren
+   ((paren-face-match &override) :foreground red :background base3 :weight 'ultra-bold)
+   ((paren-face-mismatch &override) :foreground base3 :background red :weight 'ultra-bold)
+   ;;;; nav-flash
+   (nav-flash-face :background region :foreground base8 :weight 'bold)
+   ;;;; org <built-in>
+   (org-hide :foreground hidden)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; vimish-fold
+   ((vimish-fold-fringe &override) :foreground teal)
+   ((vimish-fold-overlay &override) :inherit 'font-lock-comment-face :background base3 :weight 'light))
+
+  ;;;; Base theme variable overrides-
+  ()
+  )
+
+;;; doom-nord-light-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nord-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nord-theme.el
new file mode 100644
index 0000000..2938e46
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nord-theme.el
@@ -0,0 +1,197 @@
+;;; doom-nord-theme.el --- dark variant of Nord -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: March 8, 2018 (c503ebdacac1)
+;; Author: fuxialexander <https://github.com/fuxialexander>
+;; Maintainer:
+;; Source: https://www.nordtheme.com
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-nord-theme nil
+  "Options for the `doom-nord' theme."
+  :group 'doom-themes)
+
+(defcustom doom-nord-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-nord-theme
+  :type 'boolean)
+
+(defcustom doom-nord-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-nord-theme
+  :type 'boolean)
+
+(defcustom doom-nord-comment-bg doom-nord-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-nord-theme
+  :type 'boolean)
+
+(defcustom doom-nord-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-nord-theme
+  :type '(choice integer boolean))
+
+(eval-and-compile
+  (defcustom doom-nord-region-highlight t
+    "Determines the selection highlight style. Can be 'frost, 'snowstorm or t
+(default)."
+    :group 'doom-nord-theme
+    :type 'symbol))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-nord
+  "A dark theme inspired by Nord."
+  :family 'doom-nord
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  ((bg         '("#2E3440" nil       nil            ))
+   (bg-alt     '("#272C36" nil       nil            ))
+   (base0      '("#191C25" "black"   "black"        ))
+   (base1      '("#242832" "#1e1e1e" "brightblack"  ))
+   (base2      '("#2C333F" "#2e2e2e" "brightblack"  ))
+   (base3      '("#373E4C" "#262626" "brightblack"  ))
+   (base4      '("#434C5E" "#3f3f3f" "brightblack"  ))
+   (base5      '("#4C566A" "#525252" "brightblack"  ))
+   (base6      '("#9099AB" "#6b6b6b" "brightblack"  ))
+   (base7      '("#D8DEE9" "#979797" "brightblack"  ))
+   (base8      '("#F0F4FC" "#dfdfdf" "white"        ))
+   (fg         '("#ECEFF4" "#ECECEC" "white"        ))
+   (fg-alt     '("#E5E9F0" "#bfbfbf" "brightwhite"  ))
+
+   (grey       base4)
+   (red        '("#BF616A" "#ff6655" "red"          )) ;; Nord11
+   (orange     '("#D08770" "#dd8844" "brightred"    )) ;; Nord12
+   (green      '("#A3BE8C" "#99bb66" "green"        )) ;; Nord14
+   (teal       '("#8FBCBB" "#44b9b1" "brightgreen"  )) ;; Nord7
+   (yellow     '("#EBCB8B" "#ECBE7B" "yellow"       )) ;; Nord13
+   (blue       '("#81A1C1" "#51afef" "brightblue"   )) ;; Nord9
+   (dark-blue  '("#5E81AC" "#2257A0" "blue"         )) ;; Nord10
+   (magenta    '("#B48EAD" "#c678dd" "magenta"      )) ;; Nord15
+   (violet     '("#5D80AE" "#a9a1e1" "brightmagenta")) ;; ??
+   (cyan       '("#88C0D0" "#46D9FF" "brightcyan"   )) ;; Nord8
+   (dark-cyan  '("#507681" "#5699AF" "cyan"         )) ;; ??
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.2))
+   (selection      dark-blue)
+   (builtin        blue)
+   (comments       (if doom-nord-brighter-comments dark-cyan (doom-lighten base5 0.2)))
+   (doc-comments   (doom-lighten (if doom-nord-brighter-comments dark-cyan base5) 0.25))
+   (constants      blue)
+   (functions      cyan)
+   (keywords       blue)
+   (methods        cyan)
+   (operators      blue)
+   (type           teal)
+   (strings        green)
+   (variables      base7)
+   (numbers        magenta)
+   (region         (pcase doom-nord-region-highlight
+                     (`frost teal)
+                     (`snowstorm base7)
+                     (_ base4)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-nord-brighter-modeline)
+   (-modeline-pad
+    (when doom-nord-padded-modeline
+      (if (integerp doom-nord-padded-modeline) doom-nord-padded-modeline 4)))
+
+   (region-fg
+    (when (memq doom-nord-region-highlight '(frost snowstorm))
+      base0))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base6)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-blend bg base5 0.2)
+      `(,(doom-darken (car bg) 0.1) ,@(cdr base2))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-blend bg base5 0.2)
+      base1))
+   (modeline-bg-inactive   `(,(doom-darken (car bg) 0.1)   ,@(cdr base2)))
+   (modeline-bg-inactive-l `(,(doom-darken (car bg) 0.025) ,@(cdr base2))))
+
+
+  ;;;; Base theme face overrides
+  ((fringe :foreground teal)
+   ((line-number &override) :foreground (doom-lighten 'base5 0.2))
+   ((line-number-current-line &override) :foreground base7)
+   ((font-lock-comment-face &override)
+    :background (if doom-nord-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   ((tab-line &override) :background modeline-bg :foreground blue)
+   ((tab-line-tab-inactive &override) :foreground dark-blue)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   ((region &override) :foreground (or region-fg 'unspecified))
+
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-project-root-dir :foreground base6)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; highlight-symbol
+   (highlight-symbol-face :background (doom-lighten base4 0.1) :distant-foreground fg-alt)
+   ;;;; highlight-thing
+   (highlight-thing :background (doom-lighten base4 0.1) :distant-foreground fg-alt)
+   ;;;; ivy
+   ((ivy-current-match &override) :foreground (or region-fg 'unspecified) :weight 'semi-bold)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; mic-paren
+   ((paren-face-match &override) :foreground bg :background teal :weight 'ultra-bold)
+   ((paren-face-mismatch &override) :foreground base7 :background red :weight 'ultra-bold)
+   ;;;; org <built-in>
+   (org-hide :foreground hidden)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; vimish-fold
+   ((vimish-fold-overlay &override) :inherit 'font-lock-comment-face :background base3 :weight 'light)
+   ((vimish-fold-fringe &override)  :foreground teal))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-nord-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nova-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nova-theme.el
new file mode 100644
index 0000000..808628d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-nova-theme.el
@@ -0,0 +1,163 @@
+;;; doom-nova-theme.el --- inspired by Trevord Miller's Nova -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: June 6, 2017 (#64)
+;; Author: bigardone <https://github.com/bigardone>
+;; Maintainer:
+;; Source: https://github.com/trevordmiller/nova-colors
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-nova-theme nil
+  "Options for the `doom-nova' theme."
+  :group 'doom-themes)
+
+(defcustom doom-nova-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-nova-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-nova
+  "A light theme inspired by Trevord Miller's Nova. See
+<https://trevordmiller.com/projects/nova>."
+
+  ;; name        default   256       16
+  ((bg         '("#3c4c55" nil       nil           ))
+   (fg         '("#c5d4dd" "#c5c6c6" "white"       ))
+
+   (bg-alt     '("#44545d" "#445566" "black"       ))
+   (fg-alt     '("#c5c8c6" "#c5c8c6" "white"       ))
+
+   (base0      '("#0d0f11" "#0d0f11" "black"       ))
+   (base1      '("#1e272c" "#1b1b1b" "black"       ))
+   (base2      '("#212122" "#1e1e1e" "black"       ))
+   (base3      '("#2f3f48" "#292929" "brightblack" ))
+   (base4      '("#3c4c55" "#3f3f3f" "brightblack" ))
+   (base5      '("#556873" "#525252" "brightblack" ))
+   (base6      '("#6A7D89" "#6b6b6b" "brightblack" ))
+   (base7      '("#899BA6" "#878797" "brightblack" ))
+   (base8      '("#e6eef3" "#efefef" "brightwhite" ))
+
+   (grey       base7)
+   (red        '("#DF8C8C"))
+   (orange     '("#F2C38F"))
+   (yellow     '("#DADA93"))
+   (green      '("#A8CE93"))
+   (blue       '("#83AFE5"))
+   (dark-blue  '("#759DCE"))
+   (teal       '("#95BEBC"))
+   (magenta    '("#D18EC2"))
+   (violet     '("#9A93E1"))
+   (cyan       '("#7FC1CA"))
+   (dark-cyan  '("#659AA1"))
+
+   ;; face categories
+   (highlight      cyan)
+   (vertical-bar   (doom-lighten bg 0.1))
+   (selection      highlight)
+   (builtin        blue)
+   (comments       grey)
+   (doc-comments   (doom-lighten grey 0.1))
+   (constants      highlight)
+   (functions      blue)
+   (keywords       violet)
+   (methods        blue)
+   (operators      green)
+   (type           green)
+   (strings        cyan)
+   (variables      red)
+   (numbers        highlight)
+   (region         selection)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    violet)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (current-line    base5) ; (doom-lighten bg-alt 0.04)
+   (modeline-fg     blue)
+   (modeline-bg     base3)
+   (modeline-fg-alt (doom-lighten bg-alt 0.4))
+   (modeline-bg-alt bg-alt)
+
+   (-modeline-pad
+    (when doom-nova-padded-modeline
+      (if (integerp doom-nova-padded-modeline)
+          doom-nova-padded-modeline
+        4))))
+
+
+  ;;;; Base theme face overrides
+  ((fringe :inherit 'default :foreground "#6c808d")
+   ((line-number &override) :foreground "#6c808d")
+   ((line-number-current-line &override) :foreground highlight :weight 'bold)
+   (hl-line :background current-line)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (region :background (doom-lighten current-line 0.1) :foreground nil :distant-foreground nil :weight 'bold)
+
+   ;;;; company
+   (company-tooltip            :inherit 'tooltip :background (doom-lighten bg 0.075))
+   (company-tooltip-selection  :background base5 :foreground base8 :weight 'bold)
+   (company-tooltip-common     :foreground cyan :distant-foreground cyan :weight 'bold)
+   (company-tooltip-search     :background highlight :foreground base1 :weight 'ultra-bold)
+   (company-tooltip-search-selection :background highlight :foreground base1 :weight 'ultra-bold)
+   (company-tooltip-mouse      :background base6 :foreground bg :distant-foreground fg)
+   ;;;; doom-modeline
+   (doom-modeline-buffer-path       :foreground violet :bold nil)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path)
+   (doom-modeline-bar :inherit 'mode-line-highlight)
+   ;;;; ediff <built-in>
+   (ediff-fine-diff-A    :background base3 :weight 'bold)
+   (ediff-current-diff-A :inherit 'hl-line)
+   (ediff-even-diff-A    :background base3)
+   ;;;; helm
+   (helm-selection :background current-line :weight 'bold)
+   (helm-match     :foreground highlight)
+   (helm-source-header :foreground base0 :background base6)
+   ;;;; highlight-thing highlight-symbol
+   (highlight-symbol-face :background (doom-lighten current-line 0.1) :distant-foreground fg-alt)
+   ;;;; highlight-thing
+   (highlight-thing :background (doom-lighten current-line 0.1) :distant-foreground fg-alt)
+   ;;;; mic-paren
+   ((paren-face-match &override)    :foreground red :background (doom-darken violet 0.4))
+   ((paren-face-mismatch &override) :foreground (doom-darken red 0.4) :background cyan)
+   ;;;; ivy
+   (ivy-current-match :background current-line :distant-foreground base0)
+   ;;;; org <built-in>
+   (org-headline-done :foreground base7)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground violet)
+   (rainbow-delimiters-depth-2-face :foreground blue)
+   (rainbow-delimiters-depth-3-face :foreground orange)
+   (rainbow-delimiters-depth-4-face :foreground green)
+   (rainbow-delimiters-depth-5-face :foreground magenta)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground teal)
+   ;;;; solaire-mode
+   (solaire-hl-line-face :inherit 'hl-line)
+   ;;;; vertico
+   (vertico-current :background base5))
+
+  ;; --- variables --------------------------
+  ;; ()
+  )
+
+;;; doom-nova-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-oceanic-next-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-oceanic-next-theme.el
new file mode 100644
index 0000000..f2f2907
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-oceanic-next-theme.el
@@ -0,0 +1,186 @@
+;;; doom-oceanic-next-theme.el --- inspired by Oceanic Next -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: October 11, 2019 (#337)
+;; Author: juanwolf <https://github.com/juanwolf>
+;; Maintainer:
+;; Source: https://github.com/voronianski/oceanic-next-color-scheme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-oceanic-next-theme nil
+  "Options for the `doom-oceanic-next' theme."
+  :group 'doom-themes)
+
+(defcustom doom-oceanic-next-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-oceanic-next-theme
+  :type 'boolean)
+
+(defcustom doom-oceanic-next-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-oceanic-next-theme
+  :type 'boolean)
+
+(defcustom doom-oceanic-next-comment-bg doom-oceanic-next-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-oceanic-next-theme
+  :type 'boolean)
+
+(defcustom doom-oceanic-next-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-oceanic-next-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-oceanic-next
+  "A dark theme inspired by Oceanic Next "
+
+  ;; name        default   256       16
+  ((bg         '("#1B2B34" nil       nil            ))
+   (bg-alt     '("#14232D" nil       nil            ))
+   (base0      '("#1B2B34" "black"   "black"        ))
+   (base1      '("#343D46" "#1e1e1e" "brightblack"  ))
+   (base2      '("#4F5B66" "#2e2e2e" "brightblack"  ))
+   (base3      '("#65737E" "#262626" "brightblack"  ))
+   (base4      '("#A7ADBA" "#3f3f3f" "brightblack"  ))
+   (base5      '("#C0C5CE" "#525252" "brightblack"  ))
+   (base6      '("#CDD3DE" "#6b6b6b" "brightblack"  ))
+   (base7      '("#D8DEE9" "#979797" "white"        ))
+   (base8      base7)
+   (fg-alt     base6)
+   (fg         base8)
+
+   (grey       base4)
+   (red        '("#EC5f67" "#EC5f67" "red"          ))
+   (orange     '("#F99157" "#F99157" "brightred"    ))
+   (green      '("#99C794" "#99bb66" "green"        ))
+   (teal       '("#5FB3B3" "#44b9b1" "brightgreen"  ))
+   (yellow     '("#FAC863" "#ECBE7B" "yellow"       ))
+   (blue       '("#6699CC" "#51afef" "brightblue"   ))
+   (dark-blue  blue)
+   (magenta    '("#E27E8D" "#c678dd" "magenta"      ))
+   (violet     '("#C594C5" "#a9a1e1" "brightmagenta"))
+   (cyan       teal)
+   (dark-cyan  cyan)
+
+   ;; face categories -- required for all themes
+   (highlight      yellow)
+   (vertical-bar   (doom-darken base1 0.5))
+   (selection      base2)
+   (builtin        red)
+   (comments       (if doom-oceanic-next-brighter-comments dark-cyan base3))
+   (doc-comments   (doom-lighten (if doom-oceanic-next-brighter-comments dark-cyan base3) 0.25))
+   (constants      orange)
+   (functions      blue)
+   (keywords       violet)
+   (methods        blue)
+   (operators      teal)
+   (type           yellow)
+   (strings        green)
+   (variables      orange)
+   (numbers        orange)
+   (region         base2)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-oceanic-next-brighter-modeline)
+   (-modeline-pad
+    (when doom-oceanic-next-padded-modeline
+      (if (integerp doom-oceanic-next-padded-modeline) doom-oceanic-next-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      `(,(doom-darken (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken blue 0.475)
+      `(,(doom-darken (car bg-alt) 0.15) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-l `(,(doom-darken (car bg-alt) 0.1) ,@(cdr bg-alt))))
+
+
+  ;;;; Base theme face overrides
+  (
+
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   ((font-lock-comment-face &override)
+    :background (if doom-oceanic-next-comment-bg (doom-lighten bg 0.05) 'unspecified))
+
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   
+   ;;;; VCS/magit readability
+   (diff-refine-removed :foreground vc-deleted :background bg :inverse-video t)
+   (diff-refine-added :foreground vc-added :background bg :inverse-video t)
+
+   (magit-diff-removed-highlight :foreground vc-deleted :background base1 :weight 'bold)
+
+   (magit-diff-base :foreground vc-modified :background bg-alt)
+   (magit-diff-removed :foreground vc-deleted :background base1)
+   (magit-diff-added :foreground vc-added :background base1)
+
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground blue)
+   ((markdown-code-face &override) :background (doom-lighten bg 0.05))
+   ;;;; ivy
+   (ivy-current-match :background base2 :distant-foreground base0 :weight 'bold)
+   ;;;; org <built-in>
+   ((org-block &override) :background bg-alt)
+   ((org-block-begin-line &override) :background bg-alt)
+   ((org-block-end-line &override) :background bg-alt)
+   (org-hide :foreground hidden)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l))))
+
+  ;;;; Base theme variable overrides-
+  ()
+  )
+
+;;; doom-oceanic-next-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-oksolar-dark-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-oksolar-dark-theme.el
new file mode 100644
index 0000000..06d3072
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-oksolar-dark-theme.el
@@ -0,0 +1,209 @@
+;;; doom-oksolar-dark-theme.el --- an OKLab variant of Solarized dark -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added:
+;; Author: logc <https://github.com/logc>
+;; Maintainer:
+;; Source: https://meat.io/oksolar.json
+;; Source: https://meat.io/oksolar
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-oksolar-dark-theme nil
+  "Options for the `doom-oksolar-dark' theme."
+  :group 'doom-themes)
+
+(defcustom doom-oksolar-dark-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-oksolar-dark-theme
+  :type 'boolean)
+
+(defcustom doom-oksolar-dark-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-oksolar-dark-theme
+  :type 'boolean)
+
+(defcustom doom-oksolar-dark-brighter-text nil
+  "If non-nil, default text will be brighter."
+  :group 'doom-oksolar-dark-theme
+  :type 'boolean)
+
+(defcustom doom-oksolar-dark-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-oksolar-dark-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-oksolar-dark
+  "A dark theme inspired by OKSolar."
+  :family 'doom-oksolar
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  ((bg         '("#002D38" "#002D38" "brightblack" ))
+   (fg         (if doom-oksolar-dark-brighter-text
+                   '("#BBBBBB" "#BBBBBB" "brightwhite")
+                 '("#98A8A8" "#98A8A8" "brightwhite")))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#093946" "#093946" "white"       ))
+   (fg-alt     '("#8FAAAB" "#8FAAAB" "white"       ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#002D38" "#002D38" "black"       ))
+   (base1      '("#093946" "#093946" "brightblack" ))
+   ;; NOTE: base 2 never used, left as-is in Solarized
+   (base2      '("#00212C" "#00212C" "brightblack" ))
+   (base3      '("#5B7279" "#5B7279" "brightblack" ))
+   (base4      '("#657377" "#657377" "brightblack" ))
+   (base5      '("#98A8A8" "#98A8A8" "brightblack" ))
+   (base6      '("#8FAAAB" "#8FAAAB" "brightblack" ))
+   (base7      '("#F1E9D2" "#F1E9D2" "brightblack" ))
+   (base8      '("#FBF7EF" "#FBF7EF" "white" ))
+
+   (grey       base4)
+   (red        '("#F23749" "#ff6655" "red"          ))
+   (orange     '("#D56500" "#dd8844" "brightred"    ))
+   (green      '("#819500" "#99bb66" "green"        ))
+   (teal       '("#35A69C" "#33aa99" "brightgreen"  ))
+   (yellow     '("#AC8300" "#ECBE7B" "yellow"       ))
+   (blue       '("#2B90D8" "#51afef" "brightblue"   ))
+   (dark-blue  '("#3F88AD" "#2257A0" "blue"         ))
+   (magenta    '("#DD459D" "#c678dd" "magenta"      ))
+   (violet     '("#7D80D1" "#a9a1e1" "brightmagenta"))
+   (cyan       '("#259D94" "#46D9FF" "brightcyan"   ))
+   (dark-cyan  '("#204052" "#5699AF" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.5))
+   (selection      dark-blue)
+   (builtin        blue)
+   (comments       (if doom-oksolar-dark-brighter-comments blue base5))
+   (doc-comments   teal)
+   (constants      magenta)
+   (functions      blue)
+   (keywords       green)
+   (methods        cyan)
+   (operators      orange)
+   (type           yellow)
+   (strings        cyan)
+   (variables      violet)
+   (numbers        magenta)
+   (region         (doom-lighten bg-alt 0.15))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    yellow)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (-modeline-bright doom-oksolar-dark-brighter-modeline)
+   (-modeline-pad
+    (when doom-oksolar-dark-padded-modeline
+      (if (integerp doom-oksolar-dark-padded-modeline) doom-oksolar-dark-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.1) ,@(cdr base0))))
+   (modeline-bg-alt
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.15) ,@(cdr base0))))
+   (modeline-bg-inactive     `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-alt (doom-darken bg 0.1)))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-oksolar-dark-brighter-comments (doom-lighten bg 0.05) 'unspecified))
+   ((font-lock-keyword-face &override) :weight 'bold)
+   ((font-lock-constant-face &override) :weight 'bold)
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; centaur-tabs
+   (centaur-tabs-active-bar-face :background blue)
+   (centaur-tabs-modified-marker-selected
+    :inherit 'centaur-tabs-selected :foreground blue)
+   (centaur-tabs-modified-marker-unselected
+    :inherit 'centaur-tabs-unselected :foreground blue)
+   ;;;; company
+   (company-tooltip-selection     :background dark-cyan)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background blue)
+   (doom-modeline-evil-emacs-state  :foreground magenta)
+   (doom-modeline-evil-insert-state :foreground blue)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; helm
+   (helm-selection :inherit 'bold
+                   :background selection
+                   :distant-foreground bg
+                   :extend t)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   (markdown-url-face    :foreground teal :weight 'normal)
+   (markdown-reference-face :foreground base6)
+   ((markdown-bold-face &override)   :foreground fg)
+   ((markdown-italic-face &override) :foreground fg-alt)
+   ((markdown-code-face &override)   :background bg-alt)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground blue)
+   ((outline-2 &override) :foreground green)
+   ((outline-3 &override) :foreground teal)
+   ((outline-4 &override) :foreground (doom-darken blue 0.2))
+   ((outline-5 &override) :foreground (doom-darken green 0.2))
+   ((outline-6 &override) :foreground (doom-darken teal 0.2))
+   ((outline-7 &override) :foreground (doom-darken blue 0.4))
+   ((outline-8 &override) :foreground (doom-darken green 0.4))
+   ;;;; org <built-in>
+   ((org-block &override) :background base0)
+   ((org-block-begin-line &override) :foreground comments :background base0)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt))))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-oksolar-dark-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-oksolar-light-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-oksolar-light-theme.el
new file mode 100644
index 0000000..e7377e0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-oksolar-light-theme.el
@@ -0,0 +1,215 @@
+;;; doom-oksolar-light-theme.el --- an OKLab variant of Solarized light -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added:
+;; Author: logc <https://github.com/logc>
+;; Maintainer:
+;; Source: https://meat.io/oksolar.json
+;; Source: https://meat.io/oksolar
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-oksolar-light-theme nil
+  "Options for the `doom-oksolar-light' theme."
+  :group 'doom-themes)
+
+(defcustom doom-oksolar-light-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-oksolar-light-theme
+  :type 'boolean)
+
+(defcustom doom-oksolar-light-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-oksolar-light-theme
+  :type 'boolean)
+
+(defcustom doom-oksolar-light-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-oksolar-light-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-oksolar-light
+  "A light theme inspired by OKSolar."
+  :family 'doom-oksolar
+  :background-mode 'light
+
+  ;; name        default   256       16
+  ((bg         '("#FBF7EF" "#FBF7EF" "white"        ))
+   (fg         '("#657377" "#657377" "black"        ))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#F1E9D2" "#F1E9D2" "white"        ))
+   (fg-alt     '("#5B7279" "#5B7279" "brightwhite"  ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#FBF7EF" "#FBF7EF" "white"        ))
+   (base1      '("#F1E9D2" "#F1E9D2" "white"        ))
+   ;; NOTE: base 2 never used, left as-is in Solarized
+   (base2      '("#8FAAAB" "#8FAAAB" "brightblack"  ))
+   (base3      '("#FCF7E8" "#FCF7E8" "brightblack"  ))
+   (base4      '("#8FAAAB" "#8FAAAB" "brightblack"  ))
+   (base5      '("#98A8A8" "#98A8A8" "brightblack"  ))
+   (base6      '("#657377" "#657377" "brightblack"  ))
+   (base7      '("#5B7279" "#5B7279" "brightblack"  ))
+   (base8      '("#657377" "#657377" "brightblack"  ))
+
+   (grey       base4)
+   (red        '("#F23749" "#ff6655" "red"          ))
+   (orange     '("#D56500" "#dd8844" "brightred"    ))
+   (green      '("#819500" "#99bb66" "green"        ))
+   (teal       '("#35A69C" "#33aa99" "brightgreen"  ))
+   (yellow     '("#AC8300" "#ECBE7B" "yellow"       ))
+   (blue       '("#2B90D8" "#51afef" "brightblue"   ))
+   (dark-blue  '("#3F88AD" "#2257A0" "blue"         ))
+   (magenta    '("#DD459D" "#c678dd" "magenta"      ))
+   (violet     '("#7D80D1" "#a9a1e1" "brightmagenta"))
+   (cyan       '("#259D94" "#46D9FF" "brightcyan"   ))
+   (dark-cyan  '("#204052" "#5699AF" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   base4)
+   (selection      dark-blue)
+   (builtin        magenta)
+   (comments       (if doom-oksolar-light-brighter-comments
+                       (doom-lighten teal 0.25)
+                     base6))
+   (doc-comments   teal)
+   (constants      violet)
+   (functions      magenta)
+   (keywords       green)
+   (methods        cyan)
+   (operators      blue)
+   (type           yellow)
+   (strings        cyan)
+   (variables      blue)
+   (numbers        violet)
+   (region         `(,(doom-darken (car bg-alt) 0.1) ,@(doom-darken (cdr base0) 0.1)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (-modeline-bright doom-oksolar-light-brighter-modeline)
+   (-modeline-pad
+    (when doom-oksolar-light-padded-modeline
+      (if (integerp doom-oksolar-light-padded-modeline) doom-oksolar-light-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base6)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-lighten bg 0.7)
+      (doom-darken bg 0.05)))
+   (modeline-bg-alt
+    (if -modeline-bright
+        (doom-lighten bg 0.7)
+      (doom-lighten base3 0.2)))
+   (modeline-bg-inactive     (doom-darken bg 0.025))
+   (modeline-bg-inactive-alt (doom-darken bg 0.02)))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :slant 'italic
+    :background (if doom-oksolar-light-brighter-comments
+                    (doom-blend teal base0 0.07)
+                  'unspecified))
+   ((font-lock-type-face &override) :slant 'italic)
+   ((font-lock-builtin-face &override) :slant 'italic)
+   ((font-lock-function-name-face &override) :foreground type)
+   ((font-lock-keyword-face &override) :weight 'bold)
+   ((font-lock-constant-face &override) :weight 'bold)
+   (hl-line :background base1)
+   ((line-number &override) :foreground base6)
+   ((line-number-current-line &override) :foreground fg :background region :weight 'bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-evil-emacs-state  :foreground magenta)
+   (doom-modeline-evil-insert-state :foreground blue)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt)))
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; lsp-ui
+   (lsp-ui-sideline-code-action :foreground blue)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-darken base3 0.05))
+   ;;;; ivy
+   (ivy-current-match :background (doom-lighten yellow 0.65) :distant-foreground fg)
+   (ivy-minibuffer-match-face-1 :foreground blue :background base3 :weight 'bold)
+   (ivy-minibuffer-match-face-2 :foreground magenta :background base3 :weight 'bold)
+   (ivy-minibuffer-match-face-3 :foreground green   :background base3 :weight 'bold)
+   (ivy-minibuffer-match-face-4 :foreground yellow  :background base3 :weight 'bold)
+   (ivy-minibuffer-match-highlight :foreground violet :weight 'bold)
+   ;;;; ivy-posframe
+   (ivy-posframe :background modeline-bg-alt)
+   ;;;; swiper
+   (swiper-match-face-1 :inherit 'ivy-minibuffer-match-face-1)
+   (swiper-match-face-2 :inherit 'ivy-minibuffer-match-face-2)
+   (swiper-match-face-3 :inherit 'ivy-minibuffer-match-face-3)
+   (swiper-match-face-4 :inherit 'ivy-minibuffer-match-face-4)
+   ;;;; helm
+   (helm-selection :foreground base0 :weight 'bold :background blue)
+   ;;;; company
+   (company-tooltip-selection :background blue :foreground base3)
+   ;;;; org <built-in>
+   (org-block :background (doom-blend yellow bg 0.04) :extend t)
+   (org-block-background :background (doom-blend yellow bg 0.04))
+   (org-block-begin-line :background (doom-blend yellow bg 0.08) :extend t)
+   (org-block-end-line :background (doom-blend yellow bg 0.08) :extend t)
+   ;;;; widget
+   (widget-field :foreground fg :background base3)
+   (widget-single-line-field :foreground fg :background base3)
+   ;;;; latex
+   (font-latex-sedate-face :foreground base6)
+   ;;;; notmuch
+   (notmuch-message-summary-face :foreground teal)
+   (notmuch-wash-cited-text :foreground base6))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-oksolar-light-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-old-hope-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-old-hope-theme.el
new file mode 100644
index 0000000..b9c394b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-old-hope-theme.el
@@ -0,0 +1,225 @@
+;;; doom-old-hope-theme.el --- inspired by An Old Hope, in a galaxy far far away -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: April 18, 2018 (#163)
+;; Author: teesloane <https://github.com/teesloane>
+;; Maintainer:
+;; Source: https://github.com/jesseleite/an-old-hope-syntax-atom
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-old-hope-theme nil
+  "Options for the `doom-old-hope' theme."
+  :group 'doom-themes)
+
+(defcustom doom-old-hope-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-one-theme
+  :type 'boolean)
+
+(defcustom doom-old-hope-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-old-hope-theme
+  :type 'boolean)
+
+(defcustom doom-old-hope-comment-bg doom-old-hope-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-old-hope-theme
+  :type 'boolean)
+
+(defcustom doom-old-hope-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-old-hope-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-old-hope
+  "A dark theme inspired by An Old Hope"
+
+  ;; name        default   256       16
+  ((bg         '("#1c1d20" "#1c1d20"       nil))
+   (bg-alt     '("#151619" "#151619" nil))
+   (base0      '("#1B2229" "black"   "black"))
+   (base1      '("#1c1f24" "#1e1e1e" "brightblack"))
+   (base2      '("#202328" "#2e2e2e" "brightblack"))
+   (base3      '("#23272e" "#262626" "brightblack"))
+   (base4      '("#3f444a" "#3f3f3f" "brightblack"))
+   (base5      '("#5B6268" "#525252" "brightblack"))
+   (base6      '("#686b78" "#686b78" "brightblack"))
+   (base7      '("#9ca0a4" "#979797" "brightblack"))
+   (base8      '("#DFDFDF" "#dfdfdf" "white"))
+   (fg         '("#cbccd1" "#cbccd1" "brightwhite"))
+   (fg-alt     '("#5B6268" "#2d2d2d" "white"))
+
+   (grey       base4)
+   (red        '("#ea3d54" "#ea3d54" "red"))
+   (orange     '("#ee7b29" "#ee7b29" "brightred"))
+   (green      '("#78bd65" "#78bd65" "green"))
+   (teal       '("#78bd65" "#78bd65" "brightgreen"))
+   (yellow     '("#fedd38" "#fedd38" "yellow"))
+   (blue       '("#4fb3d8" "#4fb3d8" "brightblue"))
+   (dark-blue  '("#5689f0" "#5689f0" "blue"))
+   (magenta    '("#b978ab" "#b978ab" "brightmagenta"))
+   (violet     '("#b978ab" "#b978ab" "brightmagenta"))
+   (cyan       '("#4fb3d8" "#4fb3d8" "brightcyan"))
+   (dark-cyan  '("#4fb3d8" "#4fb3d8" "cyan"))
+
+   ;; face categories -- required for all themes
+   (highlight      yellow)
+   (vertical-bar   (doom-darken base4 0.2))
+   (selection      red)
+   (builtin        yellow)
+   (comments       base5)
+   (doc-comments   (doom-lighten blue 0.25))
+   (constants      orange)
+   (functions      yellow)
+   (keywords       red)
+   (methods        yellow)
+   (operators      green)
+   (type           orange)
+   (strings        blue)
+   (variables      fg)
+   (numbers        orange)
+   (region         `(,(doom-lighten (car bg-alt) 0.15) ,@(doom-lighten (cdr base1) 0.35)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-old-hope-brighter-modeline)
+   (-modeline-pad
+    (when doom-old-hope-padded-modeline
+      (if (integerp doom-old-hope-padded-modeline) doom-old-hope-padded-modeline 4)))
+
+   (modeline-fg     fg)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.475)
+      `(,(doom-darken (car bg-alt) 0.35) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      `(,(doom-darken (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(doom-darken (car bg) 0.03) ,@(cdr bg-alt)))
+   (modeline-bg-inactive-l `(,(car bg-alt) ,@(cdr base1))))
+
+
+  ;;;; Base theme face overrides
+  (
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   ((font-lock-comment-face &override)
+    :background (if doom-old-hope-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar         :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; ivy
+   (ivy-current-match       :background base3 :foreground orange)
+   (ivy-posframe-cursor     :background red :foreground base0)
+   ;;;; js2-mode
+   (js2-function-name              :forground yellow)
+   (js2-function-param             :foreground blue)
+   (js2-warning                    :underline `(:style wave :color ,yellow))
+   (js2-error                      :underline `(:style wave :color ,red))
+   (js2-external-variable          :underline `(:style wave :color ,blue))
+   (js2-jsdoc-tag                  :background nil :foreground red)
+   (js2-jsdoc-type                 :background nil :foreground orange)
+   (js2-jsdoc-value                :background nil :foreground blue)
+   (js2-private-member             :background nil :foreground orange)
+   (js2-object-property            :foreground fg)
+   ;;;; LaTeX-mode
+   (font-latex-math-face :foreground green)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; markdown-mode
+   (markdown-list-face         :foreground green)
+   (markdown-pre-face          :foreground blue)
+   (markdown-blockquote-face   :inherit 'italic :foreground blue)
+   (markdown-link-face         :inherit 'bold   :foreground orange)
+   (markdown-header-face-1     :weight 'bold    :foreground blue)
+   (markdown-header-face-2     :weight 'bold    :foreground orange)
+   (markdown-header-face-3     :weight 'bold    :foreground green)
+   (markdown-header-face-4     :weight 'bold    :foreground yellow)
+   (markdown-header-face-5     :weight 'bold    :foreground blue)
+   (markdown-header-face-6     :weight 'bold    :foreground orange)
+   ;;;; outline <built-in>
+   (outline-1 :foreground blue)
+   (outline-2 :foreground orange)
+   (outline-3 :foreground teal)
+   (outline-4 :foreground magenta)
+   (outline-5 :foreground blue)
+   (outline-6 :foreground orange)
+   (outline-7 :foreground teal)
+   (outline-8 :foreground magenta)
+   ;;;; org <built-in>
+   (org-link                         :foreground blue :underline t)
+   (org-document-title               :foreground orange)
+   (org-document-info-keyword        :foreground comments)
+   (org-meta-line                    :foreground base6)
+   (org-tag             :foreground base6 :weight 'normal)
+   (org-block                        :background (doom-darken bg 0.2 ) :extend t)
+   (org-hide :foreground hidden)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face  :foreground red)
+   (rainbow-delimiters-depth-2-face  :foreground orange)
+   (rainbow-delimiters-depth-3-face  :foreground green)
+   (rainbow-delimiters-depth-4-face  :foreground cyan)
+   (rainbow-delimiters-depth-5-face  :foreground blue)
+   (rainbow-delimiters-depth-6-face  :foreground yellow)
+   (rainbow-delimiters-depth-7-face  :foreground green)
+   ;;;; rjsx-mode
+   (rjsx-tag                       :foreground fg)
+   (rjsx-attr                      :foreground orange :slant 'italic :weight 'medium)
+   (rjsx-tag-bracket-face          :foreground green)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; web-mode
+   (web-mode-html-tag-face         :foreground fg :slant 'italic))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-old-hope-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-one-light-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-one-light-theme.el
new file mode 100644
index 0000000..323af7b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-one-light-theme.el
@@ -0,0 +1,206 @@
+;;; doom-one-light-theme.el --- inspired by Atom One Light -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: July 31, 2017 (#96)
+;; Author: ztlevi <https://github.com/ztlevi>
+;; Maintainer: Henrik Lissner <https://github.com/hlissner>
+;; Source: https://github.com/atom/one-light-ui
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-one-light-theme nil
+  "Options for the `doom-one-light' theme."
+  :group 'doom-themes)
+
+(defcustom doom-one-light-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-one-light-theme
+  :type 'boolean)
+
+(defcustom doom-one-light-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-one-light-theme
+  :type 'boolean)
+
+(defcustom doom-one-light-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-one-light-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-one-light
+  "A light theme inspired by Atom One Light."
+  :family 'doom-one
+  :background-mode 'light
+
+  ;; name        default   256       16
+  ((bg         '("#fafafa" "white"   "white"        ))
+   (fg         '("#383a42" "#424242" "black"        ))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#f0f0f0" "white"   "white"        ))
+   (fg-alt     '("#c6c7c7" "#c7c7c7" "brightblack"  ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#f0f0f0" "#f0f0f0" "white"        ))
+   (base1      '("#e7e7e7" "#e7e7e7" "brightblack"  ))
+   (base2      '("#dfdfdf" "#dfdfdf" "brightblack"  ))
+   (base3      '("#c6c7c7" "#c6c7c7" "brightblack"  ))
+   (base4      '("#9ca0a4" "#9ca0a4" "brightblack"  ))
+   (base5      '("#383a42" "#424242" "brightblack"  ))
+   (base6      '("#202328" "#2e2e2e" "brightblack"  ))
+   (base7      '("#1c1f24" "#1e1e1e" "brightblack"  ))
+   (base8      '("#1b2229" "black"   "black"        ))
+
+   (grey       base4)
+   (red        '("#e45649" "#e45649" "red"          ))
+   (orange     '("#da8548" "#dd8844" "brightred"    ))
+   (green      '("#50a14f" "#50a14f" "green"        ))
+   (teal       '("#4db5bd" "#44b9b1" "brightgreen"  ))
+   (yellow     '("#986801" "#986801" "yellow"       ))
+   (blue       '("#4078f2" "#4078f2" "brightblue"   ))
+   (dark-blue  '("#a0bcf8" "#a0bcf8" "blue"         ))
+   (magenta    '("#a626a4" "#a626a4" "magenta"      ))
+   (violet     '("#b751b6" "#b751b6" "brightmagenta"))
+   (cyan       '("#0184bc" "#0184bc" "brightcyan"   ))
+   (dark-cyan  '("#005478" "#005478" "cyan"         ))
+
+   ;; These are the "universal syntax classes" that doom-themes establishes.
+   ;; These *must* be included in every doom themes, or your theme will throw an
+   ;; error, as they are used in the base theme defined in doom-themes-base.
+   (highlight      blue)
+   (vertical-bar   (doom-darken base2 0.1))
+   (selection      dark-blue)
+   (builtin        magenta)
+   (comments       (if doom-one-light-brighter-comments cyan base4))
+   (doc-comments   (doom-darken comments 0.15))
+   (constants      violet)
+   (functions      magenta)
+   (keywords       red)
+   (methods        cyan)
+   (operators      blue)
+   (type           yellow)
+   (strings        green)
+   (variables      (doom-darken magenta 0.36))
+   (numbers        orange)
+   (region         `(,(doom-darken (car bg-alt) 0.1) ,@(doom-darken (cdr base0) 0.3)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; These are extra color variables used only in this theme; i.e. they aren't
+   ;; mandatory for derived themes.
+   (modeline-fg              fg)
+   (modeline-fg-alt          (doom-blend
+                              violet base4
+                              (if doom-one-light-brighter-modeline 0.5 0.2)))
+   (modeline-bg              (if doom-one-light-brighter-modeline
+                                 (doom-darken base2 0.05)
+                               base1))
+   (modeline-bg-alt          (if doom-one-light-brighter-modeline
+                                 (doom-darken base2 0.1)
+                               base2))
+   (modeline-bg-inactive     (doom-darken bg 0.1))
+   (modeline-bg-alt-inactive `(,(doom-darken (car bg-alt) 0.05) ,@(cdr base1)))
+
+   (-modeline-pad
+    (when doom-one-light-padded-modeline
+      (if (integerp doom-one-light-padded-modeline) doom-one-light-padded-modeline 4))))
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-one-light-brighter-comments base0 'unspecified))
+   ((font-lock-doc-face &override) :slant 'italic)
+   ((line-number &override) :foreground (doom-lighten base4 0.15))
+   ((line-number-current-line &override) :foreground base8)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis
+    :foreground (if doom-one-light-brighter-modeline base8 highlight))
+   (shadow :foreground base4)
+   (tooltip :background base1 :foreground fg)
+
+   ;;;; centaur-tabs
+   (centaur-tabs-unselected :background bg-alt :foreground base4)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if doom-one-light-brighter-modeline modeline-bg highlight))
+   ;;;; ediff <built-in>
+   (ediff-current-diff-A        :foreground red   :background (doom-lighten red 0.8))
+   (ediff-current-diff-B        :foreground green :background (doom-lighten green 0.8))
+   (ediff-current-diff-C        :foreground blue  :background (doom-lighten blue 0.8))
+   (ediff-current-diff-Ancestor :foreground teal  :background (doom-lighten teal 0.8))
+   ;;;; helm
+   (helm-candidate-number :background blue :foreground bg)
+   ;;;; lsp-mode
+   (lsp-ui-doc-background      :background base0)
+   ;;;; magit
+   (magit-blame-heading     :foreground orange :background bg-alt)
+   (magit-diff-removed :foreground (doom-darken red 0.2) :background (doom-blend red bg 0.1))
+   (magit-diff-removed-highlight :foreground red :background (doom-blend red bg 0.2) :bold bold)
+   ;;;; markdown-mode
+   (markdown-markup-face     :foreground base5)
+   (markdown-header-face     :inherit 'bold :foreground red)
+   ((markdown-code-face &override)       :background base1)
+   (mmm-default-submode-face :background base1)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground red)
+   ((outline-2 &override) :foreground orange)
+   ;;;; org <built-in>
+   ((org-block &override) :background base1)
+   ((org-block-begin-line &override) :foreground fg :slant 'italic)
+   (org-ellipsis :underline nil :background bg     :foreground red)
+   ((org-quote &override) :background base1)
+   ;;;; posframe
+   (ivy-posframe               :background base0)
+   ;;;; selectrum
+   (selectrum-current-candidate :background base2)
+   ;;;; vertico
+   (vertico-current :background base2)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-alt-inactive
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt-inactive)))
+   ;;;; web-mode
+   (web-mode-current-element-highlight-face :background dark-blue :foreground bg)
+   ;;;; wgrep <built-in>
+   (wgrep-face :background base1)
+   ;;;; whitespace
+   ((whitespace-tab &override)         :background (if (not (default-value 'indent-tabs-mode)) base0 'unspecified))
+   ((whitespace-indentation &override) :background (if (default-value 'indent-tabs-mode) base0 'unspecified)))
+
+  ;;;; Base theme variable overrides-
+  ()
+  )
+
+;;; doom-one-light-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-one-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-one-theme.el
new file mode 100644
index 0000000..1a87bab
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-one-theme.el
@@ -0,0 +1,184 @@
+;;; doom-one-theme.el --- inspired by Atom One Dark -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 23, 2016 (28620647f838)
+;; Author: Henrik Lissner <https://github.com/hlissner>
+;; Maintainer: Henrik Lissner <https://github.com/hlissner>
+;; Source: https://github.com/atom/one-dark-ui
+;;
+;;; Commentary:
+;;
+;; This themepack's flagship theme.
+;;
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-one-theme nil
+  "Options for the `doom-one' theme."
+  :group 'doom-themes)
+
+(defcustom doom-one-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-one-theme
+  :type 'boolean)
+
+(defcustom doom-one-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-one-theme
+  :type 'boolean)
+
+(defcustom doom-one-comment-bg doom-one-brighter-comments
+  "If non-nil, comments will have a subtle highlight to enhance their
+legibility."
+  :group 'doom-one-theme
+  :type 'boolean)
+
+(defcustom doom-one-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-one-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-one
+  "A dark theme inspired by Atom One Dark."
+  :family 'doom-one
+  :background-mode 'dark
+
+  ;; name        default   256           16
+  ((bg         '("#282c34" "black"       "black"  ))
+   (fg         '("#bbc2cf" "#bfbfbf"     "brightwhite"  ))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#21242b" "black"       "black"        ))
+   (fg-alt     '("#5B6268" "#2d2d2d"     "white"        ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#1B2229" "black"       "black"        ))
+   (base1      '("#1c1f24" "#1e1e1e"     "brightblack"  ))
+   (base2      '("#202328" "#2e2e2e"     "brightblack"  ))
+   (base3      '("#23272e" "#262626"     "brightblack"  ))
+   (base4      '("#3f444a" "#3f3f3f"     "brightblack"  ))
+   (base5      '("#5B6268" "#525252"     "brightblack"  ))
+   (base6      '("#73797e" "#6b6b6b"     "brightblack"  ))
+   (base7      '("#9ca0a4" "#979797"     "brightblack"  ))
+   (base8      '("#DFDFDF" "#dfdfdf"     "white"        ))
+
+   (grey       base4)
+   (red        '("#ff6c6b" "#ff6655" "red"          ))
+   (orange     '("#da8548" "#dd8844" "brightred"    ))
+   (green      '("#98be65" "#99bb66" "green"        ))
+   (teal       '("#4db5bd" "#44b9b1" "brightgreen"  ))
+   (yellow     '("#ECBE7B" "#ECBE7B" "yellow"       ))
+   (blue       '("#51afef" "#51afef" "brightblue"   ))
+   (dark-blue  '("#2257A0" "#2257A0" "blue"         ))
+   (magenta    '("#c678dd" "#c678dd" "brightmagenta"))
+   (violet     '("#a9a1e1" "#a9a1e1" "magenta"      ))
+   (cyan       '("#46D9FF" "#46D9FF" "brightcyan"   ))
+   (dark-cyan  '("#5699AF" "#5699AF" "cyan"         ))
+
+   ;; These are the "universal syntax classes" that doom-themes establishes.
+   ;; These *must* be included in every doom themes, or your theme will throw an
+   ;; error, as they are used in the base theme defined in doom-themes-base.
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.1))
+   (selection      dark-blue)
+   (builtin        magenta)
+   (comments       (if doom-one-brighter-comments dark-cyan base5))
+   (doc-comments   (doom-lighten (if doom-one-brighter-comments dark-cyan base5) 0.25))
+   (constants      violet)
+   (functions      magenta)
+   (keywords       blue)
+   (methods        cyan)
+   (operators      blue)
+   (type           yellow)
+   (strings        green)
+   (variables      (doom-lighten magenta 0.4))
+   (numbers        orange)
+   (region         `(,(doom-lighten (car bg-alt) 0.15) ,@(doom-lighten (cdr base1) 0.35)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; These are extra color variables used only in this theme; i.e. they aren't
+   ;; mandatory for derived themes.
+   (modeline-fg              fg)
+   (modeline-fg-alt          base5)
+   (modeline-bg              (if doom-one-brighter-modeline
+                                 (doom-darken blue 0.45)
+                               (doom-darken bg-alt 0.1)))
+   (modeline-bg-alt          (if doom-one-brighter-modeline
+                                 (doom-darken blue 0.475)
+                               `(,(doom-darken (car bg-alt) 0.15) ,@(cdr bg))))
+   (modeline-bg-inactive     `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-alt `(,(doom-darken (car bg-alt) 0.1) ,@(cdr bg)))
+
+   (-modeline-pad
+    (when doom-one-padded-modeline
+      (if (integerp doom-one-padded-modeline) doom-one-padded-modeline 4))))
+
+
+  ;;;; Base theme face overrides
+  (((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   ((font-lock-comment-face &override)
+    :background (if doom-one-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if doom-one-brighter-modeline base8 highlight))
+
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if doom-one-brighter-modeline modeline-bg highlight))
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; ivy
+   (ivy-current-match :background dark-blue :distant-foreground base0 :weight 'normal)
+   ;;;; LaTeX-mode
+   (font-latex-math-face :foreground green)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground red)
+   (rjsx-attr :foreground orange)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt))))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-one-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-opera-light-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-opera-light-theme.el
new file mode 100644
index 0000000..62c3b1a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-opera-light-theme.el
@@ -0,0 +1,162 @@
+;;; doom-opera-light-theme.el --- an original light theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: June 16, 2018 (#189)
+;; Author: jwintz <https://github.com/jwintz>
+;; Maintainer:
+;; Source: original
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-opera-light-theme nil
+  "Options for the `doom-opera-light' theme."
+  :group 'doom-themes)
+
+(defcustom doom-opera-light-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-opera-light-theme
+  :type 'boolean)
+
+(defcustom doom-opera-light-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-opera-light-theme
+  :type 'boolean)
+
+(defcustom doom-opera-light-comment-bg doom-opera-light-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-opera-light-theme
+  :type 'boolean)
+
+(defcustom doom-opera-light-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-opera-light-theme
+  :type '(choice integer boolean))
+
+(defcustom doom-opera-light-region-highlight t
+  "Determines the selection highlight style. Can be 'frost, 'snowstorm or t
+(default)."
+  :group 'doom-opera-light-theme
+  :type 'symbol)
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-opera-light
+  "A light Opera theme."
+  :family 'doom-opera
+  :background-mode 'light
+
+  ;; name        default   256       16
+  ((bg         '("#fafafa" nil       nil ))
+   (bg-alt     '("#eeeeee" nil       nil ))
+   (base0      '("#fafafa" "#dfdfdf" nil ))
+   (base1      '("#f5f5f5" "#979797" nil ))
+   (base2      '("#eeeeee" "#6b6b6b" nil ))
+   (base3      '("#e0e0e0" "#525252" nil ))
+   (base4      '("#bdbdbd" "#3f3f3f" nil ))
+   (base5      '("#9e9e9e" "#262626" nil ))
+   (base6      '("#757575" "#2e2e2e" nil ))
+   (base7      '("#616161" "#1e1e1e" nil ))
+   (base8      '("#424242" "black"   nil ))
+   (fg         '("#2a2a2a" "#2a2a2a" nil ))
+   (fg-alt     '("#454545" "#757575" nil ))
+
+   (grey       base4)
+   (red        '("#99324b" "#ff6655" nil ))
+   (orange     '("#ac4426" "#dd8844" nil ))
+   (green      '("#4f894c" "#99bb66" nil ))
+   (teal       '("#29838d" "#44b9b1" nil ))
+   (yellow     '("#9a7500" "#ECBE7B" nil ))
+   (blue       '("#3b6ea8" "#51afef" nil ))
+   (dark-blue  '("#5272AF" "#2257A0" nil ))
+   (magenta    '("#97365b" "#c678dd" nil ))
+   (violet     '("#842879" "#a9a1e1" nil ))
+   (cyan       '("#398eac" "#46D9FF" nil ))
+   (dark-cyan  '("#2c7088" "#5699AF" nil ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.2))
+   (selection      dark-blue)
+   (builtin        teal)
+   (comments       (if doom-opera-light-brighter-comments dark-cyan (doom-lighten base5 0.2)))
+   (doc-comments   (doom-lighten (if doom-opera-light-brighter-comments dark-cyan base5) 0.25))
+   (constants      magenta)
+   (functions      teal)
+   (keywords       blue)
+   (methods        teal)
+   (operators      blue)
+   (type           yellow)
+   (strings        green)
+   (variables      (doom-lighten magenta 0.5))
+   (numbers        magenta)
+   (region         base4)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-opera-light-brighter-modeline)
+   (-modeline-pad
+    (when doom-opera-light-padded-modeline
+      (if (integerp doom-opera-light-padded-modeline) doom-opera-light-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      `(,(doom-darken (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken blue 0.475)
+      `(,(doom-darken (car bg-alt) 0.15) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-l (doom-darken bg-alt 0.1)))
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-opera-light-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (lazy-highlight :background (doom-blend bg highlight 0.7) :weight 'bold)
+   ((line-number &override) :foreground fg-alt)
+   ((line-number-current-line &override) :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; ivy
+   (ivy-current-match :background base3)
+   ;;;; ivy-posframe
+   (ivy-posframe :background bg-alt)
+   (ivy-posframe-border :background base1)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))))
+
+;;; doom-opera-light-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-opera-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-opera-theme.el
new file mode 100644
index 0000000..8414eeb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-opera-theme.el
@@ -0,0 +1,159 @@
+;;; doom-opera-theme.el --- an original light theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: June 16, 2018 (#189)
+;; Author: jwintz <https://github.com/jwintz>
+;; Maintainer:
+;; Source: original
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-opera-theme nil
+  "Options for the `doom-opera' theme."
+  :group 'doom-themes)
+
+(defcustom doom-opera-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-opera-theme
+  :type 'boolean)
+
+(defcustom doom-opera-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-opera-theme
+  :type 'boolean)
+
+(defcustom doom-opera-comment-bg doom-opera-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-opera-theme
+  :type 'boolean)
+
+(defcustom doom-opera-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-opera-theme
+  :type '(choice integer boolean))
+
+(defcustom doom-opera-region-highlight t
+  "Determines the selection highlight style. Can be 'frost, 'snowstorm or t
+(default)."
+  :group 'doom-opera-theme
+  :type 'symbol)
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-opera
+  "A dark Opera theme."
+  :family 'doom-opera
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  ((bg         '("#323334" nil       nil            ))
+   (bg-alt     '("#222224" nil       nil            ))
+   (base0      '("#000000" "black"   "black"        ))
+   (base1      '("#1e1e1e" "#1e1e1e" "brightblack"  ))
+   (base2      '("#2e2e2e" "#2e2e2e" "brightblack"  ))
+   (base3      '("#262626" "#262626" "brightblack"  ))
+   (base4      '("#3f3f3f" "#3f3f3f" "brightblack"  ))
+   (base5      '("#525252" "#525252" "brightblack"  ))
+   (base6      '("#6b6b6b" "#6b6b6b" "brightblack"  ))
+   (base7      '("#979797" "#979797" "brightblack"  ))
+   (base8      '("#dfdfdf" "#dfdfdf" "white"        ))
+   (fg         '("#eceff4" "#dfdfdf" "white"        ))
+   (fg-alt     '("#727269" "#bfbfbf" "brightwhite"  ))
+
+   (grey       base4)
+   (red        '("#C16069" "#ff6655" "red"          ))
+   (orange     '("#D2876D" "#dd8844" "brightred"    ))
+   (green      '("#A2BF8A" "#99bb66" "green"        ))
+   (teal       '("#8EBCBB" "#44b9b1" "brightgreen"  ))
+   (yellow     '("#ECCC87" "#ECBE7B" "yellow"       ))
+   (blue       '("#80A0C2" "#51afef" "brightblue"   ))
+   (dark-blue  '("#5C748E" "#2257A0" "blue"         ))
+   (magenta    '("#B58DAE" "#c678dd" "magenta"      ))
+   (violet     '("#5D80AE" "#a9a1e1" "brightmagenta"))
+   (cyan       '("#86C0D1" "#46D9FF" "brightcyan"   ))
+   (dark-cyan  '("#507681" "#5699AF" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.2))
+   (selection      dark-blue)
+   (builtin        teal)
+   (comments       (if doom-opera-brighter-comments dark-cyan (doom-lighten base5 0.2)))
+   (doc-comments   (doom-lighten (if doom-opera-brighter-comments dark-cyan base5) 0.25))
+   (constants      magenta)
+   (functions      teal)
+   (keywords       blue)
+   (methods        teal)
+   (operators      blue)
+   (type           yellow)
+   (strings        green)
+   (variables      (doom-lighten magenta 0.5))
+   (numbers        magenta)
+   (region         base4)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-opera-brighter-modeline)
+   (-modeline-pad
+    (when doom-opera-padded-modeline
+      (if (integerp doom-opera-padded-modeline) doom-opera-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      `(,(doom-darken (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken blue 0.475)
+      `(,(doom-darken (car bg-alt) 0.15) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-l (doom-darken bg-alt 0.1)))
+
+  ;;;; Base theme face overrides
+  (((line-number &override) :foreground fg-alt)
+   ((line-number-current-line &override) :foreground fg)
+   ((font-lock-comment-face &override)
+    :background (if doom-opera-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l))))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-opera-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-outrun-electric-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-outrun-electric-theme.el
new file mode 100644
index 0000000..d2cabc5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-outrun-electric-theme.el
@@ -0,0 +1,191 @@
+;;; doom-outrun-electric-theme.el --- a high contrast, neon theme inspired by Outrun Electric on VSCode -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: July 30, 2019 (c810f6b96648)
+;; Author: ema2159 <https://github.com/ema2159>
+;; Maintainer:
+;; Source: https://github.com/samrap/outrun-theme-vscode
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-outrun-electric-theme nil
+  "Options for doom-themes."
+  :group 'doom-themes)
+
+(defcustom doom-outrun-electric-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-outrun-electric-theme
+  :type 'boolean)
+
+(defcustom doom-outrun-electric-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-outrun-electric-theme
+  :type 'boolean)
+
+(defcustom doom-outrun-electric-comment-bg doom-outrun-electric-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-outrun-electric-theme
+  :type 'boolean)
+
+(defcustom doom-outrun-electric-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-outrun-electric-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-outrun-electric
+  "A vibrant, neon colored theme inspired by VS Code Outrun Electric."
+
+  ;; name        default   256       16
+  ((bg         '("#0c0a20" "#0c0a20" nil           ))
+   (bg-alt     '("#090819" "#090819" nil           ))
+   (base0      '("#131033" "#131033" "black"       ))
+   (base1      '("#1f1147" "#161130" "brightblack" ))
+   (base2      '("#110d26" "#110d26" "brightblack" ))
+   (base3      '("#3b4167" "#3b4167" "brightblack" ))
+   (base4      '("#2d2844" "#2d2844" "brightblack" ))
+   (base5      '("#BA45A3" "#BA45A3" "brightblack" ))
+   (base6      '("#6A6EA3" "#6A6EA3" "brightblack" ))
+   (base7      '("#6564D1" "#6564D1" "brightblack" ))
+   (base8      '("#919ad9" "#919ad9" "white"       ))
+   (fg-alt     '("#7984D1" "#7984D1" "white"       ))
+   (fg         '("#f2f3f7" "#f2f3f7" "brightwhite" ))
+
+   (grey       '("#546A90" "#546A90" "gray"          ))
+   (red        '("#e61f44" "#e61f44" "red"          ))
+   (orange     '("#cf433e" "#ff9b50" "brightred"    ))
+   (green      '("#a7da1e" "#a7da1e" "green"        ))
+   (teal       '("#A875FF" "#A875FF" "brightgreen"  ))
+   (yellow     '("#ffd400" "#ffd400" "yellow"       ))
+   (blue       '("#1ea8fc" "#1ea8fc" "brightblue"   ))
+   (dark-blue  '("#3F88AD" "#3F88AD" "blue"         ))
+   (magenta    '("#ff2afc" "#ff2afc" "magenta"      ))
+   (violet     '("#df85ff" "#df85ff" "brightmagenta"))
+   (cyan       '("#42c6ff" "#42c6ff" "brightcyan"   ))
+   (dark-cyan  '("#204052" "#204052" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.5))
+   (selection      dark-blue)
+   (builtin        blue)
+   (comments       (if doom-outrun-electric-brighter-comments blue grey))
+   (doc-comments   teal)
+   (constants      violet)
+   (functions      cyan)
+   (keywords       magenta)
+   (methods        cyan)
+   (operators      magenta)
+   (type           yellow)
+   (strings        fg-alt)
+   (variables      violet)
+   (numbers        yellow)
+   (region         base1)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-outrun-electric-brighter-modeline)
+   (-modeline-pad
+    (when doom-outrun-electric-padded-modeline
+      (if (integerp doom-outrun-electric-padded-modeline) doom-outrun-electric-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.1) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.15) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(car bg) ,@(cdr base1)))
+   (modeline-bg-inactive-l (doom-darken bg 0.1)))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-outrun-electric-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   ((font-lock-keyword-face &override) :weight 'bold)
+   ((font-lock-constant-face &override) :weight 'bold)
+   ((font-lock-function-name-face &override) :foreground functions)
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   (mode-line-highlight :background magenta :foreground bg :weight 'bold)
+   (vertical-border :foreground base5)
+
+   ;;;; centaur-tabs
+   (centaur-tabs-active-bar-face :background magenta)
+   (centaur-tabs-modified-marker-selected :inherit 'centaur-tabs-selected :foreground magenta)
+   (centaur-tabs-modified-marker-unselected :inherit 'centaur-tabs-unselected :foreground magenta)
+   ;;;; company
+   (company-tooltip-selection :background dark-cyan)
+   (company-tooltip-common    :foreground magenta :distant-foreground base0 :weight 'bold)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background magenta)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   (markdown-url-face    :foreground teal :weight 'normal)
+   (markdown-reference-face :foreground base6)
+   ((markdown-bold-face &override)   :foreground fg)
+   ((markdown-italic-face &override) :foreground fg-alt)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground blue)
+   ((outline-2 &override) :foreground green)
+   ((outline-3 &override) :foreground teal)
+   ((outline-4 &override) :foreground (doom-darken blue 0.2))
+   ((outline-5 &override) :foreground (doom-darken green 0.2))
+   ((outline-6 &override) :foreground (doom-darken teal 0.2))
+   ((outline-7 &override) :foreground (doom-darken blue 0.4))
+   ((outline-8 &override) :foreground (doom-darken green 0.4))
+   ;;;; org <built-in>
+   ((org-block &override) :background base0)
+   ((org-block-begin-line &override) :background base0)
+   (org-hide              :foreground hidden)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l))))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-outrun-electric-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-palenight-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-palenight-theme.el
new file mode 100644
index 0000000..2c52eb8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-palenight-theme.el
@@ -0,0 +1,147 @@
+;;; doom-palenight-theme.el --- adapted from equinusocio's Material themes -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: August 8, 2019 (7c7e871f2221)
+;; Author: Brettm12345 <https://github.com/Brettm12345>
+;; Maintainer:
+;; Source: https://github.com/material-theme/vsc-material-theme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-palenight-theme nil
+  "Options for the `doom-palenight' theme."
+  :group 'doom-themes)
+
+(defcustom doom-palenight-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-palenight-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-palenight
+  "A dark theme inspired by Material-Palenight"
+
+  ;; name        default   256       16
+  ((bg         '("#292D3E" nil       nil))
+   (bg-alt     '("#242837" nil       nil))
+   (base0      '("#1c1f2b" "black"   "black"))
+   (base1      '("#1e212e" "#262626" "brightblack"))
+   (base2      '("#232635" "#303030" "brightblack"))
+   (base3      '("#3C435E" "#3a3a3a" "brightblack"))
+   (base4      '("#4E5579" "#444444" "brightblack"))
+   (base5      '("#676E95" "#585858" "brightblack"))
+   (base6      '("#697098" "#626262" "brightblack"))
+   (base7      '("#717CB4" "#767676" "brightblack"))
+   (base8      '("#A6Accd" "#a8a8a8" "white"))
+   (fg         '("#EEFFFF" "#e4e4e4" "brightwhite"))
+   (fg-alt     '("#BFC7D5" "#bcbcbc" "white"))
+
+   (grey base5)
+
+   (red         '("#ff5370" "#ff0000" "red"))
+   (orange      '("#f78c6c" "#ff5f00" "brightred"))
+   (green       '("#c3e88d" "#afff00" "green"))
+   (teal        '("#44b9b1" "#00d7af" "brightgreen"))
+   (yellow      '("#ffcb6b" "#ffd700" "brightyellow"))
+   (blue        '("#82aaff" "#5fafff" "brightblue"))
+   (dark-blue   '("#7986E7" "#d7ffff" "blue"))
+   (magenta     '("#c792ea" "#d787d7" "brightmagenta"))
+   (violet      '("#bb80b3" "#d787af" "magenta"))
+   (cyan        '("#89DDFF" "#5fd7ff" "brightcyan"))
+   (dark-cyan   '("#80cbc4" "#00d7af" "cyan"))
+
+   ;; face categories -- required for all themes
+   (highlight      magenta)
+   (vertical-bar   base2)
+   (selection      base4)
+   (builtin        blue)
+   (comments       base5)
+   (doc-comments   (doom-lighten base5 0.25))
+   (constants      orange)
+   (functions      blue)
+   (keywords       cyan)
+   (methods        blue)
+   (operators      cyan)
+   (type           magenta)
+   (strings        green)
+   (variables      yellow)
+   (numbers        orange)
+   (region         base3)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    blue)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (modeline-bg     base2)
+   (modeline-bg-alt (doom-darken bg 0.01))
+   (modeline-fg     base8)
+   (modeline-fg-alt comments)
+
+   (-modeline-pad
+    (when doom-palenight-padded-modeline
+      (if (integerp doom-palenight-padded-modeline) doom-palenight-padded-modeline 4))))
+
+  ;;;; Base theme face overrides
+  ((lazy-highlight :background base4 :foreground fg :weight 'bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (tooltip :background (doom-darken bg-alt 0.2) :foreground fg)
+
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; dired-k
+   (dired-k-commited :foreground base4)
+   (dired-k-modified :foreground vc-modified)
+   (dired-k-ignored :foreground cyan)
+   (dired-k-added    :foreground vc-added)
+   ;;;; doom-modeline
+   (doom-modeline-buffer-path       :foreground green :weight 'bold)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path)
+   ;;;; js2-mode
+   (js2-jsdoc-tag              :foreground magenta)
+   (js2-object-property        :foreground yellow)
+   (js2-object-property-access :foreground cyan)
+   (js2-function-param         :foreground violet)
+   (js2-jsdoc-type             :foreground base8)
+   (js2-jsdoc-value            :foreground cyan)
+   ;;;; man <built-in>
+   (Man-overstrike :inherit 'bold :foreground magenta)
+   (Man-underline :inherit 'underline :foreground blue)
+   ;;;; org <built-in>
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground magenta)
+   (rainbow-delimiters-depth-2-face :foreground orange)
+   (rainbow-delimiters-depth-3-face :foreground green)
+   (rainbow-delimiters-depth-4-face :foreground cyan)
+   (rainbow-delimiters-depth-5-face :foreground violet)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground blue)
+   (rainbow-delimiters-depth-8-face :foreground teal)
+   (rainbow-delimiters-depth-9-face :foreground dark-cyan)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground red)
+   (rjsx-attr :foreground yellow :slant 'italic :weight 'medium)))
+
+;;; doom-palenight-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-peacock-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-peacock-theme.el
new file mode 100644
index 0000000..253f918
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-peacock-theme.el
@@ -0,0 +1,190 @@
+;;; doom-peacock-theme.el --- inspired by daylerees' Peacock -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: November 9, 2017 (#112)
+;; Author: teesloane <https://github.com/teesloane>
+;; Maintainer:
+;; Source: https://github.com/daylerees/colour-schemes/blob/master/emacs/peacock-theme.el
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-peacock-theme nil
+  "Options for the `doom-peacock' theme."
+  :group 'doom-themes)
+
+(defcustom doom-peacock-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-peacock-theme
+  :type 'boolean)
+
+(defcustom doom-peacock-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-peacock-theme
+  :type 'boolean)
+
+(defcustom doom-peacock-comment-bg doom-peacock-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-peacock-theme
+  :type 'boolean)
+
+(defcustom doom-peacock-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-peacock-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-peacock
+  "Peacock theme from daylerees themes "
+
+  ;; name        default   256       16
+  ((bg         '("#2b2a27" nil       nil            ))
+   (bg-alt     '("#1F1E1D" nil       nil            ))
+   (base0      '("#2b2a27" "black"   "black"        ))
+   (base1      '("#1c1f24" "#1e1e1e" "brightblack"  ))
+   (base2      '("#202328" "#2e2e2e" "brightblack"  ))
+   (base3      '("#23272e" "#262626" "brightblack"  ))
+   (base4      '("#3f444a" "#3f3f3f" "brightblack"  ))
+   (base5      '("#5B6268" "#525252" "brightblack"  ))
+   (base6      '("#73797e" "#6b6b6b" "brightblack"  ))
+   (base7      '("#9ca0a4" "#979797" "brightblack"  ))
+   (base8      '("#DFDFDF" "#dfdfdf" "white"        ))
+   (fg         '("#ede0ce" "#bfbfbf" "brightwhite"  ))
+   (fg-alt     '("#5B6268" "#2d2d2d" "white"        ))
+
+   (grey       base4)
+   (white      '("#f8f8f0" "base4"   "base4"        ))
+   (red        '("#ff5d38" "#ff6655" "red"          )) ;; peacock todo 16
+   (orange     '("#cb4b16" "#dd8844" "brightred"    ))
+   (green      '("#98be65" "#99bb66" "green"        ))
+   (teal       '("#26a6a6" "#44b9b1" "brightgreen"  )) ;; peacock
+   (yellow     '("#bcd42a" "#ECBE7B" "yellow"       )) ;; peacock, todo 16
+   (blue       '("#51afef" "#51afef" "brightblue"   ))
+   (dark-blue  '("#2257A0" "#2257A0" "blue"         ))
+   (magenta    '("#c678dd" "#c678dd" "magenta"      ))
+   (violet     '("#a9a1e1" "#a9a1e1" "brightmagenta"))
+   (cyan       '("#46D9FF" "#46D9FF" "brightcyan"   ))
+   (dark-cyan  '("#5699AF" "#5699AF" "cyan"         ))
+   (coral-popup  '("#a60033" "#f6bfbc" "coral-popup"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      red)
+   (vertical-bar   (doom-lighten bg 0.1))
+   (selection      coral-popup)
+   (builtin        red)
+   (comments       (if doom-peacock-brighter-comments dark-cyan base5)) ;; TODO
+   (doc-comments   (doom-lighten (if doom-peacock-brighter-comments dark-cyan base5) 0.25)) ;; TODO
+   (constants      red)        ;; done
+   (functions      yellow)     ;; done
+   (keywords       teal)       ;; done
+   (methods        yellow)     ;; not sure how to test this.
+   (operators      red)        ;; not showing up on `=` etc.
+   (type           white)      ;;
+   (strings        yellow)
+   (variables      white)      ;; done
+   (numbers        red)        ;; done
+
+   (region         `(,(doom-lighten (car bg-alt) 0.15) ,@(doom-lighten (cdr base0) 0.35)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (-modeline-bright doom-peacock-brighter-modeline)
+   (-modeline-pad
+    (when doom-peacock-padded-modeline
+      (if (integerp doom-peacock-padded-modeline) doom-peacock-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt (doom-blend violet base4 (if -modeline-bright 0.5 0.2)))
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      `(,(doom-darken (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken bg 0.475)
+      `(,(doom-darken (car bg) 0.15) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(doom-darken (car bg) 0.1) ,@(cdr base1)))
+   (modeline-bg-inactive-l (doom-darken bg 0.1)))
+
+
+  ;;;; Base theme face overrides
+  ((font-lock-comment-face
+    :foreground comments
+    :background (if doom-peacock-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (font-lock-doc-face
+    :inherit 'font-lock-comment-face
+    :foreground doc-comments)
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground base7)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; company
+   (company-tooltip            :inherit 'tooltip)
+   (company-tooltip-common                           :foreground highlight)
+   (company-tooltip-search     :background highlight :foreground bg :distant-foreground fg)
+   (company-tooltip-selection  :background selection)
+   (company-tooltip-mouse      :background magenta   :foreground bg :distant-foreground fg)
+   (company-tooltip-annotation                       :foreground violet)
+   (company-scrollbar-bg       :inherit 'tooltip)
+   (company-scrollbar-fg       :background highlight)
+   (company-preview                                  :foreground highlight)
+   (company-preview-common     :background base3 :foreground magenta)
+   (company-preview-search     :inherit 'company-tooltip-search)
+   (company-template-field     :inherit 'match)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; popup
+   (popup-face :inherit 'tooltip)
+   (popup-selection-face :inherit 'tooltip)
+   ;;;; pos-tip
+   (popup-tip-face :inherit 'tooltip)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground teal)
+   (rjsx-attr :foreground red)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l))))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-peacock-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-pine-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-pine-theme.el
new file mode 100644
index 0000000..a5ee040
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-pine-theme.el
@@ -0,0 +1,300 @@
+;; doom-pine-theme.el --- a green flavor of doom-gruvbox -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Date: November 12, 2022
+;; Author: Roman Hargrave <https://github.com/RomanHargrave>
+;; Maintainer:
+;; Source: doom-gruvbox
+;;
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+;;
+(defgroup doom-pine-theme nil
+  "Options for doom-pine."
+  :group 'doom-themes)
+
+(defcustom doom-pine-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-pine-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-pine
+  "Emacs theme for mountain folks."
+
+  ;; name        gui       256       16
+  ((bg         '("#0c1400" "#0f0f0f" nil          )) ; bg0
+   (fg         '("#d5c9b0" "#dfdfdf" "brightwhite")) ; fg/fg1
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#121e00" "#1a1a1a" nil          )) ; bg1
+   (bg-alt2    '("#222b14" "#005f00" nil          )) ; bg2 (for region, selection etc.)
+   (fg-alt     '("#d5c4a1" "#cccccc" "brightwhite")) ; fg2
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#0d1011" "black"   "black"      )) ; (self-defined)
+   (base1      '("#0c1400" "#0c1400" "brightblack")) ; bg0
+   (base2      '("#0c1400" "#0c1400" "brightblack")) ; bg0
+   (base3      '("#121e00" "#121e00" "brightblack")) ; bg1
+   (base4      '("#353e29" "#5f875f" "brightblack")) ; bg3
+   (base5      '("#49503d" "#5f8787" "brightblack")) ; bg4
+   (base6      '("#928374" "#909090" "brightblack")) ; gray
+   (base7      '("#d5c4a1" "#cccccc" "brightblack")) ; fg2
+   (base8      '("#fbf1c7" "#fbfbfb" "brightwhite")) ; fg0
+
+   (grey       '("#928374" "#909090" "brightblack"))   ; gray
+   (red        '("#ce4e2b" "#e74c3c" "red"))           ; bright-red
+   (magenta    '("#cc241d" "#cc241d" "magenta"))       ; red
+   (violet     '("#d3869b" "#d3869b" "brightmagenta")) ; bright-purple
+   (orange     '("#fe8019" "#fd971f" "orange"))        ; bright-orange
+   (yellow     '("#e5aa2b" "#fabd2f" "yellow"))        ; bright-yellow
+   (teal       '("#8ec07c" "#8ec07c" "green"))         ; bright-aqua
+   (green      '("#86914e" "#87af87" "white"))         ;
+   (dark-green '("#98971a" "#98971a" "green"))         ; green
+   (blue       '("#83a598" "#83a598" "brightblue"))    ; bright-blue
+   (dark-blue  '("#458588" "#458588" "blue"))          ; blue
+   (cyan       '("#8ec07c" "#8ec07c" "brightcyan"))    ; bright-aqua
+   (dark-cyan  '("#689d6a" "#689d6a" "cyan"))          ; aqua
+
+   ;; These are the "universal syntax classes" that doom-themes establishes.
+   ;; These *must* be included in every doom themes, or your theme will throw an
+   ;; error, as they are used in the base theme defined in doom-themes-base.
+   (highlight      fg-alt)
+   (vertical-bar   bg-alt2)
+   (selection      bg-alt2)
+   (builtin        orange)
+   (comments       base5)
+   (doc-comments   (doom-lighten fg-alt 0.25))
+   (constants      violet)
+   (functions      cyan)
+   (keywords       red)
+   (methods        cyan)
+   (operators      cyan)
+   (type           yellow)
+   (strings        green)
+   (variables      cyan)
+   (numbers        violet)
+   (region         bg-alt2)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    (doom-darken blue 0.15))
+   (vc-added       (doom-darken green 0.15))
+   (vc-deleted     (doom-darken red 0.15))
+
+   ;; These are extra color variables used only in this theme; i.e. they aren't
+   ;; mandatory for derived themes.
+   (modeline-bg-active   `(,(car bg-alt2)))
+   (modeline-fg-active   `(,(car base4)))
+   (modeline-bg-inactive `(,(car bg-alt)))
+   (modeline-fg-inactive `(,(car fg-alt)))
+
+   (-modeline-pad
+    (when doom-pine-padded-modeline
+      (if (integerp doom-pine-padded-modeline)
+          doom-pine-padded-modeline
+        4)))
+
+   (org-quote `(,(doom-lighten (car bg) 0.05) "#1f1f1f")))
+
+  ;; --- extra faces ------------------------
+  (;;;;;;;; Editor ;;;;;;;;
+   ((secondary-selection &override) :background (doom-lighten base3 0.05))
+   ((default &override) :foreground fg)
+   (cursor :background (doom-lighten bg 0.5))
+   (hl-line :background bg-alt)
+   ((line-number &override) :foreground base5)
+   ((line-number-current-line &override) :background bg-alt2 :foreground fg :bold t)
+
+   ;; Vimish-fold
+   ((vimish-fold-overlay &override) :inherit 'font-lock-comment-face :background bg-alt2 :weight 'light)
+   ((vimish-fold-mouse-face &override) :foreground "white" :background yellow :weight 'light)
+   ((vimish-fold-fringe &override) :foreground magenta :background magenta)
+
+   ;;;;;;;; Doom-modeline ;;;;;;;;
+   (mode-line
+    :background modeline-bg-active :foreground modeline-fg-active
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-active)))
+
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-inactive
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+
+   ;; File-name
+   (doom-modeline-project-dir :bold t :foreground cyan)
+   (doom-modeline-buffer-path :inherit 'bold :foreground green)
+   (doom-modeline-buffer-file :inherit 'bold :foreground fg)
+   (doom-modeline-buffer-modified :inherit 'bold :foreground yellow)
+
+   ;; Misc
+   (doom-modeline-bar :background dark-green)
+
+   ;;;;;;;; Search ;;;;;;;;
+   ;; /find
+   (isearch :foreground base0 :background orange)
+   (evil-search-highlight-persist-highlight-face :background yellow)
+   (lazy-highlight :background yellow :foreground base0 :distant-foreground base0 :bold bold)
+   (evil-ex-substitute-replacement :foreground cyan :inherit 'evil-ex-substitute-matches)
+
+   ;; evil-snipe
+   (evil-snipe-first-match-face :foreground "white" :background yellow)
+   (evil-snipe-matches-face     :foreground yellow :bold t :underline t)
+
+   ;;;;;;;; Mini-buffers ;;;;;;;;
+   (minibuffer-prompt :foreground cyan)
+   (solaire-hl-line-face :background bg-alt2)
+
+   ;; ivy
+   (ivy-current-match :background bg-alt2)
+   (ivy-subdir :background nil :foreground cyan)
+   (ivy-action :background nil :foreground cyan)
+   (ivy-grep-line-number :background nil :foreground cyan)
+   (ivy-minibuffer-match-face-1 :background nil :foreground yellow)
+   (ivy-minibuffer-match-face-2 :background nil :foreground yellow)
+   (ivy-minibuffer-match-highlight :foreground cyan)
+   (counsel-key-binding :foreground cyan)
+
+   ;; swiper
+   (swiper-line-face :background bg-alt2)
+
+   ;; ivy-posframe
+   (ivy-posframe :background bg-alt)
+   (ivy-posframe-border :background base1)
+
+   ;; neotree
+   (neo-root-dir-face   :foreground cyan)
+   (doom-neotree-dir-face :foreground cyan)
+   (neo-dir-link-face   :foreground cyan)
+   (doom-neotree-file-face :foreground fg)
+   (doom-neotree-hidden-file-face :foreground (doom-lighten fg-alt 0.25))
+   (doom-neotree-media-file-face :foreground (doom-lighten fg-alt 0.25))
+   (neo-expand-btn-face :foreground magenta)
+
+   ;; dired
+   (dired-directory :foreground cyan)
+   (dired-marked :foreground yellow)
+   (dired-symlink :foreground cyan)
+   (dired-header :foreground cyan)
+
+   ;;;;;;;; Brackets ;;;;;;;;
+   ;; Rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground red)
+   (rainbow-delimiters-depth-2-face :foreground yellow)
+   (rainbow-delimiters-depth-3-face :foreground cyan)
+   (rainbow-delimiters-depth-4-face :foreground red)
+   (rainbow-delimiters-depth-5-face :foreground yellow)
+   (rainbow-delimiters-depth-6-face :foreground cyan)
+   (rainbow-delimiters-depth-7-face :foreground red)
+   ;; Bracket pairing
+   ((show-paren-match &override) :foreground nil :background base5 :bold t)
+   ((show-paren-mismatch &override) :foreground nil :background "red")
+
+   ;;;;;;;; which-key ;;;;;;;;
+   (which-func :foreground cyan)
+   (which-key-command-description-face :foreground fg)
+   (which-key-group-description-face :foreground (doom-lighten fg-alt 0.25))
+   (which-key-local-map-description-face :foreground cyan)
+
+   ;;;;;;;; Company ;;;;;;;;
+   (company-preview-common :foreground cyan)
+   (company-tooltip-common :foreground cyan)
+   (company-tooltip-common-selection :foreground cyan)
+   (company-tooltip-annotation :foreground cyan)
+   (company-tooltip-annotation-selection :foreground cyan)
+   (company-scrollbar-bg :background bg-alt)
+   (company-scrollbar-fg :background cyan)
+   (company-tooltip-selection :background bg-alt2)
+   (company-tooltip-mouse :background bg-alt2 :foreground nil)
+
+   ;;;;;;;; Misc ;;;;;;;;
+   (+workspace-tab-selected-face :background dark-green :foreground "white")
+
+   ;; Undo tree
+   (undo-tree-visualizer-active-branch-face :foreground cyan)
+   (undo-tree-visualizer-current-face :foreground yellow)
+
+   ;; General UI
+   (button :foreground cyan :underline t :bold t)
+
+   ;; ediff
+   (ediff-fine-diff-A    :background (doom-blend red bg 0.4) :weight 'bold)
+   (ediff-current-diff-A :background (doom-blend red bg 0.2))
+
+   ;; flycheck
+   (flycheck-error   :underline `(:style wave :color ,red)    :background base3)
+   (flycheck-warning :underline `(:style wave :color ,yellow) :background base3)
+   (flycheck-info    :underline `(:style wave :color ,cyan)  :background base3)
+
+   ;; helm
+   (helm-swoop-target-line-face :foreground magenta :inverse-video t)
+
+   ;; magit
+   (magit-section-heading             :foreground yellow :weight 'bold)
+   (magit-branch-current              :underline cyan :inherit 'magit-branch-local)
+   (magit-diff-hunk-heading           :background base3 :foreground fg-alt)
+   (magit-diff-hunk-heading-highlight :background bg-alt2 :foreground fg)
+   (magit-diff-context                :foreground bg-alt :foreground fg-alt)
+
+
+   ;;;;;;;; Major mode faces ;;;;;;;;
+   ;; css-mode / scss-mode
+   (css-proprietary-property :foreground keywords)
+
+   ;; elisp-mode
+   (highlight-quoted-symbol :foreground dark-cyan)
+
+   ;; highlight-symbol
+   (highlight-symbol-face :background (doom-lighten base3 0.03) :distant-foreground fg-alt)
+
+   ;; highlight-thing
+   (highlight-thing :background (doom-lighten base3 0.03) :distant-foreground fg-alt)
+
+   ;; LaTeX-mode
+   (font-latex-math-face :foreground dark-cyan)
+
+   ;; markdown-mode
+   (markdown-blockquote-face :inherit 'italic :foreground cyan)
+   (markdown-list-face :foreground red)
+   (markdown-url-face :foreground red)
+   (markdown-pre-face  :foreground cyan)
+   (markdown-link-face :inherit 'bold :foreground cyan)
+   ((markdown-code-face &override) :background (doom-lighten base2 0.045))
+
+   ;; mu4e-view
+   (mu4e-header-key-face :foreground red)
+
+   ;; org-mode
+   ((outline-1 &override) :foreground yellow)
+   ((outline-2 &override) :foreground cyan)
+   ((outline-3 &override) :foreground cyan)
+   (org-ellipsis :underline nil :foreground orange)
+   (org-tag :foreground yellow :bold nil)
+   ((org-quote &override) :inherit 'italic :foreground base7 :background org-quote)
+   (org-todo :foreground yellow :bold 'inherit)
+   (org-list-dt :foreground yellow)
+
+   ;; web-mode
+   (web-mode-html-tag-bracket-face :foreground blue)
+   (web-mode-html-tag-face         :foreground cyan)
+   (web-mode-html-attr-name-face   :foreground cyan)
+   (web-mode-json-key-face         :foreground green)
+   (web-mode-json-context-face     :foreground cyan))
+  ;; --- extra variables --------------------
+  ;; ()
+  )
+
+;;; doom-pine-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-plain-dark-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-plain-dark-theme.el
new file mode 100644
index 0000000..382c9bb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-plain-dark-theme.el
@@ -0,0 +1,156 @@
+;;; doom-plain-dark-theme.el --- inspired by gko's plain theme for VSCode -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: February 4, 2021 (#558)
+;; Author: das-s <https://github.com/das-s>
+;; Maintainer:
+;; Source: https://github.com/gko/plain/
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-plain-dark-theme nil
+  "Options for the `doom-plain-dark' theme."
+  :group 'doom-themes)
+
+(defcustom doom-plain-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-plain-dark-theme
+  :type 'boolean)
+
+(defcustom doom-plain-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-plain-dark-theme
+  :type '(or integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-plain-dark
+  "Theme inspired by gko's plain dark."
+  :family 'doom-plain
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  ((bg         '("#222222" nil       nil ))
+   (bg-alt     (doom-lighten bg 0.15))
+   (base0      '("#838083" nil nil ))
+   (base1      '("#0e0c0a" nil nil ))
+   (base2      '("#bbbbbb" nil nil ))
+   (base3      '("#444444" nil nil ))
+   (base4      '("#202020" nil nil ))
+   (base5      '("#545053" nil nil ))
+   (base6      '("#050505" nil nil ))
+   (base7      '("#ffdddd" nil nil ))
+   (base8      '("#050505" nil nil ))
+   (fg         '("#d7d5d1" nil nil ))
+   (fg-alt     '("#e7e5e3" nil nil ))
+
+   (grey       fg)
+   (red        fg)
+   (blue       fg)
+   (dark-blue  fg)
+   (orange     fg)
+   (green      fg)
+   (teal       fg)
+   (yellow     fg)
+   (magenta    fg)
+   (violet     fg)
+   (cyan       fg)
+   (dark-cyan  fg)
+
+   ;; face categories -- required for all themes
+   (highlight      base2)
+   (vertical-bar   fg)
+   (selection      base1)
+   (builtin        base0)
+   (comments       base5)
+   (doc-comments   base5)
+   (constants      base0)
+   (functions      fg)
+   (keywords       fg)
+   (methods        fg)
+   (operators      fg)
+   (type           fg)
+   (strings        base0)
+   (variables      base0)
+   (numbers        base0)
+   (region         base1)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    (doom-darken fg 0.4))
+   (vc-added       (doom-lighten fg 0.4))
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-plain-brighter-modeline)
+   (-modeline-pad
+    (when doom-plain-padded-modeline
+      (if (integerp doom-plain-padded-modeline) doom-plain-padded-modeline 4)))
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.475)
+      `(,(doom-darken (car bg-alt) 0.15) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      `(,(doom-darken (car bg-alt) 0.1) ,@(cdr base0))))
+   (modeline-bg-inactive   (doom-darken bg-alt 0.25))
+   (modeline-bg-inactive-l `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt (doom-lighten modeline-bg-inactive 0.3)))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-constant-face &override)      :slant 'italic)
+   ((font-lock-comment-face &override)       :slant 'italic)
+   ((font-lock-function-name-face &override) :slant 'italic)
+   ((font-lock-type-face &override)          :slant 'italic)
+   (hl-line :background base8)
+   ((line-number &override) :foreground base3)
+   ((line-number-current-line &override) :foreground base2)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; lsp-mode
+   (lsp-headerline-breadcrumb-symbols-face :foreground keywords :weight 'bold)
+   ;;;; outline <built-in>
+   (outline-1 :slant 'italic :foreground fg-alt)
+   (outline-2 :inherit 'outline-1 :foreground base2)
+   (outline-3 :inherit 'outline-2)
+   (outline-4 :inherit 'outline-3)
+   (outline-5 :inherit 'outline-4)
+   (outline-6 :inherit 'outline-5)
+   (outline-7 :inherit 'outline-6)
+   (outline-8 :inherit 'outline-7)
+   ;;;; org <built-in>
+   ((org-block &override) :background base3)
+   ((org-block-begin-line &override) :foreground base2)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))))
+
+;;; doom-plain-dark-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-plain-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-plain-theme.el
new file mode 100644
index 0000000..340284e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-plain-theme.el
@@ -0,0 +1,155 @@
+;;; doom-plain-theme.el --- inspired by gko's plain theme for VSCode -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: February 4, 2021 (#558)
+;; Author: das-s <https://github.com/das-s>
+;; Maintainer:
+;; Source: https://github.com/gko/plain/
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-plain-theme nil
+  "Options for the `doom-plain' theme."
+  :group 'doom-themes)
+
+(defcustom doom-plain-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-plain-theme
+  :type '(or integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-plain
+  "Theme inspired by gko's plain."
+  :family 'doom-plain
+  :background-mode 'light
+
+  ;; name      default/256/16
+  ((bg         '("#ffffff"))
+   (bg-alt     '("#f3f3f3"))
+   (base0      '("#969896"))
+   (base1      '("#f1f3f5"))
+   (base2      '("#444444"))
+   (base3      '("#cccccc"))
+   (base4      '("#e7e7e7"))
+   (base5      '("#c5c8c6"))
+   (base6      '("#fafafa"))
+   (base7      '("#dfdfdf"))
+   (base8      '("#fafafa"))
+   (fg         '("#282a2e"))
+   (fg-alt     (doom-lighten fg 0.15))
+
+   (grey       fg)
+   (red        fg)
+   (blue       fg)
+   (dark-blue  fg)
+   (orange     fg)
+   (green      fg)
+   (teal       fg)
+   (yellow     fg)
+   (magenta    fg)
+   (violet     fg)
+   (cyan       fg)
+   (dark-cyan  fg)
+
+   ;; face categories -- required for all themes
+   (highlight      base2)
+   (vertical-bar   base5)
+   (selection      base1)
+   (builtin        base0)
+   (comments       base5)
+   (doc-comments   base5)
+   (constants      base0)
+   (functions      fg)
+   (keywords       fg)
+   (methods        fg)
+   (operators      fg)
+   (type           fg)
+   (strings        base0)
+   (variables      base0)
+   (numbers        base0)
+   (region         base4)
+   (error          (doom-blend fg "#ff0000" 0.4))
+   (warning        base2)
+   (success        green)
+   (vc-modified    base5)
+   (vc-added       (doom-lighten fg 0.7))
+   (vc-deleted     base2)
+
+   ;; custom categories
+   (-modeline-pad
+    (when doom-plain-padded-modeline
+      (if (integerp doom-plain-padded-modeline) doom-plain-padded-modeline 4)))
+
+   (modeline-bg              (doom-darken bg-alt 0.15))
+   (modeline-bg-alt          (doom-darken bg-alt 0.1))
+   (modeline-bg-inactive     (doom-darken bg-alt 0.1))
+   (modeline-bg-inactive-alt bg-alt)
+   (modeline-fg              fg)
+   (modeline-fg-alt          (doom-darken modeline-bg-inactive 0.35)))
+
+  ;;;; Base theme face overrides
+  ((error   :underline `(:style wave :color ,error))
+   (warning :underline `(:style wave :color ,warning))
+   ((font-lock-constant-face &override)      :slant 'italic)
+   ((font-lock-comment-face &override)       :slant 'italic)
+   ((font-lock-function-name-face &override) :slant 'italic)
+   ((font-lock-type-face &override)          :slant 'italic)
+   (hl-line :background base8)
+   ((line-number &override) :foreground base3)
+   ((line-number-current-line &override) :foreground base2)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground highlight)
+
+   ;;;; doom-modeline
+   (doom-modeline-bar :background modeline-bg)
+   (doom-modeline-bar-inactive :inherit 'doom-modeline-bar)
+   (doom-modeline-project-dir :foreground fg)
+   (doom-modeline-buffer-file :foreground fg)
+   (doom-modeline-buffer-modified :weight 'bold :foreground "#000000")
+   (doom-modeline-panel :inherit 'mode-line-highlight :background base3 :foreground fg)
+   ;;;; ivy
+   (ivy-posframe :background bg-alt)
+   ;;;; magit
+   ((magit-diff-added-highlight &override)   :foreground fg :background (doom-blend vc-added bg 0.3))
+   ((magit-diff-removed &override)           :foreground (doom-lighten fg 0.4) :background (doom-blend vc-deleted bg 0.1))
+   ((magit-diff-removed-highlight &override) :foreground fg :background (doom-blend vc-deleted bg 0.22))
+   ;;;; lsp-mode
+   (lsp-headerline-breadcrumb-symbols-face :foreground keywords :weight 'bold)
+   ;;;; outline <built-in>
+   (outline-1 :slant 'italic :foreground fg-alt)
+   (outline-2 :inherit 'outline-1 :foreground base2)
+   (outline-3 :inherit 'outline-2)
+   (outline-4 :inherit 'outline-3)
+   (outline-5 :inherit 'outline-4)
+   (outline-6 :inherit 'outline-5)
+   (outline-7 :inherit 'outline-6)
+   (outline-8 :inherit 'outline-7)
+   ;;;; org <built-in>
+   ((org-block &override) :background bg-alt)
+   ((org-block-begin-line &override) :foreground base5)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt)))))
+
+;;; doom-plain-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-rouge-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-rouge-theme.el
new file mode 100644
index 0000000..71101ec
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-rouge-theme.el
@@ -0,0 +1,207 @@
+;;; doom-rouge-theme.el --- ported from VSCode's Rouge Theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: March 20, 2020 (#418)
+;; Author: das-s <https://github.com/das-s>
+;; Maintainer:
+;; Source: https://github.com/josefaidt/rouge-theme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-rouge-theme nil
+  "Options for the `doom-rouge' theme."
+  :group 'doom-themes)
+
+(defcustom doom-rouge-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-rouge-theme
+  :type 'boolean)
+
+(defcustom doom-rouge-brighter-tabs t
+  "If non-nil, tabs will a more vivid background color."
+  :group 'doom-rouge-theme
+  :type 'boolean)
+
+(defcustom doom-rouge-comment-bg nil
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-rouge-theme
+  :type 'boolean)
+
+(defcustom doom-rouge-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-rouge-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-rouge
+  "A dark theme ported from VS Code's Rouge."
+
+  ;; name        default   256       16
+  ((bg         '("#172030" nil       nil            )) ;; modified
+   (bg-alt     '("#101828" nil       nil            ))
+   (base0      '("#070A0E" "black"   "black"        ))
+   (base1      '("#0E131D" "#1e1e1e" "brightblack"  ))
+   (base2      '("#151D2B" "#2e2e2e" "brightblack"  ))
+   (base3      '("#1F2A3F" "#262626" "brightblack"  ))
+   (base4      '("#5D636E" "#3f3f3f" "brightblack"  ))
+   (base5      '("#64727d" "#64727d" "brightblack"  ))
+   (base6      '("#B16E75" "#6b6b6b" "brightblack"  ))
+   (base7      '("#E8E9EB" "#979797" "brightblack"  ))
+   (base8      '("#F0F4FC" "#dfdfdf" "white"        ))
+   (fg         '("#FAFFF6"    "#bbb"    "white"        ))
+   (fg-alt     '("#A7ACB9" "#bfbfbf" "brightwhite"  ))
+
+   (grey       base5)
+   (red        '("#c6797e" "#c6797e" "red"          ))
+   (light-red  '("#DB6E8F" "#DB6E8F" "red"          ))
+   (orange     '("#eabe9a" "#eabe9a" "brightred"    ))
+   (green      '("#A3B09A" "#A3B9A4" "green"        ))
+   (teal       '("#7ea9a9" "#7ea9a9" "brightgreen"  ))
+   (yellow     '("#F7E3AF" "#F7E3AF" "yellow"       ))
+   (blue       '("#6e94b9" "#6e94b9" "brightblue"   ))
+   (dark-blue  '("#1E6378" "#1E6378" "blue"         ))
+   (magenta    '("#b18bb1" "#b18bb1" "magenta"      ))
+   (salmon     '("#F9B5AC" "#F9B5AC" "orange"       ))
+   (violet     '("#5D80AE" "#5D80AE" "brightmagenta"))
+   (cyan       '("#88C0D0" "#88C0D0" "brightcyan"   ))
+   (dark-cyan  '("#507681" "#507681" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      base6)
+   (vertical-bar   (doom-darken base1 0.2))
+   (selection      base4)
+   (builtin        light-red)
+   (comments       (if doom-rouge-brighter-comments violet grey))
+   (doc-comments   green)
+   (constants      red)
+   (functions      salmon)
+   (keywords       magenta)
+   (methods        light-red)
+   (operators      magenta)
+   (type           red)
+   (strings        green)
+   (variables      red)
+   (numbers        orange)
+   (region         base4)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-pad
+    (when doom-rouge-padded-modeline
+      (if (integerp doom-rouge-padded-modeline) doom-rouge-padded-modeline 4)))
+
+   (tabs-bg (if doom-rouge-brighter-tabs base6 bg))
+   (tabs-fg (if doom-rouge-brighter-tabs base8 fg))
+   (tabs-bar-bg (if doom-rouge-brighter-tabs bg red))
+   (tabs-marker (if doom-rouge-brighter-tabs base8 highlight))
+
+   (modeline-fg 'unspecified)
+   (modeline-fg-alt base6)
+   (modeline-bg base1)
+   (modeline-bg-l `(,(doom-darken (car bg) 0.1) ,@(cdr base0)))
+   (modeline-bg-inactive   (doom-darken bg 0.1))
+   (modeline-bg-inactive-l `(,(car bg) ,@(cdr base1))))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-rouge-comment-bg bg-alt 'unspecified)
+    :slant 'italic)
+   ((font-lock-keyword-face &override) :slant 'italic)
+   (font-lock-preprocessor-face :foreground magenta :slant 'italic)
+   (lazy-highlight :background base4)
+   ((line-number &override) :foreground (doom-lighten 'base5 0.2))
+   ((line-number-current-line &override) :foreground base7)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground highlight)
+   (tooltip :background base3 :foreground fg-alt)
+   (vertical-border :foreground base6)
+
+   ;;;; centuar-tabs
+   (centaur-tabs-selected :foreground tabs-fg :background tabs-bg)
+   (centaur-tabs-selected-modified :foreground tabs-fg :background tabs-bg)
+   (centaur-tabs-unselected-modified :foreground tabs-fg :background bg)
+   (centaur-tabs-active-bar-face :background tabs-bar-bg)
+   (centaur-tabs-modified-marker-selected :inherit 'centaur-tabs-selected :foreground tabs-marker)
+   (centaur-tabs-modified-marker-unselected :inherit 'centaur-tabs-unselected :foreground tabs-marker)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-project-root-dir :foreground base6)
+   ;;;; doom-themes
+   (doom-themes-treemacs-root-face :foreground highlight :weight 'ultra-bold :height 1.2)
+   (doom-themes-treemacs-file-face :foreground highlight)
+   ;;;; ediff <built-in>
+   (ediff-fine-diff-A    :background (doom-darken violet 0.4) :weight 'bold)
+   (ediff-current-diff-A :background (doom-darken base0 0.25))
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; highlight-symbol
+   (highlight-symbol-face :background region :distant-foreground fg-alt)
+   ;;;; highlight-thing
+   (highlight-thing :background region :distant-foreground fg-alt)
+   ;;;; ivy
+   (ivy-current-match :background base3)
+   (ivy-minibuffer-match-face-2 :foreground highlight :weight 'extra-bold)
+   ;;;; ivy-posframe
+   (ivy-posframe :background bg-alt)
+   (ivy-posframe-border :background highlight)
+   ;;;; magit
+   (magit-diff-hunk-heading           :foreground bg                    :background (doom-blend highlight bg 0.3) :extend t)
+   (magit-diff-hunk-heading-highlight :foreground bg                    :background highlight :weight 'bold :extend t)
+   (magit-section-heading :foreground highlight)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; mic-paren
+   ((paren-face-match &override) :foreground red :background base3 :weight 'ultra-bold)
+   ((paren-face-mismatch &override) :foreground base3 :background red :weight 'ultra-bold)
+   ;;;; neotree
+   (neo-root-dir-face :foreground red)
+   ;;;; org <built-in>
+   (org-hide :foreground hidden)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; treemacs
+   (treemacs-root-face :foreground highlight :weight 'ultra-bold :height 1.2)
+   (treemacs-directory-face :foreground highlight)
+   ;;;; vimish-fold
+   ((vimish-fold-overlay &override) :inherit 'font-lock-comment-face :background base3 :weight 'light)
+   ((vimish-fold-fringe &override)  :foreground teal))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-rouge-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-shades-of-purple-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-shades-of-purple-theme.el
new file mode 100644
index 0000000..4ef3729
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-shades-of-purple-theme.el
@@ -0,0 +1,303 @@
+;;; doom-shades-of-purple-theme.el --- a port of VSCode's Shades of Purple -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 22, 2021 (#521)
+;; Author: jwbaldwin <https://github.com/jwbaldwin>
+;; Maintainer:
+;; Source: https://github.com/jwbaldwin/spacemacs-shades-of-purple
+;; Source: https://github.com/ahmadawais/shades-of-purple-vscode
+;;
+;;; Commentary:
+;;
+;; Background            #2D2B55   #2D2B55
+;; Background Dark       #1E1E3F   #1E1E3F
+;; Foreground            #A599E9   #A599E9
+;; Hover Background      #4D21FC   #4D21FC
+;; Contrast              #FAD000   #FAD000
+;; Contrast Lite         #FFEE80   #FFEE80
+;; Contrast Lite II      #FAEFA5   #FAEFA5
+;; Highlight             #FF7200   #FF7200
+;; Comment               #B362FF   #B362FF
+;; Constants             #FF628C   #FF628C
+;; Keywords              #FF9D00   #FF9D00
+;; Other                 #9EFFFF   #9EFFFF
+;; Strings               #A5FF90   #A5FF90
+;; Templates             #3AD900   #3AD900
+;; Definitions           #FB94FF   #FB94FF
+;; Invalid               #EC3A37F5 #EC3A37F5
+;; Diff Added            #00FF009A #00FF009A
+;; Diff Removed          #FF000D81 #FF000D81
+;;
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-shades-of-purple-theme nil
+  "Options for the `doom-shades-of-purple' theme."
+  :group 'doom-themes)
+
+(defcustom doom-shades-of-purple-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-shades-of-purple-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-shades-of-purple
+  "A dark theme inspired by VS code's shades-of-purple"
+
+  ;; name        default   256       16
+  ((bg         '("#2d2b55" "#2d2b55"  "black"))
+   (bg-alt     '("#1e1e3f" "#1e1e3f" "black"))
+   (base0      '("#161a2a" "#161a2a" "black"))
+   (base1      '("#191a2a" "#191a2a" "brightblack"))
+   (base2      '("#1e2030" "#1e2030" "brightblack"))
+   (base3      '("#222436" "#222436" "brightblack"))
+   (base4      '("#a599e9" "#a599e9" "brightblack"))
+   (base5      '("#444a73" "#444a73" "brightblack"))
+   (base6      '("#828bb8" "#828bb8" "brightblack"))
+   (base7      '("#a9b8e8" "#a9b8e8" "brightblack"))
+   (base8      '("#b4c2f0" "#b4c2f0" "white"))
+   (indigo     '("#7a88cf" "#7a88cf" "brightblack"))
+   (region     '("#b362ff" "#b362ff" "brightblack"))
+   (selection  '("#b362ff" "#b362ff" "brightblack"))
+   (fg         '("#e3e9fa" "#e3e9fa" "brightwhite"))
+   (fg-alt     '("#b4c2f0" "#b4c2f0" "white"))
+
+   (grey base5)
+
+   (dark-red      '("#ff5370" "#ff5370" "red"))
+   (red           '("#ff000d" "#ff000d" "red"))
+   (light-red     '("#ff98a4" "#ff98a4" "brightred"))
+   (orange        '("#ff9d00" "#ff9d00" "brightred"))
+   (light-green   '("#a5ff90" "#a5ff90" "green"))
+   (green         '("#3ad900" "#3ad900" "green"))
+   (dark-green    '("#00ff00" "#00ff00" "green"))
+   (dark-teal     '("#37fea1" "#37fea1" "green"))
+   (teal          '("#ff628c" "#ff628c" "brightgreen"))
+   (light-teal    '("#7af8ca" "#7af8ca" "brightgreen"))
+   (yellow        '("#fad000" "#fad000" "brightyellow"))
+   (blue          '("#82aaff" "#82aaff" "brightblue"))
+   (dark-blue     '("#4976eb" "#4976eb" "brightblue"))
+   (light-blue    '("#50c4fa" "#50c4fa" "blue"))
+   (light-magenta '("#baacff" "#baacff" "brightmagenta"))
+   (magenta       '("#ff9d00" "#ff9d00" "brightmagenta"))
+   (violet        '("#f989d3" "#f989d3" "magenta"))
+   (light-pink    '("#fb94ff" "#fb94ff" "magenta"))
+   (pink          '("#ff628c" "#ff628c" "magenta"))
+   (cyan          '("#ff628c" "#ff628c" "brightcyan"))
+   (dark-cyan     '("#9effff" "#9effff" "cyan"))
+   (purple        '("#b362ff" "#b362ff" "magenta"))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   bg-alt)
+   (line-highlight bg-alt)
+   (selection      selection)
+   (builtin        magenta)
+   (comments       purple)
+   (doc-comments   (doom-lighten comments 0.25))
+   (constants      light-pink)
+   (functions      (doom-lighten yellow 0.15))
+   (keywords       orange)
+   (methods        yellow)
+   (operators      orange)
+   (type           green)
+   (strings        light-green)
+   (variables      dark-teal)
+   (numbers        orange)
+   (region         region)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    blue)
+   (vc-added       dark-green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (modeline-bg     (doom-darken bg-alt 0.1))
+   (modeline-bg-alt (doom-darken bg 0.1))
+   (modeline-fg     base8)
+   (modeline-fg-alt comments)
+
+   (-modeline-pad
+    (when doom-shades-of-purple-padded-modeline
+      (if (integerp doom-shades-of-purple-padded-modeline) doom-shades-of-purple-padded-modeline 4))))
+
+  ;;;; Base theme face overrides
+  (;;;; emacs
+   (font-lock-keyword-face :foreground keywords)
+   (font-lock-comment-face :foreground comments)
+   (font-lock-doc-face :foreground doc-comments)
+   (fringe :background bg)
+   (lazy-highlight :background purple :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (tooltip :background base0 :foreground fg)
+   ((line-number &override) :foreground base5)
+   ((line-number-current-line &override) :foreground fg :background line-highlight)
+
+   ;;;; linum
+   ((linum &inherit line-number))
+   ;;;; doom-modeline
+   (doom-modeline-buffer-file       :foreground base7)
+   (doom-modeline-icon-inactive     :foreground indigo)
+   (doom-modeline-evil-normal-state :foreground dark-cyan)
+   (doom-modeline-evil-insert-state :foreground yellow)
+   (doom-modeline-project-dir       :foreground light-teal)
+   (doom-modeline-buffer-path       :foreground blue)
+   (doom-modeline-buffer-modified :inherit 'bold :foreground yellow)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path)
+   ;;;; hl-line <built-in>
+   (hl-line :background line-highlight)
+   ;;;; message <built-in>
+   (message-header-name       :foreground green)
+   (message-header-subject    :foreground highlight :weight 'bold)
+   (message-header-to         :foreground highlight :weight 'bold)
+   (message-header-cc         :inherit 'message-header-to :foreground (doom-darken highlight 0.15))
+   (message-header-other      :foreground violet)
+   (message-header-newsgroups :foreground yellow)
+   (message-header-xheader    :foreground doc-comments)
+   (message-separator         :foreground comments)
+   (message-mml               :foreground comments :slant 'italic)
+   (message-cited-text        :foreground magenta)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; nix-mode
+   (nix-attribute-face :foreground blue)
+   (nix-builtin-face :foreground dark-teal)
+   ;;;; man <built-in>
+   (Man-overstrike :inherit 'bold :foreground magenta)
+   (Man-underline :inherit 'underline :foreground blue)
+   ;;;; lsp-mode
+   (lsp-face-highlight-read :background region)
+   (lsp-face-highlight-textual :background region)
+   (lsp-face-highlight-write :background region)
+   (lsp-face-semhl-type-primative :foreground orange)
+   (lsp-face-semhl-method :foreground magenta)
+   ;;;; js2-mode
+   (js2-jsdoc-tag              :foreground magenta)
+   (js2-object-property        :foreground dark-teal)
+   (js2-object-property-access :foreground fg-alt)
+   (js2-function-param         :foreground pink)
+   (js2-jsdoc-type             :foreground base8)
+   (js2-jsdoc-value            :foreground cyan)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground light-blue)
+   ((outline-2 &override) :foreground dark-cyan)
+   ((outline-3 &override) :foreground light-red)
+   ((outline-4 &override) :foreground blue)
+   ((outline-5 &override) :foreground magenta)
+   ((outline-6 &override) :foreground red)
+   ((outline-7 &override) :foreground violet)
+   ;;;; org-mode <built-in>
+   ((org-block &override) :background base2)
+   ((org-block-background &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   ;;;; rjsx-mode
+   (rjsx-tag :foreground violet)
+   (rjsx-attr :foreground yellow :slant 'italic :weight 'medium)
+   ;;;; all-the-icons
+   (all-the-icons-cyan       :foreground dark-cyan)
+   (all-the-icons-cyan-alt   :foreground dark-cyan)
+   (all-the-icons-dblue      :foreground (doom-darken blue 0.1))
+   (all-the-icons-dcyan      :foreground dark-cyan)
+   (all-the-icons-dgreen     :foreground dark-teal)
+   (all-the-icons-dmaroon    :foreground magenta)
+   (all-the-icons-dorange    :foreground orange)
+   (all-the-icons-dpink      :foreground pink)
+   (all-the-icons-dpurple    :foreground magenta)
+   (all-the-icons-dred       :foreground dark-red)
+   (all-the-icons-dsilver    :foreground grey)
+   (all-the-icons-dyellow    :foreground orange)
+   (all-the-icons-green      :foreground teal)
+   (all-the-icons-lcyan      :foreground (doom-lighten dark-cyan 0.3))
+   (all-the-icons-lgreen     :foreground green)
+   (all-the-icons-lmaroon    :foreground light-magenta)
+   (all-the-icons-lorange    :foreground orange)
+   (all-the-icons-lpink      :foreground light-pink)
+   (all-the-icons-lpurple    :foreground light-magenta)
+   (all-the-icons-lred       :foreground light-red)
+   (all-the-icons-lsilver    :foreground (doom-lighten grey 0.4))
+   (all-the-icons-lyellow    :foreground (doom-lighten yellow 0.3))
+   (all-the-icons-pink       :foreground pink)
+   (all-the-icons-purple     :foreground magenta)
+   (all-the-icons-purple-alt :foreground magenta)
+   (all-the-icons-red-alt    :foreground red)
+   (all-the-icons-silver     :foreground (doom-lighten grey 0.2))
+   ;;;; all-the-icons-dired
+   (all-the-icons-dired-dir-face :foreground indigo)
+   ;;;; company
+   (company-tooltip :inherit 'tooltip)
+   (company-tooltip-common :foreground highlight)
+   ;;;; company-box
+   (company-box-annotation :foreground base7)
+   ;;;; doom-emacs
+   (doom-dashboard-menu-desc :foreground dark-cyan)
+   (doom-dashboard-menu-tile :foreground dark-teal)
+   ;;;; diredfl
+   (diredfl-date-time    :foreground blue)
+   (diredfl-file-name    :foreground base7)
+   (diredfl-file-suffix  :foreground base6)
+   (diredfl-symlink      :foreground dark-cyan)
+   ;;;; dired+
+   (diredp-number :foreground orange)
+   ;;;; dired-k
+   (dired-k-commited :foreground base4)
+   (dired-k-modified :foreground vc-modified)
+   (dired-k-ignored  :foreground cyan)
+   (dired-k-added    :foreground vc-added)
+   ;;;; magit
+   (magit-filename :foreground teal)
+   ;;;; markdown-mode
+   (markdown-header-face           :inherit 'bold :foreground yellow)
+   (markdown-header-delimiter-face :inherit 'markdown-header-face)
+   (markdown-metadata-key-face     :foreground magenta :inherit 'italic)
+   (markdown-list-face             :foreground red)
+   (markdown-url-face              :inherit 'underline :foreground orange)
+   (markdown-gfm-checkbox-face     :foreground blue)
+   (markdown-blockquote-face       :inherit 'italic :foreground fg)
+   ;;;; nav-flash
+   (nav-flash-face :background region)
+   ;;;; ivy-posframe
+   (ivy-posframe :background base0)
+   (ivy-posframe-border :background base0)
+   ;;;; popup
+   (popup-face :inherit 'tooltip)
+   (popup-selection-face :inherit 'tooltip)
+   ;;;; pos-tip
+   (popup          :inherit 'tooltip)
+   (popup-tip-face :inherit 'tooltip)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground magenta)
+   (rainbow-delimiters-depth-2-face :foreground orange)
+   (rainbow-delimiters-depth-3-face :foreground light-red)
+   (rainbow-delimiters-depth-4-face :foreground cyan)
+   (rainbow-delimiters-depth-5-face :foreground violet)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground blue)
+   (rainbow-delimiters-depth-8-face :foreground teal)
+   (rainbow-delimiters-depth-9-face :foreground dark-cyan)
+   ;;;; treemacs
+   (treemacs-directory-face :foreground highlight)
+   (treemacs-git-modified-face :foreground highlight)
+   ;;;; workspaces
+   (+workspace-tab-selected-face :background region :foreground blue)
+   ;;;; which-key
+   (which-key-command-description-face :foreground fg)
+   (which-key-group-description-face :foreground magenta)
+   (which-key-local-map-description-face :foreground cyan)))
+
+;;; doom-shades-of-purple-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-snazzy-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-snazzy-theme.el
new file mode 100644
index 0000000..e884974
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-snazzy-theme.el
@@ -0,0 +1,114 @@
+;;; doom-snazzy-theme.el --- inspired by Hyper Snazzy -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: July 30, 2019 (#313)
+;; Author: ar1a <https://github.com/ar1a>
+;; Maintainer:
+;; Source: https://github.com/sindresorhus/hyper-snazzy
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+;; Compiler pacifier
+(defvar modeline-bg)
+
+
+;;
+;;; Variables
+
+(defgroup doom-snazzy-theme nil
+  "Options for the `doom-snazzy' theme."
+  :group 'doom-themes)
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-snazzy
+  "A dark theme inspired by Atom Snazzy Dark"
+
+  ;; name        default   256       16
+  ((bg         '("#282a36" "#282a36" nil          )) ;; this is the background for the hl-line, modeline, and minibuffer
+   (bg-alt     '("#242631" "#242631" nil          )) ;; this is the background for the line you arent currently on
+   (base0      '("#282a36" "#282a36" "black"      ))
+   (base1      '("#34353e" "#34353e" "brightblack"))
+   (base2      '("#43454f" "#43454f" "brightblack"))
+   (base3      '("#78787e" "#78787e" "brightblack"))
+   (base4      '("#a5a5a9" "#a5a5a9" "brightblack"))
+   (base5      '("#e2e4e5" "#e2e4e5" "brightblack"))
+   (base6      '("#eff0eb" "#eff0eb" "brightblack"))
+   (base7      '("#f1f1f0" "#f1f1f0" "brightblack"))
+   (base8      '("#ff5c57" "#ff5c57" "white"      ))
+   (fg         '("#f9f9f9" "#f9f9f9" "white"      ))
+   (fg-alt     '("#d1d1d1" "#d1d1d1" "brightwhite"))
+
+   (ui0 '("#848688" "#848688" "grey"))
+   (ui1 '("#606580" "#606580" "grey"))
+   (ui2 '("#3a3d4d" "#3a3d4d" "grey"))
+   (ui3 '("#1c1e27" "#1c1e27" "black"))
+
+   (grey       ui0)
+   (red        '("#ff5c57" "#ff5c57" "red"          ))
+   (green      '("#5af78e" "#5af78e" "brightred"    ))
+   (yellow     '("#f3f99d" "#f3f99d" "green"        ))
+   (blue       '("#57c7ff" "#57c7ff" "brightgreen"  ))
+   (dark-blue  '("#459fcc" "#459fcc" "yellow"       ))
+   (magenta    '("#ff6ac1" "#ff6ac1" "brightblue"   ))
+   (cyan       '("#9aedfe" "#9aedfe" "blue"         ))
+   (violet     '("#bd93f9" "#bd93f9" "magenta"      ))
+   (orange     '("#ffb86c" "#ffb86c" "brightmagenta"))
+   (teal       '("#aad4d3" "#aad4d3" "brightcyan"   ))
+   (dark-cyan  '("#82c9d7" "#82c9d7" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue) ;; when searching with (/) ?
+   (vertical-bar   (doom-darken base1 0.1)) ; the bar that separates modeline and minibuffer?
+   (selection      dark-blue)  ; for like company autocomplete and stuff
+   (builtin        magenta)    ; saw this in company autocomplete if i moved my mouse
+   ;; over it
+   (comments       ui1) ;; comments
+   (doc-comments (doom-lighten yellow 0.25)) ;; easy to test with elisp
+   ;; documentation or git commit
+   ;; first line thing
+   (constants      green)
+   (functions      blue)
+   (keywords       orange)
+   (methods        blue) ;; wtf is the difference between this and function?
+   (operators      magenta)
+   (type           cyan)
+   (strings        yellow)
+   ;; (variables      (doom-lighten magenta 0.4))
+   (variables      red)
+   (numbers        yellow)
+   (region         `(,(doom-lighten (car bg-alt) 0.15) ,@(doom-lighten (cdr base0) 0.35)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    yellow)
+   (vc-added       green)
+   (vc-deleted     red))
+
+
+  ;;;; Base theme face overrides
+  ((line-number :foreground ui2)
+   (line-number-current-line :foreground fg)
+   ;; i have no idea what im doing with the modeline
+   (mode-line :background (doom-darken bg-alt 0.15))
+   (mode-line-inactive :background (doom-darken bg-alt 0.1) :foreground base5)
+   (tooltip :background (doom-darken bg-alt 0.2) :foreground fg)
+
+   ;;;; doom-modeline
+   (doom-modeline-bar :background highlight)
+   ;;;; ivy-posframe
+   (ivy-posframe-border :background ui3)
+   ;;;; outline <built-in>
+   ((outline-3 &override) :foreground dark-blue)
+   ;;;; org <built-in>
+   ((org-block &override) :background bg-alt)
+   ((org-block-begin-line &override) :background bg-alt)
+   ((org-block-end-line &override)   :background bg-alt)
+   ;;;; rjsx-mode
+   (rjsx-text :foreground fg)))
+
+;;; doom-snazzy-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-solarized-dark-high-contrast-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-solarized-dark-high-contrast-theme.el
new file mode 100644
index 0000000..4afc22b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-solarized-dark-high-contrast-theme.el
@@ -0,0 +1,228 @@
+;;; doom-solarized-dark-high-contrast-theme.el --- a high-contrast variant of Solarized Dark -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 29, 2021 (#558)
+;; Author: jmorag <https://github.com/jmorag>
+;; Maintainer:
+;; Source: https://github.com/bbatsov/solarized-emacs
+;; Source: https://ethanschoonover.com/solarized
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-solarized-dark-high-contrast-theme nil
+  "Options for the `doom-solarized-dark-high-contrast' theme."
+  :group 'doom-themes)
+
+(defcustom doom-solarized-dark-high-contrast-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-solarized-dark-high-contrast-theme
+  :type 'boolean)
+
+(defcustom doom-solarized-dark-high-contrast-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-solarized-dark-high-contrast-theme
+  :type 'boolean)
+
+(defcustom doom-solarized-dark-high-contrast-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-solarized-dark-high-contrast-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-solarized-dark-high-contrast
+  "A dark theme inspired by VS Code Solarized Dark"
+  :family 'doom-solarized
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  ((bg         '("#002732" "#002732" "black"      ))
+   (fg         '("#8d9fa1" "#8d9fa1" "brightwhite"))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#00212B" "#00212B" "black"       ))
+   (fg-alt     '("#60767e" "#60767e" "white"       ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#01323d" "#01323d" "black"       ))
+   (base1      '("#03282F" "#03282F" "brightblack" ))
+   (base2      '("#00212C" "#00212C" "brightblack" ))
+   (base3      '("#13383C" "#13383C" "brightblack" ))
+   (base4      '("#56697A" "#56697A" "brightblack" ))
+   (base5      '("#62787f" "#62787f" "brightblack" ))
+   (base6      '("#96A7A9" "#96A7A9" "brightblack" ))
+   (base7      '("#788484" "#788484" "brightblack" ))
+   (base8      '("#626C6C" "#626C6C" "white"       ))
+
+   (grey       base4)
+   (red        '("#ec423a" "#ec423a" "red"          ))
+   (orange     '("#db5823" "#db5823" "brightred"    ))
+   (green      '("#93a61a" "#93a61a" "green"        ))
+   (teal       '("#35a69c" "#33aa99" "brightgreen"  ))
+   (yellow     '("#c49619" "#c49619" "yellow"       ))
+   (blue       '("#3c98e0" "#3c98e0" "brightblue"   ))
+   (dark-blue  '("#3F88AD" "#2257A0" "blue"         ))
+   (magenta    '("#e2468f" "#e2468f" "magenta"      ))
+   (violet     '("#7a7ed2" "#7a7ed2" "brightmagenta"))
+   (cyan       '("#3cafa5" "#3cafa5" "brightcyan"   ))
+   (dark-cyan  '("#03373f" "#03373f" "cyan"         ))
+
+   ;; These are the "universal syntax classes" that doom-themes establishes.
+   ;; These *must* be included in every doom themes, or your theme will throw an
+   ;; error, as they are used in the base theme defined in doom-themes-base.
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.5))
+   (selection      dark-blue)
+   (builtin        blue)
+   (comments       base5)
+   (doc-comments   teal)
+   (constants      blue)
+   (functions      blue)
+   (keywords       green)
+   (methods        cyan)
+   (operators      orange)
+   (type           yellow)
+   (strings        green)
+   (variables      fg)
+   (numbers        violet)
+   (region         base0)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    blue)
+   (vc-added       "#119e44")
+   (vc-deleted     red)
+
+   ;; custom categories
+   (-modeline-bright doom-solarized-dark-high-contrast-brighter-modeline)
+   (-modeline-pad
+    (when doom-solarized-dark-high-contrast-padded-modeline
+      (if (integerp doom-solarized-dark-high-contrast-padded-modeline) doom-solarized-dark-high-contrast-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.15) ,@(cdr base0))))
+   (modeline-bg-alt
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.1) ,@(cdr base0))))
+   (modeline-bg-inactive     (doom-darken bg 0.1))
+   (modeline-bg-inactive-alt `(,(car bg) ,@(cdr base1))))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :slant 'italic
+    :background (if doom-solarized-dark-high-contrast-brighter-comments
+                    (doom-lighten bg 0.05)
+                  'unspecified))
+   ((font-lock-keyword-face &override)  :weight 'bold)
+   ((font-lock-constant-face &override) :weight 'bold)
+   ((font-lock-type-face &override)     :slant 'italic)
+   ((font-lock-builtin-face &override)  :slant 'italic)
+
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   (tooltip              :background bg-alt :foreground fg)
+
+   ;;;; centaur-tabs
+   (centaur-tabs-active-bar-face :background blue)
+   (centaur-tabs-modified-marker-selected :inherit 'centaur-tabs-selected
+                                          :foreground blue)
+   (centaur-tabs-modified-marker-unselected :inherit 'centaur-tabs-unselected
+                                            :foreground blue)
+   ;;;; company
+   (company-tooltip-selection :background dark-cyan)
+   ;;;; css-mode / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background blue)
+   (doom-modeline-evil-emacs-state  :foreground magenta)
+   (doom-modeline-evil-insert-state :foreground blue)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; eshell-git-prompt powerline theme
+   (eshell-git-prompt-powerline-dir-face :background "steel blue" :foreground bg)
+   (eshell-git-prompt-powerline-clean-face :background "foreset green" :foreground bg)
+   (eshell-git-prompt-powerline-not-clean-face :background "indian red" :foreground bg)
+   ;;; helm
+   (helm-selection :inherit 'bold
+                   :background selection
+                   :distant-foreground bg
+                   :extend t)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground violet)
+   (markdown-url-face    :foreground teal :weight 'normal)
+   (markdown-reference-face :foreground base6)
+   ((markdown-bold-face &override)   :foreground fg)
+   ((markdown-italic-face &override) :foreground fg-alt)
+   ;;;; outline (affects org-mode)
+   ((outline-1 &override) :foreground blue)
+   ((outline-2 &override) :foreground green)
+   ((outline-3 &override) :foreground teal)
+   ((outline-4 &override) :foreground (doom-darken blue 0.2))
+   ((outline-5 &override) :foreground (doom-darken green 0.2))
+   ((outline-6 &override) :foreground (doom-darken teal 0.2))
+   ((outline-7 &override) :foreground (doom-darken blue 0.4))
+   ((outline-8 &override) :foreground (doom-darken green 0.4))
+   ;;;; org <built-in>
+   ((org-block &override) :background base0)
+   ((org-block-begin-line &override) :foreground comments :background base0)
+   ;;;; git-gutter-fringe
+   (git-gutter-fr:modified :foreground vc-modified)
+   ;;;; rainbow-delimeters
+   (rainbow-delimiters-depth-1-face :foreground blue)
+   (rainbow-delimiters-depth-2-face :foreground yellow)
+   (rainbow-delimiters-depth-3-face :foreground orange)
+   (rainbow-delimiters-depth-4-face :foreground green)
+   (rainbow-delimiters-depth-5-face :foreground cyan)
+   (rainbow-delimiters-depth-6-face :foreground violet)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt)))
+   ;;;; vterm
+   (vterm-color-black   :background (doom-lighten base0 0.75)   :foreground base0)
+   (vterm-color-red     :background (doom-lighten red 0.75)     :foreground red)
+   (vterm-color-green   :background (doom-lighten green 0.75)   :foreground green)
+   (vterm-color-yellow  :background (doom-lighten yellow 0.75)  :foreground yellow)
+   (vterm-color-blue    :background (doom-lighten blue 0.75)    :foreground blue)
+   (vterm-color-magenta :background (doom-lighten magenta 0.75) :foreground magenta)
+   (vterm-color-cyan    :background (doom-lighten cyan 0.75)    :foreground cyan)
+   (vterm-color-white   :background (doom-lighten base8 0.75)   :foreground base8)
+   ))
+
+;;; doom-solarized-dark-high-contrast-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-solarized-dark-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-solarized-dark-theme.el
new file mode 100644
index 0000000..d9442be
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-solarized-dark-theme.el
@@ -0,0 +1,207 @@
+;;; doom-solarized-dark-theme.el --- a dark variant of Solarized -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: July 15, 2019 (#303)
+;; Author: ema2159 <https://github.com/ema2159>
+;; Maintainer:
+;; Source: https://github.com/bbatsov/solarized-emacs
+;; Source: https://ethanschoonover.com/solarized
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-solarized-dark-theme nil
+  "Options for the `doom-solarized-dark' theme."
+  :group 'doom-themes)
+
+(defcustom doom-solarized-dark-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-solarized-dark-theme
+  :type 'boolean)
+
+(defcustom doom-solarized-dark-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-solarized-dark-theme
+  :type 'boolean)
+
+(defcustom doom-solarized-dark-brighter-text nil
+  "If non-nil, default text will be brighter."
+  :group 'doom-solarized-dark-theme
+  :type 'boolean)
+
+(defcustom doom-solarized-dark-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-solarized-dark-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-solarized-dark
+  "A dark theme inspired by VS Code Solarized Dark"
+  :family 'doom-solarized
+  :background-mode 'dark
+
+  ;; name        default   256       16
+  ((bg         '("#002b36" "#002b36" "brightwhite" ))
+   (fg         (if doom-solarized-dark-brighter-text
+                   '("#BBBBBB" "#BBBBBB" "brightwhite")
+                 '("#839496" "#839496" "brightwhite")))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#00212B" "#00212B" "white"       ))
+   (fg-alt     '("#657b83" "#657b83" "white"       ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#073642" "#073642" "black"       ))
+   (base1      '("#03282F" "#03282F" "brightblack" ))
+   (base2      '("#00212C" "#00212C" "brightblack" ))
+   (base3      '("#13383C" "#13383C" "brightblack" ))
+   (base4      '("#56697A" "#56697A" "brightblack" ))
+   (base5      '("#405A61" "#405A61" "brightblack" ))
+   (base6      '("#96A7A9" "#96A7A9" "brightblack" ))
+   (base7      '("#788484" "#788484" "brightblack" ))
+   (base8      '("#626C6C" "#626C6C" "white"       ))
+
+   (grey       base4)
+   (red        '("#dc322f" "#ff6655" "red"          ))
+   (orange     '("#cb4b16" "#dd8844" "brightred"    ))
+   (green      '("#859900" "#99bb66" "green"        ))
+   (teal       '("#35a69c" "#33aa99" "brightgreen"  ))
+   (yellow     '("#b58900" "#ECBE7B" "yellow"       ))
+   (blue       '("#268bd2" "#51afef" "brightblue"   ))
+   (dark-blue  '("#3F88AD" "#2257A0" "blue"         ))
+   (magenta    '("#d33682" "#c678dd" "magenta"      ))
+   (violet     '("#6c71c4" "#a9a1e1" "brightmagenta"))
+   (cyan       '("#2aa198" "#46D9FF" "brightcyan"   ))
+   (dark-cyan  '("#204052" "#5699AF" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.5))
+   (selection      dark-blue)
+   (builtin        blue)
+   (comments       (if doom-solarized-dark-brighter-comments blue base5))
+   (doc-comments   teal)
+   (constants      magenta)
+   (functions      blue)
+   (keywords       green)
+   (methods        cyan)
+   (operators      orange)
+   (type           yellow)
+   (strings        cyan)
+   (variables      violet)
+   (numbers        magenta)
+   (region         base0)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    yellow)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (-modeline-bright doom-solarized-dark-brighter-modeline)
+   (-modeline-pad
+    (when doom-solarized-dark-padded-modeline
+      (if (integerp doom-solarized-dark-padded-modeline) doom-solarized-dark-padded-modeline 4)))
+
+   (modeline-fg 'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.1) ,@(cdr base0))))
+   (modeline-bg-alt
+    (if -modeline-bright
+        base3
+      `(,(doom-darken (car bg) 0.15) ,@(cdr base0))))
+   (modeline-bg-inactive     `(,(car bg-alt) ,@(cdr base1)))
+   (modeline-bg-inactive-alt (doom-darken bg 0.1)))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-solarized-dark-brighter-comments (doom-lighten bg 0.05) 'unspecified))
+   ((font-lock-keyword-face &override) :weight 'bold)
+   ((font-lock-constant-face &override) :weight 'bold)
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; centaur-tabs
+   (centaur-tabs-active-bar-face :background blue)
+   (centaur-tabs-modified-marker-selected
+    :inherit 'centaur-tabs-selected :foreground blue)
+   (centaur-tabs-modified-marker-unselected
+    :inherit 'centaur-tabs-unselected :foreground blue)
+   ;;;; company
+   (company-tooltip-selection     :background dark-cyan)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background blue)
+   (doom-modeline-evil-emacs-state  :foreground magenta)
+   (doom-modeline-evil-insert-state :foreground blue)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; helm
+   (helm-selection :inherit 'bold
+                   :background selection
+                   :distant-foreground bg
+                   :extend t)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   (markdown-url-face    :foreground teal :weight 'normal)
+   (markdown-reference-face :foreground base6)
+   ((markdown-bold-face &override)   :foreground fg)
+   ((markdown-italic-face &override) :foreground fg-alt)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground blue)
+   ((outline-2 &override) :foreground green)
+   ((outline-3 &override) :foreground teal)
+   ((outline-4 &override) :foreground (doom-darken blue 0.2))
+   ((outline-5 &override) :foreground (doom-darken green 0.2))
+   ((outline-6 &override) :foreground (doom-darken teal 0.2))
+   ((outline-7 &override) :foreground (doom-darken blue 0.4))
+   ((outline-8 &override) :foreground (doom-darken green 0.4))
+   ;;;; org <built-in>
+   ((org-block &override) :background base0)
+   ((org-block-begin-line &override) :foreground comments :background base0)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt))))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-solarized-dark-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-solarized-light-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-solarized-light-theme.el
new file mode 100644
index 0000000..fd4d010
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-solarized-light-theme.el
@@ -0,0 +1,214 @@
+;;; doom-solarized-light-theme.el --- a light variant of Solarized -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: January 9, 2018 (#131)
+;; Author: fuxialexander <https://github.com/fuxialexander>
+;; Maintainer:
+;; Source: https://github.com/bbatsov/solarized-emacs
+;; Source: https://ethanschoonover.com/solarized
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-solarized-light-theme nil
+  "Options for the `doom-solarized-light' theme."
+  :group 'doom-themes)
+
+(defcustom doom-solarized-light-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-solarized-light-theme
+  :type 'boolean)
+
+(defcustom doom-solarized-light-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-solarized-light-theme
+  :type 'boolean)
+
+(defcustom doom-solarized-light-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-solarized-light-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-solarized-light
+  "A light theme inspired by Solarized light"
+  :family 'doom-solarized
+  :background-mode 'light
+
+  ;; name        default   256       16
+  ((bg         '("#FDF6E3" "#FDF6E3" "white"        ))
+   (fg         '("#556b72" "#556b72" "black"        ))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#EEE8D5" "#EEE8D5" "white"        ))
+   (fg-alt     '("#7B8787" "#7B8787" "brightwhite"  ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#FFFBF0" "#FFFBF0" "white"        ))
+   (base1      '("#FCF8ED" "#FCF8ED" "brightblack"  ))
+   (base2      '("#FCF7E8" "#FCF7E8" "brightblack"  ))
+   (base3      '("#F2E6CE" "#F2E6CE" "brightblack"  ))
+   (base4      '("#E1DBCD" "#E1DBCD" "brightblack"  ))
+   (base5      '("#D6D6D6" "#D6D6D6" "brightblack"  ))
+   (base6      '("#96A7A9" "#96A7A9" "brightblack"  ))
+   (base7      '("#788484" "#788484" "brightblack"  ))
+   (base8      '("#626C6C" "#626C6C" "black"        ))
+
+   (grey       base4)
+   (red        '("#dc322f" "#dc322f" "red"          ))
+   (orange     '("#cb4b16" "#cb4b16" "brightred"    ))
+   (green      '("#859900" "#859900" "green"        ))
+   (teal       '("#35a69c" "#35a69c" "brightgreen"  ))
+   (yellow     '("#b58900" "#b58900" "yellow"       ))
+   (blue       '("#268bd2" "#268bd2" "brightblue"   ))
+   (dark-blue  '("#3F88AD" "#3F88AD" "blue"         ))
+   (magenta    '("#d33682" "#d33682" "magenta"      ))
+   (violet     '("#6c71c4" "#6c71c4" "brightmagenta"))
+   (cyan       '("#2aa198" "#2aa198" "brightcyan"   ))
+   (dark-cyan  '("#204052" "#204052" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   base4)
+   (selection      dark-blue)
+   (builtin        magenta)
+   (comments       (if doom-solarized-light-brighter-comments
+                       (doom-lighten teal 0.25)
+                     base6))
+   (doc-comments   teal)
+   (constants      violet)
+   (functions      magenta)
+   (keywords       green)
+   (methods        cyan)
+   (operators      blue)
+   (type           yellow)
+   (strings        cyan)
+   (variables      blue)
+   (numbers        violet)
+   (region         `(,(doom-darken (car bg-alt) 0.1) ,@(doom-darken (cdr base0) 0.1)))
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (-modeline-bright doom-solarized-light-brighter-modeline)
+   (-modeline-pad
+    (when doom-solarized-light-padded-modeline
+      (if (integerp doom-solarized-light-padded-modeline) doom-solarized-light-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base6)
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-lighten bg 0.7)
+      (doom-darken bg 0.05)))
+   (modeline-bg-alt
+    (if -modeline-bright
+        (doom-lighten bg 0.7)
+      (doom-lighten base3 0.2)))
+   (modeline-bg-inactive     (doom-darken bg 0.025))
+   (modeline-bg-inactive-alt (doom-darken bg 0.02)))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :slant 'italic
+    :background (if doom-solarized-light-brighter-comments
+                    (doom-blend teal base0 0.07)
+                  'unspecified))
+   ((font-lock-type-face &override) :slant 'italic)
+   ((font-lock-builtin-face &override) :slant 'italic)
+   ((font-lock-function-name-face &override) :foreground type)
+   ((font-lock-keyword-face &override) :weight 'bold)
+   ((font-lock-constant-face &override) :weight 'bold)
+   (hl-line :background base3)
+   ((line-number &override) :foreground base6)
+   ((line-number-current-line &override) :foreground fg :background region :weight 'bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-evil-emacs-state  :foreground magenta)
+   (doom-modeline-evil-insert-state :foreground blue)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt)))
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; lsp-ui
+   (lsp-ui-sideline-code-action :foreground blue)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; ivy
+   (ivy-current-match :background (doom-lighten yellow 0.65) :distant-foreground fg)
+   (ivy-minibuffer-match-face-1 :foreground blue :background base3 :weight 'bold)
+   (ivy-minibuffer-match-face-2 :foreground magenta :background base3 :weight 'bold)
+   (ivy-minibuffer-match-face-3 :foreground green   :background base3 :weight 'bold)
+   (ivy-minibuffer-match-face-4 :foreground yellow  :background base3 :weight 'bold)
+   (ivy-minibuffer-match-highlight :foreground violet :weight 'bold)
+   ;;;; ivy-posframe
+   (ivy-posframe :background modeline-bg-alt)
+   ;;;; swiper
+   (swiper-match-face-1 :inherit 'ivy-minibuffer-match-face-1)
+   (swiper-match-face-2 :inherit 'ivy-minibuffer-match-face-2)
+   (swiper-match-face-3 :inherit 'ivy-minibuffer-match-face-3)
+   (swiper-match-face-4 :inherit 'ivy-minibuffer-match-face-4)
+   ;;;; helm
+   (helm-selection :foreground base0 :weight 'bold :background blue)
+   ;;;; company
+   (company-tooltip-selection :background blue :foreground base3)
+   ;;;; org <built-in>
+   (org-block :background (doom-blend yellow bg 0.04) :extend t)
+   (org-block-background :background (doom-blend yellow bg 0.04))
+   (org-block-begin-line :background (doom-blend yellow bg 0.08) :extend t)
+   (org-block-end-line :background (doom-blend yellow bg 0.08) :extend t)
+   ;;;; widget
+   (widget-field :foreground fg :background base3)
+   (widget-single-line-field :foreground fg :background base3)
+   ;;;; latex
+   (font-latex-sedate-face :foreground base6)
+   ;;;; notmuch
+   (notmuch-message-summary-face :foreground teal)
+   (notmuch-wash-cited-text :foreground base6))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-solarized-light-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-sourcerer-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-sourcerer-theme.el
new file mode 100644
index 0000000..d16b528
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-sourcerer-theme.el
@@ -0,0 +1,181 @@
+;;; doom-sourcerer-theme.el --- a port of xero's Sourcerer -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: August 23, 2018 (#215)
+;; Author: fm0xb <https://github.com/fm0xb>
+;; Maintainer:
+;; Source: https://github.com/xero/sourcerer
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-sourcerer-theme nil
+  "Options for the `doom-sourcerer' theme."
+  :group 'doom-themes)
+
+(defcustom doom-sourcerer-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-sourcerer-theme
+  :type 'boolean)
+
+(defcustom doom-sourcerer-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-sourcerer-theme
+  :type 'boolean)
+
+(defcustom doom-sourcerer-comment-bg doom-sourcerer-brighter-comments
+  "If non-nil, comments will have a subtle, darker background.
+Enhancing their legibility."
+  :group 'doom-sourcerer-theme
+  :type 'boolean)
+
+(defcustom doom-sourcerer-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-sourcerer-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-sourcerer
+  "A dark theme based off of xero's Sourcerer VIM colorscheme"
+
+  ((bg         '("#171717"))
+   (bg-alt     '("#222222"))
+   (base0      '("#1d2127"))
+   (base1      '("#1d2127"))
+   (base2      '("#272727"))
+   (base3      '("#32353f"))
+   (base4      '("#494952"))
+   (base5      '("#62686E"))
+   (base6      '("#757B80"))
+   (base7      '("#9ca0a4"))
+   (base8      '("#faf4c6"))
+   (fg         '("#c2c2b0"))
+   (fg-alt     '("#5D656B"))
+
+   (grey       '("#686858"))
+   (red        '("#aa4450"))
+   (orange     '("#ff9800"))
+   (green      '("#87875f"))
+   (green-br   '("#719611"))
+   (teal       '("#578F8F" "#44b9b1" ))
+   (yellow     '("#cc8800"           ))
+   (blue       '("#87AFD7"           ))
+   (dark-blue  '("#6688aa"           ))
+   (magenta    '("#8787AF"           ))
+   (violet     '("#8181a6"           ))
+   (cyan       '("#87ceeb"           ))
+   (dark-cyan  '("#528b8b"           ))
+   ;; face categories
+   (highlight      cyan)
+   (vertical-bar   base0)
+   (selection      base5)
+   (builtin        blue)
+   (comments       (if doom-sourcerer-brighter-comments dark-cyan grey))
+   (doc-comments   (if doom-sourcerer-brighter-comments (doom-lighten dark-cyan 0.15) (doom-darken grey 0.1)))
+   (constants      teal)
+   (functions      base8)
+   (keywords       blue)
+   (methods        magenta)
+   (operators      green-br)
+   (type           violet)
+   (strings        green)
+   (variables      base8)
+   (numbers        yellow)
+   (region         base3)
+   (error          red)
+   (warning        orange)
+   (success        green)
+   (vc-modified    yellow)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (hidden-alt `(,(car bg-alt) "black" "black"))
+   (-modeline-pad
+    (when doom-sourcerer-padded-modeline
+      (if (integerp doom-sourcerer-padded-modeline) doom-sourcerer-padded-modeline 4)))
+
+   (modeline-fg     "#bbc2cf")
+   (modeline-fg-alt (doom-blend blue grey (if doom-sourcerer-brighter-modeline 0.4 0.08)))
+
+   (modeline-bg
+    (if doom-sourcerer-brighter-modeline
+        `("#383f58" ,@(cdr base1))
+      `(,(doom-darken (car bg) 0.15) ,@(cdr base1))))
+   (modeline-bg-l
+    (if doom-sourcerer-brighter-modeline
+        modeline-bg
+      `(,(car base3) ,@(cdr base0))))
+   (modeline-bg-inactive   `(,(doom-darken (car bg-alt) 0.2) ,@(cdr base0)))
+   (modeline-bg-inactive-l (doom-darken bg 0.20)))
+
+  ;;;; Base theme face overrides
+  ((cursor :background blue)
+   ((font-lock-comment-face &override)
+    :background (if doom-sourcerer-comment-bg (doom-darken bg-alt 0.095) 'unspecified))
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground blue :bold bold)
+   (mode-line
+    :background base3 :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,base3)))
+   (mode-line-inactive
+    :background bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if doom-sourcerer-brighter-modeline base8 highlight))
+   (mode-line-buffer-id :foreground green-br :bold bold)
+
+   ;;;; company
+   (company-tooltip-selection     :background base3)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if doom-sourcerer-brighter-modeline modeline-bg highlight))
+   (doom-modeline-buffer-path :foreground (if doom-sourcerer-brighter-modeline base8 blue) :bold bold)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; markdown-mode
+   (markdown-header-face :inherit 'bold :foreground red)
+   ;;;; org <built-in>
+   ((org-block &override) :background bg-alt)
+   ((org-block-begin-line &override) :background bg-alt)
+   ((org-block-end-line &override) :background bg-alt)
+   (org-hide :foreground hidden)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground dark-cyan)
+   (rainbow-delimiters-depth-2-face :foreground teal)
+   (rainbow-delimiters-depth-3-face :foreground dark-blue)
+   (rainbow-delimiters-depth-4-face :foreground green)
+   (rainbow-delimiters-depth-5-face :foreground violet)
+   (rainbow-delimiters-depth-6-face :foreground green)
+   (rainbow-delimiters-depth-7-face :foreground orange)
+   ;;;; rjsx-mode
+   (rjsx-attr :foreground magenta :slant 'italic :weight 'medium)
+   (rjsx-tag :foreground blue)
+   (rjsx-tag-bracket-face :foreground base8)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l))))
+
+  ;;;; Base theme variable overrides
+  ;; ()
+  )
+
+;;; doom-sourcerer-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-spacegrey-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-spacegrey-theme.el
new file mode 100644
index 0000000..a80b9a0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-spacegrey-theme.el
@@ -0,0 +1,179 @@
+;;; doom-spacegrey-theme.el --- I'm sure you've heard of it -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: December 31, 2017 (#129)
+;; Author: teesloane <https://github.com/teesloane>
+;; Maintainer:
+;; Source: http://kkga.github.io/spacegray/
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(require 'doom-themes)
+
+(defgroup doom-spacegrey-theme nil
+  "Options for the `doom-spacegrey' theme."
+  :group 'doom-themes)
+
+(defcustom doom-spacegrey-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-spacegrey-theme
+  :type 'boolean)
+
+(defcustom doom-spacegrey-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-spacegrey-theme
+  :type 'boolean)
+
+(defcustom doom-spacegrey-comment-bg doom-spacegrey-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their
+legibility."
+  :group 'doom-spacegrey-theme
+  :type 'boolean)
+
+(defcustom doom-spacegrey-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-spacegrey-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-spacegrey
+  "A dark theme inspired by Atom Spacegrey Dark"
+
+  ;; name        default   256       16
+  ((bg         '("#2b303b" nil       nil            ))
+   (bg-alt     '("#232830" nil       nil            ))
+   (base0      '("#1B2229" "black"   "black"        ))
+   (base1      '("#1c1f24" "#1e1e1e" "brightblack"  ))
+   (base2      '("#202328" "#2e2e2e" "brightblack"  ))
+   (base3      '("#2F3237" "#2F3237" "brightblack"  ))
+   (base4      '("#4f5b66" "#4f5b66" "brightblack"  ))
+   (base5      '("#65737E" "#65737E" "brightblack"  ))
+   (base6      '("#73797e" "#6b6b6b" "brightblack"  ))
+   (base7      '("#9ca0a4" "#979797" "brightblack"  ))
+   (base8      '("#DFDFDF" "#dfdfdf" "white"        ))
+   (fg         '("#c0c5ce" "#c0c5ce" "brightwhite"  ))
+   (fg-alt     '("#c0c5ce" "#c0c5ce" "white"        ))
+
+   (grey       base4)
+   (red        '("#BF616A" "#BF616A" "red"          ))
+   (orange     '("#D08770" "#D08770" "brightred"    ))
+   (green      '("#A3BE8C" "#A3BE8C" "green"        ))
+   (blue       '("#8FA1B3" "#8FA1B3" "brightblue"   ))
+   (violet     '("#b48ead" "#b48ead" "brightmagenta"))
+   (teal       '("#4db5bd" "#44b9b1" "brightgreen"  ))
+   (yellow     '("#ECBE7B" "#ECBE7B" "yellow"       ))
+   (dark-blue  '("#2257A0" "#2257A0" "blue"         ))
+   (magenta    '("#c678dd" "#c678dd" "magenta"      ))
+   (cyan       '("#46D9FF" "#46D9FF" "brightcyan"   ))
+   (dark-cyan  '("#5699AF" "#5699AF" "cyan"         ))
+
+   ;; face categories -- required for all themes
+   (highlight      orange)
+   (vertical-bar   (doom-darken bg 0.25))
+   (selection      base4)
+   (builtin        orange)
+   (comments       (if doom-spacegrey-brighter-comments dark-cyan base5))
+   (doc-comments   (doom-lighten (if doom-spacegrey-brighter-comments dark-cyan base5) 0.25))
+   (constants      orange)
+   (functions      blue)
+   (keywords       violet)
+   (methods        blue)
+   (operators      fg)
+   (type           yellow)
+   (strings        green)
+   (variables      red)
+   (numbers        orange)
+   (region         selection)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg-alt) "black" "black"))
+   (-modeline-bright doom-spacegrey-brighter-modeline)
+   (-modeline-pad
+    (when doom-spacegrey-padded-modeline
+      (if (integerp doom-spacegrey-padded-modeline) doom-spacegrey-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt (doom-blend violet base4 (if -modeline-bright 0.5 0.2)))
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken base3 0.1)
+      base1))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken base3 0.05)
+      base1))
+   (modeline-bg-inactive   `(,(doom-darken (car bg-alt) 0.05) ,@(cdr base1)))
+   (modeline-bg-inactive-l (doom-darken bg 0.1)))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-spacegrey-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground fg)
+   (css-selector             :foreground red)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-darken bg 0.1))
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground fg :weight 'ultra-bold)
+   ((outline-2 &override) :foreground (doom-blend fg blue 0.35))
+   ((outline-3 &override) :foreground (doom-blend fg blue 0.7))
+   ((outline-4 &override) :foreground blue)
+   ((outline-5 &override) :foreground (doom-blend magenta blue 0.2))
+   ((outline-6 &override) :foreground (doom-blend magenta blue 0.4))
+   ((outline-7 &override) :foreground (doom-blend magenta blue 0.6))
+   ((outline-8 &override) :foreground fg)
+   ;;;; org <built-in>
+   (org-block            :background (doom-darken bg-alt 0.04))
+   (org-block-begin-line :foreground base4 :slant 'italic :background (doom-darken bg 0.04))
+   (org-ellipsis         :underline nil :background bg    :foreground red)
+   ((org-quote &override) :background base1)
+   (org-hide :foreground bg)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l))))
+
+  ;;;; Base theme variable overrides-
+  ;; ()
+  )
+
+;;; doom-spacegrey-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-autoloads.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-autoloads.el
new file mode 100644
index 0000000..23707aa
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-autoloads.el
@@ -0,0 +1,495 @@
+;;; doom-themes-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from doom-1337-theme.el
+
+(register-definition-prefixes "doom-1337-theme" '("doom-1337"))
+
+
+;;; Generated autoloads from doom-Iosvkem-theme.el
+
+(register-definition-prefixes "doom-Iosvkem-theme" '("doom-Iosvkem"))
+
+
+;;; Generated autoloads from doom-acario-dark-theme.el
+
+(register-definition-prefixes "doom-acario-dark-theme" '("doom-acario-dark"))
+
+
+;;; Generated autoloads from doom-acario-light-theme.el
+
+(register-definition-prefixes "doom-acario-light-theme" '("doom-acario-light"))
+
+
+;;; Generated autoloads from doom-ayu-dark-theme.el
+
+(register-definition-prefixes "doom-ayu-dark-theme" '("doom-ayu-dark"))
+
+
+;;; Generated autoloads from doom-ayu-light-theme.el
+
+(register-definition-prefixes "doom-ayu-light-theme" '("doom-ayu-light"))
+
+
+;;; Generated autoloads from doom-ayu-mirage-theme.el
+
+(register-definition-prefixes "doom-ayu-mirage-theme" '("doom-ayu-mirage"))
+
+
+;;; Generated autoloads from doom-badger-theme.el
+
+(register-definition-prefixes "doom-badger-theme" '("doom-badger"))
+
+
+;;; Generated autoloads from doom-bluloco-dark-theme.el
+
+(register-definition-prefixes "doom-bluloco-dark-theme" '("doom-bluloco-dark"))
+
+
+;;; Generated autoloads from doom-bluloco-light-theme.el
+
+(register-definition-prefixes "doom-bluloco-light-theme" '("doom-bluloco-light"))
+
+
+;;; Generated autoloads from doom-challenger-deep-theme.el
+
+(register-definition-prefixes "doom-challenger-deep-theme" '("doom-challenger-deep"))
+
+
+;;; Generated autoloads from doom-city-lights-theme.el
+
+(register-definition-prefixes "doom-city-lights-theme" '("doom-city-lights"))
+
+
+;;; Generated autoloads from doom-dark+-theme.el
+
+(register-definition-prefixes "doom-dark+-theme" '("doom-dark+"))
+
+
+;;; Generated autoloads from doom-dracula-theme.el
+
+(register-definition-prefixes "doom-dracula-theme" '("doom-dracula"))
+
+
+;;; Generated autoloads from doom-earl-grey-theme.el
+
+(register-definition-prefixes "doom-earl-grey-theme" '("doom-earl-grey"))
+
+
+;;; Generated autoloads from doom-ephemeral-theme.el
+
+(register-definition-prefixes "doom-ephemeral-theme" '(":group" "doom-ephemeral"))
+
+
+;;; Generated autoloads from doom-fairy-floss-theme.el
+
+(register-definition-prefixes "doom-fairy-floss-theme" '("doom-fairy-floss"))
+
+
+;;; Generated autoloads from doom-feather-dark-theme.el
+
+(register-definition-prefixes "doom-feather-dark-theme" '("doom-feather-"))
+
+
+;;; Generated autoloads from doom-feather-light-theme.el
+
+(register-definition-prefixes "doom-feather-light-theme" '("doom-feather-light"))
+
+
+;;; Generated autoloads from doom-flatwhite-theme.el
+
+(register-definition-prefixes "doom-flatwhite-theme" '("doom-f"))
+
+
+;;; Generated autoloads from doom-gruvbox-light-theme.el
+
+(register-definition-prefixes "doom-gruvbox-light-theme" '("doom-gruvbox-light"))
+
+
+;;; Generated autoloads from doom-gruvbox-theme.el
+
+(register-definition-prefixes "doom-gruvbox-theme" '("doom-gruvbox"))
+
+
+;;; Generated autoloads from doom-henna-theme.el
+
+(register-definition-prefixes "doom-henna-theme" '("doom-henna"))
+
+
+;;; Generated autoloads from doom-homage-black-theme.el
+
+(register-definition-prefixes "doom-homage-black-theme" '("doom-homage-black"))
+
+
+;;; Generated autoloads from doom-homage-white-theme.el
+
+(register-definition-prefixes "doom-homage-white-theme" '("doom-homage-white"))
+
+
+;;; Generated autoloads from doom-horizon-theme.el
+
+(register-definition-prefixes "doom-horizon-theme" '("doom-horizon"))
+
+
+;;; Generated autoloads from doom-ir-black-theme.el
+
+(register-definition-prefixes "doom-ir-black-theme" '("doom-ir-black"))
+
+
+;;; Generated autoloads from doom-lantern-theme.el
+
+(register-definition-prefixes "doom-lantern-theme" '("doom-lantern"))
+
+
+;;; Generated autoloads from doom-laserwave-theme.el
+
+(register-definition-prefixes "doom-laserwave-theme" '("doom-laserwave"))
+
+
+;;; Generated autoloads from doom-manegarm-theme.el
+
+(register-definition-prefixes "doom-manegarm-theme" '("doom-manegarm"))
+
+
+;;; Generated autoloads from doom-material-dark-theme.el
+
+(register-definition-prefixes "doom-material-dark-theme" '("doom-material-"))
+
+
+;;; Generated autoloads from doom-material-theme.el
+
+(register-definition-prefixes "doom-material-theme" '("doom-material"))
+
+
+;;; Generated autoloads from doom-meltbus-theme.el
+
+(register-definition-prefixes "doom-meltbus-theme" '("doom-meltbus"))
+
+
+;;; Generated autoloads from doom-miramare-theme.el
+
+(register-definition-prefixes "doom-miramare-theme" '("doom-miramare"))
+
+
+;;; Generated autoloads from doom-molokai-theme.el
+
+(register-definition-prefixes "doom-molokai-theme" '("doom-molokai"))
+
+
+;;; Generated autoloads from doom-monokai-classic-theme.el
+
+(register-definition-prefixes "doom-monokai-classic-theme" '("doom-monokai-classic"))
+
+
+;;; Generated autoloads from doom-monokai-machine-theme.el
+
+(register-definition-prefixes "doom-monokai-machine-theme" '("doom-monokai-machine"))
+
+
+;;; Generated autoloads from doom-monokai-octagon-theme.el
+
+(register-definition-prefixes "doom-monokai-octagon-theme" '("doom-monokai-octagon"))
+
+
+;;; Generated autoloads from doom-monokai-pro-theme.el
+
+(register-definition-prefixes "doom-monokai-pro-theme" '("doom-monokai-pro"))
+
+
+;;; Generated autoloads from doom-monokai-ristretto-theme.el
+
+(register-definition-prefixes "doom-monokai-ristretto-theme" '("doom-monokai-ristretto"))
+
+
+;;; Generated autoloads from doom-monokai-spectrum-theme.el
+
+(register-definition-prefixes "doom-monokai-spectrum-theme" '("doom-monokai-spectrum"))
+
+
+;;; Generated autoloads from doom-moonlight-theme.el
+
+(register-definition-prefixes "doom-moonlight-theme" '("doom-moonlight"))
+
+
+;;; Generated autoloads from doom-nord-aurora-theme.el
+
+(register-definition-prefixes "doom-nord-aurora-theme" '(":group" "doom-nord-aurora"))
+
+
+;;; Generated autoloads from doom-nord-light-theme.el
+
+(register-definition-prefixes "doom-nord-light-theme" '(":group" "doom-nord-light"))
+
+
+;;; Generated autoloads from doom-nord-theme.el
+
+(register-definition-prefixes "doom-nord-theme" '(":group" "doom-nord"))
+
+
+;;; Generated autoloads from doom-nova-theme.el
+
+(register-definition-prefixes "doom-nova-theme" '("doom-nova"))
+
+
+;;; Generated autoloads from doom-oceanic-next-theme.el
+
+(register-definition-prefixes "doom-oceanic-next-theme" '("doom-oceanic-next"))
+
+
+;;; Generated autoloads from doom-oksolar-dark-theme.el
+
+(register-definition-prefixes "doom-oksolar-dark-theme" '("doom-oksolar-dark"))
+
+
+;;; Generated autoloads from doom-oksolar-light-theme.el
+
+(register-definition-prefixes "doom-oksolar-light-theme" '("doom-oksolar-light"))
+
+
+;;; Generated autoloads from doom-old-hope-theme.el
+
+(register-definition-prefixes "doom-old-hope-theme" '("doom-old-hope"))
+
+
+;;; Generated autoloads from doom-one-light-theme.el
+
+(register-definition-prefixes "doom-one-light-theme" '("doom-one-light"))
+
+
+;;; Generated autoloads from doom-one-theme.el
+
+(register-definition-prefixes "doom-one-theme" '("doom-one"))
+
+
+;;; Generated autoloads from doom-opera-light-theme.el
+
+(register-definition-prefixes "doom-opera-light-theme" '(":group" "doom-opera-light"))
+
+
+;;; Generated autoloads from doom-opera-theme.el
+
+(register-definition-prefixes "doom-opera-theme" '(":group" "doom-opera"))
+
+
+;;; Generated autoloads from doom-outrun-electric-theme.el
+
+(register-definition-prefixes "doom-outrun-electric-theme" '("doom-outrun-electric"))
+
+
+;;; Generated autoloads from doom-palenight-theme.el
+
+(register-definition-prefixes "doom-palenight-theme" '("doom-palenight"))
+
+
+;;; Generated autoloads from doom-peacock-theme.el
+
+(register-definition-prefixes "doom-peacock-theme" '("doom-peacock"))
+
+
+;;; Generated autoloads from doom-pine-theme.el
+
+(register-definition-prefixes "doom-pine-theme" '("doom-pine"))
+
+
+;;; Generated autoloads from doom-plain-dark-theme.el
+
+(register-definition-prefixes "doom-plain-dark-theme" '("doom-plain-"))
+
+
+;;; Generated autoloads from doom-plain-theme.el
+
+(register-definition-prefixes "doom-plain-theme" '("doom-plain"))
+
+
+;;; Generated autoloads from doom-rouge-theme.el
+
+(register-definition-prefixes "doom-rouge-theme" '("doom-rouge"))
+
+
+;;; Generated autoloads from doom-shades-of-purple-theme.el
+
+(register-definition-prefixes "doom-shades-of-purple-theme" '("doom-shades-of-purple"))
+
+
+;;; Generated autoloads from doom-snazzy-theme.el
+
+(register-definition-prefixes "doom-snazzy-theme" '("doom-snazzy"))
+
+
+;;; Generated autoloads from doom-solarized-dark-high-contrast-theme.el
+
+(register-definition-prefixes "doom-solarized-dark-high-contrast-theme" '("doom-solarized-dark-high-contrast"))
+
+
+;;; Generated autoloads from doom-solarized-dark-theme.el
+
+(register-definition-prefixes "doom-solarized-dark-theme" '("doom-solarized-dark"))
+
+
+;;; Generated autoloads from doom-solarized-light-theme.el
+
+(register-definition-prefixes "doom-solarized-light-theme" '("doom-solarized-light"))
+
+
+;;; Generated autoloads from doom-sourcerer-theme.el
+
+(register-definition-prefixes "doom-sourcerer-theme" '("doom-sourcerer"))
+
+
+;;; Generated autoloads from doom-spacegrey-theme.el
+
+(register-definition-prefixes "doom-spacegrey-theme" '("doom-spacegrey"))
+
+
+;;; Generated autoloads from doom-themes.el
+
+(autoload 'doom-name-to-rgb "doom-themes" "\
+Retrieves the hexidecimal string repesented the named COLOR (e.g. \"red\")
+for FRAME (defaults to the current frame).
+
+(fn COLOR)")
+(autoload 'doom-blend "doom-themes" "\
+Blend two colors (hexidecimal strings) together by a coefficient ALPHA (a
+float between 0 and 1)
+
+(fn COLOR1 COLOR2 ALPHA)")
+(autoload 'doom-darken "doom-themes" "\
+Darken a COLOR (a hexidecimal string) by a coefficient ALPHA (a float between
+0 and 1).
+
+(fn COLOR ALPHA)")
+(autoload 'doom-lighten "doom-themes" "\
+Brighten a COLOR (a hexidecimal string) by a coefficient ALPHA (a float
+between 0 and 1).
+
+(fn COLOR ALPHA)")
+(autoload 'doom-color "doom-themes" "\
+Retrieve a specific color named NAME (a symbol) from the current theme.
+
+(fn NAME &optional TYPE)")
+(autoload 'doom-ref "doom-themes" "\
+TODO
+
+(fn FACE PROP &optional CLASS)")
+(autoload 'doom-themes-set-faces "doom-themes" "\
+Customize THEME (a symbol) with FACES.
+
+If THEME is nil, it applies to all themes you load. FACES is a list of Doom
+theme face specs. These is a simplified spec. For example:
+
+  (doom-themes-set-faces \\='user
+    \\='(default :background red :foreground blue)
+    \\='(doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+    \\='(doom-modeline-buffer-file :inherit \\='mode-line-buffer-id :weight \\='bold)
+    \\='(doom-modeline-buffer-path :inherit \\='mode-line-emphasis :weight \\='bold)
+    \\='(doom-modeline-buffer-project-root :foreground green :weight \\='bold))
+
+(fn THEME &rest FACES)")
+(function-put 'doom-themes-set-faces 'lisp-indent-function 'defun)
+(when load-file-name (add-to-list 'custom-theme-load-path (let* ((base (file-name-directory load-file-name)) (dir (expand-file-name "themes/" base))) (or (and (file-directory-p dir) dir) base))))
+(register-definition-prefixes "doom-themes" '("def-doom-theme" "doom-"))
+
+
+;;; Generated autoloads from doom-themes-base.el
+
+(register-definition-prefixes "doom-themes-base" '("doom-themes-base-"))
+
+
+;;; Generated autoloads from doom-themes-ext-neotree.el
+
+(autoload 'doom-themes-neotree-config "doom-themes-ext-neotree" "\
+Install doom-themes' neotree configuration.
+
+Includes an Atom-esque icon theme and highlighting based on filetype.")
+(register-definition-prefixes "doom-themes-ext-neotree" '("doom-"))
+
+
+;;; Generated autoloads from doom-themes-ext-org.el
+
+(autoload 'doom-themes-org-config "doom-themes-ext-org" "\
+Load `doom-themes-ext-org'.")
+(register-definition-prefixes "doom-themes-ext-org" '("doom-themes-"))
+
+
+;;; Generated autoloads from doom-themes-ext-treemacs.el
+
+(autoload 'doom-themes-treemacs-config "doom-themes-ext-treemacs" "\
+Install doom-themes' treemacs configuration.
+
+Includes an Atom-esque icon theme and highlighting based on filetype.")
+(register-definition-prefixes "doom-themes-ext-treemacs" '("doom-themes-"))
+
+
+;;; Generated autoloads from doom-themes-ext-visual-bell.el
+
+(autoload 'doom-themes-visual-bell-fn "doom-themes-ext-visual-bell" "\
+Blink the mode-line red briefly. Set `ring-bell-function' to this to use it.")
+(autoload 'doom-themes-visual-bell-config "doom-themes-ext-visual-bell" "\
+Enable flashing the mode-line on error.")
+
+
+;;; Generated autoloads from doom-tokyo-night-theme.el
+
+(register-definition-prefixes "doom-tokyo-night-theme" '("doom-tokyo-night"))
+
+
+;;; Generated autoloads from doom-tomorrow-day-theme.el
+
+(register-definition-prefixes "doom-tomorrow-day-theme" '("doom-tomorrow-day"))
+
+
+;;; Generated autoloads from doom-tomorrow-night-theme.el
+
+(register-definition-prefixes "doom-tomorrow-night-theme" '("doom-tomorrow-night"))
+
+
+;;; Generated autoloads from doom-vibrant-theme.el
+
+(register-definition-prefixes "doom-vibrant-theme" '("doom-vibrant"))
+
+
+;;; Generated autoloads from doom-wilmersdorf-theme.el
+
+(register-definition-prefixes "doom-wilmersdorf-theme" '("doom-wilmersdorf"))
+
+
+;;; Generated autoloads from doom-winter-is-coming-dark-blue-theme.el
+
+(register-definition-prefixes "doom-winter-is-coming-dark-blue-theme" '("doom-winter-is-coming-"))
+
+
+;;; Generated autoloads from doom-winter-is-coming-light-theme.el
+
+(register-definition-prefixes "doom-winter-is-coming-light-theme" '("doom-winter-is-coming-"))
+
+
+;;; Generated autoloads from doom-xcode-theme.el
+
+(register-definition-prefixes "doom-xcode-theme" '("doom-xcode"))
+
+
+;;; Generated autoloads from doom-zenburn-theme.el
+
+(register-definition-prefixes "doom-zenburn-theme" '("doom-zenburn"))
+
+;;; End of scraped data
+
+(provide 'doom-themes-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; doom-themes-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-base.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-base.el
new file mode 100644
index 0000000..7c41a22
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-base.el
@@ -0,0 +1,1635 @@
+;;; doom-themes-base.el --- base faces for all doom themes -*- lexical-binding: t; -*-
+;;; Commentary:
+;;; Code:
+
+;; These are used as a basis for every Doom theme defined with `def-doom-theme',
+;; as a set of reasonble defaults. They are intended to be overidden where it
+;; makes sense to.
+(defvar doom-themes-base-faces
+  '((bold        :weight 'bold :foreground (if bold 'unspecified base8))
+    (bold-italic :inherit '(bold italic))
+    (italic      :slant  'italic)
+    (escape-glyph :foreground cyan)
+    (default :background bg :foreground fg)
+    (fringe  :inherit 'default :foreground base4)
+    (region               :background region :distant-foreground (doom-darken fg 0.2) :extend t)
+    (highlight            :background highlight :foreground base0 :distant-foreground base8)
+    (cursor               :background highlight)
+    (shadow               :foreground base5)
+    (minibuffer-prompt    :foreground highlight)
+    (tooltip              :background bg-alt :foreground fg)
+    (secondary-selection  :background grey :extend t)
+    (lazy-highlight
+     (&dark  :background (doom-darken highlight 0.3)   :foreground base8 :distant-foreground base0 :weight 'bold)
+     (&light :background (doom-blend bg highlight 0.7) :foreground base0 :distant-foreground base8))
+    (match                :foreground green      :background base0 :weight 'bold)
+    (trailing-whitespace  :background red)
+    (nobreak-space        :inherit 'escape-glyph :underline t)
+    (vertical-border      :background vertical-bar :foreground vertical-bar)
+    (link                 :foreground highlight :underline t :weight 'bold)
+    (error   :foreground error)
+    (warning :foreground warning)
+    (success :foreground success)
+    ;;;; font-lock-* faces
+    (font-lock-builtin-face              :foreground builtin)
+    (font-lock-bracket-face              :inherit 'font-lock-punctuation-face)
+    (font-lock-comment-delimiter-face    :inherit 'font-lock-comment-face)
+    (font-lock-comment-face              :foreground comments)
+    (font-lock-constant-face             :foreground constants)
+    (font-lock-doc-face                  :inherit 'font-lock-comment-face :foreground doc-comments)
+    (font-lock-delimiter-face            :inherit 'font-lock-punctuation-face)
+    (font-lock-escape-face               :inherit 'font-lock-regexp-grouping-backslash)
+    (font-lock-function-name-face        :foreground functions)
+    (font-lock-function-call-face        :inherit 'font-lock-function-name-face :slant 'italic :foreground (doom-blend 'functions 'fg 0.7))
+    (font-lock-keyword-face              :foreground keywords)
+    (font-lock-misc-punctuation-face     :inherit 'font-lock-punctuation-face)
+    (font-lock-negation-char-face        :inherit 'bold :foreground operators)
+    (font-lock-number-face               :foreground numbers)
+    (font-lock-operator-face             :foreground operators)
+    (font-lock-punctuation-face          :foreground (doom-blend 'operators 'fg 0.25))
+    (font-lock-property-name-face        :foreground (doom-blend 'keywords 'fg 0.6) :weight 'bold)
+    (font-lock-property-use-face         :inherit 'font-lock-property-name-face :weight 'regular)
+    (font-lock-preprocessor-char-face    :inherit 'bold :foreground operators)
+    (font-lock-preprocessor-face         :inherit 'bold :foreground operators)
+    (font-lock-regexp-grouping-backslash :inherit 'bold :foreground operators)
+    (font-lock-regexp-grouping-construct :inherit 'bold :foreground operators)
+    (font-lock-string-face               :foreground strings)
+    (font-lock-type-face                 :foreground type)
+    (font-lock-variable-name-face        :foreground variables)
+    (font-lock-variable-use-face         :inherit 'font-lock-variable-name-face :foreground (doom-blend 'variables 'fg 0.5))
+    (font-lock-warning-face              :inherit 'warning)
+    ;;;; mode-line / header-line
+    (mode-line           :background bg     :foreground fg     :distant-foreground bg)
+    (mode-line-active    :inherit 'mode-line)
+    (mode-line-inactive  :background bg-alt :foreground fg-alt :distant-foreground bg-alt)
+    (mode-line-emphasis  :foreground highlight :distant-foreground bg)
+    (mode-line-highlight :inherit 'highlight :distant-foreground bg)
+    (mode-line-buffer-id :weight 'bold)
+    (header-line :inherit 'mode-line)
+    (header-line-highlight :inherit 'mode-line-highlight)
+    ;;;; tab-line/tab-bar (Emacs 27+)
+    (tab-line :background bg-alt :foreground bg-alt)
+    (tab-line-tab :background bg :foreground fg)
+    (tab-line-tab-inactive :background bg-alt :foreground fg-alt)
+    ((tab-line-tab-inactive-alternate &inherit tab-line-tab-inactive))
+    (tab-line-tab-current :background bg :foreground fg)
+    ;; (tab-line-special )
+    (tab-line-highlight :inherit 'tab-line-tab)
+    (tab-line-close-highlight :foreground highlight)
+    ((tab-bar &inherit tab-line))
+    ((tab-bar-tab &inherit tab-line-tab))
+    ((tab-bar-tab-inactive &inherit tab-line-tab-inactive))
+    ;;;; Line numbers
+    ;; 1. Line number faces must explicitly disable its text style attributes
+    ;;    because nearby faces may "bleed" into the line numbers otherwise.
+    ;; 2. All other line number plugin faces should &inherit from these.
+    (line-number
+     :inherit 'default
+     :foreground base5 :distant-foreground 'unspecified
+     :weight 'normal :slant 'unspecified
+     :underline 'unspecified :strike-through 'unspecified)
+    (line-number-current-line
+     :inherit '(hl-line default)
+     :foreground fg :distant-foreground 'unspecified
+     :weight 'normal :slant 'unspecified
+     :underline 'unspecified :strike-through 'unspecified)
+
+    ;;;; --- Package faces ----------------------
+    ;; What follows are faces for all the packages doom-themes explicitly
+    ;; supports. Headings are formatted as such:
+    ;;
+    ;;   PACKAGE [<built-in>] [<modes:some-mode[, ...]>]
+    ;;
+    ;; The purpose of this is to make it easy to jump to via `imenu', or search
+    ;; for with isearch, swiper, etc.
+    ;;;; agda-mode <modes:agda2-mode>
+    (agda2-highlight-keyword-face                 :inherit 'font-lock-keyword-face)
+    (agda2-highlight-string-face                  :inherit 'font-lock-string-face)
+    (agda2-highlight-number-face                  :inherit 'font-lock-string-face)
+    (agda2-highlight-symbol-face                  :inherit 'font-lock-variable-name-face)
+    (agda2-highlight-primitive-type-face          :inherit 'font-lock-type-face)
+    (agda2-highlight-bound-variable-face          :inherit 'font-lock-variable-name-face)
+    (agda2-highlight-inductive-constructor-face   :inherit 'font-lock-type-face)
+    (agda2-highlight-coinductive-constructor-face :inherit 'font-lock-type-face)
+    (agda2-highlight-datatype-face                :inherit 'font-lock-type-face)
+    (agda2-highlight-field-face                   :inherit 'font-lock-type-face)
+    (agda2-highlight-function-face                :inherit 'font-lock-function-name-face)
+    (agda2-highlight-module-face                  :inherit 'font-lock-variable-name-face)
+    (agda2-highlight-postulate-face               :inherit 'font-lock-type-face)
+    (agda2-highlight-primitive-face               :inherit 'font-lock-type-face)
+    (agda2-highlight-macro-face                   :inherit 'font-lock-function-name-face)
+    (agda2-highlight-record-face                  :inherit 'font-lock-type-face)
+    (agda2-highlight-error-face                   :inherit 'font-lock-warning-face)
+    (agda2-highlight-dotted-face                  :inherit 'font-lock-variable-name-face)
+    (agda2-highlight-unsolved-meta-face           :inherit 'font-lock-warning-face)
+    (agda2-highlight-unsolved-constraint-face     :inherit 'font-lock-warning-face)
+    (agda2-highlight-termination-problem-face     :inherit 'font-lock-warning-face)
+    (agda2-highlight-positivity-problem-face      :inherit 'font-lock-warning-face)
+    (agda2-highlight-incomplete-pattern-face      :inherit 'font-lock-warning-face)
+    (agda2-highlight-typechecks-face              :inherit 'font-lock-warning-face)
+    ;;;; auctex <modes:latex-mode>
+    (font-latex-bold-face         :inherit 'bold)
+    (font-latex-italic-face       :inherit 'italic)
+    (font-latex-underline-face    :inherit 'underline)
+    (font-latex-math-face         :foreground blue)
+    (font-latex-sedate-face       :inherit 'font-lock-keyword-face)
+    (font-latex-sectioning-0-face :foreground blue    :weight 'ultra-bold)
+    (font-latex-sectioning-1-face :foreground magenta :weight 'semi-bold)
+    (font-latex-sectioning-2-face :foreground violet  :weight 'semi-bold)
+    (font-latex-sectioning-3-face :foreground (doom-lighten blue 0.3)    :weight 'semi-bold)
+    (font-latex-sectioning-4-face :foreground (doom-lighten magenta 0.3) :weight 'semi-bold)
+    (font-latex-sectioning-5-face :foreground (doom-lighten violet 0.3)  :weight 'semi-bold)
+    (font-latex-script-char-face  :foreground dark-blue)
+    (font-latex-string-face       :inherit 'font-lock-string-face)
+    (font-latex-warning-face      :inherit 'font-lock-warning-face)
+    (font-latex-verbatim-face     :inherit 'fixed-pitch :foreground violet :slant 'italic)
+    (TeX-error-description-error    :inherit 'error   :weight 'bold)
+    (TeX-error-description-warning  :inherit 'warning :weight 'bold)
+    (TeX-error-description-tex-said :inherit 'success :weight 'bold)
+    ;;;; alert
+    (alert-high-face         :inherit bold :foreground warning)
+    (alert-low-face          :foreground grey)
+    (alert-moderate-face     :inherit bold :foreground fg-alt)
+    (alert-trivial-face      :foreground doc-comments)
+    (alert-urgent-face       :inherit bold :foreground error)
+    ;;;; all-the-icons
+    (all-the-icons-blue       :foreground blue)
+    (all-the-icons-blue-alt   :foreground teal)
+    (all-the-icons-cyan       :foreground cyan)
+    (all-the-icons-cyan-alt   :foreground cyan)
+    (all-the-icons-dblue      :foreground dark-blue)
+    (all-the-icons-dcyan      :foreground dark-cyan)
+    (all-the-icons-dgreen     :foreground (doom-darken green 0.3))
+    (all-the-icons-dmaroon    :foreground (doom-darken magenta 0.3))
+    (all-the-icons-dorange    :foreground (doom-darken orange 0.3))
+    (all-the-icons-dpink      :foreground (doom-lighten red 0.15))
+    (all-the-icons-dpurple    :foreground (doom-darken violet 0.3))
+    (all-the-icons-dred       :foreground (doom-darken red 0.3))
+    (all-the-icons-dsilver    :foreground (doom-lighten grey 0.1))
+    (all-the-icons-dyellow    :foreground (doom-darken yellow 0.3))
+    (all-the-icons-green      :foreground green)
+    (all-the-icons-lblue      :foreground (doom-lighten blue 0.3))
+    (all-the-icons-lcyan      :foreground (doom-lighten cyan 0.3))
+    (all-the-icons-lgreen     :foreground (doom-lighten green 0.3))
+    (all-the-icons-lmaroon    :foreground (doom-lighten magenta 0.3))
+    (all-the-icons-lorange    :foreground (doom-lighten orange 0.3))
+    (all-the-icons-lpink      :foreground (doom-lighten red 0.55))
+    (all-the-icons-lpurple    :foreground (doom-lighten violet 0.3))
+    (all-the-icons-lred       :foreground (doom-lighten red 0.3))
+    (all-the-icons-lsilver    :foreground (doom-lighten grey 0.7))
+    (all-the-icons-lyellow    :foreground (doom-lighten yellow 0.3))
+    (all-the-icons-maroon     :foreground magenta)
+    (all-the-icons-orange     :foreground orange)
+    (all-the-icons-pink       :foreground (doom-lighten red 0.35))
+    (all-the-icons-purple     :foreground violet)
+    (all-the-icons-purple-alt :foreground (doom-blend violet grey 0.15))
+    (all-the-icons-red        :foreground red)
+    (all-the-icons-red-alt    :foreground (doom-blend red grey 0.15))
+    (all-the-icons-silver     :foreground (doom-lighten grey 0.45))
+    (all-the-icons-yellow     :foreground yellow)
+    ;;;; all-the-icons-dired
+    (all-the-icons-dired-dir-face    :foreground doc-comments)
+    ;;;; annotate
+    (annotate-annotation           :background (doom-blend highlight bg 0.1) :foreground doc-comments)
+    (annotate-annotation-secondary :background (doom-blend green bg 0.1)     :foreground doc-comments)
+    (annotate-highlight            :background (doom-blend highlight bg 0.1) :underline highlight)
+    (annotate-highlight-secondary  :background (doom-blend green bg 0.1)     :underline green)
+    ;;;; ansi-color <built-in>
+    (ansi-color-black          :foreground bg      :background bg)
+    (ansi-color-red            :foreground red     :background red)
+    (ansi-color-green          :foreground green   :background green)
+    (ansi-color-yellow         :foreground yellow  :background yellow)
+    (ansi-color-blue           :foreground blue    :background blue)
+    (ansi-color-magenta        :foreground magenta :background magenta)
+    (ansi-color-cyan           :foreground cyan    :background cyan)
+    (ansi-color-white          :foreground fg      :background fg)
+    ;; This color is used effectively as grayed out foreground text.
+    ;; base5 and up have too much contrast in light themes;
+    ;; base5 and lower have too little contrast in dark themes.
+    (ansi-color-bright-black
+     (&light :foreground base4 :background base4)
+     (&dark  :foreground base6 :background base6))
+    (ansi-color-bright-red     :foreground (doom-lighten red 0.15)     :background (doom-lighten red 0.15))
+    (ansi-color-bright-green   :foreground (doom-lighten green 0.15)   :background (doom-lighten green 0.15))
+    (ansi-color-bright-yellow  :foreground (doom-lighten yellow 0.15)  :background (doom-lighten yellow 0.15))
+    (ansi-color-bright-blue    :foreground (doom-lighten blue 0.15)    :background (doom-lighten blue 0.15))
+    (ansi-color-bright-magenta :foreground (doom-lighten magenta 0.15) :background (doom-lighten magenta 0.15))
+    (ansi-color-bright-cyan    :foreground (doom-lighten cyan 0.15)    :background (doom-lighten cyan 0.15))
+    (ansi-color-bright-white   :foreground base8   :background base8)
+    ;;;; anzu
+    (anzu-replace-highlight :background base0 :foreground red   :weight 'bold :strike-through t)
+    (anzu-replace-to        :background base0 :foreground green :weight 'bold)
+    ;;;; avy
+    (avy-background-face :foreground comments)
+    (avy-lead-face :background highlight :foreground bg :distant-foreground fg :weight 'bold)
+    (avy-lead-face-0
+     (&all   :inherit 'avy-lead-face)
+     (&dark  :background (doom-lighten highlight 0.3))
+     (&light :background (doom-darken highlight 0.3)))
+    (avy-lead-face-1
+     (&all   :inherit 'avy-lead-face)
+     (&dark  :background (doom-lighten highlight 0.6))
+     (&light :background (doom-darken highlight 0.6)))
+    (avy-lead-face-2
+     (&all   :inherit 'avy-lead-face)
+     (&dark  :background (doom-lighten highlight 0.9))
+     (&light :background (doom-darken highlight 0.9)))
+    ;;;; bookmark
+    (bookmark-face :background (doom-blend highlight bg 0.1) :extend t)
+    ;;;; bookmark+
+    (bmkp-*-mark :foreground bg :background yellow)
+    (bmkp->-mark :foreground yellow)
+    (bmkp-D-mark :foreground bg :background red)
+    (bmkp-X-mark :foreground red)
+    (bmkp-a-mark :background red)
+    (bmkp-bad-bookmark :foreground bg :background yellow)
+    (bmkp-bookmark-file :foreground violet :background bg-alt)
+    (bmkp-bookmark-list :background bg-alt)
+    (bmkp-buffer :foreground blue)
+    (bmkp-desktop :foreground bg :background violet)
+    (bmkp-file-handler :background red)
+    (bmkp-function :foreground green)
+    (bmkp-gnus :foreground orange)
+    (bmkp-heading :foreground yellow)
+    (bmkp-info :foreground cyan)
+    (bmkp-light-autonamed :foreground bg-alt :background cyan)
+    (bmkp-light-autonamed-region :foreground bg-alt :background red)
+    (bmkp-light-fringe-autonamed :foreground bg-alt :background violet)
+    (bmkp-light-fringe-non-autonamed :foreground bg-alt :background green)
+    (bmkp-light-mark :foreground bg :background cyan)
+    (bmkp-light-non-autonamed :foreground bg :background violet)
+    (bmkp-light-non-autonamed-region :foreground bg :background red)
+    (bmkp-local-directory :foreground bg :background violet)
+    (bmkp-local-file-with-region :foreground yellow)
+    (bmkp-local-file-without-region :foreground comments)
+    (bmkp-man :foreground violet)
+    (bmkp-no-jump :foreground comments)
+    (bmkp-no-local :foreground yellow)
+    (bmkp-non-file :foreground green)
+    (bmkp-remote-file :foreground orange)
+    (bmkp-sequence :foreground blue)
+    (bmkp-su-or-sudo :foreground red)
+    (bmkp-t-mark :foreground violet)
+    (bmkp-url :foreground blue :underline t)
+    (bmkp-variable-list :foreground green)
+    ;;;; calfw
+    (calfw-annotation-face         :foreground violet)
+    (calfw-day-title-face          :foreground fg                       :weight 'bold)
+    (calfw-default-content-face    :foreground fg)
+    (calfw-default-day-face                                             :weight 'bold)
+    (calfw-disable-face            :foreground grey)
+    (calfw-grid-face               :foreground vertical-bar)
+    (calfw-header-face             :foreground (doom-blend blue bg 0.8) :weight 'bold)
+    (calfw-holiday-face            :background bg-alt :weight 'bold)
+    (calfw-periods-face            :foreground yellow)
+    (calfw-saturday-face           :foreground (doom-blend red bg 0.8)  :weight 'bold)
+    (calfw-sunday-face             :foreground (doom-blend red bg 0.8)  :weight 'bold)
+    (calfw-title-face              :foreground blue                     :weight 'bold :height 2.0 :inherit 'variable-pitch)
+    (calfw-today-face              :weight 'bold)
+    (calfw-today-title-face        :foreground bg  :background blue     :weight 'bold)
+    (calfw-toolbar-button-off-face :foreground base6                    :weight 'bold             :inherit 'variable-pitch)
+    (calfw-toolbar-button-on-face  :foreground blue                     :weight 'bold             :inherit 'variable-pitch)
+    (calfw-toolbar-face)
+    ;;;; centaur-tabs
+    ((centaur-tabs-default &inherit tab-bar) :box nil)
+    ((centaur-tabs-selected &inherit tab-bar-tab) :box nil)
+    ((centaur-tabs-unselected &inherit tab-bar-tab-inactive) :box nil)
+    (centaur-tabs-selected-modified   :background bg :foreground teal)
+    (centaur-tabs-unselected-modified :background bg-alt :foreground teal)
+    (centaur-tabs-active-bar-face :background (if (bound-and-true-p -modeline-bright) modeline-bg highlight))
+    (centaur-tabs-modified-marker-selected
+     :foreground (if (bound-and-true-p -modeline-bright) modeline-bg highlight)
+     :inherit 'centaur-tabs-selected)
+    (centaur-tabs-modified-marker-unselected
+     :foreground (if (bound-and-true-p -modeline-bright) modeline-bg highlight)
+     :inherit 'centaur-tabs-unselected)
+    ;;;; company
+    (company-tooltip            :inherit 'tooltip)
+    (company-tooltip-common                           :foreground highlight :distant-foreground base0 :weight 'bold)
+    (company-tooltip-search     :background highlight :foreground bg :distant-foreground fg :weight 'bold)
+    (company-tooltip-search-selection :background (doom-darken selection 0.25))
+    (company-tooltip-selection  :background selection :weight 'bold)
+    (company-tooltip-mouse      :background magenta   :foreground bg :distant-foreground fg)
+    (company-tooltip-annotation                       :foreground violet :distant-foreground bg)
+    (company-scrollbar-bg       :inherit 'tooltip)
+    (company-scrollbar-fg       :background highlight)
+    (company-preview                              :foreground comments)
+    (company-preview-common     :background base3 :foreground highlight)
+    (company-preview-search     :inherit 'company-tooltip-search)
+    (company-template-field     :inherit 'match)
+    ;;;; company-box
+    (company-box-candidate :foreground fg)
+    ;;;; corfu
+    (corfu-default :inherit 'tooltip)
+    (corfu-current :background bg :foreground fg)
+    ;;;; circe
+    (circe-fool :foreground doc-comments)
+    (circe-highlight-nick-face :weight 'bold :foreground constants)
+    (circe-prompt-face :weight 'bold :foreground highlight)
+    (circe-server-face :foreground comments)
+    (circe-my-message-face :weight 'bold)
+    ;;;; cperl <built-in>
+    (cperl-array-face          :weight 'bold :inherit 'font-lock-variable-name-face)
+    (cperl-hash-face           :weight 'bold :slant 'italic :inherit 'font-lock-variable-name-face)
+    (cperl-nonoverridable-face :inherit 'font-lock-builtin-face)
+    ;;;; compilation <built-in>
+    (compilation-column-number  :inherit 'font-lock-comment-face)
+    (compilation-line-number    :foreground highlight)
+    (compilation-error   :inherit 'error   :weight 'bold)
+    (compilation-warning :inherit 'warning :slant 'italic)
+    (compilation-info    :inherit 'success)
+    (compilation-mode-line-exit :inherit 'compilation-info)
+    (compilation-mode-line-fail :inherit 'compilation-error)
+    ;;;; custom <built-in>
+    (custom-button                  :foreground blue   :background bg     :box '(:line-width 1 :style nil))
+    (custom-button-unraised         :foreground violet :background bg     :box '(:line-width 1 :style nil))
+    (custom-button-pressed-unraised :foreground bg     :background violet :box '(:line-width 1 :style nil))
+    (custom-button-pressed          :foreground bg     :background blue   :box '(:line-width 1 :style nil))
+    (custom-button-mouse            :foreground bg     :background blue   :box '(:line-width 1 :style nil))
+    (custom-variable-button         :foreground green  :underline t)
+    (custom-saved                   :foreground green  :background (doom-blend green bg 0.2) :bold bold)
+    (custom-comment                 :foreground fg     :background region)
+    (custom-comment-tag             :foreground grey)
+    (custom-modified                :foreground blue   :background (doom-blend blue bg 0.2))
+    (custom-variable-tag            :foreground magenta)
+    (custom-visibility              :foreground blue)
+    (custom-group-subtitle          :foreground red)
+    (custom-group-tag               :foreground violet)
+    (custom-group-tag-1             :foreground blue)
+    (custom-set                     :foreground yellow :background bg)
+    (custom-themed                  :foreground yellow :background bg)
+    (custom-invalid                 :foreground red    :background (doom-blend red bg 0.2))
+    (custom-variable-obsolete       :foreground grey   :background bg)
+    (custom-state                   :foreground green  :background (doom-blend green bg 0.2))
+    (custom-changed                 :foreground blue   :background bg)
+    ;;;; cider
+    ;; (cider-stacktrace-error-class-face :inherit 'font-lock-warning-face)
+    ;; (cider-stacktrace-error-message-face :inherit 'font-lock-doc-face)
+    ;; (cider-stacktrace-filter-active-face :inherit 'button :underline t :weight 'normal)
+    ;; (cider-stacktrace-filter-inactive-face :inherit 'cider-stacktrace-filter-active-face :underline nil)
+    ;; (cider-stacktrace-face :inherit 'default)
+    ;; (cider-stacktrace-ns-face :inherit 'font-lock-comment-face)
+    ;; (cider-stacktrace-fn-face :inherit 'default :weight 'bold)
+    ;; (cider-docview-emphasis-face :inherit 'default :underline t)
+    ;; (cider-docview-strong-face :inherit 'default :underline t :weight 'bold)
+    ;; (cider-docview-literal-face :inherit 'font-lock-string-face)
+    ;; (cider-docview-table-border-face :inherit 'shadow)
+    (cider-debug-code-overlay-face :background base3)
+    ;; (cider-debug-prompt-face :inherit font-lock-builtin-face :underline t)
+    (cider-enlightened-face
+     :inherit 'cider-result-overlay-face :box `(:color ,orange :line-width -1))
+    (cider-enlightened-local-face :foreground orange :weight 'bold)
+    ;; (cider-repl-prompt-face :inherit 'font-lock-keyword-face)
+    ;; (cider-repl-stdout-face :inherit 'font-lock-string-face)
+    ;; (cider-repl-stderr-face :inherit 'font-lock-warning-face)
+    ;; (cider-repl-input-face :weight 'bold)
+    ;; (cider-repl-result-face )
+    (cider-result-overlay-face :background base3 :box `(:line-width -1 :color ,base5))
+    (cider-fringe-good-face    :foreground green)
+    (cider-deprecated-face     :background (doom-blend bg yellow 0.8))
+    (cider-instrumented-face   :background (doom-blend bg red 0.8))
+    (cider-traced-face         :background (doom-blend bg cyan 0.8))
+    ;; (cider-reader-conditional-face :inherit 'font-lock-comment-face)
+    (cider-error-highlight-face
+     `((((supports :underline (:style wave)))
+        (:inherit unspecified :underline (:style wave :color ,(car error))))
+       (t (:inherit font-lock-warning-face :underline t))))
+    (cider-warning-highlight-face
+     `((((supports :underline (:style wave)))
+        (:underline (:style wave :color ,(car warning)) :inherit unspecified))
+       (t (:inherit font-lock-warning-face :underline (:color ,(car warning))))))
+    (cider-test-failure-face :background (doom-blend bg error 0.7))
+    (cider-test-error-face   :background orange)
+    (cider-test-success-face
+     (&light :foreground base0 :background green)
+     (&dark  :foreground green :background base0))
+    ;;;; diff-hl
+    (diff-hl-change :foreground vc-modified :background vc-modified)
+    (diff-hl-delete :foreground vc-deleted :background vc-deleted)
+    (diff-hl-insert :foreground vc-added :background vc-added)
+    ;;;; diff-mode <built-in>
+    (diff-added   :inherit 'hl-line :foreground green)
+    (diff-changed :foreground violet)
+    (diff-context
+     (&dark  :foreground (doom-darken fg 0.12))
+     (&light :foreground (doom-lighten fg 0.12)))
+    (diff-removed :foreground red :background base3)
+    (diff-header  :foreground cyan)
+    (diff-file-header :foreground blue)
+    (diff-hunk-header :foreground violet)
+    (diff-indicator-added :foreground vc-added)
+    (diff-indicator-changed :foreground vc-modified)
+    (diff-indicator-removed :foreground vc-deleted)
+    (diff-refine-added   :inherit 'diff-added :inverse-video t)
+    (diff-refine-changed :inherit 'diff-changed :inverse-video t)
+    (diff-refine-removed :inherit 'diff-removed :inverse-video t)
+    ;;;; dired <built-in>
+    (dired-directory  :foreground builtin)
+    (dired-ignored    :foreground comments)
+    (dired-flagged    :foreground red)
+    (dired-header     :foreground blue :weight 'bold)
+    (dired-mark       :foreground orange :weight 'bold)
+    (dired-marked     :foreground magenta :weight 'bold :inverse-video t)
+    (dired-perm-write :foreground fg :underline t)
+    (dired-symlink    :foreground cyan :weight 'bold)
+    (dired-warning    :foreground warning)
+    ;;;; dired+
+    (diredp-file-name              :foreground base8)
+    (diredp-dir-name               :foreground base8 :weight 'bold)
+    (diredp-ignored-file-name      :foreground base5)
+    (diredp-compressed-file-suffix :foreground base5)
+    (diredp-symlink                :foreground violet)
+    (diredp-dir-heading            :foreground blue  :weight 'bold)
+    (diredp-file-suffix            :foreground violet)
+    (diredp-read-priv              :foreground magenta)
+    (diredp-write-priv             :foreground green)
+    (diredp-exec-priv              :foreground yellow)
+    (diredp-rare-priv              :foreground red   :weight 'bold)
+    (diredp-dir-priv               :foreground blue  :weight 'bold)
+    (diredp-no-priv                :foreground base5)
+    (diredp-number                 :foreground magenta)
+    (diredp-date-time              :foreground blue)
+    ;;;; dired-k
+    (dired-k-modified :foreground vc-modified :weight 'bold)
+    (dired-k-commited :foreground green :weight 'bold)
+    (dired-k-added :foreground vc-added :weight 'bold)
+    (dired-k-untracked :foreground teal :weight 'bold)
+    (dired-k-ignored :foreground base5 :weight 'bold)
+    (dired-k-directory :foreground blue :weight 'bold)
+    ;;;; dired-subtree
+    (dired-subtree-depth-1-face :background (doom-darken bg-alt 0.02))
+    (dired-subtree-depth-2-face :background (doom-darken bg-alt 0.04))
+    (dired-subtree-depth-3-face :background (doom-darken bg-alt 0.06))
+    (dired-subtree-depth-4-face :background (doom-darken bg-alt 0.08))
+    (dired-subtree-depth-5-face :background (doom-darken bg-alt 0.10))
+    (dired-subtree-depth-6-face :background (doom-darken bg-alt 0.12))
+    ;;;; diredfl
+    (diredfl-autofile-name          :foreground base4)
+    (diredfl-compressed-file-name   :foreground yellow)
+    (diredfl-compressed-file-suffix :foreground (doom-blend orange bg 0.6))
+    (diredfl-date-time              :foreground cyan :weight 'light)
+    (diredfl-deletion               :foreground red :background (doom-blend red bg 0.2) :weight 'bold)
+    (diredfl-deletion-file-name     :foreground red :background (doom-blend red bg 0.2))
+    (diredfl-dir-heading            :foreground blue :weight 'bold)
+    (diredfl-dir-name               :foreground blue)
+    (diredfl-dir-priv               :foreground blue)
+    (diredfl-exec-priv              :foreground green)
+    (diredfl-executable-tag         :foreground green)
+    (diredfl-file-name              :foreground fg)
+    (diredfl-file-suffix            :foreground (doom-blend fg bg 0.6))
+    (diredfl-flag-mark              :foreground yellow :background (doom-blend yellow bg 0.2) :weight 'bold)
+    (diredfl-flag-mark-line         :background (doom-blend yellow bg 0.1))
+    (diredfl-ignored-file-name      :foreground comments)
+    (diredfl-link-priv              :foreground violet)
+    (diredfl-no-priv                :inherit 'shadow)
+    (diredfl-number                 :foreground orange)
+    (diredfl-other-priv             :foreground magenta)
+    (diredfl-rare-priv              :foreground fg)
+    (diredfl-read-priv              :foreground yellow)
+    (diredfl-symlink                :foreground violet)
+    (diredfl-tagged-autofile-name   :foreground base5)
+    (diredfl-write-priv             :foreground red)
+    ;;;; disk-usage
+    (disk-usage-children            :foreground yellow)
+    (disk-usage-percent             :foreground violet)
+    (disk-usage-size                :foreground blue)
+    (disk-usage-symlink             :foreground cyan :weight 'bold)
+    ;;;; doom-modeline
+    (doom-modeline-eldoc-bar :background green)
+    (doom-modeline-bar-inactive) ; transparent
+    ;;;; doom-themes
+    (doom-themes-visual-bell :background error)
+    ;;;; ediff <built-in>
+    (ediff-fine-diff-A    :inherit 'diff-refine-removed)
+    (ediff-fine-diff-B    :inherit 'diff-refine-added)
+    (ediff-fine-diff-C    :inherit 'ediff-fine-diff-A)
+    (ediff-current-diff-A :foreground vc-deleted :background (doom-blend vc-deleted base3 0.2)  :extend t)
+    (ediff-current-diff-B :foreground vc-added   :background (doom-blend vc-added bg 0.2)       :extend t)
+    (ediff-current-diff-C :inherit 'ediff-current-diff-A)
+    (ediff-even-diff-A    :inherit 'hl-line)
+    (ediff-even-diff-B    :inherit 'ediff-even-diff-A)
+    (ediff-even-diff-C    :inherit 'ediff-even-diff-A)
+    (ediff-odd-diff-A     :inherit 'ediff-even-diff-A)
+    (ediff-odd-diff-B     :inherit 'ediff-odd-diff-A)
+    (ediff-odd-diff-C     :inherit 'ediff-odd-diff-A)
+    ;;;; elfeed
+    (elfeed-log-debug-level-face :foreground comments)
+    (elfeed-log-error-level-face :inherit 'error)
+    (elfeed-log-info-level-face  :inherit 'success)
+    (elfeed-log-warn-level-face  :inherit 'warning)
+    (elfeed-search-date-face     :foreground violet)
+    (elfeed-search-feed-face     :foreground blue)
+    (elfeed-search-tag-face      :foreground comments)
+    (elfeed-search-title-face    :foreground comments)
+    (elfeed-search-filter-face   :foreground violet)
+    (elfeed-search-unread-count-face :foreground yellow)
+    (elfeed-search-unread-title-face :foreground fg :weight 'bold)
+    ;;;; elixir-mode <modes:elixir-mode>
+    (elixir-atom-face (&light :foreground dark-blue)
+                      (&dark  :foreground cyan))
+    (elixir-attribute-face :foreground violet)
+    ;;;; elscreen
+    (elscreen-tab-background-face     :background bg)
+    (elscreen-tab-control-face        :background bg     :foreground bg)
+    (elscreen-tab-current-screen-face :background bg-alt :foreground fg)
+    (elscreen-tab-other-screen-face   :background bg     :foreground fg-alt)
+    ;;;; embark
+    ((embark-target &inherit vertico-current))
+    ;;;; enh-ruby-mode <modes:enh-ruby-mode>
+    (enh-ruby-heredoc-delimiter-face :inherit 'font-lock-string-face)
+    (enh-ruby-op-face                :foreground operators)
+    (enh-ruby-regexp-delimiter-face  :inherit 'enh-ruby-regexp-face)
+    (enh-ruby-regexp-face            :foreground constants)
+    (enh-ruby-string-delimiter-face  :inherit 'font-lock-string-face)
+    (erm-syn-errline                 :underline `(:style wave :color ,error))
+    (erm-syn-warnline                :underline `(:style wave :color ,warning))
+    ;;;; erc <built-in>
+    (erc-button :weight 'bold :underline t)
+    (erc-default-face :inherit 'default)
+    (erc-action-face  :weight 'bold)
+    (erc-command-indicator-face :weight 'bold)
+    (erc-direct-msg-face :foreground magenta)
+    (erc-error-face :inherit 'error)
+    (erc-header-line :background (doom-darken bg-alt 0.15) :foreground highlight)
+    (erc-input-face :foreground green)
+    (erc-current-nick-face :foreground green :weight 'bold)
+    (erc-timestamp-face :foreground blue :weight 'bold)
+    (erc-nick-default-face :weight 'bold)
+    (erc-nick-msg-face :foreground magenta)
+    (erc-nick-prefix-face :inherit 'erc-nick-default-face)
+    (erc-my-nick-face :foreground green :weight 'bold)
+    (erc-my-nick-prefix-face :inherit 'erc-my-nick-face)
+    (erc-notice-face :foreground comments)
+    (erc-prompt-face :foreground highlight :weight 'bold)
+    ;;;; eshell <built-in>
+    (eshell-prompt        :foreground highlight :weight 'bold)
+    (eshell-ls-archive    :foreground magenta)
+    (eshell-ls-backup     :foreground yellow)
+    (eshell-ls-clutter    :foreground red)
+    (eshell-ls-directory  :foreground blue)
+    (eshell-ls-executable :foreground green)
+    (eshell-ls-missing    :foreground red)
+    (eshell-ls-product    :foreground orange)
+    (eshell-ls-readonly   :foreground orange)
+    (eshell-ls-special    :foreground violet)
+    (eshell-ls-symlink    :foreground cyan)
+    (eshell-ls-unreadable :foreground base5)
+    ;;;; evil
+    (evil-ex-info                   :foreground error :slant 'italic)
+    (evil-ex-search                 :background highlight :foreground base0 :weight 'bold)
+    (evil-ex-substitute-matches     :background base0     :foreground red   :weight 'bold :strike-through t)
+    (evil-ex-substitute-replacement :background base0     :foreground green :weight 'bold)
+    (evil-search-highlight-persist-highlight-face :inherit 'lazy-highlight)
+    ;;;; evil-mc
+    (evil-mc-cursor-default-face :background magenta :foreground base0)
+    (evil-mc-region-face         :inherit 'region)
+    (evil-mc-cursor-bar-face     :height 1 :background magenta :foreground base0)
+    (evil-mc-cursor-hbar-face    :underline `(:color ,highlight))
+    ;;;; evil-snipe
+    (evil-snipe-first-match-face :foreground highlight :background dark-blue :weight 'bold)
+    (evil-snipe-matches-face     :foreground highlight :underline t :weight 'bold)
+    ;;;; evil-googles
+    (evil-goggles-default-face :inherit 'region :background (doom-blend region bg 0.5))
+    ;;;; eww
+    (eww-form-checkbox :inherit 'eww-form-file)
+    (eww-form-file   :inherit 'eww-form-submit :background bg-alt)
+    (eww-form-select :inherit 'eww-form-submit :background bg-alt)
+    (eww-form-submit :inherit 'eww-form-text :box `(:line-width 2 :style released-button) :background base2)
+    (eww-form-text :box `(:line-width 1 :color ,base3) :background bg :foreground fg :distant-foreground bg)
+    (eww-form-textarea :inherit 'eww-form-text)
+    (eww-invalid-certificate :foreground error)
+    (eww-valid-certificate :foreground highlight)
+    ;;;; eyebrowse
+    (eyebrowse-mode-line-active :weight 'bold :foreground highlight)
+    ;;;; flycheck
+    (flycheck-error          :underline `(:style wave :color ,red))
+    (flycheck-warning        :underline `(:style wave :color ,yellow))
+    (flycheck-info           :underline `(:style wave :color ,green))
+    (flycheck-fringe-error   :inherit 'fringe :foreground error)
+    (flycheck-fringe-warning :inherit 'fringe :foreground warning)
+    (flycheck-fringe-info    :inherit 'fringe :foreground success)
+    ;;;; flycheck-posframe
+    (flycheck-posframe-face            :inherit 'default)
+    (flycheck-posframe-background-face :background bg-alt)
+    (flycheck-posframe-error-face      :inherit 'flycheck-posframe-face :foreground error)
+    (flycheck-posframe-info-face       :inherit 'flycheck-posframe-face :foreground success)
+    (flycheck-posframe-warning-face    :inherit 'flycheck-posframe-face :foreground warning)
+    ;;;; flymake
+    (flymake-error   :underline `(:style wave :color ,red))
+    (flymake-note    :underline `(:style wave :color ,green))
+    (flymake-warning :underline `(:style wave :color ,orange))
+    ;;;; flyspell <built-in>
+    (flyspell-incorrect :underline `(:style wave :color ,error))
+    (flyspell-duplicate :underline `(:style wave :color ,warning))
+    ;;;; flx-ido
+    (flx-highlight-face :weight 'bold :foreground yellow :underline nil)
+    ;;;; forge
+    (forge-dimmed :inherit 'magit-dimmed)
+    (forge-pullreq-open :inherit 'forge-issue-open)
+    (forge-pullreq-merged :inherit 'forge-issue-completed)
+    (forge-pullreq-rejected :inherit 'forge-issue-unplanned)
+    ;;;; git-commit
+    (git-commit-summary               :foreground strings)
+    (git-commit-overlong-summary      :inherit 'error          :background base0 :slant 'italic :weight 'bold)
+    (git-commit-nonempty-second-line  :inherit 'git-commit-overlong-summary)
+    (git-commit-keyword               :foreground cyan         :slant 'italic)
+    (git-commit-pseudo-header         :foreground doc-comments :slant 'italic)
+    (git-commit-known-pseudo-header   :foreground doc-comments :weight 'bold     :slant 'italic)
+    (git-commit-comment-branch-local  :foreground magenta)
+    (git-commit-comment-branch-remote :foreground green)
+    (git-commit-comment-detached      :foreground orange)
+    (git-commit-comment-heading       :foreground keywords)
+    (git-commit-comment-file          :foreground violet)
+    (git-commit-comment-action)
+    ;;;; git-gutter
+    (git-gutter:modified :inherit 'fringe :foreground vc-modified)
+    (git-gutter:added    :inherit 'fringe :foreground vc-added)
+    (git-gutter:deleted  :inherit 'fringe :foreground vc-deleted)
+    ;;;; git-gutter+
+    (git-gutter+-modified :inherit 'fringe :foreground vc-modified :background 'unspecified)
+    (git-gutter+-added    :inherit 'fringe :foreground vc-added    :background 'unspecified)
+    (git-gutter+-deleted  :inherit 'fringe :foreground vc-deleted  :background 'unspecified)
+    ;;;; git-gutter-fringe
+    ((git-gutter-fr:modified &inherit git-gutter:modified))
+    ((git-gutter-fr:added    &inherit git-gutter:added))
+    ((git-gutter-fr:deleted  &inherit git-gutter:deleted))
+    ;;;; gnus (built-in)
+    (gnus-group-mail-1           :weight 'bold :foreground fg)
+    (gnus-group-mail-2           :inherit 'gnus-group-mail-1)
+    (gnus-group-mail-3           :inherit 'gnus-group-mail-1)
+    (gnus-group-mail-1-empty     :foreground base5)
+    (gnus-group-mail-2-empty     :inherit 'gnus-group-mail-1-empty)
+    (gnus-group-mail-3-empty     :inherit 'gnus-group-mail-1-empty)
+    (gnus-group-news-1           :inherit 'gnus-group-mail-1)
+    (gnus-group-news-2           :inherit 'gnus-group-news-1)
+    (gnus-group-news-3           :inherit 'gnus-group-news-1)
+    (gnus-group-news-4           :inherit 'gnus-group-news-1)
+    (gnus-group-news-5           :inherit 'gnus-group-news-1)
+    (gnus-group-news-6           :inherit 'gnus-group-news-1)
+    (gnus-group-news-1-empty     :inherit 'gnus-group-mail-1-empty)
+    (gnus-group-news-2-empty     :inherit 'gnus-group-news-1-empty)
+    (gnus-group-news-3-empty     :inherit 'gnus-group-news-1-empty)
+    (gnus-group-news-4-empty     :inherit 'gnus-group-news-1-empty)
+    (gnus-group-news-5-empty     :inherit 'gnus-group-news-1-empty)
+    (gnus-group-news-6-empty     :inherit 'gnus-group-news-1-empty)
+    (gnus-group-mail-low         :inherit 'gnus-group-mail-1 :weight 'normal)
+    (gnus-group-mail-low-empty   :inherit 'gnus-group-mail-1-empty)
+    (gnus-group-news-low-empty   :inherit 'gnus-group-mail-1-empty :weight 'normal)
+    (gnus-group-news-low         :inherit 'gnus-group-mail-1 :foreground base5)
+    (gnus-header-content         :inherit 'message-header-other)
+    (gnus-header-from            :inherit 'message-header-other)
+    (gnus-header-name            :inherit 'message-header-name)
+    (gnus-header-newsgroups      :inherit 'message-header-other)
+    (gnus-header-subject         :inherit 'message-header-subject)
+    (gnus-summary-cancelled      :foreground red :strike-through t)
+    (gnus-summary-high-ancient   :foreground (doom-lighten base5 0.2) :inherit 'italic)
+    (gnus-summary-high-read      :foreground (doom-lighten fg 0.2))
+    (gnus-summary-high-ticked    :foreground (doom-lighten magenta 0.2))
+    (gnus-summary-high-unread    :foreground (doom-lighten green 0.2))
+    (gnus-summary-low-ancient    :foreground (doom-darken base5 0.2) :inherit 'italic)
+    (gnus-summary-low-read       :foreground (doom-darken fg 0.2))
+    (gnus-summary-low-ticked     :foreground (doom-darken magenta 0.2))
+    (gnus-summary-low-unread     :foreground (doom-darken green 0.2))
+    (gnus-summary-normal-ancient :foreground base5 :inherit 'italic)
+    (gnus-summary-normal-read    :foreground fg)
+    (gnus-summary-normal-ticked  :foreground magenta)
+    (gnus-summary-normal-unread  :foreground green :inherit 'bold)
+    (gnus-summary-selected       :foreground blue :weight 'bold)
+    (gnus-cite-1                 :foreground violet)
+    (gnus-cite-2                 :foreground yellow)
+    (gnus-cite-3                 :foreground magenta)
+    (gnus-cite-4                 :foreground green)
+    (gnus-cite-5                 :foreground green)
+    (gnus-cite-6                 :foreground green)
+    (gnus-cite-7                 :foreground magenta)
+    (gnus-cite-8                 :foreground magenta)
+    (gnus-cite-9                 :foreground magenta)
+    (gnus-cite-10                :foreground yellow)
+    (gnus-cite-11                :foreground yellow)
+    (gnus-signature              :foreground yellow)
+    (gnus-x-face                 :background base5 :foreground fg)
+    ;;;; goggles
+    (goggles-changed :inherit 'region)
+    (goggles-removed :background (doom-blend red bg-alt 0.25) :extend t)
+    (goggles-added   :background (doom-blend green bg-alt 0.25))
+    ;;;; helm
+    (helm-selection
+     (&all :inherit 'bold :background selection :extend t)
+     (&dark  :distant-foreground highlight)
+     (&light :distant-foreground base0))
+    (helm-match :inherit 'bold :foreground highlight :distant-foreground base8)
+    (helm-source-header          :background base2 :foreground keywords :weight 'bold)
+    (helm-visible-mark           :inherit '(bold highlight))
+    (helm-moccur-buffer          :inherit 'link)
+    (helm-ff-file                :foreground fg)
+    (helm-ff-prefix              :foreground keywords)
+    (helm-ff-dotted-directory    :foreground grey)
+    (helm-ff-directory           :foreground variables)
+    (helm-ff-executable          :foreground base8 :inherit 'italic)
+    (helm-grep-match             :foreground highlight :distant-foreground red)
+    (helm-grep-file              :foreground methods)
+    (helm-grep-lineno            :foreground base5)
+    (helm-grep-finish            :foreground green)
+    ;;;; helm-swoop
+    (helm-swoop-target-line-face       :foreground highlight :inverse-video t)
+    (helm-swoop-target-line-block-face :foreground yellow)
+    (helm-swoop-target-word-face       :foreground green :inherit 'bold)
+    (helm-swoop-target-number-face     :foreground base5)
+    ;;;; helm-rg
+    (helm-rg-active-arg-face        :foreground green  :weight 'normal)
+    (helm-rg-base-rg-cmd-face       :foreground grey   :weight 'normal)
+    (helm-rg-colon-separator-ripgrep-output-face :foreground base8)
+    (helm-rg-directory-cmd-face     :foreground (doom-darken yellow 0.25) :background base0 :weight 'normal)
+    (helm-rg-directory-header-face  :foreground base8 :background base0 :weight 'bold)
+    (helm-rg-error-message          :foreground red)
+    (helm-rg-extra-arg-face         :foreground yellow :weight 'normal)
+    (helm-rg-file-match-face        :foreground cyan :underline t)
+    (helm-rg-inactive-arg-face      :foreground grey   :weight 'normal)
+    (helm-rg-line-number-match-face :foreground orange :underline t)
+    (helm-rg-match-text-face        :foreground base8 :background violet)
+    (helm-rg-title-face             :foreground violet :background base0 :weight 'bold)
+    ;;;; helpful
+    (helpful-heading :weight 'bold :height 1.2)
+    ;;;; hi-lock <built-in>
+    (hi-yellow   :background yellow)
+    (hi-pink     :background magenta)
+    (hi-red-b    :foreground red :weight 'bold)
+    (hi-green    :background green)
+    (hi-green-b  :foreground green :weight 'bold)
+    (hi-blue     :background blue)
+    (hi-blue-b   :foreground blue :weight 'bold)
+    ;; (hi-black-b  :weight 'bold)
+    ;; (hi-black-hb :inherit 'variable-pitch :weight 'bold :height 1.67)
+    ;;;; hideshow <built-in>
+    (+fold-hideshow-folded-face  ; this is defined in Doom Emacs, only
+     :inherit 'font-lock-comment-face
+     :weight 'light
+     :background (doom-darken bg 0.15))
+    ;;;; highlight-numbers-mode
+    (highlight-numbers-number :inherit 'bold :foreground numbers)
+    ;;;; highlight-indentation-mode
+    (highlight-indentation-face                :inherit 'hl-line)
+    (highlight-indentation-current-column-face :background base1)
+    (highlight-indentation-guides-odd-face     :inherit 'highlight-indentation-face)
+    (highlight-indentation-guides-even-face    :inherit 'highlight-indentation-face)
+    ;;;; highlight-quoted-mode
+    (highlight-quoted-symbol :foreground type)
+    (highlight-quoted-quote  :foreground operators)
+    ;;;; highlight-symbol
+    (highlight-symbol-face
+     (&dark  :background (doom-lighten region 0.1) :distant-foreground fg-alt)
+     (&light :background (doom-darken region 0.1) :distant-foreground fg-alt))
+    ;;;; highlight-thing
+    (highlight-thing
+     (&dark  :background (doom-lighten region 0.1) :distant-foreground fg-alt)
+     (&light :background (doom-darken region 0.1) :distant-foreground fg-alt))
+    ;;;; hl-fill-column-face
+    (hl-fill-column-face :inherit '(hl-line shadow))
+    ;;;; hl-line (built-in)
+    (hl-line :background bg-alt :extend t)
+    ;;;; hl-todo
+    (hl-todo :foreground red :weight 'bold)
+    ;;;; hlinum
+    (linum-highlight-face :foreground fg :weight 'normal)
+    ;;;; hydra
+    (hydra-face-red      :foreground red     :weight 'bold)
+    (hydra-face-blue     :foreground blue    :weight 'bold)
+    (hydra-face-amaranth :foreground magenta :weight 'bold)
+    (hydra-face-pink     :foreground violet  :weight 'bold)
+    (hydra-face-teal     :foreground teal    :weight 'bold)
+    ;;;; iedit
+    (iedit-occurrence :foreground magenta :weight 'bold :inverse-video t)
+    (iedit-read-only-occurrence :inherit 'region)
+    ;;;; ido <built-in>
+    (ido-first-match :foreground orange)
+    (ido-indicator   :foreground red :background bg)
+    (ido-only-match  :foreground green)
+    (ido-subdir      :foreground violet)
+    (ido-virtual     :foreground comments)
+    ;;;; imenu-list
+    ;; (imenu-list-entry-face)
+    (imenu-list-entry-face-0 :foreground highlight)
+    (imenu-list-entry-subalist-face-0 :inherit 'imenu-list-entry-face-0 :weight 'bold)
+    (imenu-list-entry-face-1 :foreground green)
+    (imenu-list-entry-subalist-face-1 :inherit 'imenu-list-entry-face-1 :weight 'bold)
+    (imenu-list-entry-face-2 :foreground yellow)
+    (imenu-list-entry-subalist-face-2 :inherit 'imenu-list-entry-face-2 :weight 'bold)
+    ;;;; indent-guide
+    ((indent-guide-face &inherit highlight-indentation-face))
+    ;;;; isearch <built-in>
+    (isearch :inherit 'lazy-highlight :weight 'bold)
+    (isearch-fail :background error :foreground base0 :weight 'bold)
+    ;;;; ivy
+    (ivy-current-match :background region :extend t)
+    (ivy-minibuffer-match-face-1
+     :foreground (doom-lighten grey 0.14)
+     :weight 'light)
+    (ivy-minibuffer-match-face-2
+     :inherit 'ivy-minibuffer-match-face-1
+     :foreground magenta :background base1 :weight 'semi-bold)
+    (ivy-minibuffer-match-face-3
+     :inherit 'ivy-minibuffer-match-face-2
+     :foreground green :weight 'semi-bold)
+    (ivy-minibuffer-match-face-4
+     :inherit 'ivy-minibuffer-match-face-2
+     :foreground yellow :weight 'semi-bold)
+    (ivy-minibuffer-match-highlight :foreground violet)
+    (ivy-highlight-face :foreground violet)
+    (ivy-confirm-face :foreground success)
+    (ivy-match-required-face :foreground error)
+    (ivy-virtual :inherit 'italic :foreground doc-comments)
+    (ivy-modified-buffer :inherit 'bold :foreground warning)
+    ;;;; ivy-posframe
+    (ivy-posframe :background (doom-darken bg-alt 0.2))
+    (ivy-posframe-border :inherit 'internal-border)
+    ;;;; selectrum
+    (selectrum-current-candidate :background region :extend t)
+    ;;;; vertico
+    (vertico-current :background region :extend t)
+    ;;;; vertico-posframe
+    ;;(vertico-posframe :inherit 'default)
+    (vertico-posframe-border :background grey)
+    (vertico-posframe-border-2 :background red)
+    (vertico-posframe-border-3 :background green)
+    (vertico-posframe-border-4 :background blue)
+    (vertico-posframe-border-fallback :background yellow)
+    ;;;; jabber
+    (jabber-activity-face          :foreground red   :weight 'bold)
+    (jabber-activity-personal-face :foreground blue  :weight 'bold)
+    (jabber-chat-error             :foreground red   :weight 'bold)
+    (jabber-chat-prompt-foreign    :foreground red   :weight 'bold)
+    (jabber-chat-prompt-local      :foreground blue  :weight 'bold)
+    (jabber-chat-prompt-system     :foreground green :weight 'bold)
+    (jabber-chat-text-foreign      :foreground fg)
+    (jabber-chat-text-local        :foreground fg)
+    (jabber-rare-time-face         :foreground green)
+    (jabber-roster-user-away       :foreground yellow)
+    (jabber-roster-user-chatty     :foreground green :weight 'bold)
+    (jabber-roster-user-dnd        :foreground red)
+    (jabber-roster-user-error      :foreground red)
+    (jabber-roster-user-offline    :foreground fg)
+    (jabber-roster-user-online     :foreground green :weight 'bold)
+    (jabber-roster-user-xa         :foreground cyan)
+    ;;;; jdee <modes:jdee-mode>
+    (jdee-font-lock-number-face      :foreground numbers)
+    (jdee-font-lock-operator-face    :foreground operators)
+    (jdee-font-lock-constant-face    :inherit 'font-lock-constant-face)
+    (jdee-font-lock-constructor-face :foreground methods)
+    (jdee-font-lock-public-face      :inherit 'font-lock-keyword-face)
+    (jdee-font-lock-protected-face   :inherit 'font-lock-keyword-face)
+    (jdee-font-lock-private-face     :inherit 'font-lock-keyword-face)
+    (jdee-font-lock-modifier-face    :inherit 'font-lock-type-face)
+    (jdee-font-lock-doc-tag-face     :foreground violet)
+    (jdee-font-lock-italic-face      :inherit 'italic)
+    (jdee-font-lock-bold-face        :inherit 'bold)
+    (jdee-font-lock-link-face        :foreground blue :slant nil :underline t)
+    ;;;; js2-mode <modes:js2-mode,js2-jsx-mode>
+    (js2-function-param    :foreground variables)
+    (js2-function-call     :foreground functions)
+    (js2-object-property   :foreground violet)
+    (js2-jsdoc-tag         :foreground doc-comments)
+    (js2-external-variable :foreground operators)
+    ;;;; keycast
+    (keycast-command :inherit 'mode-line-emphasis)
+    (keycast-key     :inherit '(bold mode-line-highlight))
+    ;;;; ledger-mode <modes:ledger-mode>
+    (ledger-font-posting-date-face    :foreground blue)
+    (ledger-font-posting-amount-face  :foreground yellow)
+    (ledger-font-posting-account-face :foreground base8)
+    (ledger-font-payee-cleared-face   :foreground violet :weight 'bold)
+    (ledger-font-payee-uncleared-face :foreground base5  :weight 'bold)
+    (ledger-font-xact-highlight-face  :background base0)
+    ;;;; linum <built-in>
+    ((linum &inherit line-number))
+    ;;;; linum-relative
+    ((linum-relative-current-face &inherit line-number-current-line))
+    ;;;; lui
+    (lui-time-stamp-face :foreground violet)
+    (lui-highlight-face :foreground highlight)
+    (lui-button-face :foreground builtin :underline t)
+    ;;;; magit
+    (magit-bisect-bad        :foreground red)
+    (magit-bisect-good       :foreground green)
+    (magit-bisect-skip       :foreground orange)
+    (magit-blame-hash        :foreground cyan)
+    (magit-blame-date        :foreground red)
+    (magit-blame-heading     :foreground orange :background base3 :extend t)
+    (magit-branch-current    :foreground blue)
+    (magit-branch-local      :foreground cyan)
+    (magit-branch-remote     :foreground green)
+    (magit-cherry-equivalent :foreground violet)
+    (magit-cherry-unmatched  :foreground cyan)
+    (magit-diff-added             :foreground (doom-darken vc-added 0.2)  :background (doom-blend vc-added bg 0.1) :extend t)
+    (magit-diff-added-highlight   :foreground vc-added                    :background (doom-blend vc-added bg 0.2) :weight 'bold :extend t)
+    (magit-diff-base              :foreground (doom-darken orange 0.2) :background (doom-blend orange bg 0.1) :extend t)
+    (magit-diff-base-highlight    :foreground orange                   :background (doom-blend orange bg 0.2) :weight 'bold :extend t)
+    (magit-diff-context           :foreground (doom-darken fg 0.4) :background bg :extend t)
+    (magit-diff-context-highlight :foreground fg                   :background bg-alt :extend t)
+    (magit-diff-file-heading           :foreground fg :weight 'bold :extend t)
+    (magit-diff-file-heading-selection :foreground magenta               :background dark-blue :weight 'bold :extend t)
+    (magit-diff-hunk-heading           :foreground bg                    :background (doom-blend violet bg 0.3) :extend t)
+    (magit-diff-hunk-heading-highlight :foreground bg                    :background violet :weight 'bold :extend t)
+    (magit-diff-lines-heading          :foreground yellow :background red :extend t :extend t)
+    (magit-diff-removed                :foreground (doom-darken vc-deleted 0.2) :background (doom-blend vc-deleted base3 0.1) :extend t)
+    (magit-diff-removed-highlight      :foreground vc-deleted                   :background (doom-blend vc-deleted base3 0.2) :weight 'bold :extend t)
+    (magit-diffstat-added              :foreground vc-added)
+    (magit-diffstat-removed            :foreground vc-deleted)
+    (magit-dimmed :foreground fg-alt)
+    (magit-hash :foreground comments)
+    (magit-header-line :background dark-blue :foreground base8 :weight 'bold
+                       :box `(:line-width 3 :color ,dark-blue))
+    (magit-filename :foreground violet)
+    (magit-log-author :foreground orange)
+    (magit-log-date :foreground blue)
+    (magit-log-graph :foreground comments)
+    (magit-process-ng :inherit 'error)
+    (magit-process-ok :inherit 'success)
+    (magit-reflog-amend :foreground magenta)
+    (magit-reflog-checkout :foreground blue)
+    (magit-reflog-cherry-pick :foreground green)
+    (magit-reflog-commit :foreground green)
+    (magit-reflog-merge :foreground green)
+    (magit-reflog-other :foreground cyan)
+    (magit-reflog-rebase :foreground magenta)
+    (magit-reflog-remote :foreground cyan)
+    (magit-reflog-reset :inherit 'error)
+    (magit-refname :foreground comments)
+    (magit-section-heading :foreground blue :weight 'bold :extend t)
+    (magit-section-heading-selection :foreground orange :weight 'bold :extend t)
+    (magit-section-highlight :inherit 'hl-line)
+    (magit-section-secondary-heading :foreground violet :weight 'bold :extend t)
+    (magit-sequence-drop :foreground red)
+    (magit-sequence-head :foreground blue)
+    (magit-sequence-part :foreground orange)
+    (magit-sequence-stop :foreground green)
+    (magit-signature-bad :inherit 'error)
+    (magit-signature-error :inherit 'error)
+    (magit-signature-expired :foreground orange)
+    (magit-signature-good :inherit 'success)
+    (magit-signature-revoked :foreground magenta)
+    (magit-signature-untrusted :foreground yellow)
+    (magit-tag :foreground yellow)
+    ;;;; make-mode <built-in> <modes:makefile-mode,makefile-automake-mode,makefile-makepp-mode,makefile-gmake-mode,makefile-imake-mode,makefile-bsdmake-mode>
+    (makefile-targets :foreground blue)
+    ;;;; man <built-in> <mode:Man-mode>
+    (Man-overstrike :inherit 'bold :foreground operators)
+    (Man-underline :inherit 'underline :foreground keywords)
+    ;;;; markdown-mode <modes:markdown-mode,gfm-mode>
+    (markdown-header-face           :inherit 'bold :foreground highlight)
+    (markdown-header-delimiter-face :inherit 'markdown-header-face)
+    (markdown-metadata-key-face     :foreground red)
+    (markdown-list-face             :foreground red)
+    (markdown-link-face             :foreground highlight)
+    (markdown-url-face              :foreground magenta :weight 'normal)
+    (markdown-italic-face           :inherit 'italic :foreground violet)
+    (markdown-bold-face             :inherit 'bold   :foreground orange)
+    (markdown-markup-face           :foreground operators)
+    (markdown-blockquote-face       :inherit 'italic :foreground doc-comments)
+    (markdown-pre-face              :foreground strings)
+    (markdown-code-face             :background base3 :extend t)
+    (markdown-reference-face        :foreground doc-comments)
+    (markdown-inline-code-face      :inherit '(markdown-code-face markdown-pre-face) :extend nil)
+    (markdown-html-attr-name-face     :inherit 'font-lock-variable-name-face)
+    (markdown-html-attr-value-face    :inherit 'font-lock-string-face)
+    (markdown-html-entity-face        :inherit 'font-lock-variable-name-face)
+    (markdown-html-tag-delimiter-face :inherit 'markdown-markup-face)
+    (markdown-html-tag-name-face      :inherit 'font-lock-keyword-face)
+    ;;;; marginalia
+    (marginalia-documentation   :inherit 'font-lock-doc-face)
+    (marginalia-file-priv-dir   :foreground blue)
+    (marginalia-file-priv-exec  :foreground green)
+    (marginalia-file-priv-link  :foreground violet)
+    (marginalia-file-priv-other :foreground magenta)
+    (marginalia-file-priv-rare  :foreground fg)
+    (marginalia-file-priv-read  :foreground yellow)
+    (marginalia-file-priv-write :foreground red)
+    (marginalia-number          :foreground numbers)
+    (marginalia-size            :foreground violet)
+    (marginalia-lighter         :foreground violet)
+    ;;;; message <built-in>
+    (message-header-name       :foreground green)
+    (message-header-subject    :foreground highlight :weight 'bold)
+    (message-header-to         :foreground highlight :weight 'bold)
+    (message-header-cc         :inherit 'message-header-to :foreground (doom-darken highlight 0.15))
+    (message-header-other      :foreground violet)
+    (message-header-newsgroups :foreground yellow)
+    (message-header-xheader    :foreground doc-comments)
+    (message-separator         :foreground comments)
+    (message-mml               :foreground comments :slant 'italic)
+    ((message-cited-text   &inherit gnus-cite-1))
+    ((message-cited-text-1 &inherit gnus-cite-2))
+    ((message-cited-text-2 &inherit gnus-cite-3))
+    ((message-cited-text-3 &inherit gnus-cite-4))
+    ((message-cited-text-4 &inherit gnus-cite-5))
+    ;;;; mic-paren
+    (paren-face-match    :foreground red   :background base0 :weight 'ultra-bold)
+    (paren-face-mismatch :foreground base0 :background red   :weight 'ultra-bold)
+    (paren-face-no-match :inherit 'paren-face-mismatch :weight 'ultra-bold)
+    ;;;; minimap
+    (minimap-current-line-face :background selection)
+    (minimap-active-region-background :background vertical-bar)
+    ;; mm
+    (mm-uu-extract :background (doom-blend highlight base2 0.07) :foreground (doom-blend highlight fg 0.15))
+    ;;;; mmm-mode
+    (mmm-init-submode-face :background (doom-blend red bg 0.1))
+    (mmm-cleanup-submode-face :background (doom-blend yellow bg 0.1))
+    (mmm-declaration-submode-face :background (doom-blend cyan bg 0.1))
+    (mmm-comment-submode-face :background (doom-blend blue bg 0.1))
+    (mmm-output-submode-face :background (doom-blend violet bg 0.1))
+    (mmm-special-submode-face :background (doom-blend green bg 0.1))
+    (mmm-code-submode-face :background bg-alt)
+    (mmm-default-submode-face) ; make transparent
+    ;;;; multiple cursors
+    (mc/cursor-face :inherit 'cursor)
+    ;;;; nav-flash
+    (nav-flash-face :background selection :foreground base8 :weight 'bold)
+    ;;;; neotree
+    (neo-root-dir-face   :foreground strings :background bg :box `(:line-width 4 :color ,bg))
+    (neo-file-link-face  :foreground fg)
+    (neo-dir-link-face   :foreground highlight)
+    (neo-expand-btn-face :foreground highlight)
+    (neo-vc-edited-face  :foreground yellow)
+    (neo-vc-added-face   :foreground green)
+    (neo-vc-removed-face :foreground red :strike-through t)
+    (neo-vc-conflict-face :foreground magenta :weight 'bold)
+    (neo-vc-ignored-face  :foreground comments)
+    (doom-neotree-dir-face :foreground highlight)
+    (doom-neotree-file-face :foreground base8)
+    (doom-neotree-hidden-file-face :foreground comments)
+    (doom-neotree-text-file-face :foreground fg)
+    (doom-neotree-data-file-face :foreground violet)
+    (doom-neotree-media-file-face :inherit 'doom-neotree-hidden-file-face)
+    ;;;; nerd-icons
+    (nerd-icons-blue       :foreground blue)
+    (nerd-icons-blue-alt   :foreground teal)
+    (nerd-icons-cyan       :foreground cyan)
+    (nerd-icons-cyan-alt   :foreground cyan)
+    (nerd-icons-dblue      :foreground dark-blue)
+    (nerd-icons-dcyan      :foreground dark-cyan)
+    (nerd-icons-dgreen     :foreground (doom-darken green 0.3))
+    (nerd-icons-dmaroon    :foreground (doom-darken magenta 0.3))
+    (nerd-icons-dorange    :foreground (doom-darken orange 0.3))
+    (nerd-icons-dpink      :foreground (doom-lighten red 0.15))
+    (nerd-icons-dpurple    :foreground (doom-darken violet 0.3))
+    (nerd-icons-dred       :foreground (doom-darken red 0.3))
+    (nerd-icons-dsilver    :foreground (doom-lighten grey 0.1))
+    (nerd-icons-dyellow    :foreground (doom-darken yellow 0.3))
+    (nerd-icons-green      :foreground green)
+    (nerd-icons-lblue      :foreground (doom-lighten blue 0.3))
+    (nerd-icons-lcyan      :foreground (doom-lighten cyan 0.3))
+    (nerd-icons-lgreen     :foreground (doom-lighten green 0.3))
+    (nerd-icons-lmaroon    :foreground (doom-lighten magenta 0.3))
+    (nerd-icons-lorange    :foreground (doom-lighten orange 0.3))
+    (nerd-icons-lpink      :foreground (doom-lighten red 0.55))
+    (nerd-icons-lpurple    :foreground (doom-lighten violet 0.3))
+    (nerd-icons-lred       :foreground (doom-lighten red 0.3))
+    (nerd-icons-lsilver    :foreground (doom-lighten grey 0.7))
+    (nerd-icons-lyellow    :foreground (doom-lighten yellow 0.3))
+    (nerd-icons-maroon     :foreground magenta)
+    (nerd-icons-orange     :foreground orange)
+    (nerd-icons-pink       :foreground (doom-lighten red 0.35))
+    (nerd-icons-purple     :foreground violet)
+    (nerd-icons-purple-alt :foreground (doom-blend violet grey 0.15))
+    (nerd-icons-red        :foreground red)
+    (nerd-icons-red-alt    :foreground (doom-blend red grey 0.15))
+    (nerd-icons-silver     :foreground (doom-lighten grey 0.45))
+    (nerd-icons-yellow     :foreground yellow)
+    ;;;; nerd-icons-completion
+    (nerd-icons-completion-dir-face :foreground doc-comments)
+    ;;;; nerd-icons-dired
+    (nerd-icons-dired-dir-face    :foreground doc-comments)
+    ;;;; nlinum
+    ((nlinum-current-line &inherit line-number-current-line))
+    ;;;; nlinum-hl
+    ((nlinum-hl-face &inherit line-number-current-line))
+    ;;;; nlinum-relative
+    ((nlinum-relative-current-face &inherit line-number-current-line))
+    ;;;; notmuch
+    ;; (notmuch-crypto-decryption               :foreground blue-l)
+    ;; (notmuch-crypto-part-header              :foreground yellow-l)
+    ;; (notmuch-crypto-signature-bad            :foreground red-l)
+    ;; (notmuch-crypto-signature-good           :foreground base1)
+    ;; (notmuch-crypto-signature-good-key       :foreground aqua-l)
+    ;; (notmuch-crypto-signature-unknown        :foreground yellow)
+    ;; (notmuch-hello-logo-background           :foreground fg)
+    (notmuch-message-summary-face            :foreground grey)
+    (notmuch-search-count                    :foreground comments)
+    (notmuch-search-date                     :foreground numbers)
+    (notmuch-search-flagged-face             :foreground (doom-blend red base4 0.5))
+    (notmuch-search-matching-authors         :foreground blue)
+    (notmuch-search-non-matching-authors     :foreground fg)
+    (notmuch-search-subject                  :foreground fg)
+    (notmuch-search-unread-face              :weight 'bold)
+    (notmuch-tag-added                       :foreground green :weight 'normal)
+    (notmuch-tag-deleted                     :foreground red :weight 'normal)
+    (notmuch-tag-face                        :foreground yellow :weight 'normal)
+    (notmuch-tag-flagged                     :foreground yellow :weight 'normal)
+    (notmuch-tag-unread                      :foreground yellow :weight 'normal)
+    (notmuch-tree-match-author-face          :foreground blue :weight 'bold)
+    (notmuch-tree-match-date-face            :foreground numbers :weight 'bold)
+    (notmuch-tree-match-face                 :foreground fg)
+    (notmuch-tree-match-subject-face         :foreground fg)
+    (notmuch-tree-match-tag-face             :foreground yellow)
+    (notmuch-tree-match-tree-face            :foreground comments)
+    (notmuch-tree-no-match-author-face       :foreground blue)
+    (notmuch-tree-no-match-date-face         :foreground numbers)
+    (notmuch-tree-no-match-face              :foreground base5)
+    (notmuch-tree-no-match-subject-face      :foreground base5)
+    (notmuch-tree-no-match-tag-face          :foreground yellow)
+    (notmuch-tree-no-match-tree-face         :foreground yellow)
+    (notmuch-wash-cited-text                 :foreground base4)
+    (notmuch-wash-toggle-button :foreground fg)
+    ;;;; lsp-mode
+    (lsp-face-highlight-textual
+     (&all   :weight 'bold)
+     (&light :background base3 :foreground base0 :distant-foreground base8)
+     (&dark  :background (doom-blend highlight bg 0.3) :foreground base8 :distant-foreground base0))
+    (lsp-face-highlight-read    :inherit 'lsp-face-highlight-textual)
+    (lsp-face-highlight-write   :inherit 'lsp-face-highlight-textual)
+    (lsp-headerline-breadcrumb-separator-face :inherit 'shadow)
+    ;;;; lsp-ui
+    (lsp-ui-doc-background :inherit 'tooltip)
+    (lsp-ui-peek-filename :inherit 'mode-line-buffer-id)
+    (lsp-ui-peek-header :foreground fg :background (doom-lighten bg 0.1) :bold bold)
+    (lsp-ui-peek-selection :foreground bg :background blue :bold bold)
+    (lsp-ui-peek-list :background (doom-darken bg 0.1))
+    (lsp-ui-peek-peek :background (doom-darken bg 0.1))
+    (lsp-ui-peek-highlight :inherit 'isearch :box t)
+    (lsp-ui-peek-line-number :foreground success)
+    (lsp-ui-sideline-code-action :foreground (doom-blend highlight bg 0.85))
+    (lsp-ui-sideline-current-symbol :inherit 'highlight)
+    (lsp-ui-sideline-symbol-info :foreground (doom-blend comments bg 0.85)
+                                 :background bg-alt :extend t)
+    ;;;; objed
+    (objed-mode-line :inherit 'warning :weight 'bold)
+    (objed-hl        :inherit 'region :background (doom-blend region bg 0.5))
+    ;;;; orderless
+    (orderless-match-face-0 :weight 'bold :foreground (doom-blend blue    fg 0.6) :background (doom-blend blue    bg 0.1))
+    (orderless-match-face-1 :weight 'bold :foreground (doom-blend magenta fg 0.6) :background (doom-blend magenta bg 0.1))
+    (orderless-match-face-2 :weight 'bold :foreground (doom-blend green   fg 0.6) :background (doom-blend green   bg 0.1))
+    (orderless-match-face-3 :weight 'bold :foreground (doom-blend yellow  fg 0.6) :background (doom-blend yellow  bg 0.1))
+    ;;;; org <built-in> <modes:org-mode>
+    (org-archived                 :foreground doc-comments)
+    (org-block                    :background base3    :extend t)
+    (org-block-background         :background base3    :extend t)
+    (org-block-begin-line         :inherit 'org-block  :foreground comments)
+    (org-block-end-line           :inherit 'org-block-begin-line)
+    (org-checkbox                 :inherit 'org-todo)
+    (org-checkbox-statistics-done :inherit 'org-done)
+    (org-checkbox-statistics-todo :inherit 'org-todo)
+    (org-cite                     :foreground (doom-blend teal fg 0.9))
+    (org-cite-key                 :foreground (doom-blend teal fg 0.6) :underline t)
+    (org-code                     :inherit 'org-block :foreground orange)
+    (org-date                     :foreground yellow)
+    (org-default                  :inherit 'variable-pitch)
+    (org-document-info            :foreground builtin)
+    (org-document-title           :foreground builtin         :weight 'bold)
+    (org-done                     :inherit 'org-headline-done :strike-through nil :weight 'bold)
+    (org-drawer                   :foreground comments)
+    (org-ellipsis                 :foreground comments :underline nil)
+    (org-footnote                 :foreground orange)
+    (org-formula                  :foreground cyan)
+    (org-headline-done            :foreground base5)
+    (org-hide                     :foreground bg)
+    (org-latex-and-related        :foreground base8           :weight 'bold)
+    (org-link                     :inherit 'link              :foreground highlight)
+    (org-list-dt                  :foreground highlight)
+    (org-meta-line                :foreground doc-comments)
+    (org-priority                 :foreground red)
+    (org-property-value           :foreground doc-comments)
+    (org-quote                    :inherit 'org-block :slant 'italic)
+    (org-special-keyword          :foreground doc-comments)
+    (org-table                    :foreground violet)
+    (org-tag                      :foreground doc-comments :weight 'normal)
+    (org-todo                     :foreground green :bold 'inherit)
+    (org-verbatim                 :foreground green)
+    (org-warning                  :foreground warning)
+    ;; Omitted because we rely on style they inherit from the outline-N faces
+    ;;(org-level-1)
+    ;;(org-level-2)
+    ;;(org-level-3)
+    ;;(org-level-4)
+    ;;(org-level-5)
+    ;;(org-level-6)
+    ;;(org-level-7)
+    ;;(org-level-8)
+    ;;;; org-agenda <built-in>
+    (org-agenda-done :inherit 'org-done)
+    (org-agenda-dimmed-todo-face :foreground comments)
+    (org-agenda-date          :foreground violet :weight 'ultra-bold)
+    (org-agenda-date-today    :foreground (doom-lighten violet 0.4)   :weight 'ultra-bold)
+    (org-agenda-date-weekend  :foreground (doom-darken violet 0.4)  :weight 'ultra-bold)
+    (org-agenda-structure     :foreground fg :weight 'ultra-bold)
+    (org-agenda-clocking      :background (doom-blend blue bg 0.2))
+    (org-upcoming-deadline         :foreground (doom-blend fg bg 0.8))
+    (org-upcoming-distant-deadline :foreground (doom-blend fg bg 0.5))
+    (org-scheduled            :foreground fg)
+    (org-scheduled-today      :foreground base7)
+    (org-scheduled-previously :foreground base8)
+    (org-time-grid            :foreground comments)
+    (org-sexp-date            :foreground fg)
+    ;;;; org-habit
+    (org-habit-clear-face          :weight 'bold :background base4)
+    (org-habit-clear-future-face   :weight 'bold :background base3)
+    (org-habit-ready-face          :weight 'bold :background (doom-blend blue bg-alt 0.5))
+    (org-habit-ready-future-face   :weight 'bold :background (doom-blend blue bg-alt 0.3))
+    (org-habit-alert-face          :weight 'bold :background (doom-blend yellow bg-alt 0.5))
+    (org-habit-alert-future-face   :weight 'bold :background (doom-blend yellow bg-alt 0.3))
+    (org-habit-overdue-face        :weight 'bold :background (doom-blend red bg-alt 0.5))
+    (org-habit-overdue-future-face :weight 'bold :background (doom-blend red bg-alt 0.3))
+    ;;;; org-journal <modes:org-journal-mode>
+    (org-journal-highlight :foreground highlight)
+    (org-journal-calendar-entry-face :foreground magenta :slant 'italic)
+    (org-journal-calendar-scheduled-face :foreground red :slant 'italic)
+    ;;;; org-pomodoro
+    (org-pomodoro-mode-line :foreground red)
+    (org-pomodoro-mode-line-overtime :foreground warning :weight 'bold)
+    ;;;; org-ref
+    (org-ref-acronym-face    :foreground violet)
+    (org-ref-cite-face       :foreground yellow :weight 'light :underline t)
+    (org-ref-glossary-face   :foreground magenta)
+    (org-ref-label-face      :foreground blue)
+    (org-ref-ref-face        :inherit 'link :foreground teal)
+    ;;;; outline <built-in>
+    ;; NOTE org-mode's org-level-N faces inherit these outline-N faces.
+    (outline-1 :foreground blue                        :weight 'bold :extend t)
+    (outline-2 :foreground magenta                     :weight 'bold :extend t)
+    (outline-3 :foreground violet                      :weight 'bold :extend t)
+    (outline-4 :foreground (doom-lighten blue 0.25)    :weight 'bold :extend t)
+    (outline-5 :foreground (doom-lighten magenta 0.25) :weight 'bold :extend t)
+    (outline-6 :foreground (doom-lighten blue 0.5)     :weight 'bold :extend t)
+    (outline-7 :foreground (doom-lighten magenta 0.5)  :weight 'bold :extend t)
+    (outline-8 :foreground (doom-lighten blue 0.8)     :weight 'bold :extend t)
+    ;;;; parenface
+    (paren-face :foreground comments)
+    ;;;; parinfer
+    (parinfer-pretty-parens:dim-paren-face :foreground base5)
+    (parinfer-smart-tab:indicator-face :foreground base5)
+    ;;;; perspective
+    (persp-selected-face :foreground blue :weight 'bold)
+    ;;;; persp-mode
+    (persp-face-lighter-default :foreground highlight :weight 'bold)
+    (persp-face-lighter-buffer-not-in-persp :foreground doc-comments)
+    (persp-face-lighter-nil-persp :foreground comments)
+    ;;;; pkgbuild-mode <modes:pkgbuild-mode>
+    (pkgbuild-error-face :underline `(:style wave :color ,red))
+    ;;;; popup
+    (popup-face           :inherit 'tooltip)
+    (popup-tip-face       :inherit 'popup-face :foreground violet :background base0)
+    (popup-selection-face :background selection)
+    ;;;; power
+    (powerline-active0   :inherit 'mode-line :background bg)
+    (powerline-active1   :inherit 'mode-line :background (doom-lighten 'bg 0.025))
+    (powerline-active2   :inherit 'mode-line :foreground base8 :background (doom-lighten 'bg 0.08))
+    (powerline-inactive0 :inherit 'mode-line-inactive :background base2)
+    (powerline-inactive1 :inherit 'mode-line-inactive :background (doom-lighten 'base2 0.02))
+    (powerline-inactive2 :inherit 'mode-line-inactive :background (doom-lighten 'base2 0.04))
+    ;;;; rainbow-delimiters
+    (rainbow-delimiters-depth-1-face :foreground blue)
+    (rainbow-delimiters-depth-2-face :foreground magenta)
+    (rainbow-delimiters-depth-3-face :foreground green)
+    (rainbow-delimiters-depth-4-face :foreground violet)
+    (rainbow-delimiters-depth-5-face :foreground teal)
+    (rainbow-delimiters-depth-6-face :foreground blue)
+    (rainbow-delimiters-depth-7-face :foreground magenta)
+    (rainbow-delimiters-depth-8-face :foreground green)
+    (rainbow-delimiters-depth-9-face :foreground violet)
+    (rainbow-delimiters-base-error-face :inherit 'rainbow-delimiters-base-face :foreground error)
+    (rainbow-delimiters-base-face :inherit 'default)
+    (rainbow-delimiters-unmatched-face  :foreground red :weight 'bold :inverse-video t)
+    (rainbow-delimiters-mismatched-face :inherit 'rainbow-delimiters-unmatched-face)
+    ;;;; re-builder <built-in>
+    (reb-match-0 :foreground orange  :inverse-video t)
+    (reb-match-1 :foreground magenta :inverse-video t)
+    (reb-match-2 :foreground green   :inverse-video t)
+    (reb-match-3 :foreground yellow  :inverse-video t)
+    ;;;; rjsx-mode <modes:rjsx-mode>
+    (rjsx-tag :foreground type)
+    (rjsx-attr :foreground functions)
+    ;;;; rpm-spec-mode <modes:rpm-spec-mode>
+    (rpm-spec-macro-face        :foreground yellow)
+    (rpm-spec-var-face          :foreground violet)
+    (rpm-spec-tag-face          :foreground blue)
+    (rpm-spec-obsolete-tag-face :foreground red)
+    (rpm-spec-package-face      :foreground orange)
+    (rpm-spec-dir-face          :foreground green)
+    (rpm-spec-doc-face          :foreground orange)
+    (rpm-spec-ghost-face        :foreground comments)
+    (rpm-spec-section-face      :foreground magenta)
+    ;;;; rst <built-in> <modes:rst-mode>
+    (rst-block :inherit 'font-lock-constant-face)
+    (rst-level-1 :inherit 'rst-adornment :weight 'bold)
+    (rst-level-2 :inherit 'rst-adornment :weight 'bold)
+    (rst-level-3 :inherit 'rst-adornment :weight 'bold)
+    (rst-level-4 :inherit 'rst-adornment :weight 'bold)
+    (rst-level-5 :inherit 'rst-adornment :weight 'bold)
+    (rst-level-6 :inherit 'rst-adornment :weight 'bold)
+    ;;;; sh-script <built-in> <modes:sh-mode,shell-script-mode>
+    (sh-heredoc :inherit 'font-lock-string-face :weight 'normal)
+    (sh-quoted-exec :inherit 'font-lock-preprocessor-face)
+    ;;;; show-paren <built-in>
+    ((show-paren-match &inherit paren-face-match))
+    ((show-paren-mismatch &inherit paren-face-mismatch))
+    ;;;; smart-mode-line
+    (sml/charging          :foreground green)
+    (sml/discharging       :foreground yellow :weight 'bold)
+    (sml/filename          :foreground violet :weight 'bold)
+    (sml/git               :foreground blue)
+    (sml/modified          :foreground cyan)
+    (sml/outside-modified  :foreground cyan)
+    (sml/process           :weight 'bold)
+    (sml/read-only         :foreground cyan)
+    (sml/sudo              :foreground orange :weight 'bold)
+    (sml/vc-edited         :foreground green)
+    ;;;; smartparens
+    (sp-pair-overlay-face :background region)
+    ((sp-show-pair-match-face    &inherit show-paren-match))
+    ((sp-show-pair-mismatch-face &inherit show-paren-mismatch))
+    ;;;; smerge-tool
+    (smerge-lower :background (doom-blend green bg 0.2))
+    (smerge-upper :background (doom-blend red base3 0.2))
+    (smerge-base  :background (doom-blend blue bg 0.2))
+    (smerge-markers :background comments :foreground bg :distant-foreground fg :weight 'bold)
+    (smerge-refined-added   :inherit 'diff-added :inverse-video t)
+    (smerge-refined-removed :inherit 'diff-removed :inverse-video t)
+    ;; Emacs <25 compatibility
+    ((smerge-mine  &inherit smerge-upper))
+    ((smerge-other &inherit smerge-lower))
+    ;;;; solaire-mode
+    (solaire-default-face  :inherit 'default :background bg-alt)
+    (solaire-hl-line-face  :inherit 'hl-line :background bg :extend t)
+    (solaire-org-hide-face :inherit 'org-hide :foreground bg-alt)
+    ;;;; spaceline
+    (spaceline-highlight-face   :background highlight)
+    (spaceline-modified         :background vc-modified)
+    (spaceline-unmodified       :background constants)
+    (spaceline-python-venv      :foreground magenta :distant-foreground violet)
+    (spaceline-flycheck-error   :inherit 'error     :distant-background base0)
+    (spaceline-flycheck-warning :inherit 'warning   :distant-background base0)
+    (spaceline-flycheck-info    :inherit 'success   :distant-background base0)
+    (spaceline-evil-normal      :background blue)
+    (spaceline-evil-insert      :background green)
+    (spaceline-evil-emacs       :background cyan)
+    (spaceline-evil-replace     :background orange)
+    (spaceline-evil-visual      :background grey)
+    (spaceline-evil-motion      :background magenta)
+    ;;;; spell-fu
+    (spell-fu-incorrect-face
+     `((((supports :underline (:style wave)))
+        (:underline (:style wave :color ,(car error))))
+       (t (:inherit error :underline t))))
+    ;;;; stripe-buffer
+    (stripe-highlight
+     (&light :background base5)
+     (&dark  :background base3))
+    ;;;; symbol-overlay
+    (symbol-overlay-default-face
+     (&dark  :background (doom-lighten region 0.1) :distant-foreground fg-alt)
+     (&light :background (doom-darken region 0.1)  :distant-foreground fg-alt))
+    (symbol-overlay-face-1 :background (doom-blend blue bg 0.4)    :distant-foreground fg-alt)
+    (symbol-overlay-face-2 :background (doom-blend violet bg 0.4)  :distant-foreground fg-alt)
+    (symbol-overlay-face-3 :background (doom-blend yellow bg 0.3)  :distant-foreground fg-alt)
+    (symbol-overlay-face-4 :background (doom-blend orange bg 0.3)  :distant-foreground fg-alt)
+    (symbol-overlay-face-5 :background (doom-blend red bg 0.3)     :distant-foreground fg-alt)
+    (symbol-overlay-face-6 :background (doom-blend magenta bg 0.3) :distant-foreground fg-alt)
+    (symbol-overlay-face-7 :background (doom-blend green bg 0.4)   :distant-foreground fg-alt)
+    (symbol-overlay-face-8 :background (doom-blend cyan bg 0.2)    :distant-foreground fg-alt)
+    ;;;; swiper
+    (swiper-line-face    :background blue    :foreground base0)
+    (swiper-match-face-1 :background base0   :foreground base5)
+    (swiper-match-face-2 :background orange  :foreground base0 :weight 'bold)
+    (swiper-match-face-3 :background magenta :foreground base0 :weight 'bold)
+    (swiper-match-face-4 :background green   :foreground base0 :weight 'bold)
+    ;;;; tabbar
+    (tabbar-default             :foreground bg :background bg :height 1.0)
+    (tabbar-highlight           :foreground fg :background selection :distant-foreground bg)
+    (tabbar-button              :foreground fg :background bg)
+    (tabbar-button-highlight    :inherit 'tabbar-button :inverse-video t)
+    (tabbar-modified            :inherit 'tabbar-default :foreground red :weight 'bold)
+    (tabbar-unselected          :inherit 'tabbar-default :foreground base5)
+    (tabbar-unselected-modified :inherit 'tabbar-modified)
+    (tabbar-selected
+     :inherit 'tabbar-default :weight 'bold
+     :foreground fg :background bg-alt)
+    (tabbar-selected-modified :inherit 'tabbar-selected :foreground green)
+    ;;;; telephone-line
+    (telephone-line-accent-active :foreground fg :background base4)
+    (telephone-line-accent-inactive :foreground fg :background base2)
+    (telephone-line-projectile :foreground green)
+    (telephone-line-evil :foreground fg :weight 'bold)
+    (telephone-line-evil-insert :background (doom-blend green bg 0.5) :weight 'bold)
+    (telephone-line-evil-normal :background (doom-blend red bg 0.5) :weight 'bold)
+    (telephone-line-evil-visual :background (doom-blend orange bg 0.5) :weight 'bold)
+    (telephone-line-evil-replace :background (doom-color bg-alt) :weight 'bold)
+    (telephone-line-evil-motion :background (doom-blend blue bg 0.5) :weight 'bold)
+    (telephone-line-evil-operator :background (doom-blend violet bg 0.5) :weight 'bold)
+    (telephone-line-evil-emacs :background (doom-blend magenta bg 0.5) :weight 'bold)
+    ;;;; term <built-in>
+    (term               :foreground fg)
+    (term-bold          :weight 'bold)
+    (term-color-black   :background base0   :foreground base0)
+    (term-color-red     :background red     :foreground red)
+    (term-color-green   :background green   :foreground green)
+    (term-color-yellow  :background yellow  :foreground yellow)
+    (term-color-blue    :background blue    :foreground blue)
+    (term-color-magenta :background magenta :foreground magenta)
+    (term-color-cyan    :background cyan    :foreground cyan)
+    (term-color-white   :background base8   :foreground base8)
+    ;;;; terraform-mode
+    (terraform--resource-type-face :foreground type)
+    (terraform--resource-name-face :foreground strings)
+    ;;;; tldr
+    (tldr-command-itself   :foreground bg :background green :weight 'semi-bold)
+    (tldr-title            :foreground yellow :bold t :height 1.4)
+    (tldr-description      :foreground fg :weight 'semi-bold)
+    (tldr-introduction     :foreground (doom-blend blue bg 0.8) :weight 'semi-bold)
+    (tldr-code-block       :foreground green :background region :weight 'semi-bold)
+    (tldr-command-argument :foreground fg :background region)
+    ;;;; typescript-mode <modes:typescript-mode,typescript-tsx-mode>
+    (typescript-jsdoc-tag :foreground doc-comments)
+    (typescript-jsdoc-type :foreground (doom-darken doc-comments 0.15))
+    (typescript-jsdoc-value :foreground (doom-lighten doc-comments 0.15))
+    ;;;; treemacs
+    (treemacs-directory-face        :foreground fg)
+    (treemacs-file-face             :foreground fg)
+    (treemacs-fringe-indicator-face :foreground highlight)
+    (treemacs-git-added-face        :foreground vc-added)
+    (treemacs-git-conflict-face     :foreground red)
+    (treemacs-git-modified-face     :foreground violet)
+    (treemacs-git-untracked-face    :inherit 'font-lock-doc-face)
+    (treemacs-on-failure-pulse-face :foreground base0 :background error   :extend t)
+    (treemacs-on-success-pulse-face :foreground base0 :background success :extend t)
+    (treemacs-root-face             :inherit 'font-lock-string-face :weight 'bold       :height 1.2)
+    (treemacs-tags-face             :foreground highlight)
+    ;;;; treemacs-nerd-icons
+    (treemacs-nerd-icons-file-face :foreground doc-comments)
+    (treemacs-nerd-icons-root-face :inherit 'font-lock-string-face :weight 'bold :height 1.2)
+    ;;;; ts-fold
+    (ts-fold-fringe-face)
+    ((ts-fold-replacement-face &inherit +fold-hideshow-folded-face))
+    ((ts-fold-replacement-mouse-face &inherit +fold-hideshow-folded-face)
+     :box '(:line-width -1 :style released-button))
+    ;;;; twittering-mode
+    (twitter-divider  ; custom face in Doom Emacs
+     (&light :underline `(:color ,(doom-lighten vertical-bar 0.2)))
+     (&dark  :underline `(:color ,(doom-darken vertical-bar 0.2))))
+    ;;;; undo-tree
+    (undo-tree-visualizer-default-face       :foreground base5)
+    (undo-tree-visualizer-current-face       :foreground green :weight 'bold)
+    (undo-tree-visualizer-unmodified-face    :foreground base5)
+    (undo-tree-visualizer-active-branch-face :foreground blue)
+    (undo-tree-visualizer-register-face      :foreground yellow)
+    ;;;; vimish-fold
+    (vimish-fold-overlay :inherit 'font-lock-comment-face :background base0 :weight 'light)
+    (vimish-fold-fringe  :foreground magenta)
+    ;;;; visual-regexp
+    (vr/group-0 :background blue    :foreground bg)
+    (vr/group-1 :background magenta :foreground bg)
+    (vr/group-2 :background green   :foreground bg)
+    (vr/match-0 :background (doom-blend green bg 0.2) :foreground fg)
+    (vr/match-1 :background (doom-blend green bg 0.4) :foreground fg)
+    (vr/match-separator-face :inherit 'bold :foreground red)
+    ;;;; volatile-highlights
+    (vhl/default-face :background grey)
+    ;;;; vterm
+    (vterm-color-black   :background (doom-lighten base0 0.25)   :foreground base0)
+    (vterm-color-red     :background (doom-lighten red 0.25)     :foreground red)
+    (vterm-color-green   :background (doom-lighten green 0.25)   :foreground green)
+    (vterm-color-yellow  :background (doom-lighten yellow 0.25)  :foreground yellow)
+    (vterm-color-blue    :background (doom-lighten blue 0.25)    :foreground blue)
+    (vterm-color-magenta :background (doom-lighten magenta 0.25) :foreground magenta)
+    (vterm-color-cyan    :background (doom-lighten cyan 0.25)    :foreground cyan)
+    (vterm-color-white   :background (doom-lighten base8 0.25)   :foreground base8)
+    ;;;; web-mode <modes:web-mode>
+    (web-mode-block-control-face     :foreground builtin)
+    (web-mode-block-delimiter-face   :foreground builtin)
+    (web-mode-css-property-name-face :foreground type)
+    (web-mode-doctype-face           :foreground comments)
+    (web-mode-html-tag-face          :foreground methods)
+    (web-mode-html-tag-bracket-face  :foreground methods)
+    (web-mode-html-attr-name-face    :foreground type)
+    (web-mode-html-attr-value-face   :foreground strings)
+    (web-mode-html-entity-face       :foreground cyan :inherit 'italic)
+    (web-mode-block-control-face     :foreground orange)
+    (web-mode-html-tag-bracket-face  :foreground operators)
+    (web-mode-json-key-face          :foreground strings)
+    (web-mode-json-context-face      :foreground strings)
+    (web-mode-keyword-face           :foreground keywords)
+    (web-mode-string-face            :foreground strings)
+    (web-mode-type-face              :foreground type)
+    ;;;; wgrep <built-in>
+    (wgrep-face :weight 'bold :foreground green :background base5)
+    (wgrep-delete-face :foreground base3 :background red)
+    (wgrep-done-face   :foreground blue)
+    (wgrep-file-face   :foreground comments)
+    (wgrep-reject-face :foreground red :weight 'bold)
+    ;;;; which-func
+    (which-func :foreground blue)
+    ;;;; which-key
+    (which-key-key-face                   :foreground green)
+    (which-key-group-description-face     :foreground violet)
+    (which-key-command-description-face   :foreground blue)
+    (which-key-local-map-description-face :foreground magenta)
+    ;;;; whitespace <built-in>
+    (whitespace-empty    :background base3)
+    (whitespace-space    :foreground base4)
+    (whitespace-newline  :foreground base4)
+    (whitespace-tab
+     :foreground base4
+     :background (if (default-value 'indent-tabs-mode) 'unspecified base3))
+    (whitespace-indentation
+     :foreground base4
+     :background (if (default-value 'indent-tabs-mode) base3 'unspecified))
+    (whitespace-trailing :inherit 'trailing-whitespace)
+    (whitespace-line     :background base0 :foreground red :weight 'bold)
+    ;;;; widget
+    (widget-button-pressed :foreground red)
+    (widget-documentation  :foreground green)
+    (widget-single-line-field :background base3 :distant-foreground bg)
+    (widget-field :background base3 :distant-foreground bg
+                  :box `(:line-width -1 :color ,grey) :extend t)
+    ;;;; window-divider
+    (window-divider :inherit 'vertical-border)
+    (window-divider-first-pixel :inherit 'window-divider)
+    (window-divider-last-pixel  :inherit 'window-divider)
+    ;;;; window-tool-bar
+    (window-tool-bar-button :background bg :foreground fg)
+    (window-tool-bar-button-hover :inherit 'highlight :distant-foreground bg)
+    (window-tool-bar-button-disabled :background bg-alt :foreground fg-alt)
+    ;;;; winum
+    (winum-face :inherit 'bold :foreground highlight)
+    ;;;; woman <built-in>
+    (woman-bold :inherit 'Man-overstrike)
+    (woman-italic :inherit 'Man-underline)
+    ;;;; xah-elisp-mode
+    (xah-elisp-at-symbol     :inherit 'font-lock-warning-face)
+    (xah-elisp-cap-variable  :inherit 'font-lock-preprocessor-face)
+    (xah-elisp-command-face  :inherit 'font-lock-type-face)
+    (xah-elisp-dollar-symbol :inherit 'font-lock-variable-name-face)
+    ;;;; workgroups2
+    (wg-current-workgroup-face :foreground base0 :background highlight)
+    (wg-other-workgroup-face   :foreground base5)
+    (wg-divider-face           :foreground grey)
+    (wg-brace-face             :foreground highlight)
+    ;;;; yasnippet
+    (yas-field-highlight-face :inherit 'match)
+    ;;;; xref <built-in>
+    ((xref-file-header &inherit compilation-info))
+    ((xref-line-number &inherit compilation-line-number))
+    ((xref-match &inherit match)))
+    ;;;; --- END Package faces ------------------
+    
+  "TODO")
+
+;;;; --- Package variables ------------------
+(defvar doom-themes-base-vars
+  '(
+    ;;;; ansi-color <built-in> DEPRECATED
+    (ansi-color-names-vector
+     (vconcat (mapcar #'doom-color '(bg red green yellow blue magenta cyan fg))))
+    ;;;; rustic <modes:rustic-mode>
+    (rustic-ansi-faces
+     (vconcat (mapcar #'doom-color '(bg red green yellow blue magenta cyan fg))))
+    ;;;; exwm
+    (exwm-floating-border-color (doom-color 'vertical-bar))
+    ;;;; fill-column-indicator
+    (fci-rule-color (doom-color 'base5))
+    ;;;; jdee <modes:jdee-mode>
+    (jdee-db-spec-breakpoint-face-colors `(cons ,(doom-color 'base0) ,(doom-color 'grey)))
+    (jdee-db-requested-breakpoint-face-colors `(cons ,(doom-color 'base0) ,(doom-color 'green)))
+    (jdee-db-active-breakpoint-face-colors `(cons ,(doom-color 'base0) ,(doom-color 'highlight)))
+    ;;;; highlight-tail
+    (highlight-tail-colors
+     `((,(doom-blend green bg 0.1) . 0)
+       (,(doom-blend cyan bg 0.1) . 20)))
+    ;;;; objed
+    (objed-cursor-color (doom-color 'red))
+    ;;;; pdf-tools
+    (pdf-view-midnight-colors `(cons ,(doom-color 'fg) ,(doom-color 'bg)))
+    ;;;; vc <built-in>
+    (vc-annotate-color-map
+     `(list (cons 20  ,(doom-color 'green))
+            (cons 40  ,(doom-blend 'yellow 'green (/ 1.0 3)))
+            (cons 60  ,(doom-blend 'yellow 'green (/ 2.0 3)))
+            (cons 80  ,(doom-color 'yellow))
+            (cons 100 ,(doom-blend 'orange 'yellow (/ 1.0 3)))
+            (cons 120 ,(doom-blend 'orange 'yellow (/ 2.0 3)))
+            (cons 140 ,(doom-color 'orange))
+            (cons 160 ,(doom-blend 'magenta 'orange (/ 1.0 3)))
+            (cons 180 ,(doom-blend 'magenta 'orange (/ 2.0 3)))
+            (cons 200 ,(doom-color 'magenta))
+            (cons 220 ,(doom-blend 'red 'magenta (/ 1.0 3)))
+            (cons 240 ,(doom-blend 'red 'magenta (/ 2.0 3)))
+            (cons 260 ,(doom-color 'red))
+            (cons 280 ,(doom-blend 'grey 'red (/ 1.0 4)))
+            (cons 300 ,(doom-blend 'grey 'red (/ 2.0 4)))
+            (cons 320 ,(doom-blend 'grey 'red (/ 3.0 4)))
+            (cons 340 ,(doom-color 'base5))
+            (cons 360 ,(doom-color 'base5))))
+    (vc-annotate-very-old-color nil)
+    (vc-annotate-background (doom-color 'bg)))
+;;;; --- END Package variables --------------
+  "TODO")
+
+(provide 'doom-themes-base)
+;;; doom-themes-base.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-base.elc b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-base.elc
new file mode 100644
index 0000000..4196219
Binary files /dev/null and b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-base.elc differ
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-neotree.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-neotree.el
new file mode 100644
index 0000000..0da80d9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-neotree.el
@@ -0,0 +1,381 @@
+;;; doom-themes-ext-neotree.el --- ... -*- lexical-binding: t; no-byte-compile: t -*-
+;;
+;; Copyright (C) 2016-2024 Henrik Lissner
+;;
+;; Author: Henrik Lissner <contact@henrik.io>
+;; Maintainer: Henrik Lissner <contact@henrik.io>
+;; Created: September 10, 2016
+;;
+;; This file is not part of GNU Emacs.
+;;
+;;; Commentary:
+;;; Code:
+
+(defgroup doom-themes-neotree nil
+  "Options for doom's neotree theme"
+  :group 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defcustom doom-themes-neotree-project-size 1.4
+  "What :height to display the project icon at the top at."
+  :type 'float
+  :group 'doom-themes-neotree)
+
+(defcustom doom-themes-neotree-folder-size 1.05
+  "What :height to display the folder icons at."
+  :type 'float
+  :group 'doom-themes-neotree)
+
+(defcustom doom-themes-neotree-chevron-size 0.8
+  "What :height to display the chevron icons at."
+  :type 'float
+  :group 'doom-themes-neotree)
+
+(defcustom doom-themes-neotree-line-spacing 2
+  "Line-spacing for neotree buffer."
+  :type 'symbol
+  :group 'doom-themes-neotree)
+
+(defcustom doom-themes-neotree-file-icons 'simple
+  "The style to use for the file icons. Can be nil (disabled), non-nil (for a
+diverse iconset), or 'simple, which is closest's to Atom's style as it only
+distinguishes text, source, pdfs, images and binary files."
+  :type '(choice
+          (const :tag "A diverse array of file icons based on file type" t)
+          (const :tag "Minimalistic file icons (like Atom's)" 'simple)
+          (const :tag "Disable file icons" nil))
+  :group 'doom-themes-neotree)
+
+(defcustom doom-themes-neotree-enable-folder-icons t
+  "If non-nil, display folder icons next to each file. Different icons are used
+depending on whether the folder is a repo, symlink or regular folder."
+  :type 'boolean
+  :group 'doom-themes-neotree)
+
+(defcustom doom-themes-neotree-enable-open-chevron-icons t
+  "If non-nil, display the chevron-down icon next to each expanded folder."
+  :type 'boolean
+  :group 'doom-themes-neotree)
+
+(defcustom doom-themes-neotree-enable-closed-chevron-icons t
+  "If non-nil, display the chevron-right icon next to each collapsed folder."
+  :type 'boolean
+  :group 'doom-themes-neotree)
+
+(defcustom doom-themes-neotree-enable-variable-pitch nil
+  "If non-nil, labels will use the `doom-themes-neotree-dir-face' and
+`doom-themes-neotree-dir-face' faces, which inherit from the `variable-pitch' face."
+  :type 'boolean
+  :group 'doom-themes-neotree)
+
+(defcustom doom-themes-neotree-enable-type-colors t
+  "If non-nil, color each file/folder based on the categories determined by
+`doom-themes-neotree-file-face-re-alist'."
+  :type 'boolean
+  :group 'doom-themes-neotree)
+
+
+(defun doom-themes--neo-is-repo-dir-p (path)
+  (or (file-exists-p (format "%s/.git" path))
+      (nerd-icons-dir-is-submodule path)))
+
+(defvar doom-themes-neotree-dir-rules
+  (eval-when-compile
+    `(("/\\(?:node_modules\\|vendor\\)$"
+       :face doom-themes-neotree-hidden-file-face)
+      ("/\\.[^$/#]+$"
+       :face doom-themes-neotree-hidden-file-face)
+      (file-symlink-p
+       :icon (nerd-icons-octicon "nf-oct-file_symlink_directory"))
+      (doom-themes--neo-is-repo-dir-p
+       :icon (nerd-icons-octicon "nf-oct-file_submodule"))
+      (t :icon (nerd-icons-octicon "nf-oct-file_directory"))))
+  "TODO")
+
+(defvar doom-themes-neotree-file-rules
+  (eval-when-compile
+    `((file-symlink-p
+       :icon (nerd-icons-octicon "nf-oct-file_symlink_file"))
+      (file-executable-p
+       :face doom-themes-neotree-executable-file-face
+       :icon (nerd-icons-octicon "nf-oct-file_binary"))
+      ("\\.\\(?:md\\|org\\|rst\\|log\\)\\|/[A-Z_-]+\\(?:\\.[a-z]+\\)?$"
+       :face doom-themes-neotree-text-file-face
+       :icon (nerd-icons-octicon "nf-oct-file"))
+      (,(concat "\\." (regexp-opt '("htm" "html" "phtml" "tpl" "erb" "mustache"
+                                    "twig" "ejs" "erb" "jsx" "haml" "inky-haml"
+                                    "inky-slim" "slim" "pug" "jade"))
+                "$")
+       :icon (nerd-icons-octicon "nf-oct-file_code"))
+      (,(concat "\\(?:/\\(?:Gemfile\\|Vagrantfile\\|Makefile\\|Rakefile\\|Cask\\|\\.[^$]+rc\\|\\)\\|"
+                "\\." (regexp-opt '("json" "cson" "yaml" "yml" "xml" "toml"
+                                    "tpl" "ini" "erb" "mustache" "twig" "ejs"
+                                    "mk" "haml" "pug" "jade"))
+                "\\)$")
+       :icon (nerd-icons-octicon "nf-oct-file_code"))
+      (,(concat "\\."
+                (regexp-opt '("png" "jpg" "jpeg" "gif" "ico" "tif" "tiff"
+                              "svg" "bmp" "psd" "ai" "eps" "indd"         ; images
+                              "mov" "avi" "mp4" "webm" "mkv"              ; video
+                              "wav" "mp3" "ogg" "midi"))                  ; audio
+                "$")
+       :face doom-themes-neotree-data-file-face
+       :icon (nerd-icons-octicon "nf-oct-file_media"))
+      (,(concat "\\.\\(?:[gl]?zip\\|bzip2\\|deb\\|dmg\\|iso\\|7z\\|rpm\\|pkg\\|dat\\|[rjt]ar\\(?:\\.gz\\)?\\)$")
+       :face doom-themes-neotree-data-file-face
+       :icon (nerd-icons-octicon "nf-oct-file_zip"))
+      ("\\.\\(?:lock\\|resolved\\|dll\\|so\\|pyc\\|elc\\|class\\|css\\.map\\)$"
+       :face doom-themes-neotree-hidden-file-face
+       :icon (nerd-icons-octicon "nf-oct-file_binary"))
+      ("/\\.[^$/#]+$"
+       :face doom-themes-neotree-hidden-file-face)
+      (t :icon (nerd-icons-octicon "nf-oct-file"))))
+  "TODO")
+
+
+;;
+;;; Faces
+
+(defface doom-themes-neotree-dir-face  '((t (:inherit neo-dir-link-face)))
+  "Face for directory labels."
+  :group 'doom-themes-neotree)
+
+(defface doom-themes-neotree-file-face '((t (:inherit neo-file-link-face)))
+  "Face for file name labels."
+  :group 'doom-themes-neotree)
+
+;; file type faces
+(defface doom-themes-neotree-hidden-file-face '((t (:inherit font-lock-comment-face)))
+  "Face for labels of hidden files. See `doom-themes-neotree-file-face-re-alist'."
+  :group 'doom-themes-neotree)
+
+(defface doom-themes-neotree-text-file-face '((t (:inherit neo-file-link-face)))
+  "Face for labels of text/documentation files (readmes, org files, etc). See
+`doom-themes-neotree-file-face-re-alist'."
+  :group 'doom-themes-neotree)
+
+(defface doom-themes-neotree-media-file-face '((t (:inherit neo-file-link-face)))
+  "Face for labels of media files. See `doom-themes-neotree-file-face-re-alist'."
+  :group 'doom-themes-neotree)
+
+(defface doom-themes-neotree-data-file-face '((t (:inherit neo-file-link-face)))
+  "Face for labels of data files (json, yaml, xml, etc). See
+`doom-themes-neotree-file-face-re-alist'."
+  :group 'doom-themes-neotree)
+
+(defface doom-themes-neotree-executable-file-face '((t (:inherit neo-file-link-face)))
+  "TODO"
+  :group 'doom-themes-neotree)
+
+
+;;
+;;; Helpers
+
+(defun doom-themes--neotree-no-fringes ()
+  "Remove fringes in neotree.
+They are reset each time you select the neotree pane and highlighted
+incorrectly, so remove them."
+  (set-window-fringes neo-global--window 0 0))
+
+(defun doom-themes--neotree-setup (&rest _)
+  (setq line-spacing doom-themes-neotree-line-spacing
+        tab-width 1)
+  (when (featurep 'hl-line)
+    (set (make-local-variable 'hl-line-sticky-flag) t)
+    (hl-line-mode +1)))
+
+(defun doom-themes-neotree-spec (node rules)
+  (let (case-fold-search)
+    (cl-loop for spec in rules
+             for pred = (car spec)
+             for plist = (cdr spec)
+             when
+             (cond ((eq pred 't))
+                   ((symbolp pred) (funcall pred node))
+                   ((stringp pred) (string-match-p pred node)))
+             return plist)))
+
+(defun doom--neotree-insert-file-icon (node icon &optional faces)
+  (if node
+      (cond ((eq doom-themes-neotree-file-icons 'simple)
+             (propertize
+              (if icon
+                  (apply (car icon) (cdr icon))
+                (nerd-icons-octicon "nf-oct-file"))
+              'face `(:inherit ,faces
+                      :family ,(nerd-icons-octicon-family)
+                      :height 1.3)
+              'display '(raise 0)))
+            (t (nerd-icons-icon-for-file (neo-path--file-short-name node))))
+    (nerd-icons-fileicon "default")))
+
+(defun doom--neotree-insert-dir-icon (node type &optional faces)
+  (concat (if type
+              (nerd-icons-octicon
+               (format "nf-oct-chevron_%s" (if (eq type 'open) "down" "right"))
+               :v-adjust 0.1
+               :height doom-themes-neotree-chevron-size
+               :face `(:inherit ,faces
+                       :family ,(nerd-icons-octicon-family)
+                       :height ,doom-themes-neotree-chevron-size))
+            "\t")
+          "\t"
+          (when doom-themes-neotree-enable-folder-icons
+            (nerd-icons-octicon
+             (cond ((file-symlink-p node) "nf-oct-file_symlink_directory")
+                   ((file-exists-p (format "%s/.git" node)) "nf-oct-file_submodule")
+                   ((nerd-icons-dir-is-submodule node) "nf-oct-file_submodule")
+                   ("nf-oct-file_directory"))
+             :v-adjust 0
+             :height doom-themes-neotree-folder-size
+             :face `(:inherit ,faces
+                     :family ,(nerd-icons-octicon-family)
+                     :height ,doom-themes-neotree-folder-size)))))
+
+(defun doom--neotree-insert-icon (type node &optional icon faces)
+  "Custom hybrid unicode theme with leading whitespace."
+  (let ((spc "\t")
+        (vspc (propertize "  " 'face 'variable-pitch)))
+    (cond ((eq type 'open)
+           (insert
+            (concat spc
+                    (doom--neotree-insert-dir-icon
+                     node (if doom-themes-neotree-enable-open-chevron-icons type)
+                     faces)
+                    vspc)))
+          ((eq type 'close)
+           (insert
+            (concat spc
+                    (doom--neotree-insert-dir-icon
+                     node (if doom-themes-neotree-enable-closed-chevron-icons type)
+                     faces)
+                    vspc)))
+          ((eq type 'leaf)
+           (insert
+            (concat (when (or doom-themes-neotree-enable-open-chevron-icons
+                              doom-themes-neotree-enable-closed-chevron-icons)
+                      spc)
+                    (when doom-themes-neotree-enable-folder-icons spc)
+                    (when doom-themes-neotree-file-icons
+                      (concat spc (doom--neotree-insert-file-icon node icon faces)))
+                    vspc))))))
+
+
+;;
+;;; Public library
+
+(defun doom-themes-neotree-insert-root (node)
+  ;; insert icon
+  (when (display-graphic-p)
+    (insert
+     (concat (propertize "\t" 'face 'neo-root-dir-face)
+             (nerd-icons-octicon
+              "nf-oct-repo"
+              :height doom-themes-neotree-project-size
+              :face 'neo-root-dir-face
+              :v-adjust -0.1)
+             (propertize " " 'face 'neo-root-dir-face))))
+  ;; insert project name
+  (insert
+   (propertize
+    (concat (or (neo-path--file-short-name node) "-")
+            "\n")
+    'face `(:inherit ,(append (if doom-themes-neotree-enable-variable-pitch '(variable-pitch))
+                              '(neo-root-dir-face))))))
+
+(defun doom-themes-neotree-insert-dir (node depth expanded)
+  (let ((short-name (neo-path--file-short-name node))
+        (faces '(doom-themes-neotree-dir-face))
+        icon-text)
+    ;; insert indentation
+    (insert-char ?\s (* (- depth 1) 2))
+    ;; vcs integration
+    (let ((vc (if neo-vc-integration (neo-vc-for-node node))))
+      (when (memq 'char neo-vc-integration)
+        (insert-char (car vc))
+        (insert-char ?\s))
+      (unless (and (memq 'face neo-vc-integration)
+                   (not (eq (cdr vc) 'neo-vc-up-to-date-face))
+                   (setq faces (list (cdr vc))))
+        (cl-destructuring-bind (&key face icon)
+            (doom-themes-neotree-spec node doom-themes-neotree-dir-rules)
+          (if face (push face faces))
+          (if icon (setq icon-text icon)))))
+    ;; insert icon
+    (let ((type (if expanded 'open 'close)))
+      (if (display-graphic-p)
+          (doom--neotree-insert-icon type node icon-text faces)
+        (neo-buffer--insert-fold-symbol type node)))
+    ;; insert label button
+    (when doom-themes-neotree-enable-variable-pitch
+      (push 'variable-pitch faces))
+    (insert-button short-name
+                   'follow-link t
+                   'face `(:inherit (,@faces))
+                   'neo-full-path node
+                   'keymap neotree-dir-button-keymap)
+    ;; metadata + newline
+    (neo-buffer--node-list-set nil node)
+    (neo-buffer--newline-and-begin)))
+
+(defun doom-themes-neotree-insert-file (node depth)
+  (let ((short-name (neo-path--file-short-name node))
+        (vc (if neo-vc-integration (neo-vc-for-node node)))
+        (faces '(doom-themes-neotree-file-face))
+        icon-text)
+    ;; insert indentation
+    (insert-char ?\s (* (- depth 1) 2))
+    ;; vcs integration
+    (unless (and (memq 'face neo-vc-integration)
+                 (not (eq (cdr vc) 'neo-vc-up-to-date-face))
+                 (setq faces (list (cdr vc))))
+      (cl-destructuring-bind (&key face icon)
+          (doom-themes-neotree-spec node doom-themes-neotree-file-rules)
+        (if face (push face faces))
+        (if icon (setq icon-text icon))))
+    ;; insert icon
+    (if (display-graphic-p)
+        (doom--neotree-insert-icon 'leaf node icon-text faces)
+      (neo-buffer--insert-fold-symbol 'leaf node))
+    ;; insert label button
+    (when doom-themes-neotree-enable-variable-pitch
+      (push 'variable-pitch faces))
+    (insert-button short-name
+                   'follow-link t
+                   'face `(:inherit (,@faces))
+                   'neo-full-path node
+                   'keymap neotree-file-button-keymap)
+    ;; metadata + newline
+    (neo-buffer--node-list-set nil node)
+    (neo-buffer--newline-and-begin)))
+
+
+;;; Bootstrap
+
+(with-eval-after-load 'neotree
+  (unless (require 'nerd-icons nil t)
+    (error "nerd-icons isn't installed"))
+
+  ;; Incompatible with this theme
+  (setq neo-vc-integration nil)
+  ;; Enable buffer-local hl-line and adjust line-spacing
+  (add-hook 'neo-after-create-hook #'doom-themes--neotree-setup)
+  ;; Remove fringes in Neotree pane
+  (advice-add #'neo-global--select-window :after #'doom-themes--neotree-no-fringes)
+  ;; Patch neotree to use `doom--neotree-insert-icon'
+  (advice-add #'neo-buffer--insert-file-entry :override #'doom-themes-neotree-insert-file)
+  (advice-add #'neo-buffer--insert-dir-entry  :override #'doom-themes-neotree-insert-dir)
+  ;; Shorter pwd in neotree                    override
+  (advice-add #'neo-buffer--insert-root-entry :override #'doom-themes-neotree-insert-root))
+
+;;;###autoload
+(defun doom-themes-neotree-config ()
+  "Install doom-themes' neotree configuration.
+
+Includes an Atom-esque icon theme and highlighting based on filetype.")
+
+(provide 'doom-themes-ext-neotree)
+;;; doom-themes-neotree.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-org.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-org.el
new file mode 100644
index 0000000..423f78a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-org.el
@@ -0,0 +1,141 @@
+;;; doom-themes-ext-org.el --- fix fontification issues in org-mode -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2017-2024 Henrik Lissner
+;;
+;; Author: Henrik Lissner <contact@henrik.io>
+;; Maintainer: Henrik Lissner <contact@henrik.io>
+;; Created: August 3, 2017
+;;
+;; This file is not part of GNU Emacs.
+;;
+;;; Commentary:
+;;
+;; Fixes a few fontification issues in org-mode and adds special fontification
+;; for @-tags and #hashtags. Simply load this file to use it.
+;;
+;;   (with-eval-after-load 'org-mode
+;;     (require 'doom-themes-ext-org))
+;;
+;; Or call `doom-themes-org-config', which does nothing but load this
+;; package (because it's autoloaded).
+;;
+;;   (with-eval-after-load 'org-mode
+;;     (doom-themes-org-config))
+;;
+;;; Code:
+
+(defgroup doom-themes-org nil
+  "Options for doom's org customizations."
+  :group 'doom-themes)
+
+(define-obsolete-variable-alias
+  'doom-org-special-tags 'doom-themes-org-fontify-special-tags
+  "2021-02-10")
+(defcustom doom-themes-org-fontify-special-tags t
+  "If non-nil, fontify #hashtags and @attags.
+Uses `doom-themes-org-at-tag' and `doom-themes-org-hash-tag' faces."
+  :type 'boolean
+  :group 'doom-themes-org)
+
+(defcustom doom-themes-org-fontify-exclude-types
+  '(src-block
+    link
+    citation-reference)
+  "A list of org elements not to highlight special tags in.
+See `doom-themes-org-fontify-special-tags'."
+  :type '(repeat symbol)
+  :group 'doom-themes-org)
+
+(defface doom-themes-org-at-tag '((t :inherit org-formula))
+  "Face used to fontify @-tags in org-mode."
+  :group 'doom-themes-org)
+
+(defface doom-themes-org-hash-tag '((t :inherit org-tag))
+  "Face used to fontify #hashtags in org-mode."
+  :group 'doom-themes-org)
+
+
+(defvar org-done-keywords)
+(defvar org-font-lock-extra-keywords)
+(defvar org-heading-keyword-regexp-format)
+(defvar org-todo-regexp)
+(defvar org-fontify-done-headline)
+(defvar org-activate-links)
+(declare-function org-delete-all "ext:org-macs" (elts list))
+(declare-function org-element-type "ext:org-element" (element))
+(declare-function org-element-context "ext:org-element" (&optional element))
+
+;;
+(defun doom-themes--org-tag-face (n)
+  "Return the face to use for the currently matched tag.
+N is the match index."
+  (declare (pure t) (side-effect-free t))
+  (let ((context (save-match-data (org-element-context))))
+    (unless (memq (org-element-type context) doom-themes-org-fontify-exclude-types)
+      (pcase (match-string n)
+        ("#" 'doom-themes-org-hash-tag)
+        ("@" 'doom-themes-org-at-tag)))))
+
+(defun doom-themes-enable-org-fontification ()
+  "Correct (and improve) org-mode's font-lock keywords.
+
+  1. Re-set `org-todo' & `org-headline-done' faces, to make them respect
+     (inherit) underlying faces.
+  2. Make statistic cookies respect (inherit) underlying faces.
+  3. Fontify item bullets (make them stand out)
+  4. Fontify item checkboxes (and when they're marked done), like TODOs that are
+     marked done.
+  5. Fontify #hashtags and @at-tags, for personal convenience; see
+     `doom-themes-org-fontify-special-tags' to disable this."
+  (let ((org-todo (format org-heading-keyword-regexp-format
+                          org-todo-regexp))
+        (org-done (format org-heading-keyword-regexp-format
+                          (concat "\\(?:" (mapconcat #'regexp-quote org-done-keywords
+                                                     "\\|")
+                                  "\\)")))
+        (org-indent? (featurep 'org-indent)))
+    (setq
+     org-font-lock-extra-keywords
+     (append (org-delete-all
+              (append `(("\\[\\([0-9]*%\\)\\]\\|\\[\\([0-9]*\\)/\\([0-9]*\\)\\]"
+                         (0 (org-get-checkbox-statistics-face) t))
+                        (,org-todo (2 (org-get-todo-face 2) t)))
+                      (when org-fontify-done-headline
+                        `((,org-done (2 'org-headline-done t))))
+                      (when (memq 'date org-activate-links)
+                        '((org-activate-dates (0 'org-date t)))))
+              org-font-lock-extra-keywords)
+             ;; respsect underlying faces!
+             `((,org-todo (2 (org-get-todo-face 2) prepend)))
+             (when org-fontify-done-headline
+               `((,org-done (2 'org-headline-done prepend))))
+             (when (memq 'date org-activate-links)
+               '((org-activate-dates (0 'org-date prepend))))
+             ;; Make checkbox statistic cookies respect underlying faces
+             `(("\\[\\([0-9]*%\\)\\]\\|\\[\\([0-9]*\\)/\\([0-9]*\\)\\]"
+                (0 (org-get-checkbox-statistics-face) prepend))
+               ;; make plain list bullets stand out.
+               ;; give spaces before and after list bullet org-indent face to
+               ;; keep correct indentation on mixed-pitch-mode
+               ("^\\( *\\)\\([-+]\\(?:[ \t].*[ \t]::\\)?\\|\\(?:[0-9]+\\|[a-zA-Z]\\)[).]\\)\\([ \t]\\)"
+                ,@(if org-indent? '((1 'org-indent append)))
+                (2 'org-list-dt append)
+                ,@(if org-indent? '((3 'org-indent append)))))
+             ;; I like how org-mode fontifies checked TODOs and want this to
+             ;; extend to checked checkbox items:
+             (when org-fontify-done-headline
+               '(("^[ \t]*\\(?:[-+*]\\|[0-9]+[).]\\)[ \t]+\\(\\(?:\\[@\\(?:start:\\)?[0-9]+\\][ \t]*\\)?\\[\\(?:X\\|\\([0-9]+\\)/\\2\\)\\][^\n]*\n\\)"
+                  1 'org-headline-done prepend)))
+             ;; custom #hashtags & @at-tags for another level of organization
+             (when doom-themes-org-fontify-special-tags
+               '(("\\(?:\\s-\\|^\\)\\(\\([#@]\\)[A-Za-z0-9_.-]+\\)"
+                  1 (doom-themes--org-tag-face 2) prepend)))))))
+
+(add-hook 'org-font-lock-set-keywords-hook #'doom-themes-enable-org-fontification)
+
+;;;###autoload
+(defun doom-themes-org-config ()
+  "Load `doom-themes-ext-org'.")
+
+(provide 'doom-themes-ext-org)
+;;; doom-themes-ext-org.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-org.elc b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-org.elc
new file mode 100644
index 0000000..7ae8231
Binary files /dev/null and b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-org.elc differ
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-treemacs.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-treemacs.el
new file mode 100644
index 0000000..f12aae9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-treemacs.el
@@ -0,0 +1,309 @@
+;;; doom-themes-ext-treemacs.el --- ... -*- lexical-binding: t; no-byte-compile: t -*-
+;;
+;; Copyright (C) 2018-2024 Henrik Lissner
+;;
+;; Author: Henrik Lissner <contact@henrik.io>
+;; Maintainer: Henrik Lissner <contact@henrik.io>
+;; Created: July 10, 2018
+;;
+;; This file is not part of GNU Emacs.
+;;
+;;; Commentary:
+;;; Code:
+
+(defgroup doom-themes-treemacs nil
+  "Options for doom's treemacs theme."
+  :group 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defcustom doom-themes-treemacs-enable-variable-pitch t
+  "If non-nil, remap file, folder & project labels to `variable-pitch'.
+
+See `doom-themes-treemacs-variable-pitch-face'."
+  :type 'boolean
+  :group 'doom-themes-treemacs)
+
+(defcustom doom-themes-treemacs-line-spacing 1
+  "Line-spacing for treemacs buffer."
+  :type 'integer
+  :group 'doom-themes-treemacs)
+
+(defcustom doom-themes-treemacs-theme "doom-atom"
+  "Default treemacs theme."
+  :type '(radio (const :doc "A minimalistic atom-inspired icon theme" "doom-atom")
+                (const :doc "A colorful icon theme leveraging nerd-icons" "doom-colors"))
+  :group 'doom-themes-treemacs)
+
+(defcustom doom-themes-treemacs-bitmap-indicator-width 3
+  "Default treemacs bitmap indicators width."
+  :type 'integer
+  :group 'doom-themes-treemacs)
+
+(defcustom doom-themes-treemacs-variable-pitch-face 'variable-pitch
+  "The face to remap file/directory labels to.
+
+Only takes effect if `doom-themes-treemacs-enable-variable-pitch' is non-nil."
+  :type 'face
+  :group 'doom-themes-treemacs)
+
+
+;;
+;;; Faces
+(defface doom-themes-treemacs-root-face
+  '((t (:inherit font-lock-string-face)))
+  "Face used for the root icon in doom themes' treemacs theme."
+  :group 'doom-themes-treemacs)
+
+(defface doom-themes-treemacs-file-face
+  '((t (:inherit font-lock-doc-face :slant normal)))
+  "Face used for the directory and file icons in doom themes' treemacs theme."
+  :group 'doom-themes-treemacs)
+
+;;
+;;; Library
+
+(defun doom-themes-hide-fringes-maybe (&rest _)
+  "Remove fringes in current window if `treemacs-fringe-indicator-mode' is nil"
+  (when (display-graphic-p)
+    (if treemacs-fringe-indicator-mode
+        (set-window-fringes nil doom-themes-treemacs-bitmap-indicator-width 0)
+      (set-window-fringes nil 0 0))))
+
+(defun doom-themes-setup-tab-width (&rest _)
+  "Set `tab-width' to 1, so tab characters don't ruin formatting."
+  (setq tab-width 1))
+
+(defun doom-themes-define-treemacs-fringe-indicator-bitmap ()
+  "Defines `treemacs--fringe-indicator-bitmap'"
+  (if (fboundp 'define-fringe-bitmap)
+      (define-fringe-bitmap 'treemacs--fringe-indicator-bitmap
+        (make-vector 26 #b111) nil doom-themes-treemacs-bitmap-indicator-width)))
+
+(defun doom-themes-setup-line-spacing ()
+  "Set `line-spacing' in treemacs buffers."
+  (setq line-spacing doom-themes-treemacs-line-spacing))
+
+(defun doom-themes-enable-treemacs-variable-pitch-labels (&rest _)
+  (when doom-themes-treemacs-enable-variable-pitch
+    (dolist (face '(treemacs-root-face
+                    treemacs-git-unmodified-face
+                    treemacs-git-modified-face
+                    treemacs-git-renamed-face
+                    treemacs-git-ignored-face
+                    treemacs-git-untracked-face
+                    treemacs-git-added-face
+                    treemacs-git-conflict-face
+                    treemacs-directory-face
+                    treemacs-directory-collapsed-face
+                    treemacs-file-face
+                    treemacs-tags-face))
+      (let ((faces (face-attribute face :inherit nil)))
+        (set-face-attribute
+         face nil :inherit
+         `(,doom-themes-treemacs-variable-pitch-face
+           ,@(delq doom-themes-treemacs-variable-pitch-face
+                   (delq 'unspecified
+                         (if (listp faces) faces (list faces))))))))))
+
+(defun doom-themes-fix-treemacs-icons-dired-mode ()
+  "Set `tab-width' to 1 in dired-mode if `treemacs-icons-dired-mode' is active."
+  (funcall (if treemacs-icons-dired-mode #'add-hook #'remove-hook)
+           'dired-mode-hook
+           #'doom-themes-setup-tab-width))
+
+;;
+;;; Bootstrap
+
+(with-eval-after-load 'treemacs
+  (unless (require 'nerd-icons nil t)
+    (error "nerd-icons isn't installed"))
+
+  (add-hook 'treemacs-mode-hook #'doom-themes-setup-tab-width)
+  (add-hook 'treemacs-mode-hook #'doom-themes-setup-line-spacing)
+  (add-hook 'treemacs-mode-hook #'doom-themes-define-treemacs-fringe-indicator-bitmap)
+
+  ;; Fix #293: tabs messing up formatting in `treemacs-icons-dired-mode'
+  (add-hook 'treemacs-icons-dired-mode-hook #'doom-themes-fix-treemacs-icons-dired-mode)
+
+  ;; Disable fringes (and reset them everytime treemacs is selected because it
+  ;; may change due to outside factors)
+  (add-hook 'treemacs-mode-hook #'doom-themes-hide-fringes-maybe)
+  (advice-add #'treemacs-select-window :after #'doom-themes-hide-fringes-maybe)
+
+  ;; variable-pitch labels for files/folders
+  (doom-themes-enable-treemacs-variable-pitch-labels)
+  (advice-add #'load-theme :after #'doom-themes-enable-treemacs-variable-pitch-labels)
+
+  ;; minimalistic atom-inspired icon theme
+  (let ((face-spec 'doom-themes-treemacs-file-face))
+    (treemacs-create-theme "doom-atom"
+      :config
+      (progn
+        (treemacs-create-icon
+         :icon (format " %s\t" (nerd-icons-octicon "nf-oct-repo" :height 1.2 :v-adjust -0.1 :face 'doom-themes-treemacs-root-face))
+         :extensions (root-open))
+        (treemacs-create-icon
+         :icon (format " %s\t" (nerd-icons-octicon "nf-oct-repo" :height 1.2 :v-adjust -0.1 :face 'doom-themes-treemacs-root-face))
+         :extensions (root-closed))
+        (treemacs-create-icon
+         :icon (format "%s\t%s\t"
+                       (nerd-icons-octicon "nf-oct-chevron_down" :height 0.75 :v-adjust 0.1 :face face-spec)
+                       (nerd-icons-octicon "nf-oct-file_directory" :v-adjust 0 :face face-spec))
+         :extensions (dir-open))
+        (treemacs-create-icon
+         :icon (format "%s\t%s\t"
+                       (nerd-icons-octicon "nf-oct-chevron_right" :height 0.75 :v-adjust 0.1 :face face-spec)
+                       (nerd-icons-octicon "nf-oct-file_directory" :v-adjust 0 :face face-spec))
+         :extensions (dir-closed))
+        (treemacs-create-icon
+         :icon (format "%s\t%s\t"
+                       (nerd-icons-octicon "nf-oct-chevron_down" :height 0.75 :v-adjust 0.1 :face face-spec)
+                       (nerd-icons-octicon "nf-oct-package" :v-adjust 0 :face face-spec)) :extensions (tag-open))
+        (treemacs-create-icon
+         :icon (format "%s\t%s\t"
+                       (nerd-icons-octicon "nf-oct-chevron_right" :height 0.75 :v-adjust 0.1 :face face-spec)
+                       (nerd-icons-octicon "nf-oct-package" :v-adjust 0 :face face-spec))
+         :extensions (tag-closed))
+        (treemacs-create-icon
+         :icon (format "%s\t" (nerd-icons-octicon "nf-oct-tag" :height 0.9 :v-adjust 0 :face face-spec))
+         :extensions (tag-leaf))
+        (treemacs-create-icon
+         :icon (format "%s\t" (nerd-icons-octicon "nf-oct-flame" :v-adjust 0 :face face-spec))
+         :extensions (error))
+        (treemacs-create-icon
+         :icon (format "%s\t" (nerd-icons-octicon "nf-oct-stop" :v-adjust 0 :face face-spec))
+         :extensions (warning))
+        (treemacs-create-icon
+         :icon (format "%s\t" (nerd-icons-octicon "nf-oct-info" :height 0.75 :v-adjust 0.1 :face face-spec))
+         :extensions (info))
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-octicon "nf-oct-file_media" :v-adjust 0 :face face-spec))
+         :extensions ("ai" "aiff" "avi" "bmp" "eps" "flac" "gif" "ico" "indd"
+                      "jpeg" "jpg" "midi" "mkv" "mov" "mp3" "mp4" "ogg" "png"
+                      "psd" "svg" "tif" "tiff" "wav" "webm" "webp"))
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-octicon "nf-oct-file_code" :v-adjust 0 :face face-spec))
+         :extensions ("accdb" "accdt" "actionscript" "adoc" "adoc" "ansible"
+                      "antlr" "applescript" "asciidoc" "asm" "c" "cask" "cc"
+                      "cc" "clj" "cljc" "cljs" "cmake" "coffee" "cpp" "css"
+                      "cxx" "cython" "d" "dart" "diet" "diff" "dml"
+                      "docker-compose.yml" "dockerfile" "dscript" "edn" "eex"
+                      "el" "elm" "ex" "exs" "fennel" "fish" "fortran"
+                      "fortran-modern" "fortranfreeform" "fsharp" "gdscript"
+                      "go" "gradle" "graphql" "h" "hh" "hpp" "hs" "htm" "html"
+                      "hy" "iced" "inc" "ino" "j2" "j2" "java" "jinja" "jinja2"
+                      "jl" "js" "jsx" "kt" "kts" "ledger" "less" "lhs" "lisp"
+                      "lua" "makefile" "matlab" "merlin" "mips" "ml" "mli"
+                      "moonscript" "nim" "nims" "nix" "objectpascal" "ocaml"
+                      "pascal" "patch" "pde" "perl" "pgsql" "php" "php4" "php5"
+                      "phps" "pl" "plt" "pm" "pm6" "pony" "pp" "pp" "pro"
+                      "prolog" "ps1" "purs" "py" "pyc" "r" "racket" "rb" "rd"
+                      "rdx" "re" "rei" "rkt" "rktd" "rktl" "rs" "rsx" "sass"
+                      "sbt" "scala" "scm" "scpt" "scrbl" "scribble" "scss" "sh"
+                      "sql" "styles" "sv" "tex" "tpp" "ts" "tsx" "v"
+                      "vagrantfile" "vh" "vhd" "vhdl" "vhms" "vim" "vue" "xsl"
+                      "zsh" "zshrc"))
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-octicon "nf-oct-book" :v-adjust 0 :face face-spec))
+         :extensions ("azw" "azw3" "cb7" "cba" "cbr" "cbt" "cbz" "ceb" "chm"
+                      "djvu" "doc" "docx" "exe" "fb2" "inf" "kf8" "kfx" "lit"
+                      "lrf" "lrx" "mobi" "opf" "or" "oxps" "pdb" "pdb" "pdb"
+                      "pdg" "pkg" "prc" "ps" "rtf" "tr2" "tr3" "txt" "xeb" "xps"
+                      "pot" "potx" "potm" "pps" "ppsx" "ppsm" "ppt" "pptx"
+                      "pptm" "pa" "ppa" "ppam" "sldm" "sldx" ))
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-faicon "nf-fa-cogs" :height 0.85 :v-adjust 0 :face face-spec))
+         :extensions ("Vagrantfile" "babel.config.js" "babelignore" "babelrc"
+                      "babelrc.js" "babelrc.json" "bashrc" "bazel" "bazelrc"
+                      "bower.json" "bowerrc" "cabal" "cfg" "conf" "config"
+                      "cson" "csv" "editorconfig" "envrc" "eslintignore"
+                      "eslintrc" "feature" "gemfile" "git" "gitattributes"
+                      "gitconfig" "gitignore" "gitmodules" "ideavimrc" "iml"
+                      "ini" "inputrc" "json" "ledgerrc" "lock" "nginx"
+                      "npm-shrinkwrap.json" "npmignore" "npmrc"
+                      "package-lock.json" "package.json" "phpunit" "pkg" "plist"
+                      "pom.xml" "properties" "terminalrc" "toml" "tridactylrc"
+                      "vimperatorrc" "vimrc" "vrapperrc" "xdefaults" "xml"
+                      "xresources" "yaml" "yarn-integrity" "yarnclean"
+                      "yarnignore" "yarnrc" "yml"))
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-octicon "nf-oct-file" :v-adjust 0 :face face-spec))
+         :extensions ("md" "markdown" "rst" "org" "log" "txt" "contribute"
+                      "license" "readme" "changelog"))
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-octicon "nf-oct-file_binary" :v-adjust 0 :face face-spec))
+         :extensions ("exe" "dll" "obj" "so" "o" "out" "elc" "cmake-cache" "csr"
+                      "eslintcache" "crt" "cer" "der" "pfx" "p12" "p7b" "p7r"
+                      "DS_STORE" "key" "pem" "src" "crl" "sst" "stl" "ipynb"))
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-faicon "nf-fa-file_pdf" :v-adjust 0 :face face-spec))
+         :extensions ("pdf"))
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-octicon "nf-oct-file_zip" :v-adjust 0 :face face-spec))
+         :extensions ("zip" "xz" "7z" "tar" "gz" "rar" "tgz" "jar"))
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-octicon "nf-oct-file" :v-adjust 0 :face face-spec))
+         :extensions (fallback))))
+
+    (treemacs-create-theme "doom-colors"
+      :extends "doom-atom"
+      :config
+      (progn
+        (treemacs-create-icon
+         :icon (format " %s\t" (nerd-icons-octicon "nf-oct-repo" :height 1.2 :v-adjust -0.1 :face 'doom-themes-treemacs-root-face))
+         :extensions (root-open))
+        (treemacs-create-icon
+         :icon (format " %s\t" (nerd-icons-octicon "nf-oct-repo" :height 1.2 :v-adjust -0.1 :face 'doom-themes-treemacs-root-face))
+         :extensions (root-closed))
+        (treemacs-create-icon
+         :icon (format "%s\t" (nerd-icons-octicon "nf-oct-flame" :height 0.8 :v-adjust 0 :face 'nerd-icons-red))
+         :extensions (error))
+        (treemacs-create-icon
+         :icon (format "%s\t" (nerd-icons-octicon "nf-oct-stop" :height 0.8 :v-adjust 0 :face 'nerd-icons-yellow))
+         :extensions (warning))
+        (treemacs-create-icon
+         :icon (format "%s\t" (nerd-icons-octicon "nf-oct-info" :height 0.75 :v-adjust 0.1 :face 'nerd-icons-green))
+         :extensions (info))
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-faicon "nf-fa-git_alt" :height 0.85 :v-adjust 0.0 :face 'nerd-icons-red))
+         :extensions ("gitignore" "git" "gitattributes" "gitconfig" "gitmodules"))
+        (treemacs-create-icon
+         :icon (format "%s\t" (nerd-icons-octicon "nf-oct-book" :height 1.0 :v-adjust 0.0 :face 'nerd-icons-blue))
+         :extensions (license))
+
+        (dolist (item nerd-icons-extension-icon-alist)
+          (let* ((extension (car item))
+                 (func (cadr item))
+                 (args (append (list (cadr (cdr item))) '(:v-adjust -0.05 :height 0.85) (cdr (cddr item))))
+                 (icon (apply func args)))
+            (let* ((icon-pair (cons (format "  %s\t" icon) " "))
+                   (gui-icons (treemacs-theme->gui-icons treemacs--current-theme))
+                   (tui-icons (treemacs-theme->tui-icons treemacs--current-theme))
+                   (gui-icon  (car icon-pair))
+                   (tui-icon  (cdr icon-pair)))
+              (ht-set! gui-icons extension gui-icon)
+              (ht-set! tui-icons extension tui-icon))))
+
+        ;; File extensions for whom the above did not work (likely because their
+        ;; regexp is too complicated to be reversed with
+        ;; `doom-themes--get-treemacs-extensions' -- which is too naive)
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-faicon "nf-fa-r_project" :v-adjust 0 :face 'nerd-icons-dblue))
+         :extensions ("r"))
+        (treemacs-create-icon
+         :icon (format "  %s\t" (nerd-icons-octicon "nf-oct-file_code" :v-adjust 0 :face face-spec))
+         :extensions ("elc")))))
+
+  (treemacs-load-theme doom-themes-treemacs-theme))
+
+;;;###autoload
+(defun doom-themes-treemacs-config ()
+  "Install doom-themes' treemacs configuration.
+
+Includes an Atom-esque icon theme and highlighting based on filetype.")
+
+(provide 'doom-themes-ext-treemacs)
+;;; doom-themes-treemacs.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-visual-bell.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-visual-bell.el
new file mode 100644
index 0000000..4e78cfa
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-visual-bell.el
@@ -0,0 +1,47 @@
+;;; doom-themes-ext-visual-bell.el --- flash mode-line on error -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2019-2024 Henrik Lissner
+;;
+;; Author: Henrik Lissner <contact@henrik.io>
+;; Maintainer: Henrik Lissner <contact@henrik.io>
+;; Created: July 29, 2019
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'face-remap)
+
+(defface doom-themes-visual-bell '((t :inherit error))
+  "Face to use for the mode-line when `doom-themes-visual-bell-config' is used."
+  :group 'doom-themes)
+
+;;;###autoload
+(defun doom-themes-visual-bell-fn ()
+  "Blink the mode-line red briefly. Set `ring-bell-function' to this to use it."
+  ;; Since emacs 29, the mode-line face is the parent of the new face
+  ;; mode-line-active and mode-line-inactive. For remapping purposes, the
+  ;; mode-line-active face has to be used, see details at:
+  ;; http://debbugs.gnu.org/cgi/bugreport.cgi?bug=53636
+  (let* ((buf (current-buffer))
+         (faces (if (facep 'mode-line-active)
+                   '(mode-line-active solaire-mode-line-active-face)
+                 '(mode-line solaire-mode-line-face)))
+         (cookies (mapcar (lambda (face)
+                            (when (facep face)
+                              (face-remap-add-relative face 'doom-themes-visual-bell)))
+                          faces)))
+    (force-mode-line-update)
+    (run-with-timer 0.15 nil
+                    (lambda ()
+                      (with-current-buffer buf
+                        (mapc #'face-remap-remove-relative cookies)
+                        (force-mode-line-update))))))
+
+;;;###autoload
+(defun doom-themes-visual-bell-config ()
+  "Enable flashing the mode-line on error."
+  (setq ring-bell-function #'doom-themes-visual-bell-fn
+        visible-bell t))
+
+(provide 'doom-themes-ext-visual-bell)
+;;; doom-themes-ext-visual-bell.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-visual-bell.elc b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-visual-bell.elc
new file mode 100644
index 0000000..bfd0e2d
Binary files /dev/null and b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-ext-visual-bell.elc differ
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-pkg.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-pkg.el
new file mode 100644
index 0000000..239bfe9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes-pkg.el
@@ -0,0 +1,11 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "doom-themes" "20260821.1111"
+  "An opinionated pack of modern color-themes."
+  '((emacs  "25.1")
+    (cl-lib "0.5"))
+  :url "https://github.com/doomemacs/themes"
+  :commit "d114523c4c436d899170afe9ea9b99cd214c344f"
+  :revdesc "d114523c4c43"
+  :keywords '("themes" "faces")
+  :authors '(("Henrik Lissner" . "contact@henrik.io"))
+  :maintainers '(("Henrik Lissner" . "contact@henrik.io")))
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes.el
new file mode 100644
index 0000000..e975706
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes.el
@@ -0,0 +1,466 @@
+;;; doom-themes.el --- an opinionated pack of modern color-themes -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2016-2024 Henrik Lissner
+;;
+;; Author: Henrik Lissner <contact@henrik.io>
+;; Maintainer: Henrik Lissner <contact@henrik.io>
+;; Maintainer: Emmanuel Bustos Torres <ema2159@gmail.com>
+;; Created: May 22, 2016
+;; Package-Version: 20260821.1111
+;; Package-Revision: d114523c4c43
+;; Keywords: themes faces
+;; Homepage: https://github.com/doomemacs/themes
+;; Package-Requires: ((emacs "25.1") (cl-lib "0.5"))
+;;
+;; This file is not part of GNU Emacs.
+;;
+;;; Commentary:
+;;
+;; doomemacs/themes is an megapack of popular themes, including aesthetic
+;; extensions for popular packages.
+;;
+;; Themes in this pack:
+;;  - doom-1337 -- ported from VSCode's 1337 theme (ported by @ccmywish)
+;;  - doom-acario-dark -- an original dark theme (ported by @gagbo)
+;;  - doom-acario-light -- an original light theme (ported by @gagbo)
+;;  - doom-ayu-dark -- inspired by Ayu Dark (ported by @ashton)
+;;  - doom-ayu-light -- inspirted by Ayu Light (ported by @LoveSponge)
+;;  - doom-ayu-mirage -- inspired by Ayu Mirage (ported by @LoveSponge)
+;;  - doom-badger -- inspired by cann's Badger colorscheme (ported by @jsoa)
+;;  - doom-challenger-deep -- inspired by Vim's Challenger Deep theme (ported by @fuxialexander)
+;;  - doom-city-lights -- inspired by Atom's City Lights theme (ported by @fuxialexander)
+;;  - doom-dark+ -- ported from equinusocio's VSCode Theme, dark+ (ported by @ema2159)
+;;  - doom-dracula -- inspired by the popular Dracula theme (ported by @fuxialexander)
+;;  - doom-earl-grey -- a gentle color scheme, for code (ported by @JuneKelly)
+;;  - doom-ephemeral -- inspired by the Ephemeral Theme from elenapan's dotfiles (ported by @karetsu)
+;;  - doom-fairy-floss -- a candy colored theme by sailorhg (ported by @ema2159)
+;;  - doom-feather-dark -- a purple-tinted theme, inspired by doom-one (by @Plunne)
+;;  - doom-feather-light -- a light variable of feather-dark, inspired by doom-one (by @Plunne)
+;;  - doom-flatwhite -- inspired by Atom's Flatwhite Syntax theme (ported by @JuneKelly)
+;;  - doom-gruvbox -- inspired by morhetz's Gruvbox (ported by @JongW)
+;;  - doom-gruvbox-light -- inspired by morhetz's Gruvbox (light) (ported by @jsoa)
+;;  - doom-henna -- based on VSCode's Henna theme (ported by @jsoa)
+;;  - doom-homage-black -- a minimalistic, colorless theme inspired by eziam, tao, and jbeans (ported by @mskorzhinskiy)
+;;  - doom-homage-white -- minimal white theme inspired by editors from 2000s (ported by @mskorzhinskiy)
+;;  - doom-horizon -- ported from VSCode Horizon (ported by @karetsu)
+;;  - doom-Iosvkem -- ported from the default dark theme for Adobe Brackets (ported by @neutaaaaan)
+;;  - doom-ir-black -- ported from Vim's ir_black colorscheme (ported by @legendre6891)
+;;  - doom-lantern -- based on Gitleptune's Lantern theme (ported by @paladhammika)
+;;  - doom-laserwave -- a clean synthwave/outrun theme inspired by VSCode's Laserwave (ported by @hyakt)
+;;  - doom-manegarm -- an original autumn-inspired dark theme (ported by @kenranunderscore)
+;;  - doom-material -- adapted from equinusocio's Material themes (ported by @tam5)
+;;  - doom-material-dark -- inspired by Material Theme by xrei (ported by @trev-dev)
+;;  - doom-meltbus -- a dark (mostly) monochromatic theme (ported by @spacefrogg)
+;;  - doom-miramare -- a port of Franbach's Miramare theme; a variant of Grubox (ported by @sagittaros)
+;;  - doom-molokai -- inspired by Tomas Restrepo's Molokai (ported by @hlissner)
+;;  - doom-monokai-classic -- port of Monokai Classic (ported by @ema2159)
+;;  - doom-monokai-machine -- port of Monokai Classic (ported by @minikN)
+;;  - doom-monokai-octagon -- port of Monokai Octagon (ported by @minikN)
+;;  - doom-monokai-pro -- Port of Monokai Pro (ported by @minikN)
+;;  - doom-monokai-ristretto -- Port of Monokai Ristretto (ported by @minikN)
+;;  - doom-monokai-spectrum -- port of Monokai Spectrum (ported by @minikN)
+;;  - doom-moonlight -- inspired by VS code's Moonlight (ported by @Brettm12345)
+;;  - doom-nord -- dark variant of Nord (ported by @fuxialexander)
+;;  - doom-nord-aurora -- a light variant of Nord (ported by @MoskitoHero)
+;;  - doom-nord-light -- light variant of Nord (ported by @fuxialexander)
+;;  - doom-nova -- inspired by Trevord Miller's Nova (ported by @bigardone)
+;;  - doom-oceanic-next -- inspired by Oceanic Next (ported by @juanwolf)
+;;  - doom-oksolar-dark -- an OKLab variant of Solarized dark (ported by @logc)
+;;  - doom-oksolar-light -- an OKLab variant of Solarized light (ported by @logc)
+;;  - doom-old-hope -- inspired by An Old Hope, in a galaxy far far away (ported by @teesloane)
+;;  - doom-one -- inspired by Atom One Dark (ported by @hlissner)
+;;  - doom-one-light -- inspired by Atom One Light (ported by @ztlevi)
+;;  - doom-opera -- an original light theme (ported by @jwintz)
+;;  - doom-opera-light -- an original light theme (ported by @jwintz)
+;;  - doom-outrun-electric -- a high contrast, neon theme inspired by Outrun Electric on VSCode (ported by @ema2159)
+;;  - doom-palenight -- adapted from equinusocio's Material themes (ported by @Brettm12345)
+;;  - doom-peacock -- inspired by daylerees' Peacock (ported by @teesloane)
+;;  - doom-pine -- a green flavor of doom-gruvbox (by @RomanHargrave)
+;;  - doom-plain -- inspired by gko's plain theme for VSCode (ported by @das-s)
+;;  - doom-plain-dark -- inspired by gko's plain theme for VSCode (ported by @das-s)
+;;  - doom-rouge -- ported from VSCode's Rouge Theme (ported by @das-s)
+;;  - doom-shades-of-purple -- a port of VSCode's Shades of Purple (ported by @jwbaldwin)
+;;  - doom-snazzy -- inspired by Hyper Snazzy (ported by @ar1a)
+;;  - doom-solarized-dark -- a dark variant of Solarized (ported by @ema2159)
+;;  - doom-solarized-dark-high-contrast -- a high-contrast variant of Solarized Dark (ported by @jmorag)
+;;  - doom-solarized-light -- a light variant of Solarized (ported by @fuxialexander)
+;;  - doom-sourcerer -- a port of xero's Sourcerer (ported by @fm0xb)
+;;  - doom-spacegrey -- I'm sure you've heard of it (ported by @teesloane)
+;;  - doom-tokyo-night -- inspired by VSCode's Tokyo Night theme (ported by @FosterHangdaan)
+;;  - doom-tomorrow-day -- a light variant of Tomorrow (ported by @emacswatcher)
+;;  - doom-tomorrow-night -- One of the dark variants of Tomorrow (ported by @hlissner)
+;;  - doom-vibrant -- a more vibrant variant of doom-one (ported by @hlissner)
+;;  - doom-wilmersdorf -- port of Ian Pan's Wilmersdorf (ported by @ema2159)
+;;  - doom-xcode -- based off of Apple's Xcode Dark Theme (ported by @kadenbarlow)
+;;  - doom-zenburn -- port of the popular Zenburn theme (ported by @jsoa)
+;;
+;; ## Install
+;;
+;;   `M-x package-install RET doom-themes`
+;;
+;; A comprehensive configuration example:
+;;
+;;   (require 'doom-themes)
+;;
+;;   ;; Global settings (defaults)
+;;   (setq doom-themes-enable-bold t    ; if nil, bold is universally disabled
+;;         doom-themes-enable-italic t) ; if nil, italics is universally disabled
+;;
+;;   ;; Load the theme (doom-one, doom-molokai, etc); keep in mind that each
+;;   ;; theme may have their own settings.
+;;   (load-theme 'doom-one t)
+;;
+;;   ;; Enable flashing mode-line on errors
+;;   (doom-themes-visual-bell-config)
+;;
+;;   ;; Enable custom neotree theme
+;;   (doom-themes-neotree-config)  ; all-the-icons fonts must be installed!
+;;
+;;; Code:
+
+(require 'cl-lib)
+(require 'doom-themes-base)
+
+(defgroup doom-themes nil
+  "Options for doom-themes."
+  :group 'faces)
+
+(defcustom doom-themes-padded-modeline nil
+  "Default value for padded-modeline setting for themes that support it."
+  :group 'doom-themes
+  :type '(choice integer boolean))
+
+;;
+(defcustom doom-themes-enable-bold t
+  "If nil, bold will be disabled across all faces."
+  :group 'doom-themes
+  :type 'boolean)
+
+(defcustom doom-themes-enable-italic t
+  "If nil, italics will be disabled across all faces."
+  :group 'doom-themes
+  :type 'boolean)
+
+
+;;
+;;; API
+
+(defvar doom-themes--colors nil)
+(defvar doom--min-colors '(257 256 16))
+(defvar doom--quoted-p nil)
+(defvar doom-themes--faces nil)
+
+(defun doom-themes--colors-p (item)
+  (declare (pure t) (side-effect-free t))
+  (when item
+    (cond ((listp item)
+           (let ((car (car item)))
+             (cond ((memq car '(quote doom-color)) nil)
+
+                   ((memq car '(backquote \`))
+                    (let ((doom--quoted-p t))
+                      (doom-themes--colors-p (cdr item))))
+
+                   ((eq car '\,)
+                    (let (doom--quoted-p)
+                      (doom-themes--colors-p (cdr item))))
+
+                   ((or (doom-themes--colors-p car)
+                        (doom-themes--colors-p (cdr-safe item)))))))
+
+          ((and (symbolp item)
+                (not (keywordp item))
+                (not doom--quoted-p)
+                (not (equal (substring (symbol-name item) 0 1) "-"))
+                (assq item doom-themes--colors))))))
+
+(defun doom-themes--apply-faces (new-faces &optional default-faces)
+  (declare (pure t) (side-effect-free t))
+  (let ((default-faces (or default-faces doom-themes-base-faces))
+        (faces (make-hash-table :test #'eq :size (+ (length default-faces) (length new-faces))))
+        (directives (make-hash-table :test #'eq)))
+    (dolist (spec (append (mapcar #'copy-sequence default-faces) new-faces))
+      (if (listp (car spec))
+          (cl-destructuring-bind (face action &optional arg) (car spec)
+            (unless (assq face new-faces)
+              (puthash face (list action arg (cdr spec))
+                       directives)))
+        (puthash (car spec) (cdr spec) faces)))
+    (cl-loop for face being the hash-keys of directives
+             for (action target spec) = (gethash face directives)
+             unless (memq action '(&inherit &extend &override))
+             do (error "Invalid operation (%s) for '%s' face" action face)
+             if (eq (car spec) 'quote)
+             do (error "Can't extend literal face spec (for '%s')" face)
+             ;; TODO Add &all/&light/&dark extension support
+             else if (memq (car spec) '(&all &light &dark))
+             do (error "Can't extend face with &all, &light or &dark specs (for '%s')" face)
+             else do
+             (puthash face
+                      (let ((old-spec (gethash (or target face) faces))
+                            (plist spec))
+                        ;; remove duplicates
+                        (while (keywordp (car plist))
+                          (setq old-spec (plist-put old-spec (car plist) (cadr plist))
+                                plist (cddr plist)))
+                        old-spec)
+                      faces))
+    (let (results)
+      (maphash (lambda (face plist)
+                 (when (keywordp (car plist))
+                   ;; TODO Clean up duplicates in &all/&light/&dark blocks
+                   (dolist (prop (append (unless doom-themes-enable-bold   '(:weight normal :bold unspecified))
+                                         (unless doom-themes-enable-italic '(:slant normal :italic unspecified))))
+                     (when (and (plist-member plist prop)
+                                (not (eq (plist-get plist prop) 'inherit)))
+                       (plist-put plist prop
+                                  (if (memq prop '(:weight :slant))
+                                      (quote 'normal))))))
+                 (push (cons face plist) results))
+               faces)
+      (nreverse results))))
+
+(defun doom-themes--colorize (item type)
+  (declare (pure t) (side-effect-free t))
+  (when item
+    (let ((doom--quoted-p doom--quoted-p))
+      (cond ((listp item)
+             (cond ((memq (car item) '(quote doom-color))
+                    item)
+                   ((eq (car item) 'doom-ref)
+                    (doom-themes--colorize
+                     (apply #'doom-ref (cdr item)) type))
+                   ((let* ((item (append item nil))
+                           (car (car item))
+                           (doom--quoted-p
+                            (cond ((memq car '(backquote \`)) t)
+                                  ((eq car '\,) nil)
+                                  (t doom--quoted-p))))
+                      (cons car
+                            (cl-loop
+                             for i in (cdr item)
+                             collect (doom-themes--colorize i type)))))))
+
+            ((and (symbolp item)
+                  (not (keywordp item))
+                  (not doom--quoted-p)
+                  (not (equal (substring (symbol-name item) 0 1) "-"))
+                  (assq item doom-themes--colors))
+             `(doom-color ',item ',type))
+
+            (item)))))
+
+(defun doom-themes--build-face (face)
+  (declare (pure t) (side-effect-free t))
+  `(list
+    ',(car face)
+    ,(let ((face-body (cdr face)))
+       (cond ((keywordp (car face-body))
+              (let ((real-attrs face-body)
+                    defs)
+                (if (doom-themes--colors-p real-attrs)
+                    (dolist (cl doom--min-colors `(list ,@(nreverse defs)))
+                      (push `(list '((class color) (min-colors ,cl))
+                                   (list ,@(doom-themes--colorize real-attrs cl)))
+                            defs))
+                  `(list (list 't (list ,@real-attrs))))))
+
+             ((memq (car-safe (car face-body)) '(quote backquote \`))
+              (car face-body))
+
+             ((let (all-attrs defs)
+                (dolist (attrs face-body `(list ,@(nreverse defs)))
+                  (cond ((eq (car attrs) '&all)
+                         (setq all-attrs (append all-attrs (cdr attrs))))
+
+                        ((memq (car attrs) '(&dark &light))
+                         (let ((bg (if (eq (car attrs) '&dark) 'dark 'light))
+                               (real-attrs (append all-attrs (cdr attrs) '())))
+                           (cond ((doom-themes--colors-p real-attrs)
+                                  (dolist (cl doom--min-colors)
+                                    (push `(list '((class color) (min-colors ,cl) (background ,bg))
+                                                 (list ,@(doom-themes--colorize real-attrs cl)))
+                                          defs)))
+
+                                 ((push `(list '((background ,bg)) (list ,@real-attrs))
+                                        defs)))))))))))))
+
+
+;;
+;;; Color helper functions
+
+;; Shamelessly *borrowed* from solarized
+;;;###autoload
+(defun doom-name-to-rgb (color)
+  "Retrieves the hexidecimal string repesented the named COLOR (e.g. \"red\")
+for FRAME (defaults to the current frame)."
+  (cl-loop with div = (float (car (tty-color-standard-values "#ffffff")))
+           for x in (tty-color-standard-values (downcase color))
+           collect (/ x div)))
+
+;;;###autoload
+(defun doom-blend (color1 color2 alpha)
+  "Blend two colors (hexidecimal strings) together by a coefficient ALPHA (a
+float between 0 and 1)"
+  (when (and color1 color2)
+    (cond ((and color1 color2 (symbolp color1) (symbolp color2))
+           (doom-blend (doom-color color1) (doom-color color2) alpha))
+
+          ((or (listp color1) (listp color2))
+           (cl-loop for x in color1
+                    when (if (listp color2) (pop color2) color2)
+                    collect (doom-blend x it alpha)))
+
+          ((and (string-prefix-p "#" color1) (string-prefix-p "#" color2))
+           (apply (lambda (r g b) (format "#%02x%02x%02x" (* r 255) (* g 255) (* b 255)))
+                  (cl-loop for it    in (doom-name-to-rgb color1)
+                           for other in (doom-name-to-rgb color2)
+                           collect (+ (* alpha it) (* other (- 1 alpha))))))
+
+          (color1))))
+
+;;;###autoload
+(defun doom-darken (color alpha)
+  "Darken a COLOR (a hexidecimal string) by a coefficient ALPHA (a float between
+0 and 1)."
+  (cond ((and color (symbolp color))
+         (doom-darken (doom-color color) alpha))
+
+        ((listp color)
+         (cl-loop for c in color collect (doom-darken c alpha)))
+
+        ((doom-blend color "#000000" (- 1 alpha)))))
+
+;;;###autoload
+(defun doom-lighten (color alpha)
+  "Brighten a COLOR (a hexidecimal string) by a coefficient ALPHA (a float
+between 0 and 1)."
+  (cond ((and color (symbolp color))
+         (doom-lighten (doom-color color) alpha))
+
+        ((listp color)
+         (cl-loop for c in color collect (doom-lighten c alpha)))
+
+        ((doom-blend color "#FFFFFF" (- 1 alpha)))))
+
+;;;###autoload
+(defun doom-color (name &optional type)
+  "Retrieve a specific color named NAME (a symbol) from the current theme."
+  (let ((colors (if (listp name)
+                    name
+                  (cdr-safe (assq name doom-themes--colors)))))
+    (and colors
+         (cond ((listp colors)
+                (let ((i (or (plist-get '(256 1 16 2 8 3) type) 0)))
+                  (if (> i (1- (length colors)))
+                      (car (last colors))
+                    (nth i colors))))
+               (t colors)))))
+
+;;;###autoload
+(defun doom-ref (face prop &optional class)
+  "TODO"
+  (let ((spec (or (cdr (assq face doom-themes--faces))
+                  (error "Couldn't find the '%s' face" face))))
+    (when (memq (car spec) '(quote backquote \`))
+      (user-error "Can't fetch the literal spec for '%s'" face))
+    (when class
+      (setq spec (cdr (assq class spec)))
+      (unless spec
+        (error "Couldn't find the '%s' class in the '%s' face"
+               class face)))
+    (unless (plist-member spec prop)
+      (error "Couldn't find the '%s' property in the '%s' face%s"
+             prop face (if class (format "'s '%s' class" class) "")))
+    (plist-get spec prop)))
+
+
+;;
+;;; Defining themes
+
+(defun doom-themes--prepare-facelist-1 (specs)
+  (dolist (spec specs specs)
+    (when spec
+      (setcar (cdr spec)
+              (cl-loop for (classes plist . rest) in (cadr spec)
+                       collect
+                       (cons classes
+                             (cons (cl-loop for (key val) on plist by #'cddr
+                                            append (list key (or val 'unspecified)))
+                                   rest)))))))
+
+(defun doom-themes-prepare-facelist (custom-faces)
+  "Return an alist of face definitions for `custom-theme-set-faces'.
+
+Faces in EXTRA-FACES override the default faces."
+  (declare (pure t) (side-effect-free t))
+  (setq doom-themes--faces (doom-themes--apply-faces custom-faces))
+  (mapcar #'doom-themes--build-face doom-themes--faces))
+
+(defun doom-themes-prepare-varlist (vars)
+  "Return an alist of variable definitions for `custom-theme-set-variables'.
+
+Variables in EXTRA-VARS override the default ones."
+  (declare (pure t) (side-effect-free t))
+  (cl-loop for (var val) in (append doom-themes-base-vars vars)
+           collect `(list ',var ,val)))
+
+;;;###autoload
+(defun doom-themes-set-faces (theme &rest faces)
+  "Customize THEME (a symbol) with FACES.
+
+If THEME is nil, it applies to all themes you load. FACES is a list of Doom
+theme face specs. These is a simplified spec. For example:
+
+  (doom-themes-set-faces \\='user
+    \\='(default :background red :foreground blue)
+    \\='(doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+    \\='(doom-modeline-buffer-file :inherit \\='mode-line-buffer-id :weight \\='bold)
+    \\='(doom-modeline-buffer-path :inherit \\='mode-line-emphasis :weight \\='bold)
+    \\='(doom-modeline-buffer-project-root :foreground green :weight \\='bold))"
+  (declare (indent defun))
+  (apply #'custom-theme-set-faces
+         (or theme 'user)
+         (doom-themes--prepare-facelist-1
+          (eval
+           `(let* ((bold   ,doom-themes-enable-bold)
+                   (italic ,doom-themes-enable-italic)
+                   ,@(cl-loop for (var . val) in doom-themes--colors
+                              collect `(,var ',val)))
+              (list ,@(mapcar #'doom-themes--build-face faces)))))))
+
+(defmacro def-doom-theme (name docstring &rest properties)
+  "Define a DOOM theme, named NAME (a symbol)."
+  (declare (doc-string 2)
+           (indent 2))
+  (let (plist)
+    (while (keywordp (car properties))
+      (cl-callf plist-put plist (pop properties) (pop properties)))
+    (cl-destructuring-bind (defs &optional extra-faces extra-vars) properties
+      (let ((doom-themes--colors defs))
+        `(let* ((bold   doom-themes-enable-bold)
+                (italic doom-themes-enable-italic)
+                ,@defs)
+           (setq doom-themes--colors
+                 (list ,@(cl-loop for (var val) in defs
+                                  collect `(cons ',var ,val))))
+           (deftheme ,name ,docstring :kind 'color-scheme ,@plist)
+           (apply #'custom-theme-set-faces
+                  ',name
+                  (doom-themes--prepare-facelist-1 (list ,@(doom-themes-prepare-facelist extra-faces))))
+           (custom-theme-set-variables
+            ',name ,@(doom-themes-prepare-varlist extra-vars))
+           (unless bold (set-face-bold 'bold 'unspecified))
+           (unless italic (set-face-italic 'italic 'unspecified))
+           (provide-theme ',name))))))
+
+;;;###autoload
+(when load-file-name
+  (add-to-list 'custom-theme-load-path
+               (let* ((base (file-name-directory load-file-name))
+                      (dir (expand-file-name "themes/" base)))
+                 (or (and (file-directory-p dir) dir)
+                     base))))
+
+(provide 'doom-themes)
+;;; doom-themes.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes.elc b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes.elc
new file mode 100644
index 0000000..6d0b5b5
Binary files /dev/null and b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-themes.elc differ
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-tokyo-night-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-tokyo-night-theme.el
new file mode 100644
index 0000000..551ae78
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-tokyo-night-theme.el
@@ -0,0 +1,296 @@
+;;; doom-tokyo-night-theme.el --- inspired by VSCode's Tokyo Night theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: December 15, 2021 (#650)
+;; Author: FosterHangdaan <https://github.com/FosterHangdaan>
+;; Maintainer:
+;; Source: https://github.com/enkia/tokyo-night-vscode-theme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-tokyo-night-theme nil
+  "Options for doom-themes"
+  :group 'doom-themes)
+
+(defcustom doom-tokyo-night-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-tokyo-night-theme
+  :type 'boolean)
+
+(defcustom doom-tokyo-night-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-tokyo-night-theme
+  :type 'boolean)
+
+(defcustom doom-tokyo-night-comment-bg doom-tokyo-night-brighter-comments
+  "If non-nil, comments will have a subtle, darker background. Enhancing their legibility."
+  :group 'doom-tokyo-night-theme
+  :type 'boolean)
+
+(defcustom doom-tokyo-night-padded-modeline nil
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to determine the exact padding."
+  :group 'doom-tokyo-night-theme
+  :type '(or integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-tokyo-night
+  "A clean, dark theme that celebrates the lights of downtown Tokyo at night."
+
+  ; Color Scheme
+  ; gui       256
+  ; "#f7768e" "#f7768e" => This keyword, HTML elements, Regex group symbol, CSS units, Terminal Red
+  ; "#ff9e64" "#ff9e64" => Number and Boolean constants, Language support constants
+  ; "#e0af68" "#e0af68" => Function parameters, Regex character sets, Terminal Yellow
+  ; "#9ece6a" "#9ece6a" => Strings, CSS class names
+  ; "#73daca" "#73daca" => Object literal keys, Markdown links, Terminal Green
+  ; "#b4f9f8" "#b4f9f8" => Regex literal strings
+  ; "#2ac3de" "#2ac3de" => Language support functions, CSS HTML elements
+  ; "#7dcfff" "#7dcfff" => Object properties, Regex quantifiers and flags, Markdown headings, Terminal Cyan, Markdown code, Import/export keywords
+  ; "#7aa2f7" "#7aa2f7" => Function names, CSS property names, Terminal Blue
+  ; "#bb9af7" "#bb9af7" => Control Keywords, Storage Types, Regex symbols and operators, HTML Attributes, Terminal Magenta
+  ; "#c0caf5" "#c0caf5" => Variables, Class names, Terminal White
+  ; "#a9b1d6" "#a9b1d6" => Editor foreground
+  ; "#9aa5ce" "#9aa5ce" => Markdown Text, HTML Text
+  ; "#cfc9c2" "#cfc9c2" => Parameters inside functions (semantic highlighting only)
+  ; "#565f89" "#565f89" => Comments
+  ; "#414868" "#414868" => Terminal black
+  ; "#24283b" "#24283b" => Editor background (Storm)
+  ; "#1a1b26" "#1a1b26" => Editor background (Night)
+
+  ;; name        default   256       16
+  ((bg         '("#1a1b26" nil       nil            ))
+   (bg-alt     '("#13141c" nil       nil            ))
+   (base0      '("#414868" "#414868" "black"        ))
+   (base1      '("#51587a" "#51587a" "brightblack"  ))
+   (base2      '("#61698b" "#61698b" "brightblack"  ))
+   (base3      '("#71799d" "#71799d" "brightblack"  ))
+   (base4      '("#8189af" "#8189af" "brightblack"  ))
+   (base5      '("#9099c0" "#9099c0" "brightblack"  ))
+   (base6      '("#a0aad2" "#a0aad2" "brightblack"  ))
+   (base7      '("#b0bae3" "#b0bae3" "brightblack"  ))
+   (base8      '("#c0caf5" "#c0caf5" "white"        ))
+   (fg-alt     '("#c0caf5" "#c0caf5" "brightwhite"  ))
+   (fg         '("#a9b1d6" "#a9b1d6" "white"        ))
+
+   (grey       base4)
+   (red        '("#f7768e" "#f7768e" "red"          ))
+   (orange     '("#ff9e64" "#ff9e64" "brightred"    ))
+   (green      '("#73daca" "#73daca" "green"        ))
+   (teal       '("#2ac3de" "#2ac3de" "brightgreen"  ))
+   (yellow     '("#e0af68" "#e0af68" "yellow"       ))
+   (blue       '("#7aa2f7" "#7aa2f7" "brightblue"   ))
+   (dark-blue  '("#565f89" "#565f89" "blue"         ))
+   (magenta    '("#bb9af7" "#bb9af7" "magenta"      ))
+   (violet     '("#9aa5ce" "#9aa5ce" "brightmagenta"))
+   (cyan       '("#b4f9f8" "#b4f9f8" "brightcyan"   ))
+   (dark-cyan  '("#7dcfff" "#7dcfff" "cyan"         ))
+   ; Additional custom colors
+   (dark-green '("#9ece6a" "#9ece6a" "green"        ))
+   (brown      '("#cfc9c2" "#cfc9c2" "yellow"       ))
+
+   ;; face categories -- required for all themes
+   (highlight      cyan)
+   (vertical-bar   (doom-lighten bg 0.05))
+   (selection      base0)
+   (builtin        red)
+   (comments       (if doom-tokyo-night-brighter-comments base5 base1))
+   (doc-comments   (doom-lighten (if doom-tokyo-night-brighter-comments base5 base1) 0.25))
+   (constants      orange)
+   (functions      blue)
+   (keywords       magenta)
+   (methods        blue)
+   (operators      dark-cyan)
+   (type           base8)
+   (strings        dark-green)
+   (variables      base8)
+   (numbers        orange)
+   (region         base0)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-tokyo-night-brighter-modeline)
+   (-modeline-pad
+    (when doom-tokyo-night-padded-modeline
+      (if (integerp doom-tokyo-night-padded-modeline) doom-tokyo-night-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    (if -modeline-bright
+	base3
+	`(,(doom-darken (car bg) 0.15) ,@(cdr base0))))
+   (modeline-bg-l
+    (if -modeline-bright
+	base3
+	`(,(doom-darken (car bg) 0.1) ,@(cdr base0))))
+   (modeline-bg-inactive   (doom-darken bg 0.1))
+   (modeline-bg-inactive-l `(,(car bg) ,@(cdr base1))))
+
+
+  ;; --- Extra Faces ------------------------
+  (
+   ((line-number-current-line &override) :foreground base8)
+   ((line-number &override) :foreground comments :background (doom-darken bg 0.025))
+
+   (font-lock-comment-face
+    :foreground comments
+    :background (if doom-tokyo-night-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (font-lock-doc-face
+    :inherit 'font-lock-comment-face
+    :foreground doc-comments)
+
+   ;;; Doom Modeline
+   (doom-modeline-bar :background (if -modeline-bright modeline-bg highlight))
+   (doom-modeline-buffer-path :foreground base8 :weight 'normal)
+   (doom-modeline-buffer-file :foreground brown :weight 'normal)
+
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis
+    :foreground (if -modeline-bright base8 highlight))
+   (mode-line-buffer-id
+    :foreground highlight)
+
+   ;;; Indentation
+   (whitespace-indentation :background bg)
+   (whitespace-tab :background bg)
+
+   ;;; Ivy
+   (ivy-subdir :foreground blue)
+   (ivy-minibuffer-match-face-1 :foreground green :background bg-alt)
+   (ivy-minibuffer-match-face-2 :foreground orange :background bg-alt)
+   (ivy-minibuffer-match-face-3 :foreground red :background bg-alt)
+   (ivy-minibuffer-match-face-4 :foreground yellow :background bg-alt)
+
+   ;;; Elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+
+   ;;; Solaire
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+
+   ;;; Telephone
+   (telephone-line-accent-active
+    :inherit 'mode-line
+    :background (doom-lighten bg 0.2))
+   (telephone-line-accent-inactive
+    :inherit 'mode-line
+    :background (doom-lighten bg 0.05))
+   (telephone-line-evil-emacs
+    :inherit 'mode-line
+    :background dark-blue)
+
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground fg)
+   (rainbow-delimiters-depth-2-face :foreground blue)
+   (rainbow-delimiters-depth-3-face :foreground orange)
+   (rainbow-delimiters-depth-4-face :foreground green)
+   (rainbow-delimiters-depth-5-face :foreground cyan)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground teal)
+
+   ;;; Treemacs
+   (treemacs-root-face :foreground magenta :weight 'bold :height 1.2)
+   (doom-themes-treemacs-root-face :foreground magenta :weight 'ultra-bold :height 1.2)
+   (doom-themes-treemacs-file-face :foreground fg-alt)
+   (treemacs-directory-face :foreground base8)
+   (treemacs-file-face :foreground fg)
+   (treemacs-git-modified-face :foreground green)
+   (treemacs-git-renamed-face :foreground yellow)
+
+   ;;; Magit
+   (magit-section-heading :foreground blue)
+   (magit-branch-remote   :foreground orange)
+   (magit-diff-our :foreground (doom-darken red 0.2) :background (doom-darken red 0.7))
+   (magit-diff-our-highlight :foreground red :background (doom-darken red 0.5) :weight 'bold)
+   (magit-diff-removed :foreground (doom-darken red 0.2) :background (doom-darken red 0.7))
+   (magit-diff-removed-highlight :foreground red :background (doom-darken red 0.5) :weight 'bold)
+
+   ;; --- Major-Mode Faces -------------------
+   ;;; elisp
+   (highlight-quoted-symbol :foreground yellow)
+
+   ;;; js2-mode
+   (js2-function-param :foreground yellow)
+   (js2-object-property :foreground green)
+
+   ;;; typescript-mode
+   (typescript-this-face :foreground red)
+   (typescript-access-modifier-face :foreground brown)
+
+   ;;; rjsx-mode
+   (rjsx-tag :foreground red)
+   (rjsx-text :foreground violet)
+   (rjsx-attr :foreground magenta :slant 'italic :weight 'medium)
+   (rjsx-tag-bracket-face :foreground (doom-darken red 0.3))
+
+   ;;; css-mode / scss-mode
+   (css-property             :foreground blue)
+   (css-selector             :foreground teal)
+   (css-pseudo-class         :foreground orange)
+
+   ;;; markdown-mode
+   (markdown-markup-face :foreground violet)
+   (markdown-header-face :inherit 'bold :foreground dark-cyan)
+   (markdown-blockquote-face :foreground violet :background (doom-lighten bg 0.04))
+   (markdown-table-face :foreground violet :background (doom-lighten bg 0.04))
+   ((markdown-code-face &override) :foreground dark-cyan :background (doom-lighten bg 0.04))
+
+   ;;; org-mode
+   (org-hide :foreground hidden)
+   (org-block :background (doom-darken base2 0.65))
+   (org-block-begin-line :background (doom-darken base2 0.65) :foreground comments :extend t)
+   (solaire-org-hide-face :foreground hidden)
+
+   ;;; web-mode
+   (web-mode-json-context-face :foreground brown)
+   (web-mode-json-key-face :foreground teal)
+   ;;;; Block
+   (web-mode-block-delimiter-face :foreground yellow)
+   ;;;; Code
+   (web-mode-constant-face :foreground constants)
+   (web-mode-variable-name-face :foreground variables)
+   ;;;; CSS
+   (web-mode-css-pseudo-class-face :foreground orange)
+   (web-mode-css-property-name-face :foreground blue)
+   (web-mode-css-selector-face :foreground teal)
+   (web-mode-css-function-face :foreground yellow)
+   ;;;; HTML
+   (web-mode-html-attr-engine-face :foreground yellow)
+   (web-mode-html-attr-equal-face :foreground operators)
+   (web-mode-html-attr-name-face :foreground magenta)
+   (web-mode-html-tag-bracket-face :foreground (doom-darken red 0.3))
+   (web-mode-html-tag-face :foreground red))
+
+
+  ;; --- extra variables ---------------------
+  ;; ()
+  )
+
+;;; doom-tokyo-night-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-tomorrow-day-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-tomorrow-day-theme.el
new file mode 100644
index 0000000..9a36754
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-tomorrow-day-theme.el
@@ -0,0 +1,164 @@
+;;; doom-tomorrow-day-theme.el --- a light variant of Tomorrow -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: March 8, 2018 (#144)
+;; Author: emacswatcher <https://github.com/emacswatcher>
+;; Maintainer:
+;; Source: https://github.com/ChrisKempson/Tomorrow-Theme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-tomorrow-day-theme nil
+  "Options for the `doom-tomorrow-day' theme."
+  :group 'doom-themes)
+
+(defcustom doom-tomorrow-day-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-tomorrow-day-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-tomorrow-day
+  "A light theme based off of Chris Kempson's Tomorrow Dark."
+  :family 'doom-tomorrow
+  :background-mode 'light
+
+  ;; name        gui       256       16
+  ((bg         '("#ffffff" "white"   "white" ))
+   (bg-alt     '("#f2f2f2" nil       nil     ))
+   (base0      '("#f2f2f2" "white"   "white" ))
+   (base1      '("#e4e4e4" "#e4e4e4"         ))
+   (base2      '("#dedede" "#cccccc"         ))
+   (base3      '("#d6d4d4" "#cccccc" "silver"))
+   (base4      '("#C0bfbf" "#c0c0c0" "silver"))
+   (base5      '("#a3a1a1" "#adadad" "silver"))
+   (base6      '("#8a8787" "#949494" "silver"))
+   (base7      '("#696769" "#6b6b6b" "silver"))
+   (base8      '("#000000" "#000000" "black" ))
+   (fg         '("#4d4d4c" "#3a3a3a" "black"))
+   (fg-alt     (doom-darken fg 0.6))
+
+   (grey       '("#8e908c" "#999999" "silver"))
+   (red        '("#c82829" "#cc3333" "red"))
+   (orange     '("#f5871f" "#ff9933" "brightred"))
+   (yellow     '("#eab700" "#ffcc00" "yellow"))
+   (green      '("#718c00" "#669900" "green"))
+   (blue       '("#4271ae" "#339999" "brightblue"))
+   (dark-blue  (doom-darken blue 0.25))
+   (teal       '("#3e999f" "#339999" "brightblue"))
+   (magenta    '("#c678dd" "#c9b4cf" "magenta"))
+   (violet     '("#8959a8" "#996699" "brightmagenta"))
+   (cyan       '("#8abeb7" "#8abeb7" "cyan"))
+   (dark-cyan  (doom-lighten cyan 0.4))
+
+   ;; face categories
+   (highlight      blue)
+   (vertical-bar   base3)
+   (selection      base1)
+   (builtin        blue)
+   (comments       grey)
+   (doc-comments   grey)
+   (constants      orange)
+   (functions      blue)
+   (keywords       violet)
+   (methods        blue)
+   (operators      fg)
+   (type           (doom-darken yellow 0.2))
+   (strings        green)
+   (variables      red)
+   (numbers        orange)
+   (region         selection)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    (doom-lighten yellow 0.4))
+   (vc-added       (doom-lighten green 0.4))
+   (vc-deleted     red)
+
+   ;; custom categories
+   (org-block-bg             (doom-lighten bg-alt 0.3))
+   (modeline-bg              `(,(doom-lighten (car bg-alt) 0.4) ,@(cdr base3)))
+   (modeline-bg-alt          bg)
+   (modeline-bg-inactive     `(,(doom-darken (car bg) 0.04) ,@(cdr base1)))
+   (modeline-bg-alt-inactive bg)
+   (modeline-fg              fg)
+   (modeline-fg-inactive     comments)
+   (modeline-fg-alt-inactive comments)
+
+   (-modeline-pad
+    (when doom-tomorrow-day-padded-modeline
+      (if (integerp doom-tomorrow-day-padded-modeline)
+          doom-tomorrow-day-padded-modeline
+        4))))
+
+  ;;;; Base theme face overrides
+  (((font-lock-doc-face &override) :slant 'italic)
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground base8)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-inactive
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-highlight :inherit 'bold :background highlight :foreground base0)
+
+   ;;;; doom-modeline
+   (doom-modeline-bar :background highlight)
+   (doom-modeline-buffer-path       :foreground violet :weight 'bold)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path)
+   ;;;; ivy
+   (ivy-current-match :background region :distant-foreground grey :weight 'ultra-bold)
+   (ivy-minibuffer-match-face-1 :foreground base5 :weight 'light)
+   (ivy-minibuffer-match-face-2 :inherit 'ivy-minibuffer-match-face-1 :foreground violet :weight 'ultra-bold)
+   (ivy-minibuffer-match-face-3 :inherit 'ivy-minibuffer-match-face-2 :foreground blue)
+   (ivy-minibuffer-match-face-4 :inherit 'ivy-minibuffer-match-face-2 :foreground red)
+   ;;;; org <built-in>
+   ((org-block &override)            :background org-block-bg)
+   ((org-block-background &override) :background org-block-bg)
+   ((org-block-begin-line &override) :background org-block-bg)
+   ((org-quote &override)            :background org-block-bg)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground teal)
+   ((outline-2 &override) :foreground blue)
+   ((outline-3 &override) :foreground violet)
+   ((outline-4 &override) :foreground blue)
+   ((outline-5 &override) :foreground violet)
+   ((outline-6 &override) :foreground blue)
+   ((outline-7 &override) :foreground violet)
+   ((outline-8 &override) :foreground blue)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground violet)
+   (rainbow-delimiters-depth-2-face :foreground blue)
+   (rainbow-delimiters-depth-3-face :foreground green)
+   (rainbow-delimiters-depth-4-face :foreground magenta)
+   (rainbow-delimiters-depth-5-face :foreground orange)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground teal)
+   ;;;; solaire-mode
+   (solaire-mode-line-face :inherit 'mode-line :background modeline-bg-alt)
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-alt-inactive
+    :foreground modeline-fg-alt-inactive)
+   ;;;; treemacs
+   (treemacs-git-untracked-face :foreground yellow)
+   ;;;; whitespace <built-in>
+   (whitespace-tab :background (doom-lighten base0 0.6)
+                   :foreground comments))
+
+  ;; --- variables --------------------------
+  ;; ()
+  )
+
+;;; doom-tomorrow-day-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-tomorrow-night-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-tomorrow-night-theme.el
new file mode 100644
index 0000000..94c2d03
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-tomorrow-night-theme.el
@@ -0,0 +1,125 @@
+;;; doom-tomorrow-night-theme.el --- One of the dark variants of Tomorrow -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 14, 2017 (4c981f2cccf3)
+;; Author: Henrik Lissner <https://github.com/hlissner>
+;; Maintainer:
+;; Source: https://github.com/ChrisKempson/Tomorrow-Theme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-tomorrow-night-theme nil
+  "Options for the `doom-tomorrow-night' theme."
+  :group 'doom-themes)
+
+(defcustom doom-tomorrow-night-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-tomorrow-night-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-tomorrow-night
+  "A theme based off of Chris Kempson's Tomorrow Dark."
+  :family 'doom-tomorrow
+  :background-mode 'dark
+
+  ;; name        gui       256       16
+  ((bg         '("#1d1f21" nil       nil          ))
+   (bg-alt     '("#161719" nil       nil          ))
+   (base0      '("#0d0d0d" "black"   "black"      ))
+   (base1      '("#1b1b1b" "#1b1b1b"              ))
+   (base2      '("#212122" "#1e1e1e"              ))
+   (base3      '("#292b2b" "#292929" "brightblack"))
+   (base4      '("#3f4040" "#3f3f3f" "brightblack"))
+   (base5      '("#5c5e5e" "#525252" "brightblack"))
+   (base6      '("#757878" "#6b6b6b" "brightblack"))
+   (base7      '("#969896" "#979797" "brightblack"))
+   (base8      '("#ffffff" "#ffffff" "white"      ))
+   (fg         '("#c5c8c6" "#c5c5c5" "white"))
+   (fg-alt     (doom-darken fg 0.4))
+
+   (grey       '("#5a5b5a" "#5a5a5a" "brightblack"))
+   (red        '("#cc6666" "#cc6666" "red"))
+   (orange     '("#de935f" "#dd9955" "brightred"))
+   (yellow     '("#f0c674" "#f0c674" "yellow"))
+   (green      '("#b5bd68" "#b5bd68" "green"))
+   (blue       '("#81a2be" "#88aabb" "brightblue"))
+   (dark-blue  '("#41728e" "#41728e" "blue"))
+   (teal       blue) ; FIXME replace with real teal
+   (magenta    '("#c9b4cf" "#c9b4cf" "magenta"))
+   (violet     '("#b294bb" "#b294bb" "brightmagenta"))
+   (cyan       '("#8abeb7" "#8abeb7" "cyan"))
+   (dark-cyan  (doom-darken cyan 0.4))
+
+   ;; face categories
+   (highlight      blue)
+   (vertical-bar   base0)
+   (selection      `(,(car (doom-lighten bg 0.1)) ,@(cdr base4)))
+   (builtin        blue)
+   (comments       grey)
+   (doc-comments   (doom-lighten grey 0.14))
+   (constants      orange)
+   (functions      blue)
+   (keywords       violet)
+   (methods        blue)
+   (operators      fg)
+   (type           yellow)
+   (strings        green)
+   (variables      red)
+   (numbers        orange)
+   (region         selection)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    fg-alt)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (modeline-bg     `(,(doom-darken (car bg-alt) 0.3) ,@(cdr base3)))
+   (modeline-bg-alt `(,(car bg) ,@(cdr base1)))
+   (modeline-fg     base8)
+   (modeline-fg-alt comments)
+   (-modeline-pad
+    (when doom-tomorrow-night-padded-modeline
+      (if (integerp doom-tomorrow-night-padded-modeline)
+          doom-tomorrow-night-padded-modeline
+        4))))
+
+  ;; --- faces ------------------------------
+  (((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground blue :bold bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground violet)
+   (rainbow-delimiters-depth-2-face :foreground blue)
+   (rainbow-delimiters-depth-3-face :foreground orange)
+   (rainbow-delimiters-depth-4-face :foreground green)
+   (rainbow-delimiters-depth-5-face :foreground magenta)
+   (rainbow-delimiters-depth-6-face :foreground yellow)
+   (rainbow-delimiters-depth-7-face :foreground teal)
+   ;;;; doom-modeline
+   (doom-modeline-buffer-path       :foreground violet :bold bold)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path))
+
+  ;; --- variables --------------------------
+  ;; ()
+  )
+
+;;; doom-tomorrow-night-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-vibrant-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-vibrant-theme.el
new file mode 100644
index 0000000..d052c23
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-vibrant-theme.el
@@ -0,0 +1,174 @@
+;;; doom-vibrant-theme.el --- a more vibrant variant of doom-one -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: May 10, 2017 (7532a705db9c)
+;; Author: Henrik Lissner <https://github.com/hlissner>
+;; Maintainer: Henrik Lissner <https://github.com/hlissner>
+;; Source: doom-one
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-vibrant-theme nil
+  "Options for the `doom-vibrant' theme."
+  :group 'doom-themes)
+
+(defcustom doom-vibrant-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-vibrant-theme
+  :type 'boolean)
+
+(defcustom doom-vibrant-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-vibrant-theme
+  :type 'boolean)
+
+(defcustom doom-vibrant-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-vibrant-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-vibrant
+  "A dark theme based off of doom-one with more vibrant colors."
+  :family 'doom-one
+  :background-mode 'light
+
+  ;; name        gui       256           16
+  ((bg         '("#242730" "black"       "black" ))
+   (fg         '("#bbc2cf" "#bfbfbf"     "brightwhite" ))
+
+   ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+   ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+   ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+   ;; and `doom-blend' helper functions.
+   (bg-alt     '("#2a2e38" "black"       "black"       ))
+   (fg-alt     '("#5D656B" "#5d5d5d"     "white"       ))
+
+   ;; These should represent a spectrum from bg to fg, where base0 is a starker
+   ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+   ;; dark grey, base0 should be white and base8 should be black.
+   (base0      '("#1c1f24" "#101010"     "black"       ))
+   (base1      '("#1c1f24" "#1e1e1e"     "brightblack" ))
+   (base2      '("#21272d" "#21212d"     "brightblack" ))
+   (base3      '("#23272e" "#262626"     "brightblack" ))
+   (base4      '("#484854" "#5e5e5e"     "brightblack" ))
+   (base5      '("#62686E" "#666666"     "brightblack" ))
+   (base6      '("#757B80" "#7b7b7b"     "brightblack" ))
+   (base7      '("#9ca0a4" "#979797"     "brightblack" ))
+   (base8      '("#DFDFDF" "#dfdfdf"     "white"       ))
+
+   (grey       base4)
+   (red        '("#ff665c" "#ff6655" "red"             ))
+   (orange     '("#e69055" "#dd8844" "brightred"       ))
+   (green      '("#7bc275" "#99bb66" "green"           ))
+   (teal       '("#4db5bd" "#44b9b1" "brightgreen"     ))
+   (yellow     '("#FCCE7B" "#ECBE7B" "yellow"          ))
+   (blue       '("#51afef" "#51afef" "brightblue"      ))
+   (dark-blue  '("#1f5582" "#2257A0" "blue"            ))
+   (magenta    '("#C57BDB" "#c678dd" "brightmagenta"   ))
+   (violet     '("#a991f1" "#a9a1e1" "magenta"         )) ;a9a1e1
+   (cyan       '("#5cEfFF" "#46D9FF" "brightcyan"      ))
+   (dark-cyan  '("#6A8FBF" "#5699AF" "cyan"            ))
+
+   ;; These are the "universal syntax classes" that doom-themes establishes.
+   ;; These *must* be included in every doom themes, or your theme will throw an
+   ;; error, as they are used in the base theme defined in doom-themes-base.
+   (highlight      blue)
+   (vertical-bar   base0)
+   (selection      dark-blue)
+   (builtin        magenta)
+   (comments       (if doom-vibrant-brighter-comments dark-cyan base5))
+   (doc-comments   (if doom-vibrant-brighter-comments (doom-lighten dark-cyan 0.15) (doom-lighten base4 0.3)))
+   (constants      violet)
+   (functions      cyan)
+   (keywords       blue)
+   (methods        violet)
+   (operators      magenta)
+   (type           yellow)
+   (strings        green)
+   (variables      (doom-lighten magenta 0.4))
+   (numbers        orange)
+   (region         "#3d4451")
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    yellow)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; These are extra color variables used only in this theme; i.e. they aren't
+   ;; mandatory for derived themes.
+   (modeline-fg             fg)
+   (modeline-fg-inactive    (doom-blend blue grey (if doom-vibrant-brighter-modeline 0.9 0.2)))
+   (modeline-bg             (if doom-vibrant-brighter-modeline
+                                `("#383f58" ,@(cdr base1))
+                              `(,(doom-darken (car bg) 0.15) ,@(cdr base1))))
+   (modeline-bg-alt         (if doom-vibrant-brighter-modeline
+                                modeline-bg
+                              `(,(car bg-alt) ,@(cdr base0))))
+   (modeline-bg-inactive     `(,(doom-darken (car bg-alt) 0.2) ,@(cdr base0)))
+   (modeline-bg-alt-inactive (doom-darken bg 0.25))
+
+   (-modeline-pad
+    (when doom-vibrant-padded-modeline
+      (if (integerp doom-vibrant-padded-modeline) doom-vibrant-padded-modeline 4))))
+
+
+  ;;;; Base theme face overrides
+  (((font-lock-comment-face &override)
+    :background (if doom-vibrant-brighter-comments (doom-darken bg-alt 0.095) 'unspecified))
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground blue :bold bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-inactive
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if doom-vibrant-brighter-modeline base8 highlight))
+   (org-block :background (doom-darken base3 0.1))
+
+   ;;;; all-the-icons
+   ((all-the-icons-dblue &override) :foreground dark-cyan)
+   ;;;; centaur-tabs
+   (centaur-tabs-unselected :background bg-alt :foreground base6)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar
+    :background (if doom-vibrant-brighter-modeline modeline-bg highlight))
+   (doom-modeline-buffer-path
+    :foreground (if doom-vibrant-brighter-modeline base8 blue) :bold bold)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; markdown-mode
+   (markdown-header-face :inherit 'bold :foreground red)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-alt-inactive
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt-inactive)))
+   ;;;; whitespace <built-in>
+   (whitespace-empty :background base2))
+
+  ;;;; Base theme variable overrides
+  ;; ()
+  )
+
+;;; doom-vibrant-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-wilmersdorf-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-wilmersdorf-theme.el
new file mode 100644
index 0000000..a36ae23
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-wilmersdorf-theme.el
@@ -0,0 +1,162 @@
+;;; doom-wilmersdorf-theme.el --- port of Ian Pan's Wilmersdorf -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: August 12, 2019 (6035392a1a01)
+;; Author: ema2159 <https://github.com/ema2159>
+;; Maintainer:
+;; Source: https://github.com/ianpan870102/wilmersdorf-emacs-theme
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-wilmersdorf-theme nil
+  "Options for the `doom-wilmersdorf' theme."
+  :group 'doom-themes)
+
+(defcustom doom-wilmersdorf-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line. Can be an integer to
+determine the exact padding."
+  :group 'doom-wilmersdorf-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-wilmersdorf
+  "A dark theme inspired by Ian Pan's Wilmersdorf"
+
+  ;; name        default   256       16
+  ((bg         '("#282b33" "#282b33" nil            ))
+   (bg-alt     '("#1f2024" "#1f2024" nil            ))
+   (base0      '("#222228" "#222228" "black"        ))
+   (base1      '("#282b33" "#282b33" "brightblack"  ))
+   (base2      '("#34373e" "#34373e" "brightblack"  ))
+   (base3      '("#41454b" "#41454b" "brightblack"  ))
+   (base4      '("#515462" "#515462" "brightblack"  ))
+   (base5      '("#888395" "#888395" "brightblack"  ))
+   (base6      '("#929292" "#929292" "brightblack"  ))
+   (base7      '("#727269" "#727269" "brightblack"  ))
+   (base8      '("#eceff4" "#eceff4" "white"        ))
+   (fg-alt     '("#c9d9ff" "#c9d9ff" "brightwhite"  ))
+   (fg         '("#c6c6c6" "#c6c6c6" "white"        ))
+
+   (grey       base4)
+   (red        '("#e1c1ee" "#e1c1ee" "red"          ))
+   (orange     '("#a6c1e0" "#a6c1e0" "brightred"    ))
+   (green      '("#5b94ab" "#5b94ab" "green"        ))
+   (teal       '("#7ebebd" "#7ebebd" "brightgreen"  ))
+   (yellow     '("#cfcf9c" "#cfcf9c" "yellow"       ))
+   (blue       '("#819cd6" "#819cd6" "brightblue"   ))
+   (light-blue '("#90a6db" "#90a6db" "yellow"       ))
+   (dark-blue  '("#616c96" "#616c96" "blue"         ))
+   (magenta    '("#a6c1e0" "#a6c1e0" "magenta"      ))
+   (violet     '("#b0a2e7" "#b0a2e7" "brightmagenta"))
+   (cyan       '("#7289bc" "#7289bc" "brightcyan"   ))
+   (dark-cyan  '("#6e7899" "#6e7899" "cyan"   ))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.5))
+   (selection      dark-blue)
+   (builtin        teal)
+   (comments       dark-cyan)
+   (doc-comments   (doom-lighten dark-cyan 0.25))
+   (constants      magenta)
+   (functions      teal)
+   (keywords       blue)
+   (methods        cyan)
+   (operators      blue)
+   (type           violet)
+   (strings        green)
+   (variables      magenta)
+   (numbers        magenta)
+   (region         base3)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-pad
+    (when doom-wilmersdorf-padded-modeline
+      (if (integerp doom-wilmersdorf-padded-modeline) doom-wilmersdorf-padded-modeline 4)))
+
+   (modeline-fg     'unspecified)
+   (modeline-fg-alt base5)
+
+   (modeline-bg
+    `(,(doom-darken (car bg) 0.1) ,@(cdr base0)))
+   (modeline-bg-l
+    `(,(doom-darken (car bg) 0.15) ,@(cdr base0)))
+   (modeline-bg-inactive   `(,(car bg) ,@(cdr base1)))
+   (modeline-bg-inactive-l (doom-darken bg 0.1)))
+
+
+  ;;;; Base theme face overrides
+  (((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground fg)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground highlight)
+   ((mode-line-highlight &override) :background teal)
+
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background highlight)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   (markdown-url-face    :foreground teal :weight 'normal)
+   (markdown-reference-face :foreground base6)
+   ((markdown-bold-face &override)   :foreground fg)
+   ((markdown-italic-face &override) :foreground fg-alt)
+   ;;;; mic-paren
+   (paren-face-match    :foreground teal   :background base0 :weight 'ultra-bold)
+   (paren-face-mismatch :foreground red :background violet   :weight 'ultra-bold)
+   (paren-face-no-match :inherit 'paren-face-mismatch :weight 'ultra-bold)
+   ;;;; outline <built-in>
+   ((outline-1 &override) :foreground blue)
+   ((outline-2 &override) :foreground green)
+   ((outline-3 &override) :foreground teal)
+   ((outline-4 &override) :foreground (doom-darken blue 0.2))
+   ((outline-5 &override) :foreground (doom-darken green 0.2))
+   ((outline-6 &override) :foreground (doom-darken teal 0.2))
+   ((outline-7 &override) :foreground (doom-darken blue 0.4))
+   ((outline-8 &override) :foreground (doom-darken green 0.4))
+   ;;;; org <built-in>
+   ((org-block &override) :background base2)
+   ((org-block-begin-line &override) :background base2)
+   (org-hide :foreground hidden)
+   ;;;; solaire-mode
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l))))
+
+  ;;;; Base theme variable overrides-
+  ()
+  )
+
+;;; doom-wilmersdorf-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-winter-is-coming-dark-blue-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-winter-is-coming-dark-blue-theme.el
new file mode 100644
index 0000000..afb568b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-winter-is-coming-dark-blue-theme.el
@@ -0,0 +1,199 @@
+;;; doom-winter-is-coming-dark-blue-theme.el --- Winter is Coming -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: Sep 18, 2022
+;; Author: Philip Arvidsson <https://github.com/philiparvidsson>
+;; Maintainer: Philip Arvidsson <https://github.com/philiparvidsson>
+;; Source: https://github.com/johnpapa/vscode-winteriscoming
+;;
+;;; Commentary:
+;;
+;; Everyone loves this theme, or at least Philip and a few other people.
+;;
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-winter-is-coming-dark-blue-theme nil
+  "Options for the `doom-winter-is-coming-dark-blue' theme."
+  :group 'doom-themes)
+
+(defcustom doom-winter-is-coming-no-italics nil
+  "If non-nil, no italics will be used."
+  :group 'doom-winter-is-coming-dark-blue-theme
+  :type 'boolean)
+
+(defcustom doom-winter-is-coming-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-winter-is-coming-dark-blue-theme
+  :type 'boolean)
+
+(defcustom doom-winter-is-coming-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-winter-is-coming-dark-blue-theme
+  :type 'boolean)
+
+(defcustom doom-winter-is-coming-comment-bg doom-winter-is-coming-brighter-comments
+  "If non-nil, comments will have a subtle highlight to enhance their
+legibility."
+  :group 'doom-winter-is-coming-dark-blue-theme
+  :type 'boolean)
+
+(defcustom doom-winter-is-coming-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-winter-is-coming-dark-blue-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-winter-is-coming-dark-blue
+                "Rip-off of Winter is Coming theme for VSCode."
+                :family 'doom-winter-is-coming
+                :background-mode 'dark
+
+                ;; name        default   256           16
+                ((bg         '("#011627" "black"       "black"  ))
+                 (fg         '("#a7dbf7" "#bfbfbf"     "brightwhite"  ))
+
+                 ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+                 ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+                 ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+                 ;; and `doom-blend' helper functions.
+                 (bg-alt     '("#062e5a" "black"       "black"        ))
+                 (fg-alt     '("#7799bb" "#2d2d2d"     "white"        ))
+
+                 ;; These should represent a spectrum from bg to fg, where base0 is a starker
+                 ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+                 ;; dark grey, base0 should be white and base8 should be black.
+                 (base0      '("#00101d" "black"       "black"        ))
+                 (base1      '("#182735" "#1e1e1e"     "brightblack"  ))
+                 (base2      '("#2e3f4e" "#2e2e2e"     "brightblack"  ))
+                 (base3      '("#445969" "#262626"     "brightblack"  ))
+                 (base4      '("#5c7485" "#3f3f3f"     "brightblack"  ))
+                 (base5      '("#7590a3" "#525252"     "brightblack"  ))
+                 (base6      '("#8fadc1" "#6b6b6b"     "brightblack"  ))
+                 (base7      '("#aaccdf" "#979797"     "brightblack"  ))
+                 (base8      '("#c5ebff" "#dfdfdf"     "white"        ))
+
+                 (grey       base4)
+                 (red        '("#ef5350" "#ff6655" "red"          ))
+                 (orange     '("#ffca28" "#dd8844" "brightred"    ))
+                 (green      '("#6bff81" "#ff0000" "green"        ))
+                 (light-green '("#8dec95" "#ff0000" "green"        ))
+                 (teal       '("#5abeb0" "#44b9b1" "brightgreen"  ))
+                 (yellow     '("#f7ecb5" "#ECBE7B" "yellow"       ))
+                 (light-blue '("#82aaff" "#51afef" "brightblue"   ))
+                 (blue       '("#4373c2" "#51afef" "brightblue"   ))
+                 (dark-blue  '("#0c4994" "#2257A0" "blue"         ))
+                 (magenta    '("#d29ffc" "#c678dd" "brightmagenta"))
+                 (violet     '("#7e57c2" "#a9a1e1" "magenta"      ))
+                 (cyan       '("#00bff9" "#46D9FF" "brightcyan"   ))
+                 (dark-cyan  '("#03648a" "#5699AF" "cyan"         ))
+
+                 ;; These are the "universal syntax classes" that doom-themes establishes.
+                 ;; These *must* be included in every doom themes, or your theme will throw an
+                 ;; error, as they are used in the base theme defined in doom-themes-base.
+                 (highlight      blue)
+                 (vertical-bar   (doom-darken base1 0.1))
+                 (selection      dark-blue)
+                 (builtin        cyan)
+                 (comments       (if doom-winter-is-coming-brighter-comments dark-cyan dark-blue))
+                 (doc-comments   (doom-lighten (if doom-winter-is-coming-brighter-comments dark-cyan dark-blue) 0.25))
+                 (constants      light-blue)
+                 (functions      light-blue)
+                 (keywords       cyan)
+                 (methods        light-blue)
+                 (operators      cyan)
+                 (type           magenta)
+                 (strings        light-green)
+                 (variables      fg)
+                 (numbers        yellow)
+                 (region         `(,(doom-lighten (car bg-alt) 0.15) ,@(doom-lighten (cdr base1) 0.35)))
+                 (error          red)
+                 (warning        orange)
+                 (success        green)
+                 (vc-modified    orange)
+                 (vc-added       green)
+                 (vc-deleted     red)
+
+                 ;; These are extra color variables used only in this theme; i.e. they aren't
+                 ;; mandatory for derived themes.
+                 (modeline-fg              fg)
+                 (modeline-fg-alt          base5)
+                 (modeline-bg              (if doom-winter-is-coming-brighter-modeline
+                                               (doom-darken blue 0.45)
+                                             (doom-darken bg-alt 0.1)))
+                 (modeline-bg-alt          (if doom-winter-is-coming-brighter-modeline
+                                               (doom-darken blue 0.475)
+                                             `(,(doom-darken (car bg-alt) 0.15) ,@(cdr bg))))
+                 (modeline-bg-inactive     `(,(car bg-alt) ,@(cdr base1)))
+                 (modeline-bg-inactive-alt `(,(doom-darken (car bg-alt) 0.1) ,@(cdr bg)))
+
+                 (-modeline-pad
+                  (when doom-winter-is-coming-padded-modeline
+                    (if (integerp doom-winter-is-coming-padded-modeline) doom-winter-is-coming-padded-modeline 4))))
+
+
+  ;;;; Base theme face overrides
+                (((line-number &override) :foreground dark-blue)
+                 ((line-number-current-line &override) :foreground dark-blue)
+                 ((font-lock-comment-face &override)
+                  :background (if doom-winter-is-coming-comment-bg (doom-lighten bg 0.05) 'unspecified))
+                 (mode-line
+                  :background modeline-bg :foreground modeline-fg
+                  :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+                 (mode-line-inactive
+                  :background modeline-bg-inactive :foreground modeline-fg-alt
+                  :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+                 (mode-line-emphasis :foreground (if doom-winter-is-coming-brighter-modeline base8 highlight))
+
+                 (font-lock-comment-face
+                  :foreground (if doom-winter-is-coming-brighter-comments dark-cyan dark-blue)
+                  :inherit (if doom-winter-is-coming-no-italics nil 'italic))
+
+                 (font-lock-keyword-face
+                  :foreground cyan
+                  :inherit (if doom-winter-is-coming-no-italics nil 'italic))
+
+   ;;;; css-mode <built-in> / scss-mode
+                 (css-proprietary-property :foreground orange)
+                 (css-property             :foreground green)
+                 (css-selector             :foreground blue)
+   ;;;; doom-modeline
+                 (doom-modeline-bar :background (if doom-winter-is-coming-brighter-modeline modeline-bg highlight))
+                 (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+                 (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+                 (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   ;;;; elscreen
+                 (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; ivy
+                 (ivy-current-match :background dark-blue :distant-foreground base0 :weight 'normal)
+   ;;;; LaTeX-mode
+                 (font-latex-math-face :foreground green)
+   ;;;; markdown-mode
+                 (markdown-markup-face :foreground base5)
+                 (markdown-header-face :inherit 'bold :foreground red)
+                 ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; rjsx-mode
+                 (rjsx-tag :foreground red)
+                 (rjsx-attr :foreground orange)
+   ;;;; solaire-mode
+                 (solaire-mode-line-face
+                  :inherit 'mode-line
+                  :background modeline-bg-alt
+                  :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+                 (solaire-mode-line-inactive-face
+                  :inherit 'mode-line-inactive
+                  :background modeline-bg-inactive-alt
+                  :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt))))
+
+  ;;;; Base theme variable overrides-
+                ())
+
+;;; doom-winter-is-coming-dark-blue-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-winter-is-coming-light-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-winter-is-coming-light-theme.el
new file mode 100644
index 0000000..05a18f3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-winter-is-coming-light-theme.el
@@ -0,0 +1,197 @@
+;;; doom-winter-is-coming-light-theme.el --- Winter is Coming -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: Dec 6, 2023
+;; Author: Philip Arvidsson <https://github.com/philiparvidsson>
+;; Maintainer: Philip Arvidsson <https://github.com/philiparvidsson>
+;; Source: https://github.com/johnpapa/vscode-winteriscoming
+;;
+;;; Commentary:
+;;
+;; Everyone loves this theme, or at least Philip and a few other people.
+;;
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-winter-is-coming-light-theme nil
+  "Options for the `doom-winter-is-coming-light' theme."
+  :group 'doom-themes)
+
+(defcustom doom-winter-is-coming-no-italics nil
+  "If non-nil, no italics will be used."
+  :group 'doom-winter-is-coming-light-theme
+  :type 'boolean)
+
+(defcustom doom-winter-is-coming-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-winter-is-coming-light-theme
+  :type 'boolean)
+
+(defcustom doom-winter-is-coming-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-winter-is-coming-light-theme
+  :type 'boolean)
+
+(defcustom doom-winter-is-coming-comment-bg doom-winter-is-coming-brighter-comments
+  "If non-nil, comments will have a subtle highlight to enhance their
+legibility."
+  :group 'doom-winter-is-coming-light-theme
+  :type 'boolean)
+
+(defcustom doom-winter-is-coming-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-winter-is-coming-light-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-winter-is-coming-light
+                "Rip-off of Winter is Coming theme for VSCode."
+                :family 'doom-winter-is-coming
+                :background-mode 'light
+
+                ;; name        default   256           16
+                ((bg         '("#ffffff" "black"       "black"  ))
+                 (fg         '("#1857a4" "#bfbfbf"     "brightwhite"  ))
+
+                 ;; These are off-color variants of bg/fg, used primarily for `solaire-mode',
+                 ;; but can also be useful as a basis for subtle highlights (e.g. for hl-line
+                 ;; or region), especially when paired with the `doom-darken', `doom-lighten',
+                 ;; and `doom-blend' helper functions.
+                 (bg-alt     '("#eff2ef" "black"       "black"        ))
+                 (fg-alt     '("#236ebf" "#2d2d2d"     "white"        ))
+
+                 ;; These should represent a spectrum from bg to fg, where base0 is a starker
+                 ;; bg and base8 is a starker fg. For example, if bg is light grey and fg is
+                 ;; dark grey, base0 should be white and base8 should be black.
+                 (base0      '("#ffffff" "black"       "black"        ))
+                 (base1      '("#dee4eb" "#1e1e1e"     "brightblack"  ))
+                 (base2      '("#bec9d7" "#2e2e2e"     "brightblack"  ))
+                 (base3      '("#9fafc4" "#262626"     "brightblack"  ))
+                 (base4      '("#8195b0" "#3f3f3f"     "brightblack"  ))
+                 (base5      '("#637c9d" "#525252"     "brightblack"  ))
+                 (base6      '("#476389" "#6b6b6b"     "brightblack"  ))
+                 (base7      '("#2b4c76" "#979797"     "brightblack"  ))
+                 (base8      '("#0d3463" "#dfdfdf"     "white"        ))
+
+                 (grey       base4)
+                 (red        '("#ef5350" "#ff6655" "red"          ))
+                 (orange     '("#fa841d" "#dd8844" "brightred"    ))
+                 (green      '("#357b42" "#ff0000" "green"        ))
+                 (teal       '("#2b8c82" "#44b9b1" "brightgreen"  ))
+                 (yellow     '("#f7ecb5" "#ECBE7B" "yellow"       ))
+                 (blue       '("#2f86d2" "#51afef" "brightblue"   ))
+                 (dark-blue  '("#174781" "#2257A0" "blue"         ))
+                 (magenta    '("#dc3eb7" "#c678dd" "brightmagenta"))
+                 (violet     '("#a44185" "#a9a1e1" "magenta"      ))
+                 (cyan       '("#219fd5" "#46D9FF" "brightcyan"   ))
+                 (dark-cyan  '("#03648a" "#5699AF" "cyan"         ))
+
+                 ;; These are the "universal syntax classes" that doom-themes establishes.
+                 ;; These *must* be included in every doom themes, or your theme will throw an
+                 ;; error, as they are used in the base theme defined in doom-themes-base.
+                 (highlight      blue)
+                 (vertical-bar   (doom-lighten base1 0.1))
+                 (selection      yellow)
+                 (builtin        magenta)
+                 (comments       (if doom-winter-is-coming-brighter-comments green grey))
+                 (doc-comments   (doom-lighten (if doom-winter-is-coming-brighter-comments green teal) 0.25))
+                 (constants      blue)
+                 (functions      magenta)
+                 (keywords       cyan)
+                 (methods        blue)
+                 (operators      cyan)
+                 (type           magenta)
+                 (strings        violet)
+                 (variables      fg)
+                 (numbers        red)
+                 (region         `(,(doom-darken (car bg-alt) 0.15) ,@(doom-darken (cdr base1) 0.35)))
+                 (error          red)
+                 (warning        orange)
+                 (success        green)
+                 (vc-modified    orange)
+                 (vc-added       green)
+                 (vc-deleted     red)
+
+                 ;; These are extra color variables used only in this theme; i.e. they aren't
+                 ;; mandatory for derived themes.
+                 (modeline-fg              fg)
+                 (modeline-fg-alt          base5)
+                 (modeline-bg              (if doom-winter-is-coming-brighter-modeline
+                                               (doom-darken blue 0.45)
+                                             bg-alt))
+                 (modeline-bg-alt          (if doom-winter-is-coming-brighter-modeline
+                                               (doom-darken blue 0.475)
+                                             `(,(doom-darken (car bg) 0.05) ,@(cdr bg))))
+                 (modeline-bg-inactive     `(,(car bg-alt) ,@(cdr base1)))
+                 (modeline-bg-inactive-alt `(,(doom-darken (car bg-alt) 0.05) ,@(cdr bg)))
+
+                 (-modeline-pad
+                  (when doom-winter-is-coming-padded-modeline
+                    (if (integerp doom-winter-is-coming-padded-modeline) doom-winter-is-coming-padded-modeline 4))))
+
+
+  ;;;; Base theme face overrides
+                (((line-number &override) :foreground (doom-darken bg 0.2))
+                 ((line-number-current-line &override) :foreground (doom-darken bg 0.2))
+                 ((font-lock-comment-face &override)
+                  :background (if doom-winter-is-coming-comment-bg (doom-darken bg 0.05) 'unspecified))
+                 (mode-line
+                  :background modeline-bg :foreground modeline-fg
+                  :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+                 (mode-line-inactive
+                  :background modeline-bg-inactive :foreground modeline-fg-alt
+                  :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+                 (mode-line-emphasis :foreground (if doom-winter-is-coming-brighter-modeline base8 highlight))
+
+                 (font-lock-comment-face
+                  :foreground (if doom-winter-is-coming-brighter-comments green grey)
+                  :inherit (if doom-winter-is-coming-no-italics nil 'italic))
+
+                 (font-lock-keyword-face
+                  :foreground cyan
+                  :inherit (if doom-winter-is-coming-no-italics nil 'italic))
+
+   ;;;; css-mode <built-in> / scss-mode
+                 (css-proprietary-property :foreground orange)
+                 (css-property             :foreground green)
+                 (css-selector             :foreground blue)
+   ;;;; doom-modeline
+                 (doom-modeline-bar :background (if doom-winter-is-coming-brighter-modeline modeline-bg highlight))
+                 (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+                 (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+                 (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   ;;;; elscreen
+                 (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; ivy
+                 (ivy-current-match :background dark-blue :distant-foreground base0 :weight 'normal)
+   ;;;; LaTeX-mode
+                 (font-latex-math-face :foreground green)
+   ;;;; markdown-mode
+                 (markdown-markup-face :foreground base5)
+                 (markdown-header-face :inherit 'bold :foreground red)
+                 ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; rjsx-mode
+                 (rjsx-tag :foreground red)
+                 (rjsx-attr :foreground orange)
+   ;;;; solaire-mode
+                 (solaire-mode-line-face
+                  :inherit 'mode-line
+                  :background modeline-bg-alt
+                  :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+                 (solaire-mode-line-inactive-face
+                  :inherit 'mode-line-inactive
+                  :background modeline-bg-inactive-alt
+                  :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-alt))))
+
+  ;;;; Base theme variable overrides-
+                ())
+
+;;; doom-winter-is-coming-light-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-xcode-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-xcode-theme.el
new file mode 100644
index 0000000..8d0511a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-xcode-theme.el
@@ -0,0 +1,128 @@
+;;; doom-xcode-theme.el --- based off of Apple's Xcode Dark Theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: February 28, 2020 (#414)
+;; Author: kadenbarlow <https://github.com/kadenbarlow>
+;; Maintainer:
+;; Source: Xcode.app
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-xcode-theme nil
+  "Options for the `doom-xcode' theme."
+  :group 'doom-themes)
+
+(defcustom doom-xcode-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-xcode-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-xcode
+  "A theme based off of the Xcode Dark Theme"
+
+  ;; name        gui       256       16
+  ((bg         '("#292A30" nil       nil          ))
+   (bg-alt     '("#252629" nil       nil          ))
+   (base0      '("#0d0d0d" "black"   "black"      ))
+   (base1      '("#1b1b1b" "#1b1b1b"              ))
+   (base2      '("#212122" "#1e1e1e"              ))
+   (base3      '("#292b2b" "#292929" "brightblack"))
+   (base4      '("#3f4040" "#3f3f3f" "brightblack"))
+   (base5      '("#5c5e5e" "#525252" "brightblack"))
+   (base6      '("#757878" "#6b6b6b" "brightblack"))
+   (base7      '("#969896" "#979797" "brightblack"))
+   (base8      '("#ffffff" "#ffffff" "white"      ))
+   (fg         '("#FFFFFF" "#ffffff" "white"))
+   (fg-alt     (doom-darken fg 0.4))
+
+   (red        '("#FC6A5D" "#FC6A5D" "red"))
+   (orange     '("#FD8F3F" "#FD8F3F" "orange"))
+   (yellow     '("#D0BF68" "#D0BF68" "yellow"))
+   (green      '("#67B7A4" "#67B7A4" "green"))
+   (blue       '("#5DD8FF" "#5DD8FF" "brightblue"))
+   (teal       '("#59B0CF" "#59B0CF" "brightblue"))
+   (magenta    '("#D0A8FF" "#D0A8FF" "magenta"))
+   (cyan       '("#8abeb7" "#8abeb7" "cyan"))
+   (dark-cyan  (doom-darken cyan 0.4))
+
+
+   (grey       '("#6C7986" "#6C7986" "brightblack"))
+   (light-green'("#9EF1DD" "#9EF1DD" "lightgreen"))
+   (violet     '("#A167E6" "#A167E6" "brightmagenta"))
+   (dark-blue  '("#41A1C0" "#41A1C0" "darkblue"))
+   (pink       '("#FC5FA3" "#FC5FA3" "pink"))
+
+   ;; face categories
+   (highlight      blue)
+   (vertical-bar   `("#161616" ,@base0))
+   (selection      `(,(car (doom-lighten bg 0.1)) ,@(cdr base4)))
+   (builtin        light-green)
+   (comments       grey)
+   (doc-comments   (doom-lighten grey 0.14))
+   (constants      violet)
+   (functions      magenta)
+   (keywords       pink)
+   (methods        dark-blue)
+   (operators      orange)
+   (type           blue)
+   (strings        red)
+   (variables      dark-blue)
+   (numbers        yellow)
+   (region         selection)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    fg-alt)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (modeline-bg     `(,(doom-darken (car bg-alt) 0.3) ,@(cdr base3)))
+   (modeline-bg-alt `(,(car bg) ,@(cdr base1)))
+   (modeline-fg     base8)
+   (modeline-fg-alt comments)
+   (-modeline-pad
+    (when doom-xcode-padded-modeline
+      (if (integerp doom-xcode-padded-modeline)
+          doom-xcode-padded-modeline
+        4))))
+
+  ;; --- faces ------------------------------
+  (((font-lock-keyword-face &override) :weight 'bold)
+   ((line-number &override) :foreground base4)
+   ((line-number-current-line &override) :foreground orange :weight 'bold)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-alt :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-alt)))
+
+   ;;;; doom-modeline
+   (doom-modeline-buffer-path       :foreground dark-blue :bold bold)
+   (doom-modeline-buffer-major-mode :inherit 'doom-modeline-buffer-path)
+   ;;;; rainbow-delimiters
+   (rainbow-delimiters-depth-1-face :foreground yellow)
+   (rainbow-delimiters-depth-2-face :foreground blue)
+   (rainbow-delimiters-depth-3-face :foreground orange)
+   (rainbow-delimiters-depth-4-face :foreground green)
+   (rainbow-delimiters-depth-5-face :foreground magenta)
+   (rainbow-delimiters-depth-6-face :foreground violet)
+   (rainbow-delimiters-depth-7-face :foreground teal))
+
+  ;; --- variables --------------------------
+  ;; ()
+  )
+
+;;; doom-xcode-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-zenburn-theme.el b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-zenburn-theme.el
new file mode 100644
index 0000000..a904162
--- /dev/null
+++ b/emacs/.emacs.d/elpa/doom-themes-20260821.1111/doom-zenburn-theme.el
@@ -0,0 +1,356 @@
+;;; doom-zenburn-theme.el --- port of the popular Zenburn theme -*- lexical-binding: t; no-byte-compile: t; -*-
+;;
+;; Added: April 26, 2020 (#447)
+;; Author: jsoa <https://github.com/jsoa>
+;; Maintainer:
+;; Source: https://github.com/bbatsov/zenburn-emacs
+;;
+;;; Commentary:
+;;; Code:
+
+(require 'doom-themes)
+
+
+;;
+;;; Variables
+
+(defgroup doom-zenburn-theme nil
+  "Options for the `doom-zenburn' theme."
+  :group 'doom-themes)
+
+(defcustom doom-zenburn-brighter-modeline nil
+  "If non-nil, more vivid colors will be used to style the mode-line."
+  :group 'doom-zenburn-theme
+  :type 'boolean)
+
+(defcustom doom-zenburn-brighter-comments nil
+  "If non-nil, comments will be highlighted in more vivid colors."
+  :group 'doom-zenburn-theme
+  :type 'boolean)
+
+(defcustom doom-zenburn-comment-bg doom-zenburn-brighter-comments
+  "If non-nil, comments will have a subtle, darker background.
+Enhances their legibility."
+  :group 'doom-zenburn-theme
+  :type 'boolean)
+
+(defcustom doom-zenburn-padded-modeline doom-themes-padded-modeline
+  "If non-nil, adds a 4px padding to the mode-line.
+Can be an integer to determine the exact padding."
+  :group 'doom-zenburn-theme
+  :type '(choice integer boolean))
+
+
+;;
+;;; Theme definition
+
+(def-doom-theme doom-zenburn
+  "An implementation of the popular Zenburn theme."
+
+  ;; name        default   256       16
+  ((bg         '("#3F3F3F" nil       nil            )) ;; zenburn-bg
+   (bg-alt     '("#383838" nil       nil            )) ;; zenburn-bg-05
+   (base0      '("#000000" "black"   "black"        )) ;; zenburn-bg-2
+   (base1      '("#2B2B2B" "#1e1e1e" "brightblack"  )) ;; zenburn-bg-1
+   (base2      '("#303030" "#2e2e2e" "brightblack"  )) ;; zenburn-bg-08
+   (base3      '("#383838" "#262626" "brightblack"  )) ;; zenburn-bg-05
+   (base4      '("#494949" "#3f3f3f" "brightblack"  )) ;; zenburn-bg+05
+   (base5      '("#4F4F4F" "#525252" "brightblack"  )) ;; zenburn-bg+1
+   (base6      '("#5F5F5F" "#6b6b6b" "brightblack"  )) ;; zenburn-bg+2
+   (base7      '("#6F6F6F" "#979797" "brightblack"  )) ;; zenburn-bg+3
+   (base8      '("#FFFFEF" "#dfdfdf" "white"        )) ;; zenburn-fg+1
+   (fg         '("#DCDCDC" "#bfbfbf" "brightwhite"  )) ;; zenburn-fg
+   (fg-alt     '("#989890" "#2d2d2d" "white"        )) ;; zenburn-fg-05
+
+   (grey       base4)
+   (red        '("#CC9393" "#ff6655" "red"          )) ;; zenburn-red
+   (orange     '("#DFAF8F" "#dd8844" "brightred"    )) ;; zenburn-orange
+   (green      '("#7F9F7F" "#99bb66" "green"        )) ;; zenburn-green
+   (teal       '("#4db5bd" "#44b9b1" "brightgreen"  )) ;; zenburn-??
+   (yellow     '("#F0DFAF" "#ECBE7B" "yellow"       )) ;; zenburn-yellow
+   (blue       '("#8CD0D3" "#51afef" "brightblue"   )) ;; zenburn-blue
+   (dark-blue  '("#2257A0" "#2257A0" "blue"         )) ;; zenburn-??
+   (magenta    '("#DC8CC3" "#c678dd" "brightmagenta")) ;; zenburn-magenta
+   (violet     '("#a9a1e1" "#a9a1e1" "magenta"      )) ;; zendurn-??
+   (cyan       '("#93E0E3" "#46D9FF" "brightcyan"   )) ;; zenburn-cyan
+   (dark-cyan  '("#5699AF" "#5699AF" "cyan"         )) ;; zenburn-??
+
+   ;; Extra zenburn colors
+   (fg-1       '("#656555"))
+   (fg+2       '("#FFFFFD"))
+   (red-4      '("#8C5353"))
+   (red-1      '("#BC8383"))
+   (red+1      '("#DCA3A3"))
+   (yellow-2   '("#D0BF8F"))
+   (yellow-1   '("#E0CF9F"))
+   (green-2    '("#5F7F5F"))
+   (green+1    '("#8FB28F"))
+   (green+2    '("#9FC59F"))
+   (green+3    '("#AFD8AF"))
+   (green+4    '("#BFEBBF"))
+   (blue+1     '("#94BFF3"))
+   (blue-1     '("#7CB8BB"))
+   (blue-2     '("#6CA0A3"))
+   (blue-3     '("#5C888B"))
+   (blue-4     '("#4C7073"))
+   (blue-5     '("#366060"))
+
+   ;; face categories -- required for all themes
+   (highlight      blue)
+   (vertical-bar   (doom-darken base1 0.1))
+   (selection      dark-blue)
+   (builtin        fg)
+   (comments       green)
+   (doc-comments   green+2)
+   (constants      green+4)
+   (functions      cyan)
+   (keywords       yellow)
+   (methods        cyan)
+   (operators      blue)
+   (type           blue-1)
+   (strings        red)
+   (variables      orange)
+   (numbers        fg)
+   (region         base1)
+   (error          red)
+   (warning        yellow)
+   (success        green)
+   (vc-modified    orange)
+   (vc-added       green)
+   (vc-deleted     red)
+
+   ;; custom categories
+   (hidden     `(,(car bg) "black" "black"))
+   (-modeline-bright doom-zenburn-brighter-modeline)
+   (-modeline-pad
+    (when doom-zenburn-padded-modeline
+      (if (integerp doom-zenburn-padded-modeline) doom-zenburn-padded-modeline 4)))
+
+   (modeline-fg     green+1)
+   (modeline-fg-alt `(,(car fg-alt) ,@(cdr base6)))
+
+   (modeline-bg
+    (if -modeline-bright
+        (doom-darken blue 0.475)
+      base1))
+   (modeline-bg-l
+    (if -modeline-bright
+        (doom-darken blue 0.45)
+      bg))
+   (modeline-bg-inactive   `(,(doom-lighten (car modeline-bg) 0.05) ,@(cdr base1)))
+   (modeline-bg-inactive-l `(,(car bg-alt) ,@(cdr base1))))
+
+
+  ;;;; Base theme face overrides
+  ((cursor :foreground fg :background base8)
+   (escape-glyph :foreground yellow :weight 'bold)
+   (font-lock-builtin-face :foreground fg :weight 'bold)
+   (font-lock-comment-delimiter-face :foreground green-2)
+   ((font-lock-comment-face &override)
+    :background (if doom-zenburn-comment-bg (doom-lighten bg 0.05) 'unspecified))
+   (font-lock-constant-face :foreground green+4)
+   (font-lock-doc-face :foreground green+2)
+   (font-lock-type-face :foreground blue-1)
+   (font-lock-warning-face :foreground yellow-1 :weight 'bold)
+   (font-lock-keyword-face :foreground yellow :weight 'bold)
+   (highlight :background base4)
+   (isearch :foreground yellow-2 :weight 'bold :background base6)
+   (isearch-fail :foreground fg :background red-4)
+   (lazy-highlight :foreground yellow-2 :weight 'bold :background base3)
+   ((line-number &override) :foreground base7)
+   ((line-number-current-line &override) :foreground yellow-2)
+   (link :foreground yellow-2 :underline t :weight 'bold)
+   (minibuffer-prompt :foreground yellow)
+   (mode-line
+    :background modeline-bg :foreground modeline-fg
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg)))
+   (mode-line-inactive
+    :background modeline-bg-inactive :foreground modeline-fg-alt
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive)))
+   (mode-line-emphasis :foreground (if -modeline-bright base8 highlight))
+   (success :foreground green :weight 'bold)
+   (tooltip :foreground fg :background base5)
+   (vertical-border :foreground fg-1) ;; different
+   (warning :foreground orange :weight 'bold)
+   (widget-field :foreground fg :background base7)
+
+   ;;;; compilation
+   (compilation-error-face :inherit error :underline t)
+   (compilation-info :foreground blue)
+   (compilation-line-number :foreground yellow)
+   (compilation-warning-face :foreground yellow)
+   (compilation-mode-line-exit :foreground green+2 :weight 'bold)
+   ;;;; calfw
+   (cfw:face-default-content :foreground green)
+   (cfw:face-disable :foreground fg-1)
+   (cfw:face :inherit 'shadow)
+   (cfw:face :inherit 'font-lock-keyword-face)
+   (cfw:face-sunday :foreground red :weight 'bold)
+   (cfw:face :inherit 'cfw:face-sunday)
+   (cfw:face-periods :foreground cyan)
+   (cfw:face-select :background blue-5)
+   (cfw:face-saturday :foreground blue :weight 'bold)
+   (cfw:face-select :background blue-5)
+   (cfw:face-title :height 2.0 :inherit '(variable-pitch font-lock-keyword-face))
+   (cfw:face-today :foreground cyan :weight 'bold)
+   (cfw:face-toolbar-button-off :underline nil :inherit 'link)
+   (cfw:face-toolbar-button-on :underline nil :inherit 'link-visited)
+   ;;;; company
+   (company-tooltip-selection  :background base6)
+   (company-scrollbar-fg       :background base7)
+   (company-tooltip-annotation :foreground green :distant-foreground green)
+   ;;;; centaur-tabs
+   (centaur-tabs-selected :background bg :foreground fg+2)
+   (centaur-tabs-unselected :background base1 :foreground fg-alt)
+   (centaur-tabs-selected-modified :background bg :foreground orange)
+   (centaur-tabs-unselected-modified :background base1 :foreground orange)
+   (centaur-tabs-active-bar-face :background yellow)
+   (centaur-tabs-modified-marker-selected :inherit 'centaur-tabs-selected-modified :foreground yellow)
+   (centaur-tabs-modified-marker-unselected :inherit 'centaur-tabs-unselected-modified :foreground yellow)
+   ;;;; css-mode <built-in> / scss-mode
+   (css-proprietary-property :foreground orange)
+   (css-property             :foreground green)
+   (css-selector             :foreground blue)
+   ;;;; custom
+   (custom-variable-tag :foreground blue :weight 'bold)
+   (custom-group-tag :foreground blue :weight 'bold)
+   (custom-state :foreground green+4)
+   ;;;; diff-hl
+   (diff-hl-change :foreground blue :background blue-2)
+   (diff-hl-delete :foreground red+1 :background red-1)
+   (diff-hl-insert :foreground green+1 :background green-2)
+   ;;;; doom-modeline
+   (doom-modeline-bar :background yellow)
+   (doom-modeline-buffer-file :inherit 'mode-line-buffer-id :weight 'bold)
+   (doom-modeline-buffer-path :inherit 'mode-line-emphasis :weight 'bold)
+   (doom-modeline-buffer-project-root :foreground green :weight 'bold)
+   ;;;; elscreen
+   (elscreen-tab-other-screen-face :background "#353a42" :foreground "#1e2022")
+   ;;;; fill-column
+   (fill-column-indicator :foreground base4 :weight 'semilight)
+   ;;;; flycheck
+   (flycheck-error :underline `(:style wave :color ,red-1) :weight 'bold)
+   (flycheck-warning :underline `(:style wave :color ,yellow) :weight 'bold)
+   (flycheck-info :underline `(:style wave :color ,cyan) :weight 'bold)
+   ;;;; git-commit
+   (git-commit-comment-action :foreground green+1 :weight 'bold)
+   (git-commit-comment-branch :foreground blue+1 :weight 'bold)
+   (git-commit-comment-branch-local :foreground blue+1 :weight 'bold)
+   ;;;; git-gutter
+   (git-gutter:added :foreground green :weight 'bold)
+   (git-gutter:deleted :foreground red :weight 'bold)
+   (git-gutter:modified :foreground magenta :weight 'bold)
+   ;;;; hi-lock
+   (hi-green :background green+4 :background base1)
+   (hi-green-b :foreground green+2 :weight 'bold)
+   ;;;; highlight-symbol
+   (highlight-symbol-face :background base6)
+   ;;;; highlight-thing
+   (highlight-thing :background base6)
+   ;;;; helm
+   (helm-header :foreground yellow :background base1 :weight 'bold :extend t)
+   (helm-source-header :foreground yellow :background base1 :weight 'bold :extend t)
+   (helm-selection :background base5)
+   (helm-selection-line :background base5)
+   (helm-visible-mark :foreground bg :background yellow-2)
+   (helm-candidate-number :foreground green+4 :background base1)
+   (helm-separator :foreground red :background bg)
+   (helm-time-zone-current :foreground green+2 :background bg)
+   (helm-time-zone-home :foreground red :background bg)
+   (helm-buffer-not-saved :foreground red :background bg)
+   (helm-buffer-process :foreground cyan :background bg)
+   (helm-buffer-saved-out :foreground fg :background bg)
+   (helm-buffer-size :foreground fg-1 :background bg)
+   (helm-ff-directory :foreground cyan :weight 'bold)
+   (helm-ff-executable :foreground green+2 :background bg :weight 'normal)
+   (helm-ff-invalid-symlink :foreground red :background bg :weight 'bold)
+   (helm-ff-symlink :foreground yellow :background bg :weight 'bold)
+   (helm-ff-prefix :foreground bg :background yellow :weight 'normal)
+   (helm-grep-cmd-line :foreground cyan :background bg)
+   (helm-grep-file :foreground fg :background bg)
+   (helm-grep-finish :foreground green+2 :background bg)
+   (helm-grep-lineno :foreground fg-1 :background bg)
+   (helm-grep-match :foreground 'nil :background 'nil :inherit 'helm-match)
+   (helm-grep-running :foreground red :background bg)
+   (helm-match :foreground orange :background base1 :weight 'bold)
+   (helm-swoop-target-line-face :foreground fg :background base6)
+   (helm-swoop-target-word-face :foreground yellow :background base6 :weight 'bold)
+   ;;;; ivy
+   (ivy-current-match :background bg-alt :weight 'bold)
+   (ivy-minibuffer-match-face-2 :foreground green+4 :weight 'bold)
+   ;;;; js2-mode
+   (js2-jsdoc-tag :foreground green-2)
+   (js2-jsdoc-type :foreground green+2)
+   (js2-jsdoc-value :foreground green+3)
+   (js2-exernal-variable :foreground orange)
+   (js2-instance-member :foreground green-2)
+   (js2-jsdoc-html-tag-delimiter :foreground orange)
+   (js2-jsdoc-html-tag-name :foreground red-1)
+   (js2-object-property :foreground blue+1)
+   (js2-magic-paren :foreground blue-5)
+   (js2-private-function-call :foreground cyan)
+   (js2-function-call :foreground cyan)
+   (js2-private-member :foreground blue-1)
+   (js2-keywords :foreground magenta)
+   ;;;; lui
+   (lui-time-stampe-face :foreground blue-1)
+   (lui-hilight-face :foreground green+2 :background bg)
+   (lui-button-face :inherit 'hover-highlight)
+   ;;;; markdown-mode
+   (markdown-markup-face :foreground base5)
+   (markdown-header-face :inherit 'bold :foreground red)
+   ((markdown-code-face &override) :background (doom-lighten base3 0.05))
+   ;;;; mic-paren
+   (paren-face-match    :foreground cyan :background bg :weight 'bold)
+   (paren-face-mismatch :foreground bg :background magenta :weight 'bold)
+   (paren-face-no-match :foreground bg :background red :weight 'bold)
+   ;;;; minibuffer
+   (completion-annotations :foreground fg-1)
+   ;;;; outline <built-in>
+   (outline-1 :foreground orange)
+   (outline-2 :foreground green+4)
+   (outline-3 :foreground blue-1)
+   (outline-4 :foreground yellow-2)
+   (outline-5 :foreground cyan)
+   (outline-6 :foreground green+2)
+   (outline-7 :foreground red-4)
+   (outline-8 :foreground blue-4)
+   ;;;; rpm-model
+   (rpm-doc-face :foreground green)
+   (rpm-ghost-face :foreground red)
+   (rpm-package-face :foreground red)
+   (rpm-package-section-face :foreground yellow)
+   ;;;; rst-mode <built-in>
+   (rst-level-1-face :foreground orange)
+   (rst-level-2-face :foreground green+1)
+   (rst-level-3-face :foreground blue-1)
+   (rst-level-4-face :foreground yellow-2)
+   (rst-level-5-face :foreground cyan)
+   (rst-level-6-face :foreground green-2)
+   ;;;; solaire-mode
+   (solaire-default-face :inherit 'default :background base2)
+   (solaire-hl-line-face :inherit 'hl-line :background bg)
+   (solaire-minibuffer-face :inherit 'default :background base2)
+   (solaire-mode-line-face
+    :inherit 'mode-line
+    :background modeline-bg-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-l)))
+   (solaire-mode-line-inactive-face
+    :inherit 'mode-line-inactive
+    :background modeline-bg-inactive-l
+    :box (if -modeline-pad `(:line-width ,-modeline-pad :color ,modeline-bg-inactive-l)))
+   ;;;; web-mode
+   (web-mode-html-attr-name-face :foreground orange)
+   (web-mode-css-pseudo-class-face :foreground green+3 :weight 'bold)
+   (web-mode-css-at-rule-face :foreground orange )
+   (web-mode-function-name-face :foreground blue)
+   (web-mode-html-attr-value-face :inherit 'font-lock-string-face)
+   (web-mode-whitespaces-face :background red)
+   ;;;; woman <built-in>
+   (woman :inherit 'font-lock-keyword-face)
+   (woman :inherit 'font-lock-string-face italic))
+
+  ;;;; Base theme variable overrides-
+  ())
+
+;;; doom-zenburn-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs-autoloads.el b/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs-autoloads.el
new file mode 100644
index 0000000..539a8b3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs-autoloads.el
@@ -0,0 +1,69 @@
+;;; elisp-refs-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from elisp-refs.el
+
+(autoload 'elisp-refs-function "elisp-refs" "\
+Display all the references to function SYMBOL, in all loaded
+elisp files.
+
+If called with a prefix, prompt for a directory to limit the search.
+
+This searches for functions, not macros. For that, see
+`elisp-refs-macro'.
+
+(fn SYMBOL &optional PATH-PREFIX)" t)
+(autoload 'elisp-refs-macro "elisp-refs" "\
+Display all the references to macro SYMBOL, in all loaded
+elisp files.
+
+If called with a prefix, prompt for a directory to limit the search.
+
+This searches for macros, not functions. For that, see
+`elisp-refs-function'.
+
+(fn SYMBOL &optional PATH-PREFIX)" t)
+(autoload 'elisp-refs-special "elisp-refs" "\
+Display all the references to special form SYMBOL, in all loaded
+elisp files.
+
+If called with a prefix, prompt for a directory to limit the search.
+
+(fn SYMBOL &optional PATH-PREFIX)" t)
+(autoload 'elisp-refs-variable "elisp-refs" "\
+Display all the references to variable SYMBOL, in all loaded
+elisp files.
+
+If called with a prefix, prompt for a directory to limit the search.
+
+(fn SYMBOL &optional PATH-PREFIX)" t)
+(autoload 'elisp-refs-symbol "elisp-refs" "\
+Display all the references to SYMBOL in all loaded elisp files.
+
+If called with a prefix, prompt for a directory to limit the
+search.
+
+(fn SYMBOL &optional PATH-PREFIX)" t)
+(register-definition-prefixes "elisp-refs" '("elisp-"))
+
+;;; End of scraped data
+
+(provide 'elisp-refs-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; elisp-refs-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs-pkg.el b/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs-pkg.el
new file mode 100644
index 0000000..68c1f5d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs-pkg.el
@@ -0,0 +1,11 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "elisp-refs" "20230920.201"
+  "Find callers of elisp functions or macros."
+  '((dash "2.12.0")
+    (s    "1.11.0"))
+  :url "https://github.com/Wilfred/elisp-refs"
+  :commit "541a064c3ce27867872cf708354a65d83baf2a6d"
+  :revdesc "541a064c3ce2"
+  :keywords '("lisp")
+  :authors '(("Wilfred Hughes" . "me@wilfred.me.uk"))
+  :maintainers '(("Wilfred Hughes" . "me@wilfred.me.uk")))
diff --git a/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs.el b/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs.el
new file mode 100644
index 0000000..fc42134
--- /dev/null
+++ b/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs.el
@@ -0,0 +1,914 @@
+;;; elisp-refs.el --- find callers of elisp functions or macros -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2016-2020  Wilfred Hughes <me@wilfred.me.uk>
+
+;; Author: Wilfred Hughes <me@wilfred.me.uk>
+;; Package-Version: 20230920.201
+;; Package-Revision: 541a064c3ce2
+;; Keywords: lisp
+;; Package-Requires: ((dash "2.12.0") (s "1.11.0"))
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; elisp-refs.el is an Emacs package for finding references to
+;; functions, macros or variables. Unlike a dumb text search,
+;; elisp-refs.el actually parses the code, so it's never confused by
+;; comments or `foo-bar' matching `foo'.
+;;
+;; See https://github.com/Wilfred/refs.el/blob/master/README.md for
+;; more information.
+
+;;; Code:
+
+(require 'dash)
+(require 's)
+(require 'format)
+(eval-when-compile (require 'cl-lib))
+
+(defvar symbols-with-pos-enabled)
+(declare-function symbol-with-pos-p nil (object))
+(declare-function symbol-with-pos-pos nil (ls))
+
+;;; Internal
+
+(defvar elisp-refs-verbose t)
+
+(defun elisp-refs--format-int (integer)
+  "Format INTEGER as a string, with , separating thousands."
+  (let ((number (abs integer))
+        (parts nil))
+    (while (> number 999)
+      (push (format "%03d" (mod number 1000))
+            parts)
+      (setq number (/ number 1000)))
+    (push (format "%d" number) parts)
+    (concat
+     (if (< integer 0) "-" "")
+     (s-join "," parts))))
+
+(defsubst elisp-refs--start-pos (end-pos)
+  "Find the start position of form ending at END-POS
+in the current buffer."
+  (let ((parse-sexp-ignore-comments t))
+    (scan-sexps end-pos -1)))
+
+(defun elisp-refs--sexp-positions (buffer start-pos end-pos)
+  "Return a list of start and end positions of all the sexps
+between START-POS and END-POS (inclusive) in BUFFER.
+
+Positions exclude quote characters, so given 'foo or `foo, we
+report the position of the symbol foo.
+
+Not recursive, so we don't consider subelements of nested sexps."
+  (let ((positions nil))
+    (with-current-buffer buffer
+      (condition-case _err
+          (catch 'done
+            (while t
+              (let* ((sexp-end-pos (let ((parse-sexp-ignore-comments t))
+                                     (scan-sexps start-pos 1))))
+                ;; If we've reached a sexp beyond the range requested,
+                ;; or if there are no sexps left, we're done.
+                (when (or (null sexp-end-pos) (> sexp-end-pos end-pos))
+                  (throw 'done nil))
+                ;; Otherwise, this sexp is in the range requested.
+                (push (list (elisp-refs--start-pos sexp-end-pos) sexp-end-pos)
+                      positions)
+                (setq start-pos sexp-end-pos))))
+        ;; Terminate when we see "Containing expression ends prematurely"
+        (scan-error nil)))
+    (nreverse positions)))
+
+(defun elisp-refs--read-buffer-form (symbols-with-pos)
+  "Read a form from the current buffer, starting at point.
+Returns a list:
+\(form form-start-pos form-end-pos symbol-positions read-start-pos)
+
+In Emacs 28 and earlier, SYMBOL-POSITIONS is a list of 0-indexed
+symbol positions relative to READ-START-POS, according to
+`read-symbol-positions-list'.
+
+In Emacs 29+, SYMBOL-POSITIONS is nil. If SYMBOLS-WITH-POS is
+non-nil, forms are read with `read-positioning-symbols'."
+  (let* ((read-with-symbol-positions t)
+         (read-start-pos (point))
+         (form (if (and symbols-with-pos (fboundp 'read-positioning-symbols))
+                   (read-positioning-symbols (current-buffer))
+                 (read (current-buffer))))
+         (symbols (if (boundp 'read-symbol-positions-list)
+                      read-symbol-positions-list
+                    nil))
+         (end-pos (point))
+         (start-pos (elisp-refs--start-pos end-pos)))
+    (list form start-pos end-pos symbols read-start-pos)))
+
+(defvar elisp-refs--path nil
+  "A buffer-local variable used by `elisp-refs--contents-buffer'.
+Internal implementation detail.")
+
+(defun elisp-refs--read-all-buffer-forms (buffer symbols-with-pos)
+  "Read all the forms in BUFFER, along with their positions."
+  (with-current-buffer buffer
+    (goto-char (point-min))
+    (let ((forms nil))
+      (condition-case err
+          (while t
+            (push (elisp-refs--read-buffer-form symbols-with-pos) forms))
+        (error
+         (if (or (equal (car err) 'end-of-file)
+                 ;; TODO: this shouldn't occur in valid elisp files,
+                 ;; but it's happening in helm-utils.el.
+                 (equal (car err) 'scan-error))
+             ;; Reached end of file, we're done.
+             (nreverse forms)
+           ;; Some unexpected error, propagate.
+           (error "Unexpected error whilst reading %s position %s: %s"
+                  (abbreviate-file-name elisp-refs--path) (point) err)))))))
+
+(defun elisp-refs--proper-list-p (val)
+  "Is VAL a proper list?"
+  (if (fboundp 'proper-list-p)
+      ;; `proper-list-p' was added in Emacs 27.1.
+      ;; http://git.savannah.gnu.org/cgit/emacs.git/commit/?id=2fde6275b69fd113e78243790bf112bbdd2fe2bf
+      (with-no-warnings (proper-list-p val))
+    ;; Earlier Emacs versions only had format-proper-list-p.
+    (with-no-warnings (format-proper-list-p val))))
+
+(defun elisp-refs--walk (buffer form start-pos end-pos symbol match-p &optional path)
+  "Walk FORM, a nested list, and return a list of sublists (with
+their positions) where MATCH-P returns t. FORM is traversed
+depth-first (pre-order traversal, left-to-right).
+
+MATCH-P is called with three arguments:
+\(SYMBOL CURRENT-FORM PATH).
+
+PATH is the first element of all the enclosing forms of
+CURRENT-FORM, innermost first, along with the index of the
+current form.
+
+For example if we are looking at h in (e f (g h)), PATH takes the
+value ((g . 1) (e . 2)).
+
+START-POS and END-POS should be the position of FORM within BUFFER."
+  (cond
+   ((funcall match-p symbol form path)
+    ;; If this form matches, just return it, along with the position.
+    (list (list form start-pos end-pos)))
+   ;; Otherwise, recurse on the subforms.
+   ((consp form)
+    (let ((matches nil)
+          ;; Find the positions of the subforms.
+          (subforms-positions
+           (if (eq (car-safe form) '\`)
+               ;; Kludge: `elisp-refs--sexp-positions' excludes the ` when
+               ;; calculating positions. So, to find the inner
+               ;; positions when walking from `(...) to (...), we
+               ;; don't need to increment the start position.
+               (cons nil (elisp-refs--sexp-positions buffer start-pos end-pos))
+             ;; Calculate the positions after the opening paren.
+             (elisp-refs--sexp-positions buffer (1+ start-pos) end-pos))))
+      ;; For each subform, recurse if it's a list, or a matching symbol.
+      (--each (-zip-pair form subforms-positions)
+        (-let [(subform subform-start subform-end) it]
+          (when (or
+                 (and (consp subform) (elisp-refs--proper-list-p subform))
+                 (and (symbolp subform) (eq subform symbol)))
+            (-when-let (subform-matches
+                        (elisp-refs--walk
+                         buffer subform
+                         subform-start subform-end
+                         symbol match-p
+                         (cons (cons (car-safe form) it-index) path)))
+              (push subform-matches matches)))))
+
+      ;; Concat the results from all the subforms.
+      (apply #'append (nreverse matches))))))
+
+;; TODO: condition-case (condition-case ... (error ...)) is not a call
+;; TODO: (cl-destructuring-bind (foo &rest bar) ...) is not a call
+;; TODO: letf, cl-letf, -let, -let*
+(defun elisp-refs--function-p (symbol form path)
+  "Return t if FORM looks like a function call to SYMBOL."
+  (cond
+   ((not (consp form))
+    nil)
+   ;; Ignore (defun _ (SYMBOL ...) ...)
+   ((or (equal (car path) '(defsubst . 2))
+        (equal (car path) '(defun . 2))
+        (equal (car path) '(defmacro . 2))
+        (equal (car path) '(cl-defun . 2)))
+    nil)
+   ;; Ignore (lambda (SYMBOL ...) ...)
+   ((equal (car path) '(lambda . 1))
+    nil)
+   ;; Ignore (let (SYMBOL ...) ...)
+   ;; and (let* (SYMBOL ...) ...)
+   ((or
+     (equal (car path) '(let . 1))
+     (equal (car path) '(let* . 1)))
+    nil)
+   ;; Ignore (let ((SYMBOL ...)) ...)
+   ((or
+     (equal (cl-second path) '(let . 1))
+     (equal (cl-second path) '(let* . 1)))
+    nil)
+   ;; Ignore (declare-function NAME  (ARGS...))
+   ((equal (car path) '(declare-function . 3))
+    nil)
+   ;; (SYMBOL ...)
+   ((eq (car form) symbol)
+    t)
+   ;; (foo ... #'SYMBOL ...)
+   ((--any-p (equal it (list 'function symbol)) form)
+    t)
+   ;; (funcall 'SYMBOL ...)
+   ((and (eq (car form) 'funcall)
+         (equal `',symbol (cl-second form)))
+    t)
+   ;; (apply 'SYMBOL ...)
+   ((and (eq (car form) 'apply)
+         (equal `',symbol (cl-second form)))
+    t)))
+
+(defun elisp-refs--macro-p (symbol form path)
+  "Return t if FORM looks like a macro call to SYMBOL."
+  (cond
+   ((not (consp form))
+    nil)
+   ;; Ignore (defun _ (SYMBOL ...) ...)
+   ((or (equal (car path) '(defsubst . 2))
+        (equal (car path) '(defun . 2))
+        (equal (car path) '(defmacro . 2)))
+    nil)
+   ;; Ignore (lambda (SYMBOL ...) ...)
+   ((equal (car path) '(lambda . 1))
+    nil)
+   ;; Ignore (let (SYMBOL ...) ...)
+   ;; and (let* (SYMBOL ...) ...)
+   ((or
+     (equal (car path) '(let . 1))
+     (equal (car path) '(let* . 1)))
+    nil)
+   ;; Ignore (let ((SYMBOL ...)) ...)
+   ((or
+     (equal (cl-second path) '(let . 1))
+     (equal (cl-second path) '(let* . 1)))
+    nil)
+   ;; (SYMBOL ...)
+   ((eq (car form) symbol)
+    t)))
+
+;; Looking for a special form is exactly the same as looking for a
+;; macro.
+(defalias 'elisp-refs--special-p 'elisp-refs--macro-p)
+
+(defun elisp-refs--variable-p (symbol form path)
+  "Return t if this looks like a variable reference to SYMBOL.
+We consider parameters to be variables too."
+  (cond
+   ((consp form)
+    nil)
+   ;; Ignore (defun _ (SYMBOL ...) ...)
+   ((or (equal (car path) '(defsubst . 1))
+        (equal (car path) '(defun . 1))
+        (equal (car path) '(defmacro . 1))
+        (equal (car path) '(cl-defun . 1)))
+    nil)
+   ;; (let (SYMBOL ...) ...) is a variable, not a function call.
+   ((or
+     (equal (cl-second path) '(let . 1))
+     (equal (cl-second path) '(let* . 1)))
+    t)
+   ;; (lambda (SYMBOL ...) ...) is a variable
+   ((equal (cl-second path) '(lambda . 1))
+    t)
+   ;; (let ((SYMBOL ...)) ...) is also a variable.
+   ((or
+     (equal (cl-third path) '(let . 1))
+     (equal (cl-third path) '(let* . 1)))
+    t)
+   ;; Ignore (SYMBOL ...) otherwise, we assume it's a function/macro
+   ;; call.
+   ((equal (car path) (cons symbol 0))
+    nil)
+   ((eq form symbol)
+    t)))
+
+;; TODO: benchmark building a list with `push' rather than using
+;; mapcat.
+(defun elisp-refs--read-and-find (buffer symbol match-p)
+  "Read all the forms in BUFFER, and return a list of all forms that
+contain SYMBOL where MATCH-P returns t.
+
+For every matching form found, we return the form itself along
+with its start and end position."
+  (-non-nil
+   (--mapcat
+    (-let [(form start-pos end-pos symbol-positions _read-start-pos) it]
+      ;; Optimisation: if we have a list of positions for the current
+      ;; form (Emacs 28 and earlier), and it doesn't contain the
+      ;; symbol we're looking for, don't bother walking the form.
+      (when (or (null symbol-positions) (assq symbol symbol-positions))
+        (elisp-refs--walk buffer form start-pos end-pos symbol match-p)))
+    (elisp-refs--read-all-buffer-forms buffer nil))))
+
+(defun elisp-refs--walk-positioned-symbols (forms symbol)
+  "Given a nested list of FORMS, return a list of all positions of SYMBOL.
+Assumes `symbol-with-pos-pos' is defined (Emacs 29+)."
+  (cond
+   ((symbol-with-pos-p forms)
+    (let ((symbols-with-pos-enabled t))
+      (if (eq forms symbol)
+          (list (list symbol
+                      (symbol-with-pos-pos forms)
+                      (+ (symbol-with-pos-pos forms) (length (symbol-name symbol))))))))
+   ((elisp-refs--proper-list-p forms)
+    ;; Proper list, use `--mapcat` to reduce how much we recurse.
+    (--mapcat (elisp-refs--walk-positioned-symbols it symbol) forms))
+   ((consp forms)
+    ;; Improper list, we have to recurse on head and tail.
+    (append (elisp-refs--walk-positioned-symbols (car forms) symbol)
+            (elisp-refs--walk-positioned-symbols (cdr forms) symbol)))
+   ((vectorp forms)
+    (--mapcat (elisp-refs--walk-positioned-symbols it symbol) forms))))
+
+(defun elisp-refs--read-and-find-symbol (buffer symbol)
+  "Read all the forms in BUFFER, and return a list of all
+positions of SYMBOL."
+  (let* ((symbols-with-pos (fboundp 'symbol-with-pos-pos))
+         (forms (elisp-refs--read-all-buffer-forms buffer symbols-with-pos)))
+
+    (if symbols-with-pos
+        (elisp-refs--walk-positioned-symbols forms symbol)
+      (-non-nil
+       (--mapcat
+        (-let [(_ _ _ symbol-positions read-start-pos) it]
+          (--map
+           (-let [(sym . offset) it]
+             (when (eq sym symbol)
+               (-let* ((start-pos (+ read-start-pos offset))
+                       (end-pos (+ start-pos (length (symbol-name sym)))))
+                 (list sym start-pos end-pos))))
+           symbol-positions))
+        forms)))))
+
+(defun elisp-refs--filter-obarray (pred)
+  "Return a list of all the items in `obarray' where PRED returns t."
+  (let (symbols)
+    (mapatoms (lambda (symbol)
+                (when (and (funcall pred symbol)
+                           (not (equal (symbol-name symbol) "")))
+                  (push symbol symbols))))
+    symbols))
+
+(defun elisp-refs--loaded-paths ()
+  "Return a list of all files that have been loaded in Emacs.
+Where the file was a .elc, return the path to the .el file instead."
+  (let ((elc-paths (-non-nil (mapcar #'-first-item load-history))))
+    (-non-nil
+     (--map
+      (let ((el-name (format "%s.el" (file-name-sans-extension it)))
+            (el-gz-name (format "%s.el.gz" (file-name-sans-extension it))))
+        (cond ((file-exists-p el-name) el-name)
+              ((file-exists-p el-gz-name) el-gz-name)
+              ;; Ignore files where we can't find a .el file.
+              (t nil)))
+      elc-paths))))
+
+(defun elisp-refs--contents-buffer (path)
+  "Read PATH into a disposable buffer, and return it.
+Works around the fact that Emacs won't allow multiple buffers
+visiting the same file."
+  (let ((fresh-buffer (generate-new-buffer (format " *refs-%s*" path)))
+        ;; Be defensive against users overriding encoding
+        ;; configurations (Helpful bugs #75 and #147).
+        (coding-system-for-read nil)
+        (file-name-handler-alist
+         '(("\\(?:\\.dz\\|\\.txz\\|\\.xz\\|\\.lzma\\|\\.lz\\|\\.g?z\\|\\.\\(?:tgz\\|svgz\\|sifz\\)\\|\\.tbz2?\\|\\.bz2\\|\\.Z\\)\\(?:~\\|\\.~[-[:alnum:]:#@^._]+\\(?:~[[:digit:]]+\\)?~\\)?\\'" .
+            jka-compr-handler)
+           ("\\(?:^/\\)\\(\\(?:\\(?:\\(-\\|[[:alnum:]]\\{2,\\}\\)\\(?::\\)\\(?:\\([^/:|[:blank:]]+\\)\\(?:@\\)\\)?\\(\\(?:[%._[:alnum:]-]+\\|\\(?:\\[\\)\\(?:\\(?:[[:alnum:]]*:\\)+[.[:alnum:]]*\\)?\\(?:]\\)\\)\\(?:\\(?:#\\)\\(?:[[:digit:]]+\\)\\)?\\)?\\)\\(?:|\\)\\)+\\)?\\(?:\\(-\\|[[:alnum:]]\\{2,\\}\\)\\(?::\\)\\(?:\\([^/:|[:blank:]]+\\)\\(?:@\\)\\)?\\(\\(?:[%._[:alnum:]-]+\\|\\(?:\\[\\)\\(?:\\(?:[[:alnum:]]*:\\)+[.[:alnum:]]*\\)?\\(?:]\\)\\)\\(?:\\(?:#\\)\\(?:[[:digit:]]+\\)\\)?\\)?\\)\\(?::\\)\\([^\n
]*\\'\\)" . tramp-file-name-handler)
+           ("\\`/:" . file-name-non-special))))
+    (with-current-buffer fresh-buffer
+      (setq-local elisp-refs--path path)
+      (insert-file-contents path)
+      ;; We don't enable emacs-lisp-mode because it slows down this
+      ;; function significantly. We just need the syntax table for
+      ;; scan-sexps to do the right thing with comments.
+      (set-syntax-table emacs-lisp-mode-syntax-table))
+    fresh-buffer))
+
+(defvar elisp-refs--highlighting-buffer
+  nil
+  "A temporary buffer used for highlighting.
+Since `elisp-refs--syntax-highlight' is a hot function, we
+don't want to create lots of temporary buffers.")
+
+(defun elisp-refs--syntax-highlight (str)
+  "Apply font-lock properties to a string STR of Emacs lisp code."
+  ;; Ensure we have a highlighting buffer to work with.
+  (unless (and elisp-refs--highlighting-buffer
+               (buffer-live-p elisp-refs--highlighting-buffer))
+    (setq elisp-refs--highlighting-buffer
+          (generate-new-buffer " *refs-highlighting*"))
+    (with-current-buffer elisp-refs--highlighting-buffer
+      (delay-mode-hooks (emacs-lisp-mode))))
+
+  (with-current-buffer elisp-refs--highlighting-buffer
+    (erase-buffer)
+    (insert str)
+    (if (fboundp 'font-lock-ensure)
+        (font-lock-ensure)
+      (with-no-warnings
+        (font-lock-fontify-buffer)))
+    (buffer-string)))
+
+(defun elisp-refs--replace-tabs (string)
+  "Replace tabs in STRING with spaces."
+  ;; This is important for unindenting, as we may unindent by less
+  ;; than one whole tab.
+  (s-replace "\t" (s-repeat tab-width " ") string))
+
+(defun elisp-refs--lines (string)
+  "Return a list of all the lines in STRING.
+'a\nb' -> ('a\n' 'b')"
+  (let ((lines nil))
+    (while (> (length string) 0)
+      (let ((index (s-index-of "\n" string)))
+        (if index
+            (progn
+              (push (substring string 0 (1+ index)) lines)
+              (setq string (substring string (1+ index))))
+          (push string lines)
+          (setq string ""))))
+    (nreverse lines)))
+
+(defun elisp-refs--map-lines (string fn)
+  "Execute FN for each line in string, and join the result together."
+  (let ((result nil))
+    (dolist (line (elisp-refs--lines string))
+      (push (funcall fn line) result))
+    (apply #'concat (nreverse result))))
+
+(defun elisp-refs--unindent-rigidly (string)
+  "Given an indented STRING, unindent rigidly until
+at least one line has no indent.
+
+STRING should have a 'elisp-refs-start-pos property. The returned
+string will have this property updated to reflect the unindent."
+  (let* ((lines (s-lines string))
+         ;; Get the leading whitespace for each line.
+         (indents (--map (car (s-match (rx bos (+ whitespace)) it))
+                         lines))
+         (min-indent (-min (--map (length it) indents))))
+    (propertize
+     (elisp-refs--map-lines
+      string
+      (lambda (line) (substring line min-indent)))
+     'elisp-refs-unindented min-indent)))
+
+(defun elisp-refs--containing-lines (buffer start-pos end-pos)
+  "Return a string, all the lines in BUFFER that are between
+START-POS and END-POS (inclusive).
+
+For the characters that are between START-POS and END-POS,
+propertize them."
+  (let (expanded-start-pos expanded-end-pos)
+    (with-current-buffer buffer
+      ;; Expand START-POS and END-POS to line boundaries.
+      (goto-char start-pos)
+      (beginning-of-line)
+      (setq expanded-start-pos (point))
+      (goto-char end-pos)
+      (end-of-line)
+      (setq expanded-end-pos (point))
+
+      ;; Extract the rest of the line before and after the section we're interested in.
+      (let* ((before-match (buffer-substring expanded-start-pos start-pos))
+             (after-match (buffer-substring end-pos expanded-end-pos))
+             ;; Concat the extra text with the actual match, ensuring we
+             ;; highlight the match as code, but highlight the rest as as
+             ;; comments.
+             (text (concat
+                    (propertize before-match
+                                'face 'font-lock-comment-face)
+                    (elisp-refs--syntax-highlight (buffer-substring start-pos end-pos))
+                    (propertize after-match
+                                'face 'font-lock-comment-face))))
+        (-> text
+          (elisp-refs--replace-tabs)
+          (elisp-refs--unindent-rigidly)
+          (propertize 'elisp-refs-start-pos expanded-start-pos
+                      'elisp-refs-path elisp-refs--path))))))
+
+(defun elisp-refs--find-file (button)
+  "Open the file referenced by BUTTON."
+  (find-file (button-get button 'path))
+  (goto-char (point-min)))
+
+(define-button-type 'elisp-refs-path-button
+  'action 'elisp-refs--find-file
+  'follow-link t
+  'help-echo "Open file")
+
+(defun elisp-refs--path-button (path)
+  "Return a button that navigates to PATH."
+  (with-temp-buffer
+    (insert-text-button
+     (abbreviate-file-name path)
+     :type 'elisp-refs-path-button
+     'path path)
+    (buffer-string)))
+
+(defun elisp-refs--describe (button)
+  "Show *Help* for the symbol referenced by BUTTON."
+  (let ((symbol (button-get button 'symbol))
+        (kind (button-get button 'kind)))
+    (cond ((eq kind 'symbol)
+           (describe-symbol symbol))
+          ((eq kind 'variable)
+           (describe-variable symbol))
+          (t
+           ;; Emacs uses `describe-function' for functions, macros and
+           ;; special forms.
+           (describe-function symbol)))))
+
+(define-button-type 'elisp-refs-describe-button
+  'action 'elisp-refs--describe
+  'follow-link t
+  'help-echo "Describe")
+
+(defun elisp-refs--describe-button (symbol kind)
+  "Return a button that shows *Help* for SYMBOL.
+KIND should be 'function, 'macro, 'variable, 'special or 'symbol."
+  (with-temp-buffer
+    (insert (symbol-name kind) " ")
+    (insert-text-button
+     (symbol-name symbol)
+     :type 'elisp-refs-describe-button
+     'symbol symbol
+     'kind kind)
+    (buffer-string)))
+
+(defun elisp-refs--pluralize (number thing)
+  "Human-friendly description of NUMBER occurrences of THING."
+  (format "%s %s%s"
+          (elisp-refs--format-int number)
+          thing
+          (if (equal number 1) "" "s")))
+
+(defun elisp-refs--format-count (symbol ref-count file-count
+                                        searched-file-count prefix)
+  (let* ((file-str (if (zerop file-count)
+                       ""
+                     (format " in %s" (elisp-refs--pluralize file-count "file"))))
+         (found-str (format "Found %s to %s%s."
+                            (elisp-refs--pluralize ref-count "reference")
+                            symbol
+                            file-str))
+         (searched-str (if prefix
+                           (format "Searched %s in %s."
+                                   (elisp-refs--pluralize searched-file-count "loaded file")
+                                   (elisp-refs--path-button (file-name-as-directory prefix)))
+                         (format "Searched all %s loaded in Emacs."
+                                 (elisp-refs--pluralize searched-file-count "file")))))
+    (s-word-wrap 70 (format "%s %s" found-str searched-str))))
+
+;; TODO: if we have multiple matches on one line, we repeatedly show
+;; that line. That's slightly confusing.
+(defun elisp-refs--show-results (symbol description results
+                                        searched-file-count prefix)
+  "Given a RESULTS list where each element takes the form \(forms . buffer\),
+render a friendly results buffer."
+  (let ((buf (get-buffer-create (format "*refs: %s*" symbol))))
+    (switch-to-buffer buf)
+    (let ((inhibit-read-only t))
+      (erase-buffer)
+      (save-excursion
+        ;; Insert the header.
+        (insert
+         (elisp-refs--format-count
+          description
+          (-sum (--map (length (car it)) results))
+          (length results)
+          searched-file-count
+          prefix)
+         "\n\n")
+        ;; Insert the results.
+        (--each results
+          (-let* (((forms . buf) it)
+                  (path (with-current-buffer buf elisp-refs--path)))
+            (insert
+             (propertize "File: " 'face 'bold)
+             (elisp-refs--path-button path) "\n")
+            (--each forms
+              (-let [(_ start-pos end-pos) it]
+                (insert (elisp-refs--containing-lines buf start-pos end-pos)
+                        "\n")))
+            (insert "\n")))
+        ;; Prepare the buffer for the user.
+        (elisp-refs-mode)))
+    ;; Cleanup buffers created when highlighting results.
+    (when elisp-refs--highlighting-buffer
+      (kill-buffer elisp-refs--highlighting-buffer))))
+
+(defun elisp-refs--loaded-bufs ()
+  "Return a list of open buffers, one for each path in `load-path'."
+  (mapcar #'elisp-refs--contents-buffer (elisp-refs--loaded-paths)))
+
+(defun elisp-refs--search-1 (bufs match-fn)
+  "Call MATCH-FN on each buffer in BUFS, reporting progress
+and accumulating results.
+
+BUFS should be disposable: we make no effort to preserve their
+state during searching.
+
+MATCH-FN should return a list where each element takes the form:
+\(form start-pos end-pos)."
+  (let* (;; Our benchmark suggests we spend a lot of time in GC, and
+         ;; performance improves if we GC less frequently.
+         (gc-cons-percentage 0.8)
+         (total-bufs (length bufs)))
+    (let ((searched 0)
+          (forms-and-bufs nil))
+      (dolist (buf bufs)
+        (let* ((matching-forms (funcall match-fn buf)))
+          ;; If there were any matches in this buffer, push the
+          ;; matches along with the buffer into our results
+          ;; list.
+          (when matching-forms
+            (push (cons matching-forms buf) forms-and-bufs))
+          ;; Give feedback to the user on our progress, because
+          ;; searching takes several seconds.
+          (when (and (zerop (mod searched 10))
+                     elisp-refs-verbose)
+            (message "Searched %s/%s files" searched total-bufs))
+          (cl-incf searched)))
+      (when elisp-refs-verbose
+        (message "Searched %s/%s files" total-bufs total-bufs))
+      forms-and-bufs)))
+
+(defun elisp-refs--search (symbol description match-fn &optional path-prefix)
+  "Find references to SYMBOL in all loaded files; call MATCH-FN on each buffer.
+When PATH-PREFIX, limit to loaded files whose path starts with that prefix.
+
+Display the results in a hyperlinked buffer.
+
+MATCH-FN should return a list where each element takes the form:
+\(form start-pos end-pos)."
+  (let* ((loaded-paths (elisp-refs--loaded-paths))
+         (matching-paths (if path-prefix
+                             (--filter (s-starts-with? path-prefix it) loaded-paths)
+                           loaded-paths))
+         (loaded-src-bufs (mapcar #'elisp-refs--contents-buffer matching-paths)))
+    ;; Use unwind-protect to ensure we always cleanup temporary
+    ;; buffers, even if the user hits C-g.
+    (unwind-protect
+        (progn
+          (let ((forms-and-bufs
+                 (elisp-refs--search-1 loaded-src-bufs match-fn)))
+            (elisp-refs--show-results symbol description forms-and-bufs
+                                      (length loaded-src-bufs) path-prefix)))
+      ;; Clean up temporary buffers.
+      (--each loaded-src-bufs (kill-buffer it)))))
+
+(defun elisp-refs--completing-read-symbol (prompt &optional filter)
+  "Read an interned symbol from the minibuffer,
+defaulting to the symbol at point. PROMPT is the string to prompt
+with.
+
+If FILTER is given, only offer symbols where (FILTER sym) returns
+t."
+  (let ((filter (or filter (lambda (_) t))))
+    (read
+     (completing-read prompt
+                      (elisp-refs--filter-obarray filter)
+                      nil nil nil nil
+                      (-if-let (sym (thing-at-point 'symbol))
+                          (when (funcall filter (read sym))
+                            sym))))))
+
+;;; Commands
+
+;;;###autoload
+(defun elisp-refs-function (symbol &optional path-prefix)
+  "Display all the references to function SYMBOL, in all loaded
+elisp files.
+
+If called with a prefix, prompt for a directory to limit the search.
+
+This searches for functions, not macros. For that, see
+`elisp-refs-macro'."
+  (interactive
+   (list (elisp-refs--completing-read-symbol "Function: " #'functionp)
+         (when current-prefix-arg
+           (read-directory-name "Limit search to loaded files in: "))))
+  (when (not (functionp symbol))
+    (if (macrop symbol)
+        (user-error "%s is a macro. Did you mean elisp-refs-macro?"
+                    symbol)
+      (user-error "%s is not a function. Did you mean elisp-refs-symbol?"
+                  symbol)))
+  (elisp-refs--search symbol
+                      (elisp-refs--describe-button symbol 'function)
+                      (lambda (buf)
+                        (elisp-refs--read-and-find buf symbol #'elisp-refs--function-p))
+                      path-prefix))
+
+;;;###autoload
+(defun elisp-refs-macro (symbol &optional path-prefix)
+  "Display all the references to macro SYMBOL, in all loaded
+elisp files.
+
+If called with a prefix, prompt for a directory to limit the search.
+
+This searches for macros, not functions. For that, see
+`elisp-refs-function'."
+  (interactive
+   (list (elisp-refs--completing-read-symbol "Macro: " #'macrop)
+         (when current-prefix-arg
+           (read-directory-name "Limit search to loaded files in: "))))
+  (when (not (macrop symbol))
+    (if (functionp symbol)
+        (user-error "%s is a function. Did you mean elisp-refs-function?"
+                    symbol)
+      (user-error "%s is not a function. Did you mean elisp-refs-symbol?"
+                  symbol)))
+  (elisp-refs--search symbol
+                      (elisp-refs--describe-button symbol 'macro)
+                      (lambda (buf)
+                        (elisp-refs--read-and-find buf symbol #'elisp-refs--macro-p))
+                      path-prefix))
+
+;;;###autoload
+(defun elisp-refs-special (symbol &optional path-prefix)
+  "Display all the references to special form SYMBOL, in all loaded
+elisp files.
+
+If called with a prefix, prompt for a directory to limit the search."
+  (interactive
+   (list (elisp-refs--completing-read-symbol "Special form: " #'special-form-p)
+         (when current-prefix-arg
+           (read-directory-name "Limit search to loaded files in: "))))
+  (elisp-refs--search symbol
+                      (elisp-refs--describe-button symbol 'special-form)
+                      (lambda (buf)
+                        (elisp-refs--read-and-find buf symbol #'elisp-refs--special-p))
+                      path-prefix))
+
+;;;###autoload
+(defun elisp-refs-variable (symbol &optional path-prefix)
+  "Display all the references to variable SYMBOL, in all loaded
+elisp files.
+
+If called with a prefix, prompt for a directory to limit the search."
+  (interactive
+   ;; This is awkward. We don't want to just offer defvar variables,
+   ;; because then we can't search for code which uses `let' to bind
+   ;; symbols. There doesn't seem to be a good way to only offer
+   ;; variables that have been bound at some point.
+   (list (elisp-refs--completing-read-symbol "Variable: " )
+         (when current-prefix-arg
+           (read-directory-name "Limit search to loaded files in: "))))
+  (elisp-refs--search symbol
+                      (elisp-refs--describe-button symbol 'variable)
+                      (lambda (buf)
+                        (elisp-refs--read-and-find buf symbol #'elisp-refs--variable-p))
+                      path-prefix))
+
+;;;###autoload
+(defun elisp-refs-symbol (symbol &optional path-prefix)
+  "Display all the references to SYMBOL in all loaded elisp files.
+
+If called with a prefix, prompt for a directory to limit the
+search."
+  (interactive
+   (list (elisp-refs--completing-read-symbol "Symbol: " )
+         (when current-prefix-arg
+           (read-directory-name "Limit search to loaded files in: "))))
+  (elisp-refs--search symbol
+                      (elisp-refs--describe-button symbol 'symbol)
+                      (lambda (buf)
+                        (elisp-refs--read-and-find-symbol buf symbol))
+                      path-prefix))
+
+;;; Mode
+
+(defvar elisp-refs-mode-map
+  (let ((map (make-sparse-keymap)))
+    ;; TODO: it would be nice for TAB to navigate to file buttons too,
+    ;; like *Help* does.
+    (set-keymap-parent map special-mode-map)
+    (define-key map (kbd "<tab>") #'elisp-refs-next-match)
+    (define-key map (kbd "<backtab>") #'elisp-refs-prev-match)
+    (define-key map (kbd "n") #'elisp-refs-next-match)
+    (define-key map (kbd "p") #'elisp-refs-prev-match)
+    (define-key map (kbd "RET") #'elisp-refs-visit-match)
+    map)
+  "Keymap for `elisp-refs-mode'.")
+
+(define-derived-mode elisp-refs-mode special-mode "Refs"
+  "Major mode for refs results buffers.")
+
+(defun elisp--refs-visit-match (open-fn)
+  "Go to the search result at point.
+Open file with function OPEN_FN. `find-file` or `find-file-other-window`"
+  (interactive)
+  (let* ((path (get-text-property (point) 'elisp-refs-path))
+         (pos (get-text-property (point) 'elisp-refs-start-pos))
+         (unindent (get-text-property (point) 'elisp-refs-unindented))
+         (column-offset (current-column))
+         (line-offset -1))
+    (when (null path)
+      (user-error "No match here"))
+
+    ;; If point is not on the first line of the match, work out how
+    ;; far away the first line is.
+    (save-excursion
+      (while (equal pos (get-text-property (point) 'elisp-refs-start-pos))
+        (forward-line -1)
+        (cl-incf line-offset)))
+
+    (funcall open-fn path)
+    (goto-char pos)
+    ;; Move point so we're on the same char in the buffer that we were
+    ;; on in the results buffer.
+    (forward-line line-offset)
+    (beginning-of-line)
+    (let ((target-offset (+ column-offset unindent))
+          (i 0))
+      (while (< i target-offset)
+        (if (looking-at "\t")
+            (cl-incf i tab-width)
+          (cl-incf i))
+        (forward-char 1)))))
+
+(defun elisp-refs-visit-match ()
+  "Goto the search result at point."
+  (interactive)
+  (elisp--refs-visit-match #'find-file))
+
+(defun elisp-refs-visit-match-other-window ()
+  "Goto the search result at point, opening in another window."
+  (interactive)
+  (elisp--refs-visit-match #'find-file-other-window))
+
+
+(defun elisp-refs--move-to-match (direction)
+  "Move point one match forwards.
+If DIRECTION is -1, moves backwards instead."
+  (let* ((start-pos (point))
+         (match-pos (get-text-property start-pos 'elisp-refs-start-pos))
+         current-match-pos)
+    (condition-case _err
+        (progn
+          ;; Move forward/backwards until we're on the next/previous match.
+          (catch 'done
+            (while t
+              (setq current-match-pos
+                    (get-text-property (point) 'elisp-refs-start-pos))
+              (when (and current-match-pos
+                         (not (equal match-pos current-match-pos)))
+                (throw 'done nil))
+              (forward-char direction)))
+          ;; Move to the beginning of that match.
+          (while (equal (get-text-property (point) 'elisp-refs-start-pos)
+                        (get-text-property (1- (point)) 'elisp-refs-start-pos))
+            (forward-char -1))
+          ;; Move forward until we're on the first char of match within that
+          ;; line.
+          (while (or
+                  (looking-at " ")
+                  (eq (get-text-property (point) 'face)
+                      'font-lock-comment-face))
+            (forward-char 1)))
+      ;; If we're at the last result, don't move point.
+      (end-of-buffer
+       (progn
+         (goto-char start-pos)
+         (signal 'end-of-buffer nil))))))
+
+(defun elisp-refs-prev-match ()
+  "Move to the previous search result in the Refs buffer."
+  (interactive)
+  (elisp-refs--move-to-match -1))
+
+(defun elisp-refs-next-match ()
+  "Move to the next search result in the Refs buffer."
+  (interactive)
+  (elisp-refs--move-to-match 1))
+
+(provide 'elisp-refs)
+;;; elisp-refs.el ends here
diff --git a/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs.elc b/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs.elc
new file mode 100644
index 0000000..3929773
Binary files /dev/null and b/emacs/.emacs.d/elpa/elisp-refs-20230920.201/elisp-refs.elc differ
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/README.md b/emacs/.emacs.d/elpa/emacsql-20260601.1722/README.md
new file mode 100644
index 0000000..5a6e004
--- /dev/null
+++ b/emacs/.emacs.d/elpa/emacsql-20260601.1722/README.md
@@ -0,0 +1,434 @@
+# EmacSQL
+
+EmacSQL is a high-level Emacs Lisp front-end for SQLite.
+
+PostgreSQL and MySQL are also supported, but use of these connectors
+is not recommended.
+
+Any [readable lisp value][readable] can be stored as a value in
+EmacSQL, including numbers, strings, symbols, lists, vectors, and
+closures. EmacSQL has no concept of "TEXT" values; it's all just lisp
+objects. The lisp object `nil` corresponds 1:1 with `NULL` in the
+database.
+
+Requires Emacs 26 or later.
+
+[![Compile](https://github.com/magit/emacsql/actions/workflows/compile.yml/badge.svg)](https://github.com/magit/emacsql/actions/workflows/compile.yml)
+[![Test](https://github.com/magit/emacsql/actions/workflows/test.yml/badge.svg)](https://github.com/magit/emacsql/actions/workflows/test.yml)
+[![NonGNU ELPA](https://emacsair.me/assets/badges/nongnu-elpa.svg)](https://elpa.nongnu.org/nongnu-devel/emacsql.html)
+[![MELPA Stable](https://stable.melpa.org/packages/emacsql-badge.svg)](https://stable.melpa.org/#/emacsql)
+[![MELPA](https://melpa.org/packages/emacsql-badge.svg)](https://melpa.org/#/emacsql)
+
+### FAQ
+#### Why are all values stored as strings?
+
+EmacSQL is not intended to interact with arbitrary databases, but to
+be an ACID-compliant database for Emacs extensions.  This means that
+EmacSQL cannot be used with a regular SQL database used by other
+non-Emacs clients.
+
+All database values must be s-expressions. When EmacSQL stores a
+value — string, symbol, cons, etc. — it is printed and written to
+the database in its printed form. Strings are wrapped in quotes
+and escaped as necessary. That means "bare" symbols in the database
+generally look like strings. The only exception is `nil`, which is
+stored as `NULL`.
+
+#### Will EmacSQL ever support arbitrary databases?
+
+The author of EmacSQL [thinks][mistake] that it was probably a
+design mistake to restrict it to Emacs by storing only printed values,
+and that it would be a lot more useful if it just handled primitive
+database types.
+
+However, EmacSQL is in maintenance mode and there are no plans to
+make any fundamental changes, not least because they would break all
+existing packages and databases that rely on the current EmacSQL
+behavior.
+
+### Windows Issues
+
+Emacs `start-process-shell-command` function is not supported on
+Windows. Since both `emacsql-mysql` and `emacsql-psql` rely on this
+function, neither of these connection types are supported on Windows.
+
+## Example Usage
+
+```el
+(defvar db (emacsql-sqlite-open "~/company.db"))
+
+;; Create a table. Table and column identifiers are symbols.
+(emacsql db [:create-table people ([name id salary])])
+
+;; Or optionally provide column constraints.
+(emacsql db [:create-table people
+             ([name (id integer :primary-key) (salary float)])])
+
+;; Insert some data:
+(emacsql db [:insert :into people
+             :values (["Jeff" 1000 60000.0] ["Susan" 1001 64000.0])])
+
+;; Query the database for results:
+(emacsql db [:select [name id]
+             :from people
+             :where (> salary 62000)])
+;; => (("Susan" 1001))
+
+;; Queries can be templates, using $1, $2, etc.:
+(emacsql db [:select [name id]
+             :from people
+             :where (> salary $s1)]
+         50000)
+;; => (("Jeff" 1000) ("Susan" 1001))
+```
+
+When editing these prepared SQL s-expression statements, the `M-x
+emacsql-show-last-sql` command (think `eval-last-sexp`) is useful for
+seeing what the actual SQL expression will become when compiled.
+
+## Schema
+
+A table schema is a list whose first element is a vector of column
+specifications. The rest of the list specifies table constraints. A
+column identifier is a symbol and a column's specification can either
+be just this symbol or it can include constraints as a list. Because
+EmacSQL stores entire lisp objects as values, the only relevant (and
+allowed) types are `integer`, `float`, and `object` (default).
+
+    ([(<column>) ...] (<table-constraint> ...) ...])
+
+Dashes in identifiers are converted into underscores when compiled
+into SQL. This allows for lisp-style identifiers to be used in SQL.
+Constraints follow the compilation rules below.
+
+```el
+;; No constraints schema with four columns:
+([name id building room])
+
+;; Add some column constraints:
+([(name :unique) (id integer :primary-key) building room])
+
+;; Add some table constraints:
+([(name :unique) (id integer :primary-key) building room]
+ (:unique [building room])
+ (:check (> id 0)))
+```
+
+Here's an example using foreign keys.
+
+```el
+;; "subjects" table schema
+([(id integer :primary-key) subject])
+
+;; "tag" table references subjects
+([(subject-id integer) tag]
+ (:foreign-key [subject-id] :references subjects [id]
+               :on-delete :cascade))
+```
+
+Foreign key constraints are enabled by default in EmacSQL.
+
+## Operators
+
+Expressions are written lisp-style, with the operator first. If it
+looks like an operator EmacSQL treats it like an operator. However,
+several operators are special.
+
+    <=    >=    funcall    quote
+
+The `<=` and `>=` operators accept 2 or 3 operands, transforming into
+a SQL `_ BETWEEN _ AND _` operator as appropriate.
+
+For function-like "operators" like `count` and `max` use the `funcall`
+"operator."
+
+```el
+[:select (funcall max age) :from people]
+```
+
+With `glob` and `like` SQL operators keep in mind that they're
+matching the *printed* representations of these values, even if the
+value is a string.
+
+The `||` concatenation operator is unsupported because concatenating
+printed representations breaks an important constraint: all values must
+remain readable within SQLite.
+
+## Quoting
+
+Inside expressions, EmacSQL cannot tell the difference between symbol
+literals and column references. If you're talking about the symbol
+itself, just quote it as you would in normal Elisp. Note that this
+does not "escape" `$tn` parameter symbols.
+
+```el
+(emacsql db [... :where (= category 'hiking)])
+```
+
+Quoting a string makes EmacSQL handle it as a "raw string." These raw
+strings are not printed when being assembled into a query. These are
+intended for use in special circumstances like filenames (`ATTACH`) or
+pattern matching (`LIKE`). It is vital that raw strings are not
+returned as results.
+
+```el
+(emacsql db [... :where (like name '"%foo%")])
+(emacsql db [:attach '"/path/to/foo.db" :as foo])
+```
+
+Since template parameters include their type they never need to be
+quoted.
+
+## Prepared Statements
+
+The database is interacted with via prepared SQL s-expression
+statements. You shouldn't normally be concatenating strings on your
+own. (And it leaves out any possibility of a SQL injection!) See the
+"Usage" section above for examples. A statement is a vector of
+keywords and other lisp object.
+
+Prepared EmacSQL s-expression statements are compiled into SQL
+statements. The statement compiler is memorized so that using the same
+statement multiple times is fast. To assist in this, the statement can
+act as a template -- using `$i1`, `$s2`, etc. -- working like the
+Elisp `format` function.
+
+### Compilation Rules
+
+Rather than the typical uppercase SQL keywords, keywords in a prepared
+EmacSQL statement are literally just that: lisp keywords. EmacSQL only
+understands a very small amount of SQL's syntax. The compiler follows
+some simple rules to convert an s-expression into SQL.
+
+#### All prepared statements are vectors.
+
+A prepared s-expression statement is a vector beginning with a keyword
+followed by a series of keywords and special values. This includes
+most kinds of sub-queries.
+
+```el
+[:select ... :from ...]
+[:select tag :from tags
+ :where (in tag [:select ...])]
+```
+
+#### Keywords are split and capitalized.
+
+Dashes are converted into spaces and the keyword gets capitalized. For
+example, `:if-not-exists` becomes `IF NOT EXISTS`. How you choose to
+combine keywords is up to your personal taste (e.g., `:drop :table` vs.
+`:drop-table`).
+
+#### Standalone symbols are identifiers.
+
+EmacSQL doesn't know what symbols refer to identifiers and what
+symbols should be treated as values. Use quotes to mark a symbol as a
+value. For example, `people` here will be treated as an identifier.
+
+```el
+[:insert-into people :values ...]
+```
+
+#### Row-oriented information is always represented as vectors.
+
+This includes rows being inserted, and sets of columns in a query. If
+you're talking about a row-like thing then put it in a vector.
+
+```el
+[:select [id name] :from people]
+```
+
+Note that `*` is actually a SQL keyword, so don't put it in a vector.
+
+```el
+[:select * :from ...]
+```
+
+#### Lists are treated as expressions.
+
+This is true even within row-oriented vectors.
+
+```el
+[... :where (= name "Bob")]
+[:select [(/ seconds 60) count] :from ...]
+```
+
+Some things that are traditionally keywords -- particularly those that
+are mixed in with expressions -- have been converted into operators
+(`AS`, `ASC`, `DESC`).
+
+```el
+[... :order-by [(asc b), (desc a)]]   ; "ORDER BY b ASC, a DESC"
+[:select p:name :from (as people p)]  ; "SELECT p.name FROM people AS p"
+```
+
+#### The `:values` keyword is special.
+
+What follows `:values` is always treated like a vector or list of
+vectors. Normally this sort of thing would appear to be a column
+reference.
+
+```el
+[... :values [1 2 3]]
+[... :values ([1 2 3] [4 5 6])]  ; insert multiple rows
+```
+
+#### A list whose first element is a vector is a table schema.
+
+This is to distinguish schemata from everything else. With the
+exception of what follows `:values`, nothing else is shaped like this.
+
+```el
+[:create-table people ([(id :primary-key) name])]
+```
+
+### Templates
+
+To make statement compilation faster, and to avoid making you build up
+statements dynamically, you can insert `$tn` parameters in place of
+identifiers and values. These refer to the argument's type and its
+argument position after the statement in the `emacsql` function,
+one-indexed.
+
+```el
+(emacsql db [:select * :from $i1 :where (> salary $s2)] 'employees 50000)
+
+(emacsql db [:select * :from employees :where (like name $r1)] "%Smith%")
+```
+
+The letter before the number is the type.
+
+ * `i` : identifier
+ * `s` : scalar
+ * `v` : vector (or multiple vectors)
+ * `r` : raw, unprinted strings
+ * `S` : schema
+
+When combined with `:values`, the vector type can refer to lists of
+rows.
+
+```el
+(emacsql db [:insert-into favorite-characters :values $v1]
+            '([0 "Calvin"] [1 "Hobbes"] [3 "Susie"]))
+```
+
+This is why rows must be vectors and not lists.
+
+### Ignored Features
+
+EmacSQL doesn't cover all of SQLite's features. Here are a list of
+things that aren't supported, and probably will never be.
+
+ * Collating. SQLite has three built-in collation functions: BINARY
+   (default), NOCASE, and RTRIM. EmacSQL values never have right-hand
+   whitespace, so RTRIM won't be of any use. NOCASE is broken
+   (ASCII-only) and there's little reason to use it.
+
+ * Text manipulation functions. Like collating this is incompatible
+   with EmacSQL s-expression storage.
+
+ * Date and time. These are incompatible with the printed values
+   stored by EmacSQL and therefore have little use.
+
+## Limitations
+
+EmacSQL is *not* intended to play well with other programs accessing
+the SQLite database. Non-numeric values are stored encoded as
+s-expressions TEXT values. This avoids ambiguities in parsing output
+from the command line and allows for storage of Emacs richer data
+types. This is an efficient, ACID-compliant database specifically for
+Emacs.
+
+## Emacs Lisp Indentation Annoyance
+
+By default, `emacs-lisp-mode` indents vectors as if they were regular
+function calls.
+
+```el
+;; Ugly indentation!
+(emacsql db [:select *
+                     :from people
+                     :where (> age 60)])
+```
+
+Calling the function `emacsql-fix-vector-indentation` (interactive)
+advises the major mode to fix this annoyance.
+
+```el
+;; Such indent!
+(emacsql db [:select *
+             :from people
+             :where (> age 60)])
+```
+
+## Contributing and Extending
+
+To run the test suite, clone the `pg` and `sqlite3` packages into
+sibling directories. The Makefile will automatically put these paths on
+the Emacs load path (override `LDFLAGS` if your situation is different).
+
+```shell
+git clone https://github.com/emarsden/pg-el ../pg
+git clone https://github.com/pekingduck/emacs-sqlite3-api ../sqlite3
+```
+
+Or set `LOAD_PATH` to point at these packages elsewhere:
+
+```shell
+make LOAD_PATH='-L path/to/pg -L path/to/sqlite3'
+```
+
+Then invoke make:
+
+```shell
+make test
+```
+
+If the environment variable `PGDATABASE` is present then the unit
+tests will also be run with PostgreSQL (emacsql-psql). Provide
+`PGHOST`, `PGPORT`, and `PGUSER` if needed. If `PGUSER` is provided,
+the pg.el back-end (emacsql-pg) will also be tested.
+
+If the environment variable `MYSQL_DBNAME` is present then the unit
+tests will also be run with MySQL in the named database. Note that
+this is not an official MySQL variable, just something made up for
+EmacSQL.
+
+### Creating a New Front-end
+
+EmacSQL uses EIEIO so that interactions with a connection occur
+through generic functions. You need to define a new class that
+inherits from `emacsql-connection`.
+
+ * Implement `emacsql-send-message`, `emacsql-waiting-p`,
+   `emacsql-parse`, and `emacsql-close`.
+ * Provide a constructor that initializes the connection and calls
+   `emacsql-register` (for automatic connection cleanup).
+ * Provide `emacsql-types` if needed (hint: use a class-allocated slot).
+ * Ensure that you properly read NULL as nil (hint: ask your back-end
+   to print it that way).
+ * Register all reserved words with `emacsql-register-reserved`.
+ * Preferably provide `emacsql-reconnect` if possible.
+ * Set the default isolation level to *serializable*.
+ * Enable autocommit mode by default.
+ * Prefer ANSI syntax (value escapes, identifier escapes, etc.).
+ * Enable foreign key constraints by default.
+
+The goal of the autocommit, isolation, parsing, and foreign key
+configuration settings is to normalize the interface as much as
+possible. The connection's user should have the option to be agnostic
+about which back-end is actually in use.
+
+The provided implementations should serve as useful examples. If your
+back-end outputs data in a clean, standard way you may be able to use
+the emacsql-protocol-mixin class to do most of the work.
+
+## See Also
+
+ * [SQLite Documentation](https://www.sqlite.org/docs.html)
+
+[readable]: http://nullprogram.com/blog/2013/12/30/#almost_everything_prints_readably
+[mistake]: https://github.com/magit/emacsql/issues/35#issuecomment-346352439
+
+<!-- LocalWords: EIEIO Elisp EmacSQL MELPA Makefile NOCASE RTRIM  -->
+<!-- LocalWords: SQL's autocommit el emacsql unprinted whitespace -->
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-autoloads.el b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-autoloads.el
new file mode 100644
index 0000000..bae8de9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-autoloads.el
@@ -0,0 +1,68 @@
+;;; emacsql-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from emacsql.el
+
+(autoload 'emacsql-show-last-sql "emacsql" "\
+Display the compiled SQL of the s-expression SQL expression before point.
+A prefix argument causes the SQL to be printed into the current buffer.
+
+(fn &optional PREFIX)" t)
+(register-definition-prefixes "emacsql" '("emacsql-"))
+
+
+;;; Generated autoloads from emacsql-compiler.el
+
+(register-definition-prefixes "emacsql-compiler" '("emacsql-"))
+
+
+;;; Generated autoloads from emacsql-mysql.el
+
+(register-definition-prefixes "emacsql-mysql" '("emacsql-mysql-"))
+
+
+;;; Generated autoloads from emacsql-pg.el
+
+(register-definition-prefixes "emacsql-pg" '("emacsql-pg-connection"))
+
+
+;;; Generated autoloads from emacsql-psql.el
+
+(register-definition-prefixes "emacsql-psql" '("emacsql-psql-"))
+
+
+;;; Generated autoloads from emacsql-sqlite.el
+
+(register-definition-prefixes "emacsql-sqlite" '("emacsql-"))
+
+
+;;; Generated autoloads from emacsql-sqlite-builtin.el
+
+(register-definition-prefixes "emacsql-sqlite-builtin" '("emacsql-sqlite-builtin-connection"))
+
+
+;;; Generated autoloads from emacsql-sqlite-module.el
+
+(register-definition-prefixes "emacsql-sqlite-module" '("emacsql-sqlite-module-connection"))
+
+;;; End of scraped data
+
+(provide 'emacsql-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; emacsql-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-compiler.el b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-compiler.el
new file mode 100644
index 0000000..66afdc3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-compiler.el
@@ -0,0 +1,545 @@
+;;; emacsql-compiler.el --- S-expression SQL compiler  -*- lexical-binding:t -*-
+
+;; This is free and unencumbered software released into the public domain.
+
+;; Author: Christopher Wellons <wellons@nullprogram.com>
+;; Maintainer: Jonas Bernoulli <emacs.emacsql@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: Unlicense
+
+;;; Commentary:
+
+;; This library provides support for compiling S-expressions to SQL.
+
+;;; Code:
+
+(require 'cl-lib)
+
+(eval-when-compile (require 'subr-x))
+
+;;; Error symbols
+
+(defmacro emacsql-deferror (symbol parents message)
+  "Defines a new error symbol for EmacSQL."
+  (declare (indent 2))
+  (let ((conditions (cl-remove-duplicates
+                     (append parents (list symbol 'emacsql-error 'error)))))
+    `(prog1 ',symbol
+       (put ',symbol 'error-conditions ',conditions)
+       (put ',symbol 'error-message ,message))))
+
+(emacsql-deferror emacsql-error () ;; parent condition for all others
+  "EmacSQL had an unhandled condition")
+
+(emacsql-deferror emacsql-syntax () "Invalid SQL statement")
+(emacsql-deferror emacsql-internal () "Internal error")
+(emacsql-deferror emacsql-locked () "Database locked")
+(emacsql-deferror emacsql-fatal () "Fatal error")
+(emacsql-deferror emacsql-memory () "Out of memory")
+(emacsql-deferror emacsql-corruption () "Database corrupted")
+(emacsql-deferror emacsql-access () "Database access error")
+(emacsql-deferror emacsql-timeout () "Query timeout error")
+(emacsql-deferror emacsql-warning () "Warning message")
+
+(defun emacsql-error (format &rest args)
+  "Like `error', but signal an emacsql-syntax condition."
+  (signal 'emacsql-syntax (list (apply #'format format args))))
+
+;;; Escaping functions
+
+(defvar emacsql-reserved (make-hash-table :test 'equal)
+  "Collection of all known reserved words, used for escaping.")
+
+(defun emacsql-register-reserved (seq)
+  "Register sequence of keywords as reserved words, returning SEQ."
+  (cl-loop for word being the elements of seq
+           do (setf (gethash (upcase (format "%s" word)) emacsql-reserved) t)
+           finally (cl-return seq)))
+
+(defun emacsql-reserved-p (name)
+  "Returns non-nil if string NAME is a SQL keyword."
+  (gethash (upcase name) emacsql-reserved))
+
+(defun emacsql-quote-scalar (string)
+  "Single-quote (scalar) STRING for use in a SQL expression."
+  (with-temp-buffer
+    (insert string)
+    (goto-char (point-min))
+    (while (re-search-forward "'" nil t)
+      (replace-match "''"))
+    (goto-char (point-min))
+    (insert "'")
+    (goto-char (point-max))
+    (insert "'")
+    (buffer-string)))
+
+(defun emacsql-quote-character (c)
+  "Single-quote character C for use in a SQL expression."
+  (if (char-equal c ?')
+      "''''"
+    (format "'%c'" c)))
+
+(defun emacsql-quote-identifier (string)
+  "Double-quote (identifier) STRING for use in a SQL expression."
+  (format "\"%s\"" (string-replace "\"" "\"\"" string)))
+
+(defun emacsql-escape-identifier (identifier)
+  "Escape an identifier, if needed, for SQL."
+  (when (or (null identifier)
+            (keywordp identifier)
+            (not (or (symbolp identifier)
+                     (vectorp identifier))))
+    (emacsql-error "Invalid identifier: %S" identifier))
+  (cond
+   ((vectorp identifier)
+    (mapconcat #'emacsql-escape-identifier identifier ", "))
+   ((eq identifier '*) "*")
+   (t
+    (let ((name (symbol-name identifier)))
+      (if (string-match-p ":" name)
+          (mapconcat #'emacsql-escape-identifier
+                     (mapcar #'intern (split-string name ":")) ".")
+        (let ((print (string-replace "-" "_" (format "%S" identifier)))
+              (special "[]-\000-\040!\"#%&'()*+,./:;<=>?@[\\^`{|}~\177]"))
+          (if (or (string-match-p special print)
+                  (string-match-p "^[0-9$]" print)
+                  (emacsql-reserved-p print))
+              (emacsql-quote-identifier print)
+            print)))))))
+
+(defvar print-escape-control-characters)
+
+(defun emacsql-escape-scalar (value)
+  "Escape VALUE for sending to SQLite."
+  (let ((print-escape-newlines t)
+        (print-escape-control-characters t))
+    (cond ((null value) "NULL")
+          ((numberp value) (prin1-to-string value))
+          ((emacsql-quote-scalar (prin1-to-string value))))))
+
+(defun emacsql-escape-raw (value)
+  "Escape VALUE for sending to SQLite."
+  (cond ((null value) "NULL")
+        ((stringp value) (emacsql-quote-scalar value))
+        ((error "Expected string or nil"))))
+
+(defun emacsql-escape-vector (vector)
+  "Encode VECTOR into a SQL vector scalar."
+  (cl-typecase vector
+    (null   (emacsql-error "Empty SQL vector expression"))
+    (list   (mapconcat #'emacsql-escape-vector vector ", "))
+    (vector (concat "(" (mapconcat #'emacsql-escape-scalar vector ", ") ")"))
+    (otherwise (emacsql-error "Invalid vector %S" vector))))
+
+(defun emacsql-escape-format (thing)
+  "Escape THING for use as a `format' spec."
+  (string-replace "%" "%%" thing))
+
+;;; Schema compiler
+
+(defvar emacsql-type-map
+  '((integer "&INTEGER")
+    (float "&REAL")
+    (object "&TEXT")
+    (nil "&NONE"))
+  "An alist mapping EmacSQL types to SQL types.")
+
+(defun emacsql--from-keyword (keyword)
+  "Convert KEYWORD into SQL."
+  (upcase (string-replace "-" " " (substring (symbol-name keyword) 1))))
+
+(defun emacsql--prepare-constraints (constraints)
+  "Compile CONSTRAINTS into a partial SQL expression."
+  (mapconcat
+   #'identity
+   (cl-loop for constraint in constraints collect
+            (cl-typecase constraint
+              (null "NULL")
+              (keyword (emacsql--from-keyword constraint))
+              (symbol (emacsql-escape-identifier constraint))
+              (vector (format "(%s)"
+                              (mapconcat
+                               #'emacsql-escape-identifier
+                               constraint
+                               ", ")))
+              (list (format "(%s)"
+                            (car (emacsql--*expr constraint))))
+              (otherwise
+               (emacsql-escape-scalar constraint))))
+   " "))
+
+(defun emacsql--prepare-column (column)
+  "Convert COLUMN into a partial SQL string."
+  (mapconcat
+   #'identity
+   (cl-etypecase column
+     (symbol (list (emacsql-escape-identifier column)
+                   (cadr (assoc nil emacsql-type-map))))
+     (list (cl-destructuring-bind (name . constraints) column
+             (cl-delete-if
+              (lambda (s) (zerop (length s)))
+              (list (emacsql-escape-identifier name)
+                    (if (member (car constraints) '(integer float object))
+                        (cadr (assoc (pop constraints) emacsql-type-map))
+                      (cadr (assoc nil emacsql-type-map)))
+                    (emacsql--prepare-constraints constraints))))))
+   " "))
+
+(defun emacsql-prepare-schema (schema)
+  "Compile SCHEMA into a SQL string."
+  (if (vectorp schema)
+      (emacsql-prepare-schema (list schema))
+    (cl-destructuring-bind (columns . constraints) schema
+      (mapconcat
+       #'identity
+       (nconc
+        (mapcar #'emacsql--prepare-column columns)
+        (mapcar #'emacsql--prepare-constraints constraints))
+       ", "))))
+
+;;; Statement compilation
+
+(defvar emacsql-prepare-cache (make-hash-table :test 'equal :weakness 'key)
+  "Cache used to memoize `emacsql-prepare'.")
+
+(defvar emacsql--vars ()
+  "Used within `emacsql-with-params' to collect parameters.")
+
+(defun emacsql-sql-p (thing)
+  "Return non-nil if THING looks like a prepared statement."
+  (and (vectorp thing) (> (length thing) 0) (keywordp (aref thing 0))))
+
+(defun emacsql-param (thing)
+  "Return the index and type of THING, or nil if THING is not a parameter.
+A parameter is a symbol that looks like $i1, $s2, $v3, etc. The
+letter refers to the type: identifier (i), scalar (s),
+vector (v), raw string (r), schema (S)."
+  (and (symbolp thing)
+       (let ((name (symbol-name thing)))
+         (and (string-match-p "^\\$[isvrS][0-9]+$" name)
+              (cons (1- (read (substring name 2)))
+                    (cl-ecase (aref name 1)
+                      (?i :identifier)
+                      (?s :scalar)
+                      (?v :vector)
+                      (?r :raw)
+                      (?S :schema)))))))
+
+(defmacro emacsql-with-params (prefix &rest body)
+  "Evaluate BODY, collecting parameters.
+Provided local functions: `param', `identifier', `scalar', `raw',
+`svector', `expr', `subsql', and `combine'.  BODY should return a
+string, which will be combined with variable definitions."
+  (declare (indent 1))
+  `(let ((emacsql--vars ()))
+     (cl-flet* ((combine (prepared) (emacsql--*combine prepared))
+                (param (thing) (emacsql--!param thing))
+                (identifier (thing) (emacsql--!param thing :identifier))
+                (scalar (thing) (emacsql--!param thing :scalar))
+                (raw (thing) (emacsql--!param thing :raw))
+                (svector (thing) (combine (emacsql--*vector thing)))
+                (expr (thing) (combine (emacsql--*expr thing)))
+                (subsql (thing)
+                  (format "(%s)" (combine (emacsql-prepare thing)))))
+       (cons (concat ,prefix (progn ,@body)) emacsql--vars))))
+
+(defun emacsql--!param (thing &optional kind)
+  "Parse, escape, and store THING.
+If optional KIND is not specified, then try to guess it.
+Only use within `emacsql-with-params'!"
+  (cl-flet ((check (param)
+              (when (and kind (not (eq kind (cdr param))))
+                (emacsql-error
+                 "Invalid parameter type %s, expecting %s" thing kind))))
+    (let ((param (emacsql-param thing)))
+      (if (null param)
+          (emacsql-escape-format
+           (if kind
+               (cl-case kind
+                 (:identifier (emacsql-escape-identifier thing))
+                 (:scalar (emacsql-escape-scalar thing))
+                 (:vector (emacsql-escape-vector thing))
+                 (:raw (emacsql-escape-raw thing))
+                 (:schema (emacsql-prepare-schema thing)))
+             (if (and (not (null thing))
+                      (not (keywordp thing))
+                      (symbolp thing))
+                 (emacsql-escape-identifier thing)
+               (emacsql-escape-scalar thing))))
+        (prog1 (if (eq (cdr param) :schema) "(%s)" "%s")
+          (check param)
+          (setq emacsql--vars (nconc emacsql--vars (list param))))))))
+
+(defun emacsql--*vector (vector)
+  "Prepare VECTOR."
+  (emacsql-with-params ""
+    (cl-typecase vector
+      (symbol (emacsql--!param vector :vector))
+      (list (mapconcat #'svector vector ", "))
+      (vector (format "(%s)" (mapconcat #'scalar vector ", ")))
+      (otherwise (emacsql-error "Invalid vector: %S" vector)))))
+
+(defmacro emacsql--generate-op-lookup-defun (name operator-precedence-groups)
+  "Generate function to look up predefined SQL operator metadata.
+
+The generated function is bound to NAME and accepts two
+arguments, OPERATOR-NAME and OPERATOR-ARGUMENT-COUNT.
+OPERATOR-PRECEDENCE-GROUPS should be a number of lists containing
+operators grouped by operator precedence (in order of precedence
+from highest to lowest).  A single operator is represented by a
+list of at least two elements: operator name (symbol) and
+operator arity (:unary or :binary).  Optionally a custom
+expression can be included, which defines how the operator is
+expanded into an SQL expression (there are two defaults, one for
+:unary and one for :binary operators).
+
+An example for OPERATOR-PRECEDENCE-GROUPS:
+\(((+ :unary (\"+\" :operand)) (- :unary (\"-\" :operand)))
+ ((+ :binary) (- :binary)))"
+  `(defun ,name (operator-name operator-argument-count)
+     "Look up predefined SQL operator metadata.
+See `emacsql--generate-op-lookup-defun' for details."
+     (cond
+      ,@(cl-loop
+         for precedence-value from 1
+         for precedence-group in (reverse operator-precedence-groups)
+         append (cl-loop
+                 for (op-name arity custom-expr) in precedence-group
+                 for sql-name = (upcase (symbol-name op-name))
+                 for sql-expr =
+                 (or custom-expr
+                     (pcase arity
+                       (:unary `(,sql-name " " :operand))
+                       (:binary `(:operand " " ,sql-name " " :operand))))
+
+                 collect (list `(and (eq operator-name
+                                         (quote ,op-name))
+                                     ,(if (eq arity :unary)
+                                          `(eql operator-argument-count 1)
+                                        `(>= operator-argument-count 2)))
+                               `(list ',sql-expr ,arity ,precedence-value))))
+      (t (list nil nil nil)))))
+
+(emacsql--generate-op-lookup-defun
+ emacsql--get-op
+ (((~ :unary ("~" :operand)))
+  ((collate :binary))
+  ((|| :binary))
+  ((* :binary) (/ :binary) (% :binary))
+  ((+ :unary ("+" :operand)) (- :unary ("-" :operand)))
+  ((+ :binary) (- :binary))
+  ((& :binary) (| :binary) (<< :binary) (>> :binary))
+  ((escape :binary (:operand " ESCAPE " :operand)))
+  ((< :binary) (<= :binary) (> :binary) (>= :binary))
+
+  (;;TODO? (between :binary) (not-between :binary)
+   (is :binary) (is-not :binary (:operand " IS NOT " :operand))
+   (match :binary) (not-match :binary (:operand " NOT MATCH " :operand))
+   (like :binary) (not-like :binary (:operand  " NOT LIKE " :operand))
+   (in :binary) (not-in :binary (:operand " NOT IN " :operand))
+   (isnull :unary (:operand " ISNULL"))
+   (notnull :unary (:operand " NOTNULL"))
+   (= :binary) (== :binary)
+   (!= :binary) (<> :binary)
+   (glob :binary) (not-glob :binary (:operand " NOT GLOB " :operand))
+   (regexp :binary) (not-regexp :binary (:operand " NOT REGEXP " :operand)))
+
+  ((not :unary))
+  ((and :binary))
+  ((or :binary))))
+
+(defun emacsql--expand-format-string (op expr arity argument-count)
+  "Create format-string for an SQL operator.
+The format-string returned is intended to be used with `format'
+to create an SQL expression."
+  (and expr
+       (cl-labels ((replace-operand (x) (if (eq x :operand) "%s" x))
+                   (to-format-string (e) (mapconcat #'replace-operand e "")))
+         (cond
+          ((and (eq arity :unary) (eql argument-count 1))
+           (to-format-string expr))
+          ((and (eq arity :binary) (>= argument-count 2))
+           (let ((result (reverse expr)))
+             (dotimes (_ (- argument-count 2))
+               (setq result (nconc (reverse expr) (cdr result))))
+             (to-format-string (nreverse result))))
+          (t (emacsql-error "Wrong number of operands for %s" op))))))
+
+(defun emacsql--get-op-info (op argument-count parent-precedence-value)
+  "Lookup SQL operator information for generating an SQL expression.
+Returns the following multiple values when an operator can be
+identified: a format string (see `emacsql--expand-format-string')
+and a precedence value.  If PARENT-PRECEDENCE-VALUE is greater or
+equal to the identified operator's precedence, then the format
+string returned is wrapped with parentheses."
+  (cl-destructuring-bind (format-string arity precedence-value)
+      (emacsql--get-op op argument-count)
+    (let ((expanded-format-string
+           (emacsql--expand-format-string
+            op
+            format-string
+            arity
+            argument-count)))
+      (cl-values (cond
+                  ((null format-string) nil)
+                  ((>= parent-precedence-value
+                       precedence-value)
+                   (format "(%s)" expanded-format-string))
+                  (t expanded-format-string))
+                 precedence-value))))
+
+(defun emacsql--*expr (expr &optional parent-precedence-value)
+  "Expand EXPR recursively."
+  (emacsql-with-params ""
+    (cond
+     ((emacsql-sql-p expr) (subsql expr))
+     ((vectorp expr) (svector expr))
+     ((atom expr) (param expr))
+     ((cl-destructuring-bind (op . args) expr
+        (cl-multiple-value-bind (format-string precedence-value)
+            (emacsql--get-op-info op
+                                  (length args)
+                                  (or parent-precedence-value 0))
+          (cl-flet ((recur (n)
+                      (combine (emacsql--*expr (nth n args)
+                                               (or precedence-value 0))))
+                    (nops (op)
+                      (emacsql-error "Wrong number of operands for %s" op)))
+            (cl-case op
+              ;; Special cases <= >=
+              ((<= >=)
+               (cl-case (length args)
+                 (2 (format format-string (recur 0) (recur 1)))
+                 (3 (format (if (>= (or parent-precedence-value 0)
+                                    precedence-value)
+                                "(%s BETWEEN %s AND %s)"
+                              "%s BETWEEN %s AND %s")
+                            (recur 1)
+                            (recur (if (eq op '>=) 2 0))
+                            (recur (if (eq op '>=) 0 2))))
+                 (otherwise (nops op))))
+              ;; enforce second argument to be a character
+              ((escape)
+               (let ((second-arg (cadr args)))
+                 (cond
+                  ((not (= 2 (length args))) (nops op))
+                  ((not (characterp second-arg))
+                   (emacsql-error
+                    "Second operand of escape has to be a character, got %s"
+                    second-arg))
+                  (t (format format-string
+                             (recur 0)
+                             (emacsql-quote-character second-arg))))))
+              ;; Ordering
+              ((asc desc)
+               (format "%s %s" (recur 0) (upcase (symbol-name op))))
+              ;; Special case quote
+              ((quote) (let ((arg (nth 0 args)))
+                         (if (stringp arg)
+                             (raw arg)
+                           (scalar arg))))
+              ;; Special case funcall
+              ((funcall)
+               (format "%s(%s)" (recur 0)
+                       (cond
+                        ((and (= 2 (length args))
+                              (eq '* (nth 1 args)))
+                         "*")
+                        ((and (= 3 (length args))
+                              (eq :distinct (nth 1 args))
+                              (format "DISTINCT %s" (recur 2))))
+                        ((mapconcat
+                          #'recur (cl-loop for i from 1 below (length args)
+                                           collect i)
+                          ", ")))))
+              ;; Guess
+              (otherwise
+               (let ((arg-indices (cl-loop for i from 0 below (length args) collect i)))
+                 (if format-string
+                     (apply #'format format-string (mapcar #'recur arg-indices))
+                   (mapconcat
+                    #'recur (cl-loop for i from 0 below (length args) collect i)
+                    (format " %s " (upcase (symbol-name op)))))))))))))))
+
+(defun emacsql--*idents (idents)
+  "Read in a vector of IDENTS identifiers, or just an single identifier."
+  (emacsql-with-params ""
+    (mapconcat #'expr idents ", ")))
+
+(defun emacsql--*combine (prepared)
+  "Append parameters from PREPARED to `emacsql--vars', return the string.
+Only use within `emacsql-with-params'!"
+  (cl-destructuring-bind (string . vars) prepared
+    (setq emacsql--vars (nconc emacsql--vars vars))
+    string))
+
+(defun emacsql-prepare--string (string)
+  "Create a prepared statement from STRING."
+  (emacsql-with-params ""
+    (replace-regexp-in-string
+     "\\$[isv][0-9]+" (lambda (v) (param (intern v))) string)))
+
+(defun emacsql-prepare--sexp (sexp)
+  "Create a prepared statement from SEXP."
+  (emacsql-with-params ""
+    (cl-loop with items = (cl-coerce sexp 'list)
+             and last = nil
+             while (not (null items))
+             for item = (pop items)
+             collect
+             (cl-typecase item
+               (keyword (if (eq :values item)
+                            (concat "VALUES " (svector (pop items)))
+                          (emacsql--from-keyword item)))
+               (symbol (if (eq item '*)
+                           "*"
+                         (param item)))
+               (vector (if (emacsql-sql-p item)
+                           (subsql item)
+                         (let ((idents (combine
+                                        (emacsql--*idents item))))
+                           (if (keywordp last)
+                               idents
+                             (format "(%s)" idents)))))
+               (list (if (vectorp (car item))
+                         (emacsql-escape-format
+                          (format "(%s)"
+                                  (emacsql-prepare-schema item)))
+                       (combine (emacsql--*expr item))))
+               (otherwise
+                (emacsql-escape-format
+                 (emacsql-escape-scalar item))))
+             into parts
+             do (setq last item)
+             finally (cl-return (string-join parts " ")))))
+
+(defun emacsql-prepare (sql)
+  "Expand SQL (string or sexp) into a prepared statement."
+  (let* ((cache emacsql-prepare-cache)
+         (key (cons emacsql-type-map sql)))
+    (or (gethash key cache)
+        (setf (gethash key cache)
+              (if (stringp sql)
+                  (emacsql-prepare--string sql)
+                (emacsql-prepare--sexp sql))))))
+
+(defun emacsql-format (expansion &rest args)
+  "Fill in the variables EXPANSION with ARGS."
+  (cl-destructuring-bind (format . vars) expansion
+    (let ((print-level nil)
+          (print-length nil))
+      (apply #'format format
+             (cl-loop for (i . kind) in vars collect
+                      (let ((thing (nth i args)))
+                        (cl-case kind
+                          (:identifier (emacsql-escape-identifier thing))
+                          (:scalar (emacsql-escape-scalar thing))
+                          (:vector (emacsql-escape-vector thing))
+                          (:raw (emacsql-escape-raw thing))
+                          (:schema (emacsql-prepare-schema thing))
+                          (otherwise
+                           (emacsql-error "Invalid var type %S" kind)))))))))
+
+(provide 'emacsql-compiler)
+
+;;; emacsql-compiler.el ends here
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-compiler.elc b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-compiler.elc
new file mode 100644
index 0000000..5f0696a
Binary files /dev/null and b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-compiler.elc differ
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-mysql.el b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-mysql.el
new file mode 100644
index 0000000..f8b9207
--- /dev/null
+++ b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-mysql.el
@@ -0,0 +1,132 @@
+;;; emacsql-mysql.el --- EmacSQL back-end for MySQL  -*- lexical-binding:t -*-
+
+;; This is free and unencumbered software released into the public domain.
+
+;; Author: Christopher Wellons <wellons@nullprogram.com>
+;; Maintainer: Jonas Bernoulli <emacs.emacsql@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: Unlicense
+
+;;; Commentary:
+
+;; This library provides an EmacSQL back-end for MySQL, which uses
+;; the standard `msql' command line program.
+
+;;; Code:
+
+(require 'emacsql)
+
+(defvar emacsql-mysql-executable "mysql"
+  "Path to the mysql command line executable.")
+
+(defvar emacsql-mysql-sentinel "--------------\n\n--------------\n\n"
+  "What MySQL will print when it has completed its output.")
+
+(defconst emacsql-mysql-reserved
+  (emacsql-register-reserved
+   '( ACCESSIBLE ADD ALL ALTER ANALYZE AND AS ASC ASENSITIVE BEFORE
+      BETWEEN BIGINT BINARY BLOB BOTH BY CALL CASCADE CASE CHANGE CHAR
+      CHARACTER CHECK COLLATE COLUMN CONDITION CONSTRAINT CONTINUE
+      CONVERT CREATE CROSS CURRENT_DATE CURRENT_TIME CURRENT_TIMESTAMP
+      CURRENT_USER CURSOR DATABASE DATABASES DAY_HOUR DAY_MICROSECOND
+      DAY_MINUTE DAY_SECOND DEC DECIMAL DECLARE DEFAULT DELAYED DELETE
+      DESC DESCRIBE DETERMINISTIC DISTINCT DISTINCTROW DIV DOUBLE DROP
+      DUAL EACH ELSE ELSEIF ENCLOSED ESCAPED EXISTS EXIT EXPLAIN FALSE
+      FETCH FLOAT FLOAT4 FLOAT8 FOR FORCE FOREIGN FROM FULLTEXT GENERAL
+      GRANT GROUP HAVING HIGH_PRIORITY HOUR_MICROSECOND HOUR_MINUTE
+      HOUR_SECOND IF IGNORE IGNORE_SERVER_IDS IN INDEX INFILE INNER
+      INOUT INSENSITIVE INSERT INT INT1 INT2 INT3 INT4 INT8 INTEGER
+      INTERVAL INTO IS ITERATE JOIN KEY KEYS KILL LEADING LEAVE LEFT
+      LIKE LIMIT LINEAR LINES LOAD LOCALTIME LOCALTIMESTAMP LOCK LONG
+      LONGBLOB LONGTEXT LOOP LOW_PRIORITY MASTER_HEARTBEAT_PERIOD
+      MASTER_SSL_VERIFY_SERVER_CERT MATCH MAXVALUE MAXVALUE MEDIUMBLOB
+      MEDIUMINT MEDIUMTEXT MIDDLEINT MINUTE_MICROSECOND MINUTE_SECOND
+      MOD MODIFIES NATURAL NOT NO_WRITE_TO_BINLOG NULL NUMERIC ON
+      OPTIMIZE OPTION OPTIONALLY OR ORDER OUT OUTER OUTFILE PRECISION
+      PRIMARY PROCEDURE PURGE RANGE READ READS READ_WRITE REAL
+      REFERENCES REGEXP RELEASE RENAME REPEAT REPLACE REQUIRE RESIGNAL
+      RESIGNAL RESTRICT RETURN REVOKE RIGHT RLIKE SCHEMA SCHEMAS
+      SECOND_MICROSECOND SELECT SENSITIVE SEPARATOR SET SHOW SIGNAL
+      SIGNAL SLOW SMALLINT SPATIAL SPECIFIC SQL SQL_BIG_RESULT
+      SQL_CALC_FOUND_ROWS SQLEXCEPTION SQL_SMALL_RESULT SQLSTATE
+      SQLWARNING SSL STARTING STRAIGHT_JOIN TABLE TERMINATED THEN
+      TINYBLOB TINYINT TINYTEXT TO TRAILING TRIGGER TRUE UNDO UNION
+      UNIQUE UNLOCK UNSIGNED UPDATE USAGE USE USING UTC_DATE UTC_TIME
+      UTC_TIMESTAMP VALUES VARBINARY VARCHAR VARCHARACTER VARYING WHEN
+      WHERE WHILE WITH WRITE XOR YEAR_MONTH ZEROFILL))
+  "List of all of MySQL's reserved words.
+http://dev.mysql.com/doc/refman/5.5/en/reserved-words.html")
+
+(defclass emacsql-mysql-connection (emacsql-connection)
+  ((dbname :reader emacsql-psql-dbname :initarg :dbname)
+   (types :allocation :class
+          :reader emacsql-types
+          :initform '((integer "BIGINT")
+                      (float "DOUBLE")
+                      (object "LONGTEXT")
+                      (nil "LONGTEXT"))))
+  "A connection to a MySQL database.")
+
+(cl-defun emacsql-mysql (database &key user password host port debug)
+  "Connect to a MySQL server using the mysql command line program."
+  (let* ((mysql (or (executable-find emacsql-mysql-executable)
+                    (error "No mysql binary available, aborting")))
+         (command (list database "--skip-pager" "-rfBNL" mysql)))
+    (when user     (push (format "--user=%s" user) command))
+    (when password (push (format "--password=%s" password) command))
+    (when host     (push (format "--host=%s" host) command))
+    (when port     (push (format "--port=%s" port) command))
+    (let* ((process-connection-type t)
+           (buffer (generate-new-buffer " *emacsql-mysql*"))
+           (command (mapconcat #'shell-quote-argument (nreverse command) " "))
+           (process (start-process-shell-command
+                     "emacsql-mysql" buffer (concat "stty raw &&" command)))
+           (connection (make-instance 'emacsql-mysql-connection
+                                      :handle process
+                                      :dbname database)))
+      (set-process-sentinel process
+                            (lambda (proc _) (kill-buffer (process-buffer proc))))
+      (set-process-query-on-exit-flag (oref connection handle) nil)
+      (when debug (emacsql-enable-debugging connection))
+      (emacsql connection
+               [:set-session (= sql-mode 'NO_BACKSLASH_ESCAPES\,ANSI_QUOTES)])
+      (emacsql connection
+               [:set-transaction-isolation-level :serializable])
+      (emacsql-register connection))))
+
+(cl-defmethod emacsql-close ((connection emacsql-mysql-connection))
+  (let ((process (oref connection handle)))
+    (when (process-live-p process)
+      (process-send-eof process))))
+
+(cl-defmethod emacsql-send-message ((connection emacsql-mysql-connection) message)
+  (let ((process (oref connection handle)))
+    (process-send-string process message)
+    (process-send-string process "\\c\\p\n")))
+
+(cl-defmethod emacsql-waiting-p ((connection emacsql-mysql-connection))
+  (let ((length (length emacsql-mysql-sentinel)))
+    (with-current-buffer (emacsql-buffer connection)
+      (and (>= (buffer-size) length)
+           (progn (goto-char (- (point-max) length))
+                  (looking-at emacsql-mysql-sentinel))))))
+
+(cl-defmethod emacsql-parse ((connection emacsql-mysql-connection))
+  (with-current-buffer (emacsql-buffer connection)
+    (let ((standard-input (current-buffer)))
+      (goto-char (point-min))
+      (when (looking-at "ERROR")
+        (search-forward ": ")
+        (signal 'emacsql-error
+                (list (buffer-substring (point) (line-end-position)))))
+      (cl-loop until (looking-at emacsql-mysql-sentinel)
+               collect (read) into row
+               when (looking-at "\n")
+               collect row into rows
+               and do (setq row ())
+               and do (forward-char)
+               finally (cl-return rows)))))
+
+(provide 'emacsql-mysql)
+
+;;; emacsql-mysql.el ends here
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-mysql.elc b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-mysql.elc
new file mode 100644
index 0000000..3508b23
Binary files /dev/null and b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-mysql.elc differ
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-pg.el b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-pg.el
new file mode 100644
index 0000000..744e071
--- /dev/null
+++ b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-pg.el
@@ -0,0 +1,78 @@
+;;; emacsql-pg.el --- EmacSQL back-end for PostgreSQL via pg  -*- lexical-binding:t -*-
+
+;; This is free and unencumbered software released into the public domain.
+
+;; Author: Christopher Wellons <wellons@nullprogram.com>
+;; Maintainer: Jonas Bernoulli <emacs.emacsql@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: Unlicense
+
+;;; Commentary:
+
+;; This library provides an EmacSQL back-end for PostgreSQL, which
+;; uses the `pg' package to directly speak to the database.
+
+;; (For an alternative back-end for PostgreSQL, see `emacsql-psql'.)
+
+;;; Code:
+
+(require 'emacsql)
+
+(require 'pg nil t)
+(declare-function pg-connect-plist "ext:pg")
+(declare-function pg-disconnect "ext:pg" (con))
+(declare-function pg-exec "ext:pg" (con &rest args))
+(declare-function pg-result "ext:pg" (result what &rest arg))
+
+(defclass emacsql-pg-connection (emacsql-connection)
+  ((pgcon :reader emacsql-pg-pgcon :initarg :pgcon)
+   (dbname :reader emacsql-pg-dbname :initarg :dbname)
+   (result :accessor emacsql-pg-result)
+   (types :allocation :class
+          :reader emacsql-types
+          :initform '((integer "BIGINT")
+                      (float "DOUBLE PRECISION")
+                      (object "TEXT")
+                      (nil "TEXT"))))
+  "A connection to a PostgreSQL database via pg.el.")
+
+(cl-defun emacsql-pg ( dbname user &key
+                       (host "localhost") (password nil) (port 5432) debug)
+  "Connect to a PostgreSQL server using pg.el."
+  (require 'pg)
+  (let* ((pgcon (pg-connect-plist dbname user
+                                  :password password
+                                  :host host
+                                  :port port))
+         (connection (make-instance 'emacsql-pg-connection
+                                    :handle (and (fboundp 'pgcon-process)
+                                                 (pgcon-process pgcon))
+                                    :pgcon pgcon
+                                    :dbname dbname)))
+    (when debug (emacsql-enable-debugging connection))
+    (emacsql connection [:set (= default-transaction-isolation 'SERIALIZABLE)])
+    (emacsql-register connection)))
+
+(cl-defmethod emacsql-close ((connection emacsql-pg-connection))
+  (ignore-errors (pg-disconnect (emacsql-pg-pgcon connection))))
+
+(cl-defmethod emacsql-send-message ((connection emacsql-pg-connection) message)
+  (condition-case error
+      (setf (emacsql-pg-result connection)
+            (pg-exec (emacsql-pg-pgcon connection) message))
+    (error (signal 'emacsql-error error))))
+
+(cl-defmethod emacsql-waiting-p ((_connection emacsql-pg-connection))
+  ;; pg-exec will block
+  t)
+
+(cl-defmethod emacsql-parse ((connection emacsql-pg-connection))
+  (let ((tuples (pg-result (emacsql-pg-result connection) :tuples)))
+    (cl-loop for tuple in tuples collect
+             (cl-loop for value in tuple
+                      when (stringp value) collect (read value)
+                      else collect value))))
+
+(provide 'emacsql-pg)
+
+;;; emacsql-pg.el ends here
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-pg.elc b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-pg.elc
new file mode 100644
index 0000000..3e8d6ef
Binary files /dev/null and b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-pg.elc differ
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-pkg.el b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-pkg.el
new file mode 100644
index 0000000..86383d4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-pkg.el
@@ -0,0 +1,9 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "emacsql" "20260601.1722"
+  "High-level SQL database front-end."
+  '((emacs "28.1"))
+  :url "https://github.com/magit/emacsql"
+  :commit "d811bbefcb5e27841af55cae53aa939ba720de77"
+  :revdesc "d811bbefcb5e"
+  :authors '(("Christopher Wellons" . "wellons@nullprogram.com"))
+  :maintainers '(("Jonas Bernoulli" . "emacs.emacsql@jonas.bernoulli.dev")))
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-psql.el b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-psql.el
new file mode 100644
index 0000000..ee74035
--- /dev/null
+++ b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-psql.el
@@ -0,0 +1,145 @@
+;;; emacsql-psql.el --- EmacSQL back-end for PostgreSQL via psql  -*- lexical-binding:t -*-
+
+;; This is free and unencumbered software released into the public domain.
+
+;; Author: Christopher Wellons <wellons@nullprogram.com>
+;; Maintainer: Jonas Bernoulli <emacs.emacsql@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: Unlicense
+
+;;; Commentary:
+
+;; This library provides an EmacSQL back-end for PostgreSQL, which
+;; uses the standard `psql' command line program.
+
+;; (For an alternative back-end for PostgreSQL, see `emacsql-pg'.)
+
+;;; Code:
+
+(require 'emacsql)
+
+(defvar emacsql-psql-executable "psql"
+  "Path to the psql (PostgreSQL client) executable.")
+
+(defun emacsql-psql-unavailable-p ()
+  "Return a reason if the psql executable is not available.
+:no-executable -- cannot find the executable
+:cannot-execute -- cannot run the executable
+:old-version -- sqlite3 version is too old"
+  (let ((psql emacsql-psql-executable))
+    (if (null (executable-find psql))
+        :no-executable
+      (condition-case _
+          (with-temp-buffer
+            (call-process psql nil (current-buffer) nil "--version")
+            (let ((version (cl-third (split-string (buffer-string)))))
+              (if (version< version "1.0.0")
+                  :old-version
+                nil)))
+        (error :cannot-execute)))))
+
+(defconst emacsql-psql-reserved
+  (emacsql-register-reserved
+   '( ALL ANALYSE ANALYZE AND ANY AS ASC AUTHORIZATION BETWEEN BINARY
+      BOTH CASE CAST CHECK COLLATE COLUMN CONSTRAINT CREATE CROSS
+      CURRENT_DATE CURRENT_TIME CURRENT_TIMESTAMP CURRENT_USER DEFAULT
+      DEFERRABLE DESC DISTINCT DO ELSE END EXCEPT FALSE FOR FOREIGN
+      FREEZE FROM FULL GRANT GROUP HAVING ILIKE IN INITIALLY INNER
+      INTERSECT INTO IS ISNULL JOIN LEADING LEFT LIKE LIMIT LOCALTIME
+      LOCALTIMESTAMP NATURAL NEW NOT NOTNULL NULL OFF OFFSET OLD ON
+      ONLY OR ORDER OUTER OVERLAPS PLACING PRIMARY REFERENCES RIGHT
+      SELECT SESSION_USER SIMILAR SOME TABLE THEN TO TRAILING TRUE
+      UNION UNIQUE USER USING VERBOSE WHEN WHERE))
+  "List of all of PostgreSQL's reserved words.
+http://www.postgresql.org/docs/7.3/static/sql-keywords-appendix.html")
+
+(defclass emacsql-psql-connection (emacsql-connection)
+  ((dbname :reader emacsql-psql-dbname :initarg :dbname)
+   (types :allocation :class
+          :reader emacsql-types
+          :initform '((integer "BIGINT")
+                      (float "DOUBLE PRECISION")
+                      (object "TEXT")
+                      (nil "TEXT"))))
+  "A connection to a PostgreSQL database via psql.")
+
+(cl-defun emacsql-psql (dbname &key username hostname port debug)
+  "Connect to a PostgreSQL server using the psql command line program."
+  (let ((args (list dbname)))
+    (when username
+      (push username args))
+    (push "-n" args)
+    (when port
+      (push "-p" args)
+      (push port args))
+    (when hostname
+      (push "-h" args)
+      (push hostname args))
+    (setq args (nreverse args))
+    (let* ((buffer (generate-new-buffer " *emacsql-psql*"))
+           (psql emacsql-psql-executable)
+           (command (mapconcat #'shell-quote-argument (cons psql args) " "))
+           (process (start-process-shell-command
+                     "emacsql-psql" buffer (concat "stty raw && " command)))
+           (connection (make-instance 'emacsql-psql-connection
+                                      :handle process
+                                      :dbname dbname)))
+      (setf (process-sentinel process)
+            (lambda (proc _) (kill-buffer (process-buffer proc))))
+      (set-process-query-on-exit-flag (oref connection handle) nil)
+      (when debug (emacsql-enable-debugging connection))
+      (mapc (apply-partially #'emacsql-send-message connection)
+            '("\\pset pager off"
+              "\\pset null nil"
+              "\\a"
+              "\\t"
+              "\\f ' '"
+              "SET client_min_messages TO ERROR;"
+              "\\set PROMPT1 ]"
+              "EMACSQL;")) ; error message flush
+      (emacsql-wait connection)
+      (emacsql connection
+               [:set (= default-transaction-isolation 'SERIALIZABLE)])
+      (emacsql-register connection))))
+
+(cl-defmethod emacsql-close ((connection emacsql-psql-connection))
+  (let ((process (oref connection handle)))
+    (when (process-live-p process)
+      (process-send-string process "\\q\n"))))
+
+(cl-defmethod emacsql-send-message ((connection emacsql-psql-connection) message)
+  (let ((process (oref connection handle)))
+    (process-send-string process message)
+    (process-send-string process "\n")))
+
+(cl-defmethod emacsql-waiting-p ((connection emacsql-psql-connection))
+  (with-current-buffer (emacsql-buffer connection)
+    (cond ((= (buffer-size) 1) (string= "]" (buffer-string)))
+          ((> (buffer-size) 1) (string= "\n]" (buffer-substring
+                                               (- (point-max) 2)
+                                               (point-max)))))))
+
+(cl-defmethod emacsql-check-error ((connection emacsql-psql-connection))
+  (with-current-buffer (emacsql-buffer connection)
+    (let ((case-fold-search t))
+      (goto-char (point-min))
+      (when (looking-at "error:")
+        (let* ((beg (line-beginning-position))
+               (end (line-end-position)))
+          (signal 'emacsql-error (list (buffer-substring beg end))))))))
+
+(cl-defmethod emacsql-parse ((connection emacsql-psql-connection))
+  (emacsql-check-error connection)
+  (with-current-buffer (emacsql-buffer connection)
+    (let ((standard-input (current-buffer)))
+      (goto-char (point-min))
+      (cl-loop until (looking-at "]")
+               collect (read) into row
+               when (looking-at "\n")
+               collect row into rows
+               and do (progn (forward-char 1) (setq row ()))
+               finally (cl-return rows)))))
+
+(provide 'emacsql-psql)
+
+;;; emacsql-psql.el ends here
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-psql.elc b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-psql.elc
new file mode 100644
index 0000000..11e2a7e
Binary files /dev/null and b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-psql.elc differ
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-builtin.el b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-builtin.el
new file mode 100644
index 0000000..2a7bf7f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-builtin.el
@@ -0,0 +1,87 @@
+;;; emacsql-sqlite-builtin.el --- EmacSQL back-end for SQLite using builtin support  -*- lexical-binding:t -*-
+
+;; This is free and unencumbered software released into the public domain.
+
+;; Author: Jonas Bernoulli <emacs.emacsql@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.emacsql@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: Unlicense
+
+;;; Commentary:
+
+;; This library provides an EmacSQL back-end for SQLite, which uses
+;; the built-in SQLite support in Emacs 29 an later.
+
+;;; Code:
+
+(require 'emacsql-sqlite)
+
+(declare-function sqlite-open "sqlite.c")
+(declare-function sqlite-select "sqlite.c")
+(declare-function sqlite-close "sqlite.c")
+
+(emacsql-register-reserved emacsql-sqlite-reserved)
+
+(defclass emacsql-sqlite-builtin-connection (emacsql--sqlite-base) ()
+  "A connection to a SQLite database using builtin support.")
+
+(cl-defmethod initialize-instance :after
+  ((connection emacsql-sqlite-builtin-connection) &rest _)
+  (oset connection handle
+        (sqlite-open (oref connection file)))
+  (emacsql-sqlite-set-busy-timeout connection)
+  (emacsql connection [:pragma (= foreign-keys on)])
+  (emacsql-register connection))
+
+(cl-defun emacsql-sqlite-builtin (file &key debug)
+  "Open a connected to database stored in FILE.
+If FILE is nil use an in-memory database.
+
+:debug LOG -- When non-nil, log all SQLite commands to a log
+buffer.  This is for debugging purposes."
+  (let ((connection (make-instance #'emacsql-sqlite-builtin-connection
+                                   :file file)))
+    (when debug
+      (emacsql-enable-debugging connection))
+    connection))
+
+(cl-defmethod emacsql-live-p ((connection emacsql-sqlite-builtin-connection))
+  (and (oref connection handle) t))
+
+(cl-defmethod emacsql-close ((connection emacsql-sqlite-builtin-connection))
+  (when (oref connection handle)
+    (sqlite-close (oref connection handle))
+    (oset connection handle nil)))
+
+(cl-defmethod emacsql-send-message
+  ((connection emacsql-sqlite-builtin-connection) message)
+  (condition-case err
+      (let ((headerp emacsql-include-header))
+        (mapcar (lambda (row)
+                  (cond
+                   (headerp (setq headerp nil) row)
+                   ((mapcan (lambda (col)
+                              (cond ((null col)     (list nil))
+                                    ((equal col "") (list ""))
+                                    ((numberp col)  (list col))
+                                    ((emacsql-sqlite-read-column col))))
+                            row))))
+                (sqlite-select (oref connection handle) message nil
+                               (and emacsql-include-header 'full))))
+    ((sqlite-error sqlite-locked-error)
+     (if (stringp (cdr err))
+         (signal 'emacsql-error (list (cdr err)))
+       (pcase-let* ((`(,_ ,errstr ,errmsg ,errcode ,ext-errcode) err)
+                    (`(,_ ,_ ,signal ,_)
+                     (assq errcode emacsql-sqlite-error-codes)))
+         (signal (or signal 'emacsql-error)
+                 (list errmsg errcode ext-errcode errstr)))))
+    (error
+     (signal 'emacsql-error (cdr err)))))
+
+(cl-defmethod emacsql ((connection emacsql-sqlite-builtin-connection) sql &rest args)
+  (emacsql-send-message connection (apply #'emacsql-compile connection sql args)))
+
+(provide 'emacsql-sqlite-builtin)
+
+;;; emacsql-sqlite-builtin.el ends here
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-builtin.elc b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-builtin.elc
new file mode 100644
index 0000000..9fb63d8
Binary files /dev/null and b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-builtin.elc differ
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-module.el b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-module.el
new file mode 100644
index 0000000..be91b6b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-module.el
@@ -0,0 +1,97 @@
+;;; emacsql-sqlite-module.el --- EmacSQL back-end for SQLite using a module  -*- lexical-binding:t -*-
+
+;; This is free and unencumbered software released into the public domain.
+
+;; Author: Jonas Bernoulli <emacs.emacsql@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.emacsql@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: Unlicense
+
+;;; Commentary:
+
+;; This library provides an EmacSQL back-end for SQLite, which uses
+;; the Emacs module provided by the `sqlite3' package.
+
+;;; Code:
+
+(require 'emacsql-sqlite)
+
+(require 'sqlite3 nil t)
+;; Prevent check-declare from finding the defining file but then making
+;; noise because it fails to find the definition because it is a module.
+(declare-function sqlite3-open "ext:module:sqlite3-api")
+(declare-function sqlite3-exec "ext:module:sqlite3-api")
+(declare-function sqlite3-close "ext:module:sqlite3-api")
+(defvar sqlite-open-readwrite)
+(defvar sqlite-open-create)
+
+(emacsql-register-reserved emacsql-sqlite-reserved)
+
+(defclass emacsql-sqlite-module-connection (emacsql--sqlite-base) ()
+  "A connection to a SQLite database using a module.")
+
+(cl-defmethod initialize-instance :after
+  ((connection emacsql-sqlite-module-connection) &rest _)
+  (require (quote sqlite3))
+  (oset connection handle
+        (sqlite3-open (or (oref connection file) ":memory:")
+                      sqlite-open-readwrite
+                      sqlite-open-create))
+  (emacsql-sqlite-set-busy-timeout connection)
+  (emacsql connection [:pragma (= foreign-keys on)])
+  (emacsql-register connection))
+
+(cl-defun emacsql-sqlite-module (file &key debug)
+  "Open a connected to database stored in FILE.
+If FILE is nil use an in-memory database.
+
+:debug LOG -- When non-nil, log all SQLite commands to a log
+buffer.  This is for debugging purposes."
+  (let ((connection (make-instance #'emacsql-sqlite-module-connection
+                                   :file file)))
+    (when debug
+      (emacsql-enable-debugging connection))
+    connection))
+
+(cl-defmethod emacsql-live-p ((connection emacsql-sqlite-module-connection))
+  (and (oref connection handle) t))
+
+(cl-defmethod emacsql-close ((connection emacsql-sqlite-module-connection))
+  (when (oref connection handle)
+    (sqlite3-close (oref connection handle))
+    (oset connection handle nil)))
+
+(cl-defmethod emacsql-send-message
+  ((connection emacsql-sqlite-module-connection) message)
+  (condition-case err
+      (let ((include-header emacsql-include-header)
+            (rows ()))
+        (sqlite3-exec (oref connection handle)
+                      message
+                      (lambda (_ row header)
+                        (when include-header
+                          (push header rows)
+                          (setq include-header nil))
+                        (push (mapcan (lambda (col)
+                                        (cond
+                                         ((null col)     (list nil))
+                                         ((equal col "") (list ""))
+                                         ((emacsql-sqlite-read-column col))))
+                                      row)
+                              rows)))
+        (nreverse rows))
+    ((db-error sql-error)
+     (pcase-let* ((`(,_ ,errmsg ,errcode) err)
+                  (`(,_ ,_ ,signal ,errstr)
+                   (assq errcode emacsql-sqlite-error-codes)))
+       (signal (or signal 'emacsql-error)
+               (list errmsg errcode nil errstr))))
+    (error
+     (signal 'emacsql-error (cdr err)))))
+
+(cl-defmethod emacsql ((connection emacsql-sqlite-module-connection) sql &rest args)
+  (emacsql-send-message connection (apply #'emacsql-compile connection sql args)))
+
+(provide 'emacsql-sqlite-module)
+
+;;; emacsql-sqlite-module.el ends here
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-module.elc b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-module.elc
new file mode 100644
index 0000000..f9d7d63
Binary files /dev/null and b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite-module.elc differ
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite.el b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite.el
new file mode 100644
index 0000000..3add7ae
--- /dev/null
+++ b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite.el
@@ -0,0 +1,296 @@
+;;; emacsql-sqlite.el --- Code used by both SQLite back-ends  -*- lexical-binding:t -*-
+
+;; This is free and unencumbered software released into the public domain.
+
+;; Author: Jonas Bernoulli <emacs.emacsql@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.emacsql@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: Unlicense
+
+;;; Commentary:
+
+;; This library contains code that is used by both SQLite back-ends.
+
+;;; Code:
+
+(require 'emacsql)
+
+;;; Base class
+
+(defclass emacsql--sqlite-base (emacsql-connection)
+  ((file :initarg :file
+         :initform nil
+         :type (or null string)
+         :documentation "Database file name.")
+   (types :allocation :class
+          :reader emacsql-types
+          :initform '((integer "INTEGER")
+                      (float "REAL")
+                      (object "TEXT")
+                      (nil nil))))
+  :abstract t)
+
+;;; Constants
+
+(defconst emacsql-sqlite-reserved
+  '( ABORT ACTION ADD AFTER ALL ALTER ANALYZE AND AS ASC ATTACH
+     AUTOINCREMENT BEFORE BEGIN BETWEEN BY CASCADE CASE CAST CHECK
+     COLLATE COLUMN COMMIT CONFLICT CONSTRAINT CREATE CROSS
+     CURRENT_DATE CURRENT_TIME CURRENT_TIMESTAMP DATABASE DEFAULT
+     DEFERRABLE DEFERRED DELETE DESC DETACH DISTINCT DROP EACH ELSE END
+     ESCAPE EXCEPT EXCLUSIVE EXISTS EXPLAIN FAIL FOR FOREIGN FROM FULL
+     GLOB GROUP HAVING IF IGNORE IMMEDIATE IN INDEX INDEXED INITIALLY
+     INNER INSERT INSTEAD INTERSECT INTO IS ISNULL JOIN KEY LEFT LIKE
+     LIMIT MATCH NATURAL NO NOT NOTNULL NULL OF OFFSET ON OR ORDER
+     OUTER PLAN PRAGMA PRIMARY QUERY RAISE RECURSIVE REFERENCES REGEXP
+     REINDEX RELEASE RENAME REPLACE RESTRICT RIGHT ROLLBACK ROW
+     SAVEPOINT SELECT SET TABLE TEMP TEMPORARY THEN TO TRANSACTION
+     TRIGGER UNION UNIQUE UPDATE USING VACUUM VALUES VIEW VIRTUAL WHEN
+     WHERE WITH WITHOUT)
+  "List of all of SQLite's reserved words.
+Also see http://www.sqlite.org/lang_keywords.html.")
+
+(defconst emacsql-sqlite-error-codes
+  '((1  SQLITE_ERROR      emacsql-error      "SQL logic error")
+    (2  SQLITE_INTERNAL   emacsql-internal   nil)
+    (3  SQLITE_PERM       emacsql-access     "access permission denied")
+    (4  SQLITE_ABORT      emacsql-error      "query aborted")
+    (5  SQLITE_BUSY       emacsql-locked     "database is locked")
+    (6  SQLITE_LOCKED     emacsql-locked     "database table is locked")
+    (7  SQLITE_NOMEM      emacsql-memory     "out of memory")
+    (8  SQLITE_READONLY   emacsql-access     "attempt to write a readonly database")
+    (9  SQLITE_INTERRUPT  emacsql-error      "interrupted")
+    (10 SQLITE_IOERR      emacsql-access     "disk I/O error")
+    (11 SQLITE_CORRUPT    emacsql-corruption "database disk image is malformed")
+    (12 SQLITE_NOTFOUND   emacsql-error      "unknown operation")
+    (13 SQLITE_FULL       emacsql-access     "database or disk is full")
+    (14 SQLITE_CANTOPEN   emacsql-access     "unable to open database file")
+    (15 SQLITE_PROTOCOL   emacsql-access     "locking protocol")
+    (16 SQLITE_EMPTY      emacsql-corruption nil)
+    (17 SQLITE_SCHEMA     emacsql-error      "database schema has changed")
+    (18 SQLITE_TOOBIG     emacsql-error      "string or blob too big")
+    (19 SQLITE_CONSTRAINT emacsql-constraint "constraint failed")
+    (20 SQLITE_MISMATCH   emacsql-error      "datatype mismatch")
+    (21 SQLITE_MISUSE     emacsql-error      "bad parameter or other API misuse")
+    (22 SQLITE_NOLFS      emacsql-error      "large file support is disabled")
+    (23 SQLITE_AUTH       emacsql-access     "authorization denied")
+    (24 SQLITE_FORMAT     emacsql-corruption nil)
+    (25 SQLITE_RANGE      emacsql-error      "column index out of range")
+    (26 SQLITE_NOTADB     emacsql-corruption "file is not a database")
+    (27 SQLITE_NOTICE     emacsql-warning    "notification message")
+    (28 SQLITE_WARNING    emacsql-warning    "warning message"))
+  "Alist mapping SQLite error codes to EmacSQL conditions.
+Elements have the form (ERRCODE SYMBOLIC-NAME EMACSQL-ERROR
+ERRSTR).  Also see https://www.sqlite.org/rescode.html.")
+
+;;; Variables
+
+(defvar emacsql-include-header nil
+  "Whether to include names of columns as an additional row.
+Never enable this globally, only let-bind it around calls to `emacsql'.
+Currently only supported by `emacsql-sqlite-builtin-connection' and
+`emacsql-sqlite-module-connection'.")
+
+(defvar emacsql-sqlite-busy-timeout 20
+  "Seconds to wait when trying to access a table blocked by another process.
+See https://www.sqlite.org/c3ref/busy_timeout.html.")
+
+;;; Utilities
+
+(defun emacsql-sqlite-connection (variable file &optional setup use-module)
+  "Return the connection stored in VARIABLE to the database in FILE.
+
+If the value of VARIABLE is a live database connection, return that.
+
+Otherwise open a new connection to the database in FILE and store the
+connection in VARIABLE, before returning it.  If FILE is nil, use an
+in-memory database.  Always enable support for foreign key constrains.
+If optional SETUP is non-nil, it must be a function, which takes the
+connection as only argument.  This function can be used to initialize
+tables, for example.
+
+If optional USE-MODULE is non-nil, then use the external module even
+when Emacs was built with SQLite support.  This is intended for testing
+purposes."
+  (or (let ((connection (symbol-value variable)))
+        (and connection (emacsql-live-p connection) connection))
+      (set variable (emacsql-sqlite-open file nil setup use-module))))
+
+(defun emacsql-sqlite-open (file &optional debug setup use-module)
+  "Open a connection to the database stored in FILE using an SQLite back-end.
+
+Automatically use the best available back-end, as returned by
+`emacsql-sqlite-default-connection'.
+
+If FILE is nil, use an in-memory database.  If optional DEBUG is
+non-nil, log all SQLite commands to a log buffer, for debugging
+purposes.  Always enable support for foreign key constrains.
+
+If optional SETUP is non-nil, it must be a function, which takes the
+connection as only argument.  This function can be used to initialize
+tables, for example.
+
+If optional USE-MODULE is non-nil, then use the external module even
+when Emacs was built with SQLite support.  This is intended for testing
+purposes."
+  (when file
+    (make-directory (file-name-directory file) t))
+  (let* ((class (emacsql-sqlite-default-connection use-module))
+         (connection (make-instance class :file file)))
+    (when debug
+      (emacsql-enable-debugging connection))
+    (emacsql connection [:pragma (= foreign-keys on)])
+    (when setup
+      (funcall setup connection))
+    connection))
+
+(defun emacsql-sqlite-default-connection (&optional use-module)
+  "Determine and return the best SQLite connection class.
+
+Signal an error if none of the connection classes can be used.
+
+If optional USE-MODULE is non-nil, then use the external module even
+when Emacs was built with SQLite support.  This is intended for testing
+purposes."
+  (or (and (not use-module)
+           (fboundp 'sqlite-available-p)
+           (sqlite-available-p)
+           (require 'emacsql-sqlite-builtin)
+           'emacsql-sqlite-builtin-connection)
+      (and (boundp 'module-file-suffix)
+           module-file-suffix
+           (condition-case nil
+               ;; Failure modes:
+               ;; 1. `libsqlite' shared library isn't available.
+               ;; 2. User chooses to not compile `libsqlite'.
+               ;; 3. `libsqlite' compilation fails.
+               (and (require 'sqlite3)
+                    (require 'emacsql-sqlite-module)
+                    'emacsql-sqlite-module-connection)
+             (error
+              (display-warning 'emacsql "\
+Since your Emacs does not come with
+built-in SQLite support [1], but does support C modules, we can
+use an EmacSQL backend that relies on the third-party `sqlite3'
+package [2].
+
+Please install the `sqlite3' Elisp package using your preferred
+Emacs package manager, and install the SQLite shared library
+using your distribution's package manager.  That package should
+be named something like `libsqlite3' [3] and NOT just `sqlite3'.
+
+The legacy backend, which uses a custom SQLite executable, has
+been remove, so we can no longer fall back to that.
+
+[1]: Supported since Emacs 29.1, provided it was not disabled
+     with `--without-sqlite3'.
+[2]: https://github.com/pekingduck/emacs-sqlite3-api
+[3]: On Debian https://packages.debian.org/buster/libsqlite3-0")
+              ;; The buffer displaying the warning might immediately
+              ;; be replaced by another buffer, before the user gets
+              ;; a chance to see it.  We cannot have that.
+              (let (fn)
+                (setq fn (lambda ()
+                           (remove-hook 'post-command-hook fn)
+                           (pop-to-buffer (get-buffer "*Warnings*"))))
+                (add-hook 'post-command-hook fn))
+              nil)))
+      (error "EmacSQL could not find or compile a back-end")))
+
+(defun emacsql-sqlite-set-busy-timeout (connection)
+  (when emacsql-sqlite-busy-timeout
+    (emacsql connection [:pragma (= busy-timeout $s1)]
+             (* emacsql-sqlite-busy-timeout 1000))))
+
+(defun emacsql-sqlite-read-column (string)
+  (let ((value nil)
+        (beg 0)
+        (end (length string)))
+    (while (< beg end)
+      (let ((v (read-from-string string beg)))
+        (push (car v) value)
+        (setq beg (cdr v))))
+    (nreverse value)))
+
+(defun emacsql-sqlite-list-tables (connection)
+  "Return a list of symbols identifying tables in CONNECTION.
+Tables whose names begin with \"sqlite_\", are not included
+in the returned value."
+  (mapcar #'car
+          (emacsql connection
+                   [:select name
+                    ;; The new name is `sqlite-schema', but this name
+                    ;; is supported by old and new SQLite versions.
+                    ;; See https://www.sqlite.org/schematab.html.
+                    :from sqlite-master
+                    :where (and (= type 'table)
+                                (not-like name "sqlite_%"))
+                    :order-by [(asc name)]])))
+
+(defun emacsql-sqlite-dump-database (connection &optional versionp)
+  "Dump the database specified by CONNECTION to a file.
+
+The dump file is placed in the same directory as the database
+file and its name derives from the name of the database file.
+The suffix is replaced with \".sql\" and if optional VERSIONP is
+non-nil, then the database version (the `user_version' pragma)
+and a timestamp are appended to the file name.
+
+Dumping is done using the official `sqlite3' binary.  If that is
+not available and VERSIONP is non-nil, then the database file is
+copied instead."
+  (let* ((version (caar (emacsql connection [:pragma user-version])))
+         (db (oref connection file))
+         (db (if (symbolp db) (symbol-value db) db))
+         (name (file-name-nondirectory db))
+         (output (concat (file-name-sans-extension db)
+                         (and versionp
+                              (concat (format "-v%s" version)
+                                      (format-time-string "-%Y%m%d-%H%M")))
+                         ".sql")))
+    (cond
+     ((locate-file "sqlite3" exec-path)
+      (when (and (file-exists-p output) versionp)
+        (error "Cannot dump database; %s already exists" output))
+      (with-temp-file output
+        (message "Dumping %s database to %s..." name output)
+        (unless (zerop (save-excursion
+                         (call-process "sqlite3" nil t nil db ".dump")))
+          (error "Failed to dump %s" db))
+        (when version
+          (insert (format "PRAGMA user_version=%s;\n" version)))
+        ;; The output contains "PRAGMA foreign_keys=OFF;".
+        ;; Change that to avoid alarming attentive users.
+        (when (re-search-forward "^PRAGMA foreign_keys=\\(OFF\\);" 1000 t)
+          (replace-match "ON" t t nil 1))
+        (message "Dumping %s database to %s...done" name output)))
+     (versionp
+      (setq output (concat (file-name-sans-extension output) ".db"))
+      (message "Cannot dump database because sqlite3 binary cannot be found")
+      (when (and (file-exists-p output) versionp)
+        (error "Cannot copy database; %s already exists" output))
+      (message "Copying %s database to %s..." name output)
+      (copy-file db output)
+      (message "Copying %s database to %s...done" name output))
+     ((error "Cannot dump database; sqlite3 binary isn't available")))))
+
+(defun emacsql-sqlite-restore-database (db dump)
+  "Restore database DB from DUMP.
+
+DUMP is a file containing SQL statements.  DB can be the file
+in which the database is to be stored, or it can be a database
+connection.  In the latter case the current database is first
+dumped to a new file and the connection is closed.  Then the
+database is restored from DUMP.  No connection to the new
+database is created."
+  (unless (stringp db)
+    (emacsql-sqlite-dump-database db t)
+    (emacsql-close (prog1 db (setq db (oref db file)))))
+  (with-temp-buffer
+    (unless (zerop (call-process "sqlite3" nil t nil db
+                                 (format ".read %s" dump)))
+      (error "Failed to read %s: %s" dump (buffer-string)))))
+
+(provide 'emacsql-sqlite)
+
+;;; emacsql-sqlite.el ends here
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite.elc b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite.elc
new file mode 100644
index 0000000..02ee385
Binary files /dev/null and b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql-sqlite.elc differ
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql.el b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql.el
new file mode 100644
index 0000000..94c3e7a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql.el
@@ -0,0 +1,384 @@
+;;; emacsql.el --- High-level SQL database front-end  -*- lexical-binding:t -*-
+
+;; This is free and unencumbered software released into the public domain.
+
+;; Author: Christopher Wellons <wellons@nullprogram.com>
+;; Maintainer: Jonas Bernoulli <emacs.emacsql@jonas.bernoulli.dev>
+;; Homepage: https://github.com/magit/emacsql
+
+;; Package-Version: 20260601.1722
+;; Package-Revision: d811bbefcb5e
+;; Package-Requires: ((emacs "28.1"))
+
+;; SPDX-License-Identifier: Unlicense
+
+;;; Commentary:
+
+;; EmacSQL is a high-level Emacs Lisp front-end for SQLite.
+
+;; PostgreSQL and MySQL are also supported, but use of these connectors
+;; is not recommended.
+
+;; Any readable lisp value can be stored as a value in EmacSQL,
+;; including numbers, strings, symbols, lists, vectors, and closures.
+;; EmacSQL has no concept of TEXT values; it's all just lisp objects.
+;; The lisp object `nil' corresponds 1:1 with NULL in the database.
+
+;; See README.md for much more complete documentation.
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'cl-generic)
+(require 'eieio)
+
+(require 'emacsql-compiler)
+
+(defgroup emacsql nil
+  "The EmacSQL SQL database front-end."
+  :group 'comm)
+
+(defconst emacsql-version "4.4.1")
+
+(defvar emacsql-global-timeout 30
+  "Maximum number of seconds to wait before bailing out on a SQL command.
+If nil, wait forever.  This is used by the `mysql', `pg' and `psql'.  It
+is not being used by the `sqlite-builtin' and `sqlite-module' back-ends,
+which respect `emacsql-sqlite-busy-timeout' instead.")
+
+;;; Database connection
+
+(defclass emacsql-connection ()
+  ((handle :initarg :handle
+           :documentation "Internal connection handler.
+The value is a record-like object and should not be accessed
+directly.  Depending on the concrete implementation, `type-of'
+may return `process', `user-ptr' or `sqlite' for this value.")
+   (log-buffer :type (or null buffer)
+               :initarg :log-buffer
+               :initform nil
+               :documentation "Output log (debug).")
+   (finalizer :documentation "Object returned from `make-finalizer'.")
+   (types :allocation :class
+          :initform nil
+          :reader emacsql-types
+          :documentation "Maps EmacSQL types to SQL types."))
+  "A connection to a SQL database."
+  :abstract t)
+
+(cl-defgeneric emacsql-close (connection)
+  "Close CONNECTION and free all resources.")
+
+(cl-defgeneric emacsql-reconnect (connection)
+  "Re-establish CONNECTION with the same parameters.")
+
+(cl-defmethod emacsql-live-p ((connection emacsql-connection))
+  "Return non-nil if CONNECTION is still alive and ready."
+  (and (process-live-p (oref connection handle)) t))
+
+(cl-defgeneric emacsql-types (connection)
+  "Return an alist mapping EmacSQL types to database types.
+This will mask `emacsql-type-map' during expression compilation.
+This alist should have four key symbols: integer, float, object,
+nil (default type).  The values are strings to be inserted into
+a SQL expression.")
+
+(cl-defmethod emacsql-buffer ((connection emacsql-connection))
+  "Get process buffer for CONNECTION."
+  (process-buffer (oref connection handle)))
+
+(cl-defmethod emacsql-enable-debugging ((connection emacsql-connection))
+  "Enable debugging on CONNECTION."
+  (unless (buffer-live-p (oref connection log-buffer))
+    (oset connection log-buffer (generate-new-buffer " *emacsql-log*"))))
+
+(cl-defmethod emacsql-log ((connection emacsql-connection) message)
+  "Log MESSAGE into CONNECTION's log.
+MESSAGE should not have a newline on the end."
+  (let ((buffer (oref connection log-buffer)))
+    (when buffer
+      (unless (buffer-live-p buffer)
+        (setq buffer (emacsql-enable-debugging connection)))
+      (with-current-buffer buffer
+        (goto-char (point-max))
+        (princ (concat message "\n") buffer)))))
+
+;;; Sending and receiving
+
+(cl-defgeneric emacsql-send-message (connection message)
+  "Send MESSAGE to CONNECTION.")
+
+(cl-defmethod emacsql-send-message :before
+  ((connection emacsql-connection) message)
+  (emacsql-log connection message))
+
+(cl-defmethod emacsql-clear ((connection emacsql-connection))
+  "Clear the connection buffer for CONNECTION-SPEC."
+  (let ((buffer (emacsql-buffer connection)))
+    (when (and buffer (buffer-live-p buffer))
+      (with-current-buffer buffer
+        (erase-buffer)))))
+
+(cl-defgeneric emacsql-waiting-p (connection)
+  "Return non-nil if CONNECTION is ready for more input.")
+
+(cl-defmethod emacsql-wait ((connection emacsql-connection) &optional timeout)
+  "Block until CONNECTION is waiting for further input."
+  (let* ((real-timeout (or timeout emacsql-global-timeout))
+         (end (and real-timeout (+ (float-time) real-timeout))))
+    (while (and (or (null real-timeout) (< (float-time) end))
+                (not (emacsql-waiting-p connection)))
+      (save-match-data
+        (accept-process-output (oref connection handle) real-timeout)))
+    (unless (emacsql-waiting-p connection)
+      (signal 'emacsql-timeout (list "Query timed out" real-timeout)))))
+
+(cl-defgeneric emacsql-parse (connection)
+  "Return the results of parsing the latest output or signal an error.")
+
+(defun emacsql-compile (connection sql &rest args)
+  "Compile s-expression SQL for CONNECTION into a string."
+  (let ((emacsql-type-map (or (and connection (emacsql-types connection))
+                              emacsql-type-map)))
+    (concat (apply #'emacsql-format (emacsql-prepare sql) args) ";")))
+
+(cl-defgeneric emacsql (connection sql &rest args)
+  "Send SQL s-expression to CONNECTION and return the results.")
+
+(cl-defmethod emacsql ((connection emacsql-connection) sql &rest args)
+  (let ((sql-string (apply #'emacsql-compile connection sql args)))
+    (emacsql-clear connection)
+    (emacsql-send-message connection sql-string)
+    (emacsql-wait connection)
+    (emacsql-parse connection)))
+
+;;; Helper mixin class
+
+(defclass emacsql-protocol-mixin () ()
+  "A mixin for back-ends following the EmacSQL protocol.
+The back-end prompt must be a single \"]\" character.  This prompt
+value was chosen because it is unreadable.  Output must have
+exactly one row per line, fields separated by whitespace.  NULL
+must display as \"nil\"."
+  :abstract t)
+
+(cl-defmethod emacsql-waiting-p ((connection emacsql-protocol-mixin))
+  "Return t if the end of the buffer has a properly-formatted prompt.
+Also return t if the connection buffer has been killed."
+  (let ((buffer (emacsql-buffer connection)))
+    (or (not (buffer-live-p buffer))
+        (with-current-buffer buffer
+          (and (>= (buffer-size) 2)
+               (string= "#\n"
+                        (buffer-substring (- (point-max) 2) (point-max))))))))
+
+(cl-defmethod emacsql-handle ((_ emacsql-protocol-mixin) code message)
+  "Signal a specific condition for CODE from CONNECTION.
+Subclasses should override this method in order to provide more
+specific error conditions."
+  (signal 'emacsql-error (list message code)))
+
+(cl-defmethod emacsql-parse ((connection emacsql-protocol-mixin))
+  "Parse well-formed output into an s-expression."
+  (with-current-buffer (emacsql-buffer connection)
+    (goto-char (point-min))
+    (let* ((standard-input (current-buffer))
+           (value (read)))
+      (if (eq value 'error)
+          (emacsql-handle connection (read) (read))
+        (prog1 value
+          (unless (eq (read) 'success)
+            (emacsql-handle connection (read) (read))))))))
+
+;;; Automatic connection cleanup
+
+(defun emacsql-register (connection)
+  "Register CONNECTION for automatic cleanup and return CONNECTION."
+  (prog1 connection
+    (oset connection finalizer
+          (make-finalizer (lambda () (emacsql-close connection))))))
+
+;;; Useful macros
+
+(defmacro emacsql-with-connection (connection-spec &rest body)
+  "Open an EmacSQL connection, evaluate BODY, and close the connection.
+CONNECTION-SPEC establishes a single binding.
+
+  (emacsql-with-connection (db (emacsql-sqlite \"company.db\"))
+    (emacsql db [:create-table foo [x]])
+    (emacsql db [:insert :into foo :values ([1] [2] [3])])
+    (emacsql db [:select * :from foo]))"
+  (declare (indent 1))
+  `(let ((,(car connection-spec) ,(cadr connection-spec)))
+     (unwind-protect
+         (progn ,@body)
+       (emacsql-close ,(car connection-spec)))))
+
+(defvar emacsql--transaction-level 0
+  "Keeps track of nested transactions in `emacsql-with-transaction'.")
+
+(defmacro emacsql-with-transaction (connection &rest body)
+  "Evaluate BODY inside a single transaction, issuing a rollback on error.
+This macro can be nested indefinitely, wrapping everything in a
+single transaction at the lowest level.
+
+Warning: BODY should *not* have any side effects besides making
+changes to the database behind CONNECTION.  Body may be evaluated
+multiple times before the changes are committed."
+  (declare (indent 1))
+  `(let ((emacsql--connection ,connection)
+         (emacsql--completed nil)
+         (emacsql--transaction-level (1+ emacsql--transaction-level))
+         (emacsql--result))
+     (unwind-protect
+         (while (not emacsql--completed)
+           (condition-case nil
+               (progn
+                 (when (= 1 emacsql--transaction-level)
+                   (emacsql emacsql--connection [:begin]))
+                 (let ((result (progn ,@body)))
+                   (setq emacsql--result result)
+                   (when (= 1 emacsql--transaction-level)
+                     (emacsql emacsql--connection [:commit]))
+                   (setq emacsql--completed t)))
+             (emacsql-locked (emacsql emacsql--connection [:rollback])
+                             (sleep-for 0.05))))
+       (when (and (= 1 emacsql--transaction-level)
+                  (not emacsql--completed))
+         (emacsql emacsql--connection [:rollback])))
+     emacsql--result))
+
+(defmacro emacsql-thread (connection &rest statements)
+  "Thread CONNECTION through STATEMENTS.
+A statement can be a list, containing a statement with its arguments."
+  (declare (indent 1))
+  `(let ((emacsql--conn ,connection))
+     (emacsql-with-transaction emacsql--conn
+       ,@(cl-loop for statement in statements
+                  when (vectorp statement)
+                  collect (list 'emacsql 'emacsql--conn statement)
+                  else
+                  collect (append (list 'emacsql 'emacsql--conn) statement)))))
+
+(defmacro emacsql-with-bind (connection sql-and-args &rest body)
+  "For each result row bind the column names for each returned row.
+Returns the result of the last evaluated BODY.
+
+All column names must be provided in the query ($ and * are not
+allowed).  Hint: all of the bound identifiers must be known at
+compile time.  For example, in the expression below the variables
+`name' and `phone' will be bound for the body.
+
+  (emacsql-with-bind db [:select [name phone] :from people]
+    (message \"Found %s with %s\" name phone))
+
+  (emacsql-with-bind db ([:select [name phone]
+                          :from people
+                          :where (= name $1)] my-name)
+    (message \"Found %s with %s\" name phone))
+
+Each column must be a plain symbol, no expressions allowed here."
+  (declare (indent 2))
+  (let ((sql (if (vectorp sql-and-args) sql-and-args (car sql-and-args)))
+        (args (and (not (vectorp sql-and-args)) (cdr sql-and-args))))
+    (cl-assert (eq :select (elt sql 0)))
+    (let ((vars (elt sql 1)))
+      (when (eq vars '*)
+        (error "Must explicitly list columns in `emacsql-with-bind'"))
+      (cl-assert (cl-every #'symbolp vars))
+      `(let ((emacsql--results (emacsql ,connection ,sql ,@args))
+             (emacsql--final nil))
+         (dolist (emacsql--result emacsql--results emacsql--final)
+           (setq emacsql--final
+                 (cl-destructuring-bind ,(cl-coerce vars 'list) emacsql--result
+                   ,@body)))))))
+
+;;; User interaction functions
+
+(defvar emacsql-show-buffer-name "*emacsql-show*"
+  "Name of the buffer for displaying intermediate SQL.")
+
+(defun emacsql--indent ()
+  "Indent and wrap the SQL expression in the current buffer."
+  (save-excursion
+    (goto-char (point-min))
+    (let ((case-fold-search nil))
+      (while (search-forward-regexp " [A-Z]+" nil :no-error)
+        (when (> (current-column) (* fill-column 0.8))
+          (backward-word)
+          (insert "\n    "))))))
+
+(defun emacsql-show-sql (string)
+  "Fontify and display the SQL expression in STRING."
+  (let ((fontified
+         (with-temp-buffer
+           (insert string)
+           (sql-mode)
+           (with-no-warnings ;; autoloaded by previous line
+             (sql-highlight-sqlite-keywords))
+           (font-lock-ensure)
+           (emacsql--indent)
+           (buffer-string))))
+    (with-current-buffer (get-buffer-create emacsql-show-buffer-name)
+      (if (< (length string) fill-column)
+          (message "%s" fontified)
+        (let ((buffer-read-only nil))
+          (erase-buffer)
+          (insert fontified))
+        (special-mode)
+        (visual-line-mode)
+        (pop-to-buffer (current-buffer))))))
+
+(defun emacsql-flatten-sql (sql)
+  "Convert a s-expression SQL into a flat string for display."
+  (cl-destructuring-bind (string . vars) (emacsql-prepare sql)
+    (concat
+     (apply #'format string (cl-loop for i in (mapcar #'car vars)
+                                     collect (intern (format "$%d" (1+ i)))))
+     ";")))
+
+;;;###autoload
+(defun emacsql-show-last-sql (&optional prefix)
+  "Display the compiled SQL of the s-expression SQL expression before point.
+A prefix argument causes the SQL to be printed into the current buffer."
+  (interactive "P")
+  (let ((sexp (if (fboundp 'elisp--preceding-sexp)
+                  (elisp--preceding-sexp)
+                (with-no-warnings
+                  (preceding-sexp)))))
+    (if (emacsql-sql-p sexp)
+        (let ((sql (emacsql-flatten-sql sexp)))
+          (if prefix
+              (insert sql)
+            (emacsql-show-sql sql)))
+      (user-error "Invalid SQL: %S" sexp))))
+
+;;; Fix Emacs' broken vector indentation
+
+(defun emacsql--inside-vector-p ()
+  "Return non-nil if point is inside a vector expression."
+  (let ((start (point)))
+    (save-excursion
+      (beginning-of-defun)
+      (let ((containing-sexp (elt (parse-partial-sexp (point) start) 1)))
+        (and containing-sexp
+             (progn (goto-char containing-sexp)
+                    (looking-at "\\[")))))))
+
+(defun emacsql--calculate-vector-indent (fn &optional parse-start)
+  "Don't indent vectors in `emacs-lisp-mode' like lists."
+  (if (save-excursion (beginning-of-line) (emacsql--inside-vector-p))
+      (let ((lisp-indent-offset 1))
+        (funcall fn parse-start))
+    (funcall fn parse-start)))
+
+(defun emacsql-fix-vector-indentation ()
+  "When called, advise `calculate-lisp-indent' to stop indenting vectors.
+Once activated, vector contents no longer indent like lists."
+  (interactive)
+  (advice-add 'calculate-lisp-indent :around
+              #'emacsql--calculate-vector-indent))
+
+(provide 'emacsql)
+
+;;; emacsql.el ends here
diff --git a/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql.elc b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql.elc
new file mode 100644
index 0000000..430328c
Binary files /dev/null and b/emacs/.emacs.d/elpa/emacsql-20260601.1722/emacsql.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17.signed b/emacs/.emacs.d/elpa/ement-0.17.signed
new file mode 100644
index 0000000..7c046b6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17.signed
@@ -0,0 +1 @@
+Good signature from 645357D2883A0966 GNU ELPA Signing Agent (2023) <elpasign@elpa.gnu.org> (trust undefined) created at 2025-11-17T06:10:00+0800 using EDDSA
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/ement-0.17/.dir-locals.el b/emacs/.emacs.d/elpa/ement-0.17/.dir-locals.el
new file mode 100644
index 0000000..5659260
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/.dir-locals.el
@@ -0,0 +1,5 @@
+;;; Directory Local Variables
+;;; For more information see (info "(emacs) Directory Variables")
+
+((emacs-lisp-mode . ((fill-column . 90)
+		     (indent-tabs-mode . nil))))
diff --git a/emacs/.emacs.d/elpa/ement-0.17/.elpaignore b/emacs/.emacs.d/elpa/ement-0.17/.elpaignore
new file mode 100644
index 0000000..509ac5d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/.elpaignore
@@ -0,0 +1,7 @@
+.github/
+images/
+LICENSE
+Makefile
+makem.sh
+NOTES.org
+screenshots/
diff --git a/emacs/.emacs.d/elpa/ement-0.17/.github/ISSUE_TEMPLATE/bug_report.yml b/emacs/.emacs.d/elpa/ement-0.17/.github/ISSUE_TEMPLATE/bug_report.yml
new file mode 100644
index 0000000..a185836
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/.github/ISSUE_TEMPLATE/bug_report.yml
@@ -0,0 +1,78 @@
+name: Bug Report
+description: File a bug report
+labels: ["bug"]
+assignees:
+  - alphapapa
+body:
+  - type: markdown
+    attributes:
+      value: |
+        Thanks for taking the time to fill out this bug report!
+  - type: input
+    id: os-platform
+    attributes:
+      label: OS/platform
+      description: What operating system or platform are you running Emacs on?
+    validations:
+      required: true
+  - type: textarea
+    id: emacs-provenance
+    attributes:
+      label: Emacs version and provenance
+      description: What version of Emacs are you using, where did you acquire it, and how did you install it?
+    validations:
+      required: true
+  - type: input
+    id: emacs-command
+    attributes:
+      label: Emacs command
+      description: By what method did you run Emacs?  (i.e. what command did you run?)
+    validations:
+      required: true
+  - type: input
+    id: emacs-frame
+    attributes:
+      label: Emacs frame type
+      description: Did the problem happen on a GUI or tty Emacs frame?
+    validations:
+      required: true
+  - type: input
+    id: package-provenance
+    attributes:
+      label: Ement package version and provenance
+      description: What version of Ement.el are you using, where did you acquire it, and how did you install it?
+    validations:
+      required: true
+  - type: textarea
+    id: actions
+    attributes:
+      label: Actions taken
+      description: What actions did you take, step-by-step, in order, before the problem was noticed?
+    validations:
+      required: true
+  - type: textarea
+    id: results
+    attributes:
+      label: Observed results
+      description: What behavior did you observe that seemed wrong?
+    validations:
+      required: true
+  - type: textarea
+    id: expected
+    attributes:
+      label: Expected results
+      description: What behavior did you expect to observe?
+    validations:
+      required: true
+  - type: textarea
+    id: backtrace
+    attributes:
+      label: Backtrace
+      description: If an error was signaled, please use `M-x toggle-debug-on-error RET` and cause the error to happen again, then paste the contents of the `*Backtrace*` buffer here.
+      render: elisp
+  - type: textarea
+    id: etc
+    attributes:
+      label: Etc.
+      description: Any other information that seems relevant
+
diff --git a/emacs/.emacs.d/elpa/ement-0.17/.github/ISSUE_TEMPLATE/config.yml b/emacs/.emacs.d/elpa/ement-0.17/.github/ISSUE_TEMPLATE/config.yml
new file mode 100644
index 0000000..0086358
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/.github/ISSUE_TEMPLATE/config.yml
@@ -0,0 +1 @@
+blank_issues_enabled: true
diff --git a/emacs/.emacs.d/elpa/ement-0.17/.github/workflows/test.yml b/emacs/.emacs.d/elpa/ement-0.17/.github/workflows/test.yml
new file mode 100644
index 0000000..d7a68c4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/.github/workflows/test.yml
@@ -0,0 +1,80 @@
+# * test.yml --- Test Emacs packages using makem.sh on GitHub Actions
+
+# URL: https://github.com/alphapapa/makem.sh
+# Version: 0.4.2
+
+# * Commentary:
+
+# Based on Steve Purcell's examples at
+# <https://github.com/purcell/setup-emacs/blob/master/.github/workflows/test.yml>,
+# <https://github.com/purcell/package-lint/blob/master/.github/workflows/test.yml>.
+
+# * License:
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+# * Code:
+
+name: "CI"
+on:
+  pull_request:
+  push:
+    # Comment out this section to enable testing of all branches.
+    branches:
+      - master
+
+jobs:
+  build:
+    runs-on: ubuntu-latest
+    strategy:
+      fail-fast: false
+      matrix:
+        emacs_version:
+          - 27.2
+          - 28.2
+          - 29.1
+          - snapshot
+    steps:
+    - uses: purcell/setup-emacs@master
+      with:
+        version: ${{ matrix.emacs_version }}
+
+    - uses: actions/checkout@v2
+
+    - name: Install Ispell
+      run: |
+        sudo apt-get install ispell
+
+    - name: Initialize sandbox
+      run: |
+        SANDBOX_DIR=$(mktemp -d) || exit 1
+        echo "SANDBOX_DIR=$SANDBOX_DIR" >> $GITHUB_ENV
+        ./makem.sh -vv --sandbox=$SANDBOX_DIR --install-deps --install-linters
+
+    # The "all" rule is not used, because it treats compilation warnings
+    # as failures, so linting and testing are run as separate steps.
+
+    - name: Lint
+      # NOTE: Uncomment this line to treat lint failures as passing
+      #       so the job doesn't show failure.
+      # continue-on-error: true
+      run: ./makem.sh -vv --sandbox=$SANDBOX_DIR lint
+
+    - name: Test
+      if: always()  # Run test even if linting fails.
+      run: ./makem.sh -vv --sandbox=$SANDBOX_DIR test
+
+# Local Variables:
+# eval: (outline-minor-mode)
+# End:
diff --git a/emacs/.emacs.d/elpa/ement-0.17/README-elpa b/emacs/.emacs.d/elpa/ement-0.17/README-elpa
new file mode 100644
index 0000000..1c929dd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/README-elpa
@@ -0,0 +1,1548 @@
+                               ━━━━━━━━━━
+                                EMENT.EL
+                               ━━━━━━━━━━
+
+
+Table of Contents
+─────────────────
+
+1. Installation
+2. Usage
+3. Changelog
+4. Development
+5. License
+
+
+[https://elpa.gnu.org/packages/ement.svg]
+
+Ement.el is a [Matrix] client for [GNU Emacs].  It aims to be simple,
+fast, featureful, and reliable, while integrating naturally with Emacs.
+
+Feel free to join us in the chat room:
+[https://img.shields.io/matrix/ement.el:matrix.org.svg?label=%23ement.el:matrix.org]
+
+
+[https://elpa.gnu.org/packages/ement.svg]
+<https://elpa.gnu.org/packages/ement.html>
+
+[Matrix] <http://www.matrix.org/>
+
+[GNU Emacs] <https://www.gnu.org/software/emacs/>
+
+[https://img.shields.io/matrix/ement.el:matrix.org.svg?label=%23ement.el:matrix.org]
+<https://matrix.to/#/#ement.el:matrix.org>
+
+
+1 Installation
+══════════════
+
+GNU ELPA
+────────
+
+  Ement.el is published in [GNU ELPA] as [ement], so it may be installed
+  in Emacs with the command `M-x package-install RET ement RET'.  This
+  is the recommended way to install Ement.el, as it will install the
+  current stable release.
+
+  The latest development build may be installed from [ELPA-devel] or
+  from Git (see below).
+
+
+[GNU ELPA] <http://elpa.gnu.org/>
+
+[ement] <https://elpa.gnu.org/packages/ement.html>
+
+[ELPA-devel] <https://elpa.gnu.org/devel/ement.html>
+
+
+GNU Guix
+────────
+
+  Ement.el is available in [GNU Guix] as [emacs-ement].
+
+
+[GNU Guix] <https://guix.gnu.org/>
+
+[emacs-ement] <https://packages.guix.gnu.org/packages/emacs-ement/>
+
+
+Debian, Ubuntu
+──────────────
+
+  Ement.el is available in [Debian as elpa-ement] and in [Ubuntu as
+  elpa-ement].
+
+
+[Debian as elpa-ement] <https://packages.debian.org/elpa-ement>
+
+[Ubuntu as elpa-ement]
+<https://packages.ubuntu.com/search?suite=default&section=all&arch=any&keywords=elpa-ement&searchon=names>
+
+
+Nix
+───
+
+  Ement.el is available in [NixOS] as [emacsPackages.ement].
+
+
+[NixOS] <https://nixos.org/>
+
+[emacsPackages.ement]
+<https://search.nixos.org/packages?channel=23.05&show=emacsPackages.ement&from=0&size=50&sort=relevance&type=packages&query=ement>
+
+
+Other distributions
+───────────────────
+
+  Ement.el is also available in some other distributions.  See
+  [Repology] for details.
+
+
+[Repology] <https://repology.org/project/emacs:ement/related>
+
+
+Git master
+──────────
+
+  The `master' branch of the Git repository is intended to be usable at
+  all times; only minor bugs are expected to be found in it before a new
+  stable release is made.
+
+  To install, it is recommended to use [quelpa-use-package], like this
+  (using [this helpful command] for upgrading versions):
+
+  ┌────
+  │ ;; Install and load `quelpa-use-package'.
+  │ (package-install 'quelpa-use-package)
+  │ (require 'quelpa-use-package)
+  │ 
+  │ ;; Install Ement.
+  │ (use-package ement
+  │   :quelpa (ement :fetcher github :repo "alphapapa/ement.el"))
+  └────
+
+  One might also use systems like [Elpaca] or [Straight] (which is also
+  used by [DOOM]), but the author cannot offer support for them.
+
+
+[quelpa-use-package] <https://github.com/quelpa/quelpa-use-package>
+
+[this helpful command]
+<https://github.com/alphapapa/unpackaged.el#upgrade-a-quelpa-use-package-forms-package>
+
+[Elpaca] <https://github.com/progfolio/elpaca>
+
+[Straight] <https://github.com/radian-software/straight.el>
+
+[DOOM] <https://github.com/doomemacs/doomemacs>
+
+
+Manual
+──────
+
+  Ement.el is intended to be installed with Emacs's package system,
+  which will ensure that the required autoloads are generated, etc.  If
+  you choose to install it manually, you're on your own.
+
+
+2 Usage
+═══════
+
+  • 
+  • 
+  • 
+
+  1. Call command `ement-connect' to connect.  Multiple sessions are
+     supported: call the command again with a `C-u' universal prefix to
+     connect to another account.
+  2. Wait for initial sync to complete (which can take a few
+     moments–initial sync JSON responses can be large).
+  3. Use these commands (room-related commands may be called with
+     universal prefix to prompt for the room):
+     • `ement-list-rooms' to view the list of joined rooms.
+     • `ement-view-room' to view a room's buffer, selected with
+       completion.
+     • `ement-create-room' to create a new room.
+     • `ement-create-space' to create a space.
+     • `ement-invite-user' to invite a user to a room.
+     • `ement-join-room' to join a room.
+     • `ement-leave-room' to leave a room.
+     • `ement-forget-room' to forget a room.
+     • `ement-tag-room' to toggle a tag on a room (including
+       favorite/low-priority status).
+     • `ement-list-members' to list members in a room.
+     • `ement-send-direct-message' to send a direct message to a user
+       (in an existing direct room, or creating a new one
+       automatically).
+     • `ement-room-edit-message' to edit a message at point.
+     • `ement-room-send-file' to send a file.
+     • `ement-room-send-image' to send an image.
+     • `ement-room-set-topic' to set a room's topic.
+     • `ement-room-occur' to search in a room's known events.
+     • `ement-room-override-name' to override a room's display name.
+     • `ement-ignore-user' to ignore a user (or with interactive prefix,
+       un-ignore).
+     • `ement-room-set-message-format' to set a room's message format
+       buffer-locally.
+     • `ement-room-toggle-space' to toggle a room's membership in a
+       space (a way to group rooms in Matrix).
+     • `ement-directory' to view a room directory.
+     • `ement-directory-search' to search a room directory.
+  4. Use these special buffers to see events from multiple rooms (you
+     can also reply to messages from these buffers!):
+     • See all new events that mention you in the `*Ement Mentions*'
+       buffer.
+     • See all new events in rooms that have open buffers in the `*Ement
+       Notifications*' buffer.
+
+
+Bindings
+────────
+
+  These bindings are common to all of the following buffer types:
+
+  ⁃ Switch to a room buffer: `M-g M-r'
+  ⁃ Switch to the room list buffer: `M-g M-l'
+  ⁃ Switch to the mentions buffer: `M-g M-m'
+  ⁃ Switch to the notifications buffer: `M-g M-n'
+
+
+Room buffers
+╌╌╌╌╌╌╌╌╌╌╌╌
+
+  Note that if global minor mode `ement-room-self-insert-mode' is
+  enabled (by default it is disabled), typing any of the common
+  printable ascii characters (such as letters) in a room buffer will
+  start a new message, and most of the following bindings are instead
+  accessed via a prefix key.  See the minor mode docstring for details.
+  (The `?' binding is an exception; by default it opens the command menu
+  regardless of this minor mode.)
+
+  ⁃ Show command menu: `?'
+
+
+
+  *Movement*
+
+  ⁃ Next event: `n'
+  ⁃ Previous event: `p'
+  ⁃ End of buffer: `N'
+  ⁃ Scroll up and mark read: `SPC'
+  ⁃ Scroll down: `S-SPC'
+  ⁃ Jump to fully-read marker: `M-g M-p'
+  ⁃ Move read markers to point: `m'
+  ⁃ Load older messages: at top of buffer, scroll contents up
+    (i.e. `S-SPC', `M-v' or `mwheel-scroll')
+
+  *Switching*
+
+  ⁃ List rooms: `M-g M-l'
+  ⁃ Switch to other room: `M-g M-r'
+  ⁃ Switch to mentions buffer: `M-g M-m'
+  ⁃ Switch to notifications buffer: `M-g M-n'
+  ⁃ Quit window: `q'
+
+  *Messages*
+
+  ⁃ Write message: `RET'
+  ⁃ Compose message in buffer: `M-RET' (while writing in minibuffer:
+    `C-c '‍').  Customize the option `ement-room-compose-method' to make
+    `RET' and the other message bindings use a compose buffer by
+    default.  Use command `ement-room-compose-org' to activate Org mode
+    in the compose buffer.
+  ⁃ Write reply to event at point: `S-<return>'
+  ⁃ Edit message: `<insert>'
+  ⁃ Delete message: `C-k'
+  ⁃ Send reaction to event at point, or send same reaction at point: `s
+    r'
+  ⁃ Send emote: `s e'
+  ⁃ Send file: `s f'
+  ⁃ Send image: `s i'
+  ⁃ View event source: `v'
+  ⁃ Complete members and rooms at point: `C-M-i' (standard
+    `completion-at-point' command).  (Type an `@' prefix for a member
+    mention, a `#' prefix for a room alias, or a `!' prefix for a room
+    ID.)
+
+  *Images*
+
+  ⁃ Toggle scale of image (between fit-to-window and thumbnail):
+    `mouse-1'
+  ⁃ Show image in new buffer at full size: `double-mouse-1'
+
+  *Users*
+
+  ⁃ Send direct message: `u RET'
+  ⁃ Invite user: `u i'
+  ⁃ Ignore user: `u I'
+
+  *Room*
+
+  ⁃ Occur search in room: `M-s o'
+  ⁃ List members: `r m'
+  ⁃ Set topic: `r t'
+  ⁃ Set message format: `r f'
+  ⁃ Set notification rules: `r n'
+  ⁃ Override display name: `r N'
+  ⁃ Tag/untag room: `r T'
+
+  *Room membership*
+
+  ⁃ Create room: `R c'
+  ⁃ Join room: `R j'
+  ⁃ Leave room: `R l'
+  ⁃ Forget room: `R F'
+  ⁃ Toggle room's spaces: `R s'
+
+  *Other*
+
+  ⁃ Sync new messages (not necessary if auto sync is enabled; with
+    prefix to force new sync): `g'
+
+
+Room list buffer
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Show buffer of room at point: `RET'
+  ⁃ Show buffer of next unread room: `SPC'
+  ⁃ Move between room names: `TAB' / `<backtab>'
+
+  ⁃ Kill room's buffer: `k'
+  ⁃ Toggle room's membership in a space: `s'
+
+
+Directory buffers
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ View/join a room: `RET' / `mouse-1'
+  ⁃ Load next batch of rooms: `+'
+
+
+Mentions/notifications buffers
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Move between events: `TAB' / `<backtab>'
+  ⁃ Go to event at point in its room buffer: `RET'
+  ⁃ Write reply to event at point (shows the event in its room while
+    writing): `S-<return>'
+
+
+Tips
+────
+
+  ⁃ Desktop notifications are enabled by default for events that mention
+    the local user.  They can also be shown for all events in rooms with
+    open buffers.
+  ⁃ Send messages in Org mode format by customizing the option
+    `ement-room-send-message-filter' (which enables Org format by
+    default), or by calling `ement-room-compose-org' in a compose buffer
+    (which enables it for a single message).  Then Org-formatted
+    messages are automatically converted and sent as HTML-formatted
+    messages (with the Org syntax as the plain-text fallback).  You can
+    send syntax such as:
+    • Bold, italic, underline, strikethrough
+    • Links
+    • Tables
+    • Source blocks (including results with `:exports both')
+    • Footnotes (okay, that might be pushing it, but you can!)
+    • And, generally, anything that Org can export to HTML
+    • Note that the default `org-export-preserve-breaks' value causes
+      singular line breaks to be exported as spaces.  To preserve the
+      line breaks, indentation, and blank lines in a region, but
+      otherwise use normal formatting, you can use the `verse' block
+      type.  Refer to `(info "(org) Paragraphs")' and `(info "(org)
+      Structure Templates")' for details.
+  ⁃ Starting in the room list buffer, by pressing `SPC' repeatedly, you
+    can cycle through and read all rooms with unread buffers.  (If a
+    room doesn't have a buffer, it will not be included.)
+  ⁃ Room buffers and the room-list buffer can be bookmarked in Emacs,
+    i.e. using `C-x r m'.  This is especially useful with [Burly]: you
+    can arrange an Emacs frame with several room buffers displayed at
+    once, use `burly-bookmark-windows' to bookmark the layout, and then
+    you can restore that layout and all of the room buffers by opening
+    the bookmark, rather than having to manually arrange them every time
+    you start Emacs or change the window configuration.
+  ⁃ Images and other files can be uploaded to rooms using drag-and-drop.
+  ⁃ Mention members by typing a `@' followed by their displayname or
+    Matrix ID.  (Members' names and rooms' aliases/IDs may be completed
+    with `completion-at-point' commands.)
+  ⁃ Customize `ement-room-use-variable-pitch' to render messages using
+    proportional fonts.
+  ⁃ You can customize settings in the `ement' group.
+    • *Note:* `setq' should not be used for certain options, because it
+       will not call the associated setter function.  Users who have an
+       aversion to the customization system may experience problems.
+
+
+[Burly] <https://github.com/alphapapa/burly.el>
+
+Displaying symbols and emojis
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  Emacs may not display certain symbols and emojis well by default.
+  Based on [this question and answer], you may find that the simplest
+  way to fix this is to install an appropriate font, like [Noto Emoji],
+  and then use this Elisp code:
+
+  ┌────
+  │ (setf use-default-font-for-symbols nil)
+  │ (set-fontset-font t 'unicode "Noto Emoji" nil 'append)
+  └────
+
+
+[this question and answer]
+<https://emacs.stackexchange.com/questions/62049/override-the-default-font-for-emoji-characters>
+
+[Noto Emoji] <https://www.google.com/get/noto/#emoji-zsye>
+
+
+Encrypted room support through Pantalaimon
+──────────────────────────────────────────
+
+  Ement.el doesn't support encrypted rooms natively, but it can be used
+  transparently with the E2EE-aware reverse proxy daemon [Pantalaimon].
+  After configuring it according to its documentation, call
+  `ement-connect' with the appropriate hostname and port, like:
+
+  ┌────
+  │ (ement-connect :uri-prefix "http://localhost:8009")
+  └────
+
+
+[Pantalaimon] <https://github.com/matrix-org/pantalaimon/>
+
+
+3 Changelog
+═══════════
+
+0.17
+────
+
+  *Additions*
+
+  ⁃ Command `ement-room-download-file', which downloads the file in the
+    event at point (for image, audio, video, and file messages).
+    ([#323].  Thanks to [Arto Jantunen].)
+  ⁃ Customization groups for faces.  (Thanks to [Phil Sainty].)
+  ⁃ Option `ement-room-hide-redacted-message-content', which hides the
+    content of redacted messages by default.  It may be disabled to keep
+    redacted content visible with a strikethrough face, which may be
+    useful for room moderators, but users should keep in mind that doing
+    so will leave unpleasant content visible in the current session,
+    even after being redacted by moderators.
+  ⁃ Option `ement-room-list-avatar-generation': if disabled, SVG-based
+    room avatars are not generated.  This option automatically tests
+    whether SVG support is available in Emacs, and should allow use with
+    builds of Emacs that lack `librsvg' support.
+
+  *Changes*
+
+  ⁃ Disable underline for faces `ement-room-list-direct' and
+    `ement-room-list-name' (in case a face they inherit from enables it,
+    e.g. when themed).
+
+  *Fixes*
+
+  ⁃ Call `eww-browse-url' instead of `browse-url' in
+    `ement-room-browse-mxc' (because the latter is not useful for
+    authenticated media if the user has configured it to use a different
+    browser).  ([#323].  Thanks to [Arto Jantunen].)
+  ⁃ Workaround change in `magit-section' that broke fontification in
+    room-list and directory buffers.  (See [#331].)
+  ⁃ Handle non-symbol commands in `command-history'.  ([#330].  Thanks
+    to [Alex Bennée] for reporting.)
+
+
+[#323] <https://github.com/alphapapa/ement.el/pull/323>
+
+[Arto Jantunen] <https://github.com/viiru->
+
+[Phil Sainty] <https://github.com/phil-s>
+
+[#331] <https://github.com/alphapapa/ement.el/issues/331>
+
+[#330] <https://github.com/alphapapa/ement.el/issues/330>
+
+[Alex Bennée] <https://github.com/stsquad>
+
+
+0.16
+────
+
+  *Compatibility*
+
+  ⁃ Use authenticated media requests (part of Matrix 1.11; see [MSC3916]
+    and [matrix.org's sunsetting unauthenticated media]).
+
+  *Additions*
+
+  ⁃ When option `ement-room-images' is disabled (preventing automatic
+    download and display of images), individual images may be shown by
+    clicking the button in their events.
+
+  *Changes*
+
+  ⁃ Option `ement-room-coalesce-events' may now be set to (and defaults
+    to) a maximum number of events to coalesce together.  (This avoids
+    potential performance problems in rare cases.  See [#247].  Thanks
+    to [Arto Jantunen] for reporting and [Sergio Durigan Junior] for
+    testing.)
+
+  *Fixes*
+  ⁃ Replies to edited messages are correctly sent to the original event
+    (whereas previously they were sent to the edit, which caused
+    reactions to not be shown).  ([#230], [#277].  Thanks to [Phil
+    Sainty] for suggesting, and to [dionisos] for reporting.)
+  ⁃ Set `filter-buffer-substring-function' in room buffers to prevent
+    undesired text properties from being included in copied text.
+    ([#278].  Thanks to [Phil Sainty].)
+  ⁃ Command `ement-disconnect' no longer shows an error message.
+    ([#208].)
+  ⁃ Retrieval of earlier events in a just-joined room.  ([#148].  Thanks
+    to [Richard Brežák] for reporting, and to [Phil Sainty] for
+    testing.)
+  ⁃ Cache computed displaynames in rooms (avoiding unnecessary
+    reiteration and recalculation).  ([#298].  Thanks to [Rutherther]
+    for reporting and testing, and to [Phil Sainty].)
+  ⁃ Customization group for options `ement-room-mode-hook' and
+    `ement-room-self-insert-mode'.  (Thanks to [Phil Sainty].)
+  ⁃ Inheritance for some faces.  ([#303].  Thanks to [Jonas Bernoulli].)
+
+
+[MSC3916]
+<https://github.com/matrix-org/matrix-spec-proposals/pull/3916>
+
+[matrix.org's sunsetting unauthenticated media]
+<https://matrix.org/blog/2024/06/26/sunsetting-unauthenticated-media/>
+
+[#247] <https://github.com/alphapapa/ement.el/issues/247>
+
+[Arto Jantunen] <https://github.com/viiru->
+
+[Sergio Durigan Junior] <https://github.com/sergiodj>
+
+[#230] <https://github.com/alphapapa/ement.el/issues/230>
+
+[#277] <https://github.com/alphapapa/ement.el/issues/277>
+
+[Phil Sainty] <https://github.com/phil-s>
+
+[dionisos] <https://github.com/dionisos2>
+
+[#278] <https://github.com/alphapapa/ement.el/pull/278>
+
+[#208] <https://github.com/alphapapa/ement.el/issues/208>
+
+[#148] <https://github.com/alphapapa/ement.el/issues/148>
+
+[Richard Brežák] <https://github.com/MagicRB>
+
+[#298] <https://github.com/alphapapa/ement.el/issues/298>
+
+[Rutherther] <https://github.com/Rutherther>
+
+[#303] <https://github.com/alphapapa/ement.el/pull/303>
+
+[Jonas Bernoulli] <https://github.com/tarsius>
+
+
+0.15.1
+──────
+
+  *Fixes*
+  ⁃ Handle unnamed rooms in `ement-directory' list.  (See [#248].
+    Thanks to [Hunter Jozwiak] and [Bharath Palavalli] for reporting.)
+  ⁃ Don't use `cl-type' `pcase' form in Emacs versions before 28.
+    ([#279].  Thanks to [Adam Bark] for reporting.)
+
+
+[#248] <https://github.com/alphapapa/ement.el/issues/248>
+
+[Hunter Jozwiak] <https://github.com/hjozwiak>
+
+[Bharath Palavalli] <https://github.com/bmp>
+
+[#279] <https://github.com/alphapapa/ement.el/issues/279>
+
+[Adam Bark] <https://github.com/AdamBark>
+
+
+0.15
+────
+
+  *Additions*
+
+  Configurable emoji picker for sending reactions.  ([#199], [#201].  Thanks to [Omar Antolín Camarena].)
+        • Option `ement-room-reaction-picker' sets the default picker.
+          Within that, the user may press `C-g' to choose a different
+          one with a key bound in `ement-room-reaction-map'.
+
+  A variety of enhancements for using compose buffers.  ([#140].  Thanks to [Phil Sainty].)
+        Chiefly, messages can now be composed in small windows below
+        room windows, rather than in the minibuffer or a full-sized
+        window.  A variety of options and commands are available related
+        to these features.  See [compose buffer enhancements].
+
+  Global minor mode `ement-room-self-insert-mode' enables "just typing" to start a message.  (Thanks to [Phil Sainty].)
+        See [ement-room-self-insert-mode].
+
+  Options affecting how images are displayed in room buffers.
+        See [image display].
+
+  *Changes*
+
+  ⁃ Improve prompt used when viewing a room that is not joined.
+    ([#241].  Thanks to [Phil Sainty].)
+  ⁃ Format "was kicked and rejoined" membership event pairs.
+  ⁃ Enclose reasons for membership events in quotes for clarity.
+  ⁃ Improve default room list grouping.
+  ⁃ When editing or replying to a message in a compose buffer, the
+    related room event is highlighted persistently until the compose
+    buffer is killed.  (Thanks to [Phil Sainty].)
+  ⁃ In compose buffers `dabbrev' will prioritise firstly the associated
+    room, and secondly all other rooms, before looking to other buffers
+    for completions.  (Thanks to [Phil Sainty].)
+  ⁃ Aborted messages are now added to `ement-room-message-history'
+    rather than the kill-ring.  (Thanks to [Phil Sainty].)
+  ⁃ Prefix bindings in `ement-room-mode-map' now have named labels in
+    `which-key' and similar.  (Thanks to [Phil Sainty].)
+  ⁃ Option: `ement-room-use-variable-pitch' (previously named
+    `ement-room-shr-use-fonts') enables variable-pitch fonts for all
+    message types.  (This option previously supported formatted
+    messages, but now works for plain text messages as well.)  Note:
+    users who have customized the `ement-room-message-text' face to be
+    variable-pitch should revert that change, as it causes problems for
+    formatted messages, and is no longer necessary.  ([#174].  Thanks to
+    [Phil Sainty].)
+
+  *Fixes*
+
+  ⁃ Edits to previous edit events are correctly sent to the server as
+    edits to the original message event.  ([#230].  Thanks to [Phil
+    Sainty].)
+  ⁃ Completion at point works more reliably in compose buffers.  (Thanks
+    to [Phil Sainty].)
+  ⁃ Toggling images to fill the window body no longer triggers
+    unintended scrolling.  (Thanks to [Phil Sainty].)
+  ⁃ Recognition of mentions after a newline.  ([#267].  Thanks to [Phil
+    Sainty].)
+  ⁃ Newlines in `ement-room-message-format-spec' are considered when
+    calculating the wrap-prefix.  (Thanks to [Phil Sainty].)
+  ⁃ Weight of face `ement-room-list-direct' (now correctly bold in room
+    list heading).
+
+
+[#199] <https://github.com/alphapapa/ement.el/issues/199>
+
+[#201] <https://github.com/alphapapa/ement.el/pull/201>
+
+[Omar Antolín Camarena] <https://github.com/oantolin>
+
+[#140] <https://github.com/alphapapa/ement.el/issues/140>
+
+[Phil Sainty] <https://github.com/phil-s>
+
+[compose buffer enhancements] See section Compose buffer enhancements
+
+[ement-room-self-insert-mode] See section `ement-room-self-insert-mode'
+
+[image display] See section Image display
+
+[#241] <https://github.com/alphapapa/ement.el/issues/241>
+
+[#174] <https://github.com/alphapapa/ement.el/issues/174>
+
+[#230] <https://github.com/alphapapa/ement.el/issues/230>
+
+[#267] <https://github.com/alphapapa/ement.el/issues/267>
+
+Compose buffer enhancements
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  • Option `ement-room-compose-buffer-display-action' declares how and
+    where a new compose buffer window should be displayed.  (By default,
+    in a new window below the associated room buffer.)
+  • Option `ement-room-compose-buffer-window-dedicated' determines
+    whether compose buffers will have dedicated windows.
+  • Option `ement-room-compose-buffer-window-auto-height' causes dynamic
+    scaling of the compose buffer window height so that the full message
+    is visible at all times.
+  • Option `ement-room-compose-buffer-window-auto-height-min' specifies
+    the minimum window height when
+    `ement-room-compose-buffer-window-auto-height' is enabled.
+  • Option `ement-room-compose-buffer-window-auto-height-max' specifies
+    the maximum window height when
+    `ement-room-compose-buffer-window-auto-height' is enabled.
+  • Option `ement-room-compose-method' chooses between
+    minibuffer-centric or compose-buffer-centric behaviour.
+  • Command `ement-room-dispatch-new-message' starts writing a new
+    message using your chosen `ement-room-compose-method'.  (Bound to
+    `RET' in room buffers.)
+  • Command `ement-room-dispatch-new-message-alt' starts writing a new
+    message using the alternative method.  (Bound to `M-RET' in room
+    buffers.)
+  • Command `ement-room-dispatch-edit-message' edits a message using
+    your chosen `ement-room-compose-method'.  (Bound to `<insert>' in
+    room buffers.)
+  • Command `ement-room-dispatch-reply-to-message' replies to a message
+    using your chosen `ement-room-compose-method'.  (Bound to
+    `S-<return>' in room buffers.)
+  • Command `ement-room-compose-edit' edits a message using a compose
+    buffer.
+  • Command `ement-room-compose-reply' replies to a message using a
+    compose buffer.
+  • Command `ement-room-compose-send-direct' sends a message directly
+    from a compose buffer (without the minibuffer).  (Bound to `C-x C-s'
+    in compose buffers.)
+  • Command `ement-room-compose-abort' kills the compose buffer and
+    delete its window.  (Bound to `C-c C-k' in compose buffers.)
+  • Command `ement-room-compose-abort-no-history' does the same without
+    adding to `ement-room-message-history'.  (Equivalent to `C-u C-c
+    C-k'.)
+  • Command `ement-room-compose-history-prev-message' cycles backwards
+    through `ement-room-message-history'.  (Bound to `M-p' in compose
+    buffers.)
+  • Command `ement-room-compose-history-next-message' cycles forwards
+    through `ement-room-message-history'.  (Bound to `M-n' in compose
+    buffers.)
+  • Command `ement-room-compose-history-isearch-backward' initiates an
+    isearch through `ement-room-message-history'.  (Bound to `M-r' in
+    compose buffers; continue searching with `C-r' or `C-s'.)
+  • Command `ement-room-compose-history-isearch-backward-regexp'
+    initiates a regexp isearch through `ement-room-message-history'.
+    (Bound to `C-M-r' in compose buffers; continue searching with `C-r'
+    or `C-s'.)
+
+
+`ement-room-self-insert-mode'
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  • Option `ement-room-self-insert-commands' determines which commands
+    will start a new message when `ement-room-self-insert-mode' is
+    enabled (defaulting to `self-insert-command' and `yank').
+  • Option `ement-room-self-insert-chars' determines which typed
+    characters will start a new message when
+    `ement-room-self-insert-mode' is enabled (regardless of whether they
+    are bound to `self-insert-command').
+  • Option `ement-room-mode-map-prefix-key' defines a prefix key for
+    accessing the full `ement-room-mode-map' when
+    `ement-room-self-insert-mode' is enabled.  (By default this key is
+    `DEL'.)
+
+
+Image display
+╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  • Option `ement-room-image-margin' is the number of pixels of margin
+    around image thumbnails.
+  • Option `ement-room-image-relief' is the number of pixels of shadow
+    rectangle around image thumbnails.
+  • Option `ement-room-image-thumbnail-height' is the window body height
+    multiple to use when toggling full-sized images to thumbnails (by
+    default, 0.2).
+  • Option `ement-room-image-thumbnail-height-min' is the minimum pixel
+    height for thumbnail images (by default, 30 pixels).
+
+
+0.14
+────
+
+  *Additions*
+
+  ⁃ Audio events are rendered as a link to the audio file.  (Thanks to
+    [Arto Jantunen].)
+  ⁃ Customization group `ement-room-list'.
+  ⁃ Option `ement-room-list-space-prefix' is applied to space names in
+    the room list (e.g. set to empty string for cleaner appearance).
+  ⁃ Option `ement-room-reaction-names-limit' sets how many senders of a
+    reaction are shown in the buffer (more than that many are shown in
+    the tooltip).
+
+  *Changes*
+
+  ⁃ Bind `TAB' / `BACKTAB' to move between links in room and like
+    buffers.  ([#113].  Thanks to [Eric S. Fraga] for suggesting.)
+
+  *Fixes*
+
+  ⁃ Insertion of sender headers (when using "Elemental" message format).
+    (Refactoring contributed by [Steven Allen].)
+  ⁃ Some room event data was being unintentionally serialized to disk
+    when caching the room list visibility state. ([#256])
+  ⁃ Notifications buffer restores properly when bookmarked.
+  ⁃ Command `ement-room-send-reaction' checks for an event at point.
+    (Thanks to [Phil Sainty].)
+
+
+[Arto Jantunen] <https://github.com/viiru->
+
+[#113] <https://github.com/alphapapa/ement.el/issues/113>
+
+[Eric S. Fraga] <https://github.com/ericsfraga>
+
+[Steven Allen] <https://github.com/Stebalien>
+
+[#256] <https://github.com/alphapapa/ement.el/issues/256>
+
+[Phil Sainty] <https://github.com/phil-s>
+
+
+0.13
+────
+
+  *Additions*
+
+  ⁃ Group joined direct rooms in directory buffers.
+  ⁃ Command `end-of-buffer' is bound to `N' in room buffers.
+
+  *Changes*
+
+  ⁃ Command `ement-room-image-show' use frame parameters to maximize the
+    frame, making it easier for users to override.  ([#223].  Thanks to
+    [Nicholas Vollmer].)
+
+  *Fixes*
+
+  ⁃ Name for direct rooms in directory buffers.
+  ⁃ Editing a message from the compose buffer would be sent as a reply
+    to the edited message.  (Fixes [#189].  Thanks to [Phil Sainty] for
+    reporting.)
+  ⁃ Editing an already-edited message.  ([#226].  Thanks to [Phil
+    Sainty] for reporting.)
+  ⁃ Replying to an already-edited message.  ([#227].  Thanks to [Phil
+    Sainty] for reporting.)
+  ⁃ Rendering redactions of edited messages.  ([#228].  Thanks to [Phil
+    Sainty] for reporting.)
+  ⁃ Redacting an edited message.  ([#228].  Thanks to [Phil Sainty] for
+    reporting.)
+  ⁃ Command `ement-room-flush-colors' maintains point position.
+
+
+[#223] <https://github.com/alphapapa/ement.el/issues/223>
+
+[Nicholas Vollmer] <https://github.com/progfolio>
+
+[#189] <https://github.com/alphapapa/ement.el/issues/189>
+
+[Phil Sainty] <https://github.com/phil-s>
+
+[#226] <https://github.com/alphapapa/ement.el/issues/226>
+
+[#227] <https://github.com/alphapapa/ement.el/issues/227>
+
+[#228] <https://github.com/alphapapa/ement.el/issues/228>
+
+
+0.12
+────
+
+  *Additions*
+
+  ⁃ Command `ement-notifications' shows recent notifications, similar to
+    the pane in the Element client.  (This new command fetches recent
+    notifications from the server and allows scrolling up to retrieve
+    older ones.  Newly received notifications, as configured in the
+    `ement-notify' options, are displayed in the same buffer.  This
+    functionality will be consolidated in the future.)
+  ⁃ Face `ement-room-quote', applied to quoted parts of replies.
+
+  *Changes*
+  ⁃ Commands `ement-room-goto-next' and `ement-room-goto-prev' work more
+    usefully at the end of a room buffer.  (Now pressing `n' on the last
+    event moves point to the end of the buffer so it will scroll
+    automatically for new messages, and then pressing `p' skips over any
+    read marker to the last event.)
+  ⁃ Room buffer bindings:
+    ⁃ `ement-room-goto-next' and `ement-room-goto-prev' are bound to `n'
+      and `p', respectively.
+    ⁃ `ement-room-goto-fully-read-marker' is bound to `M-g M-p' (the
+      mnemonic being "go to previously read").
+  ⁃ The quoted part of a reply now omits the face applied to the rest of
+    the message, helping to distinguish them.
+  ⁃ Commands that read a string from the minibuffer in `ement-room'
+    buffers and `ement-connect' user ID prompts use separate history
+    list variables.
+  ⁃ Use Emacs's Jansson-based JSON-parsing functions when available.
+    (This results in a 3-5x speed improvement for parsing JSON
+    responses, which can be significant for large initial sync
+    responses.  Thanks to [Ryan Rix] for discovering this!)
+
+  *Fixes*
+
+  ⁃ File event formatter assumed that file size metadata would be
+    present (a malformed, e.g. spam, event might not have it).
+  ⁃ Send correct file size when sending files/images.
+  ⁃ Underscores are no longer interpreted as denoting subscripts when
+    sending messages in Org format.  (Thanks to [Phil Sainty].)
+  ⁃ Add workaround for `savehist-mode''s serializing of the
+    `command-history' variable's arguments.  (For `ement-' commands,
+    that may include large data structures, like `ement-session'
+    structs, which should never be serialized or reused, and
+    `savehist''s doing so could cause noticeable delays for users who
+    enabled it).  (See [#216].  Thanks to [Phil Sainty] and other users
+    who helped to discover this problem.)
+
+
+[Ryan Rix] <https://github.com/rrix/>
+
+[Phil Sainty] <https://github.com/phil-s>
+
+[#216] <https://github.com/alphapapa/ement.el/issues/216>
+
+
+0.11
+────
+
+  *Additions*
+  ⁃ Commands `ement-room-image-show' and `ement-room-image-scale' (bound
+    to `RET' and `M-RET' when point is at an image) view and scale
+    images.  (Thanks to [Steven Allen] for these and other image-related
+    improvements.)
+  ⁃ Command `ement-room-image-show-mouse' is used to show an image with
+    the mouse.
+
+  *Changes*
+  ⁃ Enable `image-mode' when showing images in a new buffer.  (Thanks to
+    [Steven Allen].)
+  ⁃ Command `ement-room-image-show' is not used for mouse events.
+  ⁃ Show useful message in SSO login page.
+
+  *Fixes*
+  ⁃ Allow editing of already-edited events.
+  ⁃ Push rules' actions may be listed in any order.  (Fixes
+    compatibility with [v1.7 of the spec].  Thanks to [Steven Allen].)
+  ⁃ Call external browser for SSO login page.  (JavaScript is usually
+    required, which EWW doesn't support, and loading the page twice
+    seems to change state on the server that causes the SSO login to
+    fail, so it's best to load the page in the external browser
+    directly).
+  ⁃ Clean up SSO server process after two minutes in case SSO login
+    fails.
+  ⁃ Don't stop syncing if an error is signaled while sending a
+    notification.
+  ⁃ Command `ement-room-list-next-unread' could enter an infinite loop.
+    (Thanks to [Visuwesh] and `@mrtnmrtn:matrix.org'.)
+  ⁃ Events in notifications buffer could appear out-of-order.  ([#191].
+    Thanks to [Phil Sainty].)
+
+  *Internal*
+  ⁃ The `ement-read-receipt-idle-timer' could be duplicated when using
+    multiple sessions.  ([#196].  Thanks to [Phil Sainty].)
+
+
+[Steven Allen] <https://github.com/Stebalien>
+
+[v1.7 of the spec]
+<https://spec.matrix.org/v1.7/client-server-api/#actions>
+
+[Visuwesh] <https://github.com/vizs>
+
+[#191] <https://github.com/alphapapa/ement.el/issues/191>
+
+[Phil Sainty] <https://github.com/phil-s>
+
+[#196] <https://github.com/alphapapa/ement.el/issues/196>
+
+
+0.10
+────
+
+  *Security Fixes*
+  ⁃ When uploading a GPG-encrypted file (i.e. one whose filename ends in
+    `.gpg'), if the recipient's private key or the symmetric encryption
+    key were cached by Emacs (or a configured agent, like `gpg-agent'),
+    Emacs would automatically decrypt the file while reading its
+    contents and then upload the decrypted contents.  (This happened
+    because the function `insert-file-contents' was used, which does
+    many things automatically, some of which are not even mentioned in
+    its docstring; refer to its entry in the Elisp Info manual for
+    details.  The fix is to use `insert-file-contents-literally'
+    instead.)  Thanks to `@welkinsl:matrix.org' for reporting.
+
+  *Additions*
+  ⁃ Support for Single Sign-On (SSO) authentication.  ([#24].  Thanks to
+    [Jeffrey Stoffers] for development, and to [Phil Sainty], [Jakub
+    Kadlčík], and [Juanjo Presa] for testing.)
+  ⁃ Bind `m' in room buffers to `ement-room-mark-read' (which moves read
+    markers to point).
+
+  *Changes*
+
+  ⁃ Activating a space in the room list uses `ement-view-space' (which
+    shows a directory of rooms in the space) instead of
+    `ement-view-room' (which shows events in the space, which is
+    generally not useful).
+  ⁃ Command `ement-view-room', when used for a space, shows a footer
+    explaining that the buffer is showing a space rather than a normal
+    room, with a button to call `ement-view-space' for it (which lists
+    rooms in the space).
+  ⁃ Command `ement-describe-room' shows whether a room is a space or a
+    normal room.
+  ⁃ Command `ement-view-space' shows the space's name and alias.
+  ⁃ Command `ement-room-scroll-up-mark-read' moves the fully read marker
+    to the top of the window (when the marker's position is within the
+    range of known events), rather than only moving it when at the end
+    of the buffer.  (This eases the process of gradually reading a long
+    backlog of messages.)
+  ⁃ Improve readme export settings.
+
+  *Fixes*
+  ⁃ Extra indentation of some membership events.  (Thanks to [Steven
+    Allen].)
+  ⁃ Customization group for faces.
+  ⁃ Don't reinitialize `ement-room-list-mode' when room list buffer is
+    refreshed.  ([#146].  Thanks to [Ted Reed] for reporting.)
+  ⁃ Don't fetch old events when scrolling to the bottom of a room buffer
+    (only when scrolling to the top).  (Thanks to [Steven Allen].)
+  ⁃ Minor improvements to auto-detection of homeserver URIs.  (See
+    [#24].  Thanks to [Phil Sainty].)
+  ⁃ Uploading of certain filetypes (e.g. Emacs would decompress some
+    archives before uploading).  Thanks to `@welkinsl:matrix.org' for
+    reporting.
+  ⁃ Messages edited multiple times sometimes weren't correctly replaced.
+
+
+[#24] <https://github.com/alphapapa/ement.el/issues/24>
+
+[Jeffrey Stoffers] <https://github.com/Necronian>
+
+[Phil Sainty] <https://github.com/phil-s>
+
+[Jakub Kadlčík] <https://github.com/FrostyX>
+
+[Juanjo Presa] <https://github.com/oneingan>
+
+[Steven Allen] <https://github.com/Stebalien>
+
+[#146] <https://github.com/alphapapa/ement.el/issues/146>
+
+[Ted Reed] <https://github.com/treed>
+
+[#24]
+<https://github.com/alphapapa/ement.el/issues/24#issuecomment-1569518713>
+
+
+0.9.3
+─────
+
+  *Fixes*
+  ⁃ Another attempt at restoring position in room list when refreshing.
+  ⁃ Command `ement-room-list-next-unread'.
+
+
+0.9.2
+─────
+
+  *Fixes*
+  ⁃ Restore position in room list when refreshing.
+  ⁃ Completion in minibuffer.
+
+
+0.9.1
+─────
+
+  *Fixes*
+  ⁃ Error in `ement-room-list' command upon initial sync.
+
+
+0.9
+───
+
+  *Additions*
+
+  ⁃ Option `ement-room-timestamp-header-align' controls how timestamp
+    headers are aligned in room buffers.
+  ⁃ Option `ement-room-view-hook' runs functions when `ement-room-view'
+    is called.  (By default, it refreshes the room list buffer.)
+  ⁃ In the room list, middle-clicking a room which has a buffer closes
+    its buffer.
+  ⁃ Basic support for video events.  (Thanks to [Arto Jantunen].)
+
+  *Changes*
+
+  ⁃ Using new option `ement-room-timestamp-header-align', timestamp
+    headers default to right-aligned.  (With default settings, this
+    keeps them near message timestamps and makes for a cleaner
+    appearance.)
+
+  *Fixes*
+
+  ⁃ Recognition of certain MXID or displayname forms in outgoing
+    messages when linkifying (aka "pilling") them.
+  ⁃ Unreadable room avatar images no longer cause errors.  (Fixes
+    [#147].  Thanks to [@jgarte] for reporting.)
+  ⁃ Don't error in `ement-room-list' when no rooms are joined.  (Fixes
+    [#123].  Thanks to [@Kabouik] and [Omar Antolín Camarena] for
+    reporting.)
+  ⁃ Enable member/room completion in compose buffers.  (Fixes [#115].
+    Thanks to Thanks to [Justus Piater] and [Caleb Chase] for
+    reporting.)
+
+
+[Arto Jantunen] <https://github.com/viiru->
+
+[#147] <https://github.com/alphapapa/ement.el/issues/147>
+
+[@jgarte] <https://github.com/jgarte>
+
+[#123] <https://github.com/alphapapa/ement.el/issues/123>
+
+[@Kabouik] <https://github.com/Kabouik>
+
+[Omar Antolín Camarena] <https://github.com/oantolin>
+
+[#115] <https://github.com/alphapapa/ement.el/issues/115>
+
+[Justus Piater] <https://github.com/piater>
+
+[Caleb Chase] <https://github.com/chasecaleb>
+
+
+0.8.3
+─────
+
+  *Fixes*
+
+  ⁃ Avoid use of `pcase''s `(map :KEYWORD)' form.  (This can cause a
+    broken installation on older versions of Emacs that have an older
+    version of the `map' library loaded, such as Emacs 27.2 included in
+    Debian 11.  Since there's no way to force Emacs to actually load the
+    version of `map' required by this package before installing it
+    (which would naturally happen upon restarting Emacs), we can only
+    avoid using such forms while these versions of Emacs are widely
+    used.)
+
+
+0.8.2
+─────
+
+  *Fixes*
+
+  ⁃ Deduplicate grouped membership events.
+
+
+0.8.1
+─────
+
+  Added missing changelog entry (of course).
+
+
+0.8
+───
+
+  *Additions*
+  ⁃ Command `ement-create-space' creates a new space.
+  ⁃ Command `ement-room-toggle-space' toggles a room's membership in a
+    space (a way to group rooms in Matrix).
+  ⁃ Visibility of sections in the room list is saved across sessions.
+  ⁃ Command `ement-room-list-kill-buffer' kills a room's buffer from the
+    room list.
+  ⁃ Set `device_id' and `initial_device_display_name' upon login
+    (e.g. `Ement.el: username@hostname').  ([#134].  Thanks to [Arto
+    Jantunen] for reporting.)
+
+  *Changes*
+
+  ⁃ Room-related commands may be called interactively with a universal
+    prefix to prompt for the room/session (allowing to send events or
+    change settings in rooms other than the current one).
+  ⁃ Command `ement-room-list' reuses an existing window showing the room
+    list when possible.  ([#131].  Thanks to [Jeff Bowman] for
+    suggesting.)
+  ⁃ Command `ement-tag-room' toggles tags (rather than adding by default
+    and removing when called with a prefix).
+  ⁃ Default room grouping now groups "spaced" rooms separately.
+
+  *Fixes*
+
+  ⁃ Message format filter works properly when writing replies.
+  ⁃ Improve insertion of sender name headers when using the "Elemental"
+    message format.
+  ⁃ Prompts in commands `ement-leave-room' and `ement-forget-room'.
+
+
+[#134] <https://github.com/alphapapa/ement.el/issues/134>
+
+[Arto Jantunen] <https://github.com/viiru->
+
+[#131] <https://github.com/alphapapa/ement.el/issues/131>
+
+[Jeff Bowman] <https://github.com/jeffbowman>
+
+
+0.7
+───
+
+  *Additions*
+
+  ⁃ Command `ement-room-override-name' sets a local override for a
+    room's display name.  (Especially helpful for 1:1 rooms and bridged
+    rooms.  See [MSC3015].)
+
+  *Changes*
+
+  ⁃ Improve display of room tombstones (displayed at top and bottom of
+    buffer, and new room ID is linked to join).
+  ⁃ Use descriptive prompts in `ement-leave-room' and
+    `ement-forget-room' commands.
+
+  *Fixes*
+
+  ⁃ Command `ement-view-space' when called from a room buffer.  (Thanks
+    to [Richard Brežák] for reporting.)
+  ⁃ Don't call `display-buffer' when reverting room list buffer.  (Fixes
+    [#121].  Thanks to [mekeor] for reporting.)
+  ⁃ Retry sync for network timeouts.  (Accidentally broken in v0.6.)
+
+  *Internal*
+
+  ⁃ Function `ement-put-account-data' accepts `:room' argument to put on
+    a room's account data.
+
+
+[MSC3015]
+<https://github.com/matrix-org/matrix-spec-proposals/pull/3015#issuecomment-1451017296>
+
+[Richard Brežák] <https://github.com/MagicRB>
+
+[#121] <https://github.com/alphapapa/ement.el/issues/121>
+
+[mekeor] <https://github.com/mekeor>
+
+
+0.6
+───
+
+  *Additions*
+  ⁃ Command `ement-view-space' to view a space's rooms in a directory
+    buffer.
+
+  *Changes*
+  ⁃ Improve `ement-describe-room' command (formatting, bindings).
+
+  *Fixes*
+  ⁃ Retry sync for HTTP 502 "Bad Gateway" errors.
+  ⁃ Formatting of unban events.
+  ⁃ Update password authentication according to newer Matrix spec.
+    (Fixes compatibility with Conduit servers.  [#66].  Thanks to
+    [Travis Peacock], [Arto Jantunen], and [Stephen D].)
+  ⁃ Image scaling issues.  (Thanks to [Visuwesh].)
+
+
+[#66] <https://github.com/alphapapa/ement.el/issues/66>
+
+[Travis Peacock] <https://github.com/tpeacock19>
+
+[Arto Jantunen] <https://github.com/viiru->
+
+[Stephen D] <https://github.com/scd31>
+
+[Visuwesh] <https://github.com/vizs>
+
+
+0.5.2
+─────
+
+  *Fixes*
+  ⁃ Apply `ement-initial-sync-timeout' properly (important for when the
+    homeserver is slow to respond).
+
+
+0.5.1
+─────
+
+  *Fixes*
+  ⁃ Autoload `ement-directory' commands.
+  ⁃ Faces in `ement-directory' listings.
+
+
+0.5
+───
+
+  *Additions*
+  ⁃ Present "joined-and-left" and "rejoined-and-left" membership event
+    pairs as such.
+  ⁃ Process and show rooms' canonical alias events.
+
+  *Changes*
+  ⁃ The [taxy.el]-based room list, with programmable, smart grouping, is
+    now the default `ement-room-list'.  (The old,
+    `tabulated-list-mode'-based room list is available as
+    `ement-tabulated-room-list'.)
+  ⁃ When selecting a room to view with completion, don't offer spaces.
+  ⁃ When selecting a room with completion, empty aliases and topics are
+    omitted instead of being displayed as nil.
+
+  *Fixes*
+  ⁃ Use of send-message filter when replying.
+  ⁃ Replies may be written in compose buffers.
+
+
+[taxy.el] <https://github.com/alphapapa/taxy.el>
+
+
+0.4.1
+─────
+
+  *Fixes*
+  ⁃ Don't show "curl process interrupted" message when updating a read
+    marker's position again.
+
+
+0.4
+───
+
+  *Additions*
+  ⁃ Option `ement-room-unread-only-counts-notifications', now enabled by
+    default, causes rooms' unread status to be determined only by their
+    notification counts (which are set by the server and depend on
+    rooms' notification settings).
+  ⁃ Command `ement-room-set-notification-state' sets a room's
+    notification state (imitating Element's user-friendly presets).
+  ⁃ Room buffers' Transient menus show the room's notification state
+    (imitating Element's user-friendly presets).
+  ⁃ Command `ement-set-display-name' sets the user's global displayname.
+  ⁃ Command `ement-room-set-display-name' sets the user's displayname in
+    a room (which is also now displayed in the room's Transient menu).
+  ⁃ Column `Notifications' in the `ement-taxy-room-list' buffer shows
+    rooms' notification state.
+  ⁃ Option `ement-interrupted-sync-hook' allows customization of how
+    sync interruptions are handled.  (Now, by default, a warning is
+    displayed instead of merely a message.)
+
+  *Changes*
+  ⁃ When a room's read receipt is updated, the room's buffer is also
+    marked as unmodified.  (In concert with the new option, this makes
+    rooms' unread status more intuitive.)
+
+  *Fixes*
+  ⁃ Binding of command `ement-forget-room' in room buffers.
+  ⁃ Highlighting of `@room' mentions.
+
+
+0.3.1
+─────
+
+  *Fixes*
+  ⁃ Room unread status (when the last event in a room is sent by the
+    local user, the room is considered read).
+
+
+0.3
+───
+
+  *Additions*
+  ⁃ Command `ement-directory' shows a server's room directory.
+  ⁃ Command `ement-directory-search' searches a server's room directory.
+  ⁃ Command `ement-directory-next' fetches the next batch of rooms in a
+    directory.
+  ⁃ Command `ement-leave-room' accepts a `FORCE-P' argument
+    (interactively, with prefix) to leave a room without prompting.
+  ⁃ Command `ement-forget-room' accepts a `FORCE-P' argument
+    (interactively, with prefix) to also leave the room, and to forget
+    it without prompting.
+  ⁃ Option `ement-notify-mark-frame-urgent-predicates' marks the frame
+    as urgent when (by default) a message mentions the local user or
+    "@room" and the message's room has an open buffer.
+
+  *Changes*
+  ⁃ Minor improvements to date/time headers.
+
+  *Fixes*
+  ⁃ Command `ement-describe-room' for rooms without topics.
+  ⁃ Improve insertion of old messages around existing timestamp headers.
+  ⁃ Reduce D-Bus notification system check timeout to 2 seconds (from
+    the default of 25).
+  ⁃ Compatibility with Emacs 27.
+
+
+0.2.1
+─────
+
+  *Fixes*
+  ⁃ Info manual export filename.
+
+
+0.2
+───
+
+  *Changes*
+  ⁃ Read receipts are re-enabled.  (They're now implemented with a
+    global idle timer rather than `window-scroll-functions', which
+    sometimes caused a strange race condition that could cause Emacs to
+    become unresponsive or crash.)
+  ⁃ When determining whether a room is considered unread, non-message
+    events like membership changes, reactions, etc. are ignored.  This
+    fixes a bug that caused certain rooms that had no message events
+    (like some bridged rooms) to appear as unread when they shouldn't
+    have.  But it's unclear whether this is always preferable (e.g. one
+    might want a member leaving a room to cause it to be marked unread),
+    so this is classified as a change rather than simply a fix, and more
+    improvements may be made to this in the future.  (Fixes [#97].
+    Thanks to [Julien Roy] for reporting and testing.)
+  ⁃ The `ement-taxy-room-list' view no longer automatically refreshes
+    the list if the region is active in the buffer.  (This allows the
+    user to operate on multiple rooms without the contents of the buffer
+    changing before completing the process.)
+
+  *Fixes*
+  ⁃ Links to only rooms (as opposed to links to events in rooms) may be
+    activated to join them.
+  ⁃ Read receipts mark the last completely visible event (rather than
+    one that's only partially displayed).
+  ⁃ Prevent error when a room avatar image fails to load.
+
+
+[#97] <https://github.com/alphapapa/ement.el/issues/97>
+
+[Julien Roy] <https://github.com/MrRoy>
+
+
+0.1.4
+─────
+
+  *Fixed*
+  ⁃ Info manual directory headers.
+
+
+0.1.3
+─────
+
+  *Fixed*
+
+  ⁃ Temporarily disable sending of read receipts due to an unusual bug
+    that could cause Emacs to become unresponsive.  (The feature will be
+    re-enabled in a future release.)
+
+
+0.1.2
+─────
+
+  *Fixed*
+  ⁃ Function `ement-room-sync' correctly updates room-list buffers.
+    (Thanks to [Visuwesh].)
+  ⁃ Only send D-Bus notifications when supported.  (Fixes [#83].  Thanks
+    to [Tassilo Horn].)
+
+
+[Visuwesh] <https://github.com/vizs>
+
+[#83] <https://github.com/alphapapa/ement.el/issues/83>
+
+[Tassilo Horn] <https://github.com/tsdh>
+
+
+0.1.1
+─────
+
+  *Fixed*
+  ⁃ Function `ement-room-scroll-up-mark-read' selects the correct room
+    window.
+  ⁃ Option `ement-room-list-avatars' defaults to what function
+    `display-images-p' returns.
+
+
+0.1
+───
+
+  After almost two years of development, the first tagged release.
+  Submitted to GNU ELPA.
+
+
+4 Development
+═════════════
+
+  Bug reports, feature requests, suggestions — /oh my/!
+
+
+Copyright Assignment
+────────────────────
+
+  Ement.el is published in GNU ELPA and is considered part of GNU Emacs.
+  Therefore, cumulative contributions of more than 15 lines of code
+  require that the author assign copyright of such contributions to the
+  FSF.  Authors who are interested in doing so may contact
+  [assign@gnu.org] to request the appropriate form.
+
+
+[assign@gnu.org] <mailto:assign@gnu.org>
+
+
+Matrix spec in Org format
+─────────────────────────
+
+  An Org-formatted version of the Matrix spec is available in the
+  [meta/spec] branch.
+
+
+[meta/spec] <https://github.com/alphapapa/ement.el/tree/meta/spec>
+
+
+Rationale
+─────────
+
+  /This section is preserved for posterity.  As it says, Ement.el has
+  long since surpassed `matrix-client', which should no longer be used./
+
+  Why write a new Emacs Matrix client when there is already
+  [matrix-client.el], by the same author, no less?  A few reasons:
+
+  • `matrix-client' uses an older version of the Matrix spec, r0.3.0,
+    with a few elements of r0.4.0 grafted in.  Bringing it up to date
+    with the current version of the spec, r0.6.1, would be more work
+    than to begin with the current version.  Ement.el targets r0.6.1
+    from the beginning.
+  • `matrix-client' does not use Matrix's lazy-loading feature (which
+    was added to the specification later), so initial sync requests can
+    take a long time for the server to process and can be large
+    (sometimes tens of megabytes of JSON for the client to process!).
+    Ement.el uses lazy-loading, which significantly improves
+    performance.
+  • `matrix-client' automatically makes buffers for every room a user
+    has joined, even if the user doesn't currently want to watch a room.
+    Ement.el opens room buffers on-demand, improving performance by not
+    having to insert events into buffers for rooms the user isn't
+    watching.
+  • `matrix-client' was developed without the intention of publishing it
+    to, e.g. MELPA or ELPA.  It has several dependencies, and its code
+    does not always install or compile cleanly due to macro-expansion
+    issues (apparently depending on the user's Emacs config).  Ement.el
+    is designed to have minimal dependencies outside of Emacs (currently
+    only one, `plz', which could be imported into the project), and
+    every file is linted and compiles cleanly using [makem.sh].
+  • `matrix-client' uses EIEIO, probably unnecessarily, since few, if
+    any, of the benefits of EIEIO are realized in it.  Ement.el uses
+    structs instead.
+  • `matrix-client' uses bespoke code for inserting messages into
+    buffers, which works pretty well, but has a few minor bugs which are
+    difficult to track down.  Ement.el uses Emacs's built-in (and
+    perhaps little-known) `ewoc' library, which makes it much simpler
+    and more reliable to insert and update messages in buffers, and
+    enables the development of advanced UI features more easily.
+  • `matrix-client' was, to a certain extent, designed to imitate other
+    messaging apps.  The result is, at least when used with the
+    `matrix-client-frame' command, fairly pleasing to use, but isn't
+    especially "Emacsy."  Ement.el is intended to better fit into
+    Emacs's paradigms.
+  • `matrix-client''s long name makes for long symbol names, which makes
+    for tedious, verbose code.  `ement' is easy to type and makes for
+    concise, readable code.
+  • The author has learned much since writing `matrix-client' and hopes
+    to write simpler, more readable, more maintainable code in Ement.el.
+    It's hoped that this will enable others to contribute more easily.
+
+  Note that, while `matrix-client' remains usable, and probably will for
+  some time to come, Ement.el has now surpassed it in every way.  The
+  only reason to choose `matrix-client' instead is if one is using an
+  older version of Emacs that isn't supported by Ement.el.
+
+
+[matrix-client.el] <https://github.com/alphapapa/matrix-client.el>
+
+[makem.sh] <https://github.com/alphapapa/makem.sh>
+
+
+5 License
+═════════
+
+  GPLv3
diff --git a/emacs/.emacs.d/elpa/ement-0.17/README.org b/emacs/.emacs.d/elpa/ement-0.17/README.org
new file mode 100644
index 0000000..fc43423
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/README.org
@@ -0,0 +1,833 @@
+#+TITLE: Ement.el
+
+#+PROPERTY: LOGGING nil
+
+# Export options.
+#+OPTIONS: broken-links:t *:t num:1 toc:1
+
+# Info export options.
+#+EXPORT_FILE_NAME: ement.texi
+#+TEXINFO_DIR_CATEGORY: Emacs
+#+TEXINFO_DIR_TITLE: Ement: (ement)
+#+TEXINFO_DIR_DESC: Matrix client for Emacs
+
+# Note: This readme works with the org-make-toc <https://github.com/alphapapa/org-make-toc> package, which automatically updates the table of contents.
+
+#+HTML: <img src="images/logo-128px.png" align="right">
+
+# ELPA badge image.
+[[https://elpa.gnu.org/packages/ement.html][https://elpa.gnu.org/packages/ement.svg]]
+
+Ement.el is a [[http://www.matrix.org/][Matrix]] client for [[https://www.gnu.org/software/emacs/][GNU Emacs]].  It aims to be simple, fast, featureful, and reliable, while integrating naturally with Emacs.
+
+Feel free to join us in the chat room: [[https://matrix.to/#/#ement.el:matrix.org][https://img.shields.io/matrix/ement.el:matrix.org.svg?label=%23ement.el:matrix.org]]
+
+* Contents                                                         :noexport:
+:PROPERTIES:
+:TOC:      :include siblings
+:END:
+:CONTENTS:
+- [[#installation][Installation]]
+- [[#usage][Usage]]
+  - [[#bindings][Bindings]]
+  - [[#tips][Tips]]
+  - [[#encrypted-room-support-through-pantalaimon][Encrypted room support through Pantalaimon]]
+- [[#changelog][Changelog]]
+- [[#development][Development]]
+:END:
+
+* Screenshots                                                      :noexport:
+:PROPERTIES:
+:ID:       d818f690-5f22-4eb0-83e1-4d8ce16c9e5b
+:END:
+
+The default formatting style resembles IRC clients, with each message being prefixed by the username (which enables powerful Emacs features, like using Occur to show all messages from or mentioning a user).  Alternative, built-in styles include an Element-like one with usernames above groups of messages, as well as a classic, no-margins IRC style.  Messages may be optionally displayed with unique colors for each user (with customizable contrast), making it easier to follow conversations.  Timestamp headers are optionally displayed where a certain amount of time passes between events, as well as where the date changes.
+
+[[images/ement-for-twim.png]]
+
+/Two rooms shown in side-by-side buffers, showing inline images, reactions, date/time headings, room avatars, and messages colored by user (using the modus-vivendi Emacs theme)./
+
+[[images/emacs-with-fully-read-line.png]]
+
+/#emacs:libera.chat showing colored text from IRC users, replies with quoted parts, messages colored by user, addressed usernames colored by their user color, highlighted mentions, and the fully-read marker line (using the modus-vivendi Emacs theme)./
+
+[[images/screenshot5.png]]
+
+/Four rooms shown at once, with messages colored by user, in the default Emacs theme./
+
+[[images/screenshot2.png]]
+
+/A room at the top in the "Elemental" display style, with sender names displayed over groups of messages, and only self-messages in an alternate color.  The lower window shows an earlier version of the rooms list./
+
+[[images/reactions.png]]
+
+/Reactions displayed as color emojis (may need [[#displaying-symbols-and-emojis][proper Emacs configuration]])./
+
+* Installation
+:PROPERTIES:
+:TOC:      :depth 0
+:END:
+
+** GNU ELPA
+
+Ement.el is published in [[http://elpa.gnu.org/][GNU ELPA]] as [[https://elpa.gnu.org/packages/ement.html][ement]], so it may be installed in Emacs with the command ~M-x package-install RET ement RET~.  This is the recommended way to install Ement.el, as it will install the current stable release.
+
+The latest development build may be installed from [[https://elpa.gnu.org/devel/ement.html][ELPA-devel]] or from Git (see below).
+
+** GNU Guix
+
+Ement.el is available in [[https://guix.gnu.org/][GNU Guix]] as [[https://packages.guix.gnu.org/packages/emacs-ement/][emacs-ement]].
+
+** Debian, Ubuntu
+
+Ement.el is available in [[https://packages.debian.org/elpa-ement][Debian as elpa-ement]] and in [[https://packages.ubuntu.com/search?suite=default&section=all&arch=any&keywords=elpa-ement&searchon=names][Ubuntu as elpa-ement]].
+
+** Nix
+
+Ement.el is available in [[https://nixos.org/][NixOS]] as [[https://search.nixos.org/packages?channel=23.05&show=emacsPackages.ement&from=0&size=50&sort=relevance&type=packages&query=ement][emacsPackages.ement]].
+
+** Other distributions
+
+Ement.el is also available in some other distributions.  See [[https://repology.org/project/emacs:ement/related][Repology]] for details.
+
+** Git master
+
+The ~master~ branch of the Git repository is intended to be usable at all times; only minor bugs are expected to be found in it before a new stable release is made.
+
+To install, it is recommended to use [[https://github.com/quelpa/quelpa-use-package][quelpa-use-package]], like this (using [[https://github.com/alphapapa/unpackaged.el#upgrade-a-quelpa-use-package-forms-package][this helpful command]] for upgrading versions):
+
+#+BEGIN_SRC elisp
+  ;; Install and load `quelpa-use-package'.
+  (package-install 'quelpa-use-package)
+  (require 'quelpa-use-package)
+
+  ;; Install Ement.
+  (use-package ement
+    :quelpa (ement :fetcher github :repo "alphapapa/ement.el"))
+#+END_SRC
+
+One might also use systems like [[https://github.com/progfolio/elpaca][Elpaca]] or [[https://github.com/radian-software/straight.el][Straight]] (which is also used by [[https://github.com/doomemacs/doomemacs][DOOM]]), but the author cannot offer support for them.
+
+** Manual
+
+Ement.el is intended to be installed with Emacs's package system, which will ensure that the required autoloads are generated, etc.  If you choose to install it manually, you're on your own.
+
+* Usage
+:PROPERTIES:
+:TOC:      :include descendants :depth 1
+:END:
+:CONTENTS:
+- [[#bindings][Bindings]]
+- [[#tips][Tips]]
+- [[#encrypted-room-support-through-pantalaimon][Encrypted room support through Pantalaimon]]
+:END:
+
+1. Call command ~ement-connect~ to connect.  Multiple sessions are supported: call the command again with a ~C-u~ universal prefix to connect to another account.
+2. Wait for initial sync to complete (which can take a few moments--initial sync JSON responses can be large).
+3. Use these commands (room-related commands may be called with universal prefix to prompt for the room):
+   - ~ement-list-rooms~ to view the list of joined rooms.
+   - ~ement-view-room~ to view a room's buffer, selected with completion.
+   - ~ement-create-room~ to create a new room.
+   - ~ement-create-space~ to create a space.
+   - ~ement-invite-user~ to invite a user to a room.
+   - ~ement-join-room~ to join a room.
+   - ~ement-leave-room~ to leave a room.
+   - ~ement-forget-room~ to forget a room.
+   - ~ement-tag-room~ to toggle a tag on a room (including favorite/low-priority status).
+   - ~ement-list-members~ to list members in a room.
+   - ~ement-send-direct-message~ to send a direct message to a user (in an existing direct room, or creating a new one automatically).
+   - ~ement-room-edit-message~ to edit a message at point.
+   - ~ement-room-send-file~ to send a file.
+   - ~ement-room-send-image~ to send an image.
+   - ~ement-room-set-topic~ to set a room's topic.
+   - ~ement-room-occur~ to search in a room's known events.
+   - ~ement-room-override-name~ to override a room's display name.
+   - ~ement-ignore-user~ to ignore a user (or with interactive prefix, un-ignore).
+   - ~ement-room-set-message-format~ to set a room's message format buffer-locally.
+   - ~ement-room-toggle-space~ to toggle a room's membership in a space (a way to group rooms in Matrix).
+   - ~ement-directory~ to view a room directory.
+   - ~ement-directory-search~ to search a room directory.
+4. Use these special buffers to see events from multiple rooms (you can also reply to messages from these buffers!):
+   - See all new events that mention you in the =*Ement Mentions*= buffer.
+   - See all new events in rooms that have open buffers in the =*Ement Notifications*= buffer.
+
+** Bindings
+
+These bindings are common to all of the following buffer types:
+
++ Switch to a room buffer: ~M-g M-r~
++ Switch to the room list buffer: ~M-g M-l~
++ Switch to the mentions buffer: ~M-g M-m~
++ Switch to the notifications buffer: ~M-g M-n~
+
+*** Room buffers
+
+Note that if global minor mode ~ement-room-self-insert-mode~ is enabled (by default it is disabled), typing any of the common printable ascii characters (such as letters) in a room buffer will start a new message, and most of the following bindings are instead accessed via a prefix key.  See the minor mode docstring for details.  (The ~?~ binding is an exception; by default it opens the command menu regardless of this minor mode.)
+
++ Show command menu: ~?~
+
+[[images/transient.png]]
+
+*Movement*
+
++ Next event: ~n~
++ Previous event: ~p~
++ End of buffer: ~N~
++ Scroll up and mark read: ~SPC~
++ Scroll down: ~S-SPC~
++ Jump to fully-read marker: ~M-g M-p~
++ Move read markers to point: ~m~
++ Load older messages: at top of buffer, scroll contents up (i.e. ~S-SPC~, ~M-v~ or ~mwheel-scroll~)
+
+*Switching*
+
++ List rooms: ~M-g M-l~
++ Switch to other room: ~M-g M-r~
++ Switch to mentions buffer: ~M-g M-m~
++ Switch to notifications buffer: ~M-g M-n~
++ Quit window: ~q~
+
+*Messages*
+
++ Write message: ~RET~
++ Compose message in buffer: ~M-RET~ (while writing in minibuffer: ~C-c '‍~).  Customize the option ~ement-room-compose-method~ to make ~RET~ and the other message bindings use a compose buffer by default.  Use command ~ement-room-compose-org~ to activate Org mode in the compose buffer.
++ Write reply to event at point: ~S-<return>~
++ Edit message: ~<insert>~
++ Delete message: ~C-k~
++ Send reaction to event at point, or send same reaction at point: ~s r~
++ Send emote: ~s e~
++ Send file: ~s f~
++ Send image: ~s i~
++ View event source: ~v~
++ Complete members and rooms at point: ~C-M-i~ (standard ~completion-at-point~ command).  (Type an ~@~ prefix for a member mention, a ~#~ prefix for a room alias, or a ~!~ prefix for a room ID.)
+
+*Images*
+
++ Toggle scale of image (between fit-to-window and thumbnail): ~mouse-1~
++ Show image in new buffer at full size: ~double-mouse-1~
+
+*Users*
+
++ Send direct message: ~u RET~
++ Invite user: ~u i~
++ Ignore user: ~u I~
+
+*Room*
+
++ Occur search in room: ~M-s o~
++ List members: ~r m~
++ Set topic: ~r t~
++ Set message format: ~r f~
++ Set notification rules: ~r n~
++ Override display name: ~r N~
++ Tag/untag room: ~r T~
+
+*Room membership*
+
++ Create room: ~R c~
++ Join room: ~R j~
++ Leave room: ~R l~
++ Forget room: ~R F~
++ Toggle room's spaces: ~R s~
+
+*Other*
+
++ Sync new messages (not necessary if auto sync is enabled; with prefix to force new sync): ~g~
+
+*** Room list buffer
+
++ Show buffer of room at point: ~RET~
++ Show buffer of next unread room: ~SPC~
++ Move between room names: ~TAB~ / ~<backtab>~
+
++ Kill room's buffer: ~k~
++ Toggle room's membership in a space: ~s~
+
+*** Directory buffers
+
++ View/join a room: ~RET~ / ~mouse-1~
++ Load next batch of rooms: ~+~
+
+*** Mentions/notifications buffers
+
++ Move between events: ~TAB~ / ~<backtab>~
++ Go to event at point in its room buffer: ~RET~
++ Write reply to event at point (shows the event in its room while writing): ~S-<return>~
+
+** Tips
+
+# TODO: Show sending messages in Org format.
+
++ Desktop notifications are enabled by default for events that mention the local user.  They can also be shown for all events in rooms with open buffers.
++ Send messages in Org mode format by customizing the option ~ement-room-send-message-filter~ (which enables Org format by default), or by calling ~ement-room-compose-org~ in a compose buffer (which enables it for a single message).  Then Org-formatted messages are automatically converted and sent as HTML-formatted messages (with the Org syntax as the plain-text fallback).  You can send syntax such as:
+  - Bold, italic, underline, strikethrough
+  - Links
+  - Tables
+  - Source blocks (including results with ~:exports both~)
+  - Footnotes (okay, that might be pushing it, but you can!)
+  - And, generally, anything that Org can export to HTML
+  - Note that the default ~org-export-preserve-breaks~ value causes singular line breaks to be exported as spaces.  To preserve the line breaks, indentation, and blank lines in a region, but otherwise use normal formatting, you can use the ~verse~ block type.  Refer to ~(info "(org) Paragraphs")~ and ~(info "(org) Structure Templates")~ for details.
++ Starting in the room list buffer, by pressing ~SPC~ repeatedly, you can cycle through and read all rooms with unread buffers.  (If a room doesn't have a buffer, it will not be included.)
++ Room buffers and the room-list buffer can be bookmarked in Emacs, i.e. using =C-x r m=.  This is especially useful with [[https://github.com/alphapapa/burly.el][Burly]]: you can arrange an Emacs frame with several room buffers displayed at once, use =burly-bookmark-windows= to bookmark the layout, and then you can restore that layout and all of the room buffers by opening the bookmark, rather than having to manually arrange them every time you start Emacs or change the window configuration.
++ Images and other files can be uploaded to rooms using drag-and-drop.
++ Mention members by typing a ~@~ followed by their displayname or Matrix ID.  (Members' names and rooms' aliases/IDs may be completed with ~completion-at-point~ commands.)
++ Customize ~ement-room-use-variable-pitch~ to render messages using proportional fonts.
++ You can customize settings in the ~ement~ group.
+  - *Note:* ~setq~ should not be used for certain options, because it will not call the associated setter function.  Users who have an aversion to the customization system may experience problems.
+
+*** Displaying symbols and emojis
+
+Emacs may not display certain symbols and emojis well by default.  Based on [[https://emacs.stackexchange.com/questions/62049/override-the-default-font-for-emoji-characters][this question and answer]], you may find that the simplest way to fix this is to install an appropriate font, like [[https://www.google.com/get/noto/#emoji-zsye][Noto Emoji]], and then use this Elisp code:
+
+#+BEGIN_SRC elisp
+  (setf use-default-font-for-symbols nil)
+  (set-fontset-font t 'unicode "Noto Emoji" nil 'append)
+#+END_SRC
+
+** Encrypted room support through Pantalaimon
+
+Ement.el doesn't support encrypted rooms natively, but it can be used transparently with the E2EE-aware reverse proxy daemon [[https://github.com/matrix-org/pantalaimon/][Pantalaimon]].  After configuring it according to its documentation, call ~ement-connect~ with the appropriate hostname and port, like:
+
+#+BEGIN_SRC elisp
+  (ement-connect :uri-prefix "http://localhost:8009")
+#+END_SRC
+
+* Changelog
+:PROPERTIES:
+:TOC:      :depth 0
+:END:
+
+** 0.17
+
+*Additions*
+
++ Command ~ement-room-download-file~, which downloads the file in the event at point (for image, audio, video, and file messages).  ([[https://github.com/alphapapa/ement.el/pull/323][#323]].  Thanks to [[https://github.com/viiru-][Arto Jantunen]].)
++ Customization groups for faces.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Option ~ement-room-hide-redacted-message-content~, which hides the content of redacted messages by default.  It may be disabled to keep redacted content visible with a strikethrough face, which may be useful for room moderators, but users should keep in mind that doing so will leave unpleasant content visible in the current session, even after being redacted by moderators.
++ Option ~ement-room-list-avatar-generation~: if disabled, SVG-based room avatars are not generated.  This option automatically tests whether SVG support is available in Emacs, and should allow use with builds of Emacs that lack =librsvg= support. 
+
+*Changes*
+
++ Disable underline for faces ~ement-room-list-direct~ and ~ement-room-list-name~ (in case a face they inherit from enables it, e.g. when themed).
+
+*Fixes*
+
++ Call ~eww-browse-url~ instead of ~browse-url~ in ~ement-room-browse-mxc~ (because the latter is not useful for authenticated media if the user has configured it to use a different browser).  ([[https://github.com/alphapapa/ement.el/pull/323][#323]].  Thanks to [[https://github.com/viiru-][Arto Jantunen]].)
++ Workaround change in ~magit-section~ that broke fontification in room-list and directory buffers.  (See [[https://github.com/alphapapa/ement.el/issues/331][#331]].)
++ Handle non-symbol commands in ~command-history~.  ([[https://github.com/alphapapa/ement.el/issues/330][#330]].  Thanks to [[https://github.com/stsquad][Alex Bennée]] for reporting.)
+
+** 0.16
+
+*Compatibility*
+
++ Use authenticated media requests (part of Matrix 1.11; see [[https://github.com/matrix-org/matrix-spec-proposals/pull/3916][MSC3916]] and [[https://matrix.org/blog/2024/06/26/sunsetting-unauthenticated-media/][matrix.org's sunsetting unauthenticated media]]).
+
+*Additions*
+
++ When option ~ement-room-images~ is disabled (preventing automatic download and display of images), individual images may be shown by clicking the button in their events.
+
+*Changes*
+
++ Option ~ement-room-coalesce-events~ may now be set to (and defaults to) a maximum number of events to coalesce together.  (This avoids potential performance problems in rare cases.  See [[https://github.com/alphapapa/ement.el/issues/247][#247]].  Thanks to [[https://github.com/viiru-][Arto Jantunen]] for reporting and [[https://github.com/sergiodj][Sergio Durigan Junior]] for testing.)
+
+*Fixes*
++ Replies to edited messages are correctly sent to the original event (whereas previously they were sent to the edit, which caused reactions to not be shown).  ([[https://github.com/alphapapa/ement.el/issues/230][#230]], [[https://github.com/alphapapa/ement.el/issues/277][#277]].  Thanks to [[https://github.com/phil-s][Phil Sainty]] for suggesting, and to [[https://github.com/dionisos2][dionisos]] for reporting.)
++ Set ~filter-buffer-substring-function~ in room buffers to prevent undesired text properties from being included in copied text.  ([[https://github.com/alphapapa/ement.el/pull/278][#278]].  Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Command ~ement-disconnect~ no longer shows an error message.  ([[https://github.com/alphapapa/ement.el/issues/208][#208]].)
++ Retrieval of earlier events in a just-joined room.  ([[https://github.com/alphapapa/ement.el/issues/148][#148]].  Thanks to [[https://github.com/MagicRB][Richard Brežák]] for reporting, and to [[https://github.com/phil-s][Phil Sainty]] for testing.)
++ Cache computed displaynames in rooms (avoiding unnecessary reiteration and recalculation).  ([[https://github.com/alphapapa/ement.el/issues/298][#298]].  Thanks to [[https://github.com/Rutherther][Rutherther]] for reporting and testing, and to [[https://github.com/phil-s][Phil Sainty]].)
++ Customization group for options ~ement-room-mode-hook~ and ~ement-room-self-insert-mode~.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Inheritance for some faces.  ([[https://github.com/alphapapa/ement.el/pull/303][#303]].  Thanks to [[https://github.com/tarsius][Jonas Bernoulli]].) 
+
+** 0.15.1
+
+*Fixes*
++ Handle unnamed rooms in ~ement-directory~ list.  (See [[https://github.com/alphapapa/ement.el/issues/248][#248]].  Thanks to [[https://github.com/hjozwiak][Hunter Jozwiak]] and [[https://github.com/bmp][Bharath Palavalli]] for reporting.)
++ Don't use ~cl-type~ ~pcase~ form in Emacs versions before 28.  ([[https://github.com/alphapapa/ement.el/issues/279][#279]].  Thanks to [[https://github.com/AdamBark][Adam Bark]] for reporting.)
+
+** 0.15
+:PROPERTIES:
+:ID:       81b48364-56a7-4903-b354-b79905edb039
+:END:
+
+*Additions*
+
++ Configurable emoji picker for sending reactions.  ([[https://github.com/alphapapa/ement.el/issues/199][#199]], [[https://github.com/alphapapa/ement.el/pull/201][#201]].  Thanks to [[https://github.com/oantolin][Omar Antolín Camarena]].) ::
+  - Option ~ement-room-reaction-picker~ sets the default picker.  Within that, the user may press ~C-g~ to choose a different one with a key bound in ~ement-room-reaction-map~.
+
++ A variety of enhancements for using compose buffers.  ([[https://github.com/alphapapa/ement.el/issues/140][#140]].  Thanks to [[https://github.com/phil-s][Phil Sainty]].) :: Chiefly, messages can now be composed in small windows below room windows, rather than in the minibuffer or a full-sized window.  A variety of options and commands are available related to these features.  See [[#compose-buffer-enhancements][compose buffer enhancements]].
+
++ Global minor mode ~ement-room-self-insert-mode~ enables "just typing" to start a message.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].) :: See [[#ement-room-self-insert-mode][ement-room-self-insert-mode]].
+
++ Options affecting how images are displayed in room buffers. :: See [[#image-display][image display]].
+
+*Changes*
+
++ Improve prompt used when viewing a room that is not joined.  ([[https://github.com/alphapapa/ement.el/issues/241][#241]].  Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Format "was kicked and rejoined" membership event pairs.
++ Enclose reasons for membership events in quotes for clarity.
++ Improve default room list grouping.
++ When editing or replying to a message in a compose buffer, the related room event is highlighted persistently until the compose buffer is killed.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ In compose buffers ~dabbrev~ will prioritise firstly the associated room, and secondly all other rooms, before looking to other buffers for completions.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Aborted messages are now added to ~ement-room-message-history~ rather than the kill-ring.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Prefix bindings in ~ement-room-mode-map~ now have named labels in ~which-key~ and similar.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Option: ~ement-room-use-variable-pitch~ (previously named ~ement-room-shr-use-fonts~) enables variable-pitch fonts for all message types.  (This option previously supported formatted messages, but now works for plain text messages as well.)  Note: users who have customized the ~ement-room-message-text~ face to be variable-pitch should revert that change, as it causes problems for formatted messages, and is no longer necessary.  ([[https://github.com/alphapapa/ement.el/issues/174][#174]].  Thanks to [[https://github.com/phil-s][Phil Sainty]].)
+
+*Fixes*
+
++ Edits to previous edit events are correctly sent to the server as edits to the original message event.  ([[https://github.com/alphapapa/ement.el/issues/230][#230]].  Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Completion at point works more reliably in compose buffers.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Toggling images to fill the window body no longer triggers unintended scrolling.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Recognition of mentions after a newline.  ([[https://github.com/alphapapa/ement.el/issues/267][#267]].  Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Newlines in ~ement-room-message-format-spec~ are considered when calculating the wrap-prefix.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Weight of face ~ement-room-list-direct~ (now correctly bold in room list heading).
+
+*** Compose buffer enhancements
+:PROPERTIES:
+:CUSTOM_ID: compose-buffer-enhancements
+:END:
+
+- Option ~ement-room-compose-buffer-display-action~ declares how and where a new compose buffer window should be displayed.  (By default, in a new window below the associated room buffer.)
+- Option ~ement-room-compose-buffer-window-dedicated~ determines whether compose buffers will have dedicated windows.
+- Option ~ement-room-compose-buffer-window-auto-height~ causes dynamic scaling of the compose buffer window height so that the full message is visible at all times.
+- Option ~ement-room-compose-buffer-window-auto-height-min~ specifies the minimum window height when ~ement-room-compose-buffer-window-auto-height~ is enabled.
+- Option ~ement-room-compose-buffer-window-auto-height-max~ specifies the maximum window height when ~ement-room-compose-buffer-window-auto-height~ is enabled.
+- Option ~ement-room-compose-method~ chooses between minibuffer-centric or compose-buffer-centric behaviour.
+- Command ~ement-room-dispatch-new-message~ starts writing a new message using your chosen ~ement-room-compose-method~.  (Bound to ~RET~ in room buffers.)
+- Command ~ement-room-dispatch-new-message-alt~ starts writing a new message using the alternative method.  (Bound to ~M-RET~ in room buffers.)
+- Command ~ement-room-dispatch-edit-message~ edits a message using your chosen ~ement-room-compose-method~.  (Bound to ~<insert>~ in room buffers.)
+- Command ~ement-room-dispatch-reply-to-message~ replies to a message using your chosen ~ement-room-compose-method~.  (Bound to ~S-<return>~ in room buffers.)
+- Command ~ement-room-compose-edit~ edits a message using a compose buffer.
+- Command ~ement-room-compose-reply~ replies to a message using a compose buffer.
+- Command ~ement-room-compose-send-direct~ sends a message directly from a compose buffer (without the minibuffer).  (Bound to ~C-x C-s~ in compose buffers.)
+- Command ~ement-room-compose-abort~ kills the compose buffer and delete its window.  (Bound to ~C-c C-k~ in compose buffers.)
+- Command ~ement-room-compose-abort-no-history~ does the same without adding to ~ement-room-message-history~.  (Equivalent to ~C-u C-c C-k~.)
+- Command ~ement-room-compose-history-prev-message~ cycles backwards through ~ement-room-message-history~.  (Bound to ~M-p~ in compose buffers.)
+- Command ~ement-room-compose-history-next-message~ cycles forwards through ~ement-room-message-history~.  (Bound to ~M-n~ in compose buffers.)
+- Command ~ement-room-compose-history-isearch-backward~ initiates an isearch through ~ement-room-message-history~.  (Bound to ~M-r~ in compose buffers; continue searching with ~C-r~ or ~C-s~.)
+- Command ~ement-room-compose-history-isearch-backward-regexp~ initiates a regexp isearch through ~ement-room-message-history~.  (Bound to ~C-M-r~ in compose buffers; continue searching with ~C-r~ or ~C-s~.)
+
+*** ~ement-room-self-insert-mode~
+:PROPERTIES:
+:CUSTOM_ID: ement-room-self-insert-mode
+:END:
+
+- Option ~ement-room-self-insert-commands~ determines which commands will start a new message when ~ement-room-self-insert-mode~ is enabled (defaulting to ~self-insert-command~ and ~yank~).
+- Option ~ement-room-self-insert-chars~ determines which typed characters will start a new message when ~ement-room-self-insert-mode~ is enabled (regardless of whether they are bound to ~self-insert-command~).
+- Option ~ement-room-mode-map-prefix-key~ defines a prefix key for accessing the full ~ement-room-mode-map~ when ~ement-room-self-insert-mode~ is enabled.  (By default this key is ~DEL~.)
+ 
+*** Image display
+:PROPERTIES:
+:CUSTOM_ID: image-display
+:END:
+
+- Option ~ement-room-image-margin~ is the number of pixels of margin around image thumbnails.
+- Option ~ement-room-image-relief~ is the number of pixels of shadow rectangle around image thumbnails.
+- Option ~ement-room-image-thumbnail-height~ is the window body height multiple to use when toggling full-sized images to thumbnails (by default, 0.2).
+- Option ~ement-room-image-thumbnail-height-min~ is the minimum pixel height for thumbnail images (by default, 30 pixels).
+
+
+
+** 0.14
+
+*Additions*
+
++ Audio events are rendered as a link to the audio file.  (Thanks to [[https://github.com/viiru-][Arto Jantunen]].)
++ Customization group ~ement-room-list~.
++ Option ~ement-room-list-space-prefix~ is applied to space names in the room list (e.g. set to empty string for cleaner appearance).
++ Option ~ement-room-reaction-names-limit~ sets how many senders of a reaction are shown in the buffer (more than that many are shown in the tooltip).
+
+*Changes*
+
++ Bind ~TAB~ / ~BACKTAB~ to move between links in room and like buffers.  ([[https://github.com/alphapapa/ement.el/issues/113][#113]].  Thanks to [[https://github.com/ericsfraga][Eric S. Fraga]] for suggesting.)
+
+*Fixes*
+
++ Insertion of sender headers (when using "Elemental" message format).  (Refactoring contributed by [[https://github.com/Stebalien][Steven Allen]].)
++ Some room event data was being unintentionally serialized to disk when caching the room list visibility state. ([[https://github.com/alphapapa/ement.el/issues/256][#256]])
++ Notifications buffer restores properly when bookmarked.
++ Command ~ement-room-send-reaction~ checks for an event at point.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].)
+
+** 0.13
+
+*Additions*
+
++ Group joined direct rooms in directory buffers.
++ Command ~end-of-buffer~ is bound to ~N~ in room buffers.
+
+*Changes*
+
++ Command ~ement-room-image-show~ use frame parameters to maximize the frame, making it easier for users to override.  ([[https://github.com/alphapapa/ement.el/issues/223][#223]].  Thanks to [[https://github.com/progfolio][Nicholas Vollmer]].)
+
+*Fixes*
+
++ Name for direct rooms in directory buffers.
++ Editing a message from the compose buffer would be sent as a reply to the edited message.  (Fixes [[https://github.com/alphapapa/ement.el/issues/189][#189]].  Thanks to [[https://github.com/phil-s][Phil Sainty]] for reporting.)
++ Editing an already-edited message.  ([[https://github.com/alphapapa/ement.el/issues/226][#226]].  Thanks to [[https://github.com/phil-s][Phil Sainty]] for reporting.)
++ Replying to an already-edited message.  ([[https://github.com/alphapapa/ement.el/issues/227][#227]].  Thanks to [[https://github.com/phil-s][Phil Sainty]] for reporting.)
++ Rendering redactions of edited messages.  ([[https://github.com/alphapapa/ement.el/issues/228][#228]].  Thanks to [[https://github.com/phil-s][Phil Sainty]] for reporting.)
++ Redacting an edited message.  ([[https://github.com/alphapapa/ement.el/issues/228][#228]].  Thanks to [[https://github.com/phil-s][Phil Sainty]] for reporting.)
++ Command ~ement-room-flush-colors~ maintains point position.
+
+** 0.12
+
+*Additions*
+
++ Command ~ement-notifications~ shows recent notifications, similar to the pane in the Element client.  (This new command fetches recent notifications from the server and allows scrolling up to retrieve older ones.  Newly received notifications, as configured in the ~ement-notify~ options, are displayed in the same buffer.  This functionality will be consolidated in the future.)
++ Face ~ement-room-quote~, applied to quoted parts of replies.
+
+*Changes*
++ Commands ~ement-room-goto-next~ and ~ement-room-goto-prev~ work more usefully at the end of a room buffer.  (Now pressing ~n~ on the last event moves point to the end of the buffer so it will scroll automatically for new messages, and then pressing ~p~ skips over any read marker to the last event.)
++ Room buffer bindings:
+  + ~ement-room-goto-next~ and ~ement-room-goto-prev~ are bound to ~n~ and ~p~, respectively.
+  + ~ement-room-goto-fully-read-marker~ is bound to ~M-g M-p~ (the mnemonic being "go to previously read").
++ The quoted part of a reply now omits the face applied to the rest of the message, helping to distinguish them.
++ Commands that read a string from the minibuffer in ~ement-room~ buffers and ~ement-connect~ user ID prompts use separate history list variables.
++ Use Emacs's Jansson-based JSON-parsing functions when available.  (This results in a 3-5x speed improvement for parsing JSON responses, which can be significant for large initial sync responses.  Thanks to [[https://github.com/rrix/][Ryan Rix]] for discovering this!)
+
+*Fixes*
+
++ File event formatter assumed that file size metadata would be present (a malformed, e.g. spam, event might not have it).
++ Send correct file size when sending files/images.
++ Underscores are no longer interpreted as denoting subscripts when sending messages in Org format.  (Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Add workaround for ~savehist-mode~'s serializing of the ~command-history~ variable's arguments.  (For ~ement-~ commands, that may include large data structures, like ~ement-session~ structs, which should never be serialized or reused, and ~savehist~'s doing so could cause noticeable delays for users who enabled it).  (See [[https://github.com/alphapapa/ement.el/issues/216][#216]].  Thanks to [[https://github.com/phil-s][Phil Sainty]] and other users who helped to discover this problem.)
+
+** 0.11
+
+*Additions*
++ Commands ~ement-room-image-show~ and ~ement-room-image-scale~ (bound to ~RET~ and ~M-RET~ when point is at an image) view and scale images.  (Thanks to [[https://github.com/Stebalien][Steven Allen]] for these and other image-related improvements.)
++ Command ~ement-room-image-show-mouse~ is used to show an image with the mouse.
+
+*Changes*
++ Enable ~image-mode~ when showing images in a new buffer.  (Thanks to [[https://github.com/Stebalien][Steven Allen]].)
++ Command ~ement-room-image-show~ is not used for mouse events.
++ Show useful message in SSO login page.
+
+*Fixes*
++ Allow editing of already-edited events.
++ Push rules' actions may be listed in any order.  (Fixes compatibility with [[https://spec.matrix.org/v1.7/client-server-api/#actions][v1.7 of the spec]].  Thanks to [[https://github.com/Stebalien][Steven Allen]].)
++ Call external browser for SSO login page.  (JavaScript is usually required, which EWW doesn't support, and loading the page twice seems to change state on the server that causes the SSO login to fail, so it's best to load the page in the external browser directly).
++ Clean up SSO server process after two minutes in case SSO login fails.
++ Don't stop syncing if an error is signaled while sending a notification.
++ Command ~ement-room-list-next-unread~ could enter an infinite loop.  (Thanks to [[https://github.com/vizs][Visuwesh]] and ~@mrtnmrtn:matrix.org~.)
++ Events in notifications buffer could appear out-of-order.  ([[https://github.com/alphapapa/ement.el/issues/191][#191]].  Thanks to [[https://github.com/phil-s][Phil Sainty]].)
+
+*Internal*
++ The ~ement-read-receipt-idle-timer~ could be duplicated when using multiple sessions.  ([[https://github.com/alphapapa/ement.el/issues/196][#196]].  Thanks to [[https://github.com/phil-s][Phil Sainty]].)
+
+** 0.10
+
+*Security Fixes*
++ When uploading a GPG-encrypted file (i.e. one whose filename ends in ~.gpg~), if the recipient's private key or the symmetric encryption key were cached by Emacs (or a configured agent, like ~gpg-agent~), Emacs would automatically decrypt the file while reading its contents and then upload the decrypted contents.  (This happened because the function ~insert-file-contents~ was used, which does many things automatically, some of which are not even mentioned in its docstring; refer to its entry in the Elisp Info manual for details.  The fix is to use ~insert-file-contents-literally~ instead.)  Thanks to ~@welkinsl:matrix.org~ for reporting.
+
+*Additions*
++ Support for Single Sign-On (SSO) authentication.  ([[https://github.com/alphapapa/ement.el/issues/24][#24]].  Thanks to [[https://github.com/Necronian][Jeffrey Stoffers]] for development, and to [[https://github.com/phil-s][Phil Sainty]], [[https://github.com/FrostyX][Jakub Kadlčík]], and [[https://github.com/oneingan][Juanjo Presa]] for testing.)
++ Bind ~m~ in room buffers to ~ement-room-mark-read~ (which moves read markers to point).
+
+*Changes*
+
++ Activating a space in the room list uses ~ement-view-space~ (which shows a directory of rooms in the space) instead of ~ement-view-room~ (which shows events in the space, which is generally not useful).
++ Command ~ement-view-room~, when used for a space, shows a footer explaining that the buffer is showing a space rather than a normal room, with a button to call ~ement-view-space~ for it (which lists rooms in the space).
++ Command ~ement-describe-room~ shows whether a room is a space or a normal room.
++ Command ~ement-view-space~ shows the space's name and alias.
++ Command ~ement-room-scroll-up-mark-read~ moves the fully read marker to the top of the window (when the marker's position is within the range of known events), rather than only moving it when at the end of the buffer.  (This eases the process of gradually reading a long backlog of messages.)
++ Improve readme export settings.
+
+*Fixes*
++ Extra indentation of some membership events.  (Thanks to [[https://github.com/Stebalien][Steven Allen]].)
++ Customization group for faces.
++ Don't reinitialize ~ement-room-list-mode~ when room list buffer is refreshed.  ([[https://github.com/alphapapa/ement.el/issues/146][#146]].  Thanks to [[https://github.com/treed][Ted Reed]] for reporting.)
++ Don't fetch old events when scrolling to the bottom of a room buffer (only when scrolling to the top).  (Thanks to [[https://github.com/Stebalien][Steven Allen]].)
++ Minor improvements to auto-detection of homeserver URIs.  (See [[https://github.com/alphapapa/ement.el/issues/24#issuecomment-1569518713][#24]].  Thanks to [[https://github.com/phil-s][Phil Sainty]].)
++ Uploading of certain filetypes (e.g. Emacs would decompress some archives before uploading).  Thanks to ~@welkinsl:matrix.org~ for reporting.
++ Messages edited multiple times sometimes weren't correctly replaced.
+
+** 0.9.3
+
+*Fixes*
++ Another attempt at restoring position in room list when refreshing.
++ Command ~ement-room-list-next-unread~.
+
+** 0.9.2
+
+*Fixes*
++ Restore position in room list when refreshing.
++ Completion in minibuffer.
+
+** 0.9.1
+
+*Fixes*
++ Error in ~ement-room-list~ command upon initial sync.
+
+** 0.9
+
+*Additions*
+
++ Option ~ement-room-timestamp-header-align~ controls how timestamp headers are aligned in room buffers.
++ Option ~ement-room-view-hook~ runs functions when ~ement-room-view~ is called.  (By default, it refreshes the room list buffer.)
++ In the room list, middle-clicking a room which has a buffer closes its buffer.
++ Basic support for video events.  (Thanks to [[https://github.com/viiru-][Arto Jantunen]].)
+
+*Changes*
+
++ Using new option ~ement-room-timestamp-header-align~, timestamp headers default to right-aligned.  (With default settings, this keeps them near message timestamps and makes for a cleaner appearance.)
+
+*Fixes*
+
++ Recognition of certain MXID or displayname forms in outgoing messages when linkifying (aka "pilling") them.
++ Unreadable room avatar images no longer cause errors.  (Fixes [[https://github.com/alphapapa/ement.el/issues/147][#147]].  Thanks to [[https://github.com/jgarte][@jgarte]] for reporting.)
++ Don't error in ~ement-room-list~ when no rooms are joined.  (Fixes [[https://github.com/alphapapa/ement.el/issues/123][#123]].  Thanks to [[https://github.com/Kabouik][@Kabouik]] and [[https://github.com/oantolin][Omar Antolín Camarena]] for reporting.)
++ Enable member/room completion in compose buffers.  (Fixes [[https://github.com/alphapapa/ement.el/issues/115][#115]].  Thanks to Thanks to [[https://github.com/piater][Justus Piater]] and [[https://github.com/chasecaleb][Caleb Chase]] for reporting.)
+
+** 0.8.3
+
+*Fixes*
+
++ Avoid use of ~pcase~'s ~(map :KEYWORD)~ form.  (This can cause a broken installation on older versions of Emacs that have an older version of the ~map~ library loaded, such as Emacs 27.2 included in Debian 11.  Since there's no way to force Emacs to actually load the version of ~map~ required by this package before installing it (which would naturally happen upon restarting Emacs), we can only avoid using such forms while these versions of Emacs are widely used.)
+
+** 0.8.2
+
+*Fixes*
+
++ Deduplicate grouped membership events.
+
+** 0.8.1
+
+Added missing changelog entry (of course).
+
+** 0.8
+
+*Additions*
++ Command ~ement-create-space~ creates a new space.
++ Command ~ement-room-toggle-space~ toggles a room's membership in a space (a way to group rooms in Matrix).
++ Visibility of sections in the room list is saved across sessions.
++ Command ~ement-room-list-kill-buffer~ kills a room's buffer from the room list.
++ Set ~device_id~ and ~initial_device_display_name~ upon login (e.g. =Ement.el: username@hostname=).  ([[https://github.com/alphapapa/ement.el/issues/134][#134]].  Thanks to [[https://github.com/viiru-][Arto Jantunen]] for reporting.)
+
+*Changes*
+
++ Room-related commands may be called interactively with a universal prefix to prompt for the room/session (allowing to send events or change settings in rooms other than the current one).
++ Command ~ement-room-list~ reuses an existing window showing the room list when possible.  ([[https://github.com/alphapapa/ement.el/issues/131][#131]].  Thanks to [[https://github.com/jeffbowman][Jeff Bowman]] for suggesting.)
++ Command ~ement-tag-room~ toggles tags (rather than adding by default and removing when called with a prefix).
++ Default room grouping now groups "spaced" rooms separately.
+
+*Fixes*
+
++ Message format filter works properly when writing replies.
++ Improve insertion of sender name headers when using the "Elemental" message format.
++ Prompts in commands ~ement-leave-room~ and ~ement-forget-room~.
+
+** 0.7
+
+*Additions*
+
++ Command ~ement-room-override-name~ sets a local override for a room's display name.  (Especially helpful for 1:1 rooms and bridged rooms.  See [[https://github.com/matrix-org/matrix-spec-proposals/pull/3015#issuecomment-1451017296][MSC3015]].)
+
+*Changes*
+
++ Improve display of room tombstones (displayed at top and bottom of buffer, and new room ID is linked to join).
++ Use descriptive prompts in ~ement-leave-room~ and ~ement-forget-room~ commands.
+
+*Fixes*
+
++ Command ~ement-view-space~ when called from a room buffer.  (Thanks to [[https://github.com/MagicRB][Richard Brežák]] for reporting.)
++ Don't call ~display-buffer~ when reverting room list buffer.  (Fixes [[https://github.com/alphapapa/ement.el/issues/121][#121]].  Thanks to [[https://github.com/mekeor][mekeor]] for reporting.)
++ Retry sync for network timeouts.  (Accidentally broken in v0.6.)
+
+*Internal*
+
++ Function ~ement-put-account-data~ accepts ~:room~ argument to put on a room's account data.
+
+** 0.6
+
+*Additions*
++ Command ~ement-view-space~ to view a space's rooms in a directory buffer.
+
+*Changes*
++ Improve ~ement-describe-room~ command (formatting, bindings).
+
+*Fixes*
++ Retry sync for HTTP 502 "Bad Gateway" errors.
++ Formatting of unban events.
++ Update password authentication according to newer Matrix spec.  (Fixes compatibility with Conduit servers.  [[https://github.com/alphapapa/ement.el/issues/66][#66]].  Thanks to [[https://github.com/tpeacock19][Travis Peacock]], [[https://github.com/viiru-][Arto Jantunen]], and [[https://github.com/scd31][Stephen D]].)
++ Image scaling issues.  (Thanks to [[https://github.com/vizs][Visuwesh]].)
+
+** 0.5.2
+
+*Fixes*
++ Apply ~ement-initial-sync-timeout~ properly (important for when the homeserver is slow to respond).
+
+** 0.5.1
+
+*Fixes*
++ Autoload ~ement-directory~ commands.
++ Faces in ~ement-directory~ listings.
+
+** 0.5
+
+*Additions*
++ Present "joined-and-left" and "rejoined-and-left" membership event pairs as such.
++ Process and show rooms' canonical alias events.
+
+*Changes*
++ The [[https://github.com/alphapapa/taxy.el][taxy.el]]-based room list, with programmable, smart grouping, is now the default ~ement-room-list~.  (The old, ~tabulated-list-mode~-based room list is available as ~ement-tabulated-room-list~.)
++ When selecting a room to view with completion, don't offer spaces.
++ When selecting a room with completion, empty aliases and topics are omitted instead of being displayed as nil.
+
+*Fixes*
++ Use of send-message filter when replying.
++ Replies may be written in compose buffers.
+
+** 0.4.1
+
+*Fixes*
++ Don't show "curl process interrupted" message when updating a read marker's position again.
+
+** 0.4
+
+*Additions*
++ Option ~ement-room-unread-only-counts-notifications~, now enabled by default, causes rooms' unread status to be determined only by their notification counts (which are set by the server and depend on rooms' notification settings).
++ Command ~ement-room-set-notification-state~ sets a room's notification state (imitating Element's user-friendly presets).
++ Room buffers' Transient menus show the room's notification state (imitating Element's user-friendly presets).
++ Command ~ement-set-display-name~ sets the user's global displayname.
++ Command ~ement-room-set-display-name~ sets the user's displayname in a room (which is also now displayed in the room's Transient menu).
++ Column ~Notifications~ in the ~ement-taxy-room-list~ buffer shows rooms' notification state.
++ Option ~ement-interrupted-sync-hook~ allows customization of how sync interruptions are handled.  (Now, by default, a warning is displayed instead of merely a message.)
+
+*Changes*
++ When a room's read receipt is updated, the room's buffer is also marked as unmodified.  (In concert with the new option, this makes rooms' unread status more intuitive.)
+
+*Fixes*
++ Binding of command ~ement-forget-room~ in room buffers.
++ Highlighting of ~@room~ mentions.
+
+** 0.3.1
+
+*Fixes*
++ Room unread status (when the last event in a room is sent by the local user, the room is considered read).
+
+** 0.3
+
+*Additions*
++ Command ~ement-directory~ shows a server's room directory.
++ Command ~ement-directory-search~ searches a server's room directory.
++ Command ~ement-directory-next~ fetches the next batch of rooms in a directory.
++ Command ~ement-leave-room~ accepts a ~FORCE-P~ argument (interactively, with prefix) to leave a room without prompting.
++ Command ~ement-forget-room~ accepts a ~FORCE-P~ argument (interactively, with prefix) to also leave the room, and to forget it without prompting.
++ Option ~ement-notify-mark-frame-urgent-predicates~ marks the frame as urgent when (by default) a message mentions the local user or "@room" and the message's room has an open buffer.
+
+*Changes*
++ Minor improvements to date/time headers.
+
+*Fixes*
++ Command ~ement-describe-room~ for rooms without topics.
++ Improve insertion of old messages around existing timestamp headers.
++ Reduce D-Bus notification system check timeout to 2 seconds (from the default of 25).
++ Compatibility with Emacs 27.
+
+** 0.2.1
+
+*Fixes*
++ Info manual export filename.
+
+** 0.2
+
+*Changes*
++ Read receipts are re-enabled.  (They're now implemented with a global idle timer rather than ~window-scroll-functions~, which sometimes caused a strange race condition that could cause Emacs to become unresponsive or crash.)
++ When determining whether a room is considered unread, non-message events like membership changes, reactions, etc. are ignored.  This fixes a bug that caused certain rooms that had no message events (like some bridged rooms) to appear as unread when they shouldn't have.  But it's unclear whether this is always preferable (e.g. one might want a member leaving a room to cause it to be marked unread), so this is classified as a change rather than simply a fix, and more improvements may be made to this in the future.  (Fixes [[https://github.com/alphapapa/ement.el/issues/97][#97]].  Thanks to [[https://github.com/MrRoy][Julien Roy]] for reporting and testing.)
++ The ~ement-taxy-room-list~ view no longer automatically refreshes the list if the region is active in the buffer.  (This allows the user to operate on multiple rooms without the contents of the buffer changing before completing the process.)
+
+*Fixes*
++ Links to only rooms (as opposed to links to events in rooms) may be activated to join them.
++ Read receipts mark the last completely visible event (rather than one that's only partially displayed).
++ Prevent error when a room avatar image fails to load.
+
+** 0.1.4
+
+*Fixed*
++ Info manual directory headers.
+
+** 0.1.3
+
+*Fixed*
+# + Read receipt-sending function was called too many times when scrolling.
+# + Send read receipts even when the last receipt is outside the range of retrieved events.
++ Temporarily disable sending of read receipts due to an unusual bug that could cause Emacs to become unresponsive.  (The feature will be re-enabled in a future release.)
+
+** 0.1.2
+
+*Fixed*
++ Function ~ement-room-sync~ correctly updates room-list buffers.  (Thanks to [[https://github.com/vizs][Visuwesh]].)
++ Only send D-Bus notifications when supported.  (Fixes [[https://github.com/alphapapa/ement.el/issues/83][#83]].  Thanks to [[https://github.com/tsdh][Tassilo Horn]].)
+
+** 0.1.1
+
+*Fixed*
++ Function ~ement-room-scroll-up-mark-read~ selects the correct room window.
++ Option ~ement-room-list-avatars~ defaults to what function ~display-images-p~ returns.
+
+** 0.1
+
+After almost two years of development, the first tagged release.  Submitted to GNU ELPA.
+
+* Development
+:PROPERTIES:
+:TOC:      :include this :ignore descendants
+:END:
+
+Bug reports, feature requests, suggestions — /oh my/!
+
+** Copyright Assignment
+:PROPERTIES:
+:TOC:      :ignore (this)
+:END:
+
+Ement.el is published in GNU ELPA and is considered part of GNU Emacs.  Therefore, cumulative contributions of more than 15 lines of code require that the author assign copyright of such contributions to the FSF.  Authors who are interested in doing so may contact [[mailto:assign@gnu.org][assign@gnu.org]] to request the appropriate form.
+
+** Matrix spec in Org format
+:PROPERTIES:
+:TOC:      :ignore (this)
+:END:
+
+An Org-formatted version of the Matrix spec is available in the [[https://github.com/alphapapa/ement.el/tree/meta/spec][meta/spec]] branch.
+
+** Rationale
+
+/This section is preserved for posterity.  As it says, Ement.el has long since surpassed ~matrix-client~, which should no longer be used./
+
+Why write a new Emacs Matrix client when there is already [[https://github.com/alphapapa/matrix-client.el][matrix-client.el]], by the same author, no less?  A few reasons:
+
+- ~matrix-client~ uses an older version of the Matrix spec, r0.3.0, with a few elements of r0.4.0 grafted in.  Bringing it up to date with the current version of the spec, r0.6.1, would be more work than to begin with the current version.  Ement.el targets r0.6.1 from the beginning.
+- ~matrix-client~ does not use Matrix's lazy-loading feature (which was added to the specification later), so initial sync requests can take a long time for the server to process and can be large (sometimes tens of megabytes of JSON for the client to process!).  Ement.el uses lazy-loading, which significantly improves performance.
+- ~matrix-client~ automatically makes buffers for every room a user has joined, even if the user doesn't currently want to watch a room.  Ement.el opens room buffers on-demand, improving performance by not having to insert events into buffers for rooms the user isn't watching.
+- ~matrix-client~ was developed without the intention of publishing it to, e.g. MELPA or ELPA.  It has several dependencies, and its code does not always install or compile cleanly due to macro-expansion issues (apparently depending on the user's Emacs config).  Ement.el is designed to have minimal dependencies outside of Emacs (currently only one, ~plz~, which could be imported into the project), and every file is linted and compiles cleanly using [[https://github.com/alphapapa/makem.sh][makem.sh]].
+- ~matrix-client~ uses EIEIO, probably unnecessarily, since few, if any, of the benefits of EIEIO are realized in it.  Ement.el uses structs instead.
+- ~matrix-client~ uses bespoke code for inserting messages into buffers, which works pretty well, but has a few minor bugs which are difficult to track down.  Ement.el uses Emacs's built-in (and perhaps little-known) ~ewoc~ library, which makes it much simpler and more reliable to insert and update messages in buffers, and enables the development of advanced UI features more easily.
+- ~matrix-client~ was, to a certain extent, designed to imitate other messaging apps.  The result is, at least when used with the ~matrix-client-frame~ command, fairly pleasing to use, but isn't especially "Emacsy."  Ement.el is intended to better fit into Emacs's paradigms.
+- ~matrix-client~'s long name makes for long symbol names, which makes for tedious, verbose code.  ~ement~ is easy to type and makes for concise, readable code.
+- The author has learned much since writing ~matrix-client~ and hopes to write simpler, more readable, more maintainable code in Ement.el.  It's hoped that this will enable others to contribute more easily.
+
+Note that, while ~matrix-client~ remains usable, and probably will for some time to come, Ement.el has now surpassed it in every way.  The only reason to choose ~matrix-client~ instead is if one is using an older version of Emacs that isn't supported by Ement.el.
+
+* License
+:PROPERTIES:
+:TOC:      :ignore (this)
+:END:
+
+GPLv3
+
+* COMMENT Config                                                   :noexport:
+:PROPERTIES:
+:TOC:      :ignore (this descendants)
+:END:
+
+# NOTE: The #+OPTIONS: and other keywords did not take effect when in this section (perhaps due to file size or to changes in Org), so they were moved to the top of the file.
+
+** File-local variables
+
+# Local Variables:
+# eval: (require 'org-make-toc)
+# before-save-hook: org-make-toc
+# org-export-with-properties: ()
+# org-export-with-title: t
+# End:
diff --git a/emacs/.emacs.d/elpa/ement-0.17/dir b/emacs/.emacs.d/elpa/ement-0.17/dir
new file mode 100644
index 0000000..7e81c1b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/dir
@@ -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
+* Ement: (ement).               Matrix client for Emacs.
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-api.el b/emacs/.emacs.d/elpa/ement-0.17/ement-api.el
new file mode 100644
index 0000000..ff8054c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-api.el
@@ -0,0 +1,145 @@
+;;; ement-api.el --- Matrix API library              -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+;;;; Debugging
+
+;; NOTE: Uncomment this form and `emacs-lisp-byte-compile-and-load' the file to enable
+;; `ement-debug' messages.  This is commented out by default because, even though the
+;; messages are only displayed when `warning-minimum-log-level' is `:debug' at runtime, if
+;; that is so at expansion time, the expanded macro calls format the message and check the
+;; log level at runtime, which is not zero-cost.
+
+;; (eval-and-compile
+;;   (setq-local warning-minimum-log-level nil)
+;;   (setq-local warning-minimum-log-level :debug))
+
+;;;; Requirements
+
+(require 'json)
+(require 'url-parse)
+(require 'url-util)
+
+(require 'plz)
+
+(require 'ement-macros)
+(require 'ement-structs)
+
+;;;; Variables
+
+
+;;;; Customization
+
+
+;;;; Commands
+
+
+;;;; Functions
+
+(cl-defun ement-api (session endpoint
+                             &key then data params queue
+                             (content-type "application/json")
+                             (data-type 'text)
+                             (else #'ement-api-error) (method 'get)
+                             ;; FIXME: What's the right term for the URL part after "/_matrix/"?
+                             (endpoint-category "client")
+                             (json-read-fn #'json-read)
+                             ;; NOTE: Hard to say what the default timeouts
+                             ;; should be.  Sometimes the matrix.org homeserver
+                             ;; can get slow and respond a minute or two later.
+                             (connect-timeout 10) (timeout 60)
+                             (version "r0"))
+  "Make API request on SESSION to ENDPOINT.
+The request automatically uses SESSION's server, URI prefix, and
+access token.
+
+These keyword arguments are passed to `plz', which see: THEN,
+DATA (passed as BODY), QUEUE (passed to `plz-queue', which see),
+DATA-TYPE (passed as BODY-TYPE), ELSE, METHOD,
+JSON-READ-FN (passed as AS), CONNECT-TIMEOUT, TIMEOUT.
+
+Other arguments include PARAMS (used as the URL's query
+parameters), ENDPOINT-CATEGORY (added to the endpoint URL), and
+VERSION (added to the endpoint URL).
+
+Note that most Matrix requests expect JSON-encoded data, so
+usually the DATA argument should be passed through
+`json-encode'."
+  (declare (indent defun))
+  (pcase-let* (((cl-struct ement-session server token) session)
+               ((cl-struct ement-server uri-prefix) server)
+               ((cl-struct url type host portspec) (url-generic-parse-url uri-prefix))
+               (path (format "/_matrix/%s/%s/%s" endpoint-category version endpoint))
+               (query (url-build-query-string params))
+               (filename (concat path "?" query))
+               (url (url-recreate-url
+                     (url-parse-make-urlobj type nil nil host portspec filename nil data t)))
+               (headers (ement-alist "Content-Type" content-type))
+               (plz-args))
+    (when token
+      ;; Almost every request will require a token (only a few, like checking login flows, don't),
+      ;; so we simplify the API by using the token automatically when the session has one.
+      (push (cons "Authorization" (concat "Bearer " token)) headers))
+    (setf plz-args (list method url :headers headers :body data :body-type data-type
+                         :as json-read-fn :then then :else else
+                         :connect-timeout connect-timeout :timeout timeout :noquery t))
+    ;; Omit `then' from debugging because if it's a partially applied
+    ;; function on the session object, which may be very large, it
+    ;; will take a very long time to print into the warnings buffer.
+    ;;  (ement-debug (current-time) method url headers)
+    (if queue
+        (plz-run
+         (apply #'plz-queue queue plz-args))
+      (apply #'plz plz-args))))
+
+(define-error 'ement-api-error "Ement API error" 'error)
+
+(defun ement-api-error (plz-error)
+  "Signal an Ement API error for PLZ-ERROR."
+  ;; This feels a little messy, but it seems to be reasonable.
+  (pcase-let* (((cl-struct plz-error response
+                           (message plz-message) (curl-error `(,curl-exit-code . ,curl-message)))
+                plz-error)
+               (status (when (plz-response-p response)
+                         (plz-response-status response)))
+               (body (when (plz-response-p response)
+                       (plz-response-body response)))
+               (json-object (when body
+                              (ignore-errors
+                                (json-read-from-string body))))
+               (error-message (format "%S: %s"
+                                      (or curl-exit-code status)
+                                      (or (when json-object
+                                            (alist-get 'error json-object))
+                                          curl-message
+                                          plz-message))))
+
+    (signal 'ement-api-error (list error-message))))
+
+;;;; Footer
+
+(provide 'ement-api)
+
+;;; ement-api.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-api.elc b/emacs/.emacs.d/elpa/ement-0.17/ement-api.elc
new file mode 100644
index 0000000..c4aabe5
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/ement-api.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-autoloads.el b/emacs/.emacs.d/elpa/ement-0.17/ement-autoloads.el
new file mode 100644
index 0000000..f1fbd4e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-autoloads.el
@@ -0,0 +1,194 @@
+;;; ement-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from ement.el
+
+(autoload 'ement-connect "ement" "\
+Connect to Matrix with USER-ID and PASSWORD, or using SESSION.
+Interactively, with prefix, ignore a saved session and log in
+again; otherwise, use a saved session if `ement-save-sessions' is
+enabled and a saved session is available, or prompt to log in if
+not enabled or available.
+
+If USER-ID or PASSWORD are not specified, the user will be
+prompted for them.
+
+If URI-PREFIX is specified, it should be the prefix of the
+server's API URI, including protocol, hostname, and optionally
+the port, e.g.
+
+  \"https://matrix-client.matrix.org\"
+  \"http://localhost:8080\"
+
+(fn &key USER-ID PASSWORD URI-PREFIX SESSION)" t)
+(register-definition-prefixes "ement" '("ement-"))
+
+
+;;; Generated autoloads from ement-api.el
+
+(register-definition-prefixes "ement-api" '("ement-api-error"))
+
+
+;;; Generated autoloads from ement-directory.el
+
+(autoload 'ement-directory "ement-directory" "\
+View the public room directory on SERVER with SESSION.
+Show up to LIMIT rooms.  Interactively, with prefix, prompt for
+server and LIMIT.
+
+SINCE may be a next-batch token.
+
+(fn &key SERVER SESSION SINCE (LIMIT 100))" t)
+(autoload 'ement-directory-search "ement-directory" "\
+View public rooms on SERVER matching QUERY.
+QUERY is a string used to filter results.
+
+(fn QUERY &key SERVER SESSION SINCE (LIMIT 1000))" t)
+(autoload 'ement-view-space "ement-directory" "\
+View child rooms in SPACE on SESSION.
+SPACE may be a room ID or an `ement-room' struct.
+
+(fn SPACE SESSION)" t)
+(register-definition-prefixes "ement-directory" '("ement-directory-"))
+
+
+;;; Generated autoloads from ement-lib.el
+
+(register-definition-prefixes "ement-lib" '("ement-"))
+
+
+;;; Generated autoloads from ement-macros.el
+
+(register-definition-prefixes "ement-macros" '("ement-"))
+
+
+;;; Generated autoloads from ement-notifications.el
+
+(autoload 'ement-notifications "ement-notifications" "\
+Show the notifications buffer for SESSION.
+FROM may be a \"next_token\" token from a previous request.
+LIMIT may be a maximum number of events to return.  ONLY may be
+the string \"highlight\" to only return notifications that have
+the highlight tweak set.  THEN and ELSE may be callbacks passed
+to `ement-api', which see.
+
+(fn SESSION &key FROM LIMIT ONLY (THEN (apply-partially #\\='ement-notifications-callback session)) ELSE)" t)
+(register-definition-prefixes "ement-notifications" '("ement-notifications-"))
+
+
+;;; Generated autoloads from ement-notify.el
+
+(register-definition-prefixes "ement-notify" '("ement-notify"))
+
+
+;;; Generated autoloads from ement-room.el
+
+(defvar ement-room-self-insert-mode nil "\
+Non-nil if Ement-Room-Self-Insert mode is enabled.
+See the `ement-room-self-insert-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 `ement-room-self-insert-mode'.")
+(custom-autoload 'ement-room-self-insert-mode "ement-room" nil)
+(autoload 'ement-room-self-insert-mode "ement-room" "\
+When enabled, `self-insert-command' keys begin a new message.
+
+The user options `ement-room-self-insert-chars' and
+`ement-room-self-insert-commands' determine the specific keys and
+commands which will have this effect.
+
+When this mode is enabled, `ement-room-mode-self-insert-keymap'
+takes precedence over `ement-room-mode-map', with the shadowed
+key bindings in `ement-room-mode-map' becoming accessible via
+`ement-room-mode-map-prefix-key'.
+
+If you define custom key bindings in `ement-room-mode-map', you
+should call `ement-room-self-insert-mode' after defining those
+keys (rather than before).  Your bindings will be functional in
+either case, but they may not appear in the help for
+`ement-room-mode' if you define them afterwards.
+
+If you bind keys in `ement-room-mode-self-insert-keymap', do so
+via `ement-room-mode-self-insert-keymap-update-hook' (see which).
+
+This is a global minor mode.  If called interactively, toggle the
+`Ement-Room-Self-Insert mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='ement-room-self-insert-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "ement-room" '("ement-"))
+
+
+;;; Generated autoloads from ement-room-list.el
+
+(autoload 'ement-room-list--after-initial-sync "ement-room-list" "\
+Call `ement-room-list', ignoring arguments.
+To be called from `ement-after-initial-sync-hook'.
+
+(fn &rest IGNORE)")
+(defalias 'ement-list-rooms 'ement-room-list)
+(autoload 'ement-room-list "ement-room-list" "\
+Show a buffer listing Ement rooms, grouped with Taxy KEYS.
+After showing it, its window is selected.  The buffer is named
+BUFFER-NAME and is shown with DISPLAY-BUFFER-ACTION; or if
+DISPLAY-BUFFER-ACTION is nil, the buffer is not displayed.
+
+(fn &key (BUFFER-NAME \"*Ement Room List*\") (KEYS ement-room-list-default-keys) (DISPLAY-BUFFER-ACTION \\='((display-buffer-reuse-window display-buffer-same-window))))" t)
+(autoload 'ement-room-list-auto-update "ement-room-list" "\
+Automatically update the Taxy room list buffer.
++Does so when variable `ement-room-list-auto-update' is non-nil.
++To be called in `ement-sync-callback-hook'.
+
+(fn SESSION)")
+(register-definition-prefixes "ement-room-list" '("ement-room-list-"))
+
+
+;;; Generated autoloads from ement-tabulated-room-list.el
+
+(autoload 'ement-tabulated-room-list "ement-tabulated-room-list" "\
+Show buffer listing joined rooms.
+Calls `pop-to-buffer-same-window'.  Interactively, with prefix,
+call `pop-to-buffer'.
+
+(fn &rest IGNORE)" t)
+(autoload 'ement-tabulated-room-list-auto-update "ement-tabulated-room-list" "\
+Automatically update the room list buffer.
+Does so when variable `ement-tabulated-room-list-auto-update' is non-nil.
+To be called in `ement-sync-callback-hook'.
+
+(fn SESSION)")
+(register-definition-prefixes "ement-tabulated-room-list" '("ement-tabulated-room-list-"))
+
+;;; End of scraped data
+
+(provide 'ement-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; ement-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-directory.el b/emacs/.emacs.d/elpa/ement-0.17/ement-directory.el
new file mode 100644
index 0000000..b0b7578
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-directory.el
@@ -0,0 +1,443 @@
+;;; ement-directory.el --- Public room directory support                       -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library provides support for viewing and searching public room directories on
+;; Matrix homeservers.
+
+;; To make rendering the list flexible and useful, we'll use `taxy-magit-section'.
+
+;;; Code:
+
+;;;; Requirements
+
+(require 'ement)
+(require 'ement-room-list)
+
+(require 'taxy)
+(require 'taxy-magit-section)
+
+;;;; Variables
+
+(defvar ement-directory-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "RET") #'ement-directory-RET)
+    (define-key map [mouse-1] #'ement-directory-mouse-1)
+    (define-key map (kbd "+") #'ement-directory-next)
+    map))
+
+(defgroup ement-directory nil
+  "Options for room directories."
+  :group 'ement)
+
+;;;; Mode
+
+(define-derived-mode ement-directory-mode magit-section-mode "Ement-Directory"
+  :global nil)
+
+(defvar-local ement-directory-etc nil
+  "Alist storing information in `ement-directory' buffers.")
+
+;;;;; Keys
+
+(eval-and-compile
+  (taxy-define-key-definer ement-directory-define-key
+    ement-directory-keys "ement-directory-key" "FIXME: Docstring."))
+
+;; TODO: Other keys like guest_can_join, world_readable, etc.  (Last-updated time would be
+;; nice, but the server doesn't include that in the results.)
+
+(ement-directory-define-key joined-p ()
+  (pcase-let (((map ('room_id id)) item)
+              ((map session) ement-directory-etc))
+    (when (cl-find id (ement-session-rooms session)
+                   :key #'ement-room-id :test #'equal)
+      "Joined")))
+
+(ement-directory-define-key size (&key < >)
+  (pcase-let (((map ('num_joined_members size)) item))
+    (cond ((and < (< size <))
+           (format "< %s members" <))
+          ((and > (> size >))
+           (format "> %s members" >)))))
+
+(ement-directory-define-key space-p ()
+  "Groups rooms that are themselves spaces."
+  (pcase-let (((map ('room_type type)) item))
+    (when (equal "m.space" type)
+      "Spaces")))
+
+(ement-directory-define-key people-p ()
+  (pcase-let (((map ('room_id id) ('room_type type)) item)
+              ((map session) ement-directory-etc))
+    (pcase type
+      ("m.space" nil)
+      (_ (when-let ((room (cl-find id (ement-session-rooms session)
+                                   :key #'ement-room-id :test #'equal))
+                    ((ement--room-direct-p room session)))
+           (ement-propertize "People"
+             'face 'ement-room-list-direct))))))
+
+(defcustom ement-directory-default-keys
+  '((joined-p
+     (people-p)
+     (and :name "Rooms"
+          :keys ((not people-p))))
+    (space-p)
+    ((size :> 10000))
+    ((size :> 1000))
+    ((size :> 100))
+    ((size :> 10))
+    ((size :< 11)))
+  "Default keys."
+  :type 'sexp)
+
+;;;; Columns
+
+(defvar-local ement-directory-room-avatar-cache (make-hash-table)
+  ;; Use a buffer-local variable so that the cache is cleared when the buffer is closed.
+  "Hash table caching room avatars for the `ement-directory' room list.")
+
+(eval-and-compile
+  (taxy-magit-section-define-column-definer "ement-directory"))
+
+;; TODO: Fetch avatars (with queueing and async updating/insertion?).
+
+(ement-directory-define-column #("✓" 0 1 (help-echo "Joined")) ()
+  (pcase-let (((map ('room_id id)) item)
+              ((map session) ement-directory-etc))
+    (if (cl-find id (ement-session-rooms session)
+                 :key #'ement-room-id :test #'equal)
+        "✓"
+      " ")))
+
+(ement-directory-define-column "Name" (:max-width 25)
+  (pcase-let* (((map name ('room_id id) ('room_type type)
+                     ('canonical_alias canonical-alias))
+                item)
+               ((map session) ement-directory-etc)
+               (room)
+               (face (pcase type
+                       ("m.space" 'ement-room-list-space)
+                       (_ (if (and (setf room (cl-find id (ement-session-rooms session)
+                                                       :key #'ement-room-id :test #'equal))
+                                   (ement--room-direct-p room session))
+                              'ement-room-list-direct
+                            'ement-room-list-name)))))
+    ;; NOTE: We can't use `ement--room-display-name' because these aren't room structs,
+    ;; and we don't have membership data.
+    (ement-propertize (or name canonical-alias "[unnamed]")
+      'face face)))
+
+(ement-directory-define-column "Alias" (:max-width 25)
+  (pcase-let (((map ('canonical_alias alias)) item))
+    (or alias "")))
+
+(ement-directory-define-column "Size" (:align 'right)
+  (pcase-let (((map ('num_joined_members size)) item))
+    (number-to-string size)))
+
+(ement-directory-define-column "Topic" (:max-width 50)
+  (pcase-let (((map topic) item))
+    (if topic
+        (replace-regexp-in-string "\n" " | " topic nil t)
+      "")))
+
+(ement-directory-define-column "ID" ()
+  (pcase-let (((map ('room_id id)) item))
+    id))
+
+(unless ement-directory-columns
+  ;; TODO: Automate this or document it
+  (setq-default ement-directory-columns
+                '("Name" "Alias" "Size" "Topic" "ID")))
+
+;;;; Commands
+
+;; TODO: Pagination of results.
+
+;;;###autoload
+(cl-defun ement-directory (&key server session since (limit 100))
+  "View the public room directory on SERVER with SESSION.
+Show up to LIMIT rooms.  Interactively, with prefix, prompt for
+server and LIMIT.
+
+SINCE may be a next-batch token."
+  (interactive (let* ((session (ement-complete-session :prompt "Search on session: "))
+                      (server (if current-prefix-arg
+                                  (read-string "Search on server: " nil nil
+                                               (ement-server-name (ement-session-server session)))
+                                (ement-server-name (ement-session-server session))))
+                      (args (list :server server :session session)))
+                 (when current-prefix-arg
+                   (cl-callf plist-put args
+                     :limit (read-number "Limit number of rooms: " 100)))
+                 args))
+  (pcase-let ((revert-function (lambda (&rest _ignore)
+                                 (interactive)
+                                 (ement-directory :server server :session session :limit limit)))
+              (endpoint "publicRooms")
+              (params (list (list "limit" limit))))
+    (when since
+      (cl-callf append params (list (list "since" since))))
+    (ement-api session endpoint :params params
+      :then (lambda (results)
+              (pcase-let (((map ('chunk rooms) ('next_batch next-batch)
+                                ('total_room_count_estimate remaining))
+                           results))
+                (ement-directory--view rooms :append-p since
+                  :buffer-name (format "*Ement Directory: %s*" server)
+                  :root-section-name (format "Ement Directory: %s" server)
+                  :init-fn (lambda ()
+                             (setf (alist-get 'server ement-directory-etc) server
+                                   (alist-get 'session ement-directory-etc) session
+                                   (alist-get 'next-batch ement-directory-etc) next-batch
+                                   (alist-get 'limit ement-directory-etc) limit)
+                             (setq-local revert-buffer-function revert-function)
+                             (when remaining
+                               ;; FIXME: The server seems to report all of the rooms on
+                               ;; the server as remaining even when searching for a
+                               ;; specific term like "emacs".
+                               ;; TODO: Display this in a more permanent place (like a
+                               ;; header or footer).
+                               (message
+                                (substitute-command-keys
+                                 "%s rooms remaining (use \\[ement-directory-next] to fetch more)")
+                                remaining)))))))
+    (ement-message "Listing %s rooms on %s..." limit server)))
+
+;;;###autoload
+(cl-defun ement-directory-search (query &key server session since (limit 1000))
+  "View public rooms on SERVER matching QUERY.
+QUERY is a string used to filter results."
+  (interactive (let* ((session (ement-complete-session :prompt "Search on session: "))
+                      (server (if current-prefix-arg
+                                  (read-string "Search on server: " nil nil
+                                               (ement-server-name (ement-session-server session)))
+                                (ement-server-name (ement-session-server session))))
+                      (query (read-string (format "Search for rooms on %s matching: " server)))
+                      (args (list query :server server :session session)))
+                 (when current-prefix-arg
+                   (cl-callf plist-put (cdr args)
+                     :limit (read-number "Limit number of rooms: " 1000)))
+                 args))
+  ;; TODO: Handle "include_all_networks" and "third_party_instance_id".  See § 10.5.4.
+  (pcase-let* ((revert-function (lambda (&rest _ignore)
+                                  (interactive)
+                                  (ement-directory-search query :server server :session session)))
+               (endpoint "publicRooms")
+               (data (rassq-delete-all nil
+                                       (ement-alist "limit" limit
+                                                    "filter" (ement-alist "generic_search_term" query)
+                                                    "since" since))))
+    (ement-api session endpoint :method 'post :data (json-encode data)
+      :then (lambda (results)
+              (pcase-let (((map ('chunk rooms) ('next_batch next-batch)
+                                ('total_room_count_estimate remaining))
+                           results))
+                (ement-directory--view rooms :append-p since
+                  :buffer-name (format "*Ement Directory: \"%s\" on %s*" query server)
+                  :root-section-name (format "Ement Directory: \"%s\" on %s" query server)
+                  :init-fn (lambda ()
+                             (setf (alist-get 'server ement-directory-etc) server
+                                   (alist-get 'session ement-directory-etc) session
+                                   (alist-get 'next-batch ement-directory-etc) next-batch
+                                   (alist-get 'limit ement-directory-etc) limit
+                                   (alist-get 'query ement-directory-etc) query)
+                             (setq-local revert-buffer-function revert-function)
+                             (when remaining
+                               (message
+                                (substitute-command-keys
+                                 "%s rooms remaining (use \\[ement-directory-next] to fetch more)")
+                                remaining)))))))
+    (ement-message "Searching for %S on %s..." query server)))
+
+(defun ement-directory-next ()
+  "Fetch next batch of results in `ement-directory' buffer."
+  (interactive)
+  (pcase-let (((map next-batch query limit server session) ement-directory-etc))
+    (unless next-batch
+      (user-error "No more results"))
+    (if query
+        (ement-directory-search query :server server :session session :limit limit :since next-batch)
+      (ement-directory :server server :session session :limit limit :since next-batch))))
+
+(defun ement-directory-mouse-1 (event)
+  "Call `ement-directory-RET' at EVENT."
+  (interactive "e")
+  (mouse-set-point event)
+  (call-interactively #'ement-directory-RET))
+
+(defun ement-directory-RET ()
+  "View or join room at point, or cycle section at point."
+  (interactive)
+  (cl-etypecase (oref (magit-current-section) value)
+    (null nil)
+    (list (pcase-let* (((map ('name name) ('room_id room-id)) (oref (magit-current-section) value))
+                       ((map session) ement-directory-etc)
+                       (room (cl-find room-id (ement-session-rooms session)
+                                      :key #'ement-room-id :test #'equal)))
+            (if room
+                (ement-view-room room session)
+              ;; Room not joined: prompt to join.  (Don't use the alias in the prompt,
+              ;; because multiple rooms might have the same alias, e.g. when one is
+              ;; upgraded or tombstoned.)
+              (when (yes-or-no-p (format "Join room \"%s\" <%s>? " name room-id))
+                (ement-join-room room-id session)))))
+    (taxy-magit-section (call-interactively #'magit-section-cycle))))
+
+;;;; Functions
+
+(cl-defun ement-directory--view (rooms &key init-fn append-p
+                                       (buffer-name "*Ement Directory*")
+                                       (root-section-name "Ement Directory")
+                                       (keys ement-directory-default-keys)
+                                       (display-buffer-action '(display-buffer-same-window)))
+  "View ROOMS in an `ement-directory-mode' buffer.
+ROOMS should be a list of rooms from an API request.  Calls
+INIT-FN immediately after activating major mode.  Sets
+BUFFER-NAME and ROOT-SECTION-NAME, and uses
+DISPLAY-BUFFER-ACTION.  KEYS are a list of `taxy' keys.  If
+APPEND-P, add ROOMS to buffer rather than replacing existing
+contents.  To be called by `ement-directory-search'."
+  (declare (indent defun))
+  (let (column-sizes window-start)
+    (cl-labels ((format-item (item)
+                  ;; NOTE: We use the buffer-local variable `ement-directory-etc' rather
+                  ;; than a closure variable because the taxy-magit-section struct's format
+                  ;; table is not stored in it, and we can't reuse closures' variables.
+                  ;; (It would be good to store the format table in the taxy-magit-section
+                  ;; in the future, to make this cleaner.)
+                  (gethash item (alist-get 'format-table ement-directory-etc)))
+                ;; NOTE: Since these functions take an "item" (which is a [room session]
+                ;; vector), they're prefixed "item-" rather than "room-".
+                (size (item)
+                  (pcase-let (((map ('num_joined_members size)) item))
+                    size))
+                (t<nil (a b) (and a (not b)))
+                (t>nil (a b) (and (not a) b))
+                (make-fn (&rest args)
+                  (apply #'make-taxy-magit-section
+                         :make #'make-fn
+                         :format-fn #'format-item
+                         ;; FIXME: Should we reuse `ement-room-list-level-indent' here?
+                         :level-indent ement-room-list-level-indent
+                         ;; :visibility-fn #'visible-p
+                         ;; :heading-indent 2
+                         :item-indent 2
+                         ;; :heading-face-fn #'heading-face
+                         args)))
+      (with-current-buffer (get-buffer-create buffer-name)
+        (unless (eq 'ement-directory-mode major-mode)
+          ;; Don't obliterate buffer-local variables.
+          (ement-directory-mode))
+        (when init-fn
+          (funcall init-fn))
+        (pcase-let* ((taxy (if append-p
+                               (alist-get 'taxy ement-directory-etc)
+                             (make-fn
+                              :name root-section-name
+                              :take (taxy-make-take-function keys ement-directory-keys))))
+                     (taxy-magit-section-insert-indent-items nil)
+                     (inhibit-read-only t)
+                     (pos (point))
+                     (section-ident (when (magit-current-section)
+                                      (magit-section-ident (magit-current-section))))
+                     (format-cons))
+          (setf taxy (thread-last taxy
+                                  (taxy-fill (cl-coerce rooms 'list))
+                                  (taxy-sort #'> #'size)
+                                  (taxy-sort* #'string> #'taxy-name))
+                (alist-get 'taxy ement-directory-etc) taxy
+                format-cons (taxy-magit-section-format-items
+                             ement-directory-columns ement-directory-column-formatters taxy)
+                (alist-get 'format-table ement-directory-etc) (car format-cons)
+                column-sizes (cdr format-cons)
+                header-line-format (taxy-magit-section-format-header
+                                    column-sizes ement-directory-column-formatters)
+                window-start (if (get-buffer-window buffer-name)
+                                 (window-start (get-buffer-window buffer-name))
+                               0))
+          (delete-all-overlays)
+          (erase-buffer)
+          (save-excursion
+            (taxy-magit-section-insert taxy :items 'first
+              ;; :blank-between-depth bufler-taxy-blank-between-depth
+              :initial-depth 0))
+          (goto-char pos)
+          (when (and section-ident (magit-get-section section-ident))
+            (goto-char (oref (magit-get-section section-ident) start)))))
+      (display-buffer buffer-name display-buffer-action)
+      (when (get-buffer-window buffer-name)
+        (set-window-start (get-buffer-window buffer-name) window-start))
+      ;; NOTE: In order for `bookmark--jump-via' to work properly, the restored buffer
+      ;; must be set as the current buffer, so we have to do this explicitly here.
+      (set-buffer buffer-name))))
+
+;;;; Spaces
+
+;; Viewing spaces and the rooms in them.
+
+;;;###autoload
+(defun ement-view-space (space session)
+  ;; TODO: Use this for spaces instead of `ement-view-room' (or something like that).
+  ;; TODO: Display space's topic in the header or something.
+  "View child rooms in SPACE on SESSION.
+SPACE may be a room ID or an `ement-room' struct."
+  ;; TODO: "from" query parameter.
+  (interactive (ement-complete-room :predicate #'ement--space-p
+                 :prompt "Space: "))
+  (pcase-let* ((id (cl-typecase space
+                     (string space)
+                     (ement-room (ement-room-id space))))
+               (endpoint (format "rooms/%s/hierarchy" id))
+               (revert-function (lambda (&rest _ignore)
+                                  (interactive)
+                                  (ement-view-space space session))))
+    (ement-api session endpoint :version "v1"
+      :then (lambda (results)
+              (pcase-let (((map rooms ('next_batch next-batch))
+                           results))
+                (ement-directory--view rooms ;; :append-p since
+                  ;; TODO: Use space's alias where possible.
+                  :buffer-name (format "*Ement Directory: space %s" (ement--format-room space session))
+                  :root-section-name (format "*Ement Directory: rooms in %s %s"
+                                             (ement-propertize "space"
+                                               'face 'font-lock-type-face)
+                                             (ement--format-room space session))
+                  :init-fn (lambda ()
+                             (setf (alist-get 'session ement-directory-etc) session
+                                   (alist-get 'next-batch ement-directory-etc) next-batch
+                                   ;; (alist-get 'limit ement-directory-etc) limit
+                                   (alist-get 'space ement-directory-etc) space)
+                             (setq-local revert-buffer-function revert-function)
+                             ;; TODO: Handle next batches.
+                             ;; (when remaining
+                             ;;   (message
+                             ;;    (substitute-command-keys
+                             ;;     "%s rooms remaining (use \\[ement-directory-next] to fetch more)")
+                             ;;    remaining))
+                             )))))))
+
+;;;; Footer
+
+(provide 'ement-directory)
+;;; ement-directory.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-directory.elc b/emacs/.emacs.d/elpa/ement-0.17/ement-directory.elc
new file mode 100644
index 0000000..885ab62
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/ement-directory.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-lib.el b/emacs/.emacs.d/elpa/ement-0.17/ement-lib.el
new file mode 100644
index 0000000..4dfc836
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-lib.el
@@ -0,0 +1,1830 @@
+;;; ement-lib.el --- Library of Ement functions      -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library provides functions used in other Ement libraries.  It exists so they may
+;; be required where needed, without causing circular dependencies.
+
+;;; Code:
+
+;;;; Requirements
+
+(eval-when-compile
+  (require 'eieio)
+  (require 'ewoc)
+  (require 'pcase)
+  (require 'subr-x)
+  
+  (require 'taxy-magit-section)
+
+  (require 'ement-macros))
+
+(require 'cl-lib)
+
+(require 'button)
+(require 'color)
+(require 'map)
+(require 'seq)
+(require 'xml)
+
+(require 'ement-api)
+(require 'ement-structs)
+
+;;;; Variables
+
+(defvar ement-sessions)
+(defvar ement-users)
+(defvar ement-ewoc)
+(defvar ement-room)
+(defvar ement-session)
+
+(defvar ement-room-buffer-name-prefix)
+(defvar ement-room-buffer-name-suffix)
+(defvar ement-room-leave-kill-buffer)
+(defvar ement-room-prism)
+(defvar ement-room-prism-color-adjustment)
+(defvar ement-room-prism-minimum-contrast)
+(defvar ement-room-unread-only-counts-notifications)
+
+;;;; Function declarations
+
+;; Instead of using top-level `declare-function' forms (which can easily become obsolete
+;; if not kept with the code that needs them), this allows the use of `(declare (function
+;; ...))' forms in each function definition, so that if a function is moved or removed,
+;; the `declare-function' goes with it.
+
+;; TODO: Propose this upstream.
+
+(eval-and-compile
+  (defun ement--byte-run--declare-function (_name _args &rest values)
+    "Return a `declare-function' form with VALUES.
+Allows the use of a form like:
+
+  (declare (function FN FILE ...))
+
+inside of a function definition, effectively keeping its
+`declare-function' form inside the function definition, ensuring
+that stray such forms don't remain if the function is removed."
+    `(declare-function ,@values))
+
+  (cl-pushnew '(function ement--byte-run--declare-function) defun-declarations-alist :test #'equal)
+  (cl-pushnew '(function ement--byte-run--declare-function) macro-declarations-alist :test #'equal))
+
+;;;; Compatibility
+
+;; These workarounds should be removed when they aren't needed.
+
+(defalias 'ement--json-parse-buffer
+  ;; For non-libjansson builds (those that do have libjansson will see a 4-5x improvement
+  ;; in the time needed to parse JSON responses).
+
+  ;; TODO: Suggest mentioning in manual and docstrings that `json-read', et al do not use
+  ;; libjansson, while `json-parse-buffer', et al do.
+  (if (fboundp 'json-parse-buffer)
+      (lambda ()
+        (condition-case err
+            (json-parse-buffer :object-type 'alist :null-object nil :false-object :json-false)
+          (json-parse-error
+           (ement-message "`json-parse-buffer' signaled `json-parse-error'; falling back to `json-read'... (%S)"
+                          (error-message-string err))
+           (goto-char (point-min))
+           (json-read))))
+    'json-read))
+
+;;;;; Emacs 28 color features.
+
+;; Copied from Emacs 28.  See <https://github.com/alphapapa/ement.el/issues/99>.
+
+;; TODO(future): Remove these workarounds when dropping support for Emacs <28.
+
+(eval-and-compile
+  (unless (boundp 'color-luminance-dark-limit)
+    (defconst ement--color-luminance-dark-limit 0.325
+      "The relative luminance below which a color is considered \"dark.\"
+A \"dark\" color in this sense provides better contrast with
+white than with black; see `color-dark-p'.  This value was
+determined experimentally.")))
+
+(defalias 'ement--color-dark-p
+  (if (fboundp 'color-dark-p)
+      'color-dark-p
+    (with-suppressed-warnings ((free-vars ement--color-luminance-dark-limit))
+      (lambda (rgb)
+        "Whether RGB is more readable against white than black.
+RGB is a 3-element list (R G B), each component in the range [0,1].
+This predicate can be used both for determining a suitable (black or white)
+contrast colour with RGB as background and as foreground."
+        (unless (<= 0 (apply #'min rgb) (apply #'max rgb) 1)
+          (error "RGB components %S not in [0,1]" rgb))
+        ;; Compute the relative luminance after gamma-correcting (assuming sRGB),
+        ;; and compare to a cut-off value determined experimentally.
+        ;; See https://en.wikipedia.org/wiki/Relative_luminance for details.
+        (let* ((sr (nth 0 rgb))
+               (sg (nth 1 rgb))
+               (sb (nth 2 rgb))
+               ;; Gamma-correct the RGB components to linear values.
+               ;; Use the power 2.2 as an approximation to sRGB gamma;
+               ;; it should be good enough for the purpose of this function.
+               (r (expt sr 2.2))
+               (g (expt sg 2.2))
+               (b (expt sb 2.2))
+               (y (+ (* r 0.2126) (* g 0.7152) (* b 0.0722))))
+          (< y ement--color-luminance-dark-limit))))))
+
+;;;; Functions
+
+;;;;; Commands
+
+(cl-defun ement-create-room
+    (session &key name alias topic invite direct-p creation-content
+             (then (lambda (data)
+                     (message "Created new room: %s" (alist-get 'room_id data))))
+             (visibility 'private))
+  "Create new room on SESSION.
+Then call function THEN with response data.  Optional string
+arguments are NAME, ALIAS, and TOPIC.  INVITE may be a list of
+user IDs to invite.  If DIRECT-P, set the \"is_direct\" flag in
+the request.  CREATION-CONTENT may be an alist of extra keys to
+include with the request (see Matrix spec)."
+  ;; TODO: Document other arguments.
+  ;; SPEC: 10.1.1.
+  (declare (indent defun))
+  (interactive (list (ement-complete-session)
+		     :name (read-string "New room name: ")
+		     :alias (read-string "New room alias (e.g. \"foo\" for \"#foo:matrix.org\"): ")
+		     :topic (read-string "New room topic: ")
+		     :visibility (completing-read "New room visibility: " '(private public))))
+  (cl-labels ((given-p (var) (and var (not (string-empty-p var)))))
+    (pcase-let* ((endpoint "createRoom")
+		 (data (ement-aprog1
+			   (ement-alist "visibility" visibility)
+			 (when (given-p alias)
+			   (push (cons "room_alias_name" alias) it))
+			 (when (given-p name)
+			   (push (cons "name" name) it))
+			 (when (given-p topic)
+			   (push (cons "topic" topic) it))
+			 (when invite
+			   (push (cons "invite" invite) it))
+			 (when direct-p
+			   (push (cons "is_direct" t) it))
+                         (when creation-content
+                           (push (cons "creation_content" creation-content) it)))))
+      (ement-api session endpoint :method 'post :data (json-encode data)
+        :then then))))
+
+(cl-defun ement-create-space
+    (session &key name alias topic
+             (then (lambda (data)
+                     (message "Created new space: %s" (alist-get 'room_id data))))
+             (visibility 'private))
+  "Create new space on SESSION.
+Then call function THEN with response data.  Optional string
+arguments are NAME, ALIAS, and TOPIC."
+  (declare (indent defun))
+  (interactive (list (ement-complete-session)
+		     :name (read-string "New space name: ")
+		     :alias (read-string "New space alias (e.g. \"foo\" for \"#foo:matrix.org\"): ")
+		     :topic (read-string "New space topic: ")
+		     :visibility (completing-read "New space visibility: " '(private public))))
+  (ement-create-room session :name name :alias alias :topic topic :visibility visibility
+    :creation-content (ement-alist "type" "m.space") :then then))
+
+(defun ement-room-leave (room session &optional force-p)
+  "Leave ROOM on SESSION.
+If FORCE-P, leave without prompting.  ROOM may be an `ement-room'
+struct, or a room ID or alias string."
+  ;; TODO: Rename `room' argument to `room-or-id'.
+  (interactive
+   (ement-with-room-and-session
+     :prompt-form (ement-complete-room :prompt "Leave room: ")
+     (list ement-room ement-session)))
+  (cl-etypecase room
+    (ement-room)
+    (string (setf room (ement-afirst (or (equal room (ement-room-canonical-alias it))
+                                         (equal room (ement-room-id it)))
+                         (ement-session-rooms session)))))
+  (when (or force-p (yes-or-no-p (format "Leave room %s? " (ement--format-room room))))
+    (pcase-let* (((cl-struct ement-room id) room)
+                 (endpoint (format "rooms/%s/leave" (url-hexify-string id))))
+      (ement-api session endpoint :method 'post :data ""
+        :then (lambda (_data)
+                (when ement-room-leave-kill-buffer
+                  ;; NOTE: This generates a symbol and sets its function value to a lambda
+                  ;; which removes the symbol from the hook, removing itself from the hook.
+                  ;; TODO: When requiring Emacs 27, use `letrec'.
+                  (let* ((leave-fn-symbol (gensym (format "ement-leave-%s" room)))
+                         (leave-fn (lambda (_session)
+                                     (remove-hook 'ement-sync-callback-hook leave-fn-symbol)
+                                     ;; FIXME: Probably need to unintern the symbol.
+                                     (when-let ((buffer (map-elt (ement-room-local room) 'buffer)))
+                                       (when (buffer-live-p buffer)
+                                         (kill-buffer buffer))))))
+                    (setf (symbol-function leave-fn-symbol) leave-fn)
+                    (add-hook 'ement-sync-callback-hook leave-fn-symbol)))
+                (ement-message "Left room: %s" (ement--format-room room)))
+        :else (lambda (plz-error)
+                (pcase-let* (((cl-struct plz-error response) plz-error)
+                             ((cl-struct plz-response status body) response)
+                             ((map error) (json-read-from-string body)))
+                  (pcase status
+                    (429 (error "Unable to leave room %s: %s" room error))
+                    (_ (error "Unable to leave room %s: %s %S" room status plz-error)))))))))
+(defalias 'ement-leave-room #'ement-room-leave)
+
+(defun ement-forget-room (room session &optional force-p)
+  "Forget ROOM on SESSION.
+If FORCE-P (interactively, with prefix), prompt to leave the room
+when necessary, and forget the room without prompting."
+  (interactive
+   (ement-with-room-and-session
+     :prompt-form (ement-complete-room :prompt "Forget room: ")
+     (list ement-room ement-session current-prefix-arg)))
+  (pcase-let* (((cl-struct ement-room id display-name status) room)
+               (endpoint (format "rooms/%s/forget" (url-hexify-string id))))
+    (pcase status
+      ('join (if (and force-p
+                      (yes-or-no-p (format "Leave and forget room %s? (WARNING: You will not be able to rejoin the room to access its content.) "
+                                           (ement--format-room room))))
+                 (progn
+                   ;; TODO: Use `letrec'.
+                   (let* ((forget-fn-symbol (gensym (format "ement-forget-%s" room)))
+                          (forget-fn (lambda (_session)
+                                       (when (equal 'leave (ement-room-status room))
+                                         (remove-hook 'ement-sync-callback-hook forget-fn-symbol)
+                                         ;; FIXME: Probably need to unintern the symbol.
+                                         (ement-forget-room room session 'force)))))
+                     (setf (symbol-function forget-fn-symbol) forget-fn)
+                     (add-hook 'ement-sync-callback-hook forget-fn-symbol))
+                   (ement-leave-room room session 'force))
+               (user-error "Room %s is joined (must be left before forgetting)"
+                           (ement--format-room room))))
+      ('leave (when (or force-p (yes-or-no-p (format "Forget room \"%s\" (%s)? " display-name id)))
+                (ement-api session endpoint :method 'post :data ""
+                  :then (lambda (_data)
+                          ;; NOTE: The spec does not seem to indicate that the action of forgetting
+                          ;; a room is synced to other clients, so it seems that we need to remove
+                          ;; the room from the session here.
+                          (setf (ement-session-rooms session)
+                                (cl-remove room (ement-session-rooms session)))
+                          ;; TODO: Indicate forgotten in footer in room buffer.
+                          (ement-message "Forgot room: %s." (ement--format-room room)))))))))
+
+(defun ement-ignore-user (user-id session &optional unignore-p)
+  "Ignore USER-ID on SESSION.
+If UNIGNORE-P (interactively, with prefix), un-ignore USER."
+  (interactive (list (ement-complete-user-id)
+                     (ement-complete-session)
+                     current-prefix-arg))
+  (pcase-let* (((cl-struct ement-session account-data) session)
+               ;; TODO: Store session account-data events in an alist keyed on type.
+               ((map ('content (map ('ignored_users ignored-users))))
+                (cl-find "m.ignored_user_list" account-data
+                         :key (lambda (event) (alist-get 'type event)) :test #'equal)))
+    (if unignore-p
+        ;; Being map keys, the user IDs have been interned by `json-read'.
+        (setf ignored-users (map-delete ignored-users (intern user-id)))
+      ;; Empty maps are used to list ignored users.
+      (setf (map-elt ignored-users user-id) nil))
+    (ement-put-account-data session "m.ignored_user_list" (ement-alist "ignored_users" ignored-users)
+      :then (lambda (data)
+              (ement-debug "PUT successful" data)
+              (message "Ement: User %s %s." user-id (if unignore-p "unignored" "ignored"))))))
+
+(defun ement-invite-user (user-id room session)
+  "Invite USER-ID to ROOM on SESSION.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room."
+  ;; SPEC: 10.4.2.1.
+  (interactive
+   (ement-with-room-and-session
+     (list (ement-complete-user-id) ement-room ement-session)))
+  (pcase-let* ((endpoint (format "rooms/%s/invite"
+                                 (url-hexify-string (ement-room-id room))))
+               (data (ement-alist "user_id" user-id) ))
+    (ement-api session endpoint :method 'post :data (json-encode data)
+      ;; TODO: Handle error codes.
+      :then (lambda (_data)
+              (message "User %s invited to room \"%s\" (%s)" user-id
+                       (ement-room-display-name room)
+                       (ement-room-id room))))))
+
+(defun ement-list-members (room session bufferp)
+  "Show members of ROOM on SESSION.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room.  If BUFFERP (interactively, with
+prefix), or if there are many members, show in a new buffer;
+otherwise show in echo area."
+  (interactive
+   (ement-with-room-and-session
+     (list ement-room ement-session current-prefix-arg)))
+  (pcase-let* (((cl-struct ement-room members (local (map fetched-members-p))) room)
+               (list-members
+                (lambda (&optional _)
+                  (cond ((or bufferp (> (hash-table-count members) 51))
+                         ;; Show in buffer.
+                         (let* ((buffer (get-buffer-create (format "*Ement members: %s*" (ement-room-display-name room))))
+                                (members (cl-sort (cl-loop for user being the hash-values of members
+                                                           for id = (ement-user-id user)
+                                                           for displayname = (ement--user-displayname-in room user)
+                                                           collect (cons displayname id))
+                                                  (lambda (a b) (string-collate-lessp a b nil t)) :key #'car))
+                                (displayname-width (cl-loop for member in members
+                                                            maximizing (string-width (car member))))
+                                (format-string (format "%%-%ss <%%s>" displayname-width)))
+                           (with-current-buffer buffer
+                             (erase-buffer)
+                             (save-excursion
+                               (dolist (member members)
+                                 (insert (format format-string (car member) (cdr member)) "\n"))))
+                           (pop-to-buffer buffer)))
+                        (t
+                         ;; Show in echo area.
+                         (message "Members of %s (%s): %s" (ement--room-display-name room)
+                                  (hash-table-count members)
+                                  (string-join (map-apply (lambda (_id user)
+                                                            (ement--user-displayname-in room user))
+                                                          members)
+                                               ", ")))))))
+    (if fetched-members-p
+        (funcall list-members)
+      (ement--get-joined-members room session
+        :then list-members))
+    (message "Listing members of %s..." (ement--format-room room))))
+
+(defun ement-send-direct-message (session user-id message)
+  "Send a direct MESSAGE to USER-ID on SESSION.
+Uses the latest existing direct room with the user, or creates a
+new one automatically if necessary."
+  ;; SPEC: 13.23.2.
+  (interactive
+   (let* ((session (ement-complete-session))
+	  (user-id (ement-complete-user-id))
+	  (message (read-string "Message: ")))
+     (list session user-id message)))
+  (if-let* ((seen-user (gethash user-id ement-users))
+	    (existing-direct-room (ement--direct-room-for-user seen-user session)))
+      (progn
+        (ement-send-message existing-direct-room session :body message)
+        (message "Message sent to %s <%s> in room %S <%s>."
+                 (ement--user-displayname-in existing-direct-room seen-user)
+                 user-id
+                 (ement-room-display-name existing-direct-room) (ement-room-id existing-direct-room)))
+    ;; No existing room for user: make new one.
+    (message "Creating new room for user %s..." user-id)
+    (ement-create-room session :direct-p t :invite (list user-id)
+      :then (lambda (data)
+              (let* ((room-id (alist-get 'room_id data))
+	             (room (or (cl-find room-id (ement-session-rooms session)
+                                        :key #'ement-room-id)
+		               ;; New room hasn't synced yet: make a temporary struct.
+		               (make-ement-room :id room-id)))
+                     (direct-rooms-account-data-event-content
+                      ;; FIXME: Make account-data a map.
+                      (alist-get 'content (cl-find-if (lambda (event)
+                                                        (equal "m.direct" (alist-get 'type event)))
+                                                      (ement-session-account-data session)))))
+                ;; Mark new room as direct: add the room to the account-data event, then
+                ;; put the new account data to the server.  (See also:
+                ;; <https://github.com/matrix-org/matrix-react-sdk/blob/919aab053e5b3bdb5a150fd90855ad406c19e4ab/src/Rooms.ts#L91>).
+                (setf (map-elt direct-rooms-account-data-event-content user-id) (vector room-id))
+                (ement-put-account-data session "m.direct" direct-rooms-account-data-event-content)
+                ;; Send message to new room.
+                (ement-send-message room session :body message)
+                (message "Room \"%s\" created for user %s.  Sending message..."
+	                 room-id user-id))))))
+
+(defun ement-tag-room (tag room session)
+  "Toggle TAG for ROOM on SESSION."
+  (interactive
+   (ement-with-room-and-session
+     (let* ((prompt (format "Toggle tag (%s): " (ement--format-room ement-room)))
+            (default-tags
+             (ement-alist (propertize "Favourite"
+                                      'face (when (ement--room-tagged-p "m.favourite" ement-room)
+                                              'transient-value))
+                          "m.favourite"
+                          (propertize "Low-priority"
+                                      'face (when (ement--room-tagged-p "m.lowpriority" ement-room)
+                                              'transient-value))
+                          "m.lowpriority"))
+            (input (completing-read prompt default-tags))
+            (tag (alist-get input default-tags (concat "u." input) nil #'string=)))
+       (list tag ement-room ement-session))))
+  (pcase-let* (((cl-struct ement-session user) session)
+               ((cl-struct ement-user (id user-id)) user)
+               ((cl-struct ement-room (id room-id)) room)
+               (endpoint (format "user/%s/rooms/%s/tags/%s"
+                                 (url-hexify-string user-id) (url-hexify-string room-id) (url-hexify-string tag)))
+               (method (if (ement--room-tagged-p tag room) 'delete 'put)))
+    ;; TODO: "order".
+    ;; FIXME: Removing a tag on a left room doesn't seem to work (e.g. to unfavorite a room after leaving it, but not forgetting it).
+    (ement-api session endpoint :version "v3" :method method :data (pcase method ('put "{}"))
+      :then (lambda (_)
+              (ement-message "%s tag %S on %s"
+                             (pcase method
+                               ('delete "Removed")
+                               ('put "Added"))
+                             tag (ement--format-room room)) ))))
+
+(defun ement-set-display-name (display-name session)
+  "Set DISPLAY-NAME for user on SESSION.
+Sets global displayname."
+  (interactive
+   (let* ((session (ement-complete-session))
+          (display-name (read-string "Set display-name to: " nil nil
+                                     (ement-user-displayname (ement-session-user session)))))
+     (list display-name session)))
+  (pcase-let* (((cl-struct ement-session user) session)
+               ((cl-struct ement-user (id user-id)) user)
+               (endpoint (format "profile/%s/displayname" (url-hexify-string user-id))))
+    (ement-api session endpoint :method 'put :version "v3"
+      :data (json-encode (ement-alist "displayname" display-name))
+      :then (lambda (_data)
+              (message "Ement: Display name set to %S for <%s>" display-name
+                       (ement-user-id (ement-session-user session)))))))
+
+(defun ement-room-set-display-name (display-name room session)
+  "Set DISPLAY-NAME for user in ROOM on SESSION.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room.  Sets the name only in ROOM, not
+globally."
+  (interactive
+   (ement-with-room-and-session
+     (let* ((prompt (format "Set display-name in %S to: "
+                            (ement--format-room ement-room)))
+            (display-name (read-string prompt nil nil
+                                       (ement-user-displayname (ement-session-user ement-session)))))
+       (list display-name ement-room ement-session))))
+  ;; NOTE: This does not seem to be documented in the spec, so we imitate the
+  ;; "/myroomnick" command in SlashCommands.tsx from matrix-react-sdk.
+  (pcase-let* (((cl-struct ement-room state) room)
+               ((cl-struct ement-session user) session)
+               ((cl-struct ement-user id) user)
+               (member-event (cl-find-if (lambda (event)
+                                           (and (equal id (ement-event-state-key event))
+                                                (equal "m.room.member" (ement-event-type event))
+                                                (equal "join" (alist-get 'membership (ement-event-content event)))))
+                                         state)))
+    (cl-assert member-event)
+    (setf (alist-get 'displayname (ement-event-content member-event)) display-name)
+    (ement-put-state room "m.room.member" id (ement-event-content member-event) session
+      :then (lambda (_data)
+              (message "Ement: Display name set to %S for <%s> in %S" display-name
+                       (ement-user-id (ement-session-user session))
+                       (ement--format-room room))))))
+
+;;;;;; Describe room
+
+(defvar ement-describe-room-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "q") #'quit-window)
+    map)
+  "Keymap for `ement-describe-room-mode' buffers.")
+
+(define-derived-mode ement-describe-room-mode read-only-mode
+  "Ement-Describe-Room" "Major mode for `ement-describe-room' buffers.")
+
+(defun ement-describe-room (room session)
+  "Describe ROOM on SESSION.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room."
+  (interactive (ement-with-room-and-session (list ement-room ement-session)))
+  (cl-labels ((heading (string)
+                (propertize (or string "") 'face 'font-lock-builtin-face))
+              (id (string)
+                (propertize (or string "") 'face 'font-lock-constant-face))
+              (member<
+                (a b) (string-collate-lessp (car a) (car b) nil t)))
+    (pcase-let* (((cl-struct ement-room (id room-id) avatar display-name canonical-alias members timeline status topic
+                             (local (map fetched-members-p)))
+                  room)
+                 ((cl-struct ement-session user) session)
+                 ((cl-struct ement-user (id user-id)) user)
+                 (inhibit-read-only t))
+      (if (not fetched-members-p)
+          ;; Members not fetched: fetch them and re-call this command.
+          (ement--get-joined-members room session
+            :then (lambda (_) (ement-room-describe room session)))
+        (with-current-buffer (get-buffer-create (format "*Ement room description: %s*" (or display-name canonical-alias room-id)))
+          (let ((inhibit-read-only t))
+            (erase-buffer)
+            ;; We avoid looping twice by doing a bit more work here and
+            ;; returning a cons which we destructure.
+            (pcase-let* ((`(,member-pairs . ,name-width)
+                          (cl-loop for user being the hash-values of members
+                                   for formatted = (ement--format-user user room session)
+                                   for id = (format "<%s>" (id (ement-user-id user)))
+                                   collect (cons formatted id)
+                                   into pairs
+                                   maximizing (string-width id) into width
+                                   finally return (cons (cl-sort pairs #'member<) width)))
+                         ;; We put the MXID first, because users may use Unicode characters
+                         ;; in their displayname, which `string-width' does not always
+                         ;; return perfect results for, and putting it last prevents
+                         ;; alignment problems.
+                         (spec (format "%%-%ss %%s" name-width)))
+              (save-excursion
+                (insert "\"" (propertize (or display-name canonical-alias room-id) 'face 'font-lock-doc-face) "\"" " is a "
+                        (propertize (if (ement--space-p room)
+                                        "space"
+                                      "room")
+                                    'face 'font-lock-type-face)
+                        " "
+                        (propertize (pcase status
+                                      ('invite "invited")
+                                      ('join "joined")
+                                      ('leave "left")
+                                      (_ (symbol-name status)))
+                                    'face 'font-lock-comment-face)
+                        " on session <" (id user-id) ">.\n\n"
+                        (heading "Avatar: ") (or avatar "") "\n\n"
+                        (heading "ID: ") "<" (id room-id) ">" "\n"
+                        (heading "Alias: ") "<" (id canonical-alias) ">" "\n\n"
+                        (heading "Topic: ") (propertize (or topic "[none]") 'face 'font-lock-comment-face) "\n\n"
+                        (heading "Retrieved events: ") (number-to-string (length timeline)) "\n"
+                        (heading "  spanning: ")
+                        (format-time-string "%Y-%m-%d %H:%M:%S"
+                                            (/ (ement-event-origin-server-ts
+                                                (car (cl-sort (copy-sequence timeline) #'< :key #'ement-event-origin-server-ts)))
+                                               1000))
+                        (heading " to ")
+                        (format-time-string "%Y-%m-%d %H:%M:%S\n\n"
+                                            (/ (ement-event-origin-server-ts
+                                                (car (cl-sort (copy-sequence timeline) #'> :key #'ement-event-origin-server-ts)))
+                                               1000))
+                        (heading "Members") " (" (number-to-string (hash-table-count members)) "):\n")
+                (pcase-dolist (`(,formatted . ,id) member-pairs)
+                  (insert "  " (format spec id formatted) "\n")))))
+          (unless (eq major-mode 'ement-describe-room-mode)
+            ;; Without this check, activating the mode again causes a "Cyclic keymap
+            ;; inheritance" error.
+            (ement-describe-room-mode))
+          (pop-to-buffer (current-buffer)))))))
+
+(defalias 'ement-room-describe #'ement-describe-room)
+
+;;;;;; Push rules
+
+;; NOTE: Although v1.4 of the spec is available and describes setting the push rules using
+;; the "v3" API endpoint, the Element client continues to use the "r0" endpoint, which is
+;; slightly different.  This implementation will follow Element's initially, because the
+;; spec is not simple, and imitating Element's requests will make it easier.
+
+(defun ement-room-notification-state (room session)
+  "Return notification state for ROOM on SESSION.
+Returns one of nil (meaning default rules are used), `all-loud',
+`all', `mentions-and-keywords', or `none'."
+  ;; Following the implementation of getRoomNotifsState() in RoomNotifs.ts in matrix-react-sdk.
+
+  ;; TODO: Guest support (in which case the state should be `all').
+  ;; TODO: Store account data as a hash table of event types.
+  (let ((push-rules (cl-find-if (lambda (alist)
+                                  (equal "m.push_rules" (alist-get 'type alist)))
+                                (ement-session-account-data session))))
+    (cl-labels ((override-mute-rule-for-room-p (room)
+                  ;; Following findOverrideMuteRule() in RoomNotifs.ts.
+                  (when-let ((overrides (map-nested-elt push-rules '(content global override))))
+                    (cl-loop for rule in overrides
+                             when (and (alist-get 'enabled rule)
+                                       (rule-for-room-p rule room))
+                             return rule)))
+                (rule-for-room-p (rule room)
+                  ;; Following isRuleForRoom() in RoomNotifs.ts.
+                  (and (/= 1 (length (alist-get 'conditions rule)))
+                       (pcase-let* ((condition (elt (alist-get 'conditions rule) 0))
+                                    ((map kind key pattern) condition))
+                         (and (equal "event_match" kind)
+                              (equal "room_id" key)
+                              (equal (ement-room-id room) pattern)))))
+                (mute-rule-p (rule)
+                  (when-let ((actions (alist-get 'actions rule)))
+                    (seq-contains-p actions "dont_notify")))
+                ;; NOTE: Although v1.7 of the spec says that "dont_notify" is
+                ;; obsolete, the latest revision of matrix-react-sdk (released last week
+                ;; as v3.77.1) still works as modeled here.
+                (tweak-rule-p (type rule)
+                  (when-let ((actions (alist-get 'actions rule)))
+                    (and (seq-contains-p actions "notify")
+                         (seq-contains-p actions `(set_tweak . ,type) 'seq-contains-p)))))
+      ;; If none of these match, nil is returned, meaning that the default rule is used
+      ;; for the room.
+      (if (override-mute-rule-for-room-p room)
+          'none
+        (when-let ((room-rule (cl-find-if (lambda (rule)
+                                            (equal (ement-room-id room) (alist-get 'rule_id rule)))
+                                          (map-nested-elt push-rules '(content global room)))))
+          (cond ((not (alist-get 'enabled room-rule))
+                 ;; NOTE: According to comment in getRoomNotifsState(), this assumes that
+                 ;; the default is to notify for all messages, which "will be 'wrong' for
+                 ;; one to one rooms because they will notify loudly for all messages."
+                 'all)
+                ((mute-rule-p room-rule)
+                 ;; According to comment, a room-level mute still allows mentions to
+                 ;; notify.  NOTE: See note above.
+                 'mentions-and-keywords)
+                ((tweak-rule-p "sound" room-rule) 'all-loud)))))))
+
+(defun ement-room-set-notification-state (state room session)
+  "Set notification STATE for ROOM on SESSION.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room.  STATE may be nil to set the rules to
+default, `all', `mentions-and-keywords', or `none'."
+  ;; This merely attempts to reproduce the behavior of Element's simple notification
+  ;; options.  It does not attempt to offer all of the features defined in the spec.  And,
+  ;; yes, it is rather awkward, having to sometimes* make multiple requests of different
+  ;; "kinds" to set the rules for a single room, but that is how the API works.
+  ;;
+  ;; * It appears that Element only makes multiple requests of different kinds when
+  ;; strictly necessary, but coding that logic now would seem likely to be a waste of
+  ;; time, given that Element doesn't even use the latest version of the spec yet.  So
+  ;; we'll just do the "dumb" thing and always send requests of both "override" and
+  ;; "room" kinds, which appears to Just Work™.
+  ;;
+  ;; TODO: Match rules to these user-friendly notification states for presentation.  See
+  ;; <https://github.com/matrix-org/matrix-react-sdk/blob/8c67984f50f985aa481df24778078030efa39001/src/RoomNotifs.ts>.
+
+  ;; TODO: Support `all-loud' ("all_messages_loud").
+  (interactive
+   (ement-with-room-and-session
+     (let* ((prompt (format "Set notification rules for %s: " (ement--format-room ement-room)))
+            (available-states (ement-alist "Default" nil
+                                           "All messages" 'all
+                                           "Mentions and keywords" 'mentions-and-keywords
+                                           "None" 'none))
+            (selected-rule (completing-read prompt (mapcar #'car available-states) nil t))
+            (state (alist-get selected-rule available-states nil nil #'equal)))
+       (list state ement-room ement-session))))
+  (cl-labels ((set-rule (kind rule queue message-fn)
+                (pcase-let* (((cl-struct ement-room (id room-id)) room)
+                             (rule-id (url-hexify-string room-id))
+                             (endpoint (format "pushrules/global/%s/%s" kind rule-id))
+                             (method (if rule 'put 'delete))
+                             (then (if rule
+                                       ;; Setting rules requires PUTting the rules, then making a second
+                                       ;; request to enable them.
+                                       (lambda (_data)
+                                         (ement-api session (concat endpoint "/enabled") :queue queue :version "r0"
+                                           :method 'put :data (json-encode (ement-alist 'enabled t))
+                                           :then message-fn))
+                                     message-fn)))
+                  (ement-api session endpoint :queue queue :method method :version "r0"
+                    :data (json-encode rule)
+                    :then then
+                    :else (lambda (plz-error)
+                            (pcase-let* (((cl-struct plz-error response) plz-error)
+                                         ((cl-struct plz-response status) response))
+                              (pcase status
+                                (404 (pcase rule
+                                       (`nil
+                                        ;; Room already had no rules, so none being found is not an
+                                        ;; error.
+                                        nil)
+                                       (_ ;; Unexpected error: re-signal.
+                                        (ement-api-error plz-error))))
+                                (_ ;; Unexpected error: re-signal.
+                                 (ement-api-error plz-error)))))))))
+    (pcase-let* ((available-states
+                  (ement-alist
+                   nil (ement-alist
+                        "override" nil
+                        "room" nil)
+                   'all (ement-alist
+                         "override" nil
+                         "room" (ement-alist
+                                 'actions (vector "notify" (ement-alist
+                                                            'set_tweak "sound"
+                                                            'value "default"))))
+                   'mentions-and-keywords (ement-alist
+                                           "override" nil
+                                           "room" (ement-alist
+                                                   'actions (vector "dont_notify")))
+                   'none (ement-alist
+                          "override" (ement-alist
+                                      'actions (vector "dont_notify")
+                                      'conditions (vector (ement-alist
+                                                           'kind "event_match"
+                                                           'key "room_id"
+                                                           'pattern (ement-room-id room))))
+                          "room" nil)))
+                 (kinds-and-rules (alist-get state available-states nil nil #'equal)))
+      (cl-loop with queue = (make-plz-queue :limit 1)
+               with total = (1- (length kinds-and-rules))
+               for count from 0
+               for message-fn = (if (equal count total)
+                                    (lambda (_data)
+                                      (message "Set notification rules for room: %s" (ement--format-room room)))
+                                  #'ignore)
+               for (kind . state) in kinds-and-rules
+               do (set-rule kind state queue message-fn)))))
+
+;;;;; Public functions
+
+;; These functions could reasonably be called by code in other packages.
+
+(cl-defun ement-put-state
+    (room type key data session
+          &key (then (lambda (response-data)
+                       (ement-debug "State data put on room" response-data data room session))))
+  "Put state event of TYPE with KEY and DATA on ROOM on SESSION.
+DATA should be an alist, which will become the JSON request
+body."
+  (declare (indent defun))
+  (pcase-let* ((endpoint (format "rooms/%s/state/%s/%s"
+                                 (url-hexify-string (ement-room-id room))
+                                 type key)))
+    (ement-api session endpoint :method 'put :data (json-encode data)
+      ;; TODO: Handle error codes.
+      :then then)))
+
+(defun ement-message (format-string &rest args)
+  "Call `message' on FORMAT-STRING prefixed with \"Ement: \"."
+  ;; TODO: Use this function everywhere we use `message'.
+  (apply #'message (concat "Ement: " format-string) args))
+
+(cl-defun ement-upload (session &key data filename then else
+                                (content-type "application/octet-stream"))
+  "Upload DATA with FILENAME to content repository on SESSION.
+THEN and ELSE are passed to `ement-api', which see."
+  (declare (indent defun))
+  (ement-api session "upload" :method 'post :endpoint-category "media"
+    ;; NOTE: Element currently uses "r0" not "v3", so so do we.
+    :params (when filename
+              (list (list "filename" filename)))
+    :content-type content-type :data data :data-type 'binary
+    :then then :else else))
+
+(cl-defun ement-complete-session (&key (prompt "Session: "))
+  "Return an Ement session selected with completion."
+  (pcase (length ement-sessions)
+    (0 (user-error "No active sessions.  Call `ement-connect' to log in"))
+    (1 (cdar ement-sessions))
+    (_ (let* ((ids (mapcar #'car ement-sessions))
+              (selected-id (completing-read prompt ids nil t)))
+         (alist-get selected-id ement-sessions nil nil #'equal)))))
+
+(declare-function ewoc-locate "ewoc")
+(defun ement-complete-user-id ()
+  "Return a user-id selected with completion.
+Selects from seen users on all sessions.  If point is on an
+event, suggests the event's sender as initial input.  Allows
+unseen user IDs to be input as well."
+  (cl-labels ((format-user (user)
+                ;; FIXME: Per-room displaynames are now stored in room structs
+                ;; rather than user structs, so to be complete, this needs to
+                ;; iterate over all known rooms, looking for the user's
+                ;; displayname in that room.
+                (format "%s <%s>"
+                        (ement-user-displayname user)
+			(ement-user-id user))))
+    (let* ((display-to-id
+	    (cl-loop for key being the hash-keys of ement-users
+		     using (hash-values value)
+		     collect (cons (format-user value) key)))
+           (user-at-point (when (equal major-mode 'ement-room-mode)
+                            (when-let ((node (ewoc-locate ement-ewoc)))
+                              (when (ement-event-p (ewoc-data node))
+                                (format-user (ement-event-sender (ewoc-data node)))))))
+	   (selected-user (completing-read "User: " (mapcar #'car display-to-id)
+                                           nil nil user-at-point)))
+      (or (alist-get selected-user display-to-id nil nil #'equal)
+	  selected-user))))
+
+(cl-defun ement-put-account-data
+    (session type data &key room
+             (then (lambda (received-data)
+                     ;; Handle echoed-back account data event (the spec does not explain this,
+                     ;; but see <https://github.com/matrix-org/matrix-react-sdk/blob/675b4271e9c6e33be354a93fcd7807253bd27fcd/src/settings/handlers/AccountSettingsHandler.ts#L150>).
+                     ;; FIXME: Make session account-data a map instead of a list of events.
+                     (if room
+                         (push received-data (ement-room-account-data room))
+                       (push received-data (ement-session-account-data session)))
+
+                     ;; NOTE: Commenting out this ement-debug form because a bug in Emacs
+                     ;; causes this long string to be interpreted as the function's
+                     ;; docstring and cause a too-long-docstring warning.
+
+                     ;; (ement-debug "Account data put and received back on session %s:  PUT(json-encoded):%S  RECEIVED:%S"
+                     ;;              (ement-user-id (ement-session-user session)) (json-encode data) received-data)
+                     )))
+  "Put account data of TYPE with DATA on SESSION.
+If ROOM, put it on that room's account data.  Also handle the
+echoed-back event."
+  (declare (indent defun))
+  (pcase-let* (((cl-struct ement-session (user (cl-struct ement-user (id user-id)))) session)
+               (room-part (if room (format "/rooms/%s" (ement-room-id room)) ""))
+               (endpoint (format "user/%s%s/account_data/%s" (url-hexify-string user-id) room-part type)))
+    (ement-api session endpoint :method 'put :data (json-encode data)
+      :then then)))
+
+(defun ement-redact (event room session &optional reason)
+  "Redact EVENT in ROOM on SESSION, optionally for REASON."
+  (pcase-let* (((cl-struct ement-event (id event-id)) event)
+               ((cl-struct ement-room (id room-id)) room)
+               (endpoint (format "rooms/%s/redact/%s/%s"
+                                 room-id event-id (ement--update-transaction-id session)))
+               (content (ement-alist "reason" reason)))
+    (ement-api session endpoint :method 'put :data (json-encode content)
+      :then (lambda (_data)
+              (message "Event %s redacted." event-id)))))
+
+;;;;; Inline functions
+
+(defsubst ement--user-color (user)
+  "Return USER's color, setting it if necessary.
+USER is an `ement-user' struct."
+  (or (ement-user-color user)
+      (setf (ement-user-color user)
+            (ement--prism-color (ement-user-id user)))))
+
+;;;;; Private functions
+
+;; These functions aren't expected to be called by code in other packages (but if that
+;; were necessary, they could be renamed accordingly).
+
+;; (defun ement--room-routing (room)
+;;   "Return a list of servers to route to ROOM through."
+;;   ;; See <https://spec.matrix.org/v1.2/appendices/#routing>.
+;;   ;; FIXME: Ensure highest power level user is at least level 50.
+;;   ;; FIXME: Ignore servers blocked due to server ACLs.
+;;   ;; FIXME: Ignore servers which are IP addresses.
+;;   (cl-labels ((most-powerful-user-in
+;;                (room))
+;;               (servers-by-population-in
+;;                (room))
+;;               (server-of (user)))
+;;     (let (first-server-by-power-level)
+;;       (delete-dups
+;;        (remq nil
+;;              (list
+;;               ;; 1.
+;;               (or (when-let ((user (most-powerful-user-in room)))
+;;                     (setf first-server-by-power-level t)
+;;                     (server-of user))
+;;                   (car (servers-by-population-in room)))
+;;               ;; 2.
+;;               (if first-server-by-power-level
+;;                   (car (servers-by-population-in room))
+;;                 (cl-second (servers-by-population-in room)))
+;;               ;; 3.
+;;               (cl-third (servers-by-population-in room))))))))
+
+(defun ement--space-p (room)
+  "Return non-nil if ROOM is a space."
+  (equal "m.space" (ement-room-type room)))
+
+(defun ement--room-in-space-p (room space)
+  "Return non-nil if ROOM is in SPACE on SESSION."
+  ;; We could use `ement---room-spaces', but since that returns rooms by looking them up
+  ;; by ID in the session's rooms list, this is more efficient.
+  (pcase-let* (((cl-struct ement-room (id parent-id) (local (map children))) space)
+               ((cl-struct ement-room (id child-id) (local (map parents))) room))
+    (or (member parent-id parents)
+        (member child-id children))))
+
+(defun ement--room-spaces (room session)
+  "Return list of ROOM's parent spaces on SESSION."
+  ;; NOTE: This only looks in the room's parents list; it doesn't look in every space's children
+  ;; list.  This should be good enough, assuming we add to the lists correctly elsewhere.
+  (pcase-let* (((cl-struct ement-session rooms) session)
+               ((cl-struct ement-room (local (map parents))) room))
+    (cl-remove-if-not (lambda (session-room-id)
+                        (member session-room-id parents))
+                      rooms :key #'ement-room-id)))
+
+(cl-defun ement--prism-color (string &key (contrast-with (face-background 'default nil 'default)))
+  "Return a computed color for STRING.
+The color is adjusted to have sufficient contrast with the color
+CONTRAST-WITH (by default, the default face's background).  The
+computed color is useful for user messages, generated room
+avatars, etc."
+  ;; TODO: Use this instead of `ement-room--user-color'.  (Same algorithm ,just takes a
+  ;; string as argument.)
+  ;; TODO: Try using HSV somehow so we could avoid having so many strings return a
+  ;; nearly-black color.
+  (cl-labels ((relative-luminance (rgb)
+                ;; Copy of `modus-themes-wcag-formula', an elegant
+                ;; implementation by Protesilaos Stavrou.  Also see
+                ;; <https://en.wikipedia.org/wiki/Relative_luminance> and
+                ;; <https://www.w3.org/TR/WCAG20/#relativeluminancedef>.
+                (cl-loop for k in '(0.2126 0.7152 0.0722)
+                         for x in rgb
+                         sum (* k (if (<= x 0.03928)
+                                      (/ x 12.92)
+                                    (expt (/ (+ x 0.055) 1.055) 2.4)))))
+              (contrast-ratio (a b)
+                ;; Copy of `modus-themes-contrast'; see above.
+                (let ((ct (/ (+ (relative-luminance a) 0.05)
+                             (+ (relative-luminance b) 0.05))))
+                  (max ct (/ ct))))
+              (increase-contrast (color against target toward)
+                (let ((gradient (cdr (color-gradient color toward 20)))
+                      new-color)
+                  (cl-loop do (setf new-color (pop gradient))
+                           while new-color
+                           until (>= (contrast-ratio new-color against) target)
+                           ;; Avoid infinite loop in case of weirdness
+                           ;; by returning color as a fallback.
+                           finally return (or new-color color)))))
+    (let* ((id string)
+           (id-hash (float (+ (abs (sxhash id)) ement-room-prism-color-adjustment)))
+           ;; TODO: Wrap-around the value to get the color I want.
+           (ratio (/ id-hash (float most-positive-fixnum)))
+           (color-num (round (* (* 255 255 255) ratio)))
+           (color-rgb (list (/ (float (logand color-num 255)) 255)
+                            (/ (float (ash (logand color-num 65280) -8)) 255)
+                            (/ (float (ash (logand color-num 16711680) -16)) 255)))
+           (contrast-with-rgb (color-name-to-rgb contrast-with)))
+      (when (< (contrast-ratio color-rgb contrast-with-rgb) ement-room-prism-minimum-contrast)
+        (setf color-rgb (increase-contrast color-rgb contrast-with-rgb ement-room-prism-minimum-contrast
+                                           (color-name-to-rgb
+                                            ;; Ideally we would use the foreground color,
+                                            ;; but in some themes, like Solarized Dark,
+                                            ;; the foreground color's contrast is too low
+                                            ;; to be effective as the value to increase
+                                            ;; contrast against, so we use white or black.
+                                            (pcase contrast-with
+                                              ((or `nil "unspecified-bg")
+                                               ;; The `contrast-with' color (i.e. the
+                                               ;; default background color) is nil.  This
+                                               ;; probably means that we're displaying on
+                                               ;; a TTY.
+                                               (if (fboundp 'frame--current-backround-mode)
+                                                   ;; This function can tell us whether
+                                                   ;; the background color is dark or
+                                                   ;; light, but it was added in Emacs
+                                                   ;; 28.1.
+                                                   (pcase (frame--current-backround-mode (selected-frame))
+                                                     ('dark "white")
+                                                     ('light "black"))
+                                                 ;; Pre-28.1: Since faces' colors may be
+                                                 ;; "unspecified" on TTY frames, in which
+                                                 ;; case we have nothing to compare with, we
+                                                 ;; assume that the background color of such
+                                                 ;; a frame is black and increase contrast
+                                                 ;; toward white.
+                                                 "white"))
+                                              (_
+                                               ;; The `contrast-with` color is usable: test it.
+                                               (if (ement--color-dark-p (color-name-to-rgb contrast-with))
+                                                   "white" "black")))))))
+      (apply #'color-rgb-to-hex (append color-rgb (list 2))))))
+
+(cl-defun ement--format-user (user &optional (room ement-room) (session ement-session))
+  "Format `ement-user' USER for ROOM on SESSION.
+ROOM defaults to the value of `ement-room'."
+  (let ((face (cond ((equal (ement-user-id (ement-session-user session))
+                            (ement-user-id user))
+                     'ement-room-self)
+                    (ement-room-prism
+                     `(:inherit ement-room-user :foreground ,(or (ement-user-color user)
+                                                                 (setf (ement-user-color user)
+                                                                       (ement--prism-color user)))))
+                    (t 'ement-room-user))))
+    ;; FIXME: If a membership state event has not yet been received, this
+    ;; sets the display name in the room to the user ID, and that prevents
+    ;; the display name from being used if the state event arrives later.
+    (propertize (ement--user-displayname-in room user)
+                'face face
+                'help-echo (ement-user-id user))))
+
+(cl-defun ement--format-body-mentions
+    (body room &key (template "<a href=\"https://matrix.to/#/%s\">%s</a>"))
+  "Return string for BODY with mentions in ROOM linkified with TEMPLATE.
+TEMPLATE is a format string in which the first \"%s\" is replaced
+with the user's MXID and the second with the displayname.  A
+mention is qualified by an \"@\"-prefixed displayname or
+MXID (optionally suffixed with a colon), or a colon-suffixed
+displayname, followed by a blank, question mark, comma, or
+period, anywhere in the body."
+  ;; Examples:
+  ;; "@foo: hi"
+  ;; "@foo:matrix.org: hi"
+  ;; "foo: hi"
+  ;; "@foo and @bar:matrix.org: hi"
+  ;; "foo: how about you and @bar ..."
+  (declare (indent defun))
+  (cl-labels ((members-having-displayname (name members)
+                ;; Iterating over the hash table values isn't as efficient as a hash
+                ;; lookup, but in most rooms it shouldn't be a problem.
+                (cl-loop for user being the hash-values of members
+                         when (equal name (ement--user-displayname-in room user))
+                         collect user)))
+    (pcase-let* (((cl-struct ement-room members) room)
+                 (regexp (rx (or bos bow blank "\n")
+                             (or (seq (group
+                                       ;; Group 1: full @-prefixed MXID.
+                                       "@" (group
+                                            ;; Group 2: displayname.  (NOTE: Does not work
+                                            ;; with displaynames containing spaces.)
+                                            (1+ (seq (optional ".") alnum)))
+                                       (optional ":" (1+ (seq (optional ".") alnum))))
+                                      (or ":" eow eos (syntax punctuation)))
+                                 (seq (group
+                                       ;; Group 3: MXID username or displayname.
+                                       (1+ (not blank)))
+                                      ":" (1+ blank)))))
+                 (pos 0) (replace-group) (replacement))
+      (while (setf pos (string-match regexp body pos))
+        (if (setf replacement
+                  (or (when-let (member (gethash (match-string 1 body) members))
+                        ;; Found user ID: use it as replacement.
+                        (setf replace-group 1)
+                        (format template (match-string 1 body)
+                                (ement--xml-escape-string (ement--user-displayname-in room member))))
+                      (when-let* ((name (or (when (match-string 2 body)
+                                              (setf replace-group 1)
+                                              (match-string 2 body))
+                                            (prog1 (match-string 3 body)
+                                              (setf replace-group 3))))
+                                  (members (members-having-displayname name members))
+                                  (member (when (= 1 (length members))
+                                            ;; If multiple members are found with the same
+                                            ;; displayname, do nothing.
+                                            (car members))))
+                        ;; Found displayname: use it and MXID as replacement.
+                        (format template (ement-user-id member)
+                                (ement--xml-escape-string name)))))
+            (progn
+              ;; Found member: replace and move to end of replacement.
+              (setf body (replace-match replacement t t body replace-group))
+              (let ((difference (- (length replacement) (length (match-string 0 body)))))
+                (setf pos (if (/= 0 difference)
+                              ;; Replacement of a different length: adjust POS accordingly.
+                              (+ pos difference)
+                            (match-end 0)))))
+          ;; No replacement: move to end of match.
+          (setf pos (match-end 0))))))
+  body)
+
+(defun ement--event-mentions-room-p (event &rest _ignore)
+  "Return non-nil if EVENT mentions \"@room\"."
+  (pcase-let (((cl-struct ement-event (content (map body))) event))
+    (when body
+      (string-match-p (rx (or space bos) "@room" eow) body))))
+
+(cl-defun ement-complete-room (&key session (predicate #'identity)
+                                    (prompt "Room: ") (suggest t))
+  "Return a (room session) list selected from SESSION with completion.
+If SESSION is nil, select from rooms in all of `ement-sessions'.
+When SUGGEST, suggest current buffer's room (or a room at point
+in a room list buffer) as initial input (i.e. it should be set to
+nil when switching from one room buffer to another).  PROMPT may
+override the default prompt.  PREDICATE may be a function to
+select which rooms are offered; it is also applied to the
+suggested room."
+  (declare (indent defun))
+  (pcase-let* ((sessions (if session
+                             (list session)
+                           (mapcar #'cdr ement-sessions)))
+               (name-to-room-session
+                (cl-loop for session in sessions
+                         append (cl-loop for room in (ement-session-rooms session)
+                                         when (funcall predicate room)
+                                         collect (cons (ement--format-room room 'topic)
+                                                       (list room session)))))
+               (names (mapcar #'car name-to-room-session))
+               (selected-name (completing-read
+                               prompt names nil t
+                               (when suggest
+                                 (when-let ((suggestion (ement--room-at-point)))
+                                   (when (or (not predicate)
+                                             (funcall predicate suggestion))
+                                     (ement--format-room suggestion 'topic)))))))
+    (alist-get selected-name name-to-room-session nil nil #'string=)))
+
+(cl-defun ement-send-message (room session
+                                   &key body formatted-body replying-to-event filter then)
+  "Send message to ROOM on SESSION with BODY and FORMATTED-BODY.
+THEN may be a function to call after the event is sent
+successfully.  It is called with keyword arguments for ROOM,
+SESSION, CONTENT, and DATA.
+
+REPLYING-TO-EVENT may be an event the message is
+in reply to; the message will reference it appropriately.
+
+FILTER may be a function through which to pass the message's
+content object before sending (see,
+e.g. `ement-room-send-org-filter')."
+  (declare (indent defun))
+  (cl-assert (not (string-empty-p body)))
+  (cl-assert (or (not formatted-body) (not (string-empty-p formatted-body))))
+  (pcase-let* (((cl-struct ement-room (id room-id)) room)
+               (endpoint (format "rooms/%s/send/m.room.message/%s" (url-hexify-string room-id)
+                                 (ement--update-transaction-id session)))
+               (formatted-body (when formatted-body
+                                 (ement--format-body-mentions formatted-body room)))
+               (content (ement-aprog1
+                            (ement-alist "msgtype" "m.text"
+                                         "body" body)
+                          (when formatted-body
+                            (push (cons "formatted_body" formatted-body) it)
+                            (push (cons "format" "org.matrix.custom.html") it))))
+               (then (or then #'ignore)))
+    (when filter
+      (setf content (funcall filter content room)))
+    (when replying-to-event
+      (setf replying-to-event (ement--original-event-for replying-to-event session)
+            content (ement--add-reply content replying-to-event room)))
+    (ement-api session endpoint :method 'put :data (json-encode content)
+      :then (apply-partially then :room room :session session
+                             ;; Data is added when calling back.
+                             :content content :data))))
+
+(defalias 'ement--button-buttonize
+  ;; This isn't nice, but what can you do.
+  (cond ((version<= "29.1" emacs-version) #'buttonize)
+        ((version<= "28.1" emacs-version) (with-suppressed-warnings ((obsolete button-buttonize))
+                                            #'button-buttonize))
+        ((version< emacs-version "28.1")
+         ;; FIXME: This doesn't set the mouse-face to highlight, and it doesn't use the
+         ;; default-button category.  Neither does `button-buttonize', of course, but why?
+         (lambda (string callback &optional data)
+           "Make STRING into a button and return it.
+When clicked, CALLBACK will be called with the DATA as the
+function argument.  If DATA isn't present (or is nil), the button
+itself will be used instead as the function argument."
+           (propertize string
+                       'face 'button
+                       'button t
+                       'follow-link t
+                       'category t
+                       'button-data data
+                       'keymap button-map
+                       'action callback)))))
+
+(defun ement--add-reply (data replying-to-event room)
+  "Return DATA adding reply data for REPLYING-TO-EVENT in ROOM.
+DATA is an unsent message event's data alist."
+  ;; SPEC: <https://matrix.org/docs/spec/client_server/r0.6.1#id351> "13.2.2.6.1  Rich replies"
+  ;; FIXME: Rename DATA.
+  (pcase-let* (((cl-struct ement-event (id replying-to-event-id)
+                           content (sender replying-to-sender))
+                replying-to-event)
+               ((cl-struct ement-user (id replying-to-sender-id)) replying-to-sender)
+               ((map ('body replying-to-body) ('formatted_body replying-to-formatted-body)) content)
+               (replying-to-sender-name (ement--user-displayname-in ement-room replying-to-sender))
+               (quote-string (format "> <%s> %s\n\n" replying-to-sender-name replying-to-body))
+               (reply-body (alist-get "body" data nil nil #'string=))
+               (reply-formatted-body (alist-get "formatted_body" data nil nil #'string=))
+               (reply-body-with-quote (concat quote-string reply-body))
+               (reply-formatted-body-with-quote
+                (format "<mx-reply>
+  <blockquote>
+    <a href=\"https://matrix.to/#/%s/%s\">In reply to</a>
+    <a href=\"https://matrix.to/#/%s\">%s</a>
+    <br />
+    %s
+  </blockquote>
+</mx-reply>
+%s"
+                        (ement-room-id room) replying-to-event-id replying-to-sender-id replying-to-sender-name
+                        ;; TODO: Encode HTML special characters.  Not as straightforward in Emacs as one
+                        ;; might hope: there's `web-mode-html-entities' and `org-entities'.  See also
+                        ;; <https://emacs.stackexchange.com/questions/8166/encode-non-html-characters-to-html-equivalent>.
+                        (or replying-to-formatted-body replying-to-body)
+                        (or reply-formatted-body reply-body))))
+    ;; NOTE: map-elt doesn't work with string keys, so we use `alist-get'.
+    (setf (alist-get "body" data nil nil #'string=) reply-body-with-quote
+          (alist-get "formatted_body" data nil nil #'string=) reply-formatted-body-with-quote
+          data (append (ement-alist "m.relates_to"
+                                    (ement-alist "m.in_reply_to"
+                                                 (ement-alist "event_id" replying-to-event-id))
+                                    "format" "org.matrix.custom.html")
+                       data))
+    data))
+
+(defun ement--direct-room-for-user (user session)
+  "Return last-modified direct room with USER on SESSION, if one exists."
+  ;; Loosely modeled on the Element function findDMForUser in createRoom.ts.
+  (cl-labels ((membership-event-for-p (event user)
+                (and (equal "m.room.member" (ement-event-type event))
+                     (equal (ement-user-id user) (ement-event-state-key event))))
+              (latest-membership-for (user room)
+                (when-let ((latest-membership-event
+                            (car
+                             (cl-sort
+                              ;; I guess we need to check both state and timeline events.
+                              (append (cl-remove-if-not (lambda (event)
+                                                          (membership-event-for-p event user))
+                                                        (ement-room-state room))
+                                      (cl-remove-if-not (lambda (event)
+                                                          (membership-event-for-p event user))
+                                                        (ement-room-timeline room)))
+                              (lambda (a b)
+                                ;; Sort latest first so we can use the car.
+                                (> (ement-event-origin-server-ts a)
+                                   (ement-event-origin-server-ts b)))))))
+                  (alist-get 'membership (ement-event-content latest-membership-event))))
+              (latest-event-in (room)
+                (car
+                 (cl-sort
+                  (append (ement-room-state room)
+                          (ement-room-timeline room))
+                  (lambda (a b)
+                    ;; Sort latest first so we can use the car.
+                    (> (ement-event-origin-server-ts a)
+                       (ement-event-origin-server-ts b)))))))
+    (let* ((direct-rooms (cl-remove-if-not
+                          (lambda (room)
+                            (ement--room-direct-p room session))
+                          (ement-session-rooms session)))
+           (direct-joined-rooms
+            ;; Ensure that the local user is still in each room.
+            (cl-remove-if-not
+             (lambda (room)
+               (equal "join" (latest-membership-for (ement-session-user session) room)))
+             direct-rooms))
+           ;; Since we don't currently keep a member list for each room, we look in the room's
+           ;; join events to see if the user has joined or been invited.
+           (direct-rooms-with-user
+            (cl-remove-if-not
+             (lambda (room)
+               (member (latest-membership-for user room) '("invite" "join")))
+             direct-joined-rooms)))
+      (car (cl-sort direct-rooms-with-user
+                    (lambda (a b)
+                      (> (latest-event-in a) (latest-event-in b))))))))
+
+(defun ement--event-replaces-p (a b)
+  "Return non-nil if event A replaces event B.
+That is, if event A replaces B in their
+\"m.relates_to\"/\"m.relations\" and \"m.replace\" metadata."
+  (pcase-let* (((cl-struct ement-event (id a-id) (origin-server-ts a-ts)
+                           (content (map ('m.relates_to
+                                          (map ('rel_type a-rel-type)
+                                               ('event_id a-replaces-event-id))))))
+                a)
+               ((cl-struct ement-event (id b-id) (origin-server-ts b-ts)
+                           (content (map ('m.relates_to
+                                          (map ('rel_type b-rel-type)
+                                               ('event_id b-replaces-event-id)))
+                                         ('m.relations
+                                          (map ('m.replace
+                                                (map ('event_id b-replaced-by-event-id))))))))
+                b))
+    (or (equal a-id b-replaced-by-event-id)
+        (and (equal "m.replace" a-rel-type)
+             (or (equal a-replaces-event-id b-id)
+                 (and (equal "m.replace" b-rel-type)
+                      (equal a-replaces-event-id b-replaces-event-id)
+                      (>= a-ts b-ts)))))))
+
+(defun ement--events-equal-p (a b)
+  "Return non-nil if events A and B are essentially equal.
+That is, A and B are either the same event (having the same event
+ID), or one event replaces the other (in their m.relates_to and
+m.replace metadata)."
+  (or (equal (ement-event-id a) (ement-event-id b))
+      (ement--event-replaces-p a b)
+      (ement--event-replaces-p b a)))
+
+(defun ement--original-event-for (event session)
+  "Return the original of EVENT in SESSION.
+If EVENT has metadata indicating that it replaces another event,
+return the replaced event; otherwise return EVENT.  If a replaced
+event can't be found in SESSION's events table, return an ersatz
+one that has the expected ID and same sender."
+  (pcase-let (((cl-struct ement-event sender
+                          (content (map ('m.relates_to
+                                         (map ('event_id replaced-event-id)
+                                              ('rel_type relation-type))))))
+               event))
+    (pcase relation-type
+      ("m.replace" (or (gethash replaced-event-id (ement-session-events session))
+                       (make-ement-event :id replaced-event-id :sender sender)))
+      (_ event))))
+
+(defun ement--format-room (room &optional topic)
+  "Return ROOM formatted with name, alias, ID, and optionally TOPIC.
+Suitable for use in completion, etc."
+  (if topic
+      (format "%s%s(<%s>)%s"
+              (or (ement-room-display-name room)
+                  (setf (ement-room-display-name room)
+                        (ement--room-display-name room)))
+              (if (ement-room-canonical-alias room)
+                  (format " <%s> " (ement-room-canonical-alias room))
+                " ")
+              (ement-room-id room)
+              (if (ement-room-topic room)
+                  (format ": \"%s\"" (ement-room-topic room))
+                ""))
+    (format "%s%s(<%s>)"
+            (or (ement-room-display-name room)
+                (setf (ement-room-display-name room)
+                      (ement--room-display-name room)))
+            (if (ement-room-canonical-alias room)
+                (format " <%s> " (ement-room-canonical-alias room))
+              " ")
+            (ement-room-id room))))
+
+(defun ement--members-alist (room)
+  "Return alist of member displaynames mapped to IDs seen in ROOM."
+  ;; We map displaynames to IDs because `ement-room--format-body-mentions' needs to find
+  ;; MXIDs from displaynames.
+  (pcase-let* (((cl-struct ement-room timeline) room)
+               (members-seen (mapcar #'ement-event-sender timeline))
+               (members-alist))
+    (dolist (member members-seen)
+      ;; Testing with `benchmark-run-compiled', it appears that using `cl-pushnew' is
+      ;; about 10x faster than using `delete-dups'.
+      (cl-pushnew (cons (ement--user-displayname-in room member)
+                        (ement-user-id member))
+                  members-alist))
+    members-alist))
+
+(defun ement--mxc-to-url (uri session)
+  "Return HTTPS URL for MXC URI accessed through SESSION."
+  (pcase-let* (((cl-struct ement-session server) session)
+               ((cl-struct ement-server uri-prefix) server)
+               (server-name) (media-id))
+    (string-match (rx "mxc://" (group (1+ (not (any "/"))))
+                      "/" (group (1+ anything))) uri)
+    (setf server-name (match-string 1 uri)
+          media-id (match-string 2 uri))
+    (format "%s/_matrix/media/r0/download/%s/%s"
+            uri-prefix server-name media-id)))
+
+(defun ement--mxc-to-endpoint (uri)
+  "Return API endpoint for MXC URI.
+Returns string suitable for the ENDPOINT argument to `ement-api'."
+  (string-match (rx "mxc://" (group (1+ (not (any "/"))))
+                    "/" (group (1+ anything))) uri)
+  (let ((server-name (match-string 1 uri))
+        (media-id (match-string 2 uri)))
+    (format "media/download/%s/%s" server-name media-id)))
+
+(defun ement--remove-face-property (string value)
+  "Remove VALUE from STRING's `face' properties.
+Used to remove the `button' face from buttons, because that face
+can cause undesirable underlining."
+  (let ((pos 0))
+    (cl-loop for next-face-change-pos = (next-single-property-change pos 'face string)
+             for face-at = (get-text-property pos 'face string)
+             when face-at
+             do (put-text-property pos (or next-face-change-pos (length string))
+                                   'face (cl-typecase face-at
+                                           (atom (if (equal value face-at)
+                                                     nil face-at))
+                                           (list (remove value face-at)))
+                                   string)
+             while next-face-change-pos
+             do (setf pos next-face-change-pos))))
+
+(cl-defun ement--text-property-search-forward (property predicate string &key (start 0))
+  "Return the position at which PROPERTY in STRING matches PREDICATE.
+Return nil if not found.  Searches forward from START."
+  (declare (indent defun))
+  (cl-loop for pos = start then (next-single-property-change pos property string)
+           while pos
+           when (funcall predicate (get-text-property pos property string))
+           return pos))
+
+(cl-defun ement--text-property-search-backward (property predicate string &key (start 0))
+  "Return the position at which PROPERTY in STRING matches PREDICATE.
+Return nil if not found.  Searches backward from START."
+  (declare (indent defun))
+  (cl-loop for pos = start then (previous-single-property-change pos property string)
+           while (and pos (> pos 1))
+           when (funcall predicate (get-text-property (1- pos) property string))
+           return pos))
+
+(defun ement--resize-image (image max-width max-height)
+  "Return a copy of IMAGE set to MAX-WIDTH and MAX-HEIGHT.
+IMAGE should be one as created by, e.g. `create-image'."
+  (declare
+   ;; This silences a lint warning on our GitHub CI runs, which use a build of Emacs
+   ;; without image support.
+   (function image-property "image"))
+  ;; It would be nice if the image library had some simple functions to do this sort of thing.
+  (let ((new-image (cl-copy-list image)))
+    (when (fboundp 'imagemagick-types)
+      ;; Only do this when ImageMagick is supported.
+      ;; FIXME: When requiring Emacs 27+, remove this (I guess?).
+      (setf (image-property new-image :type) 'imagemagick))
+    (setf (image-property new-image :max-width) max-width
+          (image-property new-image :max-height) max-height)
+    new-image))
+
+(defun ement--room-alias (room)
+  "Return latest m.room.canonical_alias event in ROOM."
+  ;; FIXME: This function probably needs to compare timestamps to ensure that older events
+  ;; that are inserted at the head of the events lists aren't used instead of newer ones.
+  (or (cl-loop for event in (ement-room-timeline room)
+               when (equal "m.room.canonical_alias" (ement-event-type event))
+               return (alist-get 'alias (ement-event-content event)))
+      (cl-loop for event in (ement-room-state room)
+               when (equal "m.room.canonical_alias" (ement-event-type event))
+               return (alist-get 'alias (ement-event-content event)))))
+
+(declare-function magit-current-section "magit-section")
+(declare-function eieio-oref "eieio-core")
+(defun ement--room-at-point ()
+  "Return room at point.
+Works in major-modes `ement-room-mode',
+`ement-tabulated-room-list-mode', and `ement-room-list-mode'."
+  (pcase major-mode
+    ('ement-room-mode ement-room)
+    ('ement-tabulated-room-list-mode (tabulated-list-get-id))
+    ('ement-room-list-mode
+     (cl-typecase (oref (magit-current-section) value)
+       (taxy-magit-section nil)
+       (t (pcase (oref (magit-current-section) value)
+            (`[,room ,_session] room)))))))
+
+(defun ement--room-direct-p (room session)
+  "Return non-nil if ROOM on SESSION is a direct chat."
+  (cl-labels ((content-contains-room-id (content room-id)
+                (cl-loop for (_user-id . room-ids) in content
+                         ;; NOTE: room-ids is a vector.
+                         thereis (seq-contains-p room-ids room-id))))
+    (pcase-let* (((cl-struct ement-session account-data) session)
+                 ((cl-struct ement-room id) room))
+      (or (cl-loop for event in account-data
+                   when (equal "m.direct" (alist-get 'type event))
+                   thereis (content-contains-room-id (alist-get 'content event) id))
+          (cl-loop
+           ;; Invited rooms have no account-data yet, and their
+           ;; directness flag is in invite-state events.
+           for event in (ement-room-invite-state room)
+           thereis (alist-get 'is_direct (ement-event-content event)))))))
+
+(defun ement--room-display-name (room)
+  "Return the displayname for ROOM."
+  ;; SPEC: <https://matrix.org/docs/spec/client_server/r0.6.1#calculating-the-display-name-for-a-room>.
+  ;; NOTE: The spec seems incomplete, because the algorithm it recommends does not say how
+  ;; or when to use "m.room.member" events for rooms without heroes (e.g. invited rooms).
+  ;; TODO: Add SESSION argument and use it to remove local user from names.
+  (cl-labels ((latest-event (type content-field)
+                (or (cl-loop for event in (ement-room-timeline room)
+                             when (and (equal type (ement-event-type event))
+                                       (not (string-empty-p (alist-get content-field (ement-event-content event)))))
+                             return (alist-get content-field (ement-event-content event)))
+                    (cl-loop for event in (ement-room-state room)
+                             when (and (equal type (ement-event-type event))
+                                       (not (string-empty-p (alist-get content-field (ement-event-content event)))))
+                             return (alist-get content-field (ement-event-content event)))))
+              (member-events-name ()
+                (when-let ((member-events (cl-loop for accessor in '(ement-room-timeline ement-room-state ement-room-invite-state)
+                                                   append (cl-remove-if-not (apply-partially #'equal "m.room.member")
+                                                                            (funcall accessor room)
+                                                                            :key #'ement-event-type))))
+                  (string-join (delete-dups
+                                (mapcar (lambda (event)
+                                          (ement--user-displayname-in room (ement-event-sender event)))
+                                        member-events))
+                               ", ")))
+              (heroes-name ()
+                (pcase-let* (((cl-struct ement-room summary) room)
+                             ((map ('m.heroes hero-ids) ('m.joined_member_count joined-count)
+                                   ('m.invited_member_count invited-count))
+                              summary))
+                  ;; TODO: Disambiguate hero display names.
+                  (when hero-ids
+                    (cond ((<= (+ joined-count invited-count) 1)
+                           ;; Empty room.
+                           (empty-room hero-ids joined-count))
+                          ((>= (length hero-ids) (1- (+ joined-count invited-count)))
+                           ;; Members == heroes.
+                           (hero-names hero-ids))
+                          ((and (< (length hero-ids) (1- (+ joined-count invited-count)))
+                                (> (+ joined-count invited-count) 1))
+                           ;; More members than heroes.
+                           (heroes-and-others hero-ids joined-count))))))
+              (hero-names (heroes)
+                (string-join (mapcar #'hero-name heroes) ", "))
+              (hero-name (id)
+                (if-let ((user (gethash id ement-users)))
+                    (ement--user-displayname-in room user)
+                  id))
+              (heroes-and-others (heroes joined)
+                (format "%s, and %s others" (hero-names heroes)
+                        (- joined (length heroes))))
+              (name-override ()
+                (when-let ((event (alist-get "org.matrix.msc3015.m.room.name.override"
+                                             (ement-room-account-data room)
+                                             nil nil #'equal)))
+                  (map-nested-elt event '(content name))))
+              (empty-room (heroes joined)
+                (pcase (length heroes)
+                  (0 "Empty room")
+                  ((pred (>= 5)) (format "Empty room (was %s)"
+                                         (hero-names heroes)))
+                  (_ (format "Empty room (was %s)"
+                             (heroes-and-others heroes joined))))))
+    (or (name-override)
+        (latest-event "m.room.name" 'name)
+        (latest-event "m.room.canonical_alias" 'alias)
+        (heroes-name)
+        (member-events-name)
+        (ement-room-id room))))
+(defun ement--room-favourite-p (room)
+  "Return non-nil if ROOM is tagged as favourite."
+  (ement--room-tagged-p "m.favourite" room))
+
+(defun ement--room-low-priority-p (room)
+  "Return non-nil if ROOM is tagged as low-priority."
+  (ement--room-tagged-p "m.lowpriority" room))
+
+(defun ement--room-tagged-p (tag room)
+  "Return non-nil if ROOM has TAG."
+  ;; TODO: Use `make-ement-event' on account-data events.
+  (pcase-let* (((cl-struct ement-room account-data) room)
+               (tag-event (alist-get "m.tag" account-data nil nil #'equal)))
+    (when tag-event
+      (pcase-let (((map ('content (map tags))) tag-event))
+        (cl-typecase tag
+          ;; Tags are symbols internally, because `json-read' converts map keys to them.
+          (string (setf tag (intern tag))))
+        (assoc tag tags)))))
+
+(defun ement--room-unread-p (room session)
+  "Return non-nil if ROOM is considered unread for SESSION.
+The room is unread if it has a modified, live buffer; if it has
+non-zero unread notification counts; or if its fully-read marker
+is not at the latest known message event."
+  ;; Roughly equivalent to the "red/gray/bold/idle" states listed in
+  ;; <https://github.com/matrix-org/matrix-react-sdk/blob/b0af163002e8252d99b6d7075c83aadd91866735/docs/room-list-store.md#list-ordering-algorithm-importance>.
+  (pcase-let* (((cl-struct ement-room timeline account-data unread-notifications receipts
+                           (local (map buffer)))
+                room)
+               ((cl-struct ement-session user) session)
+               ((cl-struct ement-user (id our-id)) user)
+               ((map notification_count highlight_count) unread-notifications)
+               (fully-read-event-id (map-nested-elt (alist-get "m.fully_read" account-data nil nil #'equal)
+                                                    '(content event_id))))
+    ;; MAYBE: Ignore whether the buffer is modified.  Since we have a better handle on how
+    ;; Matrix does notifications/unreads/highlights, maybe that's not needed, and it would
+    ;; be more consistent to ignore it.
+    (or (and buffer (buffer-modified-p buffer))
+        (and unread-notifications
+             (or (not (zerop notification_count))
+                 (not (zerop highlight_count))))
+        ;; NOTE: This is *WAY* too complicated, but it seems roughly equivalent to doesRoomHaveUnreadMessages() from
+        ;; <https://github.com/matrix-org/matrix-react-sdk/blob/7fa01ffb068f014506041bce5f02df4f17305f02/src/Unread.ts#L52>.
+        (when (and (not ement-room-unread-only-counts-notifications)
+                   timeline)
+          ;; A room should rarely, if ever, have a nil timeline, but in case it does
+          ;; (which apparently can happen, given user reports), it should not be
+          ;; considered unread.
+          (cl-labels ((event-counts-toward-unread-p (event)
+                        ;; NOTE: We only consider message events, so membership, reaction,
+                        ;; etc. events will not mark a room as unread.  Ideally, I think
+                        ;; that join/leave events should, at least optionally, mark a room
+                        ;; as unread (e.g. in a 1:1 room with a friend, if the other user
+                        ;; left, one would probably want to know, and marking the room
+                        ;; unread would help the user notice), but since membership events
+                        ;; have to be processed to understand their meaning, it's not
+                        ;; straightforward to know whether one should mark a room unread.
+
+                        ;; FIXME: Use code from `ement-room--format-member-event' to
+                        ;; distinguish ones that should count.
+                        (equal "m.room.message" (ement-event-type event))))
+            (let ((our-read-receipt-event-id (car (gethash our-id receipts)))
+                  (first-counting-event (cl-find-if #'event-counts-toward-unread-p timeline)))
+              (cond ((equal fully-read-event-id (ement-event-id (car timeline)))
+                     ;; The fully-read marker is at the last known event: the room is read.
+                     nil)
+                    ((and (not our-read-receipt-event-id)
+                          (when first-counting-event
+                            (and (not (equal fully-read-event-id (ement-event-id first-counting-event)))
+                                 (not (equal our-id (ement-user-id (ement-event-sender first-counting-event)))))))
+                     ;; The room has no read receipt, and the latest message event is not
+                     ;; the event at which our fully-read marker is at, and it is not sent
+                     ;; by us: the room is unread.  (This is a kind of failsafe to ensure
+                     ;; the user doesn't miss any messages, but it's unclear whether this
+                     ;; is really correct or best.)
+                     t)
+                    ((equal our-id (ement-user-id (ement-event-sender (car timeline))))
+                     ;; We sent the last event: the room is read.
+                     nil)
+                    ((and first-counting-event
+                          (equal our-id (ement-user-id (ement-event-sender first-counting-event))))
+                     ;; We sent the last message event: the room is read.
+                     nil)
+                    ((cl-loop for event in timeline
+                              when (event-counts-toward-unread-p event)
+                              return (and (not (equal our-read-receipt-event-id (ement-event-id event)))
+                                          (not (equal fully-read-event-id (ement-event-id event)))))
+                     ;; The latest message event is not the event at which our
+                     ;; read-receipt or fully-read marker are at: the room is unread.
+                     t))))))))
+
+(defun ement--update-transaction-id (session)
+  "Return SESSION's incremented transaction ID formatted for sending.
+Increments ID and appends current timestamp to avoid reuse
+problems."
+  ;; TODO: Naming things is hard.
+  ;; In the event that Emacs isn't killed cleanly and the session isn't saved to disk, the
+  ;; transaction ID would get reused the next time the user connects.  To avoid that, we
+  ;; append the current time to the ID.  (IDs are just strings, and Element does something
+  ;; similar, so this seems reasonable.)
+  (format "%s-%s"
+          (cl-incf (ement-session-transaction-id session))
+          (format-time-string "%s")))
+
+(defun ement--user-displayname-in (room user &optional recalculatep)
+  "Return the displayname for USER in ROOM.
+If RECALCULATEP, force recalculation; otherwise return a cached
+name if available."
+  ;; SPEC: <https://matrix.org/docs/spec/client_server/r0.6.1#calculating-the-display-name-for-a-user>.
+  ;; NOTE: Both state and timeline events must be searched.  (A helpful user
+  ;; in #matrix-dev:matrix.org, Michael (t3chguy), clarified this for me).
+  (or (unless recalculatep
+        (gethash user (ement-room-displaynames room)))
+      (cl-labels ((event-sets-displayname (event)
+                    (and (eq user (ement-event-sender event))
+                         (equal "m.room.member" (ement-event-type event))
+                         (equal "join" (alist-get 'membership (ement-event-content event)))
+                         (alist-get 'displayname (ement-event-content event)))))
+        ;; Search timeline events before state events, because IIUC they should be more
+        ;; recent.  Also, we assume that the timeline and state events are sorted
+        ;; most-recent-first, so the first such event found is the one to use.
+        (puthash user (or (cl-loop for event in (ement-room-timeline room)
+                                   when (event-sets-displayname event)
+                                   return it)
+                          (cl-loop for event in (ement-room-state room)
+                                   when (event-sets-displayname event)
+                                   return it)
+                          ;; FIXME: Add step 3 of the spec.  For now we skip to step 4.
+                          ;; No membership state event: use pre-calculated displayname or ID.
+                          (ement-user-displayname user)
+                          (ement-user-id user))
+                 (ement-room-displaynames room)))))
+
+(defun ement--xml-escape-string (string)
+  "Return STRING having been escaped with `xml-escape-string'.
+Before Emacs 28, ignores `xml-invalid-character' errors (and any
+invalid characters cause STRING to remain unescaped).  After
+Emacs 28, uses the NOERROR argument to `xml-escape-string'."
+  (with-suppressed-warnings ((callargs xml-escape-string))
+    (condition-case _
+        (xml-escape-string string 'noerror)
+      (wrong-number-of-arguments
+       (condition-case _
+           (xml-escape-string string)
+         (xml-invalid-character
+          ;; We still don't want to error on this, so just return the string.
+          string))))))
+
+(defun ement--mark-room-direct (room session)
+  "Mark ROOM on SESSION as a direct room.
+This may be used to mark rooms as direct which, for whatever
+reason (like a bug in your favorite client), were not marked as
+such when they were created."
+  (pcase-let* (((cl-struct ement-room timeline (id room-id)) room)
+               ((cl-struct ement-session (user local-user)) session)
+               ((cl-struct ement-user (id local-user-id)) local-user)
+               (direct-rooms-account-data-event-content
+                (alist-get 'content
+                           (cl-find-if (lambda (event)
+                                         (equal "m.direct" (alist-get 'type event)))
+                                       (ement-session-account-data session))))
+               (members (delete-dups (mapcar #'ement-event-sender timeline)))
+               (other-users (cl-remove local-user-id members
+                                       :key #'ement-user-id :test #'equal))
+               ((cl-struct ement-user (id other-user-id)) (car other-users))
+               ;; The alist keys are MXIDs as symbols.
+               (other-user-id (intern other-user-id))
+               (existing-direct-rooms-for-user (map-elt direct-rooms-account-data-event-content other-user-id)))
+    (cl-assert (= 1 (length other-users)))
+    (setf (map-elt direct-rooms-account-data-event-content other-user-id)
+          (cl-coerce (append existing-direct-rooms-for-user (list room-id))
+                     'vector))
+    (ement-put-account-data session "m.direct" direct-rooms-account-data-event-content
+      :then (lambda (_data)
+              (message "Ement: Room <%s> marked as direct for <%s>." room-id other-user-id)))
+    (message "Ement: Marking room as direct...")))
+
+(cl-defun ement--get-joined-members (room session &key then else)
+  "Get joined members in ROOM on SESSION and call THEN with response data.
+Or call ELSE with error data if request fails.  Also puts members
+on `ement-users', updating their displayname and avatar URL
+slots, and puts them on ROOM's `members' table."
+  (declare (indent defun))
+  (pcase-let* (((cl-struct ement-room id members) room)
+               (endpoint (format "rooms/%s/joined_members" (url-hexify-string id))))
+    (ement-api session endpoint
+      :else else
+      :then (lambda (data)
+              (clrhash members)
+              (mapc (lambda (member)
+                      (pcase-let* ((`(,id-symbol
+                                      . ,(map ('avatar_url avatar-url)
+                                              ('display_name display-name)))
+                                    member)
+                                   (member-id (symbol-name id-symbol))
+                                   (user (or (gethash member-id ement-users)
+                                             (puthash member-id (make-ement-user :id member-id)
+                                                      ement-users))))
+                        (setf (ement-user-displayname user) display-name
+                              (ement-user-avatar-url user) avatar-url)
+                        (puthash member-id user members)))
+                    (alist-get 'joined data))
+              (setf (alist-get 'fetched-members-p (ement-room-local room)) t)
+              (when then
+                ;; Finally, call the given callback.
+                (funcall then data))))
+    (message "Ement: Getting joined members in %s..." (ement--format-room room))))
+
+(cl-defun ement--human-format-duration (seconds &optional abbreviate)
+  "Return human-formatted string describing duration SECONDS.
+If SECONDS is less than 1, returns \"0 seconds\".  If ABBREVIATE
+is non-nil, return a shorter version, without spaces.  This is a
+simple calculation that does not account for leap years, leap
+seconds, etc."
+  ;; Copied from `ts-human-format-duration' (same author).
+  (if (< seconds 1)
+      (if abbreviate "0s" "0 seconds")
+    (cl-macrolet ((format> (place)
+                    ;; When PLACE is greater than 0, return formatted string using its symbol name.
+                    `(when (> ,place 0)
+                       (format "%d%s%s" ,place
+                               (if abbreviate "" " ")
+                               (if abbreviate
+                                   ,(substring (symbol-name place) 0 1)
+                                 ,(symbol-name place)))))
+                  (join-places (&rest places)
+                    ;; Return string joining the names and values of PLACES.
+                    `(string-join (delq nil
+                                        (list ,@(cl-loop for place in places
+                                                         collect `(format> ,place))))
+                                  (if abbreviate "" ", "))))
+      (pcase-let ((`(,years ,days ,hours ,minutes ,seconds) (ement--human-duration seconds)))
+        (join-places years days hours minutes seconds)))))
+
+(defun ement--human-duration (seconds)
+  "Return list describing duration SECONDS.
+List includes years, days, hours, minutes, and seconds.  This is
+a simple calculation that does not account for leap years, leap
+seconds, etc."
+  ;; Copied from `ts-human-format-duration' (same author).
+  (cl-macrolet ((dividef (place divisor)
+                  ;; Divide PLACE by DIVISOR, set PLACE to the remainder, and return the quotient.
+                  `(prog1 (/ ,place ,divisor)
+                     (setf ,place (% ,place ,divisor)))))
+    (let* ((seconds (floor seconds))
+           (years (dividef seconds 31536000))
+           (days (dividef seconds 86400))
+           (hours (dividef seconds 3600))
+           (minutes (dividef seconds 60)))
+      (list years days hours minutes seconds))))
+
+(defun ement--read-multiple-choice (prompt choices &optional help)
+  "Wrapper for `read-multiple-choice'."
+  ;; Bypasses the hard-coded multi-column formatting in the help buffer
+  ;; (which often doesn't wrap nicely) in favour of one option per line.
+  (let ((help-format (if help
+                         (concat (replace-regexp-in-string "%" "%%" help)
+                                 "\n\n%s")
+                       "%s"))
+        (help-choices (mapconcat (lambda (c)
+                                   (format "%c: %s\n" (car c) (caddr c)))
+                                 choices)))
+    (read-multiple-choice prompt choices (format help-format help-choices))))
+
+(cl-defun ement--media-request
+    (mxc session &key queue (then #'ignore) (else #'ement-api-error)
+         (as 'binary) (authenticatedp t))
+  "Request media from MXC URL on SESSION.
+If AUTHENTICATEDP, send authenticated request.  Arguments THEN,
+ELSE, and AS are passed to `ement-api' for authenticated media
+requests, or to `plz' for unauthenticated ones, each which see.
+If QUEUE, send request on it."
+  (declare (indent defun))
+  (if authenticatedp
+      (ement-api session (ement--mxc-to-endpoint mxc) :version "v1"
+        :json-read-fn as :then then :else else :queue queue)
+    ;; Send unauthenticated request.
+    (if queue
+        (plz-run
+         (plz-queue queue
+           'get (ement--mxc-to-url mxc session) :as as
+           :then then :else else :noquery t))
+      (plz 'get (ement--mxc-to-url mxc session) :as as
+        :then then :else else :noquery t))))
+
+;;; Footer
+
+(provide 'ement-lib)
+
+;;; ement-lib.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-lib.elc b/emacs/.emacs.d/elpa/ement-0.17/ement-lib.elc
new file mode 100644
index 0000000..1f66a88
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/ement-lib.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-macros.el b/emacs/.emacs.d/elpa/ement-0.17/ement-macros.el
new file mode 100644
index 0000000..87c10c5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-macros.el
@@ -0,0 +1,271 @@
+;;; ement-macros.el --- Ement macros                 -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+;;;; Requirements
+
+(require 'map)
+
+;;;; Debugging
+
+(require 'warnings)
+
+;; NOTE: Uncomment this form and `emacs-lisp-byte-compile-and-load' the file to enable
+;; `ement-debug' messages.  This is commented out by default because, even though the
+;; messages are only displayed when `warning-minimum-log-level' is `:debug' at runtime, if
+;; that is so at expansion time, the expanded macro calls format the message and check the
+;; log level at runtime, which is not zero-cost.
+
+;; (eval-and-compile
+;;   (setq-local warning-minimum-log-level nil)
+;;   (setq-local warning-minimum-log-level :debug))
+
+(cl-defmacro ement-debug (&rest args)
+  "Display a debug warning showing the runtime value of ARGS.
+The warning automatically includes the name of the containing
+function, and it is only displayed if `warning-minimum-log-level'
+is `:debug' at expansion time (otherwise the macro expands to a
+call to `ignore' with ARGS and is eliminated by the
+byte-compiler).  When debugging, the form also returns nil so,
+e.g. it may be used in a conditional in place of nil.
+
+Each of ARGS may be a string, which is displayed as-is, or a
+symbol, the value of which is displayed prefixed by its name, or
+a Lisp form, which is displayed prefixed by its first symbol.
+
+Before the actual ARGS arguments, you can write keyword
+arguments, i.e. alternating keywords and values.  The following
+keywords are supported:
+
+  :buffer BUFFER   Name of buffer to pass to `display-warning'.
+  :level  LEVEL    Level passed to `display-warning', which see.
+                   Default is :debug."
+  ;; TODO: Can we use a compiler macro to handle this more elegantly?
+  (pcase-let* ((fn-name (when byte-compile-current-buffer
+                          (with-current-buffer byte-compile-current-buffer
+                            ;; This is a hack, but a nifty one.
+                            (save-excursion
+                              (beginning-of-defun)
+                              (cl-second (read (current-buffer)))))))
+               (plist-args (cl-loop while (keywordp (car args))
+                                    collect (pop args)
+                                    collect (pop args)))
+               ((map (:buffer buffer) (:level level)) plist-args)
+               (level (or level :debug))
+               (string (cl-loop for arg in args
+                                concat (pcase arg
+                                         ((pred stringp) "%S ")
+                                         ((pred symbolp)
+                                          (concat (upcase (symbol-name arg)) ":%S "))
+                                         ((pred listp)
+                                          (concat "(" (upcase (symbol-name (car arg)))
+                                                  (pcase (length arg)
+                                                    (1 ")")
+                                                    (_ "...)"))
+                                                  ":%S "))))))
+    (if (eq :debug warning-minimum-log-level)
+        `(let ((fn-name ,(if fn-name
+                             `',fn-name
+                           ;; In an interpreted function: use `backtrace-frame' to get the
+                           ;; function name (we have to use a little hackery to figure out
+                           ;; how far up the frame to look, but this seems to work).
+                           `(cl-loop for frame in (backtrace-frames)
+                                     for fn = (cl-second frame)
+                                     when (not (or (subrp fn)
+                                                   (special-form-p fn)
+                                                   (eq 'backtrace-frames fn)))
+                                     return (make-symbol (format "%s [interpreted]" fn))))))
+           (display-warning fn-name (format ,string ,@args) ,level ,buffer)
+           nil)
+      `(ignore ,@args))))
+
+;;;; Macros
+
+(defmacro ement-alist (&rest pairs)
+  "Expand to an alist of the keys and values in PAIRS."
+  `(list ,@(cl-loop for (key value) on pairs by #'cddr
+                    collect `(cons ,key ,value))))
+
+;;;;; Anaphoric
+
+;; We could just depend on dash.el and use --first, and anaphora.el (only
+;; on MELPA, not ELPA) has aprog1, but in order to reduce dependencies...
+
+(defmacro ement-afirst (form list)
+  ;; Sometimes checkdoc is really annoying.  If I use "FORM returns" or
+  ;; "FORM evaluates", it complains, so I can't have a clean linting.
+  "Return the first element of LIST for which FORM is non-nil.
+In FORM, `it' is bound to the element being tested."
+  (declare (indent 1))
+  `(cl-loop for it in ,list
+            ;; Avoid the `when' clause's implicit binding of `it'.
+            do (when ,form
+                 (cl-return it))))
+
+(defmacro ement-aprog1 (first &rest body)
+  "Like `prog1', but FIRST's value is bound to `it' around BODY."
+  (declare (indent 1))
+  `(let ((it ,first))
+     ,@body
+     it))
+
+(defmacro ement-singly (place-form &rest body)
+  "If PLACE-FORM is nil, set it non-nil and eval BODY.
+BODY should set PLACE-FORM to nil when BODY is eligible to run
+again."
+  (declare (indent defun))
+  `(unless ,place-form
+     (setf ,place-form t)
+     ,@body))
+
+;;;;; Progress reporters
+
+;; MAYBE: Submit a `with-progress-reporter' macro to Emacs.
+
+(defalias 'ement-progress-update #'ignore
+  "By default, this function does nothing.  But inside
+`ement-with-progress-reporter', it's bound to a function that
+updates the current progress reporter.")
+
+(defmacro ement-with-progress-reporter (args &rest body)
+  "Eval BODY with a progress reporter according to ARGS.
+ARGS is a plist of these values:
+
+  :when  If specified, a form evaluated at runtime to determine
+         whether to make and update a progress reporter.  If not
+         specified, the reporter is always made and updated.
+
+  :reporter  A list of arguments passed to
+             `make-progress-reporter', which see.
+
+Around BODY, the function `ement-progress-update' is set to a
+function that calls `progress-reporter-update' on the progress
+reporter (or if the :when form evaluates to nil, the function is
+set to `ignore').  It optionally takes a VALUE argument, and
+without one, it automatically updates the value from the
+reporter's min-value to its max-value."
+  (declare (indent defun))
+  (pcase-let* ((progress-reporter-sym (gensym))
+               (progress-value-sym (gensym))
+               (start-time-sym (gensym))
+               ((map (:when when-form) (:reporter reporter-args)) args)
+               (`(,_message ,min-value ,_max-value) reporter-args)
+               (update-fn `(cl-function
+                            (lambda (&optional (value (cl-incf ,progress-value-sym)))
+                              (ement-debug "Updating progress reporter to" value)
+                              (progress-reporter-update ,progress-reporter-sym value)))))
+    `(let* ((,start-time-sym (current-time))
+            (,progress-value-sym (or ,min-value 0))
+            (,progress-reporter-sym ,(if when-form
+                                         `(when ,when-form
+                                            (make-progress-reporter ,@reporter-args))
+                                       `(make-progress-reporter ,@reporter-args))))
+       ;; We use `cl-letf' rather than `cl-labels', because labels expand to lambdas and funcalls,
+       ;; so other functions that call `ement-progress-update' wouldn't call this definition.
+       (cl-letf (((symbol-function 'ement-progress-update)
+                  ,(if when-form
+                       `(if ,when-form
+                            ,update-fn
+                          #'ignore)
+                     update-fn)))
+         ,@body
+         (ement-debug (format "Ement: Progress reporter done (took %.2f seconds)"
+                              (float-time (time-subtract (current-time) ,start-time-sym))))))))
+
+;;;;; Room-related macros
+
+;; Prevent compiler from complaining that `value' is an unknown slot.
+(require 'magit-section)
+
+(cl-defmacro ement-with-room-and-session (&rest body)
+  "Eval BODY with `ement-room' and `ement-session' bound.
+If in an `ement-room-list-mode' buffer and `current-prefix-arg'
+is nil, use the room and session at point.  If in an `ement-room'
+buffer and `current-prefix-arg' is nil, use buffer-local value of
+`ement-room' and `ement-session'.  Otherwise, prompt for them
+with `ement-complete-room' or that given with :prompt-form.
+
+BODY may begin with property list arguments, including:
+
+  :prompt-form  A Lisp form evaluated for the binding of
+                `ement-room'."
+  (declare (indent defun))
+  (pcase-let* ((plist (cl-loop while (keywordp (car body))
+                               append (list (car body) (cadr body))
+                               and do (setf body (cddr body))))
+               (prompt-form (or (plist-get plist :prompt-form)
+                                '(ement-complete-room :suggest t))))
+    `(pcase-let* ((`[,list-room ,list-session] (if (eq 'ement-room-list-mode major-mode)
+                                                   (oref (magit-current-section) value)
+                                                 [nil nil]))
+                  (ement-room (or list-room ement-room))
+                  (ement-session (or list-session ement-session)))
+       (when (or current-prefix-arg (not ement-room))
+         (pcase-let ((`(,room ,session) ,prompt-form))
+           (setf ement-room room
+                 ement-session session)))
+       ,@body)))
+
+(defmacro ement-propertize (string &rest properties)
+  "Like `propertize', but auto-set `font-lock-face' property.
+If the `face' property is set, also set the `font-lock-face' property to
+the same value."
+  ;; This is a workaround for a change in `magit-section'; see
+  ;; <https://github.com/alphapapa/ement.el/issues/331>.  By setting both face properties,
+  ;; we should preserve backward compatibility.  Someday this can be removed and we'll
+  ;; just call `propertize' again.
+  (declare (indent defun))
+  (when (and (member ''face properties)
+             (not (member ''font-lock-face properties)))
+    (pcase (plist-get properties ''face #'equal)
+      ((or (pred atom) `(quote ,(pred atom)))
+       `(propertize ,string ,@properties
+                    'font-lock-face ,(plist-get properties ''face #'equal)))
+      (_
+       ;; Avoid evaluating the 'face property's form twice.
+       (let ((value-form (plist-get properties ''face #'equal))
+             (value-var (gensym "ement-propertize-")))
+         (setf (plist-get properties ''face #'equal) value-var
+               (plist-get properties ''font-lock-face #'equal) value-var)
+         `(let ((,value-var ,value-form))
+            (propertize ,string ,@properties)))))))
+
+;;;; Variables
+
+
+;;;; Customization
+
+
+;;;; Commands
+
+
+;;;; Functions
+
+
+;;;; Footer
+
+(provide 'ement-macros)
+
+;;; ement-macros.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-macros.elc b/emacs/.emacs.d/elpa/ement-0.17/ement-macros.elc
new file mode 100644
index 0000000..c742af1
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/ement-macros.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-notifications.el b/emacs/.emacs.d/elpa/ement-0.17/ement-notifications.el
new file mode 100644
index 0000000..4df7e96
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-notifications.el
@@ -0,0 +1,301 @@
+;;; ement-notifications.el --- Notifications support  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for Matrix notifications.  It differs from
+;; `ement-notify', which implements a kind of bespoke notification system for events
+;; received via sync requests rather than Matrix's own notifications endpoint.  These two
+;; libraries currently integrate somewhat, as newly arriving events are handled and
+;; notified about by `ement-notify', and old notifications are fetched and listed by
+;; `ement-notifications' in the same "*Ement Notifications*" buffer.
+
+;; In the future, these libraries will likely be consolidated and enhanced to more closely
+;; follow the Matrix API's and Element client's examples.
+
+;;; Code:
+
+;;;; Requirements
+
+(require 'cl-lib)
+(require 'map)
+
+(require 'ement-lib)
+(require 'ement-room)
+(require 'ement-notify)
+
+;;;; Structs
+
+(cl-defstruct ement-notification
+  "Represents a Matrix notification."
+  room-id event readp)
+
+(defun ement-notifications--make (notification)
+  "Return an `ement-notification' struct for NOTIFICATION.
+NOTIFICATION is an alist representing a notification returned
+from the \"/notifications\" endpoint.  The notification's event
+is passed through `ement--make-event'."
+  (declare (function ement--make-event "ement"))
+  (pcase-let (((map room_id _actions _ts event read) notification))
+    (make-ement-notification :room-id room_id :readp read
+                             :event (ement--make-event event))))
+
+;;;; Variables
+
+(declare-function ement-room-list "ement-room-list")
+(defvar ement-notifications-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "<return>") #'ement-notifications-jump)
+    (define-key map [mouse-1] #'ement-notifications-jump-mouse)
+    (define-key map [mouse-2] #'ement-notifications-jump-mouse)
+    (define-key map (kbd "S-<return>") #'ement-notify-reply)
+    (define-key map (kbd "M-g M-l") #'ement-room-list)
+    (define-key map (kbd "M-g M-m") #'ement-notify-switch-to-mentions-buffer)
+    (define-key map (kbd "M-g M-n") #'ement-notify-switch-to-notifications-buffer)
+    (define-key map [remap scroll-down-command] #'ement-notifications-scroll-down-command)
+    (define-key map [remap mwheel-scroll] #'ement-notifications-mwheel-scroll)
+    (make-composed-keymap (list map) 'view-mode-map))
+  "Map for Ement notification buffers.")
+
+(cl-defun ement-notifications-jump (&optional (pos (point)))
+  "Jump to Matrix event at POS."
+  (interactive)
+  (let ((session (get-text-property pos 'session))
+        (room (get-text-property pos 'room))
+        (event (get-text-property pos 'event)))
+    (ement-view-room room session)
+    (ement-room-goto-event event)))
+
+(defun ement-notifications-jump-mouse (event)
+  "Jump to Matrix event at EVENT."
+  (interactive "e")
+  (let ((pos (posn-point (event-start event))))
+    (if (button-at pos)
+        (push-button pos)
+      (ement-notifications-jump pos))))
+
+(defvar ement-notifications-hook '(ement-notifications-log-to-buffer)
+  "Functions called for `ement-notifications' notifications.
+Each function is called with two arguments, the session and the
+`ement-notification' struct.")
+
+(defvar-local ement-notifications-retro-loading nil
+  "Non-nil when earlier messages are being loaded.
+Used to avoid overlapping requests.")
+
+(defvar-local ement-notifications-metadata nil
+  "Metadata for `ement-notifications' buffers.")
+
+;; Variables from other files.
+(defvar ement-ewoc)
+(defvar ement-session)
+(defvar ement-notify-prism-background)
+(defvar ement-room-message-format-spec)
+(defvar ement-room-sender-in-left-margin)
+
+;;;; Commands
+
+;;;###autoload
+(cl-defun ement-notifications
+    (session &key from limit only
+             (then (apply-partially #'ement-notifications-callback session)) else)
+  "Show the notifications buffer for SESSION.
+FROM may be a \"next_token\" token from a previous request.
+LIMIT may be a maximum number of events to return.  ONLY may be
+the string \"highlight\" to only return notifications that have
+the highlight tweak set.  THEN and ELSE may be callbacks passed
+to `ement-api', which see."
+  (interactive (list (ement-complete-session)
+                     :only (when current-prefix-arg
+                             "highlight")))
+  (if-let ((buffer (get-buffer "*Ement Notifications*")))
+      (switch-to-buffer buffer)
+    (let ((endpoint "notifications")
+          (params (remq nil
+                        (list (when from
+                                (list "from" from))
+                              (when limit
+                                (list "limit" (number-to-string limit)))
+                              (when only
+                                (list "only" only))))))
+      (ement-api session endpoint :params params :then then :else else)
+      (ement-message "Fetching notifications for <%s>..." (ement-user-id (ement-session-user session))))))
+
+(cl-defun ement-notifications-callback (session data &key (buffer (ement-notifications--log-buffer)))
+  "Callback for `ement-notifications' on SESSION which receives DATA."
+  (pcase-let (((map notifications next_token) data))
+    (with-current-buffer buffer
+      (setf (map-elt ement-notifications-metadata :next-token) next_token)
+      (cl-loop for notification across notifications
+               do (run-hook-with-args 'ement-notifications-hook
+                                      session (ement-notifications--make notification)))
+      ;; TODO: Pass start/end nodes to `ement-room--insert-ts-headers' if possible.
+      (ement-room--insert-ts-headers)
+      (switch-to-buffer (current-buffer)))))
+
+(defun ement-notifications-scroll-down-command ()
+  "Scroll down, and load NUMBER earlier messages when at top."
+  (interactive)
+  (condition-case _err
+      (scroll-down nil)
+    (beginning-of-buffer
+     (call-interactively #'ement-notifications-retro))))
+
+(defun ement-notifications-mwheel-scroll (event)
+  "Scroll according to EVENT, loading earlier messages when at top."
+  (interactive "e")
+  (with-selected-window (posn-window (event-start event))
+    (mwheel-scroll event)
+    (when (= (point-min) (window-start))
+      (call-interactively #'ement-notifications-retro))))
+
+(cl-defun ement-notifications-retro (session number)
+  ;; FIXME: Naming things is hard.
+  "Retrieve NUMBER older notifications on SESSION."
+  ;; FIXME: Support multiple sessions.
+  (interactive (list (ement-complete-session)
+                     (cl-typecase current-prefix-arg
+                       (null 100)
+                       (list (read-number "Number of messages: "))
+                       (number current-prefix-arg))))
+  (cl-assert (eq 'ement-notifications-mode major-mode))
+  (cl-assert (map-elt ement-notifications-metadata :next-token) nil
+             "No more notifications for %s" (ement-user-id (ement-session-user ement-session)))
+  (let ((buffer (current-buffer)))
+    (unless ement-notifications-retro-loading
+      (ement-notifications
+       session :limit number
+       :from (map-elt ement-notifications-metadata :next-token)
+       ;; TODO: Use a :finally for resetting `ement-notifications-retro-loading'?
+       :then (lambda (data)
+               (unwind-protect
+                   (ement-notifications-callback session data :buffer buffer)
+                 (setf (buffer-local-value 'ement-notifications-retro-loading buffer) nil)))
+       :else (lambda (plz-error)
+               (setf (buffer-local-value 'ement-notifications-retro-loading buffer) nil)
+               (ement-api-error plz-error)))
+      (ement-message "Loading %s earlier messages..." number)
+      (setf ement-notifications-retro-loading t))))
+
+;;;; Functions
+
+(cl-defun ement-notifications-log-to-buffer (session notification &key (buffer-name "*Ement Notifications*"))
+  "Log EVENT in ROOM on SESSION to \"*Ement NOTIFICATIONS*\" buffer."
+  (with-demoted-errors "ement-notifications-log-to-buffer: %S"
+    (with-current-buffer (ement-notifications--log-buffer :name buffer-name)
+      (save-window-excursion
+        (when-let ((buffer-window (get-buffer-window (current-buffer))))
+          ;; Select the buffer's window to avoid EWOC bug.  (See #191.)
+          (select-window buffer-window))
+        ;; TODO: Use the :readp slot to mark unread events.
+        (save-mark-and-excursion
+          (pcase-let* (((cl-struct ement-notification room-id event) notification)
+                       (ement-session session)
+                       (ement-room (or (cl-find room-id (ement-session-rooms session)
+                                                :key #'ement-room-id :test #'equal)
+                                       (error "ement-notifications-log-to-buffer: Can't find room <%s>; discarding notification" room-id)))
+                       (ement-room-sender-in-left-margin nil)
+                       (ement-room-message-format-spec "%o%O »%W %S> %B%R%t")
+                       (new-node (ement-room--insert-event event))
+                       (inhibit-read-only t)
+                       (start) (end))
+            (ewoc-goto-node ement-ewoc new-node)
+            ;; Apply the button properties only to the room and sender names,
+            ;; allowing buttons in the rest of the message to remain separate.
+            (setf start (point)
+                  end (save-excursion
+                        (re-search-forward (rx "> "))))
+            (add-text-properties start end '( button (t)
+                                              category default-button
+                                              action ement-notify-button-action))
+            ;; Apply the session, room, and event properties to the whole event.
+            (setf end (save-excursion
+                        (if-let ((next-node (ewoc-next ement-ewoc new-node)))
+                            (ewoc-location next-node)
+                          (point-max))))
+            (add-text-properties start end
+                                 (list 'session session
+                                       'room ement-room
+                                       'event event))
+            ;; Remove button face property from the whole event.
+            (alter-text-property start end 'face
+                                 (lambda (face)
+                                   (pcase face
+                                     ('button nil)
+                                     ((pred listp) (remq 'button face))
+                                     (_ face))))
+            (when ement-notify-prism-background
+              (add-face-text-property start end (list :background (ement-notifications--room-background-color ement-room)
+                                                      :extend t)))))))))
+
+(defun ement-notifications--room-background-color (room)
+  "Return a background color on which to display ROOM's messages."
+  (or (alist-get 'notify-background-color (ement-room-local room))
+      (setf (alist-get 'notify-background-color (ement-room-local room))
+            (let ((color (color-desaturate-name
+                          (ement--prism-color (ement-room-id room) :contrast-with (face-foreground 'default))
+                          50)))
+              (if (ement--color-dark-p (color-name-to-rgb (face-background 'default)))
+                  (color-darken-name color 25)
+                (color-lighten-name color 25))))))
+
+(cl-defun ement-notifications--log-buffer (&key (name "*Ement Notifications*"))
+  "Return an Ement notifications buffer named NAME."
+  (or (get-buffer name)
+      (with-current-buffer (get-buffer-create name)
+        (ement-notifications-mode)
+        (current-buffer))))
+
+;;;; Mode
+
+(define-derived-mode ement-notifications-mode ement-room-mode "Ement Notifications"
+  (setf ement-room-sender-in-left-margin nil
+        left-margin-width 0
+        right-margin-width 8)
+  (setq-local ement-room-message-format-spec "[%o%O] %S> %B%R%t"
+              bookmark-make-record-function #'ement-notifications-bookmark-make-record))
+
+;;;; Bookmark support
+
+(require 'bookmark)
+
+(defun ement-notifications-bookmark-make-record ()
+  "Return a bookmark record for the current `ement-notifications' buffer."
+  (list (buffer-name)
+        ;; It seems silly to have to record the buffer name twice, but the
+        ;; `bookmark-make-record' function seems to override the bookmark name sometimes,
+        ;; which makes the result useless unless we save the buffer name separately.
+        (cons 'buffer-name (buffer-name))
+        (cons 'handler #'ement-notifications-bookmark-handler)))
+
+(defun ement-notifications-bookmark-handler (_bookmark)
+  "Show `ement-notifications' buffer for BOOKMARK."
+  ;; FIXME: Handle multiple sessions.
+  ;; FIXME: This doesn't work quite correctly when the buffer isn't already open, because
+  ;; the command is asynchronous in that case, so the buffer can be displayed in the wrong
+  ;; window.  Fixing this would be hacky and awkward, but a partial solution is probably
+  ;; possible.
+  (ement-notifications (ement-complete-session)))
+
+;;; Footer
+
+(provide 'ement-notifications)
+
+;;; ement-notifications.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-notifications.elc b/emacs/.emacs.d/elpa/ement-0.17/ement-notifications.elc
new file mode 100644
index 0000000..9cba3a9
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/ement-notifications.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-notify.el b/emacs/.emacs.d/elpa/ement-0.17/ement-notify.el
new file mode 100644
index 0000000..7c52371
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-notify.el
@@ -0,0 +1,342 @@
+;;; ement-notify.el --- Notifications for Ement events  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements notifications for Ement events.
+
+;;; Code:
+
+;;;; Requirements
+
+(require 'cl-lib)
+(require 'map)
+(require 'notifications)
+
+(require 'ement-lib)
+(require 'ement-room)
+
+(eval-when-compile
+  (require 'ement-structs))
+
+;;;; Variables
+
+(defvar ement-notify-dbus-p
+  (and (featurep 'dbusbind)
+       (require 'dbus nil :no-error)
+       (dbus-ignore-errors (dbus-get-unique-name :session))
+       ;; By default, emacs waits up to 25 seconds for a PONG.  Realistically, if there's
+       ;; no pong after 2000ms, there's pretty sure no notification service connected or
+       ;; the system's setup has issues.
+       (dbus-ping :session "org.freedesktop.Notifications" 2000))
+  "Whether D-Bus notifications are usable.")
+
+;;;; Customization
+
+(defgroup ement-notify nil
+  "Notification options."
+  :group 'ement)
+
+(defcustom ement-notify-ignore-predicates
+  '(ement-notify--event-not-message-p ement-notify--event-from-session-user-p)
+  "Display notification if none of these return non-nil for an event.
+Each predicate is called with three arguments: the event, the
+room, and the session (each the respective struct)."
+  :type '(repeat (choice (function-item ement-notify--event-not-message-p)
+                         (function-item ement-notify--event-from-session-user-p)
+                         (function :tag "Custom predicate"))))
+
+(defcustom ement-notify-log-predicates
+  '(ement-notify--event-mentions-session-user-p
+    ement-notify--event-mentions-room-p
+    ement-notify--room-buffer-live-p
+    ement-notify--room-unread-p)
+  "Predicates to determine whether to log an event to the notifications buffer.
+If one of these returns non-nil for an event, the event is logged."
+  :type 'hook
+  :options '(ement-notify--event-mentions-session-user-p
+             ement-notify--event-mentions-room-p
+             ement-notify--room-buffer-live-p
+             ement-notify--room-unread-p))
+
+(defcustom ement-notify-mark-frame-urgent-predicates
+  '(ement-notify--event-mentions-session-user-p
+    ement-notify--event-mentions-room-p)
+  "Predicates to determine whether to mark a frame as urgent.
+If one of these returns non-nil for an event, the frame that most
+recently showed the event's room's buffer is marked
+urgent.  (Only works on X, not other GUI platforms.)"
+  :type 'hook
+  :options '(ement-notify--event-mentions-session-user-p
+             ement-notify--event-mentions-room-p))
+
+(defcustom ement-notify-mention-predicates
+  '(ement-notify--event-mentions-session-user-p
+    ement-notify--event-mentions-room-p)
+  "Predicates to determine whether to log an event to the mentions buffer.
+If one of these returns non-nil for an event, the event is logged."
+  :type 'hook
+  :options '(ement-notify--event-mentions-session-user-p
+             ement-notify--event-mentions-room-p))
+
+(defcustom ement-notify-notification-predicates
+  '(ement-notify--event-mentions-session-user-p
+    ement-notify--event-mentions-room-p
+    ement-notify--room-buffer-live-p
+    ement-notify--room-unread-p)
+  "Predicates to determine whether to send a desktop notification.
+If one of these returns non-nil for an event, the notification is sent."
+  :type 'hook
+  :options '(ement-notify--event-mentions-session-user-p
+             ement-notify--event-mentions-room-p
+             ement-notify--room-buffer-live-p
+             ement-notify--room-unread-p))
+
+(defcustom ement-notify-sound nil
+  "Sound to play for notifications."
+  :type '(choice (file :tag "Sound file")
+                 (string :tag "XDG sound name")
+                 (const :tag "Default XDG message sound" "message-new-instant")
+                 (const :tag "Don't play a sound" nil)))
+
+(defcustom ement-notify-limit-room-name-width nil
+  "Limit the width of room display names in mentions and notifications buffers.
+This prevents the margin from being made excessively wide."
+  :type '(choice (integer :tag "Maximum width")
+                 (const :tag "Unlimited width" nil)))
+
+(defcustom ement-notify-prism-background nil
+  "Add distinct background color by room to messages in notification buffers.
+The color is specific to each room, generated automatically, and
+can help distinguish messages by room."
+  :type 'boolean)
+
+(defcustom ement-notify-room-avatars t
+  "Show room avatars in the notifications buffers.
+This shows room avatars at the left of the window margin in
+notification buffers.  It's not customizable beyond that due to
+limitations and complexities of displaying strings and images in
+margins in Emacs.  But it's useful, anyway."
+  :type 'boolean)
+
+;;;; Commands
+
+(declare-function ement-room-goto-event "ement-room")
+(defun ement-notify-button-action (button)
+  "Show BUTTON's event in its room buffer."
+  ;; TODO: Is `interactive' necessary here?
+  (interactive)
+  (let* ((session (button-get button 'session))
+         (room (button-get button 'room))
+         (event (button-get button 'event)))
+    (ement-view-room room session)
+    (ement-room-goto-event event)))
+
+(defun ement-notify-reply ()
+  "Send a reply to event at point."
+  (interactive)
+  (save-window-excursion
+    ;; Not sure why `call-interactively' doesn't work for `push-button' but oh well.
+    (push-button)
+    (call-interactively #'ement-room-write-reply)))
+
+(defun ement-notify-switch-to-notifications-buffer ()
+  "Switch to \"*Ement Notifications*\" buffer."
+  (declare (function ement-notifications "ement-notifications"))
+  (interactive)
+  (call-interactively #'ement-notifications))
+
+(defvar ement-notifications-mode-map)
+(defun ement-notify-switch-to-mentions-buffer ()
+  "Switch to \"*Ement Mentions*\" buffer."
+  (declare (function ement-notifications--log-buffer "ement-notifications"))
+  (interactive)
+  (switch-to-buffer (ement-notifications--log-buffer :name "*Ement Mentions*"))
+  ;; HACK: Undo remapping of scroll commands which don't apply in this buffer.
+  (let ((map (copy-keymap ement-notifications-mode-map)))
+    (define-key map [remap scroll-down-command] nil)
+    (define-key map [remap mwheel-scroll] nil)
+    (use-local-map map)))
+
+;;;; Functions
+
+(defun ement-notify (event room session)
+  "Send notifications for EVENT in ROOM on SESSION.
+Sends if all of `ement-notify-ignore-predicates' return nil.
+Does not do anything if session hasn't finished initial sync."
+  (with-demoted-errors "ement-notify: Error: %S"
+    (when (and (ement-session-has-synced-p session)
+               (cl-loop for pred in ement-notify-ignore-predicates
+                        never (funcall pred event room session)))
+      (when (and ement-notify-dbus-p
+                 (run-hook-with-args-until-success 'ement-notify-notification-predicates event room session))
+        (ement-notify--notifications-notify event room session))
+      (when (run-hook-with-args-until-success 'ement-notify-log-predicates event room session)
+        (ement-notify--log-to-buffer event room session))
+      (when (run-hook-with-args-until-success 'ement-notify-mention-predicates event room session)
+        (ement-notify--log-to-buffer event room session :buffer-name "*Ement Mentions*"))
+      (when (run-hook-with-args-until-success 'ement-notify-mark-frame-urgent-predicates event room session)
+        (ement-notify--mark-frame-urgent event room session)))))
+
+(defun ement-notify--mark-frame-urgent (_event room _session)
+  "Mark frame showing ROOM's buffer as urgent.
+If ROOM has no existing buffer, do nothing."
+  (declare
+   ;; These silence lint warnings on our GitHub CI runs, which use a build of Emacs
+   ;; without GUI support.
+   (function dbus-get-unique-name "dbusbind.c")
+   (function x-change-window-property "xfns.c")
+   (function x-window-property "xfns.c"))
+  (cl-labels ((mark-frame-urgent (frame)
+                (let* ((prop "WM_HINTS")
+                       (hints (cl-coerce
+                               (x-window-property prop frame prop nil nil t)
+                               'list)))
+                  (setf (car hints) (logior (car hints) 256))
+                  (x-change-window-property prop hints nil prop 32 t))))
+    (when-let* ((buffer (alist-get 'buffer (ement-room-local room)))
+                (frames (cl-loop for frame in (frame-list)
+                                 when (eq 'x (framep frame))
+                                 collect frame))
+                (frame (pcase (length frames)
+                         (1 (car frames))
+                         (_
+                          ;; Use the frame that most recently showed ROOM's buffer.
+                          (car (sort frames
+                                     (lambda (frame-a frame-b)
+                                       (let ((a-pos (cl-position buffer (buffer-list frame-a)))
+                                             (b-pos (cl-position buffer (buffer-list frame-b))))
+                                         (cond ((and a-pos b-pos)
+                                                (< a-pos b-pos))
+                                               (a-pos)
+                                               (b-pos))))))))))
+      (mark-frame-urgent frame))))
+
+(defun ement-notify--notifications-notify (event room _session)
+  "Call `notifications-notify' for EVENT in ROOM on SESSION."
+  (pcase-let* (((cl-struct ement-event sender content) event)
+               ((cl-struct ement-room avatar (display-name room-displayname)) room)
+               ((map body) content)
+               (room-name (or room-displayname (ement--room-display-name room)))
+               (sender-name (ement--user-displayname-in room sender))
+               (title (format "%s in %s" sender-name room-name)))
+    ;; TODO: Encode HTML entities.
+    (when (stringp body)
+      ;; If event has no body, it was probably redacted or something, so don't notify.
+      (truncate-string-to-width body 60)
+      (notifications-notify :title title :body body
+                            :app-name "Ement.el"
+                            :app-icon (when avatar
+                                        (ement-notify--temp-file
+                                         (plist-get (cdr (get-text-property 0 'display avatar)) :data)))
+                            :category "im.received"
+                            :timeout 5000
+                            ;; FIXME: Using :sound-file seems to do nothing, ever.  Maybe a bug in notifications-notify?
+                            :sound-file (when (and ement-notify-sound
+                                                   (file-name-absolute-p ement-notify-sound))
+                                          ement-notify-sound)
+                            :sound-name (when (and ement-notify-sound
+                                                   (not (file-name-absolute-p ement-notify-sound)))
+                                          ement-notify-sound)
+                            ;; TODO: Show when action used.
+                            ;; :actions '("default" "Show")
+                            ;; :on-action #'ement-notify-show
+                            ))))
+
+(cl-defun ement-notify--temp-file (content &key (timeout 5))
+  "Return a filename holding CONTENT, and delete it after TIMEOUT seconds."
+  (let ((filename (make-temp-file "ement-notify--temp-file-"))
+        (coding-system-for-write 'no-conversion))
+    (with-temp-file filename
+      (insert content))
+    (run-at-time timeout nil (lambda ()
+                               (delete-file filename)))
+    filename))
+
+(cl-defun ement-notify--log-to-buffer (event room session &key (buffer-name "*Ement Notifications*"))
+  "Log EVENT in ROOM on SESSION to \"*Ement Notifications*\" buffer."
+  (declare (function ement-notifications-log-to-buffer "ement-notifications")
+           (function make-ement-notification "ement-notifications"))
+  (pcase-let* (((cl-struct ement-room (id room-id)) room)
+               (notification (make-ement-notification :room-id room-id :event event)))
+    (ement-notifications-log-to-buffer session notification :buffer-name buffer-name)))
+
+;;;;; Predicates
+
+(defun ement-notify--event-mentions-session-user-p (event room session)
+  "Return non-nil if EVENT in ROOM mentions SESSION's user.
+If EVENT's sender is SESSION's user, returns nil."
+  (pcase-let* (((cl-struct ement-session user) session)
+               ((cl-struct ement-event sender) event))
+    (unless (equal (ement-user-id user) (ement-user-id sender))
+      (ement-room--event-mentions-user-p event user room))))
+
+(defun ement-notify--room-buffer-live-p (_event room _session)
+  "Return non-nil if ROOM has a live buffer."
+  (buffer-live-p (alist-get 'buffer (ement-room-local room))))
+
+(defun ement-notify--room-unread-p (_event room _session)
+  "Return non-nil if ROOM has unread notifications.
+According to the room's notification configuration on the server."
+  (pcase-let* (((cl-struct ement-room unread-notifications) room)
+               ((map notification_count highlight_count) unread-notifications))
+    (not (and (equal 0 notification_count)
+              (equal 0 highlight_count)))))
+
+(defun ement-notify--event-message-p (event _room _session)
+  "Return non-nil if EVENT is an \"m.room.message\" event."
+  (equal "m.room.message" (ement-event-type event)))
+
+(defun ement-notify--event-not-message-p (event _room _session)
+  "Return non-nil if EVENT is not an \"m.room.message\" event."
+  (not (equal "m.room.message" (ement-event-type event))))
+
+(defun ement-notify--event-from-session-user-p (event _room session)
+  "Return non-nil if EVENT is sent by SESSION's user."
+  (equal (ement-user-id (ement-session-user session))
+         (ement-user-id (ement-event-sender event))))
+
+(defalias 'ement-notify--event-mentions-room-p #'ement--event-mentions-room-p)
+
+;;;; Bookmark support
+
+;; Especially useful with Burly: <https://github.com/alphapapa/burly.el>
+
+(require 'bookmark)
+
+(defun ement-notify-bookmark-make-record ()
+  "Return a bookmark record for the current `ement-notify' buffer."
+  (list (buffer-name)
+        ;; It seems silly to have to record the buffer name twice, but the
+        ;; `bookmark-make-record' function seems to override the bookmark name sometimes,
+        ;; which makes the result useless unless we save the buffer name separately.
+        (cons 'buffer-name (buffer-name))
+        (cons 'handler #'ement-notify-bookmark-handler)))
+
+(defun ement-notify-bookmark-handler (bookmark)
+  "Show Ement notifications buffer for BOOKMARK."
+  (pcase-let ((`(,_bookmark-name . ,(map buffer-name)) bookmark))
+    (switch-to-buffer (ement-notifications--log-buffer :name buffer-name))))
+
+;;;; Footer
+
+(provide 'ement-notify)
+
+;;; ement-notify.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-notify.elc b/emacs/.emacs.d/elpa/ement-0.17/ement-notify.elc
new file mode 100644
index 0000000..c9a84b9
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/ement-notify.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-pkg.el b/emacs/.emacs.d/elpa/ement-0.17/ement-pkg.el
new file mode 100644
index 0000000..15da397
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-pkg.el
@@ -0,0 +1,2 @@
+;; Generated package description from ement.el  -*- no-byte-compile: t -*-
+(define-package "ement" "0.17" "Matrix client" '((emacs "27.1") (map "2.1") (persist "0.5") (plz "0.6") (taxy "0.10") (taxy-magit-section "0.13") (svg-lib "0.2.5") (transient "0.3.7")) :commit "ca3b0e7da1626e692df14c56e105dc91480ef814" :authors '(("Adam Porter" . "adam@alphapapa.net")) :maintainer '("Adam Porter" . "adam@alphapapa.net") :keywords '("comm") :url "https://github.com/alphapapa/ement.el")
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-room-list.el b/emacs/.emacs.d/elpa/ement-0.17/ement-room-list.el
new file mode 100644
index 0000000..97674b4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-room-list.el
@@ -0,0 +1,917 @@
+;;; ement-room-list.el --- List Ement rooms  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements a room list view using `taxy' and `taxy-magit-section' for
+;; dynamic, programmable grouping.
+
+;;; Code:
+
+(require 'button)
+(require 'rx)
+
+(require 'persist)
+(require 'svg-lib)
+(require 'taxy)
+(require 'taxy-magit-section)
+
+(require 'ement-lib)
+
+;;;; Mouse commands
+
+;; Since mouse-activated commands must handle mouse events, we define a simple macro to
+;; wrap a command into a mouse-event-accepting one.
+
+(defmacro ement-room-list-define-mouse-command (command)
+  "Define a command that calls COMMAND interactively with point at mouse event.
+COMMAND should be a form that evaluates to a function symbol; if
+a symbol, it should be unquoted.."
+  (let ((docstring (format "Call command `%s' interactively with point at EVENT." command))
+        (name (intern (format "ement-room-list-mouse-%s" command))))
+    `(defun ,name (event)
+       ,docstring
+       (interactive "e")
+       (mouse-set-point event)
+       (call-interactively #',command))))
+
+;;;; Types
+
+(defclass ement-room-list-section (magit-section)
+  ;; We define this class so we can use it as the type of section we insert, so we can
+  ;; define a method to return identifiers for our section type, so section visibility can
+  ;; be cached concisely (i.e. without storing room event data in the values, which can
+  ;; serialize to hundreds of megabytes after receiving many events).
+  nil)
+
+(cl-defmethod magit-section-ident-value ((section ement-room-list-section))
+  "Return ident value for `ement-room-list-section' SECTION.
+Used for caching section visibility."
+  ;; FIXME: The name of each taxy could be ambiguous.  Best would be to use the
+  ;; hierarchical path, but since the taxys aren't doubly linked, that isn't easily done.
+  ;; Could probably be worked around by binding a special variable around the creation of
+  ;; the taxy hierarchy that would allow the path to be saved into each taxy.
+  (pcase-exhaustive (oref section value)
+    ;; FIXME(emacs-28): Use `(cl-type taxy-magit-section)' and `(cl-type ement-room)', et
+    ;; al. when requiring Emacs 28.  See
+    ;; <https://github.com/alphapapa/ement.el/issues/272>.
+    ((and (pred taxy-magit-section-p) it)
+     (taxy-name it))
+    (`[,(and (pred ement-room-p) room)
+       ,(and (pred ement-session-p) session)]
+     (vector (ement-user-id (ement-session-user session))
+             (ement-room-id room)))
+    ((pred null) nil)))
+
+;;;; Variables
+
+(declare-function ement-room-toggle-space "ement-room")
+
+(defvar ement-room-list-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "RET") #'ement-room-list-RET)
+    (define-key map (kbd "SPC") #'ement-room-list-next-unread)
+    (define-key map [tab] #'ement-room-list-section-toggle)
+    (define-key map [mouse-1] (ement-room-list-define-mouse-command ement-room-list-RET))
+    (define-key map [mouse-2] (ement-room-list-define-mouse-command ement-room-list-kill-buffer))
+    (define-key map (kbd "k") #'ement-room-list-kill-buffer)
+    (define-key map (kbd "s") #'ement-room-toggle-space)
+    map)
+  "Keymap for `ement-room-list' buffers.
+See also `ement-room-list-button-map'.")
+
+(defvar ement-room-list-button-map
+  ;; This map is needed because some columns are propertized as buttons, which override
+  ;; the main keymap.
+  ;; TODO: Is it possible to adjust the button properties to obviate this map?
+  (let ((map (make-sparse-keymap)))
+    (define-key map [mouse-1] (ement-room-list-define-mouse-command ement-room-list-RET))
+    (define-key map [mouse-2] (ement-room-list-define-mouse-command ement-room-list-kill-buffer))
+    map)
+  "Keymap for buttonized text in `ement-room-list' buffers.")
+
+(defvar ement-room-list-timestamp-colors nil
+  "List of colors used for timestamps.
+Set automatically when `ement-room-list-mode' is activated.")
+
+(defvar ement-room)
+(defvar ement-session)
+(defvar ement-sessions)
+(defvar ement-room-prism-minimum-contrast)
+
+;;;;; Persistent variables
+
+(persist-defvar ement-room-list-visibility-cache nil
+  "Applied to `magit-section-visibility-cache', which see.")
+
+;;;; Customization
+
+(defgroup ement-room-list-faces nil
+  "Faces for room list buffers."
+  :group 'ement-room-list
+  :group 'ement-faces)
+
+(defgroup ement-room-list nil
+  "Options for room list buffers."
+  :group 'ement)
+
+(defcustom ement-room-list-auto-update t
+  "Automatically update the taxy-based room list buffer."
+  :type 'boolean)
+
+(defcustom ement-room-list-avatars (display-images-p)
+  "Show room avatars in the room list."
+  :type 'boolean)
+
+(defcustom ement-room-list-avatar-generation (image-type-available-p 'svg)
+  "Generate SVG-based avatars for rooms that have none."
+  :type 'boolean)
+
+(defcustom ement-room-list-space-prefix "Space: "
+  "Prefix applied to space names."
+  :type 'string)
+
+;;;;; Faces
+
+;; TODO: Inherit from a single face to allow certain attributes to be disabled
+;; (e.g. underline), in case a face inherited from has such attributes.
+
+(defface ement-room-list-direct
+  ;; We want to use `font-lock-constant-face' as the base face (because it seems to look
+  ;; nice with most themes), but that face sometimes is defined as bold, which interferes
+  ;; with our ability to use boldness to indicate unread rooms.  But if we override the
+  ;; weight to be normal, even the "People" heading in the room list will not be bold,
+  ;; which group headings should be.  So we make a copy of the face, unset its weight, and
+  ;; inherit from that.
+  (progn
+    (copy-face 'font-lock-constant-face 'ement--font-lock-constant-face)
+    (set-face-attribute 'ement--font-lock-constant-face nil :weight 'unspecified)
+    '((t (:inherit (ement--font-lock-constant-face ement-room-list-name) :underline nil))))
+  "Direct rooms."
+  :group 'ement-room-list-faces)
+
+(defface ement-room-list-favourite '((t (:inherit (font-lock-doc-face ement-room-list-name))))
+  "Favourite rooms."
+  :group 'ement-room-list-faces)
+
+(defface ement-room-list-invited
+  '((t (:inherit (italic ement-room-list-name))))
+  "Invited rooms."
+  :group 'ement-room-list-faces)
+
+(defface ement-room-list-left
+  '((t (:strike-through t :inherit ement-room-list-name)))
+  "Left rooms."
+  :group 'ement-room-list-faces)
+
+(defface ement-room-list-low-priority '((t (:inherit (font-lock-comment-face ement-room-list-name))))
+  "Low-priority rooms."
+  :group 'ement-room-list-faces)
+
+(defface ement-room-list-name
+  '((t (:inherit (font-lock-function-name-face button) :underline nil)))
+  "Non-direct rooms."
+  :group 'ement-room-list-faces)
+
+(defface ement-room-list-space '((t (:inherit (font-lock-regexp-grouping-backslash ement-room-list-name))))
+  "Space rooms."
+  :group 'ement-room-list-faces)
+
+(defface ement-room-list-unread
+  '((t (:inherit (bold ement-room-list-name))))
+  "Unread rooms."
+  :group 'ement-room-list-faces)
+
+(defface ement-room-list-recent '((t (:inherit font-lock-warning-face)))
+  "Latest timestamp of recently updated rooms.
+The foreground color is used to generate a gradient of colors
+from recent to non-recent for rooms updated in the past 24
+hours but at least one hour ago."
+  :group 'ement-room-list-faces)
+
+(defface ement-room-list-very-recent '((t (:inherit error)))
+  "Latest timestamp of very recently updated rooms.
+The foreground color is used to generate a gradient of colors
+from recent to non-recent for rooms updated in the past hour."
+  :group 'ement-room-list-faces)
+
+;;;; Keys
+
+;; Since some of these keys need access to the session, and room
+;; structs don't include the session, we use a two-element vector in
+;; which the session is the second element.
+
+(eval-and-compile
+  (taxy-define-key-definer ement-room-list-define-key
+    ement-room-list-keys "ement-room-list-key" "FIXME: Docstring."))
+
+(ement-room-list-define-key membership (&key name status)
+  ;; FIXME: Docstring: status should be a symbol of either `invite', `join', `leave'.
+  (cl-labels ((format-membership (membership)
+                (pcase membership
+                  ('join "Joined")
+                  ('invite "Invited")
+                  ('leave "[Left]"))))
+    (pcase-let ((`[,(cl-struct ement-room (status membership)) ,_session] item))
+      (if status
+          (when (equal status membership)
+            (or name (format-membership membership)))
+        (format-membership membership)))))
+
+(ement-room-list-define-key alias (&key name regexp)
+  (pcase-let ((`[,(cl-struct ement-room canonical-alias) ,_session] item))
+    (when canonical-alias
+      (when (string-match-p regexp canonical-alias)
+        name))))
+
+(ement-room-list-define-key buffer ()
+  (pcase-let ((`[,(cl-struct ement-room (local (map buffer))) ,_session] item))
+    (when buffer
+      #("Buffers" 0 7 (help-echo "Rooms with open buffers")))))
+
+(ement-room-list-define-key direct ()
+  (pcase-let ((`[,room ,session] item))
+    (when (ement--room-direct-p room session)
+      "Direct")))
+
+(ement-room-list-define-key people ()
+  (pcase-let ((`[,room ,session] item))
+    (when (ement--room-direct-p room session)
+      (ement-propertize "People" 'face 'ement-room-list-direct))))
+
+(ement-room-list-define-key space (&key name id)
+  (pcase-let* ((`[,room ,session] item)
+               ((cl-struct ement-session rooms) session)
+               ((cl-struct ement-room type (local (map parents))) room))
+    (cl-labels ((format-space (id)
+                  (let* ((parent-room (cl-find id rooms :key #'ement-room-id :test #'equal))
+                         (space-name (if parent-room
+                                         (ement-room-display-name parent-room)
+                                       id)))
+                    (concat ement-room-list-space-prefix space-name))))
+      (when-let ((key (if id
+                          ;; ID specified.
+                          (cond ((or (member id parents)
+                                     (equal id (ement-room-id room)))
+                                 ;; Room is in specified space.
+                                 (or name (format-space id)))
+                                ((and (equal type "m.space")
+                                      (equal id (ement-room-id room)))
+                                 ;; Room is a specified space.
+                                 (or name (concat ement-room-list-space-prefix (ement-room-display-name room)))))
+                        ;; ID not specified.
+                        (pcase (length parents)
+                          (0 nil)
+                          (1
+                           ;; TODO: Make the rooms list a hash table to avoid this lookup.
+                           (format-space (car parents)))
+                          (_
+                           ;; TODO: How to handle this better?  (though it should be very rare)
+                           (string-join (mapcar #'format-space parents) ", "))))))
+        (ement-propertize key 'face 'ement-room-list-space)))))
+
+(ement-room-list-define-key space-p ()
+  "Groups rooms that are themselves spaces."
+  (pcase-let* ((`[,room ,_session] item)
+               ((cl-struct ement-room type) room))
+    (when (equal "m.space" type)
+      "Spaces")))
+
+(ement-room-list-define-key name (&key name regexp)
+  (pcase-let* ((`[,room ,_session] item)
+               (display-name (ement--room-display-name room)))
+    (when display-name
+      (when (string-match-p regexp display-name)
+        (or name regexp)))))
+
+(ement-room-list-define-key latest (&key name newer-than older-than)
+  (pcase-let* ((`[,room ,_session] item)
+               ((cl-struct ement-room latest-ts) room)
+               (age))
+    (when latest-ts
+      (setf age (- (time-convert nil 'integer) (/ latest-ts 1000)))
+      (cond (newer-than
+             (when (<= age newer-than)
+               (or name (format "Newer than %s seconds" newer-than))))
+            (older-than
+             (when (>= age older-than)
+               (or name (format "Older than %s seconds" newer-than))))
+            (t
+             ;; Default to rooms with traffic in the last day.
+             (if (<= age 86400)
+                 "Last 24 hours"
+               "Older than 24 hours"))))))
+
+(ement-room-list-define-key freshness
+  (&key (intervals '((86400 . "Past 24h")
+                     (604800 . "Past week")
+                     (2419200 . "Past month")
+                     (31536000 . "Past year"))))
+  (pcase-let* ((`[,room ,_session] item)
+               ((cl-struct ement-room latest-ts) room)
+               (age))
+    (when latest-ts
+      (setf age (- (time-convert nil 'integer) (/ latest-ts 1000)))
+      (or (alist-get age intervals nil nil #'>)
+          "Older than a year"))))
+
+(ement-room-list-define-key session (&optional user-id)
+  (pcase-let ((`[,_room ,(cl-struct ement-session
+                                    (user (cl-struct ement-user id)))]
+               item))
+    (pcase user-id
+      (`nil id)
+      (_ (when (equal user-id id)
+           user-id)))))
+
+(ement-room-list-define-key topic (&key name regexp)
+  (pcase-let ((`[,(cl-struct ement-room topic) ,_session] item))
+    (when (and topic (string-match-p regexp topic))
+      name)))
+
+(ement-room-list-define-key unread ()
+  (pcase-let ((`[,room ,session] item))
+    (when (ement--room-unread-p room session)
+      "Unread")))
+
+(ement-room-list-define-key favourite ()
+  :then #'identity
+  (pcase-let ((`[,room ,_session] item))
+    (when (ement--room-favourite-p room)
+      (ement-propertize "Favourite" 'face 'ement-room-list-favourite))))
+
+(ement-room-list-define-key low-priority ()
+  :then #'identity
+  (pcase-let ((`[,room ,_session] item))
+    (when (ement--room-low-priority-p room)
+      "Low-priority")))
+
+(defcustom ement-room-list-default-keys
+  '(;; First, group all invitations (this group will appear first since the rooms are
+    ;; already sorted first).
+    ((membership :status 'invite))
+    ;; Group all left rooms (this group will appear last, because the rooms are already
+    ;; sorted last).
+    ((membership :status 'leave))
+    ;; Group all favorite rooms, which are already sorted first.
+    (favourite)
+    ;; Group other rooms which are opened in a buffer.
+    (buffer)
+    ;; Group other rooms which are unread.
+    (unread)
+    ;; Group all low-priority rooms, which are already sorted last, and within that group,
+    ;; group them by their space, if any.
+    (low-priority space)
+    ;; Group other non-direct rooms which are in a space by freshness, then by space.
+    ((and :name "Spaced"
+          :keys ((not space-p)
+                 (not people)
+                 space))
+     freshness space)
+    ;; Group spaces themselves by their parent space (since space headers can't also be
+    ;; items, we have to handle them separately; a bit of a hack, but not too bad).
+    ((and :name "Spaces" :keys (space-p))
+     space)
+    ;; Group rooms which aren't in spaces by their freshness.
+    ((and :name "Unspaced"
+          :keys ((not space)
+                 (not people)))
+     freshness)
+    ;; Group direct rooms by freshness and space.
+    (people freshness space))
+  "Default keys."
+  :type 'sexp)
+
+;;;; Columns
+
+(eval-and-compile
+  (taxy-magit-section-define-column-definer "ement-room-list"))
+
+(ement-room-list-define-column #("🐱" 0 1 (help-echo "Avatar")) (:align 'right)
+  (pcase-let* ((`[,room ,_session] item)
+               ((cl-struct ement-room avatar display-name
+                           (local (map room-list-avatar)))
+                room))
+    (if ement-room-list-avatars
+        (or room-list-avatar
+            (let ((new-avatar
+                   (if avatar
+                       ;; NOTE: We resize every avatar to be suitable for this buffer, rather than using
+                       ;; the one cached in the room's struct.  If the buffer's faces change height, this
+                       ;; will need refreshing, but it should be worth it to avoid resizing the images on
+                       ;; every update.
+                       (propertize " " 'display
+                                   (ement--resize-image (get-text-property 0 'display avatar)
+                                                        nil (frame-char-height)))
+                     ;; Room has no avatar.
+                     (if ement-room-list-avatar-generation
+                         (let* ((string (or display-name (ement--room-display-name room)))
+                                (ement-room-prism-minimum-contrast 1)
+                                (color (ement--prism-color string :contrast-with "white")))
+                           (when (string-match (rx bos (or "#" "!" "@")) string)
+                             (setf string (substring string 1)))
+                           (propertize " " 'display (svg-lib-tag (substring string 0 1) nil
+                                                                 :background color :foreground "white"
+                                                                 :stroke 0)))
+                       ;; Avatar generation disabled: use a two-space string.
+                       " "))))
+              (setf (alist-get 'room-list-avatar (ement-room-local room)) new-avatar)))
+      ;; Avatars disabled: use a two-space string.
+      " ")))
+
+(ement-room-list-define-column "Name" (:max-width 25)
+  (pcase-let* ((`[,room ,session] item)
+               ((cl-struct ement-room type) room)
+               (display-name (ement--room-display-name room))
+               (face))
+    (or (when display-name
+          ;; TODO: Use code from ement-room-list and put in a dedicated function.
+          (setf face (cl-copy-list '(:inherit (ement-room-list-name))))
+          ;; In concert with the "Unread" column, this is roughly equivalent to the
+          ;; "red/gray/bold/idle" states listed in <https://github.com/matrix-org/matrix-react-sdk/blob/b0af163002e8252d99b6d7075c83aadd91866735/docs/room-list-store.md#list-ordering-algorithm-importance>.
+          (when (ement--room-unread-p room session)
+            ;; For some reason, `push' doesn't work with `map-elt'...or does it?
+            (push 'ement-room-list-unread (map-elt face :inherit)))
+          (when (equal "m.space" type)
+            (push 'ement-room-list-space (map-elt face :inherit)))
+          (when (ement--room-direct-p room session)
+            (push 'ement-room-list-direct (map-elt face :inherit)))
+          (when (ement--room-favourite-p room)
+            (push 'ement-room-list-favourite (map-elt face :inherit)))
+          (when (ement--room-low-priority-p room)
+            (push 'ement-room-list-low-priority (map-elt face :inherit)))
+          (pcase (ement-room-status room)
+            ('invite
+             (push 'ement-room-list-invited (map-elt face :inherit)))
+            ('leave
+             (push 'ement-room-list-left (map-elt face :inherit))))
+          (ement-propertize display-name
+            'face face
+            'mouse-face 'highlight
+            'keymap ement-room-list-button-map))
+        "")))
+
+(ement-room-list-define-column #("Unread" 0 6 (help-echo "Unread events (Notifications:Highlights)")) (:align 'right)
+  (pcase-let* ((`[,(cl-struct ement-room unread-notifications) ,_session] item)
+               ((map notification_count highlight_count) unread-notifications))
+    (if (or (not unread-notifications)
+            (and (equal 0 notification_count)
+                 (equal 0 highlight_count)))
+        ""
+      (concat (ement-propertize (number-to-string notification_count)
+                'face (if (zerop highlight_count)
+                          'default
+                        'ement-room-mention))
+              ":"
+              (ement-propertize (number-to-string highlight_count)
+                'face 'highlight)))))
+
+(ement-room-list-define-column "Latest" ()
+  (pcase-let ((`[,(cl-struct ement-room latest-ts) ,_session] item))
+    (if latest-ts
+        (let* ((difference-seconds (- (float-time) (/ latest-ts 1000)))
+               (n (cl-typecase difference-seconds
+                    ((number 0 3599) ;; <1 hour: 10-minute periods.
+                     (truncate (/ difference-seconds 600)))
+                    ((number 3600 86400) ;; 1 hour to 1 day: 24 1-hour periods.
+                     (+ 6 (truncate (/ difference-seconds 3600))))
+                    (otherwise ;; Difference in weeks.
+                     (min (/ (length ement-room-list-timestamp-colors) 2)
+                          (+ 24 (truncate (/ difference-seconds 86400 7)))))))
+               (face (list :foreground (elt ement-room-list-timestamp-colors n)))
+               (formatted-ts (ement--human-format-duration difference-seconds 'abbreviate)))
+          (string-match (rx (1+ digit) (repeat 1 alpha)) formatted-ts)
+          (ement-propertize (match-string 0 formatted-ts)
+            'face face
+            'help-echo formatted-ts))
+      "")))
+
+(ement-room-list-define-column "Topic" (:max-width 35)
+  (pcase-let ((`[,(cl-struct ement-room topic status) ,_session] item))
+    ;; FIXME: Can the status and type unified, or is this inherent to the spec?
+    (when topic
+      (setf topic (replace-regexp-in-string "\n" " " topic 'fixedcase 'literal)))
+    (pcase status
+      ('invite (concat (ement-propertize "[invited]"
+                         'face 'ement-room-list-invited)
+                       " " topic))
+      ('leave (concat (ement-propertize "[left]"
+                        'face 'ement-room-list-left)
+                      " " topic))
+      (_ (or topic "")))))
+
+(ement-room-list-define-column "Members" (:align 'right)
+  (pcase-let ((`[,(cl-struct ement-room
+                             (summary (map ('m.joined_member_count member-count))))
+                 ,_session]
+               item))
+    (if member-count
+        (number-to-string member-count)
+      "")))
+
+(ement-room-list-define-column #("Notifications" 0 5 (help-echo "Notification state")) ()
+  (pcase-let* ((`[,room ,session] item))
+    (pcase (ement-room-notification-state room session)
+      ('nil "default")
+      ('all-loud "all (loud)")
+      ('all "all")
+      ('mentions-and-keywords "mentions")
+      ('none "none"))))
+
+(ement-room-list-define-column #("B" 0 1 (help-echo "Buffer exists for room")) ()
+  (pcase-let ((`[,(cl-struct ement-room (local (map buffer))) ,_session] item))
+    (if buffer
+        #("B" 0 1 (help-echo "Buffer exists for room"))
+      " ")))
+
+(ement-room-list-define-column "Session" ()
+  (pcase-let ((`[,_room ,(cl-struct ement-session (user (cl-struct ement-user id)))] item))
+    id))
+
+(unless ement-room-list-columns
+  ;; TODO: Automate this or document it
+  (setq-default ement-room-list-columns
+                (get 'ement-room-list-columns 'standard-value)))
+
+;;;; Bookmark support
+
+;; Especially useful with Burly: <https://github.com/alphapapa/burly.el>
+
+(require 'bookmark)
+
+(defun ement-room-list-bookmark-make-record ()
+  "Return a bookmark record for the `ement-room-list' buffer."
+  (list "*Ement Room List*"
+        (cons 'handler #'ement-room-list-bookmark-handler)))
+
+(defun ement-room-list-bookmark-handler (bookmark)
+  "Show `ement-room-list' room list buffer for BOOKMARK."
+  (pcase-let* ((`(,_bookmark-name . ,_) bookmark))
+    (unless ement-sessions
+      ;; MAYBE: Automatically connect.
+      (user-error "No sessions connected: call `ement-connect' first"))
+    (ement-room-list)))
+
+;;;; Commands
+
+(defun ement-room-list-section-toggle ()
+  "Toggle the section at point."
+  ;; HACK: For some reason, when a section's body is hidden, then the buffer is refreshed,
+  ;; and then the section's body is shown again, the body is empty--but then, refreshing
+  ;; the buffer shows its body.  So we work around that by refreshing the buffer when a
+  ;; section is toggled.  In a way, it makes sense to do this anyway, so the user has the
+  ;; most up-to-date information in the buffer.  This hack also works around a minor
+  ;; visual bug that sometimes causes room avatars to be displayed in a section heading
+  ;; when a section is hidden.
+  (interactive)
+  (ignore-errors
+    ;; Ignore an error in case point is past the top-level section.
+    (cl-typecase (aref (oref (magit-current-section) value) 0)
+      (ement-room
+       ;; HACK: Don't hide rooms themselves (they end up permanently hidden).
+       nil)
+      (otherwise
+       (call-interactively #'magit-section-toggle)
+       (revert-buffer)))))
+
+;;;###autoload
+(defun ement-room-list--after-initial-sync (&rest _ignore)
+  "Call `ement-room-list', ignoring arguments.
+To be called from `ement-after-initial-sync-hook'."
+  (ement-room-list))
+
+;;;###autoload
+(defalias 'ement-list-rooms 'ement-room-list)
+
+;;;###autoload
+(cl-defun ement-room-list (&key (buffer-name "*Ement Room List*")
+                                (keys ement-room-list-default-keys)
+                                (display-buffer-action '((display-buffer-reuse-window display-buffer-same-window)))
+                                ;; visibility-fn
+                                )
+  "Show a buffer listing Ement rooms, grouped with Taxy KEYS.
+After showing it, its window is selected.  The buffer is named
+BUFFER-NAME and is shown with DISPLAY-BUFFER-ACTION; or if
+DISPLAY-BUFFER-ACTION is nil, the buffer is not displayed."
+  (interactive)
+  (let ((window-start 0) (window-point 0)
+        format-table column-sizes)
+    (cl-labels (;; (heading-face
+                ;;  (depth) (list :inherit (list 'bufler-group (bufler-level-face depth))))
+                (format-item (item) (gethash item format-table))
+                ;; NOTE: Since these functions take an "item" (which is a [room session]
+                ;; vector), they're prefixed "item-" rather than "room-".
+                (item-latest-ts (item)
+                  (or (ement-room-latest-ts (elt item 0))
+                      ;; Room has no latest timestamp.  FIXME: This shouldn't
+                      ;; happen, but it can, maybe due to oversights elsewhere.
+                      0))
+                (item-unread-p (item)
+                  (pcase-let ((`[,room ,session] item))
+                    (ement--room-unread-p room session)))
+                (item-left-p (item)
+                  (pcase-let ((`[,(cl-struct ement-room status) ,_session] item))
+                    (equal 'leave status)))
+                (item-buffer-p (item)
+                  (pcase-let ((`[,(cl-struct ement-room (local (map buffer))) ,_session] item))
+                    (buffer-live-p buffer)))
+                (taxy-unread-p (taxy)
+                  (or (cl-some #'item-unread-p (taxy-items taxy))
+                      (cl-some #'taxy-unread-p (taxy-taxys taxy))))
+                (item-space-p (item)
+                  (pcase-let ((`[,(cl-struct ement-room type) ,_session] item))
+                    (equal "m.space" type)))
+                (item-favourite-p (item)
+                  (pcase-let ((`[,room ,_session] item))
+                    (ement--room-favourite-p room)))
+                (item-low-priority-p (item)
+                  (pcase-let ((`[,room ,_session] item))
+                    (ement--room-low-priority-p room)))
+                (visible-p (section)
+                  ;; This is very confusing and doesn't currently work.
+                  (let ((value (oref section value)))
+                    (if (cl-typecase value
+                          (taxy-magit-section (item-unread-p value))
+                          (ement-room nil))
+                        'show
+                      'hide)))
+                (item-invited-p (item)
+                  (pcase-let ((`[,(cl-struct ement-room status) ,_session] item))
+                    (equal 'invite status)))
+                (taxy-latest-ts (taxy)
+                  (apply #'max most-negative-fixnum
+                         (delq nil
+                               (list
+                                (when (taxy-items taxy)
+                                  (item-latest-ts (car (taxy-items taxy))))
+                                (when (taxy-taxys taxy)
+                                  (cl-loop for sub-taxy in (taxy-taxys taxy)
+                                           maximizing (taxy-latest-ts sub-taxy)))))))
+                (t<nil (a b) (and a (not b)))
+                (t>nil (a b) (and (not a) b))
+                (make-fn (&rest args)
+                  (apply #'make-taxy-magit-section
+                         :make #'make-fn
+                         :format-fn #'format-item
+                         :level-indent ement-room-list-level-indent
+                         ;; :visibility-fn #'visible-p
+                         ;; :heading-indent 2
+                         :item-indent 2
+                         ;; :heading-face-fn #'heading-face
+                         args)))
+      ;; (when (get-buffer buffer-name)
+      ;;   (kill-buffer buffer-name))
+      (unless ement-sessions
+        (error "Ement: Not connected.  Use `ement-connect' to connect"))
+      (if (not (cl-loop for (_id . session) in ement-sessions
+                        thereis (ement-session-rooms session)))
+          (ement-message "No rooms have been joined")
+        (with-current-buffer (get-buffer-create buffer-name)
+          (unless (eq 'ement-room-list-mode major-mode)
+            (ement-room-list-mode))
+          (let* ((room-session-vectors
+                  (cl-loop for (_id . session) in ement-sessions
+                           append (cl-loop for room in (ement-session-rooms session)
+                                           collect (vector room session))))
+                 (taxy (cl-macrolet ((first-item
+                                       (pred) `(lambda (taxy)
+                                                 (when (taxy-items taxy)
+                                                   (,pred (car (taxy-items taxy))))))
+                                     (name= (name) `(lambda (taxy)
+                                                      (equal ,name (taxy-name taxy)))))
+                         (thread-last
+                           (make-fn
+                            :name "Ement Rooms"
+                            :take (taxy-make-take-function keys ement-room-list-keys))
+                           (taxy-fill room-session-vectors)
+                           (taxy-sort #'> #'item-latest-ts)
+                           (taxy-sort #'t<nil #'item-invited-p)
+                           (taxy-sort #'t<nil #'item-favourite-p)
+                           (taxy-sort #'t>nil #'item-low-priority-p)
+                           (taxy-sort #'t<nil #'item-unread-p)
+                           (taxy-sort #'t<nil #'item-space-p)
+                           ;; Within each taxy, left rooms should be sorted last so that one
+                           ;; can never be the first room in the taxy (unless it's the taxy
+                           ;; of left rooms), which would cause the taxy to be incorrectly
+                           ;; sorted last.
+                           (taxy-sort #'t>nil #'item-left-p)
+                           (taxy-sort* #'string< #'taxy-name)
+                           (taxy-sort* #'> #'taxy-latest-ts)
+                           (taxy-sort* #'t<nil (name= "Buffers"))
+                           (taxy-sort* #'t<nil (first-item item-unread-p))
+                           (taxy-sort* #'t<nil (first-item item-favourite-p))
+                           (taxy-sort* #'t<nil (first-item item-invited-p))
+                           (taxy-sort* #'t>nil (first-item item-space-p))
+                           (taxy-sort* #'t>nil (name= "Low-priority"))
+                           (taxy-sort* #'t>nil (first-item item-left-p)))))
+                 (taxy-magit-section-insert-indent-items nil)
+                 (inhibit-read-only t)
+                 (format-cons (taxy-magit-section-format-items
+                               ement-room-list-columns ement-room-list-column-formatters taxy))
+                 (pos (point))
+                 (section-ident (when (magit-current-section)
+                                  (magit-section-ident (magit-current-section)))))
+            (setf format-table (car format-cons)
+                  column-sizes (cdr format-cons)
+                  header-line-format (taxy-magit-section-format-header
+                                      column-sizes ement-room-list-column-formatters))
+            (when-let ((window (get-buffer-window (current-buffer))))
+              (setf window-point (window-point window)
+                    window-start (window-start window)))
+            (when ement-room-list-visibility-cache
+              (setf magit-section-visibility-cache ement-room-list-visibility-cache))
+            (add-hook 'kill-buffer-hook #'ement-room-list--cache-visibility nil 'local)
+            ;; Before this point, no changes have been made to the buffer's contents.
+            (delete-all-overlays)
+            (erase-buffer)
+            (save-excursion
+              (taxy-magit-section-insert taxy :items 'first
+                ;; :blank-between-depth bufler-taxy-blank-between-depth
+                :initial-depth 0 :section-class 'ement-room-list-section))
+            (if-let* ((section-ident)
+                      (section (magit-get-section section-ident)))
+                (goto-char (oref section start))
+              (goto-char pos))))
+        (when display-buffer-action
+          (when-let ((window (display-buffer buffer-name display-buffer-action)))
+            (select-window window)))
+        (when-let ((window (get-buffer-window buffer-name)))
+          (set-window-start window window-start)
+          (set-window-point window window-point))
+        ;; FIXME: Despite all this code to save and restore point and window point and
+        ;; window start, when I send a message from the minibuffer, or when I abort
+        ;; sending a message from the minibuffer, point is moved to the beginning of the
+        ;; buffer.  While the minibuffer is open (and the typing messages are being sent
+        ;; to the server, causing it to repeatedly sync), the point stays in the correct
+        ;; place.  I can't find any reason why this happens.  It makes no sense.  And
+        ;; while trying to debug the problem, somehow Emacs got put into an unbreakable,
+        ;; infinite loop twice; even C-g and SIGUSR2 didn't stop it.
+
+        ;; NOTE: In order for `bookmark--jump-via' to work properly, the restored buffer
+        ;; must be set as the current buffer, so we have to do this explicitly here.
+        (set-buffer buffer-name)))))
+
+(cl-defun ement-room-list-side-window (&key (side 'left))
+  "Show room list in side window on SIDE.
+Interactively, with prefix, show on right side; otherwise, on
+left."
+  (interactive (when current-prefix-arg
+                 (list :side 'right)))
+  (let ((display-buffer-mark-dedicated t))
+    ;; Not sure if binding `display-buffer-mark-dedicated' is still necessary.
+    (ement-room-list
+     :display-buffer-action `(display-buffer-in-side-window
+                              (dedicated . t)
+                              (side . ,side)
+                              (window-parameters
+			       (no-delete-other-windows . t))))))
+
+(defun ement-room-list-revert (&optional _ignore-auto _noconfirm)
+  "Revert current Ement-Room-List buffer."
+  (interactive)
+  (with-current-buffer "*Ement Room List*"
+    ;; FIXME: This caching of the visibility only supports the main buffer with the
+    ;; default name, not any special ones with different names.
+    (setf ement-room-list-visibility-cache magit-section-visibility-cache))
+  (ement-room-list :display-buffer-action nil))
+
+(defun ement-room-list-kill-buffer (room)
+  "Kill ROOM's buffer."
+  (interactive
+   (ement-with-room-and-session
+     (ignore ement-session)
+     (list ement-room)))
+  (pcase-let (((cl-struct ement-room (local (map buffer))) room)
+              (kill-buffer-query-functions))
+    (when (buffer-live-p buffer)
+      (kill-buffer buffer)
+      (ement-room-list-revert))))
+
+(declare-function ement-view-room "ement-room")
+(defun ement-room-list-RET ()
+  "View room at point, or cycle section at point."
+  (declare (function ement-view-space "ement-room"))
+  (interactive)
+  (cl-etypecase (oref (magit-current-section) value)
+    (vector (pcase-let ((`[,room ,session] (oref (magit-current-section) value)))
+              (if (ement--space-p room)
+                  (ement-view-space room session)
+                (ement-view-room room session))))
+    (taxy-magit-section (call-interactively #'ement-room-list-section-toggle))
+    (null nil)))
+
+(declare-function ement-room-goto-fully-read-marker "ement-room")
+(defun ement-room-list-next-unread ()
+  "Show next unread room."
+  (interactive)
+  (when (eobp)
+    (goto-char (point-min)))
+  (unless (cl-loop with starting-line = (line-number-at-pos)
+                   for value = (oref (magit-current-section) value)
+                   if (and (vectorp value)
+                           (ement--room-unread-p (elt value 0) (elt value 1)))
+                   do (progn
+                        (ement-view-room (elt value 0)  (elt value 1))
+                        (ement-room-goto-fully-read-marker)
+                        (cl-return t))
+                   else do (forward-line 1)
+                   while (and (not (eobp))
+                              (> (line-number-at-pos) starting-line)))
+    ;; No more unread rooms.
+    (message "No more unread rooms")))
+
+(define-derived-mode ement-room-list-mode magit-section-mode "Ement-Room-List"
+  :global nil
+  (setq-local bookmark-make-record-function #'ement-room-list-bookmark-make-record
+              revert-buffer-function #'ement-room-list-revert
+              ement-room-list-timestamp-colors (ement-room-list--timestamp-colors)))
+
+;;;; Functions
+
+(defun ement-room-list--cache-visibility ()
+  "Save visibility cache.
+Sets `ement-room-list-visibility-cache' to the value of
+`magit-section-visibility-cache'.  To be called in
+`kill-buffer-hook'."
+  (ignore-errors
+    (when magit-section-visibility-cache
+      (setf ement-room-list-visibility-cache magit-section-visibility-cache))))
+
+;;;###autoload
+(defun ement-room-list-auto-update (_session)
+  "Automatically update the Taxy room list buffer.
++Does so when variable `ement-room-list-auto-update' is non-nil.
++To be called in `ement-sync-callback-hook'."
+  (when (and ement-room-list-auto-update
+             (buffer-live-p (get-buffer "*Ement Room List*")))
+    (with-current-buffer (get-buffer "*Ement Room List*")
+      (unless (region-active-p)
+        ;; Don't refresh the list if the region is active (e.g. if the user is trying to
+        ;; operate on multiple rooms).
+        (revert-buffer)))))
+
+(defun ement-room-list--timestamp-colors ()
+  "Return a vector of generated latest-timestamp colors for rooms.
+Used in `ement-tabulated-room-list' and `ement-room-list'."
+  (if (or (equal "unspecified-fg" (face-foreground 'default nil 'default))
+          (equal "unspecified-bg" (face-background 'default nil 'default)))
+      ;; NOTE: On a TTY, the default face's foreground and background colors may be the
+      ;; special values "unspecified-fg"/"unspecified-bg", in which case we can't generate
+      ;; gradients, so we just return a vector of "unspecified-fg".  See
+      ;; <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=55623>.
+      (make-vector 134 "unspecified-fg")
+    (cl-coerce
+     (append (mapcar
+              ;; One face per 10-minute period, from "recent" to 1-hour.
+              (lambda (rgb)
+                (pcase-let ((`(,r ,g ,b) rgb))
+                  (color-rgb-to-hex r g b 2)))
+              (color-gradient (color-name-to-rgb (face-foreground 'ement-room-list-very-recent
+                                                                  nil 'default))
+                              (color-name-to-rgb (face-foreground 'ement-room-list-recent
+                                                                  nil 'default))
+                              6))
+             (mapcar
+              ;; One face per hour, from "recent" to default.
+              (lambda (rgb)
+                (pcase-let ((`(,r ,g ,b) rgb))
+                  (color-rgb-to-hex r g b 2)))
+              (color-gradient (color-name-to-rgb (face-foreground 'ement-room-list-recent
+                                                                  nil 'default))
+                              (color-name-to-rgb (face-foreground 'default nil 'default))
+                              24))
+             (mapcar
+              ;; One face per week for the last year (actually we
+              ;; generate colors for the past two years' worth so
+              ;; that the face for one-year-ago is halfway to
+              ;; invisible, and we don't use colors past that point).
+              (lambda (rgb)
+                (pcase-let ((`(,r ,g ,b) rgb))
+                  (color-rgb-to-hex r g b 2)))
+              (color-gradient (color-name-to-rgb (face-foreground 'default nil 'default))
+                              (color-name-to-rgb (face-background 'default nil 'default))
+                              104)))
+     'vector)))
+
+;;;; Footer
+
+(provide 'ement-room-list)
+
+;;; ement-room-list.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-room-list.elc b/emacs/.emacs.d/elpa/ement-0.17/ement-room-list.elc
new file mode 100644
index 0000000..9336719
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/ement-room-list.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-room.el b/emacs/.emacs.d/elpa/ement-0.17/ement-room.el
new file mode 100644
index 0000000..a794b78
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-room.el
@@ -0,0 +1,6015 @@
+;;; ement-room.el --- Ement room buffers             -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements buffers displaying events in a room.
+
+;; EWOC is a great library.  If I had known about it and learned it
+;; sooner, it would have saved me a lot of time in other projects.
+;; I'm glad I decided to try it for this one.
+
+;;; Code:
+
+;;;; Debugging
+
+;; NOTE: Uncomment this form and `emacs-lisp-byte-compile-and-load' the file to enable
+;; `ement-debug' messages.  This is commented out by default because, even though the
+;; messages are only displayed when `warning-minimum-log-level' is `:debug' at runtime, if
+;; that is so at expansion time, the expanded macro calls format the message and check the
+;; log level at runtime, which is not zero-cost.
+
+;; (eval-and-compile
+;;   (setq-local warning-minimum-log-level nil)
+;;   (setq-local warning-minimum-log-level :debug))
+
+;;;; Requirements
+
+(require 'color)
+(require 'ewoc)
+(require 'mailcap)
+(require 'shr)
+(require 'subr-x)
+(require 'mwheel)
+(require 'dnd)
+
+(require 'ement-api)
+(require 'ement-lib)
+(require 'ement-macros)
+(require 'ement-structs)
+
+;;;; Structs
+
+(cl-defstruct ement-room-membership-events
+  "Struct grouping membership events.
+After adding events, use `ement-room-membership-events--update'
+to sort events and update other slots."
+  (events nil :documentation "Membership events, latest first.")
+  (earliest-ts nil :documentation "Timestamp of earliest event.")
+  (latest-ts nil :documentation "Timestamp of latest event."))
+
+(defun ement-room-membership-events--update (struct)
+  "Return STRUCT having sorted its events and updated its slots."
+  ;; Like the room timeline slot, events are sorted latest-first.  We also deduplicate
+  ;; them , because it seems that we can end up with multiple copies of a membership event
+  ;; (e.g. when loading old messages).
+  (setf (ement-room-membership-events-events struct) (cl-delete-duplicates (ement-room-membership-events-events struct)
+                                                                           :key #'ement-event-id :test #'equal)
+        (ement-room-membership-events-events struct) (cl-sort (ement-room-membership-events-events struct) #'>
+                                                              :key #'ement-event-origin-server-ts)
+        (ement-room-membership-events-earliest-ts struct) (ement-event-origin-server-ts
+                                                           (car (last (ement-room-membership-events-events struct))))
+        (ement-room-membership-events-latest-ts struct) (ement-event-origin-server-ts
+                                                         (car (ement-room-membership-events-events struct))))
+  struct)
+
+;;;; Variables
+
+(defvar-local ement-ewoc nil
+  "EWOC for Ement room buffers.")
+
+(defvar-local ement-room nil
+  "Ement room for current buffer.")
+
+(defvar-local ement-session nil
+  "Ement session for current buffer.")
+
+;; TODO: Convert some of these buffer-local variables into keys in one buffer-local map variable.
+
+(defvar-local ement-room-retro-loading nil
+  "Non-nil when earlier messages are being loaded.
+Used to avoid overlapping requests.")
+
+(defvar-local ement-room-editing-event nil
+  "When non-nil, the user is editing this event.
+Used by `ement-room-send-message'.")
+
+(defvar-local ement-room-replying-to-event nil
+  "When non-nil, the user is replying to this event.
+Used by `ement-room-send-message'.")
+
+(defvar-local ement-room-replying-to-overlay nil
+  "Used by `ement-room-write-reply'.")
+
+(defvar-local ement-room-read-receipt-request nil
+  "Maps event ID to request updating read receipt to that event.
+An alist of one entry.")
+
+(defvar ement-room-read-string-setup-hook nil
+  "Normal hook run by `ement-room-read-string' after switching to minibuffer.
+Should be used to, e.g. propagate variables to the minibuffer.")
+
+(defvar ement-room-compose-hook nil
+  "Hook run in compose buffers when created.
+Used to, e.g. call `ement-room-compose-org'.")
+
+(declare-function ement-room-list "ement-room-list.el")
+(declare-function ement-notify-switch-to-mentions-buffer "ement-notify")
+(declare-function ement-notify-switch-to-notifications-buffer "ement-notify")
+
+(defvar ement-room-mode-self-insert-keymap (make-sparse-keymap)
+  "The `ement-room-mode' keymap under `ement-room-self-insert-mode'.
+
+Set as the parent keymap of `ement-room-mode-effective-keymap'
+when `ement-room-self-insert-mode' is enabled.
+
+This keymap is derived from the `ement-room-self-insert-chars'
+and `ement-room-self-insert-commands' user options, along with
+`ement-room-mode-map-prefix-key' which provides access to the
+full `ement-room-mode-map'.  (Non-conflicting key bindings from
+`ement-room-mode-map' are also available directly).
+
+This keymap is generated when `ement-room-self-insert-mode' is
+enabled, and after customizing any of the above options when the
+minor mode is enabled.
+
+The hook `ement-room-mode-self-insert-keymap-update-hook' runs
+after generating this keymap.
+
+Note: Emacs bug#66792 may cause `describe-keymap' to include
+unreachable key bindings from the parent `ement-room-mode-map' in
+its help output.  This problem affects only the help, and we work
+around it for the `ement-room-mode' help; but when viewing the
+keymap directly the issue may be visible.")
+
+(defvar ement-room-mode-map
+  (let ((map (make-sparse-keymap))
+        (prefixes '(("M-g" . "group:switching")
+                    ("s" . "group:messages")
+                    ("u" . "group:users")
+                    ("r" . "group:room")
+                    ("R" . "group:membership"))))
+    ;; Use symbols for prefix maps so that `which-key' can display their names.
+    (dolist (prefix prefixes)
+      (let ((cmd (define-prefix-command (make-symbol (cdr prefix)))))
+        (define-key map (kbd (car prefix)) cmd)))
+
+    ;; Menu
+    (define-key map (kbd "?") #'ement-room-transient)
+
+    ;; Movement
+    (define-key map (kbd "n") #'ement-room-goto-next)
+    (define-key map (kbd "N") #'end-of-buffer)
+    (define-key map (kbd "p") #'ement-room-goto-prev)
+    (define-key map (kbd "SPC") #'ement-room-scroll-up-mark-read)
+    (define-key map (kbd "S-SPC") #'ement-room-scroll-down-command)
+    (define-key map (kbd "M-g M-p") #'ement-room-goto-fully-read-marker)
+    (define-key map (kbd "m") #'ement-room-mark-read)
+    (define-key map [remap scroll-down-command] #'ement-room-scroll-down-command)
+    (define-key map [remap mwheel-scroll] #'ement-room-mwheel-scroll)
+    (define-key map (kbd "<tab>") #'forward-button)
+    (define-key map (kbd "<backtab>") #'backward-button)
+
+    ;; Switching
+    (define-key map (kbd "M-g M-l") #'ement-room-list)
+    (define-key map (kbd "M-g M-r") #'ement-view-room)
+    (define-key map (kbd "M-g M-m") #'ement-notify-switch-to-mentions-buffer)
+    (define-key map (kbd "M-g M-n") #'ement-notify-switch-to-notifications-buffer)
+    (define-key map (kbd "q") #'quit-window)
+
+    ;; Messages
+    (define-key map (kbd "RET") #'ement-room-dispatch-new-message)
+    (define-key map (kbd "M-RET") #'ement-room-dispatch-new-message-alt)
+    (define-key map (kbd "S-<return>") #'ement-room-dispatch-reply-to-message)
+    (define-key map (kbd "<insert>") #'ement-room-dispatch-edit-message)
+    (define-key map (kbd "C-k") #'ement-room-delete-message)
+    (define-key map (kbd "s r") #'ement-room-send-reaction)
+    (define-key map (kbd "s e") #'ement-room-send-emote)
+    (define-key map (kbd "s f") #'ement-room-send-file)
+    (define-key map (kbd "s i") #'ement-room-send-image)
+    (define-key map (kbd "v") #'ement-room-view-event)
+    (define-key map (kbd "D") #'ement-room-download-file)
+
+    ;; Users
+    (define-key map (kbd "u RET") #'ement-send-direct-message)
+    (define-key map (kbd "u i") #'ement-invite-user)
+    (define-key map (kbd "u I") #'ement-ignore-user)
+
+    ;; Room
+    (define-key map (kbd "M-s o") #'ement-room-occur)
+    (define-key map (kbd "r d") #'ement-describe-room)
+    (define-key map (kbd "r m") #'ement-list-members)
+    (define-key map (kbd "r t") #'ement-room-set-topic)
+    (define-key map (kbd "r f") #'ement-room-set-message-format)
+    (define-key map (kbd "r n") #'ement-room-set-notification-state)
+    (define-key map (kbd "r N") #'ement-room-override-name)
+    (define-key map (kbd "r T") #'ement-tag-room)
+
+    ;; Room membership
+    (define-key map (kbd "R c") #'ement-create-room)
+    (define-key map (kbd "R j") #'ement-join-room)
+    (define-key map (kbd "R l") #'ement-leave-room)
+    (define-key map (kbd "R F") #'ement-forget-room)
+    (define-key map (kbd "R n") #'ement-room-set-display-name)
+    (define-key map (kbd "R s") #'ement-room-toggle-space)
+
+    ;; Other
+    (define-key map (kbd "g") #'ement-room-sync)
+    map)
+  "Keymap for Ement room buffers.")
+
+(defvar ement-room-mode-effective-keymap
+  (let ((map (make-sparse-keymap)))
+    (set-keymap-parent map ement-room-mode-map)
+    map)
+  "The actual keymap used in `ement-room-mode'.
+
+This keymap reflects the state of `ement-room-self-insert-mode',
+with a parent of `ement-room-mode-map' when the mode is disabled,
+or `ement-room-mode-self-insert-keymap' when the mode is enabled.")
+
+(defvar ement-room-mode--advertised-keymap ement-room-mode-map
+  "The keymap advertised by `ement-room-mode'.
+
+This keymap should represent the functional behaviour of
+`ement-room-mode-effective-keymap' without the confusion arising
+from Emacs bug#66792 on account of the effective keymap having
+`ement-room-mode-map' as a parent if `ement-room-self-insert-mode'
+is enabled.
+
+Because it does not always have `ement-room-mode-map' as a
+parent, it is possible for that map to get out of sync with the
+advertised map, but `ement-room-mode-self-insert-keymap-update'
+makes a best effort to keep it accurate.")
+
+(defvar ement-room-minibuffer-map
+  (let ((map (make-sparse-keymap)))
+    (set-keymap-parent map minibuffer-local-map)
+    (define-key map (kbd "C-c '") #'ement-room-compose-from-minibuffer)
+    map)
+  "Keymap used in `ement-room-read-string'.")
+
+(defvar ement-room-reaction-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map "c" #'insert-char)
+    (when (commandp 'emoji-insert)
+      (define-key map "i" 'emoji-insert))
+    (when (commandp 'emoji-search)
+      (define-key map "s" 'emoji-search))
+    (when (assoc "emoji" input-method-alist)
+      (define-key map "m" 'ement-room-use-emoji-input-method))
+    map)
+  "Keymap used in `ement-room-send-reaction'.")
+
+(defvar ement-room-sender-in-headers nil
+  "Non-nil when sender is displayed in headers.
+In that case, sender names are aligned to the margin edge.")
+
+(defvar ement-room-messages-filter
+  '((lazy_load_members . t))
+  ;; NOTE: The confusing differences between what /sync and /messages
+  ;; expect.  See <https://github.com/matrix-org/matrix-doc/issues/706>.
+  "Default RoomEventFilter for /messages requests.")
+
+(defvar ement-room-typing-timer nil
+  "Timer used to send notifications while typing.")
+
+(defvar ement-room-matrix.to-url-regexp
+  (rx "http" (optional "s") "://"
+      "matrix.to" "/#/"
+      (group (or "!" "#") (1+ (not (any "/"))))
+      (optional "/" (group "$" (1+ (not (any "?" "/")))))
+      (optional "?" (group (1+ anything))))
+  "Regexp matching \"matrix.to\" URLs.")
+
+(defvar ement-room-message-history nil
+  "History list of messages entered with `ement-room' commands.
+Does not include filenames, emotes, etc.")
+
+(defvar ement-room-emote-history nil
+  "History list of emotes entered with `ement-room' commands.")
+
+;; Variables from other files.
+(defvar ement-sessions)
+(defvar ement-syncs)
+(defvar ement-auto-sync)
+(defvar ement-users)
+(defvar ement-images-queue)
+(defvar ement-notify-limit-room-name-width)
+(defvar ement-view-room-display-buffer-action)
+
+;; Defined in Emacs 28.1: silence byte-compilation warning in earlier versions.
+(defvar browse-url-handlers)
+
+;;;; Customization
+
+(defgroup ement-room-faces nil
+  "Faces for room buffers."
+  :group 'ement-room
+  :group 'ement-faces)
+
+(defgroup ement-room nil
+  "Options for room buffers."
+  :group 'ement)
+
+(defcustom ement-room-timestamp-header-align 'right
+  "Where to align timestamp headers."
+  :type '(choice (const :tag "Left" left)
+                 (const :tag "Center" center)
+                 (const :tag "Right" right)))
+
+(defcustom ement-room-view-hook
+  '(ement-room-view-hook-room-list-auto-update)
+  "Functions called when `ement-room-view' is called.
+Called with two arguments, the room and the session."
+  :type 'hook)
+
+(defcustom ement-room-reaction-names-limit 3
+  "Up to this many users, show a reaction's senders' names.
+If more than this many users have sent a reaction, show the
+number of senders instead (and the names in a tooltip)."
+  :type 'natnum)
+
+(defcustom ement-room-hide-redacted-message-content t
+  "Hide content in redacted messages.
+If nil, redacted messages' content will remain visible with a
+strikethrough face until the session is terminated (a new session
+will not receive the redacted content).
+
+Disabling this option may be useful for room administrators and
+moderators, so they can see content redacted by other users and
+handle it appropriately.  However, one should use this option
+with caution, as it will keep unpleasant content visible even
+after it has been redacted.
+
+After changing this option, a room's buffer must be killed and
+reopened for existing messages to be rendered accordingly."
+  :type '(choice (const :tag "Hide content" t)
+                 (const :tag "Strikethrough" nil)))
+
+;;;;; Faces
+
+(defface ement-room-name
+  '((t (:inherit font-lock-function-name-face)))
+  "Room name shown in header line."
+  :group 'ement-room-faces)
+
+(defface ement-room-membership
+  '((t (:height 0.8 :inherit font-lock-comment-face)))
+  "Membership events (join/part)."
+  :group 'ement-room-faces)
+
+(defface ement-room-reactions
+  '((t (:inherit font-lock-comment-face :height 0.9)))
+  "Reactions to messages (including the user count)."
+  :group 'ement-room-faces)
+
+(defface ement-room-reactions-key
+  '((t (:inherit ement-room-reactions :height 1.5)))
+  "Reactions to messages (the key, i.e. the emoji part).
+Uses a separate face to allow the key to be shown at a different
+size, because in some fonts, emojis are too small relative to
+normal text."
+  :group 'ement-room-faces)
+
+(defface ement-room-timestamp
+  '((t (:inherit font-lock-comment-face)))
+  "Event timestamps."
+  :group 'ement-room-faces)
+
+(defface ement-room-user
+  '((t (:inherit font-lock-function-name-face :weight bold :overline t)))
+  "Usernames."
+  :group 'ement-room-faces)
+
+(defface ement-room-self
+  '((t (:inherit (font-lock-variable-name-face ement-room-user) :weight bold)))
+  "Own username."
+  :group 'ement-room-faces)
+
+(defface ement-room-message-text
+  '((t (:inherit default)))
+  "Text message bodies."
+  :group 'ement-room-faces)
+
+(defface ement-room-message-emote
+  '((t (:inherit italic)))
+  "Emote message bodies."
+  :group 'ement-room-faces)
+
+(defface ement-room-quote
+  '((t (:height 0.9 :inherit font-lock-comment-face)))
+  "Quoted parts of messages.
+Anything wrapped by HTML BLOCKQUOTE tag."
+  :group 'ement-room-faces)
+
+(defface ement-room-redacted
+  '((t (:strike-through t)))
+  "Redacted messages."
+  :group 'ement-room-faces)
+
+(defface ement-room-self-message
+  '((t (:inherit (font-lock-variable-name-face))))
+  "Oneself's message bodies.
+Note that this does not need to inherit
+`ement-room-message-text', because that face is combined with
+this one automatically."
+  :group 'ement-room-faces)
+
+(defface ement-room-timestamp-header
+  '((t (:inherit header-line :weight bold :height 1.1)))
+  "Timestamp headers."
+  :group 'ement-room-faces)
+
+(defface ement-room-mention
+  ;; TODO(30.1): Remove when not supporting Emacs 27 anymore.
+  (if (version< emacs-version "27.1")
+      '((t (:inherit hl-line)))
+    '((t (:inherit hl-line :extend t))))
+  "Messages that mention the local user."
+  :group 'ement-room-faces)
+
+(defface ement-room-wrap-prefix
+  `((t :inherit highlight))
+  "Face applied to `ement-room-wrap-prefix', which see."
+  :group 'ement-room-faces)
+
+;;;;; Options
+
+(defcustom ement-room-ellipsis "⋮"
+  "String used when abbreviating certain strings."
+  :type 'string)
+
+(defcustom ement-room-avatars (display-images-p)
+  "Show room avatars."
+  :type 'boolean)
+
+(defcustom ement-room-avatar-max-width 32
+  "Maximum width in pixels of room avatars shown in header lines."
+  :type 'integer)
+
+(defcustom ement-room-avatar-max-height 32
+  "Maximum height in pixels of room avatars shown in header lines."
+  :type 'integer)
+
+(defcustom ement-room-coalesce-events 100
+  "Coalesce certain events in room buffers.
+For example, membership events can be overwhelming in large
+rooms, especially ones bridged to IRC.  This option groups them
+together so they take less space.
+
+The current, naïve implementation re-renders events as they are
+coalesced, which can cause a performance problem in unusual
+circumstances, so the number of events coalesced into a single,
+rendered event may be limited."
+  :type '(choice (integer :tag "Up to this many events")
+                 (const :tag "An unlimited number of events"
+                        ;; NOTE: As this docstring says, in most cases it should be fine,
+                        ;; but since in those rare cases the problem can be unusually bad
+                        ;; (e.g. taking 15 minutes to render a room's events in
+                        ;; <https://github.com/alphapapa/ement.el/issues/247>), we default
+                        ;; to a safer choice.
+                        :doc "Note that this choice may cause performance problems in rooms with very large numbers of consecutive membership events, but in most cases it should be fine."
+                        t)
+                 (const :tag "Don't coalesce" nil)))
+
+(defcustom ement-room-header-line-format
+  ;; TODO: Show in new screenshots.
+  '(:eval (concat (if ement-room-avatars
+                      (or (ement-room-avatar ement-room)
+                          "")
+                    "")
+                  " " (propertize (ement-room--escape-%
+                                   (or (ement-room-display-name ement-room)
+                                       "[no room name]"))
+                                  'face 'ement-room-name)
+                  ": " (propertize (ement-room--escape-%
+                                    (or (ement-room-topic ement-room)
+                                        "[no topic]"))
+                                   ;; Also set help-echo in case the topic is too wide to fit.
+                                   'help-echo (ement-room-topic ement-room))))
+  "Header line format for room buffers.
+See Info node `(elisp)Header lines'."
+  :type 'sexp)
+(put 'ement-room-header-line-format 'risky-local-variable t)
+
+(defcustom ement-room-buffer-name-prefix "*Ement Room: "
+  "Prefix for Ement room buffer names."
+  :type 'string)
+
+(defcustom ement-room-buffer-name-suffix "*"
+  "Suffix for Ement room buffer names."
+  :type 'string)
+
+(defcustom ement-room-timestamp-format "%H:%M:%S"
+  "Format string for event timestamps.
+See function `format-time-string'."
+  :type '(choice (const "%H:%M:%S")
+                 (const "%Y-%m-%d %H:%M:%S")
+                 string))
+
+(defcustom ement-room-left-margin-width 0
+  "Width of left margin in room buffers.
+When using a non-graphical display, this should be set slightly
+wider than when using a graphical display, to prevent sender
+display names from colliding with event text."
+  :type 'integer)
+
+(defcustom ement-room-right-margin-width (length ement-room-timestamp-format)
+  "Width of right margin in room buffers."
+  :type 'integer)
+
+(defcustom ement-room-sender-headers t
+  "Show sender headers.
+Automatically set by setting `ement-room-message-format-spec',
+but may be overridden manually."
+  :type 'boolean)
+
+(defcustom ement-room-unread-only-counts-notifications t
+  "Only use notification counts to mark rooms unread.
+Notification counts are set by the server based on each room's
+notification settings.  Otherwise, whether a room is marked
+unread depends on the room's fully-read marker, read-receipt
+marker, whether the local user sent the latest events, etc."
+  :type 'boolean)
+
+(defcustom ement-room-compose-method 'minibuffer
+  "How to compose messages.
+
+The value `minibuffer' means the minibuffer will be used to write
+and edit messages.  You can use \
+\\<ement-room-minibuffer-map>\\[ement-room-compose-from-minibuffer] \
+to switch from the minibuffer
+to a separate compose buffer, and \\[save-buffer] in the compose buffer
+will then return you to the minibuffer to confirm the message
+before sending.
+
+The value `compose-buffer' means that the minibuffer is not used --
+messages are written in a compose buffer by default, and \\[save-buffer]
+sends the composed message directly."
+  :type '(choice (const :tag "Minibuffer" minibuffer)
+                 (const :tag "Compose buffer" compose-buffer)))
+
+(defcustom ement-room-compose-buffer-display-action
+  (cons 'display-buffer-below-selected
+        '((window-height . 3)
+          (inhibit-same-window . t)
+          (reusable-frames . nil)))
+  "`display-buffer' action for displaying compose buffers.
+
+See also option `ement-room-compose-buffer-window-auto-height'
+and `ement-room-compose-buffer-window-dedicated'."
+  :type display-buffer--action-custom-type
+  :risky t)
+
+(defcustom ement-room-compose-buffer-window-dedicated 'created
+  "Whether windows for compose buffers should be dedicated.
+
+A dedicated compose buffer window will not be used to display any
+other buffer, and will be deleted once the message has been sent
+or aborted (see `ement-room-compose-buffer-quit-restore-window').
+
+The values t and nil mean \"always\" and \"never\" respectively.
+
+The value `created' means newly-created windows are dedicated.
+\(The default `ement-room-compose-buffer-display-action' always
+creates a new window.)
+
+The value `auto-height' means that windows will be dedicated if
+the option `ement-room-compose-buffer-window-auto-height' is
+enabled (this option generally keeps the windows too small to
+usefully display other buffers).
+
+The value `delete' means that windows will not be dedicated, but
+they will still be deleted once the message is sent or aborted
+\(even when they have also been used to display other buffers).
+
+See also `set-window-dedicated-p' and
+`switch-to-buffer-in-dedicated-window'."
+  :type '(radio (const :tag "Always" t)
+                (const :tag "Never" nil)
+                (const :tag "Never (but always delete window)" delete)
+                (const :tag "Newly-created windows" created)
+                (const :tag "When auto-height enabled" auto-height)))
+
+(defcustom ement-room-compose-buffer-window-auto-height t
+  "Dynamically match the compose buffer window height to its contents.
+See also `ement-room-compose-buffer-window-auto-height-max' and
+`ement-room-compose-buffer-window-auto-height-min'."
+  :type 'boolean)
+
+;; Experimental.  Disabled by default.  Set to 'height to use this.
+(defvar ement-room-compose-buffer-window-auto-height-fixed nil
+  "The buffer-local `window-size-fixed' value in compose buffers.")
+
+(defvar ement-room-compose-buffer-window-auto-height-pixelwise t
+  "Whether to adjust the window height for pixel-precise lines.")
+
+;; This is a mutex to ensure that auto-height resizing cannot trigger itself
+;; recursively.  This may prevent desirable resizing in certain cases, but we
+;; get the correct result in the majority of situations, and it is simple.
+(defvar ement-room-compose-buffer-window-auto-height-resizing-p)
+
+(defcustom ement-room-compose-buffer-window-auto-height-min nil
+  "If non-nil, limits the body height of the compose buffer window.
+
+See also option `ement-room-compose-buffer-window-auto-height'
+and `ement-room-compose-buffer-window-auto-height-max'."
+  :type '(choice (const :tag "Default" nil)
+                 (natnum :tag "Lines")))
+
+(defcustom ement-room-compose-buffer-window-auto-height-max nil
+  "If non-nil, limits the body height of the compose buffer window.
+
+See also option `ement-room-compose-buffer-window-auto-height'
+and `ement-room-compose-buffer-window-auto-height-min'."
+  :type '(choice (const :tag "Default" nil)
+                 (natnum :tag "Lines")))
+
+(defcustom ement-room-mode-self-insert-keymap-update-hook nil
+  "Hook run after rebuilding `ement-room-mode-self-insert-keymap'.
+
+This happens at the time `ement-room-self-insert-mode' is
+enabled, and also if user options `ement-room-self-insert-chars',
+`ement-room-self-insert-commands', or
+`ement-room-mode-map-prefix-key' are customized while the mode is
+enabled.
+
+You can use this hook to define any desired custom bindings which
+are not accounted for by those user options."
+  :type 'hook)
+
+(defvar ement-room-self-insert-mode)
+(defvar ement-room-self-insert-chars)
+(defvar ement-room-self-insert-commands)
+(defun ement-room-mode-self-insert-keymap-update ()
+  "Rebuilds `ement-room-mode-self-insert-keymap'.
+Also rebuilds `ement-room-mode--advertised-keymap'."
+  ;; Must be defined ahead of `ement-room-self-insert-option-setter'.
+  (let ((map (make-sparse-keymap)))
+    ;; Ensure that `ement-room-self-insert-chars' start a message.
+    (dolist (range ement-room-self-insert-chars)
+      (if (consp range)
+          ;; Process a range the same way that `global-map' does.
+          (let ((vec1 (make-vector 1 nil))
+                (from (car range))
+                (to (cdr range)))
+            (while (<= from to)
+              (aset vec1 0 from)
+              (define-key map vec1 #'ement-room-self-insert-new-message)
+              (setq from (1+ from))))
+        ;; Else `range' is a single character.
+        (define-key map (vector range) #'ement-room-self-insert-new-message)))
+    ;; Provide access to `ement-room-mode-map' via a prefix binding.
+    (when (bound-and-true-p ement-room-mode-map-prefix-key)
+      (define-key map ement-room-mode-map-prefix-key ement-room-mode-map))
+    ;; This is now the basis for `ement-room-mode-self-insert-keymap' and also
+    ;; `ement-room-mode--advertised-keymap' (when `ement-room-self-insert-mode'
+    ;; is enabled), but we need to keep the remaining differences between them
+    ;; separate.  (We do still need some identical `remap' bindings for both
+    ;; keymaps, but we can't do that just yet.)
+    (setq ement-room-mode-self-insert-keymap (copy-keymap map))
+    ;; To `ement-room-mode-self-insert-keymap', add `ement-room-mode-map'
+    ;; as the keymap parent.  (This is the keymap which is actually used.)
+    (set-keymap-parent ement-room-mode-self-insert-keymap ement-room-mode-map)
+    (if (not (bound-and-true-p ement-room-self-insert-mode))
+        ;; Advertise the real `ement-room-mode-map'.
+        (setq ement-room-mode--advertised-keymap ement-room-mode-map)
+      ;; Otherwise we base `ement-room-mode--advertised-keymap' on the same base
+      ;; map previously copied to `ement-room-mode-self-insert-keymap'.
+      (setq ement-room-mode--advertised-keymap map)
+      ;; To `ement-room-mode--advertised-keymap' (the keymap displayed when
+      ;; `describe-mode' is called), rather than setting a parent we instead
+      ;; copy the non-conflicting top-level bindings from `ement-room-mode-map'.
+      ;; Not using a keymap parent means the advertised map doesn't see any
+      ;; future changes to `ement-room-mode-map', but having a keymap parent
+      ;; would make the `describe-mode' output very confusing on account of
+      ;; Emacs bug#66792, so we accept potential inaccuracy as a trade-off for
+      ;; showing more comprehensible help.
+      ;;
+      ;; The following will copy the `remap' keymap verbatim, clobbering any
+      ;; pre-existing remappings; so we do this before we define other
+      ;; remappings.
+      (cl-labels ((copy-from (key definition)
+		    (unless (lookup-key ement-room-mode--advertised-keymap
+                                        (vector key))
+		      (define-key ement-room-mode--advertised-keymap
+                                  (vector key) definition))))
+        ;; Copy from a copy of `ement-room-mode-map', otherwise the latter will
+        ;; also acquire (share) the remap keybindings which are added below.
+        (map-keymap #'copy-from (copy-keymap ement-room-mode-map))))
+    ;; Now define our additional `remap' bindings in both keymaps.
+    (let ((keymaps (if (bound-and-true-p ement-room-self-insert-mode)
+                       (list ement-room-mode-self-insert-keymap
+                             ement-room-mode--advertised-keymap)
+                     (list ement-room-mode-self-insert-keymap))))
+      (dolist (keymap keymaps)
+        ;; Make `self-insert-command' (and friends) start a new message.
+        (dolist (cmd ement-room-self-insert-commands)
+          (define-key keymap (vector 'remap cmd)
+                      #'ement-room-self-insert-new-message)))))
+  (run-hooks 'ement-room-mode-self-insert-keymap-update-hook))
+
+(defun ement-room-mode-effective-keymap-update ()
+  "Sets the parent keymap for `ement-room-mode-effective-keymap'.
+
+Either `ement-room-mode-self-insert-keymap' or `ement-room-mode-map',
+depending on `ement-room-self-insert-mode'."
+  ;; Must be defined ahead of `ement-room-self-insert-option-setter'.
+  (set-keymap-parent ement-room-mode-effective-keymap
+                     (if (bound-and-true-p ement-room-self-insert-mode)
+                         ement-room-mode-self-insert-keymap
+                       ement-room-mode-map)))
+
+(defun ement-room-self-insert-option-setter (option value)
+  "Setter for options affecting `ement-room-self-insert-mode'.
+
+This is the setter function for `ement-room-self-insert-chars'
+and `ement-room-self-insert-commands'.
+
+Sets the value with (set-default-toplevel-value OPTION VALUE),
+and then rebuilds `ement-room-mode-self-insert-keymap'."
+  ;; Must be defined ahead of `ement-room-self-insert-chars' and
+  ;; `ement-room-self-insert-commands'.
+  ;;
+  ;; Update the variable.
+  (set-default-toplevel-value option value)
+  ;; Update keymaps when necessary.
+  (when (bound-and-true-p ement-room-self-insert-mode)
+    (ement-room-mode-self-insert-keymap-update)
+    (ement-room-mode-effective-keymap-update)))
+
+(defcustom ement-room-self-insert-chars
+  '((33 . 62) (64 . 126))
+  "Characters handled by `ement-room-self-insert-mode'.
+
+These are in addition to any `self-insert-command' key bindings
+-- this list is to ensure that certain keys will be treated this
+way even when they have `ement-room-mode-map' bindings.
+
+Cons cell elements represent the range from the car to the cdr
+\(inclusive).  The default value covers the common \"printable\"
+ASCII characters excluding SPC (32), ? (63), and DEL (127).
+
+Customizing this option updates `ement-room-mode-self-insert-keymap'
+via the setter function `ement-room-self-insert-option-setter'.
+To do the same in lisp code, set the option with `setopt'.
+
+See also `ement-room-self-insert-commands'."
+  :type '(repeat (choice (character :tag "Character")
+                         (cons :tag "Character range"
+                               (character :tag "From")
+                               (character :tag "To"))))
+  :set #'ement-room-self-insert-option-setter)
+
+(defcustom ement-room-self-insert-commands
+  '(self-insert-command yank)
+  "Commands handled by `ement-room-self-insert-mode'.
+
+When the mode is enabled, the listed commands are remapped to
+`ement-room-self-insert-new-message' such that when one of those
+commands is invoked in a room buffer, a new message will be
+started and the event which triggered the command (typically a
+`self-insert-command' key binding) will be re-issued in the
+message buffer.
+
+Customizing this option updates `ement-room-mode-self-insert-keymap'
+via the setter function `ement-room-self-insert-option-setter'.
+To do the same in lisp code, set the option with `setopt'.
+
+See also `ement-room-self-insert-chars'."
+  :type '(repeat (function :tag "Command"))
+  :set #'ement-room-self-insert-option-setter)
+
+(defcustom ement-room-mode-map-prefix-key (kbd "DEL")
+  "A prefix key sequence to access `ement-room-mode-map'.
+Active when `ement-room-self-insert-mode' is enabled.
+
+The default key is DEL.
+
+Customizing this option updates `ement-room-mode-self-insert-keymap'
+via the setter function `ement-room-self-insert-option-setter'.
+To do the same in lisp code, set the option with `setopt'."
+  :type 'key-sequence
+  :set #'ement-room-self-insert-option-setter)
+
+(defcustom ement-room-reaction-picker (if (commandp 'emoji-search)
+                                          'emoji-search
+                                        #'insert-char)
+  "Command used to select a reaction by `ement-room-send-reaction'.
+Should be set to a command that somehow prompts the user for an
+emoji and inserts it into the current buffer.  In Emacs 29
+reasonable choices include `emoji-insert' which uses a transient
+interface, and `emoji-search' which uses `completing-read'.  If
+those are not available, one can use `insert-char'."
+  :type `(choice
+          (const :tag "Complete unicode character name" insert-char)
+          ,@(when (commandp 'emoji-insert)
+              '((const :tag "Categorized emoji menu" emoji-insert)))
+          ,@(when (commandp 'emoji-search)
+              '((const :tag "Complete emoji name" emoji-search)))
+          ,@(when (assoc "emoji" input-method-alist)
+              '((const :tag "Emoji input method"
+                       ement-room-use-emoji-input-method)))
+          (const :tag "Type an emoji without assistance" ignore)
+          (function :tag "Use other command")))
+
+(defvar ement-room-sender-in-left-margin nil
+  "Whether sender is shown in left margin.
+Set by `ement-room-message-format-spec-setter'.")
+
+(defun ement-room-message-format-spec-setter (option value &optional local)
+  "Set relevant options for `ement-room-message-format-spec', which see.
+To be used as that option's setter.  OPTION and VALUE are
+received from setting the customization option.  If LOCAL is
+non-nil, set the variables buffer-locally (i.e. when called from
+`ement-room-set-message-format'."
+  (cl-macrolet ((set-vars (&rest pairs)
+                  ;; Set variable-value pairs, locally if LOCAL is non-nil.
+                  `(progn
+                     ,@(cl-loop for (symbol value) on pairs by #'cddr
+                                collect `(if local
+                                             (set (make-local-variable ',symbol) ,value)
+                                           (set ',symbol ,value))))))
+    (if local
+        (set (make-local-variable option) value)
+      (set-default option value))
+    (pcase value
+      ;; Try to set the margin widths smartly.
+      ("%B%r%R%t" ;; "Elemental"
+       (set-vars ement-room-left-margin-width 0
+                 ement-room-right-margin-width 8
+                 ement-room-sender-headers t
+                 ement-room-sender-in-headers t
+                 ement-room-sender-in-left-margin nil))
+      ("%S%L%B%r%R%t" ;; "IRC-style using margins"
+       (set-vars ement-room-left-margin-width 12
+                 ement-room-right-margin-width 8
+                 ement-room-sender-headers nil
+                 ement-room-sender-in-headers nil
+                 ement-room-sender-in-left-margin t))
+      ("[%t] %S> %B%r" ;; "IRC-style without margins"
+       (set-vars ement-room-left-margin-width 0
+                 ement-room-right-margin-width 0
+                 ement-room-sender-headers nil
+                 ement-room-sender-in-headers nil
+                 ement-room-sender-in-left-margin nil))
+      (_ (set-vars ement-room-left-margin-width
+                   (if (string-match-p "%L" value)
+                       12 0)
+                   ement-room-right-margin-width
+                   (if (string-match-p "%R" value)
+                       8 0)
+                   ement-room-sender-in-left-margin
+                   (if (string-match-p (rx (1+ anything) (or "%S" "%s") (1+ anything) "%L") value)
+                       t nil)
+                   ;; NOTE: The following two variables may seem redundant, but one is an
+                   ;; option that the user may override, while the other is set
+                   ;; automatically.
+                   ement-room-sender-headers
+                   (if (string-match-p (or "%S" "%s") value)
+                       ;; If "%S" or "%s" isn't found, assume it's to be shown in headers.
+                       nil t)
+                   ement-room-sender-in-headers
+                   (if (string-match-p (rx (or "%S" "%s")) value)
+                       ;; If "%S" or "%s" isn't found, assume it's to be shown in headers.
+                       nil t))
+         (message "Ement: When using custom message format, setting margin widths may be necessary")))
+    (unless ement-room-sender-in-headers
+      ;; HACK: Disable overline on sender face.
+      (require 'face-remap)
+      (if local
+          (progn
+            (face-remap-reset-base 'ement-room-user)
+            (face-remap-add-relative 'ement-room-user '(:overline nil)))
+        (set-face-attribute 'ement-room-user nil :overline nil)))
+    (unless local
+      (when (and (bound-and-true-p ement-sessions) (car ement-sessions))
+        ;; Only display when a session is connected (not sure why `bound-and-true-p'
+        ;; is required to avoid compilation warnings).
+        (message "Ement: Kill and reopen room buffers to display in new format")))))
+
+(defcustom ement-room-message-format-spec "%S%L%B%r%R%t"
+  "Format messages according to this spec.
+It may contain these specifiers:
+
+  %L  End of left margin
+  %R  Start of right margin
+  %W  End of wrap-prefix
+
+  %b  Message body (plain-text)
+  %B  Message body (formatted if available)
+  %i  Event ID
+  %O  Room display name (used for mentions buffer)
+  %r  Reactions
+  %s  Sender ID
+  %S  Sender display name
+  %t  Event timestamp, formatted according to
+      `ement-room-timestamp-format'
+
+Note that margin sizes must be set manually with
+`ement-room-left-margin-width' and
+`ement-room-right-margin-width'."
+  :type '(choice (const :tag "IRC-style using margins" "%S%L%B%r%R%t")
+                 (const :tag "IRC-style without margins" "[%t] %S> %B%r")
+                 (const :tag "IRC-style without margins, with wrap-prefix" "[%t] %S> %W%B%r")
+                 (const :tag "IRC-style with right margin, with wrap-prefix" "%S> %W%B%r%R%t")
+                 (const :tag "Elemental" "%B%r%R%t")
+                 (string :tag "Custom format"))
+  :set #'ement-room-message-format-spec-setter
+  :set-after '(ement-room-left-margin-width ement-room-right-margin-width
+                                            ement-room-sender-headers)
+  ;; This file must be loaded before calling the setter to define the
+  ;; `ement-room-user' face used in it.
+  :require 'ement-room)
+
+(defcustom ement-room-retro-messages-number 30
+  "Number of messages to retrieve when loading earlier messages."
+  :type 'integer)
+
+(defcustom ement-room-timestamp-header-format " %H:%M "
+  "Format string for timestamp headers where date is unchanged.
+See function `format-time-string'.  If this string ends in a
+newline, its background color will extend to the end of the
+line."
+  :type '(choice (const :tag "Time-only" " %H:%M ")
+                 (const :tag "Always show date" " %Y-%m-%d %H:%M ")
+                 string))
+
+(defcustom ement-room-timestamp-header-with-date-format " %Y-%m-%d (%A)\n"
+  ;; FIXME: In Emacs 27+, maybe use :extend t instead of adding a newline.
+  "Format string for timestamp headers where date changes.
+See function `format-time-string'.  If this string ends in a
+newline, its background color will extend to the end of the
+line."
+  :type '(choice (const " %Y-%m-%d (%A)\n")
+                 string))
+
+(defcustom ement-room-replace-edited-messages t
+  "Replace edited messages with their new content.
+When nil, edited messages are displayed as new messages, leaving
+the original messages visible."
+  :type 'boolean)
+
+(define-obsolete-variable-alias 'ement-room-shr-use-fonts
+  'ement-room-use-variable-pitch "ement-0.14")
+
+(defcustom ement-room-use-variable-pitch nil
+  "Use proportional fonts for message bodies.
+If non-nil, plain text message bodies are displayed in a
+variable-pitch font, and `shr-use-fonts' is enabled for rendering
+HTML-formatted message bodies (which includes most replies)."
+  :type '(choice (const :tag "Disable variable-pitch fonts" nil)
+                 (const :tag "Enable variable-pitch fonts" t)))
+
+(defcustom ement-room-username-display-property '(raise -0.25)
+  "Display property applied to username strings.
+See Info node `(elisp)Other Display Specs'."
+  :type '(choice (list :tag "Raise" (const :tag "Raise" raise) (number :tag "Factor"))
+                 (list :tag "Height" (const height)
+                       (choice (list :tag "Larger" (const :tag "Larger" +) (number :tag "Steps"))
+                               (list :tag "Smaller" (const :tag "Smaller" -) (number :tag "Steps"))
+                               (number :tag "Factor")
+                               (function :tag "Function")
+                               (sexp :tag "Form"))) ))
+
+(defcustom ement-room-event-separator-display-property '(space :ascent 50)
+  "Display property applied to invisible space string after events.
+Allows visual separation between events without, e.g. inserting
+newlines.
+
+See Info node `(elisp)Specified Space'."
+  :type 'sexp)
+
+(defcustom ement-room-timestamp-header-delta 600
+  "Show timestamp header where events are at least this many seconds apart."
+  :type 'integer)
+
+(defcustom ement-room-send-message-filter nil
+  "Function through which to pass message content before sending.
+Used to, e.g. send an Org-formatted message by exporting it to
+HTML first."
+  :type '(choice (const :tag "Send messages as-is" nil)
+                 (const :tag "Send messages in Org format" ement-room-send-org-filter)
+                 (function :tag "Custom filter function"))
+  :set (lambda (option value)
+         (set-default option value)
+         (pcase value
+           ('ement-room-send-org-filter
+            ;; Activate in compose buffer by default.
+            (add-hook 'ement-room-compose-hook #'ement-room-compose-org))
+           (_ (remove-hook 'ement-room-compose-hook #'ement-room-compose-org)))))
+
+(defcustom ement-room-mark-rooms-read t
+  "Mark rooms as read automatically.
+Moves read and fully-read markers in rooms on the server when
+`ement-room-scroll-up-mark-read' is called at the end of a
+buffer.  When `send', also marks room as read when sending a
+message in it.  When disabled, rooms may still be marked as read
+manually by calling `ement-room-mark-read'.  Note that this is
+not strictly the same as read receipts."
+  :type '(choice (const :tag "When scrolling past end of buffer" t)
+                 (const :tag "Also when sending" send)
+                 (const :tag "Never" nil)))
+
+(defcustom ement-room-send-typing t
+  "Send typing notifications to the server while typing a message."
+  :type 'boolean)
+
+(defcustom ement-room-join-view-buffer t
+  "View room buffer when joining a room."
+  :type 'boolean)
+
+(defcustom ement-room-leave-kill-buffer t
+  "Kill room buffer when leaving a room.
+When disabled, the room's buffer will remain open, but
+Matrix-related commands in it will fail."
+  :type 'boolean)
+
+(defcustom ement-room-warn-for-already-seen-messages nil
+  "Warn when a sent message has already been seen.
+Such a case could very rarely indicate a reused transaction ID,
+which would prevent further messages from being sent (and would
+be solved by logging in with a new session, generating a new
+token), but most often it happens when the server echoes back a
+sent message before acknowledging the sending of the
+message (which is harmless and can be ignored)."
+  :type 'boolean)
+
+(defcustom ement-room-wrap-prefix
+  (concat (propertize " "
+                      'face 'ement-room-wrap-prefix)
+          " ")
+  "String prefixing certain events in room buffers.
+Events include membership events, image attachments, etc.
+Generally users should prefer to customize the face
+`ement-room-wrap-prefix' rather than this option, because this
+option's default value has that face applied to it where
+appropriate; if users customize this option, they will need to
+apply the face to the string themselves, if desired."
+  :type 'string)
+
+(defgroup ement-room-prism nil
+  "Colorize usernames and messages in rooms."
+  :group 'ement-room)
+
+(defcustom ement-room-prism 'name
+  "Display users' names and messages in unique colors."
+  :type '(choice (const :tag "Name only" name)
+                 (const :tag "Name and message" both)
+                 (const :tag "Neither" nil)))
+
+(defcustom ement-room-prism-addressee t
+  "Show addressees' names in their respective colors.
+Applies to room member names at the beginning of messages,
+preceded by a colon or comma.
+
+Note that a limitation applies to the current implementation: if
+a message from the addressee is not yet visible in a room at the
+time the addressed message is formatted, the color may not be
+applied."
+  ;; FIXME: When we keep a hash table of members in a room, make this
+  ;; smarter.
+  :type 'boolean)
+
+(defcustom ement-room-prism-color-adjustment 0
+  "Number used to tweak computed username colors.
+This may be used to adjust your favorite users' colors if you
+don't like the default ones.  (The only way to do it is by
+experimentation--there is no direct mapping available, nor a
+per-user setting.)
+
+The number is added to the hashed user ID before converting it to
+a color.  Note that, since user ID hashes are ratioed against
+`most-positive-fixnum', this number must be very large in order
+to have any effect; it should be at least 1e13.
+
+After changing this option, a room's buffer must be killed and
+recreated to see the effect."
+  :type 'number
+  :set (lambda (option value)
+         (unless (or (= 0 value) (>= value 1e13))
+           (user-error "This option must be a very large number, at least 1e13"))
+         (set-default option value)))
+
+(defcustom ement-room-prism-minimum-contrast 6
+  "Attempt to enforce this minimum contrast ratio for user faces.
+This should be a reasonable number from, e.g. 0-7 or so."
+  ;; Prot would almost approve of this default.  :) I would go all the way
+  ;; to 7, but 6 already significantly dilutes the colors in some cases.
+  :type 'number)
+
+(defcustom ement-room-prism-message-desaturation 25
+  "Desaturate user colors by this percent for message bodies.
+Makes message bodies a bit less intense."
+  :type 'integer)
+
+(defcustom ement-room-prism-message-lightening 10
+  "Lighten user colors by this percent for message bodies.
+Makes message bodies a bit less intense.
+
+When using a light theme, it may be necessary to use a negative
+number (to darken rather than lighten)."
+  :type 'integer)
+
+;;;; Macros
+
+(defmacro ement-room-with-highlighted-event-at (position &rest body)
+  "Highlight event at POSITION while evaluating BODY."
+  ;; MAYBE: Accept a marker for POSITION.
+  (declare (indent 1))
+  `(let (ement-room-replying-to-overlay)
+     (unwind-protect
+         (progn
+           (ement-room-highlight-event-at ,position)
+           ,@body)
+       (ement-room-unhighlight-event))))
+
+(defmacro ement-room-with-typing (&rest body)
+  "Send typing notifications around BODY.
+When `ement-room-send-typing' is enabled, typing notifications
+are sent while BODY is executing.  BODY is wrapped in an
+`unwind-protect' form that cancels `ement-room-typing-timer' and
+sends a not-typing notification."
+  (declare (indent defun))
+  `(unwind-protect
+       (progn
+         (when ement-room-send-typing
+           (when ement-room-typing-timer
+             ;; In case there are any stray ones (e.g. a user typing in
+             ;; more than room at once, which is possible but unlikely).
+             (cancel-timer ement-room-typing-timer))
+           (setf ement-room-typing-timer (run-at-time nil 15 #'ement-room--send-typing ement-session ement-room)))
+         ,@body)
+     (when ement-room-send-typing
+       (when ement-room-typing-timer
+         (cancel-timer ement-room-typing-timer)
+         (setf ement-room-typing-timer nil))
+       ;; Cancel typing notifications after sending a message.  (The
+       ;; spec doesn't say whether this is needed, but it seems to be.)
+       (ement-room--send-typing ement-session ement-room :typing nil))))
+
+(defmacro ement-room-wrap-prefix (string-form &rest properties)
+  "Wrap STRING-FORM with `ement-room-wrap-prefix'.
+Concats `ement-room-wrap-prefix' to STRING-FORM and applies it as
+the `wrap-prefix' property.  Also applies any PROPERTIES."
+  (declare (indent defun))
+  `(concat ement-room-wrap-prefix
+           (propertize ,string-form
+                       'wrap-prefix ement-room-wrap-prefix
+                       ,@properties)))
+
+(defsubst ement-room--concat-property (string property value &optional append)
+  "Return STRING having concatted VALUE with PROPERTY on it.
+If APPEND, append it; otherwise prepend.  Assumes PROPERTY is
+constant throughout STRING."
+  (declare (indent defun))
+  (let* ((old-value (get-text-property 0 property string))
+         (new-value (if append
+                        (concat old-value value)
+                      (concat value old-value))))
+    (propertize string property new-value)))
+
+;;;;; Event highlighting
+
+(defun ement-room-highlight-event-at (position)
+  "Highlight event at POSITION using `ement-room-replying-to-overlay'.
+See `ement-room-with-highlighted-event-at'."
+  ;; MAYBE: Accept a marker for POSITION.
+  (let* ((node (ewoc-locate ement-ewoc position))
+         (event (ewoc-data node)))
+    (unless (and (ement-event-p event)
+                 (ement-event-id event))
+      (error "No event at point"))
+    (setf ement-room-replying-to-overlay
+          (make-overlay (ewoc-location node)
+                        ;; NOTE: It doesn't seem possible to get the end position of
+                        ;; a node, so if there is no next node, we use point-max.
+                        ;; But this might break if we were to use an EWOC footer.
+                        (if (ewoc-next ement-ewoc node)
+                            (ewoc-location (ewoc-next ement-ewoc node))
+                          (point-max))))
+    (overlay-put ement-room-replying-to-overlay 'face 'highlight)))
+
+(defun ement-room-unhighlight-event ()
+  "Delete overlay in `ement-room-replying-to-overlay'.
+See `ement-room-with-highlighted-event-at'."
+  (when (overlayp ement-room-replying-to-overlay)
+    (delete-overlay ement-room-replying-to-overlay))
+  (setf ement-room-replying-to-overlay nil))
+
+(defun ement-room-compose-highlight (compose-buffer)
+  "Make `ement-room-with-highlighted-event-at' persistent while COMPOSE-BUFFER exists."
+  (when-let ((overlay ement-room-replying-to-overlay))
+    ;; Prevent `ement-room-with-highlighted-event-at' from deleting the overlay:
+    (setq ement-room-replying-to-overlay nil)
+    ;; Instead, make it exist for the lifetime of the compose buffer:
+    (cl-flet ((delete-overlay ()
+                (when (overlayp overlay)
+                  (delete-overlay overlay))))
+      (with-current-buffer compose-buffer
+        (add-hook 'kill-buffer-hook #'delete-overlay nil :local)))))
+
+;;;;; Event formatting
+
+;; NOTE: When adding specs, also add them to docstring
+;; for `ement-room-message-format-spec'.
+
+(defvar ement-room-event-formatters nil
+  "Alist mapping characters to event-formatting functions.
+Each function is called with three arguments: the event, the
+room, and the session.  See macro
+`ement-room-define-event-formatter'.")
+
+(defvar ement-room--format-message-margin-p nil
+  "Set by margin-related event formatters.")
+
+(defvar ement-room--format-message-wrap-prefix nil
+  "Set by margin-related event formatters.")
+
+(defmacro ement-room-define-event-formatter (char docstring &rest body)
+  "Define an event formatter for CHAR with DOCSTRING and BODY.
+BODY is wrapped in a lambda form that binds `event', `room', and
+`session', and the lambda is added to the variable
+`ement-room-event-formatters', which see."
+  (declare (indent defun)
+           (debug (characterp stringp def-body)))
+  `(setf (alist-get ,char ement-room-event-formatters nil nil #'equal)
+         (lambda (event room session)
+           ,docstring
+           ,@body)))
+
+(ement-room-define-event-formatter ?L
+  "Text before this is shown in the left margin."
+  (ignore event room session)
+  (setf ement-room--format-message-margin-p t)
+  (propertize " " 'left-margin-end t))
+
+(ement-room-define-event-formatter ?R
+  "Text after this is shown in the right margin."
+  (ignore event room session)
+  (setf ement-room--format-message-margin-p t)
+  (propertize " " 'right-margin-start t))
+
+(ement-room-define-event-formatter ?W
+  "Text before this is the length of the event's wrap-prefix.
+This emulates the effect of using the left margin (the \"%L\"
+spec) without requiring all events to use the same margin width."
+  (ignore event room session)
+  (setf ement-room--format-message-wrap-prefix t)
+  (propertize " " 'wrap-prefix-end t))
+
+;; FIXME(v0.12): The quote-end may be detected in the wrong position when, e.g. a link is
+;; in the middle of the quoted part.  We need to search backward from the end to find
+;; where the quote face finally ends.
+
+(ement-room-define-event-formatter ?b
+  "Plain-text body content."
+  ;; NOTE: `save-match-data' is required around calls to `ement-room--format-message-body'.
+  (let* ((body (save-match-data
+                 (ement-room--format-message-body event session :formatted-p nil)))
+         (body-length (length body))
+         (face (ement-room--event-body-face event room session))
+         (quote-start (ement--text-property-search-forward 'face
+                        (lambda (value)
+                          (pcase value
+                            ('ement-room-quote t)
+                            ((pred listp) (member 'ement-room-quote value))))
+                        body))
+         (quote-end (when quote-start
+                      (ement--text-property-search-backward 'face
+                        (lambda (value)
+                          (pcase value
+                            ('ement-room-quote t)
+                            ((pred listp) (member 'ement-room-quote value))))
+                        body))))
+    (add-face-text-property (or quote-end 0) body-length face 'append body)
+    (when ement-room-prism-addressee
+      (ement-room--add-member-face body room))
+    body))
+
+(ement-room-define-event-formatter ?B
+  "Formatted body content (i.e. rendered HTML)."
+  (let* ((body (save-match-data
+                 (ement-room--format-message-body event session)))
+         (body-length (length body))
+         (face (ement-room--event-body-face event room session))
+         (quote-start (ement--text-property-search-forward 'face
+                        (lambda (value)
+                          (pcase value
+                            ('ement-room-quote t)
+                            ((pred listp) (member 'ement-room-quote value))))
+                        body))
+         (quote-end (when quote-start
+                      (ement--text-property-search-backward 'face
+                        (lambda (value)
+                          (pcase value
+                            ('ement-room-quote t)
+                            ((pred listp) (member 'ement-room-quote value))))
+                        body :start (length body)))))
+    (add-face-text-property (or quote-end 0) body-length face 'append body)
+    (when ement-room-prism-addressee
+      (ement-room--add-member-face body room))
+    body))
+
+(ement-room-define-event-formatter ?i
+  "Event ID."
+  ;; Probably only useful for debugging, so might remove later.
+  (ignore room session)
+  (ement-event-id event))
+
+(ement-room-define-event-formatter ?o
+  "Room avatar."
+  (ignore event session)
+  (or (alist-get 'room-list-avatar (ement-room-local room)) ""))
+
+(ement-room-define-event-formatter ?O
+  "Room display name."
+  (ignore event session)
+  (let ((room-name (propertize (or (ement-room-display-name room)
+                                   (ement--room-display-name room))
+                               'face 'ement-room-name
+                               'help-echo (or (ement-room-canonical-alias room)
+                                              (ement-room-id room)))))
+    ;; HACK: This will probably only be used in the notifications buffers, anyway.
+    (when ement-notify-limit-room-name-width
+      (setf room-name (truncate-string-to-width room-name ement-notify-limit-room-name-width
+                                                nil nil ement-room-ellipsis)))
+    room-name))
+
+;; NOTE: In ?s and ?S, we add nearly-invisible ASCII unit-separator characters ("​")
+;; to prevent, e.g. `dabbrev-expand' from expanding display names with body text.
+
+(ement-room-define-event-formatter ?s
+  "Sender MXID."
+  (ignore room session)
+  (concat (propertize (ement-user-id (ement-event-sender event))
+                      'face 'ement-room-user)
+          "​"))
+
+(ement-room-define-event-formatter ?S
+  "Sender display name."
+  (ignore session)
+  (pcase-let ((sender (ement--format-user (ement-event-sender event) room))
+              ((cl-struct ement-room (local (map buffer))) room))
+    ;; NOTE: When called from an `ement-notify' function, ROOM may have no buffer.  In
+    ;; that case, just use the current buffer (which should be a temp buffer used to
+    ;; format the event).
+    (with-current-buffer (or buffer (current-buffer))
+      (when ement-room-sender-in-left-margin
+        ;; Sender in left margin: truncate/pad appropriately.
+        (setf sender
+              (if (< (string-width sender) ement-room-left-margin-width)
+                  ;; Using :align-to or :width space display properties doesn't
+                  ;; seem to have any effect in the margin, so we make a string.
+                  (concat (make-string (- ement-room-left-margin-width (string-width sender))
+                                       ? )
+                          sender)
+                ;; String wider than margin: truncate it.
+                (ement-room--concat-property
+                  (truncate-string-to-width sender ement-room-left-margin-width nil nil "…")
+                  'help-echo (concat sender " "))))))
+    ;; NOTE: I'd like to add a help-echo function to display the sender ID, but the Emacs
+    ;; manual says that there is currently no way to make text in the margins mouse-sensitive.
+    ;; So `ement--format-user' returns a string propertized with `help-echo' as a string.
+    (concat sender "​")))
+
+(ement-room-define-event-formatter ?r
+  "Reactions."
+  (ignore session)
+  (ement-room--format-reactions event room))
+
+(ement-room-define-event-formatter ?t
+  "Timestamp."
+  (ignore room session)
+  (propertize (format-time-string ement-room-timestamp-format ;; Timestamps are in milliseconds.
+                                  (/ (ement-event-origin-server-ts event) 1000))
+              'face 'ement-room-timestamp
+              'help-echo (format-time-string "%Y-%m-%d %H:%M:%S"
+                                             (/ (ement-event-origin-server-ts event) 1000))))
+
+(defconst ement-room-variable-pitch-face (or (and (facep 'shr-text) 'shr-text)
+                                             'variable-pitch)
+  "May be used when formatting plain-text messages.
+
+If user option `ement-room-use-variable-pitch' is non-nil, this
+face is applied to plain-text messages for visual consistency
+with HTML messages (which will be rendered by shr.el with
+`shr-use-fonts' enabled).
+
+The `shr-text' face was added in Emacs 29.1.  Prior to that,
+shr.el used the `variable-pitch' face directly.")
+
+(defun ement-room--event-body-face (event room session)
+  "Return face definition for EVENT in ROOM on SESSION."
+  (ignore room)  ;; Unused for now, but keeping for consistency.
+  ;; This used to be a macro in --format-message, which is probably better for
+  ;; performance, but using a function is clearer, and avoids premature optimization.
+  (pcase-let* (((cl-struct ement-event sender
+                           (content (map msgtype format ('m.new_content new-content)))
+                           (unsigned (map ('redacted_by unsigned-redacted-by)))
+                           (local (map ('redacted-by local-redacted-by))))
+                event)
+               ((cl-struct ement-user (id sender-id)) sender)
+               ((cl-struct ement-session user) session)
+               ((cl-struct ement-user (id user-id)) user)
+               (self-message-p (equal sender-id user-id))
+               (type-face (pcase msgtype
+                            ("m.emote" 'ement-room-message-emote)
+                            (_ 'ement-room-message-text)))
+               (context-face (cond (self-message-p
+                                    'ement-room-self-message)
+                                   ((or (ement-room--event-mentions-user-p event user)
+                                        (ement--event-mentions-room-p event))
+                                    'ement-room-mention)))
+               (prism-color (unless self-message-p
+                              (when (eq 'both ement-room-prism)
+                                (or (ement-user-message-color sender)
+                                    (setf (ement-user-message-color sender)
+                                          (let ((message-color (color-desaturate-name (ement--user-color sender)
+                                                                                      ement-room-prism-message-desaturation)))
+                                            (if (ement--color-dark-p (color-name-to-rgb (face-background 'default)))
+                                                (color-lighten-name message-color ement-room-prism-message-lightening)
+                                              (color-darken-name message-color ement-room-prism-message-lightening))))))))
+               (redacted-face (when (or local-redacted-by unsigned-redacted-by)
+                                'ement-room-redacted))
+               ;; For visual consistency, apply the variable-pitch `shr-text' face to
+               ;; non-HTML messages when `ement-room-use-variable-pitch' is non-nil.
+               ;; (HTML messages are fontified by shr itself.)
+               (shr-text-face (when (and ement-room-use-variable-pitch
+                                         (not (equal (or format (alist-get 'format new-content))
+                                                     "org.matrix.custom.html")))
+                                ement-room-variable-pitch-face))
+               (body-face (list :inherit (delq nil (list redacted-face context-face type-face shr-text-face)))))
+    (if prism-color
+        (plist-put body-face :foreground prism-color)
+      body-face)))
+
+(defun ement-room--add-member-face (string room)
+  "Add member faces in ROOM to STRING.
+If STRING begins with the name of a member in ROOM followed by a
+colon or comma (as if STRING is a message addressing that
+member), apply that member's displayname color face to that part
+of the string.
+
+Note that, if ROOM has no buffer, STRING is returned unchanged."
+  ;; This only looks for a member name at the beginning of the string.  It would be neat to add
+  ;; colors to every member mentioned in a message, but that would probably not perform well.
+
+  ;; NOTE: This function may be called by `ement-notify' functions even when the room has
+  ;; no buffer, and this function is designed to use events in a room buffer to more
+  ;; quickly find the data it needs, so, for now, if the room has no buffer, we return
+  ;; STRING unchanged.
+  (pcase-let (((cl-struct ement-room (local (map buffer))) room))
+    (if (buffer-live-p buffer)
+        (save-match-data
+          ;; This function may be called from a chain of others that use the match data, so
+          ;; rather than depending on all of them to save the match data, we do it here.
+          ;; FIXME: Member names containing spaces aren't matched.  Can this even be fixed reasonably?
+          (when (string-match (rx bos (group (1+ (not blank))) (or ":" ",") (1+ blank)) string)
+            (when-let* ((member-name (match-string 1 string))
+                        ;; HACK: Since we don't currently keep a list of all
+                        ;; members in a room, we look to see if this displayname
+                        ;; has any mentions in the room so far.
+                        (user (save-match-data
+                                (with-current-buffer buffer
+                                  (save-excursion
+                                    (goto-char (point-min))
+                                    (cl-labels ((found-sender-p (ewoc-data)
+                                                  (when (ement-event-p ewoc-data)
+                                                    (equal member-name
+                                                           (gethash (ement-event-sender ewoc-data) (ement-room-displaynames room))))))
+                                      (cl-loop with regexp = (regexp-quote member-name)
+                                               while (re-search-forward regexp nil t)
+                                               ;; NOTE: I don't know why, but sometimes the regexp
+                                               ;; search ends on a non-event line, like a timestamp
+                                               ;; header, so for now we just try to handle that case.
+                                               for maybe-event = (ewoc-data (ewoc-locate ement-ewoc))
+                                               when (found-sender-p maybe-event)
+                                               return (ement-event-sender maybe-event)))))))
+                        (prism-color (or (ement-user-color user)
+                                         (setf (ement-user-color user)
+                                               (ement-room--user-color user)))))
+              (add-face-text-property (match-beginning 1) (match-end 1)
+                                      (list :foreground prism-color) nil string))))
+      ;; Room has no buffer: return STRING as-is.
+      string)))
+
+;;;; Bookmark support
+
+;; Especially useful with Burly: <https://github.com/alphapapa/burly.el>
+
+(require 'bookmark)
+
+(defun ement-room-bookmark-make-record ()
+  "Return a bookmark record for the current `ement-room' buffer."
+  (pcase-let* (((cl-struct ement-room (id room-id) canonical-alias display-name) ement-room)
+               ((cl-struct ement-session user) ement-session)
+               ((cl-struct ement-user (id session-id)) user))
+    ;; MAYBE: Support bookmarking specific events in a room.
+    (list (concat "Ement room: " display-name " (" canonical-alias ")")
+          (cons 'session-id session-id)
+          (cons 'room-id room-id)
+          (cons 'handler #'ement-room-bookmark-handler))))
+
+(defun ement-room-bookmark-handler (bookmark)
+  "Show Ement room buffer for BOOKMARK."
+  (pcase-let* ((`(,_name . ,(map session-id room-id)) bookmark)
+               (session (ement-aprog1
+                            (alist-get session-id ement-sessions nil nil #'equal)
+                          (unless it
+                            ;; MAYBE: Automatically connect.
+                            (user-error "Session %s not connected: call `ement-connect' first" session-id))))
+               (room (ement-aprog1
+                         (ement-afirst (equal room-id (ement-room-id it))
+                           (ement-session-rooms session))
+                       (cl-assert it nil "Room %S not found on session %S" room-id session-id))))
+    (ement-view-room room session)
+    ;; HACK: Put point at the end of the room buffer.  This seems unusually difficult,
+    ;; apparently because the bookmark library itself moves point after jumping to a
+    ;; bookmark.  My attempts at setting the buffer's and window's points after calling
+    ;; `ement-view-room' have had no effect.  `bookmark-after-jump-hook' sounds ideal, but
+    ;; it does not seem to actually get run, so we use a timer that runs immediately after
+    ;; `bookmark-jump' returns.
+    (run-at-time nil nil (lambda ()
+                           (goto-char (point-max))))))
+
+;;;; Commands
+
+(defun ement-room-override-name (name room session)
+  "Set display NAME override for ROOM on SESSION.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room.  If NAME is the empty string, remove
+the override.
+
+Sets account-data event of type
+\"org.matrix.msc3015.m.room.name.override\".  This name is only
+used by clients that respect this proposed override.  See
+<https://github.com/matrix-org/matrix-spec-proposals/pull/3015#issuecomment-1451017296>."
+  (interactive
+   (ement-with-room-and-session
+     (let* ((prompt (format "Set name override (%s): " (ement--format-room ement-room)))
+            (name (read-string prompt nil nil (ement-room-display-name ement-room))))
+       (list name ement-room ement-session))))
+  (ement-put-account-data session "org.matrix.msc3015.m.room.name.override"
+    (if (string-empty-p name)
+        ;; `json-encode' wants an empty hash table to represent an empty map.  And
+        ;; apparently there's no way to DELETE account-data events, so we have to re-PUT
+        ;; it with empty content.
+        (make-hash-table)
+      (ement-alist "name" name))
+    :room room))
+
+(defun ement-room-flush-colors ()
+  "Flush generated username/message colors.
+Also, redisplay events in all open buffers.  The colors will be
+regenerated according to the current background color.  Helpful
+when switching themes or adjusting `ement-prism' options."
+  (interactive)
+  (cl-loop for user being the hash-values of ement-users
+           do (setf (ement-user-color user) nil
+                    (ement-user-message-color user) nil))
+  (dolist (buffer (buffer-list))
+    (when (eq 'ement-room-mode (buffer-local-value 'major-mode buffer))
+      (with-current-buffer buffer
+        (let ((window-start (when (get-buffer-window buffer)
+                              (window-start (get-buffer-window buffer)))))
+          (save-excursion
+            (ewoc-refresh ement-ewoc))
+          (when window-start
+            (setf (window-start (get-buffer-window buffer)) window-start))))))
+  ;; Flush notify-background-color colors.
+  (cl-loop for (_id . session) in ement-sessions
+           do (cl-loop for room in (ement-session-rooms session)
+                       do (setf (alist-get 'notify-background-color (ement-room-local room)) nil)))
+  ;; NOTE: The notifications buffer can't be refreshed because each event is from a
+  ;; different room, and the `ement-room' variable is unset in the buffer.
+
+  ;; (when-let (buffer (get-buffer "*Ement Notifications*"))
+  ;;   (with-current-buffer buffer
+  ;;     (ewoc-refresh ement-ewoc)))
+  )
+
+(defun ement-room-browse-url (url &rest args)
+  "Browse URL, using Ement for matrix.to URLs when possible.
+Otherwise, fall back to `browse-url'.  When called outside of an
+`ement-room' buffer, the variable `ement-session' must be bound
+to the session in which to look for URL's room and event.  ARGS
+are passed to `browse-url'."
+  (interactive)
+  (when (string-match ement-room-matrix.to-url-regexp url)
+    (let* ((room-id (when (string-prefix-p "!" (match-string 1 url))
+                      (match-string 1 url)))
+           (room-alias (when (string-prefix-p "#" (match-string 1 url))
+                         (match-string 1 url)))
+           (event-id (match-string 2 url))
+           (room (when (or
+                        ;; Compare with current buffer's room.
+                        (and room-id (equal room-id (ement-room-id ement-room)))
+                        (and room-alias (equal room-alias (ement-room-canonical-alias ement-room)))
+                        ;; Compare with other rooms on session.
+                        (and room-id (cl-find room-id (ement-session-rooms ement-session)
+                                              :key #'ement-room-id))
+                        (and room-alias (cl-find room-alias (ement-session-rooms ement-session)
+                                                 :key #'ement-room-canonical-alias)))
+                   ement-room)))
+      (if room
+          (progn
+            ;; Found room in current session: view it and find the event.
+            (ement-view-room room ement-session)
+            (when event-id
+              (ement-room-find-event event-id)))
+        ;; Room not joined: offer to join it or load link in browser.
+        (pcase-exhaustive
+            (cadr (ement--read-multiple-choice
+                   (format "Room <%s> not joined on current session.  Join it, or load link with browser?"
+                           (or room-alias room-id))
+                   '((?j "join" "Join room in ement.el")
+                     (?w "web browser" "Open URL in web browser"))
+                   "\
+You are not currently joined to that room.  You can either join the room
+in ement.el, or visit the link URL in your web browser."))
+          ("join"
+           (ement-join-room (or room-alias room-id) ement-session
+                            :then (when event-id
+                                    (lambda (room session)
+                                      (ement-view-room room session)
+                                      (ement-room-find-event event-id)))))
+          ("web browser"
+           (let ((handler (cons ement-room-matrix.to-url-regexp #'ement-room-browse-url)))
+             ;; Note that `browse-url-handlers' was added in 28.1;
+             ;; prior to that `browse-url-browser-function' served double-duty.
+             ;; TODO: Remove compat code when requiring Emacs >=28.
+             ;; (See also `ement-room-mode'.)
+             (cond ((boundp 'browse-url-handlers)
+                    (let ((browse-url-handlers (remove handler browse-url-handlers)))
+                      (apply #'browse-url url args)))
+                   ((consp browse-url-browser-function)
+                    (let ((browse-url-browser-function (remove handler browse-url-browser-function)))
+                      (apply #'browse-url url args)))
+                   (t
+                    (apply #'browse-url url args))))))))))
+
+(defun ement-room-find-event (event-id)
+  "Go to EVENT-ID in current buffer."
+  (interactive)
+  (cl-labels ((goto-event (event-id)
+                (push-mark)
+                (goto-char
+                 (ewoc-location
+                  (ement-room--ewoc-last-matching ement-ewoc
+                    (lambda (data)
+                      (and (ement-event-p data)
+                           (equal event-id (ement-event-id data)))))))))
+    (if (or (cl-find event-id (ement-room-timeline ement-room)
+                     :key #'ement-event-id :test #'equal)
+            (cl-find event-id (ement-room-state ement-room)
+                     :key #'ement-event-id :test #'equal))
+        ;; Found event in timeline: it should be in the EWOC, so go to it.
+        (goto-event event-id)
+      ;; Event not found in timeline: try to retro-load it.
+      (message "Event %s not seen in current room.  Looking in history..." event-id)
+      (let ((room ement-room))
+        (ement-room-retro-to ement-room ement-session event-id
+          ;; TODO: Add an ELSE argument to `ement-room-retro-to' and use it to give
+          ;; a useful error here.
+          :then (lambda ()
+                  (with-current-buffer (alist-get 'buffer (ement-room-local room))
+                    (goto-event event-id))))))))
+
+(defun ement-room-set-composition-format (&optional localp)
+  "Set message composition format.
+If LOCALP (interactively, with prefix), set in current room's
+buffer.  Sets `ement-room-send-message-filter'."
+  (interactive (list current-prefix-arg))
+  (let* ((formats (list (cons "Plain-text" nil)
+                        (cons "Org-mode" #'ement-room-send-org-filter)))
+         (selected-name (completing-read "Composition format: " formats nil 'require-match nil nil
+                                         ement-room-send-message-filter))
+         (selected-filter (alist-get selected-name formats nil nil #'equal)))
+    (if localp
+        (setq-local ement-room-send-message-filter selected-filter)
+      (setq ement-room-send-message-filter selected-filter))))
+
+(defun ement-room-set-message-format (format-spec)
+  "Set `ement-room-message-format-spec' in current buffer to FORMAT-SPEC.
+Interactively, prompts for the spec using suggested values of the
+option."
+  (interactive (list (let* ((choices (thread-last
+                                       (get 'ement-room-message-format-spec 'custom-type)
+                                       cdr
+                                       (seq-filter (lambda (it)
+                                                     (eq (car it) 'const)))
+                                       (mapcar (lambda (it)
+                                                 (cons (nth 2 it) (nth 3 it))))))
+                            (choice (completing-read "Format: " (mapcar #'car choices))))
+                       (or (alist-get choice choices nil nil #'equal)
+                           choice))))
+  (cl-assert ement-ewoc)
+  (ement-room-message-format-spec-setter 'ement-room-message-format-spec format-spec 'local)
+  (setf left-margin-width ement-room-left-margin-width
+        right-margin-width ement-room-right-margin-width)
+  (set-window-margins nil left-margin-width right-margin-width)
+  (if ement-room-sender-in-headers
+      (ement-room--insert-sender-headers ement-ewoc)
+    (ewoc-filter ement-ewoc (lambda (node-data)
+                              ;; Return non-nil for nodes that should stay.
+                              (not (ement-user-p node-data)))))
+  (ewoc-refresh ement-ewoc))
+
+(defun ement-room-set-topic (session room topic)
+  "Set ROOM's TOPIC on SESSION.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room."
+  (interactive
+   (ement-with-room-and-session
+     (list ement-session ement-room
+           (read-string (format "New topic (%s): "
+                                (ement-room-display-name ement-room))
+                        (ement-room-topic ement-room) nil nil 'inherit-input-method))))
+  (pcase-let* (((cl-struct ement-room (id room-id) display-name) room)
+               (endpoint (format "rooms/%s/state/m.room.topic" (url-hexify-string room-id)))
+               (data (ement-alist "topic" topic)))
+    (ement-api session endpoint :method 'put :data (json-encode data)
+      :then (lambda (_data)
+              (message "Topic set (%s): %s" display-name topic)))))
+
+(cl-defun ement-room-send-file (file body room session &key (msgtype "m.file"))
+  "Send FILE to ROOM on SESSION, using message BODY and MSGTYPE.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room."
+  ;; TODO: Support URLs to remote files.
+  (interactive
+   (ement-with-room-and-session
+     (ement-room-with-typing
+       (let* ((file (read-file-name (format "Send file (%s): " (ement-room-display-name ement-room))
+                                    nil nil 'confirm))
+              (body (ement-room-read-string
+                     (format "Message body (%s): " (ement-room-display-name ement-room))
+                     (file-name-nondirectory file) 'file-name-history nil 'inherit-input-method)))
+         (list file body ement-room ement-session)))))
+  ;; NOTE: The typing notification won't be quite right, because it'll be canceled while waiting
+  ;; for the file to upload.  It would be awkward to handle that, so this will do for now.
+  (when (yes-or-no-p (format "Upload file %S to room %S? "
+                             file (ement-room-display-name room)))
+    (pcase-let* ((filename (file-name-nondirectory file))
+                 (extension (or (file-name-extension file) ""))
+                 (mime-type (mailcap-extension-to-mime extension))
+                 (data `(file ,file))
+                 (size (file-attribute-size (file-attributes file))))
+      (ement-upload session :data data :filename filename :content-type mime-type
+        :then (lambda (data)
+                (message "Uploaded file %S.  Sending message..." file)
+                (pcase-let* (((map ('content_uri content-uri)) data)
+                             ((cl-struct ement-room (id room-id)) room)
+                             (endpoint (format "rooms/%s/send/%s/%s" (url-hexify-string room-id)
+                                               "m.room.message" (ement--update-transaction-id session)))
+                             ;; TODO: Image height/width (maybe not easy to get in Emacs).
+                             (content (ement-alist "msgtype" msgtype
+                                                   "url" content-uri
+                                                   "body" body
+                                                   "filename" filename
+                                                   "info" (ement-alist "mimetype" mime-type
+                                                                       "size" size))))
+                  (ement-api session endpoint :method 'put :data (json-encode content)
+                    :then (apply-partially #'ement-room-send-event-callback
+                                           :room room :session session :content content :data))))))))
+
+(defun ement-room-send-image (file body room session)
+  "Send image FILE to ROOM on SESSION, using message BODY.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room."
+  ;; TODO: Support URLs to remote files.
+  (interactive
+   (ement-with-room-and-session
+     (ement-room-with-typing
+       (let* ((file (read-file-name (format "Send image file (%s): " (ement-room-display-name ement-room))
+                                    nil nil 'confirm))
+              (body (ement-room-read-string
+                     (format "Message body (%s): " (ement-room-display-name ement-room))
+                     (file-name-nondirectory file) 'file-name-history nil 'inherit-input-method)))
+         (list file body ement-room ement-session)))))
+  (ement-room-send-file file body room session :msgtype "m.image"))
+
+(defun ement-room-dnd-upload-file (uri _action)
+  "Upload the file as specified by URI to the current room."
+  (when-let ((file (dnd-get-local-file-name uri t)))
+    (ement-room-send-file file (file-name-nondirectory file) ement-room ement-session
+                          :msgtype (if (string-prefix-p "image/" (mailcap-file-name-to-mime-type file))
+                                       "m.image"
+                                     "m.file"))))
+
+(cl-defun ement-room-join (id-or-alias session &key then)
+  "Join room by ID-OR-ALIAS on SESSION.
+THEN may be a function to call after joining the room (and when
+`ement-room-join-view-buffer' is non-nil, after viewing the room
+buffer).  It receives two arguments, the room and the session."
+  (interactive (list (read-string "Join room (ID or alias): ")
+                     (or ement-session
+                         (ement-complete-session))))
+  (cl-assert id-or-alias) (cl-assert session)
+  (unless (string-match-p
+           ;; According to tulir in #matrix-dev:matrix.org, ": is not
+           ;; allowed in the localpart, all other valid unicode is
+           ;; allowed.  (user ids and room ids are the same over
+           ;; federation).  it's mostly a lack of validation in
+           ;; synapse (arbitrary unicode isn't intentionally allowed,
+           ;; but it's not disallowed either)".  See
+           ;; <https://matrix.to/#/!jxlRxnrZCsjpjDubDX:matrix.org/$Cnb53UQdYnGFizM49Aje_Xs0BxVdt-be7Dnm7_k-0ho>.
+           (rx bos (or "#" "!") (1+ (not (any ":")))
+               ":" (1+ (or alnum (any "-."))))
+           id-or-alias)
+    (user-error "Invalid room ID or alias (use, e.g. \"#ROOM-ALIAS:SERVER\")"))
+  (let ((endpoint (format "join/%s" (url-hexify-string id-or-alias))))
+    (ement-api session endpoint :method 'post :data ""
+      :then (lambda (data)
+              ;; NOTE: This generates a symbol and sets its function value to a lambda
+              ;; which removes the symbol from the hook, removing itself from the hook.
+              ;; TODO: When requiring Emacs 27, use `letrec'.
+              (pcase-let* (((map ('room_id room-id)) data)
+                           (then-fns (delq nil
+                                           (list (when ement-room-join-view-buffer
+                                                   (lambda (room session)
+                                                     (ement-view-room room session)))
+                                                 then)))
+                           (then-fn-symbol (gensym (format "ement-join-%s" id-or-alias)))
+                           (then-fn (lambda (session)
+                                      (when-let ((room (cl-loop for room in (ement-session-rooms session)
+                                                                when (equal room-id (ement-room-id room))
+                                                                return room)))
+                                        ;; In case the join event is not in this next sync
+                                        ;; response, make sure the room is found before removing
+                                        ;; the function and joining the room.
+                                        (remove-hook 'ement-sync-callback-hook then-fn-symbol)
+                                        ;; FIXME: Probably need to unintern the symbol.
+                                        (dolist (fn then-fns)
+                                          (funcall fn room session))))))
+                (setf (symbol-function then-fn-symbol) then-fn)
+                (add-hook 'ement-sync-callback-hook then-fn-symbol)
+                (message "Joined room: %s" room-id)))
+      :else (lambda (plz-error)
+              (pcase-let* (((cl-struct plz-error response) plz-error)
+                           ((cl-struct plz-response status body) response)
+                           ((map error) (json-read-from-string body)))
+                (pcase status
+                  ((or 403 429) (error "Unable to join room %s: %s" id-or-alias error))
+                  (_ (error "Unable to join room %s: %s %S" id-or-alias status plz-error))))))))
+(defalias 'ement-join-room #'ement-room-join)
+
+(defun ement-room-goto-prev ()
+  "Go to the previous message in buffer."
+  (interactive)
+  (if (>= (point) (- (point-max) 2))
+      ;; Point is actually on the last event, but it doesn't appear to be: move point to
+      ;; the beginning of that event.
+      (ewoc-goto-node ement-ewoc (ement-room--ewoc-last-matching ement-ewoc #'ement-event-p))
+    ;; Go to previous event.
+    (ement-room-goto-next :next-fn #'ewoc-prev)))
+
+(cl-defun ement-room-goto-next (&key (next-fn #'ewoc-next))
+  "Go to the next message in buffer.
+NEXT-FN is passed to `ement-room--ewoc-next-matching', which
+see."
+  (interactive)
+  (if-let (node (ement-room--ewoc-next-matching ement-ewoc
+                  (ewoc-locate ement-ewoc) #'ement-event-p next-fn))
+      (ewoc-goto-node ement-ewoc node)
+    (if (= (point) (point-max))
+        ;; Already at end of buffer: signal error.
+        (user-error "End of events")
+      ;; Go to end-of-buffer so new messages will auto-scroll.
+      (goto-char (point-max)))))
+
+(defun ement-room-scroll-down-command ()
+  "Scroll down, and load NUMBER earlier messages when at top."
+  (interactive)
+  (condition-case _err
+      (scroll-down nil)
+    (beginning-of-buffer
+     (call-interactively #'ement-room-retro))))
+
+(defun ement-room-mwheel-scroll (event)
+  "Scroll according to EVENT, loading earlier messages when at top."
+  (interactive "e")
+  (with-selected-window (posn-window (event-start event))
+    (mwheel-scroll event)
+    (when (= (point-min) (window-start))
+      (call-interactively #'ement-room-retro))))
+
+;; TODO: Unify these retro-loading functions.
+
+(cl-defun ement-room-retro
+    (room session number &key buffer
+          (then (apply-partially #'ement-room-retro-callback room session)))
+  ;; FIXME: Naming things is hard.
+  "Retrieve NUMBER older messages in ROOM on SESSION."
+  (interactive (list ement-room ement-session
+                     (cl-typecase current-prefix-arg
+                       (null ement-room-retro-messages-number)
+                       (list (read-number "Number of messages: "))
+                       (number current-prefix-arg))
+                     :buffer (current-buffer)))
+  (unless ement-room-retro-loading
+    (pcase-let* (((cl-struct ement-room id prev-batch) room)
+                 (endpoint (format "rooms/%s/messages" (url-hexify-string id))))
+      ;; We use a timeout of 30, because sometimes the server can take a while to
+      ;; respond, especially if loading, e.g. hundreds or thousands of events.
+      (ement-api session endpoint :timeout 30
+        :params (remq nil
+                      (list (when prev-batch
+                              (list "from" prev-batch))
+                            (list "dir" "b")
+                            (list "limit" (number-to-string number))
+                            (list "filter" (json-encode ement-room-messages-filter))))
+        :then then
+        :else (lambda (plz-error)
+                (when buffer
+                  (with-current-buffer buffer
+                    (setf ement-room-retro-loading nil)))
+                (signal 'ement-api-error (list (format "Loading %s earlier messages failed" number)
+                                               plz-error))))
+      (message "Loading %s earlier messages..." number)
+      (setf ement-room-retro-loading t))))
+
+(cl-defun ement-room-retro-to (room session event-id &key then (batch-size 100) (limit 1000))
+  "Retrieve messages in ROOM on SESSION back to EVENT-ID.
+When event is found, call function THEN.  Search in batches of
+BATCH-SIZE events up to a total of LIMIT."
+  (declare (indent defun))
+  (cl-assert
+   ;; Ensure the event hasn't already been retrieved.
+   (not (gethash event-id (ement-session-events session))))
+  (let* ((total-retrieved 0)
+         ;; TODO: Use letrec someday.
+         (callback-symbol (gensym "ement-room-retro-to-callback-"))
+         (callback (lambda (data)
+                     (ement-room-retro-callback room session data)
+                     (if (gethash event-id (ement-session-events session))
+                         (progn
+                           (message "Found event %S" event-id)
+                           ;; FIXME: Probably need to unintern the symbol.
+                           (when then
+                             (funcall then)))
+                       ;; FIXME: What if it hits the beginning of the timeline?
+                       (if (>= (cl-incf total-retrieved batch-size) limit)
+                           (message "%s older events retrieved without finding event %S"
+                                    limit event-id)
+                         (message "Looking back for event %S (%s/%s events retrieved)"
+                                  event-id total-retrieved limit)
+                         (ement-room-retro room session  batch-size
+                                           :buffer (alist-get 'buffer (ement-room-local room))
+                                           :then callback-symbol))))))
+    (fset callback-symbol callback)
+    (ement-room-retro room session batch-size
+                      :buffer (alist-get 'buffer (ement-room-local room))
+                      :then callback-symbol)))
+
+(cl-defun ement-room-retro-to-token (room session from to
+                                          &key (batch-size 100) (limit 1000))
+  "Retrieve messages in ROOM on SESSION back from FROM to TO.
+Retrieve batches of BATCH-SIZE up to total LIMIT.  FROM and TO
+are sync batch tokens.  Used for, e.g. filling gaps in
+\"limited\" sync responses."
+  ;; NOTE: We don't set `ement-room-retro-loading' since the room may
+  ;; not have a buffer.  This could theoretically allow a user to
+  ;; overlap manual scrollback-induced loading of old messages with
+  ;; this gap-filling loading, but that shouldn't matter, and probably
+  ;; would be very rare, anyway.
+  (pcase-let* (((cl-struct ement-room id) room)
+               (endpoint (format "rooms/%s/messages" (url-hexify-string id)))
+               (then
+                (lambda (data)
+                  (ement-room-retro-callback room session data
+                                             :set-prev-batch nil)
+                  (pcase-let* (((map end chunk) data))
+		    ;; HACK: Comparing the END and TO tokens ought to
+		    ;; work for determining whether we are done
+		    ;; filling, but it isn't (maybe the server isn't
+		    ;; returning the TO token as END when there are no
+		    ;; more events), so instead we'll check the length
+		    ;; of the chunk.
+                    (unless (< (length chunk) batch-size)
+                      ;; More pages remain to be loaded.
+                      (let ((remaining-limit (- limit batch-size)))
+                        (if (not (> remaining-limit 0))
+                            ;; FIXME: This leaves a gap if it's larger than 1,000 events.
+                            ;; Probably, the limit should be configurable, but it would be good
+                            ;; to find some way to remember the gap and fill it if the user
+                            ;; scrolls to it later (although that might be very awkward to do).
+                            (display-warning 'ement-room-retro-to-token
+                                             (format "Loaded events in %S (%S) without filling gap; not filling further"
+                                                     (ement-room-display-name room)
+                                                     (or (ement-room-canonical-alias room)
+                                                         (ement-room-id room))))
+			  ;; FIXME: Remove this message after further testing.
+                          (message "Ement: Continuing to fill gap in %S (%S) (remaining limit: %s)"
+                                   (ement-room-display-name room)
+                                   (or (ement-room-canonical-alias room)
+                                       (ement-room-id room))
+                                   remaining-limit)
+                          (ement-room-retro-to-token
+                           room session end to :limit remaining-limit))))))))
+    ;; FIXME: Remove this message after further testing.
+    (message "Ement: Filling gap in %S (%S)"
+	     (ement-room-display-name room)
+             (or (ement-room-canonical-alias room)
+                 (ement-room-id room)))
+    (ement-api session endpoint :timeout 30
+      :params (list (list "from" from)
+                    (list "to" to)
+                    (list "dir" "b")
+                    (list "limit" (number-to-string batch-size))
+                    (list "filter" (json-encode ement-room-messages-filter)))
+      :then then
+      :else (lambda (plz-error)
+              (signal 'ement-api-error
+                      (list (format "Filling gap in %S (%S) failed"
+                                    (ement-room-display-name room)
+                                    (or (ement-room-canonical-alias room)
+                                        (ement-room-id room)))
+                            plz-error))))))
+
+;; NOTE: `declare-function' doesn't recognize cl-defun forms, so this declaration doesn't work.
+(declare-function ement--sync "ement.el" t t)
+(defun ement-room-sync (session &optional force)
+  "Sync SESSION (interactively, current buffer's).
+If FORCE (interactively, with prefix), cancel any outstanding
+sync requests.  Also, update any room list buffers."
+  (interactive (list ement-session current-prefix-arg))
+  (ement--sync session :force force)
+  (cl-loop for buffer in (buffer-list)
+           when (member (buffer-local-value 'major-mode buffer)
+                        '(ement-room-list-mode ement-tabulated-room-list-mode))
+           do (with-current-buffer buffer
+                (revert-buffer))))
+
+(defun ement-room-view-event (event)
+  "Pop up buffer showing details of EVENT (interactively, the one at point).
+EVENT should be an `ement-event' or `ement-room-membership-events' struct."
+  (interactive (list (ewoc-data (ewoc-locate ement-ewoc))))
+  (require 'pp)
+  (cl-labels ((event-alist (event)
+                (ement-alist :id (ement-event-id event)
+                             :sender (ement-user-id (ement-event-sender event))
+                             :content (ement-event-content event)
+                             :origin-server-ts (ement-event-origin-server-ts event)
+                             :type (ement-event-type event)
+                             :state-key (ement-event-state-key event)
+                             :unsigned (ement-event-unsigned event)
+                             :receipts (ement-event-receipts event)
+                             :local (ement-event-local event))))
+    (let* ((buffer-name (format "*Ement event: %s*"
+                                (cl-typecase event
+                                  (ement-room-membership-events "[multiple events]")
+                                  (ement-event (ement-event-id event)))))
+           (event (cl-typecase event
+                    (ement-room-membership-events
+                     (mapcar #'event-alist (ement-room-membership-events-events event)))
+                    (ement-event (event-alist event))))
+           (inhibit-read-only t))
+      (with-current-buffer (get-buffer-create buffer-name)
+        (erase-buffer)
+        (pp event (current-buffer))
+        (view-mode)
+        (pop-to-buffer (current-buffer))))))
+
+(defun ement-room-dispatch-new-message ()
+  "Write a new message in accordance with `ement-room-compose-method'."
+  (interactive)
+  (call-interactively
+   (cl-case ement-room-compose-method
+     (compose-buffer 'ement-room-compose-message)
+     (t 'ement-room-send-message))))
+
+(defun ement-room-dispatch-new-message-alt ()
+  "Inverse of `ement-room-dispatch-new-message'."
+  (interactive)
+  (call-interactively
+   (cl-case ement-room-compose-method
+     (compose-buffer 'ement-room-send-message)
+     (t 'ement-room-compose-message))))
+
+(defun ement-room-dispatch-edit-message ()
+  "Edit a message in accordance with `ement-room-compose-method'."
+  (interactive)
+  (call-interactively
+   (cl-case ement-room-compose-method
+     (compose-buffer 'ement-room-compose-edit)
+     (t 'ement-room-edit-message))))
+
+(defun ement-room-dispatch-reply-to-message ()
+  "Reply to a message in accordance with `ement-room-compose-method'."
+  (interactive)
+  (call-interactively
+   (cl-case ement-room-compose-method
+     (compose-buffer 'ement-room-compose-reply)
+     (t 'ement-room-write-reply))))
+
+(defun ement-room-dispatch-send-message ()
+  "Send a message in accordance with `ement-room-compose-method'."
+  (interactive)
+  (call-interactively
+   (cl-case ement-room-compose-method
+     (compose-buffer #'ement-room-compose-send-direct)
+     (t #'ement-room-compose-send))))
+
+(cl-defun ement-room-send-message (room session &key body formatted-body replying-to-event)
+  "Send message to ROOM on SESSION with BODY and FORMATTED-BODY.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room.
+
+REPLYING-TO-EVENT may be an event the message is in reply to; the
+message will reference it appropriately.
+
+If `ement-room-send-message-filter' is non-nil, the message's
+content alist is passed through it before sending.  This may be
+used to, e.g. process the BODY into another format and add it to
+the content (e.g. see `ement-room-send-org-filter')."
+  (interactive
+   (ement-with-room-and-session
+     (let* ((prompt (format "Send message (%s): " (ement-room-display-name ement-room)))
+            (body (ement-room-with-typing
+                    (ement-room-read-string prompt nil 'ement-room-message-history
+                                            nil 'inherit-input-method))))
+       (list ement-room ement-session :body body))))
+  (ement-send-message room session :body body :formatted-body formatted-body
+    :replying-to-event replying-to-event :filter ement-room-send-message-filter
+    :then #'ement-room-send-event-callback)
+  ;; NOTE: This assumes that the selected window is the buffer's window.  For now
+  ;; this is almost surely the case, but in the future, we might let the function
+  ;; send messages to other rooms more easily, so this assumption might not hold.
+  (when-let* ((buffer (alist-get 'buffer (ement-room-local room)))
+              (window (get-buffer-window buffer)))
+    (with-selected-window window
+      (when (>= (window-point) (ewoc-location (ewoc-nth ement-ewoc -1)))
+        ;; Point is on last event: advance it to eob so that when the event is received
+        ;; back, the window will scroll.  (This might not always be desirable, because
+        ;; the user might have point on that event for a reason, but I think in most
+        ;; cases, it will be what's expected and most helpful.)
+        (setf (window-point) (point-max))))))
+
+(cl-defun ement-room-send-emote (room session &key body)
+  "Send emote to ROOM on SESSION with BODY.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room.
+
+If `ement-room-send-message-filter' is non-nil, the message's
+content alist is passed through it before sending.  This may be
+used to, e.g. process the BODY into another format and add it to
+the content (e.g. see `ement-room-send-org-filter')."
+  (interactive
+   (ement-with-room-and-session
+     (let* ((prompt (format "Send emote (%s): " (ement-room-display-name ement-room)))
+            (body (ement-room-with-typing
+                    (ement-room-read-string prompt nil 'ement-room-emote-history
+                                            nil 'inherit-input-method))))
+       (list ement-room ement-session :body body))))
+  (cl-assert (not (string-empty-p body)))
+  (pcase-let* (((cl-struct ement-room (id room-id) (local (map buffer))) room)
+               (window (when buffer (get-buffer-window buffer)))
+               (endpoint (format "rooms/%s/send/m.room.message/%s" (url-hexify-string room-id)
+                                 (ement--update-transaction-id session)))
+               (content (ement-aprog1
+                            (ement-alist "msgtype" "m.emote"
+                                         "body" body))))
+    (when ement-room-send-message-filter
+      (setf content (funcall ement-room-send-message-filter content room)))
+    (ement-api session endpoint :method 'put :data (json-encode content)
+      :then (apply-partially #'ement-room-send-event-callback :room room :session session
+                             :content content :data)) ;; Data is added when calling back.
+    ;; NOTE: This assumes that the selected window is the buffer's window.  For now
+    ;; this is almost surely the case, but in the future, we might let the function
+    ;; send messages to other rooms more easily, so this assumption might not hold.
+    (when window
+      (with-selected-window window
+        (when (>= (window-point) (ewoc-location (ewoc-nth ement-ewoc -1)))
+          ;; Point is on last event: advance it to eob so that when the event is received
+          ;; back, the window will scroll.  (This might not always be desirable, because
+          ;; the user might have point on that event for a reason, but I think in most
+          ;; cases, it will be what's expected and most helpful.)
+          (setf (window-point) (point-max)))))))
+
+(cl-defun ement-room-send-event-callback (&key data room session content)
+  "Callback for event-sending functions.
+DATA is the parsed JSON object.  If DATA's event ID is already
+present in SESSION's events table, show an appropriate warning
+mentioning the ROOM and CONTENT."
+  (pcase-let* (((map ('event_id event-id)) data))
+    (when (and ement-room-warn-for-already-seen-messages
+               (gethash event-id (ement-session-events session)))
+      (let ((message (format "Event ID %S already seen in session %S.  This may indicate a reused transaction ID, which could mean that the event was not sent to the room (%S).  You may need to disconnect, delete the `ement-sessions-file', and connect again to start a new session.  Alternatively, this can happen if the event's sent-confirmation is received after the event itself is received in the next sync response, in which case no action is needed."
+                             event-id (ement-user-id (ement-session-user session))
+                             (ement-room-display-name room))))
+        (when content
+          (setf message (concat message (format " Event content: %S" content))))
+        (display-warning 'ement-room-send-event-callback message)))
+    (when (eq 'send ement-room-mark-rooms-read)
+      ;; Move read markers.
+      (when-let ((buffer (alist-get 'buffer (ement-room-local room))))
+        (with-current-buffer buffer
+          ;; NOTE: The new event may not exist in the buffer yet, so
+          ;; we just have to use the last one.
+          ;; FIXME: When we add local echo, this can be fixed.
+          (save-excursion
+            (goto-char (ewoc-location
+                        (ement-room--ewoc-last-matching ement-ewoc #'ement-event-p)))
+            (call-interactively #'ement-room-mark-read)))))))
+
+(defun ement-room-edit-message-prepare ()
+  "Bindings for `ement-room-edit-message' and `ement-room-compose-edit'."
+  (cl-assert ement-ewoc) (cl-assert ement-session)
+  ;; Bindings for... `event' (from ewoc).
+  (pcase-let* ((event (ewoc-data (ewoc-locate ement-ewoc)))
+               ;; `user' (from ement-session).
+               ((cl-struct ement-session user) ement-session)
+               ;; `sender', `body' (from event).
+               ((cl-struct ement-event sender (content (map body))) event))
+    (unless (equal (ement-user-id sender) (ement-user-id user))
+      (user-error "You may only edit your own messages"))
+    ;; Remove any leading asterisk from the plain-text body.
+    (setf body (replace-regexp-in-string (rx bos "*" (1+ space)) "" body t t))
+    (list event body)))
+
+(defun ement-room-edit-message (event room session body)
+  "Edit EVENT in ROOM on SESSION to have new BODY.
+The message must be one sent by the local user.  If EVENT is
+itself an edit of another event, the original event is edited."
+  ;; See also `ement-room-compose-edit'.
+  (interactive (ement-room-with-highlighted-event-at (point)
+                 (cl-destructuring-bind (ement-room-editing-event body)
+                     (ement-room-edit-message-prepare)
+                   (ement-room-with-typing
+                     (let* ((prompt (format "Edit message (%s): "
+                                            (ement-room-display-name ement-room)))
+                            (body (ement-room-read-string prompt body 'ement-room-message-history
+                                                          nil 'inherit-input-method)))
+                       (when (string-empty-p body)
+                         (user-error "To delete a message, use command `ement-room-delete-message'"))
+                       (when (yes-or-no-p (format "Edit message to: %S? " body))
+                         (list ement-room-editing-event ement-room ement-session body)))))))
+  (let* ((endpoint (format "rooms/%s/send/%s/%s" (url-hexify-string (ement-room-id room))
+                           "m.room.message" (ement--update-transaction-id session)))
+         (new-content (ement-alist "body" body
+                                   "msgtype" "m.text"))
+         (_ (when ement-room-send-message-filter
+              (setf new-content (funcall ement-room-send-message-filter new-content room))))
+         (original-event (ement--original-event-for event session))
+         (content (ement-alist "msgtype" "m.text"
+                               "body" body
+                               "m.new_content" new-content
+                               "m.relates_to" (ement-alist
+                                               "rel_type" "m.replace"
+                                               "event_id" (ement-event-id original-event)))))
+    ;; Prepend the asterisk after the filter may have modified the content.  Note that the
+    ;; "m.new_content" body does not get the leading asterisk, only the "content" body,
+    ;; which is intended as a fallback.
+    (setf body (concat "* " body))
+    (ement-api session endpoint :method 'put :data (json-encode content)
+      :then (apply-partially #'ement-room-send-event-callback :room room :session session
+                             :content content :data))))
+
+(defun ement-room-delete-message (event room session &optional reason)
+  "Delete EVENT in ROOM on SESSION, optionally with REASON."
+  (interactive (ement-room-with-highlighted-event-at (point)
+                 (if (yes-or-no-p "Delete this event? ")
+                     (list (ewoc-data (ewoc-locate ement-ewoc))
+                           ement-room ement-session (read-string "Reason (optional): " nil nil nil 'inherit-input-method))
+                   ;; HACK: This isn't really an error, but is there a cleaner way to cancel?
+                   (user-error "Message not deleted"))))
+  (ement-redact (ement--original-event-for event session) room session reason))
+
+(defun ement-room-write-reply (event)
+  "Write and send a reply to EVENT.
+Interactively, to event at point."
+  ;; See also `ement-room-compose-reply'.
+  (interactive (progn (cl-assert ement-ewoc)
+                      (list (ewoc-data (ewoc-locate ement-ewoc)))))
+  (cl-assert ement-room) (cl-assert ement-session) (cl-assert (ement-event-p event))
+  (let ((ement-room-replying-to-event event))
+    (ement-room-with-highlighted-event-at (point)
+      (pcase-let* ((room ement-room)
+                   (session ement-session)
+                   (prompt (format "Send reply (%s): " (ement-room-display-name room)))
+                   (ement-room-read-string-setup-hook
+                    (lambda ()
+                      (setq-local ement-room-replying-to-event event)))
+                   (body (ement-room-with-typing
+                           (ement-room-read-string prompt nil 'ement-room-message-history
+                                                   nil 'inherit-input-method))))
+        ;; NOTE: `ement-room-send-message' looks up the original event, so we pass `event'
+        ;; as :replying-to-event.
+        (ement-room-send-message room session :body body :replying-to-event event)))))
+
+(when (assoc "emoji" input-method-alist)
+  (defun ement-room-use-emoji-input-method ()
+    "Activate the emoji input method in the current buffer."
+    (interactive)
+    (set-input-method "emoji")))
+
+(defun ement-room-send-reaction (key position &optional event)
+  "Send reaction of KEY to event at POSITION.
+KEY should be a reaction string, e.g. \"👍\".
+
+Interactively, send reaction to event at point.  The user option
+`ement-room-reaction-picker' controls how the reaction string
+is selected, or rather controls the initial mechanism, since the
+user can always cancel that command with \\[keyboard-quit] and
+choose a different one using the key bindings in
+`ement-room-reaction-map' (note that other than `insert-char',
+these all require at least version 29 of Emacs):
+
+\\{ement-room-reaction-map}"
+  (interactive
+   (let ((event (ewoc-data (ewoc-locate ement-ewoc))))
+     (unless (ement-event-p event)
+       (user-error "No event at point"))
+     (list (minibuffer-with-setup-hook
+               (lambda ()
+                 (setq-local after-change-functions
+                             (list (lambda (&rest _)
+                                     (catch 'exit
+                                       (exit-minibuffer))
+                                     (throw 'selected (minibuffer-contents)))))
+                 (use-local-map
+                  (make-composed-keymap ement-room-reaction-map (current-local-map)))
+                 (let ((enable-recursive-minibuffers t))
+                   (call-interactively ement-room-reaction-picker)))
+             (catch 'selected
+               (read-string "Reaction: ")))
+           (point))))
+  ;; SPEC: MSC2677 <https://github.com/matrix-org/matrix-doc/pull/2677>
+  ;; HACK: We could simplify this by storing the key in a text property...
+  (ement-room-with-highlighted-event-at position
+    (pcase-let* ((event (or event
+                            (ewoc-data (ewoc-locate ement-ewoc position))
+                            (user-error "No event at point")))
+                 ;; NOTE: Sadly, `face-at-point' doesn't work here because, e.g. if
+                 ;; hl-line-mode is enabled, it only returns the hl-line face.
+                 ((cl-struct ement-event (id event-id)) event)
+                 ((cl-struct ement-room (id room-id)) ement-room)
+                 (endpoint (format "rooms/%s/send/m.reaction/%s" (url-hexify-string room-id)
+                                   (ement--update-transaction-id ement-session)))
+                 (content (ement-alist "m.relates_to"
+                                       (ement-alist "rel_type" "m.annotation"
+                                                    "event_id" event-id
+                                                    "key" key))))
+      (ement-api ement-session endpoint :method 'put :data (json-encode content)
+        :then (apply-partially #'ement-room-send-event-callback
+                               :room ement-room :session ement-session :content content
+                               :data)))))
+
+(defun ement-room-toggle-reaction (key event room session)
+  "Toggle reaction of KEY to EVENT in ROOM on SESSION."
+  (interactive
+   (cl-labels
+       ((face-at-point-p (face)
+          (let ((face-at-point (get-text-property (point) 'face)))
+            (or (eq face face-at-point)
+                (and (listp face-at-point)
+                     (member face face-at-point)))))
+        (buffer-substring-while (beg pred &key (forward-fn #'forward-char))
+          "Return substring of current buffer from BEG while PRED is true."
+          (save-excursion
+            (goto-char beg)
+            (cl-loop while (funcall pred)
+                     do (funcall forward-fn)
+                     finally return (buffer-substring-no-properties beg (point)))))
+        (key-at (pos)
+          (cond ((face-at-point-p 'ement-room-reactions-key)
+                 (buffer-substring-while
+                  pos (lambda () (face-at-point-p 'ement-room-reactions-key))))
+                ((face-at-point-p 'ement-room-reactions)
+                 ;; Point is in a reaction button but after the key.
+                 (buffer-substring-while
+                  (button-start (button-at pos))
+                  (lambda () (face-at-point-p 'ement-room-reactions-key)))))))
+     (list (or (key-at (point))
+               (char-to-string (read-char-by-name "Reaction (prepend \"*\" for substring search): ")))
+           (ewoc-data (ewoc-locate ement-ewoc))
+           ement-room ement-session)))
+  (pcase-let* (((cl-struct ement-event (local (map reactions))) event)
+               ((cl-struct ement-session user) session)
+               ((cl-struct ement-user (id user-id)) user))
+    (if-let (reaction-event (cl-find-if (lambda (event)
+                                          (and (equal user-id (ement-user-id (ement-event-sender event)))
+                                               (equal key (map-nested-elt (ement-event-content event) '(m.relates_to key)))))
+                                        reactions))
+        ;; Already sent this reaction: redact it.
+        (ement-redact reaction-event room session)
+      ;; Send reaction.
+      (ement-room-send-reaction key (point)))))
+
+(defun ement-room-reaction-button-action (button)
+  "Push reaction BUTTON at point."
+  ;; TODO: Toggle reactions off with redactions (not in spec yet, but Element does it).
+  (save-excursion
+    (goto-char (button-start button))
+    (call-interactively #'ement-room-toggle-reaction)))
+
+(defun ement-room-toggle-space (room space session)
+  ;; Naming things is hard, but this seems the best balance between concision, ambiguity,
+  ;; and consistency.  The docstring is always there.  (Or there's the sci-fi angle:
+  ;; "spacing" a room...)
+  "Toggle ROOM's membership in SPACE on SESSION."
+  (interactive
+   (ement-with-room-and-session
+     :prompt-form (ement-complete-room :session ement-session
+                    :predicate (lambda (room) (not (ement--space-p room))) )
+     (pcase-let* ((prompt (format "Toggle room %S's membership in space: "
+                                  (ement--format-room ement-room)))
+                  ;; TODO: Use different face for spaces the room is already in.
+                  (`(,space ,_session) (ement-complete-room :session ement-session :prompt prompt :suggest nil
+                                         :predicate #'ement--space-p)))
+       (list ement-room space ement-session))))
+  (pcase-let* (((cl-struct ement-room (id child-id)) room)
+               (routing-server (progn
+                                 (string-match (rx (1+ (not (any ":"))) ":" (group (1+ anything))) child-id)
+                                 (match-string 1 child-id)))
+               (action (if (ement--room-in-space-p room space)
+                           'remove 'add))
+               (data (pcase action
+                       ('add (ement-alist "via" (vector
+                                                 ;; FIXME: Finish and use the routing function.
+                                                 ;; (ement--room-routing room)
+                                                 routing-server)))
+                       ('remove (make-hash-table)))))
+    (ement-put-state space "m.space.child" child-id data session
+      :then (lambda (response-data)
+              ;; It appears that the server doesn't send the new event in the next sync (at
+              ;; least, not to the client that put the state), so we must simulate receiving it.
+              (pcase-let* (((map event_id) response-data)
+                           ((cl-struct ement-session user) session)
+                           ((cl-struct ement-room (id child-id)) room)
+                           (fake-event (make-ement-event :id event_id :type "m.space.child"
+                                                         :sender user :state-key child-id
+                                                         :content (json-read-from-string (json-encode data)))))
+                (push fake-event (ement-room-timeline space))
+                (run-hook-with-args 'ement-event-hook fake-event space session))
+              (ement-message "Room %S %s space %S"
+                             (ement--format-room room)
+                             (pcase action
+                               ('add "added to")
+                               ('remove "removed from"))
+                             (ement--format-room space))))))
+
+;;;; Functions
+
+(defun ement-room-view (room session)
+  "Switch to a buffer showing ROOM on SESSION.
+Uses action `ement-view-room-display-buffer-action', which see."
+  (interactive (ement-complete-room :session (ement-complete-session) :suggest nil
+                 :predicate (lambda (room)
+                              (not (ement--space-p room)))))
+  (pcase-let* (((cl-struct ement-room (local (map buffer))) room))
+    (unless (buffer-live-p buffer)
+      (setf buffer (ement-room--buffer session room (ement-room--buffer-name room))
+            (alist-get 'buffer (ement-room-local room))  buffer))
+    ;; FIXME: This doesn't seem to work as desired, e.g. when
+    ;; `ement-view-room-display-buffer-action' is set to `display-buffer-no-window'; I
+    ;; guess because `pop-to-buffer' selects a window.
+    (pop-to-buffer buffer ement-view-room-display-buffer-action)
+    (run-hook-with-args 'ement-room-view-hook room session)))
+(defalias 'ement-view-room #'ement-room-view)
+
+(defun ement-room-view-hook-room-list-auto-update (_room session)
+  "Call `ement-room-list-auto-update' with SESSION.
+To be used in `ement-room-view-hook', which see."
+  ;; This function is necessary because the hook is called with the room argument, which
+  ;; `ement-room-list-auto-update' doesn't need.
+  (declare (function ement-room-list-auto-update "ement-room-list"))
+  (ement-room-list-auto-update session))
+
+(defun ement-room--buffer-name (room)
+  "Return name for ROOM's buffer."
+  (concat ement-room-buffer-name-prefix
+          (or (ement-room-display-name room)
+              (setf (ement-room-display-name room)
+                    (ement--room-display-name room)))
+          ement-room-buffer-name-suffix))
+
+(defun ement-room-goto-event (event)
+  "Go to EVENT in current buffer."
+  (if-let ((node (ement-room--ewoc-last-matching ement-ewoc
+                   (lambda (data)
+                     (and (ement-event-p data)
+                          (equal (ement-event-id event) (ement-event-id data)))))))
+      (goto-char (ewoc-location node))
+    (error "Event not found in buffer: %S" (ement-event-id event))))
+
+(defun ement-room--event-at (pos)
+  "Return event at POS or signal an error."
+  ;; TODO: Use this where appropriate.
+  (save-excursion
+    (goto-char pos)
+    (cl-assert ement-ewoc)
+    (let ((data (ewoc-data (ewoc-locate ement-ewoc))))
+      (cl-typecase data
+        (ement-event data)
+        (otherwise (user-error "No event at point"))))))
+
+(cl-defun ement-room-retro-callback (room session data
+                                          &key (set-prev-batch t))
+  "Push new DATA to ROOM on SESSION and add events to room buffer.
+If SET-PREV-BATCH is nil, don't set ROOM's prev-batch slot to the
+\"prev_batch\" token in response DATA (this should be set,
+e.g. when filling timeline gaps as opposed to retrieving messages
+before the earliest-seen message)."
+  (declare (function ement--make-event "ement.el")
+           (function ement--put-event "ement.el"))
+  (pcase-let* (((cl-struct ement-room local) room)
+	       ((map _start end chunk state) data)
+               ((map buffer) local)
+               (num-events (length chunk))
+               ;; We do 3 things for chunk events, so we count them 3 times when
+               ;; reporting progress.  (We also may receive some state events for
+               ;; these chunk events, but we don't bother to include them in the
+               ;; count, and we don't report progress for them, because they are
+               ;; likely very few compared to the number of timeline events, which is
+               ;; what the user is interested in (e.g. when loading 1000 earlier
+               ;; messages in #emacs:matrix.org, only 31 state events were received).
+               (progress-max-value (* 3 num-events)))
+    ;; NOTE: Put the newly retrieved events at the end of the slots, because they should be
+    ;; older events.  But reverse them first, because we're using "dir=b", which the
+    ;; spec says causes the events to be returned in reverse-chronological order, and we
+    ;; want to process them oldest-first (important because a membership event having a
+    ;; user's displayname should be older than a message event sent by the user).
+    ;; NOTE: The events in `chunk' and `state' are vectors, so we
+    ;; convert them to a list before appending.
+    (ement-debug num-events progress-max-value)
+    (setf chunk (nreverse chunk)
+          state (nreverse state))
+    ;; FIXME: Like `ement--push-joined-room-events', this should probably run the `ement-event-hook' on the newly seen events.
+    ;; Append state events.
+    (cl-loop for event across-ref state
+             do (setf event (ement--make-event event))
+             finally do (setf (ement-room-state room)
+                              (append (ement-room-state room) (append state nil))))
+    (ement-with-progress-reporter (:reporter ("Ement: Processing earlier events..." 0 progress-max-value))
+      ;; Append timeline events (in the "chunk").
+      ;; NOTE: It's regrettable that we have to turn the chunk vector into a list before
+      ;; appending it to the timeline, but we have to discard events that we've already
+      ;; seen.
+      ;; TODO: Consider looping over the vector and pushing one-by-one instead of using
+      ;; `seq-remove' and `append' (might be faster).
+      (cl-loop for event across-ref chunk
+               do (if (gethash (alist-get 'event_id event) (ement-session-events session))
+                      ;; Duplicate event: set to nil to be ignored.
+                      (setf event nil)
+                    ;; New event.
+                    (setf event (ement--make-event event))
+                    ;; HACK: Put events on events table.  See FIXME above about using the event hook.
+                    (ement--put-event event nil session))
+               (ement-progress-update)
+               finally do
+               (setf chunk (seq-remove #'null chunk)
+                     (ement-room-timeline room) (append (ement-room-timeline room) chunk)))
+      (when buffer
+        ;; Insert events into the room's buffer.
+        (with-current-buffer buffer
+          (save-window-excursion
+            ;; NOTE: See note in `ement--update-room-buffers'.
+            (when-let ((buffer-window (get-buffer-window buffer)))
+              (select-window buffer-window))
+            ;; FIXME: Use retro-loading in event handlers, or in --handle-events, anyway.
+            (ement-room--process-events chunk)
+            ;; Don't set the slot if the response doesn't include an "end" token (that
+            ;; would cause subsequent retro requests to fetch events from the end of the
+            ;; timeline, as if we had just joined).
+            (when (and set-prev-batch end)
+              ;; This feels a little hacky, but maybe not too bad.
+              (setf (ement-room-prev-batch room) end))
+            (setf ement-room-retro-loading nil)))))
+    (message "Ement: Loaded %s earlier events." num-events)))
+
+(defun ement-room--insert-events (events &optional retro)
+  "Insert EVENTS into current buffer.
+Calls `ement-room--insert-event' for each event and inserts
+timestamp headers into appropriate places while maintaining
+point's position.  If RETRO is non-nil, assume EVENTS are earlier
+than any existing events, and only insert timestamp headers up to
+the previously oldest event."
+  (let (buffer-window point-node orig-first-node point-max-p)
+    (when (get-buffer-window (current-buffer))
+      ;; HACK: See below.
+      (setf buffer-window (get-buffer-window (current-buffer))
+            point-max-p (= (point) (point-max))))
+    (when (and buffer-window retro)
+      (setf point-node (ewoc-locate ement-ewoc (window-start buffer-window))
+            orig-first-node (ewoc-nth ement-ewoc 0)))
+    (save-window-excursion
+      ;; NOTE: When inserting some events, seemingly only replies, if a different buffer's
+      ;; window is selected, and this buffer's window-point is at the bottom, the formatted
+      ;; events may be inserted into the wrong place in the buffer, even though they are
+      ;; inserted into the EWOC at the right place.  We work around this by selecting the
+      ;; buffer's window while inserting events, if it has one.  (I don't know if this is a bug
+      ;; in EWOC or in this file somewhere.  But this has been particularly nasty to debug.)
+      (when buffer-window
+        (select-window buffer-window))
+      (cl-loop for event being the elements of events
+               do (ement-room--process-event event)
+               do (ement-progress-update)))
+    ;; Since events can be received in any order, we have to check the whole buffer
+    ;; for where to insert new timestamp headers.  (Avoiding that would require
+    ;; getting a list of newly inserted nodes and checking each one instead of every
+    ;; node in the buffer.  Doing that now would probably be premature optimization,
+    ;; though it will likely be necessary if users keep buffers open for busy rooms
+    ;; for a long time, as the time to do this in each buffer will increase with the
+    ;; number of events.  At least we only do it once per batch of events.)
+    (ement-room--insert-ts-headers nil (when retro orig-first-node))
+    (when ement-room-sender-in-headers
+      (ement-room--insert-sender-headers ement-ewoc))
+    (when buffer-window
+      (cond (retro (with-selected-window buffer-window
+                     (set-window-start buffer-window (ewoc-location point-node))
+                     ;; TODO: Experiment with this.
+                     (forward-line -1)))
+            (point-max-p (set-window-point buffer-window (point-max)))))))
+
+(cl-defun ement-room--send-typing (session room &key (typing t))
+  "Send a typing notification for ROOM on SESSION."
+  (pcase-let* (((cl-struct ement-session user) session)
+               ((cl-struct ement-user (id user-id)) user)
+               ((cl-struct ement-room (id room-id)) room)
+               (endpoint (format "rooms/%s/typing/%s"
+                                 (url-hexify-string room-id) (url-hexify-string user-id)))
+               (data (ement-alist "typing" typing "timeout" 20000)))
+    (ement-api session endpoint :method 'put :data (json-encode data)
+      ;; We don't really care about the response, I think.
+      :then #'ignore)))
+
+(defcustom ement-room-mode-hook nil
+  ;; Due to Emacs bug#68600, define the mode hook separately to avoid the mode
+  ;; line constructs in the `ement-room-mode' mode name being copied verbatim
+  ;; into the auto-generated docstring.
+  "Hook run after entering `ement-room-mode'."
+  :options '(visual-line-mode)
+  :type 'hook
+  :group 'ement-room)
+
+(define-derived-mode ement-room-mode fundamental-mode
+  `("Ement-Room"
+    (:eval (unless (map-elt ement-syncs ement-session)
+             (propertize ":Not-syncing"
+                         'face 'font-lock-warning-face
+                         'help-echo "Automatic syncing was interrupted; press \"g\" to resume"))))
+  "Major mode for Ement room buffers.
+This mode initializes a buffer to be used for showing events in
+an Ement room.  It kills all local variables, removes overlays,
+and erases the buffer.
+
+\\{ement-room-mode--advertised-keymap}"
+  (use-local-map ement-room-mode-effective-keymap)
+  (let ((inhibit-read-only t))
+    (erase-buffer))
+  (remove-overlays)
+  (setf buffer-read-only t
+        left-margin-width ement-room-left-margin-width
+        right-margin-width ement-room-right-margin-width
+        imenu-create-index-function #'ement-room--imenu-create-index-function
+        ;; TODO: Use EWOC header/footer for, e.g. typing messages.
+        ement-ewoc (ewoc-create #'ement-room--pp-thing))
+  ;; Prevent line/wrap-prefix formatting properties being included in copied text.
+  (setq-local filter-buffer-substring-function #'ement-room--buffer-substring-filter)
+  ;; Set the URL handler.  Note that `browse-url-handlers' was added in 28.1;
+  ;; prior to that `browse-url-browser-function' served double-duty.
+  ;; TODO: Remove compat code when requiring Emacs >=28.
+  ;; (See also `ement-room-browse-url'.)
+  (let ((handler (cons ement-room-matrix.to-url-regexp #'ement-room-browse-url)))
+    (if (boundp 'browse-url-handlers)
+        (setq-local browse-url-handlers (cons handler browse-url-handlers))
+      (setq-local browse-url-browser-function
+                  (cons handler
+                        (if (consp browse-url-browser-function)
+                            browse-url-browser-function
+                          (and browse-url-browser-function
+                               (list (cons "." browse-url-browser-function))))))))
+  (setq-local completion-at-point-functions
+              '(ement-room--complete-members-at-point ement-room--complete-rooms-at-point))
+  (setq-local dnd-protocol-alist (append '(("^file:///" . ement-room-dnd-upload-file)
+                                           ("^file:" . ement-room-dnd-upload-file))
+                                         dnd-protocol-alist)))
+
+(add-hook 'ement-room-mode-hook 'visual-line-mode)
+
+;;;###autoload
+(define-minor-mode ement-room-self-insert-mode
+  "When enabled, `self-insert-command' keys begin a new message.
+
+The user options `ement-room-self-insert-chars' and
+`ement-room-self-insert-commands' determine the specific keys and
+commands which will have this effect.
+
+When this mode is enabled, `ement-room-mode-self-insert-keymap'
+takes precedence over `ement-room-mode-map', with the shadowed
+key bindings in `ement-room-mode-map' becoming accessible via
+`ement-room-mode-map-prefix-key'.
+
+If you define custom key bindings in `ement-room-mode-map', you
+should call `ement-room-self-insert-mode' after defining those
+keys (rather than before).  Your bindings will be functional in
+either case, but they may not appear in the help for
+`ement-room-mode' if you define them afterwards.
+
+If you bind keys in `ement-room-mode-self-insert-keymap', do so
+via `ement-room-mode-self-insert-keymap-update-hook' (see which)."
+  :init-value nil
+  :global t
+  :keymap nil
+  :group 'ement-room
+  ;; Ensure the self-insert and advertised keymaps are up to date.
+  (if ement-room-self-insert-mode
+      (ement-room-mode-self-insert-keymap-update)
+    (setq ement-room-mode--advertised-keymap ement-room-mode-map))
+  ;; Make the local keymap used by `ement-room-mode' reflect the state
+  ;; of `ement-room-self-insert-mode'.
+  (ement-room-mode-effective-keymap-update))
+
+(defun ement-room-self-insert-new-message ()
+  "Compose a new message beginning with the just-typed character."
+  (interactive)
+  ;; Re-issue the event which triggered this command.
+  ;; (Typically a `self-insert-command' key binding.)
+  (seq-doseq (key (reverse (this-command-keys-vector)))
+    (push key unread-command-events))
+  (call-interactively #'ement-room-dispatch-new-message))
+
+(defun ement-room-read-string (prompt &optional initial-input history default-value inherit-input-method)
+  "Call `read-from-minibuffer', binding variables and keys for Ement.
+Arguments PROMPT, INITIAL-INPUT, HISTORY, DEFAULT-VALUE, and
+INHERIT-INPUT-METHOD are as those expected by `read-string',
+which see.  Runs hook `ement-room-read-string-setup-hook', which
+see."
+  (let ((room ement-room)
+        (session ement-session))
+    (minibuffer-with-setup-hook
+        (lambda ()
+          "Bind keys and variables locally (to be called in minibuffer)."
+          (setq-local ement-room room)
+          (setq-local ement-session session)
+          (setq-local completion-at-point-functions
+                      '(ement-room--complete-members-at-point ement-room--complete-rooms-at-point))
+          (visual-line-mode 1)
+          (run-hooks 'ement-room-read-string-setup-hook))
+      (read-from-minibuffer prompt initial-input ement-room-minibuffer-map
+                            nil history default-value inherit-input-method))))
+
+(defun ement-room--buffer (session room name)
+  "Return buffer named NAME showing ROOM's events on SESSION.
+If ROOM has no buffer, one is made and stored in the room's local
+data slot."
+  (declare (function ement-view-space "ement-directory"))
+  (or (map-elt (ement-room-local room) 'buffer)
+      (let ((new-buffer (generate-new-buffer name)))
+        (with-current-buffer new-buffer
+          (ement-room-mode)
+          (setf header-line-format (when ement-room-header-line-format
+                                     'ement-room-header-line-format)
+                ement-session session
+                ement-room room
+                list-buffers-directory (or (ement-room-canonical-alias room)
+                                           (ement-room-id room))
+                ;; Track buffer in room's slot.
+                (map-elt (ement-room-local room) 'buffer) (current-buffer))
+          (add-hook 'kill-buffer-hook
+                    (lambda ()
+                      (setf (map-elt (ement-room-local room) 'buffer) nil))
+                    nil 'local)
+          (setq-local bookmark-make-record-function #'ement-room-bookmark-make-record)
+          ;; Set initial header and footer.  (Do this before processing events, which
+          ;; might cause the header/footer to be changed (e.g. a tombstone event).
+          (let ((header (if (cl-loop for state in (list (ement-room-state ement-room)
+                                                        (ement-room-invite-state ement-room))
+                                     thereis (cl-find "m.room.encryption" state
+                                                      :test #'equal :key #'ement-event-type))
+                            (propertize "This appears to be an encrypted room, which is not natively supported by Ement.el.  (See information about using Pantalaimon in Ement.el documentation.)"
+                                        'face 'font-lock-warning-face)
+                          ""))
+                (footer (pcase (ement-room-status ement-room)
+                          ;; Set header and footer for an invited room.
+                          ('invite
+                           (concat (propertize "You've been invited to this room.  "
+                                               'face 'font-lock-warning-face)
+                                   (propertize "[Join this room]"
+                                               'button '(t)
+                                               'category 'default-button
+                                               'mouse-face 'highlight
+                                               'follow-link t
+                                               'action (lambda (_button)
+                                                         ;; Kill the room buffer so it can be recreated after joining
+                                                         ;; (which will cleanly update the room's name, footer, etc).
+                                                         (let ((room ement-room)
+                                                               (session ement-session))
+                                                           (kill-buffer)
+                                                           (message "Joining room... (buffer will be reopened after joining)")
+                                                           (ement-room-join (ement-room-id room) session))))))
+                          (_ (if (ement--space-p room)
+                                 (concat (propertize "This room is a space.  It is not for messaging, but only a grouping of other rooms.  "
+                                                     'face 'font-lock-type-face)
+                                         (propertize "[View rooms in this space]"
+                                                     'button '(t)
+                                                     'category 'default-button
+                                                     'mouse-face 'highlight
+                                                     'follow-link t
+                                                     'action (lambda (_button)
+                                                               ;; Kill the room buffer so it can be recreated after joining
+                                                               ;; (which will cleanly update the room's name, footer, etc).
+                                                               (let ((room ement-room)
+                                                                     (session ement-session))
+                                                                 (kill-buffer)
+                                                                 (message "Viewing space...")
+                                                                 (ement-view-space room session)))))
+                               "")))))
+            (ewoc-set-hf ement-ewoc header footer))
+          (setf
+           ;; Clear new-events, because those only matter when a buffer is already open.
+           (alist-get 'new-events (ement-room-local room)) nil
+           ;; Set the new buffer in the room's local alist so that it
+           ;; can be used by event-inserting functions before this
+           ;; function returns, e.g. `ement-room--add-member-face'.
+           (alist-get 'buffer (ement-room-local room)) new-buffer)
+          ;; We don't use `ement-room--insert-events' to avoid extra
+          ;; calls to `ement-room--insert-ts-headers'.
+          ;; NOTE: We handle the events in chronological order (i.e. the reverse of the
+          ;; stored order, which is latest-first), because some logic depends on this
+          ;; (e.g. processing a message-edit event before the edited event would mean the
+          ;; edited event would not yet be in the buffer).
+          (ement-room--process-events (reverse (ement-room-state room)))
+          (ement-room--process-events (reverse (ement-room-timeline room)))
+          (ement-room--insert-ts-headers)
+          (when ement-room-sender-in-headers
+            (ement-room--insert-sender-headers ement-ewoc))
+          (ement-room-move-read-markers room
+            :read-event (when-let ((event (alist-get "m.read" (ement-room-account-data room) nil nil #'equal)))
+                          (map-nested-elt event '(content event_id)))
+            :fully-read-event (when-let ((event (alist-get "m.fully_read" (ement-room-account-data room) nil nil #'equal)))
+                                (map-nested-elt event '(content event_id)))))
+        ;; Return the buffer!
+        new-buffer)))
+
+(defun ement-room--event-data (id)
+  "Return event struct for event ID in current buffer."
+  ;; Search from bottom, most likely to be faster.
+  (cl-loop with node = (ewoc-nth ement-ewoc -1)
+           while node
+           for data = (ewoc-data node)
+           when (and (ement-event-p data)
+                     (equal id (ement-event-id data)))
+           return data
+           do (setf node (ewoc-prev ement-ewoc node))))
+
+(defun ement-room--escape-% (string)
+  "Return STRING with \"%\" escaped.
+Needed to display things in the header line."
+  (replace-regexp-in-string (rx "%") "%%" string t t))
+
+(defun ement-room--buffer-substring-filter (beg end &optional delete)
+  "Value for `filter-buffer-substring-function' in Ement rooms.
+
+Strips the `line-prefix' and `wrap-prefix' text properties which
+are used when formatting certain Matrix events, but which should
+not be copied into other buffers."
+  (let ((string (funcall (default-value 'filter-buffer-substring-function)
+                         beg end delete)))
+    (remove-list-of-text-properties
+     0 (length string) '(line-prefix wrap-prefix) string)
+    string))
+
+;;;;; Imenu
+
+(defconst ement-room-timestamp-header-imenu-format "%Y-%m-%d (%A) %H:%M"
+  "Format string for timestamps in Imenu indexes.")
+
+(defun ement-room--imenu-create-index-function ()
+  "Return Imenu index for the current buffer.
+For use as `imenu-create-index-function'."
+  (let ((timestamp-nodes (ement-room--ewoc-collect-nodes
+                          ement-ewoc (lambda (node)
+                                       (pcase (ewoc-data node)
+                                         (`(ts . ,_) t))))))
+    (cl-loop for node in timestamp-nodes
+             collect (pcase-let*
+                         ((`(ts ,timestamp) (ewoc-data node))
+                          (formatted (format-time-string ement-room-timestamp-header-imenu-format timestamp)))
+                       (cons formatted (ewoc-location node))))))
+
+;;;;; Occur
+
+(defvar-local ement-room-occur-pred nil
+  "Predicate used to refresh `ement-room-occur' buffers.")
+
+(define-derived-mode ement-room-occur-mode ement-room-mode "Ement-Room-Occur")
+
+(progn
+  (define-key ement-room-occur-mode-map [remap ement-room-send-message]  #'ement-room-occur-find-event)
+  (define-key ement-room-occur-mode-map (kbd "g") #'revert-buffer)
+  (define-key ement-room-occur-mode-map (kbd "n") #'ement-room-occur-next)
+  (define-key ement-room-occur-mode-map (kbd "p") #'ement-room-occur-prev))
+
+(cl-defun ement-room-occur (&key user-id regexp pred header)
+  "Show known events in current buffer matching args in a new buffer.
+If REGEXP, show events whose sender or body content match it.  Or
+if USER-ID, show events from that user.  Or if PRED, show events
+matching it.  HEADER is used if given, or set according to other
+arguments."
+  (interactive (let* ((regexp (read-regexp "Regexp (leave empty to select user instead)"))
+                      (user-id (when (string-empty-p regexp)
+                                 (ement-complete-user-id))))
+                 (list :regexp regexp :user-id user-id)))
+  (let* ((session ement-session)
+         (room ement-room)
+         (occur-buffer (get-buffer-create (format "*Ement Room Occur: %s*" (ement-room-display-name room))))
+         (pred (cond (pred)
+                     ((not (string-empty-p regexp))
+                      (lambda (data)
+                        (and (ement-event-p data)
+                             (or (string-match regexp (ement-user-id (ement-event-sender data)))
+                                 (when-let ((room-display-name
+                                             (gethash (ement-event-sender data) (ement-room-displaynames room))))
+                                   (string-match regexp room-display-name))
+                                 (when-let ((body (alist-get 'body (ement-event-content data))))
+                                   (string-match regexp body))))))
+                     (user-id
+                      (lambda (data)
+                        (and (ement-event-p data)
+                             (equal user-id (ement-user-id (ement-event-sender data))))))))
+         (header (cond (header)
+                       ((not (string-empty-p regexp))
+                        (format "Events matching %S in %s" regexp (ement-room-display-name room)))
+                       (user-id
+                        (format "Events from %s in %s" user-id (ement-room-display-name room))))))
+    (with-current-buffer occur-buffer
+      (let ((inhibit-read-only t))
+        (erase-buffer))
+      (ement-room-occur-mode)
+      (setf header-line-format header
+            ement-session session
+            ement-room room)
+      (setq-local revert-buffer-function (lambda (&rest _)
+                                           (interactive)
+                                           (let ((event-at-point (ewoc-data (ewoc-locate ement-ewoc))))
+                                             (with-current-buffer (alist-get 'buffer (ement-room-local room))
+                                               (ement-room-occur :pred pred :header header)
+                                               (when-let ((node (ement-room--ewoc-last-matching ement-ewoc
+                                                                  (lambda (data)
+                                                                    (eq event-at-point data)))))
+                                                 (ewoc-goto-node ement-ewoc node))))))
+      (ement-room--process-events (reverse (ement-room-state room)))
+      (ement-room--process-events (reverse (ement-room-timeline room)))
+      (ewoc-filter ement-ewoc pred)
+      ;; TODO: Insert date header before first event.
+      (ement-room--insert-ts-headers))
+    (pop-to-buffer occur-buffer)))
+
+(defun ement-room-occur-find-event (event)
+  "Find EVENT in room's main buffer."
+  (interactive (list (ewoc-data (ewoc-locate ement-ewoc))))
+  (pcase-let* (((cl-struct ement-room (local (map buffer))) ement-room)
+               ((cl-struct ement-event id) event))
+    (display-buffer buffer)
+    (with-selected-window (get-buffer-window buffer)
+      (ement-room-find-event id))))
+
+(cl-defun ement-room-occur-next (&optional (n 1))
+  "Go to Nth next event."
+  (interactive)
+  (let ((command (if (> n 0)
+                     #'ement-room-goto-next
+                   #'ement-room-goto-prev)))
+    (cl-loop for i below (abs n)
+             do (call-interactively command))
+    (ement-room-occur-find-event (ewoc-data (ewoc-locate ement-ewoc)))))
+
+(cl-defun ement-room-occur-prev (&optional (n 1))
+  "Go to Nth previous event."
+  (interactive)
+  (ement-room-occur-next (- n)))
+
+;;;;; Events
+
+;; Functions to handle types of events.
+
+;; NOTE: At the moment, this only handles "m.typing" ephemeral events.  Message
+;; events are handled elsewhere.  A better framework should be designed...
+;; TODO: Define other handlers this way.
+
+;; MAYBE: Should we intern these functions?  That means every event
+;; handled has to concat and intern.  Should we use lambdas in an
+;; alist or hash-table instead?  For now let's use an alist.
+
+(defvar ement-users)
+
+(defvar ement-room-event-fns nil
+  "Alist mapping event types to functions which process events in room buffers.")
+
+;; NOTE: While transitioning to the defevent-based handler system, we
+;; define both a handle-events and handle-event function that do the
+;; same thing.
+
+;; TODO: Tidy this up.
+
+;; NOTE: --handle-events and --handle-event need to be called in the room
+;; buffer's window, when it has one.  This is absolutely necessary,
+;; otherwise the events may be inserted at the wrong place.  (I'm not
+;; sure if this is a bug in EWOC or in my code, but doing this fixes it.)
+
+(defun ement-room--process-events (events)
+  "Process EVENTS in current buffer.
+Calls `ement-progress-update' for each event.  Calls
+`ement-room--insert-ts-headers' when done.  Uses handlers defined
+in `ement-room-event-fns'.  The current buffer should be a room's
+buffer."
+  ;; FIXME: Calling `ement-room--insert-ts-headers' is convenient, but it
+  ;; may also be called in functions that call this function, which may
+  ;; result in it being called multiple times for a single set of events.
+  (cl-loop for event being the elements of events ;; EVENTS may be a list or array.
+           for handler = (alist-get (ement-event-type event) ement-room-event-fns nil nil #'equal)
+           when handler
+           do (funcall handler event)
+           do (ement-progress-update))
+  (ement-room--insert-ts-headers))
+
+(defun ement-room--process-event (event)
+  "Process EVENT in current buffer.
+Uses handlers defined in `ement-room-event-fns'.  The current
+buffer should be a room's buffer."
+  (when-let ((handler (alist-get (ement-event-type event) ement-room-event-fns nil nil #'equal)))
+    ;; We demote any errors that happen while processing events, because it's possible for
+    ;; events to be malformed in unexpected ways, and that could cause an error, which
+    ;; would stop processing of other events and prevent further syncing.  See,
+    ;; e.g. <https://github.com/alphapapa/ement.el/pull/61>.
+    (with-demoted-errors "Ement (ement-room--process-event): Error processing event: %S"
+      (funcall handler event))))
+
+;;;;;; Event handlers
+
+(defmacro ement-room-defevent (type &rest body)
+  "Define an event handling function for events of TYPE.
+Around the BODY, the variable `event' is bound to the event being
+processed.  The function is called in the room's buffer.  Adds
+function to `ement-room-event-fns', which see."
+  (declare (debug (stringp def-body))
+           (indent defun))
+  `(setf (alist-get ,type ement-room-event-fns nil nil #'string=)
+         (lambda (event)
+           ,(concat "`ement-room' handler function for " type " events.")
+           ,@body)))
+
+(ement-room-defevent "m.reaction"
+  (pcase-let* (((cl-struct ement-event content) event)
+               ((map ('m.relates_to relates-to)) content)
+               ((map ('event_id related-id) ('rel_type rel-type) _key) relates-to))
+    ;; TODO: Handle other rel_types?
+    (pcase rel-type
+      ("m.annotation"
+       ;; Look for related event in timeline.
+       (if-let ((related-event (cl-loop with fake-event = (make-ement-event :id related-id)
+                                        for timeline-event in (ement-room-timeline ement-room)
+                                        when (ement--events-equal-p fake-event timeline-event)
+                                        return timeline-event)))
+           ;; Found related event: add reaction to local slot and invalidate node.
+           (progn
+             ;; Every time a room buffer is made, these reaction events are processed again, so we use pushnew to
+             ;; avoid duplicates.  (In the future, as event-processing is refactored, this may not be necessary.)
+             (cl-pushnew event (map-elt (ement-event-local related-event) 'reactions))
+             (when-let ((nodes (ement-room--ewoc-last-matching ement-ewoc
+                                 (lambda (data)
+                                   (and (ement-event-p data)
+                                        (equal related-id (ement-event-id data)))))))
+               (ewoc-invalidate ement-ewoc nodes)))
+         ;; No known related event: discard.
+         ;; TODO: Is this the correct thing to do?
+         (ement-debug "No known related event for" event))))))
+
+(ement-room-defevent "m.room.power_levels"
+  (ement-room--insert-event event))
+
+(defun ement-room--format-power-levels-event (event room _session)
+  "Return power-levels EVENT in ROOM formatted as a string."
+  (pcase-let (((cl-struct ement-event sender
+                          (content (map ('users new-users)))
+                          (unsigned (map ('prev_content (map ('users old-users))))))
+               event))
+    (when old-users
+      (pcase-let* ((sender-id (ement-user-id sender))
+                   (sender-displayname (ement--user-displayname-in room sender))
+                   (`(,changed-user-id-symbol . ,new-level)
+                    (cl-find-if (lambda (new-user)
+                                  (let ((old-user (cl-find (car new-user) old-users
+                                                           :key #'car)))
+                                    (or (not old-user)
+                                        (not (equal (cdr new-user) (cdr old-user))))))
+                                new-users))
+                   (changed-user-id (symbol-name changed-user-id-symbol))
+                   (changed-user (when changed-user-id-symbol
+                                   (gethash changed-user-id ement-users)))
+                   (user-displayname (if changed-user
+                                         (ement--user-displayname-in room changed-user)
+                                       changed-user-id)))
+        (ement-room-wrap-prefix
+          (if (not changed-user)
+              (format "%s sent a power-level event"
+                      (propertize sender-displayname
+                                  'help-echo sender-id))
+            (format "%s set %s's power level to %s"
+                    (propertize sender-displayname
+                                'help-echo sender-id)
+                    (propertize user-displayname 'help-echo changed-user-id)
+                    new-level))
+          'face 'ement-room-membership)))))
+
+(ement-room-defevent "m.room.canonical_alias"
+  (ement-room--insert-event event))
+
+(defun ement-room--format-canonical-alias-event (event room _session)
+  "Return canonical alias EVENT in ROOM formatted as a string."
+  (pcase-let (((cl-struct ement-event sender
+                          ;; TODO: Include alt_aliases, maybe.
+                          ;; TODO: Include old alias when it is being replaced.
+                          (content (map alias)))
+               event))
+    (ement-room-wrap-prefix
+      (format "%s set the canonical alias to <%s>"
+              (propertize (ement--user-displayname-in room sender)
+                          'help-echo (ement-user-id sender))
+              alias)
+      'face 'ement-room-membership)))
+
+(ement-room-defevent "m.room.redaction"
+  ;; We handle redaction events here rather than an `ement-defevent' handler.  This way we
+  ;; do less work for events in rooms that the user isn't looking at, at the cost of doing
+  ;; a bit more work when a room's buffer is prepared.
+  (pcase-let* (((cl-struct ement-event (local (map ('redacts redacted-id)))) event)
+               ((cl-struct ement-room timeline) ement-room)
+               (redacted-event (cl-find redacted-id timeline
+                                        :key #'ement-event-id :test #'equal))
+               (redacted-edit-events (cl-remove-if-not (lambda (timeline-event)
+                                                         (pcase-let (((cl-struct ement-event
+                                                                                 (content
+                                                                                  (map ('m.relates_to
+                                                                                        (map ('event_id related-id)
+                                                                                             ('rel_type rel-type))))))
+                                                                      timeline-event))
+                                                           (and (equal redacted-id related-id)
+                                                                (equal "m.replace" rel-type))))
+                                                       timeline)))
+    (ement-debug event redacted-event redacted-edit-events)
+    (cl-loop for edit-event in redacted-edit-events
+             do (cl-pushnew event (alist-get 'redacted-by (ement-event-local edit-event))))
+    (when redacted-event
+      (cl-pushnew event (alist-get 'redacted-by (ement-event-local redacted-event)))
+      (pcase-let* (((cl-struct ement-event (content
+                                            (map ('m.relates_to
+                                                  (map ('event_id related-id)
+                                                       ('rel_type rel-type))))))
+                    redacted-event))
+        (pcase rel-type
+          ("m.annotation"
+           ;; Redacted annotation/reaction.  NOTE: Since we link annotations in a -room
+           ;; event handler (rather than in a non-room handler), we also unlink redacted
+           ;; ones here.
+           (when-let (annotated-event (cl-find related-id timeline
+                                               :key #'ement-event-id :test #'equal))
+             ;; Remove it from the related event's local slot.
+             (setf (map-elt (ement-event-local annotated-event) 'reactions)
+                   (cl-remove redacted-id (map-elt (ement-event-local annotated-event) 'reactions)
+                              :key #'ement-event-id :test #'equal))
+             ;; Invalidate the related event's node.
+             (when-let (node (ement-room--ewoc-last-matching ement-ewoc
+                               (lambda (data)
+                                 (and (ement-event-p data)
+                                      (equal related-id (ement-event-id data))))))
+               (ewoc-invalidate ement-ewoc node)))))))
+    ;; Invalidate the redacted event's node.
+    (when-let ((node (ement-room--ewoc-last-matching ement-ewoc
+                       (lambda (data)
+                         (and (ement-event-p data)
+                              (pcase-let (((cl-struct ement-event id
+                                                      (content
+                                                       (map ('m.relates_to
+                                                             (map ('event_id related-id)
+                                                                  ('rel_type rel-type))))))
+                                           data))
+                                (or (equal redacted-id id)
+                                    (and (equal "m.replace" rel-type)
+                                         (equal redacted-id related-id)))))))))
+      (ement-debug node)
+      (ewoc-invalidate ement-ewoc node))))
+
+(ement-room-defevent "m.typing"
+  (pcase-let* (((cl-struct ement-session user) ement-session)
+               ((cl-struct ement-user (id local-user-id)) user)
+               ((cl-struct ement-event content) event)
+               ((map ('user_ids user-ids)) content)
+               (usernames) (footer))
+    (setf user-ids (delete local-user-id user-ids))
+    (if (zerop (length user-ids))
+        (setf footer "")
+      (setf usernames (cl-loop for id across user-ids
+                               for user = (gethash id ement-users)
+                               if user
+                               collect (ement--user-displayname-in ement-room user)
+                               else collect id)
+            footer (propertize (concat "Typing: " (string-join usernames ", "))
+                               'face 'font-lock-comment-face)))
+    (with-silent-modifications
+      (ewoc-set-hf ement-ewoc "" footer))))
+
+(ement-room-defevent "m.room.avatar"
+  (ement-room--insert-event event))
+
+(ement-room-defevent "org.matrix.msc3015.m.room.name.override"
+  (ignore event)
+  (setf (ement-room-display-name ement-room) (ement--room-display-name ement-room))
+  (rename-buffer (ement-room--buffer-name ement-room)))
+
+(ement-room-defevent "m.room.member"
+  (with-silent-modifications
+    (ement-room--insert-event event)))
+
+(ement-room-defevent "m.room.message"
+  (pcase-let* (((cl-struct ement-event content unsigned) event)
+               ((map ('m.relates_to (map ('rel_type rel-type) ('event_id replaces-event-id)))) content)
+               ((map ('m.relations (map ('m.replace (map ('event_id replaced-by-id)))))) unsigned))
+    (if (and ement-room-replace-edited-messages
+             replaces-event-id (equal "m.replace" rel-type))
+        ;; Event replaces existing event: find and replace it in buffer if possible, otherwise insert it.
+        (or (ement-room--replace-event event)
+            (progn
+              (ement-debug "Unable to replace event ID: inserting instead." replaces-event-id)
+              (ement-room--insert-event event)))
+      ;; New event.
+      (if replaced-by-id
+          (ement-debug "Event replaced: not inserting." replaced-by-id)
+        ;; Not replaced: insert it.
+        (ement-room--insert-event event)))))
+
+(ement-room-defevent "m.room.tombstone"
+  (pcase-let* (((cl-struct ement-event content) event)
+               ((map body ('replacement_room new-room-id)) content)
+               (session ement-session)
+               (button (ement--button-buttonize
+                        (propertize new-room-id 'help-echo "Join replacement room")
+                        (lambda (_)
+                          (ement-room-join new-room-id session))))
+               (banner (format "This room has been replaced.  Explanation:%S  Replacement room: <%s>" body button)))
+    (add-face-text-property 0 (length banner) 'font-lock-warning-face t banner)
+    ;; NOTE: We assume that no more typing events will be received,
+    ;; which would replace the footer.
+    (ement-room--insert-event event)
+    (ewoc-set-hf ement-ewoc banner banner)))
+
+;;;;; Read markers
+
+;; Marking rooms as read and showing lines where marks are.
+
+(ement-room-defevent "m.read"
+  (ement-room-move-read-markers ement-room
+    :read-event (ement-event-id event)))
+
+(ement-room-defevent "m.fully_read"
+  (ement-room-move-read-markers ement-room
+    :fully-read-event (ement-event-id event)))
+
+(defvar-local ement-room-read-receipt-marker nil
+  "EWOC node for the room's read-receipt marker.")
+
+(defvar-local ement-room-fully-read-marker nil
+  "EWOC node for the room's fully-read marker.")
+
+(defface ement-room-read-receipt-marker
+  '((t (:inherit show-paren-match)))
+  "Read marker line in rooms."
+  :group 'ement-room-faces)
+
+(defface ement-room-fully-read-marker
+  '((t (:inherit isearch)))
+  "Fully read marker line in rooms."
+  :group 'ement-room-faces)
+
+(defcustom ement-room-send-read-receipts t
+  "Whether to send read receipts.
+Also controls whether the read-receipt marker in a room is moved
+automatically."
+  :type 'boolean
+  :group 'ement-room)
+
+(defun ement-room-read-receipt-idle-timer ()
+  "Update read receipts in visible Ement room buffers.
+To be called from timer stored in
+`ement-read-receipt-idle-timer'."
+  (when ement-room-send-read-receipts
+    (dolist (window (window-list))
+      (when (and (eq 'ement-room-mode (buffer-local-value 'major-mode (window-buffer window)))
+                 (buffer-local-value 'ement-room (window-buffer window)))
+        (ement-room-update-read-receipt window)))))
+
+(defun ement-room-update-read-receipt (window)
+  "Update read receipt for room displayed in WINDOW.
+Also, mark room's buffer as unmodified."
+  (with-selected-window window
+    (let ((read-receipt-node (ement-room--ewoc-last-matching ement-ewoc
+                               (lambda (node-data)
+                                 (eq 'ement-room-read-receipt-marker node-data))))
+          (window-end-node (or (ewoc-locate ement-ewoc (window-end nil t))
+                               (ewoc-nth ement-ewoc -1))))
+      (when (or
+             ;; The window's end has been scrolled to or past the position of the
+             ;; receipt marker.
+             (and read-receipt-node
+                  (>= (window-end nil t) (ewoc-location read-receipt-node)))
+             ;; The read receipt is outside of retrieved events.
+             (not read-receipt-node))
+        (let* ((event-node (when window-end-node
+                             ;; It seems like `window-end-node' shouldn't ever be nil,
+                             ;; but just in case...
+                             (cl-typecase (ewoc-data window-end-node)
+                               (ement-event window-end-node)
+                               (t (ement-room--ewoc-next-matching ement-ewoc window-end-node
+                                    #'ement-event-p #'ewoc-prev)))))
+               (node-after-event (ewoc-next ement-ewoc event-node))
+               (event))
+          (when event-node
+            (unless (or (when node-after-event
+                          (<= (ewoc-location node-after-event) (window-end nil t)))
+                        (>= (window-end) (point-max)))
+              ;; The entire event is not visible: use the previous event.  (NOTE: This
+              ;; isn't quite perfect, because apparently `window-end' considers a position
+              ;; visible if even one pixel of its line is visible.  This will have to be
+              ;; good enough for now.)
+              ;; FIXME: Workaround that an entire line's height need not be displayed for it to be considered so.
+              (setf event-node (ement-room--ewoc-next-matching ement-ewoc event-node
+                                 #'ement-event-p #'ewoc-prev)))
+            (setf event (ewoc-data event-node))
+            ;; Mark the buffer as not modified so that will not contribute to its being
+            ;; considered unread.  NOTE: This will mean that any room buffer displayed in
+            ;; a window will have its buffer marked unmodified when this function is
+            ;; called.  This is probably for the best.
+            (set-buffer-modified-p nil)
+            (unless (alist-get event ement-room-read-receipt-request)
+              ;; No existing request for this event: cancel any outstanding request and
+              ;; send a new one.
+              (when-let ((request-process (car (map-values ement-room-read-receipt-request))))
+                (when (process-live-p request-process)
+                  (interrupt-process request-process)))
+              (setf ement-room-read-receipt-request nil)
+              (setf (alist-get event ement-room-read-receipt-request)
+                    (ement-room-mark-read ement-room ement-session
+                      :read-event event)))))))))
+
+(defun ement-room-goto-fully-read-marker ()
+  "Move to the fully-read marker in the current room."
+  (interactive)
+  (if-let ((fully-read-pos (when ement-room-fully-read-marker
+                             (ewoc-location ement-room-fully-read-marker))))
+      (with-suppressed-warnings ((obsolete point))
+        ;; I like using `point' as a GV, and I object to its being obsoleted (and said so
+        ;; on emacs-devel).
+        (setf (point) fully-read-pos (window-start) fully-read-pos))
+    ;; Unlike the fully-read marker, there doesn't seem to be a
+    ;; simple way to get the user's read-receipt marker.  So if
+    ;; we haven't seen either marker in the retrieved events, we
+    ;; go back to the fully-read marker.
+    (if-let* ((fully-read-event (alist-get "m.fully_read" (ement-room-account-data ement-room) nil nil #'equal))
+              (fully-read-event-id (map-nested-elt fully-read-event '(content event_id))))
+        ;; Fully-read account-data event is known.
+        (if (gethash fully-read-event-id (ement-session-events ement-session))
+            ;; The fully-read event (i.e. the message event that was read, not the
+            ;; account-data event) is already retrieved, but the marker is not present in
+            ;; the buffer (this shouldn't happen, but somehow, it can): Reset the marker,
+            ;; which should work around the problem.
+            (ement-room-mark-read ement-room ement-session
+              :fully-read-event (gethash fully-read-event-id (ement-session-events ement-session)))
+          ;; Fully-read event not retrieved: search for it in room history.
+          (let ((buffer (current-buffer)))
+            (message "Searching for first unread event...")
+            (ement-room-retro-to ement-room ement-session fully-read-event-id
+              :then (lambda ()
+                      (with-current-buffer buffer
+                        ;; HACK: Should probably call this function elsewhere, in a hook or something.
+                        (ement-room-move-read-markers ement-room)
+                        (ement-room-goto-fully-read-marker))))))
+      (error "Room has no fully-read event"))))
+
+(cl-defun ement-room-mark-read (room session &key read-event fully-read-event)
+  "Mark ROOM on SESSION as read on the server.
+Set \"m.read\" to READ-EVENT and \"m.fully_read\" to
+FULLY-READ-EVENT.  Return the API request.
+
+Interactively, mark both types as read up to event at point."
+  (declare (indent defun))
+  (interactive
+   (progn
+     (cl-assert (equal 'ement-room-mode major-mode) nil
+                "This command is to be used in `ement-room-mode' buffers")
+     (let* ((node (ewoc-locate ement-ewoc))
+            (event-at-point (cl-typecase (ewoc-data node)
+                              (ement-event (ewoc-data node))
+                              (t (when-let ((prev-event-node (ement-room--ewoc-next-matching ement-ewoc node
+                                                               #'ement-event-p #'ewoc-prev)))
+                                   (ewoc-data prev-event-node)))))
+            (last-event (ewoc-data (ement-room--ewoc-last-matching ement-ewoc #'ement-event-p)))
+            (event-to-mark-read (if (eq event-at-point last-event)
+                                    ;; The node is at the end of the buffer: use the last event in the timeline
+                                    ;; instead of the last node in the EWOC, because the last event in the timeline
+                                    ;; might not be the last event in the EWOC (e.g. a reaction to an earlier event).
+                                    (car (ement-room-timeline ement-room))
+                                  event-at-point)))
+       (list ement-room ement-session
+             :read-event event-to-mark-read
+             :fully-read-event event-to-mark-read))))
+  (cl-assert room) (cl-assert session) (cl-assert (or read-event fully-read-event))
+  (if (not fully-read-event)
+      ;; Sending only a read receipt, which uses a different endpoint
+      ;; than when setting the fully-read marker or both.
+      (ement-room-send-receipt room session read-event)
+    ;; Setting the fully-read marker, and maybe the "m.read" one too.
+    (pcase-let* (((cl-struct ement-room (id room-id)) room)
+                 (endpoint (format "rooms/%s/read_markers" (url-hexify-string room-id)))
+                 (data (ement-alist "m.fully_read" (ement-event-id fully-read-event))))
+      (when read-event
+        (push (cons "m.read" (ement-event-id read-event)) data))
+      ;; NOTE: See similar code in `ement-room-update-read-receipt'.
+      (let ((request-process (ement-api session endpoint :method 'post :data (json-encode data)
+                               :then (lambda (_data)
+                                       (ement-room-move-read-markers room
+                                         :read-event read-event :fully-read-event fully-read-event))
+                               :else (lambda (plz-error)
+                                       (pcase (plz-error-message plz-error)
+                                         ("curl process interrupted"
+                                          ;; Ignore this, because it happens when we
+                                          ;; update a read marker before the previous
+                                          ;; update request is completed.
+                                          nil)
+                                         (_ (signal 'ement-api-error
+                                                    (list (format "Ement: (ement-room-mark-read) Unexpected API error: %s"
+                                                                  plz-error)
+                                                          plz-error))))))))
+        (when-let ((room-buffer (alist-get 'buffer (ement-room-local room))))
+          ;; NOTE: Ideally we would do this before sending the new request, but to make
+          ;; the code much simpler, we do it afterward.
+          (with-current-buffer room-buffer
+            (when-let ((request-process (car (map-values ement-room-read-receipt-request))))
+              (when (process-live-p request-process)
+                (interrupt-process request-process)))
+            (setf ement-room-read-receipt-request nil
+                  (alist-get read-event ement-room-read-receipt-request) request-process)))))))
+
+(cl-defun ement-room-send-receipt (room session event &key (type "m.read"))
+  "Send receipt of TYPE for EVENT to ROOM on SESSION."
+  (pcase-let* (((cl-struct ement-room (id room-id)) room)
+               ((cl-struct ement-event (id event-id)) event)
+               (endpoint (format "rooms/%s/receipt/%s/%s"
+                                 (url-hexify-string room-id) type
+                                 (url-hexify-string event-id))))
+    (ement-api session endpoint :method 'post :data "{}"
+      :then (pcase type
+              ("m.read" (lambda (_data)
+                          (ement-room-move-read-markers room
+                            :read-event event)))
+              ;; No other type is yet specified.
+              (_ #'ignore)))))
+
+(cl-defun ement-room-move-read-markers
+    (room &key
+          (read-event (when-let ((event (alist-get "m.read" (ement-room-account-data room) nil nil #'equal)))
+                        (map-nested-elt event '(content event_id))))
+          (fully-read-event (when-let ((event (alist-get "m.fully_read" (ement-room-account-data room) nil nil #'equal)))
+                              (map-nested-elt event '(content event_id)))))
+  "Move read markers in ROOM to READ-EVENT and FULLY-READ-EVENT.
+Each event may be an `ement-event' struct or an event ID.  This
+updates the markers in ROOM's buffer, not on the server; see
+`ement-room-mark-read' for that."
+  (declare (indent defun))
+  (cl-labels ((update-marker (symbol to-event)
+                (let* ((old-node (symbol-value symbol))
+                       (new-event-id (cl-etypecase to-event
+                                       (ement-event (ement-event-id to-event))
+                                       (string to-event)))
+                       ;; FIXME: Some events, like reactions, are not inserted into the
+                       ;; EWOC directly, and if a read marker refers to such an event, the
+                       ;; place for the read marker will not be found.
+                       (event-node (ement-room--ewoc-last-matching ement-ewoc
+                                     (lambda (data)
+                                       (and (ement-event-p data)
+                                            (equal (ement-event-id data) new-event-id)))))
+                       (inhibit-read-only t))
+                  (with-silent-modifications
+                    (when old-node
+                      (ewoc-delete ement-ewoc old-node))
+                    (set symbol (when event-node
+                                  ;; If the event hasn't been inserted into the buffer yet,
+                                  ;; this might be nil.  That shouldn't happen, but...
+                                  (ewoc-enter-after ement-ewoc event-node symbol)))))))
+    (when-let ((buffer (alist-get 'buffer (ement-room-local room))))
+      ;; MAYBE: Error if no buffer?  Or does it matter?
+      (with-current-buffer buffer
+        (when read-event
+          (update-marker 'ement-room-read-receipt-marker read-event))
+        (when fully-read-event
+          (update-marker 'ement-room-fully-read-marker fully-read-event))))
+    ;; NOTE: Return nil so that, in the event this function is called manually with `eval-expression',
+    ;; it does not cause an error due to the return value being an EWOC node, which is a structure too
+    ;; big and/or circular to print.  (This was one of those bugs that only happens WHEN debugging.)
+    nil))
+
+(defun ement-room-scroll-up-mark-read ()
+  "Scroll buffer contents up, move fully read marker, and bury when at end.
+Moves fully read marker to the top of the window (when the
+marker's position is within the range of received events).  At
+end-of-buffer, moves fully read marker to after the last event,
+buries the buffer and shows the next unread room, if any."
+  (declare (function ement-tabulated-room-list-next-unread "ement-tabulated-room-list")
+           (function ement-room-list-next-unread "ement-room-list"))
+  (interactive)
+  (if (= (window-point) (point-max))
+      (progn
+        ;; At the bottom of the buffer: mark read and show next unread room.
+        (when ement-room-mark-rooms-read
+          (ement-room-mark-read ement-room ement-session
+            :read-event (ewoc-data (ement-room--ewoc-last-matching ement-ewoc
+                                     (lambda (data) (ement-event-p data))))
+            :fully-read-event (ewoc-data (ement-room--ewoc-last-matching ement-ewoc
+                                           (lambda (data) (ement-event-p data))))))
+        (set-buffer-modified-p nil)
+        (if-let ((rooms-window (cl-find-if (lambda (window)
+                                             (member (buffer-name (window-buffer window))
+                                                     '("*Ement Taxy*" "*Ement Rooms*")))
+                                           (window-list))))
+            ;; Rooms buffer already displayed: select its window and move to next unread room.
+            (progn
+              (select-window rooms-window)
+              (funcall (pcase-exhaustive major-mode
+                         ('ement-tabulated-room-list-mode #'ement-tabulated-room-list-next-unread)
+                         ('ement-room-list-mode #'ement-room-list-next-unread))))
+          ;; Rooms buffer not displayed: bury this room buffer, which should usually
+          ;; result in another room buffer or the rooms list buffer being displayed.
+          (bury-buffer))
+        (when (member major-mode '(ement-tabulated-room-list-mode ement-room-list-mode))
+          ;; Back in the room-list buffer: revert it.
+          (revert-buffer)))
+    ;; Not at the bottom of the buffer: scroll.
+    (condition-case _err
+        (scroll-up-command)
+      (end-of-buffer (set-window-point nil (point-max))))
+    (when-let* ((node (ewoc-locate ement-ewoc (window-start)))
+                (event-node (ement-room--ewoc-next-matching ement-ewoc node
+                              #'ement-event-p #'ewoc-prev))
+                (fully-read-pos (and ement-room-fully-read-marker
+                                     (ewoc-location ement-room-fully-read-marker)))
+                ((< fully-read-pos (ewoc-location event-node))))
+      ;; Move fully-read marker to top of window.
+      (ement-room-mark-read ement-room ement-session :fully-read-event (ewoc-data event-node)))))
+
+;;;;; EWOC
+
+(cl-defun ement-room--ewoc-next-matching (ewoc node pred &optional (move-fn #'ewoc-next))
+  "Return the next node in EWOC after NODE that PRED is true of.
+PRED is called with node's data.  Moves to next node by MOVE-FN."
+  (declare (indent defun))
+  (cl-loop do (setf node (funcall move-fn ewoc node))
+           until (or (null node)
+                     (funcall pred (ewoc-data node)))
+           finally return node))
+
+(defun ement-room--ewoc-last-matching (ewoc predicate)
+  "Return the last node in EWOC matching PREDICATE.
+PREDICATE is called with node's data.  Searches backward from
+last node."
+  (declare (indent defun))
+  ;; Intended to be like `ewoc-collect', but returning as soon as a match is found.
+  (cl-loop with node = (ewoc-nth ewoc -1)
+           while node
+           when (funcall predicate (ewoc-data node))
+           return node
+           do (setf node (ewoc-prev ewoc node))))
+
+(defun ement-room--ewoc-collect-nodes (ewoc predicate)
+  "Collect all nodes in EWOC matching PREDICATE.
+PREDICATE is called with the full node."
+  ;; Intended to be like `ewoc-collect', but working with the full node instead of just the node's data.
+  (cl-loop with node = (ewoc-nth ewoc 0)
+           do (setf node (ewoc-next ewoc node))
+           while node
+           when (funcall predicate node)
+           collect node))
+
+(defun ement-room--insert-ts-headers (&optional start-node end-node)
+  "Insert timestamp headers into current buffer's `ement-ewoc'.
+Inserts headers between START-NODE and END-NODE, which default to
+the first and last nodes in the buffer, respectively."
+  (let* ((type-predicate (lambda (node-data)
+                           (and (ement-event-p node-data)
+                                (not (equal "m.room.member" (ement-event-type node-data))))))
+         (ewoc ement-ewoc)
+         (end-node (or end-node
+                       (ewoc-nth ewoc -1)))
+         (end-pos (if end-node
+                      (ewoc-location end-node)
+                    ;; HACK: Trying to work around a bug in case the
+                    ;; room doesn't seem to have any events yet.
+                    (point-max)))
+         (node-b (or start-node (ewoc-nth ewoc 0)))
+         node-a)
+    ;; On the first loop iteration, node-a is set to the first matching
+    ;; node after node-b; then it's set to the first node after node-a.
+    (while (and (setf node-a (ement-room--ewoc-next-matching ewoc (or node-a node-b) type-predicate)
+                      node-b (when node-a
+                               (ement-room--ewoc-next-matching ewoc node-a type-predicate)))
+                (not (or (> (ewoc-location node-a) end-pos)
+                         (when node-b
+                           (> (ewoc-location node-b) end-pos)))))
+      (cl-labels ((format-event (event)
+                    (format "TS:%S (%s)  Sender:%s  Message:%S"
+                            (/ (ement-event-origin-server-ts (ewoc-data event)) 1000)
+                            (format-time-string "%Y-%m-%d %H:%M:%S"
+                                                (/ (ement-event-origin-server-ts (ewoc-data event)) 1000))
+                            (ement-user-id (ement-event-sender (ewoc-data event)))
+                            (when (alist-get 'body (ement-event-content (ewoc-data event)))
+                              (substring-no-properties
+                               (truncate-string-to-width (alist-get 'body (ement-event-content (ewoc-data event))) 20))))))
+        (ement-debug "Comparing event timestamps:"
+                     (list 'A (format-event node-a))
+                     (list 'B (format-event node-b))))
+      ;; NOTE: Matrix timestamps are in milliseconds.
+      (let* ((a-ts (/ (ement-event-origin-server-ts (ewoc-data node-a)) 1000))
+             (b-ts (/ (ement-event-origin-server-ts (ewoc-data node-b)) 1000))
+             (diff-seconds (- b-ts a-ts))
+             (ement-room-timestamp-header-format ement-room-timestamp-header-format))
+        (when (and (>= diff-seconds ement-room-timestamp-header-delta)
+                   (not (when-let ((node-after-a (ewoc-next ewoc node-a)))
+                          (pcase (ewoc-data node-after-a)
+                            (`(ts . ,_) t)
+                            ((or 'ement-room-read-receipt-marker 'ement-room-fully-read-marker) t)))))
+          (unless (equal (time-to-days a-ts) (time-to-days b-ts))
+            ;; Different date: bind format to print date.
+            (let ((ement-room-timestamp-header-format ement-room-timestamp-header-with-date-format))
+              ;; Insert the date-only header.
+              (setf node-a (ewoc-enter-after ewoc node-a (list 'ts b-ts)))))
+          (with-silent-modifications
+            ;; Avoid marking a buffer as modified just because we inserted a ts
+            ;; header (this function may be called after other events which shouldn't
+            ;; cause it to be marked modified, like moving the read markers).
+            (ewoc-enter-after ewoc node-a (list 'ts b-ts))))))))
+
+(cl-defun ement-room--insert-sender-headers
+    (ewoc &optional (start-node (ewoc-nth ewoc 0)) (end-node (ewoc-nth ewoc -1)))
+  ;; TODO: Use this in appropriate places.
+  "Insert sender headers into EWOC.
+Inserts headers between START-NODE and END-NODE, which default to
+the first and last nodes in the buffer, respectively."
+  (cl-labels ((message-event-p (data)
+                (and (ement-event-p data)
+                     (equal "m.room.message" (ement-event-type data)))))
+    (when (and start-node (not (message-event-p (ewoc-data start-node))))
+      ;; Start node not a message event: forward to next message event (and if none are
+      ;; found, there's nothing to do).
+      (setf start-node (ement-room--ewoc-next-matching ewoc start-node #'message-event-p)))
+    (when end-node
+      ;; Set end node to first message event after it.  (This simplifies the loop by
+      ;; continuing until finding `end-node' or the last node, and ensures we fix headers
+      ;; after any inserted messages.)
+      (setf end-node (ement-room--ewoc-next-matching ewoc end-node #'message-event-p)))
+    (let ((event-node start-node) prev-node)
+      (while (and event-node (not (eq event-node end-node)))
+        (setf prev-node
+              ;; Find previous message or user header.
+              (ement-room--ewoc-next-matching ewoc event-node
+                (lambda (data)
+                  (or (ement-user-p data) (message-event-p data)))
+                #'ewoc-prev))
+        (let ((sender (ement-event-sender (ewoc-data event-node))))
+          (cond ((not prev-node)
+                 ;; No previous message/sender: insert sender.
+                 (ewoc-enter-before ewoc event-node sender))
+                ((ement-user-p (ewoc-data prev-node))
+                 ;; Previous node is a sender.
+                 (unless (equal sender (ewoc-data prev-node))
+                   ;; Previous node is the wrong sender: fix it.
+                   (ewoc-set-data prev-node sender)))
+                ((and (message-event-p (ewoc-data prev-node))
+                      (not (equal sender (ement-event-sender (ewoc-data prev-node)))))
+                 ;; Previous node is a message from a different sender: insert header.
+                 (ewoc-enter-before ewoc event-node sender))))
+        (setf event-node (ement-room--ewoc-next-matching ewoc event-node #'message-event-p))))))
+
+(defun ement-room--coalesce-nodes (a b ewoc)
+  "Try to coalesce events in nodes A and B in EWOC.
+Return absorbing node if coalesced."
+  ;; NOTE: This does not coalesce two `ement-room-membership-events' nodes; it only
+  ;; coalesces an individual membership event into another one or into an
+  ;; `ement-room-membership-events' node.
+  ;; TODO: Allow two `ement-room-membership-events' nodes to be coalesced.
+  (cl-labels ((coalescable-p (node)
+                (or (and (ement-event-p (ewoc-data node))
+                         (member (ement-event-type (ewoc-data node)) '("m.room.member")))
+                    (ement-room-membership-events-p (ewoc-data node)))))
+    (when (and (coalescable-p a) (coalescable-p b))
+      (let* ((absorbing-node (if (or (ement-room-membership-events-p (ewoc-data a))
+                                     (not (ement-room-membership-events-p (ewoc-data b))))
+                                 a b))
+             (absorbed-node (if (eq absorbing-node a) b a)))
+        (when (cl-etypecase (ewoc-data absorbing-node)
+                (ement-room-membership-events
+                 (pcase-exhaustive ement-room-coalesce-events
+                   ((pred integerp)
+                    (< (length (ement-room-membership-events-events (ewoc-data absorbing-node)))
+                       ement-room-coalesce-events))
+                   (`t t)))
+                (ement-event
+                 (setf (ewoc-data absorbing-node)
+                       (ement-room-membership-events--update
+                        (make-ement-room-membership-events
+                         :events (list (ewoc-data absorbing-node)))))))
+          (push (ewoc-data absorbed-node)
+                (ement-room-membership-events-events (ewoc-data absorbing-node)))
+          (ement-room-membership-events--update (ewoc-data absorbing-node))
+          (ewoc-delete ewoc absorbed-node)
+          (ewoc-invalidate ewoc absorbing-node)
+          absorbing-node)))))
+
+(defun ement-room--insert-event (event)
+  "Insert EVENT into current buffer."
+  (cl-labels ((format-event (event)
+                (format "TS:%S (%s)  Sender:%s  Message:%S"
+                        (/ (ement-event-origin-server-ts event) 1000)
+                        (format-time-string "%Y-%m-%d %H:%M:%S"
+                                            (/ (ement-event-origin-server-ts event) 1000))
+                        (ement-user-id (ement-event-sender event))
+                        (when (alist-get 'body (ement-event-content event))
+                          (substring-no-properties
+                           (truncate-string-to-width (alist-get 'body (ement-event-content event)) 20)))))
+              (find-node-if (ewoc pred &key (move #'ewoc-prev) (start (ewoc-nth ewoc -1)))
+                "Return node in EWOC whose data matches PRED.
+Search starts from node START and moves by NEXT."
+                (cl-loop for node = start then (funcall move ewoc node)
+                         while node
+                         when (funcall pred (ewoc-data node))
+                         return node))
+              (timestamped-node-p (data)
+                (pcase data
+                  ((pred ement-event-p) t)
+                  ((pred ement-room-membership-events-p) t)
+                  (`(ts . ,_) t)))
+              (read-marker-p
+                (data) (member data '(ement-room-fully-read-marker
+                                      ement-room-read-receipt-marker)))
+              (node-ts (data)
+                (pcase data
+                  ((pred ement-event-p) (ement-event-origin-server-ts data))
+                  ((pred ement-room-membership-events-p)
+                   ;; Not sure whether to use earliest or latest ts; let's try this for now.
+                   (ement-room-membership-events-earliest-ts data))
+                  (`(ts ,ts)
+                   ;; Matrix server timestamps are in ms, so we must convert back.
+                   (* 1000 ts))))
+              (node< (a b)
+                "Return non-nil if event A's timestamp is before B's."
+                (< (node-ts a) (node-ts b))))
+    (ement-debug "INSERTING NEW EVENT: " (format-event event))
+    (let* ((ewoc ement-ewoc)
+           (event-node-before (ement-room--ewoc-node-before ewoc event #'node< :pred #'timestamped-node-p))
+           new-node)
+      ;; HACK: Insert after any read markers.
+      (cl-loop for node-after-node-before = (ewoc-next ewoc event-node-before)
+               while node-after-node-before
+               while (read-marker-p (ewoc-data node-after-node-before))
+               do (setf event-node-before node-after-node-before))
+      (setf new-node (if (not event-node-before)
+                         (progn
+                           (ement-debug "No event before it: add first.")
+                           (if-let ((first-node (ewoc-nth ewoc 0)))
+                               (progn
+                                 (ement-debug "EWOC not empty.")
+                                 (if (and (ement-user-p (ewoc-data first-node))
+                                          (equal (ement-event-sender event)
+                                                 (ewoc-data first-node)))
+                                     (progn
+                                       (ement-debug "First node is header for this sender: insert after it, instead.")
+                                       (setf event-node-before first-node)
+                                       (ewoc-enter-after ewoc first-node event))
+                                   (ement-debug "First node is not header for this sender: insert first.")
+                                   (ewoc-enter-first ewoc event)))
+                             (ement-debug "EWOC empty: add first.")
+                             (ewoc-enter-first ewoc event)))
+                       (ement-debug "Found event before new event: insert after it.")
+                       (when-let ((next-node (ewoc-next ewoc event-node-before)))
+                         (when (and (ement-user-p (ewoc-data next-node))
+                                    (equal (ement-event-sender event)
+                                           (ewoc-data next-node)))
+                           (ement-debug "Next node is header for this sender: insert after it, instead.")
+                           (setf event-node-before next-node)))
+                       (ement-debug "Inserting after event"
+                                    ;; NOTE: `format-event' is only for debugging, and it
+                                    ;; doesn't handle user headers, so commenting it out or now.
+                                    ;; (format-event (ewoc-data event-node-before))
+
+                                    ;; NOTE: And it's *Very Bad* to pass the raw node data
+                                    ;; to `ement-debug', because it makes event insertion
+                                    ;; *Very Slow*.  So we just comment that out for now.
+                                    ;; (ewoc-data event-node-before)
+                                    )
+                       (ewoc-enter-after ewoc event-node-before event)))
+      (when ement-room-coalesce-events
+        ;; Try to coalesce events.
+        ;; TODO: Move this to a separate function and call it from where this function is called.
+        (setf new-node (or (when event-node-before
+                             (ement-room--coalesce-nodes event-node-before new-node ewoc))
+                           (when (ewoc-next ewoc new-node)
+                             (ement-room--coalesce-nodes new-node (ewoc-next ewoc new-node) ewoc))
+                           new-node)))
+      (when ement-room-sender-in-headers
+        (ement-room--insert-sender-headers ewoc new-node new-node))
+      ;; Return new node.
+      new-node)))
+
+(defun ement-room--replace-event (new-event)
+  "Replace appropriate event with NEW-EVENT in current buffer.
+If replaced event is not found, return nil, otherwise non-nil."
+  (let* ((ewoc ement-ewoc)
+         (old-event-node (ement-room--ewoc-last-matching ewoc
+                           (lambda (data)
+                             (cl-typecase data
+                               (ement-event (ement--events-equal-p data new-event)))))))
+    (when old-event-node
+      ;; TODO: Record old events in new event's local data, and make it accessible when inspecting the new event.
+      (let ((node-before (ewoc-prev ewoc old-event-node))
+            (inhibit-read-only t))
+        (ewoc-delete ewoc old-event-node)
+        (if node-before
+            (ewoc-enter-after ewoc node-before new-event)
+          (ewoc-enter-first ewoc new-event))))))
+
+(cl-defun ement-room--ewoc-node-before (ewoc data <-fn
+                                             &key (from 'last) (pred #'identity))
+  "Return node in EWOC that matches PRED and belongs before DATA by <-FN.
+Search from FROM (either `first' or `last')."
+  (cl-assert (member from '(first last)))
+  (if (null (ewoc-nth ewoc 0))
+      (ement-debug "EWOC is empty: returning nil.")
+    (ement-debug "EWOC has data: add at appropriate place.")
+    (cl-labels ((next-matching (ewoc node next-fn pred)
+                  (cl-loop do (setf node (funcall next-fn ewoc node))
+                           until (or (null node)
+                                     (funcall pred (ewoc-data node)))
+                           finally return node)))
+      (let* ((next-fn (pcase from ('first #'ewoc-next) ('last #'ewoc-prev)))
+             (start-node (ewoc-nth ewoc (pcase from ('first 0) ('last -1)))))
+        (unless (funcall pred (ewoc-data start-node))
+          (setf start-node (next-matching ewoc start-node next-fn pred)))
+        (if (funcall <-fn (ewoc-data start-node) data)
+            (progn
+              (ement-debug "New data goes before start node.")
+              start-node)
+          (ement-debug "New data goes after start node: find node before new data.")
+          (let ((compare-node start-node))
+            (cl-loop while (setf compare-node (next-matching ewoc compare-node next-fn pred))
+                     until (funcall <-fn (ewoc-data compare-node) data)
+                     finally return (if compare-node
+                                        (progn
+                                          (ement-debug "Found place: enter there.")
+                                          compare-node)
+                                      (ement-debug "Reached end of collection: insert there.")
+                                      (pcase from
+                                        ('first (ewoc-nth ewoc -1))
+                                        ('last nil))))))))))
+
+;;;;; Formatting
+
+(defun ement-room--pp-thing (thing)
+  "Pretty-print THING.
+To be used as the pretty-printer for `ewoc-create'.  THING may be
+an `ement-event' or `ement-user' struct, or a list like `(ts
+TIMESTAMP)', where TIMESTAMP is a Unix timestamp number of
+seconds."
+  ;; TODO: Use handlers to insert so e.g. membership events can be inserted silently.
+
+  ;; TODO: Use `cl-defmethod' and define methods for each of these THING types.  (I've
+  ;; benchmarked thoroughly and found no difference in performance between using
+  ;; `cl-defmethod' and using a `defun' with `pcase', so as long as the `cl-defmethod'
+  ;; specializer is sufficient, I see no reason not to use it.)
+  (pcase-exhaustive thing
+    ((pred ement-event-p)
+     (insert "" (ement-room--format-event thing ement-room ement-session)))
+    ((pred ement-user-p)
+     (insert (propertize (ement--format-user thing)
+                         'display ement-room-username-display-property)))
+    (`(ts ,(and (pred numberp) ts)) ;; Insert a date header.
+     (let* ((string (format-time-string ement-room-timestamp-header-format ts))
+            (width (string-width string))
+            (maybe-newline (if (equal ement-room-timestamp-header-format ement-room-timestamp-header-with-date-format)
+                               ;; HACK: Rather than using another variable, compare the format strings to
+                               ;; determine whether the date is changing: if so, add a newline before the header.
+                               (progn
+                                 (cl-incf width 3)
+                                 "\n")
+                             ""))
+            (alignment-space (pcase ement-room-timestamp-header-align
+                               ('right (propertize " "
+                                                   'display `(space :align-to (- text ,(1+ width)))))
+                               ('center (propertize " "
+                                                    'display `(space :align-to (- center ,(/ (1+ width) 2)))))
+                               (_ " "))))
+       (insert maybe-newline
+               alignment-space
+               (propertize string
+                           'face 'ement-room-timestamp-header))))
+    ((or 'ement-room-read-receipt-marker 'ement-room-fully-read-marker)
+     (insert (propertize " "
+                         'display '(space :width text :height (1))
+                         'face thing)))
+    ((pred ement-room-membership-events-p)
+     (let ((formatted-events (ement-room--format-membership-events thing ement-room)))
+       (add-face-text-property 0 (length formatted-events)
+                               'ement-room-membership 'append formatted-events)
+       (insert (ement-room-wrap-prefix formatted-events))))))
+
+;; (defun ement-room--format-event (event)
+;;   "Format `ement-event' EVENT."
+;;   (pcase-let* (((cl-struct ement-event sender type content origin-server-ts) event)
+;;                ((map body format ('formatted_body formatted-body)) content)
+;;                (ts (/ origin-server-ts 1000)) ; Matrix timestamps are in milliseconds.
+;;                (body (if (not formatted-body)
+;;                          body
+;;                        (pcase format
+;;                          ("org.matrix.custom.html"
+;;                           (ement-room--render-html formatted-body))
+;;                          (_ (format "[unknown formatted-body format: %s] %s" format body)))))
+;;                (timestamp (propertize
+;;                            " " 'display `((margin left-margin)
+;;                                           ,(propertize (format-time-string ement-room-timestamp-format ts)
+;;                                                        'face 'ement-room-timestamp))))
+;;                (body-face (pcase type
+;;                             ("m.room.member" 'ement-room-membership)
+;;                             (_ (if (equal (ement-user-id sender)
+;;                                           (ement-user-id (ement-session-user ement-session)))
+;;                                 'ement-room-self-message 'default))))
+;;                (string (pcase type
+;;                          ("m.room.message" body)
+;;                          ("m.room.member" "")
+;;                          (_ (format "[unknown event-type: %s] %s" type body)))))
+;;     (add-face-text-property 0 (length body) body-face 'append body)
+;;     (prog1 (concat timestamp string)
+;;       ;; Hacky or elegant?  We return the string, but for certain event
+;;       ;; types, we also insert a widget (this function is called by
+;;       ;; EWOC with point at the insertion position).  Seems to work...
+;;       (pcase type
+;;         ("m.room.member"
+;;          (widget-create 'ement-room-membership
+;;                      :button-face 'ement-room-membership
+;;                         :value (list (alist-get 'membership content))))))))
+
+(defun ement-room--format-event (event room session)
+  "Return EVENT in ROOM on SESSION formatted.
+Formats according to `ement-room-message-format-spec', which see."
+  (concat (pcase (ement-event-type event)
+            ;; TODO: Define these with a macro, like the defevent and format-spec ones.
+            ("m.room.message" (ement-room--format-message event room session))
+            ("m.room.member"
+             (widget-create 'ement-room-membership
+                            :button-face 'ement-room-membership
+                            :value event)
+             "")
+            ("m.reaction"
+             ;; Handled by defevent-based handler.
+             "")
+            ("m.room.avatar"
+             (ement-room-wrap-prefix
+               (format "%s changed the room's avatar."
+                       (propertize (ement--user-displayname-in room (ement-event-sender event))
+                                   'help-echo (ement-user-id (ement-event-sender event))))
+               'face 'ement-room-membership))
+            ("m.room.power_levels"
+             (ement-room--format-power-levels-event event room session))
+            ("m.room.canonical_alias"
+             (ement-room--format-canonical-alias-event event room session))
+            (_ (ement-room-wrap-prefix
+                 (format "[sender:%s type:%s]"
+                         (ement-user-id (ement-event-sender event))
+                         (ement-event-type event))
+                 'help-echo (format "%S" (ement-event-content event)))))
+          (propertize " "
+                      'display ement-room-event-separator-display-property)))
+
+(defun ement-room--format-reactions (event room)
+  "Return formatted reactions to EVENT in ROOM."
+  ;; TODO: Like other events, pop to a buffer showing the raw reaction events when a key is pressed.
+  (cl-labels
+      ((format-reaction (ks)
+         (pcase-let* ((`(,key . ,senders) ks)
+                      (key (propertize key 'face 'ement-room-reactions-key))
+                      (count (propertize (format " (%s)"
+                                                 (if (length> senders ement-room-reaction-names-limit)
+                                                     (length senders)
+                                                   (senders-names senders room)))
+                                         'face 'ement-room-reactions))
+                      (string
+                       (propertize (concat key count)
+                                   'button '(t)
+                                   'category 'default-button
+                                   'action #'ement-room-reaction-button-action
+                                   'follow-link t
+                                   'help-echo (lambda (_window buffer _pos)
+                                                ;; NOTE: If the reaction key string is a Unicode character composed
+                                                ;; with, e.g. "VARIATION SELECTOR-16", `string-to-char' ignores the
+                                                ;; composed modifier/variation-selector and just returns the first
+                                                ;; character of the string.  This should be fine, since it's just
+                                                ;; for the tooltip.
+                                                (concat
+                                                 (get-char-code-property (string-to-char key) 'name) ": "
+                                                 (senders-names senders (buffer-local-value 'ement-room buffer))))))
+                      (local-user-p (cl-member (ement-user-id (ement-session-user ement-session)) senders
+                                               :key #'ement-user-id :test #'equal)))
+           (when local-user-p
+             (add-face-text-property 0 (length string) '(:box (:style pressed-button) :inverse-video t)
+                                     nil string))
+           (ement--remove-face-property string 'button)
+           string))
+       (senders-names (senders room)
+         (cl-loop for sender in senders
+                  collect (ement--user-displayname-in room sender)
+                  into names
+                  finally return (string-join names ", "))))
+    (if-let ((reactions (map-elt (ement-event-local event) 'reactions)))
+        (cl-loop with keys-senders
+                 for reaction in reactions
+                 for key = (map-nested-elt (ement-event-content reaction) '(m.relates_to key))
+                 for sender = (ement-event-sender reaction)
+                 do (push sender (alist-get key keys-senders nil nil #'string=))
+                 finally do (setf keys-senders (cl-sort keys-senders #'> :key (lambda (pair) (length (cdr pair)))))
+                 finally return (concat "\n  " (mapconcat #'format-reaction keys-senders "  ")))
+      "")))
+
+(cl-defun ement-room--format-message (event room session &optional (format ement-room-message-format-spec))
+  "Return EVENT in ROOM on SESSION formatted according to FORMAT.
+Format defaults to `ement-room-message-format-spec', which see."
+  ;; Bind this locally so formatters can modify it for this call.
+  (let ((ement-room--format-message-margin-p)
+        (left-margin-width ement-room-left-margin-width)
+        (right-margin-width ement-room-right-margin-width))
+    ;; Copied from `format-spec'.
+    (with-current-buffer
+        (or (get-buffer " *ement-room--format-message*")
+            ;; TODO: Kill this buffer when disconnecting from all sessions.
+            (with-current-buffer (get-buffer-create " *ement-room--format-message*")
+              (setq buffer-undo-list t)
+              (current-buffer)))
+      (erase-buffer)
+      ;; Pretend this is a room buffer.
+      (setf ement-session session
+            ement-room room)
+      ;; HACK: Setting these buffer-locally in a temp buffer is ugly.
+      (setq-local ement-room-left-margin-width left-margin-width)
+      (setq-local ement-room-right-margin-width right-margin-width)
+      (insert format)
+      (goto-char (point-min))
+      (while (search-forward "%" nil t)
+        (cond
+         ((eq (char-after) ?%)
+          ;; Quoted percent sign.
+          (delete-char 1))
+         ((looking-at "\\([-0-9.]*\\)\\([a-zA-Z]\\)")
+          ;; Valid format spec.
+          (let* ((num (match-string 1))
+                 (spec (string-to-char (match-string 2)))
+                 (_
+                  ;; We delete the specifier now, because the formatter may change the
+                  ;; match data, and we already have what we need.
+                  (delete-region (1- (match-beginning 0)) (match-end 0)))
+                 (formatter (or (alist-get spec ement-room-event-formatters)
+                                (error "Invalid format character: `%%%c'" spec)))
+                 (val (or (funcall formatter event room session)
+                          (let ((print-level 1))
+                            (propertize (format "[Event has no value for spec \"?%s\"]" (char-to-string spec))
+                                        'face 'font-lock-comment-face
+                                        'help-echo (format "%S" event)))))
+                 ;; Pad result to desired length.
+                 (text (format (concat "%" num "s") val)))
+            (insert text)))
+         (t
+          ;; Signal an error on bogus format strings.
+          (error "ement-room--format-message: Invalid format string: %S" format))))
+      ;; Propertize margin text.
+      (when ement-room--format-message-wrap-prefix
+        (when-let ((wrap-prefix-end (next-single-property-change (point-min) 'wrap-prefix-end)))
+          (goto-char wrap-prefix-end)
+          (delete-char 1)
+          (let* ((prefix-width (string-width (buffer-substring-no-properties
+                                              (line-beginning-position) (point))))
+                 (prefix (propertize " " 'display `((space :width ,prefix-width)))))
+            ;; We apply the prefix to the entire event as `wrap-prefix', and to just the
+            ;; body as `line-prefix'.
+            (put-text-property (point-min) (point-max) 'wrap-prefix prefix)
+            (put-text-property (point) (point-max) 'line-prefix prefix))))
+      (when ement-room--format-message-margin-p
+        (when-let ((left-margin-end (next-single-property-change (point-min) 'left-margin-end)))
+          (goto-char left-margin-end)
+          (delete-char 1)
+          (let ((left-margin-text-width (string-width (buffer-substring-no-properties (point-min) (point)))))
+            ;; It would be preferable to not have to allocate a string to
+            ;; calculate the display width, but I don't know of another way.
+            (put-text-property (point-min) (point)
+                               'display `((margin left-margin)
+                                          ,(buffer-substring (point-min) (point))))
+            (save-excursion
+              (goto-char (point-min))
+              ;; Insert a string with a display specification that causes it to be displayed in the
+              ;; left margin as a space that displays with the width of the difference between the
+              ;; left margin's width and the display width of the text in the left margin (whew).
+              ;; This is complicated, but it seems to work (minus a possible Emacs/Gtk bug that
+              ;; sometimes causes the space to have a little "junk" displayed in it at times, but
+              ;; that's not our fault).  (And this is another example of how well-documented Emacs
+              ;; is: this was only possible by carefully reading the Elisp manual.)
+              (insert (propertize " " 'display `((margin left-margin)
+                                                 (space :width (- left-margin ,left-margin-text-width))))))))
+        (when-let ((right-margin-start (next-single-property-change (point-min) 'right-margin-start)))
+          (goto-char right-margin-start)
+          (delete-char 1)
+          (let ((string (buffer-substring (point) (point-max))))
+            ;; Relocate its text to the beginning so it won't be
+            ;; displayed at the last line of wrapped messages.
+            (delete-region (point) (point-max))
+            (goto-char (point-min))
+            (insert-and-inherit
+             (propertize " "
+                         'display `((margin right-margin) ,string))))))
+      (buffer-string))))
+
+(cl-defun ement-room--format-message-body (event session &key (formatted-p t))
+  "Return formatted body of \"m.room.message\" EVENT on SESSION.
+If FORMATTED-P, return the formatted body content, when available."
+  (pcase-let* (((cl-struct ement-event content
+                           (unsigned (map ('redacted_by unsigned-redacted-by)))
+                           (local (map ('redacted-by local-redacted-by))))
+                event)
+               ((map ('body main-body) msgtype ('format content-format) ('formatted_body formatted-body)
+                     ('m.relates_to (map ('rel_type rel-type)))
+                     ('m.new_content (map ('body new-body) ('formatted_body new-formatted-body)
+                                          ('format new-content-format))))
+                content)
+               (body (or new-body main-body))
+               (formatted-body (or new-formatted-body formatted-body))
+               (body (if (or (not formatted-p) (not formatted-body))
+                         ;; Copy the string so as not to add face properties to the one in the struct.
+                         (copy-sequence body)
+                       (pcase (or new-content-format content-format)
+                         ("org.matrix.custom.html"
+                          (save-match-data
+                            (ement-room--render-html formatted-body)))
+                         (_ (format "[unknown body format: %s] %s"
+                                    (or new-content-format content-format) body)))))
+               (appendix (pcase msgtype
+                           ;; TODO: Face for m.notices.
+                           ((or "m.text" "m.emote" "m.notice") nil)
+                           ("m.image" (ement-room--format-m.image event session))
+                           ("m.file" (ement-room--format-m.file event))
+                           ("m.video" (ement-room--format-m.video event))
+                           ("m.audio" (ement-room--format-m.audio event))
+                           (_ (if (or local-redacted-by unsigned-redacted-by)
+                                  nil
+                                (format "[unsupported msgtype: %s]" msgtype ))))))
+    (when body
+      ;; HACK: Once I got an error when body was nil, so let's avoid that.
+      (setf body (ement-room--linkify-urls body)))
+    ;; HACK: Ensure body isn't nil (e.g. redacted messages can have empty bodies).
+    (unless body
+      (setf body (copy-sequence
+                  ;; Yes, copying this string is necessary here too, otherwise a single
+                  ;; string will be used across every call to this function, whose face
+                  ;; properties will be added to every time in other functions, which will
+                  ;; make a very big mess of face properties if a room's buffer is opened
+                  ;; and closed a few times.
+                  (if (or local-redacted-by unsigned-redacted-by)
+                      "[redacted]"
+                    "[message has no body content]"))))
+    (when appendix
+      (setf body (concat body " " appendix)))
+    (when (equal "m.replace" rel-type)
+      ;; Message is an edit.
+      (setf body (concat body " " (propertize "[edited]" 'face 'font-lock-comment-face))))
+    (when (and (or local-redacted-by unsigned-redacted-by)
+               ement-room-hide-redacted-message-content)
+      ;; Message is redacted and hiding is enabled: override the body to hide the content.
+      ;; (This is a bit of a hack, since we've already prepared the body at this point,
+      ;; but retrofitting this into the existing logic is more than I want to do right
+      ;; now.  There are probably 3 or 4 different ways and places we could handle
+      ;; redaction of content, and this seems like the simplest.)
+      (setf body "[redacted]"))
+    body))
+
+(defun ement-room--render-html (string)
+  "Return rendered version of HTML STRING.
+HTML is rendered to Emacs text using `shr-insert-document'."
+  (with-current-buffer
+      (or (get-buffer " *ement-room--render-html*")
+          ;; TODO: Kill this buffer when disconnecting from all sessions.
+          (with-current-buffer (get-buffer-create " *ement-room--render-html*")
+            (setq buffer-undo-list t)
+            (current-buffer)))
+    (erase-buffer)
+    (insert string)
+    (save-excursion
+      ;; NOTE: We workaround `shr`'s not indenting the blockquote properly (it
+      ;; doesn't seem to compensate for the margin).  I don't know exactly how
+      ;; `shr-tag-blockquote' and `shr-mark-fill' and `shr-fill-line' and
+      ;; `shr-indentation' work together, but through trial-and-error, this
+      ;; seems to work.  It even seems to work properly when a window is
+      ;; resized (i.e. the wrapping is adjusted automatically by redisplay
+      ;; rather than requiring the message to be re-rendered to HTML).
+      (let ((shr-use-fonts ement-room-use-variable-pitch)
+            (old-fn (symbol-function 'shr-tag-blockquote))) ;; Bind to a var to avoid unknown-function linting errors.
+        (cl-letf (((symbol-function 'shr-fill-line) #'ignore)
+                  ((symbol-function 'shr-tag-blockquote)
+                   (lambda (dom)
+                     (let ((beg (point-marker)))
+                       (funcall old-fn dom)
+                       (add-text-properties beg (point-max)
+                                            '( wrap-prefix "    "
+                                               line-prefix "    "))
+                       ;; NOTE: We use our own gv, `ement-text-property'; very convenient.
+                       (add-face-text-property beg (point-max) 'ement-room-quote 'append)))))
+          (shr-insert-document
+           (libxml-parse-html-region (point-min) (point-max))))))
+    (string-trim (buffer-substring (point) (point-max)))))
+
+(cl-defun ement-room--event-mentions-user-p (event user &optional (room ement-room))
+  "Return non-nil if EVENT in ROOM mentions USER."
+  (pcase-let* (((cl-struct ement-event content) event)
+               ((map body formatted_body) content)
+               (body (or formatted_body body)))
+    ;; FIXME: `ement--user-displayname-in' may not be returning the right result for the
+    ;; local user, so test the displayname slot too.  (But even that may be nil sometimes?
+    ;; Something needs to be fixed...)
+    ;; HACK: So we use the username slot, which was created just for this, for now.
+    (when body
+      (cl-macrolet ((matches-body-p
+                      (form) `(when-let ((string ,form))
+                                (string-match-p (regexp-quote string) body))))
+        (or (matches-body-p (ement-user-username user))
+            (matches-body-p (ement--user-displayname-in room user))
+            (matches-body-p (ement-user-id user)))))))
+
+(defun ement-room--linkify-urls (string)
+  "Return STRING with URLs in it made clickable."
+  ;; Is there an existing Emacs function to do this?  I couldn't find one.
+  ;; Yes, maybe: `goto-address-mode'.  TODO: Try goto-address-mode.
+  (with-temp-buffer
+    (insert string)
+    (goto-char (point-min))
+    (cl-loop while (re-search-forward (rx bow "http" (optional "s") "://" (1+ (not space)))
+                                      nil 'noerror)
+             do (make-text-button (match-beginning 0) (match-end 0)
+                                  'mouse-face 'highlight
+                                  'face 'link
+                                  'help-echo (match-string 0)
+                                  'action #'browse-url-at-mouse
+                                  'follow-link t))
+    (buffer-string)))
+
+;; NOTE: This function is not useful when displaynames are shown in the margin, because
+;; margins are not mouse-interactive in Emacs, therefore the help-echo function is called
+;; with the string and the position in the string, which leaves the buffer position
+;; unknown.  So we have to set the help-echo to a string rather than a function.  But the
+;; function may be useful in the future, so leaving it commented for now.
+
+;; (defun ement-room--user-help-echo (window _object pos)
+;;   "Return user ID string for POS in WINDOW.
+;; For use as a `help-echo' function on `ement-user' headings."
+;;   (let ((data (with-selected-window window
+;;                 (ewoc-data (ewoc-locate ement-ewoc pos)))))
+;;     (cl-typecase data
+;;       (ement-event (ement-user-id (ement-event-sender data)))
+;;       (ement-user (ement-user-id data)))))
+
+(defun ement-room--user-color (user)
+  "Return a color in which to display USER's messages."
+  (cl-labels ((relative-luminance (rgb)
+                ;; Copy of `modus-themes-wcag-formula', an elegant
+                ;; implementation by Protesilaos Stavrou.  Also see
+                ;; <https://en.wikipedia.org/wiki/Relative_luminance> and
+                ;; <https://www.w3.org/TR/WCAG20/#relativeluminancedef>.
+                (cl-loop for k in '(0.2126 0.7152 0.0722)
+                         for x in rgb
+                         sum (* k (if (<= x 0.03928)
+                                      (/ x 12.92)
+                                    (expt (/ (+ x 0.055) 1.055) 2.4)))))
+              (contrast-ratio (a b)
+                ;; Copy of `modus-themes-contrast'; see above.
+                (let ((ct (/ (+ (relative-luminance a) 0.05)
+                             (+ (relative-luminance b) 0.05))))
+                  (max ct (/ ct))))
+              (increase-contrast (color against target toward)
+                (let ((gradient (cdr (color-gradient color toward 20)))
+                      new-color)
+                  (cl-loop do (setf new-color (pop gradient))
+                           while new-color
+                           until (>= (contrast-ratio new-color against) target)
+                           ;; Avoid infinite loop in case of weirdness
+                           ;; by returning color as a fallback.
+                           finally return (or new-color color)))))
+    (let* ((id (ement-user-id user))
+           (id-hash (float (+ (abs (sxhash id)) ement-room-prism-color-adjustment)))
+           ;; TODO: Wrap-around the value to get the color I want.
+           (ratio (/ id-hash (float most-positive-fixnum)))
+           (color-num (round (* (* 255 255 255) ratio)))
+           (color-rgb (list (/ (float (logand color-num 255)) 255)
+                            (/ (float (ash (logand color-num 65280) -8)) 255)
+                            (/ (float (ash (logand color-num 16711680) -16)) 255)))
+           (background-rgb (color-name-to-rgb (face-background 'default))))
+      (when (< (contrast-ratio color-rgb background-rgb) ement-room-prism-minimum-contrast)
+        (setf color-rgb (increase-contrast color-rgb background-rgb ement-room-prism-minimum-contrast
+                                           (color-name-to-rgb (face-foreground 'default)))))
+      (apply #'color-rgb-to-hex (append color-rgb (list 2))))))
+
+;;;;; Compose buffer
+
+;; Compose messages in a separate buffer, like `org-edit-special'.
+
+(defvar-local ement-room-compose-buffer nil
+  "Non-nil in buffers that are composing a message to a room.")
+
+(cl-defun ement-room-compose-message (room session &key body)
+  "Compose a message to ROOM on SESSION.
+Interactively, with prefix, prompt for room and session,
+otherwise use current room.  With BODY, use it as the initial
+message contents."
+  (interactive
+   (ement-with-room-and-session
+     (list ement-room ement-session)))
+  (let* ((compose-buffer (generate-new-buffer (format "*Ement compose: %s*" (ement--room-display-name ement-room))))
+         (send-message-filter ement-room-send-message-filter))
+    (ement-room-compose-highlight compose-buffer)
+    (with-current-buffer compose-buffer
+      (ement-room-init-compose-buffer room session)
+      (setf ement-room-send-message-filter send-message-filter)
+      ;; TODO: Make mode configurable.
+      (when body
+        (insert body))
+
+      ;; FIXME: Inexplicably, this doesn't do anything, so we comment it out for now.
+      ;; (add-function :override (local 'org-mode)
+      ;;               ;; HACK: Since `org-mode' kills buffer-local variables we need, we add
+      ;;               ;; buffer-local advice to prevent that from happening in case a user enables it.
+      ;;               (lambda (&rest _ignore)
+      ;;                 (message "Use `ement-room-compose-org' to activate Org in this buffer")))
+
+      ;; NOTE: Surprisingly, we don't run this hook in `ement-room-init-compose-buffer',
+      ;; because if a function in that hook calls the init function (like
+      ;; `ement-room-compose-org' does), it makes `run-hooks' recursive.  As long as this
+      ;; is the only function that makes the compose buffer, and as long as none of the
+      ;; hooks do anything that activating `org-mode' nullifies, this should be okay...
+      (run-hooks 'ement-room-compose-hook))
+    ;; Display the compose buffer.  This might obscure the room buffer's window
+    ;; point, so minimise the amount of scrolling which occurs to restore that
+    ;; to a visible position.
+    (pop-to-buffer compose-buffer ement-room-compose-buffer-display-action)
+    (unless ement-room-compose-buffer-window-auto-height
+      (let ((scroll-conservatively 101))
+        (redisplay)))))
+
+(defun ement-room-compose-edit (event room session body)
+  "Edit EVENT in ROOM on SESSION to have new BODY, using a compose buffer.
+The message must be one sent by the local user."
+  ;; See also `ement-room-edit-message'.
+  (interactive (cl-destructuring-bind (event body)
+                   (ement-room-edit-message-prepare)
+                 (list event ement-room ement-session body)))
+  (cl-assert (ement-event-p event)) (cl-assert room) (cl-assert session)
+  (let ((ement-room-editing-event event))
+    (ement-room-with-highlighted-event-at (point)
+      (ement-room-compose-message room session :body body))))
+
+(defun ement-room-compose-reply (event)
+  "Write and send a reply to EVENT, using a compose buffer.
+Interactively, to event at point."
+  ;; See also `ement-room-write-reply'.
+  (interactive (progn (cl-assert ement-ewoc)
+                      (list (ewoc-data (ewoc-locate ement-ewoc)))))
+  (cl-assert ement-room) (cl-assert ement-session) (cl-assert (ement-event-p event))
+  (let ((ement-room-replying-to-event event))
+    (ement-room-with-highlighted-event-at (point)
+      (ement-room-compose-message ement-room ement-session))))
+
+(defun ement-room-compose-from-minibuffer ()
+  "Edit the current message in a compose buffer.
+To be called from a minibuffer opened from
+`ement-room-read-string'."
+  (interactive)
+  (cl-assert (minibufferp)) (cl-assert ement-room) (cl-assert ement-session)
+  ;; TODO: When requiring Emacs 27, use `letrec'.
+  ;; HACK: I can't seem to find a better way to do this, to exit the minibuffer without exiting this command too.
+  (let* ((body (minibuffer-contents))
+         (compose-fn-symbol (gensym (format "ement-compose-%s" (or (ement-room-canonical-alias ement-room)
+                                                                   (ement-room-id ement-room)))))
+         (input-method current-input-method) ; Capture this value from the minibuffer.
+         (send-message-filter ement-room-send-message-filter)
+         (replying-to-event ement-room-replying-to-event)
+         (editing-event ement-room-editing-event)
+         (compose-fn (lambda ()
+                       ;; HACK: Since exiting the minibuffer restores the previous window configuration,
+                       ;; we have to do some magic to get the new compose buffer to appear.
+                       ;; TODO: Use letrec with Emacs 27.
+                       (remove-hook 'minibuffer-exit-hook compose-fn-symbol)
+                       ;; FIXME: Probably need to unintern the symbol.
+                       (ement-room-compose-message ement-room ement-session :body body)
+		       ;; FIXME: This doesn't propagate the send-message-filter to the minibuffer.
+                       (setf ement-room-send-message-filter send-message-filter)
+                       (setq-local ement-room-replying-to-event replying-to-event
+                                   ement-room-editing-event editing-event)
+                       (cond (replying-to-event
+                              (setq-local header-line-format
+                                          (concat header-line-format
+                                                  (format " (Replying to message from %s)"
+                                                          (ement--user-displayname-in
+                                                           ement-room (ement-event-sender replying-to-event))))))
+                             (editing-event
+                              (setq-local header-line-format (concat header-line-format " (Editing message)"))))
+                       (let* ((compose-buffer (current-buffer))
+                              (show-buffer-fn-symbol (gensym "ement-show-compose-buffer"))
+                              (show-buffer-fn (lambda ()
+                                                (remove-hook 'window-configuration-change-hook show-buffer-fn-symbol)
+                                                ;; FIXME: Probably need to unintern the symbol.
+                                                (pop-to-buffer compose-buffer ement-room-compose-buffer-display-action)
+                                                (set-input-method input-method))))
+                         (fset show-buffer-fn-symbol show-buffer-fn)
+                         (add-hook 'window-configuration-change-hook show-buffer-fn-symbol)))))
+    (fset compose-fn-symbol compose-fn)
+    (add-hook 'minibuffer-exit-hook compose-fn-symbol)
+    ;; Deactivate minibuffer's input method, otherwise subsequent
+    ;; minibuffers will have it, too.
+    (deactivate-input-method)
+    (abort-recursive-edit)))
+
+(defun ement-room-compose-buffer-string-trimmed ()
+  "Like `buffer-string' trimmed with `string-trim'."
+  (buffer-substring-no-properties (progn (goto-char (point-min))
+                                         (skip-chars-forward " \t\r\n")
+                                         (point))
+                                  (progn (goto-char (point-max))
+                                         (skip-chars-backward " \t\r\n")
+                                         (point))))
+
+(defun ement-room-compose-send-prepare ()
+  "Bindings for `ement-room-compose-send' and `ement-room-compose-send-direct'."
+  (cl-assert ement-room-compose-buffer)
+  (cl-assert ement-room) (cl-assert ement-session)
+  ;; Capture the necessary values from the compose buffer before killing it and
+  ;; switching back to the room buffer.  Return the values as a list.
+  (let ((body (ement-room-compose-buffer-string-trimmed))
+        (input-method current-input-method)
+        (send-message-filter ement-room-send-message-filter)
+        (replying-to-event ement-room-replying-to-event)
+        (editing-event ement-room-editing-event)
+        (room ement-room)
+        (session ement-session))
+    (ement-room-compose-buffer-quit-restore-window)
+    (ement-view-room room session)
+    (add-to-history 'ement-room-message-history body)
+    (list body input-method send-message-filter replying-to-event editing-event room session)))
+
+(defun ement-room-compose-send ()
+  "Prompt to send the current compose buffer's contents.
+To be called from an `ement-room-compose' buffer.
+See also `ement-room-compose-send-direct'."
+  (interactive)
+  (cl-destructuring-bind (body input-method send-message-filter
+                               replying-to-event editing-event room session)
+      (ement-room-compose-send-prepare)
+    (let* ((prompt (format "Send message (%s): " (ement-room-display-name room)))
+           (current-input-method input-method) ; Bind around read-string call.
+           (ement-room-send-message-filter send-message-filter)
+           (body (if (or editing-event replying-to-event)
+                     (let ((pos (ewoc-location (ement-room--ewoc-last-matching ement-ewoc
+                                                 (lambda (data)
+                                                   (eq data (or editing-event
+                                                                replying-to-event)))))))
+                       (ement-room-with-highlighted-event-at pos
+                         (ement-room-read-string prompt body 'ement-room-message-history
+                                                 nil 'inherit-input-method)))
+                   (ement-room-read-string prompt body 'ement-room-message-history
+                                           nil 'inherit-input-method))))
+      (if editing-event
+          (ement-room-edit-message (ement--original-event-for editing-event session)
+                                   room session body)
+        (ement-room-send-message room session
+                                 :body body
+                                 :replying-to-event (and replying-to-event
+                                                         (ement--original-event-for
+                                                          replying-to-event session)))))))
+
+(defun ement-room-compose-send-direct ()
+  "Directly send the current compose buffer's contents.
+To be called from an `ement-room-compose' buffer.
+See also `ement-room-compose-send'."
+  (interactive)
+  (cl-destructuring-bind (body _input-method send-message-filter
+                               replying-to-event editing-event room session)
+      (ement-room-compose-send-prepare)
+    (let ((ement-room-send-message-filter send-message-filter))
+      (if editing-event
+          (ement-room-edit-message (ement--original-event-for editing-event session)
+                                   room session body)
+        (ement-room-send-message room session
+                                 :body body
+                                 :replying-to-event (and replying-to-event
+                                                         (ement--original-event-for
+                                                          replying-to-event session)))))))
+
+(defun ement-room-compose-abort (&optional no-history)
+  "Kill the compose buffer and window.
+With prefix arg NO-HISTORY, do not add to `ement-room-message-history'."
+  (interactive "P")
+  (let ((body (ement-room-compose-buffer-string-trimmed))
+        (room ement-room))
+    (unless no-history
+      (add-to-history 'ement-room-message-history body))
+    (ement-room-compose-buffer-quit-restore-window)
+    ;; Make sure we end up with the associated room buffer selected.
+    (when-let ((win (catch 'room-win
+                      (walk-windows
+                       (lambda (win)
+                         (with-selected-window win
+                           (and (derived-mode-p 'ement-room-mode)
+                                (bound-and-true-p ement-room)
+                                (eq ement-room room)
+                                (throw 'room-win win))))))))
+      (select-window win))))
+
+(defun ement-room-compose-abort-no-history ()
+  "Kill the compose buffer and window without adding to the history."
+  (interactive)
+  (ement-room-compose-abort t))
+
+(defun ement-room-init-compose-buffer (room session)
+  "Set up the current buffer as a compose buffer.
+Sets ROOM and SESSION buffer-locally, binds `save-buffer' in
+a copy of the local keymap, and sets `header-line-format'."
+  ;; Using a macro for this seems awkward but necessary.
+  (setq-local ement-room room)
+  (setq-local ement-session session)
+  (setq-local ement-room-replying-to-event ement-room-replying-to-event)
+  (setq-local ement-room-editing-event ement-room-editing-event)
+  (setf ement-room-compose-buffer t)
+  (setq-local completion-at-point-functions
+              (append '(ement-room--complete-members-at-point ement-room--complete-rooms-at-point)
+                      completion-at-point-functions))
+  (setq-local dabbrev-select-buffers-function #'ement-compose-dabbrev-select-buffers
+              dabbrev-friend-buffer-function #'ement-room-mode-p)
+  (setq-local yank-excluded-properties
+              (append '(line-prefix wrap-prefix)
+                      (default-value 'yank-excluded-properties)))
+  (add-hook 'isearch-mode-hook 'ement-room-compose-history-isearch-setup nil t)
+  ;; FIXME: Compose with local map?
+  (use-local-map (if (current-local-map)
+                     (copy-keymap (current-local-map))
+                   (make-sparse-keymap)))
+  ;; When `ement-room-self-insert-mode' is enabled, deleting the final character of the
+  ;; message aborts and kills the compose buffer.
+  (local-set-key [remap delete-backward-char]
+                 `(menu-item "" ement-room-compose-abort-no-history
+                             :filter ,(lambda (cmd)
+                                        (and ement-room-self-insert-mode
+                                             (<= (buffer-size) 1)
+                                             (save-restriction (widen) (eobp))
+                                             cmd))))
+  (local-set-key [remap save-buffer] #'ement-room-dispatch-send-message)
+  (local-set-key (kbd "C-c C-k") #'ement-room-compose-abort)
+  (local-set-key (kbd "M-p") #'ement-room-compose-history-prev-message)
+  (local-set-key (kbd "M-n") #'ement-room-compose-history-next-message)
+  (local-set-key (kbd "M-r") #'ement-room-compose-history-isearch-backward)
+  (local-set-key (kbd "C-M-r") #'ement-room-compose-history-isearch-backward-regexp)
+  (setq header-line-format
+        (concat (substitute-command-keys
+                 (format " Press \\[save-buffer] to send message to room (%s), or \\[ement-room-compose-abort] to cancel."
+                         (ement-room-display-name room)))
+                (cond (ement-room-replying-to-event
+                       (format " (Replying to message from %s)"
+                               (ement--user-displayname-in
+                                ement-room (ement-event-sender
+                                            ement-room-replying-to-event))))
+                      (ement-room-editing-event
+                       " (Editing message)"))))
+  ;; Adjust the window height automatically.
+  (when ement-room-compose-buffer-window-auto-height
+    (add-hook 'post-command-hook
+              #'ement-room-compose-buffer-window-auto-height nil :local)
+    ;; Our `window-min-height' comprises header & mode line + body lines.
+    (setq-local window-min-height
+                (+ 2 (if ement-room-compose-buffer-window-auto-height-min
+                         (max 1 ement-room-compose-buffer-window-auto-height-min)
+                       1)))
+    (when ement-room-compose-buffer-window-auto-height-fixed
+      (setq-local window-size-fixed
+                  ement-room-compose-buffer-window-auto-height-fixed))
+    ;; The following helps when `window--sanitize-window-sizes' adjusts all
+    ;; windows in a frame (e.g. when splitting windows), as otherwise any
+    ;; existing compose buffer windows are liable to be resized line-wise,
+    ;; resulting in excess padding being introduced.
+    (when ement-room-compose-buffer-window-auto-height-pixelwise
+      (setq-local window-resize-pixelwise t)))
+  ;; Other compose buffer window behaviours.
+  (add-hook 'window-state-change-functions
+            #'ement-room-compose-buffer-window-state-change-handler nil :local)
+  (add-hook 'window-buffer-change-functions
+            #'ement-room-compose-buffer-window-buffer-change-handler nil :local))
+
+(defun ement-room-compose-buffer-window-auto-height ()
+  "Ensure that the compose buffer displays the whole message.
+
+Called via `post-command-hook' if option
+`ement-room-compose-buffer-window-auto-height' is non-nil."
+  ;; We use `post-command-hook' (rather than, say, `after-change-functions'),
+  ;; because the required window height might change for reasons other than text
+  ;; editing (e.g. changes to the window's width or the font size).
+  ;;
+  ;; Note that changes to the default face size (e.g. via `text-scale-adjust')
+  ;; affect `default-line-height', invalidating the cache even when the text
+  ;; itself didn't change.
+  ;;
+  ;; The following may also clear the cache in order to force a recalculation:
+  ;; - `ement-room-compose-buffer-window-state-change-handler'
+  ;; - `ement-room-compose-buffer-window-buffer-change-handler'
+  ;;
+  ;; Global mutex `ement-room-compose-buffer-window-auto-height-resizing-p'
+  ;; ensures that we cannot run recursively.  We also resize only the selected
+  ;; window, even if there are compose buffers displayed in other windows which
+  ;; might also be affected.  This conservative approach can prevent desirable
+  ;; resizing in some cases, but restricting our behaviour this way keeps things
+  ;; simple so that we needn't consider potential issues such as endless cycles
+  ;; of conflicting resizes.
+  ;;
+  ;; Perfection would in any case be non-trivial -- consider two compose windows
+  ;; side-by-side in a horizontal split, each showing a different compose buffer
+  ;; with a different desired height.  We cannot have the "correct" size for
+  ;; both simultaneously.  The best thing to do would be to maintain the tallest
+  ;; height amongst all conflicting windows at all times -- but that is, again,
+  ;; considerably more complex.
+  ;;
+  ;; Most of the time the window arrangements are expected to be very simple and
+  ;; so a more comprehensive solution, while possible, is not worth the added
+  ;; complexity -- our relatively simplistic approach is good enough for the
+  ;; vast majority of situations.
+
+  ;; Skip resizing if we are being called recursively...
+  (unless (or (bound-and-true-p ement-room-compose-buffer-window-auto-height-resizing-p)
+              ;; ...or there are no other windows to resize...
+              (window-full-height-p)
+              ;; ...or we have just switched to this buffer from another buffer
+              ;; (we may be cycling window buffers, and about to switch again).
+              (and (window-old-buffer)
+                   (not (eq (window-old-buffer) (current-buffer)))))
+    ;; Manipulate the window body height.
+    (let* ((pixelwise (and ement-room-compose-buffer-window-auto-height-pixelwise
+                           (display-graphic-p)))
+           (lineheight (and pixelwise (default-line-height)))
+           (buflines (max 1 (count-screen-lines nil nil t)))
+           (cache (if pixelwise
+                      (* buflines lineheight)
+                    buflines))
+           (wcache (window-parameter
+                    nil 'ement-room-compose-buffer-window-auto-height-cache)))
+      ;; Do nothing if the desired height has not changed.
+      (unless (and wcache (eql cache wcache))
+        ;; Otherwise resize the window...
+        (set-window-parameter
+         nil 'ement-room-compose-buffer-window-auto-height-cache cache)
+        (let* ((ement-room-compose-buffer-window-auto-height-resizing-p t)
+               (minheight (if ement-room-compose-buffer-window-auto-height-min
+                              (max 1 ement-room-compose-buffer-window-auto-height-min)
+                            1))
+               (maxheight ement-room-compose-buffer-window-auto-height-max)
+               (maxlines (or (and maxheight (min buflines maxheight))
+                             buflines))
+               (reqlines (max maxlines minheight)))
+          (if pixelwise
+              ;; In GUI frames we should do this in pixels, as the line-based
+              ;; `window-resize' DELTA is based on the default frame character
+              ;; height, rather than the buffer's `default-line-height', which
+              ;; doesn't take face remapping (e.g. `text-scale-adjust') into
+              ;; account and would therefore enlarge the window by the wrong
+              ;; value.  Pixel-based resizing also lets us eliminate vertical
+              ;; padding resulting from the body lines being a different height
+              ;; to the mode- and/or header-line height (which can easily happen
+              ;; in GUI frames and is distractingly obvious in a small window
+              ;; which is supposed to fit its content).
+              (let* ((window-resize-pixelwise t)
+                     (pixheight (* lineheight reqlines))
+                     (pixels (- pixheight (window-body-height nil t))))
+                (when-let ((pixels (window-resizable nil pixels nil t t)))
+                  (window-resize nil pixels nil t t)))
+            ;; In terminal frames we deal in lines rather than pixels.
+            (let ((delta (- reqlines (window-body-height))))
+              (when-let ((delta (window-resizable nil delta nil t)))
+                (window-resize nil delta nil t))))
+          ;; Ask Emacs to "preserve" the new height.  So long as the window
+          ;; maintains this height and is displaying this specific buffer, Emacs
+          ;; will avoid unnecessary height changes from side-effects of commands
+          ;; such as `balance-windows'.  Explicit height changes are allowed.
+          ;; We must update this parameter every time we change the height so
+          ;; that the "preserved" height value is always correct.
+          (window-preserve-size nil nil t)
+          ;; In most cases we can fit the whole buffer in the resized window.
+          (set-window-start nil (point-min) :noforce)
+          ;; The resizing might have obscured the room buffer's window point, so
+          ;; minimise the amount of scrolling which occurs to restore that to a
+          ;; visible position.
+          (let ((scroll-conservatively 101))
+            (redisplay)))))))
+
+(defun ement-room-compose-buffer-window-state-change-handler (win)
+  "Called via buffer-local `window-state-change-functions' in compose buffers.
+
+Called for any window WIN showing a compose buffer if that window
+has been added or assigned another buffer, changed size, or been
+selected or deselected.
+
+This prevents a compose buffer window being stuck at the wrong
+height (until the number of lines changes again) if something
+other than the auto-height feature resizes the window.  We simply
+flush the auto-height cache, thus ensuring the required height is
+recalculated on the next cycle).
+
+See also `ement-room-compose-buffer-window-buffer-change-handler'."
+  ;; Ignore the window state changes triggered by our auto-height resizing.
+  ;;
+  ;; Also do nothing if the state change is for the selected window, as
+  ;; the buffer-local `post-command-hook' is already dealing with that
+  ;; case.  We only care about window state changes which are triggered
+  ;; from elsewhere.  This means we skip the case whereby the selected
+  ;; window has just switched to the compose buffer, and so we use
+  ;; `window-buffer-change-functions' as well to capture that case.
+  ;; (See `ement-room-compose-buffer-window-buffer-change-handler'.)
+  (when ement-room-compose-buffer-window-auto-height
+    (unless (or (bound-and-true-p ement-room-compose-buffer-window-auto-height-resizing-p)
+                (eq win (selected-window)))
+      ;; Clear the auto-height cache for this window.
+      (set-window-parameter
+       win 'ement-room-compose-buffer-window-auto-height-cache nil))))
+
+(defun ement-room-compose-buffer-window-buffer-change-handler (win)
+  "Called via buffer-local `window-buffer-change-functions' in compose buffers.
+
+Called for any window WIN showing a compose buffer if that window
+has just been created or assigned that buffer.
+
+Flush the auto-height cache for any window which switches to
+displaying a compose buffer, to ensure the required height is
+recalculated on the next cycle.
+
+Also detect whether a composer buffer's window was created for
+that purpose, as this information affects the behaviour of
+`ement-room-compose-buffer-quit-restore-window'.
+
+See also `ement-room-compose-buffer-window-state-change-handler'."
+  (with-selected-window win
+    (when ement-room-compose-buffer-window-auto-height
+      ;; Clear the auto-height cache for this window.
+      (set-window-parameter
+       win 'ement-room-compose-buffer-window-auto-height-cache nil))
+    ;; Establish whether we've processed this window before, and whether it was
+    ;; created to display a compose buffer.  We set a window property the first
+    ;; time that we see the window, so if it's set at all, we've seen it before.
+    (unless (assq 'ement-room-compose-buffer-window-created-p (window-parameters win))
+      ;; If the window has never shown any other buffer, then it was created
+      ;; specifically to display a compose buffer.
+      (let ((created-for-compose-p (set-window-parameter
+                                    win 'ement-room-compose-buffer-window-created-p
+                                    (not (window-prev-buffers win)))))
+        ;; Process `ement-room-compose-buffer-window-dedicated' when the compose
+        ;; buffer is first displayed in this window, to decide whether the
+        ;; window should be dedicated to the buffer.
+        (when (cl-case ement-room-compose-buffer-window-dedicated
+                (created created-for-compose-p)
+                (auto-height ement-room-compose-buffer-window-auto-height)
+                (delete nil)
+                (t ement-room-compose-buffer-window-dedicated))
+          (set-window-dedicated-p win t))))))
+
+(defun ement-room-compose-buffer-quit-restore-window ()
+  "Kill the current compose buffer and deal appropriately with its window.
+
+The default `ement-room-compose-buffer-window-dedicated' value
+ensures that the window is dedicated and therefore that it will
+be deleted.
+
+A non-dedicated window which has displayed another buffer at any
+point will not be deleted."
+  ;; N.b. This function exists primarily for documentation purposes,
+  ;; to clarify the side-effect of using a dedicated window.
+  (when (eq ement-room-compose-buffer-window-dedicated 'delete)
+    ;; `quit-restore-window' always deletes a dedicated window.
+    (set-window-dedicated-p nil t))
+  (quit-restore-window nil 'kill))
+
+(declare-function dabbrev--select-buffers "dabbrev")
+
+(defun ement-compose-dabbrev-select-buffers ()
+  "Used as `dabbrev-select-buffers-function' in compose buffers."
+  (let ((buflist (dabbrev--select-buffers))
+        (roombuf (map-elt (ement-room-local ement-room) 'buffer)))
+    (if (and roombuf (buffer-live-p roombuf))
+        (cons roombuf (delq roombuf buflist))
+      buflist)))
+
+(defun ement-room-mode-p (buffer)
+  "Non-nil if BUFFER has `ement-room-mode' as its major mode.
+Used with `dabbrev-friend-buffer-function'."
+  (with-current-buffer buffer
+    (derived-mode-p 'ement-room-mode)))
+
+;;; Message history for compose buffers.  Isearch code is derived from comint.el.
+
+(defvar-local ement-room--compose-message-history-index -1)
+(defvar-local ement-room--compose-message-history-initial "")
+(defvar-local ement-room--compose-history-isearch nil)
+
+(defun ement-room-compose-message-history-insert (hist-pos &optional with-message)
+  "Insert text of the absolute history position HIST-POS."
+  ;; Store the not-from-history buffer message.
+  (when (< ement-room--compose-message-history-index 0)
+    (setq ement-room--compose-message-history-initial
+          (ement-room-compose-buffer-string-trimmed)))
+  ;; Update the index.
+  (setq ement-room--compose-message-history-index (or hist-pos -1))
+  (when (and with-message hist-pos (>= hist-pos 0))
+    (let ((message-log-max nil))
+      (message "History item %d" hist-pos)))
+  ;; Update the buffer.
+  (erase-buffer)
+  (insert (if (< ement-room--compose-message-history-index 0)
+              ement-room--compose-message-history-initial
+            (or (nth ement-room--compose-message-history-index
+                     ement-room-message-history)
+                (format "[invalid ement message history element %d]"
+                        ement-room--compose-message-history-index)))))
+
+(defun ement-room-compose-history-prev-message (arg)
+  "Cycle backward through message history, after saving current message.
+With a numeric prefix ARG, go back ARG messages."
+  (interactive "*p")
+  (let ((len (length ement-room-message-history)))
+    ;; Valid index values: -1 <= idx < len.
+    (cond ((<= len 0)
+           (user-error "Empty message history"))
+          ((eql arg 0)) ;; No-op.
+          ((and (> arg 0) (>= ement-room--compose-message-history-index (1- len)))
+           (user-error "Beginning of history; no preceding item"))
+          ((and (< arg 0) (< ement-room--compose-message-history-index 0))
+           (user-error "End of history; no next item"))
+          (t
+           ;; It's still possible to move in the specified direction.
+           (ement-room-compose-message-history-insert
+            (let ((hist-pos (+ arg ement-room--compose-message-history-index)))
+              (cond ((>= hist-pos len) (1- len))
+                    ((< hist-pos -1) -1)
+                    (t hist-pos)))
+            :with-message)))))
+
+(defun ement-room-compose-history-next-message (arg)
+  "Cycle forward through message history, after saving current message.
+With a numeric prefix ARG, go forward ARG messages."
+  (interactive "*p")
+  (ement-room-compose-history-prev-message (- arg)))
+
+(defun ement-room-compose-history-isearch-backward ()
+  "Search for a string in the message history using Isearch.
+Use \\[isearch-backward] and \\[isearch-forward] to continue searching."
+  (interactive)
+  (setq ement-room--compose-history-isearch t)
+  (isearch-backward nil t))
+
+(defun ement-room-compose-history-isearch-backward-regexp ()
+  "Search for a regular expression in the message history using Isearch.
+Use \\[isearch-backward] and \\[isearch-forward] to continue searching."
+  (interactive)
+  (setq ement-room--compose-history-isearch t)
+  (isearch-backward-regexp nil t))
+
+(defun ement-room-compose-history-isearch-setup ()
+  "Set up Isearch to search `ement-room-message-history'.
+Intended to be added to `isearch-mode-hook' in an ement compose buffer."
+  (when (eq ement-room--compose-history-isearch t)
+    (setq isearch-message-prefix-add "history ")
+    (setq-local isearch-search-fun-function
+                #'ement-room-compose-history-isearch-search)
+    (setq-local isearch-message-function
+                #'ement-room-compose-history-isearch-message)
+    (setq-local isearch-wrap-function
+                #'ement-room-compose-history-isearch-wrap)
+    (setq-local isearch-push-state-function
+                #'ement-room-compose-history-isearch-push-state)
+    (setq-local isearch-lazy-count nil)
+    (add-hook 'isearch-mode-end-hook 'ement-room-compose-history-isearch-end nil t)))
+
+(defun ement-room-compose-history-isearch-end ()
+  "Clean up the buffer after terminating Isearch.
+Called via `isearch-mode-end-hook'."
+  (setq isearch-message-prefix-add nil)
+  (setq isearch-search-fun-function 'isearch-search-fun-default)
+  (setq isearch-wrap-function nil)
+  (setq isearch-push-state-function nil)
+  ;; Force isearch to not change mark.
+  (setq isearch-opoint (point))
+  (kill-local-variable 'isearch-lazy-count)
+  (remove-hook 'isearch-mode-end-hook 'ement-room-compose-history-isearch-end t)
+  (unless isearch-suspended
+    (setq ement-room--compose-history-isearch nil)))
+
+(defun ement-room-compose-history-isearch-search ()
+  "Return the search function for Isearch in message history.
+This function is used as the value of `isearch-search-fun-function'."
+  #'ement-room-compose-history-isearch-function)
+
+(defun ement-room-compose-history-isearch-function (string bound noerror)
+  "Isearch in message history."
+  (let ((search-fun
+	 ;; Use standard functions to search within message text
+	 (isearch-search-fun-default))
+	found)
+    (or
+     ;; 1. First try searching in the initial message
+     (funcall search-fun string nil noerror)
+     ;; 2. If the above search fails, start putting next/prev history elements in the
+     ;; buffer successively, and search the string in them.  Do this only when bound is
+     ;; nil (i.e. not while lazy-highlighting search strings in the current message).
+     (unless bound
+       (condition-case nil
+	   (progn
+	     (while (not found)
+	       (if isearch-forward
+		   (ement-room-compose-history-next-message 1)
+		 (ement-room-compose-history-prev-message 1))
+               (goto-char (if isearch-forward (point-min) (point-max)))
+	       (setq isearch-barrier (point)
+                     isearch-opoint (point))
+	       ;; After putting the next/prev history element, search the string in
+               ;; them again, until `ement-room-compose-history-next-message' or
+	       ;; `ement-room-compose-history-prev-message' raises an error at the
+	       ;; beginning/end of history.
+	       (setq found (funcall search-fun string nil noerror)))
+	     ;; Return point of the new search result.
+	     (point))
+	 ;; Return nil on any isearch errors, including the "no next/preceding item"
+         ;; user-errors signalled from `ement-room-compose-history-prev-message'.
+         (error nil))))))
+
+(defun ement-room-compose-history-isearch-message (&optional c-q-hack ellipsis)
+  "Display the isearch message.
+This function is used as the value of `isearch-message-function'."
+  (setq isearch-message-prefix-add
+        (if (and isearch-success
+                 (not isearch-error)
+                 (>= ement-room--compose-message-history-index 0))
+            (format "history item %d: "
+                    ement-room--compose-message-history-index)
+          "history "))
+  (isearch-message c-q-hack ellipsis))
+
+(defun ement-room-compose-history-isearch-wrap ()
+  "Wrap the history search when search fails.
+Move point to the first history element for a forward search,
+or to the last history element for a backward search.
+This function is used as the value of `isearch-wrap-function'."
+  ;; When `ement-room-compose-history-isearch-search' fails on reaching the
+  ;; beginning/end of the history, wrap the search to the first/last
+  ;; input history element.
+  (ement-room-compose-message-history-insert
+   (if isearch-forward
+       (1- (length ement-room-message-history))
+     -1))
+  (goto-char (if isearch-forward (point-min) (point-max))))
+
+(defun ement-room-compose-history-isearch-push-state ()
+  "Save a function restoring the state of input history search.
+Save `ement-room--compose-message-history-index' to the additional state parameter
+in the search status stack.
+This function is used as the value of `isearch-push-state-function'."
+  (let ((index ement-room--compose-message-history-index))
+    (lambda (cmd)
+      (ement-room-compose-history-isearch-pop-state cmd index))))
+
+(defun ement-room-compose-history-isearch-pop-state (_cmd hist-pos)
+  "Restore the input history search state.
+Go to the history element by the absolute history position HIST-POS.
+See `ement-room-compose-history-isearch-push-state'."
+  (ement-room-compose-message-history-insert hist-pos))
+
+;;;;; Widgets
+
+(require 'widget)
+
+(define-widget 'ement-room-membership 'item
+  "Widget for membership events."
+  ;; FIXME: This makes it hard to add a timestamp according to the buffer's message format spec.
+  ;; NOTE: The widget needs something before and after "%v" to correctly apply the
+  ;; `ement-room-membership' face. We could use a zero-width space, but that won't work on
+  ;; a TTY. So we use a regular space but replace it with nothing with a display spec.
+  :format (let ((zws (propertize " " 'display "")))
+            (concat "%{" zws "%v" zws "%}"))
+  :sample-face 'ement-room-membership
+  :value-create (lambda (widget)
+                  (pcase-let* ((event (widget-value widget)))
+                    (insert (ement-room-wrap-prefix
+                              (ement-room--format-member-event event ement-room))))))
+
+(defun ement-room--format-member-event (event room)
+  "Return formatted string for \"m.room.member\" EVENT in ROOM."
+  ;; SPEC: Section 9.3.4: "m.room.member".
+  (pcase-let* (((cl-struct ement-event sender state-key
+                           (content (map reason ('avatar_url new-avatar-url)
+                                         ('membership new-membership) ('displayname new-displayname)))
+                           (unsigned (map ('prev_content (map ('avatar_url old-avatar-url)
+                                                              ('membership prev-membership)
+                                                              ('displayname prev-displayname))))))
+                event)
+               (sender-name (ement--user-displayname-in ement-room sender)))
+    (cl-macrolet ((nes (var)
+                    ;; For "non-empty-string".  Needed because the displayname can be
+                    ;; an empty string, but apparently is never null.  (Note that the
+                    ;; argument should be a variable, never any other form, to avoid
+                    ;; multiple evaluation.)
+                    `(when (and ,var (not (string-empty-p ,var)))
+                       ,var))
+                  (sender-name-id-string ()
+                    `(propertize sender-name
+                                 'help-echo (ement-user-id sender)))
+                  (new-displayname-sender-name-state-key-string ()
+                    `(propertize (or (nes new-displayname) (nes sender-name) (nes state-key))
+                                 'help-echo state-key))
+                  (sender-name-state-key-string ()
+                    `(propertize sender-name
+                                 'help-echo state-key))
+                  (prev-displayname-id-string ()
+                    `(propertize (or prev-displayname sender-name)
+                                 'help-echo (ement-user-id sender))))
+      (pcase-exhaustive new-membership
+        ("invite"
+         (pcase prev-membership
+           ((or "leave" '())
+            (format "%s invited %s"
+                    (sender-name-id-string)
+                    (new-displayname-sender-name-state-key-string)))
+           (_ (format "%s sent unrecognized invite event for %s"
+                      (sender-name-id-string)
+                      (new-displayname-sender-name-state-key-string)))))
+        ("join"
+         (pcase prev-membership
+           ("invite"
+            (format "%s accepted invitation to join"
+                    (sender-name-state-key-string)))
+           ("join"
+            (cond ((not (equal new-displayname prev-displayname))
+                   (propertize (format "%s changed name to %s"
+                                       prev-displayname (or new-displayname (ement--user-displayname-in room sender)))
+                               'help-echo state-key))
+                  ((not (equal new-avatar-url old-avatar-url))
+                   (format "%s changed avatar"
+                           (new-displayname-sender-name-state-key-string)))
+                  (t (format "Unrecognized membership event for %s"
+                             (sender-name-state-key-string)))))
+           ("leave"
+            (format "%s rejoined"
+                    (sender-name-state-key-string)))
+           (`nil
+            (format "%s joined"
+                    (new-displayname-sender-name-state-key-string)))
+           (_ (format "%s sent unrecognized join event for %s"
+                      (sender-name-id-string)
+                      (new-displayname-sender-name-state-key-string)))))
+        ("leave"
+         (pcase prev-membership
+           ("invite"
+            (pcase state-key
+              ((pred (equal (ement-user-id sender)))
+               (format "%s rejected invitation"
+                       (sender-name-id-string)))
+              (_ (format "%s revoked %s's invitation"
+                         (sender-name-id-string)
+                         (new-displayname-sender-name-state-key-string)))))
+           ("join"
+            (pcase state-key
+              ((pred (equal (ement-user-id sender)))
+               (format "%s left%s"
+                       (prev-displayname-id-string)
+                       (if reason
+                           (format " (%S)" reason)
+                         "")))
+              (_ (format "%s kicked %s%s"
+                         (sender-name-id-string)
+                         (propertize (or prev-displayname state-key)
+                                     'help-echo state-key)
+                         (if reason
+                             (format " (%S)" reason)
+                           "")))))
+           ("ban"
+            (format "%s unbanned %s"
+                    (sender-name-id-string)
+                    state-key))
+           (_ (format "%s left%s"
+                      (prev-displayname-id-string)
+                      (if reason
+                          (format " (%S)" reason)
+                        "")))))
+        ("ban"
+         (pcase prev-membership
+           ((or "invite" "leave")
+            (format "%s banned %s%s"
+                    (sender-name-id-string)
+                    (propertize (or prev-displayname state-key)
+                                'help-echo state-key)
+                    (if reason
+                        (format " (%S)" reason)
+                      "")))
+           ("join"
+            (format "%s kicked and banned %s%s"
+                    (sender-name-id-string)
+                    (propertize (or prev-displayname state-key)
+                                'help-echo state-key)
+                    (if reason
+                        (format " (%S)" reason)
+                      "")))
+           (_ (format "%s sent unrecognized ban event for %s"
+                      (sender-name-id-string)
+                      (propertize (or prev-displayname state-key)
+                                  'help-echo state-key)))))))))
+
+;; NOTE: Widgets are only currently used for single membership events, not grouped ones.
+
+(defun ement-room--format-membership-events (struct room)
+  "Return string for STRUCT in ROOM.
+STRUCT should be an `ement-room-membership-events' struct."
+  (cl-labels ((event-user (event)
+                (propertize (if-let (user (gethash (ement-event-state-key event) ement-users))
+                                (ement--user-displayname-in room user)
+                              (ement-event-state-key event))
+                            'help-echo (concat (ement-room--format-member-event event room)
+                                               " <" (ement-event-state-key event) ">")))
+              (old-membership (event)
+                (map-nested-elt (ement-event-unsigned event) '(prev_content membership)))
+              (new-membership (event)
+                (alist-get 'membership (ement-event-content event))))
+    (pcase-let* (((cl-struct ement-room-membership-events events) struct))
+      (pcase (length events)
+        (0 (warn "No events in `ement-room-membership-events' struct"))
+        (1 (ement-room--format-member-event (car events) room))
+        (_ (let* ((left-events (cl-remove-if-not (lambda (event)
+                                                   (and (equal "leave" (new-membership event))
+                                                        (not (member (old-membership event) '("ban" "invite")))))
+                                                 events))
+                  (join-events (cl-remove-if-not (lambda (event)
+                                                   (and (equal "join" (new-membership event))
+                                                        (not (equal "join" (old-membership event)))))
+                                                 events))
+                  (rejoin-events (cl-remove-if-not (lambda (event)
+                                                     (and (equal "join" (new-membership event))
+                                                          (equal "leave" (old-membership event))))
+                                                   events))
+                  (invite-events (cl-remove-if-not (lambda (event)
+                                                     (equal "invite" (new-membership event)))
+                                                   events))
+                  (reject-events (cl-remove-if-not (lambda (event)
+                                                     (and (equal "invite" (old-membership event))
+                                                          (equal "leave" (new-membership event))))
+                                                   events))
+                  (ban-events (cl-remove-if-not (lambda (event)
+                                                  (and (member (old-membership event) '("invite" "leave"))
+                                                       (equal "ban" (new-membership event))))
+                                                events))
+                  (unban-events (cl-remove-if-not (lambda (event)
+                                                    (and (equal "ban" (old-membership event))
+                                                         (equal "leave" (new-membership event))))
+                                                  events))
+                  (kicked-events (cl-remove-if-not (lambda (event)
+                                                     (and (equal "join" (old-membership event))
+                                                          (equal "leave" (new-membership event))
+                                                          (not (equal (ement-user-id (ement-event-sender event))
+                                                                      (ement-event-state-key event)))))
+                                                   events))
+                  (kick-and-ban-events (cl-remove-if-not (lambda (event)
+                                                           (and (equal "join" (old-membership event))
+                                                                (equal "ban" (new-membership event))))
+                                                         events))
+                  (rename-events (cl-remove-if-not (lambda (event)
+                                                     (and (equal "join" (old-membership event))
+                                                          (equal "join" (new-membership event))
+                                                          (equal (alist-get 'avatar_url (ement-event-content event))
+                                                                 (map-nested-elt (ement-event-unsigned event)
+                                                                                 '(prev_content avatar_url)))))
+                                                   events))
+                  (avatar-events (cl-remove-if-not (lambda (event)
+                                                     (and (equal "join" (old-membership event))
+                                                          (equal "join" (new-membership event))
+                                                          (not (equal (alist-get 'avatar_url (ement-event-content event))
+                                                                      (map-nested-elt (ement-event-unsigned event)
+                                                                                      '(prev_content avatar_url))))))
+                                                   events))
+                  join-and-leave-events rejoin-and-leave-events kicked-and-rejoined-events)
+             ;; Remove apparent duplicates between join/rejoin events.
+             (setf join-events (cl-delete-if (lambda (event)
+                                               (cl-find (ement-event-state-key event) rejoin-events
+                                                        :test #'equal :key #'ement-event-state-key))
+                                             join-events)
+                   rejoin-events (cl-delete-if (lambda (event)
+                                                 (cl-find (ement-event-state-key event) join-events
+                                                          :test #'equal :key #'ement-event-state-key))
+                                               rejoin-events)
+                   join-and-leave-events (cl-loop for join-event in join-events
+                                                  for left-event = (cl-find (ement-event-state-key join-event) left-events
+                                                                            :test #'equal :key #'ement-event-state-key)
+                                                  when left-event
+                                                  collect left-event
+                                                  and do (setf join-events (cl-delete (ement-event-state-key join-event) join-events
+                                                                                      :test #'equal :key #'ement-event-state-key)
+                                                               left-events (cl-delete (ement-event-state-key left-event) left-events
+                                                                                      :test #'equal :key #'ement-event-state-key)))
+                   kicked-and-rejoined-events (cl-loop for rejoin-event in rejoin-events
+                                                       for kicked-event = (cl-find (ement-event-state-key rejoin-event) kicked-events
+                                                                                   :test #'equal :key #'ement-event-state-key)
+                                                       when kicked-event collect kicked-event
+                                                       and do (setf rejoin-events (cl-delete (ement-event-state-key kicked-event) rejoin-events
+                                                                                             :test #'equal :key #'ement-event-state-key)
+                                                                    left-events (cl-delete (ement-event-state-key kicked-event) left-events
+                                                                                           :test #'equal :key #'ement-event-state-key)))
+                   rejoin-and-leave-events (cl-loop for rejoin-event in rejoin-events
+                                                    for left-event = (cl-find (ement-event-state-key rejoin-event) left-events
+                                                                              :test #'equal :key #'ement-event-state-key)
+                                                    when left-event
+                                                    collect left-event
+                                                    and do (setf rejoin-events (cl-delete
+                                                                                (ement-event-state-key rejoin-event) rejoin-events
+                                                                                :test #'equal :key #'ement-event-state-key)
+                                                                 left-events (cl-delete (ement-event-state-key left-event) left-events
+                                                                                        :test #'equal :key #'ement-event-state-key))))
+             (format "Membership: %s."
+                     (string-join (cl-loop for (type . events)
+                                           in (ement-alist "rejoined" rejoin-events
+                                                           "joined" join-events
+                                                           "left" left-events
+                                                           "joined and left" join-and-leave-events
+                                                           "was kicked and rejoined" kicked-and-rejoined-events
+                                                           "rejoined and left" rejoin-and-leave-events
+                                                           "invited" invite-events
+                                                           "rejected invitation" reject-events
+                                                           "banned" ban-events
+                                                           "unbanned" unban-events
+                                                           "kicked and banned" kick-and-ban-events
+                                                           "changed name" rename-events
+                                                           "changed avatar" avatar-events)
+                                           for users = (mapcar #'event-user
+                                                               (cl-delete-duplicates
+                                                                events :key #'ement-event-state-key))
+                                           for number = (length users)
+                                           when events
+                                           collect (format "%s %s (%s)" number
+                                                           (propertize type 'face 'bold)
+                                                           (string-join users ", ")))
+                                  "; "))))))))
+
+;;;;; Images
+
+;; Downloading and displaying images in messages, room/user avatars, etc.
+
+(require 'image)
+
+(defvar ement-room-image-keymap
+  (let ((map (make-sparse-keymap)))
+    (set-keymap-parent map image-map)
+    (define-key map (kbd "M-RET") #'ement-room-image-scale)
+    (define-key map (kbd "RET") #'ement-room-image-show)
+    (define-key map [mouse-1] #'ement-room-image-scale-mouse)
+    (define-key map [double-mouse-1] #'ement-room-image-show-mouse)
+    map)
+  "Keymap for images in room buffers.")
+
+(defgroup ement-room-images nil
+  "Showing images in rooms."
+  :group 'ement-room)
+
+(defcustom ement-room-images t
+  "Download and show images in messages, avatars, etc."
+  :type 'boolean
+  :set (lambda (option value)
+         (if (or (fboundp 'imagemagick-types)
+                 (when (fboundp 'image-transforms-p)
+                   (image-transforms-p)))
+             (set-default option value)
+           (set-default option nil)
+           (when (and value (display-images-p))
+             (display-warning 'ement "This Emacs was not built with ImageMagick support, nor does it support Cairo/XRender scaling, so images can't be displayed in Ement")))))
+
+(defcustom ement-room-image-thumbnail-height 0.2
+  "Scale thumbnail images to this multiple of the window body height.
+Should be a number between 0 and 1.
+See also `ement-room-image-thumbnail-height-min'."
+  :type '(number :tag "Multiple of the window body height"))
+
+(defcustom ement-room-image-thumbnail-height-min 30
+  "Minimum height in pixels when scaling thumbnail images.
+See also `ement-room-image-thumbnail-height'."
+  :type 'natnum)
+
+(defcustom ement-room-image-initial-height ement-room-image-thumbnail-height
+  "Limit images' initial display height.
+If a number, it should be no larger than 1 (because Emacs can't
+display images larger than the window body height)."
+  :type '(choice (const :tag "Use full window height (or width)" nil)
+                 (number :tag "Multiple of the window body height")))
+
+(defcustom ement-room-image-margin 5
+  "How many pixels to add as an extra margin around the image."
+  :type 'natnum)
+
+(defcustom ement-room-image-relief 2
+  "Width in pixels of shadow rectangle around the image.
+If negative, shadows are drawn so that the image appears as a
+pressed button; otherwise, it appears as an unpressed button."
+  :type 'integer)
+
+(defun ement-room-image-scale-mouse (event)
+  "Toggle scale of image at mouse EVENT.
+Scale image to fit within the window's body.  If image is already
+fit to the window, reduce its max-height to 10% of the window's
+height."
+  (interactive "e")
+  (let* ((pos (event-start event))
+         (window (posn-window pos)))
+    (with-selected-window window
+      (ement-room-image-scale (posn-point pos)))))
+
+(defun ement-room-image-scale (pos)
+  "Toggle scale of image at POS.
+Scale image to fit the window body.  If the image already fits
+the window body, reduce its max-height in accordance with user
+options `ement-room-image-thumbnail-height' and
+`ement-room-image-thumbnail-height-min'."
+  (interactive "d")
+  (pcase-let* ((image (get-text-property pos 'display))
+               (max-height (image-property image :max-height))
+               (xy (posn-x-y (posn-at-point pos)))
+               (window-width (window-body-width nil t))
+               (max-width (- window-width (car xy)))
+               (window-height (window-body-height nil t))
+               (use-window-body-size (not (and (numberp max-height)
+                                               (= window-height max-height))))
+               ;; Image scaling commands set :max-height and friends to nil.
+               ;; See <https://github.com/alphapapa/ement.el/issues/39>.
+               (new-height (if use-window-body-size
+                               window-height
+                             (max ement-room-image-thumbnail-height-min
+                                  ;; Emacs doesn't like floats as the max-height.
+                                  (truncate (* window-height
+                                               ement-room-image-thumbnail-height))))))
+    (when (fboundp 'imagemagick-types)
+      ;; Only do this when ImageMagick is supported.
+      ;; FIXME: When requiring Emacs 27+, remove this (I guess?).
+      (setf (image-property image :type) 'imagemagick))
+    ;; Set :scale to nil since image scaling commands might have changed it.
+    (setf (image-property image :scale) nil
+          (image-property image :max-width) max-width
+          (image-property image :max-height) new-height)
+    ;; When maximising, eliminate all padding around the image, so that the line
+    ;; height will not exceed the window height.  This prevents window scrolling
+    ;; issues.  Set the window start to ensure the image is displayed in full.
+    (if use-window-body-size
+        (setf (image-property image :relief) nil
+              (image-property image :margin) nil
+              (window-start) pos)
+      (setf (image-property image :relief) ement-room-image-relief
+            (image-property image :margin) ement-room-image-margin))))
+
+(defun ement-room-image-show-mouse (event)
+  "Show image at mouse EVENT in a new buffer."
+  (interactive "e")
+  (let* ((pos (event-start event))
+         (window (posn-window pos)))
+    (with-selected-window window
+      (ement-room-image-show (posn-point pos)))))
+
+(defun ement-room-image-show (pos)
+  "Show image at POS in a new buffer."
+  (interactive "d")
+  (pcase-let* ((image (copy-sequence (get-text-property pos 'display)))
+               (ement-event (ewoc-data (ewoc-locate ement-ewoc pos)))
+               ((cl-struct ement-event id) ement-event)
+               (buffer-name (format "*Ement image: %s*" id)))
+    (when (fboundp 'imagemagick-types)
+      ;; Only do this when ImageMagick is supported.
+      ;; FIXME: When requiring Emacs 27+, remove this (I guess?).
+      (setf (image-property image :type) 'imagemagick))
+    (setf (image-property image :scale) 1.0
+          (image-property image :max-width) nil
+          (image-property image :max-height) nil)
+    (unless (get-buffer buffer-name)
+      (with-current-buffer (get-buffer-create buffer-name)
+        (erase-buffer)
+        (insert-image image)
+        (image-mode)))
+    (pop-to-buffer buffer-name
+                   '((display-buffer-pop-up-frame
+                      (pop-up-frame-parameters . ((fullscreen . t) (maximized . t))))))))
+
+(cl-defun ement-room--image-download (event session &key then else (authenticatedp t))
+  "Download image EVENT on SESSION and call THEN, else ELSE.
+If AUTHENTICATEDP, send authenticated request to new
+endpoint (Matrix 1.11, MSC3911); otherwise send old-style,
+unauthenticated request to old endpoint."
+  (declare (indent defun))
+  (pcase-let* (((cl-struct ement-event content) event)
+               ((map ('url mxc)) content))
+    (ement--media-request mxc session :then then :else else
+      :queue ement-images-queue :authenticatedp authenticatedp)))
+
+(defun ement-room--format-m.image (event session)
+  "Return \"m.image\" EVENT on SESSION formatted as a string.
+When `ement-room-images' is non-nil, also download it and then
+show it in the buffer."
+  (pcase-let* (((cl-struct ement-event (local event-local)) event)
+               ;; HACK: Get the room's buffer from the variable (the current buffer
+               ;; will be a temp formatting buffer when this is called, but it still
+               ;; inherits the `ement-room' variable from the room buffer, thankfully).
+               ((cl-struct ement-room local) ement-room)
+               ((map buffer) local)
+               ;; TODO: Thumbnail support.
+               ((map image) event-local)
+               (then (apply-partially #'ement-room--m.image-callback event ement-room))
+               (else (lambda (plz-error)
+                       "Handle PLZ-ERROR for a failed request to download an image."
+                       (pcase-let* (((cl-struct plz-error response
+                                                (message plz-message)
+                                                (curl-error `(,curl-exit-code . ,curl-message)))
+                                     plz-error)
+                                    (status (when (plz-response-p response)
+                                              (plz-response-status response)))
+                                    (body (when (plz-response-p response)
+                                            (plz-response-body response)))
+                                    (json-object (when body
+                                                   (ignore-errors
+                                                     (json-read-from-string body))))
+                                    (errcode (alist-get 'errcode json-object))
+                                    (error-message (format "%S: %s"
+                                                           (or curl-exit-code status)
+                                                           (or (when json-object
+                                                                 (alist-get 'error json-object))
+                                                               curl-message
+                                                               plz-message))))
+                         (pcase errcode
+                           ("M_UNRECOGNIZED"
+                            ;; Resend unauthenticated media request for older servers.
+                            ;; FIXME: Test the "/versions" endpoint to see what's supported.  See
+                            ;; <https://matrix.org/blog/2024/06/20/matrix-v1.11-release/>.
+                            (ement-room--image-download event session :authenticatedp nil
+                              :then then))
+                           (_ (signal 'ement-api-error (list error-message))))))))
+    (if (and ement-room-images image)
+        ;; Images enabled and image downloaded: create image and
+        ;; return it in a string.
+        (condition-case err
+            (let ((image (create-image image nil 'data-p :ascent 'center))
+                  (buffer-window (when buffer
+                                   (get-buffer-window buffer)))
+                  max-height max-width)
+              ;; Calculate max image display size.
+              (cond (ement-room-image-initial-height
+                     ;; Use configured value.
+                     (setf max-height (max ement-room-image-thumbnail-height-min
+                                           ;; Emacs doesn't like floats as the max-height.
+                                           (truncate
+                                            (* (window-body-height buffer-window t)
+                                               ement-room-image-initial-height)))
+                           max-width (window-body-width buffer-window t)))
+                    (buffer-window
+                     ;; Buffer displayed: use window size.
+                     (setf max-height (window-body-height buffer-window t)
+                           max-width (window-body-width buffer-window t)))
+                    (t
+                     ;; Buffer not displayed: use frame size.
+                     (setf max-height (frame-pixel-height)
+                           max-width (frame-pixel-width))))
+              (when (fboundp 'imagemagick-types)
+                ;; Only do this when ImageMagick is supported.
+                ;; FIXME: When requiring Emacs 27+, remove this (I guess?).
+                (setf (image-property image :type) 'imagemagick))
+              (setf (image-property image :max-width) max-width
+                    (image-property image :max-height) max-height
+                    (image-property image :relief) ement-room-image-relief
+                    (image-property image :margin) ement-room-image-margin
+                    (image-property image :pointer) 'hand)
+              (concat "\n"
+                      (ement-room-wrap-prefix " "
+                        'display image
+                        'keymap ement-room-image-keymap)))
+          (error (format "\n [error inserting image: %s]" (error-message-string err))))
+      ;; Image not downloaded: insert URL as button, and download if enabled.
+      (prog1
+          (ement-room-wrap-prefix "[image]"
+            'action (apply-partially #'apply #'ement-room--image-download)
+            'button t
+            'button-data (list event session
+                               :then (lambda (&rest args)
+                                       ;; Bind non-nil to force the image to be displayed.
+                                       (let ((ement-room-images t))
+                                         (apply then args)))
+                               :else else)
+            'category t
+            'face 'button
+            'follow-link t
+            'help-echo "Show image"
+            'keymap button-map
+            'mouse-face 'highlight)
+        (when ement-room-images
+          ;; Images enabled: download it.
+          (ement-room--image-download event session
+            :then then :else else))))))
+
+(defun ement-room--m.image-callback (event room data)
+  "Add downloaded image from DATA to EVENT in ROOM.
+Then invalidate EVENT's node to show the image."
+  (pcase-let* (((cl-struct ement-room (local (map buffer))) room))
+    (setf (map-elt (ement-event-local event) 'image) data)
+    (when (buffer-live-p buffer)
+      (with-current-buffer buffer
+        (if-let (node (ement-room--ewoc-last-matching ement-ewoc
+                        (lambda (node-data)
+                          (eq node-data event))))
+            (ewoc-invalidate ement-ewoc node)
+          ;; This shouldn't happen, but very rarely, it can.  I haven't figured out why
+          ;; yet, so checking whether a node is found rather than blindly calling
+          ;; `ewoc-invalidate' prevents an error from aborting event processing.
+          (display-warning 'ement-room--m.image-callback
+                           (format "Event %S not found in room %S (a very rare, as-yet unexplained bug, which can be safely ignored; you may disconnect and reconnect if you wish, but it isn't strictly necessary)"
+                                   (ement-event-id event)
+                                   (ement-room-display-name room))))))))
+
+(defun ement-room--format-m.file (event)
+  "Return \"m.file\" EVENT formatted as a string."
+  ;; TODO: Insert thumbnail images when enabled.
+  (pcase-let* (((cl-struct ement-event
+                           (content (map filename
+                                         ('info (map mimetype size))
+                                         ('url mxc-url))))
+                event)
+               (human-size (when size
+                             (file-size-human-readable size)))
+               (string (format "[file: %s (%s) (%s)]" filename mimetype human-size)))
+    (concat (propertize string
+                        'action #'call-interactively
+                        'button t
+                        'button-data #'ement-room-download-file
+                        'category t
+                        'face 'button
+                        'follow-link t
+                        'help-echo mxc-url
+                        'keymap button-map
+                        'mouse-face 'highlight)
+            (propertize " "
+                        'display '(space :relative-height 1.5)))))
+
+(defun ement-room--format-m.video (event)
+  "Return \"m.video\" EVENT formatted as a string."
+  ;; TODO: Insert thumbnail images when enabled.
+  (pcase-let* (((cl-struct ement-event
+                           (content (map body
+                                         ('info (map mimetype size w h))
+                                         ('url mxc-url))))
+                event)
+               (human-size (file-size-human-readable size))
+               (string (format "[video: %s (%s) (%sx%s) (%s)]" body mimetype w h human-size)))
+    (concat (propertize string
+                        'action #'call-interactively
+                        'button t
+                        'button-data #'ement-room-download-file
+                        'category t
+                        'face 'button
+                        'follow-link t
+                        'help-echo mxc-url
+                        'keymap button-map
+                        'mouse-face 'highlight)
+            (propertize " "
+                        'display '(space :relative-height 1.5)))))
+
+(defun ement-room--format-m.audio (event)
+  "Return \"m.audio\" EVENT formatted as a string."
+  (pcase-let* (((cl-struct ement-event
+                           (content (map body
+                                         ('info (map mimetype duration size))
+                                         ('url mxc-url))))
+                event)
+               (human-size (file-size-human-readable size))
+               (human-duration (format-seconds "%m:%s" (/ duration 1000)))
+               (string (format "[audio: %s (%s) (%s) (%s)]" body mimetype human-duration human-size)))
+    (concat (propertize string
+                        'action #'ement-room-download-file
+                        'button t
+                        'button-data event
+                        'category t
+                        'face 'button
+                        'follow-link t
+                        'help-echo mxc-url
+                        'keymap button-map
+                        'mouse-face 'highlight)
+            (propertize " "
+                        'display '(space :relative-height 1.5)))))
+
+;;;;; Org format sending
+
+;; Some of these declarations may need updating as Org changes.
+
+(defvar org-export-with-toc)
+(defvar org-export-with-broken-links)
+(defvar org-export-with-section-numbers)
+(defvar org-export-with-sub-superscripts)
+(defvar org-html-inline-images)
+
+(declare-function org-element-property "org-element")
+(declare-function org-export-data "ox")
+(declare-function org-export-get-caption "ox")
+(declare-function org-export-get-ordinal "ox")
+(declare-function org-export-get-reference "ox")
+(declare-function org-export-read-attribute "ox")
+(declare-function org-html--has-caption-p "ox-html")
+(declare-function org-html--textarea-block "ox-html")
+(declare-function org-html--translate "ox-html")
+(declare-function org-html-export-as-html "ox-html")
+(declare-function org-html-format-code "ox-html")
+
+(defun ement-room-compose-org ()
+  "Activate `org-mode' in current compose buffer.
+Configures the buffer appropriately so that saving it will export
+the Org buffer's contents."
+  (interactive)
+  (unless ement-room-compose-buffer
+    (user-error "This command should be run in a compose buffer.  Use `ement-room-compose-message' first"))
+  ;; Calling `org-mode' seems to wipe out local variables.
+  (let ((room ement-room)
+        (session ement-session))
+    (org-mode)
+    (ement-room-init-compose-buffer room session))
+  (setq-local ement-room-send-message-filter #'ement-room-send-org-filter))
+
+(defun ement-room-send-org-filter (content room)
+  "Return event CONTENT for ROOM having processed its Org content.
+The CONTENT's body is exported with
+`org-html-export-as-html' (with some adjustments for
+compatibility), and the result is added to the CONTENT as
+\"formatted_body\"."
+  (require 'ox-html)
+  ;; The CONTENT alist has string keys before being sent.
+  (pcase-let* ((body (alist-get "body" content nil nil #'equal))
+               (formatted-body
+                (save-window-excursion
+                  (with-temp-buffer
+                    (insert (ement--format-body-mentions body room
+                              :template "[[https://matrix.to/#/%s][%s]]"))
+                    (cl-letf (((symbol-function 'org-html-src-block)
+                               (symbol-function 'ement-room--org-html-src-block)))
+                      (let ((org-export-with-toc nil)
+                            (org-export-with-broken-links t)
+                            (org-export-with-section-numbers nil)
+                            (org-export-with-sub-superscripts nil)
+                            (org-html-inline-images nil)
+                            (display-buffer-alist (cons '("^\\*Org HTML Export\\*$"
+                                                          . (display-buffer-no-window nil))
+                                                        display-buffer-alist)))
+                        (org-html-export-as-html nil nil nil 'body-only)))
+                    (with-current-buffer "*Org HTML Export*"
+                      (prog1 (string-trim (buffer-string))
+                        (kill-buffer)))))))
+    (setf (alist-get "formatted_body" content nil nil #'equal) formatted-body
+          (alist-get "format" content nil nil #'equal) "org.matrix.custom.html")
+    content))
+
+(defun ement-room--org-html-src-block (src-block _contents info)
+  "Transcode a SRC-BLOCK element from Org to HTML.
+CONTENTS holds the contents of the item.  INFO is a plist holding
+contextual information.
+
+This is a copy of `org-html-src-block' that uses Riot
+Web-compatible HTML output, using HTML like:
+
+<pre><code class=\"language-python\">..."
+  (if (org-export-read-attribute :attr_html src-block :textarea)
+      (org-html--textarea-block src-block)
+    (let ((lang (pcase (org-element-property :language src-block)
+                  ;; Riot's syntax coloring doesn't support "elisp", but "lisp" works.
+                  ("elisp" "lisp")
+                  (else else)))
+	  (code (org-html-format-code src-block info))
+	  (label (let ((lbl (and (org-element-property :name src-block)
+				 (org-export-get-reference src-block info))))
+		   (if lbl (format " id=\"%s\"" lbl) ""))))
+      (if (not lang) (format "<pre class=\"example\"%s>\n%s</pre>" label code)
+	(format "<div class=\"org-src-container\">\n%s%s\n</div>"
+		;; Build caption.
+		(let ((caption (org-export-get-caption src-block)))
+		  (if (not caption) ""
+		    (let ((listing-number
+			   (format
+			    "<span class=\"listing-number\">%s </span>"
+			    (format
+			     (org-html--translate "Listing %d:" info)
+			     (org-export-get-ordinal
+			      src-block info nil #'org-html--has-caption-p)))))
+		      (format "<label class=\"org-src-name\">%s%s</label>"
+			      listing-number
+			      (string-trim (org-export-data caption info))))))
+		;; Contents.
+		(format "<pre><code class=\"src language-%s\"%s>%s</code></pre>"
+			lang label code))))))
+
+;;;;; Completion
+
+;; Completing member and room names.
+
+(defun ement-room--complete-members-at-point ()
+  "Complete member names and IDs at point.
+Uses members in the current buffer's room.  For use in
+`completion-at-point-functions'."
+  (let ((beg (save-excursion
+               (when (re-search-backward (rx (or bol bos blank)) nil t)
+                 (skip-syntax-forward "-")
+                 (point))))
+        (end (point))
+        (collection-fn (completion-table-dynamic
+                        ;; The manual seems to show the FUN ignoring any
+                        ;; arguments, but the `completion-table-dynamic' docstring
+                        ;; seems to say that it should use the argument.
+                        (lambda (_ignore)
+                          (ement-room--member-names-and-ids)))))
+    (when beg
+      (list beg end collection-fn :exclusive 'no))))
+
+(defun ement-room--complete-rooms-at-point ()
+  "Complete room aliases and IDs at point.
+For use in `completion-at-point-functions'."
+  (let ((beg (save-excursion
+               (when (re-search-backward (rx (or bol bos blank) (or "!" "#")) nil t)
+                 (skip-syntax-forward "-")
+                 (point))))
+        (end (point))
+        (collection-fn (completion-table-dynamic
+                        ;; The manual seems to show the FUN ignoring any
+                        ;; arguments, but the `completion-table-dynamic' docstring
+                        ;; seems to say that it should use the argument.
+                        (lambda (_ignore)
+                          (ement-room--room-aliases-and-ids)))))
+    (when beg
+      (list beg end collection-fn :exclusive 'no))))
+
+;; TODO: Use `cl-pushnew' in these two functions instead of `delete-dups'.
+
+(defun ement-room--member-names-and-ids ()
+  "Return a list of member names and IDs seen in current room.
+If room's `members' table is filled, use it; otherwise, fetch
+members list and return already-seen members instead.  For use in
+`completion-at-point-functions'."
+  ;; For now, we just collect a list of members from events we've seen.
+  ;; TODO: In the future, we may maintain a per-room table of members, which
+  ;; would be more suitable for completing names according to the spec.
+  (pcase-let* ((room (if (minibufferp)
+                         (buffer-local-value
+                          'ement-room (window-buffer (minibuffer-selected-window)))
+                       ement-room))
+               (session (if (minibufferp)
+                            (buffer-local-value
+                             'ement-session (window-buffer (minibuffer-selected-window)))
+                          ement-session))
+               ((cl-struct ement-room members) room)
+               (members (if (alist-get 'fetched-members-p (ement-room-local room))
+                            (hash-table-values members)
+                          ;; HACK: Members table empty: update list and use known events
+                          ;; for now.
+                          (ement-singly (alist-get 'getting-members-p (ement-room-local room))
+                            (ement--get-joined-members room session
+                              :then (lambda (_) (setf (alist-get 'getting-members-p (ement-room-local room)) nil))
+                              :else (lambda (_) (setf (alist-get 'getting-members-p (ement-room-local room)) nil))))
+                          (mapcar #'ement-event-sender
+                                  (ement-room-timeline ement-room)))))
+    (delete-dups
+     (cl-loop for member in members
+              collect (ement-user-id member)
+              collect (ement--user-displayname-in room member)))))
+
+(defun ement-room--room-aliases-and-ids ()
+  "Return a list of room names and aliases seen in current session.
+For use in `completion-at-point-functions'."
+  (let* ((session (if (minibufferp)
+                      (buffer-local-value
+                       'ement-session (window-buffer (minibuffer-selected-window)))
+                    ement-session)))
+    (delete-dups
+     (delq nil (cl-loop for room in (ement-session-rooms session)
+                        collect (ement-room-id room)
+                        collect (ement-room-canonical-alias room))))))
+
+;;;;; Transient
+
+(require 'transient)
+
+(transient-define-prefix ement-room-transient ()
+  "Transient for Ement Room buffers."
+  [:pad-keys t
+             ["Movement"
+              ("TAB" "Next event" ement-room-goto-next)
+              ("<backtab>" "Previous event" ement-room-goto-prev)
+              ("SPC" "Scroll up and mark read" ement-room-scroll-up-mark-read)
+              ("S-SPC" "Scroll down" ement-room-scroll-down-command)
+              ("M-SPC" "Jump to fully-read marker" ement-room-goto-fully-read-marker)
+              ("m" "Move read markers to point" ement-room-mark-read)]
+             ["Switching"
+              ("M-g M-l" "List rooms" ement-room-list)
+              ("M-g M-r" "Switch to other room" ement-view-room)
+              ("M-g M-m" "Switch to mentions buffer" ement-notify-switch-to-mentions-buffer)
+              ("M-g M-n" "Switch to notifications buffer" ement-notify-switch-to-notifications-buffer)
+              ("q" "Quit window" quit-window)]]
+  [:pad-keys t
+             ["Messages"
+              ("c" "Composition format" ement-room-set-composition-format
+               :description (lambda ()
+                              (concat "Composition format: "
+                                      (propertize (car (cl-rassoc ement-room-send-message-filter
+                                                                  (list (cons "Plain-text" nil)
+                                                                        (cons "Org-mode" 'ement-room-send-org-filter))
+                                                                  :test #'equal))
+                                                  'face 'transient-value))))
+              ("RET" "Write message" ement-room-dispatch-new-message)
+              ("M-RET" "Write message (alternative)" ement-room-dispatch-new-message-alt)
+              ("S-<return>" "Write reply" ement-room-dispatch-reply-to-message)
+              ("<insert>" "Edit message" ement-room-dispatch-edit-message)
+              ("C-k" "Delete message" ement-room-delete-message)
+              ("s r" "Send reaction" ement-room-send-reaction)
+              ("s e" "Send emote" ement-room-send-emote)
+              ("s f" "Send file" ement-room-send-file)
+              ("s i" "Send image" ement-room-send-image)
+              ("D" "Download event media" ement-room-download-file)]
+             ["Users"
+              ("u RET" "Send direct message" ement-send-direct-message)
+              ("u i" "Invite user" ement-invite-user)
+              ("u I" "Ignore user" ement-ignore-user)]]
+  [:pad-keys t
+             ["Room"
+              ("M-s o" "Occur search in room" ement-room-occur)
+              ("r d" "Describe room" ement-describe-room)
+              ("r m" "List members" ement-list-members)
+              ("r t" "Set topic" ement-room-set-topic)
+              ("r f" "Set message format" ement-room-set-message-format)
+              ("r N" "Override name" ement-room-override-name
+               :description (lambda ()
+                              (format "Name override: %s"
+                                      (if-let* ((event (alist-get "org.matrix.msc3015.m.room.name.override"
+                                                                  (ement-room-account-data ement-room) nil nil #'equal))
+                                                (name (map-nested-elt event '(content name))))
+                                          (propertize name 'face 'transient-value)
+                                        (propertize "none" 'face 'transient-inactive-value)))))
+              ("r n" "Set notification state" ement-room-set-notification-state
+               :description (lambda ()
+                              (let ((state (ement-room-notification-state ement-room ement-session)))
+                                (format "Notifications (%s|%s|%s|%s|%s)"
+                                        (propertize "default"
+                                                    'face (pcase state
+                                                            (`nil 'transient-value)
+                                                            (_ 'transient-inactive-value)))
+                                        (propertize "all-loud"
+                                                    'face (pcase state
+                                                            ('all-loud 'transient-value)
+                                                            (_ 'transient-inactive-value)))
+                                        (propertize "all"
+                                                    'face (pcase state
+                                                            ('all 'transient-value)
+                                                            (_ 'transient-inactive-value)))
+                                        (propertize "mentions"
+                                                    'face (pcase state
+                                                            ('mentions-and-keywords 'transient-value)
+                                                            (_ 'transient-inactive-value)))
+                                        (propertize "none"
+                                                    'face (pcase state
+                                                            ('none 'transient-value)
+                                                            (_ 'transient-inactive-value)))))))
+              ("r T" "Tag/untag room" ement-tag-room
+               :description (lambda ()
+                              (format "Tag/untag room (%s|%s)"
+                                      (propertize "Fav"
+                                                  'face (if (ement--room-tagged-p "m.favourite" ement-room)
+                                                            'transient-value 'transient-inactive-value))
+                                      (propertize "Low-prio"
+                                                  'face (if (ement--room-tagged-p "m.lowpriority" ement-room)
+                                                            'transient-value 'transient-inactive-value)))))]
+             ["Room membership"
+              ("R c" "Create room" ement-create-room)
+              ("R j" "Join room" ement-join-room)
+              ("R l" "Leave room" ement-leave-room)
+              ("R F" "Forget room" ement-forget-room)
+              ("R n" "Set nick" ement-room-set-display-name
+               :description (lambda ()
+                              (format "Set nick (%s)"
+                                      (propertize (ement--user-displayname-in
+                                                   ement-room (gethash (ement-user-id (ement-session-user ement-session))
+                                                                       ement-users))
+                                                  'face 'transient-value))))
+              ("R s" "Toggle spaces" ement-room-toggle-space
+               :description (lambda ()
+                              (format "Toggle spaces (%s)"
+                                      (if-let ((spaces (ement--room-spaces ement-room ement-session)))
+                                          (string-join
+                                           (mapcar (lambda (space)
+                                                     (propertize (ement-room-display-name space)
+                                                                 'face 'transient-value))
+                                                   spaces)
+                                           ", ")
+                                        (propertize "none" 'face 'transient-inactive-value)))))]]
+  ["Other"
+   ("v" "View event" ement-room-view-event)
+   ("g" "Sync new messages" ement-room-sync
+    :if (lambda ()
+          (interactive)
+          (or (not ement-auto-sync)
+              (not (map-elt ement-syncs ement-session)))))])
+
+;;;; Browsing URLs, EWW
+
+(defun ement-room-browse-mxc (mxc)
+  ;; TODO: If prefix arg, prompt for destination and download to file.
+  "Browse MXC URL on current `ement-session'."
+  ;; For authenticated media, we have to provide our own version of `eww-retrieve'.
+  (let ((session ement-session))
+    (cl-letf (((symbol-function 'eww-retrieve)
+               (lambda (mxc callback cbargs)
+                 (ement--media-request mxc session
+                   :as (lambda ()
+                         ;; EWW wants to parse the headers itself, so widen and decode them.
+                         (widen)
+                         (decode-coding-region (point-min) (point) 'utf-8)
+                         ;; HACK: This STATUS argument to `eww-render' is bogus.
+                         (apply callback 'status cbargs))))))
+      (eww-browse-url mxc))))
+
+;;;; Downloading media/files
+
+;; We load `eww' to define this variable on-demand.
+(defvar eww-download-directory)
+
+(defun ement-room-download-file (event destination)
+  "Download EVENT's file to DESTINATION.
+If DESTINATION is a directory, use the file's default name;
+otherwise, download to the filename.  Interactively, download to
+`eww-download-directory'; with prefix, prompt for destination."
+  (interactive (progn
+                 (require 'eww)
+                 (list (ement-room--event-at (point))
+                       (if current-prefix-arg
+                           (expand-file-name
+                            (read-file-name
+                             "Download to: "
+                             (cl-typecase eww-download-directory
+                               (string eww-download-directory)
+                               (function (funcall eww-download-directory)))))
+                         (expand-file-name
+                          (cl-typecase eww-download-directory
+                            (string eww-download-directory)
+                            (function (funcall eww-download-directory))))))))
+  (pcase-let* (((cl-struct ement-event
+                           (content (map ('filename event-filename) ('url mxc-url)
+                                         body)))
+                event)
+               (started-at (current-time))
+               (filename (if (not event-filename)
+                             body
+                           (if (equal body event-filename)
+                               body
+                             event-filename))))
+    (when (file-directory-p destination)
+      (unless (file-exists-p destination)
+        (make-directory destination 'parents))
+      (setf destination (file-name-concat destination filename)))
+    (unless (file-writable-p destination)
+      ;; FIXME: Pressing "C-u" before clicking a download link doesn't work.
+      (user-error "Destination path not writable: %S (Call with prefix to prompt for filename)"
+                  destination))
+    (when (file-exists-p destination)
+      (user-error "File already exists: %S (Call with prefix to prompt for filename)" destination))
+    ;; TODO: For bonus points, provide a way to cancel a download (otherwise the user
+    ;; would have to use `list-processes' and find the right one to delete), and to see
+    ;; progress (perhaps borrowing some of the relevant code in hyperdrive.el).
+    (ement--media-request mxc-url ement-session :authenticatedp t
+      :as `(file ,destination)
+      :then (lambda (&rest _)
+              (let* ((file-size (file-attribute-size
+                                 (file-attributes destination)))
+                     (duration (float-time (time-subtract (current-time) started-at)))
+                     (speed (file-size-human-readable (/ file-size duration))))
+                (message "File downloaded: %S (%s in %s at %s/sec) "
+                         destination (file-size-human-readable file-size)
+                         (format-seconds "%h:%m:%s%z seconds" duration)
+                         speed))))
+    (message "Downloading to %S..." destination)))
+
+;;;; Footer
+
+(provide 'ement-room)
+
+;;; ement-room.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-room.elc b/emacs/.emacs.d/elpa/ement-0.17/ement-room.elc
new file mode 100644
index 0000000..2a7c735
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/ement-room.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-structs.el b/emacs/.emacs.d/elpa/ement-0.17/ement-structs.el
new file mode 100644
index 0000000..f6e9462
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-structs.el
@@ -0,0 +1,97 @@
+;;; ement-structs.el --- Ement structs               -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+;;;; Debugging
+
+;; NOTE: Uncomment this form and `emacs-lisp-byte-compile-and-load' the file to enable
+;; `ement-debug' messages.  This is commented out by default because, even though the
+;; messages are only displayed when `warning-minimum-log-level' is `:debug' at runtime, if
+;; that is so at expansion time, the expanded macro calls format the message and check the
+;; log level at runtime, which is not zero-cost.
+
+;; (eval-and-compile
+;;   (setq-local warning-minimum-log-level nil)
+;;   (setq-local warning-minimum-log-level :debug))
+
+;;;; Requirements
+
+(require 'cl-lib)
+
+;;;; Structs
+
+(cl-defstruct ement-user
+  id displayname account-data
+  (color nil :documentation "Color in which to display user's name.")
+  (message-color nil :documentation "Color in which to display user's messages.")
+  (username nil
+            ;; NOTE: Not exactly according to spec, I guess, but useful for now.
+            :documentation "Username part of user's Matrix ID.")
+  (avatar-url nil :documentation "MXC URL to user's avatar.")
+  (avatar nil :documentation "One-space string with avatar image in display property."))
+
+(cl-defstruct ement-event
+  id sender content origin-server-ts type unsigned state-key
+  receipts
+  ;; The local slot is an alist used by the local client only.
+  local)
+
+(cl-defstruct ement-server
+  name uri-prefix)
+
+(cl-defstruct ement-session
+  user server token transaction-id rooms next-batch
+  device-id initial-device-display-name has-synced-p
+  account-data
+  ;; Hash table of all seen events, keyed on event ID.
+  events)
+
+(cl-defstruct ement-room
+  id display-name prev-batch
+  summary state timeline ephemeral account-data unread-notifications
+  latest-ts topic canonical-alias avatar status type invite-state
+  (members (make-hash-table :test #'equal) :documentation "Hash table mapping joined user IDs to user structs.")
+  ;; The local slot is an alist used by the local client only.
+  local
+  (receipts (make-hash-table :test #'equal))
+  (displaynames (make-hash-table) :documentation "Hash table mapping users to their displayname in this room."))
+
+;;;; Variables
+
+
+;;;; Customization
+
+
+;;;; Commands
+
+
+;;;; Functions
+
+
+;;;; Footer
+
+(provide 'ement-structs)
+
+;;; ement-structs.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-structs.elc b/emacs/.emacs.d/elpa/ement-0.17/ement-structs.elc
new file mode 100644
index 0000000..993e4c1
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/ement-structs.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-tabulated-room-list.el b/emacs/.emacs.d/elpa/ement-0.17/ement-tabulated-room-list.el
new file mode 100644
index 0000000..63b9ffb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement-tabulated-room-list.el
@@ -0,0 +1,474 @@
+;;; ement-tabulated-room-list.el --- Ement tabulated room list buffer    -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements a room list buffer with `tabulated-list-mode'.
+
+;; NOTE: It doesn't appear that there is a way to get the number of
+;; members in a room other than by retrieving the list of members and
+;; counting them.  For a large room (e.g. the Spacemacs Gitter room or
+;; #debian:matrix.org), that means thousands of users, none of the
+;; details of which we care about.  So it seems impractical to know
+;; the number of members when using lazy-loading.  So I guess we just
+;; won't show the number of members.
+
+;; TODO: (Or maybe there is, see m.joined_member_count).
+
+;; NOTE: The tabulated-list API is awkward here.  When the
+;; `tabulated-list-format' is changed, we have to make the change in 4
+;; or 5 other places, and if one forgets to, bugs with non-obvious
+;; causes happen.  I think library using EIEIO or structs would be
+;; very helpful.
+
+;;; Code:
+
+;;;; Requirements
+
+(require 'cl-lib)
+(require 'tabulated-list)
+
+(require 'ement)
+
+;;;; Variables
+
+(declare-function ement-notify-switch-to-mentions-buffer "ement-notify")
+(declare-function ement-notify-switch-to-notifications-buffer "ement-notify")
+(defvar ement-tabulated-room-list-mode-map
+  (let ((map (make-sparse-keymap)))
+    ;; (define-key map (kbd "g") #'tabulated-list-revert)
+    ;; (define-key map (kbd "q") #'bury-buffer)
+    (define-key map (kbd "SPC") #'ement-tabulated-room-list-next-unread)
+    (define-key map (kbd "M-g M-m") #'ement-notify-switch-to-mentions-buffer)
+    (define-key map (kbd "M-g M-n") #'ement-notify-switch-to-notifications-buffer)
+    ;; (define-key map (kbd "S") #'tabulated-list-sort)
+    map))
+
+(defvar ement-tabulated-room-list-timestamp-colors nil
+  "List of colors used for timestamps.
+Set automatically when `ement-tabulated-room-list-mode' is activated.")
+
+(defvar ement-sessions)
+
+;;;; Customization
+
+(defgroup ement-tabulated-room-list-faces nil
+  "Faces for tabulated room list buffers."
+  :group 'ement-tabulated-room-list
+  :group 'ement-faces)
+
+(defgroup ement-tabulated-room-list nil
+  "Options for tabulated room list buffers."
+  :group 'ement)
+
+(defcustom ement-tabulated-room-list-auto-update t
+  "Automatically update the room list buffer."
+  :type 'boolean)
+
+(defcustom ement-tabulated-room-list-avatars (display-images-p)
+  "Show room avatars in the room list."
+  :type 'boolean)
+
+(defcustom ement-tabulated-room-list-simplify-timestamps t
+  "Only show the largest unit of time in a timestamp.
+For example, \"1h54m3s\" becomes \"1h\"."
+  :type 'boolean)
+
+;;;;; Faces
+
+(defface ement-tabulated-room-list-name
+  '((t (:inherit (font-lock-function-name-face button))))
+  "Non-direct rooms."
+  :group 'ement-tabulated-room-list-faces)
+
+(defface ement-tabulated-room-list-direct
+  ;; In case `font-lock-constant-face' is bold, we set the weight to normal, so it can be
+  ;; made bold for unread rooms only.
+  '((t (:weight normal :inherit (font-lock-constant-face ement-tabulated-room-list-name))))
+  "Direct rooms."
+  :group 'ement-tabulated-room-list-faces)
+
+(defface ement-tabulated-room-list-invited
+  '((t (:inherit (italic ement-tabulated-room-list-name))))
+  "Invited rooms."
+  :group 'ement-tabulated-room-list-faces)
+
+(defface ement-tabulated-room-list-left
+  '((t (:strike-through t :inherit ement-tabulated-room-list-name)))
+  "Left rooms."
+  :group 'ement-tabulated-room-list-faces)
+
+(defface ement-tabulated-room-list-unread
+  '((t (:inherit (bold ement-tabulated-room-list-name))))
+  "Unread rooms."
+  :group 'ement-tabulated-room-list-faces)
+
+(defface ement-tabulated-room-list-favourite '((t (:inherit (font-lock-doc-face ement-tabulated-room-list-name))))
+  "Favourite rooms."
+  :group 'ement-tabulated-room-list-faces)
+
+(defface ement-tabulated-room-list-low-priority '((t (:inherit (font-lock-comment-face ement-tabulated-room-list-name))))
+  "Low-priority rooms."
+  :group 'ement-tabulated-room-list-faces)
+
+(defface ement-tabulated-room-list-recent
+  '((t (:inherit font-lock-warning-face)))
+  "Latest timestamp of recently updated rooms.
+The foreground color is used to generate a gradient of colors
+from recent to non-recent for rooms updated in the past 24
+hours but at least one hour ago."
+  :group 'ement-tabulated-room-list-faces)
+
+(defface ement-tabulated-room-list-very-recent
+  '((t (:inherit error)))
+  "Latest timestamp of very recently updated rooms.
+The foreground color is used to generate a gradient of colors
+from recent to non-recent for rooms updated in the past hour."
+  :group 'ement-tabulated-room-list-faces)
+
+;;;; Bookmark support
+
+;; Especially useful with Burly: <https://github.com/alphapapa/burly.el>
+
+(require 'bookmark)
+
+(defun ement-tabulated-room-list-bookmark-make-record ()
+  "Return a bookmark record for the `ement-tabulated-room-list' buffer."
+  (pcase-let* (((cl-struct ement-session user) ement-session)
+               ((cl-struct ement-user (id session-id)) user))
+    ;; MAYBE: Support bookmarking specific events in a room.
+    (list (concat "Ement room list (" session-id ")")
+          (cons 'session-id session-id)
+          (cons 'handler #'ement-tabulated-room-list-bookmark-handler))))
+
+(defun ement-tabulated-room-list-bookmark-handler (bookmark)
+  "Show Ement room list buffer for BOOKMARK."
+  (pcase-let* (((map session-id) bookmark))
+    (unless (alist-get session-id ement-sessions nil nil #'equal)
+      ;; MAYBE: Automatically connect.
+      (user-error "Session %s not connected: call `ement-connect' first" session-id))
+    (ement-tabulated-room-list)))
+
+;;;; Commands
+
+(defun ement-tabulated-room-list-next-unread ()
+  "Show next unread room."
+  (interactive)
+  (unless (button-at (point))
+    (call-interactively #'forward-button))
+  (unless (cl-loop with starting-line = (line-number-at-pos)
+                   if (equal "U" (elt (tabulated-list-get-entry) 0))
+                   do (progn
+                        (goto-char (button-end (button-at (point))))
+                        (push-button (1- (point)))
+                        (cl-return t))
+                   else do (call-interactively #'forward-button)
+                   while (> (line-number-at-pos) starting-line))
+    ;; No more unread rooms.
+    (message "No more unread rooms")))
+
+;;;###autoload
+(defun ement-tabulated-room-list (&rest _ignore)
+  "Show buffer listing joined rooms.
+Calls `pop-to-buffer-same-window'.  Interactively, with prefix,
+call `pop-to-buffer'."
+  (interactive)
+  (with-current-buffer (get-buffer-create "*Ement Rooms*")
+    (ement-tabulated-room-list-mode)
+    (setq-local bookmark-make-record-function #'ement-tabulated-room-list-bookmark-make-record)
+    ;; FIXME: There must be a better way to handle this.
+    (funcall (if current-prefix-arg
+                 #'pop-to-buffer #'pop-to-buffer-same-window)
+             (current-buffer))))
+
+(defun ement-tabulated-room-list--timestamp-colors ()
+  "Return a vector of generated latest-timestamp colors for rooms.
+Used in `ement-tabulated-room-list' and `ement-room-list'."
+  (if (or (equal "unspecified-fg" (face-foreground 'default nil 'default))
+          (equal "unspecified-bg" (face-background 'default nil 'default)))
+      ;; NOTE: On a TTY, the default face's foreground and background colors may be the
+      ;; special values "unspecified-fg"/"unspecified-bg", in which case we can't generate
+      ;; gradients, so we just return a vector of "unspecified-fg".  See
+      ;; <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=55623>.
+      (make-vector 134 "unspecified-fg")
+    (cl-coerce
+     (append (mapcar
+              ;; One face per 10-minute period, from "recent" to 1-hour.
+              (lambda (rgb)
+                (pcase-let ((`(,r ,g ,b) rgb))
+                  (color-rgb-to-hex r g b 2)))
+              (color-gradient (color-name-to-rgb (face-foreground 'ement-tabulated-room-list-very-recent
+                                                                  nil 'default))
+                              (color-name-to-rgb (face-foreground 'ement-tabulated-room-list-recent
+                                                                  nil 'default))
+                              6))
+             (mapcar
+              ;; One face per hour, from "recent" to default.
+              (lambda (rgb)
+                (pcase-let ((`(,r ,g ,b) rgb))
+                  (color-rgb-to-hex r g b 2)))
+              (color-gradient (color-name-to-rgb (face-foreground 'ement-tabulated-room-list-recent
+                                                                  nil 'default))
+                              (color-name-to-rgb (face-foreground 'default nil 'default))
+                              24))
+             (mapcar
+              ;; One face per week for the last year (actually we
+              ;; generate colors for the past two years' worth so
+              ;; that the face for one-year-ago is halfway to
+              ;; invisible, and we don't use colors past that point).
+              (lambda (rgb)
+                (pcase-let ((`(,r ,g ,b) rgb))
+                  (color-rgb-to-hex r g b 2)))
+              (color-gradient (color-name-to-rgb (face-foreground 'default nil 'default))
+                              (color-name-to-rgb (face-background 'default nil 'default))
+                              104)))
+     'vector)))
+
+(define-derived-mode ement-tabulated-room-list-mode tabulated-list-mode
+  "Ement-Tabulated-Room-List"
+  :group 'ement
+  (setf tabulated-list-format (vector
+                               '("U" 1 t)
+                               '(#("P" 0 1 (help-echo "Priority (favorite/low)")) 1 t)
+                               '("B" 1 t)
+                               ;; '("U" 1 t)
+                               '("d" 1 t) ; Direct
+                               (list (propertize "🐱"
+                                                 'help-echo "Avatar")
+                                     4 t) ; Avatar
+                               '("Name" 25 t) '("Topic" 35 t)
+                               (list "Latest"
+                                     (if ement-tabulated-room-list-simplify-timestamps
+                                         6 20)
+                                     #'ement-tabulated-room-list-latest<
+				     :right-align t)
+                               '("Members" 7 ement-tabulated-room-list-members<)
+                               ;; '("P" 1 t) '("Tags" 15 t)
+                               '("Session" 15 t))
+        tabulated-list-sort-key '("Latest" . t)
+        ement-tabulated-room-list-timestamp-colors (ement-tabulated-room-list--timestamp-colors))
+  (add-hook 'tabulated-list-revert-hook #'ement-tabulated-room-list--set-entries nil 'local)
+  (tabulated-list-init-header)
+  (ement-tabulated-room-list--set-entries)
+  (tabulated-list-revert))
+
+(defun ement-tabulated-room-list-action (event)
+  "Show buffer for room at EVENT or point."
+  (interactive "e")
+  (mouse-set-point event)
+  (pcase-let* ((room (tabulated-list-get-id))
+               (`[,_unread ,_priority ,_buffer ,_direct ,_avatar ,_name ,_topic ,_latest ,_members ,user-id]
+                (tabulated-list-get-entry))
+               (session (alist-get user-id ement-sessions nil nil #'equal)))
+    (ement-view-room room session)))
+
+;;;; Functions
+
+;;;###autoload
+(defun ement-tabulated-room-list-auto-update (_session)
+  "Automatically update the room list buffer.
+Does so when variable `ement-tabulated-room-list-auto-update' is non-nil.
+To be called in `ement-sync-callback-hook'."
+  (when (and ement-tabulated-room-list-auto-update
+             (buffer-live-p (get-buffer "*Ement Rooms*")))
+    (with-current-buffer (get-buffer "*Ement Rooms*")
+      (revert-buffer))))
+
+(defun ement-tabulated-room-list--set-entries ()
+  "Set `tabulated-list-entries'."
+  ;; Reset avatar size in case default font size has changed.
+  ;; TODO: After implementing avatars.
+  ;; (customize-set-variable 'ement-room-avatar-in-buffer-name-size ement-room-avatar-in-buffer-name-size)
+
+  ;; NOTE: From Emacs docs:
+
+  ;; This buffer-local variable specifies the entries displayed in the
+  ;; Tabulated List buffer.  Its value should be either a list, or a
+  ;; function.
+  ;;
+  ;; If the value is a list, each list element corresponds to one entry,
+  ;; and should have the form ‘(ID CONTENTS)’, where
+  ;;
+  ;; • ID is either ‘nil’, or a Lisp object that identifies the
+  ;; entry.  If the latter, the cursor stays on the same entry when
+  ;; re-sorting entries.  Comparison is done with ‘equal’.
+  ;;
+  ;; • CONTENTS is a vector with the same number of elements as
+  ;; ‘tabulated-list-format’.  Each vector element is either a
+  ;;  string, which is inserted into the buffer as-is, or a list
+  ;;  ‘(LABEL . PROPERTIES)’, which means to insert a text button by
+  ;;   calling ‘insert-text-button’ with LABEL and PROPERTIES as
+  ;;   arguments (*note Making Buttons::).
+  ;;
+  ;;   There should be no newlines in any of these strings.
+  (let ((entries (cl-loop for (_id . session) in ement-sessions
+                          append (mapcar (lambda (room)
+                                           (ement-tabulated-room-list--entry session room))
+                                         (ement-session-rooms session)))))
+    (setf tabulated-list-entries
+          ;; Pre-sort by latest event so that, when the list is sorted by other columns,
+          ;; the rooms will be secondarily sorted by latest event.
+          (cl-sort entries #'> :key (lambda (entry)
+                                      ;; In case a room has no latest event (not sure if
+                                      ;; this may obscure a bug, but this has happened, so
+                                      ;; we need to handle it), we fall back to 0.
+                                      (or (ement-room-latest-ts (car entry)) 0))))))
+
+(defun ement-tabulated-room-list--entry (session room)
+  "Return entry for ROOM in SESSION for `tabulated-list-entries'."
+  (pcase-let* (((cl-struct ement-room id canonical-alias display-name avatar topic latest-ts summary
+                           (local (map buffer room-list-avatar)))
+                room)
+               ((map ('m.joined_member_count member-count)) summary)
+               (e-alias (or canonical-alias
+                            (setf (ement-room-canonical-alias room)
+                                  (ement--room-alias room))
+                            id))
+               ;; FIXME: Figure out how to track unread status cleanly.
+               (e-unread (if (and buffer (buffer-modified-p buffer))
+                             (propertize "U" 'help-echo "Unread") ""))
+               (e-buffer (if buffer (propertize "B" 'help-echo "Room has buffer") ""))
+               (e-avatar (if (and ement-tabulated-room-list-avatars avatar)
+                             (or room-list-avatar
+                                 (if-let* ((avatar-image (get-text-property 0 'display avatar))
+                                           (new-avatar-string (propertize " " 'display
+                                                                          (ement--resize-image avatar-image
+                                                                                               nil (frame-char-height)))))
+                                     (progn
+                                       ;; alist-get doesn't seem to return the new value when used with setf?
+                                       (setf (alist-get 'room-list-avatar (ement-room-local room))
+                                             new-avatar-string)
+                                       new-avatar-string)
+                                   ;; If a room avatar image fails to download or decode
+                                   ;; and ends up nil, we return the empty string.
+                                   (ement-debug "nil avatar for room: " (ement-room-display-name room) (ement-room-canonical-alias room))
+                                   ""))
+                           ;; Room avatars disabled.
+                           ""))
+               ;; We have to copy the list, otherwise using `setf' on it
+               ;; later causes its value to be mutated for every entry.
+               (name-face (cl-copy-list '(:inherit (ement-tabulated-room-list-name))))
+               (e-name (list (propertize (or display-name
+                                             (ement--room-display-name room))
+                                         ;; HACK: Apply face here, otherwise tabulated-list overrides it.
+                                         'face name-face
+                                         'help-echo e-alias)
+                             'action #'ement-tabulated-room-list-action))
+               (e-topic (if topic
+                            ;; Remove newlines from topic.  Yes, this can happen.
+                            (replace-regexp-in-string "\n" "" topic t t)
+                          ""))
+               (formatted-timestamp (if latest-ts
+                                        (ement--human-format-duration (- (time-convert nil 'integer) (/ latest-ts 1000))
+                                                                      t)
+                                      ""))
+               (latest-face (when latest-ts
+                              (let* ((difference-seconds (- (float-time) (/ latest-ts 1000))  )
+                                     (n (cl-typecase difference-seconds
+                                          ((number 0 3599) ;; 1 hour to 1 day: 24 1-hour periods.
+                                           (truncate (/ difference-seconds 600)))
+                                          ((number 3600 86400) ;; 1 day
+                                           (+ 6 (truncate (/ difference-seconds 3600))))
+                                          (otherwise ;; Difference in weeks.
+                                           (min (/ (length ement-tabulated-room-list-timestamp-colors) 2)
+                                                (+ 24 (truncate (/ difference-seconds 86400 7))))))))
+                                (list :foreground (elt ement-tabulated-room-list-timestamp-colors n)))))
+               (e-latest (or (when formatted-timestamp
+                               (propertize formatted-timestamp
+                                           'value latest-ts
+                                           'face latest-face))
+                             ;; Invited rooms don't have a latest-ts.
+                             ""))
+               (e-session (propertize (ement-user-id (ement-session-user session))
+                                      'value session))
+               ;;  ((e-tags favorite-p low-priority-p) (ement-tabulated-room-list--tags room))
+               (e-direct-p (if (ement--room-direct-p room session)
+                               (propertize "d" 'help-echo "Direct room")
+                             ""))
+               (e-priority (cond ((ement--room-favourite-p room) "F")
+                                 ((ement--room-low-priority-p room) "l")
+                                 (" ")))
+               (e-members (if member-count (number-to-string member-count) "")))
+    (when ement-tabulated-room-list-simplify-timestamps
+      (setf e-latest (replace-regexp-in-string
+                      (rx bos (1+ digit) (1+ alpha) (group (1+ (1+ digit) (1+ alpha))))
+                      "" e-latest t t 1)))
+    ;; Add face modifiers.
+    (when (and buffer (buffer-modified-p buffer))
+      ;; For some reason, `push' doesn't work with `map-elt'.
+      (setf (map-elt name-face :inherit)
+            (cons 'ement-tabulated-room-list-unread (map-elt name-face :inherit))))
+    (when (ement--room-direct-p room session)
+      (setf (map-elt name-face :inherit)
+            (cons 'ement-tabulated-room-list-direct (map-elt name-face :inherit))))
+    (when (ement--room-favourite-p room)
+      (push 'ement-tabulated-room-list-favourite (map-elt name-face :inherit)))
+    (when (ement--room-low-priority-p room)
+      (push 'ement-tabulated-room-list-low-priority (map-elt name-face :inherit)))
+    (pcase (ement-room-type room)
+      ('invite
+       (setf e-topic (concat (propertize "[invited]"
+                                         'face 'ement-tabulated-room-list-invited)
+                             " " e-topic)
+             (map-elt name-face :inherit) (cons 'ement-tabulated-room-list-invited
+                                                (map-elt name-face :inherit))))
+      ('leave
+       (setf e-topic (concat (propertize "[left]"
+                                         'face 'ement-tabulated-room-list-left)
+                             " " e-topic)
+             (map-elt name-face :inherit) (cons (map-elt name-face :inherit)
+                                                'ement-tabulated-room-list-left))))
+    (list room (vector e-unread e-priority e-buffer e-direct-p
+                       e-avatar e-name e-topic e-latest e-members
+                       ;; e-tags
+                       e-session
+                       ;; e-avatar
+                       ))))
+
+;; TODO: Define sorters with a macro?  This gets repetitive and hard to update.
+
+(defun ement-tabulated-room-list-members< (a b)
+  "Return non-nil if entry A has fewer members than room B.
+A and B should be entries from `tabulated-list-mode'."
+  (pcase-let* ((`(,_room [,_unread ,_priority ,_buffer ,_direct ,_avatar ,_name-for-list ,_topic ,_latest ,a-members ,_session]) a)
+               (`(,_room [,_unread ,_priority ,_buffer ,_direct ,_avatar ,_name-for-list ,_topic ,_latest ,b-members ,_session]) b))
+    (when (and a-members b-members)
+      ;; Invited rooms may have no member count (I think).
+      (< (string-to-number a-members) (string-to-number b-members)))))
+
+(defun ement-tabulated-room-list-latest< (a b)
+  "Return non-nil if entry A has fewer members than room B.
+A and B should be entries from `tabulated-list-mode'."
+  (pcase-let* ((`(,_room-a [,_unread ,_priority ,_buffer ,_direct ,_avatar ,_name-for-list ,_topic ,a-latest ,_a-members ,_session]) a)
+               (`(,_room-b [,_unread ,_priority ,_buffer ,_direct ,_avatar ,_name-for-list ,_topic ,b-latest ,_b-members ,_session]) b)
+               (a-latest (get-text-property 0 'value a-latest))
+               (b-latest (get-text-property 0 'value b-latest)))
+    (cond ((and a-latest b-latest)
+           (< a-latest b-latest))
+          (b-latest
+           ;; Invited rooms have no latest timestamp, and we want to sort them first.
+           nil)
+          (t t))))
+
+;;;; Footer
+
+(provide 'ement-tabulated-room-list)
+
+;;; ement-tabulated-room-list.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement-tabulated-room-list.elc b/emacs/.emacs.d/elpa/ement-0.17/ement-tabulated-room-list.elc
new file mode 100644
index 0000000..6d6e148
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/ement-tabulated-room-list.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement.el b/emacs/.emacs.d/elpa/ement-0.17/ement.el
new file mode 100644
index 0000000..118d9ce
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement.el
@@ -0,0 +1,1107 @@
+;;; ement.el --- Matrix client                       -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+;; URL: https://github.com/alphapapa/ement.el
+;; Version: 0.17
+;; Package-Requires: ((emacs "27.1") (map "2.1") (persist "0.5") (plz "0.6") (taxy "0.10") (taxy-magit-section "0.13") (svg-lib "0.2.5") (transient "0.3.7"))
+;; Keywords: comm
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Another Matrix client!  This one is written from scratch and is
+;; intended to be more "Emacsy," more suitable for MELPA, etc.  Also
+;; it has a shorter, perhaps catchier name, that is a mildly clever
+;; play on the name of the official Matrix client and the Emacs Lisp
+;; filename extension (oops, I explained the joke), which makes for
+;; much shorter symbol names.
+
+;; This file implements the core client library.  Functions that may be called in multiple
+;; files belong in `ement-lib'.
+
+;;; Code:
+
+;;;; Debugging
+
+;; NOTE: Uncomment this form and `emacs-lisp-byte-compile-and-load' the file to enable
+;; `ement-debug' messages.  This is commented out by default because, even though the
+;; messages are only displayed when `warning-minimum-log-level' is `:debug' at runtime, if
+;; that is so at expansion time, the expanded macro calls format the message and check the
+;; log level at runtime, which is not zero-cost.
+
+;; (eval-and-compile
+;;   (require 'warnings)
+;;   (setq-local warning-minimum-log-level nil)
+;;   (setq-local warning-minimum-log-level :debug))
+
+;;;; Requirements
+
+;; Built in.
+(require 'cl-lib)
+(require 'dns)
+(require 'files)
+(require 'map)
+
+;; This package.
+(require 'ement-lib)
+(require 'ement-room)
+(require 'ement-notifications)
+(require 'ement-notify)
+
+;;;; Variables
+
+(defvar ement-sessions nil
+  "Alist of active `ement-session' sessions, keyed by MXID.")
+
+(defvar ement-syncs nil
+  "Alist of outstanding sync processes for each session.")
+
+(defvar ement-users (make-hash-table :test #'equal)
+  ;; NOTE: When changing the ement-user struct, it's necessary to
+  ;; reset this table to clear old-type structs.
+  "Hash table storing user structs keyed on user ID.")
+
+(defvar ement-progress-reporter nil
+  "Used to report progress while processing sync events.")
+
+(defvar ement-progress-value nil
+  "Used to report progress while processing sync events.")
+
+(defvar ement-sync-callback-hook
+  '(ement--update-room-buffers ement--auto-sync ement-tabulated-room-list-auto-update
+                               ement-room-list-auto-update)
+  "Hook run after `ement--sync-callback'.
+Hooks are called with one argument, the session that was
+synced.")
+
+(defvar ement-event-hook
+  '(ement-notify ement--process-event ement--put-event)
+  "Hook called for events.
+Each function is called with three arguments: the event, the
+room, and the session.  This hook isn't intended to be modified
+by users; ones who do so should know what they're doing.")
+
+(defvar ement-default-sync-filter
+  '((room (state (lazy_load_members . t))
+          (timeline (lazy_load_members . t))))
+  "Default filter for sync requests.")
+
+(defvar ement-images-queue (make-plz-queue :limit 5)
+  "`plz' HTTP request queue for image requests.")
+
+(defvar ement-read-receipt-idle-timer nil
+  "Idle timer used to update read receipts.")
+
+(defvar ement-connect-user-id-history nil
+  "History list of user IDs entered into `ement-connect'.")
+
+;; From other files.
+(defvar ement-room-avatar-max-width)
+(defvar ement-room-avatar-max-height)
+
+;;;; Customization
+
+(defgroup ement-faces nil
+  "Faces for Ement."
+  :group 'ement)
+
+(defgroup ement nil
+  "Options for Ement, the Matrix client."
+  :group 'comm)
+
+(defcustom ement-save-sessions nil
+  "Save session to disk.
+Writes the session file when Emacs is killed."
+  :type 'boolean
+  :set (lambda (option value)
+         (set-default option value)
+         (if value
+             (add-hook 'kill-emacs-hook #'ement--kill-emacs-hook)
+           (remove-hook 'kill-emacs-hook #'ement--kill-emacs-hook))))
+
+(defcustom ement-sessions-file "~/.cache/ement.el"
+  ;; FIXME: Expand correct XDG cache directory (new in Emacs 27).
+  "Save username and access token to this file."
+  :type 'file)
+
+(defcustom ement-auto-sync t
+  "Automatically sync again after syncing."
+  :type 'boolean)
+
+(defcustom ement-after-initial-sync-hook
+  '(ement-room-list--after-initial-sync ement-view-initial-rooms ement--link-children ement--run-idle-timer)
+  "Hook run after initial sync.
+Run with one argument, the session synced."
+  :type 'hook)
+
+(defcustom ement-initial-sync-timeout 40
+  "Timeout in seconds for initial sync requests.
+For accounts in many rooms, the Matrix server may take some time
+to prepare the initial sync response, and increasing this timeout
+might be necessary."
+  :type 'integer)
+
+(defcustom ement-auto-view-rooms nil
+  "Rooms to view after initial sync.
+Alist mapping user IDs to a list of room aliases/IDs to open buffers for."
+  :type '(alist :key-type (string :tag "Local user ID")
+                :value-type (repeat (string :tag "Room alias/ID"))))
+
+(defcustom ement-disconnect-hook '(ement-kill-buffers ement--stop-idle-timer)
+  ;; FIXME: Put private functions in a private hook.
+  "Functions called when disconnecting.
+That is, when calling command `ement-disconnect'.  Functions are
+called with no arguments."
+  :type 'hook)
+
+(defcustom ement-view-room-display-buffer-action '(display-buffer-same-window)
+  "Display buffer action to use when opening room buffers.
+See function `display-buffer' and info node `(elisp) Buffer
+Display Action Functions'."
+  :type 'function)
+
+(defcustom ement-auto-view-room-display-buffer-action '(display-buffer-no-window)
+  "Display buffer action to use when automatically opening room buffers.
+That is, rooms listed in `ement-auto-view-rooms', which see.  See
+function `display-buffer' and info node `(elisp) Buffer Display
+Action Functions'."
+  :type 'function)
+
+(defcustom ement-interrupted-sync-hook '(ement-interrupted-sync-warning)
+  "Functions to call when syncing of a session is interrupted.
+Only called when `ement-auto-sync' is non-nil.  Functions are
+called with one argument, the session whose sync was interrupted.
+
+This hook allows the user to customize how sync interruptions are
+handled (e.g. how to be notified)."
+  :type 'hook
+  :options '(ement-interrupted-sync-message ement-interrupted-sync-warning))
+
+(defcustom ement-sso-server-port 4567
+  "TCP port used for local HTTP server for SSO logins.
+It shouldn't usually be necessary to change this."
+  :type 'integer)
+
+;;;; Commands
+
+;;;###autoload
+(cl-defun ement-connect (&key user-id password uri-prefix session)
+  "Connect to Matrix with USER-ID and PASSWORD, or using SESSION.
+Interactively, with prefix, ignore a saved session and log in
+again; otherwise, use a saved session if `ement-save-sessions' is
+enabled and a saved session is available, or prompt to log in if
+not enabled or available.
+
+If USER-ID or PASSWORD are not specified, the user will be
+prompted for them.
+
+If URI-PREFIX is specified, it should be the prefix of the
+server's API URI, including protocol, hostname, and optionally
+the port, e.g.
+
+  \"https://matrix-client.matrix.org\"
+  \"http://localhost:8080\""
+  (interactive (if current-prefix-arg
+                   ;; Force new session.
+                   (list :user-id (read-string "User ID: " nil 'ement-connect-user-id-history))
+                 ;; Use known session.
+                 (unless ement-sessions
+                   ;; Read sessions from disk.
+                   (condition-case err
+                       (setf ement-sessions (ement--read-sessions))
+                     (error (display-warning 'ement (format "Unable to read session data from disk (%s).  Prompting to log in again."
+                                                            (error-message-string err))))))
+                 (cl-case (length ement-sessions)
+                   (0 (list :user-id (read-string "User ID: " nil 'ement-connect-user-id-history)))
+                   (1 (list :session (cdar ement-sessions)))
+                   (otherwise (list :session (ement-complete-session))))))
+  (let (sso-server-process)
+    (cl-labels ((new-session ()
+                  (unless (string-match (rx bos "@" (group (1+ (not (any ":")))) ; Username
+                                            ":" (group (optional (1+ (not (any blank)))))) ; Server name
+                                        user-id)
+                    (user-error "Invalid user ID format: use @USERNAME:SERVER"))
+                  (let* ((username (match-string 1 user-id))
+                         (server-name (match-string 2 user-id))
+                         (uri-prefix (or uri-prefix (ement--hostname-uri server-name)))
+                         (user (make-ement-user :id user-id :username username))
+                         (server (make-ement-server :name server-name :uri-prefix uri-prefix))
+                         (transaction-id (ement--initial-transaction-id))
+                         (initial-device-display-name (format "Ement.el: %s@%s"
+                                                              ;; Just to be extra careful:
+                                                              (or user-login-name "[unknown user-login-name]")
+                                                              (or (system-name) "[unknown system-name]")))
+                         (device-id (secure-hash 'sha256 initial-device-display-name)))
+                    (make-ement-session :user user :server server :transaction-id transaction-id
+                                        :device-id device-id :initial-device-display-name initial-device-display-name
+                                        :events (make-hash-table :test #'equal))))
+                (password-login ()
+                  (pcase-let* (((cl-struct ement-session user device-id initial-device-display-name) session)
+                               ((cl-struct ement-user id) user)
+                               (data (ement-alist "type" "m.login.password"
+                                                  "identifier"
+                                                  (ement-alist "type" "m.id.user"
+                                                               "user" id)
+                                                  "password" (or password
+                                                                 (read-passwd (format "Password for %s: " id)))
+                                                  "device_id" device-id
+                                                  "initial_device_display_name" initial-device-display-name)))
+                    ;; TODO: Clear password in callback (if we decide to hold on to it for retrying login timeouts).
+                    (ement-api session "login" :method 'post :data (json-encode data)
+                      :then (apply-partially #'ement--login-callback session))
+                    (ement-message "Logging in with password...")))
+                (sso-filter (process string)
+                  ;; NOTE: This is technically wrong, because it's not guaranteed that the
+                  ;; string will be a complete request--it could just be a chunk.  But in
+                  ;; practice, if this works, it's much simpler than setting up process log
+                  ;; functions and per-client buffers for this throwaway, pretend HTTP server.
+                  (when (string-match (rx "GET /?loginToken=" (group (0+ nonl)) " " (0+ nonl)) string)
+                    (unwind-protect
+                        (pcase-let* ((token (match-string 1 string))
+                                     ((cl-struct ement-session user device-id initial-device-display-name)
+                                      session)
+                                     ((cl-struct ement-user id) user)
+                                     (data (ement-alist
+                                            "type" "m.login.token"
+                                            "identifier" (ement-alist "type" "m.id.user"
+                                                                      "user" id)
+                                            "token" token
+                                            "device_id" device-id
+                                            "initial_device_display_name" initial-device-display-name)))
+                          (ement-api session "login" :method 'post
+                            :data (json-encode data)
+                            :then (apply-partially #'ement--login-callback session))
+                          (process-send-string process "HTTP/1.0 202 Accepted
+Content-Type: text/plain; charset=utf-8
+
+Ement: SSO login accepted; session token received.  Connecting to Matrix server.  (You may close this page.)")
+                          (process-send-eof process))
+                      (delete-process sso-server-process)
+                      (delete-process process))))
+                (sso-login ()
+                  (setf sso-server-process
+                        (make-network-process
+                         :name "ement-sso" :family 'ipv4 :host 'local :service ement-sso-server-port
+                         :filter #'sso-filter :server t :noquery t))
+                  ;; Kill server after 2 minutes in case of problems.
+                  (run-at-time 120 nil (lambda ()
+                                         (when (process-live-p sso-server-process)
+                                           (delete-process sso-server-process))))
+                  (let ((url (concat (ement-server-uri-prefix (ement-session-server session))
+                                     "/_matrix/client/r0/login/sso/redirect?redirectUrl=http://localhost:"
+                                     (number-to-string ement-sso-server-port))))
+                    (funcall browse-url-secondary-browser-function url)
+                    (message "Browsing to single sign-on page <%s>..." url)))
+                (flows-callback (data)
+                  (let ((flows (cl-loop for flow across (map-elt data 'flows)
+                                        for type = (map-elt flow 'type)
+                                        when (member type '("m.login.password" "m.login.sso"))
+                                        collect type)))
+                    (pcase (length flows)
+                      (0 (error "Ement: No supported login flows:  Server:%S  Supported flows:%S"
+                                (ement-server-uri-prefix (ement-session-server session))
+                                (map-elt data 'flows)))
+                      (1 (pcase (car flows)
+                           ("m.login.password" (password-login))
+                           ("m.login.sso" (sso-login))
+                           (_ (error "Ement: Unsupported login flow: %s  Server:%S  Supported flows:%S"
+                                     (car flows) (ement-server-uri-prefix (ement-session-server session))
+                                     (map-elt data 'flows)))))
+                      (_ (pcase (completing-read "Select authentication method: "
+                                                 (cl-loop for flow in flows
+                                                          collect (string-trim-left flow (rx "m.login."))))
+                           ("password" (password-login))
+                           ("sso" (sso-login))
+                           (else (error "Ement: Unsupported login flow:%S  Server:%S  Supported flows:%S"
+                                        else (ement-server-uri-prefix (ement-session-server session))
+                                        (map-elt data 'flows)))))))))
+      (if session
+          ;; Start syncing given session.
+          (let ((user-id (ement-user-id (ement-session-user session))))
+            ;; HACK: If session is already in ement-sessions, this replaces it.  I think that's okay...
+            (setf (alist-get user-id ement-sessions nil nil #'equal) session)
+            (ement--sync session :timeout ement-initial-sync-timeout))
+        ;; Start password login flow.  Prompt for user ID and password
+        ;; if not given (i.e. if not called interactively.)
+        (unless user-id
+          (setf user-id (read-string "User ID: " nil 'ement-connect-user-id-history)))
+        (setf session (new-session))
+        (when (ement-api session "login" :then #'flows-callback)
+          (message "Ement: Checking server's login flows..."))))))
+
+(defun ement-disconnect (sessions)
+  "Disconnect from SESSIONS.
+Interactively, with prefix, disconnect from all sessions.  If
+`ement-auto-sync' is enabled, stop syncing, and clear the session
+data.  When enabled, write the session to disk.  Any existing
+room buffers are left alive and can be read, but other commands
+in them won't work."
+  (interactive (list (if current-prefix-arg
+                         (mapcar #'cdr ement-sessions)
+                       (list (ement-complete-session)))))
+  (when ement-save-sessions
+    ;; Write sessions before we remove them from the variable.
+    (ement--write-sessions ement-sessions))
+  (dolist (session sessions)
+    (let ((user-id (ement-user-id (ement-session-user session))))
+      (when-let ((process (map-elt ement-syncs session)))
+        ;; Disable the sync process's ELSE handler, preventing error messages, but still
+        ;; allowing `plz--respond' to clean up the buffer, etc.
+        (setf (process-get process :plz-else) #'ignore)
+        (delete-process process))
+      ;; NOTE: I'd like to use `map-elt' here, but not until
+      ;; <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=47368> is fixed, I guess.
+      (setf (alist-get session ement-syncs nil nil #'equal) nil
+            (alist-get user-id ement-sessions nil 'remove #'equal) nil)))
+  (unless ement-sessions
+    ;; HACK: If no sessions remain, clear the users table.  It might be best
+    ;; to store a per-session users table, but this is probably good enough.
+    (clrhash ement-users))
+  (run-hooks 'ement-disconnect-hook)
+  (message "Ement: Disconnected <%s>."
+           (string-join (cl-loop for session in sessions
+                                 collect (ement-user-id (ement-session-user session)))
+                        ", ")))
+
+(defun ement-kill-buffers ()
+  "Kill all Ement buffers.
+Useful in, e.g. `ement-disconnect-hook', which see."
+  (interactive)
+  (dolist (buffer (buffer-list))
+    (when (string-prefix-p "ement-" (symbol-name (buffer-local-value 'major-mode buffer)))
+      (kill-buffer buffer))))
+
+(defun ement--login-callback (session data)
+  "Record DATA from logging in to SESSION and do initial sync."
+  (pcase-let* (((cl-struct ement-session (user (cl-struct ement-user (id user-id)))) session)
+               ((map ('access_token token) ('device_id device-id)) data))
+    (setf (ement-session-token session) token
+          (ement-session-device-id session) device-id
+          (alist-get user-id ement-sessions nil nil #'equal) session)
+    (ement--sync session :timeout ement-initial-sync-timeout)))
+
+;;;; Functions
+
+(defun ement-interrupted-sync-warning (session)
+  "Display a warning that syncing of SESSION was interrupted."
+  (display-warning
+   'ement
+   (format
+    (substitute-command-keys
+     "\\<ement-room-mode-map>Syncing of session <%s> was interrupted.  Use command `ement-room-sync' in a room buffer to retry.")
+    (ement-user-id (ement-session-user session)))
+   :error))
+
+(defun ement-interrupted-sync-message (session)
+  "Display a message that syncing of SESSION was interrupted."
+  (message
+   (substitute-command-keys
+    "\\<ement-room-mode-map>Syncing of session <%s> was interrupted.  Use command `ement-room-sync' in a room buffer to retry.")
+   (ement-user-id (ement-session-user session))))
+
+(defun ement--run-idle-timer (&rest _ignore)
+  "Run idle timer that updates read receipts.
+To be called from `ement-after-initial-sync-hook'.  Timer is
+stored in `ement-read-receipt-idle-timer'."
+  (unless (timerp ement-read-receipt-idle-timer)
+    (setf ement-read-receipt-idle-timer (run-with-idle-timer 3 t #'ement-room-read-receipt-idle-timer))))
+
+(defun ement--stop-idle-timer (&rest _ignore)
+  "Stop idle timer stored in `ement-read-receipt-idle-timer'.
+To be called from `ement-disconnect-hook'."
+  (unless ement-sessions
+    (when (timerp ement-read-receipt-idle-timer)
+      (cancel-timer ement-read-receipt-idle-timer)
+      (setf ement-read-receipt-idle-timer nil))))
+
+(defun ement-view-initial-rooms (session)
+  "View rooms for SESSION configured in `ement-auto-view-rooms'."
+  (when-let (rooms (alist-get (ement-user-id (ement-session-user session))
+			      ement-auto-view-rooms nil nil #'equal))
+    (dolist (alias/id rooms)
+      (when-let (room (cl-find-if (lambda (room)
+				    (or (equal alias/id (ement-room-canonical-alias room))
+					(equal alias/id (ement-room-id room))))
+				  (ement-session-rooms session)))
+        (let ((ement-view-room-display-buffer-action ement-auto-view-room-display-buffer-action))
+          (ement-view-room room session))))))
+
+(defun ement--initial-transaction-id ()
+  "Return an initial transaction ID for a new session."
+  ;; We generate a somewhat-random initial transaction ID to avoid potential conflicts in
+  ;; case, e.g. using Pantalaimon causes a transaction ID conflict.  See
+  ;; <https://github.com/alphapapa/ement.el/issues/36>.
+  (cl-parse-integer
+   (secure-hash 'sha256 (prin1-to-string (list (current-time) (system-name))))
+   :end 8 :radix 16))
+
+(defsubst ement--sync-messages-p (session)
+  "Return non-nil if sync-related messages should be shown for SESSION."
+  ;; For now, this seems like the best way.
+  (or (not (ement-session-has-synced-p session))
+      (not ement-auto-sync)))
+
+(defun ement--hostname-uri (hostname)
+  "Return the \".well-known\" URI for server HOSTNAME.
+If no URI is found, prompt the user for the hostname."
+  ;; FIXME: When fail-prompting, a URI should be returned, not just a hostname.
+  ;; SPEC: <https://matrix.org/docs/spec/client_server/r0.6.1#id178> ("4.1   Well-known URI")
+  (cl-labels ((fail-prompt ()
+                (let ((input (read-string "Auto-discovery of server's well-known URI failed.  Input server hostname, or leave blank to use server name: ")))
+                  (pcase input
+                    ("" hostname)
+                    (_ input))))
+              (parse (string)
+                (if-let* ((object (ignore-errors (json-read-from-string string)))
+                          (url (map-nested-elt object '(m.homeserver base_url)))
+                          ((string-match-p
+                            (rx bos "http" (optional "s") "://" (1+ nonl))
+                            url)))
+                    url
+                  ;; Parsing error: FAIL_PROMPT.
+                  (fail-prompt))))
+    (condition-case err
+        (let ((response (plz 'get (concat "https://" hostname "/.well-known/matrix/client")
+                          :as 'response :then 'sync)))
+          (if (plz-response-p response)
+              (pcase (plz-response-status response)
+                (200 (parse (plz-response-body response)))
+                (404 (fail-prompt))
+                (_ (warn "Ement: `plz' request for .well-known URI returned unexpected code: %s"
+                         (plz-response-status response))
+                   (fail-prompt)))
+            (warn "Ement: `plz' request for .well-known URI did not return a `plz' response")
+            (fail-prompt)))
+      (error (warn "Ement: `plz' request for .well-known URI signaled an error: %S" err)
+             (fail-prompt)))))
+
+(cl-defun ement--sync (session &key force quiet
+                               (timeout 40) ;; Give the server an extra 10 seconds.
+                               (filter ement-default-sync-filter))
+  "Send sync request for SESSION.
+If SESSION has a `next-batch' token, it's used.  If FORCE, first
+delete any outstanding sync processes.  If QUIET, don't show a
+message about syncing this time.  Cancel request after TIMEOUT
+seconds.
+
+FILTER may be an alist representing a raw event filter (i.e. not
+a filter ID).  When unspecified, the value of
+`ement-default-sync-filter' is used.  The filter is encoded with
+`json-encode'.  To use no filter, specify FILTER as nil."
+  ;; SPEC: <https://matrix.org/docs/spec/client_server/r0.6.1#id257>.
+  ;; TODO: Filtering: <https://matrix.org/docs/spec/client_server/r0.6.1#filtering>.
+  ;; TODO: Use a filter ID for default filter.
+  ;; TODO: Optionally, automatically sync again when HTTP request fails.
+  ;; TODO: Ensure that the process in (map-elt ement-syncs session) is live.
+  (when (map-elt ement-syncs session)
+    (if force
+        (condition-case err
+            (delete-process (map-elt ement-syncs session))
+          ;; Ensure the only error is the expected one from deleting the process.
+          (ement-api-error (cl-assert (equal "curl process killed" (plz-error-message (cl-third err))))
+                           (message "Ement: Forcing new sync")))
+      (user-error "Ement: Already syncing this session")))
+  (pcase-let* (((cl-struct ement-session next-batch) session)
+               (params (remove
+                        nil (list (list "full_state" (if next-batch "false" "true"))
+                                  (when filter
+                                    ;; TODO: Document filter arg.
+                                    (list "filter" (json-encode filter)))
+                                  (when next-batch
+                                    (list "since" next-batch))
+                                  (when next-batch
+                                    (list "timeout" "30000")))))
+               (sync-start-time (time-to-seconds))
+               ;; FIXME: Auto-sync again in error handler.
+               (process (ement-api session "sync" :params params
+                          :timeout timeout
+                          :then (apply-partially #'ement--sync-callback session)
+                          :else (lambda (plz-error)
+                                  (setf (map-elt ement-syncs session) nil)
+                                  ;; TODO: plz probably needs nicer error handling.
+                                  ;; Ideally we would use `condition-case', but since the
+                                  ;; error is signaled in `plz--sentinel'...
+                                  (pcase-let (((cl-struct plz-error curl-error response) plz-error)
+                                              (reason))
+                                    (cond ((when response
+                                             (pcase (plz-response-status response)
+                                               ((or 429 502) (setf reason "failed")))))
+                                          ((pcase curl-error
+                                             (`(28 . ,_) (setf reason "timed out")))))
+                                    (if reason
+                                        (if (not ement-auto-sync)
+                                            (run-hook-with-args 'ement-interrupted-sync-hook session)
+                                          (message "Ement: Sync %s (%s).  Syncing again..."
+                                                   reason (ement-user-id (ement-session-user session)))
+                                          ;; Set QUIET to allow the just-printed message to remain visible.
+                                          (ement--sync session :timeout timeout :quiet t))
+                                      ;; Unrecognized errors:
+                                      (pcase curl-error
+                                        (`(,code . ,message)
+                                         (signal 'ement-api-error (list (format "Ement: Network error: %s: %s" code message)
+                                                                        plz-error)))
+                                        (_ (signal 'ement-api-error (list "Ement: Unrecognized network error" plz-error)))))))
+                          :json-read-fn (lambda ()
+                                          "Print a message, then call `ement--json-parse-buffer'."
+                                          (when (ement--sync-messages-p session)
+                                            (message "Ement: Response arrived after %.2f seconds.  Reading %s JSON response..."
+                                                     (- (time-to-seconds) sync-start-time)
+                                                     (file-size-human-readable (buffer-size))))
+                                          (let ((start-time (time-to-seconds)))
+                                            (prog1 (ement--json-parse-buffer)
+                                              (when (ement--sync-messages-p session)
+                                                (message "Ement: Reading JSON took %.2f seconds"
+                                                         (- (time-to-seconds) start-time)))))))))
+    (when process
+      (setf (map-elt ement-syncs session) process)
+      (when (and (not quiet) (ement--sync-messages-p session))
+        (ement-message "Sync request sent.  Waiting for response...")))))
+
+(defun ement--sync-callback (session data)
+  "Process sync DATA for SESSION.
+Runs `ement-sync-callback-hook' with SESSION."
+  (ement-debug (ement-user-id (ement-session-user session)))
+  ;; Remove the sync first.  We already have the data from it, and the
+  ;; process has exited, so it's safe to run another one.
+  (setf (map-elt ement-syncs session) nil)
+  (pcase-let* (((map rooms ('next_batch next-batch) ('account_data (map ('events account-data-events))))
+                data)
+               ((map ('join joined-rooms) ('invite invited-rooms) ('leave left-rooms)) rooms)
+               (num-events (+
+                            ;; HACK: In `ement--push-joined-room-events', we do something
+                            ;; with each event 3 times, so we multiply this by 3.
+                            ;; FIXME: That calculation doesn't seem to be quite right, because
+                            ;; the progress reporter never seems to hit 100% before it's done.
+                            (* 3 (cl-loop for (_id . room) in joined-rooms
+                                          sum (length (map-nested-elt room '(state events)))
+                                          sum (length (map-nested-elt room '(timeline events)))))
+                            (cl-loop for (_id . room) in invited-rooms
+                                     sum (length (map-nested-elt room '(invite_state events)))))))
+    ;; Append account data events.
+    ;; TODO: Since only one event of each type is allowed in account data (the spec
+    ;; doesn't seem to make this clear, but see
+    ;; <https://github.com/matrix-org/matrix-js-sdk/blob/d0b964837f2820940bd93e718a2450b5f528bffc/src/store/memory.ts#L292>),
+    ;; we should store account-data events in a hash table or alist rather than just a
+    ;; list of events.
+    (cl-callf2 append (cl-coerce account-data-events 'list) (ement-session-account-data session))
+    ;; Process invited and joined rooms.
+    (ement-with-progress-reporter (:when (ement--sync-messages-p session)
+                                         :reporter ("Ement: Reading events..." 0 num-events))
+      ;; Left rooms.
+      (mapc (apply-partially #'ement--push-left-room-events session) left-rooms)
+      ;; Invited rooms.
+      (mapc (apply-partially #'ement--push-invite-room-events session) invited-rooms)
+      ;; Joined rooms.
+      (mapc (apply-partially #'ement--push-joined-room-events session) joined-rooms))
+    ;; TODO: Process "left" rooms (remove room structs, etc).
+    ;; NOTE: We update the next-batch token before updating any room buffers.  This means
+    ;; that any errors in updating room buffers (like for unexpected event formats that
+    ;; expose a bug) could cause events to not appear in the buffer, but the user could
+    ;; still dismiss the error and start syncing again, and the client could remain
+    ;; usable.  Updating the token after doing everything would be preferable in some
+    ;; ways, but it would mean that an event that exposes a bug would be processed again
+    ;; on every sync, causing the same error each time.  It would seem preferable to
+    ;; maintain at least some usability rather than to keep repeating a broken behavior.
+    (setf (ement-session-next-batch session) next-batch)
+    ;; Run hooks which update buffers, etc.
+    (run-hook-with-args 'ement-sync-callback-hook session)
+    ;; Show sync message if appropriate, and run after-initial-sync-hook.
+    (when (ement--sync-messages-p session)
+      (message (concat "Ement: Sync done."
+                       (unless (ement-session-has-synced-p session)
+                         (run-hook-with-args 'ement-after-initial-sync-hook session)
+                         ;; Show tip after initial sync.
+                         (setf (ement-session-has-synced-p session) t)
+                         "  Use commands `ement-list-rooms' or `ement-view-room' to view a room."))))))
+
+(defun ement--push-invite-room-events (session invited-room)
+  "Push events for INVITED-ROOM into that room in SESSION."
+  ;; TODO: Make ement-session-rooms a hash-table.
+  (ement--push-joined-room-events session invited-room 'invite))
+
+(defun ement--auto-sync (session)
+  "If `ement-auto-sync' is non-nil, sync SESSION again."
+  (when ement-auto-sync
+    (ement--sync session)))
+
+(defun ement--update-room-buffers (session)
+  "Insert new events into SESSION's rooms which have buffers.
+To be called in `ement-sync-callback-hook'."
+  ;; TODO: Move this to ement-room.el, probably.
+  ;; For now, we primitively iterate over the buffer list to find ones
+  ;; whose mode is `ement-room-mode'.
+  (let* ((buffers (cl-loop for room in (ement-session-rooms session)
+                           for buffer = (map-elt (ement-room-local room) 'buffer)
+                           when (buffer-live-p buffer)
+                           collect buffer)))
+    (dolist (buffer buffers)
+      (with-current-buffer buffer
+        (save-window-excursion
+          ;; NOTE: When the buffer has a window, it must be the selected one
+          ;; while calling event-insertion functions.  I don't know if this is
+          ;; due to a bug in EWOC or if I just misunderstand something, but
+          ;; without doing this, events may be inserted at the wrong place.
+          (when-let ((buffer-window (get-buffer-window buffer)))
+            (select-window buffer-window))
+          (cl-assert ement-room)
+          (when (ement-room-ephemeral ement-room)
+            ;; Ephemeral events.
+            (ement-room--process-events (ement-room-ephemeral ement-room))
+            (setf (ement-room-ephemeral ement-room) nil))
+          (when-let ((new-events (alist-get 'new-events (ement-room-local ement-room))))
+            ;; HACK: Process these events in reverse order, so that later events (like reactions)
+            ;; which refer to earlier events can find them.  (Not sure if still necessary.)
+            (ement-room--process-events (reverse new-events))
+            (setf (alist-get 'new-events (ement-room-local ement-room)) nil))
+          (when-let ((new-events (alist-get 'new-account-data-events (ement-room-local ement-room))))
+            ;; Account data events.  Do this last so, e.g. read markers can refer to message events we've seen.
+            (ement-room--process-events new-events)
+            (setf (alist-get 'new-account-data-events (ement-room-local ement-room)) nil)))))))
+
+(cl-defun ement--push-joined-room-events (session joined-room &optional (status 'join))
+  "Push events for JOINED-ROOM into that room in SESSION.
+Also used for left rooms, in which case STATUS should be set to
+`leave'."
+  (pcase-let* ((`(,id . ,event-types) joined-room)
+               (id (symbol-name id)) ; Really important that the ID is a STRING!
+               ;; TODO: Make ement-session-rooms a hash-table.
+               (room (or (cl-find-if (lambda (room)
+                                       (equal id (ement-room-id room)))
+                                     (ement-session-rooms session))
+                         (car (push (make-ement-room :id id) (ement-session-rooms session)))))
+               ((map summary state ephemeral timeline
+                     ('invite_state (map ('events invite-state-events)))
+                     ('account_data (map ('events account-data-events)))
+                     ('unread_notifications unread-notifications))
+                event-types)
+               (latest-timestamp))
+    (setf (ement-room-status room) status
+          (ement-room-unread-notifications room) unread-notifications)
+    ;; NOTE: The idea is that, assuming that events in the sync response are in
+    ;; chronological order, we push them to the lists in the room slots in that order,
+    ;; leaving the head of each list as the most recent event of that type.  That means
+    ;; that, e.g. the room state events may be searched in order to find, e.g. the most
+    ;; recent room name event.  However, chronological order is not guaranteed, e.g. after
+    ;; loading older messages (the "retro" function; this behavior is in development).
+
+    ;; MAYBE: Use queue.el to store the events in a DLL, so they could
+    ;; be accessed from either end.  Could be useful.
+
+    ;; Push the StrippedState events to the room's invite-state.  (These events have no
+    ;; timestamp data.)  We also run the event hook, because for invited rooms, the
+    ;; invite-state events include room name, topic, etc.
+    (cl-loop for event across-ref invite-state-events do
+             (setf event (ement--make-event event))
+             (push event (ement-room-invite-state room))
+             (run-hook-with-args 'ement-event-hook event room session))
+
+    ;; Save room summary.
+    (dolist (parameter '(m.heroes m.joined_member_count m.invited_member_count))
+      (when (alist-get parameter summary)
+        ;; These fields are only included when they change.
+        (setf (alist-get parameter (ement-room-summary room)) (alist-get parameter summary))))
+
+    ;; Update account data.  According to the spec, only one of each event type is
+    ;; supposed to be present in a room's account data, so we store them as an alist keyed
+    ;; on their type.  (NOTE: We don't currently make them into event structs, but maybe
+    ;; we should in the future.)
+    (cl-loop for event across account-data-events
+             for type = (alist-get 'type event)
+             do (setf (alist-get type (ement-room-account-data room) nil nil #'equal) event))
+    ;; But we also need to track just the new events so we can process those in a room
+    ;; buffer (and for some reason, we do make them into structs here, but I don't
+    ;; remember why).  FIXME: Unify this.
+    (cl-callf2 append (mapcar #'ement--make-event account-data-events)
+               (alist-get 'new-account-data-events (ement-room-local room)))
+
+    ;; Save state and timeline events.
+    (cl-macrolet ((push-events (type accessor)
+                    ;; Push new events of TYPE to room's slot of ACCESSOR, and return the latest timestamp pushed.
+                    `(let ((ts 0))
+                       ;; NOTE: We replace each event in the vector with the
+                       ;; struct, which is used when calling hooks later.
+                       (cl-loop for event across-ref (alist-get 'events ,type)
+                                do (setf event (ement--make-event event))
+                                do (push event (,accessor room))
+                                (when (ement--sync-messages-p session)
+                                  (ement-progress-update))
+                                (when (> (ement-event-origin-server-ts event) ts)
+                                  (setf ts (ement-event-origin-server-ts event))))
+                       ;; One would think that one should use `maximizing' here, but, completely
+                       ;; inexplicably, it sometimes returns nil, even when every single value it's comparing
+                       ;; is a number.  It's absolutely bizarre, but I have to do the equivalent manually.
+                       ts)))
+      ;; FIXME: This is a bit convoluted and hacky now.  Refactor it.
+      (setf latest-timestamp
+            (max (push-events state ement-room-state)
+                 (push-events timeline ement-room-timeline)))
+      ;; NOTE: We also append the new events to the new-events list in the room's local
+      ;; slot, which is used by `ement--update-room-buffers' to insert only new events.
+      ;; FIXME: Does this also need to be done for invite-state events?
+      (cl-callf2 append (cl-coerce (alist-get 'events timeline) 'list)
+                 (alist-get 'new-events (ement-room-local room)))
+      ;; Update room's latest-timestamp slot.
+      (when (> latest-timestamp (or (ement-room-latest-ts room) 0))
+        (setf (ement-room-latest-ts room) latest-timestamp))
+      (unless (ement-session-has-synced-p session)
+        ;; Only set this token on initial sync, otherwise it would
+        ;; overwrite earlier tokens from loading earlier messages.
+        (setf (ement-room-prev-batch room) (alist-get 'prev_batch timeline))))
+    ;; Run event hook for state and timeline events.
+    (cl-loop for event across (alist-get 'events state)
+             do (run-hook-with-args 'ement-event-hook event room session)
+             (when (ement--sync-messages-p session)
+               (ement-progress-update)))
+    (cl-loop for event across (alist-get 'events timeline)
+             do (run-hook-with-args 'ement-event-hook event room session)
+             (when (ement--sync-messages-p session)
+               (ement-progress-update)))
+    ;; Ephemeral events (do this after state and timeline hooks, so those events will be
+    ;; in the hash tables).
+    (cl-loop for event across (alist-get 'events ephemeral)
+             for event-struct = (ement--make-event event)
+             do (push event-struct (ement-room-ephemeral room))
+             (ement--process-event event-struct room session))
+    (when (ement-session-has-synced-p session)
+      ;; NOTE: We don't fill gaps in "limited" requests on initial
+      ;; sync, only in subsequent syncs, e.g. after the system has
+      ;; slept and awakened.
+      ;; NOTE: When not limited, the read value is `:json-false', so
+      ;; we must explicitly compare to t.
+      (when (eq t (alist-get 'limited timeline))
+	;; Timeline was limited: start filling gap.  We start the
+	;; gap-filling, retrieving up to the session's current
+	;; next-batch token (this function is not called when retrieving
+	;; older messages, so the session's next-batch token is only
+	;; evaluated once, when this chain begins, and then that token
+	;; is passed to repeated calls to `ement-room-retro-to-token'
+	;; until the gap is filled).
+	(ement-room-retro-to-token room session (alist-get 'prev_batch timeline)
+				   (ement-session-next-batch session))))))
+
+(defun ement--push-left-room-events (session left-room)
+  "Push events for LEFT-ROOM into that room in SESSION."
+  (ement--push-joined-room-events session left-room 'leave))
+
+(defun ement--make-event (event)
+  "Return `ement-event' struct for raw EVENT list.
+Adds sender to `ement-users' when necessary."
+  (pcase-let* (((map content type unsigned redacts
+                     ('event_id id) ('origin_server_ts ts)
+                     ('sender sender-id) ('state_key state-key))
+                event)
+               (sender (or (gethash sender-id ement-users)
+                           (puthash sender-id (make-ement-user :id sender-id)
+                                    ement-users))))
+    ;; MAYBE: Handle other keys in the event, such as "room_id" in "invite" events.
+    (make-ement-event :id id :sender sender :type type :content content :state-key state-key
+                      :origin-server-ts ts :unsigned unsigned
+                      ;; Since very few events will be redactions and have this key, we
+                      ;; record it in the local slot alist rather than as another slot on
+                      ;; the struct.
+                      :local (when redacts
+                               (ement-alist 'redacts redacts)))))
+
+(defun ement--put-event (event _room session)
+  "Put EVENT on SESSION's events table."
+  (puthash (ement-event-id event) event (ement-session-events session)))
+
+;; FIXME: These functions probably need to compare timestamps to
+;; ensure that older events that are inserted at the head of the
+;; events lists aren't used instead of newer ones.
+
+;; TODO: These two functions should be folded into event handlers.
+
+;;;;; Reading/writing sessions
+
+;; TODO: Use `persist' and/or `multisession'.
+
+(defun ement--read-sessions ()
+  "Return saved sessions alist read from disk.
+Returns nil if unable to read `ement-sessions-file'."
+  (cl-labels ((plist-to-session (plist)
+                (pcase-let* (((map (:user user-data) (:server server-data)
+                                   (:token token) (:transaction-id transaction-id))
+                              plist)
+                             (user (apply #'make-ement-user user-data))
+                             (server (apply #'make-ement-server server-data))
+                             (session (make-ement-session :user user :server server
+                                                          :token token :transaction-id transaction-id)))
+                  (setf (ement-session-events session) (make-hash-table :test #'equal))
+                  session)))
+    (when (file-exists-p ement-sessions-file)
+      (pcase-let* ((read-circle t)
+                   (sessions (with-temp-buffer
+                               (insert-file-contents ement-sessions-file)
+                               (read (current-buffer)))))
+        (prog1
+            (cl-loop for (id . plist) in sessions
+                     collect (cons id (plist-to-session plist)))
+          (message "Ement: Read sessions."))))))
+
+(defun ement--write-sessions (sessions-alist)
+  "Write SESSIONS-ALIST to disk."
+  ;; We only record the slots we need.  We record them as a plist
+  ;; so that changes to the struct definition don't matter.
+  ;; NOTE: If we ever persist more session data (like room data, so we
+  ;; could avoid doing an initial sync next time), we should limit the
+  ;; amount of session data saved (e.g. room history could grow
+  ;; forever on-disk, which probably isn't what we want).
+
+  ;; NOTE: This writes all current sessions, even if there are multiple active ones and only one
+  ;; is being disconnected.  That's probably okay, but it might be something to keep in mind.
+  (cl-labels ((session-plist (session)
+                (pcase-let* (((cl-struct ement-session user server token transaction-id) session)
+                             ((cl-struct ement-user (id user-id) username) user)
+                             ((cl-struct ement-server (name server-name) uri-prefix) server))
+                  (list :user (list :id user-id
+                                    :username username)
+                        :server (list :name server-name
+                                      :uri-prefix uri-prefix)
+                        :token token
+                        :transaction-id transaction-id))))
+    (message "Ement: Writing sessions...")
+    (with-temp-file ement-sessions-file
+      (pcase-let* ((print-level nil)
+                   (print-length nil)
+                   ;; Very important to use `print-circle', although it doesn't
+                   ;; solve everything.  Writing/reading Lisp data can be tricky...
+                   (print-circle t)
+                   (sessions-alist-plist (cl-loop for (id . session) in sessions-alist
+                                                  collect (cons id (session-plist session)))))
+        (prin1 sessions-alist-plist (current-buffer))))
+    ;; Ensure permissions are safe.
+    (chmod ement-sessions-file #o600)))
+
+(defun ement--kill-emacs-hook ()
+  "Function to be added to `kill-emacs-hook'.
+Writes Ement session to disk when enabled."
+  (ignore-errors
+    ;; To avoid interfering with Emacs' exit, We must be careful that
+    ;; this function handles errors, so just ignore any.
+    (when (and ement-save-sessions
+               ement-sessions)
+      (ement--write-sessions ement-sessions))))
+
+;;;;; Event handlers
+
+(defvar ement-event-handlers nil
+  "Alist mapping event types to functions which process an event of each type.
+Each function is called with three arguments: the event, the
+room, and the session.  These handlers are run regardless of
+whether a room has a live buffer.")
+
+(defun ement--process-event (event room session)
+  "Process EVENT for ROOM in SESSION.
+Uses handlers defined in `ement-event-handlers'.  If no handler
+is defined for EVENT's type, does nothing and returns nil.  Any
+errors signaled during processing are demoted in order to prevent
+unexpected errors from arresting event processing and syncing."
+  (when-let ((handler (alist-get (ement-event-type event) ement-event-handlers nil nil #'equal)))
+    ;; We demote any errors that happen while processing events, because it's possible for
+    ;; events to be malformed in unexpected ways, and that could cause an error, which
+    ;; would stop processing of other events and prevent further syncing.  See,
+    ;; e.g. <https://github.com/alphapapa/ement.el/pull/61>.
+    (with-demoted-errors "Ement (ement--process-event): Error processing event: %S"
+      (funcall handler event room session))))
+
+(defmacro ement-defevent (type &rest body)
+  "Define an event handling function for events of TYPE, a string.
+Around the BODY, the variable `event' is bound to the event being
+processed, `room' to the room struct in which the event occurred,
+and `session' to the session.  Adds function to
+`ement-event-handlers', which see."
+  (declare (indent defun))
+  `(setf (alist-get ,type ement-event-handlers nil nil #'string=)
+         (lambda (event room session)
+           ,(concat "`ement-' handler function for " type " events.")
+           ,@body)))
+
+;; I love how Lisp macros make it so easy and concise to define these
+;; event handlers!
+
+(ement-defevent "m.room.avatar"
+  (when ement-room-avatars
+    ;; If room avatars are disabled, we don't download avatars at all.  This
+    ;; means that, if a user has them disabled and then reenables them, they will
+    ;; likely need to reconnect to cause them to be displayed in most rooms.
+    (if-let ((url (alist-get 'url (ement-event-content event))))
+        (plz-run
+         (plz-queue ement-images-queue
+           'get (ement--mxc-to-url url session) :as 'binary :noquery t
+           :then (lambda (data)
+                   (when ement-room-avatars
+                     ;; MAYBE: Store the raw image data instead of using create-image here.
+                     (let ((image (create-image data nil 'data-p
+                                                :ascent 'center
+                                                :max-width ement-room-avatar-max-width
+                                                :max-height ement-room-avatar-max-height)))
+                       (if (not image)
+                           (progn
+                             (display-warning 'ement (format "Room avatar seems unreadable:  ROOM-ID:%S  AVATAR-URL:%S"
+                                                             (ement-room-id room) (ement--mxc-to-url url session)))
+                             (setf (ement-room-avatar room) nil
+                                   (alist-get 'room-list-avatar (ement-room-local room)) nil))
+                         (when (fboundp 'imagemagick-types)
+                           ;; Only do this when ImageMagick is supported.
+                           ;; FIXME: When requiring Emacs 27+, remove this (I guess?).
+                           (setf (image-property image :type) 'imagemagick))
+                         ;; We set the room-avatar slot to a propertized string that
+                         ;; displays as the image.  This seems the most convenient thing to
+                         ;; do.  We also unset the cached room-list-avatar so it can be
+                         ;; remade.
+                         (setf (ement-room-avatar room) (propertize " " 'display image)
+                               (alist-get 'room-list-avatar (ement-room-local room)) nil)))))))
+      ;; Unset avatar.
+      (setf (ement-room-avatar room) nil
+            (alist-get 'room-list-avatar (ement-room-local room)) nil))))
+
+(ement-defevent "m.room.create"
+  (ignore session)
+  (pcase-let* (((cl-struct ement-event (content (map type))) event))
+    (when type
+      (setf (ement-room-type room) type))))
+
+(ement-defevent "m.room.member"
+  "Put/update member on `ement-users' and room's members table."
+  (ignore session)
+  (pcase-let* (((cl-struct ement-room members) room)
+               ((cl-struct ement-event state-key
+                           (content (map displayname membership
+                                         ('avatar_url avatar-url))))
+                event)
+               (user (or (gethash state-key ement-users)
+                         (puthash state-key
+                                  (make-ement-user
+                                   :id state-key :avatar-url avatar-url
+                                   ;; NOTE: The spec doesn't seem to say whether the
+                                   ;; displayname in the member event applies only to
+                                   ;; the room or is for the user generally, so we'll
+                                   ;; save it in the struct anyway.
+                                   ;; FIXME: This is probably wrong: it probably means
+                                   ;; overwriting the global displayname with any
+                                   ;; room-specific one that was most recently processed.
+                                   :displayname displayname)
+                                  ement-users))))
+    (pcase membership
+      ("join"
+       (puthash state-key user members)
+       (if displayname
+           ;; NOTE: This handler is only called for new events, not when retrieving old events.
+           ;; Therefore it's safe to update the cached displayname from such an event.
+           (puthash user displayname (ement-room-displaynames room))
+         ;; No displayname set for this room: recalculate.
+         (ement--user-displayname-in room user 'recalculate)))
+      (_ (remhash state-key members)
+         (remhash user (ement-room-displaynames room))))))
+
+(ement-defevent "m.room.name"
+  (ignore session)
+  (pcase-let* (((cl-struct ement-event (content (map name))) event))
+    (when name
+      ;; Recalculate room name and cache in slot.
+      (setf (ement-room-display-name room) (ement--room-display-name room)))))
+
+(ement-defevent "m.room.topic"
+  (ignore session)
+  (pcase-let* (((cl-struct ement-event (content (map topic))) event))
+    (when topic
+      (setf (ement-room-topic room) topic))))
+
+(ement-defevent "m.receipt"
+  (ignore session)
+  (pcase-let (((cl-struct ement-event content) event)
+              ((cl-struct ement-room (receipts room-receipts)) room))
+    (cl-loop for (event-id . receipts) in content
+             do (cl-loop for (user-id . receipt) in (alist-get 'm.read receipts)
+                         ;; Users may not have been "seen" yet, so although we'd
+                         ;; prefer to key on the user struct, we key on the user ID.
+                         ;; Same for events, unfortunately.
+                         ;; NOTE: The JSON map keys are converted to symbols by `json-read'.
+                         ;; MAYBE: (Should we keep them that way?  It would use less memory, I guess.)
+                         do (puthash (symbol-name user-id)
+                                     (cons (symbol-name event-id) (alist-get 'ts receipt))
+                                     room-receipts)))))
+
+(ement-defevent "m.space.child"
+  ;; SPEC: v1.2/11.35.
+  (pcase-let* ((space-room room)
+               ((cl-struct ement-session rooms) session)
+               ((cl-struct ement-room (id parent-room-id)) space-room)
+               ((cl-struct ement-event (state-key child-room-id) (content (map via))) event)
+               (child-room (cl-find child-room-id rooms :key #'ement-room-id :test #'equal)))
+    (if via
+        ;; Child being declared: add it.
+        (progn
+          (cl-pushnew child-room-id (alist-get 'children (ement-room-local space-room)) :test #'equal)
+          (when child-room
+            ;; The user is also in the child room: link the parent space-room in it.
+            ;; FIXME: On initial sync, if the child room hasn't been processed yet, this will fail.
+            (cl-pushnew parent-room-id (alist-get 'parents (ement-room-local child-room)) :test #'equal)))
+      ;; Child being disowned: remove it.
+      (setf (alist-get 'children (ement-room-local space-room))
+            (delete child-room-id (alist-get 'children (ement-room-local space-room))))
+      (when child-room
+        ;; The user is also in the child room: unlink the parent space-room in it.
+        (setf (alist-get 'parents (ement-room-local child-room))
+              (delete parent-room-id (alist-get 'parents (ement-room-local child-room))))))))
+
+(ement-defevent "m.room.canonical_alias"
+  (ignore session)
+  (pcase-let (((cl-struct ement-event (content (map alias))) event))
+    (setf (ement-room-canonical-alias room) alias)))
+
+(defun ement--link-children (session)
+  "Link child rooms in SESSION.
+To be called after initial sync."
+  ;; On initial sync, when processing m.space.child events, the child rooms may not have
+  ;; been processed yet, so we link them again here.
+  (pcase-let (((cl-struct ement-session rooms) session))
+    (dolist (room rooms)
+      (pcase-let (((cl-struct ement-room (id parent-id) (local (map children))) room))
+        (when children
+          (dolist (child-id children)
+            (when-let ((child-room (cl-find child-id rooms :key #'ement-room-id :test #'equal)))
+              (cl-pushnew parent-id (alist-get 'parents (ement-room-local child-room)) :test #'equal))))))))
+
+;;;;; Savehist compatibility
+
+;; See <https://github.com/alphapapa/ement.el/issues/216>.
+
+(defvar savehist-save-hook)
+
+(with-eval-after-load 'savehist
+  ;; TODO: Consider using a symbol property on our commands and checking that rather than
+  ;; symbol names; would avoid consing.
+  (defun ement--savehist-save-hook ()
+    "Remove all `ement-' commands from `command-history'.
+Because when `savehist' saves `command-history', it includes the
+interactive arguments passed to the command, which in our case
+includes large data structures that should never be persisted!"
+    (setf command-history
+          (cl-remove-if (pcase-lambda (`(,command . ,_))
+                          (cl-typecase command
+                            (symbol (string-match-p (rx bos "ement-") (symbol-name command)))))
+                        command-history)))
+  (cl-pushnew 'ement--savehist-save-hook savehist-save-hook))
+
+;;;; Footer
+
+(provide 'ement)
+
+;;; ement.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement.elc b/emacs/.emacs.d/elpa/ement-0.17/ement.elc
new file mode 100644
index 0000000..f8e105a
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/ement.elc differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/ement.info b/emacs/.emacs.d/elpa/ement-0.17/ement.info
new file mode 100644
index 0000000..d2ae3a9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/ement.info
@@ -0,0 +1,1691 @@
+This is dochHjBey.info, produced by makeinfo version 6.8 from
+ement.texi.
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Ement: (ement).       Matrix client for Emacs.
+END-INFO-DIR-ENTRY
+
+
+File: dochHjBey.info,  Node: Top,  Next: Installation,  Up: (dir)
+
+Ement.el
+********
+
+https://elpa.gnu.org/packages/ement.svg
+(https://elpa.gnu.org/packages/ement.html)
+
+   Ement.el is a Matrix (http://www.matrix.org/) client for GNU Emacs
+(https://www.gnu.org/software/emacs/).  It aims to be simple, fast,
+featureful, and reliable, while integrating naturally with Emacs.
+
+   Feel free to join us in the chat room:
+https://img.shields.io/matrix/ement.el:matrix.org.svg?label=%23ement.el:matrix.org
+(https://matrix.to/#/#ement.el:matrix.org)
+
+* Menu:
+
+* Installation::
+* Usage::
+* Changelog::
+* Development::
+* License::
+
+— The Detailed Node Listing —
+
+Installation
+
+* GNU ELPA::
+* GNU Guix::
+* Debian, Ubuntu: Debian Ubuntu.
+* Nix::
+* Other distributions::
+* Git master::
+* Manual::
+
+
+Usage
+
+* Bindings::
+* Tips::
+* Encrypted room support through Pantalaimon::
+
+
+Changelog
+
+* 0.17: 017.
+* 0.16: 016.
+* 0.15.1: 0151.
+* 0.15: 015.
+* 0.14: 014.
+* 0.13: 013.
+* 0.12: 012.
+* 0.11: 011.
+* 0.10: 010.
+* 0.9.3: 093.
+* 0.9.2: 092.
+* 0.9.1: 091.
+* 0.9: 09.
+* 0.8.3: 083.
+* 0.8.2: 082.
+* 0.8.1: 081.
+* 0.8: 08.
+* 0.7: 07.
+* 0.6: 06.
+* 0.5.2: 052.
+* 0.5.1: 051.
+* 0.5: 05.
+* 0.4.1: 041.
+* 0.4: 04.
+* 0.3.1: 031.
+* 0.3: 03.
+* 0.2.1: 021.
+* 0.2: 02.
+* 0.1.4: 014 (1).
+* 0.1.3: 013 (1).
+* 0.1.2: 012 (1).
+* 0.1.1: 011 (1).
+* 0.1: 01.
+
+
+Development
+
+* Copyright Assignment::
+* Matrix spec in Org format::
+* Rationale::
+
+
+
+
+File: dochHjBey.info,  Node: Installation,  Next: Usage,  Prev: Top,  Up: Top
+
+1 Installation
+**************
+
+* Menu:
+
+* GNU ELPA::
+* GNU Guix::
+* Debian, Ubuntu: Debian Ubuntu.
+* Nix::
+* Other distributions::
+* Git master::
+* Manual::
+
+
+File: dochHjBey.info,  Node: GNU ELPA,  Next: GNU Guix,  Up: Installation
+
+GNU ELPA
+========
+
+Ement.el is published in GNU ELPA (http://elpa.gnu.org/) as ement
+(https://elpa.gnu.org/packages/ement.html), so it may be installed in
+Emacs with the command ‘M-x package-install RET ement RET’.  This is the
+recommended way to install Ement.el, as it will install the current
+stable release.
+
+   The latest development build may be installed from ELPA-devel
+(https://elpa.gnu.org/devel/ement.html) or from Git (see below).
+
+
+File: dochHjBey.info,  Node: GNU Guix,  Next: Debian Ubuntu,  Prev: GNU ELPA,  Up: Installation
+
+GNU Guix
+========
+
+Ement.el is available in GNU Guix (https://guix.gnu.org/) as emacs-ement
+(https://packages.guix.gnu.org/packages/emacs-ement/).
+
+
+File: dochHjBey.info,  Node: Debian Ubuntu,  Next: Nix,  Prev: GNU Guix,  Up: Installation
+
+Debian, Ubuntu
+==============
+
+Ement.el is available in Debian as elpa-ement
+(https://packages.debian.org/elpa-ement) and in Ubuntu as elpa-ement
+(https://packages.ubuntu.com/search?suite=default&section=all&arch=any&keywords=elpa-ement&searchon=names).
+
+
+File: dochHjBey.info,  Node: Nix,  Next: Other distributions,  Prev: Debian Ubuntu,  Up: Installation
+
+Nix
+===
+
+Ement.el is available in NixOS (https://nixos.org/) as
+emacsPackages.ement
+(https://search.nixos.org/packages?channel=23.05&show=emacsPackages.ement&from=0&size=50&sort=relevance&type=packages&query=ement).
+
+
+File: dochHjBey.info,  Node: Other distributions,  Next: Git master,  Prev: Nix,  Up: Installation
+
+Other distributions
+===================
+
+Ement.el is also available in some other distributions.  See Repology
+(https://repology.org/project/emacs:ement/related) for details.
+
+
+File: dochHjBey.info,  Node: Git master,  Next: Manual,  Prev: Other distributions,  Up: Installation
+
+Git master
+==========
+
+The ‘master’ branch of the Git repository is intended to be usable at
+all times; only minor bugs are expected to be found in it before a new
+stable release is made.
+
+   To install, it is recommended to use quelpa-use-package
+(https://github.com/quelpa/quelpa-use-package), like this (using this
+helpful command
+(https://github.com/alphapapa/unpackaged.el#upgrade-a-quelpa-use-package-forms-package)
+for upgrading versions):
+
+     ;; Install and load `quelpa-use-package'.
+     (package-install 'quelpa-use-package)
+     (require 'quelpa-use-package)
+
+     ;; Install Ement.
+     (use-package ement
+       :quelpa (ement :fetcher github :repo "alphapapa/ement.el"))
+
+   One might also use systems like Elpaca
+(https://github.com/progfolio/elpaca) or Straight
+(https://github.com/radian-software/straight.el) (which is also used by
+DOOM (https://github.com/doomemacs/doomemacs)), but the author cannot
+offer support for them.
+
+
+File: dochHjBey.info,  Node: Manual,  Prev: Git master,  Up: Installation
+
+Manual
+======
+
+Ement.el is intended to be installed with Emacs’s package system, which
+will ensure that the required autoloads are generated, etc.  If you
+choose to install it manually, you’re on your own.
+
+
+File: dochHjBey.info,  Node: Usage,  Next: Changelog,  Prev: Installation,  Up: Top
+
+2 Usage
+*******
+
+   • • • 
+  1. Call command ‘ement-connect’ to connect.  Multiple sessions are
+     supported: call the command again with a ‘C-u’ universal prefix to
+     connect to another account.
+  2. Wait for initial sync to complete (which can take a few
+     moments–initial sync JSON responses can be large).
+  3. Use these commands (room-related commands may be called with
+     universal prefix to prompt for the room):
+        • ‘ement-list-rooms’ to view the list of joined rooms.
+        • ‘ement-view-room’ to view a room’s buffer, selected with
+          completion.
+        • ‘ement-create-room’ to create a new room.
+        • ‘ement-create-space’ to create a space.
+        • ‘ement-invite-user’ to invite a user to a room.
+        • ‘ement-join-room’ to join a room.
+        • ‘ement-leave-room’ to leave a room.
+        • ‘ement-forget-room’ to forget a room.
+        • ‘ement-tag-room’ to toggle a tag on a room (including
+          favorite/low-priority status).
+        • ‘ement-list-members’ to list members in a room.
+        • ‘ement-send-direct-message’ to send a direct message to a user
+          (in an existing direct room, or creating a new one
+          automatically).
+        • ‘ement-room-edit-message’ to edit a message at point.
+        • ‘ement-room-send-file’ to send a file.
+        • ‘ement-room-send-image’ to send an image.
+        • ‘ement-room-set-topic’ to set a room’s topic.
+        • ‘ement-room-occur’ to search in a room’s known events.
+        • ‘ement-room-override-name’ to override a room’s display name.
+        • ‘ement-ignore-user’ to ignore a user (or with interactive
+          prefix, un-ignore).
+        • ‘ement-room-set-message-format’ to set a room’s message format
+          buffer-locally.
+        • ‘ement-room-toggle-space’ to toggle a room’s membership in a
+          space (a way to group rooms in Matrix).
+        • ‘ement-directory’ to view a room directory.
+        • ‘ement-directory-search’ to search a room directory.
+  4. Use these special buffers to see events from multiple rooms (you
+     can also reply to messages from these buffers!):
+        • See all new events that mention you in the ‘*Ement Mentions*’
+          buffer.
+        • See all new events in rooms that have open buffers in the
+          ‘*Ement Notifications*’ buffer.
+
+* Menu:
+
+* Bindings::
+* Tips::
+* Encrypted room support through Pantalaimon::
+
+
+File: dochHjBey.info,  Node: Bindings,  Next: Tips,  Up: Usage
+
+Bindings
+========
+
+These bindings are common to all of the following buffer types:
+
+   • Switch to a room buffer: ‘M-g M-r’
+   • Switch to the room list buffer: ‘M-g M-l’
+   • Switch to the mentions buffer: ‘M-g M-m’
+   • Switch to the notifications buffer: ‘M-g M-n’
+
+* Menu:
+
+* Room buffers::
+* Room list buffer::
+* Directory buffers::
+* Mentions/notifications buffers::
+
+
+File: dochHjBey.info,  Node: Room buffers,  Next: Room list buffer,  Up: Bindings
+
+Room buffers
+------------
+
+Note that if global minor mode ‘ement-room-self-insert-mode’ is enabled
+(by default it is disabled), typing any of the common printable ascii
+characters (such as letters) in a room buffer will start a new message,
+and most of the following bindings are instead accessed via a prefix
+key.  See the minor mode docstring for details.  (The ‘?’ binding is an
+exception; by default it opens the command menu regardless of this minor
+mode.)
+
+   • Show command menu: ‘?’
+
+   *Movement*
+
+   • Next event: ‘n’
+   • Previous event: ‘p’
+   • End of buffer: ‘N’
+   • Scroll up and mark read: ‘SPC’
+   • Scroll down: ‘S-SPC’
+   • Jump to fully-read marker: ‘M-g M-p’
+   • Move read markers to point: ‘m’
+   • Load older messages: at top of buffer, scroll contents up (i.e.
+     ‘S-SPC’, ‘M-v’ or ‘mwheel-scroll’)
+
+   *Switching*
+
+   • List rooms: ‘M-g M-l’
+   • Switch to other room: ‘M-g M-r’
+   • Switch to mentions buffer: ‘M-g M-m’
+   • Switch to notifications buffer: ‘M-g M-n’
+   • Quit window: ‘q’
+
+   *Messages*
+
+   • Write message: ‘RET’
+   • Compose message in buffer: ‘M-RET’ (while writing in minibuffer:
+     ‘C-c '‍’).  Customize the option ‘ement-room-compose-method’ to
+     make ‘RET’ and the other message bindings use a compose buffer by
+     default.  Use command ‘ement-room-compose-org’ to activate Org mode
+     in the compose buffer.
+   • Write reply to event at point: ‘S-<return>’
+   • Edit message: ‘<insert>’
+   • Delete message: ‘C-k’
+   • Send reaction to event at point, or send same reaction at point: ‘s
+     r’
+   • Send emote: ‘s e’
+   • Send file: ‘s f’
+   • Send image: ‘s i’
+   • View event source: ‘v’
+   • Complete members and rooms at point: ‘C-M-i’ (standard
+     ‘completion-at-point’ command).  (Type an ‘@’ prefix for a member
+     mention, a ‘#’ prefix for a room alias, or a ‘!’ prefix for a room
+     ID.)
+
+   *Images*
+
+   • Toggle scale of image (between fit-to-window and thumbnail):
+     ‘mouse-1’
+   • Show image in new buffer at full size: ‘double-mouse-1’
+
+   *Users*
+
+   • Send direct message: ‘u RET’
+   • Invite user: ‘u i’
+   • Ignore user: ‘u I’
+
+   *Room*
+
+   • Occur search in room: ‘M-s o’
+   • List members: ‘r m’
+   • Set topic: ‘r t’
+   • Set message format: ‘r f’
+   • Set notification rules: ‘r n’
+   • Override display name: ‘r N’
+   • Tag/untag room: ‘r T’
+
+   *Room membership*
+
+   • Create room: ‘R c’
+   • Join room: ‘R j’
+   • Leave room: ‘R l’
+   • Forget room: ‘R F’
+   • Toggle room’s spaces: ‘R s’
+
+   *Other*
+
+   • Sync new messages (not necessary if auto sync is enabled; with
+     prefix to force new sync): ‘g’
+
+
+File: dochHjBey.info,  Node: Room list buffer,  Next: Directory buffers,  Prev: Room buffers,  Up: Bindings
+
+Room list buffer
+----------------
+
+   • Show buffer of room at point: ‘RET’
+   • Show buffer of next unread room: ‘SPC’
+   • Move between room names: ‘TAB’ / ‘<backtab>’
+
+   • Kill room’s buffer: ‘k’
+   • Toggle room’s membership in a space: ‘s’
+
+
+File: dochHjBey.info,  Node: Directory buffers,  Next: Mentions/notifications buffers,  Prev: Room list buffer,  Up: Bindings
+
+Directory buffers
+-----------------
+
+   • View/join a room: ‘RET’ / ‘mouse-1’
+   • Load next batch of rooms: ‘+’
+
+
+File: dochHjBey.info,  Node: Mentions/notifications buffers,  Prev: Directory buffers,  Up: Bindings
+
+Mentions/notifications buffers
+------------------------------
+
+   • Move between events: ‘TAB’ / ‘<backtab>’
+   • Go to event at point in its room buffer: ‘RET’
+   • Write reply to event at point (shows the event in its room while
+     writing): ‘S-<return>’
+
+
+File: dochHjBey.info,  Node: Tips,  Next: Encrypted room support through Pantalaimon,  Prev: Bindings,  Up: Usage
+
+Tips
+====
+
+   • Desktop notifications are enabled by default for events that
+     mention the local user.  They can also be shown for all events in
+     rooms with open buffers.
+   • Send messages in Org mode format by customizing the option
+     ‘ement-room-send-message-filter’ (which enables Org format by
+     default), or by calling ‘ement-room-compose-org’ in a compose
+     buffer (which enables it for a single message).  Then Org-formatted
+     messages are automatically converted and sent as HTML-formatted
+     messages (with the Org syntax as the plain-text fallback).  You can
+     send syntax such as:
+        • Bold, italic, underline, strikethrough
+        • Links
+        • Tables
+        • Source blocks (including results with ‘:exports both’)
+        • Footnotes (okay, that might be pushing it, but you can!)
+        • And, generally, anything that Org can export to HTML
+        • Note that the default ‘org-export-preserve-breaks’ value
+          causes singular line breaks to be exported as spaces.  To
+          preserve the line breaks, indentation, and blank lines in a
+          region, but otherwise use normal formatting, you can use the
+          ‘verse’ block type.  Refer to ‘(info "(org) Paragraphs")’ and
+          ‘(info "(org) Structure Templates")’ for details.
+   • Starting in the room list buffer, by pressing ‘SPC’ repeatedly, you
+     can cycle through and read all rooms with unread buffers.  (If a
+     room doesn’t have a buffer, it will not be included.)
+   • Room buffers and the room-list buffer can be bookmarked in Emacs,
+     i.e.  using ‘C-x r m’.  This is especially useful with Burly
+     (https://github.com/alphapapa/burly.el): you can arrange an Emacs
+     frame with several room buffers displayed at once, use
+     ‘burly-bookmark-windows’ to bookmark the layout, and then you can
+     restore that layout and all of the room buffers by opening the
+     bookmark, rather than having to manually arrange them every time
+     you start Emacs or change the window configuration.
+   • Images and other files can be uploaded to rooms using
+     drag-and-drop.
+   • Mention members by typing a ‘@’ followed by their displayname or
+     Matrix ID.  (Members’ names and rooms’ aliases/IDs may be completed
+     with ‘completion-at-point’ commands.)
+   • Customize ‘ement-room-use-variable-pitch’ to render messages using
+     proportional fonts.
+   • You can customize settings in the ‘ement’ group.
+        • *Note:* ‘setq’ should not be used for certain options, because
+          it will not call the associated setter function.  Users who
+          have an aversion to the customization system may experience
+          problems.
+
+* Menu:
+
+* Displaying symbols and emojis::
+
+
+File: dochHjBey.info,  Node: Displaying symbols and emojis,  Up: Tips
+
+Displaying symbols and emojis
+-----------------------------
+
+Emacs may not display certain symbols and emojis well by default.  Based
+on this question and answer
+(https://emacs.stackexchange.com/questions/62049/override-the-default-font-for-emoji-characters),
+you may find that the simplest way to fix this is to install an
+appropriate font, like Noto Emoji
+(https://www.google.com/get/noto/#emoji-zsye), and then use this Elisp
+code:
+
+     (setf use-default-font-for-symbols nil)
+     (set-fontset-font t 'unicode "Noto Emoji" nil 'append)
+
+
+File: dochHjBey.info,  Node: Encrypted room support through Pantalaimon,  Prev: Tips,  Up: Usage
+
+Encrypted room support through Pantalaimon
+==========================================
+
+Ement.el doesn’t support encrypted rooms natively, but it can be used
+transparently with the E2EE-aware reverse proxy daemon Pantalaimon
+(https://github.com/matrix-org/pantalaimon/).  After configuring it
+according to its documentation, call ‘ement-connect’ with the
+appropriate hostname and port, like:
+
+     (ement-connect :uri-prefix "http://localhost:8009")
+
+
+File: dochHjBey.info,  Node: Changelog,  Next: Development,  Prev: Usage,  Up: Top
+
+3 Changelog
+***********
+
+* Menu:
+
+* 0.17: 017.
+* 0.16: 016.
+* 0.15.1: 0151.
+* 0.15: 015.
+* 0.14: 014.
+* 0.13: 013.
+* 0.12: 012.
+* 0.11: 011.
+* 0.10: 010.
+* 0.9.3: 093.
+* 0.9.2: 092.
+* 0.9.1: 091.
+* 0.9: 09.
+* 0.8.3: 083.
+* 0.8.2: 082.
+* 0.8.1: 081.
+* 0.8: 08.
+* 0.7: 07.
+* 0.6: 06.
+* 0.5.2: 052.
+* 0.5.1: 051.
+* 0.5: 05.
+* 0.4.1: 041.
+* 0.4: 04.
+* 0.3.1: 031.
+* 0.3: 03.
+* 0.2.1: 021.
+* 0.2: 02.
+* 0.1.4: 014 (1).
+* 0.1.3: 013 (1).
+* 0.1.2: 012 (1).
+* 0.1.1: 011 (1).
+* 0.1: 01.
+
+
+File: dochHjBey.info,  Node: 017,  Next: 016,  Up: Changelog
+
+0.17
+====
+
+*Additions*
+
+   • Command ‘ement-room-download-file’, which downloads the file in the
+     event at point (for image, audio, video, and file messages).  (#323
+     (https://github.com/alphapapa/ement.el/pull/323).  Thanks to Arto
+     Jantunen (https://github.com/viiru-).)
+   • Customization groups for faces.  (Thanks to Phil Sainty
+     (https://github.com/phil-s).)
+   • Option ‘ement-room-hide-redacted-message-content’, which hides the
+     content of redacted messages by default.  It may be disabled to
+     keep redacted content visible with a strikethrough face, which may
+     be useful for room moderators, but users should keep in mind that
+     doing so will leave unpleasant content visible in the current
+     session, even after being redacted by moderators.
+   • Option ‘ement-room-list-avatar-generation’: if disabled, SVG-based
+     room avatars are not generated.  This option automatically tests
+     whether SVG support is available in Emacs, and should allow use
+     with builds of Emacs that lack ‘librsvg’ support.
+
+   *Changes*
+
+   • Disable underline for faces ‘ement-room-list-direct’ and
+     ‘ement-room-list-name’ (in case a face they inherit from enables
+     it, e.g.  when themed).
+
+   *Fixes*
+
+   • Call ‘eww-browse-url’ instead of ‘browse-url’ in
+     ‘ement-room-browse-mxc’ (because the latter is not useful for
+     authenticated media if the user has configured it to use a
+     different browser).  (#323
+     (https://github.com/alphapapa/ement.el/pull/323).  Thanks to Arto
+     Jantunen (https://github.com/viiru-).)
+   • Workaround change in ‘magit-section’ that broke fontification in
+     room-list and directory buffers.  (See #331
+     (https://github.com/alphapapa/ement.el/issues/331).)
+   • Handle non-symbol commands in ‘command-history’.  (#330
+     (https://github.com/alphapapa/ement.el/issues/330).  Thanks to Alex
+     Bennée (https://github.com/stsquad) for reporting.)
+
+
+File: dochHjBey.info,  Node: 016,  Next: 0151,  Prev: 017,  Up: Changelog
+
+0.16
+====
+
+*Compatibility*
+
+   • Use authenticated media requests (part of Matrix 1.11; see MSC3916
+     (https://github.com/matrix-org/matrix-spec-proposals/pull/3916) and
+     matrix.org’s sunsetting unauthenticated media
+     (https://matrix.org/blog/2024/06/26/sunsetting-unauthenticated-media/)).
+
+   *Additions*
+
+   • When option ‘ement-room-images’ is disabled (preventing automatic
+     download and display of images), individual images may be shown by
+     clicking the button in their events.
+
+   *Changes*
+
+   • Option ‘ement-room-coalesce-events’ may now be set to (and defaults
+     to) a maximum number of events to coalesce together.  (This avoids
+     potential performance problems in rare cases.  See #247
+     (https://github.com/alphapapa/ement.el/issues/247).  Thanks to Arto
+     Jantunen (https://github.com/viiru-) for reporting and Sergio
+     Durigan Junior (https://github.com/sergiodj) for testing.)
+
+   *Fixes*
+   • Replies to edited messages are correctly sent to the original event
+     (whereas previously they were sent to the edit, which caused
+     reactions to not be shown).  (#230
+     (https://github.com/alphapapa/ement.el/issues/230), #277
+     (https://github.com/alphapapa/ement.el/issues/277).  Thanks to Phil
+     Sainty (https://github.com/phil-s) for suggesting, and to dionisos
+     (https://github.com/dionisos2) for reporting.)
+   • Set ‘filter-buffer-substring-function’ in room buffers to prevent
+     undesired text properties from being included in copied text.
+     (#278 (https://github.com/alphapapa/ement.el/pull/278).  Thanks to
+     Phil Sainty (https://github.com/phil-s).)
+   • Command ‘ement-disconnect’ no longer shows an error message.  (#208
+     (https://github.com/alphapapa/ement.el/issues/208).)
+   • Retrieval of earlier events in a just-joined room.  (#148
+     (https://github.com/alphapapa/ement.el/issues/148).  Thanks to
+     Richard Brežák (https://github.com/MagicRB) for reporting, and to
+     Phil Sainty (https://github.com/phil-s) for testing.)
+   • Cache computed displaynames in rooms (avoiding unnecessary
+     reiteration and recalculation).  (#298
+     (https://github.com/alphapapa/ement.el/issues/298).  Thanks to
+     Rutherther (https://github.com/Rutherther) for reporting and
+     testing, and to Phil Sainty (https://github.com/phil-s).)
+   • Customization group for options ‘ement-room-mode-hook’ and
+     ‘ement-room-self-insert-mode’.  (Thanks to Phil Sainty
+     (https://github.com/phil-s).)
+   • Inheritance for some faces.  (#303
+     (https://github.com/alphapapa/ement.el/pull/303).  Thanks to Jonas
+     Bernoulli (https://github.com/tarsius).)
+
+
+File: dochHjBey.info,  Node: 0151,  Next: 015,  Prev: 016,  Up: Changelog
+
+0.15.1
+======
+
+*Fixes*
+   • Handle unnamed rooms in ‘ement-directory’ list.  (See #248
+     (https://github.com/alphapapa/ement.el/issues/248).  Thanks to
+     Hunter Jozwiak (https://github.com/hjozwiak) and Bharath Palavalli
+     (https://github.com/bmp) for reporting.)
+   • Don’t use ‘cl-type’ ‘pcase’ form in Emacs versions before 28.
+     (#279 (https://github.com/alphapapa/ement.el/issues/279).  Thanks
+     to Adam Bark (https://github.com/AdamBark) for reporting.)
+
+
+File: dochHjBey.info,  Node: 015,  Next: 014,  Prev: 0151,  Up: Changelog
+
+0.15
+====
+
+*Additions*
+
+Configurable emoji picker for sending reactions. (#199 (https://github.com/alphapapa/ement.el/issues/199), #201 (https://github.com/alphapapa/ement.el/pull/201). Thanks to Omar Antolín Camarena (https://github.com/oantolin).)
+        • Option ‘ement-room-reaction-picker’ sets the default picker.
+          Within that, the user may press ‘C-g’ to choose a different
+          one with a key bound in ‘ement-room-reaction-map’.
+
+A variety of enhancements for using compose buffers. (#140 (https://github.com/alphapapa/ement.el/issues/140). Thanks to Phil Sainty (https://github.com/phil-s).)
+     Chiefly, messages can now be composed in small windows below room
+     windows, rather than in the minibuffer or a full-sized window.  A
+     variety of options and commands are available related to these
+     features.  See *note compose buffer enhancements: Compose buffer
+     enhancements.
+
+Global minor mode ‘ement-room-self-insert-mode’ enables "just typing" to start a message. (Thanks to Phil Sainty (https://github.com/phil-s).)
+     See *note ement-room-self-insert-mode: ement-room-self-insert-mode.
+
+Options affecting how images are displayed in room buffers.
+     See *note image display: Image display.
+
+   *Changes*
+
+   • Improve prompt used when viewing a room that is not joined.  (#241
+     (https://github.com/alphapapa/ement.el/issues/241).  Thanks to Phil
+     Sainty (https://github.com/phil-s).)
+   • Format "was kicked and rejoined" membership event pairs.
+   • Enclose reasons for membership events in quotes for clarity.
+   • Improve default room list grouping.
+   • When editing or replying to a message in a compose buffer, the
+     related room event is highlighted persistently until the compose
+     buffer is killed.  (Thanks to Phil Sainty
+     (https://github.com/phil-s).)
+   • In compose buffers ‘dabbrev’ will prioritise firstly the associated
+     room, and secondly all other rooms, before looking to other buffers
+     for completions.  (Thanks to Phil Sainty
+     (https://github.com/phil-s).)
+   • Aborted messages are now added to ‘ement-room-message-history’
+     rather than the kill-ring.  (Thanks to Phil Sainty
+     (https://github.com/phil-s).)
+   • Prefix bindings in ‘ement-room-mode-map’ now have named labels in
+     ‘which-key’ and similar.  (Thanks to Phil Sainty
+     (https://github.com/phil-s).)
+   • Option: ‘ement-room-use-variable-pitch’ (previously named
+     ‘ement-room-shr-use-fonts’) enables variable-pitch fonts for all
+     message types.  (This option previously supported formatted
+     messages, but now works for plain text messages as well.)  Note:
+     users who have customized the ‘ement-room-message-text’ face to be
+     variable-pitch should revert that change, as it causes problems for
+     formatted messages, and is no longer necessary.  (#174
+     (https://github.com/alphapapa/ement.el/issues/174).  Thanks to Phil
+     Sainty (https://github.com/phil-s).)
+
+   *Fixes*
+
+   • Edits to previous edit events are correctly sent to the server as
+     edits to the original message event.  (#230
+     (https://github.com/alphapapa/ement.el/issues/230).  Thanks to Phil
+     Sainty (https://github.com/phil-s).)
+   • Completion at point works more reliably in compose buffers.
+     (Thanks to Phil Sainty (https://github.com/phil-s).)
+   • Toggling images to fill the window body no longer triggers
+     unintended scrolling.  (Thanks to Phil Sainty
+     (https://github.com/phil-s).)
+   • Recognition of mentions after a newline.  (#267
+     (https://github.com/alphapapa/ement.el/issues/267).  Thanks to Phil
+     Sainty (https://github.com/phil-s).)
+   • Newlines in ‘ement-room-message-format-spec’ are considered when
+     calculating the wrap-prefix.  (Thanks to Phil Sainty
+     (https://github.com/phil-s).)
+   • Weight of face ‘ement-room-list-direct’ (now correctly bold in room
+     list heading).
+
+* Menu:
+
+* Compose buffer enhancements::
+* ement-room-self-insert-mode::
+* Image display::
+
+
+File: dochHjBey.info,  Node: Compose buffer enhancements,  Next: ement-room-self-insert-mode,  Up: 015
+
+Compose buffer enhancements
+---------------------------
+
+   • Option ‘ement-room-compose-buffer-display-action’ declares how and
+     where a new compose buffer window should be displayed.  (By
+     default, in a new window below the associated room buffer.)
+   • Option ‘ement-room-compose-buffer-window-dedicated’ determines
+     whether compose buffers will have dedicated windows.
+   • Option ‘ement-room-compose-buffer-window-auto-height’ causes
+     dynamic scaling of the compose buffer window height so that the
+     full message is visible at all times.
+   • Option ‘ement-room-compose-buffer-window-auto-height-min’ specifies
+     the minimum window height when
+     ‘ement-room-compose-buffer-window-auto-height’ is enabled.
+   • Option ‘ement-room-compose-buffer-window-auto-height-max’ specifies
+     the maximum window height when
+     ‘ement-room-compose-buffer-window-auto-height’ is enabled.
+   • Option ‘ement-room-compose-method’ chooses between
+     minibuffer-centric or compose-buffer-centric behaviour.
+   • Command ‘ement-room-dispatch-new-message’ starts writing a new
+     message using your chosen ‘ement-room-compose-method’.  (Bound to
+     ‘RET’ in room buffers.)
+   • Command ‘ement-room-dispatch-new-message-alt’ starts writing a new
+     message using the alternative method.  (Bound to ‘M-RET’ in room
+     buffers.)
+   • Command ‘ement-room-dispatch-edit-message’ edits a message using
+     your chosen ‘ement-room-compose-method’.  (Bound to ‘<insert>’ in
+     room buffers.)
+   • Command ‘ement-room-dispatch-reply-to-message’ replies to a message
+     using your chosen ‘ement-room-compose-method’.  (Bound to
+     ‘S-<return>’ in room buffers.)
+   • Command ‘ement-room-compose-edit’ edits a message using a compose
+     buffer.
+   • Command ‘ement-room-compose-reply’ replies to a message using a
+     compose buffer.
+   • Command ‘ement-room-compose-send-direct’ sends a message directly
+     from a compose buffer (without the minibuffer).  (Bound to ‘C-x
+     C-s’ in compose buffers.)
+   • Command ‘ement-room-compose-abort’ kills the compose buffer and
+     delete its window.  (Bound to ‘C-c C-k’ in compose buffers.)
+   • Command ‘ement-room-compose-abort-no-history’ does the same without
+     adding to ‘ement-room-message-history’.  (Equivalent to ‘C-u C-c
+     C-k’.)
+   • Command ‘ement-room-compose-history-prev-message’ cycles backwards
+     through ‘ement-room-message-history’.  (Bound to ‘M-p’ in compose
+     buffers.)
+   • Command ‘ement-room-compose-history-next-message’ cycles forwards
+     through ‘ement-room-message-history’.  (Bound to ‘M-n’ in compose
+     buffers.)
+   • Command ‘ement-room-compose-history-isearch-backward’ initiates an
+     isearch through ‘ement-room-message-history’.  (Bound to ‘M-r’ in
+     compose buffers; continue searching with ‘C-r’ or ‘C-s’.)
+   • Command ‘ement-room-compose-history-isearch-backward-regexp’
+     initiates a regexp isearch through ‘ement-room-message-history’.
+     (Bound to ‘C-M-r’ in compose buffers; continue searching with ‘C-r’
+     or ‘C-s’.)
+
+
+File: dochHjBey.info,  Node: ement-room-self-insert-mode,  Next: Image display,  Prev: Compose buffer enhancements,  Up: 015
+
+‘ement-room-self-insert-mode’
+-----------------------------
+
+   • Option ‘ement-room-self-insert-commands’ determines which commands
+     will start a new message when ‘ement-room-self-insert-mode’ is
+     enabled (defaulting to ‘self-insert-command’ and ‘yank’).
+   • Option ‘ement-room-self-insert-chars’ determines which typed
+     characters will start a new message when
+     ‘ement-room-self-insert-mode’ is enabled (regardless of whether
+     they are bound to ‘self-insert-command’).
+   • Option ‘ement-room-mode-map-prefix-key’ defines a prefix key for
+     accessing the full ‘ement-room-mode-map’ when
+     ‘ement-room-self-insert-mode’ is enabled.  (By default this key is
+     ‘DEL’.)
+
+
+File: dochHjBey.info,  Node: Image display,  Prev: ement-room-self-insert-mode,  Up: 015
+
+Image display
+-------------
+
+   • Option ‘ement-room-image-margin’ is the number of pixels of margin
+     around image thumbnails.
+   • Option ‘ement-room-image-relief’ is the number of pixels of shadow
+     rectangle around image thumbnails.
+   • Option ‘ement-room-image-thumbnail-height’ is the window body
+     height multiple to use when toggling full-sized images to
+     thumbnails (by default, 0.2).
+   • Option ‘ement-room-image-thumbnail-height-min’ is the minimum pixel
+     height for thumbnail images (by default, 30 pixels).
+
+
+File: dochHjBey.info,  Node: 014,  Next: 013,  Prev: 015,  Up: Changelog
+
+0.14
+====
+
+*Additions*
+
+   • Audio events are rendered as a link to the audio file.  (Thanks to
+     Arto Jantunen (https://github.com/viiru-).)
+   • Customization group ‘ement-room-list’.
+   • Option ‘ement-room-list-space-prefix’ is applied to space names in
+     the room list (e.g.  set to empty string for cleaner appearance).
+   • Option ‘ement-room-reaction-names-limit’ sets how many senders of a
+     reaction are shown in the buffer (more than that many are shown in
+     the tooltip).
+
+   *Changes*
+
+   • Bind ‘TAB’ / ‘BACKTAB’ to move between links in room and like
+     buffers.  (#113 (https://github.com/alphapapa/ement.el/issues/113).
+     Thanks to Eric S.  Fraga (https://github.com/ericsfraga) for
+     suggesting.)
+
+   *Fixes*
+
+   • Insertion of sender headers (when using "Elemental" message
+     format).  (Refactoring contributed by Steven Allen
+     (https://github.com/Stebalien).)
+   • Some room event data was being unintentionally serialized to disk
+     when caching the room list visibility state.  (#256
+     (https://github.com/alphapapa/ement.el/issues/256))
+   • Notifications buffer restores properly when bookmarked.
+   • Command ‘ement-room-send-reaction’ checks for an event at point.
+     (Thanks to Phil Sainty (https://github.com/phil-s).)
+
+
+File: dochHjBey.info,  Node: 013,  Next: 012,  Prev: 014,  Up: Changelog
+
+0.13
+====
+
+*Additions*
+
+   • Group joined direct rooms in directory buffers.
+   • Command ‘end-of-buffer’ is bound to ‘N’ in room buffers.
+
+   *Changes*
+
+   • Command ‘ement-room-image-show’ use frame parameters to maximize
+     the frame, making it easier for users to override.  (#223
+     (https://github.com/alphapapa/ement.el/issues/223).  Thanks to
+     Nicholas Vollmer (https://github.com/progfolio).)
+
+   *Fixes*
+
+   • Name for direct rooms in directory buffers.
+   • Editing a message from the compose buffer would be sent as a reply
+     to the edited message.  (Fixes #189
+     (https://github.com/alphapapa/ement.el/issues/189).  Thanks to Phil
+     Sainty (https://github.com/phil-s) for reporting.)
+   • Editing an already-edited message.  (#226
+     (https://github.com/alphapapa/ement.el/issues/226).  Thanks to Phil
+     Sainty (https://github.com/phil-s) for reporting.)
+   • Replying to an already-edited message.  (#227
+     (https://github.com/alphapapa/ement.el/issues/227).  Thanks to Phil
+     Sainty (https://github.com/phil-s) for reporting.)
+   • Rendering redactions of edited messages.  (#228
+     (https://github.com/alphapapa/ement.el/issues/228).  Thanks to Phil
+     Sainty (https://github.com/phil-s) for reporting.)
+   • Redacting an edited message.  (#228
+     (https://github.com/alphapapa/ement.el/issues/228).  Thanks to Phil
+     Sainty (https://github.com/phil-s) for reporting.)
+   • Command ‘ement-room-flush-colors’ maintains point position.
+
+
+File: dochHjBey.info,  Node: 012,  Next: 011,  Prev: 013,  Up: Changelog
+
+0.12
+====
+
+*Additions*
+
+   • Command ‘ement-notifications’ shows recent notifications, similar
+     to the pane in the Element client.  (This new command fetches
+     recent notifications from the server and allows scrolling up to
+     retrieve older ones.  Newly received notifications, as configured
+     in the ‘ement-notify’ options, are displayed in the same buffer.
+     This functionality will be consolidated in the future.)
+   • Face ‘ement-room-quote’, applied to quoted parts of replies.
+
+   *Changes*
+   • Commands ‘ement-room-goto-next’ and ‘ement-room-goto-prev’ work
+     more usefully at the end of a room buffer.  (Now pressing ‘n’ on
+     the last event moves point to the end of the buffer so it will
+     scroll automatically for new messages, and then pressing ‘p’ skips
+     over any read marker to the last event.)
+   • Room buffer bindings:
+        • ‘ement-room-goto-next’ and ‘ement-room-goto-prev’ are bound to
+          ‘n’ and ‘p’, respectively.
+        • ‘ement-room-goto-fully-read-marker’ is bound to ‘M-g M-p’ (the
+          mnemonic being "go to previously read").
+   • The quoted part of a reply now omits the face applied to the rest
+     of the message, helping to distinguish them.
+   • Commands that read a string from the minibuffer in ‘ement-room’
+     buffers and ‘ement-connect’ user ID prompts use separate history
+     list variables.
+   • Use Emacs’s Jansson-based JSON-parsing functions when available.
+     (This results in a 3-5x speed improvement for parsing JSON
+     responses, which can be significant for large initial sync
+     responses.  Thanks to Ryan Rix (https://github.com/rrix/) for
+     discovering this!)
+
+   *Fixes*
+
+   • File event formatter assumed that file size metadata would be
+     present (a malformed, e.g.  spam, event might not have it).
+   • Send correct file size when sending files/images.
+   • Underscores are no longer interpreted as denoting subscripts when
+     sending messages in Org format.  (Thanks to Phil Sainty
+     (https://github.com/phil-s).)
+   • Add workaround for ‘savehist-mode’’s serializing of the
+     ‘command-history’ variable’s arguments.  (For ‘ement-’ commands,
+     that may include large data structures, like ‘ement-session’
+     structs, which should never be serialized or reused, and
+     ‘savehist’’s doing so could cause noticeable delays for users who
+     enabled it).  (See #216
+     (https://github.com/alphapapa/ement.el/issues/216).  Thanks to Phil
+     Sainty (https://github.com/phil-s) and other users who helped to
+     discover this problem.)
+
+
+File: dochHjBey.info,  Node: 011,  Next: 010,  Prev: 012,  Up: Changelog
+
+0.11
+====
+
+*Additions*
+   • Commands ‘ement-room-image-show’ and ‘ement-room-image-scale’
+     (bound to ‘RET’ and ‘M-RET’ when point is at an image) view and
+     scale images.  (Thanks to Steven Allen
+     (https://github.com/Stebalien) for these and other image-related
+     improvements.)
+   • Command ‘ement-room-image-show-mouse’ is used to show an image with
+     the mouse.
+
+   *Changes*
+   • Enable ‘image-mode’ when showing images in a new buffer.  (Thanks
+     to Steven Allen (https://github.com/Stebalien).)
+   • Command ‘ement-room-image-show’ is not used for mouse events.
+   • Show useful message in SSO login page.
+
+   *Fixes*
+   • Allow editing of already-edited events.
+   • Push rules’ actions may be listed in any order.  (Fixes
+     compatibility with v1.7 of the spec
+     (https://spec.matrix.org/v1.7/client-server-api/#actions).  Thanks
+     to Steven Allen (https://github.com/Stebalien).)
+   • Call external browser for SSO login page.  (JavaScript is usually
+     required, which EWW doesn’t support, and loading the page twice
+     seems to change state on the server that causes the SSO login to
+     fail, so it’s best to load the page in the external browser
+     directly).
+   • Clean up SSO server process after two minutes in case SSO login
+     fails.
+   • Don’t stop syncing if an error is signaled while sending a
+     notification.
+   • Command ‘ement-room-list-next-unread’ could enter an infinite loop.
+     (Thanks to Visuwesh (https://github.com/vizs) and
+     ‘@mrtnmrtn:matrix.org’.)
+   • Events in notifications buffer could appear out-of-order.  (#191
+     (https://github.com/alphapapa/ement.el/issues/191).  Thanks to Phil
+     Sainty (https://github.com/phil-s).)
+
+   *Internal*
+   • The ‘ement-read-receipt-idle-timer’ could be duplicated when using
+     multiple sessions.  (#196
+     (https://github.com/alphapapa/ement.el/issues/196).  Thanks to Phil
+     Sainty (https://github.com/phil-s).)
+
+
+File: dochHjBey.info,  Node: 010,  Next: 093,  Prev: 011,  Up: Changelog
+
+0.10
+====
+
+*Security Fixes*
+   • When uploading a GPG-encrypted file (i.e.  one whose filename ends
+     in ‘.gpg’), if the recipient’s private key or the symmetric
+     encryption key were cached by Emacs (or a configured agent, like
+     ‘gpg-agent’), Emacs would automatically decrypt the file while
+     reading its contents and then upload the decrypted contents.  (This
+     happened because the function ‘insert-file-contents’ was used,
+     which does many things automatically, some of which are not even
+     mentioned in its docstring; refer to its entry in the Elisp Info
+     manual for details.  The fix is to use
+     ‘insert-file-contents-literally’ instead.)  Thanks to
+     ‘@welkinsl:matrix.org’ for reporting.
+
+   *Additions*
+   • Support for Single Sign-On (SSO) authentication.  (#24
+     (https://github.com/alphapapa/ement.el/issues/24).  Thanks to
+     Jeffrey Stoffers (https://github.com/Necronian) for development,
+     and to Phil Sainty (https://github.com/phil-s), Jakub Kadlčík
+     (https://github.com/FrostyX), and Juanjo Presa
+     (https://github.com/oneingan) for testing.)
+   • Bind ‘m’ in room buffers to ‘ement-room-mark-read’ (which moves
+     read markers to point).
+
+   *Changes*
+
+   • Activating a space in the room list uses ‘ement-view-space’ (which
+     shows a directory of rooms in the space) instead of
+     ‘ement-view-room’ (which shows events in the space, which is
+     generally not useful).
+   • Command ‘ement-view-room’, when used for a space, shows a footer
+     explaining that the buffer is showing a space rather than a normal
+     room, with a button to call ‘ement-view-space’ for it (which lists
+     rooms in the space).
+   • Command ‘ement-describe-room’ shows whether a room is a space or a
+     normal room.
+   • Command ‘ement-view-space’ shows the space’s name and alias.
+   • Command ‘ement-room-scroll-up-mark-read’ moves the fully read
+     marker to the top of the window (when the marker’s position is
+     within the range of known events), rather than only moving it when
+     at the end of the buffer.  (This eases the process of gradually
+     reading a long backlog of messages.)
+   • Improve readme export settings.
+
+   *Fixes*
+   • Extra indentation of some membership events.  (Thanks to Steven
+     Allen (https://github.com/Stebalien).)
+   • Customization group for faces.
+   • Don’t reinitialize ‘ement-room-list-mode’ when room list buffer is
+     refreshed.  (#146
+     (https://github.com/alphapapa/ement.el/issues/146).  Thanks to Ted
+     Reed (https://github.com/treed) for reporting.)
+   • Don’t fetch old events when scrolling to the bottom of a room
+     buffer (only when scrolling to the top).  (Thanks to Steven Allen
+     (https://github.com/Stebalien).)
+   • Minor improvements to auto-detection of homeserver URIs.  (See #24
+     (https://github.com/alphapapa/ement.el/issues/24#issuecomment-1569518713).
+     Thanks to Phil Sainty (https://github.com/phil-s).)
+   • Uploading of certain filetypes (e.g.  Emacs would decompress some
+     archives before uploading).  Thanks to ‘@welkinsl:matrix.org’ for
+     reporting.
+   • Messages edited multiple times sometimes weren’t correctly
+     replaced.
+
+
+File: dochHjBey.info,  Node: 093,  Next: 092,  Prev: 010,  Up: Changelog
+
+0.9.3
+=====
+
+*Fixes*
+   • Another attempt at restoring position in room list when refreshing.
+   • Command ‘ement-room-list-next-unread’.
+
+
+File: dochHjBey.info,  Node: 092,  Next: 091,  Prev: 093,  Up: Changelog
+
+0.9.2
+=====
+
+*Fixes*
+   • Restore position in room list when refreshing.
+   • Completion in minibuffer.
+
+
+File: dochHjBey.info,  Node: 091,  Next: 09,  Prev: 092,  Up: Changelog
+
+0.9.1
+=====
+
+*Fixes*
+   • Error in ‘ement-room-list’ command upon initial sync.
+
+
+File: dochHjBey.info,  Node: 09,  Next: 083,  Prev: 091,  Up: Changelog
+
+0.9
+===
+
+*Additions*
+
+   • Option ‘ement-room-timestamp-header-align’ controls how timestamp
+     headers are aligned in room buffers.
+   • Option ‘ement-room-view-hook’ runs functions when ‘ement-room-view’
+     is called.  (By default, it refreshes the room list buffer.)
+   • In the room list, middle-clicking a room which has a buffer closes
+     its buffer.
+   • Basic support for video events.  (Thanks to Arto Jantunen
+     (https://github.com/viiru-).)
+
+   *Changes*
+
+   • Using new option ‘ement-room-timestamp-header-align’, timestamp
+     headers default to right-aligned.  (With default settings, this
+     keeps them near message timestamps and makes for a cleaner
+     appearance.)
+
+   *Fixes*
+
+   • Recognition of certain MXID or displayname forms in outgoing
+     messages when linkifying (aka "pilling") them.
+   • Unreadable room avatar images no longer cause errors.  (Fixes #147
+     (https://github.com/alphapapa/ement.el/issues/147).  Thanks to
+     @jgarte (https://github.com/jgarte) for reporting.)
+   • Don’t error in ‘ement-room-list’ when no rooms are joined.  (Fixes
+     #123 (https://github.com/alphapapa/ement.el/issues/123).  Thanks to
+     @Kabouik (https://github.com/Kabouik) and Omar Antolín Camarena
+     (https://github.com/oantolin) for reporting.)
+   • Enable member/room completion in compose buffers.  (Fixes #115
+     (https://github.com/alphapapa/ement.el/issues/115).  Thanks to
+     Thanks to Justus Piater (https://github.com/piater) and Caleb Chase
+     (https://github.com/chasecaleb) for reporting.)
+
+
+File: dochHjBey.info,  Node: 083,  Next: 082,  Prev: 09,  Up: Changelog
+
+0.8.3
+=====
+
+*Fixes*
+
+   • Avoid use of ‘pcase’’s ‘(map :KEYWORD)’ form.  (This can cause a
+     broken installation on older versions of Emacs that have an older
+     version of the ‘map’ library loaded, such as Emacs 27.2 included in
+     Debian 11.  Since there’s no way to force Emacs to actually load
+     the version of ‘map’ required by this package before installing it
+     (which would naturally happen upon restarting Emacs), we can only
+     avoid using such forms while these versions of Emacs are widely
+     used.)
+
+
+File: dochHjBey.info,  Node: 082,  Next: 081,  Prev: 083,  Up: Changelog
+
+0.8.2
+=====
+
+*Fixes*
+
+   • Deduplicate grouped membership events.
+
+
+File: dochHjBey.info,  Node: 081,  Next: 08,  Prev: 082,  Up: Changelog
+
+0.8.1
+=====
+
+Added missing changelog entry (of course).
+
+
+File: dochHjBey.info,  Node: 08,  Next: 07,  Prev: 081,  Up: Changelog
+
+0.8
+===
+
+*Additions*
+   • Command ‘ement-create-space’ creates a new space.
+   • Command ‘ement-room-toggle-space’ toggles a room’s membership in a
+     space (a way to group rooms in Matrix).
+   • Visibility of sections in the room list is saved across sessions.
+   • Command ‘ement-room-list-kill-buffer’ kills a room’s buffer from
+     the room list.
+   • Set ‘device_id’ and ‘initial_device_display_name’ upon login (e.g.
+     ‘Ement.el: username@hostname’).  (#134
+     (https://github.com/alphapapa/ement.el/issues/134).  Thanks to Arto
+     Jantunen (https://github.com/viiru-) for reporting.)
+
+   *Changes*
+
+   • Room-related commands may be called interactively with a universal
+     prefix to prompt for the room/session (allowing to send events or
+     change settings in rooms other than the current one).
+   • Command ‘ement-room-list’ reuses an existing window showing the
+     room list when possible.  (#131
+     (https://github.com/alphapapa/ement.el/issues/131).  Thanks to Jeff
+     Bowman (https://github.com/jeffbowman) for suggesting.)
+   • Command ‘ement-tag-room’ toggles tags (rather than adding by
+     default and removing when called with a prefix).
+   • Default room grouping now groups "spaced" rooms separately.
+
+   *Fixes*
+
+   • Message format filter works properly when writing replies.
+   • Improve insertion of sender name headers when using the "Elemental"
+     message format.
+   • Prompts in commands ‘ement-leave-room’ and ‘ement-forget-room’.
+
+
+File: dochHjBey.info,  Node: 07,  Next: 06,  Prev: 08,  Up: Changelog
+
+0.7
+===
+
+*Additions*
+
+   • Command ‘ement-room-override-name’ sets a local override for a
+     room’s display name.  (Especially helpful for 1:1 rooms and bridged
+     rooms.  See MSC3015
+     (https://github.com/matrix-org/matrix-spec-proposals/pull/3015#issuecomment-1451017296).)
+
+   *Changes*
+
+   • Improve display of room tombstones (displayed at top and bottom of
+     buffer, and new room ID is linked to join).
+   • Use descriptive prompts in ‘ement-leave-room’ and
+     ‘ement-forget-room’ commands.
+
+   *Fixes*
+
+   • Command ‘ement-view-space’ when called from a room buffer.  (Thanks
+     to Richard Brežák (https://github.com/MagicRB) for reporting.)
+   • Don’t call ‘display-buffer’ when reverting room list buffer.
+     (Fixes #121 (https://github.com/alphapapa/ement.el/issues/121).
+     Thanks to mekeor (https://github.com/mekeor) for reporting.)
+   • Retry sync for network timeouts.  (Accidentally broken in v0.6.)
+
+   *Internal*
+
+   • Function ‘ement-put-account-data’ accepts ‘:room’ argument to put
+     on a room’s account data.
+
+
+File: dochHjBey.info,  Node: 06,  Next: 052,  Prev: 07,  Up: Changelog
+
+0.6
+===
+
+*Additions*
+   • Command ‘ement-view-space’ to view a space’s rooms in a directory
+     buffer.
+
+   *Changes*
+   • Improve ‘ement-describe-room’ command (formatting, bindings).
+
+   *Fixes*
+   • Retry sync for HTTP 502 "Bad Gateway" errors.
+   • Formatting of unban events.
+   • Update password authentication according to newer Matrix spec.
+     (Fixes compatibility with Conduit servers.  #66
+     (https://github.com/alphapapa/ement.el/issues/66).  Thanks to
+     Travis Peacock (https://github.com/tpeacock19), Arto Jantunen
+     (https://github.com/viiru-), and Stephen D
+     (https://github.com/scd31).)
+   • Image scaling issues.  (Thanks to Visuwesh
+     (https://github.com/vizs).)
+
+
+File: dochHjBey.info,  Node: 052,  Next: 051,  Prev: 06,  Up: Changelog
+
+0.5.2
+=====
+
+*Fixes*
+   • Apply ‘ement-initial-sync-timeout’ properly (important for when the
+     homeserver is slow to respond).
+
+
+File: dochHjBey.info,  Node: 051,  Next: 05,  Prev: 052,  Up: Changelog
+
+0.5.1
+=====
+
+*Fixes*
+   • Autoload ‘ement-directory’ commands.
+   • Faces in ‘ement-directory’ listings.
+
+
+File: dochHjBey.info,  Node: 05,  Next: 041,  Prev: 051,  Up: Changelog
+
+0.5
+===
+
+*Additions*
+   • Present "joined-and-left" and "rejoined-and-left" membership event
+     pairs as such.
+   • Process and show rooms’ canonical alias events.
+
+   *Changes*
+   • The taxy.el (https://github.com/alphapapa/taxy.el)-based room list,
+     with programmable, smart grouping, is now the default
+     ‘ement-room-list’.  (The old, ‘tabulated-list-mode’-based room list
+     is available as ‘ement-tabulated-room-list’.)
+   • When selecting a room to view with completion, don’t offer spaces.
+   • When selecting a room with completion, empty aliases and topics are
+     omitted instead of being displayed as nil.
+
+   *Fixes*
+   • Use of send-message filter when replying.
+   • Replies may be written in compose buffers.
+
+
+File: dochHjBey.info,  Node: 041,  Next: 04,  Prev: 05,  Up: Changelog
+
+0.4.1
+=====
+
+*Fixes*
+   • Don’t show "curl process interrupted" message when updating a read
+     marker’s position again.
+
+
+File: dochHjBey.info,  Node: 04,  Next: 031,  Prev: 041,  Up: Changelog
+
+0.4
+===
+
+*Additions*
+   • Option ‘ement-room-unread-only-counts-notifications’, now enabled
+     by default, causes rooms’ unread status to be determined only by
+     their notification counts (which are set by the server and depend
+     on rooms’ notification settings).
+   • Command ‘ement-room-set-notification-state’ sets a room’s
+     notification state (imitating Element’s user-friendly presets).
+   • Room buffers’ Transient menus show the room’s notification state
+     (imitating Element’s user-friendly presets).
+   • Command ‘ement-set-display-name’ sets the user’s global
+     displayname.
+   • Command ‘ement-room-set-display-name’ sets the user’s displayname
+     in a room (which is also now displayed in the room’s Transient
+     menu).
+   • Column ‘Notifications’ in the ‘ement-taxy-room-list’ buffer shows
+     rooms’ notification state.
+   • Option ‘ement-interrupted-sync-hook’ allows customization of how
+     sync interruptions are handled.  (Now, by default, a warning is
+     displayed instead of merely a message.)
+
+   *Changes*
+   • When a room’s read receipt is updated, the room’s buffer is also
+     marked as unmodified.  (In concert with the new option, this makes
+     rooms’ unread status more intuitive.)
+
+   *Fixes*
+   • Binding of command ‘ement-forget-room’ in room buffers.
+   • Highlighting of ‘@room’ mentions.
+
+
+File: dochHjBey.info,  Node: 031,  Next: 03,  Prev: 04,  Up: Changelog
+
+0.3.1
+=====
+
+*Fixes*
+   • Room unread status (when the last event in a room is sent by the
+     local user, the room is considered read).
+
+
+File: dochHjBey.info,  Node: 03,  Next: 021,  Prev: 031,  Up: Changelog
+
+0.3
+===
+
+*Additions*
+   • Command ‘ement-directory’ shows a server’s room directory.
+   • Command ‘ement-directory-search’ searches a server’s room
+     directory.
+   • Command ‘ement-directory-next’ fetches the next batch of rooms in a
+     directory.
+   • Command ‘ement-leave-room’ accepts a ‘FORCE-P’ argument
+     (interactively, with prefix) to leave a room without prompting.
+   • Command ‘ement-forget-room’ accepts a ‘FORCE-P’ argument
+     (interactively, with prefix) to also leave the room, and to forget
+     it without prompting.
+   • Option ‘ement-notify-mark-frame-urgent-predicates’ marks the frame
+     as urgent when (by default) a message mentions the local user or
+     "@room" and the message’s room has an open buffer.
+
+   *Changes*
+   • Minor improvements to date/time headers.
+
+   *Fixes*
+   • Command ‘ement-describe-room’ for rooms without topics.
+   • Improve insertion of old messages around existing timestamp
+     headers.
+   • Reduce D-Bus notification system check timeout to 2 seconds (from
+     the default of 25).
+   • Compatibility with Emacs 27.
+
+
+File: dochHjBey.info,  Node: 021,  Next: 02,  Prev: 03,  Up: Changelog
+
+0.2.1
+=====
+
+*Fixes*
+   • Info manual export filename.
+
+
+File: dochHjBey.info,  Node: 02,  Next: 014 (1),  Prev: 021,  Up: Changelog
+
+0.2
+===
+
+*Changes*
+   • Read receipts are re-enabled.  (They’re now implemented with a
+     global idle timer rather than ‘window-scroll-functions’, which
+     sometimes caused a strange race condition that could cause Emacs to
+     become unresponsive or crash.)
+   • When determining whether a room is considered unread, non-message
+     events like membership changes, reactions, etc.  are ignored.  This
+     fixes a bug that caused certain rooms that had no message events
+     (like some bridged rooms) to appear as unread when they shouldn’t
+     have.  But it’s unclear whether this is always preferable (e.g.
+     one might want a member leaving a room to cause it to be marked
+     unread), so this is classified as a change rather than simply a
+     fix, and more improvements may be made to this in the future.
+     (Fixes #97 (https://github.com/alphapapa/ement.el/issues/97).
+     Thanks to Julien Roy (https://github.com/MrRoy) for reporting and
+     testing.)
+   • The ‘ement-taxy-room-list’ view no longer automatically refreshes
+     the list if the region is active in the buffer.  (This allows the
+     user to operate on multiple rooms without the contents of the
+     buffer changing before completing the process.)
+
+   *Fixes*
+   • Links to only rooms (as opposed to links to events in rooms) may be
+     activated to join them.
+   • Read receipts mark the last completely visible event (rather than
+     one that’s only partially displayed).
+   • Prevent error when a room avatar image fails to load.
+
+
+File: dochHjBey.info,  Node: 014 (1),  Next: 013 (1),  Prev: 02,  Up: Changelog
+
+0.1.4
+=====
+
+*Fixed*
+   • Info manual directory headers.
+
+
+File: dochHjBey.info,  Node: 013 (1),  Next: 012 (1),  Prev: 014 (1),  Up: Changelog
+
+0.1.3
+=====
+
+*Fixed*
+
+   • Temporarily disable sending of read receipts due to an unusual bug
+     that could cause Emacs to become unresponsive.  (The feature will
+     be re-enabled in a future release.)
+
+
+File: dochHjBey.info,  Node: 012 (1),  Next: 011 (1),  Prev: 013 (1),  Up: Changelog
+
+0.1.2
+=====
+
+*Fixed*
+   • Function ‘ement-room-sync’ correctly updates room-list buffers.
+     (Thanks to Visuwesh (https://github.com/vizs).)
+   • Only send D-Bus notifications when supported.  (Fixes #83
+     (https://github.com/alphapapa/ement.el/issues/83).  Thanks to
+     Tassilo Horn (https://github.com/tsdh).)
+
+
+File: dochHjBey.info,  Node: 011 (1),  Next: 01,  Prev: 012 (1),  Up: Changelog
+
+0.1.1
+=====
+
+*Fixed*
+   • Function ‘ement-room-scroll-up-mark-read’ selects the correct room
+     window.
+   • Option ‘ement-room-list-avatars’ defaults to what function
+     ‘display-images-p’ returns.
+
+
+File: dochHjBey.info,  Node: 01,  Prev: 011 (1),  Up: Changelog
+
+0.1
+===
+
+After almost two years of development, the first tagged release.
+Submitted to GNU ELPA.
+
+
+File: dochHjBey.info,  Node: Development,  Next: License,  Prev: Changelog,  Up: Top
+
+4 Development
+*************
+
+Bug reports, feature requests, suggestions — _oh my_!
+
+* Menu:
+
+* Copyright Assignment::
+* Matrix spec in Org format::
+* Rationale::
+
+
+File: dochHjBey.info,  Node: Copyright Assignment,  Next: Matrix spec in Org format,  Up: Development
+
+Copyright Assignment
+====================
+
+Ement.el is published in GNU ELPA and is considered part of GNU Emacs.
+Therefore, cumulative contributions of more than 15 lines of code
+require that the author assign copyright of such contributions to the
+FSF.  Authors who are interested in doing so may contact assign@gnu.org
+<assign@gnu.org> to request the appropriate form.
+
+
+File: dochHjBey.info,  Node: Matrix spec in Org format,  Next: Rationale,  Prev: Copyright Assignment,  Up: Development
+
+Matrix spec in Org format
+=========================
+
+An Org-formatted version of the Matrix spec is available in the
+meta/spec (https://github.com/alphapapa/ement.el/tree/meta/spec) branch.
+
+
+File: dochHjBey.info,  Node: Rationale,  Prev: Matrix spec in Org format,  Up: Development
+
+Rationale
+=========
+
+_This section is preserved for posterity.  As it says, Ement.el has long
+since surpassed ‘matrix-client’, which should no longer be used._
+
+   Why write a new Emacs Matrix client when there is already
+matrix-client.el (https://github.com/alphapapa/matrix-client.el), by the
+same author, no less?  A few reasons:
+
+   • ‘matrix-client’ uses an older version of the Matrix spec, r0.3.0,
+     with a few elements of r0.4.0 grafted in.  Bringing it up to date
+     with the current version of the spec, r0.6.1, would be more work
+     than to begin with the current version.  Ement.el targets r0.6.1
+     from the beginning.
+   • ‘matrix-client’ does not use Matrix’s lazy-loading feature (which
+     was added to the specification later), so initial sync requests can
+     take a long time for the server to process and can be large
+     (sometimes tens of megabytes of JSON for the client to process!).
+     Ement.el uses lazy-loading, which significantly improves
+     performance.
+   • ‘matrix-client’ automatically makes buffers for every room a user
+     has joined, even if the user doesn’t currently want to watch a
+     room.  Ement.el opens room buffers on-demand, improving performance
+     by not having to insert events into buffers for rooms the user
+     isn’t watching.
+   • ‘matrix-client’ was developed without the intention of publishing
+     it to, e.g.  MELPA or ELPA.  It has several dependencies, and its
+     code does not always install or compile cleanly due to
+     macro-expansion issues (apparently depending on the user’s Emacs
+     config).  Ement.el is designed to have minimal dependencies outside
+     of Emacs (currently only one, ‘plz’, which could be imported into
+     the project), and every file is linted and compiles cleanly using
+     makem.sh (https://github.com/alphapapa/makem.sh).
+   • ‘matrix-client’ uses EIEIO, probably unnecessarily, since few, if
+     any, of the benefits of EIEIO are realized in it.  Ement.el uses
+     structs instead.
+   • ‘matrix-client’ uses bespoke code for inserting messages into
+     buffers, which works pretty well, but has a few minor bugs which
+     are difficult to track down.  Ement.el uses Emacs’s built-in (and
+     perhaps little-known) ‘ewoc’ library, which makes it much simpler
+     and more reliable to insert and update messages in buffers, and
+     enables the development of advanced UI features more easily.
+   • ‘matrix-client’ was, to a certain extent, designed to imitate other
+     messaging apps.  The result is, at least when used with the
+     ‘matrix-client-frame’ command, fairly pleasing to use, but isn’t
+     especially "Emacsy."  Ement.el is intended to better fit into
+     Emacs’s paradigms.
+   • ‘matrix-client’’s long name makes for long symbol names, which
+     makes for tedious, verbose code.  ‘ement’ is easy to type and makes
+     for concise, readable code.
+   • The author has learned much since writing ‘matrix-client’ and hopes
+     to write simpler, more readable, more maintainable code in
+     Ement.el.  It’s hoped that this will enable others to contribute
+     more easily.
+
+   Note that, while ‘matrix-client’ remains usable, and probably will
+for some time to come, Ement.el has now surpassed it in every way.  The
+only reason to choose ‘matrix-client’ instead is if one is using an
+older version of Emacs that isn’t supported by Ement.el.
+
+
+File: dochHjBey.info,  Node: License,  Prev: Development,  Up: Top
+
+5 License
+*********
+
+GPLv3
+
+
+
+Tag Table:
+Node: Top188
+Node: Installation1602
+Node: GNU ELPA1841
+Node: GNU Guix2366
+Node: Debian Ubuntu2613
+Node: Nix2962
+Node: Other distributions3284
+Node: Git master3562
+Node: Manual4619
+Node: Usage4907
+Node: Bindings7567
+Node: Room buffers8031
+Node: Room list buffer11033
+Node: Directory buffers11429
+Node: Mentions/notifications buffers11688
+Node: Tips12074
+Node: Displaying symbols and emojis15021
+Node: Encrypted room support through Pantalaimon15636
+Node: Changelog16192
+Node: 01716758
+Node: 01618826
+Node: 015121602
+Node: 01522173
+Node: Compose buffer enhancements26336
+Node: ement-room-self-insert-mode29722
+Node: Image display30603
+Node: 01431259
+Node: 01332659
+Node: 01234259
+Node: 01137017
+Node: 01039116
+Node: 09342504
+Node: 09242727
+Node: 09142912
+Node: 0943074
+Node: 08344742
+Node: 08245370
+Node: 08145515
+Node: 0845647
+Node: 0747273
+Node: 0648449
+Node: 05249246
+Node: 05149459
+Node: 0549652
+Node: 04150494
+Node: 0450698
+Node: 03152210
+Node: 0352425
+Node: 02153649
+Node: 0253781
+Node: 014 (1)55414
+Node: 013 (1)55557
+Node: 012 (1)55854
+Node: 011 (1)56270
+Node: 0156573
+Node: Development56738
+Node: Copyright Assignment56991
+Node: Matrix spec in Org format57469
+Node: Rationale57783
+Node: License61367
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/emacs-with-fully-read-line.png b/emacs/.emacs.d/elpa/ement-0.17/images/emacs-with-fully-read-line.png
new file mode 100644
index 0000000..59162b9
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/emacs-with-fully-read-line.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/ement-for-twim.png b/emacs/.emacs.d/elpa/ement-0.17/images/ement-for-twim.png
new file mode 100644
index 0000000..721022c
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/ement-for-twim.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/logo-128px.png b/emacs/.emacs.d/elpa/ement-0.17/images/logo-128px.png
new file mode 100644
index 0000000..2473763
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/logo-128px.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/logo.png b/emacs/.emacs.d/elpa/ement-0.17/images/logo.png
new file mode 100644
index 0000000..16a576d
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/logo.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/logo.svg b/emacs/.emacs.d/elpa/ement-0.17/images/logo.svg
new file mode 100644
index 0000000..5ccf740
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/images/logo.svg
@@ -0,0 +1,464 @@
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<svg
+   xmlns:dc="http://purl.org/dc/elements/1.1/"
+   xmlns:cc="http://creativecommons.org/ns#"
+   xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+   xmlns:svg="http://www.w3.org/2000/svg"
+   xmlns="http://www.w3.org/2000/svg"
+   xmlns:xlink="http://www.w3.org/1999/xlink"
+   xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
+   xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
+   xml:space="preserve"
+   id="svg4768"
+   viewBox="0.171 0.201 512 512"
+   height="48"
+   width="48"
+   version="1.0"
+   inkscape:version="0.48.4 r9939"
+   sodipodi:docname="logo.svg"
+   inkscape:export-filename="/home/me/src/emacs/ement.el/images/logo64.png"
+   inkscape:export-xdpi="120"
+   inkscape:export-ydpi="120"><sodipodi:namedview
+     pagecolor="#ffffff"
+     bordercolor="#666666"
+     borderopacity="1"
+     objecttolerance="10"
+     gridtolerance="10"
+     guidetolerance="10"
+     inkscape:pageopacity="0"
+     inkscape:pageshadow="2"
+     inkscape:window-width="1920"
+     inkscape:window-height="1173"
+     id="namedview72"
+     showgrid="false"
+     inkscape:zoom="6.9532167"
+     inkscape:cx="63.22113"
+     inkscape:cy="9.8428958"
+     inkscape:window-x="1920"
+     inkscape:window-y="6"
+     inkscape:window-maximized="1"
+     inkscape:current-layer="svg4768" /><metadata
+     id="metadata70"><rdf:RDF><cc:Work
+         rdf:about=""><dc:format>image/svg+xml</dc:format><dc:type
+           rdf:resource="http://purl.org/dc/dcmitype/StillImage" /><dc:title></dc:title></cc:Work></rdf:RDF></metadata><!-- Gnu Emacs Icon
+   Copyright (C) 2008-2017 Free Software Foundation, Inc.
+
+   Author: Nicolas Petton <nicolas@petton.fr>
+
+   This file is part of GNU Emacs.
+
+   GNU Emacs is free software: you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3 of the License, or
+   (at your option) any later version.
+
+   GNU Emacs is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
+
+--><!-- Created with Inkscape (http://www.inkscape.org/) --><defs
+     id="defs4770"><linearGradient
+       id="linearGradient3961"><stop
+         id="stop3963"
+         offset="0"
+         style="stop-color:#ffffff;stop-opacity:1;" /><stop
+         id="stop3965"
+         offset="1"
+         style="stop-color:#0dbd8b;stop-opacity:1;" /></linearGradient><linearGradient
+       id="linearGradient3874"><stop
+         offset="0"
+         style="stop-color:#000000;stop-opacity:1;"
+         id="stop3876" /><stop
+         id="stop3882"
+         style="stop-color:#000000;stop-opacity:1;"
+         offset="1" /></linearGradient><linearGradient
+       id="linearGradient3866"><stop
+         style="stop-color:#00ff18;stop-opacity:1;"
+         offset="0"
+         id="stop3868" /><stop
+         style="stop-color:#000000;stop-opacity:1;"
+         offset="1"
+         id="stop3870" /></linearGradient><linearGradient
+       id="linearGradient3817"><stop
+         id="stop3819"
+         style="stop-color:#00ff0a;stop-opacity:1;"
+         offset="0" /><stop
+         id="stop3823"
+         style="stop-color:#000000;stop-opacity:0.99215686;"
+         offset="1" /></linearGradient><linearGradient
+       id="linearGradient4292"><stop
+         id="stop4294"
+         offset="0"
+         style="stop-color:#411f5d;stop-opacity:1" /><stop
+         id="stop4296"
+         offset="1"
+         style="stop-color:#5b2a85;stop-opacity:1" /></linearGradient><linearGradient
+       id="linearGradient4284"><stop
+         offset="0"
+         style="stop-color:#8381c5;stop-opacity:1"
+         id="stop4286" /><stop
+         id="stop4290"
+         style="stop-color:#7e55b3;stop-opacity:0.99607843"
+         offset="0.56639391" /><stop
+         offset="1"
+         style="stop-color:#a52ecb;stop-opacity:0.99215686"
+         id="stop4288" /></linearGradient><linearGradient
+       id="linearGradient4898"><stop
+         id="stop4278"
+         style="stop-color:#bab8db;stop-opacity:1"
+         offset="0" /><stop
+         id="stop4280"
+         style="stop-color:#5955a9;stop-opacity:0.99159664"
+         offset="1" /></linearGradient><linearGradient
+       id="linearGradient3294"><stop
+         offset="0"
+         style="stop-color:#6376e6;stop-opacity:1"
+         id="stop3296" /><stop
+         offset="0.50094414"
+         style="stop-color:#222989;stop-opacity:1"
+         id="stop3302" /><stop
+         offset="1"
+         style="stop-color:#00003d;stop-opacity:1"
+         id="stop3298" /></linearGradient><linearGradient
+       id="linearGradient3284"><stop
+         offset="0"
+         style="stop-color:#000000;stop-opacity:1"
+         id="stop3286" /><stop
+         offset="0.84845906"
+         style="stop-color:#000000;stop-opacity:0.49803922"
+         id="stop3292" /><stop
+         offset="1"
+         style="stop-color:#000000;stop-opacity:0"
+         id="stop3288" /></linearGradient><linearGradient
+       id="linearGradient3274"><stop
+         offset="0"
+         style="stop-color:#000000;stop-opacity:1"
+         id="stop3276" /><stop
+         offset="1"
+         style="stop-color:#000000;stop-opacity:0"
+         id="stop3278" /></linearGradient><linearGradient
+       id="linearGradient3262"><stop
+         offset="0"
+         style="stop-color:#000000;stop-opacity:1"
+         id="stop3264" /><stop
+         offset="1"
+         style="stop-color:#000000;stop-opacity:0"
+         id="stop3266" /></linearGradient><linearGradient
+       id="linearGradient3242"><stop
+         offset="0"
+         style="stop-color:#282828;stop-opacity:1"
+         id="stop3244" /><stop
+         offset="0.39253417"
+         style="stop-color:#808080;stop-opacity:1"
+         id="stop3252" /><stop
+         offset="1"
+         style="stop-color:#d9d9d9;stop-opacity:1"
+         id="stop3246" /></linearGradient><linearGradient
+       id="linearGradient3202"><stop
+         offset="0"
+         style="stop-color:#2b2b2b;stop-opacity:1"
+         id="stop3204" /><stop
+         offset="0.5"
+         style="stop-color:#828383;stop-opacity:1"
+         id="stop3250" /><stop
+         offset="1"
+         style="stop-color:#dadbdb;stop-opacity:1"
+         id="stop3206" /></linearGradient><linearGradient
+       id="linearGradient4966"><stop
+         offset="0"
+         style="stop-color:#b6b3d8;stop-opacity:1"
+         id="stop4968" /><stop
+         offset="1"
+         style="stop-color:#b6b3d8;stop-opacity:0"
+         id="stop4970" /></linearGradient><linearGradient
+       id="linearGradient4938"><stop
+         offset="0"
+         style="stop-color:#000000;stop-opacity:1"
+         id="stop4940" /><stop
+         offset="1"
+         style="stop-color:#000000;stop-opacity:0"
+         id="stop4942" /></linearGradient><linearGradient
+       id="linearGradient4282"><stop
+         offset="0"
+         style="stop-color:#bab8db;stop-opacity:1"
+         id="stop4900" /><stop
+         offset="1"
+         style="stop-color:#5955a9;stop-opacity:0.99159664"
+         id="stop4902" /></linearGradient><linearGradient
+       id="linearGradient4876"><stop
+         offset="0"
+         style="stop-color:#d3d2e8;stop-opacity:1"
+         id="stop4878" /><stop
+         offset="1"
+         style="stop-color:#5955a9;stop-opacity:0.99159664"
+         id="stop4880" /></linearGradient><radialGradient
+       gradientTransform="matrix(0.6817439,0,0,0.5905355,-3.8523706,-28.935273)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient4898"
+       id="radialGradient4892"
+       fy="-108.96888"
+       fx="20.951529"
+       r="266.76535"
+       cy="-108.96888"
+       cx="20.951529" /><radialGradient
+       gradientTransform="matrix(1,0,0,0.1854103,0,383.88493)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient4938"
+       id="radialGradient4944"
+       fy="471.26172"
+       fx="233.8876"
+       r="170.49393"
+       cy="471.26172"
+       cx="233.8876" /><radialGradient
+       gradientTransform="matrix(1,0,0,0.9121621,0,32.654948)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient4966"
+       id="radialGradient4972"
+       fy="371.76376"
+       fx="299.70135"
+       r="76.696358"
+       cy="371.76376"
+       cx="299.70135" /><radialGradient
+       gradientTransform="matrix(0.414705,0.3300575,-0.5059004,0.6356454,346.95314,49.479585)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3202"
+       id="radialGradient3210"
+       fy="390.45248"
+       fx="289.44067"
+       r="17.67668"
+       cy="390.45248"
+       cx="289.44067" /><radialGradient
+       gradientTransform="matrix(0.414705,0.3300575,-0.5059004,0.6356454,448.41009,-65.398074)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3202"
+       id="radialGradient3238"
+       fy="382.14804"
+       fx="283.50717"
+       r="17.67668"
+       cy="382.14804"
+       cx="283.50717" /><radialGradient
+       gradientTransform="matrix(-6.5565014e-2,-5.9721765e-2,1.6871024,-1.8521705,171.90774,540.51473)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3242"
+       id="radialGradient3248"
+       fy="181.18982"
+       fx="418.45551"
+       r="63.068935"
+       cy="181.18982"
+       cx="418.45551" /><radialGradient
+       gradientTransform="matrix(0.4055116,-3.3440123e-2,0.1034174,4.3988695,177.23251,-1191.6649)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3262"
+       id="radialGradient3268"
+       fy="357.33591"
+       fx="354.51709"
+       r="33.712105"
+       cy="357.33591"
+       cx="354.51709" /><radialGradient
+       gradientTransform="matrix(-0.1339874,-0.1146812,0.3079048,-0.3597394,444.23592,395.03849)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3274"
+       id="radialGradient3280"
+       fy="223.55537"
+       fx="510.58469"
+       r="132.28336"
+       cy="223.55537"
+       cx="510.58469" /><radialGradient
+       gradientTransform="matrix(-1.2497569,1.3798305,-9.6289463e-2,-7.2974479e-2,674.3826,-70.590682)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3284"
+       id="radialGradient3290"
+       fy="-158.17821"
+       fx="284.4671"
+       r="110.2972"
+       cy="-158.17821"
+       cx="284.4671" /><radialGradient
+       gradientTransform="matrix(-0.1008165,-8.0872321e-2,1.0745309,-1.3395252,13.843287,784.79288)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3294"
+       id="radialGradient3300"
+       fy="356.62274"
+       fx="425.51019"
+       r="143.34167"
+       cy="356.62274"
+       cx="425.51019" /><filter
+       height="1.088351"
+       y="-0.044175496"
+       width="1.0892536"
+       x="-0.044626798"
+       id="filter4350"
+       style="color-interpolation-filters:sRGB"><feGaussianBlur
+         id="feGaussianBlur4352"
+         stdDeviation="8.7848425" /></filter><linearGradient
+       y2="300.73987"
+       x2="236.61363"
+       y1="-161.8512"
+       x1="-122.20192"
+       spreadMethod="pad"
+       gradientTransform="matrix(0.87385837,0,0,0.82818057,246.00762,250.28138)"
+       gradientUnits="userSpaceOnUse"
+       id="linearGradient4245"
+       xlink:href="#linearGradient3817" /><linearGradient
+       y2="66.018341"
+       x2="173.94518"
+       y1="396.6066"
+       x1="447.80933"
+       gradientTransform="matrix(0.98684959,0,0,0.98684959,3.0344187,2.5250397)"
+       gradientUnits="userSpaceOnUse"
+       id="linearGradient4247"
+       xlink:href="#linearGradient4292" /><radialGradient
+       inkscape:collect="always"
+       xlink:href="#linearGradient3961"
+       id="radialGradient3959"
+       cx="1136.9111"
+       cy="38.175797"
+       fx="1136.9111"
+       fy="38.175797"
+       r="233.11514"
+       gradientTransform="matrix(1,0,0,1.010216,-880.74005,217.63519)"
+       gradientUnits="userSpaceOnUse" /><radialGradient
+       inkscape:collect="always"
+       xlink:href="#linearGradient3961"
+       id="radialGradient3973"
+       cx="255.12297"
+       cy="256.89456"
+       fx="255.12297"
+       fy="256.89456"
+       r="239.78181"
+       gradientTransform="matrix(1,0,0,1.009932,0,-2.5514676)"
+       gradientUnits="userSpaceOnUse" /></defs><rect
+     style="fill:none;display:none"
+     id="rect4772"
+     y="0.20100001"
+     x="0.171"
+     height="512"
+     width="512" /><g
+     style="display:none"
+     id="g4788"><g
+       style="display:inline"
+       id="g4790" /></g><g
+     style="display:none"
+     id="g4806"><g
+       style="display:inline"
+       id="g4808"><path
+         style="fill:#050505;display:none"
+         id="path4810"
+         d="M 349.098,256.651 C 348.833,256.397 386.735,284.256 388.519,281.663 C 394.881,272.411 470.565,188.526 473.303,165.427 C 473.545,163.424 472.787,161.331 472.787,161.331 C 472.787,161.331 471.597,161.187 466.462,157.017 C 463.77,154.825 460.979,152.436 460.979,152.436 C 444.925,153.434 403.094,193.995 349.917,256.004" /></g></g><path
+     d="m 488.23812,256.89456 c 0,130.06121 -104.3692,235.49665 -233.1151,235.49665 -128.7459,0 -233.115201,-105.43544 -233.115201,-235.49665 0,-130.06123 104.369301,-235.49666 233.115201,-235.49666 128.7459,0 233.1151,105.43543 233.1151,235.49666 z"
+     id="path4235"
+     style="fill:url(#radialGradient3973);fill-opacity:1.0;stroke:#000000;stroke-width:13.33333301999999954;stroke-miterlimit:4;stroke-opacity:1;stroke-dasharray:none"
+     inkscape:connector-curvature="0" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.64471179;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -862.34934,-104.26336 c 0,-16.20664 13.138,-29.34464 29.34471,-29.34464 108.04422,0 195.63103,87.586807 195.63103,195.631095 0,16.206636 -13.138,29.344642 -29.34464,29.344642 -16.20664,0 -29.34464,-13.138006 -29.34464,-29.344642 0,-75.631014 -61.3108,-136.941754 -136.94175,-136.941754 -16.20671,0 -29.34471,-13.138067 -29.34471,-29.344701 z"
+     id="path4" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.64471179;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -725.40758,326.12504 c 0,16.20664 -13.13801,29.34464 -29.34464,29.34464 -108.04429,0 -195.63112,-87.58681 -195.63112,-195.63103 0,-16.20664 13.138,-29.34471 29.3447,-29.34471 16.2066,0 29.3447,13.13807 29.3447,29.34471 0,75.63095 61.3107,136.94175 136.94172,136.94175 16.20663,0 29.34464,13.138 29.34464,29.34464 z"
+     id="path6" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.64471179;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -1009.0726,179.40172 c -16.2067,0 -29.3447,-13.13801 -29.3447,-29.34464 0,-108.044293 87.58676,-195.631101 195.6311,-195.631101 16.20663,0 29.34464,13.138002 29.34464,29.344639 0,16.20663681 -13.13801,29.344702 -29.34464,29.344702 -75.63104,0 -136.94174,61.310741 -136.94174,136.94176 0,16.20663 -13.1381,29.34464 -29.34466,29.34464 z"
+     id="path8" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.64471179;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -578.68426,42.459959 c 16.20664,0 29.34464,13.138002 29.34464,29.344639 0,108.044292 -87.58681,195.631102 -195.63103,195.631102 -16.20664,0 -29.34471,-13.138 -29.34471,-29.34464 0,-16.20664 13.13807,-29.34464 29.34471,-29.34464 75.63095,0 136.94175,-61.3108 136.94175,-136.941822 0,-16.206637 13.138,-29.344639 29.34464,-29.344639 z"
+     id="path10" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.23561016;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -258.96103,188.38006 c -5.92272,0 -10.72401,-4.80129 -10.72401,-10.72404 0,-39.48479 32.00863,-71.49343 71.49346,-71.49343 5.92272,0 10.72401,4.80129 10.72401,10.72401 0,5.92273 -4.80129,10.72401 -10.72401,10.72401 -27.63938,0 -50.04542,22.40606 -50.04542,50.04541 0,5.92275 -4.80131,10.72404 -10.72403,10.72404 z"
+     id="path4-3" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.23561016;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -187.33996,241.78363 c 0,5.92274 -4.80129,10.72402 -10.72401,10.72402 -39.48482,0 -71.49346,-32.00861 -71.49346,-71.49346 0,-5.92272 4.80129,-10.72401 10.72401,-10.72401 5.92273,0 10.72403,4.80129 10.72403,10.72401 0,27.63939 22.40604,50.04541 50.04542,50.04541 5.92272,0 10.72401,4.80133 10.72401,10.72402 z"
+     id="path8-7" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.23561016;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -258.74453,313.27152 c -5.92272,0 -10.72401,-4.80129 -10.72401,-10.72401 0,-39.48483 32.00863,-71.49347 71.49344,-71.49347 5.92272,0 10.72403,4.80129 10.72403,10.72401 0,5.92273 -4.80131,10.72402 -10.72403,10.72402 -27.63937,0 -50.04542,22.40605 -50.04542,50.04544 0,5.92272 -4.80129,10.72401 -10.72401,10.72401 z"
+     id="path10-5" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.23561016;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -187.12346,367.23573 c 0,5.92272 -4.80128,10.724 -10.72401,10.724 -39.48482,0 -71.49346,-32.00863 -71.49346,-71.49343 0,-5.92272 4.80129,-10.72403 10.72403,-10.72403 5.92271,0 10.72404,4.80131 10.72404,10.72403 0,27.63936 22.40601,50.04542 50.04539,50.04542 5.92273,0 10.72401,4.80128 10.72401,10.72401 z"
+     id="path6-6" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.29136932;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m 629.26349,134.49819 c -5.17912,5.17913 -13.57608,5.17911 -18.75524,-3e-5 -34.52746,-34.527469 -34.52746,-90.507338 4e-5,-125.0348349 5.17912,-5.1791201 13.57609,-5.1791215 18.75521,2.1e-6 5.17912,5.1791198 5.1791,13.5760858 -10e-6,18.7551968 -24.16926,24.16926 -24.16922,63.355176 0,87.524396 5.17914,5.17914 5.17912,13.57614 0,18.75527 z"
+     id="path4-3-3" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.41281462;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m 740.87146,587.17776 c -10.37726,0 -18.78964,-8.41245 -18.78964,-18.78967 0,-69.18171 56.08261,-125.26432 125.26429,-125.26432 10.37724,0 18.78967,8.41239 18.78967,18.78963 0,10.37726 -8.41243,18.78964 -18.78967,18.78964 -48.42717,0 -87.68502,39.25785 -87.68502,87.68505 0,10.37722 -8.41238,18.78967 -18.78963,18.78967 z"
+     id="path10-5-6" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.29136932;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m 630.7519,243.88245 c -5.17914,5.17911 -13.5761,5.17911 -18.75523,0 -34.52748,-34.52751 -34.5275,-90.50737 0,-125.03487 5.17912,-5.1791 13.57607,-5.17908 18.75518,3e-5 5.17917,5.17907 5.17918,13.57606 5e-5,18.75519 -24.16926,24.16926 -24.16924,63.35515 2e-5,87.5244 5.17912,5.17912 5.17907,13.57615 -2e-5,18.75518 z"
+     id="path8-7-5" /><g
+     id="g3921"
+     transform="matrix(1.2623093,0,0,1.2623093,-22.620675,-167.67864)"><path
+       id="path4-9"
+       d="m -567.88395,525.90207 c 0,-8.09524 6.56246,-14.6577 14.65773,-14.6577 53.96826,0 97.71801,43.74975 97.71801,97.71804 0,8.09524 -6.56246,14.65769 -14.65769,14.65769 -8.09525,0 -14.6577,-6.56245 -14.6577,-14.65769 0,-37.7778 -30.62484,-68.40262 -68.40262,-68.40262 -8.09527,0 -14.65773,-6.56248 -14.65773,-14.65772 z"
+       clip-rule="evenodd"
+       inkscape:connector-curvature="0"
+       style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.32203454;stroke-opacity:1" /><path
+       id="path6-1"
+       d="m -499.48133,740.88175 c 0,8.09524 -6.56245,14.65768 -14.65769,14.65768 -53.96829,0 -97.71805,-43.74974 -97.71805,-97.718 0,-8.09524 6.56246,-14.65772 14.65772,-14.65772 8.09523,0 14.65773,6.56248 14.65773,14.65772 0,37.77778 30.62479,68.40262 68.4026,68.40262 8.09524,0 14.65769,6.56245 14.65769,14.6577 z"
+       clip-rule="evenodd"
+       inkscape:connector-curvature="0"
+       style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.32203454;stroke-opacity:1" /><path
+       id="path8-2"
+       d="m -641.17244,667.59321 c -8.09527,0 -14.65773,-6.56245 -14.65773,-14.65769 0,-53.96829 43.74973,-97.71804 97.71804,-97.71804 8.09524,0 14.6577,6.56246 14.6577,14.6577 0,8.09524 -6.56246,14.65772 -14.6577,14.65772 -37.77782,0 -68.40261,30.62481 -68.40261,68.40262 0,8.09524 -6.5625,14.65769 -14.6577,14.65769 z"
+       clip-rule="evenodd"
+       inkscape:connector-curvature="0"
+       style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.32203454;stroke-opacity:1" /><path
+       id="path10-7"
+       d="m -426.19279,599.19059 c 8.09524,0 14.65769,6.56246 14.65769,14.65769 0,53.9683 -43.74975,97.71805 -97.71801,97.71805 -8.09524,0 -14.65772,-6.56246 -14.65772,-14.65769 0,-8.09525 6.56248,-14.6577 14.65772,-14.6577 37.77778,0 68.40262,-30.62484 68.40262,-68.40266 0,-8.09523 6.56245,-14.65769 14.6577,-14.65769 z"
+       clip-rule="evenodd"
+       inkscape:connector-curvature="0"
+       style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.32203454;stroke-opacity:1" /></g><path
+     d="m 168.87017,369.7941 c 0,0 13.23506,0.93627 30.26137,-0.56431 6.89523,-0.60768 33.07453,-3.17912 52.64715,-7.47152 0,0 23.86373,-5.10715 36.63057,-9.81197 13.35843,-4.92285 20.62761,-9.10098 23.89954,-15.02127 -0.14269,-1.21302 1.00739,-5.51461 -5.15294,-8.09846 -15.74964,-6.60595 -34.01548,-5.41108 -70.15906,-6.1774 -40.0818,-1.37718 -53.41542,-8.08627 -60.51817,-13.48977 -6.81108,-5.48163 -3.38613,-20.64701 25.79772,-34.00541 14.70074,-7.11354 72.32932,-20.24098 72.32932,-20.24098 -19.40827,-9.59329 -55.59858,-26.458 -63.03787,-30.09979 -6.52468,-3.19401 -16.96616,-8.00329 -19.2295,-13.82188 -2.56614,-5.58603 6.06036,-10.39793 10.87905,-11.77591 15.51905,-4.47641 37.42722,-7.25864 57.3662,-7.571 10.0224,-0.15701 11.64921,-0.80185 11.64921,-0.80185 13.82901,-2.29394 22.93273,-11.75538 19.13973,-26.73949 -3.40511,-15.29487 -21.36391,-24.28197 -38.43005,-21.17074 -16.07116,2.92988 -54.80683,14.18154 -54.80683,14.18154 47.88016,-0.4144 55.89402,0.38474 59.47311,5.38881 2.11368,2.95526 -0.96045,7.00739 -13.7299,9.09291 -13.90189,2.27049 -42.80009,5.00476 -42.80009,5.00476 -27.72258,1.6464 -47.25033,1.75659 -53.10719,14.15679 -3.82632,8.10119 4.08038,15.26323 7.5459,19.74633 14.64462,16.28629 35.79785,25.06993 49.41383,31.53826 5.12311,2.43375 20.15489,7.02978 20.15489,7.02978 -44.17265,-2.42953 -76.03716,11.13432 -94.72864,26.75121 -21.14069,19.55411 -11.78868,42.86201 31.52274,57.21332 25.58149,8.47645 38.26825,12.46292 76.42687,9.02676 22.47583,-1.21144 26.01893,-0.49052 26.24301,1.35373 0.31548,2.59652 -24.96418,9.04641 -31.86578,11.03716 -17.55777,5.06447 -63.5838,15.29078 -63.81419,15.34039 z"
+     id="path4237"
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-opacity:1;stroke-width:2.13333333000000014;stroke-miterlimit:4;stroke-dasharray:none"
+     inkscape:connector-curvature="0" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.29136932;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m 741.14237,231.14899 c 5.17911,5.17911 5.17911,13.5761 0,18.75521 -34.5275,34.52749 -90.50738,34.5275 -125.03484,5e-5 -5.17911,-5.17912 -5.17915,-13.57613 -10e-6,-18.75527 5.17911,-5.17911 13.57615,-5.1791 18.75525,1e-5 24.16922,24.16921 63.35516,24.16927 87.5244,2e-5 5.17913,-5.17912 13.57606,-5.17915 18.7552,-2e-5 z"
+     id="path6-6-2" /><text
+     xml:space="preserve"
+     style="font-size:237.56724547999996844px;font-style:normal;font-variant:normal;font-weight:normal;font-stretch:normal;text-align:start;line-height:125%;letter-spacing:0px;word-spacing:0px;writing-mode:lr-tb;text-anchor:start;fill:#ffffff;fill-opacity:1;stroke:#0dbd8b;font-family:Hack;-inkscape-font-specification:Hack;stroke-opacity:1;stroke-width:2.13333333000000014;stroke-miterlimit:4;stroke-dasharray:none"
+     x="295.67422"
+     y="342.85031"
+     id="text3927"
+     sodipodi:linespacing="125%"
+     transform="scale(0.97330289,1.0274294)"><tspan
+       sodipodi:role="line"
+       id="tspan3929"
+       x="295.67422"
+       y="342.85031"
+       style="font-size:237.56724547999996844px;font-style:normal;font-variant:normal;font-weight:normal;font-stretch:normal;text-align:start;line-height:125%;writing-mode:lr-tb;text-anchor:start;font-family:Hack;-inkscape-font-specification:Hack;stroke:#0dbd8b;stroke-opacity:1;stroke-width:2.13333333000000014;stroke-miterlimit:4;stroke-dasharray:none">l</tspan></text>
+<text
+     xml:space="preserve"
+     style="font-size:138.19949341000000231px;font-style:normal;font-variant:normal;font-weight:normal;font-stretch:normal;text-align:start;line-height:125%;letter-spacing:0px;word-spacing:0px;writing-mode:lr-tb;text-anchor:start;fill:#ffffff;fill-opacity:1;stroke:#0dbd8b;font-family:Hack;-inkscape-font-specification:Hack;stroke-opacity:1;stroke-width:2.13333333000000014;stroke-miterlimit:4;stroke-dasharray:none"
+     x="76.662376"
+     y="367.39389"
+     id="text3931"
+     sodipodi:linespacing="125%"><tspan
+       sodipodi:role="line"
+       id="tspan3933"
+       x="76.662376"
+       y="367.39389">.</tspan></text>
+</svg>
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/logo2.svg b/emacs/.emacs.d/elpa/ement-0.17/images/logo2.svg
new file mode 100644
index 0000000..fb0dfef
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/images/logo2.svg
@@ -0,0 +1,489 @@
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<svg
+   xmlns:dc="http://purl.org/dc/elements/1.1/"
+   xmlns:cc="http://creativecommons.org/ns#"
+   xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
+   xmlns:svg="http://www.w3.org/2000/svg"
+   xmlns="http://www.w3.org/2000/svg"
+   xmlns:xlink="http://www.w3.org/1999/xlink"
+   xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
+   xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
+   xml:space="preserve"
+   id="svg4768"
+   viewBox="0.171 0.201 512 512"
+   height="48"
+   width="48"
+   version="1.0"
+   inkscape:version="0.48.4 r9939"
+   sodipodi:docname="logo2.svg"
+   inkscape:export-filename="/home/me/src/emacs/ement.el/images/logo-128px.png"
+   inkscape:export-xdpi="240"
+   inkscape:export-ydpi="240"><sodipodi:namedview
+     pagecolor="#ffffff"
+     bordercolor="#666666"
+     borderopacity="1"
+     objecttolerance="10"
+     gridtolerance="10"
+     guidetolerance="10"
+     inkscape:pageopacity="0"
+     inkscape:pageshadow="2"
+     inkscape:window-width="1920"
+     inkscape:window-height="1173"
+     id="namedview72"
+     showgrid="false"
+     inkscape:zoom="4.9166667"
+     inkscape:cx="-8.3796227"
+     inkscape:cy="-20.646658"
+     inkscape:window-x="1920"
+     inkscape:window-y="6"
+     inkscape:window-maximized="1"
+     inkscape:current-layer="svg4768" /><metadata
+     id="metadata70"><rdf:RDF><cc:Work
+         rdf:about=""><dc:format>image/svg+xml</dc:format><dc:type
+           rdf:resource="http://purl.org/dc/dcmitype/StillImage" /><dc:title></dc:title></cc:Work></rdf:RDF></metadata><!-- Gnu Emacs Icon
+   Copyright (C) 2008-2017 Free Software Foundation, Inc.
+
+   Author: Nicolas Petton <nicolas@petton.fr>
+
+   This file is part of GNU Emacs.
+
+   GNU Emacs is free software: you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3 of the License, or
+   (at your option) any later version.
+
+   GNU Emacs is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
+
+--><!-- Created with Inkscape (http://www.inkscape.org/) --><defs
+     id="defs4770"><linearGradient
+       id="linearGradient3961"><stop
+         id="stop3963"
+         offset="0"
+         style="stop-color:#ffffff;stop-opacity:1;" /><stop
+         id="stop3965"
+         offset="1"
+         style="stop-color:#0dbd8b;stop-opacity:1;" /></linearGradient><linearGradient
+       id="linearGradient3874"><stop
+         offset="0"
+         style="stop-color:#000000;stop-opacity:1;"
+         id="stop3876" /><stop
+         id="stop3882"
+         style="stop-color:#000000;stop-opacity:1;"
+         offset="1" /></linearGradient><linearGradient
+       id="linearGradient3866"><stop
+         style="stop-color:#00ff18;stop-opacity:1;"
+         offset="0"
+         id="stop3868" /><stop
+         style="stop-color:#000000;stop-opacity:1;"
+         offset="1"
+         id="stop3870" /></linearGradient><linearGradient
+       id="linearGradient3817"><stop
+         id="stop3819"
+         style="stop-color:#00ff0a;stop-opacity:1;"
+         offset="0" /><stop
+         id="stop3823"
+         style="stop-color:#000000;stop-opacity:0.99215686;"
+         offset="1" /></linearGradient><linearGradient
+       id="linearGradient4292"><stop
+         id="stop4294"
+         offset="0"
+         style="stop-color:#411f5d;stop-opacity:1" /><stop
+         id="stop4296"
+         offset="1"
+         style="stop-color:#5b2a85;stop-opacity:1" /></linearGradient><linearGradient
+       id="linearGradient4284"><stop
+         offset="0"
+         style="stop-color:#8381c5;stop-opacity:1"
+         id="stop4286" /><stop
+         id="stop4290"
+         style="stop-color:#7e55b3;stop-opacity:0.99607843"
+         offset="0.56639391" /><stop
+         offset="1"
+         style="stop-color:#a52ecb;stop-opacity:0.99215686"
+         id="stop4288" /></linearGradient><linearGradient
+       id="linearGradient4898"><stop
+         id="stop4278"
+         style="stop-color:#bab8db;stop-opacity:1"
+         offset="0" /><stop
+         id="stop4280"
+         style="stop-color:#5955a9;stop-opacity:0.99159664"
+         offset="1" /></linearGradient><linearGradient
+       id="linearGradient3294"><stop
+         offset="0"
+         style="stop-color:#6376e6;stop-opacity:1"
+         id="stop3296" /><stop
+         offset="0.50094414"
+         style="stop-color:#222989;stop-opacity:1"
+         id="stop3302" /><stop
+         offset="1"
+         style="stop-color:#00003d;stop-opacity:1"
+         id="stop3298" /></linearGradient><linearGradient
+       id="linearGradient3284"><stop
+         offset="0"
+         style="stop-color:#000000;stop-opacity:1"
+         id="stop3286" /><stop
+         offset="0.84845906"
+         style="stop-color:#000000;stop-opacity:0.49803922"
+         id="stop3292" /><stop
+         offset="1"
+         style="stop-color:#000000;stop-opacity:0"
+         id="stop3288" /></linearGradient><linearGradient
+       id="linearGradient3274"><stop
+         offset="0"
+         style="stop-color:#000000;stop-opacity:1"
+         id="stop3276" /><stop
+         offset="1"
+         style="stop-color:#000000;stop-opacity:0"
+         id="stop3278" /></linearGradient><linearGradient
+       id="linearGradient3262"><stop
+         offset="0"
+         style="stop-color:#000000;stop-opacity:1"
+         id="stop3264" /><stop
+         offset="1"
+         style="stop-color:#000000;stop-opacity:0"
+         id="stop3266" /></linearGradient><linearGradient
+       id="linearGradient3242"><stop
+         offset="0"
+         style="stop-color:#282828;stop-opacity:1"
+         id="stop3244" /><stop
+         offset="0.39253417"
+         style="stop-color:#808080;stop-opacity:1"
+         id="stop3252" /><stop
+         offset="1"
+         style="stop-color:#d9d9d9;stop-opacity:1"
+         id="stop3246" /></linearGradient><linearGradient
+       id="linearGradient3202"><stop
+         offset="0"
+         style="stop-color:#2b2b2b;stop-opacity:1"
+         id="stop3204" /><stop
+         offset="0.5"
+         style="stop-color:#828383;stop-opacity:1"
+         id="stop3250" /><stop
+         offset="1"
+         style="stop-color:#dadbdb;stop-opacity:1"
+         id="stop3206" /></linearGradient><linearGradient
+       id="linearGradient4966"><stop
+         offset="0"
+         style="stop-color:#b6b3d8;stop-opacity:1"
+         id="stop4968" /><stop
+         offset="1"
+         style="stop-color:#b6b3d8;stop-opacity:0"
+         id="stop4970" /></linearGradient><linearGradient
+       id="linearGradient4938"><stop
+         offset="0"
+         style="stop-color:#000000;stop-opacity:1"
+         id="stop4940" /><stop
+         offset="1"
+         style="stop-color:#000000;stop-opacity:0"
+         id="stop4942" /></linearGradient><linearGradient
+       id="linearGradient4282"><stop
+         offset="0"
+         style="stop-color:#bab8db;stop-opacity:1"
+         id="stop4900" /><stop
+         offset="1"
+         style="stop-color:#5955a9;stop-opacity:0.99159664"
+         id="stop4902" /></linearGradient><linearGradient
+       id="linearGradient4876"><stop
+         offset="0"
+         style="stop-color:#d3d2e8;stop-opacity:1"
+         id="stop4878" /><stop
+         offset="1"
+         style="stop-color:#5955a9;stop-opacity:0.99159664"
+         id="stop4880" /></linearGradient><radialGradient
+       gradientTransform="matrix(0.6817439,0,0,0.5905355,-3.8523706,-28.935273)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient4898"
+       id="radialGradient4892"
+       fy="-108.96888"
+       fx="20.951529"
+       r="266.76535"
+       cy="-108.96888"
+       cx="20.951529" /><radialGradient
+       gradientTransform="matrix(1,0,0,0.1854103,0,383.88493)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient4938"
+       id="radialGradient4944"
+       fy="471.26172"
+       fx="233.8876"
+       r="170.49393"
+       cy="471.26172"
+       cx="233.8876" /><radialGradient
+       gradientTransform="matrix(1,0,0,0.9121621,0,32.654948)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient4966"
+       id="radialGradient4972"
+       fy="371.76376"
+       fx="299.70135"
+       r="76.696358"
+       cy="371.76376"
+       cx="299.70135" /><radialGradient
+       gradientTransform="matrix(0.414705,0.3300575,-0.5059004,0.6356454,346.95314,49.479585)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3202"
+       id="radialGradient3210"
+       fy="390.45248"
+       fx="289.44067"
+       r="17.67668"
+       cy="390.45248"
+       cx="289.44067" /><radialGradient
+       gradientTransform="matrix(0.414705,0.3300575,-0.5059004,0.6356454,448.41009,-65.398074)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3202"
+       id="radialGradient3238"
+       fy="382.14804"
+       fx="283.50717"
+       r="17.67668"
+       cy="382.14804"
+       cx="283.50717" /><radialGradient
+       gradientTransform="matrix(-6.5565014e-2,-5.9721765e-2,1.6871024,-1.8521705,171.90774,540.51473)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3242"
+       id="radialGradient3248"
+       fy="181.18982"
+       fx="418.45551"
+       r="63.068935"
+       cy="181.18982"
+       cx="418.45551" /><radialGradient
+       gradientTransform="matrix(0.4055116,-3.3440123e-2,0.1034174,4.3988695,177.23251,-1191.6649)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3262"
+       id="radialGradient3268"
+       fy="357.33591"
+       fx="354.51709"
+       r="33.712105"
+       cy="357.33591"
+       cx="354.51709" /><radialGradient
+       gradientTransform="matrix(-0.1339874,-0.1146812,0.3079048,-0.3597394,444.23592,395.03849)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3274"
+       id="radialGradient3280"
+       fy="223.55537"
+       fx="510.58469"
+       r="132.28336"
+       cy="223.55537"
+       cx="510.58469" /><radialGradient
+       gradientTransform="matrix(-1.2497569,1.3798305,-9.6289463e-2,-7.2974479e-2,674.3826,-70.590682)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3284"
+       id="radialGradient3290"
+       fy="-158.17821"
+       fx="284.4671"
+       r="110.2972"
+       cy="-158.17821"
+       cx="284.4671" /><radialGradient
+       gradientTransform="matrix(-0.1008165,-8.0872321e-2,1.0745309,-1.3395252,13.843287,784.79288)"
+       gradientUnits="userSpaceOnUse"
+       xlink:href="#linearGradient3294"
+       id="radialGradient3300"
+       fy="356.62274"
+       fx="425.51019"
+       r="143.34167"
+       cy="356.62274"
+       cx="425.51019" /><filter
+       height="1.088351"
+       y="-0.044175496"
+       width="1.0892536"
+       x="-0.044626798"
+       id="filter4350"
+       style="color-interpolation-filters:sRGB"><feGaussianBlur
+         id="feGaussianBlur4352"
+         stdDeviation="8.7848425" /></filter><linearGradient
+       y2="300.73987"
+       x2="236.61363"
+       y1="-161.8512"
+       x1="-122.20192"
+       spreadMethod="pad"
+       gradientTransform="matrix(0.87385837,0,0,0.82818057,246.00762,250.28138)"
+       gradientUnits="userSpaceOnUse"
+       id="linearGradient4245"
+       xlink:href="#linearGradient3817" /><linearGradient
+       y2="66.018341"
+       x2="173.94518"
+       y1="396.6066"
+       x1="447.80933"
+       gradientTransform="matrix(0.98684959,0,0,0.98684959,3.0344187,2.5250397)"
+       gradientUnits="userSpaceOnUse"
+       id="linearGradient4247"
+       xlink:href="#linearGradient4292" /><radialGradient
+       inkscape:collect="always"
+       xlink:href="#linearGradient3961"
+       id="radialGradient3959"
+       cx="1136.9111"
+       cy="38.175797"
+       fx="1136.9111"
+       fy="38.175797"
+       r="233.11514"
+       gradientTransform="matrix(1,0,0,1.010216,-880.74005,217.63519)"
+       gradientUnits="userSpaceOnUse" /><filter
+       inkscape:collect="always"
+       id="filter3894"><feGaussianBlur
+         inkscape:collect="always"
+         stdDeviation="7.6798908"
+         id="feGaussianBlur3896" /></filter><filter
+       color-interpolation-filters="sRGB"
+       inkscape:collect="always"
+       id="filter3894-3"><feGaussianBlur
+         inkscape:collect="always"
+         stdDeviation="7.6798908"
+         id="feGaussianBlur3896-1" /></filter></defs><rect
+     style="fill:none;display:none"
+     id="rect4772"
+     y="0.20100001"
+     x="0.171"
+     height="512"
+     width="512" /><g
+     style="display:none"
+     id="g4788"><g
+       style="display:inline"
+       id="g4790" /></g><g
+     style="display:none"
+     id="g4806"><g
+       style="display:inline"
+       id="g4808"><path
+         style="fill:#050505;display:none"
+         id="path4810"
+         d="M 349.098,256.651 C 348.833,256.397 386.735,284.256 388.519,281.663 C 394.881,272.411 470.565,188.526 473.303,165.427 C 473.545,163.424 472.787,161.331 472.787,161.331 C 472.787,161.331 471.597,161.187 466.462,157.017 C 463.77,154.825 460.979,152.436 460.979,152.436 C 444.925,153.434 403.094,193.995 349.917,256.004" /></g></g><path
+     d="m 438.46612,112.92247 c 80.3259,102.29207 63.35739,249.67467 -37.9002,329.18824 C 299.30833,521.62427 152.10573,503.15872 71.779825,400.86665 -8.5460891,298.57456 8.4225064,151.19191 109.6801,71.678342 210.93769,-7.8352228 358.14021,10.630379 438.46612,112.92247 z"
+     id="path4235"
+     style="fill:#0dbd8b;fill-opacity:1;stroke:#000000;stroke-width:13.33333302;stroke-miterlimit:4;stroke-opacity:1;stroke-dasharray:none"
+     inkscape:connector-curvature="0" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.64471179;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -862.34934,-104.26336 c 0,-16.20664 13.138,-29.34464 29.34471,-29.34464 108.04422,0 195.63103,87.586807 195.63103,195.631095 0,16.206636 -13.138,29.344642 -29.34464,29.344642 -16.20664,0 -29.34464,-13.138006 -29.34464,-29.344642 0,-75.631014 -61.3108,-136.941754 -136.94175,-136.941754 -16.20671,0 -29.34471,-13.138067 -29.34471,-29.344701 z"
+     id="path4" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.64471179;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -725.40758,326.12504 c 0,16.20664 -13.13801,29.34464 -29.34464,29.34464 -108.04429,0 -195.63112,-87.58681 -195.63112,-195.63103 0,-16.20664 13.138,-29.34471 29.3447,-29.34471 16.2066,0 29.3447,13.13807 29.3447,29.34471 0,75.63095 61.3107,136.94175 136.94172,136.94175 16.20663,0 29.34464,13.138 29.34464,29.34464 z"
+     id="path6" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.64471179;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -1009.0726,179.40172 c -16.2067,0 -29.3447,-13.13801 -29.3447,-29.34464 0,-108.044293 87.58676,-195.631101 195.6311,-195.631101 16.20663,0 29.34464,13.138002 29.34464,29.344639 0,16.20663681 -13.13801,29.344702 -29.34464,29.344702 -75.63104,0 -136.94174,61.310741 -136.94174,136.94176 0,16.20663 -13.1381,29.34464 -29.34466,29.34464 z"
+     id="path8" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.64471179;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -578.68426,42.459959 c 16.20664,0 29.34464,13.138002 29.34464,29.344639 0,108.044292 -87.58681,195.631102 -195.63103,195.631102 -16.20664,0 -29.34471,-13.138 -29.34471,-29.34464 0,-16.20664 13.13807,-29.34464 29.34471,-29.34464 75.63095,0 136.94175,-61.3108 136.94175,-136.941822 0,-16.206637 13.138,-29.344639 29.34464,-29.344639 z"
+     id="path10" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.23561016;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -258.96103,188.38006 c -5.92272,0 -10.72401,-4.80129 -10.72401,-10.72404 0,-39.48479 32.00863,-71.49343 71.49346,-71.49343 5.92272,0 10.72401,4.80129 10.72401,10.72401 0,5.92273 -4.80129,10.72401 -10.72401,10.72401 -27.63938,0 -50.04542,22.40606 -50.04542,50.04541 0,5.92275 -4.80131,10.72404 -10.72403,10.72404 z"
+     id="path4-3" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.23561016;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -187.33996,241.78363 c 0,5.92274 -4.80129,10.72402 -10.72401,10.72402 -39.48482,0 -71.49346,-32.00861 -71.49346,-71.49346 0,-5.92272 4.80129,-10.72401 10.72401,-10.72401 5.92273,0 10.72403,4.80129 10.72403,10.72401 0,27.63939 22.40604,50.04541 50.04542,50.04541 5.92272,0 10.72401,4.80133 10.72401,10.72402 z"
+     id="path8-7" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.23561016;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -258.74453,313.27152 c -5.92272,0 -10.72401,-4.80129 -10.72401,-10.72401 0,-39.48483 32.00863,-71.49347 71.49344,-71.49347 5.92272,0 10.72403,4.80129 10.72403,10.72401 0,5.92273 -4.80131,10.72402 -10.72403,10.72402 -27.63937,0 -50.04542,22.40605 -50.04542,50.04544 0,5.92272 -4.80129,10.72401 -10.72401,10.72401 z"
+     id="path10-5" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.23561016;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m -187.12346,367.23573 c 0,5.92272 -4.80128,10.724 -10.72401,10.724 -39.48482,0 -71.49346,-32.00863 -71.49346,-71.49343 0,-5.92272 4.80129,-10.72403 10.72403,-10.72403 5.92271,0 10.72404,4.80131 10.72404,10.72403 0,27.63936 22.40601,50.04542 50.04539,50.04542 5.92273,0 10.72401,4.80128 10.72401,10.72401 z"
+     id="path6-6" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.29136932;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m 629.26349,134.49819 c -5.17912,5.17913 -13.57608,5.17911 -18.75524,-3e-5 -34.52746,-34.527469 -34.52746,-90.507338 4e-5,-125.0348349 5.17912,-5.1791201 13.57609,-5.1791215 18.75521,2.1e-6 5.17912,5.1791198 5.1791,13.5760858 -10e-6,18.7551968 -24.16926,24.16926 -24.16922,63.355176 0,87.524396 5.17914,5.17914 5.17912,13.57614 0,18.75527 z"
+     id="path4-3-3" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.41281462;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m 740.87146,587.17776 c -10.37726,0 -18.78964,-8.41245 -18.78964,-18.78967 0,-69.18171 56.08261,-125.26432 125.26429,-125.26432 10.37724,0 18.78967,8.41239 18.78967,18.78963 0,10.37726 -8.41243,18.78964 -18.78967,18.78964 -48.42717,0 -87.68502,39.25785 -87.68502,87.68505 0,10.37722 -8.41238,18.78967 -18.78963,18.78967 z"
+     id="path10-5-6" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.29136932;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m 630.7519,243.88245 c -5.17914,5.17911 -13.5761,5.17911 -18.75523,0 -34.52748,-34.52751 -34.5275,-90.50737 0,-125.03487 5.17912,-5.1791 13.57607,-5.17908 18.75518,3e-5 5.17917,5.17907 5.17918,13.57606 5e-5,18.75519 -24.16926,24.16926 -24.16924,63.35515 2e-5,87.5244 5.17912,5.17912 5.17907,13.57615 -2e-5,18.75518 z"
+     id="path8-7-5" /><g
+     id="g3921"
+     transform="matrix(1.2623093,0,0,1.2623093,-22.620675,-167.67864)"><path
+       id="path4-9"
+       d="m -567.88395,525.90207 c 0,-8.09524 6.56246,-14.6577 14.65773,-14.6577 53.96826,0 97.71801,43.74975 97.71801,97.71804 0,8.09524 -6.56246,14.65769 -14.65769,14.65769 -8.09525,0 -14.6577,-6.56245 -14.6577,-14.65769 0,-37.7778 -30.62484,-68.40262 -68.40262,-68.40262 -8.09527,0 -14.65773,-6.56248 -14.65773,-14.65772 z"
+       clip-rule="evenodd"
+       inkscape:connector-curvature="0"
+       style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.32203454;stroke-opacity:1" /><path
+       id="path6-1"
+       d="m -499.48133,740.88175 c 0,8.09524 -6.56245,14.65768 -14.65769,14.65768 -53.96829,0 -97.71805,-43.74974 -97.71805,-97.718 0,-8.09524 6.56246,-14.65772 14.65772,-14.65772 8.09523,0 14.65773,6.56248 14.65773,14.65772 0,37.77778 30.62479,68.40262 68.4026,68.40262 8.09524,0 14.65769,6.56245 14.65769,14.6577 z"
+       clip-rule="evenodd"
+       inkscape:connector-curvature="0"
+       style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.32203454;stroke-opacity:1" /><path
+       id="path8-2"
+       d="m -641.17244,667.59321 c -8.09527,0 -14.65773,-6.56245 -14.65773,-14.65769 0,-53.96829 43.74973,-97.71804 97.71804,-97.71804 8.09524,0 14.6577,6.56246 14.6577,14.6577 0,8.09524 -6.56246,14.65772 -14.6577,14.65772 -37.77782,0 -68.40261,30.62481 -68.40261,68.40262 0,8.09524 -6.5625,14.65769 -14.6577,14.65769 z"
+       clip-rule="evenodd"
+       inkscape:connector-curvature="0"
+       style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.32203454;stroke-opacity:1" /><path
+       id="path10-7"
+       d="m -426.19279,599.19059 c 8.09524,0 14.65769,6.56246 14.65769,14.65769 0,53.9683 -43.74975,97.71805 -97.71801,97.71805 -8.09524,0 -14.65772,-6.56246 -14.65772,-14.65769 0,-8.09525 6.56248,-14.6577 14.65772,-14.6577 37.77778,0 68.40262,-30.62484 68.40262,-68.40266 0,-8.09523 6.56245,-14.65769 14.6577,-14.65769 z"
+       clip-rule="evenodd"
+       inkscape:connector-curvature="0"
+       style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.32203454;stroke-opacity:1" /></g><path
+     d="m 132.03775,284.66555 c 0,0 8.69652,10.02068 21.79702,20.99902 5.30536,4.44597 25.63519,21.13925 42.51032,31.94399 0,0 20.48551,13.26291 32.83983,18.96361 12.92683,5.96487 21.0213,8.15057 27.52118,6.27789 0.75681,-0.95865 4.61173,-3.1871 2.08279,-9.37015 -6.46553,-15.80783 -20.22633,-27.87882 -45.24183,-53.97806 -27.3683,-29.31592 -32.05255,-43.48826 -33.2541,-52.33151 -0.94007,-8.69226 12.20528,-16.994 42.2872,-5.80372 15.42502,5.36496 65.45708,36.83202 65.45708,36.83202 -6.94024,-20.50721 -20.6055,-58.02276 -23.29074,-65.85827 -2.35514,-6.87215 -6.3377,-17.65607 -3.82376,-23.37085 2.13538,-5.76446 11.63777,-3.06713 16.01947,-0.63418 14.13893,7.80833 31.59768,21.33241 45.91754,35.21052 7.19793,6.97589 8.80422,7.67024 8.80422,7.67024 11.40065,8.15653 24.5282,7.90359 32.44151,-5.37384 8.40733,-13.22288 2.06338,-32.27651 -12.20417,-42.14412 -13.43576,-9.29229 -48.78214,-28.72642 -48.78214,-28.72642 34.14941,33.56336 39.25098,39.7951 38.24337,45.86431 -0.59509,3.58428 -5.6341,4.27584 -16.13816,-3.27885 -11.43561,-8.22465 -33.80314,-26.72533 -33.80314,-26.72533 -20.767,-18.43865 -34.65312,-32.16894 -47.56281,-27.5421 -8.43403,3.02279 -7.90747,13.678 -8.62701,19.29852 -1.16084,21.87146 7.58578,43.04002 12.63994,57.24178 1.90166,5.3435 9.28085,19.22246 9.28085,19.22246 -29.51684,-32.95272 -61.63954,-45.89324 -85.89923,-48.0673 -28.77557,-1.12189 -38.64387,21.97216 -18.16598,62.74587 12.09509,24.0826 18.24712,35.87235 47.65908,60.42484 16.74943,15.03619 18.74503,18.05128 17.59938,19.51384 -1.61292,2.05912 -24.04912,-11.25556 -30.33696,-14.72806 -15.99635,-8.83409 -55.77276,-34.14832 -55.97075,-34.27615 z"
+     id="path4237-0"
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:2.13333344;stroke-miterlimit:4;stroke-opacity:1;stroke-dasharray:none;filter:url(#filter3894)"
+     inkscape:connector-curvature="0"
+     transform="matrix(-1.3538609,0,0,-1.3538609,693.74978,1158.395)" /><path
+     d="m 132.03775,284.66555 c 0,0 8.69652,10.02068 21.79702,20.99902 5.30536,4.44597 25.63519,21.13925 42.51032,31.94399 0,0 20.48551,13.26291 32.83983,18.96361 12.92683,5.96487 21.0213,8.15057 27.52118,6.27789 0.75681,-0.95865 4.61173,-3.1871 2.08279,-9.37015 -6.46553,-15.80783 -20.22633,-27.87882 -45.24183,-53.97806 -27.3683,-29.31592 -32.05255,-43.48826 -33.2541,-52.33151 -0.94007,-8.69226 12.20528,-16.994 42.2872,-5.80372 15.42502,5.36496 65.45708,36.83202 65.45708,36.83202 -6.94024,-20.50721 -20.6055,-58.02276 -23.29074,-65.85827 -2.35514,-6.87215 -6.3377,-17.65607 -3.82376,-23.37085 2.13538,-5.76446 11.63777,-3.06713 16.01947,-0.63418 14.13893,7.80833 31.59768,21.33241 45.91754,35.21052 7.19793,6.97589 8.80422,7.67024 8.80422,7.67024 11.40065,8.15653 24.5282,7.90359 32.44151,-5.37384 8.40733,-13.22288 2.06338,-32.27651 -12.20417,-42.14412 -13.43576,-9.29229 -48.78214,-28.72642 -48.78214,-28.72642 34.14941,33.56336 39.25098,39.7951 38.24337,45.86431 -0.59509,3.58428 -5.6341,4.27584 -16.13816,-3.27885 -11.43561,-8.22465 -33.80314,-26.72533 -33.80314,-26.72533 -20.767,-18.43865 -34.65312,-32.16894 -47.56281,-27.5421 -8.43403,3.02279 -7.90747,13.678 -8.62701,19.29852 -1.16084,21.87146 7.58578,43.04002 12.63994,57.24178 1.90166,5.3435 9.28085,19.22246 9.28085,19.22246 -29.51684,-32.95272 -61.63954,-45.89324 -85.89923,-48.0673 -28.77557,-1.12189 -38.64387,21.97216 -18.16598,62.74587 12.09509,24.0826 18.24712,35.87235 47.65908,60.42484 16.74943,15.03619 18.74503,18.05128 17.59938,19.51384 -1.61292,2.05912 -24.04912,-11.25556 -30.33696,-14.72806 -15.99635,-8.83409 -55.77276,-34.14832 -55.97075,-34.27615 z"
+     id="path4237-0-2"
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:2.13333344;stroke-miterlimit:4;stroke-opacity:1;stroke-dasharray:none;filter:url(#filter3894-3)"
+     inkscape:connector-curvature="0"
+     transform="matrix(1.3538609,0,0,1.3538609,-52.89981,465.82444)" /><path
+     d="m -269.87161,757.91183 c 0,0 13.23506,0.93627 30.26137,-0.56431 6.89523,-0.60768 33.07453,-3.17912 52.64715,-7.47152 0,0 23.86373,-5.10715 36.63057,-9.81197 13.35843,-4.92285 20.62761,-9.10098 23.89954,-15.02127 -0.14269,-1.21302 1.00739,-5.51461 -5.15294,-8.09846 -15.74964,-6.60595 -34.01548,-5.41108 -70.15906,-6.1774 -40.0818,-1.37718 -53.41542,-8.08627 -60.51817,-13.48977 -6.81108,-5.48163 -3.38613,-20.64701 25.79772,-34.00541 14.70074,-7.11354 72.32932,-20.24098 72.32932,-20.24098 -19.40827,-9.59329 -55.59858,-26.458 -63.03787,-30.09979 -6.52468,-3.19401 -16.96616,-8.00329 -19.2295,-13.82188 -2.56614,-5.58603 6.06036,-10.39793 10.87905,-11.77591 15.51905,-4.47641 37.42722,-7.25864 57.3662,-7.571 10.0224,-0.15701 11.64921,-0.80185 11.64921,-0.80185 13.82901,-2.29394 22.93273,-11.75538 19.13973,-26.73949 -3.40511,-15.29487 -21.36391,-24.28197 -38.43005,-21.17074 -16.07116,2.92988 -54.80683,14.18154 -54.80683,14.18154 47.88016,-0.4144 55.89402,0.38474 59.47311,5.38881 2.11368,2.95526 -0.96045,7.00739 -13.7299,9.09291 -13.90189,2.27049 -42.80009,5.00476 -42.80009,5.00476 -27.72258,1.6464 -47.25033,1.75659 -53.10719,14.15679 -3.82632,8.10119 4.08038,15.26323 7.5459,19.74633 14.64462,16.28629 35.79785,25.06993 49.41383,31.53826 5.12311,2.43375 20.15489,7.02978 20.15489,7.02978 -44.17265,-2.42953 -76.03716,11.13432 -94.72864,26.75121 -21.14069,19.55411 -11.78868,42.86201 31.52274,57.21332 25.58149,8.47645 38.26825,12.46292 76.42687,9.02676 22.47583,-1.21144 26.01893,-0.49052 26.24301,1.35373 0.31548,2.59652 -24.96418,9.04641 -31.86578,11.03716 -17.55777,5.06447 -63.5838,15.29078 -63.81419,15.34039 z"
+     id="path4237"
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:2.13333344;stroke-miterlimit:4;stroke-opacity:1;stroke-dasharray:none"
+     inkscape:connector-curvature="0" /><path
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:0.29136932;stroke-opacity:1"
+     inkscape:connector-curvature="0"
+     clip-rule="evenodd"
+     d="m 741.14237,231.14899 c 5.17911,5.17911 5.17911,13.5761 0,18.75521 -34.5275,34.52749 -90.50738,34.5275 -125.03484,5e-5 -5.17911,-5.17912 -5.17915,-13.57613 -10e-6,-18.75527 5.17911,-5.17911 13.57615,-5.1791 18.75525,1e-5 24.16922,24.16921 63.35516,24.16927 87.5244,2e-5 5.17913,-5.17912 13.57606,-5.17915 18.7552,-2e-5 z"
+     id="path6-6-2" /><text
+     xml:space="preserve"
+     style="font-size:237.56724548px;font-style:normal;font-variant:normal;font-weight:normal;font-stretch:normal;text-align:start;line-height:125%;letter-spacing:0px;word-spacing:0px;writing-mode:lr-tb;text-anchor:start;fill:#ffffff;fill-opacity:1;stroke:#0dbd8b;stroke-width:2.13333344;stroke-miterlimit:4;stroke-opacity:1;stroke-dasharray:none;font-family:Hack;-inkscape-font-specification:Hack"
+     x="1116.8435"
+     y="417.50568"
+     id="text3927"
+     sodipodi:linespacing="125%"
+     transform="scale(0.97330289,1.0274294)"><tspan
+       sodipodi:role="line"
+       id="tspan3929"
+       x="1116.8435"
+       y="417.50568"
+       style="font-size:237.56724548px;font-style:normal;font-variant:normal;font-weight:normal;font-stretch:normal;text-align:start;line-height:125%;writing-mode:lr-tb;text-anchor:start;stroke:#0dbd8b;stroke-width:2.13333344;stroke-miterlimit:4;stroke-opacity:1;stroke-dasharray:none;font-family:Hack;-inkscape-font-specification:Hack">l</tspan></text>
+<text
+     xml:space="preserve"
+     style="font-size:138.19949341px;font-style:normal;font-variant:normal;font-weight:normal;font-stretch:normal;text-align:start;line-height:125%;letter-spacing:0px;word-spacing:0px;writing-mode:lr-tb;text-anchor:start;fill:#ffffff;fill-opacity:1;stroke:#0dbd8b;stroke-width:2.13333344;stroke-miterlimit:4;stroke-opacity:1;stroke-dasharray:none;font-family:Hack;-inkscape-font-specification:Hack"
+     x="-359.01129"
+     y="525.40228"
+     id="text3931"
+     sodipodi:linespacing="125%"><tspan
+       sodipodi:role="line"
+       id="tspan3933"
+       x="-359.01129"
+       y="525.40228">.</tspan></text>
+<path
+     d="m 434.66331,265.76624 c 0,0 -5.87624,-16.97489 -16.80346,-37.37302 -4.42522,-8.26075 -21.55552,-39.48393 -37.31315,-61.56659 0,0 -19.05507,-26.99135 -31.70512,-40.38178 -13.23615,-14.01104 -22.30529,-20.83761 -31.41651,-21.76094 -1.43417,0.82308 -7.40128,1.68002 -7.34029,10.72393 0.15581,23.12199 11.36194,45.22591 29.63861,90.62981 19.61161,50.63174 18.35361,70.8008 15.40574,82.51822 -3.2003,11.39589 -23.90241,15.20102 -56.06034,-14.02326 -16.67759,-14.51651 -63.68239,-79.27534 -63.68239,-79.27534 -1.61653,29.26616 -3.35632,83.29359 -3.93191,94.49265 -0.50478,9.82218 -0.93646,25.37992 -6.97594,31.29347 -5.58886,6.1668 -16.16918,-2.01234 -20.4485,-7.27809 -13.82996,-16.93838 -28.95018,-42.73217 -39.94787,-67.38856 -5.52802,-12.39366 -7.19635,-14.07581 -7.19635,-14.07581 -10.21371,-15.99561 -26.83628,-22.29501 -43.47232,-9.60048 -17.229294,12.37696 -18.862353,39.5161 -5.90882,59.10686 12.19836,18.44856 46.81573,60.68509 46.81573,60.68509 -25.9912,-59.38689 -29.26021,-69.78878 -24.93481,-76.90697 2.55449,-4.20376 9.23472,-2.5327 18.62521,12.25475 10.2233,16.09882 29.00297,50.6202 29.00297,50.6202 16.79982,33.63665 27.327,57.88869 45.8806,58.58235 12.12126,0.45314 16.83063,-13.20078 20.56787,-19.9004 12.4834,-26.89688 12.16354,-57.90459 12.97156,-78.29709 0.30404,-7.67281 -1.9721,-28.83169 -1.9721,-28.83169 20.47806,56.28447 54.31805,88.73667 83.70504,103.69706 35.59166,15.91462 59.63247,-8.12927 54.4544,-69.68472 -3.05843,-36.35714 -4.84572,-54.27229 -29.42634,-99.9488 -13.46673,-27.33625 -14.45442,-32.13071 -12.27766,-33.39096 3.06463,-1.7743 24.54469,26.26536 30.69511,33.79814 15.64679,19.16356 52.86658,71.02164 53.05093,71.28206 z"
+     id="path4237-0-1"
+     style="fill:#351d52;fill-opacity:0.45098039;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:2.88823676;stroke-miterlimit:4;stroke-opacity:1;stroke-dasharray:none"
+     inkscape:connector-curvature="0" /><path
+     d="m 76.374471,245.63739 c 0,0 5.87624,16.97489 16.803461,37.37302 4.425216,8.26075 21.555518,39.48394 37.313168,61.56662 0,0 19.05505,26.99133 31.70509,40.38174 13.23617,14.01101 22.30526,20.83764 31.41647,21.76092 1.43424,-0.82309 7.40129,-1.68002 7.34026,-10.72394 -0.15576,-23.12194 -11.36187,-45.22583 -29.63856,-90.62974 -19.61159,-50.63172 -18.35358,-70.8008 -15.40573,-82.51823 3.2003,-11.39589 23.90241,-15.20102 56.06034,14.02327 16.67758,14.51651 63.68232,79.27531 63.68232,79.27531 1.61655,-29.26616 3.35639,-83.29357 3.93193,-94.49265 0.50479,-9.82216 0.9365,-25.37989 6.97597,-31.29345 5.58885,-6.16681 16.16917,2.01233 20.44848,7.27808 13.82999,16.9384 28.95021,42.73217 39.94789,67.38858 5.52802,12.39365 7.19636,14.0758 7.19636,14.0758 10.21372,15.99561 26.83623,22.29498 43.47234,9.60047 17.22922,-12.37696 18.86233,-39.5161 5.90877,-59.10686 -12.19832,-18.44853 -46.81572,-60.68508 -46.81572,-60.68508 25.99117,59.38686 29.26015,69.78874 24.93481,76.90696 -2.55451,4.20376 -9.23472,2.53271 -18.62518,-12.25473 -10.22337,-16.09885 -29.00301,-50.62021 -29.00301,-50.62021 -16.7998,-33.63664 -27.32697,-57.88867 -45.88056,-58.58233 -12.12127,-0.45315 -16.83064,13.20079 -20.56788,19.90042 -12.48341,26.89685 -12.16354,57.90456 -12.97159,78.29705 -0.30402,7.67282 1.97212,28.8317 1.97212,28.8317 -20.47807,-56.28447 -54.31805,-88.73667 -83.70503,-103.69705 -35.59167,-15.91461 -59.63247,8.12927 -54.45439,69.68472 3.05842,36.35714 4.84571,54.2723 29.42632,99.94879 13.46673,27.33625 14.45444,32.1307 12.27766,33.39096 -3.06461,1.7743 -24.54468,-26.26535 -30.69511,-33.79814 C 113.7787,297.75584 76.558885,245.89777 76.374542,245.63733 z"
+     id="path4237-0-2-0"
+     style="fill:#ffffff;fill-opacity:1;fill-rule:evenodd;stroke:#0dbd8b;stroke-width:2.88823676;stroke-miterlimit:4;stroke-opacity:1;stroke-dasharray:none"
+     inkscape:connector-curvature="0" /><image
+     y="-123.97097"
+     x="1859.6594"
+     id="image4081"
+     xlink:href="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAIAAAACACAYAAADDPmHLAAAABHNCSVQICAgIfAhkiAAAIABJREFU eJzdvXmQXNd5H/o7d+99m559xzIASIIAQYgixU0LFTt0qFgynKfYjpO8OHlJlWzHieOXvFTJSdlV SSpxUlHFjhK9smP52Y4p+UVSJEsWaYqLxBUECBDLAIPBYGYwW/f0vtz1nPzRfbtvd9/u6Z7pAYf5 qmb63rOf833f73xnvQT/exBp8+x8b3bvRKzpt9ndze9DSb00ykEiN4aTxudz1ecLBBgnwEL1fcgR d7X6PO5g5iYDDlffVxlwmgGLDDjvFAo3QfhQCsSHSQCaNdnB8HNcndF5Lh4PcNHoOtnaMrhQKEjS 6RSh1MsBQCBASS5HXesdDHIsn+cYIQVGCMc4TqCEcIznx2kicY0BIq0IR5w6hMIpEB86YfgwCEAz wwlwhgBZDlA5wODm5sLc1pbBWZbOU6rwjFmcxxPlFMXkKC1wPnHMH+WHYmExFIPpCXEQgoSjnGUJ hOdNRihhJkXZ5PR8mWTTql7cXszNJznOsHw+nqqqQMtlzSJEoBxXojwvWSl+nCKRp0CAVgTieYoP oTAcVAFo1nauzvQQH48HONNc5m2GK0pIkKSMMMU9MBIUp096Zfm4xEnHeCZOgOPHCUOkMXnWxBVW YxOz/xOmU8rWGOhdk+q3VGpcU63tKwvW+SuUclo6nTNDIdEqFlVreNhjzs9nKHDcchGGAy0IB00A XLT9HAe8ziN+mI+Yy7xpSgKlmiDLvDgZnBkYku77mJ8LPCZB/CjH8bOdk2eO/w63ZuY3+TtdCLGK JjPfUa3y6xkz9drl1Fvv64JX59SsyfO62UYYqKMAB0oQDooANDH+DFfR9rwQjQZ401QFyxJFWebF +4JnD8Wl6Z+SRM8nBcbPMYDrLgsXrW/56cx8pz8DAMYAwtKmZbyetzLfuG689kKyJJXDUt6QJK+5 VAybSCxYwKPWQRWEgyAAzr6dAwI8cI2PRHyCxyOIuh4QR/lYbCL04HN+3vc5gUinAdax3LwsQQn7 IQU9EP0eiF4ZgkcGLwngZRGcKII4U2AAtSxYmlH902GUNOjFMvRCCVq2CC1XAGMOMWGtwkIJUgYt fTtPt//kWvGV97JZqvO8YYyM+Iz5+aJ5EAXhgxQAB+PBAU/zQIqfnubEZLIghsM+aVY6/eCwNPl/ CZz8aQLI7RIS/R74hiLwDUbgiYcgeKTuS8EcD269NaugAKMU5XQepa00CpsplFNZUMuqRWhGCkro zbKW+4Nr+qt/lNeMvKZl9TaC8IHaCB+EADjhngMO80BeiER8gmFwUjjsk07Ij5wNi6NfEDnp427a TjgO/tEY/KMx+IYiELxtZaMzseq/dtM7Vea3+jMwi6K0nUVxaxvplQ0YJdUlAYARa7Ng5r6yWHzj qymjnK0LwohRtREstBqM94zutQA4NL5i3EWjiqgonMRxHvmY7/GPRfn4F0SIj7tF9kSDCM4MITgx CF4Wd18KN613ujdAfbN/axwGhlIyjfTyGvJ3E7BMs9GmYAAF2y6bxf/3pvnu760lV1KCYOlZJaxj s2QCCxY+IDS4VwLQpPVPC/E4BE1bkEwpIB+TT04dChz9osQpP9YckRM4hA+NITw7DCno23tJuoT8 BnenJHQQGACgpoXc2hYSC3eg5vJoTsxidCurp3/zQu6FP9V1aKJI9XQ6YgCzZlO3cE+E4F4IgHNI xwOLQiSSFg2Dk+KC6D0x9OzfCAuRXwNDA3c5gUd4dgTRY5O99emdaA+Q7x6nnRBV/hUSKWxeW0Ap nW0eP8Bi1ltrxuI/v5xffF/QN7WcfFhHAibwAxP3UAj2WwAckH+YR3xcDGoLkiQNyWciDz0Wk8Z/ gzDhmDMCLwmIHB1H5Mg4eEnoTyl2A/ldxmkM63B3/BS2trF5YxGlVLqxXITpRav45cuZt/9jppzI VtBA14EhEzjfPFrYF9pPAbCZzwNP83Nz6+Ldu5YiiiHPE/FP/mJQCP5DBtIwhg9ODGLozGHwcp80 HuiKYW21viF+Y5zW9FvjMOc/BuQ2E1h7/zqMstowbqDMurVZvvMPLm5fuiyKRTWb1XTgSeNeGIj8 fiSKmtaf4QFeiEQKcjpteY4NnBo/G37qKx7e+9fgGIlLAS9GHzuO2PFJcEKfirSjBlf+9QfyGwWC tYkj+32ITo6DMYZyJluLQgiJBsXwZ4e8w4mckLzBmAg9xAElAUCqu/rukvotAFXGg6v092kxFCor uhDzPBb7xCcmPUf+gOf4GuRzPMHAA7MY/egxSAFv/0rRJcP2C/I7IQjhOARiUQQHB1DO5mBqWjVL Ikmc8pcGhfHhtJl6g5Y3rJkZnm1vPwBgad+6gH4KQJOx94oYDJaVYDDqfTz8qS9EhcF/Swj8dmDJ 78H4kw8iOBkHIX3sifoO+Z0RBM0/XSKIKMuIjI+CGgaK2VzNnyfCAyPK+KeIILycLOWLsrzNyuWT bL+EoF8C0MT8H0iBQFQJBGK+R/w//kUfH/hFkPqcfWBsAONPnoTkV/qUPQ4k5Dfm3yqQhBAE4gPw BoPIJ5NglFbduXhIjD7LQf7RRn4l7ffnoKo+ALm+C0G/BIBDjfkJKRCgcswXDjwSfObfKrz35+xA hBDEH5zF4Okj4IQu13C6oS4YxprDuml9g39/IL9tWo44ss+H8OgwSuksDE0DAwMBCQTF0LMRJfjO tpnakmXG9kMI+iEA9swej3hCGg2vKR5uJPJI7OO/I3Oe5+xAnMBj4okHEJoeRj8Rv7MGo3+QDyAQ EBEb8CI+5IPPL4EXOGiqVWFwTwjSmj/Pi4iMjkIt5qEVi3ZIr8IFP+MXotdT5ubyfgjBXllRZ/7Q K2KgFFFCynDkYwNPf1Ug4kftQLwsYeLJk1Ci/g5J9UhdQu5uIV8SeYxOBDAxFcT4ZBBjk0F4vK3z EppqYvl2FtcvJ3H53U2YBm3IvzF9h7tL/gwMjDKsvH8F6fW7dW8CPaOl/u6V4hvfM81yOZ2e1Po1 YbQXAagzH6+IgUBEGeCJ/yPD574scPJfsgOJPgUTT56EFLy3Vn6vkC9JHKZmQpg5FMHUbAhDwz4Q rrfmKRUNvPrCHbz1ympt6bhj/g7GO8vEGMPGzRvYWlqqRmNggJqy7v7su5tvvCbLfDmVGtf7IQS7 FQDHJM8ZMRjcVARB8X588PP/WuGUv24HkgNeTHz8QQieXa7WuVGfIJ/nCMYng5g5FMb0oTDGJgLg emR4O1pdyuL537uCfFbbscwNzK/+cuAYGMP67dtYX7heLxQh2xv67Z+6Xb5xNRzWyvPzlu5YSKLY Be2mxo7p3XFxenpANk3mO+v58V/1ioFfsgMJXhlTnzgN0dcnS78PkB+JKpg5FMbMoQgOHY1Alvdr HgxIJcr4/f90AbmM2lT++jNz6SZs5ttuqwvXydbS7VogE3R1SZ3/yaX0jTsez3g5kYjr1RlD52pi 17QbAahO9DwtRCLLsqbJ3k9NPPdzAT70r1Bdu+clAZOfOA051IfVO6B7yG9qZFGsaPnsoQiOHIsi PtjHbqgL2ljN4yv//h1Qs3nk4C7EHCOs2Y2B4c6VyyS1vuqQdXplvvTq59byhWQ+n1aBcR0475w2 7pp6FYBavz83d0nOZGTP/f6zDw3Js//D3rHDCRzGn3oQ3oFQj0m3oU6QX/VzYz7hgPiAF7xAGuO0 ESLFI4LnAUniIYk8OIFAUQT4/BLCUQVjkwEEgr13Zd//xgJe/4vlriC/bf0YxcLF8ySXStY8dEv7 2mX9tV/O59OlbJaqwKqBXdgDvQiAvW+PB1alQCCiDEcHB894nvk2z3EzlRAEYx+7D4GxgR6SbUNd aH3NqcW/czfRLq0GM8HFbpiaCePZc0cx0AOS5LMa/sMXfwRKqbvWN0F+o3/d3aAWbp1/kxTzmVqQ rJ77x28Vf/iHsqWVHCMDCz0IQC+dYBX6eTEUEuVg0O95OPBjvyU6hnuxE9OIHB7tIck21AXDujH0 XJnc4t+B+U3pZ9Mqbl5L4pEnJ7quiqwIuLOQRiap1h07QH5DIRxuPDj4o3GkN+8Si1b2Ikqc+HiA k1/cKG4lQ6EgLZXOUuBqT11At9NxVe0/zEejiihJAflB6ZlzMuTP2AE88RAG7p/qJe9WqoEXa8+w nTZtuKKBg7sNwlV3Zw1O7REkuItuYGI63JA/B465Mt9ZCJf8FVnG5LEHa4UmIN4Baew/jSvDEU1b kIBFAbVZ2e7QvRsEcEB/UoxEPMqU9PDcuH/8dwEiAgAvi5h8+kHw4h42cHQB+aw5rJvWN/jvDfKd cbxeAR99agLPnpsD3+M0dj6j4fp7CQDdQ36jf71NFK8XpqGTUq6ynExAYn5pwLdlZl6R5TRV1QcZ sNT1iKAbjlUNvwA/PT0i5nIFZXrw8K8zRrxAZVV/+Ozc3sb6fYf8dhrcGscN8v1BCeGIgnDUg/HJ AKYOhTE44tv1qiXhnIzvwHy3Mjvc7eYZmz3Oipk0KRUqW81kIv78Id+hr1/ZfvfteBxWInGOAs+7 qVEL7SQAtdO3c3OXxNVVXX588DM/JnLiJ+wAodnR3Rt9OzKM1V930WBuWk8I4PNLCIUVhCJKldFy 9bfiJvRzoQpAuWh2bYM0+rvXnycEU8dPsWvvvELAGBghfEwY/BeiSD+n64tm0+TQngWAA17n19ch DkXGglFP7J/XCiKJiD8ws0MSbahPkC8rArweAbIiQJZ5KAoPRam+Kzz8fgnBkAx/QEIgKMEXkPo2 49ct3bmZcXASjvLvjGCsxb/y4vX4MDg+g82VRQAMPOEffiD4xLnz5Vf+YG7OY87Pn7OqKEDQQQg6 CYDD8IPIcaJ8yvuJX+TATdkBBk/O7m5/fkcNRgvkK4qAyakgBoe9GBjwIhrzVJjpE3vuj+815dIq Ft5Pdt9NVd1bUa8VQUYmjrB0Yo3oahkAEJQi//ekOvW91bWNdWDRRoG9CkCIN4yieDR2YlIR/L9g eyqxAEKzwx2iu1APkM9zBPefjOPM2RGMjvl7Xpg5CMQYw3efv8lM3V4hrP3r2E210/rmNhN4DmPT J9jt6+crQwpGB8a8c19IWPlfF8WskUqdM3dCgXYC4ND+rMCpIWlKOf73aufzCMHwQ3PoaWG/B8gf GfHjc//HMUQifdwxdI+JWgzf/uN5Nn+xYv33aui1vLRBkNjAEJLhGHKZyiyhLMg/MyQHf3s5V1wF Fu3VwrYC0A4/HdoviOODQ0Me3vPTtmdwIt7b2n6t8jswnwEzs2H8rV84+aFm/p2FNL7yb95mF3+4 Vqlnh7G93Sa1YHC42+Fa0KCxHcenjzPbXieM+Ualmb9tWUSKRrNC5QhexcutrG4I4LT8+ZUVTjqk nPo7cJzciR7rciasS8vcrpcgcnjus0cOfL/uJGoxlEsGttYKWFnMsesXt7C5Uqh47tHQ63bk4/MF EAzHkMskwBggEO/PjwYHvrxVuq0Br/PoMCJo1wXULP+x+GxY4b0/Y0f1j0ShRALtW6SpcL2M7Q8d iuxqpq0fpGsWsmkVhZyOfFar/OU0FHMGDN2CYVgoFw2YJoVpUJSLBgyNgpmOCnbJsL1Afqt/5WF4 7BDLphMEADhCQlPK4Z/NWqn/ODdnGtURgWtX0CwA9WtZ4gneKt0Rj8uP/RwYCdsBoiem0JF2LHDl X6uVC4TC+898Q7ewtpJHcquExEYRyY0iEpsl5Dut27sg2E4reO3Saj+30UHrW9JvigMgFIzBHwij kM8AYJB47//Jcfx/3djIa0DCQKW7t9BEbbqABDftywi6yEle0XPOztQTD3Ve5u3B0HOT8HSq3D7t XVK5ZGD5dhbLi1ksL2awvpIHpc3lc2/8tuv2e5zO3Svkt2vf4bEjbOH6WxUUABk8Kp765IXij74B XONRYX63CJDndL0kHPc9+SDPhMO2Z+RQh5W+XUB+c+UXFzLI53QEgns/G7i1XsTLf76EG1e2YVlW G4FszB8Nr22YzwjbC8P6BflON6vqHooMQJY90LQyGABFln8yEuG/I4o+IZ0+bAILLd2A09pyGH8F PpMJiGEy+rlaQIGD323Klzkr71Yh1pn5rO5uGRTf/dZCax490g9fWsZ//ffnce1SApbZjvmsJf+2 kM92v4LXDyu/I/OdCTOCyMAIqpfaQCLyp0Q2FLMsna/cqdg6Emg2twmQ4DY2ysJg0JJlUfnLtkdg PN56cLMdJDkK7JSPun/7Brv+fhLvvrXeXM6u6dI7G3jxfy7Csmh7DWsD3wyssk+vSSBaIL8TfLso hHv9W/NvJ5ANylX1t1BlflP+sYGJeizGpElh9lmPJypUruJpuJepWrc6VT2u8ZYlCUcCTz9NGDdo e4amm2b9nJVso2FOgW5piQ4N9t1v3cLqnRx2QzeubsOtwXbK3w3ya1q/K4ZVn1o0uFP9m9OHa/va kO+Wv6L44fUFaw4eQfmMKBIxElnmgcMt4+umSYJz3NxcmKNKSAhxvpr2C14Z3sHGTQ2dC7ybTRv1 R8ug+O+/fwVbG0X0SlOzobYC2S7/dpDfGUE6M8yp6PX84ZJ/U1otAtOYfiPkN+dfafvYwHgtQcL4 jyg0NFjpBsbt09s1akKAC0TTPHxYyggCLz9iewRGByrTvm0Y5iywUz7q/js3WHOFSgUdX/0v7/Us BGceHcOhuahL/s1lqjDeFfLZDpDf7OZofLtK3eTfWSEa828H+W4KGYkM15wZY9ywOPYopQpfHQ0A ji7A6cABXsGyOPlo+MxsTBj+FTuH2IlJyAFfQyaNBUZnrW8ucK2SbunUHQyd4uqlBCamgwiFu5sa JhzB/aeHoOsWVpdybcvcbmxP3OrnVo8Gf9YSzOnefZs44jjcXRnfIS2eF7G9vUos0wDAwDE+s8zu vmhMyAa2P0GBq7VDJLYAVDd8TguRCC8fVR56TublZxiqO35OH62c5u2p8tV/HeK0rbzjx9ApLl/Y QjAkY3isu/UHwhEcOhbF+HQIGyt5lApGY7pdHMhoqUdD+R2erDVYZ4Fpp0TuCtFW65vjNLmXSjlS KlW2jfE8fFm28FUha+mqumkBqRpuOCzDc/zc3JqYKHqU44G5v8cR8TgAyGE/YnPjbaW1N62HO/Nd 4jDHP2YxzF9JopDXMXM4DJ7vbq0gOuDBmY+NIRCUsblWhKoarg3Wy+5cV+Z3Vb8OabUZ27ecL2yX lkv+zKJIp9dJxZtESgx/lCtvZjXNtIBcbV3AFgAO0HlKLTGgaJ5Z5aFfJ4QLAEBoYhD+4ahLhfp7 pVpDkDYNtr6Sx9X3EhibDCLY5bQxIQSjk0GcfWIMgZCCxEYRaskE8CGGfNf2bcxfFCRsbN4mVS4R kXFX1ktbV3S9bALF2h23DgQ4yUtSQh73Hx0ZlGZ+1U4pdmwKsvP+nrabFjoUro+7c8tFAxff2kB6 u4yp2TBEqbujDRxXEYRHnhrH6FQQ6YTKChnn4U1nXjtDbmv9e2WYu0LsCvLdujReQCp1l5imbgdZ u1u6/ZIRPmygtFQ7RuZAgJgQizFpRnjoIa8Y+mk7s8H7Z8BLYi2jtlrvWmD3wu0E+d002OZaAZfe 3oCsCBga7X7HECEEsUEvTj82SoYn/CSb1pBL73yKt4H5XdWvQ1r7APmt+TPkC0lSVitL0xxopqis /Q9Byxrl8ict2xDkUTtIQAWvNyyPK8c/qfDKp8AqN1oNPngYpDp93Jb5eygwaxenoULuCKJrJm5c SeLS2xsQJR7DY/6ut24TAgwM+XD6sVEyeyxCSiUD25vFjvm31r+D1jfEd4njcO8H5LvlXyrlSL6Q QoV3BJvGrf9mGKzBEKwjQPys4GUFedZ77LMikc4AlZu8oofHGvjTtpIN/u4M2w3kd4MgarkiCNff S8AfkhEb9PW0Wy0UVXD/w0PkyP0DRC2b2F4vtTR+A/N3xbBWhbBq1WtX/94UojF/Al3XkM5WDEFw XGCbpX5HVQuqpk2Z9uGRqgCc4+cmbgmMUWVKeeBvEQizAIN3IITgxFAPEt6uwK1xGpjfE4K0z79Q 0HHl/CauvZeA4hEQH+7tMEcgLOPEmSFy4uFBYhgWEncL9sSmI/92AtmhLh1W8Nzr15RWTwpRMel4 BlBqYWt72T4ezZmm9Y20WtzS9Q3THglUBeA+jtJVyTCgHA6c/ocEiAKVGUDfYLQpw14Z1lhg1i5O Q4W6QxDns3Nip5jTce1iAu+/tcV4AWRw1A+O714QvH4Jcw/GyclHRwilwNZKobqHoDPkftCQb39a ga++ckTA2tZCbQqXUu41VVqbz+ejJrBuoSoAHKDzw8MBkRBNnlJO/hoBkQAgNDkETyS4A+S5V9Kt wKzx3y4lvDH/Tps21JKBhfe38fZLq9jeKkGUeRKOebruHhSviCMPDJCHnhojsiJg406ufgmUs1wH BPJ5AFzVnzACnuOxnrhFKKscTbeo9W7S3D5fLK4b9lCwKgAnecbWRI8n5p+STvwjVOeKw9Mj9Sng ngrcWEmGJvfdQP4OWu9kfPPY3jIpNlcKuPzmBi6/uQ61bMLjE4mvy40nksxj6miEnH5yjIiygM3l fFUQDhbkAxXGk9oOYWAjeYeYllEtA714J3vzh0Y0qqO4SQGw2o4gxigZwHSkkmIlNU4U2ldypwK3 aP1eKtmaf7vpXJ4niAx64fWK8PhEeP0ivD4Jsqc6TqyGvfl+EhsreRy+LwZvoDtB8PolPPXcLPno M5N4+y+W8eafL7NiTt+xfruD/B0UAgBYRevtV8LqjK+6QBQkqHoRDAw8WMTr9RIvjZIEzgA4DwEA ARYIY34Skj1+OzUGVI5774FhDZDvWklHWm0r2RjHqfXBiIKJ6RAGR3yIj/gwOOon0QHPvp8ikj0C Hn92Fo88M0XefXkVr//ZHZbbduxn3I3WO9276lIdWo/6Si2p+tlCIPACajsxCednTCGx2DpJJCrr Kg17Ai2TyBDredYs6J6ksoPWd1XJ9nEkhcf04TBmj8UwOxfBwFCfLqHaJYkSj0eemcLDH58gL/3p Anv9O0tgtFLYe2Xo1bS+FqTOfMIAQuozpYRjLQc5GwRAEgWxni8D4bguGLa/kE8IwczRME6eHcHx U/Gup373m9KJEhavbGN1IcuWrqaQTdYRoF/TufVnVmNuJ8h3RYLaNzkYGCMtfV2DAFBmh2aNofZp Orelko6fcNSDR54axwMPD8Hr7+MXRHZBlDKs38nhznwaKzczbPl6GuWCXg+wG8jvSSGatL4D5BNH eMLsnR8VT4603gjTIADEMA04MYDRNhVqLPDeIL8x/YEhLx7/1DTuf3jonp/jrxeJYf1OHotXk1ie z7CVGxloZdMZwPFc+TkokA97DFB1o4zWkqQUDqmtUIMAlJlVC8AYwExrxwKzxn+7hvxASMYznzmM +x4a7O8HJLqkfEbDrStJ3L6aZovvJ1HMtWp4Ow0+GJDv7scYrWdJTFcBYMBhRsgCI0QvVcpWiUIt 2pZhjU67h3yOEHzk6Qk8/eMzkPbx6tZmMnQLd26kcftamt26nMTWaqG1zPViumu90/2AQH7lt/5u WjZyMTBwZUJUlkqNMCAPwIEAhHDsLjYzE+xErWyWZm+l2h/IHxzx4bN/4z4MjvbxGvkOpJZM3Li0 hfmLSbbwXhKG7kS43hDsQEG+I61mJDAtrZY2Y1a6VCqxoj/FgEsAHAIQiURZNrtaZB6mERAZACzd 2DfIf/CREfzlnzq671Y9pQy3rmzjwqtr7OZ7W7AsN+Z0j2CWM44z7L5DfmPf3gL5jk8sOwXDMDVH ZjTj9wdYcbOec7ULWGXZLGWEcBTANoBRgMEoN56Y7QfkE0LwE39tDqcf7cONoh3IMinefe0uXv/u MsskS61l3QXDDgTkV9/rz+4zgIQBlFnQqb3ZhcEwjWSxWGJAqBayigCnGSEXmNfrYybMOyKEUQZA K5b6CvmEEHzmrx/HybM93i3UA1HK8N7ra3j1W0sss13uAnI7lNnhfs8hv4mZdbdOkN/oV9IqG1xs m85k6i1CBAps1mpdFYBFFo/zbGVFp9Rj3Ga88CgA6IVSF1rfTSUrP48/M7WvzF9byuGbv3uVba0V dgfTbSG/nQZ3SKtbyN8Vo9tDvvO9qOedayYsLWwuElJgwGEGrNa6AADnMT9/kvp8eWpSc1GqdkRa odiZ+T1M545OBPH0j+/yTsEdyLIYXvuzJfbqtxbv7bp9D2l1o/WVZ2C3kN8cv6Tm6+UgLFEyU7lo dIDmcqsNXQCr/ImMEJ6WoN3yVr/vaBkmTF2DIEq7qCQa/D/92cP7skijlk38ye9cYkvXUh3z70Xr gQ9ubN8ZCXpDiZKerS3mWLBuc5yf5nIFCpxmwAIDGs4GbjKOU60sSzQc0NfyJZcKORqmE/Or/oOj PkzOhtFvKmQ1/P6/O19lvqMwTfl3ZJgL5Ft2Wi31a0qrwb+NQjjTsiGfVQy91v6bNGl543s75hPm 3kUU9VytMJZlLamqTuNxngGLtRLWVwqg0Gh0gKZS76+A0GLFkaGUyjQ1mJuGtW8wBoaj9/fhAxJN ZFkMz3/5Mtu4k99BILtnWDcnbztCfluFaN20URGC7plZ92sNb78TVsmLMAKLmsir9Q9PU7DrPC9a 8/MZCpyvld4hAKdZLlegZoAalmWdt9eQi8l02wZDhwZznrwdHOn/RM/L31xkKzcyOzAMLgxjrgzr 9uRto387hXDmX4F8Vyu/hgROP9LE6B5Ropp1upwErU4DMwAlI/t6qaRbgGjvaWNARQCq0Z9nKX6c plK6VYL2uh2klMqAWo4ZM1cJb2yw5n16/V7UKeZ1vPn9O23zPxiQ79D6GqNbmVlHglat3xHyWRuU AJAqbhBHFVKL5cXrHFeilRFAvXYOBABDIk9DIdEq0tSP7Iak1IKayfUE+c0NVvt+Xp/o2vnNyjSu q0B2z7D9hXx0Dfmoam5byG+j9fY6gJtgbZc3awUzif5mIEANnpcsIN6qUNPLAAAUkElEQVRwYaTz mC0DArRYVK3lwnuXwFjOrlJhO10L0Q3kO/05cGx1MesMvWfKZ3XmzjC4MIy1MKyXyxYa/Vnb+u8V 8sFsrXeBfNT9635o8kMtLZOZyJW3a4U0TfONVEq3Uqm81fwhiSYBiFOelyxLLOsGMd62Q+YTyXol XRpsp/t15t9LolRoWYncNcWGvPV9DjsyrNGt0/06tYcuEWTXkN+Gmfa7K+SjM+Q7USJZ2AB1fEg0 z3KvcZxsVvt/Z60augAAz7NUKm/pumyWdPUl26uUyUIrlbqG/Ob7dSyD4uVvL/UNBU48PISJI+F6 hl0y7MBAfoOh1ywM7Q29TpDvRIm7+VsOo4suJ9mNm7GYYgFKy33BTQgABoi0XE6Z68bFbzLQWued ubveELLXK9XOv3wXi9e20Q8SBA4/+ysPkUeemQLnunG1Mf8PDvK7Gdu7z+W3Qwk3yK+FB4Fhatgq rtYKqlv6Nw1DMWS5bFUmgBoFwLkWW23JQc7r5XhLYtaoMHWaI8IhANBVFbHJCRCQVq3HTpctVB5u XtrG0QdixNflPvxOxPMcDj8wQI49PETUkont9WJtR64z3w/qQIYrhMNd6+0Vf1eUQJvwtjCgUbCW 84vYLK4Q20jKYfufbRXSa2trfh14wURTF9C8GE+AFFFViXg8Pj4sDBKF9z7LwGCZJgKxGETZcTNH O61v8K+7mwbF1Xe2MH0sQgJ9uhjaF5Rw/OEhcvqpcRKISMTUKXLbFeDalwMZVeY0H8Oq/PbOzAYI RyMz7fdWwXIgQZNgXdl+i5TNYrXI9L35/KUvRSJeLZPJ60CqpQtw241BgLNEENa5vFVeH1Omfh6E KBUPhmA83tA4vd6vY+gU77+5AX9YJsMTXVw73yXJioCJwxGcenKMfOTTk2RyLkxiwz5IMg9mMpRL 5u603uluM99mTruJmmq07piJ2nuvKFEzDKtlKxl5XN0+XzOQNaZ/+W5+5c1EYlgDiAmst3xi3u22 cArE6fDwurmyohfViPodBZ7PAwyZtQ0Mzh6CKMt7ui7d0Cx88/eussWrKXz63BHiD/X3mniPT8TR U4M4emqwZgzpqoXkegG5lIrctopS3mC57TJKBQO6akIrGCgXDOhlE9Ri0FUThulAy11s1ao/t/bn 7VCi5ttund9FUOzu4EbmErG7Z0KovmXc+QbPG0blM3KrDRyql6KVqlfGnZECgaLnvtipB8blmRcZ YxwDEJ+awtjRub5dqaZ4BDz5V2bIw09PQBAP7pdCGAPUUmWPJGGVjSf2VnGtZILRimBbBoWuWihl dZSyOgopnWVWS9heKyK/paIzo+vvNc12EyyX7qRsFvH95a8TRisobzHz+bdL87+k0GwxlTqtAs+3 9P/V1FqIAOCAw0IkQhWfL+B/SPnkVwRO+jEA4HgOxx5/gkmitKt+lTX411+CYQUfe3aanPrY6IE5 /dNvKqQ0rF5J4/a72+zma1vQSpYrM5s1u+7WHgkuJd8ki9lrABgICE2oW88k+VuX1tYCJeC8jvpn YxqoXUsTYIaoqkAoLXF+yb8WECKfBxhhjIHjORIIO6+O6wz5zcGc7rabpppYeC+Jd3+wArVsIRL3 EMW7i28SHmCSPAIGpvw48tFBcuavTpHwiELWrmZhqqwLQ8/FlqgKj27pOJ94lTBWWbMxYXxnjSz+ XqmkqqqqG27Gn00dVG0dwHEyOkq5jJXcHhanz9ofjdTyeUTGx8ETHi3M3wHyOwsMg6FRLN9I480X lrF0PQ1qURKOe/63QwWOJxg6FMT4/RFy5c/X20I+aQP5zuHg9fS7JFneAFBp9ZSW+uWN3MZKLufT AK9t/PUkANX8YsjIa4TmCRf2RDZ8XPCnAcCiFqhpkNBAfNeQ30lg7NdssowbF7bwxneXsHwjDbVs kEBYgezZw1fKDxgFBhRce3EDWt5oC/n1cX8rSpSMHM4nXiGsMjsDC8ZL62TxP1uWVlbVYQN43b4T 0JV2UKt1oHiW+HwZUuQzW8P81GlCuBkAKBVyCETjkOx5gR4hvyWQm41qp8WA9GYZC+8l8cZ37+Dm xQQKeZ14fCJ8H9BXxvpFxbSOd/90BZZKd4B8wA0l3t76ASkYOTAABMzKYPsXC1ZiOZHI64DiOvRz UicBqArjEtSQRPyEJwKTLgX5yOdBiAgwlAs5MjBsf0Nwd5Df7WSMfb8OA0MureH2lRTefmEF7764 go07eRSyKmEUUD4E3xO2yTIovvHrl1l6uTJx0y3k236rhSXczF4itsqZVP9v6+z6H5ZKpqqqig5c qd0I2q4MO+3UqI0IolHIHBfynY08+k8V4vmCHWB87j4WHxnrC+S3i9PLdC4PguiQF6EhD4JhGcGY B6LMEUnmwfEcZA9fG76ZOoWpUxiqxcoFA2rBQClX+dWLJkyDwihb0MsmmMlqzcVzBLExH577RyfJ 4PTuJrOym2V8+zeusM0blS+j9DoCoJTi+3e/RopmAQADYyy5TK99IpEtruXzvjJw3qg23Z4EAHDM CwSDm8qoND0wF/nI9znCTzIG8IKAuYcfY7Ki9A3yne77eSBjt7tzx46G8dCzE+S+p0Z6PslsaBYu fmsVb//RHaYVzJbhnLMsNSRwEYYLyR+RxfzVWroFWvzHS+r8/xeNmsX5+ZMa8Lz99fC2zAc6fz3c JlZJaNYcGSkYK6t3s3FP5osxJfa7AINlGli6epHMnfoIA+H2R+v3mFb92Y7T3f06FbdK04/MBDH3 +BA58fgIwkMe9EpqwcCVP1/DO19bZaXqWkWniZ0WJHAIylpxBbfz1xxVs84vFC4+T6mpzc9Ts/qV 0I6aX6tfl+WvosDTwvR0RjFN5jslP/ElgVN+0g4wNDmD0ekjDguwVrq6w73S+pa86loPdDed6/GK mDk9gJlTMXLo9AACsd19zHrtWhbvf3eNXX9pE5ZWt8c6M7qxLDXmM6BsFfH9u18nBtXtUKU023ru ZmrhUsGXL2HzSaPdrJ8bdSsApPrHA2fEQKDoiUYHB09JZ79FQA6xaqkP3f8wC4Vj9Vg9GnrAB3cg gyMchqeDmD0zgNlTMTI+F+npdtFalpRh9f0Mbr2ZZDdf20J+s3H6t5PWd4L8CjspXtr4nySlbdXy s6HfsrRSKgUNWLA/Gb8j84HuugA4EqPArDk6eknPZDLbSax+ISaN/f8ERAYD7sxfInOnHmOyJNej 7QbyexCYvZy8HRj1YebBAUzdFyXT90fh2eU+hexmGXcuprByOc3uvJ1COWd0NObqjG7u/zv5ARdT bzUw32Dmn6yzW3+s63ktm6UGsLqj0ddMvYp4rSuIRJZljZe9j4ae+Dt+LvAv7TwVrw9HTj7CREHs mmH36uTtwIgfkyeimDwRITMPxBCI7g7WM+slrF7NYO16ji2/m0JmveTK6G5W8HaCfDvNW7nruJB6 zcEv69bdwvxPrOvFRD6fVoFxHTi/7wJgdwUcMC6GQpwSCES8Jz1P/GcR0k9Uyw5fMIwj951lvPOa uXsM+QLHYWgygKn7ohifi5Cp41H4d7EJpZw3sLmYw9ZiHus3cmz1cgaldLX/bepO3Ji5F8i3BWS1 uIQ3ki/WoIswFLfZxmdvpW9fGBvj1V6s/mbqvZOrCcEZHliVAoGIEg77wqfkJ75KCPeonX8wEsfs 8YcYD3JPIF+WOYwdCWNyLobxIyEycSwKxdv9lLFaNJBeLyG9XkJyuci2buexdSuPfFLripndjd97 6Q4q4ZPaBl7d/A6xmH04h5kFs/h3l4wbf1bp98d14Ad2v99x1s+NdiMAdjwOOMfH4wlJFNeUGDc8 MqWc+hpH+KM2Y2LDY5ieva/eXH2E/HBMweSxKMYOh8jEXAQj06GORptaMCqbQRIqcikVpbTOMptl pFaLSK+XUMrqOzBz90u1zvjdQj5hBBk9iR9sfrtm8QNgBVr81dvlO39oWelSOj2pOZjfE/TbtFsB AGqfmjkszM3xUiYje8aEqdkxz+zXCbhRoLI4ER0YxuzhkwyE2/P9OgJHMDgRwNGHhxCIyA1SRS0G rWTCKFusXDSgFS2UchoKCQ3ZpApTq39FvJfLFnpl5m5RohkJEtoGfrj1PSfzUbbK/3oVN7+Uz6dL 2SxVgVUTXcz2daK9CIDDHnhaiEZXJU2zPMfCD5wY8c5+jTDUvjQRCEUxe+whxtn31vYB8rux8t32 3aENMzvNAHbPzL2hhB3+bmkZbyZfJBarX05pUOMPl9i1f1Jhflzrdqp3J+rTIvsSK5dPskCgwDaL G5mgEvyhlwQ+DcJ8AKBrZRQySRKODYNzXF7cbyvfObHTjvm72Z1bN9TahG+DEu2sfLcNnXbqtws3 8db2S4TafT4AE8ZX1/I3/5+0mijlcroOnDKrX/3aE/OBvgkA4BSCtdzqtkf0vOQRAp/kQEIAoBsq suktEgwNQODt8XZnyG9wqz3bcdpvze7ETPu91925XTOzqSwNVn5TfKdgMcrwfvYdcjn9JnEcfGRl U/ut68Xzv1mwssVcztCAJ43dWvxu1OdtNnUhKKCQMQzjeyE58jhA4gBgmjq2E3eJrHjhqX+aYBeQ /0EdyCAukO+CEg1pN6FEU3wCQLNU/Cj5fXKneLNWdQJCNVr+4gpu/E65nC/vB/OBvgsAYAvB+HiG rmxvFyhT/ywsDXyEEG4UABizkNneILqhkWAwBuI8nugqEE6/D/pARiNk1/1cUKKp/3eDfABIltfx 8ta3Sdao3+ZBCNGyNPdL67jyx/l8vlyB/f4zH9gXAQCAJba9HWEzMzzLGXk1icK3ohiI8IQ7abdB qZhDLrNF/MEoRN6x+bOtDXBwD2Q447dCvjtKUEZxNXsB76RfISY1alWmBMs5mvmbK+qtv5Bluby5 6deBoAG8YI/z+8b8Ss36T47RwWEeGBeDwQUpGIx5JskDz4Xl6L8ijNmfIgMhHOKD4xgdPcZ4zjlK 2NnQgwsz0YGZdvHarfO3hu/vdK6d9nZ5A++kXyU5I9PQcBboiyvlhV8pkfKGrhe0dFrX+zHU60T7 vNU2xYCzTNMMGo0yulG+u8Bbxvd8QvgMIWQIqMwWFIsZbG/fJZLsgUf2oztDz0YCONxIk9buAiV6 MPR6hXyDariYep1cSL9ONKrWWokAlk7Lv7VovvPPLE5Lh0KWuro6rgOX9jTJ0w3tBwI0p80BZzhg U4hGFVHXIUcioeBx8aF/KnDKz4PRhvnaSHgQoyPHmEfx7/m6dNfwNkq0tQ3Q4/i9fXdgp0WZiVu5 67iWe5fotPG6HEas61k9+2vz+sbbopFQs0pYx2bJrBzn2l/mV0u/79TQJcTj46KmLUimNCTPeUdO DApjv8kT4ZFKUHsARBAODmBseI4FPeF6Qdsws+7XKzP3dzqXWhZuFeYxn3uPqFaxoVEYWFk19d9e K1z77ZRVzosi1SuQ/6hVNfYY9pn5lRrcGyL1v3M8sChEImnRMDhJFKnn/tATPxPg/P+EEVbhdtUG ICAIBQcxPniEBX2RJiRo7Q7aocS9ns41LAO3CtdxM/teA9TbZDHre1vq5r9YppklQd/UZPmwnkjA 3Ou8/m7oXgmAM68qGjwtIA4hpC+KkhSQQ2JsZFqe+2WB8D9NQGoL9TYmeJUg4pFJNhgegyJU9uTt z3RuY/xuUQKUYUNdw0rhJrlbugOL1S17R13ez9HSv9tit75PaVlTVaqnUqpR1XqnlX9PmA/cWwFw 5ulAg9f5uTmfsLZGJFn2SQNibHREGv37Hk75PCXwNkZlIIQg5B/EUHiKDQSGIJDKENK9/99L374z SjAAOS2N5eICWSksQLXKVc418o8S60JJL3/pLi69YFk+zePh9KXyuoHNQHNf3xp5n+mDEABnvlU0 OMcBi0I0mhUMQxBl2SeFpcHhSWnwF0Te83OEoeGLpqg+ERD4PRFEvHGE/UMs6omBI3zH4eBeIb9o 5LFVXkeivEaS5XVotP69wOYSWsx6q0xLX7pLL79sWT5NVTNGVpo1UIH7ZiPvnjLepg9KAJz5O/4O 80CItwVBUXgxKnpCQ+LcTyiC97Mc4z/KwOrbjGo/lQeO8Ah6IvDLIQTkKPPKAXgFHxTB0zBk7GYF z2QmVL2AnJFHQc8gp22TtJ5AyXRcoW9HcRaGsE2dGd8q0NTz22zrSiZT1AcG/MbSUtgEYFYuany+ eVLnA2E+8MELgE1NglBBhLm5Ar+xURYUJSyKIhHj/MBkiBv/nMCkv8oTcgioM79OrYzhCAeJVyAK CmROAk8qI0+Bk0CZCcoYGLOgWxo0qsOwytAtrSFN1pBoYx4MtMyY8UJB17++jdsvb5m8FpbyRrls Gum03wSi1kFjvE0HRQBschGEBIc4hIi5zJumJFCqCbLMi1PS8UMeIfiIIooPC0R8CgyDbt1EIzXe auMe0iVOg1flAgYG67oG40eapr+aMu++YXiyhXTaMnheN4eHPeb8vN8CshYQsm/nPlCMt+mgCYBN thAA9Z1HHBDi4/EAZ1aFweuVeEnShHyeE+dCR++T4PuYyIn38+COMsIfIszxsWTWjBVtILwhRMWN AglQOm8yY94w1bdydPVHm0Ymw/OyWS5rFs/rJs9L1atYjzu1vbl/PzCMt+mgCoBNTmPRgQoXCKBy QJSLRku8Zek8pV7O65V4yxJ5SrO8zxeS4+bAKA/vpCx6xsFYnIcQ4TiEwEjl/npC/ABUMNNkBAYF y4LStAlkDKhrFrFWMjR7R6V3MzwvWKmUbhHCU45TLZ6XrMFBkVY0PUCrTG+n6QeO8TYddAGwibj8 2gJBgAQHLBAMGdxcOMxtbRkcpSZHqZcLBCjJ5ShhzOK8Xi8pFinxer3umRCVlUol5vcHWLFYYoQI lONKNBKJslyuQFP8OEUiTysMX2WVmzdbzuEdeKY76cMiAE4iLs9NAnGBAOMEWCDAEAFWCTAExKNk Lrrets6p1AhLJFIM2AQwziqfV7O/sHWaVT61ct7J4A8l0530YRSAZnITCPvZxe9M9XW2qe6LDDhv vzgZ6cbcds8fOvpfMzvdLlvhNv4AAAAASUVORK5CYII= "
+     height="1365.3334"
+     width="1365.3334" /></svg>
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/logo64-2.png b/emacs/.emacs.d/elpa/ement-0.17/images/logo64-2.png
new file mode 100644
index 0000000..6e2a746
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/logo64-2.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/logo64.png b/emacs/.emacs.d/elpa/ement-0.17/images/logo64.png
new file mode 100644
index 0000000..ce31a42
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/logo64.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/reactions.png b/emacs/.emacs.d/elpa/ement-0.17/images/reactions.png
new file mode 100644
index 0000000..e97024b
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/reactions.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/screenshot.png b/emacs/.emacs.d/elpa/ement-0.17/images/screenshot.png
new file mode 100644
index 0000000..5dd638c
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/screenshot.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/screenshot2.png b/emacs/.emacs.d/elpa/ement-0.17/images/screenshot2.png
new file mode 100644
index 0000000..a32b40a
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/screenshot2.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/screenshot3.png b/emacs/.emacs.d/elpa/ement-0.17/images/screenshot3.png
new file mode 100644
index 0000000..5d11958
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/screenshot3.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/screenshot4.png b/emacs/.emacs.d/elpa/ement-0.17/images/screenshot4.png
new file mode 100644
index 0000000..34c66e9
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/screenshot4.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/screenshot5.png b/emacs/.emacs.d/elpa/ement-0.17/images/screenshot5.png
new file mode 100644
index 0000000..ea1e624
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/screenshot5.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/images/transient.png b/emacs/.emacs.d/elpa/ement-0.17/images/transient.png
new file mode 100644
index 0000000..cbdae92
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/images/transient.png differ
diff --git a/emacs/.emacs.d/elpa/ement-0.17/tests/ement-tests.el b/emacs/.emacs.d/elpa/ement-0.17/tests/ement-tests.el
new file mode 100644
index 0000000..b10e8a4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ement-0.17/tests/ement-tests.el
@@ -0,0 +1,58 @@
+;;; ement-tests.el --- Tests for Ement.el                  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; 
+
+;;; Code:
+
+(require 'ert)
+(require 'map)
+
+(require 'ement-lib)
+
+;;;; Tests
+
+(ert-deftest ement--format-body-mentions ()
+  (let ((room (make-ement-room
+               :members (map-into
+                         `(("@foo:matrix.org" . ,(make-ement-user :id "@foo:matrix.org"
+                                                                  :displayname "foo"))
+                           ("@bar:matrix.org" . ,(make-ement-user :id "@bar:matrix.org"
+                                                                  :displayname "bar")))
+                         '(hash-table :test equal)))))
+    (should (equal (ement--format-body-mentions "@foo: hi" room)
+                   "<a href=\"https://matrix.to/#/@foo:matrix.org\">foo</a>: hi"))
+    (should (equal (ement--format-body-mentions "@foo:matrix.org: hi" room)
+                   "<a href=\"https://matrix.to/#/@foo:matrix.org\">foo</a>: hi"))
+    (should (equal (ement--format-body-mentions "foo: hi" room)
+                   "<a href=\"https://matrix.to/#/@foo:matrix.org\">foo</a>: hi"))
+    (should (equal (ement--format-body-mentions "@foo and @bar:matrix.org: hi" room)
+                   "<a href=\"https://matrix.to/#/@foo:matrix.org\">foo</a> and <a href=\"https://matrix.to/#/@bar:matrix.org\">bar</a>: hi"))
+    (should (equal (ement--format-body-mentions "foo: how about you and @bar ..." room)
+                   "<a href=\"https://matrix.to/#/@foo:matrix.org\">foo</a>: how about you and <a href=\"https://matrix.to/#/@bar:matrix.org\">bar</a> ..."))
+    (should (equal (ement--format-body-mentions "Hello, @foo:matrix.org." room)
+                   "Hello, <a href=\"https://matrix.to/#/@foo:matrix.org\">foo</a>."))
+    (should (equal (ement--format-body-mentions "Hello, @foo:matrix.org, how are you?" room)
+                   "Hello, <a href=\"https://matrix.to/#/@foo:matrix.org\">foo</a>, how are you?"))))
+
+(provide 'ement-tests)
+
+;;; ement-tests.el ends here
diff --git a/emacs/.emacs.d/elpa/ement-0.17/tests/ement-tests.elc b/emacs/.emacs.d/elpa/ement-0.17/tests/ement-tests.elc
new file mode 100644
index 0000000..7b601aa
Binary files /dev/null and b/emacs/.emacs.d/elpa/ement-0.17/tests/ement-tests.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/dir b/emacs/.emacs.d/elpa/evil-20260728.1438/dir
new file mode 100644
index 0000000..b3717a5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/dir
@@ -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
+* evil: (evil.info).            Extensible vi layer for Emacs
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-autoloads.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-autoloads.el
new file mode 100644
index 0000000..dc55014
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-autoloads.el
@@ -0,0 +1,111 @@
+;;; evil-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from evil-command-window.el
+
+(register-definition-prefixes "evil-command-window" '("evil-"))
+
+
+;;; Generated autoloads from evil-commands.el
+
+(register-definition-prefixes "evil-commands" '("evil-"))
+
+
+;;; Generated autoloads from evil-common.el
+
+(register-definition-prefixes "evil-common" '("bounds-of-evil-" "evil-" "forward-evil-"))
+
+
+;;; Generated autoloads from evil-core.el
+
+ (autoload 'evil-mode "evil" nil t)
+(register-definition-prefixes "evil-core" '("evil-" "turn-o"))
+
+
+;;; Generated autoloads from evil-digraphs.el
+
+(autoload 'evil-digraph "evil-digraphs" "\
+Convert DIGRAPH to character or list representation.
+If DIGRAPH is a list (CHAR1 CHAR2), return the corresponding character;
+if DIGRAPH is a character, return the corresponding list.
+Searches in `evil-digraphs-table-user' and `evil-digraphs-table'.
+
+(fn DIGRAPH)")
+(register-definition-prefixes "evil-digraphs" '("evil-digraphs-table"))
+
+
+;;; Generated autoloads from evil-ex.el
+
+(register-definition-prefixes "evil-ex" '("evil-"))
+
+
+;;; Generated autoloads from evil-integration.el
+
+(register-definition-prefixes "evil-integration" '("evil-"))
+
+
+;;; Generated autoloads from evil-jumps.el
+
+(register-definition-prefixes "evil-jumps" '("evil-"))
+
+
+;;; Generated autoloads from evil-keybindings.el
+
+(register-definition-prefixes "evil-keybindings" '("evil--set-motion-state"))
+
+
+;;; Generated autoloads from evil-macros.el
+
+(register-definition-prefixes "evil-macros" '("evil-"))
+
+
+;;; Generated autoloads from evil-maps.el
+
+(register-definition-prefixes "evil-maps" '("evil-"))
+
+
+;;; Generated autoloads from evil-repeat.el
+
+(register-definition-prefixes "evil-repeat" '("evil-"))
+
+
+;;; Generated autoloads from evil-search.el
+
+(register-definition-prefixes "evil-search" '("evil-"))
+
+
+;;; Generated autoloads from evil-states.el
+
+(register-definition-prefixes "evil-states" '("evil-"))
+
+
+;;; Generated autoloads from evil-types.el
+
+(register-definition-prefixes "evil-types" '("evil-ex-get-optional-register-and-count"))
+
+
+;;; Generated autoloads from evil-vars.el
+
+(register-definition-prefixes "evil-vars" '("evil-"))
+
+;;; End of scraped data
+
+(provide 'evil-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; evil-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-command-window.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-command-window.el
new file mode 100644
index 0000000..51b3479
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-command-window.el
@@ -0,0 +1,190 @@
+;;; evil-command-window.el --- Evil command-line window  -*- lexical-binding: t -*-
+;; Author: Emanuel Evans <emanuel.evans at gmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This provides an implementation of the Vim command-line window for
+;; editing and repeating past Ex commands and searches.
+
+;;; Code:
+
+(require 'evil-vars)
+(require 'evil-common)
+(require 'evil-ex)
+(require 'evil-search)
+
+(defvar evil-search-module)
+
+(defvar evil-command-window-current-buffer nil
+  "The buffer from which the command-line window was called.")
+
+(defvar evil-command-window-execute-fn nil
+  "The command to execute when exiting the command-line window.")
+
+(defvar evil--command-window-prompt nil
+  "The key for the command that opened the command-line window (:, /, or ?).")
+
+(define-derived-mode evil-command-window-mode fundamental-mode "Evil-cmd"
+  "Major mode for the Evil command-line window."
+  (add-hook 'after-change-functions #'evil--command-window-draw-prefix nil t)
+  (auto-fill-mode 0))
+
+(defun evil-command-window (history prompt execute-fn)
+  "Open a command-line window for HISTORY with PROMPT and EXECUTE-FN.
+HISTORY should be a list of commands.  PROMPT should be the
+command-line prompt (one of \":\", \"/\" or \"?\").  EXECUTE-FN should
+be a unary function to execute on the result that the user selects.
+
+If called interactively, edit this minibuffer argument."
+  (interactive
+   (list (cons (minibuffer-contents) (minibuffer-history-value))
+         (or (minibuffer-prompt) (user-error "Minibuffer is inactive"))
+         #'evil--command-window-minibuffer-execute))
+  (when (derived-mode-p 'evil-command-window-mode)
+    (user-error "Command-line window is already open"))
+  (when (evil-ex-p) (evil-ex-teardown))
+  (let ((previous-buffer (current-buffer))
+        (buffer (get-buffer-create "*Command Line*")))
+    (with-current-buffer buffer
+      (erase-buffer)
+      (evil-command-window-mode)
+      (setq-local evil-command-window-current-buffer previous-buffer)
+      (setq-local evil-command-window-execute-fn execute-fn)
+      (setq-local evil--command-window-prompt prompt)
+      (evil--command-window-insert-commands history))
+
+    (let* ((action
+            `((display-buffer-reuse-window display-buffer-at-bottom)
+              ,@(unless (zerop evil-command-window-height)
+                  `((window-height body-lines . ,evil-command-window-height)
+                    (preserve-size nil . t)))
+              (dedicated . t)))
+           (window (display-buffer buffer action))
+           (delete-window-fun
+            (lambda (window)
+              (set-window-parameter window 'delete-window nil)
+              (delete-window window)
+              (switch-to-minibuffer))))
+      (when (minibufferp)
+        (set-window-parameter window 'delete-window delete-window-fun))
+      (select-window window)))
+  (goto-char (point-max))
+  (unless (bobp) (backward-char) (evil-adjust-cursor)))
+
+(defun evil--command-window-draw-prefix (beg end _old-len)
+  "Display `evil--command-window-prompt' as a prefix of the changed lines."
+  (let ((prefix (propertize evil--command-window-prompt
+                            'font-lock-face 'minibuffer-prompt)))
+    (put-text-property beg end 'line-prefix prefix)))
+
+(defun evil--command-window-insert-commands (history)
+  "Insert the commands in HISTORY."
+  (let ((inhibit-modification-hooks t))
+    (dolist (cmd (reverse history)) (insert cmd "\n"))
+    (evil--command-window-draw-prefix (point-min) (point-max) nil)))
+
+(defun evil-command-window-execute ()
+  "Execute the command on the current line in the appropriate buffer.
+The local variable `evil-command-window-execute-fn' determines which
+function to execute."
+  (interactive)
+  (let ((result (buffer-substring-no-properties
+                 (line-beginning-position) (line-end-position)))
+        (original-buffer evil-command-window-current-buffer)
+        (execute-fn evil-command-window-execute-fn))
+    (let ((ignore-window-parameters t))
+      (ignore-errors (kill-buffer-and-window)))
+    (unless (buffer-live-p original-buffer)
+      (user-error "Originating buffer is no longer active"))
+    (let ((window (get-buffer-window original-buffer)))
+      (when window (select-window window)))
+    (with-current-buffer original-buffer (funcall execute-fn result))))
+
+(defun evil--command-window-minibuffer-execute (result)
+  "Terminate this minibuffer argument with RESULT."
+  (delete-minibuffer-contents)
+  (insert result)
+  (exit-minibuffer))
+
+(defun evil-command-window-ex (&optional current-command)
+  "Open a command-line window for editing and executing Ex commands.
+If CURRENT-COMMAND is present, it will be inserted under the cursor as
+the current command to be edited."
+  (interactive)
+  (evil-command-window (cons (or current-command "") evil-ex-history)
+                       ":"
+                       #'evil-command-window-ex-execute))
+
+(define-obsolete-function-alias
+  'evil-ex-command-window #'evil-command-window "1.15.0"
+  "Start command window with Ex history and current minibuffer content.")
+
+(define-obsolete-function-alias
+  'evil-ex-search-command-window #'evil-command-window "1.15.0"
+  "Start command window with search history and current minibuffer content.")
+
+(defun evil-command-window-ex-execute (result)
+  "Execute RESULT as an Ex command."
+  (unless (string-match-p "\\`[ \t\n\r]*\\'" result)
+    (unless (equal result (car evil-ex-history))
+      (push result evil-ex-history))
+    (evil-ex-execute result)))
+
+(defun evil--command-window-search (forward)
+  "Open a command-line window for searches."
+  (evil-command-window
+   (cons "" (cond ((eq evil-search-module 'evil-search)
+                   evil-ex-search-history)
+                  (forward evil-search-forward-history)
+                  (t evil-search-backward-history)))
+   (evil-search-prompt forward)
+   (lambda (result) (evil-command-window-search-execute result forward))))
+
+(defun evil-command-window-search-forward ()
+  "Open a command-line window for forward searches."
+  (interactive)
+  (evil--command-window-search t))
+
+(defun evil-command-window-search-backward ()
+  "Open a command-line window for backward searches."
+  (interactive)
+  (evil--command-window-search nil))
+
+(defun evil-command-window-search-execute (result forward)
+  "Search for RESULT using FORWARD to determine direction."
+  (unless (string= result "")
+    (if (eq evil-search-module 'evil-search)
+        (progn
+          (setq evil-ex-search-pattern (evil-ex-make-search-pattern result)
+                evil-ex-search-direction (if forward 'forward 'backward))
+          (unless (equal result (car evil-ex-search-history))
+            (push result evil-ex-search-history))
+          (evil-ex-search))
+      (evil-push-search-history result forward)
+      (evil-search result forward evil-regexp-search))))
+
+(provide 'evil-command-window)
+
+;;; evil-command-window.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-command-window.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-command-window.elc
new file mode 100644
index 0000000..180396f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-command-window.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-commands.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-commands.el
new file mode 100644
index 0000000..a44c1d3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-commands.el
@@ -0,0 +1,5290 @@
+;;; evil-commands.el --- Evil commands and operators -*- lexical-binding: t -*-
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'evil-common)
+(require 'evil-search)
+(require 'evil-states)
+(require 'evil-ex)
+(require 'evil-types)
+(require 'evil-command-window)
+(require 'evil-jumps)
+(require 'evil-vars)
+(require 'cl-lib)
+(require 'reveal)
+
+(declare-function imenu--in-alist "imenu")
+
+;;; Motions
+
+;; Movement commands, or motions, are defined with the macro
+;; `evil-define-motion'. A motion is a command with an optional
+;; argument COUNT (interactively accessed by the code "<c>").
+;; It may specify the :type command property (e.g., :type line),
+;; which determines how it is handled by an operator command.
+;; Furthermore, the command must have the command properties
+;; :keep-visual t and :repeat motion; these are automatically
+;; set by the `evil-define-motion' macro.
+
+(evil-define-motion evil-forward-char (count &optional crosslines noerror)
+  "Move cursor to the right by COUNT characters.
+Movement is restricted to the current line unless CROSSLINES is non-nil.
+If NOERROR is non-nil, don't signal an error upon reaching the end
+of the line or the buffer; just return nil."
+  :type exclusive
+  (interactive "<c>" (list evil-cross-lines
+                           (evil-kbd-macro-suppress-motion-error)))
+  (cond
+   ((not crosslines)
+    ;; For efficiency, narrow the buffer to the projected
+    ;; movement before determining the current line
+    (evil-with-restriction nil (min (+ (point) (or count 1) 1) (point-max))
+      (condition-case err
+          (evil-narrow-to-line (forward-char count))
+        (error
+         ;; Restore the previous command (this one never happened).
+         ;; This preserves the current column if the previous command
+         ;; was `evil-next-line' or `evil-previous-line'.
+         (setq this-command last-command)
+         (unless noerror (signal (car err) (cdr err)))))))
+   (noerror (ignore-errors (evil-forward-char count crosslines)))
+   (t (evil-motion-loop (nil (or count 1))
+        (forward-char)
+        ;; don't put the cursor on a newline
+        (or evil-move-beyond-eol
+            (evil-visual-state-p) (evil-operator-state-p)
+            (not (eolp)) (bolp)
+            (forward-char))))))
+
+(evil-define-motion evil-backward-char (count &optional crosslines noerror)
+  "Move cursor to the left by COUNT characters.
+Movement is restricted to the current line unless CROSSLINES is non-nil.
+If NOERROR is non-nil, don't signal an error upon reaching the beginning
+of the line or the buffer; just return nil."
+  :type exclusive
+  (interactive "<c>" (list evil-cross-lines
+                           (evil-kbd-macro-suppress-motion-error)))
+  (cond
+   ((not crosslines)
+    ;; Restrict movement to the current line
+    (evil-with-restriction
+        (max (- (point) (or count 1)) (point-min))
+        (min (1+ (point)) (point-max))
+      (condition-case err
+          (evil-narrow-to-line (backward-char count))
+        (error
+         ;; Restore the previous command (this one never happened).
+         ;; This preserves the current column if the previous command
+         ;; was `evil-next-line' or `evil-previous-line'.
+         (setq this-command last-command)
+         (unless noerror (signal (car err) (cdr err)))))))
+   (noerror (ignore-errors (evil-backward-char count crosslines)))
+   (t (evil-motion-loop (nil (or count 1))
+        (backward-char)
+        ;; don't put the cursor on a newline
+        (unless (or (evil-visual-state-p) (evil-operator-state-p))
+          (evil-adjust-cursor))))))
+
+(evil-define-motion evil-next-line (count)
+  "Move the cursor COUNT lines down."
+  :type line
+  (let (line-move-visual)
+    (evil-line-move (or count 1))))
+
+(evil-define-motion evil-previous-line (count)
+  "Move the cursor COUNT lines up."
+  :type line
+  (let (line-move-visual)
+    (evil-line-move (- (or count 1)))))
+
+(evil-define-motion evil-next-visual-line (count)
+  "Move the cursor COUNT screen lines down."
+  :type exclusive
+  (let ((line-move-visual t))
+    (evil-line-move (or count 1))))
+
+(evil-define-motion evil-previous-visual-line (count)
+  "Move the cursor COUNT screen lines up."
+  :type exclusive
+  (let ((line-move-visual t))
+    (evil-line-move (- (or count 1)))))
+
+;; Used for repeated commands like "dd"
+(evil-define-motion evil-line (count)
+  "Move COUNT - 1 lines down."
+  :type line
+  (let (line-move-visual)
+    (evil-line-move (1- (or count 1)) t)))
+
+(evil-define-motion evil-line-or-visual-line (count)
+  "Move COUNT - 1 lines down."
+  :type screen-line
+  (let ((line-move-visual (and evil-respect-visual-line-mode
+                               visual-line-mode)))
+    (evil-line-move (1- (or count 1)) t)))
+
+(evil-define-motion evil-beginning-of-line ()
+  "Move the cursor to the beginning of the current line."
+  :type exclusive
+  (move-beginning-of-line nil))
+
+(evil-define-motion evil-end-of-line (count)
+  "Move the cursor to the end of the current line.
+If COUNT is given, move COUNT - 1 lines downward first."
+  :type inclusive
+  (move-end-of-line count)
+  (when evil-track-eol
+    (setq temporary-goal-column most-positive-fixnum
+          this-command 'next-line))
+  (let ((evil-move-beyond-eol
+         (if (evil-visual-state-p) (not evil-v$-excludes-newline)
+           evil-move-beyond-eol)))
+    (evil-adjust-cursor))
+  ;; Prevent "c$" and "d$" from deleting blank lines
+  (when (eolp) (setq evil-this-type 'exclusive)))
+
+(evil-define-motion evil-beginning-of-visual-line ()
+  "Move the cursor to the first character of the current screen line."
+  :type exclusive
+  (beginning-of-visual-line))
+
+(evil-define-motion evil-end-of-visual-line (count)
+  "Move the cursor to the last character of the current screen line.
+If COUNT is given, move COUNT - 1 screen lines downward first."
+  :type inclusive
+  (end-of-visual-line count)
+  (evil-move-cursor-back t))
+
+(evil-define-motion evil-end-of-line-or-visual-line (count)
+  "Move the cursor to the last character of the current screen
+line if `visual-line-mode' is active and
+`evil-respect-visual-line-mode' is non-nil.  If COUNT is given,
+move COUNT - 1 screen lines downward first."
+  :type inclusive
+  (if (and evil-respect-visual-line-mode
+           visual-line-mode)
+      (evil-end-of-visual-line count)
+    (evil-end-of-line count)))
+
+(evil-define-motion evil-middle-of-visual-line ()
+  "Move the cursor to the middle of the current visual line."
+  :type exclusive
+  (beginning-of-visual-line)
+  (evil-with-restriction
+      nil
+      (save-excursion (end-of-visual-line) (point))
+    (move-to-column
+     (+ (current-column) -1 (/ (window-body-width) 2)))))
+
+(evil-define-motion evil-percentage-of-line (count)
+  "Move the cursor to COUNT % of the width of the current line.
+If no COUNT is given, default to 50%."
+  :type exclusive
+  (let ((line-length (- (line-end-position) (line-beginning-position)
+                        (if evil-move-beyond-eol -1 0))))
+    (move-to-column (truncate (* line-length (or count 50)) 100))))
+
+(evil-define-motion evil-first-non-blank ()
+  "Move the cursor to the first non-blank character of the current line."
+  :type exclusive
+  (evil-narrow-to-line (back-to-indentation)))
+
+(evil-define-motion evil-last-non-blank (count)
+  "Move the cursor to the last non-blank character of the current line.
+If COUNT is given, move COUNT - 1 lines downward first."
+  :type inclusive
+  (evil-move-end-of-line count)
+  (skip-chars-backward " \t")
+  (unless (bolp) (backward-char)))
+
+(evil-define-motion evil-first-non-blank-of-visual-line ()
+  "Move the cursor to the first non blank character
+of the current screen line."
+  :type exclusive
+  (evil-beginning-of-visual-line)
+  (skip-chars-forward " \t\r"))
+
+(evil-define-motion evil-next-line-first-non-blank (count)
+  "Move the cursor COUNT lines down on the first non-blank character."
+  :type line
+  (let ((this-command this-command))
+    (evil-next-line (or count 1)))
+  (evil-first-non-blank))
+
+(evil-define-motion evil-next-line-1-first-non-blank (count)
+  "Move the cursor COUNT-1 lines down on the first non-blank character."
+  :type line
+  (let ((this-command this-command))
+    (evil-next-line (1- (or count 1))))
+  (evil-first-non-blank))
+
+(evil-define-motion evil-previous-line-first-non-blank (count)
+  "Move the cursor COUNT lines up on the first non-blank character."
+  :type line
+  (let ((this-command this-command))
+    (evil-previous-line (or count 1)))
+  (evil-first-non-blank))
+
+(evil-define-motion evil-goto-line (count)
+  "Go to line COUNT. By default the last line."
+  :jump t
+  :type line
+  (evil-ensure-column
+    (if (null count)
+        (progn
+          (goto-char (point-max))
+          (when (and (eq (current-buffer) (window-buffer))
+                     (> (point) (window-end nil t)))
+            ;; If the end of the buffer is not already on the screen, scroll to
+            ;; position it near the bottom.
+            (overlay-recenter (point))
+            (recenter (and (< 100 scroll-conservatively) -1))))
+      (goto-char (point-min))
+      (forward-line (1- count)))))
+
+(evil-define-motion evil-goto-first-line (count)
+  "Go to line COUNT. By default the first line."
+  :jump t
+  :type line
+  (evil-goto-line (or count 1)))
+
+(evil-define-motion evil-forward-word-begin (count &optional bigword)
+  "Move the cursor to the beginning of the COUNT-th next word.
+If BIGWORD is non-nil, move by WORDS.
+
+If this command is called in operator-pending state it behaves
+differently. If point reaches the beginning of a word on a new
+line point is moved back to the end of the previous line.
+
+If called after a change operator, i.e. cw or cW,
+`evil-want-change-word-to-end' is non-nil and point is on a word,
+then both behave like ce or cE.
+
+If point is at the end of the buffer and cannot be moved then
+`end-of-buffer' is signaled."
+  :type exclusive
+  (let ((thing (if bigword 'evil-WORD 'evil-word))
+        (orig (point))
+        (count (or count 1)))
+    (evil-signal-at-bob-or-eob count)
+    (cond
+     ;; default motion, beginning of next word
+     ((not (evil-operator-state-p))
+      (evil-forward-beginning thing count))
+     ;; the evil-change operator, maybe behave like ce or cE
+     ((and evil-want-change-word-to-end
+           (memq evil-this-operator evil-change-commands)
+           (< orig (or (cdr-safe (bounds-of-thing-at-point thing)) orig)))
+      ;; forward-thing moves point to the correct position because
+      ;; this is an exclusive motion
+      (forward-thing thing count))
+     ;; operator state
+     (t
+      (prog1 (evil-forward-beginning thing count)
+        ;; if we reached the beginning of a word on a new line in
+        ;; Operator-Pending state, go back to the end of the previous
+        ;; line
+        (when (and (> (line-beginning-position) orig)
+                   (looking-back "^[[:space:]]*" (line-beginning-position)))
+          ;; move cursor back as long as the line contains only
+          ;; whitespaces and is non-empty
+          (evil-move-end-of-line 0)
+          ;; skip non-empty lines containing only spaces
+          (while (and (looking-back "^[[:space:]]+$" (line-beginning-position))
+                      (not (<= (line-beginning-position) orig)))
+            (evil-move-end-of-line 0))
+          ;; but if the previous line is empty, delete this line
+          (when (bolp) (forward-char))))))))
+
+(evil-define-motion evil-forward-word-end (count &optional bigword)
+  "Move the cursor to the end of the COUNT-th next word.
+If BIGWORD is non-nil, move by WORDS."
+  :type inclusive
+  (let ((thing (if bigword 'evil-WORD 'evil-word))
+        (count (or count 1)))
+    (evil-signal-at-bob-or-eob count)
+    ;; Evil special behaviour: e or E on a one-character word in
+    ;; operator state does not move point
+    (unless (and (evil-operator-state-p)
+                 (= 1 count)
+                 (let ((bnd (bounds-of-thing-at-point thing)))
+                   (and bnd
+                        (= (car bnd) (point))
+                        (= (cdr bnd) (1+ (point)))))
+                 (looking-at "[[:word:]]"))
+      (evil-forward-end thing count))))
+
+(evil-define-motion evil-backward-word-begin (count &optional bigword)
+  "Move the cursor to the beginning of the COUNT-th previous word.
+If BIGWORD is non-nil, move by WORDS."
+  :type exclusive
+  (let ((thing (if bigword 'evil-WORD 'evil-word)))
+    (evil-signal-at-bob-or-eob (- (or count 1)))
+    (evil-backward-beginning thing count)))
+
+(evil-define-motion evil-backward-word-end (count &optional bigword)
+  "Move the cursor to the end of the COUNT-th previous word.
+If BIGWORD is non-nil, move by WORDS."
+  :type inclusive
+  (let ((thing (if bigword 'evil-WORD 'evil-word)))
+    (evil-signal-at-bob-or-eob (- (or count 1)))
+    (evil-backward-end thing count)))
+
+(evil-define-motion evil-forward-WORD-begin (count)
+  "Move the cursor to the beginning of the COUNT-th next WORD."
+  :type exclusive
+  (evil-forward-word-begin count t))
+
+(evil-define-motion evil-forward-WORD-end (count)
+  "Move the cursor to the end of the COUNT-th next WORD."
+  :type inclusive
+  (evil-forward-word-end count t))
+
+(evil-define-motion evil-backward-WORD-begin (count)
+  "Move the cursor to the beginning of the COUNT-th previous WORD."
+  :type exclusive
+  (evil-backward-word-begin count t))
+
+(evil-define-motion evil-backward-WORD-end (count)
+  "Move the cursor to the end of the COUNT-th previous WORD."
+  :type inclusive
+  (evil-backward-word-end count t))
+
+;; section movement
+(evil-define-motion evil-forward-section-begin (count)
+  "Move the cursor to the beginning of the COUNT-th next section."
+  :jump t
+  :type exclusive
+  (evil-signal-at-bob-or-eob count)
+  (evil-forward-beginning 'evil-defun count))
+
+(evil-define-motion evil-forward-section-end (count)
+  "Move the cursor to the end of the COUNT-th next section."
+  :jump t
+  :type inclusive
+  (evil-signal-at-bob-or-eob count)
+  (evil-forward-end 'evil-defun count)
+  (unless (eobp) (forward-line)))
+
+(evil-define-motion evil-backward-section-begin (count)
+  "Move the cursor to the beginning of the COUNT-th previous section."
+  :jump t
+  :type exclusive
+  (evil-signal-at-bob-or-eob (- (or count 1)))
+  (evil-backward-beginning 'evil-defun count))
+
+(evil-define-motion evil-backward-section-end (count)
+  "Move the cursor to the end of the COUNT-th previous section."
+  :jump t
+  :type inclusive
+  (evil-signal-at-bob-or-eob (- (or count 1)))
+  (end-of-line -1)
+  (evil-backward-end 'evil-defun count)
+  (unless (eobp) (forward-line)))
+
+(evil-define-motion evil-forward-sentence-begin (count)
+  "Move to the next COUNT-th beginning of a sentence or end of a paragraph."
+  :jump t
+  :type exclusive
+  (evil-signal-at-bob-or-eob count)
+  (evil-forward-nearest count
+                        #'(lambda (_cnt)
+                            (evil-forward-beginning 'evil-sentence))
+                        #'evil-forward-paragraph))
+
+(evil-define-motion evil-backward-sentence-begin (count)
+  "Move to the previous COUNT-th beginning of a sentence or paragraph."
+  :jump t
+  :type exclusive
+  (evil-signal-at-bob-or-eob (- (or count 1)))
+  (evil-forward-nearest (- (or count 1))
+                        #'(lambda (_cnt)
+                            (evil-backward-beginning 'evil-sentence))
+                        #'(lambda (_cnt)
+                            (evil-backward-paragraph))))
+
+(evil-define-motion evil-forward-paragraph (count)
+  "Move to the end of the COUNT-th next paragraph."
+  :jump t
+  :type exclusive
+  (evil-signal-at-bob-or-eob count)
+  (evil-forward-end 'evil-paragraph count)
+  (unless (eobp) (forward-line)))
+
+(evil-define-motion evil-backward-paragraph (count)
+  "Move to the beginning of the COUNT-th previous paragraph."
+  :jump t
+  :type exclusive
+  (evil-signal-at-bob-or-eob (- (or count 1)))
+  (unless (eobp) (forward-line))
+  (evil-backward-beginning 'evil-paragraph count)
+  (unless (bobp) (forward-line -1)))
+
+(defvar hif-ifx-else-endif-regexp)
+(evil-define-motion evil-jump-item (count)
+  "Find the next item in this line after or under the cursor
+and jump to the corresponding one."
+  :jump t
+  :type inclusive
+  (cond
+   ;; COUNT% jumps to a line COUNT percentage down the file
+   (count
+    (evil-ensure-column
+      (goto-char
+       (let ((size (- (point-max) (point-min))))
+         (+ (point-min)
+            (if (> size 80000)
+                (* count (/ size 100))
+              (/ (* count size) 100))))))
+    (setq evil-this-type 'line))
+   ((and (evil-looking-at-start-comment t)
+         (let ((pnt (point)))
+           (forward-comment 1)
+           (or (not (bolp))
+               (prog1 nil (goto-char pnt)))))
+    (backward-char))
+   ((and (not (eolp)) (evil-looking-at-end-comment t))
+    (forward-comment -1))
+   ((and
+     (memq major-mode '(c-mode c++-mode c-ts-mode c++-ts-mode))
+     (require 'hideif nil t)
+     (with-no-warnings
+       (let* ((hif-else-regexp (concat hif-cpp-prefix "\\(?:else\\|elif[ \t]+\\)"))
+              (hif-ifx-else-endif-regexp
+               (concat hif-ifx-regexp "\\|" hif-else-regexp "\\|" hif-endif-regexp)))
+         (cond
+          ((save-excursion (beginning-of-line) (or (hif-looking-at-ifX) (hif-looking-at-else)))
+           (hif-find-next-relevant)
+           (while (hif-looking-at-ifX)
+             (hif-ifdef-to-endif)
+             (hif-find-next-relevant))
+           t)
+          ((save-excursion (beginning-of-line) (hif-looking-at-endif))
+           (hif-endif-to-ifdef)
+           t))))))
+   (t
+    (let* ((open (point-max))
+           (close (point-max))
+           (open-pair (ignore-errors
+                        (save-excursion
+                          ;; consider the character right before eol given that
+                          ;; point may be placed there, e.g. in visual state
+                          (when (and (eolp) (not (bolp)))
+                            (backward-char))
+                          (setq open (1- (scan-lists (point) 1 -1)))
+                          (when (< open (line-end-position))
+                            (goto-char open)
+                            (forward-list)
+                            (1- (point))))))
+           (close-pair (ignore-errors
+                         (save-excursion
+                           ;; consider the character right before eol given that
+                           ;; point may be placed there, e.g. in visual state
+                           (when (and (eolp) (not (bolp)))
+                             (backward-char))
+                           (setq close (1- (scan-lists (point) 1 1)))
+                           (when (< close (line-end-position))
+                             (goto-char (1+ close))
+                             (backward-list)
+                             (point))))))
+      (cond
+       ((not (or open-pair close-pair))
+        ;; nothing found, check if we are inside a string
+        (let ((pnt (point))
+              (bnd (bounds-of-thing-at-point 'evil-string)))
+          (if (not (and bnd (< (point) (cdr bnd))))
+              ;; no, then we really failed
+              (user-error "No matching item found on the current line")
+            ;; yes, go to the end of the string and try again
+            (let ((endstr (cdr bnd)))
+              (when (or (save-excursion
+                          (goto-char endstr)
+                          (let ((b (bounds-of-thing-at-point 'evil-string)))
+                            (and b (< (point) (cdr b))))) ; not at end of string
+                        (condition-case nil
+                            (progn
+                              (goto-char endstr)
+                              (evil-jump-item)
+                              nil)
+                          (error t)))
+                ;; failed again, go back to original point
+                (goto-char pnt)
+                (user-error "No matching item found on the current line"))))))
+       ((< open close) (goto-char open-pair))
+       (t (goto-char close-pair)))))))
+
+(declare-function flyspell-overlay-p "flyspell")
+(evil-define-motion evil-next-flyspell-error (count)
+  "Go to the COUNT'th spelling mistake after point."
+  :jump t
+  (unless (bound-and-true-p flyspell-mode) (signal 'search-failed nil))
+  (let ((fwd (> (or count 1) 0)) (start (point)) (pos (point)) ov)
+    (dotimes (_ (abs (or count 1)))
+      (let ((limit (if fwd (point-max) (point-min))) wrappedp)
+        (when fwd (setq pos (save-excursion (goto-char pos)
+                                            (skip-syntax-forward "w") (point))))
+        (while (progn (if (if fwd (>= pos limit) (<= pos limit))
+                          (if (or wrappedp (not evil-search-wrap))
+                              (signal 'search-failed nil)
+                            (setq wrappedp t
+                                  limit start
+                                  pos (if fwd (point-min)
+                                        (previous-overlay-change (point-max)))))
+                        (setq pos (if fwd (next-overlay-change pos)
+                                    (previous-overlay-change pos))))
+                      (not (setq ov (seq-find #'flyspell-overlay-p
+                                              (overlays-at pos))))))
+        (when wrappedp (let (message-log-max) (message "Search wrapped")))))
+    (goto-char (overlay-start ov))))
+
+(evil-define-motion evil-prev-flyspell-error (count)
+  "Go to the COUNT'th spelling mistake preceding point."
+  :jump t
+  (evil-next-flyspell-error (- (or count 1))))
+
+(evil-define-motion evil-previous-open-paren (count)
+  "Go to COUNT previous unmatched \"(\"."
+  :jump t
+  :type exclusive
+  (evil-up-paren ?\( ?\) (- (or count 1))))
+
+(evil-define-motion evil-next-close-paren (count)
+  "Go to COUNT next unmatched \")\"."
+  :jump t
+  :type exclusive
+  (forward-char)
+  (evil-up-paren ?\( ?\) (or count 1))
+  (backward-char))
+
+(evil-define-motion evil-previous-open-brace (count)
+  "Go to COUNT previous unmatched \"{\"."
+  :jump t
+  :type exclusive
+  (evil-up-paren ?{ ?} (- (or count 1))))
+
+(evil-define-motion evil-next-close-brace (count)
+  "Go to COUNT next unmatched \"}\"."
+  :jump t
+  :type exclusive
+  (forward-char)
+  (evil-up-paren ?{ ?} (or count 1))
+  (backward-char))
+
+(defun evil--lowercase-markers ()
+  "Get all lowercase markers."
+  (cl-remove-if-not (lambda (x) (and (markerp (cdr x))
+                                     (<= ?a (car x) ?z)))
+                    evil-markers-alist))
+
+(defun evil--next-mark (forwardp)
+  "Move to next lowercase mark.
+Move forward if FORWARDP is non-nil, and backward otherwise. Loop back
+to the beginning of buffer if the end is reached."
+  (let* ((pos (if forwardp (1+ (point)) (point)))
+         (centered-markers
+          (cl-sort
+           (or (evil--lowercase-markers) (user-error "No marks in this buffer"))
+           (if forwardp #'< #'>)
+           :key (lambda (x) (+ (if (< (cdr x) pos) 0 most-negative-fixnum)
+                               (cdr x))))))
+    (goto-char (cdar centered-markers))))
+
+(evil-define-motion evil-next-mark (count)
+  "Go to COUNT next lowercase mark."
+  :keep-visual t
+  :repeat nil
+  :type exclusive
+  :jump t
+  (dotimes (_ (or count 1))
+    (evil--next-mark t)))
+
+(evil-define-motion evil-next-mark-line (count)
+  "Go to COUNT line of next lowercase mark after current line."
+  :keep-visual t
+  :repeat nil
+  :type exclusive
+  :jump t
+  (unless (evil--lowercase-markers) (user-error "No marks in this buffer"))
+  (dotimes (_ (or count 1))
+    (move-end-of-line nil)
+    (evil--next-mark t))
+  (evil-first-non-blank))
+
+(evil-define-motion evil-previous-mark (count)
+  "Go to COUNT previous lowercase mark."
+  :keep-visual t
+  :repeat nil
+  :type exclusive
+  :jump t
+  (dotimes (_ (or count 1))
+    (evil--next-mark nil)))
+
+(evil-define-motion evil-previous-mark-line (count)
+  "Go to COUNT line of previous lowercase mark before current line."
+  :keep-visual t
+  :repeat nil
+  :type exclusive
+  :jump t
+  (unless (evil--lowercase-markers) (user-error "No marks in this buffer"))
+  (dotimes (_ (or count 1))
+    (move-beginning-of-line nil)
+    (evil--next-mark nil))
+  (evil-first-non-blank))
+
+(evil-define-command evil-set-col-0-mark (_beg end mark)
+  "Set MARK at column 0 of line of END.
+Default is cursor line."
+  (interactive "<r><a>")
+  (if (< 1 (length mark))
+      (user-error "Trailing characters")
+    (save-excursion
+      (goto-char (if (eobp) end (1- end)))
+      (evil-beginning-of-line)
+      (evil-set-marker (string-to-char mark)))))
+
+(evil-define-motion evil-find-char (count char)
+  "Move to the next COUNT'th occurrence of CHAR.
+Movement is restricted to the current line unless `evil-cross-lines'
+is non-nil."
+  :type inclusive
+  (interactive "<c><C>")
+  (setq count (or count 1))
+  (let ((fwd (> count 0))
+        (visual (and evil-respect-visual-line-mode
+                     visual-line-mode))
+        case-fold-search)
+    (setq evil-last-find (list #'evil-find-char char fwd))
+    (when fwd (evil-forward-char 1 evil-cross-lines))
+    (unless (prog1
+                (search-forward
+                 (char-to-string char)
+                 (cond (evil-cross-lines nil)
+                       ((and fwd visual)
+                        (save-excursion
+                          (end-of-visual-line)
+                          (point)))
+                       (fwd (line-end-position))
+                       (visual
+                        (save-excursion
+                          (beginning-of-visual-line)
+                          (point)))
+                       (t (line-beginning-position)))
+                 t count)
+              (when fwd (backward-char)))
+      (user-error "Can't find `%c'" char))))
+
+(evil-define-motion evil-find-char-backward (count char)
+  "Move to the previous COUNT'th occurrence of CHAR."
+  :type exclusive
+  (interactive "<c><C>")
+  (evil-find-char (- (or count 1)) char))
+
+(evil-define-motion evil-find-char-to (count char)
+  "Move before the next COUNT'th occurrence of CHAR."
+  :type inclusive
+  (interactive "<c><C>")
+  (unwind-protect
+      (evil-find-char count char)
+    (setcar evil-last-find #'evil-find-char-to))
+  (if (> (or count 1) 0)
+      (backward-char)
+    (forward-char)))
+
+(evil-define-motion evil-find-char-to-backward (count char)
+  "Move before the previous COUNT'th occurrence of CHAR."
+  :type exclusive
+  (interactive "<c><C>")
+  (evil-find-char-to (- (or count 1)) char))
+
+(evil-define-motion evil-repeat-find-char (count)
+  "Repeat the last find COUNT times."
+  :type inclusive
+  (setq count (or count 1))
+  (cl-destructuring-bind (cmd char fwd)
+      (or evil-last-find (user-error "No previous search"))
+    ;; ensure count is non-negative
+    (when (< count 0)
+      (setq count (- count)
+            fwd (not fwd)))
+    ;; skip next character when repeating t or T
+    (and (eq cmd #'evil-find-char-to)
+         evil-repeat-find-to-skip-next
+         (= count 1)
+         (eql (if fwd (char-after (1+ (point))) (char-before)) char)
+         (setq count (1+ count)))
+    (let (evil-last-find)
+      (funcall cmd (if fwd count (- count)) char)
+      (unless (nth 2 evil-last-find)
+        (setq evil-this-type 'exclusive)))))
+
+(evil-define-motion evil-repeat-find-char-reverse (count)
+  "Repeat the last find COUNT times in the opposite direction."
+  :type inclusive
+  (evil-repeat-find-char (- (or count 1))))
+
+;; ceci n'est pas une pipe
+(evil-define-motion evil-goto-column (count)
+  "Go to column COUNT on the current line.
+Columns are counted from zero."
+  :type exclusive
+  (move-to-column (or count 0)))
+
+(evil-define-command evil-goto-mark (char &optional noerror)
+  "Go to the marker specified by CHAR."
+  :keep-visual t
+  :repeat nil
+  :type exclusive
+  :jump t
+  (interactive (list (read-char)))
+  (let ((marker (evil-get-marker char)))
+    (cond
+     ((markerp marker)
+      (switch-to-buffer (marker-buffer marker))
+      (goto-char marker))
+     ((numberp marker) (goto-char marker))
+     ((consp marker)
+      (when (or (find-buffer-visiting (car marker))
+                (and (y-or-n-p (format "Visit file %s again? "
+                                       (car marker)))
+                     (find-file (car marker))))
+        (goto-char (cdr marker))))
+     ((not noerror)
+      (user-error "Marker `%c' is not set%s" char
+                  (if (evil-global-marker-p char) ""
+                    " in this buffer"))))))
+
+(evil-define-command evil-goto-mark-line (char &optional noerror)
+  "Go to the line of the marker specified by CHAR."
+  :keep-visual t
+  :repeat nil
+  :type line
+  :jump t
+  (interactive (list (read-char)))
+  (evil-goto-mark char noerror)
+  (evil-first-non-blank))
+
+(declare-function goto-last-change "ext:goto-chg")
+(declare-function goto-last-change-reverse "ext:goto-chg")
+
+(evil-define-motion evil-goto-last-change (count)
+  "Like `goto-last-change' but takes a COUNT rather than a span."
+  (setq this-command 'goto-last-change)
+  (dotimes (_ (or count 1))
+    (goto-last-change nil)))
+
+(evil-define-motion evil-goto-last-change-reverse (count)
+  "Like `goto-last-change-reverse' but takes a COUNT rather than a span."
+  (setq this-command 'goto-last-change-reverse)
+  (dotimes (_ (or count 1))
+    (goto-last-change-reverse nil)))
+
+(evil-define-motion evil-jump-backward (count)
+  "Go to older position in jump list.
+To go the other way, press \
+\\<evil-motion-state-map>\\[evil-jump-forward]."
+  (evil--jump-backward count))
+
+(evil-define-motion evil-jump-forward (count)
+  "Go to newer position in jump list.
+To go the other way, press \
+\\<evil-motion-state-map>\\[evil-jump-backward]."
+  (evil--jump-forward count))
+
+(evil-define-motion evil-jump-backward-swap (_count)
+  "Go to the previous position in jump list.
+The current position is placed in the jump list."
+  (let ((pnt (point)))
+    (evil--jump-backward 1)
+    (evil-set-jump pnt)))
+
+(defvar xref-prompt-for-identifier)
+(evil-define-motion evil-jump-to-tag (arg)
+  "Jump to tag under point.
+If called with a prefix argument, provide a prompt
+for specifying the tag."
+  :jump t
+  (interactive "P")
+  (cond
+   ((fboundp 'xref-find-definitions)
+    (let ((xref-prompt-for-identifier arg))
+      (call-interactively #'xref-find-definitions)))
+   ((fboundp 'find-tag)
+    (if arg (call-interactively #'find-tag)
+      (let ((tag (funcall (or find-tag-default-function
+                              (get major-mode 'find-tag-default-function)
+                              #'find-tag-default))))
+        (find-tag (or tag (user-error "No tag found around point"))))))))
+
+(evil-define-motion evil-lookup ()
+  "Look up the keyword at point.
+Calls `evil-lookup-func'."
+  (funcall evil-lookup-func))
+
+(defun evil-ret-gen (count indent?)
+  (let ((widget (or (get-char-property (point) 'field)
+                    (get-char-property (point) 'button)
+                    (get-char-property (point) 'widget-doc))))
+    (cond
+     ((and widget
+           (fboundp 'widget-type)
+           (fboundp 'widget-button-press)
+           (or (and (symbolp widget)
+                    (get widget 'widget-type))
+               (and (consp widget)
+                    (get (widget-type widget) 'widget-type))))
+      (when (evil-operator-state-p)
+        (setq evil-inhibit-operator t))
+      (when (fboundp 'widget-button-press)
+        (widget-button-press (point))))
+     ((and (fboundp 'button-at)
+           (fboundp 'push-button)
+           (button-at (point)))
+      (when (evil-operator-state-p)
+        (setq evil-inhibit-operator t))
+      (push-button))
+     ((or (evil-emacs-state-p)
+          (and (evil-insert-state-p)
+               (not buffer-read-only)))
+      (if (not indent?)
+          (newline count)
+        (delete-horizontal-space t)
+        (newline count)
+        (indent-according-to-mode)))
+     (t (evil-next-line-first-non-blank count)))))
+
+(evil-define-motion evil-ret (count)
+  "Move the cursor COUNT lines down.
+If point is on a widget or a button, click on it.
+In Insert state, insert a newline."
+  :type line
+  (evil-ret-gen count nil))
+
+(evil-define-motion evil-ret-and-indent (count)
+  "Move the cursor COUNT lines down.
+If point is on a widget or a button, click on it.
+In Insert state, insert a newline and indent."
+  :type line
+  (evil-ret-gen count t))
+
+(evil-define-motion evil-window-top (count)
+  "Move the cursor to line COUNT from the top of the window."
+  :jump t
+  :type line
+  (evil-ensure-column
+    (move-to-window-line
+     (max (or count 0)
+          (if (or (zerop scroll-margin)
+                  (= (point-min) (window-start))
+                  (< (count-screen-lines (window-start) (point))
+                     scroll-margin))
+              0
+            scroll-margin)))))
+
+(evil-define-motion evil-window-middle ()
+  "Move the cursor to the middle line in the window."
+  :jump t
+  :type line
+  (evil-ensure-column (move-to-window-line nil)))
+
+(evil-define-motion evil-window-bottom (count)
+  "Move the cursor to line COUNT from the bottom of the window."
+  :jump t
+  :type line
+  (evil-ensure-column
+    (move-to-window-line
+     (- (max (or count 1)
+             (if (or (zerop scroll-margin)
+                     (< (count-screen-lines (point) (window-end))
+                        scroll-margin))
+                 1
+               (1+ scroll-margin)))))))
+
+;; scrolling
+(evil-define-command evil-scroll-line-up (count)
+  "Scroll the window COUNT lines upwards."
+  :repeat nil
+  :keep-visual t
+  (interactive "p")
+  (let (scroll-preserve-screen-position) (scroll-down count)))
+
+(evil-define-command evil-scroll-line-down (count)
+  "Scroll the window COUNT lines downwards."
+  :repeat nil
+  :keep-visual t
+  (interactive "p")
+  (let (scroll-preserve-screen-position) (scroll-up count)))
+
+(evil-define-command evil-scroll-count-reset ()
+  "Set `evil-scroll-count' to 0.
+`evil-scroll-up' and `evil-scroll-down' will then scroll by half of
+the screen (the default)."
+  :repeat nil
+  :keep-visual t
+  (interactive)
+  (setq evil-scroll-count 0))
+
+(defun evil--get-scroll-count (count)
+  "Given a user-supplied COUNT, return scroll count."
+  (cl-flet ((posint (x) (and (natnump x) (< 0 x) x)))
+    (or (posint count)
+        (posint evil-scroll-count)
+        (/ (window-body-height) 2))))
+
+;; With `scroll-preserve-screen-position' `scroll-up'/`scroll-down'
+;; target the same cursor pixel Y-coordinate while `last-command' has
+;; the `scroll-command' property. However the target needs updating
+;; when e.g. scrolling maximally to the first or last line and then
+;; switching scroll direction. Do this by resetting `last-command'
+;; when `real-this-command' (`evil-ensure-column' modifies
+;; `this-command') changed from last value:
+
+(evil-define-command evil-scroll-up (count)
+  "Scroll the window and the cursor COUNT lines upwards.
+If COUNT is not specified the function scrolls up `evil-scroll-count'
+lines, which is the last used count.
+If the scroll count is zero the command scrolls half the screen."
+  :repeat nil
+  :keep-visual t
+  (interactive "<c>")
+  (when (= (line-beginning-position) (point-min))
+    (signal 'beginning-of-buffer nil))
+  (setq count (evil--get-scroll-count count))
+  (evil-ensure-column
+    (let ((opoint (point)))
+      (condition-case nil
+          (let ((scroll-preserve-screen-position 'always)
+                (last-command (when (eq real-last-command real-this-command)
+                                real-last-command)))
+            (scroll-down count))
+        (:success
+         ;; Redo if `scroll-down' only did partial scroll up to BOB
+         (when (<= (window-start) (point-min))
+           (goto-char opoint)
+           (vertical-motion (- count))))
+        (beginning-of-buffer (vertical-motion (- count)))))))
+(put 'evil-scroll-up 'scroll-command t)
+
+(evil-define-command evil-scroll-down (count)
+  "Scroll the window and the cursor COUNT lines downwards.
+If COUNT is not specified the function scrolls down
+`evil-scroll-count' lines, which is the last used count.
+If the scroll count is zero the command scrolls half the screen."
+  :repeat nil
+  :keep-visual t
+  (interactive "<c>")
+  (when (= (line-end-position) (point-max))
+    (signal 'end-of-buffer nil))
+  (setq count (evil--get-scroll-count count))
+  (evil-ensure-column
+    ;; BUG #660: First check whether the eob is visible.
+    ;; In that case we do not scroll but merely move point.
+    (if (<= (point-max) (window-end))
+        (vertical-motion count)
+      (condition-case nil
+          (let ((scroll-preserve-screen-position 'always)
+                (last-command (when (eq real-last-command real-this-command)
+                                real-last-command)))
+            (scroll-up count))
+        (:success
+         ;; If EOB became visible: Scroll it to the bottom
+         (save-excursion
+           (goto-char (window-start))
+           (vertical-motion (max 0 (- (window-height) 1 scroll-margin)))
+           (when (<= (point-max) (point)) (recenter -1))))
+        (end-of-buffer (goto-char (point-max)) (recenter -1))))))
+(put 'evil-scroll-down 'scroll-command t)
+
+(evil-define-command evil-scroll-page-up (count)
+  "Scroll the window COUNT pages upwards."
+  :repeat nil
+  :keep-visual t
+  (interactive "p")
+  (evil-ensure-column
+    (dotimes (i count)
+      (condition-case err
+          (scroll-down nil)
+        (beginning-of-buffer
+         (if (and (bobp) (zerop i))
+             (signal (car err) (cdr err))
+           (goto-char (point-min))))))))
+
+(evil-define-command evil-scroll-page-down (count)
+  "Scroll the window COUNT pages downwards."
+  :repeat nil
+  :keep-visual t
+  (interactive "p")
+  (evil-ensure-column
+    (dotimes (i count)
+      (condition-case err
+          (scroll-up nil)
+        (end-of-buffer
+         (if (and (eobp) (zerop i))
+             (signal (car err) (cdr err))
+           (goto-char (point-max))))))))
+
+(evil-define-command evil-scroll-line-to-top (count)
+  "Scroll line number COUNT (or the cursor line) to the top of the window."
+  :repeat nil
+  :keep-visual t
+  (interactive "<c>")
+  (when count
+    (evil-save-column
+      (goto-char (point-min))
+      (forward-line (1- count))))
+  (recenter 0))
+
+(evil-define-command evil-scroll-line-to-top-first-non-blank (count)
+  "Scroll line number COUNT (or the cursor line) to the top of the window.
+Then move the cursor to the first non-blank character of that line."
+  :repeat nil
+  :keep-visual t
+  (interactive "<c>")
+  (evil-scroll-line-to-top count)
+  (evil-first-non-blank))
+
+(evil-define-command evil-scroll-line-to-center (count)
+  "Scroll line number COUNT (or the cursor line) to the center of the window."
+  :repeat nil
+  :keep-visual t
+  (interactive "<c>")
+  (when count
+    (evil-save-column
+      (goto-char (point-min))
+      (forward-line (1- count))))
+  (recenter))
+
+(evil-define-command evil-scroll-line-to-center-first-non-blank (count)
+  "Scroll line number COUNT (or the cursor line) to the center of the window.
+Then move the cursor to the first non-blank character of that line."
+  :repeat nil
+  :keep-visual t
+  (interactive "<c>")
+  (evil-scroll-line-to-center count)
+  (evil-first-non-blank))
+
+(evil-define-command evil-scroll-line-to-bottom (count)
+  "Scroll line number COUNT (or the cursor line) to the bottom of the window."
+  :repeat nil
+  :keep-visual t
+  (interactive "<c>")
+  (when count
+    (evil-save-column
+      (goto-char (point-min))
+      (forward-line (1- count))))
+  (recenter -1))
+
+(evil-define-command evil-scroll-line-to-bottom-first-non-blank (count)
+  "Scroll line number COUNT (or the cursor line) to the bottom of the window.
+Then move the cursor to the first non-blank character of that line."
+  :repeat nil
+  :keep-visual t
+  (interactive "<c>")
+  (evil-scroll-line-to-bottom count)
+  (evil-first-non-blank))
+
+(evil-define-command evil-scroll-bottom-line-to-top (count)
+  "Scroll the line right below the window,
+or line COUNT to the top of the window."
+  :repeat nil
+  :keep-visual t
+  (interactive "<c>")
+  (unless count
+    (goto-char (window-end))
+    (evil-first-non-blank))
+  (evil-scroll-line-to-top count))
+
+(evil-define-command evil-scroll-top-line-to-bottom (count)
+  "Scroll the line right above the window,
+or line COUNT to the bottom of the window."
+  :repeat nil
+  :keep-visual t
+  (interactive "<c>")
+  (unless count
+    (goto-char (window-start))
+    (evil-first-non-blank))
+  (evil-scroll-line-to-bottom count))
+
+(evil-define-command evil-scroll-left (count)
+  "Scroll the window COUNT half-screenwidths to the left."
+  :repeat nil
+  :keep-visual t
+  (interactive "p")
+  (evil-with-hproject-point-on-window
+    (scroll-right (* count (/ (window-width) 2)))))
+
+(evil-define-command evil-scroll-right (count)
+  "Scroll the window COUNT half-screenwidths to the right."
+  :repeat nil
+  :keep-visual t
+  (interactive "p")
+  (evil-with-hproject-point-on-window
+    (scroll-left (* count (/ (window-width) 2)))))
+
+(evil-define-command evil-scroll-column-left (count)
+  "Scroll the window COUNT columns to the left."
+  :repeat nil
+  :keep-visual t
+  (interactive "p")
+  (evil-with-hproject-point-on-window
+    (scroll-right count)))
+
+(evil-define-command evil-scroll-column-right (count)
+  "Scroll the window COUNT columns to the right."
+  :repeat nil
+  :keep-visual t
+  (interactive "p")
+  (evil-with-hproject-point-on-window
+    (scroll-left count)))
+
+(evil-define-command evil-scroll-end-column ()
+  "Scroll the window to position the cursor at the end (right side) of the screen.
+Warn if `hscroll-margin' > 0, as cursor will be `hscroll-margin' chars from
+the right edge."
+  :repeat nil
+  :keep-visual t
+  (interactive)
+  (let* ((window-hpos (- (current-column) (window-hscroll)))
+         (dist-from-right-edge (- (window-width) window-hpos)))
+    (when (< 0 hscroll-margin)
+      (evil-echo "%s: hscroll-margin = %d" this-command hscroll-margin))
+    (evil-scroll-column-left (- dist-from-right-edge (abs (* 2 hscroll-margin))))))
+
+(evil-define-command evil-scroll-start-column ()
+  "Scroll the window to position the cursor at the start (left side) of the screen.
+Warn if `hscroll-margin' > 0, as cursor will be `hscroll-margin' chars from
+the left edge."
+  :repeat nil
+  :keep-visual t
+  (interactive)
+  (let ((initial-column (current-column))
+        (initial-hscroll (window-hscroll)))
+    (when (< 0 hscroll-margin)
+      (evil-echo "%s: hscroll-margin = %d" this-command hscroll-margin))
+    (evil-scroll-column-right (- initial-column initial-hscroll hscroll-margin 1))))
+
+;;; Text objects
+
+;; Text objects are defined with `evil-define-text-object'. In Visual
+;; state, they modify the current selection; in Operator-Pending
+;; state, they return a pair of buffer positions. Outer text objects
+;; are bound in the keymap `evil-outer-text-objects-map', and inner
+;; text objects are bound in `evil-inner-text-objects-map'.
+;;
+;; Common text objects like words, WORDS, paragraphs and sentences are
+;; defined via a corresponding move-function. This function must have
+;; the following properties:
+;;
+;;   1. Take exactly one argument, the count.
+;;   2. When the count is positive, move point forward to the first
+;;      character after the end of the next count-th object.
+;;   3. When the count is negative, move point backward to the first
+;;      character of the count-th previous object.
+;;   4. If point is placed on the first character of an object, the
+;;      backward motion does NOT count that object.
+;;   5. If point is placed on the last character of an object, the
+;;      forward motion DOES count that object.
+;;   6. The return value is "count left", i.e., in forward direction
+;;      count is decreased by one for each successful move and in
+;;      backward direction count is increased by one for each
+;;      successful move, returning the final value of count.
+;;      Therefore, if the complete move is successful, the return
+;;      value is 0.
+;;
+;; A useful macro in this regard is `evil-motion-loop', which quits
+;; when point does not move further and returns the count difference.
+;; It also provides a "unit value" of 1 or -1 for use in each
+;; iteration. For example, a hypothetical "foo-bar" move could be
+;; written as such:
+;;
+;;     (defun foo-bar (count)
+;;       (evil-motion-loop (var count)
+;;         (forward-foo var) ; `var' is 1 or -1 depending on COUNT
+;;         (forward-bar var)))
+;;
+;; If "forward-foo" and "-bar" didn't accept negative arguments,
+;; we could choose their backward equivalents by inspecting `var':
+;;
+;;     (defun foo-bar (count)
+;;       (evil-motion-loop (var count)
+;;         (cond
+;;          ((< var 0)
+;;           (backward-foo 1)
+;;           (backward-bar 1))
+;;          (t
+;;           (forward-foo 1)
+;;           (forward-bar 1)))))
+;;
+;; After a forward motion, point has to be placed on the first
+;; character after some object, unless no motion was possible at all.
+;; Similarly, after a backward motion, point has to be placed on the
+;; first character of some object. This implies that point should
+;; NEVER be moved to eob or bob, unless an object ends or begins at
+;; eob or bob. (Usually, Emacs motions always move as far as possible.
+;; But we want to use the motion-function to identify certain objects
+;; in the buffer, and thus exact movement to object boundaries is
+;; required.)
+
+(evil-define-text-object evil-a-word (count &optional beg end _type)
+  "Select a word."
+  (evil-select-a-restricted-object 'evil-word beg end type count))
+
+(evil-define-text-object evil-inner-word (count &optional beg end _type)
+  "Select inner word."
+  (evil-select-inner-restricted-object 'evil-word beg end type count))
+
+(evil-define-text-object evil-a-WORD (count &optional beg end _type)
+  "Select a WORD."
+  (evil-select-a-restricted-object 'evil-WORD beg end type count))
+
+(evil-define-text-object evil-inner-WORD (count &optional beg end _type)
+  "Select inner WORD."
+  (evil-select-inner-restricted-object 'evil-WORD beg end type count))
+
+(evil-define-text-object evil-a-symbol (count &optional beg end _type)
+  "Select a symbol."
+  (evil-select-an-object 'evil-symbol beg end type count))
+
+(evil-define-text-object evil-inner-symbol (count &optional beg end _type)
+  "Select inner symbol."
+  (evil-select-inner-object 'evil-symbol beg end type count))
+
+(evil-define-text-object evil-a-sentence (count &optional beg end _type)
+  "Select a sentence."
+  (evil-select-an-object 'evil-sentence beg end type count))
+
+(evil-define-text-object evil-inner-sentence (count &optional beg end _type)
+  "Select inner sentence."
+  (evil-select-inner-object 'evil-sentence beg end type count))
+
+(evil-define-text-object evil-a-paragraph (count &optional beg end _type)
+  "Select a paragraph."
+  :type line
+  (evil-select-an-object 'evil-paragraph beg end type count t))
+
+(evil-define-text-object evil-inner-paragraph (count &optional beg end _type)
+  "Select inner paragraph."
+  :type line
+  (evil-select-inner-object 'evil-paragraph beg end type count t))
+
+(evil-define-text-object evil-a-paren (count &optional beg end _type)
+  "Select a parenthesis."
+  :extend-selection nil
+  (evil-select-paren ?\( ?\) beg end type count t))
+
+(evil-define-text-object evil-inner-paren (count &optional beg end _type)
+  "Select inner parenthesis."
+  :extend-selection nil
+  (evil-select-paren ?\( ?\) beg end type count))
+
+(evil-define-text-object evil-a-bracket (count &optional beg end _type)
+  "Select a square bracket."
+  :extend-selection nil
+  (evil-select-paren ?\[ ?\] beg end type count t))
+
+(evil-define-text-object evil-inner-bracket (count &optional beg end _type)
+  "Select inner square bracket."
+  :extend-selection nil
+  (evil-select-paren ?\[ ?\] beg end type count))
+
+(evil-define-text-object evil-a-curly (count &optional beg end _type)
+  "Select a curly bracket (\"brace\")."
+  :extend-selection nil
+  (evil-select-paren ?{ ?} beg end type count t))
+
+(evil-define-text-object evil-inner-curly (count &optional beg end _type)
+  "Select inner curly bracket (\"brace\")."
+  :extend-selection nil
+  (evil-select-paren ?{ ?} beg end type count))
+
+(evil-define-text-object evil-an-angle (count &optional beg end _type)
+  "Select an angle bracket."
+  :extend-selection nil
+  (evil-select-paren ?< ?> beg end type count t))
+
+(evil-define-text-object evil-inner-angle (count &optional beg end _type)
+  "Select inner angle bracket."
+  :extend-selection nil
+  (evil-select-paren ?< ?> beg end type count))
+
+(evil-define-text-object evil-a-single-quote (count &optional beg end _type)
+  "Select a single-quoted expression."
+  :extend-selection t
+  (evil-select-quote ?' beg end type count t))
+
+(evil-define-text-object evil-inner-single-quote (count &optional beg end _type)
+  "Select inner single-quoted expression."
+  :extend-selection nil
+  (evil-select-quote ?' beg end type count))
+
+(evil-define-text-object evil-a-double-quote (count &optional beg end _type)
+  "Select a double-quoted expression."
+  :extend-selection t
+  (evil-select-quote ?\" beg end type count t))
+
+(evil-define-text-object evil-inner-double-quote (count &optional beg end _type)
+  "Select inner double-quoted expression."
+  :extend-selection nil
+  (evil-select-quote ?\" beg end type count))
+
+(evil-define-text-object evil-a-back-quote (count &optional beg end _type)
+  "Select a back-quoted expression."
+  :extend-selection t
+  (evil-select-quote ?\` beg end type count t))
+
+(evil-define-text-object evil-inner-back-quote (count &optional beg end _type)
+  "Select inner back-quoted expression."
+  :extend-selection nil
+  (evil-select-quote ?\` beg end type count))
+
+(evil-define-text-object evil-a-tag (count &optional beg end _type)
+  "Select a tag block."
+  :extend-selection nil
+  (evil-select-xml-tag beg end type count t))
+
+(evil-define-text-object evil-inner-tag (count &optional beg end _type)
+  "Select inner tag block."
+  :extend-selection nil
+  (evil-select-xml-tag beg end type count))
+
+(defun evil-match (direction count)
+  "Find COUNTth next match in DIRECTION."
+  (defvar evil-search-module)
+  (unless (eq evil-search-module 'evil-search)
+    (user-error "Match text objects only work with Evil search module"))
+  (let ((pnt (point))
+        (count (abs count)) ; Undo effect of evil-visual-direction
+        (evil-ex-search-direction 'backward)
+        (visual-state (evil-visual-state-p))
+        on-start-match in-match on-end-match)
+    (save-excursion
+      (unless (eobp) (forward-char)) ; If on start of a match, stay there
+      (evil-ex-search 1)
+      (setq on-start-match (= evil-ex-search-match-beg pnt)
+            in-match (<= evil-ex-search-match-beg pnt (1- evil-ex-search-match-end))
+            on-end-match (= (1- evil-ex-search-match-end) pnt)
+            evil-ex-search-direction direction)
+      (cond
+       ((and visual-state on-start-match (eq 'backward direction))
+        (evil-ex-search count))
+       ((and visual-state on-end-match (eq 'forward direction))
+        (evil-ex-search count))
+       ((or in-match (eq 'backward direction))
+        (evil-ex-search (1- count)))
+       (t (evil-ex-search count)))
+      (setq pnt (point)))
+    (goto-char pnt)
+    (cond
+     ((evil-normal-state-p)
+      (evil-visual-select evil-ex-search-match-beg
+                          evil-ex-search-match-end
+                          'inclusive
+                          (pcase direction ('forward +1) ('backward -1))
+                          t)
+      (list evil-ex-search-match-beg evil-ex-search-match-end))
+     ((and visual-state (eq 'forward direction))
+      (goto-char (1- evil-ex-search-match-end)))
+     ((and visual-state (eq 'backward direction))
+      (goto-char evil-ex-search-match-beg))
+     ;; e.g. operator pending...
+     (t (list evil-ex-search-match-beg evil-ex-search-match-end)))))
+
+(evil-define-text-object evil-next-match (count &optional _beg _end _type)
+  "Select next match."
+  :extend-selection t
+  (evil-match 'forward count))
+
+(evil-define-text-object evil-previous-match (count &optional _beg _end _type)
+  "Select previous match."
+  :extend-selection t
+  (evil-match 'backward count))
+
+;;; Operator commands
+
+(evil-define-operator evil-yank (beg end type register yank-handler)
+  "Save the characters in motion into the kill-ring."
+  :move-point nil
+  :repeat nil
+  (interactive "<R><x><y>")
+  (let ((evil-was-yanked-without-register
+         (and evil-was-yanked-without-register (not register))))
+    (cond
+     ((and (fboundp 'cua--global-mark-active)
+           (fboundp 'cua-copy-region-to-global-mark)
+           (cua--global-mark-active))
+      (cua-copy-region-to-global-mark beg end))
+     ((eq type 'block)
+      (evil-yank-rectangle beg end register yank-handler))
+     ((memq type '(line screen-line))
+      (evil-yank-lines beg end register yank-handler))
+     (t
+      (evil-yank-characters beg end register yank-handler)
+      (goto-char beg)))))
+
+(defun evil-expand-line-for-line-based-operators (beg end type)
+  "Expand to line when in visual mode possibly changing BEG, END and TYPE.
+Avoids double expansion for line-based commands like \"V\" or \"D\"."
+  (when (evil-visual-state-p)
+    (unless (memq type '(line block screen-line))
+      ;; Subtract 1 from end to avoid expanding to the next line
+      ;; when \n is part of the visually selected region.
+      ;; If removed (evil-expand beg end 'line)
+      ;; will expand to the end of the next line instead of the current
+      ;; line which will cause line expanding commands like 'Y' to
+      ;; misbehave when used in visual state.
+      (when (eq ?\n (char-before end))
+        (cl-decf end))
+      (let ((range (evil-expand beg end (if (and evil-respect-visual-line-mode
+                                                 visual-line-mode)
+                                            'screen-line
+                                          'line))))
+        (setq beg (evil-range-beginning range)
+              end (evil-range-end range)
+              type (evil-type range))))
+    (evil-exit-visual-state))
+  (list beg end type))
+
+(evil-define-operator evil-yank-line (beg end type register)
+  "Save whole lines into the kill-ring."
+  :motion evil-line-or-visual-line
+  :move-point nil
+  (interactive "<R><x>")
+  (cl-destructuring-bind
+      (beg end type) (evil-expand-line-for-line-based-operators beg end type)
+    (evil-yank beg end type register)))
+
+(evil-define-operator evil-delete (beg end type register yank-handler)
+  "Delete text from BEG to END with TYPE.
+Save in REGISTER or in the kill-ring with YANK-HANDLER."
+  (interactive "<R><x><y>")
+  (when (and (memq type '(inclusive exclusive))
+             (not (evil-visual-state-p))
+             (eq 'evil-delete evil-this-operator)
+             (save-excursion (goto-char beg) (bolp))
+             (save-excursion (goto-char end) (eolp))
+             (<= 1 (evil-count-lines beg end)))
+    ;; Imitate Vi strangeness: if motion meets above criteria,
+    ;; delete linewise. Not for change operator or visual state.
+    (let ((new-range (evil-line-expand beg end)))
+      (setq beg (car new-range)
+            end (cadr new-range)
+            type 'line)))
+  (unless register
+    (let ((text (filter-buffer-substring beg end)))
+      (unless (string-match-p "\n" text)
+        ;; set the small delete register
+        (evil-set-register ?- text))))
+  (let ((evil-was-yanked-without-register nil))
+    (evil-yank beg end type register yank-handler))
+  (cond
+   ((eq type 'block)
+    (evil-apply-on-block #'delete-region beg end nil))
+   ((and (eq type 'line)
+         (= end (point-max))
+         (or (= beg end)
+             (/= (char-before end) ?\n))
+         (/= beg (point-min))
+         (= (char-before beg) ?\n))
+    (delete-region (1- beg) end))
+   (t (delete-region beg end)))
+  (when (and (eq type 'line)
+             (called-interactively-p 'any))
+    (evil-first-non-blank)
+    (when (and (not evil-start-of-line)
+               evil-operator-start-col
+               ;; Special exceptions to ever saving column:
+               (not (memq evil-this-motion '(evil-forward-word-begin
+                                             evil-forward-WORD-begin))))
+      (move-to-column (if (and (eq most-positive-fixnum temporary-goal-column)
+                               (memq last-command '(next-line previous-line)))
+                          temporary-goal-column
+                        evil-operator-start-col)))))
+
+(evil-define-operator evil-delete-line (beg end type register yank-handler)
+  "Delete to end of line."
+  :motion evil-end-of-line-or-visual-line
+  (interactive "<R><x>")
+  (cl-destructuring-bind
+      (beg end type) (evil-expand-line-for-line-based-operators beg end type)
+    (if (eq type 'block)
+        ;; Equivalent to $d, i.e., we use the block-to-eol selection and
+        ;; call `evil-delete'. In this case we fake the call to
+        ;; `evil-end-of-line' by setting `temporary-goal-column' and
+        ;; `last-command' appropriately as `evil-end-of-line' would do.
+        (let ((temporary-goal-column most-positive-fixnum)
+              (last-command 'next-line))
+          (evil-delete beg end 'block register yank-handler))
+      (evil-delete beg end type register yank-handler)
+      (when (eq 'line type)
+        (evil-first-non-blank)
+        (when (and (not evil-start-of-line) evil-operator-start-col)
+          (move-to-column (if (and (eq most-positive-fixnum temporary-goal-column)
+                                   (memq last-command '(next-line previous-line)))
+                              temporary-goal-column
+                            evil-operator-start-col)))))))
+
+(evil-define-operator evil-delete-whole-line
+  (beg end type register yank-handler)
+  "Delete whole line."
+  :motion evil-line-or-visual-line
+  (interactive "<R><x>")
+  (evil-delete beg end type register yank-handler))
+
+(evil-define-operator evil-delete-char (beg end type register)
+  "Delete next character."
+  :motion evil-forward-char
+  (interactive "<R><x>")
+  (evil-delete beg end type register))
+
+(evil-define-operator evil-delete-backward-char (beg end type register)
+  "Delete previous character."
+  :motion evil-backward-char
+  (interactive "<R><x>")
+  (evil-delete beg end type register))
+
+(evil-define-command evil-delete-backward-char-and-join (_count)
+  "Delete previous character and join lines.
+If point is at the beginning of a line then the current line will
+be joined with the previous line if and only if
+`evil-backspace-join-lines'."
+  (interactive "p")
+  (if (or evil-backspace-join-lines (not (bolp)))
+      (call-interactively #'delete-backward-char)
+    (signal 'beginning-of-line nil)))
+
+(evil-define-command evil-delete-backward-word ()
+  "Delete previous word."
+  (let ((beg (save-excursion (evil-backward-word-begin) (point)))
+        (end (point)))
+    (cond
+     ((evil-replace-state-p) (while (< beg (point))
+                               (evil-replace-backspace)))
+     ((or (not (bolp)) (bobp)) (delete-region (max beg (line-beginning-position))
+                                              end))
+     (evil-backspace-join-lines (delete-char -1))
+     (t (signal 'beginning-of-line nil)))))
+
+(evil-define-command evil-delete-back-to-indentation ()
+  "Delete back to the first non-whitespace character.
+If point is before the first non-whitespace character of a
+current line then delete from the point to the beginning of the
+current line.  If point is on the beginning of the line, behave
+according to `evil-backspace-join-lines'."
+  (let ((beg (if (<= (current-column) (current-indentation))
+                 (line-beginning-position)
+               (save-excursion (evil-first-non-blank) (point)))))
+    (cond
+     ((and (bolp) (evil-replace-state-p)) (evil-replace-backspace))
+     ((bolp) (evil-delete-backward-char-and-join 1))
+     ((evil-replace-state-p)
+      (while (< beg (point)) (evil-replace-backspace)))
+     (t (delete-region beg (point))))))
+
+(defun evil-ex-delete-or-yank (should-delete beg end type register count yank-handler)
+  "Execute evil-delete or evil-yank on the given region.
+If SHOULD-DELETE is t, evil-delete will be executed, otherwise
+evil-yank.
+The region specified by BEG and END will be adjusted if COUNT is
+given."
+  (when count
+    ;; with COUNT, the command should go the end of the region and delete/yank
+    ;; COUNT lines from there
+    (setq beg (save-excursion (goto-char end)
+                              (line-beginning-position 0))
+          end (save-excursion (goto-char end)
+                              (line-beginning-position count))
+          type 'line))
+  (funcall (if should-delete #'evil-delete #'evil-yank)
+           beg end type register yank-handler))
+
+(evil-define-operator evil-ex-delete (beg end type register count yank-handler)
+  "The Ex delete command.
+\[BEG,END]delete [REGISTER] [COUNT]"
+  (interactive "<R><xc/><y>")
+  (evil-ex-delete-or-yank t beg end type register count yank-handler))
+
+(evil-define-operator evil-ex-yank (beg end type register count yank-handler)
+  "The Ex yank command.
+\[BEG,END]yank [REGISTER] [COUNT]"
+  :restore-point t
+  (interactive "<R><xc/><y>")
+  (evil-ex-delete-or-yank nil beg end type register count yank-handler))
+
+(evil-define-command evil-ex-put (_beg end ex-arg &optional force)
+  (interactive "<r><a><!>")
+  (let* ((arg-chars (remove ?\s (string-to-list ex-arg)))
+         (reg (or (car arg-chars) ?\"))
+         (text (cond
+                ((and (< 1 (length arg-chars))
+                      (/= ?= reg))
+                 (user-error "Trailing characters"))
+                ((eq ?= reg)
+                 (evil--eval-expr (if (= 1 (length arg-chars))
+                                      evil-last-=-register-input
+                                    (setq evil-last-=-register-input (substring ex-arg 1)))))
+                (t (evil-get-register reg)))))
+    (unless text (user-error "Nothing in register %c" reg))
+    (evil-remove-yank-excluded-properties text)
+    (goto-char (if (= (point-max) end) end (1- end)))
+    (if force (evil-insert-newline-above) (evil-insert-newline-below))
+    (evil-set-marker ?\[ (point))
+    ;; `insert' rather than `insert-for-yank' as we want to ignore yank-handlers...
+    (insert (if (and (< 0 (length text))
+                     (eq ?\n (aref text (1- (length text)))))
+                (substring text 0 (1- (length text)))
+              text))
+    (evil-set-marker ?\] (1- (point)))
+    (back-to-indentation)
+    (evil-normal-state)))
+
+(evil-define-operator evil-change
+  (beg end type register yank-handler delete-func)
+  "Change text from BEG to END with TYPE.
+Save in REGISTER or the kill-ring with YANK-HANDLER.
+DELETE-FUNC is a function for deleting text, default `evil-delete'.
+If TYPE is `line', insertion starts on an empty line.
+If TYPE is `block', the inserted text in inserted at each line
+of the block."
+  (interactive "<R><x><y>")
+  (let ((delete-func (or delete-func #'evil-delete))
+        (nlines (1+ (evil-count-lines beg end)))
+        opoint leftmost-point)
+    (save-excursion
+      (goto-char beg)
+      (setq opoint (line-beginning-position))
+      (setq leftmost-point
+            (let ((inhibit-field-text-motion t)) (line-beginning-position))))
+    (unless (eq evil-want-fine-undo t)
+      (evil-start-undo-step))
+    (funcall delete-func beg end type register yank-handler)
+    (cond
+     ((eq type 'line)
+      (setq this-command 'evil-change-whole-line) ; for evil-maybe-remove-spaces
+      (cond
+       ((/= opoint leftmost-point) (evil-insert 1)) ; deletion didn't delete line
+       ((= opoint (point)) (evil-open-above 1))
+       (t (evil-open-below 1))))
+     ((eq type 'block)
+      (evil-insert 1 nlines))
+     (t (evil-insert 1)))
+    (setq evil-this-register nil)))
+
+(evil-define-operator evil-change-line (beg end type register yank-handler)
+  "Change to end of line, or change whole line if characterwise visual mode."
+  :motion evil-end-of-line-or-visual-line
+  (interactive "<R><x><y>")
+  (if (and (evil-visual-state-p) (eq type 'inclusive))
+      (cl-destructuring-bind
+          (beg end _type) (evil-expand-line-for-line-based-operators beg end type)
+        (evil-change-whole-line beg end register yank-handler))
+    (evil-change beg end type register yank-handler #'evil-delete-line)))
+
+(evil-define-operator evil-change-whole-line
+  (beg end register yank-handler)
+  "Change whole line."
+  :motion evil-line-or-visual-line
+  :type line
+  (interactive "<r><x>")
+  (evil-change beg end 'line register yank-handler))
+
+(evil-define-command evil-copy (beg end address)
+  "Copy lines in BEG END below line given by ADDRESS."
+  :motion evil-line-or-visual-line
+  (interactive "<r><addr>")
+  (goto-char (point-min))
+  (forward-line address)
+  (let* ((txt (buffer-substring-no-properties beg end))
+         (len (length txt)))
+    ;; ensure text consists of complete lines
+    (when (or (zerop len) (/= (aref txt (1- len)) ?\n))
+      (setq txt (concat txt "\n")))
+    (when (and (eobp) (not (bolp))) (newline)) ; incomplete last line
+    (insert txt)
+    (forward-line -1)))
+
+(evil-define-command evil-move (beg end address)
+  "Move lines in BEG .. END below the line given by ADDRESS."
+  :motion evil-line-or-visual-line
+  (interactive "<r><addr>")
+  (unless (= (1+ address) (line-number-at-pos beg))
+    (goto-char (point-min))
+    (forward-line address)
+    (let* ((m (set-marker (make-marker) (point)))
+           (txt (buffer-substring-no-properties beg end))
+           (len (length txt))
+           (last-line-blank (progn (goto-char (point-max)) (bolp))))
+      (delete-region beg end)
+      (unless last-line-blank ; as vim, preserve lack of blank last line
+        (progn (goto-char (point-max)) (when (bolp) (delete-char -1))))
+      (goto-char m)
+      (set-marker m nil)
+      ;; ensure text consists of complete lines
+      (when (or (zerop len) (/= (aref txt (1- len)) ?\n))
+        (setq txt (concat txt "\n")))
+      (when (and (eobp) (not (bolp))) (newline)) ; incomplete last line
+      (when (evil-visual-state-p)
+        (move-marker evil-visual-mark (point)))
+      (insert txt)
+      (forward-line -1)
+      (when (evil-visual-state-p)
+        (move-marker evil-visual-point (point))))))
+
+(defun evil--check-undo-system ()
+  (when (and (eq evil-undo-system 'undo-tree)
+             (not (bound-and-true-p undo-tree-mode)))
+    (user-error "Enable `global-undo-tree-mode' to use undo-tree commands.
+Add (add-hook 'evil-local-mode-hook 'turn-on-undo-tree-mode) to your init file for undo in non-file buffers.")))
+
+(evil-define-command evil-undo (count)
+  "Undo COUNT changes in buffer using `evil-undo-function'."
+  :repeat abort
+  :jump t
+  (interactive "*p")
+  (evil--check-undo-system)
+  (let ((state-before evil-state))
+    (unless (memq state-before '(normal visual)) (evil-normal-state))
+    (funcall evil-undo-function count)
+    (unless (memq state-before '(normal visual)) (evil-change-state state-before))))
+
+(evil-define-command evil-redo (count)
+  "Undo COUNT changes in buffer using `evil-redo-function'."
+  :repeat abort
+  (interactive "*p")
+  (evil--check-undo-system)
+  (funcall evil-redo-function count))
+
+(evil-define-operator evil-substitute (beg end type register)
+  "Change a character."
+  :motion evil-forward-char
+  (interactive "<R><x>")
+  (evil-change beg end type register))
+
+(evil-define-operator evil-upcase (beg end type)
+  "Convert text to upper case."
+  (if (eq type 'block)
+      (evil-apply-on-block #'evil-upcase beg end nil)
+    (upcase-region beg end)))
+
+(evil-define-operator evil-downcase (beg end type)
+  "Convert text to lower case."
+  (if (eq type 'block)
+      (evil-apply-on-block #'evil-downcase beg end nil)
+    (downcase-region beg end)))
+
+(evil-define-operator evil-invert-case (beg end type)
+  "Invert case of text."
+  (if (eq type 'block)
+      (evil-apply-on-block #'evil-invert-case beg end nil)
+    (save-excursion
+      (goto-char beg)
+      (while (< beg end)
+        (let ((char (following-char)))
+          (delete-char 1)
+          (insert-char
+           (if (eq (upcase char) char) (downcase char) (upcase char))))
+        (setq beg (1+ beg))))))
+
+(evil-define-operator evil-invert-char (beg end type)
+  "Invert case of character."
+  :motion evil-forward-char
+  (if (eq type 'block)
+      (evil-apply-on-block #'evil-invert-case beg end nil)
+    (evil-invert-case beg end)
+    (when evil-this-motion
+      (goto-char end)
+      (when (and evil-cross-lines
+                 (not evil-move-beyond-eol)
+                 (not (evil-visual-state-p))
+                 (not (evil-operator-state-p))
+                 (eolp) (not (eobp)) (not (bolp)))
+        (forward-char)))))
+
+(evil-define-operator evil-rot13 (beg end type)
+  "ROT13 encrypt text."
+  (if (eq type 'block)
+      (evil-apply-on-block #'rot13-region beg end nil)
+    (rot13-region beg end)))
+
+(evil-define-operator evil-join (beg end)
+  "Join the selected lines."
+  :motion evil-line
+  (let ((count (count-lines beg end))
+        last-line-blank)
+    (when (> count 1)
+      (setq count (1- count)))
+    (goto-char beg)
+    (dotimes (i count)
+      (when (= (1+ i) count) ; i.e. we're just before the last join
+        (evil-move-beginning-of-line)
+        (setq last-line-blank (looking-at "[ \t]*$")))
+      (join-line 1))
+    (and last-line-blank (indent-according-to-mode))))
+
+(evil-define-operator evil-join-whitespace (beg end)
+  "Join the selected lines without changing whitespace.
+\\<evil-normal-state-map>Like \\[evil-join], \
+but doesn't insert or remove any spaces."
+  :motion evil-line
+  (let ((count (count-lines beg end)))
+    (when (> count 1)
+      (setq count (1- count)))
+    (goto-char beg)
+    (dotimes (_ count)
+      (evil-move-end-of-line 1)
+      (unless (eobp)
+        (delete-char 1)))))
+
+(evil-define-operator evil-ex-join (beg end &optional count bang)
+  "Join the selected lines with optional COUNT and BANG."
+  (interactive "<r><a><!>")
+  (let ((join-fn (if bang 'evil-join-whitespace 'evil-join)))
+    (if (not count)
+        ;; without count - just join the given region
+        (funcall join-fn beg end)
+      (unless (string-match-p "^[1-9][0-9]*$" count)
+        (user-error "Invalid count"))
+      ;; emulate Vim's :join when count is given - start from the
+      ;; end of the region and join COUNT lines from there
+      (save-excursion
+        (goto-char end)
+        (let ((beg-adjusted (line-beginning-position 0))
+              (end-adjusted (line-beginning-position (string-to-number count))))
+          (funcall join-fn beg-adjusted end-adjusted))))))
+
+(defun evil--ex-string-for-print (beg end linump borderline)
+  "Return a string to be printed by :print etc.
+Starts at line of BEG and end at line of END.
+Include line number at the start of each line if LINUMP is non-nil.
+Surround line denoted by BORDERLINE with dashes if non-nil."
+  (let ((result-string "")
+        (continue t)
+        (line-move-visual nil))
+    (save-excursion
+      (goto-char beg)
+      (while continue
+        (let* ((line-num (line-number-at-pos))
+               (border (and (natnump borderline) (= borderline line-num)))
+               (raw-line (thing-at-point 'line))
+               (line (if (string= "\n" (substring raw-line -1))
+                         raw-line (concat raw-line "\n")))
+               (border-length (1- (min (length line) (frame-width)))))
+          (when border
+            (setq result-string
+                  (concat result-string (make-string border-length ?-) "\n")))
+          (when linump
+            (setq result-string
+                  (concat result-string
+                          (propertize (number-to-string (line-number-at-pos))
+                                      'face 'line-number-current-line)
+                          " ")))
+          (unless (eobp)
+            (setq result-string (concat result-string line)))
+          (when border
+            (setq result-string
+                  (concat result-string (make-string border-length ?-) "\n")))
+          (when (or (= (point) (progn (evil-line-move 1 t) (point)))
+                    (> (line-end-position) end))
+            (setq continue nil)))))
+    (string-trim-right result-string "\n")))
+
+(defun evil--ex-print-to-minibuffer (string)
+  "Print STRING to the minibuffer for better persistence."
+  (let ((keymap (make-keymap))
+        minibuffer-local-map)
+    (set-char-table-range (nth 1 keymap) t 'abort-recursive-edit)
+    (setq minibuffer-local-map keymap)
+    (read-from-minibuffer "" (propertize string 'read-only t))))
+
+(defun evil--ex-print (beg end count &optional linump borderline)
+  "Print lines in range to the minibuffer.
+Starting at BEG and ending at END + COUNT lines.
+Include line number at the start of each line if LINUMP is non-nil.
+Surround line denoted by BORDERLINE with dashes if non-nil."
+  (let* ((count (cond ((stringp count) (string-to-number count))
+                      ((natnump count) count)
+                      (t 1)))
+         (end (save-excursion (goto-char (if (= (point-max) end) end (1- end)))
+                              (line-end-position count)))
+         (substring (evil--ex-string-for-print beg end linump borderline)))
+    (cond ((> 1 count) (user-error "Positive count required"))
+          (evil--ex-global-active-p
+           (setq evil--ex-print-accumulator
+                 (if (string= "" evil--ex-print-accumulator)
+                     (concat evil--ex-print-accumulator substring)
+                   (concat evil--ex-print-accumulator "\n" substring))))
+          (t (evil--ex-print-to-minibuffer substring)
+             (when (string-match-p "\n" substring)
+               (goto-char end)
+               (evil-beginning-of-line))))))
+
+(defun evil--global-print+clear ()
+  "Print accumulated print output from :global print, and clear."
+  (let ((s evil--ex-print-accumulator))
+    (unless (string= s "")
+      (setq evil--ex-print-accumulator "")
+      (evil--ex-print-to-minibuffer s))))
+(add-hook 'evil-after-global-hook #'evil--global-print+clear)
+
+(evil-define-command evil-ex-print (beg end &optional count)
+  (interactive "<r><a>")
+  (evil--ex-print beg end count))
+
+(evil-define-command evil-ex-numbered-print (beg end &optional count)
+  (interactive "<r><a>")
+  (evil--ex-print beg end count t))
+
+(evil-define-command evil-ex-z (_beg end &optional zmarks _bang)
+  "Display several lines of text surrounding the line specified by range.
+BEG and END represent the range, ZMARKS represents the args in string form.
+With a count supplied in the args, display that number of lines.  Without a
+count, display `evil-scroll-count' number of lines, or half the window height.
+This table explains what each mark argument does.
+
+mark | first line              | last line                  | new cursor line
+-----+-------------------------+----------------------------+----------------
++    | current line            | 1 scr (or 1 count) forward | last line
+-    | 1 scr (or 1 count) back | current line               | last line
+^    | 2 scr (or 2 count) back | 1 scr (or 1 count) back    | last line
+.    | ½ scr (or ½ count) back | ½ scr (or ½ count) forward | last line
+=    | ½ scr (or ½ count) back | ½ scr (or ½ count) forward | current line
+
+Specifying no mark at all is the same as `+'.
+If the mark is `=' a line of dashes is printed around the current line.
+If a `#' is included before the mark args, the lines are numbered."
+  ;; TODO implement bang argument.
+  (interactive "<r><a><!>")
+  (goto-char (setq end (1- end)))
+  (save-match-data
+    (string-match "\\(#?\\)\\([^0-9]*\\)\\([0-9]*\\)" (or zmarks ""))
+    (cl-destructuring-bind (_ _ hs he ms me cs ce) (match-data)
+      (let* ((linump (/= hs he))
+             (mark-string (if (= ms me) "+" (substring zmarks ms me)))
+             (count-string (if (= cs ce) "" (substring zmarks cs ce)))
+             (count (evil--get-scroll-count (string-to-number count-string)))
+             (max-mini-window-height 0.5))
+        (cond
+         ((< 1 (- me ms))
+          (evil-beginning-of-line)
+          (user-error "Too many mark args (got %d, expected 1)" (- me ms)))
+         ((string= "+" mark-string)
+          (ignore-errors (beginning-of-line count))
+          (evil--ex-print end end count linump))
+         ((string= "-" mark-string)
+          (evil-beginning-of-line)
+          (evil--ex-print (line-beginning-position (- 2 count)) end 1 linump))
+         ((string= "^" mark-string)
+          (let ((end* (progn (move-end-of-line (- 1 count)) (point)))
+                (beg* (line-beginning-position (- 2 count))))
+            (evil-beginning-of-line)
+            (evil--ex-print beg* end* 1 linump)))
+         ((string= "." mark-string)
+          (let ((beg* (line-beginning-position (- 1 (floor count 2))))
+                (end* (progn (move-end-of-line (ceiling count 2)) (point))))
+            (evil-beginning-of-line)
+            (evil--ex-print beg* end* 1 linump)))
+         ((string= "=" mark-string)
+          (let ((beg* (line-beginning-position (- 1 (floor count 2))))
+                (end* (line-end-position (ceiling count 2))))
+            (evil-beginning-of-line)
+            (evil--ex-print beg* end* 1 linump (line-number-at-pos end))))
+         (t (evil-beginning-of-line)
+            (user-error "Invalid mark arg: %s" mark-string)))))))
+
+(evil-define-operator evil-fill (beg end)
+  "Fill text."
+  :move-point nil
+  :type line
+  (save-excursion
+    (ignore-errors (fill-region beg end))))
+
+(evil-define-operator evil-fill-and-move (beg end)
+  "Fill text and move point to the end of the filled region."
+  :move-point nil
+  :type line
+  (let ((marker (make-marker)))
+    (move-marker marker (1- end))
+    (ignore-errors
+      (fill-region beg end)
+      (goto-char marker)
+      (evil-first-non-blank))))
+
+(evil-define-operator evil-indent (beg end)
+  "Indent text."
+  :move-point nil
+  :type line
+  (evil-ensure-column
+    (setq this-command real-this-command) ; Reset change made by evil-ensure-column
+    (save-restriction
+      (narrow-to-region beg end)
+      (if (save-excursion (goto-char beg) (= end (line-beginning-position 2)))
+          ;; since some Emacs modes can only indent one line at a time,
+          ;; implement "==" as a call to `indent-according-to-mode'
+          (indent-according-to-mode)
+        (goto-char beg)
+        (indent-region beg end))
+      ;; Tabify or untabify leading whitespace characters
+      (when evil-indent-convert-tabs
+        ;; Whether tab or space should be used is determined by indent-tabs-mode
+        (let ((convert-fun (if indent-tabs-mode #'tabify #'untabify)))
+          (save-excursion
+            (goto-char (point-min))
+            (while (not (eolp))
+              (funcall convert-fun (point) (progn (skip-chars-forward " \t") (point)))
+              (forward-line))))))))
+
+(evil-define-operator evil-indent-line (beg end)
+  "Indent the line."
+  :motion evil-line
+  (evil-indent beg end))
+
+(evil-define-operator evil-shift-left (beg end &optional count preserve-empty)
+  "Shift text from BEG to END to the left.
+The text is shifted to the nearest multiple of `evil-shift-width'
+\(the rounding can be disabled by setting `evil-shift-round').
+If PRESERVE-EMPTY is non-nil, lines that contain only spaces are
+indented, too, otherwise they are ignored.  Location of point
+is preserved relative to text when called from insert state.
+Otherwise, it is determined by `evil-start-of-line' and/or `evil-track-eol'.
+See also `evil-shift-right'."
+  :type line
+  (interactive "<r><vc>")
+  (evil-shift-right beg end (- (or count 1)) preserve-empty))
+
+(evil-define-operator evil-shift-right (beg end &optional count preserve-empty)
+  "Shift text from BEG to END to the right.
+The text is shifted to the nearest multiple of `evil-shift-width'
+\(the rounding can be disabled by setting `evil-shift-round').
+If PRESERVE-EMPTY is non-nil, lines that contain only spaces are
+indented, too, otherwise they are ignored.  Location of point
+is preserved relative to text when called from insert or replace states.
+Otherwise, it is determined by `evil-start-of-line' and/or `evil-track-eol'.
+See also `evil-shift-left'."
+  :type line
+  :move-point nil ; point is moved according to `evil-start-of-line' and state
+  (interactive "<r><vc>")
+  (setq count (or count 1))
+  (let ((beg (set-marker (make-marker) beg))
+        (end (set-marker (make-marker) end))
+        (col-for-insert (current-column))
+        first-shift) ; shift of first line
+    (save-excursion
+      (goto-char beg)
+      (while (< (point) end)
+        (let* ((indent (current-indentation))
+               (new-indent
+                (max 0
+                     (if (not evil-shift-round)
+                         (+ indent (* count evil-shift-width))
+                       (* (+ (/ indent evil-shift-width)
+                             count
+                             (cond
+                              ((> count 0) 0)
+                              ((zerop (mod indent evil-shift-width)) 0)
+                              (t 1)))
+                          evil-shift-width)))))
+          (unless first-shift
+            (setq first-shift (- new-indent indent)))
+          (when (or preserve-empty
+                    (save-excursion
+                      (skip-chars-forward " \t")
+                      (not (eolp))))
+            (indent-to new-indent 0))
+          (delete-region (point) (progn (skip-chars-forward " \t") (point)))
+          (forward-line 1))))
+    ;; in case we're in an empty buffer first-shift is still unchanged
+    (unless first-shift
+      (if (< count 0)
+          (setq first-shift 0)
+        (setq first-shift (* count evil-shift-width))
+        (indent-to first-shift)))
+    ;; When called from insert state (C-t or C-d) the cursor should shift with the line,
+    ;; otherwise (normal state) its position is determined by `evil-start-of-line'.
+    (cond
+     ((or (evil-insert-state-p) (evil-replace-state-p))
+      (move-to-column (max 0 (+ col-for-insert first-shift))))
+     (evil-start-of-line (evil-first-non-blank))
+     ((evil--stick-to-eol-p) (move-end-of-line 1))
+     (t (move-to-column (or goal-column evil-operator-start-col col-for-insert))))))
+
+(defun evil-delete-indentation ()
+  "Delete all indentation on current line."
+  (interactive)
+  (save-excursion
+    (move-beginning-of-line nil)
+    (delete-region (point) (progn (skip-chars-forward " \t") (point)))))
+
+(evil-define-command evil-shift-right-line (count)
+  "Shift the current line COUNT times to the right.
+The text is shifted to the nearest multiple of
+`evil-shift-width'. Like `evil-shift-right' but always works on
+the current line."
+  (interactive "<c>")
+  (evil-shift-right (line-beginning-position) (line-beginning-position 2) count t))
+
+(evil-define-command evil-shift-left-line (count)
+  "Shift the current line COUNT times to the left.
+The text is shifted to the nearest multiple of
+`evil-shift-width'. Like `evil-shift-left' but always works on
+the current line."
+  (interactive "<c>")
+  (if (and (eq 'self-insert-command last-command)
+           (eq ?0 (char-before)))
+      (progn (delete-char -1)
+             (evil-delete-indentation))
+    (evil-shift-left (line-beginning-position) (line-beginning-position 2) count t)))
+
+(evil-define-operator evil-align-left (beg end _type &optional width)
+  "Left-align lines in the region at WIDTH columns.
+The default for width is the value of `fill-column'."
+  :motion evil-line
+  :type line
+  (interactive "<R><a>")
+  (evil-justify-lines beg end 'left (if width
+                                        (string-to-number width)
+                                      0)))
+
+(evil-define-operator evil-align-right (beg end _type &optional width)
+  "Right-align lines in the region at WIDTH columns.
+The default for width is the value of `fill-column'."
+  :motion evil-line
+  :type line
+  (interactive "<R><a>")
+  (evil-justify-lines beg end 'right (if width
+                                         (string-to-number width)
+                                       fill-column)))
+
+(evil-define-operator evil-align-center (beg end _type &optional width)
+  "Center lines in the region between WIDTH columns.
+The default for width is the value of `fill-column'."
+  :motion evil-line
+  :type line
+  (interactive "<R><a>")
+  (evil-justify-lines beg end 'center (if width
+                                          (string-to-number width)
+                                        fill-column)))
+
+(evil-define-operator evil-replace (beg end type char)
+  "Replace text from BEG to END with CHAR."
+  :motion evil-forward-char
+  (interactive "<R>"
+               (unwind-protect
+                   (let ((evil-force-cursor 'replace))
+                     (evil-refresh-cursor)
+                     (list (evil-read-key)))
+                 (evil-refresh-cursor)))
+  (when char
+    (if (eq type 'block)
+        (save-excursion
+          (evil-apply-on-rectangle
+           #'(lambda (begcol endcol char)
+               (let ((maxcol (evil-column (line-end-position))))
+                 (when (< begcol maxcol)
+                   (setq endcol (min endcol maxcol))
+                   (let ((beg (evil-move-to-column begcol nil t))
+                         (end (evil-move-to-column endcol nil t)))
+                     (delete-region beg end)
+                     (insert (make-string (- endcol begcol) char))))))
+           beg end char))
+      (goto-char beg)
+      (cond
+       ((eq char ?\n)
+        (delete-region beg end)
+        (newline)
+        (when evil-auto-indent
+          (indent-according-to-mode)))
+       (t
+        (while (< (point) end)
+          (if (eq (char-after) ?\n)
+              (forward-char)
+            (delete-char 1)
+            (insert-char char 1)))
+        (goto-char (max beg (1- end))))))))
+
+(evil-define-command evil-paste-before
+  (count &optional register yank-handler)
+  "Paste the latest yanked text before the cursor position.
+The return value is the yanked text."
+  :suppress-operator t
+  (interactive "*P<x>")
+  (setq count (prefix-numeric-value count))
+  (if (evil-visual-state-p)
+      ;; This is the only difference with evil-paste-after in visual-state
+      (let ((evil-kill-on-visual-paste (not evil-kill-on-visual-paste)))
+        (evil-visual-paste count register))
+    (evil-with-undo
+      (let* ((text (copy-sequence
+                    (if register
+                        (evil-get-register register)
+                      (current-kill 0))))
+             (yank-handler (or yank-handler
+                               (when (stringp text)
+                                 (car-safe (get-text-property
+                                            0 'yank-handler text)))))
+             (opoint (point)))
+        (when evil-paste-clear-minibuffer-first
+          (delete-minibuffer-contents)
+          (setq evil-paste-clear-minibuffer-first nil))
+        (when text
+          (if (functionp yank-handler)
+              (let ((evil-paste-count count)
+                    ;; for non-interactive use
+                    (this-command #'evil-paste-before))
+                (push-mark opoint t)
+                (insert-for-yank text))
+            ;; no yank-handler, default
+            (when (vectorp text)
+              (setq text (evil-vector-to-string text)))
+            (set-text-properties 0 (length text) nil text)
+            (push-mark opoint t)
+            (dotimes (_ (or count 1))
+              (insert-for-yank text))
+            (setq evil-last-paste
+                  (list #'evil-paste-before
+                        count
+                        opoint
+                        opoint    ; beg
+                        (point))) ; end
+            (evil-set-marker ?\[ opoint)
+            (evil-set-marker ?\] (1- (point)))
+            (when (and evil-move-cursor-back
+                       (> (length text) 0))
+              (backward-char))))
+        (when evil--cursor-after
+          (if (eq 'evil-yank-line-handler yank-handler)
+              (ignore-errors (evil-next-line-first-non-blank))
+            (evil-forward-char 1 nil t))
+          (setq evil--cursor-after nil))
+        ;; no paste-pop after pasting from a register
+        (when register
+          (setq evil-last-paste nil))
+        (and (> (length text) 0) text)))))
+
+(evil-define-command evil-paste-after
+  (count &optional register yank-handler)
+  "Paste the latest yanked text behind point.
+The return value is the yanked text."
+  :suppress-operator t
+  (interactive "*P<x>")
+  (setq count (prefix-numeric-value count))
+  (if (evil-visual-state-p)
+      (evil-visual-paste count register)
+    (evil-with-undo
+      (let* ((text (copy-sequence
+                    (if register
+                        (evil-get-register register)
+                      (current-kill 0))))
+             (yank-handler (or yank-handler
+                               (when (stringp text)
+                                 (car-safe (get-text-property
+                                            0 'yank-handler text)))))
+             (opoint (point)))
+        (when text
+          (if (functionp yank-handler)
+              (let ((evil-paste-count count)
+                    ;; for non-interactive use
+                    (this-command #'evil-paste-after))
+                (insert-for-yank text))
+            ;; no yank-handler, default
+            (when (vectorp text)
+              (setq text (evil-vector-to-string text)))
+            (set-text-properties 0 (length text) nil text)
+            (unless (eolp) (forward-char))
+            (push-mark (point) t)
+            ;; TODO: Perhaps it is better to collect a list of all
+            ;; (point . mark) pairs to undo the yanking for COUNT > 1.
+            ;; The reason is that this yanking could very well use
+            ;; `yank-handler'.
+            (let ((beg (point)))
+              (dotimes (_ (or count 1))
+                (insert-for-yank text))
+              (setq evil-last-paste
+                    (list #'evil-paste-after
+                          count
+                          opoint
+                          beg       ; beg
+                          (point))) ; end
+              (evil-set-marker ?\[ beg)
+              (evil-set-marker ?\] (1- (point)))
+              (when (evil-normal-state-p)
+                (evil-move-cursor-back)))))
+        (when evil--cursor-after
+          (if (eq 'evil-yank-line-handler yank-handler)
+              (ignore-errors (evil-next-line-first-non-blank 1))
+            (evil-forward-char 1 nil t))
+          (setq evil--cursor-after nil))
+        (when register
+          (setq evil-last-paste nil))
+        (and (> (length text) 0) text)))))
+
+(evil-define-command evil-paste-before-cursor-after
+  (count &optional register yank-handler)
+  "The same as `evil-paste-before' but
+leave the cursor just after the new text."
+  :suppress-operator t
+  (interactive "*P<x>")
+  (setq count (prefix-numeric-value count)
+        evil--cursor-after t)
+  (evil-paste-before count register yank-handler))
+
+(evil-define-command evil-paste-after-cursor-after
+  (count &optional register yank-handler)
+  "The same as `evil-paste-after' but
+leave the cursor just after the new text."
+  :suppress-operator t
+  (interactive "*P<x>")
+  (setq count (prefix-numeric-value count)
+        evil--cursor-after t)
+  (evil-paste-after count register yank-handler))
+
+(defun evil-insert-for-yank-at-col (startcol _endcol string count)
+  "Insert STRING at STARTCOL."
+  (move-to-column startcol)
+  (dotimes (_ (or count 1))
+    (insert-for-yank string))
+  (evil-set-marker ?\] (1- (point))))
+
+(evil-define-command evil-visual-paste (count &optional register)
+  "Paste over Visual selection."
+  :suppress-operator t
+  (interactive "*P<x>")
+  (setq count (prefix-numeric-value count))
+  ;; evil-visual-paste is typically called from evil-paste-before or
+  ;; evil-paste-after, but we have to mark that the paste was from
+  ;; visual state
+  (setq this-command 'evil-visual-paste)
+  (let* ((text (if register
+                   (evil-get-register register)
+                 (current-kill 0)))
+         (yank-handler (car-safe (get-text-property
+                                  0 'yank-handler text)))
+         (dir (evil-visual-direction))
+         beg end type)
+    (evil-with-undo
+      (let ((kill-ring-yank-pointer (when kill-ring (list (current-kill 0)))))
+        (when (evil-visual-state-p)
+          (setq beg evil-visual-beginning
+                end evil-visual-end
+                type (evil-visual-type))
+          ;; When pasting charwise text into linewise selection, keep trailing NL
+          (when (and text end
+                     (eq 'line type)
+                     (not (eq ?\n (aref text (1- (length text))))))
+            (cl-decf end))
+          (evil-visual-rotate 'upper-left)
+          (evil-delete beg end type (unless evil-kill-on-visual-paste ?_))
+          (when (and (eq yank-handler #'evil-yank-line-handler)
+                     (not (memq type '(line block)))
+                     (/= end (point-max)))
+            (insert "\n"))
+          (evil-normal-state)
+          (when kill-ring (current-kill 1)))
+        ;; Effectively memoize `evil-get-register' because it can be
+        ;; side-effecting (e.g. for the "=" register)...
+        (cl-letf (((symbol-function #'evil-get-register)
+                   (lambda (&rest _) text)))
+          (cond
+           ;; When replacing the last buffer line and it does not end
+           ;; in a newline, use `evil-paste-after' because
+           ;; `evil-delete' will have moved point to the line above.
+           ((cond ((eq type 'line) (= end (point-max)))
+                  ((eq type 'block) (eq yank-handler #'evil-yank-line-handler)))
+            (goto-char end)
+            (evil-paste-after count register))
+           ((and (eq type 'block)
+                 (not (eq yank-handler #'evil-yank-block-handler))
+                 (not (string-match-p "\n" text)))
+            (evil-apply-on-block #'evil-insert-for-yank-at-col beg end t text count))
+           (t (evil-paste-before count register)))))
+      (when evil-kill-on-visual-paste
+        (current-kill -1))
+      ;; Ensure that gv can restore visually pasted area...
+      (set-marker evil-visual-point (evil-get-marker (if (< dir 0) ?\[ ?\]) t))
+      (set-marker evil-visual-mark (evil-get-marker (if (< dir 0) ?\] ?\[) t))
+      ;; mark the last paste as visual-paste
+      (setq evil-last-paste
+            (list (nth 0 evil-last-paste)
+                  (nth 1 evil-last-paste)
+                  (nth 2 evil-last-paste)
+                  (nth 3 evil-last-paste)
+                  (nth 4 evil-last-paste)
+                  t)))))
+
+(defun evil-paste-from-register (register)
+  "Paste from REGISTER."
+  (interactive
+   (let ((ov (make-overlay (point) (+ (point) (if (evil-replace-state-p) 1 0)))))
+     (unwind-protect
+         (progn
+           (overlay-put ov 'invisible t)
+           (overlay-put ov 'after-string
+                        #("\"" 0 1 (face minibuffer-prompt cursor 1)))
+           (list (or evil-this-register (read-char))))
+       (delete-overlay ov))))
+  (let ((opoint (point))
+        evil-move-cursor-back)
+    (evil-paste-before nil register t)
+    (when (evil-replace-state-p)
+      (let* ((reg-length (- (point) opoint))
+             (chars-to-delete (min (- (line-end-position) (point)) reg-length)))
+        ;; TODO: handle multi-line paste backspacing
+        (evil-update-replace-alist (point) reg-length chars-to-delete chars-to-delete)
+        (delete-char chars-to-delete)))))
+
+(defun evil-paste-last-insertion ()
+  "Paste last insertion."
+  (interactive)
+  (evil-paste-from-register ?.))
+
+(defun evil-paste-last-insertion-and-stop-insert ()
+  "Paste last insertion and change to normal state."
+  (interactive)
+  (evil-paste-last-insertion)
+  (evil-normal-state))
+
+(evil-define-command evil-use-register (register)
+  "Use REGISTER for the next command."
+  :keep-visual t
+  :repeat ignore
+  :suppress-operator t
+  (interactive "<C>")
+  (setq evil-this-register register))
+
+(defvar evil-macro-buffer nil
+  "The buffer that has been active on macro recording.")
+
+(defvar evil-execute-normal-keys nil
+  "The keys used to invoke the current `evil-execute-in-normal-state'.
+Can be used to detect if we are currently in that quasi-state.
+With current bindings, it will be \\<evil-insert-state-map>\\[evil-execute-in-normal-state]")
+
+(defun evil-end-and-return-macro ()
+  "Like `kmacro-end-macro' but also return the macro.
+Remove \\<evil-insert-state-map>\\[evil-execute-in-normal-state] from the end."
+  ;; `end-kbd-macro' rather than `kmacro-end-macro' to allow clearing registers
+  (end-kbd-macro nil #'kmacro-loop-setup-function)
+  (let ((end-keys-seq (append evil-execute-normal-keys nil))
+        (last-kbd-macro-seq (append last-kbd-macro nil)))
+    (unless last-kbd-macro-seq
+      (setq last-kbd-macro nil))
+    (if (and end-keys-seq last-kbd-macro-seq)
+        (apply #'vector (butlast last-kbd-macro-seq (length end-keys-seq)))
+      last-kbd-macro)))
+
+(evil-define-command evil-record-macro (register)
+  "Record a keyboard macro into REGISTER.
+If REGISTER is :, /, or ?, the corresponding command line window
+will be opened instead."
+  :keep-visual t
+  :suppress-operator t
+  (interactive
+   (list (unless (and evil-this-macro defining-kbd-macro)
+           (or evil-this-register (evil-read-key)))))
+  (let (last-macro)
+    (cond
+     ((eq register ?\C-g)
+      (keyboard-quit))
+     ((and evil-this-macro defining-kbd-macro)
+      (setq evil-macro-buffer nil
+            last-macro (ignore-errors (evil-end-and-return-macro)))
+      (when last-macro
+        (evil-set-register evil-this-macro last-macro))
+      (setq evil-this-macro nil))
+     ((eq register ?:)
+      (evil-command-window-ex))
+     ((eq register ?/)
+      (evil-command-window-search-forward))
+     ((eq register ??)
+      (evil-command-window-search-backward))
+     ((or (<= ?0 register ?9)
+          (<= ?a register ?z)
+          (<= ?A register ?Z))
+      (when defining-kbd-macro (end-kbd-macro))
+      (setq evil-this-macro register
+            evil-last-recorded-register register)
+      (evil-set-register evil-this-macro nil)
+      (kmacro-start-macro nil)
+      (setq evil-macro-buffer (current-buffer)))
+     (t (error "Invalid register `%s'" register)))))
+
+(defun evil-repeat-execute-macro (flag)
+  "Called to record a macro execution.
+FLAG is either `pre' or `post' if the function is called before resp.
+after executing the command."
+  (pcase flag
+    ('pre (evil-repeat-record (this-command-keys)))
+    ('post (evil-repeat-record (string evil-last-register)))))
+
+(evil-define-command evil-execute-macro (count macro)
+  "Execute keyboard macro MACRO, COUNT times.
+When called with a non-numerical prefix \
+\(such as \\[universal-argument]),
+COUNT is infinite. MACRO is read from a register
+when called interactively."
+  :keep-visual t
+  :suppress-operator t
+  :repeat evil-repeat-execute-macro
+  (interactive
+   (let (count macro register)
+     (setq count (cond ((null current-prefix-arg) 1)
+                       ((numberp current-prefix-arg) current-prefix-arg)
+                       (t 0))
+           register (or evil-this-register (read-char)))
+     (cond
+      ((or (eq register ?:)
+           (and (eq register ?@) (eq evil-last-register ?:)))
+       (setq macro #'evil-ex-repeat
+             evil-last-register ?:))
+      ((eq register ?@)
+       (unless evil-last-register
+         (user-error "No previously executed keyboard macro."))
+       (setq macro (evil-get-register evil-last-register t)))
+      (t
+       (setq macro (evil-get-register register t)
+             evil-last-register register)))
+     (list count macro)))
+  (cond
+   ((functionp macro)
+    (evil-repeat-abort)
+    (if (zerop count)
+        (while t (funcall macro))
+      (dotimes (_ (or count 1)) (funcall macro))))
+   ((or (and (not (stringp macro))
+             (not (vectorp macro)))
+        (member macro '("" [])))
+    ;; allow references to currently empty registers
+    ;; when defining macro
+    (unless evil-this-macro (user-error "No previous macro")))
+   (t
+    (condition-case err
+        (evil-with-single-undo
+          ;; For performance; but keep Evil's repeat hooks, as they record keys
+          ;; replayed by insert count.
+          (let ((pre-command-hook '(evil-repeat-pre-hook))
+                (post-command-hook '(evil-repeat-post-hook)))
+            (combine-after-change-calls
+              (execute-kbd-macro macro count)
+              (setq this-command 'evil-execute-macro)))) ; For repeatability
+      ;; enter Normal state if the macro fails
+      (error
+       (evil-normal-state)
+       (signal (car err) (cdr err)))))))
+
+(evil-define-command evil-execute-last-recorded-macro (count)
+  "Execute last recorded keyboard macro COUNT times.
+When called with a non-numerical prefix \
+\(such as \\[universal-argument]),
+COUNT is infinite."
+  :keep-visual t
+  :suppress-operator t
+  (interactive
+   (list (cond
+          ((and current-prefix-arg (numberp current-prefix-arg)) current-prefix-arg)
+          (current-prefix-arg 0)
+          (t 1))))
+  (if evil-last-recorded-register
+      (evil-execute-macro count (evil-get-register evil-last-recorded-register t))
+    (user-error "No previous macro"))
+  (setq evil-last-register evil-last-recorded-register))
+
+;;; Visual commands
+
+(evil-define-motion evil-visual-restore ()
+  "Restore previous selection."
+  (cond
+   ;; Called from visual state
+   ((and (evil-visual-state-p)
+         evil-prev-visual-mark evil-prev-visual-point evil-prev-visual-selection)
+    (let ((tmp-visual-mark (marker-position evil-visual-mark))
+          (tmp-visual-point (marker-position evil-visual-point))
+          (tmp-visual-selection evil-visual-selection))
+      (evil-visual-make-selection evil-prev-visual-mark
+                                  evil-prev-visual-point
+                                  evil-prev-visual-selection
+                                  t)
+      (move-marker evil-prev-visual-mark tmp-visual-mark)
+      (move-marker evil-prev-visual-point tmp-visual-point)
+      (setq evil-prev-visual-selection tmp-visual-selection)))
+   ;; Called from other state
+   ((and evil-visual-selection evil-visual-mark evil-visual-point)
+    (evil-visual-make-selection evil-visual-mark
+                                evil-visual-point
+                                (evil-visual-type)
+                                t))))
+
+(evil-define-motion evil-visual-exchange-corners ()
+  "Rearrange corners in Visual Block mode.
+
+        M---+           +---M
+        |   |    <=>    |   |
+        +---P           P---+
+
+For example, if mark is in the upper left corner and point
+in the lower right, this function puts mark in the upper right
+corner and point in the lower left."
+  (cond
+   ((eq evil-visual-selection 'block)
+    (let* ((point (point))
+           (mark (or (mark t) point))
+           (point-col (evil-column point))
+           (mark-col (evil-column mark))
+           (mark (save-excursion
+                   (goto-char mark)
+                   (evil-move-to-column point-col)
+                   (point)))
+           (point (save-excursion
+                    (goto-char point)
+                    (evil-move-to-column mark-col)
+                    (point))))
+      (evil-visual-refresh mark point)))
+   (t
+    (evil-exchange-point-and-mark)
+    (evil-visual-refresh))))
+
+(evil-define-command evil-visual-rotate (corner &optional beg end type)
+  "Move point to CORNER of the Visual selection.
+Corner may be one of `upper-left', `upper-right', `lower-left' and
+`lower-right':
+
+    upper-left +---+ upper-right
+               |   |
+    lower-left +---+ lower-right
+
+When called interactively, the selection is rotated clockwise."
+  :keep-visual t
+  (interactive
+   (let ((corners '(#1=upper-left upper-right lower-right lower-left #1#)))
+     (list (cadr (memq (evil-visual-block-corner) corners)))))
+  (let* ((beg (or beg (point)))
+         (end (or end (mark t) beg))
+         (type (or type evil-this-type))
+         range)
+    (cond
+     ((memq type '(rectangle block))
+      (setq range (evil-block-rotate beg end :corner corner)
+            beg (pop range)
+            end (pop range))
+      (unless (eq corner (evil-visual-block-corner corner beg end))
+        (evil-swap beg end))
+      (goto-char beg)
+      (when (evil-visual-state-p)
+        (evil-move-mark end)
+        (evil-visual-refresh nil nil nil :corner corner)))
+     ((memq corner '(upper-right lower-right))
+      (goto-char (max beg end))
+      (when (evil-visual-state-p)
+        (evil-move-mark (min beg end))))
+     (t
+      (goto-char (min beg end))
+      (when (evil-visual-state-p)
+        (evil-move-mark (max beg end)))))))
+
+;;; Insertion commands
+
+(defun evil-insert (count &optional vcount skip-empty-lines)
+  "Switch to Insert state just before point.
+The insertion will be repeated COUNT times on the next VCOUNT lines,
+starting at the same column.
+If SKIP-EMPTY-LINES is non-nil, the insertion will not be performed
+on lines on which the insertion point would be after the end of the
+lines.  This is the default behaviour for Visual-state insertion."
+  (interactive
+   (if (not (evil-visual-state-p))
+       (list (prefix-numeric-value current-prefix-arg))
+     (evil-visual-rotate 'upper-left)
+     (list (prefix-numeric-value current-prefix-arg)
+           (when (memq (evil-visual-type) '(line block))
+             (1+ (evil-count-lines evil-visual-point evil-visual-mark)))
+           t)))
+  (and evil-want-fine-undo vcount (evil-start-undo-step))
+  (if (and (evil-visual-state-p) (eq (evil-visual-type) 'line))
+      (evil-insert-line count vcount)
+    (setq evil-insert-count count
+          evil-insert-lines nil
+          evil-insert-vcount (and vcount
+                                  (> vcount 1)
+                                  (list (line-number-at-pos)
+                                        (current-column)
+                                        vcount))
+          evil-insert-skip-empty-lines skip-empty-lines)
+    (evil-insert-state 1)))
+
+(defun evil-append (count &optional vcount skip-empty-lines)
+  "Switch to Insert state just after point.
+The insertion will be repeated COUNT times and repeated once for
+the next VCOUNT - 1 lines starting at the same column.  If
+SKIP-EMPTY-LINES is non-nil, the insertion will not be performed
+on lines on which the insertion point would be after the end of
+the lines."
+  (interactive
+   (list (prefix-numeric-value current-prefix-arg)
+         (and (evil-visual-state-p)
+              (memq (evil-visual-type) '(line block))
+              (1+ (evil-count-lines evil-visual-point evil-visual-mark)))))
+  (if (and (called-interactively-p 'any)
+           (evil-visual-state-p))
+      (cond
+       ((or (eq (evil-visual-type) 'line)
+            (and (eq (evil-visual-type) 'block)
+                 (memq last-command '(next-line previous-line))
+                 (eq temporary-goal-column most-positive-fixnum)))
+        (evil-visual-rotate 'upper-left)
+        (evil-append-line count vcount))
+       ((eq (evil-visual-type) 'block)
+        (let ((column (max (evil-column evil-visual-beginning)
+                           (evil-column evil-visual-end))))
+          (evil-visual-rotate 'upper-left)
+          (move-to-column column t)
+          (evil-insert count vcount skip-empty-lines)))
+       (t
+        (evil-visual-rotate 'lower-right)
+        (backward-char)
+        (evil-append count)))
+    (unless (eolp) (forward-char))
+    (evil-insert count vcount skip-empty-lines)
+    (add-hook 'post-command-hook #'evil-maybe-remove-spaces)))
+
+(evil-define-command evil-insert-resume (count)
+  "Switch to Insert state at previous insertion point.
+The insertion will be repeated COUNT times. If called from visual
+state, only place point at the previous insertion position but do not
+switch to insert state."
+  :keep-visual t
+  :type exclusive
+  :jump t
+  (interactive "p")
+  (evil-goto-mark ?^ t)
+  (unless (evil-visual-state-p)
+    (evil-insert count)))
+
+(defun evil-quoted-insert (count)
+  "Like `quoted-insert' but delete COUNT chars forward in replace state.
+Adds a \"^\" overlay as an input prompt."
+  (interactive "p")
+  (let* ((opoint (point))
+         chars-to-delete
+         (ov (if (not (evil-replace-state-p))
+                 (make-overlay opoint opoint)
+               (setq chars-to-delete (min (- (line-end-position) opoint) count))
+               (evil-update-replace-alist opoint count chars-to-delete)
+               (make-overlay opoint (+ chars-to-delete opoint)))))
+    (unwind-protect
+        (progn
+          (overlay-put ov 'invisible t)
+          (overlay-put ov 'after-string #("^" 0 1 (face escape-glyph cursor 1)))
+          (let (overwrite-mode) ; Force `read-quoted-char'
+            (quoted-insert count))
+          (when chars-to-delete (delete-char chars-to-delete)))
+      (delete-overlay ov))))
+
+(evil-define-command evil-open-above (count)
+  "Insert a new line above point and switch to Insert state.
+The insertion will be repeated COUNT times."
+  :suppress-operator t
+  (interactive "p")
+  (unless (eq evil-want-fine-undo t)
+    (evil-start-undo-step))
+  (evil-insert-newline-above)
+  (setq evil-insert-count count
+        evil-insert-lines t
+        evil-insert-vcount nil)
+  (unwind-protect
+      (when evil-auto-indent
+        (indent-according-to-mode))
+    (evil-insert-state 1)))
+
+(evil-define-command evil-open-below (count)
+  "Insert a new line below point and switch to Insert state.
+The insertion will be repeated COUNT times."
+  :suppress-operator t
+  (interactive "p")
+  (unless (eq evil-want-fine-undo t)
+    (evil-start-undo-step))
+  (push (point) buffer-undo-list)
+  (evil-insert-newline-below)
+  (setq evil-insert-count count
+        evil-insert-lines t
+        evil-insert-vcount nil)
+  (unwind-protect
+      (when evil-auto-indent
+        (indent-according-to-mode))
+    (evil-insert-state 1)))
+
+(defun evil--insert-line (count vcount non-blank-p)
+  "Switch to insert state at the beginning of the current line.
+If NON-BLANK-P is non-nil, point is placed at the first non-blank character
+on the current line.  If NON-BLANK-P is nil, point is placed at column 0,
+or the beginning of visual line.  The insertion will be repeated COUNT times.
+If VCOUNT is non nil it should be number > 0. The insertion will be repeated
+in the next VCOUNT - 1 lines below the current one."
+  (push (point) buffer-undo-list)
+  (let ((move-fn (if non-blank-p #'evil-first-non-blank #'evil-beginning-of-line)))
+    (if (and visual-line-mode
+             evil-respect-visual-line-mode)
+        (goto-char
+         (max (save-excursion
+                (funcall move-fn)
+                (point))
+              (save-excursion
+                (beginning-of-visual-line)
+                (point))))
+      (funcall move-fn))
+    (setq evil-insert-count count
+          evil-insert-lines nil
+          evil-insert-vcount
+          (and vcount
+               (> vcount 1)
+               (list (line-number-at-pos)
+                     move-fn
+                     vcount))))
+  (evil-insert-state 1))
+
+(defun evil-insert-line (count &optional vcount)
+  "Switch to insert state at beginning of current line.
+Point is placed at the first non-blank character on the current
+line.  The insertion will be repeated COUNT times.  If VCOUNT is
+non nil it should be number > 0. The insertion will be repeated
+in the next VCOUNT - 1 lines below the current one."
+  (interactive "p")
+  (evil--insert-line count vcount t))
+
+(evil-define-command evil-insert-0-line (count &optional vcount)
+  "Switch to insert state at beginning of current line.
+Point is placed at column 0, or the beginning of the visual line.
+The insertion will be repeated COUNT times.  If VCOUNT is
+non nil it should be number > 0. The insertion will be repeated
+in the next VCOUNT - 1 lines below the current one."
+  :keep-visual t
+  :type exclusive
+  (interactive "p")
+  (if (evil-visual-state-p)
+      (evil-beginning-of-line)
+    (evil--insert-line count vcount nil)))
+
+(defun evil-append-line (count &optional vcount)
+  "Switch to Insert state at the end of the current line.
+The insertion will be repeated COUNT times.  If VCOUNT is non nil
+it should be number > 0. The insertion will be repeated in the
+next VCOUNT - 1 lines below the current one."
+  (interactive "p")
+  (if (and visual-line-mode
+           evil-respect-visual-line-mode)
+      (end-of-visual-line)
+    (evil-move-end-of-line))
+  (setq evil-insert-count count
+        evil-insert-lines nil
+        evil-insert-vcount
+        (and vcount
+             (> vcount 1)
+             (list (line-number-at-pos)
+                   #'end-of-line
+                   vcount)))
+  (evil-insert-state 1))
+
+(evil-define-command evil-insert-digraph (count)
+  "Insert COUNT digraphs."
+  :repeat change
+  (interactive "p")
+  (let ((opoint (point))
+        chars-to-delete insert-prompt)
+    (if (evil-replace-state-p)
+        (progn
+          (setq chars-to-delete (min (- (line-end-position) opoint) count)
+                insert-prompt (make-overlay opoint (+ chars-to-delete opoint)))
+          (evil-update-replace-alist opoint count chars-to-delete))
+      (setq insert-prompt (make-overlay opoint opoint)))
+    (insert-char (evil-read-digraph-char-with-overlay insert-prompt) count)
+    (when chars-to-delete (delete-char chars-to-delete))))
+
+(evil-define-command evil-ex-show-digraphs ()
+  "Show a list of all available digraphs."
+  :repeat nil
+  (eval-and-compile (require 'evil-digraphs))
+  (let ((columns 3))
+    (evil-with-view-list
+      :name "evil-digraphs"
+      :mode-name "Evil Digraphs"
+      :format
+      (cl-loop repeat columns vconcat [("Digraph" 8 nil) ("Sequence" 16 nil)])
+      :entries
+      (cl-loop
+       with xs = (append evil-digraphs-table-user evil-digraphs-table)
+       while xs collect
+       (cl-loop
+        repeat columns vconcat
+        (cl-destructuring-bind (chars . digraph) (or (pop xs) '(() . ?\ ))
+          (list (char-to-string digraph) (concat chars)))
+        into row finally return (list nil row))))))
+
+(defun evil--self-insert-string (string)
+  "Insert STRING as if typed interactively."
+  (let ((chars (append string nil)))
+    (dolist (char chars)
+      (let ((last-command-event char))
+        (self-insert-command 1)))))
+
+(defun evil-copy-from-above (arg)
+  "Copy characters from preceding non-blank line.
+The copied text is inserted before point.
+ARG is the number of lines to move backward.
+See also \\<evil-insert-state-map>\\[evil-copy-from-below]."
+  (interactive
+   (cond
+    ;; if a prefix argument was given, repeat it for subsequent calls
+    ((and (null current-prefix-arg)
+          (eq last-command #'evil-copy-from-above))
+     (setq current-prefix-arg last-prefix-arg)
+     (list (prefix-numeric-value current-prefix-arg)))
+    (t
+     (list (prefix-numeric-value current-prefix-arg)))))
+  (evil--self-insert-string (evil-copy-chars-from-line arg -1)))
+
+(defun evil-copy-from-below (arg)
+  "Copy characters from following non-blank line.
+The copied text is inserted before point.
+ARG is the number of lines to move forward.
+See also \\<evil-insert-state-map>\\[evil-copy-from-above]."
+  (interactive
+   (cond
+    ((and (null current-prefix-arg)
+          (eq last-command #'evil-copy-from-below))
+     (setq current-prefix-arg last-prefix-arg)
+     (list (prefix-numeric-value current-prefix-arg)))
+    (t
+     (list (prefix-numeric-value current-prefix-arg)))))
+  (evil--self-insert-string (evil-copy-chars-from-line arg 1)))
+
+;; adapted from `copy-from-above-command' in misc.el
+(defun evil-copy-chars-from-line (n num &optional col)
+  "Return N characters from line NUM, starting at column COL.
+NUM is relative to the current line and can be negative.
+COL defaults to the current column."
+  (interactive "p")
+  (let ((col (or col (current-column))) prefix)
+    (save-excursion
+      (forward-line num)
+      (when (looking-at "[[:space:]]*$")
+        (if (< num 0)
+            (skip-chars-backward " \t\n")
+          (skip-chars-forward " \t\n")))
+      (evil-move-beginning-of-line)
+      (move-to-column col)
+      ;; if the column winds up in middle of a tab,
+      ;; return the appropriate number of spaces
+      (when (< col (current-column))
+        (if (eq (preceding-char) ?\t)
+            (let ((len (min n (- (current-column) col))))
+              (setq prefix (make-string len ?\s)
+                    n (- n len)))
+          ;; if in middle of a control char, return the whole char
+          (backward-char 1)))
+      (concat prefix
+              (buffer-substring (point)
+                                (min (line-end-position)
+                                     (+ n (point))))))))
+
+(defun evil-enter-replace-state (count)
+  "Switch to Replace state at point.
+The insertion will be repeated COUNT times."
+  (interactive "p")
+  (setq evil-insert-count count)
+  (setq evil-insert-count count
+        evil-insert-lines nil
+        evil-insert-vcount nil)
+  (evil-replace-state 1))
+
+;; completion
+(evil-define-command evil-complete-next (&optional arg)
+  "Complete to the nearest following word.
+Search backward if a match isn't found.
+Calls `evil-complete-next-func'."
+  :repeat change
+  (interactive "P")
+  (if (minibufferp)
+      (funcall evil-complete-next-minibuffer-func)
+    (funcall evil-complete-next-func arg)))
+
+(evil-define-command evil-complete-previous (&optional arg)
+  "Complete to the nearest preceding word.
+Search forward if a match isn't found.
+Calls `evil-complete-previous-func'."
+  :repeat change
+  (interactive "P")
+  (if (minibufferp)
+      (funcall evil-complete-previous-minibuffer-func)
+    (funcall evil-complete-previous-func arg)))
+
+(evil-define-command evil-complete-next-line (&optional arg)
+  "Complete a whole line.
+Calls `evil-complete-next-line-func'."
+  :repeat change
+  (interactive "P")
+  (if (minibufferp)
+      (funcall evil-complete-next-minibuffer-func)
+    (funcall evil-complete-next-line-func arg)))
+
+(evil-define-command evil-complete-previous-line (&optional arg)
+  "Complete a whole line.
+Calls `evil-complete-previous-line-func'."
+  :repeat change
+  (interactive "P")
+  (if (minibufferp)
+      (funcall evil-complete-previous-minibuffer-func)
+    (funcall evil-complete-previous-line-func arg)))
+
+;;; Search
+
+(defun evil-repeat-search (flag)
+  "Called to record a search command.
+FLAG is either `pre' or `post' if the function is called before resp.
+after executing the command."
+  (cond
+   ((and (evil-operator-state-p) (eq flag 'pre))
+    (evil-repeat-record (this-command-keys))
+    (evil-clear-command-keys))
+   ((and (evil-operator-state-p) (eq flag 'post))
+    ;; The value of (this-command-keys) at this point should be the
+    ;; key-sequence that called the last command that finished the
+    ;; search, usually RET. Therefore this key-sequence will be
+    ;; recorded in the post-command of the operator. Alternatively we
+    ;; could do it here.
+    (evil-repeat-record (if evil-regexp-search
+                            (car-safe regexp-search-ring)
+                          (car-safe search-ring))))
+   (t (evil-repeat-motion flag))))
+
+(evil-define-motion evil-search-forward ()
+  (format "Search forward for user-entered text.
+Searches for regular expression if `evil-regexp-search' is t.%s"
+          (if (and (fboundp 'isearch-forward)
+                   (documentation 'isearch-forward))
+              (format "\n\nBelow is the documentation string \
+for `isearch-forward',\nwhich lists available keys:\n\n%s"
+                      (documentation 'isearch-forward)) ""))
+  :jump t
+  :type exclusive
+  :repeat evil-repeat-search
+  (evil-search-incrementally t evil-regexp-search))
+
+(evil-define-motion evil-search-backward ()
+  (format "Search backward for user-entered text.
+Searches for regular expression if `evil-regexp-search' is t.%s"
+          (if (and (fboundp 'isearch-forward)
+                   (documentation 'isearch-forward))
+              (format "\n\nBelow is the documentation string \
+for `isearch-forward',\nwhich lists available keys:\n\n%s"
+                      (documentation 'isearch-forward)) ""))
+  :jump t
+  :type exclusive
+  :repeat evil-repeat-search
+  (evil-search-incrementally nil evil-regexp-search))
+
+(evil-define-motion evil-search-next (count)
+  "Repeat the last search."
+  :jump t
+  :type exclusive
+  (let ((orig (point))
+        (search-string (if evil-regexp-search
+                           (car-safe regexp-search-ring)
+                         (car-safe search-ring))))
+    (goto-char
+     ;; Wrap in `save-excursion' so that multiple searches have no visual effect.
+     (save-excursion
+       (evil-search search-string isearch-forward evil-regexp-search)
+       (when (and (> (point) orig)
+                  (save-excursion
+                    (evil-adjust-cursor)
+                    (= (point) orig)))
+         ;; Point won't move after first attempt and `evil-adjust-cursor' takes
+         ;; effect, so start again.
+         (evil-search search-string isearch-forward evil-regexp-search))
+       (point)))
+    (when (and count (> count 1))
+      (dotimes (_ (1- count))
+        (evil-search search-string isearch-forward evil-regexp-search)))))
+
+(evil-define-motion evil-search-previous (count)
+  "Repeat the last search in the opposite direction."
+  :jump t
+  :type exclusive
+  (dotimes (_ (or count 1))
+    (evil-search (if evil-regexp-search
+                     (car-safe regexp-search-ring)
+                   (car-safe search-ring))
+                 (not isearch-forward) evil-regexp-search)))
+
+(evil-define-motion evil-search-word-backward (count &optional symbol)
+  "Search backward for symbol under point."
+  :jump t
+  :type exclusive
+  (interactive (list (prefix-numeric-value current-prefix-arg)
+                     evil-symbol-word-search))
+  (dotimes (_ (or count 1))
+    (evil-search-word nil nil symbol)))
+
+(evil-define-motion evil-search-word-forward (count &optional symbol)
+  "Search forward for symbol under point."
+  :jump t
+  :type exclusive
+  (interactive (list (prefix-numeric-value current-prefix-arg)
+                     evil-symbol-word-search))
+  (dotimes (_ (or count 1))
+    (evil-search-word t nil symbol)))
+
+(evil-define-motion evil-search-unbounded-word-backward (count &optional symbol)
+  "Search backward for symbol under point.
+The search is unbounded, i.e., the pattern is not wrapped in
+\\<...\\>."
+  :jump t
+  :type exclusive
+  (interactive (list (prefix-numeric-value current-prefix-arg)
+                     evil-symbol-word-search))
+  (dotimes (_ (or count 1))
+    (evil-search-word nil t symbol)))
+
+(evil-define-motion evil-search-unbounded-word-forward (count &optional symbol)
+  "Search forward for symbol under point.
+The search is unbounded, i.e., the pattern is not wrapped in
+\\<...\\>."
+  :jump t
+  :type exclusive
+  (interactive (list (prefix-numeric-value current-prefix-arg)
+                     evil-symbol-word-search))
+  (dotimes (_ (or count 1))
+    (evil-search-word t t symbol)))
+
+(defun evil-goto-definition-imenu (string _position)
+  "Find definition for STRING with imenu."
+  (require 'imenu nil t)
+  (let (ientry ipos)
+    (when (fboundp 'imenu--make-index-alist)
+      (ignore-errors (setq ientry (imenu--make-index-alist)))
+      (setq ientry (imenu--in-alist string ientry))
+      (setq ipos (cdr ientry))
+      (when (and (markerp ipos)
+                 (eq (marker-buffer ipos) (current-buffer)))
+        (setq ipos (marker-position ipos))
+        (when (numberp ipos)
+          (evil-search (format "\\_<%s\\_>" (regexp-quote string)) t t ipos)
+          t)))))
+
+(defun evil-goto-definition-semantic (_string position)
+  "Find definition for POSITION with semantic."
+  (and (fboundp 'semantic-ia-fast-jump)
+       (ignore-errors (semantic-ia-fast-jump position))))
+
+(declare-function xref-backend-identifier-at-point "xref")
+
+(defun evil-goto-definition-xref (_string position)
+  "Find definition at POSITION with xref."
+  (when (fboundp 'xref-find-definitions)
+    (let ((identifier (save-excursion
+                        (goto-char position)
+                        (xref-backend-identifier-at-point (xref-find-backend)))))
+      (condition-case nil
+          (progn (xref-find-definitions identifier)
+                 t)
+        (user-error nil)))))
+
+(defun evil-goto-definition-search (string _position)
+  "Find definition for STRING with evil-search."
+  (evil-search (format "\\_<%s\\_>" (regexp-quote string)) t t (point-min))
+  t)
+
+(evil-define-motion evil-goto-definition ()
+  "Go to definition or first occurrence of symbol under point.
+See also `evil-goto-definition-functions'."
+  :jump t
+  :type exclusive
+  (let* ((match (evil--find-thing t 'symbol))
+         (string (car match))
+         (position (cdr match)))
+    (if (null string)
+        (user-error "No symbol under cursor")
+      (setq isearch-forward t)
+      (run-hook-with-args-until-success 'evil-goto-definition-functions
+                                        string position))))
+
+;;; Folding
+(defun evil-fold-action (list action)
+  "Perform fold ACTION for each matching major or minor mode in LIST.
+
+ACTION will be performed for the first matching handler in LIST.  For more
+information on its features and format, see the documentation for
+`evil-fold-list'.
+
+If no matching ACTION is found in LIST, an error will signaled.
+
+Handler errors will be demoted, so a problem in one handler will (hopefully)
+not interfere with another."
+  (if (null list)
+      (user-error
+       "Enable one of the following modes for folding to work: %s"
+       (mapconcat #'symbol-name (mapcar #'caar evil-fold-list) ", "))
+    (let* ((modes (caar list)))
+      (if (evil--mode-p modes)
+          (let* ((actions (cdar list))
+                 (fn      (plist-get actions action)))
+            (when fn
+              (with-demoted-errors "Error: %S" (funcall fn))))
+        (evil-fold-action (cdr list) action)))))
+
+(defun evil--mode-p (modes)
+  "Determine whether any symbol in MODES represents the current
+buffer's major mode or any of its minors."
+  (unless (eq modes '())
+    (let ((mode (car modes)))
+      (or (eq major-mode mode)
+          (and (boundp mode) (symbol-value mode))
+          (evil--mode-p (cdr modes))))))
+
+(evil-define-command evil-toggle-fold ()
+  "Open or close a fold under point.
+See also `evil-open-fold' and `evil-close-fold'."
+  (evil-fold-action evil-fold-list :toggle))
+
+(evil-define-command evil-open-folds ()
+  "Open all folds.
+See also `evil-close-folds'."
+  (evil-fold-action evil-fold-list :open-all))
+
+(evil-define-command evil-close-folds ()
+  "Close all folds.
+See also `evil-open-folds'."
+  (evil-fold-action evil-fold-list :close-all))
+
+(evil-define-command evil-open-fold ()
+  "Open fold at point.
+See also `evil-close-fold'."
+  (evil-fold-action evil-fold-list :open))
+
+(evil-define-command evil-open-fold-rec ()
+  "Open fold at point recursively.
+See also `evil-open-fold' and `evil-close-fold'."
+  (evil-fold-action evil-fold-list :open-rec))
+
+(evil-define-command evil-close-fold ()
+  "Close fold at point.
+See also `evil-open-fold'."
+  (evil-fold-action evil-fold-list :close))
+
+;;; Ex
+
+(evil-define-operator evil-write (beg end _type file-or-append &optional bang)
+  "Save the current buffer, from BEG to END, to FILE-OR-APPEND.
+If FILE-OR-APPEND is of the form \">> FILE\", append to FILE
+instead of overwriting.  The current buffer's filename is not
+changed unless it has no associated file and no region is
+specified.  If the file already exists and the BANG argument is
+non-nil, it is overwritten without confirmation."
+  :motion nil
+  :move-point nil
+  :type line
+  :repeat nil
+  (interactive "<R><fsh><!>")
+  (let* ((append-and-filename (evil-extract-append file-or-append))
+         (append (car append-and-filename))
+         (filename (cdr append-and-filename))
+         (bufname (buffer-file-name (buffer-base-buffer))))
+    (when (zerop (length filename))
+      (setq filename bufname))
+    (cond
+     ((zerop (length filename))
+      (user-error "Please specify a file name for the buffer"))
+     ;; execute command on region
+     ((eq (aref filename 0) ?!)
+      (shell-command-on-region beg end (substring filename 1)))
+     ;; with region or append, always save to file without resetting
+     ;; modified flag
+     ((or append (and beg end))
+      (write-region beg end filename append nil nil (not (or append bang))))
+     ;; no current file
+     ((null bufname)
+      (write-file filename (not bang)))
+     ;; save current buffer to its file
+     ((string= filename bufname)
+      (if (not bang) (save-buffer) (write-file filename)))
+     ;; save to another file
+     (t
+      (write-region nil nil filename
+                    nil (not bufname) nil
+                    (not bang))))))
+
+(evil-define-command evil-write-all (bang)
+  "Save all buffers visiting a file.
+If BANG is non nil then read-only buffers are saved, too,
+otherwise they are skipped. "
+  :repeat nil
+  :move-point nil
+  (interactive "<!>")
+  (if bang
+      (save-some-buffers t)
+    ;; save only buffer that are not read-only and
+    ;; that are visiting a file
+    (save-some-buffers t
+                       #'(lambda ()
+                           (and (not buffer-read-only)
+                                (buffer-file-name))))))
+
+(evil-define-command evil-update ()
+  "Same as `evil-write', but only write when the buffer has been modified."
+  :motion nil
+  :move-point nil
+  :type line
+  :repeat nil
+  (when (buffer-modified-p)
+    (call-interactively #'evil-write)))
+
+(evil-define-command evil-save (filename &optional bang)
+  "Save the current buffer to FILENAME.
+Changes the file name of the current buffer to FILENAME.  If no
+FILENAME is given, the current file name is used."
+  :repeat nil
+  :move-point nil
+  (interactive "<f><!>")
+  (when (zerop (length filename))
+    (setq filename (buffer-file-name (buffer-base-buffer))))
+  (write-file filename (not bang)))
+
+(evil-define-command evil-edit (file &optional bang)
+  "Open FILE.
+If no FILE is specified, reload the current buffer from disk."
+  :repeat nil
+  (interactive "<f><!>")
+  (if file
+      (find-file file)
+    (revert-buffer bang (or bang (not (buffer-modified-p))) t)
+    (read-only-mode -1)))
+
+(evil-define-command evil-view (file &optional bang)
+  "Open FILE but don't allow changes.
+If no FILE is specified, reload the current buffer from disk as read-only."
+  :repeat nil
+  (interactive "<f><!>")
+  (if file
+      (find-file-read-only file)
+    (revert-buffer bang (or bang (not (buffer-modified-p))) t)
+    (read-only-mode +1)))
+
+(evil-define-command evil-buffer-add (file)
+  "Add FILE to the buffer list, but don't visit it. "
+  :repeat nil
+  (interactive "<f>")
+  (if (or (not file) (string= "" file))
+      (user-error "No file specified")
+    (find-file-noselect file)))
+
+(evil-define-command evil-read (count file)
+  "Insert the contents of FILE below the current line or line COUNT."
+  :repeat nil
+  :move-point nil
+  (interactive "P<fsh>")
+  (when (and file (not (zerop (length file))))
+    (when count (goto-char (point-min)))
+    (when (or (not (zerop (forward-line (or count 1))))
+              (not (bolp)))
+      (insert "\n"))
+    (cond
+     ((/= (aref file 0) ?!)
+      (when (member file '("#" "%"))
+        (setq file (evil-ex-replace-special-filenames file)))
+      (let ((result (insert-file-contents file)))
+        (save-excursion
+          (forward-char (cadr result))
+          (unless (bolp) (insert "\n")))))
+     (t
+      (shell-command (evil-ex-replace-special-filenames (substring file 1)) t)
+      (goto-char (mark))
+      (unless (bolp) (insert "\n"))
+      (forward-line -1)))))
+
+(evil-define-command evil-show-files ()
+  "Show the file-list.
+The same as `buffer-menu', but shows only buffers visiting
+files."
+  :repeat nil
+  (buffer-menu 1))
+
+(evil-define-command evil-goto-error (count)
+  "Go to error number COUNT.
+If no COUNT is supplied, move to the current error.
+
+Acts like `first-error' other than when given no counts, goes
+to the current error instead of the first, like in Vim's :cc
+command."
+  :repeat nil
+  (interactive "<c>")
+  (if count
+      (first-error (if (eql 0 count) 1 count))
+    (next-error 0)))
+
+(evil-define-command evil-buffer (buffer)
+  "Switch to another buffer."
+  :repeat nil
+  (interactive "<b>")
+  (cond
+   ;; no buffer given, switch to "other" buffer
+   ((null buffer) (switch-to-buffer (other-buffer)))
+   ;; we are given the name of an existing buffer
+   ((get-buffer buffer) (switch-to-buffer buffer))
+   ;; try to complete the buffer
+   ((let ((all-buffers (internal-complete-buffer buffer nil t)))
+      (when (= (length all-buffers) 1)
+        (switch-to-buffer (car all-buffers)))))
+   (t
+    (when (y-or-n-p
+           (format "No buffer with name \"%s\" exists. Create new buffer? "
+                   buffer))
+      (switch-to-buffer buffer)))))
+
+(evil-define-command evil-next-buffer (&optional count)
+  "Go to the COUNTth next buffer in the buffer list."
+  :repeat nil
+  (interactive "p")
+  (next-buffer count))
+
+(evil-define-command evil-prev-buffer (&optional count)
+  "Go to the COUNTth prev buffer in the buffer list."
+  :repeat nil
+  (interactive "p")
+  (previous-buffer count))
+
+(evil-define-command evil-delete-buffer (buffer &optional bang)
+  "Delete a buffer.
+All windows currently showing this buffer will be closed except
+for the last window in each frame."
+  (interactive "<b><!>")
+  (with-current-buffer (or buffer (current-buffer))
+    (when bang
+      (set-buffer-modified-p nil)
+      (dolist (process (process-list))
+        (when (eq (process-buffer process) (current-buffer))
+          (set-process-query-on-exit-flag process nil))))
+    ;; get all windows that show this buffer
+    (let ((wins (get-buffer-window-list (current-buffer) nil t)))
+      ;; if the buffer which was initiated by emacsclient,
+      ;; call `server-edit' from server.el to avoid
+      ;; "Buffer still has clients" message
+      (if (and (bound-and-true-p server-buffer-clients)
+               (fboundp 'server-edit))
+          (server-edit)
+        (kill-buffer nil))
+      ;; close all windows that showed this buffer
+      (dolist (w wins) (ignore-errors (delete-window w))))))
+
+(evil-define-command evil-quit (&optional force)
+  "Close the current window, current frame, current tab, Emacs.
+If the current frame belongs to some client the client connection
+is closed."
+  :repeat nil
+  (interactive "<!>")
+  (condition-case nil
+      (evil-window-delete)
+    (error
+     (if (and (bound-and-true-p server-buffer-clients)
+              (fboundp 'server-edit)
+              (fboundp 'server-buffer-done))
+         (if force
+             (server-buffer-done (current-buffer))
+           (server-edit))
+       (condition-case nil
+           (delete-frame)
+         (error
+          (condition-case nil
+              (tab-bar-close-tab)
+            (error
+             (if force
+                 (kill-emacs)
+               (save-buffers-kill-emacs))))))))))
+
+(evil-define-command evil-quit-all (&optional bang)
+  "Exit Emacs, asking for saving."
+  :repeat nil
+  (interactive "<!>")
+  (if (null bang)
+      (save-buffers-kill-terminal)
+    (let ((proc (frame-parameter (selected-frame) 'client)))
+      (if proc
+          (with-no-warnings
+            (server-delete-client proc))
+        (dolist (process (process-list))
+          (set-process-query-on-exit-flag process nil))
+        (kill-emacs)))))
+
+(evil-define-command evil-quit-all-with-error-code (&optional err-code _force)
+  "Exit Emacs without saving, returning an non-zero error code.
+The FORCE argument is only there for compatibility and is ignored.
+This function fails with an error if Emacs is run in server mode."
+  :repeat nil
+  (interactive "<N><!>")
+  (if (bound-and-true-p server-buffer-clients)
+      (user-error "Cannot exit client process with error code")
+    (kill-emacs (or err-code 1))))
+
+(evil-define-command evil-save-and-quit ()
+  "Save all buffers and exit Emacs."
+  (save-buffers-kill-terminal t))
+
+(evil-define-command evil-save-and-close (file &optional bang)
+  "Save the current buffer and close the window."
+  :repeat nil
+  (interactive "<f><!>")
+  (evil-write nil nil nil file bang)
+  (evil-quit))
+
+(evil-define-command evil-save-modified-and-close (file &optional bang)
+  "Save the current buffer and close the window."
+  :repeat nil
+  (interactive "<f><!>")
+  (when (buffer-modified-p)
+    (evil-write nil nil nil file bang))
+  (evil-quit))
+
+(evil-define-operator evil-shell-command
+  (beg end _type command &optional previous)
+  "Execute a shell command.
+If BEG, END and TYPE is specified, COMMAND is executed on the region,
+which is replaced with the command's output. Otherwise, the
+output is displayed in its own buffer. If PREVIOUS is non-nil,
+the previous shell command is executed instead."
+  (interactive "<R><sh><!>")
+  (if (not evil-called-from-ex-p)
+      (let ((current-prefix-arg
+             (if (or current-prefix-arg (evil-visual-state-p))
+                 current-prefix-arg
+               (goto-char (min beg end))
+               (count-lines beg end)))
+            (evil-ex-initial-input "!"))
+        (call-interactively #'evil-ex))
+    (if (zerop (length command))
+        (when previous (setq command evil-previous-shell-command))
+      (setq command (evil-ex-replace-special-filenames command)
+            evil-previous-shell-command command))
+    (cond
+     ((zerop (length command))
+      (user-error "No%s shell command" (if previous " previous" "")))
+     (evil-ex-range
+      (if (not evil-display-shell-error-in-message)
+          (shell-command-on-region beg end command nil t)
+        (let ((output-buffer (generate-new-buffer " *temp*"))
+              (error-buffer (generate-new-buffer " *temp*")))
+          (unwind-protect
+              (if (zerop (shell-command-on-region
+                          beg end command
+                          output-buffer nil error-buffer))
+                  (progn
+                    (delete-region beg end)
+                    (insert-buffer-substring output-buffer)
+                    (goto-char beg)
+                    (evil-first-non-blank))
+                (display-message-or-buffer error-buffer))
+            (kill-buffer output-buffer)
+            (kill-buffer error-buffer)))))
+     (t (shell-command command)))))
+
+(evil-define-command evil-make (arg)
+  "Call a build command in the current directory.
+If ARG is nil this function calls `recompile', otherwise it calls
+`compile' passing ARG as build command."
+  (interactive "<sh>")
+  (if (and (fboundp 'recompile)
+           (not arg))
+      (recompile)
+    (compile arg)))
+
+;; TODO: escape special characters (currently only \n) ... perhaps
+;; there is some Emacs function doing this?
+(evil-define-command evil-show-registers (registers)
+  "Show the contents of REGISTERS, or all registers, if none supplied."
+  :repeat nil
+  (interactive "<a>")
+  (let* ((all-registers (evil-register-list))
+         (reg-chars (string-to-list registers))
+         (display-regs (if reg-chars
+                           (cl-remove-if-not (lambda (r) (memq (car r) reg-chars))
+                                             all-registers)
+                         all-registers)))
+    (evil-with-view-list
+      :name "evil-registers"
+      :mode-name "Evil Registers"
+      :format
+      [("Register" 10 nil)
+       ("Value" 1000 nil)]
+      :entries
+      (cl-loop for (key . val) in display-regs
+               collect `(nil [,(char-to-string key)
+                              ,(cond ((stringp val)
+                                      (replace-regexp-in-string "\n" "^J" val))
+                                     ((vectorp val)
+                                      (key-description val))
+                                     (t ""))])))))
+
+(evil-define-command evil-show-marks (mrks)
+  "Show all marks.
+If MRKS is non-nil it should be a string and only registers
+corresponding to the characters of this string are shown."
+  :repeat nil
+  (interactive "<a>")
+  ;; To get markers and positions, we can't rely on 'global-mark-ring'
+  ;; provided by Emacs (although it will be much simpler and faster),
+  ;; because 'global-mark-ring' does not store mark characters, but
+  ;; only buffer name and position. Instead, 'evil-markers-alist' is
+  ;; used; this is list maintained by Evil for each buffer.
+  (let ((all-markers
+         ;; get global and local marks
+         (append (cl-remove-if (lambda (m)
+                                 (or (evil-global-marker-p (car m))
+                                     (not (markerp (cdr m)))))
+                               evil-markers-alist)
+                 (cl-remove-if (lambda (m)
+                                 (or (not (evil-global-marker-p (car m)))
+                                     (not (markerp (cdr m)))))
+                               (default-value 'evil-markers-alist)))))
+    (when mrks
+      (setq mrks (string-to-list mrks))
+      (setq all-markers (cl-delete-if (lambda (m)
+                                        (not (member (car m) mrks)))
+                                      all-markers)))
+    ;; map marks to list of 4-tuples (char row col file)
+    (setq all-markers
+          (mapcar (lambda (m)
+                    (with-current-buffer (marker-buffer (cdr m))
+                      (save-excursion
+                        (goto-char (cdr m))
+                        (list (car m)
+                              (line-number-at-pos (point))
+                              (current-column)
+                              (buffer-name)))))
+                  all-markers))
+    (evil-with-view-list
+      :name "evil-marks"
+      :mode-name "Evil Marks"
+      :format [("Mark" 8 nil)
+               ("Line" 8 nil)
+               ("Column" 8 nil)
+               ("Buffer" 1000 nil)]
+      :entries (cl-loop for m in (sort all-markers (lambda (a b) (< (car a) (car b))))
+                        collect `(nil [,(char-to-string (nth 0 m))
+                                       ,(number-to-string (nth 1 m))
+                                       ,(number-to-string (nth 2 m))
+                                       (,(nth 3 m))]))
+      :select-action #'evil--show-marks-select-action)))
+
+(defun evil--show-marks-select-action (entry)
+  (kill-buffer)
+  (switch-to-buffer (car (elt entry 3)))
+  (evil-goto-mark (string-to-char (elt entry 0))))
+
+(defun evil--parse-delmarks (to-be-parsed &optional parsed)
+  "Where TO-BE-PARSED can contain ranges in the form `x-y'.
+PARSED is a list of characters whose marks should be deleted.
+Like vim, on invalid input, preceeding valid input is still parsed."
+  (cl-destructuring-bind (&optional a b c &rest) to-be-parsed
+    (cond
+     ((null to-be-parsed) parsed)
+     ;; single mark...
+     ((and (not (eq ?- b)) (or (<= ?a a ?z) (<= ?A a ?Z) (<= ?0 a ?9)
+                               (memq a '(?\" ?^ ?. ?\[ ?\] ?< ?>))))
+      (evil--parse-delmarks (cdr to-be-parsed) (cons a parsed)))
+     ;; range of marks...
+     ((and (eq ?- b) c (or (<= ?a a c ?z) (<= ?A a c ?Z) (<= ?0 a c ?9)))
+      (evil--parse-delmarks (nthcdr 3 to-be-parsed)
+                            (append parsed (number-sequence a c))))
+     (t (progn (evil-echo "Invalid input: %s" (apply #'string (remove nil to-be-parsed)))
+               parsed)))))
+
+(evil-define-command evil-delete-marks (marks &optional force)
+  "MARKS is a string denoting all marks to be deleted. Mark names are
+either single characters or a range of characters in the form `x-y'.
+If FORCE is non-nil and MARKS is blank, all local marks except 0-9 are removed."
+  (interactive "<a><!>")
+  (let ((mark-chars (remove ?\s (append marks nil))))
+    (cond
+     ((and force mark-chars) (evil-echo "Invalid input"))
+     (mark-chars
+      (let* ((delmarks (evil--parse-delmarks mark-chars))
+             (delmarkp (lambda (m) (member (car m) delmarks))))
+        ;; delete all parsed marks...
+        (setq evil-markers-alist
+              (cl-remove-if delmarkp evil-markers-alist))
+        ;; ensure all parsed marks are deleted globally...
+        (set-default 'evil-markers-alist
+                     (cl-remove-if delmarkp (default-value 'evil-markers-alist)))))
+     ;; delete local marks except 0-9...
+     (force (setq evil-markers-alist
+                  (cl-remove-if-not (lambda (m) (<= ?0 (car m) ?9))
+                                    evil-markers-alist))))))
+
+(declare-function ffap-file-at-point "ffap")
+(defvar ffap-string-at-point-region)
+(evil-define-command evil-find-file-at-point-with-line ()
+  "Open the file at point and go to position if present.
+Supports positions in the following formats: \"path:line path(line)\",
+\"path:line:col\" and \"path(line,col)\"."
+  (require 'ffap)
+  (let ((fname (ffap-file-at-point)))
+    (unless fname
+      (user-error "File does not exist."))
+    (let* ((line-number-pattern ":\\([0-9]+\\)\\=" ) ; path:line format
+           (line-number-pattern-alt "\\=(\\([0-9]+\\))") ; path(line) format
+           (line-and-column-numbers-pattern ":\\([0-9]+\\):\\([0-9]+\\)\\=") ; path:line:col format
+           (line-and-column-numbers-pattern-alt "\\=(\\([0-9]+\\),\\([0-9]+\\))") ; file(line,col) format
+           (get-number (lambda (pattern match-number backward)
+                         (save-excursion
+                           (goto-char (cadr ffap-string-at-point-region))
+                           (and (if backward
+                                    (re-search-backward pattern (line-beginning-position) t)
+                                  (re-search-forward pattern (line-end-position) t))
+                                (string-to-number (match-string match-number))))))
+           (line-number (or (funcall get-number line-and-column-numbers-pattern 1 t)
+                            (funcall get-number line-and-column-numbers-pattern-alt 1 nil)
+                            (funcall get-number line-number-pattern 1 t)
+                            (funcall get-number line-number-pattern-alt 1 nil)))
+           (column-number (or (funcall get-number line-and-column-numbers-pattern 2 t)
+                              (funcall get-number line-and-column-numbers-pattern-alt 2 nil))))
+      (evil-echo "%s, %s"
+                 (if line-number (format "line: %s" line-number) "no line")
+                 (if column-number (format "column: %s" column-number) "no column"))
+      (find-file-at-point fname)
+      (when line-number
+        (goto-char (point-min))
+        (forward-line (1- line-number))
+        (when column-number
+          (move-to-column (1- column-number)))))))
+
+(evil-define-command evil-find-file-at-point-visual ()
+  "Find the filename selected by the visual region.
+Signal an error if the file does not exist."
+  (let ((region (buffer-substring (region-beginning) (region-end))))
+    (if (file-exists-p region)
+        (find-file-at-point region)
+      (user-error "Can't find file \"%s\" in path" region))))
+
+(evil-ex-define-argument-type state
+  "Define an argument type which can take state names."
+  :collection
+  (lambda (arg predicate flag)
+    (let ((completions (cons '(nil) evil-state-properties)))
+      (when arg
+        (cond
+         ((null flag)
+          (try-completion arg completions predicate))
+         ((eq flag t)
+          (all-completions arg completions predicate))
+         ((eq flag 'lambda)
+          (test-completion arg completions predicate))
+         ((eq (car-safe flag) 'boundaries)
+          (cons 'boundaries
+                (completion-boundaries arg
+                                       completions
+                                       predicate
+                                       (cdr flag)))))))))
+
+(evil-define-interactive-code "<state>"
+  "A valid evil state."
+  :ex-arg state
+  (list (and evil-called-from-ex-p evil-ex-argument
+             (intern-soft evil-ex-argument))))
+
+;; TODO: should we merge this command with `evil-set-initial-state'?
+(evil-define-command evil-ex-set-initial-state (state)
+  "Set the initial state for the current major mode to STATE.
+This is the state the buffer comes up in. See `evil-set-initial-state'."
+  :repeat nil
+  (interactive "<state>")
+  (if (not (or (assq state evil-state-properties)
+               (null state)))
+      (user-error "State %s cannot be set as initial Evil state" state)
+    (let ((current-initial-state (evil-initial-state major-mode)))
+      (unless (eq current-initial-state state)
+        ;; only if we selected a new mode
+        (when (y-or-n-p (format "Major-mode `%s' has initial mode `%s'. \
+Change to `%s'? "
+                                major-mode
+                                (or current-initial-state "DEFAULT")
+                                (or state "DEFAULT")))
+          (evil-set-initial-state major-mode state)
+          (when (y-or-n-p "Save setting in customization file? ")
+            (dolist (s (list current-initial-state state))
+              (when s
+                (let ((var (intern (format "evil-%s-state-modes" s))))
+                  (customize-save-variable var (symbol-value var)))))))))))
+
+(evil-define-command evil-force-normal-state ()
+  "Switch to normal state without recording current command."
+  :repeat abort
+  :suppress-operator t
+  (evil-normal-state))
+
+(evil-define-motion evil-ex-search-next (count)
+  "Go to the next occurrence."
+  :jump t
+  :type exclusive
+  (evil-ex-search count))
+
+(evil-define-motion evil-ex-search-previous (count)
+  "Go the the previous occurrence."
+  :jump t
+  :type exclusive
+  (let ((evil-ex-search-direction
+         (if (eq evil-ex-search-direction 'backward) 'forward 'backward)))
+    (evil-ex-search count)))
+
+(defun evil-repeat-ex-search (flag)
+  "Called to record a search command.
+FLAG is either `pre' or `post' if the function is called before resp.
+after executing the command."
+  (cond
+   ((and (evil-operator-state-p) (eq flag 'pre))
+    (evil-repeat-record (this-command-keys))
+    (evil-clear-command-keys))
+   ((and (evil-operator-state-p) (eq flag 'post))
+    (let ((search-separator (car (last evil-repeat-info))))
+      (evil-repeat-record (evil-ex-pattern-regex evil-ex-search-pattern))
+      (when evil-ex-search-offset
+        (evil-repeat-record (concat search-separator evil-ex-search-offset))))
+    ;; If it weren't for the fact that `exit-minibuffer' throws an `exit'
+    ;; tag, which bypasses the source of `this-command-keys', we'd be able
+    ;; to capture the key(s) in the post-command of the operator as usual.
+    ;; Fortunately however, `last-input-event' can see the key (by default, `return')
+    (when (zerop (length (this-command-keys)))
+      (evil-repeat-record (vector last-input-event))))
+   (t (evil-repeat-motion flag))))
+
+(evil-define-motion evil-ex-search-forward (count)
+  "Start a forward search."
+  :jump t
+  :type exclusive
+  :repeat evil-repeat-ex-search
+  (evil-ex-start-search 'forward count))
+
+(evil-define-motion evil-ex-search-backward (count)
+  "Start a backward search."
+  :jump t
+  :repeat evil-repeat-ex-search
+  (evil-ex-start-search 'backward count))
+
+(evil-define-motion evil-ex-search-word-forward (count &optional symbol)
+  "Search for the next occurrence of word under the cursor."
+  :jump t
+  :type exclusive
+  (interactive (list (prefix-numeric-value current-prefix-arg)
+                     evil-symbol-word-search))
+  (evil-ex-start-word-search nil 'forward count symbol))
+
+(evil-define-motion evil-ex-search-word-backward (count &optional symbol)
+  "Search for the next occurrence of word under the cursor."
+  :jump t
+  :type exclusive
+  (interactive (list (prefix-numeric-value current-prefix-arg)
+                     evil-symbol-word-search))
+  (evil-ex-start-word-search nil 'backward count symbol))
+
+(evil-define-motion evil-ex-search-unbounded-word-forward (count &optional symbol)
+  "Search for the next occurrence of word under the cursor."
+  :jump t
+  :type exclusive
+  (interactive (list (prefix-numeric-value current-prefix-arg)
+                     evil-symbol-word-search))
+  (evil-ex-start-word-search t 'forward count symbol))
+
+(evil-define-motion evil-ex-search-unbounded-word-backward (count &optional symbol)
+  "Search for the next occurrence of word under the cursor."
+  :jump t
+  :type exclusive
+  (interactive (list (prefix-numeric-value current-prefix-arg)
+                     evil-symbol-word-search))
+  (evil-ex-start-word-search t 'backward count symbol))
+
+(defun evil-revert-reveal (open-spots)
+  "Unconditionally close overlays in OPEN-SPOTS in current window.
+Modified version of `reveal-close-old-overlays' from
+reveal.el. OPEN-SPOTS is a local version of `reveal-open-spots'."
+  (dolist (spot open-spots)
+    (let ((window (car spot))
+          (ol (cdr spot)))
+      (unless (eq window (selected-window))
+        (error "evil-revert-reveal: slot with wrong window"))
+      (let* ((inv (overlay-get ol 'reveal-invisible))
+             (open (or (overlay-get ol 'reveal-toggle-invisible)
+                       (get inv 'reveal-toggle-invisible)
+                       (overlay-get ol 'isearch-open-invisible-temporary))))
+        (if (and (overlay-start ol) ; Check if still live
+                 open)
+            (condition-case err
+                (funcall open ol t)
+              (error (message "!!Reveal-hide (funcall %s %s t): %s !!"
+                              open ol err)))
+          (overlay-put ol 'invisible inv))
+        ;; Remove the overlay from the list of open spots.
+        (overlay-put ol 'reveal-invisible nil)))))
+
+(defun evil--ex-substitute-final-message (nreplaced flags)
+  "Display message according to replacements and flags.
+If FLAGS contains \"p\" or \"#\" and NREPLACED is more than 0, print
+the last line to the echo area.  Otherwise, print the number of
+replacements made or found."
+  (let ((replaced-any (< 0 nreplaced)))
+    (cond
+     ((and replaced-any (memq ?p flags))
+      (evil-echo "%s" (buffer-substring (line-beginning-position)
+                                        (line-end-position))))
+     ((and replaced-any (memq ?# flags))
+      (evil-echo "%s %s" (propertize (number-to-string (line-number-at-pos))
+                                     'face 'line-number-current-line)
+                         (buffer-substring (line-beginning-position)
+                                           (line-end-position))))
+     (t (evil-echo "%s %d occurrence%s"
+                   (if (memq ?n flags) "Found" "Replaced")
+                   nreplaced
+                   (if (/= nreplaced 1) "s" ""))))))
+
+(evil-define-operator evil-ex-substitute
+  (beg end pattern replacement flags)
+  "The Ex substitute command.
+\[BEG,END]substitute/PATTERN/REPLACEMENT/FLAGS"
+  :repeat nil
+  :jump t
+  :move-point nil
+  :motion evil-line
+  (interactive "<r><s/>")
+  (evil-ex-nohighlight)
+  (unless pattern (user-error "No pattern given"))
+  (setq replacement (or replacement "")
+        flags (append flags)
+        evil-ex-last-was-search nil
+        evil-ex-substitute-pattern pattern
+        evil-ex-substitute-replacement replacement
+        evil-ex-substitute-flags flags)
+  (let* ((inhibit-field-text-motion t)
+         (count-only (memq ?n flags))
+         (confirm (and (memq ?c flags) (not count-only)))
+         (case-fold-search (evil-ex-pattern-ignore-case pattern))
+         (case-replace case-fold-search)
+         (regex (evil-ex-pattern-regex pattern))
+         (nreplaced 0)
+         (orig-point (point-marker))
+         (last-point (point))
+         (whole-line (evil-ex-pattern-whole-line pattern))
+         (evil-ex-substitute-overlay (make-overlay (point) (point)))
+         (end-marker (move-marker (make-marker) end))
+         (use-reveal confirm)
+         match-data
+         reveal-open-spots
+         transient-mark-mode)
+    (unwind-protect
+        (catch 'exit-search
+          (isearch-update-ring (setq isearch-string regex) t)
+          (evil-ex-hl-change 'evil-ex-substitute pattern)
+          (overlay-put evil-ex-substitute-overlay 'face 'isearch)
+          (overlay-put evil-ex-substitute-overlay 'priority 1001)
+          (goto-char beg)
+          (while (re-search-forward regex end-marker t)
+            (unless (and query-replace-skip-read-only
+                         (text-property-any (match-beginning 0) (match-end 0) 'read-only t))
+              (let* ((match-beg (match-beginning 0))
+                     (match-end (match-end 0))
+                     (zero-length-match (= match-beg match-end))
+                     match-contains-newline)
+                (goto-char match-beg)
+                (when (and (= match-beg end-marker) (> end-marker beg) (bolp))
+                  ;; This line is not included due to range being exclusive
+                  (throw 'exit-search nil))
+                (setq match-data (match-data t match-data)
+                      match-contains-newline (search-forward "\n" match-end t))
+                (goto-char match-end)
+                (if confirm
+                    (let* ((next-replacement
+                            (if (stringp replacement) replacement
+                              (funcall (car replacement) (cdr replacement) nreplaced)))
+                           (prompt
+                            (format "Replace %s with %s (y/n/a/q/l/^E/^Y)? "
+                                    (match-string 0)
+                                    (match-substitute-replacement
+                                     next-replacement (not case-replace))))
+                           (search-invisible t)
+                           response)
+                      (move-overlay evil-ex-substitute-overlay match-beg match-end)
+                      ;; Simulate `reveal-mode'. `reveal-mode' uses
+                      ;; `post-command-hook' but that won't work here.
+                      (when use-reveal
+                        (reveal-post-command))
+                      (catch 'exit-read-char
+                        (while (setq response (read-char prompt))
+                          (when (member response '(?y ?a ?l))
+                            (unless count-only
+                              (set-match-data match-data)
+                              (replace-match next-replacement (not case-replace)))
+                            (cl-incf nreplaced)
+                            (evil-ex-hl-set-region
+                             'evil-ex-substitute
+                             (line-beginning-position 2)
+                             (evil-ex-hl-get-max 'evil-ex-substitute)))
+                          (cl-case response
+                            ((?y ?n) (throw 'exit-read-char nil))
+                            (?a (setq confirm nil)
+                                (throw 'exit-read-char nil))
+                            ((?q ?l ?\C-\[) (throw 'exit-search nil))
+                            (?\C-e (evil-scroll-line-down 1))
+                            (?\C-y (evil-scroll-line-up 1))))))
+                  (unless count-only
+                    (let ((next-replacement
+                           (if (stringp replacement) replacement
+                             (funcall (car replacement) (cdr replacement) nreplaced))))
+                      (set-match-data match-data)
+                      (replace-match next-replacement (not case-replace))))
+                  (cl-incf nreplaced))
+                (setq last-point (point))
+                (cond ((>= (point) end-marker)
+                       ;; Don't want to perform multiple replacements at the end
+                       ;; of the search region.
+                       (throw 'exit-search nil))
+                      ((and (not whole-line)
+                            (not match-contains-newline))
+                       (forward-line)
+                       ;; forward-line just moves to the end of the line on the
+                       ;; last line of the buffer.
+                       (when (>= (point) end-marker) (throw 'exit-search nil)))
+                      ;; For zero-length matches check to see if point won't
+                      ;; move next time. This is a problem when matching the
+                      ;; regexp "$" because we can enter an infinite loop,
+                      ;; repeatedly matching the same character
+                      ((and zero-length-match
+                            (let ((pnt (point)))
+                              (save-excursion
+                                (and (re-search-forward regex end-marker t)
+                                     (= pnt (point))))))
+                       (when (eobp) (throw 'exit-search nil))
+                       (forward-char)))))))
+      (evil-ex-delete-hl 'evil-ex-substitute)
+      (delete-overlay evil-ex-substitute-overlay)
+      (goto-char (if count-only orig-point last-point))
+      (move-marker orig-point nil)
+      (move-marker end-marker nil)
+
+      (when use-reveal
+        (evil-revert-reveal reveal-open-spots)))
+
+    (evil--ex-substitute-final-message nreplaced flags)
+
+    (if (and (= nreplaced 0) evil-ex-point)
+        (goto-char evil-ex-point)
+      (evil-first-non-blank))))
+
+(evil-define-operator evil-ex-repeat-substitute (beg end flags)
+  "Repeat last substitute command.
+This is the same as \":s//~/\"."
+  :repeat nil
+  :jump t
+  :move-point nil
+  :motion evil-line
+  (interactive "<r><a>")
+  (apply #'evil-ex-substitute beg end
+         (evil-ex-get-substitute-info (concat "//~/" flags))))
+
+(evil-define-operator evil-ex-repeat-substitute-with-flags (beg end flags)
+  "Repeat last substitute command with last flags.
+This is the same as \":s//~/&\"."
+  :repeat nil
+  :jump t
+  :move-point nil
+  :motion evil-line
+  (interactive "<r><a>")
+  (apply #'evil-ex-substitute beg end
+         (evil-ex-get-substitute-info (concat "//~/&" flags))))
+
+(evil-define-operator evil-ex-repeat-substitute-with-search (beg end flags)
+  "Repeat last substitute command with last search pattern.
+This is the same as \":s//~/r\"."
+  :repeat nil
+  :jump t
+  :move-point nil
+  :motion evil-line
+  (interactive "<r><a>")
+  (apply #'evil-ex-substitute beg end
+         (evil-ex-get-substitute-info (concat "//~/r" flags))))
+
+(evil-define-operator evil-ex-repeat-substitute-with-search-and-flags
+  (beg end flags)
+  "Repeat last substitute command with last search pattern and last flags.
+This is the same as \":s//~/&r\"."
+  :repeat nil
+  :jump t
+  :move-point nil
+  :motion evil-line
+  (interactive "<r><a>")
+  (apply #'evil-ex-substitute beg end
+         (evil-ex-get-substitute-info (concat "//~/&r" flags))))
+
+(evil-define-operator evil-ex-repeat-global-substitute ()
+  "Repeat last substitute command on the whole buffer.
+This is the same as \":%s//~/&\"."
+  :repeat nil
+  :jump t
+  :move-point nil
+  :motion evil-line
+  (interactive)
+  (apply #'evil-ex-substitute (point-min) (point-max)
+         (evil-ex-get-substitute-info (concat "//~/&"))))
+
+(declare-function hi-lock-read-face-name "hi-lock")
+(evil-define-command evil-ex-match (args &optional bang)
+  "Define a pattern to highlight in the current buffer.
+With no args, clear a highlight from the buffer
+With only an ! argument, clear all highlights from the buffer.
+With one arg, interpret as the pattern, and prompt for a face.
+With two args, interpret as :match {face} /{pattern}/.
+Unlike Vim, multiple highlights can be set at once, so there is no need for
+\":2match\" and \":3match\" Ex commands."
+  (interactive "<a><!>")
+  (unless args (setq args ""))
+  (string-match "\\` *\\([^ ]+\\)? *\\(.+\\)?\\'" args)
+  (let* ((face (match-string 1 args))
+         (search-string (match-string 2 args))
+         (raw-patterns (evil-delimited-arguments (or search-string face "")))
+         (raw-pattern (or (car raw-patterns) ""))
+         (case-fold-search ; ignore case if non-nil
+          (eq (evil-ex-regex-case raw-pattern evil-ex-search-case) 'insensitive))
+         search-upper-case ; bypass isearch-no-upper-case-p
+         (pattern-no-case (evil-ex-regex-without-case raw-pattern))
+         (pattern (if evil-ex-search-vim-style-regexp
+                      (evil-transform-vim-style-regexp pattern-no-case)
+                    pattern-no-case)))
+    (cond
+     ((or (not face) (string= "none" face))
+      (if bang
+          (hi-lock-unface-buffer t)
+        (call-interactively #'hi-lock-unface-buffer)))
+     ((/= 1 (length raw-patterns))
+      (user-error "Invalid pattern argument"))
+     ((not search-string)
+      (require 'hi-lock)
+      (hi-lock-face-buffer pattern (hi-lock-read-face-name)))
+     (t (hi-lock-face-buffer pattern face)))))
+
+(defun evil-keep-lines (pattern beg end)
+  "Stripped down version of `keep-lines'.
+Delete lines between BEG & END which don't match PATTERN."
+  (goto-char (min beg end))
+  (setq end
+        (progn
+          (save-excursion
+            (goto-char (max beg end))
+            (unless (or (bolp) (eobp))
+              (forward-line 0))
+            (point-marker))))
+  (save-excursion
+    (or (bolp) (forward-line 1))
+    (let ((start (point)))
+      (while (< (point) end)
+        ;; Start is first char not preserved by previous match.
+        (if (not (re-search-forward pattern end 'move))
+            (delete-region start end)
+          (let ((end (save-excursion (goto-char (match-beginning 0))
+                                     (forward-line 0)
+                                     (point))))
+            ;; Now end is first char preserved by the new match.
+            (if (< start end)
+                (delete-region start end))))
+
+        (setq start (save-excursion (forward-line 1) (point)))
+        ;; If the match was empty, avoid matching again at same place.
+        (and (< (point) end)
+             (= (match-beginning 0) (match-end 0))
+             (forward-char 1)))))
+  (set-marker end nil)
+  nil)
+
+(defun evil-flush-lines (pattern beg end)
+  "Stripped down version of `flush-lines'.
+Delete lines between BEG & END which match PATTERN."
+  (goto-char (min beg end))
+  (setq end (copy-marker (max beg end)))
+  (save-excursion
+    (while (and (< (point) end)
+                (re-search-forward pattern end t))
+      (delete-region (save-excursion (goto-char (match-beginning 0))
+                                     (forward-line 0)
+                                     (point))
+                     (progn (forward-line 1) (point)))))
+  (set-marker end nil))
+
+(defun evil--ex-performant-global-delete (beg end pattern invert)
+  "Use fast functions for fast line deletion.
+Delete lines between BEG & END which match PATTERN.
+Use `evil-flush-lines' if INVERT is nil, or `evil-keep-lines' if not."
+  (goto-char end)
+  (re-search-backward pattern beg t)
+  (let ((end-marker (point-marker)))
+    (if invert
+        (evil-keep-lines pattern beg end)
+      (evil-flush-lines pattern beg end))
+    (goto-char end-marker)
+    (set-marker end-marker nil)))
+
+(evil-define-operator evil-ex-global
+  (beg end pattern command &optional invert)
+  "The Ex global command.
+\[BEG,END]global[!]/PATTERN/COMMAND"
+  :motion mark-whole-buffer
+  :move-point nil
+  (interactive "<r><g/><!>")
+  (unless pattern
+    (user-error "No pattern given"))
+  (unless command
+    (user-error "No command given"))
+  ;; TODO: `evil-ex-make-substitute-pattern' should be executed so
+  ;; :substitute can re-use :global's pattern depending on its `r'
+  ;; flag. This isn't supported currently but should be simple to add
+  (let* ((case-fold-search
+          (eq (evil-ex-regex-case pattern evil-ex-search-case) 'insensitive))
+         (pattern (evil-ex-regex-without-case pattern))
+         (command-form (evil-ex-parse command))
+         (ex-delete (eq 'evil-ex-delete (evil-ex-completed-binding (nth 2 command-form))))
+         (transient-mark-mode transient-mark-mode)
+         (deactivate-mark deactivate-mark)
+         markers)
+    (when (and pattern command)
+      (when evil-ex-search-vim-style-regexp
+        (setq pattern (evil-transform-vim-style-regexp pattern)))
+      (if (and ex-delete (not (nth 3 command-form)) (not (nth 1 command-form)))
+          (evil--ex-performant-global-delete beg end pattern invert)
+        (setq isearch-string pattern)
+        (isearch-update-ring pattern t)
+        (goto-char beg)
+        (evil-move-beginning-of-line)
+        (while (< (point) end)
+          (let ((match (re-search-forward pattern (line-end-position) t)))
+            (when (if invert (not match) match)
+              (push (move-marker (make-marker)
+                                 (or (and match (match-beginning 0))
+                                     (line-beginning-position)))
+                    markers)))
+          (forward-line))
+        (setq markers (nreverse markers))
+        (unwind-protect
+            (evil-with-single-undo
+              (let ((evil--ex-global-active-p t))
+                (dolist (marker markers)
+                  (goto-char marker)
+                  (eval command-form t))))
+          ;; ensure that all markers are deleted afterwards,
+          ;; even in the event of failure
+          (dolist (marker markers)
+            (set-marker marker nil))
+          (run-hooks 'evil-after-global-hook))))))
+
+(evil-define-operator evil-ex-global-inverted
+  (beg end pattern command &optional invert)
+  "The Ex vglobal command.
+\[BEG,END]vglobal/PATTERN/COMMAND"
+  :motion mark-whole-buffer
+  :move-point nil
+  (interactive "<r><g/><!>")
+  (evil-ex-global beg end pattern command (not invert)))
+
+(evil-define-operator evil-ex-normal (beg end commands)
+  "The Ex normal command.
+Execute the argument as normal command on each line in the
+range. The given argument is passed straight to
+`execute-kbd-macro'.  The default is the current line."
+  :motion evil-line
+  (interactive "<r><a>")
+  ;; replace ^[ by escape
+  (setq commands
+        (vconcat (mapcar (lambda (ch) (if (eq ch ?) 'escape ch))
+                         commands)))
+  (let (markers evil-called-from-ex-p prefix-arg current-prefix-arg)
+    (goto-char beg)
+    (beginning-of-line)
+    (while (when (< (point) end)
+             (push (point-marker) markers)
+             (and (= (forward-line) 0) (bolp))))
+    (setq markers (nreverse markers))
+    (deactivate-mark)
+    (evil-force-normal-state)
+    (evil-with-single-undo
+      (dolist (marker markers)
+        (goto-char marker)
+        (ignore-errors (execute-kbd-macro commands))
+        (evil-force-normal-state)
+        (set-marker marker nil)))))
+
+(evil-define-motion evil-goto-char (position)
+  "Go to POSITION in the buffer.
+Default position is the beginning of the buffer."
+  :jump t
+  (interactive "<N>")
+  (goto-char (or position (point-min))))
+
+(evil-define-operator evil-ex-line-number (beg end)
+  "Print the last line number."
+  :motion mark-whole-buffer
+  :move-point nil
+  (interactive "<r>")
+  (evil-echo "%d" (count-lines (point-min) end)))
+
+(evil-define-command evil-show-file-info ()
+  "Show basic file information."
+  (let* ((nlines   (count-lines (point-min) (point-max)))
+         (curr     (line-number-at-pos (point)))
+         (perc     (if (> nlines 0)
+                       (format "%d%%" (* (/ (float curr) (float nlines)) 100.0))
+                     "No lines in buffer"))
+         (file     (buffer-file-name (buffer-base-buffer)))
+         (writable (and file (file-writable-p file)))
+         (readonly (if (and file (not writable)) "[readonly] " "")))
+    (if file
+        (evil-echo "\"%s\" %d %slines --%s--" file nlines readonly perc)
+      (evil-echo "%d lines --%s--" nlines perc))))
+
+(defvar sort-fold-case)
+(evil-define-operator evil-ex-sort (beg end &optional args reverse)
+  "The Ex sort command.
+\[BEG,END]sort[!] [/PATTERN/] [b][i][u][r][n][x][o]
+The following additional options are supported:
+
+  * i   ignore case
+  * u   remove duplicate lines
+  * r   sort the contents of pattern
+  * n   sort by the first decimal number
+  * x   sort by the first hexadecimal number (with optional \"0x\" prefix)
+  * o   sort by the first octal number
+  * b   sort by the first binary number
+
+If a pattern is supplied without supplying the \"r\" option, sort
+the contents of the lines after skipping the pattern.
+If the pattern is empty, the last search pattern is used instead.
+
+The \"!\" argument means to sort in reverse order."
+  :motion mark-whole-buffer
+  :move-point nil
+  (interactive "<r><a><!>")
+  (unless args (setq args ""))
+  (let ((inhibit-field-text-motion t)
+        options sort-fold-case unique base sort-pat pat)
+    ;; Handle arguments like
+    ;;     /[^,]*,/ n
+    ;; and
+    ;;     nu
+    (if (or (zerop (length args)) (memq (aref args 0) '(?i ?n ?x ?o ?b ?u ?r)))
+        (setq options args)
+      (setq args (evil-delimited-arguments args 2)
+            ;; Use last search pattern when an empty pattern is provided
+            pat (if (string= (car args) "")
+                    (evil-ex-pattern-regex evil-ex-search-pattern)
+                  (car args))
+            options (cadr args)))
+    (cl-loop
+     for opt across options do
+     (cond
+      ((eq opt ?i) (setq sort-fold-case t))
+      ((eq opt ?b) (setq base 2))
+      ((eq opt ?o) (setq base 8))
+      ((eq opt ?n) (setq base 10))
+      ((eq opt ?x) (setq base 16))
+      ((eq opt ?r) (setq sort-pat t))
+      ((eq opt ?u) (setq unique t))
+      ((eq opt ? ))
+      (t (user-error "Invalid sort option `%c'" opt))))
+    (evil-with-restriction beg end
+      (goto-char beg)
+      (let ((num-re
+             (cond
+              ((null base) nil)
+              ((= base 2) "[01]+")
+              ((= base 8) "[0-7]+")
+              ((= base 10) "-?[0-9]+")
+              ((= base 16) "\\(-\\)?\\(?:0x\\)?\\([0-9a-f]+\\)")))
+            key-end)
+        (sort-subr
+         reverse
+         #'forward-line
+         #'end-of-line
+         (lambda ()
+           ;; Find the boundary of the key to match on the line
+           (setq key-end (line-end-position))
+           (and (> (length pat) 0)
+                ;; When matching a pattern and one doesn't exist on the line,
+                ;; skip the line
+                (re-search-forward pat key-end 'move)
+                sort-pat ; Otherwise go to the start of the key
+                (progn (setq key-end (point))
+                       (goto-char (match-beginning 0))))
+           ;; Return the key for the line when sorting numbers, otherwise let
+           ;; `sort-subr' extract the key
+           (when base
+             (let ((case-fold-search t))
+               (if (not (re-search-forward num-re key-end t))
+                   ;; When sorting numbers and a number doesn't exist on the
+                   ;; line, place it above all the numeric lines
+                   most-negative-fixnum
+                 (let ((num (string-to-number
+                             (buffer-substring
+                              (match-beginning (if (= base 16) 2 0))
+                              (match-end 0))
+                             base)))
+                   (if (and (= base 16) (match-beginning 1))
+                       (- num)
+                     num))))))
+         ;; Only called when sorting lexicographically
+         (lambda () (goto-char key-end))))
+      (when unique
+        (goto-char (point-min))
+        (let ((case-fold-search sort-fold-case)
+              prev-line-beg)
+          (while (not (eobp))
+            (if (and prev-line-beg
+                     (eq 0 (compare-buffer-substrings
+                            nil prev-line-beg (1- (point))
+                            nil (point) (line-end-position))))
+                (delete-region (point) (line-beginning-position 2))
+              (setq prev-line-beg (point))
+              (forward-line)))))))
+  (goto-char beg))
+
+;;; Window navigation
+
+(defvar evil--window-digit nil)
+
+(defun evil--window-keep-pred ()
+  (eq 'evil-window-digit-argument this-command))
+
+(defun evil--window-reset-digit ()
+  (setq evil--window-digit nil)
+  (remove-hook 'post-command-hook #'evil--window-reset-digit))
+
+(defun evil--window-on-exit ()
+  (add-hook 'post-command-hook #'evil--window-reset-digit))
+
+(defun evil-window-digit-argument ()
+  "Like `digit-argument' but maintains the window map."
+  (interactive)
+  (unless (eq 'evil-window-digit-argument last-command)
+    (set-transient-map evil-window-map #'evil--window-keep-pred #'evil--window-on-exit))
+  (let* ((char (if (integerp last-command-event)
+                   last-command-event
+                 (get last-command-event 'ascii-character)))
+         (digit (- (logand char ?\177) ?0)))
+    (setq evil--window-digit (+ (* 10 (or evil--window-digit 0)) digit))))
+
+(defmacro evil-save-side-windows (&rest body)
+  "Toggle side windows, evaluate BODY, restore side windows."
+  (declare (indent defun) (debug (&rest form)))
+  (let ((sides (make-symbol "sidesvar")))
+    `(let ((,sides (and (fboundp 'window-toggle-side-windows)
+                        (window-with-parameter 'window-side))))
+       ;; The compiler doesn't understand that all uses are protected
+       ;; by `fboundp' :-(
+       (declare-function window-toggle-side-windows "window")
+       (when ,sides
+         (window-toggle-side-windows))
+       (unwind-protect
+           (progn ,@body)
+         (when ,sides
+           (window-toggle-side-windows))))))
+
+(defun evil-resize-window (new-size &optional horizontal)
+  "Set the current window's width or height to NEW-SIZE.
+If HORIZONTAL is non-nil the width of the window is changed,
+otherwise its height is changed."
+  (let ((count (- new-size (if horizontal (window-width) (window-height)))))
+    (enlarge-window count horizontal)))
+
+(defun evil-move-window (side)
+  "Move the `selected-window' to SIDE.
+The state of the `selected-window' is saved along with the state
+of the window tree consisting of all the other windows. Then, all
+windows are deleted, the remaining window is split according to
+SIDE, the state of the window at SIDE is replaced with the saved
+state of the `selected-window', and, finally, the state of the
+saved window tree is reconstructed on the opposite side.
+
+SIDE has the same meaning as in `split-window'.
+
+Note, this function only operates on the window tree rooted in
+the frame's main window and effectively preserves any side
+windows (i.e. windows with a valid window-side window
+parameter)."
+  (evil-save-side-windows
+    (unless (one-window-p)
+      (save-excursion
+        (let ((w (window-state-get (selected-window))))
+          (delete-window)
+          (let ((wtree (window-state-get)))
+            (delete-other-windows)
+            (let ((subwin (selected-window))
+                  ;; NOTE: SIDE is new in Emacs 24
+                  (newwin (split-window nil nil side)))
+              (window-state-put wtree subwin)
+              (window-state-put w newwin)
+              (select-window newwin)))))
+      (balance-windows))))
+
+(defun evil-alternate-buffer (&optional window)
+  "Return the last buffer WINDOW has displayed other than the current one.
+This is equivalent to Vim's alternate buffer."
+  ;; If the last buffer visited has been killed, then `window-prev-buffers'
+  ;; returns a list with `window-buffer' at the head.
+  (let* ((prev-buffers (window-prev-buffers))
+         (head (car prev-buffers)))
+    (if (eq (car head) (window-buffer window))
+        (cadr prev-buffers)
+      head)))
+
+(evil-define-command evil-switch-to-windows-last-buffer ()
+  "Switch to the last open buffer of the current window."
+  :repeat nil
+  (let ((previous-place (evil-alternate-buffer)))
+    (when previous-place
+      (switch-to-buffer (car previous-place)))))
+
+(evil-define-command evil-window-delete ()
+  "Delete the current window or tab.
+If `evil-auto-balance-windows' is non-nil then all children of
+the deleted window's parent window are rebalanced."
+  (let ((p (window-parent)))
+    ;; If tabs are enabled and this is the only visible window, then attempt to
+    ;; close this tab.
+    (if (and (bound-and-true-p tab-bar-mode)
+             (null p))
+        (tab-close)
+      (delete-window)
+      (when evil-auto-balance-windows
+        ;; balance-windows raises an error if the parent does not have
+        ;; any further children (then rebalancing is not necessary anyway)
+        (ignore-errors (balance-windows p))))))
+
+(evil-define-command evil-window-split (&optional count file read-only)
+  "Split the current window horizontally, COUNT lines height,
+editing a certain FILE. The new window will be created below
+when `evil-split-window-below' is non-nil. If COUNT and
+`evil-auto-balance-windows' are both non-nil then all children
+of the parent of the splitted window are rebalanced."
+  :repeat nil
+  (interactive "<wc><f>")
+  (select-window
+   (split-window (selected-window) (when count (- count))
+                 (if evil-split-window-below 'below 'above)))
+  (when (and (not count) evil-auto-balance-windows)
+    (balance-windows (window-parent)))
+  (when file
+    (funcall (if read-only #'evil-view #'evil-edit) file)))
+
+(evil-define-command evil-window-split-view (&optional count file)
+  "As with `evil-window-split' but the file is opened read-only."
+  :repeat nil
+  (interactive "<c><f>")
+  (evil-window-split count file t))
+
+(evil-define-command evil-window-vsplit (&optional count file)
+  "Split the current window vertically, COUNT columns width,
+editing a certain FILE. The new window will be created to the
+right when `evil-vsplit-window-right' is non-nil. If COUNT and
+`evil-auto-balance-windows'are both non-nil then all children
+of the parent of the splitted window are rebalanced."
+  :repeat nil
+  (interactive "<wc><f>")
+  (select-window
+   (split-window (selected-window) (when count (- count))
+                 (if evil-vsplit-window-right 'right 'left)))
+  (when (and (not count) evil-auto-balance-windows)
+    (balance-windows (window-parent)))
+  (when file
+    (evil-edit file)))
+
+(evil-define-command evil-split-buffer (buffer)
+  "Split window and switch to another buffer."
+  :repeat nil
+  (interactive "<b>")
+  (evil-window-split)
+  (evil-buffer buffer))
+
+(evil-define-command evil-split-next-buffer (&optional count)
+  "Split the window and go to the COUNT-th next buffer in the buffer list."
+  :repeat nil
+  (interactive "p")
+  (evil-window-split)
+  (next-buffer count))
+
+(evil-define-command evil-split-prev-buffer (&optional count)
+  "Split window and go to the COUNT-th prev buffer in the buffer list."
+  :repeat nil
+  (interactive "p")
+  (evil-window-split)
+  (previous-buffer count))
+
+(evil-define-command evil-window-left (count)
+  "Move the cursor to new COUNT-th window left of the current one."
+  :repeat nil
+  (interactive "<w>")
+  (dotimes (_ count)
+    (windmove-left)))
+
+(evil-define-command evil-window-right (count)
+  "Move the cursor to new COUNT-th window right of the current one."
+  :repeat nil
+  (interactive "<w>")
+  (dotimes (_ count)
+    (windmove-right)))
+
+(evil-define-command evil-window-up (count)
+  "Move the cursor to new COUNT-th window above the current one."
+  :repeat nil
+  (interactive "<w>")
+  (dotimes (_ (or count 1))
+    (windmove-up)))
+
+(evil-define-command evil-window-down (count)
+  "Move the cursor to new COUNT-th window below the current one."
+  :repeat nil
+  (interactive "<w>")
+  (dotimes (_ (or count 1))
+    (windmove-down)))
+
+(evil-define-command evil-window-bottom-right ()
+  "Move the cursor to bottom-right window."
+  :repeat nil
+  (let ((last-sibling (frame-root-window)))
+    (while (and last-sibling (not (window-live-p last-sibling)))
+      (setq last-sibling (window-last-child last-sibling)))
+    (when last-sibling
+      (select-window last-sibling))))
+
+(evil-define-command evil-window-top-left ()
+  "Move the cursor to top-left window."
+  :repeat nil
+  (let ((first-child (window-child (frame-root-window))))
+    (while (and first-child (not (window-live-p first-child)))
+      (setq first-child (window-child first-child)))
+    (when first-child
+      (select-window
+       first-child))))
+
+(evil-define-command evil-window-mru ()
+  "Move the cursor to the previous (last accessed) buffer in another window.
+More precisely, it selects the most recently used buffer that is
+shown in some other window, preferably of the current frame, and
+is different from the current one."
+  :repeat nil
+  (catch 'done
+    (dolist (buf (buffer-list (selected-frame)))
+      (let ((win (get-buffer-window buf)))
+        (when (and (not (eq buf (current-buffer)))
+                   win
+                   (not (eq win (selected-window))))
+          (select-window win)
+          (throw 'done nil))))))
+
+(evil-define-command evil-window-next (count)
+  "Move the cursor to the next window in the cyclic order.
+With COUNT go to the count-th window in the order starting from
+top-left."
+  :repeat nil
+  (interactive "<wc>")
+  (if (not count)
+      (other-window +1)
+    (evil-window-top-left)
+    (other-window (1- (min count (length (window-list)))))))
+
+(evil-define-command evil-window-prev (count)
+  "Move the cursor to the previous window in the cyclic order.
+With COUNT go to the count-th window in the order starting from
+top-left."
+  :repeat nil
+  (interactive "<wc>")
+  (if (not count)
+      (other-window -1)
+    (evil-window-top-left)
+    (other-window (1- (min count (length (window-list)))))))
+
+(evil-define-command evil-window-new (count file)
+  "Split the current window horizontally
+and open a new buffer or edit a certain FILE."
+  :repeat nil
+  (interactive "<wc><f>")
+  (let ((new-window (split-window (selected-window) (when count (- count))
+                                  (if evil-split-window-below 'below 'above))))
+    (when (and (not count) evil-auto-balance-windows)
+      (balance-windows (window-parent)))
+    (select-window new-window)
+    (evil-buffer-new file)))
+
+(evil-define-command evil-window-vnew (count file)
+  "Split the current window vertically
+and open a new buffer name or edit a certain FILE."
+  :repeat nil
+  (interactive "<wc><f>")
+  (let ((new-window (split-window (selected-window) (when count (- count))
+                                  (if evil-vsplit-window-right 'right 'left))))
+    (when (and (not count) evil-auto-balance-windows)
+      (balance-windows (window-parent)))
+    (select-window new-window)
+    (evil-buffer-new file)))
+
+(evil-define-command evil-buffer-new (&optional file)
+  "Edit a new unnamed buffer or FILE."
+  :repeat nil
+  (interactive "<f>")
+  (if file
+      (evil-edit file)
+    (let ((buffer (generate-new-buffer "*new*")))
+      (set-buffer-major-mode buffer)
+      (set-window-buffer nil buffer))))
+
+(evil-define-command evil-window-increase-height (count)
+  "Increase current window height by COUNT."
+  :repeat nil
+  (interactive "<w>")
+  (enlarge-window count))
+
+(evil-define-command evil-window-decrease-height (count)
+  "Decrease current window height by COUNT."
+  :repeat nil
+  (interactive "<w>")
+  (enlarge-window (- count)))
+
+(evil-define-command evil-window-increase-width (count)
+  "Increase current window width by COUNT."
+  :repeat nil
+  (interactive "<w>")
+  (enlarge-window count t))
+
+(evil-define-command evil-window-decrease-width (count)
+  "Decrease current window width by COUNT."
+  :repeat nil
+  (interactive "<w>")
+  (enlarge-window (- count) t))
+
+(evil-define-command evil-window-set-height (count)
+  "Set the height of the current window to COUNT."
+  :repeat nil
+  (interactive "<wc>")
+  (evil-resize-window (or count (frame-height)) nil))
+
+(evil-define-command evil-window-set-width (count)
+  "Set the width of the current window to COUNT."
+  :repeat nil
+  (interactive "<wc>")
+  (evil-resize-window (or count (frame-width)) t))
+
+(evil-define-command evil-ex-resize (arg)
+  "The ex :resize command.
+
+If ARG is a signed positive integer, increase the current window
+height by ARG.
+
+If ARG is a signed negative integer, decrease the current window
+height by ARG.
+
+If ARG is a positive integer without explicit sign, set the current
+window height to ARG.
+
+If ARG is empty, maximize the current window height."
+  (interactive "<a>")
+  (if (or (not arg) (= 0 (length arg)))
+      (evil-window-set-height nil)
+    (let ((n (string-to-number arg)))
+      (if (> n 0)
+          (if (= ?+ (aref arg 0))
+              (evil-window-increase-height n)
+            (evil-window-set-height n))
+        (evil-window-decrease-height (- n))))))
+
+(evil-define-command evil-window-rotate-upwards ()
+  "Rotate the windows according to the current cyclic ordering."
+  :repeat nil
+  (evil-save-side-windows
+    (let ((wlist (window-list))
+          (slist (mapcar #'window-state-get (window-list))))
+      (setq slist (append (cdr slist) (list (car slist))))
+      (while (and wlist slist)
+        (window-state-put (car slist) (car wlist))
+        (setq wlist (cdr wlist)
+              slist (cdr slist)))
+      (select-window (car (window-list))))))
+
+(evil-define-command evil-window-rotate-downwards ()
+  "Rotate the windows according to the current cyclic ordering."
+  :repeat nil
+  (evil-save-side-windows
+    (let ((wlist (window-list))
+          (slist (mapcar #'window-state-get (window-list))))
+      (setq slist (append (last slist) slist))
+      (while (and wlist slist)
+        (window-state-put (car slist) (car wlist))
+        (setq wlist (cdr wlist)
+              slist (cdr slist)))
+      (select-window (car (window-list))))))
+
+(evil-define-command evil-window-exchange (&optional count)
+  "Exchange the current window with the next, or the COUNT-th, one."
+  :repeat nil
+  (interactive "<wc>")
+  (let ((original-window (selected-window)))
+    (evil-window-next count)
+    (if (fboundp 'window-swap-states)
+        (window-swap-states nil original-window t)
+      (let* ((other-window (selected-window))
+             (original-state (window-state-get original-window))
+             (other-state (window-state-get other-window)))
+        (window-state-put other-state original-window t)
+        (window-state-put original-state other-window t)))))
+
+(evil-define-command evil-window-move-very-top ()
+  "Close the current window, split the upper-left one horizontally
+and redisplay the current buffer there."
+  :repeat nil
+  (evil-move-window 'above))
+
+(evil-define-command evil-window-move-far-left ()
+  "Close the current window, split the upper-left one vertically
+and redisplay the current buffer there."
+  :repeat nil
+  (evil-move-window 'left))
+
+(evil-define-command evil-window-move-far-right ()
+  "Close the current window, split the lower-right one vertically
+and redisplay the current buffer there."
+  :repeat nil
+  (evil-move-window 'right))
+
+(evil-define-command evil-window-move-very-bottom ()
+  "Close the current window, split the lower-right one horizontally
+and redisplay the current buffer there."
+  :repeat nil
+  (evil-move-window 'below))
+
+;;; Tab commands
+
+(evil-define-command evil-tab-next (arg)
+  "Switch to the next tab.
+If ARG is non-nil, parse ARG as an index and go to the tab at that
+index."
+  :repeat nil
+  (interactive "<c>")
+  (if arg
+      (tab-bar-select-tab arg)
+    (tab-bar-switch-to-next-tab)))
+
+;;; Mouse handling
+
+;; Large parts of this code are taken from mouse.el which is
+;; distributed with GNU Emacs
+(defun evil-mouse-drag-region (start-event)
+  "Set the region to the text that the mouse is dragged over.
+Highlight the drag area as you move the mouse.
+This must be bound to a button-down mouse event.
+
+If the click is in the echo area, display the `*Messages*' buffer.
+
+START-EVENT should be the event that started the drag."
+  (interactive "e")
+  ;; Give temporary modes such as isearch a chance to turn off.
+  (run-hooks 'mouse-leave-buffer-hook)
+  (evil-mouse-drag-track start-event t))
+(evil-set-command-property 'evil-mouse-drag-region :keep-visual t)
+
+;; Make sure `touch-screen-handle-touch' processes touch screen gestures by
+;; ignoring `evil-mouse-drag-region' (bound to `down-mouse-1') during mouse
+;; click emulation.
+(put 'evil-mouse-drag-region 'ignored-mouse-command t)
+
+(defun evil-mouse-drag-track (start-event &optional
+                                          do-mouse-drag-region-post-process)
+  "Track mouse drags by highlighting area between point and cursor.
+The region will be defined with mark and point.
+DO-MOUSE-DRAG-REGION-POST-PROCESS should only be used by
+`mouse-drag-region'."
+  (mouse-minibuffer-check start-event)
+  (setq mouse-selection-click-count-buffer (current-buffer))
+  (deactivate-mark)
+  (let* ((scroll-margin 0) ; Avoid margin scrolling (Bug#9541).
+         (original-window (selected-window))
+         ;; We've recorded what we needed from the current buffer and
+         ;; window, now let's jump to the place of the event, where things
+         ;; are happening.
+         (_ (mouse-set-point start-event))
+         (echo-keystrokes 0)
+         (start-posn (event-start start-event))
+         (start-point (posn-point start-posn))
+         (start-window (posn-window start-posn))
+         (start-window-start (window-start start-window))
+         (start-hscroll (window-hscroll start-window))
+         (bounds (window-edges start-window))
+         (make-cursor-line-fully-visible nil)
+         (top (nth 1 bounds))
+         (bottom (if (or (window-minibuffer-p start-window)
+                         (not mode-line-format))
+                     (nth 3 bounds)
+                   ;; Don't count the mode line.
+                   (1- (nth 3 bounds))))
+         (on-link (and mouse-1-click-follows-link
+                       (or mouse-1-click-in-non-selected-windows
+                           (eq start-window original-window))
+                       ;; Use start-point before the intangibility
+                       ;; treatment, in case we click on a link inside an
+                       ;; intangible text.
+                       (mouse-on-link-p start-posn)))
+         (click-count (1- (event-click-count start-event)))
+         (remap-double-click (and on-link
+                                  (eq mouse-1-click-follows-link 'double)
+                                  (= click-count 1)))
+         ;; Suppress automatic hscrolling, because that is a nuisance
+         ;; when setting point near the right fringe (but see below).
+         (auto-hscroll-mode-saved auto-hscroll-mode)
+         (auto-hscroll-mode nil)
+         event end end-point)
+
+    (setq mouse-selection-click-count click-count)
+    ;; In case the down click is in the middle of some intangible text,
+    ;; use the end of that text, and put it in START-POINT.
+    (if (< (point) start-point)
+        (goto-char start-point))
+    (setq start-point (point))
+    (if remap-double-click
+        (setq click-count 0))
+
+    (setq click-count (mod click-count 4))
+
+    ;; activate correct visual state
+    (let ((range (evil-mouse-start-end start-point start-point click-count)))
+      (set-mark (nth 0 range))
+      (goto-char (nth 1 range)))
+
+    (cond
+     ((= click-count 0)
+      (when (evil-visual-state-p) (evil-exit-visual-state)))
+     ((= click-count 1)
+      (evil-visual-char)
+      (evil-visual-post-command))
+     ((= click-count 2)
+      (evil-visual-line)
+      (evil-visual-post-command))
+     ((= click-count 3)
+      (evil-visual-block)
+      (evil-visual-post-command)))
+
+    ;; Track the mouse until we get a non-movement event.
+    (track-mouse
+      (while (progn
+               (setq event (read-key))
+               (or (mouse-movement-p event)
+                   (memq (car-safe event) '(switch-frame select-window))))
+        (unless (evil-visual-state-p)
+          (cond
+           ((= click-count 0) (evil-visual-char))
+           ((= click-count 1) (evil-visual-char))
+           ((= click-count 2) (evil-visual-line))
+           ((= click-count 3) (evil-visual-block))))
+
+        (evil-visual-pre-command)
+        (unless (memq (car-safe event) '(switch-frame select-window))
+          ;; Automatic hscrolling did not occur during the call to
+          ;; `read-event'; but if the user subsequently drags the
+          ;; mouse, go ahead and hscroll.
+          (let ((auto-hscroll-mode auto-hscroll-mode-saved))
+            (redisplay))
+          (setq end (event-end event)
+                end-point (posn-point end))
+          (if (and (eq (posn-window end) start-window)
+                   (integer-or-marker-p end-point))
+              (evil-mouse--drag-set-mark-and-point start-point
+                                                   end-point click-count)
+            (let ((mouse-row (cdr (cdr (mouse-position)))))
+              (cond
+               ((null mouse-row))
+               ((< mouse-row top)
+                (mouse-scroll-subr start-window (- mouse-row top)
+                                   nil start-point))
+               ((>= mouse-row bottom)
+                (mouse-scroll-subr start-window (1+ (- mouse-row bottom))
+                                   nil start-point))))))
+        (evil-visual-post-command)))
+
+    ;; Store the fact that the current region was set by the mouse
+    (setq evil--region-from-mouse t)
+
+    ;; Handle the terminating event if possible.
+    (when (consp event)
+      ;; Ensure that point is on the end of the last event.
+      (when (and (setq end-point (posn-point (event-end event)))
+                 (eq (posn-window end) start-window)
+                 (integer-or-marker-p end-point)
+                 (/= start-point end-point))
+        (evil-mouse--drag-set-mark-and-point start-point
+                                             end-point click-count))
+
+      ;; Find its binding.
+      (let* ((fun (key-binding (vector (car event))))
+             (do-multi-click (and (> (event-click-count event) 0)
+                                  (functionp fun)
+                                  (not (memq fun '(mouse-set-point
+                                                   mouse-set-region))))))
+        (if (and (or (/= (mark) (point))
+                     (= click-count 1) ; word selection
+                     (and (memq (evil-visual-type) '(line block))))
+                 (not do-multi-click))
+
+            ;; If point has moved, finish the drag.
+            (let (last-command this-command)
+              (and mouse-drag-copy-region
+                   do-mouse-drag-region-post-process
+                   (let (deactivate-mark)
+                     (evil-visual-expand-region)
+                     (copy-region-as-kill (mark) (point))
+                     (evil-visual-contract-region))))
+
+          ;; If point hasn't moved, run the binding of the
+          ;; terminating up-event.
+          (if do-multi-click
+              (goto-char start-point)
+            (deactivate-mark))
+          (when (and (functionp fun)
+                     (= start-hscroll (window-hscroll start-window))
+                     ;; Don't run the up-event handler if the window
+                     ;; start changed in a redisplay after the
+                     ;; mouse-set-point for the down-mouse event at
+                     ;; the beginning of this function.  When the
+                     ;; window start has changed, the up-mouse event
+                     ;; contains a different position due to the new
+                     ;; window contents, and point is set again.
+                     (or end-point
+                         (= (window-start start-window)
+                            start-window-start)))
+            (when (and on-link
+                       (= start-point (point))
+                       (evil-mouse--remap-link-click-p start-event event))
+              ;; If we rebind to mouse-2, reselect previous selected
+              ;; window, so that the mouse-2 event runs in the same
+              ;; situation as if user had clicked it directly.  Fixes
+              ;; the bug reported by juri@jurta.org on 2005-12-27.
+              (if (or (vectorp on-link) (stringp on-link))
+                  (setq event (aref on-link 0))
+                (select-window original-window)
+                (setcar event 'mouse-2)
+                ;; If this mouse click has never been done by the
+                ;; user, it doesn't have the necessary property to be
+                ;; interpreted correctly.
+                (put 'mouse-2 'event-kind 'mouse-click)))
+            (push event unread-command-events)))))))
+
+;; This function is a plain copy of `mouse--drag-set-mark-and-point',
+;; which is only available in Emacs 24
+(defun evil-mouse--drag-set-mark-and-point (start click click-count)
+  (let* ((range (evil-mouse-start-end start click click-count))
+         (beg (nth 0 range))
+         (end (nth 1 range)))
+    (cond ((eq (mark) beg)
+           (goto-char end))
+          ((eq (mark) end)
+           (goto-char beg))
+          ((< click (mark))
+           (set-mark end)
+           (goto-char beg))
+          (t
+           (set-mark beg)
+           (goto-char end)))))
+
+;; This function is a plain copy of `mouse--remap-link-click-p',
+;; which is only available in Emacs 23
+(defun evil-mouse--remap-link-click-p (start-event end-event)
+  (or (and (eq mouse-1-click-follows-link 'double)
+           (= (event-click-count start-event) 2))
+      (and
+       (not (eq mouse-1-click-follows-link 'double))
+       (= (event-click-count start-event) 1)
+       (= (event-click-count end-event) 1)
+       (or (not (integerp mouse-1-click-follows-link))
+           (let ((t0 (posn-timestamp (event-start start-event)))
+                 (t1 (posn-timestamp (event-end   end-event))))
+             (and (integerp t0) (integerp t1)
+                  (if (> mouse-1-click-follows-link 0)
+                      (<= (- t1 t0) mouse-1-click-follows-link)
+                    (< (- t0 t1) mouse-1-click-follows-link))))))))
+
+(defun evil-mouse-start-end (start end mode)
+  "Return a list of region bounds based on START and END according to MODE.
+If MODE is not 1 then set point to (min START END), mark to (max
+START END).  If MODE is 1 then set point to start of word at (min
+START END), mark to end of word at (max START END)."
+  (evil-sort start end)
+  (setq mode (mod mode 4))
+  (if (/= mode 1) (list start end)
+    (list
+     (save-excursion
+       (goto-char (min (point-max) (1+ start)))
+       (if (zerop (forward-thing evil-mouse-word -1))
+           (let ((bpnt (point)))
+             (forward-thing evil-mouse-word +1)
+             (if (> (point) start) bpnt (point)))
+         (point-min)))
+     (save-excursion
+       (goto-char end)
+       (1-
+        (if (zerop (forward-thing evil-mouse-word +1))
+            (let ((epnt (point)))
+              (forward-thing evil-mouse-word -1)
+              (if (<= (point) end) epnt (point)))
+          (point-max)))))))
+
+;;; State switching
+
+(evil-define-command evil-exit-emacs-state (&optional buffer message)
+  "Exit Emacs state.
+Changes the state to the previous state, or to Normal state
+if the previous state was Emacs state."
+  :keep-visual t
+  :suppress-operator t
+  (interactive '(nil t))
+  (with-current-buffer (or buffer (current-buffer))
+    (when (evil-emacs-state-p)
+      (evil-change-to-previous-state buffer message)
+      (when (evil-emacs-state-p)
+        (evil-normal-state (and message 1))))))
+
+(defun evil--restore-repeat-hooks ()
+  "No insert-state repeat info is recorded after executing in normal state.
+Restore the disabled repeat hooks on insert-state exit."
+  (evil-repeat-stop)
+  (add-hook 'pre-command-hook #'evil-repeat-pre-hook)
+  (add-hook 'post-command-hook #'evil-repeat-post-hook)
+  (remove-hook 'evil-insert-state-exit-hook #'evil--restore-repeat-hooks))
+
+(defvar evil--execute-normal-return-state nil
+  "The state to return to after executing in normal state.")
+
+(evil-define-local-var evil--execute-normal-eol-pos nil
+  "Point position if it was at EOL before `evil-execute-in-normal-state'.")
+
+(defun evil-execute-in-normal-state ()
+  "Execute the next command in Normal state."
+  (interactive)
+  (let ((buf (current-buffer))
+        (state evil-state))
+    (evil-with-delay (not (memq this-command
+                                '(nil
+                                  evil-execute-in-normal-state
+                                  evil-replace-state
+                                  evil-use-register
+                                  evil-window-digit-argument
+                                  digit-argument
+                                  negative-argument
+                                  universal-argument
+                                  universal-argument-minus
+                                  universal-argument-more
+                                  universal-argument-other-key)))
+        post-command-hook
+      (with-current-buffer buf
+        ;; If cursor was after EOL before CTRL-O and is now at EOL,
+        ;; put it after EOL.
+        (and (or (when evil--execute-normal-eol-pos
+                   (= (1+ (point)) (save-excursion
+                                     (goto-char evil--execute-normal-eol-pos)
+                                     (set-marker evil--execute-normal-eol-pos nil)
+                                     (line-end-position))))
+                 (and (eq (or goal-column temporary-goal-column) most-positive-fixnum)
+                      (memq this-command '(next-line previous-line))))
+             (not (eolp))
+             (not (memq this-command
+                        '(evil-insert evil-beginning-of-line evil-first-non-blank)))
+             (forward-char))
+        (unless (memq evil-state '(replace insert))
+          (evil-change-state state))
+        (when (eq 'insert evil-state)
+          (remove-hook 'pre-command-hook #'evil-repeat-pre-hook)
+          (remove-hook 'post-command-hook #'evil-repeat-post-hook)
+          (add-hook 'evil-insert-state-exit-hook #'evil--restore-repeat-hooks))
+        (setq evil-execute-normal-keys nil))))
+  (setq evil-insert-count nil
+        evil--execute-normal-return-state evil-state
+        evil--execute-normal-eol-pos (when (eolp) (point-marker))
+        evil-execute-normal-keys (this-command-keys))
+  (let (evil-move-cursor-back) (evil-normal-state))
+  (evil-echo "Switched to Normal state for the next command..."))
+
+(defun evil-stop-execute-in-emacs-state ()
+  (when (and (not (eq this-command #'evil-execute-in-emacs-state))
+             (not (minibufferp)))
+    (remove-hook 'post-command-hook #'evil-stop-execute-in-emacs-state)
+    (when (buffer-live-p evil-execute-in-emacs-state-buffer)
+      (with-current-buffer evil-execute-in-emacs-state-buffer
+        (if (and (eq evil-previous-state 'visual)
+                 (not (use-region-p)))
+            (progn
+              (evil-change-to-previous-state)
+              (evil-exit-visual-state))
+          (evil-change-to-previous-state))))
+    (setq evil-execute-in-emacs-state-buffer nil)))
+
+(evil-define-command evil-execute-in-emacs-state ()
+  "Execute the next command in Emacs state."
+  (add-hook 'post-command-hook #'evil-stop-execute-in-emacs-state t)
+  (setq evil-execute-in-emacs-state-buffer (current-buffer))
+  (cond
+   ((evil-visual-state-p)
+    (let ((mrk (mark))
+          (pnt (point)))
+      (evil-emacs-state)
+      (set-mark mrk)
+      (goto-char pnt)))
+   (t
+    (evil-emacs-state)))
+  (evil-echo "Switched to Emacs state for the next command ..."))
+
+(defun evil-exit-visual-and-repeat (event)
+  "Exit insert state and repeat event.
+This special command should be used if some command called from
+visual state should actually be called in normal-state.  The main
+reason for doing this is that the repeat system should *not*
+record the visual state information for some command.  This
+command should be bound to exactly the same event in visual state
+as the original command is bound in normal state.  EVENT is the
+event that triggered the execution of this command."
+  (interactive "e")
+  (when (evil-visual-state-p)
+    (evil-exit-visual-state)
+    (push event unread-command-events)))
+(evil-declare-ignore-repeat 'evil-exit-visual-and-repeat)
+
+(evil-define-command evil-retab (tabstop)
+  "Convert all tabs to spaces or the other way around.
+Replace all sequences of white-space containing a <Tab> with new
+strings of white-space using the new TABSTOP value given.
+If you do not specify a new TABSTOP size or it is zero, Evil uses the
+current value of `tab-width'."
+  (interactive "<a>")
+  (unless (or (not tabstop) (string-match-p "^[0-9]*$" tabstop))
+    (user-error "Invalid argument: %s" tabstop))
+  (let ((beg (if (use-region-p) (region-beginning) (point-min)))
+        (end (if (use-region-p) (region-end) (point-max)))
+        (retab (if indent-tabs-mode #'tabify #'untabify))
+        (tab-width (cond ((not tabstop) tab-width)
+                         ((equal tabstop "0") tab-width)
+                         (t (string-to-number tabstop)))))
+    (funcall retab beg end)))
+
+(provide 'evil-commands)
+
+;;; evil-commands.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-commands.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-commands.elc
new file mode 100644
index 0000000..4fc87bc
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-commands.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-common.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-common.el
new file mode 100644
index 0000000..ed05af0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-common.el
@@ -0,0 +1,3842 @@
+;;; evil-common.el --- Common functions and utilities -*- lexical-binding: t -*-
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'evil-vars)
+(require 'rect)
+(require 'thingatpt)
+(require 'cl-lib)
+
+(declare-function evil-visual-state-p "evil-states")
+(declare-function evil-visual-restore "evil-states")
+(declare-function evil-motion-state "evil-states")
+(declare-function evil-replace-state-p "evil-states")
+(declare-function evil-set-jump "evil-jumps")
+
+;;; Compatibility with different Emacs versions
+
+;; x-set-selection and x-get-selection have been deprecated since 25.1
+;; by gui-set-selection and gui-get-selection
+(defalias 'evil-get-selection
+  (if (fboundp 'gui-get-selection) 'gui-get-selection 'x-get-selection))
+(defalias 'evil-set-selection
+  (if (fboundp 'gui-set-selection) 'gui-set-selection 'x-set-selection))
+
+(defmacro evil-with-delay (condition hook &rest body)
+  "Execute BODY when CONDITION becomes true, checking with HOOK.
+HOOK can be a simple symbol or of the form (HOOK APPEND LOCAL NAME)
+where:
+NAME specifies the name of the entry added to HOOK.
+If APPEND is non-nil, the entry is appended to the hook.
+If LOCAL is non-nil, the buffer-local value of HOOK is modified."
+  (declare (debug (form sexp body)) (indent 2))
+  (cl-destructuring-bind (hook-sym &optional append local name)
+      (mapcar #'macroexp-quote (if (consp hook) hook (list hook)))
+    (macroexp-let2* nil
+        ((fun-name `(make-symbol
+                     ,(or name (format "evil-delay-in-%s" hook-sym))))
+         ;; `apply-partially' is used in case this macro is expanded
+         ;; (via `evil-define-key') in a file which still does not
+         ;; activate `lexical-binding'.
+         (fun `(apply-partially
+                (lambda (name &rest _)
+                  (when ,(or condition t)
+                    (remove-hook ,hook-sym name ,local)
+                    ,@body
+                    t))
+                ,fun-name)))
+      `(unless ,(and condition `(funcall ,fun))
+         (progn (fset ,fun-name ,fun)
+                ,@(when local `((put ,fun-name 'permanent-local-hook t)))
+                (add-hook ,hook-sym ,fun-name ,append ,local))))))
+
+(defun evil-delay (condition form hook &optional append local name)
+  "Execute FORM when CONDITION becomes true, checking with HOOK.
+NAME specifies the name of the entry added to HOOK.  If APPEND is
+non-nil, the entry is appended to the hook.  If LOCAL is non-nil,
+the buffer-local value of HOOK is modified."
+  (declare (obsolete evil-with-delay "1.15.0") (indent 2))
+  (eval `(evil-with-delay ,condition (,hook ,append ,local ,name) ,form) t))
+
+;;; List functions
+
+(defmacro evil--add-to-alist (alist &rest elements)
+  "Add the association of KEY and VAL to the value of ALIST.
+If the list already contains an entry for KEY, update that entry;
+otherwise prepend it to the list.
+
+\(fn ALIST [KEY VAL]...)"
+  `(progn
+     ,@(cl-loop
+        for (key val) on elements by #'cddr collect
+        (if (< emacs-major-version 26)
+            (macroexp-let2* nil ((k key) (p `(assoc ,k ,alist)))
+              `(if ,p (setcdr ,p ,val)
+                 (push (cons ,k ,val) ,alist)))
+          `(setf (alist-get ,key ,alist nil nil #'equal) ,val)))
+     ,alist))
+
+;; custom version of `delete-if'
+(defun evil-filter-list (predicate list &optional pointer)
+  "Delete by side-effect all items satisfying PREDICATE in LIST.
+Stop when reaching POINTER.  If the first item satisfies PREDICATE,
+there is no way to remove it by side-effect; therefore, write
+\(setq foo (evil-filter-list #\\='predicate foo)) to be sure of
+changing the value of `foo'."
+  (let ((tail list) elt head)
+    (while (and tail (not (eq tail pointer)))
+      (setq elt (car tail))
+      (cond
+       ((funcall predicate elt)
+        (setq tail (cdr tail))
+        (if head
+            (setcdr head tail)
+          (setq list tail)))
+       (t
+        (setq head tail
+              tail (cdr tail)))))
+    list))
+
+(defun evil-member-if (predicate list &optional pointer)
+  "Find the first item satisfying PREDICATE in LIST.
+Stop when reaching POINTER, which should point at a link
+in the list."
+  (let (elt)
+    (catch 'done
+      (while (and (consp list) (not (eq list pointer)))
+        (setq elt (car list))
+        (if (funcall predicate elt)
+            (throw 'done elt)
+          (setq list (cdr list)))))))
+
+(defun evil-member-recursive-if (predicate tree)
+  "Find the first item satisfying PREDICATE in TREE."
+  (declare (obsolete nil "1.15.0"))
+  (cond
+   ((funcall predicate tree)
+    tree)
+   ((listp tree)
+    (catch 'done
+      (dolist (elt tree)
+        (when (setq elt (evil-member-recursive-if predicate elt))
+          (throw 'done elt)))))))
+
+(defun evil-concat-lists (&rest sequences)
+  "Concatenate lists, removing duplicates.
+Elements are compared with `eq'."
+  (let (result)
+    (dolist (sequence sequences)
+      (dolist (elt sequence)
+        (push elt result)))
+    (nreverse (cl-remove-duplicates result :test #'eq))))
+
+(defun evil-concat-alists (&rest sequences)
+  "Concatenate association lists, removing duplicates.
+An alist is a list of cons cells (KEY . VALUE) where each key
+may occur only once. Later values overwrite earlier values."
+  (let (result)
+    (dolist (sequence sequences)
+      (dolist (elt sequence)
+        (setq result (assq-delete-all (car-safe elt) result))
+        (push elt result)))
+    (nreverse result)))
+
+(defun evil-concat-plists (&rest sequences)
+  "Concatenate property lists, removing duplicates.
+A property list is a list (:KEYWORD1 VALUE1 :KEYWORD2 VALUE2...)
+where each keyword may occur only once. Later values overwrite
+earlier values."
+  (let (result)
+    (dolist (sequence sequences result)
+      (while sequence
+        (setq result
+              (plist-put result (pop sequence) (pop sequence)))))))
+
+(defun evil-concat-keymap-alists (&rest sequences)
+  "Concatenate keymap association lists, removing duplicates.
+A keymap alist is a list of cons cells (VAR . MAP) where each keymap
+may occur only once, but where the variables may be repeated
+\(e.g., (VAR . MAP1) (VAR . MAP2) is allowed). The order matters,
+with the highest priority keymaps being listed first."
+  (let (result)
+    (dolist (sequence sequences)
+      (dolist (elt sequence)
+        (unless (rassq (cdr-safe elt) result)
+          (push elt result))))
+    (nreverse result)))
+
+(defun evil-plist-delete (prop plist)
+  "Delete by side effect the property PROP from PLIST.
+If PROP is the first property in PLIST, there is no way
+to remove it by side-effect; therefore, write
+\(setq foo (evil-plist-delete :prop foo)) to be sure of
+changing the value of `foo'."
+  (let ((tail plist) elt head)
+    (while tail
+      (setq elt (car tail))
+      (cond
+       ((eq elt prop)
+        (setq tail (cdr (cdr tail)))
+        (if head
+            (setcdr (cdr head) tail)
+          (setq plist tail)))
+       (t
+        (setq head tail
+              tail (cdr (cdr tail))))))
+    plist))
+
+(defun evil-get-property (alist key &optional prop)
+  "Return property PROP for KEY in ALIST.
+ALIST is an association list with entries of the form
+\(KEY . PLIST), where PLIST is a property list.
+If PROP is nil, return all properties for KEY.
+If KEY is t, return an association list of keys
+and their PROP values."
+  (declare (obsolete nil "1.15.0"))
+  (cond
+   ((null prop)
+    (cdr (assq key alist)))
+   ((eq key t)
+    (let (result val)
+      (dolist (entry alist result)
+        (setq key (car entry)
+              val (cdr entry))
+        (when (plist-member val prop)
+          (setq val (plist-get val prop))
+          (push (cons key val) result)))))
+   (t
+    (plist-get (cdr (assq key alist)) prop))))
+
+(defun evil-put-property (alist-var key prop val &rest properties)
+  "Set PROP to VAL for KEY in ALIST-VAR.
+ALIST-VAR points to an association list with entries of the form
+\(KEY . PLIST), where PLIST is a property list storing PROP and VAL."
+  (declare (obsolete nil "1.15.0"))
+  (set alist-var
+       (let* ((alist (symbol-value alist-var))
+              (plist (cdr (assq key alist))))
+         (setq plist (plist-put plist prop val))
+         (when properties
+           (setq plist (evil-concat-plists plist properties)
+                 val (car (last properties))))
+         (setq alist (assq-delete-all key alist))
+         (push (cons key plist) alist)))
+  val)
+
+(defun evil-state-property (state prop &optional value)
+  "Return the value of property PROP for STATE.
+PROP is a keyword as used by `evil-define-state'. STATE is the state's
+symbolic name. If VALUE is non-nil and the value is a variable, return
+the value of that variable.
+
+If STATE is t, return an association list of states and their PROP
+values instead."
+  (if (eq state t)
+      (cl-loop for (key . plist) in evil-state-properties with result do
+               (let ((p (plist-member plist prop)))
+                 (when p (push (cons key (cadr p)) result)))
+               finally return result)
+    (let ((val (plist-get (cdr (assq state evil-state-properties)) prop)))
+      (if (and value (symbolp val) (boundp val))
+          (symbol-value val)
+        val))))
+
+(eval-and-compile (defalias 'evil-swap #'cl-rotatef))
+
+(defmacro evil-sort (&rest vars)
+  "Sort the symbol values of VARS.
+Place the smallest value in the first argument and the largest in the
+last, sorting in between."
+  (if (= (length vars) 2)
+      `(when (> ,@vars) (evil-swap ,@vars))
+    (let ((sorted (make-symbol "sortvar")))
+      `(let ((,sorted (sort (list ,@vars) #'<)))
+         (setq ,@(apply #'nconc
+                        (mapcar (lambda (var) (list var `(pop ,sorted)))
+                                vars)))))))
+
+(defun evil-vector-to-string (vector)
+  "Turn VECTOR into a string, changing <escape> to \"\\e\"."
+  (mapconcat (lambda (c) (if (eq c 'escape) "\e" (list c)))
+             vector
+             ""))
+
+;;; Command properties
+
+(defmacro evil-define-command (command &rest body)
+  "Define a command COMMAND.
+
+\(fn COMMAND (ARGS...) DOC [[KEY VALUE]...] BODY...)"
+  (declare (indent defun)
+           (doc-string 3)
+           (debug (&define name
+                           [&optional lambda-list]
+                           [&optional stringp]
+                           [&rest keywordp sexp]
+                           [&optional ("interactive" [&rest form])]
+                           def-body)))
+  (let ((interactive '(interactive))
+        args doc doc-form keys)
+    ;; collect arguments
+    (when (listp (car body))
+      (setq args (pop body)))
+    ;; collect docstring
+    (cond ((stringp (car body)) (setq doc (pop body)))
+          ((eq (car-safe (car body)) #'format) (setq doc-form (pop body))))
+    ;; collect keywords
+    (while (keywordp (car body))
+      (let* ((key (pop body))
+             (arg (pop body)))
+        (setq keys (plist-put keys key arg)))) ; TODO: add keyword check
+    ;; collect `interactive' form
+    (when (eq (caar body) 'interactive)
+      (cl-destructuring-bind (form . attrs)
+          (apply #'evil-interactive-form (cdr (pop body)))
+        (setq interactive `(interactive ,form)
+              keys (evil-concat-plists keys attrs))))
+    `(progn
+       ;; the compiler does not recognize `defun' inside `let'
+       ,(when (and command body)
+          `(defun ,command ,args
+             ,@(when doc `(,doc))
+             ,interactive
+             ,@body))
+       ,(when (and command doc-form)
+          `(put ',command 'function-documentation ,doc-form))
+       ;; set command properties for symbol or lambda function
+       (let ((func ,(if (and (null command) body)
+                        `(lambda ,args
+                           ,interactive
+                           ,@body)
+                      `#',command)))
+         (apply #'evil-set-command-properties func ',keys)
+         func))))
+
+(define-obsolete-variable-alias
+  'evil-command-properties 'evil--command-properties "1.15.0")
+(defvar evil--command-properties nil
+  "Specifications made by `evil-define-command'.")
+
+(defun evil-command-properties (command)
+  "Return the Evil command property list for COMMAND.
+See also `evil-get-command-property'."
+  (if (symbolp command) (get command 'evil--command-plist)
+    (cdr (assq command evil--command-properties))))
+(define-obsolete-function-alias
+  'evil-get-command-properties #'evil-command-properties "1.15.0")
+
+(gv-define-setter evil-command-properties (val command)
+  `(if (symbolp ,command) (put ,command 'evil--command-plist ,val)
+     ,(macroexp-let2 nil p `(assq ,command evil--command-properties)
+        `(if ,p (setcdr ,p ,val)
+           (push (cons ,command ,val) evil--command-properties)))))
+
+(defalias 'evil-has-command-properties-p #'evil-command-properties
+  "Whether Evil properties are defined for COMMAND.
+See also `evil-has-command-property-p'.")
+
+(defun evil-has-command-property-p (command property)
+  "Whether COMMAND has Evil PROPERTY.
+See also `evil-has-command-properties-p'."
+  (plist-member (evil-command-properties command) property))
+
+(defun evil-get-command-property (command property &optional default)
+  "Return the value of Evil PROPERTY of COMMAND.
+If the command does not have the property, return DEFAULT.
+See also `evil-get-command-properties'."
+  (let ((p (plist-member (evil-command-properties command) property)))
+    (if p (cadr p) default)))
+
+(defun evil-add-command-properties (command &rest properties)
+  "Set each Evil command property KEY to its VAL for COMMAND.
+To replace existing properties, use `evil-set-command-properties'.
+
+\(fn COMMAND [KEY VAL]...)"
+  (let ((props (evil-command-properties command)))
+    (while properties
+      (setq props (plist-put props (pop properties) (pop properties))))
+    (setf (evil-command-properties command) props)))
+
+(defalias 'evil-set-command-property #'evil-add-command-properties
+  "Set PROPERTY to VALUE for COMMAND.
+To set multiple properties at once, see
+`evil-set-command-properties' and `evil-add-command-properties'.
+
+\(fn COMMAND PROPERTY VALUE)")
+(defalias 'evil-put-command-property #'evil-set-command-property)
+
+(defun evil-set-command-properties (command &rest properties)
+  "Replace all of COMMAND's properties with PROPERTIES.
+PROPERTIES should be a property list.
+This erases all previous properties; to only add properties,
+use `evil-set-command-property'."
+  (setf (evil-command-properties command) properties))
+
+(defun evil-remove-command-properties (command &rest properties)
+  "Remove PROPERTIES from COMMAND.
+PROPERTIES should be a list of properties (:PROP1 :PROP2 ...).
+If PROPERTIES is the empty list, all properties are removed."
+  (let (plist)
+    (when properties
+      (setq plist (evil-command-properties command))
+      (dolist (property properties)
+        (setq plist (evil-plist-delete property plist))))
+    (apply #'evil-set-command-properties command plist)))
+
+(defun evil-yank-handler (&optional motion)
+  "Return the yank handler for MOTION.
+MOTION defaults to the current motion."
+  (evil-get-command-property (or motion evil-this-motion) :yank-handler))
+
+(defun evil-declare-motion (command)
+  "Declare COMMAND to be a movement function.
+This ensures that it behaves correctly in visual state."
+  (evil-add-command-properties command :keep-visual t :repeat 'motion))
+
+(defun evil-declare-repeat (command)
+  "Declare COMMAND to be repeatable."
+  (evil-add-command-properties command :repeat t))
+
+(defun evil-declare-not-repeat (command)
+  "Declare COMMAND to be nonrepeatable."
+  (evil-add-command-properties command :repeat nil))
+(defalias 'evil-declare-ignore-repeat #'evil-declare-not-repeat)
+
+(defun evil-declare-change-repeat (command)
+  "Declare COMMAND to be repeatable by buffer changes rather than
+keystrokes."
+  (evil-add-command-properties command :repeat 'change))
+
+(defun evil-declare-insert-at-point-repeat (command)
+  "Declare COMMAND to be repeatable by buffer changes."
+  (evil-add-command-properties command :repeat 'insert-at-point))
+
+(defun evil-declare-abort-repeat (command)
+  "Declare COMMAND to be nonrepeatable."
+  (evil-add-command-properties command :repeat 'abort))
+
+(defun evil-delimited-arguments (string &optional count)
+  "Parse STRING as a sequence of delimited arguments.
+Return a list of COUNT strings, or as many arguments as the string
+contains.  The first non-blank character is taken to be the delimiter.
+If some arguments are missing from STRING, the resulting list is
+padded with nil values.  Two delimiters following directly after each
+other gives an empty string."
+  (unless count (setq count -1))
+  (let ((idx 0) delim regexp result)
+    (when (string-match "^[[:space:]]*\\([^[:space:]]\\)" string)
+      (setq delim (match-string 1 string)
+            regexp (format "%s\\(\\(?:\\\\.\\|[^%s]\\)*\\)"
+                           (regexp-quote delim) delim))
+      (while (and (/= count 0) (string-match regexp string idx)
+                  (/= (match-beginning 1) (length string)))
+        (setq idx (match-end 0)
+              count (1- count))
+        (push
+         (if (when (= count 0)
+               (not (string-match-p
+                     (concat (regexp-quote delim) "[[:space:]]*$")
+                     string idx)))
+             (substring string (match-beginning 1))
+           (match-string 1 string))
+         result)))
+    (dotimes (_ count) (push nil result))
+    (nreverse result)))
+
+(defun evil-concat-charsets (&rest sets)
+  "Concatenate character sets.
+A character set is the part between [ and ] in a regular expression.
+If any character set is complemented, the result is also complemented."
+  (let ((bracket "") (complement "") (hyphen "") result)
+    (dolist (set sets)
+      (when (string-match-p "^\\^" set)
+        (setq set (substring set 1)
+              complement "^"))
+      (when (string-match-p "^]" set)
+        (setq set (substring set 1)
+              bracket "]"))
+      (when (string-match-p "^-" set)
+        (setq set (substring set 1)
+              hyphen "-"))
+      (setq result (concat result set)))
+    (format "%s%s%s%s" complement bracket hyphen result)))
+
+;;; Key sequences
+
+(defun evil-keypress-parser (&optional input)
+  "Read from keyboard or INPUT and build a command description.
+Return (CMD COUNT), where COUNT is the numeric prefix argument.
+Both COUNT and CMD may be nil."
+  (when input (setq unread-command-events (append input unread-command-events)))
+  (let (count negative)
+    (catch 'done
+      (while t
+        (let ((seq (read-key-sequence "")))
+          (when seq
+            (let ((cmd (key-binding seq)))
+              (cond
+               ((null cmd) (throw 'done (list nil nil)))
+               ((arrayp cmd) ; keyboard macro, recursive call
+                (let ((cmd (evil-keypress-parser cmd)))
+                  (throw 'done
+                         (list (car cmd)
+                               (if (or count (cadr cmd))
+                                   (list (car cmd) (* (or count 1)
+                                                      (or (cadr cmd) 1))))))))
+               ((or (eq cmd #'digit-argument)
+                    (and (equal seq "0") count))
+                (let* ((event (aref seq (1- (length seq))))
+                       (char (or (when (characterp event) event)
+                                 (when (symbolp event)
+                                   (get event 'ascii-character))))
+                       (digit (when (integerp char) (- (logand char ?\177) ?0))))
+                  (setq count (+ (* 10 (or count 0)) digit))))
+               ((eq cmd #'negative-argument)
+                (setq negative (not negative)))
+               (t
+                (throw 'done (list cmd
+                                   (and count
+                                        (* count
+                                           (if negative -1 1))))))))))))))
+
+(defun evil-read-key (&optional prompt)
+  "Read a key from the keyboard.
+Translates it according to the input method."
+  (let ((old-global-map (current-global-map))
+        (new-global-map (make-sparse-keymap))
+        (overriding-terminal-local-map nil)
+        (overriding-local-map evil-read-key-map)
+        seq char cmd)
+    (unwind-protect
+        (condition-case nil
+            (progn
+              (define-key new-global-map [menu-bar]
+                (lookup-key global-map [menu-bar]))
+              (define-key new-global-map [tab-bar]
+                (lookup-key global-map [tab-bar]))
+              (define-key new-global-map [tool-bar]
+                (lookup-key global-map [tool-bar]))
+              (setq new-global-map
+                    (append new-global-map
+                            (list (make-char-table 'display-table
+                                                   'self-insert-command))))
+              (use-global-map new-global-map)
+              (setq seq (read-key-sequence prompt nil t)
+                    char (aref seq 0)
+                    cmd (key-binding seq))
+              (while (arrayp cmd)
+                (setq char (aref cmd 0)
+                      cmd (key-binding cmd)))
+              (cond
+               ((eq cmd 'self-insert-command) char)
+               (cmd (call-interactively cmd))
+               (t (user-error "No replacement character typed"))))
+          (quit
+           (when (fboundp 'evil-repeat-abort)
+             (evil-repeat-abort))
+           (signal 'quit nil)))
+      (use-global-map old-global-map))))
+
+(defun evil-read-quoted-char ()
+  "Command that calls `read-quoted-char'.
+This command can be used wherever `read-quoted-char' is required
+as a command. Its main use is in the `evil-read-key-map'."
+  (interactive)
+  (read-quoted-char))
+
+(defvar evil-digraph-read-key-keymap
+  (let ((map (make-sparse-keymap))
+        (n ?0))
+    (while (<= n ?9)
+      (define-key map (vector (intern (concat "kp-" (string n)))) nil)
+      (cl-incf n))
+    map)
+   "By default, used to exclude otherwise disabled fallbacks.")
+
+(declare-function evil-digraph "evil-digraphs")
+(defun evil-read-digraph-char-with-overlay (overlay)
+  "Read two chars, displaying the first in OVERLAY, replacing \"?\".
+Return the digraph from `evil-digraph', else return second char."
+  (interactive)
+  (unwind-protect
+      (let ((read-key-empty-map
+             (let ((map (copy-keymap evil-digraph-read-key-keymap)))
+               (set-keymap-parent map read-key-empty-map)
+               ;; Disable read-key-sequence unbound fallbacks, e.g. downcasing
+               (define-key map [t] 'dummy)
+               map))
+            char1 char2)
+        ;; create overlay prompt
+        (overlay-put overlay 'invisible t)
+        (overlay-put overlay 'after-string
+                     #("?" 0 1 (face minibuffer-prompt cursor 1)))
+        (setq char1 (read-key))
+        (overlay-put overlay 'after-string
+                     (propertize (char-to-string char1)
+                                 'face 'minibuffer-prompt
+                                 'cursor 1))
+        (setq char2 (read-key))
+
+        (or (evil-digraph (list char1 char2))
+            ;; use the last character if undefined
+            char2))
+    (delete-overlay overlay)))
+
+(defun evil-read-digraph-char (&optional hide-chars)
+  "Read two keys from keyboard forming a digraph.
+This function creates an overlay at (point), hiding the next
+HIDE-CHARS characters.  HIDE-CHARS defaults to 1."
+  (interactive)
+  (let ((overlay (make-overlay
+                  (point) (min (+ (point) (or hide-chars 1))
+                               (point-max)))))
+    (evil-read-digraph-char-with-overlay overlay)))
+
+(defun evil-read-motion (&optional motion count type modifier)
+  "Read a MOTION, motion COUNT and motion TYPE from the keyboard.
+The type may be overridden with MODIFIER, which may be a type
+or a Visual selection as defined by `evil-define-visual-selection'.
+Return a list (MOTION COUNT [TYPE])."
+  (let (command prefix)
+    (setq evil-this-type-modified nil)
+    (unless motion
+      (while (progn
+               (setq command (evil-keypress-parser)
+                     motion (pop command)
+                     prefix (pop command))
+               (when prefix
+                 (setq count
+                       (if count
+                           (string-to-number
+                            (concat (number-to-string count)
+                                    (number-to-string prefix)))
+                         prefix)))
+               ;; if the command is a type modifier, read more
+               (when (rassq motion evil-visual-alist)
+                 (setq modifier
+                       (or modifier
+                           (car (rassq motion evil-visual-alist))))))))
+    (when modifier
+      (setq type (or type (evil-type motion 'exclusive)))
+      (cond
+       ((eq modifier 'char)
+        ;; TODO: this behavior could be less hard-coded
+        (setq type (if (eq type 'exclusive) 'inclusive 'exclusive)))
+       (t (setq type modifier)))
+      (setq evil-this-type-modified type))
+    (list motion count type)))
+
+(defun evil-mouse-events-p (keys)
+  "Return non-nil iff KEYS contains a mouse event."
+  (cl-loop for key across keys thereis
+           (or (mouse-event-p key)
+               (mouse-movement-p key))))
+
+(defun evil-extract-count (keys)
+  "Split the key-sequence KEYS into prefix-argument and the rest.
+Return the list (PREFIX CMD SEQ REST), where PREFIX is the
+prefix count, CMD the command to be executed, SEQ the subsequence
+calling CMD, and REST is all remaining events in the
+key-sequence. PREFIX and REST may be nil if they do not exist.
+If a command is bound to some keyboard macro, it is expanded
+recursively."
+  (catch 'done
+    (let ((len (length keys))
+          (beg 0)
+          (end 1)
+          found-prefix)
+      (while (<= end len)
+        (let* ((seq (substring keys beg end))
+               (cmd (key-binding seq)))
+          (cond
+           ((memq cmd '(undefined nil))
+            (user-error "No command bound to `%s'" seq))
+           ((arrayp cmd) ; keyboard macro, replace command with macro
+            (setq keys (vconcat (substring keys 0 beg)
+                                cmd
+                                (substring keys end))
+                  end (1+ beg)
+                  len (length keys)))
+           ((functionp cmd)
+            (if (or (memq cmd '(digit-argument negative-argument))
+                    (and found-prefix
+                         (equal (vconcat seq) (vector ?0))))
+                ;; skip those commands
+                (setq found-prefix t ; found at least one prefix argument
+                      beg end
+                      end (1+ end))
+              ;; a real command, finish
+              (throw 'done
+                     (list (unless (zerop beg)
+                             (string-to-number
+                              (concat (substring keys 0 beg))))
+                           cmd
+                           seq
+                           (when (< end len)
+                             (substring keys end))))))
+           (t ; append a further event
+            (setq end (1+ end))))))
+      (user-error "Key sequence contains no complete binding"))))
+
+(defun evil-extract-append (file-or-append)
+  "Return an (APPEND . FILENAME) pair based on FILE-OR-APPEND.
+FILE-OR-APPEND should either be a filename or a \">> FILE\"
+directive.  APPEND will be t if FILE-OR-APPEND is an append
+directive and nil otherwise.  FILENAME will be the extracted
+filename."
+  (if (and (stringp file-or-append)
+           (string-match "\\(>> *\\)" file-or-append))
+      (cons t (substring file-or-append (match-end 1)))
+    (cons nil file-or-append)))
+
+(defun evil-set-keymap-prompt (map prompt)
+  "Set the prompt-string of MAP to PROMPT."
+  (delq (keymap-prompt map) map)
+  (when prompt
+    (setcdr map (cons prompt (cdr map)))))
+
+(defun evil-lookup-key (map key)
+  "Return non-nil value if KEY is bound in MAP."
+  (let ((definition (lookup-key map key)))
+    (unless (numberp definition) ; in-band error
+      definition)))
+
+;;; Display
+
+(defun evil-set-cursor (specs)
+  "Change the cursor's apperance according to SPECS.
+SPECS may be a cursor type as per `cursor-type', a color
+string as passed to `set-cursor-color', a zero-argument
+function for changing the cursor, or a list of the above.
+
+If SPECS is nil, this function does not have an effect;
+pass (list nil) instead to indicate a nil `cursor-type'
+\(i.e., to disable the cursor)."
+  (unless (and (not (functionp specs))
+               (listp specs)
+               (null (cdr-safe (last specs))))
+    (setq specs (list specs)))
+  (dolist (spec specs)
+    (cond
+     ((functionp spec)
+      (ignore-errors (funcall spec)))
+     ((stringp spec)
+      (evil-set-cursor-color spec))
+     (t
+      (setq cursor-type spec)))))
+
+(defun evil-set-cursor-color (color)
+  "Set the cursor color to COLOR."
+  (unless (equal (frame-parameter nil 'cursor-color) color)
+    ;; `set-cursor-color' forces a redisplay, so only
+    ;; call it when the color actually changes
+    (set-cursor-color color)))
+
+(defun evil-refresh-cursor (&optional state buffer)
+  "Refresh the cursor for STATE in BUFFER.
+BUFFER defaults to the current buffer.  If STATE is nil the
+cursor type is either `evil-force-cursor' or the current state."
+  (defvar evil-local-mode)
+  (when evil-local-mode
+    (let* ((state (or state evil-force-cursor evil-state 'normal))
+           (default (or evil-default-cursor t))
+           (cursor (evil-state-property state :cursor t))
+           (color (or (and (stringp cursor) cursor)
+                      (and (listp cursor) (evil-member-if #'stringp cursor))
+                      (frame-parameter nil 'cursor-color))))
+      (with-current-buffer (or buffer (current-buffer))
+        ;; if both STATE and `evil-default-cursor'
+        ;; specify a color, don't set it twice
+        (evil-set-cursor (if (and color (listp default))
+                             (cl-remove-if #'stringp default)
+                           default))
+        (evil-set-cursor cursor)))))
+
+(defmacro evil-save-cursor (&rest body)
+  "Save the current cursor; execute BODY; restore the cursor."
+  (declare (indent defun) (debug t) (obsolete nil "1.15.0"))
+  `(let ((cursor cursor-type)
+         (color (frame-parameter (selected-frame) 'cursor-color))
+         (inhibit-quit t))
+     (unwind-protect
+         (progn ,@body)
+       (setq cursor-type cursor)
+       (evil-set-cursor-color color))))
+
+(defun evil-echo (string &rest args)
+  "Display an unlogged message in the echo area.
+That is, the message is not logged in the *Messages* buffer.
+\(To log the message, just use `message'.)"
+  (unless evil-no-display
+    (let (message-log-max)
+      (apply #'message string args))))
+
+(defun evil-echo-area-save ()
+  "Save the current echo area in `evil-echo-area-message'."
+  (setq evil-echo-area-message (current-message)))
+
+(defun evil-echo-area-restore ()
+  "Restore the echo area from `evil-echo-area-message'.
+Does not restore if `evil-write-echo-area' is non-nil."
+  (unless evil-write-echo-area
+    (if evil-echo-area-message
+        (message "%s" evil-echo-area-message)
+      (message nil)))
+  (setq evil-echo-area-message nil
+        evil-write-echo-area nil))
+
+;; toggleable version of `with-temp-message'
+(defmacro evil-save-echo-area (&rest body)
+  "Save the echo area; execute BODY; restore the echo area.
+Intermittent messages are not logged in the *Messages* buffer."
+  (declare (indent defun) (debug t))
+  `(let ((inhibit-quit t)
+         evil-echo-area-message evil-write-echo-area)
+     (evil-echo-area-save)
+     (unwind-protect
+         (progn ,@body)
+       (evil-echo-area-restore))))
+
+(defmacro evil-without-display (&rest body)
+  "Execute BODY without Evil displays.
+Inhibits echo area messages, mode line updates and cursor changes."
+  (declare (indent defun)
+           (debug t))
+  `(let ((evil-no-display t))
+     ,@body))
+
+(defun evil-count-lines (beg end)
+  "Return absolute line-number-difference betweeen BEG and END.
+This should give the same results no matter where on the line BEG
+and END are."
+  (if (= beg end)
+      0
+    (let ((end-at-bol (save-excursion (goto-char (max beg end))
+                                      (bolp))))
+      (if end-at-bol
+          (count-lines beg end)
+        (1- (count-lines beg end))))))
+
+;;; Movement
+
+(defun evil-normalize-position (pos)
+  "Return POS if it does not exceed the buffer boundaries.
+If POS is less than `point-min', return `point-min'.
+Is POS is more than `point-max', return `point-max'.
+If POS is a marker, return its position."
+  (cond
+   ((not (number-or-marker-p pos))
+    pos)
+   ((< pos (point-min))
+    (point-min))
+   ((> pos (point-max))
+    (point-max))
+   ((markerp pos)
+    (marker-position pos))
+   (t
+    pos)))
+
+(defmacro evil-save-goal-column (&rest body)
+  "Restore the goal column after execution of BODY.
+See also `evil-save-column'."
+  (declare (indent defun)
+           (debug t))
+  `(let ((goal-column goal-column)
+         (temporary-goal-column temporary-goal-column))
+     ,@body))
+
+(defmacro evil-save-column (&rest body)
+  "Restore the column after execution of BODY.
+See also `evil-save-goal-column'."
+  (declare (indent defun)
+           (debug t))
+  `(let ((col (current-column)))
+     (evil-save-goal-column
+       ,@body
+       (move-to-column col))))
+
+(defun evil--stick-to-eol-p ()
+  "Called by vertical movement commands to help determine cursor position."
+  (and evil-track-eol
+       (eq (or goal-column temporary-goal-column) most-positive-fixnum)
+       (memq last-command '(next-line previous-line))))
+
+(defun evil-eolp ()
+  "Like `eolp' but accounts for `evil-move-beyond-eol' being nil."
+  (ignore-errors
+    (save-excursion
+      (unless (or evil-move-beyond-eol (memq evil-state '(insert replace)))
+        (forward-char))
+      (eolp))))
+
+(defmacro evil-ensure-column (&rest body)
+  "Execute BODY so that column after execution is correct.
+If `evil-start-of-line' is nil, treat BODY as if it were a `next-line' command.
+This mostly copies the approach of Emacs' `line-move-1', but is modified
+so it is more compatible with Evil's notion of EOL tracking."
+  (declare (indent defun) (debug t))
+  `(progn
+     (unless evil-start-of-line
+       (setq this-command 'next-line
+             temporary-goal-column
+             (cond ((memq last-command '(next-line previous-line))
+                    temporary-goal-column)
+                   ((and track-eol (eolp) (not (bolp))) most-positive-fixnum)
+                   (t (current-column)))))
+     ,@body
+     (if evil-start-of-line
+         (evil-first-non-blank)
+       (line-move-to-column
+        (or goal-column
+            (if (consp temporary-goal-column)
+                ;; Guard against a negative value as `temporary-goal-column'
+                ;; may have a negative component when both `whitespace-mode'
+                ;; and `display-line-numbers-mode' are enabled (#1297).
+                (max 0 (+ (truncate (car temporary-goal-column))
+                          (cdr temporary-goal-column)))
+              temporary-goal-column))))))
+
+(defun evil-narrow (beg end)
+  "Restrict the buffer to BEG and END.
+BEG or END may be nil, specifying a one-sided restriction including
+`point-min' or `point-max'. See also `evil-with-restriction.'"
+  (declare (obsolete nil "1.15.0"))
+  (narrow-to-region
+   (if beg (max beg (point-min)) (point-min))
+   (if end (min end (point-max)) (point-max))))
+
+(defmacro evil-with-restriction (beg end &rest body)
+  "Execute BODY with the buffer narrowed to BEG and END.
+BEG or END may be nil to specify a one-sided restriction."
+  (declare (indent 2) (debug t))
+  `(save-restriction
+     (let ((evil-restriction-stack
+            (cons (cons (point-min) (point-max)) evil-restriction-stack)))
+       (narrow-to-region (or ,beg (point-min)) (or ,end (point-max)))
+       ,@body)))
+
+(defmacro evil-without-restriction (&rest body)
+  "Execute BODY with the top-most narrowing removed.
+This works only if the previous narrowing has been generated by
+`evil-with-restriction'."
+  (declare (indent defun) (debug t))
+  `(save-restriction
+     (widen)
+     (narrow-to-region (car (car evil-restriction-stack))
+                       (cdr (car evil-restriction-stack)))
+     (let ((evil-restriction-stack (cdr evil-restriction-stack)))
+       ,@body)))
+
+(defmacro evil-narrow-to-field (&rest body)
+  "Narrow to the current field."
+  (declare (indent defun)
+           (debug t))
+  `(evil-with-restriction (field-beginning) (field-end)
+     ,@body))
+
+(defun evil-move-beginning-of-line (&optional arg)
+  "Move to the beginning of the line as displayed.
+Like `move-beginning-of-line', but retains the goal column."
+  (evil-save-goal-column
+    (move-beginning-of-line arg)
+    (beginning-of-line)))
+
+(defun evil-move-end-of-line (&optional arg)
+  "Move to the end of the line as displayed.
+Like `move-end-of-line', but retains the goal column."
+  (evil-save-goal-column
+    (move-end-of-line arg)
+    (end-of-line)))
+
+(defun evil-adjust-cursor (&optional _)
+  "Move point one character back if at the end of a non-empty line.
+This behavior is controlled by `evil-move-beyond-eol'."
+  (and (not evil-move-beyond-eol)
+       (eolp)
+       (evil-move-cursor-back t)))
+
+(defun evil-move-cursor-back (&optional force)
+  "Move point one character back within the current line.
+Contingent on the variable `evil-move-cursor-back' or the FORCE
+argument.  Movement is constrained to the current field."
+  (or (not (or evil-move-cursor-back force))
+      (bolp)
+      (when (bound-and-true-p visual-line-mode)
+        (= (point) (save-excursion (vertical-motion 0) (point))))
+      (goto-char (constrain-to-field (1- (point)) (point)))))
+
+(defun evil-line-position (line &optional column)
+  "Return the position of LINE.
+If COLUMN is specified, return its position on the line.
+A negative number means the end of the line."
+  (save-excursion
+    (goto-char (point-min))
+    (forward-line (1- line))
+    (when (numberp column)
+      (if (< column 0)
+          (forward-line)
+        (move-to-column column)))
+    (point)))
+
+(defun evil-column (&optional pos)
+  "Return the horizontal position of POS.
+POS defaults to point."
+  (save-excursion
+    (when pos
+      (goto-char pos))
+    (current-column)))
+
+(defun evil-move-to-column (column &optional dir force)
+  "Move point to column COLUMN in the current line.
+Places point at left of the tab character (at the right if DIR
+is non-nil) and returns point."
+  (interactive "p")
+  (move-to-column column force)
+  (unless force
+    (when (or (not dir) (and (numberp dir) (< dir 1)))
+      (when (> (current-column) column)
+        (evil-move-cursor-back))))
+  (point))
+
+(defmacro evil-loop (spec &rest body)
+  "Loop with countdown variable.
+Evaluate BODY with VAR counting down from COUNT to 0.
+COUNT can be negative, in which case VAR counts up instead.
+The return value is the value of VAR when the loop
+terminates, which is 0 if the loop completes successfully.
+RESULT specifies a variable for storing this value.
+
+\(fn (VAR COUNT [RESULT]) BODY...)"
+  (declare (indent defun) (debug dolist) (obsolete nil "1.15.0"))
+  (let* ((i (make-symbol "loopvar"))
+         (var (pop spec))
+         (count (pop spec))
+         (result (pop spec)))
+    (setq var (or (unless (eq var result) var) i)
+          result (or result var))
+    `(let ((,var ,count))
+       (setq ,result ,var)
+       (while (/= ,var 0)
+         ,@body
+         (if (> ,var 0)
+             (setq ,var (1- ,var))
+           (setq ,var (1+ ,var)))
+         (setq ,result ,var))
+       ,var)))
+
+;;; Motions
+
+(defmacro evil-motion-loop (spec &rest body)
+  "Loop a certain number of times.
+Evaluate BODY repeatedly COUNT times with VAR bound to 1 or -1,
+depending on the sign of COUNT. Set RESULT, if specified, to the
+number of unsuccessful iterations, which is 0 if the loop completes
+successfully. This is also the return value.
+
+Each iteration must move point; if point does not change, the loop
+immediately quits.
+
+\(fn (VAR COUNT [RESULT]) BODY...)"
+  (declare (indent defun)
+           (debug ((symbolp form &optional symbolp) body)))
+  (let* ((var (or (pop spec) (make-symbol "unitvar")))
+         (count (or (pop spec) 0))
+         (result (or (pop spec) var))
+         (i (make-symbol "loopvar")))
+    `(let* ((,i ,count)
+            (,var (if (< ,i 0) -1 1)))
+       (while (and (/= ,i 0)
+                   (/= (point) (progn ,@body (point))))
+         (setq ,i (if (< ,i 0) (1+ ,i) (1- ,i))))
+       (setq ,result ,i))))
+
+(defun evil-signal-at-bob-or-eob (&optional count)
+  "Signal error if `point' is at boundaries.
+If `point' is at bob and COUNT is negative this function signals
+`beginning-of-buffer'.  If `point' is at eob and COUNT is positive
+this function signals `end-of-buffer'.  This function should be used
+in motions. COUNT defaults to 1."
+  (setq count (or count 1))
+  (cond
+   ((< count 0) (evil-signal-at-bob))
+   ((> count 0) (evil-signal-at-eob))))
+
+(defun evil-signal-at-bob ()
+  "Signal `beginning-of-buffer' if `point' is at bob.
+This function should be used in backward motions. If `point' is at
+bob so that no further backward motion is possible the error
+`beginning-of-buffer' is raised."
+  (when (bobp) (signal 'beginning-of-buffer nil)))
+
+(defun evil-signal-at-eob ()
+  "Signal `end-of-buffer' if `point' is at eob.
+This function should be used in forward motions. If `point' is close
+to eob so that no further forward motion is possible the error
+`end-of-buffer' is raised. This is the case if `point' is at
+`point-max' or if is one position before `point-max',
+`evil-move-beyond-eol' is nil and `point' is not at the end
+of a line. The latter is necessary because `point' cannot be
+moved to `point-max' if `evil-move-beyond-eol' is nil and
+the last line in the buffer is not empty."
+  (when (or (eobp)
+            (and (not (eolp))
+                 (not evil-move-beyond-eol)
+                 (save-excursion (forward-char) (eobp))))
+    (signal 'end-of-buffer nil)))
+
+(defmacro evil-with-hproject-point-on-window (&rest body)
+  "Project point after BODY to current window.
+If point is on a position left or right of the current window
+then it is moved to the left and right boundary of the window,
+respectively. If `auto-hscroll-mode' is non-nil then the left and
+right positions are increased or decreased, respectively, by
+`horizontal-margin' so that no automatic scrolling occurs."
+  (declare (indent defun)
+           (debug t))
+  (let ((diff (make-symbol "diff"))
+        (left (make-symbol "left"))
+        (right (make-symbol "right")))
+    `(let ((,diff (if auto-hscroll-mode (1+ hscroll-margin) 0))
+           auto-hscroll-mode)
+       ,@body
+       (let* ((,left (+ (window-hscroll) ,diff))
+              (,right (+ (window-hscroll) (window-width) (- ,diff) -1)))
+         (move-to-column (min (max (current-column) ,left) ,right))))))
+
+(defun evil-forward-not-thing (thing &optional count)
+  "Move point to the end or beginning of the complement of THING."
+  (evil-motion-loop (dir (or count 1))
+    (let (bnd)
+      (cond
+       ((> dir 0)
+        (while (and (setq bnd (bounds-of-thing-at-point thing))
+                    (< (point) (cdr bnd)))
+          (goto-char (cdr bnd)))
+        ;; no thing at (point)
+        (if (zerop (forward-thing thing))
+            ;; now at the end of the next thing
+            (let ((bnd (bounds-of-thing-at-point thing)))
+              (if (or (< (car bnd) (point))    ; end of a thing
+                      (= (car bnd) (cdr bnd))) ; zero width thing
+                  (goto-char (car bnd))
+                ;; beginning of yet another thing, go back
+                (forward-thing thing -1)))
+          (goto-char (point-max))))
+       (t
+        (while (and (not (bobp))
+                    (setq bnd (progn (backward-char) (bounds-of-thing-at-point thing)))
+                    (< (point) (cdr bnd)))
+          (goto-char (car bnd)))
+        ;; either bob or no thing at point
+        (goto-char
+         (if (and (not (bobp))
+                  (zerop (forward-thing thing -1))
+                  (setq bnd (bounds-of-thing-at-point thing)))
+             (cdr bnd)
+           (point-min))))))))
+
+(defun evil-bounds-of-not-thing-at-point (thing &optional which)
+  "Return the bounds of a complement of THING at point.
+If there is a THING at point nil is returned.  Otherwise if WHICH
+is nil or 0 a cons cell (BEG . END) is returned. If WHICH is
+negative the beginning is returned. If WHICH is positive the END
+is returned."
+  (let ((pnt (point)))
+    (let ((beg (save-excursion
+                 (and (zerop (forward-thing thing -1))
+                      (forward-thing thing))
+                 (if (> (point) pnt) (point-min) (point))))
+          (end (save-excursion
+                 (and (zerop (forward-thing thing))
+                      (forward-thing thing -1))
+                 (if (< (point) pnt) (point-max) (point)))))
+      (when (and (<= beg (point) end) (< beg end))
+        (cond
+         ((or (not which) (zerop which)) (cons beg end))
+         ((< which 0) beg)
+         ((> which 0) end))))))
+
+(defun evil-forward-nearest (count &rest forwards)
+  "Move point forward to the first of several motions.
+FORWARDS is a list of forward motion functions (i.e. each moves
+point forward to the next end of a text object (if passed a +1)
+or backward to the preceeding beginning of a text object (if
+passed a -1)). This function calls each of these functions once
+and moves point to the nearest of the resulting positions. If
+COUNT is positive point is moved forward COUNT times, if negative
+point is moved backward -COUNT times."
+  (evil-motion-loop (dir (or count 1))
+    (let ((pnt (point))
+          (nxt (if (< dir 0) (point-min) (point-max))))
+      (dolist (fwd forwards)
+        (goto-char pnt)
+        (ignore-errors
+          (evil-with-restriction
+              (when (< dir 0)
+                (save-excursion
+                  (goto-char nxt)
+                  (line-beginning-position 0)))
+              (when (> dir 0)
+                (save-excursion
+                  (goto-char nxt)
+                  (line-end-position 2)))
+            (and (zerop (funcall fwd dir))
+                 (/= (point) pnt)
+                 (if (< dir 0) (> (point) nxt) (< (point) nxt))
+                 (setq nxt (point))))))
+      (goto-char nxt))))
+
+(defun bounds-of-evil-string-at-point (&optional state)
+  "Return the bounds of a string at point.
+If STATE is given it used a parsing state at point."
+  (save-excursion
+    (let ((state (or state (syntax-ppss))))
+      (when (nth 3 state)
+        (cons (nth 8 state)
+              (when (parse-partial-sexp
+                     (point) (point-max) nil nil state 'syntax-table)
+                (point)))))))
+(put 'evil-string 'bounds-of-thing-at-point #'bounds-of-evil-string-at-point)
+
+(defun bounds-of-evil-comment-at-point ()
+  "Return the bounds of a string at point."
+  (save-excursion
+    (let ((state (syntax-ppss)))
+      (when (nth 4 state)
+        (cons (nth 8 state)
+              (when (parse-partial-sexp
+                     (point) (point-max) nil nil state 'syntax-table)
+                (point)))))))
+(put 'evil-comment 'bounds-of-thing-at-point #'bounds-of-evil-comment-at-point)
+
+;; The purpose of this function is to provide line motions which
+;; preserve the column. This is how `previous-line' and `next-line'
+;; work, but unfortunately the behaviour is hard-coded: if and only if
+;; the last command was `previous-line' or `next-line', the column is
+;; preserved. Furthermore, in contrast to Vim, when we cannot go
+;; further, those motions move point to the beginning resp. the end of
+;; the line (we never want point to leave its column). The code here
+;; comes from simple.el, and I hope it will work in future.
+(declare-function evil-end-of-visual-line "evil-commands")
+(defun evil-line-move (count &optional noerror)
+  "Like `line-move' but conserves the column.
+Signal an error at buffer boundaries unless NOERROR is non-nil."
+  (setq this-command (if (< count 0) 'previous-line 'next-line))
+  (let ((last-command
+         ;; Reset tmp goal column between visual/logical movement
+         (when (or (eq line-move-visual (consp temporary-goal-column))
+                   (eq temporary-goal-column most-positive-fixnum))
+           last-command))
+        (opoint (point)))
+    (if (and line-move-visual
+             (eq temporary-goal-column most-positive-fixnum)
+             (memq last-command '(next-line previous-line)))
+        (let (temporary-goal-column) (evil-end-of-visual-line (1+ count)))
+      (condition-case err
+          (line-move count)
+        ((beginning-of-buffer end-of-buffer)
+         (let* ((raw-col (or goal-column
+                             (car-safe temporary-goal-column)
+                             temporary-goal-column))
+                (col (if (numberp raw-col) (max 0 raw-col) 0)))
+           (line-move-finish col opoint (< count 0)))
+         (or noerror (/= (point) opoint) (signal (car err) (cdr err))))))))
+
+(defun evil-forward-syntax (syntax &optional count)
+  "Move point to the end or beginning of a sequence of characters in SYNTAX.
+Stop on reaching a character not in SYNTAX."
+  (let ((notsyntax (if (= (aref syntax 0) ?^)
+                       (substring syntax 1)
+                     (concat "^" syntax))))
+    (evil-motion-loop (dir (or count 1))
+      (cond
+       ((< dir 0)
+        (skip-syntax-backward notsyntax)
+        (skip-syntax-backward syntax))
+       (t
+        (skip-syntax-forward notsyntax)
+        (skip-syntax-forward syntax))))))
+
+(defun evil-forward-chars (chars &optional count)
+  "Move point to the end or beginning of a sequence of CHARS.
+CHARS is a character set as inside [...] in a regular expression."
+  (let ((notchars (if (= (aref chars 0) ?^)
+                      (substring chars 1)
+                    (concat "^" chars))))
+    (evil-motion-loop (dir (or count 1))
+      (cond
+       ((< dir 0)
+        (skip-chars-backward notchars)
+        (skip-chars-backward chars))
+       (t
+        (skip-chars-forward notchars)
+        (skip-chars-forward chars))))))
+
+(defun evil-up-block (beg end &optional count)
+  "Move point to the end or beginning of text enclosed by BEG and END.
+BEG and END should be regular expressions matching the opening
+and closing delimiters, respectively. If COUNT is greater than
+zero point is moved forward otherwise it is moved
+backwards. Whenever an opening delimiter is found the COUNT is
+increased by one, if a closing delimiter is found the COUNT is
+decreased by one. The motion stops when COUNT reaches zero. The
+match-data reflects the last successful match (that caused COUNT
+to reach zero). The behaviour of this functions is similar to
+`up-list'."
+  (let* ((count (or count 1))
+         (forwardp (> count 0))
+         (dir (if forwardp +1 -1)))
+    (catch 'done
+      (while (not (zerop count))
+        (let* ((pnt (point))
+               (cl (save-excursion
+                     (and (re-search-forward (if forwardp end beg) nil t dir)
+                          (or (/= pnt (point))
+                              (progn
+                                ;; zero size match, repeat search from
+                                ;; the next position
+                                (forward-char dir)
+                                (re-search-forward (if forwardp end beg) nil t dir)))
+                          (point))))
+               (match (match-data t))
+               (op (save-excursion
+                     (and (not (equal beg end))
+                          (re-search-forward (if forwardp beg end) cl t dir)
+                          (or (/= pnt (point))
+                              (progn
+                                ;; zero size match, repeat search from
+                                ;; the next position
+                                (forward-char dir)
+                                (re-search-forward (if forwardp beg end) cl t dir)))
+                          (point)))))
+          (cond
+           ((not cl)
+            (goto-char (if forwardp (point-max) (point-min)))
+            (set-match-data nil)
+            (throw 'done count))
+           (t
+            (if op
+                (progn
+                  (setq count (if forwardp (1+ count) (1- count)))
+                  (goto-char op))
+              (setq count (if forwardp (1- count) (1+ count)))
+              (if (zerop count) (set-match-data match))
+              (goto-char cl))))))
+      0)))
+
+(defun evil-up-paren (open close &optional count)
+  "Move point to the end or beginning of balanced parentheses.
+OPEN and CLOSE should be characters identifying the opening and
+closing parenthesis, respectively. If COUNT is greater than zero
+point is moved forward otherwise it is moved backwards. Whenever
+an opening delimiter is found the COUNT is increased by one, if a
+closing delimiter is found the COUNT is decreased by one. The
+motion stops when COUNT reaches zero. The match-data reflects the
+last successful match (that caused COUNT to reach zero)."
+  ;; Always use the default `forward-sexp-function'. This is important
+  ;; for modes that use a custom one like `python-mode'.
+  ;; (addresses #364)
+  (let (forward-sexp-function up-list-function)
+    (with-syntax-table (copy-syntax-table (syntax-table))
+      (modify-syntax-entry open (format "(%c" close))
+      (modify-syntax-entry close (format ")%c" open))
+      (let ((rest (evil-motion-loop (dir count)
+                    (let ((pnt (point)))
+                      (condition-case nil
+                          (cond
+                           ((> dir 0)
+                            (while (progn
+                                     (up-list dir t)
+                                     (/= (char-before) close))))
+                           (t
+                            (while (progn
+                                     (up-list dir t)
+                                     (/= (char-after) open)))))
+                        (error (goto-char pnt)))))))
+        (cond
+         ((= rest count) (set-match-data nil))
+         ((> count 0) (set-match-data (list (1- (point)) (point))))
+         (t (set-match-data (list (point) (1+ (point))))))
+        rest))))
+
+(defun evil-up-xml-tag (&optional count)
+  "Move point to the end or beginning of balanced xml tags.
+If COUNT is greater than zero point is moved forward otherwise it is moved
+backwards.  Whenever an opening delimiter is found the COUNT is increased by
+one, if a closing delimiter is found the COUNT is decreased by one.  The motion
+stops when COUNT reaches zero.  The match data reflects the last successful
+match (that caused COUNT to reach zero)."
+  (let* ((dir (if (> (or count 1) 0) +1 -1))
+         (count (abs (or count 1)))
+         (op (if (> dir 0) 1 2))
+         (cl (if (> dir 0) 2 1))
+         (orig (point))
+         pnt tags match)
+    (catch 'done
+      (while (> count 0)
+        ;; find the previous opening tag
+        (while
+            (and (setq match
+                       (re-search-forward
+                        "<\\([^/ >\n]+\\)\\(?:=>?\\|[^\"/>]\\|\"[^\"]*\"\\)*?>\\|</\\([^>]+?\\)>"
+                        nil t dir))
+                 (cond
+                  ((match-beginning op)
+                   (push (match-string op) tags))
+                  ((null tags) nil) ; free closing tag
+                  ((and (< dir 0)
+                        (string= (car tags) (match-string cl)))
+                   ;; in backward direction we only accept matching
+                   ;; tags. If the current tag is a free opener
+                   ;; without matching closing tag, the subsequent
+                   ;; test will make us ignore this tag
+                   (pop tags))
+                  ((and (> dir 0))
+                   ;; non matching openers are considered free openers
+                   (while (and tags
+                               (not (string= (car tags)
+                                             (match-string cl))))
+                     (pop tags))
+                   (pop tags)))))
+        (unless (setq match (and match (match-data t)))
+          (setq match nil)
+          (throw 'done count))
+        ;; found closing tag, look for corresponding opening tag
+        (cond
+         ((> dir 0)
+          (setq pnt (match-end 0))
+          (goto-char (match-beginning 0)))
+         (t
+          (setq pnt (match-beginning 0))
+          (goto-char (match-end 0))))
+        (let* ((tag (match-string cl))
+               (refwd (concat "<\\(/\\)?"
+                              (regexp-quote tag)
+                              "\\(?:>\\|[ \n]\\(?:[^\"/>]\\|\"[^\"]*\"\\)*?>\\)"))
+               (cnt 1))
+          (while (and (> cnt 0) (re-search-backward refwd nil t dir))
+            (setq cnt (+ cnt (if (match-beginning 1) dir (- dir)))))
+          (if (zerop cnt) (setq count (1- count) tags nil))
+          (goto-char pnt)))
+      (if (> count 0)
+          (set-match-data nil)
+        (set-match-data match)
+        (goto-char (if (> dir 0) (match-end 0) (match-beginning 0)))))
+    ;; if not found, set to point-max/point-min
+    (unless (zerop count)
+      (set-match-data nil)
+      (goto-char (if (> dir 0) (point-max) (point-min)))
+      (if (/= (point) orig) (setq count (1- count))))
+    (* dir count)))
+
+(defun evil-forward-quote (quote &optional count)
+  "Move point to the end or beginning of a string.
+QUOTE is the character delimiting the string. If COUNT is greater
+than zero point is moved forward otherwise it is moved
+backwards."
+  (let (reset-parser)
+    (with-syntax-table (copy-syntax-table (syntax-table))
+      (unless (= (char-syntax quote) ?\")
+        (modify-syntax-entry quote "\"")
+        (setq reset-parser t))
+      ;; global parser state is out of state, use local one
+      (let* ((pnt (point))
+             (state (save-excursion
+                      (beginning-of-defun)
+                      (parse-partial-sexp (point) pnt nil nil (syntax-ppss))))
+             (bnd (bounds-of-evil-string-at-point state)))
+        (when (and bnd (< (point) (cdr bnd)))
+          ;; currently within a string
+          (if (> count 0)
+              (progn
+                (goto-char (cdr bnd))
+                (setq count (1- count)))
+            (goto-char (car bnd))
+            (setq count (1+ count))))
+        ;; forward motions work with local parser state
+        (cond
+         ((> count 0)
+          ;; no need to reset global parser state because we only use
+          ;; the local one
+          (setq reset-parser nil)
+          (catch 'done
+            (while (and (> count 0) (not (eobp)))
+              (setq state (parse-partial-sexp
+                           (point) (point-max) nil nil state 'syntax-table))
+              (cond
+               ((nth 3 state)
+                (setq bnd (bounds-of-thing-at-point 'evil-string))
+                (goto-char (cdr bnd))
+                (setq count (1- count)))
+               ((eobp) (goto-char pnt) (throw 'done nil))))))
+         ((< count 0)
+          ;; need to update global cache because of backward motion
+          (setq reset-parser (and reset-parser (point)))
+          (save-excursion
+            (beginning-of-defun)
+            (syntax-ppss-flush-cache (point)))
+          (catch 'done
+            (while (and (< count 0) (not (bobp)))
+              (setq pnt (point))
+              (while (and (not (bobp))
+                          (or (eobp) (/= (char-after) quote)))
+                (backward-char))
+              (cond
+               ((setq bnd (bounds-of-thing-at-point 'evil-string))
+                (goto-char (car bnd))
+                (setq count (1+ count)))
+               ((bobp) (goto-char pnt) (throw 'done nil))
+               (t (backward-char))))))
+         (t (setq reset-parser nil)))))
+    (when reset-parser
+      ;; reset global cache
+      (save-excursion
+        (goto-char reset-parser)
+        (beginning-of-defun)
+        (syntax-ppss-flush-cache (point))))
+    count))
+
+;;; Thing-at-point motion functions for Evil text objects and motions
+(defun forward-evil-empty-line (&optional count)
+  "Move forward COUNT empty lines."
+  (setq count (or count 1))
+  (cond
+   ((> count 0)
+    (while (and (> count 0) (not (eobp)))
+      (when (and (bolp) (eolp))
+        (setq count (1- count)))
+      (forward-line 1)))
+   (t
+    (while (and (< count 0) (not (bobp))
+                (zerop (forward-line -1)))
+      (when (and (bolp) (eolp))
+        (setq count (1+ count))))))
+  count)
+
+(defun forward-evil-space (&optional count)
+  "Move forward COUNT whitespace sequences [[:space:]]+."
+  (evil-forward-chars "[:space:]" count))
+
+(defun forward-evil-word (&optional count)
+  "Move forward COUNT words.
+Moves point COUNT words forward or (- COUNT) words backward if
+COUNT is negative.  Point is placed after the end of the word (if
+forward) or at the first character of the word (if backward).  A
+word is a sequence of word characters matching
+\[[:word:]] (recognized by `forward-word'), a sequence of
+non-whitespace non-word characters '[^[:word:]\\n\\r\\t\\f ]', or
+an empty line matching ^$."
+  (evil-forward-nearest
+   count
+   #'(lambda (&optional cnt)
+       (let ((word-separating-categories evil-cjk-word-separating-categories)
+             (word-combining-categories evil-cjk-word-combining-categories)
+             (pnt (point)))
+         (forward-word cnt)
+         (if (= pnt (point)) cnt 0)))
+   #'(lambda (&optional cnt)
+       (evil-forward-chars "^[:word:]\n\r\t\f " cnt))
+   #'forward-evil-empty-line))
+
+(defun forward-evil-WORD (&optional count)
+  "Move forward COUNT \"WORDS\".
+Moves point COUNT WORDS forward or (- COUNT) WORDS backward if
+COUNT is negative. Point is placed after the end of the WORD (if
+forward) or at the first character of the WORD (if backward). A
+WORD is a sequence of non-whitespace characters
+'[^\\n\\r\\t\\f ]', or an empty line matching ^$."
+  (evil-forward-nearest count
+                        #'(lambda (&optional cnt)
+                            (evil-forward-chars "^\n\r\t\f " cnt))
+                        #'forward-evil-empty-line))
+
+(defun forward-evil-symbol (&optional count)
+  "Move forward COUNT symbols.
+Moves point COUNT symbols forward or (- COUNT) symbols backward
+if COUNT is negative. Point is placed after the end of the
+symbol (if forward) or at the first character of the symbol (if
+backward). A symbol is either determined by `forward-symbol', or
+is a sequence of characters not in the word, symbol or whitespace
+syntax classes."
+  (evil-forward-nearest
+   count
+   #'(lambda (&optional cnt)
+       (evil-forward-syntax "^w_->" cnt))
+   #'(lambda (&optional cnt)
+       (let ((pnt (point)))
+         (forward-symbol cnt)
+         (if (= pnt (point)) cnt 0)))
+   #'forward-evil-empty-line))
+
+(defun forward-evil-defun (&optional count)
+  "Move forward COUNT defuns.
+Moves point COUNT defuns forward or (- COUNT) defuns backward
+if COUNT is negative.  A defun is defined by
+`beginning-of-defun' and `end-of-defun' functions."
+  (evil-motion-loop (dir (or count 1))
+    (if (> dir 0) (end-of-defun) (beginning-of-defun))))
+
+(defun forward-evil-sentence (&optional count)
+  "Move forward COUNT sentences.
+Moves point COUNT sentences forward or (- COUNT) sentences
+backward if COUNT is negative.  This function is the same as
+`forward-sentence' but returns the number of sentences that could
+NOT be moved over."
+  (evil-motion-loop (dir (or count 1))
+    (ignore-errors (forward-sentence dir))))
+
+(defun forward-evil-paragraph (&optional count)
+  "Move forward COUNT paragraphs.
+Moves point COUNT paragraphs forward or (- COUNT) paragraphs backward
+if COUNT is negative.  A paragraph is defined by
+`start-of-paragraph-text' and `forward-paragraph' functions."
+  (evil-motion-loop (dir (or count 1))
+    (cond
+     ((> dir 0) (forward-paragraph))
+     ((not (bobp)) (start-of-paragraph-text) (beginning-of-line)))))
+
+(defvar evil-forward-quote-char ?\"
+  "The character to be used by `forward-evil-quote'.")
+
+(defun forward-evil-quote (&optional count)
+  "Move forward COUNT strings.
+The quotation character is specified by the global variable
+`evil-forward-quote-char'. This character is passed to
+`evil-forward-quote'."
+  (evil-forward-quote evil-forward-quote-char count))
+
+(defun forward-evil-quote-simple (&optional count)
+  "Move forward COUNT strings.
+The quotation character is specified by the global variable
+`evil-forward-quote-char'. This functions uses Vim's rules
+parsing from the beginning of the current line for quotation
+characters. It should only be used when looking for strings
+within comments and buffer *must* be narrowed to the comment."
+  (let ((dir (if (> (or count 1) 0) 1 -1))
+        (ch evil-forward-quote-char)
+        (pnt (point))
+        (cnt 0))
+    (beginning-of-line)
+    ;; count number of quotes before pnt
+    (while (< (point) pnt)
+      (when (= (char-after) ch)
+        (setq cnt (1+ cnt)))
+      (forward-char))
+    (setq cnt (- (* 2 (abs count)) (mod cnt 2)))
+    (cond
+     ((> dir 0)
+      (while (and (not (eolp)) (not (zerop cnt)))
+        (when (= (char-after) ch) (setq cnt (1- cnt)))
+        (forward-char))
+      (when (not (zerop cnt)) (goto-char (point-max))))
+     (t
+      (while (and (not (bolp)) (not (zerop cnt)))
+        (when (= (char-before) ch) (setq cnt (1- cnt)))
+        (forward-char -1))
+      (when (not (zerop cnt)) (goto-char (point-min)))))
+    (/ cnt 2)))
+
+;;; Motion functions
+(defun evil-forward-beginning (thing &optional count)
+  "Move forward to beginning of THING.
+The motion is repeated COUNT times."
+  (setq count (or count 1))
+  (if (< count 0)
+      (forward-thing thing count)
+    (let ((bnd (bounds-of-thing-at-point thing))
+          rest)
+      (when (and bnd (< (point) (cdr bnd)))
+        (goto-char (cdr bnd)))
+      (ignore-errors
+        (when (zerop (setq rest (forward-thing thing count)))
+          (when (and (bounds-of-thing-at-point thing)
+                     (not (bobp))
+                     ;; handle final empty line
+                     (not (and (bolp) (eobp))))
+            (backward-char))
+          (beginning-of-thing thing)))
+      rest)))
+
+(defun evil-backward-beginning (thing &optional count)
+  "Move backward to beginning of THING.
+The motion is repeated COUNT times. This is the same as calling
+`evil-backward-beginning' with -COUNT."
+  (evil-forward-beginning thing (- (or count 1))))
+
+(defun evil-forward-end (thing &optional count)
+  "Move forward to end of THING.
+The motion is repeated COUNT times."
+  (setq count (or count 1))
+  (if (> count 0)
+      (progn (unless (eobp) (forward-char))
+             (prog1 (forward-thing thing count)
+               (unless (bobp) (backward-char))))
+    (let ((bnd (bounds-of-thing-at-point thing))
+          rest)
+      (when (and bnd (< (point) (cdr bnd) ))
+        (goto-char (car bnd)))
+      (ignore-errors
+        (when (zerop (setq rest (forward-thing thing count)))
+          (end-of-thing thing)
+          (backward-char)))
+      rest)))
+
+(defun evil-backward-end (thing &optional count)
+  "Move backward to end of THING.
+The motion is repeated COUNT times. This is the same as calling
+`evil-backward-end' with -COUNT."
+  (evil-forward-end thing (- (or count 1))))
+
+(defun evil-forward-word (&optional count)
+  "Move by words.
+Moves point COUNT words forward or (- COUNT) words backward if
+COUNT is negative. This function is the same as `forward-word'
+but returns the number of words by which point could *not* be
+moved."
+  (setq count (or count 1))
+  (let* ((dir (if (>= count 0) +1 -1))
+         (count (abs count)))
+    (while (and (> count 0)
+                (forward-word dir))
+      (setq count (1- count)))
+    count))
+
+(defun evil-in-comment-p (&optional pos)
+  "Check if POS is within a comment according to current syntax.
+If POS is nil, (point) is used. The return value is the beginning
+position of the comment."
+  (setq pos (or pos (point)))
+  (let ((chkpos
+         (cond
+          ((eobp) pos)
+          ((= (char-syntax (char-after)) ?<) (1+ pos))
+          ((and (not (zerop (logand (car (syntax-after (point)))
+                                    (ash 1 16))))
+                (not (zerop (logand (or (car (syntax-after (1+ (point)))) 0)
+                                    (ash 1 17)))))
+           (+ pos 2))
+          ((and (not (zerop (logand (car (syntax-after (point)))
+                                    (ash 1 17))))
+                (not (zerop (logand (or (car (syntax-after (1- (point)))) 0)
+                                    (ash 1 16)))))
+           (1+ pos))
+          (t pos))))
+    (let ((syn (save-excursion (syntax-ppss chkpos))))
+      (and (nth 4 syn) (nth 8 syn)))))
+
+(defun evil-looking-at-start-comment (&optional move)
+  "Return t if point is at the start of a comment.
+Point must be on one of the opening characters of a block comment
+according to the current syntax table. Futhermore, these
+characters must been parsed as opening characters, i.e. they
+won't be considered as comment starters inside a string or
+possibly another comment. Point is moved to the first character
+of the comment opener if MOVE is non-nil."
+  (cond
+   ((= (point) (point-max)) nil)
+   ;; one character opener
+   ((= (char-syntax (char-after)) ?<)
+    (equal (point) (evil-in-comment-p (1+ (point)))))
+   ;; two character opener on first char
+   ((and (not (zerop (logand (car (syntax-after (point)))
+                             (ash 1 16))))
+         (not (zerop (logand (or (car (syntax-after (1+ (point)))) 0)
+                             (ash 1 17)))))
+    (equal (point) (evil-in-comment-p (+ 2 (point)))))
+   ;; two character opener on second char
+   ((and (not (zerop (logand (car (syntax-after (point)))
+                             (ash 1 17))))
+         (not (zerop (logand (or (car (syntax-after (1- (point)))) 0)
+                             (ash 1 16)))))
+    (and (equal (1- (point)) (evil-in-comment-p (1+ (point))))
+         (prog1 t (when move (backward-char)))))))
+
+(defun evil-looking-at-end-comment (&optional move)
+  "Return t if point is at the end of a comment.
+Point must be on one of the opening characters of a block comment
+according to the current syntax table. Futhermore, these
+characters must been parsed as opening characters, i.e. they
+won't be considered as comment starters inside a string or
+possibly another comment. Point is moved right after the comment
+closer if MOVE is non-nil."
+  (cond
+   ;; one char closer
+   ((= (char-syntax (char-after)) ?>)
+    (and (evil-in-comment-p) ; in comment
+         (not (evil-in-comment-p (1+ (point))))
+         (prog1 t (when move (forward-char)))))
+   ;; two char closer on first char
+   ((and (not (zerop (logand (car (syntax-after (point)))
+                             (ash 1 18))))
+         (not (zerop (logand (or (car (syntax-after (1+ (point)))) 0)
+                             (ash 1 19)))))
+    (and (evil-in-comment-p)
+         (not (evil-in-comment-p (+ (point) 2)))
+         (prog1 t (when move (forward-char 2)))))
+   ;; two char closer on second char
+   ((and (not (zerop (logand (car (syntax-after (point)))
+                             (ash 1 19))))
+         (not (zerop (logand (or (car (syntax-after (1- (point)))) 0)
+                             (ash 1 18)))))
+    (and (evil-in-comment-p)
+         (not (evil-in-comment-p (1+ (point))))
+         (prog1 t (when move (forward-char)))))))
+
+(defun evil-insert-newline-above ()
+  "Insert a new line above point and place point in that line
+with regard to indentation."
+  (evil-narrow-to-field
+    (evil-move-beginning-of-line)
+    (insert (if use-hard-newlines hard-newline "\n"))
+    (forward-line -1)
+    (back-to-indentation)))
+
+(defun evil-insert-newline-below ()
+  "Insert a new line below point and place point in that line
+with regard to indentation."
+  (evil-narrow-to-field
+    (evil-move-end-of-line)
+    (insert (if use-hard-newlines hard-newline "\n"))
+    (back-to-indentation)))
+
+;;; Markers
+
+(defun evil-global-marker-p (char)
+  "Whether CHAR denotes a global marker."
+  (or (and (>= char ?A) (<= char ?Z))
+      (assq char (default-value 'evil-markers-alist))))
+
+(defun evil-set-marker (char &optional pos advance)
+  "Set the marker denoted by CHAR to position POS.
+POS defaults to the current position of point.
+If ADVANCE is t, the marker advances when inserting text at it;
+otherwise, it stays behind."
+  (interactive (list (read-char)))
+  (catch 'done
+    (let ((marker (evil-get-marker char t)) alist)
+      (unless (markerp marker)
+        (cond
+         ((eq marker 'evil-visual-beginning)
+          (setq marker evil-visual-mark))
+         ((eq marker 'evil-visual-goto-end)
+          (setq marker evil-visual-point))
+         ((and marker (symbolp marker) (boundp marker))
+          (set marker (or (symbol-value marker) (make-marker)))
+          (setq marker (symbol-value marker)))
+         ((eq marker 'evil-jump-backward-swap)
+          (evil-set-jump)
+          (throw 'done nil))
+         ((functionp marker)
+          (user-error "Cannot set special marker `%c'" char))
+         ((evil-global-marker-p char)
+          (setq alist (default-value 'evil-markers-alist)
+                marker (make-marker))
+          (evil--add-to-alist alist char marker)
+          (setq-default evil-markers-alist alist))
+         (t
+          (setq marker (make-marker))
+          (evil--add-to-alist evil-markers-alist char marker))))
+      (add-hook 'kill-buffer-hook #'evil-swap-out-markers nil t)
+      (set-marker-insertion-type marker advance)
+      (set-marker marker (or pos (point))))))
+(evil-set-command-properties #'evil-set-marker :suppress-operator t)
+
+(defun evil-get-marker (char &optional raw)
+  "Return the marker denoted by CHAR.
+This is either a marker object as returned by `make-marker',
+a number, a cons cell (FILE . POS) with FILE being a string
+and POS a number, or nil. If RAW is non-nil, then the
+return value may also be a variable, a movement function,
+or a marker object pointing nowhere."
+  (let ((marker (cdr (assq char (if (evil-global-marker-p char)
+                                    (default-value 'evil-markers-alist)
+                                  evil-markers-alist)))))
+    (if raw
+        marker
+      (when (and (symbolp marker) (boundp marker))
+        (setq marker (symbol-value marker)))
+      (when (functionp marker)
+        (save-excursion
+          (save-window-excursion
+            (funcall marker)
+            (setq marker (move-marker (make-marker) (point))))))
+      (if (markerp marker)
+          (if (eq (marker-buffer marker) (current-buffer))
+              (marker-position marker)
+            (when (marker-buffer marker) marker))
+        marker))))
+
+(defun evil-swap-out-markers ()
+  "Turn markers into file references when the buffer is killed."
+  (when buffer-file-name
+    (dolist (entry evil-markers-alist)
+      (and (markerp (cdr entry))
+           (eq (marker-buffer (cdr entry)) (current-buffer))
+           (setcdr entry (cons buffer-file-name
+                               (marker-position (cdr entry))))))))
+(put 'evil-swap-out-markers 'permanent-local-hook t)
+
+(defvar calc-multiplication-has-precedence)
+(defun evil--eval-expr (input)
+  "Eval INPUT and return stringified result, if of a suitable type.
+If INPUT starts with a number, +, -, or . use `calc-eval' instead."
+  (let* ((calcable-p (string-match-p "\\`[[:space:]]*[0-9+.-]" input))
+         (result (if calcable-p
+                     (let ((calc-multiplication-has-precedence nil))
+                       (calc-eval input))
+                   (eval (car (read-from-string input)) t))))
+    (cond
+     ((stringp result) result)
+     ((or (numberp result) (symbolp result))
+      (format "%s" result))
+     ((sequencep result)
+      (mapconcat (lambda (x) (format "%s" x)) result "\n"))
+     (t (user-error "Using `%s' as a string" (type-of result))))))
+
+(defvar evil-paste-clear-minibuffer-first nil
+  "`evil-paste-before' cannot have `delete-minibuffer-contents' called before
+it fetches certain registers becuase this would trigger various ex-updates,
+sometimes moving point, so `C-a' `C-w' etc. would miss their intended target.")
+
+(defun evil-ex-remove-default ()
+  "Remove the default text shown in the ex minibuffer.
+When Ex starts, the previous command is shown enclosed in
+parenthesis. This function removes this text when the first key
+is pressed."
+  (when (and (not (eq this-command 'exit-minibuffer))
+             (/= (minibuffer-prompt-end) (point-max)))
+    (when (eq this-command 'evil-ex-delete-backward-char)
+      (setq this-command 'ignore))
+    (if (eq this-original-command 'evil-paste-from-register)
+        (setq evil-paste-clear-minibuffer-first t)
+      (delete-minibuffer-contents)))
+  (remove-hook 'pre-command-hook #'evil-ex-remove-default t))
+
+(defun evil-get-register (register &optional noerror)
+  "Return contents of REGISTER.
+Signal an error if empty, unless NOERROR is non-nil.
+
+The following special registers are supported.
+  \"  the unnamed register
+  *  the clipboard contents
+  +  the clipboard contents
+  <C-w> the word at point (ex mode only)
+  <C-a> the WORD at point (ex mode only)
+  <C-o> the symbol at point (ex mode only)
+  <C-f> the current file at point (ex mode only)
+  %  the current file name (read only)
+  #  the alternate file name (read only)
+  /  the last search pattern (read only)
+  :  the last command line (read only)
+  .  the last inserted text (read only)
+  -  the last small (less than a line) delete
+  _  the black hole register
+  =  the expression register (read only)"
+  (unless (characterp register) (error "Invalid register `%S'" register))
+  (condition-case err
+      (or (cond
+           ((eq register ?\")
+            (current-kill 0))
+           ((<= ?1 register ?9)
+            (let ((reg (- register ?1)))
+              (and (< reg (length kill-ring))
+                   (current-kill reg t))))
+           ((memq register '(?* ?+))
+            (let ((what (if (eq register ?*) 'PRIMARY 'CLIPBOARD)))
+              (if (eval-when-compile (>= emacs-major-version 29))
+                  (gui--selection-value-internal what)
+                ;; The following code is based on `x-selection-value-internal'
+                ;; (now `gui--selection-value-internal') circa Emacs 24. We're
+                ;; unsure why exactly it's duplicated here, and it's possible
+                ;; it needn't be for newer versions of Emacs.
+                (let ((request-type (or (bound-and-true-p x-select-request-type)
+                                        '(UTF8_STRING COMPOUND_TEXT STRING)))
+                      text)
+                  (unless (consp request-type)
+                    (setq request-type (list request-type)))
+                  (while (and request-type (not text))
+                    (setq text (ignore-errors
+                                 (evil-get-selection what (pop request-type)))))
+                  (when text
+                    (remove-text-properties 0 (length text) '(foreign-selection nil) text))
+                  text))))
+           ((eq register ?\C-W)
+            (with-current-buffer
+                (or evil-ex-original-buffer
+                    (let ((w (minibuffer-selected-window))) (and w (window-buffer w)))
+                    (user-error "Register <C-w> is only available in Ex state"))
+              (thing-at-point 'evil-word)))
+           ((eq register ?\C-A)
+            (with-current-buffer
+                (or evil-ex-original-buffer
+                    (let ((w (minibuffer-selected-window))) (and w (window-buffer w)))
+                    (user-error "Register <C-a> is only available in Ex state"))
+              (thing-at-point 'evil-WORD)))
+           ((eq register ?\C-O)
+            (with-current-buffer
+                (or evil-ex-original-buffer
+                    (let ((w (minibuffer-selected-window))) (and w (window-buffer w)))
+                    (user-error "Register <C-o> is only available in Ex state"))
+              (thing-at-point 'evil-symbol)))
+           ((eq register ?\C-F)
+            (with-current-buffer
+                (or evil-ex-original-buffer
+                    (let ((w (minibuffer-selected-window))) (and w (window-buffer w)))
+                    (user-error "Register <C-f> is only available in Ex state"))
+              (thing-at-point 'filename)))
+           ((eq register ?\C-L)
+            (with-current-buffer
+                (or evil-ex-original-buffer
+                    (let ((w (minibuffer-selected-window))) (and w (window-buffer w)))
+                    (user-error "Register <C-l> is only available in Ex state"))
+              (replace-regexp-in-string "\n\\'" "" (thing-at-point 'line))))
+           ((eq register ?%)
+            (or (buffer-file-name
+                 (or evil-ex-original-buffer
+                     (let ((w (minibuffer-selected-window))) (and w (window-buffer w)))))
+                (user-error "No file name")))
+           ((= register ?#)
+            (or (with-current-buffer (other-buffer) (buffer-file-name))
+                (user-error "No file name")))
+           ((eq register ?/)
+            (defvar evil-search-module)
+            (or (car (cond
+                      ((eq evil-search-module 'evil-search) evil-ex-search-history)
+                      (isearch-regexp regexp-search-ring)
+                      (t search-ring)))
+                (user-error "No previous regular expression")))
+           ((eq register ?:)
+            (or (car evil-ex-history) (user-error "No previous command line")))
+           ((eq register ?.) evil-last-insertion)
+           ((eq register ?-) evil-last-small-deletion)
+           ((eq register ?=)
+            (let ((enable-recursive-minibuffers t))
+              (setq evil-last-=-register-input
+                    (minibuffer-with-setup-hook
+                        (lambda ()
+                          (when evil-last-=-register-input
+                            (add-hook 'pre-command-hook #'evil-ex-remove-default nil t)))
+                      (read-from-minibuffer
+                       "="
+                       (and evil-last-=-register-input
+                            (propertize evil-last-=-register-input 'face 'shadow))
+                       evil-eval-map
+                       nil
+                       'evil-eval-history
+                       evil-last-=-register-input
+                       t)))
+              (evil--eval-expr evil-last-=-register-input)))
+           ((eq register ?_) "") ; the black hole register
+           (t (setq register (downcase register))
+              (get-register register)))
+          (user-error "Register `%c' is empty" register))
+    (error (unless noerror (signal (car err) (cdr err))))))
+
+(defun evil-append-register (register text)
+  "Append TEXT to the contents of REGISTER."
+  (let ((content (get-register register)))
+    (set-register
+     register
+     (cond
+      ((not content) text)
+      ;; if the register does not contain a string treat it as a vector
+      ((not (stringp content)) (vconcat content text))
+      ;; some non-trivial yank-handler -> always switch to line handler
+      ((or (text-property-not-all
+            0 (length content) 'yank-handler nil content)
+           (text-property-not-all
+            0 (length text) 'yank-handler nil text))
+       ;; ensure complete lines
+       (setq text
+             (concat
+              content
+              (and (> (length content) 0)
+                   (/= (aref content (1- (length content))) ?\n)
+                   "\n")
+              text
+              (and (> (length text) 0)
+                   (/= (aref text (1- (length text))) ?\n)
+                   "\n")))
+       (put-text-property 0 (length text) 'yank-handler '(evil-yank-line-handler)
+                          text)
+       text)
+      (t (concat content text))))))
+
+(defun evil-set-register (register text)
+  "Set the contents of REGISTER to TEXT.
+If REGISTER is an upper case character then TEXT is appended to that
+register instead of replacing its content."
+  (cond
+   ((not (characterp register)) (user-error "Invalid register"))
+   ;; don't allow modification of read-only registers
+   ((member register '(?: ?. ?%))
+    (user-error "Can't modify read-only register"))
+   ((eq register ?\") (kill-new text))
+   ((<= ?1 register ?9)
+    (if (null kill-ring)
+        (kill-new text)
+      (let ((kill-ring-yank-pointer kill-ring-yank-pointer)
+            interprogram-paste-function
+            interprogram-cut-function)
+        (current-kill (- register ?1))
+        (setcar kill-ring-yank-pointer text))))
+   ((eq register ?*) (evil-set-selection 'PRIMARY text))
+   ((eq register ?+) (evil-set-selection 'CLIPBOARD text))
+   ((eq register ?-) (setq evil-last-small-deletion text))
+   ((eq register ?_) nil) ; the black hole register
+   ((and (<= ?A register) (<= register ?Z))
+    (evil-append-register (downcase register) text))
+   (t (set-register register text))))
+
+(defun evil-register-list ()
+  "Return an alist of all registers, but only those named
+with number or character. Registers with symbol or string in names are ignored
+to keep Vim compatibility with register jumps."
+  (sort (append (mapcar (lambda (reg) (cons reg (evil-get-register reg t)))
+                        '(?\" ?* ?+ ?% ?# ?/ ?: ?. ?-
+                              ?1 ?2 ?3 ?4 ?5 ?6 ?7 ?8 ?9))
+                (list (cons ?= evil-last-=-register-input))
+                (cl-remove-if-not (lambda (reg) (number-or-marker-p (car reg))) register-alist)
+                nil)
+        #'car-less-than-car))
+
+(defsubst evil-kbd-macro-suppress-motion-error ()
+  "Return non-nil if a motion error should be suppressed.
+Whether the motion error should be suppressed depends on the
+variable `evil-kbd-macro-suppress-motion-error'."
+  (or (and defining-kbd-macro
+           (memq evil-kbd-macro-suppress-motion-error '(t record)))
+      (and executing-kbd-macro
+           (memq evil-kbd-macro-suppress-motion-error '(t replay)))))
+
+;;; Region
+
+;; `set-mark' does too much at once
+(defun evil-move-mark (pos)
+  "Set buffer's mark to POS.
+If POS is nil, delete the mark."
+  (set-marker (mark-marker) pos))
+
+(defun evil-save-transient-mark-mode ()
+  "Save Transient Mark mode and make it buffer-local.
+Any changes to Transient Mark mode are now local to the current
+buffer, until `evil-restore-transient-mark-mode' is called.
+
+Variables pertaining to Transient Mark mode are listed in
+`evil-transient-vars', and their values are stored in
+`evil-transient-vals'."
+  (dolist (var evil-transient-vars)
+    (when (and (boundp var)
+               (not (assq var evil-transient-vals)))
+      (push (list var (symbol-value var)
+                  (local-variable-p var))
+            evil-transient-vals)
+      (make-variable-buffer-local var)
+      (put var 'permanent-local t))))
+
+(defun evil-restore-transient-mark-mode ()
+  "Restore Transient Mark mode.
+This presupposes that `evil-save-transient-mark-mode' has been
+called earlier. If Transient Mark mode was disabled before but
+enabled in the meantime, this function disables it; if it was
+enabled before but disabled in the meantime, this function
+enables it.
+
+The earlier settings of Transient Mark mode are stored in
+`evil-transient-vals'."
+  (let (entry local var val)
+    (while (setq entry (pop evil-transient-vals))
+      (setq var (pop entry)
+            val (pop entry)
+            local (pop entry))
+      (unless local
+        (kill-local-variable var))
+      (unless (equal (symbol-value var) val)
+        (if (fboundp var)
+            (funcall var (if val 1 -1))
+          (setq var val))))))
+
+;; In theory, an active region implies Transient Mark mode, and
+;; disabling Transient Mark mode implies deactivating the region.
+;; In practice, Emacs never clears `mark-active' except in Transient
+;; Mark mode, so we define our own toggle functions to make things
+;; more predictable.
+(defun evil-transient-mark (&optional arg)
+  "Toggle Transient Mark mode.
+Ensure that the region is properly deactivated.
+Enable with positive ARG, disable with negative ARG."
+  (unless (numberp arg)
+    (setq arg (if transient-mark-mode -1 1)))
+  (cond
+   ((< arg 1)
+    (evil-active-region -1)
+    ;; Transient Mark mode cannot be disabled
+    ;; while CUA mode is enabled
+    (when (fboundp 'cua-mode)
+      (cua-mode -1))
+    (when transient-mark-mode
+      (transient-mark-mode -1)))
+   (t
+    (unless transient-mark-mode
+      (evil-active-region -1)
+      (transient-mark-mode 1)))))
+
+(defun evil-active-region (&optional arg)
+  "Toggle active region.
+Ensure that Transient Mark mode is properly enabled.
+Enable with positive ARG, disable with negative ARG."
+  (unless (numberp arg)
+    (setq arg (if (region-active-p) -1 1)))
+  (cond
+   ((and (< arg 1))
+    (when (or transient-mark-mode mark-active)
+      (setq mark-active nil
+            deactivate-mark nil)
+      (when (boundp 'cua--explicit-region-start)
+        (setq cua--explicit-region-start nil))
+      (run-hooks 'deactivate-mark-hook)))
+   (t
+    (evil-transient-mark 1)
+    (when deactivate-mark
+      (setq deactivate-mark nil))
+    (unless (mark t)
+      (evil-move-mark (point)))
+    (unless (region-active-p)
+      (set-mark (mark t)))
+    (when (boundp 'cua--explicit-region-start)
+      (setq cua--explicit-region-start t)))))
+
+(defmacro evil-with-transient-mark-mode (&rest body)
+  "Execute BODY with Transient Mark mode.
+Then restore Transient Mark mode to its previous setting."
+  (declare (indent defun)
+           (debug t))
+  `(let ((inhibit-quit t)
+         evil-transient-vals)
+     (unwind-protect
+         (progn
+           (evil-save-transient-mark-mode)
+           (evil-transient-mark 1)
+           ,@body)
+       (evil-restore-transient-mark-mode))))
+
+(defmacro evil-with-active-region (beg end &rest body)
+  "Execute BODY with an active region from BEG to END."
+  (declare (indent 2)
+           (debug t))
+  `(let ((beg ,beg) (end ,end)
+         evil-transient-vals)
+     (evil-with-transient-mark-mode
+       (save-excursion
+         (evil-active-region 1)
+         (evil-move-mark beg)
+         (goto-char end)
+         ,@body))))
+
+(defun evil-exchange-point-and-mark ()
+  "Exchange point and mark without activating the region."
+  (let* ((point (point))
+         (mark  (or (mark t) point)))
+    (set-marker (mark-marker) point)
+    (goto-char mark)))
+
+(defun evil-apply-on-block (func beg end pass-columns &rest args)
+  "Call FUNC for each line of a block selection.
+The selection is specified by the region BEG and END.  FUNC must
+take at least two arguments, the beginning and end of each
+line.  If PASS-COLUMNS is non-nil, these values are the columns,
+otherwise they are buffer positions.  Extra arguments to FUNC may
+be passed via ARGS."
+  (let (startcol startpt endcol endpt)
+    (save-excursion
+      (goto-char beg)
+      (setq startcol (current-column)
+            startpt (line-beginning-position))
+      (goto-char end)
+      (setq endcol (current-column))
+      (forward-line 1)
+      (setq endpt (point-marker))
+      ;; ensure the start column is the left one.
+      (evil-sort startcol endcol)
+      ;; maybe extend up to EOL
+      (when (and (memq last-command '(next-line previous-line evil-use-register))
+                 (eq temporary-goal-column most-positive-fixnum))
+        (goto-char startpt)
+        (while (< (point) endpt)
+          (setq endcol (max endcol (evil-column (line-end-position))))
+          (forward-line 1)))
+      ;; start looping over lines
+      (goto-char startpt)
+      (while (< (point) endpt)
+        (if pass-columns
+            (apply func startcol endcol args)
+          (apply func
+                 (save-excursion (evil-move-to-column startcol))
+                 (save-excursion (evil-move-to-column endcol t))
+                 args))
+        (forward-line 1)))))
+
+(defun evil-apply-on-rectangle (function start end &rest args)
+  "Like `apply-on-rectangle' but maybe extends to eol.
+If `temporary-goal-column' is set to a big number, then the
+region of each line is extended to the end of each line. The end
+column is set to the maximal column in all covered lines."
+  (apply #'evil-apply-on-block function start end t args))
+
+;;; Insertion
+
+(defun evil-track-last-insertion (beg end old-len)
+  "Track the last insertion range and its text.
+BEG, END and OLD-LEN are as for `after-change-functions'.
+The insertion range is stored as a pair of buffer positions in
+`evil-current-insertion'."
+  ;; For deletions left of, or insertions right of the end of the last
+  ;; insertion (with any changes in between), extend or contract the
+  ;; insertion range as appropriate. Otherwise, start a new range.
+  (if (when evil-current-insertion
+        (let ((ins-beg (car evil-current-insertion))
+              (ins-end (cdr evil-current-insertion)))
+          (and (<= ins-beg beg)
+               (or (= (+ beg old-len) ins-end)
+                   (when (evil-replace-state-p) (= beg ins-end))))))
+      ;; Ignore insertion of previous char from Backspace in Replace state
+      (unless (and (eq this-command 'evil-replace-backspace) (= old-len 0))
+        (setcdr evil-current-insertion end))
+    (setq evil-current-insertion (cons beg end))))
+(put 'evil-track-last-insertion 'permanent-local-hook t)
+
+(defun evil-start-track-last-insertion ()
+  "Start tracking the last insertion."
+  (setq evil-current-insertion nil)
+  (add-hook 'after-change-functions #'evil-track-last-insertion nil t))
+
+(defun evil-stop-track-last-insertion ()
+  "Stop tracking the last insertion.
+The tracked insertion is set to `evil-last-insertion'."
+  (setq evil-last-insertion
+        (and evil-current-insertion
+             ;; Check whether the insertion range is a valid buffer
+             ;; range.  If a buffer modification is done from within
+             ;; another change hook or modification-hook (yasnippet
+             ;; does this using overlay modification-hooks), then the
+             ;; insertion information may be invalid. There is no way
+             ;; to detect this situation, but at least we should
+             ;; ensure that no error occurs (see bug #272).
+             (>= (car evil-current-insertion) (point-min))
+             (<= (cdr evil-current-insertion) (point-max))
+             (buffer-substring-no-properties (car evil-current-insertion)
+                                             (cdr evil-current-insertion))))
+  (remove-hook 'after-change-functions #'evil-track-last-insertion t))
+
+;;; Paste
+
+(defun evil-yank-characters (beg end &optional register yank-handler)
+  "Save the characters defined by the region BEG and END in the kill-ring."
+  (let ((text (filter-buffer-substring beg end)))
+    (when yank-handler
+      (put-text-property 0 (length text) 'yank-handler (list yank-handler) text))
+    (when register
+      (evil-set-register register text))
+    (when evil-was-yanked-without-register
+      (evil-set-register ?0 text)) ; "0 register contains last yanked text
+    (unless (eq register ?_)
+      (kill-new text))))
+
+(defun evil-yank-lines (beg end &optional register yank-handler)
+  "Save the lines in the region BEG and END into the kill-ring."
+  (let ((text (filter-buffer-substring beg end))
+        (yank-handler (list (or yank-handler #'evil-yank-line-handler)
+                            nil
+                            t)))
+    ;; Ensure the text ends with a newline. This is required
+    ;; if the deleted lines were the last lines in the buffer.
+    (when (or (zerop (length text))
+              (/= (aref text (1- (length text))) ?\n))
+      (setq text (concat text "\n")))
+    (put-text-property 0 (length text) 'yank-handler yank-handler text)
+    (when register
+      (evil-set-register register text))
+    (when evil-was-yanked-without-register
+      (evil-set-register ?0 text)) ; "0 register contains last yanked text
+    (unless (eq register ?_)
+      (kill-new text))))
+
+(defun evil-yank-rectangle (beg end &optional register yank-handler)
+  "Save the rectangle defined by region BEG and END into the kill-ring."
+  (let ((lines (list nil)))
+    (evil-apply-on-rectangle #'extract-rectangle-line beg end lines)
+    ;; We remove spaces from the beginning and the end of the next.
+    ;; Spaces are inserted explicitly in the yank-handler in order to
+    ;; NOT insert lines full of spaces.
+    (setq lines (nreverse (cdr lines)))
+    ;; `text' is used as default insert text when pasting this rectangle
+    ;; in another program, e.g., using the X clipboard.
+    (let ((yank-handler (list (or yank-handler #'evil-yank-block-handler)
+                              lines
+                              t
+                              #'evil-delete-yanked-rectangle))
+          (text (mapconcat #'identity lines "\n")))
+      (put-text-property 0 (length text) 'yank-handler yank-handler text)
+      (when register
+        (evil-set-register register text))
+      (when evil-was-yanked-without-register
+        (evil-set-register ?0 text)) ; "0 register contains last yanked text
+      (unless (eq register ?_)
+        (kill-new text))
+      text)))
+
+(defun evil-remove-yank-excluded-properties (text)
+  "Remove `yank-excluded-properties' from TEXT."
+  (if (eq yank-excluded-properties t)
+      (set-text-properties 0 (length text) nil text)
+    (remove-list-of-text-properties 0 (length text)
+                                    yank-excluded-properties text)))
+
+(defun evil-yank-line-handler (text)
+  "Insert the current text linewise."
+  (let ((text (apply #'concat (make-list (or evil-paste-count 1) text)))
+        (opoint (point)))
+    (evil-remove-yank-excluded-properties text)
+    (cond
+     ((eq this-command 'evil-paste-before)
+      (evil-move-beginning-of-line)
+      (let ((beg (point)))
+        (insert text)
+        (setq evil-last-paste
+              (list 'evil-paste-before evil-paste-count opoint beg (point)))
+        (evil-set-marker ?\[ beg)
+        (evil-set-marker ?\] (1- (point)))
+        (goto-char beg))
+      (back-to-indentation))
+     ((eq this-command 'evil-paste-after)
+      (evil-move-end-of-line)
+      (let ((beg (point)))
+        (insert "\n")
+        (insert text)
+        (delete-char -1) ; delete the last newline
+        (setq evil-last-paste
+              (list 'evil-paste-after evil-paste-count opoint beg (point)))
+        (evil-set-marker ?\[ (1+ beg))
+        (evil-set-marker ?\] (point))
+        (unless evil--cursor-after
+          (goto-char (1+ beg))))
+      (back-to-indentation))
+     (t (insert text)))))
+
+(defun evil-yank-block-handler (lines)
+  "Insert the current text as block."
+  (let* ((count (or evil-paste-count 1))
+         shifted-forward
+         (col (if (and (eq this-command 'evil-paste-after)
+                       (not (and (bolp) (eolp)))
+                       (setq shifted-forward t))
+                  (1+ (current-column))
+                (current-column)))
+         (opoint (point))
+         (first t))
+    (dolist (line lines)
+      ;; maybe we have to insert a new line at eob
+      (if first
+          (setq first nil)
+        (when (or (> (forward-line 1) 0)
+                  (and (eobp) (not (bolp))))
+          (insert "\n")))
+      ;; concat multiple copies according to count
+      (setq line (apply #'concat (make-list count line)))
+      ;; trim whitespace at beginning and end
+      (string-match "\\` *\\(.*?\\) *\\'" line)
+      (let ((text (match-string 1 line))
+            (begextra (match-beginning 1))
+            (endextra (- (match-end 0) (match-end 1))))
+        ;; insert text unless we insert an empty line behind eol
+        (unless (and (< (evil-column (line-end-position)) col)
+                     (string= text ""))
+          ;; if we paste behind eol, it may be sufficient to insert tabs
+          (if (< (evil-column (line-end-position)) col)
+              (move-to-column (+ col begextra) t)
+            (move-to-column col t)
+            (insert (make-string begextra ?\s)))
+          (evil-remove-yank-excluded-properties text)
+          (insert text)
+          (unless (eolp)
+            ;; text follows, so we have to insert spaces
+            (insert (make-string endextra ?\s))))))
+    (setq evil-last-paste
+          (list this-command
+                evil-paste-count
+                opoint
+                (length lines)                   ; number of rows
+                (* count (length (car lines))))) ; number of columns
+    (evil-set-marker ?\[ opoint)
+    (evil-set-marker ?\] (1- (point)))
+    (if evil--cursor-after
+        (backward-char)
+      (goto-char opoint)
+      (when shifted-forward (forward-char)))))
+
+(defun evil-delete-yanked-rectangle (nrows ncols)
+  "Special function to delete the block yanked by a previous paste command.
+Supplied as the `undo' element of a yank handler."
+  (let ((opoint (point))
+        (col (if (eq last-command 'evil-paste-after)
+                 (1+ (current-column))
+               (current-column))))
+    (dotimes (_ nrows)
+      (delete-region (save-excursion
+                       (move-to-column col)
+                       (point))
+                     (save-excursion
+                       (move-to-column (+ col ncols))
+                       (point)))
+      (unless (eobp) (forward-line)))
+    (goto-char opoint)))
+
+;; TODO: if undoing is disabled in the current buffer, paste-pop won't
+;; work. Although this is probably not a big problem, because usually
+;; buffers where `evil-paste-pop' may be useful have undoing enabled.
+;; A solution would be to temporarily enable undo when pasting and
+;; store the undo information in a special variable that does not
+;; interfere with `buffer-undo-list'.
+(defun evil-paste-pop (count)
+  "Replace the just-yanked stretch of killed text with a different stretch.
+This command is allowed only immediatly after a `yank',
+`evil-paste-before', `evil-paste-after' or `evil-paste-pop'.
+This command uses the same paste command as before, i.e., when
+used after `evil-paste-after' the new text is also yanked using
+`evil-paste-after', used with the same paste-count argument.
+
+The COUNT argument inserts the COUNTth previous kill.  If COUNT
+is negative this is a more recent kill."
+  (interactive "p")
+  (unless (memq last-command
+                '(evil-paste-after
+                  evil-paste-before
+                  evil-visual-paste))
+    (user-error "Previous command was not an evil-paste: %s" last-command))
+  (unless evil-last-paste
+    (user-error "Previous paste command used a register"))
+  (evil-undo-pop)
+  (goto-char (nth 2 evil-last-paste))
+  (setq this-command (nth 0 evil-last-paste))
+  ;; use temporary kill-ring, so the paste cannot modify it
+  (let ((kill-ring (list (current-kill
+                          (if (and (> count 0) (nth 5 evil-last-paste))
+                              ;; if was visual paste then skip the
+                              ;; text that has been replaced
+                              (1+ count)
+                            count))))
+        (kill-ring-yank-pointer kill-ring))
+    (when (eq last-command 'evil-visual-paste)
+      (let ((evil-no-display t))
+        (evil-visual-restore)))
+    (funcall (nth 0 evil-last-paste) (nth 1 evil-last-paste))
+    ;; if this was a visual paste, then mark the last paste as NOT
+    ;; being the first visual paste
+    (when (eq last-command 'evil-visual-paste)
+      (setcdr (nthcdr 4 evil-last-paste) nil))))
+
+(defun evil-paste-pop-next (count)
+  "Same as `evil-paste-pop' but with negative argument."
+  (interactive "p")
+  (evil-paste-pop (- count)))
+
+;;; Interactive forms
+
+(defun evil-match-interactive-code (interactive &optional pos)
+  "Match an interactive code at position POS in string INTERACTIVE.
+Return the first matching entry in `evil-interactive-alist', or nil."
+  (unless pos (setq pos 0))
+  (cl-loop
+   with len = (length interactive) for entry in evil-interactive-alist thereis
+   (let* ((string (car entry))
+          (end (+ pos (length string))))
+     (and (<= end len)
+          (eq (compare-strings string nil nil interactive pos end) t)
+          entry))))
+
+(defun evil-concatenate-interactive-forms (&rest forms)
+  "Concatenate interactive list expressions FORMS.
+Return a single expression where successive expressions
+are joined, if possible."
+  (let (result)
+    (when forms
+      (while (cdr forms)
+        (cond
+         ((null (car forms))
+          (pop forms))
+         ((and (eq (car (car forms)) 'list)
+               (eq (car (cadr forms)) 'list))
+          (setq forms (cons (append (car forms)
+                                    (cdr (cadr forms)))
+                            (cdr (cdr forms)))))
+         (t (push (pop forms) result))))
+      (when (car forms)
+        (push (pop forms) result))
+      (setq result (nreverse result))
+      (cond
+       ((null result))
+       ((null (cdr result)) (car result))
+       (t `(append ,@result))))))
+
+(defun evil-interactive-string (string)
+  "Evaluate the interactive string STRING.
+The string may contain extended interactive syntax.
+The return value is a cons cell (FORM . PROPERTIES),
+where FORM is a single list-expression to be passed to
+a standard `interactive' statement, and PROPERTIES is a
+list of command properties as passed to `evil-define-command'."
+  (let ((len (length string))
+        (pos 0)
+        forms properties)
+    (while (< pos len)
+      (if (eq (aref string pos) ?\n)
+          (setq pos (1+ pos))
+        (cl-destructuring-bind (code expr . plist)
+            (or (evil-match-interactive-code string pos)
+                (user-error "Unknown interactive code: `%s'"
+                            (substring string pos)))
+          (setq pos (+ pos (length code)))
+          (when (functionp expr)
+            (let ((prompt (substring
+                           string pos
+                           (or (string-match-p "\n" string pos) len))))
+              (setq pos (+ pos (length prompt))
+                    expr `(funcall ,expr ,prompt))))
+          (setq forms (append forms (list expr))
+                properties (append properties plist)))))
+    (cons `(append ,@forms) properties)))
+
+(defun evil-interactive-form (&rest args)
+  "Evaluate interactive forms ARGS.
+The return value is a cons cell (FORM . PROPERTIES),
+where FORM is a single list-expression to be passed to
+a standard `interactive' statement, and PROPERTIES is a
+list of command properties as passed to `evil-define-command'."
+  (let (forms properties)
+    (dolist (arg args)
+      (if (not (stringp arg))
+          (setq forms (append forms (list arg)))
+        (setq arg (evil-interactive-string arg)
+              forms (append forms (cdr (car arg)))
+              properties (append properties (cdr arg)))))
+    (cons (apply #'evil-concatenate-interactive-forms forms)
+          properties)))
+
+;;; Types
+
+(defun evil-type (object &optional default)
+  "Return the type of OBJECT, or DEFAULT if none."
+  (let (type)
+    (cond
+     ((overlayp object)
+      (setq type (overlay-get object :type)))
+     ((evil-range-p object)
+      (setq type (nth 2 object)))
+     ((listp object)
+      (setq type (plist-get object :type)))
+     ((commandp object)
+      (setq type (evil-get-command-property object :type)))
+     ((symbolp object)
+      (setq type (get object 'type))))
+    (setq type (or type default))
+    (and (evil-type-p type) type)))
+
+(defun evil-set-type (object type)
+  "Set the type of OBJECT to TYPE.
+For example, (evil-set-type \\='next-line \\='line)
+will make `line' the type of the `next-line' command."
+  (cond
+   ((overlayp object)
+    (overlay-put object :type type))
+   ((evil-range-p object)
+    (evil-set-range-type object type))
+   ((listp object)
+    (plist-put object :type type))
+   ((commandp object)
+    (evil-set-command-property object :type type))
+   ((symbolp object)
+    (put object 'type type)))
+  object)
+
+(defun evil-type-property (type prop)
+  "Return property PROP for TYPE."
+  (plist-get (cdr (assq type evil-type-properties)) prop))
+
+(defun evil-type-p (sym)
+  "Whether SYM is the name of a type."
+  (assq sym evil-type-properties))
+
+(defun evil-expand (beg end type &rest properties)
+  "Expand BEG and END as TYPE with PROPERTIES.
+Return a list (BEG END TYPE PROPERTIES ...), where the tail
+may contain a property list."
+  (apply #'evil-transform
+         ;; don't expand if already expanded
+         (unless (plist-get properties :expanded) :expand)
+         beg end type properties))
+
+(defun evil-contract (beg end type &rest properties)
+  "Contract BEG and END as TYPE with PROPERTIES.
+Return a list (BEG END TYPE PROPERTIES ...), where the tail
+may contain a property list."
+  (apply #'evil-transform :contract beg end type properties))
+
+(defun evil-normalize (beg end type &rest properties)
+  "Normalize BEG and END as TYPE with PROPERTIES.
+Return a list (BEG END TYPE PROPERTIES ...), where the tail
+may contain a property list."
+  (apply #'evil-transform :normalize beg end type properties))
+
+(defun evil-transform (transform beg end type &rest properties)
+  "Apply TRANSFORM on BEG and END with PROPERTIES.
+Return a list (BEG END TYPE PROPERTIES ...), where the tail
+may contain a property list. If TRANSFORM is undefined,
+return positions unchanged."
+  (let* ((type (or type (evil-type properties)))
+         (transform (when (and type transform)
+                      (evil-type-property type transform))))
+    (if transform
+        (apply transform beg end properties)
+      (apply #'evil-range beg end type properties))))
+
+(defun evil-describe (beg end type &rest properties)
+  "Return description of BEG and END with PROPERTIES.
+If no description is available, return the empty string."
+  (let* ((type (or type (evil-type properties)))
+         (properties (plist-put properties :type type))
+         (describe (evil-type-property type :string)))
+    (or (when describe
+          (apply describe beg end properties))
+        "")))
+
+;;; Ranges
+
+(defun evil-range (beg end &optional type &rest properties)
+  "Return a list (BEG END [TYPE] PROPERTIES...).
+BEG and END are buffer positions (numbers or markers),
+TYPE is a type as per `evil-type-p', and PROPERTIES is
+a property list."
+  (let ((beg (evil-normalize-position beg))
+        (end (evil-normalize-position end)))
+    (when (and (numberp beg) (numberp end))
+      (evil-sort beg end)
+      (nconc (list beg end)
+             (when (evil-type-p type) (list type))
+             properties))))
+
+(defun evil-range-p (object)
+  "Whether OBJECT is a range."
+  (and (listp object)
+       (numberp (nth 0 object))
+       (numberp (nth 1 object))))
+
+(defun evil-range-beginning (range)
+  "Return beginning of RANGE."
+  (when (evil-range-p range)
+    (let ((beg (evil-normalize-position (nth 0 range)))
+          (end (evil-normalize-position (nth 1 range))))
+      (min beg end))))
+
+(defun evil-range-end (range)
+  "Return end of RANGE."
+  (when (evil-range-p range)
+    (let ((beg (evil-normalize-position (nth 0 range)))
+          (end (evil-normalize-position (nth 1 range))))
+      (max beg end))))
+
+(defun evil-range-properties (range)
+  "Return properties of RANGE."
+  (when (evil-range-p range)
+    (nthcdr (if (evil-type range) 3 2) range)))
+
+(defalias 'evil-copy-range #'copy-sequence
+  "Return a copy of RANGE.")
+
+(defun evil-set-range (range &optional beg end type &rest properties)
+  "Set RANGE to have beginning BEG and end END.
+The TYPE and additional PROPERTIES may also be specified.
+If an argument is nil, it's not used; the previous value is retained.
+See also `evil-set-range-beginning', `evil-set-range-end',
+`evil-set-range-type' and `evil-set-range-properties'."
+  (when (evil-range-p range)
+    (let ((beg (or (evil-normalize-position beg)
+                   (evil-range-beginning range)))
+          (end (or (evil-normalize-position end)
+                   (evil-range-end range)))
+          (type (or type (evil-type range)))
+          (plist (evil-range-properties range)))
+      (evil-sort beg end)
+      (setq plist (evil-concat-plists plist properties))
+      (evil-set-range-beginning range beg)
+      (evil-set-range-end range end)
+      (evil-set-range-type range type)
+      (evil-set-range-properties range plist)
+      range)))
+
+(defun evil-set-range-beginning (range beg &optional copy)
+  "Set RANGE's beginning to BEG.
+If COPY is non-nil, return a copy of RANGE."
+  (when copy
+    (setq range (evil-copy-range range)))
+  (setcar range beg)
+  range)
+
+(defun evil-set-range-end (range end &optional copy)
+  "Set RANGE's end to END.
+If COPY is non-nil, return a copy of RANGE."
+  (when copy
+    (setq range (evil-copy-range range)))
+  (setcar (cdr range) end)
+  range)
+
+(defun evil-set-range-type (range type &optional copy)
+  "Set RANGE's type to TYPE.
+If COPY is non-nil, return a copy of RANGE."
+  (when copy
+    (setq range (evil-copy-range range)))
+  (if type
+      (setcdr (cdr range)
+              (cons type (evil-range-properties range)))
+    (setcdr (cdr range) (evil-range-properties range)))
+  range)
+
+(defun evil-set-range-properties (range properties &optional copy)
+  "Set RANGE's properties to PROPERTIES.
+If COPY is non-nil, return a copy of RANGE."
+  (when copy
+    (setq range (evil-copy-range range)))
+  (setcdr (if (evil-type range) (cddr range) (cdr range)) properties)
+  range)
+
+(defun evil-range-union (range1 range2 &optional type)
+  "Return the union of the ranges RANGE1 and RANGE2.
+If the ranges have conflicting types, use RANGE1's type.
+This can be overridden with TYPE."
+  (when (and (evil-range-p range1)
+             (evil-range-p range2))
+    (evil-range (min (evil-range-beginning range1)
+                     (evil-range-beginning range2))
+                (max (evil-range-end range1)
+                     (evil-range-end range2))
+                (or type
+                    (evil-type range1)
+                    (evil-type range2)))))
+
+(defun evil-subrange-p (range1 range2)
+  "Whether RANGE1 is contained within RANGE2."
+  (and (evil-range-p range1)
+       (evil-range-p range2)
+       (<= (evil-range-beginning range2)
+           (evil-range-beginning range1))
+       (>= (evil-range-end range2)
+           (evil-range-end range1))))
+
+(defun evil-select-inner-object (thing beg end type &optional count line)
+  "Return an inner text object range of COUNT objects.
+If COUNT is positive, return objects following point; if COUNT is
+negative, return objects preceding point.  If one is unspecified,
+the other is used with a negative argument.  THING is a symbol
+understood by `thing-at-point'.  BEG, END and TYPE specify the
+current selection.  If LINE is non-nil, the text object should be
+linewise, otherwise it is character wise."
+  (let* ((count (or count 1))
+         (bnd (or (let ((b (bounds-of-thing-at-point thing)))
+                    (and b (< (point) (cdr b)) b))
+                  (evil-bounds-of-not-thing-at-point thing)
+                  (cons (point-min) (point-max)))))
+    ;; check if current object is selected
+    (when (or (not beg) (not end)
+              (> beg (car bnd))
+              (< end (cdr bnd))
+              (and (eq type 'inclusive)
+                   (= (1+ beg) end))) ; empty region does not count
+      (when (or (not beg) (< (car bnd) beg)) (setq beg (car bnd)))
+      (when (or (not end) (> (cdr bnd) end)) (setq end (cdr bnd)))
+      (setq count (if (> count 0) (1- count) (1+ count))))
+    (goto-char (if (< count 0) beg end))
+    (evil-forward-nearest count
+                          #'(lambda (cnt) (forward-thing thing cnt))
+                          #'(lambda (cnt) (evil-forward-not-thing thing cnt)))
+    (evil-range (if (>= count 0) beg (point))
+                (if (< count 0) end (point))
+                (if line 'line type)
+                :expanded t)))
+
+(defun evil-select-inner-restricted-object (thing beg end type &optional count line)
+  "Return an inner text object range of COUNT objects.
+Selection is restricted to the current line, unless it is empty.
+If COUNT is positive, return objects following point; if COUNT is
+negative, return objects preceding point.  If one is unspecified,
+the other is used with a negative argument.  THING is a symbol
+understood by `thing-at-point'.  BEG, END and TYPE specify the
+current selection.  If LINE is non-nil, the text object should be
+linewise, otherwise it is character wise."
+  (save-restriction
+    (let ((start (line-beginning-position))
+          (end (line-end-position)))
+      (unless (= start end)
+        (narrow-to-region start end)))
+    (evil-select-inner-object thing beg end type count line)))
+
+(defun evil-select-an-object (thing beg end type count &optional line)
+  "Return an outer text object range of COUNT objects.
+If COUNT is positive, return objects following point; if COUNT is
+negative, return objects preceding point.  If one is unspecified,
+the other is used with a negative argument.  THING is a symbol
+understood by thing-at-point.  BEG, END and TYPE specify the
+current selection.  If LINE is non-nil, the text object should be
+linewise, otherwise it is character wise."
+  (let* ((dir (if (> (or count 1) 0) +1 -1))
+         (count (abs (or count 1)))
+         (objbnd (let ((b (bounds-of-thing-at-point thing)))
+                   (and b (< (point) (cdr b)) b)))
+         (bnd (or objbnd
+                  (evil-bounds-of-not-thing-at-point thing)
+                  (cons (point-min) (point-max))))
+         addcurrent other)
+    ;; check if current object is not selected
+    (when (or (not beg) (not end)
+              (> beg (car bnd))
+              (< end (cdr bnd))
+              (and (eq type 'inclusive)
+                   (= (1+ beg) end))) ; empty region does not count
+      ;; if not, enlarge selection
+      (when (or (not beg) (< (car bnd) beg)) (setq beg (car bnd)))
+      (when (or (not end) (> (cdr bnd) end)) (setq end (cdr bnd)))
+      (if objbnd (setq addcurrent t)))
+    ;; make other and (point) reflect the selection
+    (cond
+     ((> dir 0) (goto-char end) (setq other beg))
+     (t (goto-char beg) (setq other end)))
+    (cond
+     ;; do nothing more than only current is selected
+     ((not (and (= beg (car bnd)) (= end (cdr bnd)))))
+     ;; current match is thing, add whitespace
+     (objbnd
+      (let ((wsend (evil-with-restriction
+                       ;; restrict to current line if we do non-line selection
+                       (unless line (line-beginning-position))
+                       (unless line (line-end-position))
+                     (evil-bounds-of-not-thing-at-point thing dir))))
+        (cond
+         (wsend
+          ;; add whitespace at end
+          (goto-char wsend)
+          (setq addcurrent t))
+         (t
+          ;; no whitespace at end, try beginning
+          (save-excursion
+            (goto-char other)
+            (setq wsend
+                  (evil-with-restriction
+                      ;; restrict to current line if we do non-line selection
+                      (unless line
+                        (if (member thing '(evil-word evil-WORD))
+                            (save-excursion (back-to-indentation) (point))
+                          (line-beginning-position)))
+                      (unless line (line-end-position))
+                    (evil-bounds-of-not-thing-at-point thing (- dir))))
+            (when wsend (setq other wsend addcurrent t)))))))
+     ;; current match is whitespace, add thing
+     (t
+      (forward-thing thing dir)
+      (setq addcurrent t)))
+    ;; possibly count current object as selection
+    (if addcurrent (setq count (1- count)))
+    ;; move
+    (dotimes (_ count)
+      (let ((wsend (evil-bounds-of-not-thing-at-point thing dir)))
+        (if (and wsend (/= wsend (point)))
+            ;; start with whitespace
+            (forward-thing thing dir)
+          ;; start with thing
+          (forward-thing thing dir)
+          (setq wsend (evil-bounds-of-not-thing-at-point thing dir))
+          (when wsend (goto-char wsend)))))
+    ;; return range
+    (evil-range (if (> dir 0) other (point))
+                (if (< dir 0) other (point))
+                (if line 'line type)
+                :expanded t)))
+
+(defun evil-select-a-restricted-object (thing beg end type &optional count line)
+  "Return an outer text object range of COUNT objects.
+Selection is restricted to the current line, unless it is empty.
+If COUNT is positive, return objects following point; if COUNT is
+negative, return objects preceding point.  If one is unspecified,
+the other is used with a negative argument.  THING is a symbol
+understood by thing-at-point.  BEG, END and TYPE specify the
+current selection.  If LINE is non-nil, the text object should be
+linewise, otherwise it is character wise."
+  (save-restriction
+    (let ((start (line-beginning-position))
+          (end (line-end-position)))
+      (when (/= start end)
+        (narrow-to-region start end)))
+    (evil-select-an-object thing beg end type count line)))
+
+(defun evil--get-block-range (op cl selection-type)
+  "Return the exclusive range of a visual selection.
+OP and CL are pairs of buffer positions for the opening and
+closing delimiter of a range. SELECTION-TYPE is the desired type
+of selection.  It is a symbol that determines which parts of the
+block are selected.  If it is `inclusive' or t the returned range
+is \(cons (car OP) (cdr CL)). If it is `exclusive' or nil the
+returned range is (cons (cdr OP) (car CL)).  If it is
+`exclusive-line' the returned range will skip whitespace at the
+end of the line of OP and at the beginning of the line of CL."
+  (cond
+   ((memq selection-type '(inclusive t)) (cons (car op) (cdr cl)))
+   ((memq selection-type '(exclusive nil)) (cons (cdr op) (car cl)))
+   ((eq selection-type 'exclusive-line)
+    (let ((beg (cdr op))
+          (end (car cl)))
+      (save-excursion
+        (goto-char beg)
+        (when (and (eolp) (not (eobp)))
+          (setq beg (line-beginning-position 2)))
+        (goto-char end)
+        (skip-chars-backward " \t")
+        (when (bolp)
+          (setq end (point))
+          (goto-char beg)
+          (when (and (not (bolp)) (< beg end))
+            (setq end (1- end)))))
+      (cons beg end)))
+   (t (user-error "Unknown selection-type `%s'" selection-type))))
+
+(defun evil-select-block (thing beg end type count
+                                &optional
+                                selection-type
+                                countcurrent
+                                fixedscan)
+  "Return a range (BEG END) of COUNT delimited text objects.
+BEG END TYPE are the currently selected (visual) range.  The
+delimited object must be given by THING-up function (see
+`evil-up-block').
+
+SELECTION-TYPE is symbol that determines which parts of the block
+are selected.  If it is `inclusive' or t OPEN and CLOSE are
+included in the range. If it is `exclusive' or nil the delimiters
+are not contained. If it is `exclusive-line' the delimiters are
+not included as well as adjacent whitespace until the beginning
+of the next line or the end of the previous line. If the
+resulting selection consists of complete lines only and visual
+state is not active, the returned selection is linewise.
+
+If COUNTCURRENT is non-nil an objected is counted if the current
+selection matches that object exactly.
+
+Usually scanning for the surrounding block starts at (1+ beg)
+and (1- end). If this might fail due to the behavior of THING
+then FIXEDSCAN can be set to t. In this case the scan starts at
+BEG and END. One example where this might fail is if BEG and END
+are the delimiters of a string or comment."
+  (save-excursion
+    (save-match-data
+      (let* ((orig-beg beg)
+             (orig-end end)
+             (beg (or beg (point)))
+             (end (or end (point)))
+             (count (abs (or count 1)))
+             op cl op-end cl-end)
+        ;; We always assume at least one selected character.
+        (if (= beg end) (setq end (1+ end)))
+        ;; We scan twice: starting at (1+ beg) forward and at (1- end)
+        ;; backward. The resulting selection is the smaller one.
+        (goto-char (if fixedscan beg (1+ beg)))
+        (when (and (zerop (funcall thing +1)) (match-beginning 0))
+          (setq cl (cons (match-beginning 0) (match-end 0)))
+          (goto-char (car cl))
+          (when (and (zerop (funcall thing -1)) (match-beginning 0))
+            (setq op (cons (match-beginning 0) (match-end 0)))))
+        ;; start scanning from end
+        (goto-char (if fixedscan end (1- end)))
+        (when (and (zerop (funcall thing -1)) (match-beginning 0))
+          (setq op-end (cons (match-beginning 0) (match-end 0)))
+          (goto-char (cdr op-end))
+          (when (and (zerop (funcall thing +1)) (match-beginning 0))
+            (setq cl-end (cons (match-beginning 0) (match-end 0)))))
+        ;; Bug #607: use the tightest selection that contains the
+        ;; original selection. If non selection contains the original,
+        ;; use the larger one.
+        (cond
+         ((and (not op) (not cl-end))
+          (error "No surrounding delimiters found"))
+         ((or (not op) ; first not found
+              (and cl-end ; second found
+                   (>= (car op-end) (car op)) ; second smaller
+                   (<= (cdr cl-end) (cdr cl))
+                   (<= (car op-end) beg)      ; second contains orig
+                   (>= (cdr cl-end) end)))
+          (setq op op-end cl cl-end)))
+        (setq op-end op cl-end cl) ; store copy
+        ;; if the current selection contains the surrounding
+        ;; delimiters, they do not count as new selection
+        (let ((cnt (if (and orig-beg orig-end (not countcurrent))
+                       (let ((sel (evil--get-block-range op cl selection-type)))
+                         (if (and (<= orig-beg (car sel))
+                                  (>= orig-end (cdr sel)))
+                             count
+                           (1- count)))
+                     (1- count))))
+          ;; starting from the innermost surrounding delimiters
+          ;; increase selection
+          (when (> cnt 0)
+            (setq op (progn
+                       (goto-char (car op-end))
+                       (funcall thing (- cnt))
+                       (if (match-beginning 0)
+                           (cons (match-beginning 0) (match-end 0))
+                         op))
+                  cl (progn
+                       (goto-char (cdr cl-end))
+                       (funcall thing cnt)
+                       (if (match-beginning 0)
+                           (cons (match-beginning 0) (match-end 0))
+                         cl)))))
+        (let ((sel (evil--get-block-range op cl selection-type)))
+          (setq op (car sel)
+                cl (cdr sel)))
+        (cond
+         ((and (equal op orig-beg) (equal cl orig-end)
+               (or (not countcurrent) (/= count 1)))
+          (error "No surrounding delimiters found"))
+         ((save-excursion
+            (and (not (evil-visual-state-p))
+                 (eq type 'inclusive)
+                 (progn (goto-char op) (bolp))
+                 (progn (goto-char cl) (bolp))))
+          (evil-range op cl 'line :expanded t))
+         (t (evil-range op cl type :expanded t)))))))
+
+(defun evil-select-paren (open close beg end type count &optional inclusive)
+  "Return a range (BEG END) of COUNT delimited text objects.
+OPEN and CLOSE specify the opening and closing delimiter,
+respectively. BEG END TYPE are the currently selected (visual)
+range.  If INCLUSIVE is non-nil, OPEN and CLOSE are included in
+the range; otherwise they are excluded.
+
+If you aren't inside a pair of the opening and closing delimiters,
+it jumps you inside the next one. If there isn't one, it errors.
+
+The types of OPEN and CLOSE specify which kind of THING is used
+for parsing with `evil-select-block'. If OPEN and CLOSE are
+characters `evil-up-paren' is used. Otherwise OPEN and CLOSE
+must be regular expressions and `evil-up-block' is used.
+
+If the selection is exclusive, whitespace at the end or at the
+beginning of the selection until the end-of-line or beginning-of-line
+is ignored."
+  (condition-case nil
+      (progn
+        ;; we need special linewise exclusive selection
+        (unless inclusive (setq inclusive 'exclusive-line))
+        (cond
+         ((and (characterp open) (characterp close))
+          (let ((thing #'(lambda (&optional cnt)
+                           (evil-up-paren open close cnt)))
+                (bnd (or (bounds-of-thing-at-point 'evil-string)
+                         (bounds-of-thing-at-point 'evil-comment)
+                         ;; If point is at the opening quote of a string,
+                         ;; this must be handled as if point is within the
+                         ;; string, i.e. the selection must be extended
+                         ;; around the string. Otherwise
+                         ;; `evil-select-block' might do the wrong thing
+                         ;; because it accidentally moves point inside the
+                         ;; string (for inclusive selection) when looking
+                         ;; for the current surrounding block. (re #364)
+                         (and (= (point) (or beg (point)))
+                              (save-excursion
+                                (goto-char (1+ (or beg (point))))
+                                (or (bounds-of-thing-at-point 'evil-string)
+                                    (bounds-of-thing-at-point 'evil-comment)))))))
+            (if (not bnd)
+                (evil-select-block thing beg end type count inclusive)
+              (or (evil-with-restriction (car bnd) (cdr bnd)
+                    (ignore-errors
+                      (evil-select-block thing beg end type count inclusive)))
+                  (save-excursion
+                    (setq beg (or beg (point))
+                          end (or end (point)))
+                    (goto-char (car bnd))
+                    (let ((extbeg (min beg (car bnd)))
+                          (extend (max end (cdr bnd))))
+                      (evil-select-block thing
+                                         extbeg extend
+                                         type
+                                         count
+                                         inclusive
+                                         (or (< extbeg beg) (> extend end))
+                                         t)))))))
+         (t
+          (evil-select-block #'(lambda (&optional cnt)
+                                 (evil-up-block open close cnt))
+                             beg end type count inclusive))))
+    (error ; we aren't in the parens, so find next instance
+     (save-match-data
+       (goto-char (or (if (and count (> 0 count)) end beg)
+                      (point)))
+       (let ((re (if (characterp open) (regexp-quote (string open)) open)))
+         (if (and (not (looking-at-p re))
+                  (re-search-forward re nil t count))
+             (progn
+               (goto-char (match-beginning 0))
+               (let* ((mbeg (match-beginning 0))
+                      (res (evil-select-paren open close mbeg mbeg
+                                              type nil inclusive)))
+                 (if (< (car res) mbeg)
+                     ;; this will error if the beginning of the found parens is before the target paren
+                     ;; this prevents things such as on the line `prova ( verder "((testo)")`,
+                     ;; the inputs `g2ci(` from putting your cursor inside the deleted `()` after `prova`
+                     ;; without this, it would go to the second paren (the unbalanced first paren inside the quotes)
+                     ;; and then do a change there, changing inside the whole paren after `prova`
+                     (error "No surrounding delimiters found")
+                   res)))
+           (error "No surrounding delimiters found")))))))
+
+(defun evil-select-quote-thing (thing beg end _type count &optional inclusive)
+  "Selection THING as if it described a quoted object.
+THING is typically either `evil-quote' or `evil-chars'. This
+function is called from `evil-select-quote'."
+  (save-excursion
+    (let* ((count (or count 1))
+           (dir (if (> count 0) 1 -1))
+           (bnd (let ((b (bounds-of-thing-at-point thing)))
+                  (and b (< (point) (cdr b)) b)))
+           addcurrent
+           wsboth)
+      (if inclusive (setq inclusive t)
+        (when (= (abs count) 2)
+          (setq count dir)
+          (setq inclusive 'quote-only))
+        ;; never extend with exclusive selection
+        (setq beg nil end nil))
+      ;; check if the previously selected range does not contain a
+      ;; string
+      (unless (and beg end
+                   (save-excursion
+                     (goto-char (if (> dir 0) beg end))
+                     (forward-thing thing dir)
+                     (and (<= beg (point)) (< (point) end))))
+        ;; if so forget the range
+        (setq beg nil end nil))
+      ;; check if there is a current object, if not fetch one
+      (when (not bnd)
+        (unless (and (zerop (forward-thing thing dir))
+                     (setq bnd (bounds-of-thing-at-point thing)))
+          (error "No quoted string found"))
+        (if (> dir 0)
+            (setq end (point))
+          (setq beg (point)))
+        (setq addcurrent t))
+      ;; check if current object is not selected
+      (when (or (not beg) (not end) (> beg (car bnd)) (< end (cdr bnd)))
+        ;; if not, enlarge selection
+        (when (or (not beg) (< (car bnd) beg)) (setq beg (car bnd)))
+        (when (or (not end) (> (cdr bnd) end)) (setq end (cdr bnd)))
+        (setq addcurrent t wsboth t))
+      ;; maybe count current element
+      (when addcurrent
+        (setq count (if (> dir 0) (1- count) (1+ count))))
+      ;; enlarge selection
+      (goto-char (if (> dir 0) end beg))
+      (when (and (not addcurrent)
+                 (= count (forward-thing thing count)))
+        (error "No quoted string found"))
+      (if (> dir 0) (setq end (point)) (setq beg (point)))
+      ;; add whitespace
+      (cond
+       ((not inclusive) (setq beg (1+ beg) end (1- end)))
+       ((not (eq inclusive 'quote-only))
+        ;; try to add whitespace in forward direction
+        (goto-char (if (> dir 0) end beg))
+        (if (setq bnd (bounds-of-thing-at-point 'evil-space))
+            (if (> dir 0) (setq end (cdr bnd)) (setq beg (car bnd)))
+          ;; if not found try backward direction
+          (goto-char (if (> dir 0) beg end))
+          (if (and wsboth (setq bnd (bounds-of-thing-at-point 'evil-space)))
+              (if (> dir 0) (setq beg (car bnd)) (setq end (cdr bnd)))))))
+      (evil-range beg end
+                  ;; HACK: fixes #583
+                  ;; When not in visual state, an empty range is
+                  ;; possible. However, this cannot be achieved with
+                  ;; inclusive ranges, hence we use exclusive ranges
+                  ;; in this case. In visual state the range must be
+                  ;; inclusive because otherwise the selection would
+                  ;; be wrong.
+                  (if (evil-visual-state-p) 'inclusive 'exclusive)
+                  :expanded t))))
+
+(defun evil-select-quote (quote beg end type count &optional inclusive)
+  "Return a range (BEG END) of COUNT quoted text objects.
+QUOTE specifies the quotation delimiter. BEG END TYPE are the
+currently selected (visual) range.
+
+If INCLUSIVE is nil the previous selection is ignore. If there is
+quoted string at point this object will be selected, otherwise
+the following (if (> COUNT 0)) or preceeding object (if (< COUNT
+0)) is selected. If (/= (abs COUNT) 2) the delimiting quotes are not
+contained in the range, otherwise they are contained in the range.
+
+If INCLUSIVE is non-nil the selection depends on the previous
+selection. If the currently selection contains at least one
+character that is contained in a quoted string then the selection
+is extended, otherwise it is thrown away. If there is a
+non-selected object at point then this object is added to the
+selection. Otherwise the selection is extended to the
+following (if (> COUNT 0)) or preceeding object (if (< COUNT
+0)). Any whitespace following (or preceeding if (< COUNT 0)) the
+new selection is added to the selection. If no such whitespace
+exists and the selection contains only one quoted string then the
+preceeding (or following) whitespace is added to the range. "
+  (let ((evil-forward-quote-char quote))
+    (or (let ((bnd (or (bounds-of-thing-at-point 'evil-comment)
+                       (bounds-of-thing-at-point 'evil-string))))
+          (when (and bnd (< (point) (cdr bnd))
+                     (/= (char-after (car bnd)) quote)
+                     (/= (char-before (cdr bnd)) quote))
+            (evil-with-restriction (car bnd) (cdr bnd)
+              (ignore-errors (evil-select-quote-thing
+                              'evil-quote-simple
+                              beg end type
+                              count
+                              inclusive)))))
+        (let ((evil-forward-quote-char quote))
+          (evil-select-quote-thing 'evil-quote
+                                   beg end type
+                                   count
+                                   inclusive)))))
+
+(defun evil-select-xml-tag (beg end type &optional count inclusive)
+  "Return a range (BEG END) of COUNT matching XML tags.
+If INCLUSIVE is non-nil, the tags themselves are included
+from the range."
+  (cond
+   ((and (not inclusive) (= (abs (or count 1)) 1))
+    (let ((rng (evil-select-block #'evil-up-xml-tag beg end type count nil t)))
+      (if (or (and beg (= beg (evil-range-beginning rng))
+                   end (= end (evil-range-end rng))))
+          (evil-select-block #'evil-up-xml-tag beg end type count t)
+        rng)))
+   (t
+    (evil-select-block #'evil-up-xml-tag beg end type count inclusive))))
+
+(defun evil-expand-range (range &optional copy)
+  "Expand RANGE according to its type.
+Return a new range if COPY is non-nil."
+  (when copy
+    (setq range (evil-copy-range range)))
+  (unless (plist-get (evil-range-properties range) :expanded)
+    (setq range (evil-transform-range :expand range)))
+  range)
+
+(defun evil-contract-range (range &optional copy)
+  "Contract RANGE according to its type.
+Return a new range if COPY is non-nil."
+  (evil-transform-range :contract range copy))
+
+(defun evil-normalize-range (range &optional copy)
+  "Normalize RANGE according to its type.
+Return a new range if COPY is non-nil."
+  (evil-transform-range :normalize range copy))
+
+(defun evil-transform-range (transform range &optional copy)
+  "Apply TRANSFORM to RANGE according to its type.
+Return a new range if COPY is non-nil."
+  (when copy
+    (setq range (evil-copy-range range)))
+  (when (evil-type range)
+    (apply #'evil-set-range range
+           (apply #'evil-transform transform range)))
+  range)
+
+(defun evil-describe-range (range)
+  "Return description of RANGE.
+If no description is available, return the empty string."
+  (apply #'evil-describe range))
+
+;;; Undo
+
+(defvar buffer-undo-tree)
+(declare-function undo-tree-current "ext:undo-tree")
+(declare-function undo-tree-node-next "ext:undo-tree")
+(declare-function undo-tree-node-branch "ext:undo-tree")
+(declare-function undo-tree-node-branch "ext:undo-tree")
+(declare-function undo-tree-undo "ext:undo-tree")
+(declare-function undo-tree-snip-node "ext:undo-tree")
+
+(defun evil-start-undo-step (&optional continue)
+  "Start a undo step.
+All following buffer modifications are grouped together as a
+single action. If CONTINUE is non-nil, preceding modifications
+are included. The step is terminated with `evil-end-undo-step'."
+  (when (and (listp buffer-undo-list)
+             (not evil-in-single-undo))
+    (if evil-undo-list-pointer
+        (evil-refresh-undo-step)
+      (unless (or continue (null (car-safe buffer-undo-list)))
+        (undo-boundary))
+      (setq evil-undo-list-pointer (or buffer-undo-list t)))))
+
+(defun evil-end-undo-step (&optional continue)
+  "End a undo step started with `evil-start-undo-step'.
+Adds an undo boundary unless CONTINUE is specified."
+  (when (and (listp buffer-undo-list)
+             evil-undo-list-pointer
+             (not evil-in-single-undo))
+    (evil-refresh-undo-step)
+    (unless (or continue (null (car-safe buffer-undo-list)))
+      (undo-boundary))
+    (setq evil-undo-list-pointer nil)))
+
+(defun evil-refresh-undo-step ()
+  "Refresh `buffer-undo-list' entries for current undo step.
+Undo boundaries until `evil-undo-list-pointer' are removed to
+make the entries undoable as a single action. See
+`evil-start-undo-step'."
+  (when evil-undo-list-pointer
+    (setq buffer-undo-list
+          (evil-filter-list #'null buffer-undo-list evil-undo-list-pointer))
+    (setq evil-undo-list-pointer (or buffer-undo-list t))))
+
+(defmacro evil-with-undo (&rest body)
+  "Execute BODY with enabled undo.
+If undo is disabled in the current buffer, the undo information
+is stored in `evil-temporary-undo' instead of `buffer-undo-list'."
+  (declare (indent defun) (debug t))
+  (let ((undo-list (make-symbol "undo-list")))
+    `(let ((,undo-list buffer-undo-list)
+           (evil-undo-system evil-undo-system))
+       (when (eq ,undo-list t) (setq buffer-undo-list nil
+                                     evil-undo-system nil))
+       (unwind-protect
+           (progn ,@body)
+         ;; ensure any new undo changes we've accumulated start with
+         ;; exactly one undo boundary marker, i.e. nil
+         (when (car-safe buffer-undo-list) (push nil buffer-undo-list))
+         (if (eq ,undo-list t)
+             ;; undo is disabled, so store undo information in
+             ;; evil-temporary-undo
+             (setq evil-temporary-undo buffer-undo-list
+                   buffer-undo-list t)
+           (setq evil-temporary-undo nil))))))
+
+(defmacro evil-with-single-undo (&rest body)
+  "Execute BODY as a single undo step."
+  (declare (indent defun) (debug t))
+  `(let (evil-undo-list-pointer)
+     (evil-with-undo
+       (evil-start-undo-step)
+       (unwind-protect
+           (let ((evil-in-single-undo t)) ,@body)
+         (evil-end-undo-step)))))
+
+(defun evil-undo-pop ()
+  "Undo and forget the last buffer change.
+If undo is disabled in the current buffer, use the information
+in `evil-temporary-undo' instead."
+  (if (and (eq evil-undo-system 'undo-tree)
+           (not (eq buffer-undo-list t)))
+      (let (current)
+        (undo-tree-undo)
+        (setq current (undo-tree-current buffer-undo-tree)
+              current (nth (undo-tree-node-branch current)
+                           (undo-tree-node-next current)))
+        ;; Remove only if leaf to not have to adjust child buffer positions
+        (unless (undo-tree-node-next current) (undo-tree-snip-node current)))
+    (let ((paste-undo (list nil))
+          (undo-list (if (eq buffer-undo-list t)
+                         evil-temporary-undo
+                       buffer-undo-list)))
+      (when (or (not undo-list) (car undo-list))
+        (user-error "Can't undo previous change"))
+      (while (and undo-list (null (car undo-list)))
+        (pop undo-list)) ; remove nil
+      (while (and undo-list (car undo-list))
+        (push (pop undo-list) paste-undo))
+      (let ((buffer-undo-list (nreverse paste-undo)))
+        (evil-save-echo-area
+          (undo)))
+      (if (eq buffer-undo-list t)
+          (setq evil-temporary-undo nil)
+        (setq buffer-undo-list undo-list)))))
+
+;;; Search
+(defun evil-transform-regexp (regexp replacements-alist)
+  (replace-regexp-in-string
+   "\\\\+[^\\\\]"
+   #'(lambda (txt)
+       (let* ((b (match-beginning 0))
+              (e (match-end 0))
+              (ch (aref txt (1- e)))
+              (repl (assoc ch replacements-alist)))
+         (if (and repl (zerop (mod (length txt) 2)))
+             (concat (substring txt b (- e 2))
+                     (cdr repl))
+           txt)))
+   regexp nil t))
+
+(defun evil-transform-magic (str magic quote transform &optional _start)
+  "Transform STR with magic characters.
+MAGIC is a regexp that matches all potential magic
+characters. Each occurence of CHAR as magic character within str
+is replaced by the result of calling the associated TRANSFORM
+function. TRANSFORM is a function taking two arguments, the
+character to be transformed and the rest of string after the
+character. The function should return a triple (REPLACEMENT REST
+. STOP) where REPLACEMENT is the replacement and REST is the rest
+of the string that has not been transformed. If STOP is non-nil
+then the substitution stops immediately.  The replacement starts
+at position START, everything before that position is returned
+literally.  The result is a pair (RESULT . REST). RESULT is a
+list containing the transformed parts in order. If two
+subsequents parts are both strings, they are concatenated. REST
+is the untransformed rest string (usually \"\" but may be more if
+TRANSFORM stopped the substitution). Which characters are
+considered as magic characters (i.e. the transformation happens
+if the character is NOT preceeded by a backslash) is determined
+by `evil-magic'. The special tokens \\v, \\V, \\m and \\M have
+always a special meaning (like in Vim) and should not be
+contained in TRANSFORMS, otherwise their meaning is overwritten.
+
+The parameter QUOTE is a quoting function applied to literal
+transformations, usually `regexp-quote' or `replace-quote'."
+  (save-match-data
+    (let ((regexp (concat "\\(?:\\`\\|[^\\]\\)\\(\\\\\\(?:\\(" magic "\\)\\|\\(.\\)\\)\\|\\(" magic "\\)\\)"))
+          (magic-chars (evil-get-magic evil-magic))
+          (evil-magic evil-magic)
+          (quote (or quote #'identity))
+          result stop)
+      (while (and (not stop) str (string-match regexp str))
+        (unless (zerop (match-beginning 1))
+          (push (substring str 0 (match-beginning 1)) result))
+        (let ((char (or (match-string 2 str)
+                        (match-string 3 str)
+                        (match-string 4 str)))
+              (rest (substring str (match-end 0))))
+          (cond
+           ((match-beginning 4)
+            ;; magic character without backslash
+            (if (string-match magic-chars char)
+                ;; magic, do transform
+                (let ((trans (funcall transform (aref char 0) rest)))
+                  (push (car trans) result)
+                  (setq str (cadr trans) stop (nthcdr 2 trans)))
+              ;; non-magic, literal transformation
+              (push (funcall quote char) result)
+              (setq str rest)))
+           ((match-beginning 2)
+            ;; magic character with backslash
+            (if (not (string-match magic-chars char))
+                ;; non-magic, do transform
+                (let ((trans (funcall transform (aref char 0) rest)))
+                  (push (car trans) result)
+                  (setq str (cadr trans) stop (nthcdr 2 trans)))
+              ;; magic, literal transformation
+              (push (funcall quote char) result)
+              (setq str rest)))
+           ((memq (aref char 0) '(?m ?M ?v ?V))
+            (setq evil-magic (cdr (assq (aref char 0)
+                                        '((?m . t)
+                                          (?M . nil)
+                                          (?v . very-magic)
+                                          (?V . very-nomagic)))))
+            (setq magic-chars (evil-get-magic evil-magic))
+            (setq str rest))
+           (t
+            ;; non-magic char with backslash, literal transformation
+            (push (funcall quote char) result)
+            (setq str rest)))))
+      (cond
+       ((and str (not stop))
+        (push str result)
+        (setq str ""))
+       ((not str)
+        (setq str "")))
+      ;; concatenate subsequent strings
+      ;; note that result is in reverse order
+      (let (repl)
+        (while result
+          (cond
+           ((and (stringp (car result))
+                 (zerop (length (car result))))
+            (pop result))
+           ((and (stringp (car result))
+                 (stringp (cadr result)))
+            (setq result (cons (concat (cadr result)
+                                       (car result))
+                               (nthcdr 2 result))))
+           (t
+            (push (pop result) repl))))
+        (cons repl str)))))
+
+(defconst evil-vim-regexp-replacements
+  '((?n  . "\n")           (?r  . "\r")
+    (?t  . "\t")           (?b  . "\b")
+    (?s  . "[[:space:]]")  (?S  . "[^[:space:]]")
+    (?d  . "[[:digit:]]")  (?D  . "[^[:digit:]]")
+    (?x  . "[[:xdigit:]]") (?X  . "[^[:xdigit:]]")
+    (?o  . "[0-7]")        (?O  . "[^0-7]")
+    (?a  . "[[:alpha:]]")  (?A  . "[^[:alpha:]]")
+    (?l  . "[a-z]")        (?L  . "[^a-z]")
+    (?u  . "[A-Z]")        (?U  . "[^A-Z]")
+    (?y  . "\\s")          (?Y  . "\\S")
+    (?\( . "\\(")          (?\) . "\\)")
+    (?{  . "\\{")          (?}  . "\\}")
+    (?\[ . "[")            (?\] . "]")
+    (?<  . "\\<")          (?>  . "\\>")
+    (?_  . "\\_")
+    (?*  . "*")            (?+  . "+")
+    (??  . "?")            (?=  . "?")
+    (?.  . ".")
+    (?`  . "`")            (?^  . "^")
+    (?$  . "$")            (?|  . "\\|")))
+
+(defconst evil-regexp-magic "[][(){}<>_dDsSxXoOaAlLuUwWyY.*+?=^$`|nrtb0-9]")
+
+(defun evil-transform-vim-style-regexp (regexp)
+  "Transform vim-style backslash codes to Emacs regexp.
+This includes the backslash codes \\d, \\D, \\s, \\S, \\x, \\X,
+\\o, \\O, \\a, \\A, \\l, \\L, \\u, \\U and \\w, \\W. The new
+codes \\y and \\Y can be used instead of the Emacs code \\s and
+\\S which have a different meaning in Vim-style."
+  (car
+   (car
+    (evil-transform-magic
+     regexp evil-regexp-magic #'regexp-quote
+     #'(lambda (char rest)
+         (let ((repl (assoc char evil-vim-regexp-replacements)))
+           (if repl
+               (list (cdr repl) rest)
+             (list (concat "\\" (char-to-string char)) rest))))))))
+
+;;; Substitute
+
+(defun evil-downcase-first (str)
+  "Return STR with the first letter downcased."
+  (if (zerop (length str))
+      str
+    (concat (downcase (substring str 0 1))
+            (substring str 1))))
+
+(defun evil-upcase-first (str)
+  "Return STR with the first letter upcased."
+  (if (zerop (length str))
+      str
+    (concat (upcase (substring str 0 1))
+            (substring str 1))))
+
+(defun evil-get-magic (magic)
+  "Return a regexp matching the magic characters according to MAGIC.
+Depending on the value of MAGIC the following characters are
+considered magic.
+  t              [][{}*+?.&~$^
+  nil            [][{}*+?$^
+  `very-magic'   not 0-9A-Za-z_
+  `very-nomagic' empty."
+  (cond
+   ((eq magic t) "[][}{*+?.&~$^]")
+   ((eq magic 'very-magic) "[^0-9A-Za-z_]")
+   ((eq magic 'very-nomagic) "\\\\")
+   (t "[][}{*+?$^]")))
+
+;; TODO: support magic characters in patterns
+(defconst evil-replacement-magic "[eElLuU0-9&#,rnbt=]"
+  "All magic characters in a replacement string")
+
+(defun evil-compile-subreplacement (to &optional start)
+  "Convert a regexp replacement TO to Lisp from START until \\e or \\E.
+Return a pair (RESULT . REST). RESULT is a list suitable for
+`perform-replace' if necessary, the original string if not.
+REST is the unparsed remainder of TO."
+  (let ((result
+         (evil-transform-magic
+          to evil-replacement-magic #'replace-quote
+          #'(lambda (char rest)
+              (cond
+               ((eq char ?#)
+                (list '(number-to-string replace-count) rest))
+               ((eq char ?r) (list "\r" rest))
+               ((eq char ?n) (list "\n" rest))
+               ((eq char ?b) (list "\b" rest))
+               ((eq char ?t) (list "\t" rest))
+               ((memq char '(?e ?E))
+                `("" ,rest . t))
+               ((memq char '(?l ?L ?u ?U))
+                (let ((result (evil-compile-subreplacement rest))
+                      (func (cdr (assoc char
+                                        '((?l . evil-downcase-first)
+                                          (?L . downcase)
+                                          (?u . evil-upcase-first)
+                                          (?U . upcase))))))
+                  (list `(,func
+                          (replace-quote
+                           (evil-match-substitute-replacement
+                            ,(car result)
+                            (not case-replace))))
+                        (cdr result))))
+               ((eq char ?=)
+                (when (or (zerop (length rest))
+                          (not (eq (aref rest 0) ?@)))
+                  (user-error "Expected @ after \\="))
+                (when (< (length rest) 2)
+                  (user-error "Expected register after \\=@"))
+                (list (evil-get-register (aref rest 1))
+                      (substring rest 2)))
+               ((eq char ?,)
+                (let* ((obj (read-from-string rest))
+                       (result `(replace-quote ,(car obj)))
+                       (end
+                        ;; swallow a space after a symbol
+                        (if (and (or (symbolp (car obj))
+                                     ;; swallow a space after 'foo,
+                                     ;; but not after (quote foo)
+                                     (and (eq (car-safe (car obj)) 'quote)
+                                          (not (= ?\( (aref rest 0)))))
+                                 (eq (string-match " " rest (cdr obj))
+                                     (cdr obj)))
+                            (1+ (cdr obj))
+                          (cdr obj))))
+                  (list result (substring rest end))))
+               ((eq char ?0)
+                (list "\\&" rest))
+               (t
+                (list (concat "\\" (char-to-string char)) rest))))
+          start)))
+    (let ((rest (cdr result))
+          (result (car result)))
+      (replace-match-string-symbols result)
+      (cons (if (cdr result)
+                (cons 'concat result)
+              (or (car result) ""))
+            rest))))
+
+(defun evil-compile-replacement (to)
+  "Maybe convert a regexp replacement TO to Lisp.
+Return a list suitable for `perform-replace' if necessary, the
+original string if not. Currently the following magic characters
+in replacements are supported: 0-9&#lLuUrnbt,
+The magic character , (comma) start an Emacs-lisp expression."
+  (when (stringp to)
+    (save-match-data
+      (cons 'replace-eval-replacement
+            (car (evil-compile-subreplacement to))))))
+
+(defun evil-match-substitute-replacement (replacement &optional fixedcase string)
+  "Return REPLACEMENT as it will be inserted by `evil-replace-match'.
+If REPLACEMENT is an expression it will be evaluated to compute the
+replacement text first."
+  (match-substitute-replacement
+   (if (stringp replacement)
+       replacement
+     (funcall (car replacement)
+              (cdr replacement)
+              0))
+   fixedcase nil string))
+
+;;; Alignment
+
+(defun evil-justify-lines (beg end justify position)
+  "Justify all lines in a range.
+BEG and END specify the range of those lines to be
+justified. JUSTIFY is either `left', `right' or `center' according
+to the justification type. POSITION is the maximal text width for
+right and center justification or the column at which the lines
+should be left-aligned for left justification."
+  (let ((fill-column position)
+        adaptive-fill-mode fill-prefix)
+    (evil-with-restriction
+        (save-excursion (goto-char beg) (line-beginning-position))
+        (save-excursion (goto-char end) (line-end-position (if (bolp) 0 1)))
+      (goto-char (point-min))
+      (while (progn
+               (if (eq justify 'left)
+                   (indent-line-to position)
+                 (when (re-search-forward "^[[:space:]]*" nil t)
+                   (delete-region (match-beginning 0)
+                                  (match-end 0)))
+                 (justify-current-line justify nil t))
+               (and (zerop (forward-line)) (bolp))))
+      (goto-char (point-min))
+      (back-to-indentation))))
+
+;;; View helper
+
+(defvar-local evil-list-view-select-action nil)
+
+(define-derived-mode evil-list-view-mode tabulated-list-mode
+  "Evil List View"
+  (tabulated-list-init-header)
+  (tabulated-list-print))
+
+(defun evil-list-view-goto-entry ()
+  (interactive)
+  (when (and evil-list-view-select-action
+             (not (eobp)))
+    (let* ((line (line-number-at-pos (point)))
+           (entry (elt tabulated-list-entries (1- line))))
+      (funcall evil-list-view-select-action (nth 1 entry)))))
+
+(defun evil-list-view-quit ()
+  (interactive)
+  (quit-window 'kill))
+
+(define-key evil-list-view-mode-map (kbd "q") #'evil-list-view-quit)
+(define-key evil-list-view-mode-map [follow-link] nil) ;; allows mouse-1 to be activated
+(define-key evil-list-view-mode-map [mouse-1] #'evil-list-view-goto-entry)
+(define-key evil-list-view-mode-map [return] #'evil-list-view-goto-entry)
+
+(defmacro evil-with-view-list (&rest properties)
+  "Open a new list view buffer.
+PROPERTIES is a property-list which supports the following properties:
+
+:name          (required)   The name of the buffer.
+:mode-name     (required)   The name for the mode line.
+:format        (required)   The value for `tabulated-list-format'.
+:entries       (required)   The value for `tabulated-list-entries'.
+:select-action (optional)   A function for row selection.
+                            It takes a single parameter, which is the
+                            selected row's vector value that is
+                            passed into `:entries'."
+  (declare (indent defun) (debug t))
+  `(let ((bufname (concat "*" ,(plist-get properties :name) "*"))
+         (inhibit-read-only t))
+     (and (get-buffer bufname)
+          (kill-buffer bufname))
+     (let ((buf (get-buffer-create bufname)))
+       (with-current-buffer buf
+         (setq tabulated-list-format ,(plist-get properties :format))
+         (setq tabulated-list-entries ,(plist-get properties :entries))
+         (setq evil-list-view-select-action ,(plist-get properties :select-action))
+         (evil-list-view-mode)
+         (setq mode-name ,(plist-get properties :mode-name))
+         (evil-motion-state))
+       (switch-to-buffer-other-window buf))))
+
+(provide 'evil-common)
+
+;;; evil-common.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-common.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-common.elc
new file mode 100644
index 0000000..d4eaf2d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-common.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-core.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-core.el
new file mode 100644
index 0000000..206aa38
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-core.el
@@ -0,0 +1,1321 @@
+;;; evil-core.el --- Core functionality -*- lexical-binding: t -*-
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Evil is defined as a globalized minor mode, enabled with the toggle
+;; function `evil-mode'.  This in turn enables `evil-local-mode' in
+;; every buffer, which sets up the buffer's state.
+;;
+;; Each state has its own keymaps, and these keymaps have status as
+;; "emulation keymaps" with priority over regular keymaps.  Emacs
+;; maintains the following keymap hierarchy (highest priority first):
+;;
+;;     * Overriding keymaps/overlay keymaps...
+;;     * Emulation mode keymaps...
+;;       - Evil keymaps...
+;;     * Minor mode keymaps...
+;;     * Local keymap (`local-set-key')
+;;     * Global keymap (`global-set-key')
+;;
+;; Within this hierarchy, Evil arranges the keymaps for the current
+;; state as shown below:
+;;
+;;     * Intercept keymaps...
+;;     * Local state keymap
+;;     * Minor-mode keymaps...
+;;     * Auxiliary keymaps...
+;;     * Overriding keymaps...
+;;     * Global state keymap
+;;     * Keymaps for other states...
+;;
+;; These keymaps are listed in `evil-mode-map-alist', which is listed
+;; in `emulation-mode-map-alist'.
+;;
+;; Most of the key bindings for a state are stored in its global
+;; keymap, which has a name such as `evil-normal-state-map'. (See the
+;; file evil-maps.el, which contains all the default key bindings.) A
+;; state also has a local keymap (`evil-normal-state-local-map'),
+;; which may contain user customizations for the current buffer.
+;; Furthermore, any Emacs mode may be assigned state bindings of its
+;; own by passing the mode's keymap to the function `evil-define-key'
+;; or `evil-define-minor-mode-key'. The former uses a specific map to
+;; define the key in while the latter associates the key with a
+;; particular mode. These mode-specific bindings are ultimately stored
+;; in so-called auxiliary and minor-mode keymaps respectively, which
+;; are sandwiched between the local keymap and the global keymap.
+;; Finally, the state may also activate the keymaps of other states
+;; (e.g., Normal state inherits bindings from Motion state).
+;;
+;; For integration purposes, a regular Emacs keymap may be "elevated"
+;; to emulation status by passing it to `evil-make-intercept-map' or
+;; `evil-make-overriding-map'.  An "intercept" keymap has priority over
+;; all other Evil keymaps.  (Evil uses this facility when debugging and
+;; for handling the "ESC" key in the terminal.) More common is the
+;; "overriding" keymap, which only has priority over the global state
+;; keymap.  (This is useful for adapting key-heavy modes such as Dired,
+;; where all but a few keys should be left as-is and should not be
+;; shadowed by Evil's default bindings.)
+;;
+;; States are defined with the macro `evil-define-state', which
+;; creates a command for switching to the state.  This command,
+;; for example `evil-normal-state' for Normal state, performs
+;; the following tasks:
+;;
+;;     * Setting `evil-state' to the new state.
+;;     * Refreshing the keymaps in `evil-mode-map-alist'.
+;;     * Updating the mode line.
+;;       - Normal state depends on `evil-normal-state-tag'.
+;;     * Adjusting the cursor's appearance.
+;;       - Normal state depends on `evil-normal-state-cursor'.
+;;     * Displaying a message in the echo area.
+;;       - Normal state depends on `evil-normal-state-message'.
+;;     * Running hooks.
+;;       - Normal state runs `evil-normal-state-entry-hook' when
+;;         entering, and `evil-normal-state-exit-hook' when exiting.
+;;
+;; The various properties of a state can be accessed through their
+;; respective variables, or by passing a keyword and the state's name
+;; to the `evil-state-property' function.  Evil defines the states
+;; Normal state ("normal"), Insert state ("insert"), Visual state
+;; ("visual"), Replace state ("replace"), Operator-Pending state
+;; ("operator"), Motion state ("motion") and Emacs state ("emacs").
+
+;;; Code:
+
+(require 'evil-common)
+
+(declare-function evil-emacs-state-p "evil-states")
+(declare-function evil-ex-p "evil-ex")
+
+(define-minor-mode evil-local-mode
+  "Minor mode for setting up Evil in a single buffer."
+  :init-value nil
+  (if evil-local-mode
+      (progn
+        (cl-pushnew 'evil-mode-map-alist emulation-mode-map-alists)
+        (evil-initialize-local-keymaps)
+        (when (minibufferp)
+          (setq-local evil-default-state 'insert)
+          (setq-local evil-echo-state nil))
+        (setq evil-input-method current-input-method)
+        (evil-initialize-state)
+        (add-hook 'input-method-activate-hook #'evil-activate-input-method t t)
+        (add-hook 'input-method-deactivate-hook #'evil-deactivate-input-method t t)
+        (add-hook 'activate-mark-hook 'evil-visual-activate-hook nil t)
+        ;; FIXME: Add these hooks buffer-locally and remove when disabling
+        (add-hook 'pre-command-hook 'evil-repeat-pre-hook)
+        (add-hook 'post-command-hook 'evil-repeat-post-hook))
+    (evil-refresh-mode-line)
+    (remove-hook 'activate-mark-hook 'evil-visual-activate-hook t)
+    (remove-hook 'input-method-activate-hook #'evil-activate-input-method t)
+    (remove-hook 'input-method-deactivate-hook #'evil-deactivate-input-method t)
+    (activate-input-method evil-input-method)
+    (evil-change-state nil)))
+
+;; Make the variable permanent local.  This is particular useful in
+;; conjunction with nXhtml/mumamo because mumamo does not touch these
+;; variables.
+(put 'evil-local-mode 'permanent-local t)
+
+(defun turn-on-evil-mode ()
+  "Turn on Evil in the current buffer."
+  (interactive)
+  (evil-local-mode))
+
+(defun turn-off-evil-mode ()
+  "Turn off Evil in the current buffer."
+  (interactive)
+  (evil-local-mode -1))
+
+;; The function `evil-initialize' should only be used to initialize
+;; `evil-local-mode' from the globalized minor-mode `evil-mode'. It is
+;; called whenever evil is enabled in a buffer for the first time or
+;; when evil is active and the major-mode of the buffer changes.
+(defun evil-initialize ()
+  "Enable Evil in the current buffer, if appropriate.
+To enable Evil globally, do (evil-mode)."
+  (if evil-local-mode
+      ;; Set Evil state according to new major-mode
+      (evil-initialize-state)
+    (or (and (minibufferp) (not evil-want-minibuffer))
+        (evil-disabled-buffer-p)
+        (evil-local-mode))))
+
+(defalias 'evil--fundamental-mode #'fundamental-mode)
+
+(defvar evil--advices ())
+
+;;;###autoload (autoload 'evil-mode "evil" nil t)
+(define-globalized-minor-mode evil-mode evil-local-mode evil-initialize
+  :group 'evil)
+
+;; `define-globalized-minor-mode' supports a BODY argument but only since
+;; GNU Emacs 27.1, so resort to this ugly advice in the mean time.
+(define-advice evil-mode (:after (&optional _arg) body)
+  ;; Hooks used to not run in Fundamental buffers (bug#23827), so
+  ;; other measures are necessary to initialize Evil there. When Evil
+  ;; is enabled globally, the default value of `major-mode' is set to
+  ;; the `evil--fundamental-mode' alias, sidestepping the restriction.
+  (if evil-mode
+      (progn
+        (and (eval-when-compile (version< emacs-version "26.1"))
+             (eq (default-value 'major-mode) 'fundamental-mode)
+             (setq-default major-mode #'evil--fundamental-mode))
+        (dolist (advice evil--advices) (apply #'advice-add advice))
+        (with-no-warnings (evil-esc-mode 1)))
+    (when (eq (default-value 'major-mode) #'evil--fundamental-mode)
+      (setq-default major-mode 'fundamental-mode))
+    (pcase-dolist (`(,funname ,_where ,adfun) evil--advices)
+      (advice-remove funname adfun))
+    (with-no-warnings (evil-esc-mode -1))))
+
+(defun evil--advice-add (&rest args)
+  "Like `advice-add' for advices active only in `evil-mode'."
+  (when evil-mode (apply #'advice-add args))
+  (cl-pushnew args evil--advices :test #'equal))
+
+(defun evil-change-state (state &optional message)
+  "Change the state to STATE.
+If STATE is nil, disable all states."
+  (let ((func (evil-state-property (or state evil-state) :toggle)))
+    (when (and (functionp func)
+               (or message (not (eq state evil-state))))
+      (funcall func (if state (and message 1) -1)))))
+
+(defmacro evil-save-state (&rest body)
+  "Save the current state; execute BODY; restore the state."
+  (declare (indent defun)
+           (debug t))
+  `(let ((evil-state evil-state)
+         (evil-previous-state evil-previous-state)
+         (evil-previous-state-alist (copy-tree evil-previous-state-alist))
+         (evil-next-state evil-next-state)
+         (old-state evil-state)
+         (inhibit-quit t)
+         (buf (current-buffer)))
+     (unwind-protect
+         (progn ,@body)
+       (when (buffer-live-p buf)
+         (with-current-buffer buf
+           (evil-change-state old-state))))))
+
+(defmacro evil-with-state (state &rest body)
+  "Change to STATE and execute BODY without refreshing the display.
+Restore the previous state afterwards."
+  (declare (indent defun)
+           (debug t))
+  `(evil-without-display
+     (evil-save-state
+       (evil-change-state ',state)
+       ,@body)))
+
+(defun evil-initialize-state ()
+  "Set up the initial state for the current buffer.
+See also `evil-set-initial-state'."
+  (evil-change-state (evil-initial-state-for-buffer)))
+
+(defun evil-initial-state-for-buffer-name (&optional name default)
+  "Return the initial Evil state to use for a buffer with name NAME.
+Matches the name against the regular expressions in
+`evil-buffer-regexps'. If none matches, returns DEFAULT."
+  (let ((name (if (stringp name) name (buffer-name name))))
+    (when name
+      (catch 'done
+        (dolist (entry evil-buffer-regexps default)
+          (let ((regexp (car entry))
+                (state (cdr entry)))
+            (when (string-match-p regexp name)
+              (throw 'done state))))))))
+
+(defun evil-disabled-buffer-p (&optional buffer)
+  "Whether Evil should be disabled in BUFFER."
+  (null (evil-initial-state-for-buffer-name buffer 'undefined)))
+
+(defun evil-initial-state-for-buffer (&optional buffer)
+  "Return the initial Evil state to use for BUFFER.
+BUFFER defaults to the current buffer. See also `evil-initial-state'."
+  (with-current-buffer (or buffer (current-buffer))
+    (or (evil-initial-state-for-buffer-name)
+        (cl-loop for (mode) in minor-mode-map-alist
+                 when (and (boundp mode) (symbol-value mode))
+                 thereis (evil-initial-state mode))
+        (evil-initial-state major-mode nil t)
+        evil-default-state)))
+
+(defun evil-initial-state (mode &optional default follow-parent checked-modes)
+  "Return the Evil state to use for MODE or its alias.
+Return DEFAULT if no initial state is associated with MODE.
+The initial state for a mode can be set with
+`evil-set-initial-state'.
+
+If FOLLOW-PARENT is non-nil, also check parent modes of MODE and
+its alias. CHECKED-MODES is used internally and should not be set
+initially."
+  (when (memq mode checked-modes)
+    (error "Circular reference detected in ancestors of `%s'\n%s"
+           major-mode checked-modes))
+  (let ((mode-alias (let ((func (symbol-function mode)))
+                      (when (symbolp func) func))))
+    (or (cl-dolist (entry (evil-state-property t :modes) default)
+          (let ((state (car entry))
+                (modes (symbol-value (cdr entry))))
+            (when (or (memq mode modes)
+                      (and mode-alias (memq mode-alias modes)))
+              (cl-return state))))
+        (and follow-parent (get mode 'derived-mode-parent)
+             (evil-initial-state (get mode 'derived-mode-parent)
+                                 nil t (cons mode checked-modes)))
+        (and follow-parent mode-alias
+             (get mode-alias 'derived-mode-parent)
+             (evil-initial-state (get mode-alias 'derived-mode-parent)
+                                 nil t (cons mode-alias checked-modes))))))
+
+(defun evil-set-initial-state (mode state)
+  "Set the initial state for major mode MODE to STATE.
+This is the state the buffer comes up in."
+  (dolist (modes (evil-state-property t :modes))
+    (setq modes (cdr-safe modes))
+    (set modes (delq mode (symbol-value modes))))
+  (when state
+    (add-to-list (evil-state-property state :modes) mode)))
+
+(evil-define-command evil-change-to-initial-state
+  (&optional buffer message)
+  "Change the state of BUFFER to its initial state.
+This is the state the buffer came up in. If Evil is not activated
+then this function does nothing."
+  :keep-visual t
+  :suppress-operator t
+  (when evil-local-mode
+    (with-current-buffer (or buffer (current-buffer))
+      (evil-change-state (evil-initial-state-for-buffer buffer)
+                         message))))
+
+(evil-define-command evil-change-to-previous-state
+  (&optional buffer message)
+  "Change the state of BUFFER to its previous state."
+  :keep-visual t
+  :repeat abort
+  :suppress-operator t
+  (with-current-buffer (or buffer (current-buffer))
+    (let ((prev-state evil-previous-state)
+          (prev-prev-state (cdr-safe (assoc evil-previous-state
+                                            evil-previous-state-alist))))
+      (evil-change-state nil)
+      (when prev-prev-state
+        (setq evil-previous-state prev-prev-state))
+      (evil-change-state (or prev-state evil-default-state 'normal)
+                         message))))
+
+;; When a buffer is created in a low-level way, it is invisible to
+;; Evil (as well as other globalized minor modes) because no hooks are
+;; run. This is appropriate since many buffers are used for throwaway
+;; purposes. Passing the buffer to `set-window-buffer' indicates
+;; otherwise, though, so advise this function to initialize Evil.
+(evil--advice-add 'set-window-buffer :before #'evil--swb-initialize)
+(defun evil--swb-initialize (_window buffer &rest _)
+  "Initialize Evil in the displayed buffer."
+  (when (and evil-mode (get-buffer buffer))
+    (with-current-buffer buffer
+      (unless evil-local-mode
+        (save-match-data (evil-initialize))))))
+
+;; Refresh cursor color.
+;; Cursor color can only be set for each frame but not for each buffer.
+;; FIXME: Shouldn't this belong in `evil-(local-)mode'?
+(add-hook 'window-configuration-change-hook #'evil-refresh-cursor)
+(advice-add 'select-window :after #'evil--sw-refresh-cursor)
+(defun evil--sw-refresh-cursor (&rest _)
+  (evil-refresh-cursor))
+
+(defun evil-generate-mode-line-tag (&optional state)
+  "Generate the evil mode-line tag for STATE."
+  (let ((tag (evil-state-property state :tag t)))
+    (when (functionp tag)
+      (setq tag (funcall tag)))
+    ;; prepare mode-line: add tooltip
+    (if (stringp tag)
+        (propertize tag
+                    'help-echo (evil-state-property state :name)
+                    'mouse-face 'mode-line-highlight)
+      tag)))
+
+(defun evil-refresh-mode-line (&optional state)
+  "Refresh mode line tag."
+  (when (listp mode-line-format)
+    (setq evil-mode-line-tag (evil-generate-mode-line-tag state))
+    ;; refresh mode line data structure
+    ;; first remove evil from mode-line
+    (setq mode-line-format (delq 'evil-mode-line-tag mode-line-format))
+    (let ((mlpos mode-line-format)
+          pred which where)
+      ;; determine before/after which symbol the tag should be placed
+      (cond
+       ((eq evil-mode-line-format 'before)
+        (setq where 'after which 'mode-line-position))
+       ((eq evil-mode-line-format 'after)
+        (setq where 'after which 'mode-line-modes))
+       ((consp evil-mode-line-format)
+        (setq where (car evil-mode-line-format)
+              which (cdr evil-mode-line-format))))
+      ;; find the cons-cell of the symbol before/after which the tag
+      ;; should be placed
+      (while (and mlpos
+                  (let ((sym (or (car-safe (car mlpos)) (car mlpos))))
+                    (not (eq which sym))))
+        (setq pred mlpos
+              mlpos (cdr mlpos)))
+      ;; put evil tag at the right position in the mode line
+      (cond
+       ((not mlpos)) ;; position not found, so do not add the tag
+       ((eq where 'before)
+        (if pred
+            (setcdr pred (cons 'evil-mode-line-tag mlpos))
+          (setq mode-line-format
+                (cons 'evil-mode-line-tag mode-line-format))))
+       ((eq where 'after)
+        (setcdr mlpos (cons 'evil-mode-line-tag (cdr mlpos)))))
+      (force-mode-line-update))))
+
+;; input methods should be disabled in non-insertion states
+(defun evil-activate-input-method ()
+  "Enable input method in states with :input-method non-nil."
+  (let (input-method-activate-hook
+        input-method-deactivate-hook)
+    (when (and evil-local-mode evil-state)
+      (setq evil-input-method current-input-method)
+      (unless (evil-state-property evil-state :input-method)
+        (deactivate-input-method)))))
+(put 'evil-activate-input-method 'permanent-local-hook t)
+
+(defun evil-deactivate-input-method ()
+  "Disable input method in all states."
+  (let (input-method-activate-hook
+        input-method-deactivate-hook)
+    (when (and evil-local-mode evil-state)
+      (setq evil-input-method nil))))
+(put 'evil-deactivate-input-method 'permanent-local-hook t)
+
+(defmacro evil-without-input-method-hooks (&rest body)
+  "Execute body with evil's activate/deactivate-input-method hooks deactivated.
+This allows input methods to be used in normal-state."
+  (declare (indent defun))
+  `(unwind-protect
+       (progn
+         (remove-hook 'input-method-activate-hook #'evil-activate-input-method t)
+         (remove-hook 'input-method-deactivate-hook #'evil-deactivate-input-method t)
+         ,@body)
+     (add-hook 'input-method-activate-hook #'evil-activate-input-method nil t)
+     (add-hook 'input-method-deactivate-hook #'evil-deactivate-input-method nil t)))
+
+(evil--advice-add 'toggle-input-method :around #'evil--refresh-input-method)
+(defun evil--refresh-input-method (orig-fun &rest args)
+  "Refresh `evil-input-method'."
+  (cond
+   ((not evil-local-mode)
+    (apply orig-fun args))
+   ((evil-state-property evil-state :input-method)
+    (apply orig-fun args))
+   (t
+    (let ((current-input-method evil-input-method))
+      (apply orig-fun args)))))
+
+;; Local keymaps are implemented using buffer-local variables.
+;; However, unless a buffer-local value already exists,
+;; `define-key' acts on the variable's default (global) value.
+;; So we need to initialize the variable whenever we enter a
+;; new buffer or when the buffer-local values are reset.
+(defun evil-initialize-local-keymaps ()
+  "Initialize a buffer-local value for local keymaps as necessary.
+The initial value is that of `make-sparse-keymap'."
+  (dolist (entry evil-local-keymaps-alist)
+    (let ((map (cdr entry)))
+      (unless (and (keymapp (symbol-value map))
+                   (local-variable-p map))
+        (set map (make-sparse-keymap))))))
+
+(defun evil-make-overriding-map (keymap &optional state copy)
+  "Give KEYMAP precedence over the global keymap of STATE.
+The keymap will have lower precedence than custom STATE bindings.
+If STATE is nil, give it precedence over all states.
+If COPY is t, create a copy of KEYMAP and give that
+higher precedence. See also `evil-make-intercept-map'."
+  (let ((key [override-state]))
+    (if (not copy)
+        (define-key keymap key (or state 'all))
+      (unless (keymapp copy)
+        (setq copy (assq-delete-all 'menu-bar (copy-keymap keymap))))
+      (define-key copy key (or state 'all))
+      (define-key keymap key copy))))
+
+(defun evil-make-intercept-map (keymap &optional state aux)
+  "Give KEYMAP precedence over all Evil keymaps in STATE.
+If STATE is nil, give it precedence over all states. If AUX is non-nil, make the
+auxiliary keymap corresponding to KEYMAP in STATE an intercept keymap instead of
+KEYMAP itself. See also `evil-make-overriding-map'."
+  (let ((key [intercept-state])
+        (keymap (if aux
+                    (evil-get-auxiliary-keymap keymap state t t)
+                  keymap)))
+    (define-key keymap key (or state 'all))))
+
+(defmacro evil-define-keymap (keymap doc &rest body)
+  "Define a keymap KEYMAP listed in `evil-mode-map-alist'.
+That means it will have precedence over regular keymaps.
+
+DOC is the documentation for the variable. BODY, if specified,
+is executed after toggling the mode. Optional keyword arguments
+may be specified before the body code:
+
+:mode VAR       Mode variable. If unspecified, the variable
+                is based on the keymap name.
+:local BOOLEAN  Whether the keymap should be buffer-local, that is,
+                reinitialized for each buffer.
+:func BOOLEAN   Create a toggle function even if BODY is empty.
+
+\(fn KEYMAP DOC [[KEY VAL]...] BODY...)"
+  (declare (indent defun)
+           (doc-string 2)
+           (debug (&define name
+                           [&optional stringp]
+                           [&rest [keywordp sexp]]
+                           def-body)))
+  (let ((func t)
+        arg intercept key local mode overriding)
+    (while (keywordp (car-safe body))
+      (setq key (pop body)
+            arg (pop body))
+      (cond
+       ((eq key :mode) (setq mode arg))
+       ((eq key :local) (setq local arg))
+       ((eq key :func) (setq func arg))
+       ((eq key :intercept) (setq intercept arg))
+       ((eq key :overriding) (setq overriding arg))))
+    (setq mode (or mode
+                   (intern (replace-regexp-in-string
+                            "\\(?:-\\(?:mode-\\)?\\(?:key\\)?map\\)?$"
+                            "-mode"
+                            (symbol-name keymap)))))
+    `(progn
+       (defvar ,keymap ,(unless local '(make-sparse-keymap)))
+       (unless (get ',keymap 'variable-documentation)
+         (put ',keymap 'variable-documentation ,doc))
+       (defvar ,mode nil)
+       (unless (get ',mode 'variable-documentation)
+         (put ',mode 'variable-documentation ,doc))
+       (make-variable-buffer-local ',mode)
+       (put ',mode 'permanent-local t)
+       (when ,intercept
+         (evil-make-intercept-map ,keymap))
+       (when ,overriding
+         (evil-make-overriding-map ,keymap))
+       ,@(if local
+             `((make-variable-buffer-local ',keymap)
+               (put ',keymap 'permanent-local t)
+               (evil--add-to-alist evil-local-keymaps-alist ',mode ',keymap))
+           `((evil--add-to-alist evil-global-keymaps-alist ',mode ',keymap)
+             (evil--add-to-alist evil-mode-map-alist ',mode ,keymap)))
+       ,(when (or body func)
+          `(defun ,mode (&optional arg)
+             ,@(when doc `(,doc))
+             (interactive)
+             (cond
+              ((numberp arg) (setq ,mode (> arg 0)))
+              (t (setq ,mode (not ,mode))))
+             ,@body))
+       ',keymap)))
+
+;; The ESC -> escape translation code has been provided by Stefan
+;; Monnier in the discussion of GNU Emacs bug #13793.
+(defun evil-esc-mode (&optional arg)
+  "Toggle interception of \\e (escape).
+Enable with positive ARG and disable with negative ARG.
+
+When enabled, `evil-esc-mode' modifies the entry of \\e in
+`input-decode-map'. If such an event arrives, it is translated to
+a plain `escape' event if no further event occurs within
+`evil-esc-delay' seconds. Otherwise no translation happens and
+the ESC prefix map (i.e. the map originally bound to \\e in
+`input-decode-map`) is returned."
+  (cond
+   ((or (null arg) (eq arg 0))
+    (evil-esc-mode (if evil-esc-mode -1 +1)))
+   ((> arg 0)
+    (unless evil-esc-mode
+      (setq evil-esc-mode t)
+      (add-hook 'after-make-frame-functions #'evil-init-esc)
+      (mapc #'evil-init-esc (frame-list))))
+   ((< arg 0)
+    (when evil-esc-mode
+      (remove-hook 'after-make-frame-functions #'evil-init-esc)
+      (mapc #'evil-deinit-esc (frame-list))
+      (setq evil-esc-mode nil)))))
+
+(defun evil-init-esc (frame)
+  "Update `input-decode-map' in terminal."
+  (with-selected-frame frame
+    (let ((term (frame-terminal frame)))
+      (when (and
+             (or (eq evil-intercept-esc 'always)
+                 (and evil-intercept-esc
+                      (eq (terminal-live-p term) t))) ; only patch tty
+             (not (terminal-parameter term 'evil-esc-map)))
+        (let ((evil-esc-map (lookup-key input-decode-map [?\e])))
+          (set-terminal-parameter term 'evil-esc-map evil-esc-map)
+          (define-key input-decode-map [?\e]
+            `(menu-item "" ,evil-esc-map :filter ,#'evil-esc)))))))
+
+(defun evil-deinit-esc (frame)
+  "Restore `input-decode-map' in terminal."
+  (with-selected-frame frame
+    (let ((term (frame-terminal frame)))
+      (when (terminal-live-p term)
+        (let ((evil-esc-map (terminal-parameter term 'evil-esc-map)))
+          (when evil-esc-map
+            (define-key input-decode-map [?\e] evil-esc-map)
+            (set-terminal-parameter term 'evil-esc-map nil)))))))
+
+(defun evil-esc (map)
+  "Translate \\e to `escape' if no further event arrives.
+This function is used to translate a \\e event either to `escape'
+or to the standard ESC prefix translation map. If \\e arrives,
+this function waits for `evil-esc-delay' seconds for another
+event. If no other event arrives, the event is translated to
+`escape', otherwise it is translated to the standard ESC prefix
+map stored in `input-decode-map'. If `evil-inhibit-esc' is
+non-nil or if evil is in emacs state, the event is always
+translated to the ESC prefix.
+
+The translation to `escape' happens only if the current command
+has indeed been triggered by \\e. In other words, this will only
+happen when the keymap is accessed from `read-key-sequence'. In
+particular, if it is access from `define-key' the returned
+mapping will always be the ESC prefix map."
+  (if (and (not evil-inhibit-esc)
+           (or evil-local-mode (evil-ex-p)
+               (active-minibuffer-window))
+           (not (evil-emacs-state-p))
+           (let ((keys (this-single-command-keys)))
+             (and (> (length keys) 0)
+                  (= (aref keys (1- (length keys))) ?\e)))
+           (sit-for evil-esc-delay))
+      (prog1 [escape]
+        (when defining-kbd-macro
+          (end-kbd-macro)
+          (setq last-kbd-macro (vconcat last-kbd-macro [escape]))
+          (start-kbd-macro t t)))
+    map))
+
+(defun evil-state-p (sym)
+  "Whether SYM is the name of a state."
+  (assq sym evil-state-properties))
+
+(defun evil-state-keymaps (state &rest excluded)
+  "Return a keymap alist of keymaps activated by STATE.
+If STATE references other states in its :enable property,
+these states are recursively processed and added to the list.
+\(The EXCLUDED argument is an internal safeguard against
+infinite recursion, keeping track of processed states.)"
+  (let* ((state (or state evil-state))
+         (enable (evil-state-property state :enable))
+         (map (cons
+               (evil-state-property state :mode)
+               (evil-state-property state :keymap t)))
+         (local-map (cons
+                     (evil-state-property state :local)
+                     (evil-state-property state :local-keymap t)))
+         (minor-mode-maps (evil-state-minor-mode-keymaps state))
+         (aux-maps (evil-state-auxiliary-keymaps state))
+         (overriding-maps
+          (evil-state-overriding-keymaps state))
+         (intercept-maps
+          (evil-state-intercept-keymaps state))
+         (result `(,intercept-maps))
+         (remove-duplicates (null excluded)))
+    (unless (memq state enable)
+      (setq enable (cons state enable)))
+    ;; process STATE's :enable property
+    (dolist (entry enable)
+      (cond
+       ((memq entry excluded))
+       ;; the keymaps for STATE
+       ((eq entry state)
+        (setq result `(,@result
+                       (,local-map)
+                       ,minor-mode-maps
+                       ,aux-maps
+                       ,overriding-maps
+                       (,map)))
+        (push state excluded))
+       ;; the keymaps for another state: call `evil-state-keymaps'
+       ;; recursively, but keep track of processed states
+       ((evil-state-p entry)
+        (setq result `(,@result
+                       ,(apply #'evil-state-keymaps entry excluded))))
+       ;; a single keymap
+       ((or (keymapp entry)
+            (and (keymapp (symbol-value entry))
+                 (setq entry (symbol-value entry)))
+            (setq entry (evil-keymap-for-mode entry)))
+        (setq result `(,@result
+                       ((,(evil-mode-for-keymap entry t) .
+                         ,entry)))))))
+    ;; postpone the expensive filtering of duplicates to the top level
+    (if remove-duplicates
+        (apply #'evil-concat-keymap-alists result)
+      (apply #'append result))))
+
+(defun evil-normalize-keymaps (&optional state)
+  "Create a buffer-local value for `evil-mode-map-alist'.
+This is a keymap alist, determined by the current state
+\(or by STATE if specified)."
+  (let ((state (or state evil-state))
+        (excluded '(nil t))
+        map mode temp)
+    ;; initialize buffer-local keymaps as necessary
+    (evil-initialize-local-keymaps)
+    ;; deactivate keymaps of previous state
+    (dolist (entry evil-mode-map-alist)
+      (setq mode (car entry)
+            map (cdr entry))
+      ;; don't deactivate overriding keymaps;
+      ;; they are toggled by their associated mode
+      (if (or (memq mode excluded)
+              (evil-intercept-keymap-p map)
+              (evil-overriding-keymap-p map)
+              (evil-auxiliary-keymap-p map)
+              (evil-minor-mode-keymap-p map))
+          (push mode excluded)
+        (and (fboundp mode) (symbol-value mode) (funcall mode -1))
+        (set mode nil)))
+    (setq evil-mode-map-alist nil)
+    ;; activate keymaps of current state
+    (when state
+      (setq temp (evil-state-keymaps state))
+      (dolist (entry temp)
+        (setq mode (car entry)
+              map (cdr entry))
+        (unless (or (and (boundp mode) (symbol-value mode))
+                    ;; the minor-mode keymaps include modes that are not
+                    ;; necessarily active
+                    (evil-minor-mode-keymap-p map))
+          (when (fboundp mode)
+            (funcall mode 1))
+          (set mode t))
+        ;; refresh the keymap in case it has changed
+        ;; (e.g., `evil-operator-shortcut-map' is
+        ;; reset on toggling)
+        (if (or (memq mode excluded)
+                (evil-intercept-keymap-p map)
+                (evil-overriding-keymap-p map)
+                (evil-auxiliary-keymap-p map)
+                (evil-minor-mode-keymap-p map))
+            (push mode excluded)
+          (setcdr entry (or (evil-keymap-for-mode mode) map))))
+      ;; update `evil-mode-map-alist'
+      (setq evil-mode-map-alist temp))))
+
+(defun evil-mode-for-keymap (keymap &optional default)
+  "Return the minor mode associated with KEYMAP.
+Return DEFAULT if no mode is found.
+See also `evil-keymap-for-mode'."
+  (let ((map (if (keymapp keymap) keymap (symbol-value keymap)))
+        (var (when (symbolp keymap) keymap)))
+    ;; Check Evil variables first for speed purposes.
+    ;; If all else fails, check `minor-mode-map-alist'.
+    (or (when var
+          (or (car (rassq var evil-global-keymaps-alist))
+              (car (rassq var evil-local-keymaps-alist))))
+        (car (rassq map (mapcar #'(lambda (e)
+                                    ;; from (MODE-VAR . MAP-VAR)
+                                    ;; to (MODE-VAR . MAP)
+                                    (cons (car-safe e)
+                                          (symbol-value (cdr-safe e))))
+                                (append evil-global-keymaps-alist
+                                        evil-local-keymaps-alist))))
+        (car (rassq map minor-mode-map-alist))
+        default)))
+
+(defun evil-keymap-for-mode (mode &optional variable)
+  "Return the keymap associated with MODE.
+Return the keymap variable if VARIABLE is non-nil.
+See also `evil-mode-for-keymap'."
+  (let* ((var (or (cdr (assq mode evil-global-keymaps-alist))
+                  (cdr (assq mode evil-local-keymaps-alist))))
+         (map (or (symbol-value var)
+                  (cdr (assq mode minor-mode-map-alist)))))
+    (if variable var map)))
+
+(defun evil-state-auxiliary-keymaps (state)
+  "Return a keymap alist of auxiliary keymaps for STATE."
+  (let ((state (or state evil-state))
+        aux result)
+    (dolist (map (current-active-maps) (nreverse result))
+      (when (setq aux (evil-get-auxiliary-keymap map state))
+        (push (cons (evil-mode-for-keymap map t) aux) result)))))
+
+(defun evil-state-minor-mode-keymaps (state)
+  "Return a keymap alist of minor-mode keymaps for STATE."
+  (cdr (assq (or state evil-state) evil-minor-mode-keymaps-alist)))
+
+(defun evil-state-overriding-keymaps (&optional state)
+  "Return a keymap alist of overriding keymaps for STATE."
+  (let* ((state (or state evil-state))
+         result)
+    (dolist (map (current-active-maps))
+      (when (setq map (evil-overriding-keymap-p map state))
+        (push (cons (evil-mode-for-keymap map t) map) result)))
+    (nreverse result)))
+
+(defun evil-state-intercept-keymaps (&optional state)
+  "Return a keymap alist of intercept keymaps for STATE."
+  (let* ((state (or state evil-state))
+         result)
+    (dolist (map (current-active-maps))
+      (when (setq map (or (evil-intercept-keymap-p map state)
+                          (evil-intercept-keymap-p
+                           (evil-get-auxiliary-keymap map state) state)))
+        (push (cons (evil-mode-for-keymap map t) map) result)))
+    (setq result (nreverse result))
+    result))
+
+(defun evil-set-auxiliary-keymap (map state &optional aux)
+  "Set the auxiliary keymap for MAP in STATE to AUX.
+If AUX is nil, create a new auxiliary keymap."
+  (unless aux (setq aux (make-sparse-keymap)))
+  (unless (evil-auxiliary-keymap-p aux)
+    (evil-set-keymap-prompt
+     aux (format "Auxiliary keymap for %s"
+                 (or (evil-state-property state :name)
+                     (format "%s state" state)))))
+  (define-key map (vector (intern (format "%s-state" state))) aux)
+  aux)
+
+(defun evil-get-auxiliary-keymap (map state &optional create ignore-parent)
+  "Get the auxiliary keymap for MAP in STATE.
+If CREATE is non-nil, create an auxiliary keymap
+if MAP does not have one. If CREATE and
+IGNORE-PARENT are non-nil then a new auxiliary
+keymap is created even if the parent of MAP has
+one already."
+  (when state
+    (let* ((key (vector (intern (format "%s-state" state))))
+           (parent-aux (when (and ignore-parent
+                                  (keymap-parent map))
+                         (lookup-key (keymap-parent map) key)))
+           (aux (lookup-key map key)))
+      (cond
+       ((and ignore-parent
+             (equal parent-aux aux)
+             create)
+        (evil-set-auxiliary-keymap map state))
+       ((evil-auxiliary-keymap-p aux)
+        aux)
+       (create
+        (evil-set-auxiliary-keymap map state))))))
+
+(defun evil-get-minor-mode-keymap (state mode)
+  "Get the auxiliary keymap for MODE in STATE, creating one if it
+does not already exist."
+  (let ((state-entry (assq state evil-minor-mode-keymaps-alist)))
+    (if (and state-entry
+             (assq mode state-entry))
+        (cdr (assq mode state-entry))
+      (let ((map (make-sparse-keymap)))
+        (evil-set-keymap-prompt
+         map (format "Minor-mode keymap for %s in %s"
+                     mode
+                     (or (evil-state-property state :name)
+                         (format "%s state" state))))
+        (if state-entry
+            (setcdr state-entry
+                    (append (list (cons mode map)) (cdr state-entry)))
+          (push (cons state (list (cons mode map)))
+                evil-minor-mode-keymaps-alist))
+        map))))
+
+(defun evil-auxiliary-keymap-p (map)
+  "Whether MAP is an auxiliary keymap."
+  (let ((prompt (keymap-prompt map)))
+    (when prompt (string-prefix-p "Auxiliary keymap" prompt))))
+
+(defun evil-minor-mode-keymap-p (map)
+  "Whether MAP is a minor-mode keymap."
+  (let ((prompt (keymap-prompt map)))
+    (when prompt (string-prefix-p "Minor-mode keymap" prompt))))
+
+(defun evil-intercept-keymap-p (map &optional state)
+  "Whether MAP is an intercept keymap for STATE.
+If STATE is nil, it means any state."
+  (let ((entry (and (keymapp map)
+                    (lookup-key map [intercept-state]))))
+    (cond
+     ((null entry) nil)
+     ((null state) map)
+     ((eq entry state) map)
+     ((eq entry 'all) map))))
+
+(defun evil-overriding-keymap-p (map &optional state)
+  "Whether MAP is an overriding keymap for STATE.
+If STATE is nil, it means any state."
+  (let ((entry (and (keymapp map)
+                    (lookup-key map [override-state]))))
+    (cond
+     ((null entry) nil)
+     ((keymapp entry) (evil-overriding-keymap-p entry state))
+     ((null state) map)
+     ((eq entry state) map)
+     ((eq entry 'all) map))))
+
+(defun evil-intercept-keymap-state (map)
+  "Return the state for the intercept keymap MAP.
+A return value of t means all states."
+  (let ((state (lookup-key map [intercept-state] map)))
+    (cond
+     ((keymapp state)
+      (evil-intercept-keymap-state state))
+     ((eq state 'all)
+      t)
+     (t
+      state))))
+
+(defun evil-overriding-keymap-state (map)
+  "Return the state for the overriding keymap MAP.
+A return value of t means all states."
+  (let ((state (lookup-key map [override-state] map)))
+    (cond
+     ((keymapp state)
+      (evil-overriding-keymap-state state))
+     ((eq state 'all)
+      t)
+     (t
+      state))))
+
+(defun evil-set-leader (state key &optional localleader)
+  "Set KEY to trigger leader bindings in STATE.
+KEY should be in the form produced by `kbd'. STATE is one of
+`normal', `insert', `visual', `replace', `operator', `motion',
+`emacs', a list of one or more of these, or `nil', which means
+all of the above. If LOCALLEADER is non-nil, set the local leader
+instead."
+  (let* ((all-states '(normal insert visual replace operator motion emacs))
+         (states (cond ((null state) all-states)
+                       ((consp state) state)
+                       (t (list state))))
+         (leaderkey (if localleader [localleader] [leader]))
+         (binding
+          `(menu-item "" nil :filter ,(lambda (_cmd) (key-binding leaderkey)))))
+    (dolist (state states)
+      (evil-global-set-key state key binding))))
+
+(defmacro evil-define-key (state keymap key def &rest bindings)
+  "Create a STATE binding from KEY to DEF for KEYMAP.
+STATE is one of `normal', `insert', `visual', `replace',
+`operator', `motion', `emacs', or a list of one or more of
+these. Omitting a state by using `nil' corresponds to a standard
+Emacs binding using `define-key'. The remaining arguments are
+like those of `define-key'. For example:
+
+    (evil-define-key \\='normal foo-map \"a\" \\='bar)
+
+This creates a binding from `a' to `bar' in normal state, which
+is active whenever `foo-map' is active. Using nil for the state,
+the following lead to identical bindings:
+
+    (evil-define-key nil foo-map \"a\" \\='bar)
+    (define-key foo-map \"a\" \\='bar)
+
+It is possible to specify multiple states and/or bindings at
+once:
+
+    (evil-define-key \\='(normal visual) foo-map
+      \"a\" \\='bar
+      \"b\" \\='foo)
+
+If `foo-map' has not been initialized yet, this macro adds an
+entry to `after-load-functions', delaying execution as necessary.
+
+KEYMAP may also be a quoted symbol. If the symbol is `global', the
+global evil keymap corresponding to the state(s) is used, meaning
+the following lead to identical bindings:
+
+    (evil-define-key \\='normal \\='global \"a\" \\='bar)
+    (evil-global-set-key \\='normal \"a\" \\='bar)
+
+The symbol `local' may also be used, which corresponds to using
+`evil-local-set-key'. If a quoted symbol is used that is not
+`global' or `local', it is assumed to be the name of a minor
+mode, in which case `evil-define-minor-mode-key' is used.
+
+KEY is an internal Emacs representation of a key, as for
+`define-key'. To bind key sequences that use modifier keys such
+as \"C-a\" or \"M-a\", convert the key sequences using `kbd'.
+For example:
+
+    (evil-define-key \\='normal foo-map (kbd \"C-a\") \\='bar)"
+  (declare (indent defun))
+  (cond
+   ((member keymap '('global 'local))
+    `(evil-define-key* ,state ,keymap ,key ,def ,@bindings))
+   ((eq (car-safe keymap) 'quote)
+    `(evil-define-minor-mode-key ,state ,keymap ,key ,def ,@bindings))
+   (t `(evil-with-delay ,(if (symbolp keymap)
+                             ;; BEWARE: Can't work for lexically scoped vars
+                             `(and (boundp ',keymap) (keymapp ,keymap))
+                           `(keymapp ,keymap))
+           (after-load-functions
+            t nil ,(format "evil-define-key-in-%s"
+                           (if (symbolp keymap) keymap 'keymap)))
+         (with-demoted-errors "Error in evil-define-key: %S"
+           (evil-define-key* ,state ,keymap ,key ,def ,@bindings))))))
+(defalias 'evil-declare-key #'evil-define-key)
+
+(defun evil-define-key* (state keymap key def &rest bindings)
+  "Create a STATE binding from KEY to DEF for KEYMAP.
+STATE is one of normal, insert, visual, replace, operator,
+motion, emacs, or a list of one or more of these. Omitting a
+state by using nil corresponds to a standard Emacs binding using
+`define-key' The remaining arguments are like those of
+`define-key'. For example:
+
+    (evil-define-key* \\='normal foo-map \"a\" \\='bar)
+
+This creates a binding from \"a\" to bar in Normal state, which
+is active whenever foo-map is active. Using nil for the state,
+the following are equivalent:
+
+    (evil-define-key* nil foo-map \"a\" \\='bar)
+
+    (define-key foo-map \"a\" \\='bar)
+
+ It is possible to specify multiple states and/or bindings at
+ once:
+
+    (evil-define-key* \\='(normal visual) foo-map
+      \"a\" \\='bar
+      \"b\" \\='foo)
+
+KEYMAP may also be a quoted symbol. If the symbol is global, the
+global evil keymap corresponding to the state(s) is used, meaning
+the following are equivalent:
+
+    (evil-define-key* \\='normal \\='global \"a\" \\='bar)
+
+    (evil-global-set-key \\='normal \"a\" \\='bar)
+
+The symbol local may also be used, which corresponds to using
+`evil-local-set-key'.
+
+The use is nearly identical to `evil-define-key' with the
+exception that this is a function and not a macro (and so will
+not be expanded when compiled which can have unintended
+consequences). `evil-define-key*' also does not defer any
+bindings like `evil-define-key' does using `evil-with-delay'.  This
+allows errors in the bindings to be caught immediately, and makes
+its behavior more predictable."
+  (declare (indent defun))
+  (let ((maps
+         (if state
+             (mapcar
+              (lambda (st)
+                (cond ((eq keymap 'global)
+                       (evil-state-property st :keymap t))
+                      ((eq keymap 'local)
+                       (evil-state-property st :local-keymap t))
+                      (t
+                       (evil-get-auxiliary-keymap keymap st t t))))
+              (if (listp state) state (list state)))
+           (list
+            (cond ((eq keymap 'global)
+                   global-map)
+                  ((eq keymap 'local)
+                   ;; see `local-set-key'
+                   (or (current-local-map)
+                       (let ((map (make-sparse-keymap)))
+                         (use-local-map map)
+                         map)))
+                  (t
+                   keymap))))))
+    (while key
+      (dolist (map maps)
+        (define-key map key def))
+      (setq key (pop bindings)
+            def (pop bindings)))
+    ;; ensure the prompt string comes first
+    (dolist (map maps)
+      (evil-set-keymap-prompt map (keymap-prompt map)))))
+
+(defun evil-define-minor-mode-key (state mode key def &rest bindings)
+  "Similar to `evil-define-key' but the bindings are associated
+with the minor-mode symbol MODE instead of a particular map.
+Associating bindings with a mode symbol instead of a map allows
+evil to use Emacs' built-in mechanisms to enable the bindings
+automatically when MODE is active without relying on calling
+`evil-normalize-keymaps'. Another less significant difference is
+that the bindings can be created immediately, because this
+function only uses the symbol MODE and does not rely on its
+value.
+
+See `evil-define-key' for the usage of STATE, KEY, DEF and
+BINDINGS."
+  (declare (indent defun))
+  (let ((maps (mapcar
+               (lambda (st)
+                 (evil-get-minor-mode-keymap st mode))
+               (if (listp state) state (list state)))))
+    (while key
+      (dolist (map maps)
+        (define-key map key def))
+      (setq key (pop bindings)
+            def (pop bindings)))))
+
+(defmacro evil-add-hjkl-bindings (keymap &optional state &rest bindings)
+  "Add \"h\", \"j\", \"k\", \"l\" bindings to KEYMAP in STATE.
+Add additional BINDINGS if specified."
+  (declare (indent defun))
+  `(evil-define-key ,state ,keymap
+     "h" (lookup-key evil-motion-state-map "h")
+     "j" (lookup-key evil-motion-state-map "j")
+     "k" (lookup-key evil-motion-state-map "k")
+     "l" (lookup-key evil-motion-state-map "l")
+     ":" (lookup-key evil-motion-state-map ":")
+     ,@bindings))
+
+;; may be useful for programmatic purposes
+(defun evil-global-set-key (state key def)
+  "Bind KEY to DEF in STATE."
+  (define-key (evil-state-property state :keymap t) key def))
+
+(defun evil-local-set-key (state key def)
+  "Bind KEY to DEF in STATE in the current buffer."
+  (define-key (evil-state-property state :local-keymap t) key def))
+
+;; Advise these functions as they may activate an overriding keymap or
+;; a keymap with state bindings; if so, refresh `evil-mode-map-alist'.
+(advice-add 'use-global-map :after #'evil--do-normalize-keymaps)
+(advice-add 'use-local-map :after #'evil--do-normalize-keymaps)
+(defun evil--do-normalize-keymaps (&rest _)
+  "Refresh Evil keymaps."
+  (evil-normalize-keymaps))
+
+
+(defmacro evil-define-state (state doc &rest body)
+  "Define an Evil state STATE.
+DOC is a general description and shows up in all docstrings;
+the first line of the string should be the full name of the state.
+
+BODY is executed each time the state is enabled or disabled.
+
+Optional keyword arguments:
+- `:tag' - the mode line indicator, e.g. \"<T>\".
+- `:message' - string shown in the echo area when the state is
+  activated.
+- `:cursor' - default cursor specification.
+- `:enable' - list of other state keymaps to enable when in this
+  state.
+- `:entry-hook' - list of functions to run when entering this state.
+- `:exit-hook' - list of functions to run when exiting this state.
+- `:suppress-keymap' - if non-nil, effectively disables bindings to
+  `self-insert-command' by making `evil-suppress-map' the parent of
+  the global state keymap.
+
+The global keymap of this state will be `evil-test-state-map',
+the local keymap will be `evil-test-state-local-map', and so on.
+
+\(fn STATE DOC [[KEY VAL]...] BODY...)"
+  (declare (indent defun)
+           (doc-string 2)
+           (debug (&define name
+                           [&optional stringp]
+                           [&rest [keywordp sexp]]
+                           def-body)))
+  (let* ((name (and (string-match "^\\(.+\\)\\(\\(?:.\\|\n\\)*\\)" doc)
+                    (match-string 1 doc)))
+         (doc (match-string 2 doc))
+         (name (and (string-match "^\\(.+?\\)\\.?$" name)
+                    (match-string 1 name)))
+         (doc (if (or (null doc) (string= doc "")) ""
+                (format "\n%s" doc)))
+         (toggle (intern (format "evil-%s-state" state)))
+         (mode (intern (format "%s-minor-mode" toggle)))
+         (keymap (intern (format "%s-map" toggle)))
+         (local (intern (format "%s-local-minor-mode" toggle)))
+         (local-keymap (intern (format "%s-local-map" toggle)))
+         (tag (intern (format "%s-tag" toggle)))
+         (message (intern (format "%s-message" toggle)))
+         (cursor (intern (format "%s-cursor" toggle)))
+         (entry-hook (intern (format "%s-entry-hook" toggle)))
+         (exit-hook (intern (format "%s-exit-hook" toggle)))
+         (modes (intern (format "%s-modes" toggle)))
+         (predicate (intern (format "%s-p" toggle)))
+         arg cursor-value enable entry-hook-value exit-hook-value
+         input-method key message-value suppress-keymap tag-value)
+    ;; collect keywords
+    (while (keywordp (car-safe body))
+      (setq key (pop body)
+            arg (pop body))
+      (cond
+       ((eq key :tag)
+        (setq tag-value arg))
+       ((eq key :message)
+        (setq message-value arg))
+       ((eq key :cursor)
+        (setq cursor-value arg))
+       ((eq key :entry-hook)
+        (setq entry-hook-value arg)
+        (unless (listp entry-hook-value)
+          (setq entry-hook-value (list entry-hook-value))))
+       ((eq key :exit-hook)
+        (setq exit-hook-value arg)
+        (unless (listp exit-hook-value)
+          (setq exit-hook-value (list exit-hook-value))))
+       ((eq key :enable)
+        (setq enable arg))
+       ((eq key :input-method)
+        (setq input-method arg))
+       ((eq key :suppress-keymap)
+        (setq suppress-keymap arg))))
+
+    ;; macro expansion
+    `(progn
+       ;; Save the state's properties in `evil-state-properties' for
+       ;; runtime lookup. Among other things, this information is used
+       ;; to determine what keymaps should be activated by the state
+       ;; (and, when processing :enable, what keymaps are activated by
+       ;; other states). We cannot know this at compile time because
+       ;; it depends on the current buffer and its active keymaps
+       ;; (to which we may have assigned state bindings), as well as
+       ;; states whose definitions may not have been processed yet.
+       (let ((plist (list
+                     :name ',name
+                     :toggle ',toggle
+                     :mode (defvar ,mode nil
+                             ,(format "Non-nil if %s is enabled.
+Use the command `%s' to change this variable." name toggle))
+                     :keymap (defvar ,keymap (make-sparse-keymap)
+                               ,(format "Keymap for %s." name))
+                     :local (defvar ,local nil
+                              ,(format "Non-nil if %s is enabled.
+Use the command `%s' to change this variable." name toggle))
+                     :local-keymap (defvar ,local-keymap nil
+                                     ,(format "Buffer-local keymap for %s." name))
+                     :tag (defvar ,tag ,tag-value
+                            ,(format "Mode line tag for %s." name))
+                     :message (defvar ,message ,message-value
+                                ,(format "Echo area message for %s." name))
+                     :cursor (defvar ,cursor ',cursor-value
+                               ,(format "Cursor for %s.
+May be a cursor type as per `cursor-type', a color string as passed
+to `set-cursor-color', a zero-argument function for changing the
+cursor, or a list of the above.
+
+If set to nil, the value of `evil-default-cursor' is used; if you
+want the nil `cursor-type' (i.e., you want to disable the cursor),
+set this variable to (list nil)." name))
+                     :entry-hook (defvar ,entry-hook nil
+                                   ,(format "Hooks to run when entering %s." name))
+                     :exit-hook (defvar ,exit-hook nil
+                                  ,(format "Hooks to run when exiting %s." name))
+                     :modes (defvar ,modes nil
+                              ,(format "Modes that should come up in %s." name))
+                     :input-method ',input-method
+                     :predicate ',predicate
+                     :enable ',enable)))
+       (evil--add-to-alist evil-state-properties ',state plist))
+
+       ,@(when suppress-keymap
+           `((set-keymap-parent ,keymap evil-suppress-map)))
+
+       (dolist (func ',entry-hook-value) (add-hook ',entry-hook func))
+       (dolist (func ',exit-hook-value) (add-hook ',exit-hook func))
+
+       (defun ,predicate (&optional state)
+         ,(format "Whether the current state is %s.
+\(That is, whether `evil-state' is `%s'.)" name state)
+         (and evil-local-mode
+              (eq (or state evil-state) ',state)))
+
+       ;; define state function
+       (defun ,toggle (&optional arg)
+         ,(format "Enable %s. Disable with negative ARG.
+If ARG is nil, don't display a message in the echo area.%s" name doc)
+         (interactive)
+         (cond
+          ((and (numberp arg) (< arg 1))
+           (setq evil-previous-state evil-state
+                 evil-state nil)
+           (let ((evil-state ',state))
+             (run-hooks ',exit-hook)
+             (setq evil-state nil)
+             (evil-normalize-keymaps)
+             ,@body))
+          (t
+           (unless evil-local-mode (evil-local-mode))
+           (let ((evil-next-state ',state)
+                 input-method-activate-hook input-method-deactivate-hook)
+             (evil-change-state nil)
+             (setq evil-state ',state)
+             (evil--add-to-alist evil-previous-state-alist
+                                 ',state evil-previous-state)
+             (let ((evil-state ',state))
+               (evil-normalize-keymaps)
+               (if ',input-method
+                   (activate-input-method evil-input-method)
+                 ;; BUG #475: Deactivate the current input method only
+                 ;; if there is a function to deactivate it, otherwise
+                 ;; an error would be raised. This strange situation
+                 ;; should not arise in general and there should
+                 ;; probably be a better way to handle this situation.
+                 (when deactivate-current-input-method-function
+                   (deactivate-input-method)))
+               (unless evil-no-display
+                 (when (eq (window-buffer) (current-buffer))
+                   (evil-refresh-cursor ',state))
+                 (evil-refresh-mode-line ',state))
+               ,@body
+               (run-hooks ',entry-hook)
+               (when (and evil-echo-state
+                          arg (not evil-no-display) ,message)
+                 (if (functionp ,message)
+                     (funcall ,message)
+                   (evil-echo "%s" ,message))))))))
+
+       (evil-add-command-properties ',toggle :keep-visual t :suppress-operator t)
+
+       (evil-define-keymap ,keymap nil
+         :mode ,mode
+         :func nil)
+
+       (evil-define-keymap ,local-keymap nil
+         :mode ,local
+         :local t
+         :func nil)
+
+       ',state)))
+
+(provide 'evil-core)
+
+;;; evil-core.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-core.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-core.elc
new file mode 100644
index 0000000..8780bb1
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-core.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-development.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-development.el
new file mode 100644
index 0000000..fb19293
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-development.el
@@ -0,0 +1,49 @@
+;;; evil-development.el --- Useful features for Evil developers -*- lexical-binding: t -*-
+
+;; Author: Justin Burkett <justin at burkett dot cc>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+
+;;; Teach imenu about evil macros
+
+(with-eval-after-load 'lisp-mode
+  (when (boundp 'lisp-imenu-generic-expression)
+    (dolist (macro '("interactive-code"
+                     "type"
+                     "text-object"
+                     "motion"
+                     "command"
+                     "operator"))
+      (let ((macro-name (format "evil-%s" macro)))
+        (unless (assoc macro-name lisp-imenu-generic-expression)
+          (push (list
+                 macro-name
+                 (format "^\\s-*(evil-define-%s\\s-+\\(\\(?:\\sw\\|\\s_\\|\\\\.\\)+\\)"
+                         macro)
+                 1)
+                lisp-imenu-generic-expression))))))
+
+(provide 'evil-development)
+
+;;; evil-development.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-development.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-development.elc
new file mode 100644
index 0000000..46ddd89
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-development.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-digraphs.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-digraphs.el
new file mode 100644
index 0000000..95ffc4f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-digraphs.el
@@ -0,0 +1,1734 @@
+;;; evil-digraphs.el --- Digraphs -*- lexical-binding: t -*-
+
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'evil-vars)
+
+(defgroup evil-digraphs nil
+  "Digraph support based on RFC 1345."
+  :group 'evil
+  :prefix "evil-digraph-")
+
+(defcustom evil-digraphs-table-user nil
+  "List of user-defined digraphs.
+Entries have the form ((?CHAR1 ?CHAR2) . ?DIGRAPH).  That is,
+a cons cell of the digraph and its character replacement,
+where the digraph is a list of two characters.
+See also `evil-digraphs-table'."
+  :type '(alist :key-type (list character character)
+                :value-type character))
+
+(defconst evil-digraphs-table
+  '(((?N ?U) . ?\x00)
+    ((?S ?H) . ?\x01)
+    ((?S ?X) . ?\x02)
+    ((?E ?X) . ?\x03)
+    ((?E ?T) . ?\x04)
+    ((?E ?Q) . ?\x05)
+    ((?A ?K) . ?\x06)
+    ((?B ?L) . ?\x07)
+    ((?B ?S) . ?\x08)
+    ((?H ?T) . ?\x09)
+    ((?L ?F) . ?\x0a)
+    ((?V ?T) . ?\x0b)
+    ((?F ?F) . ?\x0c)
+    ((?C ?R) . ?\x0d)
+    ((?S ?O) . ?\x0e)
+    ((?S ?I) . ?\x0f)
+    ((?D ?L) . ?\x10)
+    ((?D ?1) . ?\x11)
+    ((?D ?2) . ?\x12)
+    ((?D ?3) . ?\x13)
+    ((?D ?4) . ?\x14)
+    ((?N ?K) . ?\x15)
+    ((?S ?Y) . ?\x16)
+    ((?E ?B) . ?\x17)
+    ((?C ?N) . ?\x18)
+    ((?E ?M) . ?\x19)
+    ((?S ?B) . ?\x1a)
+    ((?E ?C) . ?\x1b)
+    ((?F ?S) . ?\x1c)
+    ((?G ?S) . ?\x1d)
+    ((?R ?S) . ?\x1e)
+    ((?U ?S) . ?\x1f)
+    ((?S ?P) . ?\x20)
+    ((?N ?b) . ?\x23)
+    ((?D ?O) . ?\x24)
+    ((?A ?t) . ?\x40)
+    ((?< ?\() . ?\x5b)
+    ((?/ ?/) . ?\x5c)
+    ((?\) ?>) . ?\x5d)
+    ((?' ?>) . ?\x5e)
+    ((?' ?!) . ?\x60)
+    ((?\( ?!) . ?\x7b)
+    ((?! ?!) . ?\x7c)
+    ((?! ?\)) . ?\x7d)
+    ((?' ??) . ?\x7e)
+    ((?D ?T) . ?\x7f)
+    ((?P ?A) . ?\x80)
+    ((?H ?O) . ?\x81)
+    ((?B ?H) . ?\x82)
+    ((?N ?H) . ?\x83)
+    ((?I ?N) . ?\x84)
+    ((?N ?L) . ?\x85)
+    ((?S ?A) . ?\x86)
+    ((?E ?S) . ?\x87)
+    ((?H ?S) . ?\x88)
+    ((?H ?J) . ?\x89)
+    ((?V ?S) . ?\x8a)
+    ((?P ?D) . ?\x8b)
+    ((?P ?U) . ?\x8c)
+    ((?R ?I) . ?\x8d)
+    ((?S ?2) . ?\x8e)
+    ((?S ?3) . ?\x8f)
+    ((?D ?C) . ?\x90)
+    ((?P ?1) . ?\x91)
+    ((?P ?2) . ?\x92)
+    ((?T ?S) . ?\x93)
+    ((?C ?C) . ?\x94)
+    ((?M ?W) . ?\x95)
+    ((?S ?G) . ?\x96)
+    ((?E ?G) . ?\x97)
+    ((?S ?S) . ?\x98)
+    ((?G ?C) . ?\x99)
+    ((?S ?C) . ?\x9a)
+    ((?C ?I) . ?\x9b)
+    ((?S ?T) . ?\x9c)
+    ((?O ?C) . ?\x9d)
+    ((?P ?M) . ?\x9e)
+    ((?A ?C) . ?\x9f)
+    ((?N ?S) . ?\xa0)
+    ((?! ?I) . ?\xa1)
+    ((?C ?t) . ?\xa2)
+    ((?P ?d) . ?\xa3)
+    ((?C ?u) . ?\xa4)
+    ((?Y ?e) . ?\xa5)
+    ((?B ?B) . ?\xa6)
+    ((?S ?E) . ?\xa7)
+    ((?' ?:) . ?\xa8)
+    ((?C ?o) . ?\xa9)
+    ((?- ?a) . ?\xaa)
+    ((?< ?<) . ?\xab)
+    ((?N ?O) . ?\xac)
+    ((?- ?-) . ?\xad)
+    ((?R ?g) . ?\xae)
+    ((?' ?m) . ?\xaf)
+    ((?D ?G) . ?\xb0)
+    ((?+ ?-) . ?\xb1)
+    ((?2 ?S) . ?\xb2)
+    ((?3 ?S) . ?\xb3)
+    ((?' ?') . ?\xb4)
+    ((?M ?y) . ?\xb5)
+    ((?P ?I) . ?\xb6)
+    ((?. ?M) . ?\xb7)
+    ((?' ?,) . ?\xb8)
+    ((?1 ?S) . ?\xb9)
+    ((?- ?o) . ?\xba)
+    ((?> ?>) . ?\xbb)
+    ((?1 ?4) . ?\xbc)
+    ((?1 ?2) . ?\xbd)
+    ((?3 ?4) . ?\xbe)
+    ((?? ?I) . ?\xbf)
+    ((?A ?!) . ?\xc0)
+    ((?A ?') . ?\xc1)
+    ((?A ?>) . ?\xc2)
+    ((?A ??) . ?\xc3)
+    ((?A ?:) . ?\xc4)
+    ((?A ?A) . ?\xc5)
+    ((?A ?E) . ?\xc6)
+    ((?C ?,) . ?\xc7)
+    ((?E ?!) . ?\xc8)
+    ((?E ?') . ?\xc9)
+    ((?E ?>) . ?\xca)
+    ((?E ?:) . ?\xcb)
+    ((?I ?!) . ?\xcc)
+    ((?I ?') . ?\xcd)
+    ((?I ?>) . ?\xce)
+    ((?I ?:) . ?\xcf)
+    ((?D ?-) . ?\xd0)
+    ((?N ??) . ?\xd1)
+    ((?O ?!) . ?\xd2)
+    ((?O ?') . ?\xd3)
+    ((?O ?>) . ?\xd4)
+    ((?O ??) . ?\xd5)
+    ((?O ?:) . ?\xd6)
+    ((?* ?X) . ?\xd7)
+    ((?O ?/) . ?\xd8)
+    ((?U ?!) . ?\xd9)
+    ((?U ?') . ?\xda)
+    ((?U ?>) . ?\xdb)
+    ((?U ?:) . ?\xdc)
+    ((?Y ?') . ?\xdd)
+    ((?T ?H) . ?\xde)
+    ((?s ?s) . ?\xdf)
+    ((?a ?!) . ?\xe0)
+    ((?a ?') . ?\xe1)
+    ((?a ?>) . ?\xe2)
+    ((?a ??) . ?\xe3)
+    ((?a ?:) . ?\xe4)
+    ((?a ?a) . ?\xe5)
+    ((?a ?e) . ?\xe6)
+    ((?c ?,) . ?\xe7)
+    ((?e ?!) . ?\xe8)
+    ((?e ?') . ?\xe9)
+    ((?e ?>) . ?\xea)
+    ((?e ?:) . ?\xeb)
+    ((?i ?!) . ?\xec)
+    ((?i ?') . ?\xed)
+    ((?i ?>) . ?\xee)
+    ((?i ?:) . ?\xef)
+    ((?d ?-) . ?\xf0)
+    ((?n ??) . ?\xf1)
+    ((?o ?!) . ?\xf2)
+    ((?o ?') . ?\xf3)
+    ((?o ?>) . ?\xf4)
+    ((?o ??) . ?\xf5)
+    ((?o ?:) . ?\xf6)
+    ((?- ?:) . ?\xf7)
+    ((?o ?/) . ?\xf8)
+    ((?u ?!) . ?\xf9)
+    ((?u ?') . ?\xfa)
+    ((?u ?>) . ?\xfb)
+    ((?u ?:) . ?\xfc)
+    ((?y ?') . ?\xfd)
+    ((?t ?h) . ?\xfe)
+    ((?y ?:) . ?\xff)
+    ((?A ?-) . ?\x0100)
+    ((?a ?-) . ?\x0101)
+    ((?A ?\() . ?\x0102)
+    ((?a ?\() . ?\x0103)
+    ((?A ?\;) . ?\x0104)
+    ((?a ?\;) . ?\x0105)
+    ((?C ?') . ?\x0106)
+    ((?c ?') . ?\x0107)
+    ((?C ?>) . ?\x0108)
+    ((?c ?>) . ?\x0109)
+    ((?C ?.) . ?\x010a)
+    ((?c ?.) . ?\x010b)
+    ((?C ?<) . ?\x010c)
+    ((?c ?<) . ?\x010d)
+    ((?D ?<) . ?\x010e)
+    ((?d ?<) . ?\x010f)
+    ((?D ?/) . ?\x0110)
+    ((?d ?/) . ?\x0111)
+    ((?E ?-) . ?\x0112)
+    ((?e ?-) . ?\x0113)
+    ((?E ?\() . ?\x0114)
+    ((?e ?\() . ?\x0115)
+    ((?E ?.) . ?\x0116)
+    ((?e ?.) . ?\x0117)
+    ((?E ?\;) . ?\x0118)
+    ((?e ?\;) . ?\x0119)
+    ((?E ?<) . ?\x011a)
+    ((?e ?<) . ?\x011b)
+    ((?G ?>) . ?\x011c)
+    ((?g ?>) . ?\x011d)
+    ((?G ?\() . ?\x011e)
+    ((?g ?\() . ?\x011f)
+    ((?G ?.) . ?\x0120)
+    ((?g ?.) . ?\x0121)
+    ((?G ?,) . ?\x0122)
+    ((?g ?,) . ?\x0123)
+    ((?H ?>) . ?\x0124)
+    ((?h ?>) . ?\x0125)
+    ((?H ?/) . ?\x0126)
+    ((?h ?/) . ?\x0127)
+    ((?I ??) . ?\x0128)
+    ((?i ??) . ?\x0129)
+    ((?I ?-) . ?\x012a)
+    ((?i ?-) . ?\x012b)
+    ((?I ?\() . ?\x012c)
+    ((?i ?\() . ?\x012d)
+    ((?I ?\;) . ?\x012e)
+    ((?i ?\;) . ?\x012f)
+    ((?I ?.) . ?\x0130)
+    ((?i ?.) . ?\x0131)
+    ((?I ?J) . ?\x0132)
+    ((?i ?j) . ?\x0133)
+    ((?J ?>) . ?\x0134)
+    ((?j ?>) . ?\x0135)
+    ((?K ?,) . ?\x0136)
+    ((?k ?,) . ?\x0137)
+    ((?k ?k) . ?\x0138)
+    ((?L ?') . ?\x0139)
+    ((?l ?') . ?\x013a)
+    ((?L ?,) . ?\x013b)
+    ((?l ?,) . ?\x013c)
+    ((?L ?<) . ?\x013d)
+    ((?l ?<) . ?\x013e)
+    ((?L ?.) . ?\x013f)
+    ((?l ?.) . ?\x0140)
+    ((?L ?/) . ?\x0141)
+    ((?l ?/) . ?\x0142)
+    ((?N ?') . ?\x0143)
+    ((?n ?') . ?\x0144)
+    ((?N ?,) . ?\x0145)
+    ((?n ?,) . ?\x0146)
+    ((?N ?<) . ?\x0147)
+    ((?n ?<) . ?\x0148)
+    ((?' ?n) . ?\x0149)
+    ((?N ?G) . ?\x014a)
+    ((?n ?g) . ?\x014b)
+    ((?O ?-) . ?\x014c)
+    ((?o ?-) . ?\x014d)
+    ((?O ?\() . ?\x014e)
+    ((?o ?\() . ?\x014f)
+    ((?O ?\") . ?\x0150)
+    ((?o ?\") . ?\x0151)
+    ((?O ?E) . ?\x0152)
+    ((?o ?e) . ?\x0153)
+    ((?R ?') . ?\x0154)
+    ((?r ?') . ?\x0155)
+    ((?R ?,) . ?\x0156)
+    ((?r ?,) . ?\x0157)
+    ((?R ?<) . ?\x0158)
+    ((?r ?<) . ?\x0159)
+    ((?S ?') . ?\x015a)
+    ((?s ?') . ?\x015b)
+    ((?S ?>) . ?\x015c)
+    ((?s ?>) . ?\x015d)
+    ((?S ?,) . ?\x015e)
+    ((?s ?,) . ?\x015f)
+    ((?S ?<) . ?\x0160)
+    ((?s ?<) . ?\x0161)
+    ((?T ?,) . ?\x0162)
+    ((?t ?,) . ?\x0163)
+    ((?T ?<) . ?\x0164)
+    ((?t ?<) . ?\x0165)
+    ((?T ?/) . ?\x0166)
+    ((?t ?/) . ?\x0167)
+    ((?U ??) . ?\x0168)
+    ((?u ??) . ?\x0169)
+    ((?U ?-) . ?\x016a)
+    ((?u ?-) . ?\x016b)
+    ((?U ?\() . ?\x016c)
+    ((?u ?\() . ?\x016d)
+    ((?U ?0) . ?\x016e)
+    ((?u ?0) . ?\x016f)
+    ((?U ?\") . ?\x0170)
+    ((?u ?\") . ?\x0171)
+    ((?U ?\;) . ?\x0172)
+    ((?u ?\;) . ?\x0173)
+    ((?W ?>) . ?\x0174)
+    ((?w ?>) . ?\x0175)
+    ((?Y ?>) . ?\x0176)
+    ((?y ?>) . ?\x0177)
+    ((?Y ?:) . ?\x0178)
+    ((?Z ?') . ?\x0179)
+    ((?z ?') . ?\x017a)
+    ((?Z ?.) . ?\x017b)
+    ((?z ?.) . ?\x017c)
+    ((?Z ?<) . ?\x017d)
+    ((?z ?<) . ?\x017e)
+    ((?O ?9) . ?\x01a0)
+    ((?o ?9) . ?\x01a1)
+    ((?O ?I) . ?\x01a2)
+    ((?o ?i) . ?\x01a3)
+    ((?y ?r) . ?\x01a6)
+    ((?U ?9) . ?\x01af)
+    ((?u ?9) . ?\x01b0)
+    ((?Z ?/) . ?\x01b5)
+    ((?z ?/) . ?\x01b6)
+    ((?E ?D) . ?\x01b7)
+    ((?A ?<) . ?\x01cd)
+    ((?a ?<) . ?\x01ce)
+    ((?I ?<) . ?\x01cf)
+    ((?i ?<) . ?\x01d0)
+    ((?O ?<) . ?\x01d1)
+    ((?o ?<) . ?\x01d2)
+    ((?U ?<) . ?\x01d3)
+    ((?u ?<) . ?\x01d4)
+    ((?A ?1) . ?\x01de)
+    ((?a ?1) . ?\x01df)
+    ((?A ?7) . ?\x01e0)
+    ((?a ?7) . ?\x01e1)
+    ((?A ?3) . ?\x01e2)
+    ((?a ?3) . ?\x01e3)
+    ((?G ?/) . ?\x01e4)
+    ((?g ?/) . ?\x01e5)
+    ((?G ?<) . ?\x01e6)
+    ((?g ?<) . ?\x01e7)
+    ((?K ?<) . ?\x01e8)
+    ((?k ?<) . ?\x01e9)
+    ((?O ?\;) . ?\x01ea)
+    ((?o ?\;) . ?\x01eb)
+    ((?O ?1) . ?\x01ec)
+    ((?o ?1) . ?\x01ed)
+    ((?E ?Z) . ?\x01ee)
+    ((?e ?z) . ?\x01ef)
+    ((?j ?<) . ?\x01f0)
+    ((?G ?') . ?\x01f4)
+    ((?g ?') . ?\x01f5)
+    ((?\; ?S) . ?\x02bf)
+    ((?' ?<) . ?\x02c7)
+    ((?' ?\() . ?\x02d8)
+    ((?' ?.) . ?\x02d9)
+    ((?' ?0) . ?\x02da)
+    ((?' ?\;) . ?\x02db)
+    ((?' ?\") . ?\x02dd)
+    ((?A ?%) . ?\x0386)
+    ((?E ?%) . ?\x0388)
+    ((?Y ?%) . ?\x0389)
+    ((?I ?%) . ?\x038a)
+    ((?O ?%) . ?\x038c)
+    ((?U ?%) . ?\x038e)
+    ((?W ?%) . ?\x038f)
+    ((?i ?3) . ?\x0390)
+    ((?A ?*) . ?\x0391)
+    ((?B ?*) . ?\x0392)
+    ((?G ?*) . ?\x0393)
+    ((?D ?*) . ?\x0394)
+    ((?E ?*) . ?\x0395)
+    ((?Z ?*) . ?\x0396)
+    ((?Y ?*) . ?\x0397)
+    ((?H ?*) . ?\x0398)
+    ((?I ?*) . ?\x0399)
+    ((?K ?*) . ?\x039a)
+    ((?L ?*) . ?\x039b)
+    ((?M ?*) . ?\x039c)
+    ((?N ?*) . ?\x039d)
+    ((?C ?*) . ?\x039e)
+    ((?O ?*) . ?\x039f)
+    ((?P ?*) . ?\x03a0)
+    ((?R ?*) . ?\x03a1)
+    ((?S ?*) . ?\x03a3)
+    ((?T ?*) . ?\x03a4)
+    ((?U ?*) . ?\x03a5)
+    ((?F ?*) . ?\x03a6)
+    ((?X ?*) . ?\x03a7)
+    ((?Q ?*) . ?\x03a8)
+    ((?W ?*) . ?\x03a9)
+    ((?J ?*) . ?\x03aa)
+    ((?V ?*) . ?\x03ab)
+    ((?a ?%) . ?\x03ac)
+    ((?e ?%) . ?\x03ad)
+    ((?y ?%) . ?\x03ae)
+    ((?i ?%) . ?\x03af)
+    ((?u ?3) . ?\x03b0)
+    ((?a ?*) . ?\x03b1)
+    ((?b ?*) . ?\x03b2)
+    ((?g ?*) . ?\x03b3)
+    ((?d ?*) . ?\x03b4)
+    ((?e ?*) . ?\x03b5)
+    ((?z ?*) . ?\x03b6)
+    ((?y ?*) . ?\x03b7)
+    ((?h ?*) . ?\x03b8)
+    ((?i ?*) . ?\x03b9)
+    ((?k ?*) . ?\x03ba)
+    ((?l ?*) . ?\x03bb)
+    ((?m ?*) . ?\x03bc)
+    ((?n ?*) . ?\x03bd)
+    ((?c ?*) . ?\x03be)
+    ((?o ?*) . ?\x03bf)
+    ((?p ?*) . ?\x03c0)
+    ((?r ?*) . ?\x03c1)
+    ((?* ?s) . ?\x03c2)
+    ((?s ?*) . ?\x03c3)
+    ((?t ?*) . ?\x03c4)
+    ((?u ?*) . ?\x03c5)
+    ((?f ?*) . ?\x03c6)
+    ((?x ?*) . ?\x03c7)
+    ((?q ?*) . ?\x03c8)
+    ((?w ?*) . ?\x03c9)
+    ((?j ?*) . ?\x03ca)
+    ((?v ?*) . ?\x03cb)
+    ((?o ?%) . ?\x03cc)
+    ((?u ?%) . ?\x03cd)
+    ((?w ?%) . ?\x03ce)
+    ((?' ?G) . ?\x03d8)
+    ((?, ?G) . ?\x03d9)
+    ((?T ?3) . ?\x03da)
+    ((?t ?3) . ?\x03db)
+    ((?M ?3) . ?\x03dc)
+    ((?m ?3) . ?\x03dd)
+    ((?K ?3) . ?\x03de)
+    ((?k ?3) . ?\x03df)
+    ((?P ?3) . ?\x03e0)
+    ((?p ?3) . ?\x03e1)
+    ((?' ?%) . ?\x03f4)
+    ((?j ?3) . ?\x03f5)
+    ((?I ?O) . ?\x0401)
+    ((?D ?%) . ?\x0402)
+    ((?G ?%) . ?\x0403)
+    ((?I ?E) . ?\x0404)
+    ((?D ?S) . ?\x0405)
+    ((?I ?I) . ?\x0406)
+    ((?Y ?I) . ?\x0407)
+    ((?J ?%) . ?\x0408)
+    ((?L ?J) . ?\x0409)
+    ((?N ?J) . ?\x040a)
+    ((?T ?s) . ?\x040b)
+    ((?K ?J) . ?\x040c)
+    ((?V ?%) . ?\x040e)
+    ((?D ?Z) . ?\x040f)
+    ((?A ?=) . ?\x0410)
+    ((?B ?=) . ?\x0411)
+    ((?V ?=) . ?\x0412)
+    ((?G ?=) . ?\x0413)
+    ((?D ?=) . ?\x0414)
+    ((?E ?=) . ?\x0415)
+    ((?Z ?%) . ?\x0416)
+    ((?Z ?=) . ?\x0417)
+    ((?I ?=) . ?\x0418)
+    ((?J ?=) . ?\x0419)
+    ((?K ?=) . ?\x041a)
+    ((?L ?=) . ?\x041b)
+    ((?M ?=) . ?\x041c)
+    ((?N ?=) . ?\x041d)
+    ((?O ?=) . ?\x041e)
+    ((?P ?=) . ?\x041f)
+    ((?R ?=) . ?\x0420)
+    ((?S ?=) . ?\x0421)
+    ((?T ?=) . ?\x0422)
+    ((?U ?=) . ?\x0423)
+    ((?F ?=) . ?\x0424)
+    ((?H ?=) . ?\x0425)
+    ((?C ?=) . ?\x0426)
+    ((?C ?%) . ?\x0427)
+    ((?S ?%) . ?\x0428)
+    ((?S ?c) . ?\x0429)
+    ((?= ?\") . ?\x042a)
+    ((?Y ?=) . ?\x042b)
+    ((?% ?\") . ?\x042c)
+    ((?J ?E) . ?\x042d)
+    ((?J ?U) . ?\x042e)
+    ((?J ?A) . ?\x042f)
+    ((?a ?=) . ?\x0430)
+    ((?b ?=) . ?\x0431)
+    ((?v ?=) . ?\x0432)
+    ((?g ?=) . ?\x0433)
+    ((?d ?=) . ?\x0434)
+    ((?e ?=) . ?\x0435)
+    ((?z ?%) . ?\x0436)
+    ((?z ?=) . ?\x0437)
+    ((?i ?=) . ?\x0438)
+    ((?j ?=) . ?\x0439)
+    ((?k ?=) . ?\x043a)
+    ((?l ?=) . ?\x043b)
+    ((?m ?=) . ?\x043c)
+    ((?n ?=) . ?\x043d)
+    ((?o ?=) . ?\x043e)
+    ((?p ?=) . ?\x043f)
+    ((?r ?=) . ?\x0440)
+    ((?s ?=) . ?\x0441)
+    ((?t ?=) . ?\x0442)
+    ((?u ?=) . ?\x0443)
+    ((?f ?=) . ?\x0444)
+    ((?h ?=) . ?\x0445)
+    ((?c ?=) . ?\x0446)
+    ((?c ?%) . ?\x0447)
+    ((?s ?%) . ?\x0448)
+    ((?s ?c) . ?\x0449)
+    ((?= ?') . ?\x044a)
+    ((?y ?=) . ?\x044b)
+    ((?% ?') . ?\x044c)
+    ((?j ?e) . ?\x044d)
+    ((?j ?u) . ?\x044e)
+    ((?j ?a) . ?\x044f)
+    ((?i ?o) . ?\x0451)
+    ((?d ?%) . ?\x0452)
+    ((?g ?%) . ?\x0453)
+    ((?i ?e) . ?\x0454)
+    ((?d ?s) . ?\x0455)
+    ((?i ?i) . ?\x0456)
+    ((?y ?i) . ?\x0457)
+    ((?j ?%) . ?\x0458)
+    ((?l ?j) . ?\x0459)
+    ((?n ?j) . ?\x045a)
+    ((?t ?s) . ?\x045b)
+    ((?k ?j) . ?\x045c)
+    ((?v ?%) . ?\x045e)
+    ((?d ?z) . ?\x045f)
+    ((?Y ?3) . ?\x0462)
+    ((?y ?3) . ?\x0463)
+    ((?O ?3) . ?\x046a)
+    ((?o ?3) . ?\x046b)
+    ((?F ?3) . ?\x0472)
+    ((?f ?3) . ?\x0473)
+    ((?V ?3) . ?\x0474)
+    ((?v ?3) . ?\x0475)
+    ((?C ?3) . ?\x0480)
+    ((?c ?3) . ?\x0481)
+    ((?G ?3) . ?\x0490)
+    ((?g ?3) . ?\x0491)
+    ((?A ?+) . ?\x05d0)
+    ((?B ?+) . ?\x05d1)
+    ((?G ?+) . ?\x05d2)
+    ((?D ?+) . ?\x05d3)
+    ((?H ?+) . ?\x05d4)
+    ((?W ?+) . ?\x05d5)
+    ((?Z ?+) . ?\x05d6)
+    ((?X ?+) . ?\x05d7)
+    ((?T ?j) . ?\x05d8)
+    ((?J ?+) . ?\x05d9)
+    ((?K ?%) . ?\x05da)
+    ((?K ?+) . ?\x05db)
+    ((?L ?+) . ?\x05dc)
+    ((?M ?%) . ?\x05dd)
+    ((?M ?+) . ?\x05de)
+    ((?N ?%) . ?\x05df)
+    ((?N ?+) . ?\x05e0)
+    ((?S ?+) . ?\x05e1)
+    ((?E ?+) . ?\x05e2)
+    ((?P ?%) . ?\x05e3)
+    ((?P ?+) . ?\x05e4)
+    ((?Z ?j) . ?\x05e5)
+    ((?Z ?J) . ?\x05e6)
+    ((?Q ?+) . ?\x05e7)
+    ((?R ?+) . ?\x05e8)
+    ((?S ?h) . ?\x05e9)
+    ((?T ?+) . ?\x05ea)
+    ((?, ?+) . ?\x060c)
+    ((?\; ?+) . ?\x061b)
+    ((?? ?+) . ?\x061f)
+    ((?H ?') . ?\x0621)
+    ((?a ?M) . ?\x0622)
+    ((?a ?H) . ?\x0623)
+    ((?w ?H) . ?\x0624)
+    ((?a ?h) . ?\x0625)
+    ((?y ?H) . ?\x0626)
+    ((?a ?+) . ?\x0627)
+    ((?b ?+) . ?\x0628)
+    ((?t ?m) . ?\x0629)
+    ((?t ?+) . ?\x062a)
+    ((?t ?k) . ?\x062b)
+    ((?g ?+) . ?\x062c)
+    ((?h ?k) . ?\x062d)
+    ((?x ?+) . ?\x062e)
+    ((?d ?+) . ?\x062f)
+    ((?d ?k) . ?\x0630)
+    ((?r ?+) . ?\x0631)
+    ((?z ?+) . ?\x0632)
+    ((?s ?+) . ?\x0633)
+    ((?s ?n) . ?\x0634)
+    ((?c ?+) . ?\x0635)
+    ((?d ?d) . ?\x0636)
+    ((?t ?j) . ?\x0637)
+    ((?z ?H) . ?\x0638)
+    ((?e ?+) . ?\x0639)
+    ((?i ?+) . ?\x063a)
+    ((?+ ?+) . ?\x0640)
+    ((?f ?+) . ?\x0641)
+    ((?q ?+) . ?\x0642)
+    ((?k ?+) . ?\x0643)
+    ((?l ?+) . ?\x0644)
+    ((?m ?+) . ?\x0645)
+    ((?n ?+) . ?\x0646)
+    ((?h ?+) . ?\x0647)
+    ((?w ?+) . ?\x0648)
+    ((?j ?+) . ?\x0649)
+    ((?y ?+) . ?\x064a)
+    ((?: ?+) . ?\x064b)
+    ((?\" ?+) . ?\x064c)
+    ((?= ?+) . ?\x064d)
+    ((?/ ?+) . ?\x064e)
+    ((?' ?+) . ?\x064f)
+    ((?1 ?+) . ?\x0650)
+    ((?3 ?+) . ?\x0651)
+    ((?0 ?+) . ?\x0652)
+    ((?a ?S) . ?\x0670)
+    ((?p ?+) . ?\x067e)
+    ((?v ?+) . ?\x06a4)
+    ((?g ?f) . ?\x06af)
+    ((?0 ?a) . ?\x06f0)
+    ((?1 ?a) . ?\x06f1)
+    ((?2 ?a) . ?\x06f2)
+    ((?3 ?a) . ?\x06f3)
+    ((?4 ?a) . ?\x06f4)
+    ((?5 ?a) . ?\x06f5)
+    ((?6 ?a) . ?\x06f6)
+    ((?7 ?a) . ?\x06f7)
+    ((?8 ?a) . ?\x06f8)
+    ((?9 ?a) . ?\x06f9)
+    ((?B ?.) . ?\x1e02)
+    ((?b ?.) . ?\x1e03)
+    ((?B ?_) . ?\x1e06)
+    ((?b ?_) . ?\x1e07)
+    ((?D ?.) . ?\x1e0a)
+    ((?d ?.) . ?\x1e0b)
+    ((?D ?_) . ?\x1e0e)
+    ((?d ?_) . ?\x1e0f)
+    ((?D ?,) . ?\x1e10)
+    ((?d ?,) . ?\x1e11)
+    ((?F ?.) . ?\x1e1e)
+    ((?f ?.) . ?\x1e1f)
+    ((?G ?-) . ?\x1e20)
+    ((?g ?-) . ?\x1e21)
+    ((?H ?.) . ?\x1e22)
+    ((?h ?.) . ?\x1e23)
+    ((?H ?:) . ?\x1e26)
+    ((?h ?:) . ?\x1e27)
+    ((?H ?,) . ?\x1e28)
+    ((?h ?,) . ?\x1e29)
+    ((?K ?') . ?\x1e30)
+    ((?k ?') . ?\x1e31)
+    ((?K ?_) . ?\x1e34)
+    ((?k ?_) . ?\x1e35)
+    ((?L ?_) . ?\x1e3a)
+    ((?l ?_) . ?\x1e3b)
+    ((?M ?') . ?\x1e3e)
+    ((?m ?') . ?\x1e3f)
+    ((?M ?.) . ?\x1e40)
+    ((?m ?.) . ?\x1e41)
+    ((?N ?.) . ?\x1e44)
+    ((?n ?.) . ?\x1e45)
+    ((?N ?_) . ?\x1e48)
+    ((?n ?_) . ?\x1e49)
+    ((?P ?') . ?\x1e54)
+    ((?p ?') . ?\x1e55)
+    ((?P ?.) . ?\x1e56)
+    ((?p ?.) . ?\x1e57)
+    ((?R ?.) . ?\x1e58)
+    ((?r ?.) . ?\x1e59)
+    ((?R ?_) . ?\x1e5e)
+    ((?r ?_) . ?\x1e5f)
+    ((?S ?.) . ?\x1e60)
+    ((?s ?.) . ?\x1e61)
+    ((?T ?.) . ?\x1e6a)
+    ((?t ?.) . ?\x1e6b)
+    ((?T ?_) . ?\x1e6e)
+    ((?t ?_) . ?\x1e6f)
+    ((?V ??) . ?\x1e7c)
+    ((?v ??) . ?\x1e7d)
+    ((?W ?!) . ?\x1e80)
+    ((?W ?`) . ?\x1e80)
+    ((?w ?!) . ?\x1e81)
+    ((?w ?`) . ?\x1e81)
+    ((?W ?') . ?\x1e82)
+    ((?w ?') . ?\x1e83)
+    ((?W ?:) . ?\x1e84)
+    ((?w ?:) . ?\x1e85)
+    ((?W ?.) . ?\x1e86)
+    ((?w ?.) . ?\x1e87)
+    ((?X ?.) . ?\x1e8a)
+    ((?x ?.) . ?\x1e8b)
+    ((?X ?:) . ?\x1e8c)
+    ((?x ?:) . ?\x1e8d)
+    ((?Y ?.) . ?\x1e8e)
+    ((?y ?.) . ?\x1e8f)
+    ((?Z ?>) . ?\x1e90)
+    ((?z ?>) . ?\x1e91)
+    ((?Z ?_) . ?\x1e94)
+    ((?z ?_) . ?\x1e95)
+    ((?h ?_) . ?\x1e96)
+    ((?t ?:) . ?\x1e97)
+    ((?w ?0) . ?\x1e98)
+    ((?y ?0) . ?\x1e99)
+    ((?A ?2) . ?\x1ea2)
+    ((?a ?2) . ?\x1ea3)
+    ((?E ?2) . ?\x1eba)
+    ((?e ?2) . ?\x1ebb)
+    ((?E ??) . ?\x1ebc)
+    ((?e ??) . ?\x1ebd)
+    ((?I ?2) . ?\x1ec8)
+    ((?i ?2) . ?\x1ec9)
+    ((?O ?2) . ?\x1ece)
+    ((?o ?2) . ?\x1ecf)
+    ((?U ?2) . ?\x1ee6)
+    ((?u ?2) . ?\x1ee7)
+    ((?Y ?!) . ?\x1ef2)
+    ((?Y ?`) . ?\x1ef2)
+    ((?y ?!) . ?\x1ef3)
+    ((?y ?`) . ?\x1ef3)
+    ((?Y ?2) . ?\x1ef6)
+    ((?y ?2) . ?\x1ef7)
+    ((?Y ??) . ?\x1ef8)
+    ((?y ??) . ?\x1ef9)
+    ((?\; ?') . ?\x1f00)
+    ((?, ?') . ?\x1f01)
+    ((?\; ?!) . ?\x1f02)
+    ((?, ?!) . ?\x1f03)
+    ((?? ?\;) . ?\x1f04)
+    ((?? ?,) . ?\x1f05)
+    ((?! ?:) . ?\x1f06)
+    ((?? ?:) . ?\x1f07)
+    ((?1 ?N) . ?\x2002)
+    ((?1 ?M) . ?\x2003)
+    ((?3 ?M) . ?\x2004)
+    ((?4 ?M) . ?\x2005)
+    ((?6 ?M) . ?\x2006)
+    ((?1 ?T) . ?\x2009)
+    ((?1 ?H) . ?\x200a)
+    ((?- ?1) . ?\x2010)
+    ((?- ?N) . ?\x2013)
+    ((?- ?M) . ?\x2014)
+    ((?- ?3) . ?\x2015)
+    ((?! ?2) . ?\x2016)
+    ((?= ?2) . ?\x2017)
+    ((?' ?6) . ?\x2018)
+    ((?' ?9) . ?\x2019)
+    ((?. ?9) . ?\x201a)
+    ((?9 ?') . ?\x201b)
+    ((?\" ?6) . ?\x201c)
+    ((?\" ?9) . ?\x201d)
+    ((?: ?9) . ?\x201e)
+    ((?9 ?\") . ?\x201f)
+    ((?/ ?-) . ?\x2020)
+    ((?/ ?=) . ?\x2021)
+    ((?o ?o) . ?\x2022)
+    ((?. ?.) . ?\x2025)
+    ((?, ?.) . ?\x2026)
+    ((?% ?0) . ?\x2030)
+    ((?1 ?') . ?\x2032)
+    ((?2 ?') . ?\x2033)
+    ((?3 ?') . ?\x2034)
+    ((?1 ?\") . ?\x2035)
+    ((?2 ?\") . ?\x2036)
+    ((?3 ?\") . ?\x2037)
+    ((?C ?a) . ?\x2038)
+    ((?< ?1) . ?\x2039)
+    ((?> ?1) . ?\x203a)
+    ((?: ?X) . ?\x203b)
+    ((?' ?-) . ?\x203e)
+    ((?/ ?f) . ?\x2044)
+    ((?0 ?S) . ?\x2070)
+    ((?4 ?S) . ?\x2074)
+    ((?5 ?S) . ?\x2075)
+    ((?6 ?S) . ?\x2076)
+    ((?7 ?S) . ?\x2077)
+    ((?8 ?S) . ?\x2078)
+    ((?9 ?S) . ?\x2079)
+    ((?+ ?S) . ?\x207a)
+    ((?- ?S) . ?\x207b)
+    ((?= ?S) . ?\x207c)
+    ((?\( ?S) . ?\x207d)
+    ((?\) ?S) . ?\x207e)
+    ((?n ?S) . ?\x207f)
+    ((?0 ?s) . ?\x2080)
+    ((?1 ?s) . ?\x2081)
+    ((?2 ?s) . ?\x2082)
+    ((?3 ?s) . ?\x2083)
+    ((?4 ?s) . ?\x2084)
+    ((?5 ?s) . ?\x2085)
+    ((?6 ?s) . ?\x2086)
+    ((?7 ?s) . ?\x2087)
+    ((?8 ?s) . ?\x2088)
+    ((?9 ?s) . ?\x2089)
+    ((?+ ?s) . ?\x208a)
+    ((?- ?s) . ?\x208b)
+    ((?= ?s) . ?\x208c)
+    ((?\( ?s) . ?\x208d)
+    ((?\) ?s) . ?\x208e)
+    ((?L ?i) . ?\x20a4)
+    ((?P ?t) . ?\x20a7)
+    ((?W ?=) . ?\x20a9)
+    ((?= ?e) . ?\x20ac)
+    ((?E ?u) . ?\x20ac)
+    ((?= ?R) . ?\x20bd)
+    ((?= ?P) . ?\x20bd)
+    ((?o ?C) . ?\x2103)
+    ((?c ?o) . ?\x2105)
+    ((?o ?F) . ?\x2109)
+    ((?N ?0) . ?\x2116)
+    ((?P ?O) . ?\x2117)
+    ((?R ?x) . ?\x211e)
+    ((?S ?M) . ?\x2120)
+    ((?T ?M) . ?\x2122)
+    ((?O ?m) . ?\x2126)
+    ((?A ?O) . ?\x212b)
+    ((?1 ?3) . ?\x2153)
+    ((?2 ?3) . ?\x2154)
+    ((?1 ?5) . ?\x2155)
+    ((?2 ?5) . ?\x2156)
+    ((?3 ?5) . ?\x2157)
+    ((?4 ?5) . ?\x2158)
+    ((?1 ?6) . ?\x2159)
+    ((?5 ?6) . ?\x215a)
+    ((?1 ?8) . ?\x215b)
+    ((?3 ?8) . ?\x215c)
+    ((?5 ?8) . ?\x215d)
+    ((?7 ?8) . ?\x215e)
+    ((?1 ?R) . ?\x2160)
+    ((?2 ?R) . ?\x2161)
+    ((?3 ?R) . ?\x2162)
+    ((?4 ?R) . ?\x2163)
+    ((?5 ?R) . ?\x2164)
+    ((?6 ?R) . ?\x2165)
+    ((?7 ?R) . ?\x2166)
+    ((?8 ?R) . ?\x2167)
+    ((?9 ?R) . ?\x2168)
+    ((?a ?R) . ?\x2169)
+    ((?b ?R) . ?\x216a)
+    ((?c ?R) . ?\x216b)
+    ((?1 ?r) . ?\x2170)
+    ((?2 ?r) . ?\x2171)
+    ((?3 ?r) . ?\x2172)
+    ((?4 ?r) . ?\x2173)
+    ((?5 ?r) . ?\x2174)
+    ((?6 ?r) . ?\x2175)
+    ((?7 ?r) . ?\x2176)
+    ((?8 ?r) . ?\x2177)
+    ((?9 ?r) . ?\x2178)
+    ((?a ?r) . ?\x2179)
+    ((?b ?r) . ?\x217a)
+    ((?c ?r) . ?\x217b)
+    ((?< ?-) . ?\x2190)
+    ((?- ?!) . ?\x2191)
+    ((?- ?>) . ?\x2192)
+    ((?- ?v) . ?\x2193)
+    ((?< ?>) . ?\x2194)
+    ((?U ?D) . ?\x2195)
+    ((?< ?=) . ?\x21d0)
+    ((?= ?>) . ?\x21d2)
+    ((?= ?=) . ?\x21d4)
+    ((?F ?A) . ?\x2200)
+    ((?d ?P) . ?\x2202)
+    ((?T ?E) . ?\x2203)
+    ((?/ ?0) . ?\x2205)
+    ((?D ?E) . ?\x2206)
+    ((?N ?B) . ?\x2207)
+    ((?\( ?-) . ?\x2208)
+    ((?- ?\)) . ?\x220b)
+    ((?* ?P) . ?\x220f)
+    ((?+ ?Z) . ?\x2211)
+    ((?- ?2) . ?\x2212)
+    ((?- ?+) . ?\x2213)
+    ((?* ?-) . ?\x2217)
+    ((?O ?b) . ?\x2218)
+    ((?S ?b) . ?\x2219)
+    ((?R ?T) . ?\x221a)
+    ((?0 ?\() . ?\x221d)
+    ((?0 ?0) . ?\x221e)
+    ((?- ?L) . ?\x221f)
+    ((?- ?V) . ?\x2220)
+    ((?P ?P) . ?\x2225)
+    ((?A ?N) . ?\x2227)
+    ((?O ?R) . ?\x2228)
+    ((?\( ?U) . ?\x2229)
+    ((?\) ?U) . ?\x222a)
+    ((?I ?n) . ?\x222b)
+    ((?D ?I) . ?\x222c)
+    ((?I ?o) . ?\x222e)
+    ((?. ?:) . ?\x2234)
+    ((?: ?.) . ?\x2235)
+    ((?: ?R) . ?\x2236)
+    ((?: ?:) . ?\x2237)
+    ((?? ?1) . ?\x223c)
+    ((?C ?G) . ?\x223e)
+    ((?? ?-) . ?\x2243)
+    ((?? ?=) . ?\x2245)
+    ((?? ?2) . ?\x2248)
+    ((?= ??) . ?\x224c)
+    ((?H ?I) . ?\x2253)
+    ((?! ?=) . ?\x2260)
+    ((?= ?3) . ?\x2261)
+    ((?= ?<) . ?\x2264)
+    ((?> ?=) . ?\x2265)
+    ((?< ?*) . ?\x226a)
+    ((?* ?>) . ?\x226b)
+    ((?! ?<) . ?\x226e)
+    ((?! ?>) . ?\x226f)
+    ((?\( ?C) . ?\x2282)
+    ((?\) ?C) . ?\x2283)
+    ((?\( ?_) . ?\x2286)
+    ((?\) ?_) . ?\x2287)
+    ((?0 ?.) . ?\x2299)
+    ((?0 ?2) . ?\x229a)
+    ((?- ?T) . ?\x22a5)
+    ((?. ?P) . ?\x22c5)
+    ((?: ?3) . ?\x22ee)
+    ((?. ?3) . ?\x22ef)
+    ((?E ?h) . ?\x2302)
+    ((?< ?7) . ?\x2308)
+    ((?> ?7) . ?\x2309)
+    ((?7 ?<) . ?\x230a)
+    ((?7 ?>) . ?\x230b)
+    ((?N ?I) . ?\x2310)
+    ((?\( ?A) . ?\x2312)
+    ((?T ?R) . ?\x2315)
+    ((?I ?u) . ?\x2320)
+    ((?I ?l) . ?\x2321)
+    ((?< ?/) . ?\x2329)
+    ((?/ ?>) . ?\x232a)
+    ((?V ?s) . ?\x2423)
+    ((?1 ?h) . ?\x2440)
+    ((?3 ?h) . ?\x2441)
+    ((?2 ?h) . ?\x2442)
+    ((?4 ?h) . ?\x2443)
+    ((?1 ?j) . ?\x2446)
+    ((?2 ?j) . ?\x2447)
+    ((?3 ?j) . ?\x2448)
+    ((?4 ?j) . ?\x2449)
+    ((?1 ?.) . ?\x2488)
+    ((?2 ?.) . ?\x2489)
+    ((?3 ?.) . ?\x248a)
+    ((?4 ?.) . ?\x248b)
+    ((?5 ?.) . ?\x248c)
+    ((?6 ?.) . ?\x248d)
+    ((?7 ?.) . ?\x248e)
+    ((?8 ?.) . ?\x248f)
+    ((?9 ?.) . ?\x2490)
+    ((?h ?h) . ?\x2500)
+    ((?H ?H) . ?\x2501)
+    ((?v ?v) . ?\x2502)
+    ((?V ?V) . ?\x2503)
+    ((?3 ?-) . ?\x2504)
+    ((?3 ?_) . ?\x2505)
+    ((?3 ?!) . ?\x2506)
+    ((?3 ?/) . ?\x2507)
+    ((?4 ?-) . ?\x2508)
+    ((?4 ?_) . ?\x2509)
+    ((?4 ?!) . ?\x250a)
+    ((?4 ?/) . ?\x250b)
+    ((?d ?r) . ?\x250c)
+    ((?d ?R) . ?\x250d)
+    ((?D ?r) . ?\x250e)
+    ((?D ?R) . ?\x250f)
+    ((?d ?l) . ?\x2510)
+    ((?d ?L) . ?\x2511)
+    ((?D ?l) . ?\x2512)
+    ((?L ?D) . ?\x2513)
+    ((?u ?r) . ?\x2514)
+    ((?u ?R) . ?\x2515)
+    ((?U ?r) . ?\x2516)
+    ((?U ?R) . ?\x2517)
+    ((?u ?l) . ?\x2518)
+    ((?u ?L) . ?\x2519)
+    ((?U ?l) . ?\x251a)
+    ((?U ?L) . ?\x251b)
+    ((?v ?r) . ?\x251c)
+    ((?v ?R) . ?\x251d)
+    ((?V ?r) . ?\x2520)
+    ((?V ?R) . ?\x2523)
+    ((?v ?l) . ?\x2524)
+    ((?v ?L) . ?\x2525)
+    ((?V ?l) . ?\x2528)
+    ((?V ?L) . ?\x252b)
+    ((?d ?h) . ?\x252c)
+    ((?d ?H) . ?\x252f)
+    ((?D ?h) . ?\x2530)
+    ((?D ?H) . ?\x2533)
+    ((?u ?h) . ?\x2534)
+    ((?u ?H) . ?\x2537)
+    ((?U ?h) . ?\x2538)
+    ((?U ?H) . ?\x253b)
+    ((?v ?h) . ?\x253c)
+    ((?v ?H) . ?\x253f)
+    ((?V ?h) . ?\x2542)
+    ((?V ?H) . ?\x254b)
+    ((?F ?D) . ?\x2571)
+    ((?B ?D) . ?\x2572)
+    ((?T ?B) . ?\x2580)
+    ((?L ?B) . ?\x2584)
+    ((?F ?B) . ?\x2588)
+    ((?l ?B) . ?\x258c)
+    ((?R ?B) . ?\x2590)
+    ((?. ?S) . ?\x2591)
+    ((?: ?S) . ?\x2592)
+    ((?? ?S) . ?\x2593)
+    ((?f ?S) . ?\x25a0)
+    ((?O ?S) . ?\x25a1)
+    ((?R ?O) . ?\x25a2)
+    ((?R ?r) . ?\x25a3)
+    ((?R ?F) . ?\x25a4)
+    ((?R ?Y) . ?\x25a5)
+    ((?R ?H) . ?\x25a6)
+    ((?R ?Z) . ?\x25a7)
+    ((?R ?K) . ?\x25a8)
+    ((?R ?X) . ?\x25a9)
+    ((?s ?B) . ?\x25aa)
+    ((?S ?R) . ?\x25ac)
+    ((?O ?r) . ?\x25ad)
+    ((?U ?T) . ?\x25b2)
+    ((?u ?T) . ?\x25b3)
+    ((?P ?R) . ?\x25b6)
+    ((?T ?r) . ?\x25b7)
+    ((?D ?t) . ?\x25bc)
+    ((?d ?T) . ?\x25bd)
+    ((?P ?L) . ?\x25c0)
+    ((?T ?l) . ?\x25c1)
+    ((?D ?b) . ?\x25c6)
+    ((?D ?w) . ?\x25c7)
+    ((?L ?Z) . ?\x25ca)
+    ((?0 ?m) . ?\x25cb)
+    ((?0 ?o) . ?\x25ce)
+    ((?0 ?M) . ?\x25cf)
+    ((?0 ?L) . ?\x25d0)
+    ((?0 ?R) . ?\x25d1)
+    ((?S ?n) . ?\x25d8)
+    ((?I ?c) . ?\x25d9)
+    ((?F ?d) . ?\x25e2)
+    ((?B ?d) . ?\x25e3)
+    ((?* ?2) . ?\x2605)
+    ((?* ?1) . ?\x2606)
+    ((?< ?H) . ?\x261c)
+    ((?> ?H) . ?\x261e)
+    ((?0 ?u) . ?\x263a)
+    ((?0 ?U) . ?\x263b)
+    ((?S ?U) . ?\x263c)
+    ((?F ?m) . ?\x2640)
+    ((?M ?l) . ?\x2642)
+    ((?c ?S) . ?\x2660)
+    ((?c ?H) . ?\x2661)
+    ((?c ?D) . ?\x2662)
+    ((?c ?C) . ?\x2663)
+    ((?M ?d) . ?\x2669)
+    ((?M ?8) . ?\x266a)
+    ((?M ?2) . ?\x266b)
+    ((?M ?b) . ?\x266d)
+    ((?M ?x) . ?\x266e)
+    ((?M ?X) . ?\x266f)
+    ((?O ?K) . ?\x2713)
+    ((?X ?X) . ?\x2717)
+    ((?- ?X) . ?\x2720)
+    ((?I ?S) . ?\x3000)
+    ((?, ?_) . ?\x3001)
+    ((?. ?_) . ?\x3002)
+    ((?+ ?\") . ?\x3003)
+    ((?+ ?_) . ?\x3004)
+    ((?* ?_) . ?\x3005)
+    ((?\; ?_) . ?\x3006)
+    ((?0 ?_) . ?\x3007)
+    ((?< ?+) . ?\x300a)
+    ((?> ?+) . ?\x300b)
+    ((?< ?') . ?\x300c)
+    ((?> ?') . ?\x300d)
+    ((?< ?\") . ?\x300e)
+    ((?> ?\") . ?\x300f)
+    ((?\( ?\") . ?\x3010)
+    ((?\) ?\") . ?\x3011)
+    ((?= ?T) . ?\x3012)
+    ((?= ?_) . ?\x3013)
+    ((?\( ?') . ?\x3014)
+    ((?\) ?') . ?\x3015)
+    ((?\( ?I) . ?\x3016)
+    ((?\) ?I) . ?\x3017)
+    ((?- ??) . ?\x301c)
+    ((?A ?5) . ?\x3041)
+    ((?a ?5) . ?\x3042)
+    ((?I ?5) . ?\x3043)
+    ((?i ?5) . ?\x3044)
+    ((?U ?5) . ?\x3045)
+    ((?u ?5) . ?\x3046)
+    ((?E ?5) . ?\x3047)
+    ((?e ?5) . ?\x3048)
+    ((?O ?5) . ?\x3049)
+    ((?o ?5) . ?\x304a)
+    ((?k ?a) . ?\x304b)
+    ((?g ?a) . ?\x304c)
+    ((?k ?i) . ?\x304d)
+    ((?g ?i) . ?\x304e)
+    ((?k ?u) . ?\x304f)
+    ((?g ?u) . ?\x3050)
+    ((?k ?e) . ?\x3051)
+    ((?g ?e) . ?\x3052)
+    ((?k ?o) . ?\x3053)
+    ((?g ?o) . ?\x3054)
+    ((?s ?a) . ?\x3055)
+    ((?z ?a) . ?\x3056)
+    ((?s ?i) . ?\x3057)
+    ((?z ?i) . ?\x3058)
+    ((?s ?u) . ?\x3059)
+    ((?z ?u) . ?\x305a)
+    ((?s ?e) . ?\x305b)
+    ((?z ?e) . ?\x305c)
+    ((?s ?o) . ?\x305d)
+    ((?z ?o) . ?\x305e)
+    ((?t ?a) . ?\x305f)
+    ((?d ?a) . ?\x3060)
+    ((?t ?i) . ?\x3061)
+    ((?d ?i) . ?\x3062)
+    ((?t ?U) . ?\x3063)
+    ((?t ?u) . ?\x3064)
+    ((?d ?u) . ?\x3065)
+    ((?t ?e) . ?\x3066)
+    ((?d ?e) . ?\x3067)
+    ((?t ?o) . ?\x3068)
+    ((?d ?o) . ?\x3069)
+    ((?n ?a) . ?\x306a)
+    ((?n ?i) . ?\x306b)
+    ((?n ?u) . ?\x306c)
+    ((?n ?e) . ?\x306d)
+    ((?n ?o) . ?\x306e)
+    ((?h ?a) . ?\x306f)
+    ((?b ?a) . ?\x3070)
+    ((?p ?a) . ?\x3071)
+    ((?h ?i) . ?\x3072)
+    ((?b ?i) . ?\x3073)
+    ((?p ?i) . ?\x3074)
+    ((?h ?u) . ?\x3075)
+    ((?b ?u) . ?\x3076)
+    ((?p ?u) . ?\x3077)
+    ((?h ?e) . ?\x3078)
+    ((?b ?e) . ?\x3079)
+    ((?p ?e) . ?\x307a)
+    ((?h ?o) . ?\x307b)
+    ((?b ?o) . ?\x307c)
+    ((?p ?o) . ?\x307d)
+    ((?m ?a) . ?\x307e)
+    ((?m ?i) . ?\x307f)
+    ((?m ?u) . ?\x3080)
+    ((?m ?e) . ?\x3081)
+    ((?m ?o) . ?\x3082)
+    ((?y ?A) . ?\x3083)
+    ((?y ?a) . ?\x3084)
+    ((?y ?U) . ?\x3085)
+    ((?y ?u) . ?\x3086)
+    ((?y ?O) . ?\x3087)
+    ((?y ?o) . ?\x3088)
+    ((?r ?a) . ?\x3089)
+    ((?r ?i) . ?\x308a)
+    ((?r ?u) . ?\x308b)
+    ((?r ?e) . ?\x308c)
+    ((?r ?o) . ?\x308d)
+    ((?w ?A) . ?\x308e)
+    ((?w ?a) . ?\x308f)
+    ((?w ?i) . ?\x3090)
+    ((?w ?e) . ?\x3091)
+    ((?w ?o) . ?\x3092)
+    ((?n ?5) . ?\x3093)
+    ((?v ?u) . ?\x3094)
+    ((?\" ?5) . ?\x309b)
+    ((?0 ?5) . ?\x309c)
+    ((?* ?5) . ?\x309d)
+    ((?+ ?5) . ?\x309e)
+    ((?a ?6) . ?\x30a1)
+    ((?A ?6) . ?\x30a2)
+    ((?i ?6) . ?\x30a3)
+    ((?I ?6) . ?\x30a4)
+    ((?u ?6) . ?\x30a5)
+    ((?U ?6) . ?\x30a6)
+    ((?e ?6) . ?\x30a7)
+    ((?E ?6) . ?\x30a8)
+    ((?o ?6) . ?\x30a9)
+    ((?O ?6) . ?\x30aa)
+    ((?K ?a) . ?\x30ab)
+    ((?G ?a) . ?\x30ac)
+    ((?K ?i) . ?\x30ad)
+    ((?G ?i) . ?\x30ae)
+    ((?K ?u) . ?\x30af)
+    ((?G ?u) . ?\x30b0)
+    ((?K ?e) . ?\x30b1)
+    ((?G ?e) . ?\x30b2)
+    ((?K ?o) . ?\x30b3)
+    ((?G ?o) . ?\x30b4)
+    ((?S ?a) . ?\x30b5)
+    ((?Z ?a) . ?\x30b6)
+    ((?S ?i) . ?\x30b7)
+    ((?Z ?i) . ?\x30b8)
+    ((?S ?u) . ?\x30b9)
+    ((?Z ?u) . ?\x30ba)
+    ((?S ?e) . ?\x30bb)
+    ((?Z ?e) . ?\x30bc)
+    ((?S ?o) . ?\x30bd)
+    ((?Z ?o) . ?\x30be)
+    ((?T ?a) . ?\x30bf)
+    ((?D ?a) . ?\x30c0)
+    ((?T ?i) . ?\x30c1)
+    ((?D ?i) . ?\x30c2)
+    ((?T ?U) . ?\x30c3)
+    ((?T ?u) . ?\x30c4)
+    ((?D ?u) . ?\x30c5)
+    ((?T ?e) . ?\x30c6)
+    ((?D ?e) . ?\x30c7)
+    ((?T ?o) . ?\x30c8)
+    ((?D ?o) . ?\x30c9)
+    ((?N ?a) . ?\x30ca)
+    ((?N ?i) . ?\x30cb)
+    ((?N ?u) . ?\x30cc)
+    ((?N ?e) . ?\x30cd)
+    ((?N ?o) . ?\x30ce)
+    ((?H ?a) . ?\x30cf)
+    ((?B ?a) . ?\x30d0)
+    ((?P ?a) . ?\x30d1)
+    ((?H ?i) . ?\x30d2)
+    ((?B ?i) . ?\x30d3)
+    ((?P ?i) . ?\x30d4)
+    ((?H ?u) . ?\x30d5)
+    ((?B ?u) . ?\x30d6)
+    ((?P ?u) . ?\x30d7)
+    ((?H ?e) . ?\x30d8)
+    ((?B ?e) . ?\x30d9)
+    ((?P ?e) . ?\x30da)
+    ((?H ?o) . ?\x30db)
+    ((?B ?o) . ?\x30dc)
+    ((?P ?o) . ?\x30dd)
+    ((?u ?R) . ?\x2515)
+    ((?U ?r) . ?\x2516)
+    ((?U ?R) . ?\x2517)
+    ((?u ?l) . ?\x2518)
+    ((?u ?L) . ?\x2519)
+    ((?U ?l) . ?\x251a)
+    ((?U ?L) . ?\x251b)
+    ((?v ?r) . ?\x251c)
+    ((?v ?R) . ?\x251d)
+    ((?V ?r) . ?\x2520)
+    ((?V ?R) . ?\x2523)
+    ((?v ?l) . ?\x2524)
+    ((?v ?L) . ?\x2525)
+    ((?V ?l) . ?\x2528)
+    ((?V ?L) . ?\x252b)
+    ((?d ?h) . ?\x252c)
+    ((?d ?H) . ?\x252f)
+    ((?D ?h) . ?\x2530)
+    ((?D ?H) . ?\x2533)
+    ((?u ?h) . ?\x2534)
+    ((?u ?H) . ?\x2537)
+    ((?U ?h) . ?\x2538)
+    ((?U ?H) . ?\x253b)
+    ((?v ?h) . ?\x253c)
+    ((?v ?H) . ?\x253f)
+    ((?V ?h) . ?\x2542)
+    ((?V ?H) . ?\x254b)
+    ((?F ?D) . ?\x2571)
+    ((?B ?D) . ?\x2572)
+    ((?T ?B) . ?\x2580)
+    ((?L ?B) . ?\x2584)
+    ((?F ?B) . ?\x2588)
+    ((?l ?B) . ?\x258c)
+    ((?R ?B) . ?\x2590)
+    ((?. ?S) . ?\x2591)
+    ((?: ?S) . ?\x2592)
+    ((?? ?S) . ?\x2593)
+    ((?f ?S) . ?\x25a0)
+    ((?O ?S) . ?\x25a1)
+    ((?R ?O) . ?\x25a2)
+    ((?R ?r) . ?\x25a3)
+    ((?R ?F) . ?\x25a4)
+    ((?R ?Y) . ?\x25a5)
+    ((?R ?H) . ?\x25a6)
+    ((?R ?Z) . ?\x25a7)
+    ((?R ?K) . ?\x25a8)
+    ((?R ?X) . ?\x25a9)
+    ((?s ?B) . ?\x25aa)
+    ((?S ?R) . ?\x25ac)
+    ((?O ?r) . ?\x25ad)
+    ((?U ?T) . ?\x25b2)
+    ((?u ?T) . ?\x25b3)
+    ((?P ?R) . ?\x25b6)
+    ((?T ?r) . ?\x25b7)
+    ((?D ?t) . ?\x25bc)
+    ((?d ?T) . ?\x25bd)
+    ((?P ?L) . ?\x25c0)
+    ((?T ?l) . ?\x25c1)
+    ((?D ?b) . ?\x25c6)
+    ((?D ?w) . ?\x25c7)
+    ((?L ?Z) . ?\x25ca)
+    ((?0 ?m) . ?\x25cb)
+    ((?0 ?o) . ?\x25ce)
+    ((?0 ?M) . ?\x25cf)
+    ((?0 ?L) . ?\x25d0)
+    ((?0 ?R) . ?\x25d1)
+    ((?S ?n) . ?\x25d8)
+    ((?I ?c) . ?\x25d9)
+    ((?F ?d) . ?\x25e2)
+    ((?B ?d) . ?\x25e3)
+    ((?* ?2) . ?\x2605)
+    ((?* ?1) . ?\x2606)
+    ((?< ?H) . ?\x261c)
+    ((?> ?H) . ?\x261e)
+    ((?0 ?u) . ?\x263a)
+    ((?0 ?U) . ?\x263b)
+    ((?S ?U) . ?\x263c)
+    ((?F ?m) . ?\x2640)
+    ((?M ?l) . ?\x2642)
+    ((?c ?S) . ?\x2660)
+    ((?c ?H) . ?\x2661)
+    ((?c ?D) . ?\x2662)
+    ((?c ?C) . ?\x2663)
+    ((?M ?d) . ?\x2669)
+    ((?M ?8) . ?\x266a)
+    ((?M ?2) . ?\x266b)
+    ((?M ?b) . ?\x266d)
+    ((?M ?x) . ?\x266e)
+    ((?M ?X) . ?\x266f)
+    ((?O ?K) . ?\x2713)
+    ((?X ?X) . ?\x2717)
+    ((?- ?X) . ?\x2720)
+    ((?I ?S) . ?\x3000)
+    ((?, ?_) . ?\x3001)
+    ((?. ?_) . ?\x3002)
+    ((?+ ?\") . ?\x3003)
+    ((?+ ?_) . ?\x3004)
+    ((?* ?_) . ?\x3005)
+    ((?\; ?_) . ?\x3006)
+    ((?0 ?_) . ?\x3007)
+    ((?< ?+) . ?\x300a)
+    ((?> ?+) . ?\x300b)
+    ((?< ?') . ?\x300c)
+    ((?> ?') . ?\x300d)
+    ((?< ?\") . ?\x300e)
+    ((?> ?\") . ?\x300f)
+    ((?\( ?\") . ?\x3010)
+    ((?\) ?\") . ?\x3011)
+    ((?= ?T) . ?\x3012)
+    ((?= ?_) . ?\x3013)
+    ((?\( ?') . ?\x3014)
+    ((?\) ?') . ?\x3015)
+    ((?\( ?I) . ?\x3016)
+    ((?\) ?I) . ?\x3017)
+    ((?- ??) . ?\x301c)
+    ((?A ?5) . ?\x3041)
+    ((?a ?5) . ?\x3042)
+    ((?I ?5) . ?\x3043)
+    ((?i ?5) . ?\x3044)
+    ((?U ?5) . ?\x3045)
+    ((?u ?5) . ?\x3046)
+    ((?E ?5) . ?\x3047)
+    ((?e ?5) . ?\x3048)
+    ((?O ?5) . ?\x3049)
+    ((?o ?5) . ?\x304a)
+    ((?k ?a) . ?\x304b)
+    ((?g ?a) . ?\x304c)
+    ((?k ?i) . ?\x304d)
+    ((?g ?i) . ?\x304e)
+    ((?k ?u) . ?\x304f)
+    ((?g ?u) . ?\x3050)
+    ((?k ?e) . ?\x3051)
+    ((?g ?e) . ?\x3052)
+    ((?k ?o) . ?\x3053)
+    ((?g ?o) . ?\x3054)
+    ((?s ?a) . ?\x3055)
+    ((?z ?a) . ?\x3056)
+    ((?s ?i) . ?\x3057)
+    ((?z ?i) . ?\x3058)
+    ((?s ?u) . ?\x3059)
+    ((?z ?u) . ?\x305a)
+    ((?s ?e) . ?\x305b)
+    ((?z ?e) . ?\x305c)
+    ((?s ?o) . ?\x305d)
+    ((?z ?o) . ?\x305e)
+    ((?t ?a) . ?\x305f)
+    ((?d ?a) . ?\x3060)
+    ((?t ?i) . ?\x3061)
+    ((?d ?i) . ?\x3062)
+    ((?t ?U) . ?\x3063)
+    ((?t ?u) . ?\x3064)
+    ((?d ?u) . ?\x3065)
+    ((?t ?e) . ?\x3066)
+    ((?d ?e) . ?\x3067)
+    ((?t ?o) . ?\x3068)
+    ((?d ?o) . ?\x3069)
+    ((?n ?a) . ?\x306a)
+    ((?n ?i) . ?\x306b)
+    ((?n ?u) . ?\x306c)
+    ((?n ?e) . ?\x306d)
+    ((?n ?o) . ?\x306e)
+    ((?h ?a) . ?\x306f)
+    ((?b ?a) . ?\x3070)
+    ((?p ?a) . ?\x3071)
+    ((?h ?i) . ?\x3072)
+    ((?b ?i) . ?\x3073)
+    ((?p ?i) . ?\x3074)
+    ((?h ?u) . ?\x3075)
+    ((?b ?u) . ?\x3076)
+    ((?p ?u) . ?\x3077)
+    ((?h ?e) . ?\x3078)
+    ((?b ?e) . ?\x3079)
+    ((?p ?e) . ?\x307a)
+    ((?h ?o) . ?\x307b)
+    ((?b ?o) . ?\x307c)
+    ((?p ?o) . ?\x307d)
+    ((?m ?a) . ?\x307e)
+    ((?m ?i) . ?\x307f)
+    ((?m ?u) . ?\x3080)
+    ((?m ?e) . ?\x3081)
+    ((?m ?o) . ?\x3082)
+    ((?y ?A) . ?\x3083)
+    ((?y ?a) . ?\x3084)
+    ((?y ?U) . ?\x3085)
+    ((?y ?u) . ?\x3086)
+    ((?y ?O) . ?\x3087)
+    ((?y ?o) . ?\x3088)
+    ((?r ?a) . ?\x3089)
+    ((?r ?i) . ?\x308a)
+    ((?r ?u) . ?\x308b)
+    ((?r ?e) . ?\x308c)
+    ((?r ?o) . ?\x308d)
+    ((?w ?A) . ?\x308e)
+    ((?w ?a) . ?\x308f)
+    ((?w ?i) . ?\x3090)
+    ((?w ?e) . ?\x3091)
+    ((?w ?o) . ?\x3092)
+    ((?n ?5) . ?\x3093)
+    ((?v ?u) . ?\x3094)
+    ((?\" ?5) . ?\x309b)
+    ((?0 ?5) . ?\x309c)
+    ((?* ?5) . ?\x309d)
+    ((?+ ?5) . ?\x309e)
+    ((?a ?6) . ?\x30a1)
+    ((?A ?6) . ?\x30a2)
+    ((?i ?6) . ?\x30a3)
+    ((?I ?6) . ?\x30a4)
+    ((?u ?6) . ?\x30a5)
+    ((?U ?6) . ?\x30a6)
+    ((?e ?6) . ?\x30a7)
+    ((?E ?6) . ?\x30a8)
+    ((?o ?6) . ?\x30a9)
+    ((?O ?6) . ?\x30aa)
+    ((?K ?a) . ?\x30ab)
+    ((?G ?a) . ?\x30ac)
+    ((?K ?i) . ?\x30ad)
+    ((?G ?i) . ?\x30ae)
+    ((?K ?u) . ?\x30af)
+    ((?G ?u) . ?\x30b0)
+    ((?K ?e) . ?\x30b1)
+    ((?G ?e) . ?\x30b2)
+    ((?K ?o) . ?\x30b3)
+    ((?G ?o) . ?\x30b4)
+    ((?S ?a) . ?\x30b5)
+    ((?Z ?a) . ?\x30b6)
+    ((?S ?i) . ?\x30b7)
+    ((?Z ?i) . ?\x30b8)
+    ((?S ?u) . ?\x30b9)
+    ((?Z ?u) . ?\x30ba)
+    ((?S ?e) . ?\x30bb)
+    ((?Z ?e) . ?\x30bc)
+    ((?S ?o) . ?\x30bd)
+    ((?Z ?o) . ?\x30be)
+    ((?T ?a) . ?\x30bf)
+    ((?D ?a) . ?\x30c0)
+    ((?T ?i) . ?\x30c1)
+    ((?D ?i) . ?\x30c2)
+    ((?T ?U) . ?\x30c3)
+    ((?T ?u) . ?\x30c4)
+    ((?D ?u) . ?\x30c5)
+    ((?T ?e) . ?\x30c6)
+    ((?D ?e) . ?\x30c7)
+    ((?T ?o) . ?\x30c8)
+    ((?D ?o) . ?\x30c9)
+    ((?N ?a) . ?\x30ca)
+    ((?N ?i) . ?\x30cb)
+    ((?N ?u) . ?\x30cc)
+    ((?N ?e) . ?\x30cd)
+    ((?N ?o) . ?\x30ce)
+    ((?H ?a) . ?\x30cf)
+    ((?B ?a) . ?\x30d0)
+    ((?P ?a) . ?\x30d1)
+    ((?H ?i) . ?\x30d2)
+    ((?B ?i) . ?\x30d3)
+    ((?P ?i) . ?\x30d4)
+    ((?H ?u) . ?\x30d5)
+    ((?B ?u) . ?\x30d6)
+    ((?P ?u) . ?\x30d7)
+    ((?H ?e) . ?\x30d8)
+    ((?B ?e) . ?\x30d9)
+    ((?P ?e) . ?\x30da)
+    ((?H ?o) . ?\x30db)
+    ((?B ?o) . ?\x30dc)
+    ((?P ?o) . ?\x30dd)
+    ((?M ?a) . ?\x30de)
+    ((?M ?i) . ?\x30df)
+    ((?M ?u) . ?\x30e0)
+    ((?M ?e) . ?\x30e1)
+    ((?M ?o) . ?\x30e2)
+    ((?Y ?A) . ?\x30e3)
+    ((?Y ?a) . ?\x30e4)
+    ((?Y ?U) . ?\x30e5)
+    ((?Y ?u) . ?\x30e6)
+    ((?Y ?O) . ?\x30e7)
+    ((?Y ?o) . ?\x30e8)
+    ((?R ?a) . ?\x30e9)
+    ((?R ?i) . ?\x30ea)
+    ((?R ?u) . ?\x30eb)
+    ((?R ?e) . ?\x30ec)
+    ((?R ?o) . ?\x30ed)
+    ((?W ?A) . ?\x30ee)
+    ((?W ?a) . ?\x30ef)
+    ((?W ?i) . ?\x30f0)
+    ((?W ?e) . ?\x30f1)
+    ((?W ?o) . ?\x30f2)
+    ((?N ?6) . ?\x30f3)
+    ((?V ?u) . ?\x30f4)
+    ((?K ?A) . ?\x30f5)
+    ((?K ?E) . ?\x30f6)
+    ((?V ?a) . ?\x30f7)
+    ((?V ?i) . ?\x30f8)
+    ((?V ?e) . ?\x30f9)
+    ((?V ?o) . ?\x30fa)
+    ((?. ?6) . ?\x30fb)
+    ((?- ?6) . ?\x30fc)
+    ((?* ?6) . ?\x30fd)
+    ((?+ ?6) . ?\x30fe)
+    ((?b ?4) . ?\x3105)
+    ((?p ?4) . ?\x3106)
+    ((?m ?4) . ?\x3107)
+    ((?f ?4) . ?\x3108)
+    ((?d ?4) . ?\x3109)
+    ((?t ?4) . ?\x310a)
+    ((?n ?4) . ?\x310b)
+    ((?l ?4) . ?\x310c)
+    ((?g ?4) . ?\x310d)
+    ((?k ?4) . ?\x310e)
+    ((?h ?4) . ?\x310f)
+    ((?j ?4) . ?\x3110)
+    ((?q ?4) . ?\x3111)
+    ((?x ?4) . ?\x3112)
+    ((?z ?h) . ?\x3113)
+    ((?c ?h) . ?\x3114)
+    ((?s ?h) . ?\x3115)
+    ((?r ?4) . ?\x3116)
+    ((?z ?4) . ?\x3117)
+    ((?c ?4) . ?\x3118)
+    ((?s ?4) . ?\x3119)
+    ((?a ?4) . ?\x311a)
+    ((?o ?4) . ?\x311b)
+    ((?e ?4) . ?\x311c)
+    ((?a ?i) . ?\x311e)
+    ((?e ?i) . ?\x311f)
+    ((?a ?u) . ?\x3120)
+    ((?o ?u) . ?\x3121)
+    ((?a ?n) . ?\x3122)
+    ((?e ?n) . ?\x3123)
+    ((?a ?N) . ?\x3124)
+    ((?e ?N) . ?\x3125)
+    ((?e ?r) . ?\x3126)
+    ((?i ?4) . ?\x3127)
+    ((?u ?4) . ?\x3128)
+    ((?i ?u) . ?\x3129)
+    ((?v ?4) . ?\x312a)
+    ((?n ?G) . ?\x312b)
+    ((?g ?n) . ?\x312c)
+    ((?1 ?c) . ?\x3220)
+    ((?2 ?c) . ?\x3221)
+    ((?3 ?c) . ?\x3222)
+    ((?4 ?c) . ?\x3223)
+    ((?5 ?c) . ?\x3224)
+    ((?6 ?c) . ?\x3225)
+    ((?7 ?c) . ?\x3226)
+    ((?8 ?c) . ?\x3227)
+    ((?9 ?c) . ?\x3228)
+    ((?\s ?\s) . ?\xe000)
+    ((?/ ?c) . ?\xe001)
+    ((?U ?A) . ?\xe002)
+    ((?U ?B) . ?\xe003)
+    ((?\" ?3) . ?\xe004)
+    ((?\" ?1) . ?\xe005)
+    ((?\" ?!) . ?\xe006)
+    ((?\" ?') . ?\xe007)
+    ((?\" ?>) . ?\xe008)
+    ((?\" ??) . ?\xe009)
+    ((?\" ?-) . ?\xe00a)
+    ((?\" ?\() . ?\xe00b)
+    ((?\" ?.) . ?\xe00c)
+    ((?\" ?:) . ?\xe00d)
+    ((?\" ?0) . ?\xe00e)
+    ((?\" ?\") . ?\xe00f)
+    ((?\" ?<) . ?\xe010)
+    ((?\" ?,) . ?\xe011)
+    ((?\" ?\;) . ?\xe012)
+    ((?\" ?_) . ?\xe013)
+    ((?\" ?=) . ?\xe014)
+    ((?\" ?/) . ?\xe015)
+    ((?\" ?i) . ?\xe016)
+    ((?\" ?d) . ?\xe017)
+    ((?\" ?p) . ?\xe018)
+    ((?\; ?\;) . ?\xe019)
+    ((?, ?,) . ?\xe01a)
+    ((?b ?3) . ?\xe01b)
+    ((?C ?i) . ?\xe01c)
+    ((?f ?\() . ?\xe01d)
+    ((?e ?d) . ?\xe01e)
+    ((?a ?m) . ?\xe01f)
+    ((?p ?m) . ?\xe020)
+    ((?F ?l) . ?\xe023)
+    ((?G ?F) . ?\xe024)
+    ((?> ?V) . ?\xe025)
+    ((?! ?*) . ?\xe026)
+    ((?? ?*) . ?\xe027)
+    ((?J ?<) . ?\xe028)
+    ((?f ?f) . ?\xfb00)
+    ((?f ?i) . ?\xfb01)
+    ((?f ?l) . ?\xfb02)
+    ((?f ?t) . ?\xfb05)
+    ((?s ?t) . ?\xfb06)
+    ((?~ ?!) . ?\x00a1)
+    ((?c ?|) . ?\x00a2)
+    ((?$ ?$) . ?\x00a3)
+    ((?o ?x) . ?\x00a4)
+    ((?Y ?-) . ?\x00a5)
+    ((?| ?|) . ?\x00a6)
+    ((?c ?O) . ?\x00a9)
+    ((?- ?,) . ?\x00ac)
+    ((?- ?=) . ?\x00af)
+    ((?~ ?o) . ?\x00b0)
+    ((?2 ?2) . ?\x00b2)
+    ((?3 ?3) . ?\x00b3)
+    ((?p ?p) . ?\x00b6)
+    ((?~ ?.) . ?\x00b7)
+    ((?1 ?1) . ?\x00b9)
+    ((?~ ??) . ?\x00bf)
+    ((?A ?`) . ?\x00c0)
+    ((?A ?^) . ?\x00c2)
+    ((?A ?~) . ?\x00c3)
+    ((?A ?\") . ?\x00c4)
+    ((?A ?@) . ?\x00c5)
+    ((?E ?`) . ?\x00c8)
+    ((?E ?^) . ?\x00ca)
+    ((?E ?\") . ?\x00cb)
+    ((?I ?`) . ?\x00cc)
+    ((?I ?^) . ?\x00ce)
+    ((?I ?\") . ?\x00cf)
+    ((?N ?~) . ?\x00d1)
+    ((?O ?`) . ?\x00d2)
+    ((?O ?^) . ?\x00d4)
+    ((?O ?~) . ?\x00d5)
+    ((?/ ?\\) . ?\x00d7)
+    ((?U ?`) . ?\x00d9)
+    ((?U ?^) . ?\x00db)
+    ((?I ?p) . ?\x00de)
+    ((?a ?`) . ?\x00e0)
+    ((?a ?^) . ?\x00e2)
+    ((?a ?~) . ?\x00e3)
+    ((?a ?\") . ?\x00e4)
+    ((?a ?@) . ?\x00e5)
+    ((?e ?`) . ?\x00e8)
+    ((?e ?^) . ?\x00ea)
+    ((?e ?\") . ?\x00eb)
+    ((?i ?`) . ?\x00ec)
+    ((?i ?^) . ?\x00ee)
+    ((?n ?~) . ?\x00f1)
+    ((?o ?`) . ?\x00f2)
+    ((?o ?^) . ?\x00f4)
+    ((?o ?~) . ?\x00f5)
+    ((?u ?`) . ?\x00f9)
+    ((?u ?^) . ?\x00fb)
+    ((?y ?\") . ?\x00ff))
+  "Table of default digraphs.
+This includes all digraphs defined in RFC 1345,
+as well as miscellaneous digraphs for multi-byte characters.
+See also `evil-digraphs-table-user'.")
+
+;;;###autoload
+(defun evil-digraph (digraph)
+  "Convert DIGRAPH to character or list representation.
+If DIGRAPH is a list (CHAR1 CHAR2), return the corresponding character;
+if DIGRAPH is a character, return the corresponding list.
+Searches in `evil-digraphs-table-user' and `evil-digraphs-table'."
+  (if (listp digraph)
+      (or (cdr (assoc digraph evil-digraphs-table-user))
+          (cdr (assoc digraph evil-digraphs-table))
+          (cl-destructuring-bind (char1 char2) digraph
+            (unless (eq char1 char2)
+              (or (cdr (assoc (list char2 char1) evil-digraphs-table-user))
+                  (cdr (assoc (list char2 char1) evil-digraphs-table))))))
+    (or (car (rassoc digraph evil-digraphs-table-user))
+        (car (rassoc digraph evil-digraphs-table)))))
+
+(provide 'evil-digraphs)
+
+;;; evil-digraphs.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-digraphs.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-digraphs.elc
new file mode 100644
index 0000000..8a2b57d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-digraphs.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-ex.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-ex.el
new file mode 100644
index 0000000..2f69eef
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-ex.el
@@ -0,0 +1,939 @@
+;;; evil-ex.el --- Ex mode  -*- lexical-binding: t; -*-
+
+;; Author: Frank Fischer <frank fischer at mathematik.tu-chemnitz.de>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Ex is implemented as an extensible minilanguage, whose grammar
+;; is stored in `evil-ex-grammar'.  Ex commands are defined with
+;; `evil-ex-define-cmd', which creates a binding from a string
+;; to an interactive function.  It is also possible to define key
+;; sequences which execute a command immediately when entered:
+;; such shortcuts go in `evil-ex-shortcut-map'.
+
+;; To provide buffer and filename completion, as well as interactive
+;; feedback, Ex defines the concept of an argument handler, specified
+;; with `evil-ex-define-argument-type'.  In the case of the
+;; substitution command (":s/foo/bar"), the handler incrementally
+;; highlights matches in the buffer as the substitution is typed.
+
+;;; Code:
+
+(require 'evil-common)
+(require 'evil-states)
+
+(declare-function evil-goto-line "evil-commands")
+
+(eval-when-compile
+  (defconst evil-ex-grammar
+    '((expression
+       (count command argument #'evil-ex-call-command)
+       ((\? range) command argument #'evil-ex-call-command)
+       (line #'evil-goto-line)
+       (sexp #'eval-expression))
+      (count
+       number)
+      (command #'evil-ex-parse-command)
+      (binding
+       "[~&*@<>=:#]+\\|[[:alpha:]_]+\\|!")
+      (emacs-binding
+       "[[:alpha:]-][[:alnum:][:punct:]]*")
+      (argument
+       ((\? "\\(?:.\\|\n\\)+") #'$1))
+      (range
+       ("%" #'(evil-ex-full-range))
+       ("*" #'(evil-ex-last-visual-range))
+       ((\? line) "[,;]" (\? line)
+        #'(let ((l1 $1))
+            (save-excursion
+              (and l1 (string= $2 ";") (goto-line l1))
+              (evil-ex-range l1 $3))))
+       (line #'evil-ex-range)
+       ("`" marker-name ",`" marker-name
+        #'(evil-ex-char-marker-range $2 $4)))
+      (line
+       ((\? base) (\? offset) search (\? offset)
+        #'(save-excursion
+            (goto-line (evil-ex-line $1 $2))
+            (evil-ex-line $3 $4)))
+       (base (\? offset) #'evil-ex-line)
+       (nil offset #'evil-ex-line))
+      (base
+       number
+       ("'" marker-name #'(evil-ex-marker $2))
+       search
+       ("\\^" #'(evil-ex-first-line))
+       ("\\$" #'(evil-ex-last-line))
+       ("\\." #'(evil-ex-current-line)))
+      (offset
+       (+ signed-number #'+))
+      ;; TODO - handle offset & ;next-pattern search elements
+      (search
+       forward
+       backward
+       next
+       prev
+       subst)
+      (forward
+       ("/" "\\(?:\\\\.\\|[^/]\\)+" "/\\|$" #'(evil-ex-re-fwd $2)))
+      (backward
+       ("?" "\\(?:\\\\.\\|[^?]\\)+" "?\\|$" #'(evil-ex-re-bwd $2)))
+      (marker-name
+       "[]\\[-a-zA-Z_<>'}{)(]")
+      (next
+       "\\\\/" #'(evil-ex-prev-search))
+      (prev
+       "\\\\\\?" #'(evil-ex-prev-search))
+      (subst
+       "\\\\&" #'(evil-ex-prev-search))
+      (signed-number
+       (sign (\? number) #'evil-ex-signed-number))
+      (sign
+       "[+-]" #'intern)
+      (number
+       "[0-9]+" #'string-to-number)
+      (sexp
+       "(.*)?" #'(car (read-from-string $0))))
+    "Grammar for Ex.
+An association list of syntactic symbols and their definitions.
+The first entry is the start symbol.  A symbol's definition may
+reference other symbols, but the grammar cannot contain
+left recursion.  See `evil-parser' for a detailed explanation
+of the syntax.")
+
+  (defun evil-parser--dexp (obj)
+    "Parse a numerical dollar-sign symbol.
+Given e.g. $4, return 4."
+    (when (symbolp obj)
+      (let ((str (symbol-name obj)))
+        (when (string-match "\\`\\$\\([0-9]+\\)\\'" str)
+          (string-to-number (match-string 1 str))))))
+
+  (defmacro evil-parser (grammar &rest entrypoints)
+    "Construct a parser for GRAMMAR with ENTRYPOINTS.
+The result is a function taking the arguments SYMBOL and SYNTAX, that
+parses the text after point. SYMBOL should be one of ENTRYPOINTS.
+
+If parsing succeeds, point is moved to the end of the parsed text and
+a 1-tuple (RESULT) is returned. Otherwise, the return value is nil.
+
+GRAMMAR is an association list of symbols and their definitions.
+A definition is a list of production rules, which are tried in
+succession. A production rule can be one of the following:
+
+    nil matches the empty string.
+    A regular expression matches a substring.
+    A symbol matches a production for that symbol.
+    (X Y) matches X followed by Y.
+    (\\? X) matches zero or one of X.
+    (* X) matches zero or more of X.
+    (+ X) matches one or more of X.
+    (& X) matches X, but does not consume.
+    (! X) matches anything but X, but does not consume.
+
+Thus, a simple grammar may look like:
+
+    ((plus \"\\\\+\")       ; plus <- \"+\"
+     (minus \"-\")          ; minus <- \"-\"
+     (operator plus minus)) ; operator <- plus / minus
+
+All input-consuming rules have a value. A regular expression evaluates
+to the text matched, while a list evaluates to a list of values.
+The value of a list may be overridden with a semantic action, which is
+specified with a #\\='-quoted expression at the end:
+
+    (X Y #\\='foo)
+
+The value of this rule is the result of calling foo with the values
+of X and Y as arguments. Alternatively, the function call may be
+specified explicitly:
+
+    (X Y #\\='(foo $1 $2))
+
+Here, $1 refers to X and $2 refers to Y. $0 refers to the whole list.
+Dollar expressions can also be used directly:
+
+    (X Y #\\='$1)
+
+This matches X followed by Y, but ignores the value of Y;
+the value of the list is the same as the value of X.
+
+If the SYNTAX argument is non-nil, then all semantic actions
+are ignored, and a syntax tree is constructed instead. The
+syntax tree obeys the property that all the leaf nodes are
+parts of the input string. Thus, by traversing the syntax tree,
+one can determine how each character was parsed.
+
+The following symbols have reserved meanings within a grammar:
+`\\?', `*', `+', `&', `!', `function', `alt', `seq' and nil."
+    (cl-labels
+        ;; Return code for parsing PRODUCTION.
+        ((compile
+          (production)
+          (pcase production
+            ('nil '(list (when syntax (point)))) ; Epsilon
+            ((and (pred stringp) regexp) ; Token
+             `(when (progn
+                      (skip-chars-forward " \t\n\r") ; Ignore leading whitespace
+                      (looking-at ,regexp))
+                (goto-char (match-end 0))
+                (list (if syntax (point) (match-string 0)))))
+            ((and (pred symbolp) symbol) ; Symbol
+             `(let ((result (,symbol syntax)))
+                (and syntax result (push ',symbol (car result)))
+                result))
+            (`(function ,fun) ; Function
+             `(let ((result (funcall #',fun)))
+                (and syntax result (setcar result (point)))
+                result))
+            ;; Positive lookahead
+            (`(& . ,rule) `(when ,(compile rule) ,(compile nil)))
+            ;; Negative lookahead
+            (`(! . ,rule) `(unless ,(compile rule) ,(compile nil)))
+            ;; Zero or one
+            (`(\? . ,(or `(,rule) rule)) (compile `(alt ,rule nil)))
+            ;; Zero or more
+            (`(* . ,rules) (compile `(alt (+ ,@rules) nil)))
+            ;; Lists
+            ((or `(,(and (or '+ 'alt 'seq) symbol) . ,rules)
+                 (and (pred listp) rules (let symbol 'seq)))
+             (let ((func (unless (eq symbol 'alt) #'list)))
+               (pcase (when (> (length rules) 1) (car (last rules)))
+                 (`(function ,x) (setq func x
+                                       rules (butlast rules))))
+               `(let ((cell
+                       ,(pcase symbol
+                          ('+ ; One or more
+                           (when (cdr rules) (error "Too many `+' rules"))
+                           `(cl-loop for x = ,(compile (car rules))
+                                     while x collect (car x) into result until (eobp)
+                                     finally return (when result (list result))))
+                          ('alt `(or ,@(mapcar #'compile rules)))
+                          ('seq
+                           (cl-loop
+                            for rule in rules collect
+                            (macroexp-let2 nil x (compile rule)
+                              (if (memq (car-safe rule) '(& !)) x
+                                `(when ,x (push (car ,x) result))))
+                            into items finally return
+                            `(let ((pos (point)) result)
+                               (if (and ,@items) (list (nreverse result))
+                                 (goto-char pos)
+                                 nil)))))))
+                  ;; Semantic action
+                  (when (and ',func cell (not syntax))
+                    (setcar
+                     cell
+                     (let ((result (car cell)))
+                       (ignore result) ; Suppress unused var warning
+                       ,(pcase func
+                          ;; Dollar expression
+                          ((or (pred evil-parser--dexp) (pred listp))
+                           (dval func))
+                          ((pred symbolp)
+                           `(,(if (eq symbol 'alt) #'list #'cons) #',func result))
+                          (_ (error "Invalid semantic action `%S'" func))))))
+                  cell)))))
+         ;; Substitute all dollar-sign symbols in X.
+         ;; Each dollar-sign symbol is replaced with the corresponding
+         ;; element in RESULT, so that $1 becomes the first element, etc.
+         ;; The special value $0 is substituted with the whole list RESULT.
+         (dval
+          (x)
+          (if (listp x) (cons #'list (mapcar #'dval x))
+            (let ((num (evil-parser--dexp x)))
+              (cond ((null num) `',x)
+                    ((eq num 0) 'result)
+                    (t `(nth (1- ,num) result)))))))
+      `(lambda (symbol &optional syntax)
+         (cl-labels
+             (,@(cl-loop for (symbol . def) in (eval grammar t) collect
+                         `(,symbol (syntax) ,(compile `(alt . ,def))))
+              (evil-ex-parse-command
+               ()
+               (let* ((result (binding nil))
+                      (command (car result)))
+                 (cond
+                  ((not result) nil)
+                  ;; Check whether the parsed command is followed by a slash,
+                  ;; dash or number and either the part before is NOT known to be
+                  ;; a binding, or the complete string IS known to be a binding.
+                  ((and (let ((ch (char-after)))
+                          (and ch (or (memq ch '(?- ?/)) (<= ?0 ch ?9))))
+                        (or (evil-ex-binding
+                             (concat command (buffer-substring (point) (point-max))) t)
+                            (not (evil-ex-binding command t))))
+                   (backward-char (length command))
+                   (emacs-binding nil))
+                  ;; Parse a following "!" as bang only if the command
+                  ;; has the property :ex-bang t.
+                  ((when (eq (char-after) ?!)
+                     (let ((binding (evil-ex-completed-binding command t)))
+                       (and binding (evil-get-command-property binding :ex-bang))))
+                   (forward-char)
+                   (setcar result (concat command "!"))
+                   result)
+                  (t result)))))
+           (pcase symbol
+             ,@(cl-loop for sym in entrypoints collect `(',sym ,(compile sym)))
+             (_ (error "Unknown entrypoint `%s'" symbol))))))))
+
+(defvar evil-ex-argument-types nil
+  "Association list of argument handlers.")
+
+(defvar evil-ex-commands nil
+  "Association list of command bindings and functions.")
+
+(defvar evil-ex-reverse-range nil
+  "Whether the current Ex range was entered reversed.")
+
+(defvar evil--ex-cmd nil
+  "The current Ex command string.")
+
+(defvar evil--ex-argument-handler nil
+  "The argument handler for the current Ex command.")
+
+(defvar evil--ex-shortcut-command nil
+  "Interactive command to use instead of an Ex command.")
+
+(define-error 'evil-ex-error "Ex syntax error")
+
+(defun evil-ex-p ()
+  "Return non-nil if currently in Ex state."
+  (when evil-ex-original-buffer t))
+
+(evil-define-command evil-ex (&optional initial-input)
+  "Enter an Ex command.
+The Ex command line is initialized with the value of INITIAL-INPUT. If
+the command is called interactively the initial input depends on the
+current state. In Normal state if a prefix count is given then the
+initial input is \".,.+count\", otherwise it is empty. In Visual state
+the initial input is the visual region '<,'> or `<,`>. The variable
+`evil-ex-initial-input', if non-nil, is appended to the line."
+  :keep-visual t
+  :repeat abort
+  (interactive
+   (let ((s (concat
+             (cond
+              ((and (evil-visual-state-p)
+                    evil-ex-visual-char-range
+                    (memq (evil-visual-type) '(inclusive exclusive)))
+               "`<,`>")
+              ((evil-visual-state-p) "'<,'>")
+              (current-prefix-arg
+               (let ((arg (prefix-numeric-value current-prefix-arg)))
+                 (cond ((< arg 0) (setq arg (1+ arg)))
+                       ((> arg 0) (setq arg (1- arg))))
+                 (if (= arg 0) "." (format ".,.%+d" arg)))))
+             evil-ex-initial-input)))
+     (list (unless (string= s "") s))))
+  (let ((buffer (current-buffer))
+        (previous-command (when evil-want-empty-ex-last-command
+                            (car evil-ex-history)))
+        s evil--ex-cmd evil--ex-argument-handler evil--ex-shortcut-command)
+    (minibuffer-with-setup-hook
+        (lambda ()
+          (setq-local evil-ex-original-buffer buffer)
+          (evil-ex-setup)
+          (if initial-input (evil--ex-update)
+            (when previous-command
+              (add-hook 'pre-command-hook #'evil-ex-remove-default nil t))))
+      (setq s (read-from-minibuffer
+               ":"
+               (or initial-input
+                   (and previous-command (propertize previous-command 'face 'shadow)))
+               evil-ex-completion-map nil 'evil-ex-history)))
+    (if evil--ex-shortcut-command
+        (call-interactively evil--ex-shortcut-command)
+      (when (string= s "") (setq s previous-command))
+      (unless (string= s "") (evil-ex-execute s)))))
+
+(defun evil-ex-execute (string)
+  "Execute STRING as an Ex command."
+  (eval (or (evil-ex-parse string) (signal 'evil-ex-error string)) t))
+
+(defun evil-ex-parse (&optional string syntax entrypoint)
+  "Parse STRING as an Ex expression and return its evaluation tree.
+If STRING is nil, parse the text after point instead.  If SYNTAX is
+non-nil, return a syntax tree instead.  ENTRYPOINT is the start
+symbol, which defaults to `expression'."
+  (if string
+      (with-temp-buffer
+        (insert string)
+        (goto-char (point-min))
+        (evil-ex-parse nil syntax entrypoint))
+    (let ((result (funcall (evil-parser evil-ex-grammar expression range)
+                           (or entrypoint 'expression) syntax)))
+      (and result
+           ;; Disallow incomplete matches (ignore trailing WS)
+           (not (search-forward "[^ \t\n\r]" nil t))
+           (car result)))))
+
+(defun evil-ex-delete-backward-char ()
+  "Close the minibuffer if it is empty, otherwise call `delete-backward-char'."
+  (interactive)
+  (call-interactively
+   (if (< (minibuffer-prompt-end) (point-max))
+       #'delete-backward-char
+     #'abort-recursive-edit)))
+
+(cl-defstruct (evil-ex-argument-handler (:type list) (:constructor nil)
+                                        (:copier nil) (:predicate nil))
+  (runner nil :read-only t) (completer nil :read-only t))
+
+(defun evil-ex-setup ()
+  "Initialize Ex minibuffer.
+This function registers hooks that are used for the interactive
+actions during Ex state."
+  (add-hook 'after-change-functions #'evil--ex-update nil t)
+  (add-hook 'minibuffer-exit-hook #'evil-ex-teardown nil t)
+  (add-hook 'completion-at-point-functions #'evil-ex-completion-at-point nil t))
+
+(defsubst evil--ex-bang-p (command)
+  "Return non-nil if the string COMMAND has a \"!\" suffix."
+  (and (> (length command) 1) (eq (aref command (1- (length command))) ?!)))
+
+(defun evil--ex-update (&optional beg _end _old-len)
+  "Update Ex variables when the minibuffer changes.
+This function is usually called from `after-change-functions'
+hook. If BEG is non-nil (which is the case when called from
+`after-change-functions'), then an error description is shown
+in case of incomplete or unknown commands."
+  (when (and beg (eq this-command #'self-insert-command))
+    (let ((cmd (lookup-key evil-ex-shortcut-map (minibuffer-contents-no-properties))))
+      (when (commandp cmd)
+        (setq evil--ex-shortcut-command cmd)
+        (exit-minibuffer))))
+
+  (setq evil--ex-cmd nil)
+  (let ((expr (save-excursion (goto-char (minibuffer-prompt-end))
+                              (evil-ex-parse)))
+        func handler current-prefix-arg evil-ex-range evil-ex-bang evil-ex-argument)
+    (when (eq (car expr) #'evil-ex-call-command)
+      (with-current-buffer evil-ex-original-buffer
+        (let* ((range (eval (nth 1 expr) t))
+               (count (when (integerp range) range)))
+          (setq current-prefix-arg count
+                evil-ex-range (if count (evil-ex-range count count) range)
+                evil--ex-cmd (eval (nth 2 expr) t)
+                evil-ex-bang (evil--ex-bang-p evil--ex-cmd)
+                evil-ex-argument (eval (nth 3 expr) t))))
+      (cond
+       ((not beg))
+       ;; Test the current command when called from `after-change-functions'
+       ((setq func (evil-ex-completed-binding evil--ex-cmd t))
+        ;; Update argument handler
+        (let ((type (evil-get-command-property func :ex-arg)))
+          (when type (setq handler (cdr (assq type evil-ex-argument-types)))))
+        (if (eq handler evil--ex-argument-handler)
+            (let ((runner (evil-ex-argument-handler-runner handler)))
+              (when runner (funcall runner 'update evil-ex-argument)))
+          (let ((runner (evil-ex-argument-handler-runner evil--ex-argument-handler)))
+            (when runner (funcall runner 'stop)))
+          (setq evil--ex-argument-handler handler)
+          (let ((runner (evil-ex-argument-handler-runner handler)))
+            (when runner (funcall runner 'start evil-ex-argument)))))
+       (t (let* ((evil-ex-complete-emacs-commands 'in-turn)
+                 (prefix (try-completion evil--ex-cmd (evil-ex-completion-table))))
+            (cond ((stringp prefix) (evil-ex-echo "Incomplete command"))
+                  ((null prefix) (evil-ex-echo "Unknown command")))))))))
+
+(defun evil-ex-teardown ()
+  "Deinitialize Ex minibuffer.
+Clean up everything set up by `evil-ex-setup'."
+  (let ((runner (evil-ex-argument-handler-runner evil--ex-argument-handler)))
+    (when runner (funcall runner 'stop))))
+
+(defvar-local evil--ex-echo-overlay nil
+  "Overlay for displaying info messages during Ex.")
+
+(defun evil-ex-echo (string &rest args)
+  "Display a message after the current Ex command."
+  ;; Differs from minibuffer-message, which see, in that it does not
+  ;; use sit-for, since it may be called in the middle of a command.
+  (unless (or evil-no-display (zerop (length string)))
+    (let ((string (concat " [" (apply #'format string args) "]")))
+      (put-text-property 0 1 'cursor t string) ; Place cursor before message
+      (put-text-property 1 (length string) 'face 'evil-ex-info string)
+      (with-selected-window (minibuffer-window)
+        (if evil--ex-echo-overlay
+            (move-overlay evil--ex-echo-overlay (point-max) (point-max))
+          (setq evil--ex-echo-overlay (make-overlay (point-max) (point-max) nil t t)))
+        (add-hook 'pre-command-hook #'evil--ex-remove-echo-overlay nil t)
+        (overlay-put evil--ex-echo-overlay 'after-string string)))))
+
+(defun evil--ex-remove-echo-overlay ()
+  "Remove echo overlay from Ex minibuffer."
+  (delete-overlay evil--ex-echo-overlay)
+  (setq evil--ex-echo-overlay nil)
+  (remove-hook 'pre-command-hook #'evil--ex-remove-echo-overlay t))
+
+(cl-defun evil-ex-completion-at-point ()
+  "Function used for `completion-at-point-functions' in Ex state."
+  (cl-flet ((fix-beg (b) (min (save-excursion
+                                (+ (goto-char b) (skip-chars-forward " \t\n\r")))
+                              (point))))
+    (pcase (nreverse (evil--ex-syntactic-context))
+      ((or (and 'nil (let beg (minibuffer-prompt-end)))
+           `((expression) (command . ,beg) . ,_)
+           (and `((expression) (line) . ,_)
+                (guard (looking-at-p "[ \t\n\r]*\\'"))
+                (let beg (point))))
+       (list (fix-beg beg) (point) (evil-ex-completion-table)))
+      (`((expression) (argument . ,beg))
+       (setq beg (fix-beg beg))
+       ;; If it's an autoload, load the function; this allows external
+       ;; packages to register autoloaded Ex commands which will be
+       ;; loaded when ex argument completion is triggered.
+       (let ((binding (evil-ex-binding evil--ex-cmd t))) (autoload-do-load binding))
+
+       (let* ((binding (evil-ex-completed-binding evil--ex-cmd))
+              (arg-type (evil-get-command-property binding :ex-arg))
+              (arg-handler (cdr (assq arg-type evil-ex-argument-types))))
+         (pcase (evil-ex-argument-handler-completer arg-handler)
+           (`(collection . ,table) (list beg (point-max) table))
+           (`(completion-at-point . ,completer)
+            (save-restriction (narrow-to-region beg (point-max))
+                              (funcall completer))))))
+      (`((expression) (sexp . ,_))
+       (when (fboundp 'elisp-completion-at-point) (elisp-completion-at-point))))))
+
+(defun evil-ex-completion-table ()
+  (let ((ex-cmds
+         (cl-loop
+          for (cmd . fun) in evil-ex-commands unless (stringp fun)
+          collect cmd
+          ;; Append ! to all commands that may take a bang argument
+          when (evil-get-command-property fun :ex-bang)
+          collect (concat cmd "!")))
+        (emacs-cmds (lambda (str pred action)
+                      (completion-table-with-predicate
+                       obarray #'commandp t str pred action))))
+    (cond
+     ((null evil-ex-complete-emacs-commands) ex-cmds)
+     ((eq evil-ex-complete-emacs-commands 'in-turn)
+      (completion-table-in-turn ex-cmds emacs-cmds))
+     (t (cl-loop for s in-ref ex-cmds do
+                 (setf s (propertize s 'face 'evil-ex-commands)))
+        (evil-completion-table-concat ex-cmds emacs-cmds)))))
+
+(defun evil-completion-table-concat (table1 table2)
+  (lambda (string pred action)
+    (cond
+     ((null action)
+      (let (matches)
+        (dolist (table (list table1 table2) (try-completion string matches))
+          (let ((x (try-completion string table pred)))
+            (when x (push (if (eq x 't) string x) matches))))))
+     ((eq action t)
+      (delete-dups
+       (append (all-completions string table1 pred)
+               (all-completions string table2 pred))))
+     ((eq action 'lambda)
+      (when (or (test-completion string table1 pred)
+                (test-completion string table2 pred))
+        t))
+     ((eq (car-safe action) 'boundaries)
+      (or (completion-boundaries string table1 pred (cdr action))
+          (completion-boundaries string table2 pred (cdr action))))
+     ((eq action 'metadata)
+      '(metadata (display-sort-function . evil-ex-sort-completions))))))
+
+(defun evil-ex-sort-completions (completions)
+  (sort completions
+        (lambda (str1 str2)
+          (let ((p1 (eq (get-text-property 0 'face str1) 'evil-ex-commands))
+                (p2 (eq (get-text-property 0 'face str2) 'evil-ex-commands)))
+            (if (eq p1 p2) (string< str1 str2) p1)))))
+
+(define-obsolete-function-alias 'evil-ex-completion #'completion-at-point "1.15.0")
+
+(define-obsolete-function-alias
+  'evil-ex-command-completion-at-point #'evil-ex-completion-at-point "1.15.0")
+
+(defalias 'evil-ex-argument-completion-at-point #'ignore)
+(make-obsolete
+ 'evil-ex-argument-completion-at-point #'evil-ex-completion-at-point "1.15.0")
+
+(define-obsolete-function-alias
+  'evil-ex-elisp-completion-at-point #'elisp-completion-at-point "1.15.0")
+
+(defun evil-ex-define-cmd (cmd function)
+  "Bind the function FUNCTION to the command CMD."
+  (if (not (string-match-p "\\[" cmd))
+      (evil--add-to-alist evil-ex-commands cmd function)
+    (string-match "\\(.*\\)\\[\\(.*\\)\\]" cmd)
+    (let ((mandatory (match-string 1 cmd))
+          (optional  (match-string 2 cmd)))
+      (dotimes (n (1+ (length optional)))
+        (evil--add-to-alist evil-ex-commands
+                            (concat mandatory (substring optional 0 n))
+                            function)))))
+
+(defmacro evil-ex-define-argument-type (arg-type doc &rest body)
+  "Define a new handler for argument-type ARG-TYPE.
+DOC is the documentation string. It is followed by a list of keywords
+and function:
+
+:collection COLLECTION
+
+  A collection for completion as required by `all-completions'.
+
+:completion-at-point FUNC
+
+  Function to be called to initialize a potential completion. FUNC
+  must match the requirements as described for the variable
+  `completion-at-point-functions'. When FUNC is called the minibuffer
+  content is narrowed to exactly match the argument.
+
+:runner FUNC
+
+  Function to be called when the type of the current argument changes
+  or when the content of this argument changes. This function should
+  take one obligatory argument FLAG followed by an optional argument
+  ARG. FLAG is one of three symbol `start', `stop' or `update'. When
+  the argument type is recognized for the first time and this handler
+  is started the FLAG is `start'. If the argument type changes to
+  something else or ex state finished the handler FLAG is `stop'. If
+  the content of the argument has changed FLAG is `update'. If FLAG is
+  either `start' or `update' then ARG is the current value of this
+  argument. If FLAG is `stop' then arg is nil."
+  (declare (indent defun)
+           (doc-string 2)
+           (debug (&define name
+                           [&optional stringp]
+                           [&rest [keywordp function-form]])))
+  (unless (stringp doc) (push doc body))
+  (let (runner completer)
+    (while (keywordp (car body))
+      (let ((key (pop body))
+            (func (pop body)))
+        (cond
+         ((eq key :runner)
+          (setq runner `#',func))
+         ((eq key :collection)
+          (setq completer `(cons 'collection #',func)))
+         ((eq key :completion-at-point)
+          (setq completer `(cons 'completion-at-point #',func))))))
+    `(evil--add-to-alist evil-ex-argument-types
+                         ',arg-type (list ,runner ,completer))))
+
+(evil-ex-define-argument-type file
+  "Handle a file argument."
+  :collection read-file-name-internal)
+
+(evil-ex-define-argument-type buffer
+  "Called to complete a buffer name argument."
+  :collection internal-complete-buffer)
+
+(declare-function comint-completion-at-point "comint")
+(declare-function shell-completion-vars "shell" ())
+
+(defvar-local evil--ex-shell-argument-initialized nil
+  "This variable is set to t if shell command completion has been initialized.
+See `evil-ex-init-shell-argument-completion'.")
+
+(defun evil-ex-init-shell-argument-completion (flag &optional _arg)
+  "Prepare the current minibuffer for completion of shell commands.
+This function must be called from the :runner function of some
+argument handler that requires shell completion."
+  (when (and (eq flag 'start)
+             (not evil--ex-shell-argument-initialized))
+    (setq evil--ex-shell-argument-initialized t)
+    (require 'shell)
+    ;; Set up Comint for Shell mode, except
+    ;; `comint-completion-at-point' will be called manually.
+    (shell-completion-vars)
+    (remove-hook 'completion-at-point-functions #'comint-completion-at-point t)))
+
+(evil-ex-define-argument-type shell
+  "Shell argument type, supports completion."
+  :completion-at-point comint-completion-at-point
+  :runner evil-ex-init-shell-argument-completion)
+
+(defun evil-ex-file-or-shell-command-completion-at-point ()
+  (if (eq (char-after (point-min)) ?!)
+      (save-restriction
+        (narrow-to-region (1+ (point-min)) (point-max))
+        (comint-completion-at-point))
+    (list (point-min) (point-max) #'read-file-name-internal)))
+
+(evil-ex-define-argument-type file-or-shell
+  "File or shell argument type.
+If the current argument starts with a ! the rest of the argument
+is considered a shell command, otherwise a file-name. Completion
+works accordingly."
+  :completion-at-point evil-ex-file-or-shell-command-completion-at-point
+  :runner evil-ex-init-shell-argument-completion)
+
+(defun evil-ex-binding (command &optional noerror)
+  "Return the final binding of COMMAND."
+  (let ((binding (if (evil--ex-bang-p command) (substring command 0 -1)
+                   command)))
+    (while (stringp
+            (setq binding (cdr (assoc binding evil-ex-commands)))))
+    (unless binding (setq binding (intern-soft command)))
+    (if (commandp binding)
+        (or (command-remapping binding) binding)
+      (unless noerror (user-error "Unknown command: `%s'" command)))))
+
+(defun evil-ex-completed-binding (command &optional noerror)
+  "Return the final binding of the completion of COMMAND."
+  (let ((completion (try-completion command evil-ex-commands)))
+    (evil-ex-binding (if (eq completion t) command
+                       (or completion command))
+                     noerror)))
+
+;; TODO: extensions like :p :~ <cfile> ...
+(defun evil-ex-replace-special-filenames (file-name)
+  "Replace special symbols in FILE-NAME.
+Replaces % by the current file-name,
+Replaces # by the alternate file-name in FILE-NAME."
+  (let ((remote (file-remote-p file-name))
+        (current-fname (buffer-file-name))
+        (alternate-fname (and (other-buffer)
+                              (buffer-file-name (other-buffer)))))
+    (setq file-name (or (file-remote-p file-name 'localname) file-name))
+    (when current-fname
+      (setq current-fname (or (file-remote-p current-fname 'localname)
+                              current-fname))
+      (setq file-name
+            (replace-regexp-in-string "\\(^\\|[^\\\\]\\)\\(%\\)"
+                                      current-fname file-name
+                                      t t 2)))
+    (when alternate-fname
+      (setq alternate-fname (or (file-remote-p alternate-fname 'localname)
+                                alternate-fname))
+      (setq file-name
+            (replace-regexp-in-string "\\(^\\|[^\\\\]\\)\\(#\\)"
+                                      alternate-fname file-name
+                                      t t 2)))
+    (setq file-name
+          (replace-regexp-in-string "\\\\\\([#%]\\)"
+                                    "\\1" file-name t))
+    (setq file-name (concat remote file-name)))
+  file-name)
+
+(defun evil-ex-file-arg ()
+  "Return the current Ex argument as a file name.
+This function interprets special file names like # and %."
+  (unless (zerop (length evil-ex-argument))
+    (evil-ex-replace-special-filenames evil-ex-argument)))
+
+(define-error 'evil-ex-no-previous-cmd "No previous command line")
+
+(defun evil-ex-repeat (&optional count)
+  "Repeat the last Ex command."
+  (interactive "P")
+  (when count
+    (goto-char (point-min))
+    (forward-line (1- count)))
+  (cl-loop
+   with evil-ex-original-buffer = (current-buffer)
+   for last-cmd in evil-ex-history do
+   (condition-case nil
+       (cl-return (let (evil-ex-history) (evil-ex-execute last-cmd)))
+     (evil-ex-no-previous-cmd))
+   finally (signal 'evil-ex-no-previous-cmd nil)))
+
+(defun evil-ex-call-command (range command argument)
+  "Execute the given command COMMAND."
+  (when evil-ex-reverse-range
+    (setq evil-ex-reverse-range nil)
+    (unless (y-or-n-p "Backward range given, OK to swap? ")
+      (user-error "")))
+  (let* ((count (when (integerp range) range))
+         (current-prefix-arg count)
+         (evil-ex-range (if count (evil-ex-range count count) range))
+         (cmd (evil-ex-completed-binding command))
+         (evil-ex-bang (evil--ex-bang-p command))
+         (evil-ex-argument argument)
+         (evil-this-type (evil-type evil-ex-range))
+         (evil-ex-point (point))
+         (restore-point
+          (and evil-ex-range
+               (evil-get-command-property cmd :restore-point)
+               (if (evil-visual-state-p) evil-visual-beginning evil-ex-point)))
+         (evil-called-from-ex-p t))
+    (evil-exit-visual-state)
+    (deactivate-mark)
+    (when evil-ex-range
+      ;; Set region if an explicit range has been specified
+      (cl-destructuring-bind (beg end &rest) (evil-expand-range evil-ex-range t)
+        (goto-char beg)
+        (set-marker (mark-marker) end)))
+    (setq this-command cmd)
+    (let ((mark-active evil-ex-range))
+      (run-hooks 'pre-command-hook)
+      (call-interactively cmd))
+    (run-hooks 'post-command-hook)
+    (when restore-point (goto-char restore-point))))
+
+(defun evil-ex-line (base &optional offset)
+  "Return the line number of BASE plus OFFSET."
+  (+ (or base (line-number-at-pos))
+     (or offset 0)))
+
+(defun evil-ex-first-line ()
+  "Return the line number of the first line."
+  (line-number-at-pos (point-min)))
+
+(defun evil-ex-current-line ()
+  "Return the line number of the current line."
+  (line-number-at-pos))
+
+(defun evil-ex-last-line ()
+  "Return the line number of the last line."
+  (save-excursion
+    (goto-char (point-max))
+    (when (bolp)
+      (forward-line -1))
+    (line-number-at-pos)))
+
+(defun evil-ex-range (beg-line &optional end-line)
+  "Return the first and last position of the current range."
+  (let* ((beg (if beg-line (evil-line-position beg-line)
+                (line-beginning-position)))
+         (end (if end-line (evil-line-position (1+ end-line))
+                (save-excursion (goto-char beg) (line-beginning-position 2)))))
+    (when (< end beg)
+      (setq evil-ex-reverse-range t)
+      (evil-swap beg end))
+    (evil-range beg end 'line :expanded t)))
+
+(defun evil-ex-full-range ()
+  "Return a range encompassing the whole buffer."
+  (evil-range (point-min) (point-max) 'line :expanded t))
+
+(defun evil-ex-last-visual-range ()
+  "Return a linewise range of the last visual selection."
+  (evil-range evil-visual-mark evil-visual-point 'line))
+
+(defun evil-ex-marker (marker)
+  "Return MARKER's line number in the current buffer.
+Signal an error if MARKER is in a different buffer."
+  (setq marker (evil-get-marker
+                (if (stringp marker) (aref marker 0) marker)))
+  (if (numberp marker)
+      (line-number-at-pos marker)
+    (user-error "Ex does not support markers in other files")))
+
+(defun evil-ex-char-marker-range (beg end)
+  (setq beg (evil-get-marker (if (stringp beg) (aref beg 0) beg))
+        end (evil-get-marker (if (stringp end) (aref end 0) end)))
+  (unless (and (numberp beg) (numberp end))
+    (user-error "Ex does not support markers in other files"))
+  (evil-expand-range
+   (evil-range beg end
+               (if (evil-visual-state-p)
+                   (evil-visual-type)
+                 'inclusive))))
+
+(declare-function evil-ex-make-search-pattern "evil-search")
+
+(defun evil-ex-re-fwd (pattern)
+  "Search forward for PATTERN.
+Return the line number of the match."
+  (when evil-ex-search-vim-style-regexp
+    (setq pattern (evil-transform-vim-style-regexp pattern)))
+  (set-text-properties 0 (length pattern) nil pattern)
+  (setq evil-ex-search-pattern (evil-ex-make-search-pattern pattern)
+        evil-ex-search-direction 'forward)
+  (condition-case err
+      (save-excursion
+        (evil-move-beginning-of-line 2)
+        (when (or (re-search-forward pattern nil t)
+                  (progn
+                    (goto-char (point-min))
+                    (re-search-forward pattern nil t)))
+          (line-number-at-pos (match-beginning 0))))
+    (invalid-regexp
+     (evil-ex-echo (cadr err))
+     nil)))
+
+(defun evil-ex-re-bwd (pattern)
+  "Search backward for PATTERN.
+Return the line number of the match."
+  (when evil-ex-search-vim-style-regexp
+    (setq pattern (evil-transform-vim-style-regexp pattern)))
+  (set-text-properties 0 (length pattern) nil pattern)
+  (setq evil-ex-search-pattern (evil-ex-make-search-pattern pattern)
+        evil-ex-search-direction 'backward)
+  (condition-case err
+      (save-excursion
+        (evil-move-beginning-of-line)
+        (when (or (re-search-backward pattern nil t)
+                  (progn
+                    (goto-char (point-max))
+                    (re-search-backward pattern nil t)))
+          (line-number-at-pos (match-beginning 0))))
+    (invalid-regexp
+     (evil-ex-echo (cadr err))
+     nil)))
+
+(defun evil-ex-prev-search ()
+  (error "Previous search not yet implemented"))
+
+(defun evil-ex-signed-number (sign &optional number)
+  "Return a signed number like -3 and +1.
+NUMBER defaults to 1."
+  (funcall sign (or number 1)))
+
+(defun evil-ex-command-force-p (command)
+  "Whether COMMAND accepts the bang argument."
+  (declare (obsolete evil-get-command-property "1.15.0"))
+  (let ((binding (evil-ex-completed-binding command t)))
+    (when binding
+      (evil-get-command-property binding :ex-bang))))
+
+(cl-defun evil--ex-syntactic-context
+    (&optional (pos (point))
+               (tree (save-excursion (goto-char (minibuffer-prompt-end))
+                                     (evil-ex-parse nil t)))
+               &aux i result)
+  "Return the syntactical context in TREE of the character at POS.
+POS defaults to the current position of point."
+  ;; Iterate over syntax tree leaves (i.e. the strings), and return
+  ;; the path to the leaf containing the cursor. Or, if not found,
+  ;; e.g. because of trailing whitespace, the leaf at most one char
+  ;; past the rightmost non-empty string.
+  (cl-labels
+      ((traverse
+        (node path)
+        (while (and (consp node) (symbolp (car node)))
+          (push (cons (pop node) i) path))
+        (if (listp node)
+            (dolist (child node) (traverse child path))
+          ;; NODE is the end position of a parsed string
+          (when (>= node pos) (cl-return-from evil--ex-syntactic-context path))
+          (when (or (null result) (> node i))
+            (setq i node
+                  result path)))))
+    (traverse tree ()))
+  result)
+
+(provide 'evil-ex)
+
+;;; evil-ex.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-ex.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-ex.elc
new file mode 100644
index 0000000..fced880
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-ex.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-integration.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-integration.el
new file mode 100644
index 0000000..91d0954
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-integration.el
@@ -0,0 +1,467 @@
+;;; evil-integration.el --- Integrate Evil with other modules -*- lexical-binding: t -*-
+
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This provides evil integration for various emacs modes.
+;; Additional keybindings (or default state) should go into evil-keybindings.el.
+
+;;; Code:
+
+(require 'evil-maps)
+(require 'evil-core)
+(require 'evil-macros)
+(require 'evil-types)
+(require 'evil-repeat)
+
+;;; Evilize some commands
+
+;; unbound keys should be ignored
+(evil-declare-ignore-repeat 'undefined)
+
+(mapc #'(lambda (cmd)
+          (evil-set-command-property cmd :keep-visual t)
+          (evil-declare-not-repeat cmd))
+      '(digit-argument
+        negative-argument
+        universal-argument
+        universal-argument-minus
+        universal-argument-more
+        universal-argument-other-key))
+(mapc #'evil-declare-not-repeat
+      '(what-cursor-position))
+(mapc #'evil-declare-change-repeat
+      '(dabbrev-expand
+        hippie-expand
+        quoted-insert))
+(mapc #'evil-declare-abort-repeat
+      '(balance-windows
+        eval-expression
+        execute-extended-command
+        exit-minibuffer
+        compile
+        delete-window
+        delete-other-windows
+        find-file-at-point
+        ffap-other-window
+        recompile
+        redo
+        save-buffer
+        split-window
+        split-window-horizontally
+        split-window-vertically
+        undo
+        undo-tree-redo
+        undo-tree-undo))
+
+(evil-set-type #'previous-line 'line)
+(evil-set-type #'next-line 'line)
+
+(dolist (cmd '(keyboard-quit keyboard-escape-quit))
+  (evil-set-command-property cmd :suppress-operator t))
+
+;;; Mouse
+(evil-declare-insert-at-point-repeat 'mouse-yank-primary)
+(evil-declare-insert-at-point-repeat 'mouse-yank-secondary)
+
+;;; key-binding
+
+;; Calling `keyboard-quit' should cancel repeat
+(advice-add 'keyboard-quit :before #'evil-repeat-abort)
+
+(add-hook 'wdired-mode-hook #'evil-change-to-initial-state)
+(advice-add 'wdired-change-to-dired-mode :after
+            #'evil--change-to-initial-state-with-msg)
+(defun evil--change-to-initial-state-with-msg (&rest _)
+  (evil-change-to-initial-state nil t))
+
+;;; Parentheses
+
+(evil--advice-add 'show-paren-function :around #'evil--match-paren-in-normal-state)
+(defun evil--match-paren-in-normal-state (orig-fun &rest args)
+  "Match parentheses in Normal state."
+  (if (eq (not (memq 'not evil-highlight-closing-paren-at-point-states))
+          (not (memq evil-state evil-highlight-closing-paren-at-point-states)))
+      (apply orig-fun args)
+    (let* ((orig-spdf show-paren-data-function)
+           (show-paren-data-function
+            (lambda ()
+              (let ((pos (point)) narrow)
+                (setq
+                 pos (cl-dotimes (i (1+ (* 2 evil-show-paren-range)))
+                       (setq pos (+ pos (if (cl-evenp i) i (- i))))
+                       (pcase (syntax-class (syntax-after pos))
+                         (4 (setq narrow pos) (cl-return pos))
+                         (5 (cl-return (1+ pos))))))
+                (when pos
+                  (save-excursion
+                    (goto-char pos)
+                    (save-restriction
+                      (when narrow (narrow-to-region narrow (point-max)))
+                      (funcall orig-spdf))))))))
+      (apply orig-fun args))))
+
+;;; Undo tree
+(eval-after-load 'undo-tree
+  '(with-no-warnings
+     (evil-ex-define-cmd "undol[ist]" 'undo-tree-visualize)
+     (evil-ex-define-cmd "ul" 'undo-tree-visualize)
+
+     (define-key undo-tree-visualizer-mode-map
+       [remap evil-backward-char] 'undo-tree-visualize-switch-branch-left)
+     (define-key undo-tree-visualizer-mode-map
+       [remap evil-forward-char] 'undo-tree-visualize-switch-branch-right)
+     (define-key undo-tree-visualizer-mode-map
+       [remap evil-next-line] 'undo-tree-visualize-redo)
+     (define-key undo-tree-visualizer-mode-map
+       [remap evil-previous-line] 'undo-tree-visualize-undo)
+     (define-key undo-tree-visualizer-mode-map
+       [remap evil-ret] 'undo-tree-visualizer-set)
+
+     (define-key undo-tree-visualizer-selection-mode-map
+       [remap evil-backward-char] 'undo-tree-visualizer-select-left)
+     (define-key undo-tree-visualizer-selection-mode-map
+       [remap evil-forward-char] 'undo-tree-visualizer-select-right)
+     (define-key undo-tree-visualizer-selection-mode-map
+       [remap evil-next-line] 'undo-tree-visualizer-select-next)
+     (define-key undo-tree-visualizer-selection-mode-map
+       [remap evil-previous-line] 'undo-tree-visualizer-select-previous)
+     (define-key undo-tree-visualizer-selection-mode-map
+       [remap evil-ret] 'undo-tree-visualizer-set)))
+
+;;; Auto-complete
+(eval-after-load 'auto-complete
+  '(progn
+     (evil-add-command-properties 'auto-complete :repeat 'evil-ac-repeat)
+     (evil-add-command-properties 'ac-complete :repeat 'evil-ac-repeat)
+     (evil-add-command-properties 'ac-expand :repeat 'evil-ac-repeat)
+     (evil-add-command-properties 'ac-next :repeat 'ignore)
+     (evil-add-command-properties 'ac-previous :repeat 'ignore)
+
+     (defvar evil-ac-prefix-len nil
+       "The length of the prefix of the current item to be completed.")
+
+     (defvar ac-prefix)
+     (defun evil-ac-repeat (flag)
+       "Record the changes for auto-completion."
+       (cond
+        ((eq flag 'pre)
+         (setq evil-ac-prefix-len (length ac-prefix))
+         (evil-repeat-start-record-changes))
+        ((eq flag 'post)
+         ;; Add change to remove the prefix
+         (evil-repeat-record-change (- evil-ac-prefix-len)
+                                    ""
+                                    evil-ac-prefix-len)
+         ;; Add change to insert the full completed text
+         (evil-repeat-record-change
+          (- evil-ac-prefix-len)
+          (buffer-substring-no-properties (- evil-repeat-pos
+                                             evil-ac-prefix-len)
+                                          (point))
+          0)
+         ;; Finish repeation
+         (evil-repeat-finish-record-changes))))))
+
+;;; Company
+(eval-after-load 'company
+  '(progn
+     (mapc #'evil-declare-change-repeat
+           '(company-complete-mouse
+             company-complete-number
+             company-complete-selection
+             company-complete-common))
+
+     (mapc #'evil-declare-ignore-repeat
+           '(company-abort
+             company-select-next
+             company-select-previous
+             company-select-next-or-abort
+             company-select-previous-or-abort
+             company-select-mouse
+             company-show-doc-buffer
+             company-show-location
+             company-search-candidates
+             company-filter-candidates))))
+
+;;; Eval last sexp
+(defun evil--preceding-sexp (command &rest args)
+  "In Normal- or Motion-state, allow last sexp to end at point."
+  (save-excursion
+    (or evil-move-beyond-eol
+        (eolp)
+        (not (or (evil-normal-state-p) (evil-motion-state-p)))
+        (forward-char))
+    (apply command args)))
+(advice-add 'elisp--preceding-sexp :around #'evil--preceding-sexp)
+(advice-add 'pp-last-sexp          :around #'evil--preceding-sexp)
+(advice-add 'lisp-eval-last-sexp   :around #'evil--preceding-sexp)
+
+;;; Show key
+(advice-add 'quail-show-key :around #'evil--in-emacs-state)
+(advice-add 'describe-char  :around #'evil--in-emacs-state)
+(defun evil--in-emacs-state (orig-fun &rest args)
+  "Temporarily enter Emacs-state and apply ORIG-FUN to ARGS."
+  (evil-with-state emacs (apply orig-fun args)))
+
+;;; ace-jump-mode
+(declare-function ace-jump-char-mode "ext:ace-jump-mode")
+(declare-function ace-jump-word-mode "ext:ace-jump-mode")
+(declare-function ace-jump-line-mode "ext:ace-jump-mode")
+(defvar ace-jump-mode-scope)
+
+(defvar evil-ace-jump-active nil)
+
+(defmacro evil-enclose-ace-jump-for-motion (&rest body)
+  "Enclose ace-jump to make it suitable for motions.
+This includes restricting `ace-jump-mode' to the current window
+in visual and operator state, deactivating visual updates, saving
+the mark and entering `recursive-edit'."
+  (declare (indent defun)
+           (debug t))
+  `(let ((old-mark (mark))
+         (ace-jump-mode-scope
+          (if (and (not (memq evil-state '(visual operator)))
+                   (boundp 'ace-jump-mode-scope))
+              ace-jump-mode-scope
+            'window)))
+     (remove-hook 'pre-command-hook #'evil-visual-pre-command t)
+     (remove-hook 'post-command-hook #'evil-visual-post-command t)
+     (unwind-protect
+         (let ((evil-ace-jump-active 'prepare))
+           (add-hook 'ace-jump-mode-end-hook
+                     #'evil-ace-jump-exit-recursive-edit)
+           ,@body
+           (when evil-ace-jump-active
+             (setq evil-ace-jump-active t)
+             (recursive-edit)))
+       (remove-hook 'post-command-hook
+                    #'evil-ace-jump-exit-recursive-edit)
+       (remove-hook 'ace-jump-mode-end-hook
+                    #'evil-ace-jump-exit-recursive-edit)
+       (if (evil-visual-state-p)
+           (progn
+             (add-hook 'pre-command-hook #'evil-visual-pre-command nil t)
+             (add-hook 'post-command-hook #'evil-visual-post-command nil t)
+             (set-mark old-mark))
+         (push-mark old-mark)))))
+
+(advice-add 'ace-jump-done :after #'evil--after-ace-jump-done)
+(defun evil--after-ace-jump-done (&rest _)
+  (when evil-ace-jump-active
+    (add-hook 'post-command-hook #'evil-ace-jump-exit-recursive-edit)))
+
+(defun evil-ace-jump-exit-recursive-edit ()
+  "Exit a recursive edit caused by an evil jump."
+  (cond
+   ((eq evil-ace-jump-active 'prepare)
+    (setq evil-ace-jump-active nil))
+   (evil-ace-jump-active
+    (remove-hook 'post-command-hook #'evil-ace-jump-exit-recursive-edit)
+    (exit-recursive-edit))))
+
+(evil-define-motion evil-ace-jump-char-mode (_count)
+  "Jump visually directly to a char using ace-jump."
+  :type inclusive
+  (evil-without-repeat
+    (let ((pnt (point))
+          (buf (current-buffer)))
+      (evil-enclose-ace-jump-for-motion
+        (call-interactively 'ace-jump-char-mode))
+      ;; if we jump backwards, motion type is exclusive, analogously
+      ;; to `evil-find-char-backward'
+      (when (and (equal buf (current-buffer))
+                 (< (point) pnt))
+        (setq evil-this-type
+              (cond
+               ((eq evil-this-type 'exclusive) 'inclusive)
+               ((eq evil-this-type 'inclusive) 'exclusive)))))))
+
+(evil-define-motion evil-ace-jump-char-to-mode (_count)
+  "Jump visually to the char in front of a char using ace-jump."
+  :type inclusive
+  (evil-without-repeat
+    (let ((pnt (point))
+          (buf (current-buffer)))
+      (evil-enclose-ace-jump-for-motion
+        (call-interactively 'ace-jump-char-mode))
+      (if (and (equal buf (current-buffer))
+               (< (point) pnt))
+          (progn
+            (or (eobp) (forward-char))
+            (setq evil-this-type
+                  (cond
+                   ((eq evil-this-type 'exclusive) 'inclusive)
+                   ((eq evil-this-type 'inclusive) 'exclusive))))
+        (backward-char)))))
+
+(evil-define-motion evil-ace-jump-line-mode (_count)
+  "Jump visually to the beginning of a line using ace-jump."
+  :type line
+  :repeat abort
+  (evil-without-repeat
+    (evil-enclose-ace-jump-for-motion
+      (call-interactively 'ace-jump-line-mode))))
+
+(evil-define-motion evil-ace-jump-word-mode (_count)
+  "Jump visually to the beginning of a word using ace-jump."
+  :type exclusive
+  :repeat abort
+  (evil-without-repeat
+    (evil-enclose-ace-jump-for-motion
+      (call-interactively 'ace-jump-word-mode))))
+
+(define-key evil-motion-state-map [remap ace-jump-char-mode] #'evil-ace-jump-char-mode)
+(define-key evil-motion-state-map [remap ace-jump-line-mode] #'evil-ace-jump-line-mode)
+(define-key evil-motion-state-map [remap ace-jump-word-mode] #'evil-ace-jump-word-mode)
+
+;;; avy
+(declare-function avy-goto-word-or-subword-1 "ext:avy")
+(declare-function avy-goto-line "ext:avy")
+(declare-function avy-goto-char "ext:avy")
+(declare-function avy-goto-char-2 "ext:avy")
+(declare-function avy-goto-char-2-above "ext:avy")
+(declare-function avy-goto-char-2-below "ext:avy")
+(declare-function avy-goto-char-in-line "ext:avy")
+(declare-function avy-goto-word-0 "ext:avy")
+(declare-function avy-goto-word-1 "ext:avy")
+(declare-function avy-goto-word-1-above "ext:avy")
+(declare-function avy-goto-word-1-below "ext:avy")
+(declare-function avy-goto-subword-0 "ext:avy")
+(declare-function avy-goto-subword-1 "ext:avy")
+(declare-function avy-goto-char-timer "ext:avy")
+(defvar avy-all-windows)
+
+(defmacro evil-enclose-avy-for-motion (&rest body)
+  "Enclose avy to make it suitable for motions.
+Based on `evil-enclose-ace-jump-for-motion'."
+  (declare (indent defun)
+           (debug t))
+  `(let ((avy-all-windows
+          (if (and (not (memq evil-state '(visual operator)))
+                   (boundp 'avy-all-windows))
+              avy-all-windows
+            nil)))
+     ,@body))
+
+(defmacro evil-define-avy-motion (command type)
+  (declare (indent defun)
+           (debug t))
+  (let ((name (intern (format "evil-%s" command))))
+    `(evil-define-motion ,name (_count)
+       ,(format "Evil motion for `%s'." command)
+       :type ,type
+       :jump t
+       :repeat abort
+       (evil-without-repeat
+         (evil-enclose-avy-for-motion
+           (call-interactively ',command))))))
+
+;; define evil-avy-* motion commands for avy-* commands
+(evil-define-avy-motion avy-goto-char inclusive)
+(evil-define-avy-motion avy-goto-char-2 inclusive)
+(evil-define-avy-motion avy-goto-char-2-above inclusive)
+(evil-define-avy-motion avy-goto-char-2-below inclusive)
+(evil-define-avy-motion avy-goto-char-in-line inclusive)
+(evil-define-avy-motion avy-goto-char-timer inclusive)
+(evil-define-avy-motion avy-goto-line line)
+(evil-define-avy-motion avy-goto-line-above line)
+(evil-define-avy-motion avy-goto-line-below line)
+(evil-define-avy-motion avy-goto-subword-0 exclusive)
+(evil-define-avy-motion avy-goto-subword-1 exclusive)
+(evil-define-avy-motion avy-goto-symbol-1 exclusive)
+(evil-define-avy-motion avy-goto-symbol-1-above exclusive)
+(evil-define-avy-motion avy-goto-symbol-1-below exclusive)
+(evil-define-avy-motion avy-goto-word-0 exclusive)
+(evil-define-avy-motion avy-goto-word-1 exclusive)
+(evil-define-avy-motion avy-goto-word-1-above exclusive)
+(evil-define-avy-motion avy-goto-word-1-below exclusive)
+(evil-define-avy-motion avy-goto-word-or-subword-1 exclusive)
+
+;; remap avy-* commands to evil-avy-* commands
+(dolist (command '(avy-goto-char
+                   avy-goto-char-2
+                   avy-goto-char-2-above
+                   avy-goto-char-2-below
+                   avy-goto-char-in-line
+                   avy-goto-char-timer
+                   avy-goto-line
+                   avy-goto-line-above
+                   avy-goto-line-below
+                   avy-goto-subword-0
+                   avy-goto-subword-1
+                   avy-goto-symbol-1
+                   avy-goto-symbol-1-above
+                   avy-goto-symbol-1-below
+                   avy-goto-word-0
+                   avy-goto-word-1
+                   avy-goto-word-1-above
+                   avy-goto-word-1-below
+                   avy-goto-word-or-subword-1))
+  (define-key evil-motion-state-map
+    (vector 'remap command) (intern-soft (format "evil-%s" command))))
+
+;;; nXhtml/mumamo
+;; ensure that mumamo does not toggle evil through its globalized mode
+(eval-after-load 'mumamo
+  '(with-no-warnings
+     (push 'evil-mode-cmhh mumamo-change-major-mode-no-nos)))
+
+;; visual-line-mode integration
+(when evil-respect-visual-line-mode
+  (evil-define-minor-mode-key 'motion 'visual-line-mode
+    "j" 'evil-next-visual-line
+    "gj" 'evil-next-line
+    "k" 'evil-previous-visual-line
+    "gk" 'evil-previous-line
+    "0" 'evil-beginning-of-visual-line
+    "g0" 'evil-beginning-of-line
+    "$" 'evil-end-of-visual-line
+    "g$" 'evil-end-of-line
+    "V" 'evil-visual-screen-line))
+
+;;; abbrev.el
+(defun evil-maybe-expand-abbrev ()
+  (when (and abbrev-mode evil-want-abbrev-expand-on-insert-exit)
+    (expand-abbrev)))
+
+(eval-after-load 'abbrev
+  '(add-hook 'evil-insert-state-exit-hook #'evil-maybe-expand-abbrev))
+
+;;; ElDoc
+(eval-after-load 'eldoc
+  '(when (fboundp 'eldoc-add-command-completions)
+     (eldoc-add-command-completions "evil-window-")))
+
+;;; XRef
+(eval-after-load 'xref
+  '(progn
+     (evil-set-command-property 'xref-find-definitions :jump t)
+     (evil-set-command-property 'xref-find-references :jump t)))
+
+(provide 'evil-integration)
+
+;;; evil-integration.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-integration.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-integration.elc
new file mode 100644
index 0000000..1bc9093
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-integration.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-jumps.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-jumps.el
new file mode 100644
index 0000000..0765c36
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-jumps.el
@@ -0,0 +1,357 @@
+;;; evil-jumps.el --- Jump list implementation -*- lexical-binding: t -*-
+
+;; Author: Bailey Ling <bling at live.ca>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+(require 'cl-lib)
+(require 'evil-core)
+(require 'evil-states)
+
+;;; Code:
+
+(defgroup evil-jumps nil
+  "Evil jump list configuration options."
+  :prefix "evil-jumps"
+  :group 'evil)
+
+(defcustom evil-jumps-cross-buffers t
+  "When non-nil, the jump commands can cross borders between buffers.
+Otherwise the jump commands act only within the current buffer."
+  :type 'boolean)
+
+(defcustom evil-jumps-max-length 100
+  "The maximum number of jumps to keep track of."
+  :type 'integer)
+
+(defcustom evil-jumps-pre-jump-hook nil
+  "Hooks to run just before jumping to a location in the jump list."
+  :type 'hook)
+
+(defcustom evil-jumps-post-jump-hook nil
+  "Hooks to run just after jumping to a location in the jump list."
+  :type 'hook)
+
+(defcustom evil-jumps-ignored-file-patterns '("COMMIT_EDITMSG$" "TAGS$")
+  "List of regexps to exclude file path from inclusion in the jump list."
+  :type '(repeat string))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defvar savehist-additional-variables)
+
+(defvar evil--jumps-jumping nil)
+
+(defvar evil--jumps-jump-command nil
+  "Set by `evil--jump-backward', used and cleared in the
+`post-command-hook' by `evil--jump-handle-buffer-crossing'")
+
+(eval-when-compile (defvar evil--jumps-debug nil))
+
+(defvar evil--jumps-buffer-targets "\\*\\(new\\|scratch\\)\\*"
+  "Regexp to determine if buffer with `buffer-name' is a valid jump target.")
+
+(defvar evil--jumps-window-jumps (make-hash-table)
+  "Hashtable which stores all jumps on a per window basis.")
+
+(defvar evil-jumps-history nil
+  "History of `evil-mode' jumps that are persisted with `savehist'.")
+
+(cl-defstruct evil-jumps-struct
+  ring
+  (idx -1)
+  previous-pos)
+
+;; Is inlining this really worth it?
+(defsubst evil--jumps-message (format &rest args)
+  (when (eval-when-compile evil--jumps-debug)
+    (with-current-buffer (get-buffer-create "*evil-jumps*")
+       (goto-char (point-max))
+       (insert (apply #'format format args) "\n"))))
+
+(defun evil--jumps-get-current (&optional window)
+  (unless window (setq window (selected-window)))
+  (let ((jump-struct (gethash window evil--jumps-window-jumps)))
+    (unless jump-struct
+      (setq jump-struct (make-evil-jumps-struct))
+      (puthash window jump-struct evil--jumps-window-jumps))
+    jump-struct))
+
+(defun evil--jumps-get-jumps (struct)
+  (let ((ring (evil-jumps-struct-ring struct)))
+    (unless ring
+      (setq ring (make-ring evil-jumps-max-length))
+      (setf (evil-jumps-struct-ring struct) ring))
+    ring))
+
+(defun evil--jumps-get-window-jump-list ()
+  (let ((struct (evil--jumps-get-current)))
+    (evil--jumps-get-jumps struct)))
+
+(defun evil--jumps-savehist-load ()
+  (add-to-list 'savehist-additional-variables 'evil-jumps-history)
+  (let ((ring (make-ring evil-jumps-max-length)))
+    (cl-loop for jump in (reverse evil-jumps-history)
+             do (ring-insert ring jump))
+    (setf (evil-jumps-struct-ring (evil--jumps-get-current)) ring))
+  (add-hook 'savehist-save-hook #'evil--jumps-savehist-sync)
+  (remove-hook 'savehist-mode-hook #'evil--jumps-savehist-load))
+
+(defun evil--jumps-savehist-sync ()
+  "Update the printable value of window jumps for `savehist'."
+  (setq evil-jumps-history
+        (delq nil (mapcar #'(lambda (jump)
+                              (let* ((mark (car jump))
+                                     (pos (if (markerp mark)
+                                              (marker-position mark)
+                                            mark))
+                                     (file-name (cadr jump)))
+                                (when (and (not (file-remote-p file-name))
+                                           (file-exists-p file-name)
+                                           pos)
+                                  (list pos file-name))))
+                          (ring-elements (evil--jumps-get-window-jump-list))))))
+
+(defun evil--jumps-current-file-name ()
+  "Get the current buffer file name for `evil--jumps-push'."
+  (or buffer-file-name
+      (when (derived-mode-p 'dired-mode) default-directory)))
+
+(defun evil--jumps-jump (idx shift)
+  (let ((target-list (evil--jumps-get-window-jump-list)))
+    (evil--jumps-message "jumping from %s by %s" idx shift)
+    (evil--jumps-message "target list = %s" target-list)
+    (setq idx (+ idx shift))
+    (let ((current-file-name (or (evil--jumps-current-file-name) (buffer-name)))
+          (size (ring-length target-list)))
+      (unless evil-jumps-cross-buffers
+        ;; skip jump marks pointing to other buffers
+        (while (and (< idx size) (>= idx 0)
+                    (not (string= current-file-name (cadr (ring-ref target-list idx)))))
+          (setq idx (+ idx shift))))
+      (when (and (< idx size) (>= idx 0))
+        ;; actual jump
+        (run-hooks 'evil-jumps-pre-jump-hook)
+        (let* ((place (ring-ref target-list idx))
+               (pos (car place))
+               (file-name (cadr place)))
+          (setq evil--jumps-jumping t)
+          (unless (string= current-file-name file-name)
+            (if (string-match-p evil--jumps-buffer-targets file-name)
+                (switch-to-buffer file-name)
+              (find-file file-name)))
+          (setq evil--jumps-jumping nil)
+          (goto-char pos)
+          (setf (evil-jumps-struct-idx (evil--jumps-get-current)) idx)
+          (run-hooks 'evil-jumps-post-jump-hook))))))
+
+(defun evil--jumps-push ()
+  "Push the current cursor/file position to the jump list."
+  (let ((target-list (evil--jumps-get-window-jump-list))
+        (file-name (evil--jumps-current-file-name))
+        (buffer-name (buffer-name))
+        (current-pos (point-marker))
+        (first-pos nil)
+        (first-file-name nil)
+        (excluded nil))
+    (when (and (not file-name)
+               (string-match-p evil--jumps-buffer-targets buffer-name))
+      (setq file-name buffer-name))
+    (when file-name
+      (dolist (pattern evil-jumps-ignored-file-patterns)
+        (when (string-match-p pattern file-name)
+          (setq excluded t)))
+      (unless excluded
+        (unless (ring-empty-p target-list)
+          (setq first-pos (car (ring-ref target-list 0)))
+          (setq first-file-name (car (cdr (ring-ref target-list 0)))))
+        (unless (and (equal first-pos current-pos)
+                     (equal first-file-name file-name))
+          (evil--jumps-message "pushing %s on %s" current-pos file-name)
+          (ring-insert target-list `(,current-pos ,file-name)))))
+    (evil--jumps-message "%s %s"
+                         (selected-window)
+                         (and (not (ring-empty-p target-list))
+                              (ring-ref target-list 0)))))
+
+(evil-define-command evil-show-jumps ()
+  "Display the contents of the jump list."
+  :repeat nil
+  (evil-with-view-list
+    :name "evil-jumps"
+    :mode "Evil Jump List"
+    :format [("Jump" 5 nil)
+             ("Marker" 8 nil)
+             ("File/text" 1000 t)]
+    :entries (let* ((jumps (evil--jumps-savehist-sync))
+                    (count 0))
+               (cl-loop for jump in jumps
+                        collect `(nil [,(number-to-string (cl-incf count))
+                                       ,(number-to-string (car jump))
+                                       (,(cadr jump))])))
+    :select-action #'evil--show-jumps-select-action))
+
+(defun evil--show-jumps-select-action (jump)
+  (let ((position (string-to-number (elt jump 1)))
+        (file (car (elt jump 2))))
+    (kill-buffer)
+    (switch-to-buffer (find-file file))
+    (goto-char position)))
+
+(defun evil-set-jump (&optional pos)
+  "Set jump point at POS.
+POS defaults to point."
+  (save-excursion
+    (when (markerp pos)
+      (set-buffer (marker-buffer pos)))
+
+    (unless (or (region-active-p) (evil-visual-state-p))
+      (push-mark pos t))
+
+    (unless evil--jumps-jumping
+      ;; clear out intermediary jumps when a new one is set
+      (let* ((struct (evil--jumps-get-current))
+             (target-list (evil--jumps-get-jumps struct))
+             (idx (evil-jumps-struct-idx struct)))
+        (cl-loop repeat idx
+                 do (ring-remove target-list))
+        (setf (evil-jumps-struct-idx struct) -1))
+      (when pos
+        (goto-char pos))
+      (evil--jumps-push))))
+(put 'evil-set-jump 'permanent-local-hook t)
+
+(defun evil--jump-backward (count)
+  (setq evil--jumps-jump-command t)
+  (let ((count (or count 1)))
+    (evil-motion-loop (nil count)
+      (let* ((struct (evil--jumps-get-current))
+             (idx (evil-jumps-struct-idx struct)))
+        (evil--jumps-message "jumping back %s" idx)
+        (when (= idx -1)
+          (setq idx 0)
+          (setf (evil-jumps-struct-idx struct) 0)
+          (evil--jumps-push))
+        (evil--jumps-jump idx 1)))))
+
+(defun evil--jump-forward (count)
+  (setq evil--jumps-jump-command t)
+  (let ((count (or count 1)))
+    (evil-motion-loop (nil count)
+      (let* ((struct (evil--jumps-get-current))
+             (idx (evil-jumps-struct-idx struct)))
+        (when (= idx -1)
+          (setq idx 0)
+          (setf (evil-jumps-struct-idx struct) 0)
+          (evil--jumps-push))
+        (evil--jumps-jump idx -1)))))
+
+(defun evil--jumps-window-configuration-hook (&rest _args)
+  (let* ((window-list (window-list-1 nil nil t))
+         (existing-window (selected-window))
+         (new-window (previous-window)))
+    (when (and (not (eq existing-window new-window))
+               (> (length window-list) 1))
+      (let* ((target-jump-struct (evil--jumps-get-current new-window)))
+        (if (not (ring-empty-p (evil--jumps-get-jumps target-jump-struct)))
+            (evil--jumps-message "target window %s already has %s jumps" new-window
+                                 (ring-length (evil--jumps-get-jumps target-jump-struct)))
+          (evil--jumps-message "new target window detected; copying %s to %s" existing-window new-window)
+          (let* ((source-jump-struct (evil--jumps-get-current existing-window))
+                 (source-list (evil--jumps-get-jumps source-jump-struct)))
+            (when (= (ring-length (evil--jumps-get-jumps target-jump-struct)) 0)
+              (setf (evil-jumps-struct-previous-pos target-jump-struct) (evil-jumps-struct-previous-pos source-jump-struct))
+              (setf (evil-jumps-struct-idx target-jump-struct) (evil-jumps-struct-idx source-jump-struct))
+              (setf (evil-jumps-struct-ring target-jump-struct) (ring-copy source-list)))))))
+    ;; delete obsolete windows
+    (maphash (lambda (key _val)
+               (unless (member key window-list)
+                 (evil--jumps-message "removing %s" key)
+                 (remhash key evil--jumps-window-jumps)))
+             evil--jumps-window-jumps)))
+(put 'evil--jumps-window-configuration-hook 'permanent-local-hook t)
+
+(defun evil--jump-hook (&optional command)
+  "`pre-command-hook' for evil-jumps.
+Set jump point if COMMAND has a non-nil `:jump' property. Otherwise,
+save the current position in case the command being executed will
+change the current buffer."
+  (setq command (or command this-command))
+  (if (evil-get-command-property command :jump)
+      (evil-set-jump)
+    (setf (evil-jumps-struct-previous-pos (evil--jumps-get-current))
+          (point-marker))))
+(put 'evil--jump-hook 'permanent-local-hook t)
+
+(defun evil--jump-handle-buffer-crossing ()
+  (let ((jump-command evil--jumps-jump-command))
+    (setq evil--jumps-jump-command nil)
+    (dolist (frame (frame-list))
+      (dolist (window (window-list frame))
+        (let* ((struct (evil--jumps-get-current window))
+               (previous-pos (evil-jumps-struct-previous-pos struct)))
+          (when previous-pos
+            (setf (evil-jumps-struct-previous-pos struct) nil)
+            (if (and
+                 ;; `evil-jump-backward' and 'evil-jump-forward' need
+                 ;; to be handled specially. When jumping backward
+                 ;; multiple times, calling `evil-set-jump' is always
+                 ;; wrong: If you jump back twice and we call
+                 ;; `evil-set-jump' after the second time, we clear
+                 ;; the forward jump list and `evil--jump-forward'
+                 ;; won't work.
+
+                 ;; The first time you jump backward, setting a jump
+                 ;; point is sometimes correct. But we don't do it
+                 ;; here because this function is called after
+                 ;; `evil--jump-backward' has updated our position in
+                 ;; the jump list so, again, `evil-set-jump' would
+                 ;; break `evil--jump-forward'.
+                 (not jump-command)
+                 (let ((previous-buffer (marker-buffer previous-pos)))
+                   (and previous-buffer
+                        (not (eq previous-buffer (window-buffer window))))))
+                (evil-set-jump previous-pos)
+              (set-marker previous-pos nil))))))))
+(put 'evil--jump-handle-buffer-crossing 'permanent-local-hook t)
+
+(if (bound-and-true-p savehist-loaded)
+    (evil--jumps-savehist-load)
+  (add-hook 'savehist-mode-hook #'evil--jumps-savehist-load))
+
+(defun evil--jumps-install-or-uninstall ()
+  (if evil-local-mode
+      (progn
+        (add-hook 'pre-command-hook #'evil--jump-hook nil t)
+        (add-hook 'post-command-hook #'evil--jump-handle-buffer-crossing nil t)
+        (add-hook 'next-error-hook #'evil-set-jump nil t)
+        (add-hook 'window-configuration-change-hook #'evil--jumps-window-configuration-hook nil t))
+    (remove-hook 'pre-command-hook #'evil--jump-hook t)
+    (remove-hook 'post-command-hook #'evil--jump-handle-buffer-crossing t)
+    (remove-hook 'next-error-hook #'evil-set-jump t)
+    (remove-hook 'window-configuration-change-hook #'evil--jumps-window-configuration-hook t)))
+
+(add-hook 'evil-local-mode-hook #'evil--jumps-install-or-uninstall)
+
+(provide 'evil-jumps)
+
+;;; evil-jumps.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-jumps.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-jumps.elc
new file mode 100644
index 0000000..5ea5da2
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-jumps.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-keybindings.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-keybindings.el
new file mode 100644
index 0000000..d96c496
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-keybindings.el
@@ -0,0 +1,123 @@
+;;; evil-keybindings.el --- Add some Evil keybindings to other modules -*- lexical-binding: t -*-
+
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This provides a set of keybindings for other emacs modes. This also includes
+;; setting up the initial evil state of those other modes.
+
+;;; Code:
+
+(require 'evil-maps)
+(require 'evil-core)
+(require 'evil-macros)
+(require 'evil-types)
+(require 'evil-repeat)
+
+;; etags-select
+;; FIXME: probably etags-select should be recomended in docs
+(eval-after-load 'etags-select
+  '(progn
+     (define-key evil-motion-state-map "g]" 'etags-select-find-tag-at-point)))
+
+;;; Buffer-menu
+
+(evil-add-hjkl-bindings Buffer-menu-mode-map 'motion)
+
+;; dictionary.el
+
+(evil-add-hjkl-bindings dictionary-mode-map 'motion
+  "?" 'dictionary-help        ; "h"
+  "C-o" 'dictionary-previous) ; "l"
+
+;;; Dired
+
+(eval-after-load 'dired
+  '(progn
+     ;; use the standard Dired bindings as a base
+     (defvar dired-mode-map)
+     (evil-make-overriding-map dired-mode-map 'normal)
+     (evil-add-hjkl-bindings dired-mode-map 'normal
+       "J" 'dired-goto-file                   ; "j"
+       "K" 'dired-do-kill-lines               ; "k"
+       "r" 'dired-do-redisplay                ; "l"
+       ;; ":d", ":v", ":s", ":e"
+       ";" (lookup-key dired-mode-map ":"))))
+
+;;; ERT
+
+(evil-add-hjkl-bindings ert-results-mode-map 'motion)
+
+;;; Info
+
+(evil-add-hjkl-bindings Info-mode-map 'motion
+  "0" 'evil-beginning-of-line
+  (kbd "\M-h") 'Info-help   ; "h"
+  "\C-t" 'Info-history-back ; "l"
+  "\C-o" 'Info-history-back
+  " " 'Info-scroll-up
+  "\C-]" 'Info-follow-nearest-node
+  (kbd "DEL") 'Info-scroll-down)
+
+;;; Speedbar
+
+(evil-add-hjkl-bindings speedbar-mode-map 'motion
+  "h" 'backward-char
+  "j" 'speedbar-next
+  "k" 'speedbar-prev
+  "l" 'forward-char
+  "i" 'speedbar-item-info
+  "r" 'speedbar-refresh
+  "u" 'speedbar-up-directory
+  "o" 'speedbar-toggle-line-expansion
+  (kbd "RET") 'speedbar-edit-line)
+
+;; Ibuffer
+(eval-after-load 'ibuffer
+  '(progn
+     (defvar ibuffer-mode-map)
+     (evil-make-overriding-map ibuffer-mode-map 'normal)
+     (evil-define-key 'normal ibuffer-mode-map
+       "j" 'evil-next-line
+       "k" 'evil-previous-line
+       (kbd "RET") 'ibuffer-visit-buffer)))
+
+;;; ag.el
+(eval-after-load 'ag
+  '(progn
+     (defvar ag-mode-map)
+     (add-to-list 'evil-motion-state-modes 'ag-mode)
+     (evil-add-hjkl-bindings ag-mode-map 'motion)))
+
+;;; ELP
+
+(advice-add 'elp-results :after #'evil--set-motion-state)
+(defun evil--set-motion-state (&rest _)
+  (evil-motion-state))
+
+(provide 'evil-keybindings)
+
+;;; evil-keybindings.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-keybindings.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-keybindings.elc
new file mode 100644
index 0000000..03ddbf0
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-keybindings.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-macros.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-macros.el
new file mode 100644
index 0000000..acc803b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-macros.el
@@ -0,0 +1,771 @@
+;;; evil-macros.el --- Macros -*- lexical-binding: t -*-
+
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'evil-common)
+(require 'evil-states)
+(require 'evil-repeat)
+
+(declare-function evil-ex-p "evil-ex")
+(declare-function evil-line-or-visual-line "evil-commands")
+
+;; set some error codes
+(put 'beginning-of-line 'error-conditions '(beginning-of-line error))
+(put 'beginning-of-line 'error-message "Beginning of line")
+(put 'end-of-line 'error-conditions '(end-of-line error))
+(put 'end-of-line 'error-message "End of line")
+;; we don't want line boundaries to trigger the debugger
+;; when `debug-on-error' is t
+(cl-pushnew 'beginning-of-line debug-ignored-errors)
+(cl-pushnew 'end-of-line debug-ignored-errors)
+
+(defun evil-motion-range (motion &optional count type)
+  "Execute a motion and return the buffer positions.
+The return value is a list (BEG END TYPE)."
+  (let ((opoint   (point))
+        (omark    (mark t))
+        (obuffer  (current-buffer))
+        (evil-motion-marker (move-marker (make-marker) (point)))
+        range)
+    (evil-with-transient-mark-mode
+      (evil-narrow-to-field
+        (unwind-protect
+            (let ((current-prefix-arg count)
+                  ;; Store type in global variable `evil-this-type'.
+                  ;; If necessary, motions can change their type
+                  ;; during execution by setting this variable.
+                  (evil-this-type
+                   (or type (evil-get-command-property motion :type 'exclusive))))
+              (condition-case err
+                  (let ((repeat-type (evil--repeat-type motion)))
+                    (when (functionp repeat-type) (funcall repeat-type 'pre))
+                    (unless (with-local-quit
+                              (setq range (call-interactively motion))
+                              t)
+                      (evil-repeat-abort)
+                      (setq quit-flag t))
+                    (when (functionp repeat-type) (funcall repeat-type 'post)))
+                (error
+                 (evil-repeat-abort)
+                 ;; some operators depend on succeeding motions, in
+                 ;; particular for `evil-forward-char' (e.g., used by
+                 ;; `evil-substitute'), therefore we let end-of-line
+                 ;; and end-of-buffer pass
+                 (if (memq (car err) '(end-of-line end-of-buffer))
+                     (message (error-message-string err))
+                   (signal (car err) (cdr err)))))
+              (cond
+               ;; the motion returned a range
+               ((evil-range-p range))
+               ;; the motion made a Visual selection
+               ((evil-visual-state-p)
+                (setq range (evil-visual-range)))
+               ;; the motion made an active region
+               ((region-active-p)
+                (setq range (evil-range (region-beginning) (region-end)
+                                        evil-this-type)))
+               ;; default: range from previous position to current
+               (t (setq range (evil-expand-range
+                               (evil-normalize evil-motion-marker
+                                               (point)
+                                               evil-this-type)))))
+              (unless (or (null type) (eq (evil-type range) type))
+                (evil-set-type range type)
+                (evil-expand-range range))
+              (evil-set-range-properties range nil)
+              range)
+          ;; restore point and mark like `save-excursion',
+          ;; but only if the motion hasn't disabled the operator
+          (unless evil-inhibit-operator
+            (set-buffer obuffer)
+            (evil-move-mark omark)
+            (goto-char opoint))
+          ;; delete marker so it doesn't slow down editing
+          (move-marker evil-motion-marker nil))))))
+
+(defmacro evil-define-motion (motion args &rest body)
+  "Define a motion command MOTION.
+ARGS is a list of arguments.  Motions can have any number of
+arguments, but the first (if any) has the predefined meaning of
+count.  BODY must execute the motion by moving point.
+
+Optional keyword arguments are:
+- `:type' - determines how the motion works after an operator (one of
+  `inclusive', `line', `block' and `exclusive', or a self-defined
+  motion type)
+- `:jump' - if non-nil, the previous position is stored in the jump
+  list, so that it can be restored with \
+\\<evil-motion-state-map>\\[evil-jump-backward]
+
+\(fn MOTION (COUNT ARGS...) DOC [[KEY VALUE]...] BODY...)"
+  (declare (indent defun)
+           (doc-string 3)
+           (debug (&define name lambda-list
+                           [&optional stringp]
+                           [&rest keywordp sexp]
+                           [&optional ("interactive" [&rest form])]
+                           def-body)))
+  (let (arg doc interactive key keys)
+    (when args
+      (setq args `(&optional ,@(delq '&optional args))
+            ;; the count is either numerical or nil
+            interactive '("<c>")))
+    ;; collect docstring
+    (when (and (> (length body) 1)
+               (or (eq (car-safe (car body)) #'format)
+                   (stringp (car body))))
+      (setq doc (pop body)))
+    ;; collect keywords
+    (setq keys (plist-put keys :repeat 'motion))
+    (while (keywordp (car body))
+      (setq key (pop body)
+            arg (pop body)
+            keys (plist-put keys key arg)))
+    ;; collect `interactive' specification
+    (when (eq (car-safe (car body)) 'interactive)
+      (setq interactive (cdr (pop body))))
+    ;; macro expansion
+    `(progn
+       ;; refresh echo area in Eldoc mode
+       (when ',motion
+         (eval-after-load 'eldoc
+           '(and (fboundp 'eldoc-add-command)
+                 (eldoc-add-command ',motion))))
+       (evil-define-command ,motion (,@args)
+         ,@(when doc `(,doc))         ; avoid nil before `interactive'
+         ,@keys
+         :keep-visual t
+         (interactive ,@interactive)
+         ,@body))))
+
+(defmacro evil-narrow-to-line (&rest body)
+  "Narrow BODY to the current line.
+BODY will signal `beginning-of-line' or `end-of-line' upon reaching
+the beginning or end of the current line."
+  (declare (indent defun) (debug t))
+  `(cl-destructuring-bind (beg end &rest) (evil-line-expand (point) (point))
+     (when (save-excursion (goto-char end) (bolp))
+       (setq end (max beg (1- end))))
+     ;; Do not include the newline in Normal state
+     (or evil-move-beyond-eol
+         (evil-visual-state-p) (evil-operator-state-p)
+         (setq end (max beg (1- end))))
+     (evil-with-restriction beg end
+       (condition-case err
+           (progn ,@body)
+         (beginning-of-buffer
+          (signal (if (= (point-min) beg) 'beginning-of-line (car err))
+                  (cdr err)))
+         (end-of-buffer
+          (signal (if (= (point-max) end) 'end-of-line (car err))
+                  (cdr err)))))))
+
+(defun evil-eobp (&optional pos)
+  "Whether point is at end-of-buffer with regard to end-of-line."
+  (save-excursion
+    (when pos (goto-char pos))
+    (cond
+     ((eobp))
+     ;; the rest only pertains to Normal state
+     ((not (evil-normal-state-p)) nil)
+     ;; at the end of the last line
+     ((eolp)
+      (forward-char)
+      (eobp))
+     ;; at the last character of the last line
+     (t
+      (forward-char)
+      (cond
+       ((eobp))
+       ((eolp)
+        (forward-char)
+        (eobp)))))))
+
+(defun evil-move-beginning (count forward &optional backward)
+  "Move to the beginning of the COUNT next object.
+If COUNT is negative, move to the COUNT previous object.
+FORWARD is a function which moves to the end of the object, and
+BACKWARD is a function which moves to the beginning.
+If one is unspecified, the other is used with a negative argument."
+  (let* ((count (or count 1))
+         (backward (or backward
+                       #'(lambda (count)
+                           (funcall forward (- count)))))
+         (forward (or forward
+                      #'(lambda (count)
+                          (funcall backward (- count)))))
+         (opoint (point)))
+    (cond
+     ((< count 0)
+      (when (bobp)
+        (signal 'beginning-of-buffer nil))
+      (unwind-protect
+          (evil-motion-loop (nil count count)
+            (funcall backward 1))
+        (unless (zerop count)
+          (goto-char (point-min)))))
+     ((> count 0)
+      (when (evil-eobp)
+        (signal 'end-of-buffer nil))
+      ;; Do we need to move past the current object?
+      (when (<= (save-excursion
+                  (funcall forward 1)
+                  (funcall backward 1)
+                  (point))
+                opoint)
+        (setq count (1+ count)))
+      (unwind-protect
+          (evil-motion-loop (nil count count)
+            (funcall forward 1))
+        (if (zerop count)
+            ;; go back to beginning of object
+            (funcall backward 1)
+          (goto-char (point-max)))))
+     (t count))))
+
+(defun evil-move-end (count forward &optional backward inclusive)
+  "Move to the end of the COUNT next object.
+If COUNT is negative, move to the COUNT previous object.
+FORWARD is a function which moves to the end of the object, and
+BACKWARD is a function which moves to the beginning.
+If one is unspecified, the other is used with a negative argument.
+If INCLUSIVE is non-nil, then point is placed at the last character
+of the object; otherwise it is placed at the end of the object."
+  (let* ((count (or count 1))
+         (backward (or backward
+                       #'(lambda (count)
+                           (funcall forward (- count)))))
+         (forward (or forward
+                      #'(lambda (count)
+                          (funcall backward (- count)))))
+         (opoint (point)))
+    (cond
+     ((< count 0)
+      (when (bobp)
+        (signal 'beginning-of-buffer nil))
+      ;; Do we need to move past the current object?
+      (when (>= (save-excursion
+                  (funcall backward 1)
+                  (funcall forward 1)
+                  (point))
+                (if inclusive
+                    (1+ opoint)
+                  opoint))
+        (setq count (1- count)))
+      (unwind-protect
+          (evil-motion-loop (nil count count)
+            (funcall backward 1))
+        (if (not (zerop count))
+            (goto-char (point-min))
+          ;; go to end of object
+          (funcall forward 1)
+          (when inclusive
+            (unless (bobp) (backward-char)))
+          (when (or (evil-normal-state-p)
+                    (evil-motion-state-p))
+            (evil-adjust-cursor)))))
+     ((> count 0)
+      (when (evil-eobp)
+        (signal 'end-of-buffer nil))
+      (when inclusive
+        (forward-char))
+      (unwind-protect
+          (evil-motion-loop (nil count count)
+            (funcall forward 1))
+        (if (not (zerop count))
+            (goto-char (point-max))
+          (when inclusive
+            (unless (bobp) (backward-char)))
+          (when (or (evil-normal-state-p)
+                    (evil-motion-state-p))
+            (evil-adjust-cursor)))))
+     (t count))))
+
+(defun evil-text-object-make-linewise (range)
+  "Turn the text object selection RANGE to linewise.
+The selection is adjusted in a sensible way so that the selected
+lines match the user intent. In particular, whitespace-only parts
+at the first and last lines are omitted. This function returns
+the new range."
+  ;; Bug #607
+  ;; If new type is linewise and the selection of the
+  ;; first line consists of whitespace only, the
+  ;; beginning is moved to the start of the next line. If
+  ;; the selections of the last line consists of
+  ;; whitespace only, the end is moved to the end of the
+  ;; previous line.
+  (if (eq (evil-type range) 'line)
+      range
+    (let ((expanded (plist-get (evil-range-properties range) :expanded))
+          (newrange (evil-expand-range range t)))
+      (save-excursion
+        ;; skip whitespace at the beginning
+        (goto-char (evil-range-beginning newrange))
+        (skip-chars-forward " \t")
+        (when (and (not (bolp)) (eolp))
+          (evil-set-range-beginning newrange (1+ (point))))
+        ;; skip whitepsace at the end
+        (goto-char (evil-range-end newrange))
+        (skip-chars-backward " \t")
+        (when (and (not (eolp)) (bolp))
+          (evil-set-range-end newrange (1- (point))))
+        ;; only modify range if result is not empty
+        (if (> (evil-range-beginning newrange)
+               (evil-range-end newrange))
+            range
+          (unless expanded
+            (evil-contract-range newrange))
+          newrange)))))
+
+(defmacro evil-define-text-object (object args &rest body)
+  "Define a text object command OBJECT.
+BODY should return a range (BEG END) to the right of point
+if COUNT is positive, and to the left of it if negative.
+
+Optional keyword arguments:
+- `:type' - determines how the range applies after an operator
+  (`inclusive', `line', `block', and `exclusive', or a self-defined
+  motion type).
+- `:extend-selection' - if non-nil (default), the text object always
+  enlarges the current selection.  Otherwise, it replaces the current
+  selection.
+
+\(fn OBJECT (COUNT) DOC [[KEY VALUE]...] BODY...)"
+  (declare (indent defun)
+           (doc-string 3)
+           (debug (&define name lambda-list
+                           [&optional stringp]
+                           [&rest keywordp sexp]
+                           def-body)))
+  (let* ((args (delq '&optional args))
+         (count (or (pop args) 'count))
+         (args (when args `(&optional ,@args)))
+         (interactive '(interactive "<c><v>"))
+         doc keys)
+    ;; collect docstring
+    (when (stringp (car body))
+      (setq doc (pop body)))
+    ;; collect keywords
+    (setq keys (plist-put keys :extend-selection t))
+    (while (keywordp (car body))
+      (setq keys (plist-put keys (pop body) (pop body))))
+    ;; interactive
+    (when (eq (car-safe (car body)) 'interactive)
+      (setq interactive (pop body)))
+    ;; macro expansion
+    `(evil-define-motion ,object (,count ,@args)
+       ,@(when doc `(,doc))
+       ,@keys
+       ,interactive
+       (setq ,count (or ,count 1))
+       (when (/= ,count 0)
+         ;; FIXME: These let-bindings shadow variables in args
+         (let ((type (evil-type ',object evil-visual-char))
+               (extend (and (evil-visual-state-p)
+                            (evil-get-command-property
+                             ',object :extend-selection
+                             ',(plist-get keys :extend-selection))))
+               (dir evil-visual-direction)
+               mark point range selection)
+           (cond
+            ;; Visual state: extend the current selection
+            ((and (evil-visual-state-p)
+                  (called-interactively-p 'any))
+             ;; if we are at the beginning of the Visual selection,
+             ;; go to the left (negative COUNT); if at the end,
+             ;; go to the right (positive COUNT)
+             (setq dir evil-visual-direction
+                   ,count (* ,count dir))
+             (setq range (progn ,@body))
+             (when (evil-range-p range)
+               (setq range (evil-expand-range range))
+               (evil-set-type range (evil-type range type))
+               (setq range (evil-contract-range range))
+               ;; the beginning is mark and the end is point
+               ;; unless the selection goes the other way
+               (setq mark  (evil-range-beginning range)
+                     point (evil-range-end range)
+                     type  (evil-type
+                            (if evil-text-object-change-visual-type
+                                range
+                              (evil-visual-range))))
+               (when (and (eq type 'line)
+                          (not (eq type (evil-type range))))
+                 (let ((newrange (evil-text-object-make-linewise range)))
+                   (setq mark (evil-range-beginning newrange)
+                         point (evil-range-end newrange))))
+               (when (< dir 0)
+                 (evil-swap mark point))
+               ;; select the union
+               (evil-visual-make-selection mark point type)))
+            ;; not Visual state: return a pair of buffer positions
+            (t
+             (setq range (progn ,@body))
+             (unless (evil-range-p range)
+               (setq ,count (- ,count)
+                     range (progn ,@body)))
+             (when (evil-range-p range)
+               (setq selection (evil-range (point) (point) type))
+               (if extend
+                   (setq range (evil-range-union range selection))
+                 (evil-set-type range (evil-type range type)))
+               ;; possibly convert to linewise
+               (when (eq evil-this-type-modified 'line)
+                 (setq range (evil-text-object-make-linewise range)))
+               (evil-set-range-properties range nil)
+               range))))))))
+
+(defmacro evil-define-operator (operator args &rest body)
+  "Define an operator command OPERATOR.
+The operator acts on the range of characters BEG through
+END. BODY must execute the operator by potentially manipulating
+the buffer contents, or otherwise causing side effects to happen.
+
+Optional keyword arguments are:
+- `:type' - force the input range to be of a given type (`inclusive',
+  `line', `block', and `exclusive', or a self-defined motion type).
+- `:motion' - use a predetermined motion instead of waiting for one
+  from the keyboard.  This does not affect the behavior in visual
+  state, where selection boundaries are always used.
+- `:repeat' - if non-nil (default), then \
+  \\<evil-normal-state-map>\\[evil-repeat] will repeat the
+  operator.
+- `:move-point' - if non-nil (default), the cursor will be moved to
+  the beginning of the range before the body executes
+- `:keep-visual' - if non-nil, the selection is not disabled when the
+  operator is executed in visual state.  By default, visual state is
+  exited automatically.
+- `:restore-point' - if non-nil, point is restored when the
+  operator is executed from ex.
+
+\(fn OPERATOR (BEG END ARGS...) DOC [[KEY VALUE]...] BODY...)"
+  (declare (indent defun)
+           (doc-string 3)
+           (debug (&define name lambda-list
+                           [&optional stringp]
+                           [&rest keywordp sexp]
+                           [&optional ("interactive" [&rest form])]
+                           def-body)))
+  (let* ((args (delq '&optional args))
+         (interactive (if (> (length args) 2) '("<R>") '("<r>")))
+         (args (if (> (length args) 2)
+                   `(,(nth 0 args) ,(nth 1 args)
+                     &optional ,@(nthcdr 2 args))
+                 args))
+         (end-marker (make-symbol "end-marker"))
+         arg doc key keys visual)
+    ;; collect docstring
+    (when (and (> (length body) 1)
+               (or (eq (car-safe (car-safe body)) 'format)
+                   (stringp (car-safe body))))
+      (setq doc (pop body)))
+    ;; collect keywords
+    (setq keys (plist-put keys :move-point t))
+    (while (keywordp (car-safe body))
+      (setq key (pop body)
+            arg (pop body))
+      (cond
+       ((eq key :keep-visual)
+        (setq visual arg))
+       (t
+        (setq keys (plist-put keys key arg)))))
+    ;; collect `interactive' specification
+    (when (eq (car-safe (car-safe body)) 'interactive)
+      (setq interactive (cdr-safe (pop body))))
+    ;; transform extended interactive specs
+    (setq interactive (apply #'evil-interactive-form interactive))
+    (setq keys (evil-concat-plists keys (cdr-safe interactive))
+          interactive (car-safe interactive))
+    ;; macro expansion
+    `(evil-define-command ,operator ,args
+       ,@(when doc `(,doc))
+       ,@keys
+       :keep-visual t
+       :suppress-operator t
+       (interactive
+        (let* ((props (evil-command-properties ',operator))
+               (evil-operator-range-motion
+                (let ((p (plist-member props :motion)))
+                  ;; :motion nil is equivalent to :motion undefined
+                  (when p (or (cadr p) #'undefined))))
+               (evil-operator-range-type (plist-get props :type))
+               evil-operator-range-beginning evil-operator-range-end
+               evil-inhibit-operator)
+          (setq evil-inhibit-operator-value nil
+                evil-this-operator this-command
+                evil-operator-start-col (current-column))
+          (prog1 ,interactive
+            (setq evil-inhibit-operator-value evil-inhibit-operator)
+            (if ,visual
+                (when (evil-visual-state-p) (evil-visual-expand-region))
+              (setq deactivate-mark t))
+            (cond
+             ((evil-visual-state-p)
+              (evil-visual-rotate 'upper-left))
+             ((plist-get props :move-point)
+              (when evil-operator-range-beginning
+                (goto-char evil-operator-range-beginning)))))))
+       (unwind-protect
+           (let ((evil-inhibit-operator evil-inhibit-operator-value)
+                 (,end-marker (make-marker)))
+             (set-marker ,end-marker ,(cadr args))
+             (unless (and evil-inhibit-operator
+                          (called-interactively-p 'any))
+               ,@body)
+             (evil-set-marker ?\[ (or ,(car args) (point-max)))
+             (evil-set-marker ?\] (max (or ,(car args) (point-max))
+                                       (1- (or (marker-position ,end-marker) (point-max)))))
+             (set-marker ,end-marker nil))
+         (setq evil-inhibit-operator-value nil)))))
+
+;; this is used in the `interactive' specification of an operator command
+(defun evil-operator-range (&optional return-type)
+  "Read a motion from the keyboard and return its buffer positions.
+The return value is a list (BEG END), or (BEG END TYPE) if
+RETURN-TYPE is non-nil."
+  (let ((motion (or evil-operator-range-motion
+                    (when evil-called-from-ex-p 'evil-line)))
+        (type evil-operator-range-type)
+        range count)
+    (setq evil-this-type-modified nil)
+    (cond
+     ;; Ex command
+     ((and evil-called-from-ex-p evil-ex-range)
+      (setq range evil-ex-range))
+     ;; Visual selection
+     ((and (not evil-called-from-ex-p) (evil-visual-state-p))
+      (setq range (evil-visual-range)))
+     ;; active region
+     ((and (not evil-called-from-ex-p) (region-active-p))
+      (setq range (evil-range (region-beginning) (region-end)
+                              (or evil-this-type 'exclusive))))
+     ;; motion
+     (t
+      (evil-save-echo-area
+        (evil-save-state
+          (unless motion
+            ;; Make linewise operator shortcuts. E.g., "d" yields the
+            ;; shortcut "dd", and "g?" yields shortcuts "g??" and "g?g?".
+            (let ((keys (nth 2 (evil-extract-count (this-command-keys)))))
+              (evil-change-state 'operator)
+              (cl-loop for keys on (listify-key-sequence keys) do
+                       (define-key evil-operator-shortcut-map
+                         (vconcat keys) #'evil-line-or-visual-line)))
+            ;; read motion from keyboard
+            (let ((command (evil-read-motion motion)))
+              (setq motion (car command)
+                    count (cadr command)
+                    type (or type (nth 2 command)))))
+          (cond
+           ((eq motion #'undefined)
+            (setq range (list nil nil)
+                  motion nil))
+           ((or (null motion) ; keyboard-quit
+                (evil-get-command-property motion :suppress-operator))
+            (evil-repeat-abort)
+            (setq quit-flag t
+                  range (evil-range (point) (point)) ; zero-len range
+                  motion nil))
+           (evil-repeat-count
+            (setq count evil-repeat-count
+                  ;; only the first operator's count is overwritten
+                  evil-repeat-count nil))
+           ((or count current-prefix-arg)
+            ;; multiply operator count and motion count together
+            (setq count
+                  (* (prefix-numeric-value count)
+                     (prefix-numeric-value current-prefix-arg)))))
+          (when motion
+            (let ((evil-state 'operator)
+                  mark-active)
+              ;; calculate motion range
+              (setq range (evil-motion-range motion count type))))
+          ;; update global variables
+          (setq evil-this-motion motion
+                evil-this-motion-count count
+                type (evil-type range type)
+                evil-this-type type)))))
+    (unless (or (null type) (eq (evil-type range) type))
+      (evil-contract-range range)
+      (evil-set-range-type range type)
+      (evil-expand-range range))
+    (setq evil-operator-range-beginning (evil-range-beginning range)
+          evil-operator-range-end (evil-range-end range)
+          evil-operator-range-type (evil-type range))
+    (setcdr (cdr range)
+            (when return-type (list (evil-type range))))
+    range))
+
+(defmacro evil-define-type (type doc &rest body)
+  "Define type TYPE.
+DOC is a general description and shows up in all docstrings.
+
+Optional keyword arguments:
+- `:expand' - expansion function.  This function should accept two
+  positions in the current buffer, BEG and END,and return a pair of
+  expanded buffer positions.
+- `:contract' - the opposite of `:expand'.  Optional.
+- `:one-to-one' - non-nil if expansion is one-to-one.  This means that
+  `:expand' followed by `:contract' always return the original range.
+- `:normalize' - normalization function.  This function should accept
+  two unexpanded positions and adjust them before expansion.  May be
+  used to deal with buffer boundaries.
+- `:string' - description function.  Takes two buffer positions and
+  returns a human-readable string.  For example \"2 lines\"
+
+If further keywords and functions are specified, they are assumed to
+be transformations on buffer positions, like `:expand' and `:contract'.
+
+\(fn TYPE DOC [[KEY FUNC]...])"
+  (declare (indent defun)
+           (doc-string 2)
+           (debug (&define name
+                           [&optional stringp]
+                           [&rest [keywordp function-form]])))
+  (let ((plist (list :one-to-one t)) ; standard values
+        args defun-forms func key name string sym val)
+    ;; keywords
+    (while (keywordp (car-safe body))
+      (setq key (pop body)
+            val (pop body))
+      (if (plist-member plist key)      ; not a function
+          (setq plist (plist-put plist key val))
+        (setq func val
+              sym (intern (replace-regexp-in-string
+                           "^:" "" (symbol-name key)))
+              name (intern (format "evil-%s-%s" type sym))
+              args (car (cdr-safe func))
+              string (cadr (cdr-safe func))
+              string (if (stringp string)
+                         (format "%s\n\n" string) "")
+              plist (plist-put plist key `',name))
+        (push
+         (cond
+          ((eq key :string)
+           `(defun ,name (beg end &rest properties)
+              ,(format "Return size of %s from BEG to END \
+with PROPERTIES.\n\n%s%s" type string doc)
+              (let ((type ',type)
+                    plist range)
+                (when (and beg end)
+                  (evil-sort beg end)
+                  (save-excursion
+                    (unless (plist-get properties :expanded)
+                      (setq range (apply #'evil-expand
+                                         beg end type properties)
+                            beg (evil-range-beginning range)
+                            end (evil-range-end range)
+                            type (evil-type range type)
+                            plist (evil-range-properties range))
+                      (setq properties
+                            (evil-concat-plists properties plist)))
+                    (or (apply #',func beg end
+                               (when ,(> (length args) 2)
+                                 properties))
+                        ""))))))
+          (t
+           `(defun ,name (beg end &rest properties)
+              ,(format "Perform %s transformation on %s from BEG to END \
+with PROPERTIES.\n\n%s%s" sym type string doc)
+              (let ((type ',type)
+                    plist range)
+                (when (and beg end)
+                  (evil-sort beg end)
+                  (save-excursion
+                    (when (memq ,key '(:expand :contract))
+                      (setq properties
+                            (plist-put properties
+                                       :expanded ,(eq key :expand))))
+                    (setq range (or (apply #',func beg end
+                                           (when ,(> (length args) 2)
+                                             properties))
+                                    (apply #'evil-range
+                                           beg end type properties))
+                          beg (evil-range-beginning range)
+                          end (evil-range-end range)
+                          type (evil-type range type)
+                          plist (evil-range-properties range))
+                    (setq properties
+                          (evil-concat-plists properties plist))
+                    (apply #'evil-range beg end type properties)))))))
+         defun-forms)))
+    ;; :one-to-one requires both or neither of :expand and :contract
+    (when (plist-get plist :expand)
+      (setq plist (plist-put plist :one-to-one
+                             (and (plist-get plist :contract)
+                                  (plist-get plist :one-to-one)))))
+    `(progn
+       (evil--add-to-alist evil-type-properties ',type (list ,@plist))
+       ,@defun-forms
+       ',type)))
+
+(defmacro evil-define-interactive-code (code &rest body)
+  "Define an interactive code.
+PROMPT, if given, is the remainder of the interactive string
+up to the next newline. Command properties may be specified
+via KEY-VALUE pairs. BODY should evaluate to a list of values.
+
+\(fn CODE (PROMPT) [[KEY VALUE]...] BODY...)"
+  (declare (indent defun))
+  (let* ((args (and (> (length body) 1) (listp (car body))
+                    (pop body)))
+         (doc (when (stringp (car body)) (pop body)))
+         (properties
+          (cl-loop while (keywordp (car body))
+                   collect (pop body) collect (pop body)))
+         (func (if args
+                   `(lambda ,args
+                      ,@(when doc `(,doc))
+                      ,@body)
+                 `',(macroexp-progn body))))
+    `(eval-and-compile
+       (evil--add-to-alist
+        evil-interactive-alist ,code (cons ,func ',properties))
+       ,code)))
+
+;;; Highlighting
+
+(when (fboundp 'font-lock-add-keywords)
+  (font-lock-add-keywords
+   'emacs-lisp-mode
+   ;; Match all `evil-define-' forms except `evil-define-key'.
+   ;; (In the interests of speed, this expression is incomplete
+   ;; and does not match all three-letter words.)
+   '(("(\\(evil-\\(?:ex-\\)?define-\
+\\(?:[^ k][^ e][^ y]\\|[-[:word:]]\\{4,\\}\\)\\)\
+\\>[ \f\t\n\r\v]*\\(\\(?:\\sw\\|\\s_\\)+\\)?"
+      (1 'font-lock-keyword-face)
+      (2 'font-lock-function-name-face nil t))
+     ("(\\(evil-\\(?:delay\\|narrow\\|signal\\|save\\|with\\(?:out\\)?\\)\
+\\(?:-[-[:word:]]+\\)?\\)\\>\[ \f\t\n\r\v]+"
+      1 'font-lock-keyword-face)
+     ("(\\(evil-\\(?:[-[:word:]]\\)*loop\\)\\>[ \f\t\n\r\v]+"
+      1 'font-lock-keyword-face))))
+
+(provide 'evil-macros)
+
+;;; evil-macros.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-macros.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-macros.elc
new file mode 100644
index 0000000..e33479f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-macros.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-maps.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-maps.el
new file mode 100644
index 0000000..a285f78
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-maps.el
@@ -0,0 +1,685 @@
+;;; evil-maps.el --- Default keymaps -*- lexical-binding: t -*-
+
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'evil-states)
+(require 'evil-ex)
+(require 'evil-commands)
+(require 'evil-command-window)
+(require 'evil-common)
+
+;;; Normal state
+
+(define-key evil-normal-state-map "a" 'evil-append)
+(define-key evil-normal-state-map "A" 'evil-append-line)
+(define-key evil-normal-state-map "c" 'evil-change)
+(define-key evil-normal-state-map "C" 'evil-change-line)
+(define-key evil-normal-state-map "d" 'evil-delete)
+(define-key evil-normal-state-map "D" 'evil-delete-line)
+(define-key evil-normal-state-map "i" 'evil-insert)
+(define-key evil-normal-state-map (kbd "<insert>") 'evil-insert)
+(define-key evil-normal-state-map (kbd "<insertchar>") 'evil-insert)
+(define-key evil-normal-state-map "I" 'evil-insert-line)
+(define-key evil-normal-state-map "J" 'evil-join)
+(define-key evil-normal-state-map "m" 'evil-set-marker)
+(define-key evil-normal-state-map "o" 'evil-open-below)
+(define-key evil-normal-state-map "O" 'evil-open-above)
+(define-key evil-normal-state-map "p" 'evil-paste-after)
+(define-key evil-normal-state-map "P" 'evil-paste-before)
+(define-key evil-normal-state-map "q" 'evil-record-macro)
+(define-key evil-normal-state-map "Q" 'evil-execute-last-recorded-macro)
+(define-key evil-normal-state-map "r" 'evil-replace)
+(define-key evil-normal-state-map "R" 'evil-enter-replace-state)
+(define-key evil-normal-state-map "s" 'evil-substitute)
+(define-key evil-normal-state-map "S" 'evil-change-whole-line)
+(define-key evil-normal-state-map "x" 'evil-delete-char)
+(define-key evil-normal-state-map "X" 'evil-delete-backward-char)
+(define-key evil-normal-state-map [deletechar] 'evil-delete-char)
+(define-key evil-normal-state-map "y" 'evil-yank)
+(define-key evil-normal-state-map "Y" 'evil-yank-line)
+(define-key evil-normal-state-map "&" 'evil-ex-repeat-substitute)
+(define-key evil-normal-state-map "g&" 'evil-ex-repeat-global-substitute)
+(define-key evil-normal-state-map "g8" 'what-cursor-position)
+(define-key evil-normal-state-map "ga" 'what-cursor-position)
+(define-key evil-normal-state-map "gi" 'evil-insert-resume)
+(define-key evil-normal-state-map "gI" 'evil-insert-0-line)
+(define-key evil-normal-state-map "gJ" 'evil-join-whitespace)
+(define-key evil-normal-state-map "gp" 'evil-paste-after-cursor-after)
+(define-key evil-normal-state-map "gP" 'evil-paste-before-cursor-after)
+(define-key evil-normal-state-map "gq" 'evil-fill-and-move)
+(define-key evil-normal-state-map "gw" 'evil-fill)
+(define-key evil-normal-state-map "gu" 'evil-downcase)
+(define-key evil-normal-state-map "gU" 'evil-upcase)
+(define-key evil-normal-state-map "gf" 'find-file-at-point)
+(define-key evil-normal-state-map "]f" 'find-file-at-point)
+(define-key evil-normal-state-map "[f" 'find-file-at-point)
+(define-key evil-normal-state-map "gF" 'evil-find-file-at-point-with-line)
+(define-key evil-normal-state-map "]F" 'evil-find-file-at-point-with-line)
+(define-key evil-normal-state-map "[F" 'evil-find-file-at-point-with-line)
+(define-key evil-normal-state-map "gx" 'browse-url-at-point)
+(define-key evil-normal-state-map "g?" 'evil-rot13)
+(define-key evil-normal-state-map "g~" 'evil-invert-case)
+(define-key evil-normal-state-map "zo" 'evil-open-fold)
+(define-key evil-normal-state-map "zO" 'evil-open-fold-rec)
+(define-key evil-normal-state-map "zc" 'evil-close-fold)
+(define-key evil-normal-state-map "za" 'evil-toggle-fold)
+(define-key evil-normal-state-map "zr" 'evil-open-folds)
+(define-key evil-normal-state-map "zm" 'evil-close-folds)
+(define-key evil-normal-state-map "z=" 'ispell-word)
+(define-key evil-normal-state-map "\C-n" 'evil-paste-pop-next)
+(define-key evil-normal-state-map "\C-p" 'evil-paste-pop)
+(define-key evil-normal-state-map "\C-t" 'pop-tag-mark)
+(define-key evil-normal-state-map (kbd "C-.") 'evil-repeat-pop)
+(define-key evil-normal-state-map (kbd "M-.") 'evil-repeat-pop-next)
+(define-key evil-normal-state-map "." 'evil-repeat)
+(define-key evil-normal-state-map "@" 'evil-execute-macro)
+(define-key evil-normal-state-map "\"" 'evil-use-register)
+(define-key evil-normal-state-map "~" 'evil-invert-char)
+(define-key evil-normal-state-map "=" 'evil-indent)
+(define-key evil-normal-state-map "<" 'evil-shift-left)
+(define-key evil-normal-state-map ">" 'evil-shift-right)
+(define-key evil-normal-state-map "ZZ" 'evil-save-modified-and-close)
+(define-key evil-normal-state-map "ZQ" 'evil-quit)
+(define-key evil-normal-state-map (kbd "DEL") 'evil-backward-char)
+(define-key evil-normal-state-map [escape] 'evil-force-normal-state)
+(define-key evil-normal-state-map [remap cua-paste-pop] 'evil-paste-pop)
+(define-key evil-normal-state-map [remap yank-pop] 'evil-paste-pop)
+
+;; go to last change
+(define-key evil-normal-state-map "g;" 'evil-goto-last-change)
+(define-key evil-normal-state-map "g," 'evil-goto-last-change-reverse)
+
+;; undo
+(define-key evil-normal-state-map "u" 'evil-undo)
+(define-key evil-normal-state-map "\C-r" 'evil-redo)
+
+;; window commands
+(define-prefix-command 'evil-window-map)
+(define-key evil-window-map "b" 'evil-window-bottom-right)
+(define-key evil-window-map "c" 'evil-window-delete)
+(define-key evil-window-map "f" 'ffap-other-window)
+(define-key evil-window-map "h" 'evil-window-left)
+(define-key evil-window-map "H" 'evil-window-move-far-left)
+(define-key evil-window-map "j" 'evil-window-down)
+(define-key evil-window-map "J" 'evil-window-move-very-bottom)
+(define-key evil-window-map "k" 'evil-window-up)
+(define-key evil-window-map "K" 'evil-window-move-very-top)
+(define-key evil-window-map "l" 'evil-window-right)
+(define-key evil-window-map "L" 'evil-window-move-far-right)
+(define-key evil-window-map "n" 'evil-window-new)
+(define-key evil-window-map "o" 'delete-other-windows)
+(define-key evil-window-map "p" 'evil-window-mru)
+(define-key evil-window-map "q" 'evil-quit)
+(define-key evil-window-map "r" 'evil-window-rotate-downwards)
+(define-key evil-window-map "R" 'evil-window-rotate-upwards)
+(define-key evil-window-map "s" 'evil-window-split)
+(define-key evil-window-map "S" 'evil-window-split)
+(define-key evil-window-map "t" 'evil-window-top-left)
+(when (featurep 'tab-bar)
+  (define-key evil-window-map "T" 'tab-window-detach))
+(define-key evil-window-map "v" 'evil-window-vsplit)
+(define-key evil-window-map "w" 'evil-window-next)
+(define-key evil-window-map "W" 'evil-window-prev)
+(define-key evil-window-map "x" 'evil-window-exchange)
+(define-key evil-window-map "+" 'evil-window-increase-height)
+(define-key evil-window-map "-" 'evil-window-decrease-height)
+(define-key evil-window-map ":" 'evil-ex)
+(define-key evil-window-map "_" 'evil-window-set-height)
+(define-key evil-window-map "<" 'evil-window-decrease-width)
+(define-key evil-window-map ">" 'evil-window-increase-width)
+(define-key evil-window-map "=" 'balance-windows)
+(define-key evil-window-map (kbd "C-=") 'balance-windows)
+(define-key evil-window-map "|" 'evil-window-set-width)
+(define-key evil-window-map [down] 'evil-window-down)
+(define-key evil-window-map [up] 'evil-window-up)
+(define-key evil-window-map [left] 'evil-window-left)
+(define-key evil-window-map [right] 'evil-window-right)
+(define-key evil-window-map "\C-b" 'evil-window-bottom-right)
+(define-key evil-window-map "\C-c" 'evil-window-delete)
+(define-key evil-window-map "\C-f" 'ffap-other-window)
+(define-key evil-window-map "\C-h" 'evil-window-left)
+(define-key evil-window-map (kbd "C-S-h") 'evil-window-move-far-left)
+(define-key evil-window-map "\C-j" 'evil-window-down)
+(define-key evil-window-map (kbd "C-S-j") 'evil-window-move-very-bottom)
+(define-key evil-window-map "\C-k" 'evil-window-up)
+(define-key evil-window-map (kbd "C-S-k") 'evil-window-move-very-top)
+(define-key evil-window-map "\C-l" 'evil-window-right)
+(define-key evil-window-map (kbd "C-S-l") 'evil-window-move-far-right)
+(define-key evil-window-map "\C-n" 'evil-window-new)
+(define-key evil-window-map "\C-o" 'delete-other-windows)
+(define-key evil-window-map "\C-p" 'evil-window-mru)
+(define-key evil-window-map "\C-q" 'evil-quit)
+(define-key evil-window-map "\C-r" 'evil-window-rotate-downwards)
+(define-key evil-window-map (kbd "C-S-r") 'evil-window-rotate-upwards)
+(define-key evil-window-map "\C-s" 'evil-window-split)
+(define-key evil-window-map (kbd "C-S-s") 'evil-window-split)
+(define-key evil-window-map "\C-t" 'evil-window-top-left)
+(define-key evil-window-map "\C-v" 'evil-window-vsplit)
+(define-key evil-window-map "\C-w" 'evil-window-next)
+(define-key evil-window-map (kbd "C-S-W") 'evil-window-prev)
+(define-key evil-window-map "\C-x" 'evil-window-exchange)
+(define-key evil-window-map "\C-_" 'evil-window-set-height)
+(define-key evil-window-map [C-down] 'evil-window-down)
+(define-key evil-window-map [C-up] 'evil-window-up)
+(define-key evil-window-map [C-left] 'evil-window-left)
+(define-key evil-window-map [C-right] 'evil-window-right)
+(define-key evil-window-map "0" 'evil-window-digit-argument)
+(define-key evil-window-map "1" 'evil-window-digit-argument)
+(define-key evil-window-map "2" 'evil-window-digit-argument)
+(define-key evil-window-map "3" 'evil-window-digit-argument)
+(define-key evil-window-map "4" 'evil-window-digit-argument)
+(define-key evil-window-map "5" 'evil-window-digit-argument)
+(define-key evil-window-map "6" 'evil-window-digit-argument)
+(define-key evil-window-map "7" 'evil-window-digit-argument)
+(define-key evil-window-map "8" 'evil-window-digit-argument)
+(define-key evil-window-map "9" 'evil-window-digit-argument)
+
+(when (featurep 'tab-bar)
+  (define-key evil-motion-state-map "gt" 'evil-tab-next)
+  (define-key evil-window-map "gt" 'evil-tab-next)
+  (define-key evil-motion-state-map "gT" 'tab-bar-switch-to-prev-tab)
+  (define-key evil-window-map "gT" 'tab-bar-switch-to-prev-tab))
+
+;;; Motion state
+
+;; "0" is a special command when called first
+(define-key evil-motion-state-map "0" 'evil-beginning-of-line)
+(define-key evil-motion-state-map "1" 'digit-argument)
+(define-key evil-motion-state-map "2" 'digit-argument)
+(define-key evil-motion-state-map "3" 'digit-argument)
+(define-key evil-motion-state-map "4" 'digit-argument)
+(define-key evil-motion-state-map "5" 'digit-argument)
+(define-key evil-motion-state-map "6" 'digit-argument)
+(define-key evil-motion-state-map "7" 'digit-argument)
+(define-key evil-motion-state-map "8" 'digit-argument)
+(define-key evil-motion-state-map "9" 'digit-argument)
+(define-key evil-motion-state-map "b" 'evil-backward-word-begin)
+(define-key evil-motion-state-map "B" 'evil-backward-WORD-begin)
+(define-key evil-motion-state-map "e" 'evil-forward-word-end)
+(define-key evil-motion-state-map "E" 'evil-forward-WORD-end)
+(define-key evil-motion-state-map "f" 'evil-find-char)
+(define-key evil-motion-state-map "F" 'evil-find-char-backward)
+(define-key evil-motion-state-map "G" 'evil-goto-line)
+(define-key evil-motion-state-map "h" 'evil-backward-char)
+(define-key evil-motion-state-map "H" 'evil-window-top)
+(define-key evil-motion-state-map "j" 'evil-next-line)
+(define-key evil-motion-state-map "k" 'evil-previous-line)
+(define-key evil-motion-state-map "l" 'evil-forward-char)
+(define-key evil-motion-state-map " " 'evil-forward-char)
+(define-key evil-motion-state-map "K" 'evil-lookup)
+(define-key evil-motion-state-map "L" 'evil-window-bottom)
+(define-key evil-motion-state-map "M" 'evil-window-middle)
+(define-key evil-motion-state-map "n" 'evil-search-next)
+(define-key evil-motion-state-map "N" 'evil-search-previous)
+(define-key evil-motion-state-map "t" 'evil-find-char-to)
+(define-key evil-motion-state-map "T" 'evil-find-char-to-backward)
+(define-key evil-motion-state-map "w" 'evil-forward-word-begin)
+(define-key evil-motion-state-map "W" 'evil-forward-WORD-begin)
+(define-key evil-motion-state-map "y" 'evil-yank)
+(define-key evil-motion-state-map "Y" 'evil-yank-line)
+(define-key evil-motion-state-map "gd" 'evil-goto-definition)
+(define-key evil-motion-state-map "ge" 'evil-backward-word-end)
+(define-key evil-motion-state-map "gE" 'evil-backward-WORD-end)
+(define-key evil-motion-state-map "gg" 'evil-goto-first-line)
+(define-key evil-motion-state-map "gj" 'evil-next-visual-line)
+(define-key evil-motion-state-map (vconcat "g" [down]) 'evil-next-visual-line)
+(define-key evil-motion-state-map "gk" 'evil-previous-visual-line)
+(define-key evil-motion-state-map (vconcat "g" [up]) 'evil-previous-visual-line)
+(define-key evil-motion-state-map "g0" 'evil-beginning-of-visual-line)
+(define-key evil-motion-state-map "g_" 'evil-last-non-blank)
+(define-key evil-motion-state-map "g^" 'evil-first-non-blank-of-visual-line)
+(define-key evil-motion-state-map (vconcat "g" [home]) 'evil-first-non-blank-of-visual-line)
+(define-key evil-motion-state-map "gm" 'evil-middle-of-visual-line)
+(define-key evil-motion-state-map "gM" 'evil-percentage-of-line)
+(define-key evil-motion-state-map "go" 'evil-goto-char)
+(define-key evil-motion-state-map "g$" 'evil-end-of-visual-line)
+(define-key evil-motion-state-map (vconcat "g" [end]) 'evil-end-of-visual-line)
+(define-key evil-motion-state-map "g\C-]" 'evil-jump-to-tag)
+(define-key evil-motion-state-map "{" 'evil-backward-paragraph)
+(define-key evil-motion-state-map "}" 'evil-forward-paragraph)
+(define-key evil-motion-state-map "#" 'evil-search-word-backward)
+(define-key evil-motion-state-map "g#" 'evil-search-unbounded-word-backward)
+(define-key evil-motion-state-map "$" 'evil-end-of-line)
+(define-key evil-motion-state-map [end] 'evil-end-of-line)
+(define-key evil-motion-state-map [home] 'evil-beginning-of-line)
+(define-key evil-motion-state-map "%" 'evil-jump-item)
+(define-key evil-motion-state-map "`" 'evil-goto-mark)
+(define-key evil-motion-state-map "'" 'evil-goto-mark-line)
+(define-key evil-motion-state-map "(" 'evil-backward-sentence-begin)
+(define-key evil-motion-state-map ")" 'evil-forward-sentence-begin)
+(define-key evil-motion-state-map "]]" 'evil-forward-section-begin)
+(define-key evil-motion-state-map "][" 'evil-forward-section-end)
+(define-key evil-motion-state-map "[[" 'evil-backward-section-begin)
+(define-key evil-motion-state-map "[]" 'evil-backward-section-end)
+(define-key evil-motion-state-map "[(" 'evil-previous-open-paren)
+(define-key evil-motion-state-map "])" 'evil-next-close-paren)
+(define-key evil-motion-state-map "[{" 'evil-previous-open-brace)
+(define-key evil-motion-state-map "]}" 'evil-next-close-brace)
+(define-key evil-motion-state-map "]'" 'evil-next-mark-line)
+(define-key evil-motion-state-map "]`" 'evil-next-mark)
+(define-key evil-motion-state-map "['" 'evil-previous-mark-line)
+(define-key evil-motion-state-map "[`" 'evil-previous-mark)
+(define-key evil-motion-state-map "]s" 'evil-next-flyspell-error)
+(define-key evil-motion-state-map "[s" 'evil-prev-flyspell-error)
+(define-key evil-motion-state-map "*" 'evil-search-word-forward)
+(define-key evil-motion-state-map "g*" 'evil-search-unbounded-word-forward)
+(define-key evil-motion-state-map "," 'evil-repeat-find-char-reverse)
+(define-key evil-motion-state-map "/" 'evil-search-forward)
+(define-key evil-motion-state-map ";" 'evil-repeat-find-char)
+(define-key evil-motion-state-map "?" 'evil-search-backward)
+(define-key evil-motion-state-map "|" 'evil-goto-column)
+(define-key evil-motion-state-map "^" 'evil-first-non-blank)
+(define-key evil-motion-state-map "+" 'evil-next-line-first-non-blank)
+(define-key evil-motion-state-map "_" 'evil-next-line-1-first-non-blank)
+(define-key evil-motion-state-map "-" 'evil-previous-line-first-non-blank)
+(define-key evil-motion-state-map "\C-w" 'evil-window-map)
+(define-key evil-motion-state-map (kbd "C-6") 'evil-switch-to-windows-last-buffer)
+(define-key evil-motion-state-map "\C-]" 'evil-jump-to-tag)
+(define-key evil-motion-state-map (kbd "C-b") 'evil-scroll-page-up)
+(define-key evil-motion-state-map (kbd "C-e") 'evil-scroll-line-down)
+(define-key evil-motion-state-map (kbd "C-f") 'evil-scroll-page-down)
+(define-key evil-motion-state-map (kbd "C-o") 'evil-jump-backward)
+(define-key evil-motion-state-map (kbd "C-y") 'evil-scroll-line-up)
+(define-key evil-motion-state-map (kbd "RET") 'evil-ret)
+(define-key evil-motion-state-map "\\" 'evil-execute-in-emacs-state)
+(define-key evil-motion-state-map "z^" 'evil-scroll-top-line-to-bottom)
+(define-key evil-motion-state-map "z+" 'evil-scroll-bottom-line-to-top)
+(define-key evil-motion-state-map "zt" 'evil-scroll-line-to-top)
+;; TODO: z RET has an advanced form taking an count before the RET
+;; but this requires again a special state with a single command
+;; bound to RET
+(define-key evil-motion-state-map (vconcat "z" [return]) 'evil-scroll-line-to-top-first-non-blank)
+(define-key evil-motion-state-map (kbd "z RET") 'evil-scroll-line-to-top-first-non-blank)
+(define-key evil-motion-state-map "zz" 'evil-scroll-line-to-center)
+(define-key evil-motion-state-map "z." 'evil-scroll-line-to-center-first-non-blank)
+(define-key evil-motion-state-map "zb" 'evil-scroll-line-to-bottom)
+(define-key evil-motion-state-map "z-" 'evil-scroll-line-to-bottom-first-non-blank)
+(define-key evil-motion-state-map "v" 'evil-visual-char)
+(define-key evil-motion-state-map "V" 'evil-visual-line)
+(define-key evil-motion-state-map "\C-v" 'evil-visual-block)
+(define-key evil-motion-state-map "gv" 'evil-visual-restore)
+(define-key evil-motion-state-map (kbd "C-^") 'evil-buffer)
+(define-key evil-motion-state-map [left] 'evil-backward-char)
+(define-key evil-motion-state-map [right] 'evil-forward-char)
+(define-key evil-motion-state-map [up] 'evil-previous-line)
+(define-key evil-motion-state-map [down] 'evil-next-line)
+(define-key evil-motion-state-map "zl" 'evil-scroll-column-right)
+(define-key evil-motion-state-map [?z right] 'evil-scroll-column-right)
+(define-key evil-motion-state-map "zh" 'evil-scroll-column-left)
+(define-key evil-motion-state-map [?z left] 'evil-scroll-column-left)
+(define-key evil-motion-state-map "ze" 'evil-scroll-end-column)
+(define-key evil-motion-state-map "zs" 'evil-scroll-start-column)
+(define-key evil-motion-state-map "zH" 'evil-scroll-left)
+(define-key evil-motion-state-map [?z S-left] 'evil-scroll-left)
+(define-key evil-motion-state-map "zL" 'evil-scroll-right)
+(define-key evil-motion-state-map [?z S-right] 'evil-scroll-right)
+(define-key evil-motion-state-map
+  (read-kbd-macro evil-toggle-key) 'evil-emacs-state)
+
+;; text objects
+(define-key evil-outer-text-objects-map "w" 'evil-a-word)
+(define-key evil-outer-text-objects-map "W" 'evil-a-WORD)
+(define-key evil-outer-text-objects-map "s" 'evil-a-sentence)
+(define-key evil-outer-text-objects-map "p" 'evil-a-paragraph)
+(define-key evil-outer-text-objects-map "b" 'evil-a-paren)
+(define-key evil-outer-text-objects-map "(" 'evil-a-paren)
+(define-key evil-outer-text-objects-map ")" 'evil-a-paren)
+(define-key evil-outer-text-objects-map "[" 'evil-a-bracket)
+(define-key evil-outer-text-objects-map "]" 'evil-a-bracket)
+(define-key evil-outer-text-objects-map "B" 'evil-a-curly)
+(define-key evil-outer-text-objects-map "{" 'evil-a-curly)
+(define-key evil-outer-text-objects-map "}" 'evil-a-curly)
+(define-key evil-outer-text-objects-map "<" 'evil-an-angle)
+(define-key evil-outer-text-objects-map ">" 'evil-an-angle)
+(define-key evil-outer-text-objects-map "'" 'evil-a-single-quote)
+(define-key evil-outer-text-objects-map "\"" 'evil-a-double-quote)
+(define-key evil-outer-text-objects-map "`" 'evil-a-back-quote)
+(define-key evil-outer-text-objects-map "t" 'evil-a-tag)
+(define-key evil-outer-text-objects-map "o" 'evil-a-symbol)
+(define-key evil-inner-text-objects-map "w" 'evil-inner-word)
+(define-key evil-inner-text-objects-map "W" 'evil-inner-WORD)
+(define-key evil-inner-text-objects-map "s" 'evil-inner-sentence)
+(define-key evil-inner-text-objects-map "p" 'evil-inner-paragraph)
+(define-key evil-inner-text-objects-map "b" 'evil-inner-paren)
+(define-key evil-inner-text-objects-map "(" 'evil-inner-paren)
+(define-key evil-inner-text-objects-map ")" 'evil-inner-paren)
+(define-key evil-inner-text-objects-map "[" 'evil-inner-bracket)
+(define-key evil-inner-text-objects-map "]" 'evil-inner-bracket)
+(define-key evil-inner-text-objects-map "B" 'evil-inner-curly)
+(define-key evil-inner-text-objects-map "{" 'evil-inner-curly)
+(define-key evil-inner-text-objects-map "}" 'evil-inner-curly)
+(define-key evil-inner-text-objects-map "<" 'evil-inner-angle)
+(define-key evil-inner-text-objects-map ">" 'evil-inner-angle)
+(define-key evil-inner-text-objects-map "'" 'evil-inner-single-quote)
+(define-key evil-inner-text-objects-map "\"" 'evil-inner-double-quote)
+(define-key evil-inner-text-objects-map "`" 'evil-inner-back-quote)
+(define-key evil-inner-text-objects-map "t" 'evil-inner-tag)
+(define-key evil-inner-text-objects-map "o" 'evil-inner-symbol)
+(define-key evil-motion-state-map "gn" 'evil-next-match)
+(define-key evil-motion-state-map "gN" 'evil-previous-match)
+
+(when evil-want-C-i-jump
+  (define-key evil-motion-state-map (kbd "C-i") 'evil-jump-forward))
+
+(when evil-want-C-u-scroll
+  (define-key evil-motion-state-map (kbd "C-u") 'evil-scroll-up))
+
+(when evil-want-C-d-scroll
+  (define-key evil-motion-state-map (kbd "C-d") 'evil-scroll-down))
+
+(when evil-want-C-g-bindings
+  (define-key evil-motion-state-map "g\C-g" 'count-words))
+
+;;; Visual state
+
+(define-key evil-visual-state-map "A" 'evil-append)
+(define-key evil-visual-state-map "I" 'evil-insert)
+(define-key evil-visual-state-map "o" 'exchange-point-and-mark)
+(define-key evil-visual-state-map "O" 'evil-visual-exchange-corners)
+(define-key evil-visual-state-map "R" 'evil-change-whole-line)
+(define-key evil-visual-state-map "u" 'evil-downcase)
+(define-key evil-visual-state-map "U" 'evil-upcase)
+(define-key evil-visual-state-map "X" 'evil-delete-line)
+(define-key evil-visual-state-map "a" evil-outer-text-objects-map)
+(define-key evil-visual-state-map "i" evil-inner-text-objects-map)
+(define-key evil-visual-state-map (kbd "<insert>") 'undefined)
+(define-key evil-visual-state-map (kbd "<insertchar>") 'undefined)
+(define-key evil-visual-state-map [remap evil-repeat] 'undefined)
+(define-key evil-visual-state-map [escape] 'evil-exit-visual-state)
+(define-key evil-visual-state-map "gf" 'evil-find-file-at-point-visual)
+
+;;; Operator-Pending state
+
+(define-key evil-operator-state-map "a" evil-outer-text-objects-map)
+(define-key evil-operator-state-map "i" evil-inner-text-objects-map)
+;; (define-key evil-operator-state-map [escape] 'keyboard-quit)
+
+;;; Insert state
+
+(defvar evil-insert-state-bindings
+  `(([insert] . evil-enter-replace-state)
+    ("\C-q" . evil-quoted-insert)
+    ("\C-v" . evil-quoted-insert)
+    ("\C-k" . evil-insert-digraph)
+    ("\C-o" . evil-execute-in-normal-state)
+    ("\C-r" . evil-paste-from-register)
+    ("\C-y" . evil-copy-from-above)
+    ("\C-e" . evil-copy-from-below)
+    ("\C-n" . evil-complete-next)              ;; Completion commands
+    ("\C-p" . evil-complete-previous)          ;; don't yet behave correctly
+    ("\C-x\C-n" . evil-complete-next-line)     ;; in replace state
+    ("\C-x\C-p" . evil-complete-previous-line) ;; TODO - fix this
+    ("\C-t" . evil-shift-right-line)
+    ("\C-d" . evil-shift-left-line)
+    ("\C-a" . evil-paste-last-insertion)
+    ("\C-@" . evil-paste-last-insertion-and-stop-insert)
+    ([remap delete-backward-char] . evil-delete-backward-char-and-join)
+    ([S-left] . evil-backward-word-begin)
+    ([S-right] . evil-forward-word-begin)
+    ,(if evil-want-C-w-delete
+         '("\C-w" . evil-delete-backward-word)
+       '("\C-w" . evil-window-map))
+    ,@(when evil-want-C-u-delete
+        '(("\C-u" . evil-delete-back-to-indentation)))
+    ,@(when evil-want-C-h-delete
+        '(("\C-h" . evil-delete-backward-char-and-join)))
+    ([mouse-2] . mouse-yank-primary))
+  "Evil's bindings for insert & replace states.
+Used in `evil-insert-state-map' and `evil-replace-state-map',
+excluding <delete>, <escape>, and `evil-toggle-key'.")
+
+(defun evil-update-insert-state-bindings (&optional _option-name remove force)
+  "Update bindings in `evil-insert-state-map'.
+If no arguments are given add the bindings specified in
+`evil-insert-state-bindings'. If REMOVE is non nil, remove only
+these bindings. Unless FORCE is non nil, this will not
+overwriting existing bindings, which means bindings will not be
+added if one already exists for a key and only default bindings
+are removed.
+
+Note that <delete>, <escape> and `evil-toggle-key' are not
+included in `evil-insert-state-bindings' by default."
+  (interactive)
+  (dolist (binding evil-insert-state-bindings)
+    (cond
+     ((and remove
+           (or force
+               ;; Only remove if the default binding has not changed
+               (eq (evil-lookup-key evil-insert-state-map (car binding))
+                   (cdr binding))))
+      (define-key evil-insert-state-map (car binding) nil))
+     ((and (null remove)
+           (or force
+               ;; Check to see that nothing is bound here before adding
+               (not (evil-lookup-key evil-insert-state-map (car binding)))))
+      (define-key evil-insert-state-map (car binding) (cdr binding))))))
+
+(define-key evil-insert-state-map [delete] 'delete-char)
+(define-key evil-insert-state-map [escape] 'evil-normal-state)
+(define-key evil-insert-state-map
+  (read-kbd-macro evil-toggle-key) 'evil-emacs-state)
+
+;;; Replace state
+
+(dolist (binding evil-insert-state-bindings)
+  (define-key evil-replace-state-map (car binding) (cdr binding)))
+(define-key evil-replace-state-map (kbd "DEL") 'evil-replace-backspace)
+(when evil-want-C-h-delete
+  (define-key evil-replace-state-map "\C-h" 'evil-replace-backspace))
+(define-key evil-replace-state-map [escape] 'evil-normal-state)
+(define-key evil-replace-state-map [insert] 'evil-append)
+
+;;; Emacs state
+
+(define-key evil-emacs-state-map
+  (read-kbd-macro evil-toggle-key) 'evil-exit-emacs-state)
+
+(when evil-want-C-w-in-emacs-state
+  (define-key evil-emacs-state-map "\C-w" 'evil-window-map))
+
+;;; Mouse
+(define-key evil-motion-state-map [down-mouse-1] 'evil-mouse-drag-region)
+(define-key evil-visual-state-map [mouse-2] 'evil-exit-visual-and-repeat)
+(define-key evil-normal-state-map [mouse-2] 'mouse-yank-primary)
+
+;; Ex
+(define-key evil-motion-state-map ":" 'evil-ex)
+(define-key evil-motion-state-map "!" 'evil-shell-command)
+
+(evil-ex-define-cmd "e[dit]" 'evil-edit)
+(evil-ex-define-cmd "vie[w]" 'evil-view)
+(evil-ex-define-cmd "w[rite]" 'evil-write)
+(evil-ex-define-cmd "up[date]" 'evil-update)
+(evil-ex-define-cmd "wa[ll]" 'evil-write-all)
+(evil-ex-define-cmd "sav[eas]" 'evil-save)
+(evil-ex-define-cmd "r[ead]" 'evil-read)
+(evil-ex-define-cmd "b[uffer]" 'evil-buffer)
+(evil-ex-define-cmd "bad[d]" 'evil-buffer-add)
+(evil-ex-define-cmd "bn[ext]" 'evil-next-buffer)
+(evil-ex-define-cmd "bp[revious]" 'evil-prev-buffer)
+(evil-ex-define-cmd "bN[ext]" "bprevious")
+(evil-ex-define-cmd "sb[uffer]" 'evil-split-buffer)
+(evil-ex-define-cmd "sbn[ext]" 'evil-split-next-buffer)
+(evil-ex-define-cmd "sbp[revious]" 'evil-split-prev-buffer)
+(evil-ex-define-cmd "sbN[ext]" "sbprevious")
+(evil-ex-define-cmd "buffers" 'buffer-menu)
+(evil-ex-define-cmd "files" 'evil-show-files)
+(evil-ex-define-cmd "ls" "buffers")
+
+(evil-ex-define-cmd "c[hange]" 'evil-change)
+(evil-ex-define-cmd "co[py]" 'evil-copy)
+(evil-ex-define-cmd "t" "copy")
+(evil-ex-define-cmd "m[ove]" 'evil-move)
+(evil-ex-define-cmd "d[elete]" 'evil-ex-delete)
+(evil-ex-define-cmd "y[ank]" 'evil-ex-yank)
+(evil-ex-define-cmd "pu[t]" 'evil-ex-put)
+(evil-ex-define-cmd "go[to]" 'evil-goto-char)
+(evil-ex-define-cmd "j[oin]" 'evil-ex-join)
+(evil-ex-define-cmd "le[ft]" 'evil-align-left)
+(evil-ex-define-cmd "ri[ght]" 'evil-align-right)
+(evil-ex-define-cmd "ce[nter]" 'evil-align-center)
+(evil-ex-define-cmd "sp[lit]" 'evil-window-split)
+(evil-ex-define-cmd "sv[iew]" 'evil-window-split-view)
+(evil-ex-define-cmd "vs[plit]" 'evil-window-vsplit)
+(evil-ex-define-cmd "new" 'evil-window-new)
+(evil-ex-define-cmd "ene[w]" 'evil-buffer-new)
+(evil-ex-define-cmd "vne[w]" 'evil-window-vnew)
+(evil-ex-define-cmd "clo[se]" 'evil-window-delete)
+(evil-ex-define-cmd "on[ly]" 'delete-other-windows)
+(evil-ex-define-cmd "q[uit]" 'evil-quit)
+(evil-ex-define-cmd "wq" 'evil-save-and-close)
+(evil-ex-define-cmd "quita[ll]" 'evil-quit-all)
+(evil-ex-define-cmd "qa[ll]" "quitall")
+(evil-ex-define-cmd "cq[uit]" 'evil-quit-all-with-error-code)
+(evil-ex-define-cmd "wqa[ll]" 'evil-save-and-quit)
+(evil-ex-define-cmd "xa[ll]" "wqall")
+(evil-ex-define-cmd "x[it]" 'evil-save-modified-and-close)
+(evil-ex-define-cmd "exi[t]" 'evil-save-modified-and-close)
+(evil-ex-define-cmd "bd[elete]" 'evil-delete-buffer)
+(evil-ex-define-cmd "bw[ipeout]" 'evil-delete-buffer)
+(evil-ex-define-cmd "g[lobal]" 'evil-ex-global)
+(evil-ex-define-cmd "v[global]" 'evil-ex-global-inverted)
+(evil-ex-define-cmd "norm[al]" 'evil-ex-normal)
+(evil-ex-define-cmd "s[ubstitute]" 'evil-ex-substitute)
+(evil-ex-define-cmd "&" 'evil-ex-repeat-substitute)
+(evil-ex-define-cmd "&&" 'evil-ex-repeat-substitute-with-flags)
+(evil-ex-define-cmd "~" 'evil-ex-repeat-substitute-with-search)
+(evil-ex-define-cmd "~&" 'evil-ex-repeat-substitute-with-search-and-flags)
+(evil-ex-define-cmd "mat[ch]" 'evil-ex-match)
+(evil-ex-define-cmd "registers" 'evil-show-registers)
+(evil-ex-define-cmd "di[splay]" "registers")
+(evil-ex-define-cmd "ma[rk]" 'evil-set-col-0-mark)
+(evil-ex-define-cmd "marks" 'evil-show-marks)
+(evil-ex-define-cmd "delm[arks]" 'evil-delete-marks)
+(evil-ex-define-cmd "ju[mps]" 'evil-show-jumps)
+(evil-ex-define-cmd "noh[lsearch]" 'evil-ex-nohighlight)
+(evil-ex-define-cmd "f[ile]" 'evil-show-file-info)
+(evil-ex-define-cmd "<" 'evil-shift-left)
+(evil-ex-define-cmd ">" 'evil-shift-right)
+(evil-ex-define-cmd "=" 'evil-ex-line-number)
+(evil-ex-define-cmd "!" 'evil-shell-command)
+(evil-ex-define-cmd "@:" 'evil-ex-repeat)
+(evil-ex-define-cmd "mak[e]" 'evil-make)
+(evil-ex-define-cmd "cc" 'evil-goto-error)
+(evil-ex-define-cmd "cfir[st]" 'first-error)
+(evil-ex-define-cmd "cr[ewind]" 'first-error)
+(evil-ex-define-cmd "cn[ext]" 'next-error)
+(evil-ex-define-cmd "cp[revious]" 'previous-error)
+(evil-ex-define-cmd "set-initial-state" 'evil-ex-set-initial-state)
+(evil-ex-define-cmd "show-digraphs" 'evil-ex-show-digraphs)
+(evil-ex-define-cmd "sor[t]" 'evil-ex-sort)
+(evil-ex-define-cmd "res[ize]" 'evil-ex-resize)
+(evil-ex-define-cmd "u[ndo]" 'evil-undo)
+(evil-ex-define-cmd "red[o]" 'evil-redo)
+(evil-ex-define-cmd "p[rint]" 'evil-ex-print)
+(evil-ex-define-cmd "P[rint]" 'evil-ex-print)
+(evil-ex-define-cmd "nu[mber]" 'evil-ex-numbered-print)
+(evil-ex-define-cmd "#" 'evil-ex-numbered-print)
+(evil-ex-define-cmd "z" 'evil-ex-z)
+(evil-ex-define-cmd "ret[ab]" 'evil-retab)
+
+(when (featurep 'tab-bar)
+  (evil-ex-define-cmd "tabnew" 'tab-bar-new-tab)
+  (evil-ex-define-cmd "tabc[lose]" 'tab-bar-close-tab)
+  (evil-ex-define-cmd "tabo[nly]" 'tab-bar-close-other-tabs)
+  (evil-ex-define-cmd "tabn[ext]" 'evil-tab-next)
+  (evil-ex-define-cmd "tabp[revious]" 'tab-bar-switch-to-prev-tab))
+
+;; Command-line editing
+(define-key evil-command-line-map "\d" #'evil-ex-delete-backward-char)
+(define-key evil-command-line-map "\t" #'completion-at-point)
+(define-key evil-command-line-map [tab] #'completion-at-point)
+(define-key evil-command-line-map "\C-a" #'completion-at-point)
+(define-key evil-command-line-map "\C-b" #'move-beginning-of-line)
+(define-key evil-command-line-map "\C-c" #'abort-recursive-edit)
+(define-key evil-command-line-map "\C-d" #'completion-at-point)
+(define-key evil-command-line-map "\C-f" 'evil-command-window)
+(define-key evil-command-line-map "\C-g" #'abort-minibuffers)
+(define-key evil-command-line-map "\C-k" 'evil-insert-digraph)
+(define-key evil-command-line-map "\C-l" #'completion-at-point)
+(define-key evil-command-line-map "\C-n" #'next-history-element)
+(define-key evil-command-line-map "\C-p" #'previous-history-element)
+(define-key evil-command-line-map "\C-r" 'evil-paste-from-register)
+(define-key evil-command-line-map "\C-u" 'evil-delete-whole-line)
+(define-key evil-command-line-map "\C-v" #'quoted-insert)
+(when evil-want-C-w-delete
+  (define-key evil-command-line-map "\C-w" #'evil-delete-backward-word))
+(define-key evil-command-line-map [escape] #'abort-recursive-edit)
+(define-key evil-command-line-map [S-left] #'backward-word)
+(define-key evil-command-line-map [S-right] #'forward-word)
+(define-key evil-command-line-map [up] #'previous-complete-history-element)
+(define-key evil-command-line-map [down] #'next-complete-history-element)
+(define-key evil-command-line-map [prior] #'previous-history-element)
+(define-key evil-command-line-map [next] #'next-history-element)
+(define-key evil-command-line-map [return] #'exit-minibuffer)
+(define-key evil-command-line-map (kbd "RET") #'exit-minibuffer)
+
+;; search command line
+(set-keymap-parent evil-ex-search-keymap evil-command-line-map)
+(unless evil-want-C-w-delete
+  (define-key evil-ex-search-keymap "\C-w" 'evil-search-yank-word))
+
+;; Ex command line
+(set-keymap-parent evil-ex-completion-map evil-command-line-map)
+
+;; eval prompt (the `=' register)
+(define-key evil-eval-map "\C-b" 'move-beginning-of-line)
+(define-key evil-eval-map "\C-c" 'abort-recursive-edit)
+(define-key evil-eval-map "\C-g" 'abort-recursive-edit)
+(define-key evil-eval-map "\C-k" 'evil-insert-digraph)
+(define-key evil-eval-map "\C-p" #'previous-complete-history-element)
+(define-key evil-eval-map "\C-r" 'evil-paste-from-register)
+(define-key evil-eval-map "\C-n" #'next-complete-history-element)
+(define-key evil-eval-map "\C-u" 'evil-delete-whole-line)
+(define-key evil-eval-map "\C-v" #'quoted-insert)
+(define-key evil-eval-map "\C-w" 'evil-delete-backward-word)
+(define-key evil-eval-map [escape] 'abort-recursive-edit)
+(define-key evil-eval-map [S-left] 'backward-word)
+(define-key evil-eval-map [S-right] 'forward-word)
+(define-key evil-eval-map [up] 'previous-complete-history-element)
+(define-key evil-eval-map [down] 'next-complete-history-element)
+(define-key evil-eval-map [prior] 'previous-history-element)
+(define-key evil-eval-map [next] 'next-history-element)
+(define-key evil-eval-map [return] 'exit-minibuffer)
+(define-key evil-eval-map (kbd "RET") 'exit-minibuffer)
+
+;; evil-read-key
+(define-key evil-read-key-map (kbd "ESC") #'keyboard-quit)
+(define-key evil-read-key-map (kbd "C-]") #'keyboard-quit)
+(define-key evil-read-key-map (kbd "C-g") #'keyboard-quit)
+(define-key evil-read-key-map (kbd "C-q") #'evil-read-quoted-char)
+(define-key evil-read-key-map (kbd "C-v") #'evil-read-quoted-char)
+(define-key evil-read-key-map (kbd "C-k") #'evil-read-digraph-char)
+(define-key evil-read-key-map "\r" "\n")
+
+;; command line window
+(evil-define-key* '(normal insert) evil-command-window-mode-map
+  (kbd "RET") 'evil-command-window-execute)
+
+(provide 'evil-maps)
+
+;;; evil-maps.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-maps.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-maps.elc
new file mode 100644
index 0000000..ee9d743
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-maps.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-pkg.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-pkg.el
new file mode 100644
index 0000000..760d392
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-pkg.el
@@ -0,0 +1,12 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "evil" "20260728.1438"
+  "Extensible vi layer."
+  '((emacs    "24.1")
+    (cl-lib   "0.5")
+    (goto-chg "1.6")
+    (nadvice  "0.3"))
+  :url "https://github.com/emacs-evil/evil"
+  :commit "6a3e1ddd04ac504a016590940d0af2a3361b9efd"
+  :revdesc "6a3e1ddd04ac"
+  :keywords '("emulations")
+  :maintainers '(("Tom Dalziel" . "tom.dalziel@gmail.com")))
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-repeat.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-repeat.el
new file mode 100644
index 0000000..cb67d39
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-repeat.el
@@ -0,0 +1,640 @@
+;;; evil-repeat.el --- Repeat system -*- lexical-binding: t -*-
+
+;; Author: Frank Fischer <frank.fischer at mathematik.tu-chemnitz.de>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; A repeat begins when leaving Normal state; it ends when re-entering
+;; Normal state. The diagram below shows possible routes between
+;; Normal state (N), Insert state (I), Visual state (V),
+;; Operator-Pending state (O) and Replace state (R). (Emacs state
+;; is an exception: nothing is repeated in that state.)
+;;                              ___
+;;                             /   \
+;;                             | R |
+;;                             \___/
+;;                             ^   |
+;;                             |   |
+;;               ___           |___V           ___
+;;              /   \ <------- /   \ -------> /   \
+;;              | V |          | N |          | O |
+;;              \___/ -------> \___/ <------- \___/
+;;                  |          |   ^          |
+;;                  |          |   |          |
+;;                  |          V___|          |
+;;                  |          /   \          |
+;;                  +--------> | I | <--------+
+;;                             \___/
+;;
+;; The recording of a repeat is started in one of two cases: Either a
+;; command is about to be executed (in pre-command-hook) or normal
+;; state is exited. The recording is stopped whenever a command has
+;; been completed and evil is in normal state afterwards. Therefore,
+;; a non-inserting command in normal-state is recorded as a single
+;; repeat unit. In contrast, if the command leaves normal state and
+;; starts insert-state, all commands that are executed until
+;; insert-state is left and normal state is reactivated are recorded
+;; together in one repeat unit. In other words, a repeat unit consists
+;; of all commands that are executed starting and ending in normal
+;; state.
+;;
+;; Not all commands are recorded. There are several commands that are
+;; completely ignored and other commands that even abort the currently
+;; active recording, e.g., commands that switch buffer.
+;;
+;; During recording the repeat information is appended to the variable
+;; `evil-repeat-info', which is cleared when the recording
+;; starts. This accumulated repeat information is put into the
+;; `evil-repeat-ring' when the recording is finished. The dot command,
+;; `\[evil-repeat]' (`evil-repeat') replays the most recent entry in
+;; the ring, preceeding repeats can be replayed using
+;; `\[evil-repeat-pop]' (`evil-repeat-pop').
+;;
+;; Repeat information can be stored in almost arbitrary form. How the
+;; repeat information for each single command is recorded is
+;; determined by the :repeat property of the command. This property
+;; has the following interpretation:
+;;
+;; t         record commands by storing the key-sequence that invoked it
+;; nil       ignore this command completely
+;; ignore    synonym to nil
+;; motion    command is recorded by storing the key-sequence but only in
+;;           insert state, otherwise it is ignored.
+;; abort     stop recording of repeat information immediately
+;; change    record commands by storing buffer changes
+;; SYMBOL    if SYMBOL is contained as key in `evil-repeat-types' call
+;;           the corresponding (function-)value, otherwise call the
+;;           function associated with SYMBOL. In both cases the
+;;           function should take exactly one argument which is either
+;;           `pre', `pre-read-key-sequence' or `post' specifying on
+;;           whether the function is called before or after the
+;;           execution of the command.
+;;
+;; Therefore, using a certain SYMBOL one can write specific repeation
+;; functions for each command.
+;;
+;; Each value of ring `evil-repeat-info', i.e., each single repeat
+;; information must be one of the following two possibilities:
+;; If element is a sequence, it is regarded as a key-sequence to
+;; be repeated. Otherwise the element must be a list
+;; (FUNCTION PARAMS ...) which will be called using
+;; (apply FUNCTION PARAMS) whenever this repeat is being executed.
+;;
+;; A user supplied repeat function can use the functions
+;; `evil-record-repeat' to append further repeat-information of the
+;; form described above to `evil-repeat-info'. See the implementation
+;; of `evil-repeat-keystrokes' and `evil-repeat-changes' for examples.
+;;
+;; The repeat information is executed with `evil-execute-repeat-info',
+;; which passes key-sequence elements to `execute-kbd-macro' and
+;; executes other elements as defined above.  A special version is
+;; `evil-execute-repeat-info-with-count'.  This function works as
+;; `evil-execute-repeat-info', but replaces the count of the first
+;; command. This is done by parsing the key-sequence, ignoring all
+;; calls to `digit-prefix-argument' and `negative-argument', and
+;; prepending the count as a string to the vector of the remaining
+;; key-sequence.
+
+;;; Code:
+
+(require 'evil-states)
+
+(defmacro evil-without-repeat (&rest body)
+  (declare (indent defun)
+           (debug t))
+  `(let ((pre-command-hook (remq 'evil-repeat-pre-hook pre-command-hook))
+         (post-command-hook (remq 'evil-repeat-post-hook post-command-hook)))
+     ,@body
+     (evil-repeat-abort)))
+
+(defsubst evil-repeat-recording-p ()
+  "Return non-nil if a recording is in progress."
+  (eq evil-recording-repeat t))
+
+(defun evil-repeat-start ()
+  "Start recording a new repeat into `evil-repeat-info'."
+  (evil-repeat-reset t)
+  (evil-repeat-record-buffer)
+  (when (evil-visual-state-p)
+    (let* ((range (evil-visual-range))
+           (beg (evil-range-beginning range))
+           (end (max 1 (1- (evil-range-end range))))
+           (nfwdlines (evil-count-lines beg end)))
+      (evil-repeat-record
+       (cond
+        ((eq evil-visual-selection 'char)
+         (list #'evil-repeat-visual-char
+               nfwdlines
+               (- end
+                  (if (zerop nfwdlines)
+                      beg
+                    (save-excursion
+                      (goto-char end)
+                      (line-beginning-position))))))
+        ((eq evil-visual-selection 'line)
+         (list #'evil-repeat-visual-line nfwdlines))
+        ((eq evil-visual-selection 'block)
+         (list #'evil-repeat-visual-block
+               nfwdlines
+               (abs (- (evil-column beg) (evil-column end))))))))))
+
+(defun evil-repeat-stop ()
+  "Stop recording a repeat.
+Update `evil-repeat-ring' with the accumulated changes
+in `evil-repeat-info' and clear variables."
+  (unwind-protect
+      (when (evil-repeat-recording-p)
+        (setq evil-repeat-info (evil-normalize-repeat-info evil-repeat-info))
+        (when (and evil-repeat-info evil-repeat-ring)
+          (ring-insert evil-repeat-ring evil-repeat-info)))
+    (evil-repeat-reset nil)))
+
+(defun evil-repeat-abort ()
+  "Abort current repeation."
+  (evil-repeat-reset 'abort))
+
+(defun evil-repeat-reset (flag)
+  "Clear all repeat recording variables.
+Set `evil-recording-repeat' to FLAG."
+  (setq evil-recording-repeat flag
+        evil-repeat-info nil
+        evil-repeat-buffer nil))
+
+(defsubst evil-repeat-record-position (&optional pos)
+  "Set `evil-repeat-pos' to POS or point."
+  (setq evil-repeat-pos (or pos (point))))
+
+(defun evil-repeat-record-buffer ()
+  "Set `evil-repeat-buffer' to the current buffer."
+  (unless (minibufferp)
+    (setq evil-repeat-buffer (current-buffer))))
+
+(defmacro evil-save-repeat-info (&rest body)
+  "Execute BODY, protecting the values of repeat variables."
+  (declare (indent defun)
+           (debug t))
+  `(let (evil-repeat-ring
+         evil-recording-repeat
+         evil-recording-current-command
+         evil-repeat-info
+         evil-repeat-changes
+         evil-repeat-pos
+         evil-repeat-keys
+         evil-repeat-buffer
+         this-command
+         last-command)
+     ,@body))
+
+(defun evil-repeat-different-buffer-p (&optional strict)
+  "Whether the buffer has changed in a repeat.
+If STRICT is non-nil, returns t if the previous buffer
+is unknown; otherwise returns t only if the previous
+buffer is known and different from the current buffer."
+  (and (or (buffer-live-p evil-repeat-buffer) strict)
+       (not (minibufferp))
+       (not (eq (current-buffer) evil-repeat-buffer))))
+
+(defvar evil-repeat-types
+  '((t . evil-repeat-keystrokes)
+    (change . evil-repeat-changes)
+    (motion . evil-repeat-motion)
+    (insert-at-point . evil-repeat-insert-at-point)
+    (ignore . nil))
+  "Alist of defined repeat-types.")
+
+(defun evil--repeat-type (command)
+  "Return the :repeat property of COMMAND."
+  (when (functionp command) ; ignore keyboard macros
+    (let* ((type (evil-get-command-property command :repeat t))
+           (repeat-type (assq type evil-repeat-types)))
+      (if repeat-type (cdr repeat-type) type))))
+
+(defun evil-repeat-type (command &optional default)
+  "Return the :repeat property of COMMAND.
+If COMMAND doesn't have this property, return DEFAULT."
+  (declare (obsolete evil--repeat-type "1.15.0"))
+  (when (functionp command) ; ignore keyboard macros
+    (let* ((type (evil-get-command-property command :repeat default))
+           (repeat-type (assq type evil-repeat-types)))
+      (if repeat-type (cdr repeat-type) type))))
+
+(defun evil-repeat-force-abort-p (repeat-type)
+  "Whether the current command should abort the recording of repeat information.
+Return non-nil if so."
+  (or (evil-repeat-different-buffer-p)  ; ... buffer changed
+      (eq repeat-type 'abort)           ; ... explicitly forced
+      (eq evil-recording-repeat 'abort) ; ... already aborted
+      (evil-emacs-state-p)              ; ... in Emacs state
+      (and (evil-mouse-events-p         ; ... mouse events
+            (this-command-keys-vector))
+           (null repeat-type))
+      (minibufferp)))                   ; ... minibuffer activated
+
+(defun evil-repeat-record (info)
+  "Append INFO to `evil-repeat-info'."
+  (when (evil-repeat-recording-p)
+    (setq evil-repeat-info (nconc evil-repeat-info (list info)))))
+
+;; called from `pre-command-hook'
+(defun evil-repeat-pre-hook ()
+  "Prepare the current command for recording the repeation."
+  (when evil-local-mode
+    (let ((repeat-type (evil--repeat-type this-command)))
+      (cond
+       ;; abort the repeat
+       ((evil-repeat-force-abort-p repeat-type)
+        ;; We mark the current record as being aborted, because there
+        ;; may be further pre-hooks following before the post-hook is
+        ;; called.
+        (evil-repeat-abort))
+       ;; ignore those commands completely
+       ((or (null repeat-type)
+            (evil-mouse-events-p (this-command-keys-vector))))
+       ;; record command
+       (t
+        ;; In normal-state or visual state, each command is a single
+        ;; repeation, therefore start a new repeation.
+        (when (or (evil-normal-state-p)
+                  (evil-visual-state-p))
+          (evil-repeat-start))
+        (setq evil-recording-current-command t)
+        (funcall repeat-type 'pre))))))
+(put 'evil-repeat-pre-hook 'permanent-local-hook t)
+
+;; called from `post-command-hook'
+(defun evil-repeat-post-hook ()
+  "Finish recording of repeat-information for the current-command."
+  (when (and evil-local-mode evil-recording-repeat)
+    (let ((repeat-type (evil--repeat-type this-command)))
+      (cond
+       ;; abort the repeat
+       ((evil-repeat-force-abort-p repeat-type)
+        ;; The command has been aborted but is complete, so just reset
+        ;; the recording state.
+        (evil-repeat-reset nil))
+       ;; ignore if command should not be recorded or the current
+       ;; command is not being recorded
+       ((or (null repeat-type)
+            (not evil-recording-current-command)))
+       ;; record command
+       (t
+        (funcall repeat-type 'post)
+        ;; In normal state, the repeat sequence is complete, so record it.
+        (when (evil-normal-state-p)
+          (evil-repeat-stop)))))
+    ;; done with recording the current command
+    (setq evil-recording-current-command nil)))
+(put 'evil-repeat-post-hook 'permanent-local-hook t)
+
+(defun evil-clear-command-keys ()
+  "Clear `this-command-keys' and all information about the current command keys.
+Calling this function prevents further recording of the keys that
+invoked the current command"
+  (clear-this-command-keys t)
+  (setq evil-repeat-keys ""))
+
+(defun evil-this-command-keys (&optional post-cmd)
+  "Version of `this-command-keys' with finer control over prefix args."
+  (vconcat
+   (let ((arg (if post-cmd current-prefix-arg prefix-arg)))
+     (and (numberp arg)
+          ;; Only add prefix if no repeat info recorded yet
+          (null evil-repeat-info)
+          (number-to-string arg)))
+   (this-single-command-keys)))
+
+(defun evil-repeat-keystrokes (flag)
+  "Repeation recording function for commands that are repeated by keystrokes."
+  (cond
+   ((eq flag 'pre)
+    (when evil-this-register
+      (evil-repeat-record
+       `(set evil-this-register ,evil-this-register)))
+    (setq evil-repeat-keys (evil-this-command-keys)))
+   ((memq flag '(post pre-read-key-sequence))
+    (evil-repeat-record (if (zerop (length (evil-this-command-keys t)))
+                            evil-repeat-keys
+                          (evil-this-command-keys t)))
+    ;; erase commands keys to prevent double recording
+    (evil-clear-command-keys))))
+
+(defun evil-repeat-motion (flag)
+  "Repetition for motions.
+Motions are recorded by keystroke but only in Insert state."
+  (when (memq evil-state '(insert replace))
+    (evil-repeat-keystrokes flag)))
+
+(defun evil-repeat-changes (flag)
+  "Repeation recording function for commands that are repeated by buffer changes."
+  (cond
+   ((eq flag 'pre)
+    (add-hook 'after-change-functions #'evil-repeat-change-hook nil t)
+    (evil-repeat-start-record-changes))
+   ((eq flag 'post)
+    (remove-hook 'after-change-functions #'evil-repeat-change-hook t)
+    (evil-repeat-finish-record-changes))))
+
+;; called from the `after-change-functions' hook
+(defun evil-repeat-change-hook (beg end length)
+  "Record change information for current command."
+  (let ((repeat-type (evil--repeat-type this-command)))
+    (when (and (evil-repeat-recording-p)
+               (eq repeat-type 'evil-repeat-changes)
+               (not (evil-emacs-state-p))
+               (not (evil-repeat-different-buffer-p t))
+               evil-state)
+      (unless (evil-repeat-recording-p)
+        (evil-repeat-start))
+      (evil-repeat-record-change (- beg evil-repeat-pos)
+                                 (buffer-substring beg end)
+                                 length))))
+(put 'evil-repeat-change-hook 'permanent-local-hook t)
+
+(defun evil-repeat-record-change (relpos ins ndel)
+  "Record the current buffer changes during a repeat.
+If CHANGE is specified, it is added to `evil-repeat-changes'."
+  (when (evil-repeat-recording-p)
+    (push (list relpos ins ndel) evil-repeat-changes)))
+
+(defun evil-repeat-start-record-changes ()
+  "Start the recording of a new set of buffer changes."
+  (setq evil-repeat-changes nil)
+  (evil-repeat-record-position))
+
+(defun evil-repeat-finish-record-changes ()
+  "Finish the recording of buffer changes and record them as repeat."
+  (when (evil-repeat-recording-p)
+    (evil-repeat-record `(evil-execute-change
+                          ,(nreverse evil-repeat-changes)
+                          ,(- (point) evil-repeat-pos)))
+    (setq evil-repeat-changes nil)))
+
+(defun evil-repeat-insert-at-point (flag)
+  "Repeation recording function for commands that insert text in region.
+For example `mouse-yank-primary'. This records text insertion when a command
+inserts some text in a buffer between (point) and (mark)."
+  (cond
+   ((eq flag 'pre)
+    (add-hook 'after-change-functions #'evil-repeat-insert-at-point-hook nil t))
+   ((eq flag 'post)
+    (remove-hook 'after-change-functions #'evil-repeat-insert-at-point-hook t))))
+
+(defun evil-repeat-insert-at-point-hook (beg end _length)
+  (let ((repeat-type (evil--repeat-type this-command)))
+    (when (and (evil-repeat-recording-p)
+               (eq repeat-type 'evil-repeat-insert-at-point)
+               (not (evil-emacs-state-p))
+               (not (evil-repeat-different-buffer-p t))
+               evil-state)
+      (setq evil-repeat-pos beg)
+      (evil-repeat-record (list 'insert (buffer-substring beg end))))))
+(put 'evil-repeat-insert-at-point-hook 'permanent-local-hook t)
+
+(defun evil-normalize-repeat-info (repeat-info)
+  "Concatenate consecutive arrays in REPEAT-INFO.
+Return a single array."
+  (let* ((result (cons nil nil))
+         (result-last result)
+         cur cur-last)
+    (dolist (rep repeat-info)
+      (cond
+       ((null rep))
+       ((arrayp rep)
+        (setq rep (listify-key-sequence rep))
+        (cond
+         (cur
+          (setcdr cur-last (cons rep nil))
+          (setq cur-last (cdr cur-last)))
+         (t (setq cur (cons rep nil)
+                  cur-last cur))))
+       (t
+        (when cur
+          (setcdr result-last (cons (apply #'vconcat cur) nil))
+          (setq result-last (cdr result-last)
+                cur nil))
+        (setcdr result-last (cons rep nil))
+        (setq result-last (cdr result-last)))))
+    (when cur
+      (setcdr result-last (cons (apply #'vconcat cur) nil)))
+    (cdr result)))
+
+(defun evil-repeat-visual-char (nfwdlines nfwdchars)
+  "Restore a character visual selection.
+If the selection is in a single line, the restored visual
+selection covers the same number of characters. If the selection
+covers several lines, the restored selection covers the same
+number of lines and the same number of characters in the last
+line as the original selection."
+  (evil-visual-char)
+  (when (> nfwdlines 0)
+    (forward-line nfwdlines))
+  (forward-char nfwdchars))
+
+(defun evil-repeat-visual-line (nfwdlines)
+  "Restore a character visual selection.
+If the selection is in a single line, the restored visual
+selection covers the same number of characters. If the selection
+covers several lines, the restored selection covers the same
+number of lines and the same number of characters in the last
+line as the original selection."
+  (evil-visual-line)
+  (forward-line nfwdlines))
+
+(defun evil-repeat-visual-block (nfwdlines nfwdchars)
+  "Restore a character visual selection.
+If the selection is in a single line, the restored visual
+selection covers the same number of characters. If the selection
+covers several lines, the restored selection covers the same
+number of lines and the same number of characters in the last
+line as the original selection."
+  (evil-visual-block)
+  (let ((col (current-column)))
+    (forward-line nfwdlines)
+    (move-to-column (+ col nfwdchars) t)))
+
+(defun evil-execute-change (changes rel-point)
+  "Execute as list of changes.
+
+CHANGES is a list of triples (REL-BEG INSERT-TEXT NDEL).
+REL-BEG is the relative position (to point) where the change
+takes place. INSERT-TEXT is the text to be inserted at that
+position and NDEL the number of characters to be deleted at that
+position before insertion.
+
+REL-POINT is the relative position to point before the changed
+where point should be placed after all changes."
+  (evil-save-repeat-info
+    (let ((point (point)))
+      (dolist (change changes)
+        (goto-char (+ point (nth 0 change)))
+        (delete-char (nth 2 change))
+        (insert (nth 1 change)))
+      (goto-char (+ point rel-point)))))
+
+(defun evil-execute-repeat-info (repeat-info)
+  "Execute a repeat-information REPEAT-INFO."
+  (evil-save-repeat-info
+    (dolist (rep repeat-info)
+      (cond
+       ((or (arrayp rep) (stringp rep))
+        (let ((input-method current-input-method)
+              (evil-input-method nil))
+          (deactivate-input-method)
+          (unwind-protect
+              (execute-kbd-macro rep)
+            (activate-input-method input-method))))
+       ((consp rep)
+        (when (and (= 3 (length rep))
+                   (eq (nth 0 rep) 'set)
+                   (eq (nth 1 rep) 'evil-this-register)
+                   (>= (nth 2 rep) ?0)
+                   (< (nth 2 rep) ?9))
+          (setcar (nthcdr 2 rep) (1+ (nth 2 rep))))
+        (apply (car rep) (cdr rep)))
+       (t (error "Unexpected repeat-info: %S" rep))))))
+
+;; TODO: currently we prepend the replacing count before the
+;; key-sequence that calls the command. Can we use direct
+;; modification of prefix-arg instead? Does it work in
+;; conjunction with `execute-kbd-macro'?
+(defun evil-execute-repeat-info-with-count (count repeat-info)
+  "Repeat the repeat-information REPEAT-INFO with the count of
+the first command replaced by COUNT. The count is replaced if
+and only if COUNT is non-nil."
+  (evil-save-repeat-info
+    (cond
+     ;; do nothing (zero repeating)
+     ((and count (zerop count)))
+     ;; replace count
+     (count
+      (let ((evil-repeat-count count)
+            done)
+        (while (and repeat-info
+                    (arrayp (car repeat-info))
+                    (not done))
+          (let* ((count-and-cmd (evil-extract-count (pop repeat-info))))
+            (push (vconcat (number-to-string count)
+                           (nth 2 count-and-cmd)
+                           (nth 3 count-and-cmd))
+                  repeat-info)
+            (setq done t)))
+        (evil-execute-repeat-info repeat-info)))
+     ;; repeat with original count
+     (t (evil-execute-repeat-info repeat-info)))))
+
+;; Keep the compiler happy - this is a buffer local var
+(defvar evil--execute-normal-return-state)
+
+(evil-define-command evil-repeat (count &optional save-point)
+  "Repeat the last editing command with count replaced by COUNT.
+If SAVE-POINT is non-nil, do not move point."
+  :repeat ignore
+  :suppress-operator t
+  (interactive (list current-prefix-arg
+                     (not evil-repeat-move-cursor)))
+  (cond
+   ((null evil-repeat-ring)
+    (error "Already executing repeat"))
+   (save-point
+    (save-excursion
+      (evil-repeat count)))
+   (t
+    (unwind-protect
+        (let ((evil-last-find-temp evil-last-find)
+              (confirm-kill-emacs t)
+              (kill-buffer-hook
+               (cons #'(lambda ()
+                         (user-error "Cannot delete buffer in repeat command"))
+                     kill-buffer-hook))
+              (undo-pointer buffer-undo-list))
+          (evil-with-single-undo
+            (setq evil-last-repeat (list (point) count undo-pointer))
+            (evil-execute-repeat-info-with-count
+             count (ring-ref evil-repeat-ring 0))
+            (setq evil-last-find evil-last-find-temp)))
+      (if (eq 'evil-execute-in-normal-state last-command)
+          (evil-change-state evil--execute-normal-return-state)
+        (evil-normal-state))))))
+
+;; TODO: the same issue concerning disabled undos as for `evil-paste-pop'
+(evil-define-command evil-repeat-pop (count &optional save-point)
+  "Replace the just repeated command with a previously executed command.
+Only allowed after `evil-repeat', `evil-repeat-pop' or
+`evil-repeat-pop-next'. Uses the same repeat count that
+was used for the first repeat.
+
+The COUNT argument inserts the COUNT-th previous kill.
+If COUNT is negative, this is a more recent kill."
+  :repeat nil
+  :suppress-operator t
+  (interactive (list (prefix-numeric-value current-prefix-arg)
+                     (not evil-repeat-move-cursor)))
+  (cond
+   ((not (and (eq last-command #'evil-repeat)
+              evil-last-repeat))
+    (user-error "Previous command was not evil-repeat: %s" last-command))
+   (save-point
+    (save-excursion
+      (evil-repeat-pop count)))
+   (t
+    (unless (eq buffer-undo-list (nth 2 evil-last-repeat))
+      (evil-undo-pop))
+    (goto-char (car evil-last-repeat))
+    ;; rotate the repeat-ring
+    (while (> count 0)
+      (when evil-repeat-ring
+        (ring-insert-at-beginning evil-repeat-ring
+                                  (ring-remove evil-repeat-ring 0)))
+      (setq count (1- count)))
+    (while (< count 0)
+      (when evil-repeat-ring
+        (ring-insert evil-repeat-ring
+                     (ring-remove evil-repeat-ring)))
+      (setq count (1+ count)))
+    (setq this-command #'evil-repeat)
+    (evil-repeat (cadr evil-last-repeat)))))
+
+(evil-define-command evil-repeat-pop-next (count &optional save-point)
+  "Same as `evil-repeat-pop', but with negative COUNT."
+  :repeat nil
+  :suppress-operator t
+  (interactive (list (prefix-numeric-value current-prefix-arg)
+                     (not evil-repeat-move-cursor)))
+  (evil-repeat-pop (- count) save-point))
+
+(defun evil--read-key-sequence-advice (&rest _)
+  "Record `this-command-keys' before it is overwritten."
+  (when (and (evil-repeat-recording-p)
+             evil-recording-current-command)
+    (let ((repeat-type (evil--repeat-type this-command)))
+      (when (functionp repeat-type)
+        (funcall repeat-type 'pre-read-key-sequence)))))
+
+(advice-add 'read-key-sequence :before #'evil--read-key-sequence-advice)
+(advice-add 'read-key-sequence-vector :before #'evil--read-key-sequence-advice)
+
+(provide 'evil-repeat)
+
+;;; evil-repeat.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-repeat.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-repeat.elc
new file mode 100644
index 0000000..8b628bc
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-repeat.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-search.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-search.el
new file mode 100644
index 0000000..571f910
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-search.el
@@ -0,0 +1,1248 @@
+;;; evil-search.el --- Search and substitute -*- lexical-binding: t -*-
+
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'evil-core)
+(require 'evil-common)
+(require 'evil-ex)
+
+(defun evil-select-search-module (option module)
+  "Change the search module according to MODULE.
+If MODULE is `isearch', then Emacs' isearch module is used.
+If MODULE is `evil-search', then Evil's own interactive
+search module is used."
+  (let ((search-functions
+         '(forward
+           backward
+           word-forward
+           word-backward
+           unbounded-word-forward
+           unbounded-word-backward
+           next
+           previous)))
+    (dolist (fun search-functions)
+      (let ((isearch (intern (format "evil-search-%s" fun)))
+            (evil-search (intern (format "evil-ex-search-%s" fun))))
+        (if (eq module 'isearch)
+            (substitute-key-definition
+             evil-search isearch evil-motion-state-map)
+          (substitute-key-definition
+           isearch evil-search evil-motion-state-map)))))
+  (set-default option module))
+
+;; this customization is here because it requires
+;; the knowledge of `evil-select-search-mode'
+(defcustom evil-search-module 'isearch
+  "The search module to be used.  May be either `isearch', for
+Emacs' isearch module, or `evil-search', for Evil's own
+interactive search module.  N.b. changing this will not affect keybindings.
+To swap out relevant keybindings, see `evil-select-search-module' function."
+  :type '(radio (const :tag "Emacs built-in isearch." :value isearch)
+                (const :tag "Evil interactive search." :value evil-search))
+  :group 'evil
+  :set #'evil-select-search-module
+  :initialize #'evil-custom-initialize-pending-reset)
+
+(defun evil-push-search-history (string forward)
+  "Push STRING into the appropriate search history (determined by FORWARD)."
+  (let ((var (if forward
+                 'evil-search-forward-history
+               'evil-search-backward-history)))
+    (unless (equal string (car (symbol-value var)))
+      (push string (symbol-value var)))))
+
+(defun evil-search-incrementally (forward regexp-p)
+  "Search incrementally for user-entered text."
+  (let ((evil-search-prompt (evil-search-prompt forward))
+        (isearch-search-fun-function 'evil-isearch-function)
+        (point (point))
+        search-nonincremental-instead)
+    (setq isearch-forward forward)
+    (evil-save-echo-area
+      (evil-without-input-method-hooks
+       ;; set the input method locally rather than globally to ensure that
+       ;; isearch clears the input method when it's finished
+       (setq current-input-method evil-input-method)
+       (if forward
+           (isearch-forward regexp-p)
+         (isearch-backward regexp-p))
+       (evil-push-search-history isearch-string forward)
+       (setq current-input-method nil))
+      (when (/= (point) point)
+        ;; position the point at beginning of the match only if the call to
+        ;; `isearch' has really moved the point. `isearch' doesn't move the
+        ;; point only if "C-g" is hit twice to exit the search, in which case we
+        ;; shouldn't move the point either.
+        (when (and forward isearch-other-end)
+          (goto-char isearch-other-end))
+        (when (and (eq point (point))
+                   (not (string= isearch-string "")))
+          (if forward
+              (isearch-repeat-forward)
+            (isearch-repeat-backward))
+          (isearch-exit)
+          (when (and forward isearch-other-end)
+            (goto-char isearch-other-end)))
+        (evil-flash-search-pattern
+         (evil-search-message isearch-string forward))))))
+
+(defun evil-flash-search-pattern (string &optional all)
+  "Flash last search matches for duration of `evil-flash-delay'.
+If ALL is non-nil, flash all matches. STRING is a message
+to display in the echo area."
+  (let ((lazy-highlight-initial-delay 0)
+        (isearch-search-fun-function 'evil-isearch-function)
+        (isearch-case-fold-search case-fold-search)
+        (disable #'(lambda (&optional _arg) (evil-flash-hook t))))
+    (when evil-flash-timer
+      (cancel-timer evil-flash-timer))
+    (unless (or (null string)
+                (string= string ""))
+      (evil-echo-area-save)
+      (evil-echo "%s" string)
+      (isearch-highlight (match-beginning 0) (match-end 0))
+      (when all
+        (setq isearch-lazy-highlight-wrapped nil
+              isearch-lazy-highlight-start (point)
+              isearch-lazy-highlight-end (point))
+        (isearch-lazy-highlight-new-loop)
+        (unless isearch-lazy-highlight-overlays
+          (isearch-lazy-highlight-update)))
+      (add-hook 'pre-command-hook #'evil-flash-hook nil t)
+      (add-hook 'evil-operator-state-exit-hook #'evil-flash-hook nil t)
+      (add-hook 'pre-command-hook #'evil-clean-isearch-overlays nil t)
+      (setq evil-flash-timer
+            (run-at-time evil-flash-delay nil disable)))))
+
+(defun evil-clean-isearch-overlays ()
+  "Clean isearch overlays unless `this-command' is search."
+  (remove-hook 'pre-command-hook #'evil-clean-isearch-overlays t)
+  (unless (memq this-command
+                '(evil-search-backward
+                  evil-search-forward
+                  evil-search-next
+                  evil-search-previous
+                  evil-search-word-backward
+                  evil-search-word-forward))
+    (isearch-clean-overlays)))
+(put 'evil-clean-isearch-overlays 'permanent-local-hook t)
+
+(defun evil-flash-hook (&optional force)
+  "Disable hightlighting if `this-command' is not search.
+Disable anyway if FORCE is t."
+  (when (or force
+            ;; to avoid flicker, don't disable highlighting
+            ;; if the next command is also a search command
+            (not (memq this-command
+                       '(evil-search-backward
+                         evil-search-forward
+                         evil-search-next
+                         evil-search-previous
+                         evil-search-word-backward
+                         evil-search-word-forward))))
+    (evil-echo-area-restore)
+    (isearch-dehighlight)
+    (setq isearch-lazy-highlight-last-string nil)
+    (lazy-highlight-cleanup t)
+    (when evil-flash-timer
+      (cancel-timer evil-flash-timer)))
+  (remove-hook 'pre-command-hook #'evil-flash-hook t)
+  (remove-hook 'evil-operator-state-exit-hook #'evil-flash-hook t))
+(put 'evil-flash-hook 'permanent-local-hook t)
+
+(defun evil-search-with-predicate (search-fun pred string bound noerror count)
+  "Execute a search with a predicate function.
+SEARCH-FUN is a search function (e.g. `re-search-forward') and
+PREDICATE is a two-argument function satisfying the interface of
+`isearch-filter-predicate', or `nil'.  STRING, BOUND, NOERROR and
+COUNT are passed unchanged to SEARCH-FUN.  The first match
+satisfying the predicate (or `nil') is returned."
+  (catch 'done
+    (while t
+      (let ((result (funcall search-fun string bound noerror count)))
+        (cond
+         ((not result) (throw 'done nil))
+         ((not pred) (throw 'done result))
+         ((funcall pred (match-beginning 0) (match-end 0)) (throw 'done result)))))))
+
+(defun evil-search-function (&optional forward regexp-p wrap predicate)
+  "Return a search function.
+If FORWARD is nil, search backward, otherwise forward.
+If REGEXP-P is non-nil, the input is a regular expression.
+If WRAP is non-nil, the search wraps around the top or bottom
+of the buffer.
+If PREDICATE is non-nil, it must be a function accepting two
+arguments: the bounds of a match, returning non-nil if that match is
+acceptable."
+  `(lambda (string &optional bound noerror count)
+     (let ((start (point))
+           (search-fun ',(if regexp-p
+                             (if forward
+                                 're-search-forward
+                               're-search-backward)
+                           (if forward
+                               'search-forward
+                             'search-backward)))
+           result)
+       (setq result (evil-search-with-predicate
+                     search-fun ,predicate string
+                     bound ,(if wrap t 'noerror) count))
+       (when (and ,wrap (null result))
+         (goto-char ,(if forward '(point-min) '(point-max)))
+         (unwind-protect
+             (setq result (evil-search-with-predicate
+                           search-fun ,predicate string bound noerror count))
+           (unless result
+             (goto-char start))))
+       result)))
+
+(defun evil-isearch-function ()
+  "Return a search function for use with isearch.
+Based on `isearch-regexp' and `isearch-forward'."
+  (evil-search-function isearch-forward evil-regexp-search evil-search-wrap 'isearch-filter-predicate))
+
+(defun evil-search (string forward &optional regexp-p start)
+  "Search for STRING and highlight matches.
+If FORWARD is nil, search backward, otherwise forward.
+If REGEXP-P is non-nil, STRING is taken to be a regular expression.
+START is the position to search from; if unspecified, it is
+one more than the current position."
+  (when (and (stringp string)
+             (not (string= string "")))
+    (let* ((orig (point))
+           (start (or start
+                      (if forward
+                          (min (point-max) (1+ orig))
+                        orig)))
+           (isearch-regexp regexp-p)
+           (isearch-forward forward)
+           (case-fold-search
+            (unless (and search-upper-case
+                         (not (isearch-no-upper-case-p string nil)))
+              case-fold-search))
+           (search-func (evil-search-function
+                         forward regexp-p evil-search-wrap 'isearch-filter-predicate)))
+      ;; no text properties, thank you very much
+      (set-text-properties 0 (length string) nil string)
+      ;; position to search from
+      (goto-char start)
+      (setq isearch-string string)
+      (isearch-update-ring string regexp-p)
+      (condition-case nil
+          (funcall search-func string)
+        (search-failed
+         (goto-char orig)
+         (user-error "\"%s\": %s not found"
+                     string (if regexp-p "pattern" "string"))))
+      ;; always position point at the beginning of the match
+      (goto-char (match-beginning 0))
+      ;; determine message for echo area
+      (cond
+       ((and forward (< (point) start))
+        (when evil-search-wrap-ring-bell (ding))
+        (setq string "Search wrapped around BOTTOM of buffer"))
+       ((and (not forward) (> (point) start))
+        (when evil-search-wrap-ring-bell (ding))
+        (setq string "Search wrapped around TOP of buffer"))
+       (t
+        (setq string (evil-search-message string forward))))
+      (evil-flash-search-pattern string t))))
+
+(defun evil-search-word (forward unbounded symbol)
+  "Search for word near point.
+If FORWARD is nil, search backward, otherwise forward. If SYMBOL
+is non-nil then the functions searches for the symbol at point,
+otherwise for the word at point."
+  (let ((string (car regexp-search-ring)))
+    (setq isearch-forward forward)
+    (cond
+     ((and (memq last-command
+                 '(evil-search-word-forward
+                   evil-search-word-backward))
+           (stringp string)
+           (not (string= string "")))
+      (evil-search string forward t))
+     (t
+      (setq string (evil-find-thing forward (if symbol 'symbol 'evil-word)))
+      (cond
+       ((null string)
+        (user-error "No word under point"))
+       (unbounded
+        (setq string (regexp-quote string)))
+       (t
+        (setq string
+              (format (if symbol "\\_<%s\\_>" "\\<%s\\>")
+                      (regexp-quote string)))))
+      (evil-push-search-history string forward)
+      (evil-search string forward t)))))
+
+(defun evil--find-thing (forward thing)
+  "Return a cons of THING near point as a string and its position.
+THING should be a symbol understood by `thing-at-point',
+e.g. `symbol' or `word'.  If FORWARD is nil, search backward,
+otherwise forward.  Returns nil if nothing is found."
+  (let ((move (if forward #'forward-char #'backward-char))
+        (end (if forward #'eobp #'bobp))
+        string)
+    (save-excursion
+      (setq string (thing-at-point thing))
+      ;; if there's nothing under point, go forwards
+      ;; (or backwards) to find it
+      (while (and (null string) (not (funcall end)))
+        (funcall move)
+        (setq string (thing-at-point thing)))
+      (when (stringp string)
+        (set-text-properties 0 (length string) nil string))
+      (when (> (length string) 0)
+        (cons string (point))))))
+
+(defun evil-find-thing (forward thing)
+  "Return a THING near point as a string.
+THING should be a symbol understood by `thing-at-point',
+e.g. `symbol' or `word'.  If FORWARD is nil, search backward,
+otherwise forward.  Returns nil if nothing is found."
+  (car (evil--find-thing forward thing)))
+
+(defun evil-find-word (forward)
+  "Return word near point as a string.
+If FORWARD is nil, search backward, otherwise forward.  Returns
+nil if nothing is found."
+  (evil-find-thing forward 'word))
+
+(defun evil-find-symbol (forward)
+  "Return word near point as a string.
+If FORWARD is nil, search backward, otherwise forward.  Returns
+nil if nothing is found."
+  (evil-find-thing forward 'symbol))
+
+(defun evil-search-prompt (forward)
+  "Return the search prompt for the given direction."
+  (if forward "/" "?"))
+
+(defun evil-search-message (string forward)
+  "Prefix STRING with the search prompt."
+  (format "%s%s" (evil-search-prompt forward) string))
+
+(advice-add 'isearch-message-prefix :around #'evil--use-search-prompt)
+(defun evil--use-search-prompt (orig-fun &rest args)
+  "Use `evil-search-prompt'."
+  (or evil-search-prompt
+      (apply orig-fun args)))
+
+(advice-add 'isearch-delete-char :around #'evil--exit-search-when-empty)
+(defun evil--exit-search-when-empty (orig-fun &rest args)
+  "Exit search if no search string."
+  (cond
+   ((and evil-search-prompt (string= isearch-string ""))
+    (let (search-nonincremental-instead)
+      (setq isearch-success nil)
+      (isearch-exit)))
+   (t (apply orig-fun args))))
+
+(advice-add 'isearch-lazy-highlight-search :around #'evil--without-search-wrap)
+(defun evil--without-search-wrap (orig-fun &rest args)
+  "Never wrap the search in this context."
+  (let (evil-search-wrap)
+    (apply orig-fun args)))
+
+;;; Ex search
+
+(defun evil-ex-regex-without-case (re)
+  "Return the regular expression without all occurrences of \\c and \\C."
+  (evil-transform-regexp re '((?c . "") (?C . ""))))
+
+(defun evil-ex-regex-case (re default-case)
+  "Return the case as implied by \\c or \\C in regular expression RE.
+If \\c appears anywhere in the pattern, the pattern is case
+insensitive. If \\C appears, the pattern is case sensitive.
+Only the first occurrence of \\c or \\C is used, all others are
+ignored. If neither \\c nor \\C appears in the pattern, the case
+specified by DEFAULT-CASE is used. DEFAULT-CASE should be either
+`sensitive', `insensitive' or `smart'. In the latter case, the pattern
+will be case-sensitive if and only if it contains an upper-case
+letter, otherwise it will be case-insensitive."
+  (cond
+   ((string-match "\\(?:^\\|[^\\\\]\\)\\(?:\\\\\\\\\\)*\\\\\\([cC]\\)" re)
+    (if (eq (aref (match-string 1 re) 0) ?c) 'insensitive 'sensitive))
+   ((eq default-case 'smart)
+    (if (isearch-no-upper-case-p re t) 'insensitive 'sensitive))
+   (t default-case)))
+
+;; a pattern
+(defun evil-ex-make-substitute-pattern (regexp flags)
+  "Create a PATTERN for substitution with FLAGS.
+This function respects the values of `evil-ex-substitute-case'
+and `evil-ex-substitute-global'."
+  (evil-ex-make-pattern
+   regexp
+   (cond ((memq ?i flags) 'insensitive)
+         ((memq ?I flags) 'sensitive)
+         ((not evil-ex-substitute-case) evil-ex-search-case)
+         (t evil-ex-substitute-case))
+   (if (memq ?g flags)
+       (not evil-ex-substitute-global)
+     evil-ex-substitute-global)))
+
+(defun evil-ex-make-search-pattern (regexp)
+  "Create a PATTERN for search.
+This function respects the values of `evil-ex-search-case'."
+  (evil-ex-make-pattern regexp evil-ex-search-case t))
+
+(defun evil-ex-make-pattern (regexp case whole-line)
+  "Create a new search pattern.
+REGEXP is the regular expression to be searched for. CASE should
+be either `sensitive', `insensitive' for case-sensitive and
+case-insensitive search respectively, or `smart'.  In the latter case
+the pattern is smart-case, i.e. it is automatically sensitive of the
+pattern contains an upper case letter, otherwise it is insensitive.
+The input REGEXP is considered a Vim-style regular expression if
+`evil-ex-search-vim-style-regexp' is non-nil, in which case it is
+transformed to an Emacs style regular expression (i.e. certain
+backslash-codes are transformed.  Otherwise REGEXP must be an Emacs
+style regular expression and is not transformed."
+  (let ((re (evil-ex-regex-without-case regexp))
+        (ignore-case (eq (evil-ex-regex-case regexp case) 'insensitive)))
+    ;; possibly transform regular expression from vim-style to
+    ;; Emacs-style.
+    (if (and evil-ex-search-vim-style-regexp
+             (not (or (string-prefix-p "\\_<" regexp)
+                      (string-suffix-p "\\_>" regexp))))
+        (setq re (evil-transform-vim-style-regexp re))
+      ;; Even for Emacs regular expressions we translate certain
+      ;; whitespace sequences
+      (setq re (evil-transform-regexp re '((?t . "\t")
+                                           (?n . "\n")
+                                           (?r . "\r")))))
+    (list re ignore-case whole-line)))
+
+(defun evil-ex-pattern-regex (pattern)
+  "Return the regular expression of a search PATTERN."
+  (nth 0 pattern))
+
+(defun evil-ex-pattern-ignore-case (pattern)
+  "Return t if and only if PATTERN should ignore case."
+  (nth 1 pattern))
+
+(defun evil-ex-pattern-whole-line (pattern)
+  "Return t if and only if PATTERN should match all occurences of a line.
+Otherwise PATTERN matches only the first occurence."
+  (nth 2 pattern))
+
+;;; Highlight
+
+(cl-defstruct (evil-ex-hl (:type vector) (:constructor nil)
+                          (:copier nil) (:predicate nil))
+  (name nil :read-only t) pattern
+  (face nil :read-only t) (window nil :read-only t)
+  (min nil :documentation "The minimal buffer position of the highlight.")
+  (max nil :documentation "The maximal buffer position of the highlight.")
+  (match-hook nil :read-only t) (update-hook nil :read-only t)
+  (overlays nil :documentation "The active overlays of the highlight."))
+
+(cl-defun evil-ex-make-hl
+    (name &key (face 'evil-ex-lazy-highlight) (win (selected-window))
+          min max match-hook update-hook)
+  "Create a new highlight object with name NAME and properties ARGS.
+The following properties are supported:
+:face The face to be used for the highlighting overlays.
+:win The window in which the highlighting should be shown.
+     Note that the highlight will be visible in all windows showing
+     the corresponding buffer, but only the matches visible in the
+     specified window will actually be highlighted. If :win is nil,
+     the matches in all windows will be highlighted.
+:min The minimal buffer position for highlighted matches.
+:max The maximal buffer position for highlighted matches.
+:match-hook A hook to be called once for each highlight.
+            The hook must take two arguments, the highlight and
+            the overlay for that highlight.
+:update-hook A hook called once after updating the highlighting
+             with two arguments, the highlight and a message string
+             describing the current match status."
+  (unless (symbolp name)
+    (user-error "Expected symbol as name of highlight"))
+  (when (assq name evil-ex-active-highlights-alist)
+    (evil-ex-delete-hl name))
+  (unless evil-ex-active-highlights-alist
+    (add-hook 'window-scroll-functions
+              #'evil-ex-hl-update-highlights-scroll nil t)
+    (add-hook 'window-size-change-functions
+              #'evil-ex-hl-update-highlights-resize nil))
+  (push (cons name (vector name
+                           nil
+                           face
+                           win
+                           min max
+                           match-hook update-hook
+                           nil))
+        evil-ex-active-highlights-alist))
+
+(defun evil-ex-delete-hl (name)
+  "Remove the highlighting object with a certain NAME."
+  (let ((hl (cdr (assq name evil-ex-active-highlights-alist))))
+    (when hl
+      (mapc #'delete-overlay (evil-ex-hl-overlays hl))
+      (setq evil-ex-active-highlights-alist
+            (assq-delete-all name evil-ex-active-highlights-alist))
+      (evil-ex-hl-update-highlights))
+    (unless evil-ex-active-highlights-alist
+      (remove-hook 'window-scroll-functions
+                   #'evil-ex-hl-update-highlights-scroll t)
+      (remove-hook 'window-size-change-functions
+                   #'evil-ex-hl-update-highlights-resize))))
+
+(defun evil-ex-hl-active-p (name)
+  "Whether the highlight with a certain NAME is active."
+  (and (assq name evil-ex-active-highlights-alist) t))
+
+(defun evil-ex-hl-change (name pattern)
+  "Set the regular expression of highlight NAME to PATTERN."
+  (let ((hl (cdr (assq name evil-ex-active-highlights-alist))))
+    (when hl
+      (setf (evil-ex-hl-pattern hl) pattern)
+      (evil-ex-hl-idle-update))))
+
+(defun evil-ex-hl-set-region (name beg end &optional _type)
+  "Set minimal and maximal position of highlight NAME to BEG and END."
+  (let ((hl (cdr (assq name evil-ex-active-highlights-alist))))
+    (when hl
+      (setf (evil-ex-hl-min hl) beg
+            (evil-ex-hl-max hl) end)
+      (evil-ex-hl-idle-update))))
+
+(defun evil-ex-hl-get-max (name)
+  "Return the maximal position of the highlight with name NAME."
+  (let ((hl (cdr (assq name evil-ex-active-highlights-alist))))
+    (and hl (evil-ex-hl-max hl))))
+
+(defun evil-ex-hl-update-highlights ()
+  "Update the overlays of all active highlights."
+  (dolist (hl (mapcar #'cdr evil-ex-active-highlights-alist))
+    (let* ((old-ovs (evil-ex-hl-overlays hl))
+           new-ovs
+           (pattern (evil-ex-hl-pattern hl))
+           (case-fold-search (evil-ex-pattern-ignore-case pattern))
+           (case-replace case-fold-search)
+           (face (evil-ex-hl-face hl))
+           (match-hook (evil-ex-hl-match-hook hl))
+           result)
+      (if pattern
+          ;; collect all visible ranges
+          (let (ranges sranges)
+            (dolist (win (if (eq evil-ex-interactive-search-highlight
+                                 'all-windows)
+                             (get-buffer-window-list (current-buffer) nil t)
+                           (list (evil-ex-hl-window hl))))
+              (when (window-live-p win)
+                (let ((beg (max (window-start win)
+                                (or (evil-ex-hl-min hl) (point-min))))
+                      (end (min (window-end win)
+                                (or (evil-ex-hl-max hl) (point-max)))))
+                  (when (< beg end)
+                    (push (cons beg end) ranges)))))
+            (setq ranges (sort ranges #'car-less-than-car))
+            (while ranges
+              (let ((r1 (pop ranges))
+                    (r2 (pop ranges)))
+                (cond
+                 ;; last range
+                 ((null r2) (push r1 sranges))
+                 ;; ranges overlap, union
+                 ((>= (cdr r1) (car r2))
+                  (push (cons (car r1)
+                              (max (cdr r1) (cdr r2)))
+                        ranges))
+                 ;; ranges distinct
+                 (t (push r1 sranges)
+                    (push r2 ranges)))))
+
+            ;; run through all ranges
+            (condition-case lossage
+                (save-match-data
+                  (dolist (r sranges)
+                    (let ((beg (car r))
+                          (end (cdr r)))
+                      (save-excursion
+                        (goto-char beg)
+                        ;; set the overlays for the current highlight,
+                        ;; reusing old overlays (if possible)
+                        (while (and (not (eobp))
+                                    (evil-ex-search-find-next-pattern pattern)
+                                    (<= (match-end 0) end)
+                                    (not (and (= (match-beginning 0) end)
+                                              (save-excursion
+                                                (goto-char (match-beginning 0))
+                                                (bolp)))))
+                          (let ((ov (or (pop old-ovs) (make-overlay 0 0))))
+                            (move-overlay ov (match-beginning 0) (match-end 0))
+                            (overlay-put ov 'face face)
+                            (overlay-put ov 'evil-ex-hl (evil-ex-hl-name hl))
+                            (overlay-put ov 'priority 1000)
+                            (push ov new-ovs)
+                            (when match-hook (funcall match-hook hl ov)))
+                          (cond
+                           ((not (or (evil-ex-pattern-whole-line pattern)
+                                     (save-excursion
+                                       (goto-char (match-beginning 0))
+                                       (search-forward "\n" (match-end 0) t))))
+                            (forward-line))
+                           ((= (match-beginning 0) (match-end 0))
+                            (forward-char))
+                           (t (goto-char (match-end 0))))))))
+                  (mapc #'delete-overlay old-ovs)
+                  (setf (evil-ex-hl-overlays hl) new-ovs)
+                  (if (or (null pattern) new-ovs)
+                      (setq result t)
+                    ;; Maybe the match could just not be found somewhere else?
+                    (save-excursion
+                      (goto-char (or (evil-ex-hl-min hl) (point-min)))
+                      (if (and (evil-ex-search-find-next-pattern pattern)
+                               (< (match-end 0) (or (evil-ex-hl-max hl)
+                                                    (point-max))))
+                          (setq result (format "Match in line %d"
+                                               (line-number-at-pos
+                                                (match-beginning 0))))
+                        (setq result "No match")))))
+
+              (invalid-regexp (setq result (cadr lossage)))
+              (search-failed (setq result (nth 2 lossage)))
+              (error (setq result (format "%s" (cadr lossage))))))
+        ;; no pattern, remove all highlights
+        (mapc #'delete-overlay old-ovs)
+        (setf (evil-ex-hl-overlays hl) new-ovs))
+      (when (evil-ex-hl-update-hook hl)
+        (funcall (evil-ex-hl-update-hook hl) hl result)))))
+
+(defun evil-ex-search-find-next-pattern (pattern &optional direction)
+  "Look for the next occurrence of PATTERN in a certain DIRECTION.
+Note that this function ignores the whole-line property of PATTERN."
+  (setq direction (or direction 'forward))
+  (let ((case-fold-search (evil-ex-pattern-ignore-case pattern)))
+    (cond
+     ((eq direction 'forward)
+      (re-search-forward (evil-ex-pattern-regex pattern) nil t))
+     ((eq direction 'backward)
+      (let* ((pnt (point))
+             (ret (re-search-backward (evil-ex-pattern-regex pattern) nil t))
+             (m (and ret (match-data))))
+        (if ret
+            (forward-char)
+          (goto-char (point-min)))
+        (let ((fwdret
+               (re-search-forward (evil-ex-pattern-regex pattern) nil t)))
+          (cond
+           ((and fwdret (< (match-beginning 0) pnt))
+            (setq ret fwdret)
+            (goto-char (match-beginning 0)))
+           (ret
+            (set-match-data m)
+            (goto-char (match-beginning 0)))
+           (t
+            (goto-char pnt)
+            ret)))))
+     (t (user-error "Unknown search direction `%s'" direction)))))
+
+(defun evil-ex-hl-idle-update ()
+  "Trigger the timer to update the highlights in the current buffer."
+  (when (and evil-ex-interactive-search-highlight
+             evil-ex-active-highlights-alist)
+    (when evil-ex-hl-update-timer
+      (cancel-timer evil-ex-hl-update-timer))
+    (setq evil-ex-hl-update-timer
+          (run-at-time evil-ex-hl-update-delay nil
+                       #'evil-ex-hl-do-update-highlight
+                       (current-buffer)))))
+
+(defun evil-ex-hl-do-update-highlight (&optional buffer)
+  "Timer function for updating the highlights."
+  (when (buffer-live-p buffer)
+    (with-current-buffer buffer
+      (evil-ex-hl-update-highlights)))
+  (setq evil-ex-hl-update-timer nil))
+
+(defun evil-ex-hl-update-highlights-scroll (win _beg)
+  "Update highlights after scrolling in some window."
+  (with-current-buffer (window-buffer win)
+    (evil-ex-hl-idle-update)))
+(put 'evil-ex-hl-update-highlights-scroll 'permanent-local-hook t)
+
+(defun evil-ex-hl-update-highlights-resize (frame)
+  "Update highlights after resizing a window."
+  (let ((buffers (delete-dups (mapcar #'window-buffer (window-list frame)))))
+    (dolist (buf buffers)
+      (with-current-buffer buf
+        (evil-ex-hl-idle-update)))))
+(put 'evil-ex-hl-update-highlights-resize 'permanent-local-hook t)
+
+;; interactive search
+(defun evil-ex-search-activate-highlight (pattern)
+  "Activate highlighting of the search pattern set to PATTERN.
+This function does nothing if `evil-ex-search-interactive' or
+`evil-ex-search-highlight-all' is nil. "
+  (when (and evil-ex-search-interactive evil-ex-search-highlight-all)
+    (with-current-buffer (or evil-ex-original-buffer (current-buffer))
+      (unless (evil-ex-hl-active-p 'evil-ex-search)
+        (evil-ex-make-hl 'evil-ex-search
+                         :win (or (minibuffer-selected-window) (selected-window))))
+      (when pattern
+        (evil-ex-hl-change 'evil-ex-search pattern)))))
+
+(defun evil-ex-search (&optional count)
+  "Search forward or backward COUNT times for the current Ex search pattern.
+The search pattern is determined by `evil-ex-search-pattern', and the
+direction by `evil-ex-search-direction'."
+  (setq evil-ex-search-start-point (point)
+        evil-ex-last-was-search t
+        count (or count 1))
+  (let ((orig (point))
+        wrapped)
+    (dotimes (_ (or count 1))
+      (when (and (eq evil-ex-search-direction 'forward) (not (eobp)))
+        (forward-char)
+        ;; maybe skip end-of-line
+        (and (not evil-move-beyond-eol) (eolp) (not (eobp))
+             (forward-char)))
+      (let ((res (evil-ex-find-next nil nil (not evil-search-wrap))))
+        (cond
+         ((not res)
+          (goto-char orig)
+          (signal 'search-failed
+                  (list (evil-ex-pattern-regex evil-ex-search-pattern))))
+         ((eq res 'wrapped) (setq wrapped t)))))
+    (if wrapped
+        (let (message-log-max)
+          (when evil-search-wrap-ring-bell (ding))
+          (message "Search wrapped")))
+    (goto-char (match-beginning 0))
+    (setq evil-ex-search-match-beg (match-beginning 0)
+          evil-ex-search-match-end (match-end 0))
+    (evil-ex-search-goto-offset evil-ex-search-offset)
+    (evil-ex-search-activate-highlight evil-ex-search-pattern)))
+
+(defun evil-ex-find-next (&optional pattern direction nowrap)
+  "Search for the next occurrence of the PATTERN in DIRECTION.
+PATTERN must be created using `evil-ex-make-pattern', DIRECTION is
+either `forward' or `backward'. If NOWRAP is non-nil, the search does
+not wrap at buffer boundaries. Furthermore this function only searches
+invisible text if `search-invisible' is t. If PATTERN is not specified
+the current global pattern `evil-ex-search-pattern' and if DIRECTION
+is not specified the current global direction
+`evil-ex-search-direction' is used. This function returns t if the
+search was successful, nil if it was unsuccessful and `wrapped' if the
+search was successful but wrapped around at buffer boundaries."
+  (setq pattern (or pattern evil-ex-search-pattern)
+        direction (or direction evil-ex-search-direction))
+  (unless (and pattern (evil-ex-pattern-regex pattern))
+    (signal 'search-failed (list "No search pattern")))
+  (catch 'done
+    (let (wrapped)
+      (while t
+        (if (evil-ex-search-find-next-pattern pattern direction)
+            (when (or (eq search-invisible t)
+                      (not (isearch-range-invisible
+                            (match-beginning 0) (match-end 0))))
+              ;; Successful search and not invisible
+              (throw 'done (if wrapped 'wrapped t)))
+          ;; Unsuccessful search
+          (if nowrap
+              (throw 'done nil)
+            (setq nowrap t
+                  wrapped t)
+            (goto-char (if (eq direction 'forward)
+                           (point-min)
+                         (point-max)))))))))
+
+(defun evil-ex-search-update (pattern offset beg end)
+  "Update the highlighting for the search pattern.
+PATTERN is the search pattern and OFFSET the associated offset.
+BEG and END specify the current match."
+  (cond
+   ((and beg end)
+    ;; update overlay
+    (if evil-ex-search-overlay
+        (move-overlay evil-ex-search-overlay beg end)
+      (setq evil-ex-search-overlay (make-overlay beg end))
+      (overlay-put evil-ex-search-overlay 'priority 1001)
+      (overlay-put evil-ex-search-overlay 'face 'evil-ex-search))
+    ;; move point
+    (goto-char beg)
+    (evil-ex-search-goto-offset offset)
+    ;; update highlights
+    (when evil-ex-search-highlight-all
+      (evil-ex-hl-change 'evil-ex-search pattern)))
+   (t
+    ;; no match
+    (when evil-ex-search-overlay
+      ;; remove overlay
+      (delete-overlay evil-ex-search-overlay)
+      (setq evil-ex-search-overlay nil))
+    ;; no highlights
+    (when evil-ex-search-highlight-all
+      (evil-ex-hl-change 'evil-ex-search nil))
+    ;; and go to initial position
+    (goto-char evil-ex-search-start-point))))
+
+(defvar evil--ex-search-update-timer nil
+  "Timer to coalesce `evil-ex-search-update-pattern' calls after pattern changes.")
+
+(defun evil-ex-search-after-change-function (_beg _end _old-len)
+  (when evil--ex-search-update-timer
+    (cancel-timer evil--ex-search-update-timer))
+  (setq evil--ex-search-update-timer
+        (run-with-idle-timer 0 nil #'evil-ex-search-update-pattern)))
+
+(defun evil-ex-search-start-session ()
+  "Initialize Ex for interactive search."
+  (add-hook 'pre-command-hook #'evil-ex-remove-default nil t)
+  (and evil-ex-search-interactive evil-ex-search-incremental
+       (add-hook 'after-change-functions
+                 #'evil-ex-search-after-change-function nil t))
+  (add-hook 'minibuffer-exit-hook #'evil-ex-search-stop-session nil t)
+  (add-hook 'mouse-leave-buffer-hook #'evil-ex-search-exit)
+  (evil-ex-search-activate-highlight nil))
+
+(defvar evil-ex-search-yank-point nil)
+
+(defun evil-ex-search-stop-session ()
+  "Stop interactive search."
+  (with-current-buffer evil-ex-original-buffer
+    ;; TODO: This is a bad fix to remove duplicates. The duplicates
+    ;;       exist because `isearch-range-invisible' may add a single
+    ;;       overlay multiple times if we are in an unlucky situation
+    ;;       of overlapping overlays. This happens in our case because
+    ;;       of the overlays that are used for (lazy) highlighting.
+    ;;       Perhaps it would be better to disable those overlays
+    ;;       temporarily before calling `isearch-range-invisible'.
+    (setq isearch-opened-overlays (delete-dups isearch-opened-overlays))
+    (isearch-clean-overlays))
+  (remove-hook 'mouse-leave-buffer-hook #'evil-ex-search-exit)
+  (when evil--ex-search-update-timer
+    (cancel-timer evil--ex-search-update-timer)
+    (setq evil--ex-search-update-timer nil))
+  (when evil-ex-search-overlay
+    (delete-overlay evil-ex-search-overlay)
+    (setq evil-ex-search-overlay nil))
+  (setq evil-ex-search-yank-point nil))
+
+(defun evil-ex-split-search-pattern (pattern direction)
+  "Split PATTERN in regexp, offset and next-pattern parts.
+Return a triplet (REGEXP OFFSET NEXT-SEARCH)."
+  (if (string-match
+       (if (eq direction 'forward)
+           "\\(?:^\\|[^\\\\]\\)\\(?:\\\\\\\\\\)*\\(/\\([^;]*\\)\\(?:;\\([/?].*\\)?\\)?\\)?$"
+         "\\(?:^\\|[^\\\\]\\)\\(?:\\\\\\\\\\)*\\(\\?\\([^;]*\\)\\(?:;\\([/?].*\\)?\\)?\\)?$")
+       pattern)
+      (list (substring pattern 0 (match-beginning 1))
+            (match-string 2 pattern)
+            (match-string 3 pattern))
+    (list pattern nil nil)))
+
+(defun evil-ex-search-full-pattern (string count direction)
+  "Search for a full search pattern STRING in DIRECTION.
+This function splits STRING into \"pattern/offset/;next-pattern\"
+parts and performs the search in DIRECTION which must be either
+`forward' or `backward'. The first search is repeated COUNT times. If
+the pattern part of STRING is empty, the last global pattern stored in
+`evil-ex-search-pattern' is used instead if in addition the offset
+part is nil (i.e. no pattern/offset separator), the last global offset
+stored in `evil-ex-search-offset' is used as offset. The current match
+data will correspond to the last successful match. This function
+returns a triplet (RESULT PATTERN OFFSET) where RESULT is one of
+
+  t               the search was successful without wrapping
+  `wrap'          the search was successful with wrapping
+  `empty-pattern' the last pattern was empty
+  nil             the search was unsuccessful
+
+and PATTERN and OFFSET are the last pattern and offset this
+function searched for. Note that this function does not handle
+any error conditions."
+  (setq count (or count 1))
+  (catch 'done
+    (while t
+      (let* ((res (evil-ex-split-search-pattern string direction))
+             (pat (pop res))
+             (offset (pop res))
+             (next-pat (pop res))
+             (orig-pat pat)
+             new-dir repeat-last wrapped)
+        (if (> (length pat) 0)
+            (setq pat (evil-ex-make-search-pattern pat))
+          ;; use last pattern if no new pattern has been specified
+          (setq pat (or evil-ex-search-pattern
+                        (throw 'done (list 'empty-pattern pat offset)))
+                offset (or offset evil-ex-search-offset)))
+        (while (> count 0)
+          (when (eq (or (evil-ex-find-next pat direction
+                                           (not evil-search-wrap))
+                        (throw 'done (list nil pat offset)))
+                    'wrapped)
+            (setq wrapped t))
+          (setq count (1- count)))
+        (cond
+         ;; no next pattern, search complete
+         ((zerop (length next-pat))
+          (evil-ex-search-goto-offset offset)
+          (throw 'done (list (if wrapped 'wrap t) pat offset)))
+         ;; single \"?\" or \"/\" means repeat last pattern and finish
+         ((= 1 (length next-pat))
+          (evil-ex-search-goto-offset offset)
+          (setq new-dir (if (string= "/" next-pat) 'forward 'backward)
+                count (if (eq direction new-dir) 1 2)
+                string orig-pat
+                direction new-dir))
+         ;; next non-empty pattern, next search iteration
+         (t (evil-ex-search-goto-offset offset)
+            (setq new-dir (if (= (aref next-pat 0) ?/) 'forward 'backward)
+                  repeat-last (when (<= 2 (length next-pat))
+                                (member (substring next-pat 0 2) '("//" "??")))
+                  count (if (or (eq direction new-dir) (not repeat-last)) 1 2)
+                  string (if repeat-last
+                             (concat orig-pat (substring next-pat 1))
+                           (substring next-pat 1))
+                  direction new-dir)))))))
+
+(defun evil-ex-search-update-pattern ()
+  "Update the current search pattern."
+  (let ((pattern-string (minibuffer-contents-no-properties))
+        message)
+    (with-selected-window (minibuffer-selected-window)
+      (goto-char (1+ evil-ex-search-start-point))
+      (condition-case err
+          (cl-destructuring-bind (success pattern offset)
+              (evil-ex-search-full-pattern pattern-string
+                                           (or evil-ex-search-count 1)
+                                           evil-ex-search-direction)
+            (cond
+             ((eq success 'wrap)
+              (evil-ex-search-update pattern offset
+                                     (match-beginning 0) (match-end 0))
+              (setq message "Wrapped"))
+             ((eq success 'empty-pattern)
+              (evil-ex-search-update nil nil nil nil))
+             (success
+              (evil-ex-search-update pattern offset
+                                     (match-beginning 0) (match-end 0)))
+             (t (evil-ex-search-update nil nil nil nil)
+                (setq message "Search failed"))))
+        (invalid-regexp
+         (evil-ex-search-update nil nil nil nil)
+         (setq message (cadr err)))
+        (error
+         (evil-ex-search-update nil nil nil nil)
+         (setq message (error-message-string err)))))
+    (when message (evil-ex-echo "%s" message))))
+
+(defun evil-ex-search-exit ()
+  "Exit interactive search, keeping lazy highlighting active."
+  (interactive)
+  (exit-minibuffer))
+
+(defun evil-ex-search-abort ()
+  "Abort interactive search, disabling lazy highlighting."
+  (interactive)
+  (evil-ex-delete-hl 'evil-ex-search)
+  (abort-recursive-edit))
+
+(defun evil-ex-search-goto-offset (offset)
+  "Move point according to search OFFSET and set `evil-this-type' accordingly.
+This function assumes that the current match data represents the
+current search result."
+  (unless (zerop (length offset))
+    (let ((beg (match-beginning 0))
+          (end (match-end 0)))
+      (save-match-data
+        (unless (string-match
+                 "^\\([esb]\\)?\\(\\([-+]\\)?\\([0-9]*\\)\\)$"
+                 offset)
+          (user-error "Invalid search offset: %s" offset))
+        (let ((count (if (= (match-beginning 4) (match-end 4))
+                         (cond
+                          ((not (match-beginning 3)) 0)
+                          ((= (aref offset (match-beginning 3)) ?+) +1)
+                          (t -1))
+                       (string-to-number (match-string 2 offset)))))
+          (cond
+           ((not (match-beginning 1))
+            (setq evil-this-type 'line)
+            (forward-line count))
+           ((= (aref offset (match-beginning 1)) ?e)
+            (goto-char (+ end count -1))
+            (setq evil-this-type 'inclusive))
+           ((memq (aref offset (match-beginning 1)) '(?s ?b))
+            (goto-char (+ beg count))
+            (setq evil-this-type 'inclusive))))))))
+
+(defun evil-ex-start-search (direction count)
+  "Start a new search in a certain DIRECTION."
+  (setq evil-ex-search-count count
+        evil-ex-search-direction direction
+        evil-ex-search-start-point (point)
+        evil-ex-last-was-search t)
+  ;; store buffer and window where the search started
+  (let* ((evil-ex-original-buffer (current-buffer))
+         ;; read the search string
+         (minibuffer-local-map evil-ex-search-keymap)
+         (search-string
+          (condition-case err
+              (minibuffer-with-setup-hook #'evil-ex-search-start-session
+                (read-string
+                 (if (eq evil-ex-search-direction 'forward) "/" "?")
+                 (when evil-ex-search-history
+                   (propertize (car evil-ex-search-history) 'face 'shadow))
+                 'evil-ex-search-history))
+            (quit
+             (evil-ex-delete-hl 'evil-ex-search)
+             (goto-char evil-ex-search-start-point)
+             (signal (car err) (cdr err))))))
+    ;; pattern entered successful
+    (goto-char (if (eq evil-ex-search-direction 'forward)
+                   (1+ evil-ex-search-start-point)
+                 (1- evil-ex-search-start-point)))
+    (cl-destructuring-bind (success pattern offset)
+        (evil-ex-search-full-pattern search-string
+                                     evil-ex-search-count
+                                     evil-ex-search-direction)
+      (setq evil-ex-search-pattern pattern
+            evil-ex-search-offset offset)
+      (cond
+       ((memq success '(t wrap))
+        (goto-char (match-beginning 0))
+        (setq evil-ex-search-match-beg (match-beginning 0)
+              evil-ex-search-match-end (match-end 0))
+        (evil-ex-search-goto-offset offset)
+        (evil-push-search-history search-string (eq direction 'forward))
+        (if evil-ex-search-incremental
+            (unless evil-ex-search-persistent-highlight
+              (evil-ex-delete-hl 'evil-ex-search))
+          (when evil-ex-search-highlight-all
+            (evil-ex-search-activate-highlight pattern))))
+       (t
+        (goto-char evil-ex-search-start-point)
+        (evil-ex-delete-hl 'evil-ex-search)
+        (signal 'search-failed (list search-string)))))))
+
+(declare-function evil-ex-search-next "evil-commands")
+(defun evil-ex-start-word-search (unbounded direction count &optional symbol)
+  "Search for the symbol under point.
+The search matches the COUNT-th occurrence of the word.  If the
+UNBOUNDED argument is nil, the search matches only at symbol
+boundaries, otherwise it matches anywhere.  The DIRECTION
+argument should be either `forward' or `backward', determining
+the search direction. If SYMBOL is non-nil then the functions
+searches for the symbol at point, otherwise for the word at
+point."
+  (let* ((string (or (evil-find-thing (eq direction 'forward)
+                                      (if symbol 'symbol 'word))
+                     (user-error "No word under point")))
+         (regex (if unbounded
+                    (regexp-quote string)
+                  (format (if symbol "\\_<%s\\_>" "\\<%s\\>")
+                          (regexp-quote string)))))
+    (setq evil-ex-search-count count
+          evil-ex-search-direction direction
+          evil-ex-search-pattern
+          (let (evil-ex-search-vim-style-regexp)
+            (evil-ex-make-search-pattern regex))
+          evil-ex-search-offset nil
+          evil-ex-last-was-search t)
+    ;; update search history unless this pattern equals the
+    ;; previous pattern
+    (unless (equal regex (car evil-ex-search-history))
+      (push regex evil-ex-search-history))
+    (evil-push-search-history regex (eq direction 'forward)))
+  (evil-ex-delete-hl 'evil-ex-search)
+  (evil-ex-search-next count))
+
+;; substitute
+(evil-ex-define-argument-type substitution
+  "A substitution pattern argument /pattern/replacement/flags.
+This handler highlights the pattern of the current substitution."
+  :runner
+  (lambda (flag &optional arg)
+    (with-current-buffer evil-ex-original-buffer
+      (cond
+       ((eq flag 'start)
+        (evil-ex-make-hl
+         'evil-ex-substitute
+         :face 'evil-ex-substitute-matches
+         :win (minibuffer-selected-window)
+         :update-hook #'evil-ex-pattern-update-ex-info
+         :match-hook (and evil-ex-substitute-interactive-replace
+                          #'evil-ex-pattern-update-replacement))
+        (setq flag 'update))
+       ((eq flag 'stop)
+        (evil-ex-delete-hl 'evil-ex-substitute)))
+
+      (when (and (eq flag 'update)
+                 evil-ex-substitute-highlight-all
+                 (> (length arg) 0))
+        (condition-case err
+            (cl-destructuring-bind (pattern replacement _flags)
+                (evil-ex-get-substitute-info (or arg "") t)
+              (evil-ex-hl-change 'evil-ex-substitute pattern)
+              (setq evil-ex-substitute-current-replacement replacement)
+              (cl-destructuring-bind (beg end &rest)
+                  (if evil-ex-range
+                      (evil-expand-range evil-ex-range t)
+                    (evil-range (line-beginning-position) (line-end-position)
+                                'line :expanded t))
+                (evil-ex-hl-set-region 'evil-ex-substitute beg end)))
+          (end-of-file (evil-ex-echo "Incomplete replacement"))
+          (user-error (evil-ex-echo (error-message-string err))))))))
+
+(defun evil-ex-pattern-update-ex-info (_hl result)
+  "Update the Ex info string."
+  (when (stringp result)
+    (evil-ex-echo "%s" result)))
+
+(defun evil-ex-pattern-update-replacement (_hl overlay)
+  "Update the replacement display."
+  (let ((repl (if evil-ex-substitute-current-replacement
+                  (evil-match-substitute-replacement
+                   evil-ex-substitute-current-replacement
+                   (not case-replace))
+                "")))
+    (put-text-property 0 (length repl)
+                       'face 'evil-ex-substitute-replacement
+                       repl)
+    (overlay-put overlay 'after-string repl)))
+
+(defun evil-ex-parse-global (string)
+  "Parse STRING as a global argument."
+  (let* ((pattern (nth 0 (evil-delimited-arguments string 2)))
+         (command (and pattern
+                       (>= (- (length string) (length pattern)) 2)
+                       (substring string (+ (length pattern) 2)))))
+    ;; use last pattern if none given
+    (when (zerop (length pattern))
+      (setq pattern
+            (cond
+             ((and (eq evil-search-module 'evil-search) evil-ex-search-pattern)
+              (evil-ex-pattern-regex evil-ex-search-pattern))
+             ((and (eq evil-search-module 'isearch) (not (zerop (length isearch-string))))
+              isearch-string)
+             (t (user-error "No previous pattern")))))
+    (list pattern command)))
+
+(defun evil-ex-get-substitute-info (string &optional implicit-r)
+  "Return the substitution info of :substitute argument STRING.
+The result is a triplet \(PATTERN REPLACEMENT FLAGS). PATTERN is an
+Ex-pattern (see `evil-ex-make-pattern') and REPLACEMENT is a compiled
+replacement expression (see `evil-compile-replacement'). The
+information returned is the actual substitution information w.r.t. to
+special situations like empty patterns or repetition of previous
+substitution commands. If IMPLICIT-R is non-nil, then the \"r\" flag
+is assumed, i.e. in case of an empty pattern the last search pattern
+is used. It is meant for :substitute commands with arguments."
+  (let (pattern replacement flags using-prev-pattern)
+    (cond
+     ((or (string= string "") (string-match-p "\\`[a-zA-Z]" string))
+      ;; No pattern, since it starts with a letter which cannot be a
+      ;; separator: Repeat last substitute.
+      (setq replacement evil-ex-substitute-replacement)
+      ;; flags are everything that is not whitespace
+      (when (string-match "[^[:space:]]+" string)
+        (setq flags (match-string 0 string))))
+     (t (let ((args (evil-delimited-arguments string 3)))
+          (setq pattern (pop args)
+                replacement (pop args)
+                flags (pop args))
+          ;; if replacment equals "~" use previous replacement
+          (setq replacement (if (equal replacement "~")
+                                evil-ex-substitute-replacement
+                              (evil-compile-replacement replacement)))
+          ;; append implicit "r" flag if required
+          (when (and implicit-r (not (memq ?r (append flags nil))))
+            (setq flags (concat flags "r"))))))
+    ;; if flags equals "&" add previous flags
+    (setq flags
+          (if (and (> (length flags) 0) (= (aref flags 0) ?&))
+              (append (substring flags 1) evil-ex-substitute-flags)
+            (append flags nil)))
+    ;; if no pattern, use previous pattern, either search or
+    ;; substitute pattern depending on `evil-ex-last-was-search' and
+    ;; the r flag
+    (when (zerop (length pattern))
+      (setq pattern
+            (if (eq evil-search-module 'evil-search)
+                (if (and evil-ex-last-was-search (memq ?r flags))
+                    (and evil-ex-search-pattern
+                         (setq using-prev-pattern t)
+                         (evil-ex-pattern-regex evil-ex-search-pattern))
+                  (and evil-ex-substitute-pattern
+                       (setq using-prev-pattern t)
+                       (evil-ex-pattern-regex evil-ex-substitute-pattern)))
+              (if (eq case-fold-search t)
+                  isearch-string
+                (concat isearch-string "\\C")))
+            flags (remq ?r flags)))
+    (when (and using-prev-pattern
+               (not (evil-ex-pattern-ignore-case evil-ex-search-pattern)))
+      (setq pattern (concat pattern "\\C")))
+    ;; generate pattern
+    (when pattern
+      ;; Disable vim-style regexp conversion if using a previous pattern, because
+      ;; this conversion will already have been done before storing it
+      (let ((evil-ex-search-vim-style-regexp (and evil-ex-search-vim-style-regexp
+                                                  (not using-prev-pattern))))
+        (setq pattern (evil-ex-make-substitute-pattern pattern flags))))
+    (list pattern replacement flags)))
+
+(defun evil-ex-nohighlight ()
+  "Disable the active search highlightings."
+  (interactive)
+  (evil-ex-delete-hl 'evil-ex-substitute)
+  (evil-ex-delete-hl 'evil-ex-search))
+
+(defun evil-search-yank-word ()
+  "Pull next word from buffer into search string."
+  (interactive)
+  (let ((minibuf-content (minibuffer-contents-no-properties))
+        (word "") start)
+    (with-current-buffer evil-ex-original-buffer
+      ;; Start to initial point if C-w have never been hit.
+      (unless evil-ex-search-yank-point
+        (if (string= "" minibuf-content)
+            (setq evil-ex-search-yank-point evil-ex-search-start-point)
+          (setq evil-ex-search-yank-point (point))))
+      (save-excursion
+        (goto-char evil-ex-search-yank-point)
+        (setq start (point))
+        (when (looking-at-p (regexp-quote minibuf-content))
+          (forward-char (length minibuf-content))
+          (setq start (point))
+          (forward-word))
+        (setq word (buffer-substring-no-properties start (point)))))
+    (and (eq evil-ex-search-case 'smart)
+         (let (case-fold-search)
+           (not (string-match-p "[A-Z]" minibuf-content)))
+         (setq word (downcase word)))
+    (insert word)))
+
+(provide 'evil-search)
+
+;;; evil-search.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-search.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-search.elc
new file mode 100644
index 0000000..09bf77f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-search.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-states.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-states.el
new file mode 100644
index 0000000..2918ca5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-states.el
@@ -0,0 +1,929 @@
+;;; evil-states.el --- States -*- lexical-binding: t -*-
+
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'evil-core)
+
+;;; Normal state
+
+(evil-define-state normal
+  "Normal state.
+AKA \"Command\" state."
+  :tag " <N> "
+  :enable (motion)
+  (cond
+   ((evil-normal-state-p)
+    (overwrite-mode -1)
+    (add-hook 'post-command-hook #'evil-normal-post-command nil t))
+   (t
+    (remove-hook 'post-command-hook #'evil-normal-post-command t))))
+
+(defun evil-normal-post-command (&optional command)
+  "Reset command loop variables in Normal state.
+Also prevent point from reaching the end of the line.
+If the region is activated, enter Visual state."
+  (unless (null this-command)
+    (setq command (or command this-command))
+    (when (evil-normal-state-p)
+      (setq evil-this-type nil
+            evil-this-operator nil
+            evil-this-motion nil
+            evil-this-motion-count nil
+            evil-inhibit-operator nil
+            evil-inhibit-operator-value nil)
+      (unless (memq command '(evil-use-register
+                              digit-argument
+                              negative-argument
+                              universal-argument
+                              universal-argument-minus
+                              universal-argument-more
+                              universal-argument-other-key))
+        (setq evil-this-register nil))
+      (evil-adjust-cursor))))
+(put 'evil-normal-post-command 'permanent-local-hook t)
+
+;;; Insert state
+
+(defun evil-maybe-remove-spaces (&optional do-remove)
+  "Remove space from newly opened empty line.
+This function removes (indentation) spaces that have been
+inserted by opening a new empty line. The behavior depends on the
+variable `evil-maybe-remove-spaces'. If this variable is nil the
+function does nothing. Otherwise the behavior depends on
+DO-REMOVE.  If DO-REMOVE is non-nil the spaces are
+removed. Otherwise `evil-maybe-remove-spaces' is set to nil
+unless the last command opened yet another new line.
+
+This function should be added as a post-command-hook to track
+commands opening a new line."
+  (cond
+   ((not evil-maybe-remove-spaces)
+    (remove-hook 'post-command-hook #'evil-maybe-remove-spaces))
+   (do-remove
+    (when (save-excursion
+            (beginning-of-line)
+            (looking-at "^\\s-*$"))
+      (delete-region (line-beginning-position)
+                     (line-end-position)))
+    (setq evil-maybe-remove-spaces nil)
+    (remove-hook 'post-command-hook #'evil-maybe-remove-spaces))
+   ((not (memq this-command
+               '(evil-open-above
+                 evil-open-below
+                 evil-append
+                 evil-append-line
+                 evil-change-whole-line
+                 newline
+                 newline-and-indent
+                 indent-and-newline)))
+    (setq evil-maybe-remove-spaces nil)
+    (remove-hook 'post-command-hook #'evil-maybe-remove-spaces))))
+
+(evil-define-state insert
+  "Insert state."
+  :tag " <I> "
+  :cursor (bar . 2)
+  :message "-- INSERT --"
+  :entry-hook (evil-start-track-last-insertion)
+  :exit-hook (evil-cleanup-insert-state evil-stop-track-last-insertion)
+  :input-method t
+  (cond
+   ((evil-insert-state-p)
+    (add-hook 'post-command-hook #'evil-maybe-remove-spaces)
+    (add-hook 'pre-command-hook #'evil-insert-repeat-hook)
+    (setq evil-maybe-remove-spaces t)
+    (unless (eq evil-want-fine-undo t)
+      (evil-start-undo-step)))
+   (t
+    (remove-hook 'post-command-hook #'evil-maybe-remove-spaces)
+    (remove-hook 'pre-command-hook #'evil-insert-repeat-hook)
+    (evil-maybe-remove-spaces t)
+    (setq evil-insert-repeat-info evil-repeat-info)
+    (evil-set-marker ?^ nil t)
+    (unless (eq evil-want-fine-undo t)
+      (evil-end-undo-step))
+    (when (or (evil-normal-state-p evil-next-state)
+              (evil-motion-state-p evil-next-state))
+      (evil-move-cursor-back
+       (and (eolp) (not evil-move-beyond-eol)))))))
+
+(defun evil-insert-repeat-hook ()
+  "Record insertion keys in `evil-insert-repeat-info'."
+  (setq evil-insert-repeat-info (last evil-repeat-info))
+  (remove-hook 'pre-command-hook #'evil-insert-repeat-hook))
+(put 'evil-insert-repeat-hook 'permanent-local-hook t)
+
+(eval-when-compile
+  ;; TODO remove this once support for emacs 26 is dropped
+  (unless (fboundp 'combine-change-calls)
+    (defmacro combine-change-calls (_beg _end &rest body) `(progn ,@body))))
+(declare-function evil-execute-repeat-info "evil-repeat")
+(defun evil-cleanup-insert-state ()
+  "Called when Insert or Replace state is about to be exited.
+Handles the repeat-count of the insertion command."
+  (when evil-insert-count
+    (let (pre-command-hook post-command-hook)
+      (dotimes (_ (1- evil-insert-count))
+        (when evil-insert-lines
+          (evil-insert-newline-below)
+          (when evil-auto-indent
+            (indent-according-to-mode)))
+        (evil-execute-repeat-info (cdr evil-insert-repeat-info)))))
+  (when evil-insert-vcount
+    (let ((buffer-invisibility-spec
+           (if (listp buffer-invisibility-spec)
+               ;; make all lines hidden by hideshow temporarily visible
+               (cl-remove-if (lambda (x) (eq (or (car-safe x) x) 'hs))
+                             buffer-invisibility-spec)
+             buffer-invisibility-spec)))
+      (cl-destructuring-bind (line col vcount) evil-insert-vcount
+        (save-excursion
+          (combine-change-calls ; For performance
+              (progn (goto-char (point-min))
+                     (line-beginning-position line))
+              (line-end-position (+ line vcount -1))
+            (let (pre-command-hook post-command-hook) ; For performance
+              (dotimes (v (1- vcount))
+                (goto-char (point-min))
+                (forward-line (+ line v))
+                (when (or (not evil-insert-skip-empty-lines)
+                          (not (integerp col))
+                          (save-excursion
+                            (evil-move-end-of-line)
+                            (>= (current-column) col)))
+                  (if (integerp col)
+                      (move-to-column col t)
+                    (funcall col))
+                  (dotimes (_ (or evil-insert-count 1))
+                    (evil-execute-repeat-info (cdr evil-insert-repeat-info)))))))))))
+  (and evil-want-fine-undo (evil-end-undo-step)))
+
+;;; Visual state
+
+;; Visual selections are implemented in terms of types, and are
+;; compatible with the Emacs region. This is achieved by "translating"
+;; the region to the selected text right before a command is executed.
+;; If the command is a motion, the translation is postponed until a
+;; non-motion command is invoked (distinguished by the :keep-visual
+;; command property).
+;;
+;; Visual state activates the region, enabling Transient Mark mode if
+;; not already enabled. This is only temporay: if Transient Mark mode
+;; was disabled before entering Visual state, it is disabled when
+;; exiting Visual state. This allows Visual state to harness the
+;; "transient" behavior of many commands without overriding the user's
+;; preferences in other states.
+
+(defmacro evil-define-visual-selection (selection doc &rest body)
+  "Define a Visual selection SELECTION.
+Creates a command evil-visual-SELECTION for enabling the selection.
+DOC is the function's documentation string. The following keywords
+may be specified in BODY:
+
+:message STRING         Status message when enabling the selection.
+:type TYPE              Type to use (defaults to SELECTION).
+
+Following the keywords is optional code which is executed each time
+the selection is enabled.
+
+\(fn SELECTION DOC [[KEY VAL]...] BODY...)"
+  (declare (indent defun)
+           (doc-string 2)
+           (debug (&define name stringp
+                           [&rest keywordp sexp]
+                           def-body)))
+  (let* ((name (intern (format "evil-visual-%s" selection)))
+         (message (intern (format "%s-message" name)))
+         (tagvar (intern (format "%s-tag" name)))
+         (type selection)
+         (tag " <V> ")
+         arg key string)
+    ;; collect keywords
+    (while (keywordp (car-safe body))
+      (setq key (pop body)
+            arg (pop body))
+      (cond
+       ((eq key :message)
+        (setq string arg))
+       ((eq key :type)
+        (setq type arg))
+       ((eq key :tag)
+        (setq tag arg))))
+    ;; macro expansion
+    `(progn
+       (add-to-list 'evil-visual-alist (cons ',selection ',name))
+       (defvar ,name ',type ,(format "*%s" doc))
+       (defvar ,message ,string ,doc)
+       (defvar ,tagvar ,tag ,doc)
+       (evil-define-command ,name (&optional mark point type message)
+         ,@(when doc `(,doc))
+         :keep-visual t
+         :repeat nil
+         (interactive
+          (list nil nil
+                (if (and (evil-visual-state-p)
+                         (eq evil-visual-selection ',selection))
+                    'exit ,name) t))
+         (setq evil--region-from-mouse nil)
+         (if (eq type 'exit)
+             (evil-exit-visual-state)
+           (setq type (or type ,name)
+                 evil-visual-selection ',selection)
+           (evil-visual-make-region mark point type message)
+           ,@body))
+       ',selection)))
+
+(evil-define-visual-selection char
+  "Characterwise selection."
+  :type inclusive
+  :message "-- VISUAL --"
+  :tag " <V> ")
+
+(evil-define-visual-selection line
+  "Linewise selection."
+  :message "-- VISUAL LINE --"
+  :tag " <Vl> ")
+
+(evil-define-visual-selection screen-line
+  "Linewise selection in `visual-line-mode'."
+  :message "-- SCREEN LINE --"
+  :tag " <Vs> ")
+
+(evil-define-visual-selection block
+  "Blockwise selection."
+  :message "-- VISUAL BLOCK --"
+  :tag " <Vb> "
+  (evil-transient-mark -1)
+  ;; refresh the :corner property
+  (setq evil-visual-properties
+        (plist-put evil-visual-properties :corner
+                   (evil-visual-block-corner))))
+
+(evil-define-state visual
+  "Visual state."
+  :tag 'evil-visual-tag
+  :enable (motion normal)
+  :message 'evil-visual-message
+  (cond
+   ((evil-visual-state-p)
+    (evil-save-transient-mark-mode)
+    (setq select-active-regions nil)
+    (cond
+     ((region-active-p)
+      (if (< (evil-visual-direction) 0)
+          (evil-visual-select (region-beginning) (region-end)
+                              evil-visual-char
+                              (evil-visual-direction))
+        (evil-visual-make-selection (mark t) (point)
+                                    evil-visual-char))
+      (evil-visual-highlight))
+     (t
+      (evil-visual-make-region (point) (point) evil-visual-char)))
+    (add-hook 'pre-command-hook #'evil-visual-pre-command nil t)
+    (add-hook 'post-command-hook #'evil-visual-post-command nil t)
+    (add-hook 'deactivate-mark-hook #'evil-visual-deactivate-hook nil t))
+   (t
+    ;; Postpone deactivation of region if next state is Insert.
+    ;; This gives certain insertion commands (auto-pairing characters,
+    ;; for example) an opportunity to access the region.
+    (if (and (eq evil-next-state 'insert)
+             (eq evil-visual-selection 'char))
+        (add-hook 'evil-normal-state-entry-hook
+                  #'evil-visual-deactivate-hook nil t)
+      (evil-visual-deactivate-hook))
+    (setq evil-visual-region-expanded nil)
+    (remove-hook 'pre-command-hook #'evil-visual-pre-command t)
+    (remove-hook 'post-command-hook #'evil-visual-post-command t)
+    (remove-hook 'deactivate-mark-hook #'evil-visual-deactivate-hook t)
+    (evil-visual-highlight -1))))
+
+(defun evil-visual-pre-command (&optional command)
+  "Run before each COMMAND in Visual state.
+Expand the region to the selection unless COMMAND is a motion."
+  (when (evil-visual-state-p)
+    (setq command (or command this-command))
+    (if (and evil-transient-mouse-selection
+             evil--region-from-mouse
+             (not (rassq command evil-visual-alist)))
+        (progn (setq evil--region-from-mouse nil)
+               (evil-exit-visual-state))
+      (when (and evil-transient-mouse-selection
+                 evil--region-from-mouse
+                 (rassq command evil-visual-alist))
+        (setq evil-visual-selection nil ;; maintain visual state
+              evil--region-from-mouse nil))
+      (when evil-visual-x-select-timer
+        (cancel-timer evil-visual-x-select-timer))
+      (unless (evil-get-command-property command :keep-visual)
+        (evil-visual-update-x-selection)
+        (evil-visual-expand-region
+         ;; exclude final newline from linewise selection
+         ;; unless the command has real need of it
+         (and (eq (evil-visual-type) 'line)
+              (evil-get-command-property command :exclude-newline)))))))
+
+(put 'evil-visual-pre-command 'permanent-local-hook t)
+
+(defun evil-visual-post-command (&optional command)
+  "Run after each COMMAND in Visual state.
+If COMMAND is a motion, refresh the selection;
+otherwise exit Visual state."
+  (when (evil-visual-state-p)
+    (setq command (or command this-command))
+    (if (or quit-flag
+            (memq command '(keyboard-quit keyboard-escape-quit))
+            ;; Is `mark-active' nil for an unexpanded region?
+            deactivate-mark
+            (and (not evil-visual-region-expanded)
+                 (not (region-active-p))
+                 (not (eq evil-visual-selection 'block))
+                 transient-mark-mode))
+        (progn
+          (evil-exit-visual-state)
+          (evil-adjust-cursor))
+      (if evil-visual-region-expanded
+          (evil-visual-contract-region)
+        (evil-visual-refresh))
+      (setq evil-visual-x-select-timer
+            (run-with-idle-timer evil-visual-x-select-timeout nil
+                                 #'evil-visual-update-x-selection
+                                 (current-buffer)))
+      (evil-visual-highlight))))
+(put 'evil-visual-post-command 'permanent-local-hook t)
+
+(defun evil-visual-update-x-selection (&optional buffer)
+  "Update the X selection with the current visual region of BUFFER."
+  (let ((buf (or buffer (current-buffer))))
+    (when (and evil-visual-update-x-selection-p
+               (buffer-live-p buf)
+               (evil-visual-state-p)
+               (display-selections-p)
+               (not (eq evil-visual-selection 'block)))
+      (with-current-buffer buf
+        (evil-set-selection 'PRIMARY (buffer-substring-no-properties
+                                      evil-visual-beginning
+                                      evil-visual-end))))))
+
+(defun evil-visual-activate-hook (&optional _command)
+  "Enable Visual state if the region is activated."
+  (unless (evil-visual-state-p)
+    (evil-with-delay nil
+        (post-command-hook nil t "evil-activate-visual-state")
+      ;; the activation may only be momentary, so re-check
+      ;; in `post-command-hook' before entering Visual state
+      (unless (or (evil-visual-state-p)
+                  (evil-insert-state-p)
+                  (evil-emacs-state-p))
+        (when (and (region-active-p)
+                   (not deactivate-mark))
+          (evil-visual-state))))))
+(put 'evil-visual-activate-hook 'permanent-local-hook t)
+
+(defun evil-visual-deactivate-hook (&optional command)
+  "Deactivate the region and restore Transient Mark mode."
+  (setq command (or command this-command))
+  (remove-hook 'deactivate-mark-hook
+               #'evil-visual-deactivate-hook t)
+  (remove-hook 'evil-normal-state-entry-hook
+               #'evil-visual-deactivate-hook t)
+  (cond
+   ((and (evil-visual-state-p) command
+         (not (evil-get-command-property command :keep-visual)))
+    (setq evil-visual-region-expanded nil)
+    (evil-exit-visual-state))
+   ((not (evil-visual-state-p))
+    (evil-active-region -1)
+    (evil-restore-transient-mark-mode))))
+(put 'evil-visual-deactivate-hook 'permanent-local-hook t)
+
+(evil-define-command evil-exit-visual-state (&optional later buffer)
+  "Exit from Visual state to the previous state.
+If LATER is non-nil, exit after the current command."
+  :keep-visual t
+  :repeat abort
+  (with-current-buffer (or buffer (current-buffer))
+    (when (evil-visual-state-p)
+      (if later
+          (setq deactivate-mark t)
+        (when evil-visual-region-expanded
+          (evil-visual-contract-region))
+        (setq evil-this-register nil
+              evil-prev-visual-selection evil-visual-selection
+              evil-prev-visual-mark (copy-marker evil-visual-mark)
+              evil-prev-visual-point (copy-marker evil-visual-point))
+        (evil-change-to-previous-state)))))
+
+(defun evil-visual-tag (&optional selection)
+  "Return a mode-line tag for SELECTION.
+SELECTION is a kind of selection as defined by
+`evil-define-visual-selection', such as `char', `line'
+or `block'."
+  (setq selection (or selection evil-visual-selection))
+  (when selection
+    (symbol-value (intern (format "evil-visual-%s-tag" selection)))))
+
+(defun evil-visual-message (&optional selection)
+  "Create an echo area message for SELECTION.
+SELECTION is a kind of selection as defined by
+`evil-define-visual-selection', such as `char', `line'
+or `block'."
+  (unless selection (setq selection evil-visual-selection))
+  (when selection
+    (let ((message (symbol-value (intern (format "evil-visual-%s-message"
+                                                 selection)))))
+      (cond
+       ((functionp message) (funcall message))
+       ((stringp message) (evil-echo "%s" message))))))
+
+(defun evil-visual-select (beg end &optional type dir message)
+  "Create a Visual selection of type TYPE from BEG to END.
+Point and mark are positioned so that the resulting selection
+has the specified boundaries. If DIR is negative, point precedes mark,
+otherwise it succedes it. To specify point and mark directly,
+use `evil-visual-make-selection'."
+  (let* ((range (evil-contract beg end type))
+         (mark (evil-range-beginning range))
+         (point (evil-range-end range))
+         (dir (or dir 1)))
+    (when (< dir 0)
+      (evil-swap mark point))
+    (evil-visual-make-selection mark point type message)))
+
+(defun evil-visual-make-selection (mark point &optional type message)
+  "Create a Visual selection with point at POINT and mark at MARK.
+The boundaries of the selection are inferred from these
+and the current TYPE. To specify the boundaries and infer
+mark and point, use `evil-visual-select' instead."
+  (let* ((selection (evil-visual-selection-for-type type))
+         (func (evil-visual-selection-function selection))
+         (prev (and (evil-visual-state-p) evil-visual-selection))
+         (mark (evil-normalize-position mark))
+         (point (evil-normalize-position point))
+         (state evil-state))
+    (unless (evil-visual-state-p)
+      (evil-visual-state))
+    (setq evil-visual-selection selection)
+    (funcall func mark point type
+             ;; signal a message when changing the selection
+             (when (or (not (evil-visual-state-p state))
+                       (not (eq selection prev)))
+               message))))
+
+(defun evil-visual-make-region (mark point &optional type message)
+  "Create an active region from MARK to POINT.
+If TYPE is given, also set the Visual type.
+If MESSAGE is given, display it in the echo area."
+  (interactive)
+  (let* ((point (or point (point)))
+         (mark (or mark
+                   (when (or (evil-visual-state-p)
+                             (region-active-p))
+                     (mark t))
+                   point)))
+    (unless (evil-visual-state-p)
+      (evil-visual-state))
+    (evil-active-region 1)
+    (setq evil-visual-region-expanded nil)
+    (evil-visual-refresh mark point type)
+    (cond
+     ((null evil-echo-state))
+     ((stringp message)
+      (evil-echo "%s" message))
+     (message
+      (cond
+       ((stringp evil-visual-state-message)
+        (evil-echo "%s" evil-visual-state-message))
+       ((functionp evil-visual-state-message)
+        (funcall evil-visual-state-message)))))))
+
+(defun evil-visual-expand-region (&optional exclude-newline)
+  "Expand the region to the Visual selection.
+If EXCLUDE-NEWLINE is non-nil and the selection ends with a newline,
+exclude that newline from the region."
+  (when (and (evil-visual-state-p)
+             (not evil-visual-region-expanded))
+    (let ((mark evil-visual-beginning)
+          (point evil-visual-end))
+      (when (< evil-visual-direction 0)
+        (evil-swap mark point))
+      (setq evil-visual-region-expanded t)
+      (evil-visual-refresh mark point)
+      (when (and exclude-newline
+                 (save-excursion
+                   (goto-char evil-visual-end)
+                   (and (bolp) (not (bobp)))))
+        (if (< evil-visual-direction 0)
+            (evil-move-mark (max point (1- (mark))))
+          (goto-char (max mark (1- (point)))))))))
+
+(defun evil-visual-contract-region ()
+  "The inverse of `evil-visual-expand-region'.
+Create a Visual selection that expands to the current region."
+  (evil-visual-refresh)
+  (setq evil-visual-region-expanded nil)
+  (evil-visual-refresh evil-visual-mark evil-visual-point))
+
+(defun evil-visual-refresh (&optional mark point type &rest properties)
+  "Refresh point, mark and Visual variables.
+Refreshes `evil-visual-beginning', `evil-visual-end',
+`evil-visual-mark', `evil-visual-point', `evil-visual-selection',
+`evil-visual-direction', `evil-visual-properties' and `evil-this-type'."
+  (let* ((point (or point (point)))
+         (mark (or mark (mark t) point))
+         (dir (evil-visual-direction))
+         (type (or type (evil-visual-type evil-visual-selection)
+                   (evil-visual-type)))
+         range)
+    (evil-move-mark mark)
+    (goto-char point)
+    (setq evil-visual-beginning
+          (or evil-visual-beginning
+              (let ((marker (make-marker)))
+                (move-marker marker (min point mark))))
+          evil-visual-end
+          (or evil-visual-end
+              (let ((marker (make-marker)))
+                (set-marker-insertion-type marker t)
+                (move-marker marker (max point mark))))
+          evil-visual-mark
+          (or evil-visual-mark
+              (let ((marker (make-marker)))
+                (move-marker marker mark)))
+          evil-visual-point
+          (or evil-visual-point
+              (let ((marker (make-marker)))
+                (move-marker marker point))))
+    (setq evil-visual-properties
+          (evil-concat-plists evil-visual-properties properties))
+    (cond
+     (evil-visual-region-expanded
+      (setq type (or (evil-visual-type) type))
+      (move-marker evil-visual-beginning (min point mark))
+      (move-marker evil-visual-end (max point mark))
+      ;; if the type is one-to-one, we can safely refresh
+      ;; the unexpanded positions as well
+      (when (evil-type-property type :one-to-one)
+        (setq range (apply #'evil-contract point mark type
+                           evil-visual-properties)
+              mark (evil-range-beginning range)
+              point (evil-range-end range))
+        (when (< dir 0)
+          (evil-swap mark point))
+        (move-marker evil-visual-mark mark)
+        (move-marker evil-visual-point point)))
+     (t
+      (setq range (apply #'evil-expand point mark type
+                         evil-visual-properties)
+            type (evil-type range type))
+      (move-marker evil-visual-beginning (evil-range-beginning range))
+      (move-marker evil-visual-end (evil-range-end range))
+      (move-marker evil-visual-mark mark)
+      (move-marker evil-visual-point point)))
+    (setq evil-visual-direction dir
+          evil-this-type type)))
+
+(defun evil-visual-highlight (&optional arg)
+  "Highlight Visual selection, depending on the Visual type.
+With negative ARG, disable highlighting."
+  (cond
+   ((and (numberp arg) (< arg 1))
+    (when evil-visual-overlay
+      (delete-overlay evil-visual-overlay)
+      (setq evil-visual-overlay nil))
+    (when evil-visual-block-overlays
+      (mapc #'delete-overlay evil-visual-block-overlays)
+      (setq evil-visual-block-overlays nil)))
+   ((eq evil-visual-selection 'block)
+    (when evil-visual-overlay
+      (evil-visual-highlight -1))
+    (evil-visual-highlight-block
+     evil-visual-beginning
+     evil-visual-end))
+   (t
+    (when evil-visual-block-overlays
+      (evil-visual-highlight -1))
+    (if evil-visual-overlay
+        (move-overlay evil-visual-overlay
+                      evil-visual-beginning evil-visual-end)
+      (setq evil-visual-overlay
+            (make-overlay evil-visual-beginning evil-visual-end)))
+    (overlay-put evil-visual-overlay 'face 'region)
+    (overlay-put evil-visual-overlay 'priority 99))))
+
+(defun evil-visual-highlight-block (beg end &optional overlays)
+  "Highlight rectangular region from BEG to END.
+Do this by putting an overlay on each line within the rectangle.
+Each overlay extends across all the columns of the rectangle.
+Reuse overlays where possible to prevent flicker."
+  (let* ((point (point))
+         (overlays (or overlays 'evil-visual-block-overlays))
+         (old (symbol-value overlays))
+         beg-col end-col new nlines overlay window-beg window-end)
+    (save-excursion
+      ;; calculate the rectangular region represented by BEG and END,
+      ;; but put BEG in the upper-left corner and END in the
+      ;; lower-right if not already there
+      (setq beg-col (evil-column beg)
+            end-col (evil-column end))
+      (when (>= beg-col end-col)
+        (if (= beg-col end-col)
+            (setq end-col (1+ end-col))
+          (evil-swap beg-col end-col))
+        (setq beg (progn (goto-char beg) (evil-move-to-column beg-col))
+              end (progn (goto-char end) (evil-move-to-column end-col 1))))
+      ;; maybe extend end column to EOL
+      (and (memq this-command '(next-line previous-line evil-use-register))
+           (eq temporary-goal-column most-positive-fixnum)
+           (setq end-col most-positive-fixnum))
+      ;; force a redisplay so we can do reliable window
+      ;; BEG/END calculations
+      (sit-for 0)
+      (setq window-beg (max (window-start) beg)
+            window-end (min (window-end) (1+ end))
+            nlines (count-lines window-beg
+                                (min window-end (point-max))))
+      ;; iterate over those lines of the rectangle which are
+      ;; visible in the currently selected window
+      (goto-char window-beg)
+      (dotimes (_ nlines)
+        (let (before after row-beg row-end)
+          ;; beginning of row
+          (evil-move-to-column beg-col)
+          (when (< (current-column) beg-col)
+            ;; prepend overlay with virtual spaces if unable to
+            ;; move directly to the first column
+            (setq before
+                  (propertize
+                   (make-string
+                    (- beg-col (current-column)) ?\s)
+                   'face
+                   (or (get-text-property (1- (point)) 'face)
+                       'default))))
+          (setq row-beg (point))
+          ;; end of row
+          (evil-move-to-column end-col)
+          (when (and (not (eolp))
+                     (< (current-column) end-col))
+            ;; append overlay with virtual spaces if unable to
+            ;; move directly to the last column
+            (setq after
+                  (propertize
+                   (make-string
+                    (if (= (point) row-beg)
+                        (- end-col beg-col)
+                      (- end-col (current-column)))
+                    ?\s) 'face 'region))
+            ;; place cursor on one of the virtual spaces
+            (if (= point row-beg)
+                (put-text-property
+                 0 (min (length after) 1)
+                 'cursor t after)
+              (put-text-property
+               (max 0 (1- (length after))) (length after)
+               'cursor t after)))
+          (setq row-end (min (point) (line-end-position)))
+          ;; trim old leading overlays
+          (while (and old
+                      (setq overlay (car old))
+                      (< (overlay-start overlay) row-beg)
+                      (/= (overlay-end overlay) row-end))
+            (delete-overlay overlay)
+            (setq old (cdr old)))
+          ;; reuse an overlay if possible, otherwise create one
+          (cond
+           ((and old (setq overlay (car old))
+                 (or (= (overlay-start overlay) row-beg)
+                     (= (overlay-end overlay) row-end)))
+            (move-overlay overlay row-beg row-end)
+            (overlay-put overlay 'before-string before)
+            (overlay-put overlay 'after-string after)
+            (setq new (cons overlay new)
+                  old (cdr old)))
+           (t
+            (setq overlay (make-overlay row-beg row-end))
+            (overlay-put overlay 'before-string before)
+            (overlay-put overlay 'after-string after)
+            (setq new (cons overlay new)))))
+        (forward-line 1))
+      ;; display overlays
+      (dolist (overlay new)
+        (overlay-put overlay 'face 'region)
+        (overlay-put overlay 'priority 99))
+      ;; trim old overlays
+      (dolist (overlay old)
+        (delete-overlay overlay))
+      (set overlays (nreverse new)))))
+
+(defun evil-visual-range ()
+  "Return the Visual selection as a range.
+This is a list (BEG END TYPE PROPERTIES...), where BEG is the
+beginning of the selection, END is the end of the selection,
+TYPE is the selection's type, and PROPERTIES is a property list
+of miscellaneous selection attributes."
+  (apply #'evil-range
+         evil-visual-beginning evil-visual-end
+         (evil-visual-type)
+         :expanded t
+         evil-visual-properties))
+
+(defun evil-visual-direction ()
+  "Return direction of Visual selection.
+The direction is -1 if point precedes mark and 1 otherwise.
+See also the variable `evil-visual-direction', which holds
+the direction of the last selection."
+  (let* ((point (point))
+         (mark (or (mark t) point)))
+    (if (< point mark) -1 1)))
+
+(defun evil-visual-type (&optional selection)
+  "Return the type of the Visual selection.
+If SELECTION is specified, return the type of that instead."
+  (or (and (null selection) (evil-visual-state-p) evil-this-type)
+      (symbol-value (cdr (assq (or selection evil-visual-selection)
+                               evil-visual-alist)))))
+
+(defun evil-visual-goto-end ()
+  "Go to the last line of the Visual selection.
+This position may differ from `evil-visual-end' depending on
+the selection type, and is contained in the selection."
+  (let ((range (evil-contract-range (evil-visual-range))))
+    (goto-char (evil-range-end range))))
+
+(defun evil-visual-alist ()
+  "Return an association list from types to selection symbols."
+  (mapcar #'(lambda (e)
+              (cons (symbol-value (cdr-safe e)) (cdr-safe e)))
+          evil-visual-alist))
+
+(defun evil-visual-selection-function (selection)
+  "Return a selection function for TYPE.
+Default to `evil-visual-make-region'."
+  (or (cdr-safe (assq selection evil-visual-alist))
+      ;; generic selection function
+      'evil-visual-make-region))
+
+(defun evil-visual-selection-for-type (type)
+  "Return a Visual selection for TYPE."
+  (catch 'done
+    (dolist (selection evil-visual-alist)
+      (when (memq (symbol-value (cdr selection))
+                  (list type (evil-visual-type type)))
+        (throw 'done (car selection))))))
+
+(defun evil-visual-block-corner (&optional corner point mark)
+  "Block corner corresponding to POINT, with MARK in opposite corner.
+Depending on POINT and MARK, the return value is `upper-left',
+`upper-right', `lower-left' or `lower-right':
+
+        upper-left +---+ upper-right
+                   |   |
+        lower-left +---+ lower-right
+
+One-column or one-row blocks are ambiguous. In such cases,
+the horizontal or vertical component of CORNER is used.
+CORNER defaults to `upper-left'."
+  (let* ((point (or point (point)))
+         (mark (or mark (mark t)))
+         (corner (or corner
+                     (when evil-visual-overlay
+                       (overlay-get evil-visual-overlay :corner))
+                     'upper-left))
+         (point-col (evil-column point))
+         (mark-col (evil-column mark))
+         (upperp (if (save-excursion (goto-char (min point mark))
+                                     (search-forward "\n" (max point mark) t))
+                     (< point mark)
+                   (memq corner '(upper-left upper-right))))
+         (leftp (if (= point-col mark-col)
+                    (memq corner '(upper-left lower-left))
+                  (< point-col mark-col))))
+    (if upperp
+        (if leftp 'upper-left 'upper-right)
+      (if leftp 'lower-left 'lower-right))))
+
+;;; Operator-Pending state
+
+(evil-define-state operator
+  "Operator-Pending state."
+  :tag " <O> "
+  :cursor evil-half-cursor
+  :enable (evil-operator-shortcut-map operator motion normal))
+
+(evil-define-keymap evil-operator-shortcut-map
+  "Keymap for Operator-Pending shortcuts like \"dd\" and \"gqq\"."
+  :local t
+  (setq evil-operator-shortcut-map (make-sparse-keymap))
+  (evil-initialize-local-keymaps))
+
+;; the half-height "Operator-Pending cursor" cannot be specified
+;; as a static `cursor-type' value, since its height depends on
+;; the current font size
+(defun evil-half-cursor ()
+  "Change cursor to a half-height box.
+\(This is really just a thick horizontal bar.)"
+  (let ((height (/ (window-pixel-height) (* (window-height) 2))))
+    (setq cursor-type (cons 'hbar height))))
+
+;;; Replace state
+
+(evil-define-state replace
+  "Replace state."
+  :tag " <R> "
+  :cursor hbar
+  :message "-- REPLACE --"
+  :entry-hook (evil-start-track-last-insertion)
+  :exit-hook (evil-cleanup-insert-state evil-stop-track-last-insertion)
+  :input-method t
+  (cond
+   ((evil-replace-state-p)
+    (overwrite-mode 1)
+    (add-hook 'pre-command-hook #'evil-replace-pre-command nil t)
+    (add-hook 'pre-command-hook #'evil-insert-repeat-hook)
+    (unless (eq evil-want-fine-undo t)
+      (evil-start-undo-step)))
+   (t
+    (overwrite-mode -1)
+    (remove-hook 'pre-command-hook #'evil-replace-pre-command t)
+    (remove-hook 'pre-command-hook #'evil-insert-repeat-hook)
+    (setq evil-insert-repeat-info evil-repeat-info)
+    (evil-set-marker ?^ nil t)
+    (unless (eq evil-want-fine-undo t)
+      (evil-end-undo-step))
+    (evil-move-cursor-back)))
+  (setq evil-replace-alist nil))
+
+(defun evil-replace-pre-command ()
+  "Remember the character under point."
+  (when (evil-replace-state-p)
+    (let ((char (unless (eolp) (char-after)))
+          (prev (assq (point) evil-replace-alist)))
+      (if prev
+          (setcdr prev char)
+        (push (cons (point) char) evil-replace-alist)))))
+(put 'evil-replace-pre-command 'permanent-local-hook t)
+
+(defun evil-replace-backspace ()
+  "Restore character under cursor."
+  (interactive)
+  (backward-char)
+  (let* ((prev (assq (point) evil-replace-alist))
+         (char (cdr prev))
+         (this-command #'evil-replace-backspace))
+    (when prev
+      (delete-char 1)
+      (when char (save-excursion (insert char))))))
+
+(defun evil-update-replace-alist (opoint count chars-to-delete &optional offset)
+  "Add CHARS-TO-DELETE chars to evil-replace-alist, starting at OPOINT.
+If COUNT is greater than CHARS-TO-DELETE, pad the alist with nils.
+Decrement recorded position by optional offset, or 0."
+  (when (evil-replace-state-p)
+    (dotimes (c count)
+      (let ((pos (+ c opoint)))
+        (add-to-list 'evil-replace-alist
+                     (cons (- pos (or offset 0)) (when (< c chars-to-delete)
+                                                   (char-after pos))))))))
+
+;;; Motion state
+
+(evil-define-state motion
+  "Motion state."
+  :tag " <M> "
+  :suppress-keymap t)
+
+;;; Emacs state
+
+(evil-define-state emacs
+  "Emacs state."
+  :tag " <E> "
+  :message "-- EMACS --"
+  :input-method t
+  :intercept-esc nil)
+
+(provide 'evil-states)
+
+;;; evil-states.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-states.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-states.elc
new file mode 100644
index 0000000..1ff0c06
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-states.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-types.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-types.el
new file mode 100644
index 0000000..df4b8ee
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-types.el
@@ -0,0 +1,464 @@
+;;; evil-types.el --- Type system -*- lexical-binding: t -*-
+
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; A type defines a transformation on a pair of buffer positions.
+;; Types are used by Visual state (character/line/block selection)
+;; and Operator-Pending state (character/line/block motions).
+;;
+;; The basic transformation is "expansion". For example, the `line'
+;; type "expands" a pair of positions to whole lines by moving the
+;; first position to the beginning of the line and the last position
+;; to the end of the line. That expanded selection is what the rest
+;; of Emacs sees and acts on.
+;;
+;; An optional transformation is "contraction", which is the opposite
+;; of expansion. If the transformation is one-to-one, expansion
+;; followed by contraction always returns the original range.
+;; (The `line' type is not one-to-one, as it may expand multiple
+;; positions to the same lines.)
+;;
+;; Another optional transformation is "normalization", which takes
+;; two unexpanded positions and adjusts them before expansion.
+;; This is useful for cleaning up "invalid" positions.
+;;
+;; Types are defined at the end of this file using the macro
+;; `evil-define-type'.
+
+(require 'evil-common)
+(require 'evil-macros)
+
+;;; Code:
+
+;;; Type definitions
+
+(evil-define-type exclusive
+  "Return the positions unchanged, with some exceptions.
+If the end position is at the beginning of a line, then:
+
+* If the beginning position is at or before the first non-blank
+  character on the line, return `line' (expanded).
+
+* Otherwise, move the end position to the end of the previous
+  line and return `inclusive' (expanded)."
+  :normalize (lambda (beg end)
+               (cond
+                ((progn
+                   (goto-char end)
+                   (and (/= beg end) (bolp)))
+                 (setq end (max beg (1- end)))
+                 (cond
+                  ((progn
+                     (goto-char beg)
+                     (looking-back "^[ \f\t\v]*" (line-beginning-position)))
+                   (evil-expand beg end 'line))
+                  (t
+                   (unless evil-cross-lines
+                     (setq end (max beg (1- end))))
+                   (evil-expand beg end 'inclusive))))
+                (t
+                 (evil-range beg end))))
+  :string (lambda (beg end)
+            (let ((width (- end beg)))
+              (format "%s character%s" width
+                      (if (= width 1) "" "s")))))
+
+(evil-define-type inclusive
+  "Include the character under point.
+Handling for `evil-want-visual-char-semi-exclusive' is deprecated,
+and will be removed in a future version."
+  :expand (lambda (beg end)
+            (if (and (with-no-warnings evil-want-visual-char-semi-exclusive)
+                     (evil-visual-state-p)
+                     (< beg end)
+                     (save-excursion
+                       (goto-char end)
+                       (or (bolp) (eolp))))
+                (evil-range beg end 'exclusive)
+              (evil-range beg (1+ end))))
+  :contract (lambda (beg end)
+              (evil-range beg (max beg (1- end))))
+  :normalize (lambda (beg end)
+               (evil-range beg (if (eq (char-after end) ?\n)
+                                   (max beg (1- end)) end)))
+  :string (lambda (beg end)
+            (let ((width (- end beg)))
+              (format "%s character%s" width
+                      (if (= width 1) "" "s")))))
+
+(evil-define-type line
+  "Include whole lines."
+  :one-to-one nil
+  :expand (lambda (beg end)
+            (evil-range
+             (progn
+               (goto-char beg)
+               ;; move to beginning of line as displayed
+               (evil-move-beginning-of-line)
+               (point))
+             (progn
+               (goto-char end)
+               ;; move to the end of line as displayed
+               (evil-move-end-of-line)
+               (line-beginning-position 2))))
+  :contract (lambda (beg end)
+              (evil-range beg (max beg (1- end))))
+  :string (lambda (beg end)
+            (let ((height (count-lines beg end)))
+              (format "%s line%s" height
+                      (if (= height 1) "" "s")))))
+
+(evil-define-type screen-line
+  "Include whole lines, being aware of `visual-line-mode'
+when `evil-respect-visual-line-mode' is non-nil."
+  :one-to-one nil
+  :expand (lambda (beg end)
+            (if (not (and evil-respect-visual-line-mode visual-line-mode))
+                (evil-line-expand beg end)
+              (evil-range
+               (progn
+                 (goto-char beg)
+                 (save-excursion
+                   (beginning-of-visual-line)))
+               (progn
+                 (goto-char end)
+                 (save-excursion
+                   ;; `beginning-of-visual-line' reverts to the beginning of the
+                   ;; last visual line if the end of the last line is the end of
+                   ;; the buffer. This would prevent selecting the last screen
+                   ;; line.
+                   (if (= (line-beginning-position 2) (point-max))
+                       (point-max)
+                     (beginning-of-visual-line 2)))))))
+  :contract (lambda (beg end)
+              (evil-range beg (max beg (1- end))))
+  :string (lambda (beg end)
+            (let ((height (count-screen-lines beg end)))
+              (format "%s screen line%s" height
+                      (if (= height 1) "" "s")))))
+
+(evil-define-type block
+  "Like `inclusive', but for rectangles:
+the last column is included."
+  :expand (lambda (beg end &rest properties)
+            (let ((beg-col (evil-column beg))
+                  (end-col (evil-column end))
+                  (corner (plist-get properties :corner)))
+              ;; Since blocks are implemented as a pair of buffer
+              ;; positions, expansion is restricted to what the buffer
+              ;; allows. In the case of a one-column block, there are
+              ;; two ways to expand it (either move the upper corner
+              ;; beyond the lower corner, or the lower beyond the
+              ;; upper), so try out both possibilities when
+              ;; encountering the end of the line.
+              (cond
+               ((= beg-col end-col)
+                (goto-char end)
+                (cond
+                 ((eolp)
+                  (goto-char beg)
+                  (if (eolp)
+                      (evil-range beg end)
+                    (evil-range (1+ beg) end)))
+                 ((memq corner '(lower-right upper-right right))
+                  (evil-range (1+ beg) end))
+                 (t
+                  (evil-range beg (1+ end)))))
+               ((< beg-col end-col)
+                (goto-char end)
+                (if (eolp)
+                    (evil-range beg end)
+                  (evil-range beg (1+ end))))
+               (t
+                (goto-char beg)
+                (if (eolp)
+                    (evil-range beg end)
+                  (evil-range (1+ beg) end))))))
+  :contract (lambda (beg end)
+              (let ((beg-col (evil-column beg))
+                    (end-col (evil-column end)))
+                (if (> beg-col end-col)
+                    (evil-range (1- beg) end)
+                  (evil-range beg (max beg (1- end))))))
+  :string (lambda (beg end)
+            (let ((height (count-lines
+                           beg
+                           (progn
+                             (goto-char end)
+                             (if (and (bolp) (not (eobp)))
+                                 (1+ end)
+                               end))))
+                  (width (abs (- (evil-column beg)
+                                 (evil-column end)))))
+              (format "%s row%s and %s column%s"
+                      height
+                      (if (= height 1) "" "s")
+                      width
+                      (if (= width 1) "" "s"))))
+  :rotate (lambda (beg end &rest properties)
+            "Rotate block according to :corner property.
+:corner can be one of `upper-left',``upper-right', `lower-left'
+and `lower-right'."
+            (let ((left  (evil-column beg))
+                  (right (evil-column end))
+                  (corner (or (plist-get properties :corner)
+                              'upper-left)))
+              (evil-sort left right)
+              (goto-char beg)
+              (if (memq corner '(upper-right lower-left))
+                  (move-to-column right)
+                (move-to-column left))
+              (setq beg (point))
+              (goto-char end)
+              (if (memq corner '(upper-right lower-left))
+                  (move-to-column left)
+                (move-to-column right))
+              (setq end (point))
+              (setq properties (plist-put properties
+                                          :corner corner))
+              (apply #'evil-range beg end properties))))
+
+(evil-define-type rectangle
+  "Like `exclusive', but for rectangles:
+the last column is excluded."
+  :expand (lambda (beg end)
+            ;; select at least one column
+            (if (= (evil-column beg) (evil-column end))
+                (evil-expand beg end 'block)
+              (evil-range beg end 'block))))
+
+;;; Standard interactive codes
+
+(evil-define-interactive-code "*"
+  "Signal error if the buffer is read-only."
+  (when buffer-read-only
+    (signal 'buffer-read-only nil)))
+
+(evil-define-interactive-code "b" (prompt)
+  "Name of existing buffer."
+  (list (read-buffer prompt (current-buffer) t)))
+
+(evil-define-interactive-code "c"
+  "Read character."
+  (list (read-char)))
+
+(evil-define-interactive-code "p"
+  "Prefix argument converted to number."
+  (list (prefix-numeric-value current-prefix-arg)))
+
+(evil-define-interactive-code "P"
+  "Prefix argument in raw form."
+  (list current-prefix-arg))
+
+;;; Custom interactive codes
+
+(evil-define-interactive-code "<w>"
+  "Prefix argument converted to number, possibly multiplied by evil--window-digit."
+  (let ((prefix-num (prefix-numeric-value current-prefix-arg)))
+    (if evil--window-digit
+        (list (* evil--window-digit prefix-num))
+      (list prefix-num))))
+
+(evil-define-interactive-code "<c>"
+  "Count."
+  (list (when current-prefix-arg
+          (prefix-numeric-value current-prefix-arg))))
+
+(evil-define-interactive-code "<vc>"
+  "Count, but only in visual state.
+This should be used by an operator taking a count. In normal
+state the count should not be handled by the operator but by the
+motion that defines the operator's range. In visual state the
+range is specified by the visual region and the count is not used
+at all. Thus in the case the operator may use the count
+directly."
+  (list (when (and (evil-visual-state-p) current-prefix-arg)
+          (prefix-numeric-value
+           current-prefix-arg))))
+
+(evil-define-interactive-code "<wc>"
+  "Prefix argument converted to number, or nil possibly multiplied by
+evil--window-digit."
+  (let ((prefix-num (prefix-numeric-value current-prefix-arg)))
+    (list
+     (cond (evil--window-digit (* evil--window-digit prefix-num))
+           (current-prefix-arg prefix-num)))))
+
+(evil-define-interactive-code "<C>"
+  "Character read through `evil-read-key'."
+  (list
+   (if (evil-operator-state-p)
+       (evil-without-restriction (evil-read-key))
+     (evil-read-key))))
+
+(evil-define-interactive-code "<r>"
+  "Untyped motion range (BEG END)."
+  (evil-operator-range))
+
+(evil-define-interactive-code "<R>"
+  "Typed motion range (BEG END TYPE)."
+  (evil-operator-range t))
+
+(evil-define-interactive-code "<v>"
+  "Typed motion range of visual range (BEG END TYPE).
+If visual state is inactive then those values are nil."
+  (if (evil-visual-state-p)
+      (let ((range (evil-visual-range)))
+        (list (car range)
+              (cadr range)
+              (evil-type range)))
+    (list nil nil nil)))
+
+(evil-define-interactive-code "<x>"
+  "Current register."
+  (list evil-this-register))
+
+(evil-define-interactive-code "<y>"
+  "Current yank-handler."
+  (list (evil-yank-handler)))
+
+(evil-define-interactive-code "<a>"
+  "Ex argument."
+  :ex-arg t
+  (list (when evil-called-from-ex-p evil-ex-argument)))
+
+(evil-define-interactive-code "<N>" ()
+  "Prefix argument or ex-arg, converted to number"
+  (list (cond
+         (current-prefix-arg (prefix-numeric-value current-prefix-arg))
+         (evil-ex-argument (string-to-number evil-ex-argument))
+         (evil-called-from-ex-p nil)
+         (t 1))))
+
+(evil-define-interactive-code "<f>"
+  "Ex file argument."
+  :ex-arg file
+  (list (when evil-called-from-ex-p (evil-ex-file-arg))))
+
+(evil-define-interactive-code "<b>"
+  "Ex buffer argument."
+  :ex-arg buffer
+  (list evil-ex-argument))
+
+(evil-define-interactive-code "<sh>"
+  "Ex shell command argument."
+  :ex-arg shell
+  (list evil-ex-argument))
+
+(evil-define-interactive-code "<fsh>"
+  "Ex file or shell command argument."
+  :ex-arg file-or-shell
+  (list evil-ex-argument))
+
+(evil-define-interactive-code "<sym>"
+  "Ex symbolic argument."
+  :ex-arg sym
+  (list (and evil-ex-argument (intern evil-ex-argument))))
+
+(evil-define-interactive-code "<addr>"
+  "Ex line number."
+  (list
+   (when evil-called-from-ex-p
+     (let ((expr (evil-ex-parse (or evil-ex-argument ""))))
+       (if (eq (car expr) 'evil-goto-line)
+           (save-excursion (goto-char evil-ex-point)
+                           (eval (cadr expr) t))
+         (user-error "Invalid address"))))))
+
+(evil-define-interactive-code "<!>"
+  "Ex bang argument."
+  :ex-bang t
+  (list evil-ex-bang))
+
+(evil-define-interactive-code "</>"
+  "Ex delimited argument."
+  (when evil-called-from-ex-p
+    (evil-delimited-arguments (or evil-ex-argument ""))))
+
+(evil-define-interactive-code "<g/>"
+  "Ex global argument."
+  (when evil-called-from-ex-p
+    (evil-ex-parse-global (or evil-ex-argument ""))))
+
+(evil-define-interactive-code "<s/>"
+  "Ex substitution argument."
+  :ex-arg substitution
+  (when evil-called-from-ex-p
+    (evil-ex-get-substitute-info (or evil-ex-argument "") t)))
+
+(evil-define-interactive-code "<xc/>"
+  "Ex register and count argument, both optional.
+Can be used for commands such as :delete [REGISTER] [COUNT] where the
+command can be called with either zero, one or two arguments. With one
+argument, if it is numeric, it is treated as a COUNT, otherwise, as a
+REGISTER."
+  (when evil-called-from-ex-p
+    (evil-ex-get-optional-register-and-count evil-ex-argument)))
+
+(defun evil-ex-get-optional-register-and-count (string)
+  "Parse STRING as an ex arg with both optional REGISTER and COUNT.
+Return a list (REGISTER COUNT)."
+  (let* ((split-args (split-string (or string "")))
+         (arg-count (length split-args))
+         (arg0 (car split-args))
+         (arg1 (cadr split-args))
+         (number-regex "^-?[1-9][0-9]*$")
+         (register nil)
+         (count nil))
+    (cond
+     ;; :command REGISTER or :command COUNT
+     ((= arg-count 1)
+      (if (string-match-p number-regex arg0)
+          (setq count arg0)
+        (setq register arg0)))
+     ;; :command REGISTER COUNT
+     ((eq arg-count 2)
+      (setq register arg0
+            count arg1))
+     ;; more than 2 args aren't allowed
+     ((> arg-count 2)
+      (user-error "Invalid use")))
+
+    ;; if register is given, check it's valid
+    (when register
+      (unless (= (length register) 1)
+        (user-error "Invalid register"))
+      (setq register (string-to-char register)))
+
+    ;; if count is given, check it's valid
+    (when count
+      (unless (string-match-p number-regex count)
+        (user-error "Invalid count"))
+      (setq count (string-to-number count))
+      (unless (> count 0)
+        (user-error "Invalid count")))
+
+    (list register count)))
+
+(provide 'evil-types)
+
+;;; evil-types.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-types.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-types.elc
new file mode 100644
index 0000000..18713a9
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-types.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-vars.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-vars.el
new file mode 100644
index 0000000..b10b7a5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-vars.el
@@ -0,0 +1,2120 @@
+;;; evil-vars.el --- Settings and variables -*- lexical-binding: t -*-
+
+;; Author: Vegard Øye <vegard_oye at hotmail.com>
+;; Maintainer: Vegard Øye <vegard_oye at hotmail.com>
+
+
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(declare-function evil-add-command-properties "evil-common"
+                  (command &rest properties))
+(declare-function evil-update-insert-state-bindings "evil-maps"
+                  (&optional _option-name remove force))
+
+;;; Hooks
+
+(defvar evil-after-load-hook nil
+  "Functions to be run when loading of Evil is finished.
+This hook can be used to execute some initialization routines
+when Evil is completely loaded.")
+
+(defvar evil-after-global-hook nil
+  "Functions to be run after :global and :vglobal.")
+
+(defcustom evil-goto-definition-functions
+  '(evil-goto-definition-imenu
+    evil-goto-definition-semantic
+    evil-goto-definition-xref
+    evil-goto-definition-search)
+  "List of functions run until success by `evil-goto-definition'."
+  :type 'hook
+  :group 'evil)
+
+;;; Initialization
+
+(defvar evil-pending-custom-initialize nil
+  "A list of pending initializations for custom variables.
+Each element is a triple (FUNC VAR VALUE). When Evil is
+completely loaded then the functions (funcall FUNC VAR VALUE) is
+called for each element. FUNC should be a function suitable for
+the :initialize property of `defcustom'.")
+
+(defun evil-custom-initialize-pending-reset (var value)
+  "Add a pending customization with `custom-initialize-reset'."
+  (push (list 'custom-initialize-reset var value)
+        evil-pending-custom-initialize))
+
+(defun evil-run-pending-custom-initialize ()
+  "Execute the pending initializations.
+See `evil-pending-custom-initialize'."
+  (dolist (init evil-pending-custom-initialize)
+    (apply (car init) (cdr init)))
+  (remove-hook 'evil-after-load-hook #'evil-run-pending-custom-initialize))
+(add-hook 'evil-after-load-hook #'evil-run-pending-custom-initialize)
+
+;;; Setters
+
+(defun evil-set-toggle-key (key)
+  "Set `evil-toggle-key' to KEY.
+KEY must be readable by `read-kbd-macro'."
+  (let ((old-key (read-kbd-macro
+                  (if (boundp 'evil-toggle-key)
+                      evil-toggle-key
+                    "C-z")))
+        (key (read-kbd-macro key)))
+    (with-no-warnings
+      (dolist (pair '((evil-motion-state-map evil-emacs-state)
+                      (evil-insert-state-map evil-emacs-state)
+                      (evil-emacs-state-map evil-exit-emacs-state)))
+        (when (boundp (car pair))
+          (let ((map (symbol-value (car pair)))
+                (fun (cadr pair)))
+            (when (keymapp map)
+              (define-key map key fun)
+              (define-key map old-key nil))))))))
+
+(defun evil-set-custom-state-maps (var pending-var key _make newlist)
+  "Change the list of special keymaps.
+VAR         is the variable containing the list of keymaps.
+PENDING-VAR is the variable containing the list of the currently pending
+            keymaps.
+KEY         the special symbol to be stored in the keymaps.
+MAKE        the creation function of the special keymaps.
+NEWLIST     the list of new special keymaps."
+  (set-default pending-var newlist)
+  (when (default-boundp var)
+    (dolist (map (default-value var))
+      (when (and (boundp (car map))
+                 (keymapp (default-value (car map))))
+        (define-key (default-value (car map)) (vector key) nil))))
+  (set-default var newlist)
+  (evil-update-pending-maps))
+
+(defun evil-update-pending-maps (&optional _file)
+  "Try to set pending special keymaps.
+This function should be called from an `after-load-functions'
+hook."
+  (let ((maps '((evil-make-overriding-map . evil-pending-overriding-maps)
+                (evil-make-intercept-map . evil-pending-intercept-maps))))
+    (while maps
+      (let* ((map (pop maps))
+             (make (car map))
+             (pending-var (cdr map))
+             (pending (symbol-value pending-var))
+             newlist)
+        (while pending
+          (let* ((map (pop pending))
+                 (kmap (and (boundp (car map))
+                            (keymapp (symbol-value (car map)))
+                            (symbol-value (car map))))
+                 (state (cdr map)))
+            (if kmap
+                (funcall make kmap state)
+              (push map newlist))))
+        (set-default pending-var newlist)))))
+
+(defun evil-set-visual-newline-commands (var value)
+  "Set the value of `evil-visual-newline-commands'.
+Setting this variable changes the properties of the appropriate
+commands."
+  (with-no-warnings
+    (when (default-boundp var)
+      (dolist (cmd (default-value var))
+        (evil-set-command-property cmd :exclude-newline nil)))
+    (set-default var value)
+    (dolist (cmd (default-value var))
+      (evil-set-command-property cmd :exclude-newline t))))
+
+(defun evil-set-custom-motions (var values)
+  "Set the list of motion commands."
+  (with-no-warnings
+    (when (default-boundp var)
+      (dolist (motion (default-value var))
+        (evil-add-command-properties motion :keep-visual nil :repeat nil)))
+    (set-default var values)
+    (mapc #'evil-declare-motion (default-value var))))
+
+;;; Customization group
+
+(defgroup evil nil
+  "Extensible vi layer."
+  :group 'emulations
+  :prefix 'evil-)
+
+(defcustom evil-auto-indent t
+  "\\<evil-normal-state-map>
+Whether to auto-indent when opening lines with \\[evil-open-below] \
+and \\[evil-open-above]."
+  :type  'boolean
+  :group 'evil)
+
+(defcustom evil-shift-width 4
+  "\\<evil-normal-state-map>
+The number of columns by which a line is shifted.
+This applies to the shifting operators \\[evil-shift-right] and \
+\\[evil-shift-left]."
+  :type 'integer
+  :safe #'integerp
+  :group 'evil)
+
+(defcustom evil-shift-round t
+  "\\<evil-normal-state-map>
+Whether shifting rounds to the nearest multiple.
+If non-nil, \\[evil-shift-right] and \\[evil-shift-left] adjust line
+indentation to the nearest multiple of `evil-shift-width'."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-indent-convert-tabs t
+  "\\<evil-normal-state-map>
+If non-nil, the \\[evil-indent] operator converts between leading tabs and spaces.
+Whether tabs are converted to spaces or vice versa depends on the
+value of `indent-tabs-mode'."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-default-cursor t
+  "The default cursor.
+May be a cursor type as per `cursor-type', a color string as passed
+to `set-cursor-color', a zero-argument function for changing the
+cursor, or a list of the above.
+
+nil is interpreted as t; if you want the nil `cursor-type' (i.e.,
+you want to disable the cursor), set this variable to (list nil)."
+  :type '(set symbol (cons symbol symbol) string function)
+  :group 'evil)
+
+(defvar evil-force-cursor nil
+  "Overwrite the current states default cursor.")
+
+(defcustom evil-start-of-line nil
+  "Analogue of vim's `startofline'.
+If nil, preserve column when making relevant movements of the cursor.
+Otherwise, move the cursor to the start of the line."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-repeat-move-cursor t
+  "\\<evil-normal-state-map>
+Whether repeating commands with \\[evil-repeat] may move the cursor.
+If nil, the original cursor position is preserved, even if the command
+normally would have moved the cursor."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-cross-lines nil
+  "\\<evil-motion-state-map>
+Whether horizontal motions may move to other lines.  If non-nil,
+certain motions that conventionally operate in a single line may move
+the cursor to other lines.  Otherwise, they are restricted to the
+current line.  This applies to \\[evil-backward-char], \
+\\[evil-forward-char], \\[evil-find-char], \
+\\[evil-find-char-backward], \\[evil-find-char-to], \
+\\[evil-find-char-to-backward], \
+\\<evil-normal-state-map>\\[evil-invert-char]."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-backspace-join-lines t
+  "Whether backward delete in insert state may join lines."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-move-cursor-back t
+  "Whether the cursor is moved backwards when exiting insert state.
+If non-nil, the cursor moves \"backwards\" when exiting insert state,
+so that it ends up on the character to the left.  Otherwise it remains
+in place, on the character to the right.
+
+See also `evil-move-beyond-eol'."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-move-beyond-eol nil
+  "Whether the cursor can move past the end of the line.
+If non-nil, the cursor is allowed to move one character past the
+end of the line, as in Emacs."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-respect-visual-line-mode nil
+  "\\<evil-motion-state-map>
+Whether movement commands respect `visual-line-mode'.
+If non-nil, `visual-line-mode' is generally respected when it is
+on.  In this case, motions such as \\[evil-next-line] and
+\\[evil-previous-line] navigate by visual lines (on the screen) rather
+than \"physical\" lines (defined by newline characters).  If nil,
+the setting of `visual-line-mode' is ignored.
+
+This variable must be set before Evil is loaded."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-repeat-find-to-skip-next t
+  "Whether a repeat of t or T should skip an adjacent character."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-kbd-macro-suppress-motion-error nil
+  "\\<evil-motion-state-map>
+Whether left/right motions signal errors in keyboard macros.
+This variable only affects beginning-of-line or end-of-line errors
+regarding the motions \\[evil-backward-char] and \\[evil-forward-char]
+respectively.  This may be desired since such errors cause macro
+definition or execution to be terminated.  There are four
+possibilities:
+
+- `record': errors are suppressed when recording macros, but not when
+  replaying them.
+- `replay': errors are suppressed when replaying macros, but not when
+  recording them.
+- `t': errors are suppressed in both cases.
+- `nil': errors are never suppressed."
+  :type '(radio (const :tag "No" :value nil)
+                (const :tag "Record" :value record)
+                (const :tag "Replay" :value replay)
+                (const :tag "Both" :value t))
+  :group 'evil)
+
+(defcustom evil-track-eol t
+  "\\<evil-motion-state-map>
+Whether \\[evil-end-of-line] \"sticks\" the cursor to the end of the line.
+If non-nil, vertical motions after \\[evil-end-of-line] maintain the cursor at the
+end of the line, even if the target line is longer.  This is analogous
+to `track-eol', but respects Evil's interpretation of end-of-line."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-mode-line-format 'before
+  "The position of the state tag in the mode line.
+If set to `before' or `after', the tag is placed at the beginning
+or the end of the mode-line, respectively.  If nil, there is no
+tag.  Otherwise it should be a cons cell (WHERE . WHICH), where
+WHERE is either `before' or `after', and WHICH is a symbol in
+`mode-line-format'.  The tag is then placed before or after that
+symbol, respectively."
+  :type '(radio :value 'before
+                (const :tag "No tag" nil)
+                (const before)
+                (const after)
+                (cons :tag "Next to symbol"
+                      (choice :value after
+                              (const before)
+                              (const after))
+                      symbol))
+  :group 'evil)
+
+(defcustom evil-mouse-word 'evil-word
+  "The thing-at-point symbol for double click selection.
+The double-click starts visual state in a special word selection
+mode. This symbol is used to determine the words to be
+selected. Possible values are `evil-word' or `evil-WORD'."
+  :type 'symbol
+  :group 'evil)
+
+(defcustom evil-bigword "^ \t\r\n"
+  "The set of characters to be interpreted as WORD boundaries.
+This is enclosed with square brackets and used as a regular
+expression.  By default, whitespace characters are considered
+WORD boundaries."
+  :type 'string
+  :group 'evil)
+
+(defcustom evil-want-fine-undo nil
+  "Whether actions are undone in several steps.
+There are two possible choices: nil (\"no\") means that all
+changes made during insert state, including a possible delete
+after a change operation, are collected in a single undo step.
+Non-nil (\"yes\") means that undo steps are determined according
+to Emacs heuristics, and no attempt is made to aggregate changes.
+
+For backward compatibility purposes, the value `fine' is
+interpreted as `nil'.  This option was removed because it did not
+work consistently."
+  :type '(radio (const :tag "No" :value nil)
+                (const :tag "Fine (obsolete)" :value fine)
+                (const :tag "Yes" :value t))
+  :group 'evil)
+
+(defcustom evil-regexp-search t
+  "\\<evil-motion-state-map>
+Whether to use regular expressions for searching in \
+\\[evil-search-forward] and \\[evil-search-backward]."
+  :type  'boolean
+  :group 'evil)
+
+(defcustom evil-search-wrap t
+  "\\<evil-motion-state-map>
+Whether search with \\[evil-search-forward] and \
+\\[evil-search-backward] wraps around the buffer.
+If this is non-nil, search stops at the buffer boundaries."
+  :type  'boolean
+  :group 'evil)
+
+(defcustom evil-flash-delay 2
+  "\\<evil-motion-state-map>
+Time in seconds to flash search matches after \\[evil-search-next] and \
+\\[evil-search-previous]."
+  :type  'number
+  :group 'evil)
+
+(defcustom evil-auto-balance-windows t
+  "If non-nil window creation and deletion trigger rebalancing."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-split-window-below nil
+  "If non-nil split windows are created below."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-vsplit-window-right nil
+  "If non-nil vertically split windows with are created to the right."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-esc-delay 0.01
+  "The time, in seconds, to wait for another key after escape.
+If no further event arrives during this time, the event is
+translated to `ESC'.  Otherwise, it is translated according to
+`input-decode-map'.  This does not apply in Emacs state, and may
+also be inhibited by setting `evil-inhibit-esc'."
+  :type 'number
+  :group 'evil)
+
+(defvar evil-esc-mode nil
+  "Non-nil if `evil-esc-mode' is enabled.")
+
+(defvar evil-esc-map nil
+  "Original ESC prefix map in `input-decode-map'.
+Used by `evil-esc-mode'.")
+
+(defvar evil-inhibit-esc nil
+  "If non-nil, the \"\\e\" event will never be translated to `escape'.")
+
+(defcustom evil-intercept-esc 'always
+  "Whether Evil should intercept the escape key.
+In the terminal, escape and a meta key sequence both generate the
+same event.  In order to distingush these, Evil uses
+`input-decode-map'.  It is not necessary to do this in a graphical
+Emacs session.  However, if you prefer to use \"C-[\" as escape (which
+is identical to the terminal escape key code), this interception must
+also happen in graphical Emacs sessions.  Set this variable to
+`always', t (only in the terminal) or nil (never intercept)."
+  :type '(radio (const :tag "Never" :value nil)
+                (const :tag "In terminal only" :value t)
+                (const :tag "Always" :value always))
+  :group 'evil)
+
+(defcustom evil-show-paren-range 0
+  "The maximum distance between point and a parenthesis
+which causes the parenthesis to be highlighted."
+  :type 'integer
+  :group 'evil)
+
+(defcustom evil-ex-hl-update-delay 0.02
+  "Time in seconds of idle before updating search highlighting.
+Setting this to a period shorter than that of keyboard's repeat
+rate allows highlights to update while scrolling."
+  :type 'number
+  :group 'evil)
+
+(defcustom evil-highlight-closing-paren-at-point-states
+  '(not emacs insert replace)
+  "The states in which the closing parenthesis at point should be highlighted.
+All states listed here highlight the closing parenthesis at
+point (which is Vim's default behavior).  All others highlight the
+parenthesis before point (which is Emacs default behavior). If
+this list contains the symbol `not' then its meaning is inverted,
+i.e. all states listed here highlight the closing parenthesis
+before point."
+  :type '(repeat symbol)
+  :group 'evil)
+
+(defcustom evil-kill-on-visual-paste t
+  "Whether pasting in visual state adds the replaced text to the
+kill ring, making it the default for the next paste. The default
+replicates the default Vim behavior for `p'. This value is flipped by
+`evil-paste-before' (\\[evil-paste-before])."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-want-C-i-jump t
+  "Whether `C-i' jumps forward in the jump list (like Vim).
+Otherwise, `C-i' inserts a tab character."
+  :type 'boolean
+  :group 'evil
+  :set #'(lambda (sym value)
+           (set-default sym value)
+           (when (boundp 'evil-motion-state-map)
+             (cond
+              ((and (not value)
+                    (eq (lookup-key evil-motion-state-map (kbd "C-i"))
+                        'evil-jump-forward))
+               (define-key evil-motion-state-map (kbd "C-i") nil))
+              ((and value
+                    (not (lookup-key evil-motion-state-map (kbd "C-i"))))
+               (define-key evil-motion-state-map (kbd "C-i")
+                           'evil-jump-forward))))))
+
+(defcustom evil-want-C-u-scroll nil
+  "Whether `C-u' scrolls up (like Vim).
+Otherwise, `C-u' applies a prefix argument.  The binding of
+`C-u' mirrors Emacs behaviour by default due to the relative
+ubiquity of prefix arguments."
+  :type 'boolean
+  :group 'evil
+  :set #'(lambda (sym value)
+           (set-default sym value)
+           (when (boundp 'evil-motion-state-map)
+             (cond
+              ((and (not value)
+                    (eq (lookup-key evil-motion-state-map (kbd "C-u"))
+                        'evil-scroll-up))
+               (define-key evil-motion-state-map (kbd "C-u") nil))
+              ((and value
+                    (not (lookup-key evil-motion-state-map (kbd "C-u"))))
+               (define-key evil-motion-state-map (kbd "C-u")
+                           'evil-scroll-up))))))
+
+(defcustom evil-want-C-d-scroll t
+  "Whether `C-d' scrolls down (like Vim)."
+  :type 'boolean
+  :group 'evil
+  :set #'(lambda (sym value)
+           (set-default sym value)
+           (when (boundp 'evil-motion-state-map)
+             (cond
+              ((and (not value)
+                    (eq (lookup-key evil-motion-state-map (kbd "C-d"))
+                        'evil-scroll-down))
+               (define-key evil-motion-state-map (kbd "C-d") nil))
+              ((and value
+                    (not (lookup-key evil-motion-state-map (kbd "C-d"))))
+               (define-key evil-motion-state-map (kbd "C-d")
+                           'evil-scroll-down))))))
+
+(defcustom evil-want-C-u-delete nil
+  "Whether `C-u' deletes back to indentation in insert state.
+Otherwise, `C-u' applies a prefix argument.  The binding of
+`C-u' mirrors Emacs behaviour by default due to the relative
+ubiquity of prefix arguments."
+  :type 'boolean
+  :group 'evil
+  :set #'(lambda (sym value)
+           (set-default sym value)
+           (when (and (boundp 'evil-insert-state-map)
+                      (boundp 'evil-replace-state-map))
+             (cond
+              ((and (not value)
+                    (eq (lookup-key evil-insert-state-map (kbd "C-u"))
+                        'evil-delete-back-to-indentation))
+               (define-key evil-insert-state-map (kbd "C-u") nil)
+               (define-key evil-replace-state-map (kbd "C-u") nil))
+              ((and value
+                    (not (lookup-key evil-insert-state-map (kbd "C-u"))))
+               (define-key evil-insert-state-map (kbd "C-u")
+                           'evil-delete-back-to-indentation)
+               (define-key evil-replace-state-map (kbd "C-u")
+                           'evil-delete-back-to-indentation))))))
+
+(defcustom evil-want-C-w-delete t
+  "Whether `C-w' deletes a word in Insert/Ex/Search state."
+  :type 'boolean
+  :group 'evil
+  :set (lambda (sym value)
+         (set-default sym value)
+         (when (and (boundp 'evil-insert-state-map)
+                    (boundp 'evil-replace-state-map))
+           (cond
+            ((and (not value)
+                  (eq (lookup-key evil-insert-state-map (kbd "C-w"))
+                      'evil-delete-backward-word))
+             (define-key evil-insert-state-map (kbd "C-w") 'evil-window-map)
+             (define-key evil-replace-state-map (kbd "C-w") 'evil-window-map))
+            ((and value
+                  (eq (lookup-key evil-insert-state-map (kbd "C-w"))
+                      'evil-window-map))
+             (define-key evil-insert-state-map (kbd "C-w") 'evil-delete-backward-word)
+             (define-key evil-replace-state-map (kbd "C-w") 'evil-delete-backward-word))))
+         (when (boundp 'evil-command-line-map)
+           (cond
+            ((and (not value)
+                  (eq (lookup-key evil-command-line-map (kbd "C-w"))
+                      'evil-delete-backward-word))
+             (define-key evil-command-line-map (kbd "C-w") nil))
+            ((and value
+                  (null (lookup-key evil-command-line-map (kbd "C-w"))))
+             (define-key evil-command-line-map (kbd "C-w") 'evil-delete-backward-word))))
+         (when (boundp 'evil-ex-search-keymap)
+           (cond
+            ((and (not value)
+                  (null (lookup-key evil-ex-search-keymap (kbd "C-w"))))
+             (define-key evil-ex-search-keymap (kbd "C-w") 'evil-search-yank-word))
+            ((and value
+                  (eq (lookup-key evil-ex-search-keymap (kbd "C-w"))
+                      'evil-search-yank-word))
+             (define-key evil-ex-search-keymap (kbd "C-w") nil))))))
+
+(defcustom evil-want-C-h-delete nil
+  "Whether `C-h' deletes a char in Insert state."
+  :type 'boolean
+  :group 'evil
+  :set #'(lambda (sym value)
+           (set-default sym value)
+           (when (and (boundp 'evil-insert-state-map)
+                      (boundp 'evil-replace-state-map))
+             (cond
+              ((and (not value)
+                    (eq (lookup-key evil-insert-state-map (kbd "C-h"))
+                        'evil-delete-backward-char-and-join))
+               (define-key evil-insert-state-map (kbd "C-h") nil)
+               (define-key evil-replace-state-map (kbd "C-h") nil))
+              ((and value
+                    (not (lookup-key evil-insert-state-map (kbd "C-h"))))
+               (define-key evil-insert-state-map (kbd "C-h")
+                           'evil-delete-backward-char-and-join)
+               (define-key evil-replace-state-map (kbd "C-h")
+                           'evil-replace-backspace))))))
+
+(defcustom evil-want-C-g-bindings nil
+  "Whether `C-g' postfix can be used in bindings."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-want-C-w-in-emacs-state nil
+  "Whether `C-w' prefixes windows commands in Emacs state."
+  :type 'boolean
+  :group 'evil
+  :set #'(lambda (sym value)
+           (set-default sym value)
+           (when (boundp 'evil-emacs-state-map)
+             (cond
+              ((and (not value)
+                    (eq (lookup-key evil-emacs-state-map (kbd "C-w"))
+                        'evil-window-map))
+               (define-key evil-emacs-state-map (kbd "C-w") nil))
+              ((and value
+                    (not (lookup-key evil-emacs-state-map (kbd "C-w"))))
+               (define-key evil-emacs-state-map (kbd "C-w") 'evil-window-map))))))
+
+(defcustom evil-want-change-word-to-end t
+  "Whether `cw' behaves like `ce'."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-want-Y-yank-to-eol nil
+  "Whether `Y' yanks to the end of the line.
+The default behavior is to yank the whole line, like Vim."
+  :group 'evil
+  :type 'boolean
+  :initialize #'evil-custom-initialize-pending-reset
+  :set #'(lambda (sym value)
+           (set-default sym value)
+           (evil-add-command-properties
+            'evil-yank-line
+            :motion (if value
+                        'evil-end-of-line-or-visual-line
+                      'evil-line-or-visual-line))))
+
+(defcustom evil-disable-insert-state-bindings nil
+  "Whether insert state bindings should be used.
+Bindings for escape, delete and `evil-toggle-key' are always
+available. If this is non-nil, default Emacs bindings are by and
+large accessible in insert state."
+  :group 'evil
+  :type 'boolean
+  :initialize #'evil-custom-initialize-pending-reset
+  :set #'(lambda (sym value)
+           (set-default sym value)
+           (evil-update-insert-state-bindings sym value)))
+
+(defcustom evil-echo-state t
+  "Whether to signal the current state in the echo area."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-complete-all-buffers t
+  "\\<evil-insert-state-map>
+Whether completion looks for matches in all buffers.
+This applies to \\[evil-complete-next] and \\[evil-complete-previous] \
+in insert state."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-search-wrap-ring-bell nil
+  "Whether to ring the bell when search wraps around the buffer."
+  :type  'boolean
+  :group 'evil)
+
+(defvar dabbrev-search-these-buffers-only)
+(defvar dabbrev-case-distinction)
+(defcustom evil-complete-next-func
+  #'(lambda (arg)
+      (require 'dabbrev)
+      (let ((dabbrev-search-these-buffers-only
+             (unless evil-complete-all-buffers
+               (list (current-buffer))))
+            dabbrev-case-distinction)
+        (condition-case nil
+            (if (eq last-command this-command)
+                (dabbrev-expand nil)
+              (dabbrev-expand (- (abs (or arg 1)))))
+          (error (dabbrev-expand nil)))))
+  "Completion function used by \
+\\<evil-insert-state-map>\\[evil-complete-next]."
+  :type 'function
+  :group 'evil)
+
+(defcustom evil-complete-previous-func
+  #'(lambda (arg)
+      (require 'dabbrev)
+      (let ((dabbrev-search-these-buffers-only
+             (unless evil-complete-all-buffers
+               (list (current-buffer))))
+            dabbrev-case-distinction)
+        (dabbrev-expand arg)))
+  "Completion function used by \
+\\<evil-insert-state-map>\\[evil-complete-previous]."
+  :type 'function
+  :group 'evil)
+
+(defcustom evil-complete-next-minibuffer-func 'minibuffer-complete
+  "Minibuffer completion function used by \
+\\<evil-insert-state-map>\\[evil-complete-next]."
+  :type 'function
+  :group 'evil)
+
+(defcustom evil-complete-previous-minibuffer-func 'minibuffer-complete
+  "Minibuffer completion function used by \
+\\<evil-insert-state-map>\\[evil-complete-previous]."
+  :type 'function
+  :group 'evil)
+
+(defcustom evil-complete-next-line-func
+  #'(lambda (arg)
+      (let ((hippie-expand-try-functions-list
+             '(try-expand-line
+               try-expand-line-all-buffers)))
+        (hippie-expand arg)))
+  "Minibuffer completion function used by \
+\\<evil-insert-state-map>\\[evil-complete-next-line]."
+  :type 'function
+  :group 'evil)
+
+(defcustom evil-complete-previous-line-func
+  evil-complete-next-line-func
+  "Minibuffer completion function used by \
+\\<evil-insert-state-map>\\[evil-complete-previous-line]."
+  :type 'function
+  :group 'evil)
+
+(defcustom evil-lookup-func #'woman
+  "Lookup function used by \
+\"\\<evil-motion-state-map>\\[evil-lookup]\"."
+  :type 'function
+  :group 'evil)
+
+(defcustom evil-toggle-key "C-z"
+  "The key used to change to and from Emacs state.
+Must be readable by `read-kbd-macro'. For example: \"C-z\"."
+  :type 'string
+  :group 'evil
+  :set #'(lambda (sym value)
+           (evil-set-toggle-key value)
+           (set-default sym value)))
+
+(defcustom evil-default-state 'normal
+  "The default Evil state.
+This is the state a buffer starts in when it is not otherwise
+configured (see `evil-set-initial-state' and
+`evil-buffer-regexps').  The value may be one of `normal',
+`insert', `visual', `replace', `operator', `motion' and `emacs'."
+  :type  'symbol
+  :group 'evil)
+
+(defcustom evil-buffer-regexps
+  '(("^ \\*load\\*" . nil))
+  "Regular expressions determining the initial state for a buffer.
+Entries have the form (REGEXP . STATE), where REGEXP is a regular
+expression matching the buffer's name and STATE is one of `normal',
+`insert', `visual', `replace', `operator', `motion', `emacs' and
+`nil'.  If STATE is `nil', Evil is disabled in the buffer."
+  :type '(alist :key-type string :value-type symbol)
+  :group 'evil)
+
+(defcustom evil-emacs-state-modes
+  '(5x5-mode
+    archive-mode
+    bbdb-mode
+    biblio-selection-mode
+    blackbox-mode
+    bookmark-bmenu-mode
+    bookmark-edit-annotation-mode
+    browse-kill-ring-mode
+    bs-mode
+    bubbles-mode
+    bzr-annotate-mode
+    calc-mode
+    cfw:calendar-mode
+    completion-list-mode
+    Custom-mode
+    custom-theme-choose-mode
+    debugger-mode
+    delicious-search-mode
+    desktop-menu-blist-mode
+    desktop-menu-mode
+    doc-view-mode
+    dun-mode
+    dvc-bookmarks-mode
+    dvc-diff-mode
+    dvc-info-buffer-mode
+    dvc-log-buffer-mode
+    dvc-revlist-mode
+    dvc-revlog-mode
+    dvc-status-mode
+    dvc-tips-mode
+    ediff-mode
+    ediff-meta-mode
+    efs-mode
+    Electric-buffer-menu-mode
+    emms-browser-mode
+    emms-mark-mode
+    emms-metaplaylist-mode
+    emms-playlist-mode
+    ess-help-mode
+    etags-select-mode
+    fj-mode
+    gc-issues-mode
+    gdb-breakpoints-mode
+    gdb-disassembly-mode
+    gdb-frames-mode
+    gdb-locals-mode
+    gdb-memory-mode
+    gdb-registers-mode
+    gdb-threads-mode
+    gist-list-mode
+    git-rebase-mode
+    gnus-article-mode
+    gnus-browse-mode
+    gnus-group-mode
+    gnus-server-mode
+    gnus-summary-mode
+    gomoku-mode
+    google-maps-static-mode
+    ibuffer-mode
+    jde-javadoc-checker-report-mode
+    magit-cherry-mode
+    magit-diff-mode
+    magit-log-mode
+    magit-log-select-mode
+    magit-popup-mode
+    magit-popup-sequence-mode
+    magit-process-mode
+    magit-reflog-mode
+    magit-refs-mode
+    magit-revision-mode
+    magit-stash-mode
+    magit-stashes-mode
+    magit-status-mode
+    mh-folder-mode
+    monky-mode
+    mpuz-mode
+    mu4e-main-mode
+    mu4e-headers-mode
+    mu4e-view-mode
+    notmuch-hello-mode
+    notmuch-search-mode
+    notmuch-show-mode
+    notmuch-tree-mode
+    occur-mode
+    org-agenda-mode
+    package-menu-mode
+    pdf-outline-buffer-mode
+    pdf-view-mode
+    proced-mode
+    rcirc-mode
+    rebase-mode
+    recentf-dialog-mode
+    reftex-select-bib-mode
+    reftex-select-label-mode
+    reftex-toc-mode
+    sldb-mode
+    slime-inspector-mode
+    slime-thread-control-mode
+    slime-xref-mode
+    snake-mode
+    solitaire-mode
+    sr-buttons-mode
+    sr-mode
+    sr-tree-mode
+    sr-virtual-mode
+    tar-mode
+    tetris-mode
+    tla-annotate-mode
+    tla-archive-list-mode
+    tla-bconfig-mode
+    tla-bookmarks-mode
+    tla-branch-list-mode
+    tla-browse-mode
+    tla-category-list-mode
+    tla-changelog-mode
+    tla-follow-symlinks-mode
+    tla-inventory-file-mode
+    tla-inventory-mode
+    tla-lint-mode
+    tla-logs-mode
+    tla-revision-list-mode
+    tla-revlog-mode
+    tla-tree-lint-mode
+    tla-version-list-mode
+    twittering-mode
+    urlview-mode
+    vc-annotate-mode
+    vc-dir-mode
+    vc-git-log-view-mode
+    vc-hg-log-view-mode
+    vc-svn-log-view-mode
+    vm-mode
+    vm-summary-mode
+    w3m-mode
+    wab-compilation-mode
+    xgit-annotate-mode
+    xgit-changelog-mode
+    xgit-diff-mode
+    xgit-revlog-mode
+    xhg-annotate-mode
+    xhg-log-mode
+    xhg-mode
+    xhg-mq-mode
+    xhg-mq-sub-mode
+    xhg-status-extra-mode)
+  "Modes that should come up in Emacs state."
+  :type  '(repeat symbol)
+  :group 'evil)
+
+(defcustom evil-insert-state-modes
+  '(comint-mode
+    erc-mode
+    eshell-mode
+    geiser-repl-mode
+    gud-mode
+    inferior-apl-mode
+    inferior-caml-mode
+    inferior-emacs-lisp-mode
+    inferior-j-mode
+    inferior-python-mode
+    inferior-scheme-mode
+    inferior-sml-mode
+    internal-ange-ftp-mode
+    haskell-interactive-mode
+    prolog-inferior-mode
+    racket-repl-mode
+    reb-mode
+    shell-mode
+    slime-repl-mode
+    term-mode
+    utop-mode
+    wdired-mode)
+  "Modes that should come up in Insert state."
+  :type  '(repeat symbol)
+  :group 'evil)
+
+(defcustom evil-motion-state-modes
+  '(apropos-mode
+    Buffer-menu-mode
+    calendar-mode
+    color-theme-mode
+    command-history-mode
+    compilation-mode
+    dictionary-mode
+    ert-results-mode
+    help-mode
+    Info-mode
+    Man-mode
+    speedbar-mode
+    undo-tree-visualizer-mode
+    woman-mode)
+  "Modes that should come up in Motion state."
+  :type  '(repeat symbol)
+  :group 'evil)
+
+(defvar evil-pending-overriding-maps nil
+  "An alist of pending overriding maps.")
+
+(defvar evil-pending-intercept-maps nil
+  "An alist of pending intercept maps.")
+
+(defcustom evil-overriding-maps '()
+  "Keymaps that should override Evil maps.
+Entries have the form (MAP-VAR . STATE), where MAP-VAR is
+a keymap variable and STATE is the state whose bindings
+should be overridden. If STATE is nil, all states are
+overridden."
+  :type '(alist :key-type symbol :value-type symbol)
+  :group 'evil
+  :set #'(lambda (var values)
+           (set-default var values)
+           (evil-set-custom-state-maps 'evil-overriding-maps
+                                       'evil-pending-overriding-maps
+                                       'override-state
+                                       'evil-make-overriding-map
+                                       values))
+  :initialize #'evil-custom-initialize-pending-reset)
+
+(add-hook 'after-load-functions #'evil-update-pending-maps)
+
+(defcustom evil-intercept-maps
+  '((edebug-mode-map . nil))
+  "Keymaps that should intercept Evil maps.
+Entries have the form (MAP-VAR . STATE), where MAP-VAR is
+a keymap variable and STATE is the state whose bindings
+should be intercepted. If STATE is nil, all states are
+intercepted."
+  :type '(alist :key-type symbol :value-type symbol)
+  :group 'evil
+  :set #'(lambda (var values)
+           (set-default var values)
+           (evil-set-custom-state-maps 'evil-intercept-maps
+                                       'evil-pending-intercept-maps
+                                       'intercept-state
+                                       'evil-make-intercept-map
+                                       values))
+  :initialize #'evil-custom-initialize-pending-reset)
+
+(defcustom evil-motions
+  '(back-to-indentation
+    backward-char
+    backward-list
+    backward-paragraph
+    backward-sentence
+    backward-sexp
+    backward-up-list
+    backward-word
+    beginning-of-buffer
+    beginning-of-defun
+    beginning-of-line
+    beginning-of-visual-line
+    c-beginning-of-defun
+    c-end-of-defun
+    diff-file-next
+    diff-file-prev
+    diff-hunk-next
+    diff-hunk-prev
+    down-list
+    end-of-buffer
+    end-of-defun
+    end-of-line
+    end-of-visual-line
+    exchange-point-and-mark
+    forward-char
+    forward-list
+    forward-paragraph
+    forward-sentence
+    forward-sexp
+    forward-word
+    goto-char
+    goto-last-change
+    ibuffer-backward-line
+    ibuffer-forward-line
+    isearch-abort
+    isearch-cancel
+    isearch-complete
+    isearch-del-char
+    isearch-delete-char
+    isearch-edit-string
+    isearch-exit
+    isearch-highlight-regexp
+    isearch-occur
+    isearch-other-control-char
+    isearch-other-meta-char
+    isearch-printing-char
+    isearch-query-replace
+    isearch-query-replace-regexp
+    isearch-quote-char
+    isearch-repeat-backward
+    isearch-repeat-forward
+    isearch-ring-advance
+    isearch-ring-retreat
+    isearch-toggle-case-fold
+    isearch-toggle-input-method
+    isearch-toggle-regexp
+    isearch-toggle-specified-input-method
+    isearch-toggle-word
+    isearch-yank-char
+    isearch-yank-kill
+    isearch-yank-line
+    isearch-yank-word-or-char
+    keyboard-quit
+    left-char
+    left-word
+    mouse-drag-region
+    mouse-save-then-kill
+    mouse-set-point
+    mouse-set-region
+    mwheel-scroll
+    move-beginning-of-line
+    move-end-of-line
+    next-error
+    next-line
+    paredit-backward
+    paredit-backward-down
+    paredit-backward-up
+    paredit-forward
+    paredit-forward-down
+    paredit-forward-up
+    pop-global-mark
+    pop-tag-mark
+    pop-to-mark-command
+    previous-error
+    previous-line
+    right-char
+    right-word
+    scroll-down
+    scroll-down-command
+    scroll-up
+    scroll-up-command
+    sgml-skip-tag-backward
+    sgml-skip-tag-forward
+    up-list)
+  "Non-Evil commands to initialize to motions."
+  :type  '(repeat symbol)
+  :group 'evil
+  :set #'evil-set-custom-motions
+  :initialize #'evil-custom-initialize-pending-reset)
+
+(defcustom evil-visual-newline-commands
+  '(LaTeX-section
+    TeX-font)
+  "Commands excluding the trailing newline of a Visual Line selection.
+These commands work better without this newline."
+  :type  '(repeat symbol)
+  :group 'evil
+  :set #'evil-set-visual-newline-commands
+  :initialize #'evil-custom-initialize-pending-reset)
+
+(defcustom evil-want-visual-char-semi-exclusive nil
+  "DEPRECATED.  Will be removed in a future version.
+Prefer to set `evil-v$-excludes-newline' to non-nil.
+
+Visual character selection to beginning/end of line is exclusive.
+If non nil then an inclusive visual character selection which
+ends at the beginning or end of a line is turned into an
+exclusive selection. Thus if the selected (inclusive) range ends
+at the beginning of a line it is changed to not include the first
+character of that line, and if the selected range ends at the end
+of a line it is changed to not include the newline character of
+that line."
+  :type 'boolean
+  :group 'evil)
+(make-obsolete-variable
+ 'evil-want-visual-char-semi-exclusive
+ "Semi-exclusivity prevents selecting text + 1st char of next line,
+without having to introduce new niche functionality.
+Prefer to set `evil-v$-excludes-newline' to non-nil."
+ "1.15.0")
+
+(defcustom evil-v$-excludes-newline nil
+  "If non-nil, `evil-end-of-line' does not move as far as to include
+the `\n' char at eol. This makes `v$' consistent with `$' used as a
+motion (e.g. `v$y' is consistent with `y$' in normal state)."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-text-object-change-visual-type t
+  "Text objects change the current visual state type.
+If non-nil then a text-object changes the type of the visual state to
+its default selection type (e.g. a word object always changes to
+charwise visual state). Otherwise the current visual state type is
+preserved."
+  :type 'boolean
+  :group 'evil)
+
+(defgroup evil-cjk nil
+  "CJK support"
+  :prefix "evil-cjk-"
+  :group 'evil)
+
+(defcustom evil-cjk-emacs-word-boundary nil
+  "Determine word boundary exactly the same way as Emacs does."
+  :type 'boolean
+  :group 'evil-cjk)
+
+(defcustom evil-cjk-word-separating-categories
+  '(;; Kanji
+    (?C . ?H) (?C . ?K) (?C . ?k) (?C . ?A) (?C . ?G)
+    ;; Hiragana
+    (?H . ?C) (?H . ?K) (?H . ?k) (?H . ?A) (?H . ?G)
+    ;; Katakana
+    (?K . ?C) (?K . ?H) (?K . ?k) (?K . ?A) (?K . ?G)
+    ;; half-width Katakana
+    (?k . ?C) (?k . ?H) (?k . ?K) ; (?k . ?A) (?k . ?G)
+    ;; full-width alphanumeric
+    (?A . ?C) (?A . ?H) (?A . ?K) ; (?A . ?k) (?A . ?G)
+    ;; full-width Greek
+    (?G . ?C) (?G . ?H) (?G . ?K) ; (?G . ?k) (?G . ?A)
+    )
+  "List of pair (cons) of categories to determine word boundary
+used in `evil-cjk-word-boundary-p'. See the documentation of
+`word-separating-categories'. Use `describe-categories' to see
+the list of categories."
+  :type '(alist :key-type (choice character (const nil))
+                :value-type (choice character (const nil)))
+  :group 'evil-cjk)
+
+(defcustom evil-cjk-word-combining-categories
+  '(;; default value in word-combining-categories
+    (nil . ?^) (?^ . nil)
+    ;; Roman
+    (?r . ?k) (?r . ?A) (?r . ?G)
+    ;; half-width Katakana
+    (?k . ?r) (?k . ?A) (?k . ?G)
+    ;; full-width alphanumeric
+    (?A . ?r) (?A . ?k) (?A . ?G)
+    ;; full-width Greek
+    (?G . ?r) (?G . ?k) (?G . ?A)
+    )
+  "List of pair (cons) of categories to determine word boundary
+used in `evil-cjk-word-boundary-p'. See the documentation of
+`word-combining-categories'. Use `describe-categories' to see the
+list of categories."
+  :type '(alist :key-type (choice character (const nil))
+                :value-type (choice character (const nil)))
+  :group 'evil-cjk)
+
+(defcustom evil-ex-complete-emacs-commands 'in-turn
+  "TAB-completion for Emacs commands in ex command line.
+This variable determines when Emacs commands are considered for
+completion, always, never, or only if no Evil ex command is
+available for completion."
+  :group 'evil
+  :type '(radio (const :tag "Only if no ex-command." :value in-turn)
+                (const :tag "Never" :value nil)
+                (const :tag "Always" :value t)))
+
+(defface evil-ex-commands '(( nil
+                              :underline t
+                              :slant italic))
+  "Face for the Evil command in completion in ex mode."
+  :group 'evil)
+
+(defface evil-ex-info '(( ((supports :slant))
+                          :slant italic
+                          :foreground "red"))
+  "Face for the info message in ex mode."
+  :group 'evil)
+
+(defcustom evil-ex-visual-char-range nil
+  "Type of default ex range in visual char state.
+If non-nil the default range when starting an ex command from
+character visual state is `<,`> otherwise it is '<,'>. In the
+first case the ex command will be passed a region covering only
+the visual selection. In the second case the passed region will
+be extended to contain full lines."
+  :group 'evil
+  :type 'boolean)
+
+(defvar evil--ex-global-active-p nil
+  "If the :global command is running.
+Used to change the behaviour of certain commands like :print.")
+
+(defvar evil--ex-print-accumulator ""
+  "Used by :print etc. to accumulate a string when invoked by :global etc.")
+
+;; Searching
+(defcustom evil-symbol-word-search nil
+  "If nil then * and # search for words otherwise for symbols."
+  :group 'evil
+  :type 'boolean)
+
+(defcustom evil-magic t
+  "Meaning which characters in a pattern are magic.
+The meaning of those values is the same as in Vim. Note that it
+only has influence if the Evil search module is chosen in
+`evil-search-module'."
+  :group 'evil
+  :type '(radio (const :tag "Very magic." :value very-magic)
+                (const :tag "Magic" :value t)
+                (const :tag "Nomagic" :value nil)
+                (const :tag "Very nomagic" :value very-nomagic)))
+
+(defcustom evil-ex-search-vim-style-regexp nil
+  "If non-nil Vim-style backslash codes are supported in search patterns.
+See `evil-transform-vim-style-regexp' for the supported backslash
+codes.  Note that this only affects the search command if
+`evil-search-module' is set to `evil-search'.  The isearch module
+always uses plain Emacs regular expressions."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-ex-interactive-search-highlight 'all-windows
+  "Determine in which windows the interactive highlighting should be shown."
+  :type '(radio (const :tag "All windows." all-windows)
+                (const :tag "Selected window." selected-window)
+                (const :tag "Disable highlighting." nil))
+  :group 'evil)
+
+(defcustom evil-ex-search-persistent-highlight t
+  "If non-nil matches remain highlighted when the search ends."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-ex-search-case 'smart
+  "The case behaviour of the search command.
+Smart case means that the pattern is case sensitive if and only
+if it contains an upper case letter, otherwise it is case
+insensitive."
+  :type '(radio (const :tag "Case sensitive." sensitive)
+                (const :tag "Case insensitive." insensitive)
+                (const :tag "Smart case." smart))
+  :group 'evil)
+
+(defcustom evil-ex-substitute-case nil
+  "The case behaviour of the search command.
+Smart case means that the pattern is case sensitive if and only
+if it contains an upper case letter, otherwise it is case
+insensitive. If nil then the setting of `evil-ex-search-case' is
+used."
+  :type '(radio (const :tag "Same as interactive search." nil)
+                (const :tag "Case sensitive." sensitive)
+                (const :tag "Case insensitive." insensitive)
+                (const :tag "Smart case." smart))
+  :group 'evil)
+
+(defcustom evil-ex-search-interactive t
+  "If t search is interactive."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-ex-search-incremental t
+  "If t, use incremental search. Note that this only affects the
+search command if `evil-search-module' is set to `evil-search'."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-ex-search-highlight-all t
+  "If t and interactive search is enabled, all matches are
+highlighted."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-ex-substitute-highlight-all t
+  "If t all matches for the substitute pattern are highlighted."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-ex-substitute-interactive-replace t
+  "If t and substitute patterns are highlighted,
+the replacement is shown interactively."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-ex-substitute-global nil
+  "If non-nil substitute patterns are global by default.
+Standardly (if this variable is nil) a substitution works only on the
+first match of the pattern in a line unless the \"g\" flag is
+given, in which case the substitution happens on all matches in the
+line. If this option is non-nil, this behavior is reversed."
+  :type  'boolean
+  :group 'evil)
+
+(defface evil-ex-search '((t :inherit isearch))
+  "Face for interactive search."
+  :group 'evil)
+
+(defface evil-ex-lazy-highlight '((t :inherit lazy-highlight))
+  "Face for highlighting all matches in interactive search."
+  :group 'evil)
+
+(defface evil-ex-substitute-matches '((t :inherit lazy-highlight))
+  "Face for interactive substitute matches."
+  :group 'evil)
+
+(defface evil-ex-substitute-replacement '((((supports :underline))
+                                           :underline t
+                                           :foreground "red"))
+  "Face for interactive replacement text."
+  :group 'evil)
+
+(defcustom evil-command-window-height 7
+  "Height (in lines) of the command line window.
+Set to 0 to use the default height for `split-window'."
+  :type 'integer
+  :group 'evil)
+
+(defcustom evil-display-shell-error-in-message nil
+  "Show error output of a shell command in the error buffer.
+If this variable is non-nil the error output of a shell command
+goes to the messages buffer instead of being mixed with the
+regular output. This happens only if the exit status of the
+command is non-zero."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-want-abbrev-expand-on-insert-exit t
+  "If non-nil abbrevs will be expanded when leaving insert state
+like in Vim, if `abbrev-mode' is on."
+  :type 'boolean
+  :group 'evil)
+
+;;; Variables
+
+(defmacro evil-define-local-var (symbol &optional initvalue docstring)
+  "Define SYMBOL as permanent buffer local variable, and return SYMBOL.
+The parameters are the same as for `defvar', but the variable
+SYMBOL is made permanent buffer local."
+  (declare (indent defun)
+           (doc-string 3)
+           (debug (symbolp &optional form stringp)))
+  `(progn
+     (defvar ,symbol ,initvalue ,docstring)
+     (make-variable-buffer-local ',symbol)
+     (put ',symbol 'permanent-local t)))
+
+(evil-define-local-var evil-scroll-count 0
+  "Hold last used prefix for `evil-scroll-up'
+and `evil-scroll-down'.
+Determine how many lines should be scrolled.
+Default value is 0 - scroll half the screen.")
+
+(evil-define-local-var evil-state nil
+  "The current Evil state.
+To change the state, use `evil-change-state'
+or call the state function (e.g., `evil-normal-state').")
+
+;; these may be used inside `evil-define-state'
+(evil-define-local-var evil-next-state nil
+  "The Evil state being switched to.")
+
+(evil-define-local-var evil-previous-state-alist nil
+  "For Each evil state the Evil state being switched from.")
+
+(evil-define-local-var evil-previous-state nil
+  "The Evil state being switched from.")
+
+(defvar evil-execute-in-emacs-state-buffer nil
+  "The buffer of the latest `evil-execute-in-emacs-state'.
+When this command is being executed the current buffer is stored
+in this variable. This is necessary in case the Emacs-command to
+be called changes the current buffer.")
+
+(evil-define-local-var evil-mode-line-tag nil
+  "Mode-Line indicator for the current state.")
+(put 'evil-mode-line-tag 'risky-local-variable t)
+
+(defvar evil-global-keymaps-alist nil
+  "Association list of keymap variables.
+Entries have the form (MODE . KEYMAP), where KEYMAP
+is the variable containing the keymap for MODE.")
+
+(defvar evil-local-keymaps-alist nil
+  "Association list of keymap variables that must be
+reinitialized in each buffer. Entries have the form
+\(MODE . KEYMAP), where KEYMAP is the variable containing
+the keymap for MODE.")
+
+(defvar evil-minor-mode-keymaps-alist nil
+  "Association list of Evil states to minor-mode keymap alists.
+Entries have the form (STATE . MODE-MAP-ALIST), where
+MODE-MAP-ALIST is an alist taking the form of
+`minor-mode-map-alist'.")
+
+(defvar evil-state-properties nil
+  "Specifications made by `evil-define-state'.
+Entries have the form (STATE . PLIST), where PLIST is a property
+list specifying various aspects of the state. To access a property,
+use `evil-state-property'.")
+
+(evil-define-local-var evil-mode-map-alist nil
+  "Association list of keymaps to use for Evil modes.
+Elements have the form (MODE . KEYMAP), with the first keymaps
+having higher priority.")
+
+(defvar evil-change-commands '(evil-change)
+  "Commands that wrap or replace `evil-change'.
+This list exists to apply an inconsistency with vim's change command
+to commands that wrap or redefine it. See emacs-evil/evil#916.")
+
+(defvar evil-transient-vars '(cua-mode transient-mark-mode select-active-regions)
+  "List of variables pertaining to Transient Mark mode.")
+
+(defvar evil-transient-vals nil
+  "Association list of old values for Transient Mark mode variables.
+Entries have the form (VARIABLE VALUE LOCAL), where LOCAL is
+whether the variable was previously buffer-local.")
+
+(defvar evil-no-display nil
+  "If non-nil, various Evil displays are inhibited.
+Use the macro `evil-without-display' to set this variable.")
+
+(defvar evil-type-properties nil
+  "Specifications made by `evil-define-type'.
+Entries have the form (TYPE . PLIST), where PLIST is a property
+list specifying functions for handling the type: expanding it,
+describing it, etc.")
+
+(defvar evil-interactive-alist nil
+  "Association list of Evil-specific interactive codes.")
+
+(evil-define-local-var evil-motion-marker nil
+  "Marker for storing the starting position of a motion.")
+
+(evil-define-local-var evil-this-type nil
+  "Current motion type.")
+
+(evil-define-local-var evil-this-type-modified nil
+  "Non-nil iff current motion type has been modified by the user.
+If the type has been modified, this variable contains the new
+type.")
+
+(evil-define-local-var evil-this-register nil
+  "Current register.")
+
+(defvar evil-last-=-register-input nil
+  "Most recent input from the `=' register. A string.")
+
+(defvar evil-this-macro nil
+  "Current macro register.")
+
+(evil-define-local-var evil-this-operator nil
+  "Current operator.")
+
+(evil-define-local-var evil-this-motion nil
+  "Current motion.")
+
+(evil-define-local-var evil-this-motion-count nil
+  "Current motion count.")
+
+;; In light of `evil-last-recorded-register' this should probably
+;; be renamed to `evil-last-executed-register' but that may break configs
+(defvar evil-last-register nil
+  "The last executed register.")
+
+(defvar evil-last-recorded-register nil
+  "The last recorded register.")
+
+(defvar evil-inhibit-operator nil
+  "Inhibit current operator.
+If an operator calls a motion and the motion sets this variable
+to t, the operator code is not executed.")
+
+(defvar evil-inhibit-operator-value nil
+  "This variable is used to transfer the value
+of `evil-inhibit-operator' from one local scope to another.")
+
+;; used by `evil-define-operator'
+(defvar evil-operator-range-beginning nil
+  "Beginning of `evil-operator-range'.")
+
+(defvar evil-operator-range-end nil
+  "End of `evil-operator-range'.")
+
+(defvar evil-operator-range-type nil
+  "Type of `evil-operator-range'.")
+
+(defvar evil-operator-range-motion nil
+  "Motion of `evil-operator-range'.")
+
+(defvar evil-operator-start-col nil
+  "Used to restore column (where possible) after an operator has moved it.")
+
+(defvar evil-restriction-stack nil
+  "List of previous restrictions.
+Using `evil-with-restriction' stores the previous values of
+`point-min' and `point-max' as a pair in this list.")
+
+(evil-define-local-var evil-markers-alist
+  '((?\( . evil-backward-sentence-begin)
+    (?\) . evil-forward-sentence-begin)
+    (?{ . evil-backward-paragraph)
+    (?} . evil-forward-paragraph)
+    (?' . evil-jump-backward-swap)
+    (?` . evil-jump-backward-swap)
+    (?< . evil-visual-beginning)
+    (?> . evil-visual-goto-end)
+    (?. . (lambda ()
+            (let (last-command)
+              (goto-last-change nil)))))
+  "Association list for markers.
+Entries have the form (CHAR . DATA), where CHAR is the marker's
+name and DATA is either a marker object as returned by `make-marker',
+a variable, a movement function, or a cons cell (STRING NUMBER),
+where STRING is a file path and NUMBER is a buffer position.
+The global value of this variable holds markers available from
+every buffer, while the buffer-local value holds markers available
+only in the current buffer.")
+
+(defconst evil-suppress-map (make-keymap)
+  "Full keymap disabling default bindings to `self-insert-command'.")
+(suppress-keymap evil-suppress-map t)
+
+(defvar evil-read-key-map (make-sparse-keymap)
+  "Keymap active during `evil-read-key'.
+This keymap can be used to bind some commands during the
+execution of `evil-read-key' which is usually used to read a
+character argument for some commands, e.g. `evil-replace'.")
+
+;; TODO: customize size of ring
+(defvar evil-repeat-ring (make-ring 10)
+  "A ring of repeat-informations to repeat the last command.")
+
+(defvar evil-recording-repeat nil
+  "Whether we are recording a repeat.")
+
+(defvar evil-recording-current-command nil
+  "Whether we are recording the current command for repeat.")
+
+(defvar evil-repeat-changes nil
+  "Accumulated buffer changes in reverse order for change-tracking commands.")
+
+(defvar evil-repeat-info nil
+  "Information accumulated during current repeat.")
+
+(defvar evil-repeat-buffer nil
+  "The buffer in which the repeat started.
+If the buffer is changed, the repeat is cancelled.")
+
+(defvar evil-repeat-pos nil
+  "The point position at the start of a change-tracking command.")
+
+(defvar evil-repeat-keys nil
+  "The keys that invoked the current command.")
+
+(defvar evil-last-repeat nil
+  "Information about the latest repeat command.
+This is a list of three elements (POINT COUNT UNDO-POINTER),
+where POINT is the position of point before the latest repeat,
+COUNT the count-argument of the latest repeat command and
+UNDO-POINTER the head of the undo-list before the last command
+has been repeated.")
+
+(defvar evil-repeat-count nil
+  "The explicit count when repeating a command.")
+
+(defvar evil-maybe-remove-spaces nil
+  "Flag to determine if newly inserted spaces should be removed.
+See the function `evil-maybe-remove-spaces'.")
+
+(evil-define-local-var evil-insert-count nil
+  "The explicit count passed to a command starting Insert or Replace state.")
+
+(evil-define-local-var evil-insert-vcount nil
+  "The information about the number of following lines the
+insertion should be repeated. This is list (LINE COLUMN COUNT)
+where LINE is the line-number where the original insertion
+started and COLUMN is either a number or function determining the
+column where the repeated insertions should take place. COUNT is
+number of repeats (including the original insertion).")
+
+(defvar evil-insert-skip-empty-lines nil
+  "Non-nil of the current insertion should not take place on
+  lines at which the insertion point is behind the end of the
+  line.")
+
+(evil-define-local-var evil-insert-lines nil
+  "Non-nil if the current insertion command is a line-insertion
+command o or O.")
+
+(evil-define-local-var evil-insert-repeat-info nil
+  "Repeat information accumulated during an insertion.")
+
+(evil-define-local-var evil-replace-alist nil
+  "Association list of characters overwritten in Replace state.
+The format is (POS . CHAR).")
+
+(evil-define-local-var evil-echo-area-message nil
+  "Previous value of `current-message'.")
+
+(defvar evil-write-echo-area nil
+  "If set to t inside `evil-save-echo-area', then the echo area
+is not restored.")
+
+(defvar evil-last-find nil
+  "A pair (FUNCTION . CHAR) describing the lastest character
+  search command.")
+
+(defvar evil-last-paste nil
+  "Information about the latest paste.
+This should be a list (CMD COUNT POINT BEG END FIRSTVISUAL) where
+CMD is the last paste-command (`evil-paste-before',
+`evil-paste-after' or `evil-visual-paste'), COUNT is the repeat
+count of the paste, POINT is the position of point before the
+paste, BEG end END are the region of the inserted
+text. FIRSTVISUAL is t if and only if the previous command was
+the first visual paste (i.e. before any paste-pop).")
+
+(evil-define-local-var evil-last-undo-entry nil
+  "Information about the latest undo entry in the buffer.
+This should be a pair (OBJ . CONS) where OBJ is the entry as an
+object, and CONS is a copy of the entry.")
+
+(evil-define-local-var evil-current-insertion nil
+  "Information about the latest insertion in insert state.
+This should be a pair (BEG . END) that describes the
+buffer-region of the newly inserted text.")
+
+(defvar evil-last-insertion nil
+  "The last piece of inserted text.")
+
+(defvar evil-last-small-deletion nil
+  "The last piece of deleted text.
+The text should be less than a line.")
+
+(defvar evil-was-yanked-without-register t
+  "Whether text being saved to the numbered-register ring was
+not deleted and not yanked to a specific register.")
+
+(defvar evil-paste-count nil
+  "The count argument of the current paste command.")
+
+(defvar evil--cursor-after nil
+  "Internal flag for gp & gP.")
+
+(defvar evil-temporary-undo nil
+  "When undo is disabled in current buffer.
+Certain commands depending on undo use this variable
+instead of `buffer-undo-list'.")
+
+(evil-define-local-var evil-undo-list-pointer nil
+  "Everything up to this mark is united in the undo-list.")
+
+(defvar evil-in-single-undo nil
+  "Set to non-nil if the current undo steps are connected.")
+
+(defvar evil-flash-timer nil
+  "Timer for flashing search results.")
+
+(defvar evil-search-prompt nil
+  "String to use for search prompt.")
+
+(defvar evil-search-forward-history nil
+  "History of forward searches.")
+
+(defvar evil-search-backward-history nil
+  "History of backward searches.")
+
+(defvar evil-inner-text-objects-map (make-sparse-keymap)
+  "Keymap for inner text objects.")
+
+(defvar evil-outer-text-objects-map (make-sparse-keymap)
+  "Keymap for outer text objects.")
+
+(defvar evil-window-map (make-sparse-keymap)
+  "Keymap for window-related commands.")
+
+(evil-define-local-var evil-input-method nil
+  "Input method used in Insert state and Emacs state.")
+
+;;; Visual state
+
+(evil-define-local-var evil-visual-beginning nil
+  "The beginning of the Visual selection, a marker.")
+
+(evil-define-local-var evil-visual-end nil
+  "The end of the Visual selection, a marker.")
+
+(evil-define-local-var evil-visual-point nil
+  "The position of point in Visual state, a marker.")
+
+(evil-define-local-var evil-visual-mark nil
+  "The position of mark in Visual state, a marker.")
+
+(evil-define-local-var evil-visual-selection nil
+  "The kind of Visual selection.
+This is a selection as defined by `evil-define-visual-selection'.")
+
+(evil-define-local-var evil-prev-visual-point nil
+  "The previous position of point in Visual state, a marker.")
+
+(evil-define-local-var evil-prev-visual-mark nil
+  "The previous position of mark in Visual state, a marker.")
+
+(evil-define-local-var evil-prev-visual-selection nil
+  "The previous kind of Visual selection.
+This is a selection as defined by `evil-define-visual-selection'.")
+
+;; we could infer the direction by comparing `evil-visual-mark'
+;; and `evil-visual-point', but destructive operations may
+;; displace the markers
+(evil-define-local-var evil-visual-direction 0
+  "Whether point follows mark in Visual state.
+Negative if point precedes mark, otherwise positive.
+See also the function `evil-visual-direction'.")
+
+(evil-define-local-var evil-visual-properties nil
+  "Property list of miscellaneous Visual properties.")
+
+(evil-define-local-var evil-visual-region-expanded nil
+  "Whether the region matches the Visual selection.
+That is, whether the positions of point and mark have been
+expanded to coincide with the selection's boundaries.
+This makes the selection available to functions acting
+on Emacs' region.")
+
+(defvar evil-transient-mouse-selection nil
+  "Whether the region selected by the mouse is discarded by the next command.
+By default, the region is not discarded.  If non-nil, exit visual state
+immediately before the next command.  To use the region selected by the mouse,
+execute a command which would usually enter visual state, such as
+\\[evil-visual-char] or \\[evil-visual-block].")
+
+(defvar evil--region-from-mouse nil
+  "Whether the region was set by the mouse.")
+
+(evil-define-local-var evil-visual-overlay nil
+  "Overlay for highlighting the Visual selection.
+Not used for blockwise selections, in which case
+see `evil-visual-block-overlays'.")
+
+(evil-define-local-var evil-visual-block-overlays nil
+  "Overlays for Visual Block selection, one for each line.
+They are reused to minimize flicker.")
+
+(defvar evil-visual-alist nil
+  "Association list of Visual selection functions.
+Elements have the form (NAME . FUNCTION).")
+
+(evil-define-local-var evil-visual-x-select-timer nil
+  "Timer for updating the X selection in visual state.")
+
+(defvar evil-visual-x-select-timeout 0.1
+  "Time in seconds for the update of the X selection.")
+
+(declare-function origami-open-all-nodes "ext:origami.el")
+(declare-function origami-close-all-nodes "ext:origami.el")
+(declare-function origami-toggle-node "ext:origami.el")
+(declare-function origami-open-node "ext:origami.el")
+(declare-function origami-open-node-recursively "ext:origami.el")
+(declare-function origami-close-node "ext:origami.el")
+
+(defvar evil-fold-list
+  `(((vdiff-mode)
+     :open-all   vdiff-open-all-folds
+     :close-all  vdiff-close-all-folds
+     :toggle     ,(lambda () (call-interactively 'vdiff-toggle-fold))
+     :open       ,(lambda () (call-interactively 'vdiff-open-fold))
+     :open-rec   ,(lambda () (call-interactively 'vdiff-open-fold))
+     :close      ,(lambda () (call-interactively 'vdiff-close-fold)))
+    ((vdiff-3way-mode)
+     :open-all   vdiff-open-all-folds
+     :close-all  vdiff-close-all-folds
+     :toggle     ,(lambda () (call-interactively 'vdiff-toggle-fold))
+     :open       ,(lambda () (call-interactively 'vdiff-open-fold))
+     :open-rec   ,(lambda () (call-interactively 'vdiff-open-fold))
+     :close      ,(lambda () (call-interactively 'vdiff-close-fold)))
+    ((hs-minor-mode)
+     :open-all   hs-show-all
+     :close-all  hs-hide-all
+     :toggle     hs-toggle-hiding
+     :open       hs-show-block
+     :open-rec   nil
+     :close      hs-hide-block)
+    ((hide-ifdef-mode)
+     :open-all   show-ifdefs
+     :close-all  hide-ifdefs
+     :toggle     nil
+     :open       show-ifdef-block
+     :open-rec   nil
+     :close      hide-ifdef-block)
+    ((outline-mode
+      outline-minor-mode
+      org-mode
+      markdown-mode)
+     :open-all   show-all
+     :close-all  ,(lambda ()
+                    (with-no-warnings (hide-sublevels 1)))
+     :toggle     outline-toggle-children
+     :open       ,(lambda ()
+                    (with-no-warnings
+                      (show-entry)
+                      (show-children)))
+     :open-rec   show-subtree
+     :close      hide-subtree)
+    ((origami-mode)
+     :open-all   ,(lambda () (origami-open-all-nodes (current-buffer)))
+     :close-all  ,(lambda () (origami-close-all-nodes (current-buffer)))
+     :toggle     ,(lambda () (origami-toggle-node (current-buffer) (point)))
+     :open       ,(lambda () (origami-open-node (current-buffer) (point)))
+     :open-rec   ,(lambda () (origami-open-node-recursively (current-buffer) (point)))
+     :close      ,(lambda () (origami-close-node (current-buffer) (point)))))
+  "Actions to be performed for various folding operations.
+
+The value should be a list of fold handlers, were a fold handler has
+the format:
+
+  ((MODES) PROPERTIES)
+
+MODES acts as a predicate, containing the symbols of all major or
+minor modes for which the handler should match.  For example:
+
+  \\='((outline-minor-mode org-mode) ...)
+
+would match for either outline-minor-mode or org-mode, even though the
+former is a minor mode and the latter is a major.
+
+PROPERTIES specifies possible folding actions and the functions to be
+applied in the event of a match on one (or more) of the MODES; the
+supported properties are:
+
+  - `:open-all'
+    Open all folds.
+  - `:close-all'
+    Close all folds.
+  - `:toggle'
+    Toggle the display of the fold at point.
+  - `:open'
+    Open the fold at point.
+  - `:open-rec'
+    Open the fold at point recursively.
+  - `:close'
+    Close the fold at point.
+
+Each value must be a function.  A value of `nil' will cause the action
+to be ignored for that respective handler.  For example:
+
+  `((org-mode)
+     :close-all  nil
+     :open       ,(lambda ()
+                    (show-entry)
+                    (show-children))
+     :close      hide-subtree)
+
+would ignore `:close-all' actions and invoke the provided functions on
+`:open' or `:close'.")
+
+;;; Ex
+
+(define-obsolete-variable-alias 'evil-ex-map 'evil-ex-shortcut-map "1.15.0")
+(defvar evil-ex-shortcut-map (make-sparse-keymap)
+  "Keymap for Ex.
+Key sequences bound in this map are immediately executed.")
+
+;; Intentionally does not inherit from `minibuffer-local-map', as users
+;; are encouraged to instead set this as the parent of that keymap.
+(defvar evil-command-line-map (make-sparse-keymap)
+  "Keymap used for the various Evil command-lines.
+Modifying this keymap corresponds to using the \":cmap\" Vim command.
+See `evil-ex-completion-map' and `evil-ex-search-keymap' which inherit
+from this keymap.")
+
+(defvar evil-ex-completion-map (make-sparse-keymap)
+  "Keymap for Ex.")
+
+(defvar evil-ex-initial-input nil
+  "Additional initial content of the Ex command line.
+This content of this variable is appended to the Ex command line
+when Ex is started interactively.")
+
+(defvar evil-ex-history nil
+  "History of Ex commands.")
+
+(define-obsolete-variable-alias
+  'evil-ex-current-buffer 'evil-ex-original-buffer "1.15.0")
+(defvar evil-ex-original-buffer nil
+  "Buffer that was current when the Evil command line was started.")
+
+(defvar evil-ex-point nil
+  "The point position when the Ex command was called.")
+
+(defvar evil-called-from-ex-p nil
+  "Non-nil if a command is currently being called as an Ex command.")
+
+(defvar evil-ex-range nil
+  "The current range of the Ex command.")
+
+(defvar evil-ex-bang nil
+  "The \"!\" argument of the current Ex command.")
+
+(defvar evil-ex-argument nil
+  "The current argument of the Ex command.")
+
+(defvar evil-previous-shell-command nil
+  "The last shell command.")
+
+;; Eval
+(defvar evil-eval-history nil
+  "History of eval input, from the `=' register.")
+
+(defvar evil-eval-map (make-sparse-keymap)
+  "Keymap for eval input.")
+
+;; Searching
+(defvar evil-ex-search-history nil
+  "The history for the search command.")
+
+(defvar evil-ex-search-direction nil
+  "The direction of the current search, either `forward' or `backward'.")
+
+(defvar evil-ex-search-count nil
+  "The count of the current search.")
+
+(defvar evil-ex-search-start-point nil
+  "The point where the search started.")
+
+(defvar evil-ex-search-overlay nil
+  "The overlay for the current search result.")
+
+(defvar evil-ex-search-pattern nil
+  "The last search pattern.")
+
+(defvar evil-ex-search-offset nil
+  "The last search offset.")
+
+(defvar evil-ex-search-match-beg nil
+  "The beginning position of the last match.")
+
+(defvar evil-ex-search-match-end nil
+  "The end position of the last match.")
+
+(defvar evil-ex-substitute-pattern nil
+  "The last substitute pattern.")
+
+(defvar evil-ex-substitute-replacement nil
+  "The last substitute replacement.")
+
+(defvar evil-ex-substitute-flags nil
+  "The last substitute flags.")
+
+(defvar evil-ex-substitute-current-replacement nil
+  "The actual replacement.")
+
+(defvar evil-ex-last-was-search nil
+  "Non-nil if the previous was a search.
+Otherwise the previous command is assumed as substitute.")
+
+;; The lazy-highlighting framework
+(evil-define-local-var evil-ex-active-highlights-alist nil
+  "An alist of currently active highlights.")
+
+(evil-define-local-var evil-ex-hl-update-timer nil
+  "Time used for updating highlights.")
+
+(defvar evil-ex-search-keymap (make-sparse-keymap)
+  "Keymap used in ex-search-mode.")
+
+(defcustom evil-want-empty-ex-last-command t
+  "Whether to default to evil-ex-previous-command at empty ex prompt."
+  :type 'boolean
+  :group 'evil)
+
+(defconst evil-version
+  (eval-when-compile
+    (with-temp-buffer
+      (let ((dir (file-name-directory (or load-file-name
+                                          byte-compile-current-file))))
+        ;; git repository
+        (if (and (file-exists-p (concat dir "/.git"))
+                 (ignore-errors
+                   (zerop (call-process "git" nil '(t nil) nil
+                                        "rev-parse"
+                                        "--short" "HEAD"))))
+            (progn
+              (goto-char (point-min))
+              (concat "evil-git-"
+                      (buffer-substring (point-min)
+                                        (line-end-position))))
+          ;; no repo, use plain version
+          "1.15.0"))))
+  "The current version of Evil")
+
+(defcustom evil-want-integration t
+  "Whether to load evil-integration.el.
+This variable must be set before Evil is loaded."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-want-keybinding t
+  "Whether to load evil-keybindings.el.
+
+This loads a set of keybindings for evil in other modes as well as
+setting the initial evil state in those modes.
+
+This variable must be set before evil is loaded."
+  :type 'boolean
+  :group 'evil)
+
+(defcustom evil-want-minibuffer nil
+  "Whether to enable Evil in minibuffer(s)."
+  :type 'boolean
+  :group 'evil
+  :set #'(lambda (sym value)
+           (set-default sym value)
+           (if value
+               (add-hook 'minibuffer-setup-hook 'evil-initialize)
+             (remove-hook 'minibuffer-setup-hook 'evil-initialize))))
+
+(defun evil--redo-placeholder (_count)
+  (user-error "Customize `evil-undo-system' for redo functionality."))
+
+(defvar evil-undo-function #'undo
+  "Function to be used by `evil-undo'.
+Customized via `evil-undo-system'.")
+
+(defvar evil-redo-function #'evil--redo-placeholder
+  "Function to be used by `evil-redo'.
+Customized via `evil-undo-system'.")
+
+(defun evil-set-undo-system (system)
+  "Set `evil-undo-function' and `evil-redo-function' by SYSTEM."
+  (cond
+   ((not system)
+    (setq evil-undo-function #'undo
+          evil-redo-function #'evil--redo-placeholder))
+   ((eq system 'undo-redo)
+    (setq evil-undo-function #'undo-only
+          evil-redo-function #'undo-redo))
+   ((eq system 'undo-tree)
+    (setq evil-undo-function 'undo-tree-undo
+          evil-redo-function 'undo-tree-redo))
+   ((eq system 'undo-fu)
+    (setq evil-undo-function 'undo-fu-only-undo
+          evil-redo-function 'undo-fu-only-redo))
+   (t (error "Unknown undo system `%s'" system))))
+
+(defcustom evil-undo-system nil
+  "Undo system Evil should use.
+If equal to `undo-tree' or `undo-fu', those packages must be
+installed.  If equal to `undo-tree', `undo-tree-mode' must also be
+activated.  If equal to `undo-redo', Evil uses commands natively
+available in Emacs 28."
+  :type '(choice (const :tag "Vanilla undo" nil)
+                 (const undo-redo)
+                 (const undo-tree)
+                 (const undo-fu))
+  :group 'evil
+  :set #'(lambda (sym value)
+           (evil-set-undo-system value)
+           (set-default sym value)))
+
+(defcustom evil-visual-update-x-selection-p t
+  "Whether to update the X PRIMARY selection with the current visual region."
+  :type  'boolean
+  :group 'evil)
+
+(defun evil-version ()
+  (interactive)
+  (message "Evil version %s" evil-version))
+
+(provide 'evil-vars)
+
+;;; evil-vars.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil-vars.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-vars.elc
new file mode 100644
index 0000000..7d1616c
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil-vars.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil.el b/emacs/.emacs.d/elpa/evil-20260728.1438/evil.el
new file mode 100644
index 0000000..48019d3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil.el
@@ -0,0 +1,159 @@
+;;; evil.el --- Extensible vi layer  -*- lexical-binding: t; -*-
+
+;; The following list of authors was kept up to date until the beginning of
+;; 2017, when evil moved under new maintainers. For authors since then, please
+;; consult the git logs.
+
+;;      Alessandro Piras <laynor at gmail.com>
+;;      Alexander Baier <alexander.baier at mailbox.org>
+;;      Antono Vasiljev <antono.vasiljev at gmail.com>
+;;      Bailey Ling <bling at live.ca>
+;;      Barry O'Reilly <gundaetiapo at gmail.com>
+;;      Christoph Lange <langec at web.de>
+;;      Daniel Reiter <danieltreiter at gmail.com>
+;;      Eivind Fonn <evfonn at gmail.com>
+;;      Emanuel Evans <emanuel.evans at gmail.com>
+;;      Eric Siegel <siegel.eric at gmail.com>
+;;      Eugene Yaremenko <w3techplayground at gmail.com>
+;;      Frank Fischer <frank-fischer at shadow-soft.de>
+;;      Frank Terbeck <ft at bewatermyfriend.org>
+;;      Gordon Gustafson <gordon3.14 at gmail.com>
+;;      Herbert Jones <jones.herbert at gmail.com>
+;;      Jonas Bernoulli <jonas at bernoul.li>
+;;      Jonathan Claggett <jclaggett at lonocloud.com>
+;;      José A. Romero L. <escherdragon at gmail.com>
+;;      Justin Burkett <justin at burkett.cc>
+;;      Lars Andersen <expez at expez.com>
+;;      Lintaro Ina <tarao.gnn at gmail.com>
+;;      Lukasz Wrzosek <wrzoski at mail.com>
+;;      Marian Schubert <maio at netsafe.cz>
+;;      Matthew Malcomson <>
+;;      Michael Markert <markert.michael at googlemail.com>
+;;      Mike Gerwitz <mikegerwitz at gnu.org>
+;;      Nikolai Weibull <now at bitwi.se>
+;;      phaebz <phaebz at gmail.com>
+;;      ralesi <scio62 at gmail.com>
+;;      Rodrigo Setti <rodrigosetti at gmail.com>
+;;      Sanel Zukan <sanelz at gmail.com>
+;;      Sarah Brofeldt <sarah at thinkmonster.(none)>
+;;      Simon Hafner <hafnersimon at gmail.com>
+;;      Stefan Wehr <mail at stefanwehr.de>
+;;      Sune Simonsen <sune.simonsen at jayway.com>
+;;      Thomas Hisch <thomas at opentech.at>
+;;      Tim Harper <timcharper at gmail.com>
+;;      Tom Willemse <tom at ryuslash.org>
+;;      Trevor Murphy <trevor.m.murphy at gmail.com>
+;;      Ulrich Müller <ulm at gentoo.org>
+;;      Vasilij Schneidermann <v.schneidermann at gmail.com>
+;;      Vegard Øye <vegard_oye at hotmail.com>
+;;      Winfred Lu <winfred.lu at gmail.com>
+;;      Wolfgang Jenkner <wjenkner at inode.at>
+;;      Xiao Hanyu <xiaohanyu1988 at gmail.com>
+;;      York Zhao <yzhao at telecor.com>
+
+;; The following line is included for NonGNU ELPA's build script:
+;; Maintainer: Tom Dalziel <tom.dalziel@gmail.com>
+
+;; Maintainers: The emacs-evil team. <https://github.com/orgs/emacs-evil/people>
+;;      To get in touch, please use the bug tracker or the
+;;      mailing list (see below).
+;; Created: 2011-03-01
+;; Package-Version: 20260728.1438
+;; Package-Revision: 6a3e1ddd04ac
+;; Package-Requires: ((emacs "24.1") (cl-lib "0.5") (goto-chg "1.6") (nadvice "0.3"))
+;; Keywords: emulations
+;; URL: https://github.com/emacs-evil/evil
+;;      Repository: https://github.com/emacs-evil/evil.git
+;;      EmacsWiki: http://www.emacswiki.org/emacs/Evil
+;; Bug tracker: https://github.com/emacs-evil/evil/issues
+;;      If you have bug reports, suggestions or patches, please
+;;      create an issue at the bug tracker (open for everyone).
+;;      Other discussions (tips, extensions) go to the mailing list.
+;; Mailing list: <implementations-list at lists.ourproject.org>
+;;      Subscribe: http://tinyurl.com/implementations-list
+;;      Newsgroup: nntp://news.gmane.org/gmane.emacs.vim-emulation
+;;      Archives: http://dir.gmane.org/gmane.emacs.vim-emulation
+;;      You don't have to subscribe to post; we usually reply
+;;      within a few days and CC our replies back to you.
+;;
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This file is part of Evil.
+;;
+;; Evil is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Evil is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Evil.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Evil is an extensible vi layer for Emacs. It emulates the main
+;; features of Vim, and provides facilities for writing custom
+;; extensions.
+;;
+;; Evil lives in a Git repository. To obtain Evil, do
+;;
+;;      git clone git://github.com/emacs-evil/evil.git
+;;
+;; Move Evil to ~/.emacs.d/evil (or somewhere else in the `load-path').
+;; Then add the following lines to ~/.emacs:
+;;
+;;      (add-to-list 'load-path "~/.emacs.d/evil")
+;;      (require 'evil)
+;;      (evil-mode 1)
+;;
+;; Evil requires undo-redo (Emacs 28), undo-fu or undo-tree for redo
+;; functionality.  Otherwise, Evil uses regular Emacs undo.
+;;
+;;     https://codeberg.org/ideasman42/emacs-undo-fu
+;;     https://melpa.org/#/undo-fu
+;;     https://gitlab.com/tsc25/undo-tree
+;;     https://elpa.gnu.org/packages/undo-tree.html
+;;
+;; Evil requires `goto-last-change' and `goto-last-change-reverse'
+;; function for the corresponding motions g; g, as well as the
+;; last-change-register `.'. One package providing these functions is
+;; goto-chg.el:
+;;
+;;     https://github.com/emacs-evil/goto-chg
+;;     https://melpa.org/#/goto-chg
+;;     https://elpa.nongnu.org/nongnu/goto-chg.html
+;;
+;; Without this package the corresponding motions will raise an error.
+
+;;; Code:
+
+(require 'evil-vars)
+(require 'evil-common)
+(require 'evil-core)
+(require 'evil-states)
+(require 'evil-repeat)
+(require 'evil-macros)
+(require 'evil-search)
+(require 'evil-ex)
+(require 'evil-types)
+(require 'evil-commands)
+(require 'evil-jumps)
+(require 'evil-maps)
+
+(when evil-want-integration
+  (require 'evil-integration))
+
+(when evil-want-keybinding
+  (require 'evil-keybindings))
+
+(run-hooks 'evil-after-load-hook)
+
+(provide 'evil)
+
+;;; evil.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil.elc b/emacs/.emacs.d/elpa/evil-20260728.1438/evil.elc
new file mode 100644
index 0000000..ca26ee1
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-20260728.1438/evil.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-20260728.1438/evil.info b/emacs/.emacs.d/elpa/evil-20260728.1438/evil.info
new file mode 100644
index 0000000..6046e92
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-20260728.1438/evil.info
@@ -0,0 +1,2235 @@
+This is evil.info, produced by makeinfo version 7.1.1 from evil.texi.
+
+     Evil 1.15.0, Jan 07, 2022
+
+     Eivind Fonn, Frank Fischer, Vegard Øye
+
+     Copyright © 2011-2019, Eivind Fonn, Frank Fischer, Vegard Øye
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* evil: (evil.info). Extensible vi layer for Emacs
+END-INFO-DIR-ENTRY
+
+
+   Generated by Sphinx 4.3.2.
+
+
+File: evil.info,  Node: Top,  Next: Overview,  Up: (dir)
+
+Evil documentation
+******************
+
+     Evil 1.15.0, Jan 07, 2022
+
+     Eivind Fonn, Frank Fischer, Vegard Øye
+
+     Copyright © 2011-2019, Eivind Fonn, Frank Fischer, Vegard Øye
+
+* Menu:
+
+* Overview::
+* Settings::
+* Keymaps::
+* Hooks::
+* Extension::
+* Frequently Asked Questions::
+* Internals::
+* The GNU Free Documentation License::
+* Emacs lisp functions and variables::
+
+ -- The Detailed Node Listing --
+
+Overview
+
+* Installation via package.el: Installation via package el.
+* Manual installation::
+* Modes and states::
+
+Settings
+
+* The initial state::
+* Keybindings and other behaviour::
+* Search::
+* Indentation::
+* Cursor movement::
+* Cursor display::
+* Window management::
+* Parenthesis highlighting::
+* Miscellaneous::
+
+Keymaps
+
+* evil-define-key::
+* Leader keys::
+
+Extension
+
+* Motions::
+* Operators::
+* Text objects::
+* Range types::
+* States::
+
+Frequently Asked Questions
+
+* Problems with the escape key in the terminal::
+* Underscore is not a word character::
+
+Internals
+
+* Command properties::
+
+
+
+File: evil.info,  Node: Overview,  Next: Settings,  Prev: Top,  Up: Top
+
+1 Overview
+**********
+
+Evil is an extensible vi layer for Emacs.  It emulates the main features
+of Vim, (1) turning Emacs into a modal editor.  Like Emacs in general,
+Evil is extensible in Emacs Lisp.
+
+* Menu:
+
+* Installation via package.el: Installation via package el.
+* Manual installation::
+* Modes and states::
+
+   ---------- Footnotes ----------
+
+   (1) (1) Vim is the most popular version of `vi', a modal text editor
+with many implementations.  Vim also adds some functions of its own,
+like visual selection and text objects.  For more information see the
+official Vim website (https://www.vim.org).
+
+
+File: evil.info,  Node: Installation via package el,  Next: Manual installation,  Up: Overview
+
+1.1 Installation via package.el
+===============================
+
+Evil is available as a package from MELPA stable, MELPA unstable and
+NonGNU ELPA. This is the recommended way of installing Evil.
+
+To set up ‘package.el’ to work with one of the MELPA repositories, you
+can follow the instructions on melpa.org(1).
+
+Alternatively you can use NonGNU ELPA. It is part of the default package
+archives as of Emacs 28.  For older Emacs versions you’ll need to add it
+yourself:
+
+     (add-to-list 'package-archives
+                  (cons "nongnu" (format "http%s://elpa.nongnu.org/nongnu/"
+                                         (if (gnutls-available-p) "s" ""))))
+
+Once that is done, you can execute the following commands:
+
+     M-x package-refresh-contents
+     M-x package-install RET evil RET
+
+Finally, add the following lines to your Emacs init file:
+
+     (require 'evil)
+     (evil-mode 1)
+
+   ---------- Footnotes ----------
+
+   (1) https://melpa.org/#/getting-started
+
+
+File: evil.info,  Node: Manual installation,  Next: Modes and states,  Prev: Installation via package el,  Up: Overview
+
+1.2 Manual installation
+=======================
+
+First, install ‘goto-chg’ and ‘cl-lib’.  If you have an Emacs version of
+24.3 or newer, you should already have ‘cl-lib’.
+
+Evil lives in a git repository.  To download Evil, do:
+
+     git clone --depth 1 https://github.com/emacs-evil/evil.git
+
+Then add the following lines to your Emacs init file:
+
+     (add-to-list 'load-path "path/to/evil")
+     (require 'evil)
+     (evil-mode 1)
+
+Ensure that your replace ‘path/to/evil’ with the actual path to where
+you cloned Evil.
+
+
+File: evil.info,  Node: Modes and states,  Prev: Manual installation,  Up: Overview
+
+1.3 Modes and states
+====================
+
+The next time Emacs is started, it will come up in `normal state',
+denoted by ‘<N>’ in the mode line.  This is where the main vi bindings
+are defined.  Note that you can always disable normal state with ‘C-z’,
+which switches to an “Emacs state” (denoted by ‘<E>’) in which vi keys
+are completely disabled.  Press ‘C-z’ again to switch back to normal
+state.
+
+state
+
+     Evil uses the term `state' for what is called a “mode” in regular
+     vi usage, because `modes' are understood in Emacs terms to mean
+     something else.
+
+Evil defines a number of states by default:
+
+normal state (‘<N>’)
+
+     This is the default “resting state” of Evil, in which the main body
+     of vi bindings are defined.
+
+insert state (‘<I>’)
+
+     This is the state for insertion of text, where non-modified keys
+     will insert the corresponding character in the buffer.
+
+visual state (‘<V>’)
+
+     A state for selecting text regions.  Motions are available for
+     modifying the selected region, and operators are available for
+     acting on it.
+
+replace state (‘<R>’)
+
+     A special state mostly similar to insert state, except it replaces
+     text instead of inserting.
+
+operator-pending state (‘<O>’)
+
+     A special state entered after launching an operator, but before
+     specifying the corresponding motion or text object.
+
+motion state (‘<M>’)
+
+     A special state useful for buffers that are read-only, where
+     motions are available but editing operations are not.
+
+Emacs state (‘<E>’)
+
+     A state that as closely as possible mimics default Emacs behaviour,
+     by eliminating all vi bindings, except for ‘C-z’, to re-enter
+     normal state.
+
+
+File: evil.info,  Node: Settings,  Next: Keymaps,  Prev: Overview,  Up: Top
+
+2 Settings
+**********
+
+Evil’s behaviour can be adjusted by setting some variables.  The list of
+all available variables and their current values can be inspected by
+doing:
+
+     M-x customize-group RET evil RET
+
+To change the value of a variable, you can use this interface, or add a
+‘setq’ form to your Emacs init file, preferably before Evil is loaded.
+(1)
+
+     (setq evil-shift-width 0)
+     ;; Load Evil
+     (require 'evil)
+
+What follows is a non-exhaustive list of the most relevant customization
+options.
+
+* Menu:
+
+* The initial state::
+* Keybindings and other behaviour::
+* Search::
+* Indentation::
+* Cursor movement::
+* Cursor display::
+* Window management::
+* Parenthesis highlighting::
+* Miscellaneous::
+
+   ---------- Footnotes ----------
+
+   (1) (1) Strictly speaking, the order only matters if the variable
+affects the way Evil is loaded.  This is the case with some variables.
+
+
+File: evil.info,  Node: The initial state,  Next: Keybindings and other behaviour,  Up: Settings
+
+2.1 The initial state
+=====================
+
+The initial state of a buffer is determined by its major mode.  Evil
+maintains an association between major modes and their corresponding
+states, which is most easily modified using the function *note
+evil-set-initial-state: 30.
+
+ -- Emacs Lisp Autofunction: (evil-set-initial-state MODE STATE)
+
+     Set the initial state for major mode `MODE' to `STATE'. This is the
+     state the buffer comes up in.
+
+If no state can be found, Evil uses the default initial state.
+
+ -- Emacs Lisp Autovariable: evil-default-state
+
+     The default Evil state.  This is the state a buffer starts in when
+     it is not otherwise configured (see *note evil-set-initial-state:
+     30. and *note evil-buffer-regexps: 5.).  The value may be one of
+     ‘normal’, ‘insert’, ‘visual’, ‘replace’, ‘operator’, ‘motion’ and
+     ‘emacs’.
+
+     Default: ‘normal’
+
+Alternatively, it is possible to select the initial state based on the
+buffer `name' rather than its major mode.  This is checked first, so it
+takes precedence over the other methods for setting the state.
+
+ -- Emacs Lisp Autovariable: evil-buffer-regexps
+
+     Regular expressions determining the initial state for a buffer.
+     Entries have the form ‘(REGEXP . STATE)’, where `REGEXP' is a
+     regular expression matching the buffer’s name and `STATE' is one of
+     ‘normal’, ‘insert’, ‘visual’, ‘replace’, ‘operator’, ‘motion’,
+     ‘emacs’ and ‘nil’.  If `STATE' is ‘nil’, Evil is disabled in the
+     buffer.
+
+     Default: ‘(("^ \\*load\\*"))’
+
+
+File: evil.info,  Node: Keybindings and other behaviour,  Next: Search,  Prev: The initial state,  Up: Settings
+
+2.2 Keybindings and other behaviour
+===================================
+
+Evil comes with a rich system for modifying its key bindings *note
+Keymaps: 4f.  For the most common tweaks, the following variables are
+available.
+
+ -- Emacs Lisp Autovariable: evil-toggle-key
+
+     The key used to change to and from Emacs state.  Must be readable
+     by ‘read-kbd-macro’.  For example: “C-z”.
+
+     Default: ‘"C-z"’
+
+ -- Emacs Lisp Autovariable: evil-want-C-i-jump
+
+     Whether ‘C-i’ jumps forward in the jump list (like Vim).
+     Otherwise, ‘C-i’ inserts a tab character.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-want-C-u-delete
+
+     Whether ‘C-u’ deletes back to indentation in insert state.
+     Otherwise, ‘C-u’ applies a prefix argument.  The binding of ‘C-u’
+     mirrors Emacs behaviour by default due to the relative ubiquity of
+     prefix arguments.
+
+     Default: ‘nil’
+
+ -- Emacs Lisp Autovariable: evil-want-C-u-scroll
+
+     Whether ‘C-u’ scrolls up (like Vim).  Otherwise, ‘C-u’ applies a
+     prefix argument.  The binding of ‘C-u’ mirrors Emacs behaviour by
+     default due to the relative ubiquity of prefix arguments.
+
+     Default: ‘nil’
+
+ -- Emacs Lisp Autovariable: evil-want-C-d-scroll
+
+     Whether ‘C-d’ scrolls down (like Vim).
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-want-C-w-delete
+
+     Whether ‘C-w’ deletes a word in Insert state.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-want-C-w-in-emacs-state
+
+     Whether ‘C-w’ prefixes windows commands in Emacs state.
+
+     Default: ‘nil’
+
+ -- Emacs Lisp Autovariable: evil-want-Y-yank-to-eol
+
+     Whether ‘Y’ yanks to the end of the line.  The default behavior is
+     to yank the whole line, like Vim.
+
+     Default: ‘nil’
+
+ -- Emacs Lisp Autovariable: evil-disable-insert-state-bindings
+
+     Whether insert state bindings should be used.  Bindings for escape,
+     delete and *note evil-toggle-key: 37. are always available.  If
+     this is non-nil, default Emacs bindings are by and large accessible
+     in insert state.
+
+     Default: ‘nil’
+
+
+File: evil.info,  Node: Search,  Next: Indentation,  Prev: Keybindings and other behaviour,  Up: Settings
+
+2.3 Search
+==========
+
+ -- Emacs Lisp Autovariable: evil-search-module
+
+     The search module to be used.  May be either ‘isearch’, for Emacs’
+     isearch module, or ‘evil-search’, for Evil’s own interactive search
+     module.  N.b.  changing this will not affect keybindings.  To swap
+     out relevant keybindings, see ‘evil-select-search-module’ function.
+
+     Default: ‘isearch’
+
+ -- Emacs Lisp Autovariable: evil-regexp-search
+
+     Whether to use regular expressions for searching in ‘/’ and ‘?’.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-search-wrap
+
+     Whether search with ‘/’ and ‘?’ wraps around the buffer.  If this
+     is non-nil, search stops at the buffer boundaries.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-flash-delay
+
+     Time in seconds to flash search matches after ‘n’ and ‘N’.
+
+     Default: ‘2’
+
+ -- Emacs Lisp Autovariable: evil-ex-hl-update-delay
+
+     Time in seconds of idle before updating search highlighting.
+     Setting this to a period shorter than that of keyboard’s repeat
+     rate allows highlights to update while scrolling.
+
+     Default: ‘0.02’
+
+
+File: evil.info,  Node: Indentation,  Next: Cursor movement,  Prev: Search,  Up: Settings
+
+2.4 Indentation
+===============
+
+ -- Emacs Lisp Autovariable: evil-auto-indent
+
+     Whether to auto-indent when opening lines with ‘o’ and ‘O’.
+
+     Default: ‘t’, buffer-local
+
+ -- Emacs Lisp Autovariable: evil-shift-width
+
+     The number of columns by which a line is shifted.  This applies to
+     the shifting operators ‘>’ and ‘<’.
+
+     Default: ‘4’, buffer-local
+
+ -- Emacs Lisp Autovariable: evil-shift-round
+
+     Whether shifting rounds to the nearest multiple.  If non-nil, ‘>’
+     and ‘<’ adjust line indentation to the nearest multiple of *note
+     evil-shift-width: 33.
+
+     Default: ‘t’, buffer-local
+
+ -- Emacs Lisp Autovariable: evil-indent-convert-tabs
+
+     If non-nil, the ‘=’ operator converts between leading tabs and
+     spaces.  Whether tabs are converted to spaces or vice versa depends
+     on the value of ‘indent-tabs-mode’.
+
+     Default: ‘t’
+
+
+File: evil.info,  Node: Cursor movement,  Next: Cursor display,  Prev: Indentation,  Up: Settings
+
+2.5 Cursor movement
+===================
+
+In standard Emacs terms, the cursor is generally understood to be
+located between two characters.  In Vim, and therefore also Evil, this
+is the case in insert state, but in other states the cursor is
+understood to be `on' a character, and that this character is not a
+newline.
+
+Forcing this behaviour in Emacs is the source of some potentially
+surprising results (especially for traditional Emacs users—users used to
+Vim may find the default behavior to their satisfaction).  Many of them
+can be tweaked using the following variables.
+
+ -- Emacs Lisp Autovariable: evil-repeat-move-cursor
+
+     Whether repeating commands with ‘.’ may move the cursor.  If nil,
+     the original cursor position is preserved, even if the command
+     normally would have moved the cursor.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-move-cursor-back
+
+     Whether the cursor is moved backwards when exiting insert state.
+     If non-nil, the cursor moves “backwards” when exiting insert state,
+     so that it ends up on the character to the left.  Otherwise it
+     remains in place, on the character to the right.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-move-beyond-eol
+
+     Whether the cursor can move past the end of the line.  If non-nil,
+     the cursor is allowed to move one character past the end of the
+     line, as in Emacs.
+
+     Default: ‘nil’
+
+ -- Emacs Lisp Autovariable: evil-cross-lines
+
+     Whether horizontal motions may move to other lines.  If non-nil,
+     certain motions that conventionally operate in a single line may
+     move the cursor to other lines.  Otherwise, they are restricted to
+     the current line.  This applies to ‘h’, ‘SPC’, ‘f’, ‘F’, ‘t’, ‘T’,
+     ‘~’.
+
+     Default: ‘nil’
+
+ -- Emacs Lisp Autovariable: evil-respect-visual-line-mode
+
+     Whether movement commands respect ‘visual-line-mode’.  If non-nil,
+     ‘visual-line-mode’ is generally respected when it is on.  In this
+     case, motions such as ‘j’ and ‘k’ navigate by visual lines (on the
+     screen) rather than “physical” lines (defined by newline
+     characters).  If nil, the setting of ‘visual-line-mode’ is ignored.
+
+     This variable must be set before Evil is loaded.
+
+     Default: ‘nil’
+
+ -- Emacs Lisp Autovariable: evil-track-eol
+
+     Whether ‘$’ “sticks” the cursor to the end of the line.  If
+     non-nil, vertical motions after ‘$’ maintain the cursor at the end
+     of the line, even if the target line is longer.  This is analogous
+     to ‘track-eol’, but respects Evil’s interpretation of end-of-line.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-start-of-line
+
+     Analogue of vim’s ‘startofline’.  If nil, preserve column when
+     making relevant movements of the cursor.  Otherwise, move the
+     cursor to the start of the line.
+
+     Default: ‘nil’
+
+
+File: evil.info,  Node: Cursor display,  Next: Window management,  Prev: Cursor movement,  Up: Settings
+
+2.6 Cursor display
+==================
+
+A state may change the appearance of the cursor.  Use the variable *note
+evil-default-cursor: c. to set the default cursor, and the variables
+‘evil-normal-state-cursor’, ‘evil-insert-state-cursor’ etc.  to set the
+cursors for specific states.  The acceptable values for all of them are
+the same.
+
+ -- Emacs Lisp Autovariable: evil-default-cursor
+
+     The default cursor.  May be a cursor type as per ‘cursor-type’, a
+     color string as passed to ‘set-cursor-color’, a zero-argument
+     function for changing the cursor, or a list of the above.
+
+     Default: ‘t’
+
+
+File: evil.info,  Node: Window management,  Next: Parenthesis highlighting,  Prev: Cursor display,  Up: Settings
+
+2.7 Window management
+=====================
+
+ -- Emacs Lisp Autovariable: evil-auto-balance-windows
+
+     If non-nil window creation and deletion trigger rebalancing.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-split-window-below
+
+     If non-nil split windows are created below.
+
+     Default: ‘nil’
+
+ -- Emacs Lisp Autovariable: evil-vsplit-window-right
+
+     If non-nil vertically split windows with are created to the right.
+
+     Default: ‘nil’
+
+
+File: evil.info,  Node: Parenthesis highlighting,  Next: Miscellaneous,  Prev: Window management,  Up: Settings
+
+2.8 Parenthesis highlighting
+============================
+
+These settings concern the integration between Evil and
+‘show-paren-mode’.  They take no effect if this mode is not enabled.
+
+ -- Emacs Lisp Autovariable: evil-show-paren-range
+
+     The minimal distance between point and a parenthesis which causes
+     the parenthesis to be highlighted.
+
+     Default: ‘0’
+
+ -- Emacs Lisp Autovariable:
+          evil-highlight-closing-paren-at-point-states
+
+     The states in which the closing parenthesis at point should be
+     highlighted.  All states listed here highlight the closing
+     parenthesis at point (which is Vim’s default behavior).  All others
+     highlight the parenthesis before point (which is Emacs default
+     behavior).  If this list contains the symbol ‘not’ then its meaning
+     is inverted, i.e.  all states listed here highlight the closing
+     parenthesis before point.
+
+     Default: ‘(not emacs insert replace)’
+
+
+File: evil.info,  Node: Miscellaneous,  Prev: Parenthesis highlighting,  Up: Settings
+
+2.9 Miscellaneous
+=================
+
+ -- Emacs Lisp Autovariable: evil-want-fine-undo
+
+     Whether actions are undone in several steps.  There are two
+     possible choices: nil (“no”) means that all changes made during
+     insert state, including a possible delete after a change operation,
+     are collected in a single undo step.  Non-nil (“yes”) means that
+     undo steps are determined according to Emacs heuristics, and no
+     attempt is made to aggregate changes.
+
+     For backward compatibility purposes, the value ‘fine’ is
+     interpreted as ‘nil’.  This option was removed because it did not
+     work consistently.
+
+     Default: ‘nil’
+
+ -- Emacs Lisp Autovariable: evil-undo-system
+
+     Undo system Evil should use.  If equal to ‘undo-tree’ or ‘undo-fu’,
+     those packages must be installed.  If equal to ‘undo-tree’,
+     ‘undo-tree-mode’ must also be activated.  If equal to ‘undo-redo’,
+     Evil uses commands natively available in Emacs 28.
+
+     Default: ‘nil’
+
+ -- Emacs Lisp Autovariable: evil-backspace-join-lines
+
+     Whether backward delete in insert state may join lines.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-kbd-macro-suppress-motion-error
+
+     Whether left/right motions signal errors in keyboard macros.  This
+     variable only affects beginning-of-line or end-of-line errors
+     regarding the motions ‘h’ and ‘SPC’ respectively.  This may be
+     desired since such errors cause macro definition or execution to be
+     terminated.  There are four possibilities:
+
+        - ‘record’: errors are suppressed when recording macros, but not
+          when replaying them.
+
+        - ‘replay’: errors are suppressed when replaying macros, but not
+          when recording them.
+
+        - ‘t’: errors are suppressed in both cases.
+
+        - ‘nil’: errors are never suppressed.
+
+     Default: ‘nil’
+
+ -- Emacs Lisp Autovariable: evil-mode-line-format
+
+     The position of the state tag in the mode line.  If set to ‘before’
+     or ‘after’, the tag is placed at the beginning or the end of the
+     mode-line, respectively.  If nil, there is no tag.  Otherwise it
+     should be a cons cell ‘(WHERE . WHICH)’, where `WHERE' is either
+     ‘before’ or ‘after’, and `WHICH' is a symbol in ‘mode-line-format’.
+     The tag is then placed before or after that symbol, respectively.
+
+     Default: ‘before’
+
+ -- Emacs Lisp Autovariable: evil-mouse-word
+
+     The `thing-at-point' symbol for double click selection.  The
+     double-click starts visual state in a special word selection mode.
+     This symbol is used to determine the words to be selected.
+     Possible values are ‘evil-word’ or ‘evil-WORD’.
+
+     Default: ‘evil-word’
+
+ -- Emacs Lisp Autovariable: evil-bigword
+
+     The set of characters to be interpreted as WORD boundaries.  This
+     is enclosed with square brackets and used as a regular expression.
+     By default, whitespace characters are considered WORD boundaries.
+
+     Default: ‘"^ \t\r\n"’, buffer-local
+
+ -- Emacs Lisp Autovariable: evil-esc-delay
+
+     The time, in seconds, to wait for another key after escape.  If no
+     further event arrives during this time, the event is translated to
+     ‘ESC’.  Otherwise, it is translated according to
+     ‘input-decode-map’.  This does not apply in Emacs state, and may
+     also be inhibited by setting ‘evil-inhibit-esc’.
+
+     Default: ‘0.01’
+
+ -- Emacs Lisp Autovariable: evil-intercept-esc
+
+     Whether Evil should intercept the escape key.  In the terminal,
+     escape and a meta key sequence both generate the same event.  In
+     order to distingush these, Evil uses ‘input-decode-map’.  It is not
+     necessary to do this in a graphical Emacs session.  However, if you
+     prefer to use ‘C-[’ as escape (which is identical to the terminal
+     escape key code), this interception must also happen in graphical
+     Emacs sessions.  Set this variable to ‘always’, t (only in the
+     terminal) or nil (never intercept).
+
+     Default: ‘always’
+
+ -- Emacs Lisp Autovariable: evil-kill-on-visual-paste
+
+     Whether pasting in visual state adds the replaced text to the kill
+     ring, making it the default for the next paste.  The default,
+     replicates the default Vim behavior.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-echo-state
+
+     Whether to signal the current state in the echo area.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-complete-all-buffers
+
+     Whether completion looks for matches in all buffers.  This applies
+     to ‘C-n’ and ‘C-p’ in insert state.
+
+     Default: ‘t’
+
+ -- Emacs Lisp Autovariable: evil-want-empty-ex-last-command
+
+     Whether to default to evil-ex-previous-command at empty ex prompt.
+
+     Default: ‘t’
+
+
+File: evil.info,  Node: Keymaps,  Next: Hooks,  Prev: Settings,  Up: Top
+
+3 Keymaps
+*********
+
+Evil’s key bindings are stored in a number of different keymaps.  Each
+state has a `global keymap', where the default bindings for that state
+are stored.  They are named ‘evil-normal-state-map’,
+‘evil-insert-state-map’, and so on.  The bindings in these maps are
+visible in all buffers currently in the corresponding state.
+
+These keymaps function like ordinary Emacs keymaps and may be modified
+using the Emacs function ‘define-key’:
+
+     (define-key evil-normal-state-map (kbd "w") 'some-function)
+
+This binds the key ‘w’ to the command ‘some-function’ in normal state.
+The use of ‘kbd’ is optional for simple key sequences, like this one,
+but recommended in general.
+
+Most of Evil’s bindings are defined in the file ‘evil-maps.el’.
+
+To facilitate shared keybindings between states, some states may
+activate keybindings from other states as well.  For example, motion
+state bindings are visible in normal and visual state, and normal state
+bindings are also visible in visual state.
+
+Each state also has a `buffer-local keymap' which is specific to the
+current buffer, and which takes precedence over the global keymap.
+These maps are most suitably modified by a mode hook.  They are named
+‘evil-normal-state-local-map’, ‘evil-insert-state-local-map’, and so on.
+
+     (add-hook 'some-mode-hook
+               (lambda ()
+                 (define-key evil-normal-state-local-map
+                             (kbd "w") 'some-function)))
+
+For convenience, the functions *note evil-global-set-key: 1c. and *note
+evil-local-set-key: 22. are available for setting global and local state
+keys.
+
+ -- Emacs Lisp Autofunction: (evil-global-set-key STATE KEY DEF)
+
+     Bind `KEY' to `DEF' in `STATE'.
+
+ -- Emacs Lisp Autofunction: (evil-local-set-key STATE KEY DEF)
+
+     Bind `KEY' to `DEF' in `STATE' in the current buffer.
+
+The above examples could therefore have been written as follows:
+
+     (evil-global-set-key 'normal (kbd "w") 'some-function)
+
+     (add-hook 'some-mode-hook
+               (lambda ()
+                 (evil-local-set-key 'normal (kbd "w") 'some-function)))
+
+* Menu:
+
+* evil-define-key::
+* Leader keys::
+
+
+File: evil.info,  Node: evil-define-key,  Next: Leader keys,  Up: Keymaps
+
+3.1 evil-define-key
+===================
+
+Evil provides the macro *note evil-define-key: f. for adding state
+bindings to ordinary keymaps.  It is quite powerful, and is the
+preferred method for fine-tuning bindings to activate in specific
+circumstances.
+
+ -- Emacs Lisp Autofunction: (evil-define-key STATE KEYMAP KEY DEF
+          [BINDINGS...])
+
+     Create a `STATE' binding from `KEY' to `DEF' for `KEYMAP'. `STATE'
+     is one of ‘normal’, ‘insert’, ‘visual’, ‘replace’, ‘operator’,
+     ‘motion’, ‘emacs’, or a list of one or more of these.  Omitting a
+     state by using ‘nil’ corresponds to a standard Emacs binding using
+     ‘define-key’.  The remaining arguments are like those of
+     ‘define-key’.  For example:
+
+          (evil-define-key 'normal foo-map "a" 'bar)
+
+     This creates a binding from ‘a’ to ‘bar’ in normal state, which is
+     active whenever ‘foo-map’ is active.  Using nil for the state, the
+     following lead to identical bindings:
+
+          (evil-define-key nil foo-map "a" 'bar)
+          (define-key foo-map "a" 'bar)
+
+     It is possible to specify multiple states and/or bindings at once:
+
+          (evil-define-key '(normal visual) foo-map
+            "a" 'bar
+            "b" 'foo)
+
+     If ‘foo-map’ has not been initialized yet, this macro adds an entry
+     to ‘after-load-functions’, delaying execution as necessary.
+
+     `KEYMAP' may also be a quoted symbol.  If the symbol is ‘global’,
+     the global evil keymap corresponding to the state(s) is used,
+     meaning the following lead to identical bindings:
+
+          (evil-define-key 'normal 'global "a" 'bar)
+          (evil-global-set-key 'normal "a" 'bar)
+
+     The symbol ‘local’ may also be used, which corresponds to using
+     *note evil-local-set-key: 22.  If a quoted symbol is used that is
+     not ‘global’ or ‘local’, it is assumed to be the name of a minor
+     mode, in which case ‘evil-define-minor-mode-key’ is used.
+
+There follows a brief overview of the main functions of this macro.
+
+   - Define a binding in a given state
+
+          (evil-define-key 'state 'global (kbd "key") 'target)
+
+   - Define a binding in a given state in the current buffer
+
+          (evil-define-key 'state 'local (kbd "key") 'target)
+
+   - Define a binding in a given state under the `foo-mode' major mode.
+
+          (evil-define-key 'state foo-mode-map (kbd "key") 'target)
+
+     Note that ‘foo-mode-map’ is unquoted, and that this form is safe
+     before ‘foo-mode-map’ is loaded.
+
+   - Define a binding in a given state under the `bar-mode' minor mode.
+
+          (evil-define-key 'state 'bar-mode (kbd "key") 'target)
+
+     Note that ‘bar-mode’ is quoted, and that this form is safe before
+     ‘bar-mode’ is loaded.
+
+The macro *note evil-define-key: f. can be used to augment existing
+modes with state bindings, as well as creating packages with custom
+bindings.  For example, the following will create a minor mode
+‘foo-mode’ with normal state bindings for the keys ‘w’ and ‘e’:
+
+     (define-minor-mode foo-mode
+       "Foo mode."
+       :keymap (make-sparse-keymap))
+
+     (evil-define-key 'normal 'foo-mode "w" 'bar)
+     (evil-define-key 'normal 'foo-mode "e" 'baz)
+
+This minor mode can then be enabled in any buffers where the custom
+bindings are desired:
+
+     (add-hook 'text-mode-hook 'foo-mode)  ; enable alongside text-mode
+
+
+File: evil.info,  Node: Leader keys,  Prev: evil-define-key,  Up: Keymaps
+
+3.2 Leader keys
+===============
+
+Evil supports a simple implementation of Vim’s `leader' keys.  To bind a
+function to a leader key you can use the expression ‘<leader>’ in a key
+mapping, e.g.
+
+     (evil-define-key 'normal 'global (kbd "<leader>fs") 'save-buffer)
+
+Likewise, you can use the expression ‘<localleader>’ to mimic Vim’s
+local leader, which is designed for mode-specific key bindings.
+
+You can use the function *note evil-set-leader: 31. to designate which
+key acts as the leader and the local leader.
+
+ -- Emacs Lisp Autofunction: (evil-set-leader STATE KEY [LOCALLEADER])
+
+     Set `KEY' to trigger leader bindings in `STATE'. `KEY' should be in
+     the form produced by ‘kbd’.  `STATE' is one of ‘normal’, ‘insert’,
+     ‘visual’, ‘replace’, ‘operator’, ‘motion’, ‘emacs’, a list of one
+     or more of these, or ‘nil’, which means all of the above.  If
+     `LOCALLEADER' is non-nil, set the local leader instead.
+
+
+File: evil.info,  Node: Hooks,  Next: Extension,  Prev: Keymaps,  Up: Top
+
+4 Hooks
+*******
+
+A `hook' is a list of functions that are executed when certain events
+happen.  Hooks are modified with the Emacs function ‘add-hook’.  Evil
+provides entry and exit hooks for all its states.  For example, when
+switching from normal state to insert state, all functions in
+‘evil-normal-state-exit-hook’ and ‘evil-insert-state-entry-hook’ are
+executed.
+
+It is guaranteed that the exit hook will be executed before the entry
+hook on all state switches.
+
+During the hook execution, the variables ‘evil-next-state’ and
+‘evil-previous-state’ contain information about the states being
+switched to and from, respectively.
+
+
+File: evil.info,  Node: Extension,  Next: Frequently Asked Questions,  Prev: Hooks,  Up: Top
+
+5 Extension
+***********
+
+The main functionality of Evil is implemented in terms of reusable
+macros.  Package writers can use these to define new commands.
+
+* Menu:
+
+* Motions::
+* Operators::
+* Text objects::
+* Range types::
+* States::
+
+
+File: evil.info,  Node: Motions,  Next: Operators,  Up: Extension
+
+5.1 Motions
+===========
+
+A `motion' is a command which moves the cursor, such as ‘w’ or ‘e’.
+Motions are defined with the macro *note evil-define-motion: 10.
+Motions not defined in this way should be declared with *note
+evil-declare-motion: 9.
+
+ -- Emacs Lisp Autofunction: (evil-declare-motion COMMAND)
+
+     Declare `COMMAND' to be a movement function.  This ensures that it
+     behaves correctly in visual state.
+
+ -- Emacs Lisp Autofunction: (evil-define-motion MOTION (COUNT ARGS...)
+          DOC [[KEY VALUE]...] BODY...)
+
+     Define a motion command `MOTION'. `ARGS' is a list of arguments.
+     Motions can have any number of arguments, but the first (if any)
+     has the predefined meaning of count.  `BODY' must execute the
+     motion by moving point.
+
+     Optional keyword arguments are:
+
+        - ‘:type’ - determines how the motion works after an operator
+          (one of ‘inclusive’, ‘line’, ‘block’ and ‘exclusive’, or a
+          self-defined motion type)
+
+        - ‘:jump’ - if non-nil, the previous position is stored in the
+          jump list, so that it can be restored with ‘C-o’
+
+For example, this is a motion that moves the cursor forward by a number
+of characters:
+
+     (evil-define-motion foo-forward (count)
+       "Move to the right by COUNT characters."
+       :type inclusive
+       (forward-char (or count 1)))
+
+The `type' of a motion determines how it works when used together with
+an operator.  Inclusive motions include the endpoint in the range being
+operated on, while exclusive motions do not.  Line motions extend the
+whole range to linewise positions, effectively behaving as if the
+endpoint were really at the end of the line.  Blockwise ranges behave as
+a “rectangle” on screen rather than a contiguous range of characters.
+
+
+File: evil.info,  Node: Operators,  Next: Text objects,  Prev: Motions,  Up: Extension
+
+5.2 Operators
+=============
+
+An operator is a command that acts on the text moved over by a motion,
+such as ‘c’ (change), ‘d’ (delete) or ‘y’ (yank or copy, not to be
+confused with “yank” in Emacs terminology which means `paste').
+
+ -- Emacs Lisp Autofunction: (evil-define-operator OPERATOR (BEG END
+          ARGS...) DOC [[KEY VALUE]...] BODY...)
+
+     Define an operator command `OPERATOR'. The operator acts on the
+     range of characters `BEG' through `END'. `BODY' must execute the
+     operator by potentially manipulating the buffer contents, or
+     otherwise causing side effects to happen.
+
+     Optional keyword arguments are:
+
+        - ‘:type’ - force the input range to be of a given type
+          (‘inclusive’, ‘line’, ‘block’, and ‘exclusive’, or a
+          self-defined motion type).
+
+        - ‘:motion’ - use a predetermined motion instead of waiting for
+          one from the keyboard.  This does not affect the behavior in
+          visual state, where selection boundaries are always used.
+
+        - ‘:repeat’ - if non-nil (default), then ‘.’ will repeat the
+          operator.
+
+        - ‘:move-point’ - if non-nil (default), the cursor will be moved
+          to the beginning of the range before the body executes
+
+        - ‘:keep-visual’ - if non-nil, the selection is not disabled
+          when the operator is executed in visual state.  By default,
+          visual state is exited automatically.
+
+For example, this is an operator that performs ROT13 encryption on the
+text under consideration:
+
+     (evil-define-operator evil-rot13 (beg end)
+       "ROT13 encrypt text."
+       (rot13-region beg end))
+
+Binding this to ‘g?’ (where it is by default) will cause a key sequence
+such as ‘g?w’ to encrypt from the current cursor to the end of the word.
+
+
+File: evil.info,  Node: Text objects,  Next: Range types,  Prev: Operators,  Up: Extension
+
+5.3 Text objects
+================
+
+Text objects are like motions in that they define a range over which an
+operator may act.  Unlike motions, text objects can set both a beginning
+and an endpoint.  In visual state, text objects alter both ends of the
+selection.
+
+Text objects are not directly usable in normal state.  Instead, they are
+bound in the two keymaps ‘evil-inner-text-ojects-map’ and
+‘evil-outer-text-objects-map’, which are available in visual and
+operator-pending state under the keys ‘i’ and ‘a’ respectively.
+
+ -- Emacs Lisp Autofunction: (evil-define-text-object OBJECT (COUNT) DOC
+          [[KEY VALUE]...] BODY...)
+
+     Define a text object command `OBJECT'. `BODY' should return a range
+     ‘(BEG END)’ to the right of point if `COUNT' is positive, and to
+     the left of it if negative.
+
+     Optional keyword arguments:
+
+        - ‘:type’ - determines how the range applies after an operator
+          (‘inclusive’, ‘line’, ‘block’, and ‘exclusive’, or a
+          self-defined motion type).
+
+        - ‘:extend-selection’ - if non-nil (default), the text object
+          always enlarges the current selection.  Otherwise, it replaces
+          the current selection.
+
+For eample, this is a text object which selects the next three
+characters after the current location:
+
+     (evil-define-text-object foo (count)
+       "Select three characters."
+       (list (point) (+ 3 (point))))
+
+For convenience, Evil provides several functions returning a list of
+positions which can be used for defining text objects.  All of them
+follow the convention that a positive `count' selects text after the
+current location, while negative `count' selects text before it.
+
+     Note: The `thingatpt' library is used quite extensively in Evil to
+     define text objects, and this dependency leaks through in the
+     following functions.  A `thing' in this context is any symbol for
+     which there is a function called ‘forward-THING’ (1) which moves
+     past a number of `things'.
+
+ -- Emacs Lisp Autofunction: (evil-select-inner-object THING BEG END
+          TYPE [COUNT LINE])
+
+     Return an inner text object range of `COUNT' objects.  If `COUNT'
+     is positive, return objects following point; if `COUNT' is
+     negative, return objects preceding point.  If one is unspecified,
+     the other is used with a negative argument.  `THING' is a symbol
+     understood by `thing-at-point'.  `BEG', `END' and `TYPE' specify
+     the current selection.  If `LINE' is non-nil, the text object
+     should be linewise, otherwise it is character wise.
+
+ -- Emacs Lisp Autofunction: (evil-select-an-object THING BEG END TYPE
+          COUNT [LINE])
+
+     Return an outer text object range of `COUNT' objects.  If `COUNT'
+     is positive, return objects following point; if `COUNT' is
+     negative, return objects preceding point.  If one is unspecified,
+     the other is used with a negative argument.  `THING' is a symbol
+     understood by `thing-at-point'.  `BEG', `END' and `TYPE' specify
+     the current selection.  If `LINE' is non-nil, the text object
+     should be linewise, otherwise it is character wise.
+
+ -- Emacs Lisp Autofunction: (evil-select-paren OPEN CLOSE BEG END TYPE
+          COUNT [INCLUSIVE])
+
+     Return a range ‘(BEG END)’ of `COUNT' delimited text objects.
+     `OPEN' and `CLOSE' specify the opening and closing delimiter,
+     respectively.  `BEG' `END' `TYPE' are the currently selected
+     (visual) range.  If `INCLUSIVE' is non-nil, `OPEN' and `CLOSE' are
+     included in the range; otherwise they are excluded.
+
+     The types of `OPEN' and `CLOSE' specify which kind of THING is used
+     for parsing with ‘evil-select-block’.  If `OPEN' and `CLOSE' are
+     characters ‘evil-up-paren’ is used.  Otherwise `OPEN' and `CLOSE'
+     must be regular expressions and ‘evil-up-block’ is used.
+
+     If the selection is exclusive, whitespace at the end or at the
+     beginning of the selection until the end-of-line or
+     beginning-of-line is ignored.
+
+   ---------- Footnotes ----------
+
+   (1) (1) There are many more ways that a `thing' can be defined, but
+the definition of ‘forward-THING’ is perhaps the most straightforward
+way to go about it.
+
+
+File: evil.info,  Node: Range types,  Next: States,  Prev: Text objects,  Up: Extension
+
+5.4 Range types
+===============
+
+A `type' is a transformation acting on a pair of buffer positions.  Evil
+defines the types ‘inclusive’, ‘line’, ‘block’ and ‘exclusive’, which
+are used for motion ranges and visual selection.  New types may be
+defined with the macro `evil-define-type'.
+
+ -- Emacs Lisp Autofunction: (evil-define-type TYPE DOC [[KEY FUNC]...])
+
+     Define type `TYPE'. `DOC' is a general description and shows up in
+     all docstrings.
+
+     Optional keyword arguments:
+
+        - ‘:expand’ - expansion function.  This function should accept
+          two positions in the current buffer, BEG and END,and return a
+          pair of expanded buffer positions.
+
+        - ‘:contract’ - the opposite of ‘:expand’.  Optional.
+
+        - ‘:one-to-one’ - non-nil if expansion is one-to-one.  This
+          means that ‘:expand’ followed by ‘:contract’ always return the
+          original range.
+
+        - ‘:normalize’ - normalization function.  This function should
+          accept two unexpanded positions and adjust them before
+          expansion.  May be used to deal with buffer boundaries.
+
+        - ‘:string’ - description function.  Takes two buffer positions
+          and returns a human-readable string.  For example “2 lines”
+
+     If further keywords and functions are specified, they are assumed
+     to be transformations on buffer positions, like ‘:expand’ and
+     ‘:contract’.
+
+
+File: evil.info,  Node: States,  Prev: Range types,  Up: Extension
+
+5.5 States
+==========
+
+States are defined with the macro *note evil-define-state: 12, which
+takes care to define the necessary hooks, keymaps and variables, as well
+as a toggle function ‘evil-NAME-state’ and a predicate function
+‘evil-NAME-state-p’ for checking whether the state is active.
+
+ -- Emacs Lisp Autofunction: (evil-define-state STATE DOC [[KEY VAL]...]
+          BODY...)
+
+     Define an Evil state `STATE'. `DOC' is a general description and
+     shows up in all docstrings; the first line of the string should be
+     the full name of the state.
+
+     `BODY' is executed each time the state is enabled or disabled.
+
+     Optional keyword arguments:
+
+        - ‘:tag’ - the mode line indicator, e.g.  “<T>”.
+
+        - ‘:message’ - string shown in the echo area when the state is
+          activated.
+
+        - ‘:cursor’ - default cursor specification.
+
+        - ‘:enable’ - list of other state keymaps to enable when in this
+          state.
+
+        - ‘:entry-hook’ - list of functions to run when entering this
+          state.
+
+        - ‘:exit-hook’ - list of functions to run when exiting this
+          state.
+
+        - ‘:suppress-keymap’ - if non-nil, effectively disables bindings
+          to ‘self-insert-command’ by making ‘evil-suppress-map’ the
+          parent of the global state keymap.
+
+     The global keymap of this state will be ‘evil-test-state-map’, the
+     local keymap will be ‘evil-test-state-local-map’, and so on.
+
+For example:
+
+     (evil-define-state test
+       "Test state."
+       :tag " <T> "
+       (message (if (evil-test-state-p)
+                    "Enabling test state."
+                  "Disabling test state.")))
+
+
+File: evil.info,  Node: Frequently Asked Questions,  Next: Internals,  Prev: Extension,  Up: Top
+
+6 Frequently Asked Questions
+****************************
+
+* Menu:
+
+* Problems with the escape key in the terminal::
+* Underscore is not a word character::
+
+
+File: evil.info,  Node: Problems with the escape key in the terminal,  Next: Underscore is not a word character,  Up: Frequently Asked Questions
+
+6.1 Problems with the escape key in the terminal
+================================================
+
+A common problem when using Evil in terminal mode is a certain delay
+after pressing the escape key.  Even more, when pressing the escape key
+followed quickly by another key the command is recognized as ‘M-<key>’
+instead of two separate keys: ‘ESC’ followed by ‘<key>’.  In fact, it is
+perfectly valid to simulate ‘M-<key>’ by pressing ‘ESC <key>’ quickly
+(but see below).
+
+The reason for this is that in terminal mode a key sequence involving
+the meta key (or alt key) always generates a so called “escape
+sequence”, i.e.  a sequence of two events sent to Emacs, the first being
+‘ESC’ and the second the key pressed simultaneously.  The problem is
+that pressing the escape key itself also generates the ‘ESC’ event.
+Thus, if Emacs (and therefore Evil) receives an ‘ESC’ event there is no
+way to tell whether the escape key has been pressed (and no further
+event will arrive) or a ‘M-<key>’ combination has been pressed (and the
+‘<key>’ event will arrive soon).  In order to distinguish both
+situations Evil does the following.  After receiving an ‘ESC’ event Evil
+waits for a short time period (specified by the variable *note
+evil-esc-delay: 17. which defaults to 0.01 seconds) for another event.
+If no other event arrives Evil assumes that the plain escape key has
+been pressed, otherwise it assumes a ‘M-<key>’ combination has been
+pressed and combines the ‘ESC’ event with the second one.  Because a
+‘M-<key>’ sequence usually generates both events in very quick
+succession, 0.01 seconds are usually enough and the delay is hardly
+noticeable by the user.
+
+If you use a terminal multiplexer like `tmux' or `screen' the situation
+may be worse.  These multiplexers have exactly the same problem
+recognizing ‘M-<key>’ sequences and often introduce their own delay for
+the ‘ESC’ key.  There is no way for Evil to influence this delay.  In
+order to reduce it you must reconfigure your terminal multiplexer.
+
+Note that this problem should not arise when using Evil in graphical
+mode.  The reason is that in this case the escape key itself generates a
+different command, namely ‘escape’ (a symbol) and hence Evil can
+distinguish whether the escape key or a ‘M-<key>’ combination has been
+pressed.  But this also implies that pressing ‘ESC’ followed by <key>
+cannot be used to simulate ‘M-<key>’ in graphical mode!
+
+
+File: evil.info,  Node: Underscore is not a word character,  Prev: Problems with the escape key in the terminal,  Up: Frequently Asked Questions
+
+6.2 Underscore is not a word character
+======================================
+
+An underscore ‘_’ is a word character in Vim.  This means that word
+motions like ‘w’ skip over underlines in a sequence of letters as if it
+was a letter itself.  In contrast, in Evil the underscore is often a
+non-word character like operators, e.g.  ‘+’.
+
+The reason is that Evil uses Emacs’ definition of a word and this
+definition does often not include the underscore.  In Emacs word
+characters are determined by the syntax-class of the buffer.  The
+syntax-class usually depends on the major-mode of this buffer.  This has
+the advantage that the definition of a “word” may be adapted to the
+particular type of document being edited.  Evil uses Emacs’ definition
+and does not simply use Vim’s definition in order to be consistent with
+other Emacs functions.  For example, word characters are exactly those
+characters that are matched by the regular expression character class
+‘[:word:]’.
+
+If you would be satisfied by having the ‘*’ and ‘#’ searches use symbols
+instead of words, this can be achieved by setting the
+‘evil-symbol-word-search’ variable to ‘t’.
+
+If you want the underscore to be recognised as word character for other
+motions, you can modify its entry in the syntax-table:
+
+     (modify-syntax-entry ?_ "w")
+
+This gives the underscore the ‘word’ syntax class.  You can use a
+mode-hook to modify the syntax-table in all buffers of some mode, e.g.:
+
+     (add-hook 'c-mode-common-hook
+               (lambda () (modify-syntax-entry ?_ "w")))
+
+This gives the underscore the word syntax-class in all C-like buffers.
+
+Similarly to Emacs’ definition of a word, the definition of a “symbol”
+is also dependent on the syntax-class of the buffer, which often
+includes the underscore.  The default text objects keymap associates
+kbd::‘o’ with the symbol object, making kbd::‘cio’ a good alternative to
+Vim’s kbd::‘ciw’, for example.  The following will swap between the word
+and symbol objects in the keymap:
+
+     (define-key evil-outer-text-objects-map "w" 'evil-a-symbol)
+     (define-key evil-inner-text-objects-map "w" 'evil-inner-symbol)
+     (define-key evil-outer-text-objects-map "o" 'evil-a-word)
+     (define-key evil-inner-text-objects-map "o" 'evil-inner-word)
+
+This will not change the motion keys, however.  One way to make word
+motions operate as symbol motions is to alias the ‘evil-word’ `thing'
+(1) to the ‘evil-symbol’ thing:
+
+     (defalias 'forward-evil-word 'forward-evil-symbol)
+
+   ---------- Footnotes ----------
+
+   (1) (1) Many of Evil’s text objects and motions are defined in terms
+of the `thingatpt' library, which in this case are defined entirely in
+terms of ‘forward-THING’ functions.  Thus aliasing one to another should
+make all motions and text objects implemented in terms of that `thing'
+behave the same.
+
+
+File: evil.info,  Node: Internals,  Next: The GNU Free Documentation License,  Prev: Frequently Asked Questions,  Up: Top
+
+7 Internals
+***********
+
+* Menu:
+
+* Command properties::
+
+
+File: evil.info,  Node: Command properties,  Up: Internals
+
+7.1 Command properties
+======================
+
+Evil defines `command properties' to store information about commands
+(1), such as whether they should be repeated.  A command property is a
+‘:keyword’ with an associated value, e.g.  ‘:repeat nil’.
+
+ -- Emacs Lisp Autofunction: (evil-add-command-properties COMMAND
+          [PROPERTIES...])
+
+     Add `PROPERTIES' to `COMMAND'. `PROPERTIES' should be a property
+     list.  To replace all properties at once, use *note
+     evil-set-command-properties: 2f.
+
+ -- Emacs Lisp Autofunction: (evil-set-command-properties COMMAND
+          [PROPERTIES...])
+
+     Replace all of `COMMAND'’s properties with `PROPERTIES'.
+     `PROPERTIES' should be a property list.  This erases all previous
+     properties; to only add properties, use
+     ‘evil-set-command-property’.
+
+ -- Emacs Lisp Autofunction: (evil-get-command-properties COMMAND)
+
+     Return all Evil properties of `COMMAND'. See also *note
+     evil-get-command-property: 1b.
+
+ -- Emacs Lisp Autofunction: (evil-get-command-property COMMAND PROPERTY
+          [DEFAULT])
+
+     Return the value of Evil `PROPERTY' of `COMMAND'. If the command
+     does not have the property, return `DEFAULT'. See also *note
+     evil-get-command-properties: 1a.
+
+ -- Emacs Lisp Autofunction: (evil-define-command COMMAND (ARGS...) DOC
+          [[KEY VALUE]...] BODY...)
+
+     Define a command `COMMAND'.
+
+For setting repeat properties, use the following functions:
+
+ -- Emacs Lisp Autofunction: (evil-declare-repeat COMMAND)
+
+     Declare `COMMAND' to be repeatable.
+
+ -- Emacs Lisp Autofunction: (evil-declare-not-repeat COMMAND)
+
+     Declare `COMMAND' to be nonrepeatable.
+
+ -- Emacs Lisp Autofunction: (evil-declare-change-repeat COMMAND)
+
+     Declare `COMMAND' to be repeatable by buffer changes rather than
+     keystrokes.
+
+   ---------- Footnotes ----------
+
+   (1) (1) In this context, a `command' may mean any Evil motion, text
+object, operator or indeed other Emacs commands, which have not been
+defined through the Evil machinery.
+
+
+File: evil.info,  Node: The GNU Free Documentation License,  Next: Emacs lisp functions and variables,  Prev: Internals,  Up: Top
+
+8 The GNU Free Documentation License
+************************************
+
+Version 1.3, 3 November 2008
+
+     Copyright (c) 2000, 2001, 2002, 2007, 2008 Free Software
+     Foundation, Inc.  ‘http://fsf.org/’
+
+     Everyone is permitted to copy and distribute verbatim copies of
+     this license document, but changing it is not allowed.
+
+  0. PREAMBLE
+
+     The purpose of this License is to make a manual, textbook, or other
+     functional and useful document `free' in the sense of freedom: to
+     assure everyone the effective freedom to copy and redistribute it,
+     with or without modifying it, either commercially or
+     noncommercially.  Secondarily, this License preserves for the
+     author and publisher a way to get credit for their work, while not
+     being considered responsible for modifications made by others.
+
+     This License is a kind of “copyleft”, which means that derivative
+     works of the document must themselves be free in the same sense.
+     It complements the GNU General Public License, which is a copyleft
+     license designed for free software.
+
+     We have designed this License in order to use it for manuals for
+     free software, because free software needs free documentation: a
+     free program should come with manuals providing the same freedoms
+     that the software does.  But this License is not limited to
+     software manuals; it can be used for any textual work, regardless
+     of subject matter or whether it is published as a printed book.  We
+     recommend this License principally for works whose purpose is
+     instruction or reference.
+
+  1. APPLICABILITY AND DEFINITIONS
+
+     This License applies to any manual or other work, in any medium,
+     that contains a notice placed by the copyright holder saying it can
+     be distributed under the terms of this License.  Such a notice
+     grants a world-wide, royalty-free license, unlimited in duration,
+     to use that work under the conditions stated herein.  The
+     “Document”, below, refers to any such manual or work.  Any member
+     of the public is a licensee, and is addressed as “you”.  You accept
+     the license if you copy, modify or distribute the work in a way
+     requiring permission under copyright law.
+
+     A “Modified Version” of the Document means any work containing the
+     Document or a portion of it, either copied verbatim, or with
+     modifications and/or translated into another language.
+
+     A “Secondary Section” is a named appendix or a front-matter section
+     of the Document that deals exclusively with the relationship of the
+     publishers or authors of the Document to the Document’s overall
+     subject (or to related matters) and contains nothing that could
+     fall directly within that overall subject.  (Thus, if the Document
+     is in part a textbook of mathematics, a Secondary Section may not
+     explain any mathematics.)  The relationship could be a matter of
+     historical connection with the subject or with related matters, or
+     of legal, commercial, philosophical, ethical or political position
+     regarding them.
+
+     The “Invariant Sections” are certain Secondary Sections whose
+     titles are designated, as being those of Invariant Sections, in the
+     notice that says that the Document is released under this License.
+     If a section does not fit the above definition of Secondary then it
+     is not allowed to be designated as Invariant.  The Document may
+     contain zero Invariant Sections.  If the Document does not identify
+     any Invariant Sections then there are none.
+
+     The “Cover Texts” are certain short passages of text that are
+     listed, as Front-Cover Texts or Back-Cover Texts, in the notice
+     that says that the Document is released under this License.  A
+     Front-Cover Text may be at most 5 words, and a Back-Cover Text may
+     be at most 25 words.
+
+     A “Transparent” copy of the Document means a machine-readable copy,
+     represented in a format whose specification is available to the
+     general public, that is suitable for revising the document
+     straightforwardly with generic text editors or (for images composed
+     of pixels) generic paint programs or (for drawings) some widely
+     available drawing editor, and that is suitable for input to text
+     formatters or for automatic translation to a variety of formats
+     suitable for input to text formatters.  A copy made in an otherwise
+     Transparent file format whose markup, or absence of markup, has
+     been arranged to thwart or discourage subsequent modification by
+     readers is not Transparent.  An image format is not Transparent if
+     used for any substantial amount of text.  A copy that is not
+     “Transparent” is called “Opaque”.
+
+     Examples of suitable formats for Transparent copies include plain
+     ASCII without markup, Texinfo input format, LaTeX input format,
+     SGML or XML using a publicly available DTD, and standard-conforming
+     simple HTML, PostScript or PDF designed for human modification.
+     Examples of transparent image formats include PNG, XCF and JPG.
+     Opaque formats include proprietary formats that can be read and
+     edited only by proprietary word processors, SGML or XML for which
+     the DTD and/or processing tools are not generally available, and
+     the machine-generated HTML, PostScript or PDF produced by some word
+     processors for output purposes only.
+
+     The “Title Page” means, for a printed book, the title page itself,
+     plus such following pages as are needed to hold, legibly, the
+     material this License requires to appear in the title page.  For
+     works in formats which do not have any title page as such, “Title
+     Page” means the text near the most prominent appearance of the
+     work’s title, preceding the beginning of the body of the text.
+
+     The “publisher” means any person or entity that distributes copies
+     of the Document to the public.
+
+     A section “Entitled XYZ” means a named subunit of the Document
+     whose title either is precisely XYZ or contains XYZ in parentheses
+     following text that translates XYZ in another language.  (Here XYZ
+     stands for a specific section name mentioned below, such as
+     “Acknowledgements”, “Dedications”, “Endorsements”, or “History”.)
+     To “Preserve the Title” of such a section when you modify the
+     Document means that it remains a section “Entitled XYZ” according
+     to this definition.
+
+     The Document may include Warranty Disclaimers next to the notice
+     which states that this License applies to the Document.  These
+     Warranty Disclaimers are considered to be included by reference in
+     this License, but only as regards disclaiming warranties: any other
+     implication that these Warranty Disclaimers may have is void and
+     has no effect on the meaning of this License.
+
+  2. VERBATIM COPYING
+
+     You may copy and distribute the Document in any medium, either
+     commercially or noncommercially, provided that this License, the
+     copyright notices, and the license notice saying this License
+     applies to the Document are reproduced in all copies, and that you
+     add no other conditions whatsoever to those of this License.  You
+     may not use technical measures to obstruct or control the reading
+     or further copying of the copies you make or distribute.  However,
+     you may accept compensation in exchange for copies.  If you
+     distribute a large enough number of copies you must also follow the
+     conditions in section 3.
+
+     You may also lend copies, under the same conditions stated above,
+     and you may publicly display copies.
+
+  3. COPYING IN QUANTITY
+
+     If you publish printed copies (or copies in media that commonly
+     have printed covers) of the Document, numbering more than 100, and
+     the Document’s license notice requires Cover Texts, you must
+     enclose the copies in covers that carry, clearly and legibly, all
+     these Cover Texts: Front-Cover Texts on the front cover, and
+     Back-Cover Texts on the back cover.  Both covers must also clearly
+     and legibly identify you as the publisher of these copies.  The
+     front cover must present the full title with all words of the title
+     equally prominent and visible.  You may add other material on the
+     covers in addition.  Copying with changes limited to the covers, as
+     long as they preserve the title of the Document and satisfy these
+     conditions, can be treated as verbatim copying in other respects.
+
+     If the required texts for either cover are too voluminous to fit
+     legibly, you should put the first ones listed (as many as fit
+     reasonably) on the actual cover, and continue the rest onto
+     adjacent pages.
+
+     If you publish or distribute Opaque copies of the Document
+     numbering more than 100, you must either include a machine-readable
+     Transparent copy along with each Opaque copy, or state in or with
+     each Opaque copy a computer-network location from which the general
+     network-using public has access to download using public-standard
+     network protocols a complete Transparent copy of the Document, free
+     of added material.  If you use the latter option, you must take
+     reasonably prudent steps, when you begin distribution of Opaque
+     copies in quantity, to ensure that this Transparent copy will
+     remain thus accessible at the stated location until at least one
+     year after the last time you distribute an Opaque copy (directly or
+     through your agents or retailers) of that edition to the public.
+
+     It is requested, but not required, that you contact the authors of
+     the Document well before redistributing any large number of copies,
+     to give them a chance to provide you with an updated version of the
+     Document.
+
+  4. MODIFICATIONS
+
+     You may copy and distribute a Modified Version of the Document
+     under the conditions of sections 2 and 3 above, provided that you
+     release the Modified Version under precisely this License, with the
+     Modified Version filling the role of the Document, thus licensing
+     distribution and modification of the Modified Version to whoever
+     possesses a copy of it.  In addition, you must do these things in
+     the Modified Version:
+
+       A. Use in the Title Page (and on the covers, if any) a title
+          distinct from that of the Document, and from those of previous
+          versions (which should, if there were any, be listed in the
+          History section of the Document).  You may use the same title
+          as a previous version if the original publisher of that
+          version gives permission.
+
+       B. List on the Title Page, as authors, one or more persons or
+          entities responsible for authorship of the modifications in
+          the Modified Version, together with at least five of the
+          principal authors of the Document (all of its principal
+          authors, if it has fewer than five), unless they release you
+          from this requirement.
+
+       C. State on the Title page the name of the publisher of the
+          Modified Version, as the publisher.
+
+       D. Preserve all the copyright notices of the Document.
+
+       E. Add an appropriate copyright notice for your modifications
+          adjacent to the other copyright notices.
+
+       F. Include, immediately after the copyright notices, a license
+          notice giving the public permission to use the Modified
+          Version under the terms of this License, in the form shown in
+          the Addendum below.
+
+       G. Preserve in that license notice the full lists of Invariant
+          Sections and required Cover Texts given in the Document’s
+          license notice.
+
+       H. Include an unaltered copy of this License.
+
+       I. Preserve the section Entitled “History”, Preserve its Title,
+          and add to it an item stating at least the title, year, new
+          authors, and publisher of the Modified Version as given on the
+          Title Page.  If there is no section Entitled “History” in the
+          Document, create one stating the title, year, authors, and
+          publisher of the Document as given on its Title Page, then add
+          an item describing the Modified Version as stated in the
+          previous sentence.
+
+       J. Preserve the network location, if any, given in the Document
+          for public access to a Transparent copy of the Document, and
+          likewise the network locations given in the Document for
+          previous versions it was based on.  These may be placed in the
+          “History” section.  You may omit a network location for a work
+          that was published at least four years before the Document
+          itself, or if the original publisher of the version it refers
+          to gives permission.
+
+       K. For any section Entitled “Acknowledgements” or “Dedications”,
+          Preserve the Title of the section, and preserve in the section
+          all the substance and tone of each of the contributor
+          acknowledgements and/or dedications given therein.
+
+       L. Preserve all the Invariant Sections of the Document, unaltered
+          in their text and in their titles.  Section numbers or the
+          equivalent are not considered part of the section titles.
+
+       M. Delete any section Entitled “Endorsements”.  Such a section
+          may not be included in the Modified Version.
+
+       N. Do not retitle any existing section to be Entitled
+          “Endorsements” or to conflict in title with any Invariant
+          Section.
+
+       O. Preserve any Warranty Disclaimers.
+
+     If the Modified Version includes new front-matter sections or
+     appendices that qualify as Secondary Sections and contain no
+     material copied from the Document, you may at your option designate
+     some or all of these sections as invariant.  To do this, add their
+     titles to the list of Invariant Sections in the Modified Version’s
+     license notice.  These titles must be distinct from any other
+     section titles.
+
+     You may add a section Entitled “Endorsements”, provided it contains
+     nothing but endorsements of your Modified Version by various
+     parties—for example, statements of peer review or that the text has
+     been approved by an organization as the authoritative definition of
+     a standard.
+
+     You may add a passage of up to five words as a Front-Cover Text,
+     and a passage of up to 25 words as a Back-Cover Text, to the end of
+     the list of Cover Texts in the Modified Version.  Only one passage
+     of Front-Cover Text and one of Back-Cover Text may be added by (or
+     through arrangements made by) any one entity.  If the Document
+     already includes a cover text for the same cover, previously added
+     by you or by arrangement made by the same entity you are acting on
+     behalf of, you may not add another; but you may replace the old
+     one, on explicit permission from the previous publisher that added
+     the old one.
+
+     The author(s) and publisher(s) of the Document do not by this
+     License give permission to use their names for publicity for or to
+     assert or imply endorsement of any Modified Version.
+
+  5. COMBINING DOCUMENTS
+
+     You may combine the Document with other documents released under
+     this License, under the terms defined in section 4 above for
+     modified versions, provided that you include in the combination all
+     of the Invariant Sections of all of the original documents,
+     unmodified, and list them all as Invariant Sections of your
+     combined work in its license notice, and that you preserve all
+     their Warranty Disclaimers.
+
+     The combined work need only contain one copy of this License, and
+     multiple identical Invariant Sections may be replaced with a single
+     copy.  If there are multiple Invariant Sections with the same name
+     but different contents, make the title of each such section unique
+     by adding at the end of it, in parentheses, the name of the
+     original author or publisher of that section if known, or else a
+     unique number.  Make the same adjustment to the section titles in
+     the list of Invariant Sections in the license notice of the
+     combined work.
+
+     In the combination, you must combine any sections Entitled
+     “History” in the various original documents, forming one section
+     Entitled “History”; likewise combine any sections Entitled
+     “Acknowledgements”, and any sections Entitled “Dedications”.  You
+     must delete all sections Entitled “Endorsements.”
+
+  6. COLLECTIONS OF DOCUMENTS
+
+     You may make a collection consisting of the Document and other
+     documents released under this License, and replace the individual
+     copies of this License in the various documents with a single copy
+     that is included in the collection, provided that you follow the
+     rules of this License for verbatim copying of each of the documents
+     in all other respects.
+
+     You may extract a single document from such a collection, and
+     distribute it individually under this License, provided you insert
+     a copy of this License into the extracted document, and follow this
+     License in all other respects regarding verbatim copying of that
+     document.
+
+  7. AGGREGATION WITH INDEPENDENT WORKS
+
+     A compilation of the Document or its derivatives with other
+     separate and independent documents or works, in or on a volume of a
+     storage or distribution medium, is called an “aggregate” if the
+     copyright resulting from the compilation is not used to limit the
+     legal rights of the compilation’s users beyond what the individual
+     works permit.  When the Document is included in an aggregate, this
+     License does not apply to the other works in the aggregate which
+     are not themselves derivative works of the Document.
+
+     If the Cover Text requirement of section 3 is applicable to these
+     copies of the Document, then if the Document is less than one half
+     of the entire aggregate, the Document’s Cover Texts may be placed
+     on covers that bracket the Document within the aggregate, or the
+     electronic equivalent of covers if the Document is in electronic
+     form.  Otherwise they must appear on printed covers that bracket
+     the whole aggregate.
+
+  8. TRANSLATION
+
+     Translation is considered a kind of modification, so you may
+     distribute translations of the Document under the terms of section
+     4.  Replacing Invariant Sections with translations requires special
+     permission from their copyright holders, but you may include
+     translations of some or all Invariant Sections in addition to the
+     original versions of these Invariant Sections.  You may include a
+     translation of this License, and all the license notices in the
+     Document, and any Warranty Disclaimers, provided that you also
+     include the original English version of this License and the
+     original versions of those notices and disclaimers.  In case of a
+     disagreement between the translation and the original version of
+     this License or a notice or disclaimer, the original version will
+     prevail.
+
+     If a section in the Document is Entitled “Acknowledgements”,
+     “Dedications”, or “History”, the requirement (section 4) to
+     Preserve its Title (section 1) will typically require changing the
+     actual title.
+
+  9. TERMINATION
+
+     You may not copy, modify, sublicense, or distribute the Document
+     except as expressly provided under this License.  Any attempt
+     otherwise to copy, modify, sublicense, or distribute it is void,
+     and will automatically terminate your rights under this License.
+
+     However, if you cease all violation of this License, then your
+     license from a particular copyright holder is reinstated (a)
+     provisionally, unless and until the copyright holder explicitly and
+     finally terminates your license, and (b) permanently, if the
+     copyright holder fails to notify you of the violation by some
+     reasonable means prior to 60 days after the cessation.
+
+     Moreover, your license from a particular copyright holder is
+     reinstated permanently if the copyright holder notifies you of the
+     violation by some reasonable means, this is the first time you have
+     received notice of violation of this License (for any work) from
+     that copyright holder, and you cure the violation prior to 30 days
+     after your receipt of the notice.
+
+     Termination of your rights under this section does not terminate
+     the licenses of parties who have received copies or rights from you
+     under this License.  If your rights have been terminated and not
+     permanently reinstated, receipt of a copy of some or all of the
+     same material does not give you any rights to use it.
+
+  10. FUTURE REVISIONS OF THIS LICENSE
+
+     The Free Software Foundation may publish new, revised versions of
+     the GNU Free Documentation License from time to time.  Such new
+     versions will be similar in spirit to the present version, but may
+     differ in detail to address new problems or concerns.  See
+     ‘http://www.gnu.org/copyleft’.
+
+     Each version of the License is given a distinguishing version
+     number.  If the Document specifies that a particular numbered
+     version of this License “or any later version” applies to it, you
+     have the option of following the terms and conditions either of
+     that specified version or of any later version that has been
+     published (not as a draft) by the Free Software Foundation.  If the
+     Document does not specify a version number of this License, you may
+     choose any version ever published (not as a draft) by the Free
+     Software Foundation.  If the Document specifies that a proxy can
+     decide which future versions of this License can be used, that
+     proxy’s public statement of acceptance of a version permanently
+     authorizes you to choose that version for the Document.
+
+  11. RELICENSING
+
+     “Massive Multiauthor Collaboration Site” (or “MMC Site”) means any
+     World Wide Web server that publishes copyrightable works and also
+     provides prominent facilities for anybody to edit those works.  A
+     public wiki that anybody can edit is an example of such a server.
+     A “Massive Multiauthor Collaboration” (or “MMC”) contained in the
+     site means any set of copyrightable works thus published on the MMC
+     site.
+
+     “CC-BY-SA” means the Creative Commons Attribution-Share Alike 3.0
+     license published by Creative Commons Corporation, a not-for-profit
+     corporation with a principal place of business in San Francisco,
+     California, as well as future copyleft versions of that license
+     published by that same organization.
+
+     “Incorporate” means to publish or republish a Document, in whole or
+     in part, as part of another Document.
+
+     An MMC is “eligible for relicensing” if it is licensed under this
+     License, and if all works that were first published under this
+     License somewhere other than this MMC, and subsequently
+     incorporated in whole or in part into the MMC, (1) had no cover
+     texts or invariant sections, and (2) were thus incorporated prior
+     to November 1, 2008.
+
+     The operator of an MMC Site may republish an MMC contained in the
+     site under CC-BY-SA on the same site at any time before August 1,
+     2009, provided the MMC is eligible for relicensing.
+
+
+File: evil.info,  Node: Emacs lisp functions and variables,  Prev: The GNU Free Documentation License,  Up: Top
+
+Emacs lisp functions and variables
+**********************************
+
+* Menu:
+
+* evil-add-command-properties: 0.
+* evil-auto-balance-windows: 1.
+* evil-auto-indent: 2.
+* evil-backspace-join-lines: 3.
+* evil-bigword: 4.
+* evil-buffer-regexps: 5.
+* evil-complete-all-buffers: 6.
+* evil-cross-lines: 7.
+* evil-declare-change-repeat: 8.
+* evil-declare-motion: 9.
+* evil-declare-not-repeat: a.
+* evil-declare-repeat: b.
+* evil-default-cursor: c.
+* evil-default-state: d.
+* evil-define-command: e.
+* evil-define-key: f.
+* evil-define-motion: 10.
+* evil-define-operator: 11.
+* evil-define-state: 12.
+* evil-define-text-object: 13.
+* evil-define-type: 14.
+* evil-disable-insert-state-bindings: 15.
+* evil-echo-state: 16.
+* evil-esc-delay: 17.
+* evil-ex-hl-update-delay: 18.
+* evil-flash-delay: 19.
+* evil-get-command-properties: 1a.
+* evil-get-command-property: 1b.
+* evil-global-set-key: 1c.
+* evil-highlight-closing-paren-at-point-states: 1d.
+* evil-indent-convert-tabs: 1e.
+* evil-intercept-esc: 1f.
+* evil-kbd-macro-suppress-motion-error: 20.
+* evil-kill-on-visual-paste: 21.
+* evil-local-set-key: 22.
+* evil-mode-line-format: 23.
+* evil-mouse-word: 24.
+* evil-move-beyond-eol: 25.
+* evil-move-cursor-back: 26.
+* evil-regexp-search: 27.
+* evil-repeat-move-cursor: 28.
+* evil-respect-visual-line-mode: 29.
+* evil-search-module: 2a.
+* evil-search-wrap: 2b.
+* evil-select-an-object: 2c.
+* evil-select-inner-object: 2d.
+* evil-select-paren: 2e.
+* evil-set-command-properties: 2f.
+* evil-set-initial-state: 30.
+* evil-set-leader: 31.
+* evil-shift-round: 32.
+* evil-shift-width: 33.
+* evil-show-paren-range: 34.
+* evil-split-window-below: 35.
+* evil-start-of-line: 36.
+* evil-toggle-key: 37.
+* evil-track-eol: 38.
+* evil-undo-system: 39.
+* evil-vsplit-window-right: 3a.
+* evil-want-C-d-scroll: 3b.
+* evil-want-C-i-jump: 3c.
+* evil-want-C-u-delete: 3d.
+* evil-want-C-u-scroll: 3e.
+* evil-want-C-w-delete: 3f.
+* evil-want-C-w-in-emacs-state: 40.
+* evil-want-empty-ex-last-command: 41.
+* evil-want-fine-undo: 42.
+* evil-want-Y-yank-to-eol: 43.
+
+
+
+Tag Table:
+Node: Top366
+Ref: index doc613
+Ref: 44613
+Node: Overview1443
+Ref: overview doc1518
+Ref: 451518
+Ref: overview evil1518
+Ref: 461518
+Ref: overview overview1518
+Ref: 471518
+Ref: Overview-Footnote-11871
+Node: Installation via package el2127
+Ref: overview installation-via-package-el2225
+Ref: 482225
+Ref: Installation via package el-Footnote-13160
+Node: Manual installation3204
+Ref: overview manual-installation3327
+Ref: 493327
+Node: Modes and states3865
+Ref: overview modes-and-states3952
+Ref: 4a3952
+Node: Settings5703
+Ref: settings doc5782
+Ref: 4b5782
+Ref: settings settings5782
+Ref: 4c5782
+Ref: Settings-Footnote-16541
+Node: The initial state6682
+Ref: settings the-initial-state6782
+Ref: 4d6782
+Ref: settings elispobj-evil-set-initial-state7057
+Ref: 307057
+Ref: settings elispobj-evil-default-state7296
+Ref: d7296
+Ref: settings elispobj-evil-buffer-regexps7907
+Ref: 57907
+Node: Keybindings and other behaviour8400
+Ref: settings keybindings-and-other-behaviour8515
+Ref: 4e8515
+Ref: settings elispobj-evil-toggle-key8737
+Ref: 378737
+Ref: settings elispobj-evil-want-C-i-jump8937
+Ref: 3c8937
+Ref: settings elispobj-evil-want-C-u-delete9127
+Ref: 3d9127
+Ref: settings elispobj-evil-want-C-u-scroll9446
+Ref: 3e9446
+Ref: settings elispobj-evil-want-C-d-scroll9739
+Ref: 3b9739
+Ref: settings elispobj-evil-want-C-w-delete9862
+Ref: 3f9862
+Ref: settings elispobj-evil-want-C-w-in-emacs-state9992
+Ref: 409992
+Ref: settings elispobj-evil-want-Y-yank-to-eol10142
+Ref: 4310142
+Ref: settings elispobj-evil-disable-insert-state-bindings10337
+Ref: 1510337
+Node: Search10665
+Ref: settings search10774
+Ref: 5010774
+Ref: settings elispobj-evil-search-module10797
+Ref: 2a10797
+Ref: settings elispobj-evil-regexp-search11182
+Ref: 2711182
+Ref: settings elispobj-evil-search-wrap11333
+Ref: 2b11333
+Ref: settings elispobj-evil-flash-delay11539
+Ref: 1911539
+Ref: settings elispobj-evil-ex-hl-update-delay11682
+Ref: 1811682
+Node: Indentation11955
+Ref: settings indentation12048
+Ref: 5112048
+Ref: settings elispobj-evil-auto-indent12081
+Ref: 212081
+Ref: settings elispobj-evil-shift-width12239
+Ref: 3312239
+Ref: settings elispobj-evil-shift-round12445
+Ref: 3212445
+Ref: settings elispobj-evil-indent-convert-tabs12706
+Ref: 1e12706
+Node: Cursor movement12975
+Ref: settings cursor-movement13076
+Ref: 5213076
+Ref: settings elispobj-evil-repeat-move-cursor13655
+Ref: 2813655
+Ref: settings elispobj-evil-move-cursor-back13919
+Ref: 2613919
+Ref: settings elispobj-evil-move-beyond-eol14264
+Ref: 2514264
+Ref: settings elispobj-evil-cross-lines14506
+Ref: 714506
+Ref: settings elispobj-evil-respect-visual-line-mode14901
+Ref: 2914901
+Ref: settings elispobj-evil-track-eol15416
+Ref: 3815416
+Ref: settings elispobj-evil-start-of-line15784
+Ref: 3615784
+Node: Cursor display16038
+Ref: settings cursor-display16145
+Ref: 5316145
+Ref: settings elispobj-evil-default-cursor16489
+Ref: c16489
+Node: Window management16772
+Ref: settings window-management16888
+Ref: 5416888
+Ref: settings elispobj-evil-auto-balance-windows16933
+Ref: 116933
+Ref: settings elispobj-evil-split-window-below17079
+Ref: 3517079
+Ref: settings elispobj-evil-vsplit-window-right17208
+Ref: 3a17208
+Node: Parenthesis highlighting17361
+Ref: settings parenthesis-highlighting17476
+Ref: 5517476
+Ref: settings elispobj-evil-show-paren-range17665
+Ref: 3417665
+Ref: settings elispobj-evil-highlight-closing-paren-at-point-states17852
+Ref: 1d17852
+Node: Miscellaneous18438
+Ref: settings miscellaneous18527
+Ref: 5618527
+Ref: settings elispobj-evil-want-fine-undo18564
+Ref: 4218564
+Ref: settings elispobj-evil-undo-system19203
+Ref: 3919203
+Ref: settings elispobj-evil-backspace-join-lines19562
+Ref: 319562
+Ref: settings elispobj-evil-kbd-macro-suppress-motion-error19703
+Ref: 2019703
+Ref: settings elispobj-evil-mode-line-format20458
+Ref: 2320458
+Ref: settings elispobj-evil-mouse-word20990
+Ref: 2420990
+Ref: settings elispobj-evil-bigword21331
+Ref: 421331
+Ref: settings elispobj-evil-esc-delay21635
+Ref: 1721635
+Ref: settings elispobj-evil-intercept-esc22041
+Ref: 1f22041
+Ref: settings elispobj-evil-kill-on-visual-paste22667
+Ref: 2122667
+Ref: settings elispobj-evil-echo-state22928
+Ref: 1622928
+Ref: settings elispobj-evil-complete-all-buffers23057
+Ref: 623057
+Ref: settings elispobj-evil-want-empty-ex-last-command23258
+Ref: 4123258
+Node: Keymaps23416
+Ref: keymaps doc23492
+Ref: 5723492
+Ref: keymaps chapter-keymaps23492
+Ref: 4f23492
+Ref: keymaps keymaps23492
+Ref: 5823492
+Ref: keymaps elispobj-evil-global-set-key25144
+Ref: 1c25144
+Ref: keymaps elispobj-evil-local-set-key25248
+Ref: 2225248
+Node: evil-define-key25677
+Ref: keymaps evil-define-key25754
+Ref: 5925754
+Ref: keymaps elispobj-evil-define-key26008
+Ref: f26008
+Node: Leader keys29205
+Ref: keymaps leader-keys29282
+Ref: 5a29282
+Ref: keymaps elispobj-evil-set-leader29809
+Ref: 3129809
+Node: Hooks30262
+Ref: hooks doc30339
+Ref: 5b30339
+Ref: hooks hooks30339
+Ref: 5c30339
+Node: Extension30991
+Ref: extension doc31087
+Ref: 5d31087
+Ref: extension extension31087
+Ref: 5e31087
+Node: Motions31323
+Ref: extension motions31392
+Ref: 5f31392
+Ref: extension elispobj-evil-declare-motion31645
+Ref: 931645
+Ref: extension elispobj-evil-define-motion31818
+Ref: 1031818
+Node: Operators33209
+Ref: extension operators33299
+Ref: 6033299
+Ref: extension elispobj-evil-define-operator33547
+Ref: 1133547
+Node: Text objects35152
+Ref: extension text-objects35246
+Ref: 6135246
+Ref: extension elispobj-evil-define-text-object35786
+Ref: 1335786
+Ref: extension elispobj-evil-select-inner-object37290
+Ref: 2d37290
+Ref: extension elispobj-evil-select-an-object37860
+Ref: 2c37860
+Ref: extension elispobj-evil-select-paren38427
+Ref: 2e38427
+Ref: Text objects-Footnote-139349
+Node: Range types39515
+Ref: extension range-types39606
+Ref: 6239606
+Ref: extension elispobj-evil-define-type39909
+Ref: 1439909
+Node: States41078
+Ref: extension states41148
+Ref: 6341148
+Ref: extension elispobj-evil-define-state41448
+Ref: 1241448
+Node: Frequently Asked Questions42877
+Ref: faq doc42977
+Ref: 6442977
+Ref: faq frequently-asked-questions42977
+Ref: 6542977
+Node: Problems with the escape key in the terminal43134
+Ref: faq problems-with-the-escape-key-in-the-terminal43282
+Ref: 6643282
+Node: Underscore is not a word character45776
+Ref: faq underscore-is-not-a-word-character45924
+Ref: 6745924
+Ref: Underscore is not a word character-Footnote-148522
+Node: Internals48833
+Ref: internals doc48958
+Ref: 6848958
+Ref: internals internals48958
+Ref: 6948958
+Node: Command properties49016
+Ref: internals command-properties49078
+Ref: 6a49078
+Ref: internals elispobj-evil-add-command-properties49333
+Ref: 049333
+Ref: internals elispobj-evil-set-command-properties49593
+Ref: 2f49593
+Ref: internals elispobj-evil-get-command-properties49906
+Ref: 1a49906
+Ref: internals elispobj-evil-get-command-property50072
+Ref: 1b50072
+Ref: internals elispobj-evil-define-command50342
+Ref: e50342
+Ref: internals elispobj-evil-declare-repeat50546
+Ref: b50546
+Ref: internals elispobj-evil-declare-not-repeat50648
+Ref: a50648
+Ref: internals elispobj-evil-declare-change-repeat50757
+Ref: 850757
+Ref: Command properties-Footnote-150948
+Node: The GNU Free Documentation License51125
+Ref: license doc51258
+Ref: 6b51258
+Ref: license the-gnu-free-documentation-license51258
+Ref: 6c51258
+Node: Emacs lisp functions and variables75066
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection-autoloads.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection-autoloads.el
new file mode 100644
index 0000000..335410a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection-autoloads.el
@@ -0,0 +1,140 @@
+;;; evil-collection-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from evil-collection.el
+
+(autoload 'evil-collection-translate-minor-mode-key "evil-collection" "\
+Translate keys in the keymap(s) corresponding to STATES and MODES.
+
+Similar to `evil-collection-translate-key' but for minor modes.
+STATES should be the name of an evil state, a list of states, or nil. MODES
+should be a symbol corresponding to minor-mode to make the translations in or a
+list of minor-mode symbols. TRANSLATIONS corresponds to a list of
+key replacement pairs. For example, specifying \"a\" \"b\" will bind \"a\" to
+\"b\"'s definition in the keymap. Specifying nil as a replacement will unbind a
+key. If DESTRUCTIVE is nil, a backup of the keymap will be stored on the initial
+invocation, and future invocations will always look up keys in the backup
+keymap. When no TRANSLATIONS are given, this function will only create the
+backup keymap without making any translations. On the other hand, if DESTRUCTIVE
+is non-nil, the keymap will be destructively altered without creating a backup.
+For example, calling this function multiple times with \"a\" \"b\" \"b\" \"a\"
+would continue to swap and unswap the definitions of these keys. This means that
+when DESTRUCTIVE is non-nil, all related swaps/cycles should be done in the same
+invocation.
+
+(fn STATES MODES &rest TRANSLATIONS &key DESTRUCTIVE &allow-other-keys)")
+(function-put 'evil-collection-translate-minor-mode-key 'lisp-indent-function 'defun)
+(autoload 'evil-collection-translate-key "evil-collection" "\
+Translate keys in the keymap(s) corresponding to STATES and KEYMAPS.
+STATES should be the name of an evil state, a list of states, or nil. KEYMAPS
+should be a symbol corresponding to the keymap to make the translations in or a
+list of keymap symbols. Like `evil-define-key', when a keymap does not exist,
+the keybindings will be deferred until the keymap is defined, so
+`with-eval-after-load' is not necessary. TRANSLATIONS corresponds to a list of
+key replacement pairs. For example, specifying \"a\" \"b\" will bind \"a\" to
+\"b\"'s definition in the keymap. Specifying nil as a replacement will unbind a
+key. If DESTRUCTIVE is nil, a backup of the keymap will be stored on the initial
+invocation, and future invocations will always look up keys in the backup
+keymap. When no TRANSLATIONS are given, this function will only create the
+backup keymap without making any translations. On the other hand, if DESTRUCTIVE
+is non-nil, the keymap will be destructively altered without creating a backup.
+For example, calling this function multiple times with \"a\" \"b\" \"b\" \"a\"
+would continue to swap and unswap the definitions of these keys. This means that
+when DESTRUCTIVE is non-nil, all related swaps/cycles should be done in the same
+invocation.
+
+(fn STATES KEYMAPS &rest TRANSLATIONS &key DESTRUCTIVE &allow-other-keys)")
+(function-put 'evil-collection-translate-key 'lisp-indent-function 'defun)
+(autoload 'evil-collection-swap-key "evil-collection" "\
+Wrapper around `evil-collection-translate-key' for swapping keys.
+STATES, KEYMAPS, and ARGS are passed to `evil-collection-translate-key'. ARGS
+should consist of key swaps (e.g. \"a\" \"b\" is equivalent to \"a\" \"b\" \"b\"
+\"a\" with `evil-collection-translate-key') and optionally keyword arguments for
+`evil-collection-translate-key'.
+
+(fn STATES KEYMAPS &rest ARGS)" nil t)
+(function-put 'evil-collection-swap-key 'lisp-indent-function 'defun)
+(autoload 'evil-collection-swap-minor-mode-key "evil-collection" "\
+Wrapper around `evil-collection-translate-minor-mode-key' for swapping keys.
+STATES, MODES, and ARGS are passed to
+`evil-collection-translate-minor-mode-key'. ARGS should consist of key swaps
+(e.g. \"a\" \"b\" is equivalent to \"a\" \"b\" \"b\" \"a\"
+with `evil-collection-translate-minor-mode-key') and optionally keyword
+arguments for `evil-collection-translate-minor-mode-key'.
+
+(fn STATES MODES &rest ARGS)" nil t)
+(function-put 'evil-collection-swap-minor-mode-key 'lisp-indent-function 'defun)
+(autoload 'evil-collection-require "evil-collection" "\
+Require the evil-collection-MODE file, but do not activate it.
+
+MODE should be a symbol. This requires the evil-collection-MODE
+feature without needing to manipulate `load-path'. NOERROR is
+forwarded to `require'.
+
+(fn MODE &optional NOERROR)")
+(autoload 'evil-collection-init "evil-collection" "\
+Register the Evil bindings for all modes in `evil-collection-mode-list'.
+
+Alternatively, you may register select bindings manually, for
+instance:
+
+  (with-eval-after-load ='calendar
+    (evil-collection-calendar-setup))
+
+If MODES is specified (as either one mode or a list of modes), use those modes
+instead of the modes in `evil-collection-mode-list'.
+
+(fn &optional MODES)" t)
+(autoload 'evil-collection-unmap "evil-collection" "\
+Completely unmap THINGS from MAP-SYM.
+
+MAP-SYM is a symbol bound to a keymap. If MAP-SYM is not yet bound
+to a keymap, the operation is deferred via `after-load-functions',
+matching the deferral behaviour of `evil-collection-define-key'.
+
+Each thing in THINGS is one of:
+
+  - A command symbol — every binding pointing to that command
+    anywhere in the keymap is removed (TAB, RET, C-c TAB,
+    evil-state bindings, [remap ...] entries, etc.).
+
+  - A key description string accepted by `kbd' (e.g. \"RET\",
+    \"a\", \"<return>\", \"TAB\", \"C-c C-c\") — the binding at
+    that exact key sequence is removed at the top level and
+    inside every evil-state auxiliary keymap.
+
+  - A key vector — same as a key description, already parsed.
+
+Removals use `define-key' with REMOVE set, so bindings are
+deleted entirely, not just shadowed with nil.
+
+Parent keymaps installed via `set-keymap-parent' are not modified,
+and sub-keymaps stored under events in
+`evil-collection-unmap-skip-events' (menu-bar, tool-bar, etc.) are
+not descended into.
+
+(fn MAP-SYM &rest THINGS)")
+(function-put 'evil-collection-unmap 'lisp-indent-function 'defun)
+(register-definition-prefixes "evil-collection" '("evil-collection-"))
+
+;;; End of scraped data
+
+(provide 'evil-collection-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; evil-collection-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection-pkg.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection-pkg.el
new file mode 100644
index 0000000..a30955b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection-pkg.el
@@ -0,0 +1,11 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "evil-collection" "20260818.145"
+  "A set of keybindings for Evil mode."
+  '((emacs "29.1")
+    (evil  "1.2.13"))
+  :url "https://github.com/emacs-evil/evil-collection"
+  :commit "0a9a4c46e274584f66a2e0c313819697c0ab0d2d"
+  :revdesc "0a9a4c46e274"
+  :keywords '("evil" "tools")
+  :authors '(("James Nguyen" . "james@jojojames.com"))
+  :maintainers '(("James Nguyen" . "james@jojojames.com")))
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection.el
new file mode 100644
index 0000000..68edd3d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection.el
@@ -0,0 +1,1653 @@
+;;; evil-collection.el --- A set of keybindings for Evil mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017, 2023 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Package-Version: 20260818.145
+;; Package-Revision: 0a9a4c46e274
+;; Package-Requires: ((emacs "29.1") (evil "1.2.13"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; A set of keybindings for Evil mode.
+;;
+;; If you want to use Evil in the minibuffer, you'll have to enable it by
+;; setting `evil-collection-setup-minibuffer' to t before loading this package.
+;; This is so because many users find it confusing.
+;; Some minibuffer-related packages such as Helm rely on this option.
+
+;;; Code:
+
+;; `evil' requires `seq-into'?
+;; This require on `seq' before loading `evil 'prevents `evil' from erroring
+;; out with the below message on Emacs 29.
+;; Symbol's function definition is void: seq-into
+;; Looks like this error can be traced through evil ->
+;; Look at the commit that moved this line above `evil' to see the error message.
+;; evil -> evil-vars -> read-kbd-macro -> seq-into -> error.
+;; https://github.com/emacs-evil/evil/issues/1627
+(require 'seq)
+(require 'cl-lib)
+(require 'evil)
+;; `annalist' is optional; only used to record and describe bindings via
+;; `evil-collection-describe-bindings'. Install it to enable that feature.
+(require 'annalist nil t)
+
+(declare-function annalist-record "annalist")
+(declare-function annalist-describe "annalist")
+(declare-function annalist-define-view "annalist")
+(declare-function annalist-string-< "annalist")
+
+(defvar evil-collection-base-dir (file-name-directory load-file-name)
+  "Store the directory evil-collection.el was loaded from.")
+
+(defvar evil-want-integration)
+(defvar evil-want-keybinding)
+
+(defvar evil-collection--startup-warning-flag nil)
+
+(defun evil-collection-maybe-display-startup-warning ()
+  "Warn if `evil-want-keybinding' was not set before loading Evil.
+Runs at most once."
+  (unless evil-collection--startup-warning-flag
+    (setq evil-collection--startup-warning-flag t)
+    (when (featurep 'evil-keybindings)
+      (if evil-want-keybinding
+          (display-warning
+           '(evil-collection)
+           "Make sure to set `evil-want-keybinding' to nil before loading evil \
+or evil-collection.\
+\n
+See https://github.com/emacs-evil/evil-collection/issues/60 for more details.")
+        (display-warning
+         '(evil-collection)
+         "`evil-want-keybinding' was set to nil but not before loading evil.\
+\n
+Make sure to set `evil-want-keybinding' to nil before loading evil \
+or evil-collection.\
+\n
+See https://github.com/emacs-evil/evil-collection/issues/60 for more details.")))))
+
+(unless (featurep 'evil-integration)
+  (message "Requiring evil-integration. Set evil-want-integration to t to\
+ remove this message.\
+\n
+See https://github.com/emacs-evil/evil-collection/issues/60 for more details.")
+  (require 'evil-integration))
+
+(defgroup evil-collection nil
+  "A set of keybindings for Evil mode."
+  :group 'evil)
+
+(defcustom evil-collection-setup-minibuffer nil
+  "Whether to setup Evil bindings in the minibuffer."
+  :type 'boolean)
+
+(defcustom evil-collection-calendar-want-org-bindings nil
+  "Whether to bind Org functions in calendar keymap."
+  :type 'boolean)
+
+(defcustom evil-collection-setup-debugger-keys t
+  "Whether to bind debugger keys when debugger is active.
+
+Debugger in this case is dependent on mode.
+
+This is only relevant for debug modes that are part of another mode,
+
+e.g. `indium'. Modes like `edebug' or `realgud' needs to be explicitly disabled
+
+through removing their entry from `evil-collection-mode-list'.
+
+This variable is obsolete; new customization should use
+`evil-collection-binding-overrides' instead:
+
+  (setq evil-collection-binding-overrides
+        \\='((debug-breakpoint :enabled nil)))"
+  :type 'boolean)
+
+(make-obsolete-variable 'evil-collection-setup-debugger-keys
+                        "use `evil-collection-binding-overrides': `debug-continue', `debug-step-over', `debug-step-into', `debug-step-out', `debug-breakpoint'."
+                        "evil-collection 2.0.0")
+
+(defcustom evil-collection-want-unimpaired-p t
+  "Whether to enable unimpaired style bindings globally."
+  :type 'boolean)
+
+(defcustom evil-collection-want-find-usages-bindings t
+  "Whether to bind `xref-find-references'-like bindings.
+
+This will bind additional find-* type commands, e.g. usages, assignments, etc..
+
+This variable is obsolete; New customization
+should use `evil-collection-binding-overrides' instead:
+
+  (setq evil-collection-binding-overrides
+        \\='((find-usages :enabled nil)))"
+  :type 'boolean)
+
+(make-obsolete-variable 'evil-collection-want-find-usages-bindings
+                        "use `evil-collection-binding-overrides': `find-usages'."
+                        "evil-collection 2.0.0")
+
+(defcustom evil-collection-want-g-bindings t
+  "Whether to bind g* bindings."
+  :type 'boolean)
+
+(defvar evil-collection--modes-with-delayed-setup
+  `(emms
+    eshell)
+  "List of modes whose keybinds aren't completely set up after the mode is
+loaded. This can be a problem for cases where we're doing key translations
+using `evil-collection-setup-hook' which would result in an empty keymap.
+
+Normally we run `evil-collection-setup-hook' right away after the mode
+is loaded in `with-eval-after-load' (see `evil-collection-init') but for these
+modes, we skip running that hook and let the corresponding `evil-collection'
+package handle running `evil-collection-setup-hook'.
+
+Elements in this list either match a target mode symbol or the car of a list in
+`evil-collection--supported-modes'.
+
+If `evil-collection-always-run-setup-hook-after-load' is t, this list isn't
+read and `evil-collection-setup-hook' will be ran in the
+`with-eval-after-load' block in `evil-collection-init'.")
+
+(defcustom evil-collection-always-run-setup-hook-after-load nil
+  "Whether to always run `evil-collection-setup-hook' after mode is loaded.
+
+See `evil-collection-init' and `evil-collection--modes-with-delayed-setup'."
+  :type 'boolean)
+
+(defcustom evil-collection-defer-delay 3
+  "Default idle delay in seconds used when deferring mode initialization.
+
+Used as a fallback when no explicit delay is specified for a mode in
+`evil-collection-defer'."
+  :type 'number)
+
+(defvar evil-collection--supported-modes
+  `(2048-game
+    ag
+    agent-shell
+    agent-shell-manager
+    alchemist
+    anaconda-mode
+    apropos
+    arc-mode
+    atomic-chrome
+    auto-package-update
+    beginend
+    bluetooth
+    bm
+    bookmark
+    (buff-menu "buff-menu")
+    bufler
+    calc
+    calendar
+    cider
+    citre
+    cmake-mode
+    color-rg
+    comint
+    company
+    compile
+    consult
+    corfu
+    crdt
+    (csv "csv-mode")
+    (custom cus-edit)
+    cus-theme
+    dape
+    dashboard
+    daemons
+    deadgrep
+    debbugs
+    debug
+    devdocs
+    dictionary
+    diff-hl
+    diff-mode
+    difftastic
+    dired
+    dired-sidebar
+    disk-usage
+    distel
+    doc-view
+    docker
+    eat
+    ebib
+    ebuku
+    eca
+    edbi
+    edebug
+    ediff
+    eglot
+    elpaca
+    ement
+    explain-pause-mode
+    eldoc
+    elfeed
+    elisp-mode
+    elisp-refs
+    elisp-slime-nav
+    embark
+    emcp
+    emms
+    ,@(when (>= emacs-major-version 29) '(emoji))
+    epa
+    ert
+    eshell
+    eval-sexp-fu
+    evil-ghostel
+    evil-mc
+    eww
+    fanyi
+    finder
+    flycheck
+    flymake
+    fj
+    forge
+    free-keys
+    fzfa
+    geiser
+    ggtags
+    git-timemachine
+    gited
+    gnus
+    go-mode
+    gptel
+    grep
+    guix
+    hackernews
+    helm
+    help
+    helpful
+    hg-histedit
+    hideshow
+    hungry-delete
+    hyrolo
+    ibuffer
+    ielm
+    (image image-mode)
+    image-dired
+    image+
+    imenu
+    imenu-list
+    (indent "indent")
+    indium
+    info
+    ivy
+    js2-mode
+    ,@(when (>= emacs-major-version 30) '(kmacro))
+    leetcode
+    lispy
+    lms
+    log-edit
+    log-view
+    lsp-ui-imenu
+    lua-mode
+    kotlin-mode
+    macrostep
+    man
+    (magit magit-submodule) ;; See https://github.com/emacs-evil/evil-collection/issues/637
+    magit-repos
+    magit-section
+    magit-todos
+    markdown-mode
+    message
+    minesweeper
+    ,@(when evil-collection-setup-minibuffer '(minibuffer))
+    monky
+    mpc
+    mpdel
+    mpdired
+    mu4e
+    mu4e-conversation
+    neotree
+    newsticker
+    notmuch
+    nov
+    omnisharp
+    org
+    org-agenda
+    org-present
+    org-roam
+    osx-dictionary
+    outline
+    ovpn-mode
+    p4
+    (package-menu package)
+    pass
+    (pdf pdf-view)
+    popup
+    proced
+    (process-menu simple)
+    prodigy
+    profiler
+    p-search
+    python
+    quickrun
+    racer
+    racket-describe
+    reader
+    realgud
+    reftex
+    replace ;; For `occur'.
+    restclient
+    rg
+    ripgrep
+    rjsx-mode
+    robe
+    rtags
+    ruby-mode
+    scheme
+    scroll-lock
+    selectrum
+    sh-script
+    shell-maker
+    ,@(when (>= emacs-major-version 28) '(shortdoc))
+    simple
+    simple-mpc
+    slime
+    sly
+    smerge-mode
+    snake
+    so-long
+    speedbar
+    ,@(when (>= emacs-major-version 27) '(tab-bar))
+    tablist
+    tabulated-list
+    tar-mode
+    telega
+    (term term ansi-term multi-term)
+    tetris
+    ,@(when (>= emacs-major-version 27) '(thread))
+    tide
+    timer-list
+    transmission
+    trashed
+    tuareg
+    typescript-mode
+    ultra-scroll
+    vc-annotate
+    vc-dir
+    vc-git
+    vdiff
+    vertico
+    view
+    vlf
+    vterm
+    vundo
+    w3m
+    wdired
+    wgrep
+    which-key
+    with-editor
+    woman
+    xref
+    xwidget
+    yaml-mode
+    youtube-dl
+    zmusic
+    (ztree ztree-diff ztree-dir))
+  "List of modes supported by evil-collection. Elements are
+either target mode symbols or lists which `car' is the mode
+symbol and `cdr' the packages to register.")
+
+(dolist (mode evil-collection--supported-modes)
+  (let ((ec-mode-name (if (listp mode) (car mode) mode)))
+    (autoload
+      (intern (format "evil-collection-%s-setup" ec-mode-name))
+      (expand-file-name
+       (format "modes/%s/evil-collection-%s" ec-mode-name ec-mode-name)
+       evil-collection-base-dir))))
+
+(defcustom evil-collection-mode-list evil-collection--supported-modes
+  "The list of modes which will be evilified by `evil-collection-init'.
+Elements are either target mode symbols or lists which `car' is the
+mode symbol and `cdr' the packages to register.
+
+By default, `minibuffer' is not included because many users find
+this confusing. It will be included if
+`evil-collection-setup-minibuffer' is set to t."
+  :type '(repeat (choice symbol sexp)))
+
+(defcustom evil-collection-config
+  '((buff-menu :defer t)
+    (calc :defer t)
+    (comint :defer t)
+    (debug :defer t)
+    (diff-mode :defer t)
+    (dired :hook dired-mode)
+    (edebug :defer t)
+    (eldoc :defer t)
+    (help :defer t)
+    (image :defer t)
+    (indent :defer t)
+    (info :defer t)
+    (replace :defer t)
+    (outline :defer t)
+    (package-menu :defer t)
+    (process-menu :defer t)
+    (simple :defer t)
+    (tab-bar :defer t)
+    (tabulated-list :defer t)
+    (xref :defer t))
+  "The list of modes with special configuration.
+
+These modes should match entries within `evil-collection-mode-list'.
+
+This variable is consumed only by `evil-collection-setup'.
+
+
+NOTE: The API of this variable may change drastically.
+
+Currently supported keys:
+
+:defer t or TIME in seconds to defer loading mode.
+
+:hook HOOK-NAME to initialize the mode when a hook fires.  The hook
+name does not need the \"-hook\" suffix; it will be appended
+automatically.  When :hook is present, :defer is ignored."
+  :type '(repeat (choice symbol sexp)))
+
+(defcustom evil-collection-key-whitelist '()
+  "List of keys that may be used by Evil Collection.
+This is a list of strings that are suitable for input to
+`kbd'.  If there are no keys in the list, the whitelist will be ignored."
+  :type '(repeat string))
+
+(defcustom evil-collection-key-blacklist '()
+  "List of keys that may not be used by Evil Collection.
+This is a list of strings that are suitable for input to `kbd'."
+  :type '(repeat string))
+
+(defcustom evil-collection-state-passlist '()
+  "List of evil states that may be used by Evil Collection.
+This is a list of symbols that are suitable for input to
+ `evil-define-key'. Ignore when there are no states in the list."
+  :type '(repeat symbol))
+
+(defcustom evil-collection-state-denylist
+  (if (bound-and-true-p evil-disable-insert-state-bindings)
+      '(insert)
+    '())
+  "List of evil states that may not be used by Evil Collection.
+This is a list of symbols that are suitable for input to
+ `evil-define-key'."
+  :type '(repeat symbol))
+
+(defcustom evil-collection-repl-submit-state 'normal
+  "Evil state in which RET submits the prompt in REPL-like buffers.
+
+The other state gets RET bound to `newline'.  S-RET always inserts a
+newline regardless of state.
+
+New customization should use
+`evil-collection-binding-overrides' instead:
+
+  `repl-submit', `repl-newline', `repl-force-newline'
+
+  (setq evil-collection-binding-overrides
+        \\='((repl-submit  :state insert)
+          (repl-newline :state normal)))"
+  :type '(choice (const :tag "Submit in normal state" normal)
+                 (const :tag "Submit in insert state" insert)))
+
+(make-obsolete-variable 'evil-collection-repl-submit-state
+                        "use `evil-collection-binding-overrides': `repl-submit', `repl-newline'."
+                        "evil-collection 2.0.0")
+
+(defvar evil-collection-binding-defaults
+  `((term-toggle-escape :enabled t
+                        :state (normal insert)
+                        :key "C-c C-z")
+    (repl-submit :enabled t
+                 :state ,(lambda (_map-sym _id _keys _command)
+                           evil-collection-repl-submit-state)
+                 :key ("RET" "<return>" "C-m"))
+    (repl-newline :enabled t
+                  :state ,(lambda (_map-sym _id _keys _command)
+                            (if (eq evil-collection-repl-submit-state 'normal)
+                                'insert
+                              'normal))
+                  :key ("RET" "<return>" "C-m"))
+    (repl-force-newline :enabled t
+                        :state (normal insert)
+                        :key ("S-<return>" "S-RET"))
+    (find-usages :enabled ,(lambda (_map-sym _id _keys _command)
+                             evil-collection-want-find-usages-bindings)
+                 :state normal
+                 :key "gr")
+    (find-definition :enabled t :state normal :key "gd")
+    (pop-definition :enabled t :state normal :key "C-t")
+    (lookup-doc :enabled t :state normal :key "K")
+    (goto-repl :enabled t :state normal :key "gz")
+    (find-file :enabled t :state normal :key "gf")
+    (quit :enabled t :state normal :key "q")
+    (quit-save :enabled t :state normal :key "ZZ")
+    (quit-cancel :enabled t :state normal :key "ZQ")
+    (rename :enabled t :state normal :key ("r" "R"))
+    (edit :enabled t :state normal :key ("e" "E"))
+    (browse-url :enabled t :state normal :key "gx")
+    (describe-mode :enabled t :state normal :key "g?")
+    (refresh :enabled t :state normal :key "gr")
+    (refresh-all :enabled t :state normal :key "gR")
+    (action :enabled t :state normal :key ("RET" "<return>"))
+    (action-other :enabled t :state normal :key ("S-<return>" "S-RET" "go"))
+    (action-stay :enabled t :state normal :key ("M-<return>" "M-RET" "gO"))
+    (debug-continue    :enabled ,(lambda (_map-sym _id _keys _command)
+                                    evil-collection-setup-debugger-keys)
+                       :state normal
+                       :key ("c" "<f5>"))
+    (debug-step-over   :enabled ,(lambda (_map-sym _id _keys _command)
+                                    evil-collection-setup-debugger-keys)
+                       :state normal
+                       :key ("n" "<f10>"))
+    (debug-step-into   :enabled ,(lambda (_map-sym _id _keys _command)
+                                    evil-collection-setup-debugger-keys)
+                       :state normal
+                       :key ("i" "s" "<f11>"))
+    (debug-step-out    :enabled ,(lambda (_map-sym _id _keys _command)
+                                    evil-collection-setup-debugger-keys)
+                       :state normal
+                       :key ("o" "<S-f11>"))
+    (debug-breakpoint  :enabled ,(lambda (_map-sym _id _keys _command)
+                                    evil-collection-setup-debugger-keys)
+                       :state normal
+                       :key ("b" "<f9>"))
+    (debug-eval        :enabled ,(lambda (_map-sym _id _keys _command)
+                                    evil-collection-setup-debugger-keys)
+                       :state normal
+                       :key "e")
+    (debug-locals      :enabled ,(lambda (_map-sym _id _keys _command)
+                                    evil-collection-setup-debugger-keys)
+                       :state normal
+                       :key "L")
+    (debug-restart     :enabled ,(lambda (_map-sym _id _keys _command)
+                                    evil-collection-setup-debugger-keys)
+                       :state normal
+                       :key "R")
+    (debug-frame-up    :enabled ,(lambda (_map-sym _id _keys _command)
+                                    evil-collection-setup-debugger-keys)
+                       :state normal
+                       :key "<")
+    (debug-frame-down  :enabled ,(lambda (_map-sym _id _keys _command)
+                                    evil-collection-setup-debugger-keys)
+                       :state normal
+                       :key ">")
+    (next-button :enabled t :state normal :key ("<tab>" "TAB"))
+    (previous-button :enabled t :state normal :key ("<backtab>" "<S-tab>"))
+    (cycle-next :enabled t :state normal :key ("<tab>" "TAB"))
+    (cycle-previous :enabled t :state normal :key ("<backtab>" "<S-tab>"))
+    (section-toggle :enabled t :state normal :key ("<tab>" "TAB"))
+    (section-toggle-all :enabled t :state normal :key ("<backtab>" "<S-tab>"))
+    (next-item :enabled t :state normal :key "gj")
+    (prev-item :enabled t :state normal :key "gk")
+    (next-section :enabled t :state normal :key ("]]"))
+    (prev-section :enabled t :state normal :key ("[["))
+    (next-section-2 :enabled t :state normal :key "C-j")
+    (prev-section-2 :enabled t :state normal :key "C-k")
+    (scroll-down :enabled t :state normal :key "SPC")
+    (scroll-up :enabled t :state normal :key ("S-SPC" "S-<space>"))
+    (history-previous :enabled t :state normal :key "C-p")
+    (history-next :enabled t :state normal :key "C-n")
+    (completion-previous :enabled t :state insert :key "C-p")
+    (completion-next :enabled t :state insert :key "C-n")
+    (zoom-in :enabled t :state normal :key ("+" "="))
+    (zoom-out :enabled t :state normal :key "-")
+    (zoom-reset :enabled t :state normal :key "0")
+    (jump :enabled t :state normal :key "J")
+    (mark :enabled t :state normal :key "m")
+    (mark-all :enabled t :state normal :key "M")
+    (toggle :enabled t :state normal :key "t")
+    (toggle-all :enabled t :state normal :key "~")
+    (unmark :enabled t :state normal :key "u")
+    (unmark-all :enabled t :state normal :key "U")
+    (mark-delete :enabled t :state normal :key "d")
+    (execute-marks :enabled t :state normal :key "x")
+    (delete :enabled t :state normal :key "d")
+    (delete-2 :enabled t :state normal :key "x")
+    (search-or-filter :enabled t :state normal :key "s"))
+  "Built-in entries for the evil-collection theme system.
+
+Each entry has the form (ID . PLIST) and may use:
+
+  :enabled  nil, t, or a function with the signature
+              (lambda (map-sym id keys command) ...)
+            called at lookup time.  Missing entries are treated as t.
+            Any of the four arguments may be nil when
+            `evil-collection-binding-enabled-p' is called outside the
+            bind helpers (e.g. as a pure feature toggle from a
+            consumer-side setup function).  Override examples:
+
+              ;; Skip in one specific keymap.
+              (find-usages :enabled
+                ,(lambda (map-sym _id _keys _cmd)
+                   (not (eq map-sym \\='dired-sidebar-mode-map))))
+
+              ;; Skip when bound to a particular key.
+              (find-usages :enabled
+                ,(lambda (_map-sym _id keys _cmd)
+                   (not (member \"gr\" keys))))
+
+  :state    Evil state symbol, list of state symbols, or a function
+            with the same signature as :enabled.
+  :key      Key string (suitable for `kbd'), list of key strings, or
+            with the same signature as :enabled.
+
+:state and :key are optional.  An entry with only :enabled acts as a
+pure feature toggle: the consumer-side code does the binding itself
+and asks the resolver via `evil-collection-binding-enabled-p' whether
+the feature is on.
+
+Function values for :state and :key are funcalled at lookup time with
+args mirroring `:enabled'.  Plain symbols are never funcalled even
+when they happen to have a function binding (e.g. the state symbol
+`insert' is also the `insert' function); that is why
+anonymous lambdas are required when a property's value should be
+computed dynamically.
+
+Users customize via `evil-collection-binding-overrides'; do not
+modify this variable directly.")
+
+(defcustom evil-collection-binding-overrides nil
+  "User overrides merged onto `evil-collection-binding-defaults'.
+
+Same shape as `evil-collection-binding-defaults'.  Properties present
+here win per-property; properties omitted here fall through to the
+defaults.
+
+  (setq evil-collection-binding-overrides
+        \\='((term-toggle-escape :state normal :key \"C-c j\")))
+
+Use `:enabled nil' to disable a feature.  An explicit nil counts as
+\"set\", not \"absent\"."
+  :type '(alist :key-type symbol :value-type plist))
+
+(defun evil-collection-binding--get (id prop)
+  "Resolve PROP for theme entry ID.
+
+Overrides win over defaults per-property.  Returns nil if neither
+side sets PROP."
+  (let ((over (cdr (assq id evil-collection-binding-overrides)))
+        (def  (cdr (assq id evil-collection-binding-defaults))))
+    (cond ((plist-member over prop) (plist-get over prop))
+          ((plist-member def prop)  (plist-get def prop)))))
+
+(defun evil-collection-binding--resolve (v &optional map-sym id keys command)
+  "Funcall V with (MAP-SYM ID KEYS COMMAND) if it is an anonymous
+function; otherwise return V.
+Plain symbols are returned as-is even when they have a function
+binding — they are data (state names, command names) in this
+context, never callables."
+  (if (and (functionp v) (not (symbolp v)))
+      (funcall v map-sym id keys command)
+    v))
+
+(defun evil-collection-binding--listify (v)
+  "Wrap V in a list unless it already is one.  Nil stays nil."
+  (cond ((null v) nil)
+        ((listp v) v)
+        (t (list v))))
+
+(defun evil-collection-binding-enabled-p (id &optional map-sym keys command)
+  "Return non-nil if theme entry ID is enabled.
+
+:enabled may be nil, t, or a function with the signature
+\(lambda (MAP-SYM ID KEYS COMMAND) ...).  Missing -> t.
+
+The optional MAP-SYM, KEYS, and COMMAND are forwarded to the function
+when present at the call site, and otherwise nil — this lets callers
+that resolve `:enabled' as a pure feature toggle (no concrete keymap
+in scope) keep their existing call shape."
+  (let* ((over (cdr (assq id evil-collection-binding-overrides)))
+         (def  (cdr (assq id evil-collection-binding-defaults)))
+         (v (cond ((plist-member over :enabled) (plist-get over :enabled))
+                  ((plist-member def :enabled)  (plist-get def :enabled))
+                  (t t))))
+    (if (and (functionp v) (not (symbolp v)))
+        (funcall v map-sym id keys command)
+      v)))
+
+(defun evil-collection-binding-states (id &optional map-sym keys command)
+  "Return list of evil states configured for theme entry ID.
+
+The optional MAP-SYM, KEYS, and COMMAND are forwarded to a
+function-valued `:state' — same shape as `:enabled'."
+  (evil-collection-binding--listify
+   (evil-collection-binding--resolve
+    (evil-collection-binding--get id :state) map-sym id keys command)))
+
+(defun evil-collection-binding-keys (id &optional map-sym command)
+  "Return list of key strings configured for theme entry ID."
+  (let* ((over (cdr (assq id evil-collection-binding-overrides)))
+         (def  (cdr (assq id evil-collection-binding-defaults))))
+    (evil-collection-binding--listify
+     (if (plist-member over :key)
+         (let ((default-keys
+                (evil-collection-binding--listify
+                 (evil-collection-binding--resolve
+                  (plist-get def :key) map-sym id nil command))))
+           (evil-collection-binding--resolve
+            (plist-get over :key) map-sym id default-keys command))
+       (evil-collection-binding--resolve
+        (plist-get def :key) map-sym id nil command)))))
+
+(defun evil-collection-bind (map-sym &rest id-command-pairs)
+  "Bind one or more theme entries in MAP-SYM.
+
+ID-COMMAND-PAIRS is an even-length list alternating theme IDs and
+commands:
+
+  (evil-collection-bind \\='foo-mode-map
+    \\='action \\='foo-do
+    \\='quit   \\='foo-quit)
+
+Each ID is resolved through `evil-collection-binding-keys'; entries with
+`:enabled' nil are skipped.  Pairs that share the same `:state'
+value are batched into a single `evil-collection-define-key' call
+so a deferred map installs one `after-load-functions' hook per
+state-group instead of one per pair."
+  (let ((groups nil))
+    (while id-command-pairs
+      (let* ((id (pop id-command-pairs))
+             (cmd (pop id-command-pairs))
+             (keys (evil-collection-binding-keys id map-sym cmd)))
+        (when (evil-collection-binding-enabled-p id map-sym keys cmd)
+          (let ((states (evil-collection-binding-states id map-sym keys cmd)))
+            (when keys
+              (let ((pairs (cl-mapcan (lambda (k) (list (kbd k) cmd))
+                                      keys))
+                    (group (assoc states groups)))
+                (if group
+                    (setcdr group (nconc (cdr group) pairs))
+                  (push (cons states pairs) groups))))))))
+    (dolist (group (nreverse groups))
+      (apply #'evil-collection-define-key
+             (car group) map-sym (cdr group)))))
+
+(defun evil-collection-bind-minor-mode (id mode command)
+  "Bind theme entry ID to COMMAND in minor-mode MODE.
+
+Like `evil-collection-bind' but routes through
+`evil-collection-define-minor-mode-key'."
+  (let ((keys (evil-collection-binding-keys id mode command)))
+    (when (evil-collection-binding-enabled-p id mode keys command)
+      (let ((states (evil-collection-binding-states id mode keys command)))
+        (when keys
+          (apply #'evil-collection-define-minor-mode-key states mode
+                 (cl-mapcan (lambda (key) (list (kbd key) command))
+                            keys)))))))
+
+(defmacro evil-collection-define-push-action (name fallback)
+  "Define NAME as an interactive command that calls `push-button' when point
+is on a button (per `button-at'), otherwise calls FALLBACK interactively.
+
+Evil's state aux keymaps shadow text-property keymaps (e.g. `button-map' on
+buttons), so binding a primary action like a `*-visit-result' directly to
+RET prevents header/embedded buttons from receiving the keypress.  Wrapping
+the fallback restores Emacs's text-property-aware dispatch."
+  (declare (indent defun))
+  `(defun ,name ()
+     ,(format "Push button at point, else call `%s'.
+Generated by `evil-collection-define-push-action' to restore button-keymap
+text-property dispatch under Evil normal state." fallback)
+     (interactive)
+     (if (button-at (point))
+         (call-interactively #'push-button)
+       (call-interactively ',fallback))))
+
+(defun evil-collection--keys-conflict (key-a key-b)
+  "Return t if KEY-A and KEY-B conflict.
+Keys conflict if they're equal or if one is a prefix of the other."
+  (setq key-a (vconcat key-a)
+        key-b (vconcat key-b))
+  (let ((len (min (length key-a) (length key-b))))
+    (equal (substring key-a 0 len) (substring key-b 0 len))))
+
+(defsubst evil-collection--can-bind-key (key whitelist blacklist)
+  "Return t if KEY can be bound.
+Return nil if KEY conflicts with a key in BLACKLIST and is not
+a member of WHITELIST.
+
+Both WHITELIST and BLACKLIST must be lists of keys in Emacs'
+internal key representation (i.e., after calling `kbd' on the key
+description."
+  (or (member key whitelist)
+      (not (cl-member key blacklist
+                      :test #'evil-collection--keys-conflict))))
+
+(defun evil-collection-bind-local (id command)
+  "Bind theme entry ID to COMMAND in the current buffer.
+
+Like `evil-collection-bind' but uses `evil-local-set-key'."
+  (let ((keys (evil-collection-binding-keys id nil command)))
+    (when (evil-collection-binding-enabled-p id nil keys command)
+      (let ((whitelist (mapcar #'kbd evil-collection-key-whitelist))
+            (blacklist (mapcar #'kbd evil-collection-key-blacklist))
+            (states (evil-collection--filter-states
+                     (evil-collection-binding-states id nil keys command))))
+        (when states
+          (dolist (key keys)
+            (let ((kbd-key (kbd key)))
+              (when (evil-collection--can-bind-key kbd-key whitelist blacklist)
+                (when (featurep 'annalist)
+                  (annalist-record 'evil-collection 'keybindings
+                                   (list 'local (car states) kbd-key command)
+                                   :local t))
+                (dolist (state states)
+                  (evil-local-set-key state kbd-key command))))))))))
+
+(defvar evil-collection-setup-hook nil
+  "Hook run by `evil-collection-init' for each mode that is evilified.
+This hook runs after all setup (including keybindings) for a mode has already
+taken place. The arguments passed to functions for this hook are the name of the
+mode and a list of keymap names (i.e. symbols, not actual keymaps) customized by
+Evil Collection for that mode. More arguments may be added in the future, so
+functions added to this hook should include a \"&rest _rest\" for forward
+compatibility.")
+
+(defun evil-collection-define-operator-key (operator map-sym &rest bindings)
+  "Define a key on a specific OPERATOR e.g. yank or delete.
+
+This function is useful for adding specific binds to operator maps
+\(e.g. `evil-yank' or `evil-delete') without erasing the original bind.
+
+For example, say one wants to bind \"yf\" to something but also wants to keep
+\"yy\".
+
+This function takes care of checking the whitelist/blacklist against the full
+binding.
+
+For example:
+\(evil-collection-define-operator-key \='yank
+  \='pass-mode-map \"f\" \='pass-copy-field)
+
+This will check \"yf\" against a user's white/blacklist and also record the
+binding in `annalist' as so."
+  (declare (indent defun))
+  (let* ((prefix (if (eq operator 'yank) "y" "d"))
+         (operators (if (eq operator 'yank)
+                        'evil-collection-yank-operators
+                      'evil-collection-delete-operators))
+         (remap (if (eq operator 'yank) [remap evil-yank] [remap evil-delete]))
+         (whitelist (mapcar #'kbd evil-collection-key-whitelist))
+         (blacklist (mapcar #'kbd evil-collection-key-blacklist))
+         filtered-bindings)
+    (while bindings
+      (let* ((key (pop bindings))
+             (key-with-prefix (concat prefix key))
+             (def (pop bindings))
+             (def-with-menu-item
+              `(menu-item
+                ""
+                nil
+                :filter
+                (lambda (&optional _)
+                  (when (or
+                         (eq evil-this-operator (key-binding ,remap))
+                         (memq evil-this-operator ,operators))
+                    (setq evil-inhibit-operator t)
+                    ',def)))))
+        (when (or (and whitelist (member key-with-prefix whitelist))
+                  (not (member key-with-prefix blacklist)))
+          (when (featurep 'annalist)
+            (annalist-record 'evil-collection 'keybindings
+                             ;; Record the binding as if it was in 'normal mode
+                             ;; instead of 'operator mode as the user would be
+                             ;; in normal mode when triggering the operator.
+                             (list map-sym 'normal key-with-prefix def)
+                             :local (or (eq map-sym 'local)
+                                        (local-variable-p map-sym))))
+          ;; Use the original key declared when actually setting the binding.
+          (push key filtered-bindings)
+          ;; Use the definition attached to the menu-item when setting the
+          ;; binding.
+          (push def-with-menu-item filtered-bindings))))
+    (setq filtered-bindings (nreverse filtered-bindings))
+    (evil-collection--define-key 'operator map-sym filtered-bindings)))
+
+(defun evil-collection--filter-states (state)
+  "Return a list states after filtering STATE (a single symbol or list of symbols).
+The return value adheres to `evil-collection-state-passlist' and
+`evil-collection-state-denylist'. When the STATE is nil, which
+means all states for `evil-define-key', return nil."
+  (let ((states (if (listp state) state (list state))))
+    (seq-difference
+     (if evil-collection-state-passlist
+         (seq-intersection states evil-collection-state-passlist)
+       states)
+     evil-collection-state-denylist)))
+
+(defun evil-collection-define-key (state map-sym &rest bindings)
+  "Wrapper for `evil-define-key*' with additional features.
+Unlike `evil-define-key*' MAP-SYM should be a quoted keymap other than the
+unquoted keymap required for `evil-define-key*'. This function adds the ability
+to filter keys on the basis of `evil-collection-key-whitelist' and
+`evil-collection-key-blacklist'. It also records bindings with annalist.el."
+  (declare (indent defun))
+  (let* ((whitelist (mapcar #'kbd evil-collection-key-whitelist))
+         (blacklist (mapcar #'kbd evil-collection-key-blacklist))
+         (states-to-bind (evil-collection--filter-states state))
+         filtered-bindings)
+    (when (or states-to-bind (null state))
+      (while bindings
+        (let ((key (pop bindings))
+              (def (pop bindings)))
+          (when (evil-collection--can-bind-key key whitelist blacklist)
+            (when (featurep 'annalist)
+              (annalist-record 'evil-collection 'keybindings
+                               (list map-sym state key def)
+                               :local (or (eq map-sym 'local)
+                                          (local-variable-p map-sym))))
+            (push key filtered-bindings)
+            (push def filtered-bindings))))
+      (setq filtered-bindings (nreverse filtered-bindings))
+      (evil-collection--define-key states-to-bind map-sym filtered-bindings))))
+
+(defun evil-collection-define-minor-mode-key (state mode &rest bindings)
+  "Wrapper for `evil-define-minor-mode-key' with additional features.
+Like `evil-collection-define-key' but binds to MODE (a minor-mode
+symbol) rather than a keymap.  Bindings auto-activate when MODE is
+enabled without relying on `evil-normalize-keymaps'.
+
+Filters keys via `evil-collection-key-whitelist' /
+`evil-collection-key-blacklist' and records bindings with annalist."
+  (declare (indent defun))
+  (let* ((whitelist (mapcar #'kbd evil-collection-key-whitelist))
+         (blacklist (mapcar #'kbd evil-collection-key-blacklist))
+         (states-to-bind (evil-collection--filter-states state))
+         filtered-bindings)
+    (when (or states-to-bind (null state))
+      (while bindings
+        (let ((key (pop bindings))
+              (def (pop bindings)))
+          (when (evil-collection--can-bind-key key whitelist blacklist)
+            (when (featurep 'annalist)
+              (annalist-record 'evil-collection 'keybindings
+                               (list mode state key def)))
+            (push key filtered-bindings)
+            (push def filtered-bindings))))
+      (setq filtered-bindings (nreverse filtered-bindings))
+      (when filtered-bindings
+        (apply #'evil-define-minor-mode-key
+               states-to-bind mode filtered-bindings)))))
+
+(defun evil-collection-can-bind-key (key)
+  "Return whether or not we should bind KEY."
+  (let* ((whitelist (mapcar #'kbd evil-collection-key-whitelist))
+         (blacklist (mapcar #'kbd evil-collection-key-blacklist)))
+    (evil-collection--can-bind-key key whitelist blacklist)))
+
+(defun evil-collection--define-key (state map-sym bindings)
+  "Workhorse function for `evil-collection-define-key'.
+
+See `evil-collection-define-key' docstring for more details."
+  (cond ((null bindings))
+        ((and (boundp map-sym) (keymapp (symbol-value map-sym)))
+         (condition-case-unless-debug err
+             (apply #'evil-define-key*
+                    state (symbol-value map-sym) bindings)
+           (error
+            (message "evil-collection: error setting key in %s %S"
+                     map-sym err))))
+        ((boundp map-sym)
+         (user-error "evil-collection: %s is not a keymap" map-sym))
+        (t
+         (let* ((fname (format "evil-collection-define-key-in-%s" map-sym))
+                (fun (make-symbol fname)))
+           (fset fun `(lambda (&rest args)
+                        (when (and (boundp ',map-sym) (keymapp ,map-sym))
+                          (remove-hook 'after-load-functions #',fun)
+                          (condition-case-unless-debug err
+                              (apply #'evil-define-key*
+                                     ',state ,map-sym ',bindings)
+                            (error
+                             (message
+                              ,(format
+                                "evil-collection: error setting key in %s %%S"
+                                map-sym)
+                              err))))))
+           (add-hook 'after-load-functions fun t)))))
+
+(defun evil-collection-inhibit-insert-state (map-sym)
+  "Unmap insertion keys from normal state.
+This is particularly useful for read-only modes."
+  (evil-collection-define-key 'normal map-sym
+    [remap evil-append] #'ignore
+    [remap evil-append-line] #'ignore
+    [remap evil-insert] #'ignore
+    [remap evil-insert-line] #'ignore
+    [remap evil-change] #'ignore
+    [remap evil-change-line] #'ignore
+    [remap evil-substitute] #'ignore
+    [remap evil-change-whole-line] #'ignore
+    [remap evil-delete] #'ignore
+    [remap evil-delete-line] #'ignore
+    [remap evil-delete-char] #'ignore
+    [remap evil-delete-backward-char] #'ignore
+    [remap evil-replace] #'ignore
+    [remap evil-replace-state] #'ignore
+    [remap evil-open-below] #'ignore
+    [remap evil-open-above] #'ignore
+    [remap evil-paste-after] #'ignore
+    [remap evil-paste-before] #'ignore
+    [remap evil-join] #'ignore
+    [remap evil-indent] #'ignore
+    [remap evil-shift-left] #'ignore
+    [remap evil-shift-right] #'ignore
+    [remap evil-invert-char] #'ignore))
+
+(defun evil-collection-set-readonly-bindings (map-sym)
+  "Unmap insertion keys from normal state. Additionally q can `quit-window'.
+This is particularly useful for read-only modes. Make sure it's
+called before setting up other evil bindings so that it can be
+overriden."
+  (evil-collection-inhibit-insert-state map-sym)
+  (evil-collection-define-key 'normal map-sym
+    "q"  #'quit-window
+    "ZZ" #'quit-window
+    "ZQ" #'evil-quit))
+
+(defun evil-collection--binding-lessp (a b)
+  "Comparison function used to sort bindings of the form (state key def)."
+  (let ((a-state (symbol-name (nth 0 a)))
+        (b-state (symbol-name (nth 0 b)))
+        (a-key (nth 1 a))
+        (b-key (nth 1 b)))
+    (if (not (string= a-state b-state))
+        (string-lessp a-state b-state)
+      (string-lessp a-key b-key))))
+
+(with-eval-after-load 'annalist
+  (annalist-define-view 'keybindings 'evil-collection-valid
+    (list (list 'keymap :sort #'annalist-string-<)
+          (list 'state :sort #'annalist-string-<))
+    :inherit 'valid)
+
+  (annalist-define-view 'keybindings 'evil-collection-active
+    (list (list 'keymap :sort #'annalist-string-<)
+          (list 'state :sort #'annalist-string-<))
+    :inherit 'active))
+
+(defun evil-collection-describe-bindings (&optional arg)
+  "Print bindings made by Evil Collection to separate buffer.
+
+With non-nil ARG, restrict to bindings corresponding to active
+modes in the current buffer.
+
+Requires the optional `annalist' package."
+  (interactive "P")
+  (unless (require 'annalist nil t)
+    (user-error
+     "`evil-collection-describe-bindings' requires the `annalist' package"))
+  (annalist-describe 'evil-collection 'keybindings
+                     (if arg
+                         'evil-collection-active
+                       'evil-collection-valid)))
+
+(defun evil-collection--mode-file (mode file)
+  "Return path to FILE for MODE. Return nil if it doesn't exist."
+  (let ((path (expand-file-name
+               (format "modes/%s/%s" mode file) evil-collection-base-dir)))
+    (when (file-exists-p path)
+      path)))
+
+(defun evil-collection-open-config-file (mode)
+  "Open configuration file corresponding to MODE."
+  (interactive
+   (list
+    (completing-read
+     "Mode: "
+     (cl-remove-if-not
+      (lambda (mode)
+        (evil-collection--mode-file mode (format "evil-collection-%s.el" mode)))
+      (directory-files
+       (expand-file-name "modes" evil-collection-base-dir)
+       nil "^[^.]")))))
+  (find-file (evil-collection--mode-file mode (format "evil-collection-%s.el" mode))))
+
+(defun evil-collection-open-readme (mode)
+  "Open README.org corresponding to MODE."
+  (interactive
+   (list
+    (completing-read
+     "Mode: "
+     (cl-remove-if-not
+      (lambda (mode)
+        (evil-collection--mode-file mode "README.org"))
+      (directory-files
+       (expand-file-name "modes" evil-collection-base-dir)
+       nil "^[^.]")))))
+  (find-file (evil-collection--mode-file mode "README.org")))
+
+(defun evil-collection--delay (condition form hook &optional append local name)
+  "Execute FORM when CONDITION becomes true, checking with HOOK.
+NAME specifies the name of the entry added to HOOK.  If APPEND is
+non-nil, the entry is appended to the hook.  If LOCAL is non-nil,
+the buffer-local value of HOOK is modified.
+
+This is a backport of `evil-delay' without the deprecation notice to deal with
+CI until migration can be done.
+Ref: https://github.com/emacs-evil/evil-collection/issues/750"
+  (eval `(evil-with-delay ,condition (,hook ,append ,local ,name) ,form) t))
+
+;;;###autoload
+(cl-defun evil-collection-translate-minor-mode-key (states modes
+                                                           &rest translations
+                                                           &key destructive
+                                                           &allow-other-keys)
+  "Translate keys in the keymap(s) corresponding to STATES and MODES.
+
+Similar to `evil-collection-translate-key' but for minor modes.
+STATES should be the name of an evil state, a list of states, or nil. MODES
+should be a symbol corresponding to minor-mode to make the translations in or a
+list of minor-mode symbols. TRANSLATIONS corresponds to a list of
+key replacement pairs. For example, specifying \"a\" \"b\" will bind \"a\" to
+\"b\"'s definition in the keymap. Specifying nil as a replacement will unbind a
+key. If DESTRUCTIVE is nil, a backup of the keymap will be stored on the initial
+invocation, and future invocations will always look up keys in the backup
+keymap. When no TRANSLATIONS are given, this function will only create the
+backup keymap without making any translations. On the other hand, if DESTRUCTIVE
+is non-nil, the keymap will be destructively altered without creating a backup.
+For example, calling this function multiple times with \"a\" \"b\" \"b\" \"a\"
+would continue to swap and unswap the definitions of these keys. This means that
+when DESTRUCTIVE is non-nil, all related swaps/cycles should be done in the same
+invocation."
+  (declare (indent defun))
+  (unless (listp modes)
+    (setq modes (list modes)))
+  (unless (and (listp states)
+               (not (null states)))
+    (setq states (list states)))
+  (dolist (mode-symbol modes)
+    (let ((keymap-symbol (intern (format "%S-map" mode-symbol))))
+      (dolist (state states)
+        (let ((hook-name
+               (symbol-name
+                (gensym
+                 (format "evil-collection-translate-key-in-%s" keymap-symbol)))))
+          (evil-collection--delay `(and (boundp ',keymap-symbol)
+                                        (keymapp ,keymap-symbol))
+                                  `(evil-collection--translate-minor-mode-key
+                                    ',state
+                                    ',mode-symbol
+                                    ',translations
+                                    ,destructive)
+                                  'after-load-functions
+                                  t
+                                  nil
+                                  hook-name))))))
+
+
+(defun evil-collection--translate-minor-mode-key (state
+                                                  mode-symbol
+                                                  translations
+                                                  destructive)
+  "Helper function for `evil-collection-translate-minor-mode-key'.
+In the minor mode keymap corresponding to STATE and MODE-SYMBOL, make the key
+TRANSLATIONS. When DESTRUCTIVE is non-nil, make the TRANSLATIONS destructively
+without creating/referencing a backup keymap."
+  (let* ((keymap-symbol (intern (format "%S-map" mode-symbol)))
+         (backup-keymap-symbol (intern (format "evil-collection-%s%s-backup-map"
+                                               mode-symbol
+                                               (if state
+                                                   (format "-%s-state" state)
+                                                 ""))))
+         (keymap (symbol-value keymap-symbol))
+         (lookup-keymap (if (and (not destructive)
+                                 (boundp backup-keymap-symbol))
+                            (symbol-value backup-keymap-symbol)
+                          (copy-keymap  ;FIXME: Why copy?
+                           (if state
+                               (evil-get-minor-mode-keymap state mode-symbol)
+                             keymap))))
+         (maps (cl-loop for (key replacement) on translations by 'cddr
+                        ;; :destructive can be in TRANSLATIONS
+                        unless (keywordp key)
+                        collect key
+                        and collect (when replacement
+                                      (evil-lookup-key lookup-keymap replacement)))))
+    (unless (or destructive
+                (boundp backup-keymap-symbol))
+      (set backup-keymap-symbol lookup-keymap))
+    (apply #'evil-define-minor-mode-key state mode-symbol maps)))
+
+(defun evil-collection--translate-key (state keymap-symbol
+                                             translations
+                                             destructive)
+  "Helper function for `evil-collection-translate-key'.
+In the keymap corresponding to STATE and KEYMAP-SYMBOL, make the key
+TRANSLATIONS. When DESTRUCTIVE is non-nil, make the TRANSLATIONS destructively
+without creating/referencing a backup keymap."
+  (let* ((backup-keymap-symbol (intern (format "evil-collection-%s%s-backup-map"
+                                               keymap-symbol
+                                               (if state
+                                                   (format "-%s-state" state)
+                                                 ""))))
+         (keymap (symbol-value keymap-symbol))
+         (lookup-keymap (if (and (not destructive)
+                                 (boundp backup-keymap-symbol))
+                            (symbol-value backup-keymap-symbol)
+                          (copy-keymap
+                           (if state
+                               (evil-get-auxiliary-keymap keymap state t t)
+                             keymap))))
+         (maps (cl-loop for (key replacement) on translations by 'cddr
+                        ;; :destructive can be in TRANSLATIONS
+                        unless (keywordp key)
+                        collect key
+                        and collect (when replacement
+                                      (evil-lookup-key lookup-keymap replacement)))))
+    (unless (or destructive
+                (boundp backup-keymap-symbol))
+      (set backup-keymap-symbol lookup-keymap))
+    (apply #'evil-define-key* state keymap maps)))
+
+;;;###autoload
+(cl-defun evil-collection-translate-key (states keymaps
+                                                &rest translations
+                                                &key destructive
+                                                &allow-other-keys)
+  "Translate keys in the keymap(s) corresponding to STATES and KEYMAPS.
+STATES should be the name of an evil state, a list of states, or nil. KEYMAPS
+should be a symbol corresponding to the keymap to make the translations in or a
+list of keymap symbols. Like `evil-define-key', when a keymap does not exist,
+the keybindings will be deferred until the keymap is defined, so
+`with-eval-after-load' is not necessary. TRANSLATIONS corresponds to a list of
+key replacement pairs. For example, specifying \"a\" \"b\" will bind \"a\" to
+\"b\"'s definition in the keymap. Specifying nil as a replacement will unbind a
+key. If DESTRUCTIVE is nil, a backup of the keymap will be stored on the initial
+invocation, and future invocations will always look up keys in the backup
+keymap. When no TRANSLATIONS are given, this function will only create the
+backup keymap without making any translations. On the other hand, if DESTRUCTIVE
+is non-nil, the keymap will be destructively altered without creating a backup.
+For example, calling this function multiple times with \"a\" \"b\" \"b\" \"a\"
+would continue to swap and unswap the definitions of these keys. This means that
+when DESTRUCTIVE is non-nil, all related swaps/cycles should be done in the same
+invocation."
+  (declare (indent defun))
+  (unless (listp keymaps)
+    (setq keymaps (list keymaps)))
+  (unless (and (listp states)
+               (not (null states)))
+    (setq states (list states)))
+  (dolist (keymap-symbol keymaps)
+    (dolist (state states)
+      (let ((hook-name
+             (symbol-name
+              (gensym
+               (format "evil-collection-translate-key-in-%s" keymap-symbol)))))
+        (evil-collection--delay `(and (boundp ',keymap-symbol)
+                                      (keymapp ,keymap-symbol))
+                                `(evil-collection--translate-key
+                                  ',state
+                                  ',keymap-symbol
+                                  ',translations
+                                  ,destructive)
+                                'after-load-functions
+                                t
+                                nil
+                                hook-name)))))
+
+
+;;;###autoload
+(defmacro evil-collection-swap-key (states keymaps &rest args)
+  "Wrapper around `evil-collection-translate-key' for swapping keys.
+STATES, KEYMAPS, and ARGS are passed to `evil-collection-translate-key'. ARGS
+should consist of key swaps (e.g. \"a\" \"b\" is equivalent to \"a\" \"b\" \"b\"
+\"a\" with `evil-collection-translate-key') and optionally keyword arguments for
+`evil-collection-translate-key'."
+  (declare (indent defun))
+  (setq args (cl-loop for (key replacement) on args by 'cddr
+                      collect key and collect replacement
+                      and unless (keywordp key)
+                      collect replacement and collect key))
+  `(evil-collection-translate-key ,states ,keymaps ,@args))
+
+;;;###autoload
+(defmacro evil-collection-swap-minor-mode-key (states modes &rest args)
+  "Wrapper around `evil-collection-translate-minor-mode-key' for swapping keys.
+STATES, MODES, and ARGS are passed to
+`evil-collection-translate-minor-mode-key'. ARGS should consist of key swaps
+\(e.g. \"a\" \"b\" is equivalent to \"a\" \"b\" \"b\" \"a\"
+with `evil-collection-translate-minor-mode-key') and optionally keyword
+arguments for `evil-collection-translate-minor-mode-key'."
+  (declare (indent defun))
+  (setq args (cl-loop for (key replacement) on args by 'cddr
+                      collect key and collect replacement
+                      and unless (keywordp key)
+                      collect replacement and collect key))
+  `(evil-collection-translate-minor-mode-key ,states ,modes ,@args))
+
+;;;###autoload
+(defun evil-collection-require (mode &optional noerror)
+  "Require the evil-collection-MODE file, but do not activate it.
+
+MODE should be a symbol. This requires the evil-collection-MODE
+feature without needing to manipulate `load-path'. NOERROR is
+forwarded to `require'."
+  (let* ((mode-name (symbol-name mode))
+         (feature (intern (format "evil-collection-%s" mode-name)))
+         (file (expand-file-name
+                (format "modes/%s/evil-collection-%s" mode-name mode-name)
+                evil-collection-base-dir)))
+    (require feature file noerror)))
+
+(declare-function evil-collection-unimpaired-setup "evil-collection-unimpaired")
+
+;;;###autoload
+(defun evil-collection-init (&optional modes)
+  "Register the Evil bindings for all modes in `evil-collection-mode-list'.
+
+Alternatively, you may register select bindings manually, for
+instance:
+
+  (with-eval-after-load \='calendar
+    (evil-collection-calendar-setup))
+
+If MODES is specified (as either one mode or a list of modes), use those modes
+instead of the modes in `evil-collection-mode-list'."
+  (interactive)
+  (evil-collection-maybe-display-startup-warning)
+  (if modes
+      (or (listp modes) (setq modes (list modes)))
+    (setq modes evil-collection-mode-list))
+  (dolist (mode modes)
+    (let ((m mode)
+          (reqs (list mode)))
+      (when (listp mode)
+        (setq m (car mode)
+              reqs (cdr mode)))
+      (dolist (req reqs)
+        (with-eval-after-load req
+          ;; (message (format "Loaded %S..." req))
+          (evil-collection-require m)
+          (funcall (intern (concat "evil-collection-" (symbol-name m)
+                                   "-setup")))
+          (let ((mode-keymaps
+                 (ignore-errors
+                   (symbol-value
+                    (intern (format "evil-collection-%s-maps" m))))))
+            (when (or evil-collection-always-run-setup-hook-after-load
+                      (not (memq m evil-collection--modes-with-delayed-setup)))
+              (run-hook-with-args 'evil-collection-setup-hook
+                                  m mode-keymaps)))))))
+  (when evil-collection-want-unimpaired-p
+    (evil-collection-require 'unimpaired)
+    (evil-collection-unimpaired-setup)))
+
+(defun evil-collection-setup (&optional modes)
+  "Register the Evil bindings for all modes in `evil-collection-mode-list'.
+
+----------------------EXPERIMENTAL------------------------------------------
+
+This is a special wrapper over `evil-collection-init' that respects
+configuration from `evil-collection-config'. This function is experimental,
+so don't use if you don't want breakages or API changes.
+
+If MODES is specified (as either one mode or a list of modes), use those modes
+instead of the modes in `evil-collection-mode-list'.
+
+----------------------EXPERIMENTAL------------------------------------------"
+  (if modes
+      (or (listp modes) (setq modes (list modes)))
+    (setq modes evil-collection-mode-list))
+  (let ((configs evil-collection-config)
+        (deferred)  ; alist of (mode . delay)
+        (hooked))   ; alist of (mode . hook)
+    (dolist (config configs)
+      (if-let* ((hook (plist-get (cdr config) :hook)))
+          (push (cons (car config) hook) hooked)
+        (when-let* ((defer (plist-get (cdr config) :defer)))
+          (push (cons (car config) defer) deferred))))
+    (let ((filtered-modes
+           (cl-remove-if
+            (lambda (mode)
+              ;; `evil-collection-config' format is slightly different
+              ;; than `evil-collection-mode-list', so use the mode
+              ;; entry from the mode list instead.
+              (cl-some
+               (lambda (m)
+                 (or (when-let* ((entry (assq m deferred)))
+                       (setf (car entry) mode) t)
+                     (when-let* ((entry (assq m hooked)))
+                       (setf (car entry) mode) t)))
+               (if (consp mode) mode (list mode))))
+            modes)))
+      (evil-collection-init filtered-modes))
+    (message (format "Deferring: %S" (mapcar #'car deferred)))
+    (dolist (entry deferred)
+      (let ((mode (car entry))
+            (delay (cdr entry)))
+        (run-with-idle-timer
+         (if (numberp delay) delay evil-collection-defer-delay) nil
+         (apply-partially 'evil-collection-init (list mode)))))
+    (dolist (entry hooked)
+      (let* ((mode (car entry))
+             (hook-sym (cdr entry))
+             (hook-name (let ((name (symbol-name hook-sym)))
+                          (if (string-suffix-p "-hook" name)
+                              hook-sym
+                            (intern (concat name "-hook")))))
+             (mode-sym (if (consp mode) (car mode) mode))
+             (fn-sym (intern (format "evil-collection--init-%s" mode-sym))))
+        (defalias fn-sym
+          (lambda ()
+            (remove-hook hook-name fn-sym)
+            (evil-collection-init (list mode))))
+        (add-hook hook-name fn-sym)))))
+
+(defvar evil-collection-delete-operators '(evil-delete
+                                           evil-cp-delete
+                                           evil-sp-delete
+                                           lispyville-delete)
+  "List of delete operators.")
+
+(defvar evil-collection-yank-operators '(evil-yank
+                                         evil-cp-yank
+                                         evil-sp-yank
+                                         lispyville-yank)
+  "List of yank operators.")
+
+;;* Search
+
+(defun evil-collection-evil-search-enabled ()
+  (eq evil-search-module 'evil-search))
+
+(defvar evil-collection-evil-search-forward
+  `(menu-item "" nil :filter ,(lambda (&optional _)
+                               (if (eq evil-search-module 'evil-search)
+                                   #'evil-ex-search-forward
+                                 #'evil-search-forward))))
+
+(defvar evil-collection-evil-search-backward
+  `(menu-item "" nil :filter ,(lambda (&optional _)
+                               (if (eq evil-search-module 'evil-search)
+                                   #'evil-ex-search-backward
+                                 #'evil-search-backward))))
+
+(defvar evil-collection-evil-search-next
+  `(menu-item "" nil :filter ,(lambda (&optional _)
+                               (if (eq evil-search-module 'evil-search)
+                                   #'evil-ex-search-next
+                                 #'evil-search-next))))
+
+(defvar evil-collection-evil-search-previous
+  `(menu-item "" nil :filter ,(lambda (&optional _)
+                               (if (eq evil-search-module 'evil-search)
+                                   #'evil-ex-search-previous
+                                 #'evil-search-previous))))
+;;* Unmap
+
+(defvar evil-collection-unmap-skip-events
+  '(menu-bar tool-bar tab-bar tab-line header-line mode-line)
+  "Events under which `evil-collection-unmap' will not descend.
+These are UI keymaps where removing entries is rarely the intent.")
+
+;;;###autoload
+(defun evil-collection-unmap (map-sym &rest things)
+  "Completely unmap THINGS from MAP-SYM.
+
+MAP-SYM is a symbol bound to a keymap. If MAP-SYM is not yet bound
+to a keymap, the operation is deferred via `after-load-functions',
+matching the deferral behaviour of `evil-collection-define-key'.
+
+Each thing in THINGS is one of:
+
+  - A command symbol — every binding pointing to that command
+    anywhere in the keymap is removed (TAB, RET, C-c TAB,
+    evil-state bindings, [remap ...] entries, etc.).
+
+  - A key description string accepted by `kbd' (e.g. \"RET\",
+    \"a\", \"<return>\", \"TAB\", \"C-c C-c\") — the binding at
+    that exact key sequence is removed at the top level and
+    inside every evil-state auxiliary keymap.
+
+  - A key vector — same as a key description, already parsed.
+
+Removals use `define-key' with REMOVE set, so bindings are
+deleted entirely, not just shadowed with nil.
+
+Parent keymaps installed via `set-keymap-parent' are not modified,
+and sub-keymaps stored under events in
+`evil-collection-unmap-skip-events' (menu-bar, tool-bar, etc.) are
+not descended into."
+  (declare (indent defun))
+  (cond
+   ((and (boundp map-sym) (keymapp (symbol-value map-sym)))
+    (evil-collection--unmap (symbol-value map-sym) things))
+   ((boundp map-sym)
+    (user-error "evil-collection-unmap: %s is not a keymap" map-sym))
+   (t
+    (let* ((fname (format "evil-collection-unmap-in-%s" map-sym))
+           (fun (make-symbol fname)))
+      (fset fun
+            `(lambda (&rest _)
+               (when (and (boundp ',map-sym) (keymapp ,map-sym))
+                 (remove-hook 'after-load-functions #',fun)
+                 (condition-case-unless-debug err
+                     (evil-collection--unmap
+                      (symbol-value ',map-sym) ',things)
+                   (error
+                    (message
+                     ,(format
+                       "evil-collection-unmap: error unmapping in %s %%S"
+                       map-sym)
+                     err))))))
+      (add-hook 'after-load-functions fun t)))))
+
+(defun evil-collection--unmap (keymap things)
+  "Workhorse for `evil-collection-unmap'."
+  (let (commands keys)
+    (dolist (thing things)
+      (cond
+       ((null thing))
+       ((symbolp thing) (push thing commands))
+       ((vectorp thing) (push thing keys))
+       ((stringp thing) (push (kbd thing) keys))
+       (t (user-error "evil-collection-unmap: cannot unmap %S" thing))))
+    ;; --- Remove by command (deep walk) -----------------------------------
+    (when commands
+      (let (paths)
+        (evil-collection--walk-keymap-shallow
+         keymap []
+         (lambda (key-vec binding)
+           (let ((real (if (and (consp binding)
+                                (eq (car-safe binding) 'menu-item))
+                           (nth 2 binding)
+                         binding)))
+             (when (memq real commands)
+               (push (copy-sequence key-vec) paths)))))
+        ;; Remove deeper paths first so we don't yank a prefix from under
+        ;; entries we still want to remove.
+        (setq paths (sort paths (lambda (a b) (> (length a) (length b)))))
+        (dolist (path paths)
+          (ignore-errors (define-key keymap path nil t)))))
+    ;; --- Remove by key (top-level + evil state aux maps) -----------------
+    (dolist (key keys)
+      (ignore-errors (define-key keymap key nil t))
+      (dolist (entry (cdr keymap))
+        (when (and (consp entry)
+                   (symbolp (car entry))
+                   (keymapp (cdr entry))
+                   (string-suffix-p "-state" (symbol-name (car entry))))
+          (ignore-errors (define-key (cdr entry) key nil t)))))))
+
+(defun evil-collection--walk-keymap-shallow (keymap prefix fn)
+  "Walk KEYMAP under PREFIX, calling FN with (KEY-VEC BINDING).
+
+Stops at the parent-keymap boundary (does NOT follow inherited
+keymaps). Skips sub-keymaps whose event is in
+`evil-collection-unmap-skip-events'."
+  (let ((tail (cdr keymap)))
+    (while (and tail (not (eq (car-safe tail) 'keymap)))
+      (let ((entry (car tail)))
+        (cond
+         ((stringp entry))                  ; prompt — skip
+         ((char-table-p entry)
+          (map-char-table
+           (lambda (ev binding)
+             (when binding
+               (cond
+                ((characterp ev)
+                 (evil-collection--walk-keymap-entry ev binding prefix fn))
+                ((and (consp ev)
+                      (characterp (car ev))
+                      (characterp (cdr ev)))
+                 (let ((c (car ev)) (end (cdr ev)))
+                   (while (<= c end)
+                     (evil-collection--walk-keymap-entry c binding prefix fn)
+                     (setq c (1+ c))))))))
+           entry))
+         ((vectorp entry)
+          (let ((i 0) (len (length entry)))
+            (while (< i len)
+              (let ((b (aref entry i)))
+                (when b
+                  (evil-collection--walk-keymap-entry i b prefix fn)))
+              (setq i (1+ i)))))
+         ((consp entry)
+          (let* ((ev (car entry))
+                 (rest (cdr entry))
+                 ;; Strip optional item-string in (EVENT ITEM-STRING . BINDING)
+                 (binding (if (and (consp rest) (stringp (car rest)))
+                              (cdr rest)
+                            rest)))
+            (evil-collection--walk-keymap-entry ev binding prefix fn)))))
+      (setq tail (cdr tail)))))
+
+(defun evil-collection--walk-keymap-entry (event binding prefix fn)
+  "Dispatch on BINDING type for `evil-collection--walk-keymap-shallow'."
+  (let ((key (vconcat prefix (vector event))))
+    (cond
+     ((memq event evil-collection-unmap-skip-events))
+     ((keymapp binding)
+      (evil-collection--walk-keymap-shallow binding key fn))
+     ((and (consp binding)
+           (eq (car-safe binding) 'menu-item)
+           (keymapp (nth 2 binding)))
+      (evil-collection--walk-keymap-shallow (nth 2 binding) key fn))
+     (binding
+      (funcall fn key binding)))))
+
+(provide 'evil-collection)
+;;; evil-collection.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection.elc
new file mode 100644
index 0000000..61837a4
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/evil-collection.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/.nosearch b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/.nosearch
new file mode 100644
index 0000000..e69de29
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/2048-game/evil-collection-2048-game.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/2048-game/evil-collection-2048-game.el
new file mode 100644
index 0000000..f9f6b59
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/2048-game/evil-collection-2048-game.el
@@ -0,0 +1,55 @@
+;;; evil-collection-2048-game.el --- Evil bindings for `2048-game' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 James Nguyen
+
+;; Author: Daniel Phan <daniel.phan36@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, games
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `2048-game'.
+
+;;; Code:
+(require 'evil-collection)
+(require '2048-game nil t)
+
+(defconst evil-collection-2048-game-maps '(2048-mode-map))
+
+;;;###autoload
+(defun evil-collection-2048-game-setup ()
+  "Set up `evil' bindings for `2048-game'."
+  (evil-set-initial-state '2048-mode 'normal)
+  (evil-collection-define-key 'normal '2048-mode-map
+    "h" '2048-left
+    "j" '2048-down
+    "k" '2048-up
+    "l" '2048-right
+    "r" '2048-random-move
+    (kbd "<up>") '2048-up
+    (kbd "<left>") '2048-left
+    (kbd "<right>") '2048-right
+    (kbd "<down>") '2048-down)
+  (evil-collection-bind '2048-mode-map
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit))
+
+(provide 'evil-collection-2048-game)
+;;; evil-collection-2048-game.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/2048-game/evil-collection-2048-game.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/2048-game/evil-collection-2048-game.elc
new file mode 100644
index 0000000..47e5de2
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/2048-game/evil-collection-2048-game.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ag/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ag/README.org
new file mode 100644
index 0000000..48ceccc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ag/README.org
@@ -0,0 +1,22 @@
+* ag
+
+  Evil bindings for [[https://github.com/Wilfred/ag.el][ag]] search result buffers.
+
+  Initial state for =ag-mode= is forced to =normal= so the buffer can be
+  edited with [[https://github.com/mhayashi1120/Emacs-wgrep][wgrep]].
+
+** Key bindings
+
+   Applied in =normal= and =visual= states.
+
+   | Command                      | Original | Evil              |
+   |------------------------------+----------+-------------------|
+   | =evil-previous-line=         |          | =k=               |
+   | =evil-backward-char=         |          | =h=               |
+   | =recompile=                  | =g=      | =gr=              |
+   | =compilation-next-error=     | =n=      | =gj=, =C-j=, =]]= |
+   | =compilation-previous-error= | =p=      | =gk=, =C-k=, =[[= |
+   | =evil-search-backward=       |          | =?=               |
+   | =evil-search-forward=        |          | =/=               |
+   | =evil-search-next=           |          | =n=               |
+   | =evil-search-previous=       |          | =N=               |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ag/evil-collection-ag.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ag/evil-collection-ag.el
new file mode 100644
index 0000000..824c46a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ag/evil-collection-ag.el
@@ -0,0 +1,59 @@
+;;; evil-collection-ag.el --- Evil Bindings for Ag -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, ag, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `ag-mode' from the `wgrep-ag' package.
+
+;;; Code:
+(require 'ag nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-ag-maps '(ag-mode-map))
+
+;;;###autoload
+(defun evil-collection-ag-setup ()
+  "Set up `evil' bindings for `ag'."
+  (evil-collection-define-key '(normal visual) 'ag-mode-map
+    "k" 'evil-previous-line
+    "h" 'evil-backward-char
+
+    ;; search
+    "?" evil-collection-evil-search-backward
+    "/" evil-collection-evil-search-forward
+    "n" evil-collection-evil-search-next
+    "N" evil-collection-evil-search-previous)
+  ;; `ag' is best set in 'normal state because its buffer can be edited.
+  ;; https://github.com/mhayashi1120/Emacs-wgrep
+  (evil-set-initial-state 'ag-mode 'normal)
+
+  (evil-collection-bind 'ag-mode-map
+                        'next-item 'compilation-next-error
+                        'prev-item 'compilation-previous-error
+                        'next-section 'compilation-next-error
+                        'prev-section 'compilation-previous-error
+                        'refresh 'recompile))
+
+(provide 'evil-collection-ag)
+;;; evil-collection-ag.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ag/evil-collection-ag.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ag/evil-collection-ag.elc
new file mode 100644
index 0000000..8d68264
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ag/evil-collection-ag.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell-manager/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell-manager/README.org
new file mode 100644
index 0000000..5871466
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell-manager/README.org
@@ -0,0 +1,40 @@
+* agent-shell-manager
+
+  Evil bindings for
+  [[https://github.com/jethrokuan/agent-shell-manager][agent-shell-manager]] --
+  a =tabulated-list= buffer manager for
+  [[https://github.com/xenodium/agent-shell][agent-shell]].
+
+  =agent-shell-manager-mode= derives from =tabulated-list-mode=, so the usual
+  motions work; these bindings map its manager commands onto evil keys and,
+  crucially, make =RET= visit the entry at point in normal state.
+
+** agent-shell-manager-mode-map
+
+*** Navigation (normal state)
+
+    | Command                     | Default | Evil  |
+    |-----------------------------+---------+-------|
+    | =agent-shell-manager-goto=  | =RET=   | =RET= |
+
+*** Manager commands (normal state)
+
+    Placed behind the =g= prefix when =evil-collection-want-g-bindings= is
+    non-nil, otherwise bound to their default-ish single keys.
+
+    | Command                              | Default   | Evil (g) | Evil (no g) |
+    |--------------------------------------+-----------+----------+-------------|
+    | =agent-shell-manager-refresh=        | =g=       | =gr=     | =gr=        |
+    | =agent-shell-manager-kill=           | =k=       | =gk=     | =K=         |
+    | =agent-shell-manager-new=            | =c=       | =gc=     | =c=         |
+    | =agent-shell-manager-restart=        | =r=       | =gR=     | =R=         |
+    | =agent-shell-manager-delete-killed=  | =d=       | =gd=     | =d=         |
+    | =agent-shell-manager-set-mode=       | =m=       | =gm=     | =m=         |
+    | =agent-shell-manager-set-model=      | =M=       | =gv=     | =M=         |
+    | =agent-shell-manager-interrupt=      | =C-c C-c= | =gx=     | =x=         |
+    | =agent-shell-manager-view-traffic=   | =t=       | =gt=     | =t=         |
+    | =agent-shell-manager-toggle-logging= | =l=       | =gl=     | =l=         |
+    | =quit-window=                        | =q=       | =q=      | =q=         |
+
+    =C-c C-c= (interrupt) is bound in normal state regardless of the =g=
+    setting.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell-manager/evil-collection-agent-shell-manager.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell-manager/evil-collection-agent-shell-manager.el
new file mode 100644
index 0000000..d39e4c5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell-manager/evil-collection-agent-shell-manager.el
@@ -0,0 +1,76 @@
+;;; evil-collection-agent-shell-manager.el --- Bindings for agent-shell-manager -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026 Julio Borja Barra
+
+;; Author: Julio Borja Barra
+;; Maintainer: Julio Borja Barra
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, agent-shell-manager, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `agent-shell-manager' -- the tabulated-list buffer
+;; manager for `agent-shell'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'agent-shell-manager nil t)
+
+(defconst evil-collection-agent-shell-manager-maps '(agent-shell-manager-mode-map))
+
+(defvar agent-shell-manager-mode-map)
+
+;;;###autoload
+(defun evil-collection-agent-shell-manager-setup ()
+  "Set up `evil' bindings for `agent-shell-manager'."
+  (evil-set-initial-state 'agent-shell-manager-mode 'normal)
+
+  (evil-collection-define-key 'normal 'agent-shell-manager-mode-map
+    (kbd "C-c C-c") 'agent-shell-manager-interrupt)
+
+  (evil-collection-bind 'agent-shell-manager-mode-map
+                        'action 'agent-shell-manager-goto
+                        'refresh 'agent-shell-manager-refresh
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window)
+
+  (if evil-collection-want-g-bindings
+      (evil-collection-define-key 'normal 'agent-shell-manager-mode-map
+        "gk" 'agent-shell-manager-kill
+        "gc" 'agent-shell-manager-new
+        "gR" 'agent-shell-manager-restart
+        "gd" 'agent-shell-manager-delete-killed
+        "gm" 'agent-shell-manager-set-mode
+        "gv" 'agent-shell-manager-set-model
+        "gx" 'agent-shell-manager-interrupt
+        "gt" 'agent-shell-manager-view-traffic
+        "gl" 'agent-shell-manager-toggle-logging)
+    (evil-collection-bind 'agent-shell-manager-mode-map
+                          'delete 'agent-shell-manager-delete-killed)
+    (evil-collection-define-key 'normal 'agent-shell-manager-mode-map
+      "K" 'agent-shell-manager-kill
+      "c" 'agent-shell-manager-new
+      "R" 'agent-shell-manager-restart
+      "m" 'agent-shell-manager-set-mode
+      "M" 'agent-shell-manager-set-model
+      "x" 'agent-shell-manager-interrupt
+      "t" 'agent-shell-manager-view-traffic
+      "L" 'agent-shell-manager-toggle-logging)))
+
+(provide 'evil-collection-agent-shell-manager)
+;;; evil-collection-agent-shell-manager.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell-manager/evil-collection-agent-shell-manager.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell-manager/evil-collection-agent-shell-manager.elc
new file mode 100644
index 0000000..88f0afc
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell-manager/evil-collection-agent-shell-manager.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell/README.org
new file mode 100644
index 0000000..a362a2f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell/README.org
@@ -0,0 +1,137 @@
+* agent-shell
+
+  Evil bindings for [[https://github.com/xenodium/agent-shell][agent-shell]] -- a
+  comint-based chat REPL with permission prompts, a side viewport and a diff
+  buffer.
+
+** agent-shell-mode-map
+
+   Upstream's =n= / =p= top-level bindings are unset so they don't intercept
+   keystrokes in insert state; in insert they self-insert.
+
+*** Permission dispatch (normal state)
+
+    Only active when =evil-collection-agent-shell-want-permission-bindings= is
+    non-nil. Each key falls through to its default evil command unless a
+    pending permission button is visible.
+
+    | Command                                               | Action           | Evil |
+    |-------------------------------------------------------+------------------+------|
+    | =evil-collection-agent-shell-permission-view-diff=    | view diff =v=    | =v=  |
+    | =evil-collection-agent-shell-permission-allow-once=   | allow =y=        | =y=  |
+    | =evil-collection-agent-shell-permission-reject-once=  | reject =C-c C-c= | =n=  |
+    | =evil-collection-agent-shell-permission-allow-always= | always allow =!= | =!=  |
+
+*** Navigation (normal state)
+
+    | Command                          | Original | Evil        |
+    |----------------------------------+----------+-------------|
+    | =agent-shell-next-item=          | =n=      | =TAB=       |
+    | =agent-shell-previous-item=      | =p=      | =<backtab>= |
+    | =agent-shell-cycle-session-mode= | n/a      | =C-<tab>=   |
+
+*** g-prefix (only when =evil-collection-want-g-bindings=)
+
+    | Command                          | Evil |
+    |----------------------------------+------|
+    | =agent-shell-cycle-session-mode= | =gs= |
+    | =agent-shell-interrupt=          | =gx= |
+    | =agent-shell-set-session-mode=   | =gm= |
+    | =agent-shell-set-session-model=  | =gv= |
+    | =agent-shell-other-buffer=       | =go= |
+    | =agent-shell-yank-dwim=          | =gp= |
+    | =agent-shell-reload=             | =gr= |
+    | =agent-shell-restart=            | =gR= |
+    | =agent-shell-fork=               | =gF= |
+    | =agent-shell-copy-session-id=    | =gy= |
+    | =agent-shell-prompt-compose=     | =gc= |
+    | =agent-shell-queue-request=      | =gq= |
+    | =agent-shell-open-transcript=    | =gt= |
+
+** agent-shell-viewport-edit-mode-map
+
+   The viewport's compose buffer. Standard save/quit verbs become send/cancel.
+
+   | Command                                  | Original  | Evil                           |
+   |------------------------------------------+-----------+--------------------------------|
+   | =agent-shell-viewport-compose-send=      | =C-c C-c= | =:w=, =:wq=, =ZZ=, =RET= remap |
+   | =agent-shell-viewport-compose-cancel=    | =C-c C-k= | =:q=, =ZQ=                     |
+   | =agent-shell-viewport-previous-history=  | n/a       | =M-k=                          |
+   | =agent-shell-viewport-next-history=      | n/a       | =M-j=                          |
+   | =agent-shell-viewport-compose-peek-last= | n/a       | =C-o=                          |
+
+   When =evil-collection-want-g-bindings= is non-nil:
+
+   | Command                                  | Evil |
+   |------------------------------------------+------|
+   | =agent-shell-viewport-compose-help-menu= | =g?= |
+   | =agent-shell-cycle-session-mode=         | =gs= |
+   | =agent-shell-viewport-set-session-mode=  | =gm= |
+   | =agent-shell-viewport-set-session-model= | =gv= |
+   | =agent-shell-other-buffer=               | =go= |
+   | =agent-shell-yank-dwim=                  | =gp= |
+   | =agent-shell-viewport-search-history=    | =g/= |
+   | =agent-shell-viewport-copy-session-id=   | =gy= |
+   | =agent-shell-viewport-open-transcript=   | =gt= |
+
+** agent-shell-viewport-view-mode-map
+
+   Read-only viewport. =RET= / =:w= / =ZZ= all interrupt the agent; =:q= /
+   =ZQ= bury.
+
+   | Command                              | Original  | Evil                    |
+   |--------------------------------------+-----------+-------------------------|
+   | =agent-shell-viewport-interrupt=     | =C-c C-c= | =RET=, =:w=, =ZZ= remap |
+   | =bury-buffer=                        | =q=       | =q=, =ZQ=, =:q= remap   |
+   | =agent-shell-viewport-next-item=     | =n=       | =TAB=, =gj=             |
+   | =agent-shell-viewport-previous-item= | =p=       | =<backtab>=, =gk=       |
+   | =agent-shell-viewport-next-page=     | =f=       | =C-j=                   |
+   | =agent-shell-viewport-previous-page= | =b=       | =C-k=                   |
+
+   When =evil-collection-want-g-bindings= is non-nil:
+
+   | Command                                   | Evil         |
+   |-------------------------------------------+--------------|
+   | =agent-shell-viewport-reply-1..9=         | =g1= .. =g9= |
+   | =agent-shell-viewport-cycle-session-mode= | =gs=         |
+   | =agent-shell-viewport-set-session-model=  | =gv=         |
+   | =agent-shell-other-buffer=                | =go=         |
+   | =agent-shell-viewport-set-session-mode=   | =gm=         |
+   | =agent-shell-viewport-help-menu=          | =g?=         |
+   | =agent-shell-viewport-reply=              | =gr=         |
+   | =agent-shell-viewport-reply-yes=          | =gy=         |
+   | =agent-shell-viewport-reply-more=         | =gM=         |
+   | =agent-shell-viewport-reply-again=        | =ga=         |
+   | =agent-shell-viewport-reply-continue=     | =gc=         |
+   | =agent-shell-viewport-edit=               | =ge=         |
+   | =agent-shell-viewport-fork=               | =gF=         |
+   | =agent-shell-viewport-copy-session-id=    | =gY=         |
+   | =agent-shell-viewport-open-transcript=    | =gt=         |
+   | =agent-shell-viewport-refresh=            | =gz=         |
+
+** agent-shell-diff-mode-map
+
+   | Command                       | Original | Evil (=g-bindings=) | Evil (no =g-bindings=) |
+   |-------------------------------+----------+---------------------+------------------------|
+   | =agent-shell-diff-open-file=  | =f=      | =gf=                | =f=                    |
+   | =agent-shell-diff-accept-all= | =y=      | =gy=                | =y=                    |
+   | =agent-shell-diff-reject-all= | =n=      | =gn=                | =n=                    |
+   | =kill-current-buffer=         | n/a      | =q=                 | =q=                    |
+
+** New commands
+
+   | Command                                               | Purpose                                            |
+   |-------------------------------------------------------+----------------------------------------------------|
+   | =evil-collection-agent-shell-permission-allow-once=   | Press =y= on the latest pending permission button. |
+   | =evil-collection-agent-shell-permission-reject-once=  | Send =C-c C-c= to it.                              |
+   | =evil-collection-agent-shell-permission-allow-always= | Press =!=.                                         |
+   | =evil-collection-agent-shell-permission-view-diff=    | Press =v=.                                         |
+
+   Each only fires when a pending permission button is visible -- otherwise the
+   keymap entry resolves to nil via a =:filter= and evil's default takes over.
+
+** Customization
+
+   | Variable                                               | Default | Purpose                                               |
+   |--------------------------------------------------------+---------+-------------------------------------------------------|
+   | =evil-collection-agent-shell-want-permission-bindings= | =t=     | Bind =y= / =n= / =!= / =v= for the dispatchers above. |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell/evil-collection-agent-shell.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell/evil-collection-agent-shell.el
new file mode 100644
index 0000000..be77409
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell/evil-collection-agent-shell.el
@@ -0,0 +1,255 @@
+;;; evil-collection-agent-shell.el --- Bindings for agent-shell -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026 Joseph LaFreniere
+
+;; Author: Joseph LaFreniere <git@lafreniere.xyz>
+;; Maintainer: Joseph LaFreniere <git@lafreniere.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, agent-shell, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for agent-shell.
+
+;;; Code:
+(require 'evil-collection)
+(require 'agent-shell nil t)
+
+(defconst evil-collection-agent-shell-maps '(agent-shell-mode-map
+                                             agent-shell-viewport-edit-mode-map
+                                             agent-shell-viewport-view-mode-map
+                                             agent-shell-diff-mode-map))
+
+(defvar agent-shell-mode-map)
+(defvar agent-shell-viewport-edit-mode-map)
+(defvar agent-shell-viewport-view-mode-map)
+(defvar agent-shell-diff-mode-map)
+
+(defcustom evil-collection-agent-shell-want-permission-bindings t
+  "When non-nil, bind permission button keys in normal state.
+
+`y', `n', `!', and `v' will activate the latest pending permission
+button when one is visible, and fall through to their default Evil
+commands otherwise."
+  :type 'boolean
+  :group 'evil-collection)
+
+;;; Permission button helpers.
+
+(defun evil-collection-agent-shell--latest-permission-keymap ()
+  "Return the keymap of the latest pending permission button, or nil.
+Walks the buffer backward from `point-max' looking for text with the
+`agent-shell-permission-button' property -- the navigatable single-char
+marker that `agent-shell--make-permission-button' adds to each button."
+  (save-excursion
+    (goto-char (point-max))
+    (when-let* ((match (text-property-search-backward
+                        'agent-shell-permission-button t t)))
+      (get-text-property (prop-match-beginning match) 'keymap))))
+
+(defun evil-collection-agent-shell--pending-permission-p ()
+  "Return non-nil when the current buffer has a pending permission button."
+  (and (evil-collection-agent-shell--latest-permission-keymap) t))
+
+(defun evil-collection-agent-shell--press (key)
+  "Dispatch KEY through the latest pending permission's button keymap.
+KEY is a string passed to `kbd'."
+  (let* ((km (or (evil-collection-agent-shell--latest-permission-keymap)
+                 (user-error "No pending permission")))
+         (binding (lookup-key km (kbd key))))
+    (cond
+     ((commandp binding) (call-interactively binding))
+     ((null binding) (user-error "No `%s' action on this permission" key))
+     (t (user-error "Unexpected binding for `%s': %S" key binding)))))
+
+(defun evil-collection-agent-shell-permission-allow-once ()
+  "Allow the latest pending tool-call permission once."
+  (interactive)
+  (evil-collection-agent-shell--press "y"))
+
+(defun evil-collection-agent-shell-permission-reject-once ()
+  "Reject the latest pending tool-call permission and interrupt the agent."
+  (interactive)
+  (evil-collection-agent-shell--press "C-c C-c"))
+
+(defun evil-collection-agent-shell-permission-allow-always ()
+  "Always-allow the tool kind for the latest pending permission."
+  (interactive)
+  (evil-collection-agent-shell--press "!"))
+
+(defun evil-collection-agent-shell-permission-view-diff ()
+  "View the diff for the latest pending permission, if any."
+  (interactive)
+  (evil-collection-agent-shell--press "v"))
+
+(defvar evil-collection-agent-shell-permission-allow-once
+  `(menu-item "" nil :filter
+              ,(lambda (&optional _)
+                 (when (evil-collection-agent-shell--pending-permission-p)
+                   'evil-collection-agent-shell-permission-allow-once))))
+
+(defvar evil-collection-agent-shell-permission-reject-once
+  `(menu-item "" nil :filter
+              ,(lambda (&optional _)
+                 (when (evil-collection-agent-shell--pending-permission-p)
+                   'evil-collection-agent-shell-permission-reject-once))))
+
+(defvar evil-collection-agent-shell-permission-allow-always
+  `(menu-item "" nil :filter
+              ,(lambda (&optional _)
+                 (when (evil-collection-agent-shell--pending-permission-p)
+                   'evil-collection-agent-shell-permission-allow-always))))
+
+(defvar evil-collection-agent-shell-permission-view-diff
+  `(menu-item "" nil :filter
+              ,(lambda (&optional _)
+                 (when (evil-collection-agent-shell--pending-permission-p)
+                   'evil-collection-agent-shell-permission-view-diff))))
+
+;;;###autoload
+(defun evil-collection-agent-shell-setup ()
+  "Set up `evil' bindings for `agent-shell'."
+  ;; `agent-shell-mode-map' binds \"n\" and \"p\" at the map level, which causes
+  ;; them to intercept keystrokes even in insert state.  Remove those bindings
+  ;; entirely.
+  (if (fboundp 'keymap-unset)
+      (progn
+        (keymap-unset agent-shell-mode-map "n" t)
+        (keymap-unset agent-shell-mode-map "p" t))
+    (define-key agent-shell-mode-map "n" nil)
+    (define-key agent-shell-mode-map "p" nil))
+
+  (evil-collection-define-key 'insert 'agent-shell-mode-map
+    "n" 'self-insert-command
+    "p" 'self-insert-command)
+
+  (when evil-collection-agent-shell-want-permission-bindings
+    (evil-collection-define-key 'normal 'agent-shell-mode-map
+      "v" evil-collection-agent-shell-permission-view-diff
+      "y" evil-collection-agent-shell-permission-allow-once
+      "n" evil-collection-agent-shell-permission-reject-once
+      "!" evil-collection-agent-shell-permission-allow-always))
+
+  (evil-collection-define-key 'normal 'agent-shell-mode-map
+    (kbd "C-<tab>") 'agent-shell-cycle-session-mode)
+  (evil-collection-bind 'agent-shell-mode-map
+                        'cycle-next 'agent-shell-next-item
+                        'cycle-previous 'agent-shell-previous-item)
+
+  (when evil-collection-want-g-bindings
+    (evil-collection-define-key 'normal 'agent-shell-mode-map
+      "gs" 'agent-shell-cycle-session-mode
+      "gx" 'agent-shell-interrupt
+      "gm" 'agent-shell-set-session-mode
+      "gv" 'agent-shell-set-session-model
+      "go" 'agent-shell-other-buffer
+      "gp" 'agent-shell-yank-dwim
+      "gr" 'agent-shell-reload
+      "gR" 'agent-shell-restart
+      "gF" 'agent-shell-fork
+      "gy" 'agent-shell-copy-session-id
+      "gc" 'agent-shell-prompt-compose
+      "gq" 'agent-shell-queue-request
+      "gt" 'agent-shell-open-transcript))
+
+  (evil-collection-define-key 'normal 'agent-shell-viewport-edit-mode-map
+    [remap evil-save-and-close] 'agent-shell-viewport-compose-send
+    [remap evil-save-modified-and-close] 'agent-shell-viewport-compose-send
+    [remap evil-ret] 'agent-shell-viewport-compose-send
+    [remap evil-write] 'agent-shell-viewport-compose-send
+    [remap evil-quit] 'agent-shell-viewport-compose-cancel
+    "M-k" 'agent-shell-viewport-previous-history
+    "M-j" 'agent-shell-viewport-next-history
+    (kbd "C-o") 'agent-shell-viewport-compose-peek-last)
+
+  (when evil-collection-want-g-bindings
+    (evil-collection-define-key 'normal 'agent-shell-viewport-edit-mode-map
+      "gs" 'agent-shell-cycle-session-mode
+      "gm" 'agent-shell-viewport-set-session-mode
+      "gv" 'agent-shell-viewport-set-session-model
+      "go" 'agent-shell-other-buffer
+      "gp" 'agent-shell-yank-dwim
+      "g/" 'agent-shell-viewport-search-history
+      "gy" 'agent-shell-viewport-copy-session-id
+      "gt" 'agent-shell-viewport-open-transcript)
+    (evil-collection-bind 'agent-shell-viewport-edit-mode-map 'describe-mode 'agent-shell-viewport-compose-help-menu))
+
+  (evil-collection-define-key 'normal 'agent-shell-viewport-view-mode-map
+    [remap evil-save-and-close] 'agent-shell-viewport-interrupt
+    [remap evil-save-modified-and-close] 'agent-shell-viewport-interrupt
+    [remap evil-ret] 'agent-shell-viewport-interrupt
+    [remap evil-write] 'agent-shell-viewport-interrupt
+    [remap evil-quit] 'bury-buffer)
+  (evil-collection-bind 'agent-shell-viewport-view-mode-map
+                        'cycle-next 'agent-shell-viewport-next-item
+                        'cycle-previous 'agent-shell-viewport-previous-item
+                        'next-item 'agent-shell-viewport-next-item
+                        'prev-item 'agent-shell-viewport-previous-item
+                        'next-section 'agent-shell-viewport-next-page
+                        'prev-section 'agent-shell-viewport-previous-page
+                        'quit 'bury-buffer)
+
+  (when evil-collection-want-g-bindings
+    (evil-collection-define-key 'normal 'agent-shell-viewport-view-mode-map
+      "g1" 'agent-shell-viewport-reply-1
+      "g2" 'agent-shell-viewport-reply-2
+      "g3" 'agent-shell-viewport-reply-3
+      "g4" 'agent-shell-viewport-reply-4
+      "g5" 'agent-shell-viewport-reply-5
+      "g6" 'agent-shell-viewport-reply-6
+      "g7" 'agent-shell-viewport-reply-7
+      "g8" 'agent-shell-viewport-reply-8
+      "g9" 'agent-shell-viewport-reply-9
+      "gs" 'agent-shell-viewport-cycle-session-mode
+      "gv" 'agent-shell-viewport-set-session-model
+      "go" 'agent-shell-other-buffer
+      "gm" 'agent-shell-viewport-set-session-mode
+      ;; Maybe move elsewhere.
+      "gr" 'agent-shell-viewport-reply
+      "gy" 'agent-shell-viewport-reply-yes
+      "gM" 'agent-shell-viewport-reply-more
+      "ga" 'agent-shell-viewport-reply-again
+      "gc" 'agent-shell-viewport-reply-continue
+      "ge" 'agent-shell-viewport-edit
+      "gF" 'agent-shell-viewport-fork
+      "gY" 'agent-shell-viewport-copy-session-id
+      "gt" 'agent-shell-viewport-open-transcript
+      "gz" 'agent-shell-viewport-refresh)
+    (evil-collection-bind 'agent-shell-viewport-view-mode-map 'describe-mode 'agent-shell-viewport-help-menu))
+
+  (evil-collection-bind 'agent-shell-diff-mode-map
+                        'quit #'kill-current-buffer
+                        'find-file 'agent-shell-diff-open-file)
+
+  (if evil-collection-want-g-bindings
+      (evil-collection-define-key 'normal 'agent-shell-diff-mode-map
+        "gy" 'agent-shell-diff-accept-all
+        "gn" 'agent-shell-diff-reject-all)
+    (evil-collection-define-key 'normal 'agent-shell-diff-mode-map
+      "y" 'agent-shell-diff-accept-all
+      "n" 'agent-shell-diff-reject-all))
+
+  (add-hook 'agent-shell-diff-mode-hook #'evil-normalize-keymaps)
+  (add-hook 'agent-shell-mode-hook #'evil-normalize-keymaps)
+  (add-hook 'agent-shell-viewport-view-mode-hook #'evil-normalize-keymaps)
+  (add-hook 'agent-shell-viewport-edit-mode-hook #'evil-normalize-keymaps)
+
+  (advice-add 'agent-shell-jump-to-latest-permission-button-row
+              :after (lambda (&rest _) (evil-normalize-keymaps))))
+
+(provide 'evil-collection-agent-shell)
+;;; evil-collection-agent-shell.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell/evil-collection-agent-shell.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell/evil-collection-agent-shell.elc
new file mode 100644
index 0000000..88aa3cf
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/agent-shell/evil-collection-agent-shell.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/alchemist/evil-collection-alchemist.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/alchemist/evil-collection-alchemist.el
new file mode 100644
index 0000000..98dc11a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/alchemist/evil-collection-alchemist.el
@@ -0,0 +1,114 @@
+;;; evil-collection-alchemist.el --- Bindings for `alchemist' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, alchemist, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `alchemist'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'alchemist nil t)
+
+(defconst evil-collection-alchemist-maps '(alchemist-compile-mode-map
+                                           alchemist-eval-mode-map
+                                           alchemist-execute-mode-map
+                                           alchemist-message-mode-map
+                                           alchemist-help-minor-mode-map
+                                           alchemist-macroexpand-mode-map
+                                           alchemist-mix-mode-map
+                                           alchemist-test-report-mode-map
+                                           alchemist-mode-map))
+
+
+;;;###autoload
+(defun evil-collection-alchemist-setup ()
+  "Set up `evil' bindings for `alchemist'."
+  (evil-set-initial-state 'alchemist-compile-mode 'normal)
+  (evil-set-initial-state 'alchemist-eval-mode 'normal)
+  (evil-set-initial-state 'alchemist-execute-mode 'normal)
+  (evil-set-initial-state 'alchemist-message-mode 'normal)
+  (evil-set-initial-state 'alchemist-help-minor-mode 'normal)
+  (evil-set-initial-state 'alchemist-macroexpand-mode 'normal)
+  (evil-set-initial-state 'alchemist-refcard-mode 'normal)
+  (evil-set-initial-state 'alchemist-mix-mode 'normal)
+  (evil-set-initial-state 'alchemist-test-mode 'normal)
+  (evil-set-initial-state 'alchemist-test-report-mode 'normal)
+
+  (evil-collection-bind 'alchemist-compile-mode-map 'quit 'quit-window)
+
+  (evil-collection-bind 'alchemist-eval-mode-map 'quit 'quit-window)
+
+  (evil-collection-bind 'alchemist-execute-mode-map 'quit 'quit-window)
+
+  (evil-collection-bind 'alchemist-message-mode-map 'quit 'quit-window)
+
+  (evil-collection-define-key 'normal 'alchemist-help-minor-mode-map
+    "m" 'alchemist-help-module
+    "s" 'alchemist-help
+    "gh" 'alchemist-help-history)
+  (evil-collection-bind 'alchemist-help-minor-mode-map
+                        'quit 'quit-window
+                        'describe-mode 'alchemist-help-minor-mode-key-binding-summary
+                        'find-definition 'alchemist-goto-definition-at-point
+                        'lookup-doc 'alchemist-help-search-at-point)
+
+  (evil-collection-bind 'alchemist-macroexpand-mode-map 'quit 'quit-window)
+
+  (evil-collection-define-key 'normal 'alchemist-refcard-mode-map
+    "gd" 'alchemist-refcard--describe-funtion-at-point)
+  (evil-collection-bind 'alchemist-refcard-mode-map
+                        'quit 'quit-window
+                        'describe-mode 'alchemist-refcard--describe-funtion-at-point)
+
+  (evil-collection-define-key 'normal 'alchemist-mix-mode-map
+    "i" 'alchemist-mix-send-input-to-mix-process)
+  (evil-collection-bind 'alchemist-mix-mode-map
+                        'quit 'quit-window
+                        'refresh 'alchemist-mix-rerun-last-task)
+
+  (evil-collection-bind 'alchemist-test-report-mode-map
+                        'next-item 'alchemist-test-next-result
+                        'prev-item 'alchemist-test-previous-result
+                        'next-section 'alchemist-test-next-stacktrace-file
+                        'prev-section 'alchemist-test-previous-stacktrace-file)
+  (evil-collection-define-key 'normal 'alchemist-test-report-mode-map
+    (kbd "C-c C-k") 'alchemist-report-interrupt-current-process)
+  (evil-collection-bind 'alchemist-test-report-mode-map
+                        'next-section-2 'alchemist-test-next-result
+                        'prev-section-2 'alchemist-test-previous-result
+                        'quit 'quit-window
+                        'refresh 'alchemist-mix-rerun-last-test
+                        'toggle 'toggle-truncate-lines)
+
+  (evil-collection-bind 'alchemist-mode-map
+                        'next-section 'alchemist-goto-jump-to-next-def-symbol
+                        'prev-section 'alchemist-goto-jump-to-previous-def-symbol
+                        'find-definition 'alchemist-goto-definition-at-point
+                        'pop-definition 'alchemist-goto-jump-back
+                        'lookup-doc 'alchemist-help-search-at-point
+                        'goto-repl 'alchemist-iex-run
+                        'describe-mode 'alchemist-help))
+
+(provide 'evil-collection-alchemist)
+;;; evil-collection-alchemist.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/alchemist/evil-collection-alchemist.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/alchemist/evil-collection-alchemist.elc
new file mode 100644
index 0000000..d2c9e5f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/alchemist/evil-collection-alchemist.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/anaconda-mode/evil-collection-anaconda-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/anaconda-mode/evil-collection-anaconda-mode.el
new file mode 100644
index 0000000..2db77a9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/anaconda-mode/evil-collection-anaconda-mode.el
@@ -0,0 +1,63 @@
+;;; evil-collection-anaconda-mode.el --- Bindings for `anaconda-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, python, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `anaconda-mode'.
+
+;;; Code:
+(require 'anaconda-mode nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-anaconda-mode-maps '(anaconda-view-mode-map
+                                               anaconda-mode-map))
+
+;;;###autoload
+(defun evil-collection-anaconda-mode-setup ()
+  "Set up `evil' bindings for `anaconda-mode'."
+  ;; Bindings don't seem to be set the first time.
+  (add-hook 'anaconda-mode-hook #'evil-normalize-keymaps)
+
+  ;; latest anaconda has replaced view mode by an xref implementation,
+  ;; anaconda stable uses `anaconda-view-mode-map'
+  (when (boundp 'anaconda-view-mode-map)
+    (evil-collection-bind 'anaconda-view-mode-map
+                          'next-item 'next-error-no-select
+                          'prev-item 'previous-error-no-select
+                          'next-section 'next-error-no-select
+                          'prev-section 'previous-error-no-select
+                          'quit 'quit-window))
+
+  (evil-collection-bind 'anaconda-mode-map
+                        'find-usages 'anaconda-mode-find-references
+                        'lookup-doc 'anaconda-mode-show-doc
+                        'find-definition 'anaconda-mode-find-definitions
+                        'pop-definition (if (fboundp 'anaconda-mode-go-back)
+                                            'anaconda-mode-go-back
+                                          'xref-pop-marker-stack))
+  (when (evil-collection-binding-enabled-p 'find-usages)
+    (evil-collection-define-key 'normal 'anaconda-mode-map
+      "gA" 'anaconda-mode-find-assignments)))
+
+(provide 'evil-collection-anaconda-mode)
+;;; evil-collection-anaconda-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/anaconda-mode/evil-collection-anaconda-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/anaconda-mode/evil-collection-anaconda-mode.elc
new file mode 100644
index 0000000..eca1ad4
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/anaconda-mode/evil-collection-anaconda-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/apropos/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/apropos/README.org
new file mode 100644
index 0000000..650102a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/apropos/README.org
@@ -0,0 +1,15 @@
+* apropos
+
+  Evil bindings for =apropos-mode=.
+
+** Key bindings
+
+   | Command           | Original | Evil      |
+   |-------------------+----------+-----------|
+   | =apropos-follow=  | =RET=    | =RET=     |
+   | =forward-button=  | =TAB=    | =TAB=     |
+   | =backward-button= | =S-TAB=  | =S-TAB=   |
+   | =describe-mode=   | =h=, =?= | =g?=      |
+   | =revert-buffer=   | =g=      | =gr=      |
+   | =quit-window=     | =q=      | =q=, =ZZ= |
+   | =evil-quit=       | n/a      | =ZQ=      |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/apropos/evil-collection-apropos.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/apropos/evil-collection-apropos.el
new file mode 100644
index 0000000..16098c5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/apropos/evil-collection-apropos.el
@@ -0,0 +1,50 @@
+;;; evil-collection-apropos.el --- Evil bindings for apropos-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, help, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `apropos-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'apropos)
+
+(defconst evil-collection-apropos-maps '(apropos-mode-map))
+
+;;;###autoload
+(defun evil-collection-apropos-setup ()
+  "Set up `evil' bindings for `apropos'."
+  (evil-set-initial-state 'apropos-mode 'normal)
+  (evil-collection-bind 'apropos-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button
+                        'action 'apropos-follow
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit
+                        'describe-mode 'describe-mode
+                        'refresh 'revert-buffer))
+
+(provide 'evil-collection-apropos)
+;;; evil-collection-apropos.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/apropos/evil-collection-apropos.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/apropos/evil-collection-apropos.elc
new file mode 100644
index 0000000..0f53de8
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/apropos/evil-collection-apropos.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/arc-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/arc-mode/README.org
new file mode 100644
index 0000000..178486b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/arc-mode/README.org
@@ -0,0 +1,30 @@
+* arc-mode
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/File-Archives.html][arc-mode]] (archive file browser).
+
+  =arc-mode= and =archive-mode= start in normal state.
+
+** Key bindings
+
+   | Command                        | Original        | Evil                         |
+   |--------------------------------+-----------------+------------------------------|
+   | =archive-next-line=            | =n=, =C-n=      | =j=, =C-j=, =gj=, =n=, =C-n= |
+   | =archive-previous-line=        | =p=, =C-p=      | =k=, =C-k=, =gk=, =p=, =C-p= |
+   | =beginning-of-buffer=          | =<=             | =gg=, =<=                    |
+   | =end-of-buffer=                | =>=             | =G=, =>=                     |
+   | =archive-extract=              | =RET=, =e=, =f= | =RET=                        |
+   | =archive-extract-other-window= | =o=             | =go=, =S-RET=                |
+   | =archive-view=                 | =v=             | =M-RET=                      |
+   | =archive-alternate-display=    | =a=             | =a=                          |
+   | =archive-flag-deleted=         | =d=, =C-d=      | =d=, =C-d=                   |
+   | =archive-rename-entry=         | =r=             | =r=                          |
+   | =archive-expunge=              | =x=             | =x=                          |
+   | =archive-copy-file=            | =C=             | =C=                          |
+   | =archive-chmod-entry=          | =M=             | =M=                          |
+   | =archive-chown-entry=          | =O=             | =O=                          |
+   | =archive-chgrp-entry=          | =G=             | =P=                          |
+   | =archive-mark=                 | =m=             | =m=                          |
+   | =archive-unflag=               | =u=             | =u=                          |
+   | =archive-unmark-all-files=     | =M-DEL=         | =U=, =M-DEL=                 |
+   | =revert-buffer=                | =g=             | =gr=                         |
+   | =quit-window=                  | =q=             | =q=                          |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/arc-mode/evil-collection-arc-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/arc-mode/evil-collection-arc-mode.el
new file mode 100644
index 0000000..aeae4b4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/arc-mode/evil-collection-arc-mode.el
@@ -0,0 +1,70 @@
+;;; evil-collection-arc-mode.el --- Evil bindings for arc-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, arc-mode, archive, bindings, files
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Evil bindings for arc-mode.
+
+;;; Code:
+(require 'arc-mode)
+(require 'evil-collection)
+
+(defconst evil-collection-arc-mode-maps '(archive-mode-map))
+
+;;;###autoload
+(defun evil-collection-arc-mode-setup ()
+  "Set up `evil' bindings for `arc-mode'."
+  (evil-set-initial-state 'arc-mode 'normal)
+  (evil-set-initial-state 'archive-mode 'normal)
+  (evil-collection-bind 'archive-mode-map 'rename 'archive-rename-entry)
+  (evil-collection-define-key 'normal 'archive-mode-map
+    "j" 'archive-next-line
+    "k" 'archive-previous-line
+
+    "gg" 'beginning-of-buffer
+    "G" 'end-of-buffer
+
+    "a" 'archive-alternate-display
+    "C" 'archive-copy-file
+    "M" 'archive-chmod-entry
+    "O" 'archive-chown-entry
+    "P" 'archive-chgrp-entry)
+  (evil-collection-bind 'archive-mode-map
+                        'mark 'archive-mark
+                        'unmark 'archive-unflag
+                        'unmark-all 'archive-unmark-all-files
+                        'mark-delete 'archive-flag-deleted
+                        'execute-marks 'archive-expunge
+                        'action 'archive-extract
+                        'action-other 'archive-extract-other-window
+                        'action-stay 'archive-view
+                        'next-item 'archive-next-line
+                        'prev-item 'archive-previous-line
+                        'next-section 'archive-next-line
+                        'prev-section 'archive-previous-line
+                        'quit 'quit-window
+                        'refresh 'revert-buffer))
+
+(provide 'evil-collection-arc-mode)
+;;; evil-collection-arc-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/arc-mode/evil-collection-arc-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/arc-mode/evil-collection-arc-mode.elc
new file mode 100644
index 0000000..3e09e71
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/arc-mode/evil-collection-arc-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/atomic-chrome/evil-collection-atomic-chrome.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/atomic-chrome/evil-collection-atomic-chrome.el
new file mode 100644
index 0000000..9e48e98
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/atomic-chrome/evil-collection-atomic-chrome.el
@@ -0,0 +1,42 @@
+;;; evil-collection-atomic-chrome.el --- Evil bindings for atomic-chrome -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for atomic-chrome.
+
+;;; Code:
+(require 'evil-collection)
+(require 'atomic-chrome nil t)
+
+(defconst evil-collection-atomic-chrome-maps nil)
+
+;;;###autoload
+(defun evil-collection-atomic-chrome-setup ()
+  "Set up `evil' bindings for `atomic-chrome'."
+  ;; The browser is in "inserted" state, makes it consistent.
+  (evil-set-initial-state 'atomic-chrome-edit-mode 'insert))
+
+(provide 'evil-collection-atomic-chrome)
+;;; evil-collection-atomic-chrome.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/atomic-chrome/evil-collection-atomic-chrome.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/atomic-chrome/evil-collection-atomic-chrome.elc
new file mode 100644
index 0000000..ac80513
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/atomic-chrome/evil-collection-atomic-chrome.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/auto-package-update/evil-collection-auto-package-update.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/auto-package-update/evil-collection-auto-package-update.el
new file mode 100644
index 0000000..fa2932d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/auto-package-update/evil-collection-auto-package-update.el
@@ -0,0 +1,43 @@
+;;; evil-collection-auto-package-update.el --- Evil bindings for auto-package-update -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, auto-package-update, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for auto-package-update.
+
+;;; Code:
+(require 'evil-collection)
+(require 'auto-package-update nil t)
+
+(defconst evil-collection-auto-package-update-maps '(auto-package-update-minor-mode-map))
+
+;;;###autoload
+(defun evil-collection-auto-package-update-setup ()
+  "Set up `evil' bindings for `auto-package-update'."
+  (add-hook 'auto-package-update-minor-mode-hook #'evil-normalize-keymaps)
+  (evil-collection-bind 'auto-package-update-minor-mode-map 'quit 'quit-window))
+
+(provide 'evil-collection-auto-package-update)
+
+;;; evil-collection-auto-package-update.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/auto-package-update/evil-collection-auto-package-update.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/auto-package-update/evil-collection-auto-package-update.elc
new file mode 100644
index 0000000..b729df2
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/auto-package-update/evil-collection-auto-package-update.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/beginend/evil-collection-beginend.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/beginend/evil-collection-beginend.el
new file mode 100644
index 0000000..996aa4f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/beginend/evil-collection-beginend.el
@@ -0,0 +1,127 @@
+;;; evil-collection-beginend.el --- Evil bindings for beginend -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Balaji Sivaraman
+
+;; Author: Balaji Sivaraman <balaji@balajisivaraman.com>
+;; Maintainer: Balaji Sivaraman <balaji@balajisivaraman.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for beginend.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'beginend nil t)
+
+(defconst evil-collection-beginend-maps nil)
+
+(eval-and-compile
+  (defconst evil-collection-beginend-modes '(bs-mode
+                                             rg-mode
+                                             org-mode
+                                             deft-mode
+                                             prog-mode
+                                             LaTeX-mode
+                                             dired-mode
+                                             latex-mode
+                                             nroam-mode
+                                             occur-mode
+                                             vc-dir-mode
+                                             ibuffer-mode
+                                             message-mode
+                                             outline-mode
+                                             prodigy-mode
+                                             org-agenda-mode
+                                             compilation-mode
+                                             epa-key-list-mode
+                                             magit-status-mode
+                                             elfeed-search-mode
+                                             elfeed-show-mode
+                                             magit-revision-mode
+                                             notmuch-search-mode
+                                             recentf-dialog-mode)))
+
+
+(defmacro evil-beginend--define-goto-beginning-motion (ec-mode-name)
+  "Macro to define new Evil motion that will use the corresponding
+beginend-goto-beginning function for EC-MODE-NAME when count is not
+provided for the motion; otherwise behave like `evil-goto-first-line'
+if count is provided.
+
+This will also associate the regular Evil `gg' keybinding with the
+newly defined motion."
+  (let ((motion-name (intern (format "evil-beginend-%s-goto-beginning" ec-mode-name)))
+        (beginend-beginning-fn-name (intern (format "beginend-%s-goto-beginning" ec-mode-name)))
+        (beginend-map-name (intern (format "beginend-%s-map" ec-mode-name))))
+    `(progn
+       (declare-function ,motion-name "evil-collection")
+       (declare-function ,beginend-beginning-fn-name "ext:beginend")
+       (evil-define-motion ,motion-name (count)
+         :jump t
+         :type line
+         (if count
+             (evil-goto-first-line count)
+           (,beginend-beginning-fn-name)))
+       (evil-collection-define-key 'normal ',beginend-map-name
+         "gg" ',motion-name))))
+
+(defmacro evil-beginend--define-goto-end-motion (ec-mode-name)
+  "Macro to define new Evil motion that will use the corresponding
+beginend-goto-end function for EC-MODE-NAME when count is not
+provided for the motion; otherwise behave like `evil-goto-line'
+if count is provided.
+
+This will also associate the regular Evil `G' keybinding with the
+newly defined motion."
+  (let ((motion-name (intern (format "evil-beginend-%s-goto-end" ec-mode-name)))
+        (beginend-end-fn-name (intern (format "beginend-%s-goto-end" ec-mode-name)))
+        (beginend-map-name (intern (format "beginend-%s-map" ec-mode-name))))
+    `(progn
+       (declare-function ,motion-name "evil-collection")
+       (declare-function ,beginend-end-fn-name "ext:beginend")
+       (evil-define-motion ,motion-name (count)
+         :jump t
+         :type line
+         (if count
+             (evil-goto-line count)
+           (,beginend-end-fn-name)))
+       (evil-collection-define-key 'normal ',beginend-map-name
+         "G" ',motion-name))))
+
+(defmacro evil-beginend--define-mode-motions ()
+  "Define the goto-beginning and goto-end motions for all modes in
+`evil-collection-beginend-modes'."
+  `(progn
+     ,@(mapcar
+        (lambda (mode-symbol)
+          (let ((mode-string (symbol-name mode-symbol)))
+            `(progn
+               (evil-beginend--define-goto-beginning-motion ,mode-string)
+               (evil-beginend--define-goto-end-motion ,mode-string))))
+        evil-collection-beginend-modes)))
+
+;;;###autoload
+(defun evil-collection-beginend-setup ()
+  "Set up `evil' bindings for `beginend'."
+  (evil-beginend--define-mode-motions))
+
+(provide 'evil-collection-beginend)
+;;; evil-collection-beginend.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/beginend/evil-collection-beginend.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/beginend/evil-collection-beginend.elc
new file mode 100644
index 0000000..e63c1e9
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/beginend/evil-collection-beginend.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bluetooth/evil-collection-bluetooth.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bluetooth/evil-collection-bluetooth.el
new file mode 100644
index 0000000..b0dbdf1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bluetooth/evil-collection-bluetooth.el
@@ -0,0 +1,60 @@
+;;; evil-collection-bluetooth.el --- Bindings for `bluetooth' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 Arian Dehghani
+
+;; Author: Arian Dehghani <arianxdehghani@gmail.com>
+;; Maintainer: Arian Dehghani <arianxdehghani@gmail.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools, blutooth
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `bluetooth'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'bluetooth nil t)
+
+(defvar bluetooth-mode-map)
+
+(defconst evil-collection-bluetooth-maps '(bluetooth-mode-map))
+
+;;;###autoload
+(defun evil-collection-bluetooth-setup ()
+  "Set up `evil' bindings for `bluetooth'."
+  (evil-collection-set-readonly-bindings 'bluetooth-mode-map)
+  (evil-collection-define-key 'normal 'bluetooth-mode-map
+    "c" 'bluetooth-connect
+    "d" 'bluetooth-disconnect
+    "b" 'bluetooth-toggle-blocked
+    "a" 'bluetooth-set-alias
+    "r" 'bluetooth-start-discovery
+    "R" 'bluetooth-stop-discovery
+    "s" 'bluetooth-toggle-powered
+    "p" 'bluetooth-toggle-pairable
+    "P" 'bluetooth-pair
+    "D" 'bluetooth-toggle-discoverable
+    "i" 'bluetooth-show-device-info
+    "A" 'bluetooth-show-adapter-info
+    "<" 'bluetooth-beginning-of-list
+    ">" 'bluetooth-end-of-list)
+  (evil-collection-bind 'bluetooth-mode-map
+                        'delete-2 'bluetooth-remove-device
+                        'toggle 'bluetooth-toggle-trusted))
+
+(provide 'evil-collection-bluetooth)
+;;; evil-collection-bluetooth.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bluetooth/evil-collection-bluetooth.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bluetooth/evil-collection-bluetooth.elc
new file mode 100644
index 0000000..58ae45e
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bluetooth/evil-collection-bluetooth.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bm/evil-collection-bm.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bm/evil-collection-bm.el
new file mode 100644
index 0000000..cfae326
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bm/evil-collection-bm.el
@@ -0,0 +1,52 @@
+;;; evil-collection-bm.el --- Evil bindings for bm -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, bm, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for bm.
+
+;;; Code:
+(require 'evil-collection)
+(require 'bm nil t)
+
+(defconst evil-collection-bm-maps '(bm-show-mode-map))
+
+;;;###autoload
+(defun evil-collection-bm-setup ()
+  "Set up `evil' bindings for `bm'."
+  (evil-set-initial-state 'bm-show-mode 'normal)
+
+  (evil-collection-define-key 'normal 'bm-show-mode-map
+    "j" 'bm-show-next
+    "k" 'bm-show-prev)
+  (evil-collection-bind 'bm-show-mode-map
+                        'action 'bm-show-goto-bookmark
+                        'action-other 'bm-show-bookmark
+                        'quit 'bm-show-quit-window
+                        'describe-mode 'describe-mode
+                        'refresh 'revert-buffer))
+
+
+(provide 'evil-collection-bm)
+;;; evil-collection-bm.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bm/evil-collection-bm.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bm/evil-collection-bm.elc
new file mode 100644
index 0000000..69c8752
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bm/evil-collection-bm.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bookmark/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bookmark/README.org
new file mode 100644
index 0000000..5d3aa8e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bookmark/README.org
@@ -0,0 +1,36 @@
+* bookmark
+
+  Evil bindings for the bookmark list (=bookmark-bmenu-mode=).
+
+  Standard motion / quit bindings come from =evil-collection-set-readonly-bindings=
+  and are not repeated below.
+
+** Key bindings
+
+   | Command                               | Original        | Evil                         |
+   |---------------------------------------+-----------------+------------------------------|
+   | =bookmark-bmenu-this-window=          | =RET=, =f=, =j= | =RET=                        |
+   | =bookmark-bmenu-other-window=         | =o=             | =o=, =go=, =S-RET=           |
+   | =bookmark-bmenu-switch-other-window=  | =C-o=           | =gO=, =M-RET=                |
+   | =bookmark-bmenu-select=               | =v=             | =o= (see above; =v= unbound) |
+   | =bookmark-bmenu-1-window=             | =1=             | =1=                          |
+   | =bookmark-bmenu-2-window=             | =2=             | =2=                          |
+   | =bookmark-bmenu-other-frame=          | =5=             | =5=                          |
+   | =bookmark-bmenu-delete=               | =d=, =k=        | =d=                          |
+   | =bookmark-bmenu-delete-backwards=     | =C-d=           | =D=                          |
+   | =bookmark-bmenu-execute-deletions=    | =x=             | =x=                          |
+   | =bookmark-bmenu-search=               | =/=             | =s= (=s= also via custom)    |
+   | =bookmark-bmenu-rename=               | =r=             | =r=                          |
+   | =bookmark-bmenu-relocate=             | =R=             | =R=                          |
+   | =bookmark-bmenu-load=                 | =l=             | =L=                          |
+   | =bookmark-bmenu-save=                 | =s=             | =s=, remap of =evil-write=   |
+   | =bookmark-bmenu-toggle-filenames=     | =t=             | =t=                          |
+   | =bookmark-bmenu-locate=               | =w=             | =W=                          |
+   | =bookmark-bmenu-show-annotation=      | =a=             | =a=                          |
+   | =bookmark-bmenu-show-all-annotations= | =A=             | =A=                          |
+   | =bookmark-bmenu-edit-annotation=      | =e=             | =E=                          |
+   | =bookmark-bmenu-mark=                 | =m=             | =m=                          |
+   | =bookmark-bmenu-mark-all=             | =M=             | =M=                          |
+   | =bookmark-bmenu-unmark=               | =u=             | =u=                          |
+   | =bookmark-bmenu-unmark-all=           | =U=             | =U=                          |
+   | =bookmark-bmenu-backup-unmark=        | =DEL=           | =DEL=                        |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bookmark/evil-collection-bookmark.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bookmark/evil-collection-bookmark.el
new file mode 100644
index 0000000..79871ee
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bookmark/evil-collection-bookmark.el
@@ -0,0 +1,76 @@
+;;; evil-collection-bookmark.el --- Evil bindings for bookmarks -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017, 2022 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, bookmark, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for bookmarks.
+
+;;; Code:
+(require 'evil-collection)
+(require 'bookmark)
+
+(defconst evil-collection-bookmark-maps '(bookmark-bmenu-mode-map))
+
+;;;###autoload
+(defun evil-collection-bookmark-setup ()
+  "Set up `evil' bindings for `bookmark'."
+  (evil-set-initial-state 'bookmark-bmenu-mode 'normal)
+  (evil-collection-set-readonly-bindings 'bookmark-bmenu-mode-map)
+  (evil-collection-bind 'bookmark-bmenu-mode-map
+                        'rename 'bookmark-bmenu-rename
+                        'edit 'bookmark-bmenu-edit-annotation)
+  (evil-collection-define-key 'normal 'bookmark-bmenu-mode-map
+    [remap evil-write] 'bookmark-bmenu-save
+
+    "1" 'bookmark-bmenu-1-window
+    "2" 'bookmark-bmenu-2-window
+    "5" 'bookmark-bmenu-other-frame
+    "r" 'bookmark-bmenu-relocate
+    "L" 'bookmark-bmenu-load
+    "W" 'bookmark-bmenu-locate
+    "D" 'bookmark-bmenu-delete-backwards
+
+    ;; annotation
+    "a" 'bookmark-bmenu-show-annotation
+    "A" 'bookmark-bmenu-show-all-annotations
+
+    ;; open
+    "o" 'bookmark-bmenu-select
+    "O" 'bookmark-bmenu-other-window
+    (kbd "DEL") 'bookmark-bmenu-backup-unmark)
+  (evil-collection-bind 'bookmark-bmenu-mode-map
+                        'mark 'bookmark-bmenu-mark
+                        'mark-all 'bookmark-bmenu-mark-all
+                        'unmark 'bookmark-bmenu-unmark
+                        'unmark-all 'bookmark-bmenu-unmark-all
+                        'mark-delete 'bookmark-bmenu-delete
+                        'execute-marks 'bookmark-bmenu-execute-deletions
+                        'action 'bookmark-bmenu-this-window
+                        'action-other 'bookmark-bmenu-other-window
+                        'action-stay 'bookmark-bmenu-switch-other-window
+                        'search-or-filter 'bookmark-bmenu-search
+                        'toggle 'bookmark-bmenu-toggle-filenames))
+
+(provide 'evil-collection-bookmark)
+;;; evil-collection-bookmark.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bookmark/evil-collection-bookmark.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bookmark/evil-collection-bookmark.elc
new file mode 100644
index 0000000..f074160
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bookmark/evil-collection-bookmark.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/buff-menu/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/buff-menu/README.org
new file mode 100644
index 0000000..b048631
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/buff-menu/README.org
@@ -0,0 +1,35 @@
+* buff-menu
+
+  Evil bindings for the buffer list (=Buffer-menu-mode=).
+
+** Key bindings
+
+   | Command                              | Original        | Evil               |
+   |--------------------------------------+-----------------+--------------------|
+   | =Buffer-menu-this-window=            | =RET=, =f=, =e= | =RET=, =go=, =C-m= |
+   | =Buffer-menu-other-window=           | =o=             | =gO=               |
+   | =Buffer-menu-select=                 | =v=             | =gv=               |
+   | =Buffer-menu-view=                   | =V=             | =gV=               |
+   | =Buffer-menu-delete=                 | =d=, =k=        | =d=, =C-k=         |
+   | =Buffer-menu-delete-backwards=       | =C-d=           | =C-d=              |
+   | =Buffer-menu-execute=                | =x=             | =x=                |
+   | =Buffer-menu-save=                   | =s=             | =s=                |
+   | =Buffer-menu-bury=                   | =b=             | =X=                |
+   | =Buffer-menu-mark=                   | =m=             | =m=                |
+   | =Buffer-menu-unmark=                 | =u=             | =u=                |
+   | =Buffer-menu-unmark-all=             | =U=             | =U=                |
+   | =Buffer-menu-backup-unmark=          | =DEL=           | =DEL=              |
+   | =Buffer-menu-not-modified=           | =~=             | =~=                |
+   | =Buffer-menu-toggle-read-only=       | =%=             | =%=                |
+   | =Buffer-menu-toggle-files-only=      | =T=             | =T=                |
+   | =Buffer-menu-visit-tags-table=       | =t=             | =t=                |
+   | =tabulated-list-sort=                | =S=             | =o=                |
+   | =revert-buffer=                      | =g=             | =gr=               |
+   | =evil-visual-char=                   | n/a             | =v=                |
+   | =quit-window=                        | =q=             | =q=, =ZZ=          |
+   | =evil-quit=                          | n/a             | =ZQ=               |
+   | =Buffer-menu-1-window=               | =1=             | =1=                |
+   | =Buffer-menu-2-window=               | =2=             | =2=                |
+   | =Buffer-menu-isearch-buffers=        | =M-s a C-s=     | =M-s a C-s=        |
+   | =Buffer-menu-isearch-buffers-regexp= | =M-s a M-C-s=   | =M-s a M-C-s=      |
+   | =Buffer-menu-multi-occur=            | =M-s a C-o=     | =M-s a C-o=        |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/buff-menu/evil-collection-buff-menu.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/buff-menu/evil-collection-buff-menu.el
new file mode 100644
index 0000000..6745a64
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/buff-menu/evil-collection-buff-menu.el
@@ -0,0 +1,76 @@
+;;; evil-collection-buff-menu.el --- Bindings for `buff-menu' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `buff-menu'.
+
+;;; Code:
+(require 'evil-collection)
+
+(defconst evil-collection-buff-menu-maps '(Buffer-menu-mode-map))
+
+;;;###autoload
+(defun evil-collection-buff-menu-setup ()
+  "Set up `evil' bindings for `buff-menu'.."
+  (evil-set-initial-state 'Buffer-menu-mode 'normal)
+
+  (evil-collection-define-key 'normal 'Buffer-menu-mode-map
+    "s" 'Buffer-menu-save
+    [mouse-2] 'Buffer-menu-mouse-select
+    [follow-link] 'mouse-face
+    "o" 'tabulated-list-sort
+    "gv" 'Buffer-menu-select
+    "gV" 'Buffer-menu-view
+    "v" 'evil-visual-char
+
+    "X" 'Buffer-menu-bury
+
+    ;; Default ones, unchanged. Redundant ones commented
+    "2" 'Buffer-menu-2-window
+    "1" 'Buffer-menu-1-window
+    (kbd "C-k") 'Buffer-menu-delete
+    (kbd "C-d") 'Buffer-menu-delete-backwards
+    (kbd "<delete>") 'Buffer-menu-backup-unmark
+    "~" 'Buffer-menu-not-modified
+    "t" 'Buffer-menu-visit-tags-table
+    "%" 'Buffer-menu-toggle-read-only
+    "T" 'Buffer-menu-toggle-files-only
+    (kbd "M-s a C-s") 'Buffer-menu-isearch-buffers
+    (kbd "M-s a M-C-s") 'Buffer-menu-isearch-buffers-regexp
+    (kbd "M-s a C-o") 'Buffer-menu-multi-occur)
+  (evil-collection-bind 'Buffer-menu-mode-map
+                        'mark 'Buffer-menu-mark
+                        'unmark 'Buffer-menu-unmark
+                        'unmark-all 'Buffer-menu-unmark-all
+                        'mark-delete 'Buffer-menu-delete
+                        'execute-marks 'Buffer-menu-execute
+                        'action 'Buffer-menu-this-window
+                        'action-other 'Buffer-menu-other-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit
+                        'refresh 'revert-buffer))
+
+(provide 'evil-collection-buff-menu)
+;;; evil-collection-buff-menu.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/buff-menu/evil-collection-buff-menu.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/buff-menu/evil-collection-buff-menu.elc
new file mode 100644
index 0000000..78a7f80
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/buff-menu/evil-collection-buff-menu.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bufler/evil-collection-bufler.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bufler/evil-collection-bufler.el
new file mode 100644
index 0000000..9d673af
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bufler/evil-collection-bufler.el
@@ -0,0 +1,58 @@
+;;; evil-collection-bufler.el --- Evil bindings for mpdel -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Ruoyu Feng
+
+;; Author: Ruoyu Feng <mail@vonfry.name>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools, bufler, buffer list
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for bufler.
+
+;;; Code:
+
+(require 'bufler nil t)
+(require 'evil-collection)
+
+(defvar bufler-list-mode-map)
+
+(defconst evil-collection-bufler-maps '(bufler-list-mode-map))
+
+(defconst evil-collection-bufler-modes '(bufler-list-mode))
+
+;;;###autoload
+(defun evil-collection-bufler-setup ()
+  "Set up `evil' bindings for `bufler'."
+
+  (evil-collection-set-readonly-bindings 'bufler-list-mode-map)
+  (dolist (mode evil-collection-bufler-modes)
+    (evil-set-initial-state mode 'normal))
+  (evil-collection-define-key 'normal 'bufler-list-mode-map
+    "?"   'hydra:bufler/body
+    "B"   'bufler
+    "f"   'bufler-list-group-frame
+    "F"   'bufler-list-group-make-frame
+    "r"   'bufler-list-buffer-name-workspace
+    "D"   'bufler-list-buffer-kill
+    "w"   'bufler-list-buffer-save)
+  (evil-collection-bind 'bufler-list-mode-map
+                        'action 'bufler-list-buffer-switch
+                        'jump 'bufler-list-buffer-peek))
+
+(provide 'evil-collection-bufler)
+;;; evil-collection-bufler.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bufler/evil-collection-bufler.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bufler/evil-collection-bufler.elc
new file mode 100644
index 0000000..90d771f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/bufler/evil-collection-bufler.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calc/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calc/README.org
new file mode 100644
index 0000000..97a2e1b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calc/README.org
@@ -0,0 +1,52 @@
+* calc
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/calc/index.html][calc]].
+
+  Standard motion / quit bindings come from =evil-collection-set-readonly-bindings=
+  and are not repeated below. Calc's =calc-ext= prefix maps (=V=, =Y=, =Z=, =a=,
+  =b=, =c=, =f=, =g=, =m=, =r=, =s=, =t=, =v=) are kept on their original keys;
+  prefixes that conflict with evil motions are relocated.
+
+** Key bindings
+
+   | Command                     | Original                 | Evil                      |
+   |-----------------------------+--------------------------+---------------------------|
+   | =calc-enter=                | =RET=                    | =RET=, =SPC=              |
+   | =calc-over=                 | =C-j=                    | =S-RET=                   |
+   | =calc-roll-down=            | =TAB=                    | =TAB=                     |
+   | =calc-roll-up=              | =M-TAB=                  | =C-M-i=                   |
+   | =calc-pop=                  | =DEL=, =<delete>=, =C-d= | =DEL=, =<delete>=         |
+   | =calc-pop-above=            | =M-DEL=, =M-d=           | =M-DEL=, =C-M-d=          |
+   | =calc-kill=                 | =C-k=                    | =d=                       |
+   | =calc-kill-region= (visual) | =C-w=                    | =d=                       |
+   | =calc-yank=                 | =C-y=                    | =pp=                      |
+   | =calc-copy-to-buffer=       | =y=                      | =pP=                      |
+   | =calc-copy-as-kill=         | =M-k=                    | =M-k=                     |
+   | =calc-copy-region-as-kill=  | =M-w=                    | =M-w=                     |
+   | =calc-undo=                 | =U=                      | =u=                       |
+   | =calc-redo=                 | =D=                      | =D= (via prefix relocate) |
+   | =calc-precision=            | =p=                      | =C-p=                     |
+   | =calc-call-last-kbd-macro=  | =X=                      | =X=                       |
+   | =calc-help=                 | =?=                      | =?=                       |
+   | =calc-info=                 | =i=                      | =i=                       |
+   | =calc-quit=                 | =q=                      | =q=                       |
+   | =calc-last-args=            | =M-RET=                  | =M-RET=                   |
+   | =calc-percent=              | =M-%=                    | =M-%=                     |
+   | =calc-transpose-lines=      | =C-x C-t=                | =C-x C-t=                 |
+   | =calc-total-algebraic-mode= | =m t=                    | =M-m t=                   |
+
+** Relocated prefix maps
+
+   Calc prefixes are moved off keys that conflict with evil motion or operators:
+
+   | Original prefix | Evil prefix |
+   |-----------------+-------------|
+   | =d=             | =D=         |
+   | =j=             | =zj=        |
+   | =k=             | =zk=        |
+   | =l=             | =zl=        |
+   | =u=             | =U=         |
+   | =z=             | =zz=        |
+
+   All operator / digit / symbol keys (=+=, =-=, =*=, =/=, digits, =A=–=T=, =[[=,
+   =]]=, etc.) keep their default calc bindings.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calc/evil-collection-calc.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calc/evil-collection-calc.el
new file mode 100644
index 0000000..5551f83
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calc/evil-collection-calc.el
@@ -0,0 +1,171 @@
+;;; evil-collection-calc.el --- Evil bindings for calc -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>, Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, calc, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for calc.
+
+;;; Code:
+(require 'evil-collection)
+(require 'calc)
+
+(defconst evil-collection-calc-maps '(calc-mode-map))
+
+;;;###autoload
+(defun evil-collection-calc-setup ()
+  "Set up `evil' bindings for `calc'."
+  (evil-collection-set-readonly-bindings 'calc-mode-map)
+  (evil-set-initial-state 'calc-mode 'normal)
+
+  ;; Calc sets up its bindings just-in-time for its "extensions".  I don't think
+  ;; it's worth copying this clumsy design (for what performance benefit?),
+  ;; while making the bindings much harder to maintain.
+  (require 'calc-ext)
+
+  (evil-collection-define-key 'normal 'calc-mode-map
+    "0" 'calcDigit-start
+    "1" 'calcDigit-start
+    "2" 'calcDigit-start
+    "3" 'calcDigit-start
+    "4" 'calcDigit-start
+    "5" 'calcDigit-start
+    "6" 'calcDigit-start
+    "7" 'calcDigit-start
+    "8" 'calcDigit-start
+    "9" 'calcDigit-start
+
+    (kbd "<tab>") 'calc-roll-down
+    (kbd "SPC") 'calc-enter
+
+    (kbd "C-x C-t") 'calc-transpose-lines
+    (kbd "C-M-d") 'calc-pop-above
+    (kbd "C-M-i") 'calc-roll-up
+    (kbd "C-M-w") 'kill-ring-save
+    (kbd "M-%") 'calc-percent
+    (kbd "M-k") 'calc-copy-as-kill
+    (kbd "M-w") 'calc-copy-region-as-kill
+    (kbd "M-DEL") 'calc-pop-above
+    (kbd "M-m t") 'calc-total-algebraic-mode
+    (kbd "<delete>") 'calc-pop
+    (kbd "<mouse-2>") 'calc-yank
+    (kbd "DEL") 'calc-pop ; was "C-d"
+    "d" 'calc-kill                      ; was "C-k"
+    "u" 'calc-undo                      ; was "U"
+    "X" 'calc-call-last-kbd-macro       ; "@" is already used.
+    "pp" 'calc-yank                     ; was "C-y"
+    "pP" 'calc-copy-to-buffer           ; was "y"
+
+    (kbd "C-p") 'calc-precision         ; was "p"
+
+    "?" 'calc-help
+    ;; "h" 'calc-help-prefix ; TODO: Rebind?
+    "i" 'calc-info
+
+    "\"" 'calc-auto-algebraic-entry
+    "$" 'calc-auto-algebraic-entry      ; TODO: No need for this one?
+    "'" 'calc-algebraic-entry
+
+    "!" 'calc-factorial
+    "#" 'calcDigit-start
+    "%" 'calc-mod
+    "&" 'calc-inv
+    "(" 'calc-begin-complex
+    ")" 'calc-end-complex
+    "*" 'calc-times
+    "+" 'calc-plus
+    "," 'calc-comma
+    "-" 'calc-minus
+    "." 'calcDigit-start
+    "/" 'calc-divide
+    ":" 'calc-fdiv
+    ";" 'calc-semi         ; TODO: Shall we really override `evil-ex'?
+    "<" 'calc-scroll-left
+    "=" 'calc-evaluate
+    ">" 'calc-scroll-right
+    "@" 'calcDigit-start
+    "A" 'calc-abs
+    "B" 'calc-log
+    "C" 'calc-cos
+    ;; "D" 'calc-redo             ; TODO: What's the purpose of this?  Bind to C-r?
+    "E" 'calc-exp
+    "F" 'calc-floor
+    "G" 'calc-argument
+    "H" 'calc-hyperbolic
+    "I" 'calc-inverse
+    "J" 'calc-conj
+    "K" 'calc-keep-args
+    "L" 'calc-ln
+    "M" 'calc-more-recursion-depth
+    "N" 'calc-eval-num
+    "O" 'calc-option
+    "P" 'calc-pi
+    "Q" 'calc-sqrt
+    "R" 'calc-round
+    "S" 'calc-sin
+    "T" 'calc-tan
+    "[[" 'calc-begin-vector
+    "]]" 'calc-end-vector
+    "\\" 'calc-idiv
+    "^" 'calc-power
+    "_" 'calcDigit-start
+    "`" 'calc-edit
+    "e" 'calcDigit-start
+    "n" 'calc-change-sign
+    "o" 'calc-realign
+    "w" 'calc-why
+    "x" 'calc-execute-extended-command
+    "|" 'calc-concat
+    "{" 'calc-scroll-down               ; TODO: Not necessary?
+    "}" 'calc-scroll-up                 ; TODO: Not necessary?
+    "~" 'calc-num-prefix
+
+    "V" (lookup-key calc-mode-map (kbd "V"))
+    "Y" (lookup-key calc-mode-map (kbd "Y"))
+    "Z" (lookup-key calc-mode-map (kbd "Z"))
+    "a" (lookup-key calc-mode-map (kbd "a"))
+    "b" (lookup-key calc-mode-map (kbd "b"))
+    "c" (lookup-key calc-mode-map (kbd "c"))
+    "D" (lookup-key calc-mode-map (kbd "d"))
+    "f" (lookup-key calc-mode-map (kbd "f"))
+    "g" (lookup-key calc-mode-map (kbd "g"))
+    "zj" (lookup-key calc-mode-map (kbd "j"))
+    "zk" (lookup-key calc-mode-map (kbd "k"))
+    "zl" (lookup-key calc-mode-map (kbd "l"))
+    "m" (lookup-key calc-mode-map (kbd "m"))
+    "r" (lookup-key calc-mode-map (kbd "r"))
+    "s" (lookup-key calc-mode-map (kbd "s"))
+    "t" (lookup-key calc-mode-map (kbd "t"))
+    "U" (lookup-key calc-mode-map (kbd "u"))
+    "v" (lookup-key calc-mode-map (kbd "v"))
+    "zz" (lookup-key calc-mode-map (kbd "z")))
+  (evil-collection-bind 'calc-mode-map
+                        'action 'calc-enter
+                        'action-other 'calc-over
+                        'action-stay 'calc-last-args
+                        'quit 'calc-quit)
+
+  (evil-collection-define-key 'visual 'calc-mode-map
+    "d" 'calc-kill-region))
+
+(provide 'evil-collection-calc)
+;;; evil-collection-calc.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calc/evil-collection-calc.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calc/evil-collection-calc.elc
new file mode 100644
index 0000000..6606757
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calc/evil-collection-calc.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calendar/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calendar/README.org
new file mode 100644
index 0000000..2733b42
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calendar/README.org
@@ -0,0 +1,63 @@
+* calendar
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Calendar_002fDiary.html][calendar]].
+
+** Key bindings
+
+   | Command                              | Original       | Evil                |
+   |--------------------------------------+----------------+---------------------|
+   | =calendar-backward-day=              | =C-b=, =left=  | =h=                 |
+   | =calendar-forward-day=               | =C-f=, =right= | =l=                 |
+   | =calendar-backward-week=             | =C-p=, =up=    | =k=                 |
+   | =calendar-forward-week=              | =C-n=, =down=  | =j=                 |
+   | =calendar-beginning-of-week=         | =C-a=          | =0=, =^=            |
+   | =calendar-end-of-week=               | =C-e=          | =$=                 |
+   | =calendar-beginning-of-month=        | =M-a=          | =(=                 |
+   | =calendar-end-of-month=              | =M-e=          | =)=                 |
+   | =calendar-backward-month=            | =M-{=          | ={=, =C-k=, =gk=    |
+   | =calendar-forward-month=             | =M-}=          | =}=, =C-j=, =gj=    |
+   | =calendar-backward-year=             | =C-x [=        | =[[=                |
+   | =calendar-forward-year=              | =C-x ]=        | =]]=                |
+   | =calendar-beginning-of-year=         | =M-<=          | =M-<=               |
+   | =calendar-end-of-year=               | =M->=          | =M->=               |
+   | =calendar-scroll-right=              | =>=, =C-x <=   | =<=                 |
+   | =calendar-scroll-left=               | =<=, =C-x >=   | =>=                 |
+   | =calendar-scroll-right-three-months= | =M-v=, =prior= | =C-b=               |
+   | =calendar-scroll-left-three-months=  | =C-v=, =next=  | =C-f=               |
+   | =scroll-other-window=                | =SPC=          | =SPC=               |
+   | =scroll-other-window-down=           | =S-SPC=, =DEL= | =S-SPC=, =<delete>= |
+   | =calendar-set-mark=                  | =C-SPC=        | =v=                 |
+   | =calendar-goto-today=                | =.=            | =.=                 |
+   | =calendar-other-month=               | =o=            | =o=, =gD=           |
+   | =calendar-goto-date=                 | =g d=          | =gd=                |
+   | =diary-view-entries=                 | =d=            | =d=                 |
+   | =diary-view-other-diary-entries=     | =D=            | =D=                 |
+   | =diary-mark-entries=                 | =m=            | =m=                 |
+   | =diary-show-all-entries=             | =s=            | =s=                 |
+   | =appt-add=                           | =A a=          | =Aa=                |
+   | =appt-delete=                        | =A d=          | =Ad=                |
+   | =calendar-unmark=                    | =u=            | =u=                 |
+   | =calendar-mark-holidays=             | =x=            | =x=                 |
+   | =calendar-list-holidays=             | =a=            | =a=, =gh=           |
+   | =calendar-cursor-holidays=           | =h=            | =r=                 |
+   | =calendar-lunar-phases=              | =M=            | =gm=                |
+   | =calendar-sunrise-sunset=            | =S=            | =gs=                |
+   | =org-calendar-goto-agenda=           | n/a            | =gc=                |
+   | =calendar-redraw=                    | =C-c C-l=      | =gr=                |
+   | =calendar-goto-info-node=            | =?=            | =?=, =g?=           |
+   | =calendar-count-days-region=         | =M-==          | =M-==               |
+   | =calendar-exit=                      | =q=            | =q=, =ZZ=           |
+   | =evil-quit=                          | n/a            | =ZQ=                |
+
+** Org integration
+
+   When =evil-collection-calendar-want-org-bindings= is non-nil, the key named by
+   =org-calendar-to-agenda-key= (default =c=) is bound to =org-calendar-goto-agenda=,
+   and =org-calendar-insert-diary-entry-key= (default =i=) to =org-agenda-diary-entry=
+   when =org-agenda-diary-file= is set.
+
+** Customization
+
+   | Variable                                     | Default | Purpose                                     |
+   |----------------------------------------------+---------+---------------------------------------------|
+   | =evil-collection-calendar-want-org-bindings= | =nil=   | Install =org-calendar-*= bindings on entry. |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calendar/evil-collection-calendar.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calendar/evil-collection-calendar.el
new file mode 100644
index 0000000..557b70f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calendar/evil-collection-calendar.el
@@ -0,0 +1,143 @@
+;;; evil-collection-calendar.el --- Evil bindings for calendar -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, calendar, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for the calendar.
+
+;;; Code:
+(require 'calendar)
+(require 'evil-collection)
+
+(defconst evil-collection-calendar-maps '(calendar-mode-map))
+
+(defun evil-collection-calendar-setup-org-bindings ()
+  "Bind Org functions to Calendar keymap."
+  (require 'org)
+  (require 'org-agenda)
+  (defvar org-calendar-to-agenda-key)
+  (defvar org-agenda-diary-file)
+  (defvar org-calendar-insert-diary-entry-key)
+
+  (let ((key (pcase org-calendar-to-agenda-key
+               ((and key (pred stringp)) key)
+               ;; The default value of `org-calendar-to-agenda-key' is [?c] in Org 9.1
+               ;; We do make a minimal compatibility support for vector of integers.
+               ((and key (pred vectorp)) (mapconcat (lambda (x) (format "%c" x)) key ""))
+               ((and (pred symbolp) 'default) "c")
+               (_ ""))))
+    (evil-collection-define-key 'normal 'calendar-mode-map
+      (kbd key) 'org-calendar-goto-agenda))
+
+  ;; Similar to `org-calendar-to-agenda-key'.
+  (unless (eq org-agenda-diary-file 'diary-file)
+    (let ((key (pcase org-calendar-insert-diary-entry-key
+                 ((and key (pred stringp)) key)
+                 ((and key (pred vectorp)) (mapconcat (lambda (x) (format "%c" x)) key ""))
+                 ;; NOTE Consistent behavior with `org-calendar-to-agenda-key'
+                 ;; although it's not supported in Org officially.
+                 ((and (pred symbolp) 'default) "i")
+                 (_ ""))))
+      (evil-collection-define-key 'normal 'calendar-mode-map
+        (kbd key) 'org-agenda-diary-entry))))
+
+;; Otherwise it will load tons of org stuff at startup.
+(defvar evil-collection-calendar-want-org-bindings)
+(when evil-collection-calendar-want-org-bindings
+  (add-hook 'calendar-mode-hook #'evil-collection-calendar-setup-org-bindings))
+
+;;;###autoload
+(defun evil-collection-calendar-setup ()
+  "Set up `evil' bindings for `calendar'."
+  (evil-set-initial-state 'calendar-mode 'normal)
+  (evil-collection-define-key 'normal 'calendar-mode-map
+    ;; motion
+    "h" 'calendar-backward-day
+    "j" 'calendar-forward-week
+    "k" 'calendar-backward-week
+    "l" 'calendar-forward-day
+    "0" 'calendar-beginning-of-week
+    "^" 'calendar-beginning-of-week
+    "$" 'calendar-end-of-week
+    (kbd "M-<") 'calendar-beginning-of-year
+    (kbd "M->") 'calendar-end-of-year
+    "(" 'calendar-beginning-of-month
+    ")" 'calendar-end-of-month
+    (kbd "SPC") 'scroll-other-window
+    (kbd "S-SPC") 'scroll-other-window-down
+    (kbd "<delete>") 'scroll-other-window-down
+    "<" 'calendar-scroll-right
+    ">" 'calendar-scroll-left
+    (kbd "C-b") 'calendar-scroll-right-three-months
+    (kbd "C-f") 'calendar-scroll-left-three-months
+    "{" 'calendar-backward-month
+    "}" 'calendar-forward-month
+
+    ;; visual
+    "v" 'calendar-set-mark
+
+    ;; goto
+    "." 'calendar-goto-today
+    "o" 'calendar-other-month
+    "gD" 'calendar-other-month
+
+    ;; diary
+    "D" 'diary-view-other-diary-entries
+    "d" 'diary-view-entries
+    "m" 'diary-mark-entries
+    "s" 'diary-show-all-entries
+
+    ;; appointment
+    "Aa" 'appt-add
+    "Ad" 'appt-delete
+
+    "u" 'calendar-unmark
+    "x" 'calendar-mark-holidays
+
+    ;; show
+    "gm" 'calendar-lunar-phases ; "gm" in evil-org-agenda. TODO: Shadows calendar-mayan.
+    "gs" 'calendar-sunrise-sunset ; "gs" in evil-org-agenda
+    "gh" 'calendar-list-holidays ; "gh" in evil-org-agenda. TODO: Shadows calendar-hebrew.
+    "gc" 'org-calendar-goto-agenda ; "gc" in evil-org-agenda. TODO: Shadows calendar-iso.
+    "a" 'calendar-list-holidays
+    "r" 'calendar-cursor-holidays
+
+    "?" 'calendar-goto-info-node ; Search is not very useful.
+    (kbd "M-=") 'calendar-count-days-region)
+  (evil-collection-bind 'calendar-mode-map
+                        'next-item 'calendar-forward-month
+                        'prev-item 'calendar-backward-month
+                        'next-section 'calendar-forward-year
+                        'prev-section 'calendar-backward-year
+                        'next-section-2 'calendar-forward-month
+                        'prev-section-2 'calendar-backward-month
+                        'quit 'calendar-exit
+                        'quit-save 'calendar-exit
+                        'quit-cancel 'evil-quit
+                        'refresh 'calendar-redraw
+                        'find-definition 'calendar-goto-date
+                        'describe-mode 'calendar-goto-info-node))
+
+(provide 'evil-collection-calendar)
+;;; evil-collection-calendar.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calendar/evil-collection-calendar.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calendar/evil-collection-calendar.elc
new file mode 100644
index 0000000..fafac91
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/calendar/evil-collection-calendar.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cider/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cider/README.org
new file mode 100644
index 0000000..a72a3a7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cider/README.org
@@ -0,0 +1,164 @@
+* cider
+
+  Evil bindings for [[https://github.com/clojure-emacs/cider][CIDER]].
+
+  The bulk of CIDER's commands live under the =C-c= prefix in =cider-mode-map=
+  -- those are left alone. Evil only adds vim-style navigation, doc lookup and
+  the debugger keys.
+
+** cider-mode-map
+
+   | Command                          | Original      | Evil      |
+   |----------------------------------+---------------+-----------|
+   | =cider-switch-to-repl-buffer=    | =C-c C-z=     | =gz=      |
+   | =cider-find-resource=            | =C-c M-.=     | =gf=      |
+   | =cider-doc=                      | =C-c C-d C-d= | =K=       |
+   | =cider-find-var=                 | =M-.=         | =gd=  ([[#xref][†]]) |
+   | =cider-pop-back=                 | =M-,=         | =C-t= ([[#xref][†]]) |
+   | =cider-browse-instrumented-defs= | n/a           | =<f6>=    |
+   | =cider-debug-defun-at-point=     | =C-u C-M-x=   | =<f9>=    |
+
+   The =<f6>= / =<f9>= bindings only fire when
+   =evil-collection-setup-debugger-keys= is non-nil.
+
+** cider-repl-mode-map
+
+   | Command                               | Original      | Evil                                         |
+   |---------------------------------------+---------------+----------------------------------------------|
+   | =cider-switch-to-last-clojure-buffer= | =C-c C-z=     | =gz=                                         |
+   | =cider-refresh=                       | =C-c M-n r=   | =gr=                                         |
+   | =cider-find-resource=                 | =C-c M-.=     | =gf=                                         |
+   | =cider-doc=                           | =C-c C-d C-d= | =K=                                          |
+   | =cider-find-var=                      | =M-.=         | =gd=  ([[#xref][†]])                                    |
+   | =cider-pop-back=                      | =M-,=         | =C-t= ([[#xref][†]])                                    |
+   | =cider-repl-return=                   | =RET=         | =RET= in =evil-collection-repl-submit-state= |
+   | =newline=                             | =C-j=         | =RET= in the opposite state                  |
+
+   See =evil-collection-repl-submit-state= (normal or insert) for which state
+   submits.
+
+** cider-repl-history-mode-map
+
+   | Command                                | Original | Evil              |
+   |----------------------------------------+----------+-------------------|
+   | =cider-repl-history-previous=          | =p=      | =C-k=, =gk=, =[[= |
+   | =cider-repl-history-forward=           | =n=      | =C-j=, =gj=, =]]= |
+   | =cider-repl-history-insert-and-quit=   | =RET=    | =RET=             |
+   | =cider-repl-history-update=            | =g=      | =gr=              |
+   | =cider-repl-history-quit=              | =q=      | =q=               |
+   | =cider-repl-history-undo-other-window= | =U=      | =u=               |
+
+** cider-test-report-mode-map
+
+   | Command                            | Original   | Evil               |
+   |------------------------------------+------------+--------------------|
+   | =cider-test-commands-map=          | n/a        | =C-c ,=, =C-c C-t= |
+   | =cider-test-previous-result=       | n/a        | =M-p=, =<backtab>= |
+   | =cider-test-next-result=           | =TAB=      | =M-n=, =<tab>=     |
+   | =cider-test-jump=                  | =t=, =RET= | =gd=, =t=, =RET=   |
+   | =cider-test-ediff=                 | =d=        | =d=                |
+   | =cider-test-stacktrace=            | =e=        | =e=                |
+   | =cider-test-rerun-failed-tests=    | =f=        | =f=                |
+   | =cider-test-run-ns-tests=          | =n=        | =n=                |
+   | =cider-test-run-loaded-tests=      | =l=        | =L=                |
+   | =cider-test-run-project-tests=     | =p=        | =p=                |
+   | =cider-test-run-test=              | =g=        | =gr=               |
+   | =cider-popup-buffer-quit-function= | n/a        | =q=                |
+
+** cider-macroexpansion-mode-map
+
+   | Command                                    | Original | Evil        |
+   |--------------------------------------------+----------+-------------|
+   | =cider-popup-buffer-quit-function=         | n/a      | =q=         |
+   | =cider-macroexpand-again=                  | =g=      | =r=         |
+   | =cider-doc=                                | =d=      | =K=         |
+   | =cider-javadoc=                            | =j=      | =J=         |
+   | =cider-find-var= / =xref-find-definitions= | =.=      | =.=         |
+   | =cider-macroexpand-1-inplace=              | =m=      | =m=         |
+   | =cider-macroexpand-all-inplace=            | =a=      | =a=         |
+   | =cider-macroexpand-undo=                   | =u=      | =u=, =undo= |
+
+** cider-connections-buffer-mode-map
+
+   | Command                              | Original | Evil  |
+   |--------------------------------------+----------+-------|
+   | =cider-connections-make-default=     | n/a      | =d=   |
+   | =cider-connection-browser=           | n/a      | =c=   |
+   | =cider-connections-close-connection= | n/a      | =x=   |
+   | =cider-connections-goto-connection=  | n/a      | =RET= |
+   | =describe-mode=                      | n/a      | =g?=  |
+
+** cider-stacktrace-mode-map
+
+   Initial evil state is forced to normal.
+
+   | Command                                | Original | Evil              |
+   |----------------------------------------+----------+-------------------|
+   | =cider-stacktrace-previous-cause=      | n/a      | =C-k=, =gk=, =[[= |
+   | =cider-stacktrace-next-cause=          | n/a      | =C-j=, =gj=, =]]= |
+   | =cider-stacktrace-jump=                | n/a      | =gd=              |
+   | =cider-popup-buffer-quit-function=     | =q=      | =q=               |
+   | =cider-stacktrace-toggle-java=         | =j=      | =J=               |
+   | =cider-stacktrace-toggle-clj=          | =c=      | =C=               |
+   | =cider-stacktrace-toggle-repl=         | =r=      | =R=               |
+   | =cider-stacktrace-toggle-tooling=      | =t=      | =T=               |
+   | =cider-stacktrace-toggle-duplicates=   | =d=      | =D=               |
+   | =cider-stacktrace-show-only-project=   | =p=      | =P=               |
+   | =cider-stacktrace-toggle-all=          | =a=      | =A=               |
+   | =cider-stacktrace-cycle-cause-1..5=    | =1..5=   | =1..5=            |
+   | =cider-stacktrace-cycle-all-causes=    | =0=      | =0=, =<backtab>=  |
+   | =cider-stacktrace-cycle-current-cause= | =TAB=    | =TAB=             |
+
+** cider-inspector-mode-map
+
+   | Command                                       | Original     | Evil         |
+   |-----------------------------------------------+--------------+--------------|
+   | =quit-window=                                 | n/a          | =q=          |
+   | =cider-inspector-operate-on-point=            | =RET=        | =RET=        |
+   | =cider-inspector-pop=                         | =l=          | =L=          |
+   | =cider-inspector-refresh=                     | =g=          | =gr=         |
+   | =cider-inspector-next-page=                   | =SPC=        | =C-j=, =SPC= |
+   | =cider-inspector-prev-page=                   | =S-SPC=      | =C-k=        |
+   | =cider-inspector-set-page-size=               | =s=          | =s=          |
+   | =cider-inspector-next-inspectable-object=     | =n=, =TAB=   | =]]=, =gj=   |
+   | =cider-inspector-previous-inspectable-object= | =p=, =S-TAB= | =[[=, =gk=   |
+
+** cider--debug-mode-map
+
+   Only active when =evil-collection-setup-debugger-keys= is non-nil. Each key
+   sends a reply through =cider-debug-mode-send-reply=.
+
+   | Command                                      | Reply             | Evil |
+   |----------------------------------------------+-------------------+------|
+   | =cider-debug-defun-at-point=                 | (re-instrument)   | =b=  |
+   | =evil-collection-cider-debug-continue=       | =:continue=       | =c=  |
+   | =evil-collection-cider-debug-continue-all=   | =:continue-all=   | =C=  |
+   | =evil-collection-cider-debug-next=           | =:next=           | =n=  |
+   | =evil-collection-cider-debug-in=             | =:in=             | =I=  |
+   | =evil-collection-cider-debug-out=            | =:out=            | =o=  |
+   | =evil-collection-cider-debug-force-out=      | =:force-out=      | =O=  |
+   | =cider-debug-move-here=                      | (move here)       | =H=  |
+   | =evil-collection-cider-debug-eval=           | =:eval=           | =e=  |
+   | =evil-collection-cider-debug-inspect=        | =:inspect=        | =p=  |
+   | =evil-collection-cider-debug-inspect-prompt= | =:inspect-prompt= | =P=  |
+   | =evil-collection-cider-debug-locals=         | =:locals=         | =L=  |
+   | =evil-collection-cider-debug-inject=         | =:inject=         | =J=  |
+   | =evil-collection-cider-debug-stacktrace=     | =:stacktrace=     | =s=  |
+   | =evil-collection-cider-debug-trace=          | =:trace=          | =t=  |
+   | =evil-collection-cider-debug-quit=           | =:quit=           | =q=  |
+
+** New commands
+
+   | Command                           | Purpose                                                                                              |
+   |-----------------------------------+------------------------------------------------------------------------------------------------------|
+   | =evil-collection-cider-debug-*=   | One per cider-debug reply keyword (see =cider--debug-mode-map=).                                     |
+   | =evil-collection-cider-last-sexp= | Advice for =cider-eval-last-sexp= so the last sexp ends at point when =evil-move-beyond-eol= is nil. |
+
+** Xref fallbacks
+   :PROPERTIES:
+   :CUSTOM_ID: xref
+   :END:
+
+   =gd= / =C-t= are only bound when =cider-use-xref= is nil. With xref enabled
+   the user already has =M-.= / =M-,= going through =xref-find-definitions= and
+   nothing extra is added.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cider/evil-collection-cider.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cider/evil-collection-cider.el
new file mode 100644
index 0000000..08a6866
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cider/evil-collection-cider.el
@@ -0,0 +1,248 @@
+;;; evil-collection-cider.el --- Evil bindings for Cider -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017, 2024 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, cider, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Cider.
+
+;;; Code:
+(require 'cl-lib)
+(require 'cider nil t)
+(require 'evil-collection)
+
+(defvar cider-use-xref)
+
+(declare-function cider-debug-mode-send-reply "cider-debug")
+
+(defconst evil-collection-cider-maps '(cider-mode-map
+                                       cider-repl-mode-map
+                                       cider-repl-history-mode-map
+                                       cider-test-report-mode-map
+                                       cider-macroexpansion-mode-map
+                                       cider-connections-buffer-mode-map))
+
+(defun evil-collection-cider-last-sexp (command &rest args)
+  "In normal-state or motion-state, last sexp ends at point."
+  (if (and (not evil-move-beyond-eol)
+           (or (evil-normal-state-p) (evil-motion-state-p)))
+      (save-excursion
+        (unless (or (eobp) (eolp)) (forward-char))
+        (apply command args))
+    (apply command args)))
+
+(defmacro evil-collection-cider-make-debug-command (&rest cider-commands)
+  "Make functions that wrap `cider-debug' commands.
+
+Cider debug commands are sent through `cider-debug-mode-send-reply'.
+
+ex. \(cider-debug-mode-send-reply \":next\"\)"
+  (let ((commands (if (consp cider-commands)
+                      cider-commands
+                    (list cider-commands))))
+    `(progn
+       ,@(cl-loop
+          for command in commands
+          collect
+          (let ((funsymbol
+                 (intern (format "evil-collection-cider-debug-%s" command))))
+            `(defun ,funsymbol ()
+               ,(format
+                 "Send :%s to `cider-debug-mode-send-reply'." command)
+               (interactive)
+               (cider-debug-mode-send-reply ,(format ":%s" command))))))))
+
+(evil-collection-cider-make-debug-command "continue"
+                                          "continue-all"
+                                          "next"
+                                          "in"
+                                          "out"
+                                          "force-out"
+                                          "eval"
+                                          "inspect"
+                                          "inspect-prompt"
+                                          "locals"
+                                          "inject"
+                                          "stacktrace"
+                                          "trace"
+                                          "quit")
+
+;;;###autoload
+(defun evil-collection-cider-setup ()
+  "Set up `evil' bindings for `cider'."
+  (unless evil-move-beyond-eol
+    (advice-add 'cider-eval-last-sexp :around #'evil-collection-cider-last-sexp)
+    (advice-add 'cider-eval-last-sexp-and-replace :around #'evil-collection-cider-last-sexp)
+    (advice-add 'cider-eval-last-sexp-to-repl :around #'evil-collection-cider-last-sexp)
+    (with-eval-after-load 'cider-eval-sexp-fu
+      (advice-add 'cider-esf--bounds-of-last-sexp :around #'evil-collection-cider-last-sexp)))
+
+  (when evil-collection-setup-debugger-keys
+    (add-hook 'cider-mode-hook #'evil-normalize-keymaps)
+    (add-hook 'cider--debug-mode-hook #'evil-normalize-keymaps)
+    (evil-collection-define-key 'normal 'cider-mode-map
+      [f6] 'cider-browse-instrumented-defs
+      [f9] 'cider-debug-defun-at-point)
+
+    (evil-collection-define-key 'normal 'cider--debug-mode-map
+      "C" 'evil-collection-cider-debug-continue-all
+      "O" 'evil-collection-cider-debug-force-out
+      "H" 'cider-debug-move-here
+      "p" 'evil-collection-cider-debug-inspect
+      "P" 'evil-collection-cider-debug-inspect-prompt
+      "J" 'evil-collection-cider-debug-inject
+      "S" 'evil-collection-cider-debug-stacktrace)
+    (evil-collection-bind 'cider--debug-mode-map
+                          'quit 'evil-collection-cider-debug-quit
+                          'toggle 'evil-collection-cider-debug-trace))
+
+  (evil-collection-bind 'cider--debug-mode-map
+                        'debug-continue 'evil-collection-cider-debug-continue
+                        'debug-step-over 'evil-collection-cider-debug-next
+                        'debug-step-into 'evil-collection-cider-debug-in
+                        'debug-step-out 'evil-collection-cider-debug-out
+                        'debug-breakpoint 'cider-debug-defun-at-point
+                        'debug-eval 'evil-collection-cider-debug-eval
+                        'debug-locals 'evil-collection-cider-debug-locals)
+  (evil-collection-bind 'cider-mode-map
+                        'lookup-doc 'cider-doc
+                        'goto-repl 'cider-switch-to-repl-buffer
+                        'find-file 'cider-find-resource)
+
+  (unless cider-use-xref
+    (evil-collection-bind 'cider-mode-map
+                          'find-definition 'cider-find-var
+                          'pop-definition 'cider-pop-back))
+
+  ;; FIXME: goto-repl seems to get overwritten by `cider-switch-to-repl-buffer'.
+  (evil-collection-bind 'cider-repl-mode-map
+                        'refresh 'cider-refresh
+                        'lookup-doc 'cider-doc
+                        'goto-repl 'cider-switch-to-last-clojure-buffer
+                        'find-file 'cider-find-resource
+                        'repl-submit 'cider-repl-return
+                        'repl-newline 'newline
+                        'repl-force-newline 'newline)
+
+  (unless cider-use-xref
+    (evil-collection-bind 'cider-repl-mode-map
+                          'find-definition 'cider-find-var
+                          'pop-definition 'cider-pop-back))
+
+  (evil-collection-define-key '(normal visual) 'cider-repl-history-mode-map
+    "u" 'cider-repl-history-undo-other-window)
+  (evil-collection-bind 'cider-repl-history-mode-map
+                        'action 'cider-repl-history-insert-and-quit
+                        'next-item 'cider-repl-history-forward
+                        'prev-item 'cider-repl-history-previous
+                        'next-section 'cider-repl-history-forward
+                        'prev-section 'cider-repl-history-previous
+                        'quit 'cider-repl-history-quit
+                        'refresh 'cider-repl-history-update)
+
+  (evil-collection-define-key 'normal 'cider-test-report-mode-map
+    (kbd "C-c ,") 'cider-test-commands-map
+    (kbd "C-c C-t") 'cider-test-commands-map
+    (kbd "M-p") 'cider-test-previous-result
+    (kbd "M-n") 'cider-test-next-result
+
+    "t" 'cider-test-jump
+    "d" 'cider-test-ediff
+    "e" 'cider-test-stacktrace
+    "f" 'cider-test-rerun-failed-tests
+    "n" 'cider-test-run-ns-tests
+    "L" 'cider-test-run-loaded-tests
+    "p" 'cider-test-run-project-tests)
+  (evil-collection-bind 'cider-test-report-mode-map
+                        'action 'cider-test-jump
+                        'quit 'cider-popup-buffer-quit-function
+                        'refresh 'cider-test-run-test
+                        'cycle-next 'cider-test-next-result
+                        'cycle-previous 'cider-test-previous-result
+                        'find-definition 'cider-test-jump)
+
+  (evil-collection-bind 'cider-macroexpansion-mode-map 'lookup-doc 'cider-doc)
+
+  (evil-collection-define-key 'normal 'cider-macroexpansion-mode-map
+    "r" 'cider-macroexpand-again
+    "J" 'cider-javadoc
+    "." (if cider-use-xref 'xref-find-definitions 'cider-find-var)
+    "m" 'cider-macroexpand-1-inplace
+    "a" 'cider-macroexpand-all-inplace
+    "u" 'cider-macroexpand-undo
+    [remap undo] 'cider-macroexpand-undo)
+  (evil-collection-bind 'cider-macroexpansion-mode-map 'quit 'cider-popup-buffer-quit-function)
+
+  (evil-collection-define-key 'normal 'cider-connections-buffer-mode-map
+    "d" 'cider-connections-make-default
+    "c" 'cider-connection-browser
+    "x" 'cider-connections-close-connection)
+  (evil-collection-bind 'cider-connections-buffer-mode-map
+                        'action 'cider-connections-goto-connection
+                        'describe-mode 'describe-mode)
+
+  (evil-set-initial-state 'cider-stacktrace-mode 'normal)
+  (evil-collection-bind 'cider-stacktrace-mode-map 'find-definition 'cider-stacktrace-jump)
+  (evil-collection-define-key 'normal 'cider-stacktrace-mode-map
+    "J" 'cider-stacktrace-toggle-java
+    "C" 'cider-stacktrace-toggle-clj
+    "R" 'cider-stacktrace-toggle-repl
+    "T" 'cider-stacktrace-toggle-tooling
+    "D" 'cider-stacktrace-toggle-duplicates
+    "P" 'cider-stacktrace-show-only-project
+    "A" 'cider-stacktrace-toggle-all
+    "1" 'cider-stacktrace-cycle-cause-1
+    "2" 'cider-stacktrace-cycle-cause-2
+    "3" 'cider-stacktrace-cycle-cause-3
+    "4" 'cider-stacktrace-cycle-cause-4
+    "5" 'cider-stacktrace-cycle-cause-5
+    "0" 'cider-stacktrace-cycle-all-causes
+    [backtab] 'cider-stacktrace-cycle-all-causes)
+  (evil-collection-bind 'cider-stacktrace-mode-map
+                        'next-item 'cider-stacktrace-next-cause
+                        'prev-item 'cider-stacktrace-previous-cause
+                        'next-section 'cider-stacktrace-next-cause
+                        'prev-section 'cider-stacktrace-previous-cause
+                        'quit 'cider-popup-buffer-quit-function
+                        'cycle-next 'cider-stacktrace-cycle-current-cause)
+
+  (add-hook 'cider-inspector-mode-hook #'evil-normalize-keymaps)
+  (evil-collection-bind 'cider-inspector-mode-map
+                        'next-item 'cider-inspector-next-inspectable-object
+                        'prev-item 'cider-inspector-previous-inspectable-object
+                        'next-section 'cider-inspector-next-inspectable-object
+                        'prev-section 'cider-inspector-previous-inspectable-object
+                        'next-section-2 'cider-inspector-next-page
+                        'prev-section-2 'cider-inspector-prev-page)
+  (evil-collection-define-key 'normal 'cider-inspector-mode-map
+    [mouse-1] 'cider-inspector-operate-on-click
+    "L" 'cider-inspector-pop
+    " " 'cider-inspector-next-page
+    "s" 'cider-inspector-set-page-size)
+  (evil-collection-bind 'cider-inspector-mode-map
+                        'action 'cider-inspector-operate-on-point
+                        'quit 'quit-window
+                        'refresh 'cider-inspector-refresh))
+
+(provide 'evil-collection-cider)
+;;; evil-collection-cider.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cider/evil-collection-cider.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cider/evil-collection-cider.elc
new file mode 100644
index 0000000..ef1d200
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cider/evil-collection-cider.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/citre/evil-collection-citre.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/citre/evil-collection-citre.el
new file mode 100644
index 0000000..d72b449
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/citre/evil-collection-citre.el
@@ -0,0 +1,49 @@
+;;; evil-collection-citre.el --- Bindings for `citre' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2024 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, citre, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `citre'
+
+;;; Code:
+(require 'evil-collection)
+
+(defconst evil-collection-citre-maps nil)
+
+(defun evil-collection-citre-set-bindings ()
+  "Set jump point for citre commands."
+  (dolist (cmd '(citre-jump
+                 citre-query-jump
+                 citre-jump-to-reference
+                 citre-query-jump-to-reference))
+    (evil-declare-not-repeat cmd)
+    (evil-set-command-property cmd :jump t)))
+
+;;;###autoload
+(defun evil-collection-citre-setup ()
+  "Set up `evil' bindings for `citre'."
+  (evil-collection-citre-set-bindings))
+
+(provide 'evil-collection-citre)
+;;; evil-collection-citre.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/citre/evil-collection-citre.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/citre/evil-collection-citre.elc
new file mode 100644
index 0000000..7c4d648
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/citre/evil-collection-citre.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cmake-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cmake-mode/README.org
new file mode 100644
index 0000000..d7a7975
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cmake-mode/README.org
@@ -0,0 +1,13 @@
+* cmake-mode
+
+  Evil setup for [[https://gitlab.kitware.com/cmake/cmake][cmake-mode]]. No key
+  rebindings -- only =evil-shift-width= is aligned to =cmake-tab-width=.
+
+** New commands
+
+   | Command                                           | Purpose                                              |
+   |---------------------------------------------------+------------------------------------------------------|
+   | =evil-collection-cmake-mode-set-evil-shift-width= | Buffer-local =evil-shift-width= = =cmake-tab-width=. |
+
+   Hooked to =cmake-mode-hook= so =>=, =<= and friends indent by the same width
+   cmake-mode uses.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cmake-mode/evil-collection-cmake-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cmake-mode/evil-collection-cmake-mode.el
new file mode 100644
index 0000000..11a158e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cmake-mode/evil-collection-cmake-mode.el
@@ -0,0 +1,46 @@
+;;; evil-collection-cmake-mode.el --- Bindings for `cmake-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `cmake-mode'
+
+;;; Code:
+(require 'evil-collection)
+(require 'cmake-mode nil t)
+
+(defconst evil-collection-cmake-mode-maps nil)
+
+(defvar cmake-tab-width)
+(defun evil-collection-cmake-mode-set-evil-shift-width ()
+  "Set `evil-shift-width' according to `cmake-tab-with'."
+  (setq-local evil-shift-width cmake-tab-width))
+
+;;;###autoload
+(defun evil-collection-cmake-mode-setup ()
+  "Set up `evil' bindings for `cmake-mode'."
+  (add-hook 'cmake-mode-hook #'evil-collection-cmake-mode-set-evil-shift-width))
+
+(provide 'evil-collection-cmake-mode)
+;;; evil-collection-cmake-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cmake-mode/evil-collection-cmake-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cmake-mode/evil-collection-cmake-mode.elc
new file mode 100644
index 0000000..7bce6aa
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cmake-mode/evil-collection-cmake-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/color-rg/evil-collection-color-rg.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/color-rg/evil-collection-color-rg.el
new file mode 100644
index 0000000..74cc2ab
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/color-rg/evil-collection-color-rg.el
@@ -0,0 +1,75 @@
+;;; evil-collection-color-rg.el --- Bindings for color-rg -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Mumulhl
+
+;; Author: Mumulhl <mumu-lhl@tuta.io>
+;; Maintainer: Mumulhl <mumu-lhl@tuta.io>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for color-rg.
+
+;;; Code:
+(require 'evil-collection)
+(require 'color-rg nil t)
+
+(defvar color-rg-mode-map)
+(defconst evil-collection-color-rg-maps '(color-rg-mode-map))
+
+;;;###autoload
+(defun evil-collection-color-rg-setup ()
+  "Set up `evil' bindings for color-rg."
+  (evil-collection-bind 'color-rg-mode-map
+                        'edit 'color-rg-switch-to-edit-mode
+                        'cycle-next 'color-rg-jump-next-keyword
+                        'cycle-previous 'color-rg-jump-prev-keyword)
+  (evil-collection-define-key 'normal 'color-rg-mode-map
+    "C" 'color-rg-rerun-toggle-case
+    (kbd "C-a") 'color-rg-beginning-of-line
+    "D" 'color-rg-remove-line-from-results
+    "E" 'color-rg-rerun-change-exclude-files
+    "F" 'color-rg-filter-mismatch-results
+    "G" 'color-rg-rerun-change-globs
+    "I" 'color-rg-rerun-toggle-ignore
+    "L" 'color-rg-rerun-literal
+    "N" 'color-rg-rerun-toggle-node
+    "O" 'color-rg-rerun-in-project
+    "R" 'color-rg-rerun-regexp
+    "S" 'color-rg-customized-search
+    (kbd "SPC") 'color-rg-open-file
+    "X" 'color-rg-filter-mismatch-files
+    "f" 'color-rg-filter-match-results
+    "h" 'color-rg-jump-next-file
+    "i" 'color-rg-insert-current-line
+    "j" 'color-rg-jump-next-keyword
+    "k" 'color-rg-jump-prev-keyword
+    "l" 'color-rg-jump-prev-file
+    "o" 'color-rg-rerun-in-parent-dir
+    "r" 'color-rg-replace-all-matches
+    "s" 'color-rg-rerun-change-dir
+    "u" 'color-rg-unfilter
+    "x" 'color-rg-filter-match-files)
+  (evil-collection-bind 'color-rg-mode-map
+                        'action 'color-rg-open-file-and-stay
+                        'action-other 'color-rg-open-file-and-stay
+                        'action-stay 'color-rg-open-file-and-stay
+                        'quit 'color-rg-quit))
+
+(provide 'evil-collection-color-rg)
+;;; evil-collection-color-rg.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/color-rg/evil-collection-color-rg.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/color-rg/evil-collection-color-rg.elc
new file mode 100644
index 0000000..6d5a317
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/color-rg/evil-collection-color-rg.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/comint/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/comint/README.org
new file mode 100644
index 0000000..0b03dd2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/comint/README.org
@@ -0,0 +1,29 @@
+* comint
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/elisp/Comint.html][comint-mode]], the base mode for many Emacs shells and
+  REPLs (shell, inferior-lisp, sql, python, etc.). Bindings here propagate to
+  every derived mode that does not override them.
+
+** Key bindings
+
+   Normal-state additions to =comint-mode-map=:
+
+   | Command                  | Original  | Evil                                |
+   |--------------------------+-----------+-------------------------------------|
+   | =comint-next-prompt=     | =C-c C-n= | =C-j=, =gj=, =]]=                   |
+   | =comint-previous-prompt= | =C-c C-p= | =C-k=, =gk=, =[[=                   |
+   | =comint-previous-input=  | =M-p=     | =C-p=                               |
+   | =comint-next-input=      | =M-n=     | =C-n=                               |
+   | =evil-scroll-down=       | n/a       | =C-d= (when =evil-want-C-d-scroll=) |
+
+   Insert state:
+
+   | Command                 | Original  | Evil                                |
+   |-------------------------+-----------+-------------------------------------|
+   | =comint-previous-input= | =M-p=     | =<up>=                              |
+   | =comint-next-input=     | =M-n=     | =<down>=                            |
+   | =comint-kill-input=     | =C-c C-u= | =C-u= (when =evil-want-C-u-delete=) |
+
+   =RET= sends input in the state named by =evil-collection-repl-submit-state=
+   and inserts a newline in the complementary state (both =RET= and =C-m= /
+   =[return]= are wired).
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/comint/evil-collection-comint.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/comint/evil-collection-comint.el
new file mode 100644
index 0000000..d274a90
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/comint/evil-collection-comint.el
@@ -0,0 +1,64 @@
+;;; evil-collection-comint.el --- Bindings for `comint-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, comint, processes
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `comint-mode'.
+
+;;; Code:
+(require 'comint)
+(require 'evil-collection)
+
+(defconst evil-collection-comint-maps '(comint-mode-map))
+
+;;;###autoload
+(defun evil-collection-comint-setup ()
+  "Set up `evil' bindings for `comint'."
+  (when evil-want-C-d-scroll
+    (evil-collection-define-key 'normal 'comint-mode-map
+      (kbd "C-d") #'evil-scroll-down))
+
+  ;; Match Eshell bindings for motion.
+  (evil-collection-bind 'comint-mode-map
+                        'repl-submit #'comint-send-input
+                        'repl-newline #'newline
+                        'repl-force-newline #'newline
+                        'next-item #'comint-next-prompt
+                        'prev-item #'comint-previous-prompt
+                        'next-section #'comint-next-prompt
+                        'prev-section #'comint-previous-prompt
+                        'history-previous #'comint-previous-input
+                        'history-next     #'comint-next-input)
+
+  ;; TODO: What if the user changes `evil-want-C-u-delete' after this is run?
+  (when evil-want-C-u-delete
+    (evil-collection-define-key 'insert 'comint-mode-map
+      (kbd "C-u") #'comint-kill-input))
+
+  (evil-collection-define-key 'insert 'comint-mode-map
+    (kbd "<up>") #'comint-previous-input
+    (kbd "<down>") #'comint-next-input))
+
+(provide 'evil-collection-comint)
+;;; evil-collection-comint.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/comint/evil-collection-comint.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/comint/evil-collection-comint.elc
new file mode 100644
index 0000000..594b6f3
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/comint/evil-collection-comint.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/company/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/company/README.org
new file mode 100644
index 0000000..22c1d84
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/company/README.org
@@ -0,0 +1,51 @@
+* company
+
+  Evil bindings for [[https://github.com/company-mode/company-mode][company-mode]].
+  Bindings are installed without an explicit state so they apply whenever the
+  company overlay is active.
+
+** company-active-map
+
+   | Command                            | Original | Evil                                |
+   |------------------------------------+----------+-------------------------------------|
+   | =company-select-next-or-abort=     | =C-n=    | =C-n=, =C-j=                        |
+   | =company-select-previous-or-abort= | =C-p=    | =C-p=, =C-k=                        |
+   | =company-select-next=              | n/a      | =M-j=                               |
+   | =company-select-previous=          | n/a      | =M-k=                               |
+   | =company-previous-page=            | =M-<=    | =C-u= (when =evil-want-C-u-scroll=) |
+   | =company-next-page=                | =M->=    | =C-d= (when =evil-want-C-d-scroll=) |
+
+   With =evil-collection-want-company-extended-keybindings= (vim's =C-x ...=
+   completion family):
+
+   | Command                               | Evil  |
+   |---------------------------------------+-------|
+   | =evil-collection-company-whole-lines= | =C-l= |
+   | =company-etags=                       | =C-]= |
+   | =company-files=                       | =C-f= |
+   | =company-capf=                        | =C-o= |
+   | =company-ispell=                      | =C-s= |
+
+** company-search-map
+
+   | Command                            | Original | Evil       |
+   |------------------------------------+----------+------------|
+   | =company-select-next-or-abort=     | =C-n=    | =C-j=      |
+   | =company-select-previous-or-abort= | =C-p=    | =C-k=      |
+   | =company-select-next=              | n/a      | =M-j=      |
+   | =company-select-previous=          | n/a      | =M-k=      |
+   | =company-search-abort=             | =C-g=    | =<escape>= |
+
+** New commands
+
+   | Command                               | Purpose                                        |
+   |---------------------------------------+------------------------------------------------|
+   | =evil-collection-company-whole-lines= | Whole-line completion backend (vim =C-x C-l=). |
+
+** Customization
+
+   | Variable                                            | Default                  | Purpose                                                                                          |
+   |-----------------------------------------------------+--------------------------+--------------------------------------------------------------------------------------------------|
+   | =evil-collection-company-supported-states=          | =(insert replace emacs)= | Evil states in which company is allowed to pop up.                                               |
+   | =evil-collection-want-company-extended-keybindings= | =nil=                    | Enable the vim-style =C-x= completion bindings above.                                            |
+   | =evil-collection-company-enable-keymap-protection=  | =t=                      | Re-install =company-active-map= after =company-doc-buffer= et al. so evil does not eat the keys. |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/company/evil-collection-company.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/company/evil-collection-company.el
new file mode 100644
index 0000000..e528303
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/company/evil-collection-company.el
@@ -0,0 +1,149 @@
+;;; evil-collection-company.el --- Bindings for `company-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, company, abbrev, convenience, matching
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `company-mode'.
+
+;;; Code:
+(require 'company nil t)
+(require 'evil-collection)
+
+(declare-function company-tng-mode "company-tng")
+(declare-function company-grab-line "company")
+(declare-function company-begin-backend "company")
+(declare-function company-ensure-emulation-alist "company")
+
+(defgroup evil-collection-company nil
+  "Evil bindings for `company-mode'."
+  :group 'evil-collection)
+
+(defcustom evil-collection-company-supported-states '(insert replace emacs)
+  "The `evil-state's which `company' function can be requested."
+  :type '(repeat symbol))
+(defcustom evil-collection-want-company-extended-keybindings nil
+  "The \='evil-company-extended' keybindings should be requested"
+  :type 'boolean)
+
+(defcustom evil-collection-company-enable-keymap-protection t
+  "Prevent evil from breaking company completion keymap.
+When non-nil, prevents evil from overriding `company-active-map'
+after calling `company-doc-buffer'. If disabled, the completion
+keymap will be in a broken state."
+  :type 'boolean)
+
+(defvar company-active-map)
+(defvar company-search-map)
+
+(defconst evil-collection-company-maps '(company-active-map company-search-map))
+
+(defun evil-collection-company-supported-p (command &rest _)
+  "Return non-nil if `evil-state' is in supported states."
+  (cond
+   ((not (bound-and-true-p evil-mode)) t)
+   ((eq command 'prefix)
+    (memq evil-state evil-collection-company-supported-states))
+   (t t)))
+
+(defun evil-collection-company-protect-keymap ()
+  "Prevent evil from overriding `company-mode' completion keymap."
+  (when (and evil-collection-company-enable-keymap-protection
+             (memq 'company-emulation-alist emulation-mode-map-alists))
+    (company-ensure-emulation-alist)))
+
+;;;###autoload
+(defun evil-collection-company-whole-lines (command &optional arg &rest _ignored)
+  "`company-mode' completion backend that completes whole-lines, akin to vim's
+C-x C-l."
+  (interactive (list 'interactive))
+  (require 'company)
+  (pcase command
+    (`interactive (company-begin-backend 'evil-collection-company-whole-lines))
+    (`prefix      (company-grab-line "^[\t\s]*\\(.+\\)" 1))
+    (`candidates
+     (all-completions
+      arg
+      (delete-dups
+       (split-string
+        (replace-regexp-in-string
+         "^[\t\s]+" ""
+         (concat (buffer-substring-no-properties (point-min) (line-beginning-position))
+                 (buffer-substring-no-properties (line-end-position) (point-max))))
+        "\\(\r\n\\|[\n\r]\\)" t))))))
+
+;;;###autoload
+(defun evil-collection-company-setup ()
+  "Set up `evil' bindings for `company'."
+  (evil-collection-define-key nil 'company-active-map
+    (kbd "C-j") 'company-select-next-or-abort
+    (kbd "C-k") 'company-select-previous-or-abort
+    (kbd "M-j") 'company-select-next
+    (kbd "M-k") 'company-select-previous)
+
+  ;; company-active-map is bound across all states (`nil'), so we use the
+  ;; `completion-next' / `completion-previous' theme's *keys* but bind them
+  ;; with nil state instead of routing through `evil-collection-bind' (which
+  ;; would use the theme's :state insert).
+  (when (evil-collection-binding-enabled-p 'completion-next)
+    (dolist (key (evil-collection-binding-keys 'completion-next))
+      (evil-collection-define-key nil 'company-active-map
+        (kbd key) 'company-select-next-or-abort)))
+  (when (evil-collection-binding-enabled-p 'completion-previous)
+    (dolist (key (evil-collection-binding-keys 'completion-previous))
+      (evil-collection-define-key nil 'company-active-map
+        (kbd key) 'company-select-previous-or-abort)))
+
+  (when evil-collection-want-company-extended-keybindings 
+    (evil-collection-define-key nil 'company-active-map
+      (kbd "C-l") 'evil-collection-company-whole-lines
+      (kbd "C-]") 'company-etags
+      (kbd "C-f") 'company-files
+      (kbd "C-o") 'company-capf
+      (kbd "C-s") 'company-ispell))
+
+  (when evil-want-C-u-scroll
+    (evil-collection-define-key nil 'company-active-map
+      (kbd "C-u") 'company-previous-page))
+
+  (when evil-want-C-d-scroll
+    (evil-collection-define-key nil 'company-active-map
+      (kbd "C-d") 'company-next-page))
+
+  (evil-collection-define-key nil 'company-search-map
+    (kbd "C-j") 'company-select-next-or-abort
+    (kbd "C-k") 'company-select-previous-or-abort
+    (kbd "M-j") 'company-select-next
+    (kbd "M-k") 'company-select-previous
+    (kbd "<escape>") 'company-search-abort)
+
+  ;; https://github.com/emacs-evil/evil-collection/issues/664
+  (add-hook 'evil-local-mode-hook #'evil-collection-company-protect-keymap)
+
+  ;; Make `company-mode' not show popup when not in supported state
+  (advice-add 'company-call-backend
+              :before-while #'evil-collection-company-supported-p))
+
+
+(provide 'evil-collection-company)
+;;; evil-collection-company.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/company/evil-collection-company.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/company/evil-collection-company.elc
new file mode 100644
index 0000000..6c3a74e
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/company/evil-collection-company.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/compile/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/compile/README.org
new file mode 100644
index 0000000..c8e3c60
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/compile/README.org
@@ -0,0 +1,18 @@
+* compile
+
+  Evil bindings for =compilation-mode= and =compilation-minor-mode=.
+
+  Standard motion / quit bindings come from =evil-collection-set-readonly-bindings=
+  and are not repeated below.
+
+** Key bindings
+
+   | Command                      | Original         | Evil                   |
+   |------------------------------+------------------+------------------------|
+   | =compile-goto-error=         | =RET=, =C-c C-c= | =RET=                  |
+   | =compilation-display-error=  | =C-o=            | =go=, =M-RET=, =S-RET= |
+   | =compilation-next-error=     | =M-n=            | =TAB=, =gj=, =C-j=     |
+   | =compilation-previous-error= | =M-p=            | =S-TAB=, =gk=, =C-k=   |
+   | =compilation-next-file=      | =M-}=            | =]]=                   |
+   | =compilation-previous-file=  | =M-{=            | =[[=                   |
+   | =recompile=                  | =g=              | =gr=                   |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/compile/evil-collection-compile.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/compile/evil-collection-compile.el
new file mode 100644
index 0000000..4641cf1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/compile/evil-collection-compile.el
@@ -0,0 +1,62 @@
+;;; evil-collection-compile.el --- Evil bindings for `compile' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, compile, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `compile'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'compile)
+
+(defconst evil-collection-compile-maps '(compilation-mode-map
+                                         compilation-minor-mode-map))
+
+;;;###autoload
+(defun evil-collection-compile-setup ()
+  "Set up `evil' bindings for `compile'."
+  (evil-set-initial-state 'compilation-mode 'normal)
+  (evil-collection-set-readonly-bindings 'compilation-mode-map)
+
+  (dolist (keymap evil-collection-compile-maps)
+
+    (evil-collection-define-key nil keymap
+      "g" nil)
+
+    (evil-collection-bind keymap
+                          'action 'compile-goto-error
+                          'action-other 'compilation-display-error
+                          'action-stay 'compilation-display-error
+                          'next-item 'compilation-next-error
+                          'prev-item 'compilation-previous-error
+                          'next-section 'compilation-next-file
+                          'prev-section 'compilation-previous-file
+                          'next-section-2 'compilation-next-error
+                          'prev-section-2 'compilation-previous-error
+                          'cycle-next 'compilation-next-error
+                          'cycle-previous 'compilation-previous-error
+                          'refresh 'recompile)))
+
+(provide 'evil-collection-compile)
+;;; evil-collection-compile.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/compile/evil-collection-compile.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/compile/evil-collection-compile.elc
new file mode 100644
index 0000000..7e94e46
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/compile/evil-collection-compile.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/consult/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/consult/README.org
new file mode 100644
index 0000000..c71d837
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/consult/README.org
@@ -0,0 +1,26 @@
+* consult
+
+  Evil bindings for [[https://github.com/minad/consult][consult]].
+
+  No keymap is rebound. Setup marks a small set of jump-style commands as
+  non-repeatable and registers them as evil jumps so =C-o= / =C-i= work after
+  selection.
+
+** Jump commands
+
+   The following are declared with =:jump t= and =evil-declare-not-repeat=:
+
+   - =consult-outline=
+   - =consult-mark=
+   - =consult-global-mark=
+   - =consult-imenu=
+   - =consult-org-heading=
+   - =consult-org-agenda=
+   - =consult-line=
+
+** New commands
+
+   | Command                             | Purpose                                                       |
+   |-------------------------------------+---------------------------------------------------------------|
+   | =evil-collection-consult-mark=      | =consult-mark= over evil's per-buffer marker ring.            |
+   | =evil-collection-consult-jump-list= | =consult-global-mark= over the evil jump list of this window. |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/consult/evil-collection-consult.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/consult/evil-collection-consult.el
new file mode 100644
index 0000000..82a976c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/consult/evil-collection-consult.el
@@ -0,0 +1,125 @@
+;;; evil-collection-consult.el --- Evil bindings for consult -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017, 2024 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, consult, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `consult'.
+;;
+;; Since
+;;
+;; `consult-outline'
+;; `consult-mark'
+;; `consult-global-mark'
+;; `consult-imenu'
+;; `consult-org-heading'
+;; `consult-org-agenda'
+;; `consult-line'
+;;
+;; are all autoloaded, no (require 'consult nil t) is needed.
+
+;;; Code:
+(require 'evil-collection)
+
+(defconst evil-collection-consult-maps nil)
+
+(defvar consult-line-numbers-widen)
+(declare-function consult--forbid-minibuffer "consult")
+(declare-function consult--fontify-all "consult")
+(declare-function consult--in-range-p "consult")
+(declare-function consult--line-with-mark "consult")
+(declare-function consult--location-candidate "consult")
+(declare-function consult--remove-dups "consult")
+(declare-function consult--mark-candidates "consult")
+(declare-function consult-mark "consult")
+(declare-function consult-global-mark "consult")
+
+(defun evil-collection-consult-set-bindings ()
+  "Set the bindings."
+  (dolist (cmd '(consult-outline
+                 consult-mark
+                 consult-global-mark
+                 consult-imenu
+                 consult-org-heading
+                 consult-org-agenda
+                 consult-line))
+    (evil-declare-not-repeat cmd)
+    (evil-set-command-property cmd :jump t)))
+
+(defun evil-collection-consult--evil-mark-ring ()
+  "Return alist of char & marker for evil markers in current buffer."
+  (sort (cl-remove-if (lambda (elem)
+                        (or (evil-global-marker-p (car elem))
+                            (not (markerp (cdr-safe elem)))))
+                      evil-markers-alist)
+        #'car-less-than-car))
+
+(defun evil-collection-consult--mark-candidates (&optional markers)
+  "Return alist of lines containing markers from `evil-mark-alist'.
+Opional MARKERS should be an alist containing (char . marker) pairs
+as defined in `evil-collection-consult--evil-mark-ring'."
+  (consult--forbid-minibuffer)
+  (unless (evil-collection-consult--evil-mark-ring)
+    (user-error "No marks"))
+  (let* ((candidates)
+         (current-buf (current-buffer)))
+    (save-excursion
+      (pcase-dolist (`(,char . ,marker) (or markers (evil-collection-consult--evil-mark-ring)))
+        (let ((pos (marker-position marker))
+              (buf (marker-buffer marker)))
+          (when (and (eq buf current-buf)
+                     (consult--in-range-p pos))
+            (goto-char pos)
+            (push (consult--location-candidate
+                   (format "%s: %s" (char-to-string char) (consult--line-with-mark marker))
+                   marker
+                   (line-number-at-pos pos consult-line-numbers-widen)
+                   marker)
+                  candidates)))))
+    (nreverse (delete-dups candidates))))
+
+;;;###autoload
+(defun evil-collection-consult-mark ()
+  "Jump to an evil marker in the current buffer."
+  (interactive)
+  (cl-letf (((symbol-function 'consult--mark-candidates)
+             #'evil-collection-consult--mark-candidates))
+    (consult-mark (evil-collection-consult--evil-mark-ring))))
+
+;;;###autoload
+(defun evil-collection-consult-jump-list ()
+  "Jump to a position in the evil jump list."
+  (interactive)
+  (consult-global-mark (delq nil (mapcar (lambda (jump)
+                                           (let ((mark (car jump)))
+                                             (when (markerp mark)
+                                               mark)))
+                                         (ring-elements (evil--jumps-get-window-jump-list))))))
+
+;;;###autoload
+(defun evil-collection-consult-setup ()
+  "Set up `evil' bindings for `consult'."
+  (evil-collection-consult-set-bindings))
+
+(provide 'evil-collection-consult)
+;;; evil-collection-consult.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/consult/evil-collection-consult.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/consult/evil-collection-consult.elc
new file mode 100644
index 0000000..bd89de6
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/consult/evil-collection-consult.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/corfu/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/corfu/README.org
new file mode 100644
index 0000000..71820eb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/corfu/README.org
@@ -0,0 +1,54 @@
+* corfu
+
+  Evil bindings for [[https://github.com/minad/corfu][corfu]] in-buffer completion.
+
+  Bindings apply in =insert= state on =corfu-map= and are gated by
+  =evil-collection-corfu-key-themes=. Only =default= is enabled out of the box.
+
+** Key bindings
+
+*** default theme
+
+    | Command                                 | Original | Evil                                |
+    |-----------------------------------------+----------+-------------------------------------|
+    | =corfu-next=                            | =<down>= | =C-n=, =C-j=, =M-j=, =<down>=       |
+    | =corfu-previous=                        | =<up>=   | =C-p=, =C-k=, =M-k=, =<up>=         |
+    | =corfu-insert=                          | =RET=    | =RET=                               |
+    | =corfu-complete=                        | =TAB=    | =TAB=                               |
+    | =corfu-quit=                            | =C-g=    | =C-g=                               |
+    | =evil-collection-corfu-quit-and-escape= | n/a      | =<escape>=                          |
+    | =corfu-scroll-up=                       | n/a      | =C-d= (when =evil-want-C-u-scroll=) |
+    | =corfu-scroll-down=                     | n/a      | =C-u= (when =evil-want-C-d-scroll=) |
+
+*** tab-n-go theme
+
+    Also sets =corfu-cycle= to =t= and =corfu-preselect= to =prompt=.
+
+    | Command          | Original | Evil               |
+    |------------------+----------+--------------------|
+    | =corfu-next=     | n/a      | =TAB=              |
+    | =corfu-previous= | n/a      | =S-TAB=, =backtab= |
+
+*** magic-return theme
+
+    =RET= / =<return>= insert the candidate when one is selected, otherwise
+    fall through to the buffer's default newline.
+
+*** magic-backspace theme
+
+    =DEL= / =<backspace>= reset the selection when one is active, otherwise
+    fall through.
+
+** New commands
+
+   | Command                                 | Purpose                                                  |
+   |-----------------------------------------+----------------------------------------------------------|
+   | =evil-collection-corfu-quit-and-escape= | =corfu-quit= then =evil-normal-state=.                   |
+   | =evil-collection-corfu-insert-exact=    | Insert current candidate with =exact= status, else quit. |
+
+** Customization
+
+   | Variable                                 | Default                      | Purpose                                                               |
+   |------------------------------------------+------------------------------+-----------------------------------------------------------------------|
+   | =evil-collection-corfu-key-themes=       | =(default)=                  | Themes from =default=, =tab-n-go=, =magic-return=, =magic-backspace=. |
+   | =evil-collection-corfu-supported-states= | =(insert replace emacs nil)= | Evil states in which =corfu= is allowed to run.                       |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/corfu/evil-collection-corfu.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/corfu/evil-collection-corfu.el
new file mode 100644
index 0000000..ef663c7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/corfu/evil-collection-corfu.el
@@ -0,0 +1,181 @@
+;;; evil-collection-corfu.el --- Bindings for `corfu-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, corfu, convenience, matching
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `corfu-mode'.
+
+;;; Code:
+(require 'corfu nil t)
+(require 'evil-collection)
+
+(defgroup evil-collection-corfu nil
+  "Evil bindings for `corfu-mode'."
+  :group 'evil-collection)
+
+(defvar corfu-map)
+(defvar corfu-cycle)
+(defvar corfu-preselect)
+(defvar corfu--index)
+
+(declare-function corfu-insert "corfu")
+(declare-function corfu-reset "corfu")
+(declare-function corfu-quit "corfu")
+
+(defconst evil-collection-corfu-maps '(corfu-map))
+
+(defun evil-collection-corfu-quit-and-escape ()
+  "Call `corfu-quit' and then return to Normal State."
+  (interactive)
+  (call-interactively 'corfu-quit)
+  (evil-normal-state))
+
+;; https://github.com/minad/corfu/pull/169
+;; https://github.com/minad/corfu/pull/225
+(defun evil-collection-corfu-unread-this-command-keys ()
+  (when (> (length (this-command-keys)) 0)
+    (setq unread-command-events (nconc
+                                  (listify-key-sequence (this-command-keys))
+                                  unread-command-events))
+    (clear-this-command-keys t)))
+
+(defun evil-collection-corfu-insert-exact ()
+  "Insert current candidate with the `exact' status.
+Quit if no candidate is selected."
+  (interactive)
+  (if (>= corfu--index 0)
+      (corfu--insert 'exact)
+    (corfu-quit)))
+
+(defcustom evil-collection-corfu-key-themes '(default)
+  "Determines the key theme to be mapped.
+
+This variable should be set before `evil-collection-corfu-setup' is called.
+
+By default, only default is added to this list as the other key themes might
+be too obtrusive.
+
+This key theme variable may be refactored in the future so use with caution."
+  :type
+  '(repeat
+    :tag "Key Themes"
+    (choice
+     (const
+      :tag "Default Theme" default)
+     (const
+      :tag "Tab & Go" tab-n-go)
+     (const
+      :tag "Magic Return" magic-return)
+     (const
+      :tag "Magic Backspace" magic-backspace))))
+
+(defcustom evil-collection-corfu-supported-states '(insert replace emacs nil)
+  "The `evil-state's which `corfu' function can be requested."
+  :type '(repeat symbol))
+
+;;;###autoload
+(defun evil-collection-corfu-setup ()
+  "Set up `evil' bindings for `corfu'."
+  (when (memq 'default evil-collection-corfu-key-themes)
+    (evil-collection-define-key 'insert 'corfu-map
+      (kbd "C-j") 'corfu-next
+      (kbd "C-k") 'corfu-previous
+      (kbd "M-j") 'corfu-next
+      (kbd "M-k") 'corfu-previous
+      (kbd "<down>") 'corfu-next
+      (kbd "<up>") 'corfu-previous
+      (kbd "<escape>") 'evil-collection-corfu-quit-and-escape)
+    (evil-collection-bind 'corfu-map
+                          'completion-previous 'corfu-previous
+                          'completion-next     'corfu-next))
+
+  ;; https://github.com/minad/corfu#tab-and-go-completion
+  (when (memq 'tab-n-go evil-collection-corfu-key-themes)
+    (setq corfu-cycle t
+          corfu-preselect 'prompt)
+    (evil-collection-define-key 'insert 'corfu-map
+      (kbd "TAB") 'corfu-next
+      [tab] 'corfu-next
+      [S-tab] 'corfu-previous
+      [backtab] 'corfu-previous))
+
+  (when (memq 'magic-return evil-collection-corfu-key-themes)
+    (defvar evil-collection-corfu-insert-or-next-line
+      `(menu-item "" nil :filter ,(lambda (&optional _)
+                                    (when (>= corfu--index 0)
+                                      'corfu-insert)))
+      "If we made a selection during `corfu' completion, select it.")
+    ;; FIXME: Not sure why we need to use `define-key' here instead of
+    ;; `evil-collection-define-key';.
+    (when (evil-collection-can-bind-key "<return>")
+          (define-key corfu-map (kbd "<return>")
+            evil-collection-corfu-insert-or-next-line))
+    (when (evil-collection-can-bind-key "RET")
+      (define-key corfu-map (kbd "RET")
+        evil-collection-corfu-insert-or-next-line)))
+
+  (when (memq 'magic-backspace evil-collection-corfu-key-themes)
+    (defvar evil-collection-corfu-cancel-or-backspace
+      `(menu-item "" nil :filter ,(lambda (&optional _)
+                                    (when (>= corfu--index 0)
+                                      'corfu-reset)))
+      "If we made a selection during `corfu' completion, cancel it.")
+    (evil-collection-define-key 'insert
+      'corfu-map (kbd "DEL") evil-collection-corfu-cancel-or-backspace)
+    (evil-collection-define-key 'insert
+      'corfu-map [backspace] evil-collection-corfu-cancel-or-backspace)
+    (evil-collection-define-key 'insert
+      'corfu-map (kbd "<backspace>") evil-collection-corfu-cancel-or-backspace))
+
+  (when evil-want-C-u-scroll
+    (evil-collection-define-key 'insert 'corfu-map
+      (kbd "C-d") 'corfu-scroll-up))
+  (when evil-want-C-d-scroll
+    (evil-collection-define-key 'insert 'corfu-map
+      (kbd "C-u") 'corfu-scroll-down))
+
+  (advice-add 'corfu--setup :after (lambda (&rest _) (evil-normalize-keymaps)))
+  (advice-add 'corfu--teardown :after (lambda (&rest _) (evil-normalize-keymaps)))
+  (advice-add 'corfu--continue-p
+              :before-while (lambda (&rest _) (memq evil-state evil-collection-corfu-supported-states)))
+
+  (cl-defmethod corfu--insert :around (status)
+    (if (or (eq this-command 'evil-collection-corfu-insert-exact)
+            (not (eq status 'exact)))
+        (cl-call-next-method)
+      (evil-collection-corfu-unread-this-command-keys)
+      (setq this-command 'evil-collection-corfu-insert-exact)))
+
+  (mapc #'evil-declare-ignore-repeat
+        '(corfu-next
+          corfu-previous
+          corfu-first
+          corfu-last))
+
+  (mapc #'evil-declare-change-repeat
+        '(evil-collection-corfu-insert-exact
+          corfu-insert
+          corfu-complete)))
+
+(provide 'evil-collection-corfu)
+;;; evil-collection-corfu.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/corfu/evil-collection-corfu.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/corfu/evil-collection-corfu.elc
new file mode 100644
index 0000000..ac2b01d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/corfu/evil-collection-corfu.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/crdt/evil-collection-crdt.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/crdt/evil-collection-crdt.el
new file mode 100644
index 0000000..268aaf4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/crdt/evil-collection-crdt.el
@@ -0,0 +1,63 @@
+;;; evil-collection-crdt.el --- Bindings for `crdt' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 Arte Ebrahimi and Jonathan Ming
+
+;; Authors: Arte Ebrahimi <arteebrahimi@gmail.com> and Jonathan Ming <jming422@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.2
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for crdt.
+
+;;; Code:
+(require 'evil-collection)
+(require 'crdt nil t)
+
+(defvar crdt-mode-map)
+(defconst evil-collection-crdt-maps
+  '(crdt-buffer-menu-mode-map crdt-session-menu-mode-map crdt-user-menu-mode-map crdt-read-settings-map))
+
+(defun evil-collection-crdt-setup ()
+  "Set up `evil' bindings for crdt."
+  (evil-collection-bind 'crdt-buffer-menu-mode-map
+                        'action 'crdt-switch-to-buffer-other-window
+                        'delete 'crdt-stop-share-buffer
+                        'delete-2 'crdt-stop-share-buffer)
+
+  (evil-collection-bind 'crdt-session-menu-mode-map
+                        'action 'crdt-list-buffers
+                        'delete 'crdt--stop-session
+                        'delete-2 'crdt--stop-session)
+
+  (evil-collection-bind 'crdt-user-menu-mode-map
+                        'action 'crdt-goto-user
+                        'delete 'crdt-kill-user
+                        'delete-2 'crdt-kill-user)
+
+  (evil-collection-bind 'crdt-read-settings-map
+                        'action 'exit-recursive-edit
+                        'quit 'exit-recursive-edit
+                        'quit-save 'exit-recursive-edit
+                        'quit-cancel 'abort-recursive-edit)
+
+  (evil-collection-define-key 'normal 'crdt-user-menu-mode-map
+    "f" 'crdt-follow-user))
+
+(provide 'evil-collection-crdt)
+;;; evil-collection-crdt.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/crdt/evil-collection-crdt.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/crdt/evil-collection-crdt.elc
new file mode 100644
index 0000000..4b2957a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/crdt/evil-collection-crdt.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/csv/evil-collection-csv.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/csv/evil-collection-csv.el
new file mode 100644
index 0000000..73102e5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/csv/evil-collection-csv.el
@@ -0,0 +1,43 @@
+;;; evil-collection-csv.el --- Bindings for `csv' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2024 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.2
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for csv.
+
+;;; Code:
+(require 'evil-collection)
+(require 'csv nil t)
+
+(defvar csv-mode-map)
+(defconst evil-collection-csv-maps '(csv-mode-map))
+
+;;;###autoload
+(defun evil-collection-csv-setup ()
+  "Set up `evil' bindings for csv."
+  (evil-collection-define-key 'normal 'csv-mode-map
+    [tab] 'csv-tab-command
+    [backtab] 'csv-backtab-command))
+
+(provide 'evil-collection-csv)
+;;; evil-collection-csv.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/csv/evil-collection-csv.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/csv/evil-collection-csv.elc
new file mode 100644
index 0000000..9cd6bcf
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/csv/evil-collection-csv.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cus-theme/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cus-theme/README.org
new file mode 100644
index 0000000..f34e2c0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cus-theme/README.org
@@ -0,0 +1,30 @@
+* cus-theme
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Custom-Themes.html][cus-theme]] (=M-x customize-themes=, =M-x customize-create-theme=).
+
+  Both =custom-theme-choose-mode= and =custom-new-theme-mode= start in
+  normal state.
+
+** Key bindings
+
+*** custom-theme-choose-mode-map
+
+    | Command                 | Original     | Evil                            |
+    |-------------------------+--------------+---------------------------------|
+    | =widget-forward=        | =TAB=, =n=   | =gj=, =]]=, =C-j=, =TAB=, =n=   |
+    | =widget-backward=       | =S-TAB=, =p= | =gk=, =[[=, =C-k=, =S-TAB=, =p= |
+    | =custom-describe-theme= | =?=          | =K=                             |
+    | =widget-button-press=   | =RET=        | =RET=                           |
+    | =quit-window=           | =q=          | =q=                             |
+    | =revert-buffer=         | =g=          | =g=                             |
+
+*** custom-new-theme-mode-map
+
+    | Command               | Original     | Evil                            |
+    |-----------------------+--------------+---------------------------------|
+    | =widget-forward=      | =TAB=, =n=   | =gj=, =]]=, =C-j=, =TAB=, =n=   |
+    | =widget-backward=     | =S-TAB=, =p= | =gk=, =[[=, =C-k=, =S-TAB=, =p= |
+    | =Custom-buffer-done=  | =q=          | =q=, =ZZ=                       |
+    | =evil-quit=           | n/a          | =ZQ=                            |
+    | =widget-button-press= | =RET=        | =RET=                           |
+    | =revert-buffer=       | =g=          | =g=                             |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cus-theme/evil-collection-cus-theme.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cus-theme/evil-collection-cus-theme.el
new file mode 100644
index 0000000..51d2a72
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cus-theme/evil-collection-cus-theme.el
@@ -0,0 +1,55 @@
+;;; evil-collection-cus-theme.el --- Bindings for `cus-theme' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, custom themes, help, faces
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `cus-theme'.
+
+;;; Code:
+(require 'cus-theme)
+(require 'evil-collection)
+
+(defconst evil-collection-cus-theme-maps '(custom-theme-choose-mode-map
+                                           custom-new-theme-mode-map))
+
+;;;###autoload
+(defun evil-collection-cus-theme-setup ()
+  "Set up `evil' bindings for `cus-theme'."
+  (evil-set-initial-state 'custom-new-theme-mode 'normal)
+  (evil-set-initial-state 'custom-theme-choose-mode 'normal)
+
+  (evil-collection-bind 'custom-theme-choose-mode-map
+                        'cycle-next 'widget-forward
+                        'cycle-previous 'widget-backward
+                        'lookup-doc 'custom-describe-theme)
+
+  (evil-collection-bind 'custom-new-theme-mode-map
+                        'cycle-next 'widget-forward
+                        'cycle-previous 'widget-backward
+                        'quit 'Custom-buffer-done
+                        'quit-save 'Custom-buffer-done
+                        'quit-cancel 'evil-quit))
+
+(provide 'evil-collection-cus-theme)
+;;; evil-collection-cus-theme.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cus-theme/evil-collection-cus-theme.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cus-theme/evil-collection-cus-theme.elc
new file mode 100644
index 0000000..095d169
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/cus-theme/evil-collection-cus-theme.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/custom/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/custom/README.org
new file mode 100644
index 0000000..d06b556
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/custom/README.org
@@ -0,0 +1,16 @@
+* custom
+
+  Evil bindings for the Customize interface (=Custom-mode=).
+
+** Key bindings
+
+   | Command               | Original                | Evil                                  |
+   |-----------------------+-------------------------+---------------------------------------|
+   | =Custom-newline=      | =RET=                   | =RET=                                 |
+   | =widget-forward=      | =TAB=, =n=              | =TAB=, =]]=, =gj=, =C-j=              |
+   | =widget-backward=     | =S-TAB=, =backtab=, =p= | =S-TAB=, =backtab=, =[[=, =gk=, =C-k= |
+   | =scroll-up-command=   | =SPC=                   | =SPC=                                 |
+   | =scroll-down-command= | =S-SPC=, =DEL=          | =S-SPC=, =<delete>=                   |
+   | =Custom-goto-parent=  | =u=                     | =^=, =<=, =C-o=                       |
+   | =Custom-buffer-done=  | =q=                     | =q=, =ZZ=                             |
+   | =evil-quit=           | n/a                     | =ZQ=                                  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/custom/evil-collection-custom.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/custom/evil-collection-custom.el
new file mode 100644
index 0000000..fcfa65e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/custom/evil-collection-custom.el
@@ -0,0 +1,59 @@
+;;; evil-collection-custom.el --- Evil bindings for Customize -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, custom, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for the Customize interface.
+
+;;; Code:
+(require 'cus-edit)
+(require 'evil-collection)
+
+(defconst evil-collection-custom-maps '(custom-mode-map))
+
+;;;###autoload
+(defun evil-collection-custom-setup ()
+  "Set up `evil' bindings for `Custom-mode'."
+  (evil-set-initial-state 'Custom-mode 'normal)
+
+  (evil-collection-define-key 'normal 'custom-mode-map
+    ;; motion
+    (kbd "<delete>") 'scroll-down-command
+
+    "^" 'Custom-goto-parent
+    (kbd "C-o") 'Custom-goto-parent
+    ;; TODO: Should the following be added?
+    "<" 'Custom-goto-parent)
+  (evil-collection-bind 'custom-mode-map
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'action 'Custom-newline
+                        'cycle-next 'widget-forward
+                        'cycle-previous 'widget-backward
+                        'quit 'Custom-buffer-done
+                        'quit-save 'Custom-buffer-done
+                        'quit-cancel 'evil-quit))
+
+(provide 'evil-collection-custom)
+;;; evil-collection-custom.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/custom/evil-collection-custom.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/custom/evil-collection-custom.elc
new file mode 100644
index 0000000..101e199
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/custom/evil-collection-custom.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/daemons/evil-collection-daemons.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/daemons/evil-collection-daemons.el
new file mode 100644
index 0000000..8b008e7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/daemons/evil-collection-daemons.el
@@ -0,0 +1,67 @@
+;;; evil-collection-daemons.el --- Evil Bindings for Daemons -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: Jay Kamat <jaygkamat@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, daemons, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `daemons' from the `daemons.el' package.
+
+;;; Code:
+(require 'daemons nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-daemons-maps '(daemons-mode-map
+                                         daemons-output-mode-map))
+
+;;;###autoload
+(defun evil-collection-daemons-setup ()
+  "Set up `evil' bindings for `daemons'."
+  (evil-collection-define-key '(normal visual) 'daemons-mode-map
+    "s" 'daemons-start-at-point
+    "S" 'daemons-stop-at-point
+    "r" 'daemons-reload-at-point
+    "R" 'daemons-restart-at-point)
+  (evil-collection-bind 'daemons-mode-map
+                        'action 'daemons-status-at-point
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window
+                        'refresh 'revert-buffer)
+
+  ;; Functions are available in daemons-output-mode-map as well
+  (evil-collection-define-key '(normal visual) 'daemons-output-mode-map
+    "s" 'daemons-start-at-point
+    "S" 'daemons-stop-at-point
+    "r" 'daemons-reload-at-point
+    "R" 'daemons-restart-at-point)
+  (evil-collection-bind 'daemons-output-mode-map
+                        'action 'daemons-status-at-point
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window)
+
+  (evil-set-initial-state 'daemons-mode 'normal)
+  (evil-set-initial-state 'daemons-output-mode 'normal))
+
+(provide 'evil-collection-daemons)
+;;; evil-collection-daemons.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/daemons/evil-collection-daemons.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/daemons/evil-collection-daemons.elc
new file mode 100644
index 0000000..dfc7930
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/daemons/evil-collection-daemons.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dape/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dape/README.org
new file mode 100644
index 0000000..7899945
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dape/README.org
@@ -0,0 +1,29 @@
+* dape
+
+  Evil bindings for [[https://github.com/svaante/dape][dape]] (Debug Adapter
+  Protocol for Emacs).
+
+  The =dape-info-*= mode maps are marked as overriding so dape's single-letter
+  commands still win in normal state.
+
+** dape-info-watch-mode-map
+
+   | Command                     | Original | Evil |
+   |-----------------------------+----------+------|
+   | =dape-info-watch-edit-mode= | n/a      | =i=  |
+
+   Underlying upstream keys (=e=, =m=, ===, =W=, =b= for scope ops) remain
+   reachable through the overriding map.
+
+** dape-info-watch-edit-mode-map
+
+   | Command                         | Original  | Evil                   |
+   |---------------------------------+-----------+------------------------|
+   | =dape-info-watch-finish-edit=   | =C-c C-c= | =ZZ=, =<escape>=, =:w= |
+   | =dape-info-watch-abort-changes= | =C-c C-k= | =ZQ=                   |
+
+** dape-memory-mode-map
+
+   | Command       | Original  | Evil       |
+   |---------------+-----------+------------|
+   | =save-buffer= | =C-x C-s= | =ZZ=, =:w= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dape/evil-collection-dape.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dape/evil-collection-dape.el
new file mode 100644
index 0000000..80100b1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dape/evil-collection-dape.el
@@ -0,0 +1,156 @@
+;;; evil-collection-dape.el --- Bindings for `dape' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2024 Daniel Pettersson
+
+;; Author: Daniel Pettersson <daniel@dpettersson.net>
+;; Maintainer: Daniel Pettersson <daniel@dpettersson.net>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.2
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools, dape
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `dape'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'dape nil t)
+
+(defvar dape-info-scope-mode-map)
+(defvar dape-info-watch-mode-map)
+(defvar dape-info-stack-mode-map)
+(defvar dape-info-sources-mode-map)
+(defvar dape-info-modules-mode-map)
+(defvar dape-info-breakpoints-mode-map)
+(defvar dape-info-threads-mode-map)
+(defvar dape-info-watch-edit-mode-map)
+(defvar dape-memory-mode-map)
+
+(declare-function dape-info-buffer-tab "dape")
+
+(defconst evil-collection-dape--info-mode-maps '(dape-info-scope-mode-map
+                                                 dape-info-watch-mode-map
+                                                 dape-info-stack-mode-map
+                                                 dape-info-sources-mode-map
+                                                 dape-info-modules-mode-map
+                                                 dape-info-breakpoints-mode-map
+                                                 dape-info-threads-mode-map))
+
+(defconst evil-collection-dape-maps `(dape-info-watch-edit-mode-map
+                                      dape-memory-mode-map
+                                      . ,evil-collection-dape--info-mode-maps))
+
+(defun evil-collection-dape--info-buffer-tab-backward ()
+  "Switch to the previous `dape' info tab."
+  (interactive)
+  (dape-info-buffer-tab t))
+
+;;;###autoload
+(defun evil-collection-dape-setup ()
+  "Set up `evil' bindings for `dape'."
+
+  (dolist (mode '(dape-info-scope-mode
+                  dape-info-watch-mode
+                  dape-info-stack-mode
+                  dape-info-sources-mode
+                  dape-info-modules-mode
+                  dape-info-breakpoints-mode
+                  dape-info-threads-mode))
+    (evil-set-initial-state mode 'normal))
+
+  (dolist (map-symbol evil-collection-dape--info-mode-maps)
+    (evil-collection-define-key 'normal map-symbol
+      (kbd "<tab>") 'dape-info-buffer-tab
+      (kbd "<backtab>") 'evil-collection-dape--info-buffer-tab-backward))
+
+  (evil-collection-bind 'dape-info-breakpoints-mode-map 'edit 'dape-info-breakpoint-log-edit)
+
+  (evil-collection-define-key 'normal 'dape-info-breakpoints-mode-map
+    [mouse-2] 'dape-info-breakpoint-dwim
+    [follow-link] 'mouse-face
+    "D" 'dape-info-breakpoint-disable
+    "d" 'dape-info-breakpoint-delete)
+  (evil-collection-bind 'dape-info-breakpoints-mode-map 'action 'dape-info-breakpoint-dwim)
+
+  (evil-collection-define-key 'normal 'dape-info-threads-mode-map
+    [mouse-2] 'dape-info-select-thread
+    [follow-link] 'mouse-face)
+  (evil-collection-bind 'dape-info-threads-mode-map 'action 'dape-info-select-thread)
+
+  (evil-collection-define-key 'normal 'dape-info-stack-mode-map
+    [mouse-2] 'dape-info-stack-select
+    [follow-link] 'mouse-face)
+  (evil-collection-bind 'dape-info-stack-mode-map 'action 'dape-info-stack-select)
+
+  (evil-collection-define-key 'normal 'dape-info-sources-mode-map
+    [mouse-2] 'dape-info-sources-goto
+    [follow-link] 'mouse-face)
+  (evil-collection-bind 'dape-info-sources-mode-map 'action 'dape-info-sources-goto)
+
+  (evil-collection-define-key 'normal 'dape-info-modules-mode-map
+    [mouse-2] 'dape-info-modules-goto
+    [follow-link] 'mouse-face)
+  (evil-collection-bind 'dape-info-modules-mode-map 'action 'dape-info-modules-goto)
+
+  (evil-collection-define-key 'normal 'dape-info-scope-mode-map
+    "e" 'dape-info-scope-toggle
+    "W" 'dape-info-scope-watch-dwim
+    "=" 'dape-info-variable-edit
+    "B" 'dape-info-scope-data-breakpoint
+    "m" 'dape-info-variable-memory)
+
+  (evil-collection-define-key 'normal 'dape-info-watch-mode-map
+    "e" 'dape-info-scope-toggle
+    "W" 'dape-info-scope-watch-dwim
+    "=" 'dape-info-variable-edit
+    "B" 'dape-info-scope-data-breakpoint
+    "m" 'dape-info-variable-memory
+    "I" 'dape-info-watch-edit-mode)
+
+  (evil-collection-define-key nil 'dape-info-watch-edit-mode-map
+    [remap evil-write] 'dape-info-watch-finish-edit)
+  (evil-collection-define-key 'normal 'dape-info-watch-edit-mode-map
+    (kbd "<escape>") 'dape-info-watch-finish-edit)
+  (evil-collection-bind 'dape-info-watch-edit-mode-map
+                        'quit-save 'dape-info-watch-finish-edit
+                        'quit-cancel 'dape-info-watch-abort-changes)
+
+  (evil-collection-define-key 'normal 'dape-memory-mode-map
+    [remap evil-write] 'save-buffer)
+  (evil-collection-bind 'dape-memory-mode-map 'quit-save 'save-buffer)
+
+  ;; Dape debug commands available in every info buffer (and memory).
+  ;; In scope/watch, the original `b' (data-breakpoint) and watch's `i'
+  ;; (watch-edit-mode) were relocated to `B' and `I' to free those slots
+  ;; for `debug-breakpoint' and `debug-step-into'.
+  (dolist (map-symbol '(dape-info-breakpoints-mode-map
+                        dape-info-threads-mode-map
+                        dape-info-stack-mode-map
+                        dape-info-sources-mode-map
+                        dape-info-modules-mode-map
+                        dape-info-scope-mode-map
+                        dape-info-watch-mode-map
+                        dape-memory-mode-map))
+    (evil-collection-bind map-symbol
+                          'debug-continue 'dape-continue
+                          'debug-step-over 'dape-next
+                          'debug-step-into 'dape-step-in
+                          'debug-step-out 'dape-step-out
+                          'debug-breakpoint 'dape-breakpoint-toggle
+                          'debug-restart 'dape-restart)))
+
+(provide 'evil-collection-dape)
+;;; evil-collection-dape.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dape/evil-collection-dape.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dape/evil-collection-dape.elc
new file mode 100644
index 0000000..5298d31
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dape/evil-collection-dape.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dashboard/evil-collection-dashboard.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dashboard/evil-collection-dashboard.el
new file mode 100644
index 0000000..7cd8d7d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dashboard/evil-collection-dashboard.el
@@ -0,0 +1,94 @@
+;;; evil-collection-dashboard.el --- Evil bindings for Dashboard  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020, 2022 Kisaragi Hiu
+
+;; Author: Kisaragi Hiu <mail@kisaragi-hiu.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, dashboard, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Evil bindings for Dashboard.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'dashboard nil t)
+
+(defvar dashboard-mode-map)
+
+(defconst evil-collection-dashboard-maps '(dashboard-mode-map))
+
+(defun evil-collection-dashboard-setup-jump-commands (&rest _)
+  "Set up bindings for jump commands in Dashboard."
+  (evil-collection-define-key 'normal 'dashboard-mode-map
+    "r" (lookup-key dashboard-mode-map "r") ; recents
+    "m" (lookup-key dashboard-mode-map "m") ; bookmarks
+    "p" (lookup-key dashboard-mode-map "p") ; projects
+    "a" (lookup-key dashboard-mode-map "a") ; agenda
+    ;; - Dashboard inserts shortcut hints in its buffer, so it's
+    ;; hard to differ from the default.
+    ;;
+    ;; - "registers" isn't shown in Dashboard by default; those who
+    ;; added it would have to choose between the widget and losing
+    ;; `evil-forward-word-end'. That's probably still better than
+    ;; having a shortcut hint that isn't correct.
+    "e" (lookup-key dashboard-mode-map "e"))) ; registers
+
+;;;###autoload
+(defun evil-collection-dashboard-setup ()
+  "Set up Evil bindings for Dashboard."
+  (evil-collection-set-readonly-bindings 'dashboard-mode-map)
+  (evil-collection-define-key 'normal 'dashboard-mode-map
+    ;; Movement
+    "j" 'dashboard-next-line
+    "k" 'dashboard-previous-line
+
+    ;; Enabling this binding makes RET insert a newline.
+    ;; Default `evil-ret' works better.
+    ;; (kbd "RET") 'dashboard-return
+
+    ;; Other commands
+    [down-mouse-1] 'widget-button-click)
+  (evil-collection-bind 'dashboard-mode-map
+                        'cycle-next 'widget-forward
+                        'cycle-previous 'widget-backward)
+
+  ;; Section navigation via theme.
+  ;; Like `evil-collection-outline.el'.  These don't support COUNT, so [[ and ]]
+  ;; aren't ideal — but bind via theme anyway for consistency.
+  (evil-collection-bind 'dashboard-mode-map
+                        'next-item 'dashboard-next-section
+                        'prev-item 'dashboard-previous-section)
+
+  ;; Jump commands
+  ;;
+  ;; I had to use an advice as dashboard.el defines these bindings
+  ;; after the map has been defined, as unnamed functions bound to a
+  ;; local variable. See
+  ;; https://github.com/emacs-dashboard/emacs-dashboard/blob/f15d3e2e/dashboard-widgets.el#L308
+  ;; for what I mean.
+  ;;
+  ;; Despite the name, this function is what sets up the dashboard
+  ;; buffer itself.
+  (advice-add 'dashboard-insert-startupify-lists :after
+              #'evil-collection-dashboard-setup-jump-commands))
+
+(provide 'evil-collection-dashboard)
+
+;;; evil-collection-dashboard.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dashboard/evil-collection-dashboard.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dashboard/evil-collection-dashboard.elc
new file mode 100644
index 0000000..583bcf7
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dashboard/evil-collection-dashboard.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/deadgrep/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/deadgrep/README.org
new file mode 100644
index 0000000..c35427a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/deadgrep/README.org
@@ -0,0 +1,24 @@
+* deadgrep
+
+  Evil bindings for [[https://github.com/Wilfred/deadgrep][deadgrep]].
+
+** deadgrep-mode-map
+
+   | Command                              | Original  | Evil          |
+   |--------------------------------------+-----------+---------------|
+   | =deadgrep-visit-result=              | =RET=     | =RET=         |
+   | =deadgrep-visit-result-other-window= | =o=       | =S-RET=, =go= |
+   | =deadgrep-forward-match=             | =n=       | =C-j=, =gj=   |
+   | =deadgrep-backward-match=            | =p=       | =C-k=, =gk=   |
+   | =deadgrep-toggle-file-results=       | =TAB=     | =TAB=         |
+   | =deadgrep-restart=                   | =g=       | =gr=          |
+   | =deadgrep-edit-mode=                 | =C-x C-q= | =i=           |
+   | =quit-window=                        | n/a       | =q=, =ZZ=     |
+   | =evil-quit=                          | n/a       | =ZQ=          |
+
+** deadgrep-edit-mode-map
+
+   | Command                 | Original  | Evil       |
+   |-------------------------+-----------+------------|
+   | =deadgrep-visit-result= | =RET=     | =RET=      |
+   | =deadgrep-mode=         | =C-c C-c= | =<escape>= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/deadgrep/evil-collection-deadgrep.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/deadgrep/evil-collection-deadgrep.el
new file mode 100644
index 0000000..354a6b4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/deadgrep/evil-collection-deadgrep.el
@@ -0,0 +1,62 @@
+;;; evil-collection-deadgrep.el --- Bindings for deadgrep -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for deadgrep.
+
+;;; Code:
+(require 'evil-collection)
+(require 'deadgrep nil t)
+
+(defconst evil-collection-deadgrep-maps '(deadgrep-edit-mode-map
+                                          deadgrep-mode-map))
+
+;;;###autoload
+(defun evil-collection-deadgrep-setup ()
+  "Set up `evil' bindings for deadgrep.."
+  (evil-collection-define-key 'normal 'deadgrep-edit-mode-map
+    (kbd "<escape>") 'deadgrep-mode)
+  (evil-collection-define-key 'normal 'deadgrep-mode-map
+    "i" 'deadgrep-edit-mode)
+  (evil-collection-define-push-action evil-collection-deadgrep-action
+                                      deadgrep-visit-result)
+  (evil-collection-bind 'deadgrep-mode-map
+                        'section-toggle 'deadgrep-toggle-file-results
+                        'action 'evil-collection-deadgrep-action
+                        'action-other 'deadgrep-visit-result-other-window
+                        'next-item 'deadgrep-forward
+                        'prev-item 'deadgrep-backward
+                        'next-section 'deadgrep-forward
+                        'prev-section 'deadgrep-backward
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit
+                        'refresh 'deadgrep-restart
+                        'delete-2 'deadgrep-kill-process)
+  (evil-collection-bind 'deadgrep-edit-mode-map
+                        'action 'deadgrep-visit-result))
+
+(provide 'evil-collection-deadgrep)
+;;; evil-collection-deadgrep.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/deadgrep/evil-collection-deadgrep.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/deadgrep/evil-collection-deadgrep.elc
new file mode 100644
index 0000000..51fc427
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/deadgrep/evil-collection-deadgrep.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debbugs/evil-collection-debbugs.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debbugs/evil-collection-debbugs.el
new file mode 100644
index 0000000..466c907
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debbugs/evil-collection-debbugs.el
@@ -0,0 +1,77 @@
+;;; evil-collection-debbugs.el --- Evil bindings for debbugs -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, debbugs, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for debbugs.
+
+;;; Code:
+(require 'debbugs nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-debbugs-maps '(debbugs-gnu-mode-map))
+
+;;;###autoload
+(defun evil-collection-debbugs-setup ()
+  "Set up `evil' bindings for `debbugs-gnu-mode'."
+  (evil-set-initial-state 'debbugs-gnu-mode 'normal)
+
+  (evil-collection-bind 'debbugs-gnu-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button)
+  (evil-collection-define-key 'normal 'debbugs-gnu-mode-map
+    "c" 'debbugs-gnu-send-control-message
+    "d" 'debbugs-gnu-display-status
+
+    ;; filter
+    "S" 'debbugs-gnu-search
+    ;; "S" 'debbugs-gnu-widen ; Useless if we can just press "s RET" (empty filter).
+    "x" 'debbugs-gnu-toggle-suppress
+    "r" 'debbugs-gnu-show-all-blocking-reports
+
+    ;; sort
+    "o" 'debbugs-gnu-toggle-sort
+    "O" 'tabulated-list-sort
+
+    ;; show
+    "gB" 'debbugs-gnu-show-blocking-reports
+    "gb" 'debbugs-gnu-show-blocked-by-reports
+
+    ;; mark
+    "m" 'debbugs-gnu-toggle-tag
+
+    "gt" 'debbugs-gnu-view-bug-triage
+    "g#" 'debbugs-gnu-bugs)
+  (evil-collection-bind 'debbugs-gnu-mode-map
+                        'scroll-down 'scroll-up-command
+                        'action 'debbugs-gnu-select-report
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window
+                        'describe-mode 'debbugs-gnu-manual
+                        'refresh 'debbugs-gnu-rescan
+                        'search-or-filter 'debbugs-gnu-narrow-to-status))
+
+(provide 'evil-collection-debbugs)
+;;; evil-collection-debbugs.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debbugs/evil-collection-debbugs.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debbugs/evil-collection-debbugs.elc
new file mode 100644
index 0000000..b2891e4
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debbugs/evil-collection-debbugs.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debug/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debug/README.org
new file mode 100644
index 0000000..ea4dcfe
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debug/README.org
@@ -0,0 +1,26 @@
+* debug
+
+  Evil bindings for the Elisp debugger (=debugger-mode=).
+
+** Key bindings
+
+   | Command                                              | Original | Evil      |
+   |------------------------------------------------------+----------+-----------|
+   | =debug-help-follow= / =backtrace-help-follow-symbol= | =RET=    | =RET=     |
+   | =forward-button=                                     | =TAB=    | =TAB=     |
+   | =backward-button=                                    | =S-TAB=  | =S-TAB=   |
+   | =next-line=                                          | n/a      | =SPC=     |
+   | =debugger-continue=                                  | =c=      | =c=       |
+   | =debugger-step-through=                              | =d=      | =d=       |
+   | =debugger-jump=                                      | =j=      | =J=       |
+   | =debugger-eval-expression=                           | =e=      | =x=, =E=  |
+   | =debugger-record-expression=                         | =R=      | =R=       |
+   | =debugger-return-value=                              | =r=      | =r=       |
+   | =debugger-frame=                                     | =b=      | =gb=      |
+   | =debugger-frame-clear=                               | =u=      | =u=       |
+   | =debugger-list-functions=                            | =l=      | =gl=      |
+   | =debugger-toggle-locals= / =backtrace-toggle-locals= | =v=      | =L=, =p=  |
+   | =backtrace-multi-line=                               | =+=      | =zo=      |
+   | =backtrace-single-line=                              | =-=      | =zc=      |
+   | =top-level=                                          | =q=      | =q=, =ZZ= |
+   | =evil-quit=                                          | n/a      | =ZQ=      |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debug/evil-collection-debug.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debug/evil-collection-debug.el
new file mode 100644
index 0000000..9353acf
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debug/evil-collection-debug.el
@@ -0,0 +1,78 @@
+;;; evil-collection-debug.el --- Evil bindings for the debugger -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, debug, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for the debugger.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'debug)
+
+(defconst evil-collection-debug-maps '(debugger-mode-map))
+
+;;;###autoload
+(defun evil-collection-debug-setup ()
+  "Set up `evil' bindings for `debug'."
+  (evil-set-initial-state 'debugger-mode 'normal)
+
+  (evil-collection-define-key 'normal 'debugger-mode-map
+    ;; motion
+    (kbd "SPC") 'next-line
+
+    "R" 'debugger-record-expression
+    "d" 'debugger-step-through
+
+    "x" 'debugger-eval-expression
+    "E" 'debugger-eval-expression
+
+    "gl" 'debugger-list-functions
+    "gb" 'debugger-frame
+    "r" 'debugger-return-value
+    "u" 'debugger-frame-clear
+    "p" (if (fboundp 'debugger-toggle-locals)
+            'debugger-toggle-locals
+          'backtrace-toggle-locals)
+
+    "zo" 'backtrace-multi-line
+    "zc" 'backtrace-single-line)
+  (evil-collection-bind 'debugger-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button
+                        'action (if (fboundp 'debug-help-follow)
+                                    'debug-help-follow
+                                  'backtrace-help-follow-symbol)
+                        'quit 'top-level
+                        'quit-save 'top-level
+                        'quit-cancel 'evil-quit
+                        'debug-continue 'debugger-continue
+                        'debug-eval 'debugger-eval-expression
+                        'jump 'debugger-jump
+                        'debug-locals (if (fboundp 'debugger-toggle-locals)
+                                          'debugger-toggle-locals
+                                        'backtrace-toggle-locals)))
+
+(provide 'evil-collection-debug)
+;;; evil-collection-debug.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debug/evil-collection-debug.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debug/evil-collection-debug.elc
new file mode 100644
index 0000000..f42703f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/debug/evil-collection-debug.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/devdocs/evil-collection-devdocs.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/devdocs/evil-collection-devdocs.el
new file mode 100644
index 0000000..2fea574
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/devdocs/evil-collection-devdocs.el
@@ -0,0 +1,64 @@
+;;; evil-collection-devdocs.el --- Evil bindings for devdocs -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for devdocs.
+
+;;; Code:
+(require 'evil-collection)
+(require 'devdocs nil t)
+
+(defconst evil-collection-devdocs-maps '(devdocs-mode-map))
+
+;;;###autoload
+(defun evil-collection-devdocs-setup ()
+  "Set up `evil' bindings for `devdocs'."
+  (evil-set-initial-state 'devdocs-mode 'normal)
+  (evil-collection-set-readonly-bindings 'devdocs-mode-map)
+
+  (evil-collection-bind 'devdocs-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button)
+  (evil-collection-define-key 'normal 'devdocs-mode-map
+    ;; motion
+    "g." 'devdocs-goto-target
+
+    ;; copy
+    "C" 'devdocs-copy-url
+
+    ;; search
+    "s" 'devdocs-lookup)
+  (evil-collection-bind 'devdocs-mode-map
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'next-item 'devdocs-next-page
+                        'prev-item 'devdocs-previous-page
+                        'next-section 'devdocs-next-page
+                        'prev-section 'devdocs-previous-page
+                        'history-previous 'devdocs-go-back
+                        'history-next     'devdocs-go-forward))
+
+(provide 'evil-collection-devdocs)
+;;; evil-collection-devdocs.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/devdocs/evil-collection-devdocs.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/devdocs/evil-collection-devdocs.elc
new file mode 100644
index 0000000..1bae943
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/devdocs/evil-collection-devdocs.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dictionary/evil-collection-dictionary.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dictionary/evil-collection-dictionary.el
new file mode 100644
index 0000000..35364e5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dictionary/evil-collection-dictionary.el
@@ -0,0 +1,52 @@
+;;; evil-collection-dictionary.el --- Evil bindings for dictionary-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: Sid Kasivajhula <sid@countvajhula.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, dictionary, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `dictionary'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'dictionary nil t)
+
+(defconst evil-collection-dictionary-maps '(dictionary-mode-map))
+
+;;;###autoload
+(defun evil-collection-dictionary-setup ()
+  "Set up `evil' bindings for `dictionary'."
+  (evil-set-initial-state 'dictionary-mode 'normal)
+  (evil-collection-set-readonly-bindings 'dictionary-mode-map)
+  (evil-collection-define-key 'normal 'dictionary-mode-map
+    ;; button
+    [tab] 'forward-button
+    [backtab] 'backward-button
+    ;; mouse
+    [mouse-1] 'link-selected
+    ;; misc
+    (kbd "C-o") 'dictionary-previous) ; normally under `l` which is rebound here
+
+  (evil-collection-bind 'dictionary-mode-map 'describe-mode 'dictionary-help))
+
+(provide 'evil-collection-dictionary)
+;;; evil-collection-dictionary.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dictionary/evil-collection-dictionary.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dictionary/evil-collection-dictionary.elc
new file mode 100644
index 0000000..24ec530
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dictionary/evil-collection-dictionary.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-hl/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-hl/README.org
new file mode 100644
index 0000000..67e87a7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-hl/README.org
@@ -0,0 +1,29 @@
+* diff-hl
+
+  Evil bindings for [[https://github.com/dgutov/diff-hl][diff-hl]]'s show-hunk popup and inline overlay.
+
+  Also adds =evil-normalize-keymaps= to
+  =diff-hl-show-hunk-inline-transient-mode-hook= so the bindings take
+  effect when the transient mode toggles on.
+
+** Key bindings
+
+*** diff-hl-show-hunk-map
+
+    | Command                                | Original | Evil |
+    |----------------------------------------+----------+------|
+    | =diff-hl-show-hunk-previous=           | =p=, ={= | =p=  |
+    | =diff-hl-show-hunk-next=               | =n=, =}= | =n=  |
+    | =diff-hl-show-hunk-copy-original-text= | =c=      | =c=  |
+    | =diff-hl-show-hunk-revert-hunk=        | =r=      | =r=  |
+    | =diff-hl-show-hunk-stage-hunk=         | =S=      | =S=  |
+
+*** diff-hl-show-hunk-inline-transient-mode-map
+
+    | Command                                    | Original          | Evil       |
+    |--------------------------------------------+-------------------+------------|
+    | =diff-hl-show-hunk-inline-hide=            | =q=, =C-g=, =ESC= | =q=, =ESC= |
+    | =diff-hl-show-hunk-inline--popup-down=     | =<down>=, =C-n=   | =j=        |
+    | =diff-hl-show-hunk-inline--popup-up=       | =<up>=, =C-p=     | =k=        |
+    | =diff-hl-show-hunk-inline--popup-pagedown= | =<next>=, =C-v=   | =C-f=      |
+    | =diff-hl-show-hunk-inline--popup-pageup=   | =<prior>=, =M-v=  | =C-b=      |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-hl/evil-collection-diff-hl.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-hl/evil-collection-diff-hl.el
new file mode 100644
index 0000000..405e7d9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-hl/evil-collection-diff-hl.el
@@ -0,0 +1,75 @@
+;;; evil-collection-diff-hl.el --- Evil bindings for diff-hl -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, diff, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for diff-hl.
+;;
+;; All functions used below are autoloaded except for
+;; `diff-hl-show-hunk-inline--popup-down' et al commands.
+;;
+;; When users invoke `diff-hl-show-hunk' (it invokes
+;; `diff-hl-show-hunk-function' under the hood), `diff-hl-show-hunk-inline.el' or
+;; `diff-hl-show-hunk-posframe.el' will be loaded eventually.
+;;
+;; So there is no
+;;
+;;   (require 'diff-hl nil t)
+;;
+;; below.
+
+;;; Code:
+(require 'evil-collection)
+
+(defconst evil-collection-diff-hl-maps '(diff-hl-show-hunk-map
+                                         diff-hl-show-hunk-inline-transient-mode-map))
+
+;;;###autoload
+(defun evil-collection-diff-hl-setup()
+  "Set up `evil' bindings for `diff-hl'."
+  (add-hook 'diff-hl-show-hunk-inline-transient-mode-hook #'evil-normalize-keymaps)
+
+  (evil-collection-define-key 'normal 'diff-hl-show-hunk-inline-transient-mode-map
+    ;; quit
+    (kbd "<escape>") 'diff-hl-show-hunk-inline-hide
+
+    ;; motion
+    "j" 'diff-hl-show-hunk-inline--popup-down
+    "k" 'diff-hl-show-hunk-inline--popup-up
+    (kbd "C-f") 'diff-hl-show-hunk-inline--popup-pagedown
+    (kbd "C-b") 'diff-hl-show-hunk-inline--popup-pageup)
+  (evil-collection-bind 'diff-hl-show-hunk-inline-transient-mode-map 'quit 'diff-hl-show-hunk-inline-hide)
+
+  ;; Actually `diff-hl-show-hunk-inline-transient-mode-map' will inherit it by
+  ;; `set-keymap-parent'.
+  (evil-collection-define-key 'normal 'diff-hl-show-hunk-map
+    ;; Keep it the same as the overlay shows.
+    "p" 'diff-hl-show-hunk-previous
+    "n" 'diff-hl-show-hunk-next
+    "c" 'diff-hl-show-hunk-copy-original-text
+    "r" 'diff-hl-show-hunk-revert-hunk
+    "S" 'diff-hl-show-hunk-stage-hunk))
+
+(provide 'evil-collection-diff-hl)
+;;; evil-collection-diff-hl.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-hl/evil-collection-diff-hl.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-hl/evil-collection-diff-hl.elc
new file mode 100644
index 0000000..f82f48a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-hl/evil-collection-diff-hl.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-mode/README.org
new file mode 100644
index 0000000..a15d829
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-mode/README.org
@@ -0,0 +1,66 @@
+* diff-mode
+
+  Evil bindings for =diff-mode=. By default they are installed on a dedicated
+  minor mode (=evil-collection-diff-mode=) attached to every =diff-mode= buffer,
+  so normal/insert states keep working for editing. Set
+  =evil-collection-diff-mode-want-minor-mode= to =nil= to instead bind on
+  =diff-mode-map= and have read-only / motion state toggle together.
+
+** Key bindings (minor-mode setup, default)
+
+   Active in normal state.
+
+   | Command            | Original  | Evil        |
+   |--------------------+-----------+-------------|
+   | =diff-goto-source= | =C-c C-c= | =RET=       |
+   | =diff-file-prev=   | =M-{=     | =[[=        |
+   | =diff-file-next=   | =M-}=     | =]]=        |
+   | =diff-hunk-prev=   | =M-p=     | =gk=, =C-k= |
+   | =diff-hunk-next=   | =M-n=     | =gj=, =C-j= |
+   | =diff-ediff-patch= | =C-c C-e= | =ge=        |
+   | =read-only-mode=   | n/a       | =\=         |
+   | =quit-window=      | n/a       | =q=         |
+
+   With =evil-collection-want-g-bindings= (the default), edit commands sit under
+   =g=:
+
+   | Command                                       | Original  | Evil |
+   |-----------------------------------------------+-----------+------|
+   | =diff-apply-hunk=                             | =C-c C-a= | =ga= |
+   | =diff-refine-hunk=                            | =C-c C-b= | =g*= |
+   | =diff-hunk-kill=                              | =C-c C-k= | =gx= |
+   | =diff-file-kill=                              | =C-c M-k= | =gX= |
+   | =diff-split-hunk=                             | =C-c C-s= | =gs= |
+   | =diff-test-hunk=                              | =C-c C-t= | =gc= |
+   | =diff-reverse-direction=                      | =C-c C-r= | =g~= |
+   | =diff-ignore-whitespace-hunk=                 | =C-c C-w= | =g#= |
+   | =diff-add-change-log-entries-other-window=    | =C-x 4 A= | =gA= |
+   | =evil-collection-diff-toggle-context-unified= | n/a       | =g%= |
+   | =evil-collection-diff-toggle-restrict-view=   | =C-c C-n= | =go= |
+   | =next-error-follow-minor-mode=                | =C-c C-f= | =gi= |
+
+   Without =evil-collection-want-g-bindings=, the commands above land on their
+   single-letter equivalents (=a=, =*=, =d=, =D=, =s=, =c=, =~=, =#=, =A=, =x=,
+   =o=, =i=) instead.
+
+** Motion-state setup (when =evil-collection-diff-mode-want-minor-mode= is nil)
+
+   Same set of commands, but they go on =diff-mode-map= directly in normal and
+   motion states. A hook (=evil-collection-diff-toggle-setup=) flips state
+   whenever the buffer's read-only flag changes — read-only buffers enter motion
+   state, writable buffers normal state. Toggle this hook per-buffer with =M-x
+   evil-collection-diff-toggle-setup=.
+
+** New commands
+
+   | Command                                       | Key  |                                                  |
+   |-----------------------------------------------+------+--------------------------------------------------|
+   | =evil-collection-diff-toggle-context-unified= | =g%= | Toggle context <-> unified view.                 |
+   | =evil-collection-diff-toggle-restrict-view=   | =go= | Toggle =diff-restrict-view=; widens if narrowed. |
+   | =evil-collection-diff-toggle-setup=           | n/a  | Toggle the read-only state hook in the buffer.   |
+
+** Customization
+
+   | Variable                                    | Default | Purpose                                                                    |
+   |---------------------------------------------+---------+----------------------------------------------------------------------------|
+   | =evil-collection-diff-mode-want-minor-mode= | =t=     | Bind on =evil-collection-diff-mode= minor mode instead of =diff-mode-map=. |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-mode/evil-collection-diff-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-mode/evil-collection-diff-mode.el
new file mode 100644
index 0000000..611b268
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-mode/evil-collection-diff-mode.el
@@ -0,0 +1,130 @@
+;;; evil-collection-diff-mode.el --- Add Evil bindings to diff-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, diff, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; This should be a comment.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'diff-mode)
+
+(defconst evil-collection-diff-mode-maps '(diff-mode-map))
+
+;;; TODO: Report toggle function upstream?
+(defun evil-collection-diff-toggle-context-unified (start end)
+  "Toggle between context and unified views.
+
+START and END are either taken from the region (if a prefix arg is given) or
+else cover the whole buffer."
+  (interactive (if (or current-prefix-arg (use-region-p))
+                   (list (region-beginning) (region-end))
+                 (list (point-min) (point-max))))
+  ;; There seems to be no way to know whether we are in context or unified views.
+  ;; Workaround: assume that point-max will change.  This is brittle.
+  (let ((old-point-max (point-max)))
+    (diff-unified->context start end)
+    (when (= old-point-max (point-max))
+      (diff-context->unified start end))))
+
+;;; TODO: Report toggle function upstream?
+(defun evil-collection-diff-toggle-restrict-view (&optional arg)
+  "Toggle the restriction of the view to the current hunk.
+When restricting and if the prefix ARG is given, restrict the view to the
+current file instead."
+  (interactive "P")
+  (if (buffer-narrowed-p)
+      (widen)
+    (diff-restrict-view arg)))
+
+(defvar evil-collection-diff-mode-map (make-sparse-keymap))
+
+(define-minor-mode evil-collection-diff-mode
+   "A minor mode to attach to `diff-mode' results"
+  :group 'evil-collection-diff-mode
+  :keymap evil-collection-diff-mode-map
+  :lighter nil)
+
+(defun evil-collection-diff-mode-turn-on ()
+   "Turn on `evil-collection-diff-mode' and normalize keymaps."
+  (evil-collection-diff-mode)
+  (evil-normalize-keymaps))
+
+(defun evil-collection-diff-mode-setup-on-minor-mode ()
+   "Set up bindings on `evil-collection-diff-mode'."
+  (evil-collection-define-key 'normal 'evil-collection-diff-mode-map
+    "ge" 'diff-ediff-patch
+    "\\" 'read-only-mode)
+  (evil-collection-bind 'evil-collection-diff-mode-map
+                        'action 'diff-goto-source
+                        'next-item 'diff-hunk-next
+                        'prev-item 'diff-hunk-prev
+                        'next-section 'diff-file-next
+                        'prev-section 'diff-file-prev
+                        'next-section-2 'diff-hunk-next
+                        'prev-section-2 'diff-hunk-prev
+                        'quit 'quit-window)
+
+  (if evil-collection-want-g-bindings
+      (evil-collection-define-key 'normal 'evil-collection-diff-mode-map
+        "gA" 'diff-add-change-log-entries-other-window
+        "ga" 'diff-apply-hunk
+        "g*" 'diff-refine-hunk
+        "gX" 'diff-file-kill
+        "gx" 'diff-hunk-kill
+        "gi" 'next-error-follow-minor-mode
+        "go" 'evil-collection-diff-toggle-restrict-view
+        "g~" 'diff-reverse-direction
+        "gs" 'diff-split-hunk
+        "gc" 'diff-test-hunk
+        "g%" 'evil-collection-diff-toggle-context-unified
+        "g#" 'diff-ignore-whitespace-hunk)
+    (evil-collection-define-key 'normal 'evil-collection-diff-mode-map
+      "A" 'diff-add-change-log-entries-other-window
+      "a" 'diff-apply-hunk
+      "*" 'diff-refine-hunk
+      "D" 'diff-file-kill
+      "d" 'diff-hunk-kill
+      "i" 'next-error-follow-minor-mode
+      "o" 'evil-collection-diff-toggle-restrict-view
+      "~" 'diff-reverse-direction
+      "s" 'diff-split-hunk
+      "c" 'diff-test-hunk
+      "x" 'evil-collection-diff-toggle-context-unified
+      "#" 'diff-ignore-whitespace-hunk))
+
+  ;; Enable a separate minor mode so that we can bind keys to it.
+  (add-hook 'diff-mode-hook #'evil-collection-diff-mode))
+
+;;;###autoload
+(defun evil-collection-diff-mode-setup ()
+  "Set up `evil' bindings for `diff-mode'."
+  ;; Don't switch to read-only/motion state by default as this can interfere
+  ;; with other modes which require a writable buffer, e.g. magit.
+  (evil-set-initial-state 'diff-mode 'normal)
+  (evil-collection-diff-mode-setup-on-minor-mode))
+
+(provide 'evil-collection-diff-mode)
+;;; evil-collection-diff-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-mode/evil-collection-diff-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-mode/evil-collection-diff-mode.elc
new file mode 100644
index 0000000..997bfc5
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/diff-mode/evil-collection-diff-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/difftastic/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/difftastic/README.org
new file mode 100644
index 0000000..2486a73
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/difftastic/README.org
@@ -0,0 +1,20 @@
+* difftastic
+
+  Evil bindings for [[https://github.com/pkryger/difftastic.el][difftastic]] result buffers.
+
+** Key bindings
+
+   | Command                               | Original            | Evil        |
+   |---------------------------------------+---------------------+-------------|
+   | =difftastic-previous-file=            | =P=, =M-p=          | =[[=        |
+   | =difftastic-next-file=                | =N=, =M-n=          | =]]=        |
+   | =difftastic-next-chunk=               | =n=                 | =C-j=, =gj= |
+   | =difftastic-previous-chunk=           | =p=                 | =C-k=, =gk= |
+   | =difftastic-hide-chunk=               |                     | =zc=        |
+   | =difftastic-show-chunk=               |                     | =zo=        |
+   | =difftastic-toggle-chunk=             | =TAB=               | =TAB=       |
+   | =difftastic-diff-visit-file=          | =RET=               | =RET=       |
+   | =difftastic-diff-visit-worktree-file= | =C-<return>=, =C-j= | =o=         |
+   | =difftastic-rerun=                    | =g=                 | =gr=        |
+   | =difftastic-leave=                    | =c=, =e=            | =q=         |
+   | =difftastic-quit=                     | =q=                 | =ZQ=        |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/difftastic/evil-collection-difftastic.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/difftastic/evil-collection-difftastic.el
new file mode 100644
index 0000000..164ae19
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/difftastic/evil-collection-difftastic.el
@@ -0,0 +1,59 @@
+;;; evil-collection-difftastic.el --- Bindings for `difftastic' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2025 hiecaq
+
+;; Author: hiecaq <soc.github@hiecaq.org>
+;; Maintainer: hiecaq <soc.github@hiecaq.org>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for difftastic.
+
+;;; Code:
+(require 'evil-collection)
+(require 'difftastic nil t)
+
+(defvar difftastic-mode-map)
+
+(defconst evil-collection-difftastic-maps '(difftastic-mode-map))
+
+;;;###autoload
+(defun evil-collection-difftastic-setup ()
+  "Set up `evil' bindings for `difftastic'."
+  (evil-collection-define-key 'normal 'difftastic-mode-map
+    "zc" 'difftastic-hide-chunk
+    "zo" 'difftastic-show-chunk
+    "o" 'difftastic-diff-visit-worktree-file)
+  (evil-collection-bind 'difftastic-mode-map
+                        'action 'difftastic-diff-visit-file
+                        'next-item 'difftastic-next-chunk
+                        'prev-item 'difftastic-previous-chunk
+                        'next-section 'difftastic-next-file
+                        'prev-section 'difftastic-previous-file
+                        'next-section-2 'difftastic-next-chunk
+                        'prev-section-2 'difftastic-previous-chunk
+                        'quit 'difftastic-leave
+                        'quit-save 'difftastic-quit
+                        'quit-cancel 'difftastic-quit
+                        'refresh 'difftastic-rerun
+                        'section-toggle 'difftastic-toggle-chunk))
+
+(provide 'evil-collection-difftastic)
+
+;;; evil-collection-difftastic.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/difftastic/evil-collection-difftastic.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/difftastic/evil-collection-difftastic.elc
new file mode 100644
index 0000000..398601f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/difftastic/evil-collection-difftastic.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired-sidebar/evil-collection-dired-sidebar.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired-sidebar/evil-collection-dired-sidebar.el
new file mode 100644
index 0000000..33b1361
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired-sidebar/evil-collection-dired-sidebar.el
@@ -0,0 +1,51 @@
+;;; evil-collection-dired-sidebar.el --- Evil bindings for dired-sidebar -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, dired, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `dired-sidebar'
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'dired-sidebar nil t)
+
+(defconst evil-collection-dired-sidebar-maps '(dired-sidebar-mode-map))
+
+;;;###autoload
+(defun evil-collection-dired-sidebar-setup ()
+  "Set up `evil' bindings for `dired-sidebar'."
+  (evil-collection-define-key 'normal 'dired-sidebar-mode-map
+    "^" 'dired-sidebar-up-directory
+    "-" 'dired-sidebar-up-directory
+    [mouse-2] 'dired-sidebar-mouse-subtree-cycle-or-find-file)
+  (evil-collection-bind 'dired-sidebar-mode-map
+                        'section-toggle 'dired-sidebar-subtree-toggle
+                        'action 'dired-sidebar-find-file
+                        'action-other 'dired-sidebar-find-file-alt
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window))
+
+(provide 'evil-collection-dired-sidebar)
+;;; evil-collection-dired-sidebar.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired-sidebar/evil-collection-dired-sidebar.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired-sidebar/evil-collection-dired-sidebar.elc
new file mode 100644
index 0000000..2d5f572
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired-sidebar/evil-collection-dired-sidebar.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired/README.org
new file mode 100644
index 0000000..4068799
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired/README.org
@@ -0,0 +1,40 @@
+* dired
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Dired.html][Dired]].
+
+** Key bindings
+
+   | Command                        | Original        | Evil            |
+   |--------------------------------+-----------------+-----------------|
+   | =dired-next-line=              | =n=, =SPC=      | =j=, =SPC=      |
+   | =dired-previous-line=          | =p=, =S-SPC=    | =k=, =S-SPC=    |
+   | =dired-find-file=              | =f=, =RET=, =e= | =gf=, =RET=     |
+   | =dired-find-file-other-window= | =o=             | =gO=            |
+   | =dired-view-file=              | =v=             | =go=            |
+   | =revert-buffer=                | =g=             | =gr=            |
+   | =dired-summary=                | =?=, =h=        | =g?=            |
+   | =dired-show-file-type=         | =y=             | =gy=            |
+   | =dired-copy-filename-as-kill=  | =w=             | =Y=             |
+   | =dired-do-kill-lines=          | =k=             | =K=             |
+   | =dired-do-chgrp=               | =G=             | =gG=            |
+   | =dired-hide-subdir=            | =$=             | =g$=            |
+   | =dired-next-dirline=           | =>=             | =gj=, =]]=, =>= |
+   | =dired-prev-dirline=           | =<=             | =gk=, =[[=, =<= |
+   | =dired-up-directory=           | =^=             | =^=, =-=        |
+   | =dired-sort-toggle-or-edit=    | =s=             | =o=             |
+   | =dired-do-redisplay=           | =l=             | =r=             |
+   | =dired-find-alternate-file=    | =a=             | =a=             |
+   | =quit-window=                  | =q=             | =q=             |
+
+   Uppercase operator keys (=A=, =B=, =C=, =D=, =H=, =L=, =M=, =O=, =P=, =Q=,
+   =R=, =S=, =T=, =U=, =W=, =X=, =Z=) and marking/flagging keys (=+=, =&=,
+   =!=, =%=, =*=, =~=, =#=, =.=, ===) keep their default dired bindings.
+
+   On Emacs 30+: =E= → =dired-do-open=.
+
+** Integrations
+
+   - [[https://github.com/Fuco1/dired-hacks][dired-narrow]]: =s= → =dired-narrow-regexp=.
+   - [[https://github.com/Fuco1/dired-hacks][dired-subtree]]: =TAB= toggle, =gh= / =gl= up/down, =M-j= / =M-k= sibling navigation.
+   - [[https://github.com/Fuco1/dired-hacks][dired-filter]]: =*= → =dired-filter-mark-map=, =g/= → =dired-filter-map=.
+   - dired-x: =*(=, =*.=, =*O= for sexp / extension / omitted marking.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired/evil-collection-dired.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired/evil-collection-dired.el
new file mode 100644
index 0000000..a6efa02
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired/evil-collection-dired.el
@@ -0,0 +1,229 @@
+;;; evil-collection-dired.el --- Evil bindings for Dired -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, dired, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Dired.
+
+;;; Code:
+(require 'dired)
+(require 'evil-collection)
+
+(defvar dired-filter-mark-map)
+(defvar dired-filter-map)
+
+(defconst evil-collection-dired-maps '(dired-mode-map
+                                       dired-filter-mark-map
+                                       dired-filter-map))
+
+;;;###autoload
+(defun evil-collection-dired-setup ()
+  "Set up `evil' bindings for `dired'."
+  (evil-collection-bind 'dired-mode-map
+                        'quit 'quit-window
+                        'rename 'dired-do-rename)
+  (evil-collection-define-key 'normal 'dired-mode-map
+    "j" 'dired-next-line
+    "k" 'dired-previous-line
+    [mouse-2] 'dired-mouse-find-file-other-window
+    [follow-link] 'mouse-face
+    ;; Commands to mark or flag certain categories of files
+    "#" 'dired-flag-auto-save-files
+    "." 'dired-clean-directory
+    "~" 'dired-flag-backup-files
+    ;; Upper case keys (except !) for operating on the marked files
+    "A" 'dired-do-find-regexp
+    "C" 'dired-do-copy
+    "B" 'dired-do-byte-compile
+    "D" 'dired-do-delete
+    "gG" 'dired-do-chgrp ;; FIXME: This can probably live on a better binding.
+    "H" 'dired-do-hardlink
+    "L" 'dired-do-load
+    "M" 'dired-do-chmod
+    "O" 'dired-do-chown
+    "P" 'dired-do-print
+    "Q" 'dired-do-find-regexp-and-replace
+    "S" 'dired-do-symlink
+    "T" 'dired-do-touch
+    "X" 'dired-do-shell-command
+    "Z" 'dired-do-compress
+    "c" 'dired-do-compress-to
+    "!" 'dired-do-shell-command
+    "&" 'dired-do-async-shell-command
+    ;; Comparison commands
+    "=" 'dired-diff
+    ;; Tree Dired commands
+    (kbd "M-C-?") 'dired-unmark-all-files
+    (kbd "M-C-d") 'dired-tree-down
+    (kbd "M-C-u") 'dired-tree-up
+    (kbd "M-C-n") 'dired-next-subdir
+    (kbd "M-C-p") 'dired-prev-subdir
+    ;; move to marked files
+    (kbd "M-{") 'dired-prev-marked-file
+    (kbd "M-}") 'dired-next-marked-file
+    ;; Make all regexp commands share a `%' prefix:
+    ;; We used to get to the submap via a symbol dired-regexp-prefix,
+    ;; but that seems to serve little purpose, and copy-keymap
+    ;; does a better job without it.
+    "%" nil
+    "%u" 'dired-upcase
+    "%l" 'dired-downcase
+    "%d" 'dired-flag-files-regexp
+    "%g" 'dired-mark-files-containing-regexp
+    "%m" 'dired-mark-files-regexp
+    "%r" 'dired-do-rename-regexp
+    "%C" 'dired-do-copy-regexp
+    "%H" 'dired-do-hardlink-regexp
+    "%R" 'dired-do-rename-regexp
+    "%S" 'dired-do-symlink-regexp
+    "%&" 'dired-flag-garbage-files
+    ;; mark
+    "*" nil
+    "**" 'dired-mark-executables
+    "*/" 'dired-mark-directories
+    "*@" 'dired-mark-symlinks
+    "*%" 'dired-mark-files-regexp
+    "*c" 'dired-change-marks
+    "*s" 'dired-mark-subdir-files
+    "*m" 'dired-mark
+    "*u" 'dired-unmark
+    "*?" 'dired-unmark-all-files
+    "*!" 'dired-unmark-all-marks
+    (kbd "* <delete>") 'dired-unmark-backward
+    (kbd "* C-n") 'dired-next-marked-file
+    (kbd "* C-p") 'dired-prev-marked-file
+    "*t" 'dired-toggle-marks
+    ;; Lower keys for commands not operating on all the marked files
+    "a" 'dired-find-alternate-file
+    "i" 'dired-toggle-read-only
+    "I" 'dired-maybe-insert-subdir
+    "r" 'dired-do-redisplay
+    "gy" 'dired-show-file-type ;; FIXME: This could probably go on a better key.
+    "Y" 'dired-copy-filename-as-kill
+    "+" 'dired-create-directory
+    ;; sort
+    "o" 'dired-sort-toggle-or-edit
+    ;; moving
+    "<" 'dired-prev-dirline
+    ">" 'dired-next-dirline
+    "^" 'dired-up-directory
+    "-" 'dired-up-directory
+    " " 'dired-next-line
+    [?\S-\ ] 'dired-previous-line
+    [remap next-line] 'dired-next-line
+    [remap previous-line] 'dired-previous-line
+    ;; hiding
+    "g$" 'dired-hide-subdir ;; FIXME: This can probably live on a better binding.
+    (kbd "M-$") 'dired-hide-all
+    "(" 'dired-hide-details-mode
+    ;; isearch
+    (kbd "M-s a C-s")   'dired-do-isearch
+    (kbd "M-s a M-C-s") 'dired-do-isearch-regexp
+    (kbd "M-s f C-s")   'dired-isearch-filenames
+    (kbd "M-s f M-C-s") 'dired-isearch-filenames-regexp
+    ;; misc
+    [remap read-only-mode] 'dired-toggle-read-only
+    ;; `toggle-read-only' is an obsolete alias for `read-only-mode'
+    [remap toggle-read-only] 'dired-toggle-read-only
+    (kbd "<delete>") 'dired-unmark-backward)
+
+  (evil-collection-bind 'dired-mode-map
+                        'mark 'dired-mark
+                        'unmark 'dired-unmark
+                        'unmark-all 'dired-unmark-all-marks
+                        'toggle 'dired-toggle-marks
+                        'toggle-all 'dired-toggle-marks
+                        'mark-delete 'dired-flag-file-deletion
+                        'execute-marks 'dired-do-flagged-delete
+                        'next-item 'dired-next-dirline
+                        'prev-item 'dired-prev-dirline
+                        'next-section 'dired-next-dirline
+                        'prev-section 'dired-prev-dirline
+                        'action 'dired-find-file
+                        'action-other 'dired-find-file-other-window
+                        'action-stay 'dired-view-file
+                        'find-file 'dired-find-file
+                        'describe-mode 'dired-summary
+                        'refresh 'revert-buffer
+                        'jump 'dired-goto-file
+                        'browse-url 'browse-url-of-dired-file)
+
+  (evil-collection-define-key 'normal 'dired-mode-map
+    [remap undo] 'dired-undo
+    [remap advertised-undo] 'dired-undo
+    ;; thumbnail manipulation (image-dired)
+    (kbd "C-t d") 'image-dired-display-thumbs
+    (kbd "C-t t") 'image-dired-tag-files
+    (kbd "C-t r") 'image-dired-delete-tag
+    (kbd "C-t j") 'image-dired-jump-thumbnail-buffer
+    (kbd "C-t i") 'image-dired-dired-display-image
+    (kbd "C-t x") 'image-dired-dired-display-external
+    (kbd "C-t a") 'image-dired-display-thumbs-append
+    (kbd "C-t .") 'image-dired-display-thumb
+    (kbd "C-t c") 'image-dired-dired-comment-files
+    (kbd "C-t f") 'image-dired-mark-tagged-files
+    (kbd "C-t C-t") 'image-dired-dired-toggle-marked-thumbs
+    (kbd "C-t e") 'image-dired-dired-edit-comment-and-tags
+    ;; encryption and decryption (epa-dired)
+    ";d" 'epa-dired-do-decrypt
+    ";v" 'epa-dired-do-verify
+    ";s" 'epa-dired-do-sign
+    ";e" 'epa-dired-do-encrypt)
+
+  (when (>= emacs-major-version 30)
+    (evil-collection-define-key 'normal 'dired-mode-map
+      "E" 'dired-do-open))
+
+  ;; dired-x commands
+  (with-eval-after-load 'dired-x
+    (evil-collection-define-key 'normal 'dired-mode-map
+      "*(" 'dired-mark-sexp
+      "*." 'dired-mark-extension
+      "*O" 'dired-mark-omitted))
+
+  ;; dired-do-kill-lines hides matching rows from view; when dired-narrow
+  ;; is loaded, its richer regex narrowing takes over `s' below.
+  (evil-collection-bind 'dired-mode-map 'search-or-filter 'dired-do-kill-lines)
+
+  ;; dired-narrow commands
+  (with-eval-after-load 'dired-narrow
+    (evil-collection-bind 'dired-mode-map 'search-or-filter 'dired-narrow-regexp))
+
+  ;; dired-subtree commands
+  (with-eval-after-load 'dired-subtree
+    (evil-collection-define-key 'normal 'dired-mode-map
+      "gh" 'dired-subtree-up
+      "gl" 'dired-subtree-down
+      (kbd "M-j") 'dired-subtree-next-sibling
+      (kbd "M-k") 'dired-subtree-previous-sibling)
+    (evil-collection-bind 'dired-mode-map
+                          'section-toggle 'dired-subtree-toggle))
+
+  (with-eval-after-load 'dired-filter
+    (evil-collection-define-key 'normal 'dired-mode-map
+      "*"  dired-filter-mark-map
+      "g/" dired-filter-map)))
+
+(provide 'evil-collection-dired)
+;;; evil-collection-dired.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired/evil-collection-dired.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired/evil-collection-dired.elc
new file mode 100644
index 0000000..5b8a6db
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/dired/evil-collection-dired.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/disk-usage/evil-collection-disk-usage.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/disk-usage/evil-collection-disk-usage.el
new file mode 100644
index 0000000..8d8cea8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/disk-usage/evil-collection-disk-usage.el
@@ -0,0 +1,88 @@
+;;; evil-collection-disk-usage.el --- Evil bindings for disk-usage.el -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 Pierre Neidhardt
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, files, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `disk-usage-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'disk-usage nil t)
+
+(defconst evil-collection-disk-usage-maps '(disk-usage-mode-map
+                                            disk-usage-by-types-mode-map))
+
+;;;###autoload
+(defun evil-collection-disk-usage-setup ()
+  "Set up `evil' bindings for `disk-usage'."
+  (evil-collection-set-readonly-bindings 'disk-usage-mode-map)
+  (evil-collection-bind 'disk-usage-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button)
+  (evil-collection-define-key 'normal 'disk-usage-mode-map
+    "S" 'tabulated-list-sort
+    "^" 'disk-usage-up
+
+    "zh" 'disk-usage-toggle-human-readable
+    "zf" 'disk-usage-toggle-full-path
+    "zr" 'disk-usage-toggle-recursive
+
+    (kbd "ze") 'disk-usage-eshell-at-point
+    (kbd "zs") 'disk-usage-shell-at-point
+    (kbd "d") 'disk-usage-dired-at-point
+
+    "m" 'disk-usage-mark
+    "u" 'disk-usage-unmark
+    "x" 'disk-usage-delete-marked-files
+
+    "a" 'disk-usage-add-filters
+    "A" 'disk-usage-remove-filters)
+
+  (evil-collection-bind 'disk-usage-mode-map
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command)
+
+  (evil-collection-set-readonly-bindings 'disk-usage-by-types-mode-map)
+  (evil-collection-bind 'disk-usage-by-types-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button)
+  (evil-collection-define-key 'normal 'disk-usage-by-types-mode-map
+    "S" 'tabulated-list-sort
+
+    "zh" 'disk-usage-toggle-human-readable
+
+    "a" 'disk-usage-add-filters
+    "A" 'disk-usage-remove-filters)
+
+  (evil-collection-bind 'disk-usage-by-types-mode-map
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'action 'disk-usage-files)
+  (evil-collection-bind 'disk-usage-mode-map 'describe-mode          'describe-mode)
+  (evil-collection-bind 'disk-usage-by-types-mode-map 'describe-mode 'describe-mode)
+  (evil-collection-bind 'disk-usage-mode-map       'refresh          'revert-buffer)
+  (evil-collection-bind 'disk-usage-by-types-mode-map       'refresh 'revert-buffer))
+
+(provide 'evil-collection-disk-usage)
+;;; evil-collection-disk-usage.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/disk-usage/evil-collection-disk-usage.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/disk-usage/evil-collection-disk-usage.elc
new file mode 100644
index 0000000..9ba50bd
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/disk-usage/evil-collection-disk-usage.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/distel/evil-collection-distel.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/distel/evil-collection-distel.el
new file mode 100644
index 0000000..d9129d6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/distel/evil-collection-distel.el
@@ -0,0 +1,81 @@
+;;; evil-collection-distel.el --- Bindings for `distel' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, elisp, lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `distel'.
+
+;;; Code:
+(require 'distel nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-distel-maps '(erlang-extended-mode-map
+                                        edb-attach-mode-map
+                                        edb-monitor-mode-map
+                                        edb-variables-mode-map))
+
+;;;###autoload
+(defun evil-collection-distel-setup ()
+  "Set up `evil' bindings for `distel'."
+  (evil-collection-bind 'erlang-extended-mode-map
+                        'find-definition 'erl-find-source-under-point
+                        'pop-definition 'erl-find-source-unwind
+                        'lookup-doc 'erl-find-doc-under-point
+                        'goto-repl 'erl-ie-show-session)
+
+  (when evil-collection-setup-debugger-keys
+    (evil-collection-define-key 'normal 'erlang-extended-mode-map
+      [f5] 'edb-toggle-interpret
+      [f9] 'edb-toggle-breakpoint
+      ;; ("\C-c\C-ds" edb-synch-breakpoints)
+      ;; ("\C-c\C-dS" edb-save-dbg-state)
+      ;; ("\C-c\C-dR" edb-restore-dbg-state)
+      ;; ("\C-c\C-dm" edb-monitor)
+      )
+
+    (evil-collection-bind 'edb-monitor-mode-map
+                          'action 'edb-attach-command
+                          'quit 'erl-bury-viewer)
+
+    (evil-collection-bind 'edb-variables-mode-map 'action 'edb-show-variable)
+
+    (evil-collection-define-key 'normal 'edb-attach-mode-map
+      "H" 'edb-attach-finish)
+    (evil-collection-bind 'edb-attach-mode-map
+                          'quit 'erl-quit-viewer
+                          'describe-mode 'edb-attach-help))
+
+  (evil-collection-bind 'edb-attach-mode-map
+                        'debug-continue 'edb-attach-continue
+                        'debug-step-over 'edb-attach-next
+                        'debug-step-into 'edb-attach-step
+                        'debug-breakpoint 'edb-toggle-breakpoint
+                        'debug-frame-up 'edb-attach-up
+                        'debug-frame-down 'edb-attach-down)
+
+  (evil-collection-bind 'erlang-extended-mode-map 'find-usages 'erl-who-calls)
+
+  (add-hook 'erlang-extended-mode-hook #'evil-normalize-keymaps))
+
+(provide 'evil-collection-distel)
+;;; evil-collection-distel.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/distel/evil-collection-distel.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/distel/evil-collection-distel.elc
new file mode 100644
index 0000000..3c2694f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/distel/evil-collection-distel.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/doc-view/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/doc-view/README.org
new file mode 100644
index 0000000..ea0af7c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/doc-view/README.org
@@ -0,0 +1,42 @@
+* doc-view
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Document-View.html][doc-view]] (PDF / PS / DVI viewer).
+
+  =doc-view-mode= starts in normal state.
+
+** Key bindings
+
+   | Command                                   | Original       | Evil                                |
+   |-------------------------------------------+----------------+-------------------------------------|
+   | =doc-view-next-line-or-next-page=         | =C-n=, =down=  | =j= (remap)                         |
+   | =doc-view-previous-line-or-previous-page= | =C-p=, =up=    | =k= (remap)                         |
+   | =image-forward-hscroll=                   | n/a            | =l= (remap)                         |
+   | =image-backward-hscroll=                  | n/a            | =h= (remap)                         |
+   | =doc-view-next-page=                      | =n=            | =gj=, =C-j=, =n=                    |
+   | =doc-view-previous-page=                  | =p=            | =gk=, =C-k=, =p=                    |
+   | =doc-view-first-page=                     | =M-<=          | =gg=                                |
+   | =doc-view-last-page=                      | =M->=          | =G=                                 |
+   | =doc-view-goto-page=                      | =M-g M-g=      | =J=                                 |
+   | =doc-view-scroll-up-or-next-page=         | =SPC=          | =SPC=                               |
+   | =doc-view-scroll-down-or-previous-page=   | =DEL=, =S-SPC= | =DEL=, =S-SPC=                      |
+   | =forward-page=                            | =next=         | =C-d=                               |
+   | =backward-page=                           | =prior=        | =C-u= (when =evil-want-C-u-scroll=) |
+   | =image-next-line=                         | =RET=          | =RET=                               |
+   | =doc-view-enlarge=                        | =+=, ===       | =+=, ===                            |
+   | =doc-view-shrink=                         | =-=            | =-=                                 |
+   | =doc-view-scale-reset=                    | =0=            | =0=                                 |
+   | =doc-view-fit-width-to-window=            | =W=            | =W=                                 |
+   | =doc-view-fit-height-to-window=           | =H=            | =H=                                 |
+   | =doc-view-fit-page-to-window=             | =P=            | =P=                                 |
+   | =doc-view-kill-proc=                      | =K=            | =X=                                 |
+   | =doc-view-set-slice=                      | =c s=          | =s s=                               |
+   | =doc-view-set-slice-using-mouse=          | =c m=          | =s m=                               |
+   | =doc-view-set-slice-from-bounding-box=    | =c b=          | =s b=                               |
+   | =doc-view-reset-slice=                    | =c r=          | =s r=                               |
+   | =doc-view-search=                         | =C-s=, =find=  | =/=                                 |
+   | =doc-view-search-backward=                | =C-r=          | =?=                                 |
+   | =doc-view-show-tooltip=                   | =C-t=          | =C-t=                               |
+   | =doc-view-toggle-display=                 | =C-c C-c=      | =C-c C-c=                           |
+   | =doc-view-open-text=                      | =C-c C-t=      | =C-c C-t=                           |
+   | =doc-view-revert-buffer=                  | n/a            | =gr=                                |
+   | =quit-window=                             | n/a            | =q=                                 |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/doc-view/evil-collection-doc-view.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/doc-view/evil-collection-doc-view.el
new file mode 100644
index 0000000..547df62
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/doc-view/evil-collection-doc-view.el
@@ -0,0 +1,86 @@
+;;; evil-collection-doc-view.el --- Evil bindings for docview -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, bindings, files, pdf, ps, dvi
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Evil bindings for doc-view.
+
+;;; Code:
+(require 'evil-collection)
+(require 'doc-view)
+
+(defconst evil-collection-doc-view-maps '(doc-view-mode-map))
+
+;;;###autoload
+(defun evil-collection-doc-view-setup ()
+  "Set up `evil' bindings for `doc-view'."
+  (evil-set-initial-state 'doc-view-mode 'normal)
+  (evil-collection-bind 'doc-view-mode-map
+                        'quit 'quit-window
+                        'next-item 'doc-view-next-page
+                        'prev-item 'doc-view-previous-page
+                        'next-section 'doc-view-next-page
+                        'prev-section 'doc-view-previous-page)
+  (evil-collection-define-key 'normal 'doc-view-mode-map
+    [remap evil-next-line] 'doc-view-next-line-or-next-page
+    [remap evil-previous-line] 'doc-view-previous-line-or-previous-page
+    [remap evil-backward-char] 'image-backward-hscroll
+    [remap evil-forward-char] 'image-forward-hscroll
+    (kbd "C-d") 'forward-page
+    (kbd "DEL") 'doc-view-scroll-down-or-previous-page
+    "gg" 'doc-view-first-page
+    "G" 'doc-view-last-page
+
+    "W" 'doc-view-fit-width-to-window ; Like evil-image.
+    "H" 'doc-view-fit-height-to-window ; Like evil-image.
+    "P" 'doc-view-fit-page-to-window
+    "X" 'doc-view-kill-proc
+
+    (kbd "s s") 'doc-view-set-slice
+    (kbd "s m") 'doc-view-set-slice-using-mouse
+    (kbd "s b") 'doc-view-set-slice-from-bounding-box
+    (kbd "s r") 'doc-view-reset-slice
+
+    (kbd "/") 'doc-view-search
+    (kbd "?") 'doc-view-search-backward
+    (kbd "C-t") 'doc-view-show-tooltip
+    (kbd "C-c C-c") 'doc-view-toggle-display
+    (kbd "C-c C-t") 'doc-view-open-text)
+  (evil-collection-bind 'doc-view-mode-map
+                        'scroll-down 'doc-view-scroll-up-or-next-page
+                        'scroll-up 'doc-view-scroll-down-or-previous-page
+                        'action 'image-next-line
+                        'refresh 'doc-view-revert-buffer
+                        'zoom-in    'doc-view-enlarge
+                        'zoom-out   'doc-view-shrink
+                        'zoom-reset 'doc-view-scale-reset
+                        'jump 'doc-view-goto-page)
+
+  ;; TODO: What if the user changes `evil-want-C-u-scroll' after this is run?
+  (when evil-want-C-u-scroll
+    (evil-collection-define-key 'normal 'doc-view-mode-map
+      (kbd "C-u") 'backward-page)))
+
+(provide 'evil-collection-doc-view)
+;;; evil-collection-doc-view.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/doc-view/evil-collection-doc-view.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/doc-view/evil-collection-doc-view.elc
new file mode 100644
index 0000000..446cfd8
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/doc-view/evil-collection-doc-view.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/docker/evil-collection-docker.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/docker/evil-collection-docker.el
new file mode 100644
index 0000000..cec750a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/docker/evil-collection-docker.el
@@ -0,0 +1,90 @@
+;;; evil-collection-docker.el --- Evil bindings for docker.el -*- lexical-binding: t -*-
+
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, docker, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for docker.el
+
+;;; Code:
+(require 'docker nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-docker-maps '(docker-container-mode-map
+					docker-context-mode-map
+                                        docker-image-mode-map
+                                        docker-machine-mode-map
+                                        docker-network-mode-map
+                                        docker-volume-mode-map))
+
+(defun evil-collection-docker-setup ()
+  "Set up `evil' bindings for `docker'."
+  (evil-collection-bind 'docker-container-mode-map 'rename 'docker-container-rename-selection)
+  (evil-collection-define-key 'normal 'docker-container-mode-map
+    ";"  'docker-container-ls
+    "?"  'docker-container-help
+    "C"  'docker-container-cp
+    "D"  'docker-container-diff
+    "I"  'docker-container-inspect
+    "L"  'docker-container-logs
+    "O"  'docker-container-stop
+    "P"  'docker-container-pause
+    "S"  'docker-container-start
+    "a"  'docker-container-attach
+    "b"  'docker-container-shells
+    "f"  'docker-container-open
+    "r"  'docker-container-restart)
+  (evil-collection-bind 'docker-container-mode-map
+                        'delete 'docker-container-rm
+                        'delete-2 'docker-container-kill)
+
+  (evil-collection-define-key 'normal 'docker-context-mode-map
+    "?"  'docker-context-help
+    "I"  'docker-context-inspect
+    "X"  'docker-context-use)
+  (evil-collection-bind 'docker-context-mode-map 'delete 'docker-context-rm)
+
+  (evil-collection-define-key 'normal 'docker-image-mode-map
+    ";"  'docker-image-ls
+    "?"  'docker-image-help
+    "D"  'docker-image-mark-dangling
+    "F"  'docker-image-pull
+    "I"  'docker-image-inspect
+    "P"  'docker-image-push
+    "R"  'docker-image-run
+    "T"  'docker-image-tag-selection)
+  (evil-collection-bind 'docker-image-mode-map 'delete 'docker-image-rm)
+
+  (evil-collection-define-key 'normal 'docker-network-mode-map
+    ";"  'docker-network-ls
+    "?"  'docker-network-help
+    "D"  'docker-network-mark-dangling
+    "I"  'docker-network-inspect)
+  (evil-collection-bind 'docker-network-mode-map 'delete 'docker-network-rm)
+
+  (evil-collection-define-key 'normal 'docker-volume-mode-map
+    ";"  'docker-volume-ls
+    "?"  'docker-volume-help
+    "D"  'docker-volume-mark-dangling
+    "I"  'docker-volume-inspect
+    "f"  'docker-volume-dired-selection)
+  (evil-collection-bind 'docker-volume-mode-map 'delete 'docker-volume-rm))
+
+(provide 'evil-collection-docker)
+
+;;; evil-collection-docker.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/docker/evil-collection-docker.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/docker/evil-collection-docker.elc
new file mode 100644
index 0000000..08a07e6
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/docker/evil-collection-docker.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eat/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eat/README.org
new file mode 100644
index 0000000..b8fdfae
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eat/README.org
@@ -0,0 +1,37 @@
+* eat
+
+  Evil bindings for [[https://codeberg.org/akib/emacs-eat][eat]], the Emulate A Terminal package.
+
+  Initial state for =eat-mode= is =insert=. The same =C-*= keys that vterm
+  forwards raw to the terminal are bound to =eat-self-input= here so that
+  shells and TUIs receive them instead of evil-insert-state.
+
+** Key bindings
+
+*** eat-mode-map
+
+    | Command                                  | Original | Evil      |
+    |------------------------------------------+----------+-----------|
+    | =evil-collection-eat-toggle-send-escape= | n/a      | =C-c C-z= |
+
+    The following keys are forwarded raw to the terminal via =eat-self-input=
+    in insert state: =C-a=, =C-b=, =C-d=, =C-e=, =C-f=, =C-k=, =C-l=, =C-n=,
+    =C-o=, =C-p=, =C-q=, =C-r=, =C-s=, =C-t=, =C-u=, =C-v=, =C-w=, =C-y=,
+    =C-z=, =<delete>=. =C-c= (prefix) and =C-h= (help) are not forwarded.
+
+*** eat-line-mode-map
+
+    =RET=, =C-m= and =[return]= send input to the terminal in the state
+    named by =evil-collection-repl-submit-state=, and insert a newline in
+    the opposite state.
+
+    | Command               | Original | State                               |
+    |-----------------------+----------+-------------------------------------|
+    | =eat-line-send-input= | =RET=    | =evil-collection-repl-submit-state= |
+    | =newline=             | n/a      | opposite of submit state            |
+
+** New commands
+
+   | Command                                  | Purpose                                           |
+   |------------------------------------------+---------------------------------------------------|
+   | =evil-collection-eat-toggle-send-escape= | Toggle whether =ESC= goes to eat or back to evil. |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eat/evil-collection-eat.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eat/evil-collection-eat.el
new file mode 100644
index 0000000..2ed1d4f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eat/evil-collection-eat.el
@@ -0,0 +1,119 @@
+;;; evil-collection-eat.el --- Bindings for `eat' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2024 James Cherti
+
+;; Maintainer: James Cherti <https://www.jamescherti.com/contact/>
+;; Author: James Cherti <https://www.jamescherti.com/contact/>
+;; Based on evil-collection-vterm.el by James Nguyen and Pierre Neidhardt
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, eat, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; This package provides `evil-mode' keybindings for `eat'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'eat nil t)
+
+(defconst evil-collection-eat-maps '(eat-mode-map
+                                     eat-line-mode-map
+                                     eat-semi-char-mode-map
+                                     eat-char-mode-map
+                                     eat-eshell-semi-char-mode-map
+                                     eat-eshell-char-mode-map))
+
+;; The map symbols below are only referenced inside quoted lists in this
+;; file, so the byte-compiler does not actually require these declarations.
+;; Defining them keeps certain linters happy.
+(defvar eat-line-mode-map)
+(defvar eat-semi-char-mode-map)
+(defvar eat-char-mode-map)
+(defvar eat-eshell-semi-char-mode-map)
+(defvar eat-eshell-char-mode-map)
+
+(defvar-local evil-collection-eat-send-escape-to-eat-p nil
+  "Track whether or not we send ESC to `eat' or `emacs'.")
+
+(defun evil-collection-eat-toggle-send-escape ()
+  "Toggle the destination of the ESC key between `eat' and `emacs'.
+This adjustment is necessary for programs that utilize ESC, such as Vim or an
+SSH-accessed Emacs that also uses `evil-mode'."
+  (interactive)
+  (if evil-collection-eat-send-escape-to-eat-p
+      (evil-collection-define-key 'insert 'eat-mode-map (kbd "<escape>")
+        (lookup-key evil-insert-state-map (kbd "<escape>")))
+    (evil-collection-define-key 'insert 'eat-mode-map
+      (kbd "<escape>") 'eat-self-input))
+  (setq evil-collection-eat-send-escape-to-eat-p
+        (not evil-collection-eat-send-escape-to-eat-p))
+  (message (format "Sending ESC to %s."
+                   (if evil-collection-eat-send-escape-to-eat-p
+                       "eat"
+                     "emacs"))))
+
+;;;###autoload
+(defun evil-collection-eat-setup ()
+  "Set up `evil' bindings for `eat'."
+  (evil-set-initial-state 'eat-mode 'insert)
+
+  (evil-collection-bind 'eat-line-mode-map
+                        'repl-submit 'eat-line-send-input
+                        'repl-newline #'newline
+                        'repl-force-newline #'newline)
+
+  (evil-collection-bind 'eat-mode-map
+                              'term-toggle-escape
+                              'evil-collection-eat-toggle-send-escape)
+
+  ;; `Evil' has some "C-" bindings in insert state that shadow the `eat' terminal
+  ;; bindings. Do not send "C-c" (prefix key) nor "C-h" (help prefix) as raw input.
+  (evil-collection-define-key 'insert 'eat-mode-map
+    (kbd "C-a") 'eat-self-input
+    (kbd "C-b") 'eat-self-input
+    (kbd "C-d") 'eat-self-input
+    (kbd "C-e") 'eat-self-input
+    (kbd "C-f") 'eat-self-input
+    (kbd "C-k") 'eat-self-input
+    (kbd "C-l") 'eat-self-input
+    (kbd "C-n") 'eat-self-input
+    (kbd "C-o") 'eat-self-input
+    (kbd "C-p") 'eat-self-input
+    (kbd "C-q") 'eat-self-input
+    (kbd "C-r") 'eat-self-input
+    (kbd "C-s") 'eat-self-input
+    (kbd "C-t") 'eat-self-input
+    (kbd "C-u") 'eat-self-input
+    (kbd "C-v") 'eat-self-input
+    (kbd "C-w") 'eat-self-input
+    (kbd "C-y") 'eat-self-input
+    (kbd "C-z") 'eat-self-input
+    (kbd "<delete>") 'eat-self-input)
+
+  ;; Paste bindings: in a terminal, "paste before/after" is meaningless because
+  ;; the cursor position is controlled by the running program. Bind both `p'
+  ;; and `P' to `eat-yank' so the kill-ring is sent as terminal input.
+  (dolist (map '(eat-semi-char-mode-map
+                 eat-char-mode-map
+                 eat-eshell-semi-char-mode-map
+                 eat-eshell-char-mode-map))
+    (evil-collection-define-key 'normal map
+      (kbd "p") 'eat-yank
+      (kbd "P") 'eat-yank)))
+
+(provide 'evil-collection-eat)
+;;; evil-collection-eat.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eat/evil-collection-eat.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eat/evil-collection-eat.elc
new file mode 100644
index 0000000..3ead785
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eat/evil-collection-eat.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebib/evil-collection-ebib.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebib/evil-collection-ebib.el
new file mode 100644
index 0000000..b754601
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebib/evil-collection-ebib.el
@@ -0,0 +1,79 @@
+;;; evil-collection-ebib.el --- Evil bindings for ebib -*- lexical-binding: t -*-
+
+;; Author: Justin Burkett 
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, ebib, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for the ebib.
+
+;;; Code:
+(require 'evil-collection)
+(require 'ebib nil t)
+
+(defconst evil-collection-ebib-maps '(ebib-index-mode-map
+                                      ebib-entry-mode-map))
+
+(defvar ebib-index-mode-map)
+(defvar ebib-entry-mode-map)
+
+;;;###autoload
+(defun evil-collection-ebib-setup ()
+  "Set up `evil' bindings for `ebib'."
+  (evil-set-initial-state 'ebib-index-mode 'normal)
+  (evil-make-overriding-map ebib-index-mode-map 'normal)
+  (evil-collection-inhibit-insert-state 'ebib-index-mode-map)
+  (evil-collection-define-key 'normal 'ebib-index-mode-map
+    "D" 'ebib-delete-entry
+    "gg" 'ebib-goto-first-entry
+    "G" 'ebib-goto-last-entry
+    "j" 'ebib-next-entry
+    "k" 'ebib-prev-entry
+    "n" 'ebib-search-next
+    "p" 'ebib-yank-entry
+    (kbd "C-u") 'ebib-index-scroll-down
+    (kbd "C-d") 'ebib-index-scroll-up
+    (kbd "C-b") 'ebib-index-scroll-down
+    (kbd "C-f") 'ebib-index-scroll-up)
+  (evil-collection-bind 'ebib-index-mode-map
+                        'quit-save 'ebib-lower
+                        'quit-cancel 'ebib-quit
+                        'jump 'ebib-jump-to-entry)
+  (evil-set-initial-state 'ebib-entry-mode 'normal)
+  (evil-make-overriding-map ebib-entry-mode-map 'normal)
+  (evil-collection-inhibit-insert-state 'ebib-entry-mode-map)
+  (evil-collection-define-key 'normal 'ebib-entry-mode-map
+    "d" 'ebib-kill-field-contents
+    "D" 'ebib-delete-field-contents
+    "gg" 'ebib-goto-first-field
+    "G" 'ebib-goto-last-field
+    "j" 'ebib-next-field
+    "k" 'ebib-prev-field
+    "p" 'ebib-yank-field-contents
+    "y" 'ebib-copy-current-field-contents)
+  (evil-collection-bind 'ebib-entry-mode-map
+                        'next-item 'ebib-goto-next-set
+                        'prev-item 'ebib-goto-prev-set
+                        'next-section 'ebib-goto-next-set
+                        'prev-section 'ebib-goto-prev-set
+                        'quit-save 'ebib-quit-entry-buffer
+                        'quit-cancel 'ebib-quit-entry-buffer)
+  (evil-collection-bind 'ebib-index-mode-map       'delete 'ebib-kill-entry))
+
+(provide 'evil-collection-ebib)
+;;; evil-collection-ebib.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebib/evil-collection-ebib.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebib/evil-collection-ebib.elc
new file mode 100644
index 0000000..6152b70
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebib/evil-collection-ebib.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebuku/evil-collection-ebuku.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebuku/evil-collection-ebuku.el
new file mode 100644
index 0000000..a681169
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebuku/evil-collection-ebuku.el
@@ -0,0 +1,67 @@
+;;; evil-collection-ebuku.el --- Evil bindings for Ebuku -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020-2022 Alexis
+
+;; Author: Alexis <flexibeast@gmail.com>
+;; Maintainer: Alexis <flexibeast@gmail.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, ebuku, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Evil bindings for Ebuku.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'ebuku nil t)
+
+(defconst evil-collection-ebuku-maps nil)
+
+
+;;;###autoload
+(defun evil-collection-ebuku-setup ()
+  "Set up `evil' bindings for `Ebuku'."
+  (evil-collection-bind 'ebuku-mode-map
+                        'edit 'ebuku-edit-bookmark
+                        'quit 'quit-window
+                        'refresh 'ebuku-refresh
+                        'next-section 'ebuku-next-bookmark
+                        'prev-section 'ebuku-previous-bookmark)
+  (evil-collection-define-key 'normal 'ebuku-mode-map
+                              "a" 'ebuku-add-bookmark
+                              "j" 'ebuku-next-bookmark
+                              "k" 'ebuku-previous-bookmark
+                              "r" 'ebuku-search-on-recent
+                              "*" 'ebuku-show-all
+                              "-" 'ebuku-toggle-results-limit
+                              "C" 'ebuku-copy-url
+                              "T" 'ebuku-copy-title
+                              "I" 'ebuku-copy-index
+                              [mouse-1] 'ebuku-open-url
+                              [mouse-2] 'ebuku-open-url)
+  (evil-collection-bind 'ebuku-mode-map
+                        'action 'ebuku-open-url
+                        'delete 'ebuku-delete-bookmark
+                        'delete-2 'ebuku-delete-bookmark
+                        'search-or-filter 'ebuku-search
+                        'toggle 'ebuku-toggle-results-limit))
+
+
+(provide 'evil-collection-ebuku)
+;;; evil-collection-ebuku.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebuku/evil-collection-ebuku.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebuku/evil-collection-ebuku.elc
new file mode 100644
index 0000000..57cdb96
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ebuku/evil-collection-ebuku.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eca/evil-collection-eca.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eca/evil-collection-eca.el
new file mode 100644
index 0000000..0b9bdc0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eca/evil-collection-eca.el
@@ -0,0 +1,47 @@
+;;; evil-collection-eca.el --- Bindings for eca -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, eca, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for eca.
+
+;;; Code:
+(require 'evil-collection)
+(require 'eca nil t)
+
+(defconst evil-collection-eca-maps '(eca-chat-mode-map))
+
+(defvar eca-chat-mode-map)
+
+;;;###autoload
+(defun evil-collection-eca-setup ()
+  "Set up `evil' bindings for `eca'."
+  (add-hook 'eca-chat-mode-hook #'evil-normalize-keymaps)
+
+  (evil-collection-bind 'eca-chat-mode-map
+                        'repl-submit 'eca-chat--key-pressed-return
+                        'repl-newline 'eca-chat--key-pressed-newline
+                        'repl-force-newline 'eca-chat--key-pressed-newline))
+
+(provide 'evil-collection-eca)
+;;; evil-collection-eca.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eca/evil-collection-eca.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eca/evil-collection-eca.elc
new file mode 100644
index 0000000..157fbbe
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eca/evil-collection-eca.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edbi/evil-collection-edbi.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edbi/evil-collection-edbi.el
new file mode 100644
index 0000000..2b9cbe4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edbi/evil-collection-edbi.el
@@ -0,0 +1,104 @@
+;;; evil-collection-edbi.el --- Evil bindings for EDBI -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 Pierre Neidhardt <mail@ambrevar.xyz>
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, database, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for EDBI.
+
+;;; Code:
+(require 'evil-collection)
+(require 'edbi nil t)
+
+(defvar ctbl:table-mode-map)
+(defvar edbi:dbview-keymap)
+(declare-function ctbl:define-keymap "ctable")
+(declare-function epc:add-keymap "epc")
+
+(defconst evil-collection-edbi-maps '(edbi:dbview-query-result-keymap
+                                      edbi:sql-mode-map))
+
+(defun evil-collection-edbi-dbview-setup ()
+  "The `ctbl:table-mode-map' and `edbi:dbview-keymap' are stored
+as local maps and are not bound to any mode.  As such, the only
+way to add Evil bindings to the dbview is to overwrite the
+default bindings."
+  (setq ctbl:table-mode-map
+        (ctbl:define-keymap
+         '(
+           ("k" . ctbl:navi-move-up)
+           ("j" . ctbl:navi-move-down)
+           ("h" . ctbl:navi-move-left)
+           ("l" . ctbl:navi-move-right)
+
+           ("gc" . ctbl:navi-jump-to-column)
+
+           ("$" . ctbl:navi-move-right-most)
+           ("0" . ctbl:navi-move-left-most)
+
+           ("gr" . ctbl:action-update-buffer)
+
+           ("g?" . ctbl:describe-bindings)
+
+           ([mouse-1] . ctbl:navi-on-click)
+           ("C-m" . ctbl:navi-on-click)
+           ("RET" . ctbl:navi-on-click))))
+
+  (setq edbi:dbview-keymap
+        (epc:add-keymap
+         ctbl:table-mode-map
+         '(("gr" . edbi:dbview-update-command)
+           ("SPC" . edbi:dbview-show-tabledef-command)
+           ("c" . edbi:dbview-query-editor-command)
+           ("C" . edbi:dbview-query-editor-new-command)
+           ("C-m" . edbi:dbview-show-table-data-command)
+           ("q" . edbi:dbview-quit-command)))))
+
+;;;###autoload
+(defun evil-collection-edbi-setup ()
+  "Set up `evil' bindings for EDBI."
+  (evil-collection-edbi-dbview-setup)
+  (evil-collection-define-key 'normal 'edbi:dbview-query-result-keymap
+    "0" 'ctbl:navi-move-left-most
+    "$" 'ctbl:navi-move-right-most
+
+    "h" 'ctbl:navi-move-left
+    "j" 'ctbl:navi-move-down
+    "k" 'ctbl:navi-move-up
+    "l" 'ctbl:navi-move-right
+
+    "gc" 'ctbl:navi-jump-to-column)
+  (evil-collection-bind 'edbi:dbview-query-result-keymap
+                        'quit 'edbi:dbview-query-result-quit-command
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit
+                        'describe-mode 'ctbl:describe-bindings
+                        'refresh 'ctbl:action-update-buffer)
+
+  (evil-collection-bind 'edbi:sql-mode-map
+                        'history-previous 'edbi:dbview-query-editor-history-back-command
+                        'history-next     'edbi:dbview-query-editor-history-forward-command
+                        'quit 'edbi:dbview-query-editor-quit-command))
+
+(provide 'evil-collection-edbi)
+;;; evil-collection-edbi.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edbi/evil-collection-edbi.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edbi/evil-collection-edbi.elc
new file mode 100644
index 0000000..d9277ff
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edbi/evil-collection-edbi.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edebug/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edebug/README.org
new file mode 100644
index 0000000..aba73a1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edebug/README.org
@@ -0,0 +1,53 @@
+* edebug
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/elisp/Edebug.html][Edebug]].
+
+** Key bindings
+
+   Bindings live in =edebug-mode-map=. Edebug overlays the source while a form
+   is instrumented; evil-collection sets the initial state to normal and frees
+   =g=, =G=, and =h= as prefixes.
+
+   | Command                             | Original  | Evil            |
+   |-------------------------------------+-----------+-----------------|
+   | =edebug-step-mode=                  | =SPC=     | =s=, =C-c C-s=  |
+   | =edebug-next-mode=                  | =n=       | =n=, =C-c C-n=  |
+   | =edebug-go-mode=                    | =g=       | =go=, =C-c C-c= |
+   | =edebug-Go-nonstop-mode=            | =G=       | =gO=            |
+   | =edebug-trace-mode=                 | =t=       | =t=             |
+   | =edebug-Trace-fast-mode=            | =T=       | =T=             |
+   | =edebug-continue-mode=              | =c=       | =c=             |
+   | =edebug-Continue-fast-mode=         | =C=       | =C=             |
+   | =edebug-forward-sexp=               | =f=       | =f=             |
+   | =edebug-step-in=                    | =i=       | =i=             |
+   | =edebug-step-out=                   | =o=       | =o=             |
+   | =edebug-goto-here=                  | =h=       | =H=             |
+   | =edebug-instrument-callee=          | =I=       | =I=             |
+   | =edebug-stop=                       | =S=       | =S=             |
+   | =top-level=                         | =q=       | =q=             |
+   | =edebug-top-level-nonstop=          | =Q=       | =Q=             |
+   | =abort-recursive-edit=              | =a=       | =a=             |
+   | =edebug-set-breakpoint=             | =b=       | =b=, =C-x SPC=  |
+   | =edebug-unset-breakpoint=           | =u=       | =u=, =C-c C-d=  |
+   | =edebug-next-breakpoint=            | =B=       | =B=             |
+   | =edebug-set-conditional-breakpoint= | =x=       | =x=             |
+   | =edebug-set-global-break-condition= | =X=       | =X=             |
+   | =edebug-previous-result=            | =r=       | =r=             |
+   | =edebug-eval-expression=            | =e=       | =e=             |
+   | =edebug-eval-last-sexp=             | =C-x C-e= | =C-x C-e=       |
+   | =edebug-visit-eval-list=            | =E=       | =EL=            |
+   | =edebug-where=                      | =w=       | =WW=, =C-c C-l= |
+   | =edebug-bounce-point=               | =p=       | =p=             |
+   | =edebug-view-outside=               | =v=, =P=  | =P=             |
+   | =edebug-toggle-save-windows=        | =W=       | =WS=            |
+   | =edebug-help=                       | =?=       | =g?=            |
+   | =edebug-backtrace=                  | =d=       | =d=             |
+   | =edebug-temp-display-freq-count=    | ===       | ===             |
+   | =negative-argument=                 | =-=       | =-=             |
+
+** Integrations
+
+   - edebug-x: in =edebug-x-instrumented-function-list-mode-map=, =RET= jumps to
+     the function, =E= evaluates, =Q= clears data, =q= quits. In
+     =edebug-x-breakpoint-list-mode-map=, =RET= visits the breakpoint, =x= kills
+     it, =Q= clears data, =q= quits.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edebug/evil-collection-edebug.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edebug/evil-collection-edebug.el
new file mode 100644
index 0000000..52b26e9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edebug/evil-collection-edebug.el
@@ -0,0 +1,130 @@
+;;; evil-collection-edebug.el --- Evil bindings for Edebug -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, edebug, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `edebug-mode'.
+
+;;; Code:
+(require 'edebug)
+(require 'evil-collection)
+
+(defconst evil-collection-edebug-maps
+  '(edebug-mode-map
+    edebug-x-instrumented-function-list-mode-map
+    edebug-x-breakpoint-list-mode-map))
+
+;;;###autoload
+(defun evil-collection-edebug-setup ()
+  "Set up `evil' bindings for `edebug'."
+  (evil-set-initial-state 'edebug-mode 'normal)
+
+  (add-hook 'edebug-mode-hook #'evil-normalize-keymaps)
+
+  (evil-collection-define-key nil 'edebug-mode-map
+    "g" nil
+    "G" nil
+    "h" nil)
+
+  ;; FIXME: Seems like other minor modes will readily clash with `edebug'.
+  ;; `lispyville' and `edebug' 's' key?
+  (evil-collection-define-key 'normal 'edebug-mode-map
+    ;; control
+    "gs" 'edebug-step-mode
+    "go" 'edebug-go-mode
+    "gO" 'edebug-Go-nonstop-mode
+    "t" 'edebug-trace-mode
+    "T" 'edebug-Trace-fast-mode
+    "C" 'edebug-Continue-fast-mode
+
+    "f" 'edebug-forward-sexp
+    "H" 'edebug-goto-here
+    "I" 'edebug-instrument-callee
+
+    ;; quit
+    "Q" 'edebug-top-level-nonstop
+    "a" 'abort-recursive-edit
+    "S" 'edebug-stop
+
+    ;; breakpoints
+    "u" 'edebug-unset-breakpoint
+    "B" 'edebug-next-breakpoint
+    "x" 'edebug-set-conditional-breakpoint
+    "X" 'edebug-set-global-break-condition
+
+    ;; evaluation
+    "r" 'edebug-previous-result
+    (kbd "C-x C-e") 'edebug-eval-last-sexp
+    "EL" 'edebug-visit-eval-list
+
+    ;; views
+    "WW" 'edebug-where
+    "p" 'edebug-bounce-point
+    "P" 'edebug-view-outside ;; same as v
+    "WS" 'edebug-toggle-save-windows
+
+    ;; misc
+    "d" 'edebug-backtrace
+
+    "-" 'negative-argument
+
+    ;; statistics
+    "=" 'edebug-temp-display-freq-count
+
+    ;; GUD bindings
+    (kbd "C-c C-s") 'edebug-step-mode
+    (kbd "C-c C-n") 'edebug-next-mode
+    (kbd "C-c C-c") 'edebug-go-mode
+
+    (kbd "C-x SPC") 'edebug-set-breakpoint
+    (kbd "C-c C-d") 'edebug-unset-breakpoint
+    (kbd "C-c C-t") (lambda () (interactive) (edebug-set-breakpoint t))
+    (kbd "C-c C-l") 'edebug-where)
+  (evil-collection-bind 'edebug-mode-map
+                        'quit 'top-level
+                        'describe-mode 'edebug-help
+                        'debug-continue 'edebug-continue-mode
+                        'debug-step-over 'edebug-next-mode
+                        'debug-step-into 'edebug-step-in
+                        'debug-step-out 'edebug-step-out
+                        'debug-breakpoint 'edebug-set-breakpoint
+                        'debug-eval 'edebug-eval-expression)
+
+  (with-eval-after-load 'edebug-x
+    (evil-collection-define-key 'normal 'edebug-x-instrumented-function-list-mode-map
+      "E" 'edebug-x-evaluate-function
+      "Q" 'edebug-x-clear-data)
+    (evil-collection-bind 'edebug-x-instrumented-function-list-mode-map
+                          'quit 'quit-window
+                          'action 'edebug-x-find-function)
+    (evil-collection-define-key 'normal 'edebug-x-breakpoint-list-mode-map
+      "Q" 'edebug-x-clear-data)
+    (evil-collection-bind 'edebug-x-breakpoint-list-mode-map
+                          'quit 'quit-window
+                          'action 'edebug-x-visit-breakpoint
+                          'delete 'edebug-x-kill-breakpoint
+                          'delete-2 'edebug-x-kill-breakpoint)))
+
+(provide 'evil-collection-edebug)
+;;; evil-collection-edebug.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edebug/evil-collection-edebug.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edebug/evil-collection-edebug.elc
new file mode 100644
index 0000000..612dbf8
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/edebug/evil-collection-edebug.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ediff/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ediff/README.org
new file mode 100644
index 0000000..6aa4b6f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ediff/README.org
@@ -0,0 +1,21 @@
+* ediff
+
+  The table below shows the binding changes that are made to ediff-mode.
+
+| Command                     | Original Binding | evil-collection-ediff |
+|-----------------------------+------------------+-----------------------|
+| =ediff-next-difference=     | =n, SPC=         | =j, n, SPC=           |
+| =ediff-previous-difference= | =p, DEL=         | =k, N, p, DEL=        |
+| =ediff-jump-to-difference=  | =j=              | =d=                   |
+| jump to first difference    | =1j=             | =gg, 1d=              |
+| jump to last difference     | N/A              | =G=                   |
+| copy region A to region B   | =a=              | =a, l=                |
+| copy region B to region A   | =b=              | =b, h=                |
+| scroll down 1 line          | =C-u 1 v=        | =C-e=                 |
+| scroll up 1 line            | =C-u 1 V=        | =C-y=                 |
+| scroll down half page       | =v, C-v=         | =C-d, v, C-v=         |
+| scroll up half page         | =V, M-v=         | =C-u, V, M-v=         |
+| scroll left                 | =>=              | =zh=                  |
+| scroll right                | =<=              | =zl=                  |
+| toggle highlighting         | =h=              | =H=                   |
+| =ediff-suspend=             | =z=              | =C-z=                 |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ediff/evil-collection-ediff.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ediff/evil-collection-ediff.el
new file mode 100644
index 0000000..d2cdbac
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ediff/evil-collection-ediff.el
@@ -0,0 +1,205 @@
+;;; evil-collection-ediff.el --- Evil bindings for ediff -*- lexical-binding: t -*-
+;; Copyright (C) 2015 Justin Burkett
+
+;; Author: Justin Burkett <justin@burkett.cc>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Homepage: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1") (evil "1.2.3"))
+;; Keywords: evil, ediff, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Make ediff a little evil. This configures ediff to be friendlier to users
+;; of vim-like keybindings. Consult the help buffer (=?=) for more info.
+
+;; Here's a table describing the bindings
+
+;; | Command                     | Original Binding | Evil-ediff  |
+;; |-----------------------------+------------------+-------------|
+;; | ediff-next-difference       | n,SPC            | C-j,n,SPC   |
+;; | ediff-previous-difference   | p,DEL            | C-k,N,p,DEL |
+;; | ediff-jump-to-difference    | j                | d           |
+;; | jump to first difference    | 1j               | gg (or 1d)  |
+;; | jump to last difference     | N/A              | G           |
+;; | copy region A to region B   | a                | a,l         |
+;; | copy region B to region A   | b                | b,h         |
+;; | scroll down 1 line          | C-u 1 v          | j           |
+;; | scroll up 1 line            | C-u 1 V          | k           |
+;; | scroll down half page       | v,C-v            | C-d,v,C-v   |
+;; | scroll up half page         | V,M-v            | C-u,V,M-v   |
+;; | scroll left                 | >                | zh          |
+;; | scroll right                | <                | zl          |
+;; | toggle highlighting         | h                | H           |
+;; | ediff-suspend               | z                | C-z         |
+
+;; Not implemented yet
+;; | restore old diff            | ra,rb,rc         | u           |
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'ediff nil t)
+
+(defconst evil-collection-ediff-maps '(ediff-mode-map))
+
+(defvar evil-collection-ediff-initial-state-backup (evil-initial-state 'ediff-mode))
+(defvar evil-collection-ediff-long-help-message-compare2-backup ediff-long-help-message-compare2)
+(defvar evil-collection-ediff-long-help-message-compare3-backup  ediff-long-help-message-compare3)
+(defvar evil-collection-ediff-long-help-message-narrow2-backup  ediff-long-help-message-narrow2)
+(defvar evil-collection-ediff-long-help-message-word-backup  ediff-long-help-message-word-mode)
+(defvar evil-collection-ediff-long-help-message-merge-backup  ediff-long-help-message-merge)
+(defvar evil-collection-ediff-long-help-message-head-backup  ediff-long-help-message-head)
+(defvar evil-collection-ediff-long-help-message-tail-backup  ediff-long-help-message-tail)
+
+(defvar evil-collection-ediff-help-changed nil)
+
+(defun evil-collection-ediff-adjust-help ()
+  "Adjust long help messages to reflect evil-ediff bindings."
+  (unless evil-collection-ediff-help-changed
+    (dolist (msg '(ediff-long-help-message-compare2
+                   ediff-long-help-message-compare3
+                   ediff-long-help-message-narrow2
+                   ediff-long-help-message-word-mode
+                   ediff-long-help-message-merge
+                   ediff-long-help-message-head
+                   ediff-long-help-message-tail))
+      (dolist (chng '( ;;("^" . "  ")
+                      ("p,DEL -previous diff " . "k,N,p -previous diff ")
+                      ("n,SPC -next diff     " . "  j,n -next diff     ")
+                      ("    j -jump to diff  " . "    d -jump to diff  ")
+                      ("    h -highlighting  " . "    H -highlighting  ")
+                      ("  v/V -scroll up/dn  " . "C-u/d -scroll up/dn  ")
+                      ("  </> -scroll lt/rt  " . "zh/zl -scroll lt/rt  ")
+                      ("  z/q -suspend/quit"   . "C-z/q -suspend/quit")))
+        (setf (symbol-value msg)
+              (replace-regexp-in-string (car chng) (cdr chng) (symbol-value msg))))))
+  (setq evil-collection-ediff-help-changed t))
+
+(defun evil-collection-ediff-scroll-left (&optional arg)
+  "Scroll left."
+  (interactive "P")
+  (let ((last-command-event ?>))
+    (ediff-scroll-horizontally arg)))
+
+(defun evil-collection-ediff-scroll-right (&optional arg)
+  "Scroll right."
+  (interactive "P")
+  (let ((last-command-event ?<))
+    (ediff-scroll-horizontally arg)))
+
+(defun evil-collection-ediff-scroll-up (&optional arg)
+  "Scroll up by half of a page."
+  (interactive "P")
+  (let ((last-command-event ?V))
+    (ediff-scroll-vertically arg)))
+
+(defun evil-collection-ediff-scroll-down (&optional arg)
+  "Scroll down by half of a page."
+  (interactive "P")
+  (let ((last-command-event ?v))
+    (ediff-scroll-vertically arg)))
+
+(defun evil-collection-ediff-scroll-down-1 ()
+  "Scroll down by a line."
+  (interactive)
+  (let ((last-command-event ?v))
+    (ediff-scroll-vertically 1)))
+
+(defun evil-collection-ediff-scroll-up-1 ()
+  "Scroll down by a line."
+  (interactive)
+  (let ((last-command-event ?V))
+    (ediff-scroll-vertically 1)))
+
+(defun evil-collection-ediff-first-difference ()
+  "Jump to first difference."
+  (interactive)
+  (ediff-jump-to-difference 1))
+
+(defun evil-collection-ediff-last-difference ()
+  "Jump to last difference."
+  (interactive)
+  (ediff-jump-to-difference ediff-number-of-differences))
+
+;; (defun evil-collection-ediff-restore-diff ()
+;;   "Restore the copy of current region."
+;;   (interactive)
+;;   (ediff-restore-diff nil ?a)
+;;   (ediff-restore-diff nil ?b))
+
+(defvar evil-collection-ediff-bindings
+  '(("d"    . ediff-jump-to-difference)
+    ("H"    . ediff-toggle-hilit)
+    ("\C-e" . evil-collection-ediff-scroll-down-1)
+    ("\C-y" . evil-collection-ediff-scroll-up-1)
+    ("j"    . ediff-next-difference)
+    ("k"    . ediff-previous-difference)
+    ("N"    . ediff-previous-difference)
+    ("gg"   . evil-collection-ediff-first-difference)
+    ("G"    . evil-collection-ediff-last-difference)
+    ("\C-d" . evil-collection-ediff-scroll-down)
+    ("\C-u" . evil-collection-ediff-scroll-up)
+    ("\C-z" . ediff-suspend)
+    ("z"    . nil)
+    ("zl"   . evil-collection-ediff-scroll-right)
+    ("zh"   . evil-collection-ediff-scroll-left)
+    ;; Not working yet
+    ;; ("u"    . evil-collection-ediff-restore-diff)
+    )
+  "A list of bindings changed/added in evil-ediff.")
+
+(defun evil-collection-ediff-startup-hook ()
+  "Place evil-ediff bindings in `ediff-mode-map'."
+  (evil-make-overriding-map ediff-mode-map 'normal)
+  (dolist (entry evil-collection-ediff-bindings)
+    (define-key ediff-mode-map (car entry) (cdr entry)))
+  (unless (or ediff-3way-comparison-job
+              (eq ediff-split-window-function 'split-window-vertically))
+    (define-key ediff-mode-map "l" #'ediff-copy-A-to-B)
+    (define-key ediff-mode-map "h" #'ediff-copy-B-to-A))
+  (evil-normalize-keymaps)
+  nil)
+
+;;;###autoload
+(defun evil-collection-ediff-setup ()
+  "Initialize evil-ediff."
+  (interactive)
+  (evil-set-initial-state 'ediff-mode 'normal)
+  (add-hook 'ediff-keymap-setup-hook #'evil-collection-ediff-startup-hook)
+  (evil-collection-ediff-adjust-help))
+
+(defun evil-collection-ediff-revert ()
+  "Revert changes made by evil-ediff."
+  (interactive)
+  (evil-set-initial-state 'ediff-mode evil-collection-ediff-initial-state-backup)
+  (unless evil-collection-ediff-help-changed
+    (dolist (msg
+             '((ediff-long-help-message-compare2 . ediff-long-help-message-compare2-backup)
+               (ediff-long-help-message-compare3 . ediff-long-help-message-compare3-backup)
+               (ediff-long-help-message-narrow2 . ediff-long-help-message-narrow2-backup)
+               (ediff-long-help-message-word-mode . ediff-long-help-message-word-mode-backup)
+               (ediff-long-help-message-merge . ediff-long-help-message-merge-backup)
+               (ediff-long-help-message-head . ediff-long-help-message-head-backup)
+               (ediff-long-help-message-tail . ediff-long-help-message-tail-backup)))
+      (setf (symbol-value (car msg)) (symbol-value (cdr msg)))))
+  (setq evil-collection-ediff-help-changed nil)
+  (remove-hook 'ediff-keymap-setup-hook #'evil-collection-ediff-startup-hook))
+
+(provide 'evil-collection-ediff)
+;;; evil-collection-ediff.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ediff/evil-collection-ediff.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ediff/evil-collection-ediff.elc
new file mode 100644
index 0000000..0cc5185
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ediff/evil-collection-ediff.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eglot/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eglot/README.org
new file mode 100644
index 0000000..b93d3c1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eglot/README.org
@@ -0,0 +1,19 @@
+* eglot
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/eglot/index.html][eglot]], the built-in LSP client.
+
+** Key bindings (normal state)
+
+   | Command                              | Original  | Evil  |
+   |--------------------------------------+-----------+-------|
+   | =xref-find-definitions=              | =M-.=     | =gd=  |
+   | =xref-find-definitions-other-window= | =C-x 4 .= | =gD=  |
+   | =xref-find-definitions-other-frame=  | =C-x 5 .= | =g5=  |
+   | =xref-pop-marker-stack=              | =M-,=     | =C-t= |
+   | =eldoc-doc-buffer=                   | n/a       | =K=   |
+   | =xref-find-references=               | =M-?=     | =gr=  |
+
+   =gr= is only bound when =evil-collection-want-find-usages-bindings= is non-nil.
+
+   =eglot-managed-mode-hook= adds =evil-normalize-keymaps= so the bindings
+   activate as soon as eglot manages a buffer.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eglot/evil-collection-eglot.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eglot/evil-collection-eglot.el
new file mode 100644
index 0000000..4f5f2fa
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eglot/evil-collection-eglot.el
@@ -0,0 +1,49 @@
+;;; evil-collection-eglot.el --- Bindings for `eglot' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, eglot, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `eglot'.
+
+;;; Code:
+(require 'eglot nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-eglot-maps '(eglot-mode-map))
+
+;;;###autoload
+(defun evil-collection-eglot-setup ()
+  "Set up `evil' bindings for `eglot'."
+  (add-hook 'eglot-managed-mode-hook #'evil-normalize-keymaps)
+  (evil-collection-define-key 'normal 'eglot-mode-map
+    "gD" 'xref-find-definitions-other-window
+    "g5" 'xref-find-definitions-other-frame)
+
+  (evil-collection-bind 'eglot-mode-map
+                        'find-usages 'xref-find-references
+                        'find-definition 'xref-find-definitions
+                        'pop-definition 'xref-pop-marker-stack
+                        'lookup-doc 'eldoc-doc-buffer))
+
+(provide 'evil-collection-eglot)
+;;; evil-collection-eglot.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eglot/evil-collection-eglot.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eglot/evil-collection-eglot.elc
new file mode 100644
index 0000000..2750883
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eglot/evil-collection-eglot.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eldoc/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eldoc/README.org
new file mode 100644
index 0000000..1f1f776
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eldoc/README.org
@@ -0,0 +1,19 @@
+* eldoc
+
+  Evil bindings for the buffer popped by =eldoc-doc-buffer=.
+
+** Key bindings
+
+   Applied via =evil-collection-eldoc-doc-buffer-mode=, a minor mode attached
+   to the =*eldoc*= buffer.
+
+   | Command       | Original | Evil      |
+   |---------------+----------+-----------|
+   | =quit-window= | =q=      | =q=, =ZZ= |
+   | =evil-quit=   | n/a      | =ZQ=      |
+
+** Notes
+
+   On Emacs < 29, the minor mode is attached via advice on =eldoc-doc-buffer=.
+   On Emacs 29+, eldoc buffers derive from =special-mode=, which
+   evil-collection covers separately.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eldoc/evil-collection-eldoc.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eldoc/evil-collection-eldoc.el
new file mode 100644
index 0000000..ae3bc63
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eldoc/evil-collection-eldoc.el
@@ -0,0 +1,67 @@
+;;; evil-collection-eldoc.el --- Bindings for `eldoc' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.2
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `eldoc'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'eldoc nil t)
+
+(defconst evil-collection-eldoc-maps
+  '(evil-collection-eldoc-doc-buffer-mode-map))
+
+(defvar eldoc--doc-buffer) ;; Internal to `eldoc'.
+
+(defvar evil-collection-eldoc-doc-buffer-mode-map (make-sparse-keymap))
+
+(define-minor-mode evil-collection-eldoc-doc-buffer-mode
+  "A minor mode to attach to `eldoc-doc-buffer' buffers."
+  :group 'evil-collection-eldoc-mode
+  :keymap evil-collection-eldoc-doc-buffer-mode-map
+  :lighter nil)
+
+(defun evil-collection-eldoc-setup-doc-buffer-mode (&rest _)
+  "Set up `evil-collection-eldoc-doc-buffer-mode'."
+  (with-current-buffer eldoc--doc-buffer
+    (evil-collection-eldoc-doc-buffer-mode +1)
+    (evil-normalize-keymaps)))
+
+;;;###autoload
+(defun evil-collection-eldoc-setup ()
+  "Set up `evil' bindings for `eldoc'."
+  (evil-collection-bind 'evil-collection-eldoc-doc-buffer-mode-map
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit)
+
+  ;; 'special-mode' is used in eldoc since
+  ;; https://github.com/emacs-mirror/emacs/commit/97abe8511a829861f6efb865209ac2dd0e7ae129
+  (when (< emacs-major-version 29)
+    ;; Enable a separate minor mode so that we can bind keys to it.
+    (advice-add 'eldoc-doc-buffer
+                :after #'evil-collection-eldoc-setup-doc-buffer-mode)))
+
+(provide 'evil-collection-eldoc)
+;;; evil-collection-eldoc.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eldoc/evil-collection-eldoc.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eldoc/evil-collection-eldoc.elc
new file mode 100644
index 0000000..3710edf
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eldoc/evil-collection-eldoc.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elfeed/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elfeed/README.org
new file mode 100644
index 0000000..6a5f0ad
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elfeed/README.org
@@ -0,0 +1,64 @@
+* elfeed
+
+  Evil bindings for [[https://github.com/skeeto/elfeed][elfeed]].
+
+  Standard motion / quit bindings (=gg=, =G=, =j=, =k=, =q=, =ZZ=, =ZQ=) come
+  from =evil-collection-set-readonly-bindings= and are not repeated below.
+
+** elfeed-search-mode-map
+
+   | Command                          | Original | Evil                |
+   |----------------------------------+----------+---------------------|
+   | =elfeed-search-show-entry=       | =RET=    | =RET=               |
+   | =elfeed-search-browse-url=       | =b=      | =S-RET=, =go=       |
+   | =elfeed-search-yank=             | =y=      | =y=                 |
+   | =elfeed-search-live-filter=      | =s=      | =s=                 |
+   | =elfeed-search-set-filter=       | =S=      | =S=                 |
+   | =elfeed-search-clear-filter=     | =c=      | =c=                 |
+   | =elfeed-search-fetch=            | =G=      | =gR=                |
+   | =revert-buffer=                  | =g=      | =gr=                |
+   | =elfeed-search-tag-all=          | =+=      | =+=                 |
+   | =elfeed-search-untag-all=        | =-=      | =-=                 |
+   | =elfeed-search-tag-all-unread=   | =u=      | =U=                 |
+   | =elfeed-search-untag-all-unread= | =r=      | =u=                 |
+   | =scroll-up-command=              | n/a      | =SPC=               |
+   | =scroll-down-command=            | n/a      | =S-SPC=             |
+   | =elfeed-search-quit-window=      | =q=      | =q=, =ZQ=, =ZZ= ([[#fallbacks][†]]) |
+
+** elfeed-show-mode-map
+
+   | Command                                 | Original | Evil              |
+   |-----------------------------------------+----------+-------------------|
+   | =elfeed-show-visit=                     | =b=      | =S-RET=, =go=     |
+   | =elfeed-show-yank=                      | =y=      | =yu=              |
+   | =elfeed-show-next=                      | =n=      | =]]=, =gj=, =C-j= |
+   | =elfeed-show-prev=                      | =p=      | =[[=, =gk=, =C-k= |
+   | =elfeed-show-refresh=                   | n/a      | =gr=              |
+   | =elfeed-show-new-live-search=           | =s=      | =s=               |
+   | =elfeed-show-tag=                       | =+=      | =+=               |
+   | =elfeed-show-untag=                     | =-=      | =-=               |
+   | =elfeed-show-play-enclosure=            | =P=      | =P=               |
+   | =elfeed-show-add-enclosure-to-playlist= | =A=      | =A=               |
+   | =elfeed-show-save-enclosure=            | =d=      | =d=               |
+   | =elfeed-show-next-link=                 | =TAB=    | =TAB=             |
+   | =scroll-up-command=                     | =SPC=    | =SPC=             |
+   | =scroll-down-command=                   | =S-SPC=  | =S-SPC=           |
+   | =kill-current-buffer=                   | =q=      | =q=, =ZQ=, =ZZ=   |
+
+** elfeed-tree-mode-map
+
+   | Command              | Original | Evil  |
+   |----------------------+----------+-------|
+   | =elfeed-tree-search= | =RET=    | =RET= |
+
+** Fallbacks
+   :PROPERTIES:
+   :CUSTOM_ID: fallbacks
+   :END:
+
+   Two version-compat fallbacks fire only when running older elfeed:
+
+   - Before elfeed commit =518e5bd3= (no =revert-buffer-function=), =gr= calls
+     =elfeed-search-update--force= instead of =revert-buffer=.
+   - Before elfeed commit =2ef14c92= (no =quit-window-hook= save), =q=, =ZQ=,
+     =ZZ= use =elfeed-search-quit-window= to persist the db on exit.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elfeed/evil-collection-elfeed.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elfeed/evil-collection-elfeed.el
new file mode 100644
index 0000000..5eec95b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elfeed/evil-collection-elfeed.el
@@ -0,0 +1,119 @@
+;;; evil-collection-elfeed.el --- Evil bindings for elfeed -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, elfeed, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for elfeed.
+
+;;; Code:
+(require 'elfeed nil t)
+(require 'evil-collection)
+
+(defvar elfeed-search-mode-map)
+(defvar elfeed-show-mode-map)
+(defvar elfeed-tree-mode-map)
+
+(defconst evil-collection-elfeed-maps '(elfeed-search-mode-map
+                                        elfeed-show-mode-map
+                                        elfeed-tree-mode-map))
+
+;;;###autoload
+(defun evil-collection-elfeed-setup ()
+  "Set up `evil' bindings for `elfeed'."
+
+  (evil-collection-set-readonly-bindings 'elfeed-search-mode-map)
+  (evil-set-initial-state 'elfeed-search-mode 'normal)
+  (evil-collection-define-key 'normal 'elfeed-search-mode-map
+    "y" 'elfeed-search-yank
+
+    ;; filter
+    "S" 'elfeed-search-set-filter
+    "c" 'elfeed-search-clear-filter)
+
+  (evil-collection-bind 'elfeed-search-mode-map
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'action 'elfeed-search-show-entry
+                        'action-other 'elfeed-search-browse-url
+                        'refresh-all 'elfeed-search-fetch
+                        'refresh 'revert-buffer
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window
+                        'search-or-filter 'elfeed-search-live-filter)
+
+  ;; Refresh fallback for elfeed before commit 518e5bd3, where
+  ;; `revert-buffer-function' is not wired up.
+  (unless (fboundp 'elfeed-search--update-force)
+    (evil-collection-bind 'elfeed-search-mode-map 'refresh 'elfeed-search-update--force))
+
+  ;; Quit fallback for elfeed before commit 2ef14c92, where
+  ;; `quit-window-hook' does not run `elfeed-db-save'.
+  (when (and (fboundp 'elfeed-search-quit-window)
+             (not (eq (indirect-function 'elfeed-search-quit-window)
+                      (symbol-function 'quit-window))))
+    (evil-collection-bind 'elfeed-search-mode-map
+                          'quit 'elfeed-search-quit-window
+                          'quit-save 'elfeed-search-quit-window
+                          'quit-cancel 'elfeed-search-quit-window))
+
+  (evil-collection-define-key '(normal visual) 'elfeed-search-mode-map
+    "+" 'elfeed-search-tag
+    "-" 'elfeed-search-untag
+    "U" 'elfeed-search-tag-unread
+    "u" 'elfeed-search-untag-unread)
+
+  (evil-collection-set-readonly-bindings 'elfeed-show-mode-map)
+  (evil-set-initial-state 'elfeed-show-mode 'normal)
+  (evil-collection-define-key 'normal 'elfeed-show-mode-map
+    "+" 'elfeed-show-tag
+    "-" 'elfeed-show-untag
+
+    "A" 'elfeed-show-add-enclosure-to-playlist
+    "P" 'elfeed-show-play-enclosure
+    "d" 'elfeed-show-save-enclosure)
+  (evil-collection-bind 'elfeed-show-mode-map
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'action-other 'elfeed-show-visit
+                        'next-item 'elfeed-show-next
+                        'prev-item 'elfeed-show-prev
+                        'next-section 'elfeed-show-next
+                        'prev-section 'elfeed-show-prev
+                        'quit 'kill-current-buffer
+                        'quit-save 'kill-current-buffer
+                        'quit-cancel 'kill-current-buffer
+                        'refresh 'elfeed-show-refresh
+                        'search-or-filter 'elfeed-show-new-live-search
+                        'cycle-next 'elfeed-show-next-link)
+
+  ;; yu, like `eww'
+  (evil-collection-define-operator-key 'yank 'elfeed-show-mode-map
+    "u" 'elfeed-show-yank)
+
+  (evil-collection-set-readonly-bindings 'elfeed-tree-mode-map)
+  (evil-set-initial-state 'elfeed-tree-mode 'normal)
+  (evil-collection-bind 'elfeed-tree-mode-map 'action 'elfeed-tree-search))
+
+(provide 'evil-collection-elfeed)
+;;; evil-collection-elfeed.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elfeed/evil-collection-elfeed.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elfeed/evil-collection-elfeed.elc
new file mode 100644
index 0000000..b9f974d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elfeed/evil-collection-elfeed.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-mode/README.org
new file mode 100644
index 0000000..1fbd2a9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-mode/README.org
@@ -0,0 +1,23 @@
+* elisp-mode
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/elisp/index.html][Emacs Lisp]] editing (=emacs-lisp-mode= and
+  =emacs-lisp-compilation-mode=).
+
+** Key bindings
+
+   | Command                                               | Original | Evil |
+   |-------------------------------------------------------+----------+------|
+   | =evil-collection-elisp-mode-ielm-repl= (=elisp-mode=) | n/a      | =gz= |
+   | =emacs-lisp-compilation-recompile=                    | n/a      | =gr= |
+   | =xref-find-references= (when find-usages enabled)     | =M-?=    | =gr= |
+
+   In the =*Help*= printed-value overlay (=eval-print-last-sexp= output), =RET=
+   in normal/motion state calls =elisp-last-sexp-toggle-display=; in insert
+   state =RET= falls through to the global binding.
+
+** Notes
+
+   - =elisp--eval-last-sexp= is advised so its output ends at point in
+     normal/motion state when =evil-move-beyond-eol= is nil.
+   - =last-sexp-setup-props= is overridden to install an evil-aware =C-m=
+     handler on the printed-value text properties.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-mode/evil-collection-elisp-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-mode/evil-collection-elisp-mode.el
new file mode 100644
index 0000000..a5f4dd3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-mode/evil-collection-elisp-mode.el
@@ -0,0 +1,96 @@
+;;; evil-collection-elisp-mode.el --- Bindings for `elisp-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, elisp, lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `elisp-mode'.
+
+;;; Code:
+(require 'elisp-mode)
+(require 'evil-collection)
+
+(defconst evil-collection-elisp-mode-maps '(emacs-lisp-mode-map
+                                            emacs-lisp-compilation-mode-map))
+
+(defun evil-collection-elisp-mode-last-sexp-setup-props (beg end value alt1 alt2)
+  "Set up text properties for the output of `elisp--eval-last-sexp'.
+BEG and END are the start and end of the output in current-buffer.
+VALUE is the Lisp value printed, ALT1 and ALT2 are strings for the
+alternative printed representations that can be displayed."
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-m") #'evil-collection-elisp-mode-return-or-last-sexp-toggle-display)
+    (define-key map [down-mouse-2] #'mouse-set-point)
+    (define-key map [mouse-2] #'elisp-last-sexp-toggle-display)
+    (add-text-properties
+     beg end
+     `(printed-value (,value ,alt1 ,alt2)
+                     mouse-face highlight
+                     keymap ,map
+                     help-echo "RET, mouse-2: toggle abbreviated display"
+                     rear-nonsticky (mouse-face keymap help-echo
+                                                printed-value)))))
+
+(defun evil-collection-elisp-mode-return-or-last-sexp-toggle-display ()
+  "Trigger RET or call `elisp-last-sexp-toggle-display'."
+  (interactive)
+  (if (eq evil-state 'insert)
+      (call-interactively
+       (lookup-key (current-global-map) (kbd "C-m")))
+    (call-interactively 'elisp-last-sexp-toggle-display)))
+
+(defun evil-collection-elisp-mode-last-sexp (command &rest args)
+  "In normal-state or motion-state, last sexp ends at point."
+  (if (and (not evil-move-beyond-eol)
+           (or (evil-normal-state-p) (evil-motion-state-p)))
+      (save-excursion
+        (unless (or (eobp) (eolp)) (forward-char))
+        (apply command args))
+    (apply command args)))
+
+(defun evil-collection-elisp-mode-ielm-repl ()
+  "Open the Emacs Lisp REPL (`ielm')."
+  (interactive)
+  (pop-to-buffer (get-buffer-create "*ielm*"))
+  (ielm))
+
+;;;###autoload
+(defun evil-collection-elisp-mode-setup ()
+  "Set up `evil' bindings for `elisp-mode'."
+  (add-hook 'emacs-lisp-compilation-mode-hook #'evil-normalize-keymaps)
+
+  (unless evil-move-beyond-eol
+    (advice-add 'eval-print-last-sexp :around #'evil-collection-elisp-mode-last-sexp))
+  (advice-add 'last-sexp-setup-props
+              :override #'evil-collection-elisp-mode-last-sexp-setup-props)
+
+  (evil-set-initial-state 'emacs-lisp-mode 'normal)
+
+  (evil-collection-bind 'emacs-lisp-compilation-mode-map 'refresh #'emacs-lisp-compilation-recompile)
+
+  (evil-collection-bind 'emacs-lisp-mode-map
+                        'find-usages 'xref-find-references
+                        'goto-repl 'evil-collection-elisp-mode-ielm-repl))
+
+(provide 'evil-collection-elisp-mode)
+;;; evil-collection-elisp-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-mode/evil-collection-elisp-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-mode/evil-collection-elisp-mode.elc
new file mode 100644
index 0000000..c8555d4
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-mode/evil-collection-elisp-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-refs/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-refs/README.org
new file mode 100644
index 0000000..fe6eb22
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-refs/README.org
@@ -0,0 +1,12 @@
+* elisp-refs
+
+  Evil bindings for [[https://github.com/Wilfred/elisp-refs][elisp-refs]].
+
+** Key bindings
+
+   | Command                  | Original     | Evil                 |
+   |--------------------------+--------------+----------------------|
+   | =elisp-refs-next-match=  | =n=, =TAB=   | =TAB=, =C-j=, =gj=   |
+   | =elisp-refs-prev-match=  | =p=, =S-TAB= | =S-TAB=, =C-k=, =gk= |
+   | =elisp-refs-visit-match= | =RET=        | =RET=                |
+   | =kill-current-buffer=    | n/a          | =q=                  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-refs/evil-collection-elisp-refs.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-refs/evil-collection-elisp-refs.el
new file mode 100644
index 0000000..c4619dc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-refs/evil-collection-elisp-refs.el
@@ -0,0 +1,50 @@
+;;; evil-collection-elisp-refs.el --- Evil bindings for Elisp Refs -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017, 2024 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, elisp-refs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; This package provides a sane set of defaults for `elisp-refs' when using
+;; `evil-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'elisp-refs nil t)
+
+(defconst evil-collection-elisp-refs-maps '(elisp-refs-mode-map))
+
+;;;###autoload
+(defun evil-collection-elisp-refs-setup ()
+  "Set up `evil' bindings for `elisp-refs'."
+  (evil-collection-bind 'elisp-refs-mode-map
+                        'action 'elisp-refs-visit-match
+                        'cycle-next 'elisp-refs-next-match
+                        'cycle-previous 'elisp-refs-prev-match
+                        'next-item 'elisp-refs-next-match
+                        'prev-item 'elisp-refs-prev-match
+                        'next-section 'elisp-refs-next-match
+                        'prev-section 'elisp-refs-prev-match
+                        'quit 'kill-current-buffer))
+
+(provide 'evil-collection-elisp-refs)
+;;; evil-collection-elisp-refs.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-refs/evil-collection-elisp-refs.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-refs/evil-collection-elisp-refs.elc
new file mode 100644
index 0000000..dc83a6a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-refs/evil-collection-elisp-refs.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-slime-nav/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-slime-nav/README.org
new file mode 100644
index 0000000..97a2d86
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-slime-nav/README.org
@@ -0,0 +1,11 @@
+* elisp-slime-nav
+
+  Evil bindings for [[https://github.com/purcell/elisp-slime-nav][elisp-slime-nav]].
+
+** Key bindings
+
+   | Command                                         | Original                    | Evil  |
+   |-------------------------------------------------+-----------------------------+-------|
+   | =elisp-slime-nav-find-elisp-thing-at-point=     | =M-.=                       | =gd=  |
+   | =pop-tag-mark=                                  | =M-,=                       | =C-t= |
+   | =elisp-slime-nav-describe-elisp-thing-at-point= | =C-c C-d C-d= / =C-c C-d d= | =K=   |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-slime-nav/evil-collection-elisp-slime-nav.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-slime-nav/evil-collection-elisp-slime-nav.el
new file mode 100644
index 0000000..7e2309f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-slime-nav/evil-collection-elisp-slime-nav.el
@@ -0,0 +1,44 @@
+;;; evil-collection-elisp-slime-nav.el --- Bindings for `elisp-slime-nav' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, elisp-slime-nav, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `elisp-slime-nav'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'elisp-slime-nav nil t)
+
+(defconst evil-collection-elisp-slime-nav-maps '(elisp-slime-nav-mode-map))
+
+;;;###autoload
+(defun evil-collection-elisp-slime-nav-setup ()
+  "Set up `evil' bindings for `elisp-slime-nav'."
+  (evil-collection-bind 'elisp-slime-nav-mode-map
+                        'find-definition 'elisp-slime-nav-find-elisp-thing-at-point
+                        'pop-definition 'pop-tag-mark
+                        'lookup-doc 'elisp-slime-nav-describe-elisp-thing-at-point))
+
+(provide 'evil-collection-elisp-slime-nav)
+;;; evil-collection-elisp-slime-nav.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-slime-nav/evil-collection-elisp-slime-nav.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-slime-nav/evil-collection-elisp-slime-nav.elc
new file mode 100644
index 0000000..7a02e77
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elisp-slime-nav/evil-collection-elisp-slime-nav.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elpaca/evil-collection-elpaca.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elpaca/evil-collection-elpaca.el
new file mode 100644
index 0000000..12e187e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elpaca/evil-collection-elpaca.el
@@ -0,0 +1,117 @@
+;;; evil-collection-elpaca.el --- Bindings for `elpaca' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.2
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `elpaca'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'elpaca nil t)
+(require 'elpaca-ui nil t)
+
+(defvar elpaca-info-mode-map)
+(defvar elpaca-ui-mode-map)
+(defvar elpaca-ui-view-map)
+(declare-function elpaca-ui-search "elpaca-ui")
+(declare-function elpaca-ui-visit "elpaca-ui")
+
+
+(defconst evil-collection-elpaca-maps '(elpaca-info-mode-map
+                                        elpaca-ui-mode-map))
+
+(defcustom evil-collection-elpaca-want-movement t
+  "When non nil, prioritize movement keys like \"h\", \"l\", \"b\", etc."
+  :group 'evil-collection
+  :type 'boolean)
+
+(defcustom evil-collection-elpaca-want-v t
+  "When non nil, use v for visual mode.
+When this is true, move the `elpaca-visit' to gv and gd."
+  :group 'evil-collection
+  :type 'boolean)
+
+(defun evil-collection-elpaca-ui-visit-build-dir ()
+  "Visit package's build-dir."
+  (interactive)
+  (elpaca-ui-visit 'build))
+
+(defmacro evil-collection-elpaca-defsearch (name query)
+  "Return search command with NAME for QUERY."
+  (declare (indent 1) (debug t))
+  `(defun ,(intern (format "elpaca-ui-search-%s" name)) ()
+     ,(format "Search for %S" query)
+     (interactive)
+     (elpaca-ui-search ,query)))
+
+(defun evil-collection-elpaca-setup ()
+  "Set up `evil' bindings for elpaca."
+  (evil-collection-define-key 'normal 'elpaca-ui-view-map
+    (kbd "a") (evil-collection-elpaca-defsearch marked   "#unique #marked")
+    (kbd "i") (evil-collection-elpaca-defsearch installed "#unique #installed")
+    (kbd "l") 'elpaca-log
+    (kbd "m") 'elpaca-manager
+    (kbd "o") (evil-collection-elpaca-defsearch orphaned "#unique #orphan")
+    (kbd "r") 'elpaca-ui-search-refresh
+    (kbd "t") (evil-collection-elpaca-defsearch tried "#unique #installed !#declared")
+    (kbd "b") 'evil-collection-elpaca-ui-visit-build-dir)
+
+  (evil-collection-define-key 'normal 'elpaca-info-mode-map
+    (kbd "i") 'elpaca-info
+    (kbd "s") 'elpaca-info)
+  (evil-collection-bind 'elpaca-info-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button)
+
+  (evil-collection-define-key 'normal 'elpaca-ui-mode-map
+    (kbd "!") 'elpaca-ui-send-input
+    (kbd "+") 'elpaca-ui-show-hidden-rows
+    (kbd "c") 'elpaca-ui-copy
+    (kbd "d") 'elpaca-ui-mark-delete
+    (kbd "g") elpaca-ui-view-map
+    (kbd "i") 'elpaca-ui-mark-try
+    (kbd "m") 'elpaca-ui-mark-merge
+    (kbd "p") 'elpaca-ui-mark-pull
+    (kbd "r") 'elpaca-ui-mark-rebuild
+    (kbd "s") 'elpaca-ui-search
+    (kbd "u") 'elpaca-ui-unmark
+    (kbd "x") 'elpaca-ui-execute-marks)
+  (evil-collection-bind 'elpaca-ui-mode-map 'action 'elpaca-ui-info)
+
+  (if evil-collection-elpaca-want-v
+      (evil-collection-define-key 'normal 'elpaca-ui-view-map
+        (kbd "v") 'elpaca-ui-visit)
+    (evil-collection-define-key 'normal 'elpaca-ui-mode-map
+      (kbd "v") 'elpaca-ui-visit))
+
+  (if evil-collection-elpaca-want-movement
+      (evil-collection-define-key 'normal 'elpaca-ui-mode-map
+        (kbd "B") 'elpaca-ui-browse-package ;; b -> B
+        (kbd "F") 'elpaca-ui-mark-fetch ;; f -> F
+        )
+    (evil-collection-define-key 'normal 'elpaca-ui-mode-map
+      (kbd "b") 'elpaca-ui-browse-package
+      (kbd "f") 'elpaca-ui-mark-fetch)))
+
+(provide 'evil-collection-elpaca)
+;;; evil-collection-elpaca.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elpaca/evil-collection-elpaca.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elpaca/evil-collection-elpaca.elc
new file mode 100644
index 0000000..67e9537
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/elpaca/evil-collection-elpaca.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/embark/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/embark/README.org
new file mode 100644
index 0000000..3a76f32
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/embark/README.org
@@ -0,0 +1,19 @@
+* embark
+
+  Evil bindings for [[https://github.com/oantolin/embark][embark]]. Only
+  =embark-collect-mode-map= is touched -- the embark action keymaps
+  (=embark-general-map=, =embark-file-map=, ...) are left alone so embark's own
+  prefix UI keeps working.
+
+** embark-collect-mode-map
+
+   Initial state is forced to normal.
+
+   | Command                                   | Original | Evil  |
+   |-------------------------------------------+----------+-------|
+   | =embark-act=                              | =a=      | =a=   |
+   | =embark-act-all=                          | =A=      | =A=   |
+   | =embark-export=                           | =E=      | =E=   |
+   | =embark-select=                           | n/a      | =m=   |
+   | =embark-collect-direct-action-minor-mode= | =M-a=    | =M-a= |
+   | =revert-buffer=                           | =g=      | =gr=  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/embark/evil-collection-embark.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/embark/evil-collection-embark.el
new file mode 100644
index 0000000..8f22118
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/embark/evil-collection-embark.el
@@ -0,0 +1,52 @@
+;;; evil-collection-embark.el --- Evil bindings for embark -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for embark.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'embark nil t)
+
+(defconst evil-collection-embark-maps '(embark-collect-mode-map))
+
+;;;###autoload
+(defun evil-collection-embark-setup ()
+  "Set up `evil' bindings for `embark'."
+  (evil-set-initial-state 'embark-collect-mode 'normal)
+  (evil-collection-define-key 'normal 'embark-collect-mode-map
+    ;; embark specific commands. `isearch-forward' isn't defined, use
+    ;; `evil-search-forward' instead.
+    "a" 'embark-act
+    "A" 'embark-act-all
+    "E" 'embark-export                   ;; was e
+    (kbd "M-a") 'embark-collect-direct-action-minor-mode)
+  (evil-collection-bind 'embark-collect-mode-map
+                        'mark 'embark-select
+                        'refresh 'revert-buffer))
+
+(provide 'evil-collection-embark)
+;;; evil-collection-embark.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/embark/evil-collection-embark.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/embark/evil-collection-embark.elc
new file mode 100644
index 0000000..6aad43c
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/embark/evil-collection-embark.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emcp/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emcp/README.org
new file mode 100644
index 0000000..4ef7bd4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emcp/README.org
@@ -0,0 +1,36 @@
+* emcp
+
+  Evil bindings for [[https://github.com/JimmyJamesJames/emcp][emcp]].
+
+  =emcp-session-manager-mode= derives from =magit-section-mode=, so the usual
+  section navigation works through =evil-collection-magit-section=. These
+  bindings add Evil entry states and bind EMCP-specific actions through
+  =evil-collection-bind= where there is a matching semantic action.
+
+** emcp-session-manager-mode-map
+
+*** Manager commands (normal state)
+
+    | Command                                     | Default | Evil |
+    |---------------------------------------------+---------+------|
+    | =emcp-session-manager-refresh=              | =g=     | =gr= |
+    | =emcp-session-manager-kill=                 | =k=     | =d=  |
+    | =emcp-session-manager-kill-server=          |         | =x=  |
+    | =emcp-session-manager-kill-session=         |         | =D=  |
+    | =emcp-session-manager-cycle-eval-mode=      | =e=     | =E=  |
+    | =emcp-session-manager-cycle-send-keys-mode= | =K=     | =S=  |
+    | =emcp-session-manager-show-log=             | =l=     | =g?= |
+    | =quit-window=                               | =q=     | =q=  |
+
+** emcp-confirm-mode-map
+
+*** Confirmation commands (normal state)
+
+    | Command               | Default | Evil |
+    |-----------------------+---------+------|
+    | =kill-current-buffer= | =q=     | =q=  |
+
+    Confirmation action keys are generated dynamically by =emcp=. Normal-state
+    bindings for =y=, =n=, =a=, =r=, and =w= dispatch through the current
+    buffer-local confirmation keymap so those generated actions keep their
+    original meaning.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emcp/evil-collection-emcp.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emcp/evil-collection-emcp.el
new file mode 100644
index 0000000..49b91f5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emcp/evil-collection-emcp.el
@@ -0,0 +1,89 @@
+;;; evil-collection-emcp.el --- Bindings for emcp -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emcp, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `emcp'.
+
+;;; Code:
+(require 'evil-collection)
+
+(defconst evil-collection-emcp-maps '(emcp-session-manager-mode-map
+                                      emcp-confirm-mode-map))
+
+(defun evil-collection-emcp-confirm-dispatch ()
+  "Dispatch the pressed key through the current `emcp-confirm' local map."
+  (interactive)
+  (let* ((key (this-command-keys-vector))
+         (binding (lookup-key (current-local-map) key)))
+    (cond
+     ((commandp binding) (call-interactively binding))
+     ((null binding) (user-error "No EMCP confirmation action for `%s'"
+                                 (key-description key)))
+     (t (user-error "Unexpected EMCP confirmation binding for `%s': %S"
+                    (key-description key) binding)))))
+
+(defun evil-collection-emcp-setup-session-manager ()
+  "Set up `evil' bindings for `emcp-session-manager'."
+  (evil-set-initial-state 'emcp-session-manager-mode 'normal)
+
+  (evil-collection-bind 'emcp-session-manager-mode-map
+                        'refresh 'emcp-session-manager-refresh
+                        'delete 'emcp-session-manager-kill
+                        'delete-2 'emcp-session-manager-kill-server
+                        'describe-mode 'emcp-session-manager-show-log
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window)
+
+  (evil-collection-define-key 'normal 'emcp-session-manager-mode-map
+    "D" 'emcp-session-manager-kill-session
+    "E" 'emcp-session-manager-cycle-eval-mode
+    "S" 'emcp-session-manager-cycle-send-keys-mode))
+
+(defun evil-collection-emcp-setup-confirm ()
+  "Set up `evil' bindings for `emcp-confirm'."
+  (evil-set-initial-state 'emcp-confirm-mode 'normal)
+
+  (evil-collection-bind 'emcp-confirm-mode-map
+                        'quit 'kill-current-buffer
+                        'quit-save 'kill-current-buffer
+                        'quit-cancel 'kill-current-buffer)
+
+  (evil-collection-define-key 'normal 'emcp-confirm-mode-map
+    "a" 'evil-collection-emcp-confirm-dispatch
+    "n" 'evil-collection-emcp-confirm-dispatch
+    "r" 'evil-collection-emcp-confirm-dispatch
+    "w" 'evil-collection-emcp-confirm-dispatch
+    "y" 'evil-collection-emcp-confirm-dispatch))
+
+;;;###autoload
+(defun evil-collection-emcp-setup ()
+  "Set up `evil' bindings for `emcp'."
+  (with-eval-after-load 'emcp-session-manager
+    (evil-collection-emcp-setup-session-manager))
+  (with-eval-after-load 'emcp-confirm
+    (evil-collection-emcp-setup-confirm)))
+
+(provide 'evil-collection-emcp)
+;;; evil-collection-emcp.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emcp/evil-collection-emcp.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emcp/evil-collection-emcp.elc
new file mode 100644
index 0000000..2732f1b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emcp/evil-collection-emcp.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ement/evil-collection-ement.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ement/evil-collection-ement.el
new file mode 100644
index 0000000..e92bfdf
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ement/evil-collection-ement.el
@@ -0,0 +1,134 @@
+;;; evil-collection-ement.el --- Evil integration for Ement.el  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023  Nicholas Vollmer
+
+;; Author:  Nicholas Vollmer
+;; Keywords: convenience
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.0
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Evil bindings for Ement.el
+
+;;; Code:
+(require 'evil-collection)
+(require 'ement nil t)
+(require 'ement-room-list nil t)
+
+(defgroup evil-collection-ement nil
+  "Evil bindings for Ement.el."
+  :group 'evil-collection)
+
+(defcustom evil-collection-ement-want-auto-retro nil
+  "When non-nil, automatically run `ement-room-retro' when scrolled up at `bob'."
+  :type 'boolean)
+
+(defconst evil-collection-ement-maps '(ement-describe-room-mode-map
+                                       ement-directory-mode-map
+                                       ement-room-list-mode-map
+                                       ement-room-mode-map))
+
+(declare-function ement-room-retro "ement-room")
+(defun evil-collection-ement--auto-retro ()
+  "Call `ement-room-retro' scroll requested from beginning of buffer hit."
+  (and (= (line-beginning-position) (point-min))
+       (not (eq evil-state 'emacs))
+       (member this-command '(previous-line evil-scroll-up))
+       (call-interactively #'ement-room-retro)
+       (setq this-command 'ement-room-retro)))
+
+(defun evil-collection-ement--install-auto-retro ()
+  "Install `evil-collection-ement--auto-retro'."
+  (add-hook 'post-command-hook #'evil-collection-ement--auto-retro nil t))
+
+(defun evil-collection-ement-setup ()
+  "Set up `evil' bindings for Ement.el."
+  (evil-collection-define-key 'normal 'ement-describe-room-mode-map
+    (kbd "q") 'quit-window)
+
+  (evil-collection-define-key 'normal 'ement-directory-mode-map
+    (kbd "s")        'ement-directory-search
+    (kbd "q")        'quit-window)
+  (evil-collection-bind 'ement-directory-mode-map 'action 'ement-directory-RET)
+
+  (evil-collection-define-key 'normal 'ement-room-list-mode-map
+    (kbd "d")     'ement-room-list-kill-buffer
+    (kbd "x")     'ement-room-leave
+    (kbd "X")     'ement-forget-room)
+  (evil-collection-bind 'ement-room-list-mode-map 'action 'ement-room-list-RET)
+
+  (evil-collection-bind 'ement-room-mode-map
+                        'repl-submit 'ement-room-send-message
+                        'repl-newline 'newline
+                        'repl-force-newline 'newline
+                        'next-item 'ement-room-goto-next
+                        'prev-item 'ement-room-goto-prev
+                        'next-section 'ement-room-goto-next
+                        'prev-section 'ement-room-goto-prev)
+
+  (evil-collection-define-key '(normal motion) 'ement-room-mode-map
+    (kbd "<")  'ement-room-transient
+    (kbd "M-RET")      'ement-room-compose-message
+    (kbd "<M-return>") 'ement-room-compose-message
+    (kbd "a")  'ement-room-send-message
+    (kbd "A")  'ement-room-compose-message
+    (kbd "d")  'ement-room-delete-message
+    (kbd "D")  'ement-room-delete-message
+    (kbd "J")  'ement-room-write-reply
+    (kbd "gr") 'ement-room-sync
+    (kbd "gu") 'ement-room-goto-fully-read-marker
+    (kbd "gm") 'ement-room-mark-read
+    (kbd "gv") 'ement-room-view-event
+    (kbd "i")  'ement-room-edit-message
+    (kbd "q")  'quit-window
+    ;; Room prefix bindings
+    (kbd "r/") 'ement-room-occur
+    (kbd "rd") 'ement-room-describe
+    (kbd "rf") 'ement-room-set-message-format
+    (kbd "rl") 'ement-room-list
+    (kbd "rm") 'ement-list-members
+    (kbd "rn") 'ement-room-override-name
+    (kbd "rN") 'ement-room-set-notification-state
+    (kbd "rt") 'ement-room-set-topic
+    (kbd "rT") 'ement-tag-room
+    ;; Room membership
+    (kbd "Rc") 'ement-create-room
+    (kbd "Rj") 'ement-room-join
+    (kbd "Rl") 'ement-room-leave
+    (kbd "RF") 'ement-room-forget
+    (kbd "Rn") 'ement-room-set-display-name
+    (kbd "Rs") 'ement-room-toggle-space
+    ;; Send prefix bindings
+    (kbd "se") 'ement-room-send-emote
+    (kbd "sf") 'ement-room-send-file
+    (kbd "si") 'ement-room-send-image
+    (kbd "sr") 'ement-room-send-reaction
+    ;; User prefix bindings
+    (kbd "ui") 'ement-invite-user
+    (kbd "uI") 'ement-ignore-user
+    (kbd "u RET")      'ement-send-direct-message
+    (kbd "u <return>") 'ement-send-direct-message)
+
+  (when evil-collection-ement-want-auto-retro
+    (add-hook 'ement-room-mode-hook  #'evil-collection-ement--install-auto-retro))
+  nil)
+
+(provide 'evil-collection-ement)
+;;; evil-collection-ement.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ement/evil-collection-ement.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ement/evil-collection-ement.elc
new file mode 100644
index 0000000..086020c
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ement/evil-collection-ement.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emms/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emms/README.org
new file mode 100644
index 0000000..cd6d6af
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emms/README.org
@@ -0,0 +1,131 @@
+* emms
+
+  Evil bindings for [[https://www.gnu.org/software/emms/][EMMS]].
+
+** emms-browser-mode-map
+
+   Insert state is inhibited; the browser is forced into normal state.
+
+   | Command                                    | Original    | Evil              |
+   |--------------------------------------------+-------------+-------------------|
+   | =emms-pause=                               | =P=         | =x=               |
+   | =emms-stop=                                | =s=         | =X=               |
+   | =emms-random=                              | =r=         | =r=               |
+   | =emms-seek-backward=                       | =<=         | =<=               |
+   | =emms-seek-forward=                        | =>=         | =>=               |
+   | =emms-browser-add-tracks=                  | =RET=       | =RET=             |
+   | =emms-browser-add-tracks-and-play=         | =C-RET=     | =C-RET=           |
+   | =emms-volume-raise=                        | =+=         | =+=, ===          |
+   | =emms-volume-lower=                        | =-=         | =-=               |
+   | =emms-playlist-mode-undo=                  | =C-/=       | =u=               |
+   | =emms-browser-prev-non-track=              | =<backtab>= | =[[=, =C-k=, =gk= |
+   | =emms-browser-next-non-track=              | n/a         | =]]=, =C-j=, =gj= |
+   | =emms-browser-toggle-subitems-recursively= | n/a         | =TAB=, =S-TAB=    |
+   | =emms-browser-move-up-level=               | =^=         | =^=               |
+   | =emms-browser-toggle-subitems=             | =SPC=       | =SPC=             |
+   | =emms-browser-collapse-all=                | =1=         | =g1=, =zm=, =zc=  |
+   | =emms-browser-expand-to-level-2=           | =2=         | =g2=              |
+   | =emms-browser-expand-to-level-3=           | =3=         | =g3=              |
+   | =emms-browser-expand-to-level-4=           | =4=         | =g4=              |
+   | =emms-browser-expand-all=                  | =E=         | =g0=, =zr=        |
+   | =emms-browser-expand-one-level=            | n/a         | =zo=              |
+   | =emms-browse-by-artist=                    | =b 1=       | =ga=              |
+   | =emms-browse-by-album=                     | =b 2=       | =gA=              |
+   | =emms-browse-by-genre=                     | =b 3=       | =gb=              |
+   | =emms-browse-by-year=                      | =b 4=       | =gy=              |
+   | =emms-browse-by-composer=                  | =b 5=       | =gc=              |
+   | =emms-browse-by-performer=                 | =b 6=       | =gp=              |
+   | =emms-isearch-buffer=                      | =/=         | =/=               |
+   | =isearch-repeat-forward=                   | n/a         | =n=               |
+   | =isearch-repeat-backward=                  | n/a         | =N=               |
+   | =emms-browser-clear-playlist=              | =C=         | =C=               |
+   | =emms-browser-delete-files=                | =D=         | (default)         |
+   | =emms-browser-remove-tracks=               | n/a         | =D=               |
+   | =emms-browser-view-in-dired=               | =d=         | =d=, =gd=         |
+   | (parent =W= prefix)                        | =W=         | =g=               |
+   | (parent =s= prefix)                        | =s=         | =s=               |
+
+** emms-playlist-mode-map
+
+   Initial evil state is normal.
+
+   | Command                                                   | Original   | Evil        |
+   |-----------------------------------------------------------+------------+-------------|
+   | =emms-pause=                                              | =P=        | =x=         |
+   | =emms-stop=                                               | =s=        | =X=         |
+   | =emms-random=                                             | =r=        | =r=         |
+   | =emms-seek-backward=                                      | =<=        | =<=         |
+   | =emms-seek-forward=                                       | =>=        | =>=         |
+   | =emms-next=                                               | =n=        | =C-j=, =gj= |
+   | =emms-previous=                                           | =p=        | =C-k=, =gk= |
+   | =emms-playlist-mode-play-smart=                           | =RET=      | =RET=       |
+   | =emms-volume-raise=                                       | =+=        | =+=, ===    |
+   | =emms-volume-lower=                                       | =-=        | =-=         |
+   | =emms-playlist-mode-undo=                                 | =C-/=      | =u=         |
+   | =emms-playlist-mode-first=                                | =M-<=      | =gg=        |
+   | =emms-playlist-mode-last=                                 | =M->=      | =G=         |
+   | =emms-playlist-mode-next=                                 | =M-n=      | =]]=        |
+   | =emms-playlist-mode-previous=                             | =M-p=      | =[[=        |
+   | =emms-playlist-mode-kill-track=                           | =C-k=, =D= | =D=         |
+   | =emms-playlist-clear=                                     | =C=        | =C=         |
+   | =evil-collection-emms-playlist-mode-insert-newline-above= | n/a        | =O=         |
+   | =evil-collection-emms-playlist-mode-insert-newline-below= | n/a        | =o=         |
+   | =evil-collection-emms-playlist-mode-paste-before=         | n/a        | =P=         |
+   | =evil-collection-emms-playlist-mode-paste-after=          | n/a        | =p=         |
+   | =emms-tag-editor-edit=                                    | n/a        | =ze=        |
+   | =emms-tag-editor-rename=                                  | n/a        | =R=         |
+   | =emms-playlist-mode-center-current=                       | =c=        | =.=         |
+   | =emms-playlist-mode-goto-dired-at-point=                  | =d=        | =d=, =gd=   |
+   | =emms-show=                                               | =f=        | =zs=        |
+   | =emms-playlist-mode-add-contents=                         | =a=        | =a=         |
+   | =emms-playlist-set-playlist-buffer=                       | =b=        | =zp=        |
+   | (parent =S= sort prefix)                                  | =S=        | =S=         |
+   | (parent =/= filter prefix)                                | =/=        | =s=         |
+   | =emms-playlist-mode-yank-pop=                             | =M-y=      | =M-y=       |
+   | =emms-playlist-mode-kill= (visual)                        | =C-w=      | =D=         |
+
+** emms-browser-search-mode-map
+
+   | Command                    | Original | Evil |
+   |----------------------------+----------+------|
+   | =emms-browser-kill-search= | n/a      | =q=  |
+
+** emms-metaplaylist-mode-map
+
+   Initial evil state is normal.
+
+   | Command                                 | Original | Evil  |
+   |-----------------------------------------+----------+-------|
+   | =emms-metaplaylist-mode-goto-current=   | =RET=    | =RET= |
+   | =emms-metaplaylist-mode-set-active=     | =SPC=    | =SPC= |
+   | =emms-metaplaylist-mode-update=         | =g=      | =gr=  |
+   | =emms-metaplaylist-mode-new-buffer=     | =C=      | =C=   |
+   | =emms-metaplaylist-mode-center-current= | =c=      | =.=   |
+   | =emms-metaplaylist-mode-kill-buffer=    | =C-k=    | =D=   |
+   | =kill-current-buffer=                   | =q=      | =q=   |
+
+** emms-stream-mode-map
+
+   Initial evil state is normal.
+
+   | Command                             | Original | Evil     |
+   |-------------------------------------+----------+----------|
+   | =emms-stream-play=                  | =RET=    | =RET=    |
+   | =emms-stream-next-line=             | =n=      | =j=      |
+   | =emms-stream-previous-line=         | =p=      | =k=      |
+   | =emms-stream-yank-bookmark=         | =y=      | =y=      |
+   | =emms-stream-kill-bookmark=         | =k=      | =d=      |
+   | =emms-stream-edit-bookmark=         | =e=      | =c=, =r= |
+   | =emms-stream-info-bookmark=         | =i=      | =i=      |
+   | =emms-stream-save-bookmarks-file=   | =s=      | =s=      |
+   | =emms-stream-toggle-default-action= | =t=      | =x=      |
+   | =emms-stream-quit=                  | =q=      | =q=      |
+
+** New commands
+
+   | Command                                                   | Purpose                                                       |
+   |-----------------------------------------------------------+---------------------------------------------------------------|
+   | =evil-collection-emms-playlist-mode-insert-newline-above= | =O= equivalent that respects =emms-with-inhibit-read-only-t=. |
+   | =evil-collection-emms-playlist-mode-insert-newline-below= | =o= variant.                                                  |
+   | =evil-collection-emms-playlist-mode-paste-before=         | =P= -- yank playlist items before point.                      |
+   | =evil-collection-emms-playlist-mode-paste-after=          | =p= -- yank playlist items after point.                       |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emms/evil-collection-emms.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emms/evil-collection-emms.el
new file mode 100644
index 0000000..c7d6934
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emms/evil-collection-emms.el
@@ -0,0 +1,264 @@
+;;; evil-collection-emms.el --- Evil bindings for EMMS -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017, 2024 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emms, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for EMMS.
+
+;;; Code:
+(require 'emms nil t)
+(require 'evil-collection)
+
+(declare-function emms-with-inhibit-read-only-t "emms")
+(declare-function emms-playlist-mode-correct-previous-yank "emms-playlist-mode")
+(declare-function emms-playlist-mode-yank "emms-playlist-mode")
+
+(defvar emms-browser-mode-map)
+(defvar emms-playlist-mode-map)
+
+(defconst evil-collection-emms-maps '(emms-browser-mode-map
+                                      emms-playlist-mode-map
+                                      emms-browser-search-mode-map
+                                      emms-metaplaylist-mode-map
+                                      emms-stream-mode-map))
+
+(defun evil-collection-emms-playlist-mode-insert-newline-above ()
+  "Insert a newline above point."
+  (interactive)
+  (emms-with-inhibit-read-only-t
+   (evil-insert-newline-above)))
+
+(defun evil-collection-emms-playlist-mode-insert-newline-below ()
+  "Insert a newline below point."
+  (interactive)
+  (emms-with-inhibit-read-only-t
+   (evil-insert-newline-below)))
+
+(defun evil-collection-emms-playlist-mode-paste-before ()
+  "Pastes the latest yanked playlist items before the cursor position.
+The return value is the yanked text."
+  (interactive)
+  (emms-with-inhibit-read-only-t
+   (goto-char (line-beginning-position))
+   (emms-playlist-mode-yank)
+   (emms-playlist-mode-correct-previous-yank)
+   (evil-previous-line)
+   (evil-beginning-of-line)))
+
+(defun evil-collection-emms-playlist-mode-paste-after ()
+  "Pastes the latest yanked playlist items behind point.
+The return value is the yanked text."
+  (interactive)
+  (unless (eobp) (evil-next-line))
+  (evil-collection-emms-playlist-mode-paste-before))
+
+;;;###autoload
+(defun evil-collection-emms-browser-setup ()
+  "Set up `evil' bindings for `emms-browser'."
+  (evil-set-initial-state 'emms-browser-mode 'normal)
+  (evil-collection-inhibit-insert-state 'emms-browser-mode-map)
+  (evil-collection-define-key 'normal 'emms-browser-mode-map
+    ;; The following overrides other "g-" and "s-" prefixed keys so we set it first.
+    "g" nil
+    "g" (lookup-key emms-browser-mode-map (kbd "W"))
+    "s" nil
+    "s" (lookup-key emms-browser-mode-map (kbd "s"))
+
+    ;; playback controls
+    "x" 'emms-pause
+    "X" 'emms-stop
+    "r" 'emms-random
+    "<" 'emms-seek-backward
+    ">" 'emms-seek-forward
+    (kbd "C-<return>") 'emms-browser-add-tracks-and-play
+
+    ;; volume controls
+    "+" 'emms-volume-raise
+    "=" 'emms-volume-raise
+    "-" 'emms-volume-lower
+
+    "u" 'emms-playlist-mode-undo
+
+    ;; motion
+    "^" 'emms-browser-move-up-level
+    (kbd "SPC") 'emms-browser-toggle-subitems
+    "g1" 'emms-browser-collapse-all
+    "g2" 'emms-browser-expand-to-level-2
+    "g3" 'emms-browser-expand-to-level-3
+    "g4" 'emms-browser-expand-to-level-4
+    "g0" 'emms-browser-expand-all
+    "ga" 'emms-browse-by-artist
+    "gA" 'emms-browse-by-album
+    "gb" 'emms-browse-by-genre
+    "gy" 'emms-browse-by-year
+    "gc" 'emms-browse-by-composer
+    "gp" 'emms-browse-by-performer
+    "zm" 'emms-browser-collapse-all
+    "zr" 'emms-browser-expand-all
+    "zo" 'emms-browser-expand-one-level
+    ;; TODO find a real replacement for zc
+    "zc" 'emms-browser-collapse-all
+
+    ;; TODO find a way to integrate this with evil-collection-evil-search
+    "/" 'emms-isearch-buffer ; This shows hidden items during search.
+    "n" 'isearch-repeat-forward
+    "N" 'isearch-repeat-backward
+
+    ;; filter
+    ;; "" 'emms-browser-previous-filter ; TODO: What does this do?
+    ;; "" 'emms-browser-next-filter
+
+
+    "C" 'emms-browser-clear-playlist
+    "D" 'emms-browser-remove-tracks
+    "d" 'emms-browser-view-in-dired
+    ;; "d" does the same, keep "gd" for consistency.
+    "gd" 'emms-browser-view-in-dired)
+  (evil-collection-bind 'emms-browser-mode-map
+                        'action 'emms-browser-add-tracks
+                        'next-item 'emms-browser-next-non-track
+                        'prev-item 'emms-browser-prev-non-track
+                        'next-section 'emms-browser-next-non-track
+                        'prev-section 'emms-browser-prev-non-track
+                        'section-toggle 'emms-browser-toggle-subitems-recursively
+                        'section-toggle-all 'emms-browser-toggle-subitems-recursively)
+
+  (unless evil-collection-always-run-setup-hook-after-load
+    (run-hook-with-args 'evil-collection-setup-hook
+                        'emms '(emms-browser-mode-map))))
+
+;;;###autoload
+(defun evil-collection-emms-playlist-setup ()
+  "Set up `evil' bindings for `emms-playlist'."
+  (evil-set-initial-state 'emms-playlist-mode 'normal)
+  (evil-collection-bind 'emms-playlist-mode-map 'rename 'emms-tag-editor-rename)
+  (evil-collection-define-key 'normal 'emms-playlist-mode-map
+    ;; playback controls
+    "x" 'emms-pause
+    "X" 'emms-stop
+    "r" 'emms-random
+    "<" 'emms-seek-backward
+    ">" 'emms-seek-forward
+
+    ;; volume controls
+    "+" 'emms-volume-raise
+    "=" 'emms-volume-raise
+    "-" 'emms-volume-lower
+
+    "u" 'emms-playlist-mode-undo
+
+    ;; motion
+    "gg" 'emms-playlist-mode-first
+    "G" 'emms-playlist-mode-last
+
+    "D" 'emms-playlist-mode-kill-track  ; emms-browser uses "D"
+    "C" 'emms-playlist-clear
+    "O" 'evil-collection-emms-playlist-mode-insert-newline-above
+    "o" 'evil-collection-emms-playlist-mode-insert-newline-below
+    "P" 'evil-collection-emms-playlist-mode-paste-before
+    "p" 'evil-collection-emms-playlist-mode-paste-after
+
+    "u" 'emms-playlist-mode-undo
+
+    "ze" 'emms-tag-editor-edit
+
+    "." 'emms-playlist-mode-center-current
+    "d" 'emms-playlist-mode-goto-dired-at-point
+    "gd" 'emms-playlist-mode-goto-dired-at-point ; "d" does the same, keep "gd" for consistency.
+
+    "zs" 'emms-show
+    "a" 'emms-playlist-mode-add-contents
+    "zp" 'emms-playlist-set-playlist-buffer
+
+    ;; filter
+    "S" (lookup-key emms-playlist-mode-map (kbd "S"))
+    "s" (lookup-key emms-playlist-mode-map (kbd "/"))
+    ;; "" 'emms-playlist-limit-to-all ; TODO: Test.
+
+    (kbd "M-y") 'emms-playlist-mode-yank-pop)
+  (evil-collection-bind 'emms-playlist-mode-map
+                        'action 'emms-playlist-mode-play-smart
+                        'next-item 'emms-next
+                        'prev-item 'emms-previous
+                        'next-section 'emms-playlist-mode-next
+                        'prev-section 'emms-playlist-mode-previous
+                        'next-section-2 'emms-next
+                        'prev-section-2 'emms-previous)
+
+  (evil-collection-define-key 'visual 'emms-playlist-mode-map
+    ;; "d" 'emms-playlist-mode-kill
+    "D" 'emms-playlist-mode-kill)
+
+  (unless evil-collection-always-run-setup-hook-after-load
+    (run-hook-with-args 'evil-collection-setup-hook
+                        'emms '(emms-playlist-mode-map))))
+
+;;;###autoload
+(defun evil-collection-emms-setup ()
+  "Set up `evil' bindings for `emms'."
+  ;; emms-browser and emms-playlist-mode must be set up after they are loaded
+  ;; because we need the mode map to be defined when we `(lookup-key
+  ;; ...-mode-map ...)'.
+  (with-eval-after-load 'emms-browser
+    (evil-collection-emms-browser-setup))
+  (with-eval-after-load 'emms-playlist-mode
+    (evil-collection-emms-playlist-setup))
+
+  (evil-collection-bind 'emms-browser-search-mode-map 'quit 'emms-browser-kill-search)
+
+  (evil-set-initial-state 'emms-metaplaylist-mode 'normal)
+  (evil-collection-define-key 'normal 'emms-metaplaylist-mode-map
+    (kbd "<space>") 'emms-metaplaylist-mode-set-active
+    "C" 'emms-metaplaylist-mode-new-buffer
+    "." 'emms-metaplaylist-mode-center-current
+    "D" 'emms-metaplaylist-mode-kill-buffer)
+  (evil-collection-bind 'emms-metaplaylist-mode-map
+                        'action 'emms-metaplaylist-mode-goto-current
+                        'quit 'kill-current-buffer
+                        'refresh 'emms-metaplaylist-mode-update)
+
+  (evil-set-initial-state 'emms-stream-mode 'normal)
+  (evil-collection-define-key 'normal 'emms-stream-mode-map
+    "j" 'emms-stream-next-line
+    "k" 'emms-stream-previous-line
+    "y" 'emms-stream-yank-bookmark
+    "d" 'emms-stream-kill-bookmark
+    "c" 'emms-stream-edit-bookmark
+    "r" 'emms-stream-edit-bookmark
+    "i" 'emms-stream-info-bookmark
+    "s" 'emms-stream-save-bookmarks-file
+    "x" 'emms-stream-toggle-default-action)
+  (evil-collection-bind 'emms-stream-mode-map
+                        'action 'emms-stream-play
+                        'quit 'emms-stream-quit)
+
+  (unless evil-collection-always-run-setup-hook-after-load
+    (run-hook-with-args
+     'evil-collection-setup-hook 'emms
+     '(emms-browser-search-mode-map
+       emms-metaplaylist-mode-map
+       emms-stream-mode-map))))
+
+(provide 'evil-collection-emms)
+;;; evil-collection-emms.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emms/evil-collection-emms.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emms/evil-collection-emms.elc
new file mode 100644
index 0000000..8c73d44
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emms/evil-collection-emms.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emoji/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emoji/README.org
new file mode 100644
index 0000000..5a3c09b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emoji/README.org
@@ -0,0 +1,13 @@
+* emoji
+
+  Evil bindings for =emoji-list-mode= (the buffer produced by =M-x emoji-list=).
+
+** Key bindings
+
+   Read-only motion/quit bindings come from =evil-collection-set-readonly-bindings=
+   and are not repeated below.
+
+   | Command             | Original | Evil  |
+   |---------------------+----------+-------|
+   | =emoji-list-select= | =RET=    | =RET= |
+   | =emoji-list-help=   | =h=      | =gh=  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emoji/evil-collection-emoji.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emoji/evil-collection-emoji.el
new file mode 100644
index 0000000..aeb92f6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emoji/evil-collection-emoji.el
@@ -0,0 +1,44 @@
+;;; evil-collection-emoji.el --- Evil bindings for emoji -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for emoji.
+
+;;; Code:
+(require 'evil-collection)
+(require 'emoji nil t)
+
+(defconst evil-collection-emoji-maps '(emoji-list-mode-map))
+
+;;;###autoload
+(defun evil-collection-emoji-setup ()
+  "Set up `evil' bindings for `emoji'."
+  (evil-collection-set-readonly-bindings 'emoji-list-mode-map)
+  (evil-collection-define-key 'normal 'emoji-list-mode-map
+    "gh" 'emoji-list-help)
+  (evil-collection-bind 'emoji-list-mode-map 'action 'emoji-list-select))
+
+(provide 'evil-collection-emoji)
+;;; evil-collection-emoji.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emoji/evil-collection-emoji.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emoji/evil-collection-emoji.elc
new file mode 100644
index 0000000..d1bf12a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/emoji/evil-collection-emoji.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/epa/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/epa/README.org
new file mode 100644
index 0000000..52f4696
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/epa/README.org
@@ -0,0 +1,34 @@
+* epa
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/epa/index.html][EasyPG Assistant]] (=epa-key-list-mode=, =epa-key-mode=,
+  =epa-info-mode=).
+
+** Key bindings
+
+*** epa-key-list-mode-map
+
+    | Command            | Original | Evil  |
+    |--------------------+----------+-------|
+    | =widget-forward=   | =TAB=    | =TAB= |
+    | =revert-buffer=    | =g=      | =gr=  |
+    | =epa-exit-buffer=  | =q=      | =q=   |
+    | =quit-window=      | n/a      | =ZZ=  |
+    | =evil-quit=        | n/a      | =ZQ=  |
+    | =epa-decrypt-file= | =d=      | =E=   |
+    | =epa-delete-keys=  | =r=      | =d=   |
+    | =epa-verify-file=  | =v=      | =V=   |
+    | =epa-mark-key=     | =m=      | =m=   |
+    | =epa-unmark-key=   | =u=      | =u=   |
+    | =epa-sign-file=    | =s=      | =s=   |
+    | =epa-encrypt-file= | =e=      | =e=   |
+    | =epa-import-keys=  | =i=      | =i=   |
+    | =epa-export-keys=  | =o=      | =o=   |
+
+*** epa-key-mode-map / epa-info-mode-map
+
+    | Command           | Original | Evil       |
+    |-------------------+----------+------------|
+    | =epa-exit-buffer= | =q=      | =q=        |
+    | =delete-window=   | n/a      | =q= (info) |
+    | =quit-window=     | n/a      | =ZZ=       |
+    | =evil-quit=       | n/a      | =ZQ=       |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/epa/evil-collection-epa.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/epa/evil-collection-epa.el
new file mode 100644
index 0000000..cb921a7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/epa/evil-collection-epa.el
@@ -0,0 +1,71 @@
+;;; evil-collection-epa.el --- Evil bindings for epa-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: Maximiliano Sandoval <msandova@protonmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, epa, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `epa-mode'.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'epa nil t)
+
+(defconst evil-collection-epa-maps '(epa-key-list-mode-map
+                                     epa-key-mode-map
+                                     epa-info-mode-map))
+
+;;;###autoload
+(defun evil-collection-epa-setup ()
+  (evil-collection-define-key 'normal 'epa-key-list-mode-map
+    "E" 'epa-decrypt-file
+    "d" 'epa-delete-keys
+    "V" 'epa-verify-file
+
+    ;; Unchanged keybindings.
+    "s" 'epa-sign-file
+    "e" 'epa-encrypt-file
+    "i" 'epa-import-keys
+    "o" 'epa-export-keys)
+  (evil-collection-bind 'epa-key-list-mode-map
+                        'cycle-next 'widget-forward
+                        'cycle-previous 'widget-backward
+                        'mark 'epa-mark-key
+                        'unmark 'epa-unmark-key
+                        'quit 'epa-exit-buffer
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit
+                        'refresh 'revert-buffer)
+
+  (evil-collection-bind 'epa-key-mode-map
+                        'quit 'epa-exit-buffer
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit)
+
+  (evil-collection-bind 'epa-info-mode-map
+                        'quit 'delete-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit))
+
+(provide 'evil-collection-epa)
+;;; evil-collection-epa.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/epa/evil-collection-epa.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/epa/evil-collection-epa.elc
new file mode 100644
index 0000000..24b5d05
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/epa/evil-collection-epa.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ert/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ert/README.org
new file mode 100644
index 0000000..c1f8a94
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ert/README.org
@@ -0,0 +1,24 @@
+* ert
+
+  Evil bindings for =ert-results-mode=.
+
+** Key bindings
+
+   | Command                                               | Original | Evil              |
+   |-------------------------------------------------------+----------+-------------------|
+   | =ert-results-next-test=                               | =n=      | =gj=, =]]=, =C-j= |
+   | =ert-results-previous-test=                           | =p=      | =gk=, =[[=, =C-k= |
+   | =ert-results-jump-between-summary-and-result=         | =j=      | =J=               |
+   | =ert-results-toggle-printer-limits-for-test-at-point= | =L=      | =L=               |
+   | =ert-results-rerun-all-tests=                         | =R=      | =gr=, =R=         |
+   | =ert-results-rerun-test-at-point=                     | =r=      | =r=               |
+   | =ert-results-rerun-test-at-point-debugging-errors=    | =d=      | =d=               |
+   | =ert-results-find-test-at-point-other-window=         | =.=      | =.=, =gd=         |
+   | =ert-results-pop-to-backtrace-for-test-at-point=      | =b=      | =B=               |
+   | =ert-results-pop-to-messages-for-test-at-point=       | =m=      | =M=               |
+   | =ert-results-pop-to-should-forms-for-test-at-point=   | =l=      | =s=               |
+   | =ert-results-describe-test-at-point=                  | =h=      | =K=, =g?=         |
+   | =ert-results-pop-to-timings=                          | =T=      | =T=               |
+   | =ert-delete-test=                                     | =D=      | =x=               |
+   | =evil-next-line= / =evil-previous-line=               | n/a      | =j= / =k=         |
+   | =evil-backward-char= / =evil-forward-char=            | n/a      | =h= / =l=         |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ert/evil-collection-ert.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ert/evil-collection-ert.el
new file mode 100644
index 0000000..2468e7a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ert/evil-collection-ert.el
@@ -0,0 +1,71 @@
+;;; evil-collection-ert.el --- Bindings for `ert' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `ert'.
+
+;;; Code:
+(require 'ert)
+(require 'evil-collection)
+
+(defconst evil-collection-ert-maps '(ert-results-mode-map))
+
+;;;###autoload
+(defun evil-collection-ert-setup ()
+  "Set up `evil' bindings for `ert'."
+  (evil-collection-inhibit-insert-state 'ert-results-mode-map)
+  (evil-set-initial-state 'ert-results-mode 'normal)
+
+  (evil-collection-define-key 'normal 'ert-results-mode-map
+    "j" 'evil-next-line
+    "k" 'evil-previous-line
+    "h" 'evil-backward-char
+    "l" 'evil-forward-char
+    ;; Stuff that's not in the menu.
+    "J" 'ert-results-jump-between-summary-and-result
+    "L" 'ert-results-toggle-printer-limits-for-test-at-point
+    ;; Stuff that is in the menu.
+    "R" 'ert-results-rerun-all-tests
+    "r" 'ert-results-rerun-test-at-point
+    "d" 'ert-results-rerun-test-at-point-debugging-errors
+    "." 'ert-results-find-test-at-point-other-window
+    "B" 'ert-results-pop-to-backtrace-for-test-at-point
+    "M" 'ert-results-pop-to-messages-for-test-at-point
+    "s" 'ert-results-pop-to-should-forms-for-test-at-point
+    "T" 'ert-results-pop-to-timings)
+
+  (evil-collection-bind 'ert-results-mode-map
+                        'next-item 'ert-results-next-test
+                        'prev-item 'ert-results-previous-test
+                        'next-section 'ert-results-next-test
+                        'prev-section 'ert-results-previous-test
+                        'lookup-doc 'ert-results-describe-test-at-point
+                        'describe-mode 'ert-results-describe-test-at-point
+                        'refresh 'ert-results-rerun-all-tests
+                        'find-definition 'ert-results-find-test-at-point-other-window
+                        'delete-2 'ert-delete-test))
+
+(provide 'evil-collection-ert)
+;;; evil-collection-ert.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ert/evil-collection-ert.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ert/evil-collection-ert.elc
new file mode 100644
index 0000000..eda68e2
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ert/evil-collection-ert.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eshell/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eshell/README.org
new file mode 100644
index 0000000..0d4ab5f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eshell/README.org
@@ -0,0 +1,36 @@
+* eshell
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/eshell/index.html][Eshell]].
+
+** Key bindings
+
+   Normal-state bindings added to =eshell-mode-map=.
+
+   | Command                                           | Original  | Evil              |
+   |---------------------------------------------------+-----------+-------------------|
+   | =eshell-previous-prompt=                          | =C-c C-p= | =[[=, =gk=, =C-k= |
+   | =eshell-next-prompt=                              | =C-c C-n= | =]]=, =gj=, =C-j= |
+   | =eshell-backward-argument=                        | =C-c C-b= | =M-h=             |
+   | =eshell-forward-argument=                         | =C-c C-f= | =M-l=             |
+   | =eshell-previous-matching-input-from-input=       | =C-c M-p= | =C-p=             |
+   | =eshell-next-matching-input-from-input=           | =C-c M-n= | =C-n=             |
+   | =eshell-bol= (Emacs < 30)                         | =C-a=     | =0=, =^=          |
+   | =eshell-kill-input= (when =evil-want-C-u-delete=) | =C-c C-u= | =C-u= (insert)    |
+
+   =RET= sends input in the state named by =evil-collection-repl-submit-state=,
+   and inserts a newline in the complementary state.
+
+** New commands
+
+   | Command                                    | Key       |                                         |
+   |--------------------------------------------+-----------+-----------------------------------------|
+   | =evil-collection-eshell-interrupt-process= | =C-c C-c= | interrupt process, then enter insert    |
+   | =evil-collection-eshell-evil-change=       | =c=       | change, never touches prompt or history |
+   | =evil-collection-eshell-evil-change-line=  | =C=       | change to end-of-line                   |
+   | =evil-collection-eshell-evil-delete=       | =d=       | delete, never touches prompt or history |
+   | =evil-collection-eshell-evil-delete-line=  | =D=       | delete to end-of-line                   |
+
+** Notes
+
+   - On entering insert/replace state, point jumps to the next prompt.
+   - On entering normal state, point stays put (no Vim-style backward step).
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eshell/evil-collection-eshell.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eshell/evil-collection-eshell.el
new file mode 100644
index 0000000..da32805
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eshell/evil-collection-eshell.el
@@ -0,0 +1,163 @@
+;;; evil-collection-eshell.el --- Evil bindings for Eshell -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017, 2021 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, eshell, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Eshell.
+
+;;; Code:
+(require 'em-prompt)
+(require 'eshell)
+(require 'evil-collection)
+
+(defconst evil-collection-eshell-maps '(eshell-mode-map))
+
+(defun evil-collection-eshell-next-prompt ()
+  "`evil' wrapper around `eshell-next-prompt'."
+  (when (get-text-property (point) 'read-only)
+    ;; If at end of prompt, `eshell-next-prompt' will not move, so go backward.
+    (beginning-of-line)
+    (eshell-next-prompt 1)))
+
+(defun evil-collection-eshell-next-prompt-on-insert ()
+  "Go to next prompt on `evil' replace/insert enter."
+  (dolist (hook '(evil-replace-state-entry-hook evil-insert-state-entry-hook))
+    (add-hook hook #'evil-collection-eshell-next-prompt nil t)))
+
+(defun evil-collection-eshell-interrupt-process ()
+  "Interupt `eshell' process and enter insert state."
+  (interactive)
+  (eshell-interrupt-process)
+  (evil-insert 1))
+
+(defun evil-collection-eshell-escape-stay ()
+  "Go back to normal state but don't move cursor backwards.
+Moving cursor backwards is the default Vim behavior but it is not
+appropriate in some cases like terminals."
+  (setq-local evil-move-cursor-back nil))
+
+;; Taken from Doom Emacs
+(evil-define-operator evil-collection-eshell-evil-change (beg end type register yank-handler delete-func)
+  "Like `evil-change' but will not delete/copy the prompt."
+  (interactive "<R><x><y>")
+  (save-restriction
+    (narrow-to-region eshell-last-output-end (point-max))
+    (evil-change (max beg (point-min))
+                 (if (eq type 'line) (point-max) (min (or end (point-max)) (point-max)))
+                 type register yank-handler delete-func)))
+
+;; Taken from Doom Emacs
+(evil-define-operator evil-collection-eshell-evil-change-line (beg end type register yank-handler)
+  "Change to end of line."
+  :motion evil-end-of-line
+  (interactive "<R><x><y>")
+  (evil-collection-eshell-evil-change beg end type register yank-handler #'evil-delete-line))
+
+;; Taken from Doom Emacs
+(evil-define-operator evil-collection-eshell-evil-delete (beg end type register yank-handler)
+  "Like `evil-delete' but will not delete/copy the prompt."
+  (interactive "<R><x><y>")
+  (save-restriction
+    (narrow-to-region eshell-last-output-end (point-max))
+    (evil-delete (if beg (max beg (point-min)) (point-min))
+                 (if (eq type 'line) (point-max) (min (or end (point-max)) (point-max)))
+                 type register yank-handler)))
+
+;; Taken from Doom Emacs
+;;
+;; Although the BEG argument doesn't get used in any meaningful way,
+;; `evil-define-operator' must access it nonetheless, so putting an underscore
+;; in front will make the CI fail.
+(evil-define-operator evil-collection-eshell-evil-delete-line (beg end type register yank-handler)
+  "Change to end of line."
+  :motion nil
+  :keep-visual t
+  (interactive "<R><x>")
+  (evil-collection-eshell-evil-delete (point) end type register yank-handler))
+
+;; `eshell-mode-map' is reset when Eshell is initialized in `eshell-mode'. We
+;; need to add bindings to `eshell-first-time-mode-hook'.
+(defun evil-collection-eshell-setup-keys ()
+  "Set up `evil' bindings for `eshell'."
+  (evil-collection-define-key 'normal 'eshell-mode-map
+    ;; motion
+    (kbd "M-h") 'eshell-backward-argument
+    (kbd "M-l") 'eshell-forward-argument
+
+
+    (kbd "C-c C-c") 'evil-collection-eshell-interrupt-process
+    "c" 'evil-collection-eshell-evil-change
+    "C" 'evil-collection-eshell-evil-change-line
+    "d" 'evil-collection-eshell-evil-delete
+    "D" 'evil-collection-eshell-evil-delete-line)
+  (evil-collection-bind 'eshell-mode-map
+                        'next-item 'eshell-next-prompt
+                        'prev-item 'eshell-previous-prompt
+                        'next-section 'eshell-next-prompt
+                        'prev-section 'eshell-previous-prompt
+                        'history-previous 'eshell-previous-matching-input-from-input
+                        'history-next     'eshell-next-matching-input-from-input
+                        'repl-submit 'eshell-send-input
+                        'repl-newline 'newline
+                        'repl-force-newline 'newline)
+
+  (when (< emacs-major-version 30)
+    (evil-collection-define-key 'normal 'eshell-mode-map
+      "0" 'eshell-bol
+      "^" 'eshell-bol))
+
+  (when evil-want-C-u-delete
+    (evil-collection-define-key 'insert 'eshell-mode-map
+      (kbd "C-u") 'eshell-kill-input))
+
+  (evil-collection-define-key 'visual 'eshell-mode-map
+    ;; motion
+    ;; TODO: This does not work with `evil-visual-line'.
+    "[[" 'eshell-previous-prompt
+    "]]" 'eshell-next-prompt
+    (kbd "C-k") 'eshell-previous-prompt
+    (kbd "C-j") 'eshell-next-prompt
+    "gk" 'eshell-previous-prompt
+    "gj" 'eshell-next-prompt)
+
+  (when (< emacs-major-version 30)
+    (evil-collection-define-key 'visual 'eshell-mode-map
+      "0" 'eshell-bol
+      "^" 'eshell-bol))
+
+  (evil-normalize-keymaps)
+  (unless evil-collection-always-run-setup-hook-after-load
+    (run-hook-with-args
+     'evil-collection-setup-hook 'eshell evil-collection-eshell-maps)))
+
+;; TODO: Compare this setup procedure with evil-ediff.
+;;;###autoload
+(defun evil-collection-eshell-setup ()
+  "Set up `evil' bindings for `eshell'."
+  (add-hook 'eshell-mode-hook #'evil-collection-eshell-escape-stay)
+  (add-hook 'eshell-mode-hook #'evil-collection-eshell-next-prompt-on-insert)
+  (add-hook 'eshell-first-time-mode-hook #'evil-collection-eshell-setup-keys))
+
+(provide 'evil-collection-eshell)
+;;; evil-collection-eshell.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eshell/evil-collection-eshell.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eshell/evil-collection-eshell.elc
new file mode 100644
index 0000000..42cf6a8
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eshell/evil-collection-eshell.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eval-sexp-fu/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eval-sexp-fu/README.org
new file mode 100644
index 0000000..6563ec9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eval-sexp-fu/README.org
@@ -0,0 +1,16 @@
+* eval-sexp-fu
+
+  Evil compatibility for [[https://github.com/hchbaw/eval-sexp-fu.el][eval-sexp-fu]]. No key bindings.
+
+  When =evil-move-beyond-eol= is nil, the setup advises
+  =ad-Advice-eval-last-sexp= so that =eval-last-sexp= treats the sexp under
+  point as ending at point (rather than one character earlier as evil's
+  normal-state cursor positioning would imply). This makes =C-x C-e= and
+  related commands work the way they do in evil's insert/emacs states.
+
+** New commands
+
+   - =evil-collection-eval-sexp-fu-bounds-of-thing-at-point-sexp= - Advice
+     wrapper that fixes the sexp bounds in evil normal/motion state.
+   - =evil-collection-eval-sexp-fu-advise-bounds-of-thing-at-point= - Wraps
+     the advice around a single call to =eval-last-sexp=.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eval-sexp-fu/evil-collection-eval-sexp-fu.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eval-sexp-fu/evil-collection-eval-sexp-fu.el
new file mode 100644
index 0000000..08d04f8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eval-sexp-fu/evil-collection-eval-sexp-fu.el
@@ -0,0 +1,61 @@
+;;; evil-collection-eval-sexp-fu.el --- Bindings for `eval-sexp-fu' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, eval-sexp-fu, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `eval-sexp-fu'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'eval-sexp-fu nil t)
+
+(defconst evil-collection-eval-sexp-fu-maps nil)
+
+(defun evil-collection-eval-sexp-fu-bounds-of-thing-at-point-sexp (command &rest args)
+  "In normal-state or motion-state, last sexp ends at point."
+  (if (and (eq (nth 0 args) 'sexp)
+           (and (not evil-move-beyond-eol)
+                (or (evil-normal-state-p) (evil-motion-state-p))))
+      (save-excursion
+        (unless (or (eobp) (eolp)) (forward-char))
+        (apply command args))
+    (apply command args)))
+
+(defun evil-collection-eval-sexp-fu-advise-bounds-of-thing-at-point (command &rest args)
+  "Advise `bounds-of-thing-at-point' to handle `evil's `evil-move-beyond-eol'."
+  (advice-add 'bounds-of-thing-at-point
+              :around #'evil-collection-eval-sexp-fu-bounds-of-thing-at-point-sexp)
+  (apply command args)
+  (advice-remove 'bounds-of-thing-at-point
+                 #'evil-collection-eval-sexp-fu-bounds-of-thing-at-point-sexp))
+
+;;;###autoload
+(defun evil-collection-eval-sexp-fu-setup ()
+  "Set up `evil' with `eval-sexp-fu'."
+  (unless evil-move-beyond-eol
+    (advice-add 'ad-Advice-eval-last-sexp
+                :around #'evil-collection-eval-sexp-fu-advise-bounds-of-thing-at-point)))
+
+(provide 'evil-collection-eval-sexp-fu)
+;;; evil-collection-eval-sexp-fu.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eval-sexp-fu/evil-collection-eval-sexp-fu.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eval-sexp-fu/evil-collection-eval-sexp-fu.elc
new file mode 100644
index 0000000..dc3d39d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eval-sexp-fu/evil-collection-eval-sexp-fu.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-ghostel/evil-collection-evil-ghostel.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-ghostel/evil-collection-evil-ghostel.el
new file mode 100644
index 0000000..708d890
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-ghostel/evil-collection-evil-ghostel.el
@@ -0,0 +1,47 @@
+;;; evil-collection-evil-ghostel.el --- Bindings for `evil-ghostel' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, ghostel, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `evil-ghostel'.
+;;
+;; `evil-ghostel' ships its own evil bindings in `evil-ghostel-mode-map'.
+;; This module layers `evil-collection's customizable theme bindings on top.
+
+;;; Code:
+(require 'evil-collection)
+(require 'evil-ghostel nil t)
+
+(defvar evil-ghostel-mode-map)
+
+(defconst evil-collection-evil-ghostel-maps '(evil-ghostel-mode-map))
+
+;;;###autoload
+(defun evil-collection-evil-ghostel-setup ()
+  "Set up `evil' bindings for `evil-ghostel'."
+  (evil-collection-bind 'evil-ghostel-mode-map
+                              'term-toggle-escape
+                              'evil-ghostel-toggle-send-escape))
+
+(provide 'evil-collection-evil-ghostel)
+;;; evil-collection-evil-ghostel.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-ghostel/evil-collection-evil-ghostel.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-ghostel/evil-collection-evil-ghostel.elc
new file mode 100644
index 0000000..dfcfd11
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-ghostel/evil-collection-evil-ghostel.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-mc/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-mc/README.org
new file mode 100644
index 0000000..c23adfd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-mc/README.org
@@ -0,0 +1,49 @@
+* evil-mc
+
+  Evil bindings for [[https://github.com/gabesoft/evil-mc][evil-mc]], multiple cursors for evil.
+
+  Upstream installs its cursors map under =gr= on top of the normal/visual
+  state. evil-collection clears both =evil-mc-key-map= and
+  =evil-mc-cursors-map= and re-installs the cursors map under =g.= so =gr=
+  stays free for =xref-find-references=.
+
+** Key bindings
+
+*** evil-mc-key-map
+
+    | Command               | Original | Evil |
+    |-----------------------+----------+------|
+    | =evil-mc-cursors-map= | =gr=     | =g.= |
+
+*** evil-mc-cursors-map
+
+    Prefix is =g.= in normal/visual state.
+
+    | Command                                       | Original | Evil    |
+    |-----------------------------------------------+----------+---------|
+    | =evil-mc-make-all-cursors=                    | =m=      | =a=     |
+    | =evil-mc-undo-all-cursors=                    | =q=      | =q=     |
+    | =evil-mc-undo-last-added-cursor=              | =u=      | =u=     |
+    | =evil-mc-pause-cursors=                       | =s=      | =C-p=   |
+    | =evil-mc-resume-cursors=                      | =r=      | =C-r=   |
+    | =evil-mc-make-cursor-here=                    | =h=      | =C-m=   |
+    | =evil-mc-make-and-goto-first-cursor=          | =f=      | =0=     |
+    | =evil-mc-make-and-goto-last-cursor=           | =l=      | =$=     |
+    | =evil-mc-make-cursor-in-visual-selection-beg= | =I=      | =I=     |
+    | =evil-mc-make-cursor-in-visual-selection-end= | =A=      | =A=     |
+    | =evil-mc-make-cursor-move-next-line=          | =j=      | =o=     |
+    | =evil-mc-make-cursor-move-prev-line=          | =k=      | =O=     |
+    | =evil-mc-make-and-goto-next-match=            | =n=      | =n=     |
+    | =evil-mc-make-and-goto-prev-match=            | =N=      | =N=     |
+    | =evil-mc-skip-and-goto-next-match=            | =n=      | =C-n=   |
+    | =evil-mc-skip-and-goto-prev-match=            | =p=      | =C-S-n= |
+    | =evil-mc-make-and-goto-next-cursor=           | =M-n=    | =M-n=   |
+    | =evil-mc-make-and-goto-prev-cursor=           | =M-p=    | =M-N=   |
+    | =evil-mc-skip-and-goto-next-cursor=           | =N=      | =C-u=   |
+    | =evil-mc-skip-and-goto-prev-cursor=           | =P=      | =C-S-u= |
+
+** Notes
+
+   A hook on =evil-mc-after-cursors-deleted= sets
+   =evil-was-yanked-without-register= so paste after cursor deletion does
+   not clobber the unnamed register (see upstream issue #70).
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-mc/evil-collection-evil-mc.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-mc/evil-collection-evil-mc.el
new file mode 100644
index 0000000..5ef1d9b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-mc/evil-collection-evil-mc.el
@@ -0,0 +1,79 @@
+;;; evil-collection-evil-mc.el --- Bindings for evil-mc -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.2
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for evil-mc.
+
+;;; Code:
+(require 'evil-collection)
+(require 'evil-mc nil t)
+(eval-when-compile (require 'subr-x)) ; `if-let*' and `when-let*'
+
+(defvar evil-mc-key-map)
+(defvar evil-mc-cursors-map)
+(defconst evil-collection-evil-mc-maps '(evil-mc-key-map evil-mc-cursors-map))
+
+;;;###autoload
+(defun evil-collection-evil-mc-setup ()
+  "Set up `evil' bindings for evil-mc."
+
+  (setcdr evil-mc-cursors-map nil)
+
+  (define-key evil-mc-cursors-map (kbd "a") 'evil-mc-make-all-cursors)
+  (define-key evil-mc-cursors-map (kbd "q") 'evil-mc-undo-all-cursors)
+  (define-key evil-mc-cursors-map (kbd "u") 'evil-mc-undo-last-added-cursor)
+
+  (define-key evil-mc-cursors-map (kbd "C-p") 'evil-mc-pause-cursors)
+  (define-key evil-mc-cursors-map (kbd "C-r") 'evil-mc-resume-cursors)
+  (define-key evil-mc-cursors-map (kbd "C-m") 'evil-mc-make-cursor-here)
+
+  (define-key evil-mc-cursors-map (kbd "0") 'evil-mc-make-and-goto-first-cursor)
+  (define-key evil-mc-cursors-map (kbd "$") 'evil-mc-make-and-goto-last-cursor)
+
+  (define-key evil-mc-cursors-map (kbd "I") 'evil-mc-make-cursor-in-visual-selection-beg)
+  (define-key evil-mc-cursors-map (kbd "A") 'evil-mc-make-cursor-in-visual-selection-end)
+
+  (define-key evil-mc-cursors-map (kbd "o") 'evil-mc-make-cursor-move-next-line)
+  (define-key evil-mc-cursors-map (kbd "O") 'evil-mc-make-cursor-move-prev-line)
+
+  (define-key evil-mc-cursors-map (kbd "n") 'evil-mc-make-and-goto-next-match)
+  (define-key evil-mc-cursors-map (kbd "N") 'evil-mc-make-and-goto-prev-match)
+  (define-key evil-mc-cursors-map (kbd "C-n") 'evil-mc-skip-and-goto-next-match)
+  (define-key evil-mc-cursors-map (kbd "C-S-n") 'evil-mc-skip-and-goto-prev-match)
+  (define-key evil-mc-cursors-map (kbd "M-n") 'evil-mc-make-and-goto-next-cursor)
+  (define-key evil-mc-cursors-map (kbd "M-N") 'evil-mc-make-and-goto-prev-cursor)
+  (define-key evil-mc-cursors-map (kbd "C-u") 'evil-mc-skip-and-goto-next-cursor)
+  (define-key evil-mc-cursors-map (kbd "C-S-u") 'evil-mc-skip-and-goto-prev-cursor)
+
+  (setcdr evil-mc-key-map nil)
+  (evil-collection-define-key '(normal visual) 'evil-mc-key-map (kbd "g.") evil-mc-cursors-map)
+
+  ;; https://github.com/gabesoft/evil-mc/issues/70
+  (add-hook 'evil-mc-after-cursors-deleted
+            (lambda ()
+              (setq evil-was-yanked-without-register t))))
+
+(provide 'evil-collection-evil-mc)
+;;; evil-collection-evil-mc.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-mc/evil-collection-evil-mc.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-mc/evil-collection-evil-mc.elc
new file mode 100644
index 0000000..ce0631a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/evil-mc/evil-collection-evil-mc.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eww/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eww/README.org
new file mode 100644
index 0000000..2b0aaa4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eww/README.org
@@ -0,0 +1,61 @@
+* eww
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/eww/index.html][EWW]] (Emacs Web Wowser).
+
+** eww-mode-map
+
+   | Command                            | Original   | Evil               |
+   |------------------------------------+------------+--------------------|
+   | =eww-up-url=                       | =u=        | =^=, =u=           |
+   | =eww-top-url=                      | =t=        | =U=                |
+   | =eww-back-url=                     | =l=, =DEL= | =H=, =DEL=         |
+   | =eww-forward-url=                  | =r=        | =L=                |
+   | =eww-view-source=                  | =v=        | =gf=               |
+   | =eww-browse-with-external-browser= | =&=        | =&=, =S-RET=, =go= |
+   | =url-cookie-list=                  | =C=        | =gc=               |
+   | =eww-toggle-paragraph-direction=   | =D=        | =zd=               |
+   | =eww-set-character-encoding=       | =E=        | =ze=               |
+   | =eww-toggle-fonts=                 | =F=        | =zf=               |
+   | =eww-download=                     | =d=        | =d=                |
+   | =eww-add-bookmark=                 | =b=        | =m=                |
+   | =eww-readable=                     | =R=        | =R=, =r=           |
+   | =eww-next-url=                     | =n=        | =]]=, =gj=         |
+   | =eww-previous-url=                 | =p=        | =[[=, =gk=         |
+   | =eww=                              | =G=        | =o=                |
+   | =scroll-up-command=                | n/a        | =SPC=              |
+   | =scroll-down-command=              | n/a        | =S-SPC=            |
+   | =shr-next-link=                    | =TAB=      | =TAB=              |
+   | =shr-previous-link=                | =S-TAB=    | =S-TAB=            |
+   | =eww-list-bookmarks=               | =B=        | =gb=               |
+   | =eww-list-histories=               | =H=        | =gh=               |
+   | =eww-list-buffers=                 | =S=        | =gt=               |
+   | =eww-reload=                       | =g=        | =gr=               |
+   | =eww-copy-page-url= (=y= operator) | =w=        | =yu=               |
+   | =quit-window=                      | n/a        | =q=, =ZQ=, =ZZ=    |
+
+** eww-history-mode-map
+
+   | Command              | Original | Evil  |
+   |----------------------+----------+-------|
+   | =eww-history-browse= | =RET=    | =RET= |
+   | =revert-buffer=      | n/a      | =gr=  |
+
+** eww-buffers-mode-map
+
+   | Command                    | Original | Evil       |
+   |----------------------------+----------+------------|
+   | =eww-buffer-kill=          | =D=      | =D=        |
+   | =eww-buffer-select=        | =RET=    | =RET=      |
+   | =eww-buffer-show-next=     | n/a      | =]]=, =gj= |
+   | =eww-buffer-show-previous= | n/a      | =[[=, =gk= |
+   | =revert-buffer=            | n/a      | =gr=       |
+
+** eww-bookmark-mode-map
+
+   | Command                            | Original | Evil  |
+   |------------------------------------+----------+-------|
+   | =eww-bookmark-kill=                | =D=      | =D=   |
+   | =eww-bookmark-yank=                | =P=      | =P=   |
+   | =eww-bookmark-browse=              | =RET=    | =RET= |
+   | =revert-buffer=                    | n/a      | =gr=  |
+   | =eww-copy-page-url= (=y= operator) | n/a      | =yu=  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eww/evil-collection-eww.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eww/evil-collection-eww.el
new file mode 100644
index 0000000..c40445f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eww/evil-collection-eww.el
@@ -0,0 +1,120 @@
+;;; evil-collection-eww.el --- Evil bindings for EWW -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, eww, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for EWW.
+
+;;; Code:
+(require 'eww)
+(require 'evil-collection)
+
+(defvar evil-collection-eww-maps '(eww-mode-map
+                                   eww-history-mode-map
+                                   eww-buffers-mode-map
+                                   eww-bookmark-mode-map))
+
+;;;###autoload
+(defun evil-collection-eww-setup ()
+  "Set up `evil' bindings for `eww'."
+
+  (evil-set-initial-state 'eww-mode 'normal)
+  (evil-collection-define-key 'normal 'eww-mode-map
+    "^" 'eww-up-url
+    "u" 'eww-up-url
+    "U" 'eww-top-url
+    (kbd "DEL") 'eww-back-url
+    "H" 'eww-back-url
+    "L" 'eww-forward-url
+
+    "&" 'eww-browse-with-external-browser
+    "gc" 'url-cookie-list
+    "zd" 'eww-toggle-paragraph-direction
+    "ze" 'eww-set-character-encoding
+    "zf" 'eww-toggle-fonts
+    "d" 'eww-download
+    "m" 'eww-add-bookmark
+    "R" 'eww-readable                   ; Default binding.
+    "r" 'eww-readable
+
+    "o" 'eww                            ; Like qutebrowser.
+
+    ;; bookmarks
+    "gb" 'eww-list-bookmarks
+
+    "gh" 'eww-list-histories
+    "gt" 'eww-list-buffers)             ; Like dwb, qutebrowser.
+  (evil-collection-bind 'eww-mode-map
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'next-item 'eww-next-url
+                        'prev-item 'eww-previous-url
+                        'next-section 'eww-next-url
+                        'prev-section 'eww-previous-url
+                        'action-other 'eww-browse-with-external-browser
+                        'browse-url 'eww-browse-with-external-browser
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window
+                        'refresh 'eww-reload)
+
+  (evil-collection-define-operator-key 'yank 'eww-mode-map
+    "u" 'eww-copy-page-url)
+
+  (evil-collection-bind 'eww-mode-map
+                        'cycle-next 'shr-next-link
+                        'cycle-previous 'shr-previous-link
+                        'find-file 'eww-view-source)
+
+  (evil-collection-set-readonly-bindings 'eww-history-mode-map)
+  (evil-set-initial-state 'eww-history-mode 'normal)
+  (evil-collection-bind 'eww-history-mode-map
+                        'action 'eww-history-browse
+                        'refresh 'revert-buffer)
+
+  (evil-collection-set-readonly-bindings 'eww-buffers-mode-map)
+  (evil-set-initial-state 'eww-buffers-mode 'normal)
+  (evil-collection-bind 'eww-buffers-mode-map
+                        'action 'eww-buffer-select
+                        'next-item 'eww-buffer-show-next
+                        'prev-item 'eww-buffer-show-previous
+                        'next-section 'eww-buffer-show-next
+                        'prev-section 'eww-buffer-show-previous
+                        'refresh 'revert-buffer
+                        'delete 'eww-buffer-kill)
+
+  (evil-collection-set-readonly-bindings 'eww-bookmark-mode-map)
+  (evil-set-initial-state 'eww-bookmark-mode 'normal)
+  (evil-collection-define-key 'normal 'eww-bookmark-mode-map
+    "P" 'eww-bookmark-yank)
+  (evil-collection-bind 'eww-bookmark-mode-map
+                        'action 'eww-bookmark-browse
+                        'refresh 'revert-buffer
+                        'delete 'eww-bookmark-kill)
+
+  (evil-collection-define-operator-key 'yank 'eww-bookmark-mode-map
+    "u" 'eww-copy-page-url))
+
+(provide 'evil-collection-eww)
+;;; evil-collection-eww.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eww/evil-collection-eww.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eww/evil-collection-eww.elc
new file mode 100644
index 0000000..f425bcd
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/eww/evil-collection-eww.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/explain-pause-mode/evil-collection-explain-pause-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/explain-pause-mode/evil-collection-explain-pause-mode.el
new file mode 100644
index 0000000..ae86c3f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/explain-pause-mode/evil-collection-explain-pause-mode.el
@@ -0,0 +1,50 @@
+;;; evil-collection-explain-pause-mode.el --- Evil bindings for explain-pause-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for explain-pause-mode.
+
+;;; Code:
+(require 'evil-collection)
+(require 'explain-pause-mode nil t)
+
+(defconst evil-collection-explain-pause-mode-maps '(explain-pause-top-mode-map))
+
+;;;###autoload
+(defun evil-collection-explain-pause-mode-setup ()
+  "Set up `evil' bindings for `explain-pause-mode'."
+  (evil-set-initial-state 'explain-pause-top-mode 'normal)
+  (evil-collection-define-key 'normal 'explain-pause-top-mode-map
+    "a" 'explain-pause-top-auto-refresh
+    "c" 'explain-pause-top-clear
+    "o" 'explain-pause-top-sort)
+  (evil-collection-bind 'explain-pause-top-mode-map
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window))
+
+(provide 'evil-collection-explain-pause-mode)
+
+;;; evil-collection-explain-pause-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/explain-pause-mode/evil-collection-explain-pause-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/explain-pause-mode/evil-collection-explain-pause-mode.elc
new file mode 100644
index 0000000..46fe243
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/explain-pause-mode/evil-collection-explain-pause-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fanyi/evil-collection-fanyi.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fanyi/evil-collection-fanyi.el
new file mode 100644
index 0000000..af7a539
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fanyi/evil-collection-fanyi.el
@@ -0,0 +1,47 @@
+;;; evil-collection-fanyi.el --- Evil bindings for fanyi -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for fanyi.
+
+;;; Code:
+(require 'evil-collection)
+(require 'fanyi nil t)
+
+(defconst evil-collection-fanyi-maps '(fanyi-mode-map))
+
+;;;###autoload
+(defun evil-collection-fanyi-setup ()
+  "Set up `evil' bindings for `fanyi'."
+  (evil-collection-set-readonly-bindings 'fanyi-mode-map)
+  (evil-collection-define-key 'normal 'fanyi-mode-map
+    ;; tab
+    [tab]     'forward-button
+    [backtab] 'backward-button
+
+    "s" 'fanyi-dwim))
+
+(provide 'evil-collection-fanyi)
+;;; evil-collection-fanyi.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fanyi/evil-collection-fanyi.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fanyi/evil-collection-fanyi.elc
new file mode 100644
index 0000000..bcfa00e
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fanyi/evil-collection-fanyi.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/finder/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/finder/README.org
new file mode 100644
index 0000000..56562b9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/finder/README.org
@@ -0,0 +1,13 @@
+* finder
+
+  Evil bindings for =finder-mode= (the package-keyword browser opened by
+  =M-x finder-by-keyword=).
+
+** Key bindings
+
+   | Command                | Original   | Evil         |
+   |------------------------+------------+--------------|
+   | =finder-select=        | =RET=, =f= | =RET=, =SPC= |
+   | =finder-list-keywords= | =d=        | =d=          |
+   | =finder-summary=       | =?=        | =s=          |
+   | =finder-exit=          | =q=        | =q=          |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/finder/evil-collection-finder.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/finder/evil-collection-finder.el
new file mode 100644
index 0000000..22b2c8e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/finder/evil-collection-finder.el
@@ -0,0 +1,50 @@
+;;; evil-collection-finder.el --- Evil bindings for finder -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, finder, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for finder.
+
+;;; Code:
+(require 'evil-collection)
+(require 'finder)
+
+(defconst evil-collection-finder-maps '(finder-mode-map))
+
+;;;###autoload
+(defun evil-collection-finder-setup ()
+  "Set up `evil' bindings for `finder'."
+  (evil-set-initial-state 'finder-mode 'normal)
+
+  (evil-collection-define-key 'normal 'finder-mode-map
+    (kbd "SPC") 'finder-select
+
+    "d" 'finder-list-keywords
+    "s" 'finder-summary)
+  (evil-collection-bind 'finder-mode-map
+                        'action 'finder-select
+                        'quit 'finder-exit))
+
+(provide 'evil-collection-finder)
+;;; evil-collection-finder.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/finder/evil-collection-finder.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/finder/evil-collection-finder.elc
new file mode 100644
index 0000000..aeeb07b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/finder/evil-collection-finder.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fj/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fj/README.org
new file mode 100644
index 0000000..0dceccf
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fj/README.org
@@ -0,0 +1,44 @@
+* fj
+
+  Evil bindings for [[https://codeberg.org/martianh/fj.el][fj.el]], an Emacs client for Forgejo instances such as Codeberg.
+
+** Key bindings
+
+   The bindings add Evil-state alternatives for common fj.el actions while
+   leaving fj.el's own non-Evil keymaps intact.
+
+   | Command                  | Original  | Evil              |
+   |--------------------------+-----------+-------------------|
+   | =fj-switch-to-buffer=    | =/=       | =gb=              |
+   | =fj-view-reload=         | =g=       | =gr=              |
+   | =fj-item-next=           | =n=       | =]]=, =gj=, =C-j= |
+   | =fj-item-prev=           | =p=       | =[[=, =gk=, =C-k= |
+   | =fj-next-page=           | =.=       | =>=               |
+   | =fj-prev-page=           | =,=       | =<=               |
+   | =fj-tl-browse-entry=     | =B=       | =go=              |
+   | =fj-browse-view=         | =b=       | =go=              |
+   | =imenu=                  | =j=       | =gm=              |
+   | =fj-repo-copy-clone-url= | =u=, =L=  | =yc=              |
+   | =fj-copy-item-url=       | =C=       | =yu=              |
+   | =fj-item-comment=        | =C=, =c=  | =c=               |
+   | =fj-create-issue=        | =c=       | =C=               |
+   | =fj-repo-search=         | =s=       | =g/=              |
+   | =fj-list-issues-search=  | =s=       | =g/=              |
+   | =fj-repo-readme=         | =r=       | =r=               |
+   | =fj-item-edit=           | =e=       | =e=               |
+   | =fj-item-close=          | =k=       | =x=               |
+   | =fj-item-reopen=         | =o=       | =u=               |
+   | =fj-item-delete=         | =K=       | =X=               |
+   | =fj-item-edit-title=     | =t=       | =E=               |
+   | =fj-item-label-add=      | =l=       | =al=              |
+   | =fj-add-reaction=        | =r=       | =ar=              |
+   | =fj-view-pull-diff=      | =D=       | =gd=              |
+   | =fj-repo-commit-log=     | =L=       | =gL=              |
+   | =fj-merge-pull=          | =M=       | =gM=              |
+   | =fj-item-view-more=      | =>=       | =>=               |
+   | =fj-compose-send=        | =C-c C-c= | =ZZ=              |
+   | =fj-compose-cancel=      | =C-c C-k= | =ZQ=              |
+
+   Repo, issue, notification, commit, and user views start in normal state.
+   Compose buffers start in insert state and use normal-state =ZZ=/=ZQ= for
+   submit/cancel, matching other editable buffers in Evil Collection.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fj/evil-collection-fj.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fj/evil-collection-fj.el
new file mode 100644
index 0000000..424b46d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fj/evil-collection-fj.el
@@ -0,0 +1,194 @@
+;;; evil-collection-fj.el --- Evil bindings for fj -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026 0WD0
+
+;; Author: 0WD0 <wd.1105848296@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, fj, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for fj.el.
+
+;;; Code:
+(require 'evil-collection)
+(require 'fj nil t)
+
+(defvar fj-commits-mode-map)
+(defvar fj-compose-comment-mode)
+(defvar fj-compose-comment-mode-map)
+(defvar fj-compose-mode)
+(defvar fj-compose-mode-map)
+(defvar fj-generic-map)
+(defvar fj-generic-tl-map)
+(defvar fj-issue-tl-mode-map)
+(defvar fj-item-view-mode-map)
+(defvar fj-notifications-mode-map)
+(defvar fj-owned-issues-tl-mode-map)
+(defvar fj-repo-tl-map)
+(defvar fj-repo-tl-mode-map)
+(defvar fj-user-repo-tl-mode-map)
+(defvar fj-users-mode-map)
+
+(defconst evil-collection-fj-maps
+  '(fj-commits-mode-map
+    fj-compose-comment-mode-map
+    fj-compose-mode-map
+    fj-generic-map
+    fj-generic-tl-map
+    fj-issue-tl-mode-map
+    fj-item-view-mode-map
+    fj-notifications-mode-map
+    fj-owned-issues-tl-mode-map
+    fj-repo-tl-map
+    fj-repo-tl-mode-map
+    fj-user-repo-tl-mode-map
+    fj-users-mode-map))
+
+(defconst evil-collection-fj-view-maps
+  '(fj-commits-mode-map
+    fj-item-view-mode-map
+    fj-notifications-mode-map
+    fj-users-mode-map))
+
+(defconst evil-collection-fj-tabulated-list-maps
+  '(fj-issue-tl-mode-map
+    fj-owned-issues-tl-mode-map
+    fj-repo-tl-map
+    fj-repo-tl-mode-map
+    fj-user-repo-tl-mode-map))
+
+(defun evil-collection-fj--setup-compose-buffer ()
+  "Set up Evil bindings for the current fj compose buffer."
+  (evil-collection-bind-local 'quit-save   'fj-compose-send)
+  (evil-collection-bind-local 'quit-cancel 'fj-compose-cancel)
+  (evil-insert-state))
+
+;;;###autoload
+(defun evil-collection-fj-setup ()
+  "Set up `evil' bindings for fj.el."
+  (dolist (mode '(fj-commits-mode
+                  fj-issue-tl-mode
+                  fj-item-view-mode
+                  fj-notifications-mode
+                  fj-owned-issues-tl-mode
+                  fj-repo-tl-mode
+                  fj-user-repo-tl-mode
+                  fj-users-mode))
+    (evil-set-initial-state mode 'normal))
+
+  (dolist (map evil-collection-fj-view-maps)
+    (evil-collection-set-readonly-bindings map))
+  (dolist (map evil-collection-fj-tabulated-list-maps)
+    (evil-collection-set-readonly-bindings map))
+
+  (evil-collection-bind 'fj-issue-tl-mode-map 'edit 'fj-item-edit)
+  (evil-collection-bind 'fj-item-view-mode-map 'edit 'fj-item-edit)
+
+  (evil-collection-define-key 'normal 'fj-generic-map
+    "gb" 'fj-switch-to-buffer)
+  (evil-collection-bind 'fj-generic-map
+                        'cycle-next 'fj-next-tab-item
+                        'cycle-previous 'fj-prev-tab-item
+                        'action-other 'fj-browse-view
+                        'next-item 'fj-item-next
+                        'prev-item 'fj-item-prev
+                        'next-section 'fj-item-next
+                        'prev-section 'fj-item-prev)
+
+  (evil-collection-define-key 'normal 'fj-generic-tl-map
+    "gb" 'fj-switch-to-buffer
+    "gm" 'imenu
+    ">" 'fj-next-page
+    "<" 'fj-prev-page)
+  (evil-collection-bind 'fj-generic-tl-map
+                        'cycle-next 'fj-next-tab-item
+                        'cycle-previous 'fj-prev-tab-item
+                        'action-other 'fj-tl-browse-entry)
+  (evil-collection-bind 'fj-generic-map 'refresh    'fj-view-reload)
+  (evil-collection-bind 'fj-generic-tl-map 'refresh 'fj-view-reload)
+
+  (evil-collection-define-key 'normal 'fj-repo-tl-map
+    "C" 'fj-create-issue
+    "r" 'fj-repo-readme
+    "g/" 'fj-repo-search
+    "gm" 'imenu)
+  (evil-collection-bind 'fj-repo-tl-map
+                        'action 'fj-repo-list-issues
+                        'action-other 'fj-tl-browse-entry
+                        'action-stay 'fj-repo-list-pulls)
+  (evil-collection-define-operator-key 'yank 'fj-repo-tl-map
+    "c" 'fj-repo-copy-clone-url)
+
+  (evil-collection-define-key 'normal 'fj-issue-tl-mode-map
+    "c" 'fj-item-comment
+    "C" 'fj-create-issue
+    "E" 'fj-item-edit-title
+    "g/" 'fj-list-issues-search
+    "x" 'fj-item-close
+    "X" 'fj-item-delete
+    "u" 'fj-item-reopen
+    "al" 'fj-item-label-add
+    "gL" 'fj-repo-commit-log
+    "gm" 'imenu)
+  (evil-collection-bind 'fj-issue-tl-mode-map
+                        'action 'fj-issues-tl-view
+                        'action-other 'fj-tl-browse-entry)
+  (evil-collection-define-operator-key 'yank 'fj-issue-tl-mode-map
+    "c" 'fj-repo-copy-clone-url
+    "u" 'fj-copy-item-url)
+
+  (evil-collection-define-key 'normal 'fj-item-view-mode-map
+    "c" 'fj-item-comment
+    "E" 'fj-item-edit-title
+    "r" 'fj-add-reaction
+    "g/" 'fj-list-issues-search
+    "x" 'fj-item-close
+    "X" 'fj-item-delete
+    "u" 'fj-item-reopen
+    "al" 'fj-item-label-add
+    "ar" 'fj-add-reaction
+    "gd" 'fj-view-pull-diff
+    "gL" 'fj-repo-commit-log
+    "gM" 'fj-merge-pull
+    ">" 'fj-item-view-more)
+  (evil-collection-define-operator-key 'yank 'fj-item-view-mode-map
+    "u" 'fj-copy-item-url)
+
+  (evil-collection-define-key 'normal 'fj-notifications-mode-map
+    "g/" 'fj-list-issues-search
+    ">" 'fj-next-page
+    "<" 'fj-prev-page)
+
+  (evil-collection-define-key 'normal 'fj-commits-mode-map
+    "g/" 'fj-list-issues-search
+    "gL" 'fj-repo-commit-log)
+
+  (evil-collection-define-key 'normal 'fj-users-mode-map
+    "g/" 'fj-list-issues-search
+    "gL" 'fj-repo-commit-log
+    ">" 'fj-next-page
+    "<" 'fj-prev-page)
+
+  (add-hook 'fj-compose-comment-mode-hook
+            #'evil-collection-fj--setup-compose-buffer)
+  (add-hook 'fj-compose-mode-hook
+            #'evil-collection-fj--setup-compose-buffer))
+
+(provide 'evil-collection-fj)
+;;; evil-collection-fj.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fj/evil-collection-fj.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fj/evil-collection-fj.elc
new file mode 100644
index 0000000..76df5c0
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fj/evil-collection-fj.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flycheck/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flycheck/README.org
new file mode 100644
index 0000000..04031fe
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flycheck/README.org
@@ -0,0 +1,18 @@
+* flycheck
+
+  Evil bindings for the [[https://www.flycheck.org/][flycheck]] error list.
+
+  Initial state for =flycheck-error-list-mode= is =normal=.
+
+** flycheck-error-list-mode-map (normal state)
+
+   | Command                              | Original | Evil              |
+   |--------------------------------------+----------+-------------------|
+   | =flycheck-error-list-next-error=     | =n=      | =gj=, =C-j=, =]]= |
+   | =flycheck-error-list-previous-error= | =p=      | =gk=, =C-k=, =[[= |
+   | =flycheck-error-list-check-source=   | =g=      | =gr=              |
+   | =flycheck-error-list-set-filter=     | =f=      | =s=               |
+   | =flycheck-error-list-reset-filter=   | =F=      | =S=               |
+   | =flycheck-error-list-explain-error=  | =e=      | =x=               |
+   | =flycheck-error-list-goto-error=     | =RET=    | =RET=             |
+   | =quit-window=                        | =q=      | =q=               |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flycheck/evil-collection-flycheck.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flycheck/evil-collection-flycheck.el
new file mode 100644
index 0000000..ec5f74c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flycheck/evil-collection-flycheck.el
@@ -0,0 +1,55 @@
+;;; evil-collection-flycheck.el --- Evil bindings for flycheck -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, flycheck, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `flycheck-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'flycheck nil t)
+
+(defvar flycheck-error-list-mode-map)
+
+(defconst evil-collection-flycheck-maps '(flycheck-error-list-mode-map))
+
+;;;###autoload
+(defun evil-collection-flycheck-setup ()
+  "Set up `evil' bindings for `flycheck'."
+  (evil-set-initial-state 'flycheck-error-list-mode 'normal)
+  (evil-collection-define-key 'normal 'flycheck-error-list-mode-map
+    "S" 'flycheck-error-list-reset-filter
+    "x" 'flycheck-error-list-explain-error)
+  (evil-collection-bind 'flycheck-error-list-mode-map
+                        'action 'flycheck-error-list-goto-error
+                        'next-item 'flycheck-error-list-next-error
+                        'prev-item 'flycheck-error-list-previous-error
+                        'next-section 'flycheck-error-list-next-error
+                        'prev-section 'flycheck-error-list-previous-error
+                        'quit 'quit-window
+                        'refresh 'flycheck-error-list-check-source
+                        'search-or-filter 'flycheck-error-list-set-filter))
+
+(provide 'evil-collection-flycheck)
+;;; evil-collection-flycheck.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flycheck/evil-collection-flycheck.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flycheck/evil-collection-flycheck.elc
new file mode 100644
index 0000000..5451dae
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flycheck/evil-collection-flycheck.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flymake/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flymake/README.org
new file mode 100644
index 0000000..d46e8c2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flymake/README.org
@@ -0,0 +1,15 @@
+* flymake
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/flymake/index.html][Flymake]].
+
+** Key bindings
+
+   Applied to both =flymake-diagnostics-buffer-mode-map= and
+   =flymake-project-diagnostics-mode-map=.
+
+   | Command                   | Original | Evil                         |
+   |---------------------------+----------+------------------------------|
+   | =flymake-goto-next-error= | n/a      | =C-j=                        |
+   | =flymake-goto-prev-error= | n/a      | =C-k=                        |
+   | =flymake-goto-diagnostic= | =RET=    | =RET=                        |
+   | =flymake-show-diagnostic= | =SPC=    | =S-RET=, =M-RET=, =go=, =gO= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flymake/evil-collection-flymake.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flymake/evil-collection-flymake.el
new file mode 100644
index 0000000..1e9ef5c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flymake/evil-collection-flymake.el
@@ -0,0 +1,52 @@
+;;; evil-collection-flymake.el --- Evil Bindings for Flymake -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018, 2022 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, flymake, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `flymake-mode'.
+
+;;; Code:
+(require 'flymake)
+(require 'evil-collection)
+
+(defconst evil-collection-flymake-maps '(flymake-mode-map
+					 flymake-project-diagnostics-mode-map
+					 flymake-diagnostics-buffer-mode-map))
+
+;;;###autoload
+(defun evil-collection-flymake-setup ()
+  "Set up `evil' bindings for `flymake'."
+  (dolist (map '(flymake-diagnostics-buffer-mode-map flymake-project-diagnostics-mode-map))
+    (evil-collection-set-readonly-bindings map)
+    (evil-collection-bind map
+                          'action 'flymake-goto-diagnostic
+                          'action-other 'flymake-show-diagnostic
+                          'action-stay 'flymake-show-diagnostic
+                          'next-item 'flymake-goto-next-error
+                          'prev-item 'flymake-goto-prev-error
+                          'next-section 'flymake-goto-next-error
+                          'prev-section 'flymake-goto-prev-error)))
+
+(provide 'evil-collection-flymake)
+;;; evil-collection-flymake.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flymake/evil-collection-flymake.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flymake/evil-collection-flymake.elc
new file mode 100644
index 0000000..1f65d9b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/flymake/evil-collection-flymake.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/forge/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/forge/README.org
new file mode 100644
index 0000000..b7cf5d5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/forge/README.org
@@ -0,0 +1,44 @@
+* forge
+
+  Evil bindings for [[https://github.com/magit/forge][forge]].
+
+  Setup disables =forge-add-default-bindings= (which would clobber evil keys
+  on magit maps), then rebinds forge dispatch and remaps =magit-browse-thing=
+  on the relevant magit section maps. The state used is controlled by
+  =evil-collection-forge-state=.
+
+** Key bindings
+
+*** magit-mode-map
+
+    | Command          | Original | Evil |
+    |------------------+----------+------|
+    | =forge-dispatch= | (none)   | =@=  |
+
+*** magit-commit-section-map / magit-remote-section-map / magit-branch-section-map
+
+    | Command                                                 | Original | Evil                            |
+    |---------------------------------------------------------+----------+---------------------------------|
+    | =forge-browse-dwim= / =forge-browse-remote= / =-branch= | n/a      | (remap of =magit-browse-thing=) |
+    | =forge-visit-topic=                                     | n/a      | =C-c C-v= (commit / branch)     |
+
+** Transient extensions
+
+   The following are appended to magit transients:
+
+   | Transient           | Suffix                                    |
+   |---------------------+-------------------------------------------|
+   | =magit-dispatch=    | =@= Forge                                 |
+   | =magit-fetch=       | =n= forge topics, =N= forge notifications |
+   | =magit-pull=        | =n= forge topics, =N= forge notifications |
+   | =magit-branch=      | =f= pull-request, =F= from pull-request   |
+   | =magit-worktree=    | =n= pull-request worktree                 |
+   | =magit-status-jump= | =Np= pull-requests, =Ni= issues           |
+   | =magit-merge=       | =M= Merge using API                       |
+
+** Customization
+
+   | Variable                               | Default              | Purpose                                           |
+   |----------------------------------------+----------------------+---------------------------------------------------|
+   | =evil-collection-forge-use-y-for-yank= | =t=                  | Keep =y= as yank; also adds visual state.         |
+   | =evil-collection-forge-state=          | =normal= or =motion= | Evil state used for forge bindings on magit maps. |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/forge/evil-collection-forge.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/forge/evil-collection-forge.el
new file mode 100644
index 0000000..8bd6a71
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/forge/evil-collection-forge.el
@@ -0,0 +1,115 @@
+;;; evil-collection-forge.el --- Evil-based key bindings for forge  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Package-Requires: ((emacs "29.1") (evil "1.2.3"))
+;; Homepage: https://github.com/emacs-evil/evil-collection
+;; Version: 0.4.1
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library configures Magit and Evil to play well with each
+;; other. For some background see:
+;; https://github.com/emacs-evil/evil-collection/issues/543.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'forge nil t)
+(require 'transient nil t)
+
+(defconst evil-collection-forge-maps nil)
+
+(defcustom evil-collection-forge-use-y-for-yank t
+  "View `evil-collection-magit-state' for more information."
+  :group 'magit
+  :type 'boolean)
+
+(defcustom evil-collection-forge-state
+  (if evil-collection-forge-use-y-for-yank 'normal 'motion)
+  "State to use for forge."
+  :group 'magit
+  :type  'symbol)
+
+(defvar forge-add-default-bindings)
+
+;;;###autoload
+(defun evil-collection-forge-setup ()
+  "Set up `evil' bindings for `magit'."
+  ;; The latest release tag of forge doesn't include
+  ;; `forge-add-default-bindings' yet, it will throw an error:
+  ;;
+  ;;    void-variable `forge-add-default-bindings'
+  ;;
+  ;; for GNU Guix and MELPA stable users.
+  (when (bound-and-true-p forge-add-default-bindings)
+    (message "Setting `forge-add-default-bindings' to nil in `evil-collection-forge-setup'.
+To suppress this message you can set this variable to nil in your init.el file.")
+    (setq forge-add-default-bindings nil))
+  (let ((states (if evil-collection-forge-use-y-for-yank
+                    `(,evil-collection-forge-state visual)
+                  `(,evil-collection-forge-state))))
+    (dolist (state states)
+      (evil-collection-define-key state 'magit-mode-map "@" 'forge-dispatch)
+
+      (evil-collection-define-key
+        state 'magit-commit-section-map
+        [remap magit-browse-thing] 'forge-browse-dwim)
+      (evil-collection-define-key
+        state 'magit-remote-section-map
+        [remap magit-browse-thing] 'forge-browse-remote)
+      (evil-collection-define-key
+        state 'magit-branch-section-map
+        [remap magit-browse-thing] 'forge-browse-branch)
+
+      (evil-collection-define-key
+       state 'magit-commit-section-map (kbd "C-c C-v") 'forge-visit-topic)
+      (evil-collection-define-key
+       state 'magit-branch-section-map (kbd "C-c C-v") 'forge-visit-topic)))
+
+  ;; https://github.com/magit/forge/blob/master/lisp/forge.el
+
+  (transient-append-suffix 'magit-dispatch "!"
+    '("@" "Forge" forge-dispatch)) ;; N -> @
+
+  (transient-append-suffix 'magit-fetch "m"
+    '("n" "forge topics" forge-pull))
+  (transient-append-suffix 'magit-fetch "n"
+    '("N" "forge notifications" forge-pull-notifications))
+  (transient-append-suffix 'magit-pull "m"
+    '("n" "forge topics" forge-pull))
+  (transient-append-suffix 'magit-pull "n"
+    '("N" "forge notifications" forge-pull-notifications))
+  (transient-append-suffix 'magit-branch "w"
+    '("f" "pull-request" forge-checkout-pullreq))
+  (transient-append-suffix 'magit-branch "W"
+    '("F" "from pull-request" forge-branch-pullreq))
+  (transient-append-suffix 'magit-worktree "c"
+    '("n" "pull-request worktree" forge-checkout-worktree))
+  (transient-append-suffix 'magit-status-jump "w"
+    '("Np" "pull-requests" forge-jump-to-pullreqs))
+  (transient-append-suffix 'magit-status-jump "Np"
+    '("Ni" "issues" forge-jump-to-issues))
+  (transient-append-suffix 'magit-merge "a"
+    '(7 "M" "Merge using API" forge-merge)))
+
+;;; evil-collection-forge.el ends soon
+(provide 'evil-collection-forge)
+;; Local Variables:
+;; End:
+;;; evil-collection-forge.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/forge/evil-collection-forge.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/forge/evil-collection-forge.elc
new file mode 100644
index 0000000..aa89dd6
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/forge/evil-collection-forge.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/free-keys/evil-collection-free-keys.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/free-keys/evil-collection-free-keys.el
new file mode 100644
index 0000000..869c46d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/free-keys/evil-collection-free-keys.el
@@ -0,0 +1,53 @@
+;;; evil-collection-free-keys.el --- Bindings for `free-keys' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `free-keys'.
+(require 'evil-collection)
+(require 'free-keys nil t)
+
+;;; Code:
+(defvar free-keys-mode-map)
+
+(defconst evil-collection-free-keys-maps '(free-keys-mode-map))
+
+(defun evil-collection-free-keys-set-header-line-format ()
+  "Tweak `header-line-format' locally for `free-keys'."
+  (setq-local header-line-format
+              "Help: (c) change buffer (p) change prefix (q) quit"))
+
+;;;###autoload
+(defun evil-collection-free-keys-setup ()
+  "Set up `evil' bindings for `free-keys'."
+  (add-hook 'free-keys-mode-hook
+            #'evil-collection-free-keys-set-header-line-format)
+  (evil-set-initial-state 'free-keys-mode 'normal)
+  (evil-collection-define-key 'normal 'free-keys-mode-map
+    "c" 'free-keys-change-buffer
+    "p" 'free-keys-set-prefix)
+  (evil-collection-bind 'free-keys-mode-map 'quit 'quit-window))
+
+(provide 'evil-collection-free-keys)
+;;; evil-collection-free-keys.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/free-keys/evil-collection-free-keys.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/free-keys/evil-collection-free-keys.elc
new file mode 100644
index 0000000..973be61
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/free-keys/evil-collection-free-keys.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fzfa/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fzfa/README.org
new file mode 100644
index 0000000..a093e2f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fzfa/README.org
@@ -0,0 +1,19 @@
+* fzfa
+
+  Evil bindings for [[https://github.com/jojojames/fzfa][fzfa]].
+
+  No keymap is rebound. Setup marks fzfa's jump-style commands as
+  non-repeatable and registers them as evil jumps so =C-o= / =C-i= work after
+  selection.
+
+** Jump commands
+
+   The commands in =evil-collection-fzfa-jump-commands= are declared with
+   =:jump t= and =evil-declare-not-repeat=. This includes buffer-local jumps
+   (e.g. =fzfa-swiper=, =fzfa-imenu=, =fzfa-mark=, =fzfa-outline=,
+   =fzfa-evil-marks=) and cross-buffer / file jumps (e.g. =fzfa-buffer=,
+   =fzfa-recent-file=, =fzfa-find=, =fzfa-grep=, =fzfa-project-find-file=,
+   =fzfa-evil-jumps=, =fzfa-org-heading=, =fzfa-info=, etc.).
+
+   Non-jumping commands like =fzfa-yank-pop=, =fzfa-register=, =fzfa-M-x= and
+   the various history pickers are intentionally excluded.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fzfa/evil-collection-fzfa.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fzfa/evil-collection-fzfa.el
new file mode 100644
index 0000000..21b2759
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fzfa/evil-collection-fzfa.el
@@ -0,0 +1,124 @@
+;;; evil-collection-fzfa.el --- Evil bindings for fzfa -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, fzfa, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `fzfa'.
+;;
+;; The fzfa commands are autoloaded so no (require 'fzfa nil t) is needed.
+
+;;; Code:
+(require 'evil-collection)
+
+(defconst evil-collection-fzfa-maps nil)
+
+(defvar evil-collection-fzfa-jump-commands
+  '(;; Buffer-local jumps.
+    fzfa-swiper
+    fzfa-imenu
+    fzfa-imenu-all-but-current
+    fzfa-mark
+    fzfa-outline
+    fzfa-evil-marks
+    fzfa-regexp
+    fzfa-eglot-symbols
+    fzfa-ffap-menu
+    ;; Cross-buffer / file jumps.
+    fzfa-swiper-all
+    fzfa-imenu-all
+    fzfa-global-mark
+    fzfa-recent-file
+    fzfa-buffer
+    fzfa-bookmark
+    fzfa-tramp
+    fzfa-evil-jumps
+    fzfa-find
+    fzfa-fd
+    fzfa-locate
+    fzfa-grep
+    fzfa-grep-current-file
+    fzfa-ugrep
+    fzfa-rg
+    fzfa-rg-files
+    fzfa-ag
+    fzfa-ag-files
+    fzfa-git-grep
+    fzfa-git-ls-files
+    fzfa-git-modified-locally
+    fzfa-git-added-files
+    fzfa-git-staged-for-commit
+    fzfa-git-modified-in-head
+    fzfa-git-log-grep
+    fzfa-hg-files
+    fzfa-hg-modified-locally
+    fzfa-hg-added-files
+    fzfa-hg-modified-in-head
+    fzfa-vc-added-files
+    fzfa-vc-staged-for-commit
+    fzfa-vc-modified-in-head
+    fzfa-vc-any
+    fzfa-project-find-file
+    fzfa-project-find-dir
+    fzfa-project-buffer
+    fzfa-project-recentf
+    fzfa-project-switch-project
+    fzfa-compile-error
+    fzfa-flymake
+    fzfa-flymake-project
+    fzfa-org-heading
+    fzfa-org-heading-all
+    fzfa-org-agenda
+    fzfa-org-todo
+    fzfa-org-tags-view
+    fzfa-org-files
+    fzfa-org-grep
+    fzfa-org-mdfind-grep
+    fzfa-org-any
+    fzfa-info
+    fzfa-info-emacs
+    fzfa-info-elisp
+    fzfa-info-org
+    fzfa-info-cl
+    fzfa-info-eieio
+    fzfa-info-magit
+    fzfa-info-at-point
+    fzfa-hungry-swiper
+    fzfa-hungry-find
+    fzfa-find-any
+    fzfa-find-some
+    fzfa-evil-any)
+  "List of `fzfa' commands that should be treated as evil jumps.")
+
+(defun evil-collection-fzfa-set-bindings ()
+  "Set the bindings."
+  (dolist (cmd evil-collection-fzfa-jump-commands)
+    (evil-declare-not-repeat cmd)
+    (evil-set-command-property cmd :jump t)))
+
+;;;###autoload
+(defun evil-collection-fzfa-setup ()
+  "Set up `evil' bindings for `fzfa'."
+  (evil-collection-fzfa-set-bindings))
+
+(provide 'evil-collection-fzfa)
+;;; evil-collection-fzfa.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fzfa/evil-collection-fzfa.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fzfa/evil-collection-fzfa.elc
new file mode 100644
index 0000000..81874a6
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/fzfa/evil-collection-fzfa.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/geiser/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/geiser/README.org
new file mode 100644
index 0000000..d20565b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/geiser/README.org
@@ -0,0 +1,62 @@
+* geiser
+
+  Evil bindings for [[https://www.nongnu.org/geiser/][Geiser]] (Scheme).
+
+  Sets initial state to =normal= for =geiser-debug-mode= and
+  =geiser-doc-mode=. When =evil-move-beyond-eol= is nil, advises
+  =geiser-eval-last-sexp= and =geiser-eval-last-sexp-and-print= so the
+  last sexp is taken with point treated as one past EOL in normal/motion
+  state.
+
+** Key bindings
+
+*** geiser-mode-map
+
+    | Command                                | Original      | Evil  |
+    |----------------------------------------+---------------+-------|
+    | =geiser-edit-symbol-at-point=          | =M-.=         | =gd=  |
+    | =geiser-pop-symbol-stack=              | =M-,=         | =C-t= |
+    | =geiser-mode-switch-to-repl=           | =C-c C-z=     | =gz=  |
+    | =geiser-mode-switch-to-repl-and-enter= | =C-c C-a=     | =gZ=  |
+    | =geiser-doc-symbol-at-point=           | =C-c C-d C-d= | =K=   |
+
+*** geiser-repl-mode-map
+
+    | Command                           | Original      | Evil                                |
+    |-----------------------------------+---------------+-------------------------------------|
+    | =geiser-edit-symbol-at-point=     | =M-.=         | =gd=                                |
+    | =geiser-pop-symbol-stack=         | =M-,=         | =C-t=                               |
+    | =geiser-repl-next-prompt=         | =C-c C-n=     | =gj=, =C-j=, =]]=                   |
+    | =geiser-repl-previous-prompt=     | =C-c C-p=     | =gk=, =C-k=, =[[=                   |
+    | =geiser-doc-symbol-at-point=      | =C-c C-d C-d= | =K=                                 |
+    | =geiser-repl-maybe-send=          | =RET=         | =RET= (submit state)                |
+    | =geiser-repl--newline-and-indent= | =C-j=         | =S-<return>=, =RET= (newline state) |
+
+    Whether =RET= submits depends on =evil-collection-repl-submit-state=:
+    in =insert= (default) =RET= submits, =S-<return>= inserts a newline;
+    in =normal=, =RET= inserts a newline in insert state and submits in
+    normal state.
+
+*** geiser-doc-mode-map
+
+    | Command                       | Original     | Evil                 |
+    |-------------------------------+--------------+----------------------|
+    | =forward-button=              | =TAB=, =n=   | =TAB=, =gj=, =C-j=   |
+    | =backward-button=             | =S-TAB=, =p= | =S-TAB=, =gk=, =C-k= |
+    | =geiser-edit-symbol-at-point= | =.=          | =gd=                 |
+    | =geiser-pop-symbol-stack=     | =M-,=        | =C-t=                |
+    | =geiser-doc-refresh=          | =g=, =r=     | =gr=                 |
+    | =View-quit=                   | =q= (View)   | =q=                  |
+    | =geiser-doc-switch-to-repl=   | =z=          | =gz=                 |
+    | =geiser-doc-next=             | =f=          | =>=                  |
+    | =geiser-doc-previous=         | =b=          | =<=                  |
+    | =geiser-doc-next-section=     | =N=          | =]]=                 |
+    | =geiser-doc-previous-section= | =P=          | =[[=                 |
+    | =geiser-doc-kill-page=        | =k=          | =x=                  |
+    | =geiser-doc-clean-history=    | =c=          | =X=                  |
+
+*** geiser-debug-mode-map
+
+    | Command       | Original | Evil |
+    |---------------+----------+------|
+    | =quit-window= |          | =q=  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/geiser/evil-collection-geiser.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/geiser/evil-collection-geiser.el
new file mode 100644
index 0000000..df67404
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/geiser/evil-collection-geiser.el
@@ -0,0 +1,107 @@
+;;; evil-collection-geiser.el --- Bindings for `geiser' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, geiser, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `geiser'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'geiser nil t)
+
+(defvar geiser-debug-mode-map)
+(defvar geiser-doc-mode-map)
+
+(defconst evil-collection-geiser-maps '(geiser-debug-mode-map
+                                        geiser-doc-mode-map
+                                        geiser-repl-mode-map
+                                        geiser-mode-map))
+
+(defun evil-collection-geiser-last-sexp (command &rest args)
+  "In normal-state or motion-state, last sexp ends at point."
+  (if (and (not evil-move-beyond-eol)
+           (or (evil-normal-state-p) (evil-motion-state-p)))
+      (save-excursion
+        (unless (or (eobp) (eolp)) (forward-char))
+        (apply command args))
+    (apply command args)))
+
+;;;###autoload
+(defun evil-collection-geiser-setup ()
+  "Set up bindings for `geiser'."
+  (unless evil-move-beyond-eol
+    (advice-add 'geiser-eval-last-sexp :around #'evil-collection-geiser-last-sexp)
+    (advice-add 'geiser-eval-last-sexp-and-print :around #'evil-collection-geiser-last-sexp))
+
+  (evil-set-initial-state 'geiser-debug-mode 'normal)
+  (evil-set-initial-state 'geiser-doc-mode 'normal)
+
+  (evil-collection-bind 'geiser-debug-mode-map 'quit 'quit-window)
+
+  (evil-collection-bind 'geiser-doc-mode-map
+                        'find-definition 'geiser-edit-symbol-at-point
+                        'pop-definition 'geiser-pop-symbol-stack
+                        'goto-repl 'geiser-doc-switch-to-repl)
+
+  (evil-collection-define-key 'normal 'geiser-doc-mode-map
+    ">" 'geiser-doc-next
+    "<" 'geiser-doc-previous
+    "X" 'geiser-doc-clean-history)
+  (evil-collection-bind 'geiser-doc-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button
+                        'next-item 'forward-button
+                        'prev-item 'backward-button
+                        'next-section 'geiser-doc-next-section
+                        'prev-section 'geiser-doc-previous-section
+                        'next-section-2 'forward-button
+                        'prev-section-2 'backward-button
+                        'quit 'View-quit
+                        'refresh 'geiser-doc-refresh
+                        'delete 'geiser-doc-kill-page
+                        'delete-2 'geiser-doc-kill-page)
+
+  (evil-collection-bind 'geiser-repl-mode-map
+                        'repl-submit 'geiser-repl-maybe-send
+                        'repl-newline 'geiser-repl--newline-and-indent
+                        'repl-force-newline 'geiser-repl--newline-and-indent
+                        'find-definition 'geiser-edit-symbol-at-point
+                        'pop-definition 'geiser-pop-symbol-stack
+                        'lookup-doc 'geiser-doc-symbol-at-point
+                        'next-item 'geiser-repl-next-prompt
+                        'prev-item 'geiser-repl-previous-prompt
+                        'next-section 'geiser-repl-next-prompt
+                        'prev-section 'geiser-repl-previous-prompt)
+
+  (evil-collection-bind 'geiser-mode-map
+                        'find-definition 'geiser-edit-symbol-at-point
+                        'pop-definition 'geiser-pop-symbol-stack
+                        'lookup-doc 'geiser-doc-symbol-at-point
+                        'goto-repl 'geiser-mode-switch-to-repl)
+
+  (evil-collection-define-key 'normal 'geiser-mode-map
+    "gZ" 'geiser-mode-switch-to-repl-and-enter))
+
+(provide 'evil-collection-geiser)
+;;; evil-collection-geiser.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/geiser/evil-collection-geiser.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/geiser/evil-collection-geiser.elc
new file mode 100644
index 0000000..c4f4e01
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/geiser/evil-collection-geiser.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ggtags/evil-collection-ggtags.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ggtags/evil-collection-ggtags.el
new file mode 100644
index 0000000..08f1971
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ggtags/evil-collection-ggtags.el
@@ -0,0 +1,99 @@
+;;; evil-collection-ggtags.el --- Evil bindings for ggtags -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, ggtags, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `ggtags-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'ggtags nil t)
+
+(defvar ggtags-global-mode-map)
+(defvar ggtags-mode-map)
+(defvar ggtags-view-search-history-mode-map)
+(defvar ggtags-view-tag-history-mode-map)
+(defvar ggtags-navigation-map)
+
+(defconst evil-collection-ggtags-maps '(ggtags-mode-map
+                                        ggtags-view-search-history-mode-map
+                                        ggtags-view-tag-history-mode-map
+                                        ggtags-navigation-map))
+
+;;;###autoload
+(defun evil-collection-ggtags-setup ()
+  "Set up `evil' bindings for `ggtags'."
+  (evil-set-initial-state 'ggtags-global-mode 'normal)
+  (evil-set-initial-state 'ggtags-view-search-history-mode 'normal)
+  (evil-set-initial-state 'ggtags-view-tag-history-mode 'normal)
+
+  ;; `ggtags-navigation-mode' is global and will conflict with other bindings.
+  ;; https://github.com/leoliu/ggtags/issues/124
+  (when (boundp 'ggtags-enable-navigation-keys)
+    (setq ggtags-enable-navigation-keys nil))
+
+  (evil-collection-bind 'ggtags-mode-map
+                        'find-usages 'ggtags-find-reference
+                        'find-definition 'ggtags-find-tag-dwim
+                        'pop-definition 'ggtags-prev-mark
+                        'find-file 'ggtags-find-file)
+
+  (evil-collection-define-key 'normal 'ggtags-view-search-history-mode-map
+    "r" 'ggtags-save-to-register
+    "R" 'ggtags-view-search-history-action)
+  (evil-collection-bind 'ggtags-view-search-history-mode-map
+                        'next-item 'ggtags-view-search-history-next
+                        'prev-item 'ggtags-view-search-history-prev
+                        'next-section 'ggtags-view-search-history-next
+                        'prev-section 'ggtags-view-search-history-prev
+                        'quit 'ggtags-kill-window
+                        'refresh 'ggtags-view-search-history-update
+                        'delete 'ggtags-view-search-history-kill
+                        'delete-2 'ggtags-view-search-history-kill)
+
+  (evil-collection-bind 'ggtags-view-tag-history-mode-map
+                        'next-item 'next-error-no-select
+                        'prev-item 'previous-error-no-select
+                        'next-section 'next-error-no-select
+                        'prev-section 'previous-error-no-select
+                        'quit 'ggtags-kill-window)
+
+  (evil-collection-define-key 'normal 'ggtags-navigation-map
+    ;; search
+    "S" 'ggtags-navigation-isearch-forward
+
+    "go" 'ggtags-navigation-visible-mode ;; FIXME: This can be anything.
+    )
+  (evil-collection-bind 'ggtags-navigation-map
+                        'action 'ggtags-navigation-mode-done
+                        'next-item 'next-error
+                        'prev-item 'previous-error
+                        'next-section 'ggtags-navigation-next-file
+                        'prev-section 'ggtags-navigation-previous-file
+                        'next-section-2 'next-error
+                        'prev-section-2 'previous-error
+                        'search-or-filter 'ggtags-navigation-isearch-forward))
+
+(provide 'evil-collection-ggtags)
+;;; evil-collection-ggtags.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ggtags/evil-collection-ggtags.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ggtags/evil-collection-ggtags.elc
new file mode 100644
index 0000000..e2a4be9
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ggtags/evil-collection-ggtags.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/git-timemachine/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/git-timemachine/README.org
new file mode 100644
index 0000000..bfa19ae
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/git-timemachine/README.org
@@ -0,0 +1,20 @@
+* git-timemachine
+
+  Evil bindings for [[https://codeberg.org/pidu/git-timemachine][git-timemachine]].
+
+  Bindings are installed on =git-timemachine-mode= as minor-mode keys so
+  they apply in =normal= state in any buffer where the minor mode is
+  active.
+
+** Key bindings
+
+   | Command                                     | Original | Evil  |
+   |---------------------------------------------+----------+-------|
+   | =git-timemachine-show-previous-revision=    | =p=      | =C-k= |
+   | =git-timemachine-show-next-revision=        | =n=      | =C-j= |
+   | =git-timemachine-quit=                      | =q=      | =q=   |
+   | =git-timemachine-show-nth-revision=         | =g=      | =gtg= |
+   | =git-timemachine-show-revision-fuzzy=       | =t=      | =gtt= |
+   | =git-timemachine-kill-abbreviated-revision= | =w=      | =gty= |
+   | =git-timemachine-kill-revision=             | =W=      | =gtY= |
+   | =git-timemachine-blame=                     | =b=      | =gtb= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/git-timemachine/evil-collection-git-timemachine.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/git-timemachine/evil-collection-git-timemachine.el
new file mode 100644
index 0000000..8c9c912
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/git-timemachine/evil-collection-git-timemachine.el
@@ -0,0 +1,52 @@
+;;; evil-collection-git-timemachine.el --- Bindings for `git-timemachine' -*- lexical-binding: t -*-
+
+;; Author: William Carroll <wpcarro@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, git, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil keybindings for `git-timemachine' that conform to the principles
+;; outlines in evil-collection
+
+;;; Code:
+(require 'evil-collection)
+(require 'git-timemachine nil t)
+
+(defconst evil-collection-git-timemachine-maps nil)
+
+(defvar git-timemachine-mode-map)
+(defconst evil-collection-git-timemachine-map '(git-timemachine-mode-map))
+
+;;;###autoload
+(defun evil-collection-git-timemachine-setup ()
+  "Setup `evil' keybindings for `git-timemachine'."
+  (evil-collection-define-minor-mode-key 'normal 'git-timemachine-mode
+    "\C-k" 'git-timemachine-show-previous-revision
+    "\C-j" 'git-timemachine-show-next-revision
+    "gtg"  'git-timemachine-show-nth-revision
+    "gtt"  'git-timemachine-show-revision-fuzzy
+    "gty"  'git-timemachine-kill-abbreviated-revision
+    "gtY"  'git-timemachine-kill-revision
+    "gtb"  'git-timemachine-blame)
+
+  (evil-collection-bind-minor-mode 'quit 'git-timemachine-mode 'git-timemachine-quit))
+
+(provide 'evil-collection-git-timemachine)
+;;; evil-collection-git-timemachine.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/git-timemachine/evil-collection-git-timemachine.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/git-timemachine/evil-collection-git-timemachine.elc
new file mode 100644
index 0000000..9471569
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/git-timemachine/evil-collection-git-timemachine.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gited/evil-collection-gited.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gited/evil-collection-gited.el
new file mode 100644
index 0000000..8769104
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gited/evil-collection-gited.el
@@ -0,0 +1,159 @@
+;;; evil-collection-gited.el --- Evil bindings for Gited -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 Earl Hyatt
+
+;; Author: Earl Hyatt <okamsn@protonmail.com>
+;; Maintainer: Earl Hyatt <okamsn@protonmail.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1") (evil "1.2") (gited "0.6"))
+;; Keywords: evil, git, tools, vc
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Gited.
+
+;;; Code:
+(require 'gited nil t)
+(require 'evil-collection)
+(declare-function gited-summary "gited")
+(declare-function gited-hide-details-mode "gited")
+
+(defconst evil-collection-gited-maps '(gited-mode-map))
+
+;;;###autoload
+(defun evil-collection-gited-setup ()
+  "Set up `evil' bindings for `gited'."
+  (evil-collection-set-readonly-bindings 'gited-mode-map)
+  (evil-collection-bind 'gited-mode-map
+                        'rename 'gited-rename-branch
+                        'next-item 'gited-next-marked-branch
+                        'prev-item 'gited-prev-marked-branch
+                        'next-section 'gited-next-marked-branch
+                        'prev-section 'gited-prev-marked-branch
+                        'describe-mode 'gited-summary
+                        'refresh 'gited-update
+                        'jump 'gited-goto-branch)
+
+  (evil-collection-define-key 'normal 'gited-mode-map
+    "(" 'gited-hide-details-mode
+    (kbd "C-c C-c") 'gited-commit
+    (kbd "C-c C-b") 'gited-list-branches
+
+    ;; Movement
+    "j" 'gited-next-line
+    "k" 'gited-prev-line
+    (kbd "M-{") 'gited-prev-marked-branch
+    (kbd "M-}") 'gited-next-marked-branch
+    "G" 'gited-goto-last-branch
+    "gg" 'gited-goto-first-branch
+    "gl" 'tabulated-list-next-column
+    "gh" 'tabulated-list-previous-column
+    "<" 'gited-prev-marked-branch
+    ">" 'gited-next-marked-branch
+    " " 'gited-next-line
+    [?\S-\ ] 'gited-prev-line
+    [remap next-line] 'gited-next-line
+    [remap previous-line] 'gited-prev-line
+
+    "gA" 'gited-move-to-end-of-author
+    "ga" 'gited-move-to-author
+    "gB" 'gited-move-to-end-of-branchname
+    "gb" 'gited-move-to-branchname
+    "gD" 'gited-move-to-end-of-date
+    "gd" 'gited-move-to-date
+
+    ;; Operations on Things at Point
+    "=" 'gited-diff
+    "A" 'gited-add-patched-files
+    "a" 'gited-apply-patch
+    "B" 'gited-bisect
+    "C" 'gited-copy-branch
+    "c" 'gited-checkout-branch
+    "e" 'gited-extract-patches
+    "F" 'gited-pull ; Similar to Magit binding. Don't conflict with "f".
+    "gR" 'gited-change-current-remote-rep
+
+    "gs" 'gited-status             ; These "g"-prefixed operations open
+    "gL" 'gited-log                ; new windows.
+    "gN" 'gited-log-last-n-commits ;
+    "gc" 'gited-show-commit        ;
+
+    "M" 'gited-merge-branch
+    "O" 'tabulated-list-sort
+    "o" 'tabulated-list-sort
+    "P" 'gited-push                ; Only branches.
+    "p" 'gited-set-object-upstream ; Pushes branches and tags.
+    "r" 'gited-reset-branch
+    "s" nil                ; Don't conflict with `tabulated-list-sort' on "S".
+    "ss" 'gited-stash
+    "sA" 'gited-stash-pop
+    "sa" 'gited-stash-apply
+    "sb" 'gited-stash-branch
+    "sD" 'gited-delete-all-stashes
+    "sd" 'gited-stash-drop
+    "Y" 'gited-copy-branchname-as-kill
+
+    ;; Operations on Marked and Flagged Branches/Tags
+    "D" 'gited-do-delete
+    "T" 'gited-do-sync-with-trunk
+
+    ;; Marks
+    "*" nil
+    "*%" 'gited-mark-branches-regexp
+    "*m" 'gited-mark
+    "*u" 'gited-unmark
+    "*?" 'gited-unmark-all-branches
+    "*!" 'gited-unmark-all-marks
+    (kbd "* <delete>") 'gited-unmark-backward
+    (kbd "* C-n") 'gited-next-marked-branch
+    (kbd "* C-p") 'gited-prev-marked-branch
+    "*t" 'gited-toggle-marks
+    "*l" 'gited-mark-local-tags
+    "*N" 'gited-number-marked
+
+    (kbd "<delete>") 'gited-unmark-backward
+
+    ;; Searching for marks
+    "%" nil
+    ;; "%d" No flag for deletion.
+    "%t" 'gited-mark-branches-by-date
+    "%c" 'gited-mark-branches-containing-commit
+    "%g" 'gited-mark-branches-containing-regexp
+    "%m" 'gited-mark-branches-regexp
+    "%M" 'gited-mark-merged-branches
+    "%U" 'gited-mark-unmerged-branches
+
+    ;; Tags instead of thumbnails. Only usable when listing tags.  Ideally,
+    ;; these would have a separate map that would be used when displaying tags.
+    (kbd "C-t a") 'gited-tag-add
+    (kbd "C-t d") 'gited-tag-delete
+    (kbd "C-t D") 'gited-remote-tag-delete
+    (kbd "C-t F") 'gited-fetch-remote-tags)
+  (evil-collection-bind 'gited-mode-map
+                        'mark 'gited-mark
+                        'unmark 'gited-unmark
+                        'unmark-all 'gited-unmark-all-marks
+                        'toggle 'gited-toggle-marks
+                        'toggle-all 'gited-toggle-marks
+                        'mark-delete 'gited-flag-branch-deletion
+                        'execute-marks 'gited-do-flagged-delete
+                        'action 'gited-visit-branch-sources
+                        'action-other 'gited-visit-branch-sources
+                        'action-stay 'gited-origin
+                        'search-or-filter 'gited-do-kill-lines))
+
+(provide 'evil-collection-gited)
+;;; evil-collection-gited.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gited/evil-collection-gited.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gited/evil-collection-gited.elc
new file mode 100644
index 0000000..45a06c5
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gited/evil-collection-gited.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gnus/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gnus/README.org
new file mode 100644
index 0000000..d9a8ae2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gnus/README.org
@@ -0,0 +1,274 @@
+* gnus
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/gnus/index.html][Gnus]]. Initial state is normal in every gnus mode below,
+  insert state is inhibited, and =zz= is bound to =gnus-recenter= everywhere.
+  Each map keeps the bulk of its upstream alphabetic prefixes (=A=, =B=, =G=,
+  =M=, =S=, =W=, =X=, =Y=, =Z=, =/=, etc.); the tables below cover only what
+  evil-collection relocates or adds.
+
+** Key bindings
+
+*** gnus-summary-mode-map
+
+    | Command                                       | Original       | Evil           |
+    |-----------------------------------------------+----------------+----------------|
+    | =gnus-summary-exit=                           | =q=            | =q=, =ZZ=      |
+    | =gnus-summary-exit-no-update=                 | =Q=            | =Q=, =ZQ=      |
+    | =gnus-summary-help-map=                       | =H=            | =g?=           |
+    | =gnus-summary-widget-forward=                 | n/a            | =TAB=          |
+    | =gnus-summary-widget-backward=                | n/a            | =<backtab>=    |
+    | =gnus-summary-next-page=                      | =SPC=          | =SPC=          |
+    | =gnus-summary-prev-page=                      | =DEL=, =S-SPC= | =DEL=, =S-SPC= |
+    | =gnus-summary-scroll-up=                      | =RET=          | =RET=          |
+    | =gnus-summary-prev-unread-article=            | =p=            | =gk=, =[[=     |
+    | =gnus-summary-next-unread-article=            | =n=            | =gj=, =]]=     |
+    | =gnus-summary-prev-thread=                    | =M-b=          | ={=            |
+    | =gnus-summary-next-thread=                    | =M-f=          | =}=            |
+    | =gnus-summary-prev-article=                   | =P=            | =C-k=          |
+    | =gnus-summary-next-article=                   | =N=            | =C-j=          |
+    | =gnus-summary-mark-as-processable=            | =#=            | =m=            |
+    | =gnus-uu-mark-buffer=                         | (M H b)        | =M=            |
+    | =gnus-summary-unmark-as-processable=          | =M-#=          | =u=            |
+    | =gnus-summary-unmark-all-processable=         | (M H U)        | =U=            |
+    | =gnus-uu-mark-by-regexp=                      | (M P r)        | =%=            |
+    | =gnus-summary-mail-other-window=              | =m=            | =C=, =cc=      |
+    | =gnus-summary-news-other-window=              | (S i)          | =ci=           |
+    | =gnus-summary-followup=                       | =f=            | =f=, =cf=      |
+    | =gnus-summary-followup-with-original=         | =F=            | =F=, =cF=      |
+    | =gnus-summary-reply=                          | =r=            | =r=, =cr=      |
+    | =gnus-summary-reply-with-original=            | =R=            | =R=, =cR=      |
+    | =gnus-summary-very-wide-reply=                | (S W)          | =cw=           |
+    | =gnus-summary-very-wide-reply-with-original=  | (S W)          | =cW=           |
+    | =gnus-summary-mail-forward=                   | =C-c C-f=      | =C-c C-f=      |
+    | =gnus-summary-first-unread-article=           | (G f)          | =.=            |
+    | =gnus-summary-best-unread-article=            | (G b)          | =,=            |
+    | =gnus-summary-mark-as-read-forward=           | =d=            | =!=            |
+    | =gnus-summary-tick-article-forward=           | =u=, =!=       | ===            |
+    | =gnus-summary-goto-article=                   | =j=            | =J=            |
+    | =gnus-summary-rescan-group=                   | =M-g=          | =gr=           |
+    | =gnus-summary-edit-article=                   | =e=            | =e=            |
+    | =gnus-summary-mark-as-expirable=              | =E=            | =E=            |
+    | =gnus-summary-limit-map=                      | =/=            | =z/=           |
+    | =gnus-summary-toggle-header=                  | =t=            | =zt=           |
+    | =gnus-summary-limit-to-unread=                | =x=            | =x=            |
+    | =gnus-summary-browse-url=                     | =w=            | =gX=           |
+    | =gnus-summary-refer-parent-article=           | =^=            | =^=            |
+    | =gnus-summary-refer-article=                  | =M-^=          | =M-^=          |
+    | =gnus-summary-kill-thread=                    | (T K)          | =Tk=           |
+    | =gnus-summary-lower-thread=                   | =M-l=          | =Tl=           |
+    | =gnus-summary-raise-thread=                   | (T I)          | =Ti=           |
+    | =gnus-uu-mark-thread=                         | (T #)          | =Tm=           |
+    | =gnus-uu-unmark-thread=                       | (T M-#)        | =Tu=           |
+    | =gnus-summary-toggle-threads=                 | =M-t=          | =TT=           |
+    | =gnus-summary-show-thread=                    | =M-s=          | =Ts=, =zo=     |
+    | =gnus-summary-hide-thread=                    | =M-h=          | =Th=, =zc=     |
+    | =gnus-summary-show-all-threads=               | (T S)          | =TS=           |
+    | =gnus-summary-hide-all-threads=               | (T H)          | =TH=           |
+    | =gnus-summary-rethread-current=               | (T t)          | =Tt=           |
+    | =gnus-summary-reparent-thread=                | (T ^)          | =T^=           |
+    | =gnus-summary-reparent-children=              | (T M-^)        | =T M-^=        |
+    | =gnus-summary-next-thread=                    | =M-f=          | =Tn=           |
+    | =gnus-summary-prev-thread=                    | =M-b=          | =Tp=           |
+    | =gnus-summary-down-thread=                    | (T d)          | =Td=           |
+    | =gnus-summary-up-thread=                      | (T u)          | =Ta=           |
+    | =gnus-summary-top-thread=                     | (T o)          | =To=           |
+    | =gnus-summary-search-article-forward=         | =M-s=          | =M-s=          |
+    | =gnus-summary-search-article-backward=        | =M-r=          | =M-r=          |
+    | =gnus-summary-repeat-search-article-forward=  | =M-S=          | =M-S=          |
+    | =gnus-summary-repeat-search-article-backward= | =M-R=          | =M-R=          |
+    | =gnus-summary-execute-command=                | =&=            | =&=            |
+    | =gnus-summary-universal-argument=             | =M-&=          | =M-&=          |
+    | =gnus-cache-enter-article=                    | =*=            | =*=            |
+    | =gnus-cache-remove-article=                   | =M-*=          | =M-*=          |
+    | =gnus-summary-increase-score=                 | =I=            | =I=            |
+    | =gnus-summary-lower-score=                    | =L=            | =L=            |
+
+    Grouped relocations:
+
+    - Sort (=o= prefix): =oa= author, =oc= chars, =od= date, =oi= score, =ol=
+      lines, =omd= most-recent-date, =omm= marks, =omn= most-recent-number,
+      =on= number, =oo= original, =or= random, =os= subject, =ot= recipient.
+    - Save (=O= prefix, was upstream =O=): =Oo= article, =Om= mail, =Or= rmail,
+      =Of= file, =OF= write-article-file, =Ob= body-file, =Oh= folder, =Ov= vm,
+      =Op= pipe-output, =OP= muttprint. =gnus-summary-pipe-output= is also on
+      the literal pipe key.
+    - Decode (=X= prefix): =Xu/XU/Xvu/XvU= uu, =Xs/XS/Xvs/XvS= unshar,
+      =Xp/XP/Xvp/XvP= postscript, =Xo= save, =Xb= binhex, =XY= yenc.
+    - Mail-group ops (=B= prefix): =Be= expire, =BE= expire-now, =Bd= delete,
+      =Bm= move, =Bc= copy, =Bb= crosspost, =Bi= import, =BI= create, =Br=
+      respool, =Bw= edit, =Bq= respool-query, =Bt= respool-trace, =Bp=
+      article-posted-p.
+
+*** gnus-article-mode-map
+
+    Motion-state additions:
+
+    | Command                                 | Original | Evil |
+    |-----------------------------------------+----------+------|
+    | =gnus-article-followup-with-original=   | =F=      | =F=  |
+    | =gnus-article-reply-with-original=      | =R=      | =R=  |
+    | =gnus-article-wide-reply-with-original= | =W=      | =W=  |
+
+    Normal-state:
+
+    | Command                                 | Original       | Evil                 |
+    |-----------------------------------------+----------------+----------------------|
+    | =evil-window-delete=                    | n/a            | =q=, =Q=, =ZZ=, =ZQ= |
+    | =forward-button=                        | =TAB=          | =TAB=                |
+    | =backward-button=                       | =<backtab>=    | =<backtab>=          |
+    | =gnus-article-goto-next-page=           | =SPC=          | =SPC=                |
+    | =gnus-article-goto-prev-page=           | =DEL=, =S-SPC= | =DEL=, =S-SPC=       |
+    | =gnus-summary-reply=                    | =r=            | =r=, =cr=            |
+    | =gnus-article-reply-with-original=      | =R=            | =R=                  |
+    | =gnus-article-mail=                     | =C-c m=        | =C=, =cc=            |
+    | =gnus-summary-reply-with-original=      | n/a            | =cR=                 |
+    | =gnus-summary-followup=                 | n/a            | =cf=                 |
+    | =gnus-summary-followup-with-original=   | n/a            | =cF=                 |
+    | =gnus-summary-very-wide-reply=          | n/a            | =cw=                 |
+    | =gnus-article-wide-reply-with-original= | n/a            | =cW=                 |
+    | =gnus-summary-mail-forward=             | =C-c C-f=      | =C-c C-f=            |
+    | =gnus-article-refer-article=            | =C-c ^=        | =C-]=                |
+    | =gnus-article-show-summary=             | =h=, =s=       | =s=                  |
+    | =gnus-summary-show-article=             | =g=            | =gr=                 |
+    | =gnus-summary-browse-url=               | n/a            | =gX=                 |
+
+    Washing commands move under the =zw= prefix:
+
+    | Command                                   | Original | Evil   |
+    |-------------------------------------------+----------+--------|
+    | =gnus-summary-stop-page-breaking=         | =W l=    | =zwl=  |
+    | =gnus-summary-caesar-message=             | =W r=    | =zwr=  |
+    | =gnus-summary-morse-message=              | =W m=    | =zwm=  |
+    | =gnus-summary-idna-message=               | =W i=    | =zwi=  |
+    | =gnus-summary-toggle-header=              | =t=      | =zwt=  |
+    | =gnus-summary-verbose-headers=            | =W v=    | =zwv=  |
+    | =gnus-article-treat-overstrike=           | =W o=    | =zwo=  |
+    | =gnus-article-treat-smartquotes=          | =W d=    | =zwd=  |
+    | =gnus-article-treat-non-ascii=            | =W U=    | =zwu=  |
+    | =gnus-article-outlook-deuglify-article=   | =W Y f=  | =zwyf= |
+    | =gnus-article-outlook-unwrap-lines=       | =W Y u=  | =zwyu= |
+    | =gnus-article-outlook-repair-attribution= | =W Y a=  | =zwya= |
+    | =gnus-article-outlook-rearrange-citation= | =W Y c=  | =zwyc= |
+    | =gnus-article-fill-cited-article=         | =W w=    | =zww=  |
+    | =gnus-article-fill-long-lines=            | =W Q=    | =zwq=  |
+    | =gnus-article-capitalize-sentences=       | =W C=    | =zwc=  |
+    | =gnus-article-de-base64-unreadable=       | =W 6=    | =zw6=  |
+    | =gnus-article-decode-HZ=                  | =W Z=    | =zwz=  |
+    | =gnus-article-treat-ansi-sequences=       | =W A=    | =zwa=  |
+    | =gnus-article-add-buttons=                | =W b=    | =zwb=  |
+    | =gnus-article-add-buttons-to-head=        | =W B=    | =zwB=  |
+    | =gnus-article-verify-x-pgp-sig=           | =W p=    | =zwp=  |
+    | =gnus-summary-force-verify-and-decrypt=   | =W s=    | =zws=  |
+
+*** gnus-group-mode-map
+
+    | Command                                  | Original    | Evil       |
+    |------------------------------------------+-------------+------------|
+    | =gnus-group-exit=                        | =q=         | =q=, =ZZ=  |
+    | =gnus-group-quit=                        | =Q=         | =Q=, =ZQ=  |
+    | =gnus-group-prev-unread-group=           | =p=         | =gk=, =[[= |
+    | =gnus-group-next-unread-group=           | =n=         | =gj=, =]]= |
+    | =gnus-group-next-group=                  | =N=         | =C-j=      |
+    | =gnus-group-prev-group=                  | =P=         | =C-k=      |
+    | =gnus-group-mail=                        | =m=         | =C=, =cc=  |
+    | =gnus-group-news=                        | =i=         | =ci=       |
+    | =gnus-group-first-unread-group=          | =.=         | =.=        |
+    | =gnus-group-best-unread-group=           | =,=         | =,=        |
+    | =gnus-activate-all-groups=               | =M-g M-a=   | =A=        |
+    | =gnus-group-browse-foreign-server=       | =B=         | =B=        |
+    | =gnus-group-edit-group=                  | =M-e=       | =E=        |
+    | =gnus-group-find-new-groups=             | =F=         | =F=        |
+    | =gnus-group-jump-to-group=               | =j=         | =J=        |
+    | =gnus-group-rename-group=                | (G r)       | =R=        |
+    | =gnus-group-expunge-group=               | (G x)       | =X=        |
+    | =gnus-group-select-group=                | =RET=       | =RET=      |
+    | =gnus-group-read-group=                  | =SPC=       | =SPC=      |
+    | =gnus-group-get-new-news-this-group=     | =g=         | =gr=       |
+    | =gnus-group-get-new-news=                | =g=         | =gR=       |
+    | =gnus-group-unsubscribe-current-group=   | =u=         | =gu=       |
+    | =gnus-group-unsubscribe-group=           | =U=         | =gU=       |
+    | =gnus-group-catchup-current=             | =c=         | =gc=       |
+    | =gnus-group-catchup-current-all=         | =C=         | =gC=       |
+    | =gnus-group-expire-articles=             | =C-c M-x=   | =ge=       |
+    | =gnus-group-expire-all-groups=           | =C-c M-C-x= | =gE=       |
+    | =gnus-group-set-current-level=           | (G S l)     | =gl=       |
+    | =gnus-group-kill-group=                  | =C-k=       | =dd=, =D=  |
+    | =gnus-group-yank-group=                  | =C-y=       | =p=, =P=   |
+    | =gnus-group-mark-group=                  | =#=         | =m=        |
+    | =gnus-group-unmark-group=                | =M-#=       | =u=        |
+    | =gnus-group-unmark-all-groups=           | (M U)       | =U=        |
+    | =gnus-group-mark-buffer=                 | (M b)       | =M=, =*=   |
+    | =gnus-group-mark-regexp=                 | (M r)       | =%=        |
+    | =gnus-group-apropos=                     | =C-c M-a=   | =s=        |
+    | =gnus-group-description-apropos=         | =C-c M-A=   | =S=        |
+    | =gnus-group-read-ephemeral-search-group= | n/a         | =M-s=      |
+    | =gnus-group-enter-server-mode=           | =^=         | =^=        |
+    | =gnus-group-prev-unread-group=           | =DEL=       | =DEL=      |
+    | =gnus-group-help-map=                    | =H=         | =g?=       |
+
+    Grouped relocations:
+
+    - Sort (=o= prefix): =oa= alphabet, =ol= level, =om= method, =on=
+      real-name, =or= rank, =os= sort, =ou= unread, =ov= score.
+    - List (=L= prefix, was upstream =A=): =L!= ticked, =L/= limit-map, =L?=
+      dormant, =La= active, =Lc= cached, =Lf= flush-map, =Lk= killed, =Ll=
+      level, =Lm= matching, =LM= all-matching, =Lp= plus-map, =Ls= groups,
+      =Lu= all-groups, =Lz= zombies.
+    - Topic (=T= prefix): =Tn= create, =Tj= jump, =Tr= rename, =Td= delete;
+      =zo= / =zc= show/hide topic. Topic sort under =To{a,u,l,v,r,m,e,s}=.
+
+*** gnus-server-mode-map
+
+    | Command                                    | Original | Evil                 |
+    |--------------------------------------------+----------+----------------------|
+    | =gnus-server-exit=                         | =q=      | =q=, =Q=, =ZZ=, =ZQ= |
+    | =gnus-server-read-server=                  | =RET=    | =RET=                |
+    | =gnus-server-read-server-in-server-buffer= | =SPC=    | =SPC=                |
+    | =gnus-server-close-server=                 | =C=      | =C=                  |
+    | =gnus-server-deny-server=                  | =D=      | =D=                  |
+    | =gnus-group-make-nnir-group=               | =G=      | =G=                  |
+    | =gnus-server-set-cloud-method-server=      | =I=      | =I=                  |
+    | =gnus-server-offline-server=               | =L=      | =L=                  |
+    | =gnus-server-open-server=                  | =O=      | =O=                  |
+    | =gnus-server-remove-denials=               | =R=      | =R=                  |
+    | =gnus-server-show-server=                  | =S=      | =S=                  |
+    | =gnus-server-add-server=                   | =a=      | =a=                  |
+    | =gnus-server-copy-server=                  | =c=      | =y=                  |
+    | =gnus-server-edit-server=                  | =e=      | =e=                  |
+    | =gnus-server-regenerate-server=            | =g=      | =gr=                 |
+    | =gnus-server-toggle-cloud-server=          | =i=      | =i=                  |
+    | =gnus-server-kill-server=                  | =k=      | =d=                  |
+    | =gnus-server-list-servers=                 | =l=      | =L=                  |
+    | =gnus-server-scan-server=                  | =s=      | =s=                  |
+    | =gnus-server-yank-server=                  | =y=      | =p=                  |
+    | =gnus-server-compact-server=               | =z=      | =c=                  |
+    | =gnus-server-close-all-servers=            | =M-c=    | =M-c=                |
+    | =gnus-server-open-all-servers=             | =M-o=    | =M-o=                |
+
+*** gnus-browse-mode-map
+
+    | Command                                 | Original | Evil                 |
+    |-----------------------------------------+----------+----------------------|
+    | =gnus-browse-exit=                      | =q=, =l= | =q=, =Q=, =ZZ=, =ZQ= |
+    | =gnus-browse-unsubscribe-current-group= | =u=      | =u=                  |
+    | =gnus-browse-read-group=                | =SPC=    | =SPC=                |
+    | =gnus-browse-select-group=              | =RET=    | =RET=                |
+
+*** gnus-bookmark-bmenu-mode-map
+
+    | Command                                    | Original | Evil                 |
+    |--------------------------------------------+----------+----------------------|
+    | =quit-window=                              | =q=      | =q=, =Q=, =ZZ=, =ZQ= |
+    | =gnus-bookmark-bmenu-mark=                 | =m=      | =m=                  |
+    | =gnus-bookmark-bmenu-unmark=               | =u=      | =u=                  |
+    | =gnus-bookmark-bmenu-backup-unmark=        | =DEL=    | =DEL=                |
+    | =gnus-bookmark-bmenu-delete=               | =d=, =k= | =d=                  |
+    | =gnus-bookmark-bmenu-execute-deletions=    | =x=      | =x=                  |
+    | =gnus-bookmark-bmenu-select=               | =RET=    | =RET=                |
+    | =gnus-bookmark-bmenu-load=                 | =l=      | =L=                  |
+    | =gnus-bookmark-bmenu-save=                 | =s=      | =s=                  |
+    | =gnus-bookmark-bmenu-toggle-infos=         | =t=      | =t=                  |
+    | =gnus-bookmark-bmenu-show-details=         | =a=      | =a=                  |
+    | =gnus-bookmark-bmenu-show-all-annotations= | n/a      | =A=                  |
+    | =gnus-bookmark-bmenu-edit-annotation=      | n/a      | =E=                  |
+    | =gnus-bookmark-bmenu-rename=               | n/a      | =R=                  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gnus/evil-collection-gnus.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gnus/evil-collection-gnus.el
new file mode 100644
index 0000000..d2fb49b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gnus/evil-collection-gnus.el
@@ -0,0 +1,501 @@
+;;; evil-collection-gnus.el --- Bindings for `gnus' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, tools, evil
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `gnus'.
+
+;;; Code:
+(require 'gnus nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-gnus-maps '(gnus-article-mode-map
+                                      gnus-bookmark-bmenu-mode-map
+                                      gnus-browse-mode-map
+                                      gnus-group-mode-map
+                                      gnus-server-mode-map
+                                      gnus-summary-mode-map))
+
+(defvar evil-collection-gnus-common-normal-bindings
+  '("zz" gnus-recenter)
+  "Keybindings added to all gnus normal mode-maps.
+Note that there is no gnus-common-mode-map")
+
+;;;###autoload
+(defun evil-collection-gnus-setup ()
+  "Set up `evil' bindings for `gnus'."
+
+  ;; For all gnus modes:
+  ;;  - Set the initial state to 'normal
+  ;;  - Inhibit insert
+  ;;  - Use `evil-collection-gnus-common-normal-bindings'
+  (dolist (map evil-collection-gnus-maps)
+    (let* ((map-string (symbol-name map))
+           (mode-string (string-trim-right map-string "-map"))
+           (mode (intern mode-string)))
+      (evil-set-initial-state mode 'normal)
+      (evil-collection-inhibit-insert-state map)
+      (apply #'evil-collection-define-key 'normal map
+             evil-collection-gnus-common-normal-bindings)))
+
+  (evil-collection-bind 'gnus-group-mode-map 'rename 'gnus-group-rename-group)
+  (evil-collection-bind 'gnus-bookmark-bmenu-mode-map 'rename 'gnus-bookmark-bmenu-rename)
+
+  (evil-collection-bind 'gnus-summary-mode-map 'edit 'gnus-summary-edit-article)
+  (evil-collection-bind 'gnus-server-mode-map 'edit 'gnus-server-edit-server)
+  (evil-collection-bind 'gnus-group-mode-map 'edit 'gnus-group-edit-group)
+  (evil-collection-bind 'gnus-bookmark-bmenu-mode-map 'edit 'gnus-bookmark-bmenu-edit-annotation)
+
+  (evil-collection-bind 'gnus-summary-mode-map
+                        'quit 'gnus-summary-exit
+                        'refresh 'gnus-summary-rescan-group
+                        'action 'gnus-summary-scroll-up
+                        'cycle-next 'gnus-summary-widget-forward
+                        'cycle-previous 'gnus-summary-widget-backward
+                        'quit-save 'gnus-summary-exit
+                        'quit-cancel 'gnus-summary-exit-no-update
+                        'describe-mode 'gnus-summary-help-map)
+
+  (evil-collection-define-key 'normal 'gnus-summary-mode-map
+    ;; quit
+    "Q"         'gnus-summary-exit-no-update
+
+    ;; motion
+    (kbd "<delete>") 'gnus-summary-prev-page
+    (kbd "S-SPC") 'gnus-summary-prev-page
+    (kbd "SPC") 'gnus-summary-next-page
+    "{"         'gnus-summary-prev-thread
+    "}"         'gnus-summary-next-thread
+
+    ;; Marking
+    "m"         'gnus-summary-mark-as-processable
+    "M"         'gnus-uu-mark-buffer
+    "u"         'gnus-summary-unmark-as-processable
+    "U"         'gnus-summary-unmark-all-processable
+    "%"         'gnus-uu-mark-by-regexp
+
+    ;; Composing
+    "C"         'gnus-summary-mail-other-window
+    "cc"        'gnus-summary-mail-other-window
+    "ci"        'gnus-summary-news-other-window
+    "f"         'gnus-summary-followup
+    "F"         'gnus-summary-followup-with-original
+    "cf"        'gnus-summary-followup
+    "cF"        'gnus-summary-followup-with-original
+
+    ;; Reply
+    "r"         'gnus-summary-reply
+    "R"         'gnus-summary-reply-with-original
+    "cr"        'gnus-summary-reply
+    "cR"        'gnus-summary-reply-with-original
+    "cw"        'gnus-summary-very-wide-reply
+    "cW"        'gnus-summary-very-wide-reply-with-original
+    (kbd "C-c C-f") 'gnus-summary-mail-forward
+
+    ;; Actions, like mu4e
+    ;; Keep the following two bindings consistent with group's
+    "."         'gnus-summary-first-unread-article
+    ","         'gnus-summary-best-unread-article
+    "!"         'gnus-summary-mark-as-read-forward
+    "="         'gnus-summary-tick-article-forward
+    "E"         'gnus-summary-mark-as-expirable
+    "z/"        'gnus-summary-limit-map
+    "zt"        'gnus-summary-toggle-header
+    "x"         'gnus-summary-limit-to-unread
+
+    ;; Finding the parent
+    "^"         'gnus-summary-refer-parent-article
+    (kbd "M-^") 'gnus-summary-refer-article
+
+    ;; Sorting
+    "oa"        'gnus-summary-sort-by-author
+    "oc"        'gnus-summary-sort-by-chars
+    "od"        'gnus-summary-sort-by-date
+    "oi"        'gnus-summary-sort-by-score
+    "ol"        'gnus-summary-sort-by-lines
+    "omd"       'gnus-summary-sort-by-most-recent-date
+    "omm"       'gnus-summary-sort-by-marks
+    "omn"       'gnus-summary-sort-by-most-recent-number
+    "on"        'gnus-summary-sort-by-number
+    "oo"        'gnus-summary-sort-by-original
+    "or"        'gnus-summary-sort-by-random
+    "os"        'gnus-summary-sort-by-subject
+    "ot"        'gnus-summary-sort-by-recipient
+
+    ;; Threads commands
+    "Tk"        'gnus-summary-kill-thread
+    "Tl"        'gnus-summary-lower-thread
+    "Ti"        'gnus-summary-raise-thread
+    "Tm"        'gnus-uu-mark-thread        ;; was T #
+    "Tu"        'gnus-uu-unmark-thread      ;; was T M-#
+    "TT"        'gnus-summary-toggle-threads
+    "Ts"        'gnus-summary-show-thread
+    "Th"        'gnus-summary-hide-thread
+    ;; show/hide can be mapped to zo/zc
+    "zo"        'gnus-summary-show-thread
+    "zc"        'gnus-summary-hide-thread
+    "TS"        'gnus-summary-show-all-threads
+    "TH"        'gnus-summary-hide-all-threads
+    "Tt"        'gnus-summary-rethread-current
+    "T^"        'gnus-summary-reparent-thread
+    (kbd "T M-^") 'gnus-summary-reparent-children
+    "Tn"        'gnus-summary-next-thread
+    "Tp"        'gnus-summary-prev-thread
+    "Td"        'gnus-summary-down-thread   ;;          descend
+    "Ta"        'gnus-summary-up-thread     ;; was T u, ascend also makes sense
+    "To"        'gnus-summary-top-thread
+
+    ;; Saving
+    "Oo"        'gnus-summary-save-article
+    "Om"        'gnus-summary-save-article-mail
+    "Or"        'gnus-summary-save-article-rmail
+    "Of"        'gnus-summary-save-article-file
+    "OF"        'gnus-summary-write-article-file
+    "Ob"        'gnus-summary-save-article-body-file
+    "Oh"        'gnus-summary-save-article-folder
+    "Ov"        'gnus-summary-save-article-vm
+    "Op"        'gnus-summary-pipe-output
+    "|"         'gnus-summary-pipe-output
+    "OP"        'gnus-summary-muttprint
+
+    ;; Decoding with marked articles
+    "Xu"        'gnus-uu-decode-uu
+    "XU"        'gnus-uu-decode-uu-and-save
+    "Xvu"       'gnus-uu-decode-uu-view
+    "XvU"       'gnus-uu-decode-uu-and-save-view
+    ;; Shell archives
+    "Xs"        'gnus-uu-decode-unshar
+    "XS"        'gnus-uu-decode-unshar-and-save
+    "Xvs"       'gnus-uu-decode-unshar-view
+    "XvS"       'gnus-uu-decode-unshar-and-save-view
+    ;; PostScript files
+    "Xp"        'gnus-uu-decode-postscript
+    "XP"        'gnus-uu-decode-postscript-and-save
+    "Xvp"       'gnus-uu-decode-postscript-view
+    "XvP"       'gnus-uu-decode-postscript-and-save-view
+    ;; Other files
+    "Xo"        'gnus-uu-decode-save
+    "Xb"        'gnus-uu-decode-binhex
+    "XY"        'gnus-uu-decode-yenc
+
+    ;; Mail group commands
+    "Be"        'gnus-summary-expire-articles
+    "BE"        'gnus-summary-expire-articles-now   ;; was B C-M-e
+    "Bd"        'gnus-summary-delete-article        ;; was B DEL
+    "Bm"        'gnus-summary-move-article
+    "Bc"        'gnus-summary-copy-article
+    "Bb"        'gnus-summary-crosspost-article     ;; was B B
+    "Bi"        'gnus-summary-import-article
+    "BI"        'gnus-summary-create-article
+    "Br"        'gnus-summary-respool-article
+    "Bw"        'gnus-summary-edit-article
+    "Bq"        'gnus-summary-respool-query
+    "Bt"        'gnus-summary-respool-trace
+    "Bp"        'gnus-summary-article-posted-p
+
+    ;; Searching
+    (kbd "M-s") 'gnus-summary-search-article-forward
+    (kbd "M-r") 'gnus-summary-search-article-backward
+    (kbd "M-S") 'gnus-summary-repeat-search-article-forward
+    (kbd "M-R") 'gnus-summary-repeat-search-article-backward
+    "&"         'gnus-summary-execute-command
+    (kbd "M-&") 'gnus-summary-universal-argument
+
+    [mouse-2]   'gnus-mouse-pick-article
+    [follow-link] 'mouse-face
+
+    ;; Rest of the bindings "as is".
+    "*"         'gnus-cache-enter-article
+    (kbd "M-*") 'gnus-cache-remove-article
+    (kbd "M-i") 'gnus-symbolic-argument
+    "I"         'gnus-summary-increase-score
+    "L"         'gnus-summary-lower-score)
+  (evil-collection-bind 'gnus-summary-mode-map
+                        'next-item 'gnus-summary-next-unread-article
+                        'prev-item 'gnus-summary-prev-unread-article
+                        'next-section 'gnus-summary-next-unread-article
+                        'prev-section 'gnus-summary-prev-unread-article
+                        'next-section-2 'gnus-summary-next-article
+                        'prev-section-2 'gnus-summary-prev-article
+                        'browse-url 'gnus-summary-browse-url
+                        'jump 'gnus-summary-goto-article)
+
+  (evil-collection-define-key 'motion 'gnus-article-mode-map
+    "F"         'gnus-article-followup-with-original
+    "R"         'gnus-article-reply-with-original
+    "W"         'gnus-article-wide-reply-with-original)
+  (evil-collection-bind 'gnus-article-mode-map
+                        'quit 'evil-window-delete
+                        'quit-save 'evil-window-delete
+                        'quit-cancel 'evil-window-delete)
+  (evil-collection-define-key 'normal 'gnus-article-mode-map
+    ;; quit
+    "Q"         'evil-window-delete
+
+    ;; Movement
+    (kbd "SPC") 'gnus-article-goto-next-page
+    (kbd "DEL") 'gnus-article-goto-prev-page
+    (kbd "S-SPC") 'gnus-article-goto-prev-page
+
+    ;; Reply
+    "r"         'gnus-summary-reply
+    "R"         'gnus-article-reply-with-original ;; override `evil-replace-state'
+
+    ;; Composing
+    "C"         'gnus-article-mail
+    "cc"        'gnus-article-mail
+    "cr"        'gnus-summary-reply
+    "cR"        'gnus-summary-reply-with-original
+    "cf"        'gnus-summary-followup
+    "cF"        'gnus-summary-followup-with-original
+    "cw"        'gnus-summary-very-wide-reply
+    "cW"        'gnus-article-wide-reply-with-original
+    (kbd "C-c C-f") 'gnus-summary-mail-forward
+
+    ;; Washing
+    ;;
+    ;; List of unbound commands:
+    ;; - `gnus-article-remove-cr'
+    ;; - `gnus-article-de-quoted-unreadable'
+    ;; - `gnus-article-unsplit-urls'
+    ;; - `gnus-article-wash-html'
+    ;; - `gnus-article-strip-leading-blank-lines'
+    ;; - `gnus-article-strip-multiple-blank-lines'
+    ;; - `gnus-article-remove-trailing-blank-lines'
+    ;; - `gnus-article-strip-blank-lines'
+    ;; - `gnus-article-strip-all-blank-lines'
+    ;; - `gnus-article-strip-leading-space'
+    ;; - `gnus-article-strip-trailing-space'
+    "zwl"       'gnus-summary-stop-page-breaking
+    "zwr"       'gnus-summary-caesar-message
+    "zwm"       'gnus-summary-morse-message
+    "zwi"       'gnus-summary-idna-message
+    "zwt"       'gnus-summary-toggle-header
+    "zwv"       'gnus-summary-verbose-headers
+    "zwo"       'gnus-article-treat-overstrike
+    "zwd"       'gnus-article-treat-smartquotes
+    "zwu"       'gnus-article-treat-non-ascii               ;; was W U
+    "zwyf"      'gnus-article-outlook-deuglify-article
+    "zwyu"      'gnus-article-outlook-unwrap-lines
+    "zwya"      'gnus-article-outlook-repair-attribution
+    "zwyc"      'gnus-article-outlook-rearrange-citation
+    "zww"       'gnus-article-fill-cited-article
+    "zwq"       'gnus-article-fill-long-lines               ;; was W Q
+    "zwc"       'gnus-article-capitalize-sentences          ;; was W C
+    "zw6"       'gnus-article-de-base64-unreadable
+    "zwz"       'gnus-article-decode-HZ                     ;; was W Z
+    "zwa"       'gnus-article-treat-ansi-sequences          ;; was W A
+    "zwb"       'gnus-article-add-buttons
+    "zwB"       'gnus-article-add-buttons-to-head
+    "zwp"       'gnus-article-verify-x-pgp-sig
+    "zws"       'gnus-summary-force-verify-and-decrypt
+
+    ;; Actions
+    (kbd "C-]") 'gnus-article-refer-article
+    "s"         'gnus-article-show-summary)
+  (evil-collection-bind 'gnus-article-mode-map
+                        'refresh 'gnus-summary-show-article
+                        'next-button 'forward-button
+                        'previous-button 'backward-button
+                        'browse-url 'gnus-summary-browse-url)
+
+  (evil-collection-bind 'gnus-group-mode-map
+                        'quit 'gnus-group-exit
+                        'quit-save 'gnus-group-exit
+                        'quit-cancel 'gnus-group-quit
+                        'refresh 'gnus-group-get-new-news-this-group
+                        'refresh-all 'gnus-group-get-new-news
+                        'action 'gnus-group-select-group
+                        'jump 'gnus-group-jump-to-group
+                        'describe-mode 'gnus-group-help-map)
+  (evil-collection-define-key 'normal 'gnus-group-mode-map
+    ;; quit
+    "Q"         'gnus-group-quit
+
+    ;; Composing, like mu4e
+    "C"         'gnus-group-mail
+    "cc"        'gnus-group-mail
+    "ci"        'gnus-group-news
+
+    ;; Actions
+    "."         'gnus-group-first-unread-group
+    ","         'gnus-group-best-unread-group
+    "A"         'gnus-activate-all-groups
+    "B"         'gnus-group-browse-foreign-server
+    "F"         'gnus-group-find-new-groups
+    "X"         'gnus-group-expunge-group
+    (kbd "SPC") 'gnus-group-read-group
+    "gu"        'gnus-group-unsubscribe-current-group
+    "gU"        'gnus-group-unsubscribe-group
+    "gc"        'gnus-group-catchup-current
+    "gC"        'gnus-group-catchup-current-all
+    "ge"        'gnus-group-expire-articles
+    "gE"        'gnus-group-expire-all-groups
+    "gl"        'gnus-group-set-current-level
+
+    ;; Deleting & Pasting
+    "dd"        'gnus-group-kill-group
+    "D"         'gnus-group-kill-group
+    "p"         'gnus-group-yank-group
+    "P"         'gnus-group-yank-group
+
+    ;; Marking
+    "m"         'gnus-group-mark-group
+    "u"         'gnus-group-unmark-group
+    "U"         'gnus-group-unmark-all-groups
+    "M"         'gnus-group-mark-buffer
+    "*"         'gnus-group-mark-buffer
+    "%"         'gnus-group-mark-regexp
+
+    ;; Searching
+    "s"         'gnus-group-apropos
+    "S"         'gnus-group-description-apropos
+    (kbd "M-s") 'gnus-group-read-ephemeral-search-group
+
+    ;; Sorting
+    "oa"        'gnus-group-sort-groups-by-alphabet
+    "ol"        'gnus-group-sort-groups-by-level
+    "om"        'gnus-group-sort-groups-by-method
+    "on"        'gnus-group-sort-groups-by-real-name
+    "or"        'gnus-group-sort-groups-by-rank
+    "os"        'gnus-group-sort-groups
+    "ou"        'gnus-group-sort-groups-by-unread
+    "ov"        'gnus-group-sort-groups-by-score
+
+    ;; Listing
+    "L!"        'gnus-group-list-ticked
+    "L/"        'gnus-group-list-limit-map
+    "L?"        'gnus-group-list-dormant
+    "La"        'gnus-group-list-active        ;; was A A
+    "Lc"        'gnus-group-list-cached
+    "Lf"        'gnus-group-list-flush-map
+    "Lk"        'gnus-group-list-killed
+    "Ll"        'gnus-group-list-level
+    "Lm"        'gnus-group-list-matching
+    "LM"        'gnus-group-list-all-matching
+    "Lp"        'gnus-group-list-plus-map
+    "Ls"        'gnus-group-list-groups
+    "Lu"        'gnus-group-list-all-groups
+    "Lz"        'gnus-group-list-zombies
+
+    ;; Topic commands
+    ;; `gnus-topic-move-group' can be done through dd then p
+    "Tn"        'gnus-topic-create-topic
+    "Tj"        'gnus-topic-jump-to-topic
+    "Tr"        'gnus-topic-rename
+    "Td"        'gnus-topic-delete
+    "zc"        'gnus-topic-hide-topic
+    "zo"        'gnus-topic-show-topic
+
+    ;; Topic sorting
+    "Toa"       'gnus-topic-sort-groups-by-alphabet
+    "Tou"       'gnus-topic-sort-groups-by-unread
+    "Tol"       'gnus-topic-sort-groups-by-level
+    "Tov"       'gnus-topic-sort-groups-by-score
+    "Tor"       'gnus-topic-sort-groups-by-rank
+    "Tom"       'gnus-topic-sort-groups-by-method
+    "Toe"       'gnus-group-sort-groups-by-server
+    "Tos"       'gnus-group-sort-groups
+
+    "^"         'gnus-group-enter-server-mode
+
+    (kbd "DEL") 'gnus-group-prev-unread-group
+    [mouse-2]   'gnus-mouse-pick-group)
+  (evil-collection-bind 'gnus-group-mode-map
+                        'next-item 'gnus-group-next-unread-group
+                        'prev-item 'gnus-group-prev-unread-group
+                        'next-section 'gnus-group-next-unread-group
+                        'prev-section 'gnus-group-prev-unread-group
+                        'next-section-2 'gnus-group-next-group
+                        'prev-section-2 'gnus-group-prev-group)
+
+  (evil-collection-bind 'gnus-server-mode-map
+                        'quit 'gnus-server-exit
+                        'quit-save 'gnus-server-exit
+                        'quit-cancel 'gnus-server-exit
+                        'refresh 'gnus-server-regenerate-server
+                        'action 'gnus-server-read-server)
+  (evil-collection-define-key 'normal 'gnus-server-mode-map
+    ;; quit
+    "Q"         'gnus-server-exit
+
+    (kbd "SPC") 'gnus-server-read-server-in-server-buffer
+    "C"         'gnus-server-close-server
+    "D"         'gnus-server-deny-server
+    "G"         'gnus-group-make-nnir-group
+    "I"         'gnus-server-set-cloud-method-server
+    "L"         'gnus-server-offline-server
+    "O"         'gnus-server-open-server
+    "R"         'gnus-server-remove-denials
+    "S"         'gnus-server-show-server
+    "a"         'gnus-server-add-server
+    "y"         'gnus-server-copy-server
+    "i"         'gnus-server-toggle-cloud-server
+    "d"         'gnus-server-kill-server
+    "L"         'gnus-server-list-servers
+    "s"         'gnus-server-scan-server
+    "p"         'gnus-server-yank-server
+    "c"         'gnus-server-compact-server
+    "M-c"       'gnus-server-close-all-servers
+    "M-o"       'gnus-server-open-all-servers)
+
+  (evil-collection-bind 'gnus-browse-mode-map
+                        'quit 'gnus-browse-exit
+                        'quit-save 'gnus-browse-exit
+                        'quit-cancel 'gnus-browse-exit
+                        'action 'gnus-browse-select-group)
+  (evil-collection-define-key 'normal 'gnus-browse-mode-map
+    ;; quit
+    "Q"         'gnus-browse-exit
+
+    "u" 'gnus-browse-unsubscribe-current-group
+    (kbd "SPC") 'gnus-browse-read-group)
+
+  (evil-collection-bind 'gnus-bookmark-bmenu-mode-map
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window
+                        'action 'gnus-bookmark-bmenu-select
+                        'toggle 'gnus-bookmark-bmenu-toggle-infos)
+  (evil-collection-define-key 'normal 'gnus-bookmark-bmenu-mode-map
+    ;; quit
+    "Q"         'quit-window
+
+    ;; mark and execution
+    (kbd "DEL") 'gnus-bookmark-bmenu-backup-unmark
+
+    [mouse-2]   'gnus-bookmark-bmenu-select-by-mouse
+    "L"         'gnus-bookmark-bmenu-load
+    "s"         'gnus-bookmark-bmenu-save
+    "a"         'gnus-bookmark-bmenu-show-details
+    ;; not implemented yet
+    "A"         'gnus-bookmark-bmenu-show-all-annotations)
+  (evil-collection-bind 'gnus-bookmark-bmenu-mode-map
+                        'mark 'gnus-bookmark-bmenu-mark
+                        'unmark 'gnus-bookmark-bmenu-unmark
+                        'mark-delete 'gnus-bookmark-bmenu-delete
+                        'execute-marks 'gnus-bookmark-bmenu-execute-deletions))
+
+(provide 'evil-collection-gnus)
+;;; evil-collection-gnus.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gnus/evil-collection-gnus.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gnus/evil-collection-gnus.elc
new file mode 100644
index 0000000..1d1d16c
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gnus/evil-collection-gnus.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/go-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/go-mode/README.org
new file mode 100644
index 0000000..2b102d6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/go-mode/README.org
@@ -0,0 +1,19 @@
+* go-mode
+
+  Evil bindings for [[https://github.com/dominikh/go-mode.el][go-mode]] and =godoc-mode=.
+
+** Key bindings
+
+*** go-mode-map
+
+    | Command          | Original  | Evil |
+    |------------------+-----------+------|
+    | =godef-jump=     | =C-c C-j= | =gd= |
+    | =godef-describe= | =C-c C-d= | =K=  |
+
+*** godoc-mode-map
+
+    | Command         | Original | Evil |
+    |-----------------+----------+------|
+    | =quit-window=   | =q=      | =q=  |
+    | =describe-mode= | =h m=    | =g?= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/go-mode/evil-collection-go-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/go-mode/evil-collection-go-mode.el
new file mode 100644
index 0000000..7b1b897
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/go-mode/evil-collection-go-mode.el
@@ -0,0 +1,47 @@
+;;; evil-collection-go-mode.el --- Bindings for `go-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools, golang
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `go-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'go-mode nil t)
+
+(defconst evil-collection-go-mode-maps '(go-mode-map
+                                         godoc-mode-map))
+
+;;;###autoload
+(defun evil-collection-go-mode-setup ()
+  "Set up `evil' bindings for `go-mode'."
+  (evil-collection-bind 'go-mode-map
+                        'find-definition 'godef-jump
+                        'lookup-doc 'godef-describe)
+  (evil-collection-bind 'godoc-mode-map
+                        'quit 'quit-window
+                        'describe-mode 'describe-mode))
+
+(provide 'evil-collection-go-mode)
+;;; evil-collection-go-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/go-mode/evil-collection-go-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/go-mode/evil-collection-go-mode.elc
new file mode 100644
index 0000000..de8ecf7
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/go-mode/evil-collection-go-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gptel/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gptel/README.org
new file mode 100644
index 0000000..903e622
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gptel/README.org
@@ -0,0 +1,47 @@
+* gptel
+
+  Evil bindings for [[https://github.com/karthink/gptel][gptel]].
+
+  =RET= submission follows =evil-collection-repl-submit-state=: in the submit
+  state, =RET= sends; in the other state (insert when submit is normal, normal
+  when submit is insert), =RET= inserts a newline. =S-RET= behavior is
+  controlled by two customs.
+
+** Key bindings
+
+*** gptel-mode-map
+
+    Upstream only binds =C-c RET= to =gptel-send=; =RET= itself is unchanged
+    on the buffer's major mode. Evil-collection layers state-aware =RET= /
+    =S-RET= behavior on top.
+
+    | Command      | Original  | Evil                                                             |
+    |--------------+-----------+------------------------------------------------------------------|
+    | =gptel-send= | =C-c RET= | =C-c RET=                                                        |
+    | =gptel-send= | n/a       | =RET=, =<return>= in submit state                                |
+    | =newline=    | n/a       | =S-RET=, =S-<return>= in submit state; all four in newline state |
+    | =gptel-menu= | n/a       | =S-RET=, =<S-return>= in normal / visual (default)               |
+    | =gptel-send= | =C-c RET= | =S-RET=, =<S-return>= in normal / visual (when menu custom nil)  |
+
+*** gptel-context-buffer-mode-map (normal state)
+
+    | Command                       | Original  | Evil      |
+    |-------------------------------+-----------+-----------|
+    | =gptel-context-next=          | =n=       | =j=       |
+    | =gptel-context-previous=      | =p=       | =k=       |
+    | =gptel-context-flag-deletion= | =d=       | =d=       |
+    | =gptel-context-quit=          | =C-c C-k= | =q=, =ZQ= |
+    | =gptel-context-confirm=       | =C-c C-c= | =ZZ=      |
+    | =gptel-context-visit=         | =RET=     | =RET=     |
+
+** Customization
+
+   | Variable                                       | Default | Purpose                                                                     |
+   |------------------------------------------------+---------+-----------------------------------------------------------------------------|
+   | =evil-collection-gptel-want-shift-ret-to-send= | =t=     | Bind =S-RET= in normal / visual to =gptel-send=.                            |
+   | =evil-collection-gptel-want-shift-ret-menu=    | =t=     | Bind =S-RET= in normal / visual to =gptel-menu=. Wins over the send custom. |
+
+** Integrations
+
+   =gptel-context=: bindings for the context buffer (above) are wired via
+   =with-eval-after-load 'gptel-context=.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gptel/evil-collection-gptel.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gptel/evil-collection-gptel.el
new file mode 100644
index 0000000..67658cc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gptel/evil-collection-gptel.el
@@ -0,0 +1,75 @@
+;;; evil-collection-gptel.el --- Bindings for gptel -*- lexical-binding: t -*-
+
+;; Copyright (C) 2024 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>, Zhiwei Chen <condy0919@gmail.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for gptel.
+
+;;; Code:
+(require 'evil-collection)
+(require 'gptel nil t)
+
+
+(defconst evil-collection-gptel-maps
+  '(gptel-mode-map gptel-context-buffer-mode-map))
+
+(defcustom evil-collection-gptel-want-shift-ret-to-send t
+  "When non nil, S-RET sends query to LLM."
+  :group 'evil-collection
+  :type 'boolean)
+
+(defcustom evil-collection-gptel-want-shift-ret-menu t
+  "When non nil, S-RET opens calls `gptel-menu'. This takes priority over
+ `evil-collection-gptel-want-shift-ret-to-send'."
+  :group 'evil-collection
+  :type 'boolean)
+
+;;;###autoload
+(defun evil-collection-gptel-setup ()
+  "Set up `evil' bindings for gptel."
+  (evil-collection-bind 'gptel-mode-map
+                        'repl-submit 'gptel-send
+                        'repl-newline 'newline
+                        'repl-force-newline 'newline)
+  (if evil-collection-gptel-want-shift-ret-menu
+      (evil-collection-define-key '(normal visual) 'gptel-mode-map
+        (kbd "S-RET") 'gptel-menu
+        (kbd "<S-return>") 'gptel-menu)
+    (when evil-collection-gptel-want-shift-ret-to-send
+      (evil-collection-define-key '(normal visual) 'gptel-mode-map
+        (kbd "S-RET") 'gptel-send
+        (kbd "<S-return>") 'gptel-send)))
+
+  (with-eval-after-load 'gptel-context
+    (evil-collection-define-key 'normal 'gptel-context-buffer-mode-map
+      "j" 'gptel-context-next
+      "k" 'gptel-context-previous
+      "d" 'gptel-context-flag-deletion)
+    (evil-collection-bind 'gptel-context-buffer-mode-map
+                          'quit 'gptel-context-quit
+                          'quit-save 'gptel-context-confirm
+                          'quit-cancel 'gptel-context-quit
+                          'action 'gptel-context-visit)))
+
+(provide 'evil-collection-gptel)
+;;; evil-collection-gptel.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gptel/evil-collection-gptel.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gptel/evil-collection-gptel.elc
new file mode 100644
index 0000000..3846e6d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/gptel/evil-collection-gptel.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/grep/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/grep/README.org
new file mode 100644
index 0000000..cc8cc0c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/grep/README.org
@@ -0,0 +1,15 @@
+* grep
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Grep-Searching.html][grep]].
+
+** Key bindings
+
+   | Command                    | Original | Evil  |
+   |----------------------------+----------+-------|
+   | =evil-search-next=         | n/a      | =n=   |
+   | =next-error-no-select=     | =n=      | =C-j= |
+   | =previous-error-no-select= | =p=      | =C-k= |
+
+** Integrations
+
+   - wgrep: =i= → =wgrep-change-to-wgrep-mode= when =wgrep= is available.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/grep/evil-collection-grep.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/grep/evil-collection-grep.el
new file mode 100644
index 0000000..2fbd388
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/grep/evil-collection-grep.el
@@ -0,0 +1,49 @@
+;;; evil-collection-grep.el --- Bindings for `grep' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 James Nguyen
+
+;; Author: Fredrik Bergroth <fbergroth@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `grep'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'grep)
+
+(defconst evil-collection-grep-maps '(grep-mode-map))
+
+;;;###autoload
+(defun evil-collection-grep-setup ()
+  "Set up `evil' bindings for `grep'."
+  (evil-collection-define-key 'normal 'grep-mode-map
+    "n" 'evil-search-next
+    "\C-j" 'next-error-no-select
+    "\C-k" 'previous-error-no-select)
+
+  ;; `wgrep' integration
+  (when (fboundp 'wgrep-setup)
+    (evil-collection-define-key 'normal 'grep-mode-map
+      "i" 'wgrep-change-to-wgrep-mode)))
+
+(provide 'evil-collection-grep)
+;;; evil-collection-grep.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/grep/evil-collection-grep.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/grep/evil-collection-grep.elc
new file mode 100644
index 0000000..f38f0c1
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/grep/evil-collection-grep.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/guix/evil-collection-guix.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/guix/evil-collection-guix.el
new file mode 100644
index 0000000..1fa27c8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/guix/evil-collection-guix.el
@@ -0,0 +1,202 @@
+;;; evil-collection-guix.el --- Evil bindings for Guix -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, guix, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `guix'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'guix nil t)
+
+(defconst evil-collection-guix-maps '(guix-output-list-mode-map
+                                      guix-package-info-mode-map
+                                      guix-profile-list-mode-map
+                                      guix-profile-info-mode-map
+                                      guix-generation-list-mode-map
+                                      guix-generation-info-mode-map
+                                      guix-license-list-mode-map
+                                      guix-license-info-mode-map
+                                      guix-location-list-mode-map
+                                      guix-hydra-build-list-mode-map
+                                      guix-hydra-build-info-mode-map
+                                      guix-build-log-mode-map
+                                      guix-service-list-mode-map))
+
+(defmacro evil-collection-guix-set (map)
+  "Set common bindings in MAP."
+  `(progn
+     (evil-collection-set-readonly-bindings ',map)
+     (evil-collection-define-key 'normal ',map
+        ;; motion
+        "gm" 'guix-apply-manifest
+
+        ;; sort
+        "o" 'bui-list-sort
+
+        ;; filter
+        "ss" 'bui-enable-filter
+        "sd" 'bui-disable-filter
+
+        ;; mark
+        "m" 'bui-list-mark
+        "M" 'bui-list-mark-all
+        "u" 'bui-list-unmark
+        "U" 'bui-list-unmark-all
+
+        (kbd "C-o") 'bui-history-back
+        (kbd "C-i") 'bui-history-forward)
+     (evil-collection-bind ',map
+                           'next-button 'forward-button
+                           'previous-button 'backward-button
+                           'scroll-down 'scroll-up-command
+                           'scroll-up 'scroll-down-command
+                           'goto-repl 'guix-switch-to-repl
+                           'describe-mode 'bui-show-hint
+                           'refresh 'revert-buffer
+                           'refresh-all 'bui-redisplay)))
+
+;;;###autoload
+(defun evil-collection-guix-setup ()
+  "Set up `evil' bindings for `guix'."
+  (evil-collection-define-push-action evil-collection-guix-bui-list-describe-action
+                                      bui-list-describe)
+  (evil-collection-define-push-action evil-collection-guix-location-list-action
+                                      guix-location-list-show-packages)
+  (evil-collection-guix-set guix-ui-map) ; Covers output-list and generation-list.
+
+  (evil-collection-bind 'guix-output-list-mode-map
+                        'action 'evil-collection-guix-bui-list-describe-action)
+  (evil-collection-define-key 'normal 'guix-output-list-mode-map
+    "gb" 'guix-package-list-latest-builds
+    "gG" 'guix-output-list-graph
+    "gl" 'guix-output-list-lint
+    "gs" 'guix-package-list-size
+
+    "a" 'guix-output-list-mark-upgrade
+    "A" 'guix-output-list-mark-upgrades
+    "d" 'guix-output-list-mark-delete
+    "gd" 'guix-output-list-edit
+    "i" 'guix-output-list-mark-install
+
+    ;; mark
+    "x" 'guix-output-list-execute)
+
+  (evil-collection-guix-set guix-package-info-mode-map)
+  (evil-collection-define-key 'normal 'guix-package-info-mode-map
+    "gG" 'guix-package-info-graph
+    "gl" 'guix-package-info-lint
+    "gs" 'guix-package-info-size
+
+    "a" 'guix-package-info-upgrade
+    "d" 'guix-package-info-delete
+    "gd" 'guix-package-info-edit
+    "i" 'guix-package-info-install)
+
+  (evil-collection-guix-set guix-profile-list-mode-map)
+  (evil-collection-bind 'guix-profile-list-mode-map 'action 'evil-collection-guix-bui-list-describe-action)
+  (evil-collection-define-key 'normal 'guix-profile-list-mode-map
+    "c" 'guix-profile-list-set-current ; TODO: Bind to "." as per the rationale?
+    "p" 'guix-profile-list-show-packages
+    "a" 'guix-profile-list-show-generations
+    "P" 'guix-profile-list-show-search-paths)
+
+  (evil-collection-guix-set guix-profile-info-mode-map)
+  (evil-collection-define-key 'normal 'guix-profile-info-mode-map
+    "gm" 'guix-profile-info-apply-manifest
+
+    "p" 'guix-profile-info-show-packages
+    "a" 'guix-profile-info-show-generations
+    "P" 'guix-profile-info-show-search-paths
+    "c" 'guix-profile-info-set-current)
+
+  (evil-collection-bind 'guix-generation-list-mode-map 'action 'evil-collection-guix-bui-list-describe-action)
+  (evil-collection-define-key 'normal 'guix-generation-list-mode-map
+    "p" 'guix-generation-list-show-packages
+    "D" 'guix-generation-list-mark-delete
+    "P" 'guix-generation-list-show-search-paths
+    "c" 'guix-generation-list-set-current
+    "d" 'guix-generation-list-ediff
+
+    "+" 'guix-generation-list-show-added-packages
+    "-" 'guix-generation-list-show-removed-packages
+    "=" 'guix-generation-list-diff
+
+    ;; mark
+    "x" 'guix-generation-list-execute)
+
+  (evil-collection-guix-set guix-license-list-mode-map)
+  (evil-collection-bind 'guix-license-list-mode-map 'action 'evil-collection-guix-bui-list-describe-action)
+  (evil-collection-define-key 'normal 'guix-license-list-mode-map
+    "p" 'guix-license-list-show-packages
+    "gd" 'guix-license-list-edit)
+
+  (evil-collection-guix-set guix-license-info-mode-map)
+
+  (evil-collection-guix-set guix-location-list-mode-map)
+  (evil-collection-bind 'guix-location-list-mode-map
+                        'action 'evil-collection-guix-location-list-action)
+  (evil-collection-define-key 'normal 'guix-location-list-mode-map
+    "p" 'guix-location-list-show-packages
+    "gd" 'guix-location-list-edit)
+
+  (evil-collection-guix-set guix-store-item-list-mode-map)
+  (evil-collection-bind 'guix-store-item-list-mode-map 'action 'evil-collection-guix-bui-list-describe-action)
+  (evil-collection-define-key 'normal 'guix-store-item-list-mode-map
+    "d" 'guix-store-item-list-mark-delete
+    "gd" 'guix-store-item-list-edit
+    "x" 'guix-store-item-list-execute)
+
+  (evil-collection-guix-set guix-store-item-info-mode-map)
+
+  (evil-collection-guix-set guix-hydra-build-list-mode-map)
+  (evil-collection-bind 'guix-hydra-build-list-mode-map 'action 'evil-collection-guix-bui-list-describe-action)
+  (evil-collection-define-key 'normal 'guix-hydra-build-list-mode-map
+    "gb" 'guix-hydra-build-list-latest-builds
+    "gl" 'guix-hydra-build-list-view-log)
+
+  (evil-collection-guix-set guix-hydra-build-info-mode-map)
+
+  (evil-collection-set-readonly-bindings 'guix-build-log-mode-map)
+  (evil-collection-bind 'guix-build-log-mode-map
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'next-item 'guix-build-log-next-phase
+                        'prev-item 'guix-build-log-previous-phase
+                        'next-section 'guix-build-log-next-phase
+                        'prev-section 'guix-build-log-previous-phase
+                        'goto-repl 'guix-switch-to-repl
+                        'refresh 'revert-buffer
+                        'section-toggle 'guix-build-log-phase-toggle
+                        'section-toggle-all 'guix-build-log-phase-toggle-all)
+
+  (evil-collection-guix-set guix-service-list-mode-map)
+  (evil-collection-bind 'guix-service-list-mode-map 'action 'evil-collection-guix-bui-list-describe-action)
+  (evil-collection-define-key 'normal 'guix-service-list-mode-map
+    "gd" 'guix-service-list-edit)
+
+  (evil-collection-bind 'guix-devel-mode-map 'goto-repl 'guix-switch-to-repl))
+
+(provide 'evil-collection-guix)
+;;; evil-collection-guix.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/guix/evil-collection-guix.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/guix/evil-collection-guix.elc
new file mode 100644
index 0000000..f4e7a3a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/guix/evil-collection-guix.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hackernews/evil-collection-hackernews.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hackernews/evil-collection-hackernews.el
new file mode 100644
index 0000000..1a17dc0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hackernews/evil-collection-hackernews.el
@@ -0,0 +1,62 @@
+;;; evil-collection-hackernews.el --- Evil bindings for hackernews-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, news, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for hackernews.
+
+;;; Code:
+(require 'evil-collection)
+(require 'hackernews nil t)
+
+(defconst evil-collection-hackernews-maps '(hackernews-mode-map
+                                            hackernews-button-map))
+
+;;;###autoload
+(defun evil-collection-hackernews-setup ()
+  "Set up `evil' bindings for `hackernews-mode'."
+  (evil-collection-set-readonly-bindings 'hackernews-mode-map)
+  (evil-collection-bind 'hackernews-mode-map
+                        'next-item 'hackernews-next-item
+                        'prev-item 'hackernews-previous-item
+                        'next-section 'hackernews-next-item
+                        'prev-section 'hackernews-previous-item)
+  (evil-collection-define-key 'normal 'hackernews-mode-map
+    "+" 'hackernews-load-more-stories
+
+    "gf" 'hackernews-switch-feed
+
+    "!" 'hackernews-button-mark-as-visited ; like mu4e
+    "?" 'hackernews-button-mark-as-unvisited)
+  (evil-collection-define-push-action evil-collection-hackernews-action
+                                      hackernews-button-browse-internal)
+  (evil-collection-bind 'hackernews-mode-map
+                        'cycle-next 'hackernews-next-comment
+                        'cycle-previous 'hackernews-previous-comment
+                        'action 'evil-collection-hackernews-action
+                        'action-other 'push-button
+                        'refresh 'hackernews-reload))
+
+(provide 'evil-collection-hackernews)
+;;; evil-collection-hackernews.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hackernews/evil-collection-hackernews.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hackernews/evil-collection-hackernews.elc
new file mode 100644
index 0000000..dce3173
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hackernews/evil-collection-hackernews.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helm/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helm/README.org
new file mode 100644
index 0000000..95a3946
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helm/README.org
@@ -0,0 +1,107 @@
+* helm
+
+  Evil bindings for [[https://emacs-helm.github.io/helm/][helm]].
+
+  =M-= modifiers are preferred over =C-= so the help prefix (=C-h=) is left
+  alone. =h= and =l= are reserved for minibuffer editing in =helm-find-files=
+  and =helm-read-file-map=.
+
+** Key bindings
+
+*** helm-map (insert and normal state unless noted)
+
+    | Command                          | Original | Evil         |
+    |----------------------------------+----------+--------------|
+    | =helm-previous-source=           | =C-o=    | =M-[=        |
+    | =helm-next-source=               | =C-o=    | =M-]=, =C-o= |
+    | =helm-execute-persistent-action= | =C-j=    | =M-l=        |
+    | =helm-next-line=                 | =C-n=    | =M-j=, =C-n= |
+    | =helm-previous-line=             | =C-p=    | =M-k=, =C-p= |
+    | =helm-next-page=                 | =C-v=    | =C-f=, =C-v= |
+    | =helm-previous-page=             | =M-v=    | =C-b=, =M-v= |
+    | =helm-maybe-exit-minibuffer=     | =RET=    | =RET=        |
+
+*** helm-map (normal state only)
+
+    | Command                        | Original  | Evil                                |
+    |--------------------------------+-----------+-------------------------------------|
+    | =helm-select-action=           | =TAB=     | =<tab>=                             |
+    | =helm-previous-source=         | =C-o=     | =[[=, =gk=                          |
+    | =helm-next-source=             | =C-o=     | =]]=, =gj=                          |
+    | =helm-prev-visible-mark=       | =M-(=     | =(=                                 |
+    | =helm-next-visible-mark=       | =M-)=     | =)=                                 |
+    | =helm-next-line=               | =C-n=     | =j=                                 |
+    | =helm-previous-line=           | =C-p=     | =k=                                 |
+    | =helm-beginning-of-buffer=     | =M-<=     | =gg=                                |
+    | =helm-end-of-buffer=           | =M->=     | =G=                                 |
+    | =helm-quit-and-find-file=      | =C-x C-f= | =/=                                 |
+    | =helm-refresh=                 | =C-c C-u= | =gr=                                |
+    | =helm-yank-selection=          | =C-c C-y= | =yp=                                |
+    | =helm-copy-to-buffer=          | n/a       | =yP=                                |
+    | =helm-kill-selection-and-quit= | =C-c C-k= | =yy=                                |
+    | =helm-toggle-visible-mark=     | =C-SPC=   | =SPC=                               |
+    | =helm-previous-page=           | =M-v=     | =C-u= (when =evil-want-C-u-scroll=) |
+    | =helm-next-page=               | =C-v=     | =C-d= (when =evil-want-C-d-scroll=) |
+
+*** helm-find-files-map / helm-read-file-map
+
+    | Command                           | State          | Original | Evil         |
+    |-----------------------------------+----------------+----------+--------------|
+    | =helm-ff-run-switch-other-window= | normal         | =C-c o=  | =go=         |
+    | =helm-ff-run-switch-other-window= | insert, normal | =C-c o=  | =S-<return>= |
+    | =helm-ff-run-find-sh-command=     | normal         | =C-c /=  | =/=          |
+    | =helm-find-files-up-one-level=    | insert, normal | =C-l=    | =M-h=        |
+
+*** helm-find-files-map (normal state)
+
+    | Command                            | Original | Evil |
+    |------------------------------------+----------+------|
+    | =helm-ff-run-ediff-file=           | =C-c =   | ===  |
+    | =helm-ff-run-query-replace-regexp= | =M-%=    | =%=  |
+    | =helm-ff-run-delete-file=          | =M-D=    | =D=  |
+
+*** helm-generic-files-map
+
+    | Command                           | State          | Original | Evil         |
+    |-----------------------------------+----------------+----------+--------------|
+    | =helm-ff-run-switch-other-window= | insert, normal | =C-c o=  | =S-<return>= |
+    | =helm-ff-run-switch-other-window= | normal         | =C-c o=  | =go=         |
+
+*** helm-buffer-map
+
+    | Command                                | State          | Original | Evil         |
+    |----------------------------------------+----------------+----------+--------------|
+    | =helm-buffer-switch-other-window=      | insert, normal | =C-c o=  | =S-<return>= |
+    | =display-buffer=                       | insert, normal | n/a      | =M-<return>= |
+    | =helm-buffer-switch-other-window=      | normal         | =C-c o=  | =go=         |
+    | =display-buffer=                       | normal         | n/a      | =gO=         |
+    | =helm-buffer-run-ediff=                | normal         | =C-c =   | ===          |
+    | =helm-buffer-run-query-replace-regexp= | normal         | =M-%=    | =%=          |
+    | =helm-buffer-run-kill-persistent=      | normal         | =C-c d=  | =D=          |
+
+*** helm-occur-map / helm-grep-map
+
+    | Command                                                             | State          | Original | Evil         |
+    |---------------------------------------------------------------------+----------------+----------+--------------|
+    | =helm-occur-run-goto-line-ow= / =helm-grep-run-other-window-action= | insert, normal | =C-c o=  | =S-<return>= |
+    | same as above                                                       | normal         | =C-c o=  | =go=         |
+
+*** helm-occur-mode-map / helm-grep-mode-map (normal state)
+
+    | Command                                             | Original | Evil        |
+    |-----------------------------------------------------+----------+-------------|
+    | =helm-occur-mode-goto-line= / =helm-grep-mode-jump= | =RET=    | =RET=       |
+    | =...-goto-line-ow= / =...-jump-other-window=        | =C-o=    | =C-o=, =go= |
+    | =...-forward= variant                               | =M-n=    | =M-n=, =gj= |
+    | =...-backward= variant                              | =M-p=    | =M-p=, =gk= |
+    | =helm-gm-next-file=                                 | =M-N=    | =M-N=       |
+    | =helm-gm-precedent-file=                            | =M-P=    | =M-P=       |
+
+** Notes
+
+   - =helm-minibuffer-history-key= is set to =M-p= via =custom-set-variables=.
+   - =helm-default-prompt-display-function= is set so the evil cursor renders
+     correctly in helm's header line when =helm-echo-input-in-header-line= is
+     non-nil.
+   - =evil-collection-helm-hide-minibuffer-maybe= is added to
+     =helm-minibuffer-set-up-hook= to hide the minibuffer cursor in that case.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helm/evil-collection-helm.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helm/evil-collection-helm.el
new file mode 100644
index 0000000..cefafe3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helm/evil-collection-helm.el
@@ -0,0 +1,242 @@
+;;; evil-collection-helm.el --- Evil bindings for Helm  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, helm, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Helm.
+
+;;; Code:
+(require 'evil-collection)
+(require 'helm-files nil t) ; TODO: Check if this is the ideal requirement and if we are not loading too much.
+
+;; To navigate Helm entries with <hjkl> in insert state, we need a modifier.
+;; Using the C- modifier would conflict with the help prefix "C-h".  So we use
+;; M- prefixed bindings instead.
+
+;; Helm-find-files: We cannot use "h" and "l" in normal state to navigate up and
+;; down the file system hierarchy since we need them to use it to edit the
+;; minibuffer content.
+
+(defvar helm-map)
+(defvar helm-find-files-map)
+(defvar helm-generic-files-map)
+(defvar helm-buffer-map)
+(defvar helm-occur-map)
+(defvar helm-grep-map)
+(defvar helm-read-file-map)
+(defvar helm-occur-mode-map)
+(defvar helm-grep-mode-map)
+(defvar helm-echo-input-in-header-line)
+(defvar helm--prompt)
+(defvar helm--action-prompt)
+(defvar helm-header-line-space-before-prompt)
+(defvar helm-default-prompt-display-function)
+
+(declare-function helm-window "helm-lib")
+
+(defconst evil-collection-helm-maps '(help-map
+                                      help-find-files-map
+                                      helm-read-file-map
+                                      helm-generic-files-map
+                                      helm-buffer-map
+                                      helm-occur-map
+                                      helm-grep-map))
+
+;; From https://github.com/emacs-helm/helm/issues/362.
+;; Also see https://emacs.stackexchange.com/questions/17058/change-cursor-type-in-helm-header-line#17097.
+;; TODO: With Evil, the cursor type is not right in the header line and the evil
+;; cursor remains in the minibuffer.  Visual selections also reveal overlayed
+;; text.
+(with-no-warnings
+  (defun evil-collection-helm-hide-minibuffer-maybe ()
+    "Hide text in minibuffer when `helm-echo-input-in-header-line' is non-nil."
+    (when (with-current-buffer (helm-buffer-get) helm-echo-input-in-header-line)
+      (let ((ov (make-overlay (point-min) (point-max) nil nil t)))
+        (overlay-put ov 'window (selected-window))
+        (overlay-put ov 'face (let ((bg-color (face-background 'default nil)))
+                                `(:background ,bg-color :foreground ,bg-color)))
+        (setq-local cursor-type nil)))))
+
+(defun evil-collection-helm--set-prompt-display (pos)
+  (let (beg state region-active m)
+    (with-selected-window (minibuffer-window)
+      (setq beg (save-excursion (vertical-motion 0 (helm-window)) (point))
+            state evil-state
+            region-active (region-active-p)
+            m (mark t)))
+    (when region-active
+      (setq m (- m beg))
+      ;; Increment pos to handle the space before prompt (i.e `pref').
+      (put-text-property (1+ (min m pos)) (+ 2 (max m pos))
+                         'face
+                         (list :background (face-background 'region))
+                         header-line-format))
+    (put-text-property
+     ;; Increment pos to handle the space before prompt (i.e `pref').
+     (+ 1 pos) (+ 2 pos)
+     'face
+     (if (eq state 'insert)
+         'underline
+       ;; Don't just use 'cursor, this can hide the current character.
+       (list :inverse-video t
+             :foreground (face-background 'cursor)
+             :background (face-background 'default)))
+     header-line-format)))
+
+
+;;;###autoload
+(defun evil-collection-helm-setup ()
+  "Set up `evil' bindings for `helm'."
+  (add-hook 'helm-minibuffer-set-up-hook #'evil-collection-helm-hide-minibuffer-maybe)
+  (setq helm-default-prompt-display-function #'evil-collection-helm--set-prompt-display)
+  (custom-set-variables
+   '(helm-minibuffer-history-key "M-p"))
+
+  (evil-collection-define-key '(insert normal) 'helm-map
+    (kbd "M-[") 'helm-previous-source
+    (kbd "M-]") 'helm-next-source
+    (kbd "M-l") 'helm-execute-persistent-action
+    (kbd "M-j") 'helm-next-line
+    (kbd "M-k") 'helm-previous-line
+    (kbd "C-f") 'helm-next-page
+    (kbd "C-b") 'helm-previous-page)
+
+  (dolist (map '(helm-find-files-map helm-read-file-map))
+    (evil-collection-define-key 'normal map
+      "go" 'helm-ff-run-switch-other-window
+      "/" 'helm-ff-run-find-sh-command)
+    (evil-collection-define-key '(insert normal) map
+      (kbd "S-<return>") 'helm-ff-run-switch-other-window
+      (kbd "M-h") 'helm-find-files-up-one-level))
+
+  ;; TODO: Change the Helm header to display "M-l" instead of "C-l".  We don't
+  ;; want to modify the Emacs Helm map.
+
+  (evil-collection-define-key '(insert normal) 'helm-generic-files-map
+    (kbd "S-<return>") 'helm-ff-run-switch-other-window)
+
+  (evil-collection-define-key '(insert normal) 'helm-buffer-map
+    (kbd "S-<return>") 'helm-buffer-switch-other-window
+    (kbd "M-<return>") 'display-buffer)
+
+  (evil-collection-define-key '(insert normal) 'helm-occur-map
+    (kbd "S-<return>") 'helm-occur-run-goto-line-ow)
+
+  (evil-collection-define-key '(insert normal) 'helm-grep-map
+    (kbd "S-<return>") 'helm-grep-run-other-window-action)
+
+  (evil-collection-define-key 'normal 'helm-generic-files-map
+    "go" 'helm-ff-run-switch-other-window)
+
+  (evil-collection-define-key 'normal 'helm-buffer-map
+    "go" 'helm-buffer-switch-other-window
+    "gO" 'display-buffer
+    "=" 'helm-buffer-run-ediff
+    "%" 'helm-buffer-run-query-replace-regexp
+    "D" 'helm-buffer-run-kill-persistent ; Ivy has "D".
+    )
+
+  (evil-collection-define-key 'normal 'helm-occur-map
+    "go" 'helm-occur-run-goto-line-ow)
+
+  (evil-collection-define-key 'normal 'helm-grep-map
+    "go" 'helm-grep-run-other-window-action)
+
+  (evil-collection-define-key 'normal 'helm-find-files-map
+    "=" 'helm-ff-run-ediff-file
+    "%" 'helm-ff-run-query-replace-regexp
+    "D" 'helm-ff-run-delete-file)       ; Ivy has "D".
+
+  ;; These helm bindings should always exist, the evil equivalents do
+  ;; nothing useful in the minibuffer (error or pure failure).
+  ;; RET can't do a second line in the minibuffer.
+  ;; The C-n/C-p completions error with 'helm in helm' session.
+  ;; C-o switches to evil state (again, not useful).
+  (evil-collection-define-key '(insert normal) 'helm-map
+    (kbd "RET") 'helm-maybe-exit-minibuffer
+    (kbd "M-v") 'helm-previous-page
+    (kbd "C-v") 'helm-next-page
+    (kbd "C-o") 'helm-next-source)
+  (evil-collection-bind 'helm-map
+                        'completion-previous 'helm-previous-line
+                        'completion-next     'helm-next-line
+                        'history-previous    'helm-previous-line
+                        'history-next        'helm-next-line)
+
+  (when evil-want-C-u-scroll
+    (evil-collection-define-key 'normal 'helm-map
+      (kbd "C-u") 'helm-previous-page))
+
+  (when evil-want-C-d-scroll
+    (evil-collection-define-key 'normal 'helm-map
+      (kbd "C-d") 'helm-next-page))
+
+  (evil-collection-define-key 'normal 'helm-map
+    (kbd "<tab>") 'helm-select-action   ; TODO: Ivy has "ga".
+    (kbd "(") 'helm-prev-visible-mark
+    (kbd ")") 'helm-next-visible-mark
+    "j" 'helm-next-line
+    "k" 'helm-previous-line
+    "gg" 'helm-beginning-of-buffer
+    "G" 'helm-end-of-buffer
+
+    "/" 'helm-quit-and-find-file
+
+    "yp" 'helm-yank-selection
+    "yP" 'helm-copy-to-buffer
+    "yy" 'helm-kill-selection-and-quit
+    (kbd "SPC") 'helm-toggle-visible-mark)
+  (evil-collection-bind 'helm-map
+                        'next-item 'helm-next-source
+                        'prev-item 'helm-previous-source
+                        'next-section 'helm-next-source
+                        'prev-section 'helm-previous-source
+                        'refresh 'helm-refresh)
+
+  (evil-collection-define-key 'normal 'helm-occur-mode-map
+    (kbd "RET") 'helm-occur-mode-goto-line
+    (kbd "C-o") 'helm-occur-mode-goto-line-ow
+    (kbd "M-n") 'helm-occur-mode-goto-line-ow-forward
+    (kbd "M-p") 'helm-occur-mode-goto-line-ow-backward
+    "go"        'helm-occur-mode-goto-line-ow
+    (kbd "M-N") 'helm-gm-next-file
+    (kbd "M-P") 'helm-gm-precedent-file)
+  (evil-collection-bind 'helm-occur-mode-map
+                        'next-item 'helm-occur-mode-goto-line-ow-forward
+                        'prev-item 'helm-occur-mode-goto-line-ow-backward)
+
+  (evil-collection-define-key 'normal 'helm-grep-mode-map
+    (kbd "RET") 'helm-grep-mode-jump
+    (kbd "C-o") 'helm-grep-mode-jump-other-window
+    (kbd "M-n") 'helm-grep-mode-jump-other-window-forward
+    (kbd "M-p") 'helm-grep-mode-jump-other-window-backward
+    "go"        'helm-grep-mode-jump-other-window
+    (kbd "M-N") 'helm-gm-next-file
+    (kbd "M-P") 'helm-gm-precedent-file)
+  (evil-collection-bind 'helm-grep-mode-map
+                        'next-item 'helm-grep-mode-jump-other-window-forward
+                        'prev-item 'helm-grep-mode-jump-other-window-backward))
+
+(provide 'evil-collection-helm)
+;;; evil-collection-helm.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helm/evil-collection-helm.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helm/evil-collection-helm.elc
new file mode 100644
index 0000000..0f2ff1c
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helm/evil-collection-helm.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/help/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/help/README.org
new file mode 100644
index 0000000..ab65337
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/help/README.org
@@ -0,0 +1,23 @@
+* help
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Help-Mode.html][help-mode]].
+
+** Key bindings
+
+   | Command               | Original       | Evil                 |
+   |-----------------------+----------------+----------------------|
+   | =scroll-up-command=   | =SPC=          | =SPC=, =C-f=         |
+   | =scroll-down-command= | =S-SPC=, =DEL= | =S-SPC=, =C-b=       |
+   | =forward-button=      | =TAB=          | =TAB=, =g TAB=, =g]= |
+   | =backward-button=     | =S-TAB=        | =S-TAB=, =g[=        |
+   | =help-go-back=        | =l=            | =C-o=, =<=           |
+   | =help-go-forward=     | =r=            | =C-i=, =>=           |
+   | =push-button=         | n/a            | =go=, =gO=           |
+   | =describe-mode=       | =h=, =?=       | =g?=                 |
+   | =revert-buffer=       | =g=            | =gr=                 |
+   | =help-follow=         | n/a            | =r=                  |
+   | =help-view-source=    | =s=            | =s=                  |
+   | =help-goto-info=      | =i=            | =i=                  |
+   | =help-customize=      | =c=            | =c=                  |
+
+   The last three require Emacs 28+.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/help/evil-collection-help.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/help/evil-collection-help.el
new file mode 100644
index 0000000..5eedcb7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/help/evil-collection-help.el
@@ -0,0 +1,81 @@
+;;; evil-collection-help.el --- Evil bindings for help-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, help, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `help-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'help-mode)
+
+(defconst evil-collection-help-maps '(help-mode-map))
+
+;;;###autoload
+(defun evil-collection-help-setup ()
+  "Set up `evil' bindings for `help'."
+  (evil-set-initial-state 'help-mode 'normal)
+  (evil-collection-set-readonly-bindings 'help-mode-map)
+  (evil-collection-define-key 'normal 'help-mode-map
+    ;; motion
+    (kbd "C-f") 'scroll-up-command
+    (kbd "C-b") 'scroll-down-command
+    ;; This exists because <tab> is recognized as C-i on terminals.
+    (kbd "g TAB") 'forward-button
+    "g]" 'forward-button
+    "g[" 'backward-button
+
+    (kbd "C-o") 'help-go-back
+    (kbd "C-i") 'help-go-forward
+
+    ;; TODO: Enable more help-go-* bindings?
+    ;; "gj" 'help-go-forward
+    ;; "gk" 'help-go-back
+    ;; "\C-j" 'help-go-forward
+    ;; "\C-k" 'help-go-back
+
+    "<" 'help-go-back
+    ">" 'help-go-forward
+    "r" 'help-follow)
+
+  ;; The following bindings don't do what they are supposed to. "go" should open
+  ;; in the same window and "gO" should open in a different one.
+  (evil-collection-bind 'help-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'action-other 'push-button
+                        'action-stay 'push-button
+                        'describe-mode 'describe-mode
+                        'refresh 'revert-buffer)
+
+  (when (>= emacs-major-version 28)
+    (evil-collection-define-key 'normal 'help-mode-map
+      "s" 'help-view-source
+      "i" 'help-goto-info
+      "c" 'help-customize)))
+
+(provide 'evil-collection-help)
+;;; evil-collection-help.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/help/evil-collection-help.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/help/evil-collection-help.elc
new file mode 100644
index 0000000..51bdd7c
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/help/evil-collection-help.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helpful/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helpful/README.org
new file mode 100644
index 0000000..8d41b3d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helpful/README.org
@@ -0,0 +1,19 @@
+* helpful
+
+  Evil bindings for [[https://github.com/Wilfred/helpful][helpful]].
+
+  Standard motion / quit bindings come from =evil-collection-set-readonly-bindings=
+  and are not repeated below.
+
+** Key bindings
+
+*** helpful-mode-map (normal state)
+
+    | Command                   | Original    | Evil        |
+    |---------------------------+-------------+-------------|
+    | =forward-button=          | =TAB=, =n=  | =<tab>=     |
+    | =backward-button=         | =<backtab>= | =<backtab>= |
+    | =helpful-visit-reference= | =RET=       | =RET=       |
+    | =push-button=             | n/a         | =go=, =gO=  |
+    | =describe-mode=           | n/a         | =g?=        |
+    | =helpful-update=          | =g=         | =gr=        |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helpful/evil-collection-helpful.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helpful/evil-collection-helpful.el
new file mode 100644
index 0000000..0663a55
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helpful/evil-collection-helpful.el
@@ -0,0 +1,53 @@
+;;; evil-collection-helpful.el --- Evil bindings for helpful-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, help, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `helpful-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'helpful nil t)
+
+(defconst evil-collection-helpful-maps '(helpful-mode-map))
+
+;;;###autoload
+(defun evil-collection-helpful-setup ()
+  "Set up `evil' bindings for `helpful'."
+  (evil-collection-set-readonly-bindings 'helpful-mode-map)
+  (evil-collection-define-push-action evil-collection-helpful-action
+                                      helpful-visit-reference)
+  (evil-collection-bind 'helpful-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button
+                        'action 'evil-collection-helpful-action
+                        ;; action-other / action-stay don't distinguish in helpful yet
+                        ;; but belong to the action family.
+                        'action-other 'push-button
+                        'action-stay 'push-button
+                        'describe-mode 'describe-mode
+                        'refresh 'helpful-update))
+
+(provide 'evil-collection-helpful)
+;;; evil-collection-helpful.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helpful/evil-collection-helpful.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helpful/evil-collection-helpful.elc
new file mode 100644
index 0000000..9bdc763
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/helpful/evil-collection-helpful.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hg-histedit/evil-collection-hg-histedit.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hg-histedit/evil-collection-hg-histedit.el
new file mode 100644
index 0000000..cd543de
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hg-histedit/evil-collection-hg-histedit.el
@@ -0,0 +1,49 @@
+;;; evil-collection-hg-histedit.el --- Bindings for `hg-histedit' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `hg-histedit'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'hg-histedit nil t)
+
+(defconst evil-collection-hg-histedit-maps '(hg-histedit-mode-map))
+
+;;;###autoload
+(defun evil-collection-hg-histedit-setup ()
+  "Set up `evil' bindings for `hg-histedit'."
+  (evil-collection-bind 'hg-histedit-mode-map 'edit 'hg-histedit-modify-commit-with-edit)
+  (evil-collection-define-key 'normal 'hg-histedit-mode-map
+    "m" 'hg-histedit-modify-commit-with-mess
+    "p" 'hg-histedit-modify-commit-with-pick
+    "b" 'hg-histedit-modify-commit-with-base
+    "d" 'hg-histedit-modify-commit-with-drop
+    "f" 'hg-histedit-modify-commit-with-fold
+    "r" 'hg-histedit-modify-commit-with-roll
+    "u" 'hg-histedit-undo))
+
+(provide 'evil-collection-hg-histedit)
+;;; evil-collection-hg-histedit.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hg-histedit/evil-collection-hg-histedit.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hg-histedit/evil-collection-hg-histedit.elc
new file mode 100644
index 0000000..f89440b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hg-histedit/evil-collection-hg-histedit.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hideshow/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hideshow/README.org
new file mode 100644
index 0000000..5599606
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hideshow/README.org
@@ -0,0 +1,11 @@
+* hideshow
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Hideshow.html][hideshow]] (=hs-minor-mode=). Standard fold operations
+  (=zo=, =zc=, =zr=, =zm=, =zR=, =zM=, =za=) are provided by evil itself via
+  =evil-fold-list=; this module adds the missing level-hide binding.
+
+** Key bindings
+
+   | Command         | Original    | Evil |
+   |-----------------+-------------+------|
+   | =hs-hide-level= | =C-c @ C-l= | =zL= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hideshow/evil-collection-hideshow.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hideshow/evil-collection-hideshow.el
new file mode 100644
index 0000000..ba27d84
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hideshow/evil-collection-hideshow.el
@@ -0,0 +1,45 @@
+;;; evil-collection-hideshow --- Bindings for `hideshow'  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2025 Julian Hoch
+
+;; Author: Julian Hoch <julianhoch@web.de>
+;; Maintainer: Julian Hoch <julianhoch@web.de>
+;; Created: 2025-09-27
+;; Keywords: evil, emacs, tools
+;; URL: https://github.com/emacs-evil/evil-collection
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `hideshow'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'hideshow nil t)
+
+(declare-function hs-hide-level "hideshow")
+(defvar hs-minor-mode-map)
+(defconst evil-collection-hideshow-maps '(hs-minor-mode-map))
+
+;;;###autoload
+(defun evil-collection-hideshow-setup ()
+  "Set up `evil' bindings for `hideshow'."
+  (evil-set-initial-state 'hs-minor-mode 'normal)
+  (evil-collection-define-key 'normal 'hs-minor-mode-map
+    "zL" 'hs-hide-level))
+
+(provide 'evil-collection-hideshow)
+;;; evil-collection-hideshow.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hideshow/evil-collection-hideshow.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hideshow/evil-collection-hideshow.elc
new file mode 100644
index 0000000..c448a7b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hideshow/evil-collection-hideshow.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hungry-delete/evil-collection-hungry-delete.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hungry-delete/evil-collection-hungry-delete.el
new file mode 100644
index 0000000..24add15
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hungry-delete/evil-collection-hungry-delete.el
@@ -0,0 +1,60 @@
+;;; evil-collection-hungry-delete.el --- Bindings for `hungry-delete' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, hungry-delete, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `hungry-delete'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'hungry-delete nil t)
+
+(defconst evil-collection-hungry-delete-maps '(hungry-delete-mode-map))
+
+(defun evil-collection-hungry-delete (f &rest args)
+  "Wrapper function to run `hungry-delete-backward' if
+`hungry-delete-mode' is on."
+  (if (and (bound-and-true-p hungry-delete-mode)
+           (fboundp 'hungry-delete-backward))
+      (hungry-delete-backward 1)
+    (apply f args)))
+
+(defun evil-collection-hungry-delete-for-join (f &rest args)
+  "Wrapper function to run `hungry-delete-backward' if
+`hungry-delete-mode' is on."
+  (if (and (bound-and-true-p hungry-delete-mode)
+           (fboundp 'hungry-delete-backward))
+      (hungry-delete-backward 1)
+    (funcall f args)))
+
+;;;###autoload
+(defun evil-collection-hungry-delete-setup ()
+  "Set up `evil' bindings for `hungry-delete'."
+  (advice-add 'evil-delete-backward-char
+              :around #'evil-collection-hungry-delete)
+  (advice-add 'evil-delete-backward-char-and-join
+              :around #'evil-collection-hungry-delete-for-join))
+
+(provide 'evil-collection-hungry-delete)
+;;; evil-collection-hungry-delete.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hungry-delete/evil-collection-hungry-delete.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hungry-delete/evil-collection-hungry-delete.elc
new file mode 100644
index 0000000..5f133f3
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hungry-delete/evil-collection-hungry-delete.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hyrolo/evil-collection-hyrolo.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hyrolo/evil-collection-hyrolo.el
new file mode 100644
index 0000000..35e7445
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hyrolo/evil-collection-hyrolo.el
@@ -0,0 +1,31 @@
+;;; evil-collection-hyrolo.el --- Bindings for `hyrolo' -*- lexical-binding: t -*-
+
+;;; Commentary:
+;;; Bindings for hyrolo.
+
+;;; Code:
+(require 'evil-collection)
+(require 'hyperbole nil t)
+
+(defvar hyrolo-mode-map)
+(defconst evil-collection-hyrolo-maps '(hyrolo-mode-map))
+
+(declare-function hyrolo-to-previous-loc "hyrolo")
+(declare-function hyrolo-to-next-loc "hyrolo")
+(declare-function hyrolo-overview "hyrolo")
+(declare-function hyrolo-outline-show-all "hyrolo")
+
+(defun evil-collection-hyrolo-setup ()
+  "Set up `evil' bindings for hyrolo."
+  (evil-collection-define-key 'normal 'hyrolo-mode-map
+    (kbd "zo") #'hyrolo-outline-show-all
+    (kbd "zc") #'hyrolo-overview)
+  (evil-collection-bind 'hyrolo-mode-map
+                        'next-item #'hyrolo-to-next-loc
+                        'prev-item #'hyrolo-to-previous-loc
+                        'next-section #'hyrolo-to-next-loc
+                        'prev-section #'hyrolo-to-previous-loc)
+  (evil-set-initial-state 'hyrolo-mode 'normal))
+
+(provide 'evil-collection-hyrolo)
+;;; evil-collection-hyrolo.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hyrolo/evil-collection-hyrolo.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hyrolo/evil-collection-hyrolo.elc
new file mode 100644
index 0000000..0a6533e
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/hyrolo/evil-collection-hyrolo.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ibuffer/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ibuffer/README.org
new file mode 100644
index 0000000..b4f7fc5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ibuffer/README.org
@@ -0,0 +1,60 @@
+* ibuffer
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Ibuffer.html][IBuffer]].
+
+** Key bindings
+
+   Most marking, filtering, and operate-on-marked commands keep their default
+   ibuffer keys. The table below covers what evil-collection relocates.
+
+   | Command                                      | Original        | Evil                                       |
+   |----------------------------------------------+-----------------+--------------------------------------------|
+   | =ibuffer-forward-line=                       | =n=             | (default)                                  |
+   | =ibuffer-backward-line=                      | =p=             | (default)                                  |
+   | =ibuffer-forward-line= (g-prefix)            | n/a             | =gj=                                       |
+   | =ibuffer-backward-line= (g-prefix)           | n/a             | =gk=                                       |
+   | =ibuffer-update=                             | =g=             | =gr=                                       |
+   | =ibuffer-redisplay=                          | =l=             | =gR=                                       |
+   | =ibuffer-jump-to-buffer=                     | =j=, =M-g=      | =J=, =M-g=                                 |
+   | =ibuffer-visit-buffer=                       | =RET=, =e=, =f= | =RET=                                      |
+   | =ibuffer-visit-buffer-other-window=          | =o=             | =go=                                       |
+   | =ibuffer-visit-buffer-other-window-noselect= | =C-o=           | =C-o=                                      |
+   | =ibuffer-visit-buffer-1-window=              | =M-o=           | =M-o=                                      |
+   | =ibuffer-do-view=                            | =A=, =v=        | =A=, =gv=                                  |
+   | =ibuffer-do-view-horizontally=               | =C-x v=         | =gV=                                       |
+   | =ibuffer-mark-forward=                       | =m=             | =m=                                        |
+   | =ibuffer-unmark-forward=                     | =u=             | =u=                                        |
+   | =ibuffer-unmark-backward=                    | =DEL=           | =DEL=                                      |
+   | =ibuffer-toggle-marks=                       | =t=             | =t=, =~=                                   |
+   | =ibuffer-unmark-all-marks=                   | =U=             | =U=                                        |
+   | =ibuffer-unmark-all=                         | =M-DEL=         | =M-DEL=                                    |
+   | =ibuffer-mark-for-delete=                    | =d=             | =d=                                        |
+   | =ibuffer-mark-for-delete-backwards=          | =C-d=           | =C-d= (when =evil-want-C-d-scroll= is nil) |
+   | =ibuffer-do-kill-on-deletion-marks=          | =x=             | =x=                                        |
+   | =ibuffer-do-kill-lines=                      | =k=             | =K=                                        |
+   | =ibuffer-bury-buffer=                        | =b=             | =X=                                        |
+   | =ibuffer-kill-line=                          | =C-k=           | =gx=                                       |
+   | =ibuffer-yank=                               | =C-y=           | =C-y=                                      |
+   | =ibuffer-copy-filename-as-kill=              | =w=             | =yf=                                       |
+   | =ibuffer-copy-buffername-as-kill=            | =B=             | =yb=                                       |
+   | =ibuffer-diff-with-file=                     | ===             | ===                                        |
+   | =ibuffer-toggle-sorting-mode=                | =,=             | =,=                                        |
+   | =ibuffer-invert-sorting=                     | =s i=           | =o i=                                      |
+   | =ibuffer-do-sort-by-alphabetic=              | =s a=           | =o a=                                      |
+   | =ibuffer-do-sort-by-recency=                 | =s v=           | =o v=                                      |
+   | =ibuffer-do-sort-by-size=                    | =s s=           | =o s=                                      |
+   | =ibuffer-do-sort-by-filename/process=        | =s f=           | =o f=                                      |
+   | =ibuffer-do-sort-by-major-mode=              | =s m=           | =o m=                                      |
+   | =ibuffer-forward-filter-group=               | =M-n=, =TAB=    | =C-j=, =M-n=, =]]=, =TAB=                  |
+   | =ibuffer-backward-filter-group=              | =M-p=, =S-TAB=  | =C-k=, =M-p=, =[[=, =S-TAB=                |
+   | =ibuffer-jump-to-filter-group=               | =M-j=           | =M-j=                                      |
+   | =ibuffer-forward-next-marked=                | =M-}=           | =}=, =M-}=                                 |
+   | =ibuffer-backwards-next-marked=              | =M-{=           | ={=, =M-{=                                 |
+   | =ibuffer-switch-format=                      | =`=             | =`=                                        |
+   | =ibuffer-add-to-tmp-show=                    | =+=             | =+=                                        |
+   | =ibuffer-add-to-tmp-hide=                    | =-=             | =-=                                        |
+   | =quit-window=                                | =q=             | =q=, =ZZ=, =ZQ=                            |
+
+   Operate-on-marked uppercase keys (=D=, =E=, =F=, =H=, =I=, =M=, =N=, =O=,
+   =P=, =Q=, =R=, =S=, =T=, =V=, =W=), the =% =, =* =, =s = (filter) and
+   =/ = prefixes keep their default ibuffer behavior.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ibuffer/evil-collection-ibuffer.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ibuffer/evil-collection-ibuffer.el
new file mode 100644
index 0000000..75de754
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ibuffer/evil-collection-ibuffer.el
@@ -0,0 +1,193 @@
+;;; evil-collection-ibuffer.el --- Evil bindings for IBuffer -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, ibuffer, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for IBuffer.
+
+;;; Code:
+(require 'evil-collection)
+(require 'ibuffer)
+
+(defconst evil-collection-ibuffer-maps '(ibuffer-mode-map))
+
+;;;###autoload
+(defun evil-collection-ibuffer-setup ()
+  "Set up `evil' bindings for `ibuffer'."
+  (evil-set-initial-state 'ibuffer-mode 'normal)
+
+  (evil-collection-bind 'ibuffer-mode-map
+                        'rename 'ibuffer-do-rename-uniquely
+                        'jump 'ibuffer-jump-to-buffer)
+
+  (evil-collection-define-key 'normal 'ibuffer-mode-map
+    (kbd "C-d") (if evil-want-C-d-scroll
+                    'evil-scroll-down
+                  'ibuffer-mark-for-delete-backwards))
+
+  (evil-collection-define-key 'normal 'ibuffer-mode-map
+    (kbd "=") 'ibuffer-diff-with-file
+    (kbd "M-g") 'ibuffer-jump-to-buffer
+    (kbd "t") 'ibuffer-toggle-marks
+    (kbd "M-s a C-s") 'ibuffer-do-isearch
+    (kbd "M-s a M-C-s") 'ibuffer-do-isearch-regexp
+    (kbd "M-s a C-o") 'ibuffer-do-occur
+
+    ;; mark
+    (kbd "DEL") 'ibuffer-unmark-backward
+    (kbd "M-DEL") 'ibuffer-unmark-all
+    (kbd "* *") 'ibuffer-mark-special-buffers
+    (kbd "* c") 'ibuffer-change-marks
+    (kbd "* M") 'ibuffer-mark-by-mode
+    (kbd "* m") 'ibuffer-mark-modified-buffers
+    (kbd "* u") 'ibuffer-mark-unsaved-buffers
+    (kbd "* s") 'ibuffer-mark-special-buffers
+    (kbd "* r") 'ibuffer-mark-read-only-buffers
+    (kbd "* /") 'ibuffer-mark-dired-buffers
+    (kbd "* e") 'ibuffer-mark-dissociated-buffers
+    (kbd "* h") 'ibuffer-mark-help-buffers
+    (kbd "* z") 'ibuffer-mark-compressed-file-buffers
+    (kbd ".") 'ibuffer-mark-old-buffers
+
+    ;; immediate operations
+    (kbd "}") 'ibuffer-forward-next-marked
+    (kbd "{") 'ibuffer-backwards-next-marked
+    (kbd "M-}") 'ibuffer-forward-next-marked
+    (kbd "M-{") 'ibuffer-backwards-next-marked
+
+    (kbd "gR") 'ibuffer-redisplay
+    (kbd "gr") 'ibuffer-update
+
+    "`" 'ibuffer-switch-format
+    "-" 'ibuffer-add-to-tmp-hide
+    "+" 'ibuffer-add-to-tmp-show
+    "X" 'ibuffer-bury-buffer
+    (kbd ",") 'ibuffer-toggle-sorting-mode
+    (kbd "o i") 'ibuffer-invert-sorting
+    (kbd "o a") 'ibuffer-do-sort-by-alphabetic
+    (kbd "o v") 'ibuffer-do-sort-by-recency
+    (kbd "o s") 'ibuffer-do-sort-by-size
+    (kbd "o f") 'ibuffer-do-sort-by-filename/process
+    (kbd "o m") 'ibuffer-do-sort-by-major-mode
+
+    (kbd "s RET") 'ibuffer-filter-by-mode
+    (kbd "s m") 'ibuffer-filter-by-used-mode
+    (kbd "s M") 'ibuffer-filter-by-derived-mode
+    (kbd "s n") 'ibuffer-filter-by-name
+    (kbd "s *") 'ibuffer-filter-by-starred-name
+    (kbd "s f") 'ibuffer-filter-by-filename
+    (kbd "s b") 'ibuffer-filter-by-basename
+    (kbd "s .") 'ibuffer-filter-by-file-extension
+    (kbd "s <") 'ibuffer-filter-by-size-lt
+    (kbd "s >") 'ibuffer-filter-by-size-gt
+    (kbd "s i") 'ibuffer-filter-by-modified
+    (kbd "s v") 'ibuffer-filter-by-visiting-file
+    (kbd "s c") 'ibuffer-filter-by-content
+    (kbd "s e") 'ibuffer-filter-by-predicate
+
+    (kbd "s r") 'ibuffer-switch-to-saved-filters
+    (kbd "s a") 'ibuffer-add-saved-filters
+    (kbd "s x") 'ibuffer-delete-saved-filters
+    (kbd "s d") 'ibuffer-decompose-filter
+    (kbd "s s") 'ibuffer-save-filters
+    (kbd "s p") 'ibuffer-pop-filter
+    (kbd "s <up>") 'ibuffer-pop-filter
+    (kbd "s !") 'ibuffer-negate-filter
+    (kbd "s t") 'ibuffer-exchange-filters
+    (kbd "s TAB") 'ibuffer-exchange-filters
+    (kbd "s o") 'ibuffer-or-filter
+    (kbd "s |") 'ibuffer-or-filter
+    (kbd "s &") 'ibuffer-and-filter
+    (kbd "s g") 'ibuffer-filters-to-filter-group
+    (kbd "s P") 'ibuffer-pop-filter-group
+    (kbd "s S-<up>") 'ibuffer-pop-filter-group
+    (kbd "s D") 'ibuffer-decompose-filter-group
+    (kbd "s /") 'ibuffer-filter-disable
+
+    (kbd "M-n") 'ibuffer-forward-filter-group
+    "\t" 'ibuffer-forward-filter-group
+    (kbd "M-p") 'ibuffer-backward-filter-group
+    [backtab] 'ibuffer-backward-filter-group
+    (kbd "M-j") 'ibuffer-jump-to-filter-group
+    (kbd "gx") 'ibuffer-kill-line
+    (kbd "C-y") 'ibuffer-yank
+    (kbd "s S") 'ibuffer-save-filter-groups
+    (kbd "s R") 'ibuffer-switch-to-saved-filter-groups
+    (kbd "s X") 'ibuffer-delete-saved-filter-groups
+    (kbd "s \\") 'ibuffer-clear-filter-groups
+
+    (kbd "% n") 'ibuffer-mark-by-name-regexp
+    (kbd "% m") 'ibuffer-mark-by-mode-regexp
+    (kbd "% f") 'ibuffer-mark-by-file-name-regexp
+    (kbd "% g") 'ibuffer-mark-by-content-regexp
+    (kbd "% L") 'ibuffer-mark-by-locked
+
+    (kbd "C-t") 'ibuffer-visit-tags-table
+
+    (kbd "|") 'ibuffer-do-shell-command-pipe
+    (kbd "!") 'ibuffer-do-shell-command-file
+    ;; marked operations
+    (kbd "A") 'ibuffer-do-view
+    (kbd "D") 'ibuffer-do-delete
+    (kbd "E") 'ibuffer-do-eval
+    (kbd "F") 'ibuffer-do-shell-command-file
+    (kbd "I") 'ibuffer-do-query-replace-regexp
+    (kbd "H") 'ibuffer-do-view-other-frame
+    (kbd "N") 'ibuffer-do-shell-command-pipe-replace
+    (kbd "M") 'ibuffer-do-toggle-modified
+    (kbd "O") 'ibuffer-do-occur
+    (kbd "P") 'ibuffer-do-print
+    (kbd "Q") 'ibuffer-do-query-replace
+    (kbd "S") 'ibuffer-do-save
+    (kbd "T") 'ibuffer-do-toggle-read-only
+    (kbd "r") 'ibuffer-do-replace-regexp
+    (kbd "V") 'ibuffer-do-revert
+    (kbd "W") 'ibuffer-do-view-and-eval
+
+    (kbd "K") 'ibuffer-do-kill-lines
+    (kbd "yf") 'ibuffer-copy-filename-as-kill
+    (kbd "yb") 'ibuffer-copy-buffername-as-kill
+
+    (kbd "gv") 'ibuffer-do-view
+    (kbd "gV") 'ibuffer-do-view-horizontally)
+  (evil-collection-bind 'ibuffer-mode-map
+                        'mark 'ibuffer-mark-forward
+                        'unmark 'ibuffer-unmark-forward
+                        'unmark-all 'ibuffer-unmark-all-marks
+                        'toggle-all 'ibuffer-toggle-marks
+                        'mark-delete 'ibuffer-mark-for-delete
+                        'execute-marks 'ibuffer-do-kill-on-deletion-marks
+                        'action 'ibuffer-visit-buffer
+                        'action-other 'ibuffer-visit-buffer-other-window
+                        'action-stay 'ibuffer-visit-buffer-other-window-noselect
+                        'next-item 'ibuffer-forward-line
+                        'prev-item 'ibuffer-backward-line
+                        'next-section 'ibuffer-forward-filter-group
+                        'prev-section 'ibuffer-backward-filter-group
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window))
+
+(provide 'evil-collection-ibuffer)
+;;; evil-collection-ibuffer.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ibuffer/evil-collection-ibuffer.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ibuffer/evil-collection-ibuffer.elc
new file mode 100644
index 0000000..fb1cb05
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ibuffer/evil-collection-ibuffer.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ielm/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ielm/README.org
new file mode 100644
index 0000000..f7ce241
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ielm/README.org
@@ -0,0 +1,22 @@
+* ielm
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Lisp-Interaction.html][IELM]] (Inferior Emacs Lisp Mode).
+
+  Initial state is =insert=. =RET= sends input in the state named by
+  =evil-collection-repl-submit-state=.
+
+** Key bindings
+
+   | Command       | Original | Evil                 |
+   |---------------+----------+----------------------|
+   | =ielm-return= | =RET=    | =RET= (submit state) |
+
+** Customization
+
+   | Variable                                | Default | Purpose                                                |
+   |-----------------------------------------+---------+--------------------------------------------------------|
+   | =evil-collection-ielm-move-cursor-back= | =nil=   | Move cursor back one column when leaving insert state. |
+
+** Notes
+
+   - On entering normal state, point stays put (no Vim-style backward step).
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ielm/evil-collection-ielm.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ielm/evil-collection-ielm.el
new file mode 100644
index 0000000..c18efdb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ielm/evil-collection-ielm.el
@@ -0,0 +1,57 @@
+;;; evil-collection-ielm.el --- Bindings for `ielm' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026 Ian Pan <ianpan870102@gmail.com>
+
+;; Author: Ian Pan <ianpan870102@gmail.com>
+;; Maintainer: Ian Pan <ianpan870102@gmail.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, ielm, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `ielm' (Inferior Emacs Lisp Mode).
+
+;;; Code:
+(require 'evil-collection)
+(require 'ielm nil t)
+
+(defvar inferior-emacs-lisp-mode-map)
+(defconst evil-collection-ielm-maps '(inferior-emacs-lisp-mode-map))
+
+(defcustom evil-collection-ielm-move-cursor-back nil
+  "Whether the cursor is moved backwards when exiting insert state."
+  :type 'boolean
+  :group 'ielm)
+
+(defun evil-collection-ielm-escape-stay ()
+  "Go back to normal state but don't move cursor backwards.
+Moving cursor backwards is the default vim behavior but
+it is not intuitive for some cases like REPL buffers."
+  (setq-local evil-move-cursor-back
+              evil-collection-ielm-move-cursor-back))
+
+;;;###autoload
+(defun evil-collection-ielm-setup ()
+  "Set up `evil' bindings for `ielm'."
+  (evil-set-initial-state 'inferior-emacs-lisp-mode 'insert)
+
+  (add-hook 'ielm-mode-hook #'evil-collection-ielm-escape-stay)
+
+  (evil-collection-bind 'inferior-emacs-lisp-mode-map 'repl-submit #'ielm-return))
+
+(provide 'evil-collection-ielm)
+;;; evil-collection-ielm.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ielm/evil-collection-ielm.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ielm/evil-collection-ielm.elc
new file mode 100644
index 0000000..aa44aed
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ielm/evil-collection-ielm.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image+/evil-collection-image+.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image+/evil-collection-image+.el
new file mode 100644
index 0000000..4f2d1c5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image+/evil-collection-image+.el
@@ -0,0 +1,55 @@
+;;; evil-collection-image+.el --- Evil bindings for image-mode with image+ -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, image, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for image-mode with image+.
+
+;;; Code:
+(require 'evil-collection)
+(require 'image+ nil t)
+
+(defconst evil-collection-image+-maps '(image-mode-map))
+
+;;;###autoload
+(defun evil-collection-image+-setup ()
+  "Set up `evil' bindings for `image+'."
+  (evil-collection-define-key 'normal 'image-mode-map
+    ;; `+'/`='/`-' come from the theme; keep `O' inline as synonym for reset.
+    "O" 'imagex-sticky-restore-original
+
+    "M" 'imagex-sticky-maximize
+    "m" 'imagex-auto-adjust-mode
+    "S" 'imagex-sticky-save-image
+    "r" 'imagex-sticky-rotate-right
+    "R" 'imagex-sticky-rotate-left
+    "<" 'imagex-sticky-rotate-left ; like sxiv
+    ">" 'imagex-sticky-rotate-right) ; like sxiv
+  (evil-collection-bind 'image-mode-map
+                        'zoom-in    'imagex-sticky-zoom-in
+                        'zoom-out   'imagex-sticky-zoom-out
+                        'zoom-reset 'imagex-sticky-restore-original))
+
+(provide 'evil-collection-image+)
+;;; evil-collection-image+.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image+/evil-collection-image+.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image+/evil-collection-image+.elc
new file mode 100644
index 0000000..1555416
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image+/evil-collection-image+.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image-dired/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image-dired/README.org
new file mode 100644
index 0000000..e9f6a05
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image-dired/README.org
@@ -0,0 +1,31 @@
+* image-dired
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Image_002dDired.html][image-dired-thumbnail-mode]].
+
+** Key bindings
+
+   | Command                                           | Original  | Evil      |
+   |---------------------------------------------------+-----------+-----------|
+   | =image-dired-backward-image=                      | =<left>=  | =h=       |
+   | =image-dired-forward-image=                       | =<right>= | =l=       |
+   | =image-dired-next-line=                           | =<down>=  | =j=       |
+   | =image-dired-previous-line=                       | =<up>=    | =k=       |
+   | =image-dired-display-next-thumbnail-original=     | =SPC=     | =SPC=     |
+   | =image-dired-display-previous-thumbnail-original= | =DEL=     | =S-SPC=   |
+   | =image-dired-display-thumbnail-original-image=    | =RET=     | =RET=     |
+   | =image-dired-comment-thumbnail=                   | =c=       | =c=       |
+   | =image-dired-thumbnail-set-image-description=     | =D=       | =d=       |
+   | =image-dired-mark-thumb-original-file=            | =m=       | =m=       |
+   | =image-dired-unmark-thumb-original-file=          | =u=       | =u=       |
+   | =image-dired-delete-char=                         | =C-d=     | =D=       |
+   | =image-dired-rotate-thumbnail-right=              | n/a       | =r=       |
+   | =image-dired-rotate-thumbnail-left=               | n/a       | =R=       |
+   | =image-dired-rotate-original-left=                | =L=       | =<=       |
+   | =image-dired-rotate-original-right=               | =R=       | =>=       |
+   | =image-dired-tag-thumbnail=                       | =t t=     | =tt=      |
+   | =image-dired-tag-thumbnail-remove=                | =t r=     | =tr=      |
+   | =image-dired-line-up=                             | =g f=     | =ff=      |
+   | =image-dired-line-up-dynamic=                     | =g g=     | =fd=      |
+   | =image-dired-line-up-interactive=                 | =g i=     | =fi=      |
+   | =quit-window=                                     | =q=       | =q=, =ZZ= |
+   | =evil-quit=                                       | n/a       | =ZQ=      |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image-dired/evil-collection-image-dired.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image-dired/evil-collection-image-dired.el
new file mode 100644
index 0000000..d60d998
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image-dired/evil-collection-image-dired.el
@@ -0,0 +1,73 @@
+;;; evil-collection-image-dired.el --- Evil bindings for image-dired-thumbnail-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, dired, image, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `image-dired-thumbnail-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'image-dired)
+
+(defconst evil-collection-image-dired-maps '(image-dired-thumbnail-mode-map))
+
+;;;###autoload
+(defun evil-collection-image-dired-setup ()
+  "Set up `evil' bindings for `image-dired-thumbnail-mode'."
+  (evil-collection-define-key 'normal 'image-dired-thumbnail-mode-map
+    ;; motion
+    "h" 'image-dired-backward-image
+    "l" 'image-dired-forward-image
+    "j" 'image-dired-next-line
+    "k" 'image-dired-previous-line
+
+    (kbd "SPC") 'image-dired-display-next-thumbnail-original
+    (kbd "S-SPC") 'image-dired-display-previous-thumbnail-original
+
+    "c" 'image-dired-comment-thumbnail
+    "d" 'image-dired-thumbnail-set-image-description
+    "m" 'image-dired-mark-thumb-original-file
+    "u" 'image-dired-unmark-thumb-original-file
+    "D" 'image-dired-delete-char
+
+    ;; See image+.
+    "r" 'image-dired-rotate-thumbnail-right
+    "R" 'image-dired-rotate-thumbnail-left
+    "<" 'image-dired-rotate-original-left ; like sxiv
+    ">" 'image-dired-rotate-original-right ; like sxiv
+
+    "tr" 'image-dired-tag-thumbnail-remove
+    "tt" 'image-dired-tag-thumbnail
+
+    "ff" 'image-dired-line-up
+    "fd" 'image-dired-line-up-dynamic
+    "fi" 'image-dired-line-up-interactive)
+  (evil-collection-bind 'image-dired-thumbnail-mode-map
+                        'action 'image-dired-display-thumbnail-original-image
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit))
+
+(provide 'evil-collection-image-dired)
+;;; evil-collection-image-dired.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image-dired/evil-collection-image-dired.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image-dired/evil-collection-image-dired.elc
new file mode 100644
index 0000000..8026c41
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image-dired/evil-collection-image-dired.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image/README.org
new file mode 100644
index 0000000..7824491
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image/README.org
@@ -0,0 +1,36 @@
+* image
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Image-Mode.html][image-mode]].
+
+** Key bindings
+
+   | Command                            | Original         | Evil                |
+   |------------------------------------+------------------+---------------------|
+   | =image-bob=                        | =<=              | =gg=                |
+   | =image-eob=                        | =>=              | =G=                 |
+   | =image-forward-hscroll=            | =C-f=, =<right>= | =l=                 |
+   | =image-backward-hscroll=           | =C-b=, =<left>=  | =h=                 |
+   | =image-next-line=                  | =C-n=, =<down>=  | =j=                 |
+   | =image-previous-line=              | =C-p=, =<up>=    | =k=                 |
+   | =image-bol=                        | =C-a=            | =0=, =^=            |
+   | =image-eol=                        | =C-e=            | =$=                 |
+   | =image-scroll-up=                  | =SPC=            | =SPC=, =C-d=        |
+   | =image-scroll-down=                | =S-SPC=, =DEL=   | =S-SPC=, =<delete>= |
+   | =image-scroll-down= (=C-u-scroll=) | n/a              | =C-u=               |
+   | =image-toggle-animation=           | =RET=            | =RET=               |
+   | =image-reset-speed=                | =a 0=            | =a0=                |
+   | =image-reverse-speed=              | =a r=            | =ar=                |
+   | =image-goto-frame=                 | =F=              | =F=                 |
+   | =image-previous-frame=             | =b=              | =,=                 |
+   | =image-next-frame=                 | =f=              | =.=, =;=            |
+   | =image-decrease-speed=             | n/a              | ={=                 |
+   | =image-increase-speed=             | n/a              | =}=                 |
+   | =image-transform-fit-to-height=    | =s h=            | =H=                 |
+   | =image-transform-fit-to-width=     | =s i=            | =W=                 |
+   | =image-increase-size=              | =i +=            | =+=, ===            |
+   | =image-decrease-size=              | =i -=            | =-=                 |
+   | =image-previous-file=              | =p=              | =[[=, =gk=, =C-k=   |
+   | =image-next-file=                  | =n=              | =]]=, =gj=, =C-j=   |
+   | =image-toggle-display=             | =C-c C-c=        | =C-c C-c=           |
+   | =quit-window=                      | =q=              | =q=, =ZZ=           |
+   | =evil-quit=                        | n/a              | =ZQ=                |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image/evil-collection-image.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image/evil-collection-image.el
new file mode 100644
index 0000000..15b4d9b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image/evil-collection-image.el
@@ -0,0 +1,87 @@
+;;; evil-collection-image.el --- Evil bindings for Image -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, bookmark, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `image-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'image-mode)
+
+(defconst evil-collection-image-maps '(image-mode-map))
+
+;;;###autoload
+(defun evil-collection-image-setup ()
+  "Set up `evil' bindings for `image-mode'."
+  (evil-set-initial-state 'image-mode 'normal)
+
+  (evil-collection-define-key 'normal 'image-mode-map
+    ;; motion
+    "gg" 'image-bob
+    "G" 'image-eob
+    [remap evil-forward-char] 'image-forward-hscroll
+    [remap evil-backward-char] 'image-backward-hscroll
+    [remap evil-next-line] 'image-next-line
+    [remap evil-previous-line] 'image-previous-line
+    "0" 'image-bol
+    "^" 'image-bol
+    "$" 'image-eol
+    (kbd "C-d") 'image-scroll-up
+    (kbd "<delete>") 'image-scroll-down
+    ;; animation
+    "a0" 'image-reset-speed
+    "ar" 'image-reverse-speed
+    "F" 'image-goto-frame
+    "," 'image-previous-frame ; mplayer/mpv style
+    "." 'image-next-frame ; mplayer/mpv style
+    ";" 'image-next-frame ; Evil style
+    "{" 'image-decrease-speed ; mplayer/mpv style
+    "}" 'image-increase-speed ; mplayer/mpv style
+
+    "H" 'image-transform-fit-to-height
+    "W" 'image-transform-fit-to-width
+
+    (kbd "C-c C-c") 'image-toggle-display)
+  (evil-collection-bind 'image-mode-map
+                        'zoom-in 'image-increase-size
+                        'zoom-out 'image-decrease-size
+                        'scroll-down 'image-scroll-up
+                        'scroll-up 'image-scroll-down
+                        'action 'image-toggle-animation
+                        'next-item 'image-next-file
+                        'prev-item 'image-previous-file
+                        'next-section 'image-next-file
+                        'prev-section 'image-previous-file
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit)
+
+  ;; TODO: What if the user changes `evil-want-C-u-scroll' after this is run?
+  (when evil-want-C-u-scroll
+    (evil-collection-define-key 'normal 'image-mode-map
+      (kbd "C-u") 'image-scroll-down)))
+
+(provide 'evil-collection-image)
+;;; evil-collection-image.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image/evil-collection-image.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image/evil-collection-image.elc
new file mode 100644
index 0000000..a0eebeb
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/image/evil-collection-image.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu-list/evil-collection-imenu-list.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu-list/evil-collection-imenu-list.el
new file mode 100644
index 0000000..d099b71
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu-list/evil-collection-imenu-list.el
@@ -0,0 +1,48 @@
+;;; evil-collection-imenu-list.el --- Bindings for `imenu-list' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 James Nguyen
+
+;; Author: Fredrik Bergroth <fbergroth@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `imenu-list'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'imenu-list nil t)
+
+(defconst evil-collection-imenu-list-maps '(imenu-list-major-mode-map))
+
+;;;###autoload
+(defun evil-collection-imenu-list-setup ()
+  "Set up `evil' bindings for `imenu-list'."
+  (evil-collection-define-key 'normal 'imenu-list-major-mode-map
+    "d" 'imenu-list-display-entry)
+  (evil-collection-bind 'imenu-list-major-mode-map
+                        'action 'imenu-list-goto-entry
+                        'quit 'imenu-list-quit-window
+                        'refresh 'imenu-list-refresh
+                        'section-toggle 'hs-toggle-hiding))
+
+
+(provide 'evil-collection-imenu-list)
+;;; evil-collection-imenu-list.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu-list/evil-collection-imenu-list.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu-list/evil-collection-imenu-list.elc
new file mode 100644
index 0000000..75b270c
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu-list/evil-collection-imenu-list.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu/README.org
new file mode 100644
index 0000000..b34a65d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu/README.org
@@ -0,0 +1,11 @@
+* imenu
+
+  Evil integration for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Imenu.html][imenu]]. No keymap is touched; the setup only marks
+  =imenu= as a non-repeatable jump command for evil's jump list and dot-repeat
+  machinery.
+
+** Notes
+
+   - =imenu= is declared with =evil-declare-not-repeat=.
+   - =imenu= is given the =:jump t= command property so it integrates with
+     =C-o= / =C-i= and =evil-set-jump=.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu/evil-collection-imenu.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu/evil-collection-imenu.el
new file mode 100644
index 0000000..9b36975
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu/evil-collection-imenu.el
@@ -0,0 +1,41 @@
+;;; evil-collection-imenu.el --- Evil integration for `imenu' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Jacob First
+
+;; Author: Jacob First <jacob.first@member.fsf.org>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil conveniences for `imenu'.
+
+;;; Code:
+(require 'imenu)
+(require 'evil-collection)
+
+(defconst evil-collection-imenu-maps nil)
+
+;;;###autoload
+(defun evil-collection-imenu-setup ()
+  "Set up Evil integration for `imenu'."
+  (evil-declare-not-repeat 'imenu)
+  (evil-add-command-properties 'imenu :jump t))
+
+(provide 'evil-collection-imenu)
+;;; evil-collection-imenu.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu/evil-collection-imenu.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu/evil-collection-imenu.elc
new file mode 100644
index 0000000..113fb64
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/imenu/evil-collection-imenu.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indent/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indent/README.org
new file mode 100644
index 0000000..480e6d9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indent/README.org
@@ -0,0 +1,15 @@
+* indent
+
+  Evil bindings for the transient =indent-rigidly-map= used after
+  =indent-rigidly= (=C-x TAB=).
+
+** Key bindings
+
+   | Command                            | Original    | Evil |
+   |------------------------------------+-------------+------|
+   | =indent-rigidly-left=              | =<left>=    | =h=  |
+   | =indent-rigidly-right=             | =<right>=   | =l=  |
+   | =indent-rigidly-left-to-tab-stop=  | =S-<left>=  | =H=  |
+   | =indent-rigidly-right-to-tab-stop= | =S-<right>= | =L=  |
+
+   The arrow-key bindings remain available alongside the hjkl additions.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indent/evil-collection-indent.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indent/evil-collection-indent.el
new file mode 100644
index 0000000..ea43a05
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indent/evil-collection-indent.el
@@ -0,0 +1,48 @@
+;;; evil-collection-indent.el --- Evil bindings for indentation -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for indentation.
+
+;;; Commentary:
+;;
+
+;;; Code:
+(require 'evil-collection)
+
+(defconst evil-collection-indent-maps '(indent-rigidly-map))
+
+;;;###autoload
+(defun evil-collection-indent-setup ()
+  "Set up `evil' bindings for autoloaded files."
+  (evil-collection-define-key nil 'indent-rigidly-map
+    "h" 'indent-rigidly-left
+    "l" 'indent-rigidly-right
+    "H" 'indent-rigidly-left-to-tab-stop
+    "L" 'indent-rigidly-right-to-tab-stop))
+
+
+(provide 'evil-collection-indent)
+;;; evil-collection-indent.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indent/evil-collection-indent.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indent/evil-collection-indent.elc
new file mode 100644
index 0000000..e29da84
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indent/evil-collection-indent.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indium/evil-collection-indium.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indium/evil-collection-indium.el
new file mode 100644
index 0000000..f75229c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indium/evil-collection-indium.el
@@ -0,0 +1,115 @@
+;;; evil-collection-indium.el --- Bindings for `indium' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, indium, javascript, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `indium'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'indium nil t)
+
+(defconst evil-collection-indium-maps '(indium-debugger-mode-map
+                                        indium-inspector-mode-map
+                                        indium-debugger-locals-mode-map
+                                        indium-debugger-frames-mode-map
+                                        indium-interaction-mode-map
+                                        indium-repl-mode-map))
+
+;;;###autoload
+(defun evil-collection-indium-setup ()
+  "Set up `evil' bindings for `indium'."
+  (when evil-collection-setup-debugger-keys
+    (evil-collection-define-key 'normal 'indium-debugger-mode-map
+      "S" 'indium-debugger-stack-frames
+      "H" 'indium-debugger-here)
+    (add-hook 'indium-debugger-mode-hook #'evil-normalize-keymaps))
+
+  (evil-collection-bind 'indium-debugger-mode-map
+                        'quit 'indium-debugger-resume
+                        'debug-continue 'indium-debugger-resume
+                        'debug-step-over 'indium-debugger-step-over
+                        'debug-step-into 'indium-debugger-step-into
+                        'debug-step-out 'indium-debugger-step-out
+                        'debug-eval 'indium-debugger-evaluate
+                        'debug-locals 'indium-debugger-locals
+                        'debug-frame-up 'indium-debugger-previous-frame
+                        'debug-frame-down 'indium-debugger-next-frame)
+
+  (evil-collection-define-key 'normal 'indium-inspector-mode-map
+    [mouse-1] 'indium-follow-link
+    "L" 'indium-inspector-pop)
+  (evil-collection-bind 'indium-inspector-mode-map
+                        'cycle-next 'indium-inspector-next-reference
+                        'cycle-previous 'indium-inspector-previous-reference
+                        'action 'indium-follow-link
+                        'next-item 'indium-inspector-next-reference
+                        'prev-item 'indium-inspector-previous-reference
+                        'next-section 'indium-inspector-next-reference
+                        'prev-section 'indium-inspector-previous-reference
+                        'quit 'quit-window
+                        'refresh 'indium-inspector-refresh)
+
+  (evil-collection-define-key 'normal 'indium-debugger-locals-mode-map
+    "L" nil
+    "gr" nil)
+  (evil-collection-bind 'indium-debugger-locals-mode-map 'quit 'quit-window)
+
+  (evil-collection-define-key 'normal 'indium-debugger-frames-mode-map
+    [return] 'indium-follow-link)
+  (evil-collection-bind 'indium-debugger-frames-mode-map
+                        'cycle-next 'indium-debugger-frames-next-frame
+                        'cycle-previous 'indium-debugger-frames-previous-frame
+                        'action 'indium-follow-link
+                        'next-item 'indium-debugger-frames-next-frame
+                        'prev-item 'indium-debugger-frames-previous-frame
+                        'next-section 'indium-debugger-frames-next-frame
+                        'prev-section 'indium-debugger-frames-previous-frame
+                        'quit 'quit-window)
+
+  (evil-collection-bind 'indium-interaction-mode-map
+                        'refresh 'indium-update-script-source
+                        'goto-repl 'indium-switch-to-repl-buffer)
+
+  (when evil-collection-setup-debugger-keys
+    (evil-collection-define-key 'normal 'indium-interaction-mode-map
+      [left-fringe mouse-1] 'indium-mouse-toggle-breakpoint
+      [left-margin mouse-1] 'indium-mouse-toggle-breakpoint
+      [S-f5] 'indium-debugger-resume))
+
+  (evil-collection-bind 'indium-interaction-mode-map
+                        'debug-continue 'indium-debugger-resume
+                        'debug-step-over 'indium-debugger-step-over
+                        'debug-step-into 'indium-debugger-step-into
+                        'debug-step-out 'indium-debugger-step-out
+                        'debug-breakpoint 'indium-toggle-breakpoint)
+
+  (evil-collection-bind 'indium-repl-mode-map
+                        'next-item 'indium-repl-next-input
+                        'prev-item 'indium-repl-previous-input
+                        'next-section 'indium-repl-next-input
+                        'prev-section 'indium-repl-previous-input))
+
+(provide 'evil-collection-indium)
+;;; evil-collection-indium.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indium/evil-collection-indium.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indium/evil-collection-indium.elc
new file mode 100644
index 0000000..904cde6
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/indium/evil-collection-indium.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/info/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/info/README.org
new file mode 100644
index 0000000..f8d168b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/info/README.org
@@ -0,0 +1,40 @@
+* info
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/info/index.html][Info]].
+
+  Uses normal state instead of motion state and rebinds movement to standard
+  evil keys.
+
+** Key bindings
+
+   | Command                                      | Original       | Evil                 |
+   |----------------------------------------------+----------------+----------------------|
+   | =Info-next-reference=                        | =TAB=          | =TAB=, =g TAB=, =g]= |
+   | =Info-prev-reference=                        | =S-TAB=        | =S-TAB=, =g[=        |
+   | =Info-help=                                  | =h=            | =M-h=                |
+   | =Info-history-back=                          | =l=            | =C-t=, =C-o=         |
+   | =Info-history-forward=                       | =r=            | =C-i=                |
+   | =Info-scroll-up=                             | =SPC=          | =SPC=                |
+   | =Info-scroll-down=                           | =DEL=, =S-SPC= | =DEL=                |
+   | =Info-follow-nearest-node=                   | =RET=          | =RET=, =C-]=         |
+   | =Info-directory=                             | =d=            | =d=                  |
+   | =Info-up=                                    | =^=, =u=       | =u=                  |
+   | =Info-history=                               | =L=            | =gL=                 |
+   | =Info-search=                                | =s=            | =s=                  |
+   | =Info-search-case-sensitively=               | =S=            | =S=                  |
+   | =Info-index=                                 | =i=            | =i=                  |
+   | =Info-virtual-index=                         | =I=            | =I=                  |
+   | =info-apropos=                               | n/a            | =a=                  |
+   | =Info-nth-menu-item=                         | =1..9=         | =g1..g9=             |
+   | =Info-menu=                                  | =m=            | =J=, =gm=            |
+   | =Info-goto-node=                             | =g=            | =gG=                 |
+   | =Info-top-node=                              | =t=, =<=       | =gt=                 |
+   | =Info-toc=                                   | =T=            | =gT=                 |
+   | =Info-follow-reference=                      | =f=            | =gf=                 |
+   | =Info-forward-node=                          | =]=            | =C-j=                |
+   | =Info-backward-node=                         | =[=            | =C-k=                |
+   | =Info-next=                                  | =n=            | =gj=                 |
+   | =Info-prev=                                  | =p=            | =gk=                 |
+   | =Info-index-next=                            | =,=            | =g,=                 |
+   | =Info-summary=                               | =?=            | =g?=                 |
+   | =Info-copy-current-node-name= (=y= operator) | =c=, =w=       | =yu=                 |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/info/evil-collection-info.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/info/evil-collection-info.el
new file mode 100644
index 0000000..2c6e572
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/info/evil-collection-info.el
@@ -0,0 +1,110 @@
+;;; evil-collection-info.el --- Evil bindings for Info-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, info, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; The default bindings in motion state override the standard movement keys.
+;; This package uses normal state and redefines everything.
+
+;;; Code:
+(require 'evil-collection)
+(require 'info)
+
+(defconst evil-collection-info-maps '(Info-mode-map))
+
+;;;###autoload
+(defun evil-collection-info-setup ()
+  "Set up `evil' bindings for `info-mode'."
+  (evil-collection-set-readonly-bindings 'Info-mode-map)
+  (evil-set-initial-state 'Info-mode 'normal)
+  (evil-collection-define-key 'normal 'Info-mode-map
+    ;; This exists because <tab> is recognized as C-i on terminals.
+    (kbd "g TAB") 'Info-next-reference
+    "g]" 'Info-next-reference
+    "g[" 'Info-prev-reference
+
+    ;; From evil-integration.el.
+    (kbd "M-h") 'Info-help              ; "h"
+    (kbd "C-t") 'Info-history-back      ; "l"
+    (kbd "C-o") 'Info-history-back
+    " " 'Info-scroll-up
+    (kbd "C-]") 'Info-follow-nearest-node
+    (kbd "DEL") 'Info-scroll-down
+    (kbd "C-i") 'Info-history-forward
+
+    "d" 'Info-directory
+    "u" 'Info-up
+    "gL" 'Info-history ; "L"
+    "S" 'Info-search-case-sensitively
+    "i" 'Info-index
+    "I" 'Info-virtual-index
+    "a" 'info-apropos
+
+    ;; mouse integration
+    [mouse-2]     'Info-mouse-follow-nearest-node
+    [follow-link] 'mouse-face
+    ;; make mac user happy
+    [double-wheel-left]  'Info-history-back
+    [double-wheel-right] 'Info-history-forward
+
+    ;; digit arguments
+    "g1" 'Info-nth-menu-item
+    "g2" 'Info-nth-menu-item
+    "g3" 'Info-nth-menu-item
+    "g4" 'Info-nth-menu-item
+    "g5" 'Info-nth-menu-item
+    "g6" 'Info-nth-menu-item
+    "g7" 'Info-nth-menu-item
+    "g8" 'Info-nth-menu-item
+    "g9" 'Info-nth-menu-item
+
+    ;; goto
+    "J" 'Info-menu
+
+    "gG" 'Info-goto-node
+    "gm" 'Info-menu
+    "gt" 'Info-top-node
+    "gT" 'Info-toc
+    "g," 'Info-index-next)
+
+  ;; yu, Like eww.
+  (evil-collection-define-operator-key 'yank 'Info-mode-map
+    "u" 'Info-copy-current-node-name)
+
+  (evil-collection-bind 'Info-mode-map
+                        'action 'Info-follow-nearest-node
+                        'next-item 'Info-next
+                        'prev-item 'Info-prev
+                        'next-section 'Info-forward-node
+                        'prev-section 'Info-backward-node
+                        'next-section-2 'Info-forward-node
+                        'prev-section-2 'Info-backward-node
+                        'find-file 'Info-follow-reference
+                        'describe-mode 'Info-summary
+                        'search-or-filter 'Info-search
+                        'cycle-next 'Info-next-reference
+                        'cycle-previous 'Info-prev-reference))
+
+(provide 'evil-collection-info)
+;;; evil-collection-info.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/info/evil-collection-info.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/info/evil-collection-info.elc
new file mode 100644
index 0000000..55ec58d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/info/evil-collection-info.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ivy/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ivy/README.org
new file mode 100644
index 0000000..e6b0bea
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ivy/README.org
@@ -0,0 +1,51 @@
+* ivy
+
+  Evil bindings for [[https://github.com/abo-abo/swiper][ivy]].
+
+** Key bindings
+
+*** ivy-minibuffer-map
+
+    Minibuffer bindings only take effect when =evil-collection-setup-minibuffer=
+    is non-nil (the global =<escape>= → =minibuffer-keyboard-quit= always applies).
+
+    | Command                    | Original | Evil                         |
+    |----------------------------+----------+------------------------------|
+    | =minibuffer-keyboard-quit= | =C-g=    | =<escape>= (any)             |
+    | =abort-recursive-edit=     | n/a      | =<escape>= (normal)          |
+    | =exit-minibuffer=          | =RET=    | =RET= (normal)               |
+    | =ivy-done=                 | =RET=    | =C-m= (normal)               |
+    | =ivy-next-line=            | =C-n=    | =j= (normal), =C-n= (insert) |
+    | =ivy-previous-line=        | =C-p=    | =k= (normal), =C-p= (insert) |
+    | =ivy-backward-delete-char= | =DEL=    | =DEL= (insert)               |
+    | =ivy-reverse-i-search=     | =C-r=    | =C-r= (insert)               |
+
+*** ivy-occur-mode-map (normal state)
+
+    | Command                      | Original   | Evil      |
+    |------------------------------+------------+-----------|
+    | =ivy-occur-next-line=        | =n=        | =j=       |
+    | =ivy-occur-previous-line=    | =p=        | =k=       |
+    | =evil-backward-char=         | n/a        | =h=       |
+    | =evil-forward-char=          | n/a        | =l=       |
+    | =evil-goto-first-line=       | n/a        | =gg=      |
+    | =ivy-occur-press=            | =RET=, =f= | =gf=      |
+    | =ivy-occur-press-and-switch= | =o=        | =RET=     |
+    | =ivy-occur-read-action=      | =M-o=      | =ga=      |
+    | =ivy-occur-dispatch=         | =C-c C-o=  | =go=      |
+    | =ivy-occur-toggle-calling=   | =C-c C-p=  | =gc=      |
+    | =ivy-occur-revert-buffer=    | =g=        | =gr=      |
+    | =ivy-occur-click=            | =mouse-1=  | =mouse-1= |
+    | =quit-window=                | =q=        | =q=       |
+
+*** ivy-occur-grep-mode-map (normal state)
+
+    Inherits the above plus:
+
+    | Command                                    | Original  | Evil                                |
+    |--------------------------------------------+-----------+-------------------------------------|
+    | =ivy-occur-delete-candidate=               | =C-d=     | =d=, =gd=                           |
+    | =ivy-occur-delete-candidate=               | =C-d=     | =D= (when =evil-want-C-d-scroll=)   |
+    | =evil-scroll-down=                         | n/a       | =C-d= (when =evil-want-C-d-scroll=) |
+    | =ivy-wgrep-change-to-wgrep-mode=           | =C-x C-q= | =i=, =C-x C-q=                      |
+    | =evil-digit-argument-or-beginning-of-line= | n/a       | =0=                                 |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ivy/evil-collection-ivy.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ivy/evil-collection-ivy.el
new file mode 100644
index 0000000..03696fa
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ivy/evil-collection-ivy.el
@@ -0,0 +1,108 @@
+;;; evil-collection-ivy.el --- Evil bindings for ivy -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, ivy, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `ivy-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'ivy nil t)
+
+(defconst evil-collection-ivy-maps '(ivy-occur-mode-map
+                                     ivy-occur-grep-mode-map
+                                     ivy-minibuffer-map))
+
+;;;###autoload
+(defun evil-collection-ivy-setup ()
+  "Set up `evil' bindings for `ivy-mode'."
+  (evil-collection-define-key nil 'ivy-minibuffer-map
+    (kbd "<escape>") 'minibuffer-keyboard-quit)
+  (evil-collection-define-key 'normal 'ivy-occur-mode-map
+    [mouse-1] 'ivy-occur-click
+    "j" 'ivy-occur-next-line
+    "k" 'ivy-occur-previous-line
+    "h" 'evil-backward-char
+    "l" 'evil-forward-char
+    "g" nil
+    "gg" 'evil-goto-first-line
+    "ga" 'ivy-occur-read-action
+    "go" 'ivy-occur-dispatch
+    "gc" 'ivy-occur-toggle-calling)
+  (evil-collection-bind 'ivy-occur-mode-map
+                        'quit 'quit-window
+                        'find-file 'ivy-occur-press
+                        'refresh 'ivy-occur-revert-buffer
+                        'action 'ivy-occur-press-and-switch)
+
+  (when evil-want-C-d-scroll
+    (evil-collection-define-key 'normal 'ivy-occur-grep-mode-map
+      "D" 'ivy-occur-delete-candidate
+      (kbd "C-d") 'evil-scroll-down))
+
+  (evil-collection-define-key 'visual 'ivy-occur-grep-mode-map
+    "j" 'evil-next-line
+    "k" 'evil-previous-line)
+
+  (evil-collection-define-key 'normal 'ivy-occur-grep-mode-map
+    "d" 'ivy-occur-delete-candidate
+    (kbd "C-x C-q") 'ivy-wgrep-change-to-wgrep-mode
+    "i" 'ivy-wgrep-change-to-wgrep-mode
+    "gd" 'ivy-occur-delete-candidate
+    [mouse-1] 'ivy-occur-click
+    "j" 'ivy-occur-next-line
+    "k" 'ivy-occur-previous-line
+    "h" 'evil-backward-char
+    "l" 'evil-forward-char
+    "g" nil
+    "gg" 'evil-goto-first-line
+    "ga" 'ivy-occur-read-action
+    "go" 'ivy-occur-dispatch
+    "gc" 'ivy-occur-toggle-calling
+
+    "0" 'evil-digit-argument-or-evil-beginning-of-line)
+  (evil-collection-bind 'ivy-occur-grep-mode-map
+                        'quit 'quit-window
+                        'find-file 'ivy-occur-press
+                        'refresh 'ivy-occur-revert-buffer
+                        'action 'ivy-occur-press-and-switch)
+
+  (defvar evil-collection-setup-minibuffer)
+  (when evil-collection-setup-minibuffer
+    (evil-collection-define-key 'normal 'ivy-minibuffer-map
+      (kbd "<escape>") 'abort-recursive-edit
+      (kbd "C-m") 'ivy-done
+      "j" 'ivy-next-line
+      "k" 'ivy-previous-line)
+
+    (evil-collection-define-key 'insert 'ivy-minibuffer-map
+      (kbd "DEL") 'ivy-backward-delete-char
+      (kbd "C-r") 'ivy-reverse-i-search)
+    (evil-collection-bind 'ivy-minibuffer-map
+                          'action 'exit-minibuffer
+                          'completion-previous 'ivy-previous-line
+                          'completion-next     'ivy-next-line)))
+
+(provide 'evil-collection-ivy)
+;;; evil-collection-ivy.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ivy/evil-collection-ivy.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ivy/evil-collection-ivy.elc
new file mode 100644
index 0000000..11b3733
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ivy/evil-collection-ivy.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/js2-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/js2-mode/README.org
new file mode 100644
index 0000000..3639801
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/js2-mode/README.org
@@ -0,0 +1,12 @@
+* js2-mode
+
+  Evil compatibility for [[https://github.com/mooz/js2-mode][js2-mode]]. No key bindings.
+
+  Adds a hook to =js2-mode-hook= and =js2-jsx-mode-hook= that sets the
+  buffer-local =evil-shift-width= to match =js-indent-level=, so =>>= and
+  =<<= indent by the same amount js2-mode does.
+
+** New commands
+
+   - =evil-collection-js2-set-evil-shift-width= - Sync =evil-shift-width=
+     with =js-indent-level= in the current buffer.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/js2-mode/evil-collection-js2-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/js2-mode/evil-collection-js2-mode.el
new file mode 100644
index 0000000..1021134
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/js2-mode/evil-collection-js2-mode.el
@@ -0,0 +1,48 @@
+;;; evil-collection-js2-mode.el --- Bindings for `js2-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `js2-mode'
+
+;;; Code:
+(require 'evil-collection)
+(require 'js2-mode nil t)
+
+(defconst evil-collection-js2-mode-maps nil)
+
+(defvar js-indent-level)
+
+(defun evil-collection-js2-set-evil-shift-width ()
+  "Set `evil-shift-width' according to `js-indent-level'."
+  (setq-local evil-shift-width js-indent-level))
+
+;;;###autoload
+(defun evil-collection-js2-mode-setup ()
+  "Set up `evil' bindings for `js2-mode'."
+  (add-hook 'js2-mode-hook #'evil-collection-js2-set-evil-shift-width)
+  (add-hook 'js2-jsx-mode-hook #'evil-collection-js2-set-evil-shift-width))
+
+(provide 'evil-collection-js2-mode)
+;;; evil-collection-js2-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/js2-mode/evil-collection-js2-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/js2-mode/evil-collection-js2-mode.elc
new file mode 100644
index 0000000..64a6acc
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/js2-mode/evil-collection-js2-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kmacro/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kmacro/README.org
new file mode 100644
index 0000000..5c05d82
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kmacro/README.org
@@ -0,0 +1,22 @@
+* kmacro
+
+  Evil bindings for the [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Keyboard-Macros.html][kmacro]] menu.
+
+** Key bindings
+
+   Bindings applied to =kmacro-menu-mode-map=. Initial state is normal.
+
+   | Command                         | Original | Evil  |
+   |---------------------------------+----------+-------|
+   | =kmacro-menu-edit-column=       | =RET=    | =RET= |
+   | =kmacro-menu-edit-position=     | =#=      | =#=   |
+   | =kmacro-menu-edit-counter=      | =c=      | =c=   |
+   | =kmacro-menu-edit-format=       | =f=      | =f=   |
+   | =kmacro-menu-edit-keys=         | =e=      | =e=   |
+   | =kmacro-menu-flag-for-deletion= | =d=      | =d=   |
+   | =kmacro-menu-mark=              | =m=      | =m=   |
+   | =kmacro-menu-unmark=            | =u=      | =u=   |
+   | =kmacro-menu-unmark-all=        | =U=      | =U=   |
+   | =kmacro-menu-do-flagged-delete= | =x=      | =x=   |
+   | =kmacro-menu-do-copy=           | =C=      | =C=   |
+   | =kmacro-menu-do-delete=         | =D=      | =D=   |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kmacro/evil-collection-kmacro.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kmacro/evil-collection-kmacro.el
new file mode 100644
index 0000000..71b9c91
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kmacro/evil-collection-kmacro.el
@@ -0,0 +1,57 @@
+;;; evil-collection-kmacro.el --- Evil bindings for kmacro menu -*- lexical-binding: t -*-
+
+;; Copyright (C) 2024 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "30"))
+;; Keywords: evil, kmacro, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for kmacro menu.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'kmacro)
+
+(defconst evil-collection-kmacro-maps '(kmacro-menu-mode-map))
+
+(defun evil-collection-kmacro-setup ()
+  "Set up `evil' bindings to `tab-bar'."
+  (evil-set-initial-state 'kmacro-menu-mode 'normal)
+  (evil-collection-bind 'kmacro-menu-mode-map 'edit 'kmacro-menu-edit-keys)
+  (evil-collection-define-key 'normal 'kmacro-menu-mode-map
+    ;; Edit
+    "#" 'kmacro-menu-edit-position
+    "c" 'kmacro-menu-edit-counter
+    "f" 'kmacro-menu-edit-format
+
+    "C" 'kmacro-menu-do-copy
+    "D" 'kmacro-menu-do-delete)
+  (evil-collection-bind 'kmacro-menu-mode-map
+                        'mark 'kmacro-menu-mark
+                        'unmark 'kmacro-menu-unmark
+                        'unmark-all 'kmacro-menu-unmark-all
+                        'mark-delete 'kmacro-menu-flag-for-deletion
+                        'execute-marks 'kmacro-menu-do-flagged-delete
+                        'action 'kmacro-menu-edit-column))
+
+(provide 'evil-collection-kmacro)
+;;; evil-collection-kmacro.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kmacro/evil-collection-kmacro.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kmacro/evil-collection-kmacro.elc
new file mode 100644
index 0000000..61fbf7b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kmacro/evil-collection-kmacro.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kotlin-mode/evil-collection-kotlin-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kotlin-mode/evil-collection-kotlin-mode.el
new file mode 100644
index 0000000..0cd5072
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kotlin-mode/evil-collection-kotlin-mode.el
@@ -0,0 +1,42 @@
+;;; evil-collection-kotlin-mode.el --- Bindings for `kotlin-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `kotlin-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'kotlin-mode nil t)
+
+(defconst evil-collection-kotlin-mode-maps '(kotlin-mode-map))
+
+
+;;;###autoload
+(defun evil-collection-kotlin-mode-setup ()
+  "Set up `evil' bindings for `kotlin-mode'."
+  (evil-collection-bind 'kotlin-mode-map 'goto-repl 'kotlin-repl))
+
+(provide 'evil-collection-kotlin-mode)
+;;; evil-collection-kotlin-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kotlin-mode/evil-collection-kotlin-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kotlin-mode/evil-collection-kotlin-mode.elc
new file mode 100644
index 0000000..a9b8abb
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/kotlin-mode/evil-collection-kotlin-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/leetcode/evil-collection-leetcode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/leetcode/evil-collection-leetcode.el
new file mode 100644
index 0000000..cb8e01f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/leetcode/evil-collection-leetcode.el
@@ -0,0 +1,46 @@
+;;; evil-collection-leetcode.el --- Bindings for `leetcode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `leetcode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'leetcode nil t)
+
+(defconst evil-collection-leetcode-maps
+  '(leetcode--problems-mode-map
+    leetcode--problem-description-mode-map))
+
+;;;###autoload
+(defun evil-collection-leetcode-setup ()
+  "Set up `evil' bindings for `leetcode'."
+  (evil-collection-bind 'leetcode--problems-mode-map
+                        'action 'leetcode-show-current-problem
+                        'quit 'quit-window
+                        'refresh 'leetcode-problems-refresh))
+
+(provide 'evil-collection-leetcode)
+;;; evil-collection-leetcode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/leetcode/evil-collection-leetcode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/leetcode/evil-collection-leetcode.elc
new file mode 100644
index 0000000..a0bac7a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/leetcode/evil-collection-leetcode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lispy/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lispy/README.org
new file mode 100644
index 0000000..1123fc2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lispy/README.org
@@ -0,0 +1,140 @@
+* lispy
+
+  Evil bindings for [[https://github.com/abo-abo/lispy][lispy]], the short-key mode for editing s-expressions.
+
+  Installs two additional themes into =lispy-set-key-theme=: ='special-evil'
+  and ='evil'. The setup function applies both, advising
+  =lispy-set-key-theme= so the original themes (=special=, =paredit=, etc.)
+  are bypassed in favour of the evil-flavored variants.
+
+** Key bindings
+
+*** Special state (point on a paren)
+
+    Lispy's "special" state is rebound to mirror vim motions. Keys come from
+    =evil-collection-lispy-mode-map-special=.
+
+    | Command                                             | Original (lispy) | Evil     |
+    |-----------------------------------------------------+------------------+----------|
+    | =lispy-right=                                       | =l=              | =l=      |
+    | =lispy-left=                                        | =h=              | =h=      |
+    | =lispy-down=                                        | =j=              | =j=      |
+    | =lispy-up=                                          | =k=              | =k=      |
+    | =lispy-different=                                   | =o=              | =o=      |
+    | =lispy-ace-paren=                                   | =f=              | =f=      |
+    | =lispy-flow=                                        | =n=              | =n=      |
+    | =lispy-ace-char=                                    | =t=              | =t=      |
+    | =lispy-teleport=                                    | =T=              | =T=      |
+    | =lispy-new-copy=                                    | =y=              | =y=      |
+    | =lispy-paste=                                       | =P=              | =p=      |
+    | =lispy-eval-other-window=                           | =P=              | =P=      |
+    | =lispy-mark-list=                                   | =v=              | =v=      |
+    | =lispy-view=                                        | =V=              | =z=      |
+    | =lispy-x=                                           | =x=              | =q=      |
+    | =lispy-other-mode=                                  | =Q=              | =Q=      |
+    | =lispy-occur=                                       | =/=              | =/=      |
+    | =lispy-splice=                                      | =/=              | =x=      |
+    | =lispy-comment=                                     | =;=              | =;=      |
+    | =evil-collection-lispy-delete=                      | n/a              | =d=      |
+    | =lispy-join=                                        | =+=              | =+=, =J= |
+    | =lispy-describe=                                    | =h=              | =K=      |
+    | =lispy-outline-goto-child=                          | =L=              | =L=      |
+    | =lispy-slurp-or-barf-right=                         | =>=              | =>=      |
+    | =lispy-slurp-or-barf-left=                          | =<=              | =<=      |
+    | =lispy-raise=                                       | =r=              | =r=      |
+    | =lispy-raise-some=                                  | =R=              | =R=      |
+    | =lispy-convolute=                                   | =C=              | =C=      |
+    | =lispy-convolute-left=                              | =X=              | =X=      |
+    | =lispy-move-up=                                     | =w=              | =w=      |
+    | =lispy-move-down=                                   | =s=              | =s=      |
+    | =lispy-oneline=                                     | =O=              | =O=      |
+    | =lispy-alt-multiline=                               | =M=              | =M=      |
+    | =lispy-stringify=                                   | =S=              | =S=      |
+    | =lispy-ace-symbol=                                  | =a=              | =a=      |
+    | =lispy-ace-symbol-replace=                          | =H=              | =H=      |
+    | =lispy-eval=                                        | =e=              | =e=      |
+    | =lispy-eval-and-insert=                             | =E=              | =E=      |
+    | =end-of-defun=                                      | n/a              | =G=      |
+    | =g-knight/body=                                     | n/a              | =g=      |
+    | =evil-collection-lispy-insert-at-end-of-list=       | n/a              | =A=      |
+    | =evil-collection-lispy-insert-at-beginning-of-list= | n/a              | =I=      |
+    | =lispy-follow=                                      | =F=              | =F=      |
+    | =pop-tag-mark=                                      | =D=              | =D=      |
+    | =lispy-underscore=                                  | =_=              | =_=      |
+    | =lispy-space=                                       | =SPC=            | =SPC=    |
+    | =lispy-tab-hydra/body=                              | n/a              | =TAB=    |
+    | =lispy-narrow=                                      | =N=              | =N=      |
+    | =lispy-widen=                                       | =W=              | =W=      |
+    | =lispy-clone=                                       | =c=              | =c=      |
+    | =lispy-undo=                                        | =u=              | =u=      |
+    | =lispy-back=                                        | =b=              | =b=      |
+    | =lispy-ediff-regions=                               | =B=              | =B=      |
+    | =lispy-edebug-stop=                                 | =Z=              | =Z=      |
+    | =lispy-visit=                                       | =V=              | =V=      |
+    | =lispy-ace-subword=                                 | =-=              | =-=      |
+    | =lispy-repeat=                                      | =.=              | =.=      |
+    | =lispy-tilde=                                       | =~=              | =~=      |
+    | =lispy-forward=                                     | =]=              | =]=      |
+    | =lispy-backward=                                    | =[=              | =[=      |
+    | =lispy-brackets=                                    | ={=              | ={=      |
+    | =lispy-outline-next=                                | =J=              | =C-J=    |
+    | =lispy-outline-prev=                                | =K=              | =C-K=    |
+    | =lispy-splice-sexp-killing-backward=                | =^=              | =^=      |
+    | =lispy-splice-sexp-killing-forward=                 | =$=              | =$=      |
+    | =lispy-move-down=                                   | =M-j=            | =M-j=    |
+    | =lispy-move-up=                                     | =M-k=            | =M-k=    |
+
+*** Evil normal state
+
+    These bindings live in =evil-collection-lispy-mode-map= and are active in
+    evil normal state.
+
+    | Command                              | Original   | Evil         |
+    |--------------------------------------+------------+--------------|
+    | =lispy-left=                         | =C-M-u=    | =M-n=        |
+    | =lispy-kill-word=                    | =M-d=      | =M-d=        |
+    | =lispy-backward-kill-word=           | =M-DEL=    | =M-DEL=      |
+    | =lispy-parens=                       | =(=        | =(=          |
+    | =lispy-comment=                      | =;=        | =;=          |
+    | =lispy-goto-symbol=                  | =M-.=      | =gd=         |
+    | =pop-tag-mark=                       | =M-,=      | =C-t=        |
+    | =lispy-wrap-round=                   | =M-(=      | =M-(=, =M-)= |
+    | =lispy-wrap-braces=                  | =M-{=      | =M-{=, =M-}= |
+    | =lispy-splice=                       | =M-s=      | =M-s=        |
+    | =lispy-splice-sexp-killing-backward= | =M-<up>=   | =M-<up>=     |
+    | =lispy-splice-sexp-killing-forward=  | =M-<down>= | =M-<down>=   |
+    | =lispy-raise-sexp=                   | =M-r=      | =M-r=        |
+    | =lispy-raise-some=                   | =M-R=      | =M-R=        |
+    | =lispy-convolute-sexp=               | =M-C=      | =M-C=        |
+    | =lispy-split=                        | =M-S=      | =M-S=        |
+    | =lispy-join=                         | =M-J=      | =M-J=        |
+    | =lispy-forward=                      | =C-M-n=    | =]=          |
+    | =lispy-backward=                     | =C-M-p=    | =[=          |
+    | =lispy-slurp-or-barf-left=           | n/a        | =<=          |
+    | =lispy-slurp-or-barf-right=          | n/a        | =>=          |
+    | =lispy-new-copy=                     | =M-y=      | =M-y=        |
+    | =lispy-open-line=                    | =C-RET=    | =C-RET=      |
+    | =lispy-meta-return=                  | =M-RET=    | =M-RET=      |
+    | =lispy-move-up=                      | =M-k=      | =M-k=        |
+    | =lispy-move-down=                    | =M-j=      | =M-j=        |
+    | =lispy-string-oneline=               | =M-o=      | =M-o=        |
+    | =lispy-clone=                        | =M-p=      | =M-p=        |
+    | =evil-collection-lispy-delete=       | n/a        | =M-d=        |
+
+** New commands
+
+   | Command                                             | Notes                                            |
+   |-----------------------------------------------------+--------------------------------------------------|
+   | =evil-collection-lispy-insert-at-beginning-of-list= | Enter insert/emacs state at start of list (=I=). |
+   | =evil-collection-lispy-insert-at-end-of-list=       | Enter insert/emacs state at end of list (=A=).   |
+   | =evil-collection-lispy-delete=                      | Copy and delete the current sexp.                |
+   | =evil-collection-lispy-action-then-next-sexp=       | Helper to wrap a lispy action with =lispy-down=. |
+   | =evil-collection-lispy--out-forward=                | Helper around =lispy--out-forward=.              |
+   | =evil-collection-lispy-set-key-theme=               | Replacement for =lispy-set-key-theme= adding the |
+   |                                                     | ='special-evil' and ='evil' themes.              |
+
+** Customization
+
+   - =evil-collection-lispy-preferred-lispy-state= - The evil state
+     (=insert= or =emacs=) entered by =A= and =I= for using lispy. Defaults
+     to =insert=.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lispy/evil-collection-lispy.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lispy/evil-collection-lispy.el
new file mode 100644
index 0000000..ca50c6d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lispy/evil-collection-lispy.el
@@ -0,0 +1,660 @@
+;;; evil-collection-lispy.el --- Evil Bindings for Lispy -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, lispy, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `lispy-mode'.
+
+;;; Code:
+(require 'lispy nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-lispy-maps '(lispy-mode-map
+                                       evil-collection-lispy-mode-map))
+
+(defvar lispy-mode-map-base)
+(defvar lispy-mode-map-special)
+(defvar lispy-mode-map-lispy)
+(defvar lispy-mode-map-paredit)
+(defvar lispy-mode-map-parinfer)
+(defvar lispy-mode-map-evilcp)
+(defvar lispy-mode-map-c-digits)
+(defvar lispy-mode-map-oleh)
+(defvar lispy-mode-map)
+(defvar lispy-outline)
+(defvar lispy-outline-header)
+(defvar hydra-curr-body-fn)
+
+(declare-function lispy--out-backward "lispy")
+(declare-function lispy--out-forward "lispy")
+(declare-function hydra-default-pre "lispy")
+(declare-function hydra-keyboard-quit "lispy")
+(declare-function hydra--call-interactively-remap-maybe "lispy")
+(declare-function lispy-knight-down "lispy")
+(declare-function lispy-knight-up "lispy")
+(declare-function lispy-beginning-of-defun "lispy")
+(declare-function lispy-goto "lispy")
+(declare-function lispy-goto-local "lispy")
+(declare-function hydra-idle-message "lispy")
+(declare-function hydra-set-transient-map "lispy")
+(declare-function lispy-tab "lispy")
+(declare-function lispy-shifttab "lispy")
+(declare-function lispy-left-p "lispy")
+(declare-function lispy-right-p "lispy")
+(declare-function lispy-bolp "lispy")
+(declare-function lispy-down "lispy")
+(declare-function lispy-new-copy "lispy")
+(declare-function lispy-delete "lispy")
+(declare-function lispy-delete-backward "lispy")
+(declare-function lispy-define-key "lispy")
+(declare-function lispy-set-key-theme "lispy")
+
+;; ------------------------------- LISPYVILLE ----------------------------------
+;; Copied from `lispyville'.
+;; -> `lispyville-preferred-lispy-state'
+(defcustom evil-collection-lispy-preferred-lispy-state 'insert
+  "The preferred evil state for insertion and using lispy.
+This is used by any command that should enter special to determine the correct
+state."
+  :type '(choice
+          (const :tag "Use insert state to get into special." insert)
+          (const :tag "Use emacs state to get into special." emacs))
+  :group 'evil-collection)
+
+;; -> `lispyville-insert-at-beginning-of-list'
+(evil-define-command evil-collection-lispy-insert-at-beginning-of-list (count)
+  "Enter `evil-collection-lispy-preferred-lispy-state' at the start of the list.
+
+With COUNT, move backward/out COUNT lists first. This is the
+lispyville equivalent of `evil-cp-insert-at-beginning-of-form' except for lists
+only."
+  (interactive "<c>")
+  (when (lispy--out-backward (or count 1))
+    (forward-char)
+    (evil-change-state evil-collection-lispy-preferred-lispy-state)))
+
+;; -> `lispyville-insert-at-end-of-list'
+(evil-define-command evil-collection-lispy-insert-at-end-of-list (count)
+  "Enter `lispyville-preferred-state' at the end of the list.
+With COUNT, move forward/out COUNT lists first. This is the lispyville
+equivalent of `evil-cp-insert-at-end-of-form' except for lists only."
+  (interactive "<c>")
+  (when (evil-collection-lispy--out-forward (or count 1))
+    (backward-char)
+    (evil-change-state evil-collection-lispy-preferred-lispy-state)))
+
+;; -> `lispyville--out-forward'
+(defun evil-collection-lispy--out-forward (count)
+  "Like `lispyville--out-forward' but don't return nil if move at least once.
+COUNT is passed to `lispy--out-forward'."
+  (let ((orig-pos (point)))
+    (lispy--out-forward count)
+    (not (= (point) orig-pos))))
+
+;; ------------------------------- LISPYVILLE ----------------------------------
+
+;; ------------------------------- HYDRA ---------------------------------------
+(when (featurep 'hydra)
+  ;; (defhydra g-knight (:color blue :hint nil :idle .3 :columns 3)
+  ;;   "g knight"
+  ;;   ("j" lispy-knight-down "Down")
+  ;;   ("k" lispy-knight-up "Up")
+  ;;   ("g" lispy-beginning-of-defun "Beginning")
+  ;;   ("d" lispy-goto "Goto")
+  ;;   ("l" lispy-goto-local "Goto Local"))
+
+  ;; Macroexpanded from g-knight hydra.
+  (progn
+    (set
+     (defvar g-knight/params nil "Params of g-knight.")
+     '(nil nil :columns 3 :exit t :foreign-keys nil :hint nil :idle 0.3))
+    (set
+     (defvar g-knight/docstring nil "Docstring of g-knight.")
+     "g knight")
+    (set
+     (defvar g-knight/heads nil "Heads for g-knight.")
+     '(("j" lispy-knight-down "Down" :exit t)
+       ("k" lispy-knight-up "Up" :exit t)
+       ("g" lispy-beginning-of-defun "Beginning" :exit t)
+       ("d" lispy-goto "Goto" :exit t)
+       ("l" lispy-goto-local "Goto Local" :exit t)))
+    (set
+     (defvar g-knight/keymap nil "Keymap for g-knight.")
+     '(keymap
+       (108 . g-knight/lispy-goto-local-and-exit)
+       (100 . g-knight/lispy-goto-and-exit)
+       (103 . g-knight/lispy-beginning-of-defun-and-exit)
+       (107 . g-knight/lispy-knight-up-and-exit)
+       (106 . g-knight/lispy-knight-down-and-exit)
+       (kp-subtract . hydra--negative-argument)
+       (kp-9 . hydra--digit-argument)
+       (kp-8 . hydra--digit-argument)
+       (kp-7 . hydra--digit-argument)
+       (kp-6 . hydra--digit-argument)
+       (kp-5 . hydra--digit-argument)
+       (kp-4 . hydra--digit-argument)
+       (kp-3 . hydra--digit-argument)
+       (kp-2 . hydra--digit-argument)
+       (kp-1 . hydra--digit-argument)
+       (kp-0 . hydra--digit-argument)
+       (57 . hydra--digit-argument)
+       (56 . hydra--digit-argument)
+       (55 . hydra--digit-argument)
+       (54 . hydra--digit-argument)
+       (53 . hydra--digit-argument)
+       (52 . hydra--digit-argument)
+       (51 . hydra--digit-argument)
+       (50 . hydra--digit-argument)
+       (49 . hydra--digit-argument)
+       (48 . hydra--digit-argument)
+       (45 . hydra--negative-argument)
+       (21 . hydra--universal-argument)))
+    (set
+     (defvar g-knight/hint nil "Dynamic hint for g-knight.")
+     '(format
+       #("g knight:
+j: Down       k: Up         g: Beginning
+d: Goto       l: Goto Local" 10 11
+(face hydra-face-blue)
+24 25
+(face hydra-face-blue)
+38 39
+(face hydra-face-blue)
+51 52
+(face hydra-face-blue)
+65 66
+(face hydra-face-blue))))
+    (defun g-knight/lispy-knight-down-and-exit nil "Call the head `lispy-knight-down' in the \"g-knight\" hydra.
+
+The heads for the associated hydra are:
+
+\"j\":    `lispy-knight-down',
+\"k\":    `lispy-knight-up',
+\"g\":    `lispy-beginning-of-defun',
+\"d\":    `lispy-goto',
+\"l\":    `lispy-goto-local'
+
+The body can be accessed via `g-knight/body'."
+           (interactive)
+           (require 'hydra)
+           (hydra-default-pre)
+           (hydra-keyboard-quit)
+           (setq hydra-curr-body-fn 'g-knight/body)
+           (progn
+             (setq this-command 'lispy-knight-down)
+             (hydra--call-interactively-remap-maybe
+              (function lispy-knight-down))))
+    (defun g-knight/lispy-knight-up-and-exit nil "Call the head `lispy-knight-up' in the \"g-knight\" hydra.
+
+The heads for the associated hydra are:
+
+\"j\":    `lispy-knight-down',
+\"k\":    `lispy-knight-up',
+\"g\":    `lispy-beginning-of-defun',
+\"d\":    `lispy-goto',
+\"l\":    `lispy-goto-local'
+
+The body can be accessed via `g-knight/body'."
+           (interactive)
+           (require 'hydra)
+           (hydra-default-pre)
+           (hydra-keyboard-quit)
+           (setq hydra-curr-body-fn 'g-knight/body)
+           (progn
+             (setq this-command 'lispy-knight-up)
+             (hydra--call-interactively-remap-maybe
+              (function lispy-knight-up))))
+    (defun g-knight/lispy-beginning-of-defun-and-exit nil "Call the head `lispy-beginning-of-defun' in the \"g-knight\" hydra.
+
+The heads for the associated hydra are:
+
+\"j\":    `lispy-knight-down',
+\"k\":    `lispy-knight-up',
+\"g\":    `lispy-beginning-of-defun',
+\"d\":    `lispy-goto',
+\"l\":    `lispy-goto-local'
+
+The body can be accessed via `g-knight/body'."
+           (interactive)
+           (require 'hydra)
+           (hydra-default-pre)
+           (hydra-keyboard-quit)
+           (setq hydra-curr-body-fn 'g-knight/body)
+           (progn
+             (setq this-command 'lispy-beginning-of-defun)
+             (hydra--call-interactively-remap-maybe
+              (function lispy-beginning-of-defun))))
+    (defun g-knight/lispy-goto-and-exit nil "Call the head `lispy-goto' in the \"g-knight\" hydra.
+
+The heads for the associated hydra are:
+
+\"j\":    `lispy-knight-down',
+\"k\":    `lispy-knight-up',
+\"g\":    `lispy-beginning-of-defun',
+\"d\":    `lispy-goto',
+\"l\":    `lispy-goto-local'
+
+The body can be accessed via `g-knight/body'."
+           (interactive)
+           (require 'hydra)
+           (hydra-default-pre)
+           (hydra-keyboard-quit)
+           (setq hydra-curr-body-fn 'g-knight/body)
+           (progn
+             (setq this-command 'lispy-goto)
+             (hydra--call-interactively-remap-maybe
+              (function lispy-goto))))
+    (defun g-knight/lispy-goto-local-and-exit nil "Call the head `lispy-goto-local' in the \"g-knight\" hydra.
+
+The heads for the associated hydra are:
+
+\"j\":    `lispy-knight-down',
+\"k\":    `lispy-knight-up',
+\"g\":    `lispy-beginning-of-defun',
+\"d\":    `lispy-goto',
+\"l\":    `lispy-goto-local'
+
+The body can be accessed via `g-knight/body'."
+           (interactive)
+           (require 'hydra)
+           (hydra-default-pre)
+           (hydra-keyboard-quit)
+           (setq hydra-curr-body-fn 'g-knight/body)
+           (progn
+             (setq this-command 'lispy-goto-local)
+             (hydra--call-interactively-remap-maybe
+              (function lispy-goto-local))))
+    (defun g-knight/body nil "Call the body in the \"g-knight\" hydra.
+
+The heads for the associated hydra are:
+
+\"j\":    `lispy-knight-down',
+\"k\":    `lispy-knight-up',
+\"g\":    `lispy-beginning-of-defun',
+\"d\":    `lispy-goto',
+\"l\":    `lispy-goto-local'
+
+The body can be accessed via `g-knight/body'."
+           (interactive)
+           (require 'hydra)
+           (hydra-default-pre)
+           (let
+               ((hydra--ignore nil))
+             ;; Unfortunate, but this ignore has to be manually placed here
+             ;; after macroexpanding.
+             (ignore hydra--ignore)
+             (hydra-keyboard-quit)
+             (setq hydra-curr-body-fn 'g-knight/body))
+           (hydra-idle-message 0.3 g-knight/hint 'g-knight)
+           (hydra-set-transient-map g-knight/keymap
+                                    (lambda nil
+                                      (hydra-keyboard-quit)
+                                      nil)
+                                    nil)
+           (setq prefix-arg current-prefix-arg)))
+
+  ;; (defhydra lispy-tab-hydra (:color blue :hint nil :idle .3)
+  ;;   "Tab"
+  ;;   ("i" lispy-tab "Tab")
+  ;;   ("s" lispy-shifttab "Shifttab"))
+
+  ;; Macroexpanded from lispy-tab-hydra.
+  (progn
+    (set
+     (defvar lispy-tab-hydra/params nil "Params of lispy-tab-hydra.")
+     '(nil nil :exit t :foreign-keys nil :hint nil :idle 0.3))
+    (set
+     (defvar lispy-tab-hydra/docstring nil "Docstring of lispy-tab-hydra.")
+     "Tab")
+    (set
+     (defvar lispy-tab-hydra/heads nil "Heads for lispy-tab-hydra.")
+     '(("i" lispy-tab "Tab" :exit t)
+       ("s" lispy-shifttab "Shifttab" :exit t)))
+    (set
+     (defvar lispy-tab-hydra/keymap nil "Keymap for lispy-tab-hydra.")
+     '(keymap
+       (115 . lispy-tab-hydra/lispy-shifttab-and-exit)
+       (105 . lispy-tab-hydra/lispy-tab-and-exit)
+       (kp-subtract . hydra--negative-argument)
+       (kp-9 . hydra--digit-argument)
+       (kp-8 . hydra--digit-argument)
+       (kp-7 . hydra--digit-argument)
+       (kp-6 . hydra--digit-argument)
+       (kp-5 . hydra--digit-argument)
+       (kp-4 . hydra--digit-argument)
+       (kp-3 . hydra--digit-argument)
+       (kp-2 . hydra--digit-argument)
+       (kp-1 . hydra--digit-argument)
+       (kp-0 . hydra--digit-argument)
+       (57 . hydra--digit-argument)
+       (56 . hydra--digit-argument)
+       (55 . hydra--digit-argument)
+       (54 . hydra--digit-argument)
+       (53 . hydra--digit-argument)
+       (52 . hydra--digit-argument)
+       (51 . hydra--digit-argument)
+       (50 . hydra--digit-argument)
+       (49 . hydra--digit-argument)
+       (48 . hydra--digit-argument)
+       (45 . hydra--negative-argument)
+       (21 . hydra--universal-argument)))
+    (set
+     (defvar lispy-tab-hydra/hint nil "Dynamic hint for lispy-tab-hydra.")
+     '(format
+       #("Tab: [i]: Tab, [s]: Shifttab." 6 7
+         (face hydra-face-blue)
+         16 17
+         (face hydra-face-blue))))
+    (defun lispy-tab-hydra/lispy-tab-and-exit nil "Call the head `lispy-tab' in the \"lispy-tab-hydra\" hydra.
+
+The heads for the associated hydra are:
+
+\"i\":    `lispy-tab',
+\"s\":    `lispy-shifttab'
+
+The body can be accessed via `lispy-tab-hydra/body'."
+           (interactive)
+           (require 'hydra)
+           (hydra-default-pre)
+           (hydra-keyboard-quit)
+           (setq hydra-curr-body-fn 'lispy-tab-hydra/body)
+           (progn
+             (setq this-command 'lispy-tab)
+             (hydra--call-interactively-remap-maybe
+              (function lispy-tab))))
+    (defun lispy-tab-hydra/lispy-shifttab-and-exit nil "Call the head `lispy-shifttab' in the \"lispy-tab-hydra\" hydra.
+
+The heads for the associated hydra are:
+
+\"i\":    `lispy-tab',
+\"s\":    `lispy-shifttab'
+
+The body can be accessed via `lispy-tab-hydra/body'."
+           (interactive)
+           (require 'hydra)
+           (hydra-default-pre)
+           (hydra-keyboard-quit)
+           (setq hydra-curr-body-fn 'lispy-tab-hydra/body)
+           (progn
+             (setq this-command 'lispy-shifttab)
+             (hydra--call-interactively-remap-maybe
+              (function lispy-shifttab))))
+    (defun lispy-tab-hydra/body nil "Call the body in the \"lispy-tab-hydra\" hydra.
+
+The heads for the associated hydra are:
+
+\"i\":    `lispy-tab',
+\"s\":    `lispy-shifttab'
+
+The body can be accessed via `lispy-tab-hydra/body'."
+           (interactive)
+           (require 'hydra)
+           (hydra-default-pre)
+           (let
+               ((hydra--ignore nil))
+             ;; Unfortunate, but this ignore has to be manually placed here
+             ;; after macroexpanding.
+             (ignore hydra--ignore)
+             (hydra-keyboard-quit)
+             (setq hydra-curr-body-fn 'lispy-tab-hydra/body))
+           (hydra-idle-message 0.3 lispy-tab-hydra/hint 'lispy-tab-hydra)
+           (hydra-set-transient-map lispy-tab-hydra/keymap
+                                    (lambda nil
+                                      (hydra-keyboard-quit)
+                                      nil)
+                                    nil)
+           (setq prefix-arg current-prefix-arg))))
+
+;; ------------------------------- HYDRA ---------------------------------------
+
+(defun evil-collection-lispy-action-then-next-sexp (lispy-action)
+  "Return function that triggers LISPY-ACTION and then moves to next sexp."
+  (defalias (intern (format "%S-then-next-sexp" lispy-action))
+    (lambda ()
+      (interactive)
+      (call-interactively lispy-action)
+      (unless (or (lispy-left-p)
+                  (lispy-right-p)
+                  (and (lispy-bolp)
+                       (or (looking-at lispy-outline-header)
+                           (looking-at lispy-outline))))
+        (call-interactively #'lispy-down)))))
+
+(defun evil-collection-lispy-delete (arg)
+  "Copy and delete current sexp.
+Passes ARG to `lispy-delete' or `lispy-delete-back'.
+
+Copy of `noc:lispy-delete'."
+  (interactive "p")
+  (cond ((or (lispy-left-p)
+             (region-active-p))
+         (lispy-new-copy)
+         (lispy-delete arg))
+        ((lispy-right-p)
+         (lispy-new-copy)
+         (lispy-delete-backward arg))))
+
+(defvar evil-collection-lispy-mode-map-special
+  (let ((map (make-sparse-keymap)))
+    (lispy-define-key map
+        ";" (evil-collection-lispy-action-then-next-sexp
+             'lispy-comment))
+
+    ;; navigation
+    (lispy-define-key map "l" 'lispy-right)
+    (lispy-define-key map "h" 'lispy-left)
+    (lispy-define-key map "f" 'lispy-ace-paren
+      :override '(cond ((bound-and-true-p view-mode)
+                        (View-quit)))) ;; `lispy-flow' -> w
+    (lispy-define-key map "j" 'lispy-down)
+    (lispy-define-key map "k" 'lispy-up)
+
+    (lispy-define-key map
+        "d" (evil-collection-lispy-action-then-next-sexp
+             'evil-collection-lispy-delete)) ;; `lispy-different' -> o
+
+    (lispy-define-key map "o" 'lispy-different) ;; `lispy-other-mode' -> Q
+    (lispy-define-key map "p" 'lispy-paste) ;; `lispy-eval-other-window' -> P
+    (lispy-define-key map "P" 'lispy-eval-other-window) ;; `lispy-paste' -> p
+    (lispy-define-key map "y" 'lispy-new-copy)          ;; `lispy-occur' -> /
+    (lispy-define-key map "z" 'lispy-view) ;; `lispy-mark-list' -> v
+
+    ;; outline
+    (lispy-define-key map "J" 'lispy-join)     ;; `lispy-outline-next'
+    (lispy-define-key map "K" 'lispy-describe) ;; `lispy-outline-prev'
+    (lispy-define-key map "L" 'lispy-outline-goto-child)
+
+    ;; Paredit transformations
+    (lispy-define-key map ">" 'lispy-slurp-or-barf-right) ;; `lispy-slurp'
+    (lispy-define-key map "<" 'lispy-slurp-or-barf-left)  ;; `lispy-barf'
+
+    ;; FIXME: This doesn't work for me for some reason...
+    (lispy-define-key map "/" 'lispy-occur) ;; `lispy-x' -> q
+
+    (lispy-define-key map "r" 'lispy-raise)
+    (lispy-define-key map "R" 'lispy-raise-some)
+
+    (lispy-define-key map "+" 'lispy-join) ;; Hmnn this can be something else.
+
+    ;; more transformations
+    (lispy-define-key map "C" 'lispy-convolute)
+    (lispy-define-key map "X" 'lispy-convolute-left)
+    (lispy-define-key map "w" 'lispy-move-up)
+    (lispy-define-key map "s" 'lispy-move-down)
+    (lispy-define-key map "O" 'lispy-oneline)
+    (lispy-define-key map "M" 'lispy-alt-multiline)
+    (lispy-define-key map "S" 'lispy-stringify)
+
+    ;; marking
+    (lispy-define-key map "a" 'lispy-ace-symbol
+      :override '(cond ((looking-at lispy-outline)
+                        (lispy-meta-return))))
+    (lispy-define-key map "H" 'lispy-ace-symbol-replace)
+
+    ;; dialect-specific
+    (lispy-define-key map "e" 'lispy-eval)
+    (lispy-define-key map "E" 'lispy-eval-and-insert)
+
+    ;; Hmnn, not sure why there's no `lispy-end-of-defun'.
+    ;; `end-of-defun' doesn't work quite right yet. It exits the list
+    ;; which would exit lispy state.
+    (lispy-define-key map "G" 'end-of-defun) ;; `lispy-goto-local' -> gl
+    (lispy-define-key map "g" 'g-knight/body) ;; `lispy-goto' -> gd
+
+    (lispy-define-key map "A" 'evil-collection-lispy-insert-at-end-of-list) ;; `lispy-beginning-of-defun' -> gg
+    (lispy-define-key map "I" 'evil-collection-lispy-insert-at-beginning-of-list) ;; `lispy-shifttab' -> zs
+
+    (lispy-define-key map "F" 'lispy-follow t)
+    (lispy-define-key map "D" 'pop-tag-mark)
+    (lispy-define-key map "_" 'lispy-underscore)
+
+    ;; miscellanea
+    (define-key map (kbd "SPC") 'lispy-space)
+    (lispy-define-key map "TAB" 'lispy-tab-hydra/body) ;; `lh-knight/body'  -> g
+
+    (lispy-define-key map "N" 'lispy-narrow)
+    (lispy-define-key map "W" 'lispy-widen)
+    (lispy-define-key map "c" 'lispy-clone)
+    (lispy-define-key map "u" 'lispy-undo)
+
+    (lispy-define-key map "q" 'lispy-x)          ;; `lispy-ace-paren' -> f
+    (lispy-define-key map "Q" 'lispy-other-mode) ;; `lispy-ace-char' -> t
+    (lispy-define-key map "v" 'lispy-mark-list)  ;; `lispy-view' -> z
+    (lispy-define-key map "t" 'lispy-ace-char)   ;; `lispy-teleport' -> T
+    (lispy-define-key map "n" 'lispy-flow)       ;; `lispy-new-copy' -> y
+    (lispy-define-key map "b" 'lispy-back)
+
+    (lispy-define-key map "B" 'lispy-ediff-regions)
+    (lispy-define-key map "x" 'lispy-splice) ;; `lispy-x' -> q
+
+    (lispy-define-key map "Z" 'lispy-edebug-stop)
+    (lispy-define-key map "V" 'lispy-visit)
+    (lispy-define-key map "-" 'lispy-ace-subword)
+    (lispy-define-key map "." 'lispy-repeat)
+    (lispy-define-key map "~" 'lispy-tilde)
+    ;; digit argument
+    (mapc (lambda (x) (lispy-define-key map (format "%d" x) 'digit-argument))
+          (number-sequence 0 9))
+
+    ;; additional
+    (lispy-define-key map "T" 'lispy-teleport
+      :override '(cond ((looking-at lispy-outline)
+                        (end-of-line))))
+    (lispy-define-key map "]" 'lispy-forward)
+    (lispy-define-key map "[" 'lispy-backward)
+    (lispy-define-key map "{" 'lispy-brackets)
+
+    ;; Experimental
+    (lispy-define-key map "C-J" 'lispy-outline-next)
+    (lispy-define-key map "C-K" 'lispy-outline-prev)
+    (lispy-define-key map "^" 'lispy-splice-sexp-killing-backward)
+    (lispy-define-key map "$" 'lispy-splice-sexp-killing-forward)
+    (lispy-define-key map "M-j" 'lispy-move-down) ;; `lispy-split'
+    (lispy-define-key map "M-k" 'lispy-move-up) ;; `lispy-kill-sentence'
+    map)
+  "`evil' flavored `lispy' bindings when in special state.")
+
+(defvar evil-collection-lispy-mode-map (make-sparse-keymap)
+  "`evil' flavored `lispy-mode' bindings.")
+
+(defun evil-collection-lispy-set-key-theme (theme)
+  "Set `lispy-mode-map' for according to THEME.
+THEME is a list of choices: \='special', \='lispy', \='paredit', \='evilcp',
+ \='c-digits', \='special-evil', \='evil'.
+
+This is an exact copy of `lispy-set-key-theme' except with the additions of
+ \='special-evil' and \='evil' themes."
+  (setq lispy-mode-map
+        (make-composed-keymap
+         (delq nil
+               (list
+                (when (memq 'special-evil theme) evil-collection-lispy-mode-map-special)
+                (when (memq 'evil theme) evil-collection-lispy-mode-map)
+                (when (memq 'special theme) lispy-mode-map-special)
+                (when (memq 'lispy theme) lispy-mode-map-lispy)
+                (when (memq 'paredit theme) lispy-mode-map-paredit)
+                (when (memq 'parinfer theme) lispy-mode-map-parinfer)
+                (when (memq 'evilcp theme) lispy-mode-map-evilcp)
+                (when (memq 'c-digits theme) lispy-mode-map-c-digits)
+                (when (memq 'oleh theme) lispy-mode-map-oleh)))))
+  (setcdr
+   (assq 'lispy-mode minor-mode-map-alist)
+   lispy-mode-map))
+
+;;;###autoload
+(defun evil-collection-lispy-setup ()
+  "Set up `evil' bindings for `lispy'."
+  (advice-add 'lispy-set-key-theme :override #'evil-collection-lispy-set-key-theme)
+  (lispy-set-key-theme '(special-evil evil))
+  (evil-collection-define-key 'normal 'evil-collection-lispy-mode-map
+    ;; Instead of inheriting, explicitly define keys from `lispy-mode-map-base'.
+    ;; navigation.
+    ;; Commented out define-keys are from the original map that we're not using.
+    ;; -- Begin Inheritance
+    ;; (define-key map (kbd "C-a") 'lispy-move-beginning-of-line)
+    ;; (define-key map (kbd "C-e") 'lispy-move-end-of-line)
+    (kbd "M-n") 'lispy-left
+    ;; killing
+    ;; (define-key map (kbd "C-k") 'lispy-kill)
+    (kbd "M-d") 'lispy-kill-word
+    (kbd "M-DEL") 'lispy-backward-kill-word
+    ;; misc
+    "(" 'lispy-parens
+    ";" 'lispy-comment
+    ;; (kbd "M-q") 'lispy-fill
+    ;; (define-key map (kbd "C-j") 'lispy-newline-and-indent)
+    ;; (define-key map (kbd "RET") 'lispy-newline-and-indent-plain)
+    ;; -- End Inheritance.
+
+    (kbd "M-)") 'lispy-wrap-round
+    (kbd "M-s") 'lispy-splice
+    (kbd "M-<up>") 'lispy-splice-sexp-killing-backward
+    (kbd "M-<down>") 'lispy-splice-sexp-killing-forward
+    (kbd "M-r") 'lispy-raise-sexp
+    (kbd "M-R") 'lispy-raise-some
+    (kbd "M-C") 'lispy-convolute-sexp
+    (kbd "M-S") 'lispy-split
+    (kbd "M-J") 'lispy-join
+    "]" 'lispy-forward
+    "[" 'lispy-backward
+    (kbd "M-(") 'lispy-wrap-round
+    (kbd "M-{") 'lispy-wrap-braces
+    (kbd "M-}") 'lispy-wrap-braces
+    "<" 'lispy-slurp-or-barf-left
+    ">" 'lispy-slurp-or-barf-right
+    (kbd "M-y") 'lispy-new-copy
+    (kbd "<C-return>") 'lispy-open-line
+    (kbd "<M-return>") 'lispy-meta-return
+    (kbd "M-k") 'lispy-move-up
+    (kbd "M-j") 'lispy-move-down
+    (kbd "M-o") 'lispy-string-oneline
+    (kbd "M-p") 'lispy-clone
+    (kbd "M-d") 'evil-collection-lispy-delete)
+
+  (evil-collection-bind 'evil-collection-lispy-mode-map
+                        'find-definition 'lispy-goto-symbol
+                        'pop-definition 'pop-tag-mark))
+
+(provide 'evil-collection-lispy)
+;;; evil-collection-lispy.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lispy/evil-collection-lispy.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lispy/evil-collection-lispy.elc
new file mode 100644
index 0000000..72d646a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lispy/evil-collection-lispy.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lms/evil-collection-lms.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lms/evil-collection-lms.el
new file mode 100644
index 0000000..f3647b1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lms/evil-collection-lms.el
@@ -0,0 +1,414 @@
+;;; evil-collection-lms.el --- Evil bindings for lms.el -*- lexical-binding: t -*-
+;; Copyright (C) 2021-2023 Edgar Vincent
+
+;; Author: Edgar Vincent <e-v@posteo.net>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "25.1"))
+;; Keywords: evil, multimedia, music, logitechmediaserver, squeezebox
+
+;; This file is not part of GNU Emacs.
+;;
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for lms.el.
+;;
+;;; Code:
+(require 'lms nil t)
+(require 'evil-collection)
+
+(defvar lms-ui-docs)
+(defvar lms-ui-playing-now-mode-map)
+(defvar lms-ui-players-mode-map)
+(defvar lms-ui-playlist-mode-map)
+(defvar lms-ui-track-info-mode-map)
+(defvar lms-ui-tracks-list-mode-map)
+(defvar lms--ui-editing-p)
+(defvar lms--ui-pl-tracks)
+
+(declare-function lms-ui-playing-now-refresh "lms")
+
+(defconst evil-collection-lms-maps '(lms-ui-players-mode-map
+                                     lms-ui-playing-now-mode-map
+                                     lms-ui-playlist-mode-map
+                                     lms-ui-track-info-mode-map
+                                     lms-ui-tracks-list-mode-map
+                                     lms-ui-year-album-artist-list-mode-map))
+
+(defconst evil-collection-lms-modes '(lms-players-mode
+                                      lms-ui-playing-now-mode
+                                      lms-ui-track-info-mode
+                                      lms-ui-players-mode
+                                      lms-ui-playlist-mode
+                                      lms-ui-tracks-list-mode
+                                      lms-ui-year-album-artist-list-mode))
+
+(defun evil-collection-lms-ui-track-info-mode-quit ()
+  "Exit `lms-ui-track-info-mode'."
+  (interactive)
+  (kill-buffer "*LMS: Track Information*")
+  (lms-ui-playing-now-refresh))
+
+(defun evil-collection-lms-ui-players-mode-quit ()
+  "Exit `lms-ui-players-mode'."
+  (interactive)
+  (kill-buffer (format "*LMS: Players*"))
+  (lms-ui-playing-now-refresh))
+
+(defun evil-collection-lms-ui-playlist-mode-quit ()
+  "Exit `lms-ui-playlist-mode'."
+  (interactive)
+  (kill-buffer (format "*LMS: Playlist [%d tracks]*" (length lms--ui-pl-tracks)))
+  (lms-ui-playing-now-refresh))
+
+(defun evil-collection-lms-ui-tracks-list-mode-quit ()
+  "Exit `lms-ui-tracks-list-mode'."
+  (interactive)
+  (kill-buffer)
+  (lms-ui-playing-now-refresh))
+
+(defalias 'evil-collection-lms-ui-year-album-artist-list-mode-quit
+  #'evil-collection-lms-ui-tracks-list-mode-quit
+  "Exit lms-ui-tracks-list-mode.")
+
+(defun evil-collection-lms-goto-line (count)
+  "Move the point to line COUNT. By default the penultimate line."
+  (interactive "P")
+  (evil-goto-line count)
+  (unless count
+    (forward-line -1)))
+
+(defun evil-collection-lms-next-line ()
+  "Move the point to the next line, except if it is at the end of the buffer."
+  (interactive)
+  (forward-line 1)
+  (when (eobp) (forward-line -1)))
+
+(defun evil-collection-lms-ui-playing-now ()
+  "Modify the *LMS: Playing Now* buffer to reflect evil keybinding changes."
+  (setq-local buffer-read-only nil)
+  (setq lms--ui-editing-p t)
+  (while (search-forward-regexp "Press 'h' for help" nil 'noerror)
+      (replace-match "")
+      (insert (propertize "Press 'gh' or 'g?' for help" 'face '(variable-pitch (:height 0.85 :slant italic :foreground "gray40")))))
+  (setq-local buffer-read-only t)
+  (setq lms--ui-editing-p nil))
+
+(defvar evil-collection-lms-ui-docs
+  "#+TITLE: lms.el Documentation
+#+AUTHOR: Iñigo Serna
+#+DATE: 2020/06/14
+
+* Introduction
+This is an *emacs* frontend to interact with Squeezebox Server / Logitech Media Server.
+Released under GPL version 3 license or later.
+
+It requires emacs version 25 or higher.
+
+More information on what a *squeezebox controller* is at https://inigo.katxi.org/blog/2017/07/31/lms_el.html.
+
+Quick instructions: customize some basic parameters such as 'lms-url' and run it with *lms* or *lms-ui*.
+From there, you could read complete documentation after pressing *gh* or *g?*.
+You can also run 'emacsclient -e \"(lms-float)\"' to display an independent small frame.
+
+Package should appear in [[https://melpa.org][MELPA repository]], and the code is in [[https://hg.serna.eu/emacs/lms][the code repository]] as well.
+
+* Features
+This is Squeezebox controller, i.e. a program which can handle your local music library.
+
+Some of the features:
+- Display song: title, artist, album, year, cover…
+- Play, pause, stop, select next / previous song
+- Control players: select player, power on/off, volume, repeat and shuffle modes
+- Playlist control: list, select song, delete track, clear
+- Show track information and change rating
+
+It is not aimed to be a complete controller, as it can't - and won't - manage external sources such us BBC, Deezer, Pandora, Spotify, or TuneIn Radio.
+
+* Configuration
+There are some parameters you could customize:
+|--------------------------+-----------------------------------------------+------------------------------------|
+| Parameter                | Description                                   | Default                            |
+|--------------------------+-----------------------------------------------+------------------------------------|
+| lms-url                  | Logitech Media Server hostname or ip and port | http://lms_server:9000             |
+| lms-default-player       | Name of default player                        | nil  (1)                           |
+| lms-ui-cover-width       | Cover image width                             | 500  (2)                           |
+| lms-ui-update-interval   | Time in seconds between UI updates            | 1    (3)                           |
+| lms-number-recent-albums | Number of recent albums to show               | 25                                 |
+| lms-number-random-albums | Number of random albums to show               | 25                                 |
+| lms-number-random-songs  | Number of random songs to show                | 50                                 |
+| lms-set-rating-function  | Function to use to set song rating            | lms--set-rating-with-trackstat (4) |
+|--------------------------+-----------------------------------------------+------------------------------------|
+Notes:
+(1) If *lms-default-player* is not defined or a player with that name does not exist, it will ask for one at start.
+(2) It's recomendable not to change *lms-ui-cover-width*.
+(3) Note that small values in *lms-ui-update-interval* could freeze your Emacs use while refreshing window.
+(4) LMS does not have any means to set the rating of a song by itself, so it depends on an external plugin.
+    TrackStat (function *lms--set-rating-with-trackstat*) is a popular one, and RatingsLight (function *lms--set-rating-with-ratingslight*) is another option.
+** Faces
+The colors and font attributes of text can be customized in some views:
+|----------------------------+-------------------------------+---------------------|
+| Face name                  | Description                   | Default             |
+|----------------------------+-------------------------------+---------------------|
+| lms-playing-face           | Playing symbol                | DarkTurquoise, bold |
+| lms-title-face             | Song title                    | SlateGray, italic   |
+| lms-artist-face            | Artist                        | RosyBrown, bold     |
+| lms-year-face              | Song year                     | SteelBlue           |
+| lms-album-face             | Album                         | CadetBlue           |
+| lms-tracknum-face          | Track number                  | gray40              |
+| lms-duration-face          | Song duration                 | gray60              |
+| lms-players-selected-face  | Selected icon in players list | SteelBlue           |
+| lms-players-isplaying-face | Isplaying in players list     | RosyBrown           |
+| lms-players-name-face      | Player name in players list   | CadetBlue           |
+| lms-players-model-face     | Player model in players list  | SlateGray           |
+| lms-players-playerid-face  | Player id in players list     | gray60              |
+| lms-players-ip-face        | Player IP in players list     | gray40              |
+| lms-players-power-face     | Ispower in players list       | Maroon              |
+|----------------------------+-------------------------------+---------------------|
+
+* Playing now
+Main window showing information about current track and player status.
+The actions triggered by pressing keys refer to the current track.
+** Key bindings
+|-----------------+--------------------------------|
+| Ctrl-p          | select player                  |
+| t               | change player power state      |
+| R               | change track rating            |
+| Ctrl-=          | set volume                     |
+| x, <enter>      | toggle play/pause              |
+| p               | play                           |
+| s               | stop playing                   |
+| Ctrl-k, <left>  | play previous song in playlist |
+| Ctrl-j, <right> | play next song in playlist     |
+| m               | toggle mute volume             |
+| +, =            | volume up +5                   |
+| -               | volume down -5                 |
+| r               | cycle repeat mode              |
+| S               | cycle shuffle mode             |
+| gr              | update window contents         |
+| i               | display track information      |
+| P               | display playlist               |
+| T               | show all albums by artist      |
+| L               | show all tracks of album       |
+| Y               | show all albums of this year   |
+| M               | browse music libray            |
+| gh, g?          | show this documentation        |
+| q               | quit LMS                       |
+|-----------------+--------------------------------|
+
+* Track information
+Display track information.
+Previous/next track only works when *Track information* window was called from a list, but not from *Playing now*.
+** Key bindings
+|-----------------+-------------------------|
+| R               | change track rating     |
+| Ctrl-k, <left>  | show previous track     |
+| Ctrl-j, <right> | show next track         |
+| gh, g?          | show this documentation |
+| q               | close window            |
+|-----------------+-------------------------|
+
+* Players list
+Players list.
+** Key bindings
+|--------------------+--------------------------------|
+| k, <up>, j, <down> | move cursor                    |
+| <enter>            | select player and close window |
+| x                  | toggle player play/pause       |
+| t                  | toggle player power state      |
+| gh, g?             | show this documentation        |
+| q                  | close window                   |
+|--------------------+--------------------------------|
+
+* Playlist
+Playlist view.
+The actions triggered by pressing keys refer to the track under cursor.
+** Key bindings
+|--------------------+------------------------------------|
+| k, <up>, j, <down> | move cursor                        |
+| <enter>            | play track                         |
+| i                  | show track information             |
+| C                  | jump to current track              |
+| d, <delete>        | remove track from playlist         |
+| c c                | clear playlist                     |
+| c u                | remove tracks from start to cursor |
+| c f                | remove tracks from cursor to end   |
+| u                  | update window contents             |
+| A                  | show all albums by artist          |
+| T                  | show all tracks of album           |
+| Y                  | show all albums of this year       |
+| gh, g?             | show this documentation            |
+| q                  | close window                       |
+|--------------------+------------------------------------|
+
+* Year - Album - Artist list
+View all albums of an artist, sorted by date/year.
+The actions triggered by pressing keys refer to the album under cursor.
+** Key bindings
+|--------------------+------------------------------|
+| k, <up>, j, <down> | move cursor                  |
+| <enter>, a         | show all tracks of album     |
+| A                  | show all albums by artist    |
+| Y                  | show all albums of this year |
+| p                  | add album to playlist        |
+| gh, g?             | show this documentation      |
+| q                  | close window                 |
+|--------------------+------------------------------|
+
+* Tracks list
+View list of tracks.
+The actions triggered by pressing keys refer to the track under cursor.
+** Key bindings
+|--------------------+------------------------------|
+| j, <up>, k, <down> | move cursor                  |
+| <enter>, i         | display track information    |
+| A                  | show all albums by artist    |
+| Y                  | show all albums of this year |
+| p                  | add song to playlist         |
+| P                  | add all songs to playlist    |
+| gh, g?             | show this documentation      |
+| q                  | close window                 |
+|--------------------+------------------------------|
+"
+  "LMS documentation.")
+
+;;;###autoload
+(defun evil-collection-lms-setup ()
+  "Set up `evil' bindings for `lms'."
+
+  (dolist (map evil-collection-lms-maps)
+    (evil-collection-inhibit-insert-state map))
+
+  (dolist (mode evil-collection-lms-modes)
+    (evil-set-initial-state mode 'normal))
+
+  (evil-collection-define-key 'normal 'lms-ui-playing-now-mode-map
+    (kbd "C-p")      'lms-ui-playing-now-players-list
+    "R"              'lms-ui-playing-now-change-rating
+    (kbd  "C-=")     'lms-ui-playing-now-set-volume
+    "x"              'lms-ui-playing-now-play-pause
+    "p"              'lms-ui-playing-now-play
+    "s"              'lms-ui-playing-now-stop
+    (kbd  "<right>") 'lms-ui-playing-now-next
+    (kbd  "<left>")  'lms-ui-playing-now-prev
+    "+"              'lms-ui-playing-now-volume-up
+    "="              'lms-ui-playing-now-volume-up
+    "-"              'lms-ui-playing-now-volume-down
+    "m"              'lms-ui-playing-now-volume-mute
+    "r"              'lms-ui-playing-now-cycle-repeat
+    "S"              'lms-ui-playing-now-cycle-shuffle
+    "i"              'lms-ui-playing-now-show-track-info
+    "P"              'lms-ui-playing-now-show-playlist
+    "T"              'lms-ui-playing-now-album-tracks-list
+    "A"              'lms-ui-playing-now-artist-albums-list
+    "Y"              'lms-ui-playing-now-year-albums-list
+    "M"              'lms-ui-playing-now-browse-music-library
+    "gh"             'lms-ui-playing-now-help)
+  (evil-collection-bind 'lms-ui-playing-now-mode-map
+                        'next-item 'lms-ui-playing-now-next
+                        'prev-item 'lms-ui-playing-now-prev
+                        'next-section 'lms-ui-playing-now-next
+                        'prev-section 'lms-ui-playing-now-prev
+                        'quit 'lms-ui-playing-now-quit
+                        'describe-mode 'lms-ui-playing-now-help
+                        'refresh 'lms-ui-playing-now-refresh
+                        'action 'lms-ui-playing-now-play-pause
+                        'toggle 'lms-ui-playing-now-change-player-power-state)
+
+  (evil-collection-define-key 'normal 'lms-ui-track-info-mode-map
+    "R"             'lms-ui-track-info-change-rating
+    (kbd "<left>")  'lms-ui-track-info-prev
+    (kbd "<right>") 'lms-ui-track-info-next
+    "gh"            'lms-ui-playing-now-help)
+  (evil-collection-bind 'lms-ui-track-info-mode-map
+                        'next-item 'lms-ui-track-info-next
+                        'prev-item 'lms-ui-track-info-prev
+                        'next-section 'lms-ui-track-info-next
+                        'prev-section 'lms-ui-track-info-prev
+                        'quit 'evil-collection-lms-ui-track-info-mode-quit
+                        'describe-mode 'lms-ui-playing-now-help)
+
+  (evil-collection-define-key 'normal 'lms-ui-players-mode-map
+    [remap evil-goto-line] 'evil-collection-lms-goto-line
+    [remap end-of-defun] 'evil-collection-lms-goto-line
+    [remap evil-forward-paragraph] 'evil-collection-lms-goto-line
+    [remap evil-next-line] 'evil-collection-lms-next-line
+    "x" 'lms-ui-players-playpause
+    "gh" 'lms-ui-playing-now-help)
+  (evil-collection-bind 'lms-ui-players-mode-map
+                        'quit 'evil-collection-lms-ui-players-mode-quit
+                        'describe-mode 'lms-ui-playing-now-help
+                        'action 'lms-ui-players-select
+                        'toggle 'lms-ui-players-toggle-power)
+
+  (evil-collection-define-key 'normal 'lms-ui-playlist-mode-map
+    [remap evil-goto-line] 'evil-collection-lms-goto-line
+    [remap end-of-defun] 'evil-collection-lms-goto-line
+    [remap evil-forward-paragraph] 'evil-collection-lms-goto-line
+    [remap evil-next-line] 'evil-collection-lms-next-line
+    "i"              'lms-ui-playlist-track-info
+    "C"              'lms-ui-playlist-jump-to-current
+    (kbd "<delete>") 'lms-ui-playlist-delete-track
+    "cc"             'lms-ui-playlist-clear
+    "ct"             'lms-ui-playlist-clear-until-track
+    "cf"             'lms-ui-playlist-clear-from-track
+    "u"              'lms-ui-playlist
+    "A"              'lms-ui-playlist-artist-albums-list
+    "T"              'lms-ui-playlist-album-tracks-list
+    "Y"              'lms-ui-playlist-year-albums-list
+    "gh"             'lms-ui-playing-now-help)
+  (evil-collection-bind 'lms-ui-playlist-mode-map
+                        'quit 'evil-collection-lms-ui-playlist-mode-quit
+                        'describe-mode 'lms-ui-playing-now-help
+                        'action 'lms-ui-playlist-play
+                        'delete 'lms-ui-playlist-delete-track)
+
+  (evil-collection-define-key 'normal 'lms-ui-tracks-list-mode-map
+    [remap evil-goto-line] 'evil-collection-lms-goto-line
+    [remap end-of-defun] 'evil-collection-lms-goto-line
+    [remap evil-forward-paragraph] 'evil-collection-lms-goto-line
+    [remap evil-next-line] 'evil-collection-lms-next-line
+    "i"         'lms-ui-tl-track-info
+    "p"         'lms-ui-tl-to-playlist
+    "P"         'lms-ui-tl-all-to-playlist
+    "Y"         'lms-ui-tl-by-year
+    "A"         'lms-ui-tl-by-artist
+    "gh"        'lms-ui-playing-now-help)
+  (evil-collection-bind 'lms-ui-tracks-list-mode-map
+                        'quit 'evil-collection-lms-ui-tracks-list-mode-quit
+                        'describe-mode 'lms-ui-playing-now-help
+                        'action 'lms-ui-tl-track-info)
+
+  (evil-collection-define-key 'normal 'lms-ui-year-album-artist-list-mode-map
+    [remap evil-goto-line] 'evil-collection-lms-goto-line
+    [remap end-of-defun] 'evil-collection-lms-goto-line
+    [remap evil-forward-paragraph] 'evil-collection-lms-goto-line
+    [remap evil-next-line] 'evil-collection-lms-next-line
+    "Y"         'lms-ui-yaal-by-year
+    "A"         'lms-ui-yaal-by-artist
+    "a"         'lms-ui-yaal-by-album
+    "p"         'lms-ui-yaal-to-playlist
+    "gh"        'lms-ui-playing-now-help)
+  (evil-collection-bind 'lms-ui-year-album-artist-list-mode-map
+                        'quit 'evil-collection-lms-ui-year-album-artist-list-mode-quit
+                        'describe-mode 'lms-ui-playing-now-help
+                        'action 'lms-ui-yaal-by-album)
+
+  ;; Reflect help keybinding changes in the lms.el UI.
+  (advice-add 'lms-ui-playing-now :after #'evil-collection-lms-ui-playing-now)
+  (setq lms-ui-docs evil-collection-lms-ui-docs))
+
+(provide 'evil-collection-lms)
+;;; evil-collection-lms.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lms/evil-collection-lms.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lms/evil-collection-lms.elc
new file mode 100644
index 0000000..ef15228
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lms/evil-collection-lms.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-edit/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-edit/README.org
new file mode 100644
index 0000000..6046f21
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-edit/README.org
@@ -0,0 +1,17 @@
+* log-edit
+
+  Evil bindings for =log-edit-mode=, the VC commit-message buffer.
+
+** Key bindings
+
+   | Command                     | Original  | Evil              |
+   |-----------------------------+-----------+-------------------|
+   | =log-edit-done=             | =C-c C-c= | =ZZ= (remap)      |
+   | =log-edit-kill-buffer=      | =C-c C-k= | =ZQ= (remap)      |
+   | =log-edit-mode-help=        | =C-c ?=   | =g?=              |
+   | =log-edit-next-comment=     | =M-n=     | =]]=, =gj=, =C-j= |
+   | =log-edit-previous-comment= | =M-p=     | =[[=, =gk=        |
+   | =quit-window=               | n/a       | =ZZ=, =ZQ=        |
+
+   The remaps target =evil-save-and-close=, =evil-save-modified-and-close=,
+   and =evil-quit= so =:wq= / =:q= behave correctly.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-edit/evil-collection-log-edit.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-edit/evil-collection-log-edit.el
new file mode 100644
index 0000000..26ecfce
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-edit/evil-collection-log-edit.el
@@ -0,0 +1,54 @@
+;;; evil-collection-log-edit.el --- Evil bindings for log-edit -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>, Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, log-edit, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for log-edit.
+
+;;; Code:
+(require 'evil-collection)
+(require 'log-edit nil t)
+
+(defvar log-edit-mode-map)
+
+(defconst evil-collection-log-edit-maps '(log-edit-mode-map))
+
+;;;###autoload
+(defun evil-collection-log-edit-setup ()
+  "Set up `evil' bindings for `log-edit'."
+  (evil-collection-define-key nil 'log-edit-mode-map
+    [remap evil-save-and-close] 'log-edit-done
+    [remap evil-save-modified-and-close] 'log-edit-done
+    [remap evil-quit] 'log-edit-kill-buffer)
+
+  (evil-collection-bind 'log-edit-mode-map
+                        'describe-mode 'log-edit-mode-help
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window
+                        'next-item 'log-edit-next-comment
+                        'prev-item 'log-edit-previous-comment
+                        'next-section 'log-edit-next-comment
+                        'prev-section 'log-edit-previous-comment))
+
+(provide 'evil-collection-log-edit)
+;;; evil-collection-log-edit.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-edit/evil-collection-log-edit.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-edit/evil-collection-log-edit.elc
new file mode 100644
index 0000000..a4a5b87
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-edit/evil-collection-log-edit.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-view/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-view/README.org
new file mode 100644
index 0000000..c8363f4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-view/README.org
@@ -0,0 +1,20 @@
+* log-view
+
+  Evil bindings for =log-view-mode= (VC log buffers for git, hg, svn, etc.).
+
+** Key bindings
+
+   | Command                          | Original     | Evil            |
+   |----------------------------------+--------------+-----------------|
+   | =log-view-toggle-entry-display=  | =RET=, =TAB= | =TAB=           |
+   | =log-view-diff=                  | =d=, ===     | =RET=, =d=, === |
+   | =log-view-diff-changeset=        | =D=          | =D=             |
+   | =log-view-toggle-mark-entry=     | =m=          | =m=             |
+   | =log-view-modify-change-comment= | =e=          | =c=             |
+   | =log-view-annotate-version=      | =a=          | =a=             |
+   | =log-view-find-revision=         | =f=          | =F=             |
+   | =log-view-msg-next=              | =n=, =TAB=   | =gj=, =]]=      |
+   | =log-view-msg-prev=              | =p=          | =gk=, =[[=      |
+   | =log-view-file-next=             | n/a          | =C-j=           |
+   | =log-view-file-prev=             | n/a          | =C-k=           |
+   | =quit-window=                    | =q=          | =q=             |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-view/evil-collection-log-view.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-view/evil-collection-log-view.el
new file mode 100644
index 0000000..3189bcc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-view/evil-collection-log-view.el
@@ -0,0 +1,65 @@
+;;; evil-collection-log-view.el --- Bindings for `log-view' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `log-view'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'log-view)
+
+(defconst evil-collection-log-view-maps '(log-view-mode-map))
+
+;;;###autoload
+(defun evil-collection-log-view-setup ()
+  "Set up `evil' bindings for `log-view'."
+
+  ;; Currently vc has these various log-view modes
+  (evil-set-initial-state 'vc-hg-log-view-mode 'normal)
+  (evil-set-initial-state 'vc-git-log-view-mode 'normal)
+  (evil-set-initial-state 'vc-svn-log-view-mode 'normal)
+
+  (evil-collection-bind 'log-view-mode-map
+                        'quit 'quit-window
+                        'section-toggle 'log-view-toggle-entry-display)
+  (evil-collection-define-key 'normal 'log-view-mode-map
+    "c" 'log-view-modify-change-comment
+    "d" 'log-view-diff
+    "=" 'log-view-diff
+    "D" 'log-view-diff-changeset
+    "a" 'log-view-annotate-version
+    "F" 'log-view-find-revision)
+  (evil-collection-bind 'log-view-mode-map
+                        'mark 'log-view-toggle-mark-entry
+                        'action 'log-view-diff
+                        'next-item 'log-view-msg-next
+                        'prev-item 'log-view-msg-prev
+                        'next-section 'log-view-msg-next
+                        'prev-section 'log-view-msg-prev
+                        'next-section-2 'log-view-file-next
+                        'prev-section-2 'log-view-file-prev))
+
+(provide 'evil-collection-log-view)
+;;; evil-collection-log-view.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-view/evil-collection-log-view.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-view/evil-collection-log-view.elc
new file mode 100644
index 0000000..7af7ad8
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/log-view/evil-collection-log-view.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lsp-ui-imenu/evil-collection-lsp-ui-imenu.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lsp-ui-imenu/evil-collection-lsp-ui-imenu.el
new file mode 100644
index 0000000..a5ddbd3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lsp-ui-imenu/evil-collection-lsp-ui-imenu.el
@@ -0,0 +1,49 @@
+;;; evil-collection-lsp-ui-imenu.el --- Bindings for `lsp-ui-imenu-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: Felix Dick <felix.dick@web.de>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, lsp-ui-imenu, convenience
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `lsp-ui-imenu-mode'.
+
+;;; Code:
+(require 'lsp-ui-imenu nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-lsp-ui-imenu-maps '(lsp-ui-imenu-mode-map))
+
+;;;###autoload
+(defun evil-collection-lsp-ui-imenu-setup ()
+  "Set up `evil' bindings for `lsp-ui-imenu'."
+  (evil-set-initial-state 'lsp-ui-imenu-mode 'normal)
+  (evil-collection-bind 'lsp-ui-imenu-mode-map
+                        'quit 'lsp-ui-imenu--kill
+                        'action 'lsp-ui-imenu--view
+                        'action-stay 'lsp-ui-imenu--visit
+                        'next-item 'lsp-ui-imenu--next-kind
+                        'prev-item 'lsp-ui-imenu--prev-kind
+                        'next-section 'lsp-ui-imenu--next-kind
+                        'prev-section 'lsp-ui-imenu--prev-kind))
+
+(provide 'evil-collection-lsp-ui-imenu)
+;;; evil-collection-lsp-ui-imenu.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lsp-ui-imenu/evil-collection-lsp-ui-imenu.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lsp-ui-imenu/evil-collection-lsp-ui-imenu.elc
new file mode 100644
index 0000000..efe6faf
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lsp-ui-imenu/evil-collection-lsp-ui-imenu.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lua-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lua-mode/README.org
new file mode 100644
index 0000000..922ca73
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lua-mode/README.org
@@ -0,0 +1,18 @@
+* lua-mode
+
+  Evil bindings for [[https://github.com/immerrr/lua-mode][lua-mode]].
+
+** Key bindings
+
+   | Command                    | Original  | Evil |
+   |----------------------------+-----------+------|
+   | =lua-search-documentation= | =C-c C-f= | =K=  |
+   | =run-lua=                  |           | =gz= |
+
+   Also installs a hook that sets =evil-shift-width= to =lua-indent-level=
+   in =lua-mode= buffers.
+
+** New commands
+
+   - =evil-collection-lua-mode-set-evil-shift-width= — sync
+     =evil-shift-width= with =lua-indent-level= (added to =lua-mode-hook=).
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lua-mode/evil-collection-lua-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lua-mode/evil-collection-lua-mode.el
new file mode 100644
index 0000000..eff100b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lua-mode/evil-collection-lua-mode.el
@@ -0,0 +1,50 @@
+;;; evil-collection-lua-mode.el --- Bindings for `lua-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `lua-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'lua-mode nil t)
+
+(defvar lua-indent-level)
+(defconst evil-collection-lua-mode-maps '(lua-mode-map))
+
+(defun evil-collection-lua-mode-set-evil-shift-width ()
+  "Set `evil-shift-width' according to `lua-indent-level'."
+  (setq-local evil-shift-width lua-indent-level))
+
+;;;###autoload
+(defun evil-collection-lua-mode-setup ()
+  "Set up `evil' bindings for `lua-mode'."
+  (add-hook 'lua-mode-hook #'evil-collection-lua-mode-set-evil-shift-width)
+
+  (evil-collection-bind 'lua-mode-map
+                        'lookup-doc 'lua-search-documentation
+                        'goto-repl 'run-lua))
+
+(provide 'evil-collection-lua-mode)
+;;; evil-collection-lua-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lua-mode/evil-collection-lua-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lua-mode/evil-collection-lua-mode.elc
new file mode 100644
index 0000000..0ea3ca4
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/lua-mode/evil-collection-lua-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/macrostep/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/macrostep/README.org
new file mode 100644
index 0000000..0a0f543
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/macrostep/README.org
@@ -0,0 +1,13 @@
+* macrostep
+
+  Evil bindings for [[https://github.com/emacsorphanage/macrostep][macrostep]], the interactive macro expander.
+
+** Key bindings
+
+   | Command                  | Original     | Evil        |
+   |--------------------------+--------------+-------------|
+   | =macrostep-expand=       | =e=          | =e=         |
+   | =macrostep-collapse=     | =c=          | =u=         |
+   | =macrostep-collapse-all= | =C-c C-c=    | =q=         |
+   | =macrostep-next-macro=   | =n=, =TAB=   | =gj=, =C-j= |
+   | =macrostep-prev-macro=   | =p=, =M-TAB= | =gk=, =C-k= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/macrostep/evil-collection-macrostep.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/macrostep/evil-collection-macrostep.el
new file mode 100644
index 0000000..7470544
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/macrostep/evil-collection-macrostep.el
@@ -0,0 +1,53 @@
+;;; evil-collection-macrostep.el --- Evil Integration for Macrostep -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, macrostep, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `macrostep-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'macrostep nil t)
+
+(defconst evil-collection-macrostep-maps '(macrostep-keymap))
+
+;;;###autoload
+(defun evil-collection-macrostep-setup ()
+  "Set up `evil' bindings for `macrostep'."
+  ;; Keymaps don't seem to be populated on first try.
+  ;; Force `evil' to normalize keymaps.
+  (add-hook 'macrostep-mode-hook #'evil-normalize-keymaps)
+
+  (evil-collection-define-key 'normal 'macrostep-keymap
+    "e" 'macrostep-expand
+    "u" 'macrostep-collapse)
+  (evil-collection-bind 'macrostep-keymap
+                        'next-item 'macrostep-next-macro
+                        'prev-item 'macrostep-prev-macro
+                        'next-section 'macrostep-next-macro
+                        'prev-section 'macrostep-prev-macro
+                        'quit 'macrostep-collapse-all))
+
+(provide 'evil-collection-macrostep)
+;;; evil-collection-macrostep.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/macrostep/evil-collection-macrostep.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/macrostep/evil-collection-macrostep.elc
new file mode 100644
index 0000000..f487b74
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/macrostep/evil-collection-macrostep.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-repos/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-repos/README.org
new file mode 100644
index 0000000..babd311
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-repos/README.org
@@ -0,0 +1,17 @@
+* magit-repos
+
+  Evil bindings for [[https://magit.vc/][magit-repos]] (=magit-list-repositories=).
+
+  Initial state for =magit-repolist-mode= is set to =normal=.
+
+** Key bindings
+
+*** magit-repolist-mode-map (normal state)
+
+    | Command                   | Original | Evil  |
+    |---------------------------+----------+-------|
+    | =magit-repolist-mark=     | =m=      | =m=   |
+    | =magit-repolist-unmark=   | =u=      | =u=   |
+    | =magit-repolist-fetch=    | =f=      | =f=   |
+    | =magit-repolist-status=   | =RET=    | =RET= |
+    | =magit-list-repositories= | =g=      | =gr=  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-repos/evil-collection-magit-repos.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-repos/evil-collection-magit-repos.el
new file mode 100644
index 0000000..df43b26
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-repos/evil-collection-magit-repos.el
@@ -0,0 +1,50 @@
+;;; evil-collection-magit-repos.el --- Bindings for magit-repos -*- lexical-binding: t -*-
+
+;; Copyright (C) 2015-2016, 2021 Justin Burkett
+
+;; Author: Justin Burkett <justin@burkett.cc>
+;; Maintainer: Justin Burkett <justin@burkett.cc>
+;; James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; Package-Requires: ((emacs "29.1") (evil "1.2.3") (magit "2.6.0"))
+;; Homepage: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for magit-repos.
+
+;;; Code:
+(require 'evil-collection)
+(require 'magit-repos nil t)
+
+(defvar magit-repolist-mode-map)
+(defconst evil-collection-magit-repos-maps '(magit-repolist-mode-map))
+
+;;;###autoload
+(defun evil-collection-magit-repos-setup ()
+  "Set up `evil' bindings for `magit-repos'."
+  (evil-set-initial-state 'magit-repolist-mode 'normal)
+  (evil-collection-define-key 'normal 'magit-repolist-mode-map
+    "f" 'magit-repolist-fetch)
+  (evil-collection-bind 'magit-repolist-mode-map
+                        'mark 'magit-repolist-mark
+                        'unmark 'magit-repolist-unmark
+                        'action 'magit-repolist-status
+                        'refresh 'magit-list-repositories)
+  (add-hook 'magit-repolist-mode-hook #'evil-normalize-keymaps))
+
+(provide 'evil-collection-magit-repos)
+;;; evil-collection-magit-repos.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-repos/evil-collection-magit-repos.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-repos/evil-collection-magit-repos.elc
new file mode 100644
index 0000000..5f88ce3
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-repos/evil-collection-magit-repos.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-section/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-section/README.org
new file mode 100644
index 0000000..807238d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-section/README.org
@@ -0,0 +1,47 @@
+* magit-section
+
+  Evil bindings for [[https://github.com/magit/magit][magit-section]], the foldable section UI used by magit, forge,
+  and several other packages.
+
+** Key bindings
+
+   | Command                          | Original  | Evil      |
+   |----------------------------------+-----------+-----------|
+   | =magit-section-toggle=           | =TAB=     | =TAB=     |
+   | =magit-section-cycle=            | =C-<tab>= | =C-<tab>= |
+   | =magit-section-cycle=            | =M-<tab>= | =M-<tab>= |
+   | =magit-section-cycle-global=     | =backtab= | =backtab= |
+   | =magit-section-up=               | =^=       | =gh=      |
+   | =magit-section-backward=         | =p=       | =C-k=     |
+   | =magit-section-forward=          | =n=       | =C-j=     |
+   | =magit-section-backward-sibling= | =M-p=     | =gk=, =[= |
+   | =magit-section-forward-sibling=  | =M-n=     | =gj=, =]= |
+   | =magit-section-show-level-1=     | =1=       | =1=       |
+   | =magit-section-show-level-2=     | =2=       | =2=       |
+   | =magit-section-show-level-3=     | =3=       | =3=       |
+   | =magit-section-show-level-4=     | =4=       | =4=       |
+   | =magit-section-show-level-1-all= | =M-1=     | =M-1=     |
+   | =magit-section-show-level-2-all= | =M-2=     | =M-2=     |
+   | =magit-section-show-level-3-all= | =M-3=     | =M-3=     |
+   | =magit-section-show-level-4-all= | =M-4=     | =M-4=     |
+
+   When =evil-collection-magit-section-use-z-for-folds= is non-nil, the
+   following vim-style fold bindings replace the =M-<digit>= variants:
+
+   | Command                          | Evil |
+   |----------------------------------+------|
+   | =magit-section-show-level-1-all= | =z1= |
+   | =magit-section-show-level-2-all= | =z2= |
+   | =magit-section-show-level-3-all= | =z3= |
+   | =magit-section-show-level-4-all= | =z4= |
+   | =magit-section-show-level-4-all= | =zr= |
+   | =magit-section-toggle=           | =za= |
+   | =magit-section-show=             | =zo= |
+   | =magit-section-show-children=    | =zO= |
+   | =magit-section-hide=             | =zc= |
+   | =magit-section-hide-children=    | =zC= |
+
+** Customization
+
+   - =evil-collection-magit-section-use-z-for-folds= - When non-nil, use =z= as
+     a prefix for vim-style fold commands. The stash popup then moves to =Z=.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-section/evil-collection-magit-section.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-section/evil-collection-magit-section.el
new file mode 100644
index 0000000..45f8fcd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-section/evil-collection-magit-section.el
@@ -0,0 +1,97 @@
+;;; evil-collection-magit-section.el --- Bindings for magit-section -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.2
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for magit-section.
+
+;;; Code:
+(require 'evil-collection)
+(require 'magit-section nil t)
+
+(defvar magit-section-mode-map)
+(defconst evil-collection-magit-section-maps '(magit-section-mode-map))
+
+(defcustom evil-collection-magit-section-use-z-for-folds nil
+  "When non nil, use \"z\" as a prefix for common vim fold commands, such as
+  - z1 Reset visibility to level 1 for all sections
+  - z2 Reset visibility to level 2 for all sections
+  - z3 Reset visibility to level 3 for all sections
+  - z4 Reset visibility to level 4 for all sections
+  - za Toggle a section
+  - zo Show section
+  - zO Show sections recursively
+  - zc Hide section
+  - zC Hide sections recursively
+  - zr Same as z4.
+
+When this option is enabled, the stash popup is available on \"Z\"."
+  :group 'magit
+  :type  'boolean)
+
+(defun evil-collection-magit-section-setup ()
+  "Set up `evil' bindings for magit-section."
+  (if evil-collection-magit-section-use-z-for-folds
+      (evil-collection-define-key 'normal 'magit-section-mode-map
+        "z1" 'magit-section-show-level-1-all
+        "z2" 'magit-section-show-level-2-all
+        "z3" 'magit-section-show-level-3-all
+        "z4" 'magit-section-show-level-4-all
+        "za" 'magit-section-toggle
+        "zc" 'magit-section-hide
+        "zC" 'magit-section-hide-children
+        "zo" 'magit-section-show
+        "zO" 'magit-section-show-children
+        "zr" 'magit-section-show-level-4-all)
+    (evil-collection-define-key 'normal 'magit-section-mode-map
+      (kbd "M-1") 'magit-section-show-level-1-all
+      (kbd "M-2") 'magit-section-show-level-2-all
+      (kbd "M-3") 'magit-section-show-level-3-all
+      (kbd "M-4") 'magit-section-show-level-4-all))
+
+  (evil-collection-define-key 'normal 'magit-section-mode-map
+    [C-tab]     'magit-section-cycle
+    [M-tab]     'magit-section-cycle
+    "gh" 'magit-section-up
+    (kbd "1") 'magit-section-show-level-1
+    (kbd "2") 'magit-section-show-level-2
+    (kbd "3") 'magit-section-show-level-3
+    (kbd "4") 'magit-section-show-level-4)
+  (if evil-collection-want-unimpaired-p
+      (progn
+        (evil-collection-bind 'magit-section-mode-map
+                              'next-section 'magit-section-forward-sibling
+                              'prev-section 'magit-section-backward-sibling))
+    (evil-collection-define-key 'normal 'magit-section-mode-map
+      "[" 'magit-section-backward-sibling
+      "]" 'magit-section-forward-sibling))
+  (evil-collection-bind 'magit-section-mode-map
+                        'next-item 'magit-section-forward-sibling
+                        'prev-item 'magit-section-backward-sibling
+                        'next-section-2 'magit-section-forward
+                        'prev-section-2 'magit-section-backward
+                        'section-toggle 'magit-section-toggle
+                        'section-toggle-all 'magit-section-cycle-global))
+
+(provide 'evil-collection-magit-section)
+;;; evil-collection-magit-section.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-section/evil-collection-magit-section.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-section/evil-collection-magit-section.elc
new file mode 100644
index 0000000..7221d10
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-section/evil-collection-magit-section.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-todos/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-todos/README.org
new file mode 100644
index 0000000..17a94d1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-todos/README.org
@@ -0,0 +1,32 @@
+* magit-todos
+
+  Evil bindings for [[https://github.com/alphapapa/magit-todos][magit-todos]].
+
+  Setup clears =j= and =k= on the todos section maps (older =magit-todos=
+  versions bound them, blocking evil's vertical motion through todos
+  sections) and adds a jump key on =magit-status=.
+
+** Key bindings
+
+*** magit-todos-section-map / magit-todos-item-section-map
+
+    | Key | Original                           | Evil    |
+    |-----+------------------------------------+---------|
+    | =j= | =magit-todos-...= (older versions) | unbound |
+    | =k= | =magit-todos-...= (older versions) | unbound |
+
+    The current upstream uses =B= / =b= on these maps (branch list set
+    commit / toggle); those are untouched.
+
+*** magit-status-mode-map (normal state)
+
+    | Command                     | Original | Evil |
+    |-----------------------------+----------+------|
+    | =magit-todos-jump-to-todos= | =j T=    | =gT= |
+
+    Bound only when =magit-todos-mode= is enabled.
+
+** Notes
+
+   =magit-todos-mode= emits a warning about the =jT= key when these
+   rebindings take effect. Setup advises the mode to silence that warning.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-todos/evil-collection-magit-todos.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-todos/evil-collection-magit-todos.el
new file mode 100644
index 0000000..1f01d4d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-todos/evil-collection-magit-todos.el
@@ -0,0 +1,62 @@
+;;; evil-collection-magit-todos.el --- Bindings for `magit-todos' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 James Nguyen
+
+;; Author: Fredrik Bergroth <fbergroth@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `magit-todos'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'magit-todos nil t)
+
+(defconst evil-collection-magit-todos-maps '(magit-todos-section-map
+                                             magit-todos-item-section-map
+                                             magit-status-mode-map))
+
+(defun evil-collection-magit-todos-setup-jump-key ()
+  "Add keybinding to jump to todos section."
+  (evil-collection-define-key 'normal 'magit-status-mode-map
+    "gT" (and (bound-and-true-p magit-todos-mode) 'magit-todos-jump-to-todos)))
+
+(defun evil-collection-magit-todos-supress-warning (func &rest args)
+  "Supress the jT keybinding warning."
+  (cl-letf* (((symbol-function 'message) #'ignore))
+    (apply func args)))
+
+;;;###autoload
+(defun evil-collection-magit-todos-setup ()
+  "Set up `evil' bindings for `magit-todos'."
+  ;; magit-todos binds jT and k which prevents evil users from stepping into the section
+  (dolist (key '("j" "k"))
+    (evil-collection-define-key nil 'magit-todos-section-map key nil)
+    (evil-collection-define-key nil 'magit-todos-item-section-map key nil))
+
+  ;; No need to tell me that jT isn't bound
+  (advice-add 'magit-todos-mode :around #'evil-collection-magit-todos-supress-warning)
+
+  (add-hook 'magit-todos-mode-hook #'evil-collection-magit-todos-setup-jump-key))
+
+
+(provide 'evil-collection-magit-todos)
+;;; evil-collection-magit-todos.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-todos/evil-collection-magit-todos.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-todos/evil-collection-magit-todos.elc
new file mode 100644
index 0000000..53440e6
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit-todos/evil-collection-magit-todos.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit/README.org
new file mode 100644
index 0000000..c20db58
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit/README.org
@@ -0,0 +1,212 @@
+* Black magic
+
+  This library configures Magit and Evil to play well with each other. For some
+  background see [[https://github.com/justbur/evil-magit/issues/1][Issue #1]].
+
+  *Note*: I intend to track the latest commits to the master branch of the [[https://github.com/magit/magit][magit
+  repo]], meaning the keybindings here are potentially ahead of the last stable
+  release of magit. Once the code in evil-collection-magit stabilizes, I may switch to
+  primarily tracking the stable release of magit and secondarily track the latest
+  commits to master. Any help is welcomed.
+
+* Recent Changes (most recent first)
+
+  1. [2019-09-04] Don't use =evil-next-visual-line= and
+     =evil=previous-visual-line=. See [[https://github.com/emacs-evil/evil-magit/issues/70][Issue #70]].
+  1. [2019-06-16] Added =evil-collection-magit-stage-untracked-file-with-intent= at
+     =I=. See [[https://github.com/emacs-evil/evil-magit/issues/67][Issue #67]].
+  2. [2019-02-15] Added =forge-dispatch= at =@=.
+  3. [2018-05-22] Added =evil-collection-magit-use-z-for-folds=. See docstring for more
+     information.
+  4. [2018-03-13] Added basic evil support for =magit-list-repositories=.
+  5. [2016-07-27] Moved submodules popup to ' and added the new subtree popup at
+     ". This is not mnemonic in any way but easy to reach and keeps the two keys
+     together.
+  6. [2016-03-24] Moved =magit-diff-less-context= to = to fix conflict with
+     moved revert.
+  7. [2016-03-21] Moved revert commands from =o= and =O= to =-= and
+     =_=. Rationale is that you are subtracting a commit. This makes room for
+     =o= and =O= to be reset and the new reset popup command. Think of resetting
+     to an "old" state. =¯\_(ツ)_/¯=
+  8. Added =evil-collection-magit-want-horizontal-movement=. Use =h= and =l= for movement
+     like vim, moving =h= to =H=, =l= to =L=, and =L= to =C-l=.
+  9. Added =evil-collection-magit-toggle-text-mode= on =C-t=. This is a quick way to enter
+     text mode in a magit buffer, which allows arbitrary movement, copying, etc.
+     Use =C-t= to return to the previous magit mode.
+  10. When =evil-collection-magit-use-y-for-yank= is non nil, =C-w= will prefix the evil
+      window switching functions from magit buffers.
+  11. =evil-collection-magit-use-y-for-yank= is now the default. It has worked well for me so
+      far, and I've had good feedback, but please let me know if you see issues.
+      You can use the original behavior with =(setq evil-collection-magit-use-y-for-yank
+      nil)=. See the table below for a summary of differences.
+
+
+* Installation and Use
+
+  Evil and Magit are both required. After requiring those packages, the following
+  will setup the new key bindings for you.
+
+  #+BEGIN_SRC emacs-lisp
+  ;; optional: this is the evil state that evil-collection-magit will use
+  ;; (setq evil-collection-magit-state 'normal)
+  ;; optional: disable additional bindings for yanking text
+  ;; (setq evil-collection-magit-use-y-for-yank nil)
+  (evil-collection-init)
+  #+END_SRC emacs-lisp
+
+** Note on Evil usage
+
+   This package assumes that you either use the global variant of evil mode (e.g.,
+   through =(evil-mode 1)=), or at least have =evil-local-mode= (the local variant)
+   enabled in the magit buffers you want these bindings to take effect in. When
+   evil is disabled in a magit buffer, this package will not affect the default key
+   bindings (with one minor exception).
+
+** Note on =evil-collection-magit-use-y-for-yank=
+
+   =evil-collection-magit-use-y-for-yank= enables evil's visual state for linewise selection,
+   and as a consequnce =y= will yank text from the buffer.
+
+   With this enabled which it is by default evil-collection-magit uses =v= and =V= to select
+   by line. Selection in magit occurs linewise, so this choice is to avoid
+   confusion that might arise if someone thought they could stage part of a line
+   with =v= for example.
+
+** Text mode
+
+   Text mode can be toggled with =evil-collection-magit-toggle-text-mode= (triggered with
+   =C-t= or =\=). This takes nearly any magit buffer out of the related magit mode
+   and puts it into =text-mode=. This allows free movement in the buffer using the
+   standard evil movement and selection commands, making it easy to for example
+   copy arbitrary text in the buffer. It also effectively prevents magit keys from
+   shadowing evil ones, so =f= runs =evil-find-char= instead of
+   =magit-fetch-popup=, allowing all vim related movement commands to be used in
+   magit buffers. You can think of this if you like as another state for evil-collection-magit
+   to be in.
+
+   Several requests have been made to allow selecting and copying arbitrary text in
+   the magit buffers, but there are many conflicts between evil bindings and magit
+   bindings and there is no elegant solution to this problem in my opinion. Text
+   mode is the best that I have come up with.
+
+* Key Bindings
+
+  The basic key binding scheme for evil-collection-magit (EM) is described in the following
+  tables. Blank columns indicate that the key is carried over from the left.
+
+  | Category               | Default | EM w/o yank opt        | w/ yank opt (default) | w/ horiz move | w/ folds |
+  |------------------------+---------+------------------------+-----------------------+---------------+----------|
+  | cherry pick            | =a/A=   |                        |                       |               |          |
+  | branch                 | =b=     |                        |                       |               |          |
+  | bisect                 | =B=     |                        |                       |               |          |
+  | commit                 | =c=     |                        |                       |               |          |
+  | diff                   | =d/D=   |                        |                       |               |          |
+  | ediff                  | =e/E=   |                        |                       |               |          |
+  | fetch                  | =f=     |                        |                       |               |          |
+  | pull                   | =F=     |                        |                       |               |          |
+  | refresh                | =g=     | =gr/gR= (=g= in popup) |                       |               |          |
+  | help                   | =h/?=   |                        |                       | =H/?=         |          |
+  | ignore                 | =i/I=   |                        |                       |               |          |
+  | intent to stage        | =I=     |                        |                       |               |          |
+  | jump                   | =j=     | =g=                    |                       |               |          |
+  | delete                 | =k=     | =x=                    |                       |               |          |
+  | untrack                | =K=     | =X=                    |                       |               |          |
+  | log                    | =l/L=   |                        |                       | =L/C-l=       |          |
+  | merge                  | =m=     |                        |                       |               |          |
+  | remote                 | =M=     |                        |                       |               |          |
+  | next section           | =n=     | =C-j=                  |                       |               |          |
+  | next section sibling   | =M-n=   | =M-j=, =gj=, or =]=    |                       |               |          |
+  | submodule              | =o=     | '                      |                       |               |          |
+  | subtree                | =O=     | "                      |                       |               |          |
+  | prev section           | =p=     | =C-k=                  |                       |               |          |
+  | prev section sibling   | =M-p=   | =M-k=, =gk=, or =[=    |                       |               |          |
+  | push                   | =P=     | =P= or =p=             |                       |               |          |
+  | quit                   | =q=     | =q= or =ESC=           |                       |               |          |
+  | rebase                 | =r=     |                        |                       |               |          |
+  | rename                 | =R=     |                        |                       |               |          |
+  | stage                  | =s/S=   |                        |                       |               |          |
+  | tag                    | =t=     |                        |                       |               |          |
+  | notes                  | =T=     |                        |                       |               |          |
+  | unstage                | =u/U=   |                        |                       |               |          |
+  | revert                 | =v/V=   | =-/_=                  |                       |               |          |
+  | am                     | =w=     |                        |                       |               |          |
+  | patch                  | =W=     |                        |                       |               |          |
+  | reset                  | =x/X=   | =o/O=                  |                       |               |          |
+  | show-refs              | =y=     |                        | =yr= (=y= in popup)   |               |          |
+  | cherry                 | =Y=     |                        |                       |               |          |
+  | worktree               | =Z/%=   |                        |                       |               | =%=      |
+  | stash                  | =z/Z=   |                        |                       |               | =Z=      |
+  | git-cmd                | =:=     | =¦=                    |                       |               |          |
+  | run                    | =!=     |                        |                       |               |          |
+  | forge                  | =@=     |                        |                       |               |          |
+  | diff less/more context | =-/+=   | = / +                  |                       |               |          |
+  | copy section info      | =C-w=   |                        | =ys=                  |               |          |
+  | copy buffer info       | =M-w=   |                        | =yb=                  |               |          |
+
+** New Commands
+
+   | Command                                | EM w/o yank opt          | EM w/ yank opt (default) | w/ horiz move |
+   |----------------------------------------+--------------------------+--------------------------+---------------|
+   | evil-goto-line                         | =G=                      |                          |               |
+   | evil-next-visual-line                  | =j=                      |                          |               |
+   | evil-previous-visual-line              | =k=                      |                          |               |
+   | evil-backward-char                     | under =M-x=              |                          | =h=           |
+   | evil-forward-char                      | under =M-x=              |                          | =l=           |
+   | evil-search-next                       | =n=                      |                          |               |
+   | evil-search-previous                   | =N=                      |                          |               |
+   | set-mark-command                       | =v= or =V=               | =C-SPC=                  |               |
+   | evil-visual-line                       | under =M-x=              | =v= or =V=               |               |
+   | evil-ex                                | =:=                      |                          |               |
+   | evil-search-forward                    | =/=                      |                          |               |
+   | evil-scroll-page-up                    | =C-b=                    |                          |               |
+   | evil-scroll-down                       | =C-d=                    |                          |               |
+   | evil-scroll-page-down                  | =C-f=                    |                          |               |
+   | evil-scroll-up                         | =C-u= (if =C-u= scrolls) |                          |               |
+   | evil-emacs-state                       | =C-z=                    |                          |               |
+   | evil-yank-line                         | under =M-x=              | =yy=                     |               |
+   | evil-window-map                        | under =M-x=              | =C-w=                    |               |
+   | evil-collection-magit-toggle-text-mode | =C-t/\=                  |                          |               |
+
+
+   Any other bindings are meant to be consistent with these.
+
+   Use =evil-collection-magit-revert= to revert changes made by evil-collection-magit to the default
+   evil+magit behavior.
+
+** To add other common evil commands
+
+   Some may want =?= to search backward instead of launching the popup which is
+   also bound to =h=. To get this behavior, add the following line after
+   =(evil-collection-init)= in your configuration.
+
+   #+BEGIN_SRC emacs-lisp
+(evil-define-key evil-collection-magit-state magit-mode-map "?" 'evil-search-backward)
+   #+END_SRC
+
+   Most (but not all) magit bindings are in =magit-mode-map=, so other commands can
+   be bound in this way too.
+
+** To remove commands
+
+   Typically, to prevent evil-collection-magit from overriding the default behavior with evil
+   and magit loaded, you should bind the respective key to =nil= after loading
+   evil-collection-magit. For example, to make =escape= behave as default:
+
+   #+BEGIN_SRC emacs-lisp
+(evil-define-key* evil-collection-magit-state magit-mode-map [escape] nil)
+   #+END_SRC
+
+* Known Conflicts
+
+  These are the third-party packages that conflict with these bindings and will
+  probably need to be disabled in magit buffers for evil-collection-magit to work properly.
+
+  1. [[https://github.com/hlissner/evil-snipe][evil-snipe]]
+  2. [[https://github.com/syl20bnr/evil-escape][evil-escape]] with [[https://github.com/justbur/evil-magit/issues/4][certain escape sequences]]
+
+* Disclaimer
+
+  Given the complexity of magit key bindings combined with the complexity of git
+  itself, it is possible that there are some rough edges where the current binding
+  is not the expected one in a buffer. It will be very helpful for you to report
+  any such instances.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit/evil-collection-magit.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit/evil-collection-magit.el
new file mode 100644
index 0000000..4dc35b0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit/evil-collection-magit.el
@@ -0,0 +1,751 @@
+;;; evil-collection-magit.el --- Evil-based key bindings for magit  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2015-2016, 2021 Justin Burkett
+
+;; Author: Justin Burkett <justin@burkett.cc>
+;; Maintainer: Justin Burkett <justin@burkett.cc>
+;; James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; Package-Requires: ((emacs "29.1") (evil "1.2.3") (magit "2.6.0"))
+;; Homepage: https://github.com/emacs-evil/evil-collection
+;; Version: 0.4.1
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library configures Magit and Evil to play well with each
+;; other. For some background see https://github.com/magit/evil-magit/issues/1.
+
+;; See the README at
+;; https://github.com/emacs-evil/evil-collection/tree/master/modes/magit
+;; for a table describing the key binding changes.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'magit nil t)
+
+(defvar magit-blame-mode-map)
+(defvar magit-blame-read-only-mode-map)
+(defvar magit-blob-mode-map)
+(defvar magit-cherry-mode-map)
+(defvar magit-diff-mode-map)
+(defvar magit-file-section-map)
+(defvar magit-hunk-section-map)
+(defvar magit-log-mode-map)
+(defvar magit-log-read-revs-map)
+(defvar magit-log-select-mode-map)
+(defvar magit-process-mode-map)
+(defvar magit-reflog-mode-map)
+(defvar magit-refs-mode-map)
+(defvar magit-status-mode-map)
+(defvar magit-submodule-list-mode-map)
+
+(defconst evil-collection-magit-maps
+  '(evil-collection-magit-toggle-text-minor-mode-map
+    magit-log-mode-map ; -> parent: `magit-mode-map'
+    magit-status-mode-map ; -> parent: `magit-mode-map'
+    magit-blame-mode-map
+    magit-blame-read-only-mode-map
+    magit-blob-mode-map
+    magit-submodule-list-mode-map ; -> parent: `magit-repolist-mode-map'
+    magit-mode-map))
+
+(defcustom evil-collection-magit-use-y-for-yank t
+  "When non nil (Default is t),
+replace \"y\" for `magit-show-refs' with
+\"yy\" for `evil-collection-magit-yank-whole-line',
+\"ys\" for `magit-copy-section-value',
+\"yb\" for `magit-copy-buffer-revision' and
+\"yr\" for `magit-show-refs'.
+This keeps \"y\" for `magit-show-refs',
+in the help popup (`magit-dispatch')."
+  :group 'magit
+  :type 'boolean)
+
+(defcustom evil-collection-magit-want-horizontal-movement nil
+  "When non nil, use \"h\" and \"l\" for horizontal movement in
+most magit buffers. The old \"h\" for help is moved to \"H\" and
+similarly for the old \"l\" for the log popup. The old \"L\" is
+then put on \"C-l\"."
+  :group 'magit
+  :type  'boolean)
+
+(defcustom evil-collection-magit-use-z-for-folds nil
+  "When non nil, use \"z\" as a prefix for common vim fold commands, such as
+  - z1 Reset visibility to level 1 for all sections
+  - z2 Reset visibility to level 2 for all sections
+  - z3 Reset visibility to level 3 for all sections
+  - z4 Reset visibility to level 4 for all sections
+  - za Toggle a section
+  - zo Show section
+  - zO Show sections recursively
+  - zc Hide section
+  - zC Hide sections recursively
+  - zr Same as z4.
+
+When this option is enabled, the stash popup is available on \"Z\"."
+  :group 'magit
+  :type  'boolean)
+
+(defcustom evil-collection-magit-use-v-for-visual-line nil
+  "When non nil, use \"v\" for `evil-visual-line' (old behavior).
+When nil (default), \"v\" uses `evil-visual-char'."
+  :group 'magit
+  :type 'boolean)
+
+(defcustom evil-collection-magit-use-$-for-end-of-line t
+  "When non nil, use \"$\" for `evil-end-of-line'.
+
+Move `magit-process-buffer' to \"`\"."
+  :group 'magit
+  :type 'boolean)
+
+(defcustom evil-collection-magit-use-0-for-beginning-of-line t
+  "When non nil, use \"0\" for `evil-beginning-of-line'.
+
+Move `magit-diff-default-context' to \"~\"."
+  :group 'magit
+  :type 'boolean)
+
+(defcustom evil-collection-magit-state (if evil-collection-magit-use-y-for-yank 'normal 'motion)
+  "State to use for most magit buffers."
+  :group 'magit
+  :type  'symbol)
+
+;; without this set-mark-command activates visual-state which is just annoying
+;; and introduces possible bugs
+(defun evil-collection-magit-remove-visual-activate-hook ()
+  (when (derived-mode-p 'magit-mode)
+    (remove-hook 'activate-mark-hook #'evil-visual-activate-hook t)))
+(add-hook 'evil-local-mode-hook #'evil-collection-magit-remove-visual-activate-hook)
+
+(defun evil-collection-magit-maybe-deactivate-mark ()
+  "Deactivate mark if region is active. Used for ESC binding."
+  (interactive)
+  (when (region-active-p) (deactivate-mark)))
+
+(defvar evil-collection-magit-emacs-to-default-state-modes
+  '(git-commit-mode)
+  "Modes that should be in the default evil state.")
+
+(defvar evil-collection-magit-emacs-to-evil-collection-magit-state-modes
+  '(git-rebase-mode
+    magit-mode
+    magit-cherry-mode
+    magit-diff-mode
+    magit-log-mode
+    magit-log-select-mode
+    magit-process-mode
+    magit-reflog-mode
+    magit-refs-mode
+    magit-revision-mode
+    magit-stash-mode
+    magit-stashes-mode
+    magit-status-mode)
+  "Modes that switch from Emacs state to `evil-collection-magit-state'.")
+
+(defvar evil-collection-magit-default-to-evil-collection-magit-state-modes
+  '(magit-blob-mode
+    magit-gitflow-mode)
+  "Modes that switch from default state to `evil-collection-magit-state'.")
+
+(defvar evil-collection-magit-untouched-modes
+  ;; TODO do something here
+  '(git-popup-mode
+    magit-blame-mode
+    magit-blame-read-only-mode)
+  "Modes whose evil states are unchanged.")
+
+(defvar evil-collection-magit-ignored-modes
+  '(git-commit-major-mode
+    magit-auto-revert-mode
+    magit-blame-put-keymap-before-view-mode
+    magit-diff-mode
+    magit-merge-preview-mode
+    transient-resume-mode
+    magit-rebase-mode
+    magit-wip-after-save-mode
+    magit-wip-after-save-local-mode-major-mode
+    magit-wip-after-save-local-mode
+    magit-wip-after-apply-mode
+    magit-wip-before-change-mode
+    magit-wip-initial-backup-mode
+    magit-wip-mode
+    ;; gh
+    magit-gh-pulls-mode
+    ;; git-gutter
+    git-gutter-mode
+    git-gutter-mode-major-mode
+    git-gutter+-commit-mode
+    git-gutter+-mode
+    git-gutter+-enable-fringe-display-mode
+    git-gutter+-enable-default-display-mode)
+  "Currently ignored modes. They are collected here for testing purposes.")
+
+(defun evil-collection-magit-set-initial-states ()
+  "Set the initial state for relevant modes."
+  (dolist (mode (append evil-collection-magit-emacs-to-evil-collection-magit-state-modes
+                        evil-collection-magit-default-to-evil-collection-magit-state-modes))
+    (evil-set-initial-state mode evil-collection-magit-state))
+  (dolist (mode evil-collection-magit-emacs-to-default-state-modes)
+    (evil-set-initial-state mode evil-default-state)))
+
+(defun evil-collection-magit-revert-initial-states ()
+  "Revert the initial state for modes to their values before
+evil-collection-magit was loaded."
+  (dolist (mode (append evil-collection-magit-emacs-to-evil-collection-magit-state-modes
+                        evil-collection-magit-emacs-to-default-state-modes))
+    (evil-set-initial-state mode 'emacs))
+  (dolist (mode evil-collection-magit-default-to-evil-collection-magit-state-modes)
+    (evil-set-initial-state mode evil-default-state)))
+
+(defvar evil-collection-magit-section-maps
+  '(magit-branch-section-map
+    magit-commit-section-map
+    magit-commit-message-section-map
+    magit-error-section-map
+    magit-file-section-map
+    magit-hunk-section-map
+    magit-module-commit-section-map
+    magit-remote-section-map
+    magit-staged-section-map
+    magit-stash-section-map
+    magit-stashes-section-map
+    magit-tag-section-map
+    magit-unpulled-section-map
+    magit-unpushed-section-map
+    magit-unstaged-section-map
+    magit-untracked-section-map
+
+    ;; new ones that I haven't looked at yet
+    magit-button-section-map
+    magit-commitbuf-section-map
+    magit-diff-section-map
+    magit-diffbuf-section-map
+    magit-diffstat-section-map
+    magit-headers-section-map
+    magit-log-section-map
+    magit-message-section-map
+    ;; FIXME: deal with new bindings in this one
+    magit-module-section-map
+    magit-modules-section-map
+    magit-processbuf-section-map
+    magit-process-section-map
+    magit-pulls-section-map
+    magit-unmerged-section-map
+    magit-status-section-map
+    magit-worktree-section-map)
+  "All magit section maps. For testing purposes only at the moment.")
+
+;; Old way of excluding newlines
+;; (when evil-collection-magit-use-y-for-yank
+;;   (dolist (map evil-collection-magit-section-maps)
+;;     (when (and map (keymapp (symbol-value map)))
+;;       (map-keymap
+;;        (lambda (_ def)
+;;          (when (commandp def)
+;;            (evil-set-command-property def :exclude-newline t)))
+;;        (symbol-value map)))))
+
+(defvar evil-collection-magit-in-visual-pre-command)
+
+(defun evil-collection-magit--around-visual-pre-command (orig-func &rest args)
+  (let ((evil-collection-magit-in-visual-pre-command t))
+    (apply orig-func args)))
+
+(defun evil-collection-magit--filter-args-visual-expand-region (arglist)
+  ;; pretend that the command has the :exclude-newline property by rewriting the
+  ;; EXCLUDE-NEWLINE arg to this function
+  (cons (or (car arglist)
+            (and (bound-and-true-p evil-collection-magit-in-visual-pre-command)
+                 (eq (evil-visual-type) 'line)
+                 (derived-mode-p 'magit-mode)))
+        ;; shouldn't be necessary, but this will prevent it from failing if an
+        ;; arg is added.
+        (cdr arglist)))
+
+(when (and (fboundp 'advice-add) evil-collection-magit-use-y-for-yank)
+  (advice-add 'evil-visual-pre-command
+              :around #'evil-collection-magit--around-visual-pre-command)
+  (advice-add 'evil-visual-expand-region
+              :filter-args #'evil-collection-magit--filter-args-visual-expand-region))
+
+;; keep visual state for magit-section movement commands
+(dolist (cmd '(magit-section-forward-sibling
+               magit-section-forward
+               magit-section-backward-sibling
+               magit-section-backward
+               magit-section-up))
+  (evil-set-command-property cmd :keep-visual t))
+
+(defvar evil-collection-magit-mode-map-bindings
+  (let ((states (if evil-collection-magit-use-y-for-yank
+                    `(,evil-collection-magit-state visual)
+                  `(,evil-collection-magit-state))))
+    (append
+     `((,states magit-mode-map "g")
+       (,states magit-mode-map "\C-j"   magit-section-forward          "n")
+       (,states magit-mode-map "\M-j"  magit-section-forward-sibling  "M-n")
+       (,states magit-mode-map "gj"    magit-section-forward-sibling  "M-n")
+       (,states magit-mode-map "]"     magit-section-forward-sibling  "M-n")
+       (,states magit-mode-map "\C-k"   magit-section-backward         "p")
+       (,states magit-mode-map "\M-k"  magit-section-backward-sibling "M-p")
+       (,states magit-mode-map "gk"    magit-section-backward-sibling "M-p")
+       (,states magit-mode-map "["     magit-section-backward-sibling "M-p")
+       (,states magit-mode-map "gr"    magit-refresh                  "g")
+       (,states magit-mode-map "gR"    magit-refresh-all              "G")
+       (,states magit-mode-map "x"     magit-delete-thing             "k")
+       (,states magit-mode-map "X"     magit-file-untrack             "K")
+       (,states magit-mode-map "-"     magit-revert-no-commit         "v")
+       (,states magit-mode-map "_"     magit-revert                   "V")
+       (,states magit-mode-map "p"     magit-push                     "P")
+       (,states magit-mode-map "o"     magit-reset-quickly            "x")
+       (,states magit-mode-map "O"     magit-reset                    "X")
+       (,states magit-mode-map "|"     magit-git-command              ":")
+       (,states magit-mode-map "'"     magit-submodule                "o")
+       (,states magit-mode-map "\""    magit-subtree                  "O")
+       (,states magit-mode-map "="     magit-diff-less-context        "-")
+       (,states magit-mode-map "j"     evil-next-line)
+       (,states magit-mode-map "k"     evil-previous-line)
+       (,states magit-mode-map "gg"    evil-goto-first-line)
+       (,states magit-mode-map "G"     evil-goto-line)
+       (,states magit-mode-map "\C-d"   evil-scroll-down)
+       (,states magit-mode-map "\C-f"   evil-scroll-page-down)
+       (,states magit-mode-map "\C-b"   evil-scroll-page-up)
+       (,states magit-mode-map ":"     evil-ex)
+       (,states magit-mode-map "q"     magit-mode-bury-buffer)
+
+       ;; these are to fix the priority of the log mode map and the magit mode map
+       ;; FIXME: Conflict between this and revert. Revert seems more important here
+       ;; (,states magit-log-mode-map "-" magit-log-half-commit-limit    "-")
+       (,states magit-log-mode-map "=" magit-log-toggle-commit-limit  "=")
+
+       ;; https://github.com/emacs-evil/evil-collection/issues/406
+       ;; Use kbd here for S-SPC and S-DEL so evil-collection-define-key can
+       ;; parse definition correctly;.
+       (,states magit-mode-map ,(kbd "S-SPC") magit-diff-show-or-scroll-up   "SPC")
+       (,states magit-mode-map ,(kbd "S-DEL") magit-diff-show-or-scroll-down "DEL")
+
+       ((,evil-collection-magit-state) magit-mode-map ,(kbd evil-toggle-key) evil-emacs-state))
+
+     (if (eq evil-search-module 'evil-search)
+         `((,states magit-mode-map "/" evil-ex-search-forward)
+           (,states magit-mode-map "n" evil-ex-search-next)
+           (,states magit-mode-map "N" evil-ex-search-previous)
+           (,states magit-blame-read-only-mode-map "n" evil-ex-search-next)
+           (,states magit-blame-read-only-mode-map "N" evil-ex-search-previous))
+       `((,states magit-mode-map "/" evil-search-forward)
+         (,states magit-mode-map "n" evil-search-next)
+         (,states magit-mode-map "N" evil-search-previous)
+         (,states magit-blame-read-only-mode-map "n" evil-search-next)
+         (,states magit-blame-read-only-mode-map "N" evil-search-previous)))
+
+     `((,states magit-status-mode-map "gz"  magit-jump-to-stashes)
+       (,states magit-status-mode-map "gt"  magit-jump-to-tracked)
+       (,states magit-status-mode-map "gn"  magit-jump-to-untracked)
+       (,states magit-status-mode-map "gu"  magit-jump-to-unstaged)
+       (,states magit-status-mode-map "gs"  magit-jump-to-staged)
+       (,states magit-status-mode-map "gfu" magit-jump-to-unpulled-from-upstream)
+       (,states magit-status-mode-map "gfp" magit-jump-to-unpulled-from-pushremote)
+       (,states magit-status-mode-map "gpu" magit-jump-to-unpushed-to-upstream)
+       (,states magit-status-mode-map "gpp" magit-jump-to-unpushed-to-pushremote)
+       (,states magit-status-mode-map "gh"  magit-section-up                       "^")
+       (,states magit-diff-mode-map "gd" magit-jump-to-diffstat-or-diff "j")
+       ((visual) magit-diff-mode-map "y" magit-copy-section-value)
+       ;; NOTE This is now transient-map and the binding is C-g.
+       ;; ((emacs) magit-popup-mode-map "<escape>" "q")
+       )
+
+     (when evil-collection-magit-want-horizontal-movement
+       `((,states magit-mode-map "H"    magit-dispatch    "h")
+         (,states magit-mode-map "L"    magit-log         "l")
+         (,states magit-mode-map "\C-l"  magit-log-refresh "L")
+         (,states magit-mode-map "h"    evil-backward-char)
+         (,states magit-mode-map "l"    evil-forward-char)))
+
+     (when evil-want-C-u-scroll
+       `((,states magit-mode-map "\C-u" evil-scroll-up)))
+
+     (if evil-collection-magit-use-y-for-yank
+         `((,states magit-mode-map "v"    ,(if evil-collection-magit-use-v-for-visual-line
+                                              'evil-visual-line
+                                            'evil-visual-char))
+           (,states magit-mode-map "V"    evil-visual-line)
+           (,states magit-mode-map "\C-w"  evil-window-map)
+           (,states magit-mode-map "y")
+           (,states magit-mode-map "yy"   evil-collection-magit-yank-whole-line)
+           (,states magit-mode-map "yr"   magit-show-refs            "y")
+           (,states magit-mode-map "ys"   magit-copy-section-value   "C-w")
+           (,states magit-mode-map "yb"   magit-copy-buffer-revision "M-w")
+           ((visual) magit-mode-map "y"   magit-copy-section-value))
+       `((,states magit-mode-map "v" set-mark-command)
+         (,states magit-mode-map "V" set-mark-command)
+         (,states magit-mode-map ,(kbd "<escape>") evil-collection-magit-maybe-deactivate-mark)))
+
+     (when evil-collection-magit-use-$-for-end-of-line
+       `((,states magit-mode-map "$" evil-end-of-line)
+         (,states magit-mode-map "`" magit-process-buffer)))
+
+     (when evil-collection-magit-use-0-for-beginning-of-line
+       `((,states magit-mode-map "0" evil-beginning-of-line)
+         (,states magit-mode-map "~" magit-diff-default-context)))
+
+     (when evil-collection-magit-use-z-for-folds
+       `((,states magit-mode-map "Z"    magit-stash)
+         (,states magit-mode-map "z")
+         (,states magit-mode-map "z1"   magit-section-show-level-1-all)
+         (,states magit-mode-map "z2"   magit-section-show-level-2-all)
+         (,states magit-mode-map "z3"   magit-section-show-level-3-all)
+         (,states magit-mode-map "z4"   magit-section-show-level-4-all)
+         (,states magit-mode-map "za"   magit-section-toggle)
+         (,states magit-mode-map "zc"   magit-section-hide)
+         (,states magit-mode-map "zC"   magit-section-hide-children)
+         (,states magit-mode-map "zo"   magit-section-show)
+         (,states magit-mode-map "zO"   magit-section-show-children)
+         (,states magit-mode-map "zr"   magit-section-show-level-4-all)))))
+  "evil-collection-magit bindings for major modes. Each element of this list
+takes the form
+
+\(EVIL-STATE MAGIT-MAP NEW-KEY DEF ORIG-KEY\).
+
+ORIG-KEY is only used for testing purposes, and
+denotes the original magit key for this command.")
+
+(dolist (binding evil-collection-magit-mode-map-bindings)
+  ;; Skip single `[' / `]' on `magit-mode-map' when unimpaired is on so
+  ;; those keys remain free as unimpaired prefixes; the `magit-section'
+  ;; theme bindings cover sibling motion via `[[' / `]]'.
+  (when (and binding
+             (not (and evil-collection-want-unimpaired-p
+                       (eq (nth 1 binding) 'magit-mode-map)
+                       (member (nth 2 binding) '("[" "]")))))
+    (dolist (state (nth 0 binding))
+      (evil-collection-define-key
+        state (nth 1 binding) (nth 2 binding) (nth 3 binding)))))
+
+(defvar evil-collection-magit-minor-mode-map-bindings
+  `(((,evil-collection-magit-state visual) magit-blob-mode-map "gj" magit-blob-next     "n")
+    ((,evil-collection-magit-state visual) magit-blob-mode-map "gk" magit-blob-previous "p")
+    ((,evil-collection-magit-state visual) git-commit-mode-map "\M-k" git-commit-prev-message "M-p")
+    ((,evil-collection-magit-state visual) git-commit-mode-map "gk" git-commit-prev-message "M-p")
+    ((,evil-collection-magit-state visual) git-commit-mode-map "\M-j" git-commit-next-message "M-n")
+    ((,evil-collection-magit-state visual) git-commit-mode-map "gj" git-commit-next-message "M-n")
+    ((normal) magit-blame-read-only-mode-map "j"    evil-next-line)
+    ((normal) magit-blame-read-only-mode-map "\C-j"  magit-blame-next-chunk                 "n")
+    ((normal) magit-blame-read-only-mode-map "gj"   magit-blame-next-chunk                 "n")
+    ((normal) magit-blame-read-only-mode-map "gJ"   magit-blame-next-chunk-same-commit     "N")
+    ((normal) magit-blame-read-only-mode-map "k"    evil-previous-line)
+    ((normal) magit-blame-read-only-mode-map "\C-k"  magit-blame-previous-chunk             "p")
+    ((normal) magit-blame-read-only-mode-map "gk"   magit-blame-previous-chunk             "p")
+    ((normal) magit-blame-read-only-mode-map "gK"   magit-blame-previous-chunk-same-commit "P"))
+  "evil-collection-magit bindings for minor modes. Each element of
+this list takes the form
+
+\(EVIL-STATE MAGIT-MAP NEW-KEY DEF ORIG-KEY)\.
+
+ORIG-KEY is only used for testing purposes, and
+denotes the original magit key for this command.")
+
+(dolist (binding evil-collection-magit-minor-mode-map-bindings)
+  (when binding
+    (dolist (state (nth 0 binding))
+      ;; TODO: Maybe switch to `evil-define-minor-mode-key'
+      (evil-collection-define-key
+        state (nth 1 binding) (nth 2 binding) (nth 3 binding)))))
+
+;; Make relevant maps into overriding maps so that they shadow the global evil
+;; maps by default
+(dolist (map (list magit-mode-map
+                   magit-cherry-mode-map
+                   magit-mode-map
+                   magit-blob-mode-map
+                   magit-diff-mode-map
+                   magit-log-mode-map
+                   magit-log-select-mode-map
+                   magit-reflog-mode-map
+                   magit-status-mode-map
+                   magit-log-read-revs-map
+                   magit-process-mode-map
+                   magit-refs-mode-map))
+  (evil-make-overriding-map map (if evil-collection-magit-use-y-for-yank
+                                    'all
+                                  evil-collection-magit-state)))
+
+(evil-make-overriding-map magit-blame-read-only-mode-map 'normal)
+
+(eval-after-load 'magit-gh-pulls
+  `(evil-make-overriding-map magit-gh-pulls-mode-map ',evil-collection-magit-state))
+
+;; Need to refresh evil keymaps when blame/blob mode is entered.
+(add-hook 'magit-blame-mode-hook #'evil-normalize-keymaps)
+(add-hook 'magit-blob-mode-hook #'evil-normalize-keymaps)
+
+
+(evil-set-initial-state 'magit-submodule-list-mode 'normal)
+(evil-collection-define-key 'normal 'magit-submodule-list-mode-map
+  (kbd "RET") 'magit-repolist-status
+  (kbd "gr")  'magit-list-submodules)
+(add-hook 'magit-submodule-list-mode-hook #'evil-normalize-keymaps)
+
+
+(eval-after-load 'git-rebase
+  `(progn
+     ;; for the compiler
+     (defvar git-rebase-mode-map)
+     (defvar evil-collection-magit-rebase-commands-w-descriptions
+       ;; nil in the first element means don't bind here
+       '(("p"    git-rebase-pick           "pick = use commit")
+         ("r"    git-rebase-reword         "reword = use commit, but edit the commit message")
+         ("e"    git-rebase-edit           "edit = use commit, but stop for amending")
+         ("s"    git-rebase-squash         "squash = use commit, but meld into previous commit")
+         ("f"    git-rebase-fixup          "fixup = like \"squash\", but discard this commit's log message")
+         ("x"    git-rebase-exec           "exec = run command (the rest of the line) using shell")
+         ("d"    git-rebase-kill-line      "drop = remove commit" "k")
+         ("u"    git-rebase-undo           "undo last change")
+         ("ZZ"   with-editor-finish        "tell Git to make it happen")
+         ("ZQ"   with-editor-cancel        "tell Git that you changed your mind, i.e. abort")
+         ("k"    evil-previous-line        "move point to previous line" "p")
+         ("j"    evil-next-line            "move point to next line" "n")
+         ("M-k"  git-rebase-move-line-up   "move the commit at point up" "\M-p")
+         ("M-j"  git-rebase-move-line-down "move the commit at point down" "\M-n")
+         (nil    git-rebase-show-commit    "show the commit at point in another buffer")))
+
+     (dolist (cmd evil-collection-magit-rebase-commands-w-descriptions)
+       (when (car cmd)
+         (evil-collection-define-key evil-collection-magit-state 'git-rebase-mode-map
+           (kbd (car cmd)) (nth 1 cmd))))
+
+     (evil-make-overriding-map git-rebase-mode-map evil-collection-magit-state)
+
+     (defun evil-collection-magit-add-rebase-messages ()
+       "Remove evil-state annotations and reformat git-rebase buffer."
+       (goto-char (point-min))
+       (let ((inhibit-read-only t)
+             (state-regexp (format "<%s-state> " evil-collection-magit-state))
+             (aux-map (evil-get-auxiliary-keymap git-rebase-mode-map evil-collection-magit-state)))
+         (save-excursion
+           (save-match-data
+             (goto-char (point-min))
+             (when (and (boundp 'git-rebase-show-instructions)
+                        git-rebase-show-instructions
+                        (re-search-forward
+                         (concat "^" (regexp-quote comment-start) "\\s-+p, pick") nil t))
+               (goto-char (line-beginning-position))
+               (flush-lines (concat "^" (regexp-quote comment-start) ".+ = "))
+               (dolist (cmd evil-collection-magit-rebase-commands-w-descriptions)
+                 (insert
+                  (format "%s %-8s %s\n"
+                          comment-start
+                          (if (and (car cmd)
+                                   (eq (nth 1 cmd)
+                                       (lookup-key aux-map (kbd (car cmd)))))
+                              (car cmd)
+                            (replace-regexp-in-string
+                             state-regexp ""
+                             (substitute-command-keys
+                              (format "\\[%s]" (nth 1 cmd)))))
+                          (nth 2 cmd)))))))))
+     (remove-hook 'git-rebase-mode-hook #'git-rebase-mode-show-keybindings)
+     (add-hook 'git-rebase-mode-hook #'evil-collection-magit-add-rebase-messages t)))
+
+;; section maps: evil's auxiliary maps don't work here, because these maps are
+;; text overlays
+
+(defun evil-collection-magit-stage-untracked-file-with-intent ()
+  "Call `magit-stage-untracked' with optional arg."
+  (interactive)
+  (when (and (derived-mode-p 'magit-mode)
+             (magit-apply--get-selection)
+             (eq (magit-diff-type) 'untracked))
+    (magit-stage-untracked t)))
+
+(defcustom evil-collection-magit-visit-worktree-file-on-return t
+  "When non-nil (default), RET visits the file in the worktree
+\(`magit-diff-visit-worktree-file') and S-<return> visits the file
+in the current diff context (`magit-diff-visit-file').
+
+When nil, the bindings are swapped: RET uses `magit-diff-visit-file'
+and S-<return> uses `magit-diff-visit-worktree-file'."
+  :group 'magit
+  :type 'boolean)
+
+(defvar evil-collection-magit-original-section-bindings
+  `((,(copy-keymap magit-file-section-map) "\C-j" magit-diff-visit-worktree-file)
+    (,(copy-keymap magit-hunk-section-map) "\C-j" magit-diff-visit-worktree-file))
+  "For testing purposes only. The original magit keybindings that
+evil-collection-magit affects.")
+
+(defun evil-collection-magit-adjust-section-bindings ()
+  "Adjust bindings in section maps for evil-collection-magit."
+  (define-key magit-file-section-map "I"
+    #'evil-collection-magit-stage-untracked-file-with-intent)
+  (define-key magit-file-section-map "\C-j" nil)  ; breaking change
+  (define-key magit-hunk-section-map "\C-j" nil)  ; breaking change
+  (let ((return-cmd (if evil-collection-magit-visit-worktree-file-on-return
+                        'magit-diff-visit-worktree-file
+                      'magit-diff-visit-file))
+        (s-return-cmd (if evil-collection-magit-visit-worktree-file-on-return
+                          'magit-diff-visit-file
+                        'magit-diff-visit-worktree-file)))
+    (define-key magit-file-section-map (kbd "RET") return-cmd)
+    (define-key magit-hunk-section-map (kbd "RET") return-cmd)
+    (define-key magit-file-section-map (kbd "S-<return>") s-return-cmd)
+    (define-key magit-hunk-section-map (kbd "S-<return>") s-return-cmd)))
+
+(defun evil-collection-magit-revert-section-bindings ()
+  "Revert changed bindings in section maps generated by evil-collection-magit."
+  (define-key magit-file-section-map "I" nil)
+  (define-key magit-file-section-map "\C-j" #'magit-diff-visit-file-worktree)
+  (define-key magit-hunk-section-map "\C-j" #'magit-diff-visit-file-worktree)
+  (define-key magit-file-section-map (kbd "RET") #'magit-diff-visit-file)
+  (define-key magit-hunk-section-map (kbd "RET") #'magit-diff-visit-file)
+  (define-key magit-file-section-map (kbd "S-<return>") nil)
+  (define-key magit-hunk-section-map (kbd "S-<return>") nil))
+
+;; Popups
+
+(defvar evil-collection-magit-dispatch-popup-backup
+  (copy-tree (get 'magit-dispatch 'transient--layout) t))
+(defvar evil-collection-magit-popup-keys-changed nil)
+
+(defvar evil-collection-magit-popup-changes
+  (append
+   (when evil-collection-magit-use-z-for-folds
+     '((magit-dispatch "Z" "%" magit-worktree)
+       (magit-dispatch "z" "Z" magit-stash)))
+   (when evil-collection-magit-want-horizontal-movement
+     '((magit-dispatch "L" "C-l" magit-log-refresh)
+       (magit-dispatch "l" "L" magit-log)))
+   '((magit-branch "x" "X" magit-branch-reset)
+     (magit-branch "k" "x" magit-branch-delete)
+     (magit-dispatch "o" "'" magit-submodule)
+     (magit-dispatch "O" "\"" magit-subtree)
+     (magit-dispatch "V" "_" magit-revert)
+     (magit-dispatch "X" "O" magit-reset)
+     (magit-dispatch "v" "-" magit-reverse)
+     (magit-dispatch "k" "x" magit-discard)
+     (magit-remote "k" "x" magit-remote-remove)
+     ;; FIXME: how to properly handle a popup with a key that appears twice (in
+     ;; `transient-define-prefix' definition)? Currently we rely on:
+     ;; 1. first call to `evil-collection-magit-change-popup-key' changes the first "V"
+     ;;    entry of `magit-revert' (the first entry in `transient-define-prefix'
+     ;;    definition of `magit-revert'), second call changes the second "V".
+     ;; 2. the remapping here are in the same order as in `magit-revert'
+     ;;    definition
+     (magit-revert "V" "_" magit-revert-and-commit)
+     (magit-revert "V" "_" magit-sequencer-continue)
+     (magit-tag    "k" "x" magit-tag-delete)))
+  "Changes to popup keys")
+
+(defun evil-collection-magit-change-popup-key (popup from to &rest _args)
+  "Wrap `magit-change-popup-key'."
+  (transient-suffix-put popup from :key to))
+
+(defun evil-collection-magit-adjust-popups ()
+  "Adjust popup keys to match evil-collection-magit."
+  (unless evil-collection-magit-popup-keys-changed
+    (dolist (change evil-collection-magit-popup-changes)
+      (apply #'evil-collection-magit-change-popup-key change))
+    (setq evil-collection-magit-popup-keys-changed t)))
+
+(defun evil-collection-magit-revert-popups ()
+  "Revert popup keys changed by evil-collection-magit."
+  (put 'magit-dispatch 'transient--layout evil-collection-magit-dispatch-popup-backup)
+  (setq evil-collection-magit-popup-keys-changed nil))
+
+;;;###autoload
+(defun evil-collection-magit-init ()
+  "This function completes the setup of evil-collection-magit. It is called
+automatically when evil-collection-magit-setup is called.. The only reason to
+use this function is if you've called `evil-collection-magit-revert' and wish
+to go back to evil-collection-magit behavior."
+  (interactive)
+  (evil-collection-magit-adjust-section-bindings)
+  (evil-collection-magit-adjust-popups)
+  (evil-collection-magit-set-initial-states))
+
+;;;###autoload
+(defun evil-collection-magit-revert ()
+  "Revert changes by evil-collection-magit that affect default evil+magit behavior."
+  (interactive)
+  (evil-collection-magit-revert-section-bindings)
+  (evil-collection-magit-revert-popups)
+  (evil-collection-magit-revert-initial-states)
+  (message "evil-collection-magit reverted"))
+
+(define-minor-mode evil-collection-magit-toggle-text-minor-mode
+  "Minor mode used to enabled toggle key in `text-mode' after
+using `evil-collection-magit-toggle-text-mode'"
+  :keymap (make-sparse-keymap))
+
+(evil-collection-define-key 'normal
+  'evil-collection-magit-toggle-text-minor-mode-map
+  "\C-t" 'evil-collection-magit-toggle-text-mode
+  "\\"   'evil-collection-magit-toggle-text-mode)
+(evil-collection-define-key evil-collection-magit-state 'magit-mode-map
+  "\C-t" 'evil-collection-magit-toggle-text-mode
+  "\\"   'evil-collection-magit-toggle-text-mode)
+(evil-collection-define-key evil-collection-magit-state 'git-rebase-mode-map
+  "\C-t" 'evil-collection-magit-toggle-text-mode
+  "\\"   'evil-collection-magit-toggle-text-mode)
+
+(defvar evil-collection-magit-last-mode nil
+  "Used to store last magit mode before entering text mode using
+`evil-collection-magit-toggle-text-mode'.")
+
+(defun evil-collection-magit-toggle-text-mode ()
+  "Switch to `text-mode' and back from magit buffers."
+  (interactive)
+  (cond ((derived-mode-p 'magit-mode 'git-rebase-mode)
+         (setq evil-collection-magit-last-mode major-mode)
+         (message "Switching to text-mode")
+         (text-mode)
+         (read-only-mode -1)
+         (evil-collection-magit-toggle-text-minor-mode 1)
+         (evil-normalize-keymaps))
+        ((and (eq major-mode 'text-mode)
+              (functionp evil-collection-magit-last-mode))
+         (message "Switching to %s" evil-collection-magit-last-mode)
+         (evil-collection-magit-toggle-text-minor-mode -1)
+         (evil-normalize-keymaps)
+         (funcall evil-collection-magit-last-mode)
+         (magit-refresh)
+         (evil-change-state evil-collection-magit-state))
+        (t
+         (user-error "evil-collection-magit-toggle-text-mode unexpected state"))))
+
+(evil-define-operator evil-collection-magit-yank-whole-line
+  (beg end type register yank-handler)
+  "Yank whole line."
+  :motion evil-line-or-visual-line
+  (interactive "<R><x>")
+  (evil-yank beg end type register yank-handler))
+
+;;;###autoload
+(defun evil-collection-magit-setup ()
+  "Set up `evil' bindings for `magit'."
+
+  (evil-collection-bind 'magit-blame-mode-map 'quit 'magit-blame-quit)
+  (evil-collection-bind 'magit-blame-read-only-mode-map 'quit 'magit-blame-quit)
+
+  (evil-collection-magit-init))
+
+;;; evil-collection-magit.el ends soon
+(provide 'evil-collection-magit)
+;; Local Variables:
+;; indent-tabs-mode: nil
+;; End:
+;;; evil-collection-magit.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit/evil-collection-magit.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit/evil-collection-magit.elc
new file mode 100644
index 0000000..b5e5ef6
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/magit/evil-collection-magit.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/man/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/man/README.org
new file mode 100644
index 0000000..70ca48c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/man/README.org
@@ -0,0 +1,22 @@
+* man
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Man-Page.html][Man]].
+
+** Key bindings
+
+   | Command                       | Original       | Evil            |
+   |-------------------------------+----------------+-----------------|
+   | =scroll-up-command=           | =SPC=          | =SPC=           |
+   | =scroll-down-command=         | =DEL=, =S-SPC= | =S-SPC=         |
+   | =forward-button=              | =TAB=          | =TAB=           |
+   | =backward-button=             | =S-TAB=        | =S-TAB=         |
+   | =Man-next-manpage=            | =M-n=          | =]]=, =gj=      |
+   | =Man-previous-manpage=        | =M-p=          | =[[=, =gk=      |
+   | =Man-next-section=            | =n=            | =C-j=           |
+   | =Man-previous-section=        | =p=            | =C-k=           |
+   | =man=                         | =m=            | =gm=            |
+   | =Man-goto-section=            | =g=            | =gd=            |
+   | =Man-follow-manual-reference= | =r=            | =gR=            |
+   | =Man-goto-see-also-section=   | =s=            | =gs=            |
+   | =Man-update-manpage=          | =u=            | =gr=            |
+   | =quit-window=                 | =q=            | =q=, =ZQ=, =ZZ= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/man/evil-collection-man.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/man/evil-collection-man.el
new file mode 100644
index 0000000..5aa2eaa
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/man/evil-collection-man.el
@@ -0,0 +1,63 @@
+;;; evil-collection-man.el --- Evil bindings for Man-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, man, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `man'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'man)
+
+(defconst evil-collection-man-maps '(Man-mode-map))
+
+;;;###autoload
+(defun evil-collection-man-setup ()
+  "Set up `evil' bindings for `man'."
+  (evil-set-initial-state 'Man-mode 'normal)
+  (evil-collection-bind 'Man-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button)
+  (evil-collection-define-key 'normal 'Man-mode-map
+    ;; goto
+    "gm" 'man
+    "gR" 'Man-follow-manual-reference ; TODO: Make this match Info-follow-reference?
+    "gs" 'Man-goto-see-also-section)
+  (evil-collection-bind 'Man-mode-map
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'next-item 'Man-next-manpage
+                        'prev-item 'Man-previous-manpage
+                        'next-section 'Man-next-manpage
+                        'prev-section 'Man-previous-manpage
+                        'next-section-2 'Man-next-section
+                        'prev-section-2 'Man-previous-section
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window
+                        'refresh 'Man-update-manpage
+                        'find-definition 'Man-goto-section))
+
+(provide 'evil-collection-man)
+;;; evil-collection-man.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/man/evil-collection-man.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/man/evil-collection-man.elc
new file mode 100644
index 0000000..2b16d3c
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/man/evil-collection-man.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/markdown-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/markdown-mode/README.org
new file mode 100644
index 0000000..8c93de5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/markdown-mode/README.org
@@ -0,0 +1,14 @@
+* markdown-mode
+
+  Basic evil bindings for [[https://github.com/jrblevin/markdown-mode][markdown-mode]]. Not intended to supersede
+  [[https://github.com/Somelauw/evil-markdown][evil-markdown]].
+
+** Key bindings (normal state)
+
+   | Command                       | Original    | Evil        |
+   |-------------------------------+-------------+-------------|
+   | =markdown-backward-paragraph= | =M-{=       | ={=         |
+   | =markdown-forward-paragraph=  | =M-}=       | =}=         |
+   | =markdown-cycle=              | =TAB=       | =TAB=       |
+   | =markdown-shifttab=           | =<backtab>= | =<backtab>= |
+   | =markdown-do=                 | =C-c C-d=   | =RET=       |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/markdown-mode/evil-collection-markdown-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/markdown-mode/evil-collection-markdown-mode.el
new file mode 100644
index 0000000..17bec83
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/markdown-mode/evil-collection-markdown-mode.el
@@ -0,0 +1,50 @@
+;;; evil-collection-markdown-mode.el --- Evil bindings for markdown-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; Evil basic bindings for markdown-mode. It's NOT intended to supersede
+;; `evil-markdown'.
+;;
+
+;;; Code:
+(require 'evil-collection)
+(require 'markdown-mode nil t)
+
+(defconst evil-collection-markdown-mode-maps '(markdown-mode-map))
+
+;;;###autoload
+(defun evil-collection-markdown-mode-setup ()
+  "Set up `evil' bindings for `markdown-mode'."
+  (evil-collection-define-key 'normal 'markdown-mode-map
+    "{" 'markdown-backward-paragraph
+    "}" 'markdown-forward-paragraph
+    [tab] 'markdown-cycle
+    [S-tab] 'markdown-shifttab)
+  ;; `evil-markdown' doesn't bind but spacemacs does.
+  (evil-collection-bind 'markdown-mode-map 'action 'markdown-do))
+
+(provide 'evil-collection-markdown-mode)
+;;; evil-collection-markdown-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/markdown-mode/evil-collection-markdown-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/markdown-mode/evil-collection-markdown-mode.elc
new file mode 100644
index 0000000..050c9fa
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/markdown-mode/evil-collection-markdown-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/message/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/message/README.org
new file mode 100644
index 0000000..3ef74ce
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/message/README.org
@@ -0,0 +1,18 @@
+* message
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/message/index.html][message-mode]], the Gnus / mail composition buffer.
+
+  Initial state is insert. Normal-state =Z= bindings provide quick send / kill
+  without leaving the keyboard home row.
+
+** Key bindings
+
+   | Command                 | Original  | Evil |
+   |-------------------------+-----------+------|
+   | =message-send-and-exit= | =C-c C-c= | =ZZ= |
+   | =message-kill-buffer=   | =C-c C-k= | =ZQ= |
+   | =message-dont-send=     | =C-c C-d= | =ZD= |
+   | =mml-attach-file=       | =C-c C-a= | =ZF= |
+
+   All other =C-c= prefix bindings (goto-field, insert-signature, attach, etc.)
+   remain at their upstream keys.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/message/evil-collection-message.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/message/evil-collection-message.el
new file mode 100644
index 0000000..a84c25b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/message/evil-collection-message.el
@@ -0,0 +1,47 @@
+;;; evil-collection-message.el --- Bindings for `message' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026 jessy836
+
+;; Author: jessy836 <netocenusa@gmail.com>
+;; Maintainer: jessy836 <netocenusa@gmail.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for message.
+
+;;; Code:
+(require 'evil-collection)
+(require 'message nil t)
+
+(defvar message-mode-map)
+(defconst evil-collection-message-maps '(message-mode-map))
+
+;;;###autoload
+(defun evil-collection-message-setup ()
+  "Set up `evil' bindings for `message-mode'."
+  (evil-set-initial-state 'message-mode 'insert)
+  (evil-collection-define-key 'normal 'message-mode-map
+    "ZD" 'message-dont-send
+    "ZF" 'mml-attach-file)
+  (evil-collection-bind 'message-mode-map
+                        'quit-save 'message-send-and-exit
+                        'quit-cancel 'message-kill-buffer))
+
+(provide 'evil-collection-message)
+;;; evil-collection-message.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/message/evil-collection-message.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/message/evil-collection-message.elc
new file mode 100644
index 0000000..41bcd07
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/message/evil-collection-message.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minesweeper/evil-collection-minesweeper.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minesweeper/evil-collection-minesweeper.el
new file mode 100644
index 0000000..aa53583
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minesweeper/evil-collection-minesweeper.el
@@ -0,0 +1,53 @@
+;;; evil-collection-minesweeper.el --- Bindings for `minesweeper' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2025 StrawberryTea
+
+;; Author: StrawberryTea
+;; Maintainer: StrawberryTea <look@strawberrytea.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, games
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;; Bindings for `minesweeper'.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'minesweeper nil t)
+
+(defconst evil-collection-minesweeper-maps '(minesweeper-mode-map))
+
+;;;###autoload
+(defun evil-collection-minesweeper-setup ()
+  "Set up `evil' bindings for `minesweeper'."
+  (evil-set-initial-state 'minesweeper-mode 'normal)
+  (evil-collection-define-key 'normal 'minesweeper-mode-map
+    "RET" 'minesweeper-choose
+    "m" 'minesweeper-toggle-mark
+    "c" 'minesweeper-choose-around
+    "s" 'minesweeper-toggle-show-neighbors
+    "j" 'minesweeper-next-line
+    "h" 'minesweeper-backward-char
+    "l" 'minesweeper-forward-char
+    "$" 'minesweeper-move-end-of-field
+    "e" 'minesweeper-move-end-of-field))
+
+(provide 'evil-collection-minesweeper)
+
+;;; evil-collection-minesweeper.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minesweeper/evil-collection-minesweeper.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minesweeper/evil-collection-minesweeper.elc
new file mode 100644
index 0000000..ad331b0
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minesweeper/evil-collection-minesweeper.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minibuffer/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minibuffer/README.org
new file mode 100644
index 0000000..30121f6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minibuffer/README.org
@@ -0,0 +1,47 @@
+* minibuffer
+
+  Evil bindings for the minibuffer and =evil-ex= prompt.
+
+  The minibuffer has no major mode, so the package hooks =minibuffer-setup-hook=
+  to enter insert state on open.
+
+** Affected keymaps
+
+   - =minibuffer-local-map=
+   - =minibuffer-local-ns-map=
+   - =minibuffer-local-completion-map=
+   - =minibuffer-local-must-match-map=
+   - =minibuffer-local-isearch-map=
+   - =evil-ex-search-keymap=
+   - =evil-ex-completion-map=
+
+** Key bindings
+
+   Normal-state bindings added to every map above.
+
+   | Command                                | Key        |
+   |----------------------------------------+------------|
+   | =evil-collection-change-in-minibuffer= | =c=        |
+   | =abort-recursive-edit=                 | =<escape>= |
+   | =exit-minibuffer=                      | =RET=      |
+
+   Extra bindings on =evil-ex-completion-map= for history navigation:
+
+   | Command                             | State  | Key        |
+   |-------------------------------------+--------+------------|
+   | =previous-complete-history-element= | insert | =C-p=      |
+   | =next-complete-history-element=     | insert | =C-n=      |
+   | =previous-history-element=          | normal | =C-p=      |
+   | =next-history-element=              | normal | =C-n=      |
+   | =abort-recursive-edit=              | normal | =<escape>= |
+
+** New commands
+
+   | Command                                | Key |                                                                                      |
+   |----------------------------------------+-----+--------------------------------------------------------------------------------------|
+   | =evil-collection-change-in-minibuffer= | =c= | =evil-change= variant that avoids inserting a stray newline when the buffer had none |
+
+** Notes
+
+   - =evil-echo-state= is locally disabled so the minibuffer prompt is not
+     overwritten by the state indicator.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minibuffer/evil-collection-minibuffer.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minibuffer/evil-collection-minibuffer.el
new file mode 100644
index 0000000..c057fcd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minibuffer/evil-collection-minibuffer.el
@@ -0,0 +1,85 @@
+;;; evil-collection-minibuffer.el --- Evil bindings for the minibuffer -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, minibuffer, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for the minibuffer.
+
+;;; Code:
+(require 'evil-collection)
+
+(defconst evil-collection-minibuffer-maps '(minibuffer-local-map
+                                            minibuffer-local-ns-map
+                                            minibuffer-local-completion-map
+                                            minibuffer-local-must-match-map
+                                            minibuffer-local-isearch-map
+                                            evil-ex-search-keymap
+                                            evil-ex-completion-map))
+
+(defun evil-collection-minibuffer-insert ()
+  "Switch to insert state.
+
+This function is meant to be hooked in the minibuffer:
+
+  (add-hook \='minibuffer-setup-hook \='evil-collection-minibuffer-insert)
+
+`evil-set-initial-state' can not be used for the minibuffer since
+it does not have a mode."
+  (set (make-local-variable 'evil-echo-state) nil)
+  ;; (evil-set-initial-state 'mode 'insert) is the evil-proper
+  ;; way to do this, but the minibuffer doesn't have a mode.
+  ;; The alternative is to create a minibuffer mode (here), but
+  ;; then it may conflict with other packages' if they do the same.
+  (evil-insert 1))
+
+(evil-define-operator evil-collection-change-in-minibuffer
+  (beg end type register yank-handler delete-func)
+  "A version of `evil-change' that won't insert a new line on buffers without one."
+  (interactive "<R><x><y>")
+  ;; If there was no new line before the change, there should be none after.
+  ;; Delete any new line that might have been inserted and ignore an error if
+  ;; one wasn't.
+  (let ((new-inserted (and (eq type 'line) (/= ?\n (char-before end)))))
+    (evil-change beg end type register yank-handler delete-func)
+    (when new-inserted (ignore-errors (delete-char 1)))))
+
+;;;###autoload
+(defun evil-collection-minibuffer-setup ()
+  "Initialize minibuffer for `evil'."
+  ;; https://www.gnu.org/software/emacs/manual/html_node/elisp/Text-from-Minibuffer.html
+  (dolist (map evil-collection-minibuffer-maps)
+    (evil-collection-define-key 'normal map "c" 'evil-collection-change-in-minibuffer)
+    (evil-collection-define-key 'normal map (kbd "<escape>") 'abort-recursive-edit)
+    (evil-collection-bind map 'action 'exit-minibuffer))
+
+  (add-hook 'minibuffer-setup-hook #'evil-collection-minibuffer-insert)
+  ;; Because of the above minibuffer-setup-hook, some evil-ex bindings need be reset.
+  (evil-collection-define-key 'normal 'evil-ex-completion-map (kbd "<escape>") 'abort-recursive-edit)
+  (evil-collection-define-key 'insert 'evil-ex-completion-map (kbd "C-p") 'previous-complete-history-element)
+  (evil-collection-define-key 'insert 'evil-ex-completion-map (kbd "C-n") 'next-complete-history-element)
+  (evil-collection-define-key 'normal 'evil-ex-completion-map (kbd "C-p") 'previous-history-element)
+  (evil-collection-define-key 'normal 'evil-ex-completion-map (kbd "C-n") 'next-history-element))
+
+(provide 'evil-collection-minibuffer)
+;;; evil-collection-minibuffer.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minibuffer/evil-collection-minibuffer.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minibuffer/evil-collection-minibuffer.elc
new file mode 100644
index 0000000..9da370f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/minibuffer/evil-collection-minibuffer.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/monky/evil-collection-monky.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/monky/evil-collection-monky.el
new file mode 100644
index 0000000..efe66fe
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/monky/evil-collection-monky.el
@@ -0,0 +1,128 @@
+;;; evil-collection-monky.el --- Bindings for `monky' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `monky'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'monky nil t)
+
+(defconst evil-collection-monky-maps '(monky-mode-map
+                                       monky-status-mode-map
+                                       monky-log-mode-map
+                                       monky-blame-mode-map
+                                       monky-branches-mode-map
+                                       monky-commit-mode-map
+                                       monky-queue-mode-map
+                                       monky-log-edit-mode-map))
+
+;;;###autoload
+(defun evil-collection-monky-setup ()
+  "Set up `evil' bindings for `monky'."
+  (evil-set-initial-state 'monky-mode 'normal)
+  (add-hook 'monky-mode-hook #'evil-normalize-keymaps)
+  (add-hook 'monky-status-mode-hook #'evil-normalize-keymaps)
+
+  (evil-collection-define-key 'normal 'monky-mode-map
+    (kbd "SPC") 'monky-show-item-or-scroll-up
+    (kbd "DEL") 'monky-show-item-or-scroll-down
+    "`" 'monky-display-process
+    "!" 'monky-hg-command
+    "Ll" 'monky-log-current-branch
+    "La" 'monky-log-all
+    "LL" 'monky-log-all
+    "Lr" 'monky-log-revset
+    "b" 'monky-branches
+    "Q" 'monky-queue)
+  (evil-collection-bind 'monky-mode-map
+                        'action 'monky-visit-item
+                        'next-item 'monky-goto-next-section
+                        'prev-item 'monky-goto-previous-section
+                        'next-section 'monky-goto-next-section
+                        'prev-section 'monky-goto-previous-section
+                        'quit 'monky-quit-window
+                        'refresh 'monky-refresh
+                        'section-toggle 'monky-toggle-section)
+
+  (evil-collection-define-key 'normal 'monky-status-mode-map
+    "s" 'monky-stage-item
+    "S" 'monky-stage-all
+    "u" 'monky-unstage-item
+    "U" 'monky-unstage-all
+    "a" 'monky-commit-amend
+    "c" 'monky-log-edit
+    "e" 'monky-ediff-item
+    "Y" 'monky-bookmark-create
+    "C" 'monky-checkout
+    "M" 'monky-merge
+    "B" 'monky-backout
+    "P" 'monky-push
+    "F" 'monky-pull
+    "x" 'monky-discard-item
+    "m" 'monky-resolve-item
+    "K" 'monky-unresolve-item ;; Not the best...
+    "o" 'monky-reset-tip
+    "A" 'monky-addremove-all
+    "R" 'monky-rollback)
+
+  (evil-collection-define-key 'normal 'monky-log-mode-map
+    "+" 'monky-log-show-more-entries
+    "b" 'monky-checkout-item ;; Like `magit-branch'.
+    "m" 'monky-merge-item    ;; Like `magit-merge'.
+    "B" 'monky-backout-item
+    "i" 'monky-qimport-item)
+
+  (evil-collection-define-key 'normal 'monky-branches-mode-map
+    "b" 'monky-checkout-item ;; Like `magit-branch'.
+    "m" 'monky-merge-item    ;; Like `magit-merge'.
+    )
+
+  ;; FIXME: Haven't used this mode yet so not sure if these are appropriate...
+  (evil-collection-define-key 'normal 'monky-queue-mode-map
+    "u" 'monky-qpop-item
+    "U" 'monky-qpop-all
+    "s" 'monky-qpush-item
+    "S" 'monky-qpush-all
+    "r" 'monky-qrefresh
+    "R" 'monky-qrename-item
+    "k" 'monky-qremove-item
+    "N" 'monky-qnew
+    "f" 'monky-qfinish-item
+    "F" 'monky-qfinish-applied
+    "d" 'monky-qfold-item
+    "G" 'monky-qguard-item
+    "o" 'monky-qreorder
+    "A" 'monky-addremove-all)
+
+  (evil-collection-define-key 'normal 'monky-log-edit-mode-map
+    (kbd "C-c C-c") 'monky-log-edit-commit
+    [remap evil-save-and-close] 'monky-log-edit-commit
+    [remap evil-save-modified-and-close] 'monky-log-edit-commit
+    (kbd "C-c C-k") 'monky-log-edit-cancel-log-message
+    [remap evil-quit] 'monky-log-edit-cancel-log-message))
+
+(provide 'evil-collection-monky)
+;;; evil-collection-monky.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/monky/evil-collection-monky.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/monky/evil-collection-monky.elc
new file mode 100644
index 0000000..2050e02
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/monky/evil-collection-monky.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpc/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpc/README.org
new file mode 100644
index 0000000..8416a2a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpc/README.org
@@ -0,0 +1,44 @@
+* mpc
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Music.html][mpc-mode]], the Emacs front-end to the Music Player Daemon.
+
+** Key bindings
+
+   Bindings applied to =mpc-mode-map=.
+
+   | Command                         | Original | Evil         |
+   |---------------------------------+----------+--------------|
+   | =evil-collection-mpc-move-down= | n/a      | =C-j=        |
+   | =evil-collection-mpc-move-up=   | n/a      | =C-k=        |
+   | =mpc-toggle-play=               | =s=      | =t=          |
+   | =mpc-stop=                      | n/a      | =T=          |
+   | =mpc-toggle-repeat=             | n/a      | =r=          |
+   | =mpc-toggle-shuffle=            | n/a      | =s=          |
+   | =mpc-toggle-consume=            | n/a      | =c=          |
+   | =mpc-playlist=                  | n/a      | =gp=         |
+   | =mpc-playlist-add=              | n/a      | =a=          |
+   | =mpc-next=                      | =>=      | =J=          |
+   | =mpc-prev=                      | =<=      | =K=          |
+   | =mpc-play-at-point=             | n/a      | =x=          |
+   | =mpc-play=                      | n/a      | =X=          |
+   | =mpc-select=                    | =RET=    | =RET=        |
+   | =mpc-select-toggle=             | =S-RET=  | =S-<return>= |
+   | =mpc-select-extend=             | n/a      | =C-<return>= |
+   | =mpc-goto-playing-song=         | =o=      | =go=         |
+   | =mpc-describe-song=             | n/a      | =gd=         |
+   | =mpc-pause=                     | =p=      | =p=          |
+   | =mpc-resume=                    | n/a      | =P=          |
+   | =mpc-seek-current=              | =g=      | =gs=         |
+   | =mpc-tagbrowser=                | n/a      | =gb=         |
+   | =mpc-songs-search=              | n/a      | =g/=         |
+   | =mpc-songs-kill-search=         | n/a      | =g_=         |
+   | =mpc-update=                    | n/a      | =gR=         |
+   | =mpc-playlist-delete=           | n/a      | =D=          |
+   | =mpc-quit=                      | =q=      | =q=          |
+
+** New commands
+
+   | Command                         | Key   |                                        |
+   |---------------------------------+-------+----------------------------------------|
+   | =evil-collection-mpc-move-down= | =C-j= | move cursor down and call =mpc-select= |
+   | =evil-collection-mpc-move-up=   | =C-k= | move cursor up and call =mpc-select=   |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpc/evil-collection-mpc.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpc/evil-collection-mpc.el
new file mode 100644
index 0000000..e49dd67
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpc/evil-collection-mpc.el
@@ -0,0 +1,88 @@
+;;; evil-collection-mpc.el --- Bindings for `mpc-mode' -*- lexical-binding: t -*-
+;; Copyright (C) 2021, 2022 pspiagicw
+
+;; Author: pspiagicw <pspiagicw@gmail.com>
+;; Maintainer: pspiagicw <pspiagicw@gmail.com>
+;; pspiagicw <pspiagicw@gmail.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, mpc, processes , mpd
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `mpc-mode'.
+
+;;; Code:
+(require 'mpc)
+(require 'evil-collection)
+
+(defconst evil-collection-mpc-maps '(mpc-mode-map))
+
+(defun evil-collection-mpc-move-down ()
+  "Move the cursor down along with selecting the element."
+  (interactive)
+  (evil-next-visual-line)
+  (mpc-select))
+
+(defun evil-collection-mpc-move-up ()
+  "Move the cursor up along with selecting the element."
+  (interactive)
+  (evil-previous-visual-line)
+  (mpc-select))
+
+;;;###autoload
+(defun evil-collection-mpc-setup ()
+  "Setup up `evil' bindings for `mpc-mode'."
+  (evil-collection-bind 'mpc-mode-map
+                        'next-item 'evil-collection-mpc-move-down
+                        'prev-item 'evil-collection-mpc-move-up
+                        'next-section 'evil-collection-mpc-move-down
+                        'prev-section 'evil-collection-mpc-move-up)
+  (evil-collection-define-key 'normal 'mpc-mode-map
+    "T"                'mpc-stop
+    "r"                'mpc-toggle-repeat
+    "s"                'mpc-toggle-shuffle
+    "c"                'mpc-toggle-consume
+    "gp"               'mpc-playlist
+    "a"                'mpc-playlist-add
+    "J"                'mpc-next
+    "K"                'mpc-prev
+    "x"                'mpc-play-at-point
+    "X"                'mpc-play
+    "gd"               'mpc-describe-song
+    "p"                'mpc-pause
+    "P"                'mpc-resume
+    "gs"               'mpc-seek-current
+    "gb"               'mpc-tagbrowser
+    "g/"               'mpc-songs-search
+    "g_"               'mpc-songs-kill-search
+    "gd"               'mpc-songs-jump-to
+    "D"                'mpc-playlist-delete)
+  ;; Bind action keys before restoring `go' to `mpc-goto-playing-song'.
+  (evil-collection-bind 'mpc-mode-map
+                        'action 'mpc-select
+                        'action-other 'mpc-select-toggle
+                        'action-stay 'mpc-select-extend
+                        'toggle 'mpc-toggle-play)
+  (evil-collection-define-key 'normal 'mpc-mode-map
+    (kbd "C-<return>") 'mpc-select-extend
+    "go" 'mpc-goto-playing-song)
+  (evil-collection-bind 'mpc-mode-map
+                        'quit 'mpc-quit
+                        'refresh-all 'mpc-update))
+
+(provide 'evil-collection-mpc)
+;;; evil-collection-mpc.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpc/evil-collection-mpc.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpc/evil-collection-mpc.elc
new file mode 100644
index 0000000..f812395
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpc/evil-collection-mpc.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdel/evil-collection-mpdel.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdel/evil-collection-mpdel.el
new file mode 100644
index 0000000..90ce472
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdel/evil-collection-mpdel.el
@@ -0,0 +1,99 @@
+;;; evil-collection-mpdel.el --- Evil bindings for mpdel -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Ruoyu Feng
+
+;; Author: Ruoyu Feng <mail@vonfry.name>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.4
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools, mpd
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for mpdel.
+
+;;; Code:
+
+(require 'mpdel nil t)
+(require 'evil-collection)
+
+(defvar mpdel-core-map)
+
+(defconst evil-collection-mpdel-maps '(mpdel-core-map))
+
+(defconst evil-collection-mpdel-modes '(mpdel-browser-mode mpdel-playlist-mode
+                                        mpdel-song-mode mpdel-browser-mode
+                                        mpdel-playlist-current-playlist-mode
+                                        mpdel-playlist-stored-playlist-mode))
+
+;;;###autoload
+(defun evil-collection-mpdel-setup ()
+  "Set up `evil' bindings for `mpdel'."
+
+  (evil-collection-set-readonly-bindings 'mpdel-core-map)
+  (dolist (mode evil-collection-mpdel-modes)
+    (evil-set-initial-state mode 'normal))
+  (evil-collection-define-key 'normal 'mpdel-core-map
+    "p"  'libmpdel-playback-play-pause
+    "{"  'libmpdel-playback-previous
+    "}"  'libmpdel-playback-next
+    "a"  'mpdel-core-add-to-current-playlist
+    "A"  'mpdel-core-add-to-stored-playlist
+    "r"  'mpdel-core-replace-current-playlist
+    "R"  'mpdel-core-replace-stored-playlist
+    "i"  'mpdel-core-insert-current-playlist
+    "gD" 'mpdel-core-dired
+    "gA" 'mpdel-core-open-artists
+    "gL" 'mpdel-core-open-stored-playlists
+    "ss" 'mpdel-core-search-by-title
+    "sl" 'mpdel-core-search-by-album
+    "sr" 'mpdel-core-search-by-artist
+    "gp" 'navigel-open-parent
+    "j"  'evil-next-line
+    "k"  'evil-previous-line
+    "+"  'mpdel-core-volume-increase
+    "-"  'mpdel-core-volume-decrease
+    "C"  'libmpdel-connect-profile
+
+    "gb" 'mpdel-browser-open
+
+    "I"  'mpdel-song-play
+
+    ">s" 'mpdel-song-small-increment
+    ">n" 'mpdel-song-normal-increment
+    ">l" 'mpdel-song-large-increment
+    "<s" 'mpdel-song-small-decrement
+    "<n" 'mpdel-song-normal-decrement
+    "<l" 'mpdel-song-large-decrement
+
+    "gl" 'mpdel-playlist-open
+    "("  'mpdel-playlist-move-up
+    ")"  'mpdel-playlist-move-down
+    "w"  'mpdel-playlist-save
+    "P"  'mpdel-playlist-play)
+  (evil-collection-bind 'mpdel-core-map
+                        'action 'libmpdel-playback-play-pause
+                        'action-other 'mpdel-song-open
+                        'quit 'mpdel-song-quit-window
+                        'refresh 'mpdel-song-refresh)
+
+  (evil-collection-define-key 'normal 'mpdel-tablist-mode-map
+    "d" 'tablist-do-delete)
+  (evil-collection-bind 'mpdel-tablist-mode-map 'delete 'tablist-do-delete))
+
+(provide 'evil-collection-mpdel)
+;;; evil-collection-mpdel.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdel/evil-collection-mpdel.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdel/evil-collection-mpdel.elc
new file mode 100644
index 0000000..680b5a9
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdel/evil-collection-mpdel.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdired/evil-collection-mpdired.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdired/evil-collection-mpdired.el
new file mode 100644
index 0000000..a4e827a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdired/evil-collection-mpdired.el
@@ -0,0 +1,88 @@
+;;; evil-collection-mpdired.el --- Evil bindings for mpdired -*- lexical-binding: t -*-
+
+;; Copyright (C) 2024 Ruoyu Feng
+
+;; Author: Ruoyu Feng <mail@vonfry.name>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools, mpd
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for mpdired.
+
+;;; Code:
+
+(require 'mpdired nil t)
+(require 'evil-collection)
+
+(defvar mpdired-core-map)
+
+(defconst evil-collection-mpdired-maps '(mpdired-mode-map))
+
+(defconst evil-collection-mpdired-modes '(mpdired-mode-map))
+
+;;;###autoload
+(defun evil-collection-mpdired-setup ()
+  "Set up `evil' bindings for `mpdired'."
+
+  (evil-collection-set-readonly-bindings 'mpdired-mode-map)
+  (dolist (mode evil-collection-mpdired-modes)
+    (evil-set-initial-state mode 'normal))
+
+  (evil-collection-define-key 'normal 'mpdired-mode-map
+    "j"         'mpdired-next-line
+    "k"         'mpdired-previous-line
+    "^"         'mpdired-goto-parent
+    "."         'mpdired-goto-current-song
+    "o"         'mpdired-toggle-view
+    "J"         'mpdired-next-internal
+    "K"         'mpdired-previous-internal
+    "a"         'mpdired-add
+    "d"         'mpdired-flag-at-point
+    "x"         'mpdired-execute
+    "D"         'mpdired-delete
+    "p"         'mpdired-pause-internal
+    (kbd "SPC") 'mpdired-pause-internal
+    "gv"        'mpdired-set-volume-internal
+    "ss"        'mpdired-stop
+    "sR"        'mpdired-toggle-repeat
+    "sr"        'mpdired-toggle-random
+    "sS"        'mpdired-toggle-single
+    "sc"        'mpdired-toggle-consume
+    "gc"        'mpdired-playlist-create
+    "ga"        'mpdired-playlist-append
+    "m"         'mpdired-mark-at-point
+    "M"         'mpdired-change-marks
+    "u"         'mpdired-unmark-at-point
+    "U"         'mpdired-unmark-all-marks
+    "T"         'mpdired-previous-unmark
+    "%d"        'mpdired-flag-files-regexp
+    "%m"        'mpdired-mark-files-regexp
+    "%i"        'mpdired-put-order-at-point
+    "%r"        'mpdired-reset-order-index)
+
+  (evil-collection-bind 'mpdired-mode-map
+                        'toggle 'mpdired-toggle-marks
+                        'toggle-all 'mpdired-toggle-marks
+                        'action 'mpdired-enter
+                        'refresh 'mpdired-update
+                        'refresh-all 'mpdired-db-update))
+
+(provide 'evil-collection-mpdired)
+;;; evil-collection-mpdired.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdired/evil-collection-mpdired.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdired/evil-collection-mpdired.elc
new file mode 100644
index 0000000..636d157
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mpdired/evil-collection-mpdired.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e-conversation/evil-collection-mu4e-conversation.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e-conversation/evil-collection-mu4e-conversation.el
new file mode 100644
index 0000000..eb8cd71
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e-conversation/evil-collection-mu4e-conversation.el
@@ -0,0 +1,78 @@
+;;; evil-collection-mu4e-conversation.el --- Evil bindings for mu4e-conversation -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 Pierre Neidhardt <mail@ambrevar.xyz>
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "24.4") (evil "1.2.10"))
+;; Keywords: evil, mu4e, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for mu4e-conversation.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'mu4e-conversation nil t)
+
+(defconst evil-collection-mu4e-conversation-maps '(mu4e-conversation-map
+                                                   mu4e-conversation-thread-map))
+
+(defvar evil-collection-mu4e-conversation--local-map-p nil
+  "Non-nil if last position was on a local-map property.")
+
+(defun evil-collection-mu4e-conversation--switch ()
+  "Re-compute the bindings if point has moved between the thread
+  area and the composition area."
+  (let ((local-map-here (get-text-property (point) 'local-map)))
+    (when (or (and evil-collection-mu4e-conversation--local-map-p
+                   (not local-map-here))
+              (and (not evil-collection-mu4e-conversation--local-map-p)
+                   local-map-here))
+      (evil-normalize-keymaps))
+    (setq evil-collection-mu4e-conversation--local-map-p local-map-here)))
+
+(defun evil-collection-mu4e-conversation--update-local-map ()
+  (setq evil-collection-mu4e-conversation--local-map-p (get-text-property (point) 'local-map))
+  (evil-normalize-keymaps)
+  (add-hook 'post-command-hook #'evil-collection-mu4e-conversation--switch nil t))
+
+;;;###autoload
+(defun evil-collection-mu4e-conversation-setup ()
+  "Set up `evil' bindings for `mu4e-conversation'."
+  ;; Evil does not update its current keymap state when it the point hits a
+  ;; local-map property is used.  See
+  ;; https://github.com/emacs-evil/evil/issues/301.  Thus we force the update
+  ;; with a technique similar to what `org~mu4e-mime-switch-headers-or-body'
+  ;; does.
+  (add-hook 'mu4e-conversation-hook #'evil-collection-mu4e-conversation--update-local-map)
+  (evil-collection-define-key 'normal 'mu4e-conversation-map
+    " " 'evil-scroll-page-down
+    (kbd "S-SPC") 'evil-scroll-page-up
+    "zv" 'mu4e-conversation-toggle-view
+    "za" 'mu4e-conversation-toggle-hide-cited)
+  (evil-collection-bind 'mu4e-conversation-map
+                        'next-item 'mu4e-conversation-next-message
+                        'prev-item 'mu4e-conversation-previous-message
+                        'next-section 'mu4e-conversation-next-message
+                        'prev-section 'mu4e-conversation-previous-message
+                        'quit 'mu4e-conversation-quit))
+
+(provide 'evil-collection-mu4e-conversation)
+;;; evil-collection-mu4e-conversation.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e-conversation/evil-collection-mu4e-conversation.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e-conversation/evil-collection-mu4e-conversation.elc
new file mode 100644
index 0000000..eecd0c4
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e-conversation/evil-collection-mu4e-conversation.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e-1.8.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e-1.8.el
new file mode 100644
index 0000000..1f0cb99
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e-1.8.el
@@ -0,0 +1,444 @@
+;;; evil-collection-mu4e.el --- Evil bindings for mu4e -*- lexical-binding: t -*-
+
+;; Copyright (C) 2015-2018 Joris Engbers
+;; Copyright (C) 2018 Pierre Neidhardt <mail@ambrevar.xyz>
+
+;; Author: Joris Engbers <info@jorisengbers.nl>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.9
+;; Package-Requires: ((emacs "24.4") (evil "1.2.10"))
+;; Keywords: evil, mu4e, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil keybindings for mu4e that make sense for Evil users.  The following
+;; keybindings are defined:
+;;
+;; General commands:
+;; | Commmand                 | evil-mu4e | Alternative |
+;; |--------------------------+-----------+-------------|
+;; | Jump to maildir          | J         |             |
+;; | Update                   | u         |             |
+;; | Compose message          | cc        | C           |
+;; | Kill update mail process | x         |             |
+
+;; Commands for header-mode and view-mode:
+;; | Command                         | evil-mu4e | Alternative |
+;; |---------------------------------+-----------+-------------|
+;; | Next message                    | C-j       |             |
+;; | Previous message                | C-k       |             |
+;; | Mark the current thread as read | T         |             |
+;; | Compose message                 | cc        | C           |
+;; | Compose edit**                  | ce        | E           |
+;; | Compose forward**               | cf        | F           |
+;; | Compose reply                   | cr        | R           |
+;; | Change sorting***               | o         | O           |
+;; | Rerun search                    | gr        |             |
+;; | Toggle include related          | zr        |             |
+;; | Toggle threading                | zt        |             |
+;; | Toggle hide cited               | za        |             |
+;; | Skip duplicates                 | zd        |             |
+;; | Show log                        | gl        |             |
+;; | Select other view               | gv        |             |
+;; | Save attachement(s)             | p         |             |
+;; | Save url                        | yu        |             |
+;; | Go to url                       | gx        |             |
+;; | Fetch url                       | gX        |             |
+;;
+;;  - * denotes only in header-mode
+;;  - ** denotes Alternative only in header-mode
+;;  - *** denotes Alternative only in view-mode
+;;
+;;; Code:
+
+(require 'evil-collection)
+(require 'mu4e nil t)
+
+(declare-function mu4e--main-action-str "mu4e-main")
+(declare-function mu4e--main-view-queue "mu4e-main")
+(declare-function mu4e--longest-of-maildirs-and-bookmarks "mu4e-main")
+(declare-function mu4e--longest-of-maildirs-and-bookmarks "mu4e-main")
+(declare-function mu4e--maildirs-with-query "mu4e-folders")
+(defvar mu4e--server-props)
+(defvar mu4e-main-hide-fully-read)
+
+(defun evil-collection-mu4e--main-action-str (&rest args)
+  "Wrapper for `mu4e--main-action-str' to maintain compatibility
+with older release versions of `mu4e.'"
+  (apply (if (fboundp 'mu4e~main-action-str)
+             #'mu4e~main-action-str
+           #'mu4e--main-action-str)
+         args))
+
+(defun evil-collection-mu4e--main-view-queue (&rest args)
+  "Wrapper for `mu4e--main-view-queue' to maintain compatibility
+with older release versions of `mu4e.'"
+  (apply (if (fboundp 'mu4e~main-view-queue)
+             #'mu4e~main-view-queue
+           #'mu4e--main-view-queue)
+         args))
+
+(defvar smtpmail-send-queued-mail)
+(defvar smtpmail-queue-dir)
+
+(defconst evil-collection-mu4e-maps '(mu4e-main-mode-map
+                                      mu4e-headers-mode-map
+                                      mu4e-view-mode-map
+                                      mu4e-compose-mode-map))
+
+
+
+(defun evil-collection-mu4e-set-state ()
+  "Set the appropriate initial state of all mu4e modes."
+  (dolist (mode '(mu4e-main-mode
+                  mu4e-headers-mode
+                  mu4e-view-mode
+                  mu4e-org-mode))
+    (evil-set-initial-state mode 'normal))
+  (evil-set-initial-state 'mu4e-compose-mode 'insert))
+
+;; When using org-mu4e, the above leads to an annoying behaviour, because
+;; switching from message body to header activates mu4e-compose-mode, thus
+;; putting the user into insert-state. The below code, together with the hooks
+;; set in evil-collection-mu4e-setup fixes this issue.
+(defun evil-collection-mu4e-org-set-header-to-normal-mode ()
+  (evil-set-initial-state 'mu4e-compose-mode 'normal))
+
+(defun evil-collection-mu4e-org-set-header-to-insert-mode ()
+  (evil-set-initial-state 'mu4e-compose-mode 'insert))
+
+
+;;; Define bindings
+
+;; TODO: Inhibit insert-state functions as per Evil Collection.
+(defvar evil-collection-mu4e-mode-normal-map-bindings
+  `((mu4e-main-mode-map
+     "J" mu4e~headers-jump-to-maildir
+     "j" next-line
+     "k" previous-line
+     "u" mu4e-update-mail-and-index
+     "b" mu4e-search-bookmark
+     "B" mu4e-search-bookmark-edit
+     "N" mu4e-news
+     ";" mu4e-context-switch
+     "H" mu4e-display-manual
+     "C" mu4e-compose-new
+     "cc" mu4e-compose-new
+     "x" mu4e-kill-update-mail
+     "A" mu4e-about
+     "f" smtpmail-send-queued-mail
+     "m" mu4e--main-toggle-mail-sending-mode
+     "s" mu4e-search)
+
+    (mu4e-headers-mode-map
+     "J" mu4e~headers-jump-to-maildir
+     "C" mu4e-compose-new
+     "E" mu4e-compose-edit
+     "F" mu4e-compose-forward
+     "R" mu4e-compose-reply
+     "cc" mu4e-compose-new
+     "ce" mu4e-compose-edit
+     "cf" mu4e-compose-forward
+     "cr" mu4e-compose-reply
+     "o" mu4e-headers-change-sorting
+     "j" mu4e-headers-next
+     "k" mu4e-headers-prev
+     "b" mu4e-search-bookmark
+     "B" mu4e-search-bookmark-edit
+     ";" mu4e-context-switch
+     "/" mu4e-search-narrow
+     "s" mu4e-search
+     "S" mu4e-search-edit
+     "x" mu4e-mark-execute-all
+     "a" mu4e-headers-action
+     "*" mu4e-headers-mark-for-something ; TODO: Don't override evil-seach-word-forward?
+     "&" mu4e-headers-mark-custom
+     "A" mu4e-headers-mark-for-action
+     "m" mu4e-headers-mark-for-move
+     "r" mu4e-headers-mark-for-refile
+     "D" mu4e-headers-mark-for-delete
+     "d" mu4e-headers-mark-for-trash
+     "=" mu4e-headers-mark-for-untrash
+     "u" mu4e-headers-mark-for-unmark
+     "U" mu4e-mark-unmark-all
+     "?" mu4e-headers-mark-for-unread
+     "!" mu4e-headers-mark-for-read
+     "%" mu4e-headers-mark-pattern
+     "+" mu4e-headers-mark-for-flag
+     "-" mu4e-headers-mark-for-unflag
+     "zr" mu4e-headers-toggle-include-related
+     "zt" mu4e-headers-toggle-threading
+     "zd" mu4e-headers-toggle-skip-duplicates
+     "gl" mu4e-show-log
+     "gv" mu4e-select-other-view
+     "T" (lambda ()
+           (interactive)
+           (mu4e-headers-mark-thread nil '(read))))
+
+    (mu4e-compose-mode-map
+     "gg" mu4e-compose-goto-top
+     "G" mu4e-compose-goto-bottom
+     "ZD" message-dont-send
+     "ZF" mml-attach-file)
+
+    (mu4e-view-mode-map
+     " " mu4e-view-scroll-up-or-next
+     "gX" mu4e-view-fetch-url
+     "C" mu4e-compose-new
+     "H" mu4e-view-toggle-html
+     ;; "E"               mu4e-compose-edit
+     ;; "F"               mu4e-compose-forward
+     "R" mu4e-compose-reply
+     "cc" mu4e-compose-new
+     "ce" mu4e-compose-edit
+     "cf" mu4e-compose-forward
+     "cr" mu4e-compose-reply
+     "p" mu4e-view-save-attachments
+     "O" mu4e-headers-change-sorting
+     "A" mu4e-view-mime-part-action ; Since 1.6, uses gnus view by default
+     "a" mu4e-view-action
+     "J" mu4e~headers-jump-to-maildir
+     "x" mu4e-view-marked-execute
+     "&" mu4e-view-mark-custom
+     "*" mu4e-view-mark-for-something   ; TODO: Don't override "*".
+     "m" mu4e-view-mark-for-move
+     "r" mu4e-view-mark-for-refile
+     "D" mu4e-view-mark-for-delete
+     "d" mu4e-view-mark-for-trash
+     "=" mu4e-view-mark-for-untrash
+     "u" mu4e-view-unmark
+     "U" mu4e-view-unmark-all
+     "?" mu4e-view-mark-for-unread
+     "!" mu4e-view-mark-for-read
+     "%" mu4e-view-mark-pattern
+     "+" mu4e-view-mark-for-flag
+     "-" mu4e-view-mark-for-unflag
+     "zr" mu4e-headers-toggle-include-related
+     "zt" mu4e-headers-toggle-threading
+     "za" mu4e-view-toggle-hide-cited
+     "gl" mu4e-show-log
+     "s" mu4e-view-search-edit
+     "|" mu4e-view-pipe
+     "." mu4e-view-raw-message
+     ,(kbd "C--") mu4e-headers-split-view-shrink
+     ,(kbd "C-+") mu4e-headers-split-view-grow
+     "T" (lambda ()
+           (interactive)
+           (mu4e-headers-mark-thread nil '(read)))
+     ,@(when evil-want-C-u-scroll
+         '("\C-u" evil-scroll-up))))
+  "All evil-mu4e bindings for evil normal mode.")
+
+  (defvar evil-collection-mu4e-mode-visual-map-bindings
+    `((mu4e-headers-mode-map
+       "*" mu4e-headers-mark-for-something
+       "A" mu4e-headers-mark-for-action
+       "m" mu4e-headers-mark-for-move
+       "r" mu4e-headers-mark-for-refile
+       "D" mu4e-headers-mark-for-delete
+       "d" mu4e-headers-mark-for-trash
+       "=" mu4e-headers-mark-for-untrash
+       "u" mu4e-headers-mark-for-unmark
+       "?" mu4e-headers-mark-for-unread
+       "!" mu4e-headers-mark-for-read
+       "+" mu4e-headers-mark-for-flag
+       "-" mu4e-headers-mark-for-unflag)
+
+      (mu4e-compose-mode-map
+       "gg" mu4e-compose-goto-top
+       "G" mu4e-compose-goto-bottom))
+    "All evil-mu4e bindings for evil visual mode.")
+
+(defun evil-collection-mu4e-set-bindings ()
+  "Set the bindings."
+  ;; WARNING: With lexical binding, lambdas from `mapc' and `dolist' become
+  ;; closures in which we must use `evil-define-key*' instead of
+  ;; `evil-define-key'.
+  (dolist (binding evil-collection-mu4e-mode-normal-map-bindings)
+    (apply #'evil-collection-define-key 'normal binding))
+  (dolist (binding evil-collection-mu4e-mode-visual-map-bindings)
+    (apply #'evil-collection-define-key 'visual binding))
+  (evil-set-command-property 'mu4e-compose-goto-bottom :keep-visual t)
+  (evil-set-command-property 'mu4e-compose-goto-top :keep-visual t)
+
+  (evil-collection-bind 'mu4e-headers-mode-map
+                        'next-item 'mu4e-headers-next-unread
+                        'prev-item 'mu4e-headers-prev-unread
+                        'next-section 'mu4e-headers-next-unread
+                        'prev-section 'mu4e-headers-prev-unread
+                        'next-section-2 'mu4e-headers-next
+                        'prev-section-2 'mu4e-headers-prev
+                        'action 'mu4e-headers-view-message)
+
+  (evil-collection-bind 'mu4e-main-mode-map
+                        'refresh 'revert-buffer
+                        'quit 'mu4e-quit)
+  (evil-collection-bind 'mu4e-headers-mode-map
+                        'refresh 'mu4e-search-rerun
+                        'quit 'mu4e~headers-quit-buffer)
+  (evil-collection-bind 'mu4e-compose-mode-map
+                        'quit-save 'message-send-and-exit
+                        'quit-cancel 'mu4e-message-kill-buffer)
+
+  (evil-collection-bind 'mu4e-view-mode-map
+                        'cycle-next 'shr-next-link
+                        'cycle-previous 'shr-previous-link
+                        'next-item 'mu4e-view-headers-next-unread
+                        'prev-item 'mu4e-view-headers-prev-unread
+                        'next-section 'mu4e-view-headers-next-unread
+                        'prev-section 'mu4e-view-headers-prev-unread
+                        'next-section-2 'mu4e-view-headers-next
+                        'prev-section-2 'mu4e-view-headers-prev
+                        'browse-url 'mu4e-view-go-to-url
+                        'quit 'mu4e~view-quit-buffer)
+
+  ;; yu
+  (evil-collection-define-operator-key 'yank 'mu4e-view-mode-map
+    "u" 'mu4e-view-save-url))
+
+
+;;; Update mu4e-main-view
+;;; To avoid confusion the main-view is updated to show the keys that are in use
+;;; for evil-mu4e.
+
+(defvar evil-collection-mu4e-begin-region-basic "\n  Basics"
+  "The place where to start overriding Basic section.")
+
+(defvar evil-collection-mu4e-end-region-basic "a new message\n"
+  "The place where to end overriding Basic section.")
+
+(defvar evil-collection-mu4e-new-region-basic
+  (concat (evil-collection-mu4e--main-action-str "\t* [J]ump to some maildir\n" 'mu4e-jump-to-maildir)
+          (evil-collection-mu4e--main-action-str "\t* enter a [s]earch query\n" 'mu4e-search)
+          (evil-collection-mu4e--main-action-str "\t* [C]ompose a new message\n" 'mu4e-compose-new))
+  "Define the evil-mu4e Basic region.")
+
+(defvar evil-collection-mu4e-begin-region-misc "\n  Misc"
+  "The place where to start overriding Misc section.")
+
+(defvar evil-collection-mu4e-end-region-misc "q]uit"
+  "The place where to end overriding Misc section.")
+
+(defun evil-collection-mu4e-new-region-misc ()
+  "Define the evil-mu4e Misc region."
+  (concat
+   (evil-collection-mu4e--main-action-str "\t* [;]Switch focus\n" 'mu4e-context-switch)
+   (evil-collection-mu4e--main-action-str "\t* [u]pdate email & database\n"
+                                          'mu4e-update-mail-and-index)
+
+   ;; show the queue functions if `smtpmail-queue-dir' is defined
+   (if (file-directory-p smtpmail-queue-dir)
+       (evil-collection-mu4e--main-view-queue)
+     "")
+   "\n"
+
+   (evil-collection-mu4e--main-action-str "\t* [N]ews\n" 'mu4e-news)
+   (evil-collection-mu4e--main-action-str "\t* [A]bout mu4e\n" 'mu4e-about)
+   (evil-collection-mu4e--main-action-str "\t* [H]elp\n" 'mu4e-display-manual)
+   (evil-collection-mu4e--main-action-str "\t* [q]uit\n" 'mu4e-quit)))
+
+(defvar evil-collection-mu4e-begin-region-maildir "\n  Maildirs"
+  "The place where to end overriding Maildirs section.")
+
+(defvar evil-collection-mu4e-end-region-maildir "\n\n  Misc"
+  "The place where to end overriding Maildirs section.")
+
+(defun evil-collection-mu4e-new-region-maildir ()
+  "Define the evil-mu4e Maildirs region."
+  (concat
+   ;; minorly edited version of mu4e--main-bookmarks mu4e-main.el
+   (cl-loop with mds = (mu4e--maildirs-with-query)
+            with longest = (mu4e--longest-of-maildirs-and-bookmarks)
+            with queries = (plist-get mu4e--server-props :queries)
+            for m in mds
+            for key = (string (plist-get m :key))
+            for name = (plist-get m :name)
+            for query = (plist-get m :query)
+            for qcounts = (and (stringp query)
+                               (cl-loop for q in queries
+                                        when (string=
+                                              (decode-coding-string
+                                               (plist-get q :query)
+                                               'utf-8 t)
+                                              query)
+                                        collect q))
+            for unread = (and qcounts (plist-get (car qcounts) :unread))
+            when (not (plist-get m :hide))
+            when (not (and mu4e-main-hide-fully-read (eq unread 0)))
+            concat (concat
+                    ;; menu entry
+                    (evil-collection-mu4e--main-action-str
+                     (concat "\t* [J" key "] " name)
+                     (concat "J" key))
+                    ;; append all/unread numbers, if available.
+                    (if qcounts
+                        (let ((unread (plist-get (car qcounts) :unread))
+                              (count (plist-get (car qcounts) :count)))
+                          (format
+                           "%s (%s/%s)"
+                           (make-string (- longest (string-width name)) ? )
+                           (propertize (number-to-string unread)
+                                       'face 'mu4e-header-key-face)
+                           count))
+                      "")
+                    "\n"))
+(propertize "\n  Misc" 'face 'mu4e-title-face)))
+
+(defun evil-collection-mu4e-replace-region (new-region start end)
+  "Replace region between START and END with NEW-REGION.
+START end END end are regular expressions."
+  ;; move to start of region
+  (goto-char (point-min))
+  (re-search-forward start)
+
+  ;; insert new headings
+  (insert "\n\n")
+  (insert new-region)
+  ;; Delete text until end of region.
+  (let ((start-point (point))
+        (end-point (re-search-forward end)))
+    (delete-region start-point end-point)))
+
+(defun evil-collection-mu4e-update-main-view ()
+  "Update `Basic', `Maildir', and `Misc' regions to reflect the new keybindings."
+  (evil-collection-mu4e-replace-region evil-collection-mu4e-new-region-basic
+                                       evil-collection-mu4e-begin-region-basic
+                                       evil-collection-mu4e-end-region-basic)
+  (evil-collection-mu4e-replace-region (evil-collection-mu4e-new-region-misc)
+                                       evil-collection-mu4e-begin-region-misc
+                                       evil-collection-mu4e-end-region-misc)
+  (evil-collection-mu4e-replace-region (evil-collection-mu4e-new-region-maildir)
+                                       evil-collection-mu4e-begin-region-maildir
+                                       evil-collection-mu4e-end-region-maildir))
+
+
+;;; Initialize evil-collection-mu4e
+
+;;;###autoload
+(defun evil-collection-mu4e-setup ()
+  "Initialize evil-mu4e if necessary.
+If mu4e-main-mode is in evil-state-motion-modes, initialization
+is already done earlier."
+    (evil-collection-mu4e-set-state)
+    (evil-collection-mu4e-set-bindings)
+    (evil-collection-bind 'mu4e-headers-mode-map 'jump 'mu4e~headers-jump-to-maildir)
+    (add-hook 'mu4e-main-mode-hook #'evil-collection-mu4e-update-main-view)
+    (add-hook 'org-mode-hook #'evil-collection-mu4e-org-set-header-to-normal-mode)
+    (add-hook 'mu4e-compose-pre-hook #'evil-collection-mu4e-org-set-header-to-insert-mode))
+
+(provide 'evil-collection-mu4e)
+;;; evil-collection-mu4e.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e-1.8.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e-1.8.elc
new file mode 100644
index 0000000..f89b413
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e-1.8.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e.el
new file mode 100644
index 0000000..3035ea5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e.el
@@ -0,0 +1,353 @@
+;;; evil-collection-mu4e.el --- Evil bindings for mu4e -*- lexical-binding: t -*-
+
+;; Copyright (C) 2015-2018 Joris Engbers
+;; Copyright (C) 2018 Pierre Neidhardt <mail@ambrevar.xyz>
+
+;; Author: Joris Engbers <info@jorisengbers.nl>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.9
+;; Package-Requires: ((emacs "24.4") (evil "1.2.10"))
+;; Keywords: evil, mu4e, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil keybindings for mu4e that make sense for Evil users.  The following
+;; keybindings are defined:
+;;
+;; General commands:
+;; | Commmand                 | evil-mu4e | Alternative |
+;; |--------------------------+-----------+-------------|
+;; | Jump to maildir          | J         |             |
+;; | Update                   | u         |             |
+;; | Compose message          | cc        | C           |
+;; | Kill update mail process | x         |             |
+
+;; Commands for header-mode and view-mode:
+;; | Command                         | evil-mu4e | Alternative |
+;; |---------------------------------+-----------+-------------|
+;; | Next message                    | C-j       |             |
+;; | Previous message                | C-k       |             |
+;; | Mark the current thread as read | T         |             |
+;; | Compose message                 | cc        | C           |
+;; | Compose edit**                  | ce        | E           |
+;; | Compose forward**               | cf        | F           |
+;; | Compose reply                   | cr        | R           |
+;; | Change sorting***               | o         | O           |
+;; | Rerun search                    | gr        |             |
+;; | Toggle include related          | zr        |             |
+;; | Toggle threading                | zt        |             |
+;; | Toggle hide cited               | za        |             |
+;; | Skip duplicates                 | zd        |             |
+;; | Show log                        | gl        |             |
+;; | Select other view               | gv        |             |
+;; | Save attachement(s)             | p         |             |
+;; | Save url                        | yu        |             |
+;; | Go to url                       | gx        |             |
+;; | Fetch url                       | gX        |             |
+;;
+;;  - * denotes only in header-mode
+;;  - ** denotes Alternative only in header-mode
+;;  - *** denotes Alternative only in view-mode
+;;
+;;; Code:
+
+(require 'evil-collection)
+(require 'message)
+(require 'mu4e nil t)
+
+(defvar mu4e-mu-version)
+(declare-function evil-collection-mu4e-set-bindings "evil-collection-mu4e")
+(declare-function evil-collection-mu4e-set-state "evil-collection-mu4e")
+(declare-function mu4e-headers-mark-thread "mu4e-headers")
+
+(if (version< mu4e-mu-version "1.10")
+    (require 'evil-collection-mu4e
+             (expand-file-name "modes/mu4e/evil-collection-mu4e-1.8" evil-collection-base-dir))
+
+
+  (defconst evil-collection-mu4e-maps '(mu4e-main-mode-map
+                                        mu4e-headers-mode-map
+                                        mu4e-view-mode-map
+                                        mu4e-compose-mode-map
+                                        mu4e-search-minor-mode-map
+                                        mu4e-thread-mode-map))
+
+  (defun evil-collection-mu4e-set-state ()
+    "Set the appropriate initial state of all mu4e modes."
+    (dolist (mode '(mu4e-main-mode
+                    mu4e-headers-mode
+                    mu4e-view-mode
+                    mu4e-org-mode))
+      (evil-set-initial-state mode 'normal))
+    (evil-set-initial-state 'mu4e-compose-mode 'insert))
+
+  ;; These functions were removed from mu4e 1.12.0, specifically this commit:
+  ;; https://github.com/djcb/mu/commit/85bfe763362b95935a3967f6585e14b3f9890a70
+  ;; They were also re-added in version 1.12.2.
+  (when (and (version<= "1.12.0" mu4e-mu-version)
+             (version< mu4e-mu-version "1.12.2"))
+    (defun mu4e-compose-goto-top ()
+      "Go to the beginning of the message or buffer.
+Go to the beginning of the message or, if already there, go to the
+beginning of the buffer."
+      (interactive)
+      (let ((old-position (point)))
+        (message-goto-body)
+        (when (= (point) old-position)
+          (goto-char (point-min)))))
+
+    (defun mu4e-compose-goto-bottom ()
+      "Go to the end of the message or buffer.
+Go to the end of the message (before signature) or, if already there, go to the
+end of the buffer."
+      (interactive)
+      (let ((old-position (point))
+            (message-position (save-excursion (message-goto-body) (point))))
+        (goto-char (point-max))
+        (when (re-search-backward message-signature-separator message-position t)
+          (forward-line -1))
+        (when (= (point) old-position)
+          (goto-char (point-max))))))
+
+  ;; When using org-mu4e, the above leads to an annoying behaviour, because
+  ;; switching from message body to header activates mu4e-compose-mode, thus
+  ;; putting the user into insert-state. The below code, together with the hooks
+  ;; set in evil-collection-mu4e-setup fixes this issue.
+  (defun evil-collection-mu4e-org-set-header-to-normal-mode ()
+    "Set initial state in `mu4e-compose-mode' to \='normal."
+    (evil-set-initial-state 'mu4e-compose-mode 'normal))
+
+  (defun evil-collection-mu4e-org-set-header-to-insert-mode ()
+    "Set initial state in `mu4e-compose-mode' to \='insert."
+    (evil-set-initial-state 'mu4e-compose-mode 'insert))
+
+  (defun evil-collection-mu4e-mark-thread-as-read ()
+    (interactive)
+    (mu4e-headers-mark-thread nil '(read)))
+
+  (defvar evil-collection-mu4e-mode-normal-map-bindings
+    `((mu4e-main-mode-map
+       "J" mu4e~headers-jump-to-maildir
+       "j" next-line
+       "k" previous-line
+       "u" mu4e-update-mail-and-index
+       "b" mu4e-search-bookmark
+       "B" mu4e-search-bookmark-edit
+       "N" mu4e-news
+       ";" mu4e-context-switch
+       "H" mu4e-display-manual
+       "C" mu4e-compose-new
+       "cc" mu4e-compose-new
+       "x" mu4e-kill-update-mail
+       "A" mu4e-about
+       "f" smtpmail-send-queued-mail
+       "m" mu4e--main-toggle-mail-sending-mode
+       "s" mu4e-search
+       "Q" mu4e-search-query)
+
+      (mu4e-headers-mode-map
+       "J" mu4e~headers-jump-to-maildir
+       "C" mu4e-compose-new
+       "E" mu4e-compose-edit
+       "F" mu4e-compose-forward
+       "R" mu4e-compose-reply
+       "cc" mu4e-compose-new
+       "ce" mu4e-compose-edit
+       "cf" mu4e-compose-forward
+       "cr" mu4e-compose-reply
+       "cw" mu4e-compose-wide-reply
+       "W" mu4e-compose-wide-reply
+       "o" mu4e-headers-change-sorting
+       "j" mu4e-headers-next
+       "k" mu4e-headers-prev
+       "b" mu4e-search-bookmark
+       "B" mu4e-search-bookmark-edit
+       ";" mu4e-context-switch
+       "/" mu4e-search-narrow
+       "s" mu4e-search
+       "S" mu4e-search-edit
+       "x" mu4e-mark-execute-all
+       "a" mu4e-headers-action
+       "*" mu4e-headers-mark-for-something ; TODO: Don't override evil-seach-word-forward?
+       "&" mu4e-headers-mark-custom
+       "A" mu4e-headers-mark-for-action
+       "m" mu4e-headers-mark-for-move
+       "r" mu4e-headers-mark-for-refile
+       "D" mu4e-headers-mark-for-delete
+       "d" mu4e-headers-mark-for-trash
+       "=" mu4e-headers-mark-for-untrash
+       "u" mu4e-headers-mark-for-unmark
+       "U" mu4e-mark-unmark-all
+       "?" mu4e-headers-mark-for-unread
+       "!" mu4e-headers-mark-for-read
+       "%" mu4e-headers-mark-pattern
+       "+" mu4e-headers-mark-for-flag
+       "-" mu4e-headers-mark-for-unflag
+       "}" mu4e-headers-next-thread
+       "{" mu4e-headers-prev-thread
+       "t" mu4e-headers-toggle-property
+       "zr" mu4e-headers-toggle-include-related
+       "zt" mu4e-headers-toggle-threading
+       "zd" mu4e-headers-toggle-skip-duplicates
+       "gl" mu4e-show-log
+       "gv" mu4e-select-other-view
+       "T"  evil-collection-mu4e-mark-thread-as-read
+       "Q" mu4e-search-query)
+
+      (mu4e-compose-mode-map
+       "gg" mu4e-compose-goto-top
+       "G" mu4e-compose-goto-bottom
+       "ZD" message-dont-send
+       "ZF" mml-attach-file)
+
+      (mu4e-search-minor-mode-map
+       "J" mu4e-search-maildir)
+
+      (mu4e-thread-mode-map
+       [S-left] mu4e-thread-goto-root
+       [C-tab] mu4e-thread-fold-toggle-goto-next
+       [backtab] mu4e-thread-fold-toggle-all)
+
+      (mu4e-view-mode-map
+       " " mu4e-view-scroll-up-or-next
+       "gX" mu4e-view-fetch-url
+       "C" mu4e-compose-new
+       "H" mu4e-view-toggle-html
+       ;; "E"               mu4e-compose-edit
+       ;; "F"               mu4e-compose-forward
+       "R" mu4e-compose-reply
+       "cc" mu4e-compose-new
+       "ce" mu4e-compose-edit
+       "cf" mu4e-compose-forward
+       "cr" mu4e-compose-reply
+       "cw" mu4e-compose-wide-reply
+       "p" mu4e-view-save-attachments
+       "O" mu4e-headers-change-sorting
+       "A" mu4e-view-mime-part-action   ; Since 1.6, uses gnus view by default
+       "a" mu4e-view-action
+       "J" mu4e~headers-jump-to-maildir
+       "x" mu4e-view-marked-execute
+       "&" mu4e-view-mark-custom
+       "*" mu4e-view-mark-for-something ; TODO: Don't override "*".
+       "m" mu4e-view-mark-for-move
+       "r" mu4e-view-mark-for-refile
+       "D" mu4e-view-mark-for-delete
+       "d" mu4e-view-mark-for-trash
+       "=" mu4e-view-mark-for-untrash
+       "u" mu4e-view-unmark
+       "U" mu4e-view-unmark-all
+       "?" mu4e-view-mark-for-unread
+       "!" mu4e-view-mark-for-read
+       "%" mu4e-view-mark-pattern
+       "+" mu4e-view-mark-for-flag
+       "-" mu4e-view-mark-for-unflag
+       "zr" mu4e-headers-toggle-include-related
+       "zt" mu4e-headers-toggle-threading
+       "za" mu4e-view-toggle-hide-cited
+       "gl" mu4e-show-log
+       "s" mu4e-view-search-edit
+       "|" mu4e-view-pipe
+       "." mu4e-view-raw-message
+       ,(kbd "C--") mu4e-headers-split-view-shrink
+       ,(kbd "C-+") mu4e-headers-split-view-grow
+       ,@(when evil-want-C-u-scroll
+           '("\C-u" evil-scroll-up))))
+    "All evil-mu4e bindings for evil normal mode.")
+
+  (defvar evil-collection-mu4e-mode-visual-map-bindings
+    `((mu4e-headers-mode-map
+       "*" mu4e-headers-mark-for-something
+       "A" mu4e-headers-mark-for-action
+       "m" mu4e-headers-mark-for-move
+       "r" mu4e-headers-mark-for-refile
+       "D" mu4e-headers-mark-for-delete
+       "d" mu4e-headers-mark-for-trash
+       "=" mu4e-headers-mark-for-untrash
+       "u" mu4e-headers-mark-for-unmark
+       "?" mu4e-headers-mark-for-unread
+       "!" mu4e-headers-mark-for-read
+       "+" mu4e-headers-mark-for-flag
+       "-" mu4e-headers-mark-for-unflag)
+
+      (mu4e-compose-mode-map
+       "gg" mu4e-compose-goto-top
+       "G" mu4e-compose-goto-bottom))
+    "All evil-mu4e bindings for evil visual mode.")
+
+  (defun evil-collection-mu4e-set-bindings ()
+    "Set the bindings."
+    ;; WARNING: With lexical binding, lambdas from `mapc' and `dolist' become
+    ;; closures in which we must use `evil-define-key*' instead of
+    ;; `evil-define-key'.
+    (dolist (binding evil-collection-mu4e-mode-normal-map-bindings)
+      (apply #'evil-collection-define-key 'normal binding))
+    (dolist (binding evil-collection-mu4e-mode-visual-map-bindings)
+      (apply #'evil-collection-define-key 'visual binding))
+    (evil-set-command-property 'mu4e-compose-goto-bottom :keep-visual t)
+    (evil-set-command-property 'mu4e-compose-goto-top :keep-visual t)
+
+    (evil-collection-bind 'mu4e-headers-mode-map
+                          'next-item 'mu4e-headers-next-unread
+                          'prev-item 'mu4e-headers-prev-unread
+                          'next-section 'mu4e-headers-next-unread
+                          'prev-section 'mu4e-headers-prev-unread
+                          'next-section-2 'mu4e-headers-next
+                          'prev-section-2 'mu4e-headers-prev
+                          'action 'mu4e-headers-view-message)
+    (evil-collection-bind 'mu4e-thread-mode-map 'section-toggle 'mu4e-thread-fold-toggle)
+
+    (evil-collection-bind 'mu4e-main-mode-map
+                          'refresh 'revert-buffer
+                          'quit 'mu4e-quit)
+    (evil-collection-bind 'mu4e-headers-mode-map
+                          'refresh 'mu4e-search-rerun
+                          'quit 'mu4e~headers-quit-buffer)
+    (evil-collection-bind 'mu4e-compose-mode-map
+                          'quit-save (function-get 'mu4e-user-agent 'sendfunc)
+                          'quit-cancel (function-get 'mu4e-user-agent 'abortfunc))
+
+    (evil-collection-bind 'mu4e-view-mode-map
+                          'next-button 'forward-button
+                          'previous-button 'backward-button
+                          'next-item 'mu4e-view-headers-next-unread
+                          'prev-item 'mu4e-view-headers-prev-unread
+                          'next-section 'mu4e-view-headers-next-unread
+                          'prev-section 'mu4e-view-headers-prev-unread
+                          'next-section-2 'mu4e-view-headers-next
+                          'prev-section-2 'mu4e-view-headers-prev
+                          'browse-url 'mu4e-view-go-to-url
+                          'quit 'mu4e-view-quit)
+
+    ;; yu
+    (evil-collection-define-operator-key 'yank 'mu4e-view-mode-map
+      "u" 'mu4e-view-save-url))
+
+
+
+
+  (defun evil-collection-mu4e-setup ()
+    "Initialize evil-mu4e if necessary.
+If `mu4e-main-mode' is in `evil-state-motion-modes', initialization
+is already done earlier."
+    (evil-collection-mu4e-set-state)
+    (evil-collection-mu4e-set-bindings)
+    (evil-collection-bind 'mu4e-headers-mode-map 'jump 'mu4e~headers-jump-to-maildir))
+
+  (add-hook 'mu4e-thread-mode-hook #'evil-normalize-keymaps)
+
+  (provide 'evil-collection-mu4e))
+;;; evil-collection-mu4e.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e.elc
new file mode 100644
index 0000000..74dcc7a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/mu4e/evil-collection-mu4e.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/neotree/evil-collection-neotree.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/neotree/evil-collection-neotree.el
new file mode 100644
index 0000000..b1e20ef
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/neotree/evil-collection-neotree.el
@@ -0,0 +1,102 @@
+;;; evil-collection-neotree.el --- Evil bindings for neotree -*- lexical-binding: t; no-byte-compile: t; -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Maximiliano Sandoval <msandova@protonmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, neotree, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `neotree'
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'neotree nil t)
+
+(declare-function neotree-make-executor "neotree.el")
+(defconst evil-collection-neotree-maps '(neotree-mode-map))
+
+;;;###autoload
+(defun evil-collection-neotree-setup ()
+  "Set up `evil' bindings for `neotree'."
+
+  (evil-set-initial-state 'neotree-mode 'normal) ;; Neotree start in normal by default.
+
+  (evil-collection-bind 'neotree-mode-map 'rename 'neotree-rename-node)
+
+  (evil-collection-define-key 'normal 'neotree-mode-map
+
+    (kbd "<tab>") (neotree-make-executor
+                   :dir-fn 'neo-open-dir)
+    "z" (neotree-make-executor
+         :dir-fn 'neo-open-dir)
+    "gd" (neotree-make-executor
+          :dir-fn 'neo-open-dired)
+    "gD" (neotree-make-executor
+          :dir-fn 'neo-open-dired)
+    "H" 'neotree-hidden-file-toggle
+    "gh" 'neotree-hidden-file-toggle
+    "gv" 'neotree-open-file-in-system-application
+    "c" 'neotree-create-node
+    "y" 'neotree-copy-node
+    "r" 'neotree-change-root
+    "J" 'neotree-dir
+    "+" 'neotree-stretch-toggle
+    "=" 'neotree-stretch-toggle
+    "ge" 'neotree-enter
+    "j" 'neotree-next-line
+    "k" 'neotree-previous-line
+
+    ;; Unchanged keybings.
+    "a" (neotree-make-executor
+         :file-fn 'neo-open-file-ace-window)
+    "|" (neotree-make-executor
+         :file-fn 'neo-open-file-vertical-split)
+    "-" (neotree-make-executor
+         :file-fn 'neo-open-file-horizontal-split)
+    "S" 'neotree-select-previous-sibling-node
+    "s" 'neotree-select-next-sibling-node
+    (kbd "C-c C-c") 'neotree-change-root
+    (kbd "C-x 1") 'neotree-empty-fn
+    (kbd "C-x 2") 'neotree-empty-fn
+    (kbd "C-x 3") 'neotree-empty-fn
+    (kbd "C-x C-f") 'find-file-other-window
+    (kbd "C-c C-f") 'find-file-other-window)
+  (evil-collection-bind 'neotree-mode-map
+                        'action (neotree-make-executor
+                                 :file-fn 'neo-open-file
+                                 :dir-fn 'neo-open-dir)
+                        'action-other (neotree-make-executor
+                                       :file-fn 'neo-open-file
+                                       :dir-fn 'neo-open-dir)
+                        'action-stay 'neotree-quick-look
+                        'next-item 'neotree-select-down-node
+                        'prev-item 'neotree-select-up-node
+                        'next-section 'neotree-select-down-node
+                        'prev-section 'neotree-select-up-node
+                        'quit 'neotree-hide
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window
+                        'refresh 'neotree-refresh
+                        'delete 'neotree-delete-node))
+
+(provide 'evil-collection-neotree)
+;;; evil-collection-neotree.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/newsticker/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/newsticker/README.org
new file mode 100644
index 0000000..4c73530
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/newsticker/README.org
@@ -0,0 +1,56 @@
+* newsticker
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/newsticker/index.html][newsticker]], the built-in RSS / Atom reader.
+
+** Key bindings
+
+*** newsticker-mode-map (plainview)
+
+    | Command                                     | Original | Evil |
+    |---------------------------------------------+----------+------|
+    | =newsticker-previous-feed=                  | =F=      | =gk= |
+    | =newsticker-next-feed=                      | =f=      | =gj= |
+    | =newsticker-mark-item-at-point-as-read=     | =o=      | =r=  |
+    | =newsticker-mark-item-at-point-as-immortal= | =i=      | =i=  |
+    | =newsticker-show-old-items=                 | =s O=    | =o=  |
+    | =newsticker-hide-old-items=                 | =h O=    | =O=  |
+    | =newsticker-buffer-force-update=            | =U=      | =gr= |
+    | =newsticker-get-all-news=                   | =G=      | =gR= |
+    | =newsticker-close-buffer=                   | =q=      | =q=  |
+
+*** newsticker-treeview-mode-map
+
+    | Command                                         | Original     | Evil         |
+    |-------------------------------------------------+--------------+--------------|
+    | =newsticker-treeview-prev-feed=                 | =F=          | =[[=         |
+    | =newsticker-treeview-next-feed=                 | =f=          | =]]=         |
+    | =newsticker-treeview-next-item=                 | =n=          | =M-j=        |
+    | =newsticker-treeview-prev-item=                 | =p=          | =M-k=        |
+    | =newsticker-treeview-next-new-or-immortal-item= | =N=          | =gj=         |
+    | =newsticker-treeview-prev-new-or-immortal-item= | =P=          | =gk=         |
+    | =newsticker-treeview-next-page=                 | =SPC=        | =SPC=        |
+    | =newsticker-treeview-jump=                      | =j=          | =J=          |
+    | =newsticker-treeview-mark-item-old=             | =o=          | =o=          |
+    | =newsticker-treeview-mark-list-items-old=       | =O=          | =O=          |
+    | =newsticker-treeview-toggle-item-immortal=      | =i=          | =i=          |
+    | =newsticker-treeview-browse-url-item=           | =b=          | =b=          |
+    | =newsticker-treeview-browse-url=                | =v=          | =B=          |
+    | =newsticker-group-add-group=                    | =M-a=        | =A=          |
+    | =newsticker-group-delete-group=                 | =M-d=        | =D=          |
+    | =newsticker-group-rename-group=                 | =M-r=        | =R=          |
+    | =newsticker-treeview-save=                      | =s=          | =S=          |
+    | =newsticker-group-move-feed=                    | =M-m=        | =M-m=        |
+    | =newsticker-group-shift-feed-down=              | =M-<down>=   | =M-<down>=   |
+    | =newsticker-group-shift-feed-up=                | =M-<up>=     | =M-<up>=     |
+    | =newsticker-group-shift-group-down=             | =M-S-<down>= | =M-S-<down>= |
+    | =newsticker-group-shift-group-up=               | =M-S-<up>=   | =M-S-<up>=   |
+    | =newsticker-treeview-update=                    | =u=          | =gr=         |
+    | =newsticker-get-all-news=                       | =G=          | =gR=         |
+    | =newsticker-treeview-quit=                      | =q=          | =q=          |
+
+** Notes
+
+   - In the treeview list buffer, =C-m= / =C-j= are bound to
+     =newsticker-treeview-show-item= via text-property keymap, which has higher
+     precedence than the major-mode map. Use =M-j= / =M-k= for next / previous
+     item navigation.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/newsticker/evil-collection-newsticker.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/newsticker/evil-collection-newsticker.el
new file mode 100644
index 0000000..781fa63
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/newsticker/evil-collection-newsticker.el
@@ -0,0 +1,108 @@
+;;; evil-collection-newsticker.el --- Evil bindings for newsticker -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, newsticker, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for newsticker.
+
+;;; Code:
+(require 'evil-collection)
+(require 'newsticker)
+
+(defconst evil-collection-newsticker-maps '(newsticker-mode-map))
+
+;;;###autoload
+(defun evil-collection-newsticker-setup ()
+  "Set up `evil' bindings for `newsticker'."
+  ;; plainview
+  (evil-set-initial-state 'newsticker-mode 'normal)
+  (evil-collection-define-key 'normal 'newsticker-mode-map
+    ;; mark
+    "r" 'newsticker-mark-item-at-point-as-read
+    "i" 'newsticker-mark-item-at-point-as-immortal
+
+    ;; show/hide
+    "o" 'newsticker-show-old-items
+    "O" 'newsticker-hide-old-items)
+  (evil-collection-bind 'newsticker-mode-map
+                        'next-item 'newsticker-next-feed
+                        'prev-item 'newsticker-previous-feed
+                        'quit 'newsticker-close-buffer
+                        'refresh 'newsticker-buffer-force-update
+                        'refresh-all 'newsticker-get-all-news)
+
+  ;; treeview
+  (evil-set-initial-state 'newsticker-treeview-list-mode 'normal)
+  (evil-collection-define-key 'normal 'newsticker-treeview-list-mode-map
+    [down-mouse-3] 'newsticker-treeview-list-menu)
+
+  (evil-set-initial-state 'newsticker-treeview-item-mode 'normal)
+  (evil-collection-define-key 'normal 'newsticker-treeview-item-mode-map
+    [down-mouse-3] 'newsticker-treeview-item-menu)
+
+  (evil-set-initial-state 'newsticker-treeview-mode 'normal)
+  (evil-collection-bind 'newsticker-treeview-mode-map 'rename 'newsticker-group-rename-group)
+  (evil-collection-define-key 'normal 'newsticker-treeview-mode-map
+    ;; move
+    ;; The items in Newsticker List buffer has a particular keymap by text
+    ;; property, where CR (C-m) and LF (C-j) are bound to
+    ;; `newsticker-treeview-show-item'. According to the keymap precedence page,
+    ;; the text property based keymap has a higher priority.
+    ;;
+    ;; Eval (info "(elisp)Searching Keymaps") if you have interests.
+    ;;
+    ;; Use M-j/M-k instead.
+    (kbd "M-j") 'newsticker-treeview-next-item
+    (kbd "M-k") 'newsticker-treeview-prev-item
+    (kbd "SPC") 'newsticker-treeview-next-page
+
+    ;; mark
+    "o" 'newsticker-treeview-mark-item-old
+    "O" 'newsticker-treeview-mark-list-items-old
+    "i" 'newsticker-treeview-toggle-item-immortal
+
+    "b" 'newsticker-treeview-browse-url-item
+
+    ;; group
+    "A" 'newsticker-group-add-group
+    "D" 'newsticker-group-delete-group
+    "S" 'newsticker-treeview-save
+    (kbd "M-m") 'newsticker-group-move-feed
+    (kbd "<M-down>") 'newsticker-group-shift-feed-down
+    (kbd "<M-up>") 'newsticker-group-shift-feed-up
+    (kbd "<M-S-down>") 'newsticker-group-shift-group-down
+    (kbd "<M-S-up>") 'newsticker-group-shift-group-up)
+  (evil-collection-bind 'newsticker-treeview-mode-map
+                        'next-item 'newsticker-treeview-next-new-or-immortal-item
+                        'prev-item 'newsticker-treeview-prev-new-or-immortal-item
+                        'next-section 'newsticker-treeview-next-feed
+                        'prev-section 'newsticker-treeview-prev-feed
+                        'quit 'newsticker-treeview-quit
+                        'refresh 'newsticker-treeview-update
+                        'refresh-all 'newsticker-get-all-news
+                        'browse-url 'newsticker-treeview-browse-url
+                        'jump 'newsticker-treeview-jump))
+
+(provide 'evil-collection-newsticker)
+;;; evil-collection-newsticker.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/newsticker/evil-collection-newsticker.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/newsticker/evil-collection-newsticker.elc
new file mode 100644
index 0000000..a766b70
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/newsticker/evil-collection-newsticker.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/notmuch/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/notmuch/README.org
new file mode 100644
index 0000000..ea5fa4e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/notmuch/README.org
@@ -0,0 +1,142 @@
+* notmuch
+
+  Evil bindings for [[https://notmuchmail.org/][notmuch]].
+
+** notmuch-common-keymap
+
+   Inherited by all notmuch buffer maps. Single-letter commands are relocated
+   under the =g= prefix.
+
+   | Command                                | Original | Evil      |
+   |----------------------------------------+----------+-----------|
+   | =notmuch-help=                         | =?=      | =g?=      |
+   | =notmuch-bury-or-kill-this-buffer=     | =q=      | =q=       |
+   | =notmuch-search=                       | =s=      | =s=       |
+   | =notmuch-tree=                         | =z=      | =S=       |
+   | =notmuch-mua-new-mail=                 | =m=      | =C=, =cc= |
+   | =notmuch-refresh-this-buffer=          | =g=, === | =gr=      |
+   | =notmuch-refresh-all-buffers=          | =M-==    | =gA=      |
+   | =notmuch-poll-and-refresh-this-buffer= | =G=      | =gR=      |
+   | =notmuch-jump-search=                  | =j=      | =J=       |
+
+** notmuch-show-mode-map
+
+   | Command                                                 | Original  | Evil        |
+   |---------------------------------------------------------+-----------+-------------|
+   | =notmuch-show-next-open-message=                        | =n=       | =gj=        |
+   | =notmuch-show-previous-open-message=                    | =p=       | =gk=        |
+   | =notmuch-show-next-message=                             | =N=       | =]]=, =C-j= |
+   | =notmuch-show-previous-message=                         | =P=       | =[[=, =C-k= |
+   | =notmuch-show-next-thread-show=                         | =M-n=     | =M-j=       |
+   | =notmuch-show-previous-thread-show=                     | =M-p=     | =M-k=       |
+   | =notmuch-show-archive-message-then-next-or-next-thread= | =a=       | =a=         |
+   | =notmuch-show-archive-thread-then-next=                 | =A=       | =A=         |
+   | =notmuch-show-archive-thread-then-exit=                 | =X=       | =X=         |
+   | =notmuch-show-archive-message-then-next-or-exit=        | =x=       | =x=         |
+   | =notmuch-show-reply-sender=                             | =r=       | =cr=        |
+   | =notmuch-show-reply=                                    | =R=       | =cR=        |
+   | =notmuch-show-forward-message=                          | =f=       | =cf=        |
+   | =notmuch-show-filter-thread=                            | =l=       | =S=         |
+   | =notmuch-show-save-attachments=                         | =w=       | =p=         |
+   | =notmuch-show-toggle-visibility-headers=                | =h=       | =H=         |
+   | =notmuch-tag-jump=                                      | =k=       | =K=         |
+   | =notmuch-show-tag-all=                                  | =*=       | =*=         |
+   | =notmuch-show-add-tag=                                  | =+=       | =+=         |
+   | =notmuch-show-remove-tag=                               | =-=       | =-=         |
+   | =notmuch-show-toggle-message=                           | =RET=     | =RET=       |
+   | =notmuch-show-toggle-thread-indentation=                | =<=       | =<=         |
+   | =notmuch-show-next-button=                              | =TAB=     | =TAB=       |
+   | =notmuch-show-previous-button=                          | =backtab= | =backtab=   |
+   | =notmuch-show-pipe-message=                             | =\vert=   | =\vert=     |
+   | =notmuch-show-stash-map=                                | =c=       | =ys=        |
+   | =notmuch-show-part-map=                                 | =.=       | =.=         |
+   | =notmuch-tree-from-show-current-query=                  | =Z=       | =zv=        |
+   | =goto-address-at-point=                                 | n/a       | =gd=        |
+   | =evil-collection-notmuch-show-toggle-delete=            | n/a       | =d=         |
+   | =evil-collection-notmuch-show-toggle-flagged=           | n/a       | ===         |
+
+** notmuch-tree-mode-map
+
+   | Command                                          | Original | Evil      |
+   |--------------------------------------------------+----------+-----------|
+   | =notmuch-tree-next-matching-message=             | =n=      | =gj=      |
+   | =notmuch-tree-prev-matching-message=             | =p=      | =gk=      |
+   | =notmuch-tree-next-message=                      | =N=      | =]]=      |
+   | =notmuch-tree-prev-message=                      | =P=      | =[[=      |
+   | =notmuch-tree-next-thread=                       | =M-n=    | =C-j=     |
+   | =notmuch-tree-prev-thread=                       | =M-p=    | =C-k=     |
+   | =notmuch-tree-archive-message-then-next=         | =a=      | =a=       |
+   | =notmuch-tree-archive-thread-then-next=          | =A=      | =A=       |
+   | =notmuch-tree-archive-thread-then-exit=          | =X=      | (default) |
+   | =notmuch-tree-archive-message-then-next-or-exit= | =x=      | (default) |
+   | =notmuch-show-reply-sender=                      | =r=      | =cr=      |
+   | =notmuch-show-reply=                             | =R=      | =cR=      |
+   | =notmuch-tree-filter=                            | =l=      | (default) |
+   | =notmuch-tree-to-tree=                           | =z=      | =s=       |
+   | =notmuch-search-from-tree-current-query=         | =S=      | =zv=      |
+   | =notmuch-show-save-attachments=                  | =w=      | (default) |
+   | =notmuch-tag-jump=                               | =k=      | =K=       |
+   | =notmuch-tree-tag-thread=                        | =*=      | =*=       |
+   | =notmuch-tree-add-tag=                           | =+=      | =+=       |
+   | =notmuch-tree-remove-tag=                        | =-=      | =-=       |
+   | =notmuch-tree-show-message=                      | =RET=    | =RET=     |
+   | =notmuch-tree-resume-message=                    | =e=      | =e=       |
+   | =notmuch-show-pipe-message=                      | =\vert=  | =\vert=   |
+   | =evil-collection-notmuch-tree-toggle-delete=     | n/a      | =d=       |
+   | =evil-collection-notmuch-tree-toggle-unread=     | n/a      | =!=       |
+   | =evil-collection-notmuch-tree-toggle-flagged=    | n/a      | ===       |
+
+** notmuch-search-mode-map
+
+   | Command                                         | Original | Evil       |
+   |-------------------------------------------------+----------+------------|
+   | =notmuch-search-next-thread=                    | =n=      | =j= (evil) |
+   | =notmuch-search-previous-thread=                | =p=      | =k= (evil) |
+   | =notmuch-search-archive-thread=                 | =a=      | =a=        |
+   | =notmuch-search-reply-to-thread-sender=         | =r=      | =cr=       |
+   | =notmuch-search-reply-to-thread=                | =R=      | =cR=       |
+   | =notmuch-search-filter=                         | =l=      | =S=        |
+   | =notmuch-search-filter-by-tag=                  | =t=      | =t=        |
+   | =notmuch-search-toggle-order=                   | =o=      | =o=        |
+   | =notmuch-tag-jump=                              | =k=      | =K=        |
+   | =notmuch-search-tag-all=                        | =*=      | =*=        |
+   | =notmuch-search-add-tag=                        | =+=      | =+=        |
+   | =notmuch-search-remove-tag=                     | =-=      | =-=        |
+   | =notmuch-search-show-thread=                    | =RET=    | =RET=      |
+   | =notmuch-tree-from-search-current-query=        | =Z=      | =zv=       |
+   | =notmuch-bury-or-kill-this-buffer=              | =x=      | =q=        |
+   | =notmuch-search-stash-map=                      | =c=      | =ys=       |
+   | =compose-mail=                                  | n/a      | =cc=       |
+   | =compose-mail-other-frame=                      | n/a      | =cC=       |
+   | =evil-collection-notmuch-search-toggle-delete=  | n/a      | =d=        |
+   | =evil-collection-notmuch-search-toggle-unread=  | n/a      | =!=        |
+   | =evil-collection-notmuch-search-toggle-flagged= | n/a      | ===        |
+
+** notmuch-hello-mode-map
+
+   | Command                             | Original | Evil             |
+   |-------------------------------------+----------+------------------|
+   | =notmuch-version=                   | =v=      | =g?=             |
+   | =widget-forward=                    | =TAB=    | =TAB=            |
+   | =widget-backward=                   | =S-TAB=  | =S-TAB=, =C-TAB= |
+   | =evil-collection-notmuch-hello-ret= | n/a      | =RET=            |
+
+** New commands
+
+   | Command                                         | Key   |                                                                |
+   |-------------------------------------------------+-------+----------------------------------------------------------------|
+   | =evil-collection-notmuch-show-toggle-delete=    | =d=   | toggle =evil-collection-notmuch-delete-tag= on current message |
+   | =evil-collection-notmuch-tree-toggle-delete=    | =d=   | tree variant                                                   |
+   | =evil-collection-notmuch-search-toggle-delete=  | =d=   | search variant                                                 |
+   | =evil-collection-notmuch-show-toggle-flagged=   | ===   | toggle =flagged= tag                                           |
+   | =evil-collection-notmuch-tree-toggle-flagged=   | ===   |                                                                |
+   | =evil-collection-notmuch-search-toggle-flagged= | ===   |                                                                |
+   | =evil-collection-notmuch-tree-toggle-unread=    | =!=   | toggle =unread= tag                                            |
+   | =evil-collection-notmuch-search-toggle-unread=  | =!=   |                                                                |
+   | =evil-collection-notmuch-hello-ret=             | =RET= | activate widget or button at point                             |
+
+** Customization
+
+   | Variable                             | Default     | Purpose                                                          |
+   |--------------------------------------+-------------+------------------------------------------------------------------|
+   | =evil-collection-notmuch-delete-tag= | ="deleted"= | Tag toggled by =d=. Set to ="trash"= for lieer/Gmail-style sync. |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/notmuch/evil-collection-notmuch.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/notmuch/evil-collection-notmuch.el
new file mode 100644
index 0000000..71cee9d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/notmuch/evil-collection-notmuch.el
@@ -0,0 +1,262 @@
+;;; evil-collection-notmuch.el --- Bindings for `notmuch' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, tools, evil
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `notmuch'.
+
+;;; Code:
+(require 'notmuch nil t)
+(require 'evil-collection)
+
+(defcustom evil-collection-notmuch-delete-tag "deleted"
+  "Tag toggled by the delete bindings (`d') in notmuch modes.
+
+Defaults to \"deleted\" for backwards compatibility with the self-hosted
+notmuch convention where a cron job removes files matching `tag:deleted'.
+
+Set to \"trash\" when syncing with services that map a Trash tag/label
+back to the server (e.g. lieer/Gmail's TRASH label, or an IMAP setup
+that moves trashed messages out of the inbox)."
+  :type 'string
+  :group 'evil-collection-notmuch)
+
+(declare-function notmuch-show-get-tags "notmuch-show")
+(declare-function notmuch-show-tag "notmuch-show")
+(declare-function notmuch-search-get-tags "notmuch")
+(declare-function notmuch-search-tag "notmuch")
+(declare-function notmuch-tree-tag "notmuch-tree")
+
+(declare-function widget-field-at "wid-edit")
+(declare-function widget-field-activate "wid-edit")
+(declare-function widget-button-press "wid-edit")
+
+;; Since all the other maps in `evil-collection-notmuch-maps`
+;; have notmuch-common-keymap as parent
+;; https://git.notmuchmail.org/git?p=notmuch;a=blob;f=emacs/notmuch-hello.el;h=fa31694ff0f79a7f2781849394390a673f75aade;hb=HEAD#l651
+;;
+;; When `evil-collection-setup-hook` runs, if it changes keymaps
+;; using a `dolist` over `evil-collection-notmuch-maps`, then a binding might
+;; see 2 changes at once. To avoid that, notmuch-common-keymap is last
+(defconst evil-collection-notmuch-maps '(notmuch-hello-mode-map
+                                         notmuch-show-mode-map
+                                         notmuch-show-part-map
+                                         notmuch-tree-mode-map
+                                         notmuch-search-mode-map
+                                         notmuch-search-stash-map
+                                         notmuch-common-keymap))
+
+(defun evil-collection-notmuch-toggle-tag (tag mode &optional next-function)
+  "Toggle TAG tag for message in MODE."
+  (let ((get (intern (format "notmuch-%s-get-tags" mode)))
+        (set (intern (format "notmuch-%s-tag" mode)))
+        (next (or next-function (intern (format "notmuch-%s-next-message" mode)))))
+    (funcall set (list (concat (if (member tag (funcall get))
+                                   "-" "+")
+                               tag)))
+    (funcall next)))
+
+(defun evil-collection-notmuch-show-toggle-delete ()
+  "Toggle `evil-collection-notmuch-delete-tag' for message."
+  (interactive)
+  (evil-collection-notmuch-toggle-tag evil-collection-notmuch-delete-tag "show"))
+
+(defun evil-collection-notmuch-tree-toggle-delete ()
+  "Toggle `evil-collection-notmuch-delete-tag' for message."
+  (interactive)
+  (evil-collection-notmuch-toggle-tag evil-collection-notmuch-delete-tag "tree"))
+
+(defun evil-collection-notmuch-search-toggle-delete ()
+  "Toggle `evil-collection-notmuch-delete-tag' for message."
+  (interactive)
+  (evil-collection-notmuch-toggle-tag evil-collection-notmuch-delete-tag "search" 'notmuch-search-next-thread))
+
+(defun evil-collection-notmuch-tree-toggle-unread ()
+  "Toggle unread tag for message."
+  (interactive)
+  (evil-collection-notmuch-toggle-tag "unread" "tree"))
+
+(defun evil-collection-notmuch-search-toggle-unread ()
+  "Toggle unread tag for message."
+  (interactive)
+  (evil-collection-notmuch-toggle-tag "unread" "search" 'notmuch-search-next-thread))
+
+(defun evil-collection-notmuch-show-toggle-flagged ()
+  "Toggle flagged tag for message."
+  (interactive)
+  (evil-collection-notmuch-toggle-tag "flagged" "show"))
+
+(defun evil-collection-notmuch-tree-toggle-flagged ()
+  "Toggle flagged tag for message."
+  (interactive)
+  (evil-collection-notmuch-toggle-tag "flagged" "tree"))
+
+(defun evil-collection-notmuch-search-toggle-flagged ()
+  "Toggle flagged tag for message."
+  (interactive)
+  (evil-collection-notmuch-toggle-tag "flagged" "search" 'notmuch-search-next-thread))
+
+(defun evil-collection-notmuch-hello-ret ()
+  (interactive)
+  (if (widget-field-at (point))
+      (call-interactively #'widget-field-activate)
+    (call-interactively #'widget-button-press)))
+
+;;;###autoload
+(defun evil-collection-notmuch-setup ()
+  "Set up `evil' bindings for `notmuch'."
+  (evil-collection-inhibit-insert-state 'notmuch-show-mode-map)
+  (evil-collection-inhibit-insert-state 'notmuch-search-mode-map)
+  (evil-collection-inhibit-insert-state 'notmuch-tree-mode-map)
+
+  (evil-set-initial-state 'notmuch-show-mode 'normal)
+  (evil-set-initial-state 'notmuch-search-mode 'normal)
+  (evil-set-initial-state 'notmuch-hello-mode 'normal)
+  (evil-set-initial-state 'notmuch-tree-mode 'normal)
+
+  (evil-collection-bind 'notmuch-common-keymap 'describe-mode 'notmuch-help)
+
+  (evil-collection-define-key 'normal 'notmuch-common-keymap
+    "S" 'notmuch-tree
+    "C" 'notmuch-mua-new-mail           ; like mu4e
+    "cc" 'notmuch-mua-new-mail          ; like mu4e
+    "gA" 'notmuch-refresh-all-buffers)
+  (evil-collection-bind 'notmuch-common-keymap
+                        'quit 'notmuch-bury-or-kill-this-buffer
+                        'refresh 'notmuch-refresh-this-buffer
+                        'refresh-all 'notmuch-poll-and-refresh-this-buffer
+                        'jump 'notmuch-jump-search
+                        'search-or-filter 'notmuch-search)
+  (evil-collection-bind 'notmuch-hello-mode-map
+                        'describe-mode 'notmuch-version
+                        'cycle-next 'widget-forward
+                        'cycle-previous 'widget-backward
+                        'action 'evil-collection-notmuch-hello-ret)
+
+  (evil-collection-define-key 'normal 'notmuch-show-mode-map
+    "p" 'notmuch-show-save-attachments  ; like mu4e
+    "A" 'notmuch-show-archive-thread-then-next
+    "S" 'notmuch-show-filter-thread
+    "K" 'notmuch-tag-jump
+    "C" 'notmuch-mua-new-mail           ; like mu4e
+    "cc" 'notmuch-mua-new-mail          ; like mu4e
+    "cR" 'notmuch-show-reply
+    "cf" 'notmuch-show-forward-message
+    "X" 'notmuch-show-archive-thread-then-exit
+    "zv" 'notmuch-tree-from-show-current-query ; like mu4e-conversation
+    "<" 'notmuch-show-toggle-thread-indentation
+    "a" 'notmuch-show-archive-message-then-next-or-next-thread
+    "d" 'evil-collection-notmuch-show-toggle-delete
+    "=" 'evil-collection-notmuch-show-toggle-flagged
+    "H" 'notmuch-show-toggle-visibility-headers
+    (kbd "M-j") 'notmuch-show-next-thread-show
+    (kbd "M-k") 'notmuch-show-previous-thread-show
+    "cr" 'notmuch-show-reply-sender
+    (kbd "x") 'notmuch-show-archive-message-then-next-or-exit
+    "|" 'notmuch-show-pipe-message
+    "*" 'notmuch-show-tag-all
+    "-" 'notmuch-show-remove-tag
+    "+" 'notmuch-show-add-tag
+    "." 'notmuch-show-part-map)
+  (evil-collection-bind 'notmuch-show-mode-map
+                        'next-button 'notmuch-show-next-button
+                        'previous-button 'notmuch-show-previous-button
+                        'action 'notmuch-show-toggle-message
+                        'next-item 'notmuch-show-next-open-message
+                        'prev-item 'notmuch-show-previous-open-message
+                        'next-section 'notmuch-show-next-message
+                        'prev-section 'notmuch-show-previous-message
+                        'next-section-2 'notmuch-show-next-message
+                        'prev-section-2 'notmuch-show-previous-message
+                        'find-definition 'goto-address-at-point)
+
+  (evil-collection-bind 'notmuch-tree-mode-map
+                        'describe-mode 'notmuch-help
+                        'jump 'notmuch-jump-search)
+
+  (evil-collection-define-key 'normal 'notmuch-tree-mode-map
+    "S" 'notmuch-tree-to-search
+    "C" 'notmuch-mua-new-mail ; like mu4e
+    "cc" 'notmuch-mua-new-mail ; like mu4e
+    "zv" 'notmuch-search-from-tree-current-query ; like mu4e-conversation
+    "cr" 'notmuch-show-reply-sender ; like mu4e
+    "cR" 'notmuch-show-reply
+    "d" 'evil-collection-notmuch-tree-toggle-delete
+    "!" 'evil-collection-notmuch-tree-toggle-unread
+    "=" 'evil-collection-notmuch-tree-toggle-flagged
+    "K" 'notmuch-tag-jump
+    [mouse-1] 'notmuch-tree-show-message
+    "A" 'notmuch-tree-archive-thread-then-next
+    "a" 'notmuch-tree-archive-message-then-next
+    "|" 'notmuch-show-pipe-message
+    "-" 'notmuch-tree-remove-tag
+    "+" 'notmuch-tree-add-tag
+    "*" 'notmuch-tree-tag-thread
+    "e" 'notmuch-tree-resume-message)
+  (evil-collection-bind 'notmuch-tree-mode-map
+                        'action 'notmuch-tree-show-message
+                        'next-item 'notmuch-tree-next-matching-message
+                        'prev-item 'notmuch-tree-prev-matching-message
+                        'next-section 'notmuch-tree-next-message
+                        'prev-section 'notmuch-tree-prev-message
+                        'next-section-2 'notmuch-tree-next-thread
+                        'prev-section-2 'notmuch-tree-prev-thread
+                        'quit 'notmuch-tree-quit
+                        'search-or-filter 'notmuch-tree-to-tree)
+
+  (evil-collection-bind 'notmuch-search-mode-map 'jump 'notmuch-jump-search)
+
+  (dolist (state '(normal visual))
+    (evil-collection-define-key state 'notmuch-search-mode-map
+      "cC" 'compose-mail-other-frame
+      "S" 'notmuch-search-filter
+      "K" 'notmuch-tag-jump
+      "o" 'notmuch-search-toggle-order
+      "zv" 'notmuch-tree-from-search-current-query
+      "*" 'notmuch-search-tag-all
+      "a" 'notmuch-search-archive-thread
+      "cc" 'compose-mail                ; like mu4e
+      "d" 'evil-collection-notmuch-search-toggle-delete
+      "!" 'evil-collection-notmuch-search-toggle-unread
+      "=" 'evil-collection-notmuch-search-toggle-flagged
+      "cr" 'notmuch-search-reply-to-thread-sender
+      "cR" 'notmuch-search-reply-to-thread
+      "t" 'notmuch-search-filter-by-tag
+      [mouse-1] 'notmuch-search-show-thread
+      "-" 'notmuch-search-remove-tag
+      "+" 'notmuch-search-add-tag))
+  (evil-collection-bind 'notmuch-search-mode-map
+                        'action 'notmuch-search-show-thread
+                        'quit 'notmuch-bury-or-kill-this-buffer)
+
+  ;; ys
+  (evil-collection-define-operator-key 'yank 'notmuch-search-mode-map
+    "s" 'notmuch-search-stash-map)
+
+  ;; ys
+  (evil-collection-define-operator-key 'yank 'notmuch-show-mode-map
+    "s" 'notmuch-show-stash-map))
+
+(provide 'evil-collection-notmuch)
+;;; evil-collection-notmuch.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/notmuch/evil-collection-notmuch.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/notmuch/evil-collection-notmuch.elc
new file mode 100644
index 0000000..9f3b1d1
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/notmuch/evil-collection-notmuch.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/nov/evil-collection-nov.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/nov/evil-collection-nov.el
new file mode 100644
index 0000000..156f079
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/nov/evil-collection-nov.el
@@ -0,0 +1,68 @@
+;;; evil-collection-nov.el --- Bindings for `nov' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools, epub
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for`nov'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'nov nil t)
+
+(defvar nov-mode-map)
+
+(defconst evil-collection-nov-maps '(nov-mode-map))
+
+;;;###autoload
+(defun evil-collection-nov-setup ()
+  "Set up `evil' bindings for `nov'."
+  (evil-collection-bind 'nov-mode-map
+                        'next-item 'nov-next-document
+                        'prev-item 'nov-previous-document
+                        'next-section 'nov-next-document
+                        'prev-section 'nov-previous-document)
+  (evil-collection-define-key 'normal 'nov-mode-map
+    "s" 'nov-view-source
+    "S" 'nov-view-content-source
+    (kbd "M-j") 'nov-next-document
+    (kbd "M-k") 'nov-previous-document
+
+    "t" 'nov-goto-toc
+    "i" 'nov-goto-toc
+    (kbd "<follow-link>") 'mouse-face
+    (kbd "<mouse-2>") 'nov-browse-url
+    (kbd "M-TAB") 'shr-previous-link
+    (kbd "DEL") 'nov-scroll-down)
+
+  (evil-collection-bind 'nov-mode-map
+                        'scroll-down 'nov-scroll-up
+                        'scroll-up 'nov-scroll-down
+                        'action 'nov-browse-url
+                        'describe-mode 'nov-display-metadata
+                        'refresh 'nov-render-document
+                        'cycle-next 'shr-next-link
+                        'cycle-previous 'shr-previous-link))
+
+(provide 'evil-collection-nov)
+;;; evil-collection-nov.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/nov/evil-collection-nov.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/nov/evil-collection-nov.elc
new file mode 100644
index 0000000..4dfd35f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/nov/evil-collection-nov.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/omnisharp/evil-collection-omnisharp.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/omnisharp/evil-collection-omnisharp.el
new file mode 100644
index 0000000..9f33e18
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/omnisharp/evil-collection-omnisharp.el
@@ -0,0 +1,44 @@
+;;; evil-collection-omnisharp.el --- Evil bindings for omnisharp -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 Omair Majid
+
+;; Author: Omair Majid <omajid@redhat.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, omnisharp, convenience
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Omnisharp.
+
+;;; Code:
+(require 'omnisharp nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-omnisharp-maps '(omnisharp-mode-map))
+
+;;;###autoload
+(defun evil-collection-omnisharp-setup ()
+  "Set up `evil' bindings for `omnisharp'."
+  (evil-collection-bind 'omnisharp-mode-map
+                        'find-definition 'omnisharp-go-to-definition
+                        'lookup-doc 'omnisharp-current-type-documentation
+                        'refresh-all 'omnisharp-reload-solution))
+
+(provide 'evil-collection-omnisharp)
+;;; evil-collection-omnisharp.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/omnisharp/evil-collection-omnisharp.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/omnisharp/evil-collection-omnisharp.elc
new file mode 100644
index 0000000..17ad6b1
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/omnisharp/evil-collection-omnisharp.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-agenda/evil-collection-org-agenda.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-agenda/evil-collection-org-agenda.el
new file mode 100644
index 0000000..87c84e8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-agenda/evil-collection-org-agenda.el
@@ -0,0 +1,148 @@
+;;; evil-collection-org-agenda.el --- Evil bindings for org-agenda -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026 Ashish Panigrahi
+
+;; Author: Ashish Panigrahi <public@ashishpanigrahi.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, org, org-agenda, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil basic bindings for `org-agenda-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'org-agenda nil t)
+
+(defconst evil-collection-org-agenda-maps '(org-agenda-mode-map))
+
+(declare-function org-agenda-next-line "org-agenda")
+(declare-function org-agenda-previous-line "org-agenda")
+(declare-function org-agenda-next-item "org-agenda")
+(declare-function org-agenda-previous-item "org-agenda")
+(declare-function org-agenda-forward-block "org-agenda")
+(declare-function org-agenda-backward-block "org-agenda")
+(declare-function org-agenda-goto "org-agenda")
+(declare-function org-agenda-switch-to "org-agenda")
+(declare-function org-agenda-show "org-agenda")
+(declare-function org-agenda-quit "org-agenda")
+(declare-function org-agenda-exit "org-agenda")
+(declare-function org-agenda-redo "org-agenda")
+(declare-function org-agenda-redo-all "org-agenda")
+(declare-function org-agenda-later "org-agenda")
+(declare-function org-agenda-earlier "org-agenda")
+(declare-function org-agenda-goto-today "org-agenda")
+(declare-function org-agenda-goto-date "org-agenda")
+(declare-function org-agenda-day-view "org-agenda")
+(declare-function org-agenda-week-view "org-agenda")
+(declare-function org-agenda-month-view "org-agenda")
+(declare-function org-agenda-year-view "org-agenda")
+(declare-function org-agenda-todo "org-agenda")
+(declare-function org-agenda-schedule "org-agenda")
+(declare-function org-agenda-deadline "org-agenda")
+(declare-function org-agenda-set-tags "org-agenda")
+(declare-function org-agenda-priority "org-agenda")
+(declare-function org-agenda-refile "org-agenda")
+(declare-function org-agenda-archive "org-agenda")
+(declare-function org-agenda-kill "org-agenda")
+(declare-function org-agenda-add-note "org-agenda")
+(declare-function org-agenda-open-link "org-agenda")
+(declare-function org-agenda-filter-by-tag "org-agenda")
+(declare-function org-agenda-filter-remove-all "org-agenda")
+(declare-function org-agenda-clock-in "org-agenda")
+(declare-function org-agenda-clock-out "org-agenda")
+(declare-function org-agenda-clock-cancel "org-agenda")
+(declare-function org-agenda-clock-goto "org-agenda")
+(declare-function org-agenda-bulk-mark "org-agenda")
+(declare-function org-agenda-bulk-unmark "org-agenda")
+(declare-function org-agenda-bulk-action "org-agenda")
+(declare-function org-save-all-org-buffers "org")
+
+;;;###autoload
+(defun evil-collection-org-agenda-setup ()
+  "Set up `evil' bindings for `org-agenda'."
+  (evil-set-initial-state 'org-agenda-mode 'normal)
+  (evil-collection-set-readonly-bindings 'org-agenda-mode-map)
+
+  (evil-collection-define-key 'normal 'org-agenda-mode-map
+    ;; Motion
+    "j" 'org-agenda-next-line
+    "k" 'org-agenda-previous-line
+
+    ;; Open / visit
+    [tab] 'org-agenda-goto
+    (kbd "TAB") 'org-agenda-goto
+    (kbd "SPC") 'org-agenda-show
+
+    ;; Quit / refresh
+    "x" 'org-agenda-exit
+    "S" 'org-save-all-org-buffers
+
+    ;; Date navigation
+    "L" 'org-agenda-later
+    "H" 'org-agenda-earlier
+    "." 'org-agenda-goto-today
+    "vd" 'org-agenda-day-view
+    "vw" 'org-agenda-week-view
+    "vm" 'org-agenda-month-view
+    "vy" 'org-agenda-year-view
+
+    ;; Entry actions
+    "t" 'org-agenda-todo
+    "s" 'org-agenda-schedule
+    "T" 'org-agenda-set-tags
+    "p" 'org-agenda-priority
+    "r" 'org-agenda-refile
+    "A" 'org-agenda-archive
+    "D" 'org-agenda-deadline
+    "n" 'org-agenda-add-note
+
+    ;; Filtering
+    "f" 'org-agenda-filter-by-tag
+    "F" 'org-agenda-filter-remove-all
+
+    ;; Clocking
+    "I" 'org-agenda-clock-in
+    "O" 'org-agenda-clock-out
+    "X" 'org-agenda-clock-cancel
+    "gJ" 'org-agenda-clock-goto
+
+    ;; Bulk actions
+    "m" 'org-agenda-bulk-mark
+    "u" 'org-agenda-bulk-unmark
+    "B" 'org-agenda-bulk-action)
+  (evil-collection-bind 'org-agenda-mode-map
+                        'next-item 'org-agenda-next-item
+                        'prev-item 'org-agenda-previous-item
+                        'next-section 'org-agenda-forward-block
+                        'prev-section 'org-agenda-backward-block
+                        'next-section-2 'org-agenda-next-item
+                        'prev-section-2 'org-agenda-previous-item
+                        'quit 'org-agenda-quit
+                        'quit-save 'org-agenda-quit
+                        'quit-cancel 'org-agenda-exit
+                        'delete 'org-agenda-kill
+                        'refresh 'org-agenda-redo
+                        'refresh-all 'org-agenda-redo-all
+                        'action 'org-agenda-switch-to
+                        'action-other 'org-agenda-open-link
+                        'jump 'org-agenda-goto-date))
+
+(provide 'evil-collection-org-agenda)
+;;; evil-collection-org-agenda.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-agenda/evil-collection-org-agenda.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-agenda/evil-collection-org-agenda.elc
new file mode 100644
index 0000000..3427561
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-agenda/evil-collection-org-agenda.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-present/evil-collection-org-present.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-present/evil-collection-org-present.el
new file mode 100644
index 0000000..5ef3628
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-present/evil-collection-org-present.el
@@ -0,0 +1,64 @@
+;;; evil-collection-org-present.el --- Bindings for `org-present' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Carla Cao
+
+;; Author: Carla Cao <ccao001@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools, minimalist, presentation
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for`org-present'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'org-present nil t)
+
+(defconst evil-collection-org-present-maps '(org-present-mode-keymap))
+
+;;;###autoload
+(defun evil-collection-org-present-setup ()
+  "Set up `evil' bindings for `org-present'."
+  (evil-collection-define-key 'normal 'org-present-mode-keymap
+    "J" 'org-present-next
+    "K" 'org-present-prev
+    (kbd "SPC") 'org-present-next
+    (kbd "S-SPC") 'org-present-prev
+    (kbd "M-j") 'org-present-next
+    (kbd "M-k") 'org-present-prev
+    "zi" 'org-present-big
+    "zo" 'org-present-small
+    "+" 'org-present-big
+    "=" 'org-present-big
+    "-" 'org-present-small
+    "r" 'org-present-read-only
+    "gw" 'org-present-read-write
+    "gg" 'org-present-beginning
+    "G" 'org-present-end)
+  (evil-collection-bind 'org-present-mode-keymap
+                        'next-item 'org-present-next
+                        'prev-item 'org-present-prev
+                        'next-section 'org-present-next
+                        'prev-section 'org-present-prev
+                        'quit 'org-present-quit
+                        'quit-save 'org-present-quit
+                        'quit-cancel 'org-present-quit))
+
+(provide 'evil-collection-org-present)
+;;; evil-collection-org-present.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-present/evil-collection-org-present.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-present/evil-collection-org-present.elc
new file mode 100644
index 0000000..e2b205e
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-present/evil-collection-org-present.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-roam/evil-collection-org-roam.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-roam/evil-collection-org-roam.el
new file mode 100644
index 0000000..2885e66
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-roam/evil-collection-org-roam.el
@@ -0,0 +1,57 @@
+;;; evil-collection-org-roam.el --- Bindings for `org-roam' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.2
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for org-roam.
+
+;;; Code:
+(require 'evil-collection)
+(require 'org-roam nil t)
+
+(defvar org-roam-mode-map)
+(defconst evil-collection-org-roam-maps '(org-roam-grep-map
+                                          org-roam-mode-map
+                                          org-roam-node-map
+                                          org-roam-preview-map))
+
+(defun evil-collection-org-roam-setup ()
+  "Set up `evil' bindings for org-roam."
+  (evil-collection-define-key 'normal 'org-roam-mode-map
+    [C-return]  'org-roam-buffer-visit-thing
+    [remap revert-buffer] 'org-roam-buffer-refresh)
+  (evil-collection-bind 'org-roam-mode-map
+                        'action 'org-roam-buffer-visit-thing
+                        'refresh 'org-roam-buffer-refresh)
+
+  (evil-collection-define-key 'normal 'org-roam-node-map
+    [remap org-roam-buffer-visit-thing] 'org-roam-node-visit)
+
+  (evil-collection-define-key 'normal 'org-roam-preview-map
+    [remap org-roam-buffer-visit-thing] 'org-roam-preview-visit)
+
+  (evil-collection-define-key 'normal 'org-roam-grep-map
+    [remap org-roam-buffer-visit-thing] 'org-roam-grep-visit))
+
+(provide 'evil-collection-org-roam)
+;;; evil-collection-org-roam.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-roam/evil-collection-org-roam.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-roam/evil-collection-org-roam.elc
new file mode 100644
index 0000000..80e34b1
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org-roam/evil-collection-org-roam.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org/README.org
new file mode 100644
index 0000000..42f9b25
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org/README.org
@@ -0,0 +1,46 @@
+* org
+
+  Basic Evil bindings for [[https://orgmode.org/][org-mode]]. Not intended to supersede
+  [[https://github.com/Somelauw/evil-org-mode][evil-org-mode]] — only a handful of
+  overrides that align Org with Evil motion idioms.
+
+** Key bindings
+
+*** org-mode-map (normal)
+
+    | Command        | Original | Evil      |
+    |----------------+----------+-----------|
+    | =org-cycle=    | =TAB=    | =<tab>=   |
+    | =org-shifttab= | =S-TAB=  | =<S-tab>= |
+
+*** org-mode-map (motion)
+
+    | Command                  | Original | Evil |
+    |--------------------------+----------+------|
+    | =org-backward-paragraph= | n/a      | ={=  |
+    | =org-forward-paragraph=  | n/a      | =}=  |
+    | =org-backward-sentence=  | n/a      | =(=  |
+    | =org-forward-sentence=   | n/a      | =)=  |
+
+*** org-capture-mode-map (normal)
+
+    | Command                | Original  | Evil |
+    |------------------------+-----------+------|
+    | =org-capture-finalize= | =C-c C-c= | =ZZ= |
+    | =org-capture-kill=     | =C-c C-k= | =ZQ= |
+    | =org-capture-refile=   | =C-c C-w= | =ZR= |
+
+*** org-read-date-minibuffer-local-map
+
+    Calendar navigation in the date prompt:
+
+    | Command                       | Key   |
+    |-------------------------------+-------|
+    | =org-calendar-backward-day=   | =M-h= |
+    | =org-calendar-forward-day=    | =M-l= |
+    | =org-calendar-backward-week=  | =M-k= |
+    | =org-calendar-forward-week=   | =M-j= |
+    | =org-calendar-backward-month= | =M-H= |
+    | =org-calendar-forward-month=  | =M-L= |
+    | =org-calendar-backward-year=  | =M-K= |
+    | =org-calendar-forward-year=   | =M-J= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org/evil-collection-org.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org/evil-collection-org.el
new file mode 100644
index 0000000..f57fd68
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org/evil-collection-org.el
@@ -0,0 +1,88 @@
+;;; evil-collection-org.el --- Evil bindings for org -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, org, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil basic bindings for org-mode.  It's NOT intended to supersede
+;; `evil-org-mode'.
+;;
+
+;;; Code:
+(require 'evil-collection)
+(require 'org nil t)
+
+
+(defconst evil-collection-org-maps '(org-mode-map
+                                     org-capture-mode-map
+                                     org-read-date-minibuffer-local-map))
+
+(declare-function org-shifttab "org")
+(declare-function org-backward-paragraph "org")
+(declare-function org-forward-paragraph "org")
+(declare-function org-backward-sentence "org")
+(declare-function org-forward-sentence "org")
+(declare-function org-capture-finalize "org-capture")
+(declare-function org-capture-kill "org-capture")
+(declare-function org-capture-refile "org-capture")
+
+(declare-function org-calendar-forward-day "org")
+(declare-function org-calendar-backward-day "org")
+(declare-function org-calendar-forward-week "org")
+(declare-function org-calendar-backward-week "org")
+(declare-function org-calendar-forward-month "org")
+(declare-function org-calendar-backward-month "org")
+(declare-function org-calendar-forward-year "org")
+(declare-function org-calendar-backward-year "org")
+(declare-function org-defkey "org")
+
+;;;###autoload
+(defun evil-collection-org-setup ()
+  "Set up `evil' bindings for `org'."
+  (evil-collection-define-key 'normal 'org-mode-map
+    [S-tab] 'org-shifttab)
+  (evil-collection-bind 'org-mode-map 'section-toggle 'org-cycle)
+
+  (evil-collection-define-key 'motion 'org-mode-map
+    "{" 'org-backward-paragraph
+    "}" 'org-forward-paragraph
+    "(" 'org-backward-sentence
+    ")" 'org-forward-sentence)
+
+  (evil-collection-define-key 'normal 'org-capture-mode-map
+    "ZR" 'org-capture-refile)
+  (evil-collection-bind 'org-capture-mode-map
+                        'quit-save 'org-capture-finalize
+                        'quit-cancel 'org-capture-kill)
+
+  (org-defkey org-read-date-minibuffer-local-map (kbd "M-l") #'org-calendar-forward-day)
+  (org-defkey org-read-date-minibuffer-local-map (kbd "M-h") #'org-calendar-backward-day)
+  (org-defkey org-read-date-minibuffer-local-map (kbd "M-j") #'org-calendar-forward-week)
+  (org-defkey org-read-date-minibuffer-local-map (kbd "M-k") #'org-calendar-backward-week)
+  (org-defkey org-read-date-minibuffer-local-map (kbd "M-L") #'org-calendar-forward-month)
+  (org-defkey org-read-date-minibuffer-local-map (kbd "M-H") #'org-calendar-backward-month)
+  (org-defkey org-read-date-minibuffer-local-map (kbd "M-J") #'org-calendar-forward-year)
+  (org-defkey org-read-date-minibuffer-local-map (kbd "M-K") #'org-calendar-backward-year))
+
+(provide 'evil-collection-org)
+;;; evil-collection-org.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org/evil-collection-org.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org/evil-collection-org.elc
new file mode 100644
index 0000000..276c95a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/org/evil-collection-org.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/osx-dictionary/evil-collection-osx-dictionary.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/osx-dictionary/evil-collection-osx-dictionary.el
new file mode 100644
index 0000000..fc328d8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/osx-dictionary/evil-collection-osx-dictionary.el
@@ -0,0 +1,48 @@
+;;; evil-collection-osx-dictionary.el --- Evil bindings for osx-dictionary -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, osx-dictionary, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for osx-dictionary.
+
+;;; Code:
+(require 'evil-collection)
+(require 'osx-dictionary nil t)
+
+(defconst evil-collection-osx-dictionary-maps '(osx-dictionary-mode-map))
+
+;;;###autoload
+(defun evil-collection-osx-dictionary-setup ()
+  "Set up `evil' bindings for `osx-dictionary'."
+  (evil-set-initial-state 'osx-dictionary-mode 'normal)
+
+  (evil-collection-define-key 'normal 'osx-dictionary-mode-map
+    "o" 'osx-dictionary-open-dictionary.app
+    "r" 'osx-dictionary-read-word)
+  (evil-collection-bind 'osx-dictionary-mode-map
+                        'quit 'osx-dictionary-quit
+                        'search-or-filter 'osx-dictionary-search-input))
+
+(provide 'evil-collection-osx-dictionary)
+;;; evil-collection-osx-dictionary.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/osx-dictionary/evil-collection-osx-dictionary.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/osx-dictionary/evil-collection-osx-dictionary.elc
new file mode 100644
index 0000000..5a5d1ed
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/osx-dictionary/evil-collection-osx-dictionary.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/outline/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/outline/README.org
new file mode 100644
index 0000000..e79174b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/outline/README.org
@@ -0,0 +1,39 @@
+* outline
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Outline-Mode.html][outline-mode]].
+
+  Folding sticks to Evil's =z= namespace, augmenting the defaults =zO=, =za=,
+  =zc=, =zm=, =zo=, =zr= with outline-specific commands.
+
+** Key bindings
+
+   Bindings applied to =outline-mode-map= in normal state.
+
+   | Command                            | Original  | Evil               |
+   |------------------------------------+-----------+--------------------|
+   | =outline-hide-body=                | =C-c C-t= | =zB=               |
+   | =outline-hide-entry=               | =C-c C-c= | =zE=               |
+   | =outline-show-entry=               | =C-c C-e= | =ze=               |
+   | =outline-hide-leaves=              | =C-c C-l= | =zl=               |
+   | =outline-show-branches=            | =C-c C-k= | =zK=               |
+   | =outline-show-children=            | =C-c TAB= | =zk=               |
+   | =outline-hide-other=               | =C-c C-o= | =zp=               |
+   | =outline-up-heading=               | =C-c C-u= | =zu=               |
+   | =outline-previous-visible-heading= | =C-c C-p= | =[[=               |
+   | =outline-next-visible-heading=     | =C-c C-n= | =]]=               |
+   | =outline-backward-same-level=      | =C-c C-b= | =C-k=, =gk=        |
+   | =outline-forward-same-level=       | =C-c C-f= | =C-j=, =gj=        |
+   | =outline-promote=                  | =C-c C-<= | =M-h=              |
+   | =outline-demote=                   | =C-c C->= | =M-l=              |
+   | =outline-move-subtree-up=          | =C-c C-^= | =M-k=              |
+   | =outline-move-subtree-down=        | =C-c C-v= | =M-j=              |
+   | =outline-insert-heading=           | =C-c RET= | =M-<return>=       |
+   | =outline-show-all=                 | =C-c C-a= | =<backtab>= (opt.) |
+   | =outline-toggle-children=          | =C-c TAB= | =<tab>= (opt.)     |
+
+** Customization
+
+   | Variable                                         | Default | Purpose                                                                                    |
+   |--------------------------------------------------+---------+--------------------------------------------------------------------------------------------|
+   | =evil-collection-outline-bind-tab-p=             | =nil=   | Bind =<tab>= / =<backtab>= to outline cycling (off by default to avoid clashing with Org). |
+   | =evil-collection-outline-enable-in-minor-mode-p= | =t=     | Inherit the same bindings in =outline-minor-mode= via auxiliary keymap parenting.          |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/outline/evil-collection-outline.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/outline/evil-collection-outline.el
new file mode 100644
index 0000000..691c01f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/outline/evil-collection-outline.el
@@ -0,0 +1,116 @@
+;;; evil-collection-outline.el --- Evil bindings for outline-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, outline, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for outline-mode.
+
+;;; Code:
+(require 'evil-collection)
+(require 'outline)
+
+(defcustom evil-collection-outline-bind-tab-p nil
+  "Enable <tab>-based bindings in Outline mode.
+
+Unless you have Evil bindings set up for Org mode, Org will
+preserve the Emacs-state <tab> keys in Org mode. Set this option
+to t if you want to inherit the <tab>-based bindings from Outline
+mode."
+  :group 'evil-collection-outline
+  :type 'boolean)
+
+(defcustom evil-collection-outline-enable-in-minor-mode-p t
+  "Enable Outline mode bindings in Outline minor mode.
+
+To override individual bindings, modify the minor mode keymap.
+For example, \"zB\" is bound to `outline-hide-body' in Outline
+mode. To turn off this specific binding in Outline minor mode,
+you can do:
+
+    (evil-define-minor-mode-key \='normal \='outline-minor-mode \"zB\" nil)"
+  :group 'evil-collection-outline
+  :type 'boolean)
+
+(defconst evil-collection-outline-maps '(outline-mode-map))
+
+;;;###autoload
+(defun evil-collection-outline-setup ()
+  "Set up `evil' bindings for `outline'."
+  (evil-set-initial-state 'outline-mode 'normal)
+  (when evil-collection-outline-bind-tab-p
+    (evil-collection-bind 'outline-mode-map
+                          'section-toggle 'outline-toggle-children ; Also "z a" by default
+                          'section-toggle-all 'outline-show-all)) ; Also "z r" by default
+  (evil-collection-define-key 'normal 'outline-mode-map
+    ;; folding
+    ;; Evil default keys:
+    ;; zO: Show recursively for current branch only.
+    ;; za: Toggle first level like outline-toggle-children.
+    ;; zc: Hide complete subtree.
+    ;; zm: Show only root notes.
+    ;; zo: Show current node like "za".
+    ;; zr: Show everything.
+    ;; "ze" 'outline-hide-entry
+    ;; "zE" 'outline-show-entry
+    ;; "zl" 'outline-hide-leaves
+    ;; "zb" 'outline-show-branches
+    ;; "zo" 'outline-hide-other
+    "zB" 'outline-hide-body ; Hide all bodies, Emacs has "C-c C-t".
+    "zE" 'outline-hide-entry ; Hide current body, Emacs has "C-c C-c".
+    "ze" 'outline-show-entry ; Show current body only, not subtree, reverse of outline-hide-entry, Emacs has "C-c C-e".
+    "zl" 'outline-hide-leaves ; Like `outline-hide-body' but for current subtree only, Emacs has "C-c C-l".
+    "zK" 'outline-show-branches ; Show all children recursively but no body.  Emacs has "C-c C-k".
+    "zk" 'outline-show-children ; Direct children only unlike `outline-show-branches', and no content unlike `outline-show-entry' and `outline-toggle-children'.  Emacs has "C-c TAB".
+    "zu" 'outline-up-heading
+
+    "zp" 'outline-hide-other ; Hide all nodes and bodies except current body.  Emacs has "C-c C-o".
+    ;; outline-hide-sublevels ; q ; Is it any different from `outline-hide-body'?
+    ;; outline-hide-subtree ; Emacs has "C-c C-d", Evil has default "zc".
+    ;; outline-show-subtree ; Emacs has "C-c C-s", Evil has default "zO".
+
+    ;; TODO: To mark subtree ("C-c @"), we would need to define a tree object.
+
+    ;; motion
+    (kbd "M-h") 'outline-promote ; Org-mode has "M-<left>", Evil-org has "M-h"
+    (kbd "M-j") 'outline-move-subtree-down ; Org-mode has "M-<down>", Evil-org has "M-j"
+    (kbd "M-k") 'outline-move-subtree-up ; Org-mode has "M-<up>", Evil-org has "M-k"
+    (kbd "M-l") 'outline-demote ; Org-mode has "M-<right>", Evil-org has "M-l"
+
+    (kbd "M-<return>") 'outline-insert-heading) ; Org-mode has "M-<return>"
+  (evil-collection-bind 'outline-mode-map
+                        'next-item 'outline-forward-same-level
+                        'prev-item 'outline-backward-same-level
+                        'next-section 'outline-next-visible-heading
+                        'prev-section 'outline-previous-visible-heading
+                        'next-section-2 'outline-forward-same-level
+                        'prev-section-2 'outline-backward-same-level)
+
+  ;; Enable bindings in Outline minor mode if requested
+  (when evil-collection-outline-enable-in-minor-mode-p
+    (let* ((minor-map (evil-get-minor-mode-keymap 'normal 'outline-minor-mode))
+           (major-map (evil-get-auxiliary-keymap outline-mode-map 'normal)))
+      (set-keymap-parent minor-map major-map))))
+
+(provide 'evil-collection-outline)
+;;; evil-collection-outline.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/outline/evil-collection-outline.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/outline/evil-collection-outline.elc
new file mode 100644
index 0000000..93bd078
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/outline/evil-collection-outline.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ovpn-mode/evil-collection-ovpn-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ovpn-mode/evil-collection-ovpn-mode.el
new file mode 100644
index 0000000..7db7dd0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ovpn-mode/evil-collection-ovpn-mode.el
@@ -0,0 +1,57 @@
+;;; evil-collection-ovpn-mode.el --- Bindings for `ovpn-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2025 Vitor Leal
+
+;; Author: Vitor Leal <hello@vitorl.com>
+;; Maintainer: Vitor Leal <hello@vitorl.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for ovpn-mode.
+
+;;; Code:
+(require 'evil-collection)
+(require 'ovpn-mode nil t)
+
+(defvar ovpn-mode-map)
+(defconst evil-collection-ovpn-mode-maps '(ovpn-mode-map))
+
+;;;###autoload
+(defun evil-collection-ovpn-mode-setup ()
+  "Set up `evil' bindings for `ovpn-mode'."
+  (evil-collection-define-key 'normal 'ovpn-mode-map
+    "s" 'ovpn-mode-start-vpn
+    "n" 'ovpn-mode-start-vpn-with-namespace
+    "r" 'ovpn-mode-restart-vpn
+    "i" 'ovpn-mode-info-vpn
+    "$" 'ovpn-mode-buffer-vpn
+    "o" 'ovpn-mode-edit-vpn
+    "~" 'ovpn-mode-dir-filter
+    "d" 'ovpn-mode-dir-set
+    "a" 'ovpn-mode-active
+    "J" 'ovpn-mode-ipv6-linux-toggle
+    "T" 'ovpn-mode-spawn-term-in-namespace
+    "B" 'ovpn-mode-spawn-browser-in-namespace)
+  (evil-collection-bind 'ovpn-mode-map
+                        'quit 'ovpn-mode-stop-vpn
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit))
+
+(provide 'evil-collection-ovpn-mode)
+;;; evil-collection-ovpn-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ovpn-mode/evil-collection-ovpn-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ovpn-mode/evil-collection-ovpn-mode.elc
new file mode 100644
index 0000000..4f5f8b2
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ovpn-mode/evil-collection-ovpn-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p-search/evil-collection-p-search.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p-search/evil-collection-p-search.el
new file mode 100644
index 0000000..356caed
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p-search/evil-collection-p-search.el
@@ -0,0 +1,84 @@
+;;; evil-collection-p-search.el --- Bindings for `p-search' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2024 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.2
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for p-search.
+
+;;; Code:
+(require 'evil-collection)
+(require 'p-search nil t)
+
+(defvar p-search-mode-map)
+(defconst evil-collection-p-search-maps '(p-search-mode-map))
+
+(defvar evil-collection-p-search-mode-map (make-sparse-keymap))
+
+;; The normal `p-search-mode-map' calls (suppress-keymap map t)
+;; which makes some of the evil bindings get to to 'ignore too
+;; for some reason. Use a separate minor mode to avoid all of that.
+(define-minor-mode evil-collection-p-search-mode
+  "A minor mode to attach to `p-search' results"
+  :group 'evil-collection-p-search-mode
+  :keymap evil-collection-p-search-mode-map
+  :lighter nil)
+
+(defun evil-collection-p-search-setup ()
+  "Set up `evil' bindings for p-search."
+  (add-hook 'p-search-mode-hook #'evil-collection-p-search-mode)
+
+  (evil-collection-define-key 'normal 'evil-collection-p-search-mode-map
+    "a" 'p-search-add-dwim
+    "E" 'p-search-edit-dwim
+    "C" 'p-search-add-candidate-generator
+    ;; (keymap-set map "i" #'p-search-importance)
+    "x" 'p-search-kill-entity-at-point
+    "o" 'p-search-observe
+    ;; (keymap-set map "r" #'p-search-reinstantiate-prior)
+    "P" 'p-search-add-prior
+    "+" 'p-search-increase-preview-size
+    "-" 'p-search-decrease-preview-size
+    "gv" 'p-search-view-document
+    (kbd "C-o") 'p-search-display-document
+    ;; (keymap-set map "C-o" #'p-search-display-file)
+    ;; (keymap-set map "1" #'p-search-show-level-1)
+    ;; (keymap-set map "2" #'p-search-show-level-2)
+    ;; (keymap-set map "3" #'p-search-show-level-3)
+    "Jg" 'p-search-jump-candidate-generators
+    "Jp" 'p-search-jump-priors
+    "Jr" 'p-search-jump-results)
+  (evil-collection-bind 'evil-collection-p-search-mode-map
+                        'action 'p-search-find-document
+                        'action-other 'p-search-view-document
+                        'action-stay 'p-search-display-document
+                        'next-item 'p-search-next-item
+                        'prev-item 'p-search-prev-item
+                        'next-section 'p-search-next-item
+                        'prev-section 'p-search-prev-item
+                        'quit 'p-search-quit
+                        'refresh 'p-search-refresh-buffer
+                        'refresh-all 'p-search-hard-refresh-buffer
+                        'section-toggle 'p-search-toggle-section))
+
+(provide 'evil-collection-p-search)
+;;; evil-collection-p-search.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p-search/evil-collection-p-search.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p-search/evil-collection-p-search.elc
new file mode 100644
index 0000000..7be1ee7
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p-search/evil-collection-p-search.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p4/evil-collection-p4.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p4/evil-collection-p4.el
new file mode 100644
index 0000000..e476a17
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p4/evil-collection-p4.el
@@ -0,0 +1,121 @@
+;;; evil-collection-p4.el --- Evil bindings for P4 -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, p4, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for P4.
+
+;;; Code:
+(require 'p4 nil t)
+(require 'evil-collection)
+
+(defvar p4-basic-mode-map)
+(defvar p4-basic-list-mode-map)
+(defvar p4-opened-list-mode-map)
+(defvar p4-status-list-mode-map)
+(defvar p4-filelog-mode-map)
+(defvar p4-diff-mode-map)
+(defvar p4-annotate-mode-map)
+
+(defconst evil-collection-p4-maps '(p4-basic-mode-map
+                                    p4-basic-list-mode-map
+                                    p4-opened-list-mode-map
+                                    p4-status-list-mode-map
+                                    p4-filelog-mode-map
+                                    p4-diff-mode-map
+                                    p4-annotate-mode-map))
+
+;;;###autoload
+(defun evil-collection-p4-setup ()
+  "Set up `evil' bindings for `p4'."
+  (evil-set-initial-state 'p4-basic-mode 'normal)
+  (evil-set-initial-state 'p4-basic-list-mode 'normal)
+  (evil-set-initial-state 'p4-opened-list-mode-map 'normal)
+  (evil-set-initial-state 'p4-status-list-mode-map 'normal)
+  (evil-set-initial-state 'p4-filelog-mode-map 'normal)
+  (evil-set-initial-state 'p4-diff-mode-map 'normal)
+  (evil-set-initial-state 'p4-annotate-mode-map 'normal)
+
+  (evil-collection-bind 'p4-basic-mode-map
+                        'quit 'quit-window
+                        'refresh 'revert-buffer
+                        'action 'p4-buffer-commands)
+  (evil-collection-define-key 'normal 'p4-basic-mode-map
+    [mouse-1] 'p4-buffer-mouse-clicked
+    "k" 'evil-previous-line
+    "j" 'evil-next-line
+    "gg" 'p4-top-of-buffer
+    "G" 'p4-bottom-of-buffer
+    "=" 'delete-other-windows)
+  (evil-collection-bind 'p4-basic-mode-map
+                        'next-section 'p4-scroll-down-1-window
+                        'prev-section 'p4-scroll-up-1-window
+                        'next-section-2 'p4-forward-active-link
+                        'prev-section-2 'p4-backward-active-link)
+
+  (evil-collection-bind 'p4-basic-list-mode-map 'action 'p4-basic-list-activate)
+
+  (evil-collection-define-key 'normal 'p4-opened-list-mode-map
+    "R" 'p4-revert
+    "T" 'p4-opened-list-type
+    "C" 'p4-opened-list-change)
+
+  (evil-collection-bind 'p4-status-list-mode-map 'action 'p4-status-list-activate)
+
+  (evil-collection-bind 'p4-filelog-mode-map 'find-file 'p4-find-file-other-window)
+
+  (evil-collection-define-key 'normal 'p4-filelog-mode-map
+    "d" 'p4-diff2
+    "S" 'p4-filelog-short-format
+    "L" 'p4-filelog-long-format
+    " " 'p4-scroll-up-1-window
+    "gg" 'p4-top-of-buffer
+    "G" 'p4-bottom-of-buffer
+    "=" 'p4-delete-other-windows)
+  (evil-collection-bind 'p4-filelog-mode-map
+                        'next-section 'p4-goto-next-change
+                        'prev-section 'p4-goto-prev-change)
+
+  (evil-collection-bind 'p4-diff-mode-map 'action 'p4-buffer-commands)
+  (evil-collection-define-key 'normal 'p4-diff-mode-map
+    (kbd "M-j") 'diff-file-next
+    (kbd "M-k") 'diff-file-prev
+    "\t" 'diff-hunk-next
+    [backtab] 'diff-hunk-prev
+    "}" 'diff-file-next
+    "{" 'diff-file-prev
+    [mouse-2] 'p4-buffer-commands
+    "gb" 'p4-buffer-commands)
+  (evil-collection-bind 'p4-diff-mode-map
+                        'next-section 'diff-hunk-next
+                        'prev-section 'diff-hunk-prev)
+
+  (evil-collection-define-key 'normal 'p4-annotate-mode-map
+    "L" 'p4-toggle-line-wrap)
+  (evil-collection-bind 'p4-annotate-mode-map
+                        'next-section 'p4-next-change-rev-line
+                        'prev-section 'p4-prev-change-rev-line))
+
+(provide 'evil-collection-p4)
+;;; evil-collection-p4.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p4/evil-collection-p4.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p4/evil-collection-p4.elc
new file mode 100644
index 0000000..f269330
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/p4/evil-collection-p4.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/package-menu/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/package-menu/README.org
new file mode 100644
index 0000000..c001fc5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/package-menu/README.org
@@ -0,0 +1,22 @@
+* package-menu
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Package-Menu.html][package-menu-mode]].
+
+  Standard read-only motion bindings are installed via
+  =evil-collection-set-readonly-bindings=.
+
+** Key bindings
+
+   | Command                          | Original | Evil |
+   |----------------------------------+----------+------|
+   | =package-menu-mark-install=      | =i=      | =i=  |
+   | =package-menu-mark-upgrades=     | =U=      | =U=  |
+   | =package-menu-mark-delete=       | =d=      | =d=  |
+   | =package-menu-mark-unmark=       | =u=      | =u=  |
+   | =package-menu-execute=           | =x=      | =x=  |
+   | =package-menu-describe-package=  | =RET=    | =g?= |
+   | =revert-buffer=                  | =g=, =r= | =gr= |
+   | =package-browse-url= (Emacs 28+) | =w=      | =B=  |
+
+   The =/=-prefixed filter commands, =H= (hide), =(= (toggle-hiding), =~=, =b=
+   (report-bug), =S= (sort), and other defaults remain at their upstream keys.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/package-menu/evil-collection-package-menu.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/package-menu/evil-collection-package-menu.el
new file mode 100644
index 0000000..cdb2253
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/package-menu/evil-collection-package-menu.el
@@ -0,0 +1,57 @@
+;;; evil-collection-package-menu.el --- Evil bindings for package-menu -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, package-menu, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil integration for `package-menu-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'package)
+
+(defconst evil-collection-package-menu-maps '(package-menu-mode-map))
+
+;;;###autoload
+(defun evil-collection-package-menu-setup ()
+  "Set up `evil' bindings for `package-menu'."
+  (evil-set-initial-state 'package-menu-mode 'normal)
+  (evil-collection-set-readonly-bindings 'package-menu-mode-map)
+  (evil-collection-define-key 'normal 'package-menu-mode-map
+    "i" 'package-menu-mark-install
+    "U" 'package-menu-mark-upgrades)
+
+  (evil-collection-bind 'package-menu-mode-map
+                        'unmark 'package-menu-mark-unmark
+                        'mark-delete 'package-menu-mark-delete
+                        'execute-marks 'package-menu-execute
+                        'describe-mode 'package-menu-describe-package
+                        'refresh 'revert-buffer)
+
+  ;; It's introduced since Emacs 28.
+  (when (fboundp 'package-browse-url)
+    (evil-collection-bind 'package-menu-mode-map
+                          'browse-url 'package-browse-url)))
+
+(provide 'evil-collection-package-menu)
+;;; evil-collection-package-menu.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/package-menu/evil-collection-package-menu.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/package-menu/evil-collection-package-menu.elc
new file mode 100644
index 0000000..cdb0853
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/package-menu/evil-collection-package-menu.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pass/evil-collection-pass.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pass/evil-collection-pass.el
new file mode 100644
index 0000000..9df2952
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pass/evil-collection-pass.el
@@ -0,0 +1,102 @@
+;;; evil-collection-pass.el --- Evil bindings for pass-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, pass, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `pass-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'pass nil t)
+
+(defvar pass-mode-map)
+
+(declare-function pass--display-keybinding "pass")
+
+(defconst evil-collection-pass-maps '(pass-mode-map))
+
+(defvar evil-collection-pass-command-to-label
+  '((pass-copy-field . "yf")
+    (pass-copy-username . "yn")
+    (pass-copy-url . "yu"))
+  "Alist holding labels to be used in `pass' header.")
+
+(defun evil-collection-pass-display-keybinding (f &rest args)
+  "A version of `pass--display-keybinding' that handles displaying
+keybindings listed in `evil-collection-pass-command-to-label'."
+  (if (alist-get (car args) evil-collection-pass-command-to-label)
+      (insert
+       (format
+        "%8s %-13s \t "
+        (format "%s"
+                (propertize
+                 (format
+                  "<%s>"
+                  (alist-get (car args)
+                             evil-collection-pass-command-to-label))
+                 'face 'font-lock-constant-face))
+        (cadr args)))
+    (apply f args)))
+
+;;;###autoload
+(defun evil-collection-pass-setup ()
+  "Set up `evil' bindings for `pass-mode'."
+
+  (evil-collection-bind 'pass-mode-map 'rename 'pass-rename)
+
+  ;; https://github.com/NicolasPetton/pass/pull/47
+  (when (fboundp 'pass-edit)
+    (evil-collection-bind 'pass-mode-map 'edit 'pass-edit))
+
+  (advice-add 'pass--display-keybinding
+              :around #'evil-collection-pass-display-keybinding)
+
+  (evil-collection-define-operator-key 'yank 'pass-mode-map
+    "f" 'pass-copy-field
+    "n" 'pass-copy-username
+    "u" 'pass-copy-url)
+
+  (evil-collection-define-key 'normal 'pass-mode-map
+    "i" 'pass-insert
+    "I" 'pass-insert-generated
+    "Y" 'pass-copy
+    "o" 'pass-otp-options)
+  (evil-collection-bind 'pass-mode-map
+                        'next-item 'pass-next-entry
+                        'prev-item 'pass-prev-entry
+                        'next-section 'pass-next-directory
+                        'prev-section 'pass-prev-directory
+                        'next-section-2 'pass-next-entry
+                        'prev-section-2 'pass-prev-entry
+                        'jump 'pass-goto-entry
+                        'action 'pass-view
+                        'quit 'pass-quit
+                        'describe-mode 'describe-mode
+                        'refresh 'pass-update-buffer
+                        'search-or-filter 'isearch-forward
+                        'delete 'pass-kill
+                        'delete-2 'pass-kill))
+
+(provide 'evil-collection-pass)
+;;; evil-collection-pass.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pass/evil-collection-pass.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pass/evil-collection-pass.elc
new file mode 100644
index 0000000..7d3b1ca
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pass/evil-collection-pass.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pdf/evil-collection-pdf.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pdf/evil-collection-pdf.el
new file mode 100644
index 0000000..52426bc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pdf/evil-collection-pdf.el
@@ -0,0 +1,312 @@
+;;; evil-collection-pdf.el --- Evil bindings for pdf-tools  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017, 2024 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, pdf, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for pdf-tools.
+
+;;; Code:
+(require 'evil-collection)
+(require 'pdf-tools nil t)
+(require 'pdf-view nil t)
+(require 'pdf-history nil t)
+
+(defconst evil-collection-pdf-maps '(pdf-view-mode-map
+                                     pdf-history-minor-mode-map
+                                     pdf-outline-buffer-mode-map
+                                     pdf-occur-buffer-mode-map))
+
+(declare-function pdf-view-last-page "pdf-view")
+(declare-function pdf-view-first-page "pdf-view")
+(declare-function pdf-view-goto-page "pdf-view")
+(declare-function pdf-view-previous-line-or-previous-page "pdf-view")
+(declare-function pdf-view-next-line-or-next-page "pdf-view")
+(declare-function pdf-view-assert-active-region "pdf-view")
+(declare-function pdf-view-active-region-text "pdf-view")
+(declare-function pdf-view-deactivate-region "pdf-view")
+(declare-function pdf-history-forward "pdf-history")
+(declare-function pdf-history-backward "pdf-history")
+
+(defvar pdf-view-mode-map)
+(defvar pdf-history-minor-mode-map)
+(defvar pdf-outline-buffer-mode-map)
+(defvar pdf-occur-buffer-mode-map)
+
+(defun evil-collection-pdf-view-goto-page (&optional page)
+  "`evil' wrapper around `pdf-view-last-page'."
+  (interactive "P")
+  (if page
+      (pdf-view-goto-page page)
+    (let ((hscroll (window-hscroll)))
+      (pdf-view-last-page)
+      (image-eob)
+      (image-set-window-hscroll hscroll))))
+
+(defun evil-collection-pdf-view-goto-first-page (&optional page)
+  "`evil' wrapper around `pdf-view-first-page'."
+  (interactive "P")
+  (if page
+      (pdf-view-goto-page page)
+    (let ((hscroll (window-hscroll)))
+      (pdf-view-first-page)
+      (image-bob)
+      (image-set-window-hscroll hscroll))))
+
+(defun evil-collection-pdf-jump-forward (&optional count)
+  "Wrap `pdf-history-forward' with `evil'.
+
+Consider COUNT."
+  (interactive "P")
+  (pdf-history-forward (or count 1)))
+
+(defun evil-collection-pdf-jump-backward (&optional count)
+  "Wrap `pdf-history-backward' with `evil'.
+
+Consider COUNT."
+  (interactive "P")
+  (pdf-history-backward (or count 1)))
+
+(defun evil-collection-pdf-yank ()
+  "Save the text of the active region into the currently selected register."
+  (interactive)
+  (pdf-view-assert-active-region)
+  (let ((txt (pdf-view-active-region-text))
+        (reg evil-this-register))
+    (pdf-view-deactivate-region)
+    (evil-set-register
+     (or reg ?\")
+     (mapconcat #'identity txt nil))))
+
+(defun evil-collection-pdf-disable-visual-mode ()
+  "Don't enter visual-mode when the mark is activated.
+Rationale: pdf-view allows using the region to select text within the pdf,
+but evil-mode does not know how to do this. It selects entire pdf images
+instead, which is useless and counterintuitive."
+  (add-hook 'evil-local-mode-hook
+            (lambda () (remove-hook
+                        'activate-mark-hook
+                        #'evil-visual-activate-hook
+                        t))
+            nil t))
+
+;;;###autoload
+(defun evil-collection-pdf-setup ()
+  "Set up `evil' bindings for `pdf-view'."
+  (evil-collection-inhibit-insert-state 'pdf-view-mode-map)
+  (evil-set-initial-state 'pdf-view-mode 'normal)
+  (evil-collection-define-key 'normal 'pdf-view-mode-map
+    ;; motion
+    (kbd "RET") 'image-next-line
+    "j" 'pdf-view-next-line-or-next-page
+    "k" 'pdf-view-previous-line-or-previous-page
+    (kbd "<delete>") 'pdf-view-scroll-down-or-previous-page
+    (kbd "C-f") 'pdf-view-scroll-up-or-next-page
+    (kbd "C-b") 'pdf-view-scroll-down-or-previous-page
+    (kbd "<next>") 'forward-page
+    (kbd "<prior>") 'backward-page
+    (kbd "<down>") 'pdf-view-next-line-or-next-page
+    (kbd "<up>") 'pdf-view-previous-line-or-previous-page
+    "gg" 'evil-collection-pdf-view-goto-first-page
+    "G" 'evil-collection-pdf-view-goto-page
+
+    ;; mark
+    "'" 'pdf-view-jump-to-register
+    "m" 'pdf-view-position-to-register
+
+    ;; vim-fold-style synonyms kept inline.
+    "zi" 'pdf-view-enlarge
+    "zo" 'pdf-view-shrink
+    "z0" 'pdf-view-scale-reset
+
+    "f" 'pdf-links-isearch-link
+    "F" 'pdf-links-action-perform
+    "h" 'image-backward-hscroll
+    "^" 'image-bol
+    "$" 'image-eol
+    "l" 'image-forward-hscroll
+
+    "H" 'pdf-view-fit-height-to-window ; evil-image has "H"
+    "P" 'pdf-view-fit-page-to-window
+    "W" 'pdf-view-fit-width-to-window ; evil-image has "W"
+
+    (kbd "<C-down-mouse-1>") 'pdf-view-mouse-extend-region
+    (kbd "<M-down-mouse-1>") 'pdf-view-mouse-set-region-rectangle
+    (kbd "<down-mouse-1>")  'pdf-view-mouse-set-region
+
+    (kbd "C-c C-c") 'doc-view-mode
+    (kbd "C-c <tab>") 'pdf-view-extract-region-image
+
+    "sb" 'pdf-view-set-slice-from-bounding-box
+    "sm" 'pdf-view-set-slice-using-mouse
+    "sr" 'pdf-view-reset-slice
+
+    ;; goto
+    "gl" 'pdf-view-goto-label
+
+    ;; search
+    (kbd "M-s o") 'pdf-occur ; TODO: More Evil bindings?
+
+    "/" 'isearch-forward
+    "?" 'isearch-backward
+    "n" 'isearch-repeat-forward
+    "N" 'isearch-repeat-backward
+
+    "zd" 'pdf-view-dark-minor-mode
+    "zm" 'pdf-view-midnight-minor-mode
+    "zp" 'pdf-view-printer-minor-mode
+
+    "o" 'pdf-outline
+
+    ;; quit
+    "Q" 'kill-current-buffer)
+  (evil-collection-bind 'pdf-view-mode-map
+                        'scroll-down 'pdf-view-scroll-up-or-next-page
+                        'scroll-up 'pdf-view-scroll-down-or-previous-page
+                        'next-item 'pdf-view-next-page-command
+                        'prev-item 'pdf-view-previous-page-command
+                        'next-section 'pdf-view-next-page-command
+                        'prev-section 'pdf-view-previous-page-command
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'kill-current-buffer
+                        'refresh 'revert-buffer
+                        'zoom-in    'pdf-view-enlarge
+                        'zoom-out   'pdf-view-shrink
+                        'zoom-reset 'pdf-view-scale-reset)
+
+
+  (when evil-want-C-d-scroll
+    (evil-collection-define-key 'normal 'pdf-view-mode-map
+      (kbd "C-d") 'pdf-view-scroll-up-or-next-page))
+  (when evil-want-C-u-scroll
+    (evil-collection-define-key 'normal 'pdf-view-mode-map
+      (kbd "C-u") 'pdf-view-scroll-down-or-previous-page))
+
+  (add-hook 'pdf-view-mode-hook #'evil-collection-pdf-disable-visual-mode)
+
+  (evil-collection-define-key 'normal 'pdf-view-mode-map
+    "y" 'evil-collection-pdf-yank)
+
+  (evil-collection-inhibit-insert-state 'pdf-history-minor-mode-map)
+  (evil-set-initial-state 'pdf-history-minor-mode 'normal)
+  (evil-collection-define-key 'normal 'pdf-history-minor-mode-map
+    ;; history forward / backward
+    (kbd "C-i") 'evil-collection-pdf-jump-forward
+    (kbd "C-o") 'evil-collection-pdf-jump-backward)
+
+  (evil-collection-inhibit-insert-state 'pdf-outline-buffer-mode-map)
+  (evil-set-initial-state 'pdf-outline-buffer-mode 'normal)
+  (evil-collection-define-key 'normal 'pdf-outline-buffer-mode-map
+    "." 'pdf-outline-move-to-current-page
+    (kbd "SPC") 'pdf-outline-select-pdf-window
+
+    "G" 'pdf-outline-end-of-buffer
+    "^" 'pdf-outline-up-heading
+    "<" 'pdf-outline-up-heading ; TODO: Don't set this by default?
+
+    "zf" 'pdf-outline-follow-mode ; Helm has "C-c C-f" in Emacs state.
+
+    ;; quit
+    (kbd "C-w q") 'pdf-outline-quit-and-kill) ; TODO: Do we need to set this? I think not.
+  (evil-collection-bind 'pdf-outline-buffer-mode-map
+                        'section-toggle 'outline-toggle-children
+                        'section-toggle-all 'pdf-outline-toggle-subtree
+                        'action 'pdf-outline-follow-link-and-quit
+                        'action-other 'pdf-outline-follow-link
+                        'action-stay 'pdf-outline-display-link
+                        'quit 'quit-window
+                        'quit-save 'pdf-outline-quit-and-kill
+                        'quit-cancel 'quit-window)
+
+  (evil-collection-inhibit-insert-state 'pdf-occur-buffer-mode-map)
+  (evil-set-initial-state 'pdf-occur-buffer-mode 'normal)
+  (evil-collection-define-key 'normal 'pdf-occur-buffer-mode-map
+    (kbd "SPC") 'pdf-occur-view-occurrence
+    "gD" 'pdf-occur-view-occurrence
+
+    "A" 'pdf-occur-tablist-gather-documents
+    "D" 'tablist-do-kill-lines
+
+    ;; sort
+    "o" 'tabulated-list-sort
+    "O" 'tablist-sort ; TODO: Do we need this?
+
+    ;; refresh
+    "G" 'tablist-revert
+
+    "K" 'pdf-occur-abort-search
+
+    ;; mark
+    "*m" 'tablist-mark-forward
+    "~" 'tablist-toggle-marks
+    "*!" 'tablist-unmark-all-marks
+    "*c" 'tablist-change-marks
+    "*n" 'tablist-mark-items-numeric
+    "*r" 'tablist-mark-items-regexp
+    "%"  'tablist-mark-items-regexp
+
+    "a" 'tablist-flag-forward
+
+    ;; "f" 'tablist-find-entry ; TODO: Equivalent to 'pdf-occur-goto-occurrence?
+    "r" 'pdf-occur-revert-buffer-with-args
+    (kbd "<delete>") 'tablist-unmark-backward
+    (kbd "<backtab>") 'tablist-backward-column
+    (kbd "C-c C-e") 'tablist-export-csv
+
+    [remap evil-first-non-blank] 'tablist-move-to-major-column
+    [remap evil-next-line] 'tablist-next-line
+    [remap evil-previous-line] 'tablist-previous-line
+
+    ;; filter
+    ;; TODO: See if overriding "/" is a good idea.
+    "/!" 'tablist-negate-filter
+    "//" 'tablist-display-filter
+    "/=" 'tablist-push-equal-filter
+    "/C" 'tablist-clear-filter
+    "/D" 'tablist-delete-named-filter
+    "/a" 'tablist-push-named-filter
+    "/d" 'tablist-deconstruct-named-filter
+    "/e" 'tablist-edit-filter
+    "/n" 'tablist-push-numeric-filter
+    "/p" 'tablist-pop-filter
+    "/r" 'tablist-push-regexp-filter
+    "/s" 'tablist-name-current-filter
+    "/t" 'tablist-toggle-first-filter-logic
+    "/z" 'tablist-suspend-filter)
+  (evil-collection-bind 'pdf-occur-buffer-mode-map
+                        'mark 'tablist-mark-forward
+                        'unmark 'tablist-unmark-forward
+                        'unmark-all 'tablist-unmark-all-marks
+                        'execute-marks 'pdf-occur-tablist-do-flagged-delete
+                        'scroll-up 'scroll-down-command
+                        'action 'pdf-occur-goto-occurrence
+                        'action-other 'pdf-occur-view-occurrence
+                        'quit 'tablist-quit
+                        'quit-save 'tablist-quit
+                        'quit-cancel 'tablist-quit
+                        'delete 'pdf-occur-tablist-do-delete
+                        'find-definition 'pdf-occur-goto-occurrence))
+
+(provide 'evil-collection-pdf)
+;;; evil-collection-pdf.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pdf/evil-collection-pdf.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pdf/evil-collection-pdf.elc
new file mode 100644
index 0000000..6d6944b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/pdf/evil-collection-pdf.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/popup/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/popup/README.org
new file mode 100644
index 0000000..4409b19
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/popup/README.org
@@ -0,0 +1,12 @@
+* popup
+
+  Evil bindings for [[https://github.com/auto-complete/popup-el][popup.el]] menus.
+
+** Key bindings
+
+*** popup-menu-keymap
+
+    | Command          | Original | Evil  |
+    |------------------+----------+-------|
+    | =popup-next=     | =C-n=    | =C-j= |
+    | =popup-previous= | =C-p=    | =C-k= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/popup/evil-collection-popup.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/popup/evil-collection-popup.el
new file mode 100644
index 0000000..9f6bed1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/popup/evil-collection-popup.el
@@ -0,0 +1,44 @@
+;;; evil-collection-popup.el --- Bindings for `popup' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `popup'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'popup nil t)
+
+(defconst evil-collection-popup-maps '(popup-menu-keymap))
+
+;;;###autoload
+(defun evil-collection-popup-setup ()
+  "Set up `evil' bindings for `popup'."
+  (defvar popup-menu-keymap)
+  (evil-collection-define-key nil 'popup-menu-keymap
+    (kbd "C-j") 'popup-next
+    (kbd "C-k") 'popup-previous))
+
+(provide 'evil-collection-popup)
+;;; evil-collection-popup.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/popup/evil-collection-popup.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/popup/evil-collection-popup.elc
new file mode 100644
index 0000000..b88b1ae
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/popup/evil-collection-popup.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/proced/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/proced/README.org
new file mode 100644
index 0000000..5789230
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/proced/README.org
@@ -0,0 +1,33 @@
+* proced
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Processes.html][proced]].
+
+** Key bindings
+
+   | Command                     | Original | Evil     |
+   |-----------------------------+----------+----------|
+   | =proced-refine=             | =RET=    | =RET=    |
+   | =proced-mark=               | =m=, =d= | =m=      |
+   | =proced-mark-all=           | =M=      | =*=, =M= |
+   | =proced-unmark-all=         | =U=      | =U=      |
+   | =proced-toggle-marks=       | =t=      | =~=      |
+   | =proced-mark-children=      | =C=      | =c=, =C= |
+   | =proced-mark-parents=       | =P=      | =p=, =P= |
+   | =proced-unmark-backward=    | =DEL=    | =DEL=    |
+   | =evil-scroll-down=          | n/a      | =SPC=    |
+   | =evil-scroll-up=            | n/a      | =S-SPC=  |
+   | =proced-toggle-tree=        | =T=      | =zt=     |
+   | =proced-undo=               | n/a      | =u=      |
+   | =proced-omit-processes=     | =o=      | =O=      |
+   | =proced-send-signal=        | =k=, =x= | =x=      |
+   | =proced-filter-interactive= | =f=      | =s=      |
+   | =proced-format-interactive= | =F=      | =S=      |
+   | =proced-sort-start=         | =s s=    | =oo=     |
+   | =proced-sort-interactive=   | =s S=    | =oO=     |
+   | =proced-sort-pcpu=          | =s c=    | =oc=     |
+   | =proced-sort-pmem=          | =s m=    | =om=     |
+   | =proced-sort-pid=           | =s p=    | =op=     |
+   | =proced-sort-time=          | =s t=    | =ot=     |
+   | =proced-sort-user=          | =s u=    | =ou=     |
+   | =proced-renice=             | =r=      | =r=      |
+   | =revert-buffer=             | n/a      | =gr=     |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/proced/evil-collection-proced.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/proced/evil-collection-proced.el
new file mode 100644
index 0000000..e700dde
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/proced/evil-collection-proced.el
@@ -0,0 +1,86 @@
+;;; evil-collection-proced.el --- Evil bindings for proced -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, proced, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for proced.
+
+;;; Code:
+(require 'evil-collection)
+(require 'proced)
+
+(defconst evil-collection-proced-maps '(proced-mode-map))
+
+;;;###autoload
+(defun evil-collection-proced-setup ()
+  "Set up `evil' bindings for `proced'."
+  (evil-collection-set-readonly-bindings 'proced-mode-map)
+  (evil-set-initial-state 'proced-mode 'normal)
+  (evil-collection-define-key 'normal 'proced-mode-map
+    ;; mark
+    ;; TODO: Implement a proced-toggle-mark?
+    "*" 'proced-mark-all
+    "M" 'proced-mark-all
+    "c" 'proced-mark-children
+    "C" 'proced-mark-children           ; Emacs has "C"
+    "p" 'proced-mark-parents
+    "P" 'proced-mark-parents            ; Emacs has "P"
+    (kbd "<delete>") 'proced-unmark-backward
+
+    "zt" 'proced-toggle-tree
+
+    "u" 'proced-undo
+
+    "O" 'proced-omit-processes         ; TODO: Change default binding?
+
+    "x" 'proced-send-signal ; Emacs has "k" and "x", "k" is mentioned in documentation
+
+    ;; filter
+    "S" 'proced-format-interactive
+
+    ;; sort
+    "oo" 'proced-sort-start ; Refers to "[o]rder", Emacs has "s" mentioned in documentation.
+    "oO" 'proced-sort-interactive
+    "oc" 'proced-sort-pcpu
+    "om" 'proced-sort-pmem
+    "op" 'proced-sort-pid
+    "ot" 'proced-sort-time
+    "ou" 'proced-sort-user
+
+    "r" 'proced-renice)
+
+  ;; motion
+  ;; TODO: Implement beginning-of-buffer / end-of-buffer.
+  (evil-collection-bind 'proced-mode-map
+                        'scroll-down 'evil-scroll-down
+                        'scroll-up 'evil-scroll-up
+                        'mark 'proced-mark
+                        'toggle-all 'proced-toggle-marks
+                        'unmark-all 'proced-unmark-all
+                        'action 'proced-refine
+                        'refresh 'revert-buffer
+                        'search-or-filter 'proced-filter-interactive))
+
+(provide 'evil-collection-proced)
+;;; evil-collection-proced.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/proced/evil-collection-proced.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/proced/evil-collection-proced.elc
new file mode 100644
index 0000000..67ff82b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/proced/evil-collection-proced.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/process-menu/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/process-menu/README.org
new file mode 100644
index 0000000..c82676c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/process-menu/README.org
@@ -0,0 +1,18 @@
+* process-menu
+
+  Evil bindings for =process-menu-mode= (=M-x list-processes=).
+
+  Read-only motion / quit bindings come from
+  =evil-collection-set-readonly-bindings= and are not repeated below.
+
+** Key bindings
+
+   | Command                       | Original | Evil    |
+   |-------------------------------+----------+---------|
+   | =process-menu-delete-process= | =d=      | =D=     |
+   | =tabulated-list-sort=         | =S=      | =S=     |
+   | =forward-button=              | n/a      | =TAB=   |
+   | =backward-button=             | n/a      | =S-TAB= |
+   | =evil-scroll-down=            | n/a      | =SPC=   |
+   | =evil-scroll-up=              | n/a      | =S-SPC= |
+   | =revert-buffer=               | n/a      | =gr=    |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/process-menu/evil-collection-process-menu.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/process-menu/evil-collection-process-menu.el
new file mode 100644
index 0000000..3329b59
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/process-menu/evil-collection-process-menu.el
@@ -0,0 +1,53 @@
+;;; evil-collection-process-menu.el --- Evil bindings for process-menu-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, process, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for process-menu-mode (M-x list-processes).
+
+;;; Code:
+(require 'evil-collection)
+
+(defconst evil-collection-process-menu-maps '(process-menu-mode-map))
+
+;;;###autoload
+(defun evil-collection-process-menu-setup ()
+  "Set up `evil' bindings for `list-processes'."
+  (evil-collection-set-readonly-bindings 'process-menu-mode-map)
+  (evil-collection-define-key 'normal 'process-menu-mode-map
+    "S" 'tabulated-list-sort)
+
+  ;; motion
+  ;; TODO: Implement beginning-of-buffer / end-of-buffer.
+  (evil-collection-bind 'process-menu-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button
+                        'scroll-down 'evil-scroll-down
+                        'scroll-up 'evil-scroll-up
+                        'refresh 'revert-buffer
+                        'delete 'process-menu-delete-process
+                        'delete-2 'process-menu-delete-process))
+
+(provide 'evil-collection-process-menu)
+;;; evil-collection-process-menu.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/process-menu/evil-collection-process-menu.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/process-menu/evil-collection-process-menu.elc
new file mode 100644
index 0000000..dd631f5
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/process-menu/evil-collection-process-menu.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/prodigy/evil-collection-prodigy.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/prodigy/evil-collection-prodigy.el
new file mode 100644
index 0000000..85382f4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/prodigy/evil-collection-prodigy.el
@@ -0,0 +1,84 @@
+;;; evil-collection-prodigy.el --- Evil bindings for prodigy -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, prodigy, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `prodigy'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'prodigy nil t)
+
+(defconst evil-collection-prodigy-maps '(prodigy-mode-map
+                                         prodigy-view-mode-map))
+
+;;;###autoload
+(defun evil-collection-prodigy-setup ()
+  "Set up `evil' bindings for `prodigy'."
+  (evil-collection-bind 'prodigy-mode-map 'quit 'quit-window)
+  (evil-collection-define-key 'normal 'prodigy-mode-map
+    "j" 'prodigy-next
+    "k" 'prodigy-prev
+    "gg" 'prodigy-first
+    "G" 'prodigy-last
+
+    ;; mark
+    "*t" 'prodigy-mark-tag
+    "*T" 'prodigy-unmark-tag
+
+    "s" 'prodigy-start
+    "S" 'prodigy-stop
+
+    "`" 'prodigy-display-process
+    "it" 'prodigy-add-tag-filter
+    "in" 'prodigy-add-name-filter
+    "I" 'prodigy-clear-filters
+    "Jm" 'prodigy-jump-magit
+    "Jd" 'prodigy-jump-file-manager
+
+    (kbd "Y") 'prodigy-copy-cmd)
+  (evil-collection-bind 'prodigy-mode-map
+                        'mark 'prodigy-mark
+                        'mark-all 'prodigy-mark-all
+                        'unmark 'prodigy-unmark
+                        'unmark-all 'prodigy-unmark-all
+                        'action 'prodigy-browse
+                        'next-item 'prodigy-next-with-status
+                        'prev-item 'prodigy-prev-with-status
+                        'next-section 'prodigy-next-with-status
+                        'prev-section 'prodigy-prev-with-status)
+
+  (evil-collection-define-key 'normal 'prodigy-view-mode-map
+    "s" 'prodigy-start
+    "S" 'prodigy-stop
+    "r" 'prodigy-restart
+    "c" 'prodigy-view-clear-buffer
+    (kbd "C-l") 'prodigy-view-clear-buffer
+    "x" 'prodigy-view-clear-buffer)
+
+  (evil-collection-bind 'prodigy-mode-map 'refresh      'prodigy-restart)
+  (evil-collection-bind 'prodigy-view-mode-map 'refresh 'prodigy-restart))
+
+(provide 'evil-collection-prodigy)
+;;; evil-collection-prodigy.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/prodigy/evil-collection-prodigy.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/prodigy/evil-collection-prodigy.elc
new file mode 100644
index 0000000..03e3caa
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/prodigy/evil-collection-prodigy.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/profiler/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/profiler/README.org
new file mode 100644
index 0000000..79bd707
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/profiler/README.org
@@ -0,0 +1,25 @@
+* profiler
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/elisp/Profiling.html][profiler]].
+
+** Key bindings
+
+   Bindings added to =profiler-report-mode-map= in normal state.
+
+   | Command                                    | Original   | Evil                |
+   |--------------------------------------------+------------+---------------------|
+   | =profiler-report-next-entry=               | =n=        | =j=                 |
+   | =profiler-report-previous-entry=           | =p=        | =k=                 |
+   | =profiler-report-toggle-entry=             | =RET=, =i= | =TAB=               |
+   | =profiler-report-find-entry=               | =f=, =j=   | =RET=               |
+   | =profiler-report-describe-entry=           | =d=        | =i=                 |
+   | =profiler-report-render-calltree=          | =C=        | =c=                 |
+   | =profiler-report-render-reversed-calltree= | =B=        | =C=                 |
+   | =profiler-report-ascending-sort=           | =A=        | =o=                 |
+   | =profiler-report-descending-sort=          | =D=        | =O=                 |
+   | =profiler-report-compare-profile=          | ===        | ===                 |
+   | =scroll-up-command=                        | n/a        | =SPC=               |
+   | =scroll-down-command=                      | n/a        | =S-SPC=, =<delete>= |
+   | =revert-buffer=                            | n/a        | =gr=                |
+   | =quit-window=                              | n/a        | =q=, =ZZ=           |
+   | =evil-quit=                                | n/a        | =ZQ=                |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/profiler/evil-collection-profiler.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/profiler/evil-collection-profiler.el
new file mode 100644
index 0000000..f597798
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/profiler/evil-collection-profiler.el
@@ -0,0 +1,72 @@
+;;; evil-collection-profiler.el --- Evil bindings for profiler -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, profiler, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `profiler'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'profiler)
+
+(defconst evil-collection-profiler-maps '(profiler-report-mode-map))
+
+(defun evil-collection-profiler-toggle-entry-all ()
+  "Toggle the entry at point with all of its subentries expanded."
+  (interactive)
+  (profiler-report-toggle-entry t))
+
+;;;###autoload
+(defun evil-collection-profiler-setup ()
+  "Set up `evil' bindings for `profiler'."
+  (evil-set-initial-state 'profiler-report-mode 'normal)
+
+  (evil-collection-define-key 'normal 'profiler-report-mode-map
+    ;; motion
+    (kbd "<delete>") 'scroll-down-command
+    "j" 'profiler-report-next-entry
+    "k" 'profiler-report-previous-entry
+
+    ;; sort
+    "o" 'profiler-report-ascending-sort
+    "O" 'profiler-report-descending-sort
+
+    "c" 'profiler-report-render-calltree
+    "C" 'profiler-report-render-reversed-calltree
+    "i" 'profiler-report-describe-entry
+    "=" 'profiler-report-compare-profile)
+  (evil-collection-bind 'profiler-report-mode-map
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'action 'profiler-report-find-entry
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'evil-quit
+                        'refresh 'revert-buffer
+                        'section-toggle 'profiler-report-toggle-entry
+                        'section-toggle-all
+                        'evil-collection-profiler-toggle-entry-all))
+
+(provide 'evil-collection-profiler)
+;;; evil-collection-profiler.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/profiler/evil-collection-profiler.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/profiler/evil-collection-profiler.elc
new file mode 100644
index 0000000..f8620c9
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/profiler/evil-collection-profiler.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/python/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/python/README.org
new file mode 100644
index 0000000..1daae7e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/python/README.org
@@ -0,0 +1,17 @@
+* python
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Python.html][python-mode]].
+
+** Key bindings
+
+   Applied to =python-mode-map=, =python-ts-mode-map=, and
+   =python-base-mode-map= in normal state.
+
+   | Command                        | Original  | Evil |
+   |--------------------------------+-----------+------|
+   | =python-shell-switch-to-shell= | =C-c C-z= | =gz= |
+
+** Notes
+
+   - =evil-shift-width= is set to =python-indent-offset= on
+     =python-mode-hook= and =python-ts-mode-hook=.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/python/evil-collection-python.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/python/evil-collection-python.el
new file mode 100644
index 0000000..b38d885
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/python/evil-collection-python.el
@@ -0,0 +1,51 @@
+;;; evil-collection-python.el --- Bindings for `python' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `python'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'python)
+
+(defconst evil-collection-python-maps '(python-mode-map
+                                        python-ts-mode-map
+                                        python-base-mode-map))
+
+(defun evil-collection-python-set-evil-shift-width ()
+  "Set `evil-shift-width' according to `python-indent-offset'."
+  (setq-local evil-shift-width python-indent-offset))
+
+;;;###autoload
+(defun evil-collection-python-setup ()
+  "Set up `evil' bindings for `python'."
+  (dolist (hook '(python-mode-hook python-ts-mode-hook))
+    (add-hook hook #'evil-collection-python-set-evil-shift-width))
+
+  (dolist (kmap evil-collection-python-maps)
+    (evil-collection-bind kmap 'goto-repl 'python-shell-switch-to-shell)))
+
+(provide 'evil-collection-python)
+;;; evil-collection-python.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/python/evil-collection-python.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/python/evil-collection-python.elc
new file mode 100644
index 0000000..eb794aa
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/python/evil-collection-python.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/quickrun/evil-collection-quickrun.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/quickrun/evil-collection-quickrun.el
new file mode 100644
index 0000000..66b5bb9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/quickrun/evil-collection-quickrun.el
@@ -0,0 +1,41 @@
+;;; evil-collection-quickrun.el --- Bindings for `quickrun' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools, quickrun
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `quickrun'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'quickrun nil t)
+
+(defconst evil-collection-quickrun-maps '(quickrun--mode-map))
+
+;;;###autoload
+(defun evil-collection-quickrun-setup ()
+  "Set up `evil' bindings for `quickrun'.."
+  (evil-collection-bind 'quickrun--mode-map 'quit 'quit-window))
+
+(provide 'evil-collection-quickrun)
+;;; evil-collection-quickrun.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/quickrun/evil-collection-quickrun.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/quickrun/evil-collection-quickrun.elc
new file mode 100644
index 0000000..85d7b57
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/quickrun/evil-collection-quickrun.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racer/evil-collection-racer.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racer/evil-collection-racer.el
new file mode 100644
index 0000000..8cccc02
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racer/evil-collection-racer.el
@@ -0,0 +1,47 @@
+;;; evil-collection-racer.el --- Bindings for `racer' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, rust, tools, evil
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `racer'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'racer nil t)
+
+(defconst evil-collection-racer-maps '(racer-mode-map
+                                       racer-help-mode-map))
+
+;;;###autoload
+(defun evil-collection-racer-setup ()
+  "Set up `evil' bindings for `racer'."
+  (evil-collection-bind 'racer-mode-map
+                        'find-definition 'racer-find-definition
+                        'pop-definition 'pop-tag-mark
+                        'lookup-doc 'racer-describe)
+
+  (evil-collection-bind 'racer-help-mode-map 'quit 'quit-window))
+
+(provide 'evil-collection-racer)
+;;; evil-collection-racer.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racer/evil-collection-racer.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racer/evil-collection-racer.elc
new file mode 100644
index 0000000..4aa3b1d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racer/evil-collection-racer.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racket-describe/evil-collection-racket-describe.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racket-describe/evil-collection-racket-describe.el
new file mode 100644
index 0000000..d906677
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racket-describe/evil-collection-racket-describe.el
@@ -0,0 +1,45 @@
+;;; evil-collection-racket-describe.el --- Bindings for `racket-describe' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Andre Goderich
+
+;; Author: Andre Goderich <yuhsien77@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `racket-describe'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'racket-describe nil t)
+
+(defconst evil-collection-racket-describe-maps '(racket-describe-mode-map))
+
+;;;###autoload
+(defun evil-collection-racket-describe-setup ()
+  "Set up `evil' bindings for `racket-describe'."
+  (evil-collection-inhibit-insert-state 'racket-describe-mode-map)
+  (evil-set-initial-state 'racket-describe-mode 'normal)
+  (evil-collection-bind 'racket-describe-mode-map
+                        'quit 'quit-window
+                        'describe-mode 'describe-mode))
+
+(provide 'evil-collection-racket-describe)
+;;; evil-collection-racket-describe.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racket-describe/evil-collection-racket-describe.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racket-describe/evil-collection-racket-describe.elc
new file mode 100644
index 0000000..7f23ff3
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/racket-describe/evil-collection-racket-describe.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reader/evil-collection-reader.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reader/evil-collection-reader.el
new file mode 100644
index 0000000..5fa5a5a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reader/evil-collection-reader.el
@@ -0,0 +1,162 @@
+;;; evil-collection-reader.el --- Evil bindings for `reader' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2025 Icy-Thought
+
+;; Author: Icy-Thought
+;; Maintainer: Icy-Thought <icy-thought@pm.me>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools, reader
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Emacs `reader'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'reader nil t)
+
+(declare-function reader-first-page "reader")
+(declare-function reader-last-page "reader")
+(declare-function reader-goto-page "reader")
+(declare-function reader-close-doc "reader")
+(declare-function reader-outline-show "reader")
+(declare-function reader-presentation-mode "reader")
+(declare-function reader-rotate-counter-clockwise "reader")
+(declare-function reader-rotate-clockwise "reader")
+(declare-function reader-fit-to-width "reader")
+(declare-function reader-fit-to-height "reader")
+(declare-function reader-mwheel-shrink-size "reader")
+(declare-function reader-shrink-size "reader")
+(declare-function reader-mwheel-enlarge-size "reader")
+(declare-function reader-enlarge-size "reader")
+(declare-function reader-scroll-left-most "reader")
+(declare-function reader-scroll-right-most "reader")
+(declare-function reader-scroll-left "reader")
+(declare-function reader-scroll-right "reader")
+(declare-function reader-scroll-up-or-prev-page "reader")
+(declare-function reader-scroll-down-or-next-page "reader")
+(declare-function reader-scroll-down-screen "reader")
+(declare-function reader-scroll-up-screen "reader")
+(declare-function reader-mwheel-scroll-right "reader")
+(declare-function reader-mwheel-scroll-left "reader")
+(declare-function reader-mwheel-scroll-down "reader")
+(declare-function reader-mwheel-scroll-up "reader")
+(declare-function reader-scroll-down-or-next-page "reader")
+(declare-function reader-scroll-up-or-prev-page "reader")
+(declare-function reader-previous-page "reader")
+(declare-function reader-next-page "reader")
+
+(declare-function reader-outline-visit-page "reader")
+(declare-function reader-outline-select-doc-window "reader")
+
+(defvar reader-mode-map)
+(defvar reader-outline-mode-map)
+
+(defun evil-collection-reader-goto-first-page (&optional page)
+  "Navigates to `page' X or jump to the FIRST PAGE of the document."
+  (interactive "P")
+  (if page
+      (reader-goto-page page)
+    (reader-first-page)))
+
+(defun evil-collection-reader-goto-page (&optional page)
+  "Navigates to `page' X or jump to the LAST PAGE of the document.
+`evil' wrapper around `reader-last-page'."
+  (interactive "P")
+  (if page
+      (reader-goto-page page)
+    (reader-last-page)))
+
+(defconst evil-collection-reader-maps
+  '(reader-mode-map reader-outline-mode-map))
+
+;;;###autoload
+(defun evil-collection-reader-setup ()
+  "Set up `evil' bindings for `reader'."
+  (evil-collection-set-readonly-bindings 'reader-mode-map)
+
+  ;; Refresh reader-mode bindings
+  (add-hook 'reader-mode-hook #'evil-normalize-keymaps)
+  (add-hook 'reader-outline-mode-hook #'evil-normalize-keymaps)
+
+  (evil-collection-define-key 'normal 'reader-mode-map
+    "n" #'reader-next-page
+    "p" #'reader-previous-page
+    "k" #'reader-scroll-up-or-prev-page
+    "j" #'reader-scroll-down-or-next-page
+    [remap next] #'reader-scroll-down-or-next-page
+    [remap previous] #'reader-scroll-up-or-prev-page
+    [remap evil-next-line] #'reader-scroll-down-or-next-page
+    [remap evil-previous-line] #'reader-scroll-up-or-prev-page
+
+    "<wheel-up>" #'reader-mwheel-scroll-up
+    "<wheel-down>" #'reader-mwheel-scroll-down
+    "S-<wheel-up>" #'reader-mwheel-scroll-left
+    "S-<wheel-down>" #'reader-mwheel-scroll-right
+
+    "C-b" #'reader-scroll-up-screen
+    "C-f" #'reader-scroll-down-screen
+    [remap scroll-down-command] #'reader-scroll-up-screen
+    [remap scroll-up-command] #'reader-scroll-down-screen
+
+    "DEL" #'reader-scroll-up-or-prev-page
+
+    "l" #'reader-scroll-right
+    "h" #'reader-scroll-left
+    [remap forward-char] #'reader-scroll-right
+    [remap backward-char] #'reader-scroll-left
+
+    "$" #'reader-scroll-right-most
+    "^" #'reader-scroll-left-most
+    [remap move-end-of-line] #'reader-scroll-right-most
+    [remap move-beginning-of-line] #'reader-scroll-left-most
+
+    "gg" #'evil-collection-reader-goto-first-page
+    "G" #'evil-collection-reader-goto-page
+    [remap beginning-of-buffer] #'reader-first-page
+    [remap end-of-buffer] #'reader-last-page
+    [remap goto-line] #'reader-goto-page
+
+    "C-<wheel-up>" #'reader-mwheel-enlarge-size
+    "C-<wheel-down>" #'reader-mwheel-shrink-size
+
+    "H" #'reader-fit-to-height
+    "W" #'reader-fit-to-width
+
+    "r" #'reader-rotate-clockwise
+    "R" #'reader-rotate-counter-clockwise
+
+    "<f5>" #'reader-presentation-mode
+    "o" #'reader-outline-show
+    "Q" #'reader-close-doc)
+
+  (evil-collection-bind 'reader-mode-map
+                        'scroll-down 'reader-scroll-down-or-next-page
+                        'scroll-up 'reader-scroll-up-or-prev-page
+                        'zoom-in  'reader-enlarge-size
+                        'zoom-out 'reader-shrink-size)
+
+  (evil-collection-define-key 'normal 'reader-outline-mode-map
+    "p" #'previous-line
+    "n" #'next-line
+    "o" #'reader-outline-select-doc-window
+    "q" #'quit-window
+    "RET" #'reader-outline-visit-page
+    "M-RET" #'reader-outline-visit-page))
+
+(provide 'evil-collection-reader)
+;;; evil-collection-reader.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reader/evil-collection-reader.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reader/evil-collection-reader.elc
new file mode 100644
index 0000000..45e3433
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reader/evil-collection-reader.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/realgud/evil-collection-realgud.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/realgud/evil-collection-realgud.el
new file mode 100644
index 0000000..e80a00f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/realgud/evil-collection-realgud.el
@@ -0,0 +1,104 @@
+;;; evil-collection-realgud.el --- Bindings for `realgud' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools, realgud
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `realgud'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'realgud nil t)
+
+(defconst evil-collection-realgud-maps '(realgud:shortkey-mode-map))
+
+;;;###autoload
+(defun evil-collection-realgud-setup ()
+  "Set up `evil' bindings for `realgud'."
+  ;; This one is to represent `realgud-populate-src-buffer-map-plain'.
+  (evil-collection-define-key 'normal 'realgud:shortkey-mode-map
+    "X" 'realgud:cmd-clear
+    "-" 'realgud:cmd-disable
+    "+" 'realgud:cmd-enable
+    "T" 'realgud:cmd-backtrace
+    "f" 'realgud:cmd-finish
+    "Q" 'realgud:cmd-kill
+    "r" 'realgud:cmd-restart
+    "R" 'realgud:cmd-restart
+    "!" 'realgud:cmd-shell
+
+    ;; (evil-collection-define-key nil map [M-down]    'realgud-track-hist-newer)
+    ;; (evil-collection-define-key nil map [M-kp-2]    'realgud-track-hist-newer)
+    ;; (evil-collection-define-key nil map [M-up]      'realgud-track-hist-older)
+    ;; (evil-collection-define-key nil map [M-kp-8]    'realgud-track-hist-older)
+    ;; (evil-collection-define-key nil map [M-kp-up]   'realgud-track-hist-older)
+    ;; (evil-collection-define-key nil map [M-kp-down] 'realgud-track-hist-newer)
+    ;; (evil-collection-define-key nil map [M-print]   'realgud-track-hist-older)
+    ;; (evil-collection-define-key nil map [M-S-down]  'realgud-track-hist-newest)
+    ;; (evil-collection-define-key nil map [M-S-up]    'realgud-track-hist-oldest)
+    )
+  (evil-collection-bind 'realgud:shortkey-mode-map
+                        'quit 'realgud:cmd-quit
+                        'delete 'realgud:cmd-delete)
+
+  (evil-collection-define-key 'normal 'realgud:shortkey-mode-map
+    (kbd "C-x C-q") 'realgud-short-key-mode
+    "1" 'realgud-goto-arrow1
+    "2" 'realgud-goto-arrow2
+    "3" 'realgud-goto-arrow3
+    "4" 'realgud:goto-loc-hist-4
+    "5" 'realgud:goto-loc-hist-5
+    "6" 'realgud:goto-loc-hist-6
+    "7" 'realgud:goto-loc-hist-7
+    "8" 'realgud:goto-loc-hist-8
+    "9" 'realgud:goto-loc-hist-9
+    "E" 'realgud:cmd-eval-at-point
+    "U" 'realgud:cmd-until
+    "H" 'realgud:cmd-until-here
+    [mouse-2] 'realgud:tooltip-eval
+    [left-fringe mouse-1] 'realgud-cmds--mouse-add-remove-bp
+    [left-margin mouse-1] 'realgud-cmds--mouse-add-remove-bp
+    "D" 'realgud:cmd-newer-frame
+    "u" 'realgud:cmd-older-frame
+    "gR" 'realgud-recenter-arrow ;; FIXME: Hmnn!
+    "C" 'realgud-window-cmd-undisturb-src
+    "S" 'realgud-window-src-undisturb-cmd
+    "!" 'realgud:cmd-shell)
+
+  (evil-collection-bind 'realgud:shortkey-mode-map
+                        'describe-mode 'realgud:cmdbuf-info-describe
+                        'refresh 'realgud:cmd-restart
+                        'debug-continue 'realgud:cmd-continue
+                        'debug-step-over 'realgud:cmd-next
+                        'debug-step-into 'realgud:cmd-step
+                        'debug-breakpoint 'realgud:cmd-break
+                        'debug-eval 'realgud:cmd-eval-dwim
+                        'debug-restart 'realgud:cmd-restart
+                        'debug-frame-up 'realgud:cmd-older-frame
+                        'debug-frame-down 'realgud:cmd-newer-frame
+                        'jump 'realgud:cmd-jump)
+
+  (add-hook 'realgud-short-key-mode-hook #'evil-normalize-keymaps))
+
+(provide 'evil-collection-realgud)
+;;; evil-collection-realgud.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/realgud/evil-collection-realgud.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/realgud/evil-collection-realgud.elc
new file mode 100644
index 0000000..8cb35de
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/realgud/evil-collection-realgud.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reftex/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reftex/README.org
new file mode 100644
index 0000000..d6f1d49
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reftex/README.org
@@ -0,0 +1,75 @@
+* reftex
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/reftex/index.html][reftex-mode]].
+
+** Key bindings
+
+*** reftex-select-shared-map
+
+    Used by =reftex-select-label-mode= and =reftex-select-bib-mode= (initial
+    state: normal).
+
+    | Command                                  | Original | Evil              |
+    |------------------------------------------+----------+-------------------|
+    | =reftex-select-next=                     | =n=      | =j=               |
+    | =reftex-select-previous=                 | =p=      | =k=               |
+    | =reftex-select-next-heading=             | n/a      | =]]=, =gj=, =C-j= |
+    | =reftex-select-previous-heading=         | n/a      | =[[=, =gk=, =C-k= |
+    | =reftex-select-accept=                   | =RET=    | =RET=             |
+    | =reftex-select-callback=                 | =SPC=    | =go=              |
+    | =reftex-select-show-insertion-point=     | =.=      | =gO=              |
+    | =reftex-select-read-label=               | n/a      | =TAB=             |
+    | =reftex-select-quit=                     | =q=      | =q=, =ZZ=         |
+    | =evil-quit=                              | n/a      | =ZQ=              |
+    | =reftex-select-help=                     | =?=      | =g?=              |
+    | =reftex-select-jump=                     | n/a      | =J=               |
+    | =reftex-select-cycle-ref-style-forward=  | n/a      | =r=               |
+    | =reftex-select-cycle-ref-style-backward= | n/a      | =R=               |
+    | =reftex-select-mark=                     | n/a      | =m=               |
+    | =reftex-select-unmark=                   | n/a      | =u=               |
+
+    The keys =gr=, =c=, =s=, =x=, =X=, =S=, =o=, =O= dispatch back to
+    reftex's underlying =throw= protocol so the original selection actions
+    (rescan, reuse, switch label type, ref grouping, external xr, BibTeX
+    export) still work.
+
+*** reftex-toc-mode-map
+
+    Initial state: normal.
+
+    | Command                           | Original  | Evil       |
+    |-----------------------------------+-----------+------------|
+    | =reftex-toc-next=                 | =n=       | =j=        |
+    | =reftex-toc-previous=             | =p=       | =k=        |
+    | =reftex-toc-view-line=            | =SPC=     | =go=, =gO= |
+    | =reftex-toc-goto-line-and-hide=   | =RET=     | =RET=      |
+    | =reftex-toc-goto-line=            | =TAB=     | =TAB=      |
+    | =reftex-toc-show-help=            | =?=       | =g?=, =?=  |
+    | =reftex-toc-quit=                 | =q=       | =q=        |
+    | =reftex-toc-quit-and-kill=        | =k=       | =ZZ=       |
+    | =evil-quit=                       | n/a       | =ZQ=       |
+    | =reftex-toc-rescan=               | =r=       | =gr=       |
+    | =reftex-toc-Rescan=               | =R=       | =gR=       |
+    | =reftex-toc-toggle-labels=        | =l=       | =l=        |
+    | =reftex-toc-toggle-index=         | =i=       | =i=        |
+    | =reftex-toc-toggle-context=       | =c=       | =c=        |
+    | =reftex-toc-toggle-file-boundary= | =F=       | =F=        |
+    | =reftex-toc-rename-label=         | =M-%=     | =rl=       |
+    | =reftex-toc-display-index=        | =C-c >=   | =zi=       |
+    | =reftex-toc-external=             | =x=       | =x=        |
+    | =reftex-toc-show-calling-point=   | =.=       | =.=        |
+    | =reftex-toc-jump=                 | =z=       | =J=        |
+    | =reftex-toc-previous-heading=     | =C-c C-p= | =[[=       |
+    | =reftex-toc-next-heading=         | =C-c C-n= | =]]=       |
+    | =reftex-toc-promote=              | =<=       | =>=        |
+    | =reftex-toc-demote=               | =>=       | =<=        |
+    | =reftex-toc-toggle-follow=        | =f=       | =f=        |
+
+    Note: =>= and =<= are swapped relative to upstream so that =>= promotes
+    and =<= demotes; this matches the visual outline-shift direction.
+
+** Notes
+
+   - =reftex-select-label-prompt=, =reftex-citation-prompt=,
+     =reftex-select-label-help=, =reftex-citation-help=, and
+     =reftex-toc-help= are rewritten to advertise the evil keys.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reftex/evil-collection-reftex.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reftex/evil-collection-reftex.el
new file mode 100644
index 0000000..ccac94d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reftex/evil-collection-reftex.el
@@ -0,0 +1,178 @@
+;;; evil-collection-reftex.el --- Bindings for `reftex' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Maximiliano Sandoval <msandova@protonmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, reftex, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `reftex-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'reftex-ref nil t)
+(require 'reftex-ref nil t)
+(require 'reftex-cite nil t)
+(require 'reftex-toc nil t)
+
+(defconst evil-collection-reftex-maps '(reftex-select-shared-map
+                                        reftex-toc-mode-map))
+
+;; original code can be found in reftex-ref.el
+(setq reftex-select-label-prompt
+  "Select: [RET]select [j]next [k]previous [gr]escan [go]context [q]uit [g?]help")
+
+;; original code can be found in reftex-cite.el
+(setq reftex-citation-prompt
+  "Select: [RET]select [j]next [k]previous [q]uit [g?]help")
+
+;; original at reftex-ref.el
+(setq reftex-select-label-help
+  " j / k      Go to next/previous label (Cursor motion works as well)
+ [ / ]      Go to previous/next section heading.
+ c          Reuse last referenced label.
+ J          Jump to a specific section, e.g. '3 J' jumps to section 3.
+ s          Switch label type.
+ gr         Reparse document.
+ go / gO     Show context / Show insertion point.
+ S          Switch to label menu of external document (with LaTeX package `xr').
+ r / R      Toggle \\ref <-> \\vref / Rotate \\ref <=> \\fref <=> \\Fref.
+ TAB        Enter a label with completion.
+ m / M      Mark/unmark entry.
+ x / X      Put all marked entries into one/many \\ref commands.
+ q / RET    Quit without referencing / Accept current label.")
+
+;; code can be found in reftex-cite.el
+(setq reftex-citation-help
+  " j / k      Go to next/previous entry (Cursor motion works as well).
+ go / gO     Show citation / Show insertion point.
+ q          Quit without inserting \\cite macro into buffer.
+ TAB        Enter citation key with completion.
+ RET        Accept current entry and create \\cite macro.
+ m / M      Mark/Unmark the entry.
+ o / O      Create BibTeX file with all marked / unmarked entries.
+ X / X      Put all (marked) entries into one/many \\cite commands.")
+
+(setq reftex-toc-help
+      "                      AVAILABLE KEYS IN TOC BUFFER
+                      ============================
+    j / k      next-line / previous-line
+    go         Show the corresponding location of the LaTeX document.
+    TAB        Goto the location and keep the TOC window.
+    RET        Goto the location and hide the TOC window (also on mouse-2).
+    < / >      Promote / Demote section, or all sections in region.
+    zi         Display Index. With prefix arg, restrict index to current section.
+    q / ZZ     Hide/Kill *toc* buffer, return to position of reftex-toc command.
+    l i c F    Toggle display of  [l]abels,  [i]ndex,  [c]ontext,  [F]ile borders.
+    f          Toggle follow mode
+    gr / gR    Reparse the LaTeX document / Reparse entire LaTeX document.
+    .          In other window, show position from where `reftex-toc' was called.
+    rl         Global search and replace to rename label at point.
+    x          Switch to TOC of external document (with LaTeX package `xr').
+    J          Jump to a specific section (e.g. '3 J' goes to section 3).")
+
+;;;###autoload
+(defun evil-collection-reftex-setup ()
+  "Set up `evil' bindings for `reftex'."
+
+  (evil-set-initial-state 'reftex-select-label-mode 'normal)
+  (evil-set-initial-state 'reftex-select-bib-mode 'normal)
+
+  (evil-collection-define-key 'normal 'reftex-select-shared-map
+    "j" 'reftex-select-next
+    "k" 'reftex-select-previous
+    "gr" (lambda nil "Press `?' during selection to find out
+    about this key" (interactive) (throw (quote myexit) 114)) ;reftex binds keys in a very arcane way using the number asigned by describe-char, in this case the value of "g" is 114
+    "c" (lambda nil "Press `?' during selection to find out
+    about this key." (interactive) (throw (quote myexit) 108))
+    (kbd "<tab>") 'reftex-select-read-label
+    "s" (lambda nil "Press `?' during selection to find out
+    about this key." (interactive) (throw (quote myexit) 115))
+    "x" (lambda nil "Press `?' during selection to find out
+    about this key." (interactive) (throw (quote myexit) 97))
+    "X" (lambda nil "Press `?' during selection to find out
+    about this key." (interactive) (throw (quote myexit) 65))
+    "S" (lambda nil "Press `?' during selection to find out
+    about this key." (interactive) (throw (quote myexit) 120))
+    "r" 'reftex-select-cycle-ref-style-forward
+    "R" 'reftex-select-cycle-ref-style-backward
+    "o" (lambda nil "Press `?' during selection to find out
+    about this key." (interactive) (throw (quote myexit) 101))
+    "O" (lambda nil "Press `?' during selection to find out
+    about this key." (interactive) (throw (quote myexit) 69))
+
+    ;; mark
+    "m" 'reftex-select-mark             ; TODO: Need a mark toggle function.
+    "u" 'reftex-select-unmark)
+  (evil-collection-bind 'reftex-select-shared-map
+                        'action 'reftex-select-accept
+                        'action-other 'reftex-select-callback ; shows point where label is
+                        'action-stay 'reftex-select-show-insertion-point
+                        'next-item 'reftex-select-next-heading
+                        'prev-item 'reftex-select-previous-heading
+                        'next-section 'reftex-select-next-heading
+                        'prev-section 'reftex-select-previous-heading
+                        'quit 'reftex-select-quit
+                        'quit-save 'reftex-select-quit
+                        'quit-cancel 'evil-quit
+                        'describe-mode 'reftex-select-help
+                        'jump 'reftex-select-jump)
+
+  (evil-set-initial-state 'reftex-toc-mode 'normal)
+
+  ;; This one is more involved, in reftex-toc.el, line 267 it shows the prompt
+  ;; string with the keybinds and I don't see any way of changing it to show evil-like binds.
+  ;; Per the upstream `reftex-toc-show-help' text:
+  ;;   go  / RET           Show the corresponding location of the LaTeX document
+  ;;                       (RET also hides the TOC window)
+  ;;   TAB / gO            Goto the location and keep the TOC window
+  (evil-collection-define-key 'normal 'reftex-toc-mode-map
+    "j" 'reftex-toc-next
+    "k" 'reftex-toc-previous
+    (kbd "<tab>") 'reftex-toc-goto-line
+    "?" 'reftex-toc-show-help
+    "l" 'reftex-toc-toggle-labels
+    "i" 'reftex-toc-toggle-index
+    "c" 'reftex-toc-toggle-context
+    "F" 'reftex-toc-toggle-file-boundary
+    "rl" 'reftex-toc-rename-label
+    "zi" 'reftex-toc-display-index
+    "x" 'reftex-toc-external
+    "." 'reftex-toc-show-calling-point
+    (kbd ">") 'reftex-toc-promote
+    (kbd "<") 'reftex-toc-demote
+    "f" 'reftex-toc-toggle-follow)
+  (evil-collection-bind 'reftex-toc-mode-map
+                        'action 'reftex-toc-goto-line-and-hide
+                        'action-other 'reftex-toc-view-line
+                        'action-stay 'reftex-toc-goto-line
+                        'next-section 'reftex-toc-next-heading
+                        'prev-section 'reftex-toc-previous-heading
+                        'quit 'reftex-toc-quit
+                        'quit-save 'reftex-toc-quit-and-kill
+                        'quit-cancel 'evil-quit
+                        'describe-mode 'reftex-toc-show-help
+                        'refresh 'reftex-toc-rescan
+                        'refresh-all 'reftex-toc-Rescan
+                        'jump 'reftex-toc-jump))
+
+(provide 'evil-collection-reftex)
+;;; evil-collection-reftex.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reftex/evil-collection-reftex.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reftex/evil-collection-reftex.elc
new file mode 100644
index 0000000..b6064d2
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/reftex/evil-collection-reftex.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/replace/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/replace/README.org
new file mode 100644
index 0000000..9d85f62
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/replace/README.org
@@ -0,0 +1,34 @@
+* replace
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Other-Repeating-Search.html][occur]] and =occur-edit-mode=.
+
+** Key bindings
+
+*** occur-mode-map
+
+    Initial state: normal.
+
+    | Command                                   | Original  | Evil             |
+    |-------------------------------------------+-----------+------------------|
+    | =occur-edit-mode=                         | =e=       | =i=, =C-x C-q=   |
+    | =occur-mode-goto-occurrence=              | =RET=     | =RET=, =C-c C-c= |
+    | =occur-mode-goto-occurrence-other-window= | =o=       | =go=, =S-RET=    |
+    | =occur-mode-display-occurrence=           | =C-o=     | =M-RET=          |
+    | =next-error-no-select=                    | =n=       | =gj=, =C-j=      |
+    | =previous-error-no-select=                | =p=       | =gk=, =C-k=      |
+    | =occur-rename-buffer=                     | =r=       | =r=              |
+    | =clone-buffer=                            | =c=       | =c=              |
+    | =next-error-follow-minor-mode=            | =C-c C-f= | =C-c C-f=        |
+    | =occur-mode-mouse-goto=                   | =mouse-2= | =mouse-2=        |
+
+*** occur-edit-mode-map
+
+    | Command                         | Original  | Evil                                         |
+    |---------------------------------+-----------+----------------------------------------------|
+    | =occur-cease-edit=              | =C-c C-c= | =C-x C-q=, =<escape>=, =ZZ=, =ZQ=, =C-c C-c= |
+    | =occur-mode-display-occurrence= | =C-c C-o= | =C-o=                                        |
+    | =next-error-follow-minor-mode=  | =C-c C-f= | =C-c C-f=                                    |
+    | =occur-mode-mouse-goto=         | =mouse-2= | =mouse-2=                                    |
+
+    Note: =occur-edit-mode= has no abort command; =ZZ=, =ZQ= and =<escape>=
+    all commit the edit.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/replace/evil-collection-replace.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/replace/evil-collection-replace.el
new file mode 100644
index 0000000..f1a9368
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/replace/evil-collection-replace.el
@@ -0,0 +1,78 @@
+;;; evil-collection-replace.el --- Evil bindings for `replace' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, occur, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `replace'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'replace nil t)
+
+(defconst evil-collection-replace-maps '(occur-mode-map
+                                         occur-edit-mode-map))
+
+;;;###autoload
+(defun evil-collection-replace-setup ()
+  "Set up `evil' bindings for `occur'."
+  (evil-set-initial-state 'occur-mode 'normal)
+
+  (evil-collection-define-key 'normal 'occur-mode-map
+    ;; Like `wdired-mode'.
+    (kbd "C-x C-q") 'occur-edit-mode
+    "i" 'occur-edit-mode
+
+    [mouse-2] 'occur-mode-mouse-goto
+    (kbd "C-c C-c") 'occur-mode-goto-occurrence
+
+    "r" 'occur-rename-buffer
+    "c" 'clone-buffer
+    (kbd "C-c C-f") 'next-error-follow-minor-mode)
+  (evil-collection-bind 'occur-mode-map
+                        'action 'occur-mode-goto-occurrence
+                        'action-other 'occur-mode-goto-occurrence-other-window
+                        'action-stay 'occur-mode-display-occurrence
+                        'next-item 'next-error-no-select
+                        'prev-item 'previous-error-no-select
+                        'next-section 'next-error-no-select
+                        'prev-section 'previous-error-no-select)
+
+  (evil-collection-define-key 'normal 'occur-edit-mode-map
+    ;; Like `wdired-mode'.
+    (kbd "C-x C-q") 'occur-cease-edit
+
+    ;; Sadly, `occur-edit-mode' has no abort commands supported. ZZ, ZQ and
+    ;; <escape> are same.
+    (kbd "<escape>") 'occur-cease-edit
+
+    [mouse-2] 'occur-mode-mouse-goto
+    (kbd "C-c C-c") 'occur-cease-edit
+    (kbd "C-o") 'occur-mode-display-occurrence
+    (kbd "C-c C-f") 'next-error-follow-minor-mode)
+  (evil-collection-bind 'occur-edit-mode-map
+                        'quit-save 'occur-cease-edit
+                        'quit-cancel 'occur-cease-edit))
+
+(provide 'evil-collection-replace)
+;;; evil-collection-replace.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/replace/evil-collection-replace.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/replace/evil-collection-replace.elc
new file mode 100644
index 0000000..bf68de4
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/replace/evil-collection-replace.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/restclient/evil-collection-restclient.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/restclient/evil-collection-restclient.el
new file mode 100644
index 0000000..9499a45
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/restclient/evil-collection-restclient.el
@@ -0,0 +1,68 @@
+;;; evil-collection-restclient.el --- Bindings for `restclient' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.2
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `restclient'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'restclient nil t)
+
+(defconst evil-collection-restclient-maps
+  '(evil-collection-restclient-mode-map
+    restclient-mode-map))
+
+(defvar evil-collection-restclient-mode-map (make-sparse-keymap))
+
+(define-minor-mode evil-collection-restclient-result-mode
+  "A minor mode to attach to `restclient' results"
+  :group 'evil-collection-restclient-mode
+  :keymap evil-collection-restclient-mode-map
+  :lighter nil)
+
+(defun evil-collection-restclient-setup-result-mode ()
+  "Set up `evil-collection-restclient-result-mode'."
+  (evil-collection-restclient-result-mode)
+  (evil-normalize-keymaps))
+
+;;;###autoload
+(defun evil-collection-restclient-setup ()
+  "Set up `evil' bindings for `restclient'."
+  (evil-collection-bind 'restclient-mode-map
+                        'next-item 'restclient-jump-next
+                        'prev-item 'restclient-jump-prev
+                        'next-section 'restclient-jump-next
+                        'prev-section 'restclient-jump-prev)
+  (evil-collection-define-key 'normal 'evil-collection-restclient-mode-map
+    "q" #'quit-window
+    "ZZ" #'quit-window
+    "ZQ" #'evil-quit)
+
+  ;; Enable a separate minor mode so that we can bind keys to it.
+  (add-hook 'restclient-response-loaded-hook
+            #'evil-collection-restclient-setup-result-mode))
+
+(provide 'evil-collection-restclient)
+;;; evil-collection-restclient.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/restclient/evil-collection-restclient.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/restclient/evil-collection-restclient.elc
new file mode 100644
index 0000000..81bacc5
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/restclient/evil-collection-restclient.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rg/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rg/README.org
new file mode 100644
index 0000000..677010c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rg/README.org
@@ -0,0 +1,47 @@
+* rg
+
+  Evil bindings for [[https://github.com/dajva/rg.el][rg.el]] (ripgrep) result buffers.
+
+  Initial state for =rg-mode= is forced to =normal=. Bindings cover
+  =normal=, =motion=, and =visual= states so that evil motion overrides
+  conflicting single-letter rg commands.
+
+** Key bindings
+
+*** normal state
+
+    | Command                        | Original  | Evil        |
+    |--------------------------------+-----------+-------------|
+    | =rg-rerun-toggle-case=         | =c=       | =c=         |
+    | =rg-rerun-change-dir=          | =d=       | =d=         |
+    | =rg-rerun-change-files=        | =f=       | =f=         |
+    | =rg-rerun-toggle-ignore=       | =i=       | =I=         |
+    | =rg-rerun-change-regexp=       | =r=       | =r=         |
+    | =rg-rerun-change-literal=      | =t=       | =t=         |
+    | =rg-save-search=               | =s=       | =s=         |
+    | =rg-save-search-as-name=       | =S=       | =S=         |
+    | =rg-menu=                      | =m=       | =m=         |
+    | =wgrep-change-to-wgrep-mode=   | =e=       | =i=         |
+    | =next-error-follow-minor-mode= | =C-c C-f= | =F=         |
+    | =rg-list-searches=             | =L=       | =L=         |
+    | =rg-back-history=              | =C-c <=   | =C-p=       |
+    | =rg-forward-history=           | =C-c >=   | =C-n=       |
+    | =rg-prev-file=                 | =M-P=     | ={=         |
+    | =rg-next-file=                 | =M-N=     | =}=         |
+    | =previous-error-no-select=     | =p=       | =gk=, =C-k= |
+    | =next-error-no-select=         | =n=       | =gj=, =C-j= |
+    | =evil-forward-word-end=        |           | =e=         |
+    | =evil-forward-char=            |           | =l=         |
+    | =evil-forward-word-begin=      |           | =w=         |
+    | =evil-goto-first-line=         |           | =gg=        |
+    | =rg-recompile=                 | =g=       | =gr=        |
+    | =quit-window=                  |           | =q=         |
+
+*** motion / visual states
+
+    | Command                   | Evil |
+    |---------------------------+------|
+    | =evil-forward-word-end=   | =e=  |
+    | =evil-forward-char=       | =l=  |
+    | =evil-forward-word-begin= | =w=  |
+    | =evil-goto-first-line=    | =gg= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rg/evil-collection-rg.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rg/evil-collection-rg.el
new file mode 100644
index 0000000..b90920e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rg/evil-collection-rg.el
@@ -0,0 +1,89 @@
+;;; evil-collection-rg.el --- Evil bindings for rg -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, rg, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for rg.
+
+;;; Code:
+(require 'evil-collection)
+(require 'rg nil t)
+
+(defconst evil-collection-rg-maps '(rg-mode-map))
+
+;;;###autoload
+(defun evil-collection-rg-setup ()
+  "Set up `evil' bindings for `rg'."
+  (evil-set-initial-state 'rg-mode 'normal)
+
+  (evil-collection-define-key 'normal 'rg-mode-map
+    ;; rerun
+    "c" 'rg-rerun-toggle-case
+    "d" 'rg-rerun-change-dir
+    "f" 'rg-rerun-change-files
+    "I" 'rg-rerun-toggle-ignore ;; was i
+    "r" 'rg-rerun-change-regexp
+    "t" 'rg-rerun-change-literal
+
+    ;; save
+    "s" 'rg-save-search
+    "S" 'rg-save-search-as-name
+
+    ;; action
+    "m" 'rg-menu
+    "i" 'wgrep-change-to-wgrep-mode    ;; was w/e
+    "F" 'next-error-follow-minor-mode  ;; C-c C-f
+    "L" 'rg-list-searches              ;; was l
+    ;; navigation
+    "{" 'rg-prev-file
+    "}" 'rg-next-file
+
+    "e" 'evil-forward-word-end    ;; shadows wgrep-change-to-wgrep-mode
+    "l" 'evil-forward-char        ;; shadows rg-list-searches
+    "w" 'evil-forward-word-begin  ;; shadows wgrep-change-to-wgrep-mode
+    "gg" 'evil-goto-first-line)
+  (evil-collection-bind 'rg-mode-map
+                        'next-item 'next-error-no-select
+                        'prev-item 'previous-error-no-select
+                        'next-section 'next-error-no-select
+                        'prev-section 'previous-error-no-select
+                        'history-previous 'rg-back-history
+                        'history-next     'rg-forward-history
+                        'quit 'quit-window
+                        'refresh 'rg-recompile)
+
+  (evil-collection-define-key 'motion 'rg-mode-map
+    "e" 'evil-forward-word-end    ;; shadows wgrep-change-to-wgrep-mode
+    "l" 'evil-forward-char        ;; shadows rg-list-searches
+    "w" 'evil-forward-word-begin  ;; shadows wgrep-change-to-wgrep-mode
+    "gg" 'evil-goto-first-line)
+
+  (evil-collection-define-key 'visual 'rg-mode-map
+    "e" 'evil-forward-word-end    ;; shadows wgrep-change-to-wgrep-mode
+    "l" 'evil-forward-char        ;; shadows rg-list-searches
+    "w" 'evil-forward-word-begin  ;; shadows wgrep-change-to-wgrep-mode
+    "gg" 'evil-goto-first-line))
+
+(provide 'evil-collection-rg)
+;;; evil-collection-rg.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rg/evil-collection-rg.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rg/evil-collection-rg.elc
new file mode 100644
index 0000000..9543502
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rg/evil-collection-rg.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ripgrep/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ripgrep/README.org
new file mode 100644
index 0000000..bae0b91
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ripgrep/README.org
@@ -0,0 +1,14 @@
+* ripgrep
+
+  Evil bindings for [[https://github.com/nlamirault/ripgrep.el][ripgrep.el]] search result buffers.
+
+** Key bindings
+
+   | Command                      | Original  | Evil        |
+   |------------------------------+-----------+-------------|
+   | =evil-search-next=           |           | =n=         |
+   | =previous-error-no-select=   | =p=       | =gk=, =C-k= |
+   | =next-error-no-select=       | =n=       | =gj=, =C-j= |
+   | =compilation-previous-file=  | ={=       | ={=         |
+   | =compilation-next-file=      | =}=       | =}=         |
+   | =wgrep-change-to-wgrep-mode= | =C-c C-p= | =i=         |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ripgrep/evil-collection-ripgrep.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ripgrep/evil-collection-ripgrep.el
new file mode 100644
index 0000000..f3bff05
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ripgrep/evil-collection-ripgrep.el
@@ -0,0 +1,49 @@
+;;; evil-collection-ripgrep.el --- Bindings for `ripgrep' -*- lexical-binding: t -*-
+
+;; Author: Sid Kasivajhula <sid@countvajhula.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `ripgrep'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'ripgrep nil t)
+
+(defconst evil-collection-ripgrep-maps '(ripgrep-search-mode-map))
+
+;;;###autoload
+(defun evil-collection-ripgrep-setup ()
+  "Set up `evil' bindings for `ripgrep'."
+  (evil-collection-define-key 'normal 'ripgrep-search-mode-map
+    "n" 'evil-search-next
+    "{" 'compilation-previous-file
+    "}" 'compilation-next-file
+    "i" 'wgrep-change-to-wgrep-mode)
+  (evil-collection-bind 'ripgrep-search-mode-map
+                        'next-item 'next-error-no-select
+                        'prev-item 'previous-error-no-select
+                        'next-section 'next-error-no-select
+                        'prev-section 'previous-error-no-select))
+
+
+(provide 'evil-collection-ripgrep)
+;;; evil-collection-ripgrep.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ripgrep/evil-collection-ripgrep.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ripgrep/evil-collection-ripgrep.elc
new file mode 100644
index 0000000..588213e
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ripgrep/evil-collection-ripgrep.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rjsx-mode/evil-collection-rjsx-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rjsx-mode/evil-collection-rjsx-mode.el
new file mode 100644
index 0000000..eddbe4a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rjsx-mode/evil-collection-rjsx-mode.el
@@ -0,0 +1,48 @@
+;;; evil-collection-rjsx-mode.el --- Bindings for `rjsx-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, rjsx, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `rjsx-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'rjsx-mode nil t)
+
+(defconst evil-collection-rjsx-mode-maps '(rjsx-mode-map))
+
+(defvar rjsx-mode-map)
+
+
+;;;###autoload
+(defun evil-collection-rjsx-mode-setup ()
+  "Set up `evil' bindings for `rjsx-mode'."
+  (when evil-want-C-d-scroll
+    (evil-collection-define-key 'insert 'rjsx-mode-map
+      (kbd "C-d") 'rjsx-delete-creates-full-tag)
+    (evil-collection-define-key 'normal 'rjsx-mode-map
+      (kbd "C-d") 'evil-scroll-down)))
+
+(provide 'evil-collection-rjsx-mode)
+;;; evil-collection-rjsx-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rjsx-mode/evil-collection-rjsx-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rjsx-mode/evil-collection-rjsx-mode.elc
new file mode 100644
index 0000000..b39a566
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rjsx-mode/evil-collection-rjsx-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/robe/evil-collection-robe.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/robe/evil-collection-robe.el
new file mode 100644
index 0000000..bbec22e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/robe/evil-collection-robe.el
@@ -0,0 +1,45 @@
+;;; evil-collection-robe.el --- Bindings for `robe' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, evil, tools, robe
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `robe'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'robe nil t)
+
+(defconst evil-collection-robe-maps '(robe-mode-map))
+
+;;;###autoload
+(defun evil-collection-robe-setup ()
+  "Set up `evil' bindings for `robe'."
+  (evil-collection-bind 'robe-mode-map
+                        'find-definition 'robe-jump
+                        'pop-definition 'pop-tag-mark
+                        'lookup-doc 'robe-doc
+                        'refresh 'robe-rails-refresh))
+
+(provide 'evil-collection-robe)
+;;; evil-collection-robe.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/robe/evil-collection-robe.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/robe/evil-collection-robe.elc
new file mode 100644
index 0000000..b662b16
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/robe/evil-collection-robe.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rtags/evil-collection-rtags.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rtags/evil-collection-rtags.el
new file mode 100644
index 0000000..594bb2a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rtags/evil-collection-rtags.el
@@ -0,0 +1,124 @@
+;;; evil-collection-rtags.el --- Evil bindings for `rtags' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, rtags, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Evil bindings for `rtags'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'rtags nil t)
+
+(defvar rtags-mode-map)
+(defvar rtags-dependency-tree-mode-map)
+(defvar rtags-references-tree-mode-map)
+(defvar rtags-location-stack-visualize-mode-map)
+
+(defconst evil-collection-rtags-maps '(rtags-mode-map
+                                       rtags-dependency-tree-mode-map
+                                       rtags-references-tree-mode-map
+                                       rtags-location-stack-visualize-mode-map))
+
+;;;###autoload
+(defun evil-collection-rtags-setup ()
+  "Set up `evil' bindings for `rtags'."
+  (evil-set-initial-state 'rtags-mode 'normal)
+  (evil-set-initial-state 'rtags-dependency-tree-mode 'normal)
+  (evil-set-initial-state 'rtags-references-tree-mode 'normal)
+  (evil-set-initial-state 'rtags-location-stack-visualize-mode 'normal)
+
+  (evil-collection-define-key 'normal 'rtags-mode-map
+    [mouse-1] 'rtags-select-other-window
+    [mouse-2] 'rtags-select-other-window
+
+    "c" 'rtags-select-caller
+    "C" 'rtags-select-caller-other-window)
+  (evil-collection-bind 'rtags-mode-map
+                        'action 'rtags-select
+                        'action-other 'rtags-select-other-window
+                        'action-stay 'rtags-show-in-other-window
+                        'quit 'rtags-call-bury-or-delete
+                        'delete 'rtags-select-and-remove-rtags-buffer
+                        'delete-2 'rtags-select-and-remove-rtags-buffer)
+
+  (evil-collection-bind 'rtags-dependency-tree-mode-map 'section-toggle 'rtags-dependency-tree-toggle-current-expanded)
+  (evil-collection-define-key 'normal 'rtags-dependency-tree-mode-map
+    "E" 'rtags-dependency-tree-expand-all
+    "c" 'rtags-dependency-tree-collapse-all
+    "-" 'rtags-dependency-tree-collapse-current
+    "+" 'rtags-dependency-tree-expand-current
+    "P" 'rtags-dependency-tree-find-path
+
+    [mouse-1] 'rtags-select-other-window
+    [mouse-2] 'rtags-select-other-window
+    "s" 'rtags-show-in-other-window)
+  (evil-collection-bind 'rtags-dependency-tree-mode-map
+                        'action 'rtags-select
+                        'action-other 'rtags-select-other-window
+                        'action-stay 'rtags-show-in-other-window
+                        'next-item 'rtags-dependency-tree-next-level
+                        'prev-item 'rtags-dependency-tree-previous-level
+                        'next-section 'rtags-dependency-tree-next-level
+                        'prev-section 'rtags-dependency-tree-previous-level
+                        'quit 'rtags-call-bury-or-delete
+                        'find-file 'rtags-dependency-tree-find-path
+                        'delete 'rtags-select-and-remove-rtags-buffer
+                        'delete-2 'rtags-select-and-remove-rtags-buffer)
+
+  (evil-collection-bind 'rtags-references-tree-mode-map 'section-toggle 'rtags-references-tree-toggle-current-expanded)
+  (evil-collection-define-key 'normal 'rtags-references-tree-mode-map
+    "E" 'rtags-references-tree-expand-all
+    "c" 'rtags-references-tree-collapse-all
+    "-" 'rtags-references-tree-collapse-current
+    "+" 'rtags-references-tree-expand-current
+
+    [mouse-1] 'rtags-select-other-window
+    [mouse-2] 'rtags-select-other-window
+    "s" 'rtags-show-in-other-window)
+  (evil-collection-bind 'rtags-references-tree-mode-map
+                        'action 'rtags-select
+                        'action-other 'rtags-select-other-window
+                        'action-stay 'rtags-show-in-other-window
+                        'next-item 'rtags-references-tree-next-level
+                        'prev-item 'rtags-references-tree-previous-level
+                        'next-section 'rtags-references-tree-next-level
+                        'prev-section 'rtags-references-tree-previous-level
+                        'quit 'rtags-call-bury-or-delete
+                        'delete 'rtags-select-and-remove-rtags-buffer
+                        'delete-2 'rtags-select-and-remove-rtags-buffer)
+
+  (evil-collection-define-key 'normal 'rtags-location-stack-visualize-mode-map
+    [mouse-1] 'rtags-select-other-window
+    [mouse-2] 'rtags-select-other-window
+    "s" 'rtags-show-in-other-window)
+  (evil-collection-bind 'rtags-location-stack-visualize-mode-map
+                        'action 'rtags-select
+                        'action-other 'rtags-select-other-window
+                        'action-stay 'rtags-show-in-other-window
+                        'quit 'rtags-call-bury-or-delete
+                        'delete 'rtags-select-and-remove-rtags-buffer
+                        'delete-2 'rtags-select-and-remove-rtags-buffer))
+
+(provide 'evil-collection-rtags)
+;;; evil-collection-rtags.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rtags/evil-collection-rtags.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rtags/evil-collection-rtags.elc
new file mode 100644
index 0000000..8c32c6d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/rtags/evil-collection-rtags.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ruby-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ruby-mode/README.org
new file mode 100644
index 0000000..9d81ad8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ruby-mode/README.org
@@ -0,0 +1,9 @@
+* ruby-mode
+
+  Evil support for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Misc-for-Programmers.html][ruby-mode]].
+
+** Notes
+
+   No key bindings are added. =evil-shift-width= is set to
+   =ruby-indent-level= on =ruby-mode-hook= so that =>>= / =<<= reindent by
+   the same amount as ruby-mode itself.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ruby-mode/evil-collection-ruby-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ruby-mode/evil-collection-ruby-mode.el
new file mode 100644
index 0000000..9f7b81f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ruby-mode/evil-collection-ruby-mode.el
@@ -0,0 +1,45 @@
+;;; evil-collection-ruby-mode.el --- Bindings for `ruby-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, tools, ruby
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `ruby-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'ruby-mode)
+
+(defconst evil-collection-ruby-mode-maps nil)
+
+(defun evil-collection-ruby-mode-set-evil-shift-width ()
+  "Set `evil-shift-width' according to `ruby-indent-level'."
+  (setq-local evil-shift-width ruby-indent-level))
+
+;;;###autoload
+(defun evil-collection-ruby-mode-setup ()
+  "Set up `evil' bindings for `ruby'."
+  (add-hook 'ruby-mode-hook #'evil-collection-ruby-mode-set-evil-shift-width))
+
+(provide 'evil-collection-ruby-mode)
+;;; evil-collection-ruby-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ruby-mode/evil-collection-ruby-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ruby-mode/evil-collection-ruby-mode.elc
new file mode 100644
index 0000000..6f8607b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ruby-mode/evil-collection-ruby-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scheme/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scheme/README.org
new file mode 100644
index 0000000..c9397ba
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scheme/README.org
@@ -0,0 +1,17 @@
+* scheme
+
+  Evil bindings for =scheme-mode=.
+
+** Key bindings
+
+   Added to =scheme-mode-map= in normal state.
+
+   | Command                       | Original | Evil |
+   |-------------------------------+----------+------|
+   | =evil-collection-scheme-repl= | n/a      | =gz= |
+
+** New commands
+
+   | Command                       | Key  |                                                |
+   |-------------------------------+------+------------------------------------------------|
+   | =evil-collection-scheme-repl= | =gz= | pop to =*scheme*= buffer and call =run-scheme= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scheme/evil-collection-scheme.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scheme/evil-collection-scheme.el
new file mode 100644
index 0000000..da3c3bc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scheme/evil-collection-scheme.el
@@ -0,0 +1,46 @@
+;;; evil-collection-scheme.el --- Evil bindings for scheme -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, lisp, languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for scheme.
+
+;;; Code:
+(require 'evil-collection)
+
+(defconst evil-collection-scheme-maps '(scheme-mode-map))
+
+(defun evil-collection-scheme-repl ()
+  "Open the scheme REPL."
+  (interactive)
+  (pop-to-buffer (get-buffer-create "*scheme*"))
+  (call-interactively #'run-scheme))
+
+;;;###autoload
+(defun evil-collection-scheme-setup ()
+  "Set up `evil' bindings for `scheme'."
+  (evil-collection-bind 'scheme-mode-map 'goto-repl 'evil-collection-scheme-repl))
+
+(provide 'evil-collection-scheme)
+;;; evil-collection-scheme.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scheme/evil-collection-scheme.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scheme/evil-collection-scheme.elc
new file mode 100644
index 0000000..f3f6e63
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scheme/evil-collection-scheme.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scroll-lock/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scroll-lock/README.org
new file mode 100644
index 0000000..4b80844
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scroll-lock/README.org
@@ -0,0 +1,24 @@
+* scroll-lock
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Scrolling.html][scroll-lock-mode]].
+
+** Key bindings
+
+   Standard evil motions are remapped to scroll-lock equivalents so the
+   cursor stays fixed while the buffer scrolls.
+
+   | Command                                          | Remaps from               |
+   |--------------------------------------------------+---------------------------|
+   | =evil-collection-scroll-lock-next-line=          | =evil-next-line=          |
+   | =evil-collection-scroll-lock-previous-line=      | =evil-previous-line=      |
+   | =evil-collection-scroll-lock-forward-paragraph=  | =evil-forward-paragraph=  |
+   | =evil-collection-scroll-lock-backward-paragraph= | =evil-backward-paragraph= |
+
+** New commands
+
+   | Command                                          |                                    |
+   |--------------------------------------------------+------------------------------------|
+   | =evil-collection-scroll-lock-next-line=          | line-wise scroll down, point fixed |
+   | =evil-collection-scroll-lock-previous-line=      | line-wise scroll up, point fixed   |
+   | =evil-collection-scroll-lock-forward-paragraph=  | paragraph scroll down (=:jump t=)  |
+   | =evil-collection-scroll-lock-backward-paragraph= | paragraph scroll up (=:jump t=)    |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scroll-lock/evil-collection-scroll-lock.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scroll-lock/evil-collection-scroll-lock.el
new file mode 100644
index 0000000..71e580b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scroll-lock/evil-collection-scroll-lock.el
@@ -0,0 +1,87 @@
+;;; evil-collection-scroll-lock.el --- Bindings for `scroll-lock' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, elisp, lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `scroll-lock'.
+
+;;; Code:
+(require 'scroll-lock)
+(require 'evil-collection)
+
+(declare-function scroll-lock-next-line "scroll-lock")
+(declare-function scroll-lock-previous-line "scroll-lock")
+(declare-function scroll-lock-forward-paragraph "scroll-lock")
+(declare-function scroll-lock-backward-paragraph "scroll-lock")
+
+(defconst evil-collection-scroll-lock-maps '(scroll-lock-mode-map))
+
+(evil-define-motion evil-collection-scroll-lock-next-line (count)
+  "Scroll down COUNT lines keeping point fixed."
+  :type line
+  (let (line-move-visual)
+    (scroll-lock-next-line (or count 1))))
+
+(evil-define-motion evil-collection-scroll-lock-previous-line (count)
+  "Scroll up COUNT lines keeping point fixed."
+  :type line
+  (let (line-move-visual)
+    (scroll-lock-previous-line (or count 1))))
+
+(evil-define-motion evil-collection-scroll-lock-forward-paragraph (count)
+  "Scroll down COUNT paragraphs keeping point fixed."
+  :jump t
+  :type exclusive
+  (evil-signal-at-bob-or-eob count)
+  (scroll-lock-forward-paragraph count)
+  (unless (eobp) (forward-line)))
+
+(evil-define-motion evil-collection-scroll-lock-backward-paragraph (count)
+  "Scroll up COUNT paragraphs keeping point fixed."
+  :jump t
+  :type exclusive
+  (evil-signal-at-bob-or-eob (- (or count 1)))
+  (unless (eobp) (forward-line))
+  (scroll-lock-backward-paragraph count)
+  (unless (bobp) (forward-line -1)))
+
+;;;###autoload
+(defun evil-collection-scroll-lock-setup ()
+  "Set up `evil' bindings for `scroll-lock'."
+  (evil-collection-define-key 'normal 'scroll-lock-mode-map
+    [remap evil-next-line] 'evil-collection-scroll-lock-next-line
+    [remap evil-previous-line] 'evil-collection-scroll-lock-previous-line
+    [remap evil-forward-paragraph]
+    'evil-collection-scroll-lock-forward-paragraph
+    [remap evil-backward-paragraph]
+    'evil-collection-scroll-lock-backward-paragraph)
+
+  (evil-add-command-properties
+   #'evil-collection-scroll-lock-forward-paragraph :jump t)
+  (evil-add-command-properties
+   #'evil-collection-scroll-lock-backward-paragraph :jump t)
+
+  (add-hook 'scroll-lock-mode-hook #'evil-normalize-keymaps))
+
+(provide 'evil-collection-scroll-lock)
+;;; evil-collection-scroll-lock.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scroll-lock/evil-collection-scroll-lock.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scroll-lock/evil-collection-scroll-lock.elc
new file mode 100644
index 0000000..2b8f868
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/scroll-lock/evil-collection-scroll-lock.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/selectrum/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/selectrum/README.org
new file mode 100644
index 0000000..aafc019
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/selectrum/README.org
@@ -0,0 +1,43 @@
+* selectrum
+
+  Evil bindings for [[https://github.com/radian-software/selectrum][selectrum]], the incremental narrowing UI for the minibuffer.
+
+  Bindings are installed only when =evil-collection-setup-minibuffer= is
+  non-nil.
+
+** Key bindings
+
+*** selectrum-minibuffer-map (insert and normal)
+
+    | Command                              | Original | Evil    |
+    |--------------------------------------+----------+---------|
+    | =selectrum-previous-page=            | =M-v=    | =C-b=   |
+    | =selectrum-next-page=                | =C-v=    | =C-f=   |
+    | =selectrum-submit-exact-input=       | =C-j=    | =M-RET= |
+    | =selectrum-select-current-candidate= | =RET=    | =RET=   |
+    | =selectrum-previous-page=            | =M-v=    | =C-u=   |
+    | =selectrum-next-page=                | =C-v=    | =C-d=   |
+
+    =C-u= and =C-d= are added only when =evil-want-C-u-scroll= and
+    =evil-want-C-d-scroll= respectively are non-nil.
+
+*** selectrum-minibuffer-map (insert)
+
+    | Command                        | Original | Evil  |
+    |--------------------------------+----------+-------|
+    | =selectrum-next-candidate=     | =C-n=    | =C-j= |
+    | =selectrum-previous-candidate= | =C-p=    | =C-k= |
+    | =selectrum-next-candidate=     | =C-n=    | =C-n= |
+    | =selectrum-previous-candidate= | =C-p=    | =C-p= |
+
+*** selectrum-minibuffer-map (normal)
+
+    | Command                        | Original | Evil |
+    |--------------------------------+----------+------|
+    | =selectrum-next-candidate=     | n/a      | =j=  |
+    | =selectrum-previous-candidate= | n/a      | =k=  |
+    | =selectrum-next-group=         | =C-q n=  | =gj= |
+    | =selectrum-previous-group=     | =C-q p=  | =gk= |
+    | =selectrum-goto-beginning=     | =M-<=    | =gg= |
+    | =selectrum-goto-end=           | =M->=    | =G=  |
+    | =selectrum-kill-ring-save=     | =M-w=    | =gy= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/selectrum/evil-collection-selectrum.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/selectrum/evil-collection-selectrum.el
new file mode 100644
index 0000000..4fa2e35
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/selectrum/evil-collection-selectrum.el
@@ -0,0 +1,73 @@
+;;; evil-collection-selectrum.el --- Evil bindings for Selectrum -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Balaji Sivaraman
+
+;; Author: Balaji Sivaraman <balaji@balajisivaraman.com>
+;; Maintainer: Balaji Sivaraman <balaji@balajisivaraman.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Selectrum.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'selectrum nil t)
+
+(defconst evil-collection-selectrum-maps '(selectrum-minibuffer-map))
+
+;;;###autoload
+(defun evil-collection-selectrum-setup ()
+  "Set up `evil' bindings for `selectrum-mode'."
+
+  (defvar evil-collection-setup-minibuffer)
+  (when evil-collection-setup-minibuffer
+    (evil-collection-define-key '(insert normal) 'selectrum-minibuffer-map
+      (kbd "C-b") 'selectrum-previous-page
+      (kbd "C-f") 'selectrum-next-page
+      (kbd "M-RET") 'selectrum-submit-exact-input
+      (kbd "<return>") 'selectrum-select-current-candidate)
+
+    (evil-collection-define-key 'insert 'selectrum-minibuffer-map
+      (kbd "C-j") 'selectrum-next-candidate
+      (kbd "C-k") 'selectrum-previous-candidate)
+
+    (evil-collection-define-key 'normal 'selectrum-minibuffer-map
+      (kbd "j") 'selectrum-next-candidate
+      (kbd "k") 'selectrum-previous-candidate
+      (kbd "G") 'selectrum-goto-end
+      (kbd "gg") 'selectrum-goto-beginning
+      (kbd "gy") 'selectrum-kill-ring-save)
+    (evil-collection-bind 'selectrum-minibuffer-map
+                          'next-item 'selectrum-next-group
+                          'prev-item 'selectrum-previous-group
+                          'completion-previous 'selectrum-previous-candidate
+                          'completion-next     'selectrum-next-candidate)
+
+    (when evil-want-C-u-scroll
+      (evil-collection-define-key '(insert normal) 'selectrum-minibuffer-map
+        (kbd "C-u") 'selectrum-previous-page))
+
+    (when evil-want-C-d-scroll
+      (evil-collection-define-key '(insert normal) 'selectrum-minibuffer-map
+        (kbd "C-d") 'selectrum-next-page))))
+
+(provide 'evil-collection-selectrum)
+;;; evil-collection-selectrum.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/selectrum/evil-collection-selectrum.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/selectrum/evil-collection-selectrum.elc
new file mode 100644
index 0000000..8a44298
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/selectrum/evil-collection-selectrum.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sh-script/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sh-script/README.org
new file mode 100644
index 0000000..0d63469
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sh-script/README.org
@@ -0,0 +1,15 @@
+* sh-script
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Shell.html][sh-script]] (=sh-mode=).
+
+** Key bindings
+
+   Added to =sh-mode-map= in normal state.
+
+   | Command         | Original | Evil |
+   |-----------------+----------+------|
+   | =sh-show-shell= | n/a      | =gz= |
+
+** Notes
+
+   - =evil-shift-width= is set to =sh-basic-offset= on =sh-mode-hook=.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sh-script/evil-collection-sh-script.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sh-script/evil-collection-sh-script.el
new file mode 100644
index 0000000..2162fe0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sh-script/evil-collection-sh-script.el
@@ -0,0 +1,47 @@
+;;; evil-collection-sh-script.el --- Evil bindings for sh-script -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for sh-script.
+
+;;; Code:
+(require 'evil-collection)
+(require 'sh-script)
+
+(defconst evil-collection-sh-script-maps '(sh-mode-map))
+
+(defun evil-collection-sh-script-set-evil-shift-width ()
+  "Set `evil-shift-width' according to `sh-basic-offset'."
+  (setq-local evil-shift-width sh-basic-offset))
+
+;;;###autoload
+(defun evil-collection-sh-script-setup ()
+  "Set up `evil' bindings for `sh-script'."
+  (add-hook 'sh-mode-hook #'evil-collection-sh-script-set-evil-shift-width)
+
+  (evil-collection-bind 'sh-mode-map 'goto-repl 'sh-show-shell))
+
+(provide 'evil-collection-sh-script)
+;;; evil-collection-sh-script.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sh-script/evil-collection-sh-script.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sh-script/evil-collection-sh-script.elc
new file mode 100644
index 0000000..2e0e264
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sh-script/evil-collection-sh-script.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shell-maker/evil-collection-shell-maker.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shell-maker/evil-collection-shell-maker.el
new file mode 100644
index 0000000..c4c4f93
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shell-maker/evil-collection-shell-maker.el
@@ -0,0 +1,54 @@
+;;; evil-collection-shell-maker.el --- Bindings for `shell-maker' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2026 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, shell-maker, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `shell-maker'.
+;;;
+;;; These bindings apply to `shell-maker-mode' and any derived mode that
+;;; doesn't override RET / S-RET in its own evil state map (for example,
+;;; `agent-shell-mode' inherits from `shell-maker-mode-map').
+
+;;; Code:
+(require 'evil-collection)
+(require 'shell-maker nil t)
+
+(defgroup evil-collection-shell-maker nil
+  "Evil bindings for `shell-maker'."
+  :group 'evil-collection)
+
+(defconst evil-collection-shell-maker-maps '(shell-maker-mode-map))
+
+
+(defvar shell-maker-mode-map)
+
+;;;###autoload
+(defun evil-collection-shell-maker-setup ()
+  "Set up `evil' bindings for `shell-maker'."
+  (evil-collection-bind 'shell-maker-mode-map
+                        'repl-submit 'shell-maker-submit
+                        'repl-newline 'newline
+                        'repl-force-newline 'newline))
+
+(provide 'evil-collection-shell-maker)
+;;; evil-collection-shell-maker.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shell-maker/evil-collection-shell-maker.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shell-maker/evil-collection-shell-maker.elc
new file mode 100644
index 0000000..f1ee8ab
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shell-maker/evil-collection-shell-maker.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shortdoc/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shortdoc/README.org
new file mode 100644
index 0000000..ec50145
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shortdoc/README.org
@@ -0,0 +1,20 @@
+* shortdoc
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/elisp/Documentation-Groups.html][shortdoc]].
+
+** Key bindings
+
+   Bindings added to =shortdoc-mode-map= in normal state (initial state:
+   normal).
+
+   | Command                     | Original       | Evil        |
+   |-----------------------------+----------------+-------------|
+   | =forward-button=            | n/a            | =TAB=       |
+   | =backward-button=           | n/a            | =<backtab>= |
+   | =shortdoc-next=             | =n=            | =C-j=       |
+   | =shortdoc-previous=         | =p=            | =C-k=       |
+   | =shortdoc-next-section=     | =N=, =C-c C-n= | =]]=        |
+   | =shortdoc-previous-section= | =P=, =C-c C-p= | =[[=        |
+
+   The upstream =n=, =p=, =N=, =P=, =w= keys keep their bindings so they
+   remain available alongside the evil-friendly additions.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shortdoc/evil-collection-shortdoc.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shortdoc/evil-collection-shortdoc.el
new file mode 100644
index 0000000..fb656d4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shortdoc/evil-collection-shortdoc.el
@@ -0,0 +1,49 @@
+;;; evil-collection-shortdoc.el --- Evil bindings for shortdoc -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; TODO: Update to emacs 28.1 when it's out
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, lisp, help
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for shortdoc.
+
+;;; Code:
+(require 'evil-collection)
+(require 'shortdoc nil t)
+
+(defconst evil-collection-shortdoc-maps '(shortdoc-mode-map))
+
+;;;###autoload
+(defun evil-collection-shortdoc-setup ()
+  "Set up `evil' bindings for `shortdoc'."
+  (evil-set-initial-state 'shortdoc-mode 'normal)
+  (evil-collection-bind 'shortdoc-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button
+                        'next-section 'shortdoc-next-section
+                        'prev-section 'shortdoc-previous-section
+                        'next-section-2 'shortdoc-next
+                        'prev-section-2 'shortdoc-previous))
+
+(provide 'evil-collection-shortdoc)
+;;; evil-collection-shortdoc.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shortdoc/evil-collection-shortdoc.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shortdoc/evil-collection-shortdoc.elc
new file mode 100644
index 0000000..eef19ad
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/shortdoc/evil-collection-shortdoc.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple-mpc/evil-collection-simple-mpc.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple-mpc/evil-collection-simple-mpc.el
new file mode 100644
index 0000000..113365d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple-mpc/evil-collection-simple-mpc.el
@@ -0,0 +1,116 @@
+;;; evil-collection-simple-mpc.el --- Bindings for `simple-mpc' -*- lexical-binding: t -*-
+;; Copyright (C) 2022 Joseph Turner
+
+;; Author: Joseph Turner <joseph@breatheoutbreathe.in>
+;; Maintainer: Joseph Turner <joseph@breatheoutbreathe.in>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, simple-mpc, processes, mpd
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `simple-mpc'.
+
+;;; Code:
+(require 'simple-mpc nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-simple-mpc-maps '(simple-mpc-mode-map
+                                            simple-mpc-query-mode-map
+                                            simple-mpc-current-playlist-mode-map))
+
+(defun evil-collection-simple-mpc-set-bindings ()
+  "Set up `evil' bindings for `simple-mpc'.
+
+Other modes that are configured:
+`simple-mpc-mode'
+`simple-mpc-query-mode'
+`simple-mpc-current-playlist-mode'"
+  (evil-collection-define-key 'normal 'simple-mpc-mode-map
+    "p" 'simple-mpc-toggle
+    ">" 'simple-mpc-next
+    "<" 'simple-mpc-prev
+    "f" 'simple-mpc-seek-forward
+    "b" 'simple-mpc-seek-backward
+    "c" 'simple-mpc-view-current-playlist
+    "l" 'simple-mpc-load-playlist
+    "S" 'simple-mpc-shuffle-current-playlist
+    "C" 'simple-mpc-clear-current-playlist
+    "+" 'simple-mpc-increase-volume
+    "-" 'simple-mpc-decrease-volume)
+  (evil-collection-bind 'simple-mpc-mode-map
+                        'quit 'simple-mpc-quit
+                        'quit-save 'simple-mpc-quit
+                        'quit-cancel 'simple-mpc-quit
+                        'search-or-filter 'simple-mpc-query)
+
+  (evil-collection-bind 'simple-mpc-current-playlist-mode-map
+                        'quit 'simple-mpc-current-playlist-quit
+                        'quit-save 'simple-mpc-current-playlist-quit
+                        'quit-cancel 'simple-mpc-current-playlist-quit
+                        'action 'simple-mpc-play-current-line
+                        'delete 'simple-mpc-delete
+                        'delete-2 'simple-mpc-delete)
+
+  (evil-collection-define-key 'normal 'simple-mpc-query-mode-map
+    "o" 'simple-mpc-query-sort)
+  (evil-collection-bind 'simple-mpc-query-mode-map
+                        'quit 'simple-mpc-query-quit
+                        'quit-save 'simple-mpc-query-quit
+                        'quit-cancel 'simple-mpc-query-quit
+                        'action-other 'simple-mpc-query-add
+                        'action-stay 'simple-mpc-query-add
+                        'action 'simple-mpc-query-add-and-play))
+
+(defvar simple-mpc-main-buffer-name "*simple-mpc-main*")
+
+(defun evil-collection-simple-mpc-replace-main-view ()
+  "Update main view to show keys in use with evil mode."
+  (interactive)
+  (when
+      (string= (buffer-name) simple-mpc-main-buffer-name)
+    (read-only-mode -1)
+    (erase-buffer)
+    (insert (propertize "* simple-mpc *\n\n"
+                        'face 'simple-mpc-main-name)
+            (propertize "   * controls\n" 'face 'simple-mpc-main-headers)
+            "      * [p]lay/pause toggle\n"
+            "      * [>] next track\n"
+            "      * [<] previous track\n"
+            "      * seek [f]orward\n"
+
+            "      * seek [b]ackward\n"
+            "      * [+] increase volume\n"
+            "      * [-] decrease volume\n"
+            (propertize "\n   * playlist\n" 'face 'simple-mpc-main-headers)
+            "      * view [c]urrent playlist\n"
+            "      * [C]lear current playlist\n"
+            "      * [S]huffle playlist\n"
+            "      * [l]oad playlist\n"
+            "      * [s]earch database\n"
+            (propertize "\n   * misc\n" 'face 'simple-mpc-main-headers)
+            "      * [q]uit")))
+
+;;;###autoload
+(defun evil-collection-simple-mpc-setup ()
+  "Set up simple-mpc bindings and main view."
+  (evil-collection-simple-mpc-set-bindings)
+  (add-hook 'simple-mpc-mode-hook #'evil-collection-simple-mpc-replace-main-view)
+  (add-hook 'simple-mpc-query-mode-hook #'evil-normalize-keymaps)
+  (add-hook 'simple-mpc-current-playlist-mode-hook #'evil-normalize-keymaps))
+
+(provide 'evil-collection-simple-mpc)
+;;; evil-collection-simple-mpc.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple-mpc/evil-collection-simple-mpc.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple-mpc/evil-collection-simple-mpc.elc
new file mode 100644
index 0000000..89af63a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple-mpc/evil-collection-simple-mpc.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple/README.org
new file mode 100644
index 0000000..5cbc496
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple/README.org
@@ -0,0 +1,23 @@
+* simple
+
+  Evil bindings for =special-mode-map=, the base keymap shared by many
+  read-only Emacs buffers.
+
+** Key bindings
+
+   Applies =evil-collection-set-readonly-bindings= to =special-mode-map=
+   (standard motion / quit bindings for read-only buffers), then layers:
+
+   | Command         | Original | Evil |
+   |-----------------+----------+------|
+   | =revert-buffer= | =g=      | =gr= |
+
+   The following upstream single-letter bindings are unset so they do not
+   shadow evil normal-state keys:
+
+   | Key | Was upstream     |
+   |-----+------------------|
+   | =g= | =revert-buffer=  |
+   | =h= | =describe-mode=  |
+   | =?= | =describe-mode=  |
+   | =0= | =digit-argument= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple/evil-collection-simple.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple/evil-collection-simple.el
new file mode 100644
index 0000000..2b165fc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple/evil-collection-simple.el
@@ -0,0 +1,49 @@
+;;; evil-collection-simple.el --- Bindings for `simple' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `simple'
+
+;;; Code:
+(require 'evil-collection)
+(require 'simple)
+
+(defvar special-mode-map)
+
+(defconst evil-collection-simple-maps '(special-mode-map))
+
+;;;###autoload
+(defun evil-collection-simple-setup ()
+  "Set up `evil' bindings for `simple'."
+  (evil-collection-set-readonly-bindings 'special-mode-map)
+  (evil-collection-define-key nil 'special-mode-map
+    "g" nil
+    "h" nil
+    "?" nil
+    "0" nil)
+  (evil-collection-bind 'special-mode-map 'refresh 'revert-buffer))
+
+(provide 'evil-collection-simple)
+;;; evil-collection-simple.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple/evil-collection-simple.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple/evil-collection-simple.elc
new file mode 100644
index 0000000..af7248d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/simple/evil-collection-simple.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/slime/evil-collection-slime.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/slime/evil-collection-slime.el
new file mode 100644
index 0000000..9282089
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/slime/evil-collection-slime.el
@@ -0,0 +1,201 @@
+;;; evil-collection-slime.el --- Evil bindings for `slime' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, slime, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `slime-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'slime nil t)
+
+(defvar slime-parent-map)
+(defvar sldb-mode-map)
+(defvar slime-inspector-mode-map)
+(defvar slime-mode-map)
+(defvar slime-popup-buffer-mode-map)
+(defvar slime-thread-control-mode-map)
+(defvar slime-xref-mode-map)
+
+(defconst evil-collection-slime-maps '(slime-parent-map
+                                       sldb-mode-map
+                                       slime-inspector-mode-map
+                                       slime-mode-map
+                                       slime-popup-buffer-mode-map
+                                       slime-thread-control-mode-map
+                                       slime-xref-mode-map))
+
+(defun evil-collection-slime-last-sexp (command &rest args)
+  "In normal-state or motion-state, last sexp ends at point."
+  (if (and (not evil-move-beyond-eol)
+           (or (evil-normal-state-p) (evil-motion-state-p)))
+      (save-excursion
+        (unless (or (eobp) (eolp)) (forward-char))
+        (apply command args))
+    (apply command args)))
+
+;;;###autoload
+(defun evil-collection-slime-setup ()
+  "Set up `evil' bindings for `slime'."
+  (unless evil-move-beyond-eol
+    (advice-add 'slime-eval-last-expression :around #'evil-collection-slime-last-sexp)
+    (advice-add 'slime-pprint-eval-last-expression :around #'evil-collection-slime-last-sexp)
+    (advice-add 'slime-eval-print-last-expression :around #'evil-collection-slime-last-sexp)
+    (advice-add 'slime-eval-last-expression-in-repl
+                :around #'evil-collection-slime-last-sexp))
+
+  (evil-set-initial-state 'sldb-mode 'normal)
+  (evil-set-initial-state 'slime-inspector-mode 'normal)
+  (evil-set-initial-state 'slime-popup-buffer-mode 'normal)
+  (evil-set-initial-state 'slime-thread-control-mode 'normal)
+  (evil-set-initial-state 'slime-xref-mode 'normal)
+
+  (evil-collection-bind 'slime-parent-map
+                        'find-definition 'slime-edit-definition
+                        'pop-definition 'slime-pop-find-definition-stack)
+
+  (evil-collection-bind 'sldb-mode-map 'action 'sldb-default-action)
+  (evil-collection-define-key 'normal 'sldb-mode-map
+    [mouse-2]  'sldb-default-action/mouse
+    [follow-link] 'mouse-face
+    "\C-i" 'sldb-cycle
+    "S" 'sldb-show-source
+    "d" 'sldb-pprint-eval-in-frame
+    "D" 'sldb-disassemble
+    "gi" 'sldb-inspect-in-frame
+    (kbd "M-j") 'sldb-details-down
+    (kbd "M-k") 'sldb-details-up
+    "gg" 'sldb-beginning-of-backtrace
+    "G" 'sldb-end-of-backtrace
+    "I" 'sldb-invoke-restart-by-name
+    "a" 'sldb-abort
+    "A" 'sldb-break-with-system-debugger
+    "B" 'sldb-break-with-default-debugger
+    "P" 'sldb-print-condition
+    "C" 'sldb-inspect-condition
+    "g:" 'slime-interactive-eval
+    "0" 'sldb-invoke-restart-0
+    "1" 'sldb-invoke-restart-1
+    "2" 'sldb-invoke-restart-2
+    "3" 'sldb-invoke-restart-3
+    "4" 'sldb-invoke-restart-4
+    "5" 'sldb-invoke-restart-5
+    "6" 'sldb-invoke-restart-6
+    "7" 'sldb-invoke-restart-7
+    "8" 'sldb-invoke-restart-8
+    "9" 'sldb-invoke-restart-9)
+  (evil-collection-bind 'sldb-mode-map
+                        'next-section 'sldb-details-down
+                        'prev-section 'sldb-details-up
+                        'quit 'sldb-quit
+                        'describe-mode 'describe-mode
+                        'refresh 'sldb-restart-frame
+                        'toggle 'sldb-toggle-details
+                        'debug-continue 'sldb-continue
+                        'debug-step-over 'sldb-next
+                        'debug-step-into 'sldb-step
+                        'debug-step-out 'sldb-out
+                        'debug-breakpoint 'sldb-break-on-return
+                        'debug-eval 'sldb-eval-in-frame
+                        'debug-restart 'sldb-return-from-frame
+                        'debug-frame-up 'sldb-up
+                        'debug-frame-down 'sldb-down)
+
+  (evil-collection-bind 'slime-inspector-mode-map 'action 'slime-inspector-operate-on-point)
+  (evil-collection-define-key 'normal 'slime-inspector-mode-map
+    [mouse-1] 'slime-inspector-operate-on-click
+    [mouse-2] 'slime-inspector-operate-on-click
+    [mouse-6] 'slime-inspector-pop
+    [mouse-7] 'slime-inspector-next
+    ;; TODO: `slime-inspector-next' and `slime-inspector-pop' should probably
+    ;; just be bound to C-i and C-o.
+    (kbd "C-o") 'slime-inspector-pop
+    (kbd "C-i") 'slime-inspector-next
+    "p" 'slime-inspector-pprint
+    "e" 'slime-inspector-eval
+    "M-p" 'slime-inspector-history
+    "gv" 'slime-inspector-toggle-verbose
+    (kbd "C-i") 'slime-inspector-next-inspectable-object
+    "." 'slime-inspector-show-source)
+  (evil-collection-bind 'slime-inspector-mode-map
+                        'cycle-next 'slime-inspector-next-inspectable-object
+                        'cycle-previous 'slime-inspector-previous-inspectable-object
+                        'next-item 'slime-inspector-next
+                        'prev-item 'slime-inspector-pop
+                        'next-section 'slime-inspector-next
+                        'prev-section 'slime-inspector-pop
+                        'quit 'slime-inspector-quit
+                        'lookup-doc 'slime-inspector-describe
+                        'refresh 'slime-inspector-reinspect
+                        'refresh-all 'slime-inspector-fetch-all
+                        'find-definition 'slime-inspector-show-source)
+
+  (evil-collection-bind 'slime-mode-map
+                        'find-usages 'slime-edit-uses
+                        'find-definition 'slime-edit-definition
+                        'pop-definition 'slime-pop-find-definition-stack
+                        'lookup-doc 'slime-describe-symbol
+                        'goto-repl 'slime-switch-to-output-buffer)
+
+  (evil-collection-bind 'slime-popup-buffer-mode-map
+                        'quit 'quit-window
+                        'find-definition 'slime-edit-definition
+                        'pop-definition 'slime-pop-find-definition-stack)
+
+  (evil-collection-inhibit-insert-state 'slime-thread-control-mode-map)
+  (evil-collection-define-key 'normal 'slime-thread-control-mode-map
+    "a" 'slime-thread-attach
+    "d" 'slime-thread-debug)
+  (evil-collection-bind 'slime-thread-control-mode-map
+                        'refresh 'slime-update-threads-buffer
+                        'delete-2 'slime-thread-kill)
+
+  (evil-collection-define-key 'normal 'slime-xref-mode-map
+    "r" 'slime-xref-retract)
+  (evil-collection-bind 'slime-xref-mode-map
+                        'action 'slime-goto-xref
+                        'action-other 'slime-goto-xref
+                        'action-stay 'slime-show-xref
+                        'next-item 'slime-xref-next-line
+                        'prev-item 'slime-xref-prev-line
+                        'next-section 'slime-xref-next-line
+                        'prev-section 'slime-xref-prev-line
+                        'refresh 'slime-recompile-xref
+                        'refresh-all 'slime-recompile-all-xrefs)
+
+  (evil-collection-bind 'slime-repl-mode-map
+                        'repl-submit 'slime-repl-return
+                        'repl-newline 'slime-repl-newline-and-indent
+                        'repl-force-newline 'slime-repl-newline-and-indent
+                        'next-item 'slime-repl-next-prompt
+                        'prev-item 'slime-repl-previous-prompt
+                        'next-section 'slime-repl-next-prompt
+                        'prev-section 'slime-repl-previous-prompt
+                        'history-previous 'slime-repl-previous-input
+                        'history-next     'slime-repl-next-input)
+
+  (add-hook 'slime-popup-buffer-mode-hook #'evil-normalize-keymaps))
+
+(provide 'evil-collection-slime)
+;;; evil-collection-slime.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/slime/evil-collection-slime.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/slime/evil-collection-slime.elc
new file mode 100644
index 0000000..5d35bb1
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/slime/evil-collection-slime.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sly/evil-collection-sly.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sly/evil-collection-sly.el
new file mode 100644
index 0000000..363c618
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sly/evil-collection-sly.el
@@ -0,0 +1,262 @@
+;;; evil-collection-sly.el --- Evil bindings for `sly' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 Pierre Neidhardt
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, sly, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `sly-mode'.
+
+;;; Code:
+;; WARNING: This mirrors evil-collection-slime.el.  Keep them in sync!
+
+(require 'evil-collection)
+(require 'sly nil t)
+
+(declare-function sly-last-expression "sly")
+(declare-function sly-eval-print "sly")
+
+(defvar sly-connection-list-mode-map)
+(defvar sly-db-mode-map)
+(defvar sly-inspector-mode-map)
+(defvar sly-mode-map)
+(defvar sly-popup-buffer-mode-map)
+(defvar sly-thread-control-mode-map)
+(defvar sly-trace-dialog-mode-map)
+(defvar sly-stickers--replay-mode-map)
+(defvar sly-xref-mode-map)
+
+(defconst evil-collection-sly-maps '(sly-connection-list-mode-map
+                                     sly-db-mode-map
+                                     sly-inspector-mode-map
+                                     sly-mode-map
+                                     sly-popup-buffer-mode-map
+                                     sly-stickers--replay-mode-map
+                                     sly-thread-control-mode-map
+                                     sly-trace-dialog-mode-map
+                                     sly-xref-mode-map))
+
+;; Same as `evil-collection-slime-last-sexp'.
+(defun evil-collection-sly-last-sexp (command &rest args)
+  "In normal-state or motion-state, last sexp ends at point."
+  (if (and (not evil-move-beyond-eol)
+           (or (evil-normal-state-p) (evil-motion-state-p)))
+      (save-excursion
+        (unless (or (eobp) (eolp)) (forward-char))
+        (apply command args))
+    (apply command args)))
+
+(defun evil-collection-sly-eval-print-last-expression (string)
+  "Evaluate sexp before point; print value into the current buffer.
+
+Evil version of `sly-eval-print-last-expression' that accounts for
+`evil-move-beyond-eol'."
+  (interactive
+   (list (progn
+           (when (and (not evil-move-beyond-eol)
+                      (or (evil-normal-state-p) (evil-motion-state-p)))
+             (unless (or (eobp) (eolp))
+               (forward-char)))
+           (sly-last-expression))))
+  (insert "\n")
+  (sly-eval-print string))
+
+;;;###autoload
+(defun evil-collection-sly-setup ()
+  "Set up `evil' bindings for `sly'."
+  (unless evil-move-beyond-eol
+    (advice-add 'sly-eval-last-expression :around #'evil-collection-sly-last-sexp)
+    (advice-add 'sly-pprint-eval-last-expression :around #'evil-collection-sly-last-sexp)
+    (advice-add 'sly-mrepl-return :around #'evil-collection-sly-last-sexp)
+    (advice-add 'sly-eval-print-last-expression :override #'evil-collection-sly-eval-print-last-expression))
+
+  (evil-collection-define-key 'normal 'sly-db-mode-map
+    [follow-link] 'mouse-face
+    "\C-i" 'sly-db-cycle
+    "S" 'sly-db-show-frame-source
+    "d" 'sly-db-pprint-eval-in-frame
+    "D" 'sly-db-disassemble
+    "gi" 'sly-db-inspect-in-frame
+    (kbd "M-j") 'sly-db-details-down
+    (kbd "M-k") 'sly-db-details-up
+    "gg" 'sly-db-beginning-of-backtrace
+    "G" 'sly-db-end-of-backtrace
+    "I" 'sly-db-invoke-restart-by-name
+    "a" 'sly-db-abort
+    "A" 'sly-db-break-with-system-debugger
+    "B" 'sly-db-break-with-default-debugger
+    "P" 'sly-db-print-condition
+    "C" 'sly-db-inspect-condition
+    "g:" 'sly-interactive-eval
+    "0" 'sly-db-invoke-restart-0
+    "1" 'sly-db-invoke-restart-1
+    "2" 'sly-db-invoke-restart-2
+    "3" 'sly-db-invoke-restart-3
+    "4" 'sly-db-invoke-restart-4
+    "5" 'sly-db-invoke-restart-5
+    "6" 'sly-db-invoke-restart-6
+    "7" 'sly-db-invoke-restart-7
+    "8" 'sly-db-invoke-restart-8
+    "9" 'sly-db-invoke-restart-9)
+  (evil-collection-bind 'sly-db-mode-map
+                        'next-section 'sly-db-details-down
+                        'prev-section 'sly-db-details-up
+                        'quit 'sly-db-quit
+                        'describe-mode 'describe-mode
+                        'refresh 'sly-db-restart-frame
+                        'toggle 'sly-db-toggle-details
+                        'debug-continue 'sly-db-continue
+                        'debug-step-over 'sly-db-next
+                        'debug-step-into 'sly-db-step
+                        'debug-step-out 'sly-db-out
+                        'debug-breakpoint 'sly-db-break-on-return
+                        'debug-eval 'sly-db-eval-in-frame
+                        'debug-restart 'sly-db-return-from-frame
+                        'debug-frame-up 'sly-db-up
+                        'debug-frame-down 'sly-db-down)
+
+  (evil-collection-define-key 'normal 'sly-inspector-mode-map
+    [mouse-6] 'sly-inspector-pop
+    [mouse-7] 'sly-inspector-next
+    ;; TODO: `sly-inspector-next' and `sly-inspector-pop' should probably
+    ;; just be bound to C-i and C-o.
+    (kbd "C-o") 'sly-inspector-pop
+    (kbd "C-i") 'sly-inspector-next
+    "e" 'sly-inspector-eval
+    "M-p" 'sly-inspector-history
+    "gv" 'sly-inspector-toggle-verbose
+    (kbd "C-i") 'forward-button
+    "." 'sly-edit-definition)
+  (evil-collection-bind 'sly-inspector-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button
+                        'next-item 'sly-inspector-next
+                        'prev-item 'sly-inspector-pop
+                        'next-section 'sly-inspector-next
+                        'prev-section 'sly-inspector-pop
+                        'quit 'sly-inspector-quit
+                        'find-definition 'sly-edit-definition
+                        'lookup-doc 'sly-inspector-describe-inspectee
+                        'refresh 'sly-inspector-reinspect
+                        'refresh-all 'sly-inspector-fetch-all)
+
+  (evil-collection-bind 'sly-mode-map
+                        'find-usages 'sly-who-references
+                        'find-definition 'sly-edit-definition
+                        'pop-definition 'sly-pop-find-definition-stack
+                        'lookup-doc 'sly-describe-symbol
+                        'goto-repl 'sly-mrepl)
+
+  (evil-collection-bind 'sly-popup-buffer-mode-map
+                        'quit 'quit-window
+                        'find-definition 'sly-edit-definition
+                        'pop-definition 'sly-pop-find-definition-stack)
+
+  (evil-collection-inhibit-insert-state 'sly-thread-control-mode-map)
+  (evil-collection-define-key 'normal 'sly-thread-control-mode-map
+    "a" 'sly-thread-attach
+    "d" 'sly-thread-debug)
+  (evil-collection-bind 'sly-thread-control-mode-map
+                        'refresh 'sly-update-threads-buffer
+                        'delete-2 'sly-thread-kill)
+
+  (evil-collection-bind 'sly-xref-mode-map
+                        'quit 'quit-window
+                        'next-button 'forward-button
+                        'previous-button 'backward-button)
+  (evil-collection-define-key 'normal 'sly-xref-mode-map
+    (kbd "SPC") 'sly-xref-show
+    (kbd "C-i") 'forward-button
+    ;; "r" 'sly-xref-retract ; TODO: Equivalent for Sly?
+    )
+  (evil-collection-bind 'sly-xref-mode-map
+                        'action 'sly-xref-goto
+                        'action-other 'sly-show-xref
+                        'action-stay 'sly-xref-show
+                        'next-item 'sly-xref-next-line
+                        'prev-item 'sly-xref-prev-line
+                        'next-section 'sly-xref-next-line
+                        'prev-section 'sly-xref-prev-line
+                        'refresh 'sly-recompile-xref
+                        'refresh-all 'sly-recompile-all-xrefs)
+
+  (evil-collection-bind 'sly-mrepl-mode-map
+                        'repl-submit 'sly-mrepl-return
+                        'repl-newline 'newline
+                        'repl-force-newline 'newline
+                        'next-item 'sly-mrepl-next-prompt
+                        'prev-item 'sly-mrepl-previous-prompt
+                        'next-section 'sly-mrepl-next-prompt
+                        'prev-section 'sly-mrepl-previous-prompt
+                        'history-previous 'sly-mrepl-previous-input-or-button
+                        'history-next     'sly-mrepl-next-input-or-button)
+
+  (evil-collection-bind 'sly-trace-dialog-mode-map
+                        'quit 'quit-window
+                        'refresh 'sly-trace-dialog-fetch-status
+                        'refresh-all 'sly-trace-dialog-fetch-traces)
+
+  (evil-collection-define-key 'normal 'sly-stickers--replay-mode-map
+    ;; The "n", "p", "x", "h" and "q" key are hard-coded in the description, so
+    ;; we need to set them to the expected command.
+    "gg" 'sly-stickers-replay-jump-to-beginning
+    "G" 'sly-stickers-replay-jump-to-end
+    "F" 'sly-stickers-forget
+    "J" 'sly-stickers-replay-next-for-sticker
+    "K" 'sly-stickers-replay-prev-for-sticker
+    "N" 'sly-stickers-replay-next-for-sticker
+    "P" 'sly-stickers-replay-prev-for-sticker
+    "R" 'sly-stickers-replay-reset-ignore-list
+    "zv" 'sly-stickers-replay-toggle-pop-to-stickers
+    "h" 'sly-stickers-replay-toggle-help
+    "j" 'sly-stickers-replay-next
+    "k" 'sly-stickers-replay-prev
+    "n" 'sly-stickers-replay-next
+    "p" 'sly-stickers-replay-prev
+    "v" 'sly-stickers-replay-pop-to-current-sticker
+    "x" 'sly-stickers-replay-toggle-ignore-sticker
+    "zi" 'sly-stickers-replay-toggle-ignore-sticker
+    "zz" 'sly-stickers-replay-toggle-ignore-zombies)
+  (evil-collection-bind 'sly-stickers--replay-mode-map
+                        'quit 'quit-window
+                        'action-other 'sly-stickers-replay-pop-to-current-sticker
+                        'find-definition 'sly-stickers-replay-jump
+                        'describe-mode 'sly-stickers-replay-toggle-help)
+
+  (evil-collection-bind 'sly-connection-list-mode-map
+                        'next-button 'forward-button
+                        'previous-button 'backward-button)
+  (evil-collection-define-key 'normal 'sly-connection-list-mode-map
+    (kbd "C-i") 'forward-button
+    "R" 'sly-restart-connection-at-point
+    "d" 'sly-connection-list-make-default
+    "o" 'tabulated-list-sort)
+  (evil-collection-bind 'sly-connection-list-mode-map
+                        'quit 'quit-window
+                        'refresh 'sly-update-connection-list
+                        'action 'sly-connection-list-default-action
+                        'delete-2 'sly-quit-connection-at-point)
+
+  (add-hook 'sly-popup-buffer-mode-hook #'evil-normalize-keymaps))
+
+(provide 'evil-collection-sly)
+;;; evil-collection-sly.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sly/evil-collection-sly.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sly/evil-collection-sly.elc
new file mode 100644
index 0000000..286a48b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/sly/evil-collection-sly.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/smerge-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/smerge-mode/README.org
new file mode 100644
index 0000000..44871a7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/smerge-mode/README.org
@@ -0,0 +1,16 @@
+* smerge
+
+  The table below shows the binding changes that are made to smerge-mode.
+
+| Command                    | Original Binding | evil-collection-smerge |
+|----------------------------+------------------+------------------------|
+| =smerge-next=              | =C-c ^ n=        | =gj, ]]=               |
+| =smerge-prev=              | =C-c ^ p=        | =gk, [[=               |
+| =smerge-keep-all=          | =C-c ^ a=        | =ga=                   |
+| =smerge-keep-upper=        | =C-c ^ u=        | =gu=                   |
+| =smerge-keep-lower=        | =C-c ^ l=        | =gl=                   |
+| =smerge-keep-other=        | =C-c ^ o=        | =go=                   |
+| =smerge-keep-mine=         | =C-c ^ m=        | =gm=                   |
+| =smerge-combine-with-next= | =C-c ^ C=        | =gc=                   |
+| =smerge-refine=            | =C-c ^ R=        | =gr=                   |
+| =smerge-keep-base=         | =C-c ^ b=        | =gb=                   |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/smerge-mode/evil-collection-smerge-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/smerge-mode/evil-collection-smerge-mode.el
new file mode 100644
index 0000000..7c14b68
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/smerge-mode/evil-collection-smerge-mode.el
@@ -0,0 +1,55 @@
+;;; evil-collection-smerge-mode.el --- Bindings for `smerge-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 pspiagicw
+
+;; Author: pspiagicw <pspiagicw@gmail.com>
+;; Maintainer: pspiagicw  <pspiagicw@gmail.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, python, tools, emacs
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `smerge-mode'.
+;;; Code:
+(require 'evil-collection)
+(require 'smerge-mode)
+;; 
+
+(defconst evil-collection-smerge-mode-maps '(smerge-mode-map))
+
+;;;###autoload
+(defun evil-collection-smerge-mode-setup ()
+  "Setup up `evil' bindings for `smerge-mode'."
+  (add-hook 'smerge-mode-hook #'evil-normalize-keymaps)
+  (evil-collection-bind 'smerge-mode-map
+                        'next-item 'smerge-next
+                        'prev-item 'smerge-prev
+                        'next-section 'smerge-next
+                        'prev-section 'smerge-prev)
+  (evil-collection-define-key 'normal 'smerge-mode-map
+    "gr" 'smerge-resolve
+    "ga" 'smerge-keep-all
+    "gu" 'smerge-keep-upper
+    "gl" 'smerge-keep-lower
+    "go" 'smerge-keep-other
+    "gm" 'smerge-keep-mine
+    "gc" 'smerge-combine-with-next
+    "gR" 'smerge-refine
+    "gb" 'smerge-keep-base))
+
+(provide 'evil-collection-smerge-mode)
+;;; evil-collection-smerge-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/smerge-mode/evil-collection-smerge-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/smerge-mode/evil-collection-smerge-mode.elc
new file mode 100644
index 0000000..bc2c58d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/smerge-mode/evil-collection-smerge-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/snake/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/snake/README.org
new file mode 100644
index 0000000..0234ac4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/snake/README.org
@@ -0,0 +1,16 @@
+* snake
+
+  Evil bindings for =snake=, the built-in implementation of the classic arcade game.
+
+** Key bindings
+
+   | Command            | Original         | Evil      |
+   |--------------------+------------------+-----------|
+   | =snake-move-left=  | =<left>=, =C-b=  | =h=       |
+   | =snake-move-right= | =<right>=, =C-f= | =l=       |
+   | =snake-move-down=  | =<down>=, =C-n=  | =j=       |
+   | =snake-move-up=    | =<up>=, =C-p=    | =k=       |
+   | =snake-start-game= | =n=              | =gr=      |
+   | =snake-pause-game= | =p=              | =p=       |
+   | =snake-end-game=   | =q=              | =ZZ=      |
+   | =quit-window=      | n/a              | =q=, =ZQ= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/snake/evil-collection-snake.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/snake/evil-collection-snake.el
new file mode 100644
index 0000000..da3133b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/snake/evil-collection-snake.el
@@ -0,0 +1,51 @@
+;;; evil-collection-snake.el --- Bindings for `snake' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+;; Copyright (C) 2022 Farzin Firouzi
+
+;; Author: Farzin Firouzi <farzineff@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `snake'.
+
+;;; Code:
+(require 'evil-collection)
+
+(defconst evil-collection-snake-maps '(snake-mode-map))
+
+;;;###autoload
+(defun evil-collection-snake-setup ()
+  "Set up `evil' bindings for `snake'."
+  (evil-set-initial-state 'snake-mode 'normal)
+  (evil-collection-define-key 'normal 'snake-mode-map
+    "h" 'snake-move-left
+    "l" 'snake-move-right
+    "j" 'snake-move-down
+    "k" 'snake-move-up
+    "p" 'snake-pause-game)
+  (evil-collection-bind 'snake-mode-map
+                        'quit 'quit-window
+                        'quit-save 'snake-end-game
+                        'quit-cancel 'quit-window
+                        'refresh 'snake-start-game))
+
+(provide 'evil-collection-snake)
+;;; evil-collection-snake.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/snake/evil-collection-snake.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/snake/evil-collection-snake.elc
new file mode 100644
index 0000000..b370801
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/snake/evil-collection-snake.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/so-long/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/so-long/README.org
new file mode 100644
index 0000000..f8ff959
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/so-long/README.org
@@ -0,0 +1,22 @@
+* so-long
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/So-Long.html][so-long]], which mitigates performance problems in buffers with very long lines.
+
+** Key bindings
+
+   Normal and visual state bindings added to =so-long-mode-map=. The defaults
+   make motion respect visual lines, matching how so-long buffers are usually
+   read.
+
+   | Command                               | Original | Evil      |
+   |---------------------------------------+----------+-----------|
+   | =evil-next-visual-line=               | n/a      | =j=       |
+   | =evil-previous-visual-line=           | n/a      | =k=       |
+   | =evil-next-line=                      | n/a      | =gj=      |
+   | =evil-previous-line=                  | n/a      | =gk=      |
+   | =evil-beginning-of-visual-line=       | n/a      | =0=, =g0= |
+   | =evil-end-of-visual-line=             | n/a      | =$=       |
+   | =evil-end-of-line=                    | n/a      | =g$=      |
+   | =evil-first-non-blank-of-visual-line= | n/a      | =^=       |
+   | =evil-first-non-blank=                | n/a      | =g^=      |
+   | =end-of-buffer=                       | n/a      | =G=       |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/so-long/evil-collection-so-long.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/so-long/evil-collection-so-long.el
new file mode 100644
index 0000000..e344ef4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/so-long/evil-collection-so-long.el
@@ -0,0 +1,51 @@
+;;; evil-collection-so-long.el --- Bindings for `so-long' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.2
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for so-long.
+
+;;; Code:
+(require 'evil-collection)
+(require 'so-long nil t)
+
+(defvar so-long-mode-map)
+(defconst evil-collection-so-long-maps '(so-long-mode-map))
+
+(defun evil-collection-so-long-setup ()
+  "Set up `evil' bindings for so-long."
+  (evil-collection-define-key '(normal visual) 'so-long-mode-map
+    "j" #'evil-next-visual-line
+    "k" #'evil-previous-visual-line
+    "gj" #'evil-next-line
+    "gk" #'evil-previous-line
+    "0" #'evil-beginning-of-visual-line
+    "g0" #'evil-beginning-of-visual-line
+    "$" #'evil-end-of-visual-line
+    "g$" #'evil-end-of-line
+    "^" #'evil-first-non-blank-of-visual-line
+    "g^" #'evil-first-non-blank
+    "G" 'end-of-buffer))
+
+(provide 'evil-collection-so-long)
+;;; evil-collection-so-long.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/so-long/evil-collection-so-long.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/so-long/evil-collection-so-long.elc
new file mode 100644
index 0000000..398e0de
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/so-long/evil-collection-so-long.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/speedbar/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/speedbar/README.org
new file mode 100644
index 0000000..81a39b4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/speedbar/README.org
@@ -0,0 +1,61 @@
+* speedbar
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/speedbar/index.html][speedbar]], the everything browser sidebar.
+
+** Key bindings
+
+*** speedbar-mode-map
+
+    | Command                                  | Original   | Evil  |
+    |------------------------------------------+------------+-------|
+    | =speedbar-next=                          | =n=        | =j=   |
+    | =speedbar-prev=                          | =p=        | =k=   |
+    | =evil-goto-first-line=                   | n/a        | =gg=  |
+    | =evil-goto-line=                         | n/a        | =G=   |
+    | =speedbar-refresh=                       | =g=        | =gr=  |
+    | =speedbar-edit-line=                     | =RET=, =e= | =RET= |
+    | =speedbar-toggle-line-expansion=         | =SPC=      | =TAB= |
+    | =speedbar-expand-line=                   | =+=        | =zo=  |
+    | =speedbar-expand-line-descendants=       | =[=        | =zO=  |
+    | =speedbar-contract-line=                 | =-=        | =zc=  |
+    | =speedbar-contract-line-descendants=     | =]=        | =zC=  |
+    | =speedbar-toggle-show-all-files=         | n/a        | =a=   |
+    | =speedbar-toggle-updates=                | =t=        | =t=   |
+    | =speedbar-toggle-images=                 | n/a        | =i=   |
+    | =speedbar-toggle-sorting=                | n/a        | =o=   |
+    | =speedbar-restricted-next=               | =M-n=      | =M-j= |
+    | =speedbar-restricted-prev=               | =M-p=      | =M-k= |
+    | =speedbar-forward-list=                  | =M-C-n=    | =]]=  |
+    | =speedbar-backward-list=                 | =M-C-p=    | =[[=  |
+    | =switch-to-quick-buffers=                | =b=        | =b=   |
+    | =switch-to-files=                        | =f=        | =f=   |
+    | =speedbar-change-initial-expansion-list= | n/a        | =J=   |
+
+*** speedbar-file-key-map
+
+    | Command                       | Original | Evil     |
+    |-------------------------------+----------+----------|
+    | =speedbar-item-byte-compile=  | =B=      | =B=      |
+    | =speedbar-item-copy=          | =C=      | =C=      |
+    | =speedbar-item-delete=        | =D=      | =D=      |
+    | =speedbar-item-info=          | =I=      | =I=      |
+    | =speedbar-item-object-delete= | =O=      | =K=      |
+    | =speedbar-item-load=          | =L=      | =L=      |
+    | =speedbar-item-rename=        | =R=      | =R=      |
+    | =speedbar-create-directory=   | =M=      | =+=      |
+    | =speedbar-up-directory=       | =U=      | =^=, =-= |
+
+*** speedbar-buffers-key-map
+
+    | Command                         | Original | Evil |
+    |---------------------------------+----------+------|
+    | =speedbar-buffer-kill-buffer=   | =k=      | =K=  |
+    | =speedbar-buffer-revert-buffer= | =r=      | =gr= |
+
+** New commands
+
+   | Command                                                      | Key          |
+   |--------------------------------------------------------------+--------------|
+   | =evil-collection-speedbar-switch-to-previous-expansion-list= | =C-p=, =C-n= |
+   | =evil-collection-speedbar-switch-to-quick-buffers=           | =b=          |
+   | =evil-collection-speedbar-switch-to-files=                   | =f=          |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/speedbar/evil-collection-speedbar.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/speedbar/evil-collection-speedbar.el
new file mode 100644
index 0000000..ab14525
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/speedbar/evil-collection-speedbar.el
@@ -0,0 +1,112 @@
+;;; evil-collection-speedbar.el --- Evil bindings for speedbar -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, speedbar, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for speedbar.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'speedbar)
+
+(defconst evil-collection-speedbar-maps '(speedbar-mode-map
+                                          speedbar-file-key-map
+                                          speedbar-buffers-key-map))
+
+(defun evil-collection-speedbar-switch-to-previous-expansion-list ()
+  "Back to previously used expansion list."
+  (interactive)
+  (speedbar-change-initial-expansion-list speedbar-previously-used-expansion-list-name))
+
+(defun evil-collection-speedbar-switch-to-quick-buffers ()
+  "Switch to quick-buffers expansion list."
+  (interactive)
+  (speedbar-change-initial-expansion-list "quick buffers"))
+
+(defun evil-collection-speedbar-switch-to-files ()
+  "Switch to files expansion list."
+  (interactive)
+  (speedbar-change-initial-expansion-list "files"))
+
+;;;###autoload
+(defun evil-collection-speedbar-setup ()
+  "Set up `evil' bindings for `speedbar'."
+  (evil-set-initial-state 'speedbar-mode 'normal)
+  (evil-collection-bind 'speedbar-file-key-map 'rename 'speedbar-item-rename)
+  (evil-collection-define-key 'normal 'speedbar-mode-map
+    "j" 'speedbar-next
+    "k" 'speedbar-prev
+    "gg" 'evil-goto-first-line
+    "G"  'evil-goto-line
+
+    ;; Fold
+    "zo" 'speedbar-expand-line
+    "zO" 'speedbar-expand-line-descendants
+    "zc" 'speedbar-contract-line
+    "zC" 'speedbar-contract-line-descendants
+
+    ;; Toggle
+    "a" 'speedbar-toggle-show-all-files
+    "i" 'speedbar-toggle-images
+    "o" 'speedbar-toggle-sorting
+
+    ;; Navigation
+    (kbd "M-j") 'speedbar-restricted-next
+    (kbd "M-k") 'speedbar-restricted-prev
+    (kbd "C-p") 'evil-collection-speedbar-switch-to-previous-expansion-list
+    (kbd "C-n") 'evil-collection-speedbar-switch-to-previous-expansion-list
+    "b" 'evil-collection-speedbar-switch-to-quick-buffers
+    "f" 'evil-collection-speedbar-switch-to-files
+    "J" 'speedbar-change-initial-expansion-list)
+
+  (evil-collection-define-key 'normal 'speedbar-file-key-map
+    ;; File based commands
+    "B" 'speedbar-item-byte-compile
+    "C" 'speedbar-item-copy
+    "I" 'speedbar-item-info
+    "L" 'speedbar-item-load
+    "+" 'speedbar-create-directory
+    "^" 'speedbar-up-directory
+    "-" 'speedbar-up-directory)
+  (evil-collection-bind 'speedbar-file-key-map
+                        'delete 'speedbar-item-delete
+                        'delete-2 'speedbar-item-object-delete)
+
+  (evil-collection-bind 'speedbar-mode-map
+                        'action 'speedbar-edit-line
+                        'next-item 'speedbar-forward-list
+                        'prev-item 'speedbar-backward-list
+                        'next-section 'speedbar-forward-list
+                        'prev-section 'speedbar-backward-list
+                        'refresh         'speedbar-refresh
+                        'toggle 'speedbar-toggle-updates
+                        'section-toggle 'speedbar-toggle-line-expansion)
+  (evil-collection-bind 'speedbar-buffers-key-map
+                        'refresh  'speedbar-buffer-revert-buffer
+                        'delete 'speedbar-buffer-kill-buffer
+                        'delete-2 'speedbar-buffer-kill-buffer))
+
+(provide 'evil-collection-speedbar)
+;;; evil-collection-speedbar.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/speedbar/evil-collection-speedbar.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/speedbar/evil-collection-speedbar.elc
new file mode 100644
index 0000000..68a6157
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/speedbar/evil-collection-speedbar.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tab-bar/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tab-bar/README.org
new file mode 100644
index 0000000..70f8f43
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tab-bar/README.org
@@ -0,0 +1,15 @@
+* tab-bar
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Tab-Bars.html][tab-bar]]. Only =tab-switcher-mode-map= (the =M-x tab-switcher= list) is touched; the global =tab-bar-mode= itself has no buffer-local map to rebind.
+
+** Key bindings
+
+   | Command                  | Original        | Evil            |
+   |--------------------------+-----------------+-----------------|
+   | =tab-switcher-next-line= | =n=, =SPC=      | =j=, =gj=       |
+   | =tab-switcher-prev-line= | =p=             | =k=, =gk=       |
+   | =tab-switcher-delete=    | =d=, =k=, =C-k= | =d=             |
+   | =tab-switcher-select=    | =RET=           | =RET=           |
+   | =tab-switcher-unmark=    | =u=             | =u=             |
+   | =tab-switcher-execute=   | =x=             | =x=             |
+   | =quit-window=            | =q=             | =q=, =ZZ=, =ZQ= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tab-bar/evil-collection-tab-bar.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tab-bar/evil-collection-tab-bar.el
new file mode 100644
index 0000000..01bc9d5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tab-bar/evil-collection-tab-bar.el
@@ -0,0 +1,58 @@
+;;; evil-collection-tab-bar.el --- Evil bindings for tab-bar -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tab-bar, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for tab-bar.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'tab-bar nil t)
+
+(defconst evil-collection-tab-bar-maps '(tab-switcher-mode-map))
+
+(defun evil-collection-tab-bar-setup ()
+  "Set up `evil' bindings to `tab-bar'."
+  (evil-set-initial-state 'tab-switcher-mode 'normal)
+  (evil-collection-define-key 'normal 'tab-switcher-mode-map
+    ;; Movement
+    "j" 'tab-switcher-next-line
+    "k" 'tab-switcher-prev-line
+
+    ;; Mark
+    "d" 'tab-switcher-delete
+    "u" 'tab-switcher-unmark
+    "x" 'tab-switcher-execute)
+  (evil-collection-bind 'tab-switcher-mode-map
+                        'action 'tab-switcher-select
+                        'next-item 'tab-switcher-next-line
+                        'prev-item 'tab-switcher-prev-line
+                        'quit 'quit-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'quit-window))
+
+(provide 'evil-collection-tab-bar)
+
+;;; evil-collection-tab-bar.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tab-bar/evil-collection-tab-bar.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tab-bar/evil-collection-tab-bar.elc
new file mode 100644
index 0000000..059432f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tab-bar/evil-collection-tab-bar.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tablist/evil-collection-tablist.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tablist/evil-collection-tablist.el
new file mode 100644
index 0000000..89ad9eb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tablist/evil-collection-tablist.el
@@ -0,0 +1,74 @@
+;;; evil-collection-tablist.el --- Evil bindings for Tablist -*- lexical-binding: t -*-
+
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tablist, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Tablist.
+
+;;; Code:
+(require 'tablist nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-tablist-maps '(tablist-mode-map tablist-minor-mode-map))
+
+(defvar tablist-mode-regexp-map)
+(defvar tablist-mode-mark-map)
+(defvar tablist-mode-filter-map)
+
+;;;###autoload
+(defun evil-collection-tablist-setup ()
+  "Set up `evil' bindings for `tablist'."
+
+  (let ((common-bindings
+         (list
+          "U"  'tablist-unmark-all-marks
+          "g%" tablist-mode-regexp-map
+          "g*" tablist-mode-mark-map
+          "g/" tablist-mode-filter-map
+          "m"  'tablist-mark-forward
+          "S"  'tablist-sort
+          "u"  'tablist-unmark-forward)))
+
+    (apply #'evil-collection-define-key 'normal 'tablist-mode-map
+           "f" 'tablist-find-entry
+           "X" 'tablist-do-delete
+           common-bindings)
+    (evil-collection-bind 'tablist-mode-map
+                          'mark 'tablist-mark-forward
+                          'toggle 'tablist-toggle-marks
+                          'toggle-all 'tablist-toggle-marks
+                          'unmark 'tablist-unmark-forward
+                          'unmark-all 'tablist-unmark-all-marks
+                          'mark-delete 'tablist-flag-forward
+                          'execute-marks 'tablist-do-flagged-delete
+                          'action 'tablist-find-entry
+                          'search-or-filter 'tablist-do-kill-lines)
+
+    (apply #'evil-collection-define-key 'normal 'tablist-minor-mode-map
+           common-bindings)
+    (evil-collection-bind 'tablist-mode-map 'refresh 'tablist-revert)
+    (evil-collection-bind 'tablist-minor-mode-map
+                          'quit 'tablist-quit
+                          'refresh 'tablist-revert
+                          'toggle 'tablist-toggle-marks
+                          'toggle-all 'tablist-toggle-marks
+                          'search-or-filter 'tablist-do-kill-lines)))
+
+(provide 'evil-collection-tablist)
+;;; evil-collection-tablist.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tablist/evil-collection-tablist.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tablist/evil-collection-tablist.elc
new file mode 100644
index 0000000..b5a217c
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tablist/evil-collection-tablist.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tabulated-list/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tabulated-list/README.org
new file mode 100644
index 0000000..f405393
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tabulated-list/README.org
@@ -0,0 +1,20 @@
+* tabulated-list
+
+  Evil bindings for =tabulated-list-mode=, the parent mode behind package menu, process list, bookmark list, and many other list-based buffers.
+
+** Key bindings
+
+   =n= and =p= are unbound so they fall through to evil motion. The default
+   =g= (revert) and =S= (sort) are kept; column commands move under the =g=
+   prefix.
+
+   | Command                                | Original    | Evil |
+   |----------------------------------------+-------------+------|
+   | =tabulated-list-sort=                  | =S=         | =S=  |
+   | =tabulated-list-narrow-current-column= | ={=         | ={=  |
+   | =tabulated-list-widen-current-column=  | =}=         | =}=  |
+   | =tabulated-list-next-column=           | =M-<right>= | =gl= |
+   | =tabulated-list-previous-column=       | =M-<left>=  | =gh= |
+   | =quit-window=                          | =q=         | =q=  |
+   | =next-line= (unbound)                  | =n=         | n/a  |
+   | =previous-line= (unbound)              | =p=         | n/a  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tabulated-list/evil-collection-tabulated-list.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tabulated-list/evil-collection-tabulated-list.el
new file mode 100644
index 0000000..3d472d9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tabulated-list/evil-collection-tabulated-list.el
@@ -0,0 +1,54 @@
+;;; evil-collection-tabulated-list.el --- Bindings for `tabulated-list' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Morgan Smith <Morgan.J.Smith@outlook.com>
+
+;; Author: Morgan Smith <Morgan.J.Smith@outlook.com>
+;; Maintainer: Morgan Smith <Morgan.J.Smith@outlook.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `tabulated-list'
+
+;;; Code:
+(require 'evil-collection)
+(require 'tabulated-list)
+
+(defvar tabulated-list-mode-map)
+
+(defconst evil-collection-tabulated-list-maps '(tabulated-list-mode-map))
+
+;;;###autoload
+(defun evil-collection-tabulated-list-setup ()
+  "Set up `evil' bindings for `tabulated-list'."
+
+  (evil-collection-define-key nil 'tabulated-list-mode-map
+    "n" nil
+    "p" nil)
+
+  (evil-set-initial-state 'tabulated-list-mode 'normal)
+  (evil-collection-define-key 'normal 'tabulated-list-mode-map
+    "S" 'tabulated-list-sort
+    "{" 'tabulated-list-narrow-current-column
+    "}" 'tabulated-list-widen-current-column
+    "gl" 'tabulated-list-next-column
+    "gh" 'tabulated-list-previous-column)
+  (evil-collection-bind 'tabulated-list-mode-map 'quit 'quit-window))
+
+(provide 'evil-collection-tabulated-list)
+;;; evil-collection-tabulated-list.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tabulated-list/evil-collection-tabulated-list.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tabulated-list/evil-collection-tabulated-list.elc
new file mode 100644
index 0000000..11257cc
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tabulated-list/evil-collection-tabulated-list.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tar-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tar-mode/README.org
new file mode 100644
index 0000000..fbb0da6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tar-mode/README.org
@@ -0,0 +1,27 @@
+* tar-mode
+
+  Evil bindings for =tar-mode=, the built-in tar archive browser.
+
+** Key bindings
+
+   | Command                        | Original                    | Evil               |
+   |--------------------------------+-----------------------------+--------------------|
+   | =tar-next-line=                | =n=, =SPC=, =C-n=, =<down>= | =j=, =gj=, =C-j=   |
+   | =tar-previous-line=            | =p=, =C-p=, =<up>=          | =k=, =gk=, =C-k=   |
+   | =beginning-of-buffer=          | n/a                         | =gg=               |
+   | =end-of-buffer=                | n/a                         | =G=                |
+   | =tar-extract=                  | =RET=, =e=, =f=             | =RET=              |
+   | =tar-extract-other-window=     | =o=, =E=                    | =go=, =S-<return>= |
+   | =tar-view=                     | =v=                         | =gO=, =M-<return>= |
+   | =tar-flag-deleted=             | =d=, =C-d=                  | =d=                |
+   | =tar-rename-entry=             | =R=                         | =r=                |
+   | =tar-expunge=                  | =x=                         | =x=                |
+   | =tar-chmod-entry=              | =M=                         | =M=                |
+   | =tar-chgrp-entry=              | =G=                         | =P=                |
+   | =tar-chown-entry=              | =O=                         | =O=                |
+   | =revert-buffer=                | =g=                         | =gr=               |
+   | =tar-new-entry=                | =I=                         | =I=                |
+   | =tar-copy=                     | =C=                         | =C=                |
+   | =tar-unflag=                   | =u=                         | =u=                |
+   | =tar-clear-modification-flags= | n/a                         | =U=                |
+   | =quit-window=                  | n/a                         | =q=                |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tar-mode/evil-collection-tar-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tar-mode/evil-collection-tar-mode.el
new file mode 100644
index 0000000..81d81b6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tar-mode/evil-collection-tar-mode.el
@@ -0,0 +1,72 @@
+;;; evil-collection-tar-mode.el --- Evil bindings for tar-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 Michael Arndt
+
+;; Author: 0x28
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tar-mode, archive, bindings, files
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Evil bindings for `tar-mode'.
+
+;;; Code:
+(require 'tar-mode)
+(require 'evil-collection)
+
+(defconst evil-collection-tar-mode-maps '(tar-mode-map))
+
+;;;###autoload
+(defun evil-collection-tar-mode-setup ()
+  "Set up `evil' bindings for `tar-mode'."
+  (evil-set-initial-state 'tar-mode 'normal)
+  (evil-collection-bind 'tar-mode-map 'rename 'tar-rename-entry)
+  (evil-collection-define-key 'normal 'tar-mode-map
+    "j" 'tar-next-line
+    "k" 'tar-previous-line
+
+    "gg" 'beginning-of-buffer
+    "G" 'end-of-buffer
+
+    "M" 'tar-chmod-entry
+    "P" 'tar-chgrp-entry
+    "O" 'tar-chown-entry
+
+    ;; create
+    "I" 'tar-new-entry
+
+    ;; write
+    "C" 'tar-copy)
+  (evil-collection-bind 'tar-mode-map
+                        'mark-delete 'tar-flag-deleted
+                        'execute-marks 'tar-expunge
+                        'unmark 'tar-unflag
+                        'unmark-all 'tar-clear-modification-flags
+                        'action 'tar-extract
+                        'action-other 'tar-extract-other-window
+                        'action-stay 'tar-view
+                        'next-item 'tar-next-line
+                        'prev-item 'tar-previous-line
+                        'next-section 'tar-next-line
+                        'prev-section 'tar-previous-line
+                        'quit 'quit-window
+                        'refresh 'revert-buffer))
+
+(provide 'evil-collection-tar-mode)
+;;; evil-collection-tar-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tar-mode/evil-collection-tar-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tar-mode/evil-collection-tar-mode.elc
new file mode 100644
index 0000000..a8ffc00
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tar-mode/evil-collection-tar-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/telega/evil-collection-telega.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/telega/evil-collection-telega.el
new file mode 100644
index 0000000..03e9115
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/telega/evil-collection-telega.el
@@ -0,0 +1,223 @@
+;;; evil-collection-telega.el --- Evil bindings for telega -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Ruoyu Feng
+
+;; Author: Ruoyu Feng <mail@vonfry.name>
+;; Maintainer: James Nguyen <james@jojojames.com>, Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.6
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools, telegram, telega
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for telega.
+
+;;; Code:
+(require 'telega nil t)
+(require 'evil-collection)
+
+(defvar telega-prefix-map)
+(defvar telega-filter-map)
+(defvar telega-sort-map)
+(defvar telega-chatbuf-fastnav-map)
+(defvar telega-describe-map)
+(defvar telega-folder-map)
+(defvar telega-voip-map)
+(defvar telega-root-view-map)
+(defvar telega-root-fastnav-map)
+
+(defconst evil-collection-telega-maps '(telega-root-mode-map
+                                        telega-chat-mode-map
+                                        telega-image-mode-map
+                                        telega-webpage-mode-map
+                                        telega-user-button-map
+                                        telega-msg-button-map
+                                        telega-chat-button-map
+                                        telega-sticker-button-map))
+
+(defconst evil-collection-telega-modes '(telega-root-mode
+                                         telega-chat-mode
+                                         telega-image-mode
+                                         telega-webpage-mode))
+
+;;;###autoload
+(defun evil-collection-telega-setup ()
+  "Set up `evil' bindings for `telega'."
+  (evil-collection-set-readonly-bindings 'telega-root-mode-map)
+
+  (dolist (mode evil-collection-telega-modes)
+    (evil-set-initial-state mode 'normal))
+
+  (evil-collection-define-key 'normal 'telega-root-mode-map
+    "j" 'evil-next-line
+    "k" 'evil-previous-line
+
+    "ga" telega-prefix-map
+
+    "S" telega-sort-map
+    "s" telega-filter-map
+    "_" 'telega-filter-undo
+    "-" 'telega-filter-redo
+
+    "c" 'telega-chat-join-by-link
+    "C" 'telega-chat-create
+    "D" 'telega-chats-filtered-kill-chatbuf
+    "R" 'telega-chats-filtered-toggle-read
+
+    "Q" 'telega-kill
+
+    "gO" telega-folder-map
+    "gC" telega-voip-map
+    "gV" telega-root-view-map
+    "J" telega-root-fastnav-map
+
+    "gs" 'telega-view-search)
+  (evil-collection-bind 'telega-root-mode-map
+                        'quit 'bury-buffer
+                        'describe-mode telega-describe-map
+                        'next-button 'telega-button-forward
+                        'previous-button 'telega-button-backward)
+
+  (evil-collection-define-key 'normal 'telega-chat-mode-map
+    "ga" telega-prefix-map
+    "gA" telega-chatbuf-fastnav-map
+
+    "zz" 'telega-chatbuf-recenter-1
+
+    "^" 'telega-chatbuf-beginning-of-thing
+
+    "Za" 'telega-chatbuf-attach
+    "Zf" 'telega-chatbuf-attach-media
+    "Zv" 'telega-chatbuf-attach-clipboard
+
+    "_" 'telega-chatbuf-filter-cancel
+    "S" 'telega-chatbuf-filter-search)
+  (evil-collection-bind 'telega-chat-mode-map
+                        'quit 'quit-window
+                        'describe-mode 'telega-describe-chat
+                        'repl-submit 'telega-chatbuf-newline-or-input-send
+                        'repl-newline 'newline
+                        'repl-force-newline 'newline
+                        'search-or-filter 'telega-chatbuf-filter
+                        'next-button 'telega-chatbuf-complete-or-next-link
+                        'previous-button 'telega-chatbuf-prev-link)
+
+  (evil-collection-define-key 'normal 'telega-image-mode-map
+    "ga" telega-prefix-map
+
+    "}" 'telega-image-next
+    "{" 'telega-image-prev)
+  (evil-collection-bind 'telega-image-mode-map 'quit 'telega-image-quit)
+
+  (evil-collection-define-key 'normal 'telega-webpage-mode-map
+    "ga" telega-prefix-map
+
+    "yy" 'telega-webpage-copy-url
+    "(" 'telega-webpage-history-prev
+    ")" 'telega-webpage-history-next)
+  (evil-collection-bind 'telega-webpage-mode-map
+                        'browse-url 'telega-webpage-browse-url
+                        'next-button 'telega-button-forward
+                        'previous-button 'telega-button-backward)
+
+  (evil-collection-set-readonly-bindings 'telega-user-button-map)
+  ; We have to set keybinds for emacs instead of normal state because normal
+  ; states takes no effects on buttons and remove the default bindings.
+  ; ref: emacs-evil/evil#1477
+  (evil-collection-define-key nil 'telega-user-button-map
+    "B" nil
+    "K" nil
+    (kbd "DEL") nil
+    "i" nil
+
+    "m" 'telega-user-chat-with
+    "D" 'telega-user-block)
+  (evil-collection-bind 'telega-user-button-map
+                        'describe-mode 'telega-describe-user)
+
+  (evil-collection-set-readonly-bindings 'telega-msg-button-map)
+  (evil-collection-define-key nil 'telega-msg-button-map
+    "c" nil
+    "d" nil
+    "e" nil
+    "f" nil
+    "k" nil
+    "l" nil
+    "m" nil
+    "n" nil
+    "p" nil
+    "^" nil
+    (kbd "DEL") nil
+    "*" nil
+    "B" nil
+    "L" nil
+    "T" nil
+
+    "D" 'telega-msg-delete-dwim
+    "dd" 'telega-msg-delete-dwim
+    "i" 'telega-msg-edit
+    "a" 'telega-msg-mark-toggle
+    "R" 'telega-msg-forward-dwim
+    "r" 'telega-msg-reply
+
+    "Zy" 'telega-msg-copy-text
+    "Zl" 'telega-msg-copy-link
+    "ds" 'telega-msg-ban-sender
+    "ZL" 'telega-msg-redisplay
+    "P" (if (fboundp 'telega-transient-msg-pin-toggle)
+            'telega-transient-msg-pin-toggle
+          'telega-msg-pin-toggle)
+    "ZR" 'telega-msg-resend
+    "S" 'telega-msg-save
+    "u" 'telega-msg-unmark
+    "U" 'telega-chatbuf-msg-marks-toggle
+    "=" 'telega-msg-diff-edits
+    "s" 'telega-msg-favorite-toggle)
+  (evil-collection-bind 'telega-msg-button-map
+                        'refresh 'telega-msg-open-thread-or-topic
+                        'describe-mode 'telega-describe-message
+                        'next-button 'telega-button-forward
+                        'previous-button 'telega-button-backward)
+
+  (evil-collection-set-readonly-bindings 'telega-chat-button-map)
+  (evil-collection-define-key nil 'telega-chat-button-map
+    "i" nil
+    "h" nil
+    "d" nil
+    "^" nil
+    (kbd "DEL") nil
+
+    "a" 'telega-chat-add-member
+    "o" 'telega-chat-set-custom-order
+    "r" 'telega-chat-toggle-read
+    "P" 'telega-chat-toggle-pin
+    "C" 'telega-chat-call
+    "D" 'telega-chat-delete)
+  (evil-collection-bind 'telega-chat-button-map
+                        'describe-mode 'telega-describe-chat)
+
+  (evil-collection-set-readonly-bindings 'telega-sticker-button-map)
+  (evil-collection-define-key nil 'telega-sticker-button-map
+    "f" nil
+    "*" nil
+    "i" nil
+    "h" nil)
+  (evil-collection-bind 'telega-sticker-button-map
+                        'describe-mode 'telega-sticker-help
+                        'toggle 'telega-sticker-toggle-favorite))
+
+(provide 'evil-collection-telega)
+;;; evil-collection-telega.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/telega/evil-collection-telega.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/telega/evil-collection-telega.elc
new file mode 100644
index 0000000..3ec31eb
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/telega/evil-collection-telega.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/term/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/term/README.org
new file mode 100644
index 0000000..aa7fcc2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/term/README.org
@@ -0,0 +1,55 @@
+* term
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Terminal-emulator.html][term]] and =ansi-term=, also usable with =multi-term=.
+
+  Insert state corresponds to =term-char-mode=, normal state to =term-line-mode=.
+  When =evil-collection-term-sync-state-and-mode-p= is non-nil the mode and
+  state switch in lockstep.
+
+** Key bindings
+
+*** term-raw-map (insert state)
+
+    Restores raw passthrough for control characters evil otherwise intercepts.
+
+    | Command                         | Original  | Evil                                                                                                                                |
+    |---------------------------------+-----------+-------------------------------------------------------------------------------------------------------------------------------------|
+    | =term-send-raw=                 | (default) | =C-a=, =C-b=, =C-d=, =C-e=, =C-f=, =C-k=, =C-l=, =C-n=, =C-o=, =C-p=, =C-q=, =C-r=, =C-s=, =C-t=, =C-u=, =C-v=, =C-w=, =C-y=, =C-z= |
+    | =evil-collection-term-send-tab= | n/a       | =<tab>=                                                                                                                             |
+    | =term-send-eof=                 | =C-c C-d= | =C-c C-d=                                                                                                                           |
+    | =term-stop-subjob=              | =C-c C-z= | =C-c C-z=                                                                                                                           |
+
+*** term-mode-map (normal state)
+
+    | Command                                 | Original  | Evil                                           |
+    |-----------------------------------------+-----------+------------------------------------------------|
+    | =evil-collection-term-char-mode-insert= | n/a       | =C-c C-k=                                      |
+    | =term-paste=                            | =C-c C-y= | =p=                                            |
+    | =term-previous-prompt=                  | =C-c C-p= | =[[=, =C-k=, =gk=                              |
+    | =term-next-prompt=                      | =C-c C-n= | =]]=, =C-j=, =gj=                              |
+    | =term-bol=                              | =C-a=     | =^=                                            |
+    | =term-show-maximum-output=              | =M-> =    | =$=                                            |
+    | =term-send-input=                       | =RET=     | =RET= (in =evil-collection-repl-submit-state=) |
+
+** New commands
+
+   | Command                                              | Description                                               |
+   |------------------------------------------------------+-----------------------------------------------------------|
+   | =evil-collection-term-char-mode-insert=              | switch to =term-char-mode= and insert state               |
+   | =evil-collection-term-send-tab=                      | send a literal TAB through =term-send-raw-string=         |
+   | =evil-collection-term-escape-stay=                   | hook that disables backwards cursor on normal-state entry |
+   | =evil-collection-term-sync-state-and-mode=           | hook that ties insert/normal to char/line mode            |
+   | =evil-collection-term-switch-to-char-mode-on-insert= | default sync function                                     |
+   | =evil-collection-term-char-mode-entry-function=      | alternative sync function that only flips at the prompt   |
+
+** Customization
+
+   | Variable                                     | Default                                              |
+   |----------------------------------------------+------------------------------------------------------|
+   | =evil-collection-term-sync-state-and-mode-p= | =t=                                                  |
+   | =evil-collection-term-sync-state-function=   | =evil-collection-term-switch-to-char-mode-on-insert= |
+
+** Integrations
+
+   - =multi-term=: =M-DEL= sends =term-send-backward-kill-word= in both
+     normal state on =term-mode-map= and insert state on =term-raw-map=.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/term/evil-collection-term.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/term/evil-collection-term.el
new file mode 100644
index 0000000..ced7e26
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/term/evil-collection-term.el
@@ -0,0 +1,167 @@
+;;; evil-collection-term.el --- Evil bindings for term and ansi-term  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, term, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil integration for `term' and `ansi-term'.
+;; This should also work for other terminal emulators such as `multi-term'.
+;;
+;; Switching to normal state will automatically switch to line mode.
+;; Conversely, switching to insert state will automatically switch to char mode.
+
+;;; Code:
+(require 'evil-collection)
+(require 'term)
+
+(defcustom evil-collection-term-sync-state-and-mode-p t
+  "Synchronize insert/normal state with char/line-mode respectively.
+
+When non-nil, going to normal state will automatically switch to
+line-mode.  Conversely, going to insert state on the last
+commandline will automatically switch to char-mode.
+
+Warning: This feature is experimental."
+  :group 'evil-collection-term
+  :type 'boolean)
+
+(defcustom evil-collection-term-sync-state-function
+  'evil-collection-term-switch-to-char-mode-on-insert
+  "Function used when synchronizing insert/normal state with char/line-mode.
+
+This is only used if `evil-collection-term-sync-state-and-mode-p' is true."
+  :group 'evil-collection-term
+  :type 'function)
+
+;; TODO: Rebinding ESC has the drawback that programs like vi cannot use it anymore.
+;; Workaround: switch to Emacs state and double-press ESC.
+;; Otherwise leave ESC to "C-c C-j".
+;; Or bind char-mode ESC to "C-c C-x"?
+
+;; TODO: Add support for normal-state editing.
+
+(defconst evil-collection-term-maps '(term-raw-map
+                                      term-mode-map))
+
+(defun evil-collection-term-escape-stay ()
+  "Go back to normal state but don't move cursor backwards.
+Moving cursor backwards is the default Vim behavior but
+it is not appropriate in some cases like terminals."
+  (setq-local evil-move-cursor-back nil))
+
+(defun evil-collection-term-char-mode-insert ()
+  "Switch to `term-char-mode' and enter insert state."
+  (interactive)
+  (term-char-mode)
+  (evil-insert-state))
+
+(defun evil-collection-term-char-mode-entry-function ()
+  "Maybe switch to `term-char-mode' on insert state."
+  (when (get-buffer-process (current-buffer))
+    (let (last-prompt)
+      (save-excursion
+        (goto-char (point-max))
+        (when (= (line-beginning-position) (line-end-position))
+          (ignore-errors (backward-char)))
+        (setq last-prompt (max (term-bol nil) (line-beginning-position))))
+      (when (>= (point) last-prompt)
+        (term-char-mode)))))
+
+(defun evil-collection-term-switch-to-char-mode-on-insert ()
+  "Switch to `term-char-mode' on insert state."
+  (when (get-buffer-process (current-buffer))
+    (term-char-mode)))
+
+(defun evil-collection-term-sync-state-and-mode ()
+  "Sync `term-char-mode' and `term-line-mode' with insert and normal state."
+  (add-hook 'evil-insert-state-entry-hook
+            evil-collection-term-sync-state-function nil t)
+  (add-hook 'evil-insert-state-exit-hook #'term-line-mode nil t))
+
+(defun evil-collection-term-send-tab ()
+  "Send tab in term mode."
+  (interactive)
+  (term-send-raw-string "\t"))
+
+;;;###autoload
+(defun evil-collection-term-setup ()
+  "Set up `evil' bindings for `term'."
+  (evil-set-initial-state 'term-mode 'insert)
+  (if evil-collection-term-sync-state-and-mode-p
+      (add-hook 'term-mode-hook #'evil-collection-term-sync-state-and-mode)
+    (remove-hook 'term-mode-hook #'evil-collection-term-sync-state-and-mode))
+
+  (add-hook 'term-mode-hook #'evil-collection-term-escape-stay)
+
+  ;; Evil has some "C-" bindings in insert state that shadow regular terminal
+  ;; bindings. Don't raw-send "C-c" (prefix key) nor "C-h" (help prefix).
+  (evil-collection-define-key 'insert 'term-raw-map
+    (kbd "C-a") 'term-send-raw
+    (kbd "C-b") 'term-send-raw          ; Should not be necessary.
+    (kbd "C-d") 'term-send-raw
+    (kbd "C-e") 'term-send-raw
+    (kbd "C-f") 'term-send-raw          ; Should not be necessary.
+    (kbd "C-k") 'term-send-raw
+    (kbd "C-l") 'term-send-raw          ; Should not be necessary.
+    (kbd "C-n") 'term-send-raw
+    (kbd "C-o") 'term-send-raw
+    (kbd "C-p") 'term-send-raw
+    (kbd "C-q") 'term-send-raw          ; Should not be necessary.
+    (kbd "C-r") 'term-send-raw
+    (kbd "C-s") 'term-send-raw          ; Should not be necessary.
+    (kbd "C-t") 'term-send-raw
+    (kbd "C-u") 'term-send-raw          ; Should not be necessary.
+    (kbd "C-v") 'term-send-raw          ; Should not be necessary.
+    (kbd "C-w") 'term-send-raw
+    (kbd "C-y") 'term-send-raw
+    (kbd "C-z") 'term-send-raw
+    (kbd "<tab>") 'evil-collection-term-send-tab ; Should not be necessary.
+    (kbd "C-c C-d") 'term-send-eof
+    (kbd "C-c C-z") 'term-stop-subjob)
+
+  (evil-collection-bind 'term-mode-map 'repl-submit 'term-send-input)
+
+  (evil-collection-define-key 'normal 'term-mode-map
+    (kbd "C-c C-k") 'evil-collection-term-char-mode-insert
+
+    (kbd "p") 'term-paste
+
+    ;; motion
+    ;; "0" 'term-bol ; "0" is meant to really go at the beginning of line.
+    "^" 'term-bol
+    "$" 'term-show-maximum-output)
+  (evil-collection-bind 'term-mode-map
+                        'next-item 'term-next-prompt
+                        'prev-item 'term-previous-prompt
+                        'next-section 'term-next-prompt
+                        'prev-section 'term-previous-prompt)
+
+  ;; https://github.com/emacs-evil/evil-collection/issues/235
+  (with-eval-after-load 'multi-term
+    (evil-collection-define-key 'normal 'term-mode-map
+      (kbd "M-DEL") 'term-send-backward-kill-word)
+    (evil-collection-define-key 'insert 'term-raw-map
+      (kbd "M-DEL") 'term-send-backward-kill-word)))
+
+(provide 'evil-collection-term)
+;;; evil-collection-term.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/term/evil-collection-term.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/term/evil-collection-term.elc
new file mode 100644
index 0000000..6da0370
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/term/evil-collection-term.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tetris/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tetris/README.org
new file mode 100644
index 0000000..5adab75
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tetris/README.org
@@ -0,0 +1,18 @@
+* tetris
+
+  Evil bindings for =tetris=, the built-in implementation of the falling-blocks game.
+
+** Key bindings
+
+   | Command              | Original  | Evil            |
+   |----------------------+-----------+-----------------|
+   | =tetris-move-left=   | =<left>=  | =h=             |
+   | =tetris-move-right=  | =<right>= | =l=             |
+   | =tetris-rotate-next= | n/a       | =k=             |
+   | =tetris-rotate-prev= | =<up>=    | =K=             |
+   | =tetris-move-down=   | =<down>=  | =j=             |
+   | =tetris-move-bottom= | =SPC=     | =J=, =G=, =TAB= |
+   | =tetris-start-game=  | =n=       | =gr=            |
+   | =tetris-pause-game=  | =p=       | =p=             |
+   | =tetris-end-game=    | =q=       | =ZZ=            |
+   | =quit-window=        | n/a       | =q=, =ZQ=       |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tetris/evil-collection-tetris.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tetris/evil-collection-tetris.el
new file mode 100644
index 0000000..86a0e96
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tetris/evil-collection-tetris.el
@@ -0,0 +1,56 @@
+;;; evil-collection-tetris.el --- Bindings for `tetris' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 James Nguyen
+
+;; Author: MaxSt
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `tetris'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'tetris nil t)
+
+(defconst evil-collection-tetris-maps '(tetris-mode-map))
+
+;;;###autoload
+(defun evil-collection-tetris-setup ()
+  "Set up `evil' bindings for `tetris'."
+  (evil-set-initial-state 'tetris-mode 'normal)
+  (evil-collection-define-key 'normal 'tetris-mode-map
+    "h" 'tetris-move-left
+    "l" 'tetris-move-right
+    "k" 'tetris-rotate-next
+    "K" 'tetris-rotate-prev
+    "j" 'tetris-move-down
+    "J" 'tetris-move-bottom
+    "G" 'tetris-move-bottom
+    (kbd "TAB") 'tetris-move-bottom
+    "p" 'tetris-pause-game)
+  (evil-collection-bind 'tetris-mode-map
+                        'quit 'quit-window
+                        'quit-save 'tetris-end-game
+                        'quit-cancel 'quit-window
+                        'refresh 'tetris-start-game))
+
+(provide 'evil-collection-tetris)
+;;; evil-collection-tetris.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tetris/evil-collection-tetris.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tetris/evil-collection-tetris.elc
new file mode 100644
index 0000000..3c21ba8
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tetris/evil-collection-tetris.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/thread/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/thread/README.org
new file mode 100644
index 0000000..1b51bed
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/thread/README.org
@@ -0,0 +1,14 @@
+* thread
+
+  Evil bindings for =thread-list-mode=, the built-in =M-x list-threads= buffer.
+
+** Key bindings
+
+   Inherits the standard =tabulated-list-mode= bindings (=S=, ={=, =}=, =gh=,
+   =gl=, =q=). evil-collection only rebinds the thread-specific actions.
+
+   | Command                         | Original | Evil |
+   |---------------------------------+----------+------|
+   | =thread-list-pop-to-backtrace=  | =b=      | =B=  |
+   | =thread-list-send-quit-signal=  | =s q=    | =Q=  |
+   | =thread-list-send-error-signal= | =s e=    | =E=  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/thread/evil-collection-thread.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/thread/evil-collection-thread.el
new file mode 100644
index 0000000..71986da
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/thread/evil-collection-thread.el
@@ -0,0 +1,45 @@
+;;; evil-collection-thread.el --- Evil bindings for `thread' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `thread'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'thread nil t)
+
+(defconst evil-collection-thread-maps '(thread-list-mode-map))
+
+;;;###autoload
+(defun evil-collection-thread-setup ()
+  "Set up `evil' bindings for `thread'."
+  (evil-set-initial-state 'thread-list-mode 'normal)
+  (evil-collection-define-key 'normal 'thread-list-mode-map
+    "B" 'thread-list-pop-to-backtrace
+    "Q" 'thread-list-send-quit-signal
+    "E" 'thread-list-send-error-signal))
+
+(provide 'evil-collection-thread)
+;;; evil-collection-thread.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/thread/evil-collection-thread.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/thread/evil-collection-thread.elc
new file mode 100644
index 0000000..a288a98
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/thread/evil-collection-thread.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tide/evil-collection-tide.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tide/evil-collection-tide.el
new file mode 100644
index 0000000..0e3e035
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tide/evil-collection-tide.el
@@ -0,0 +1,62 @@
+;;; evil-collection-tide.el --- Bindings for `tide-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tide, typescript, languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `tide-mode'.
+
+;;; Code:
+(require 'tide nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-tide-maps '(tide-mode-map
+                                      tide-references-mode-map
+                                      tide-project-errors-mode-map))
+
+;;;###autoload
+(defun evil-collection-tide-setup ()
+  "Set up `evil' bindings for `tide'."
+  (evil-collection-bind 'tide-mode-map
+                        'find-definition 'tide-jump-to-definition
+                        'pop-definition 'tide-jump-back
+                        'lookup-doc 'tide-documentation-at-point)
+
+  (evil-collection-bind 'tide-references-mode-map
+                        'action 'tide-goto-line-reference
+                        'next-item 'tide-find-next-reference
+                        'prev-item 'tide-find-previous-reference
+                        'next-section 'tide-find-next-reference
+                        'prev-section 'tide-find-previous-reference
+                        'quit 'quit-window)
+
+  (evil-collection-bind 'tide-project-errors-mode-map
+                        'action 'tide-goto-error
+                        'next-item 'tide-find-next-error
+                        'prev-item 'tide-find-previous-error
+                        'next-section 'tide-find-next-error
+                        'prev-section 'tide-find-previous-error
+                        'quit 'quit-window))
+
+(provide 'evil-collection-tide)
+;;; evil-collection-tide.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tide/evil-collection-tide.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tide/evil-collection-tide.elc
new file mode 100644
index 0000000..1e85f6d
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tide/evil-collection-tide.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/timer-list/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/timer-list/README.org
new file mode 100644
index 0000000..65f5174
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/timer-list/README.org
@@ -0,0 +1,12 @@
+* timer-list
+
+  Evil bindings for =timer-list-mode=, the built-in =M-x list-timers= buffer.
+
+** Key bindings
+
+   Inherits the standard =tabulated-list-mode= bindings (=S=, ={=, =}=, =gh=,
+   =gl=, =q=).
+
+   | Command             | Original | Evil |
+   |---------------------+----------+------|
+   | =timer-list-cancel= | =c=      | =C=  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/timer-list/evil-collection-timer-list.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/timer-list/evil-collection-timer-list.el
new file mode 100644
index 0000000..425918e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/timer-list/evil-collection-timer-list.el
@@ -0,0 +1,43 @@
+;;; evil-collection-timer-list.el --- Evil bindings for `timer-list' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `timer-list'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'timer-list)
+
+(defconst evil-collection-timer-list-maps '(timer-list-mode-map))
+
+;;;###autoload
+(defun evil-collection-timer-list-setup ()
+  "Set up `evil' bindings for `timer-list'."
+  (evil-set-initial-state 'timer-list-mode 'normal)
+  (evil-collection-define-key 'normal 'timer-list-mode-map
+    "C" 'timer-list-cancel))
+
+(provide 'evil-collection-timer-list)
+;;; evil-collection-timer-list.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/timer-list/evil-collection-timer-list.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/timer-list/evil-collection-timer-list.elc
new file mode 100644
index 0000000..89d98ea
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/timer-list/evil-collection-timer-list.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/transmission/evil-collection-transmission.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/transmission/evil-collection-transmission.el
new file mode 100644
index 0000000..03284a0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/transmission/evil-collection-transmission.el
@@ -0,0 +1,154 @@
+;;; evil-collection-transmission.el --- Evil bindings for transmission.el -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, transmission, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+;; Evil bindings for `transmission'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'transmission nil t)
+
+(defvar transmission-mode-map)
+(defvar transmission-files-mode-map)
+(defvar transmission-info-mode-map)
+(defvar transmission-peers-mode-map)
+
+(defconst evil-collection-transmission-maps '(transmission-mode-map
+                                              transmission-files-mode-map
+                                              transmission-info-mode-map
+                                              transmission-peers-mode-map))
+
+;;;###autoload
+(defun evil-collection-transmission-setup ()
+  "Set up `evil' bindings for `transmission'."
+
+  (evil-collection-inhibit-insert-state 'transmission-mode-map)
+  (evil-set-initial-state 'transmission-mode 'normal)
+  (evil-collection-define-key 'normal 'transmission-mode-map
+    ;; motion
+    (kbd "<delete>") 'scroll-down-command
+
+    ;; sort
+    "o" 'tabulated-list-sort
+
+    "p" 'transmission-peers
+    "i" 'transmission-info
+
+    "a" 'transmission-add
+    "D" 'transmission-delete
+    "r" 'transmission-move ; "r" for "[r]ename"
+    "R" 'transmission-remove
+    "x" 'transmission-toggle ; EMMS has "x" for pause.
+    "t" 'transmission-trackers-add
+    "c" 'transmission-verify ; "c" for "[c]heck".
+    "d" 'transmission-set-download
+    "u" 'transmission-set-upload
+    "S" 'transmission-set-ratio ; "S" for "[S]eed"
+    "P" 'transmission-set-bandwidth-priority
+    "I" 'transmission-label ; "I" for "[I]nput labels"
+
+    ;; mark
+    "~" 'transmission-invert-marks)
+  (evil-collection-bind 'transmission-mode-map
+                        'mark 'transmission-toggle-mark
+                        'unmark-all 'transmission-unmark-all
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'quit 'transmission-quit
+                        'quit-save 'transmission-quit
+                        'quit-cancel 'evil-quit
+                        'refresh 'revert-buffer
+                        'action 'transmission-files)
+
+  (evil-collection-inhibit-insert-state 'transmission-files-mode-map)
+  (evil-set-initial-state 'transmission-files-mode 'normal)
+  (evil-collection-define-key 'normal 'transmission-files-mode-map
+    (kbd "<delete>") 'scroll-down-command
+
+    ;; sort
+    "o" 'tabulated-list-sort
+
+    "p" 'transmission-peers
+    "i" 'transmission-info
+
+    "r" 'transmission-move
+    "P" 'transmission-files-priority
+
+    ;; mark
+    "u" 'transmission-files-unwant
+    "m" 'transmission-files-want
+
+    "v" 'transmission-view-file
+
+    "!" 'transmission-files-command
+    ;; "X" 'transmission-files-command
+    "t" 'transmission-trackers-add
+    "T" 'transmission-trackers-remove)
+  (evil-collection-bind 'transmission-files-mode-map
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'action 'transmission-find-file
+                        'action-other 'transmission-find-file-other-window
+                        'action-stay 'transmission-display-file
+                        'quit 'transmission-quit
+                        'quit-save 'transmission-quit
+                        'quit-cancel 'evil-quit
+                        'browse-url 'transmission-browse-url-of-file)
+
+  (evil-collection-define-key 'visual 'transmission-files-mode-map
+    "r" 'transmission-move
+    "P" 'transmission-files-priority
+    "u" 'transmission-files-unwant
+    "m" 'transmission-files-want)
+
+  (evil-collection-set-readonly-bindings 'transmission-info-mode-map)
+  (evil-set-initial-state 'transmission-info-mode 'normal)
+  (evil-collection-define-key 'normal 'transmission-info-mode-map
+    "p" 'transmission-peers
+
+    "t" 'transmission-trackers-add
+    "T" 'transmission-trackers-remove
+    "D" 'transmission-set-torrent-download
+    "U" 'transmission-set-torrent-upload
+    "S" 'transmission-set-torrent-ratio ; "S" for "[S]eed"
+    "I" 'transmission-label ; "I" for "[I]nput labels"
+    "P" 'transmission-set-bandwidth-priority
+    "r" 'transmission-move)
+
+  ;; yu, Like `eww'.
+  (evil-collection-define-operator-key 'yank 'transmission-info-mode-map
+    "u" 'transmission-copy-magnet)
+
+  (evil-collection-set-readonly-bindings 'transmission-peers-mode-map)
+  (evil-set-initial-state 'transmission-peers-mode 'normal)
+  (evil-collection-define-key 'normal 'transmission-peers-mode-map
+    ;; sort
+    "o" 'tabulated-list-sort
+
+    "i" 'transmission-info))
+
+(provide 'evil-collection-transmission)
+;;; evil-collection-transmission.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/transmission/evil-collection-transmission.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/transmission/evil-collection-transmission.elc
new file mode 100644
index 0000000..cf21df9
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/transmission/evil-collection-transmission.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/trashed/evil-collection-trashed.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/trashed/evil-collection-trashed.el
new file mode 100644
index 0000000..0825479
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/trashed/evil-collection-trashed.el
@@ -0,0 +1,83 @@
+;;; evil-collection-trashed.el --- Evil bindings for trashed.el -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.3
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, files, convenience, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `trashed'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'trashed nil t)
+
+(defconst evil-collection-trashed-maps '(trashed-mode-map))
+
+;;;###autoload
+(defun evil-collection-trashed-setup ()
+  "Set up `evil' bindings for `trashed'."
+  (evil-collection-set-readonly-bindings 'trashed-mode-map)
+  (evil-collection-define-key 'normal 'trashed-mode-map
+    ;; motion
+    "S" 'tabulated-list-sort
+
+    "$ m" 'trashed-mark-files-by-date
+    "$ u" 'trashed-unmark-files-by-date
+    "$ d" 'trashed-flag-delete-files-by-date
+    "$ r" 'trashed-flag-restore-files-by-date
+
+    "% m" 'trashed-mark-files-regexp
+    "% u" 'trashed-unmark-files-regexp
+    "% d" 'trashed-flag-delete-files-regexp
+    "% r" 'trashed-flag-restore-files-regexp
+
+    "r" 'trashed-flag-restore
+
+    "zb" 'trashed-flag-backup-files
+    "za" 'trashed-flag-auto-save-files
+
+    "D" 'trashed-do-delete
+    "R" 'trashed-do-restore
+
+    "v" 'trashed-view-file)
+
+  (evil-collection-bind 'trashed-mode-map
+                        'mark 'trashed-mark
+                        'mark-all 'trashed-mark-all
+                        'toggle-all 'trashed-toggle-marks
+                        'unmark 'trashed-unmark
+                        'unmark-all 'trashed-unmark-all
+                        'mark-delete 'trashed-flag-delete
+                        'execute-marks 'trashed-do-execute
+                        'scroll-down 'scroll-up-command
+                        'scroll-up 'scroll-down-command
+                        'action 'trashed-find-file
+                        'action-other 'trashed-find-file-other-window
+                        'action-stay 'trashed-display-file
+                        'describe-mode 'describe-mode
+                        'refresh 'revert-buffer
+                        'cycle-next 'trashed-forward-column
+                        'cycle-previous 'trashed-backward-column
+                        'browse-url 'trashed-browse-url-of-file))
+
+(provide 'evil-collection-trashed)
+;;; evil-collection-trashed.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/trashed/evil-collection-trashed.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/trashed/evil-collection-trashed.elc
new file mode 100644
index 0000000..0f9faed
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/trashed/evil-collection-trashed.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tuareg/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tuareg/README.org
new file mode 100644
index 0000000..589da60
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tuareg/README.org
@@ -0,0 +1,9 @@
+* tuareg
+
+  Evil bindings for [[https://github.com/ocaml/tuareg][tuareg-mode]] (OCaml).
+
+** Key bindings
+
+   | Command            | Original  | Evil |
+   |--------------------+-----------+------|
+   | =tuareg-run-ocaml= | =C-c C-s= | =gz= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tuareg/evil-collection-tuareg.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tuareg/evil-collection-tuareg.el
new file mode 100644
index 0000000..531c09c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tuareg/evil-collection-tuareg.el
@@ -0,0 +1,43 @@
+;;; evil-collection-tuareg.el --- Evil bindings for `tuareg-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Zhiwei Chen
+
+;; Author: Zhiwei Chen <condy0919@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `tuareg-mode'.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'tuareg nil t)
+
+(defconst evil-collection-tuareg-maps '(tuareg-mode-map))
+
+;;;###autoload
+(defun evil-collection-tuareg-setup ()
+  "Set up `evil' bindings for `tuareg'."
+  (evil-collection-bind 'tuareg-mode-map 'goto-repl 'tuareg-run-ocaml))
+
+(provide 'evil-collection-tuareg)
+
+;;; evil-collection-tuareg.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tuareg/evil-collection-tuareg.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tuareg/evil-collection-tuareg.elc
new file mode 100644
index 0000000..34010c1
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/tuareg/evil-collection-tuareg.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/typescript-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/typescript-mode/README.org
new file mode 100644
index 0000000..f6bdc37
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/typescript-mode/README.org
@@ -0,0 +1,13 @@
+* typescript-mode
+
+  Evil integration for [[https://github.com/emacs-typescript/typescript.el][typescript-mode]].
+
+  No key bindings are added. The setup installs a hook that sets
+  =evil-shift-width= to =typescript-indent-level= in =typescript-mode=
+  buffers so that evil shift operators match the mode's indentation.
+
+** New commands
+
+   - =evil-collection-typescript-mode-set-evil-shift-width= — sync
+     =evil-shift-width= with =typescript-indent-level= (added to
+     =typescript-mode-hook=).
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/typescript-mode/evil-collection-typescript-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/typescript-mode/evil-collection-typescript-mode.el
new file mode 100644
index 0000000..f4d05b0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/typescript-mode/evil-collection-typescript-mode.el
@@ -0,0 +1,48 @@
+;;; evil-collection-typescript-mode.el --- Bindings for `typescript-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, evil, tools, typescript
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `typescript-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'typescript-mode nil t)
+
+(defconst evil-collection-typescript-mode-maps nil)
+
+(defvar typescript-indent-level)
+
+(defun evil-collection-typescript-mode-set-evil-shift-width ()
+  "Set `evil-shift-width' according to `typescript-indent-level'."
+  (setq-local evil-shift-width typescript-indent-level))
+
+;;;###autoload
+(defun evil-collection-typescript-mode-setup ()
+  "Set up `evil' bindings for `typescript-mode'."
+  (add-hook 'typescript-mode-hook
+            #'evil-collection-typescript-mode-set-evil-shift-width))
+
+(provide 'evil-collection-typescript-mode)
+;;; evil-collection-typescript-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/typescript-mode/evil-collection-typescript-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/typescript-mode/evil-collection-typescript-mode.elc
new file mode 100644
index 0000000..fd0b3a1
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/typescript-mode/evil-collection-typescript-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ultra-scroll/evil-collection-ultra-scroll.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ultra-scroll/evil-collection-ultra-scroll.el
new file mode 100644
index 0000000..55d3866
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ultra-scroll/evil-collection-ultra-scroll.el
@@ -0,0 +1,60 @@
+;;; evil-collection-ultra-scroll.el --- Evil integration for ultra-scroll -*- lexical-binding: t -*-
+
+;; Copyright (C) 2025 Steven Allen
+
+;; Author: Steven Allen <steven@stebalien.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, ultra-scroll, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil integration for ultra-scroll.
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'ultra-scroll nil t)
+
+(defconst evil-collection-ultra-scroll-maps nil)
+
+(defvar evil-collection-ultra-scroll-hide-cursor-states
+  '(evil-motion-state-cursor evil-normal-state-cursor)
+  "States in which to hide the cursor when scrolling.")
+
+(defun evil-collection-ultra-scroll--hide-cursor ()
+  "A special Evil cursor type that simply hides the cursor."
+  (setq cursor-type nil))
+
+(defun evil-collection-ultra-scroll--set-cursor-visible (arg)
+  "Make the cursor invisible when called with ARG < 1, or visible otherwise."
+  (when (bound-and-true-p evil-local-mode)
+    (if (and (numberp arg) (< arg 1))
+        (dolist (var evil-collection-ultra-scroll-hide-cursor-states)
+          (make-local-variable var)
+          (set var #'evil-collection-ultra-scroll--hide-cursor))
+      (mapc #'kill-local-variable evil-collection-ultra-scroll-hide-cursor-states)
+      (evil-refresh-cursor))))
+
+(defun evil-collection-ultra-scroll-setup ()
+  "Set up `evil' integration for `ultra-scroll'."
+  (add-hook 'ultra-scroll-hide-functions #'evil-collection-ultra-scroll--set-cursor-visible))
+
+(provide 'evil-collection-ultra-scroll)
+
+;;; evil-collection-ultra-scroll.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ultra-scroll/evil-collection-ultra-scroll.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ultra-scroll/evil-collection-ultra-scroll.elc
new file mode 100644
index 0000000..996131b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ultra-scroll/evil-collection-ultra-scroll.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/unimpaired/evil-collection-unimpaired.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/unimpaired/evil-collection-unimpaired.el
new file mode 100644
index 0000000..f383840
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/unimpaired/evil-collection-unimpaired.el
@@ -0,0 +1,312 @@
+;;; evil-collection-unimpaired.el --- Evil Collection port of Unimpaired -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, unimpaired, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; `evil' port of unimpaired for `evil-collection'.
+;; https://github.com/tpope/vim-unimpaired
+
+;;; Code:
+(require 'evil-collection)
+
+;; Externals
+(defvar flycheck-current-errors)
+
+(defgroup evil-collection-unimpaired nil
+  "Evil port of unimpaired for `evil-collection'."
+  :group 'evil-collection)
+
+(defcustom evil-collection-unimpaired-want-repeat-mode-integration nil
+  "Whether or not to enable `repeat-mode' integration."
+  :type 'boolean
+  :group 'evil-collection)
+
+(defconst evil-collection-unimpaired-maps '(evil-collection-unimpaired-mode-map))
+
+(defvar evil-collection-unimpaired-mode-map (make-sparse-keymap)
+  "Keymap for `evil-collection-unimpaired-mode'.")
+
+(define-minor-mode evil-collection-unimpaired-mode
+  "Evil port of unimpaired."
+  :lighter " unimpaired"
+  :group 'evil-collection-unimpaired)
+
+;;;###autoload
+(define-globalized-minor-mode global-evil-collection-unimpaired-mode
+  evil-collection-unimpaired-mode evil-collection-unimpaired-mode-on)
+
+(defun evil-collection-unimpaired-mode-on ()
+  "Turn on `evil-collection-unimpaired-mode'."
+  (evil-collection-unimpaired-mode 1))
+
+(evil-define-motion evil-collection-unimpaired-next-error (count)
+  "Go to next error."
+  :jump t
+  (setq count (or count 1))
+  (cond
+   ((and (bound-and-true-p flycheck-mode)
+         (fboundp 'flycheck-next-error))
+    (flycheck-next-error count))
+   ((and (bound-and-true-p flymake-mode)
+         (fboundp 'flymake-goto-next-error))
+    (flymake-goto-next-error count))
+   (:default
+    (message "No linting modes are on."))))
+
+(evil-define-motion evil-collection-unimpaired-previous-error (count)
+  "Go to previous error."
+  :jump t
+  (evil-collection-unimpaired-next-error (- (or count 1))))
+
+(defun evil-collection-unimpaired--flycheck-count-errors ()
+  "Count the number of flycheck errors."
+  (length (delete-dups (mapcar 'flycheck-error-line flycheck-current-errors))))
+
+(evil-define-motion evil-collection-unimpaired-first-error ()
+  "Go to the first error."
+  :jump t
+  (cond
+   ((and (bound-and-true-p flycheck-mode)
+         (fboundp 'flycheck-first-error))
+    (flycheck-first-error))
+   ((bound-and-true-p flymake-mode)
+    (message "flymake unsupported."))
+   (:default
+    (message "No linting modes are on."))))
+
+(evil-define-motion evil-collection-unimpaired-last-error ()
+  "Go to the last error."
+  :jump t
+  (cond
+   ((and (bound-and-true-p flycheck-mode)
+         (fboundp 'flycheck-first-error))
+    (flycheck-first-error (evil-collection-unimpaired--flycheck-count-errors)))
+   ((bound-and-true-p flymake-mode)
+    (message "flymake unsupported."))
+   (:default
+    (message "No linting modes are on."))))
+
+(defconst evil-collection-unimpaired--SCM-conflict-marker "^\\(@@@ .* @@@\\|[<=>]\\{7\\}\\)"
+  "A regexp to match SCM conflict marker.")
+
+(evil-define-motion evil-collection-unimpaired-previous-SCM-conflict-marker (count)
+  "Go to the previous SCM conflict marker or diff/patch hunk."
+  :jump t
+  (evil-collection-unimpaired-next-SCM-conflict-marker (- (or count 1))))
+
+(evil-define-motion evil-collection-unimpaired-next-SCM-conflict-marker (count)
+  "Go to the next SCM conflict marker or diff/patch hunk."
+  :jump t
+  (evil-motion-loop (dir (or count 1))
+    (cond
+     ((> dir 0)
+      (forward-line 1)
+      (when (not (search-forward-regexp evil-collection-unimpaired--SCM-conflict-marker nil t))
+        (forward-line -1))
+      (move-beginning-of-line nil))
+     (t
+      (search-backward-regexp evil-collection-unimpaired--SCM-conflict-marker nil t)
+      (move-beginning-of-line nil)))))
+
+(defun evil-collection-unimpaired-paste-above ()
+  "Paste above current line with preserving indentation."
+  (interactive)
+  (let ((indent (current-indentation))
+        (column (current-column)))
+    (evil-insert-newline-above)
+    (indent-to indent)
+    (evil-paste-after 1)
+    (move-to-column column)))
+
+(defun evil-collection-unimpaired-paste-below ()
+  "Paste below current line with preserving indentation."
+  (interactive)
+  (let ((indent (current-indentation))
+        (column (current-column)))
+    (evil-insert-newline-below)
+    (indent-to indent)
+    (evil-paste-after 1)
+    (move-to-column column)))
+
+(defun evil-collection-unimpaired-insert-newline-above (count)
+  "Insert COUNT blank line(s) above current line."
+  (interactive "p")
+  (save-excursion (dotimes (_ count) (evil-insert-newline-above)))
+  (when (bolp) (forward-char count)))
+
+(defun evil-collection-unimpaired-insert-newline-below (count)
+  "Insert COUNT blank line(s) below current line."
+  (interactive "p")
+  (save-excursion (dotimes (_ count) (evil-insert-newline-below))))
+
+(defun evil-collection-unimpaired--encode (beg end fn)
+  "Apply FN from BEG to END."
+  (save-excursion
+    (goto-char beg)
+    (let* ((end (if (eq evil-this-type 'line) (1- end) end))
+           (text (buffer-substring-no-properties beg end)))
+      (delete-region beg end)
+      (insert (funcall fn text)))))
+
+(evil-define-operator evil-collection-unimpaired-url-encode (count &optional beg end)
+  "Encode a URL string."
+  (interactive "<c><r>")
+  (ignore count)
+  (evil-collection-unimpaired--encode beg end #'url-encode-url))
+
+(evil-define-operator evil-collection-unimpaired-url-decode (count &optional beg end)
+  "Decode a URL string."
+  (interactive "<c><r>")
+  (ignore count)
+  (evil-collection-unimpaired--encode beg end #'url-unhex-string))
+
+(evil-define-operator evil-collection-unimpaired-b64-encode (count &optional beg end)
+  "Encode a base64 string."
+  (interactive "<c><r>")
+  (ignore count)
+  (evil-collection-unimpaired--encode beg end #'base64-encode-string))
+
+(evil-define-operator evil-collection-unimpaired-b64-decode (count &optional beg end)
+  "Decode a base64 string."
+  (interactive "<c><r>")
+  (ignore count)
+  (evil-collection-unimpaired--encode beg end #'base64-decode-string))
+
+;; https://stackoverflow.com/questions/2423834/move-line-region-up-and-down-in-emacs
+(defun evil-collection-unimpaired--move-text (arg)
+  "Move text down if ARG is positive, otherwise move text up."
+  (cond
+   ((and mark-active transient-mark-mode)
+    (when (> (point) (mark))
+      (exchange-point-and-mark))
+    (let ((column (current-column))
+          (text (delete-and-extract-region (point) (mark))))
+      (forward-line arg)
+      (move-to-column column :force)
+      (set-mark (point))
+      (insert text)
+      (exchange-point-and-mark)
+      (setq deactivate-mark nil)))
+   (t
+    (let ((column (current-column)))
+      (beginning-of-line)
+      (when (or (> arg 0) (not (bobp)))
+        (forward-line)
+        (when (or (< arg 0) (not (eobp)))
+          (transpose-lines arg))
+        (forward-line -1))
+      (move-to-column column)))))
+
+(defun evil-collection-unimpaired-move-text-down (arg)
+  "Move region (transient-mark-mode active) or current line ARG lines down."
+  (interactive "*p")
+  (evil-collection-unimpaired--move-text arg))
+
+(defun evil-collection-unimpaired-move-text-up (arg)
+  "Move region (transient-mark-mode active) or current line ARG lines up."
+  (interactive "*p")
+  (evil-collection-unimpaired--move-text (- arg)))
+
+;;; 'repeat-mode' integration. Emacs 28+
+(defmacro evil-collection-unimpaired-defvar-keymap (name &rest bindings)
+  "Define NAME a keymap with BINDINGS."
+  (declare (indent 1))
+  (cl-assert (cl-evenp (length bindings)))
+  `(progn
+     (defvar ,name
+       (let ((map (make-sparse-keymap)))
+         map))
+     (evil-collection-define-key nil ',name ,@bindings)))
+
+;; "[b" and "]b"
+(evil-collection-unimpaired-defvar-keymap evil-prev-buffer-repeat-map
+  "b" #'evil-prev-buffer
+  "B" #'evil-next-buffer)
+(evil-collection-unimpaired-defvar-keymap evil-next-buffer-repeat-map
+  "b" #'evil-next-buffer
+  "B" #'evil-prev-buffer)
+
+;; "[e" and "]e"
+(evil-collection-unimpaired-defvar-keymap evil-collection-unimpaired-move-text-up-repeat-map
+  "e" #'evil-collection-unimpaired-move-text-up
+  "E" #'evil-collection-unimpaired-move-text-down)
+(evil-collection-unimpaired-defvar-keymap evil-collection-unimpaired-move-text-down-repeat-map
+  "e" #'evil-collection-unimpaired-move-text-down
+  "E" #'evil-collection-unimpaired-move-text-up)
+
+;; "[q" and "]q"
+(evil-collection-unimpaired-defvar-keymap evil-collection-unimpaired-previous-error-repeat-map
+  "q" #'evil-collection-unimpaired-previous-error
+  "Q" #'evil-collection-unimpaired-next-error)
+(evil-collection-unimpaired-defvar-keymap evil-collection-unimpaired-next-error-repeat-map
+  "q" #'evil-collection-unimpaired-next-error
+  "Q" #'evil-collection-unimpaired-previous-error)
+
+;;;###autoload
+(defun evil-collection-unimpaired-setup ()
+  "Set up unimpaired-like bindings."
+  (global-evil-collection-unimpaired-mode 1)
+  (evil-collection-define-key 'normal 'evil-collection-unimpaired-mode-map
+    "[b" 'evil-prev-buffer
+    "]b" 'evil-next-buffer
+    "[e" 'evil-collection-unimpaired-move-text-up
+    "]e" 'evil-collection-unimpaired-move-text-down
+    "[l" 'evil-collection-unimpaired-previous-error
+    "]l" 'evil-collection-unimpaired-next-error
+    "[L" 'evil-collection-unimpaired-first-error
+    "]L" 'evil-collection-unimpaired-last-error
+    "[q" 'evil-collection-unimpaired-previous-error
+    "]q" 'evil-collection-unimpaired-next-error
+    "[Q" 'evil-collection-unimpaired-first-error
+    "]Q" 'evil-collection-unimpaired-last-error
+    "[n" 'evil-collection-unimpaired-previous-SCM-conflict-marker
+    "]n" 'evil-collection-unimpaired-next-SCM-conflict-marker
+    "[p" 'evil-collection-unimpaired-paste-above
+    "]p" 'evil-collection-unimpaired-paste-below
+    "[P" 'evil-collection-unimpaired-paste-above
+    "]P" 'evil-collection-unimpaired-paste-below
+    (kbd "[ SPC") 'evil-collection-unimpaired-insert-newline-above
+    (kbd "] SPC") 'evil-collection-unimpaired-insert-newline-below)
+  (evil-collection-define-key 'visual 'evil-collection-unimpaired-mode-map
+    "[e" 'evil-collection-unimpaired-move-text-up
+    "]e" 'evil-collection-unimpaired-move-text-down
+    "[n" 'evil-collection-unimpaired-previous-SCM-conflict-marker
+    "]n" 'evil-collection-unimpaired-next-SCM-conflict-marker)
+  (evil-collection-define-key 'motion 'evil-collection-unimpaired-mode-map
+    "[u" 'evil-collection-unimpaired-url-encode
+    "]u" 'evil-collection-unimpaired-url-decode
+    "[6" 'evil-collection-unimpaired-b64-encode
+    "]6" 'evil-collection-unimpaired-b64-decode)
+
+  (when evil-collection-unimpaired-want-repeat-mode-integration
+    (dolist (cmd '(evil-prev-buffer
+                   evil-next-buffer
+                   evil-collection-unimpaired-move-text-up
+                   evil-collection-unimpaired-move-text-down
+                   evil-collection-unimpaired-previous-error
+                   evil-collection-unimpaired-next-error))
+      (put cmd 'repeat-map (intern (format "%s-repeat-map" cmd))))))
+
+(provide 'evil-collection-unimpaired)
+;;; evil-collection-unimpaired.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/unimpaired/evil-collection-unimpaired.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/unimpaired/evil-collection-unimpaired.elc
new file mode 100644
index 0000000..3399089
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/unimpaired/evil-collection-unimpaired.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-annotate/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-annotate/README.org
new file mode 100644
index 0000000..c53e62f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-annotate/README.org
@@ -0,0 +1,23 @@
+* vc-annotate
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Old-Revisions.html][vc-annotate]] (=C-x v g=), Emacs' built-in
+  blame view.
+
+** Key bindings
+
+   | Command                                            | Original | Evil              |
+   |----------------------------------------------------+----------+-------------------|
+   | =quit-window=                                      | =q=      | =q=               |
+   | =vc-annotate-revision-previous-to-line=            | =P=      | =a=               |
+   | =vc-annotate-show-diff-revision-at-line=           | ===      | =d=, ===          |
+   | =vc-annotate-show-changeset-diff-revision-at-line= | =D=      | =D=               |
+   | =vc-annotate-find-revision-at-line=                | =f=      | =F=               |
+   | =vc-annotate-revision-at-line=                     | =J=      | =J=               |
+   | =vc-annotate-show-log-revision-at-line=            | =l=      | =L=               |
+   | =vc-annotate-next-revision=                        | =n=      | =gj=, =]]=, =C-j= |
+   | =vc-annotate-prev-revision=                        | =p=      | =gk=, =[[=, =C-k= |
+   | =vc-annotate-working-revision=                     | =w=      | =W=               |
+   | =vc-annotate-toggle-annotation-visibility=         | =A=      | =A=               |
+   | =vc-annotate-goto-line=                            | =RET=    | =RET=             |
+
+   Initial state is normal.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-annotate/evil-collection-vc-annotate.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-annotate/evil-collection-vc-annotate.el
new file mode 100644
index 0000000..c3b1f23
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-annotate/evil-collection-vc-annotate.el
@@ -0,0 +1,58 @@
+;;; evil-collection-vc-annotate.el --- Bindings for `vc-annotate' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `vc-annotate'
+
+;;; Code:
+(require 'evil-collection)
+(require 'vc-annotate)
+
+(defconst evil-collection-vc-annotate-maps '(vc-annotate-mode-map))
+
+;;;###autoload
+(defun evil-collection-vc-annotate-setup ()
+  "Set up `evil' bindings for `vc-annotate'."
+  (evil-set-initial-state 'vc-annotate-mode 'normal)
+  (evil-collection-bind 'vc-annotate-mode-map 'quit 'quit-window)
+  (evil-collection-define-key 'normal 'vc-annotate-mode-map
+    "a" 'vc-annotate-revision-previous-to-line
+    "d" 'vc-annotate-show-diff-revision-at-line
+    "=" 'vc-annotate-show-diff-revision-at-line
+    "D" 'vc-annotate-show-changeset-diff-revision-at-line
+    "F" 'vc-annotate-find-revision-at-line
+    "J" 'vc-annotate-revision-at-line
+    "L" 'vc-annotate-show-log-revision-at-line
+    "W" 'vc-annotate-working-revision
+    "A" 'vc-annotate-toggle-annotation-visibility)
+  (evil-collection-bind 'vc-annotate-mode-map
+                        'action 'vc-annotate-goto-line
+                        'next-item 'vc-annotate-next-revision
+                        'prev-item 'vc-annotate-prev-revision
+                        'next-section 'vc-annotate-next-revision
+                        'prev-section 'vc-annotate-prev-revision))
+
+(provide 'evil-collection-vc-annotate)
+;;; evil-collection-vc-annotate.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-annotate/evil-collection-vc-annotate.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-annotate/evil-collection-vc-annotate.elc
new file mode 100644
index 0000000..611b0df
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-annotate/evil-collection-vc-annotate.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-dir/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-dir/README.org
new file mode 100644
index 0000000..98e36b4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-dir/README.org
@@ -0,0 +1,47 @@
+* vc-dir
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/VC-Directory-Mode.html][vc-dir]] (=C-x v d=).
+
+** Key bindings
+
+   Standard read-only motion / quit bindings come from
+   =evil-collection-set-readonly-bindings=.
+
+   | Command                          | Original      | Evil              |
+   |----------------------------------+---------------+-------------------|
+   | =vc-next-action=                 | =v=           | =c=               |
+   | =vc-diff=                        | ===           | =d=, =TAB=        |
+   | =vc-root-diff=                   | =D=           | =D=, =S-TAB=      |
+   | =vc-register=                    | =i=           | =R=, =s=          |
+   | =vc-update=                      | =+=           | =gu=, =F=         |
+   | =revert-buffer=                  | =g=           | =gr=              |
+   | =vc-push=                        | =P=           | =p=, =P=          |
+   | =vc-print-log=                   | =l=           | =Lf=, =Ll=        |
+   | =vc-print-root-log=              | =L=           | =Lr=, =LL=        |
+   | =vc-log-incoming=                | =Ii=          | =Li=              |
+   | =vc-log-outgoing=                | =Io=          | =Lo=              |
+   | =vc-revert=                      | =N=           | =x=               |
+   | =vc-annotate=                    | =A=           | =b=               |
+   | =vc-dir-mark=                    | =m=           | =m=               |
+   | =vc-dir-mark-all-files=          | =M m=         | =M=               |
+   | =vc-dir-unmark=                  | =u=           | =u=               |
+   | =vc-dir-unmark-all-files=        | =M u=         | =U=               |
+   | =vc-dir-next-directory=          | =M-n=         | =]]=, =gj=, =C-j= |
+   | =vc-dir-previous-directory=      | =M-p=         | =[[=, =gk=, =C-k= |
+   | =vc-dir-find-file=               | =f=, =RET=    | =gf=, =RET=       |
+   | =vc-dir-find-file-other-window=  | =o=           | =go=, =S-RET=     |
+   | =vc-dir-display-file=            | =SPC=         | =gO=, =M-RET=     |
+   | =vc-dir-kill-dir-status-process= | =C-c C-c=     | =C-c C-c=         |
+   | =vc-dir-toggle-mark=             | =SPC=         | =t=               |
+   | =vc-dir-hide-up-to-date=         | =x=           | =(=, =o=          |
+   | =vc-dir-kill-line=               | =k=           | =X=               |
+   | =vc-dir-search=                  | =S=           | =S=               |
+   | =vc-dir-query-replace-regexp=    | =Q=           | =Q=               |
+   | =vc-dir-isearch=                 | =M-s a C-s=   | =M-s a C-s=       |
+   | =vc-dir-isearch-regexp=          | =M-s a M-C-s= | =M-s a M-C-s=     |
+   | =vc-dir-ignore=                  | =G=           | =i=               |
+   | =vc-create-tag=                  | =B c=         | =Bc=              |
+   | =vc-print-branch-log=            | =B l=         | =Bl=              |
+   | =vc-retrieve-tag=                | =B s=         | =Bs=              |
+
+   Initial state is normal.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-dir/evil-collection-vc-dir.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-dir/evil-collection-vc-dir.el
new file mode 100644
index 0000000..b658976
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-dir/evil-collection-vc-dir.el
@@ -0,0 +1,104 @@
+;;; evil-collection-vc-dir.el --- Evil bindings for Vc-Dir -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <ambrevar@gmail.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, vc-dir, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Vc-Dir.
+
+;;; Code:
+(require 'vc-dir)
+(require 'evil-collection)
+
+(defconst evil-collection-vc-dir-maps '(vc-dir-mode-map))
+
+;;;###autoload
+(defun evil-collection-vc-dir-setup ()
+  "Set up `evil' bindings for `vc-dir'."
+  (evil-set-initial-state 'vc-dir-mode 'normal)
+  (evil-collection-set-readonly-bindings 'vc-dir-mode-map)
+  (evil-collection-define-key 'normal 'vc-dir-mode-map
+    ;; VC commands
+    "c" 'vc-next-action
+
+    "d" 'vc-diff
+    "D" 'vc-root-diff
+    "\t" 'vc-diff
+    [backtab] 'vc-root-diff
+
+    "R" 'vc-register
+    "s" 'vc-register ;; Like `magit-stage'?
+    "gu" 'vc-update
+
+    "F" 'vc-update ;; This is the same as `vc-update' bound to "gu".
+    "p" 'vc-push
+    "P" 'vc-push
+
+    "Lf" 'vc-print-log ;; Log File.
+    "Ll" 'vc-print-log
+    "Lr" 'vc-print-root-log
+    "LL" 'vc-print-root-log
+    "Li" 'vc-log-incoming
+    "Lo" 'vc-log-outgoing
+
+    "x" 'vc-revert
+    "b" 'vc-annotate ;; Like `magit-blame'
+
+    "\C-c\C-c" 'vc-dir-kill-dir-status-process
+    [down-mouse-3] 'vc-dir-menu
+    [mouse-2] 'vc-dir-find-file-other-window
+    [follow-link] 'mouse-face
+
+    "(" 'vc-dir-hide-up-to-date
+    "o" 'vc-dir-hide-up-to-date
+
+    "X" 'vc-dir-kill-line
+    "S" 'vc-dir-search
+    "Q" 'vc-dir-query-replace-regexp
+    (kbd "M-s a C-s")   'vc-dir-isearch
+    (kbd "M-s a M-C-s") 'vc-dir-isearch-regexp
+    "i" 'vc-dir-ignore
+
+    ;; Branching
+    "Bc" 'vc-create-tag
+    "Bl" 'vc-print-branch-log
+    "Bs" 'vc-retrieve-tag)
+
+  (evil-collection-bind 'vc-dir-mode-map
+                        'mark 'vc-dir-mark
+                        'mark-all 'vc-dir-mark-all-files
+                        'toggle 'vc-dir-toggle-mark
+                        'unmark 'vc-dir-unmark
+                        'unmark-all 'vc-dir-unmark-all-files
+                        'next-item 'vc-dir-next-directory
+                        'prev-item 'vc-dir-previous-directory
+                        'next-section 'vc-dir-next-directory
+                        'prev-section 'vc-dir-previous-directory
+                        'action 'vc-dir-find-file
+                        'action-other 'vc-dir-find-file-other-window
+                        'action-stay 'vc-dir-display-file
+                        'find-file 'vc-dir-find-file
+                        'refresh 'revert-buffer))
+
+(provide 'evil-collection-vc-dir)
+;;; evil-collection-vc-dir.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-dir/evil-collection-vc-dir.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-dir/evil-collection-vc-dir.elc
new file mode 100644
index 0000000..d24cd2c
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-dir/evil-collection-vc-dir.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-git/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-git/README.org
new file mode 100644
index 0000000..4d4e8bb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-git/README.org
@@ -0,0 +1,16 @@
+* vc-git
+
+  Evil bindings for the vc-git log view (=vc-git-log-view-mode=).
+
+** Key bindings
+
+   | Command                         | Original | Evil  |
+   |---------------------------------+----------+-------|
+   | =quit-window=                   | =q=      | =q=   |
+   | =log-view-diff=                 | ===, =d= | =d=   |
+   | =log-view-diff-changeset=       | =D=      | =D=   |
+   | =log-view-msg-next=             | =n=      | =C-j= |
+   | =log-view-msg-prev=             | =p=      | =C-k= |
+   | =log-view-toggle-entry-display= | =RET=    | =TAB= |
+
+   Initial state for =vc-git-log-view-mode= is normal.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-git/evil-collection-vc-git.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-git/evil-collection-vc-git.el
new file mode 100644
index 0000000..3504bfb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-git/evil-collection-vc-git.el
@@ -0,0 +1,51 @@
+;;; evil-collection-vc-git.el --- Evil bindings for Vc-Git -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <ambrevar@gmail.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, vc-git, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Vc-Git.
+
+;;; Code:
+(require 'vc-git)
+(require 'evil-collection)
+
+(defconst evil-collection-vc-git-maps '(vc-git-mode-map))
+
+;;;###autoload
+(defun evil-collection-vc-git-setup ()
+  "Set up `evil' bindings for `vc-git'."
+  (evil-set-initial-state 'vc-git-log-view-mode 'normal)
+  (evil-collection-define-key 'normal 'vc-git-log-view-mode-map
+    "d" 'log-view-diff
+    "D" 'log-view-diff-changeset)
+  (evil-collection-bind 'vc-git-log-view-mode-map
+                        'quit 'quit-window
+                        'next-item 'log-view-msg-next
+                        'prev-item 'log-view-msg-prev
+                        'next-section 'log-view-msg-next
+                        'prev-section 'log-view-msg-prev
+                        'section-toggle 'log-view-toggle-entry-display))
+
+(provide 'evil-collection-vc-git)
+;;; evil-collection-vc-git.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-git/evil-collection-vc-git.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-git/evil-collection-vc-git.elc
new file mode 100644
index 0000000..3279794
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vc-git/evil-collection-vc-git.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vdiff/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vdiff/README.org
new file mode 100644
index 0000000..3ba3adf
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vdiff/README.org
@@ -0,0 +1,18 @@
+* vdiff
+
+  Evil bindings for [[https://github.com/justbur/emacs-vdiff][vdiff]], a vimdiff-style diff/merge interface.
+
+  Applied to both =vdiff-mode-map= and =vdiff-3way-mode-map=.
+
+** Key bindings
+
+   | Command                 | Original | Evil |
+   |-------------------------+----------+------|
+   | =vdiff-next-hunk=       | (varies) | =]c= |
+   | =vdiff-previous-hunk=   | (varies) | =[c= |
+   | =vdiff-receive-changes= | =do=     | =do= |
+   | =vdiff-send-changes=    | =dp=     | =dp= |
+
+   =do= / =dp= are installed as evil operator-keys via
+   =evil-collection-define-operator-key= so they compose with motions like
+   vim's =do= (diff obtain) and =dp= (diff put).
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vdiff/evil-collection-vdiff.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vdiff/evil-collection-vdiff.el
new file mode 100644
index 0000000..8d290ea
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vdiff/evil-collection-vdiff.el
@@ -0,0 +1,54 @@
+;;; evil-collection-vdiff.el --- Evil bindings for vdiff -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Evgeni Kolev <evgenysw@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, vdiff, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for vdiff.el https://github.com/justbur/emacs-vdiff
+
+;;; Code:
+(require 'vdiff nil t)
+(require 'evil-collection)
+
+(defconst evil-collection-vdiff-maps '(vdiff-mode-map
+                                       vdiff-3way-mode-map))
+
+;;;###autoload
+(defun evil-collection-vdiff-setup ()
+  "Set up `evil' bindings for `vdiff-mode'."
+  (add-hook 'vdiff-mode-hook #'evil-normalize-keymaps)
+  (add-hook 'vdiff-3way-mode-hook #'evil-normalize-keymaps)
+
+  (dolist (keymap evil-collection-vdiff-maps)
+    (evil-collection-define-key 'normal keymap
+      "]c" 'vdiff-next-hunk
+      "[c" 'vdiff-previous-hunk)
+
+    ;; define `do' (diff obtain) and `dp' (diff put) bindings
+    (evil-collection-define-operator-key 'delete keymap
+      "o" 'vdiff-receive-changes
+      "p" 'vdiff-send-changes)))
+
+(provide 'evil-collection-vdiff)
+
+;;; evil-collection-vdiff.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vdiff/evil-collection-vdiff.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vdiff/evil-collection-vdiff.elc
new file mode 100644
index 0000000..c092fd0
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vdiff/evil-collection-vdiff.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vertico/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vertico/README.org
new file mode 100644
index 0000000..5ea5d14
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vertico/README.org
@@ -0,0 +1,40 @@
+* vertico
+
+  Evil bindings for [[https://github.com/minad/vertico][vertico]].
+
+  Bindings only take effect when =evil-collection-setup-minibuffer= is non-nil
+  (excluding the global =<escape>= → =abort-recursive-edit=).
+
+** Key bindings
+
+*** vertico-map (normal state)
+
+    | Command                  | Original        | Evil       |
+    |--------------------------+-----------------+------------|
+    | =abort-recursive-edit=   | =C-g=           | =<escape>= |
+    | =vertico-first=          | =M-<=           | =gg=       |
+    | =vertico-last=           | =M->=           | =G=        |
+    | =vertico-next=           | =<down>=, =C-n= | =j=        |
+    | =vertico-previous=       | =<up>=, =C-p=   | =k=        |
+    | =vertico-next-group=     | =M-}=           | =gj=       |
+    | =vertico-previous-group= | =M-{=           | =gk=       |
+    | =vertico-scroll-down=    | =M-v=           | =C-u=      |
+    | =vertico-scroll-up=      | =C-v=           | =C-d=      |
+
+    =C-u= is gated on =evil-want-C-u-scroll=; =C-d= on =evil-want-C-d-scroll=.
+
+*** vertico-map (insert state)
+
+    | Command            | Original | Evil  |
+    |--------------------+----------+-------|
+    | =vertico-next=     | =C-n=    | =C-n= |
+    | =vertico-previous= | =C-p=    | =C-p= |
+
+    With =evil-collection-vertico-want-want-C-u-in-insert= and
+    =evil-want-C-u-delete= unset, =C-u= → =vertico-scroll-down= in insert state.
+
+** Customization
+
+   | Variable                                          | Default | Purpose                             |
+   |---------------------------------------------------+---------+-------------------------------------|
+   | =evil-collection-vertico-want-want-C-u-in-insert= | =nil=   | Allow =C-u= scroll in insert state. |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vertico/evil-collection-vertico.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vertico/evil-collection-vertico.el
new file mode 100644
index 0000000..48f6f6a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vertico/evil-collection-vertico.el
@@ -0,0 +1,69 @@
+;;; evil-collection-vertico.el --- Evil bindings for vertico -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021 Kisaragi Hiu
+
+;; Author: Kisaragi Hiu <mail@kisaragi-hiu.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, vertico, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `vertico'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'vertico nil t)
+
+(defconst evil-collection-vertico-maps nil)
+
+(defcustom evil-collection-vertico-want-want-C-u-in-insert nil
+  "When non nil, C-u may be bound in insert state."
+  :group 'evil-collection
+  :type 'boolean)
+
+;;;###autoload
+(defun evil-collection-vertico-setup ()
+  "Set up `evil' bindings for `vertico'."
+  (evil-collection-define-key nil 'vertico-map
+    (kbd "<escape>") 'abort-recursive-edit)
+
+  (defvar evil-collection-setup-minibuffer)
+  (when evil-collection-setup-minibuffer
+    (when evil-want-C-u-scroll
+      (evil-collection-define-key 'normal 'vertico-map
+        (kbd "C-u") 'vertico-scroll-down))
+    (when evil-collection-vertico-want-want-C-u-in-insert
+      (unless evil-want-C-u-delete
+        (evil-collection-define-key 'insert 'vertico-map
+          (kbd "C-u") 'vertico-scroll-down)))
+    (when evil-want-C-d-scroll
+      (evil-collection-define-key 'normal 'vertico-map
+        (kbd "C-d") 'vertico-scroll-up))
+
+    (evil-collection-define-key 'normal 'vertico-map
+      "gg" 'vertico-first
+      "G" 'vertico-last
+      "j" 'vertico-next
+      "k" 'vertico-previous)
+    (evil-collection-bind 'vertico-map
+                          'next-item 'vertico-next-group
+                          'prev-item 'vertico-previous-group
+                          'completion-previous 'vertico-previous
+                          'completion-next     'vertico-next)))
+
+(provide 'evil-collection-vertico)
+;;; evil-collection-vertico.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vertico/evil-collection-vertico.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vertico/evil-collection-vertico.elc
new file mode 100644
index 0000000..a9862ed
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vertico/evil-collection-vertico.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/view/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/view/README.org
new file mode 100644
index 0000000..39a990c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/view/README.org
@@ -0,0 +1,14 @@
+* view
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/View-Mode.html][View mode]].
+
+** Key bindings
+
+   | Command                     | Original | Evil    |
+   |-----------------------------+----------+---------|
+   | =View-quit=                 | =q=      | =q=     |
+   | =View-scroll-page-forward=  | =SPC=    | =SPC=   |
+   | =View-scroll-page-backward= | =S-SPC=  | =S-SPC= |
+   | =revert-buffer=             | =g=      | =gr=    |
+
+   View mode starts in evil normal state.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/view/evil-collection-view.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/view/evil-collection-view.el
new file mode 100644
index 0000000..31979aa
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/view/evil-collection-view.el
@@ -0,0 +1,49 @@
+;;; evil-collection-view.el --- Evil bindings for view -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, bindings, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for View.
+
+;;; Code:
+(require 'evil-collection)
+(require 'view)
+
+(defconst evil-collection-view-maps '(view-mode-map))
+
+;;;###autoload
+(defun evil-collection-view-setup ()
+  "Set up `evil' bindings for `view'."
+  (add-hook 'view-mode-hook #'evil-normalize-keymaps)
+  (evil-set-initial-state 'view-mode 'normal)
+  (evil-collection-define-key 'normal 'view-mode-map
+    ;; refresh
+    (kbd "gr") 'revert-buffer)
+  (evil-collection-bind 'view-mode-map
+                        'scroll-down 'View-scroll-page-forward
+                        'scroll-up 'View-scroll-page-backward
+                        'quit 'View-quit))
+
+(provide 'evil-collection-view)
+;;; evil-collection-view.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/view/evil-collection-view.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/view/evil-collection-view.elc
new file mode 100644
index 0000000..6321a7b
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/view/evil-collection-view.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vlf/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vlf/README.org
new file mode 100644
index 0000000..05842c4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vlf/README.org
@@ -0,0 +1,46 @@
+* vlf
+
+  Evil bindings for [[https://github.com/m00natic/vlfi][vlf]] (View Large Files). Bindings are added to
+  =vlf-prefix-map= (the =C-c C-v= prefix).
+
+** Key bindings
+
+   Always installed:
+
+   | Command                                   | Original | Evil              |
+   |-------------------------------------------+----------+-------------------|
+   | =vlf-next-batch=                          | =n=      | =gj=, =C-j=, =]]= |
+   | =vlf-prev-batch=                          | =p=      | =gk=, =C-k=, =[[= |
+   | =vlf-change-batch-size=                   | =+=      | =+=               |
+   | =evil-collection-vlf-decrease-batch-size= | =-=      | =-=               |
+   | =vlf-next-batch-from-point=               | =SPC=    | ===               |
+   | =vlf-revert=                              | =g=      | =gr=              |
+   | =vlf-query-replace=                       | =%=      | =g%=              |
+   | =vlf-occur=                               | =o=      | =go=              |
+
+   When =evil-collection-want-g-bindings= is non-nil:
+
+   | Command                  | Original | Evil |
+   |--------------------------+----------+------|
+   | =vlf-re-search-forward=  | =s=      | =g/= |
+   | =vlf-re-search-backward= | =r=      | =g?= |
+   | =vlf-jump-to-chunk=      | =j=      | =gJ= |
+   | =vlf-ediff-buffers=      | =e=      | =gE= |
+   | =vlf-goto-line=          | =l=      | =g:= |
+   | =vlf-toggle-follow=      | =f=      | =gF= |
+
+   When =evil-collection-want-g-bindings= is nil:
+
+   | Command                  | Original | Evil |
+   |--------------------------+----------+------|
+   | =vlf-re-search-forward=  | =s=      | =s=  |
+   | =vlf-re-search-backward= | =r=      | =S=  |
+   | =vlf-jump-to-chunk=      | =j=      | =J=  |
+   | =vlf-ediff-buffers=      | =e=      | =E=  |
+   | =vlf-goto-line=          | =l=      | =L=  |
+   | =vlf-toggle-follow=      | =f=      | =F=  |
+
+** New commands
+
+   - =evil-collection-vlf-decrease-batch-size= - Halve the vlf batch size
+     (mirror of =vlf-change-batch-size= with a prefix arg), bound to =-=.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vlf/evil-collection-vlf.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vlf/evil-collection-vlf.el
new file mode 100644
index 0000000..f0e968a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vlf/evil-collection-vlf.el
@@ -0,0 +1,83 @@
+;;; evil-collection-vlf.el --- Evil bindings for vlf -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, vlf, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `vlf'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'vlf nil t)
+
+(defvar vlf-mode-map)
+(declare-function vlf-change-batch-size "vlf")
+
+(defconst evil-collection-vlf-maps '(vlf-mode-map))
+
+(defun evil-collection-vlf-decrease-batch-size ()
+  "Decrease vlf batch size by factor of 2."
+  (interactive)
+  (vlf-change-batch-size t))
+
+;;; Code:
+;;;###autoload
+(defun evil-collection-vlf-setup ()
+  "Set up `evil' bindings for `vlf'."
+  (evil-set-initial-state 'vlf-mode 'normal)
+
+  (add-hook 'vlf-mode-hook #'evil-normalize-keymaps)
+
+  (evil-collection-define-key 'normal 'vlf-prefix-map
+    "+" 'vlf-change-batch-size
+    "-" 'evil-collection-vlf-decrease-batch-size
+    "=" 'vlf-next-batch-from-point
+    "g%" 'vlf-query-replace)
+  (evil-collection-bind 'vlf-prefix-map
+                        'action 'evil-ret
+                        'action-other 'vlf-occur
+                        'next-item 'vlf-next-batch
+                        'prev-item 'vlf-prev-batch
+                        'next-section 'vlf-next-batch
+                        'prev-section 'vlf-prev-batch
+                        'refresh 'vlf-revert
+                        'jump 'vlf-jump-to-chunk)
+
+  (if evil-collection-want-g-bindings
+      (evil-collection-define-key 'normal 'vlf-prefix-map
+        "g/" 'vlf-re-search-forward
+        "g?" 'vlf-re-search-backward
+        "gJ" 'vlf-jump-to-chunk
+        "gE" 'vlf-ediff-buffers
+        "g:" 'vlf-goto-line
+        "gF" 'vlf-toggle-follow)
+    (evil-collection-define-key 'normal 'vlf-prefix-map
+      "S" 'vlf-re-search-backward
+      "E" 'vlf-ediff-buffers
+      "L" 'vlf-goto-line
+      "F" 'vlf-toggle-follow)
+    (evil-collection-bind 'vlf-prefix-map
+                          'search-or-filter 'vlf-re-search-forward)))
+
+(provide 'evil-collection-vlf)
+;;; evil-collection-vlf.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vlf/evil-collection-vlf.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vlf/evil-collection-vlf.elc
new file mode 100644
index 0000000..e89d58f
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vlf/evil-collection-vlf.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vterm/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vterm/README.org
new file mode 100644
index 0000000..c6133fd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vterm/README.org
@@ -0,0 +1,55 @@
+* vterm
+
+  Evil bindings for [[https://github.com/akermu/emacs-libvterm][vterm]].
+
+  Initial state is =insert=. Normal state adds the bindings below and uses
+  vterm-aware operators that respect the prompt boundary.
+
+** Key bindings (normal state)
+
+   | Command                                 | Original  | Evil |
+   |-----------------------------------------+-----------+------|
+   | =vterm-previous-prompt=                 | =C-c C-p= | =[[= |
+   | =vterm-next-prompt=                     | =C-c C-n= | =]]= |
+   | =vterm-yank= (paste before)             | =C-y=     | =P=  |
+   | =evil-collection-vterm-paste-after=     | n/a       | =p=  |
+   | =evil-collection-vterm-insert=          | n/a       | =i=  |
+   | =evil-collection-vterm-insert-line=     | n/a       | =I=  |
+   | =evil-collection-vterm-append=          | n/a       | =a=  |
+   | =evil-collection-vterm-append-line=     | n/a       | =A=  |
+   | =evil-collection-vterm-first-non-blank= | n/a       | =^=  |
+   | =vterm-undo=                            | n/a       | =u=  |
+   | =vterm-reset-cursor-point=              | =C-c C-r= | =G=  |
+
+   =RET= sends to the terminal in the state named by =evil-collection-repl-submit-state=.
+
+** Insert state
+
+   To preserve terminal control sequences, the following are forwarded raw to
+   the terminal via =vterm--self-insert=: =C-a=, =C-b=, =C-d=, =C-e=, =C-f=,
+   =C-k=, =C-l=, =C-n=, =C-o=, =C-p=, =C-q=, =C-r=, =C-s=, =C-t=, =C-u=, =C-v=,
+   =C-w=, =C-y=, =C-z=. =C-c= (prefix) and =C-h= (help) are not forwarded.
+
+   =<delete>= → =vterm-send-delete=.
+
+** New commands
+
+   | Command                                      | Key       |                                            |
+   |----------------------------------------------+-----------+--------------------------------------------|
+   | =evil-collection-vterm-delete=               | =d=       | delete operator, clamped to current line   |
+   | =evil-collection-vterm-delete-line=          | =D=       | delete to end-of-line                      |
+   | =evil-collection-vterm-delete-char=          | =x=       | delete forward char                        |
+   | =evil-collection-vterm-delete-backward-char= | =X=       | delete backward char                       |
+   | =evil-collection-vterm-change=               | =c=       | change operator                            |
+   | =evil-collection-vterm-change-line=          | =C=       | change to end-of-line                      |
+   | =evil-collection-vterm-substitute=           | =s=       |                                            |
+   | =evil-collection-vterm-substitute-line=      | =S=       |                                            |
+   | =evil-collection-vterm-replace=              | =r=       |                                            |
+   | =evil-collection-vterm-next-line=            | =j=       | won't move below last prompt line          |
+   | =evil-collection-vterm-toggle-send-escape=   | =C-c C-z= | toggle whether =ESC= goes to vterm or evil |
+
+** Customization
+
+   | Variable                                 | Default | Purpose                                                |
+   |------------------------------------------+---------+--------------------------------------------------------|
+   | =evil-collection-vterm-move-cursor-back= | =nil=   | Move cursor back one column when leaving insert state. |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vterm/evil-collection-vterm.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vterm/evil-collection-vterm.el
new file mode 100644
index 0000000..eebfb09
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vterm/evil-collection-vterm.el
@@ -0,0 +1,308 @@
+;;; evil-collection-vterm.el --- Bindings for `vterm' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019 James Nguyen
+;; Copyright (C) 2020 Alex Griffin <a@ajgrf.com>
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, vterm, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `vterm'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'vterm nil t)
+
+(defconst evil-collection-vterm-maps '(vterm-mode-map))
+
+(declare-function vterm-goto-char "vterm")
+(declare-function vterm--get-prompt-point "vterm")
+(declare-function vterm--get-end-of-line "vterm")
+(declare-function vterm-delete-region "vterm")
+
+(defvar vterm--process)
+
+(defcustom evil-collection-vterm-move-cursor-back nil
+  "Whether the cursor is moved backwards when exiting insert state."
+  :type 'boolean
+  :group 'vterm)
+
+(defun evil-collection-vterm-escape-stay ()
+  "Go back to normal state but don't move cursor backwards.
+Moving cursor backwards is the default vim behavior but
+it is not appropriate in some cases like terminals."
+  (setq-local evil-move-cursor-back
+              evil-collection-vterm-move-cursor-back))
+
+(defvar-local evil-collection-vterm-send-escape-to-vterm-p nil
+  "Track whether or not we send ESC to `vterm' or `emacs'.")
+
+(defun evil-collection-vterm-toggle-send-escape ()
+  "Toggle where ESC is sent between `vterm' and `emacs'.
+
+This is needed for programs that use ESC, e.g. vim or an ssh'd emacs that
+also uses `evil-mode'."
+  (interactive)
+  (if evil-collection-vterm-send-escape-to-vterm-p
+      (evil-collection-define-key 'insert 'vterm-mode-map (kbd "<escape>")
+        (lookup-key evil-insert-state-map (kbd "<escape>")))
+    (evil-collection-define-key 'insert 'vterm-mode-map
+      (kbd "<escape>") 'vterm--self-insert))
+  (setq evil-collection-vterm-send-escape-to-vterm-p
+        (not evil-collection-vterm-send-escape-to-vterm-p))
+  (message (format "Sending ESC to %s."
+                   (if evil-collection-vterm-send-escape-to-vterm-p
+                       "vterm"
+                     "emacs"))))
+
+(declare-function vterm-cursor-in-command-buffer-p "vterm")
+(declare-function vterm-beginning-of-line "vterm")
+(declare-function vterm-insert "vterm")
+
+(evil-define-motion evil-collection-vterm-first-non-blank ()
+  "Move the cursor to the first non-blank character
+after the prompt."
+  :type exclusive
+  (if (vterm-cursor-in-command-buffer-p (point))
+      (vterm-beginning-of-line)
+    (evil-first-non-blank)))
+
+(defun evil-collection-vterm-insert ()
+  "Insert character before cursor."
+  (interactive)
+  (vterm-goto-char (point))
+  (call-interactively #'evil-insert))
+
+(defun evil-collection-vterm-insert-line ()
+  "Insert character at beginning of prompt."
+  (interactive)
+  (vterm-goto-char (vterm--get-prompt-point))
+  (call-interactively #'evil-insert))
+
+(defun evil-collection-vterm-append ()
+  "Append character after cursor."
+  (interactive)
+  (vterm-goto-char (1+ (point)))
+  (call-interactively #'evil-insert))
+
+(defun evil-collection-vterm-append-line ()
+  "Append character at end-of-line."
+  (interactive)
+  (vterm-goto-char (vterm--get-end-of-line))
+  (call-interactively #'evil-insert))
+
+(declare-function vterm-yank "vterm")
+
+(defun evil-collection-vterm-paste-after (&optional arg)
+  (interactive "P")
+  (vterm-goto-char (+ 1 (point)))
+  (call-interactively #'vterm-yank arg))
+
+(declare-function vterm-reset-cursor-point "vterm")
+
+(evil-define-operator evil-collection-vterm-delete (beg end type register yank-handler)
+  "Modification of evil-delete to work in vterm buffer.
+Delete text from BEG to END with TYPE.
+Save in REGISTER or in the kill-ring with YANK-HANDLER."
+  (interactive "<R><x><y>")
+  (let* ((beg (max (or beg (point)) (vterm--get-prompt-point)))
+         (end (min (or end beg) (vterm--get-end-of-line))))
+    (unless register
+      (let ((text (filter-buffer-substring beg end)))
+        (unless (string-match-p "\n" text)
+          ;; set the small delete register
+          (evil-set-register ?- text))))
+    (let ((evil-was-yanked-without-register nil))
+      (evil-yank beg end type register yank-handler))
+    (cond
+     ((eq type 'block)
+      (evil-apply-on-block #'vterm-delete-region beg end nil))
+     ((and (eq type 'line)
+           (= end (point-max))
+           (or (= beg end)
+               (/= (char-before end) ?\n))
+           (/= beg (point-min))
+           (=  (char-before beg) ?\n))
+      (vterm-delete-region (1- beg) end))
+     (t
+      (vterm-delete-region beg end)))
+    ;; place cursor on beginning of line
+    (when (and (called-interactively-p 'any)
+               (eq type 'line))
+      (vterm-reset-cursor-point))))
+
+(evil-define-operator evil-collection-vterm-delete-backward-char (beg end type register)
+  "Delete previous character."
+  :motion evil-backward-char
+  (interactive "<R><x>")
+  (evil-collection-vterm-delete beg end type register))
+
+(evil-define-operator evil-collection-vterm-delete-char (beg end type register)
+  "Delete current character."
+  :motion evil-forward-char
+  (interactive "<R><x>")
+  (evil-collection-vterm-delete beg end type register))
+
+(evil-define-operator evil-collection-vterm-delete-line (beg end type register yank-handler)
+  "Modification of evil-delete line to work in vterm bufer. Delete to end of line."
+  :motion nil
+  :keep-visual t
+  (interactive "<R><x>")
+  ;; act linewise in Visual state
+  (let* ((beg (or beg (point)))
+         (end (or end beg))
+         (visual-line-mode (and evil-respect-visual-line-mode
+                                visual-line-mode))
+         (line-end (if visual-line-mode
+                       (save-excursion
+                         (end-of-visual-line)
+                         (point))
+                     (line-end-position))))
+    (when (evil-visual-state-p)
+      (unless (memq type '(line screen-line block))
+        (let ((range (evil-expand beg end
+                                  (if visual-line-mode
+                                      'screen-line
+                                    'line))))
+          (setq beg (evil-range-beginning range)
+                end (evil-range-end range)
+                type (evil-type range))))
+      (evil-exit-visual-state))
+    (cond
+     ((eq type 'block)
+      ;; equivalent to $d, i.e., we use the block-to-eol selection and
+      ;; call `evil-collection-vterm-delete'. In this case we fake the call to
+      ;; `evil-end-of-line' by setting `temporary-goal-column' and
+      ;; `last-command' appropriately as `evil-end-of-line' would do.
+      (let ((temporary-goal-column most-positive-fixnum)
+            (last-command 'next-line))
+        (evil-collection-vterm-delete beg end 'block register yank-handler)))
+     ((memq type '(line screen-line))
+      (evil-collection-vterm-delete beg end type register yank-handler))
+     (t
+      (evil-collection-vterm-delete beg line-end type register yank-handler)))))
+
+(evil-define-operator evil-collection-vterm-replace (beg end type register yank-handler)
+  :motion evil-forward-char
+  (interactive "<R>")
+  (let ((replacement (make-string (- end beg) (read-char))))
+    (evil-collection-vterm-delete beg end type register yank-handler)
+    (vterm-insert replacement)
+    (vterm-goto-char (1- end))))
+
+(evil-define-operator evil-collection-vterm-change (beg end type register yank-handler)
+  (evil-collection-vterm-delete beg end type register yank-handler)
+  (evil-collection-vterm-insert))
+
+(evil-define-operator evil-collection-vterm-change-line (beg end type register yank-handler)
+  :motion evil-end-of-line-or-visual-line
+  (evil-collection-vterm-delete-line beg end type register yank-handler)
+  (evil-collection-vterm-insert))
+
+(evil-define-operator evil-collection-vterm-substitute (beg end type register)
+  :motion evil-forward-char
+  (interactive "<R><x>")
+  (evil-collection-vterm-change beg end type register))
+
+(evil-define-operator evil-collection-vterm-substitute-line (beg end register yank-handler)
+  :motion evil-line-or-visual-line
+  :type line
+  (interactive "<r><x>")
+  (evil-collection-vterm-change beg end 'line register yank-handler))
+
+(evil-define-motion evil-collection-vterm-next-line (count)
+  "Move the cursor COUNT lines down.
+But don't allow the cursor to move bellow the last prompt line."
+  :type line
+  ;; This successfully prevents the `j' button from moving to an empty line
+  ;; bellow the last prompt. However, it still can be bugged for example by
+  ;; going to the one line above the last prompt and doing `10j'.
+  (when (> (count-words (point) (point-max)) 0)
+    (evil-next-line count)))
+
+;;;###autoload
+(defun evil-collection-vterm-setup ()
+  "Set up `evil' bindings for `vterm'."
+  (evil-set-initial-state 'vterm-mode 'insert)
+
+  (add-hook 'vterm-mode-hook #'evil-collection-vterm-escape-stay)
+
+  (evil-collection-bind 'vterm-mode-map
+                              'term-toggle-escape
+                              'evil-collection-vterm-toggle-send-escape)
+
+  ;; Evil has some "C-" bindings in insert state that shadow regular terminal
+  ;; bindings. Don't raw-send "C-c" (prefix key) nor "C-h" (help prefix).
+  (evil-collection-define-key 'insert 'vterm-mode-map
+    (kbd "C-a") 'vterm--self-insert
+    (kbd "C-b") 'vterm--self-insert     ; Should not be necessary.
+    (kbd "C-d") 'vterm--self-insert
+    (kbd "C-e") 'vterm--self-insert
+    (kbd "C-f") 'vterm--self-insert     ; Should not be necessary.
+    (kbd "C-k") 'vterm--self-insert
+    (kbd "C-l") 'vterm--self-insert     ; Should not be necessary.
+    (kbd "C-n") 'vterm--self-insert
+    (kbd "C-o") 'vterm--self-insert
+    (kbd "C-p") 'vterm--self-insert
+    (kbd "C-q") 'vterm--self-insert     ; Should not be necessary.
+    (kbd "C-r") 'vterm--self-insert
+    (kbd "C-s") 'vterm--self-insert     ; Should not be necessary.
+    (kbd "C-t") 'vterm--self-insert
+    (kbd "C-u") 'vterm--self-insert     ; Should not be necessary.
+    (kbd "C-v") 'vterm--self-insert     ; Should not be necessary.
+    (kbd "C-w") 'vterm--self-insert
+    (kbd "C-y") 'vterm--self-insert
+    (kbd "C-z") 'vterm--self-insert
+    (kbd "<delete>") 'vterm-send-delete)
+
+  (evil-collection-bind 'vterm-mode-map
+                        'repl-submit 'vterm-send-return
+                        'next-item 'vterm-next-prompt
+                        'prev-item 'vterm-previous-prompt
+                        'next-section 'vterm-next-prompt
+                        'prev-section 'vterm-previous-prompt)
+  (evil-collection-define-key 'normal 'vterm-mode-map
+    "p" 'evil-collection-vterm-paste-after
+    "P" 'vterm-yank
+    "a" 'evil-collection-vterm-append
+    "A" 'evil-collection-vterm-append-line
+    "d" 'evil-collection-vterm-delete
+    "D" 'evil-collection-vterm-delete-line
+    "x" 'evil-collection-vterm-delete-char
+    "X" 'evil-collection-vterm-delete-backward-char
+    "^" 'evil-collection-vterm-first-non-blank
+    "i" 'evil-collection-vterm-insert
+    "I" 'evil-collection-vterm-insert-line
+    "u" 'vterm-undo
+    "r" 'evil-collection-vterm-replace
+    "c" 'evil-collection-vterm-change
+    "C" 'evil-collection-vterm-change-line
+    "s" 'evil-collection-vterm-substitute
+    "S" 'evil-collection-vterm-substitute-line
+    "j" 'evil-collection-vterm-next-line
+    "G" 'vterm-reset-cursor-point)
+
+  (evil-collection-define-key 'visual 'vterm-mode-map
+    "d" 'evil-collection-vterm-delete
+    "x" 'evil-collection-vterm-delete-backward-char))
+
+(provide 'evil-collection-vterm)
+;;; evil-collection-vterm.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vterm/evil-collection-vterm.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vterm/evil-collection-vterm.elc
new file mode 100644
index 0000000..10071c9
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vterm/evil-collection-vterm.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vundo/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vundo/README.org
new file mode 100644
index 0000000..04e505b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vundo/README.org
@@ -0,0 +1,31 @@
+* vundo
+
+  Evil bindings for [[https://github.com/casouri/vundo][vundo]], visual undo tree.
+
+  Upstream defaults to emacs state; evil-collection forces normal state on
+  entry, hides the evil cursor, and disables =hl-line-mode= locally.
+
+** Key bindings
+
+   | Command             | Original     | Evil                           |
+   |---------------------+--------------+--------------------------------|
+   | =vundo-forward=     | =f=, =right= | =l=, =C-f=, =right=            |
+   | =vundo-backward=    | =b=, =left=  | =h=, =C-b=, =left=, =DEL=      |
+   | =vundo-next=        | =n=          | =j=, =C-n=, =C-j=, =M-j=       |
+   | =vundo-previous=    | =p=          | =k=, =C-p=, =C-k=, =M-k=       |
+   | =vundo-stem-root=   | =a=          | =H= (evil-window-top remap)    |
+   | =vundo-stem-end=    | =e=          | =L= (evil-window-bottom remap) |
+   | =vundo-next-root=   | =w=          | =w=                            |
+   | =vundo-confirm=     | =RET=        | =RET=, =ZZ=                    |
+   | =vundo-quit=        | =q=, =C-g=   | =q=, =ZQ=                      |
+   | =vundo-diff=        | =d=          | =d=                            |
+   | =vundo-diff-mark=   | =m=          | =m=                            |
+   | =vundo-diff-unmark= | =u=          | =u=                            |
+   | =vundo--inspect=    | =i=          | =i=                            |
+   | =vundo--debug=      | =D=          | =D=                            |
+
+   Direction keys are wired via =[remap]= against the corresponding evil
+   motion command (=evil-backward-char=, =evil-forward-char=, etc.) so they
+   follow any user rebinding of those motions. =vundo-goto-last-saved= (=l=
+   upstream) and =vundo-goto-next-saved= (=r= upstream) are shadowed by the
+   evil motion remaps; call them via =M-x= if needed.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vundo/evil-collection-vundo.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vundo/evil-collection-vundo.el
new file mode 100644
index 0000000..7ab5559
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vundo/evil-collection-vundo.el
@@ -0,0 +1,96 @@
+;;; evil-collection-vundo.el --- Bindings for `vundo-mode' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, vundo, convenience
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `vundo-mode'.
+
+;;; Code:
+(require 'vundo nil t)
+(require 'evil-collection)
+
+(defgroup evil-collection-vundo nil
+  "Evil bindings for `vundo-mode'."
+  :group 'evil-collection)
+
+(defvar vundo-mode-map)
+
+(defconst evil-collection-vundo-maps '(vundo-mode-map))
+
+(defun evil-collection-vundo--hide-evil-cursor ()
+  "Hide the evil cursor."
+  (setq-local evil-default-cursor    '(nil))
+  (setq-local evil-motion-state-cursor nil)
+  (setq-local evil-visual-state-cursor nil)
+  (setq-local evil-normal-state-cursor nil)
+  (setq-local evil-insert-state-cursor nil)
+  (setq-local evil-emacs-state-cursor  nil))
+
+(defun evil-collection-vundo--disable-hl-line-mode ()
+  "Disable `hl-line-mode'."
+  (setq-local global-hl-line-mode nil))
+
+;;;###autoload
+(defun evil-collection-vundo-setup ()
+  "Set up `evil' bindings for `vundo'."
+  (add-hook 'vundo-mode-hook #'evil-normalize-keymaps)
+  ;; `vundo' defaults to emacs state.
+  (add-hook 'vundo-mode-hook #'evil-normal-state)
+  ;; hide evil cursor
+  (add-hook 'vundo-mode-hook #'evil-collection-vundo--hide-evil-cursor)
+  ;; disable hl-line-mode
+  (add-hook 'vundo-mode-hook #'evil-collection-vundo--disable-hl-line-mode)
+
+  (evil-collection-define-key 'normal 'vundo-mode-map
+    [remap evil-backward-char] 'vundo-backward
+    [remap evil-forward-char]  'vundo-forward
+    [remap evil-next-line]     'vundo-next
+    [remap evil-previous-line] 'vundo-previous
+    [remap evil-window-top]    'vundo-stem-root
+    [remap evil-window-bottom] 'vundo-stem-end
+    [remap evil-ret]           'vundo-confirm
+    [remap evil-quit]          'vundo-quit
+    [remap evil-save-and-close] 'vundo-confirm
+    [remap evil-save-modified-and-close] 'vundo-confirm
+    [remap evil-delete-backward-char] 'vundo-backward
+    (kbd "C-n") 'vundo-next
+    (kbd "C-p") 'vundo-previous
+    (kbd "M-j") 'vundo-next
+    (kbd "M-k") 'vundo-previous
+    "i" 'vundo--inspect
+    "D" 'vundo--debug
+    "d" 'vundo-diff
+    "m" 'vundo-diff-mark
+    "u" 'vundo-diff-unmark
+    "w" 'vundo-next-root)
+  (evil-collection-bind 'vundo-mode-map
+                        'next-item 'vundo-next
+                        'prev-item 'vundo-previous
+                        'next-section 'vundo-next
+                        'prev-section 'vundo-previous
+                        'quit 'vundo-quit
+                        'quit-save 'vundo-quit
+                        'quit-cancel 'vundo-quit))
+
+(provide 'evil-collection-vundo)
+;;; evil-collection-vundo.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vundo/evil-collection-vundo.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vundo/evil-collection-vundo.elc
new file mode 100644
index 0000000..b4dbb16
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/vundo/evil-collection-vundo.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/w3m/evil-collection-w3m.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/w3m/evil-collection-w3m.el
new file mode 100644
index 0000000..6454b98
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/w3m/evil-collection-w3m.el
@@ -0,0 +1,85 @@
+;;; evil-collection-w3m.el --- Evil bindings for w3m -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, w3m, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `w3m'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'w3m nil t)
+
+(defconst evil-collection-w3m-maps '(w3m-mode-map))
+
+;;;###autoload
+(defun evil-collection-w3m-setup ()
+  "Set up `evil' bindings for `w3m'."
+  (evil-set-initial-state 'w3m-mode 'normal)
+  (evil-collection-define-key 'normal 'w3m-mode-map
+    "o" 'w3m-goto-url
+    "O" 'w3m-goto-url-new-session
+
+    "H" 'w3m-view-previous-page
+    "L" 'w3m-view-next-page
+    "^" 'w3m-view-parent-page
+
+    "gh" 'w3m-view-header
+
+    "d" 'w3m-download-this-url
+    "M-d" 'w3m-download
+
+    "I" 'w3m-view-image
+    "M-i" 'w3m-save-image
+    "zi" 'w3m-toggle-inline-image
+    "zI" 'w3m-toggle-inline-images
+    "M-T" 'w3m-turnoff-inline-images
+
+    ;; bookmarks
+    "gb" 'w3m-bookmark-view
+    "gB" 'w3m-bookmark-view-new-session
+    "a" 'w3m-bookmark-add-current-url)
+  (evil-collection-bind 'w3m-mode-map
+                        'scroll-down 'w3m-scroll-up-or-next-url
+                        'scroll-up 'w3m-scroll-down-or-previous-url
+                        'action 'w3m-view-this-url
+                        'next-item 'w3m-next-form
+                        'prev-item 'w3m-previous-form
+                        'next-section 'w3m-next-form
+                        'prev-section 'w3m-previous-form
+                        'quit 'w3m-close-window
+                        'quit-save 'quit-window
+                        'quit-cancel 'w3m-quit
+                        'refresh 'w3m-reload-this-page
+                        'refresh-all 'w3m-reload-all-pages)
+
+  (evil-collection-define-operator-key 'yank 'w3m-mode-map
+    ;; yt
+    "t" 'w3m-print-this-url
+    ;; yu
+    "u" 'w3m-print-current-url)
+
+  (evil-collection-bind 'w3m-mode-map 'find-file 'w3m-view-source))
+
+(provide 'evil-collection-w3m)
+;;; evil-collection-w3m.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/w3m/evil-collection-w3m.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/w3m/evil-collection-w3m.elc
new file mode 100644
index 0000000..d64c6cd
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/w3m/evil-collection-w3m.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wdired/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wdired/README.org
new file mode 100644
index 0000000..9a16e3d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wdired/README.org
@@ -0,0 +1,14 @@
+* wdired
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Wdired.html][Wdired]] (writable Dired).
+
+** Key bindings
+
+   | Command                | Original  | Evil       |
+   |------------------------+-----------+------------|
+   | =wdired-finish-edit=   | =C-c C-c= | =ZZ=, =:w= |
+   | =wdired-abort-changes= | =C-c C-k= | =ZQ=       |
+   | =wdired-exit=          | =C-x C-q= | =<escape>= |
+
+   =wdired-finish-edit= is also bound to =[remap evil-write]= so =:w= commits
+   the rename. Initial state in wdired-mode is normal.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wdired/evil-collection-wdired.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wdired/evil-collection-wdired.el
new file mode 100644
index 0000000..e3beccb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wdired/evil-collection-wdired.el
@@ -0,0 +1,50 @@
+;;; evil-collection-wdired.el --- Bindings for `wdired' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `wdired'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'wdired)
+
+(defconst evil-collection-wdired-maps '(wdired-mode-map))
+
+;;;###autoload
+(defun evil-collection-wdired-setup ()
+  "Set up `evil' bindings for `wdired'."
+  (evil-set-initial-state 'wdired-mode 'normal)
+
+  (evil-collection-define-key nil 'wdired-mode-map
+    [remap evil-write] 'wdired-finish-edit)
+
+  (evil-collection-define-key 'normal 'wdired-mode-map
+    (kbd "<escape>") 'wdired-exit)
+  (evil-collection-bind 'wdired-mode-map
+                        'quit-save 'wdired-finish-edit
+                        'quit-cancel 'wdired-abort-changes))
+
+(provide 'evil-collection-wdired)
+;;; evil-collection-wdired.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wdired/evil-collection-wdired.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wdired/evil-collection-wdired.elc
new file mode 100644
index 0000000..16393a9
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wdired/evil-collection-wdired.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wgrep/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wgrep/README.org
new file mode 100644
index 0000000..ca985ae
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wgrep/README.org
@@ -0,0 +1,19 @@
+* wgrep
+
+  Evil bindings for [[https://github.com/mhayashi1120/Emacs-wgrep][wgrep]] (writable grep buffers).
+
+  Upstream only binds finish / abort / toggle commands under =C-c= and
+  =C-x= prefixes. evil-collection layers the usual evil quit-and-save
+  bindings on top and remaps =evil-write= to finish the edit.
+
+** Key bindings
+
+   | Command                      | Original                        | Evil       |
+   |------------------------------+---------------------------------+------------|
+   | =wgrep-finish-edit=          | =C-c C-c=, =C-c C-e=, =C-x C-s= | =ZZ=, =:w= |
+   | =wgrep-abort-changes=        | =C-c C-k=                       | =ZQ=       |
+   | =wgrep-exit=                 | =C-x C-q=                       | =<escape>= |
+   | =wgrep-mark-deletion=        | =C-c C-d=                       | =C-c C-d=  |
+   | =wgrep-remove-change=        | =C-c C-r=                       | =C-c C-r=  |
+   | =wgrep-remove-all-change=    | =C-c C-u=                       | =C-c C-u=  |
+   | =wgrep-toggle-readonly-area= | =C-c C-p=                       | =C-c C-p=  |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wgrep/evil-collection-wgrep.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wgrep/evil-collection-wgrep.el
new file mode 100644
index 0000000..5086206
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wgrep/evil-collection-wgrep.el
@@ -0,0 +1,50 @@
+;;; evil-collection-wgrep.el --- Bindings for `wgrep' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `wgrep'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'wgrep nil t)
+
+(defvar wgrep-mode-map)
+
+(defconst evil-collection-wgrep-maps '(wgrep-mode-map))
+
+;;;###autoload
+(defun evil-collection-wgrep-setup ()
+  "Set up `evil' bindings for `wgrep'."
+  (evil-collection-define-key nil 'wgrep-mode-map
+    [remap evil-write] 'wgrep-finish-edit)
+
+  (evil-collection-define-key 'normal 'wgrep-mode-map
+    (kbd "<escape>") 'wgrep-exit)
+  (evil-collection-bind 'wgrep-mode-map
+                        'quit-save 'wgrep-finish-edit
+                        'quit-cancel 'wgrep-abort-changes))
+
+(provide 'evil-collection-wgrep)
+;;; evil-collection-wgrep.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wgrep/evil-collection-wgrep.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wgrep/evil-collection-wgrep.elc
new file mode 100644
index 0000000..c6217bf
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/wgrep/evil-collection-wgrep.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/which-key/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/which-key/README.org
new file mode 100644
index 0000000..17dd24a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/which-key/README.org
@@ -0,0 +1,17 @@
+* which-key
+
+  Evil bindings for [[https://github.com/justbur/emacs-which-key][which-key]] paging popup.
+
+  Only =which-key-C-h-map= (the paging popup invoked from inside a prefix)
+  is modified; the global which-key triggers themselves are untouched.
+
+** Key bindings
+
+   | Command                              | Original   | Evil       |
+   |--------------------------------------+------------+------------|
+   | =which-key-abort=                    | =a=, =C-a= | =q=        |
+   | =which-key-show-next-page-cycle=     | =n=, =C-n= | =j=, =C-n= |
+   | =which-key-show-previous-page-cycle= | =p=, =C-p= | =k=, =C-p= |
+   | =which-key-show-standard-help=       | =h=, =C-h= | =?=, =C-h= |
+   | =which-key-undo-key=                 | =u=, =C-u= | =u=, =C-u= |
+   | =which-key-toggle-docstrings=        | =d=, =C-d= | =d=, =C-d= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/which-key/evil-collection-which-key.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/which-key/evil-collection-which-key.el
new file mode 100644
index 0000000..07d2eed
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/which-key/evil-collection-which-key.el
@@ -0,0 +1,52 @@
+;;; evil-collection-which-key.el --- Evil bindings for which-key -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Maximiliano Sandoval <msandova@protonmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, which-key, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `which-key'
+
+;;; Code:
+
+(require 'evil-collection)
+(require 'which-key nil t)
+
+(defvar which-key-C-h-map)
+
+(defconst evil-collection-which-key-maps '(which-key-C-h-map))
+
+;; `which-key'is coded so that the prompt properly shows j and k as
+;; the bindings.
+;;;###autoload
+(defun evil-collection-which-key-setup ()
+  "Set up `evil' bindings for `which-key'."
+
+  ;; (evil-collection-define-key nil 'which-key-C-h-map "u" 'which-key-undo-key)
+  (evil-collection-define-key nil 'which-key-C-h-map
+    "q" 'which-key-abort
+    "j" 'which-key-show-next-page-cycle
+    "k" 'which-key-show-previous-page-cycle
+    "?" 'which-key-show-standard-help))
+
+(provide 'evil-collection-which-key)
+;;; evil-collection-which-key.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/which-key/evil-collection-which-key.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/which-key/evil-collection-which-key.elc
new file mode 100644
index 0000000..6641179
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/which-key/evil-collection-which-key.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/with-editor/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/with-editor/README.org
new file mode 100644
index 0000000..7007a69
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/with-editor/README.org
@@ -0,0 +1,17 @@
+* with-editor
+
+  Evil bindings for [[https://github.com/magit/with-editor][with-editor]], used for editing git commit messages
+  and similar =$EDITOR= sessions inside Emacs.
+
+  Upstream already remaps =evil-quit=, =evil-save-and-close= and
+  =evil-save-modified-and-close= to =with-editor-cancel= /
+  =with-editor-finish=, so =:q=, =:wq= and =ZZ=/=ZQ= work out of the box.
+  evil-collection adds explicit normal-state =ZQ= and =ZZ= so they are
+  not subject to evil's save-modified semantics.
+
+** with-editor-mode-map (normal state)
+
+   | Command              | Original  | Evil |
+   |----------------------+-----------+------|
+   | =with-editor-cancel= | =C-c C-k= | =ZQ= |
+   | =with-editor-finish= | =C-c C-c= | =ZZ= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/with-editor/evil-collection-with-editor.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/with-editor/evil-collection-with-editor.el
new file mode 100644
index 0000000..473ac30
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/with-editor/evil-collection-with-editor.el
@@ -0,0 +1,45 @@
+;;; evil-collection-with-editor.el --- Bindings for `with-editor' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2024 Tianshu Wang
+
+;; Author: Tianshu Wang <dev@wang.tianshu.me>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Bindings for `with-editor'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'with-editor nil t)
+
+(defvar with-editor-mode-map)
+
+(defconst evil-collection-with-editor-maps '(with-editor-mode-map))
+
+;;;###autoload
+(defun evil-collection-with-editor-setup ()
+  "Set up `evil' bindings for `with-editor'."
+  (evil-collection-bind 'with-editor-mode-map
+                        'quit-save 'with-editor-finish
+                        'quit-cancel 'with-editor-cancel))
+
+(provide 'evil-collection-with-editor)
+;;; evil-collection-with-editor.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/with-editor/evil-collection-with-editor.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/with-editor/evil-collection-with-editor.elc
new file mode 100644
index 0000000..cb7801a
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/with-editor/evil-collection-with-editor.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/woman/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/woman/README.org
new file mode 100644
index 0000000..c929d47
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/woman/README.org
@@ -0,0 +1,13 @@
+* woman
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/woman/index.html][WoMan]] (manpage viewer, no external tools).
+
+** Key bindings
+
+   | Command                    | Original | Evil |
+   |----------------------------+----------+------|
+   | =WoMan-next-manpage=       | =n=      | =]]= |
+   | =WoMan-previous-manpage=   | =p=      | =[[= |
+   | =woman-reformat-last-file= | =R=      | =gr= |
+
+   Standard motion / quit bindings are inherited from =evil-collection-man=.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/woman/evil-collection-woman.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/woman/evil-collection-woman.el
new file mode 100644
index 0000000..102d12a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/woman/evil-collection-woman.el
@@ -0,0 +1,50 @@
+;;; evil-collection-woman.el --- Evil bindings for WoMan -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, woman, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `woman'.
+
+;;; Code:
+(require 'evil-collection)
+(evil-collection-require 'man)
+(require 'woman)
+
+(defconst evil-collection-woman-maps '(woman-mode-map))
+
+;;;###autoload
+(defun evil-collection-woman-setup ()
+  "Set up `evil' bindings for `woman'."
+  (evil-set-initial-state 'woman-mode 'normal)
+  ;; goto
+  ;; "gm" 'woman
+  (evil-collection-bind 'woman-mode-map
+                        'next-item 'WoMan-next-manpage
+                        'prev-item 'WoMan-previous-manpage
+                        'next-section 'WoMan-next-manpage
+                        'prev-section 'WoMan-previous-manpage
+                        'refresh 'woman-reformat-last-file))
+
+(provide 'evil-collection-woman)
+;;; evil-collection-woman.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/woman/evil-collection-woman.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/woman/evil-collection-woman.elc
new file mode 100644
index 0000000..9cc1dea
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/woman/evil-collection-woman.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xref/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xref/README.org
new file mode 100644
index 0000000..36e32c9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xref/README.org
@@ -0,0 +1,26 @@
+* xref
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Xref.html][xref]].
+
+** xref--xref-buffer-mode-map
+
+   | Command                          | Original | Evil                     |
+   |----------------------------------+----------+--------------------------|
+   | =xref-next-line=                 | =n=, =.= | =gj=, =C-j=, =C-n=, =]]= |
+   | =xref-prev-line=                 | =p=, =,= | =gk=, =C-k=, =C-p=, =[[= |
+   | #ERROR                           | =N=      | =]]=                     |
+   | =xref-prev-group= (Emacs 28+)    | =P=      | =[[=                     |
+   | =xref-query-replace-in-results=  | =r=      | =r=, =Q=                 |
+   | =xref-goto-xref=                 | =RET=    | =RET=                    |
+   | =xref-quit-and-goto-xref=        | =TAB=    | =S-RET=                  |
+   | =xref-show-location-at-point=    | =C-o=    | =o=, =go=                |
+   | =xref-revert-buffer= (Emacs 27+) | n/a      | =gr=                     |
+   #+TBLFM: $1=xref-next-group= (Emacs 28+)
+
+** xref--transient-buffer-mode-map
+
+   (Emacs 27+)
+
+   | Command                   | Original     | Evil  |
+   |---------------------------+--------------+-------|
+   | =xref-quit-and-goto-xref= | =RET=, =TAB= | =RET= |
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xref/evil-collection-xref.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xref/evil-collection-xref.el
new file mode 100644
index 0000000..949baab
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xref/evil-collection-xref.el
@@ -0,0 +1,75 @@
+;;; evil-collection-xref.el --- Evil bindings for xref -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017, 2021 James Nguyen
+
+;; Author: James Nguyen <james@jojojames.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, xref, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for `xref'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'xref)
+
+(defconst evil-collection-xref-maps `(xref--xref-buffer-mode-map
+                                      ,@(when (>= emacs-major-version 27) '(xref--transient-buffer-mode-map))))
+
+;;;###autoload
+(defun evil-collection-xref-setup ()
+  "Set up `evil' bindings for `xref'."
+  (evil-set-initial-state 'xref--xref-buffer-mode 'normal)
+  (evil-collection-set-readonly-bindings 'xref--xref-buffer-mode-map)
+  (evil-collection-define-key 'normal 'xref--xref-buffer-mode-map
+    (kbd "C-n") 'xref-next-line
+    (kbd "C-p") 'xref-prev-line
+    "r" 'xref-query-replace-in-results
+
+    ;; Match `dired''s `dired-do-find-regexp-and-replace'.
+    "Q" 'xref-query-replace-in-results
+
+    "o" 'xref-show-location-at-point)
+  ;; In Emacs mode map, TAB binds to `xref-quit-and-goto-xref'.
+  (evil-collection-bind 'xref--xref-buffer-mode-map
+                        'action 'xref-goto-xref
+                        'action-other 'xref-quit-and-goto-xref
+                        'action-stay 'xref-show-location-at-point
+                        'next-item 'xref-next-line
+                        'prev-item 'xref-prev-line
+                        'next-section-2 'xref-next-line
+                        'prev-section-2 'xref-prev-line)
+
+  (when (>= emacs-major-version 27)
+    (evil-collection-bind 'xref--xref-buffer-mode-map 'refresh 'xref-revert-buffer))
+
+  (when (>= emacs-major-version 28)
+    ;; `]]'/`[[' navigate by group; line navigation lives on `gj'/`gk'
+    ;; and `C-j'/`C-k' via the `next-item' / `next-section-2' themes.
+    (evil-collection-bind 'xref--xref-buffer-mode-map
+                          'next-section 'xref-next-group
+                          'prev-section 'xref-prev-group))
+
+  (when (>= emacs-major-version 27)
+    (evil-set-initial-state 'xref--transient-buffer-mode 'normal)
+    (evil-collection-bind 'xref--transient-buffer-mode-map 'action 'xref-quit-and-goto-xref)))
+
+(provide 'evil-collection-xref)
+;;; evil-collection-xref.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xref/evil-collection-xref.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xref/evil-collection-xref.elc
new file mode 100644
index 0000000..1266c10
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xref/evil-collection-xref.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xwidget/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xwidget/README.org
new file mode 100644
index 0000000..5825785
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xwidget/README.org
@@ -0,0 +1,43 @@
+* xwidget
+
+  Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Embedded-WebKit-Widgets.html][xwidget-webkit]], modeled after vimium.
+
+** Key bindings
+
+   Standard read-only motion / quit bindings come from
+   =evil-collection-set-readonly-bindings=.
+
+   | Command                                          | Original | Evil           |
+   |--------------------------------------------------+----------+----------------|
+   | =xwidget-webkit-scroll-up-line=                  | =C-n=    | =j=            |
+   | =xwidget-webkit-scroll-down-line=                | =C-p=    | =k=            |
+   | =xwidget-webkit-scroll-top=                      | =M-<=    | =gg=           |
+   | =xwidget-webkit-scroll-bottom=                   | =M->=    | =G=            |
+   | =xwidget-webkit-scroll-backward=                 | =B=      | =h=            |
+   | =xwidget-webkit-scroll-forward=                  | =F=      | =l=            |
+   | =xwidget-webkit-scroll-up=                       | =SPC=    | =C-f=          |
+   | =xwidget-webkit-scroll-down=                     | =S-SPC=  | =C-b=          |
+   | =xwidget-webkit-back=                            | =r=      | =H=, =<=       |
+   | =xwidget-webkit-forward=                         | =R=      | =L=, =>=       |
+   | =xwidget-webkit-reload=                          | =g=      | =r=, =gr=      |
+   | =xwidget-webkit-current-url=                     | =u=      | =yy=           |
+   | =xwidget-webkit-browse-url=                      | =a=      | =o=, =gu=, =J= |
+   | =xwidget-webkit-copy-selection-as-kill= (visual) | =w=      | =y=            |
+   | =xwidget-webkit-insert-string=                   | =i=      | =RET=          |
+   | =xwidget-webkit-zoom-in=                         | =+=      | =+=, ===       |
+   | =xwidget-webkit-zoom-out=                        | =-=      | =-=            |
+   | =describe-mode=                                  | =C-h m=  | =?=            |
+
+** New commands
+
+   | Command                                                  | Key       | Notes                          |
+   |----------------------------------------------------------+-----------+--------------------------------|
+   | =evil-collection-xwidget-webkit-scroll-half-page-up=     | =d=       | half-page down (vim semantics) |
+   | =evil-collection-xwidget-webkit-scroll-half-page-down=   | =u=       | half-page up (vim semantics)   |
+   | =evil-collection-xwidget-webkit-new-tab=                 | =t=       | prompt URL in new buffer       |
+   | =evil-collection-xwidget-webkit-close-tab=               | =x=       | kill current buffer            |
+   | =evil-collection-xwidget-webkit-restore-last-closed-tab= | =X=       | reopen last closed             |
+   | =evil-collection-xwidget-webkit-search-tabs=             | =T=, =gt= | switch via =completing-read=   |
+
+   When =evil-want-C-d-scroll= / =evil-want-C-u-scroll= are non-nil, =C-d= and
+   =C-u= scroll the page.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xwidget/evil-collection-xwidget.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xwidget/evil-collection-xwidget.el
new file mode 100644
index 0000000..80d0e4e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xwidget/evil-collection-xwidget.el
@@ -0,0 +1,186 @@
+;;; evil-collection-xwidget.el --- Evil bindings for Xwidget -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020, 2022, 2024 Ruslan Kamashev
+
+;; Author: Ruslan Kamashev <rynffoll@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, xwidget, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for Xwidget.
+
+;;; Code:
+(require 'xwidget)
+(require 'evil-collection)
+
+(defvar evil-collection-xwidget-maps '(xwidget-webkit-mode-map))
+
+;; Silence compile errors
+(declare-function xwidget-webkit-uri "xwidget")
+(declare-function xwidget-window-inside-pixel-height "xwidget")
+
+;; HACK: elisp byte-opt can't optimize 'format' out, so it's checked at runtime.
+(defun evil-collection-xwidget-webkit--scroll-trampoline (f n)
+  "Compatible wrapper for `xwidget-webkit-scroll-up' and so on.
+
+F is the name of function, N is the pixel height."
+  (let ((realf (intern (format "%s" f))))
+    (if (>= emacs-major-version 28)
+        (funcall realf n)
+      (funcall realf))))
+
+(defun evil-collection-xwidget-webkit-scroll-half-page-up ()
+  "Compatible wrapper for `xwidget-webkit-scroll-up'."
+  (interactive)
+  (evil-collection-xwidget-webkit--scroll-trampoline
+   "xwidget-webkit-scroll-up"
+   (/ (xwidget-window-inside-pixel-height (selected-window)) 2)))
+
+(defun evil-collection-xwidget-webkit-scroll-half-page-down ()
+  "Compatible wrapper for `xwidget-webkit-scroll-down'."
+  (interactive)
+  (evil-collection-xwidget-webkit--scroll-trampoline
+   "xwidget-webkit-scroll-down"
+   (/ (xwidget-window-inside-pixel-height (selected-window)) 2)))
+
+(defun evil-collection-xwidget-webkit-new-tab (url)
+  "New tab (new buffer) of URL."
+  (interactive "s(New Tab) xwidget-webkit URL: ")
+  (xwidget-webkit-browse-url url :new-session))
+
+(defvar evil-collection-xwidget-webkit-last-closed-tab-url nil)
+(defun evil-collection-xwidget-webkit-close-tab ()
+  "Close tab (kill buffer) without confirmation."
+  (interactive)
+  (setq evil-collection-xwidget-webkit-last-closed-tab-url
+        (xwidget-webkit-uri (xwidget-webkit-current-session)))
+  (let ((kill-buffer-query-functions nil))
+    (kill-current-buffer)))
+
+(defun evil-collection-xwidget-webkit-restore-last-closed-tab ()
+  "Restore last closed tab."
+  (interactive)
+  (if (null evil-collection-xwidget-webkit-last-closed-tab-url)
+      (message "No url to restore.")
+    (message (format "Restoring last closed tab %s"
+              evil-collection-xwidget-webkit-last-closed-tab-url))
+    (xwidget-webkit-browse-url
+     evil-collection-xwidget-webkit-last-closed-tab-url :new-session)
+    (setq evil-collection-xwidget-webkit-last-closed-tab-url nil)))
+
+(defun evil-collection-xwidget-webkit-search-tabs ()
+  "Search tabs (buffers) with `buffer-name'."
+  (interactive)
+  (cl-flet ((is-xwidget-webkit-buffer?
+             (b) (with-current-buffer b
+                   (equal major-mode 'xwidget-webkit-mode))))
+    (let ((bufs (cl-loop for b in (buffer-list)
+                         when (is-xwidget-webkit-buffer? b)
+                         collect (buffer-name b))))
+      (switch-to-buffer (completing-read "Switch to Tab: " bufs nil t)))))
+
+;;;###autoload
+(defun evil-collection-xwidget-setup ()
+  "Set up `evil' bindings for `xwidget'."
+  (evil-collection-set-readonly-bindings 'xwidget-webkit-mode-map)
+
+  (evil-collection-define-key 'visual 'xwidget-webkit-mode-map
+    "y" 'xwidget-webkit-copy-selection-as-kill)
+
+  (evil-collection-define-key 'normal 'xwidget-webkit-mode-map
+    ;; Mimic vimium (a browser extension)
+    ;;
+    ;; Since xwidget has no tab concept, `open-url-new-tab' etc are not
+    ;; supported.
+    ;;
+    ;; TODO: edit-mode, visual-mode
+    ;;
+    ;; Navigating the page
+    "j" 'xwidget-webkit-scroll-up-line
+    "k" 'xwidget-webkit-scroll-down-line
+    "gg" 'xwidget-webkit-scroll-top
+    "G" 'xwidget-webkit-scroll-bottom
+    "d" 'evil-collection-xwidget-webkit-scroll-half-page-up
+    "u" 'evil-collection-xwidget-webkit-scroll-half-page-down
+    "h" 'xwidget-webkit-scroll-backward
+    "l" 'xwidget-webkit-scroll-forward
+    "r" 'xwidget-webkit-reload
+    "yy" 'xwidget-webkit-current-url
+    ;; TODO `first-text-input', `open-link-in-current-tab'
+    "gi" 'undefined
+    "f" 'undefined
+
+    ;; Using the vomnibar
+    ;;
+    ;; For bookmark, use C-x r m, C-x r j.
+    "o" 'xwidget-webkit-browse-url
+    "T" 'evil-collection-xwidget-webkit-search-tabs
+
+    ;; Using find
+    ;;
+    ;; TODO
+
+    ;; Navigating history
+    "H" 'xwidget-webkit-back
+    "L" 'xwidget-webkit-forward
+
+    ;; Manipulating tabs (actually buffers)
+    ;;
+    ;; Only `new-tab' and `close-tab' are supported.
+    "t" 'evil-collection-xwidget-webkit-new-tab
+    "X" 'evil-collection-xwidget-webkit-restore-last-closed-tab
+
+    ;; Miscellaneous
+    "?" 'describe-mode
+
+    ;; Evil style
+
+    "<" 'xwidget-webkit-back
+    ">" 'xwidget-webkit-forward
+
+    ;; Additional bindings to browse url.
+    "gu" 'xwidget-webkit-browse-url
+    "J" 'xwidget-webkit-browse-url
+
+    ;; Additional binding to browse tabs.
+    "gt" 'evil-collection-xwidget-webkit-search-tabs
+
+    (kbd "C-f") 'xwidget-webkit-scroll-up
+    (kbd "C-b") 'xwidget-webkit-scroll-down
+
+    )
+
+  (when evil-want-C-d-scroll
+    (evil-collection-define-key 'normal 'xwidget-webkit-mode-map
+      (kbd "C-d") 'xwidget-webkit-scroll-up))
+  (when evil-want-C-u-scroll
+    (evil-collection-define-key 'normal 'xwidget-webkit-mode-map
+      (kbd "C-u") 'xwidget-webkit-scroll-down))
+
+  (evil-collection-bind 'xwidget-webkit-mode-map
+                        'action 'xwidget-webkit-insert-string
+                        'refresh 'xwidget-webkit-reload
+                        'browse-url 'xwidget-webkit-browse-url
+                        'zoom-in  'xwidget-webkit-zoom-in
+                        'zoom-out 'xwidget-webkit-zoom-out
+                        'delete-2 'evil-collection-xwidget-webkit-close-tab))
+
+(provide 'evil-collection-xwidget)
+;;; evil-collection-xwidget.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xwidget/evil-collection-xwidget.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xwidget/evil-collection-xwidget.elc
new file mode 100644
index 0000000..c7f6593
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/xwidget/evil-collection-xwidget.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/yaml-mode/README.org b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/yaml-mode/README.org
new file mode 100644
index 0000000..33d13ad
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/yaml-mode/README.org
@@ -0,0 +1,15 @@
+* yaml-mode
+
+  Evil setup for [[https://github.com/yoshiki/yaml-mode][yaml-mode]].
+
+  No keys are rebound. =evil-shift-width= is set buffer-locally to
+  =yaml-indent-offset= so that =>>= / =<<= produce indentation that
+  matches yaml-mode's own electric keys.
+
+** New commands
+
+   | Command                                          | Purpose                                         |
+   |--------------------------------------------------+-------------------------------------------------|
+   | =evil-collection-yaml-mode-set-evil-shift-width= | Set =evil-shift-width= to =yaml-indent-offset=. |
+
+   Installed on =yaml-mode-hook=.
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/yaml-mode/evil-collection-yaml-mode.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/yaml-mode/evil-collection-yaml-mode.el
new file mode 100644
index 0000000..9b11bc0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/yaml-mode/evil-collection-yaml-mode.el
@@ -0,0 +1,42 @@
+;;; evil-collection-yaml-mode.el --- Bindings for `yaml-mode' -*- lexical-binding: t -*-
+
+;; Author: Frédéric Giquel
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: emacs, tools, yaml
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for `yaml-mode'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'yaml-mode nil t)
+
+(defconst evil-collection-yaml-mode-maps nil)
+
+(defvar yaml-indent-offset)
+(defun evil-collection-yaml-mode-set-evil-shift-width ()
+  "Set `evil-shift-width' according to `yaml-indent-offset'."
+  (setq-local evil-shift-width yaml-indent-offset))
+
+;;;###autoload
+(defun evil-collection-yaml-mode-setup ()
+  "Set up `evil' bindings for `yaml'."
+  (add-hook 'yaml-mode-hook #'evil-collection-yaml-mode-set-evil-shift-width))
+
+(provide 'evil-collection-yaml-mode)
+;;; evil-collection-yaml-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/yaml-mode/evil-collection-yaml-mode.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/yaml-mode/evil-collection-yaml-mode.elc
new file mode 100644
index 0000000..4ac57bb
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/yaml-mode/evil-collection-yaml-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/youtube-dl/evil-collection-youtube-dl.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/youtube-dl/evil-collection-youtube-dl.el
new file mode 100644
index 0000000..5c3eb42
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/youtube-dl/evil-collection-youtube-dl.el
@@ -0,0 +1,63 @@
+;;; evil-collection-youtube-dl.el --- Evil bindings for youtube-dl -*- lexical-binding: t -*-
+
+;; Copyright (C) 2018 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>, Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, youtube, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for youtube-dl.
+
+;;; Code:
+(require 'evil-collection)
+(require 'youtube-dl nil t)
+
+(defvar youtube-dl-list-mode-map)
+
+(defconst evil-collection-youtube-dl-maps '(youtube-dl-list-mode-map))
+
+;;;###autoload
+(defun evil-collection-youtube-dl-setup ()
+  "Set up `evil' bindings for `youtube-dl'."
+
+  (evil-collection-set-readonly-bindings 'youtube-dl-list-mode-map)
+  (evil-collection-define-key 'normal 'youtube-dl-list-mode-map
+    "p" 'youtube-dl-list-toggle-pause
+    "s" 'youtube-dl-list-toggle-slow
+    "S" 'youtube-dl-list-toggle-slow-all
+    "y" 'youtube-dl-list-yank
+
+    "i" 'youtube-dl-list-log
+    "I" 'youtube-dl-list-kill-log
+
+    "a" 'youtube-dl
+    "d" 'youtube-dl-list-kill)
+
+  (evil-collection-bind 'youtube-dl-list-mode-map
+                        'scroll-up 'scroll-down-command
+                        'next-item 'youtube-dl-list-priority-down
+                        'prev-item 'youtube-dl-list-priority-up
+                        'next-section 'youtube-dl-list-priority-down
+                        'prev-section 'youtube-dl-list-priority-up
+                        'describe-mode 'describe-mode
+                        'refresh 'youtube-dl-list-redisplay))
+
+(provide 'evil-collection-youtube-dl)
+;;; evil-collection-youtube-dl.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/youtube-dl/evil-collection-youtube-dl.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/youtube-dl/evil-collection-youtube-dl.elc
new file mode 100644
index 0000000..7708689
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/youtube-dl/evil-collection-youtube-dl.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/zmusic/evil-collection-zmusic.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/zmusic/evil-collection-zmusic.el
new file mode 100644
index 0000000..cac7483
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/zmusic/evil-collection-zmusic.el
@@ -0,0 +1,49 @@
+;;; evil-collection-zmusic.el --- Bindings for `zmusic' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020 Carla Cao
+
+;; Author: Carla Cao <ccao001@gmail.com>
+;; Maintainer: James Nguyen <james@jojojames.com>
+;; Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, emacs, tools, minimalist, presentation
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; Bindings for`zmusic'.
+
+;;; Code:
+(require 'evil-collection)
+(require 'zmusic nil t) 
+
+(defvar zmusic-mode-map) 
+
+(defconst evil-collection-zmusic-maps '(zmusic-mode-map))
+
+;;;###autoload
+(defun evil-collection-zmusic-setup ()
+  "Set up `evil' bindings for `zmusic'."
+  (evil-collection-define-key 'normal 'zmusic-mode-map
+    "j" 'zmusic/next-beat
+    "k" 'zmusic/previous-beat
+    "h" 'zmusic/backward-degree
+    "l" 'zmusic/forward-degree
+    "d" 'zmusic/kill-beat)
+  (evil-collection-bind 'zmusic-mode-map 'action 'zmusic/toggle-play))
+
+(provide 'evil-collection-zmusic)
+;;; evil-collection-zmusic.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/zmusic/evil-collection-zmusic.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/zmusic/evil-collection-zmusic.elc
new file mode 100644
index 0000000..08808d0
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/zmusic/evil-collection-zmusic.elc differ
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ztree/evil-collection-ztree.el b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ztree/evil-collection-ztree.el
new file mode 100644
index 0000000..fe83a8a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ztree/evil-collection-ztree.el
@@ -0,0 +1,66 @@
+;;; evil-collection-ztree.el --- Evil bindings for ztree -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Pierre Neidhardt
+
+;; Author: Pierre Neidhardt <mail@ambrevar.xyz>
+;; Maintainer: James Nguyen <james@jojojames.com>, Pierre Neidhardt <mail@ambrevar.xyz>
+;; URL: https://github.com/emacs-evil/evil-collection
+;; Version: 0.0.1
+;; Package-Requires: ((emacs "29.1"))
+;; Keywords: evil, ztree, tools
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation; either version 3, or (at your
+;; option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; Evil bindings for ztree.
+
+;;; Code:
+(require 'evil-collection)
+(require 'ztree nil t)
+
+(defvar ztree-mode-map)
+(defvar ztreediff-mode-map)
+
+(defconst evil-collection-ztree-maps '(ztree-mode-map ztreediff-mode-map))
+
+;;;###autoload
+(defun evil-collection-ztree-setup ()
+  "Set up `evil' bindings for `ztree'."
+
+  (evil-collection-set-readonly-bindings 'ztree-mode-map)
+  (evil-set-initial-state 'ztree-mode 'normal)
+  (evil-collection-define-key 'normal 'ztree-mode-map
+    (kbd "<tab>") 'ztree-jump-side
+    (kbd "SPC") 'ztree-perform-soft-action
+
+    "x" 'ztree-toggle-expand-subtree)
+  (evil-collection-bind 'ztree-mode-map
+                        'action 'ztree-perform-action
+                        'refresh 'ztree-refresh-buffer)
+
+  (evil-collection-set-readonly-bindings 'ztreediff-mode-map)
+  (evil-set-initial-state 'ztree-mode 'normal)
+  (evil-collection-define-minor-mode-key 'normal 'ztreediff-mode
+    "C" 'ztree-diff-copy
+    "D" 'ztree-diff-simple-diff-files
+    "zH" 'ztree-diff-toggle-show-filtered-files
+    "zh" 'ztree-diff-toggle-show-equal-files)
+
+  (evil-collection-bind-minor-mode 'find-file    'ztreediff-mode 'ztree-diff-view-file)
+  (evil-collection-bind-minor-mode 'refresh      'ztreediff-mode 'ztree-diff-partial-rescan)
+  (evil-collection-bind-minor-mode 'refresh-all  'ztreediff-mode 'ztree-diff-full-rescan)
+  (evil-collection-bind-minor-mode 'delete       'ztreediff-mode 'ztree-diff-delete-file))
+
+(provide 'evil-collection-ztree)
+;;; evil-collection-ztree.el ends here
diff --git a/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ztree/evil-collection-ztree.elc b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ztree/evil-collection-ztree.elc
new file mode 100644
index 0000000..667b5dd
Binary files /dev/null and b/emacs/.emacs.d/elpa/evil-collection-20260818.145/modes/ztree/evil-collection-ztree.elc differ
diff --git a/emacs/.emacs.d/elpa/f-20241003.1131/f-autoloads.el b/emacs/.emacs.d/elpa/f-20241003.1131/f-autoloads.el
new file mode 100644
index 0000000..9bba44f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/f-20241003.1131/f-autoloads.el
@@ -0,0 +1,28 @@
+;;; f-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from f.el
+
+(register-definition-prefixes "f" '("f-"))
+
+;;; End of scraped data
+
+(provide 'f-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; f-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/f-20241003.1131/f-pkg.el b/emacs/.emacs.d/elpa/f-20241003.1131/f-pkg.el
new file mode 100644
index 0000000..2ffdf7e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/f-20241003.1131/f-pkg.el
@@ -0,0 +1,12 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "f" "20241003.1131"
+  "Modern API for working with files and directories."
+  '((emacs "24.1")
+    (s     "1.7.0")
+    (dash  "2.2.0"))
+  :url "https://github.com/rejeep/f.el"
+  :commit "931b6d0667fe03e7bf1c6c282d6d8d7006143c52"
+  :revdesc "931b6d0667fe"
+  :keywords '("files" "directories")
+  :authors '(("Johan Andersson" . "johan.rejeep@gmail.com"))
+  :maintainers '(("Lucien Cartier-Tilet" . "lucien@phundrak.com")))
diff --git a/emacs/.emacs.d/elpa/f-20241003.1131/f-shortdoc.el b/emacs/.emacs.d/elpa/f-20241003.1131/f-shortdoc.el
new file mode 100644
index 0000000..e72fa57
--- /dev/null
+++ b/emacs/.emacs.d/elpa/f-20241003.1131/f-shortdoc.el
@@ -0,0 +1,437 @@
+;;; f-shortdoc.el --- Shortdoc for f.el -*- lexical-binding: t; no-byte-compile: t; -*-
+
+;; Author: Lucien Cartier-Tilet <lucien@phundrak.com>
+;; Maintainer: Lucien Cartier-Tilet <lucien@phundrak.com>
+;; Package-Requires: ((emacs "28.1"))
+;; Homepage: https://github.com/rejeep/f.el
+
+;; This file is not part of GNU Emacs
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+
+;; Shortdoc implementation for f.el
+
+;;; Code:
+
+(when (version<= "28.1" emacs-version)
+  (require 'shortdoc)
+
+  (define-short-documentation-group f
+    "Paths"
+    (f-join
+     :eval (f-join "path")
+     :eval (f-join "path" "to")
+     :eval (f-join "/" "path" "to" "heaven")
+     :eval (f-join "path" "/to" "file"))
+
+    (f-split
+     :eval (f-split "path")
+     :eval (f-split "path/to")
+     :eval (f-split "/path/to/heaven")
+     :eval (f-split "~/back/to/earth"))
+
+    (f-expand
+     :no-eval (f-expand "name")
+     :result-string "/default/directory/name"
+     :no-eval (f-expand "name" "other/directory")
+     :result-string "other/directory/name")
+
+    (f-filename
+     :eval (f-filename "path/to/file.ext")
+     :eval (f-filename "path/to/directory"))
+
+    (f-dirname
+     :eval (f-dirname "path/to/file.ext")
+     :eval (f-dirname "path/to/directory")
+     :eval (f-dirname "/"))
+
+    (f-common-parent
+     :eval (f-common-parent '("foo/bar/baz" "foo/bar/qux" "foo/bar/mux"))
+     :eval (f-common-parent '("/foo/bar/baz" "/foo/bar/qux" "/foo/bax/mux"))
+     :eval (f-common-parent '("foo/bar/baz" "quack/bar/qux" "lack/bar/mux")))
+
+    (f-ext
+     :eval (f-ext "path/to/file")
+     :eval (f-ext "path/to/file.txt")
+     :eval (f-ext "path/to/file.txt.org"))
+
+    (f-no-ext
+     :eval (f-no-ext "path/to/file")
+     :eval (f-no-ext "path/to/file.txt")
+     :eval (f-no-ext "path/to/file.txt.org"))
+
+    (f-swap-ext
+     :eval (f-swap-ext "path/to/file.ext" "org"))
+
+    (f-base
+     :eval (f-base "path/to/file.ext")
+     :eval (f-base "path/to/directory"))
+
+    (f-relative
+     :eval (f-relative "/some/path/relative/to/my/file.txt" "/some/path/")
+     :eval (f-relative "/default/directory/my/file.txt"))
+
+    (f-short
+     :no-eval (f-short "/Users/foo/Code/on/macOS")
+     :result-string "~/Code/on/macOS"
+     :no-eval (f-short "/home/foo/Code/on/linux")
+     :result-string "~/Code/on/linux"
+     :eval (f-short "/path/to/Code/bar"))
+
+    (f-long
+     :eval (f-long "~/Code/bar")
+     :eval (f-long "/path/to/Code/bar"))
+
+    (f-canonical
+     :eval (f-canonical "/path/to/real/file")
+     :no-eval (f-canonical "/link/to/file")
+     :result-string "/path/to/real/file")
+
+    (f-slash
+     :no-eval (f-slash "/path/to/file")
+     :result-string "/path/to/file"
+     :no-eval (f-slash "/path/to/dir")
+     :result-string "/path/to/dir/"
+     :no-eval (f-slash "/path/to/dir/")
+     :result-string "/path/to/dir/")
+
+    (f-full
+     :eval (f-full "~/path/to/file")
+     :eval (f-full "~/path/to/dir")
+     :eval (f-full "~/path/to/dir/"))
+
+    (f-uniquify
+     :eval (f-uniquify '("/foo/bar" "/foo/baz" "/foo/quux"))
+     :eval (f-uniquify '("/foo/bar" "/www/bar" "/foo/quux"))
+     :eval (f-uniquify '("/foo/bar" "/www/bar" "/www/bar/quux"))
+     :eval (f-uniquify '("/foo/bar" "/foo/baz" "/home/www/bar" "/home/www/baz" "/var/foo" "/opt/foo/www/baz")))
+
+    (f-uniquify-alist
+     :eval (f-uniquify-alist '("/foo/bar" "/foo/baz" "/foo/quux"))
+     :eval (f-uniquify-alist '("/foo/bar" "/www/bar" "/foo/quux"))
+     :eval (f-uniquify-alist '("/foo/bar" "/www/bar" "/www/bar/quux"))
+     :eval (f-uniquify-alist '("/foo/bar" "/foo/baz" "/home/www/bar" "/home/www/baz" "/var/foo" "/opt/foo/www/baz")))
+
+    "I/O"
+    (f-read-bytes
+     :no-eval* (f-read-bytes "path/to/binary/data"))
+
+    (f-write-bytes
+     :no-eval* (f-write-bytes (unibyte-string 72 101 108 108 111 32 119 111 114 108 100) "path/to/binary/data"))
+
+    (f-append-bytes
+     :no-eval* (f-append-bytes "path/to/file" (unibyte-string 72 101 108 108 111 32 119 111 114 108 100)))
+
+    (f-read-text
+     :no-eval* (f-read-text "path/to/file.txt" 'utf-8)
+     :no-eval* (f-read "path/to/file.txt" 'utf-8))
+
+    (f-write-text
+     :no-eval* (f-write-text "Hello world" 'utf-8 "path/to/file.txt")
+     :no-eval* (f-write "Hello world" 'utf-8 "path/to/file.txt"))
+
+    (f-append-text
+     :no-eval* (f-append-text "Hello world" 'utf-8 "path/to/file.txt")
+     :no-eval* (f-append "Hello world" 'utf-8 "path/to/file.txt"))
+
+    "Destructive"
+    (f-mkdir
+     :no-eval (f-mkdir "dir")
+     :result-string "creates /default/directory/dir"
+     :no-eval (f-mkdir "other" "dir")
+     :result-string "creates /default/directory/other/dir"
+     :no-eval (f-mkdir "/" "some" "path")
+     :result-string "creates /some/path"
+     :no-eval (f-mkdir "~" "yet" "another" "dir")
+     :result-string "creates ~/yet/another/dir")
+
+    (f-mkdir-full-path
+     :no-eval (f-mkdir-full-path "dir")
+     :result-string "creates /default/directory/dir"
+     :no-eval (f-mkdir-full-path "other/dir")
+     :result-string "creates /default/directory/other/dir"
+     :no-eval (f-mkdir-full-path "/some/path")
+     :result-string "creates /some/path"
+     :no-eval (f-mkdir-full-path "~/yet/another/dir")
+     :result-string "creates ~/yet/another/dir")
+
+    (f-delete
+     :no-eval* (f-delete "dir")
+     :no-eval* (f-delete "other/dir" t)
+     :no-eval* (f-delete "path/to/file.txt"))
+
+    (f-symlink
+     :no-eval* (f-symlink "path/to/source" "path/to/link"))
+
+    (f-move
+     :no-eval* (f-move "path/to/file.txt" "new-file.txt")
+     :no-eval* (f-move "path/to/file.txt" "other/path"))
+
+    (f-copy
+     :no-eval* (f-copy "path/to/file.txt" "new-file.txt")
+     :no-eval* (f-copy "path/to/dir" "other/dir"))
+
+    (f-copy-contents
+     :no-eval* (f-copy-contents "path/to/dir" "path/to/other/dir"))
+
+    (f-touch
+     :no-eval* (f-touch "path/to/existing/file.txt")
+     :no-eval* (f-touch "path/to/non/existing/file.txt"))
+
+    "Predicates"
+    (f-exists-p
+     :no-eval* (f-exists-p "path/to/file.txt")
+     :no-eval* (f-exists-p "path/to/dir"))
+
+    (f-directory-p
+     :no-eval* (f-directory-p "path/to/file.txt")
+     :no-eval* (f-directory-p "path/to/dir"))
+
+    (f-file-p
+     :no-eval* (f-file-p "path/to/file.txt")
+     :no-eval* (f-file-p "path/to/dir"))
+
+    (f-symlink-p
+     :no-eval* (f-symlink-p "path/to/file.txt")
+     :no-eval* (f-symlink-p "path/to/dir")
+     :no-eval* (f-symlink-p "path/to/link"))
+
+    (f-readable-p
+     :no-eval* (f-readable-p "path/to/file.txt")
+     :no-eval* (f-readable-p "path/to/dir"))
+
+    (f-writable-p
+     :no-eval* (f-writable-p "path/to/file.txt")
+     :no-eval* (f-writable-p "path/to/dir"))
+
+    (f-executable-p
+     :no-eval* (f-executable-p "path/to/file.txt")
+     :no-eval* (f-executable-p "path/to/dir"))
+
+    (f-absolute-p
+     :eval (f-absolute-p "path/to/dir")
+     :eval (f-absolute-p "/full/path/to/dir"))
+
+    (f-relative-p
+     :eval (f-relative-p "path/to/dir")
+     :eval (f-relative-p "/full/path/to/dir"))
+
+    (f-root-p
+     :eval (f-root-p "/")
+     :eval (f-root-p "/not/root"))
+
+    (f-ext-p
+     :eval (f-ext-p "path/to/file.el" "el")
+     :eval (f-ext-p "path/to/file.el" "txt")
+     :eval (f-ext-p "path/to/file.el")
+     :eval (f-ext-p "path/to/file"))
+
+    (f-same-p
+     :eval (f-same-p "foo.txt" "foo.txt")
+     :eval (f-same-p "foo/bar/../baz" "foo/baz")
+     :eval (f-same-p "/path/to/foo.txt" "/path/to/bar.txt"))
+
+    (f-parent-of-p
+     :no-eval (f-parent-of-p "/path/to" "/path/to/dir")
+     :result t
+     :no-eval (f-parent-of-p "/path/to/dir" "/path/to")
+     :result nil
+     :no-eval (f-parent-of-p "/path/to" "/path/to")
+     :result nil)
+
+    (f-child-of-p
+     :no-eval (f-child-of-p "/path/to" "/path/to/dir")
+     :result nil
+     :no-eval (f-child-of-p "/path/to/dir" "/path/to")
+     :result t
+     :no-eval (f-child-of-p "/path/to" "/path/to")
+     :result nil)
+
+    (f-ancestor-of-p
+     :no-eval (f-ancestor-of-p "/path/to" "/path/to/dir")
+     :result t
+     :no-eval (f-ancestor-of-p "/path" "/path/to/dir")
+     :result t
+     :no-eval (f-ancestor-of-p "/path/to/dir" "/path/to")
+     :result nil
+     :no-eval (f-ancestor-of-p "/path/to" "/path/to")
+     :result nil)
+
+    (f-descendant-of-p
+     :no-eval (f-descendant-of-p "/path/to/dir" "/path/to")
+     :result t
+     :no-eval (f-descendant-of-p "/path/to/dir" "/path")
+     :result t
+     :no-eval (f-descendant-of-p "/path/to" "/path/to/dir")
+     :result nil
+     :no-eval (f-descendant-of-p "/path/to" "/path/to")
+     :result nil)
+
+    (f-hidden-p
+     :eval (f-hidden-p "path/to/foo")
+     :eval (f-hidden-p ".path/to/foo")
+     :eval (f-hidden-p "path/.to/foo")
+     :eval (f-hidden-p "path/to/.foo")
+     :eval (f-hidden-p ".path/to/foo" 'any)
+     :eval (f-hidden-p "path/.to/foo" 'any)
+     :eval (f-hidden-p "path/to/.foo" 'any)
+     :eval (f-hidden-p ".path/to/foo" 'last)
+     :eval (f-hidden-p "path/.to/foo" 'last)
+     :eval (f-hidden-p "path/to/.foo" 'last))
+
+    (f-empty-p
+     :no-eval (f-empty-p "/path/to/empty-file")
+     :result t
+     :no-eval (f-empty-p "/path/to/file-with-contents")
+     :result nil
+     :no-eval (f-empty-p "/path/to/empty-dir/")
+     :result t
+     :no-eval (f-empty-p "/path/to/dir-with-contents/")
+     :result nil)
+
+    (f-older-p
+     :no-eval (f-older-p "older-file.txt" "newer-file.txt")
+     :result t
+     :no-eval (f-older-p "newer-file.txt" "older-file.txt")
+     :result nil
+     :no-eval (f-older-p "same-time1.txt" "same-time2.txt")
+     :result nil)
+
+    (f-newer-p
+     :no-eval (f-newer-p "newer-file.txt" "older-file.txt")
+     :result t
+     :no-eval (f-newer-p "older-file.txt" "newer-file.txt")
+     :result nil
+     :no-eval (f-newer-p "same-time1.txt" "same-time2.txt")
+     :result nil)
+
+    (f-same-time-p
+     :no-eval (f-same-time-p "same-time1.txt" "same-time2.txt")
+     :result t
+     :no-eval (f-same-time-p "newer-file.txt" "older-file.txt")
+     :result nil
+     :no-eval (f-same-time-p "older-file.txt" "newer-file.txt")
+     :result nil)
+
+    "Stats"
+    (f-size
+     :no-eval* (f-size "path/to/file.txt")
+     :no-eval* (f-size "path/to/dir"))
+
+    (f-depth
+     :eval (f-depth "/")
+     :eval (f-depth "/var/")
+     :eval (f-depth "/usr/local/bin"))
+
+    (f-change-time
+     :no-eval (f-change-time "path/to/file.txt")
+     :result (25517 48756 26337 111000)
+     :no-eval (f-change-time "path/to/dir")
+     :result (25517 57887 344657 210000)
+     :no-eval (f-change-time "path/to/file.txt" t)
+     :result (1672330868026337111 . 1000000000)
+     :no-eval (f-change-time "path/to/dir" t)
+     :result (1672339999344657210 . 1000000000)
+     :no-eval (f-change-time "path/to/file.txt" 'seconds)
+     :result 1672330868
+     :no-eval (f-change-time "path/to/dir" 'seconds)
+     :result 1672339999)
+
+    (f-modification-time
+     :no-eval (f-modification-time "path/to/file.txt")
+     :result (25517 48756 26337 111000)
+     :no-eval (f-modification-time "path/to/dir")
+     :result (25517 57887 344657 210000)
+     :no-eval (f-modification-time "path/to/file.txt" t)
+     :result (1672330868026337111 . 1000000000)
+     :no-eval (f-modification-time "path/to/dir" t)
+     :result (1672339999344657210 . 1000000000)
+     :no-eval (f-modification-time "path/to/file.txt" 'seconds)
+     :result 1672330868
+     :no-eval (f-modification-time "path/to/dir" 'seconds)
+     :result 1672339999)
+
+    (f-access-time
+     :no-eval (f-access-time "path/to/file.txt")
+     :result (25517 48756 26337 111000)
+     :no-eval (f-access-time "path/to/dir")
+     :result (25517 57887 344657 210000)
+     :no-eval (f-access-time "path/to/file.txt" t)
+     :result (1672330868026337111 . 1000000000)
+     :no-eval (f-access-time "path/to/dir" t)
+     :result (1672339999344657210 . 1000000000)
+     :no-eval (f-access-time "path/to/file.txt" 'seconds)
+     :result 1672330868
+     :no-eval (f-access-time "path/to/dir" 'seconds)
+     :result 1672339999)
+
+    "Misc"
+    (f-this-file
+     :no-eval* (f-this-file))
+
+    (f-path-separator
+     :eval (f-path-separator))
+
+    (f-glob
+     :no-eval* (f-glob "path/to/*.el")
+     :no-eval* (f-glob "*.el" "path/to"))
+
+    (f-entries
+     :no-eval* (f-entries "path/to/dir")
+     :no-eval* (f-entries "path/to/dir" (lambda (file) (s-matches? "test" file)))
+     :no-eval* (f-entries "path/to/dir" nil t)
+     :no-eval* (f--entries "path/to/dir" (s-matches? "test" it)))
+
+    (f-directories
+     :no-eval* (f-directories "path/to/dir")
+     :no-eval* (f-directories "path/to/dir" (lambda (dir) (equal (f-filename dir) "test")))
+     :no-eval* (f-directories "path/to/dir" nil t)
+     :no-eval* (f--directories "path/to/dir" (equal (f-filename it) "test")))
+
+    (f-files
+     :no-eval* (f-files "path/to/dir")
+     :no-eval* (f-files "path/to/dir" (lambda (file) (equal (f-ext file) "el")))
+     :no-eval* (f-files "path/to/dir" nil t)
+     :no-eval* (f--files "path/to/dir" (equal (f-ext it) "el")))
+
+    (f-root
+     :eval (f-root))
+
+    (f-traverse-upwards
+     :no-eval* (f-traverse-upwards
+                (lambda (path)
+                  (f-exists? (f-expand ".git" path)))
+                start-path)
+
+     :no-eval* (f--traverse-upwards (f-exists? (f-expand ".git" it)) start-path))
+
+    (f-with-sandbox
+     :no-eval (f-with-sandbox foo-path
+                (f-touch (f-expand "foo" foo-path)))
+     :no-eval (f-with-sandbox (list foo-path bar-path)
+                (f-touch (f-expand "foo" foo-path))
+                (f-touch (f-expand "bar" bar-path)))
+     :no-eval (f-with-sandbox foo-path
+                (f-touch (f-expand "bar" bar-path)))))) ;; "Destructive operation outside sandbox"
+
+(eval-when-compile
+  (when (version< emacs-version "28.1")
+    (warn "Emacs should not be compiling this file")))
+
+(provide 'f-shortdoc)
+
+;;; f-shortdoc.el ends here
diff --git a/emacs/.emacs.d/elpa/f-20241003.1131/f.el b/emacs/.emacs.d/elpa/f-20241003.1131/f.el
new file mode 100644
index 0000000..b5d3821
--- /dev/null
+++ b/emacs/.emacs.d/elpa/f-20241003.1131/f.el
@@ -0,0 +1,800 @@
+;;; f.el --- Modern API for working with files and directories -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2013 Johan Andersson
+
+;; Author: Johan Andersson <johan.rejeep@gmail.com>
+;; Maintainer: Lucien Cartier-Tilet <lucien@phundrak.com>
+;; Package-Version: 20241003.1131
+;; Package-Revision: 931b6d0667fe
+;; Package-Requires: ((emacs "24.1") (s "1.7.0") (dash "2.2.0"))
+;; Keywords: files, directories
+;; Homepage: http://github.com/rejeep/f.el
+
+;; This file is NOT part of GNU Emacs.
+
+;;; License:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
+
+;;; Commentary:
+;;
+;; Much inspired by magnar's excellent s.el and dash.el, f.el is a
+;; modern API for working with files and directories in Emacs.
+
+;;; Code:
+
+
+
+(require 's)
+(require 'dash)
+(when (version<= "28.1" emacs-version)
+  (when (< emacs-major-version 29)
+   (require 'f-shortdoc nil t)))
+
+(put 'f-guard-error 'error-conditions '(error f-guard-error))
+(put 'f-guard-error 'error-message "Destructive operation outside sandbox")
+
+(defvar f--guard-paths nil
+  "List of allowed paths to modify when guarded.
+
+Do not modify this variable.")
+
+(defmacro f--destructive (path &rest body)
+  "If PATH is allowed to be modified, yield BODY.
+
+If PATH is not allowed to be modified, throw error."
+  (declare (indent 1))
+  `(if f--guard-paths
+       (if (--any? (or (f-same-p it ,path)
+                       (f-ancestor-of-p it ,path)) f--guard-paths)
+           (progn ,@body)
+         (signal 'f-guard-error (list ,path f--guard-paths)))
+     ,@body))
+
+
+;;;; Paths
+
+(defun f-join (&rest args)
+  "Join ARGS to a single path.
+
+Be aware if one of the arguments is an absolute path, `f-join'
+will discard all the preceeding arguments and make this absolute
+path the new root of the generated path."
+  (let (path
+        (relative (f-relative-p (car args))))
+    (mapc
+     (lambda (arg)
+       (setq path (cond ((not path) arg)
+                        ((f-absolute-p arg)
+                         (progn
+                           (setq relative nil)
+                           arg))
+                        (t (f-expand arg path)))))
+     args)
+    (if relative (f-relative path) path)))
+
+(defun f-split (path)
+  "Split PATH and return list containing parts."
+  (let ((parts (split-string path (f-path-separator) 'omit-nulls)))
+    (if (string= (s-left 1 path) (f-path-separator))
+        (push (f-path-separator) parts)
+      parts)))
+
+(defun f-expand (path &optional dir)
+  "Expand PATH relative to DIR (or `default-directory').
+PATH and DIR can be either a directory names or directory file
+names.  Return a directory name if PATH is a directory name, and
+a directory file name otherwise.  File name handlers are
+ignored."
+  (let (file-name-handler-alist)
+    (expand-file-name path dir)))
+
+(defun f-filename (path)
+  "Return the name of PATH."
+  (file-name-nondirectory (directory-file-name path)))
+
+(defalias 'f-parent 'f-dirname)
+
+(defun f-dirname (path)
+  "Return the parent directory to PATH."
+  (let ((parent (file-name-directory
+                 (directory-file-name (f-expand path default-directory)))))
+    (unless (f-same-p path parent)
+      (if (f-relative-p path)
+          (f-relative parent)
+        (directory-file-name parent)))))
+
+(defun f-common-parent (paths)
+  "Return the deepest common parent directory of PATHS."
+  (cond
+   ((not paths) nil)
+   ((not (cdr paths)) (f-parent (car paths)))
+   (:otherwise
+    (let* ((paths (-map 'f-split paths))
+           (common (caar paths))
+           (re nil))
+      (while (and (not (null (car paths))) (--all? (equal (car it) common) paths))
+        (setq paths (-map 'cdr paths))
+        (push common re)
+        (setq common (caar paths)))
+      (cond
+       ((null re) "")
+       ((and (= (length re) 1) (f-root-p (car re)))
+        (f-root))
+       (:otherwise
+        (concat (apply 'f-join (nreverse re)) "/")))))))
+
+(defalias 'f-ext 'file-name-extension)
+
+(defalias 'f-no-ext 'file-name-sans-extension)
+
+(defun f-swap-ext (path ext)
+  "Return PATH but with EXT as the new extension.
+EXT must not be nil or empty."
+  (if (s-blank-p ext)
+      (error "Extension cannot be empty or nil")
+    (concat (f-no-ext path) "." ext)))
+
+(defun f-base (path)
+  "Return the name of PATH, excluding the extension of file."
+  (f-no-ext (f-filename path)))
+
+(defalias 'f-relative 'file-relative-name)
+
+(defalias 'f-short 'abbreviate-file-name)
+(defalias 'f-abbrev 'abbreviate-file-name)
+
+(defun f-long (path)
+  "Return long version of PATH."
+  (f-expand path))
+
+(defalias 'f-canonical 'file-truename)
+
+(defun f-slash (path)
+  "Append slash to PATH unless one already.
+
+Some functions, such as `call-process' requires there to be an
+ending slash."
+  (if (f-dir-p path)
+      (file-name-as-directory path)
+    path))
+
+(defun f-full (path)
+  "Return absolute path to PATH, with ending slash."
+  (f-slash (f-long path)))
+
+(defun f--uniquify (paths)
+  "Helper for `f-uniquify' and `f-uniquify-alist'."
+  (let* ((files-length (length paths))
+         (uniq-filenames (--map (cons it (f-filename it)) paths))
+         (uniq-filenames-next (-group-by 'cdr uniq-filenames)))
+    (while (/= files-length (length uniq-filenames-next))
+      (setq uniq-filenames-next
+            (-group-by 'cdr
+                       (--mapcat
+                        (let ((conf-files (cdr it)))
+                          (if (> (length conf-files) 1)
+                              (--map (cons
+                                      (car it)
+                                      (concat
+                                       (f-filename (s-chop-suffix (cdr it)
+                                                                  (car it)))
+                                       (f-path-separator) (cdr it)))
+                                     conf-files)
+                            conf-files))
+                        uniq-filenames-next))))
+    uniq-filenames-next))
+
+(defun f-uniquify (files)
+  "Return unique suffixes of FILES.
+
+This function expects no duplicate paths."
+  (-map 'car (f--uniquify files)))
+
+(defun f-uniquify-alist (files)
+  "Return alist mapping FILES to unique suffixes of FILES.
+
+This function expects no duplicate paths."
+  (-map 'cadr (f--uniquify files)))
+
+
+;;;; I/O
+
+(defun f-read-bytes (path &optional beg end)
+  "Read binary data from PATH.
+
+Return the binary data as unibyte string.  The optional second
+and third arguments BEG and END specify what portion of the file
+to read."
+  (with-temp-buffer
+    (set-buffer-multibyte nil)
+    (setq buffer-file-coding-system 'binary)
+    (insert-file-contents-literally path nil beg end)
+    (buffer-substring-no-properties (point-min) (point-max))))
+
+(defalias 'f-read 'f-read-text)
+(defun f-read-text (path &optional coding)
+  "Read text with PATH, using CODING.
+
+CODING defaults to `utf-8'.
+
+Return the decoded text as multibyte string."
+  (decode-coding-string (f-read-bytes path) (or coding 'utf-8)))
+
+(defalias 'f-write 'f-write-text)
+(defun f-write-text (text coding path)
+  "Write TEXT with CODING to PATH.
+
+TEXT is a multibyte string.  CODING is a coding system to encode
+TEXT with.  PATH is a file name to write to."
+  (f-write-bytes (encode-coding-string text coding) path))
+
+(defun f-unibyte-string-p (s)
+  "Determine whether S is a unibyte string."
+  (not (multibyte-string-p s)))
+
+(defun f-write-bytes (data path)
+  "Write binary DATA to PATH.
+
+DATA is a unibyte string.  PATH is a file name to write to."
+  (f--write-bytes data path nil))
+
+(defalias 'f-append 'f-append-text)
+(defun f-append-text (text coding path)
+  "Append TEXT with CODING to PATH.
+
+If PATH does not exist, it is created."
+  (f-append-bytes (encode-coding-string text coding) path))
+
+(defun f-append-bytes (data path)
+  "Append binary DATA to PATH.
+
+If PATH does not exist, it is created."
+  (f--write-bytes data path :append))
+
+(defun f--write-bytes (data filename append)
+  "Write binary DATA to FILENAME.
+If APPEND is non-nil, append the DATA to the existing contents."
+  (f--destructive filename
+    (unless (f-unibyte-string-p data)
+      (signal 'wrong-type-argument (list 'f-unibyte-string-p data)))
+    (let ((coding-system-for-write 'binary)
+          (write-region-annotate-functions nil)
+          (write-region-post-annotation-function nil))
+      (write-region data nil filename append :silent)
+      nil)))
+
+
+;;;; Destructive
+
+(defun f-mkdir (&rest dirs)
+  "Create directories DIRS.
+
+DIRS should be a successive list of directories forming together
+a full path.  The easiest way to call this function with a fully
+formed path is using `f-split' alongside it:
+
+    (apply #\\='f-mkdir (f-split \"path/to/file\"))
+
+Although it works sometimes, it is not recommended to use fully
+formed paths in the function. In this case, it is recommended to
+use `f-mkdir-full-path' instead."
+  (let (path)
+    (-each
+        dirs
+      (lambda (dir)
+        (setq path (f-expand dir path))
+        (unless (f-directory-p path)
+          (f--destructive path (make-directory path)))))))
+
+(defun f-mkdir-full-path (dir)
+  "Create DIR from a full path.
+
+This function is similar to `f-mkdir' except it can accept a full
+path instead of requiring several successive directory names."
+  (apply #'f-mkdir (f-split dir)))
+
+(defun f-delete (path &optional force)
+  "Delete PATH, which can be file or directory.
+
+If FORCE is t, a directory will be deleted recursively."
+  (f--destructive path
+    (if (or (f-file-p path) (f-symlink-p path))
+        (delete-file path)
+      (delete-directory path force))))
+
+(defun f-symlink (source path)
+  "Create a symlink to SOURCE from PATH."
+  (f--destructive path (make-symbolic-link source path)))
+
+(defun f-move (from to)
+  "Move or rename FROM to TO.
+If TO is a directory name, move FROM into TO."
+  (f--destructive to (rename-file from to t)))
+
+(defun f-copy (from to)
+  "Copy file or directory FROM to TO.
+If FROM names a directory and TO is a directory name, copy FROM
+into TO as a subdirectory."
+  (f--destructive to
+    (if (f-file-p from)
+        (copy-file from to)
+      ;; The behavior of `copy-directory' differs between Emacs 23 and
+      ;; 24 in that in Emacs 23, the contents of `from' is copied to
+      ;; `to', while in Emacs 24 the directory `from' is copied to
+      ;; `to'. We want the Emacs 24 behavior.
+      (if (> emacs-major-version 23)
+          (copy-directory from to)
+        (if (f-dir-p to)
+            (progn
+              (apply 'f-mkdir (f-split to))
+              (let ((new-to (f-expand (f-filename from) to)))
+                (copy-directory from new-to)))
+          (copy-directory from to))))))
+
+(defun f-copy-contents (from to)
+  "Copy contents in directory FROM, to directory TO."
+  (unless (f-exists-p to)
+    (error "Cannot copy contents to non existing directory %s" to))
+  (unless (f-dir-p from)
+    (error "Cannot copy contents as %s is a file" from))
+  (--each (f-entries from)
+    (f-copy it (file-name-as-directory to))))
+
+(defun f-touch (path)
+  "Update PATH last modification date or create if it does not exist."
+  (f--destructive path
+    (if (f-file-p path)
+        (set-file-times path)
+      (f-write-bytes "" path))))
+
+
+;;;; Predicates
+
+(defalias 'f-exists-p 'file-exists-p)
+(defalias 'f-exists? 'file-exists-p)
+
+(defalias 'f-directory-p 'file-directory-p)
+(defalias 'f-directory? 'file-directory-p)
+(defalias 'f-dir-p 'file-directory-p)
+(defalias 'f-dir? 'file-directory-p)
+
+
+(defalias 'f-file-p 'file-regular-p)
+(defalias 'f-file? 'file-regular-p)
+
+(defun f-symlink-p (path)
+  "Return t if PATH is symlink, false otherwise."
+  (not (not (file-symlink-p path))))
+
+(defalias 'f-symlink? 'f-symlink-p)
+
+(defalias 'f-readable-p 'file-readable-p)
+(defalias 'f-readable? 'file-readable-p)
+
+(defalias 'f-writable-p 'file-writable-p)
+(defalias 'f-writable? 'file-writable-p)
+
+(defalias 'f-executable-p 'file-executable-p)
+(defalias 'f-executable? 'file-executable-p)
+
+(defalias 'f-absolute-p 'file-name-absolute-p)
+(defalias 'f-absolute? 'file-name-absolute-p)
+
+(defun f-relative-p (path)
+  "Return t if PATH is relative, false otherwise."
+  (not (f-absolute-p path)))
+
+(defalias 'f-relative? 'f-relative-p)
+
+(defun f-root-p (path)
+  "Return t if PATH is root directory, false otherwise."
+  (not (f-parent path)))
+
+(defalias 'f-root? 'f-root-p)
+
+(defun f-ext-p (path &optional ext)
+  "Return t if extension of PATH is EXT, false otherwise.
+
+If EXT is nil or omitted, return t if PATH has any extension,
+false otherwise.
+
+The extension, in a file name, is the part that follows the last
+'.', excluding version numbers and backup suffixes."
+  (if ext
+      (string= (f-ext path) ext)
+    (not (eq (f-ext path) nil))))
+
+(defalias 'f-ext? 'f-ext-p)
+
+(defalias 'f-equal-p 'f-same-p)
+(defalias 'f-equal? 'f-same-p)
+
+(defun f-same-p (path-a path-b)
+  "Return t if PATH-A and PATH-B are references to same file."
+  (equal
+   (f-canonical (directory-file-name (f-expand path-a)))
+   (f-canonical (directory-file-name (f-expand path-b)))))
+
+(defalias 'f-same? 'f-same-p)
+
+(defun f-parent-of-p (path-a path-b)
+  "Return t if PATH-A is parent of PATH-B."
+  (--when-let (f-parent path-b)
+    (f-same-p path-a it)))
+
+(defalias 'f-parent-of? 'f-parent-of-p)
+
+(defun f-child-of-p (path-a path-b)
+  "Return t if PATH-A is child of PATH-B."
+  (--when-let (f-parent path-a)
+    (f-same-p it path-b)))
+
+(defalias 'f-child-of? 'f-child-of-p)
+
+(defun f-ancestor-of-p (path-a path-b)
+  "Return t if PATH-A is ancestor of PATH-B."
+  (unless (f-same-p path-a path-b)
+    (string-prefix-p (f-full path-a)
+                     (f-full path-b))))
+
+(defalias 'f-ancestor-of? 'f-ancestor-of-p)
+
+(defun f-descendant-of-p (path-a path-b)
+  "Return t if PATH-A is desendant of PATH-B."
+  (unless (f-same-p path-a path-b)
+    (let ((path-a (f-split (f-full path-a)))
+          (path-b (f-split (f-full path-b)))
+          (parent-p t))
+      (while (and path-b parent-p)
+        (if (string= (car path-a) (car path-b))
+            (setq path-a (cdr path-a)
+                  path-b (cdr path-b))
+          (setq parent-p nil)))
+      parent-p)))
+
+(defalias 'f-descendant-of? 'f-descendant-of-p)
+
+(defun f-hidden-p (path &optional behavior)
+  "Return t if PATH is hidden, nil otherwise.
+
+BEHAVIOR controls when a path should be considered as hidden
+depending on its value.  Beware, if PATH begins with \"./\", the
+current dir \".\" will not be considered as hidden.
+
+When BEHAVIOR is nil, it will only check if the path begins with
+a dot, as in .a/b/c, and return t if there is one.  This is the
+old behavior of f.el left as default for backward-compatibility
+purposes.
+
+When BEHAVIOR is ANY, return t if any of the elements of PATH is
+hidden, nil otherwise.
+
+When BEHAVIOR is LAST, return t only if the last element of PATH
+is hidden, nil otherwise.
+
+TODO: Hidden directories and files on Windows are marked
+differently than on *NIX systems.  This should be properly
+implemented."
+  (let ((split-path (f-split path))
+        (check-hidden (lambda (elt)
+                        (and (string= (substring elt 0 1) ".")
+                             (not (member elt '("." "..")))))))
+    (pcase behavior
+      ('any  (-any check-hidden split-path))
+      ('last (apply check-hidden (last split-path)))
+      (otherwise (if (null otherwise)
+                     (funcall check-hidden (car split-path))
+                   (error "Invalid value %S for argument BEHAVIOR" otherwise))))))
+
+(defalias 'f-hidden? 'f-hidden-p)
+
+(defun f-empty-p (path)
+  "If PATH is a file, return t if the file in PATH is empty, nil otherwise.
+If PATH is directory, return t if directory has no files, nil otherwise."
+  (if (f-directory-p path)
+      (equal (f-files path nil t) nil)
+    (= (f-size path) 0)))
+
+(defalias 'f-empty? 'f-empty-p)
+
+
+;;;; Stats
+
+(defun f-size (path)
+  "Return size of PATH.
+
+If PATH is a file, return size of that file.  If PATH is
+directory, return sum of all files in PATH."
+  (if (f-directory-p path)
+      (-sum (-map 'f-size (f-files path nil t)))
+    (nth 7 (file-attributes path))))
+
+(defun f-depth (path)
+  "Return the depth of PATH.
+
+At first, PATH is expanded with `f-expand'.  Then the full path is used to
+detect the depth.
+'/' will be zero depth,  '/usr' will be one depth.  And so on."
+  (- (length (f-split (f-expand path))) 1))
+
+;; For Emacs 28 and below, forward-declare ‘current-time-list’, which was
+;; introduced in Emacs 29.
+(defvar current-time-list)
+
+(defun f--get-time (path timestamp-p fn)
+  "Helper function, get time-related information for PATH.
+Helper for `f-change-time', `f-modification-time',
+`f-access-time'.  It is meant to be called internally, avoid
+calling it manually unless you have to.
+
+If TIMESTAMP-P is non-nil, return the date requested as a
+timestamp.  If the value is \\='seconds, return the timestamp as
+a timestamp with a one-second precision.  Otherwise, the
+timestamp is returned in a (TICKS . HZ) format, see
+`current-time' if using Emacs 29 or newer.
+
+Otherwise, if TIMESTAMP-P is nil, return the default style of
+`current-time'.
+
+FN is the function specified by the caller function to retrieve
+the correct data from PATH."
+      (let* ((current-time-list (not timestamp-p))
+             (date (apply fn (list (file-attributes path))))
+             (emacs29-or-newer-p (version<= "29" emacs-version)))
+        (cond
+         ((and (eq timestamp-p 'seconds) emacs29-or-newer-p)
+          (/ (car date) (cdr date)))
+         ((or (and (not (eq timestamp-p 'seconds)) emacs29-or-newer-p)
+              (and (not timestamp-p) (not emacs29-or-newer-p)))
+          date)
+         ((and (eq timestamp-p 'seconds) (not emacs29-or-newer-p))
+          (+ (* (nth 0 date) (expt 2 16))
+             (nth 1 date)))
+         ((and timestamp-p (not emacs29-or-newer-p))
+          `(,(+ (* (nth 0 date) (expt 2 16) 1000)
+                (* (nth 1 date) 1000)
+                (nth 3 date))
+            . 1000)))))
+
+(defun f-change-time (path &optional timestamp-p)
+  "Return the last status change time of PATH.
+
+The status change time (ctime) of PATH in the same format as
+`current-time'.  For details on TIMESTAMP-P and the format of the
+returned value, see `f--get-time'."
+  (f--get-time path
+               timestamp-p
+               (if (fboundp 'file-attribute-status-change-time)
+                   #'file-attribute-status-change-time
+                 (lambda (f) (nth 6 f)))))
+
+(defun f-modification-time (path &optional timestamp-p)
+  "Return the last modification time of PATH.
+The modification time (mtime) of PATH in the same format as
+`current-time'.  For details on TIMESTAMP-P and the format of the
+returned value, see `f--get-time'."
+  (f--get-time path
+               timestamp-p
+               (if (fboundp 'file-attribute-modification-time)
+                   #'file-attribute-modification-time
+                 (lambda (f) (nth 5 f)))))
+
+(defun f-access-time (path &optional timestamp-p)
+  "Return the last access time of PATH.
+The access time (atime) of PATH is in the same format as
+`current-time'.  For details on TIMESTAMP-P and the format of the
+returned value, see `f--get-time'."
+  (f--get-time path
+               timestamp-p
+               (if (fboundp 'file-attribute-access-time)
+                   #'file-attribute-access-time
+                 (lambda (f) (nth 4 f)))))
+
+(defun f--three-way-compare (a b)
+  "Three way comparison.
+
+Return -1 if A < B.
+Return 0 if A = B.
+Return 1 if A > B."
+  (cond ((< a b) -1)
+        ((= a b) 0)
+        ((> a b) 1)))
+
+;; TODO: How to properly test this function?
+(defun f--date-compare (file other method)
+  "Three-way comparison of the date of FILE and OTHER.
+
+This function can return three values:
+* 1 means FILE is newer than OTHER
+* 0 means FILE and NEWER share the same date
+* -1 means FILE is older than OTHER
+
+The statistics used for the date comparison depends on METHOD.
+When METHOD is null, compare their modification time.  Otherwise,
+compare their change time when METHOD is \\='change, or compare
+their last access time when METHOD is \\='access."
+  (let* ((fn-method (cond
+                     ((eq 'change method) #'f-change-time)
+                     ((eq 'access method) #'f-access-time)
+                     ((null method)       #'f-modification-time)
+                     (t (error "Unknown method %S" method))))
+         (date-file (apply fn-method (list file)))
+         (date-other (apply fn-method (list other)))
+         (dates      (-zip-pair date-file date-other)))
+    (-reduce-from (lambda (acc elt)
+                    (if (= acc 0)
+                        (f--three-way-compare (car elt) (cdr elt))
+                      acc))
+                  0
+                  dates)))
+
+(defun f-older-p (file other &optional method)
+  "Compare if FILE is older than OTHER.
+
+For more info on METHOD, see `f--date-compare'."
+  (< (f--date-compare file other method) 0))
+
+(defalias 'f-older? #'f-older-p)
+
+(defun f-newer-p (file other &optional method)
+  "Compare if FILE is newer than OTHER.
+
+For more info on METHOD, see `f--date-compare'."
+  (> (f--date-compare file other method) 0))
+
+(defalias 'f-newer? #'f-newer-p)
+
+(defun f-same-time-p (file other &optional method)
+  "Check if FILE and OTHER share the same access or modification time.
+
+For more info on METHOD, see `f--date-compare'."
+  (= (f--date-compare file other method) 0))
+
+(defalias 'f-same-time? #'f-same-time-p)
+
+
+;;;; Misc
+
+(defun f-this-file ()
+  "Return path to this file."
+  (cond
+   (load-in-progress load-file-name)
+   ((and (boundp 'byte-compile-current-file) byte-compile-current-file)
+    byte-compile-current-file)
+   (:else (buffer-file-name))))
+
+(defvar f--path-separator nil
+  "A variable to cache result of `f-path-separator'.")
+
+(defun f-path-separator ()
+  "Return path separator."
+  (or f--path-separator
+      (setq f--path-separator (substring (f-join "x" "y") 1 2))))
+
+(defun f-glob (pattern &optional path)
+  "Find PATTERN in PATH."
+  (file-expand-wildcards
+   (f-join (or path default-directory) pattern)))
+
+(defun f--collect-entries (path recursive)
+  (let (result
+        (entries
+         (-reject
+          (lambda (file)
+            (member (f-filename file) '("." "..")))
+          (directory-files path t))))
+    (cond (recursive
+           (mapc
+            (lambda (entry)
+              (if (f-file-p entry)
+                  (setq result (cons entry result))
+                (when (f-directory-p entry)
+                  (setq result (cons entry result))
+                  (if (f-readable-p entry)
+                      (setq result (append result (f--collect-entries entry recursive)))
+                    result))))
+            entries))
+          (t (setq result entries)))
+    result))
+
+(defmacro f--entries (path body &optional recursive)
+  "Anaphoric version of `f-entries'."
+  `(f-entries
+    ,path
+    (lambda (path)
+      (let ((it path))
+        ,body))
+    ,recursive))
+
+(defun f-entries (path &optional fn recursive)
+  "Find all files and directories in PATH.
+
+FN - called for each found file and directory.  If FN returns a thruthy
+value, file or directory will be included.
+RECURSIVE - Search for files and directories recursive."
+  (let ((entries (f--collect-entries path recursive)))
+    (if fn (-select fn entries) entries)))
+
+(defmacro f--directories (path body &optional recursive)
+  "Anaphoric version of `f-directories'."
+  `(f-directories
+    ,path
+    (lambda (path)
+      (let ((it path))
+        ,body))
+    ,recursive))
+
+(defun f-directories (path &optional fn recursive)
+  "Find all directories in PATH.  See `f-entries'."
+  (let ((directories (-select 'f-directory-p (f--collect-entries path recursive))))
+    (if fn (-select fn directories) directories)))
+
+(defmacro f--files (path body &optional recursive)
+  "Anaphoric version of `f-files'."
+  `(f-files
+    ,path
+    (lambda (path)
+      (let ((it path))
+        ,body))
+    ,recursive))
+
+(defun f-files (path &optional fn recursive)
+  "Find all files in PATH.  See `f-entries'."
+  (let ((files (-select 'f-file-p (f--collect-entries path recursive))))
+    (if fn (-select fn files) files)))
+
+(defmacro f--traverse-upwards (body &optional path)
+  "Anaphoric version of `f-traverse-upwards'."
+  `(f-traverse-upwards
+    (lambda (dir)
+      (let ((it dir))
+        ,body))
+    ,path))
+
+(defun f-traverse-upwards (fn &optional path)
+  "Traverse up as long as FN return nil, starting at PATH.
+
+If FN returns a non-nil value, the path sent as argument to FN is
+returned.  If no function callback return a non-nil value, nil is
+returned."
+  (unless path
+    (setq path default-directory))
+  (when (f-relative-p path)
+    (setq path (f-expand path)))
+  (if (funcall fn path)
+      path
+    (unless (f-root-p path)
+      (f-traverse-upwards fn (f-parent path)))))
+
+(defun f-root ()
+  "Return absolute root."
+  (f-traverse-upwards 'f-root-p))
+
+(defmacro f-with-sandbox (path-or-paths &rest body)
+  "Only allow PATH-OR-PATHS and descendants to be modified in BODY."
+  (declare (indent 1))
+  `(let ((paths (if (listp ,path-or-paths)
+                    ,path-or-paths
+                  (list ,path-or-paths))))
+     (unwind-protect
+         (let ((f--guard-paths paths))
+           ,@body)
+       (setq f--guard-paths nil))))
+
+(provide 'f)
+
+;;; f.el ends here
diff --git a/emacs/.emacs.d/elpa/f-20241003.1131/f.elc b/emacs/.emacs.d/elpa/f-20241003.1131/f.elc
new file mode 100644
index 0000000..9ee6ca0
Binary files /dev/null and b/emacs/.emacs.d/elpa/f-20241003.1131/f.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/.dir-locals.el b/emacs/.emacs.d/elpa/forge-20260815.1911/.dir-locals.el
new file mode 100644
index 0000000..94ab372
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/.dir-locals.el
@@ -0,0 +1,19 @@
+((nil
+  (indent-tabs-mode . nil))
+ (emacs-lisp-mode
+  (lisp-indent-local-overrides
+   (cond . 0)
+   (cond-let--thread$ . defun)
+   (interactive . 0)
+   (make-obsolete-variable . 1)
+   (thread-first . defun)
+   (thread-last . defun)))
+ (makefile-mode
+  (indent-tabs-mode . t))
+ (git-commit-mode
+  (git-commit-major-mode . git-commit-elisp-text-mode))
+ (".github/PULL_REQUEST_TEMPLATE"
+  (nil (truncate-lines . nil)))
+ ("CHANGELOG"
+  (nil (fill-column . 70)
+       (mode . display-fill-column-indicator))))
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/dir b/emacs/.emacs.d/elpa/forge-20260815.1911/dir
new file mode 100644
index 0000000..e9289b2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/dir
@@ -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
+* Forge: (forge).               Access Git Forges from Magit.
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-autoloads.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-autoloads.el
new file mode 100644
index 0000000..54532a4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-autoloads.el
@@ -0,0 +1,353 @@
+;;; forge-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from forge.el
+
+(defvar forge-add-default-bindings t "\
+Whether to add Forge's bindings to various Magit keymaps.
+
+If you want to disable this, then you must set this to nil before
+`magit' is loaded.  If you do it before `forge' but after `magit'
+is loaded, then `magit-mode-map' ends up being modified anyway.")
+(with-eval-after-load 'magit-mode (when forge-add-default-bindings (keymap-set magit-mode-map "'" #'forge-dispatch) (keymap-set magit-mode-map "N" #'forge-dispatch) (keymap-set magit-mode-map "<remap> <magit-browse-thing>" #'forge-browse) (keymap-set magit-mode-map "<remap> <magit-copy-thing>" #'forge-copy-url-at-point-as-kill)))
+(with-eval-after-load 'magit-repos (when forge-add-default-bindings (keymap-set magit-repolist-mode-map "N" #'forge-dispatch)))
+(with-eval-after-load 'git-commit (when forge-add-default-bindings (keymap-set git-commit-mode-map "C-c C-v" #'forge-visit-topic)))
+(register-definition-prefixes "forge" '("forge-"))
+
+
+;;; Generated autoloads from forge-bitbucket.el
+
+(register-definition-prefixes "forge-bitbucket" '("forge-bitbucket-repository"))
+
+
+;;; Generated autoloads from forge-client.el
+
+(register-definition-prefixes "forge-client" '("forge--" "ghub--prepare-mutation"))
+
+
+;;; Generated autoloads from forge-commands.el
+
+(autoload 'forge-dispatch "forge-commands" nil t)
+(autoload 'forge-configure "forge-commands" nil t)
+(autoload 'forge-pull "forge-commands" nil t)
+(autoload 'forge-pull-notifications "forge-commands" nil t)
+(autoload 'forge-pull-topic "forge-commands" nil t)
+(autoload 'forge-pull-this-topic "forge-commands" nil t)
+(autoload 'forge-browse-discussions "forge-commands" "\
+Visit the current repository's discussions using a browser." t)
+(autoload 'forge-browse-issues "forge-commands" "\
+Visit the current repository's issues using a browser." t)
+(autoload 'forge-browse-pullreqs "forge-commands" "\
+Visit the current repository's pull-requests using a browser." t)
+(autoload 'forge-browse-topic "forge-commands" "\
+Read a TOPIC and visit it using a browser.
+By default only offer open topics but with a prefix argument
+also offer closed topics.
+
+(fn TOPIC)" t)
+(autoload 'forge-browse-discussion "forge-commands" "\
+Read a DISCUSSION and visit it using a browser.
+By default only offer open discussions but with a prefix argument
+also offer closed issues.
+
+(fn DISCUSSION)" t)
+(autoload 'forge-browse-issue "forge-commands" "\
+Read an ISSUE and visit it using a browser.
+By default only offer open issues but with a prefix argument
+also offer closed issues.
+
+(fn ISSUE)" t)
+(autoload 'forge-browse-pullreq "forge-commands" "\
+Read a PULL-REQUEST and visit it using a browser.
+By default only offer open pull-requests but with a prefix
+argument also offer closed pull-requests.
+
+(fn PULL-REQUEST)" t)
+(autoload 'forge-browse-commit "forge-commands" "\
+Read a COMMIT and visit it using a browser.
+
+(fn COMMIT)" t)
+(autoload 'forge-browse-branch "forge-commands" "\
+Read a BRANCH and visit it using a browser.
+
+(fn BRANCH)" t)
+(autoload 'forge-browse-remote "forge-commands" "\
+Read a REMOTE and visit it using a browser.
+
+(fn REMOTE)" t)
+(autoload 'forge-browse-repository "forge-commands" "\
+Read a REPOSITORY and visit it using a browser.
+
+(fn REPOSITORY)" t)
+(autoload 'forge-browse-blob "forge-commands" "\
+Visit a blob using a browser.
+
+When invoked from a blob- or file-visiting buffer, visit that blob
+without prompting.  If the region is active, try to jump to the marked
+line or lines, and highlight them in the browser.  To what extend that
+is possible depends on the forge.  When the region is not active just
+visit the blob, without trying to jump to the current line.  When
+jumping to a line, always use a commit hash as part of the URL.  From
+a file in the worktree with no active region, instead use the branch
+name as part of the URL, unless a prefix argument is used.
+
+When invoked from a Dired buffer, visit the blob at point without
+prompting. If a prefix argument is used, the commit hash is included
+in the URL.
+
+When invoked from any other buffer, prompt the user for a branch or
+commit, and for a file.
+
+(fn COMMIT FILE &optional LINE END FORCE-HASH)" t)
+(autoload 'forge-browse-this-topic "forge-commands" nil t)
+(autoload 'forge-browse-this-repository "forge-commands" "\
+Visit the repository at point using a browser." t)
+(autoload 'forge-copy-url-at-point-as-kill "forge-commands" "\
+Copy the url of thing at point or the thing visited in the current buffer." t)
+(autoload 'forge-browse "forge-commands" "\
+Visit the thing at point using a browser." t)
+(autoload 'forge-visit-topic "forge-commands" "\
+Read a TOPIC and visit it.
+By default only offer active topics for completion.  With a prefix
+argument offer all topics.  While completion is in progress, \\<forge-read-topic-minibuffer-map>\\[forge-read-topic-lift-limit] lifts
+the limitation to active topics.
+
+(fn TOPIC)" t)
+(autoload 'forge-visit-discussion "forge-commands" "\
+Read a DISCUSSION and visit it.
+By default only offer active topics for completion.  With a prefix
+argument offer all topics.  While completion is in progress, \\<forge-read-topic-minibuffer-map>\\[forge-read-topic-lift-limit] lifts
+the limitation to active topics.
+
+(fn DISCUSSION)" t)
+(autoload 'forge-visit-issue "forge-commands" "\
+Read an ISSUE and visit it.
+By default only offer active issues for completion.  With a prefix
+argument offer all topics.  While completion is in progress, \\<forge-read-topic-minibuffer-map>\\[forge-read-topic-lift-limit] lifts
+the limitation to active issues.
+
+(fn ISSUE)" t)
+(autoload 'forge-visit-pullreq "forge-commands" "\
+Read a PULL-REQUEST and visit it.
+By default only offer active pull-requests for completion.  With a
+prefix argument offer all topics.  While completion is in progress,
+\\<forge-read-topic-minibuffer-map>\\[forge-read-topic-lift-limit] lifts the limitation to active pull-requests.
+
+(fn PULL-REQUEST)" t)
+(autoload 'forge-visit-topic-from-url "forge-commands" "\
+Visit the topic specified by web URL.
+
+(fn URL)" t)
+(autoload 'forge-visit-this-topic "forge-commands" "\
+Visit the topic at point.
+With prefix argument MENU, also show the topic menu.
+
+(fn &optional MENU)" t)
+(autoload 'forge-visit-this-repository "forge-commands" "\
+Visit the repository at point." t)
+(autoload 'forge-branch-pullreq "forge-commands" "\
+Create and configure a new branch from a pull-request.
+Please see the manual for more information.
+
+(fn PULLREQ)" t)
+(autoload 'forge-checkout-pullreq "forge-commands" "\
+Create, configure and checkout a new branch from a pull-request.
+Please see the manual for more information.
+
+(fn PULLREQ)" t)
+(autoload 'forge-checkout-this-pullreq "forge-commands" nil t)
+(autoload 'forge-checkout-worktree "forge-commands" "\
+Create, configure and checkout a new worktree from a pull-request.
+This is like `forge-checkout-pullreq', except that it also
+creates a new worktree.  Please see the manual for more
+information.
+
+(fn PATH PULLREQ)" t)
+(autoload 'forge-push-to-unnamed-pullreq "forge-commands" nil t)
+(autoload 'forge-fork "forge-commands" "\
+Fork the current repository to FORK and add it as a REMOTE.
+
+If the fork already exists, then that isn't an error; the remote
+is added anyway.  Currently this only supports Github and Gitlab.
+
+With prefix argument ALL, fork all branches, not just the default
+branch.  On Gitlab it is not possible to fork only the default.
+
+(fn FORK REMOTE ALL)" t)
+(autoload 'forge-merge "forge-commands" nil t)
+(autoload 'forge-set-default-branch "forge-commands" "\
+Change the default branch on the upstream remote and locally.
+Also update the upstream branches of local branches accordingly." t)
+(autoload 'forge-rename-default-branch "forge-commands" "\
+Rename the default branch on the upstream remote and locally.
+Also update the upstream branches of local branches accordingly." t)
+(autoload 'forge-add-pullreq-refspec "forge-commands" nil t)
+(autoload 'forge-add-repository "forge-commands" nil t)
+(autoload 'forge-add-user-repositories "forge-commands" "\
+Add all of USER's repositories from HOST to the database.
+This may take a while.  Only Github is supported at the moment.
+
+(fn HOST USER)" t)
+(autoload 'forge-add-organization-repositories "forge-commands" "\
+Add all of ORGANIZATION's repositories from HOST to the database.
+This may take a while.  Only Github is supported at the moment.
+
+(fn HOST ORGANIZATION)" t)
+(autoload 'forge-remove-repository "forge-commands" "\
+Remove a repository from the database.
+
+(fn REPOSITORY)" t)
+(autoload 'forge-remove-topic-locally "forge-commands" "\
+Remove a topic from the local database only.
+
+When the region marks multiple topics, then offer to remove them all.
+
+The topic is not removed from the forge and, if it is later modified,
+then it will be added to the database again when fetching all topics.
+
+This is useful for users who only fetch individual topics and want to
+remove the topics they are no longer interested in.  This can also be
+used to remove topics locally, which have already been removed on the
+forge (the service).  Forge (the package) cannot automatically detect
+when that happens, because given how the APIs work, this would be too
+expensive.
+
+(fn TOPIC)" t)
+(autoload 'forge-reset-database "forge-commands" "\
+Move the current database file to the trash.
+This is useful after the database scheme has changed, which will
+happen a few times while the forge functionality is still under
+heavy development." t)
+(register-definition-prefixes "forge-commands" '("forge-"))
+
+
+;;; Generated autoloads from forge-core.el
+
+(register-definition-prefixes "forge-core" '("forge-"))
+
+
+;;; Generated autoloads from forge-db.el
+
+(register-definition-prefixes "forge-db" '("forge-"))
+
+
+;;; Generated autoloads from forge-discussion.el
+
+(register-definition-prefixes "forge-discussion" '("forge-"))
+
+
+;;; Generated autoloads from forge-forgejo.el
+
+(register-definition-prefixes "forge-forgejo" '("forge-forgejo-repository"))
+
+
+;;; Generated autoloads from forge-gitea.el
+
+(register-definition-prefixes "forge-gitea" '("forge-gitea-repository"))
+
+
+;;; Generated autoloads from forge-github.el
+
+(register-definition-prefixes "forge-github" '("forge-"))
+
+
+;;; Generated autoloads from forge-gitlab.el
+
+(register-definition-prefixes "forge-gitlab" '("forge-gitlab-repository"))
+
+
+;;; Generated autoloads from forge-gogs.el
+
+(register-definition-prefixes "forge-gogs" '("forge-gogs-repository"))
+
+
+;;; Generated autoloads from forge-issue.el
+
+(register-definition-prefixes "forge-issue" '("forge-"))
+
+
+;;; Generated autoloads from forge-notify.el
+
+(autoload 'forge-list-notifications "forge-notify" nil t)
+(register-definition-prefixes "forge-notify" '("forge-"))
+
+
+;;; Generated autoloads from forge-post.el
+
+(register-definition-prefixes "forge-post" '("forge-"))
+
+
+;;; Generated autoloads from forge-pullreq.el
+
+(register-definition-prefixes "forge-pullreq" '("forge-"))
+
+
+;;; Generated autoloads from forge-repo.el
+
+(register-definition-prefixes "forge-repo" '("forge-"))
+
+
+;;; Generated autoloads from forge-repos.el
+
+(autoload 'forge-repositories-menu "forge-repos" nil t)
+(autoload 'forge-list-repositories "forge-repos" nil t)
+(autoload 'forge-list-owned-repositories "forge-repos" nil t)
+(register-definition-prefixes "forge-repos" '("forge-"))
+
+
+;;; Generated autoloads from forge-revnote.el
+
+(register-definition-prefixes "forge-revnote" '("forge-revnote"))
+
+
+;;; Generated autoloads from forge-semi.el
+
+(register-definition-prefixes "forge-semi" '("forge-"))
+
+
+;;; Generated autoloads from forge-tablist.el
+
+(register-definition-prefixes "forge-tablist" '("forge--tab"))
+
+
+;;; Generated autoloads from forge-topic.el
+
+(autoload 'forge-topic-menu "forge-topic" nil t)
+(autoload 'forge-topic-state-menu "forge-topic" nil t)
+(autoload 'forge-topic-status-menu "forge-topic" nil t)
+(register-definition-prefixes "forge-topic" '("forge-"))
+
+
+;;; Generated autoloads from forge-topics.el
+
+(autoload 'forge-topics-menu "forge-topics" nil t)
+(autoload 'forge-list-topics "forge-topics" nil t)
+(autoload 'forge-list-discussions "forge-topics" nil t)
+(autoload 'forge-list-issues "forge-topics" nil t)
+(autoload 'forge-list-pullreqs "forge-topics" nil t)
+(autoload 'forge-list-global-topics "forge-topics" nil t)
+(autoload 'forge-list-global-issues "forge-topics" nil t)
+(autoload 'forge-list-global-pullreqs "forge-topics" nil t)
+(register-definition-prefixes "forge-topics" '("forge-"))
+
+;;; End of scraped data
+
+(provide 'forge-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; forge-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-bitbucket.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-bitbucket.el
new file mode 100644
index 0000000..5271ab1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-bitbucket.el
@@ -0,0 +1,46 @@
+;;; forge-bitbucket.el --- Bitbucket support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+
+;;; Class
+
+(defclass forge-bitbucket-repository (forge-noapi-repository)
+  ((issues-url-format         :initform "https://%h/%o/%n/issues")
+   (issue-url-format          :initform "https://%h/%o/%n/issues/%i")
+   ;; The anchor for the issue itself is .../%i#issue-%i
+   (issue-post-url-format     :initform "https://%h/%o/%n/issues/%i#comment-%I")
+   (pullreqs-url-format       :initform "https://%h/%o/%n/pull-requests")
+   (pullreq-url-format        :initform "https://%h/%o/%n/pull-requests/%i")
+   (pullreq-post-url-format   :initform "https://%h/%o/%n/pull-requests/%i#comment-%I")
+   (commit-url-format         :initform "https://%h/%o/%n/commits/%r")
+   (branch-url-format         :initform "https://%h/%o/%n/branch/%r")
+   (remote-url-format         :initform "https://%h/%o/%n/src")
+   (blob-url-format           :initform "https://%h/%o/%n/src/%r/%f")
+   (create-issue-url-format   :initform "https://%h/%o/%n/issues/new")
+   (create-pullreq-url-format :initform "https://%h/%o/%n/pull-requests/new")))
+
+;;; _
+(provide 'forge-bitbucket)
+;;; forge-bitbucket.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-bitbucket.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-bitbucket.elc
new file mode 100644
index 0000000..9161e3c
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-bitbucket.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-client.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-client.el
new file mode 100644
index 0000000..edab8c8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-client.el
@@ -0,0 +1,166 @@
+;;; forge-client.el --- GraphQL and REST support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+
+;;; GraphQL
+
+(cl-defun forge--query ( obj-or-host query variables
+                         &key callback errorback noerror narrow until)
+  (declare (indent defun))
+  (pcase-let ((`(,host ,forge) (forge--host-arguments obj-or-host)))
+    (ghub-query query variables
+      :auth 'forge :host host :forge forge
+      :callback callback :errorback errorback :noerror noerror
+      :narrow narrow :until until)))
+
+(cl-defmacro forge-query ( obj-or-host query variables
+                           &key callback errorback noerror narrow until)
+  (declare (indent defun))
+  `(forge--query ,obj-or-host
+     '(query ,query)
+     ,(forge--prepare-variables variables)
+     :callback ,callback :errorback ,errorback :noerror ,noerror
+     :narrow ,narrow :until ,until))
+
+(cl-defmacro forge-mutate ( obj-or-host mutation variables
+                            &key callback errorback noerror)
+  (declare (indent defun))
+  `(forge--query ,obj-or-host
+     ',(ghub--prepare-mutation mutation)
+     (list (cons 'input ,(forge--prepare-variables variables)))
+     :callback ,callback :errorback ,errorback :noerror ,noerror))
+
+(cl-defmacro forge--mutate-field (topic mutation variables)
+  (declare (indent defun))
+  `(let ((topic ,topic))
+     (forge--query topic
+       ',(ghub--prepare-mutation mutation)
+       (list (cons 'input ,(forge--prepare-variables variables)))
+       :callback (forge--set-field-callback topic))))
+
+;;; REST
+
+(cl-defun forge--rest ( obj-or-host method resource &optional params
+                        &key callback errorback noerror unpaginate)
+  (declare (indent defun))
+  (pcase-let ((`(,host ,forge) (forge--host-arguments obj-or-host)))
+    (ghub-request method
+      (if (cl-typep obj-or-host 'forge-object)
+          (forge--format-resource obj-or-host resource)
+        resource)
+      params
+      :auth 'forge :host host :forge forge
+      :callback callback :errorback errorback :noerror noerror
+      :unpaginate unpaginate)))
+
+(cl-defmacro forge-rest ( obj-or-host method resource &optional params
+                          &key callback errorback noerror unpaginate)
+  (declare (indent defun))
+  `(forge--rest ,obj-or-host ,method ,resource
+     ,(forge--prepare-variables params)
+     :callback ,callback :errorback ,errorback :noerror ,noerror
+     :unpaginate ,unpaginate))
+
+;;; Internal
+
+(defun forge--host-arguments (obj-or-host)
+  (let* ((repo (and (cl-typep obj-or-host 'forge-object)
+                    (forge-get-repository obj-or-host)))
+         (host (if (stringp obj-or-host)
+                   obj-or-host
+                 (oref repo apihost))))
+    (list host (pcase (if repo
+                          (eieio-object-class-name repo)
+                        (nth 3 (cl-find host forge-alist
+                                        :key #'cadr :test #'equal)))
+                 ('forge-github-repository 'github)
+                 ('forge-gitlab-repository 'gitlab)
+                 (_ 'github)))))
+
+(defun ghub--prepare-mutation (mutation &optional var)
+  `(mutation
+    (,mutation
+     [(input ,(if var (intern (format "$%s" var)) '$input)
+             ,(let ((name (symbol-name mutation)))
+                (intern (format "%s%sInput!"
+                                (upcase (substring name 0 1))
+                                (substring name 1)))))]
+     ;; We ignore the payload, but GraphQL requires that at least one
+     ;; field is specified.  On Github this field is available for all
+     ;; mutations.  On Gitlab there is no field that is available for
+     ;; all mutations, but luckily using an invalid fields does not
+     ;; result in an error.
+     clientMutationId)))
+
+(defun forge--prepare-variables (variables)
+  `(delq nil (list ,@(mapcar (lambda (binding)
+                               (pcase-exhaustive binding
+                                 (`(,var ,val)
+                                  `(cons ',var ,val))
+                                 (`(and ,cond (,var ,val))
+                                  `(and ,cond (cons ',var ,val)))))
+                             variables))))
+
+(defun forge--set-field-callback (topic)
+  (let ((repo (forge-get-repository topic)))
+    (cond
+      ((forge-gitlab-repository--eieio-childp repo)
+       ;; TODO Fetch single topic for Gitlab as well.
+       (lambda (&rest _)
+         (forge--pull repo #'forge-refresh-buffer)))
+      ((forge-discussion--eieio-childp topic)
+       ;; See comment in `forge--update-status'.
+       (let ((status (oref topic status)))
+         (lambda (&rest _)
+           (forge--query repo
+             (ghub--graphql-prepare-query
+              forge--github-repository-query
+              `(repository discussions (discussion . ,(oref topic number))))
+             `((owner . ,(oref repo owner))
+               (name  . ,(oref repo name)))
+             :callback (lambda (data)
+                         (forge--update-discussion repo (cdr (cadr (cadr data))))
+                         (oset topic status status)
+                         (forge-refresh-buffer))))))
+      ((lambda (&rest _)
+         (forge--pull-topic (forge-get-repository topic) topic))))))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let"))
+;; End:
+(provide 'forge-client)
+;;; forge-client.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-client.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-client.elc
new file mode 100644
index 0000000..82c8eae
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-client.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-commands.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-commands.el
new file mode 100644
index 0000000..8cfa969
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-commands.el
@@ -0,0 +1,1511 @@
+;;; forge-commands.el --- Commands  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+
+;;; Options
+
+(defcustom forge-add-pullreq-refspec t
+  "Whether the pull-request refspec is added when setting up a repository.
+
+This controls whether running `forge-pull' for the first time in
+a repository also adds a refspec that fetches all pull-requests.
+In repositories with huge numbers of pull-requests you might want
+to not do so, in which case you should set this option to `ask'.
+
+You can also set this to nil and later add the refspec explicitly
+for a repository using the command `forge-add-pullreq-refspec'."
+  :package-version '(forge . "0.2.0")
+  :group 'forge
+  :type '(choice (const :tag "Always add refspec" t)
+                 (const :tag "Ask every time" ask)
+                 (const :tag "Never add refspec" nil)))
+
+(defcustom forge-checkout-worktree-read-directory-function
+  'forge-checkout-worktree-default-read-directory-function
+  "Function used by `forge-checkout-worktree' to read worktree directory.
+Takes the pull-request as only argument and must return a directory."
+  :package-version '(forge . "0.4.0")
+  :group 'forge
+  :type 'function)
+
+;;; Dispatch
+
+;;;###autoload(autoload 'forge-dispatch "forge-commands" nil t)
+(transient-define-prefix forge-dispatch ()
+  "Dispatch a forge command."
+  :transient-non-suffix #'transient--do-call
+  :refresh-suffixes t
+  :environment #'forge--menu-environment
+  :column-widths forge--topic-menus-column-widths
+  [forge--topic-menus-group
+   ["Fetch"
+    ("f f" "all topics"     forge-pull)
+    ("f t" "one topic"      forge-pull-topic)
+    ("f n" "notifications"  forge-pull-notifications)]
+   ["Create"
+    :if (##forge-get-repository :tracked?)
+    ("c d" "discussion"     forge-create-discussion)
+    ("c i" "issue"          forge-create-issue)
+    ("c p" "pull-request"   forge-create-pullreq)
+    ("c u" "pr from issue"  forge-create-pullreq-from-issue)
+    ("c f" "fork or remote" forge-fork)]
+   [:description (lambda ()
+                   (cond
+                     ((forge-get-repository :tracked?) "Actions")
+                     ((or (magit-gitdir) (forge-repository-at-point))
+                      "Forge does not yet track this repository")
+                     ("Not inside a Git repository")))
+    ("/ a" forge-add-repository
+     :description (lambda () (let ((repo (forge-get-repository :stub?)))
+                          (if (or (not repo)
+                                  (eq (oref repo condition) :tracked))
+                              "track some repo"
+                            "track this repository"))))
+    ("c f" "fork this repository" forge-fork
+     :if-not (##forge-get-repository :tracked?))
+    ("/ M" "merge with api" forge-merge
+     :if (##forge-get-repository :tracked?)
+     :level 7)]]
+  [forge--lists-group
+   ["Visit"
+    :inapt-if-not (##forge-get-repository :tracked?)
+    ("v t" "topic"          forge-visit-topic)
+    ("v u" "topic from url" forge-visit-topic-from-url :level 0)
+    ("v d" "discussion"     forge-visit-discussion)
+    ("v i" "issue"          forge-visit-issue)
+    ("v p" "pull-request"   forge-visit-pullreq)]
+   ["Browse"
+    ("b t" "topic"          forge-browse-topic
+     :inapt-if-not (##forge-get-repository :tracked?))
+    ("b i" "issue"          forge-browse-issue
+     :inapt-if-not (##forge-get-repository :tracked?))
+    ("b p" "pull-request"   forge-browse-pullreq
+     :inapt-if-not (##forge-get-repository :tracked?))
+    ("b r" "remote"         forge-browse-remote)
+    ("b I" "issues"         forge-browse-issues)
+    ("b P" "pull-requests"  forge-browse-pullreqs)
+    ""]
+   ["Display"
+    ("-S" forge-toggle-display-in-status-buffer
+     :inapt-if-not forge--buffer-with-topics-sections-p)
+    ("-H" forge-toggle-topic-legend)]]
+  [forge--topic-legend-group])
+
+(transient-augment-suffix forge-dispatch
+  :transient #'transient--do-replace
+  :inapt-if (##eq (oref transient--prefix command) 'forge-dispatch)
+  :inapt-face 'forge-suffix-active)
+
+;;;###autoload(autoload 'forge-configure "forge-commands" nil t)
+(transient-define-prefix forge-configure ()
+  "Configure current repository and global settings."
+  :transient-non-suffix #'transient--do-call
+  :refresh-suffixes t
+  :environment #'forge--menu-environment
+  :column-widths forge--topic-menus-column-widths
+  [forge--topic-menus-group
+   ["Configure"
+    ("R  " forge-add-pullreq-refspec)
+    ("s r" forge-forge.remote)
+    ("s l" forge-forge.graphqlItemLimit)]])
+
+(transient-augment-suffix forge-configure
+  :transient #'transient--do-replace
+  :inapt-if (##eq (oref transient--prefix command) 'forge-configure)
+  :inapt-face 'forge-suffix-active)
+
+;;; Pull
+
+;;;###autoload(autoload 'forge-pull "forge-commands" nil t)
+(transient-define-suffix forge-pull ()
+  "Pull forge topics for the current repository if it is already tracked.
+If the current repository is still untracked locally, or the current
+repository cannot be determined, instead invoke `forge-add-repository'."
+  :description (lambda ()
+                 (if (forge-get-repository :tracked?)
+                     "forge topics"
+                   "new forge repository"))
+  (interactive)
+  (if-let ((repo (forge-get-repository :tracked?)))
+      (forge--pull repo)
+    (transient-setup 'forge-add-repository nil nil
+                     :scope (forge-add-repository--scope))))
+
+(defun forge-read-date (prompt)
+  (require (quote org) nil)
+  (if (fboundp 'org-read-date)
+      (org-read-date nil nil nil prompt)
+    (cl-block nil
+      (while t
+        (let ((str (read-from-minibuffer prompt)))
+          (cond ((string-equal str "")
+                 (cl-return nil))
+                ((string-match-p
+                  "\\`[0-9]\\{4\\}[-/][0-9]\\{2\\}[-/][0-9]\\{2\\}\\'" str)
+                 (cl-return str))))
+        (message "Please enter a date in the format YYYY-MM-DD.")
+        (sit-for 1)))))
+
+(cl-defmethod forge--pull ((repo forge-noapi-repository) &rest _)
+  (forge--msg repo t t "Pulling from REPO is not supported"))
+
+(cl-defmethod forge--pull ((repo forge-unusedapi-repository) &rest _)
+  (magit-git-fetch (oref repo remote) (magit-fetch-arguments)))
+
+(defun forge--maybe-git-fetch (repo &optional buffer)
+  (cond-let
+    ((buffer-live-p buffer)
+     (with-current-buffer buffer
+       (if (and (derived-mode-p 'magit-mode)
+                (forge-repository-equal (forge-get-repository :stub?) repo)
+                (magit-toplevel))
+           (magit-git-fetch (oref repo remote) (magit-fetch-arguments))
+         (magit-refresh-buffer))))
+    ([worktree (forge-get-worktree repo)]
+     (let ((default-directory worktree)
+           (magit-inhibit-refresh t))
+       (magit-git-fetch (oref repo remote) (magit-fetch-arguments))))))
+
+;;;###autoload(autoload 'forge-pull-notifications "forge-commands" nil t)
+(transient-define-suffix forge-pull-notifications ()
+  "Fetch notifications for all repositories from the current forge."
+  :description "forge notifications"
+  (interactive)
+  (if-let ((repo (forge-get-repository :stub?)))
+      (let ((class (eieio-object-class repo)))
+        (if (eq class 'forge-github-repository)
+            (forge--pull-notifications class (oref repo githost))
+          (user-error "Fetching notifications not supported for forge %S"
+                      (oref repo forge))))
+    (forge--pull-notifications 'forge-github-repository "github.com")))
+
+;;;###autoload(autoload 'forge-pull-topic "forge-commands" nil t)
+(transient-define-suffix forge-pull-topic (number)
+  "Read a topic TYPE and NUMBER pull data about it from its forge."
+  :inapt-if-not (lambda () (and (forge-get-repository :tracked?)
+                           (forge--get-github-repository)))
+  (interactive
+    (list (read-number "Pull topic: "
+                       (and$ (forge-current-topic) (oref $ number)))))
+  (forge--pull-topic (forge-get-repository :tracked) number))
+
+;;;###autoload(autoload 'forge-pull-this-topic "forge-commands" nil t)
+(transient-define-suffix forge-pull-this-topic ()
+  "Pull data about the topic at point from its forge."
+  :inapt-if-not #'forge--get-github-repository
+  :description "fetch"
+  (interactive)
+  (let ((topic (forge-current-topic t)))
+    (forge--pull-topic (forge-get-repository topic) topic)))
+
+(cl-defmethod forge--pull-topic ((repo forge-repository) _topic)
+  (error "Fetching an individual topic not implemented for %s"
+         (eieio-object-class repo)))
+
+;;; Browse
+
+;;;###autoload
+(defun forge-browse-discussions ()
+  "Visit the current repository's discussions using a browser."
+  (interactive)
+  (browse-url (forge--format (forge-get-repository :stub)
+                             'discussions-url-format)))
+
+;;;###autoload
+(defun forge-browse-issues ()
+  "Visit the current repository's issues using a browser."
+  (interactive)
+  (browse-url (forge--format (forge-get-repository :stub)
+                             'issues-url-format)))
+
+;;;###autoload
+(defun forge-browse-pullreqs ()
+  "Visit the current repository's pull-requests using a browser."
+  (interactive)
+  (browse-url (forge--format (forge-get-repository :stub)
+                             'pullreqs-url-format)))
+
+;;;###autoload
+(defun forge-browse-topic (topic)
+  "Read a TOPIC and visit it using a browser.
+By default only offer open topics but with a prefix argument
+also offer closed topics."
+  (interactive (list (forge-read-topic "Browse topic")))
+  (forge--browse-topic topic))
+
+;;;###autoload
+(defun forge-browse-discussion (discussion)
+  "Read a DISCUSSION and visit it using a browser.
+By default only offer open discussions but with a prefix argument
+also offer closed issues."
+  (interactive (list (forge-read-discussion "Browse discussion")))
+  (forge--browse-topic discussion))
+
+;;;###autoload
+(defun forge-browse-issue (issue)
+  "Read an ISSUE and visit it using a browser.
+By default only offer open issues but with a prefix argument
+also offer closed issues."
+  (interactive (list (forge-read-issue "Browse issue")))
+  (forge--browse-topic issue))
+
+;;;###autoload
+(defun forge-browse-pullreq (pull-request)
+  "Read a PULL-REQUEST and visit it using a browser.
+By default only offer open pull-requests but with a prefix
+argument also offer closed pull-requests."
+  (interactive (list (forge-read-pullreq "Browse pull-request")))
+  (forge--browse-topic pull-request))
+
+(defun forge--browse-topic (topic)
+  (let ((obj (forge-get-topic topic)))
+    (browse-url (forge-get-url obj))
+    (forge-topic-mark-read obj)))
+
+;;;###autoload
+(defun forge-browse-commit (commit)
+  "Read a COMMIT and visit it using a browser."
+  (interactive
+    (list (or (magit-completing-read "Browse commit"
+                                     (magit-list-branch-names)
+                                     nil nil nil 'magit-revision-history
+                                     (magit-branch-or-commit-at-point))
+              (user-error "Nothing selected"))))
+  (browse-url (forge-get-url :commit commit)))
+
+;;;###autoload
+(defun forge-browse-branch (branch)
+  "Read a BRANCH and visit it using a browser."
+  (interactive (list (magit-read-branch "Browse branch")))
+  (browse-url (forge-get-url :branch branch)))
+
+;;;###autoload
+(defun forge-browse-remote (remote)
+  "Read a REMOTE and visit it using a browser."
+  (interactive (list (magit-read-remote "Browse remote" nil t)))
+  (browse-url (forge-get-url :remote remote)))
+
+;;;###autoload
+(defun forge-browse-repository (repository)
+  "Read a REPOSITORY and visit it using a browser."
+  (interactive (list (forge-read-repository "Browse repository")))
+  (browse-url (forge-get-url repository)))
+
+;;;###autoload
+(defun forge-browse-blob (commit file &optional line end force-hash)
+  "Visit a blob using a browser.
+
+When invoked from a blob- or file-visiting buffer, visit that blob
+without prompting.  If the region is active, try to jump to the marked
+line or lines, and highlight them in the browser.  To what extend that
+is possible depends on the forge.  When the region is not active just
+visit the blob, without trying to jump to the current line.  When
+jumping to a line, always use a commit hash as part of the URL.  From
+a file in the worktree with no active region, instead use the branch
+name as part of the URL, unless a prefix argument is used.
+
+When invoked from a Dired buffer, visit the blob at point without
+prompting. If a prefix argument is used, the commit hash is included
+in the URL.
+
+When invoked from any other buffer, prompt the user for a branch or
+commit, and for a file."
+  (interactive (forge--browse-blob-args))
+  (browse-url (forge-get-url :blob commit file line end force-hash)))
+
+;;;###autoload(autoload 'forge-browse-this-topic "forge-commands" nil t)
+(transient-define-suffix forge-browse-this-topic ()
+  "Visit the topic at point using a browser."
+  :description "browse"
+  (interactive)
+  (forge-browse-topic (forge-current-topic t)))
+
+;;;###autoload
+(defun forge-browse-this-repository ()
+  "Visit the repository at point using a browser."
+  (interactive)
+  (forge-browse-repository (forge-repository-at-point t)))
+
+;;;###autoload
+(defun forge-copy-url-at-point-as-kill ()
+  "Copy the url of thing at point or the thing visited in the current buffer."
+  (interactive)
+  (if-let ((target (forge--browse-target)))
+      (let ((url (if (stringp target) target (forge-get-url target))))
+        (kill-new url)
+        (message "Copied \"%s\"" url))
+    (user-error "Nothing at point with a URL")))
+
+;;;###autoload
+(defun forge-browse ()
+  "Visit the thing at point using a browser."
+  (interactive)
+  (if-let ((target (forge--browse-target)))
+      (if (stringp target)
+          (browse-url target)
+        (browse-url (forge-get-url target))
+        (when (cl-typep target 'forge-topic)
+          (forge-topic-mark-read target)))
+    (user-error "Nothing to browse here")))
+
+(defun forge--browse-target ()
+  (or (and$ (magit--painted-branch-at-point) (forge-get-url :branch $))
+      (and$ (magit-commit-at-point)          (forge-get-url :commit $))
+      (and$ (magit-branch-at-point)          (forge-get-url :branch $))
+      (and$ (magit-remote-at-point)          (forge-get-url :remote $))
+      (and$ (magit-file-at-point)            (forge-get-url :blob nil $))
+      (forge-post-at-point)
+      (forge-current-topic)
+      (and (or magit-buffer-file-name
+               buffer-file-name
+               (derived-mode-p 'dired-mode))
+           (apply #'forge-get-url :blob (forge--browse-blob-args)))
+      (and magit-buffer-revision
+           (forge-get-url :commit magit-buffer-revision))
+      (forge-get-repository :stub?)))
+
+(defun forge--browse-blob-args ()
+  (cond
+    (magit-buffer-file-name
+     `(,(or magit-buffer-refname magit-buffer-revision)
+       ,(magit-file-relative-name magit-buffer-file-name)
+       ,@(or (magit-file-region-line-numbers) (list nil nil))
+       ,current-prefix-arg))
+    (buffer-file-name
+     `(nil
+       ,(magit-file-relative-name buffer-file-name)
+       ,@(or (magit-file-region-line-numbers) (list nil nil))
+       ,current-prefix-arg))
+    ((derived-mode-p 'dired-mode)
+     `(nil
+       ,(magit-file-relative-name (dired-get-filename))
+       nil nil ,current-prefix-arg))
+    ((let ((commit (magit-read-local-branch-or-commit
+                    "Browse file from commit")))
+       (list commit (magit-read-file-from-rev commit "Browse file"))))))
+
+;;;; Urls
+
+(cl-defgeneric forge-get-url (obj)
+  "Return the URL for a forge object.")
+
+(cl-defmethod forge-get-url ((disc forge-discussion))
+  (forge--format disc 'discussion-url-format))
+
+(cl-defmethod forge-get-url ((issue forge-issue))
+  (forge--format issue 'issue-url-format))
+
+(cl-defmethod forge-get-url ((pullreq forge-pullreq))
+  (forge--format pullreq 'pullreq-url-format))
+
+(cl-defmethod forge-get-url ((repo forge-repository))
+  (forge--format repo 'remote-url-format))
+
+(cl-defmethod forge-get-url ((_(eql :commit)) commit)
+  (when (member commit '(nil "{worktree}" "{index}"))
+    (setq commit (or (magit-get-current-branch) "HEAD")))
+  (let ((repo (forge-get-repository :stub)))
+    (cond-let*
+      ((magit-list-containing-branches
+        commit "-r" (concat (oref repo remote) "/*")))
+      ([branch (car (magit-list-containing-branches commit "-r"))]
+       [remote (car (magit-split-branch-name branch))]
+       (setq repo (forge-get-repository :stub remote)))
+      ((message "%s does not appear to be available on any remote.  %s"
+                commit "You might have to push it first.")))
+    (forge--format repo 'commit-url-format
+                   `((?r . ,(magit-commit-p commit))))))
+
+(cl-defmethod forge-get-url ((_(eql :blob)) commit file
+                             &optional line end force-hash)
+  (cl-assert (stringp file))
+  (when (member commit '(nil "{worktree}" "{index}"))
+    (setq commit (or (magit-get-current-branch) "HEAD")))
+  (let* ((commit (or (and (magit-branch-p commit)
+                          (cdr (magit-split-branch-name commit)))
+                     (magit-commit-p commit)
+                     (and (not (or line force-hash))
+                          (magit-get-current-branch))
+                     (magit-rev-parse "HEAD")))
+         (repo   (forge-get-repository :stub))
+         (format (oref repo blob-url-format)))
+    (when (cl-typep repo 'forge-gitweb-repository)
+      (setq commit (concat (if (magit-branch-p commit) "hb=" "h=") commit)))
+    (concat
+     (forge--format repo format `((?r . ,commit) (?f . ,file)))
+     (and line (forge-format-blob-lines repo line
+                                        (and (not (equal line end)) end))))))
+
+(cl-defmethod forge-get-url ((_(eql :branch)) branch)
+  (cl-assert (stringp branch))
+  (let (remote)
+    (cond ((magit-remote-branch-p branch)
+           (pcase-setq `(,remote . ,branch) (magit-split-branch-name branch)))
+          ((not (setq remote (or (magit-get-push-remote branch)
+                                 (magit-get-upstream-remote branch))))
+           (user-error "Cannot determine remote for %s" branch)))
+    (forge--format (forge-get-repository :stub remote)
+                   'branch-url-format
+                   `((?r . ,branch)))))
+
+(cl-defmethod forge-get-url ((_(eql :remote)) remote)
+  (cl-assert (stringp remote))
+  (forge--format (forge-get-repository :stub remote) 'remote-url-format))
+
+(cl-defmethod forge-get-url ((post forge-post))
+  (forge--format post (let ((topic (forge-get-parent post)))
+                        (cond ((forge--childp topic 'forge-discussion)
+                               'discussion-post-url-format)
+                              ((forge--childp topic 'forge-issue)
+                               'issue-post-url-format)
+                              ((forge--childp topic 'forge-pullreq)
+                               'pullreq-post-url-format)))))
+
+(cl-defmethod forge-get-url ((notify forge-notification))
+  (oref notify url))
+
+;; Transitional kludge for the infamous package.el defect.
+(require 'forge-forgejo)
+
+(cl-defmethod forge-format-blob-lines ((repo forge-repository) line end)
+  (cl-etypecase repo ;Third-party classes require separate methods.
+    ((or forge-github-repository
+         forge-gitlab-repository ;Also supports "#L%s-%s".
+         forge-forgejo-repository
+         forge-gitea-repository
+         forge-gogs-repository)
+     (format (if end "#L%s-L%s" "#L%s") line end))
+    (forge-bitbucket-repository
+     (format (if end "#lines-%s:%s" "#lines-%s") line end))
+    ((or forge-cgit-repository
+         forge-cgit*-repository
+         forge-cgit**-repository)
+     (format "#n%s" line))
+    ((or forge-gitweb-repository
+         forge-repoorcz-repository
+         forge-stagit-repository)
+     (format "#l%s" line))
+    (forge-srht-repository
+     (format "#L%s" line))))
+
+;;; Visit
+
+;;;###autoload
+(defun forge-visit-topic (topic)
+  "Read a TOPIC and visit it.
+By default only offer active topics for completion.  With a prefix
+argument offer all topics.  While completion is in progress, \
+\\<forge-read-topic-minibuffer-map>\\[forge-read-topic-lift-limit] lifts
+the limitation to active topics."
+  (interactive (list (forge-read-topic "View topic")))
+  (forge-topic-setup-buffer (forge-get-topic topic)))
+
+;;;###autoload
+(defun forge-visit-discussion (discussion)
+  "Read a DISCUSSION and visit it.
+By default only offer active topics for completion.  With a prefix
+argument offer all topics.  While completion is in progress, \
+\\<forge-read-topic-minibuffer-map>\\[forge-read-topic-lift-limit] lifts
+the limitation to active topics."
+  (interactive (list (forge-read-discussion "View discussion")))
+  (forge-topic-setup-buffer (forge-get-discussion discussion)))
+
+;;;###autoload
+(defun forge-visit-issue (issue)
+  "Read an ISSUE and visit it.
+By default only offer active issues for completion.  With a prefix
+argument offer all topics.  While completion is in progress, \
+\\<forge-read-topic-minibuffer-map>\\[forge-read-topic-lift-limit] lifts
+the limitation to active issues."
+  (interactive (list (forge-read-issue "View issue")))
+  (forge-topic-setup-buffer (forge-get-issue issue)))
+
+;;;###autoload
+(defun forge-visit-pullreq (pull-request)
+  "Read a PULL-REQUEST and visit it.
+By default only offer active pull-requests for completion.  With a
+prefix argument offer all topics.  While completion is in progress,
+\\<forge-read-topic-minibuffer-map>\\[forge-read-topic-lift-limit] \
+lifts the limitation to active pull-requests."
+  (interactive (list (forge-read-pullreq "View pull-request")))
+  (forge-topic-setup-buffer (forge-get-pullreq pull-request)))
+
+;;;###autoload
+(defun forge-visit-topic-from-url (url)
+  "Visit the topic specified by web URL."
+  (interactive (list (read-string "Topic URL: ")))
+  (if (string-match
+       "/\\(issues\\|pull\\|discussions\\|merge_requests\\)/\\([0-9]+\\)\\'"
+       url)
+      (forge-topic-setup-buffer
+       (forge-get-topic (forge-get-repository
+                         (substring url 0 (match-beginning 1))
+                         nil :tracked)
+                        (string-to-number (match-string 2 url))))
+    (user-error "Not recognized as a topic URL: %s" url)))
+
+;;;###autoload
+(defun forge-visit-this-topic (&optional menu)
+  "Visit the topic at point.
+With prefix argument MENU, also show the topic menu."
+  (interactive (list current-prefix-arg))
+  (forge-topic-setup-buffer (forge-topic-at-point))
+  (cond
+    ((eq transient-current-command 'forge-topic-menu)
+     (setq forge--quit-keep-topic-menu t))
+    ((or menu
+         (memq transient-current-command
+               '(forge-topics-menu forge-notifications-menu)))
+     (transient-setup 'forge-topic-menu))))
+
+;;;###autoload
+(defun forge-visit-this-repository ()
+  "Visit the repository at point."
+  (interactive)
+  (let* ((repo (forge-repository-at-point))
+         (worktree (forge-get-worktree repo)))
+    (cond
+      ((and (eq transient-current-command 'forge-repositories-menu)
+            (forge-get-repository repo nil :tracked?))
+       (cond-let
+         ([buffer (get-buffer (forge-topics-buffer-name repo))]
+          (switch-to-buffer buffer)
+          (transient-setup 'forge-topics-menu))
+         ((forge-list-topics repo))))
+      (worktree
+       (magit-status-setup-buffer worktree))
+      ((forge-get-repository repo nil :tracked?)
+       (forge-list-topics repo))
+      ((user-error "Not tracked and location of clone is unknown")))))
+
+;;; Create
+
+(defun forge-create-discussion (category)
+  "Create a new discussion for the current repository."
+  (interactive
+    (list (forge-read-topic-category nil "Category for new discussion")))
+  (forge--setup-post-buffer 'new-discussion #'forge--submit-create-discussion
+    "new-discussion" "Create new discussion on %p"
+    `((forge--buffer-category ,category))))
+
+(defun forge-create-issue (template)
+  "Create a new issue for the current repository."
+  (interactive (list (forge--topic-template nil 'forge-issue)))
+  (let-alist template
+    (pcase-exhaustive .type
+      ('redirect (browse-url .url))
+      ('forge-discussion (forge-create-discussion .category))
+      ('forge-issue
+       (forge--setup-post-buffer 'new-issue #'forge--submit-create-issue
+         "new-issue" "Create new issue on %p"
+         `((forge--buffer-template ,template)))))))
+
+(defun forge-create-pullreq (source target)
+  "Create a new pull-request for the current repository."
+  (interactive (forge-create-pullreq--read-args))
+  (forge--setup-post-buffer 'new-pullreq #'forge--submit-create-pullreq
+    "new-pullreq" "Create new pull-request on %p"
+    `((forge--buffer-base-branch ,target)
+      (forge--buffer-head-branch ,source)
+      (forge--buffer-template    ,(forge--topic-template nil 'forge-pullreq)))))
+
+(transient-define-suffix forge-create-pullreq-from-issue (issue source target)
+  "Convert an existing ISSUE into a pull-request."
+  :description "convert to pull-request"
+  :if (lambda ()
+        (and (forge--get-github-repository)
+             (let ((issue (forge-current-issue)))
+               (and issue (eq (oref issue state) 'open)
+                    issue))))
+  (interactive (cons (forge-read-open-issue "Convert issue")
+                     (forge-create-pullreq--read-args)))
+  (setq issue (forge-get-issue issue))
+  (forge--create-pullreq-from-issue (forge-get-repository issue)
+                                    issue source target))
+
+(defun forge-create-pullreq--read-args ()
+  (let* ((repo (forge-get-repository :tracked))
+         (_ (unless (oref repo worktree)
+              (user-error "Cannot create pull-request without working tree")))
+         (source  (magit-completing-read
+                   "Source branch"
+                   (magit-list-remote-branch-names)
+                   nil t nil 'magit-revision-history
+                   (or (and$ (magit-branch-at-point)
+                             (if (magit-remote-branch-p $)
+                                 $
+                               (magit-get-push-branch $ t)))
+                       (and$ (magit-get-current-branch)
+                             (if (magit-remote-branch-p $)
+                                 $
+                               (magit-get-push-branch $ t))))))
+         (remote  (oref repo remote))
+         (targets (delete source (magit-list-remote-branch-names remote)))
+         (target  (magit-completing-read
+                   "Target branch" targets nil t nil 'magit-revision-history
+                   (or (and$ (cdr (magit-split-branch-name source))
+                             (and (magit-branch-p $)
+                                  (magit-get-upstream-branch $))
+                             (if (magit-remote-branch-p $)
+                                 $
+                               (magit-get-upstream-branch $))
+                             (car (member $ targets)))
+                       (seq-some (##car (member (concat remote "/" %) targets))
+                                 (delete-dups
+                                  (cons (oref repo default-branch)
+                                        magit-main-branch-names)))))))
+    (list source target)))
+
+(defun forge-create-post (&optional quote)
+  "Create a new post on an existing topic.
+If the region is active, then quote that part of the post.
+Otherwise and with a prefix argument quote the post that
+point is currently on."
+  (interactive (list current-prefix-arg))
+  (unless (derived-mode-p 'forge-topic-mode)
+    (user-error "This command is only available from topic buffers"))
+  (let* ((quote (cond
+                  ((not (magit-section-match 'post)) nil)
+                  ((use-region-p)
+                   (buffer-str (region-beginning) (region-end)))
+                  (quote
+                   (with-slots (content end) (magit-current-section)
+                     (string-trim (buffer-str content end))))))
+         (quote (and quote
+                     (lambda ()
+                       (goto-char (point-max))
+                       (unless (bobp)
+                         (insert "\n"))
+                       (insert (replace-regexp-in-string "^" "> " quote))
+                       (insert "\n\n"))))
+         (obj (if (forge-discussion-p forge-buffer-topic)
+                  (forge--select-discussion-reply-target)
+                forge-buffer-topic)))
+    (cl-typecase obj
+      (forge-discussion-post
+       (forge--setup-post-buffer obj #'forge--submit-create-post
+         "%i;%I;new-reply" "New comment on #%i;%I of %p" nil quote))
+      (forge-discussion
+       (forge--setup-post-buffer obj #'forge--submit-create-post
+         "%i;new-answer" "New comment on #%i of %p" nil quote))
+      (t
+       (forge--setup-post-buffer obj #'forge--submit-create-post
+         "%i;new-comment" "New comment on #%i of %p" nil quote)))))
+
+(transient-define-suffix forge-approve-pullreq ()
+  "Approve the current pull-request."
+  :description "approve pull-request"
+  :inapt-if-not #'forge-current-pullreq
+  :transient nil
+  (interactive)
+  (let ((pullreq (forge-current-pullreq t)))
+    (unless (forge-github-repository-p (forge-get-repository pullreq))
+      (user-error "This command is only available for Github"))
+    (forge--setup-post-buffer pullreq #'forge--submit-approve-pullreq
+      "%i;new-approval" "Approve pull-request #%i of %p")))
+
+(transient-define-suffix forge-request-changes ()
+  "Request changes to the current pull-request."
+  :description "request changes"
+  :inapt-if-not #'forge-current-pullreq
+  :transient nil
+  (interactive)
+  (let ((pullreq (forge-current-pullreq t)))
+    (unless (forge-github-repository-p (forge-get-repository pullreq))
+      (user-error "This command is only available for Github"))
+    (forge--setup-post-buffer pullreq #'forge--submit-request-changes
+      "%i;new-request" "Request changes for pull-request #%i of %p")))
+
+;;; Edit
+
+(defun forge-edit-post ()
+  "Edit the current post."
+  (interactive)
+  (let ((post (forge-post-at-point t)))
+    (cl-typecase post
+      (forge-topic
+       (forge--setup-post-buffer post #'forge--submit-edit-post
+         "%i" "Edit #%i of %p" nil
+         (lambda ()
+           (insert "# " (oref post title) "\n\n")
+           (insert (oref post body)))))
+      (forge-post
+       (forge--setup-post-buffer post #'forge--submit-edit-post
+         "%i;%I" "Edit comment on #%i of %p" nil
+         (lambda ()
+           (insert (oref post body))))))))
+
+(transient-define-suffix forge-edit-topic-note ()
+  "Edit your private note about the current topic."
+  :transient #'transient--do-quit-all
+  :inapt-if-not #'forge-current-topic
+  :description
+  (lambda ()
+    (if-let ((topic (forge-current-topic)))
+        (concat "note "
+                (if-let ((note (oref topic note)))
+                    (propertize (substring note 0 (string-match-p "$" note))
+                                'face 'font-lock-string-face)
+                  (propertize "none" 'face 'magit-dimmed)))
+      "note"))
+  (interactive)
+  (if-let* ((topic (forge-current-topic t))
+            (repo (forge-get-repository topic))
+            (default-directory (forge-get-worktree repo)))
+      (forge--setup-post-buffer topic #'forge--save-note
+        "%i;note" "New note on #%i of %p" nil
+        (lambda ()
+          (when-let ((note (oref topic note)))
+            (save-excursion (insert note ?\n)))))
+    (message "Cannot determine topic or worktree")))
+
+;;; Delete
+
+(transient-define-suffix forge-delete-comment ()
+  "Delete the comment at point."
+  :description "delete comment"
+  :inapt-if-not #'forge-comment-at-point
+  (interactive)
+  (let ((comment (forge-comment-at-point t)))
+    (when (yes-or-no-p "Really delete the current comment? ")
+      (forge--delete-comment (forge-get-repository :tracked) comment))))
+
+;;; Branch
+
+;;;###autoload
+(defun forge-branch-pullreq (pullreq)
+  "Create and configure a new branch from a pull-request.
+Please see the manual for more information."
+  (interactive (list (forge-read-pullreq "Branch pull request")))
+  (let ((pullreq (forge-get-pullreq pullreq)))
+    (if-let ((branch (forge--pullreq-branch-active pullreq)))
+        (prog1 branch
+          (message "Branch %S already exists and is configured" branch))
+      (forge--branch-pullreq pullreq)
+      (forge-refresh-buffer))))
+
+(cl-defmethod forge--branch-pullreq ((pullreq forge-pullreq))
+  (forge--branch-pullreq (forge-get-repository pullreq) pullreq))
+
+(cl-defmethod forge--branch-pullreq ((_repo forge-unusedapi-repository) pullreq)
+  ;; We don't know enough to do a good job.
+  (let* ((number (oref pullreq number))
+         (branch (format "pr-%s" number)))
+    (when (magit-branch-p branch)
+      (user-error "Branch `%s' already exists" branch))
+    (magit-git "branch" branch (forge--pullreq-ref pullreq))
+    ;; More often than not this is the correct target branch.
+    (magit-call-git "branch" branch "--set-upstream-to=master")
+    (magit-set (number-to-string number) "branch" branch "pullRequest")
+    branch))
+
+(cl-defmethod forge--branch-pullreq ((repo forge-repository) pullreq)
+  (let* ((number (oref pullreq number))
+         (branch-n (format "pr-%s" number))
+         (branch (or (forge--pullreq-branch-internal pullreq) branch-n))
+         (pullreq-ref (format "refs/pullreqs/%s" number)))
+    (cond ((and-let ((pr-branch (oref pullreq head-ref)))
+             (string-search ":" pr-branch))
+           ;; Such a branch name would be invalid.  If we encounter
+           ;; it anyway, then that means that the source branch and
+           ;; the merge-request ref are missing.  Luckily Gitlab no
+           ;; longer does this, but we nevertheless have to deal
+           ;; with merge-requests that have been lost in time.
+           (error "Cannot check out this merge-request because %s"
+                  "an old Gitlab version discarded the source branch"))
+          ((not (eq (oref pullreq state) 'open))
+           (magit-git "branch" "--force" branch pullreq-ref))
+          (t
+           (let ((upstream  (oref repo remote))
+                 (pr-remote (oref pullreq head-user))
+                 (pr-branch (oref pullreq head-ref)))
+             (cond ((not (oref pullreq cross-repo-p))
+                    (let ((tracking (concat upstream "/" pr-branch)))
+                      (unless (magit-branch-p tracking)
+                        (magit-call-git "fetch" upstream))
+                      (forge--setup-pullreq-branch branch tracking)
+                      (magit-branch-maybe-adjust-upstream branch tracking)
+                      (magit-set upstream "branch" branch "pushRemote")
+                      (magit-set upstream "branch" branch "pullRequestRemote")))
+                   ((not pr-branch)
+                    ;; The pullreq branch (on Github) has been deleted.
+                    (setq pr-remote nil)
+                    (setq branch branch-n)
+                    (forge--setup-pullreq-branch branch pullreq-ref)
+                    (magit-set upstream "branch" branch "pushRemote"))
+                   (t
+                    ;; For prs within the upstream we are more permissive,
+                    ;; but any request to merge a branch with a well known
+                    ;; name from fork, is highly suspicious and likely the
+                    ;; result of a contributor not bothering to name their
+                    ;; feature branch.
+                    (when (and (member branch magit-main-branch-names)
+                               (magit-branch-p branch))
+                      (setq branch branch-n))
+                    (forge--setup-pullreq-remote pullreq)
+                    (forge--setup-pullreq-branch
+                     branch (concat pr-remote "/" pr-branch))
+                    (if (and (oref pullreq editable-p)
+                             (equal branch pr-branch))
+                        (magit-set pr-remote "branch" branch "pushRemote")
+                      (magit-set upstream "branch" branch "pushRemote"))))
+             (when pr-remote
+               (magit-set pr-remote "branch" branch "pullRequestRemote"))
+             (magit-set "true" "branch" branch "rebase")
+             (magit-git "branch" branch
+                        (let ((base-ref (oref pullreq base-ref)))
+                          (concat "--set-upstream-to="
+                                  (if (or magit-branch-prefer-remote-upstream
+                                          (not (magit-branch-p base-ref)))
+                                      (concat upstream "/" base-ref)
+                                    base-ref)))))))
+    (magit-set (number-to-string number) "branch" branch "pullRequest")
+    (magit-set (oref pullreq title) "branch" branch "description")
+    branch))
+
+(defun forge--setup-pullreq-branch (branch tracking)
+  (if (magit-branch-p branch)
+      (unless (magit-rev-equal branch tracking)
+        (message "Existing branch %s diverged from %s" branch tracking))
+    (magit-git "branch" branch tracking)))
+
+(defun forge--setup-pullreq-remote (pullreq)
+  (let* ((pr-remote (oref pullreq head-user))
+         (pr-branch (oref pullreq head-ref))
+         (repo (forge-get-repository pullreq))
+         (host (oref repo githost))
+         (user (oref pullreq head-user))
+         (fork (oref pullreq head-repo)))
+    (if (magit-remote-p pr-remote)
+        (let ((url (magit-git-string "remote" "get-url" pr-remote))
+              (fetch (magit-get-all "remote" pr-remote "fetch")))
+          (unless (equal (forge--split-forge-url url)
+                         (list host user (substring fork (1+ (length user)))))
+            (user-error "Remote `%s' already exists but does not point to %s"
+                        pr-remote url))
+          (unless (or (member (format "+refs/heads/*:refs/remotes/%s/*"
+                                      pr-remote)
+                              fetch)
+                      (member (format "+refs/heads/%s:refs/remotes/%s/%s"
+                                      pr-branch pr-remote pr-branch)
+                              fetch))
+            (magit-git "remote" "set-branches" "--add" pr-remote pr-branch)
+            (magit-git "fetch" pr-remote)))
+      (let ((url (magit-git-string "remote" "get-url" (oref repo remote))))
+        (magit-git
+         "remote" "add" "-f" "--no-tags"
+         "-t" pr-branch pr-remote
+         (cond ((or (string-prefix-p "git@" url)
+                    (string-prefix-p "ssh://git@" url))
+                (format "git@%s:%s.git" host fork))
+               ((string-prefix-p "https://" url)
+                (format "https://%s/%s.git" host fork))
+               ((string-prefix-p "git://" url)
+                (format "git://%s/%s.git" host fork))
+               ((string-prefix-p "http://" url)
+                (format "http://%s/%s.git" host fork))
+               ((error "%s has an unexpected format" url))))))))
+
+;;;###autoload
+(defun forge-checkout-pullreq (pullreq)
+  "Create, configure and checkout a new branch from a pull-request.
+Please see the manual for more information."
+  (interactive (list (forge-read-pullreq "Checkout pull request")))
+  (magit--checkout (forge--branch-pullreq (forge-get-pullreq pullreq)))
+  (forge-refresh-buffer))
+
+;;;###autoload(autoload 'forge-checkout-this-pullreq "forge-commands" nil t)
+(transient-define-suffix forge-checkout-this-pullreq ()
+  "Checkout the current pull-request.
+If the branch for that pull-request does not exist yet, then create and
+configure it first."
+  :description "checkout"
+  :inapt-if-not #'forge-current-pullreq
+  (interactive)
+  (forge-checkout-pullreq (forge-current-topic t)))
+
+;;;###autoload
+(defun forge-checkout-worktree (path pullreq)
+  "Create, configure and checkout a new worktree from a pull-request.
+This is like `forge-checkout-pullreq', except that it also
+creates a new worktree.  Please see the manual for more
+information."
+  (interactive
+    (let ((id (forge-read-pullreq "Checkout pull request")))
+      (list (funcall forge-checkout-worktree-read-directory-function
+                     (forge-get-pullreq id))
+            id)))
+  (when (and (file-exists-p path)
+             (not (and (file-directory-p path)
+                       (length= (directory-files path) 2))))
+    (user-error "%s already exists and isn't empty" path))
+  (magit-worktree-checkout path
+                           (forge--branch-pullreq (forge-get-pullreq pullreq))))
+
+(defun forge-checkout-worktree-default-read-directory-function (pullreq)
+  (pcase-let* (((eieio number head-ref) pullreq)
+               (path (read-directory-name
+                      (format "Checkout #%s in new worktree: " number)
+                      (file-name-directory
+                       (directory-file-name default-directory))
+                      nil nil
+                      (let ((branch (forge--pullreq-branch-internal pullreq)))
+                        (if (string-match-p "\\`pr-[0-9]+\\'" branch)
+                            (number-to-string number)
+                          (format "%s-%s" number
+                                  (string-replace "/" "-" head-ref)))))))
+    (when (equal path "")
+      (user-error "The empty string isn't a valid path"))
+    path))
+
+;;;###autoload(autoload 'forge-push-to-unnamed-pullreq "forge-commands" nil t)
+(transient-define-suffix forge-push-to-unnamed-pullreq (args)
+  "Push the current branch to the branch on the contributor's fork.
+
+Usually a maintainer would use `magit-push-current-to-pushremote' to
+push to the branch, the contributor asks to be merged.  That does not
+work if they did not create a dedicated branch and instead committed
+directly to \"main\", or some other branch, that also exists in the
+upstream repository.
+
+If this is the case then the branch, which is used to check out the
+pull-request locally, is named \"pr-N\" (where N is the pull-request
+number) and this command is made available as a substitute in the
+`magit-push' menu."
+  :if (lambda ()
+        (and-let ((branch (magit-get-current-branch)))
+          (and (forge-get-pullreq :branch branch)
+               (string-match-p "\\`pr-[0-9]+\\'" branch))))
+  :description (lambda ()
+                 (and-let* ((branch (magit-get-current-branch))
+                            (pullreq (forge-get-pullreq :branch branch)))
+                   (format "contributor's %s branch"
+                           (magit--propertize-face
+                            (format "%s/%s"
+                                    (oref pullreq head-user)
+                                    (oref pullreq head-ref))
+                            'magit-branch-remote))))
+  (interactive (list (magit-push-arguments)))
+  (cond-let*
+    ([branch (magit-get-current-branch)]
+     [pullreq (forge-get-pullreq :branch branch)]
+     (run-hooks 'magit-credential-hook)
+     (magit-run-git-async "push" "-v"
+                          (delete "--tags" (delete "--follow-tags" args))
+                          (oref pullreq head-user)
+                          (format "%s:%s" branch (oref pullreq head-ref))))
+    ((error "Checked out branch is not an unnamed pull-request branch"))))
+
+;;; Marks
+
+(defun forge-create-mark (name face description)
+  "Define a new mark that topics can be marked with."
+  (interactive
+    (list (read-string "Name: ")
+          (magit-read-char-case "Set appearance using " nil
+            (?n "a face [n]ame"
+                (read-face-name "Face name: "))
+            (?s "face [s]exp"
+                (read-from-minibuffer
+                 "Face sexp: "
+                 "(:background \"\" :foreground \"\" :box t)"
+                 read-expression-map t)))
+          (let ((str (read-string "Description: ")))
+            (and (not (equal str "")) str))))
+  (forge-sql [:insert-into mark :values $v1]
+             (vector nil (forge--uuid) name face description)))
+
+(defun forge-edit-mark (id name face description)
+  "Define a new mark that topics can be marked with."
+  (interactive
+    (pcase-let*
+        ((marks (forge-sql [:select [name id face description] :from mark]))
+         (`(,name ,id ,face ,description)
+          (assoc (completing-read "Edit mark" (mapcar #'car marks) nil t)
+                 marks)))
+      (list id
+            (read-string "Name: " name)
+            (magit-read-char-case "Set appearance using " nil
+              (?n "a face [n]ame"
+                  (read-face-name "Face name: " (and (symbolp face) face)))
+              (?s "face [s]exp"
+                  (read-from-minibuffer
+                   "Face sexp: "
+                   (if (listp face)
+                       (format "%S" face)
+                     "(:background \"\" :foreground \"\" :box t)")
+                   read-expression-map t)))
+            (let ((str (read-string "Description: " nil nil description)))
+              (and (not (equal str "")) str)))))
+  (forge-sql [:update mark
+              :set (= [name face description] $v1)
+              :where (= id $s2)]
+             (vector name face description) id))
+
+;;; Remotely
+
+;;;###autoload
+(defun forge-fork (fork remote all)
+  "Fork the current repository to FORK and add it as a REMOTE.
+
+If the fork already exists, then that isn't an error; the remote
+is added anyway.  Currently this only supports Github and Gitlab.
+
+With prefix argument ALL, fork all branches, not just the default
+branch.  On Gitlab it is not possible to fork only the default."
+  (interactive
+    (let ((fork (magit-completing-read "Fork to"
+                                       (mapcar #'car forge-owned-accounts))))
+      (list fork
+            (read-string "Remote name: "
+                         (or (plist-get (cdr (assoc fork forge-owned-accounts))
+                                        'remote-name)
+                             fork))
+            current-prefix-arg)))
+  (let ((repo (forge-get-repository :stub)))
+    (forge--fork-repository repo fork all)
+    (magit-remote-add remote
+                      (magit-clone--format-url (oref repo githost) fork
+                                               (oref repo name))
+                      (list "--fetch"))))
+
+;;;###autoload(autoload 'forge-merge "forge-commands" nil t)
+(transient-define-suffix forge-merge (pullreq method)
+  "Merge the current pull-request using METHOD using the forge's API.
+
+If there is no current pull-request or with a prefix argument,
+then read pull-request PULLREQ to visit instead.
+
+Use of this command is discouraged.  Unless the remote repository
+is configured to disallow that, you should instead merge locally
+and then push the target branch.  Forges detect that you have
+done that and respond by automatically marking the pull-request
+as merged."
+  (declare (interactive-only nil))
+  (interactive (list (forge-read-pullreq "Merge pull-request")
+                     (forge-select-merge-method)))
+  (let ((pullreq (forge-get-pullreq pullreq)))
+    (forge--merge-pullreq (forge-get-repository pullreq)
+                          pullreq
+                          (magit-commit-oid
+                           (forge--pullreq-branch-internal pullreq))
+                          method)))
+
+(defun forge-select-merge-method ()
+  (if (forge--childp (forge-get-repository :tracked)
+                     'forge-gitlab-repository)
+      (magit-read-char-case "Merge method " t
+        (?m "[m]erge"  'merge)
+        (?s "[s]quash" 'squash))
+    (magit-read-char-case "Merge method " t
+      (?m "[m]erge"  'merge)
+      (?s "[s]quash" 'squash)
+      (?r "[r]ebase" 'rebase))))
+
+;;;###autoload
+(defun forge-set-default-branch ()
+  "Change the default branch on the upstream remote and locally.
+Also update the upstream branches of local branches accordingly."
+  (interactive)
+  (pcase-let* ((`(,repo ,old) (forge--set-default-branch-read-args))
+               (new (magit-read-remote-branch
+                     (format "Set default branch (was: %s)" old)
+                     (delete old (forge--get-remote))
+                     nil nil t)))
+    (message "Changing default branch...")
+    (forge--set-default-branch repo new)
+    (magit--set-default-branch new old)
+    (forge-refresh-buffer)
+    (message "Changing default branch...done")))
+
+;;;###autoload
+(defun forge-rename-default-branch ()
+  "Rename the default branch on the upstream remote and locally.
+Also update the upstream branches of local branches accordingly."
+  (interactive)
+  (pcase-let* ((`(,repo ,old) (forge--set-default-branch-read-args))
+               (default (and (not (equal old "main")) "main"))
+               (new (read-string
+                     (format "Rename default branch `%s' to%s: " old
+                             (if default (format " (default: %s)" default) ""))
+                     nil nil default)))
+    (message "Renaming default branch...")
+    (forge--rename-branch repo new old)
+    (magit--set-default-branch new old)
+    (magit-git "remote" "set-head" "--auto" (oref repo remote))
+    (forge-refresh-buffer)
+    (message "Renaming default branch...done")))
+
+(defun forge--set-default-branch-read-args ()
+  (let* ((repo (forge-get-repository :tracked))
+         (_ (unless (forge-github-repository-p repo)
+              (user-error "Updating default branch not supported for forge `%s'"
+                          (oref repo forge))))
+         (remote (or (and (fboundp 'forge--get-remote)
+                          (forge--get-remote))
+                     (magit-get-some-remote)
+                     (user-error "No remote configured")))
+         (symref (format "refs/remotes/%s/HEAD" remote))
+         (oldhead (progn
+                    (message "Determining old default branch...")
+                    (magit-git "fetch" "--prune")
+                    (magit-git "remote" "set-head" "--auto" remote)
+                    (message "Determining old default branch...done")
+                    (magit-git-string "symbolic-ref" "--short" symref))))
+    (list repo
+          (if oldhead
+              (cdr (magit-split-branch-name oldhead))
+            (error "Cannot determine old default branch")))))
+
+;;; Configuration
+
+(transient-define-suffix forge-forge.remote ()
+  "Change the local value of the `forge.remote' Git variable."
+  :class 'magit--git-variable:choices
+  :variable "forge.remote"
+  :choices #'magit-list-remotes
+  :default (lambda (_) (forge--get-remote t t))
+  (interactive)
+  (let ((obj (transient-suffix-object)))
+    (transient-infix-set obj (transient-infix-read obj)))
+  (if (and transient--prefix
+           (eq (oref transient--prefix command) 'forge-add-repository))
+      ;; Improvements to Transient will make this hack unnecessary.
+      (let ((scope (forge-add-repository--scope)))
+        (oset (transient-prefix-object) scope scope))
+    (transient--show)))
+
+(transient-define-infix forge-forge.graphqlItemLimit ()
+  "Change the maximum number of GraphQL entities to pull at once."
+  :if #'forge--get-github-repository
+  :class 'magit--git-variable
+  :variable "forge.graphqlItemLimit"
+  :reader #'read-string
+  :default (##number-to-string ghub-graphql-items-per-request))
+
+(transient-define-suffix forge-toggle-display-in-status-buffer ()
+  "Toggle whether to display topics in the current status buffer."
+  :if-mode 'magit-status-mode
+  :inapt-if-not #'forge--buffer-with-topics-sections-p
+  :description (lambda ()
+                 (if (and forge--buffer-topics-spec
+                          (oref forge--buffer-topics-spec type))
+                     "hide topics"
+                   "display topics"))
+  (interactive)
+  (oset forge--buffer-topics-spec type
+        (if (oref forge--buffer-topics-spec type) nil 'topic))
+  (forge-refresh-buffer))
+
+(defun forge--buffer-with-topics-sections-p ()
+  (and forge--buffer-topics-spec
+       (not (eq major-mode 'forge-topics-mode))
+       (forge-get-repository :tracked?)))
+
+;;;###autoload(autoload 'forge-add-pullreq-refspec "forge-commands" nil t)
+(transient-define-suffix forge-add-pullreq-refspec ()
+  "Configure Git to fetch all pull-requests.
+This is done by adding \"+refs/pull/*/head:refs/pullreqs/*\"
+to the value of `remote.REMOTE.fetch', where REMOTE is the
+upstream remote."
+  :if-not 'forge--pullreq-refspec
+  :description "add pull-request refspec"
+  (interactive)
+  (let* ((repo    (forge-get-repository :stub))
+         (remote  (oref repo remote))
+         (fetch   (magit-get-all "remote" remote "fetch"))
+         (refspec (oref repo pullreq-refspec)))
+    (if (member refspec fetch)
+        (message "Pull-request refspec is already active")
+      (magit-call-git "config" "--add"
+                      (format "remote.%s.fetch" remote)
+                      refspec)
+      (magit-git-fetch remote (magit-fetch-arguments)))))
+
+(defun forge--pullreq-refspec ()
+  (let* ((repo    (forge-get-repository :stub))
+         (remote  (oref repo remote))
+         (fetch   (magit-get-all "remote" remote "fetch"))
+         (refspec (oref repo pullreq-refspec)))
+    (car (member refspec fetch))))
+
+;;; Add repositories
+
+;;;###autoload(autoload 'forge-add-repository "forge-commands" nil t)
+(transient-define-prefix forge-add-repository (&optional repo limit)
+  "Add a repository to the database."
+  :refresh-suffixes t
+  [:class transient-subgroups
+
+   ;; Already tracked.
+   [:if (##forge--scope :tracked)
+    (:info*
+     (lambda ()
+       (format
+        (propertize "%s is already being tracked" 'face 'transient-heading)
+        (propertize (forge--scope 'url) 'face 'bold)))
+     :format "%d")]
+
+   ;; Nothing to tracked.
+   [:if-not (##forge--scope 'topdir)
+    (:info*
+     (lambda ()
+       (format
+        (propertize "%s is not inside a Git repository" 'face 'transient-heading)
+        (propertize default-directory 'face 'bold)))
+     :format "%d")]
+
+   ;; Cannot track.
+   [:if (##and (not (forge--scope 'repo)) (forge--scope 'topdir))
+    :description
+    (lambda ()
+      (concat
+       (format (propertize "Cannot determine forge host for %s\n"
+                           'face 'transient-heading)
+               (propertize (forge--scope 'topdir) 'face 'bold))
+       (if-let* ((remote (forge--get-remote))
+                 (url (magit-git-string "remote" "get-url" remote)))
+           (format (propertize "because %s is not on a host known to Forge."
+                               'face 'transient-heading)
+                   (propertize url 'face 'bold))
+         (propertize "because no suitable remote was detected."
+                     'face 'transient-heading))))
+    ("r" forge-forge.remote :format " %k Try another %d %v" :face 'bold)
+    ("h" "Learn how to configure another Github host"
+     (lambda () (interactive) (info "(forge)Setup for Another Github Instance")))
+    ("l" "Learn how to configure another Gitlab host"
+     (lambda () (interactive) (info "(forge)Setup for Another Gitlab Instance")))
+    ("p" "Learn how to configure partially supported host"
+     (lambda () (interactive) (info "(forge)Setup a Partially Supported Host")))]
+
+   ;; Track it!
+   [:if (##forge--scope :untracked)
+    :description
+    (lambda ()
+      (format
+       (propertize "Adding %s to database," 'face 'transient-heading)
+       (propertize (forge--scope 'url) 'face 'bold)))
+    ("r" forge-forge.remote :format " %k from %d %v," :face 'bold)
+    ("a" "pulling all topics"
+     (lambda (repo)
+       (interactive (list (forge--scope 'repo)))
+       (forge-add-repository repo)))
+    ("s" "pulling only topics since <date>"
+     (lambda (repo date)
+       (interactive
+         (list (forge--scope 'repo)
+               (forge-read-date "Limit pulling to topics updated since: ")))
+       (forge-add-repository repo date)))
+    ("i" "to allow pulling of individual topics"
+     (lambda (repo)
+       (interactive (list (forge--scope 'repo)))
+       (forge-add-repository repo :selective)))]
+
+   ;; Pivot.
+   [("o" "Add another repository" forge-add-some-repository)
+    (7 "U" "Add all source repositories belonging to a user"
+       forge-add-user-repositories)
+    (7 "O" "Add all source repositories belonging to an organization"
+       forge-add-organization-repositories)]]
+  (declare (interactive-only nil))
+  (interactive)
+  (cond
+    ((not repo)
+     (transient-setup 'forge-add-repository nil nil
+                      :scope (forge-add-repository--scope)))
+    ((stringp repo)
+     (transient-setup 'forge-add-repository nil nil
+                      :scope (forge-add-repository--scope repo)))
+    (t
+     (when-let*
+         ((_(not (eq limit :selective)))
+          (_(magit-git-config-p "forge.autoPull" t))
+          (remote  (oref repo remote))
+          (refspec (oref repo pullreq-refspec))
+          (default-directory (forge-get-worktree repo))
+          (_(and (not (member refspec (magit-get-all "remote" remote "fetch")))
+                 (or (eq forge-add-pullreq-refspec t)
+                     (and (eq forge-add-pullreq-refspec 'ask)
+                          (y-or-n-p (format "Also add %S refspec? " refspec)))))))
+       (magit-call-git "config" "--add"
+                       (format "remote.%s.fetch" remote)
+                       refspec))
+     (setq repo (forge-get-repository repo nil :insert!))
+     (when (eq limit :selective)
+       (oset repo selective-p t)
+       (setq limit nil))
+     (forge--pull repo
+                  (and (not (forge-get-worktree repo)) #'ignore)
+                  limit))))
+
+(defun forge-add-repository--scope (&optional directory)
+  (let* ((repo      (if directory
+                        (forge-get-repository directory nil :stub?)
+                      (forge-get-repository :stub?)))
+         (wtree     (and repo (forge-get-worktree repo)))
+         (condition (and repo (oref repo condition)))
+         (val
+          `((repo       . ,repo)
+            (wtree      . ,wtree)
+            (condition  . ,condition)
+            (:tracked   . ,(eq condition :tracked))
+            (:untracked . ,(memq condition '(:known :stub)))
+            (topdir     . ,(or wtree (magit-toplevel)))
+            (url        . ,(and repo (forge-get-url repo))))))
+    val))
+
+(defun forge--scope (&optional key)
+  ;; `transient-scope' itself probably offer optional KEY.
+  (let ((scope (transient-scope)))
+    (if key (alist-get key scope) scope)))
+
+(defun forge-add-some-repository (url)
+  "Read a repository and add it to the database."
+  (interactive
+    (let (ret url)
+      (while (not ret)
+        (setq url (magit-read-string-ns
+                   "Add repository to database (url, owner/name, or name)" url))
+        (unless (string-match-p "\\(://\\|@\\)" url)
+          (setq url (magit-clone--name-to-url url)))
+        (cond ((forge-get-repository url nil :tracked?)
+               (message "%s is already being tracked locally"
+                        (propertize url 'face 'bold))
+               (sit-for 3))
+              ((not (forge-get-repository url nil :valid?))
+               (message "%s does not exist or is inaccessible"
+                        (propertize url 'face 'bold))
+               (sit-for 3))
+              ((setq ret url))))
+      (list ret)))
+  (forge-add-repository url))
+
+;;;###autoload
+(defun forge-add-user-repositories (host user)
+  "Add all of USER's repositories from HOST to the database.
+This may take a while.  Only Github is supported at the moment."
+  (interactive
+    (list (forge-read-host "Add repositories from Github host"
+                           'forge-github-repository)
+          (read-string "User: ")))
+  (forge--add-user-repos 'forge-github-repository host user))
+
+;;;###autoload
+(defun forge-add-organization-repositories (host organization)
+  "Add all of ORGANIZATION's repositories from HOST to the database.
+This may take a while.  Only Github is supported at the moment."
+  (interactive
+    (list (forge-read-host "Add repositories from Github host"
+                           'forge-github-repository)
+          (read-string "Organization: ")))
+  (forge--add-organization-repos 'forge-github-repository host organization))
+
+;;; Cleanup
+
+;;;###autoload
+(defun forge-remove-repository (repository)
+  "Remove a repository from the database."
+  (interactive
+    (pcase-let* ((repo (forge-read-repository "Remove repository from db"))
+                 ((eieio githost owner name) repo))
+      (if (yes-or-no-p (format "Do you really want to remove \"%s/%s @%s\" %s? "
+                               owner name githost "from the database"))
+          (list repo)
+        (user-error "Abort"))))
+  (closql-delete repository)
+  (forge-refresh-buffer))
+
+;;;###autoload
+(defun forge-remove-topic-locally (topic)
+  "Remove a topic from the local database only.
+
+When the region marks multiple topics, then offer to remove them all.
+
+The topic is not removed from the forge and, if it is later modified,
+then it will be added to the database again when fetching all topics.
+
+This is useful for users who only fetch individual topics and want to
+remove the topics they are no longer interested in.  This can also be
+used to remove topics locally, which have already been removed on the
+forge (the service).  Forge (the package) cannot automatically detect
+when that happens, because given how the APIs work, this would be too
+expensive."
+  (interactive
+    (list (if-let* ((topics (magit-region-values '(issue pullreq) t))
+                    (_(magit-confirm 'remove-topics-locally nil
+                        "Delete %d topics locally" nil
+                        (mapcar #'forge--format-topic-line topics))))
+              topics
+            (forge-read-topic "Delete topic LOCALLY only"))))
+  (if (listp topic)
+      (progn (mapc #'closql-delete topic)
+             (forge-refresh-buffer))
+    (setq topic (forge-get-topic topic))
+    (closql-delete topic)
+    (if (and (derived-mode-p 'forge-topic-mode)
+             (equal (oref topic id)
+                    (oref forge-buffer-topic id)))
+        (kill-buffer (current-buffer))
+      (forge-refresh-buffer))))
+
+;;;###autoload
+(defun forge-reset-database ()
+  "Move the current database file to the trash.
+This is useful after the database scheme has changed, which will
+happen a few times while the forge functionality is still under
+heavy development."
+  (interactive)
+  (when (and (file-exists-p forge-database-file)
+             (yes-or-no-p "Really trash Forge's database file? "))
+    (when-let ((db (forge-db t)))
+      (emacsql-close db))
+    (delete-file forge-database-file t)
+    (forge-refresh-buffer)))
+
+;;; Miscellaneous
+
+(magit-define-section-jumper forge-jump-to-pullreqs "Pull requests" pullreqs)
+(magit-define-section-jumper forge-jump-to-issues "Issues" issues)
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let")
+;;   ("buffer-string" . "buffer-string")
+;;   ("buffer-str"    . "forge--buffer-substring-no-properties")
+;;   ("partial"       . "llama--left-apply-partially"))
+;; End:
+(provide 'forge-commands)
+;;; forge-commands.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-commands.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-commands.elc
new file mode 100644
index 0000000..66ca138
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-commands.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-core.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-core.el
new file mode 100644
index 0000000..e6711d8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-core.el
@@ -0,0 +1,494 @@
+;;; forge-core.el --- Core functionality  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'magit)
+
+(require 'cl-lib)
+(require 'compat)
+(require 'cond-let)
+(require 'eieio)
+(require 'llama)
+(require 'seq)
+(require 'subr-x)
+
+(require 'transient)
+
+(require 'ghub-graphql)
+(require 'forge-db)
+
+(eval-when-compile
+  (cl-pushnew 'forge-id eieio--known-slot-names)
+  (cl-pushnew 'number   eieio--known-slot-names)
+  (cl-pushnew 'owner    eieio--known-slot-names)
+  (cl-pushnew 'their-id eieio--known-slot-names))
+
+;;; Options
+
+(defgroup forge nil
+  "Options concerning Git forges."
+  :group 'magit)
+
+(defgroup forge-faces nil
+  "Faces concerning Git forges."
+  :group 'forge
+  :group 'magit-faces)
+
+(defcustom forge-alist
+  '(;; Forges
+    ("github.com" "api.github.com"
+     "github.com" forge-github-repository)
+    ("ssh.github.com" "api.github.com"
+     "github.com" forge-github-repository)
+    ("gitlab.com" "gitlab.com/api/v4"
+     "gitlab.com" forge-gitlab-repository)
+    ("salsa.debian.org" "salsa.debian.org/api/v4"
+     "salsa.debian.org" forge-gitlab-repository)
+    ("framagit.org" "framagit.org/api/v4"
+     "framagit.org" forge-gitlab-repository)
+    ("gitlab.gnome.org" "gitlab.gnome.org/api/v4"
+     "gitlab.gnome.org" forge-gitlab-repository)
+    ;; Forges (API unsupported)
+    ("codeberg.org" "codeberg.org/api/v1"
+     "codeberg.org" forge-forgejo-repository)
+    ("bitbucket.org" "api.bitbucket.org/2.0"
+     "bitbucket.org" forge-bitbucket-repository)
+    ;; Semi-Forges
+    ("git.savannah.gnu.org" nil
+     "git.savannah.gnu.org" forge-cgit**-repository)
+    ("git.kernel.org" nil
+     "git.kernel.org" forge-cgit-repository)
+    ("repo.or.cz" nil
+     "repo.or.cz" forge-repoorcz-repository)
+    ("git.suckless.org" nil
+     "git.suckless.org" forge-stagit-repository)
+    ("git.sr.ht" nil
+     "git.sr.ht" forge-srht-repository))
+  "List of Git forges.
+
+Each entry has the form (GITHOST APIHOST WEBHOST CLASS).
+
+- GITHOST is the host used to access repositories on the forge using
+  Git.
+
+- APIHOST is the host used to access the forge's API.  For some forges
+  the isn't just a host, but a host followed by the path to the API's
+  endpoint.
+
+- WEBHOST is the host used to access repositories on this forge using
+  a browser.  The IDs used to identify repositories from the forge in
+  the local database also derives from this value.
+
+- CLASS is the class to be used for repositories from the forge.
+
+Complications:
+
+- When connecting to a Github Enterprise edition whose REST API's
+  end point is \"<host>/v3\" and whose GraphQL API's end point is
+  \"<host>/graphql\", then use \"<host>/v3\" as APIHOST.  This is a
+  historic accident.  See issue #174.
+
+- WEBHOST and CLASS cannot be changed once you have added one or
+  more repositories from a forge.  Changing GITHOST and/or APIHOST
+  may be possible, but should seldom be necessary."
+  :package-version '(forge . "0.4.7")
+  :group 'forge
+  :type '(repeat (list (string :tag "Git host")
+                       (choice (string :tag "API endpoint")
+                               (const  :tag "No API" nil))
+                       (string :tag "ID")
+                       (symbol :tag "Repository class"))))
+
+;;; Class
+
+(defclass forge-object (closql-object) () :abstract t)
+
+(defmacro forge--childp (obj type)
+  "Somewhat similar to `cl-typep' but only for (possibly unknown) classes.
+TYPE is evaluated at macro-expansion time but, unlike with
+`cl-typep', the respective class does not have to be defined
+at that time."
+  (let ((fn (intern (concat (symbol-name (eval type)) "--eieio-childp"))))
+    `(and (fboundp ',fn) (,fn ,obj))))
+
+;;; Query
+
+(cl-defgeneric forge-get-parent (object)
+  "Return the parent object of OBJECT.
+The hierarchy is repository > topic > post.
+For other objects return nil.")
+
+(cl-defgeneric forge-get-repository (demand)
+  "Return a forge repository object or nil, or signal an error.
+
+A forge repository is a repository hosted on a forge.  The local clone
+is also a \"repository\", but it is a \"Git\" repository, not a \"Forge\"
+repository.  (Forge repositories are also Git repositories, but not the
+other way around.)
+
+A `:known' repository has an entry in the local database.  All other
+repositories are unknown.  `:known' repositories are divided into two
+subgroups: `:tracked' and \"untracked\" repositories.
+
+A `:tracked' repository was previously explicitly added to the database
+by the user.
+
+When Forge encounters a repository, without being instructed by the user
+to track it, it may nevertheless add limited information about it to the
+database.  Such a repository is `:known' but it is not `:tracked'.
+
+Other repositories are \"unknown\".  Most commands can only deal with
+repositories that are stored in the database.  Of these, some can deal
+with any `:known' repositories, others require that they are `:tracked'.
+
+Some other commands exist — such as the browse commands — that have no
+such requirement.  While such commands also require a repository object,
+they do not care whether that is stored in the database.  Instead they
+are happy to use a `:stub' repository; a repository that is not stored
+in the database.
+
+The DEMAND argument specifies what kind of repository object the caller
+requires, at least.  `:tracked' is greater than `:known', which is
+greater than `:stub'.  For example, if the caller requests a `:known'
+repository, a `:tracked' repository will do, while a `:stub' repository
+will not.
+
+The valid values for DEMAND are:
+
+- `:tracked' and `:tracked?' request a repository that the user added
+  to the database.  If there is no such repository, the former causes
+  an error to be signaled, while for the latter nil is returned.
+
+- `:known?' and `:insert!' request a repository from the database.
+  Whether the user explicitly added it does not matter.  If there is no
+  such repository, nil is returned for the former, while for the latter
+  a new repository is inserted into the repository and then returned.
+
+- `:stub' and `:stub?' request the Forge repository corresponding to
+  the current Git repository.  It does not matter whether it is known.
+  This fails if `default-directory' is not inside a Git repository, if
+  there is no matching entry in `forge-alist', or if it is unclear which
+  remote to use.  If the repository cannot be determined, the former
+  causes an error to be signaled, while for the latter nil is returned.
+
+  Stub repository objects are created without making an API request, so
+  we lack access to the upstream ID, which the IDs used in out database,
+  derive from.  Stub repositories are \"unknown\" in the sense that their
+  IDs are not `:known'.  This is done to allow offline operations.
+
+- `:valid?' requests the Forge repository corresponding to the current
+  Git repository.  It does not matter whether it is known.  If it is
+  unknown, an API request is made to verify that the repository exists
+  on the forge.  If it does, an object with a valid upstream ID is
+  returned, but that isn't inserted into the database.  If not, nil is
+  returned.
+
+Given a repository object, you can query its `condition' slot to learn
+whether it is `:tracked', `:known' (i.e., has a valid ID and is stored
+in the database), or merely a `:stub'.
+
+You can also use (forge-get repository OBJECT nil DEMAND) to check the
+condition of a repository object, or even to ensure a repository object
+has a valid upstream ID (using `:valid?'), or that it is tracked in the
+database (using `:insert!').
+
+Use `forge-repository-equal' to check if two objects refer to the same
+repository.
+
+Also see info node `(forge) Repository Detection'.")
+
+(cl-defgeneric forge-get-topic ()
+  "Return a forge issue or pullreq object.")
+
+(cl-defgeneric forge-get-issue ()
+  "Return a forge issue object.")
+
+(cl-defgeneric forge-get-pullreq ()
+  "Return a forge pullreq object.")
+
+(defun forge--get-forge-host (host &optional demand)
+  "Return `forge-alist' entry matching HOST.
+
+Entries have the form (GITHOST APIHOST WEBHOST CLASS).
+
+- If HOST matches a GITHOST, return the corresponding entry.
+- Else, if HOST is an ssh alias and the canonical hostname matches a
+  GITHOST, return the corresponding entry.
+- Finally, if HOST matches a WEBHOST, return the corresponding entry.
+
+If no entry matches, return nil, or signal an error if optional DEMAND
+is non-nil."
+  (or (assoc host forge-alist)
+      (assoc (seq-some (##and (string-prefix-p "hostname" %)
+                              (substring % 9))
+                       (ignore-error file-missing
+                         (process-lines-ignore-status "ssh" "-G" host)))
+             forge-alist)
+      (car (cl-member host forge-alist :test #'equal :key #'caddr))
+      (and demand
+           (error "No entry for \"%s\" in `forge-alist'" host))))
+
+(defun forge--split-forge-url (url &optional relax)
+  (save-match-data
+    (cond
+      ((string-match
+        (concat "\\`"
+                "\\(?:git://\\|"
+                "[^/@]+@\\|"
+                "\\(?:ssh\\|ssh\\+git\\|git\\+ssh\\)://\\(?:[^/@]+@\\)?\\|"
+                "https?://\\(?:[^/@]+@\\)?\\)?"
+                (if relax
+                    "\\(?1:[^:/]+\\)"
+                  (regexp-opt (mapcar #'car forge-alist) t))
+                "\\(?::[0-9]+\\)?"
+                "\\(?:/\\|:/?\\)"
+                "~?\\(?2:.+?\\)/"
+                "\\(?3:[^/]+?\\)"
+                "\\(?:\\.git\\|/\\)?"
+                "\\'")
+        url)
+       (and-let ((elt (forge--get-forge-host (match-string 1 url) (not relax))))
+         ;; Return the WEBHOST (not the GITHOST, URLs passed to this
+         ;; function usually contain a GITHOST) because the IDs used to
+         ;; identify a repository in the database are based on WEBHOSTs.
+         (list (caddr elt)
+               (match-string 2 url)
+               (match-string 3 url))))
+      ((not relax)
+       ;; The host part didn't match any GITHOST in `forge-alist', but it
+       ;; might be a ssh host alias.  We have to relax strictness; in the
+       ;; extremely unlikely case that there is a common path between the
+       ;; HOST and the OWNER for this forge, we would incorrectly end up
+       ;; making that path part of the owner.
+       (forge--split-forge-url url t)))))
+
+;;; Identity
+
+(cl-defgeneric forge--object-id (class &rest args)
+  "Return the database id for the CLASS object specified by ARGS.")
+
+(cl-defgeneric forge--repository-ids ( class host owner name
+                                       &optional stub noerror)
+  "Return the database and forge ids for the specified CLASS object.")
+
+(defun forge--their-id (arg &optional type repo)
+  "Return the forge's ID for ARG.
+This deals with technical debt related to our handling of IDs."
+  (cond
+    (type
+     (pcase type
+       ('assignee
+        (forge-sql1 [:select [forge-id]
+                     :from assignee
+                     :where (and (= repository $s1)
+                                 (= login $s2))]
+                    (oref repo id) arg))
+       ('assignees
+        (forge-sql-car [:select [forge-id]
+                        :from assignee
+                        :where (and (= repository $s1)
+                                    (in login $v2))]
+                       (oref repo id)
+                       (vconcat arg)))
+       ('category
+        (forge-sql1 [:select [their-id]
+                     :from discussion-category
+                     :where (and (= repository $s1)
+                                 (= name $s2))]
+                    (oref repo id) arg))
+       ('label
+        (forge--their-id
+         (forge-sql1 [:select [id]
+                      :from label
+                      :where (and (= repository $s1)
+                                  (= name $s2))]
+                     (oref repo id) arg)))
+       ('labels
+        (mapcar (##forge--their-id % 'label repo) arg))
+       ('milestone
+        (forge--their-id
+         (forge-sql1 [:select [id] :from milestone :where (= title $s1)] arg)))))
+    ((stringp arg)
+     (car (last (split-string (base64-decode-string arg) ":"))))
+    ((slot-exists-p arg 'their-id)
+     (oref arg their-id))
+    ((slot-exists-p arg 'forge-id)
+     (oref arg forge-id))
+    ((forge--their-id (oref arg id)))))
+
+(cl-defmethod magit-section-ident-value ((obj forge-object))
+  "Return the value ob OBJ's `id' slot.
+Using OBJ itself would not be appropriate because multiple
+non-equal objects may exist, representing the same thing."
+  (oref obj id))
+
+(defun forge--set-connections (repo object slot list)
+  (closql-dset object slot
+               (let ((rid (oref repo id)))
+                 (mapcar (lambda (value)
+                           (forge--object-id
+                            rid
+                            (if (atom value)
+                                ;; For Gitlab labels we unfortunately only
+                                ;; get a string, the ambiguous name of the
+                                ;; label.  See also the comment in the
+                                ;; Gitlab `forge--update-labels' method.
+                                value
+                              (alist-get 'id value))))
+                         list))
+               t))
+
+;;; Format
+
+(cl-defgeneric forge--format (object slot &optional spec)
+  "Return a string based on SPEC and the format-string in OBJECT's SLOT.
+The available `format'-like specs depend on the type of OBJECT.
+SPEC can be used to add additional specs, as for `format-spec'.
+The latter override the former.  SLOT is expected to be class-
+allocated.  Some methods also accept a format string in place
+of SLOT.")
+
+(cl-defmethod forge--format-resource ((object forge-object) resource)
+  "Return an API resource based on RESOURCE and slots of OBJECT.
+This is used by `forge--rest' and by extension `forge-rest'.
+RESOURCE is a string separated by slashes.  Each part that begins
+with a colon is replaced with a value from OBJECT.  `:repo' is a
+synonym for `:name'.  `:project' is a like `:owner/:name', but the
+slash is quoted on Gitlab.  `:topic' is a synonym for `:number'
+but only if OBJECT is a topic.  Any other `:SLOT' means to use
+the value of that slot in OBJECT, or if that doesn't exist in its
+parent object (determined using `forge-get-parent')."
+  (save-match-data
+    (setq resource
+          (replace-regexp-in-string
+           ":\\([^/]+\\)"
+           (lambda (str)
+             (let ((slot (intern (substring str 1))))
+               (or (and$ (ignore-errors
+                           (pcase slot
+                             ('repo    (oref object name))
+                             ('project (concat (string-replace
+                                                "/" "%2F" (oref object owner))
+                                               "%2F"
+                                               (oref object name)))
+                             ('topic   (and (forge--childp object 'forge-topic)
+                                            (oref object number)))
+                             (_        (eieio-oref object slot))))
+                         (format "%s" $))
+                   str)))
+           resource t t))
+    (cond-let
+      ((not (string-match ":[^/]*" resource))
+       resource)
+      ([parent (ignore-errors (forge-get-parent object))]
+       (forge--format-resource parent resource))
+      ((error "Cannot resolve %s for a %s"
+              (match-string 0 resource)
+              (eieio-object-class object))))))
+
+;;; Miscellaneous
+
+(defun forge-refresh-buffer (&optional buffer)
+  "Refresh the current buffer, if it is a Magit or Forge buffer.
+
+Refresh the buffer if its major-mode derives from `magit-mode'
+or `forge-repository-list-mode'.  If optional BUFFER is non-nil,
+then refresh that buffer, provided it is alive and satisfies
+the mode requirement.
+
+When certain Forge menus are active, refresh them too."
+  (interactive)
+  (cond (buffer
+         (when (buffer-live-p buffer)
+           (with-current-buffer buffer
+             (forge-refresh-buffer))))
+        ((derived-mode-p 'forge-topic-mode)
+         (magit-refresh-buffer))
+        ((derived-mode-p 'magit-mode)
+         (magit-refresh-buffer))
+        ((and (derived-mode-p 'forge-topic-mode)
+              (boundp 'forge--buffer-topics-spec)
+              (oref forge--buffer-topics-spec global))
+         (revert-buffer))
+        ((derived-mode-p 'forge-repository-list-mode)
+         (revert-buffer)))
+  (when (transient-active-prefix
+         '(forge-topic-menu
+           forge-topics-menu
+           forge-notifications-menu))
+    (transient--refresh-transient)))
+
+(defun forge--sanitize-string (string)
+  ;; For Gitlab this may also be nil.
+  (if string (string-replace "\r\n" "\n" string) ""))
+
+(defun forge--buffer-substring-no-properties (&optional start end)
+  "Like `buffer-substring-no-properties' but the arguments are optional.
+Optional START defaults to the value of `point-min'.
+Optional END defaults to the value of `point-max'."
+  (buffer-substring-no-properties (or start (point-min))
+                                  (or end   (point-max))))
+
+(defun forge--uuid ()
+  "Return string with random (version 4) UUID."
+  ;; This is a copy of `org-id-uuid'.
+  ;; Only used in `forge-create-mark'.
+  (let ((rnd (md5 (format "%s%s%s%s%s%s%s"
+                          (random)
+                          (current-time)
+                          (user-uid)
+                          (emacs-pid)
+                          (user-full-name)
+                          user-mail-address
+                          (recent-keys)))))
+    (format "%s-%s-4%s-%s%s-%s"
+            (substring rnd 0 8)
+            (substring rnd 8 12)
+            (substring rnd 13 16)
+            (format "%x"
+                    (logior
+                     #b10000000
+                     (logand
+                      #b10111111
+                      (string-to-number
+                       (substring rnd 16 18) 16))))
+            (substring rnd 18 20)
+            (substring rnd 20 32))))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let"))
+;; End:
+(provide 'forge-core)
+;;; forge-core.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-core.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-core.elc
new file mode 100644
index 0000000..137a999
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-core.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-db.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-db.el
new file mode 100644
index 0000000..5c5669c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-db.el
@@ -0,0 +1,680 @@
+;;; forge-db.el --- Database implementation  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'closql)
+(require 'compat)
+(require 'eieio)
+(require 'emacsql)
+
+;; For `closql--db-update-schema':
+(declare-function forge--object-id "forge-core")
+(declare-function forge-get-issue "forge-core")
+(declare-function forge-get-pullreq "forge-core")
+(declare-function forge-get-repository "forge-core" (demand))
+
+(eval-when-compile
+  (cl-pushnew 'milestone eieio--known-slot-names)  ; forge-{issue,pullreq}
+  (cl-pushnew 'number    eieio--known-slot-names)) ; forge-{issue,pullreq,...}
+
+;;; Options
+
+(defcustom forge-database-file
+  (expand-file-name "forge-database.sqlite" user-emacs-directory)
+  "The file used to store the forge database."
+  :package-version '(forge . "0.1.0")
+  :group 'forge
+  :type 'file)
+
+;;; Core
+
+(defclass forge-database (closql-database)
+  ((name         :initform "Forge")
+   (object-class :initform 'forge-repository)
+   (file         :initform 'forge-database-file)
+   (schemata     :initform 'forge--db-table-schemata)
+   (version      :initform 15)))
+
+(defvar forge--override-connection-class nil)
+
+(defun forge-db (&optional livep)
+  (closql-db 'forge-database livep forge--override-connection-class))
+
+(defun forge-sql (sql &rest args)
+  (if (stringp sql)
+      (emacsql (forge-db) (apply #'format sql args))
+    (apply #'emacsql (forge-db) sql args)))
+
+(defun forge-sql1 (sql &rest args)
+  (caar (apply #'forge-sql sql args)))
+
+(defun forge-sql-car (sql &rest args)
+  (mapcar #'car (apply #'forge-sql sql args)))
+
+(defun forge-sql-cdr (sql &rest args)
+  (mapcar #'cdr (apply #'forge-sql sql args)))
+
+(defun forge-connect-database-once ()
+  "Try to connect Forge database on first use of `magit-status' only."
+  (remove-hook 'magit-status-mode-hook #'forge-connect-database-once)
+  (forge-db))
+(add-hook 'magit-status-mode-hook #'forge-connect-database-once)
+
+(defun forge-enable-sql-logging ()
+  "Enable logging Forge's SQL queries."
+  (interactive)
+  (let ((conn (oref (forge-db) connection)))
+    (emacsql-enable-debugging conn)
+    (switch-to-buffer-other-window (oref conn log-buffer))))
+
+;;; Schemata
+
+(defconst forge--db-table-schemata
+  '((repository
+     [(class :not-null)
+      (id :not-null :primary-key)
+      forge-id
+      forge
+      owner
+      name
+      apihost
+      githost
+      remote
+      condition
+      created
+      updated
+      pushed
+      parent
+      description
+      homepage
+      default-branch
+      archived-p
+      fork-p
+      locked-p
+      mirror-p
+      private-p
+      issues-p
+      wiki-p
+      stars
+      watchers
+      (assignees :default eieio-unbound)
+      (forks     :default eieio-unbound)
+      (issues    :default eieio-unbound)
+      (labels    :default eieio-unbound)
+      (revnotes  :default eieio-unbound)
+      (pullreqs  :default eieio-unbound)
+      selective-p
+      worktree
+      (milestones :default eieio-unbound)
+      issues-until
+      pullreqs-until
+      teams
+      (discussion-categories :default eieio-unbound)
+      (discussions           :default eieio-unbound)
+      discussions-p
+      discussions-until
+      ])
+
+    (assignee
+     [(repository :not-null)
+      (id :not-null :primary-key)
+      login
+      name
+      forge-id]
+     (:foreign-key
+      [repository] :references repository [id]
+      :on-delete :cascade))
+
+    (discussion
+     [(class :not-null)
+      (id :not-null :primary-key)
+      repository
+      number
+      answer
+      state
+      author
+      title
+      created
+      updated
+      closed
+      status
+      locked-p
+      category
+      body
+      (cards        :default eieio-unbound)
+      (edits        :default eieio-unbound)
+      (labels       :default eieio-unbound)
+      (participants :default eieio-unbound)
+      (posts        :default eieio-unbound)
+      (reactions    :default eieio-unbound)
+      (timeline     :default eieio-unbound)
+      (marks        :default eieio-unbound)
+      note
+      their-id
+      slug
+      saved-p]
+     (:foreign-key
+      [repository] :references repository [id]
+      :on-delete :cascade))
+
+    (discussion-category
+     [(repository :not-null)
+      (id :not-null :primary-key)
+      their-id
+      name
+      emoji
+      answerable-p
+      description]
+     (:foreign-key
+      [repository] :references repository [id]
+      :on-delete :cascade))
+
+    (discussion-label
+     [(discussion :not-null)
+      (id :not-null)]
+     (:foreign-key
+      [discussion] :references discussion [id]
+      :on-delete :cascade)
+     (:foreign-key
+      [id] :references label [id]
+      :on-delete :cascade))
+
+    (discussion-mark
+     [(discussion :not-null)
+      (id :not-null)]
+     (:foreign-key
+      [discussion] :references discussion [id]
+      :on-delete :cascade)
+     (:foreign-key
+      [id] :references mark [id]
+      :on-delete :cascade))
+
+    (discussion-post ; aka top-level answer
+     [(class :not-null)
+      (id :not-null :primary-key)
+      their-id
+      number
+      discussion
+      author
+      created
+      updated
+      body
+      (edits        :default eieio-unbound)
+      (reactions    :default eieio-unbound)
+      (replies      :default eieio-unbound)]
+     (:foreign-key
+      [discussion] :references discussion [id]
+      :on-delete :cascade))
+
+    (discussion-reply ; aka nested reply to top-level answer
+     [(class :not-null)
+      (id :not-null :primary-key)
+      their-id
+      number
+      post
+      discussion
+      author
+      created
+      updated
+      body
+      (edits        :default eieio-unbound)
+      (reactions    :default eieio-unbound)]
+     (:foreign-key
+      [post] :references discussion-post [id]
+      :on-delete :cascade)
+     (:foreign-key
+      [discussion] :references discussion [id]
+      :on-delete :cascade))
+
+    (fork
+     [(parent :not-null)
+      (id :not-null :primary-key)
+      owner
+      name]
+     (:foreign-key
+      [parent] :references repository [id]
+      :on-delete :cascade))
+
+    (issue
+     [(class :not-null)
+      (id :not-null :primary-key)
+      repository
+      number
+      state
+      author
+      title
+      created
+      updated
+      closed
+      status
+      locked-p
+      milestone
+      body
+      (assignees    :default eieio-unbound)
+      (cards        :default eieio-unbound)
+      (edits        :default eieio-unbound)
+      (labels       :default eieio-unbound)
+      (participants :default eieio-unbound)
+      (posts        :default eieio-unbound)
+      (reactions    :default eieio-unbound)
+      (timeline     :default eieio-unbound)
+      (marks        :default eieio-unbound)
+      note
+      their-id
+      slug
+      saved-p]
+     (:foreign-key
+      [repository] :references repository [id]
+      :on-delete :cascade))
+
+    (issue-assignee
+     [(issue :not-null)
+      (id :not-null)]
+     (:foreign-key
+      [issue] :references issue [id]
+      :on-delete :cascade))
+
+    (issue-label
+     [(issue :not-null)
+      (id :not-null)]
+     (:foreign-key
+      [issue] :references issue [id]
+      :on-delete :cascade)
+     (:foreign-key
+      [id] :references label [id]
+      :on-delete :cascade))
+
+    (issue-mark
+     [(issue :not-null)
+      (id :not-null)]
+     (:foreign-key
+      [issue] :references issue [id]
+      :on-delete :cascade)
+     (:foreign-key
+      [id] :references mark [id]
+      :on-delete :cascade))
+
+    (issue-post
+     [(class :not-null)
+      (id :not-null :primary-key)
+      issue
+      number
+      author
+      created
+      updated
+      body
+      (edits :default eieio-unbound)
+      (reactions :default eieio-unbound)]
+     (:foreign-key
+      [issue] :references issue [id]
+      :on-delete :cascade))
+
+    (label
+     [(repository :not-null)
+      (id :not-null :primary-key)
+      name
+      color
+      description]
+     (:foreign-key
+      [repository] :references repository [id]
+      :on-delete :cascade))
+
+    (mark
+     [;; For now this is always nil because it seems more useful to
+      ;; share marks between repositories.  We cannot omit this slot
+      ;; though because `closql--iref' expects `id' to be the second
+      ;; slot.
+      repository
+      (id :not-null :primary-key)
+      name
+      face
+      description])
+
+    (milestone
+     [(repository :not-null)
+      (id :not-null :primary-key)
+      number
+      title
+      created
+      updated
+      due
+      closed
+      description]
+     (:foreign-key
+      [repository] :references repository [id]
+      :on-delete :cascade))
+
+    (notification
+     [(class :not-null)
+      (id :not-null :primary-key)
+      thread-id
+      repository
+      type
+      topic
+      url
+      title
+      reason
+      last-read
+      updated]
+     (:foreign-key
+      [repository] :references repository [id]
+      :on-delete :cascade))
+
+    (pullreq
+     [(class :not-null)
+      (id :not-null :primary-key)
+      repository
+      number
+      state
+      author
+      title
+      created
+      updated
+      closed
+      merged
+      status
+      locked-p
+      editable-p
+      cross-repo-p
+      base-ref
+      base-repo
+      head-ref
+      head-user
+      head-repo
+      milestone
+      body
+      (assignees       :default eieio-unbound)
+      (cards           :default eieio-unbound)
+      (commits         :default eieio-unbound)
+      (edits           :default eieio-unbound)
+      (labels          :default eieio-unbound)
+      (participants    :default eieio-unbound)
+      (posts           :default eieio-unbound)
+      (reactions       :default eieio-unbound)
+      (review-requests :default eieio-unbound)
+      (reviews         :default eieio-unbound)
+      (timeline        :default eieio-unbound)
+      (marks           :default eieio-unbound)
+      note
+      base-rev
+      head-rev
+      draft-p
+      their-id
+      slug
+      saved-p]
+     (:foreign-key
+      [repository] :references repository [id]
+      :on-delete :cascade))
+
+    (pullreq-assignee
+     [(pullreq :not-null)
+      (id :not-null)]
+     (:foreign-key
+      [pullreq] :references pullreq [id]
+      :on-delete :cascade))
+
+    (pullreq-label
+     [(pullreq :not-null)
+      (id :not-null)]
+     (:foreign-key
+      [pullreq] :references pullreq [id]
+      :on-delete :cascade)
+     (:foreign-key
+      [id] :references label [id]
+      :on-delete :cascade))
+
+    (pullreq-mark
+     [(pullreq :not-null)
+      (id :not-null)]
+     (:foreign-key
+      [pullreq] :references pullreq [id]
+      :on-delete :cascade)
+     (:foreign-key
+      [id] :references mark [id]
+      :on-delete :cascade))
+
+    (pullreq-post
+     [(class :not-null)
+      (id :not-null :primary-key)
+      pullreq
+      number
+      author
+      created
+      updated
+      body
+      (edits :default eieio-unbound)
+      (reactions :default eieio-unbound)]
+     (:foreign-key
+      [pullreq] :references pullreq [id]
+      :on-delete :cascade))
+
+    (pullreq-review-request
+     [(pullreq :not-null)
+      (id :not-null)]
+     (:foreign-key
+      [pullreq] :references pullreq [id]
+      :on-delete :cascade))
+
+    (revnote
+     [(class :not-null)
+      (id :not-null :primary-key)
+      repository
+      commit
+      file
+      line
+      author
+      body]
+     (:foreign-key
+      [repository] :references repository [id]
+      :on-delete :cascade))))
+
+(cl-defmethod closql--db-update-schema ((db forge-database))
+  (let ((version (closql--db-get-version db)))
+    (when (< version (oref-default 'forge-database version))
+      (forge--backup-database db)
+      (closql-with-transaction db
+        (forge--db-update-schema db version)))
+    (cl-call-next-method)))
+
+(defun forge--db-update-schema (db version)
+  (cl-macrolet
+      ((up (to &rest body)
+         `(when (= (1+ version) ,to)
+            (message "Upgrading Forge database from version %s to %s..."
+                     version ,to)
+            ,@body
+            (closql--db-set-version db ,to)
+            (message "Upgrading Forge database from version %s to %s...done"
+                     version ,to)
+            (setq version ,to))))
+    (up 3
+        (emacsql db [:create-table pullreq-review-request $S1]
+                 (cdr (assq 'pullreq-review-request forge--db-table-schemata))))
+    (up 4
+        (emacsql db [:drop-table notification])
+        (pcase-dolist (`(,table . ,schema) forge--db-table-schemata)
+          (when (memq table '(notification
+                              mark issue-mark pullreq-mark))
+            (emacsql db [:create-table $i1 $S2] table schema)))
+        (emacsql db [:alter-table issue   :add-column marks :default $s1] 'eieio-unbound)
+        (emacsql db [:alter-table pullreq :add-column marks :default $s1] 'eieio-unbound))
+    (up 5
+        (emacsql db [:alter-table repository :add-column selective-p :default nil]))
+    (up 6
+        (emacsql db [:alter-table repository :add-column worktree :default nil]))
+    (up 7
+        (emacsql db [:alter-table issue   :add-column note :default nil])
+        (emacsql db [:alter-table pullreq :add-column note :default nil])
+        (emacsql db [:create-table milestone $S1]
+                 (cdr (assq 'milestone forge--db-table-schemata)))
+        (emacsql db [:alter-table repository :add-column milestones :default $s1]
+                 'eieio-unbound)
+        (pcase-dolist (`(,repo-id ,issue-id ,milestone)
+                       (emacsql db [:select [repository id milestone]
+                                    :from issue
+                                    :where (notnull milestone)]))
+          (unless (stringp milestone)
+            (oset (forge-get-issue issue-id) milestone
+                  (forge--object-id repo-id (cdar milestone)))))
+        (pcase-dolist (`(,repo-id ,pullreq-id ,milestone)
+                       (emacsql db [:select [repository id milestone]
+                                    :from pullreq
+                                    :where (notnull milestone)]))
+          (unless (stringp milestone)
+            (oset (forge-get-pullreq pullreq-id) milestone
+                  (forge--object-id repo-id (cdar milestone))))))
+    (up 8
+        (emacsql db [:alter-table pullreq :add-column base-rev :default nil])
+        (emacsql db [:alter-table pullreq :add-column head-rev :default nil])
+        (emacsql db [:alter-table pullreq :add-column draft-p  :default nil]))
+    (up 9
+        (emacsql db [:alter-table pullreq :add-column their-id :default nil])
+        (emacsql db [:alter-table issue   :add-column their-id :default nil]))
+    (up 10
+        (emacsql db [:alter-table pullreq :add-column slug :default nil])
+        (emacsql db [:alter-table issue   :add-column slug :default nil])
+        (pcase-dolist (`(,id ,number ,type)
+                       (emacsql
+                        db
+                        [:select [pullreq:id pullreq:number repository:class]
+                         :from pullreq
+                         :join repository
+                         :on (= pullreq:repository repository:id)]))
+          (let ((gitlabp (memq type
+                               (append (closql-where-class-in
+                                        'forge-gitlab-repository--eieio-childp)
+                                       nil))))
+            (emacsql db [:update pullreq :set (= slug $s1) :where (= id $s2)]
+                     (format "%s%s" (if gitlabp "!" "#") number)
+                     id)))
+        (pcase-dolist (`(,id ,number)
+                       (emacsql db [:select [id number] :from issue]))
+          (emacsql db [:update issue :set (= slug $s1) :where (= id $s2)]
+                   (format "#%s" number)
+                   id)))
+    (up 11
+        (emacsql db [:drop-table notification])
+        (emacsql db [:create-table notification $S1]
+                 (cdr (assq 'notification forge--db-table-schemata)))
+        (emacsql db [:alter-table pullreq :rename-column unread-p :to status])
+        (emacsql db [:alter-table issue   :rename-column unread-p :to status])
+        (emacsql db [:alter-table pullreq :add-column saved-p :default nil])
+        (emacsql db [:alter-table issue   :add-column saved-p :default nil]))
+    (up 12
+        (emacsql db [:drop-table notification])
+        (emacsql db [:create-table notification $S1]
+                 (cdr (assq 'notification forge--db-table-schemata)))
+        (dolist (id (emacsql db [:select id :from issue :where (= state 'closed)]))
+          (emacsql db [:update issue :set (= state 'completed) :where (= id $s1)]
+                   id))
+        (dolist (id (emacsql db [:select id :from issue :where (isnull status)]))
+          (emacsql db [:update issue :set (= state 'done) :where (= id $s1)]
+                   id))
+        (dolist (id (emacsql db [:select id :from pullreq :where (= state 'closed)]))
+          (emacsql db [:update pullreq :set (= state 'rejected) :where (= id $s1)]
+                   id))
+        (dolist (id (emacsql db [:select id :from pullreq :where (isnull status)]))
+          (emacsql db [:update pullreq :set (= state 'done) :where (= id $s1)]
+                   id))
+        (emacsql db [:alter-table repository :add-column issues-until :default nil])
+        (emacsql db [:alter-table repository :add-column pullreqs-until :default nil]))
+    (up 13
+        (dolist (id (emacsql db [:select id :from repository
+                                 :where (isnull issues-until)]))
+          (emacsql
+           db [:update repository :set (= issues-until $s1) :where (= id $s2)]
+           (forge-sql1 [:select [updated] :from issue
+                        :where (= repository $s1)
+                        :order-by [(desc updated)]
+                        :limit 1]
+                       id)
+           id))
+        (dolist (id (emacsql db [:select id :from repository
+                                 :where (isnull pullreqs-until)]))
+          (emacsql
+           db [:update repository :set (= pullreqs-until $s1) :where (= id $s2)]
+           (forge-sql1 [:select [updated] :from pullreq
+                        :where (= repository $s1)
+                        :order-by [(desc updated)]
+                        :limit 1]
+                       id)
+           id))
+        (emacsql db [:alter-table repository :rename-column sparse-p :to condition])
+        (pcase-dolist (`(,id ,not-tracked)
+                       (emacsql db [:select [id condition] :from repository]))
+          (emacsql
+           db [:update repository :set (= condition $s1) :where (= id $s2)]
+           (if not-tracked :known :tracked)
+           id)))
+    (up 14
+        (emacsql db [:alter-table repository :add-column teams :default nil]))
+    (up 15
+        (emacsql db [:create-table discussion $S1]
+                 (cdr (assq 'discussion forge--db-table-schemata)))
+        (emacsql db [:create-table discussion-category $S1]
+                 (cdr (assq 'discussion-category forge--db-table-schemata)))
+        (emacsql db [:create-table discussion-label $S1]
+                 (cdr (assq 'discussion-label forge--db-table-schemata)))
+        (emacsql db [:create-table discussion-mark $S1]
+                 (cdr (assq 'discussion-mark forge--db-table-schemata)))
+        (emacsql db [:create-table discussion-post $S1]
+                 (cdr (assq 'discussion-post forge--db-table-schemata)))
+        (emacsql db [:create-table discussion-reply $S1]
+                 (cdr (assq 'discussion-reply forge--db-table-schemata)))
+        (emacsql db [:alter-table repository :add-column discussion-categories
+                     :default 'eieio-unbound])
+        (emacsql db [:alter-table repository :add-column discussions
+                     :default 'eieio-unbound])
+        (emacsql db [:alter-table repository :add-column discussions-p
+                     :default nil])
+        (emacsql db [:alter-table repository :add-column discussions-until
+                     :default nil]))
+    ))
+
+(defun forge--backup-database (db)
+  (let ((dst (concat (file-name-sans-extension forge-database-file)
+                     (format "-v%s" (caar (emacsql (oref db connection)
+                                                   [:pragma user-version])))
+                     (format-time-string "-%Y%m%d-%H%M")
+                     ".sqlite")))
+    (message "Copying Forge database to %s..." dst)
+    (copy-file forge-database-file dst)
+    (message "Copying Forge database to %s...done" dst)))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let"))
+;; End:
+(provide 'forge-db)
+;;; forge-db.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-db.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-db.elc
new file mode 100644
index 0000000..02ef87c
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-db.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-discussion.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-discussion.el
new file mode 100644
index 0000000..d694320
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-discussion.el
@@ -0,0 +1,293 @@
+;;; forge-discussion.el --- Discussion support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <jonas@bernoul.li>
+;; Maintainer: Jonas Bernoulli <jonas@bernoul.li>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+(require 'forge-post)
+(require 'forge-topic)
+
+;;; Classes
+
+(defclass forge-discussion (forge-topic)
+  ((closql-table         :initform 'discussion)
+   (closql-primary-key   :initform 'id)
+   (closql-order-by      :initform [(desc number)])
+   (closql-foreign-key   :initform 'repository)
+   (closql-class-prefix  :initform "forge-")
+   (id                   :initarg :id)
+   (repository           :initarg :repository)
+   (number               :initarg :number)
+   (answer               :initarg :answer)
+   (state                :initarg :state)
+   (author               :initarg :author)
+   (title                :initarg :title)
+   (created              :initarg :created)
+   (updated              :initarg :updated)
+   (closed               :initarg :closed)
+   (status               :initarg :status :initform nil)
+   (locked-p             :initarg :locked-p :initform nil)
+   (category             :initarg :category)
+   (body                 :initarg :body)
+   (project-cards) ; projectsCards
+   (edits) ; userContentEdits
+   (labels               :closql-tables (discussion-label label))
+   (participants)
+   (posts                :closql-class forge-discussion-post)
+   (reactions)
+   (timeline)
+   (marks                :closql-tables (discussion-mark mark))
+   (note                 :initarg :note     :initform nil)
+   (their-id             :initarg :their-id)
+   (slug                 :initarg :slug)
+   (saved-p              :initarg :saved-p :initform nil)
+   ))
+
+(defclass forge-discussion-post (forge-post)
+  ((closql-table         :initform 'discussion-post)
+   (closql-primary-key   :initform 'id)
+   (closql-order-by      :initform [(asc number)])
+   (closql-foreign-key   :initform 'discussion)
+   (closql-class-prefix  :initform "forge-discussion-")
+   (id                   :initarg :id)
+   (their-id             :initarg :their-id)
+   (number               :initarg :number)
+   (discussion           :initarg :discussion)
+   (author               :initarg :author)
+   (created              :initarg :created)
+   (updated              :initarg :updated)
+   (body                 :initarg :body)
+   (edits)
+   (reactions)
+   (replies              :closql-class forge-discussion-reply)
+   ))
+
+(defclass forge-discussion-reply (forge-post)
+  ((closql-table         :initform 'discussion-reply)
+   (closql-primary-key   :initform 'id)
+   (closql-order-by      :initform [(asc number)])
+   (closql-foreign-key   :initform 'post)
+   (closql-class-prefix  :initform "forge-discussion-")
+   (id                   :initarg :id)
+   (their-id             :initarg :their-id)
+   (number               :initarg :number)
+   (post                 :initarg :post)
+   (discussion           :initarg :discussion)
+   (author               :initarg :author)
+   (created              :initarg :created)
+   (updated              :initarg :updated)
+   (body                 :initarg :body)
+   (edits)
+   (reactions)
+   ))
+
+;;; Query
+;;;; Get
+
+(cl-defmethod forge-get-repository ((post forge-discussion-post))
+  (forge-get-repository (forge-get-discussion post)))
+
+(cl-defmethod forge-get-repository ((post forge-discussion-reply))
+  (forge-get-repository (forge-get-discussion post)))
+
+(cl-defmethod forge-get-topic ((post forge-discussion-post))
+  (forge-get-discussion post))
+
+(cl-defmethod forge-get-topic ((post forge-discussion-reply))
+  (forge-get-discussion post))
+
+(cl-defmethod forge-get-discussion ((disc forge-discussion))
+  disc)
+
+(cl-defmethod forge-get-discussion ((repo forge-repository) number)
+  (cl-assert (numberp number) t)
+  (closql-get (forge-db)
+              (forge--object-id 'forge-discussion repo number)
+              'forge-discussion))
+
+(cl-defmethod forge-get-discussion ((number integer))
+  (and$ (forge-get-repository :tracked nil 'notatpt)
+        (forge-get-discussion $ number)))
+
+(cl-defmethod forge-get-discussion ((id string))
+  (closql-get (forge-db) id 'forge-discussion))
+
+(cl-defmethod forge-get-discussion ((post forge-discussion-post))
+  (closql-get (forge-db)
+              (oref post discussion)
+              'forge-discussion))
+
+(cl-defmethod forge-get-discussion ((post forge-discussion-reply))
+  (closql-get (forge-db)
+              (oref post discussion)
+              'forge-discussion))
+
+;;;; Current
+
+(defun forge-current-chatter (&optional demand)
+  "Return the discussion or issue at point or being visited.
+If there is no such discussion or issue and DEMAND is non-nil, then
+signal an error."
+  (or (forge-discussion-at-point)
+      (forge-issue-at-point)
+      (and (or (forge-discussion-p forge-buffer-topic)
+               (forge-issue-p forge-buffer-topic))
+           forge-buffer-topic)
+      (and demand (user-error "No current discussion or issue"))))
+
+(defun forge-current-discussion (&optional demand)
+  "Return the discussion at point or being visited.
+If there is no such discussion and DEMAND is non-nil, then signal
+an error."
+  (or (forge-discussion-at-point)
+      (and (forge-discussion-p forge-buffer-topic)
+           forge-buffer-topic)
+      (and demand (user-error "No current discussion"))))
+
+(defun forge-discussion-at-point (&optional demand)
+  "Return the discussion at point.
+If there is no such discussion and DEMAND is non-nil, then signal
+an error."
+  (or (thing-at-point 'forge-discussion)
+      (magit-section-value-if 'discussion)
+      (and demand (user-error "No discussion at point"))))
+
+(put 'forge-discussion 'thing-at-point #'forge-thingatpt--discussion)
+(defun forge-thingatpt--discussion ()
+  (and-let ((_(thing-at-point-looking-at "#\\([0-9]+\\)\\_>"))
+            (number (string-to-number (match-string 1)))
+            (repo (forge--repo-for-thingatpt)))
+    (forge-get-discussion repo number)))
+
+;;; Read
+
+(defun forge-read-discussion (prompt)
+  "Read an active discussion with completion using PROMPT.
+
+Open, unread and pending discussions are considered active.
+Default to the current discussion, even if it isn't active.
+
+\\<forge-read-topic-minibuffer-map>While completion is in \
+progress, \\[forge-read-topic-lift-limit] lifts the limit, extending
+the completion candidates to include all discussions.
+
+If `forge-limit-topic-choices' is nil, then all candidates
+can be selected from the start."
+  (forge--read-topic prompt
+                     #'forge-current-discussion
+                     (forge--topics-spec :type 'discussion :active t)
+                     (forge--topics-spec :type 'discussion :active nil
+                                         :state nil :limit nil)))
+
+(defun forge-read-topic-category (&optional topic prompt)
+  (magit-completing-read
+   (or prompt "Category")
+   (mapcar #'caddr
+           (oref (forge-get-repository (or topic :tracked))
+                 discussion-categories))
+   nil t
+   (and topic (forge--format-topic-category topic))))
+
+(defun forge--select-discussion-answer (topic)
+  (if-let ((post (forge-post-at-point)))
+      (cond ((forge-discussion-p (forge-post-at-point))
+             (user-error "Cannot pick the question as its own answer"))
+            ((and$ (oref topic answer)
+                   (equal (oref post their-id)
+                          (forge--their-id $)))
+             nil)
+            (post))
+    (user-error "Point must be on an reply to mark it as the answer")))
+
+(defun forge--select-discussion-reply-target ()
+  (if-let ((answers (oref forge-buffer-topic posts)))
+      (let* ((format-answer
+              (lambda (answer)
+                (let ((text (oref answer body)))
+                  (save-match-data
+                    (cons (format "Reply to answer %S"
+                                  (if (string-match "\n" text)
+                                      (substring text 0 (match-beginning 0))
+                                    text))
+                          answer)))))
+             (new-answer (cons "Add new top-level answer" forge-buffer-topic))
+             (post (forge-post-at-point))
+             (default (cl-typecase post
+                        (forge-discussion-reply
+                         (funcall format-answer
+                                  (magit-section-parent-value
+                                   (magit-current-section))))
+                        (forge-discussion-post
+                         (funcall format-answer post))
+                        (forge-discussion new-answer)))
+             (choices (cons new-answer (mapcar format-answer answers))))
+        (cdr (assoc (magit-completing-read "Reply to: "
+                                           choices nil t nil nil default)
+                    choices)))
+    forge-buffer-topic))
+
+;;; Insert
+
+(defvar-keymap forge-discussions-section-map
+  "<remap> <magit-browse-thing>" #'forge-browse-discussions
+  "<remap> <magit-visit-thing>"  #'forge-list-discussions
+  "<remap> <forge--list-menu>"   #'forge-topics-menu
+  "<remap> <forge--item-menu>"   #'forge-topic-menu
+  "C-c C-n"                      #'forge-create-discussion)
+
+(defvar-keymap forge-discussion-section-map
+  :parent forge-common-map
+  "<remap> <magit-visit-thing>"  #'forge-visit-this-topic
+  "<remap> <forge--list-menu>"   #'forge-topics-menu
+  "<remap> <forge--item-menu>"   #'forge-topic-menu)
+
+(cl-defun forge-insert-discussions (&optional (spec nil sspec) heading)
+  "Insert a list of discussions, according to `forge--buffer-topics-spec'.
+Optional SPEC can be used to override that filtering specification,
+and optional HEADING to change the section heading."
+  (when-let* ((_(forge-db t))
+              (repo (forge-get-repository :tracked?))
+              (_(oref repo discussions-p))
+              (spec (if sspec spec (forge--clone-buffer-topics-spec)))
+              (_(memq (oref spec type) '(topic discussion))))
+    (oset spec type 'discussion)
+    (forge--insert-topics 'discussions
+                          (or heading "Discussions")
+                          (forge--list-topics spec repo))))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let"))
+;; End:
+(provide 'forge-discussion)
+;;; forge-discussion.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-discussion.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-discussion.elc
new file mode 100644
index 0000000..57cb577
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-discussion.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-forgejo.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-forgejo.el
new file mode 100644
index 0000000..3788e82
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-forgejo.el
@@ -0,0 +1,47 @@
+;;; forge-forgejo.el --- Forgejo support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+
+;;; Class
+
+(defclass forge-forgejo-repository (forge-unusedapi-repository)
+  ((issues-url-format         :initform "https://%h/%o/%n/issues")
+   (issue-url-format          :initform "https://%h/%o/%n/issues/%i")
+   ;; The anchor for the issue itself is .../%i#issue-%i
+   (issue-post-url-format     :initform "https://%h/%o/%n/issues/%i#issuecomment-%I")
+   (pullreqs-url-format       :initform "https://%h/%o/%n/pulls")
+   (pullreq-url-format        :initform "https://%h/%o/%n/pulls/%i")
+   (pullreq-post-url-format   :initform "https://%h/%o/%n/pulls/%i#issuecomment-%I")
+   (commit-url-format         :initform "https://%h/%o/%n/commit/%r")
+   (branch-url-format         :initform "https://%h/%o/%n/commits/branch/%r")
+   (remote-url-format         :initform "https://%h/%o/%n")
+   (blob-url-format           :initform "https://%h/%o/%n/src/%r/%f")
+   (create-issue-url-format   :initform "https://%h/%o/%n/issues/new")
+   (create-pullreq-url-format :initform "https://%h/%o/%n/pulls") ; sic
+   (pullreq-refspec :initform "+refs/pull/*/head:refs/pullreqs/*")))
+
+;;; _
+(provide 'forge-forgejo)
+;;; forge-forgejo.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-forgejo.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-forgejo.elc
new file mode 100644
index 0000000..9ebf4ea
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-forgejo.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitea.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitea.el
new file mode 100644
index 0000000..72d76c8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitea.el
@@ -0,0 +1,61 @@
+;;; forge-gitea.el --- Gitea support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+
+;;; Class
+
+(defclass forge-gitea-repository (forge-unusedapi-repository)
+  ((issues-url-format         :initform "https://%h/%o/%n/issues")
+   (issue-url-format          :initform "https://%h/%o/%n/issues/%i")
+   ;; The anchor for the issue itself is .../%i#issue-%i
+   (issue-post-url-format     :initform "https://%h/%o/%n/issues/%i#issuecomment-%I")
+   (pullreqs-url-format       :initform "https://%h/%o/%n/pulls")
+   (pullreq-url-format        :initform "https://%h/%o/%n/pulls/%i")
+   (pullreq-post-url-format   :initform "https://%h/%o/%n/pulls/%i#issuecomment-%I")
+   (commit-url-format         :initform "https://%h/%o/%n/commit/%r")
+   (branch-url-format         :initform "https://%h/%o/%n/commits/branch/%r")
+   (remote-url-format         :initform "https://%h/%o/%n")
+   (blob-url-format           :initform "https://%h/%o/%n/src/%r/%f")
+   (create-issue-url-format   :initform "https://%h/%o/%n/issues/new")
+   (create-pullreq-url-format :initform "https://%h/%o/%n/pulls") ; sic
+   (pullreq-refspec :initform "+refs/pull/*/head:refs/pullreqs/*")))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let"))
+;; End:
+(provide 'forge-gitea)
+;;; forge-gitea.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitea.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitea.elc
new file mode 100644
index 0000000..65fede7
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitea.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-github.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-github.el
new file mode 100644
index 0000000..830128e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-github.el
@@ -0,0 +1,1316 @@
+;;; forge-github.el --- Github support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge-client)
+(require 'forge-discussion)
+(require 'forge-issue)
+(require 'forge-pullreq)
+
+;;; Class
+
+(defclass forge-github-repository (forge-repository)
+  ((discussions-url-format     :initform "https://%h/%o/%n/discussions")
+   (discussion-url-format      :initform "https://%h/%o/%n/discussions/%i")
+   (discussion-post-url-format :initform "https://%h/%o/%n/discussions/%i#discussioncomment-%I")
+   (issues-url-format          :initform "https://%h/%o/%n/issues")
+   (issue-url-format           :initform "https://%h/%o/%n/issues/%i")
+   (issue-post-url-format      :initform "https://%h/%o/%n/issues/%i#issuecomment-%I")
+   (pullreqs-url-format        :initform "https://%h/%o/%n/pulls")
+   (pullreq-url-format         :initform "https://%h/%o/%n/pull/%i")
+   (pullreq-post-url-format    :initform "https://%h/%o/%n/pull/%i#issuecomment-%I")
+   (commit-url-format          :initform "https://%h/%o/%n/commit/%r")
+   (branch-url-format          :initform "https://%h/%o/%n/commits/%r")
+   (remote-url-format          :initform "https://%h/%o/%n")
+   (blob-url-format            :initform "https://%h/%o/%n/blob/%r/%f")
+   (create-issue-url-format    :initform "https://%h/%o/%n/issues/new")
+   (create-pullreq-url-format  :initform "https://%h/%o/%n/compare")
+   (pullreq-refspec            :initform "+refs/pull/*/head:refs/pullreqs/*")))
+
+;;; Query
+
+(defun forge--get-github-repository ()
+  (forge-github-repository-p (forge-get-repository :stub?)))
+
+;;; Pull
+;;;; GraphQL
+
+(defconst forge--github-sparse-repository-query
+  '(query
+    (  repository
+       [(owner $owner String!)
+        (name  $name  String!)]
+       name
+       id
+       createdAt
+       updatedAt
+       nameWithOwner
+       (parent nameWithOwner)
+       description
+       homepageUrl
+       (defaultBranchRef name)
+       isArchived
+       isFork
+       isLocked
+       isMirror
+       isPrivate
+       hasDiscussionsEnabled
+       hasIssuesEnabled
+       hasWikiEnabled
+       (licenseInfo name)
+       (stargazers totalCount)
+       (watchers totalCount))))
+
+(defconst forge--github-repository-query
+  `(query
+    (  repository
+       ,@(cdr (cadr forge--github-sparse-repository-query))
+       (  assignableUsers [(:edges t)]
+          id
+          login
+          name)
+       (  discussionCategories [(:edges t)]
+          id
+          name
+          emoji
+          isAnswerable
+          description)
+       (  discussions [(:edges 20)
+                       (:singular discussion number)
+                       (orderBy ((field UPDATED_AT) (direction DESC)))]
+          number
+          id
+          databaseId
+          url
+          stateReason
+          ;; Discussions lack isReadByViewer.
+          (answer id)
+          (author login)
+          title
+          createdAt
+          updatedAt
+          closedAt
+          locked
+          (category id)
+          body
+          (  comments [(:edges t)]
+             id
+             databaseId
+             (author login)
+             createdAt
+             updatedAt
+             body
+             (  replies [(:edges t)]
+                id
+                databaseId
+                (author login)
+                createdAt
+                updatedAt
+                body))
+          (   labels [(:edges t)] id))
+       (  issues [(:edges t)
+                  (:singular issue number)
+                  (orderBy ((field UPDATED_AT) (direction DESC)))]
+          number
+          id
+          state
+          stateReason
+          isReadByViewer
+          (author login)
+          title
+          createdAt
+          updatedAt
+          closedAt
+          locked
+          (milestone id)
+          body
+          (  assignees [(:edges t)] id)
+          (  comments [(:edges t)]
+             id
+             databaseId
+             (author login)
+             createdAt
+             updatedAt
+             body)
+          (  labels [(:edges t)] id))
+       (  labels [(:edges t) (:singular label id)]
+          id
+          name
+          color
+          description)
+       (  milestones [(:edges t) (:singular milestone id)]
+          id
+          number
+          title
+          createdAt
+          updatedAt
+          dueOn
+          closedAt
+          description)
+       (  pullRequests [(:edges t)
+                        (:singular pullRequest number)
+                        (orderBy ((field UPDATED_AT) (direction DESC)))]
+          number
+          id
+          state
+          isReadByViewer
+          (author login)
+          title
+          createdAt
+          updatedAt
+          closedAt
+          mergedAt
+          isDraft
+          locked
+          maintainerCanModify
+          isCrossRepository
+          (milestone id)
+          body
+          (baseRef name (repository nameWithOwner))
+          baseRefOid
+          (headRef name (repository (owner login) nameWithOwner))
+          headRefOid
+          (  assignees [(:edges t)] id)
+          (  reviewRequests [(:edges t)]
+             (requestedReviewer "... on User { id }\n"))
+          (  comments [(:edges t)]
+             id
+             databaseId
+             (author login)
+             createdAt
+             updatedAt
+             body)
+          (  labels [(:edges t)] id)))))
+
+;;;; Repository
+
+(cl-defmethod forge--pull ((repo forge-github-repository)
+                           &optional callback since)
+  (cl-assert (not (and since (forge-get-repository repo nil :tracked?))))
+  (setq forge--mode-line-buffer (current-buffer))
+  (forge--msg repo t nil "Pulling REPO")
+  (let ((buf (current-buffer)))
+    (forge--query repo
+      (if (oref repo selective-p)
+          forge--github-sparse-repository-query
+        forge--github-repository-query)
+      `((owner . ,(oref repo owner))
+        (name  . ,(oref repo name)))
+      :callback
+      (lambda (data)
+        (forge--msg repo t t   "Pulling REPO")
+        (forge--msg repo t nil "Storing REPO")
+        (closql-with-transaction (forge-db)
+          (let-alist data
+            (forge--update-repository  repo data)
+            (forge--update-assignees   repo .assignableUsers)
+            (forge--update-forks       repo .forks)
+            (forge--update-labels      repo .labels)
+            (forge--update-milestones  repo .milestones)
+            (forge--update-discussion-categories repo .discussionCategories)
+            (forge--update-discussions repo .discussions t)
+            (forge--update-issues      repo .issues t)
+            (forge--update-pullreqs    repo .pullRequests t)
+            (forge--update-revnotes    repo .commitComments))
+          (oset repo condition :tracked))
+        (forge--msg repo t t   "Storing REPO")
+        (cond
+          ((oref repo selective-p))
+          (callback (funcall callback))
+          ((forge--maybe-git-fetch repo buf))))
+      :narrow '(repository)
+      :until
+      ;; Keys have the form `FIELD-until', where FIELD is the name of a
+      ;; field of Repository objects.  See `ghub--graphql-walk-response'.
+      `((discussions-until  . ,(or since (oref repo discussions-until)))
+        (issues-until       . ,(or since (oref repo issues-until)))
+        (pullRequests-until . ,(or since (oref repo pullreqs-until)))))))
+
+(cl-defmethod forge--update-repository ((repo forge-github-repository) data)
+  (let-alist data
+    (oset repo created        .createdAt)
+    (oset repo updated        .updatedAt)
+    (oset repo pushed         .pushedAt)
+    (oset repo parent         .parent.nameWithOwner)
+    (oset repo description    .description)
+    (oset repo homepage       (and (not (equal .homepageUrl "")) .homepageUrl))
+    (oset repo default-branch .defaultBranchRef.name)
+    (oset repo archived-p     .isArchived)
+    (oset repo fork-p         .isFork)
+    (oset repo locked-p       .isLocked)
+    (oset repo mirror-p       .isMirror)
+    (oset repo private-p      .isPrivate)
+    (oset repo issues-p       .hasIssuesEnabled)
+    (oset repo discussions-p  .hasDiscussionsEnabled)
+    (oset repo wiki-p         .hasWikiEnabled)
+    (oset repo stars          .stargazers.totalCount)
+    (oset repo watchers       .watchers.totalCount)
+    (oset repo teams          (mapcar #'cdar .owner.teams))))
+
+(cl-defmethod forge--update-revnotes ((repo forge-github-repository) data)
+  (closql-with-transaction (forge-db)
+    (mapc (##forge--update-revnote repo %) data)))
+
+(cl-defmethod forge--update-revnote ((repo forge-github-repository) data)
+  (closql-with-transaction (forge-db)
+    (let-alist data
+      (closql-insert
+       (forge-db)
+       (forge-revnote
+        :id           (forge--object-id 'forge-revnote repo .id)
+        :repository   (oref repo id)
+        :commit       .commit.oid
+        :file         .path
+        :line         .position
+        :author       .author.login
+        :body         .body)
+       t))))
+
+(cl-defmethod forge--update-assignees ((repo forge-github-repository) data)
+  (oset repo assignees
+        (with-slots (id) repo
+          (mapcar (lambda (row)
+                    (let-alist row
+                      (list (forge--object-id id .id)
+                            .login
+                            .name
+                            .id)))
+                  (delete-dups data)))))
+
+(cl-defmethod forge--update-forks ((repo forge-github-repository) data)
+  (oset repo forks
+        (with-slots (id) repo
+          (mapcar (lambda (row)
+                    (let-alist row
+                      (nconc (forge--repository-ids
+                              (eieio-object-class repo)
+                              (oref repo githost)
+                              .owner.login
+                              .name)
+                             (list .owner.login
+                                   .name))))
+                  (delete-dups data)))))
+
+(cl-defmethod forge--update-labels ((repo forge-github-repository) data)
+  (oset repo labels
+        (with-slots (id) repo
+          (mapcar (lambda (row)
+                    (let-alist row
+                      (list (forge--object-id id .id)
+                            .name
+                            (concat "#" (downcase .color))
+                            .description)))
+                  (delete-dups data)))))
+
+(cl-defmethod forge--update-milestones ((repo forge-github-repository) data)
+  (oset repo milestones
+        (with-slots (id) repo
+          (mapcar (lambda (row)
+                    (let-alist row
+                      (list (forge--object-id id .id)
+                            .number
+                            .title
+                            .createdAt
+                            .updatedAt
+                            .dueOn
+                            .closedAt
+                            .description)))
+                  (delete-dups data)))))
+
+(cl-defmethod forge--update-discussion-categories ((repo forge-github-repository) data)
+  (oset repo discussion-categories
+        (with-slots (id) repo
+          (mapcar (lambda (row)
+                    (let-alist row
+                      (list (forge--object-id id .id)
+                            .id
+                            .name
+                            .emoji
+                            .isAnswerable
+                            .description)))
+                  (delete-dups data)))))
+
+;;;; Topics
+
+(cl-defmethod forge--pull-topic ((repo forge-github-repository)
+                                 (number number))
+  (forge--query repo
+    `(query
+      [($owner String!)
+       ($name  String!)]
+      (repository
+       [(owner $owner)
+        (name  $name)]
+       ,(caddr (caddr (ghub--graphql-prepare-query
+                       forge--github-repository-query
+                       `(repository discussions (discussion . ,number)))))
+       ,(caddr (caddr (ghub--graphql-prepare-query
+                       forge--github-repository-query
+                       `(repository issues (issue . ,number)))))
+       ,(caddr (caddr (ghub--graphql-prepare-query
+                       forge--github-repository-query
+                       `(repository pullRequests (pullreq . ,number)))))))
+    `((owner . ,(oref repo owner))
+      (name  . ,(oref repo name)))
+    :noerror t
+    :callback (lambda (data)
+                (let-alist data
+                  (cond ((setq data .repository.discussion)
+                         (forge--update-discussion repo data))
+                        ((setq data .repository.issue)
+                         (forge--update-issue repo data))
+                        ((setq data .repository.pullRequest)
+                         (forge--update-pullreq repo data))))
+                (forge-refresh-buffer))))
+
+(cl-defmethod forge--pull-topic ((repo forge-github-repository)
+                                 (topic forge-discussion))
+  (forge--pull-topic-1 repo #'forge--update-discussion
+    `(repository discussions (discussion . ,(oref topic number)))))
+
+(cl-defmethod forge--pull-topic ((repo forge-github-repository)
+                                 (topic forge-issue))
+  (forge--pull-topic-1 repo #'forge--update-issue
+    `(repository issues (issue . ,(oref topic number)))))
+
+(cl-defmethod forge--pull-topic ((repo forge-github-repository)
+                                 (topic forge-pullreq))
+  (forge--pull-topic-1 repo #'forge--update-pullreq
+    `(repository pullRequests (pullRequest . ,(oref topic number)))))
+
+(cl-defun forge--pull-topic-1 (repo update narrow)
+  (declare (indent defun))
+  (forge--query repo
+    (ghub--graphql-prepare-query forge--github-repository-query narrow)
+    `((owner . ,(oref repo owner))
+      (name  . ,(oref repo name)))
+    :callback (lambda (data)
+                (funcall update repo (cdr (cadr (cadr data))))
+                (forge-refresh-buffer))))
+
+(cl-defmethod forge--update-status ((repo forge-github-repository)
+                                    topic data bump initial-pull)
+  (let-alist data
+    (let ((updated (or .updatedAt .createdAt))
+          (current-status (oref topic status)))
+      (if (forge-discussion-p topic)
+          ;; Discussions lack `isReadByViewer', so we have to use a
+          ;; heuristic, which is even worse than what we use for other
+          ;; topic types.  Except during the repository's initial pull,
+          ;; all new discussions start out as `unread'.
+          ;;
+          ;; If we pull a discussion after the user mutated it, setting
+          ;; the status to `unread' is highly undesirable (since they made
+          ;; the mutation, they have already "read" it), yet that is what
+          ;; we do here.  However, the callback used by the discussion
+          ;; method of `forge--pull-topic', afterwards resets the status
+          ;; to the previous value.
+          ;;
+          ;; Of course it is possible that we pull other changes by other
+          ;; people at the same time, but we have no (reasonable) way of
+          ;; knowing that.  So in that case too the status sadly doesn't
+          ;; end up as `unread'.
+          ;;
+          ;; The callback kludge is not needed for all mutations.  Some
+          ;; mutations (e.g., setting labels) do not cause `updated_at'
+          ;; to be bumped; this second defect cancels out the first.
+          (cond (initial-pull
+                 (oset topic status 'done))
+                ((null current-status)
+                 (oset topic status 'unread))
+                ((string> updated (oref topic updated))
+                 (oset topic status 'unread)))
+        (cond ((not .isReadByViewer)
+               (oset topic status 'unread))
+              (initial-pull
+               (oset topic status 'done))
+              ((null current-status)
+               (oset topic status 'pending))
+              ((string> updated (oref topic updated))
+               (oset topic status 'pending))))
+      (oset topic updated updated)
+      (when bump
+        (let* ((slot (cl-typecase topic
+                       (forge-discussion 'discussions-until)
+                       (forge-issue      'issues-until)
+                       (forge-pullreq    'pullreqs-until)))
+               (until (eieio-oref repo slot)))
+          (when (or (not until) (string> updated until))
+            (eieio-oset repo slot updated)))))))
+
+;;;; Discussions
+
+(cl-defmethod forge--update-discussions ((repo forge-github-repository) data bump)
+  (closql-with-transaction (forge-db)
+    (let ((initial-pull (not (oref repo discussions-until))))
+      (dolist (elt data)
+        (forge--update-discussion repo elt bump initial-pull)))))
+
+(cl-defmethod forge--update-discussion ((repo forge-github-repository) data
+                                        &optional bump initial-pull)
+  (let ((repo-id (oref repo id))
+        discussion-id discussion)
+    (let-alist data
+      (closql-with-transaction (forge-db)
+        (setq discussion-id (forge--object-id 'forge-discussion repo .number))
+        (setq discussion (or (forge-get-discussion repo .number)
+                             (closql-insert
+                              (forge-db)
+                              (forge-discussion :id         discussion-id
+                                                :repository repo-id
+                                                :number     .number))))
+        (oset discussion their-id   .id)
+        (oset discussion slug       (format "#%s" .number))
+        (oset discussion author     .author.login)
+        (oset discussion title      .title)
+        (oset discussion created    .createdAt)
+        (oset discussion closed     .closedAt)
+        (oset discussion locked-p   .locked)
+        (oset discussion category   (forge--object-id repo-id .category.id))
+        (oset discussion body       (forge--sanitize-string .body))
+        (oset discussion answer
+              (and .answer.id
+                   (forge--object-id discussion-id .answer.id)))
+        (oset discussion state
+              (pcase-exhaustive .stateReason
+                ("RESOLVED"  'completed) ;sic
+                ("DUPLICATE" 'duplicate)
+                ("OUTDATED"  'outdated)
+                ("REOPENED"  'open)
+                ('nil        'open)))
+        (dolist (p .comments)
+          (let-alist p
+            (let ((post-id (forge--object-id discussion-id .databaseId)))
+              (closql-insert
+               (forge-db)
+               (forge-discussion-post
+                :id         post-id
+                :their-id   .id
+                :number     .databaseId
+                :discussion discussion-id
+                :author     .author.login
+                :created    .createdAt
+                :updated    .updatedAt
+                :body       (forge--sanitize-string .body))
+               t)
+              (dolist (reply-data .replies)
+                (let-alist reply-data
+                  (closql-insert
+                   (forge-db)
+                   (forge-discussion-reply
+                    :id         (forge--object-id discussion-id .databaseId)
+                    :their-id   .id
+                    :number     .databaseId
+                    :post       post-id
+                    :discussion discussion-id
+                    :author     .author.login
+                    :created    .createdAt
+                    :updated    .updatedAt
+                    :body       (forge--sanitize-string .body))
+                   t))))))
+        (forge--update-status repo discussion data bump initial-pull))
+      (forge--set-connections repo discussion 'labels .labels)
+      discussion)))
+
+;;;; Issues
+
+(cl-defmethod forge--update-issues ((repo forge-github-repository) data
+                                    &optional bump)
+  (closql-with-transaction (forge-db)
+    (let ((initial-pull (not (oref repo issues-until))))
+      (dolist (elt data)
+        (forge--update-issue repo elt bump initial-pull)))))
+
+(cl-defmethod forge--update-issue ((repo forge-github-repository) data
+                                   &optional bump initial-pull)
+  (let ((repo-id (oref repo id))
+        issue-id issue)
+    (let-alist data
+      (closql-with-transaction (forge-db)
+        (setq issue-id (forge--object-id 'forge-issue repo .number))
+        (setq issue (or (forge-get-issue repo .number)
+                        (closql-insert
+                         (forge-db)
+                         (forge-issue :id         issue-id
+                                      :repository repo-id
+                                      :number     .number))))
+        (oset issue their-id   .id)
+        (oset issue slug       (format "#%s" .number))
+        (oset issue state
+              (pcase-exhaustive (list .stateReason .state)
+                ('("COMPLETED"   "CLOSED") 'completed)
+                ('("NOT_PLANNED" "CLOSED") 'unplanned)
+                ('("DUPLICATE"   "CLOSED") 'duplicate)
+                ('("REOPENED"      "OPEN") 'open)
+                ('(nil             "OPEN") 'open)))
+        (oset issue author     .author.login)
+        (oset issue title      .title)
+        (oset issue created    .createdAt)
+        (oset issue closed     .closedAt)
+        (oset issue locked-p   .locked)
+        (oset issue milestone  (forge--object-id repo-id .milestone.id))
+        (oset issue body       (forge--sanitize-string .body))
+        (dolist (c .comments)
+          (let-alist c
+            (closql-insert
+             (forge-db)
+             (forge-issue-post
+              :id      (forge--object-id issue-id .databaseId)
+              :issue   issue-id
+              :number  .databaseId
+              :author  .author.login
+              :created .createdAt
+              :updated .updatedAt
+              :body    (forge--sanitize-string .body))
+             t)))
+        (forge--update-status repo issue data bump initial-pull))
+      (forge--set-connections repo issue 'assignees .assignees)
+      (forge--set-connections repo issue 'labels .labels))
+    issue))
+
+;;;; Pullreqs
+
+(cl-defmethod forge--update-pullreqs ((repo forge-github-repository) data
+                                      &optional bump)
+  (closql-with-transaction (forge-db)
+    (let ((initial-pull (not (oref repo pullreqs-until))))
+      (dolist (elt data)
+        (forge--update-pullreq repo elt bump initial-pull)))))
+
+(cl-defmethod forge--update-pullreq ((repo forge-github-repository) data
+                                     &optional bump initial-pull)
+  (let ((repo-id (oref repo id))
+        pullreq-id pullreq)
+    (let-alist data
+      (closql-with-transaction (forge-db)
+        (setq pullreq-id (forge--object-id 'forge-pullreq repo .number))
+        (setq pullreq (or (forge-get-pullreq repo .number)
+                          (closql-insert
+                           (forge-db)
+                           (forge-pullreq :id         pullreq-id
+                                          :repository repo-id
+                                          :number     .number))))
+        (oset pullreq their-id     .id)
+        (oset pullreq slug         (format "#%s" .number))
+        (oset pullreq state        (pcase-exhaustive .state
+                                     ("MERGED" 'merged)
+                                     ("CLOSED" 'rejected)
+                                     ("OPEN"   'open)))
+        (oset pullreq author       .author.login)
+        (oset pullreq title        .title)
+        (oset pullreq created      .createdAt)
+        (oset pullreq closed       .closedAt)
+        (oset pullreq merged       .mergedAt)
+        (oset pullreq draft-p      .isDraft)
+        (oset pullreq locked-p     .locked)
+        (oset pullreq editable-p   .maintainerCanModify)
+        (oset pullreq cross-repo-p .isCrossRepository)
+        (oset pullreq base-ref     .baseRef.name)
+        (oset pullreq base-rev     .baseRefOid)
+        (oset pullreq base-repo    .baseRef.repository.nameWithOwner)
+        (oset pullreq head-ref     .headRef.name)
+        (oset pullreq head-rev     .headRefOid)
+        (oset pullreq head-user    .headRef.repository.owner.login)
+        (oset pullreq head-repo    .headRef.repository.nameWithOwner)
+        (oset pullreq milestone    (forge--object-id repo-id .milestone.id))
+        (oset pullreq body         (forge--sanitize-string .body))
+        (dolist (p .comments)
+          (let-alist p
+            (closql-insert
+             (forge-db)
+             (forge-pullreq-post
+              :id      (forge--object-id pullreq-id .databaseId)
+              :pullreq pullreq-id
+              :number  .databaseId
+              :author  .author.login
+              :created .createdAt
+              :updated .updatedAt
+              :body    (forge--sanitize-string .body))
+             t)))
+        (forge--update-status repo pullreq data bump initial-pull))
+      (forge--set-connections repo pullreq 'assignees .assignees)
+      (forge--set-connections repo pullreq 'review-requests
+                              (mapcar (##alist-get 'requestedReviewer %)
+                                      .reviewRequests))
+      (forge--set-connections repo pullreq 'labels .labels))
+    pullreq))
+
+;;;; Notifications
+
+(cl-defmethod forge--pull-notifications
+  ((_class (subclass forge-github-repository)) githost &optional callback)
+  ;; The GraphQL API doesn't support notifications and support in the
+  ;; REST API is abysmal -- forcing us to perform a major rain dance.
+  (let ((buffer (current-buffer))
+        (spec (forge--get-forge-host githost t)))
+    (forge--msg nil t nil "Pulling notifications")
+    (pcase-let*
+        ((`(,_ ,apihost ,forge ,_) spec)
+         (since (forge--ghub-notifications-since forge))
+         (notifs
+          (seq-keep (lambda (data)
+                      ;; Github returns notifications for repositories the
+                      ;; user no longer has access to.  Trying to retrieve
+                      ;; information for such repositories leads to errors,
+                      ;; which we suppress.  See #164.
+                      (with-demoted-errors "forge--pull-notifications: %S"
+                        (forge--ghub-massage-notification data githost)))
+                    (forge-rest apihost "GET" "/notifications"
+                      ((all t)
+                       (and since (since since)))
+                      :unpaginate t)))
+         ;; Split into multiple requests to reduce risk of timeouts.
+         (groups (seq-partition notifs 50))
+         (pages  (length groups))
+         (page   0)
+         (topics nil))
+      (cl-labels
+          ((cb (&optional data _headers _status _req)
+             (when data
+               (setq topics (nconc topics (cdr data))))
+             (if groups
+                 (let* ((query (cons 'query (seq-keep #'caddr (pop groups))))
+                        (tries 3)
+                        (errorback nil)
+                        (vacuum (lambda ()
+                                  (forge--query apihost query nil
+                                    :callback #'cb
+                                    :errorback errorback))))
+                   ;; Github also returns notifications for issues
+                   ;; belonging to repositories for which issues
+                   ;; have been disabled.  Drop them and try again.
+                   (setq errorback
+                         (lambda (errors _headers _status _req)
+                           (if (zerop tries)
+                               (ghub--signal-error errors)
+                             (decf tries)
+                             (cond-let
+                               ([notfound
+                                 (seq-keep
+                                  (lambda (err)
+                                    (and (equal (cdr (assq 'type err))
+                                                "NOT_FOUND")
+                                         (cadr (assq 'path err))
+                                         (intern (cadr (assq 'path err)))))
+                                  (cdr errors))]
+                                (setq query (cl-delete-if (##memq % notfound)
+                                                          query :key #'caar))
+                                (funcall vacuum))
+                               ((ghub--signal-error errors))))))
+                   (incf page)
+                   (forge--msg nil t nil
+                               "Pulling notifications (page %s/%s)" page pages)
+                   (funcall vacuum))
+               (forge--msg nil t t   "Pulling notifications")
+               (forge--msg nil t nil "Storing notifications")
+               (forge--ghub-update-notifications notifs topics (not since))
+               (forge--msg nil t t "Storing notifications")
+               (forge-refresh-buffer buffer)
+               (when callback
+                 (funcall callback)))))
+        (cb)))))
+
+(defun forge--ghub-notifications-since (forge)
+  (forge-sql1 [:select :distinct [notification:updated]
+               :from [notification repository]
+               :where (and (= repository:forge $s1)
+                           (= repository:id notification:repository))
+               :order-by [(desc notification:updated)]]
+              forge))
+
+(defun forge--ghub-massage-notification (data githost)
+  (let-alist data
+    (let* ((type (intern (downcase .subject.type)))
+           (type (if (eq type 'pullrequest) 'pullreq type))
+           (_ (unless (memq type '( discussion issue pullreq
+                                    commit release))
+                (error "BUG: New unsupported notification type: %s" type)))
+           (number-or-commit (and .subject.url
+                                  (string-match "[^/]*\\'" .subject.url)
+                                  (match-string 0 .subject.url)))
+           (number (and (memq type '(discussion issue pullreq))
+                        (string-to-number number-or-commit)))
+           (repo   (forge-get-repository
+                    (list githost
+                          .repository.owner.login
+                          .repository.name)
+                    nil :insert!))
+           (repoid (oref repo id))
+           (owner  (oref repo owner))
+           (name   (oref repo name))
+           (id     (forge--object-id repoid (string-to-number .id)))
+           (alias  (intern (concat "_" (string-replace "=" "_" id)))))
+      (and number
+           (list alias id
+                 `((,alias repository)
+                   [(name ,name)
+                    (owner ,owner)]
+                   ,@(cddr
+                      (caddr
+                       (ghub--graphql-prepare-query
+                        forge--github-repository-query
+                        (pcase type
+                          ('discussion `(repository
+                                         discussions
+                                         (discussion . ,number)))
+                          ('issue      `(repository
+                                         issues
+                                         (issue . ,number)))
+                          ('pullreq    `(repository
+                                         pullRequest
+                                         (pullRequest . ,number))))))))
+                 repo type data)))))
+
+(defun forge--ghub-update-notifications (notifs topics initial-pull)
+  (closql-with-transaction (forge-db)
+    (pcase-dolist (`(,alias ,id ,_query ,repo ,type ,data) notifs)
+      (let-alist data
+        (when-let*
+            ((topic-data (cdr (cadr (assq alias topics))))
+             (topic (funcall (pcase-exhaustive type
+                               ('discussion #'forge--update-discussion)
+                               ('issue      #'forge--update-issue)
+                               ('pullreq    #'forge--update-pullreq))
+                             repo topic-data nil initial-pull))
+             (notif (or (forge-get-notification id)
+                        (closql-insert (forge-db)
+                                       (forge-notification
+                                        :id           id
+                                        :thread-id    .id
+                                        :repository   (oref repo id)
+                                        :type         type
+                                        :topic        (oref topic id)
+                                        :url          .subject.url)))))
+          (oset notif title     .subject.title)
+          (oset notif reason    (intern (downcase .reason)))
+          (oset notif last-read .last_read_at)
+          (oset notif updated   .updated_at))))))
+
+;;;; Miscellaneous
+
+(cl-defmethod forge--add-user-repos
+  ((class (subclass forge-github-repository)) host user)
+  (forge--fetch-user-repos
+   class (forge--as-apihost host) user
+   (partial #'forge--batch-add-callback (forge--as-githost host) user)))
+
+(cl-defmethod forge--add-organization-repos
+  ((class (subclass forge-github-repository)) host org)
+  (forge--fetch-organization-repos
+   class (forge--as-apihost host) org
+   (partial #'forge--batch-add-callback (forge--as-githost host) org)))
+
+(cl-defmethod forge--fetch-user-repos
+  ((_ (subclass forge-github-repository)) host user callback)
+  (forge-query host
+    (user [(login $login String!)]
+          (repositories [(:edges t) (ownerAffiliations . (OWNER))] name))
+    ((login user))
+    :callback (lambda (d)
+                (funcall callback
+                         (mapcar (##alist-get 'name %)
+                                 (let-alist d .user.repositories))))))
+
+(cl-defmethod forge--fetch-organization-repos
+  ((_ (subclass forge-github-repository)) host org callback)
+  (forge-query host
+    (organization [(login $login String!)]
+                  (repositories [(:edges t)] name))
+    ((login org))
+    :callback (lambda (d)
+                (funcall callback
+                         (mapcar (##alist-get 'name %)
+                                 (let-alist d .organization.repositories))))))
+
+(defun forge--batch-add-callback (host owner names)
+  (let ((repos (mapcan (lambda (name)
+                         (let ((repo (forge-get-repository
+                                      (list host owner name)
+                                      nil :insert!)))
+                           (and (not (forge-get-repository repo nil :tracked?))
+                                (list repo))))
+                       names))
+        (cb nil))
+    (setq cb (lambda ()
+               (when-let ((repo (pop repos)))
+                 (forge--pull repo cb))))
+    (funcall cb)))
+
+;;; Mutations
+
+(cl-defmethod forge--submit-create-discussion ((repo forge-github-repository) _)
+  (pcase-let ((`(,title . ,body) (forge--post-buffer-text)))
+    (forge-mutate repo createDiscussion
+      ((repositoryId (forge--their-id repo))
+       (categoryId (forge--their-id forge--buffer-category 'category repo))
+       (title title)
+       (body  body))
+      :callback  (forge--post-submit-callback t)
+      :errorback (forge--post-submit-errorback))))
+
+(cl-defmethod forge--submit-create-issue ((repo forge-github-repository) _)
+  (pcase-let ((`(,title . ,body) (forge--post-buffer-text)))
+    (forge-mutate repo createIssue
+      ((repositoryId (forge--their-id repo))
+       (title title)
+       (body  body)
+       (and forge--buffer-milestone
+            (milestoneId
+             (forge--their-id forge--buffer-milestone 'milestone)))
+       (and forge--buffer-labels
+            (labelIds
+             (vconcat (forge--their-id forge--buffer-labels 'labels repo))))
+       (and forge--buffer-assignees
+            (assigneeIds
+             (vconcat (forge--their-id forge--buffer-assignees 'assignees repo)))))
+      :callback  (forge--post-submit-callback t)
+      :errorback (forge--post-submit-errorback))))
+
+(cl-defmethod forge--create-pullreq-from-issue
+  ((repo  forge-github-repository)
+   (issue forge-issue)
+   source target)
+  (pcase-let* ((`(,base-remote . ,base-branch)
+                (magit-split-branch-name target))
+               (`(,head-remote . ,head-branch)
+                (magit-split-branch-name source))
+               (head-repo (forge-get-repository :stub head-remote)))
+    (forge-rest repo "POST" "/repos/:owner/:repo/pulls"
+      ((issue (oref issue number))
+       (base base-branch)
+       (head (if (equal head-remote base-remote)
+                 head-branch
+               (concat (oref head-repo owner) ":" head-branch)))
+       (maintainer_can_modify t))
+      :callback  (lambda (&rest _)
+                   (closql-delete issue)
+                   (forge--pull repo))
+      :errorback (lambda (&rest _) (forge--pull repo)))))
+
+(cl-defmethod forge--submit-create-pullreq ((repo forge-github-repository) _)
+  (pcase-let* ((`(,title . ,body) (forge--post-buffer-text))
+               (`(,base-remote . ,base-branch)
+                (magit-split-branch-name forge--buffer-base-branch))
+               (`(,head-remote . ,head-branch)
+                (magit-split-branch-name forge--buffer-head-branch))
+               (head-repo (forge-get-repository :stub head-remote)))
+    ;; Cannot use `createPullRequest' because value for
+    ;; `headRepositoryId' is unavailable.
+    (forge-rest repo "POST" "/repos/:owner/:repo/pulls"
+      ((title title)
+       (body  body)
+       (base  base-branch)
+       (head  (if (equal head-remote base-remote)
+                  head-branch
+                (concat (oref head-repo owner) ":" head-branch)))
+       (draft forge--buffer-draft-p)
+       (maintainer_can_modify t))
+      :callback  (forge--post-submit-callback t)
+      :errorback (forge--post-submit-errorback))))
+
+(cl-defmethod forge--submit-create-post
+  ((repo forge-github-repository)
+   (post forge-post))
+  (forge-mutate repo addComment
+    ((subjectId (oref post their-id))
+     (body      (string-trim (buffer-str))))
+    :callback  (forge--post-submit-callback)
+    :errorback (forge--post-submit-errorback)))
+
+(cl-defmethod forge--submit-create-post
+  ((repo forge-github-repository)
+   (post forge-discussion-post))
+  (forge-mutate repo addDiscussionComment
+    ((discussionId (oref (forge-get-discussion post) their-id))
+     (replyToId    (oref post their-id))
+     (body         (string-trim (buffer-str))))
+    :callback  (forge--post-submit-callback)
+    :errorback (forge--post-submit-errorback)))
+
+(cl-defmethod forge--submit-create-post
+  ((repo forge-github-repository)
+   (post forge-discussion))
+  (forge-mutate repo addDiscussionComment
+    ((discussionId (oref post their-id))
+     (body         (string-trim (buffer-str))))
+    :callback  (forge--post-submit-callback)
+    :errorback (forge--post-submit-errorback)))
+
+(cl-defmethod forge--submit-edit-post
+  ((repo forge-github-repository)
+   (post forge-post))
+  (cl-typecase post
+    ((or forge-issue-post forge-pullreq-post)
+     ;; Cannot use GraphQL because we made the mistake to derive our ID
+     ;; from the number instead of their ID.  `updatePullRequestComment'
+     ;; (or something equivalent under an inconsistent name) does not
+     ;; exist, so for that we would have to continue to use REST anyway.
+     (forge-rest post "PATCH" "/repos/:owner/:repo/issues/comments/:number"
+       ((body (string-trim (buffer-str))))
+       :callback  (forge--post-submit-callback)
+       :errorback (forge--post-submit-errorback)))
+    (t
+     (forge--query repo
+       `(mutation (,(cl-etypecase post
+                      (forge-discussion       'updateDiscussion)
+                      (forge-issue            'updateIssue)
+                      (forge-pullreq          'updatePullRequest)
+                      (forge-discussion-post  'updateDiscussionComment)
+                      (forge-discussion-reply 'updateDiscussionComment)
+                      (forge-issue-post       'updateIssueComment)
+                      (forge-pullreq-post     'updatePullRequestComment))
+                   [(input
+                     $input
+                     ,(cl-etypecase post
+                        (forge-discussion       'UpdateDiscussionInput!)
+                        (forge-issue            'UpdateIssueInput!)
+                        (forge-pullreq          'UpdatePullRequestInput!)
+                        (forge-discussion-post  'UpdateDiscussionCommentInput!)
+                        (forge-discussion-reply 'UpdateDiscussionCommentInput!)
+                        (forge-issue-post       'UpdateIssueCommentInput!)
+                        (forge-pullreq-post     'UpdatePullRequestCommentInput!)))]
+                   clientMutationId))
+       `((input (,(cl-etypecase post
+                    (forge-discussion       'discussionId)
+                    (forge-issue            'id)
+                    (forge-pullreq          'pullRequestId)
+                    (forge-discussion-post  'commentId)
+                    (forge-discussion-reply 'commentId)
+                    (forge-issue-post       'id)
+                    (forge-pullreq-post     'id))
+                 . ,(forge--their-id post))
+                ,@(if (cl-typep post 'forge-topic)
+                      (pcase-let ((`(,title . ,body) (forge--post-buffer-text)))
+                        `((title . ,title)
+                          (body  . ,body)))
+                    `((body . ,(string-trim (buffer-str)))))))
+       :callback  (forge--post-submit-callback)
+       :errorback (forge--post-submit-errorback)))))
+
+(cl-defmethod forge--submit-approve-pullreq
+  ((_repo forge-github-repository)
+   (topic forge-pullreq))
+  (let ((body (string-trim (buffer-str))))
+    (forge-rest topic "POST" "/repos/:owner/:repo/pulls/:number/reviews"
+      ((event "APPROVE")
+       (and (not (equal body "")) (body body)))
+      :callback  (forge--post-submit-callback)
+      :errorback (forge--post-submit-errorback))))
+
+(cl-defmethod forge--submit-request-changes
+  ((_repo forge-github-repository)
+   (topic forge-pullreq))
+  (let ((body (string-trim (buffer-str))))
+    (forge-rest topic "POST" "/repos/:owner/:repo/pulls/:number/reviews"
+      ((event "REQUEST_CHANGES")
+       (and (not (equal body "")) (body body)))
+      :callback  (forge--post-submit-callback)
+      :errorback (forge--post-submit-errorback))))
+
+(cl-defmethod forge--set-topic-title
+  ((_repo forge-github-repository)
+   (topic forge-discussion)
+   title)
+  (forge--mutate-field topic updateDiscussion
+    ((discussionId (oref topic their-id))
+     (title        title))))
+
+(cl-defmethod forge--set-topic-title
+  ((_repo forge-github-repository)
+   (topic forge-issue)
+   title)
+  (forge--mutate-field topic updateIssue
+    ((id    (oref topic their-id))
+     (title title))))
+
+(cl-defmethod forge--set-topic-title
+  ((_repo forge-github-repository)
+   (topic forge-pullreq)
+   title)
+  (forge--mutate-field topic updatePullRequest
+    ((pullRequestId (oref topic their-id))
+     (title         title))))
+
+(cl-defmethod forge--set-topic-state
+  ((_repo forge-github-repository)
+   (topic forge-topic)
+   state)
+  (forge--rest topic "PATCH" "/repos/:owner/:repo/issues/:number"
+    (pcase-exhaustive state
+      ;; Merging isn't done through here.
+      ;; Marking as a duplicate isn't supported via API.
+      ('completed '((state . "closed") (state_reason . "completed")))
+      ('unplanned '((state . "closed") (state_reason . "not_planned")))
+      ('rejected  '((state . "closed")))
+      ('open      '((state . "open"))))
+    :callback (forge--set-field-callback topic)))
+
+(cl-defmethod forge--set-topic-state
+  ((_repo forge-github-repository)
+   (topic forge-discussion)
+   state)
+  (cond ((eq state 'open)
+         (forge--mutate-field topic reopenDiscussion
+           ((discussionId (oref topic their-id)))))
+        ((forge--mutate-field topic closeDiscussion
+           ((discussionId (oref topic their-id))
+            (reason (pcase-exhaustive state
+                      ('completed "RESOLVED")
+                      ('duplicate "DUPLICATE")
+                      ('outdated  "OUTDATED"))))))))
+
+(cl-defmethod forge--set-topic-draft
+  ((_repo forge-github-repository)
+   (topic forge-topic)
+   value)
+  (cond (value
+         (forge--mutate-field topic convertPullRequestToDraft
+           ((pullRequestId (oref topic their-id)))))
+        ((forge--mutate-field topic markPullRequestReadyForReview
+           ((pullRequestId (oref topic their-id)))))))
+
+(cl-defmethod forge--set-topic-category
+  ((repo  forge-github-repository)
+   (topic forge-discussion)
+   category)
+  (forge--mutate-field topic updateDiscussion
+    ((discussionId (oref topic their-id))
+     (categoryId (forge--their-id category 'category repo)))))
+
+(cl-defmethod forge--set-topic-answer
+  ((repo  forge-github-repository)
+   (topic forge-discussion)
+   answer)
+  (let* ((old (oref topic answer))
+         (old (and old (forge--their-id old)))
+         (new (and answer (oref answer their-id))))
+    (forge--query repo
+      `(mutation
+        ,@(and old '((unmarkDiscussionCommentAsAnswer
+                      [(input $old UnmarkDiscussionCommentAsAnswerInput!)]
+                      clientMutationId)))
+        ,@(and new '((markDiscussionCommentAsAnswer
+                      [(input $new MarkDiscussionCommentAsAnswerInput!)]
+                      clientMutationId))))
+      `(,@(and old `((old (id . ,old))))
+        ,@(and new `((new (id . ,new)))))
+      :callback (forge--set-field-callback topic))))
+
+(cl-defmethod forge--set-topic-milestone
+  ((repo  forge-github-repository)
+   (topic forge-topic)
+   milestone)
+  (forge-rest topic "POST" "/repos/:owner/:repo/issues/:number"
+    ((milestone (if milestone
+                    (forge-sql1 [:select [number]
+                                 :from milestone
+                                 :where (and (= repository $s1)
+                                             (= title $s2))]
+                                (oref repo id)
+                                milestone)
+                  :null)))
+    :callback (forge--set-field-callback topic)))
+
+(cl-defmethod forge--set-topic-labels
+  ((repo  forge-github-repository)
+   (topic forge-topic)
+   labels)
+  (let* ((topic-id (oref topic their-id))
+         (their-id ; I really messed up IDs! :(
+          (pcase-lambda (`(,id))
+            (let* ((parts (split-string (base64-decode-string id) ":"))
+                   (maybe-id (car (last parts))))
+              (if (string-prefix-p "Label" maybe-id)
+                  (base64-encode-string (string-join (last parts 2) ":"))
+                maybe-id))))
+         (old (mapcar their-id (oref topic labels)))
+         (new (mapcar their-id
+                      (forge-sql [:select [id] :from label
+                                  :where (and (= repository $s1)
+                                              (in name $v2))]
+                                 (oref repo id)
+                                 (vconcat labels))))
+         (add (cl-set-difference new old :test #'equal))
+         (del (cl-set-difference old new :test #'equal)))
+    (when (or add del)
+      (forge--query repo
+        `(mutation
+          ,@(and add '((addLabelsToLabelable
+                        [(input $add AddLabelsToLabelableInput!)]
+                        clientMutationId)))
+          ,@(and del '((removeLabelsFromLabelable
+                        [(input $del RemoveLabelsFromLabelableInput!)]
+                        clientMutationId))))
+        `(,@(and add `((add (labelableId . ,topic-id)
+                            (labelIds . ,(vconcat add)))))
+          ,@(and del `((del (labelableId . ,topic-id)
+                            (labelIds . ,(vconcat del))))))
+        :callback (forge--set-field-callback topic)))))
+
+(cl-defmethod forge--set-topic-assignees
+  ((repo  forge-github-repository)
+   (topic forge-topic)
+   assignees)
+  (let* ((topic-id (oref topic their-id))
+         (old (mapcar (##nth 3 %) (oref topic assignees)))
+         (new (forge--their-id assignees 'assignees repo))
+         (add (cl-set-difference new old :test #'equal))
+         (del (cl-set-difference old new :test #'equal)))
+    (when (or add del)
+      (forge--query repo
+        `(mutation
+          ,@(and add '((addAssigneesToAssignable
+                        [(input $add AddAssigneesToAssignableInput!)]
+                        clientMutationId)))
+          ,@(and del '((removeAssigneesFromAssignable
+                        [(input $del RemoveAssigneesFromAssignableInput!)]
+                        clientMutationId))))
+        `(,@(and add `((add (assignableId . ,topic-id)
+                            (assigneeIds . ,(vconcat add)))))
+          ,@(and del `((del (assignableId . ,topic-id)
+                            (assigneeIds . ,(vconcat del))))))
+        :callback (forge--set-field-callback topic)))))
+
+(cl-defmethod forge--set-topic-review-requests
+  ((repo  forge-github-repository)
+   (topic forge-topic)
+   reviewers)
+  (let ((users (forge--their-id (seq-remove (##string-match "/" %) reviewers)
+                                'assignees repo))
+        (teams nil)) ;TODO Investigate #742, track id, then use it here.
+    (forge--mutate-field topic requestReviews
+      ((pullRequestId (oref topic their-id))
+       (and users (userIds (vconcat users)))
+       (and teams (teamIds (vconcat teams)))))))
+
+(cl-defmethod forge--delete-comment
+  ((_    forge-github-repository)
+   (post forge-post))
+  (forge-rest post "DELETE" "/repos/:owner/:repo/issues/comments/:number")
+  (closql-delete post)
+  (forge-refresh-buffer))
+
+(cl-defmethod forge--topic-template-files ((repo forge-github-repository)
+                                           (_ (subclass forge-issue)))
+  ;; Upstream documentation is unclear but experimentation indicates that
+  ;; placing the template directory in ./ or docs/ does not work, a single
+  ;; template file is not supported, and silly names like IsSuE_tEmPlAtE
+  ;; are supported (but we don't support that here anyway).  We do not
+  ;; support experimental issue *forms* for now.  Make sure the config
+  ;; file comes last.
+  (or (nconc (forge--topic-template-files-1
+              repo "md" ".github/issue_template")
+             (forge--topic-template-files-1
+              repo nil  ".github/issue_template/config.yml"))
+      (nconc (forge--topic-template-files-1
+              repo "md" ".github/ISSUE_TEMPLATE")
+             (forge--topic-template-files-1
+              repo nil  ".github/ISSUE_TEMPLATE/config.yml"))))
+
+(cl-defmethod forge--topic-template-files ((repo forge-github-repository)
+                                           (_ (subclass forge-pullreq)))
+  ;; The web interface does not support multiple pull-request templates,
+  ;; and while the API theoretically does, we don't support that here.
+  ;; When there are multiple conflicting "default" templates, the rules
+  ;; used by Github are more complex than just sorting alphabetically and
+  ;; then taking the first found file.  Too bad; that's what we do.
+  (let ((branch (forge--get-default-branch repo))
+        (case-fold-search t))
+    (seq-some (lambda (file)
+                (and (string-match-p "\
+\\`\\(.github/\\|docs/\\)?pull_request_template\\(\\.[a-zA-Z0-9]+\\)?\\'" file)
+                     (list (concat branch ":" file))))
+              (magit-git-items "ls-tree" "-z" "--full-tree" "--name-only"
+                               "-r" branch))))
+
+(cl-defmethod forge--set-default-branch ((repo forge-github-repository) branch)
+  (forge-rest repo "PATCH" "/repos/:owner/:repo"
+    ((default_branch branch)))
+  (message "Waiting 5 seconds for GitHub to complete update...")
+  (sleep-for 5)
+  (message "Waiting 5 seconds for GitHub to complete update...done")
+  (let ((remote (oref repo remote)))
+    (magit-call-git "fetch" "--prune" remote)
+    (magit-call-git "remote" "set-head" "--auto" remote)))
+
+(cl-defmethod forge--rename-branch ((repo forge-github-repository)
+                                    newname oldname)
+  (forge-rest repo "POST"
+    (format "/repos/:owner/:name/branches/%s/rename" oldname)
+    ((new_name newname)))
+  (message "Waiting 5 seconds for GitHub to complete rename...")
+  (sleep-for 5)
+  (message "Waiting 5 seconds for GitHub to complete rename...done")
+  (magit-call-git "fetch" "--prune" (oref repo remote)))
+
+(cl-defmethod forge--fork-repository ((repo forge-github-repository) fork all)
+  (with-slots (name apihost) repo
+    (forge-rest repo "POST" "/repos/:owner/:name/forks"
+      ((and (not (equal fork (ghub--username repo)))
+            (organization fork))
+       (default-branch-only (not all))))
+    (ghub-wait (format "/repos/%s/%s" fork name)
+               nil :auth 'forge :host apihost)))
+
+(cl-defmethod forge--merge-pullreq
+  ((repo  forge-github-repository)
+   (topic forge-pullreq)
+   hash method)
+  (forge-mutate topic mergePullRequest
+    ((pullRequestId (oref topic their-id))
+     (mergeMethod (upcase (symbol-name method)))
+     (and hash (expectedHeadOid hash)))
+    :callback
+    (lambda (_)
+      (forge--pull
+       repo
+       (lambda ()
+         (when-let* ((branch (or (forge--pullreq-branch-active topic)
+                                 (forge--branch-pullreq topic)))
+                     (upstream (magit-get-local-upstream-branch branch))
+                     (remote (oref repo remote)))
+           (magit-call-git "checkout" upstream)
+           (magit-call-git "pull" "--ff-only" remote (magit-pull-arguments))
+           (magit-call-git "branch" "-d" branch)
+           (forge-refresh-buffer)))))))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let")
+;;   ("buffer-string" . "buffer-string")
+;;   ("buffer-str"    . "forge--buffer-substring-no-properties")
+;;   ("partial"       . "llama--left-apply-partially"))
+;; End:
+(provide 'forge-github)
+;;; forge-github.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-github.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-github.elc
new file mode 100644
index 0000000..b5155e2
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-github.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitlab.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitlab.el
new file mode 100644
index 0000000..2dbb5f4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitlab.el
@@ -0,0 +1,706 @@
+;;; forge-gitlab.el --- Gitlab support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge-client)
+(require 'forge-issue)
+(require 'forge-pullreq)
+
+;;; Class
+
+(defclass forge-gitlab-repository (forge-repository)
+  ((issues-url-format         :initform "https://%h/%o/%n/issues")
+   (issue-url-format          :initform "https://%h/%o/%n/issues/%i")
+   (issue-post-url-format     :initform "https://%h/%o/%n/issues/%i#note_%I")
+   (pullreqs-url-format       :initform "https://%h/%o/%n/merge_requests")
+   (pullreq-url-format        :initform "https://%h/%o/%n/merge_requests/%i")
+   (pullreq-post-url-format   :initform "https://%h/%o/%n/merge_requests/%i#note_%I")
+   (commit-url-format         :initform "https://%h/%o/%n/commit/%r")
+   (branch-url-format         :initform "https://%h/%o/%n/commits/%r")
+   (remote-url-format         :initform "https://%h/%o/%n")
+   (blob-url-format           :initform "https://%h/%o/%n/-/blob/%r/%f")
+   (create-issue-url-format   :initform "https://%h/%o/%n/issues/new")
+   (create-pullreq-url-format :initform "https://%h/%o/%n/merge_requests/new")
+   (pullreq-refspec :initform "+refs/merge-requests/*/head:refs/pullreqs/*")))
+
+;;; Pull
+;;;; Repository
+
+(cl-defmethod forge--pull ((repo forge-gitlab-repository)
+                           &optional callback since)
+  (cl-assert (not (and since (forge-get-repository repo nil :tracked?))))
+  (setq forge--mode-line-buffer (current-buffer))
+  (forge--msg repo t nil "Pulling REPO")
+  (let ((buffer (current-buffer))
+        (value nil)
+        (step nil)
+        (skip (cond ((oref repo selective-p)
+                     '(assignees forks labels issues pullreqs))
+                    ((magit-get-boolean "forge.omitExpensive")
+                     '(assignees forks labels)))))
+    (named-let step (data)
+      (cond ((not value)
+             (when data
+               (setq value data)
+               (let-alist value
+                 (unless .issues_enabled         (cl-pushnew 'issues   skip))
+                 (unless .merge_requests_enabled (cl-pushnew 'pullreqs skip)))))
+            ((push (cons step data) value)))
+      (cl-flet ((fetchp (sym)
+                  (unless (or (memq sym skip)
+                              (assq sym value))
+                    (setq step sym)
+                    t)))
+        (cond ((not value)         (forge--fetch-repository repo #'step))
+              ((fetchp 'assignees) (forge--fetch-assignees  repo #'step))
+              ((fetchp 'forks)     (forge--fetch-forks      repo #'step))
+              ((fetchp 'labels)    (forge--fetch-labels     repo #'step))
+              ((fetchp 'issues)    (forge--fetch-issues     repo #'step since))
+              ((fetchp 'pullreqs)  (forge--fetch-pullreqs   repo #'step since))
+              (t
+               (forge--msg repo t t   "Pulling REPO")
+               (forge--msg repo t nil "Storing REPO")
+               (let-alist value
+                 (closql-with-transaction (forge-db)
+                   (forge--update-repository repo value)
+                   (forge--update-assignees  repo .assignees)
+                   (forge--update-labels     repo .labels)
+                   (forge--update-issues     repo .issues)
+                   (forge--update-pullreqs   repo .pullreqs)
+                   (oset repo condition :tracked)))
+               (forge--msg repo t t "Storing REPO")
+               (cond ((oref repo selective-p))
+                     (callback (funcall callback))
+                     ((forge--maybe-git-fetch repo buffer)))))))))
+
+(cl-defmethod forge--fetch-repository ((repo forge-gitlab-repository) callback)
+  (forge--glab-get repo "/projects/:project" nil
+    :callback callback))
+
+(cl-defmethod forge--update-repository ((repo forge-gitlab-repository) data)
+  (let-alist data
+    (oset repo created        .created_at)
+    (oset repo updated        .last_activity_at)
+    (oset repo pushed         nil)
+    (oset repo parent         .forked_from_project.path_with_namespace)
+    (oset repo description    .description)
+    (oset repo homepage       nil)
+    (oset repo default-branch .default_branch)
+    (oset repo archived-p     .archived)
+    (oset repo fork-p         (and .forked_from_project.path_with_namespace t))
+    (oset repo locked-p       nil)
+    (oset repo mirror-p       .mirror)
+    (oset repo private-p      (equal .visibility "private"))
+    (oset repo issues-p       .issues_enabled)
+    (oset repo wiki-p         .wiki_enabled)
+    (oset repo stars          .star_count)
+    (oset repo watchers       .star_count)))
+
+;;;; Topics
+
+(cl-defmethod forge--pull-topic ((repo forge-gitlab-repository) _topic
+                                 &key callback _errorback)
+  (forge--pull repo callback)) ; TODO Pull only the one topic.
+
+;;;; Issues
+
+(cl-defmethod forge--fetch-issues ((repo forge-gitlab-repository) callback since)
+  (letrec
+      (( cb (let (val cur cnt pos)
+              (lambda (&optional v)
+                (cond
+                  ((and (not pos) v)
+                   (setq val v)
+                   (setq cur v)
+                   (setq pos 1)
+                   (setq cnt (length val))
+                   (forge--msg nil nil nil "Pulling issue %s/%s" pos cnt)
+                   (forge--fetch-issue-posts repo cur cb))
+                  ((setq cur (cdr cur))
+                   (incf pos)
+                   (forge--msg nil nil nil "Pulling issue %s/%s" pos cnt)
+                   (forge--fetch-issue-posts repo cur cb))
+                  (t
+                   (forge--msg repo t t "Pulling REPO issues")
+                   (funcall callback val)))))))
+    (forge--msg repo t nil "Pulling REPO issues")
+    (forge--glab-get repo "/projects/:project/issues"
+      `((per_page . 100)
+        (order_by . "updated_at")
+        ,@(and$ (or since (oref repo issues-until))
+                `((updated_after . ,$))))
+      :unpaginate t
+      :callback cb)))
+
+(cl-defmethod forge--fetch-issue-posts ((repo forge-gitlab-repository) cur cb)
+  (forge--glab-get repo
+    (let-alist (car cur)
+      (format "/projects/%s/issues/%s/notes" .project_id .iid))
+    '((per_page . 100))
+    :unpaginate t
+    :callback (lambda (value)
+                (setf (alist-get 'notes (car cur)) value)
+                (funcall cb))))
+
+(cl-defmethod forge--update-issues ((repo forge-gitlab-repository) data)
+  (dolist (v data)
+    (forge--update-issue repo v)))
+
+(cl-defmethod forge--update-issue ((repo forge-gitlab-repository) data)
+  (closql-with-transaction (forge-db)
+    (let-alist data
+      (let* ((issue-id (forge--object-id 'forge-issue repo .iid))
+             (issue
+              (forge-issue
+               :id           issue-id
+               :their-id     .iid
+               :number       .iid
+               :slug         (format "#%s" .iid)
+               :repository   (oref repo id)
+               ;; Gitlab doesn't make a distinction between completed
+               ;; and unplanned issues.  Treat them all as completed.
+               :state        (pcase-exhaustive .state
+                               ("closed" 'completed)
+                               ("opened" 'open))
+               :author       .author.username
+               :title        .title
+               :created      .created_at
+               :updated      .updated_at
+               ;; `.closed_at' may be nil even though the issues is
+               ;; closed.  In such cases use 1, so that this slot
+               ;; at least can serve as a boolean.
+               :closed       (or .closed_at (and (equal .state "closed") 1))
+               :locked-p     .discussion_locked
+               :milestone    .milestone.iid
+               :body         (forge--sanitize-string .description))))
+        (closql-insert (forge-db) issue t)
+        (unless (magit-get-boolean "forge.omitExpensive")
+          (forge--set-connections repo issue 'assignees .assignees)
+          (forge--set-connections repo issue 'labels .labels))
+        (dolist (c .notes)
+          (let-alist c
+            (let ((post
+                   (forge-issue-post
+                    :id      (forge--object-id issue-id .id)
+                    :issue   issue-id
+                    :number  .id
+                    :author  .author.username
+                    :created .created_at
+                    :updated .updated_at
+                    :body    (forge--sanitize-string .body))))
+              (closql-insert (forge-db) post t))))
+        (let ((until (oref repo issues-until)))
+          (when (or (not until) (string> .updated_at until))
+            (oset repo issues-until .updated_at)))
+        issue))))
+
+;;;; Pullreqs
+
+(cl-defmethod forge--fetch-pullreqs ((repo forge-gitlab-repository) callback since)
+  (letrec
+      (( cb (let (val cur cnt pos)
+              (lambda (&optional v)
+                (cond
+                  ((and (not pos) v)
+                   (setq val v)
+                   (setq cur v)
+                   (setq pos 1)
+                   (setq cnt (length val))
+                   (forge--msg nil nil nil "Pulling pullreq %s/%s" pos cnt)
+                   (forge--fetch-pullreq-posts repo cur cb))
+                  ((not pos)
+                   (forge--msg repo t t "Pulling REPO pullreqs")
+                   (funcall callback val))
+                  ((not (assq 'source_project (car cur)))
+                   (forge--fetch-pullreq-source-repo repo cur cb))
+                  ((not (assq 'target_project (car cur)))
+                   (forge--fetch-pullreq-target-repo repo cur cb))
+                  ((setq cur (cdr cur))
+                   (incf pos)
+                   (forge--msg nil nil nil "Pulling pullreq %s/%s" pos cnt)
+                   (forge--fetch-pullreq-posts repo cur cb))
+                  (t
+                   (forge--msg repo t t "Pulling REPO pullreqs")
+                   (funcall callback val)))))))
+    (forge--msg repo t nil "Pulling REPO pullreqs")
+    (forge--glab-get repo "/projects/:project/merge_requests"
+      `((per_page . 100)
+        (order_by . "updated_at")
+        ,@(and$ (or since (oref repo pullreqs-until))
+                `((updated_after . ,$))))
+      :unpaginate t
+      :callback cb)))
+
+(cl-defmethod forge--fetch-pullreq-posts
+  ((repo forge-gitlab-repository) cur cb)
+  (forge--glab-get repo
+    (let-alist (car cur)
+      (format "/projects/%s/merge_requests/%s/notes" .target_project_id .iid))
+    '((per_page . 100))
+    :unpaginate t
+    :callback (lambda (value)
+                (setf (alist-get 'notes (car cur)) value)
+                (funcall cb))))
+
+(cl-defmethod forge--fetch-pullreq-source-repo
+  ((repo forge-gitlab-repository) cur cb)
+  ;; If the fork no longer exists, then `.source_project_id' is nil.
+  ;; This will lead to difficulties later on but there is nothing we
+  ;; can do about it.
+  (let-alist (car cur)
+    (if .source_project_id
+        (forge--glab-get repo (format "/projects/%s" .source_project_id) nil
+          :errorback (lambda (_err _headers _status _req)
+                       (setf (alist-get 'source_project (car cur)) nil)
+                       (funcall cb))
+          :callback (lambda (value)
+                      (setf (alist-get 'source_project (car cur)) value)
+                      (funcall cb)))
+      (setf (alist-get 'source_project (car cur)) nil)
+      (funcall cb))))
+
+(cl-defmethod forge--fetch-pullreq-target-repo
+  ((repo forge-gitlab-repository) cur cb)
+  (let-alist (car cur)
+    (forge--glab-get repo (format "/projects/%s" .target_project_id) nil
+      :errorback (lambda (_err _headers _status _req)
+                   (setf (alist-get 'target_project (car cur)) nil)
+                   (funcall cb))
+      :callback (lambda (value)
+                  (setf (alist-get 'target_project (car cur)) value)
+                  (funcall cb)))))
+
+(cl-defmethod forge--update-pullreqs ((repo forge-gitlab-repository) data)
+  (dolist (v data)
+    (forge--update-pullreq repo v)))
+
+(cl-defmethod forge--update-pullreq ((repo forge-gitlab-repository) data)
+  (closql-with-transaction (forge-db)
+    (let-alist data
+      (let* ((pullreq-id (forge--object-id 'forge-pullreq repo .iid))
+             (pullreq
+              (forge-pullreq
+               :id           pullreq-id
+               :their-id     .iid
+               :number       .iid
+               :slug         (format "!%s" .iid)
+               :repository   (oref repo id)
+               :state        (pcase-exhaustive .state
+                               ("merged" 'merged)
+                               ("closed" 'rejected)
+                               ("opened" 'open))
+               :author       .author.username
+               :title        .title
+               :created      .created_at
+               :updated      .updated_at
+               ;; `.merged_at' and `.closed_at' may both be nil even
+               ;; though the pullreq is merged or otherwise closed.
+               ;; In such cases use 1, so that these slots at least
+               ;; can serve as booleans.
+               :closed       (or .closed_at
+                                 (and (member .state '("closed" "merged")) 1))
+               :merged       (or .merged_at
+                                 (and (equal .state "merged") 1))
+               :draft-p      .draft
+               :locked-p     .discussion_locked
+               :editable-p   .allow_maintainer_to_push
+               :cross-repo-p (not (equal .source_project_id
+                                         .target_project_id))
+               :base-ref     .target_branch
+               :base-rev     .diff_refs.start_sha
+               :base-repo    .target_project.path_with_namespace
+               :head-ref     .source_branch
+               :head-rev     .diff_refs.head_sha
+               :head-user    .source_project.owner.username
+               :head-repo    .source_project.path_with_namespace
+               :milestone    .milestone.iid
+               :body         (forge--sanitize-string .description))))
+        (closql-insert (forge-db) pullreq t)
+        (unless (magit-get-boolean "forge.omitExpensive")
+          (forge--set-connections repo pullreq 'assignees .assignees)
+          (forge--set-connections repo pullreq 'review-requests .reviewers)
+          (forge--set-connections repo pullreq 'labels .labels))
+        (dolist (c .notes)
+          (let-alist c
+            (let ((post
+                   (forge-pullreq-post
+                    :id      (forge--object-id pullreq-id .id)
+                    :pullreq pullreq-id
+                    :number  .id
+                    :author  .author.username
+                    :created .created_at
+                    :updated .updated_at
+                    :body    (forge--sanitize-string .body))))
+              (closql-insert (forge-db) post t))))
+        (let ((until (oref repo pullreqs-until)))
+          (when (or (not until) (string> .updated_at until))
+            (oset repo pullreqs-until .updated_at)))
+        pullreq))))
+
+;;;; Other
+
+;; The extend of the documentation for "GET /projects/:id/users" is
+;; "Get the users list of a project."  I don't know what that means,
+;; but it stands to reason that this must at least overlap with the
+;; set of users that can be assigned to topics.
+
+(cl-defmethod forge--fetch-assignees ((repo forge-gitlab-repository) callback)
+  (forge--glab-get repo "/projects/:project/users"
+    '((per_page . 100))
+    :unpaginate t
+    :callback callback))
+
+(cl-defmethod forge--update-assignees ((repo forge-gitlab-repository) data)
+  (oset repo assignees
+        (with-slots (id) repo
+          (mapcar (lambda (row)
+                    (let-alist row
+                      ;; For other forges we don't need to store `id'
+                      ;; but here we do because that's what has to be
+                      ;; used when assigning issues.
+                      (list (forge--object-id id .id)
+                            .username
+                            .name
+                            .id)))
+                  data))))
+
+(cl-defmethod forge--fetch-forks ((repo forge-gitlab-repository) callback)
+  (forge--glab-get repo "/projects/:project/forks"
+    '((per_page . 100)
+      (simple . t))
+    :unpaginate t
+    :callback callback))
+
+(cl-defmethod forge--update-forks ((repo forge-gitlab-repository) data)
+  (oset repo forks
+        (with-slots (id) repo
+          (mapcar (lambda (row)
+                    (let-alist row
+                      (nconc (forge--repository-ids
+                              (eieio-object-class repo)
+                              (oref repo githost)
+                              .namespace.path
+                              .path)
+                             (list .namespace.path
+                                   .path))))
+                  data))))
+
+(cl-defmethod forge--fetch-labels ((repo forge-gitlab-repository) callback)
+  (forge--glab-get repo "/projects/:project/labels"
+    '((per_page . 100))
+    :unpaginate t
+    :callback callback))
+
+(cl-defmethod forge--update-labels ((repo forge-gitlab-repository) data)
+  (oset repo labels
+        (with-slots (id) repo
+          (mapcar (lambda (row)
+                    (let-alist row
+                      ;; We should use the label's `id' instead of its
+                      ;; `name' but a topic's `labels' field is a list
+                      ;; of names instead of a list of ids or an alist.
+                      ;; As a result of this we cannot recognize when
+                      ;; a label is renamed and a topic continues to be
+                      ;; tagged with the old label name until it itself
+                      ;; is modified somehow.  Additionally it leads to
+                      ;; name conflicts between group and project
+                      ;; labels.  See #160.  Also see the comment in
+                      ;; `forge--set-connections'.
+                      (list (forge--object-id id .name)
+                            .name
+                            (downcase .color)
+                            .description)))
+                  ;; For now simply remove one of the duplicates.
+                  (cl-delete-duplicates data
+                                        :key (##alist-get 'name %)
+                                        :test #'equal)))))
+
+;;;; Notifications
+
+;; The closest to notifications that Gitlab provides are "events" as
+;; described at https://docs.gitlab.com/ee/api/events.html.  This
+;; allows us to see the last events that took place, but that is not
+;; good enough because we are mostly interested in events we haven't
+;; looked at yet.  Gitlab doesn't make a distinction between unread
+;; and read events, so this is rather useless and we don't use it for
+;; the time being.
+
+;;; Mutations
+
+(cl-defmethod forge--submit-create-issue ((_ forge-gitlab-repository) repo)
+  (forge--glab-post repo "/projects/:project/issues"
+    (pcase-let ((`(,title . ,body) (forge--post-buffer-text)))
+      `((title        . ,title)
+        (description  . ,body)))
+    :callback  (forge--post-submit-callback)
+    :errorback (forge--post-submit-errorback)))
+
+(cl-defmethod forge--submit-create-pullreq ((_ forge-gitlab-repository) base-repo)
+  (pcase-let* ((`(,title . ,body) (forge--post-buffer-text))
+               (`(,_base-remote . ,base-branch)
+                (magit-split-branch-name forge--buffer-base-branch))
+               (`(,head-remote . ,head-branch)
+                (magit-split-branch-name forge--buffer-head-branch))
+               (head-repo (forge-get-repository :stub head-remote)))
+    (forge--glab-post head-repo "/projects/:project/merge_requests"
+      `((title . ,(if forge--buffer-draft-p
+                      (concat "Draft: " title)
+                    title))
+        (description . ,body)
+        ;; ,@(and (not (equal head-remote base-remote))
+        (target_project_id . ,(oref base-repo forge-id))
+        (target_branch . ,base-branch)
+        (source_branch . ,head-branch)
+        (allow_collaboration . t))
+      :callback  (forge--post-submit-callback)
+      :errorback (forge--post-submit-errorback))))
+
+(cl-defmethod forge--submit-create-post
+  ((_     forge-gitlab-repository)
+   (topic forge-topic))
+  (forge--glab-post topic
+    (if (forge-issue-p topic)
+        "/projects/:project/issues/:number/notes"
+      "/projects/:project/merge_requests/:number/notes")
+    `((body . ,(string-trim (buffer-str))))
+    :callback  (forge--post-submit-callback)
+    :errorback (forge--post-submit-errorback)))
+
+(cl-defmethod forge--submit-edit-post
+  ((_    forge-gitlab-repository)
+   (post forge-post))
+  (forge--glab-put post
+    (cl-etypecase post
+      (forge-pullreq      "/projects/:project/merge_requests/:number")
+      (forge-issue        "/projects/:project/issues/:number")
+      (forge-issue-post   "/projects/:project/issues/:topic/notes/:number")
+      (forge-pullreq-post "/projects/:project/merge_requests/:topic/notes/:number"))
+    (if (cl-typep post 'forge-topic)
+        (pcase-let ((`(,title . ,body) (forge--post-buffer-text)))
+          `((title . ,title)
+            ;; Keep Gitlab from claiming that the user changed
+            ;; the description when that isn't true.  The same
+            ;; isn't necessary for the title; for that, Gitlab
+            ;; performs the necessary check itself.
+            ,@(and (not (equal body (oref post body)))
+                   `((description . ,body)))))
+      `((body . ,(string-trim (buffer-str)))))
+    :callback  (forge--post-submit-callback)
+    :errorback (forge--post-submit-errorback)))
+
+(cl-defmethod forge--set-topic-field
+  ((_repo forge-gitlab-repository)
+   (topic forge-topic)
+   field value)
+  (forge--glab-put topic
+    (cl-typecase topic
+      (forge-pullreq "/projects/:project/merge_requests/:number")
+      (forge-issue   "/projects/:project/issues/:number"))
+    `((,field . ,(if (and value (listp value)) (vconcat value) value)))
+    :callback (forge--set-field-callback topic)))
+
+(cl-defmethod forge--set-topic-title
+  ((repo  forge-gitlab-repository)
+   (topic forge-topic)
+   title)
+  (forge--set-topic-field repo topic 'title title))
+
+(cl-defmethod forge--set-topic-state
+  ((repo  forge-gitlab-repository)
+   (topic forge-topic)
+   state)
+  (forge--set-topic-field repo topic 'state_event
+                          (pcase-exhaustive state
+                            ;; Merging isn't done through here.
+                            ('completed "close")
+                            ('unplanned "close")
+                            ('rejected  "close")
+                            ('open      "reopen"))))
+
+(cl-defmethod forge--set-topic-draft
+  ((repo  forge-gitlab-repository)
+   (topic forge-topic)
+   value)
+  (forge--mutate-field topic mergeRequestSetDraft
+    ((projectPath (oref repo slug))
+     (iid (number-to-string (oref topic number)))
+     (draft value))))
+
+(cl-defmethod forge--set-topic-labels
+  ((repo  forge-gitlab-repository)
+   (topic forge-topic)
+   labels)
+  (forge--set-topic-field repo topic 'labels
+                          (string-join labels ",")))
+
+(cl-defmethod forge--set-topic-assignees
+  ((repo  forge-gitlab-repository)
+   (topic forge-topic)
+   assignees)
+  (let ((users (mapcar #'cdr (oref repo assignees))))
+    (cl-typecase topic
+      (forge-pullreq ; Can only be assigned to a single user.
+       (forge--set-topic-field repo topic 'assignee_id
+                               (or (caddr (assoc (car assignees) users))
+                                   0)))
+      (forge-issue
+       (forge--set-topic-field repo topic 'assignee_ids
+                               (or (mapcar (##caddr (assoc % users)) assignees)
+                                   0))))))
+
+(cl-defmethod forge--set-topic-review-requests
+  ((repo  forge-gitlab-repository)
+   (topic forge-pullreq)
+   reviewers)
+  (let ((users (mapcar #'cdr (oref repo assignees))))
+    (forge--set-topic-field repo topic 'reviewer_ids
+                            (or (mapcar (##caddr (assoc % users)) reviewers)
+                                0))))
+
+(cl-defmethod forge--delete-comment
+  ((_    forge-gitlab-repository)
+   (post forge-post))
+  (forge--glab-delete post
+    (cl-etypecase post
+      (forge-pullreq-post
+       "/projects/:project/merge_requests/:topic/notes/:number")
+      (forge-issue-post
+       "/projects/:project/issues/:topic/notes/:number")))
+  (closql-delete post)
+  (forge-refresh-buffer))
+
+(cl-defmethod forge--topic-template-files ((repo forge-gitlab-repository)
+                                           (_ (subclass forge-issue)))
+  (forge--topic-template-files-1 repo "md" ".gitlab/issue_templates"))
+
+(cl-defmethod forge--topic-template-files ((repo forge-gitlab-repository)
+                                           (_ (subclass forge-pullreq)))
+  (forge--topic-template-files-1 repo "md" ".gitlab/merge_request_templates"))
+
+(cl-defmethod forge--fork-repository ((repo forge-gitlab-repository) fork _all)
+  (with-slots (name apihost) repo
+    (forge--glab-post repo "/projects/:project/fork"
+      (and (not (equal fork (ghub--username repo)))
+           `((namespace . ,fork)))
+      :noerror t)
+    (ghub-wait (format "/projects/%s%%2F%s" (string-replace "/" "%2F" fork) name)
+               nil :auth 'forge :host apihost :forge 'gitlab)))
+
+(cl-defmethod forge--merge-pullreq
+  ((_repo forge-gitlab-repository)
+   (topic forge-topic)
+   hash method)
+  (forge--glab-put topic
+    "/projects/:project/merge_requests/:number/merge"
+    `((squash . ,(eq method 'squash))
+      ,@(and hash `((sha . ,hash))))))
+
+;;; Wrappers
+
+(cl-defun forge--glab-get (obj resource
+                               &optional params
+                               &key query payload headers
+                               silent unpaginate noerror reader
+                               host callback errorback)
+  (declare (indent defun))
+  (ghub-request "GET" (if obj (forge--format-resource obj resource) resource)
+    params
+    :forge 'gitlab
+    :host (or host (oref (forge-get-repository obj) apihost))
+    :auth 'forge
+    :query query :payload payload :headers headers
+    :silent silent :unpaginate unpaginate
+    :noerror noerror :reader reader
+    :callback callback
+    :errorback (or errorback (and callback t))))
+
+(cl-defun forge--glab-put (obj resource
+                               &optional params
+                               &key query payload headers
+                               silent unpaginate noerror reader
+                               host callback errorback)
+  (declare (indent defun))
+  (ghub-request "PUT" (if obj (forge--format-resource obj resource) resource)
+    params
+    :forge 'gitlab
+    :host (or host (oref (forge-get-repository obj) apihost))
+    :auth 'forge
+    :query query :payload payload :headers headers
+    :silent silent :unpaginate unpaginate
+    :noerror noerror :reader reader
+    :callback callback
+    :errorback (or errorback (and callback t))))
+
+(cl-defun forge--glab-post (obj resource
+                                &optional params
+                                &key query payload headers
+                                silent unpaginate noerror reader
+                                host callback errorback)
+  (declare (indent defun))
+  (ghub-request "POST" (forge--format-resource obj resource)
+    params
+    :forge 'gitlab
+    :host (or host (oref (forge-get-repository obj) apihost))
+    :auth 'forge
+    :query query :payload payload :headers headers
+    :silent silent :unpaginate unpaginate
+    :noerror noerror :reader reader
+    :callback callback
+    :errorback (or errorback (and callback t))))
+
+(cl-defun forge--glab-delete (obj resource
+                                  &optional params
+                                  &key query payload headers
+                                  silent unpaginate noerror reader
+                                  host callback errorback)
+  (declare (indent defun))
+  (ghub-request "DELETE" (forge--format-resource obj resource)
+    params
+    :forge 'gitlab
+    :host (or host (oref (forge-get-repository obj) apihost))
+    :auth 'forge
+    :query query :payload payload :headers headers
+    :silent silent :unpaginate unpaginate
+    :noerror noerror :reader reader
+    :callback callback
+    :errorback (or errorback (and callback t))))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let")
+;;   ("buffer-string" . "buffer-string")
+;;   ("buffer-str"    . "forge--buffer-substring-no-properties"))
+;; End:
+(provide 'forge-gitlab)
+;;; forge-gitlab.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitlab.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitlab.elc
new file mode 100644
index 0000000..a3a3fb0
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gitlab.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gogs.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gogs.el
new file mode 100644
index 0000000..800e9a6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gogs.el
@@ -0,0 +1,46 @@
+;;; forge-gogs.el --- Gogs support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+
+;;; Class
+
+(defclass forge-gogs-repository (forge-unusedapi-repository)
+  ((issues-url-format         :initform "https://%h/%o/%n/issues")
+   (issue-url-format          :initform "https://%h/%o/%n/issues/%i")
+   (issue-post-url-format     :initform "https://%h/%o/%n/issues/%i#issuecomment-%I")
+   (pullreqs-url-format       :initform "https://%h/%o/%n/pulls")
+   (pullreq-url-format        :initform "https://%h/%o/%n/pulls/%i")
+   (pullreq-post-url-format   :initform "https://%h/%o/%n/pulls/%i#issuecomment-%I")
+   (commit-url-format         :initform "https://%h/%o/%n/commit/%r")
+   (branch-url-format         :initform "https://%h/%o/%n/commits/%r")
+   (remote-url-format         :initform "https://%h/%o/%n")
+   (blob-url-format           :initform "https://%h/%o/%n/src/%r/%f")
+   (create-issue-url-format   :initform "https://%h/%o/%n/issues/new")
+   (create-pullreq-url-format :initform "https://%h/%o/%n/pulls") ; sic
+   (pullreq-refspec :initform "+refs/pull/*/head:refs/pullreqs/*")))
+
+;;; _
+(provide 'forge-gogs)
+;;; forge-gogs.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gogs.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gogs.elc
new file mode 100644
index 0000000..f5c6ad8
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-gogs.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-issue.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-issue.el
new file mode 100644
index 0000000..f376a3a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-issue.el
@@ -0,0 +1,241 @@
+;;; forge-issue.el --- Issue support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+(require 'forge-post)
+(require 'forge-topic)
+
+;;; Classes
+
+(defclass forge-issue (forge-topic)
+  ((closql-table         :initform 'issue)
+   (closql-primary-key   :initform 'id)
+   (closql-order-by      :initform [(desc number)])
+   (closql-foreign-key   :initform 'repository)
+   (closql-class-prefix  :initform "forge-")
+   (id                   :initarg :id)
+   (repository           :initarg :repository)
+   (number               :initarg :number)
+   (state                :initarg :state)
+   (author               :initarg :author)
+   (title                :initarg :title)
+   (created              :initarg :created)
+   (updated              :initarg :updated :initform nil)
+   (closed               :initarg :closed)
+   (status               :initarg :status :initform nil)
+   (locked-p             :initarg :locked-p)
+   (milestone            :initarg :milestone)
+   (body                 :initarg :body)
+   (assignees            :closql-tables (issue-assignee assignee))
+   (project-cards) ; projectsCards
+   (edits) ; userContentEdits
+   (labels               :closql-tables (issue-label label))
+   (participants)
+   (posts                :closql-class forge-issue-post)
+   (reactions)
+   (timeline)
+   (marks                :closql-tables (issue-mark mark))
+   (note                 :initarg :note :initform nil)
+   (their-id             :initarg :their-id)
+   (slug                 :initarg :slug)
+   (saved-p              :initarg :saved-p :initform nil)
+   ))
+
+(cl-defmethod closql-dref ((obj forge-issue) (_(eql assignees)))
+  (forge-sql-cdr
+   [:select assignee:* :from assignee
+    :join issue-assignee :on (= issue-assignee:id assignee:id)
+    :where (= issue-assignee:issue $s1)
+    :order-by [(asc login)]]
+   (closql--oref obj 'id)))
+
+(cl-defmethod closql-dref ((obj forge-issue) (_(eql labels)))
+  (forge-sql-cdr
+   [:select label:* :from label
+    :join issue-label :on (= issue-label:id label:id)
+    :where (= issue-label:issue $s1)
+    :order-by [(asc name)]]
+   (closql--oref obj 'id)))
+
+(cl-defmethod closql-dref ((obj forge-issue) (_(eql marks)))
+  (forge-sql-cdr
+   [:select mark:* :from mark
+    :join issue-mark :on (= issue-mark:id mark:id)
+    :where (= issue-mark:issue $s1)
+    :order-by [(asc name)]]
+   (closql--oref obj 'id)))
+
+(defclass forge-issue-post (forge-post)
+  ((closql-table         :initform 'issue-post)
+   (closql-primary-key   :initform 'id)
+   (closql-order-by      :initform [(asc number)])
+   (closql-foreign-key   :initform 'issue)
+   (closql-class-prefix  :initform "forge-issue-")
+   (id                   :initarg :id)
+   (issue                :initarg :issue)
+   (number               :initarg :number)
+   (author               :initarg :author)
+   (created              :initarg :created)
+   (updated              :initarg :updated)
+   (body                 :initarg :body)
+   (edits)
+   (reactions)
+   ))
+
+;;; Query
+;;;; Get
+
+(cl-defmethod forge-get-repository ((post forge-issue-post))
+  (forge-get-repository (forge-get-issue post)))
+
+(cl-defmethod forge-get-topic ((post forge-issue-post))
+  (forge-get-issue post))
+
+(cl-defmethod forge-get-issue ((issue forge-issue))
+  issue)
+
+(cl-defmethod forge-get-issue ((repo forge-repository) number)
+  (cl-assert (numberp number) t)
+  (closql-get (forge-db)
+              (forge--object-id 'forge-issue repo number)
+              'forge-issue))
+
+(cl-defmethod forge-get-issue ((number integer))
+  (and$ (forge-get-repository :tracked nil 'notatpt)
+        (forge-get-issue $ number)))
+
+(cl-defmethod forge-get-issue ((id string))
+  (closql-get (forge-db) id 'forge-issue))
+
+(cl-defmethod forge-get-issue ((post forge-issue-post))
+  (closql-get (forge-db)
+              (oref post issue)
+              'forge-issue))
+
+;;;; Current
+
+(defun forge-current-issue (&optional demand)
+  "Return the issue at point or being visited.
+If there is no such issue and DEMAND is non-nil, then signal
+an error."
+  (or (forge-issue-at-point)
+      (and (forge-issue-p forge-buffer-topic)
+           forge-buffer-topic)
+      (and demand (user-error "No current issue"))))
+
+(defun forge-issue-at-point (&optional demand)
+  "Return the issue at point.
+If there is no such issue and DEMAND is non-nil, then signal
+an error."
+  (or (thing-at-point 'forge-issue)
+      (magit-section-value-if 'issue)
+      (and demand (user-error "No issue at point"))))
+
+(put 'forge-issue 'thing-at-point #'forge-thingatpt--issue)
+(defun forge-thingatpt--issue ()
+  (and-let ((_(thing-at-point-looking-at "#\\([0-9]+\\)\\_>"))
+            (number (string-to-number (match-string 1)))
+            (repo (forge--repo-for-thingatpt)))
+    (forge-get-issue repo number)))
+
+;;; Read
+
+(defun forge-read-issue (prompt)
+  "Read an active issue with completion using PROMPT.
+
+Open, unread and pending issues are considered active.
+Default to the current issue, even if it isn't active.
+
+\\<forge-read-topic-minibuffer-map>While completion is in \
+progress, \\[forge-read-topic-lift-limit] lifts the limit, extending
+the completion candidates to include all issues.
+
+If `forge-limit-topic-choices' is nil, then all candidates
+can be selected from the start."
+  (forge--read-topic prompt
+                     #'forge-current-issue
+                     (forge--topics-spec :type 'issue :active t)
+                     (forge--topics-spec :type 'issue :active nil
+                                         :state nil :limit nil)))
+
+(defun forge-read-open-issue (prompt)
+  "Read an open issue with completion using PROMPT."
+  (let* ((current (forge-current-issue))
+         (repo    (forge-get-repository (or current :tracked)))
+         (default (and current (forge--format-topic-line current)))
+         (alist   (forge--topic-collection
+                   (forge--list-topics
+                    (forge--topics-spec :type 'issue :state 'open)
+                    repo)))
+         (choices (mapcar #'car alist))
+         (choice  (magit-completing-read prompt choices nil t nil nil default)))
+    (cdr (assoc choice alist))))
+
+;;; Insert
+
+(defvar-keymap forge-issues-section-map
+  :parent forge-common-map
+  "<remap> <magit-browse-thing>" #'forge-browse-issues
+  "<remap> <magit-visit-thing>"  #'forge-list-issues
+  "<remap> <forge--list-menu>"   #'forge-topics-menu
+  "<remap> <forge--item-menu>"   #'forge-topic-menu
+  "C-c C-n"                      #'forge-create-issue)
+
+(defvar-keymap forge-issue-section-map
+  :parent forge-common-map
+  "<remap> <magit-visit-thing>"  #'forge-visit-this-topic
+  "<remap> <forge--list-menu>"   #'forge-topics-menu
+  "<remap> <forge--item-menu>"   #'forge-topic-menu)
+
+(cl-defun forge-insert-issues (&optional (spec nil sspec) heading)
+  "Insert a list of issues, according to `forge--buffer-topics-spec'.
+Optional SPEC can be used to override that filtering specification,
+and optional HEADING to change the section heading."
+  (when-let* ((_(forge-db t))
+              (repo (forge-get-repository :tracked?))
+              (_(oref repo issues-p))
+              (spec (if sspec spec (forge--clone-buffer-topics-spec)))
+              (_(memq (oref spec type) '(topic issue))))
+    (oset spec type 'issue)
+    (forge--insert-topics 'issues
+                          (or heading "Issues")
+                          (forge--list-topics spec repo))))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let"))
+;; End:
+(provide 'forge-issue)
+;;; forge-issue.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-issue.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-issue.elc
new file mode 100644
index 0000000..edc048a
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-issue.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-notify.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-notify.el
new file mode 100644
index 0000000..1a279e3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-notify.el
@@ -0,0 +1,339 @@
+;;; forge-notify.el --- Notify support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+(require 'forge-topic)
+
+;;; Class
+
+(defclass forge-notification (forge-object)
+  ((closql-class-prefix       :initform "forge-")
+   (closql-table              :initform 'notification)
+   (closql-primary-key        :initform 'id)
+   (closql-order-by           :initform [(desc id)])
+   (id                        :initarg :id)
+   (thread-id                 :initarg :thread-id)
+   (repository                :initarg :repository)
+   (type                      :initarg :type)
+   (topic                     :initarg :topic)
+   (url                       :initarg :url)
+   (title                     :initarg :title)
+   (reason                    :initarg :reason)
+   (last-read                 :initarg :last-read)
+   (updated                   :initarg :updated)))
+
+;;; Query
+;;;; Get
+
+(cl-defmethod forge-get-repository ((notify forge-notification))
+  "Return the object for the repository that NOTIFY belongs to."
+  (and-let ((id (oref notify repository)))
+    (closql-get (forge-db) id 'forge-repository)))
+
+(cl-defmethod forge-get-topic ((notify forge-notification))
+  (and-let ((repo (forge-get-repository notify)))
+    (forge-get-topic repo (oref notify topic))))
+
+(cl-defmethod forge-get-notification ((id string))
+  (closql-get (forge-db) id 'forge-notification))
+
+(cl-defmethod forge-get-notification ((topic forge-topic))
+  (and-let ((row (car (forge-sql [:select * :from notification
+                                  :where (and (= repository $s1)
+                                              (= topic $s2))]
+                                 (oref topic repository)
+                                 (oref topic number)))))
+    (closql--remake-instance 'forge-notification (forge-db) row)))
+
+;;;; Current
+
+(defun forge-current-notification (&optional demand)
+  "Return the current notification, casting a topic if necessary.
+If there is no such notification and DEMAND is non-nil, then
+signal an error."
+  (or (magit-section-value-if 'notification)
+      (and$ (forge-current-topic)
+            (forge-get-notification $))
+      (and demand (user-error "No current notification"))))
+
+(defun forge-notification-at-point (&optional demand)
+  "Return the notification at point, casting a topic if necessary.
+If there is no such notification and DEMAND is non-nil, then
+signal an error."
+  (or (magit-section-value-if 'notification)
+      (and$ (forge-topic-at-point)
+            (forge-get-notification $))
+      (and demand (user-error "No notification at point"))))
+
+;;;; List
+
+(defun forge--ls-notifications (status)
+  (let* ((status (ensure-list status))
+         (savedp (memq 'saved status))
+         (status (remq 'saved status)))
+    (mapcar
+     (partial #'closql--remake-instance 'forge-notification (forge-db))
+     (if (seq-set-equal-p status '(unread pending done) #'eq)
+         (forge-sql [:select * :from notification :order-by [(desc updated)]])
+       (forge-sql
+        `[:select :distinct notification:*
+          :from [notification (as issue topic)]
+          :where (and (= notification:topic topic:id)
+                      ,@(and status '((in topic:status $v1)))
+                      ,@(and savedp '((= topic:saved-p 't))))
+          :union
+          :select :distinct notification:*
+          :from [notification (as pullreq topic)]
+          :where (and (= notification:topic topic:id)
+                      ,@(and status '((in topic:status $v1)))
+                      ,@(and savedp '((= topic:saved-p 't))))
+          :order-by [(desc notification:updated)]]
+        (vconcat status))))))
+
+;;; Mode
+
+(defvar-keymap forge-notifications-mode-map
+  :doc "Keymap for `forge-notifications-mode'."
+  :parent (make-composed-keymap forge-common-map magit-mode-map)
+  "<remap> <magit-refresh>"    #'magit-refresh-buffer
+  "<remap> <forge--list-menu>" #'forge-notifications-menu)
+
+(define-derived-mode forge-notifications-mode magit-mode "Forge Notifications"
+  "Major mode for looking at forge notifications."
+  :interactive nil
+  (magit-hack-dir-local-variables))
+
+(defun forge-notifications-setup-buffer ()
+  (magit-setup-buffer #'forge-notifications-mode nil
+    :buffer (get-buffer-create "*forge-notifications*")
+    (default-directory "/")
+    (forge-buffer-unassociated-p t)))
+
+(defun forge-notifications-refresh-buffer ()
+  (magit-set-header-line-format (forge-notifications-buffer-desc))
+  (forge-insert-notifications))
+
+(defun forge-notifications-buffer-desc ()
+  (let ((status forge-notifications-selection))
+    (cond
+      ((not (listp status))
+       (format "%s notifications" (capitalize (symbol-name status))))
+      ((seq-set-equal-p status '(unread pending)) "Inbox")
+      ((seq-set-equal-p status '(unread pending done)) "All notifications")
+      ((format "Notifications %s" status)))))
+
+(defvar forge-notifications-display-style 'flat)
+(defvar forge-notifications-selection '(unread pending))
+
+;;; Commands
+
+(transient-define-prefix forge-notifications-menu ()
+  "Control list of notifications and notification at point."
+  :transient-suffix t
+  :transient-non-suffix #'transient--do-call
+  :transient-switch-frame nil
+  :refresh-suffixes t
+  :environment #'forge--menu-environment
+  :column-widths forge--topic-menus-column-widths
+  [:hide always ("q" forge-menu-quit-list)]
+  [forge--topic-menus-group
+   ["Selection"
+    ("I" forge-notifications-display-inbox)
+    ("S" forge-notifications-display-saved)
+    ("D" forge-notifications-display-done)
+    ("A" forge-notifications-display-all)]]
+  [forge--lists-group
+   ["Display"
+    ("-F" forge-notifications-style-flat)
+    ("-G" forge-notifications-style-nested)
+    ("-H" forge-toggle-topic-legend)]]
+  [forge--topic-legend-group]
+  (interactive)
+  (unless (derived-mode-p 'forge-notifications-mode)
+    (forge-list-notifications))
+  (transient-setup 'forge-notifications-menu))
+
+(transient-augment-suffix forge-notifications-menu
+  :transient #'transient--do-replace
+  :if-mode 'forge-notifications-mode
+  :inapt-if (##eq (oref transient--prefix command) 'forge-notifications-menu)
+  :inapt-face 'forge-suffix-active)
+
+;;;###autoload(autoload 'forge-list-notifications "forge-notify" nil t)
+(transient-define-suffix forge-list-notifications ()
+  "List notifications."
+  :inapt-if-mode 'forge-notifications-mode
+  :inapt-face 'forge-suffix-active
+  (declare (interactive-only nil))
+  (interactive)
+  (forge-notifications-setup-buffer)
+  (transient-setup 'forge-notifications-menu))
+
+(transient-define-suffix forge-notifications-display-inbox ()
+  "List unread and pending notifications."
+  :description "inbox"
+  :inapt-if (##equal forge-notifications-selection '(unread pending))
+  :inapt-face 'forge-suffix-active
+  (interactive)
+  (unless (derived-mode-p 'forge-notifications-mode)
+    (user-error "Not in notification buffer"))
+  (setq forge-notifications-selection '(unread pending))
+  (forge-refresh-buffer))
+
+(transient-define-suffix forge-notifications-display-saved ()
+  "List saved notifications."
+  :description "saved"
+  :inapt-if (##eq forge-notifications-selection 'saved)
+  :inapt-face 'forge-suffix-active
+  (interactive)
+  (unless (derived-mode-p 'forge-notifications-mode)
+    (user-error "Not in notification buffer"))
+  (setq forge-notifications-selection 'saved)
+  (forge-refresh-buffer))
+
+(transient-define-suffix forge-notifications-display-done ()
+  "List done notifications."
+  :description "done"
+  :inapt-if (##eq forge-notifications-selection 'done)
+  :inapt-face 'forge-suffix-active
+  (interactive)
+  (unless (derived-mode-p 'forge-notifications-mode)
+    (user-error "Not in notification buffer"))
+  (setq forge-notifications-selection 'done)
+  (forge-refresh-buffer))
+
+(transient-define-suffix forge-notifications-display-all ()
+  "List all notifications."
+  :description "all"
+  :inapt-if (##equal forge-notifications-selection '(unread pending done))
+  :inapt-face 'forge-suffix-active
+  (interactive)
+  (unless (derived-mode-p 'forge-notifications-mode)
+    (user-error "Not in notification buffer"))
+  (setq forge-notifications-selection '(unread pending done))
+  (forge-refresh-buffer))
+
+(transient-define-suffix forge-notifications-style-flat ()
+  "Show a flat notification list."
+  :description "single list"
+  :inapt-if (##eq forge-notifications-display-style 'flat)
+  :inapt-face 'forge-suffix-active
+  (interactive)
+  (unless (derived-mode-p 'forge-notifications-mode)
+    (user-error "Not in notification buffer"))
+  (setq forge-notifications-display-style 'flat)
+  (forge-refresh-buffer))
+
+(transient-define-suffix forge-notifications-style-nested ()
+  "Group notifications by repository."
+  :description "group by repo"
+  :inapt-if (##eq forge-notifications-display-style 'nested)
+  :inapt-face 'forge-suffix-active
+  (interactive)
+  (unless (derived-mode-p 'forge-notifications-mode)
+    (user-error "Not in notification buffer"))
+  (setq forge-notifications-display-style 'nested)
+  (forge-refresh-buffer))
+
+;;; Sections
+
+(defclass forge-repository-section (magit-section)
+  ((type   :initform 'forge-repo)
+   (keymap :initform 'forge-repository-section-map)))
+
+(define-obsolete-variable-alias 'forge-forge-repo-section-map
+  'forge-repository-section-map "Forge 0.4.0")
+
+(defvar-keymap forge-repository-section-map
+  "<remap> <magit-browse-thing>" #'forge-browse-this-repository
+  "<remap> <magit-visit-thing>"  #'forge-visit-this-repository)
+
+(defun forge-insert-notifications ()
+  (let ((notifs (forge--ls-notifications forge-notifications-selection)))
+    (magit-insert-section (notifications)
+      (cond
+        ((not notifs)
+         (insert "(empty)\n"))
+        ((eq forge-notifications-display-style 'flat)
+         (magit-insert-section-body
+           (dolist (notif notifs)
+             (forge-insert-notification notif))
+           (insert ?\n)))
+        ((pcase-dolist (`(,_ . ,notifs)
+                        (seq-group-by (##oref % repository) notifs))
+           (let ((repo (forge-get-repository (car notifs))))
+             (magit-insert-section (forge-repo repo)
+               (magit-insert-heading
+                 (concat (propertize (oref repo slug) 'font-lock-face 'bold)
+                         (format " (%s)" (length notifs))))
+               (magit-insert-section-body
+                 (dolist (notif notifs)
+                   (forge-insert-notification notif))
+                 (insert ?\n))))))))))
+
+(defun forge-insert-notification (notif)
+  (with-slots (type title url) notif
+    (pcase type
+      ((or 'discussion 'issue 'pullreq)
+       (forge--insert-topic (forge-get-topic notif)))
+      ('commit
+       (magit-insert-section (ncommit nil) ; !commit
+         (string-match "[^/]*\\'" url)
+         (insert
+          (format "%s %s\n"
+                  (propertize (substring (match-string 0 url)
+                                         0 (magit-abbrev-length))
+                              'font-lock-face 'magit-hash)
+                  (magit-log--wash-summary
+                   (propertize title 'font-lock-face
+                               (if-let* ((topic (oref notif topic))
+                                         (_(eq (oref topic status) 'unread)))
+                                   'forge-topic-unread
+                                 'forge-topic-open)))))))
+      (_
+       ;; The documentation does not mention what "types"
+       ;; exist.  Make it obvious that this is something
+       ;; we do not know how to handle properly yet.
+       (magit-insert-section (notification notif)
+         (insert (propertize (format "(%s) %s\n" type title)
+                             'font-lock-face 'error)))))))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let")
+;;   ("partial"       . "llama--left-apply-partially"))
+;; End:
+(provide 'forge-notify)
+;;; forge-notify.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-notify.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-notify.elc
new file mode 100644
index 0000000..7db997e
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-notify.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-pkg.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-pkg.el
new file mode 100644
index 0000000..cc8cfe2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-pkg.el
@@ -0,0 +1,20 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "forge" "20260815.1911"
+  "Access Git forges from Magit."
+  '((emacs         "29.1")
+    (compat        "31.0")
+    (closql        "2.4")
+    (cond-let      "1.1")
+    (emacsql       "4.4")
+    (ghub          "5.3")
+    (llama         "1.0")
+    (magit         "4.7")
+    (markdown-mode "2.8")
+    (transient     "0.13")
+    (yaml          "1.2"))
+  :url "https://github.com/magit/forge"
+  :commit "71e182e40186cc2a79fea298586905f26f48ae15"
+  :revdesc "71e182e40186"
+  :keywords '("git" "tools" "vc")
+  :authors '(("Jonas Bernoulli" . "emacs.forge@jonas.bernoulli.dev"))
+  :maintainers '(("Jonas Bernoulli" . "emacs.forge@jonas.bernoulli.dev")))
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-post.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-post.el
new file mode 100644
index 0000000..9a8b498
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-post.el
@@ -0,0 +1,425 @@
+;;; forge-post.el --- Post support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'markdown-mode)
+
+(require 'forge)
+
+;;; Options
+
+(defcustom forge-post-mode-hook
+  '(visual-line-mode
+    turn-on-flyspell)
+  "Hook run after entering Forge-Post mode.
+This hook is run early on while setting up a buffer to edit a post.
+If you want to make changes to the already populated buffer, instead
+use `forge-edit-post-hook'."
+  :package-version '(forge . "0.2.0")
+  :group 'forge
+  :type 'hook
+  :options '(visual-line-mode
+             turn-on-flyspell))
+
+(defcustom forge-edit-post-hook
+  '(forge-create-pullreq-insert-single-commit-message
+    forge-create-pullreq-show-diff)
+  "Hook run after setting up a buffer to edit a post.
+Consult the variable `forge-edit-post-action' to determine the action;
+one of `new-discussion', `new-issue', `new-pullreq', `reply' and `edit'."
+  :package-version '(forge . "0.6.0")
+  :group 'forge
+  :type 'hook
+  :options '(forge-create-pullreq-insert-single-commit-message
+             forge-create-pullreq-insert-branch-description
+             forge-create-pullreq-show-diff))
+
+(defcustom forge-post-fallback-directory
+  (locate-user-emacs-file "forge-drafts/")
+  "Directory used to store post drafts for locally unavailable repositories.
+Normally drafts are stored inside the Git directory.  If that does not
+exist (or its location is unknown), then this directory is used instead."
+  :package-version '(forge . "0.4.7")
+  :group 'forge
+  :type 'directory)
+
+;;; Class
+
+(defclass forge-post (forge-object) () :abstract t)
+
+;;; Query
+;;;; Get
+
+(cl-defmethod forge-get-parent ((post forge-post))
+  (forge-get-topic post))
+
+(cl-defmethod forge-get-repository ((post forge-post))
+  (forge-get-repository (forge-get-topic post)))
+
+;;;; Current
+
+(defun forge-post-at-point (&optional assert)
+  "Return the post at point.
+If there is no such post and DEMAND is non-nil, then signal
+an error."
+  (or (magit-section-value-if '(issue pullreq post))
+      (and assert (user-error "There is no post at point"))))
+
+(defun forge-comment-at-point (&optional assert)
+  "Return the comment at point.
+If there is no such comment and DEMAND is non-nil, then signal
+an error."
+  (or (and (magit-section-value-if '(post))
+           (let ((post (oref (magit-current-section) value)))
+             (and (or (forge-pullreq-post-p post)
+                      (forge-issue-post-p post))
+                  post)))
+      (and assert (user-error "There is no comment at point"))))
+
+;;; Utilities
+
+(cl-defmethod forge--format ((post forge-post) slot &optional spec)
+  (forge--format (forge-get-topic post) slot
+                 `(,@spec (?I . ,(oref post number)))))
+
+;;; Mode
+
+(defvar-keymap forge-post-mode-map
+  "<remap> <forge--item-menu>"             #'forge-post-menu
+  "C-c C-e"                                #'forge-post-menu
+  "C-c C-c"                                #'forge-post-submit
+  "<remap> <evil-save-and-close>"          #'forge-post-submit
+  "<remap> <evil-save-modified-and-close>" #'forge-post-submit
+  "C-c C-k"                                #'forge-post-cancel
+  "<remap> <kill-buffer>"                  #'forge-post-cancel
+  "<remap> <ido-kill-buffer>"              #'forge-post-cancel
+  "<remap> <iswitchb-kill-buffer>"         #'forge-post-cancel
+  "<remap> <evil-quit>"                    #'forge-post-cancel)
+
+(define-derived-mode forge-post-mode gfm-mode "Forge-Post"
+  "Major mode for editing topic posts."
+  :interactive nil)
+
+(defvar-local forge--pre-post-buffer nil)
+(defvar-local forge--pre-post-winconf nil)
+
+(defvar-local forge--submit-post-function nil)
+
+(defvar-local forge-edit-post-action nil
+  "The action being carried out by editing this post buffer.
+One of `new-discussion', `new-issue', `new-pullreq', `reply' and `edit'.")
+
+(defvar-local forge--buffer-post-object nil)
+(defvar-local forge--buffer-template nil)
+(defvar-local forge--buffer-category nil)
+(defvar-local forge--buffer-milestone nil)
+(defvar-local forge--buffer-labels nil)
+(defvar-local forge--buffer-assignees nil)
+(defvar-local forge--buffer-base-branch nil)
+(defvar-local forge--buffer-head-branch nil)
+(defvar-local forge--buffer-draft-p nil)
+
+(defun forge--setup-post-buffer ( obj-or-action submit file header
+                                  &optional bindings fn)
+  (declare (indent defun))
+  (let* ((prevbuf (current-buffer))
+         (winconf (current-window-configuration))
+         (action  (cond ((symbolp obj-or-action)             obj-or-action)
+                        ((forge--childp obj-or-action 'forge-topic) 'reply)
+                        ((forge--childp obj-or-action 'forge-post)   'edit)))
+         (obj     (if (symbolp obj-or-action)
+                      (forge-get-repository :tracked)
+                    obj-or-action))
+         (repo    (forge-get-repository obj))
+         (header  (forge--format obj header))
+         (file    (forge--post-expand-file-name (forge--format obj file) repo))
+         (_       (make-directory (file-name-directory file) t))
+         (buffer  (find-file-noselect file))
+         (resume  (forge--post-resume-p file buffer)))
+    (with-current-buffer buffer
+      (forge-post-mode)
+      (magit-set-header-line-format header)
+      (setq forge--pre-post-buffer prevbuf)
+      (setq forge--pre-post-winconf winconf)
+      (forge-set-buffer-repository)
+      (setq forge-edit-post-action action)
+      (setq forge--buffer-post-object obj)
+      (setq forge--submit-post-function submit)
+      (pcase-dolist (`(,var ,val) bindings)
+        (set-local var val)
+        (when (eq var 'forge--buffer-template)
+          (let-alist forge--buffer-template
+            (setq forge--buffer-assignees .assignees)
+            (setq forge--buffer-labels .labels)
+            (setq forge--buffer-draft-p .draft))))
+      (cond-let
+        (resume)
+        ((not (memq action '(new-discussion new-issue new-pullreq))))
+        ([template (alist-get 'text forge--buffer-template)]
+         (unless (string-prefix-p "# " template)
+           (insert "# \n\n"))
+         (insert template)
+         (goto-char 3))
+        ((insert "# ")))
+      (when fn
+        (funcall fn)))
+    (run-hook-wrapped 'forge-edit-post-hook
+                      (lambda (fn) (with-current-buffer buffer (funcall fn)) nil))
+    (message (substitute-command-keys
+              "Use \\[forge-post-menu] to set fields and submit or abort"))
+    (forge--display-post-buffer buffer)))
+
+(defun forge--display-post-buffer (buf)
+  (magit-display-buffer buf #'display-buffer))
+
+(defun forge--post-expand-file-name (file repo)
+  (if-let ((worktree (oref repo worktree)))
+      (expand-file-name (concat "magit/posts/" file) (magit-gitdir worktree))
+    (expand-file-name (with-slots (githost owner name) repo
+                        (format "%s_%s-%s_%s" githost owner name file))
+                      forge-post-fallback-directory)))
+
+(defun forge--post-resume-p (file buffer)
+  (and (file-exists-p file)
+       (> (file-attribute-size (file-attributes file)) 0)
+       (progn (forge--display-post-buffer buffer)
+              (or (magit-read-char-case "" nil
+                    (?r "[r]esume editing this draft" t)
+                    (?d "[d]iscard and start over?"))
+                  (progn (erase-buffer)
+                         nil)))))
+
+(defun forge-create-pullreq-insert-single-commit-message ()
+  "When creating a pull-request from a single commit, insert its message."
+  (when-let* ((source forge--buffer-head-branch)
+              (target forge--buffer-base-branch)
+              (_(= (car (magit-rev-diff-count source target)) 1)))
+    (when (alist-get 'text forge--buffer-template)
+      (goto-char (point-max))
+      (unless (eq (char-before) ?\n)
+        (insert ?\n))
+      (insert "\n<!-- Message of single commit: -->\n\n"))
+    (magit-rev-insert-format "%B" source)
+    (when (= (char-before (1- (point))) ?\n)
+      (delete-char -1))
+    (goto-char 3)))
+
+(defun forge-create-pullreq-insert-branch-description ()
+  "When creating a pull-request, insert branch description, if any.
+Insert the value of `branch.BRANCH.description' of the source BRANCH."
+  (when-let* ((source forge--buffer-head-branch)
+              (description (magit-get "branch"
+                                      (cdr (magit-split-branch-name source))
+                                      "description")))
+    (when (or (alist-get 'text forge--buffer-template)
+              (> (point-max) 3))
+      (goto-char (point-max))
+      (unless (eq (char-before) ?\n)
+        (insert ?\n))
+      (insert "\n<!-- Branch description: -->\n\n"))
+    (insert description)
+    (goto-char 3)))
+
+(defun forge-create-pullreq-show-diff ()
+  "When creating a pull-request, show diff for the branch's changes."
+  (when (eq forge-edit-post-action 'new-pullreq)
+    (magit-diff-setup-buffer
+     (format "%s...%s"
+             forge--buffer-base-branch
+             forge--buffer-head-branch)
+     nil (car (magit-diff-arguments)) nil 'committed t)))
+
+(defun forge--post-buffer-text ()
+  (save-match-data
+    (save-excursion
+      (goto-char (point-min))
+      (skip-chars-forward "\s\t\n")
+      (let (title body)
+        (when (looking-at "^#*[\s\t]*")
+          (goto-char (match-end 0)))
+        (setq title (buffer-str (point) (line-end-position)))
+        (forward-line)
+        (setq body (buffer-str (point)))
+        (cons (string-trim title)
+              (string-trim body))))))
+
+(defun forge--post-submit-callback (&optional full-pull)
+  (let* ((file    buffer-file-name)
+         (winconf forge--pre-post-winconf)
+         (editbuf (current-buffer))
+         (prevbuf forge--pre-post-buffer)
+         (topic   (ignore-errors (forge-get-topic forge--buffer-post-object)))
+         (repo    (forge-get-repository (or topic forge--buffer-post-object))))
+    (lambda (value &optional headers status req)
+      (run-hook-with-args 'forge-post-submit-callback-hook
+                          value headers status req)
+      (delete-file file t)
+      (let ((dir (file-name-directory file)))
+        (unless (cddr (directory-files dir nil nil t))
+          (delete-directory dir nil t)))
+      (when (buffer-live-p editbuf)
+        (with-current-buffer editbuf
+          (magit-mode-bury-buffer 'kill)))
+      (forge--maybe-restore-winconf winconf)
+      (with-current-buffer
+          (if (buffer-live-p prevbuf) prevbuf (current-buffer))
+        (if (or (not full-pull)
+                (oref repo selective-p))
+            (forge--pull-topic repo (or topic (alist-get 'number value)))
+          (forge--pull repo))))))
+
+(defun forge--post-submit-errorback ()
+  (lambda (error &rest _)
+    (error "Failed to submit post: %S" error)))
+
+(defun forge--maybe-restore-winconf (winconf)
+  (when (and winconf
+             (eq (window-configuration-frame winconf)
+                 (selected-frame)))
+    (set-window-configuration winconf)))
+
+;;; Commands
+
+(transient-define-prefix forge-post-menu ()
+  "Dispatch a post creation command."
+  [["Set"
+    :if (lambda ()
+          (and (forge-github-repository-p (forge-get-repository :tracked))
+               (string-prefix-p "new-"
+                                (file-name-nondirectory buffer-file-name))))
+    ("-m" forge-new-topic-set-milestone)
+    ("-l" forge-new-topic-set-labels)
+    ("-a" forge-new-topic-set-assignees)
+    ("-d" forge-new-pullreq-toggle-draft)]
+   ["Actions"
+    ("C-c" "Submit" forge-post-submit)
+    ("C-k" "Cancel" forge-post-cancel)]])
+
+(defun forge-post-submit ()
+  "Submit the post that is being edited in the current buffer."
+  (interactive)
+  (save-buffer)
+  (funcall forge--submit-post-function
+           (forge-get-repository forge--buffer-post-object)
+           forge--buffer-post-object))
+
+(defun forge-post-cancel ()
+  "Cancel the post that is being edited in the current buffer."
+  (interactive)
+  (save-buffer)
+  (let ((winconf forge--pre-post-winconf))
+    (when (yes-or-no-p "Also delete draft? ")
+      (dired-delete-file buffer-file-name nil magit-delete-by-moving-to-trash))
+    (magit-mode-bury-buffer 'kill)
+    (forge--maybe-restore-winconf winconf)))
+
+(defclass forge--new-topic-set-slot-command (transient-lisp-variable)
+  ((name :initarg :name)
+   (reader :initarg :reader)
+   (formatter :initarg :formatter)
+   (format :initform " %k %d")
+   (description :initform (lambda (obj)
+                            (with-slots (name variable formatter) obj
+                              (if-let* ((value (symbol-value variable))
+                                        (value (funcall formatter value)))
+                                  (format "%s %s" name value)
+                                (format "%s" name)))))))
+
+(transient-define-infix forge-new-topic-set-milestone ()
+  "Set milestone for the topic being created."
+  :class 'forge--new-topic-set-slot-command
+  :variable 'forge--buffer-milestone
+  :name "milestone"
+  :reader (lambda (&rest _) (forge-read-topic-milestone))
+  :formatter (lambda (milestone) (propertize milestone 'face 'forge-topic-label))
+  :if (lambda () (equal (file-name-nondirectory buffer-file-name) "new-issue")))
+
+(transient-define-infix forge-new-topic-set-labels ()
+  "Set labels for the topic being created."
+  :class 'forge--new-topic-set-slot-command
+  :variable 'forge--buffer-labels
+  :name "labels"
+  :reader (lambda (&rest _) (forge-read-topic-labels))
+  :formatter (##forge--format-labels % t)
+  :if (lambda () (equal (file-name-nondirectory buffer-file-name) "new-issue")))
+
+(transient-define-infix forge-new-topic-set-assignees ()
+  "Set assignees for the pull-request being created."
+  :class 'forge--new-topic-set-slot-command
+  :variable 'forge--buffer-assignees
+  :name "assignees"
+  :reader (lambda (&rest _) (forge-read-topic-assignees))
+  :formatter #'forge--format-topic-assignees
+  :if (lambda () (equal (file-name-nondirectory buffer-file-name) "new-issue")))
+
+(transient-define-infix forge-new-pullreq-toggle-draft ()
+  "Toggle whether the pull-request being created is a draft."
+  :class 'forge--new-topic-set-slot-command
+  :variable 'forge--buffer-draft-p
+  :name "draft"
+  :reader (lambda (&rest _) (not forge--buffer-draft-p))
+  :description (lambda ()
+                 (format (propertize "[%s]" 'face 'transient-delimiter)
+                         (propertize "draft" 'face
+                                     (if forge--buffer-draft-p
+                                         'transient-value
+                                       'transient-inactive-value))))
+  :if (lambda () (equal (file-name-nondirectory buffer-file-name) "new-pullreq")))
+
+;;; Notes
+
+(defclass forge-note (forge-post) ())
+
+(defvar-keymap forge-note-section-map
+  "<remap> <magit-edit-thing>" #'forge-edit-topic-note)
+
+(defun forge--save-note (_repo topic)
+  (let ((value (string-trim (buffer-str))))
+    (oset topic note (if (equal value "") nil value)))
+  (delete-file buffer-file-name t)
+  (let ((dir (file-name-directory buffer-file-name)))
+    (unless (cddr (directory-files dir nil nil t))
+      (delete-directory dir)))
+  (let ((prevbuf forge--pre-post-buffer))
+    (magit-mode-bury-buffer 'kill)
+    (forge-refresh-buffer prevbuf)))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let")
+;;   ("buffer-string" . "buffer-string")
+;;   ("buffer-str"    . "forge--buffer-substring-no-properties"))
+;; End:
+(provide 'forge-post)
+;;; forge-post.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-post.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-post.elc
new file mode 100644
index 0000000..cd60fe2
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-post.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-pullreq.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-pullreq.el
new file mode 100644
index 0000000..9a21d3f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-pullreq.el
@@ -0,0 +1,319 @@
+;;; forge-pullreq.el --- Pullreq support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+(require 'forge-post)
+(require 'forge-topic)
+
+;;; Classes
+
+(defclass forge-pullreq (forge-topic)
+  ((closql-table         :initform 'pullreq)
+   (closql-primary-key   :initform 'id)
+   (closql-order-by      :initform [(desc number)])
+   (closql-foreign-key   :initform 'repository)
+   (closql-class-prefix  :initform "forge-")
+   (id                   :initarg :id)
+   (repository           :initarg :repository)
+   (number               :initarg :number)
+   (state                :initarg :state)
+   (author               :initarg :author)
+   (title                :initarg :title)
+   (created              :initarg :created)
+   (updated              :initarg :updated :initform nil)
+   (closed               :initarg :closed)
+   (merged               :initarg :merged)
+   (status               :initarg :status :initform nil)
+   (locked-p             :initarg :locked-p)
+   (editable-p           :initarg :editable-p)
+   (cross-repo-p         :initarg :cross-repo-p)
+   (base-ref             :initarg :base-ref)
+   (base-repo            :initarg :base-repo)
+   (head-ref             :initarg :head-ref)
+   (head-user            :initarg :head-user)
+   (head-repo            :initarg :head-repo)
+   (milestone            :initarg :milestone)
+   (body                 :initarg :body)
+   (assignees            :closql-tables (pullreq-assignee assignee))
+   (project-cards) ; projectsCards
+   (commits)
+   (edits) ; userContentEdits
+   (labels               :closql-tables (pullreq-label label))
+   (participants)
+   (posts                :closql-class forge-pullreq-post)
+   (reactions)
+   (review-requests      :closql-tables (pullreq-review-request assignee))
+   (reviews)
+   (timeline)
+   (marks                :closql-tables (pullreq-mark mark))
+   (note                 :initarg :note :initform nil)
+   (base-rev             :initarg :base-rev)
+   (head-rev             :initarg :head-rev)
+   (draft-p              :initarg :draft-p)
+   (their-id             :initarg :their-id)
+   (slug                 :initarg :slug)
+   (saved-p              :initarg :saved-p :initform nil)
+   ))
+
+(cl-defmethod closql-dref ((obj forge-pullreq) (_(eql assignees)))
+  (forge-sql-cdr
+   [:select assignee:* :from assignee
+    :join pullreq-assignee :on (= pullreq-assignee:id assignee:id)
+    :where (= pullreq-assignee:pullreq $s1)
+    :order-by [(asc login)]]
+   (closql--oref obj 'id)))
+
+(cl-defmethod closql-dref ((obj forge-pullreq) (_(eql labels)))
+  (forge-sql-cdr
+   [:select label:* :from label
+    :join pullreq-label :on (= pullreq-label:id label:id)
+    :where (= pullreq-label:pullreq $s1)
+    :order-by [(asc name)]]
+   (closql--oref obj 'id)))
+
+(cl-defmethod closql-dref ((obj forge-pullreq) (_(eql review-requests)))
+  (forge-sql-cdr
+   [:select assignee:* :from assignee
+    :join pullreq-review-request :on (= pullreq-review-request:id assignee:id)
+    :where (= pullreq-review-request:pullreq $s1)
+    :order-by [(asc login)]]
+   (closql--oref obj 'id)))
+
+(cl-defmethod closql-dref ((obj forge-pullreq) (_(eql marks)))
+  (forge-sql-cdr
+   [:select mark:* :from mark
+    :join pullreq-mark :on (= pullreq-mark:id mark:id)
+    :where (= pullreq-mark:pullreq $s1)
+    :order-by [(asc name)]]
+   (closql--oref obj 'id)))
+
+(defclass forge-pullreq-post (forge-post)
+  ((closql-table         :initform 'pullreq-post)
+   (closql-primary-key   :initform 'id)
+   (closql-order-by      :initform [(asc number)])
+   (closql-foreign-key   :initform 'pullreq)
+   (closql-class-prefix  :initform "forge-pullreq-")
+   (id                   :initarg :id)
+   (pullreq              :initarg :pullreq)
+   (number               :initarg :number)
+   (author               :initarg :author)
+   (created              :initarg :created)
+   (updated              :initarg :updated)
+   (body                 :initarg :body)
+   (edits)
+   (reactions)
+   ))
+
+;;; Query
+;;;; Get
+
+(cl-defmethod forge-get-repository ((post forge-pullreq-post))
+  (forge-get-repository (forge-get-pullreq post)))
+
+(cl-defmethod forge-get-topic ((post forge-pullreq-post))
+  (forge-get-pullreq post))
+
+(cl-defmethod forge-get-pullreq ((pullreq forge-pullreq))
+  pullreq)
+
+(cl-defmethod forge-get-pullreq ((repo forge-repository) number)
+  (cl-assert (numberp number) t)
+  (closql-get (forge-db)
+              (forge--object-id 'forge-pullreq repo number)
+              'forge-pullreq))
+
+(cl-defmethod forge-get-pullreq ((number integer))
+  (and$ (forge-get-repository :tracked nil 'notatpt)
+        (forge-get-pullreq $ number)))
+
+(cl-defmethod forge-get-pullreq ((id string))
+  (closql-get (forge-db) id 'forge-pullreq))
+
+(cl-defmethod forge-get-pullreq ((post forge-pullreq-post))
+  (closql-get (forge-db)
+              (oref post pullreq)
+              'forge-pullreq))
+
+(cl-defmethod forge-get-pullreq ((_(eql :branch)) &optional branch)
+  (and-let* ((branch (or branch
+                         (magit-section-case
+                           (branch (oref it value))
+                           (commit (magit--painted-branch-at-point)))))
+             (branch (cdr (magit-split-branch-name branch)))
+             (number (magit-get "branch" branch "pullRequest")))
+    (forge-get-pullreq (string-to-number number))))
+
+;;;; Current
+
+(defun forge-current-pullreq (&optional demand)
+  "Return the pull-request at point or being visited.
+If there is no such pull-request and DEMAND is non-nil, then signal
+an error."
+  (or (forge-pullreq-at-point)
+      (and (forge-pullreq-p forge-buffer-topic)
+           forge-buffer-topic)
+      (and demand (user-error "No current pull-request"))))
+
+(defun forge-pullreq-at-point (&optional demand)
+  "Return the pull-request at point.
+If there is no such pull-request and DEMAND is non-nil, then signal
+an error."
+  (or (thing-at-point 'forge-pullreq)
+      (magit-section-value-if 'pullreq)
+      (forge-get-pullreq :branch)
+      (and demand (user-error "No pull-request at point"))))
+
+(put 'forge-pullreq 'thing-at-point #'forge-thingatpt--pullreq)
+(defun forge-thingatpt--pullreq ()
+  (and-let* ((_(thing-at-point-looking-at "\\([#!]\\)\\([0-9]+\\)\\_>"))
+             (prefix (match-string-no-properties 1))
+             (number (string-to-number (match-string-no-properties 2)))
+             (repo (forge--repo-for-thingatpt))
+             (_(or (equal prefix "#")
+                   (forge-gitlab-repository--eieio-childp repo))))
+    (forge-get-pullreq repo number)))
+
+;;; Read
+
+(defun forge-read-pullreq (prompt)
+  "Read an active pull-request with completion using PROMPT.
+
+Open, unread and pending pull-requests are considered active.
+Default to the current pull-request, even if it isn't active.
+
+\\<forge-read-topic-minibuffer-map>While completion is in \
+progress, \\[forge-read-topic-lift-limit] lifts the limit, extending
+the completion candidates to include all pull-requests.
+
+If `forge-limit-topic-choices' is nil, then all candidates
+can be selected from the start."
+  (forge--read-topic prompt
+                     #'forge-current-pullreq
+                     (forge--topics-spec :type 'pullreq :active t)
+                     (forge--topics-spec :type 'pullreq :active nil
+                                         :state nil :limit nil)))
+
+;;; Utilities
+
+(defun forge--pullreq-branch-internal (pullreq)
+  (let ((branch (oref pullreq head-ref)))
+    ;; It is invalid for a branch name to begin with a colon, yet
+    ;; that is what Gitlab uses when a pull-request's source branch
+    ;; has been deleted.  On Github this is simply nil in the same
+    ;; situation.
+    (and branch (not (string-prefix-p ":" branch)) branch)))
+
+(defun forge--pullreq-branch-active (pullreq)
+  (let* ((number (number-to-string (oref pullreq number)))
+         (branch-n (format "pr-%s" number))
+         (branch (forge--pullreq-branch-internal pullreq)))
+    (or (and branch
+             (magit-branch-p branch)
+             (equal (magit-get "branch" branch "pullRequest") number)
+             branch)
+        (and (magit-branch-p branch-n)
+             (equal (magit-get "branch" branch-n "pullRequest") number)
+             branch-n))))
+
+(defun forge--pullreq-ref (pullreq)
+  (let ((ref (format "refs/pullreqs/%s" (oref pullreq number))))
+    (and (magit-rev-verify ref) ref)))
+
+(defun forge--pullreq-range (pullreq &optional endpoints)
+  (and-let ((head (forge--pullreq-ref pullreq)))
+    (let ((base (concat (forge--get-remote) "/" (oref pullreq base-ref))))
+      (concat (if (magit-rev-ancestor-p head base)
+                  (oref pullreq base-rev)
+                base)
+              (if endpoints "..." "..")
+              head))))
+
+;;; Insert
+
+(defvar-keymap forge-pullreqs-section-map
+  :parent forge-common-map
+  "<remap> <magit-browse-thing>" #'forge-browse-pullreqs
+  "<remap> <magit-visit-thing>"  #'forge-list-pullreqs
+  "<remap> <forge--list-menu>"   #'forge-topics-menu
+  "<remap> <forge--item-menu>"   #'forge-topic-menu
+  "C-c C-n"                      #'forge-create-pullreq)
+
+(defvar-keymap forge-pullreq-section-map
+  :parent forge-common-map
+  "<remap> <magit-visit-thing>"  #'forge-visit-this-topic
+  "<remap> <forge--list-menu>"   #'forge-topics-menu
+  "<remap> <forge--item-menu>"   #'forge-topic-menu)
+
+(cl-defun forge-insert-pullreqs (&optional (spec nil sspec) heading)
+  "Insert a list of pull-requests, according to `forge--buffer-topics-spec'.
+Optional SPEC can be used to override that filtering specification,
+and optional HEADING to change the section heading."
+  (when-let* ((_(forge-db t))
+              (repo (forge-get-repository :tracked?))
+              (spec (if sspec spec (forge--clone-buffer-topics-spec)))
+              (_(memq (oref spec type) '(topic pullreq))))
+    (oset spec type 'pullreq)
+    (forge--insert-topics 'pullreqs
+                          (or heading "Pull requests")
+                          (forge--list-topics spec repo))))
+
+(defun forge--insert-pullreq-commits (pullreq &optional all)
+  (cl-letf (((symbol-function #'magit-cancel-section) (lambda ())))
+    (cond-let
+      (all
+       ;; Numeric pr ref, pr branch (if it exists) and api
+       ;; pr range may be out of sync.  Just show them all.
+       (magit-insert-section-body
+         (magit--insert-log nil
+           (delq nil (list (concat "^" (or (oref pullreq base-rev)
+                                           (concat (forge--get-remote) "/"
+                                                   (oref pullreq base-ref))))
+                           (forge--pullreq-ref pullreq)
+                           (forge--pullreq-branch-active pullreq)
+                           (and-let* ((branch (oref pullreq head-ref))
+                                      (_(magit-local-branch-p branch)))
+                             branch)))
+           (seq-uniq (cons "--graph" magit-buffer-log-args)))))
+      ([range (forge--pullreq-range pullreq)]
+       (magit-insert-section-body
+         (magit--insert-log nil range magit-buffer-log-args)
+         (magit-make-margin-overlay nil t))))))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let"))
+;; End:
+(provide 'forge-pullreq)
+;;; forge-pullreq.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-pullreq.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-pullreq.elc
new file mode 100644
index 0000000..5fb7095
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-pullreq.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repo.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repo.el
new file mode 100644
index 0000000..3939630
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repo.el
@@ -0,0 +1,562 @@
+;;; forge-repo.el --- Repository support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+(require 'eieio)
+
+;;; Classes
+
+(defclass forge-repository (forge-object)
+  ((closql-class-prefix        :initform "forge-")
+   (closql-class-suffix        :initform "-repository")
+   (closql-table               :initform 'repository)
+   (closql-primary-key         :initform 'id)
+   (discussions-url-format     :initform nil :allocation :class)
+   (discussion-url-format      :initform nil :allocation :class)
+   (discussion-post-url-format :initform nil :allocation :class)
+   (issues-url-format          :initform nil :allocation :class)
+   (issue-url-format           :initform nil :allocation :class)
+   (issue-post-url-format      :initform nil :allocation :class)
+   (pullreqs-url-format        :initform nil :allocation :class)
+   (pullreq-url-format         :initform nil :allocation :class)
+   (pullreq-post-url-format    :initform nil :allocation :class)
+   (commit-url-format          :initform nil :allocation :class)
+   (branch-url-format          :initform nil :allocation :class)
+   (remote-url-format          :initform nil :allocation :class)
+   (blob-url-format            :initform nil :allocation :class)
+   (create-issue-url-format    :initform nil :allocation :class)
+   (create-pullreq-url-format  :initform nil :allocation :class)
+   (pullreq-refspec            :initform nil :allocation :class)
+   (id                         :initform nil :initarg :id)
+   (forge-id                   :initform nil :initarg :forge-id)
+   (forge                      :initform nil :initarg :forge)
+   (owner                      :initform nil :initarg :owner)
+   (name                       :initform nil :initarg :name)
+   (apihost                    :initform nil :initarg :apihost)
+   (githost                    :initform nil :initarg :githost)
+   (remote                     :initform nil :initarg :remote)
+   (condition                  :initform :stub)
+   (created                    :initform nil)
+   (updated                    :initform nil)
+   (pushed                     :initform nil)
+   (parent                     :initform nil)
+   (description                :initform nil)
+   (homepage                   :initform nil)
+   (default-branch             :initform nil)
+   (archived-p                 :initform nil)
+   (fork-p                     :initform nil)
+   (locked-p                   :initform nil)
+   (mirror-p                   :initform nil)
+   (private-p                  :initform nil)
+   (issues-p                   :initform t)
+   (wiki-p                     :initform nil)
+   (stars                      :initform nil)
+   (watchers                   :initform nil)
+   (assignees                  :closql-table assignee)
+   (forks                      :closql-table fork)
+   (issues                     :closql-class forge-issue)
+   (labels                     :closql-table label)
+   (pullreqs                   :closql-class forge-pullreq)
+   (revnotes                   :closql-class forge-revnote)
+   (selective-p                :initform nil)
+   (worktree                   :initform nil)
+   (milestones                 :closql-table milestone)
+   (issues-until               :initform nil)
+   (pullreqs-until             :initform nil)
+   (teams                      :initform nil)
+   (discussion-categories      :closql-table discussion-category)
+   (discussions                :closql-class forge-discussion)
+   (discussions-p              :initform nil)
+   (discussions-until          :initform nil))
+  :abstract t)
+
+(defclass forge-unusedapi-repository (forge-repository) () :abstract t)
+
+(defclass forge-noapi-repository (forge-repository) () :abstract t)
+
+(cl-defmethod slot-missing ((object forge-repository)
+                            slot-name operation &optional _new-value)
+  (if (and (eq operation 'oref)
+           (eq slot-name 'slug))
+      (concat (oref object owner) "/"
+              (oref object name))
+    (cl-call-next-method)))
+
+;;; Query
+;;;; Get
+
+(defvar-local forge-buffer-repository nil)
+(put 'forge-buffer-repository 'permanent-local t)
+
+(defvar-local forge-buffer-unassociated-p nil)
+
+(defconst forge--signal-no-entry '(:tracked :stub :insert!))
+
+(defun forge--get-remote (&optional warn ignore-variable)
+  (let* ((remotes (magit-list-remotes))
+         (config (and (not ignore-variable)
+                      (magit-get "forge.remote")))
+         (remote (if (cdr remotes)
+                     (or (car (member config remotes))
+                         (car (member "upstream" remotes))
+                         (car (member "origin" remotes)))
+                   (car remotes))))
+    (when (and warn config remote (not (equal config remote)))
+      (message "Ignored forge.remote=%s; no such remote.\nSee %s." config
+               "https://docs.magit.vc/forge/How-Forge-Detection-Works.html"))
+    remote))
+
+(defun forge--get-default-branch (repo)
+  (let ((default-directory (forge-get-worktree repo)))
+    (concat (forge--get-remote) "/"
+            (or (oref repo default-branch) "master"))))
+
+(cl-defmethod forge-get-repository ((_(eql :id)) id)
+  (closql-get (forge-db) (substring-no-properties id) 'forge-repository))
+
+(cl-defmethod forge-get-repository ((_(eql :dir)) dir)
+  (let ((default-directory dir)
+        (forge-buffer-repository nil)
+        (forge-buffer-topic nil))
+    (forge-get-repository :stub? nil 'notatpt)))
+
+(cl-defmethod forge-get-repository ((demand symbol) &optional remote notatpt)
+   "Return the current forge repository.
+
+First check if `forge-buffer-repository', or if that is nil, then
+the repository for `forge-buffer-topic', satisfies DEMAND.  If so,
+then return that repository.
+
+Otherwise return the repository for `default-directory', if that
+exists and satisfies DEMAND.  If that fails too, then return nil
+or signal an error, depending on DEMAND."
+  (or (and-let ((_(not notatpt))
+                (repo (forge-repository-at-point)))
+        (forge-get-repository repo 'noerror demand))
+      (and-let ((_(not remote))
+                (repo (or (forge-buffer-repository)
+                          (and forge-buffer-topic
+                               (forge-get-repository forge-buffer-topic)))))
+        (forge-get-repository repo 'noerror demand))
+      (magit--with-refresh-cache
+          (list default-directory 'forge-get-repository demand)
+        (cond-let
+          ((not (magit-gitdir))
+           (when (memq demand forge--signal-no-entry)
+             (error
+              "Cannot determine Forge repository outside of Git repository")))
+          [[remote (or remote (forge--get-remote 'warn))]]
+          ([_ remote]
+           [url (magit-git-string "remote" "get-url" remote)]
+           (and$ (forge-get-repository url remote demand)
+                 (prog1 $ (oset $ worktree (magit-toplevel)))))
+          ((memq demand forge--signal-no-entry)
+           (error
+            "Cannot determine forge repository.  %s\nSee %s."
+            (cond (remote (format "No url configured for %S." remote))
+                  ((and$ (magit-get "forge.remote")
+                         (format "Value of `forge.remote' is %S but %s"
+                                 $ "that remote does not exist.")))
+                  ((magit-list-remotes) "Cannot decide on remote to use.")
+                  (t "No remote configured."))
+            "https://docs.magit.vc/forge/How-Forge-Detection-Works.html"))))))
+
+(cl-defmethod forge-get-repository ((url string) &optional remote demand)
+  "Return the repository at URL."
+  (cond-let
+    ([parts (forge--split-forge-url url)]
+     (forge-get-repository parts remote (or demand :known?)))
+    ((memq demand forge--signal-no-entry)
+     (error "Cannot determine forge repository.  %s isn't a forge URL.  %s"
+            url "You might have to customize `forge-alist'."))))
+
+(cl-defmethod forge-get-repository (((host owner name) list)
+                                    &optional remote demand)
+  "((HOST OWNER NAME) &optional REMOTE DEMAND)
+
+Return the repository identified by HOST, OWNER and NAME.
+See `forge-alist' for valid Git hosts."
+  (setq host  (substring-no-properties host))
+  (setq owner (substring-no-properties owner))
+  (setq name  (substring-no-properties name))
+  (cond-let
+    ((memq demand '(:tracked :tracked? :known? :insert! :valid? :stub :stub?)))
+    ([corrected (pcase demand
+                  ('t      :tracked)
+                  ('full   :tracked?)
+                  ('nil    :known?)
+                  ('create :insert!)
+                  ('stub   :stub)
+                  ('maybe  :stub?))]
+     (message "Obsolete value for `%s's DEMAND: `%s'; use `%s' instead"
+              'forge-get-repository demand corrected)
+     (setq demand corrected))
+    ((error "Unknown value for `%s's DEMAND: `%s'"
+            'forge-get-repository demand)))
+  (cond-let
+    ([spec (forge--get-forge-host host t)]
+     (pcase-let*
+         ;; The `webhost' is used to identify the corresponding forge.
+         ;; For that reason it is stored in the `forge' slot.  The id
+         ;; stored in the `id' slot also derives from that value.
+         ((`(,githost ,apihost ,webhost ,class) spec)
+          (row (car (forge-sql [:select * :from repository
+                                :where (and (= forge $s1)
+                                            (= owner $s2)
+                                            (= name  $s3))]
+                               webhost owner name)))
+          (obj (and row (closql--remake-instance class (forge-db) row))))
+       ;; Synchronize the object with the entry from `forge-alist'.
+       ;; This only has an effect if the entry was modified, which
+       ;; should rarely, if ever, happen.  Avoid confusion, by not
+       ;; mentioning this detail in any docstring.
+       (when obj
+         (oset obj apihost apihost)
+         (oset obj githost githost)
+         (oset obj remote  remote))
+       (pcase (list demand (and obj (eq (oref obj condition) :tracked)))
+         (`(:tracked? nil) (setq obj nil))
+         (`(:tracked  nil)
+          (error "Cannot use `%s' in %S yet.\n%s"
+                 this-command (magit-toplevel)
+                 "Use `M-x forge-add-repository' before trying again.")))
+       (when (and (memq demand '(:insert! :valid? :stub :stub?))
+                  (not obj))
+         (pcase-let ((`(,id . ,forge-id)
+                      (forge--repository-ids
+                       class webhost owner name
+                       (memq demand '(:stub :stub?))
+                       (eq demand :valid?))))
+           (cond
+             ((not id)
+              ;; `:valid?' was used and it turned out it is not.
+              (setq obj nil))
+             ;; The repo might have been renamed on the forge.  #188
+             ((not (setq obj (forge-get-repository :id id)))
+              (setq obj (funcall class
+                                 :id       id
+                                 :forge-id forge-id
+                                 :forge    webhost
+                                 :owner    owner
+                                 :name     name
+                                 :apihost  apihost
+                                 :githost  githost
+                                 :remote   remote))
+              (when (eq demand :insert!)
+                (closql-insert (forge-db) obj)
+                (oset obj condition :known))))))
+       obj))
+    ((memq demand forge--signal-no-entry)
+     (error "Cannot determine forge repository.  No entry for %S in %s"
+            host 'forge-alist))))
+
+(cl-defmethod forge-get-repository ((repo forge-repository)
+                                    &optional noerror demand)
+  (setq noerror (and noerror t))
+  (with-slots (condition slug) repo
+    (cl-symbol-macrolet
+        ((err (error "Requested %s for %s, but is %s" demand slug condition))
+         (key (list (oref repo forge)
+                    (oref repo owner)
+                    (oref repo name)))
+         (ins (forge-get-repository key nil :insert!))
+         (set (forge-get-repository key nil :valid?)))
+      (pcase-exhaustive (list demand condition noerror)
+        (`(nil       ,_                     ,_)  repo)
+        (`(:tracked? :tracked               ,_)  repo)
+        (`(:tracked? ,_                     ,_)   nil)
+        (`(:tracked  :tracked               ,_)  repo)
+        (`(:tracked  ,_                      t)   nil)
+        (`(:tracked  ,_                    nil)   err)
+        (`(:known?   ,(or :tracked :known)  ,_)  repo)
+        (`(:known?   ,_                     ,_)   nil)
+        (`(:insert!  ,(or :tracked :known)  ,_)  repo)
+        (`(:insert!  ,_                     ,_)   ins)
+        (`(:valid?   ,(or :tracked :known)  ,_)  repo)
+        (`(:valid?   ,_                     ,_)   set)
+        (`(:stub?    ,_                     ,_)  repo)
+        (`(:stub     ,_                     ,_)  repo)))))
+
+(cl-defmethod forge-get-repository ((_ null) &optional noerror demand)
+  (if (and (memq demand '(:insert! :tracked :stub))
+           (not noerror))
+      (error "(Maybe repository) is nil; `%s' not satisfied" demand)
+    nil))
+
+(defun forge-repository-at-point (&optional demand)
+  "Return the repository at point.
+If there is no such repository and DEMAND is non-nil, then signal
+an error."
+  (or (magit-section-value-if 'forge-repo)
+      (and-let ((topic (forge-topic-at-point)))
+        (forge-get-repository topic))
+      (and-let ((_(derived-mode-p 'forge-repository-list-mode))
+                (id (tabulated-list-get-id)))
+        (forge-get-repository :id id))
+      (and-let ((_(derived-mode-p 'magit-repolist-mode))
+                (dir (tabulated-list-get-id)))
+        (forge-get-repository :dir dir))
+      (and demand (user-error "No repository at point"))))
+
+(defun forge--repo-for-thingatpt ()
+  (or (magit-section-value-if 'forge-repo)
+      (and-let ((topic (magit-section-value-if '(issue pullreq))))
+        (forge-get-repository topic))
+      (and (not forge-buffer-unassociated-p)
+           (or (forge-buffer-repository)
+               (forge-get-repository :known? nil 'notatpt)))))
+
+(defun forge-buffer-repository ()
+  (and-let ((id forge-buffer-repository))
+    (forge-get-repository :id id)))
+
+(defun forge-set-buffer-repository ()
+  "Initialize the value of variable `forge-buffer-repository'."
+  (unless forge-buffer-repository
+    (and$ (forge-get-repository :known?)
+          (setq forge-buffer-repository (oref $ id)))))
+
+(add-hook 'magit-mode-hook #'forge-set-buffer-repository)
+
+(defun forge-get-worktree (repo)
+  "Validate, remember and return a worktree for REPO.
+If `default-directory' is within one of REPO's worktrees, record that
+location in its `worktree' slot and return it.  Otherwise, if a worktree
+has been recorded before, validate that.  If it still is a worktree of
+REPO, return it, else set the slot to nil and return nil."
+  (cond-let*
+    ([_(forge-repository-equal
+        repo (forge-get-repository :dir default-directory))]
+     [current-tree (magit-toplevel)]
+     (oset repo worktree current-tree))
+    ([saved-tree (oref repo worktree)]
+     [_(file-accessible-directory-p saved-tree)]
+     (if (forge-repository-equal repo (forge-get-repository :dir saved-tree))
+         saved-tree
+       (oset repo worktree nil)))))
+
+;;;; List
+
+(defun forge--ls-repos ()
+  (mapcar (partial #'closql--remake-instance 'forge-repository (forge-db))
+          (forge-sql [:select * :from repository
+                      :order-by [(asc owner) (asc name)]])))
+
+(defun forge--ls-owned-repos ()
+  (mapcar (partial #'closql--remake-instance 'forge-repository (forge-db))
+          (forge-sql [:select * :from repository
+                      :where (and (in owner $v1)
+                                  (not (in name $v2)))
+                      :order-by [(asc owner) (asc name)]]
+                     (vconcat (mapcar #'car forge-owned-accounts))
+                     (vconcat forge-owned-ignored))))
+
+;;; Identity
+
+(defun forge-repository-equal (repo1 repo2)
+  "Return t if REPO1 and REPO2 are the same repository.
+REPO1 and/or REPO2 may also be nil, in which case return nil."
+  (and repo1 repo2
+       (or (equal      (oref repo1 id)      (oref repo2 id))
+           (and (equal (oref repo1 githost) (oref repo2 githost))
+                (equal (oref repo1 owner)   (oref repo2 owner))
+                (equal (oref repo1 name)    (oref repo2 name))))))
+
+(cl-defmethod forge--repository-ids ((class (subclass forge-repository))
+                                     host owner name &optional stub noerror)
+  "Return (OUR-ID . THEIR-ID) of the specified repository.
+If optional STUB is non-nil, then the IDs are not guaranteed to
+be unique.  Otherwise this method has to make an API request to
+retrieve THEIR-ID, the repository's ID on the forge.  In that
+case OUR-ID derives from THEIR-ID and is unique across all
+forges and hosts."
+  (pcase-let* ((`(,_githost ,apihost ,id ,_class)
+                (forge--get-forge-host host t))
+               (path (format "%s/%s" owner name))
+               (their-id (and (not stub)
+                              (ghub-repository-id
+                               owner name
+                               :host apihost
+                               :auth 'forge
+                               :forge (forge--ghub-type-symbol class)
+                               :noerror noerror))))
+    (and (or stub their-id (not noerror))
+         (cons (base64-encode-string
+                (format "%s:%s" id
+                        (cond (stub path)
+                              ((eq class 'forge-github-repository)
+                               ;; This is base64 encoded, according to
+                               ;; https://docs.github.com/en/graphql/
+                               ;; reference/scalars#id.  Unfortunately
+                               ;; that is not always true.  E.g.,
+                               ;; https://github.com/dit7ya/roamex.
+                               (condition-case nil
+                                   (base64-decode-string their-id)
+                                 (error their-id)))
+                              (t their-id)))
+                t)
+               (or their-id path)))))
+
+(cl-defmethod forge--repository-ids ((_class (subclass forge-noapi-repository))
+                                     host owner name &optional _stub _noerror)
+  (let ((their-id (if owner (concat owner "/" name) name)))
+    (cons (base64-encode-string
+           (format "%s:%s"
+                   (nth 3 (forge--get-forge-host host t))
+                   their-id)
+           t)
+          their-id)))
+
+;;; Read
+
+(defun forge-read-repository (prompt)
+  (let ((choice (magit-completing-read
+                 prompt
+                 (mapcar (pcase-lambda (`(,host ,owner ,name))
+                           (format "%s/%s @%s" owner name host))
+                         (forge-sql [:select [githost owner name]
+                                     :from repository]))
+                 nil t nil nil
+                 (and$ (forge-get-repository :stub?)
+                       (format "%s/%s @%s"
+                               (oref $ owner)
+                               (oref $ name)
+                               (oref $ githost))))))
+    (save-match-data
+      (if (string-match "\\`\\(.+\\)/\\([^/]+\\) @\\(.+\\)\\'" choice)
+          (forge-get-repository (list (match-string 3 choice)
+                                      (match-string 1 choice)
+                                      (match-string 2 choice)))
+        (error "BUG")))))
+
+(defun forge-read-host (prompt &optional class)
+  (magit-completing-read
+   prompt
+   (if class
+       (seq-keep (pcase-lambda (`(,githost ,_apihost ,_webhost ,c))
+                   (and (child-of-class-p c class) githost))
+                 forge-alist)
+     (mapcar #'car forge-alist))
+   nil t))
+
+;;; Miscellaneous
+
+(cl-defmethod forge--format ((repo forge-repository) format-or-slot &optional spec)
+  (pcase-let* (((eieio (forge webhost) owner name) repo)
+               (path (if owner (concat owner "/" name) name)))
+    (format-spec
+     (let ((format (if (symbolp format-or-slot)
+                       (eieio-oref repo format-or-slot)
+                     format-or-slot)))
+       (if (member webhost ghub-insecure-hosts)
+           (replace-regexp-in-string "\\`https://" "http://" format t t)
+         format))
+     `(,@spec
+       (?h . ,webhost)
+       (?o . ,owner)
+       (?n . ,name)
+       (?p . ,path)
+       (?P . ,(string-replace "/" "%2F" path))))))
+
+(defvar forge--mode-line-buffer nil)
+
+(defun forge--msg (repo echo done format &rest args)
+  (let ((msg (apply #'format format args)))
+    (when repo
+      (setq msg (string-replace
+                 "REPO"
+                 (concat (oref repo owner) "/" (oref repo name))
+                 msg)))
+    (when (and echo msg)
+      (message "%s%s" msg (if done "...done" "...")))
+    (when (buffer-live-p forge--mode-line-buffer)
+      (with-current-buffer forge--mode-line-buffer
+        (setq mode-line-process
+              (if done
+                  nil
+                (concat " " (propertize msg 'font-lock-face
+                                        'magit-mode-line-process)))))
+      (force-mode-line-update t))))
+
+(defun forge--as-githost (host)
+  (or (car (car (cl-member host forge-alist :test #'equal :key #'car)))
+      (car (car (cl-member host forge-alist :test #'equal :key #'cadr)))
+      (car (car (cl-member host forge-alist :test #'equal :key #'caddr)))
+      (error "Cannot determine githost for %S" host)))
+
+(defun forge--as-apihost (host)
+  (or (cadr (car (cl-member host forge-alist :test #'equal :key #'cadr)))
+      (cadr (car (cl-member host forge-alist :test #'equal :key #'car)))
+      (cadr (car (cl-member host forge-alist :test #'equal :key #'caddr)))
+      (error "Cannot determine apihost for %S" host)))
+
+(defun forge--as-webhost (host &optional noerror)
+  (or (caddr (car (cl-member host forge-alist :test #'equal :key #'cadr)))
+      (caddr (car (cl-member host forge-alist :test #'equal :key #'car)))
+      (caddr (car (cl-member host forge-alist :test #'equal :key #'caddr)))
+      (and (not noerror)
+           (error "Cannot determine webhost for %S" host))))
+
+(defun forge--host-id (host)
+  (or (forge--as-webhost host t)
+      (error "Cannot determine identifier for %S" host)))
+
+(cl-defmethod ghub--host ((repo forge-repository))
+  (cl-call-next-method (forge--ghub-type-symbol (eieio-object-class repo))))
+
+(cl-defmethod ghub--username ((repo forge-repository))
+  (let ((default-directory default-directory))
+    (unless (forge-repository-equal (forge-get-repository :stub?) repo)
+      (when-let ((worktree (forge-get-worktree repo)))
+        (setq default-directory worktree)))
+    (cl-call-next-method (forge--host-id (oref repo apihost))
+                         (forge--ghub-type-symbol (eieio-object-class repo)))))
+
+(defun forge--ghub-type-symbol (class)
+  (pcase-exhaustive class
+    ('forge-github-repository    'github)
+    ('forge-gitlab-repository    'gitlab)
+    ('forge-forgejo-repository   'forgejo)
+    ('forge-gitea-repository     'gitea)
+    ('forge-gogs-repository      'gogs)
+    ('forge-bitbucket-repository 'bitbucket)))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let")
+;;   ("partial"       . "llama--left-apply-partially"))
+;; End:
+(provide 'forge-repo)
+;;; forge-repo.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repo.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repo.elc
new file mode 100644
index 0000000..1d96c49
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repo.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repos.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repos.el
new file mode 100644
index 0000000..8e09fd0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repos.el
@@ -0,0 +1,233 @@
+;;; forge-repos.el --- List repositories  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'hl-line)
+
+(require 'forge-repo)
+(require 'forge-tablist)
+
+(defvar x-stretch-cursor)
+
+;;; Options
+
+(defcustom forge-repository-list-mode-hook '(hl-line-mode)
+  "Hook run after entering Forge-Repository-List mode."
+  :package-version '(forge . "0.4.0")
+  :group 'forge
+  :type 'hook
+  :options '(hl-line-mode))
+
+(defcustom forge-repository-list-columns
+  '(("Owner"    owner                       20   t nil)
+    ("Name"     name                        20   t nil)
+    ("T"        forge-format-repo-condition  1   t nil)
+    ("S"        forge-format-repo-selective  1   t nil)
+    ("Worktree" worktree                    99   t nil))
+  "List of columns displayed when listing repositories.
+
+Each element has the form (HEADER SOURCE WIDTH SORT PROPS).
+
+HEADER is the string displayed in the header.  WIDTH is the width
+of the column.  SOURCE is used to get the value, it has to be the
+name of a slot of `forge-repository' or a function that takes
+such an object as argument.  SORT is a boolean or a function used
+to sort by this column.  Supported PROPS include `:right-align'
+and `:pad-right'."
+  :package-version '(forge . "0.4.0")
+  :group 'forge
+  :type forge--tablist-columns-type)
+
+;;; Mode
+
+(defvar-keymap forge-repository-list-mode-map
+  :doc "Local keymap for Forge-Repository-List mode buffers."
+  :parent (make-composed-keymap forge-common-map tabulated-list-mode-map)
+  "n"                          #'forge-dispatch
+  "RET"                        #'forge-visit-this-repository
+  "<return>"                   #'forge-visit-this-repository
+  "o"                          #'forge-browse-this-repository
+  "<remap> <forge--list-menu>" #'forge-repositories-menu)
+
+(defvar-local forge--buffer-list-filter nil)
+
+(defvar forge-repository-list-buffer-name "*forge-repositories*"
+  "Buffer name to use for displaying lists of repositories.")
+
+(defvar forge-repository-list-mode-name
+  '((:eval (capitalize
+            (concat (if forge--buffer-list-filter
+                        (format "%s " forge--buffer-list-filter)
+                      "")
+                    "repositories"))))
+  "Information shown in the mode-line for `forge-repository-list-mode'.
+Must be set before `forge-list' is loaded.")
+
+(define-derived-mode forge-repository-list-mode tabulated-list-mode
+  forge-repository-list-mode-name
+  "Major mode for browsing a list of repositories."
+  :interactive nil
+  (setq-local x-stretch-cursor nil)
+  (setq tabulated-list-padding 0)
+  (setq tabulated-list-sort-key (cons "Owner" nil)))
+
+(defun forge-repository-list-setup (filter fn)
+  (let ((buffer (get-buffer-create forge-repository-list-buffer-name)))
+    (with-current-buffer buffer
+      (setq default-directory "/")
+      (setq forge--tabulated-list-columns forge-repository-list-columns)
+      (setq forge--tabulated-list-query fn)
+      (cl-letf (((symbol-function #'tabulated-list-revert) #'ignore)) ; see #229
+        (forge-repository-list-mode))
+      (setq forge--buffer-list-filter filter)
+      (forge--tablist-refresh)
+      (add-hook 'tabulated-list-revert-hook #'forge--tablist-refresh nil t)
+      (tabulated-list-print)
+      (when hl-line-mode
+        (hl-line-highlight)))
+    (switch-to-buffer buffer)))
+
+(defun forge-format-repo-condition (repo)
+  "Return a character representing the value of REPO's `condition' slot."
+  (pcase-exhaustive (oref repo condition)
+    (:tracked "*")
+    (:known " ")
+    (:stub (propertize "s" 'face 'warning))))
+
+(defun forge-format-repo-selective (repo)
+  "Return a character representing the value of REPO's `selective-p' slot."
+  (pcase-exhaustive (oref repo selective-p)
+    ('t   "*")
+    ('nil " ")))
+
+;; FIXME Not suitable for `forge-repository-list-columns'; only
+;; `magit-submodule-list-columns' and `magit-repolist-columns'.
+
+(defun forge-repolist-column-discussions (spec)
+  (and-let* ((repo (forge-get-repository :tracked? nil t))
+             (n (caar (forge-sql [:select (funcall count *) :from discussion
+                                  :where (and (= repository $s1)
+                                              (isnull closed))]
+                                 (oref repo id)))))
+    (magit-repolist-insert-count n spec)))
+
+(defun forge-repolist-column-issues (spec)
+  (and-let* ((repo (forge-get-repository :tracked? nil t))
+             (n (caar (forge-sql [:select (funcall count *) :from issue
+                                  :where (and (= repository $s1)
+                                              (isnull closed))]
+                                 (oref repo id)))))
+    (magit-repolist-insert-count n spec)))
+
+(defun forge-repolist-column-pullreqs (spec)
+  (and-let* ((repo (forge-get-repository :tracked? nil t))
+             (n (caar (forge-sql [:select (funcall count *) :from pullreq
+                                  :where (and (= repository $s1)
+                                              (isnull closed))]
+                                 (oref repo id)))))
+    (magit-repolist-insert-count n spec)))
+
+;;; Commands
+;;;; Menu
+
+;;;###autoload(autoload 'forge-repositories-menu "forge-repos" nil t)
+(transient-define-prefix forge-repositories-menu ()
+  "Control list of repositories displayed in the current buffer."
+  :transient-suffix t
+  :transient-non-suffix #'transient--do-call
+  :transient-switch-frame nil
+  :refresh-suffixes t
+  :environment #'forge--menu-environment
+  :column-widths forge--topic-menus-column-widths
+  [:hide always ("q" forge-menu-quit-list)]
+  [forge--topic-menus-group
+   forge--lists-group
+   ["Filter"
+    ("o" "owned" forge-list-owned-repositories
+     :if-nil forge--buffer-list-filter)
+    ("o" "owned" forge-list-repositories
+     :face forge-suffix-active
+     :if-non-nil forge--buffer-list-filter
+     :inapt-if-mode nil)]]
+  (interactive)
+  (cond-let
+    ((derived-mode-p 'forge-repository-list-mode))
+    ([buffer (get-buffer forge-repository-list-buffer-name)]
+     (switch-to-buffer buffer))
+    ((forge-list-repositories)))
+  (transient-setup 'forge-repositories-menu))
+
+(transient-augment-suffix forge-repositories-menu
+  :transient #'transient--do-replace
+  :if-mode 'forge-repository-list-mode
+  :inapt-if (##eq (oref transient--prefix command) 'forge-repositories-menu)
+  :inapt-face 'forge-suffix-active)
+
+;;;; List
+
+(defclass forge--repo-list-command (transient-suffix)
+  ((type       :initarg :type   :initform nil)
+   (filter     :initarg :filter :initform nil)
+   (global     :initarg :global :initform nil)))
+
+;;;###autoload(autoload 'forge-list-repositories "forge-repos" nil t)
+(transient-define-suffix forge-list-repositories ()
+  "List known repositories in a separate buffer.
+Here \"known\" means that an entry exists in the local database."
+  :class 'forge--repo-list-command :type 'repo :global t
+  :inapt-if-mode 'forge-repository-list-mode
+  :inapt-face 'forge-suffix-active
+  (declare (interactive-only nil))
+  (interactive)
+  (forge-repository-list-setup nil #'forge--ls-repos)
+  (transient-setup 'forge-repositories-menu))
+
+;;;###autoload(autoload 'forge-list-owned-repositories "forge-repos" nil t)
+(transient-define-suffix forge-list-owned-repositories ()
+  "List your own known repositories in a separate buffer.
+Here \"known\" means that an entry exists in the local database
+and options `forge-owned-accounts' and `forge-owned-ignored'
+controls which repositories are considered to be owned by you.
+Only Github is supported for now."
+  :class 'forge--repo-list-command :type 'repo :filter 'owned :global t
+  (interactive)
+  (forge-repository-list-setup 'owned #'forge--ls-owned-repos)
+  (transient-setup 'forge-repositories-menu))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let"))
+;; End:
+(provide 'forge-repos)
+;;; forge-repos.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repos.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repos.elc
new file mode 100644
index 0000000..1ff4d64
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-repos.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-revnote.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-revnote.el
new file mode 100644
index 0000000..b511ea8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-revnote.el
@@ -0,0 +1,61 @@
+;;; forge-revnote.el --- Revnote support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+(require 'forge-post)
+(require 'forge-topic)
+
+;;; Class
+
+(defclass forge-revnote (forge-topic)
+  ((closql-table         :initform 'revnote)
+   (closql-primary-key   :initform 'id)
+   ;; (closql-order-by      :initform [(desc number)])
+   (closql-foreign-key   :initform 'repository)
+   (closql-class-prefix  :initform "forge-")
+   (id                   :initarg :id)
+   (repository           :initarg :repository)
+   (commit               :initarg :commit)
+   (file                 :initarg :file)
+   (line                 :initarg :line)
+   (author               :initarg :author)
+   (body                 :initarg :body)))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let"))
+;; End:
+(provide 'forge-revnote)
+;;; forge-revnote.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-revnote.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-revnote.elc
new file mode 100644
index 0000000..c79561d
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-revnote.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-semi.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-semi.el
new file mode 100644
index 0000000..9c3c7b4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-semi.el
@@ -0,0 +1,94 @@
+;;; forge-semi.el --- Support for semi-forges  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge)
+
+;;; Classes
+
+(defclass forge-gitweb-repository (forge-noapi-repository)
+  ((commit-url-format :initform "https://%h/gitweb/?p=%P.git;a=commitdiff;h=%r")
+   (branch-url-format :initform "https://%h/gitweb/?p=%P.git;a=log;h=refs/heads/%r")
+   (remote-url-format :initform "https://%h/gitweb/?p=%P.git;a=summary")
+   ;; We must use "hb=BRANCH" because "h=refs/heads/BRANCH" does not work
+   ;; here.  So "%r" stands for either "hb=BRANCH" or "h=HASH" and which
+   ;; it is, has to be handled as a special case in `forge-get-url(:blob)'.
+   (blob-url-format   :initform "https://%h/gitweb/?p=%P.git;a=blob;f=%s;%r"))
+  "Gitweb from https://git-scm.com/docs/gitweb.")
+
+(defclass forge-cgit-repository (forge-noapi-repository)
+  ((commit-url-format :initform "https://%h/%p.git/commit/?id=%r")
+   (branch-url-format :initform "https://%h/%p.git/log/?h=%r")
+   (remote-url-format :initform "https://%h/%p.git/about")
+   (blob-url-format   :initform "https://%h/%p.git/tree/%f?id=%r"))
+  "Cgit from https://git.zx2c4.com/cgit/about.
+Different hosts use different url schemata, so we need multiple
+classes.  See their definitions in \"forge-semi.el\".")
+
+(defclass forge-cgit*-repository (forge-cgit-repository)
+  ((commit-url-format :initform "https://%h/cgit/%p.git/commit/?id=%r")
+   (branch-url-format :initform "https://%h/cgit/%p.git/log/?h=%r")
+   (remote-url-format :initform "https://%h/cgit/%p.git/about")
+   (blob-url-format   :initform "https://%h/cgit/%p.git/tree/%f?id=%r"))
+  "Cgit from https://git.zx2c4.com/cgit/about.
+Different hosts use different url schemata, so we need multiple
+classes.  See their definitions in \"forge-semi.el\".")
+
+(defclass forge-cgit**-repository (forge-cgit-repository)
+  ((commit-url-format :initform "https://%h/cgit/%n.git/commit/?id=%r")
+   (branch-url-format :initform "https://%h/cgit/%n.git/log/?h=%r")
+   (remote-url-format :initform "https://%h/cgit/%n.git/about")
+   (blob-url-format   :initform "https://%h/cgit/%n.git/tree/%f?id=%r"))
+  "Cgit from https://git.zx2c4.com/cgit/about.
+Different hosts use different url schemata, so we need multiple
+classes.  See their definitions in \"forge-semi.el\".")
+
+(defclass forge-repoorcz-repository (forge-cgit-repository)
+  ((commit-url-format :initform "https://%h/%p.git/commit/%r")
+   (branch-url-format :initform "https://%h/%p.git/log/%r")
+   (remote-url-format :initform "https://%h/%p.git")
+   (blob-url-format   :initform "https://%h/%p.git/blob/%r:/%f"))
+  "Cgit fork used on https://repo.or.cz/cgit.git.
+Different hosts use different url schemata, so we need multiple
+classes.  See their definitions in \"forge-semi.el\".")
+
+(defclass forge-stagit-repository (forge-noapi-repository)
+  ((commit-url-format :initform "https://%h/%n/commit/%r.html")
+   (branch-url-format :initform "https://%h/%n/refs.html")
+   (remote-url-format :initform "https://%h/%n/file/README.html")
+   ;; Can only link to the tip of the main branch.
+   (blob-url-format   :initform "https://%h/%n/"))
+  "Stagit from https://codemadness.org/git/stagit/file/README.html.
+Only the history of \"master\" can be shown, so this links to the
+list of refs instead of the log of the specified branch.")
+
+(defclass forge-srht-repository (forge-noapi-repository)
+  ((commit-url-format :initform "https://%h/~%o/%n/commit/%r")
+   (branch-url-format :initform "https://%h/~%o/%n/log/%r")
+   (remote-url-format :initform "https://%h/~%o/%n")
+   (blob-url-format   :initform "https://%h/~%o/%n/tree/%r/item/%f"))
+  "See https://meta.sr.ht.")
+
+;;; _
+(provide 'forge-semi)
+;;; forge-semi.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-semi.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-semi.elc
new file mode 100644
index 0000000..f274fc2
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-semi.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-tablist.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-tablist.el
new file mode 100644
index 0000000..b161dea
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-tablist.el
@@ -0,0 +1,95 @@
+;;; forge-tablist.el --- Tabulated-list interface  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'tabulated-list)
+
+(require 'forge)
+
+(defconst forge--tablist-columns-type
+  '(repeat
+    (list :tag "Column"
+          (string  :tag "Header Label")
+          (choice  :tag "Value source"
+                   function
+                   (symbol :tag "Object slot"))
+          (integer :tag "Column Width")
+          (choice  :tag "Sort predicate"
+                   (const :tag "Don't sort" nil)
+                   (const :tag "Default" t)
+                   function)
+          (plist   :tag "Properties"
+                   :key-type (choice :tag "Property"
+                                     (const :right-align)
+                                     (const :pad-right)
+                                     symbol)
+                   :value-type (sexp :tag "Value")))))
+
+(defvar-local forge--tabulated-list-columns nil)
+(put 'forge--tabulated-list-columns 'permanent-local t)
+
+(defvar-local forge--tabulated-list-query nil)
+(put 'forge--tabulated-list-query 'permanent-local t)
+
+(defun forge--tablist-refresh ()
+  (setq tabulated-list-format
+        (vconcat (mapcar (pcase-lambda (`(,name ,_get ,width ,sort ,props))
+                           `(,name ,width ,sort . ,props))
+                         forge--tabulated-list-columns)))
+  (tabulated-list-init-header)
+  (setq tabulated-list-entries
+        (mapcar
+         (lambda (obj)
+           (list (oref obj id)
+                 (vconcat
+                  (mapcar (pcase-lambda (`(,_name ,get ,_width ,_sort ,_props))
+                            (let ((val (cond
+                                         ((functionp get)
+                                          (funcall get obj))
+                                         ((eq (car-safe get) 'repository)
+                                          (eieio-oref (forge-get-repository obj)
+                                                      (cadr get)))
+                                         ((eieio-oref obj get)))))
+                              (cond ((stringp val) val)
+                                    ((null val) "")
+                                    ((format "%s" val)))))
+                          forge--tabulated-list-columns))))
+         (funcall forge--tabulated-list-query))))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let"))
+;; End:
+(provide 'forge-tablist)
+;;; forge-tablist.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-tablist.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-tablist.elc
new file mode 100644
index 0000000..6ab3b50
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-tablist.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topic.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topic.el
new file mode 100644
index 0000000..fbd49af
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topic.el
@@ -0,0 +1,2148 @@
+;;; forge-topic.el --- Topics support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'bookmark)
+(require 'bug-reference)
+(require 'eieio-custom)
+(require 'markdown-mode)
+(require 'parse-time)
+(require 'yaml)
+
+(require 'forge)
+(require 'forge-post)
+
+(defvar bug-reference-auto-setup-functions)
+
+(define-obsolete-face-alias 'forge-topic-slug-completed
+                            'forge-topic-slug-realized "Forge 0.5.0")
+
+(define-obsolete-face-alias 'forge-topic-slug-unplanned
+                            'forge-topic-slug-expunged "Forge 0.5.0")
+
+(define-obsolete-face-alias 'forge-issue-unplanned
+                            'forge-issue-expunged "Forge 0.5.0")
+
+;;; Options
+
+(defcustom forge-limit-topic-choices t
+  "Whether to initially limit completion candidates to active topics."
+  :package-version '(forge . "0.4.0")
+  :group 'forge
+  :type 'boolean)
+
+(defcustom forge-post-heading-format "%a %C\n"
+  "Format for post headings in topic view.
+
+The following %-sequences are supported:
+
+`%a' The forge nickname of the author.
+`%c' The absolute creation date.
+`%C' The relative creation date."
+  :package-version '(forge . "0.1.0")
+  :group 'forge
+  :type 'string)
+
+(defcustom forge-post-fill-region t
+  "Whether to call `fill-region' before displaying forge posts."
+  :package-version '(forge . "0.1.0")
+  :group 'forge
+  :type 'boolean)
+
+(defcustom forge-topic-wash-title-hook
+  (list #'magit-highlight-bracket-keywords)
+  "Functions used to highlight parts of each individual topic title.
+
+These functions are called in order, in a buffer that containing the
+topic title.  They should set text properties as they see fit, usually
+just `font-lock-face'.  Before each function is called, point is at the
+beginning of the buffer."
+  :package-version '(forge . "0.4.7")
+  :group 'forge
+  :type 'hook
+  :options (list #'magit-highlight-bracket-keywords))
+
+(defcustom forge-topic-repository-slug-width 28
+  "Width of repository slugs (i.e., \"OWNER/NAME\")."
+  :package-version '(forge . "0.4.0")
+  :group 'forge
+  :type 'natnum)
+
+(defcustom forge-bug-reference-hooks
+  '(find-file-hook
+    forge-post-mode-hook
+    git-commit-setup-hook
+    magit-mode-hook)
+  "Hooks to which `forge-bug-reference-setup' is added.
+This variable has to be customized before `forge' is loaded."
+  :package-version '(forge . "0.2.0")
+  :group 'forge
+  :options '(find-file-hook
+             forge-post-mode-hook
+             git-commit-setup-hook
+             magit-mode-hook)
+  :type '(list :convert-widget custom-hook-convert-widget))
+
+(defvar forge-format-avatar-function nil
+  "Function used to insert avatars in certain locations.
+This is experimental and intended for users who wish to
+implement such a function themselves.  See #447.")
+
+;;; Faces
+;;;; Common
+
+(defface forge-dimmed '((t :foreground "#93a1a1"))
+  "Parent face or faces used for text that shouldn't stand out.
+
+This face is not directly, instead several faces inherit from it
+either directly or via an intermediate face.  This face should
+only specify the `:foreground' attribute, which is why this face
+does not inherit from `magit-dimmed'."
+  :group 'forge-faces)
+
+(defface forge-topic-header-line
+  '((t :inherit magit-header-line :foreground reset))
+  "Face for the `header-line' in `forge-topic-mode' buffers."
+  :group 'forge-faces)
+
+(defface forge-discussion-answer-heading
+  '((t :inherit magit-diff-added))
+  "Face for headings of discussion replies marked as the answer."
+  :group 'magit-faces)
+
+;;;; Topic and Notification Slugs
+
+(defface forge-topic-slug-open
+  '((t :inherit forge-dimmed))
+  "Face uses for slugs of open topics."
+  :group 'forge-faces)
+
+(defface forge-topic-slug-realized
+  '((t :inherit forge-dimmed))
+  "Face used for slugs of realized topics.
+Realized topics include:
+- completed issues and
+- merged pull-requests."
+  :group 'forge-faces)
+
+(defface forge-topic-slug-expunged
+  '((t :inherit forge-dimmed :strike-through t))
+  "Face used for slugs of expunged topics.
+Expunged topics include:
+- issues closes as unplanned,
+- issues closed as duplicates, and
+- pull-requests closed without merging."
+  :group 'forge-faces)
+
+(defface forge-topic-slug-saved
+  '((t :foreground "orange"))
+  "Face used for slugs of topics with saved notifications."
+  :group 'forge-faces)
+
+(defface forge-topic-slug-unread
+  '((t :weight bold))
+  "Face used for slugs of topics with unread notifications."
+  :group 'forge-faces)
+
+;;;; Topic and Notification Summaries
+;;;;; Notifications
+
+(defface forge-topic-unread
+  '((t :weight bold
+       :box (:line-width (-1 . -1) :style nil)))
+  "Face used for summaries of entities with unread notifications.
+This face is always used together with, and takes preference over,
+a `forge-{issue,pullreq}-STATE' face and should not specify any
+attribute that is specified by any of those faces.  Likewise those
+faces should not set `:weight' or `:slant'."
+  :group 'forge-faces)
+
+(defface forge-topic-pending
+  '((t :weight bold))
+  "Face used for summaries of entities with open notifications.
+This face is always used together with, and takes preference over,
+a `forge-{issue,pullreq}-STATE' face and should not specify any
+attribute that is specified by any of those faces.  Likewise those
+faces should not set `:weight' or `:slant'."
+  :group 'forge-faces)
+
+(defface forge-topic-done
+  '((t))
+  "Face used for summaries of entities with no unread or open notification.
+This face is always used together with, and takes preference over,
+a `forge-{issue,pullreq}-STATE' face and should not specify any
+attribute that is specified by any of those faces.  Likewise those
+faces should not set `:weight' or `:slant'."
+  :group 'forge-faces)
+
+;;;;; Discussions
+
+(defface forge-discussion-open
+  '((t :slant italic))
+  "Face used for summaries of open discussions."
+  :group 'forge-faces)
+
+(defface forge-discussion-completed
+  '((t :inherit forge-dimmed :slant italic))
+  "Face used for summaries of discussions closed as completed."
+  :group 'forge-faces)
+
+(defface forge-discussion-expunged
+  '((t :inherit forge-dimmed :slant italic :strike-through t))
+  "Face used for summaries of expunged discussions.
+Expunged discussions include:
+- discussions closes as unplanned, and
+- discussions closed as duplicates."
+  :group 'forge-faces)
+
+;;;;; Issues
+
+(defface forge-issue-open
+  '((t))
+  "Face used for summaries of open issues."
+  :group 'forge-faces)
+
+(defface forge-issue-completed
+  '((t :inherit forge-dimmed))
+  "Face used for summaries of issues closed as completed."
+  :group 'forge-faces)
+
+(defface forge-issue-expunged
+  '((t :inherit forge-dimmed :strike-through t))
+  "Face used for summaries of expunged issues.
+Expunged issues include:
+- issues closes as unplanned, and
+- issues closed as duplicates."
+  :group 'forge-faces)
+
+;;;;; Pull-Requests
+
+(defface forge-pullreq-open
+  '((t :foreground "LimeGreen"))
+  "Face used for summaries of open pull-requests."
+  :group 'forge-faces)
+
+(defface forge-pullreq-merged
+  '((t :foreground "MediumPurple"))
+  "Face used for summaries of merged pull-requests."
+  :group 'forge-faces)
+
+(defface forge-pullreq-rejected
+  '((t :foreground "MediumPurple" :strike-through t))
+  "Face used for summaries of closed pull-requests, that weren't merged."
+  :group 'forge-faces)
+
+(defface forge-pullreq-draft
+  '((t :inherit highlight))
+  "Face used for summaries of draft pull-requests.
+A face attribute should be used that is not already used by any
+`forge-topic-STATUS' or `forge-{issue,pullreq}-STATE' face."
+  :group 'forge-faces)
+
+;;;; Labels
+
+(defface forge-topic-label
+  '((t :inherit secondary-selection
+       :box (:line-width (-1 . -1) :style released-button)))
+  "Face used for topic labels, marks and milestones."
+  :group 'forge-faces)
+
+;;;; Post Details
+
+(defface forge-post-author
+  '((t :inherit bold))
+  "Face used for post author in topic view."
+  :group 'forge-faces)
+
+(defface forge-post-date
+  '((t :inherit italic))
+  "Face used for post date in topic view."
+  :group 'forge-faces)
+
+;;; Class
+
+(defclass forge-topic (forge-post) () :abstract t)
+
+(cl-defmethod forge--object-id ((class (subclass forge-topic)) repo number)
+  "Return the id for a CLASS object in REPO identified by id NUMBER."
+  (base64-encode-string
+   (encode-coding-string
+    (format "%s:%s%s"
+            (base64-decode-string (oref repo id))
+            (substring (symbol-name class)
+                       (length (oref-default class closql-class-prefix)))
+            number)
+    'utf-8)
+   t))
+
+(cl-defmethod forge--object-id ((prefix string) number-or-id)
+  (and number-or-id
+       (base64-encode-string
+        (encode-coding-string
+         (format "%s:%s"
+                 (base64-decode-string prefix)
+                 (if (numberp number-or-id)
+                     number-or-id
+                   ;; Currently every ID is base64 encoded.  Unfortunately
+                   ;; we cannot use the IDs of Gitlab labels (see comment
+                   ;; in the respective `forge--update-labels' method),
+                   ;; and have to use their names, which are not encoded.
+                   (or (ignore-errors (base64-decode-string number-or-id))
+                       number-or-id)))
+         'utf-8)
+        t)))
+
+(cl-defmethod forge-topic-mark-read ((topic forge-topic))
+  (when (eq (oref topic status) 'unread)
+    (oset topic status 'pending)))
+
+(cl-defmethod forge--set-topic-marks ((_repo forge-repository) topic marks)
+  (oset topic marks
+        (forge-sql-car [:select id :from mark :where (in name $v1)]
+                       (vconcat marks)))
+  (forge-refresh-buffer))
+
+;;; Query
+;;;; Get
+
+(cl-defmethod forge-get-parent ((topic forge-topic))
+  (forge-get-repository topic))
+
+(cl-defmethod forge-get-repository ((topic forge-topic))
+  (closql-get (forge-db)
+              (oref topic repository)
+              'forge-repository))
+
+(cl-defmethod forge-get-topic ((topic forge-topic))
+  topic)
+
+(cl-defmethod forge-get-topic ((repo forge-repository) number-or-id)
+  (cond ((stringp number-or-id)
+         (or (forge-get-discussion number-or-id)
+             (forge-get-issue      number-or-id)
+             (forge-get-pullreq    number-or-id)))
+        ((< number-or-id 0)
+         (forge-get-pullreq repo (abs number-or-id)))
+        ((forge-get-discussion repo number-or-id))
+        ((forge-get-issue      repo number-or-id))
+        ((forge-get-pullreq    repo number-or-id))))
+
+(cl-defmethod forge-get-topic ((number integer))
+  (if (< number 0)
+      (forge-get-pullreq (abs number))
+    (or (forge-get-discussion number)
+        (forge-get-issue      number)
+        (forge-get-pullreq    number))))
+
+(cl-defmethod forge-get-topic ((id string))
+  (or (forge-get-discussion id)
+      (forge-get-issue      id)
+      (forge-get-pullreq    id)))
+
+;;;; Current
+
+(defun forge-current-topic (&optional demand)
+  "Return the topic at point or being visited.
+If there is no such topic and DEMAND is non-nil, then signal
+an error."
+  (or (forge-topic-at-point)
+      forge-buffer-topic
+      (and demand (user-error "No current topic"))))
+
+(defun forge-topic-at-point (&optional demand)
+  "Return the topic at point.
+If there is no such topic and DEMAND is non-nil, then signal
+an error."
+  (or (thing-at-point 'forge-topic)
+      (magit-section-value-if '(discussion issue pullreq))
+      (forge-get-pullreq :branch)
+      (and demand (user-error "No topic at point"))))
+
+(put 'forge-topic 'thing-at-point #'forge-thingatpt--topic)
+(defun forge-thingatpt--topic ()
+  (and-let ((_(thing-at-point-looking-at "\\([#!]\\)\\([0-9]+\\)\\_>"))
+            (prefix (match-string-no-properties 1))
+            (number (string-to-number (match-string-no-properties 2)))
+            (repo (forge--repo-for-thingatpt)))
+    (cond ((equal prefix "#")
+           (forge-get-topic repo number))
+          ((forge-gitlab-repository--eieio-childp repo)
+           (forge-get-pullreq repo number)))))
+
+(defun forge-region-topics ()
+  (magit-region-values '(discussion issue pullreq)))
+
+(defun forge-current-topic-type ()
+  (magit-section-case
+    ([* discussions] 'discussion)
+    ([* issues]      'issue)
+    ([* pullreqs]    'pullreq)
+    (t (or (and forge--buffer-topics-spec
+                (oref forge--buffer-topics-spec type))
+           'topic))))
+
+;;;; List
+
+(defvar-local forge--buffer-topics-spec nil)
+(put 'forge--buffer-topics-spec 'permanent-local t)
+
+(defun forge--init-buffer-topics-spec ()
+  (unless forge--buffer-topics-spec
+    (setq forge--buffer-topics-spec
+          (clone forge-status-buffer-default-topic-filters))))
+(add-hook 'magit-status-mode-hook #'forge--init-buffer-topics-spec)
+
+(defun forge--clone-buffer-topics-spec ()
+  (forge--init-buffer-topics-spec)
+  (clone forge--buffer-topics-spec))
+
+(defclass forge--topics-spec ()
+  ((type        :documentation "\
+Limit list based on topic type."
+                :initarg :type
+                :initform 'topic
+                :type (member topic discussion issue pullreq nil)
+                :custom (choice
+                         (const topic)
+                         (const discussion)
+                         (const issue)
+                         (const pullreq)
+                         (const :tag "disable topic sections (nil)" nil)))
+   (active      :documentation "\
+Limit list to active topics.
+
+A topic is \"active\" if its state (public condition) is open and/or
+its status (private condition) is unread or pending.
+
+When this is t, then the value of the `state' and `status' slots are
+ignored."
+                :initarg :active
+                :initform t
+                :type boolean
+                :custom boolean)
+   (state       :documentation "\
+Limit list based on topic (public) state.
+
+State is the \"public condition\".  I.e., is the topic still open?"
+                :initarg :state
+                :initform 'open
+                :type (satisfies
+                       (lambda (val)
+                         (member val '(open
+                                       closed
+                                       (completed merged)
+                                       completed
+                                       merged
+                                       (unplanned duplicate outdated rejected)
+                                       unplanned
+                                       duplicate
+                                       outdated
+                                       rejected
+                                       nil))))
+                :custom (choice
+                         (const open)
+                         (const closed)
+                         (const (completed merged))
+                         (const completed)
+                         (const merged)
+                         (const (unplanned duplicate outdated rejected))
+                         (const unplanned)
+                         (const duplicate)
+                         (const outdated)
+                         (const rejected)
+                         (const :tag "all (nil)" nil)))
+   (status      :documentation "\
+Limit list based on topic (private) status.
+
+Status is the \"private condition\".  I.e., have you decided yet
+that *you* are done with the topic, and have others made changes,
+which *you* have not seen yet?
+
+`inbox' means \"`unread' or `pending'\"."
+                :initarg :status
+                :initform nil
+                :type (member inbox unread pending done nil)
+                :custom (choice
+                         (const inbox)
+                         (const unread)
+                         (const pending)
+                         (const done)
+                         (const :tag "all (nil)" nil)))
+   (updated     :documentation "\
+Date when topic was last updated."
+                :initarg :updated
+                :initform nil
+                :type (or string null))
+   (category    :documentation "\
+Limit list to discussions of given category.
+Issues and pull-requests are unaffected."
+                :initarg :category
+                :initform nil
+                :type (or string null)
+                :custom (choice
+                         (string :tag "name")
+                         (const :tag "all (nil)" nil)))
+   (milestone   :documentation "\
+Limit list to issues and pull-requests assigned to given milestone.
+Discussions are unaffected."
+                :initarg :milestone
+                :initform nil
+                :type (or string null)
+                :custom (choice
+                         (string :tag "name")
+                         (const :tag "all (nil)" nil)))
+   (labels      :documentation "\
+Limit list to topics with at least one of the given labels."
+                :initarg :labels
+                :initform nil
+                :type (list-of string)
+                :custom (repeat string))
+   (marks       :documentation "\
+Limit list to topics with at least one of the given marks.
+Marks are like labels, but they are private and local to the
+current Forge database."
+                :initarg :marks
+                :initform nil
+                :type (list-of string)
+                :custom (repeat string))
+   (saved       :documentation "Limit list to saved topics."
+                :initarg :saved
+                :initform nil
+                :type boolean
+                :custom boolean)
+   (author      :documentation "\
+Limit list to topics created by given user."
+                :initarg :author
+                :initform nil
+                :label "Author"
+                :type (or string null)
+                :custom (choice
+                         (string :tag "username")
+                         (const :tag "no filter (nil)" nil)))
+   (assignee    :documentation "\
+Limit list to topics assigned to given user."
+                :initarg :assignee
+                :initform nil
+                :label "Assignee"
+                :type (or string null)
+                :custom (choice
+                         (string :tag "username")
+                         (const :tag "no filter (nil)" nil)))
+   (reviewer    :documentation "\
+Limit list to topics for which a review by the given user was requested."
+                :initarg :reviewer
+                :initform nil
+                :label "Reviewer"
+                :type (or string null)
+                :custom (choice
+                         (string :tag "username")
+                         (const :tag "no filter (nil)" nil)))
+   (global      :documentation "Whether to list topics for all repositories."
+                :initarg :global
+                :initform nil
+                :type boolean)
+   (order       :documentation "Order in which topics are listed."
+                :initarg :order
+                :initform 'newest
+                :type (member newest oldest recently-updated anciently-updated)
+                :custom (choice (const newest)
+                                (const oldest)
+                                (const recently-updated)
+                                (const anciently-updated)))
+   (limit       :documentation "Number of topics to list at most."
+                :initarg :limit
+                :initform 200
+                :type (or integer null)
+                :custom (choice natnum (const :tag "no limit" nil)))
+   (grouped     :documentation "Whether to group topics by repository."
+                :initarg :grouped
+                :initform nil
+                :type boolean
+                :custom boolean)))
+
+(defun forge--cast-topics-spec-state (spec)
+  (when-let ((cast (pcase (list (oref spec type) (oref spec state))
+                     (`(topic ,(or 'unplanned 'duplicate 'rejected))
+                      '(unplanned duplicate rejected))
+                     ('(issue rejected)
+                      '(unplanned duplicate rejected))
+                     (`(pullreq ,(or 'unplanned 'duplicate))
+                      '(unplanned duplicate rejected))
+                     (`(topic ,(or 'completed 'merged))
+                      '(completed merged))
+                     ('(issue merged)
+                      '(completed merged))
+                     ('(pullreq completed)
+                      '(completed merged)))))
+    (oset spec state cast)))
+
+(cl-defun forge--list-topics
+    (&optional (spec forge--buffer-topics-spec)
+               (repo (forge-get-repository :tracked?))
+               (type (oref spec type)))
+  (when (oref spec reviewer)
+    (setq type 'pullreq))
+  (if (eq type 'topic)
+      (pcase-let ((`(,pred ,slot) (pcase (oref spec order)
+                                    ('newest             '(> number))
+                                    ('oldest             '(< number))
+                                    ('recently-updated   '(string> updated))
+                                    ('anciently-updated  '(string< updated)))))
+        (compat-call
+         sort (nconc (forge--list-topics-1 spec repo 'discussion)
+                     (forge--list-topics-1 spec repo 'issue)
+                     (forge--list-topics-1 spec repo 'pullreq))
+         :lessp pred :key (##eieio-oref % slot)))
+    (forge--list-topics-1 spec repo type)))
+
+(defun forge--list-topics-1 (spec repo type)
+  (mapcar (partial #'closql--remake-instance
+                   (pcase type
+                     ('discussion 'forge-discussion)
+                     ('issue      'forge-issue)
+                     ('pullreq    'forge-pullreq))
+                   (forge-db))
+          (forge-sql (forge--list-topics-2 spec repo type))))
+
+(defun forge--list-topics-2 (spec repo type)
+  (pcase-let (((eieio active state status category milestone labels marks
+                      saved author assignee reviewer global order limit)
+               spec))
+    (cond (active
+           (setq state 'open)
+           (setq status '(unread pending)))
+          ((eq status 'inbox)
+           (setq status '(unread pending))))
+    (when (eq state 'closed)
+      (setq state '( completed merged unplanned duplicate outdated rejected)))
+    `[:select :distinct topic:*
+      :from [(as ,type topic)]
+      ,@(pcase type
+          ((and 'discussion (guard category))
+           `[:join discussion-category :on (= discussion-category:name ,category)])
+          ((and (or 'issue 'pullreq) (guard milestone))
+           `[:join milestone :on (= milestone:title ,milestone)]))
+      ,@(pcase (and labels type)
+          ('discussion
+           [:join discussion-label :on (= discussion-label:discussion  topic:id)
+            :join            label :on (= label:id          discussion-label:id)])
+          ('issue
+           [:join      issue-label :on (= issue-label:issue            topic:id)
+            :join            label :on (= label:id               issue-label:id)])
+          ('pullreq
+           [:join    pullreq-label :on (= pullreq-label:pullreq        topic:id)
+            :join            label :on (= label:id             pullreq-label:id)]))
+      ,@(pcase (and marks type)
+          ('discussion
+           [:join discussion-mark :on (= discussion-mark:discussion  topic:id)
+            :join            mark :on (= mark:id           discussion-mark:id)])
+          ('issue
+           [:join      issue-mark :on (= issue-mark:issue            topic:id)
+            :join            mark :on (= mark:id                issue-mark:id)])
+          ('pullreq
+           [:join    pullreq-mark :on (= pullreq-mark:pullreq        topic:id)
+            :join            mark :on (= mark:id              pullreq-mark:id)]))
+      ,@(pcase (and assignee type)
+          ('issue
+           [:join      issue-assignee :on (= issue-assignee:issue            topic:id)
+            :join            assignee :on (= assignee:id            issue-assignee:id)])
+          ('pullreq
+           [:join    pullreq-assignee :on (= pullreq-assignee:pullreq        topic:id)
+            :join            assignee :on (= assignee:id          pullreq-assignee:id)]))
+      ,@(and reviewer
+             [:join (as pullreq-review-request r) :on (= r:pullreq  topic:id)
+              :join assignee                      :on (= assignee:id    r:id)])
+      :where
+      (and
+       ,@(and (not global) repo `((= topic:repository ,(oref repo id))))
+       ,@(cond
+           ((and active state status)
+            `((or (in topic:state  ,(vconcat (ensure-list state)))
+                  (in topic:status ,(vconcat (ensure-list status))))))
+           (`(,@(and state  `((in topic:state  ,(vconcat (ensure-list state)))))
+              ,@(and status `((in topic:status ,(vconcat (ensure-list status))))))))
+       ,@(pcase type
+           ((and 'discussion (guard category))
+            '((= topic:category discussion-category:id)))
+           ((and (or 'issue 'pullreq) (guard milestone))
+            '((= topic:milestone milestone:id))))
+       ,@(and labels    `((or ,@(mapcar (##`(= label:name ,%)) labels))))
+       ,@(and marks     `((or ,@(mapcar (##`(=  mark:name ,%))  marks))))
+       ,@(and saved     '((= topic:saved-p  't)))
+       ,@(and author    `((= topic:author   ,author)))
+       ,@(and assignee (memq type '(issue pullreq))
+              `((= assignee:login ,assignee)))
+       ,@(and reviewer (eq type 'pullreq)
+              `((= assignee:login ,reviewer))))
+      :order-by [,(pcase order
+                    ('newest            '(desc topic:number))
+                    ('oldest            '(asc  topic:number))
+                    ('recently-updated  '(desc topic:updated))
+                    ('anciently-updated '(asc  topic:updated)))]
+      ,@(and limit `(:limit ,limit))]))
+
+;;; Read
+
+(defun forge-read-topic (prompt)
+  "Read an active topic with completion using PROMPT.
+
+Open, unread and pending topics are considered active.
+Default to the current topic, even if it isn't active.
+
+\\<forge-read-topic-minibuffer-map>While completion is in \
+progress, \\[forge-read-topic-lift-limit] lifts the limit, extending
+the completion candidates to include all topics.
+
+If `forge-limit-topic-choices' is nil, then all candidates
+can be selected from the start."
+  (forge--read-topic prompt
+                     #'forge-current-topic
+                     (forge--topics-spec :type 'topic :active t)
+                     (forge--topics-spec :type 'topic :active nil
+                                         :state nil :limit nil)))
+
+(defun forge--read-topic (prompt current active all)
+  (let* ((current (funcall current))
+         (repo    (forge-get-repository (or current :tracked)))
+         (default (and current (forge--format-topic-line current)))
+         (alist   (forge--topic-collection
+                   (forge--list-topics (if forge-limit-topic-choices active all)
+                                       repo)))
+         (choices (mapcar #'car alist))
+         (choices (cond ((and forge-limit-topic-choices
+                              default
+                              (not (member default choices)))
+                         (push (cons default (oref current id)) alist)
+                         (cons default choices))
+                        (choices)))
+         (choice
+          (if forge-limit-topic-choices
+              (minibuffer-with-setup-hook
+                  (lambda ()
+                    (use-local-map (make-composed-keymap
+                                    forge-read-topic-minibuffer-map
+                                    (current-local-map))))
+                (magit-completing-read
+                 (substitute-command-keys
+                  (format "%s (\\<%s>\\[%s] for all)" prompt
+                          'forge-read-topic-minibuffer-map
+                          'forge-read-topic-lift-limit))
+                 (completion-table-dynamic
+                  (let (all-choices)
+                    (lambda (_string)
+                      ;; For other frameworks, the minibuffer is current
+                      ;; when this function is called, but for Helm we
+                      ;; have to make it so.  Starting with Helm commit
+                      ;; 5e7c8498, this isn't necessary anymore.  See
+                      ;; https://github.com/emacs-helm/helm/issues/2744.
+                      (with-selected-window (minibuffer-window)
+                        (cond
+                          (all-choices)
+                          (forge-limit-topic-choices choices)
+                          (t
+                           (setq alist (forge--topic-collection
+                                        (forge--list-topics all repo)))
+                           (setq all-choices (mapcar #'car alist))))))))
+                 nil t nil nil default))
+            (magit-completing-read prompt choices nil t nil nil default))))
+    (cdr (assoc choice alist))))
+
+(defun forge--topic-collection (topics)
+  (mapcar (##cons (forge--format-topic-line %)
+                  (oref % id))
+          topics))
+
+(defvar-keymap forge-read-topic-minibuffer-map
+  "+" #'forge-read-topic-lift-limit)
+
+(defun forge-read-topic-lift-limit ()
+  "No longer limit completion candidates to active topics."
+  (interactive)
+  (when (and (minibufferp)
+             forge-limit-topic-choices)
+    (setq-local forge-limit-topic-choices nil)
+    (cond
+      ((and (bound-and-true-p vertico-mode)
+            (boundp 'vertico--input)
+            (fboundp 'vertico--exhibit))
+       (setq vertico--input t)
+       (vertico--exhibit))
+      ((and (bound-and-true-p helm-mode)
+            (fboundp 'helm-force-update))
+       (helm-force-update))
+      ((minibuffer-completion-help (minibuffer--completion-prompt-end)
+                                   (point-max))))
+    (forge-read-topic--remove-prompt-hint)))
+
+(defun forge-read-topic--remove-prompt-hint ()
+  (when (minibufferp)
+    (save-excursion
+      (goto-char (point-min))
+      (when (re-search-forward " (.+? for all)" (minibuffer-prompt-end) t)
+        (let ((inhibit-read-only t))
+          (replace-match ""))))))
+
+(defun forge-topic-completion-at-point ()
+  (let ((bol (line-beginning-position))
+        repo)
+    (and (looking-back "[!#][0-9]*" bol)
+         (or (not bug-reference-prog-mode)
+             (nth 8 (syntax-ppss))) ; inside comment or string
+         (setq repo (forge-get-repository :tracked))
+         (looking-back (if (forge--childp repo 'forge-gitlab-repository)
+                           "\\(?3:[!#]\\)\\(?2:[0-9]*\\)"
+                         "#\\(?2:[0-9]*\\)")
+                       bol)
+         (list (match-beginning 2)
+               (match-end 0)
+               (mapcar (lambda (row)
+                         (propertize (number-to-string (car row))
+                                     :title (format " %s" (cadr row))))
+                       (if (forge--childp repo 'forge-gitlab-repository)
+                           (forge-sql [:select [number title]
+                                       :from $i1
+                                       :where (= repository $s2)
+                                       :order-by [(desc updated)]]
+                                      (if (equal (match-string 3) "#")
+                                          'issue
+                                        'pullreq)
+                                      (oref repo id))
+                         (forge-sql [:select [number title updated]
+                                     :from discussion
+                                     :where (= repository $s1)
+                                     :union
+                                     :select [number title updated]
+                                     :from issue
+                                     :where (= repository $s1)
+                                     :union
+                                     :select [number title updated]
+                                     :from pullreq
+                                     :where (= repository $s1)
+                                     :order-by [(desc updated)]]
+                                    (oref repo id))))
+               :annotation-function (##get-text-property 0 :title %)))))
+
+(defun forge-read-topic-title (topic)
+  (read-string "Title: " (oref topic title)))
+
+(defun forge-read-topic-milestone (&optional topic)
+  (magit-completing-read
+   "Milestone"
+   (cons ""
+         (mapcar #'caddr
+                 (oref (forge-get-repository (or topic :tracked)) milestones)))
+   nil t
+   (and topic (forge--format-topic-milestone topic))))
+
+(defun forge-read-topic-labels (&optional obj)
+  (let ((crm-separator ","))
+    (magit-completing-read-multiple
+     "Labels: "
+     (forge--format-labels (forge-get-repository (or obj :tracked)))
+     nil t
+     (and (cl-typep obj 'forge-topic)
+          (forge--format-labels obj crm-separator)))))
+
+(defun forge-read-topic-marks (&optional obj)
+  (let ((crm-separator ","))
+    (magit-completing-read-multiple
+     "Marks: " (forge--format-marks) nil t
+     (and (cl-typep obj 'forge-topic)
+          (forge--format-marks obj crm-separator)))))
+
+(defun forge-read-topic-assignees (&optional topic)
+  (let* ((repo (forge-get-repository (or topic :tracked)))
+         (value (and topic (oref topic assignees)))
+         (choices (mapcar #'cadr (oref repo assignees)))
+         (crm-separator ","))
+    (magit-completing-read-multiple
+     "Assignees: " choices nil
+     (if (forge--childp repo 'forge-gitlab-repository)
+         t ; Selecting something else would fail later on.
+       'confirm)
+     (mapconcat #'cadr value ","))))
+
+(defun forge-read-topic-review-requests (&optional topic)
+  (let* ((repo (forge-get-repository (or topic :tracked)))
+         (value (and topic (oref topic review-requests)))
+         (choices (nconc (mapcar #'cadr (oref repo assignees))
+                         (oref repo teams)))
+         (crm-separator ","))
+    (magit-completing-read-multiple
+     "Request review from: " choices nil
+     'confirm
+     (mapconcat #'cadr value ","))))
+
+;;; Format
+
+(cl-defmethod forge--format ((topic forge-topic) slot &optional spec)
+  (forge--format (forge-get-repository topic) slot
+                 `(,@spec (?i . ,(oref topic number)))))
+
+(defun forge--format-topic-line (topic &optional width)
+  (concat
+   (and (or (and (derived-mode-p 'forge-notifications-mode)
+                 (eq forge-notifications-display-style 'flat))
+            (and (derived-mode-p 'forge-topics-mode)
+                 (oref forge--buffer-topics-spec global)
+                 (not (oref forge--buffer-topics-spec grouped))))
+        (concat (truncate-string-to-width
+                 (oref (forge-get-repository topic) slug)
+                 forge-topic-repository-slug-width
+                 nil ?\s t)
+                " "))
+   (string-pad (forge--format-topic-slug topic) (or width 5))
+   " "
+   (forge--format-topic-title topic)))
+
+(defun forge--format-topic-slug (topic)
+  (with-slots (slug state status saved-p) topic
+    (magit--propertize-face
+     slug
+     `(,@(and saved-p               '(forge-topic-slug-saved))
+       ,@(and (eq status 'unread)   '(forge-topic-slug-unread))
+       ,(pcase state
+          ('open                    'forge-topic-slug-open)
+          ((or 'completed 'merged)  'forge-topic-slug-completed)
+          ((or 'unplanned 'outdated 'duplicate 'rejected)
+           'forge-topic-slug-expunged))))))
+
+(defun forge--format-topic-refs (topic)
+  (pcase-let
+      (((eieio cross-repo-p base-repo base-ref head-repo head-ref) topic)
+       (separator (magit--propertize-face ":" 'magit-dimmed))
+       (deleted (magit--propertize-face "(deleted)" 'magit-dimmed)))
+    (concat (if cross-repo-p
+                (concat base-repo separator base-ref)
+              base-ref)
+            (magit--propertize-face "..." 'magit-dimmed)
+            (if cross-repo-p
+                (if (and head-repo head-ref)
+                    (concat head-repo separator head-ref)
+                  deleted)
+              (or head-ref deleted)))))
+
+(defun forge--format-topic-draft (topic)
+  (if (oref topic draft-p)
+      (magit--propertize-face "yes" 'bold)
+    (magit--propertize-face "no" 'magit-dimmed)))
+
+(defun forge--format-topic-saved (topic)
+  (if (oref topic saved-p)
+      (magit--propertize-face "yes" 'bold)
+    (magit--propertize-face "no" 'magit-dimmed)))
+
+(defun forge--format-topic-title (topic)
+  (with-temp-buffer
+    (save-excursion
+      (with-slots (title status state) topic
+        (insert
+         (magit--propertize-face
+          title
+          `(,@(and (forge-pullreq-p topic)
+                   (oref topic draft-p)
+                   '(forge-pullreq-draft))
+            ,(pcase status
+               ('unread  'forge-topic-unread)
+               ('pending 'forge-topic-pending)
+               ('done    'forge-topic-done))
+            ,(pcase (list (eieio-object-class topic) state)
+               (`(forge-discussion  open)       'forge-discussion-open)
+               (`(forge-discussion  completed)  'forge-discussion-completed)
+               (`(forge-discussion  outdated)   'forge-discussion-expunged)
+               (`(forge-discussion  duplicate)  'forge-discussion-expunged)
+               (`(forge-issue       open)       'forge-issue-open)
+               (`(forge-issue       completed)  'forge-issue-completed)
+               (`(forge-issue       unplanned)  'forge-issue-expunged)
+               (`(forge-issue       duplicate)  'forge-issue-expunged)
+               (`(forge-pullreq     open)       'forge-pullreq-open)
+               (`(forge-pullreq     merged)     'forge-pullreq-merged)
+               (`(forge-pullreq     rejected)   'forge-pullreq-rejected)))))))
+    (run-hook-wrapped 'forge-topic-wash-title-hook
+                      (##prog1 nil (save-excursion (funcall %))))
+    (buffer-string)))
+
+(defun forge--format-topic-category (topic)
+  (and-let* ((id (oref topic category))
+             (str (forge-sql1 [:select [name]
+                               :from discussion-category
+                               :where (= id $s1)]
+                              id)))
+    (magit--propertize-face str 'forge-topic-label)))
+
+(defun forge--format-topic-milestone (topic)
+  (and-let* ((id (oref topic milestone))
+             (str (forge-sql1 [:select [title]
+                               :from milestone
+                               :where (= id $s1)]
+                              id)))
+    (magit--propertize-face str 'forge-topic-label)))
+
+(defun forge--format-labels (&optional arg concat)
+  (and-let*
+      ((local t)
+       (labels (cond
+                 ((eieio-object-p arg)
+                  (oref arg labels))
+                 ((forge-buffer-repository)
+                  (forge-sql-cdr `[:select label:* :from label :where
+                                   ,(if arg
+                                        '(and (= repository $s1)
+                                              (in name $v2))
+                                      '(= repository $s1))
+                                   :order-by [(asc name)]]
+                                 forge-buffer-repository
+                                 (vconcat arg)))
+                 (t
+                  (setq local nil)
+                  (forge-sql `[:select :distinct name :from label
+                               ,@(and arg '(:where (in name $v1)))
+                               :order-by [(asc name)]]
+                             (vconcat arg)))))
+       (format (if local
+                   (pcase-lambda (`(,_id ,name ,color ,_description))
+                     (let* ((background (forge--sanitize-color color))
+                            (foreground (readable-foreground-color background)))
+                       (magit--propertize-face
+                        name `(( :background ,background
+                                 :foreground ,foreground)
+                               forge-topic-label))))
+                 (pcase-lambda (`(,name))
+                   (magit--propertize-face name 'forge-topic-label)))))
+    (if concat
+        (mapconcat format labels (if (stringp concat) concat " "))
+      (mapcar format labels))))
+
+(defun forge--format-marks (&optional arg concat)
+  (and-let ((marks (if (forge-topic--eieio-childp arg)
+                       (oref arg marks)
+                     ;; Unlike labels, marks are not repo-specific.
+                     (when (forge-repository-p arg) (setq arg nil))
+                     (forge-sql-cdr `[:select * :from mark
+                                      ,@(and arg '(:where (in name $v1)))
+                                      :order-by [(asc name)]]
+                                    (vconcat arg))))
+            (format (pcase-lambda (`(,_id ,name ,face ,_description))
+                      (magit--propertize-face
+                       name (list face 'forge-topic-label)))))
+    (if concat
+        (mapconcat format marks (if (stringp concat) concat " "))
+      (mapcar format marks))))
+
+(defun forge--format-topic-state (topic)
+  (with-slots (state) topic
+    (magit--propertize-face
+     (symbol-name state)
+     (pcase (list (if (forge-issue-p topic) 'issue 'pullreq) state)
+       ('(discussion  open)       'forge-discussion-open)
+       ('(discussion  completed)  'forge-discussion-completed)
+       ('(discussion  outdated)   'forge-discussion-expunged)
+       ('(discussion  duplicate)  'forge-discussion-expunged)
+       ('(issue       open)       'forge-issue-open)
+       ('(issue       completed)  'forge-issue-completed)
+       ('(issue       unplanned)  'forge-issue-expunged)
+       ('(issue       duplicate)  'forge-issue-expunged)
+       ('(pullreq     open)       'forge-pullreq-open)
+       ('(pullreq     merged)     'forge-pullreq-merged)
+       ('(pullreq     closed)     'forge-pullreq-rejected)))))
+
+(defun forge--format-topic-status (topic)
+  (with-slots (status) topic
+    (magit--propertize-face
+     (symbol-name status)
+     (pcase status
+       ('unread  'forge-topic-unread)
+       ('pending 'forge-topic-pending)
+       ('done    'forge-topic-done)))))
+
+(defun forge--format-topic-assignees (arg)
+  (and-let ((assignees
+             (cond ((eieio-object-p arg)
+                    (oref arg assignees))
+                   ((forge-buffer-repository)
+                    (forge-sql-cdr [:select * :from assignee
+                                    :where
+                                    (and (= repository $s1)
+                                         (in login $v2))
+                                    :order-by [(asc login)]]
+                                   forge-buffer-repository
+                                   (vconcat arg))))))
+    (mapconcat #'forge--format-person assignees ", ")))
+
+(defun forge--format-topic-review-requests (topic)
+  (and$ (oref topic review-requests)
+        (mapconcat #'forge--format-person $ ", ")))
+
+(defun forge--format-person (person)
+  (pcase-let* ((`(,_id ,login ,name) person)
+               (avatar (forge--format-avatar login)))
+    (propertize (if name
+                    (format "%s%s (@%s)" avatar name login)
+                  (format "%s@%s" avatar login))
+                'face 'transient-value)))
+
+(defun forge--format-avatar (person)
+  (if forge-format-avatar-function
+      (funcall forge-format-avatar-function person)
+    ""))
+
+(defun forge--format-boolean (slot name &optional obj)
+  ;; Booleans are formatted differently in transients and headers.
+  ;; Use this to format the (complete) description of suffix commands.
+  (let ((obj (or obj (forge-current-topic))))
+    (if (and obj (slot-exists-p obj slot))
+        (format (propertize "[%s]" 'face 'transient-delimiter)
+                (propertize name 'face
+                            (if (eieio-oref obj slot)
+                                'transient-value
+                              'transient-inactive-value)))
+      (format "[%s]" name))))
+
+;;; Insert
+
+(defun forge-insert-topics (type heading prepare)
+  "Insert a list of topics, according to PREPARE.
+
+This function is not intended to be added to section hooks directly.
+Instead create a function, which calls this function, and add that
+wrapper to the mode's section hook.
+
+PREPARE is a function which takes one arguments the repository object,
+and must return a filter object of type `forge--topics-spec' or nil.
+Insert no topics if PREPARE returns nil, or if the current repository
+isn't tracked or Forge hasn't been fully setup yet (in the latter two
+cases don't even call PREPARE).
+
+The filter object can be created either using `forge--topics-spec' or
+by `clone'ing the object returned by `forge--init-buffer-topics-spec',
+to share some settings with other topic lists in the same buffer.
+See `forge--topics-spec' for the valid slots and their values.
+
+HEADING is used as the heading of the list section and TYPE is used as
+its type.  TYPE should be a symbol of the form `SUBSET-KIND', where KIND
+is one of `topics', `issues' or `pullreqs', and SUBSET should describe
+what subset of KIND is being listed.
+
+For example, to insert a list of issues assigned to you use something
+like:
+
+  (defun my-forge-insert-assigned-issues ()
+    \"Insert a list of issues that are assigned to me.\"
+    (forge-insert-topics \\='assigned-issues \"Assigned issues\"
+      (lambda (repo)
+        (and-let* ((me (ghub--username repo)))
+          (forge--topics-spec :type \\='issue :active t
+                              :assignee me)))))
+
+  (magit-add-section-hook \\='magit-status-sections-hook
+                          #\\='my-forge-insert-assigned-issues
+                          #\\='forge-insert-issues)
+
+Grep Forge for more examples.
+
+Alternatively you can use `forge-topics-setup-buffer' to list a set
+of topics in a dedicated buffer."
+  (declare (indent defun))
+  (when-let* ((_(forge-db t))
+              (repo (forge-get-repository :tracked?))
+              (spec (funcall prepare repo)))
+    (forge--insert-topics type heading (forge--list-topics spec repo))))
+
+(defun forge--insert-topics (type heading topics)
+  (when topics
+    (let ((width (apply #'max (mapcar (##length (oref % slug)) topics))))
+      (magit-insert-section ((eval type) heading t)
+        (magit-insert-heading
+          (concat (magit--propertize-face (concat heading " ")
+                                          'magit-section-heading)
+                  (magit--propertize-face (format "(%s)" (length topics))
+                                          'magit-section-child-count)))
+        (magit-insert-section-body
+          (dolist (topic topics)
+            (forge--insert-topic topic width))
+          (insert ?\n)
+          (magit-make-margin-overlay nil t))))))
+
+(defun forge--insert-topic (topic &optional width)
+  (magit-insert-section ((eval (oref topic closql-table)) topic t)
+    (insert (forge--format-topic-line topic (or width 5)))
+    (forge--insert-topic-marks topic t)
+    (forge--insert-topic-labels topic t)
+    (insert "\n")
+    (magit-log-format-author-margin
+     (oref topic author)
+     (format-time-string "%s" (parse-iso8601-time-string (oref topic created))))
+    (when (and (slot-exists-p topic 'merged)
+               (not (oref topic merged)))
+      (magit-insert-heading)
+      (magit-insert-section-body
+        (forge--insert-pullreq-commits topic)))))
+
+(defun forge--insert-topic-labels (topic &optional separate)
+  (and-let ((labels (oref topic labels)))
+    (prog1 t
+      (pcase-dolist (`(,_id ,name ,color ,description) labels)
+        (let* ((background (forge--sanitize-color color))
+               (foreground (readable-foreground-color background)))
+          (if separate (insert " ") (setq separate t))
+          (insert name)
+          (let ((o (make-overlay (- (point) (length name)) (point))))
+            (overlay-put o 'priority 2)
+            (overlay-put o 'evaporate t)
+            (overlay-put o 'font-lock-face
+                         `(( :background ,background
+                             :foreground ,foreground)
+                           forge-topic-label))
+            (when description
+              (overlay-put o 'help-echo description))))))))
+
+(defun forge--insert-topic-marks (topic &optional separate)
+  (and-let ((marks (oref topic marks)))
+    (prog1 t
+      (pcase-dolist (`(,_id ,name ,face ,description) marks)
+        (if separate (insert " ") (setq separate t))
+        (insert name)
+        (let ((o (make-overlay (- (point) (length name)) (point))))
+          (overlay-put o 'priority 2)
+          (overlay-put o 'evaporate t)
+          (overlay-put o 'font-lock-face (list face 'forge-topic-label))
+          (when description
+            (overlay-put o 'help-echo description)))))))
+
+;;; Modes
+
+(defvar-keymap forge-common-map
+  :doc "Parent keymap of many of Forge's keymaps.
+Keymaps that use this keymap as the/a parent keymap, remap the
+place-holder commands `forge--list-menu' and/or `forge--item-menu'
+to the appropriate menu command.  To change the keys bound to menu
+commands in all Forge keymaps, one only has to change them here."
+  "C-c C-c"    #'forge--list-menu
+  "C-c RET"    #'forge--item-menu
+  "C-<return>" #'forge--item-menu)
+
+(defun forge--list-menu ()
+  "Place-holder menu command.  See `forge-common-map'."
+  (interactive)
+  (message "No list menu available here"))
+(put 'forge--list-menu 'completion-predicate #'ignore)
+
+(defun forge--item-menu ()
+  "Place-holder menu command.  See `forge-common-map'."
+  (interactive)
+  (message "No item menu available here"))
+(put 'forge--item-menu 'completion-predicate #'ignore)
+
+(defvar-keymap forge-post-section-map
+  "<remap> <magit-edit-thing>"   #'forge-edit-post
+  "C-c C-k"                      #'forge-delete-comment)
+
+(defvar-keymap forge-topic-mode-map
+  :parent (make-composed-keymap forge-common-map magit-mode-map)
+  "<remap> <magit-visit-thing>"  #'markdown-follow-link-at-point
+  "<mouse-2>"                    #'markdown-follow-link-at-point
+  "<remap> <forge--item-menu>"   #'forge-topic-menu
+  "<remap> <forge--list-menu>"   #'forge-topic-menu
+  "C-c C-n"                      #'forge-create-post
+  "C-c C-r"                      #'forge-create-post
+  "G"                            #'forge-pull-this-topic)
+
+(define-derived-mode forge-topic-mode magit-mode "Topic"
+  "Parent major mode of `forge-{issue,pullreq}-mode'.
+This mode itself is never used directly."
+  :interactive nil
+  (face-remap-add-relative 'header-line 'forge-topic-header-line)
+  (setq-local markdown-translate-filename-function
+              #'forge--markdown-translate-filename-function))
+
+(defvar-keymap forge-discussion-mode-map :parent forge-topic-mode-map)
+(define-derived-mode forge-discussion-mode forge-topic-mode "Discussion"
+  "Mode for looking at a Forge discussion.")
+(defalias 'forge-discussion-setup-buffer   #'forge-topic-setup-buffer)
+(defalias 'forge-discussion-refresh-buffer #'forge-topic-refresh-buffer)
+(defvar forge-discussion-headers-hook
+  '(forge-insert-topic-state
+    forge-insert-topic-status
+    forge-insert-topic-category
+    forge-insert-topic-labels
+    forge-insert-topic-marks))
+
+(defvar-keymap forge-issue-mode-map :parent forge-topic-mode-map)
+(define-derived-mode forge-issue-mode forge-topic-mode "Issue"
+  "Major mode for looking at a Forge issue."
+  :interactive nil)
+(defalias 'forge-issue-setup-buffer   #'forge-topic-setup-buffer)
+(defalias 'forge-issue-refresh-buffer #'forge-topic-refresh-buffer)
+(defvar forge-issue-headers-hook
+  '(forge-insert-topic-state
+    forge-insert-topic-status
+    forge-insert-topic-milestone
+    forge-insert-topic-labels
+    forge-insert-topic-marks
+    forge-insert-topic-assignees))
+
+(defvar-keymap forge-pullreq-mode-map :parent forge-topic-mode-map)
+(define-derived-mode forge-pullreq-mode forge-topic-mode "Pull-request"
+  "Major mode for looking at a Forge pull-request."
+  :interactive nil)
+(defalias 'forge-pullreq-setup-buffer   #'forge-topic-setup-buffer)
+(defalias 'forge-pullreq-refresh-buffer #'forge-topic-refresh-buffer)
+(defvar forge-pullreq-headers-hook
+  '(forge-insert-topic-state
+    forge-insert-topic-draft
+    forge-insert-topic-status
+    forge-insert-topic-saved
+    forge-insert-topic-refs
+    forge-insert-topic-milestone
+    forge-insert-topic-labels
+    forge-insert-topic-marks
+    forge-insert-topic-assignees
+    forge-insert-topic-review-requests))
+
+(defvar-local forge-buffer-topic nil)
+
+(defun forge-topic-setup-buffer (topic)
+  (let* ((repo (forge-get-repository topic))
+         (name (format "*forge: %s %s*" (oref repo slug) (oref topic slug)))
+         (magit-generate-buffer-name-function (lambda (_mode _value) name))
+         (mode (pcase-exhaustive (eieio-object-class topic)
+                 ('forge-discussion #'forge-discussion-mode)
+                 ('forge-issue      #'forge-issue-mode)
+                 ('forge-pullreq    #'forge-pullreq-mode)))
+         (buffer (magit-setup-buffer mode t
+                   :buffer name
+                   :directory (or (forge-get-worktree repo) "/")
+                   (forge-buffer-topic topic))))
+    (forge-topic-mark-read topic)
+    buffer))
+
+(defun forge-topic-refresh-buffer ()
+  (let ((topic (closql-reload forge-buffer-topic)))
+    (setq forge-buffer-topic topic)
+    (magit-set-header-line-format (forge--format-topic-line topic))
+    (magit-insert-section (topicbuf)
+      (magit-insert-headers
+       (pcase major-mode
+         ('forge-discussion-mode 'forge-discussion-headers-hook)
+         ('forge-issue-mode      'forge-issue-headers-hook)
+         ('forge-pullreq-mode    'forge-pullreq-headers-hook)))
+      (when (forge-pullreq-p topic)
+        (magit-insert-section (pullreq topic)
+          (magit-insert-heading "Commits")
+          (forge--insert-pullreq-commits topic t)))
+      (when-let ((note (oref topic note)))
+        (magit-insert-section (note)
+          (magit-insert-heading "Note")
+          (insert (forge--fontify-markdown note) "\n\n")))
+      (forge-insert-post topic nil)
+      (dolist (post (oref topic posts))
+        (forge-insert-post post topic))
+      (when (and (display-images-p)
+                 (fboundp 'markdown-display-inline-images))
+        (let ((markdown-display-remote-images t))
+          (markdown-display-inline-images))))))
+
+(defun forge-insert-post (post topic)
+  (magit-insert-section (post post)
+    (forge-insert-post-heading post topic)
+    (forge-insert-post-content post)
+    (when (forge-discussion-p topic)
+      (dolist (reply (oref post replies))
+        (magit-insert-section (post reply)
+          (forge-insert-post-heading reply topic)
+          (forge-insert-post-content reply))))))
+
+(defun forge-insert-post-heading (post topic)
+  (oset magit-insert-section--current
+        heading-highlight-face
+        'magit-diff-hunk-heading-highlight)
+  (let* ((author  (oref post author))
+         (created (oref post created))
+         (heading
+          (format-spec
+           forge-post-heading-format
+           `((?a . ,(propertize (concat (forge--format-avatar author)
+                                        (or author "(ghost)"))
+                                'font-lock-face 'forge-post-author))
+             (?c . ,(propertize created 'font-lock-face 'forge-post-date))
+             (?C . ,(propertize (apply #'format "%s %s ago"
+                                       (magit--age
+                                        (float-time
+                                         (date-to-time created))))
+                                'font-lock-face 'forge-post-date))))))
+    (when (forge-discussion-reply-p post)
+      (setq heading (concat "    " heading)))
+    (font-lock-append-text-property
+     0 (length heading)
+     'font-lock-face (cond-let*
+                       ([_(forge-discussion-p topic)]
+                        [answer (oref topic answer)]
+                        [_(equal (oref post their-id)
+                                 (forge--their-id answer))]
+                        'forge-discussion-answer-heading)
+                       ((forge-discussion-reply-p post)
+                        '(magit-dimmed magit-diff-hunk-heading))
+                       ('magit-diff-hunk-heading))
+     heading)
+    (magit-insert-heading heading)))
+
+(defun forge-insert-post-content (post)
+  (insert (forge--fontify-markdown
+           (oref post body)
+           (and (forge-discussion-reply-p post) 4)))
+  (insert "\n\n"))
+
+(cl-defmethod magit-buffer-value (&context (major-mode forge-topic-mode))
+  (oref forge-buffer-topic slug))
+
+;;; Bookmarks
+
+(cl-defmethod magit-bookmark-name
+  (&context (major-mode forge-topic-mode))
+  (concat (oref (forge-get-repository forge-buffer-topic) slug)
+          (oref forge-buffer-topic slug)))
+
+(cl-defmethod magit-bookmark-get-value
+  (bookmark &context (major-mode forge-topic-mode))
+  (bookmark-prop-set bookmark 'forge-topic (oref forge-buffer-topic id)))
+
+(cl-defmethod magit-bookmark-get-buffer-create
+  (bookmark (_mode (derived-mode forge-topic-mode)))
+  (let ((magit-display-buffer-function #'identity)
+        (magit-display-buffer-noselect t))
+    (forge-topic-setup-buffer
+     (forge-get-topic (bookmark-prop-get bookmark 'forge-topic)))))
+
+(put 'forge-discussion-mode 'magit-bookmark-variables t)
+(put 'forge-issue-mode      'magit-bookmark-variables t)
+(put 'forge-pullreq-mode    'magit-bookmark-variables t)
+
+;;; Headers
+
+(cl-defmacro forge--define-topic-header
+    (name &key insert format (command nil command?))
+  (declare (indent defun))
+  (let ((fun (intern (format "forge-insert-topic-%s" name)))
+        (map (intern (format "forge-topic-%s-section-map" name)))
+        (cmd (intern (format "forge-topic-set-%s" name))))
+    `(progn
+       (cl-defun ,fun (&optional (topic forge-buffer-topic))
+         (magit-insert-section (,(intern (format "topic-%s" name)))
+           (insert ,(capitalize (string-pad (format "%s: " name) 11)))
+           ,(cond
+              (insert
+               `(unless (funcall ,insert topic)
+                  (insert (magit--propertize-face "none" 'magit-dimmed))))
+              (format
+               `(insert (or (funcall ,format topic)
+                            (magit--propertize-face "none" 'magit-dimmed)))))
+           (insert ?\n)))
+       ,@(and (if command? command t)
+              `((defvar-keymap ,map "<remap> <magit-edit-thing>"
+                               ,(or command `(function ,cmd)))
+                (put ',map 'definition-name ',name)))
+       (put ',fun 'definition-name ',name))))
+
+(forge--define-topic-header refs
+  :command nil
+  :format #'forge--format-topic-refs)
+
+(forge--define-topic-header draft
+  :command #'forge-topic-toggle-draft
+  :format #'forge--format-topic-draft)
+
+(forge--define-topic-header saved
+  :command #'forge-topic-toggle-saved
+  :format #'forge--format-topic-saved)
+
+(forge--define-topic-header state
+  :command #'forge-topic-state-menu
+  :format #'forge--format-topic-state)
+
+(forge--define-topic-header status
+  :command #'forge-topic-status-menu
+  :format #'forge--format-topic-status)
+
+(forge--define-topic-header category
+  :format #'forge--format-topic-category)
+
+(forge--define-topic-header milestone
+  :format #'forge--format-topic-milestone)
+
+(forge--define-topic-header labels
+  :insert #'forge--insert-topic-labels)
+
+(forge--define-topic-header marks
+  :insert #'forge--insert-topic-marks)
+
+(forge--define-topic-header assignees
+  :format #'forge--format-topic-assignees)
+
+(forge--define-topic-header review-requests
+  :format #'forge--format-topic-review-requests)
+
+;;; Commands
+;;;; Groups
+
+(defvar forge--show-topic-legend t)
+
+(transient-define-group forge--lists-group
+  ["List"
+   ("l r" "repositories"  forge-list-repositories)
+   ("l n" "notifications" forge-list-notifications)
+   ("l g" "global topics" forge-list-global-topics)
+   ("l t" "topics"        forge-list-topics)
+   ""
+   ( :info "Batch" :format "%d" :face transient-heading
+     :if (##memq (oref transient--prefix command)
+                 '(forge-topic-menu forge-topics-menu)))
+   ( "C" "done with closed" forge-mark-completed-topics-as-done
+     :if (##memq (oref transient--prefix command)
+                 '(forge-topic-menu forge-topics-menu)))])
+
+(transient-define-group forge--topic-menus-group
+  ["Menu"
+   ("m s" "edit"      forge-topic-menu)
+   ("m f" "filter"    forge-topics-menu)
+   ("m f" "filter"    forge-notifications-menu)
+   ("m f" "filter"    forge-repositories-menu)
+   ("m d" "dispatch"  forge-dispatch)
+   ("m c" "configure" forge-configure)
+   """"])
+
+(transient-define-group forge--topic-set-state-group
+  [:description (##if forge--show-topic-legend "Set public state" "Set state")
+   ("o" forge-topic-state-set-open)
+   ("c" forge-chatter-state-set-completed)
+   ("U" forge-issue-state-set-unplanned)
+   ("O" forge-discussion-state-set-outdated)
+   ("D" forge-chatter-state-set-duplicate)
+   ("M" forge-pullreq-state-set-merged)
+   ("R" forge-pullreq-state-set-rejected)])
+
+(transient-define-group forge--topic-set-status-group
+  [:description (##if forge--show-topic-legend "Set private status" "Set status")
+   ("u" forge-topic-status-set-unread)
+   ("p" forge-topic-status-set-pending)
+   ("d" forge-topic-status-set-done)])
+
+(transient-define-group forge--topic-legend-group
+  ["Legend" :if-non-nil forge--show-topic-legend
+   (:info* (##propertize "open discussion"      'face 'forge-discussion-open))
+   (:info* (##propertize "completed discussion" 'face 'forge-discussion-completed))
+   (:info* (##propertize "expunged discussion"  'face 'forge-discussion-expunged))]
+  ["" :if-non-nil forge--show-topic-legend
+   (:info* (##propertize "open issue"       'face 'forge-issue-open))
+   (:info* (##propertize "completed issue"  'face 'forge-issue-completed))
+   (:info* (##propertize "expunged issue"   'face 'forge-issue-expunged))]
+  ["" :if-non-nil forge--show-topic-legend
+   (:info* (##propertize "open pullreq"     'face 'forge-pullreq-open))
+   (:info* (##propertize "merged pullreq"   'face 'forge-pullreq-merged))
+   (:info* (##propertize "rejected pullreq" 'face 'forge-pullreq-rejected))]
+  ["" :if-non-nil forge--show-topic-legend
+   (:info* (##propertize "unread"           'face 'forge-topic-unread))
+   (:info* (##propertize "pending"          'face 'forge-topic-pending))
+   (:info* (##propertize "done"             'face 'forge-topic-done))]
+  ["" :if-non-nil forge--show-topic-legend
+   (:info* (##propertize "draft"            'face 'forge-pullreq-draft))])
+
+(transient-define-suffix forge-toggle-topic-legend ()
+  "Toggle whether to show legend for faces used in topic menus and lists."
+  :description (##if forge--show-topic-legend "hide legend" "show legend")
+  :transient t
+  (interactive)
+  (customize-set-variable 'forge--show-topic-legend
+                          (not forge--show-topic-legend)))
+
+(defconst forge--topic-menus-column-widths '(21 21 21 21))
+
+;;;; Menus
+
+;;;###autoload(autoload 'forge-topic-menu "forge-topic" nil t)
+(transient-define-prefix forge-topic-menu (&optional visit)
+  "Show menu for the topic at point.
+With prefix argument VISIT, also visit the topic."
+  :transient-suffix t
+  :transient-non-suffix #'transient--do-call
+  :transient-switch-frame nil
+  :refresh-suffixes t
+  :environment #'forge--menu-environment
+  :column-widths forge--topic-menus-column-widths
+  [:hide always ("q" forge-menu-quit-list)]
+  [forge--topic-menus-group
+   forge--topic-set-state-group
+   forge--topic-set-status-group
+   ["Actions"
+    ("/f" forge-pull-this-topic)
+    ("/b" forge-browse-this-topic)
+    ("/r" "respond" forge-create-post)
+    ("/c" forge-checkout-this-pullreq)
+    ("/A" forge-approve-pullreq)
+    ("/R" forge-request-changes)]]
+  [forge--lists-group
+   ["Set                                         "
+    ("-c" forge-topic-set-category)
+    ("-m" forge-topic-set-milestone)
+    ("-l" forge-topic-set-labels)
+    ("-x" forge-topic-set-marks)
+    ("-a" forge-topic-set-assignees)
+    ("-r" forge-topic-set-review-requests)
+    ("-n" forge-edit-topic-note)
+    ("-t" forge-topic-set-title)]
+   ["Set"
+    ("-s" forge-topic-toggle-saved)
+    ("-d" forge-topic-toggle-draft)
+    ("-A" forge-discussion-set-answer)
+    """Display"
+    ("-H" forge-toggle-topic-legend)]]
+  [forge--topic-legend-group]
+  (interactive (list current-prefix-arg))
+  (when visit
+    (forge-topic-setup-buffer (forge-topic-at-point)))
+  (transient-setup 'forge-topic-menu))
+
+(transient-augment-suffix forge-topic-menu
+  :transient #'transient--do-replace
+  :inapt-if (lambda () (or (derived-mode-p 'forge-repository-list-mode)
+                      (eq (oref transient--prefix command) 'forge-topic-menu)))
+  :inapt-face (lambda () (if (derived-mode-p 'forge-repository-list-mode)
+                        'transient-inapt-suffix
+                      'forge-suffix-active)))
+
+;;;###autoload(autoload 'forge-topic-state-menu "forge-topic" nil t)
+(transient-define-prefix forge-topic-state-menu ()
+  "Set state of the current topic."
+  :environment #'forge--menu-environment
+  [forge--topic-set-state-group])
+
+;;;###autoload(autoload 'forge-topic-status-menu "forge-topic" nil t)
+(transient-define-prefix forge-topic-status-menu ()
+  "Set status of the current topic."
+  :environment #'forge--menu-environment
+  [forge--topic-set-status-group])
+
+(defun forge--menu-environment (fn)
+  (let ((magit--refresh-cache (list (cons 0 0))))
+    (funcall fn)))
+
+;;;; State
+
+(defclass forge--topic-set-state-command (transient-suffix)
+  ((state :initarg :state)
+   (getter :initarg :getter)
+   (definition
+    :initform (lambda ()
+                (interactive)
+                (with-slots (getter state) (transient-suffix-object)
+                  (let ((topic (funcall getter t)))
+                    (forge--set-topic-state (forge-get-repository topic)
+                                            topic state)))))
+   (description
+    :initform (lambda (obj)
+                (symbol-name (oref obj state))))
+   (inapt-if
+    :initform (lambda ()
+                (or (forge-region-topics)
+                    (with-slots (getter state) (transient-suffix-object)
+                      (if-let ((topic (funcall getter)))
+                          ;; Once a pull-request is merged,
+                          ;; its state cannot be changed anymore.
+                          (memq (oref topic state) (list state 'merged))
+                        t)))))
+   (inapt-face
+    :initform (lambda (obj)
+                (with-slots (getter state) (transient-suffix-object)
+                  (if (and-let ((_(not (forge-region-topics)))
+                                (topic (funcall getter)))
+                        (eq (oref topic state) state))
+                      'forge-suffix-active
+                    'transient-inapt-suffix))))))
+
+(transient-define-suffix forge-topic-state-set-open ()
+  "Set the state of the current topic to `open'."
+  :class 'forge--topic-set-state-command
+  :state 'open
+  :getter #'forge-current-topic)
+
+(transient-define-suffix forge-chatter-state-set-completed ()
+  "Set the state of the current discussion or issue to `completed'."
+  :class 'forge--topic-set-state-command
+  :state 'completed
+  :getter #'forge-current-chatter
+  :if #'forge-current-chatter)
+
+(transient-define-suffix forge-issue-state-set-unplanned ()
+  "Set the state of the current issue to `unplanned'."
+  :class 'forge--topic-set-state-command
+  :state 'unplanned
+  :getter #'forge-current-issue
+  :if #'forge-current-issue)
+
+(transient-define-suffix forge-chatter-state-set-duplicate ()
+  "Set the state of the current discussion or issue to `duplicate'."
+  :class 'forge--topic-set-state-command
+  :state 'duplicate
+  :getter #'forge-current-chatter
+  :if #'forge-current-chatter
+  (interactive)
+  (with-slots (getter state) (transient-suffix-object)
+    (let ((topic (funcall getter t)))
+      (if (forge-issue-p topic)
+          (message
+           "The API does not yet support closing an issue as a duplicate")
+        (forge--set-topic-state (forge-get-repository topic)
+                                topic state)))))
+
+(transient-define-suffix forge-discussion-state-set-outdated ()
+  "Set the state of the current discussion to `outdated'."
+  :class 'forge--topic-set-state-command
+  :state 'outdated
+  :getter #'forge-current-discussion
+  :if #'forge-current-discussion)
+
+(transient-define-suffix forge-pullreq-state-set-merged ()
+  "Merge the current pull-request into its target.
+Prompt the user to either use the API to perform the merge or use Git.
+I recommend you only use the API if your organization enforces that
+inferior process."
+  :class 'forge--topic-set-state-command
+  :state 'merged
+  :getter #'forge-current-pullreq
+  :if #'forge-current-pullreq
+  :transient nil
+  (interactive)
+  (let ((pullreq (forge-current-pullreq)))
+    (if (magit-read-char-case (format "Merge #%s " (oref pullreq number)) t
+          (?g "using [g]it (recommended)" t)
+          (?a "using [a]pi" nil))
+        (let ((branch (or (forge--pullreq-branch-active pullreq)
+                          (forge--branch-pullreq pullreq))))
+          (if-let ((upstream (magit-get-local-upstream-branch branch)))
+              (if (zerop (magit-call-git "checkout" upstream))
+                  (magit--merge-absorb
+                   branch (magit-merge-arguments)
+                   ;; Users might be surprised that we
+                   ;; aren't done yet, so drop a hint.
+                   "Inspect the result, and if satisfied push")
+                (user-error "Could not checkout %S" upstream))
+            (user-error "No upstream configured for %S" branch)))
+      (forge-merge pullreq (forge-select-merge-method)))))
+
+(transient-define-suffix forge-pullreq-state-set-rejected ()
+  "Set the state of the current pull-request to `rejected'."
+  :class 'forge--topic-set-state-command
+  :state 'rejected
+  :getter #'forge-current-pullreq
+  :if #'forge-current-pullreq)
+
+;;;; Status
+
+(defclass forge--topic-set-status-command (transient-suffix)
+  ((status :initarg :status)
+   (definition
+    :initform (lambda ()
+                (interactive)
+                (with-slots (status) (transient-suffix-object)
+                  (if-let ((topics (forge-region-topics)))
+                      (dolist (topic topics)
+                        (oset topic status status))
+                    (oset (forge-current-topic t) status status)))
+                (forge-refresh-buffer)))
+   (description
+    :initform (lambda (obj)
+                (symbol-name (oref obj status))))
+   (inapt-if
+    :initform (lambda ()
+                (and (not (forge-region-topics))
+                     (if-let ((topic (forge-current-topic)))
+                         (eq (oref topic status)
+                             (oref (transient-suffix-object) status))
+                       t))))
+   (inapt-face
+    :initform (lambda ()
+                (if (forge-current-topic)
+                    'forge-suffix-active
+                  'transient-inapt-suffix)))))
+
+(transient-define-suffix forge-topic-status-set-unread ()
+  "Set the notification status of the current topic to `unread'."
+  :class 'forge--topic-set-status-command :status 'unread)
+
+(transient-define-suffix forge-topic-status-set-pending ()
+  "Set the notification status of the current topic to `pending'."
+  :class 'forge--topic-set-status-command :status 'pending)
+
+(transient-define-suffix forge-topic-status-set-done ()
+  "Set the notification status of the current topic to `done'."
+  :class 'forge--topic-set-status-command :status 'done)
+
+(defun forge-mark-completed-topics-as-done ()
+  "Mark completed topics of the current repository as done.
+Change the private status to \"done\" for topics whose private status is
+\"unread\" or \"pending\" and whose public state is \"completed\".
+Whether this affects all such topics or only all such topics of a
+certain type (discussion, issue or pull-request), depends on the
+context."
+  (interactive)
+  (let* ((type (forge-current-topic-type))
+         (desc (if (eq type 'pullreq) 'pull-request type))
+         (topics (forge--list-topics
+                  (forge--topics-spec :type type
+                                      :active nil
+                                      :state 'closed
+                                      :status 'inbox)
+                  (forge-get-repository :tracked))))
+    (cond ((not topics)
+           (message "No completed %s that could be marked as done" desc))
+          ((magit-confirm t
+             "Mark \"%s\" as done"
+             (format "Mark %%d %ss as done" desc)
+             nil
+             (mapcar #'forge--format-topic-line topics))
+           (dolist (topic topics)
+             (oset topic status 'done))
+           (forge-refresh-buffer)))))
+
+;;;; Set
+
+(defclass forge--topic-set-slot-command (transient-suffix)
+  ((slot :initarg :slot)
+   (setter)
+   (reader :initarg :reader)
+   (formatter :initarg :formatter)
+   (definition
+    :initform (lambda (value)
+                (interactive
+                  (list (funcall (oref (transient-suffix-object) reader)
+                                 (forge-current-topic t))))
+                (let ((topic (forge-current-topic t)))
+                  (funcall (oref (transient-suffix-object) setter)
+                           (forge-get-repository topic)
+                           topic value))))
+   (description
+    :initform (lambda (obj)
+                (with-slots (slot inapt-if-not) obj
+                  (if-let* ((topic (if inapt-if-not
+                                       (funcall inapt-if-not)
+                                     (forge-current-topic)))
+                            (value (funcall (oref obj formatter) topic)))
+                      (format "%s %s" slot value)
+                    (format "%s" slot)))))))
+
+(cl-defmethod initialize-instance :after
+  ((obj forge--topic-set-slot-command) &optional _slots)
+  (with-slots (slot) obj
+    (let ((name (symbol-name slot)))
+      (cond ((slot-boundp obj 'reader))
+            ((string-suffix-p "-p" name)
+             (setq name (substring name 0 -2))
+             (oset obj reader (##not (eieio-oref % slot))))
+            ((oset obj reader (intern (format "forge-read-topic-%s" name)))))
+      (oset obj setter (intern (format "forge--set-topic-%s" name)))
+      (unless (slot-boundp obj 'formatter)
+        (oset obj formatter (intern (format "forge--format-topic-%s" name)))))))
+
+(transient-define-suffix forge-topic-set-title (title)
+  "Edit the TITLE of the current topic."
+  :class 'forge--topic-set-slot-command :slot 'title
+  :inapt-if-not #'forge-current-topic
+  :formatter (lambda (topic)
+               (propertize (truncate-string-to-width
+                            (forge--format-topic-title topic) 34 nil ?\s t)
+                           'face 'font-lock-string-face)))
+
+(transient-define-suffix forge-topic-set-category (category)
+  "Edit the CATEGORY of the current discussion."
+  :class 'forge--topic-set-slot-command :slot 'category
+  :inapt-if-not #'forge-current-discussion)
+
+(transient-define-suffix forge-topic-set-milestone (milestone)
+  "Edit what MILESTONE the current topic belongs to."
+  :class 'forge--topic-set-slot-command :slot 'milestone
+  :inapt-if-not (##or (forge-current-issue) (forge-current-pullreq)))
+
+(transient-define-suffix forge-topic-set-labels (labels)
+  "Edit the LABELS of the current topic."
+  :class 'forge--topic-set-slot-command :slot 'labels
+  :inapt-if-not #'forge-current-topic
+  :formatter (##forge--format-labels % t))
+
+(transient-define-suffix forge-topic-set-marks (marks)
+  "Edit the MARKS of the current topic."
+  :class 'forge--topic-set-slot-command :slot 'marks
+  :inapt-if-not #'forge-current-topic
+  :formatter (##forge--format-marks % t))
+
+(transient-define-suffix forge-topic-set-assignees (assignees)
+  "Edit the ASSIGNEES of the current topic."
+  :class 'forge--topic-set-slot-command :slot 'assignees
+  :inapt-if-not (##or (forge-current-issue) (forge-current-pullreq)))
+
+(transient-define-suffix forge-topic-set-review-requests (review-requests)
+  "Edit the REVIEW-REQUESTS of the current pull-request."
+  :class 'forge--topic-set-slot-command :slot 'review-requests
+  :inapt-if-not #'forge-current-pullreq)
+
+(transient-define-suffix forge-topic-toggle-draft (draft)
+  "Toggle whether the current pull-request is a draft."
+  :class 'forge--topic-set-slot-command :slot 'draft-p
+  :inapt-if-not #'forge-current-pullreq
+  :description (##forge--format-boolean 'draft-p "draft"))
+
+(transient-define-suffix forge-topic-toggle-saved ()
+  "Toggle whether this topic is marked as saved."
+  :class 'forge--topic-set-slot-command :slot 'saved-p
+  :inapt-if-not #'forge-current-topic
+  :description (##forge--format-boolean 'saved-p "saved")
+  ;; Set only locally because Github's API does not support this.
+  (interactive)
+  (let ((topic (forge-current-topic t)))
+    (oset topic saved-p (not (oref topic saved-p))))
+  (forge-refresh-buffer))
+
+(transient-define-suffix forge-discussion-set-answer (post)
+  "Mark the post at point as the answer to the current question.
+When point is on the answer, then unmark it and mark no other."
+  :class 'forge--topic-set-slot-command :slot 'answer
+  :inapt-if-not (lambda ()
+                  (and-let* ((discussion (forge-current-discussion))
+                             (category (oref discussion category)))
+                    (forge-sql1 [:select answerable-p
+                                 :from discussion-category
+                                 :where (= id $s1)]
+                                category)))
+  :description (##forge--format-boolean 'answer "answered")
+  :reader #'forge--select-discussion-answer)
+
+;;; Color Utilities
+
+(defun forge--sanitize-color (color)
+  (cond ((color-values color) color)
+        ;; Discard alpha information.
+        ((string-match-p "\\`#.\\{4\\}\\'" color) (substring color 0 3))
+        ((string-match-p "\\`#.\\{8\\}\\'" color) (substring color 0 6))
+        (t "#000000"))) ; Use fallback instead of invalid color.
+
+;;; Markdown Utilities
+
+(defun forge--fontify-markdown (text &optional indent)
+  (with-temp-buffer
+    (delay-mode-hooks
+      (gfm-mode))
+    (insert text)
+    (font-lock-ensure)
+    (when forge-post-fill-region
+      (when indent
+        (setq fill-column (- fill-column indent)))
+      (fill-region (point-min) (point-max)))
+    (when indent
+      (indent-rigidly (point-min) (point-max) indent))
+    (let* ((string (buffer-string))
+           (beg 0)
+           (end (length string)))
+      (while (< beg end)
+        (let ((pos (next-single-property-change beg 'face string end))
+              (val (get-text-property beg 'face string)))
+          (put-text-property beg pos 'font-lock-face val string)
+          (remove-list-of-text-properties beg pos '(face) string)
+          (setq beg pos)))
+      string)))
+
+(defun forge--markdown-translate-filename-function (file)
+  (if (string-match-p "\\`https?://" file)
+      file
+    (let ((host (oref (forge-get-repository :tracked) forge))) ;aka webhost
+      (concat (if (member host ghub-insecure-hosts) "http://" "https://")
+              host
+              (and (not (string-prefix-p "/" file)) "/")
+              file))))
+
+;;; Templates
+
+(defun forge--topic-template (repo class)
+  (unless repo
+    (setq repo (forge-get-repository :tracked)))
+  (let* ((templates (forge--topic-templates repo class))
+         (template
+          (if (cdr templates)
+              (let ((c (magit-completing-read
+                        (pcase class
+                          ('forge-issue   "Select issue template")
+                          ('forge-pullreq "Select pull-request template"))
+                        (mapcar (##alist-get 'prompt %) templates)
+                        nil t)))
+                (seq-find (##equal (alist-get 'prompt %) c) templates))
+            (car templates))))
+    (if-let ((url (alist-get 'url template)))
+        (if (string-match (forge--format repo "\
+\\`https://%h/[^/]+/[^/]+/discussions\\(?:/categories/\\(.+\\)\\)?")
+                          url)
+            `((type . forge-discussion)
+              (category . ,(or (match-string 1 url)
+                               (forge-read-topic-category
+                                nil "Category for new discussion"))))
+          `((type . redirect) ,@template))
+      `((type . ,class) ,@template))))
+
+(defun forge--topic-templates (repo class)
+  (mapcan (lambda (file)
+            (with-temp-buffer
+              (magit-git-insert "cat-file" "-p" file)
+              (if (equal (file-name-nondirectory file) "config.yml")
+                  (forge--topic-parse-template-config)
+                (list (forge--topic-parse-template (file-name-base file))))))
+          (forge--topic-template-files repo class)))
+
+(cl-defgeneric forge--topic-template-files (repo class))
+
+(defun forge--topic-template-files-1 (repo suffix &rest paths)
+  (setq suffix (ensure-list suffix))
+  (let ((branch (forge--get-default-branch repo)))
+    (seq-keep (if suffix
+                  (##and (member (file-name-extension %) suffix)
+                         (concat branch ":" %))
+                (##concat branch ":" %))
+              (magit-git-items "ls-tree" "-z"
+                               "--full-tree" "--name-only"
+                               (and suffix "-r")
+                               branch "--" paths))))
+
+(defun forge--topic-parse-template-config ()
+  (let-alist (yaml-parse-string (buffer-str)
+                                :object-type 'alist
+                                :sequence-type 'list)
+    (nconc
+     (and (not (eq .blank_issues_enabled :false)) ;unset means true
+          `(((prompt . ,(concat (propertize "Blank issue" 'face 'bold)
+                                " — Create a new issue from scratch")))))
+     (mapcar (lambda (link)
+               `(,@link
+                 (prompt . ,(let-alist link
+                              (concat (propertize .name 'face 'bold)
+                                      " — " .about)))))
+             .contact_links))))
+
+(defun forge--topic-parse-template (name)
+  (goto-char (point-min))
+  (skip-chars-forward "\s\t\n\r")
+  (if-let ((beg (and (looking-at "^---[\s\t]*$")
+                     (point)))
+           (end (and (zerop (forward-line))
+                     (re-search-forward "^---[\s\t]*$" nil t)
+                     (match-beginning 0)))
+           (repoid (oref (forge-get-repository :tracked) id)))
+      (let-alist (yaml-parse-string (buffer-str beg end)
+                                    :object-type 'alist
+                                    :sequence-type 'list
+                                    :null-object nil
+                                    :false-object nil)
+        (when (stringp .name)
+          (setq name .name))
+        (setq name (propertize .name 'face 'bold))
+        `((prompt    . ,(if .about (format "%s — %s" name .about) name))
+          (title     . ,(and .title
+                             (stringp .title)
+                             (string-trim .title)))
+          (text      . ,(string-trim (buffer-str (point))))
+          ;; Prevent ad hock creation or previously unknown labels.
+          (labels    . ,(cl-intersection
+                         (ensure-list .labels)
+                         (forge-sql-car [:select name :from label
+                                         :where (= repository $s1)]
+                                        repoid)
+                         :test #'equal))
+          ;; Server errors on invalid assignees.
+          (assignees . ,(cl-intersection
+                         (ensure-list .assignees)
+                         (forge-sql-car [:select login :from assignee
+                                         :where (= repository $s1)]
+                                        repoid)
+                         :test #'equal))
+          (draft     . ,(and (booleanp .draft) .draft))))
+    `((prompt . ,(propertize name 'face 'bold))
+      (text   . ,(string-trim (buffer-str))))))
+
+;;; Bug-Reference
+
+(defvar forge-bug-reference-remote-files t
+  "Whether forge may enable `bug-reference-mode' in remote files.
+See also `forge-bug-reference-setup'.")
+
+(defun forge-bug-reference-setup ()
+  "Setup `bug-reference' in the current buffer.
+If forge data has been fetched for the current repository, then
+enable `bug-reference-mode' or `bug-reference-prog-mode' and
+modify `bug-reference-bug-regexp' if appropriate."
+  (unless (or bug-reference-url-format
+              (not (forge-db t))
+              (and buffer-file-name
+                   (not forge-bug-reference-remote-files)
+                   (file-remote-p buffer-file-name))
+              ;; TODO Allow use in these modes again.
+              (derived-mode-p 'forge-topics-mode 'forge-notifications-mode))
+    (magit--with-safe-default-directory nil
+      (when-let ((repo (forge-get-repository :tracked?)))
+        (when (derived-mode-p 'magit-status-mode
+                              'forge-notifications-mode)
+          (setq-local
+           bug-reference-auto-setup-functions
+           (let ((hook bug-reference-auto-setup-functions))
+             (list (lambda ()
+                     ;; HOOK is not allowed to be a lexical var:
+                     ;; (run-hook-with-args-until-success 'hook)
+                     (catch 'success
+                       (dolist (f hook)
+                         (when (funcall f)
+                           (setq bug-reference-bug-regexp
+                                 (concat "." bug-reference-bug-regexp))
+                           (throw 'success t)))))))))
+        (if (derived-mode-p 'prog-mode)
+            (bug-reference-prog-mode 1)
+          (bug-reference-mode 1))
+        (add-hook 'completion-at-point-functions
+                  #'forge-topic-completion-at-point nil t)))))
+
+(unless noninteractive
+  (dolist (hook forge-bug-reference-hooks)
+    (add-hook hook #'forge-bug-reference-setup t)))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let")
+;;   ("buffer-string" . "buffer-string")
+;;   ("buffer-str"    . "forge--buffer-substring-no-properties")
+;;   ("partial"       . "llama--left-apply-partially"))
+;; End:
+(provide 'forge-topic)
+;;; forge-topic.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topic.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topic.elc
new file mode 100644
index 0000000..5ab1268
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topic.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topics.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topics.el
new file mode 100644
index 0000000..e6668c5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topics.el
@@ -0,0 +1,739 @@
+;;; forge-topics.el --- List topics  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Code:
+
+(require 'forge-topic)
+
+;;; Options
+
+(defcustom forge-list-buffer-default-topic-filters
+  (forge--topics-spec :type 'topic :active t :state 'open :order 'newest)
+  "Filters initially used to limit topics listed in list buffers.
+
+This option controls which topics are listed when initially creating
+a `forge-topics-mode' buffer.  To temporarily change which topics are
+listed in a given buffer, instead use \\`N m' (`forge-topics-menu')."
+  :package-version '(forge . "0.4.0")
+  :group 'forge
+  :type 'object)
+
+(defcustom forge-status-buffer-default-topic-filters
+  (forge--topics-spec :type 'topic :active t :state 'open :order 'newest)
+  "Filters initially used to limit topics listed in status buffers.
+
+This option controls which topics are listed when initially creating
+a `magit-status-mode' buffer.  To temporarily change which topics are
+listed in a given buffer, instead use \\<forge-topics-mode-map> \
+\\[forge-topics-menu] (`forge-topics-menu').
+
+To initially list no topics, set the `type' slot to nil."
+  :package-version '(forge . "0.4.0")
+  :group 'forge
+  :type 'object)
+
+(defcustom forge-owned-accounts nil
+  "An alist of accounts that are owned by you.
+This should include your username as well as any organization
+that you own.  Used by the commands `forge-list-owned-issues',
+`forge-list-owned-pullreqs' and `forge-fork'.
+
+Each element has the form (ACCOUNT . PLIST).  The following
+properties are currently being used:
+
+`remote-name' The default name suggested by `forge-fork' for a
+  fork created within this account.  If unspecified, then the
+  name of the account is used."
+  :package-version '(forge . "0.2.0")
+  :group 'forge
+  :type '(repeat (cons (string :tag "Account") plist)))
+
+(defcustom forge-owned-ignored nil
+  "A list of repositories that are ignored when listing those owned by you.
+This is a list of package names.  Used by the commands
+`forge-list-owned-issues' and `forge-list-owned-pullreqs'."
+  :package-version '(forge . "0.2.0")
+  :group 'forge
+  :type '(repeat (string :tag "Name")))
+
+;;; Faces
+
+(defface forge-suffix-active
+  '((t :inherit transient-value :weight bold))
+  "Face used for suffixes whose effects is currently active."
+  :group 'forge-faces)
+
+(defface forge-suffix-active-and-implied
+  '((t :inherit transient-value :weight semibold))
+  "Face used for suffixes whose effects is currently active and implied."
+  :group 'forge-faces)
+
+(defface forge-suffix-implied
+  '((t :inherit transient-value :weight normal))
+  "Face used for suffixes whose effects is currently implied."
+  :group 'forge-faces)
+
+;;; Mode
+
+(defvar-keymap forge-topics-mode-map
+  :doc "Local keymap for Forge-Topic-List mode buffers."
+  :parent (make-composed-keymap forge-common-map magit-mode-map)
+  "RET"                        #'forge-visit-this-topic
+  "<return>"                   #'forge-visit-this-topic
+  "o"                          #'forge-browse-this-topic
+  "<remap> <forge--list-menu>" #'forge-topics-menu
+  "<remap> <forge--item-menu>" #'forge-topic-menu
+  "<remap> <magit-refresh>"    #'forge-refresh-buffer)
+
+(defvar forge-topics-mode-name '((:eval (forge-topics-buffer-desc)))
+  "Information shown in the mode-line for `forge-topics-mode'.
+Must be set before `forge-topics' is loaded.")
+
+(define-derived-mode forge-topics-mode magit-mode forge-topics-mode-name
+  "Major mode for browsing a list of topics."
+  :interactive nil
+  (magit-hack-dir-local-variables))
+
+(defun forge-topics-setup-buffer (&optional repo spec &rest params)
+  "List a set of topics in a buffer.
+
+The buffer is determined using `forge-topics-buffer-name', which uses
+the same buffer for all global lists, and likewise just one buffer per
+repository for repository-local lists.  You could use `cl-letf' to use
+a different buffer for certain sets.
+
+If optional REPO is non-nil, it must be a `forge-repository' object.
+It is only relevant when not showing a global topic list, as determined
+by the value of `:global' in PARAMS.  Even when showing a local list,
+REPO may be nil, in that case the repository is determined from context.
+
+If optional SPEC is non-nil, it must be a `forge--topics-spec' object.
+If nil, a clone of the existing filter spec from the buffer determined
+above is used, provided that buffer already exists and has a local
+filter spec.  A clone of `forge-list-buffer-default-topic-filters' is
+used otherwise.
+
+Optional PARAMS can be used to set slots of SPEC.  PARAMS is a plist
+where each key is an initarg for a slot of the `forge--topics-spec'
+class.
+
+Usually you would use nil for SPEC, so that a clone of the currently
+effective filter spec is used, and then you would set only some of
+the available filters using PARAMS.
+
+  (transient-define-suffix my-forge-list-assigned-issues ()
+    \"List issues of the current repository that are assigned to me.\"
+    :description \"issues\"
+    (declare (interactive-only nil))
+    (interactive)
+    (when-let* ((repo (forge-get-repository :tracked))
+                (me (ghub--username repo)))
+      (forge-topics-setup-buffer repo nil :type \\='issue :assignee me)
+      (transient-setup \\='forge-topics-menu)))
+
+Grep Forge for more examples.
+
+Alternatively you can use `forge-insert-topics' list topics in, e.g.,
+the Magit status buffer."
+  (let* ((global (or (plist-get params :global)
+                     (and spec (oref spec global))))
+         (repo (or repo
+                   (and (not global)
+                        (if-let* ((topic (forge-topic-at-point))
+                                  (repo (forge-get-repository topic)))
+                            repo
+                          (forge-get-repository :tracked?)))))
+         (dir (or (and repo (forge-get-worktree repo)) "/"))
+         (buf (forge-topics-buffer-name repo))
+         (buf (or (get-buffer buf) buf))
+         (spec (cond (spec (clone spec))
+                     ((and (bufferp buf)
+                           (buffer-local-value 'forge--buffer-topics-spec buf)))
+                     ((clone forge-list-buffer-default-topic-filters)))))
+    (while-let ((key (pop params)))
+      (eieio-oset spec (intern (substring (symbol-name key) 1)) (pop params)))
+    (unless (oref spec type)
+      (oset spec type 'topic))
+    (forge--cast-topics-spec-state spec)
+    (unless (or repo global)
+      (error "Cannot determine repository"))
+    (magit-setup-buffer #'forge-topics-mode nil
+      :buffer    (get-buffer-create buf)
+      :directory dir
+      (forge-buffer-repository     (and repo (oref repo id)))
+      (forge--buffer-topics-spec   spec)
+      (forge-buffer-unassociated-p global))))
+
+(defun forge-topics-refresh-buffer ()
+  (magit-set-header-line-format (forge-topics-buffer-desc))
+  (let ((topics (forge--list-topics
+                 forge--buffer-topics-spec
+                 (forge-get-repository :tracked?))))
+    (magit-insert-section (topicbuf)
+      (cond
+        ((not topics)
+         (insert "No matching topics\n"))
+        ((not (oref forge--buffer-topics-spec grouped))
+         (dolist (topic topics)
+           (forge--insert-topic topic 5)))
+        ((pcase-dolist (`(,_ . ,topics)
+                        (seq-group-by (##oref % repository) topics))
+           (let ((repo (forge-get-repository (car topics))))
+             (magit-insert-section (forge-repo repo)
+               (magit-insert-heading
+                 (concat (propertize (oref repo slug)
+                                     'font-lock-face 'bold)
+                         (format " (%s)" (length topics))))
+               (dolist (topic topics)
+                 (forge--insert-topic topic 5))))))))))
+
+(defun forge-topics-buffer-desc ()
+  (capitalize (concat (symbol-name (oref forge--buffer-topics-spec type)) "s")))
+
+(defun forge-topics-buffer-name (&optional repo)
+  (if repo
+      (format "*forge-topics: %s*" (oref repo slug))
+    "*forge-topics*"))
+
+;;; Commands
+;;;; Menu
+
+;;;###autoload(autoload 'forge-topics-menu "forge-topics" nil t)
+(transient-define-prefix forge-topics-menu ()
+  "Control list of topics displayed in the current buffer."
+  :transient-suffix t
+  :transient-non-suffix #'transient--do-call
+  :transient-switch-frame nil
+  :refresh-suffixes t
+  :environment #'forge--menu-environment
+  :column-widths forge--topic-menus-column-widths
+  [:hide always ("q" forge-menu-quit-list)]
+  [forge--topic-menus-group
+   ["State"
+    ("a" forge-topics-filter-active)
+    ("o" forge-topics-filter-state-open)
+    ("r" forge-topics-filter-state-realized)
+    ("e" forge-topics-filter-state-expunged)
+    ("U" forge-topics-filter-state-unplanned)
+    ("O" forge-topics-filter-state-outdated)
+    ("D" forge-topics-filter-state-duplicate)]
+   ["Status"
+    ("i" forge-topics-filter-status-inbox)
+    ("u" forge-topics-filter-status-unread)
+    ("p" forge-topics-filter-status-pending)
+    ("d" forge-topics-filter-status-done)]
+   ["Type"
+    ("t t" forge-topics-all-types)
+    ("t d" forge-topics-filter-discussions)
+    ("t i" forge-topics-filter-issues)
+    ("t p" forge-topics-filter-pullreqs)]]
+  [forge--lists-group
+   ["Filter                                      "
+    ("-c" forge-topics-filter-category)
+    ("-m" forge-topics-filter-milestone)
+    ("-l" forge-topics-filter-labels)
+    ("-x" forge-topics-filter-marks)
+    ("-A" forge-topics-filter-author)
+    ("-a" forge-topics-filter-assignee)
+    ("-r" forge-topics-filter-reviewer)
+    ("-s" forge-topics-filter-saved)]
+   ["Display"
+    ("-O" forge-topics-set-order)
+    ("-L" forge-topics-set-limit)
+    ("-F" forge-topics-ungroup)
+    ("-G" forge-topics-group)
+    ("-S" forge-toggle-display-in-status-buffer)
+    ("-H" forge-toggle-topic-legend)]]
+  [forge--topic-legend-group]
+  (interactive)
+  (cond ((derived-mode-p 'forge-topics-mode 'magit-status-mode)
+         (transient-setup 'forge-topics-menu))
+        ((derived-mode-p 'forge-notifications-mode)
+         (setq this-command 'forge-notifications-menu)
+         (transient-setup 'forge-notifications-menu))
+        ((forge-list-topics))))
+
+(transient-augment-suffix forge-topics-menu
+  :transient #'transient--do-replace
+  :if-not-derived '(forge-notifications-mode forge-repository-list-mode)
+  :inapt-if (##eq (oref transient--prefix command) 'forge-topics-menu)
+  :inapt-face 'forge-suffix-active)
+
+(defvar-local forge--quit-keep-topic-menu nil)
+
+(defun forge-menu-quit-list ()
+  "From a transient menu, quit the list buffer and the menu.
+
+If quitting the list buffer causes another topic, repository list or
+notification list buffer to become current in the selected window,
+then display the respective menu, otherwise display no menu."
+  (interactive)
+  (let ((keep-topic-menu forge--quit-keep-topic-menu))
+    (when (derived-mode-p 'forge-topic-mode
+                          'forge-topics-mode
+                          'forge-repository-list-mode
+                          'forge-notifications-mode)
+      (kill-local-variable 'forge--quit-keep-topic-menu)
+      (quit-window))
+    (cond ((derived-mode-p 'forge-topic-mode)
+           (setq transient--exitp 'replace)
+           (transient-setup (setq this-command 'forge-topic-menu)))
+          ((derived-mode-p 'forge-topics-mode)
+           (unless keep-topic-menu
+             (setq transient--exitp 'replace)
+             (transient-setup (setq this-command 'forge-topics-menu))))
+          ((derived-mode-p 'forge-repository-list-mode)
+           (setq transient--exitp 'replace)
+           (transient-setup (setq this-command 'forge-repositories-menu)))
+          ((derived-mode-p 'forge-notifications-mode)
+           (setq transient--exitp 'replace)
+           (transient-setup (setq this-command 'forge-notifications-menu)))
+          (t
+           (setq transient--exitp t)
+           (transient--pre-exit)
+           (transient--stack-zap)))))
+
+;;;; List
+
+;;;###autoload(autoload 'forge-list-topics "forge-topics" nil t)
+(transient-define-suffix forge-list-topics (&optional repo)
+  "List topics of the current repository."
+  :description "topics"
+  :inapt-if (lambda () (or (not (forge-get-repository :tracked?))
+                      (and (eq major-mode 'forge-topics-mode)
+                           (not (oref forge--buffer-topics-spec global)))))
+  :inapt-face (lambda () (if (not (forge-get-repository :tracked?))
+                        'transient-inapt-suffix
+                      'forge-suffix-active))
+  (declare (interactive-only nil))
+  (interactive)
+  (forge-topics-setup-buffer repo)
+  (transient-setup 'forge-topics-menu))
+
+;;;###autoload(autoload 'forge-list-discussions "forge-topics" nil t)
+(transient-define-suffix forge-list-discussions (&optional repo)
+  "List discussions of the current repository."
+  :description "discussions"
+  (declare (interactive-only nil))
+  (interactive)
+  (forge-topics-setup-buffer repo nil :type 'discussion)
+  (transient-setup 'forge-topics-menu))
+
+;;;###autoload(autoload 'forge-list-issues "forge-topics" nil t)
+(transient-define-suffix forge-list-issues (&optional repo)
+  "List issues of the current repository."
+  :description "issues"
+  (declare (interactive-only nil))
+  (interactive)
+  (forge-topics-setup-buffer repo nil :type 'issue)
+  (transient-setup 'forge-topics-menu))
+
+;;;###autoload(autoload 'forge-list-pullreqs "forge-topics" nil t)
+(transient-define-suffix forge-list-pullreqs (&optional repo)
+  "List pull-requests of the current repository."
+  :description "pull-requests"
+  (declare (interactive-only nil))
+  (interactive)
+  (forge-topics-setup-buffer repo nil :type 'pullreq)
+  (transient-setup 'forge-topics-menu))
+
+;;;###autoload(autoload 'forge-list-global-topics "forge-topics" nil t)
+(transient-define-suffix forge-list-global-topics (&optional repo)
+  "List topics across all tracked repository."
+  :description "topics"
+  :inapt-if (lambda () (and (eq major-mode 'forge-topics-mode)
+                       (oref forge--buffer-topics-spec global)))
+  :inapt-face 'forge-suffix-active
+  (declare (interactive-only nil))
+  (interactive)
+  (forge-topics-setup-buffer repo nil :global t)
+  (transient-setup 'forge-topics-menu))
+
+;;;###autoload(autoload 'forge-list-global-issues "forge-topics" nil t)
+(transient-define-suffix forge-list-global-issues (&optional repo)
+  "List issues across all tracked repository."
+  :description "issues"
+  (declare (interactive-only nil))
+  (interactive)
+  (forge-topics-setup-buffer repo nil :global t :type 'issue)
+  (transient-setup 'forge-topics-menu))
+
+;;;###autoload(autoload 'forge-list-global-pullreqs "forge-topics" nil t)
+(transient-define-suffix forge-list-global-pullreqs (&optional repo)
+  "List pull-requests across all tracked repository."
+  :description "pull-requests"
+  (declare (interactive-only nil))
+  (interactive)
+  (forge-topics-setup-buffer repo nil :global t :type 'pullreq)
+  (transient-setup 'forge-topics-menu))
+
+;;;; Type
+
+(defclass forge--topics-filter-type-command (transient-suffix)
+  ((type :initarg :type)
+   (definition
+    :initform (lambda (&optional repo)
+                (interactive)
+                (oset forge--buffer-topics-spec type
+                      (oref (transient-suffix-object) type))
+                (forge--cast-topics-spec-state forge--buffer-topics-spec)
+                (forge-refresh-buffer)))
+   (inapt-face :initform 'forge-suffix-active)
+   (inapt-if
+    :initform (lambda ()
+                (eq (oref forge--buffer-topics-spec type)
+                    (oref (transient-suffix-object) type))))))
+
+(transient-define-suffix forge-topics-all-types ()
+  :class 'forge--topics-filter-type-command :type 'topic
+  :description "topics")
+
+(transient-define-suffix forge-topics-filter-discussions ()
+  "List discussions of the current repository."
+  :class 'forge--topics-filter-type-command :type 'discussion
+  :description "discussions")
+
+(transient-define-suffix forge-topics-filter-issues ()
+  "List issues of the current repository."
+  :class 'forge--topics-filter-type-command :type 'issue
+  :description "issues")
+
+(transient-define-suffix forge-topics-filter-pullreqs ()
+  "List pull-requests of the current repository."
+  :class 'forge--topics-filter-type-command :type 'pullreq
+  :description "pull-requests")
+
+;;;; Active
+
+(transient-define-suffix forge-topics-filter-active ()
+  "Limit topic list to active topics."
+  :description "active"
+  :face (##and (oref forge--buffer-topics-spec active) 'forge-suffix-active)
+  (interactive)
+  (oset forge--buffer-topics-spec active
+        (not (oref forge--buffer-topics-spec active)))
+  (forge-refresh-buffer))
+
+;;;; State
+
+(defclass forge--topics-filter-state-command (transient-suffix)
+  ((state :initarg :state)
+   (definition
+    :initform (lambda ()
+                (interactive)
+                (let ((want (oref (transient-suffix-object) state))
+                      (spec forge--buffer-topics-spec))
+                  (cond ((and (eq want 'open)
+                              (oref spec active))
+                         (oset spec active nil)
+                         (oset spec state want))
+                        ((equal (oref spec state) want)
+                         (oset spec state nil))
+                        (t
+                         (oset spec active nil)
+                         (oset spec state want))))
+                (forge-refresh-buffer)))
+   (description
+    :initform (lambda (suffix)
+                (symbol-name (oref suffix state))))
+   (face
+    :initform (lambda (suffix)
+                (let ((want   (oref suffix state))
+                      (have   (oref forge--buffer-topics-spec state))
+                      (active (oref forge--buffer-topics-spec active)))
+                  (cond ((and (not active)
+                              (equal have want))
+                         'forge-suffix-active)
+                        ((and (or active
+                                  (eq have 'open))
+                              (eq want 'open))
+                         (if (eq have want)
+                             'forge-suffix-active-and-implied
+                           'forge-suffix-implied))
+                        ((and (memq want '(unplanned duplicate outdated))
+                              (equal have
+                                     '(unplanned duplicate outdated rejected))
+                              (not active))
+                         'forge-suffix-implied)))))))
+
+(transient-define-suffix forge-topics-filter-state-open ()
+  "Limit topic list to open topics."
+  :class 'forge--topics-filter-state-command
+  :state 'open)
+
+(transient-define-suffix forge-topics-filter-state-realized ()
+  "Limit topic list to realized topics.
+Realized topics include:
+- completed discussions,
+- completed issues, and
+- merged pull-requests."
+  :class 'forge--topics-filter-state-command
+  :state '(completed merged)
+  :description (lambda ()
+                 (pcase (oref forge--buffer-topics-spec type)
+                   ('discussion "completed")
+                   ('issue      "completed")
+                   ('pullreq    "merged")
+                   ('topic      "realized"))))
+
+(transient-define-suffix forge-topics-filter-state-expunged ()
+  "Limit topic list to expunged topics.
+Expunged topics include:
+- discussions closed as outdated,
+- discussions closed as duplicates,
+- issues closed as unplanned,
+- issues closed as duplicates, and
+- pull-requests closed without merging."
+  :class 'forge--topics-filter-state-command
+  :state '(unplanned duplicate outdated rejected)
+  :description (lambda ()
+                 (pcase (oref forge--buffer-topics-spec type)
+                   ('discussion "expunged")
+                   ('issue      "expunged")
+                   ('pullreq    "rejected")
+                   ('topic      "expunged"))))
+
+(transient-define-suffix forge-topics-filter-state-unplanned ()
+  "Limit topic list to issues closed as unplanned."
+  :class 'forge--topics-filter-state-command
+  :state 'unplanned
+  :description "  unplanned"
+  :if (##eq (oref forge--buffer-topics-spec type) 'issue))
+
+(transient-define-suffix forge-topics-filter-state-outdated ()
+  "Limit topic list to discussions closed as outdated."
+  :class 'forge--topics-filter-state-command
+  :state 'outdated
+  :description "  outdated"
+  :if (##eq (oref forge--buffer-topics-spec type) 'discussion))
+
+(transient-define-suffix forge-topics-filter-state-duplicate ()
+  "Limit topic list to discussions and issues closed as duplicates."
+  :class 'forge--topics-filter-state-command
+  :state 'duplicate
+  :description "  duplicate"
+  :if (##memq (oref forge--buffer-topics-spec type) '(discussion issue)))
+
+;;;; Status
+
+(defclass forge--topics-filter-status-command (transient-suffix)
+  ((status :initarg :status)
+   (definition
+    :initform (lambda ()
+                (interactive)
+                (let* ((want   (oref (transient-suffix-object) status))
+                       (spec   forge--buffer-topics-spec)
+                       (have   (oref spec status))
+                       (active (oref spec active)))
+                  (cond (active
+                         (oset spec active nil)
+                         (oset spec status want))
+                        ((eq have want)
+                         (oset spec status nil))
+                        ((oset spec status want))))
+                (forge-refresh-buffer)))
+   (description
+    :initform (lambda (suffix) (symbol-name (oref suffix status))))
+   (face
+    :initform (lambda (suffix)
+                (let ((want   (oref suffix status))
+                      (have   (oref forge--buffer-topics-spec status))
+                      (active (oref forge--buffer-topics-spec active)))
+                  (cond ((and (not active)
+                              (equal have want))
+                         'forge-suffix-active)
+                        ((and (or active
+                                  (eq have 'inbox))
+                              (memq want '(inbox unread pending)))
+                         (if (eq have want)
+                             'forge-suffix-active-and-implied
+                           'forge-suffix-implied))))))))
+
+(transient-define-suffix forge-topics-filter-status-inbox ()
+  "Limit topic list to unread and pending topics."
+  :class 'forge--topics-filter-status-command :status 'inbox)
+
+(transient-define-suffix forge-topics-filter-status-unread ()
+  "Limit topic list to unread topics."
+  :class 'forge--topics-filter-status-command :status 'unread)
+
+(transient-define-suffix forge-topics-filter-status-pending ()
+  "Limit topic list to pending topics."
+  :class 'forge--topics-filter-status-command :status 'pending)
+
+(transient-define-suffix forge-topics-filter-status-done ()
+  "Limit topic list to done topics."
+  :class 'forge--topics-filter-status-command :status 'done)
+
+;;;; Filter
+
+(defclass forge--topics-filter-command (transient-suffix)
+  ((slot        :initarg :slot)
+   (reader      :initarg :reader)
+   (formatter   :initarg :formatter :initform nil)
+   (definition
+    :initform (lambda ()
+                (interactive)
+                (with-slots (slot reader) (transient-suffix-object)
+                  (eieio-oset forge--buffer-topics-spec slot
+                              (if (eieio-oref forge--buffer-topics-spec slot)
+                                  nil
+                                (funcall reader)))
+                  (forge-refresh-buffer))))
+   (description
+    :initform (lambda (obj)
+                (with-slots (slot formatter) obj
+                  (let ((value (eieio-oref forge--buffer-topics-spec slot)))
+                    (if value
+                        (format "%s %s" slot
+                                (if formatter
+                                    (funcall formatter value)
+                                  (propertize (format "%s" value)
+                                              'face 'forge-suffix-active)))
+                      (format "%s" slot))))))))
+
+(cl-defmethod initialize-instance :after
+  ((obj forge--topics-filter-command) &optional _slots)
+  (unless (slot-boundp obj 'reader)
+    (oset obj reader (intern (format "forge-read-topic-%s" (oref obj slot))))))
+
+(transient-define-suffix forge-topics-filter-category ()
+  "Read a category and limit discussions to that category."
+  :class 'forge--topics-filter-command
+  :slot 'category
+  :formatter (##propertize % 'face 'forge-topic-label))
+
+(transient-define-suffix forge-topics-filter-milestone ()
+  "Read a milestone and limit topic list to topics with that milestone."
+  :class 'forge--topics-filter-command
+  :slot 'milestone
+  :formatter (##propertize % 'face 'forge-topic-label))
+
+(transient-define-suffix forge-topics-filter-labels ()
+  "Read labels and limit topic list to topics with one of these labels."
+  :class 'forge--topics-filter-command
+  :slot 'labels
+  :formatter (##and % (forge--format-labels % " ")))
+
+(transient-define-suffix forge-topics-filter-marks ()
+  "Read marks and limit topic list to topics with one of these marks."
+  :class 'forge--topics-filter-command
+  :slot 'marks
+  :formatter (##and % (forge--format-marks % " ")))
+
+(transient-define-suffix forge-topics-filter-saved ()
+  "Toggle whether to limit topic list to saved topics."
+  :class 'forge--topics-filter-command
+  :slot 'saved
+  :reader #'always
+  :description
+  (##forge--format-boolean 'saved "saved" forge--buffer-topics-spec))
+
+(transient-define-suffix forge-topics-filter-author ()
+  "Read an author and limit topic list to topics created by that author."
+  :class 'forge--topics-filter-command
+  :slot 'author
+  :reader (##forge--read-filter-by-user "Author"))
+
+(transient-define-suffix forge-topics-filter-assignee ()
+  "Read an assignee and limit topic list to topics assignee to that person."
+  :class 'forge--topics-filter-command
+  :slot 'assignee
+  :reader (##forge--read-filter-by-user "Assignee"))
+
+(transient-define-suffix forge-topics-filter-reviewer ()
+  "Read a reviewer and limit topic list to reviews requested from that person."
+  :class 'forge--topics-filter-command
+  :slot 'reviewer
+  :reader (##forge--read-filter-by-user "Reviewer"))
+
+(defun forge--read-filter-by-user (prompt)
+  (let* ((repo (forge-get-repository :tracked))
+         (choices (mapcar #'cadr (oref repo assignees))))
+    (magit-completing-read prompt choices)))
+
+;;;; Display
+
+(transient-define-suffix forge-topics-set-order (order)
+  "Select order used to display topics in topic list."
+  :description
+  (lambda ()
+    (format "order by %s"
+            (propertize (format "%s" (oref forge--buffer-topics-spec order))
+                        'face 'bold)))
+  (interactive
+    (list (magit-read-char-case "Order by: " t
+            (?n "[n]ewest"            'newest)
+            (?o "[o]ldest"            'oldest)
+            (?r "[r]ecently updated"  'recently-updated)
+            (?a "[a]nciently updated" 'anciently-updated))))
+  (oset forge--buffer-topics-spec order order)
+  (forge-refresh-buffer))
+
+(transient-define-suffix forge-topics-set-limit (limit)
+  "Read maximal number of topics to be displayed in topic list."
+  :description
+  (lambda ()
+    (if-let ((limit (oref forge--buffer-topics-spec limit)))
+        (format "limit to %s" (propertize (format "%s" limit) 'face 'bold))
+      "no limit"))
+  (interactive (list (read-number "Limit number (0 for no limit): ")))
+  (oset forge--buffer-topics-spec limit (if (zerop limit) nil limit))
+  (forge-refresh-buffer))
+
+(transient-define-suffix forge-topics-group ()
+  "Group topics by repository."
+  :description "group by repo"
+  :if (##oref forge--buffer-topics-spec global)
+  :inapt-if (##oref forge--buffer-topics-spec grouped)
+  :inapt-face 'forge-suffix-active
+  (interactive)
+  (oset forge--buffer-topics-spec grouped t)
+  (forge-refresh-buffer))
+
+(transient-define-suffix forge-topics-ungroup ()
+  "Show a flat topic list."
+  :description "single list"
+  :if (##oref forge--buffer-topics-spec global)
+  :inapt-if-not (##oref forge--buffer-topics-spec grouped)
+  :inapt-face 'forge-suffix-active
+  (interactive)
+  (oset forge--buffer-topics-spec grouped nil)
+  (forge-refresh-buffer))
+
+;;; _
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"          . "cond-let--and$")
+;;   ("thread$"       . "cond-let--thread$")
+;;   ("when$"         . "cond-let--when$")
+;;   ("and-let*"      . "cond-let--and-let*")
+;;   ("and-let"       . "cond-let--and-let")
+;;   ("if-let*"       . "cond-let--if-let*")
+;;   ("if-let"        . "cond-let--if-let")
+;;   ("when-let*"     . "cond-let--when-let*")
+;;   ("when-let"      . "cond-let--when-let")
+;;   ("while-let*"    . "cond-let--while-let*")
+;;   ("while-let"     . "cond-let--while-let"))
+;; End:
+(provide 'forge-topics)
+;;; forge-topics.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topics.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topics.elc
new file mode 100644
index 0000000..cda061e
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge-topics.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge.el b/emacs/.emacs.d/elpa/forge-20260815.1911/forge.el
new file mode 100644
index 0000000..42d411a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge.el
@@ -0,0 +1,189 @@
+;;; forge.el --- Access Git forges from Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.forge@jonas.bernoulli.dev>
+;; Homepage: https://github.com/magit/forge
+;; Keywords: git tools vc
+
+;; Package-Version: 20260815.1911
+;; Package-Revision: 71e182e40186
+;; Package-Requires: (
+;;     (emacs        "29.1")
+;;     (compat       "31.0")
+;;     (closql        "2.4")
+;;     (cond-let      "1.1")
+;;     (emacsql       "4.4")
+;;     (ghub          "5.3")
+;;     (llama         "1.0")
+;;     (magit         "4.7")
+;;     (markdown-mode "2.8")
+;;     (transient     "0.13")
+;;     (yaml          "1.2"))
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Work with Git forges, such as Github and Gitlab, from the comfort
+;; of Magit and the rest of Emacs.
+
+;; The schema of the database has not been finalized yet.  Until that
+;; has happened it will occasionally have to be discarded.  For now
+;; the database does not contain any information that cannot simply
+;; be fetched again.
+
+;;; Code:
+
+(require 'magit)
+
+(require 'forge-db)
+(require 'forge-core)
+
+(provide 'forge)
+
+(require 'forge-repo)
+(require 'forge-post)
+(require 'forge-topic)
+(require 'forge-discussion)
+(require 'forge-issue)
+(require 'forge-pullreq)
+(require 'forge-revnote)
+(require 'forge-notify)
+
+(require 'forge-forgejo)
+(require 'forge-github)
+(require 'forge-gitlab)
+(require 'forge-gitea)
+(require 'forge-gogs)
+(require 'forge-bitbucket)
+(require 'forge-semi)
+
+(require 'forge-commands)
+(require 'forge-topics)
+(require 'forge-repos)
+
+;;; Add Sections
+
+(defvar forge-add-default-sections t
+  "Whether to add Forge's sections to `magit-status-sections-hook'.
+
+If you want to disable this, then you must set this to nil before
+`forge' is loaded.")
+
+(when forge-add-default-sections
+  (magit-add-section-hook 'magit-status-sections-hook #'forge-insert-pullreqs    nil t)
+  (magit-add-section-hook 'magit-status-sections-hook #'forge-insert-issues      nil t)
+  (magit-add-section-hook 'magit-status-sections-hook #'forge-insert-discussions nil t))
+
+;;; Add Bindings
+
+;;;###autoload
+(defvar forge-add-default-bindings t
+  "Whether to add Forge's bindings to various Magit keymaps.
+
+If you want to disable this, then you must set this to nil before
+`magit' is loaded.  If you do it before `forge' but after `magit'
+is loaded, then `magit-mode-map' ends up being modified anyway.")
+
+;;;###autoload
+(with-eval-after-load 'magit-mode
+  (when forge-add-default-bindings
+    (keymap-set magit-mode-map "'" #'forge-dispatch)
+    (keymap-set magit-mode-map "N" #'forge-dispatch)
+    (keymap-set magit-mode-map "<remap> <magit-browse-thing>"
+                #'forge-browse)
+    (keymap-set magit-mode-map "<remap> <magit-copy-thing>"
+                #'forge-copy-url-at-point-as-kill)))
+
+;;;###autoload
+(with-eval-after-load 'magit-repos
+  (when forge-add-default-bindings
+    (keymap-set magit-repolist-mode-map "N" #'forge-dispatch)))
+
+;;;###autoload
+(with-eval-after-load 'git-commit
+  (when forge-add-default-bindings
+    (keymap-set git-commit-mode-map "C-c C-v" #'forge-visit-topic)))
+
+(when forge-add-default-bindings
+  (keymap-set magit-commit-section-map "C-c C-v" #'forge-visit-topic)
+  (keymap-set magit-branch-section-map "C-c C-v" #'forge-visit-topic)
+
+  (transient-insert-suffix 'magit-dispatch "o"
+    '("N" "Forge" forge-dispatch))
+
+  (transient-append-suffix 'magit-fetch "m" '("n" forge-pull))
+  (transient-append-suffix 'magit-fetch "n" '("N" forge-pull-notifications))
+
+  (transient-append-suffix 'magit-pull  "m" '("n" forge-pull))
+  (transient-append-suffix 'magit-pull  "n" '("N" forge-pull-notifications))
+
+  (transient-insert-suffix 'magit-push "p"
+    '("N" forge-push-to-unnamed-pullreq))
+
+  (transient-append-suffix 'magit-branch "w"
+    '("f" "pull-request" forge-checkout-pullreq))
+  (transient-append-suffix 'magit-branch "W"
+    '("F" "from pull-request" forge-branch-pullreq))
+
+  (transient-append-suffix 'magit-remote "a"
+    '("f" "Fork" forge-fork))
+  (transient-insert-suffix 'magit-remote "d u"
+    '("d s" "Set default branch" forge-set-default-branch))
+  (transient-append-suffix 'magit-remote "d u"
+    '("d r" "Rename default branch" forge-rename-default-branch))
+
+  (transient-append-suffix 'magit-worktree "c"
+    '("n" "pull-request worktree" forge-checkout-worktree))
+
+  (transient-append-suffix 'magit-status-jump "w"
+    '("Np" "Pull requests" forge-jump-to-pullreqs))
+  (transient-append-suffix 'magit-status-jump "Np"
+    '("Ni" "Issues" forge-jump-to-issues))
+
+  (transient-append-suffix 'magit-merge "a"
+    '(7 "M" "Merge using API" forge-merge)))
+
+;;; Startup Asserts
+
+(defconst forge--minimal-git "2.25.0")
+
+(defun forge-startup-asserts ()
+  (let ((version (ignore-errors (magit-git-version))))
+    (when (and version (version< version forge--minimal-git))
+      (display-warning 'magit (format "\
+Forge requires Git >= %s, you are using %s.
+
+If this comes as a surprise to you, because you do actually have
+a newer version installed, then that probably means that the
+older version happens to appear earlier on the `$PATH'.  If you
+always start Emacs from a shell, then that can be fixed in the
+shell's init file.  If you start Emacs by clicking on an icon,
+or using some sort of application launcher, then you probably
+have to adjust the environment as seen by graphical interface.
+For X11 something like ~/.xinitrc should work.
+
+If you use Tramp to work inside remote Git repositories, then you
+have to make sure a suitable Git is used on the remote machines
+too.\n" forge--minimal-git version) :error))))
+
+(if after-init-time
+    (forge-startup-asserts)
+  (add-hook 'after-init-hook #'forge-startup-asserts t))
+
+;;; forge.el ends here
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge.elc b/emacs/.emacs.d/elpa/forge-20260815.1911/forge.elc
new file mode 100644
index 0000000..151ee2c
Binary files /dev/null and b/emacs/.emacs.d/elpa/forge-20260815.1911/forge.elc differ
diff --git a/emacs/.emacs.d/elpa/forge-20260815.1911/forge.info b/emacs/.emacs.d/elpa/forge-20260815.1911/forge.info
new file mode 100644
index 0000000..34cb40b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/forge-20260815.1911/forge.info
@@ -0,0 +1,2049 @@
+This is forge.info, produced by makeinfo version 7.1.1 from forge.texi.
+
+     Copyright (C) 2018-2026 Jonas Bernoulli
+     <emacs.forge@jonas.bernoulli.dev>
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Forge: (forge).       Access Git Forges from Magit.
+END-INFO-DIR-ENTRY
+
+
+File: forge.info,  Node: Top,  Next: Introduction,  Up: (dir)
+
+Forge User and Developer Manual
+*******************************
+
+Forge allows you to work with Git forges, currently Github and Gitlab,
+from the comfort of Magit and Emacs.
+
+This manual is for Forge version 0.6.8.
+
+     Copyright (C) 2018-2026 Jonas Bernoulli
+     <emacs.forge@jonas.bernoulli.dev>
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+* Menu:
+
+* Introduction::
+* Initial Setup::
+* Initial Pull::
+* Getting Started::
+* Lists and Menus::
+* Visiting Topics::
+* Creating Topics and Posts::
+* Editing Topics::
+* Pulling::
+* Branching::
+* Miscellaneous Commands::
+* Miscellaneous Options::
+* How Forge Detection Works::
+* Supported Forges and Hosts::
+* FAQ::
+* Keystroke Index::
+* Function and Command Index::
+* Variable Index::
+
+-- The Detailed Node Listing --
+
+Initial Setup
+
+* Setup for Github.com: Setup for Githubcom.
+* Setup for Another Github Instance::
+* Setup for Gitlab.com: Setup for Gitlabcom.
+* Setup for Another Gitlab Instance::
+* Setup a Partially Supported Host::
+
+Supported Forges and Hosts
+
+* Supported Forges::
+* Partially Supported Forges::
+* Supported Semi-Forges::
+
+FAQ
+
+* ‘error in process filter HTTP Error 502, "Bad gateway"’: error in process filter HTTP Error 502 "Bad gateway".
+
+
+
+File: forge.info,  Node: Introduction,  Next: Initial Setup,  Prev: Top,  Up: Top
+
+1 Introduction
+**************
+
+Forge allows you to work with Git forges, currently Github and Gitlab,
+from the comfort of Magit and Emacs.
+
+   Forge fetches issues, pull-requests and other data using the forge's
+API and stores the retrieved information in a local database.
+Additionally it fetches pull-request references using Git.
+
+
+File: forge.info,  Node: Initial Setup,  Next: Initial Pull,  Prev: Introduction,  Up: Top
+
+2 Initial Setup
+***************
+
+Please first do the common setup below and then carefully follow the
+instructions for your forge instance.  Once you have completed the
+setup, you can start tracking repositories (see *note Initial Pull::).
+
+   If you run into difficulties during setup or the initial pull, then
+please also see *note How Forge Detection Works:: and *note
+(ghub)Getting Started::.
+
+* Menu:
+
+* Setup for Github.com: Setup for Githubcom.
+* Setup for Another Github Instance::
+* Setup for Gitlab.com: Setup for Gitlabcom.
+* Setup for Another Gitlab Instance::
+* Setup a Partially Supported Host::
+
+Common Setup
+============
+
+Loading Magit doesn't cause Forge to be loaded automatically.  Adding
+something like this to your init file takes care of that:
+
+     (with-eval-after-load 'magit
+       (require 'forge))
+
+Or if you use ‘use-package’:
+
+     (use-package forge
+       :after magit)
+
+   By default Forge adds some bindings to Magit keymaps and menus, and
+some sections to Magit buffers.  If you would like to prevent that, you
+have to set ‘forge-add-default-bindings’ and/or
+‘forge-add-default-sections’ to ‘nil’, before ‘magit’ (not just ‘forge’)
+is loaded.
+
+
+File: forge.info,  Node: Setup for Githubcom,  Next: Setup for Another Github Instance,  Up: Initial Setup
+
+2.1 Setup for Github.com
+========================
+
+Set your Username
+-----------------
+
+First inform Forge about your <https://github.com> username:
+
+     git config --global github.user USERNAME
+
+   If you need to identify as another user in a particular repository,
+then you have to set that variable locally:
+
+     cd /path/to/repo
+     git config --local github.user USERNAME
+
+Create and Store an Access Token
+--------------------------------
+
+Visit <https://github.com/settings/tokens> in a browser to generate a
+new "classic" token using the ‘repo’, ‘user’ and ‘read:org’ scopes.  Do
+not close the browser window just yet, because the token will only be
+shown once.
+
+   The built-in Auth-Source (*note (auth)Top::) package is used to store
+the token generated in the previous step.  The ‘auth-sources’ variable
+controls how and where Auth-Source keeps its secrets.  The default value
+is a list of three files: ‘("~/.authinfo" "~/.authinfo.gpg"
+"~/.netrc")’, but that can lead to confusing behavior, so you should
+make sure that only one of these files exists, and then you should also
+adjust the value of the variable to only ever use that file, for
+example:
+
+     (setq auth-sources '("~/.authinfo"))
+
+   In ‘~/.authinfo’ secrets are stored in plain text.  If you don't want
+that, then you should use the encrypted ‘~/.authinfo.gpg’ instead:
+
+     (setq auth-sources '("~/.authinfo.gpg"))
+
+   Make sure you put one of these forms in your init file *and* to
+evaluate it in the current Emacs instance as well, by placing the cursor
+after the final closing parenthesis and typing ‘C-x C-e’
+(‘eval-last-sexp’).
+
+   Next add a line like the following to the chosen file:
+
+     machine api.github.com login USERNAME^forge password TOKEN
+
+   • The value of ‘machine’ must be ‘api.github.com’.  Variations of
+     this won't work.
+
+   • USERNAME must be the same as the value used for the ‘github.user’
+     Git variable above.  You *must* append ‘^forge’ to that, without
+     any space in between.
+
+   • TOKEN is the token you generated earlier.
+
+   Finish by typing ‘M-x auth-source-forget-all-cached RET’.  If you
+don't do this, then Auth-Source may fail to look up the token.
+
+
+File: forge.info,  Node: Setup for Another Github Instance,  Next: Setup for Gitlabcom,  Prev: Setup for Githubcom,  Up: Initial Setup
+
+2.2 Setup for Another Github Instance
+=====================================
+
+Before you setup a Github instance that is not <https://github.com>,
+please first setup the latter.  The setup for <https://github.com> is
+easier, and if that works but the setup for the other Github instance
+fails, then we can tentatively narrow the issue down to the parts that
+differ between <https://github.com> and other instances.
+
+Tell Forge about the Instance
+-----------------------------
+
+While Forge knows about <https://github.com>, it does not know about
+your other Github instances.  Forge instances are configured using the
+option ‘forge-alist’ (also see its docstring).  The entry for
+<https://github.com> in that variable looks like this:
+
+   While Forge knows about <https://github.com> out of the box, for all
+other instances you have to add a new entry to option ‘forge-alist’.
+
+   The entry for <https://github.com> looks like this:
+
+     ("github.com"                       ; GITHOST
+      "api.github.com"                   ; APIHOST
+      "github.com"                       ; WEBHOST and INSTANCE-ID
+       forge-github-repository)          ; CLASS
+
+   You have to add an entry for your instance.  For example, assuming
+your company uses <https://example.com>, this might be correct:
+
+     (push '("example.com"               ; GITHOST
+             "api.example.com"           ; APIHOST
+             "example.com"               ; WEBHOST and INSTANCE-ID
+             forge-github-repository)    ; CLASS
+           forge-alist)
+
+   Your company may use hostnames that follow a different format.  You
+should be able to easily determine and verify GITHOST and WEBHOST, but
+determining APIHOST is more difficult; you might have to ask a coworker.
+APIHOST could be something like ‘api.example.com’, but it could also be
+something like ‘example.com/api’.
+
+   If the REST API's end point is ‘/v3’ and the GraphQL API's end point
+is ‘/graphql’, then use something like ‘example.com/v3’ as APIHOST.
+This is a historic accident.  See
+<https://github.com/magit/forge/issues/174>.
+
+   We will use INSTANCE-ID (aka WEBHOST) and APIHOST below.
+
+Set your Username
+-----------------
+
+Inform Forge about your username for the Github instance in question:
+
+     git config --global github.INSTANCE-ID.user USERNAME
+
+   So if INSTANCE-ID is ‘example.com’ and USERNAME is ‘tarsius’ then
+use:
+
+     git config --global github.example.com.user tarsius
+
+Create and Store an Access Token
+--------------------------------
+
+Visit your forge in a browser.  Follow a link to "Settings", from there
+to "Developer settings", from there to "Personal access tokens", and
+finally to "Tokens (classic)".  On that page generate a new token using
+the ‘repo’, ‘user’ and ‘read:org’ scopes.  Do not close the browser
+window just yet, because the token will only be shown once.
+
+   The built-in Auth-Source (*note (auth)Top::) package is used to store
+the token generated in the previous step.  The ‘auth-sources’ variable
+controls how and where Auth-Source keeps its secrets.  The default value
+is a list of three files: ‘("~/.authinfo" "~/.authinfo.gpg"
+"~/.netrc")’, but that can lead to confusing behavior, so you should
+make sure that only one of these files exists, and then you should also
+adjust the value of the variable to only ever use that file, for
+example:
+
+     (setq auth-sources '("~/.authinfo"))
+
+   In ‘~/.authinfo’ secrets are stored in plain text.  If you don't want
+that, then you should use the encrypted ‘~/.authinfo.gpg’ instead:
+
+     (setq auth-sources '("~/.authinfo.gpg"))
+
+   Make sure you put one of these forms in your init file *and* to
+evaluate it in the current Emacs instance as well, by placing the cursor
+after the final closing parenthesis and typing ‘C-x C-e’
+(‘eval-last-sexp’).
+
+   Next add a line like the following to the chosen file:
+
+     machine APIHOST login USERNAME^forge password TOKEN
+
+   • APIHOST must be the same as the second element of the entry we
+     added to ‘forge-alist’.  In the above example that would be
+     ‘api.example.com’.  Do *not* instead use GITHOST or INSTANCE-ID
+     (aka WEBHOST).
+
+   • USERNAME must be the same username you used above as the value of
+     the Git variable.  You *must* append ‘^forge’ to that, without any
+     space in between.
+
+   • TOKEN is the token you generated earlier.
+
+   Finish by typing ‘M-x auth-source-forget-all-cached RET’.  If you
+don't do this, then Auth-Source may fail to look up the token.
+
+
+File: forge.info,  Node: Setup for Gitlabcom,  Next: Setup for Another Gitlab Instance,  Prev: Setup for Another Github Instance,  Up: Initial Setup
+
+2.3 Setup for Gitlab.com
+========================
+
+Set your Username
+-----------------
+
+First inform Forge about your <https://gitlab.com> username:
+
+     git config --global gitlab.user USERNAME
+
+   If you need to identify as another user in a particular repository,
+then you have to set that variable locally:
+
+     cd /path/to/repo
+     git config --local gitlab.user USERNAME
+
+Create and Store an Access Token
+--------------------------------
+
+Visit <https://gitlab.com/-/user_settings/personal_access_tokens> in a
+browser to generate a new token using the ‘api’, ‘read_api’ and
+‘read_user’ scopes.  Do not close the browser window just yet, because
+the token will only be shown once.
+
+   The built-in Auth-Source (*note (auth)Top::) package is used to store
+the token generated in the previous step.  The ‘auth-sources’ variable
+controls how and where Auth-Source keeps its secrets.  The default value
+is a list of three files: ‘("~/.authinfo" "~/.authinfo.gpg"
+"~/.netrc")’, but that can lead to confusing behavior, so you should
+make sure that only one of these files exists, and then you should also
+adjust the value of the variable to only ever use that file, for
+example:
+
+     (setq auth-sources '("~/.authinfo"))
+
+   In ‘~/.authinfo’ secrets are stored in plain text.  If you don't want
+that, then you should use the encrypted ‘~/.authinfo.gpg’ instead:
+
+     (setq auth-sources '("~/.authinfo.gpg"))
+
+   Make sure you put one of these forms in your init file *and* to
+evaluate it in the current Emacs instance as well, by placing the cursor
+after the final closing parenthesis and typing ‘C-x C-e’
+(‘eval-last-sexp’).
+
+   Next add a line like the following to the chosen file:
+
+     machine gitlab.com login USERNAME^forge password TOKEN
+
+   • The value of ‘machine’ should be ‘gitlab.com’.  For historic
+     reasons ‘gitlab.com’ is also supported.
+
+   • Note that if you instead use the ‘auth-source-pass’ backend, then
+     you *must* use ‘gitlab.com’ as ‘host’.
+
+   • USERNAME must be the same as the value used for the ‘gitlab.user’
+     Git variable above.  You *must* append ‘^forge’ to that, without
+     any space in between.
+
+   • TOKEN is the token you generated earlier.
+
+   Finish by typing ‘M-x auth-source-forget-all-cached RET’.  If you
+don't do this, then Auth-Source may fail to look up the token.
+
+
+File: forge.info,  Node: Setup for Another Gitlab Instance,  Next: Setup a Partially Supported Host,  Prev: Setup for Gitlabcom,  Up: Initial Setup
+
+2.4 Setup for Another Gitlab Instance
+=====================================
+
+Before you setup a Gitlab instance that is not <https://gitlab.com>,
+please first setup the latter.  The setup for <https://gitlab.com> is
+easier, and if that works but the setup for the other Gitlab instance
+fails, then we can tentatively narrow the issue down to the parts that
+differ between <https://gitlab.com> and other instances.
+
+Tell Forge about the Instance
+-----------------------------
+
+While Forge knows about <https://gitlab.com> (and a few other well-known
+instances) out of the box, for other instances you have to add a new
+entry to option ‘forge-alist’.
+
+   The entry for <https://gitlab.com> looks like this:
+
+     ("gitlab.com"                       ; GITHOST
+      "gitlab.com/api/v4"                ; APIHOST
+      "gitlab.com"                       ; WEBHOST and INSTANCE-ID
+      forge-gitlab-repository)           ; CLASS
+
+   For historic reasons, APIHOST actually has to be a host followed by a
+path.
+
+   You have to add an entry for your instance.  For example, assuming
+your company/organisation uses <https://example.com>, this might be
+correct:
+
+     (push '("example.com"               ; GITHOST
+             "example.com/api/v4"        ; APIHOST
+             "example.com"               ; WEBHOST and INSTANCE-ID
+             forge-gitlab-repository)    ; CLASS
+           forge-alist)
+
+   Your company may use hostnames that follow a different format.  You
+should be able to easily determine and verify GITHOST and WEBHOST, but
+determining APIHOST is more difficult; you might have to ask a
+colleague.
+
+   We will use INSTANCE-ID (aka WEBHOST) and APIHOST below.
+
+Set your Username
+-----------------
+
+Inform Forge about your username for the Gitlab instance in question:
+
+     git config --global gitlab.INSTANCE-ID.user USERNAME
+
+   So if INSTANCE-ID is ‘example.com’ and USERNAME is ‘tarsius’ then
+use:
+
+     git config --global gitlab.example.com.user tarsius
+
+Create and Store an Access Token
+--------------------------------
+
+Visit your forge in a browser.  Follow a link to "Preferences" and from
+there to "Access Tokens".  On that page generate a new "Personal access
+token" using the ‘api’, ‘read_api’ and ‘read_user’ scopes.  Do not close
+the browser window just yet, because the token will only be shown once.
+
+   The built-in Auth-Source (*note (auth)Top::) package is used to store
+the token generated in the previous step.  The ‘auth-sources’ variable
+controls how and where Auth-Source keeps its secrets.  The default value
+is a list of three files: ‘("~/.authinfo" "~/.authinfo.gpg"
+"~/.netrc")’, but that can lead to confusing behavior, so you should
+make sure that only one of these files exists, and then you should also
+adjust the value of the variable to only ever use that file, for
+example:
+
+     (setq auth-sources '("~/.authinfo"))
+
+   In ‘~/.authinfo’ secrets are stored in plain text.  If you don't want
+that, then you should use the encrypted ‘~/.authinfo.gpg’ instead:
+
+     (setq auth-sources '("~/.authinfo.gpg"))
+
+   Make sure you put one of these forms in your init file *and* to
+evaluate it in the current Emacs instance as well, by placing the cursor
+after the final closing parenthesis and typing ‘C-x C-e’
+(‘eval-last-sexp’).
+
+   Next add a line like the following to the chosen file:
+
+     machine APIHOST login USERNAME^forge password TOKEN
+
+   • APIHOST must be either the same as the second element of the entry
+     we added to ‘forge-alist’, or that element with the path suffix
+     removed.  For example, if the APIHOST, specified in an
+     ‘forge-alist’ entry, is ‘example.com/api/v4’, then you can use
+     ‘example.com/api/v4’ or ‘example.com’.
+
+     Historically only the former was supported, but that was a design
+     mistake, which we are now stuck with, and using just ‘example.com’
+     as APIHOST in ‘~/.authsource’ is now recommended.  For the time
+     being, in ‘forge-alist’ you must still always use
+     ‘example.com/api/v4’ as APIHOST.
+
+     If you instead use the ‘auth-source-pass’ backend, then you *must*
+     use ‘example.com’ as the value of ‘host’.  Using
+     ‘example.com/api/v4’ does not work with that backend.
+
+   • USERNAME must be the same username you used above as the value of
+     the Git variable.  You *must* append ‘^forge’ to that, without any
+     space in between.
+
+   • TOKEN is the token you generated earlier.
+
+   Finish by typing ‘M-x auth-source-forget-all-cached RET’.  If you
+don't do this, then Auth-Source may fail to look up the token.
+
+
+File: forge.info,  Node: Setup a Partially Supported Host,  Prev: Setup for Another Gitlab Instance,  Up: Initial Setup
+
+2.5 Setup a Partially Supported Host
+====================================
+
+Forge currently only supports the Github and Gitlab APIs.
+
+   It does however partially support a few additional forge types (see
+*note Partially Supported Forges::) and other lighter weight software
+used to host Git repositories, which also provide a web interfaces (see
+*note Supported Semi-Forges::).  Forge doesn't use the APIs of such
+forges, but registering the host and adding repositories to the local
+database at least enables the use of commands such as ‘forge-browse’.
+
+Tell Forge about the Instance
+-----------------------------
+
+A few hosts, which use partially supported forge types, are available
+out-of-the-box, because they have an entry in the default value of
+option ‘forge-alist’ (also see its docstring).  For example, the entry
+for <https://codeberg.org> in that variable looks like this:
+
+     ("codeberg.org"                     ; GITHOST
+      "codeberg.org/api/v1"              ; APIHOST
+      "codeberg.org"                     ; WEBHOST and INSTANCE-ID
+      forge-gitea-repository)            ; CLASS
+
+   To be able to add repositories from a, so far, unknown forge instance
+to your local database, you have to add an entry for that instance to
+‘forge-alist’.  For example, assuming you use another Gitea instance,
+hosted at <https://example.com>, this might be correct:
+
+     (push '("example.com"               ; GITHOST
+             "example.com/api/v1"        ; APIHOST
+             "example.com"               ; WEBHOST and INSTANCE-ID
+             forge-gitea-repository)     ; CLASS
+           forge-alist)
+
+   Look at ‘forge-alist’ entries of other hosts using the same forge
+type as the instance you are configuring, to see what format *might* be
+appropriate.  You should be able to easily determine and verify GITHOST
+and WEBHOST, but determining APIHOST is more difficult; you might have
+to ask a colleague.  APIHOST could be something like
+‘example.com/api/vi’, but it could also be something like
+‘api.example.com’.
+
+Add Support for Additional Forge Types
+--------------------------------------
+
+For each fully or partially supported forge type, Forge defines at least
+a class.  The following example is taken from ‘forge-semi.el’:
+
+     (defclass forge-cgit-repository (forge-noapi-repository)
+       ((commit-url-format :initform "https://%h/%p.git/commit/?id=%r")
+        (branch-url-format :initform "https://%h/%p.git/log/?h=%r")
+        (remote-url-format :initform "https://%h/%p.git/about"))
+       "Cgit from https://git.zx2c4.com/cgit/about.
+     Different hosts use different url schemata, so we need multiple
+     classes.  See their definitions in \"forge-semi.el\".")
+
+   Once you add a host using that class to ‘forge-alist’ and then a
+repository from that host to the local database, you will be able to use
+commands such as ‘forge-browse-branch’ (but not much more).
+
+   If you want to add a repository from another host, which happens to
+use another software or another URL schemata, then you might have to
+define an additional class first.  See ‘forge-semi.el’ for simple
+examples and grep for ‘defclass forge-.*-repository’ for more complex
+ones.
+
+
+File: forge.info,  Node: Initial Pull,  Next: Getting Started,  Prev: Initial Setup,  Up: Top
+
+3 Initial Pull
+**************
+
+To start using Forge in a certain repository, visit the Magit status
+buffer for that repository and type ‘N / a’ (‘forge-add-repository’).
+You are given a choice to pull all topics, all topics that were updated
+after a certain date, or only individual topics.
+
+   Beside adding the repository to the database, this also adds a new
+value to the Git variable ‘remote.<remote>.fetch’, which causes all
+pull-request refs (‘+refs/pull/*/head:refs/pullreqs/*’ for Github) to be
+fetched by Git.
+
+   Note that it is possible to use the same command to add any
+repository from a supported forge to the database, without cloning the
+Git repository first.
+
+   The initial fetch can take a while but most of the work is done
+asynchronously.  Storing the information in the database is done
+synchronously though, so there can be a noticeable hang at the end.
+Subsequent fetches are much faster.
+
+   Fetching issues from Github is much faster than fetching from other
+forges, because making a handful of GraphQL requests, is much faster
+than making hundreds of REST requests.
+
+
+File: forge.info,  Node: Getting Started,  Next: Lists and Menus,  Prev: Initial Pull,  Up: Top
+
+4 Getting Started
+*****************
+
+Much like Git stores information in a local repository and does not
+require a constant internet connection, Forge retrieves additional
+information using a forge's API and stores that in a local database.
+
+   Forge's equivalent of ‘git clone’ is ‘forge-add-repository’, which
+has to be run, before most of Forges features become available in the
+local clone of a Git repository.
+
+‘N / a’ (‘forge-add-repository’)
+     This command guides the user through the process of adding a
+     repository to the local database.
+
+     Note that it is possible to add a repository to the local database,
+     without pulling all the data, which is useful if you just want to
+     create a single issue or pull-request in a repository, but are not
+     interested in existing topics, e.g., because you do not regularly
+     contribute to that repository.
+
+     Also note that you can add a repository to the local database, even
+     if no local Git clone exists.
+
+   Like with Git, you have to explicitly pull remote changes, at your
+leisure, using ‘forge-pull’.
+
+‘f n’ (‘forge-pull’)
+‘N f f’
+     This command uses a forge's API to fetch topics and other
+     information about the current repository, and stores the fetched
+     information in the database.
+
+     If the current repository isn't being tracked in the local database
+     yet, then this command pivots to behave like
+     ‘forge-add-repository’.
+
+   Forge adds two additional sections to Magit's status buffer, which
+list open and/or pending issues and pull-requests.  Typing ‘RET’, while
+the cursor is on a topic section, shows more information about that
+topic in a separate buffer.  Typing ‘RET’ on a topic list section, shows
+that list in a separate buffer, where you can apply different filters.
+
+   The other main entry point to the functionality provided by Forge is
+the ‘forge-dispatch’ menu.
+
+‘N’ (‘forge-dispatch’)
+     This prefix command is available in all Magit buffers and provides
+     access to most of the available Forge commands.  See the following
+     sections for information about the available commands.
+
+
+File: forge.info,  Node: Lists and Menus,  Next: Visiting Topics,  Prev: Getting Started,  Up: Top
+
+5 Lists and Menus
+*****************
+
+Topics are listed in two sections in Magit's status buffer, but can also
+be listed in dedicated buffers.  Likewise individual topics can be
+visited in separate buffers.  In both cases this can be done by placing
+the cursor on the respective section in the status buffer and typing
+‘RET’, or by invoking the appropriate command from Forge's main menu, on
+‘N’ (‘forge-dispatch’).
+
+   List commands and corresponding menu commands exist for topics,
+notifications and repositories, but there isn't always an exclusive
+mapping from menu to buffer.  The main menu (‘forge-dispatch’), the
+configuration menu (‘forge-configure’), the menu which controls the
+current topic or the topic at point (‘forge-topic-menu’), and the menu
+which controls the topics listed in the current buffer
+(‘forge-topics-menu’), are useful in more than one major mode.
+
+   All of these menus feature bindings to directly switch to the other
+appropriate menus.  So it is enough to remember that ‘N’ always brings
+up the dispatch menu; you can always navigate to another menu from
+there.
+
+   ‘C-c C-c’ brings up the most appropriate menu for the current buffer.
+In Magit's status buffer the most appropriate menu is Magit's own
+dispatch menu (‘magit-dispatch’), so here the quickest way to invoke
+Forge's dispatch menu is ‘N’.  Even in Magit's status buffer, when the
+cursor is an individual topic or on a topic list section, ‘C-c C-c’
+opens the respective menu (‘forge-topics-menu’ or ‘forge-topic-menu’).
+
+   The following sections describe most of the available menu and list
+commands.  For ‘forge-topic-menu’, see *note Editing Topics::.
+
+Dispatch and configuration menus
+================================
+
+‘N’ (‘forge-dispatch’)
+     This prefix menu command is available in all Magit buffers and
+     provides access to most of the available Forge commands.  See the
+     following sections for information about the available commands.
+
+‘N m c’ (‘forge-configure’)
+     This command displays a menu used to configure the current
+     repository and some global settings as well.
+
+Topic menu and list commands
+============================
+
+‘N m f’ (‘forge-topics-menu’)
+‘C-c C-c [in topics list buffer/section]’
+     This command displays a menu used to control the list of topics
+     displayed in the current buffer.
+
+     Note that this command can not only be used in buffers dedicated to
+     listing topics, but also in Magit's status buffer.
+
+‘N l t’ (‘forge-list-topics’)
+     This command lists the current repository's issues in a separate
+     buffer.  If the list buffer already exists, this command only
+     ensures that all types of topics are listed.  If any other filters
+     are in effect, they are left intact.
+
+‘<RET> [on "Issues" status section]’ (‘forge-list-issues’)
+     This command lists the current repository's issues in a separate
+     buffer.  If the list buffer already exists, this command limits the
+     list to issues.  If any other filters are in effect, they are left
+     intact.
+
+‘<RET> [on "Pull requests" status section]’ (‘forge-list-pullreqs’)
+     This command lists the current repository's pull-requests in a
+     separate buffer.  If the list buffer already exists, this command
+     limits the list to pull-requests.  If any other filters are in
+     effect, they are left intact.
+
+‘N l g’ (‘forge-list-global-topics’)
+     This command lists topics across all tracked repository.  If the
+     list buffer already exists, filters except for the type filter are
+     left in effect.
+
+ -- Command: forge-list-global-issues
+     This command lists issues across all tracked repository.  If the
+     list buffer already exists, filters except for the type filter are
+     left in effect.
+
+ -- Command: forge-list-global-pullreqs
+     This command lists pull-requests across all tracked repository.  If
+     the list buffer already exists, filters except for the type filter
+     are in effect.
+
+Notification menu and list commands
+===================================
+
+‘N m n’ (‘forge-notifications-menu’)
+‘C-c C-c [in notifications list buffer]’
+     This command displays a menu used to control the list of
+     notifications displayed in the current buffer.
+
+‘N l n’ (‘forge-list-notifications’)
+     This command lists all notifications for all forges in a separate
+     buffer.
+
+Repository menu and list commands
+=================================
+
+‘N m r’ (‘forge-repositories-menu’)
+‘C-c C-c [in repositories list buffer]’
+     This command displays a menu used to control the list of
+     repositories displayed in the current buffer.
+
+‘N l r’ (‘forge-list-repositories’)
+     This command lists all known repositories in a separate buffer.
+     Here "known" means that an entry exists in the local database.
+
+‘<RET> [on repository]’ (‘forge-visit-this-repository’)
+     This commands visits the repository at point in a separate buffer.
+
+‘o [in forge-repositories-menu]’ (‘forge-list-owned-repositories’)
+     This command lists all known repositories that belong to the user
+     in a separate buffer.  Here "known" means that an entry exists in
+     the local database.  Only Github is supported for now.
+
+   The below options controls which repositories are considered to be
+owned by the user.  They are additionally used by ‘forge-fork’.
+
+ -- User Option: forge-owned-accounts
+     This is an alist of accounts that are owned by you.  This should
+     include your username as well as any organization that you own.
+
+     Each element has the form ‘(ACCOUNT . PLIST)’.  The following
+     properties are currently being used:
+
+        • ‘remote-name’ The default name suggested by ‘forge-fork’ for a
+          fork created within this account.  If unspecified, then the
+          name of the account is used.
+
+     Example: ‘(("tarsius") ("emacsmirror" remote-name "mirror"))’.
+
+ -- User Option: forge-owned-ignored
+     This is a list of repository names that are considered to not be
+     owned by you, even though they would have been considered to be
+     owned by you based on ‘forge-owned-accounts’.
+
+Exiting menus and lists
+=======================
+
+To exit a menu, type ‘C-g’.  If the menu was invoked from another menu
+and that menu is useful in the current buffer, then that menu becomes
+active again.  If that happens and you actually want to quit all menus,
+then just type ‘C-g’ again.  You can also directly exit all menus by
+using ‘C-q’, instead of ‘C-g’.
+
+   Type ‘q’ to quit not only the menu, but also the list or topic detail
+buffer.  That binding is also available when no menu is active, in which
+case it will simply quit the buffer.  When invoked from a menu, then
+this binding may return to another list buffer, in which case some menu
+may also remain active.
+
+Default topic filters
+=====================
+
+ -- User Option: forge-list-buffer-default-topic-filters
+     This option specifies the filters initially used to limit topics
+     listed in topic list buffers.
+
+ -- User Option: forge-status-buffer-default-topic-filters
+     This option specifies the filters initially used to limit topics
+     listed in Magit status buffers.
+
+     Also see *note Topic sections in Magit status buffers::.
+
+Topic sections in Magit status buffers
+======================================
+
+Forge arranges for certain issues and pull-requests to be list in Magit
+status buffers, by adding the following functions to
+‘magit-status-sections-hook’.
+
+   Which topics are listed initially is customizable using option
+‘forge-status-buffer-default-topic-filters’ and can be changed
+temporarily for the current buffer, using ‘N m f’ (‘forge-topics-menu’).
+
+ -- Function: forge-insert-discussions
+     This function inserts a list of discussions, by default a list of
+     "active" discussions.
+
+ -- Function: forge-insert-issues
+     This function inserts a list of issues, by default a list of
+     "active" issues.
+
+ -- Function: forge-insert-pullreqs
+     This function inserts a list of pull-requests, by default a list of
+     "active" pull-requests.
+
+   Forge used to provide additional functions to insert hard-coded topic
+subsets, but they were removed in favor of the more flexible approach
+described above.  If you miss the removed sections, you can use the new
+‘forge-insert-topics’ helper function to define your own section
+inserter functions.  See its docstring for more information.
+
+   If you don't want any topic list sections to be displayed in Magit
+status buffers, set ‘forge-add-default-sections’ to ‘nil’ before ‘magit’
+is loaded.
+
+
+File: forge.info,  Node: Visiting Topics,  Next: Creating Topics and Posts,  Prev: Lists and Menus,  Up: Top
+
+6 Visiting Topics
+*****************
+
+The commands, accessible from ‘forge-topic-menu’ (on ‘C-return’), act on
+the topic at point; so this menu is useful in buffers dedicated to
+listing topics and notifications (which correspond to topics), but also
+in the status buffer (which also lists topics).  In buffers dedicated to
+showing details about a single topic, these commands act on that topic;
+so this menu can be used there too.
+
+   To switch to this menu from another menu use ‘m s’.  If the cursor is
+on a topic or the current buffer visits a topic.
+
+   To display details about a topic in a separate buffer and at the same
+time display the topic menu, invoke ‘forge-topic-menu’ with a prefix
+argument, i.e., ‘C-u RET’.
+
+‘<RET> [on topic]’ (‘forge-visit-this-topic’)
+     This commands visits the topic at point in a separate buffer.  When
+     invoked with a prefix argument then it not only visits the topic in
+     a separate buffer, it at the same time displays
+
+‘N v t’ (‘forge-visit-topic’)
+‘N v i’ (‘forge-visit-issue’)
+‘N v p’ (‘forge-visit-pullreq’)
+     These commands read a topic, issue or pull-request and visit it in
+     a separate buffer.
+
+‘N v u’ (‘forge-visit-topic-from-url’)
+     This commands reads an URL and visits the corresponding topic.
+     Normally users would yank that URL into the minibuffer, after
+     having copied it from an email or a browser's address bar.
+
+     This command is disabled in the menu by default.
+
+‘C-c C-o’ (‘forge-browse’)
+‘o [on topic in topic list]’ (‘forge-browse-this-topic’)
+‘o [on repository in repository list]’ (‘forge-browse-this-repository’)
+     These commands visit the topic, issue(s), pull-request(s), post,
+     branch, commit, remote, repository or blob at point in a browser.
+
+ -- Command: forge-browse-commit
+ -- Command: forge-browse-branch
+ -- Command: forge-browse-repository
+‘N b t’ (‘forge-browse-topic’)
+‘N b i’ (‘forge-browse-issue’)
+‘N b p’ (‘forge-browse-pullreq’)
+‘N b r’ (‘forge-browse-remote’)
+‘N b I’ (‘forge-browse-issues’)
+‘N b P’ (‘forge-browse-pullreqs’)
+     These commands read a topic, issue(s), pull-request(s), branch,
+     commit, remote or repository, and open it in a browser.
+
+ -- Command: forge-browse-commit
+     This command visit a blob in a browser.
+
+     When invoked from a blob- or file-visiting buffer, visit that blob
+     without prompting.  If the region is active, try to jump to the
+     marked line or lines, and highlight them in the browser.  To what
+     extend that is possible depends on the forge.  When the region is
+     not active just visit the blob, without trying to jump to the
+     current line.  When jumping to a line, always use a commit hash as
+     part of the URL.  From a file in the worktree with no active
+     region, instead use the branch name as part of the URL, unless a
+     prefix argument is used.
+
+     When invoked from a Dired buffer, visit the blob at point without
+     prompting.  If a prefix argument is used, the commit hash is
+     included in the URL.
+
+     When invoked from any other buffer, prompt the user for a branch or
+     commit, and for a file.
+
+
+File: forge.info,  Node: Creating Topics and Posts,  Next: Editing Topics,  Prev: Visiting Topics,  Up: Top
+
+7 Creating Topics and Posts
+***************************
+
+We call both issues and pull-requests "topics".  The contributions to
+the conversation are called "posts".  The initial topic description is
+also called a post.
+
+   Creating a new topic or post and editing an existing post work
+similarly to now creating a new commit or editing the message of an
+existing commit works in Magit.  In both cases the message has to be
+written in a separate buffer and then the process has to be finished or
+canceled using a separate command.  The following commands drop you into
+such a buffer.
+
+‘N c p’ (‘forge-create-pullreq’)
+‘C-c C-n [on "Pull requests" section]’
+     This command creates a new pull-request for the current repository.
+
+‘N c i’ (‘forge-create-issue’)
+‘C-c C-n [on "Issues" section]’
+     This command creates a new issue for the current repository.
+
+‘C-c C-n’ (‘forge-create-post’)
+‘C-c C-r’
+     This command creates a new post on an existing topic.  It is only
+     available in buffers that visit an existing topic.
+
+     If the region is active and marks part of an existing post, then
+     that part of the post is quoted.  When a prefix argument is used,
+     then the complete post, which point is currently on, is quoted.
+
+   The following commands are available in buffers used to edit posts:
+
+‘C-c C-c’ (‘forge-post-submit’)
+     This command submits the post that is being edited in the current
+     buffer.
+
+‘C-c C-k’ (‘forge-post-cancel’)
+     This command cancels the post that is being edited in the current
+     buffer.
+
+‘C-c C-e’ (‘forge-post-dispatch’)
+     This prefix command features the above two commands as suffixes,
+     and when creating a pull-request also the following command.  More
+     suffix commands will likely be added in the future.
+
+‘C-c C-e d’ (‘forge-post-toggle-draft’)
+     This command toggles whether the pull-request being created is a
+     draft.
+
+
+File: forge.info,  Node: Editing Topics,  Next: Pulling,  Prev: Creating Topics and Posts,  Up: Top
+
+8 Editing Topics
+****************
+
+Many details about a topic can be changed from the buffer that visits
+that topic, but also from topic lists, if the cursor is placed on the
+topic to be edited.  However, to edit the posts on a topic, the topic
+has to be visited in its own buffer.
+
+‘C-c C-e [on a post section]’ (‘forge-edit-post’)
+     This command visits an existing post in a separate buffer, it can
+     only be invoked from a topic buffer, when the cursor is on the post
+     to be edited.
+
+     Editing an existing post is similar to creating a new post, as
+     described in the previous section.
+
+‘C-c C-k [on a post section]’ (‘forge-delete-comment’)
+     This command deletes the post the cursor is on.  The initial
+     message that was written when the topic was created, cannot be
+     deleted, only replies to that.
+
+‘N m s’ (‘forge-topic-menu’)
+‘C-<return> [on a topic section]’
+     This command displays a menu used to edit details about the topic
+     the cursor is on or that is being visited in the current buffer.
+     E.g., it can be used to change the status of the topic or to apply
+     labels to it.  Additionally it features a few commands that act on
+     that topic.
+
+     With a prefix argument, this additionally visits the topic.
+
+   Details about a topic, such as its status and labels, can
+alternatively be edited by visiting the topic in its own buffer,
+navigating to the header that displays the detail and then typing ‘C-c
+C-e’.  This older approach is still available, but it is usually much
+faster to use the menu.
+
+
+File: forge.info,  Node: Pulling,  Next: Branching,  Prev: Editing Topics,  Up: Top
+
+9 Pulling
+*********
+
+The commands that fetch forge data are available the Forge's main menu
+(‘forge-dispatch’ on ‘N’) and from the same menu (‘magit-fetch’ on ‘f’)
+that is used to fetch Git data.  If ‘magit-pull-or-fetch’ is non-‘nil’,
+then they are also available from the ‘magit-pull’ menu (on ‘F’).
+
+   With Git you have to explicitly pull Git data to make it available in
+the local repository.  Forge works the same; you have to explicitly pull
+to pull data using the forge's API and storing in the local database.
+This is less disruptive, more reliable, familiar and easier to
+understand than if Forge pulled by itself at random intervals.  It might
+however mean that you occasionally invoke a command expecting the most
+recent data to be available and then have to abort and pull first.  The
+same can happen with Git, e.g., you might attempt to merge a branch that
+you know exists but haven't actually pulled yet.
+
+‘f n’ (‘forge-pull’)
+‘N f f’
+     This command uses a forge's API to fetch topics and other
+     information about the current repository and stores the fetched
+     information in the database.
+
+     If the current repository is still untracked locally, or the
+     current repository cannot be determined, this command instead
+     behaves like ‘forge-add-repository’, i.e., it adds the repository
+     to the database and then performs the initial pull.
+
+‘f N’ (‘forge-pull-notifications’)
+‘N f n’
+     This command uses a forge's API to fetch all notifications from
+     that forge, including, but not limited to, the notifications for
+     the current repository.
+
+     Fetching notifications fetches associated topics even for
+     repositories that you have not yet explicitly added to the local
+     database.
+
+‘N f t’ (‘forge-pull-topic’)
+     This command uses a forge's API to fetch a single pull-request and
+     stores it in the database.  This is useful if you chose to not
+     fetch all topics when you added the repository using
+     ‘forge-add-repository’.
+
+
+File: forge.info,  Node: Branching,  Next: Miscellaneous Commands,  Prev: Pulling,  Up: Top
+
+10 Branching
+************
+
+Forge provides commands for creating and checking out a new branch or
+work tree from a pull-request.  These commands are available from the
+same transient prefix commands as the suffix commands, used to create
+and check out branches and work trees in a more generic fashion
+(‘magit-branch’ on ‘b’ and ‘magit-worktree’ on ‘%’).
+
+‘b F’ (‘forge-branch-pullreq’)
+     This command creates and configures a new branch from a
+     pull-request, creating and configuring a new remote if necessary.
+
+     The name of the local branch is the same as the name of the remote
+     branch that you are being asked to merge, unless the contributor
+     could not be bothered to properly name the branch before opening
+     the pull-request.  The most likely such case is when you are being
+     asked to merge something like "fork/master" into "origin/master".
+     In such cases the local branch will be named "pr-N", where ‘N’ is
+     the pull-request number.
+
+     These variables are always set by this command:
+
+        • ‘branch.<name>.pullRequest’ is set to the pull-request number.
+        • ‘branch.<name>.pullRequestRemote’ is set to the remote on
+          which the pull-request branch is located.
+        • ‘branch.<name>.pushRemote’ is set to the same remote as
+          ‘branch.<name>.pullRequestRemote’ if that is possible,
+          otherwise it is set to the upstream remote.
+        • ‘branch.<name>.description’ is set to the pull-request title.
+        • ‘branch.<name>.rebase’ is set to ‘true’ because there should
+          be no merge commits among the commits in a pull-request.
+
+     This command also configures the upstream and the push-remote of
+     the local branch that it creates.
+
+     The branch against which the pull-request was opened is always used
+     as the upstream.  This makes it easy to see what commits you are
+     being asked to merge in the section titled something like "Unmerged
+     into origin/master".
+
+     Like for other commands that create a branch, it depends on the
+     option ‘magit-branch-prefer-remote-upstream’ whether the remote
+     branch itself or the respective local branch is used as the
+     upstream, so this section may also be titled, e.g., "Unmerged into
+     master".
+
+     When necessary and possible, the remote pull-request branch is
+     configured to be used as the push-target.  This makes it easy to
+     see what further changes the contributor has made since you last
+     reviewed their changes in the section titled something like
+     "Unpulled from origin/new-feature" or "Unpulled from
+     fork/new-feature".
+
+        • If the pull-request branch is located in the upstream
+          repository, then you probably have set ‘remote.pushDefault’ to
+          that repository.  However some users like to set that variable
+          to their personal fork, even if they have push access to the
+          upstream, so ‘branch.<name>.pushRemote’ is set anyway.
+
+        • The push-remote is configured using
+          ‘branch.<name>.pushRemote’, even if the used value is
+          identical to that of ‘remote.pushDefault’, just in case you
+          change the value of the latter later on.  Additionally the
+          variable ‘branch.<name>.pullRequestRemote’ is set to the
+          remote on which the pull-request branch is located.
+
+        • If the pull-request branch is located on the contributor's
+          fork, then you, as a maintainer of the upstream repository,
+          are usually allowed to push to that branch anyway.  (However,
+          the contributor could explicitly disallow this, but in my
+          experience that rarely happens.)
+
+        • As mentioned above, contributors sometimes fail to use a
+          dedicated branch for their pull-requests and this command is
+          thus forced to make up a branch name such as "pr-313".
+
+          Usually a maintainer would use
+          ‘magit-push-current-to-pushremote’ (on ‘p’) to push to the
+          contributor's pull-request branch on their fork.  For a branch
+          named "pr-313" that does not work.  (Instead of pushing to
+          "fork/main", it would unsuccessfully attempt to create a new
+          branch "pr-313" on the fork.)  In such situations the
+          ‘magit-push’ menu offers an alternative command for pushing to
+          the pull-request branch: ‘forge-push-to-unnamed-pullreq’ (on
+          ‘N’).
+
+‘b f’ (‘forge-checkout-pullreq’)
+     This command creates and configures a new branch from a
+     pull-request the same way ‘forge-branch-pullreq’ does.
+     Additionally it checks out the new branch.
+
+‘Z n’ (‘forge-checkout-worktree’)
+     This command creates and configures a new branch from a
+     pull-request the same way ‘forge-branch-pullreq’ does.
+     Additionally it checks out the new branch, using a new working
+     tree.
+
+ -- User Option: forge-checkout-worktree-read-directory-function
+     This function is used by ‘forge-checkout-worktree’, to read the new
+     worktree directory where it checks out the pull-request.  It takes
+     the pull-request as the only argument and must return a directory.
+
+   When you delete a pull-request branch, which was created using one of
+the above three commands, then ‘magit-branch-delete’ usually offers to
+also delete the corresponding remote.  It does not offer to delete a
+remote if (1) the remote is the upstream remote, and/or (2) if other
+branches are being fetched from the remote.
+
+   Note that you have to delete the local branch (e.g., "feature") for
+this to work.  If you delete the tracking branch (e.g., "fork/feature"),
+then the remote is never removed.
+
+
+File: forge.info,  Node: Miscellaneous Commands,  Next: Miscellaneous Options,  Prev: Branching,  Up: Top
+
+11 Miscellaneous Commands
+*************************
+
+‘N M’ (‘forge-merge’)
+‘m M [if enabled]’
+     This command merges the current pull-request using the forge's API.
+     If there is no current pull-request or with a prefix argument, then
+     it reads a pull-request to visit instead.
+
+     The "merge method" to be used is read from the user.
+
+     Use of this command is discouraged.  Unless the remote repository
+     is configured to disallow that, you should instead merge locally
+     and then push the target branch.  Forges detect that you have done
+     that and respond by automatically marking the pull-request as
+     merged.
+
+‘N c f’ (‘forge-fork’)
+     This command adds an additional remote to the current repository.
+     The remote can either point at an existing repository or one that
+     has to be created first by forking it to an account the user has
+     access to.
+
+     Currently this only supports Github and Gitlab.
+
+     With a prefix argument, fork all branches, not just the default
+     branch.  On Gitlab it is not possible to fork only the default.
+
+‘N - H’ (‘forge-toggle-topic-legend’)
+     This command toggle whether to show a legend for faces used in
+     topic menus and lists.
+
+‘N - S’ (‘forge-toggle-display-in-status-buffer’)
+     This command toggles whether any topics are displayed in the
+     current Magit status buffer.
+
+‘C-c C-w’ (‘forge-copy-url-at-point-as-kill’)
+     This command copies the url for the topic, issue(s),
+     pull-request(s), post, branch, commit, remote or repository to the
+     kill-ring.
+
+     This determines the url the same way as ‘forge-browse’ does, but
+     then adds it to the kill-ring, instead of visiting it in a browser.
+
+‘M b r’ (‘forge-rename-default-branch’)
+     This command rename the default branch to a new name read from the
+     user.
+
+     This changes the name on the upstream remotely and locally, and
+     update the upstream remotes of local branches accordingly.
+
+ -- Command: forge-add-pullreq-refspec
+     This command configures Git to fetch all pull-requests.
+
+     This is done by adding ‘+refs/pull/*/head:refs/pullreqs/*’ to the
+     value of ‘remote.REMOTE.fetch’, where REMOTE is the upstream
+     remote.
+
+ -- Command: forge-add-user-repositories
+     This command reads a host and a username from the user and adds all
+     of that user's repositories on that host to the local database.
+
+     This may take a while.  Only Github is supported at the moment.
+
+ -- Command: forge-add-organization-repositories
+     This command reads a host and an organization from the user and
+     adds all the organization's repositories on that host to the local
+     database.
+
+     This may take a while.  Only Github is supported at the moment.
+
+ -- Command: forge-remove-repository
+     This command reads a repository and removes it from the local
+     database.
+
+ -- Command: forge-remove-topic-locally
+     This command reads a topic and removes it from the local database.
+     When the region marks multiple topics, then offer to remove them
+     all.
+
+     The topic is not removed from the forge and, if it is later
+     modified, then it will be added to the database again when fetching
+     all topics.
+
+     This is useful for users who only fetch individual topics and want
+     to remove the topics they are no longer interested in.  This can
+     also be used to remove topics locally, which have already been
+     removed on the forge (the service).  Forge (the package) cannot
+     automatically detect when that happens, because given how the APIs
+     work, this would be too expensive.
+
+ -- Command: forge-reset-database
+     This command moves the current database file to the trash and
+     creates a new empty database.
+
+     This is useful after the database's table schemata have changed,
+     which will happen a few times while the Forge functionality is
+     still under heavy development.
+
+
+File: forge.info,  Node: Miscellaneous Options,  Next: How Forge Detection Works,  Prev: Miscellaneous Commands,  Up: Top
+
+12 Miscellaneous Options
+************************
+
+ -- User Option: forge-database-file
+     This option specifies the file used to store the forge database.
+
+ -- User Option: forge-topic-wash-title-hook
+     Functions used to highlight parts of each individual topic title.
+
+     These functions are called in order, in a buffer that containing
+     the topic title.  They should set text properties as they see fit,
+     usually just ‘font-lock-face’.  Before each function is called,
+     point is at the beginning of the buffer.
+
+ -- User Option: forge-topic-repository-slug-width
+     This option specifies the width of repository slugs (i.e.,
+     "OWNER/NAME").
+
+ -- User Option: forge-buffer-draft-p
+     This option controls whether new pull-requests start out as drafts
+     by default.
+
+     The buffer-local value of this variable is used to keep track of
+     the draft status of the current pull-request.
+
+ -- User Option: forge-repository-list-columns
+     This option specifies the list of columns displayed when listing
+     repositories.
+
+     Each element has the form ‘(HEADER SOURCE WIDTH SORT PROPS)’.
+
+     HEADER is the string displayed in the header.  WIDTH is the width
+     of the column.  SOURCE is used to get the value, it has to be the
+     name of a slot of ‘forge-repository’ or a function that takes such
+     an object as argument.  SORT is a boolean or a function used to
+     sort by this column.  Supported PROPS include ‘:right-align’ and
+     ‘:pad-right’.
+
+ -- User Option: forge-limit-topic-choices
+     This option controls whether to initially limit completion
+     candidates to active topics.
+
+ -- User Option: forge-post-heading-format
+     This option specifies the format for post headings in topic view.
+
+     The following ‘%’-sequences are supported:
+
+        • ‘%a’ The forge nickname of the author.
+        • ‘%c’ The absolute creation date.
+        • ‘%C’ The relative creation date.
+
+ -- User Option: forge-post-fill-region
+     This option controls whether to call ‘fill-region’ before
+     displaying forge posts.
+
+ -- User Option: forge-bug-reference-hooks
+     This option lists the hooks to which ‘forge-bug-reference-setup’ is
+     added.  It has to be customized before ‘forge’ is loaded, or it
+     won't take effect.
+
+
+File: forge.info,  Node: How Forge Detection Works,  Next: Supported Forges and Hosts,  Prev: Miscellaneous Options,  Up: Top
+
+Appendix A How Forge Detection Works
+************************************
+
+Forge uses the Ghub package to communicate with forge APIs.  For more
+information about Ghub, see *note (ghub)Top::.
+
+   Ghub does *not* associate a given local repository with a repository
+on a forge.  The Forge package itself takes care of this.  In doing so
+it ignores the Git variable ‘ghub.host’ and other ‘*.host’ variables
+used by Ghub.  (But ‘github.user’, and other variables used to specify
+the user, are honored).
+
+   Forge associates the local repository with a forge repository, by
+first determining which remote is associated with the upstream
+repository, and then looking that up in ‘forge-alist’.
+
+   If only one remote exists, then Forge uses that unconditionally.  To
+reduce the number of support requests, this is even the case if the Git
+variable ‘forge.remote’ names another, non-existent, remote.
+
+   If several remotes exist, then a remote may be selected based on its
+name.  Almost always we want to fetch the data associated with the
+upstream repository, so that is what the logic described here tries to
+achieve.  The convention is to name the upstream remote "origin", and if
+that convention were universally followed, then things would be trivial.
+However many people name the upstream remote "upstream", which also
+makes sense.
+
+     Note, however, that even though a surprising number of people do
+     just that, it does not make any sense to use the name "origin" to
+     refer to a fork; not even to your own fork.  A fork is a *copy* of
+     the original, "copy" is an antonym for "original", and the word
+     "origin" is not only closely related to but is even contained in
+     the word "original".  Naming a fork the "origin" is at best
+     extremely confusing.
+
+     copy
+          a thing made to be similar or identical to another.
+
+     original
+          the earliest form of something, from which copies may be made.
+
+     origin
+          the point or place where something begins, arises, or is
+          derived.
+
+   If several remotes exist, then the following remote names are tried
+in order and the first remote thus named that exists in the repository
+is used.
+
+  1. The value of the Git variable ‘forge.remote’, if set.  If the
+     variable has a value but no remote by the specified name exists,
+     then a warning is shown, but otherwise this conflict is ignored.
+     This behavior is arguably odd, but due to historic and pragmatic
+     reasons it is the least painful path forward.
+
+  2. The remote named ‘upstream’, if it exists.
+
+  3. The remote named ‘origin’, if it exists.
+
+   The remote named "upstream" is preferred over the remote named
+"origin" because the existence of the former strongly suggests that the
+latter is either not used in this repository (in which case the order
+does not matter) or else it is abused as the name of a fork (in which
+case "upstream" must be preferred).
+
+ -- Variable: forge.remote
+     The value of this variable specifies the remote from which Forge
+     fetches data.  It is usually best to leave this unspecified and to
+     rely on the behavior described above.
+
+     If the remote has to be specified explicitly, then this should be
+     done locally, for a single repository.
+
+     Only ever set this globally, if you consistently use a certain name
+     to refer to the upstream repository and it isn't one of "upstream"
+     or "origin", and you *never* use that name to refer to a repository
+     that does *not* refer to the upstream repository.
+
+‘N r’ (‘forge-forge.remote’)
+     This command changes the value of the ‘forge.remote’ Git variable
+     in the current repository.
+
+   If this variable is set, then Forge uses the remote by that name, if
+it exists, the same way it may have used ‘origin’ if the variable were
+undefined.  I.e., it does not fall through to try ‘origin’ if no remote
+by your chosen name exists.
+
+   Once the upstream remote has been determined, Forge looks it up in
+‘forge-alist’, using the host part of the URL as the key.  For example,
+the key for ‘git@github.com:magit/forge.git’ is ‘github.com’.
+
+ -- User Option: forge-alist
+     This option defines forge hosts known to Forge.
+
+     Each entry has the form ‘(GITHOST APIHOST WEBHOST CLASS)’.
+
+        • GITHOST is the host used to access repositories on the forge
+          using Git.
+
+        • APIHOST is the host used to access the forge's API.  For some
+          forges the isn't just a host, but a host followed by the path
+          to the API's endpoint.
+
+        • WEBHOST is the host used to access repositories on this forge
+          using a browser.  The IDs used to identify repositories from
+          the forge in the local database also derives from this value.
+
+        • CLASS is the class to be used for repositories from the forge.
+
+     Complications:
+
+        • When connecting to a Github Enterprise edition whose REST
+          API's end point is "<host>/v3" and whose GraphQL API's end
+          point is "<host>/graphql", then use "<host>/v3" as APIHOST.
+          This is a historic accident.  See issue #174.
+
+        • WEBHOST and CLASS cannot be changed once you have added one or
+          more repositories from a forge.  Changing GITHOST and/or
+          APIHOST may be possible, but should seldom be necessary.
+
+
+File: forge.info,  Node: Supported Forges and Hosts,  Next: FAQ,  Prev: How Forge Detection Works,  Up: Top
+
+Appendix B Supported Forges and Hosts
+*************************************
+
+Currently Forge supports two forges and three more forges partially.
+Additionally it supports four semi-forges.  Support for more forges and
+semi-forges can and will be added.
+
+   Both forges and semi-forges provide web interfaces for Git
+repositories.  Forges additionally support pull-requests and issues and
+make those and other information available using an API.
+
+   When a forge is only partially supported, then that means that only
+the functionality that does not require the API is implemented, or in
+other words, that the forge is only supported as a semi-forge.
+
+   A host is a particular instance of a forge.  For example the hosts
+<https://gitlab.com> and <https://salsa.debian.org> are both instances
+of the Gitlab forge.  Forge supports some well known hosts out of the
+box and additional hosts can easily be supported by adding entries to
+the option ‘forge-alist’ (see *note How Forge Detection Works::).
+
+   For more details about the caveats mentioned below (and some others)
+see also *note Getting Started::.
+
+* Menu:
+
+* Supported Forges::
+* Partially Supported Forges::
+* Supported Semi-Forges::
+
+
+File: forge.info,  Node: Supported Forges,  Next: Partially Supported Forges,  Up: Supported Forges and Hosts
+
+B.1 Supported Forges
+====================
+
+B.1.1 Github
+------------
+
+Forge's support for Github can be considered the "reference
+implementation".  Support for other forges can lag behind a bit.
+
+B.1.1.1 Github Caveats
+......................
+
+   • Forge uses the Github GraphQL API when possible but has to fall
+     back to use the REST API in many cases because the former is still
+     rather incomplete.
+
+   • The Github GraphQL API has a hard-coded timeout on queries.  The
+     only solution is to reduce the number of entities we query at once,
+     which can be done by adjusting either the ‘forge.graphqlItemLimit’
+     git variable or the field "GQL entity limit" in a status buffer.
+
+   • Forge depends on the ‘updated_at’ field being updated when
+     appropriate.  For Github pull-requests at least, that is not always
+     done.
+
+B.1.1.2 Github Hosts
+....................
+
+   • <https://github.com>
+
+B.1.2 Gitlab
+------------
+
+B.1.2.1 Gitlab Caveats
+......................
+
+   • Forge cannot provide notifications because the Gitlab API does not
+     expose those.
+
+B.1.2.2 Gitlab Hosts
+....................
+
+   • <https://gitlab.com>
+   • <https://salsa.debian.org>
+   • <https://framagit.org>
+
+
+File: forge.info,  Node: Partially Supported Forges,  Next: Supported Semi-Forges,  Prev: Supported Forges,  Up: Supported Forges and Hosts
+
+B.2 Partially Supported Forges
+==============================
+
+B.2.1 Forgejo https://forgejo.org
+---------------------------------
+
+This is the next forge whose API will be supported.
+
+B.2.1.1 Forgejo Hosts
+.....................
+
+   • <https://codeberg.org>
+
+B.2.2 Gitea https://gitea.io
+----------------------------
+
+Once Forgejo is supported it might be fairly simple to support Gitea
+too, because the former is a fork of the latter, and their APIs might
+still be similar enough.
+
+B.2.3 Gogs https://gogs.io
+--------------------------
+
+Once Forgejo is supported it might be fairly simple to support Gogs too,
+because the Forgejo is a fork of Gitea, which is a fork of Gogs, and
+their APIs might still be similar enough.
+
+B.2.4 Bitbucket https://bitbucket.org
+-------------------------------------
+
+I don't plan to support Bitbucket's API any time soon, and it gets less
+likely that I will every do it every time I look at it.
+
+B.2.4.1 Bitbucket Caveats
+.........................
+
+   • The API documentation is poor and initial tests indicated that the
+     implementation is buggy.
+
+   • Atlassian's offering contains two very distinct implementations
+     that are both called "Bitbucket".  Forge only supports the
+     implementation whose only instance is available at
+     <https://bitbucket.org>, because I only have access to that.
+
+   • Unlike all other forges, Bitbucket does not expose pull-requests as
+     references in the upstream repository.  For that reason Forge
+     actually treats it as a semi-forge, not as forge whose API is not
+     supported yet.  This means that you cannot checkout pull-requests
+     locally.  There is little hope that this will ever get fixed; the
+     respective issue was opened six years ago and there has been no
+     progress since: <https://bitbucket.org/site/master/issues/5814>.
+
+B.2.4.2 Bitbucket Hosts
+.......................
+
+   • <https://bitbucket.org>
+
+
+File: forge.info,  Node: Supported Semi-Forges,  Prev: Partially Supported Forges,  Up: Supported Forges and Hosts
+
+B.3 Supported Semi-Forges
+=========================
+
+B.3.1 Gitweb https://git-scm.com/docs/gitweb
+--------------------------------------------
+
+B.3.1.1 Gitweb Caveats
+......................
+
+   • I could find only one public installation
+     (<https://git.savannah.gnu.org>), which gives users the choice
+     between Gitweb and Cgit.  The latter seems more popular (not just
+     on this site).
+
+B.3.2 Cgit https://git.zx2c4.com/cgit/about
+-------------------------------------------
+
+B.3.2.1 Cgit Caveats
+....................
+
+   • Different sites use different URL schemata and some of the bigger
+     sites use a fork.  For this reason Forge has to provide several
+     classes to support different variations of Cgit and you have to
+     look at their definitions to figure out which one is the correct
+     one for a particular installation.
+
+B.3.2.2 Cgit Hosts
+..................
+
+   • <https://git.savannah.gnu.org/cgit>
+   • <https://git.kernel.org>
+   • <https://repo.or.cz>
+
+B.3.3 Stgit https://codemadness.org/git/stagit/file/README.html
+---------------------------------------------------------------
+
+B.3.3.1 Stgit Caveats
+.....................
+
+   • Stgit cannot show logs for branches beside "master".  For that
+     reason Forge takes users to a page listing the branches when they
+     request the log for a particular branch (even for "master" whose
+     log is just one click away from there).
+
+B.3.3.2 Stgit Hosts
+...................
+
+   • <https://git.suckless.org>
+
+B.3.4 Srht https://meta.sr.ht
+-----------------------------
+
+B.3.4.1 Srht Caveats
+....................
+
+   • Srht cannot show logs for branches beside "master".  For that
+     reason Forge takes users to a page listing the branches when they
+     request the log for a particular branch (even for "master" whose
+     log is just one click away from there).
+
+B.3.4.2 Srht Hosts
+..................
+
+   • <https://git.sr.ht>
+
+
+File: forge.info,  Node: FAQ,  Next: Keystroke Index,  Prev: Supported Forges and Hosts,  Up: Top
+
+Appendix C FAQ
+**************
+
+This section lists some frequently asked questions.  Please see also
+<https://github.com/magit/forge/wiki/FAQ> for an extended list of common
+issues.
+
+* Menu:
+
+* ‘error in process filter HTTP Error 502, "Bad gateway"’: error in process filter HTTP Error 502 "Bad gateway".
+
+
+File: forge.info,  Node: error in process filter HTTP Error 502 "Bad gateway",  Up: FAQ
+
+C.1 ‘error in process filter: HTTP Error: 502, "Bad gateway"’
+=============================================================
+
+This is a frequently occurring error.  Adding some formatting, the full
+error is:
+
+     error in process filter: ghub--signal-error: HTTP Error: 502,
+       "Bad gateway", "/graphql",
+       ((data . "null")
+        (errors ((message . "Something went wrong while executing your query.
+           This may be the result of a timeout, or it could be a GitHub bug.
+           Please include `CC2C:4FEA:A1771C1:CBF40CE:5C33F7E5`
+           when reporting this issue."))))
+
+   This indicates that something went wrong within Github's network.
+Unfortunately the reason given is rather vague, but I believe this
+usually happens when there are topics with one or two magnitudes more
+posts than usual, which can cause GraphQL responses to become huge.
+
+   This can be countered in the affected repository by setting the Git
+variable ‘forge.graphqlItemLimit’:
+
+     git config --local forge.graphqlItemLimit 20
+
+   The default is specified using the ‘ghub-graphql-items-per-request’,
+which defaults to 50 (down from Github's default and maximum of 100).
+
+   Fetching less items per request results in more requests, which slows
+down the process, which is why the default should not be too small, but
+for some repositories a more aggressive limit is needed.
+
+
+File: forge.info,  Node: Keystroke Index,  Next: Function and Command Index,  Prev: FAQ,  Up: Top
+
+Appendix D Keystroke Index
+**************************
+
+[index]
+* Menu:
+
+* b F:                                   Branching.           (line  13)
+* b f:                                   Branching.           (line  91)
+* C-<return> [on a topic section]:       Editing Topics.      (line  26)
+* C-c C-c:                               Creating Topics and Posts.
+                                                              (line  37)
+* C-c C-c [in notifications list buffer]: Lists and Menus.    (line  97)
+* C-c C-c [in repositories list buffer]: Lists and Menus.     (line 109)
+* C-c C-c [in topics list buffer/section]: Lists and Menus.   (line  53)
+* C-c C-e:                               Creating Topics and Posts.
+                                                              (line  45)
+* C-c C-e [on a post section]:           Editing Topics.      (line  12)
+* C-c C-e d:                             Creating Topics and Posts.
+                                                              (line  50)
+* C-c C-k:                               Creating Topics and Posts.
+                                                              (line  41)
+* C-c C-k [on a post section]:           Editing Topics.      (line  20)
+* C-c C-n:                               Creating Topics and Posts.
+                                                              (line  27)
+* C-c C-n [on "Issues" section]:         Creating Topics and Posts.
+                                                              (line  23)
+* C-c C-n [on "Pull requests" section]:  Creating Topics and Posts.
+                                                              (line  19)
+* C-c C-o:                               Visiting Topics.     (line  41)
+* C-c C-r:                               Creating Topics and Posts.
+                                                              (line  27)
+* C-c C-w:                               Miscellaneous Commands.
+                                                              (line  40)
+* f n:                                   Getting Started.     (line  32)
+* f n <1>:                               Pulling.             (line  23)
+* f N:                                   Pulling.             (line  34)
+* M b r:                                 Miscellaneous Commands.
+                                                              (line  48)
+* m M [if enabled]:                      Miscellaneous Commands.
+                                                              (line   8)
+* N:                                     Getting Started.     (line  50)
+* N <1>:                                 Lists and Menus.     (line  40)
+* N - H:                                 Miscellaneous Commands.
+                                                              (line  32)
+* N - S:                                 Miscellaneous Commands.
+                                                              (line  36)
+* N / a:                                 Getting Started.     (line  15)
+* N b i:                                 Visiting Topics.     (line  53)
+* N b I:                                 Visiting Topics.     (line  53)
+* N b p:                                 Visiting Topics.     (line  53)
+* N b P:                                 Visiting Topics.     (line  53)
+* N b r:                                 Visiting Topics.     (line  53)
+* N b t:                                 Visiting Topics.     (line  53)
+* N c f:                                 Miscellaneous Commands.
+                                                              (line  21)
+* N c i:                                 Creating Topics and Posts.
+                                                              (line  23)
+* N c p:                                 Creating Topics and Posts.
+                                                              (line  19)
+* N f f:                                 Getting Started.     (line  32)
+* N f f <1>:                             Pulling.             (line  23)
+* N f n:                                 Pulling.             (line  34)
+* N f t:                                 Pulling.             (line  43)
+* N l g:                                 Lists and Menus.     (line  78)
+* N l n:                                 Lists and Menus.     (line 101)
+* N l r:                                 Lists and Menus.     (line 113)
+* N l t:                                 Lists and Menus.     (line  60)
+* N M:                                   Miscellaneous Commands.
+                                                              (line   8)
+* N m c:                                 Lists and Menus.     (line  45)
+* N m f:                                 Lists and Menus.     (line  53)
+* N m n:                                 Lists and Menus.     (line  97)
+* N m r:                                 Lists and Menus.     (line 109)
+* N m s:                                 Editing Topics.      (line  26)
+* N r:                                   How Forge Detection Works.
+                                                              (line  83)
+* N v i:                                 Visiting Topics.     (line  28)
+* N v p:                                 Visiting Topics.     (line  28)
+* N v t:                                 Visiting Topics.     (line  28)
+* N v u:                                 Visiting Topics.     (line  32)
+* o [in forge-repositories-menu]:        Lists and Menus.     (line 120)
+* o [on repository in repository list]:  Visiting Topics.     (line  41)
+* o [on topic in topic list]:            Visiting Topics.     (line  41)
+* RET [on "Issues" status section]:      Lists and Menus.     (line  66)
+* RET [on "Pull requests" status section]: Lists and Menus.   (line  72)
+* RET [on repository]:                   Lists and Menus.     (line 117)
+* RET [on topic]:                        Visiting Topics.     (line  21)
+* Z n:                                   Branching.           (line  96)
+
+
+File: forge.info,  Node: Function and Command Index,  Next: Variable Index,  Prev: Keystroke Index,  Up: Top
+
+Appendix E Function and Command Index
+*************************************
+
+[index]
+* Menu:
+
+* forge-add-organization-repositories:   Miscellaneous Commands.
+                                                              (line  67)
+* forge-add-pullreq-refspec:             Miscellaneous Commands.
+                                                              (line  54)
+* forge-add-repository:                  Getting Started.     (line  15)
+* forge-add-user-repositories:           Miscellaneous Commands.
+                                                              (line  61)
+* forge-branch-pullreq:                  Branching.           (line  13)
+* forge-browse:                          Visiting Topics.     (line  41)
+* forge-browse-branch:                   Visiting Topics.     (line  45)
+* forge-browse-commit:                   Visiting Topics.     (line  44)
+* forge-browse-commit <1>:               Visiting Topics.     (line  56)
+* forge-browse-issue:                    Visiting Topics.     (line  53)
+* forge-browse-issues:                   Visiting Topics.     (line  53)
+* forge-browse-pullreq:                  Visiting Topics.     (line  53)
+* forge-browse-pullreqs:                 Visiting Topics.     (line  53)
+* forge-browse-remote:                   Visiting Topics.     (line  53)
+* forge-browse-repository:               Visiting Topics.     (line  46)
+* forge-browse-this-repository:          Visiting Topics.     (line  41)
+* forge-browse-this-topic:               Visiting Topics.     (line  41)
+* forge-browse-topic:                    Visiting Topics.     (line  53)
+* forge-checkout-pullreq:                Branching.           (line  91)
+* forge-checkout-worktree:               Branching.           (line  96)
+* forge-configure:                       Lists and Menus.     (line  45)
+* forge-copy-url-at-point-as-kill:       Miscellaneous Commands.
+                                                              (line  40)
+* forge-create-issue:                    Creating Topics and Posts.
+                                                              (line  23)
+* forge-create-post:                     Creating Topics and Posts.
+                                                              (line  27)
+* forge-create-pullreq:                  Creating Topics and Posts.
+                                                              (line  19)
+* forge-delete-comment:                  Editing Topics.      (line  20)
+* forge-dispatch:                        Getting Started.     (line  50)
+* forge-dispatch <1>:                    Lists and Menus.     (line  40)
+* forge-edit-post:                       Editing Topics.      (line  12)
+* forge-forge.remote:                    How Forge Detection Works.
+                                                              (line  83)
+* forge-fork:                            Miscellaneous Commands.
+                                                              (line  21)
+* forge-insert-discussions:              Lists and Menus.     (line 184)
+* forge-insert-issues:                   Lists and Menus.     (line 188)
+* forge-insert-pullreqs:                 Lists and Menus.     (line 192)
+* forge-list-global-issues:              Lists and Menus.     (line  82)
+* forge-list-global-pullreqs:            Lists and Menus.     (line  87)
+* forge-list-global-topics:              Lists and Menus.     (line  78)
+* forge-list-issues:                     Lists and Menus.     (line  66)
+* forge-list-notifications:              Lists and Menus.     (line 101)
+* forge-list-owned-repositories:         Lists and Menus.     (line 120)
+* forge-list-pullreqs:                   Lists and Menus.     (line  72)
+* forge-list-repositories:               Lists and Menus.     (line 113)
+* forge-list-topics:                     Lists and Menus.     (line  60)
+* forge-merge:                           Miscellaneous Commands.
+                                                              (line   8)
+* forge-notifications-menu:              Lists and Menus.     (line  97)
+* forge-post-cancel:                     Creating Topics and Posts.
+                                                              (line  41)
+* forge-post-dispatch:                   Creating Topics and Posts.
+                                                              (line  45)
+* forge-post-submit:                     Creating Topics and Posts.
+                                                              (line  37)
+* forge-post-toggle-draft:               Creating Topics and Posts.
+                                                              (line  50)
+* forge-pull:                            Getting Started.     (line  32)
+* forge-pull <1>:                        Pulling.             (line  23)
+* forge-pull-notifications:              Pulling.             (line  34)
+* forge-pull-topic:                      Pulling.             (line  43)
+* forge-remove-repository:               Miscellaneous Commands.
+                                                              (line  74)
+* forge-remove-topic-locally:            Miscellaneous Commands.
+                                                              (line  78)
+* forge-rename-default-branch:           Miscellaneous Commands.
+                                                              (line  48)
+* forge-repositories-menu:               Lists and Menus.     (line 109)
+* forge-reset-database:                  Miscellaneous Commands.
+                                                              (line  94)
+* forge-toggle-display-in-status-buffer: Miscellaneous Commands.
+                                                              (line  36)
+* forge-toggle-topic-legend:             Miscellaneous Commands.
+                                                              (line  32)
+* forge-topic-menu:                      Editing Topics.      (line  26)
+* forge-topics-menu:                     Lists and Menus.     (line  53)
+* forge-visit-issue:                     Visiting Topics.     (line  28)
+* forge-visit-pullreq:                   Visiting Topics.     (line  28)
+* forge-visit-this-repository:           Lists and Menus.     (line 117)
+* forge-visit-this-topic:                Visiting Topics.     (line  21)
+* forge-visit-topic:                     Visiting Topics.     (line  28)
+* forge-visit-topic-from-url:            Visiting Topics.     (line  32)
+
+
+File: forge.info,  Node: Variable Index,  Prev: Function and Command Index,  Up: Top
+
+Appendix F Variable Index
+*************************
+
+[index]
+* Menu:
+
+* forge-alist:                           How Forge Detection Works.
+                                                              (line  95)
+* forge-buffer-draft-p:                  Miscellaneous Options.
+                                                              (line  21)
+* forge-bug-reference-hooks:             Miscellaneous Options.
+                                                              (line  58)
+* forge-checkout-worktree-read-directory-function: Branching. (line 101)
+* forge-database-file:                   Miscellaneous Options.
+                                                              (line   6)
+* forge-limit-topic-choices:             Miscellaneous Options.
+                                                              (line  41)
+* forge-list-buffer-default-topic-filters: Lists and Menus.   (line 163)
+* forge-owned-accounts:                  Lists and Menus.     (line 127)
+* forge-owned-ignored:                   Lists and Menus.     (line 140)
+* forge-post-fill-region:                Miscellaneous Options.
+                                                              (line  54)
+* forge-post-heading-format:             Miscellaneous Options.
+                                                              (line  45)
+* forge-repository-list-columns:         Miscellaneous Options.
+                                                              (line  28)
+* forge-status-buffer-default-topic-filters: Lists and Menus. (line 167)
+* forge-topic-repository-slug-width:     Miscellaneous Options.
+                                                              (line  17)
+* forge-topic-wash-title-hook:           Miscellaneous Options.
+                                                              (line   9)
+* forge.remote:                          How Forge Detection Works.
+                                                              (line  69)
+
+
+
+Tag Table:
+Node: Top773
+Node: Introduction2507
+Node: Initial Setup2926
+Ref: Common Setup3631
+Node: Setup for Githubcom4223
+Ref: Set your Username4384
+Ref: Create and Store an Access Token4714
+Node: Setup for Another Github Instance6576
+Ref: Tell Forge about the Instance7129
+Ref: Set your Username (1)8874
+Ref: Create and Store an Access Token (1)9182
+Node: Setup for Gitlabcom11279
+Ref: Set your Username (2)11482
+Ref: Create and Store an Access Token (2)11812
+Node: Setup for Another Gitlab Instance13841
+Ref: Tell Forge about the Instance (1)14407
+Ref: Set your Username (3)15670
+Ref: Create and Store an Access Token (3)15978
+Node: Setup a Partially Supported Host18650
+Ref: Tell Forge about the Instance (2)19333
+Ref: Add Support for Additional Forge Types20831
+Node: Initial Pull22002
+Node: Getting Started23209
+Node: Lists and Menus25485
+Ref: Dispatch and configuration menus27295
+Ref: Topic menu and list commands27754
+Ref: Notification menu and list commands29657
+Ref: Repository menu and list commands30065
+Ref: Exiting menus and lists31862
+Ref: Default topic filters32557
+Ref: Topic sections in Magit status buffers32995
+Node: Visiting Topics34362
+Node: Creating Topics and Posts37719
+Node: Editing Topics39801
+Node: Pulling41492
+Node: Branching43648
+Node: Miscellaneous Commands49539
+Node: Miscellaneous Options53634
+Node: How Forge Detection Works56096
+Node: Supported Forges and Hosts61621
+Node: Supported Forges62930
+Ref: Github63086
+Ref: Github Caveats63239
+Ref: Github Hosts63901
+Ref: Gitlab63973
+Ref: Gitlab Caveats64000
+Ref: Gitlab Hosts64141
+Node: Partially Supported Forges64277
+Ref: Forgejo https//forgejoorg64483
+Ref: Forgejo Hosts64605
+Ref: Gitea https//giteaio64681
+Ref: Gogs https//gogsio64905
+Ref: Bitbucket https//bitbucketorg65145
+Ref: Bitbucket Caveats65351
+Ref: Bitbucket Hosts66262
+Node: Supported Semi-Forges66343
+Ref: Gitweb https//git-scmcom/docs/gitweb66514
+Ref: Gitweb Caveats66605
+Ref: Cgit https//gitzx2c4com/cgit/about66861
+Ref: Cgit Caveats66950
+Ref: Cgit Hosts67315
+Ref: Stgit https//codemadnessorg/git/stagit/file/READMEhtml67458
+Ref: Stgit Caveats67587
+Ref: Stgit Hosts67889
+Ref: Srht https//metasrht67965
+Ref: Srht Caveats68026
+Ref: Srht Hosts68325
+Node: FAQ68392
+Node: error in process filter HTTP Error 502 "Bad gateway"68802
+Node: Keystroke Index70279
+Node: Function and Command Index76332
+Node: Variable Index82831
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/general-20250612.2309/general-autoloads.el b/emacs/.emacs.d/elpa/general-20250612.2309/general-autoloads.el
new file mode 100644
index 0000000..37a0e93
--- /dev/null
+++ b/emacs/.emacs.d/elpa/general-20250612.2309/general-autoloads.el
@@ -0,0 +1,392 @@
+;;; general-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from general.el
+
+(autoload 'general-define-key "general" "\
+The primary key definition function provided by general.el.
+
+Define MAPS, optionally using DEFINER, in the keymap(s) corresponding to STATES
+and KEYMAPS.
+
+MAPS consists of paired keys (vectors or strings; also see
+`general-implicit-kbd') and definitions (those mentioned in `define-key''s
+docstring and general.el's \"extended\" definitions). All pairs (when not
+ignored) will be recorded and can be later displayed with
+`general-describe-keybindings'.
+
+If DEFINER is specified, a custom key definer will be used to bind MAPS. See
+general.el's documentation/README for more information.
+
+Unlike with normal key definitions functions, the keymaps in KEYMAPS should be
+quoted (this allows using the keymap name for other purposes, e.g. deferring
+keybindings if the keymap symbol is not bound, optionally inferring the
+corresponding major mode for a symbol by removing \"-map\" for :which-key,
+easily storing the keymap name for use with `general-describe-keybindings',
+etc.). Note that general.el provides other key definer macros that do not
+require quoting keymaps.
+
+STATES corresponds to the evil state(s) to bind the keys in. Non-evil users
+should not set STATES. When STATES is non-nil, `evil-define-key*' will be
+used (the evil auxiliary keymaps corresponding STATES and KEYMAPS will be used);
+otherwise `define-key' will be used (unless DEFINER is specified). KEYMAPS
+defaults to 'global. There is also 'local, which create buffer-local
+keybindings for both evil and non-evil keybindings. There are other special,
+user-alterable \"shorthand\" symbols for keymaps and states (see
+`general-keymap-aliases' and `general-state-aliases').
+
+Note that STATES and KEYMAPS can either be lists or single symbols. If any
+keymap does not exist, those keybindings will be deferred until the keymap does
+exist, so using `eval-after-load' is not necessary with this function.
+
+PREFIX corresponds to a key to prefix keys in MAPS with and defaults to none. To
+bind/unbind a key specified with PREFIX, \"\" can be specified as a key in
+MAPS (e.g. ...:prefix \"SPC\" \"\" nil... will unbind space).
+
+The keywords in this paragraph are only useful for evil users. If
+NON-NORMAL-PREFIX is specified, this prefix will be used instead of PREFIX for
+states in `general-non-normal-states' (e.g. the emacs and insert states). This
+argument will only have an effect if one of these states is in STATES or if
+corresponding global keymap (e.g. `evil-insert-state-map') is in KEYMAPS.
+Alternatively, GLOBAL-PREFIX can be used with PREFIX and/or NON-NORMAL-PREFIX to
+bind keys in all states under the specified prefix. Like with NON-NORMAL-PREFIX,
+GLOBAL-PREFIX will prevent PREFIX from applying to `general-non-normal-states'.
+INFIX can be used to append a string to all of the specified prefixes. This is
+potentially useful when you are using GLOBAL-PREFIX and/or NON-NORMAL-PREFIX so
+that you can sandwich keys in between all the prefixes and the specified keys in
+MAPS. This may be particularly useful if you are using default prefixes in a
+wrapper function/macro so that you can add to them without needing to re-specify
+all of them. If none of the other prefix keyword arguments are specified, INFIX
+will have no effect.
+
+If PREFIX-COMMAND or PREFIX-MAP is specified, a prefix command and/or keymap
+will be created. PREFIX-NAME can be additionally specified to set the keymap
+menu name/prompt. If PREFIX-COMMAND is specified, `define-prefix-command' will
+be used. Otherwise, only a prefix keymap will be created. Previously created
+prefix commands/keymaps will never be redefined/cleared. All prefixes (including
+the INFIX key, if specified) will then be bound to PREFIX-COMMAND or PREFIX-MAP.
+If the user did not specify any PREFIX or manually specify any KEYMAPS, general
+will bind all MAPS in the prefix keymap corresponding to either PREFIX-MAP or
+PREFIX-COMMAND instead of in the default keymap.
+
+PREDICATE corresponds to a predicate to check to determine whether a definition
+should be active (e.g. \":predicate '(eobp)\"). Definitions created with a
+predicate will only be active when the predicate is true. When the predicate is
+false, key lookup will continue to search for a match in lower-precedence
+keymaps.
+
+In addition to the normal definitions supported by `define-key', general.el also
+provides \"extended\" definitions, which are plists containing the normal
+definition as well as other keywords. For example, PREDICATE can be specified
+globally or locally in an extended definition. New global (~general-define-key~)
+and local (extended definition) keywords can be added by the user. See
+`general-extended-def-keywords' and general.el's documentation/README for more
+information.
+
+PACKAGE is the global version of the extended definition keyword that specifies
+the package a keymap is defined in (used for \"autoloading\" keymaps)
+
+PROPERTIES, REPEAT, and JUMP are the global versions of the extended definition
+keywords used for adding evil command properties to commands.
+
+MAJOR-MODES, WK-MATCH-KEYS, WK-MATCH-BINDINGS, and WK-FULL-KEYS are the
+corresponding global versions of which-key extended definition keywords. They
+will only have an effect for extended definitions that specify :which-key or
+:wk. See the section on extended definitions in the general.el
+documentation/README for more information.
+
+LISPY-PLIST and WORF-PLIST are the global versions of extended definition
+keywords that are used for each corresponding custom DEFINER.
+
+(fn &rest MAPS &key DEFINER (STATES general-default-states) (KEYMAPS general-default-keymaps KEYMAPS-SPECIFIED-P) (PREFIX general-default-prefix) (NON-NORMAL-PREFIX general-default-non-normal-prefix) (GLOBAL-PREFIX general-default-global-prefix) INFIX PREFIX-COMMAND PREFIX-MAP PREFIX-NAME PREDICATE PACKAGE PROPERTIES REPEAT JUMP MAJOR-MODES (WK-MATCH-KEYS t) (WK-MATCH-BINDING t) (WK-FULL-KEYS t) LISPY-PLIST WORF-PLIST &allow-other-keys)")
+(autoload 'general-emacs-define-key "general" "\
+A wrapper for `general-define-key' that is similar to `define-key'.
+It has a positional argument for KEYMAPS (that will not be overridden by a later
+:keymaps argument). Besides this, it acts the same as `general-define-key', and
+ARGS can contain keyword arguments in addition to keybindings. This can
+basically act as a drop-in replacement for `define-key', and unlike with
+`general-define-key', KEYMAPS does not need to be quoted.
+
+(fn KEYMAPS &rest ARGS)" nil t)
+(function-put 'general-emacs-define-key 'lisp-indent-function 1)
+(autoload 'general-evil-define-key "general" "\
+A wrapper for `general-define-key' that is similar to `evil-define-key'.
+It has positional arguments for STATES and KEYMAPS (that will not be overridden
+by a later :keymaps or :states argument). Besides this, it acts the same as
+`general-define-key', and ARGS can contain keyword arguments in addition to
+keybindings. This can basically act as a drop-in replacement for
+`evil-define-key', and unlike with `general-define-key', KEYMAPS does not need
+to be quoted.
+
+(fn STATES KEYMAPS &rest ARGS)" nil t)
+(function-put 'general-evil-define-key 'lisp-indent-function 2)
+(autoload 'general-def "general" "\
+General definer that takes a variable number of positional arguments in ARGS.
+This macro will act as `general-define-key', `general-emacs-define-key', or
+`general-evil-define-key' based on how many of the initial arguments do not
+correspond to keybindings. All quoted and non-quoted lists and symbols before
+the first string, vector, or keyword are considered to be positional arguments.
+This means that you cannot use a function or variable for a key that starts
+immediately after the positional arguments. If you need to do this, you should
+use one of the definers that `general-def' dispatches to or explicitly separate
+the positional arguments from the maps with a bogus keyword pair like
+\":start-maps t\"
+
+(fn &rest ARGS)" nil t)
+(function-put 'general-def 'lisp-indent-function 'defun)
+(autoload 'general-create-definer "general" "\
+A helper macro to create wrappers for `general-def'.
+This can be used to create key definers that will use a certain keymap, evil
+state, prefix key, etc. by default. NAME is the wrapper name and DEFAULTS are
+the default arguments. WRAPPING can also be optionally specified to use a
+different definer than `general-def'. It should not be quoted.
+
+(fn NAME &rest DEFAULTS &key WRAPPING &allow-other-keys)" nil t)
+(function-put 'general-create-definer 'lisp-indent-function 'defun)
+(autoload 'general-defs "general" "\
+A wrapper that splits into multiple `general-def's.
+Each consecutive grouping of positional argument followed by keyword/argument
+pairs (having only one or the other is fine) marks the start of a new section.
+Each section corresponds to one use of `general-def'. This means that settings
+only apply to the keybindings that directly follow.
+
+Since positional arguments can appear at any point, unqouted symbols are always
+considered to be positional arguments (e.g. a keymap). This means that variables
+can never be used for keys with `general-defs'. Variables can still be used for
+definitions or as arguments to keywords.
+
+(fn &rest ARGS)" nil t)
+(function-put 'general-defs 'lisp-indent-function 'defun)
+(autoload 'general-unbind "general" "\
+A wrapper for `general-def' to unbind multiple keys simultaneously.
+Insert after all keys in ARGS before passing ARGS to `general-def.' \":with
+ #'func\" can optionally specified to use a custom function instead (e.g.
+ `ignore').
+
+(fn &rest ARGS)" nil t)
+(function-put 'general-unbind 'lisp-indent-function 'defun)
+(autoload 'general-describe-keybindings "general" "\
+Show all keys that have been bound with general in an org buffer.
+Any local keybindings will be shown first followed by global keybindings.
+With a non-nil prefix ARG only show bindings in active maps.
+
+(fn &optional ARG)" t)
+(autoload 'general-key "general" "\
+Act as KEY's definition in the current context.
+This uses an extended menu item's capability of dynamically computing a
+definition. It is recommended over `general-simulate-key' wherever possible. See
+the docstring of `general-simulate-key' and the readme for information about the
+benefits and downsides of `general-key'.
+
+KEY should be a string given in `kbd' notation and should correspond to a single
+definition (as opposed to a sequence of commands). When STATE is specified, look
+up KEY with STATE as the current evil state. When specified, DOCSTRING will be
+the menu item's name/description.
+
+Let can be used to bind variables around key lookup. For example:
+(general-key \"some key\"
+  :let ((some-var some-val)))
+
+SETUP and TEARDOWN can be used to run certain functions before and after key
+lookup. For example, something similar to using :state 'emacs would be:
+(general-key \"some key\"
+  :setup (evil-local-mode -1)
+  :teardown (evil-local-mode))
+
+ACCEPT-DEFAULT, NO-REMAP, and POSITION are passed to `key-binding'.
+
+(fn KEY &key STATE DOCSTRING LET SETUP TEARDOWN ACCEPT-DEFAULT NO-REMAP POSITION)" nil t)
+(function-put 'general-key 'lisp-indent-function 1)
+(autoload 'general-simulate-keys "general" "\
+Deprecated. Please use `general-simulate-key' instead.
+
+(fn KEYS &optional STATE KEYMAP (LOOKUP t) DOCSTRING NAME)" nil t)
+(autoload 'general-simulate-key "general" "\
+Create and return a command that simulates KEYS in STATE and KEYMAP.
+
+`general-key' should be prefered over this whenever possible as it is simpler
+and has saner functionality in many cases because it does not rely on
+`unread-command-events' (e.g. \"C-h k\" will show the docstring of the command
+to be simulated ; see the readme for more information). The main downsides of
+`general-key' are that it cannot simulate a command followed by keys or
+subsequent commands, and which-key does not currently work well with it when
+simulating a prefix key/incomplete key sequence.
+
+KEYS should be a string given in `kbd' notation. It can also be a list of a
+single command followed by a string of the key(s) to simulate after calling that
+command. STATE should only be specified by evil users and should be a quoted
+evil state. KEYMAP should not be quoted. Both STATE and KEYMAP aliases are
+supported (but they have to be set when the macro is expanded). When neither
+STATE or KEYMAP are specified, the key(s) will be simulated in the current
+context.
+
+If NAME is specified, it will replace the automatically generated function name.
+NAME should not be quoted. If DOCSTRING is specified, it will replace the
+automatically generated docstring.
+
+Normally the generated function will look up KEY in the correct context to try
+to match a command. To prevent this lookup, LOOKUP can be specified as nil.
+Generally, you will want to keep LOOKUP non-nil because this will allow checking
+the evil repeat property of matched commands to determine whether or not they
+should be recorded. See the docstring for `general--simulate-keys' for more
+information about LOOKUP.
+
+When a WHICH-KEY description is specified, it will replace the command name in
+the which-key popup.
+
+When a command name is specified and that command has been remapped (i.e. [remap
+command] is currently bound), the remapped version will be used instead of the
+original command unless REMAP is specified as nil (it is true by default).
+
+The advantages of this over a keyboard macro are as follows:
+- Prefix arguments are supported
+- The user can control the context in which the keys are simulated
+- The user can simulate both a named command and keys
+- The user can simulate an incomplete key sequence (e.g. for a keymap)
+
+(fn KEYS &key STATE KEYMAP NAME DOCSTRING (LOOKUP t) WHICH-KEY (REMAP t))" nil t)
+(function-put 'general-simulate-key 'lisp-indent-function 'defun)
+(autoload 'general-key-dispatch "general" "\
+Create and return a command that runs FALLBACK-COMMAND or a command in MAPS.
+MAPS consists of <key> <command> pairs. If a key in MAPS is matched, the
+corresponding command will be run. Otherwise FALLBACK-COMMAND will be run with
+the unmatched keys. So, for example, if \"ab\" was pressed, and \"ab\" is not
+one of the key sequences from MAPS, the FALLBACK-COMMAND will be run followed by
+the simulated keypresses of \"ab\". Prefix arguments will still work regardless
+of which command is run. This is useful for binding under non-prefix keys. For
+example, this can be used to redefine a sequence like \"cw\" or \"cow\" in evil
+but still have \"c\" work as `evil-change'. If TIMEOUT is specified,
+FALLBACK-COMMAND will also be run in the case that the user does not press the
+next key within the TIMEOUT (e.g. 0.5).
+
+NAME and DOCSTRING are optional keyword arguments. They can be used to replace
+the automatically generated name and docstring for the created function. By
+default, `cl-gensym' is used to prevent name clashes (e.g. allows the user to
+create multiple different commands using `self-insert-command' as the
+FALLBACK-COMMAND without explicitly specifying NAME to manually prevent
+clashes).
+
+When INHERIT-KEYMAP is specified, all the keybindings from that keymap will be
+inherited in MAPS.
+
+When a WHICH-KEY description is specified, it will replace the command name in
+the which-key popup.
+
+When command to be executed has been remapped (i.e. [remap command] is currently
+bound), the remapped version will be used instead of the original command unless
+REMAP is specified as nil (it is true by default).
+
+(fn FALLBACK-COMMAND &rest MAPS &key TIMEOUT INHERIT-KEYMAP NAME DOCSTRING WHICH-KEY (REMAP t) &allow-other-keys)" nil t)
+(function-put 'general-key-dispatch 'lisp-indent-function 1)
+(autoload 'general-predicate-dispatch "general" "\
+
+
+(fn FALLBACK-DEF &rest DEFS &key DOCSTRING &allow-other-keys)" nil t)
+(function-put 'general-predicate-dispatch 'lisp-indent-function 1)
+(autoload 'general-translate-key "general" "\
+Translate keys in the keymap(s) corresponding to STATES and KEYMAPS.
+STATES should be the name of an evil state, a list of states, or nil. KEYMAPS
+should be a symbol corresponding to the keymap to make the translations in or a
+list of keymap names. Keymap and state aliases are supported (as well as 'local
+and 'global for KEYMAPS).
+
+MAPS corresponds to a list of translations (key replacement pairs). For example,
+specifying \"a\" \"b\" will bind \"a\" to \"b\"'s definition in the keymap.
+Specifying nil as a replacement will unbind a key.
+
+If DESTRUCTIVE is non-nil, the keymap will be destructively altered without
+creating a backup. If DESTRUCTIVE is nil, store a backup of the keymap on the
+initial invocation, and for future invocations always look up keys in the
+original/backup keymap. On the other hand, if DESTRUCTIVE is non-nil, calling
+this function multiple times with \"a\" \"b\" \"b\" \"a\", for example, would
+continue to swap and unswap the definitions of these keys. This means that when
+DESTRUCTIVE is non-nil, all related swaps/cycles should be done in the same
+invocation.
+
+If both MAPS and DESCTRUCTIVE are nil, only create the backup keymap.
+
+(fn STATES KEYMAPS &rest MAPS &key DESTRUCTIVE &allow-other-keys)")
+(function-put 'general-translate-key 'lisp-indent-function 'defun)
+(autoload 'general-swap-key "general" "\
+Wrapper around `general-translate-key' for swapping keys.
+STATES, KEYMAPS, and ARGS are passed to `general-translate-key'. ARGS should
+consist of key swaps (e.g. \"a\" \"b\" is equivalent to \"a\" \"b\" \"b\" \"a\"
+with `general-translate-key') and optionally keyword arguments for
+`general-translate-key'.
+
+(fn STATES KEYMAPS &rest ARGS)" nil t)
+(function-put 'general-swap-key 'lisp-indent-function 'defun)
+(autoload 'general-auto-unbind-keys "general" "\
+Advise `define-key' to automatically unbind keys when necessary.
+This will prevent errors when a sub-sequence of a key is already bound (e.g. the
+user attempts to bind \"SPC a\" when \"SPC\" is bound, resulting in a \"Key
+sequnce starts with non-prefix key\" error). When UNDO is non-nil, remove
+advice.
+
+(fn &optional UNDO)")
+(autoload 'general-add-hook "general" "\
+A drop-in replacement for `add-hook'.
+Unlike `add-hook', HOOKS and FUNCTIONS can be single items or lists. APPEND and
+LOCAL are passed directly to `add-hook'. When TRANSIENT is non-nil, each
+function will remove itself from the hook it is in after it is run once. If
+TRANSIENT is a function, call it on the return value in order to determine
+whether to remove a function from the hook. For example, if TRANSIENT is
+#'identity, remove each function only if it returns non-nil. TRANSIENT could
+alternatively check something external and ignore the function's return value.
+
+(fn HOOKS FUNCTIONS &optional APPEND LOCAL TRANSIENT)")
+(autoload 'general-remove-hook "general" "\
+A drop-in replacement for `remove-hook'.
+Unlike `remove-hook', HOOKS and FUNCTIONS can be single items or lists. LOCAL is
+passed directly to `remove-hook'.
+
+(fn HOOKS FUNCTIONS &optional LOCAL)")
+(autoload 'general-advice-add "general" "\
+A drop-in replacement for `advice-add'.
+SYMBOLS, WHERE, FUNCTIONS, and PROPS correspond to the arguments for
+`advice-add'. Unlike `advice-add', SYMBOLS and FUNCTIONS can be single items or
+lists. When TRANSIENT is non-nil, each function will remove itself as advice
+after it is run once. If TRANSIENT is a function, call it on the return value in
+order to determine whether to remove a function as advice. For example, if
+TRANSIENT is #'identity, remove each function only if it returns non-nil.
+TRANSIENT could alternatively check something external and ignore the function's
+return value.
+
+(fn SYMBOLS WHERE FUNCTIONS &optional PROPS TRANSIENT)")
+ (autoload 'general-add-advice "general")
+(autoload 'general-advice-remove "general" "\
+A drop-in replacement for `advice-remove'.
+Unlike `advice-remove', SYMBOLS and FUNCTIONS can be single items or lists.
+
+(fn SYMBOLS FUNCTIONS)")
+ (autoload 'general-remove-advice "general")
+(autoload 'general-evil-setup "general" "\
+Set up some basic equivalents for vim mapping functions.
+This creates global key definition functions for the evil states.
+Specifying SHORT-NAMES as non-nil will create non-prefixed function
+aliases such as `nmap' for `general-nmap'.
+
+(fn &optional SHORT-NAMES _)")
+(register-definition-prefixes "general" '("general-"))
+
+;;; End of scraped data
+
+(provide 'general-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; general-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/general-20250612.2309/general-pkg.el b/emacs/.emacs.d/elpa/general-20250612.2309/general-pkg.el
new file mode 100644
index 0000000..b6aa6c0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/general-20250612.2309/general-pkg.el
@@ -0,0 +1,11 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "general" "20250612.2309"
+  "Convenience wrappers for keybindings."
+  '((emacs  "24.4")
+    (cl-lib "0.5"))
+  :url "https://github.com/noctuid/general.el"
+  :commit "a48768f85a655fe77b5f45c2880b420da1b1b9c3"
+  :revdesc "a48768f85a65"
+  :keywords '("vim" "evil" "leader" "keybindings" "keys")
+  :authors '(("Fox Kiester" . "noct@posteo.net"))
+  :maintainers '(("Fox Kiester" . "noct@posteo.net")))
diff --git a/emacs/.emacs.d/elpa/general-20250612.2309/general.el b/emacs/.emacs.d/elpa/general-20250612.2309/general.el
new file mode 100644
index 0000000..a6d26d0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/general-20250612.2309/general.el
@@ -0,0 +1,2774 @@
+;;; general.el --- Convenience wrappers for keybindings. -*- lexical-binding: t -*-
+
+;; Author: Fox Kiester <noct@posteo.net>
+;; URL: https://github.com/noctuid/general.el
+;; Created: February 17, 2016
+;; Keywords: vim, evil, leader, keybindings, keys
+;; Package-Requires: ((emacs "24.4") (cl-lib "0.5"))
+;; Package-Version: 20250612.2309
+;; Package-Revision: a48768f85a65
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; This package provides convenient wrappers for more succinctly defining
+;; keybindings. It allows defining multiple keys at once, specifying an
+;; arbitrary number of named prefix keys to be used in key definitions,
+;; implicitly wrapping key strings with (kbd ...), and more. It provides a
+;; single function for standard Emacs key definitions as well as evil key
+;; definitions for any evil state and any keymap. It also provides a setup
+;; function to generate "nmap", "vmap", etc. keybinding functions for evil.
+
+;; For more information see the README in the online repository.
+
+;;; Code:
+(require 'cl-lib)
+
+;; * Settings
+(defgroup general nil
+  "Gives convenient wrappers for key definitions."
+  :group 'convenience
+  :prefix "general-")
+
+(defcustom general-implicit-kbd t
+  "Whether to implicitly wrap a (kbd) around `general-define-key' keys.
+This applies to the prefix key as well. This option is provided to make it easy
+  to transition from other key definers to `general-define-key'. It does not
+  apply to other helpers such as `general-key', `general-key-dispatch', and
+  `general-translate-key'. These will always use `kbd' on keys that are
+  strings."
+  :group 'general
+  :type 'boolean)
+
+(defcustom general-default-prefix nil
+  "The default prefix key sequence to use."
+  :group 'general
+  :type 'string)
+(make-obsolete-variable 'general-default-prefix
+                        "This functionality will be removed in the future."
+                        "2018-01-21")
+
+(defcustom general-default-non-normal-prefix nil
+  "The default prefix key sequence to use for the 'emacs and 'insert states.
+Note that this setting is only useful for evil-users and will only have an
+effect when binding keys in the 'emacs and/or 'insert states or in the
+'evil-insert-state-map and/or 'evil-emacs-state-map keymaps. When this is not
+specified, `general-default-prefix' will be the default prefix for any states
+and keymaps. If this is specified `general-default-prefix' or the arg to :prefix
+will not be used when binding keys in the insert and Emacs states."
+  :group 'general
+  :type 'string)
+(make-obsolete-variable 'general-default-non-normal-prefix
+                        "This functionality will be removed in the future."
+                        "2018-01-21")
+
+(defcustom general-default-global-prefix nil
+  "The default prefix key sequence to use for all evil states.
+This setting is only useful for evil users. Note that like with
+`general-default-non-normal-prefix', if this or :global-prefix is specified,
+`general-default-prefix' or the arg to :prefix will not be used for binding
+keys in the insert and emacs states. If you don't need a different or extra
+prefix for one or both state types (insert and Emacs vs. the other states),
+just use `general-default-prefix'/:prefix by itself."
+  :group 'general
+  :type 'string)
+(make-obsolete-variable 'general-default-global-prefix
+                        "This functionality will be removed in the future."
+                        "2018-01-21")
+
+(define-widget 'general-state 'lazy
+  "General's evil state type."
+  :type '(choice
+          (const :tag "Insert state" insert)
+          (const :tag "Emacs state" emacs)
+          (const :tag "Normal state" normal)
+          (const :tag "Visual state" visual)
+          (const :tag "Motion state" motion)
+          (const :tag "Operator state" operator)
+          (const :tag "Replace state" replace)
+          (const :tag "Use define-key not evil-define-key" nil)
+          ;; other packages define states
+          symbol))
+
+(defcustom general-default-states nil
+  "The default evil state(s) to make mappings in.
+Non-evil users should keep this nil."
+  :group 'general
+  :type '(choice general-state
+                 (set general-state)))
+(make-obsolete-variable 'general-default-states
+                        "This functionality will be removed in the future."
+                        "2018-01-21")
+
+(defcustom general-non-normal-states '(insert replace emacs hybrid iedit-insert)
+  "List of \"non-normal\" evil states (used with :non-normal-prefix). When
+  :states is not specified (only :keymaps), these will automatically be expanded
+  to their full global evil keymap equivalents."
+  :group 'general
+  :type '(repeat general-state))
+
+(define-widget 'general-keymap 'lazy
+  "General's keymap type."
+  :type '(choice
+          (const :tag "Global keymap" global)
+          (const :tag "Buffer local keymap" local)
+          symbol))
+
+(defcustom general-default-keymaps 'global
+  "The default keymap(s) to bind keys in."
+  :group 'general
+  :type '(choice general-keymap
+                 (repeat general-keymap)))
+(make-obsolete-variable 'general-default-keymaps
+                        "This functionality will be removed in the future."
+                        "2018-01-21")
+
+(defcustom general-vim-definer-default nil
+  "Whether set the states or keymaps in a `general-create-vim-definer' function.
+If nil, use the default from when the function was created. If 'keymaps, set the
+default keymaps. If 'states, set the default states."
+  :group 'general
+  :type '(choice
+          (const :tag "Default to setting :keymaps" keymaps)
+          (const :tag "Default to setting :states" states)
+          (const :tag "Use the initial default" nil)))
+(make-obsolete-variable 'general-vim-definer-default
+                        "This functionality is no longer necessary."
+                        "2018-01-20")
+
+(defvar general-keybindings nil
+  "Holds all the keybindings created with `general-define-key' (and wrappers).
+This is an alist of a keymap to an alist of a state to keybindings.")
+
+(defvar general-local-keybindings nil
+  "Holds all the local keybindings created with `general-define-key'.
+This is an alist of a state to keybindings.")
+(make-variable-buffer-local 'general-local-keybindings)
+
+(define-widget 'general-alist 'lazy
+  "General's alist type."
+  :type '(alist :key-type (or symbol (repeat symbol))
+                :value-type symbol))
+
+(defcustom general-keymap-aliases
+  '((override . general-override-mode-map)
+    ((i insert) . evil-insert-state-map)
+    ((e emacs) . evil-emacs-state-map)
+    ((h hybrid) . evil-hybrid-state-map)
+    ((n normal) . evil-normal-state-map)
+    ((v visual) . evil-visual-state-map)
+    ((m motion) . evil-motion-state-map)
+    ((o operator) . evil-operator-state-map)
+    ((r replace) . evil-replace-state-map)
+    ((in inner) . evil-inner-text-objects-map)
+    ((out outer) . evil-outer-text-objects-map))
+  "An alist for mapping short keymap names to their full names.
+Earlier entries have higher precedence."
+  :group 'general
+  :type 'general-alist)
+
+(defcustom general-state-aliases
+  '((i . insert)
+    (e . emacs)
+    (h . hybrid)
+    (n . normal)
+    (v . visual)
+    (m . motion)
+    (o . operator)
+    (r . replace))
+  "An alist for mapping short state names to their full names.
+Earlier entries have higher precedence."
+  :group 'general
+  :type 'general-alist)
+
+;; ** `general-describe-keybindings' Settings
+(defcustom general-describe-keybinding-sort-function nil
+  "Function used to sort keybindings for `general-describe-keybindings'."
+  :group 'general
+  :type '(choice function (const nil)))
+
+(defcustom general-describe-state-sort-function
+  #'general--sort-evil-state-conses
+  "Function used to sort the states conses for `general-describe-keybindings'."
+  :group 'general
+  :type '(choice function (const nil)))
+
+(defcustom general-describe-keymap-sort-function nil
+  "Function used to sort the keymap conses`general-keybindings' for
+`general-describe-keybindings'."
+  :group 'general
+  :type '(choice function (const nil)))
+
+(defcustom general-describe-priority-keymaps
+  '(local
+    global
+    evil-insert-state-map
+    evil-emacs-state-map
+    evil-hybrid-state-map
+    evil-normal-state-map
+    evil-visual-state-map
+    evil-motion-state-map
+    evil-operator-state-map
+    evil-replace-state-map
+    evil-inner-text-objects-map
+    evil-outer-text-objects-map
+    evil-ex-search-keymap
+    evil-ex-completion-map
+    evil-command-window-mode-map
+    evil-window-map)
+  "Keymaps to print first for `general-describe-keybindings'."
+  :group 'general
+  :type '(repeat sybmol))
+
+(defcustom general-describe-update-previous-definition 'on-change
+  "Whether to update the previous definition when a key is bound.
+When set to 'on-change, the previous definition will only be updated when the
+definition changes (e.g. re-evaluating a file with keybindings will not affect
+the stored previous definition). When set to nil, it will only be updated when
+the key was previously unbound."
+  :group 'general
+  ;; can't think of a use case, but add 'always if requested
+  ;; t is equivalent of on-change
+  :type '(choice
+          (const :tag "When definition has changed" on-change)
+          (const :tag "When the key was previously unbound" nil)))
+
+;; * Override Minor Modes
+(defcustom general-override-auto-enable t
+  "Whether to automatically enable `general-override-mode'.
+If non-nil, enable `general-override-mode' when binding a key in
+`general-override-mode-map'."
+  :group 'general
+  :type 'boolean)
+
+(defvar general-override-mode-map (make-sparse-keymap)
+  "A keymap that will take priority over other minor mode keymaps.
+This is only for non-evil keybindings (it won't override keys bound with
+`evil-define-key'.")
+
+(define-minor-mode general-override-mode
+  "A global minor mode used for key definitions that should override others."
+  :lighter ""
+  :global t
+  :require 'general
+  :keymap general-override-mode-map)
+
+(defvar-local general-override-local-mode-map nil
+  "A keymap that will take priority over other minor mode keymaps.
+This keymap is buffer-local and will take precedence over
+`general-override-mode-map'. General uses this keymap when creating non-evil
+local keybindings.")
+(put 'general-override-local-mode-map 'permanent-local t)
+
+(define-minor-mode general-override-local-mode
+  "A local minor mode used for key definitions that should override others."
+  :lighter ""
+  :keymap general-override-local-mode-map)
+
+(defvar-local general-maps-alist
+  `((general-override-mode . ,general-override-mode-map))
+  "Holds the (mode . keymap) pairs for general's override modes.")
+;; not affected by changing major modes
+(put 'general-maps-alist 'permanent-local t)
+
+(defvar-local general--maps-alist-updated nil
+  "Whether `general-maps-alist' has been set correctly for the current buffer.")
+(put 'general-maps-alist 'permanent-local t)
+
+(declare-function evil-make-intercept-map "evil-core")
+(defun general-override-make-intercept-maps (_sym states)
+  "Make intercept keymaps for STATES in `general-override-mode-map'.
+This means that keys bound in STATES for `general-override-mode-map' will take
+precedence over keys bound in other evil auxiliary maps."
+  ;; can't use `general-with-eval-after-load' here; not available
+  (with-eval-after-load 'evil
+    ;; TODO eventually use new evil-make-intercept-map arg
+    (dolist (state states)
+      (evil-make-intercept-map
+       (evil-get-auxiliary-keymap general-override-mode-map state t t)
+       state))))
+
+(defcustom general-override-states
+  '(insert
+    emacs
+    hybrid
+    normal
+    visual
+    motion
+    operator
+    replace)
+  "States to make intercept maps for in `general-override-mode-map'.
+Note that this uses :set, meaning that if you want to change the value, you
+should either set it using customize (e.g. `general-setq' or
+`customize-set-variable') or set it before loading general if using `setq'."
+  :group 'general
+  :type '(repeat general-state)
+  :set #'general-override-make-intercept-maps)
+
+(defcustom general-use-package-emit-autoloads t
+  "Whether the `use-package' integration should autoload bound commands.
+By default, any command bound in the `:general' section of `use-package' is
+added to the list of autoloaded commands. Setting this variable to nil prevents
+such behavior.
+
+Note that if your configuration is byte-compiled, this variable needs to be set
+at macro-expansion time by putting it inside `eval-when-compile' or
+`eval-and-compile' before the `use-package' declarations. Use `eval-and-compile'
+instead of `eval-when-compile' if you would also like the variable to be set at
+load time (i.e. use-package forms evaluated after starting Emacs will also not
+generate autoloads).
+
+Also see the documentation of the `:no-autoload' keyword argument."
+  :group 'general
+  :type 'boolean)
+
+(defun general--update-maps-alist ()
+  "Update `general-maps-alist' for override modes.
+This is necessary to ensure `general-override-local-mode-map' is the buffer's
+local version."
+  (setq general-maps-alist
+        `((general-override-local-mode . ,general-override-local-mode-map)
+          (general-override-mode . ,general-override-mode-map))
+        general--maps-alist-updated t))
+
+(cl-pushnew 'general-maps-alist emulation-mode-map-alists)
+
+(defun general-local-map ()
+  "Return `general-override-local-mode-map', initializing it if necessary.
+Also turn on `general-override-local-mode' and update `general-maps-alist'."
+  (or general-override-local-mode (general-override-local-mode))
+  (unless (and general-override-local-mode-map
+               (local-variable-p 'general-override-local-mode-map))
+    (setq general-override-local-mode-map (make-sparse-keymap)))
+  (unless general--maps-alist-updated
+    (general--update-maps-alist))
+  general-override-local-mode-map)
+
+;; * General Helpers
+(defmacro general-with-eval-after-load (file &rest body)
+  "Like `with-eval-after-load' but don't always add to `after-load-alist'.
+When FILE has already been loaded, execute BODY immediately without adding it to
+`after-load-alist'."
+  (declare (indent 1)
+           (debug t))
+  `(if (if (stringp ,file)
+           (load-history-filename-element
+            (purecopy (load-history-regexp ,file)))
+         (featurep ,file))
+       (progn ,@body)
+     (eval-after-load ,file (lambda () ,@body))))
+
+(defalias 'general-after #'general-with-eval-after-load)
+
+(defun general--unalias (symbol &optional statep)
+  "Return the full keymap or state name associated with SYMBOL.
+If STATEP is non-nil, check `general-state-aliases' instead of
+`general-keymap-aliases'."
+  (let ((match
+         (cdr (cl-assoc symbol
+                        (if statep
+                            general-state-aliases
+                          general-keymap-aliases)
+                        ;; test-fn is new to assoc in 26.1
+                        :test (lambda (symbol key)
+                                (or (eq symbol key)
+                                    (ignore-errors (memq symbol key))))))))
+    (or match symbol)))
+
+;; don't want to reuse `general--unalias' since the user can alter
+;; `general-keymap-aliases'
+(defun general--evil-keymap-for-state (state)
+  "Return a symbol corresponding to the global evil keymap for STATE."
+  (intern (concat "evil-" (symbol-name state) "-state-map")))
+
+(defun general--kbd (key)
+  "Use `kbd' on KEY when it is a string."
+  (if (stringp key)
+      (kbd key)
+    key))
+
+;; TODO refactor to be more straightforward
+(defun general--concat (nokbd &rest keys)
+  "Concatenate the strings in KEYS.
+If `general-implicit-kbd' is non-nil, interleave the strings in KEYS with
+spaces; unless NOKBD is non-nil, apply (kbd ...) to the result. If
+`general-implicit-kbd' is nil, just concatenate the keys."
+  (setq keys (remove nil keys))
+  (if general-implicit-kbd
+      (let ((keys (mapconcat (lambda (x)
+                               (if (vectorp x)
+                                   (key-description x)
+                                 x))
+                             keys " ")))
+        (if nokbd
+            keys
+          (kbd keys)))
+    (apply #'concat keys)))
+
+(defun general--apply-prefix-and-kbd (prefix maps)
+  "Prepend the PREFIX sequence to all the keys that are strings in MAPS.
+Also apply (kbd ...) to key and definition strings if `general-implicit-kbd' is
+non-nil."
+  (setq prefix (or prefix ""))
+  (cl-loop for (key def) on maps by 'cddr
+           collect (general--concat nil prefix key)
+           and collect def))
+
+(defun general--lookup-key (state keymap key &optional minor-mode-p)
+  "Return the current definition for STATE, KEYMAP, and KEY."
+  (when key
+    (let ((keymap (general--get-keymap state keymap minor-mode-p)))
+      (when keymap
+        (let ((def (lookup-key keymap key)))
+          (if (and (numberp def) (= def 1))
+              nil
+            def))))))
+
+(defun general--record-keybindings (keymap state maps &optional minor-mode-p)
+  "For KEYMAP and STATE, add MAPS to `general-keybindings'.
+If KEYMAP is \"local\", add MAPS to `general-local-keybindings.' For non-evil
+keybindings, STATE will be nil. Duplicate keys will be replaced with the new
+ones. MINOR-MODE-P should be non-nil when keymap corresponds to a minor-mode
+name (as used with `evil-define-minor-mode-key') as opposed to a keymap name."
+  (if (and state (not (featurep 'evil)))
+      (general-with-eval-after-load 'evil
+        (general--record-keybindings keymap state maps minor-mode-p))
+    (let* (keys
+           (maps (cl-loop
+                  for (key new-def _orig-def) on maps by 'cl-cdddr
+                  collect
+                  (list key
+                        new-def
+                        (let* ((current-def (general--lookup-key
+                                             state keymap key minor-mode-p))
+                               ;; none of these will fail if nil
+                               (keymap-cons (assq keymap general-keybindings))
+                               (state-cons (assq state (cdr keymap-cons)))
+                               (mapping (cl-find key (cdr state-cons)
+                                                 :test #'equal :key #'car))
+                               (previous-def (cl-caddr mapping)))
+                          (if (or
+                               (and current-def (not previous-def))
+                               (and general-describe-update-previous-definition
+                                    (not (equal new-def current-def))))
+                              current-def
+                            previous-def)))
+                  do (push key keys))))
+      (cond ((eq keymap 'local)
+             (unless (assq state general-local-keybindings)
+               (add-to-list 'general-local-keybindings (list state)))
+             (let ((state-cons (assq state general-local-keybindings)))
+               (setcdr state-cons
+                       ;; remove old duplicate keys
+                       (cl-remove-duplicates (append (cdr state-cons) maps)
+                                             :key #'car
+                                             :test #'equal))))
+            (t
+             (unless (assq keymap general-keybindings)
+               (add-to-list 'general-keybindings (list keymap)))
+             (unless (assq state (assq keymap general-keybindings))
+               (setcdr (assq keymap general-keybindings)
+                       (append (cdr (assq keymap general-keybindings))
+                               (list (list state)))))
+             (let ((state-cons (assq state (assq keymap general-keybindings))))
+               (setcdr state-cons
+                       (cl-remove-duplicates (append (cdr state-cons) maps)
+                                             :key #'car
+                                             :test #'equal))))))))
+
+;; don't force non-evil user to require evil for one function
+(defun general--delay (condition form hook &optional append local name)
+  "Execute FORM when CONDITION becomes true, checking with HOOK.
+NAME specifies the name of the entry added to HOOK. If APPEND is
+non-nil, the entry is appended to the hook. If LOCAL is non-nil,
+the buffer-local value of HOOK is modified.
+
+This is `evil-delay'."
+  (declare (indent 2))
+  (if (and (not (booleanp condition)) (eval condition))
+      (eval form)
+    (let* ((name (or name (format "general-delay-form-in-%s" hook)))
+           (fun (make-symbol name))
+           (condition (or condition t)))
+      (fset fun `(lambda (&rest args)
+                   (when ,condition
+                     (remove-hook ',hook #',fun ',local)
+                     ,form)))
+      (put fun 'permanent-local-hook t)
+      (add-hook hook fun append local))))
+
+(defun general--getf (def fallback-plist keyword)
+  "From DEF or FALLBACK-PLIST get the corresponding value for KEYWORD.
+FALLBACK-PLIST will be checked when KEYWORD does not exist in DEF (not in cases
+where it is explicitly specified as nil). If DEF isn't a general extended
+definition, only check in FALLBACK-PLIST."
+  (if (general--extended-def-p def)
+      (cl-getf def keyword
+               (cl-getf fallback-plist keyword))
+    (cl-getf fallback-plist keyword)))
+
+(defun general--getf2 (plist keyword1 keyword2)
+  "Check in PLIST for either KEYWORD1 or KEYWORD2."
+  (or (cl-getf plist keyword1)
+      (cl-getf plist keyword2)))
+
+(declare-function evil-get-minor-mode-keymap "evil-core")
+(declare-function evil-state-property "evil-common")
+(declare-function evil-get-auxiliary-keymap "evil-core")
+(cl-defun general--get-keymap (state &optional keymap
+                                     minor-mode
+                                     ignore-special)
+  "Transform STATE and the symbol or keymap KEYMAP into the appropriate keymap.
+If MINOR-MODE and STATE are non-nil, use `evil-get-minor-mode-keymap'. If
+IGNORE-SPECIAL is non-nil, do not try to resolve the \"special\" keymaps 'global
+and 'local. In this case, the only thing this function will do is return the
+actually keymap if KEYMAP is a symbol besides 'global or 'local. Otherwise the
+keymap returned depends on whether STATE is specified. Note that if STATE is
+specified, evil needs to be installed and will be required.
+
+STATE nil:
+'local  - Run/return `general-local-map'
+'global - Run/return `current-global-map'
+else    - Return keymap or (symbol-value keymap)
+
+STATE non-nil:
+'local  - Return the corresponding evil local map
+'global - Return the corresponding evil global map
+else    - Return the corresponding evil auxiliary or minor mode map"
+  (when (and (symbolp keymap)
+             (not (memq keymap '(global local))))
+    (setq keymap (symbol-value keymap)))
+  (when ignore-special
+    (cl-return-from general--get-keymap keymap))
+  (if state
+      (if (require 'evil nil t)
+          (cond ((or (null keymap)
+                     (eq keymap 'global))
+                 (evil-state-property state :keymap t))
+                (minor-mode
+                 (evil-get-minor-mode-keymap state keymap))
+                ((eq keymap 'local)
+                 (evil-state-property state :local-keymap t))
+                (t
+                 (evil-get-auxiliary-keymap keymap state t t)))
+        (error "Evil is required if state is specified"))
+    (cl-case keymap
+      (global (current-global-map))
+      (local (general-local-map))
+      (t keymap))))
+(define-obsolete-function-alias 'general--parse-keymap 'general--get-keymap
+  "2018-01-14")
+
+(defun general--remove-keyword-args (rest)
+  "Remove all keyword arguments from the list REST.
+Return a list of the altered REST list and a list of the removed keyword
+arguments. The order of arguments will be preserved. Note that the length of
+REST does not need to be even (i.e. there can be an odd number of positional
+arguments)."
+  (let (args
+        kargs)
+    (while rest
+      (cond ((keywordp (car rest))
+             (push (pop rest) kargs)
+             (push (pop rest) kargs))
+            (t
+             (push (pop rest) args))))
+    (list (nreverse args) (nreverse kargs))))
+
+(defmacro general--ensure-lists (&rest vars)
+  "Ensure that all variables in VARS are lists if they are not already.
+If any variable is a lambda, it will not be considered to be a list. If a var is
+nil, it will be set to (list nil)."
+  `(progn
+     ,@(mapcar (lambda (var)
+                 `(unless (and ,var
+                               (listp ,var)
+                               ;; lambdas are lists
+                               (not (functionp ,var)))
+                    (setq ,var (list ,var))))
+               vars)))
+
+;; TODO stop using `cl-gensym' for counter functionality
+(defvar general--counter 0
+  "Counter to use to prevent name clashes for automatically named functions.")
+
+;; * Extended Key Definition Language
+;; ** Variables
+(defvar general-extended-def-keywords
+  '(:which-key :wk :properties :repeat :jump)
+  "Extra keywords that are valid for extended definitions.
+
+These can work both locally (in extended definitions) and globally (in which
+case they apply to all definitions including normal ones). Note that not all
+keywords need to make sense/work globally. If the keyword should be ignored when
+used globally, add it to `general-extended-def-global-ignore-keywords' as well.
+
+For each keyword there should be a corresponding function named
+general-extended-def-:<keyword> which will be passed state, keymap (the symbol
+not actual keymap), key (the internal representation, i.e. `kbd' already called
+if necessary), edef (always a plist; normal definitions will automatically be
+converted), and kargs (the original `general-define-key' keyword argument plist;
+useful when the keyword can be used globally or has helper keywords that can be
+used globally). This function is only called for side effects; if you actually
+need to alter the definition, you should add the keyword to
+`general-rewrite-def-keywords' or `general-rewrite-def-after-keywords' instead.
+The order of those lists matters, but the order of this list does not.
+
+`general--get-keymap' may be useful for getting the actual keymap from the
+keymap symbol. `general--getf' may be useful for keywords (helper or main) that
+can be specified globally (in kargs) and overridden locally (in def).")
+
+(defvar general-rewrite-def-keywords
+  '(:keymap :prefix-command :prefix-keymap)
+  "Extended definition keywords that alter the definition.
+
+Each keyword should have a corresponding function named
+general-extended-def-:<keyword> and should return a new extended definition
+plist (with an altered :def entry). See `general-extended-def-keywords' for
+information on the arguments this function should take. These functions will be
+run in the order they appear in this list, and each will be passed the most
+recent version of the extended definition plist.
+
+In contrast to the functions for `general-rewrite-def-after-keywords', these
+functions will alter the definition before any `general-extended-def-keyword'
+functions run. For example, if your function creates a newly named wrapper
+command around the user-specified command, you'd want to add the keyword to this
+list, so that `general-extended-def-keywords' functions would have access to new
+command name (e.g. for :which-key to work properly). On the other hand, if the
+keyword, for example, involves putting the definition in an extended menu item
+like with :predicate, you should add to `general-rewrite-def-after-keywords'
+instead.")
+
+(defvar general-rewrite-def-after-keywords
+  '(:predicate)
+  "Extended definition keywords that alter the definition.
+See `general-rewrite-def-keywords' for more information.")
+
+(defvar general-extended-def-global-ignore-keywords
+  '(:keymap :prefix-command :prefix-map)
+  "Extended definitions that should be ignored when used globally.
+For example, :prefix-command and :prefix-map are handled differently when used
+globally (they have special interaction with other global keywords). :keymap, on
+the other hand, doesn't make sense at all globally.")
+
+;; ** Normal Extended Definition Functions
+;; *** Which Key Integration
+(defvar which-key-replacement-alist)
+(defun general--add-which-key-replacement (mode replacement)
+  (let* ((mode-match (assq mode which-key-replacement-alist))
+         (mode-alist (cdr mode-match)))
+    (cond (mode
+           (push replacement mode-alist)
+           (if mode-match
+               (setcdr mode-match mode-alist)
+             (push (cons mode mode-alist)
+                   which-key-replacement-alist)))
+          (t
+           (push replacement which-key-replacement-alist)))))
+
+(defvar which-key--prefix-title-alist)
+(defun general--add-which-key-title-prefix (mode keys title-prefix)
+  (let* ((mode-match (assq mode which-key--prefix-title-alist))
+         (title-mode-alist (cdr mode-match))
+         (title-cons (cons keys title-prefix)))
+    (cond (mode
+           (push title-cons title-mode-alist)
+           (if mode-match
+               (setcdr mode-match
+                       title-mode-alist)
+             (push (cons mode title-mode-alist)
+                   which-key--prefix-title-alist)))
+          (t
+           (push title-cons which-key--prefix-title-alist)))))
+
+(defun general--remove-map (keymap)
+  "Remove \"-map\" from the symbol KEYMAP." ;
+  (intern (replace-regexp-in-string "-map$" "" (symbol-name keymap))))
+
+;; TODO better documentation
+(defun general-extended-def-:which-key (_state keymap key edef kargs)
+  "Add a which-key description for KEY.
+If :major-modes is specified in EDEF, add the description for the corresponding
+major mode. KEY should not be in the kbd format (kbd should have already been
+run on it)."
+  (general-with-eval-after-load 'which-key
+    (let* ((wk (general--getf2 edef :which-key :wk))
+           (major-modes (general--getf edef kargs :major-modes))
+           (keymaps (plist-get kargs :keymaps))
+           ;; index of keymap in :keymaps
+           (keymap-index (cl-dotimes (ind (length keymaps))
+                           (when (eq (nth ind keymaps) keymap)
+                             (cl-return ind))))
+           (mode (let ((mode (if (and major-modes (listp major-modes))
+                                 (nth keymap-index major-modes)
+                               major-modes)))
+                   (if (eq mode t)
+                       (general--remove-map keymap)
+                     mode)))
+           (key (key-description key))
+           (key-regexp (concat (when (general--getf edef kargs :wk-full-keys)
+                                 "\\`")
+                               (regexp-quote key)
+                               "\\'"))
+           (prefix (plist-get kargs :prefix))
+           (binding (or (when (and (plist-get edef :def)
+                                   (not (plist-get edef :keymp)))
+                          (plist-get edef :def))
+                        (when (and prefix
+                                   (string= key prefix))
+                          (plist-get kargs :prefix-command))))
+           (replacement (cond ((stringp wk)
+                               (cons nil wk))
+                              (t
+                               wk)))
+           (match/replacement
+            (cons
+             (cons (when (general--getf edef kargs :wk-match-keys)
+                     key-regexp)
+                   (when (and (general--getf edef kargs :wk-match-binding)
+                              binding
+                              (symbolp binding))
+                     (regexp-quote (symbol-name binding))))
+             replacement)))
+      (general--add-which-key-replacement mode match/replacement)
+      (when (and (consp replacement)
+                 ;; lambda
+                 (not (functionp replacement)))
+        (general--add-which-key-title-prefix
+         mode key (cdr replacement))))))
+
+(defalias 'general-extended-def-:wk #'general-extended-def-:which-key)
+
+;; *** Evil Integration
+(declare-function evil-add-command-properties "evil-common")
+(defun general-extended-def-:properties (_state _keymap _key edef kargs)
+  "Use `evil-add-command-properties' to add properties to a command.
+The properties should be specified with :properties in either EDEF or KARGS."
+  (general-with-eval-after-load 'evil
+    (let ((properties (general--getf edef kargs :properties))
+          (command (cl-getf edef :def)))
+      (apply #'evil-add-command-properties command properties))))
+
+(defun general-extended-def-:repeat (_state _keymap _key edef kargs)
+  "Use `evil-add-command-properties' to set the :repeat property for a command.
+The repeat property should be specified with :repeat in either EDEF or KARGS."
+  (general-with-eval-after-load 'evil
+    (let ((repeat-property (general--getf edef kargs :repeat))
+          (command (cl-getf edef :def)))
+      (evil-add-command-properties command :repeat repeat-property))))
+
+(defun general-extended-def-:jump (_state _keymap _key edef kargs)
+  "Use `evil-add-command-properties' to set the :jump property for a command.
+The jump property should be specified with :jump in either EDEF or KARGS."
+  (general-with-eval-after-load 'evil
+    (let ((jump-property (general--getf edef kargs :jump))
+          (command (cl-getf edef :def)))
+      (evil-add-command-properties command :jump jump-property))))
+
+;; ** Extended Defintion Functions That Alter the Definition
+(defun general-extended-def-:keymap (state keymap _key edef kargs)
+  "Return an extended definition for a keymap or a \"autoloaded\" keymap.
+If the specified keymap does not exist, create a function that binds the keys it
+was invoked with in STATE and KEYMAP to the keymap specified in the extended
+definition EDEF and then act as if it was originally bound to that
+keymap (subsequent keys will be looked up in the keymap). KARGS or EDEF should
+contain the package in which the keymap is created (as specified with :package).
+If the keymap already exists, it will simply be returned."
+  (let ((bind-keymap-sym (plist-get edef :def))
+        (package (general--getf edef kargs :package))
+        (definer (general--getf edef kargs :definer)))
+    (if (boundp bind-keymap-sym)
+        (setf (cl-getf edef :def) (symbol-value bind-keymap-sym))
+      (if package
+          (setf (cl-getf edef :def)
+                ;; relying on lexical binding here
+                (lambda ()
+                  (interactive)
+                  (unless (or (featurep package)
+                              (require package nil t))
+                    (error (format "Failed to load package: %s" package)))
+                  (unless (and (boundp bind-keymap-sym)
+                               (keymapp (symbol-value bind-keymap-sym)))
+                    (error (format
+                            "A keymap called %s is not defined in the %s package"
+                            bind-keymap-sym package)))
+                  ;; use `this-command-keys' as `key' may not be the full sequence
+                  (let ((keys (this-command-keys))
+                        (general-implicit-kbd nil))
+                    (general-define-key
+                     :states state
+                     :keymaps keymap
+                     :definer definer
+                     keys (symbol-value bind-keymap-sym))
+                    (setq prefix-arg current-prefix-arg
+                          unread-command-events
+                          (mapcar (lambda (ev) (cons t ev))
+                                  (listify-key-sequence keys))))))
+        (error "In order to \"autoload\" a keymap, :package must be specified"))))
+  edef)
+
+(defun general--define-prefix (command-name &optional map-name menu-name)
+  "Define a prefix command and/or keymap.
+COMMAND-NAME corresponds to the prefix command name. When COMMAND-NAME is
+non-nil, `define-prefix-command' will be used and will be passed MAP-NAME and
+MENU-NAME. When COMMAND-NAME is nil and MAP-NAME is non-nil, only a prefix
+keymap will be created, and its menu name/prompt will be set to MENU-NAME (if
+MENU-NAME is non-nil). Existing prefix keymaps/commands will not be
+recreated/rebound."
+  (if (or (and command-name (fboundp command-name))
+          (and map-name (boundp map-name)))
+      (or command-name (symbol-value map-name))
+    (cond (command-name
+           (define-prefix-command command-name map-name menu-name))
+          (map-name
+           (eval `(defvar ,map-name (make-sparse-keymap ,menu-name)))))))
+
+(defun general-extended-def-:prefix-command (_state _keymap _key edef _kargs)
+  "Create and return a prefix command or map for the extended definition EDEF.
+The :prefix-command, :prefix-map, and :prefix-name properties from EDEF are
+passed to `general--define-prefix'."
+  ;; NOTE will be called twice if both specified, but doesn't matter because
+  ;; won't recreate prefix-command
+  (setf (cl-getf edef :def)
+        (general--define-prefix (plist-get edef :prefix-command)
+                                (plist-get edef :prefix-map)
+                                (plist-get edef :prefix-name)))
+  edef)
+
+(defalias 'general-extended-def-:prefix-map
+  #'general-extended-def-:prefix-command)
+
+;; http://endlessparentheses.com/define-context-aware-keys-in-emacs.html
+(defun general-extended-def-:predicate (_state _keymap _key edef kargs)
+  "Return an altered extended definition EDEF with a predicate applied.
+The predicate is obtained either from EDEF or KARGS."
+  (let ((def (cl-getf edef :def))
+        (predicate (general--getf edef kargs :predicate)))
+    (setf (cl-getf edef :def)
+          `(menu-item
+            "" nil
+            :filter (lambda (&optional _)
+                      (when ,predicate
+                        ',def))))
+    edef))
+
+;; ** Parsing Extended Definitions
+(defun general--extended-def-p (def)
+  "Return whether DEF is an extended definition."
+  (and (listp def)
+       (not (keymapp def))
+       ;; lambda
+       (not (functionp def))
+       (not (eq (car def) 'menu-item))
+       ;; will error on cons
+       (ignore-errors (cl-some #'keywordp def))))
+
+(defun general--normalize-extended-def (edef)
+  "Rewrite the extended definition EDEF to include a :def property.
+If EDEF is not an extended defintion, make it into one.
+
+This handles the allowed shorthand syntax. For example, these are the same:
+
+ (some-func)
+ (:def some-func)
+
+Some extended definition keywords can be used instead of :def (mainly for
+backwards compatibility). For example, these are the same:
+
+ (some-keymap :keymap t)
+ (:keymap some-keymap)
+ (:def some-keymap :keymap t)"
+  ;; NOTE: This is absolutely necessary for plist functions to work
+  (if (general--extended-def-p edef)
+      (unless (keywordp (car edef))
+        (setq edef (cons :def edef)))
+    (setq edef (list :def edef)))
+  ;; :keymap checks :def always instead of :keymap, and :which-key also checks
+  ;; :def always (instead of :prefix-command)
+  ;; note that :keymap and :prefix-map will later rewrite their :def to the
+  ;; actual keymap value
+  (unless (plist-get edef :def)
+    (setf (cl-getf edef :def)
+          (cl-getf edef :keymap
+                   (cl-getf edef :prefix-command
+                            (plist-get edef :prefix-map)))))
+  edef)
+
+(defun general--extract-def (edef)
+  "Return the bindable definition from the extended definition EDEF."
+  (if (plist-get edef :ignore)
+      ;; just for side effects (e.g. which-key description for prefix)
+      ;; return something that isn't a valid definition
+      :ignore
+    (plist-get edef :def)))
+
+(defun general--run-extended-def-functions (state keymap key edef kargs)
+  "Run the extended definition functions for the matched keywords.
+Pass each extended definition function STATE, KEYMAP, KEY, EDEF, and KARGS. For
+each keyword from `general-extended-def-keywords',
+`general-rewrite-def-keywords', and `general-rewrite-def-after-keywords' found
+in EDEF or KARGS, call the corresponding function named
+general-extended-def-:<keyword>. The functions for
+`general-rewrite-def-keywords' will rewrite the extended definition plist before
+the functions for `general-extended-def-keywords' are called, and the functions
+for `general-rewrite-def-after-keywords' are called after that. Functions
+are called in the order they appear in each list. Finally, return the
+potentially altered extended definition plist."
+  (cl-flet ((run-edef-functions
+             (keywords &optional alter-def)
+             (dolist (keyword keywords)
+               (when (or (plist-member edef keyword)
+                         (and (not
+                               (memq
+                                keyword
+                                general-extended-def-global-ignore-keywords))
+                              (plist-member kargs keyword)))
+                 (let ((ret (funcall
+                             (intern (format "general-extended-def-%s" keyword))
+                             state keymap key edef kargs)))
+                   (when alter-def
+                     (setq edef ret)))))))
+    (run-edef-functions general-rewrite-def-keywords t)
+    (run-edef-functions general-extended-def-keywords)
+    (run-edef-functions general-rewrite-def-after-keywords t))
+  edef)
+
+(defun general--parse-def (state keymap key def kargs)
+  "Rewrite DEF into a valid/bindable definition.
+This function will execute all extended definitions, potentially rewriting the
+original definition (e.g. applying a predicate). Pass STATE, KEYMAP, KEY, DEF, and
+KARGS to each matched extended definition function. See
+`general--run-extended-def-functions' for more information."
+  (setq def (general--normalize-extended-def def))
+  (general--extract-def
+   (general--run-extended-def-functions state keymap key def kargs)))
+
+(defun general--parse-maps (state keymap maps kargs)
+  "Rewrite MAPS so that the definitions are bindable.
+This includes possibly calling `kbd' on keys and parsing extended definitions.
+Turn key/binding pairs in MAPS into triples in the form of (key parsed-def
+original-def) where parsed-def is the bindable form and original-def is the
+original definition as an extended definition plist (turn normal definitions
+into extended definition plists and implicitly add \":def\" to the beginning of
+extended definitions when necessary)."
+  (let (bindable-def)
+    (cl-loop for (key def) on maps by 'cddr
+             do (setq bindable-def
+                      (general--parse-def state keymap key def kargs))
+             unless (eq bindable-def :ignore)
+             collect key
+             and collect (if general-implicit-kbd
+                             (general--kbd bindable-def)
+                           bindable-def)
+             and collect (general--normalize-extended-def def))))
+
+;; * Helper Key Definers
+(declare-function evil-define-minor-mode-key "evil-core")
+(defun general-minor-mode-define-key (state mode key def _orig-def _kargs)
+  "A wrapper for `evil-define-minor-mode-key'."
+  (general-with-eval-after-load 'evil
+    (evil-define-minor-mode-key state mode key def)))
+
+(declare-function lispy-define-key "lispy")
+(defun general-lispy-define-key (_state keymap key def orig-def kargs)
+  "A wrapper for `lispy-define-key'."
+  (general-with-eval-after-load 'lispy
+    (let* ((keymap (general--get-keymap nil keymap))
+           (key (key-description key))
+           (plist (general--getf orig-def kargs :lispy-plist)))
+      (apply #'lispy-define-key keymap key def plist))))
+
+(declare-function worf-define-key "worf")
+(defun general-worf-define-key (_state keymap key def orig-def kargs)
+  "A wrapper for `worf-define-key'."
+  (general-with-eval-after-load 'worf
+    (let* ((keymap (general--get-keymap nil keymap))
+           (key (key-description key))
+           (plist (general--getf orig-def kargs :worf-plist)))
+      (apply #'worf-define-key keymap key def plist))))
+
+(declare-function lpy-define-key "lpy")
+(defun general-lpy-define-key (_state keymap key def _orig-def _kargs)
+  "A wrapper for `lpy-define-key'."
+  (general-with-eval-after-load 'lpy
+    (let* ((keymap (general--get-keymap nil keymap))
+           (key (key-description key)))
+      (lpy-define-key keymap key def))))
+
+(declare-function evil-define-key* "evil-core")
+(defun general--define-key-dispatch (state keymap maps kargs)
+  "In STATE (if non-nil) and KEYMAP, bind MAPS.
+MAPS is composed of triplets of (key parsed-def original-def). This function
+determines the appropriate base definer function to use based depending on
+whether :definer is present in original-def or KARGS or whether STATE is
+non-nil if no custom definer is specified."
+  (when (and general-override-auto-enable
+             (eq keymap 'general-override-mode-map)
+             (not general-override-mode))
+    (general-override-mode))
+  (while maps
+    (let* ((key (pop maps))
+           (def (pop maps))
+           (orig-def (pop maps))
+           (definer (general--getf orig-def kargs :definer)))
+      (if definer
+          (funcall (intern (format "general-%s-define-key"
+                                   (symbol-name definer)))
+                   state keymap key def orig-def kargs)
+        (cond (state
+               ;; just to get the symbol-value of the keymap when it is not
+               ;; global/local
+               (setq keymap (general--get-keymap nil keymap nil t))
+               (general-with-eval-after-load 'evil
+                 (evil-define-key* state keymap key def)))
+              (t
+               (setq keymap (general--get-keymap nil keymap))
+               (define-key keymap key def)))))))
+
+(defvar general--definer-p nil
+  "Whether the current keybinding is being created with `general-define-key'.")
+
+(defun general--define-key
+    (state keymap maps non-normal-maps global-maps kargs)
+  "A helper function for `general-define-key'.
+Choose based on STATE and KEYMAP which of MAPS, NON-NORMAL-MAPS, and GLOBAL-MAPS
+to use for the keybindings. This function will rewrite extended definitions, add
+predicates when applicable, and then choose the base function to bind the keys
+with by calling `general--define-key-dispatch'."
+  (let ((general--definer-p t))
+    (let* ((non-normal-p (if state
+                             (memq state general-non-normal-states)
+                           (memq keymap
+                                 (mapcar #'general--evil-keymap-for-state
+                                         general-non-normal-states))))
+           (valid-maps (list (cond ((and non-normal-maps non-normal-p)
+                                    non-normal-maps)
+                                   ((and global-maps non-normal-p)
+                                    nil)
+                                   (t
+                                    maps))
+                             global-maps)))
+      (dolist (maps valid-maps)
+        (when maps
+          (setq maps (general--parse-maps state keymap maps kargs))
+          ;; NOTE: :definer 'minor-mode cannot be specified locally
+          (general--record-keybindings keymap state maps
+                                       (eq (cl-getf kargs :definer)
+                                           'minor-mode))
+          (general--define-key-dispatch state keymap maps kargs))))))
+
+;; * Functions With Keyword Arguments
+;;;###autoload
+(cl-defun general-define-key
+    (&rest maps &key
+           definer
+           (states general-default-states)
+           (keymaps general-default-keymaps keymaps-specified-p)
+           (prefix general-default-prefix)
+           (non-normal-prefix general-default-non-normal-prefix)
+           (global-prefix general-default-global-prefix)
+           infix
+           prefix-command
+           prefix-map
+           prefix-name
+           predicate
+           ;; related to extended definitions
+           package
+           properties
+           repeat
+           jump
+           major-modes
+           (wk-match-keys t)
+           (wk-match-binding t)
+           (wk-full-keys t)
+           ;; for custom key definers
+           lispy-plist
+           worf-plist
+           &allow-other-keys)
+  "The primary key definition function provided by general.el.
+
+Define MAPS, optionally using DEFINER, in the keymap(s) corresponding to STATES
+and KEYMAPS.
+
+MAPS consists of paired keys (vectors or strings; also see
+`general-implicit-kbd') and definitions (those mentioned in `define-key''s
+docstring and general.el's \"extended\" definitions). All pairs (when not
+ignored) will be recorded and can be later displayed with
+`general-describe-keybindings'.
+
+If DEFINER is specified, a custom key definer will be used to bind MAPS. See
+general.el's documentation/README for more information.
+
+Unlike with normal key definitions functions, the keymaps in KEYMAPS should be
+quoted (this allows using the keymap name for other purposes, e.g. deferring
+keybindings if the keymap symbol is not bound, optionally inferring the
+corresponding major mode for a symbol by removing \"-map\" for :which-key,
+easily storing the keymap name for use with `general-describe-keybindings',
+etc.). Note that general.el provides other key definer macros that do not
+require quoting keymaps.
+
+STATES corresponds to the evil state(s) to bind the keys in. Non-evil users
+should not set STATES. When STATES is non-nil, `evil-define-key*' will be
+used (the evil auxiliary keymaps corresponding STATES and KEYMAPS will be used);
+otherwise `define-key' will be used (unless DEFINER is specified). KEYMAPS
+defaults to 'global. There is also 'local, which create buffer-local
+keybindings for both evil and non-evil keybindings. There are other special,
+user-alterable \"shorthand\" symbols for keymaps and states (see
+`general-keymap-aliases' and `general-state-aliases').
+
+Note that STATES and KEYMAPS can either be lists or single symbols. If any
+keymap does not exist, those keybindings will be deferred until the keymap does
+exist, so using `eval-after-load' is not necessary with this function.
+
+PREFIX corresponds to a key to prefix keys in MAPS with and defaults to none. To
+bind/unbind a key specified with PREFIX, \"\" can be specified as a key in
+MAPS (e.g. ...:prefix \"SPC\" \"\" nil... will unbind space).
+
+The keywords in this paragraph are only useful for evil users. If
+NON-NORMAL-PREFIX is specified, this prefix will be used instead of PREFIX for
+states in `general-non-normal-states' (e.g. the emacs and insert states). This
+argument will only have an effect if one of these states is in STATES or if
+corresponding global keymap (e.g. `evil-insert-state-map') is in KEYMAPS.
+Alternatively, GLOBAL-PREFIX can be used with PREFIX and/or NON-NORMAL-PREFIX to
+bind keys in all states under the specified prefix. Like with NON-NORMAL-PREFIX,
+GLOBAL-PREFIX will prevent PREFIX from applying to `general-non-normal-states'.
+INFIX can be used to append a string to all of the specified prefixes. This is
+potentially useful when you are using GLOBAL-PREFIX and/or NON-NORMAL-PREFIX so
+that you can sandwich keys in between all the prefixes and the specified keys in
+MAPS. This may be particularly useful if you are using default prefixes in a
+wrapper function/macro so that you can add to them without needing to re-specify
+all of them. If none of the other prefix keyword arguments are specified, INFIX
+will have no effect.
+
+If PREFIX-COMMAND or PREFIX-MAP is specified, a prefix command and/or keymap
+will be created. PREFIX-NAME can be additionally specified to set the keymap
+menu name/prompt. If PREFIX-COMMAND is specified, `define-prefix-command' will
+be used. Otherwise, only a prefix keymap will be created. Previously created
+prefix commands/keymaps will never be redefined/cleared. All prefixes (including
+the INFIX key, if specified) will then be bound to PREFIX-COMMAND or PREFIX-MAP.
+If the user did not specify any PREFIX or manually specify any KEYMAPS, general
+will bind all MAPS in the prefix keymap corresponding to either PREFIX-MAP or
+PREFIX-COMMAND instead of in the default keymap.
+
+PREDICATE corresponds to a predicate to check to determine whether a definition
+should be active (e.g. \":predicate '(eobp)\"). Definitions created with a
+predicate will only be active when the predicate is true. When the predicate is
+false, key lookup will continue to search for a match in lower-precedence
+keymaps.
+
+In addition to the normal definitions supported by `define-key', general.el also
+provides \"extended\" definitions, which are plists containing the normal
+definition as well as other keywords. For example, PREDICATE can be specified
+globally or locally in an extended definition. New global (~general-define-key~)
+and local (extended definition) keywords can be added by the user. See
+`general-extended-def-keywords' and general.el's documentation/README for more
+information.
+
+PACKAGE is the global version of the extended definition keyword that specifies
+the package a keymap is defined in (used for \"autoloading\" keymaps)
+
+PROPERTIES, REPEAT, and JUMP are the global versions of the extended definition
+keywords used for adding evil command properties to commands.
+
+MAJOR-MODES, WK-MATCH-KEYS, WK-MATCH-BINDINGS, and WK-FULL-KEYS are the
+corresponding global versions of which-key extended definition keywords. They
+will only have an effect for extended definitions that specify :which-key or
+:wk. See the section on extended definitions in the general.el
+documentation/README for more information.
+
+LISPY-PLIST and WORF-PLIST are the global versions of extended definition
+keywords that are used for each corresponding custom DEFINER."
+  ;; to silence compiler warning; variables that are later extracted from kargs
+  (ignore definer
+          predicate
+          package
+          properties
+          repeat
+          jump
+          major-modes
+          lispy-plist
+          worf-plist)
+  (let ((prefix-def (or prefix-command
+                        (when prefix-map
+                          (list :keymap prefix-map))))
+        non-normal-prefix-maps
+        global-prefix-maps
+        kargs)
+    ;; don't force the user to wrap a single state or keymap in a list
+    (general--ensure-lists states keymaps)
+    ;; unalias states and keymaps
+    (setq states (mapcar (lambda (state) (general--unalias state t))
+                         states))
+    (setq keymaps (mapcar #'general--unalias keymaps))
+    ;; remove keyword arguments from rest var
+    (let ((split-maps (general--remove-keyword-args maps)))
+      (setq maps (car split-maps)
+            ;; order will be preserved; matters for duplicates
+            kargs (append
+                   (list
+                    ;; should be included even if not manually specified
+                    ;; (because have non-nil defaults)
+                    :wk-match-keys wk-match-keys
+                    :wk-match-binding wk-match-binding
+                    :wk-full-keys wk-full-keys
+                    ;; so :keymaps and :states are always lists in kargs
+                    ;; needed for matching against :major-modes
+                    :keymaps keymaps
+                    ;; for consistency; may be useful in future or for user
+                    :states states)
+                   (cadr split-maps))))
+    (general--define-prefix prefix-command prefix-map prefix-name)
+    (when (and (or prefix-map prefix-command)
+               (not (or prefix keymaps-specified-p)))
+      (setq keymaps (list (or prefix-map prefix-command))))
+    ;; TODO reduce code duplication here
+    (when non-normal-prefix
+      (setq non-normal-prefix-maps
+            (general--apply-prefix-and-kbd
+             (general--concat t non-normal-prefix infix)
+             (append (when (and prefix prefix-def)
+                       (list "" prefix-def))
+                     maps))))
+    (when global-prefix
+      (setq global-prefix-maps
+            (general--apply-prefix-and-kbd
+             (general--concat t global-prefix infix)
+             (append (when (and prefix prefix-def)
+                       (list "" prefix-def))
+                     maps))))
+    ;; last so not applying prefix twice
+    (setq maps (general--apply-prefix-and-kbd
+                (general--concat t prefix infix)
+                (append (when (and prefix prefix-def)
+                          (list "" prefix-def))
+                        maps)))
+    (dolist (keymap keymaps)
+      (dolist (state (or states (list nil)))
+        (general--delay `(or (boundp ',keymap)
+                             (and (memq ',keymap '(local global))
+                                  (if ',state
+                                      ;; this is `evil-state-p'
+                                      (and (boundp 'evil-state-properties)
+                                           (assq ',state evil-state-properties))
+                                    t)))
+            `(general--define-key ',state
+                                  ',keymap
+                                  ',maps
+                                  ',non-normal-prefix-maps
+                                  ',global-prefix-maps
+                                  ',kargs)
+          'after-load-functions t nil
+          (symbol-name
+           (cl-gensym (format "general-define-key-in-%s" keymap))))))))
+
+;;;###autoload
+(defmacro general-emacs-define-key (keymaps &rest args)
+  "A wrapper for `general-define-key' that is similar to `define-key'.
+It has a positional argument for KEYMAPS (that will not be overridden by a later
+:keymaps argument). Besides this, it acts the same as `general-define-key', and
+ARGS can contain keyword arguments in addition to keybindings. This can
+basically act as a drop-in replacement for `define-key', and unlike with
+`general-define-key', KEYMAPS does not need to be quoted."
+  (declare (indent 1))
+  `(general-define-key
+    :keymaps ,(if (and (listp keymaps)
+                       (eq (car keymaps) 'quote))
+                  `,keymaps
+                `',keymaps)
+    ,@args))
+
+;;;###autoload
+(defmacro general-evil-define-key (states keymaps &rest args)
+  "A wrapper for `general-define-key' that is similar to `evil-define-key'.
+It has positional arguments for STATES and KEYMAPS (that will not be overridden
+by a later :keymaps or :states argument). Besides this, it acts the same as
+`general-define-key', and ARGS can contain keyword arguments in addition to
+keybindings. This can basically act as a drop-in replacement for
+`evil-define-key', and unlike with `general-define-key', KEYMAPS does not need
+to be quoted."
+  (declare (indent 2))
+  `(general-define-key
+    :states ,(if (and (listp states)
+                      (eq (car states) 'quote))
+                 `,states
+               `',states)
+    :keymaps ,(if (and (listp keymaps)
+                       (eq (car keymaps) 'quote))
+                  `,keymaps
+                `',keymaps)
+    ,@args))
+
+(defun general--positional-arg-p (arg)
+  "Return whether ARG is a positional argument for a key definer.
+Keyword arguments and strings/vectors are not considered positional arguments."
+  (and arg
+       (or (symbolp arg) (listp arg))
+       (not (keywordp arg))))
+
+;;;###autoload
+(defmacro general-def (&rest args)
+  "General definer that takes a variable number of positional arguments in ARGS.
+This macro will act as `general-define-key', `general-emacs-define-key', or
+`general-evil-define-key' based on how many of the initial arguments do not
+correspond to keybindings. All quoted and non-quoted lists and symbols before
+the first string, vector, or keyword are considered to be positional arguments.
+This means that you cannot use a function or variable for a key that starts
+immediately after the positional arguments. If you need to do this, you should
+use one of the definers that `general-def' dispatches to or explicitly separate
+the positional arguments from the maps with a bogus keyword pair like
+\":start-maps t\""
+  (declare (indent defun))
+  (let ((pos-args 0))
+    (while (general--positional-arg-p (nth pos-args args))
+      (cl-incf pos-args))
+    (cl-case pos-args
+      (0
+       `(general-define-key ,@args))
+      (1
+       `(general-emacs-define-key ,@args))
+      (2
+       `(general-evil-define-key ,@args)))))
+
+;;;###autoload
+(cl-defmacro general-create-definer (name &rest defaults &key wrapping
+                                          &allow-other-keys)
+  "A helper macro to create wrappers for `general-def'.
+This can be used to create key definers that will use a certain keymap, evil
+state, prefix key, etc. by default. NAME is the wrapper name and DEFAULTS are
+the default arguments. WRAPPING can also be optionally specified to use a
+different definer than `general-def'. It should not be quoted."
+  (declare (indent defun))
+  (let ((defaults (cl-loop for (key val) on defaults by 'cddr
+                           unless (eq key :wrapping)
+                           collect key
+                           and collect val))
+        (definer (or wrapping 'general-def)))
+    `(defmacro ,name (&rest args)
+       ,(let ((print-quoted t))
+          (format
+           "A wrapper for `%s'.
+
+It has the following defaults:
+%s"
+           definer defaults))
+       (declare (indent defun))
+       ;; can still override keywords afterwards (first keyword takes precedence)
+       `(,',definer
+         ,@args ,@',defaults))))
+
+(defun general--starter-arg-p (arg)
+  "Return whether ARG is a keyword or positional argument for a key definer."
+  (or (keywordp arg)
+      (general--positional-arg-p arg)))
+
+(defun general--parse-defs-arglists (args)
+  "Parse ARGS to `general-defs' into a list of `general-def' arglists.
+ARGS is split on \"starter arguments\" as determined by
+`general--starter-arg-p'."
+  (let (arglists
+        arglist)
+    (while args
+      (while (and args (general--starter-arg-p (car args)))
+        (when (keywordp (car args))
+          (push (pop args) arglist))
+        (push (pop args) arglist))
+      (while (and args (not (general--starter-arg-p (car args))))
+        (push (pop args) arglist)
+        (push (pop args) arglist))
+      (push (nreverse arglist) arglists)
+      (setq arglist nil))
+    (nreverse arglists)))
+
+;;;###autoload
+(defmacro general-defs (&rest args)
+  "A wrapper that splits into multiple `general-def's.
+Each consecutive grouping of positional argument followed by keyword/argument
+pairs (having only one or the other is fine) marks the start of a new section.
+Each section corresponds to one use of `general-def'. This means that settings
+only apply to the keybindings that directly follow.
+
+Since positional arguments can appear at any point, unqouted symbols are always
+considered to be positional arguments (e.g. a keymap). This means that variables
+can never be used for keys with `general-defs'. Variables can still be used for
+definitions or as arguments to keywords."
+  (declare (indent defun)
+           (debug [&rest sexp]))
+  `(progn
+     ,@(mapcar (lambda (arglist)
+                 (cons 'general-def arglist))
+               (general--parse-defs-arglists args))))
+
+;;;###autoload
+(cl-defmacro general-unbind (&rest args)
+  "A wrapper for `general-def' to unbind multiple keys simultaneously.
+Insert after all keys in ARGS before passing ARGS to `general-def.' \":with
+ #'func\" can optionally specified to use a custom function instead (e.g.
+ `ignore')."
+  (declare (indent defun))
+  ;; Note: :with can be at an odd position, so must handle internally and not
+  ;; with &key
+  (let* (with
+         (split-args (general--remove-keyword-args args))
+         (kargs (cl-loop for (key val) on (cadr split-args) by 'cddr
+                         if (eq key :with)
+                         do (setq with val)
+                         else
+                         collect key
+                         and collect val))
+         (positional-args-and-maps
+          ;; interleave appropriate definitions into maps
+          (cl-loop for key in (car split-args)
+                   collect key
+                   and
+                   unless (general--positional-arg-p key)
+                   collect (if (eq with t)
+                               nil
+                             with)))
+         (args (append positional-args-and-maps kargs)))
+    `(general-def ,@args)))
+
+;; * Displaying Keybindings
+(defun general--to-string (x)
+  "Convert key vector or symbol X to a string."
+  (cond ((vectorp x)
+         (key-description x))
+        ((symbolp x)
+         (symbol-name x))
+        (t
+         x)))
+
+;; these sorting functions assume x != y (which will hold true for
+;; `general-keybindings')
+(defun general--< (x y)
+  "Return t if X is alphabetically less than Y.
+Each should be either a string, symbol, or vector. Nil is a special case and is
+considered the \"smallest\"."
+  (cond ((null x)
+         t)
+        ((null y)
+         nil)
+        (t
+         (setq x (general--to-string x)
+               y (general--to-string y))
+         (string< x y))))
+
+(defun general-sort-by-car (list)
+  "Sort LIST by comparing the car of each element with `general--<'."
+  (cl-sort list #'general--< :key #'car))
+
+(defun general-sort-by-cadr (list)
+  "Sort LIST by comparing the cadr of each element with `general--<'."
+  (cl-sort list #'general--< :key #'cadr))
+
+(defvar general-describe-evil-states
+  '(nil
+    insert
+    emacs
+    hybrid
+    normal
+    visual
+    motion
+    operator
+    replace)
+  "Ordered list of evil states used for `general--evil-state-<'.")
+
+(defun general--evil-state-< (x y)
+  "Return t if evil state X should come before state Y.
+If X and Y are conses, the first element will be compared. Ordering is based on
+`general-describe-evil-states' or the symbol names for states not in the list."
+  (let ((xind (cl-position x general-describe-evil-states))
+        (yind (cl-position y general-describe-evil-states)))
+    (cond ((and (null xind)
+                (null yind))
+           (general--< x y))
+          ((null xind)
+           nil)
+          ((null yind)
+           t)
+          (t
+           (< xind yind)))))
+
+(defun general--sort-evil-state-conses (state-conses)
+  "Sort STATE-CONSES using `general--evil-state-<'."
+  (cl-sort state-conses #'general--evil-state-< :key #'car))
+
+(defun general--print-map (map)
+  "Print the keybinding MAP."
+  (cl-destructuring-bind (key command previous) map
+    (princ (concat
+            (replace-regexp-in-string
+             "\n" ""
+             (format "|=%.50s=|~%.50s~|~%.50s~|"
+                     (replace-regexp-in-string "|" "¦" (key-description key))
+                     command
+                     previous))
+            "\n"))))
+
+(defun general--print-maps-table (maps)
+  "Print an org table for MAPS."
+  (when general-describe-keybinding-sort-function
+    (setq maps (funcall general-describe-keybinding-sort-function maps)))
+  (princ "|key|command|previous|\n|-+-|\n")
+  (dolist (map maps)
+    (general--print-map map))
+  (princ "\n"))
+
+(defun general--print-state-heading (state-cons)
+  "Print a table and possibly a heading for STATE-CONS."
+  (let ((state (car state-cons))
+        (maps (cdr state-cons)))
+    (unless (null state)
+      (princ (capitalize (concat "** " (symbol-name state) " State\n"))))
+    (general--print-maps-table maps)))
+
+(defun general--print-keymap-heading (keymap-cons)
+  "Print headings and tables for KEYMAP-CONS."
+  (let ((keymap (car keymap-cons))
+        (state-conses (cdr keymap-cons)))
+    (princ (capitalize (concat "* " (symbol-name keymap) " Keybindings\n")))
+    (when general-describe-state-sort-function
+      (setq state-conses (funcall general-describe-state-sort-function
+                                  state-conses)))
+    (dolist (state-cons state-conses)
+      (general--print-state-heading state-cons))))
+
+(declare-function org-at-heading-p "org")
+(declare-function org-table-align "org-table")
+(declare-function outline-next-heading "outline")
+(defvar org-startup-folded)
+;;;###autoload
+(defun general-describe-keybindings (&optional arg)
+  "Show all keys that have been bound with general in an org buffer.
+Any local keybindings will be shown first followed by global keybindings.
+With a non-nil prefix ARG only show bindings in active maps."
+  (interactive "P")
+  (with-output-to-temp-buffer "*General Keybindings*"
+    (let* ((keybindings (append
+                         (copy-alist general-keybindings)
+                         (list (cons 'local general-local-keybindings))))
+           (active-maps (current-active-maps)))
+      ;; print prioritized keymaps first (if any)
+      (dolist (keymap general-describe-priority-keymaps)
+        (let ((keymap-cons (assq keymap keybindings)))
+          (when (and keymap-cons
+                     (or (null arg)
+                         (and (boundp (car keymap-cons))
+                              (memq (symbol-value (car keymap-cons))
+                                    active-maps))))
+            (general--print-keymap-heading keymap-cons)
+            (setq keybindings (assq-delete-all keymap keybindings)))))
+      ;; sort the remaining and then print them
+      (when general-describe-keymap-sort-function
+        (setq keybindings (funcall general-describe-keymap-sort-function
+                                   keybindings)))
+      (dolist (keymap-cons keybindings)
+        (when (or (null arg)
+                  (and (boundp (car keymap-cons))
+                       (memq (symbol-value (car keymap-cons)) active-maps)))
+          (general--print-keymap-heading keymap-cons)))))
+  (with-current-buffer "*General Keybindings*"
+    (let ((org-startup-folded 'showall))
+      (org-mode))
+    (read-only-mode -1)
+    (while (progn
+             (while (progn
+                      (forward-line)
+                      (org-at-heading-p)))
+             (org-table-align)
+             (outline-next-heading)))
+    (goto-char (point-min))
+    (read-only-mode)))
+
+;; * Functions/Macros to Aid Key Definition
+;; ** Helpers
+(cl-defun general--call-interactively
+    (function &optional (remap t) record-flag keys)
+  "Like `call-interactively' but use the remapped FUNCTION if it exists.
+If REMAP is specified as nil (it is true by default), this is the same as
+`call-interactively'. FUNCTION, RECORD-FLAG, and KEYS are passed to
+`call-interactively'."
+  (when remap
+    (setq function (or (key-binding (kbd (format "<remap> <%s>" function)))
+                       function)))
+  (call-interactively function record-flag keys))
+
+;; ** Key Simulation
+;; https://emacs.stackexchange.com/questions/6037/emacs-bind-key-to-prefix/13432#13432
+;; altered to
+;; - allow execution in an arbitrary state and keymap
+;; - create a named function with a docstring
+;; - optionally dynamically lookup the key(s) up in the correct keymap to try to
+;;   match a command to execute instead
+;; - handle more edge cases like correctly working with macros/repeating
+
+;; TODO
+;; - rename keys arguments to key for consistency with builtin functions
+
+(declare-function evil-change-state "evil-core")
+(defvar evil-no-display)
+(defvar evil-state)
+(defvar evil-previous-state)
+(defvar evil-previous-state-alist)
+(defvar evil-next-state)
+(defmacro general--save-state (&rest body)
+  "Save the current state; execute BODY; restore the state.
+This is a combination of `evil-without-display' and `evil-save-state'. It is
+necessary to define this directly in general so that it is available when
+general is compiled (as evil is an optional dependency and may not be installed
+when general is compiled)."
+  (declare (indent defun)
+           (debug t))
+  `(let* ((evil-no-display t)
+          (evil-state evil-state)
+          (evil-previous-state evil-previous-state)
+          (evil-previous-state-alist (copy-tree evil-previous-state-alist))
+          (evil-next-state evil-next-state)
+          (old-state evil-state)
+          (inhibit-quit t)
+          (buf (current-buffer)))
+     (unwind-protect
+         (progn ,@body)
+       (when (buffer-live-p buf)
+         (with-current-buffer buf
+           (evil-change-state old-state))))))
+
+;;;###autoload
+(cl-defmacro general-key (key &key
+                              state
+                              docstring
+                              let
+                              setup
+                              teardown
+                              accept-default
+                              no-remap
+                              position)
+  "Act as KEY's definition in the current context.
+This uses an extended menu item's capability of dynamically computing a
+definition. It is recommended over `general-simulate-key' wherever possible. See
+the docstring of `general-simulate-key' and the readme for information about the
+benefits and downsides of `general-key'.
+
+KEY should be a string given in `kbd' notation and should correspond to a single
+definition (as opposed to a sequence of commands). When STATE is specified, look
+up KEY with STATE as the current evil state. When specified, DOCSTRING will be
+the menu item's name/description.
+
+Let can be used to bind variables around key lookup. For example:
+(general-key \"some key\"
+  :let ((some-var some-val)))
+
+SETUP and TEARDOWN can be used to run certain functions before and after key
+lookup. For example, something similar to using :state 'emacs would be:
+(general-key \"some key\"
+  :setup (evil-local-mode -1)
+  :teardown (evil-local-mode))
+
+ACCEPT-DEFAULT, NO-REMAP, and POSITION are passed to `key-binding'."
+  (declare (indent 1))
+  `'(menu-item
+     ,(or docstring "")
+     nil
+     :filter
+     (lambda (&optional _)
+       (let ,let
+         ,setup
+         (prog1
+             ,(if state
+                  `(general--save-state
+                     (evil-change-state ,state)
+                     (key-binding (general--kbd ,key) ,accept-default ,no-remap
+                                  ,position))
+                `(key-binding (general--kbd ,key) ,accept-default ,no-remap
+                              ,position))
+           ,teardown)))))
+
+(defvar general--last-simulated-command nil
+  "Holds the last simulated command (or nil for incomplete key sequence).")
+
+(defvar general--simulate-next-as-is nil
+  "Whether to fake keys unconditionally in the next `general--simulate-keys'.
+This is used for testing (but could potentially be useful for a user). Since
+`general--simulate-keys' will normally assume it is being run inside a macro
+that was manually recorded, this is needed when executing a keyboard macro that
+ends up running `general--simulate-keys' for the first time.")
+
+(defvar general--simulate-as-is nil
+  "Whether to fake the keys unconditionally in any `general--simulate-keys'.")
+
+(defun general--key-binding (keys &optional state keymap)
+  "Look up KEYS in the keymap corresponding to STATE and/or KEYMAP.
+Continually check whether subsequences of KEYS are bound to a command or keymap
+starting with the full KEYS and ending when a match is found or no subsequences
+remain. Unlike `lookup-key' if KEYS is not matched, fall back to checking with
+`key-binding'. If STATE is specified and KEYMAP is not, temporarily switch to
+STATE to look up the keys (this means that keybindings inherited from a
+different evil state can still be detected). Return a list of the match and the
+leftover keys (or nil if the full KEYS was matched)."
+  (let* ((keymap (when keymap
+                   (general--get-keymap state keymap)))
+         (len (length keys))
+         (ind len)
+         match)
+    (while (and (> ind 0) (not match))
+      (let* ((key (substring keys 0 ind))
+             (result (cond (keymap
+                            (or (lookup-key keymap key)
+                                (key-binding key)))
+                           (state
+                            ;; this also works fine when evil-local-mode is off
+                            (general--save-state
+                              (evil-change-state state)
+                              (key-binding key)))
+                           (t
+                            (key-binding key)))))
+        (if (or (commandp result)
+                (keymapp result))
+            (setq match result)
+          (cl-decf ind))))
+    (list match
+          (if (= ind len)
+              nil
+            (substring keys ind len)))))
+
+(declare-function evil-echo "evil-common")
+(declare-function evil-visual-state-p "evil-common" t t)
+(declare-function evil-emacs-state "evil-states" t t)
+(defvar evil-move-cursor-back)
+(defun general--execute-in-state (state &optional delay-revert)
+  "Execute the next command in STATE.
+This is an altered version of `evil-execute-in-normal-state' and
+`evil-execute-in-emacs-state'. When calling this in a command, specify
+DELAY-REVERT as non-nil to prevent switching the state back until after
+`this-command' is finished."
+  (interactive)
+  (let ((ignore-commands '(evil-use-register
+                           digit-argument
+                           negative-argument
+                           universal-argument
+                           universal-argument-minus
+                           universal-argument-more
+                           universal-argument-other-key)))
+    (when delay-revert
+      (push this-command ignore-commands))
+    (general--delay `(not (memq this-command ',ignore-commands))
+        `(progn
+           (with-current-buffer ,(current-buffer)
+             (evil-change-state ',evil-state)
+             (setq evil-move-cursor-back ',evil-move-cursor-back)))
+      'post-command-hook))
+  (if (and (eq state 'emacs)
+           (evil-visual-state-p))
+      (let ((mrk (mark))
+            (pnt (point)))
+        (evil-emacs-state)
+        (set-mark mrk)
+        (goto-char pnt))
+    (setq evil-move-cursor-back nil)
+    (evil-change-state state)))
+
+(cl-defun general--simulate-keys (command keys &optional state keymap
+                                          (lookup t)
+                                          (remap t))
+  "Simulate COMMAND followed by KEYS in STATE and/or KEYMAP.
+If COMMAND is nil, just simulate KEYS. If STATE and KEYMAP are nil, simulate
+KEYS in the current context. When COMMAND is non-nil, STATE and KEYMAP will have
+no effect. KEYS should be a string that can be passed to `kbd' or nil. If KEYS
+is nil, the COMMAND will just be called interactively. If COMMAND is nil and
+LOOKUP is non-nil, KEYS will be looked up in the correct context to determine if
+any subsequence corresponds to a command or keymap. If a command is matched,
+that command will be called followed by the simulation of any leftover keys. To
+simulate the keys as-is without any lookup, LOOKUP can be explicitly specified
+as nil. When COMMAND has been remapped (i.e. [remap COMMAND] is currently
+bound), the remapped version will be used instead of the original command unless
+REMAP is specified as nil (it is true by default)."
+  (let* ((keys (when keys
+                 (general--kbd keys)))
+         ;; TODO remove when get rid of `general-simulate-keys'
+         (state (if (eq state t)
+                    'emacs
+                  state)))
+    (when (and lookup (null command))
+      (cl-destructuring-bind (match leftover-keys)
+          (general--key-binding keys state keymap)
+        (when (commandp match)
+          (setq command match
+                keys leftover-keys))))
+    (when keys
+      ;; only set prefix-arg when there are only keys (otherwise will also
+      ;; affect the next command)
+      (unless command
+        (setq prefix-arg current-prefix-arg)
+        (when state
+          (general--execute-in-state state t)))
+      (when (or general--simulate-as-is
+                general--simulate-next-as-is
+                (not executing-kbd-macro))
+        (setq general--simulate-next-as-is nil)
+        ;; keys are incorrectly saved as this-command-keys when recording macros
+        ;; these keys will be played back, so don't simulate them
+        (setq unread-command-events
+              (nconc
+               ;; force keys to be added to this-command-keys
+               ;; this happens normally already for macros but it needs to be
+               ;; forced for evil-repeat though, which will only include the
+               ;; first key otherwise (ideally no keys would ever be added in
+               ;; either case)
+               (mapcar (lambda (ev) (cons t ev))
+                       (listify-key-sequence keys))
+               unread-command-events))))
+    (when command
+      (let ((this-command command))
+        (general--call-interactively command remap)))
+    (setq general--last-simulated-command command)))
+
+;;;###autoload
+(cl-defmacro general-simulate-keys (keys &optional state keymap
+                                         (lookup t)
+                                         docstring name)
+  "Deprecated. Please use `general-simulate-key' instead."
+  (let* ((command (when (listp keys)
+                    (car keys)))
+         (keys (if (listp keys)
+                   (cadr keys)
+                 keys))
+         (state (if (eq state t)
+                    ''emacs
+                  state))
+         (name (or name
+                   (intern (concat
+                            (format "general-simulate-%s"
+                                    (if command
+                                        (eval command)
+                                      ""))
+                            (when command
+                              "-")
+                            (replace-regexp-in-string " " "_" keys)
+                            (when state
+                              (concat "-in-"
+                                      (symbol-name (eval state))
+                                      "-state"))
+                            (when keymap
+                              (concat "-in-"
+                                      (symbol-name keymap))))))))
+    `(progn
+       (eval-after-load 'evil
+         '(evil-set-command-property #',name :repeat 'general--simulate-repeat))
+       (defun ,name
+           ()
+         ,(or docstring
+              (concat "Simulate "
+                      (when command
+                        (concat "`"
+                                (symbol-name (eval command))
+                                "' then "))
+                      "'"
+                      keys
+                      "' in "
+                      (cond ((and state keymap)
+                             (concat (symbol-name (eval state))
+                                     " state in `"
+                                     (symbol-name keymap)
+                                     "'."))
+                            (keymap
+                             (concat (symbol-name keymap)
+                                     "."))
+                            (state
+                             (concat (symbol-name (eval state))
+                                     " state."))
+                            (t
+                             "the current context."))))
+         (interactive)
+         (general--simulate-keys ,command ,keys ,state ,keymap ,lookup)))))
+(make-obsolete 'general-simulate-keys 'general-simulate-key "2018-01-14")
+
+;;;###autoload
+(cl-defmacro general-simulate-key (keys
+                                   &key
+                                   state keymap
+                                   name docstring
+                                   (lookup t)
+                                   which-key
+                                   (remap t))
+  "Create and return a command that simulates KEYS in STATE and KEYMAP.
+
+`general-key' should be prefered over this whenever possible as it is simpler
+and has saner functionality in many cases because it does not rely on
+`unread-command-events' (e.g. \"C-h k\" will show the docstring of the command
+to be simulated ; see the readme for more information). The main downsides of
+`general-key' are that it cannot simulate a command followed by keys or
+subsequent commands, and which-key does not currently work well with it when
+simulating a prefix key/incomplete key sequence.
+
+KEYS should be a string given in `kbd' notation. It can also be a list of a
+single command followed by a string of the key(s) to simulate after calling that
+command. STATE should only be specified by evil users and should be a quoted
+evil state. KEYMAP should not be quoted. Both STATE and KEYMAP aliases are
+supported (but they have to be set when the macro is expanded). When neither
+STATE or KEYMAP are specified, the key(s) will be simulated in the current
+context.
+
+If NAME is specified, it will replace the automatically generated function name.
+NAME should not be quoted. If DOCSTRING is specified, it will replace the
+automatically generated docstring.
+
+Normally the generated function will look up KEY in the correct context to try
+to match a command. To prevent this lookup, LOOKUP can be specified as nil.
+Generally, you will want to keep LOOKUP non-nil because this will allow checking
+the evil repeat property of matched commands to determine whether or not they
+should be recorded. See the docstring for `general--simulate-keys' for more
+information about LOOKUP.
+
+When a WHICH-KEY description is specified, it will replace the command name in
+the which-key popup.
+
+When a command name is specified and that command has been remapped (i.e. [remap
+command] is currently bound), the remapped version will be used instead of the
+original command unless REMAP is specified as nil (it is true by default).
+
+The advantages of this over a keyboard macro are as follows:
+- Prefix arguments are supported
+- The user can control the context in which the keys are simulated
+- The user can simulate both a named command and keys
+- The user can simulate an incomplete key sequence (e.g. for a keymap)"
+  (declare (indent defun))
+  (let* ((command (when (listp keys)
+                    (car keys)))
+         (keys (if (listp keys)
+                   (cadr keys)
+                 keys))
+         (state (general--unalias (eval state) t))
+         (keymap (general--unalias keymap))
+         (name (or name
+                   (intern (concat
+                            (format "general-simulate-%s"
+                                    (if command
+                                        (eval command)
+                                      ""))
+                            (when command
+                              "-")
+                            (replace-regexp-in-string " " "_" keys)
+                            (when state
+                              (concat "-in-"
+                                      (symbol-name state)
+                                      "-state"))
+                            (when keymap
+                              (concat "-in-"
+                                      (symbol-name keymap))))))))
+    `(progn
+       (eval-after-load 'evil
+         '(evil-set-command-property #',name :repeat 'general--simulate-repeat))
+       (when ,which-key
+         (general-with-eval-after-load 'which-key
+           (push '((nil . ,(symbol-name name))
+                   nil . ,which-key)
+                 which-key-replacement-alist)))
+       (defun ,name
+           ()
+         ,(or docstring
+              (concat "Simulate "
+                      (when command
+                        (concat "`"
+                                (symbol-name (eval command))
+                                "' then "))
+                      "'"
+                      keys
+                      "' in "
+                      (cond ((and state keymap)
+                             (concat (symbol-name state)
+                                     " state in `"
+                                     (symbol-name keymap)
+                                     "'."))
+                            (keymap
+                             (concat (symbol-name keymap)
+                                     "."))
+                            (state
+                             (concat (symbol-name state)
+                                     " state."))
+                            (t
+                             "the current context."))))
+         (interactive)
+         (general--simulate-keys ,command ,keys ',state ,keymap ,lookup ,remap))
+       #',name)))
+
+(defun general--repeat-abort-p (repeat-prop)
+  "Return t if repeat recording should be aborted based on REPEAT-PROP."
+  (or (memq repeat-prop (list nil 'abort 'ignore))
+      (and (eq repeat-prop 'motion)
+           (not (memq evil-state '(insert replace))))))
+
+(declare-function evil-repeat-record "evil-repeat")
+(declare-function evil-get-command-property "evil-common")
+(declare-function evil-repeat-abort "evil-repeat")
+(declare-function evil-this-command-keys "evil-repeat")
+(declare-function evil-clear-command-keys "evil-repeat")
+(defvar evil-this-register)
+(defun general--simulate-repeat (flag)
+  "Modified version of `evil-repeat-keystrokes'.
+It behaves as normal but will check the repeat property of a simulated command
+to determine whether to abort recording."
+  (cond ((eq flag 'pre)
+         (when evil-this-register
+           (evil-repeat-record
+            `(set evil-this-register ,evil-this-register))))
+        ((eq flag 'post)
+         (let* ((command general--last-simulated-command)
+                (repeat-prop (evil-get-command-property command :repeat t)))
+           (if (and command (general--repeat-abort-p repeat-prop))
+               (evil-repeat-abort)
+             (evil-repeat-record
+              (evil-this-command-keys t))
+             (evil-clear-command-keys))))))
+
+;; ** Key Dispatch
+(defvar general--last-dispatch-command nil
+  "Holds the last command run from a `general-key-dispatch' function.")
+
+(defun general--extend-key-sequence (keys)
+  "Read a key and append it to KEYS.
+KEYS should be a string given in `kbd' notation."
+  (let ((key (read-event)))
+    (concat keys
+            (when keys
+              " ")
+            (key-description (if (characterp key)
+                                 (char-to-string key)
+                               (vector key))))))
+
+;;;###autoload
+(cl-defmacro general-key-dispatch
+    (fallback-command &rest maps
+                      &key
+                      timeout
+                      inherit-keymap
+                      name docstring
+                      which-key
+                      (remap t)
+                      &allow-other-keys)
+  "Create and return a command that runs FALLBACK-COMMAND or a command in MAPS.
+MAPS consists of <key> <command> pairs. If a key in MAPS is matched, the
+corresponding command will be run. Otherwise FALLBACK-COMMAND will be run with
+the unmatched keys. So, for example, if \"ab\" was pressed, and \"ab\" is not
+one of the key sequences from MAPS, the FALLBACK-COMMAND will be run followed by
+the simulated keypresses of \"ab\". Prefix arguments will still work regardless
+of which command is run. This is useful for binding under non-prefix keys. For
+example, this can be used to redefine a sequence like \"cw\" or \"cow\" in evil
+but still have \"c\" work as `evil-change'. If TIMEOUT is specified,
+FALLBACK-COMMAND will also be run in the case that the user does not press the
+next key within the TIMEOUT (e.g. 0.5).
+
+NAME and DOCSTRING are optional keyword arguments. They can be used to replace
+the automatically generated name and docstring for the created function. By
+default, `cl-gensym' is used to prevent name clashes (e.g. allows the user to
+create multiple different commands using `self-insert-command' as the
+FALLBACK-COMMAND without explicitly specifying NAME to manually prevent
+clashes).
+
+When INHERIT-KEYMAP is specified, all the keybindings from that keymap will be
+inherited in MAPS.
+
+When a WHICH-KEY description is specified, it will replace the command name in
+the which-key popup.
+
+When command to be executed has been remapped (i.e. [remap command] is currently
+bound), the remapped version will be used instead of the original command unless
+REMAP is specified as nil (it is true by default)."
+  (declare (indent 1))
+  (let ((name (or name (cl-gensym (format "general-dispatch-%s-"
+                                          (eval fallback-command)))))
+        ;; remove keyword arguments from maps
+        (maps (car (general--remove-keyword-args maps))))
+    `(progn
+       (eval-after-load 'evil
+         '(evil-set-command-property #',name :repeat 'general--dispatch-repeat))
+       (when ,which-key
+         (general-with-eval-after-load 'which-key
+           (push '((nil . ,(symbol-name name))
+                   nil . ,which-key)
+                 which-key-replacement-alist)))
+       ;; TODO list all of the bound keys in the docstring
+       (defun ,name ()
+         ,(or docstring (format (concat "Run %s or something else based"
+                                        "on the next keypresses.")
+                                (eval fallback-command)))
+         (interactive)
+         (let ((map (make-sparse-keymap))
+               (maps (list ,@maps))
+               (invoked-keys (this-command-keys))
+               (timeout ,timeout)
+               (inherit-keymap ,inherit-keymap)
+               matched-command
+               fallback
+               char
+               timed-out-p)
+           (when inherit-keymap
+             (set-keymap-parent map inherit-keymap))
+           (while maps
+             (define-key map (general--kbd (pop maps)) (pop maps)))
+           (while (progn
+                    (if timeout
+                        (with-timeout (timeout (setq timed-out-p t))
+                          ;; TODO rename char
+                          (setq char (general--extend-key-sequence char)))
+                      (setq char (general--extend-key-sequence char)))
+                    (and (not timed-out-p)
+                         (keymapp (lookup-key map (kbd char))))))
+           (cond
+            ((and (not timed-out-p)
+                  (setq matched-command (lookup-key map (kbd char))))
+             ;; necessary for evil-this-operator checks because
+             ;; evil-define-operator sets evil-this-operator to this-command
+             (let ((this-command matched-command))
+               (general--call-interactively matched-command ,remap)))
+            (t
+             (setq matched-command ,fallback-command)
+             (general--simulate-keys ,fallback-command char
+                                     nil nil t ,remap)))
+           (setq general--last-dispatch-command matched-command)))
+       #',name)))
+
+(defun general--dispatch-repeat (flag)
+  "Modified version of `evil-repeat-keystrokes'.
+It behaves as normal but will check the repeat property of a simulated command
+to determine whether to abort recording."
+  (cond ((eq flag 'pre)
+         (when evil-this-register
+           (evil-repeat-record
+            `(set evil-this-register ,evil-this-register))))
+        ((eq flag 'post)
+         (let ((repeat-prop (evil-get-command-property
+                             general--last-dispatch-command
+                             :repeat t)))
+           (if (general--repeat-abort-p repeat-prop)
+               (evil-repeat-abort)
+             (evil-repeat-record (evil-this-command-keys t))
+             (evil-clear-command-keys))))))
+
+;; ** Predicate Dispatch
+;;;###autoload
+(cl-defmacro general-predicate-dispatch
+    (fallback-def &rest defs
+                  &key docstring
+                  &allow-other-keys)
+  (declare (indent 1))
+  "Create a menu item that will run FALLBACK-DEF or a definition from DEFS.
+DEFS consists of <predicate> <definition> pairs. Binding this menu-item to a key
+will cause that key to act as the corresponding definition (a command, keymap,
+etc) for the first matched predicate. If no predicate is matched FALLBACK-DEF
+will be run. When FALLBACK-DEF is nil and no predicates are matched, the keymap
+with the next highest precedence for the pressed key will be checked. DOCSTRING
+can be specified as a description for the menu item."
+  ;; remove keyword arguments from defs and sort defs into pairs
+  (let ((defs (cl-loop for (key value) on defs by 'cddr
+                       unless (keywordp key)
+                       collect (list key value))))
+    `'(menu-item
+       ,(or docstring "") nil
+       :filter (lambda (&optional _)
+                 (cond ,@(mapcar (lambda (pred-def)
+                                   `(,(car pred-def) ,(cadr pred-def)))
+                                 defs)
+                       (t ,fallback-def))))))
+
+;; ** Key "Translation"
+;;;###autoload
+(cl-defun general-translate-key (states keymaps
+                                        &rest maps
+                                        &key destructive
+                                        &allow-other-keys)
+  "Translate keys in the keymap(s) corresponding to STATES and KEYMAPS.
+STATES should be the name of an evil state, a list of states, or nil. KEYMAPS
+should be a symbol corresponding to the keymap to make the translations in or a
+list of keymap names. Keymap and state aliases are supported (as well as 'local
+and 'global for KEYMAPS).
+
+MAPS corresponds to a list of translations (key replacement pairs). For example,
+specifying \"a\" \"b\" will bind \"a\" to \"b\"'s definition in the keymap.
+Specifying nil as a replacement will unbind a key.
+
+If DESTRUCTIVE is non-nil, the keymap will be destructively altered without
+creating a backup. If DESTRUCTIVE is nil, store a backup of the keymap on the
+initial invocation, and for future invocations always look up keys in the
+original/backup keymap. On the other hand, if DESTRUCTIVE is non-nil, calling
+this function multiple times with \"a\" \"b\" \"b\" \"a\", for example, would
+continue to swap and unswap the definitions of these keys. This means that when
+DESTRUCTIVE is non-nil, all related swaps/cycles should be done in the same
+invocation.
+
+If both MAPS and DESCTRUCTIVE are nil, only create the backup keymap."
+  (declare (indent defun))
+  (general--ensure-lists states keymaps)
+  (dolist (keymap-name keymaps)
+    (dolist (state states)
+      (setq keymap-name (general--unalias keymap-name)
+            state (general--unalias state t))
+      (let* ((keymap (general--get-keymap state keymap-name))
+             (backup-keymap (intern (format "general-%s%s-backup-map"
+                                            keymap-name
+                                            (if state
+                                                (format "-%s-state" state)
+                                              ""))))
+             (lookup-keymap (if (and (not destructive)
+                                     (boundp backup-keymap))
+                                (symbol-value backup-keymap)
+                              (copy-keymap keymap)))
+             (maps (cl-loop for (key replacement) on maps by 'cddr
+                            ;; :destructive can be in MAPS
+                            unless (keywordp key)
+                            collect (general--kbd key)
+                            and collect (if replacement
+                                            (lookup-key
+                                             lookup-keymap
+                                             (general--kbd replacement))
+                                          ;; unbind
+                                          nil))))
+        (unless (or destructive
+                    (boundp backup-keymap))
+          (set backup-keymap lookup-keymap))
+        (apply #'general-define-key :states state :keymaps keymap-name maps)))))
+
+;;;###autoload
+(defmacro general-swap-key (states keymaps &rest args)
+  "Wrapper around `general-translate-key' for swapping keys.
+STATES, KEYMAPS, and ARGS are passed to `general-translate-key'. ARGS should
+consist of key swaps (e.g. \"a\" \"b\" is equivalent to \"a\" \"b\" \"b\" \"a\"
+with `general-translate-key') and optionally keyword arguments for
+`general-translate-key'."
+  (declare (indent defun))
+  (setq args (cl-loop for (key replacement) on args by 'cddr
+                      collect key and collect replacement
+                      and unless (keywordp key)
+                      collect replacement and collect key))
+  `(general-translate-key ,states ,keymaps ,@args))
+
+;; ** Automatic Key Unbinding
+(defun general-unbind-non-prefix-key (define-key keymap key &rest args)
+  "Use DEFINE-KEY in KEYMAP to unbind an existing non-prefix subsequence of KEY.
+When a general key definer is in use and a subsequence of KEY is already bound
+in KEYMAP, unbind it using DEFINE-KEY. Always bind KEY to DEF using DEFINE-KEY."
+  (when (and general--definer-p
+             (keymapp keymap)
+             (arrayp key))
+    (let ((key (if (stringp key)
+                   (string-to-vector key)
+                 key)))
+      (while (numberp (lookup-key keymap key))
+        (setq key (cl-subseq key 0 -1)))
+      (funcall define-key keymap key nil)))
+  (apply define-key keymap key args))
+
+;;;###autoload
+(defun general-auto-unbind-keys (&optional undo)
+  "Advise `define-key' to automatically unbind keys when necessary.
+This will prevent errors when a sub-sequence of a key is already bound (e.g. the
+user attempts to bind \"SPC a\" when \"SPC\" is bound, resulting in a \"Key
+sequnce starts with non-prefix key\" error). When UNDO is non-nil, remove
+advice."
+  (if undo
+      ;; using general versions in case start recording advice for later display
+      (general-advice-remove 'define-key #'general-unbind-non-prefix-key)
+    (general-advice-add 'define-key :around #'general-unbind-non-prefix-key)))
+
+;; ** Interactive Lambdas
+(defmacro general-lambda (&rest body)
+  "Wrap BODY in an interactive lamba"
+  (declare (indent defun))
+  `(lambda () (interactive)
+     ,@body))
+
+(defalias 'general-l #'general-lambda)
+
+;; * Functions/Macros to Aid Other Configuration
+;; ** Settings
+(defmacro general-setq (&rest settings)
+  "A stripped-down `customize-set-variable' with the syntax of `setq'.
+Like `setq', multiple variables can be set at once; SETTINGS should consist of
+variable value pairs. Some variables have a custom setter (specified with
+`defcustom' and :set) that is used to run code necessary for changes to take
+effect (e.g. `auto-revert-interval'). If a package has already been loaded, and
+the user uses `setq' to set one of these variables, the :set code will not
+run (e.g. in the case of `auto-revert-interval', the timer will not be updated).
+Like with `customize-set-variable', `general-setq' will use the custom :set
+setter when it exists. If the package defining the variable has not yet been
+loaded, the custom setter will not be known, but it will still be run upon
+loading the package. Unlike `customize-set-variable', `general-setq' does not
+attempt to load any dependencies for the variable and does not support giving
+variables comments. It also falls back to `set' instead of `set-default', so
+that like `setq' it will change the local value of a buffer-local variable
+instead of the default value."
+  `(progn
+     ,@(cl-loop for (var val) on settings by 'cddr
+                collect `(funcall (or (get ',var 'custom-set) #'set)
+                                  ',var ,val))))
+
+(defmacro general-setq-default (&rest settings)
+  "An alias for `setq-default'.
+In the future, this will automatically record user settings using annalist.el."
+  `(setq-default ,@settings))
+
+(defalias 'general-setq-local #'setq-local
+  "An alias for `setq-local'.
+In the future, this will automatically record user settings using annalist.el.")
+
+(defmacro general-pushnew (x place &rest keys)
+  "Call `cl-pushnew' with X, PLACE, and KEYS.
+:test defaults to `equal'. In the future, this will automatically record user
+settings using annalist.el and call a variables :set function."
+  (declare (debug
+            (form place &rest
+                  &or [[&or ":test" ":test-not" ":key"] function-form]
+                  [keywordp form])))
+  `(cl-pushnew ,x ,place ,@keys :test #'equal))
+
+;; ** Hooks
+;; using a function instead of a macro in order to keep the original function
+;; name as a prefix (can pass in variable for function)
+(defun general--define-transient-function (function hook &optional advice
+                                                    condition)
+  "Define and return a modified FUNCTION that removes itself from HOOK.
+The new function will automatically remove itself from HOOK after the first time
+it is called. If ADVICE is non-nil, HOOK should specify a function to advise
+instead. If CONDITION is a function, only remove the function if calling
+CONDITION on the return value returns true. For example, if CONDITION is
+#'identity, only remove the function if it returns non-nil."
+  (let ((name (intern (format "general--transient-%s%s%s"
+                              (if (symbolp function)
+                                  (symbol-name function)
+                                ;; lambda; name with counter
+                                (cl-incf general--counter))
+                              (if advice
+                                  "-for-advice"
+                                "-for-hook")
+                              (if (functionp condition)
+                                  (if (symbolp function)
+                                      (format "-on-%s" condition)
+                                    ;; lambda; name with counter
+                                    (format "-on-lambda-%s"
+                                            (cl-incf general--counter)))
+                                "")))))
+    (defalias name
+      (if advice
+          (lambda (&rest args)
+            (let ((res (apply function args)))
+              (when (or (not (functionp condition)) (funcall condition res))
+                (advice-remove hook name)
+                (fmakunbound name))
+              res))
+        (lambda (&rest args)
+          (let ((res (apply function args)))
+            (when (or (not (functionp condition)) (funcall condition res))
+              (remove-hook hook name)
+              (fmakunbound name))
+            res)))
+      (format "Call %s with ARGS and then remove it from `%s'%s."
+              (if (symbolp function)
+                  (format "`%s'" function)
+                ;; TODO put full lambda in docstring or use backquote instead of
+                ;; relying on lexical-binding (so full lambda is in definition)
+                "given lambda")
+              hook
+              (if (functionp condition)
+                  (format " once calling %s on the return value succeeds."
+                          (if (symbolp condition)
+                              condition
+                            "given lambda"))
+                "")))
+    name))
+
+;;;###autoload
+(defun general-add-hook (hooks functions &optional append local transient)
+  "A drop-in replacement for `add-hook'.
+Unlike `add-hook', HOOKS and FUNCTIONS can be single items or lists. APPEND and
+LOCAL are passed directly to `add-hook'. When TRANSIENT is non-nil, each
+function will remove itself from the hook it is in after it is run once. If
+TRANSIENT is a function, call it on the return value in order to determine
+whether to remove a function from the hook. For example, if TRANSIENT is
+#'identity, remove each function only if it returns non-nil. TRANSIENT could
+alternatively check something external and ignore the function's return value."
+  (general--ensure-lists hooks functions)
+  (dolist (hook hooks)
+    (dolist (func functions)
+      (when transient
+        (setq func (general--define-transient-function
+                    func hook nil transient)))
+      (add-hook hook func append local))))
+
+;;;###autoload
+(defun general-remove-hook (hooks functions &optional local)
+  "A drop-in replacement for `remove-hook'.
+Unlike `remove-hook', HOOKS and FUNCTIONS can be single items or lists. LOCAL is
+passed directly to `remove-hook'."
+  (general--ensure-lists hooks functions)
+  (dolist (hook hooks)
+    (dolist (func functions)
+      (remove-hook hook func local))))
+
+;; ** Advice
+;;;###autoload
+(defun general-advice-add (symbols where functions &optional props transient)
+  "A drop-in replacement for `advice-add'.
+SYMBOLS, WHERE, FUNCTIONS, and PROPS correspond to the arguments for
+`advice-add'. Unlike `advice-add', SYMBOLS and FUNCTIONS can be single items or
+lists. When TRANSIENT is non-nil, each function will remove itself as advice
+after it is run once. If TRANSIENT is a function, call it on the return value in
+order to determine whether to remove a function as advice. For example, if
+TRANSIENT is #'identity, remove each function only if it returns non-nil.
+TRANSIENT could alternatively check something external and ignore the function's
+return value."
+  (general--ensure-lists symbols functions)
+  (dolist (symbol symbols)
+    (dolist (func functions)
+      (when transient
+        (setq func (general--define-transient-function
+                    func symbol t transient)))
+      (advice-add symbol where func props))))
+
+;; specify full autoload to prevent function indirection (autoload generation
+;; will put a /flipped/ defalias into the autoloads file causing an infinite
+;; loop)
+;;;###autoload (autoload 'general-add-advice "general")
+(defalias 'general-add-advice #'general-advice-add)
+
+;;;###autoload
+(defun general-advice-remove (symbols functions)
+  "A drop-in replacement for `advice-remove'.
+Unlike `advice-remove', SYMBOLS and FUNCTIONS can be single items or lists."
+  (general--ensure-lists symbols functions)
+  (dolist (symbol symbols)
+    (dolist (func functions)
+      (advice-remove symbol func))))
+
+;;;###autoload (autoload 'general-remove-advice "general")
+(defalias 'general-remove-advice #'general-advice-remove)
+
+;; ** Packages
+(defvar general-package nil
+  "Holds the current package name.
+This variable is used to automatically associated recorded keybindings,
+settings, etc. with a package.")
+
+(defmacro general-with-package (package &rest body)
+  "After PACKAGE is loaded, run BODY.
+This is a small wrapper around `with-eval-after-load' that sets
+`general-package', so that general commands that record information can
+automatically record the package as well. It is meant to be used in addition to
+`use-package' in cases where the user has a lot of configuration for a package
+and wants to split it up into sections instead of putting it all inside a single
+`use-package' statement."
+  (declare (indent 1) (debug t))
+  `(let ((general-package ,package))
+     (general-with-eval-after-load ,package
+       ,@body)))
+
+(defalias 'general-with #'general-with-package)
+
+;; ** Miscellaneous
+(defmacro general-after-gui (&rest body)
+  "Run BODY once after the first GUI frame is created."
+  (declare (indent 0) (debug t))
+  `(if (and (not (daemonp)) (display-graphic-p))
+       (progn ,@body)
+     (general-add-hook 'server-after-make-frame-hook
+                       (lambda ()
+                         (when (display-graphic-p)
+                           ,@body
+                           t))
+                       nil
+                       nil
+                       #'identity)))
+
+(defmacro general-after-tty (&rest body)
+  "Run BODY once after the first terminal frame is created."
+  (declare (indent 0) (debug t))
+  `(if (and (not (daemonp)) (not (display-graphic-p)))
+       (progn ,@body)
+     (general-add-hook 'server-after-make-frame-hook
+                       (lambda ()
+                         (unless (display-graphic-p)
+                           ,@body
+                           t))
+                       nil
+                       nil
+                       #'identity)))
+
+(defmacro general-after-init (&rest body)
+  "Run BODY after emacs initialization.
+If after emacs initialization already, run BODY now."
+  (declare (indent 0) (debug t))
+  `(if after-init-time
+       (progn ,@body)
+     (general-add-hook 'after-init-hook (lambda () ,@body))))
+
+;; * Optional Setup
+
+;;;###autoload
+(defun general-evil-setup (&optional short-names _)
+  "Set up some basic equivalents for vim mapping functions.
+This creates global key definition functions for the evil states.
+Specifying SHORT-NAMES as non-nil will create non-prefixed function
+aliases such as `nmap' for `general-nmap'."
+  (general-create-definer general-imap :states 'insert)
+  (general-create-definer general-emap :states 'emacs)
+  (general-create-definer general-nmap :states 'normal)
+  (general-create-definer general-vmap :states 'visual)
+  (general-create-definer general-mmap :states 'motion)
+  (general-create-definer general-omap :states 'operator)
+  (general-create-definer general-rmap :states 'replace)
+  (general-create-definer general-iemap :states '(insert emacs))
+  (general-create-definer general-nvmap :states '(normal visual))
+  ;; these two don't have corresponding states
+  (general-create-definer general-itomap :keymaps 'evil-inner-text-objects-map)
+  (general-create-definer general-otomap :keymaps 'evil-outer-text-objects-map)
+  (general-create-definer general-tomap
+    :keymaps '(evil-outer-text-objects-map
+               evil-inner-text-objects-map))
+  (when short-names
+    (defalias 'imap #'general-imap)
+    (defalias 'emap #'general-emap)
+    (defalias 'nmap #'general-nmap)
+    (defalias 'vmap #'general-vmap)
+    (defalias 'mmap #'general-mmap)
+    (defalias 'omap #'general-omap)
+    (defalias 'rmap #'general-rmap)
+    (defalias 'iemap #'general-iemap)
+    (defalias 'nvmap #'general-nvmap)
+    (defalias 'itomap #'general-itomap)
+    (defalias 'otomap #'general-otomap)
+    (defalias 'tomap #'general-tomap)))
+
+;; * Use-package Integration
+;; maybe useful for something else in future
+(defun general--extract-autoloadable-symbol (def)
+  "Extract an autoloadable symbol from DEF, a normal or extended definition.
+This will also correctly extract the definition from a cons of the form (STRING
+. DEFN). If the extracted definition is nil, a string, a lambda, a keymap symbol
+from an extended definition, or some other definition that cannot be autoloaded,
+or if the `:no-autoload' keyword argument is non-nil, return nil."
+  ;; explicit null checks not required because nil return value means no def
+  (when (general--extended-def-p def)
+    ;; extract definition
+    (let* ((first (car def))
+           (is-proper-plist (keywordp first))
+           (arg-plist (if is-proper-plist def (cdr def)))
+           (should-autoload (not (plist-get arg-plist :no-autoload))))
+      (setq def (when should-autoload
+                  (if is-proper-plist
+                      (plist-get arg-plist :def)
+                    first)))))
+  (cond ((symbolp def)
+         def)
+        ((and (consp def)
+              (symbolp (cdr def)))
+         (cdr def))))
+
+(general-with-eval-after-load 'use-package-core
+  (declare-function use-package-concat "use-package-core")
+  (declare-function use-package-process-keywords "use-package-core")
+  (defvar use-package-keywords)
+  (defvar use-package-deferring-keywords)
+  ;; ** :general Keyword
+  (setq use-package-keywords
+        ;; should go in the same location as :bind
+        ;; adding to end may not cause problems, but see issue #22
+        (cl-loop for item in use-package-keywords
+                 if (eq item :bind-keymap*)
+                 collect :bind-keymap* and collect :general
+                 else
+                 ;; don't add duplicates
+                 unless (eq item :general)
+                 collect item))
+
+  (defun general--sanitize-arglist (arglist)
+    "Remove positional/separator arguments from ARGLIST."
+    (let ((arglists (if (eq (car arglist) 'general-defs)
+                        (general--parse-defs-arglists (cdr arglist))
+                      (list arglist))))
+      (cl-loop for arglist in arglists
+               do (while (general--positional-arg-p (car arglist))
+                    (setq arglist (cdr arglist)))
+               and append arglist)))
+
+  ;; altered args will be passed to the autoloads and handler functions
+  (defun use-package-normalize/:general (_name _keyword general-arglists)
+    "Return a list of bindings to be made using general."
+    general-arglists)
+
+  (defun use-package-autoloads/:general (_name _keyword general-arglists)
+    "Return an alist of commands extracted from ARGS.
+Return something like '((some-command-to-autoload . command) ...)."
+    (when general-use-package-emit-autoloads
+      (cl-loop for arglist in general-arglists
+               for sanitized = (general--sanitize-arglist arglist)
+               unless (plist-get sanitized :no-autoload)
+               append
+               (cl-loop
+                for (key def) on sanitized by #'cddr
+                when (and (not (keywordp key))
+                          (not (null def))
+                          (ignore-errors
+                            ;; remove extra quote
+                            ;; `eval' works in some cases that `cadr' does
+                            ;; not (e.g. quoted string, '(list ...), etc.)
+                            ;; `ignore-errors' handles cases where it fails
+                            ;; (e.g. variable not defined at
+                            ;; macro-expansion time)
+                            (setq def (eval def))
+                            (setq def (general--extract-autoloadable-symbol
+                                       def))))
+                collect (cons def 'command)))))
+
+  (defun use-package-handler/:general (name _keyword args rest state)
+    "Use-package handler for :general."
+    (use-package-concat
+     (use-package-process-keywords name rest state)
+     `(,@(mapcar (lambda (arglist)
+                   ;; Note: prefix commands are not valid functions
+                   (if (or (functionp (car arglist))
+                           (macrop (car arglist)))
+                       `(,@arglist :package ',name)
+                     `(general-def
+                        ,@arglist
+                        :package ',name)))
+                 args))))
+
+  ;; ** :general-config Keyword
+  (setq use-package-keywords
+        (cl-loop for item in use-package-keywords
+                 if (eq item :config)
+                 collect :config and collect :general-config
+                 else
+                 ;; don't add duplicates
+                 unless (eq item :general-config)
+                 collect item))
+  (defalias 'use-package-normalize/:general-config
+    #'use-package-normalize/:general)
+  (defalias 'use-package-handler/:general-config #'use-package-handler/:general)
+
+  ;; ** :ghook and :gfhook Keyword
+  (setq use-package-keywords
+        ;; should go in the same location as :bind
+        ;; adding to end may not cause problems, but see issue #22
+        (cl-loop for item in use-package-keywords
+                 if (eq item :hook)
+                 collect :hook and collect :ghook and collect :gfhook
+                 else
+                 ;; don't add duplicates
+                 unless (memq item '(:ghook :gfhook))
+                 collect item))
+
+  (defun general-normalize-hook-arglist (arglist mode-enable mode-hook
+                                                 &optional symbol-is-function-p)
+    "Rewrite a :g(f)hook ARGLIST to a `general-add-hook' arglist.
+MODE-ENABLE is the inferred command to enable the package's mode, and MODE-HOOK
+is the mode inferred hook to enable the package's mode. When ARGLIST is a symbol
+instead of a list, it will be considered to be a hook name unless
+SYMBOL-IS-FUNCTION-P is non-nil, in which case it will considered to be a
+function."
+    (cond ((ignore-errors (memq (car arglist) (list 'quote 'function)))
+           ;; user passed in a hook or function; leave as is
+           (if symbol-is-function-p
+               ;; '<package>-mode-hook <user specified function>
+               `(',mode-hook ,arglist)
+             ;; <user specified hook> #'<package>-mode
+             `(,arglist ',mode-enable)))
+          ((symbolp arglist)
+           ;; user passed in an unquoted symbol (variable); don't quote it
+           (if symbol-is-function-p
+               `(',mode-hook ,arglist)
+             `(,arglist ',mode-enable)))
+          (t
+           ;; actual list for `general-add-hook'
+           (if (= (length arglist) 1)
+               ;; <user specified hook(s)> #'<package>-mode
+               `(,(car arglist) ',mode-enable)
+             (let ((hooks (car arglist))
+                   (functions (cadr arglist)))
+               (when (or (null hooks)
+                         (not (or (symbolp hooks)
+                                  (listp hooks))))
+                 (setq hooks `',mode-hook))
+               (when (or (null functions)
+                         (not (or (symbolp functions)
+                                  (listp functions))))
+                 (setq functions `',mode-enable))
+               ;; (cons hooks (cons functions (cddr arglist)))
+               `(,hooks ,functions ,@(cddr arglist)))))))
+
+  ;; altered args will be passed to the autoloads and handler functions
+  (defun general-normalize-hook (name _keyword args &optional gfhookp)
+    "Return a plist containing arglists and autoloadable commands.
+Transform ARGS into arglists suitable for `general-add-hook'."
+    (let* ((mode (if (string-match-p "mode\\'" (symbol-name name))
+                     name
+                   (intern (format "%s-mode" name))))
+           (mode-hook (intern (format "%s-hook" mode))))
+      (cl-loop for arg in args
+               collect (general-normalize-hook-arglist
+                        arg mode mode-hook gfhookp))))
+
+  (defalias 'use-package-normalize/:ghook #'general-normalize-hook)
+
+  (defun use-package-autoloads/:ghook (_name _keyword arglists)
+    "Return an alist of commands extracted from ARGLISTS.
+Return somethin"
+    (let (functions)
+      (dolist (arglist arglists)
+        (let ((function-position (cadr arglist)))
+          (cond ((not (listp function-position))
+                 ;; (not (ignore-errors (car function-position)))
+                 ;; ignore variables
+                 )
+                ((and (memq (car function-position) (list 'quote 'function))
+                      (not (listp (cadr function-position))))
+                 (push (cons (cadr function-position) 'command) functions))
+                ((eq (car function-position) 'list)
+                 (dolist (func (cdr function-position))
+                   ;; ignore variables and function/macro calls
+                   (when (and (listp func)
+                              (memq (car func) (list 'quote 'function)))
+                     (push (cons (cadr func) 'command) functions))))
+                ((eq (car function-position) 'quote)
+                 (dolist (func (cadr function-position))
+                   (push (cons func 'command) functions))))))
+      functions))
+
+  (defun use-package-handler/:ghook (name _keyword arglists rest state)
+    "Use-package handler for :ghook and :gfhook."
+    (use-package-concat
+     (use-package-process-keywords name rest state)
+     `(,@(mapcar (lambda (arglist)
+                   arglist
+                   `(general-add-hook ,@arglist))
+                 arglists))))
+
+  (defun use-package-normalize/:gfhook (name keyword args)
+    "Use-package normalizer for :gfhook."
+    (general-normalize-hook name keyword args t))
+
+  (defalias 'use-package-handler/:gfhook #'use-package-handler/:ghook))
+
+;; * Key-chord "Integration"
+(defun general-chord (keys)
+  "Rewrite the string KEYS into a valid key-chord vector."
+  ;; taken straight from key-chord.el
+  (if (/= 2 (length keys))
+      (error "Key-chord keys must have two elements"))
+  ;; Exotic chars in a string are >255 but define-key wants 128..255 for those
+  (let ((key1 (logand 255 (aref keys 0)))
+        (key2 (logand 255 (aref keys 1))))
+    (vector 'key-chord key1 key2)))
+
+(provide 'general)
+;;; general.el ends here
diff --git a/emacs/.emacs.d/elpa/general-20250612.2309/general.elc b/emacs/.emacs.d/elpa/general-20250612.2309/general.elc
new file mode 100644
index 0000000..df01061
Binary files /dev/null and b/emacs/.emacs.d/elpa/general-20250612.2309/general.elc differ
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/.dir-locals.el b/emacs/.emacs.d/elpa/ghub-20260731.2254/.dir-locals.el
new file mode 100644
index 0000000..b6f86ea
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ghub-20260731.2254/.dir-locals.el
@@ -0,0 +1,11 @@
+((nil
+  (indent-tabs-mode . nil))
+ (emacs-lisp-mode
+  (lisp-indent-local-overrides . ((cond . 0) (interactive . 0))))
+ (makefile-mode
+  (indent-tabs-mode . t))
+ (git-commit-mode
+  (git-commit-major-mode . git-commit-elisp-text-mode))
+ ("CHANGELOG"
+  (nil (fill-column . 70)
+       (mode . display-fill-column-indicator))))
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/dir b/emacs/.emacs.d/elpa/ghub-20260731.2254/dir
new file mode 100644
index 0000000..b703bca
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ghub-20260731.2254/dir
@@ -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
+* Ghub: (ghub).                 Client library for the Github API.
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-autoloads.el b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-autoloads.el
new file mode 100644
index 0000000..3e17aff
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-autoloads.el
@@ -0,0 +1,52 @@
+;;; ghub-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from ghub.el
+
+(autoload 'ghub-clear-caches "ghub" "\
+Clear all caches that might negatively affect Ghub.
+
+If a library that is used by Ghub caches incorrect information
+such as a mistyped password, then that can prevent Ghub from
+asking the user for the correct information again.
+
+Set `url-http-real-basic-auth-storage' to nil
+and call `auth-source-forget+'." t)
+(register-definition-prefixes "ghub" '("auth-source-netrc-parse" "ghub-"))
+
+
+;;; Generated autoloads from ghub-graphql.el
+
+(register-definition-prefixes "ghub-graphql" '("ghub-"))
+
+
+;;; Generated autoloads from ghub-legacy.el
+
+(register-definition-prefixes "ghub-legacy" '("ghub-fetch-repository"))
+
+
+;;; Generated autoloads from gsexp.el
+
+(register-definition-prefixes "gsexp" '("gsexp-"))
+
+;;; End of scraped data
+
+(provide 'ghub-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; ghub-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-graphql.el b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-graphql.el
new file mode 100644
index 0000000..e6c3b5f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-graphql.el
@@ -0,0 +1,363 @@
+;;; ghub-graphql.el --- Access Github API using GraphQL  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2016-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.ghub@jonas.bernoulli.dev>
+;; Homepage: https://github.com/magit/ghub
+;; Keywords: tools
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements GraphQL queries for Github.
+
+;;; Code:
+
+(require 'ghub)
+(require 'gsexp)
+(require 'treepy)
+
+(eval-when-compile (require 'subr-x))
+
+(define-error 'ghub-graphql-error "GraphQL Error" 'ghub-error)
+
+(defvar ghub-graphql-message-progress nil
+  "Whether to show \"Fetching page N...\" in echo area during requests.
+By default this information is only shown in the mode-line of the buffer
+from which the request was initiated, and if you kill that buffer, then
+nowhere.  That may make it desirable to display the same message in the
+echo area as well.")
+
+(defvar ghub-graphql-items-per-request 50
+  "Number of GraphQL items to query for entities that return a collection.
+
+Adjust this value if you're hitting query timeouts against larger
+repositories.")
+
+(cl-defun ghub-graphql-rate-limit (&key username auth host)
+  "Return rate limit information."
+  (let-alist (ghub-query
+               '(query (rateLimit limit cost remaining resetAt)) nil
+               :synchronous t :username username :auth auth :host host)
+    .data.rateLimit))
+
+(cl-defstruct (ghub--graphql-req
+               (:include ghub--req)
+               (:constructor ghub--make-graphql-req)
+               (:copier nil))
+  (query     nil :read-only t)
+  (query-str nil :read-only nil)
+  (variables nil :read-only t)
+  (until     nil :read-only t)
+  (pages     0   :read-only nil)
+  (paginate  nil :read-only nil)
+  (narrow    nil :read-only t))
+
+(cl-defun ghub-query
+    (query &optional variables
+           &key until narrow headers paginate
+           callback errorback noerror synchronous
+           username auth host forge)
+  (declare (indent defun))
+  (unless forge
+    (setq forge 'github))
+  (unless host
+    (setq host (ghub--host forge)))
+  (unless (or username (stringp auth) (eq auth 'none))
+    (setq username (ghub--username host forge)))
+  (when (eq callback 'pp)
+    (setq callback #'ghub--graphql-pp-response)
+    (setq noerror t))
+  (ghub--graphql-retrieve
+   (ghub--make-graphql-req
+    :url         (ghub--encode-url
+                  host (if (eq forge 'gitlab) "/api/graphql" "/graphql"))
+    :method      "POST"
+    :headers     (ghub--headers headers host auth username forge)
+    :handler     #'ghub--graphql-handle-response
+    :query       query
+    :variables   variables
+    :until       until
+    :buffer      (current-buffer)
+    :narrow      narrow
+    :paginate    (or paginate
+                     (and-let* ((p (and (eq auth 'forge)
+                                        (fboundp 'magit-get)
+                                        (magit-get "forge.graphqlItemLimit"))))
+                       (string-to-number p)))
+    :noerror     noerror
+    :synchronous synchronous
+    :callback    callback
+    :errorback   errorback)))
+
+(cl-defun ghub--graphql-retrieve (req &optional lineage cursor)
+  (let ((p (incf (ghub--graphql-req-pages req))))
+    (when (> p 1)
+      (when ghub-graphql-message-progress
+        (let ((message-log-max nil))
+          (message "Fetching page %s..." p)))
+      (ghub--graphql-set-mode-line req "Fetching page %s" p)))
+  (setf (ghub--graphql-req-query-str req)
+        (gsexp-encode
+         (ghub--graphql-prepare-query
+          (ghub--graphql-req-query req)
+          lineage cursor)))
+  (when ghub-debug
+    (with-current-buffer (get-buffer-create " *gsexp-encode*")
+      (erase-buffer)
+      (insert (ghub--graphql-req-query-str req) "\n\n")
+      (when-let ((payload (ghub--graphql-req-variables req)))
+        (let ((pos (point)))
+          (insert (ghub--encode-payload payload) "\n")
+          (ignore-errors (json-pretty-print pos (point)))))))
+  (ghub--retrieve
+   (ghub--encode-payload
+    `((query . ,(ghub--graphql-req-query-str req))
+      ,@(and-let* ((variables (ghub--graphql-req-variables req)))
+          `((variables . ,variables)))))
+   req)
+  (ghub--req-value req))
+
+(defun ghub--graphql-prepare-query (query &optional lineage cursor paginate)
+  (when lineage
+    (setq query (ghub--graphql-narrow-query query lineage cursor)))
+  (let ((loc (ghub--alist-zip query))
+        variables)
+    (catch :done
+      (while t
+        (let ((node (treepy-node loc)))
+          (when (and (vectorp node)
+                     (listp (aref node 0)))
+            (let ((alist (append node ()))
+                  (vars nil))
+              (when-let ((edges (cadr (assq :edges alist))))
+                (push (list 'first
+                            (apply
+                             #'min
+                             (delq nil (list (and (numberp edges) edges)
+                                             paginate
+                                             ghub-graphql-items-per-request))))
+                      vars)
+                (setq loc  (treepy-up loc))
+                (setq node (treepy-node loc))
+                (setq loc  (treepy-replace
+                            loc `(,(car  node)
+                                  ,(cadr node)
+                                  (pageInfo endCursor hasNextPage)
+                                  (edges (node ,@(cddr node))))))
+                (setq loc  (treepy-down loc))
+                (setq loc  (treepy-next loc)))
+              (dolist (elt alist)
+                (cond ((keywordp (car elt)))
+                      ((length= elt 3)
+                       (push (list (nth 0 elt) (nth 1 elt)) vars)
+                       (push (list (nth 1 elt) (nth 2 elt)) variables))
+                      ((length= elt 2)
+                       (push elt vars))))
+              (setq loc (treepy-replace loc (vconcat (nreverse vars)))))))
+        (if (treepy-end-p loc)
+            (let ((node (copy-sequence (treepy-node loc))))
+              (when variables
+                (push (vconcat (nreverse variables))
+                      (cdr node)))
+              (throw :done node))
+          (setq loc (treepy-next loc)))))))
+
+(defun ghub--graphql-handle-response (status req)
+  (let ((buf (current-buffer)))
+    (unwind-protect
+        (progn
+          (set-buffer-multibyte t)
+          (let* ((headers (ghub--handle-response-headers status req))
+                 (payload (ghub--handle-response-payload req))
+                 (data    (assq 'data payload))
+                 (err     (plist-get status :error))
+                 (errors  (and (not (and (ghub--req-noerror req)
+                                         (assq 'data payload)))
+                               (assq 'errors payload))))
+            (cond ((or err errors)
+                   (when (and (not err) ghub-debug)
+                     (ignore-errors (json-pretty-print (point) (point-max)))
+                     (pop-to-buffer buf))
+                   (if (ghub--req-noerror req)
+                       (ghub--graphql-walk-response req data)
+                     (ghub--graphql-handle-failure
+                      req (or err errors) headers status)))
+                  ((ghub--graphql-walk-response req data)))))
+      (when (and (buffer-live-p buf)
+                 (not (buffer-local-value 'ghub-debug buf)))
+        (kill-buffer buf)))))
+
+(defun ghub--graphql-handle-failure (req errors headers status)
+  (ghub--graphql-set-mode-line req)
+  (setf (ghub--req-value req) errors)
+  (cond-let
+    ([errorback (ghub--req-errorback req)]
+     (ghub--graphql-run-callback req errorback errors headers status req))
+    ((ghub--req-noerror req)
+     (when-let ((callback (ghub--req-callback req)))
+       (ghub--graphql-run-callback req callback errors)))
+    ((ghub--signal-error (if (eq (car errors) 'errors)
+                             (cons 'ghub-graphql-error (cdr errors))
+                           errors)))))
+
+(defun ghub--graphql-handle-success (req data)
+  (ghub--graphql-set-mode-line req)
+  (when-let ((narrow (ghub--graphql-req-narrow req)))
+    (while-let ((key (pop narrow)))
+      (setq data (cdr (assq key data)))))
+  (setf (ghub--req-value req) data)
+  (when-let ((callback (ghub--req-callback req)))
+    (ghub--graphql-run-callback req callback data)))
+
+(defun ghub--graphql-run-callback (req callback &rest args)
+  (let ((buffer (ghub--req-buffer req)))
+    (if (buffer-live-p buffer)
+        (with-current-buffer buffer
+          (apply callback args))
+      (apply callback args))))
+
+(defun ghub--graphql-set-mode-line (req &optional format &rest args)
+  (let ((buffer (ghub--graphql-req-buffer req)))
+    (when (buffer-live-p buffer)
+      (with-current-buffer buffer
+        (setq mode-line-process
+              (and format (concat " " (apply #'format format args))))
+        (force-mode-line-update t)))))
+
+(defun ghub--graphql-pp-response (data)
+  (pp-display-expression data "*Pp Eval Output*"))
+
+(defun ghub--graphql-walk-response (req data)
+  (let* ((loc (ghub--req-value req))
+         (loc (if (not loc)
+                  (ghub--alist-zip data)
+                (setq data (ghub--graphql-narrow-data
+                            data (ghub--graphql-lineage loc)))
+                (setf (alist-get 'edges data)
+                      (append (alist-get 'edges (treepy-node loc))
+                              (or (alist-get 'edges data)
+                                  (error "BUG: Expected new nodes"))))
+                (treepy-replace loc data))))
+    (catch :done
+      (while t
+        (when (eq (car-safe (treepy-node loc)) 'edges)
+          (setq loc (treepy-up loc))
+          (pcase-let ((`(,key . ,val) (treepy-node loc)))
+            (let-alist val
+              (let* ((cursor (and .pageInfo.hasNextPage
+                                  .pageInfo.endCursor))
+                     (until  (cdr (assq (intern (format "%s-until" key))
+                                        (ghub--graphql-req-until req))))
+                     (nodes  (mapcar #'cdar .edges))
+                     (nodes  (if until
+                                 (seq-take-while
+                                  (lambda (node)
+                                    (or (string> (cdr (assq 'updatedAt node))
+                                                 until)
+                                        (setq cursor nil)))
+                                  nodes)
+                               nodes)))
+                (cond (cursor
+                       (setf (ghub--req-value req) loc)
+                       (ghub--graphql-retrieve req
+                                               (ghub--graphql-lineage loc)
+                                               cursor)
+                       (throw :done nil))
+                      ((setq loc (treepy-replace loc (cons key nodes)))))))))
+        (if (treepy-end-p loc)
+            (progn (ghub--graphql-handle-success req (treepy-root loc))
+                   (throw :done nil))
+          (setq loc (treepy-next loc)))))))
+
+(defun ghub--graphql-lineage (loc)
+  (let (lineage)
+    (while (treepy-up loc)
+      (push (car (treepy-node loc)) lineage)
+      (setq loc (treepy-up loc)))
+    lineage))
+
+(defun ghub--graphql-narrow-data (data lineage)
+  (while-let ((key (pop lineage)))
+    (if (consp (car lineage))
+        (progn (pop lineage)
+               (setf data (cadr data)))
+      (setq data (assq key (cdr data)))))
+  data)
+
+(defun ghub--graphql-narrow-query (query lineage &optional cursor)
+  (if (consp (car lineage))
+      (let* ((child  (cddr query))
+             (alist  (append (cadr query) ()))
+             (single (cdr (assq :singular alist))))
+        `(,(car single)
+          ,(vector (list (cadr single) (cdr (car lineage))))
+          ,@(if (cdr lineage)
+                (ghub--graphql-narrow-query child (cdr lineage) cursor)
+              child)))
+    (let* ((child  (or (assq (car lineage) (cdr query))
+                       ;; Alias
+                       (cl-find-if (lambda (c)
+                                     (eq (car-safe (car-safe c))
+                                         (car lineage)))
+                                   query)
+                       ;; Edges
+                       (cl-find-if (lambda (c)
+                                     (and (listp c)
+                                          (vectorp (cadr c))
+                                          (eq (cadr (assq :singular
+                                                          (append (cadr c) ())))
+                                              (car lineage))))
+                                   (cdr query))
+                       (error "BUG: Failed to narrow query")))
+           (object (car query))
+           (args   (and (vectorp (cadr query))
+                        (cadr query))))
+      `(,object
+        ,@(and args (list args))
+        ,(cond ((cdr lineage)
+                (ghub--graphql-narrow-query child (cdr lineage) cursor))
+               (cursor
+                `(,(car child)
+                  ,(vconcat `((after ,cursor))
+                            (cadr child))
+                  ,@(cddr child)))
+               (t
+                child))))))
+
+(defun ghub--alist-zip (root)
+  (let ((branchp (##and (listp %) (listp (cdr %))))
+        (make-node (lambda (_ children) children)))
+    (treepy-zipper branchp #'identity make-node root)))
+
+;;; _
+(provide 'ghub-graphql)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"       . "cond-let--and$")
+;;   ("thread$"    . "cond-let--thread$")
+;;   ("when$"      . "cond-let--when$")
+;;   ("and-let*"   . "cond-let--and-let*")
+;;   ("and-let"    . "cond-let--and-let")
+;;   ("if-let*"    . "cond-let--if-let*")
+;;   ("if-let"     . "cond-let--if-let")
+;;   ("when-let*"  . "cond-let--when-let*")
+;;   ("when-let"   . "cond-let--when-let")
+;;   ("while-let*" . "cond-let--while-let*")
+;;   ("while-let"  . "cond-let--while-let"))
+;; End:
+;;; ghub-graphql.el ends here
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-graphql.elc b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-graphql.elc
new file mode 100644
index 0000000..676899b
Binary files /dev/null and b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-graphql.elc differ
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-legacy.el b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-legacy.el
new file mode 100644
index 0000000..1fa2ff7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-legacy.el
@@ -0,0 +1,384 @@
+;;; ghub-legacy.el --- Deprecated Ghub functions  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2016-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.ghub@jonas.bernoulli.dev>
+;; Homepage: https://github.com/magit/ghub
+;; Keywords: tools
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Deprecated Ghub functions.
+
+;;; Code:
+
+(require 'ghub-graphql)
+
+(cl-defun ghub-graphql (graphql
+                        &optional variables
+                        &key username auth host forge
+                        headers silent
+                        callback errorback value extra)
+  (declare (obsolete ghub-query "Ghub 5.1.0"))
+  (cl-assert (not (stringp variables)))
+  (cl-assert (or (stringp graphql)
+                 (memq (car-safe graphql) '(query mutation))))
+  (unless (stringp graphql)
+    (setq graphql (gsexp-encode (ghub--graphql-prepare-query graphql))))
+  (ghub-request "POST"
+    (if (eq forge 'gitlab) "/api/graphql" "/graphql")
+    nil
+    :payload `((query . ,graphql)
+               ,@(and variables `((variables ,@variables))))
+    :headers headers :silent silent
+    :username username :auth auth :host host :forge forge
+    :callback callback :errorback errorback
+    :extra extra :value value))
+
+(cl-defun ghub--graphql (graphql
+                         &optional variables
+                         &key username auth host forge
+                         headers
+                         callback errorback)
+  (declare (obsolete ghub-query "Ghub 5.1.0"))
+  (ghub--graphql-vacuum graphql variables callback nil
+                        :username  username
+                        :auth      auth
+                        :host      host
+                        :forge     forge
+                        :headers   headers
+                        :errorback errorback))
+
+(cl-defun ghub--graphql-vacuum
+    ( query variables callback
+      &optional until
+      &key narrow username auth host forge
+      headers paginate errorback noerror synchronous)
+  (declare (obsolete ghub-query "Ghub 5.1.0"))
+  (ghub-query query variables
+    :until until :narrow narrow :headers headers :paginate paginate
+    :callback callback
+    :errorback errorback :noerror noerror :synchronous synchronous
+    :username username :auth auth :host host :forge forge))
+
+(defconst ghub-fetch-repository-sparse
+  '(query
+    (repository
+     [(owner $owner String!)
+      (name  $name  String!)]
+     name
+     id
+     createdAt
+     updatedAt
+     nameWithOwner
+     (parent nameWithOwner)
+     description
+     homepageUrl
+     (defaultBranchRef name)
+     isArchived
+     isFork
+     isLocked
+     isMirror
+     isPrivate
+     hasDiscussionsEnabled
+     hasIssuesEnabled
+     hasWikiEnabled
+     (licenseInfo name)
+     (stargazers totalCount)
+     (watchers totalCount))))
+
+(defconst ghub-fetch-repository
+  `(query
+    (repository
+     ,@(cdr (cadr ghub-fetch-repository-sparse))
+     (assignableUsers [(:edges t)]
+                      id
+                      login
+                      name)
+     (discussionCategories [(:edges t)]
+                           id
+                           name
+                           emoji
+                           isAnswerable
+                           description)
+     (discussions    [(:edges t)
+                      (:singular discussion number)
+                      (orderBy ((field UPDATED_AT) (direction DESC)))]
+                     id
+                     databaseId
+                     number
+                     url
+                     stateReason
+                     ;; Discussions lack isReadByViewer.
+                     (answer id)
+                     (author login)
+                     title
+                     createdAt
+                     updatedAt
+                     closedAt
+                     locked
+                     (category id)
+                     body
+                     (comments  [(:edges t)]
+                                id
+                                databaseId
+                                (author login)
+                                createdAt
+                                updatedAt
+                                body
+                                (replies [(:edges 20)]
+                                         id
+                                         databaseId
+                                         (author login)
+                                         createdAt
+                                         updatedAt
+                                         body))
+                     (labels    [(:edges t)]
+                                id))
+     (issues         [(:edges t)
+                      (:singular issue number)
+                      (orderBy ((field UPDATED_AT) (direction DESC)))]
+                     number
+                     id
+                     state
+                     stateReason
+                     isReadByViewer
+                     (author login)
+                     title
+                     createdAt
+                     updatedAt
+                     closedAt
+                     locked
+                     (milestone id)
+                     body
+                     (assignees [(:edges t)]
+                                id)
+                     (comments  [(:edges t)]
+                                id
+                                databaseId
+                                (author login)
+                                createdAt
+                                updatedAt
+                                body)
+                     (labels    [(:edges t)]
+                                id))
+     (labels         [(:edges t)
+                      (:singular label id)]
+                     id
+                     name
+                     color
+                     description)
+     (milestones     [(:edges t)
+                      (:singular milestone id)]
+                     id
+                     number
+                     title
+                     createdAt
+                     updatedAt
+                     dueOn
+                     closedAt
+                     description)
+     (pullRequests   [(:edges t)
+                      (:singular pullRequest number)
+                      (orderBy ((field UPDATED_AT) (direction DESC)))]
+                     number
+                     id
+                     state
+                     isReadByViewer
+                     (author login)
+                     title
+                     createdAt
+                     updatedAt
+                     closedAt
+                     mergedAt
+                     isDraft
+                     locked
+                     maintainerCanModify
+                     isCrossRepository
+                     (milestone id)
+                     body
+                     (baseRef name
+                              (repository nameWithOwner))
+                     baseRefOid
+                     (headRef name
+                              (repository (owner login)
+                                          nameWithOwner))
+                     headRefOid
+                     (assignees [(:edges t)]
+                                id)
+                     (reviewRequests [(:edges t)]
+                                     (requestedReviewer "... on User { id }\n"))
+                     (comments  [(:edges t)]
+                                id
+                                databaseId
+                                (author login)
+                                createdAt
+                                updatedAt
+                                body)
+                     (labels    [(:edges t)]
+                                id)))))
+
+(defconst ghub-fetch-repository-review-threads
+  '(query
+    (repository
+     [(owner $owner String!)
+      (name  $name  String!)]
+     (pullRequests   [(:edges t)
+                      (:singular pullRequest number)
+                      (orderBy ((field UPDATED_AT) (direction DESC)))]
+                     number
+                     baseRefOid
+                     headRefOid
+                     (reviewThreads [(:edges t)]
+                                    id
+                                    line
+                                    originalLine
+                                    diffSide
+                                    (resolvedBy login)
+                                    (comments [(:edges t)]
+                                              id
+                                              databaseId
+                                              (author login)
+                                              createdAt
+                                              updatedAt
+                                              body
+                                              (replyTo databaseId)
+                                              (originalCommit oid)
+                                              path))))))
+
+(cl-defun ghub-fetch-repository ( owner name callback
+                                  &optional until
+                                  &key username auth host forge
+                                  headers paginate errorback sparse)
+  "Asynchronously fetch forge data about the specified repository.
+Once all data has been collected, CALLBACK is called with the
+data as the only argument."
+  (declare (obsolete nil "Ghub 5.1.0"))
+  (ghub-query (if sparse
+                  ghub-fetch-repository-sparse
+                ghub-fetch-repository)
+    `((owner . ,owner)
+      (name  . ,name))
+    :until     until
+    :narrow    '(repository)
+    :username  username
+    :auth      auth
+    :host      host
+    :forge     forge
+    :headers   headers
+    :paginate  paginate
+    :callback  callback
+    :errorback errorback))
+
+(cl-defun ghub-fetch-discussion ( owner name number callback
+                                  &optional until
+                                  &key username auth host forge
+                                  headers errorback)
+  "Asynchronously fetch forge data about the specified discussion.
+Once all data has been collected, CALLBACK is called with the
+data as the only argument."
+  (declare (obsolete nil "Ghub 5.1.0"))
+  (ghub-query (ghub--graphql-prepare-query
+               ghub-fetch-repository
+               `(repository discussions (discussion . ,number)))
+    `((owner . ,owner)
+      (name  . ,name))
+    :until     until
+    :narrow    '(repository discussion)
+    :username  username
+    :auth      auth
+    :host      host
+    :forge     forge
+    :headers   headers
+    :callback  callback
+    :errorback errorback))
+
+(cl-defun ghub-fetch-issue ( owner name number callback
+                             &optional until
+                             &key username auth host forge
+                             headers paginate errorback)
+  "Asynchronously fetch forge data about the specified issue.
+Once all data has been collected, CALLBACK is called with the
+data as the only argument."
+  (declare (obsolete nil "Ghub 5.1.0"))
+  (ghub-query (ghub--graphql-narrow-query
+               ghub-fetch-repository
+               `(repository issues (issue . ,number)))
+    `((owner . ,owner)
+      (name  . ,name))
+    :until     until
+    :narrow    '(repository issue)
+    :username  username
+    :auth      auth
+    :host      host
+    :forge     forge
+    :headers   headers
+    :paginate  paginate
+    :callback  callback
+    :errorback errorback))
+
+(cl-defun ghub-fetch-pullreq ( owner name number callback
+                               &optional until
+                               &key username auth host forge
+                               headers paginate errorback)
+  "Asynchronously fetch forge data about the specified pull-request.
+Once all data has been collected, CALLBACK is called with the
+data as the only argument."
+  (ghub-query (ghub--graphql-narrow-query
+               ghub-fetch-repository
+               `(repository pullRequests (pullRequest . ,number)))
+    `((owner . ,owner)
+      (name  . ,name))
+    :until     until
+    :narrow    '(repository pullRequest)
+    :username  username
+    :auth      auth
+    :host      host
+    :forge     forge
+    :headers   headers
+    :paginate  paginate
+    :callback  callback
+    :errorback errorback))
+
+(cl-defun ghub-fetch-review-threads ( owner name number callback
+                                      &optional until
+                                      &key username auth host forge
+                                      headers paginate errorback)
+  "Asynchronously fetch forge data about the review threads from a pull-request.
+Once all data has been collected, CALLBACK is called with the
+data as the only argument."
+  (declare (obsolete nil "Ghub 5.1.0"))
+  (ghub-query (ghub--graphql-narrow-query
+               ghub-fetch-repository-review-threads
+               `(repository pullRequests (pullRequest . ,number)))
+    `((owner . ,owner)
+      (name  . ,name))
+    :until     until
+    :narrow    '(repository pullRequest)
+    :username  username
+    :auth      auth
+    :host      host
+    :forge     forge
+    :headers   headers
+    :paginate  paginate
+    :callback  callback
+    :errorback errorback))
+
+;;; _
+(provide 'ghub-legacy)
+;;; ghub-legacy.el ends here
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-legacy.elc b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-legacy.elc
new file mode 100644
index 0000000..91fca3f
Binary files /dev/null and b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-legacy.elc differ
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-pkg.el b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-pkg.el
new file mode 100644
index 0000000..0697c0c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub-pkg.el
@@ -0,0 +1,14 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "ghub" "20260731.2254"
+  "Client libraries for Git forge APIs."
+  '((emacs    "29.1")
+    (compat   "31.0")
+    (cond-let "1.1")
+    (llama    "1.0")
+    (treepy   "0.1.3"))
+  :url "https://github.com/magit/ghub"
+  :commit "cba5666d8b999e2733aefac369a4e0def3be7fc9"
+  :revdesc "cba5666d8b99"
+  :keywords '("tools")
+  :authors '(("Jonas Bernoulli" . "emacs.ghub@jonas.bernoulli.dev"))
+  :maintainers '(("Jonas Bernoulli" . "emacs.ghub@jonas.bernoulli.dev")))
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub.el b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub.el
new file mode 100644
index 0000000..1d0cd09
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub.el
@@ -0,0 +1,844 @@
+;;; ghub.el --- Client libraries for Git forge APIs  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2016-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.ghub@jonas.bernoulli.dev>
+;; Homepage: https://github.com/magit/ghub
+;; Keywords: tools
+
+;; Package-Version: 20260731.2254
+;; Package-Revision: cba5666d8b99
+;; Package-Requires: (
+;;     (emacs   "29.1")
+;;     (compat  "31.0")
+;;     (cond-let "1.1")
+;;     (llama    "1.0")
+;;     (treepy "0.1.3"))
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Ghub provides basic support for using the APIs of various Git forges
+;; from Emacs packages.  Originally it only supported the Github REST
+;; API, but now it also supports the Github GraphQL API as well as the
+;; REST APIs of Gitlab, Gitea, Gogs and Bitbucket.
+
+;; Ghub abstracts access to API resources using only a handful of basic
+;; functions such as `ghub-get'.  These are convenience wrappers around
+;; `ghub-request'.
+
+;; When accessing Github, then Ghub handles the creation and storage of
+;; access tokens using a setup wizard to make it easier for users to get
+;; started.  The tokens for other forges have to be created manually.
+
+;; Ghub is intentionally limited to only provide these two essential
+;; features — basic request functions and guided setup — to avoid being
+;; too opinionated, which would hinder wide adoption.  It is assumed that
+;; wide adoption would make life easier for users and maintainers alike,
+;; because then all packages that talk to forge APIs could be configured
+;; the same way.
+
+;; Please consult the manual (info "ghub") for more information.
+
+;;; Code:
+
+(require 'auth-source)
+(require 'cl-lib)
+(require 'compat)
+(require 'cond-let)
+(require 'gnutls)
+(require 'let-alist)
+(require 'llama)
+(require 'url)
+(require 'url-auth)
+(require 'url-http)
+
+(eval-when-compile (require 'subr-x))
+
+(defvar url-callback-arguments)
+(defvar url-http-end-of-headers)
+(defvar url-http-extra-headers)
+(defvar url-http-response-status)
+
+;;; Settings
+
+(defvar ghub-default-host-alist
+  '((github    . "api.github.com")
+    (gitlab    . "gitlab.com")
+    (forgejo   . "codeberg.org")
+    (bitbucket . "api.bitbucket.org"))
+  "Alist of default hosts used when the respective `FORGE.host' is not set.")
+
+(defvar ghub-insecure-hosts nil
+  "List of hosts that use http instead of https.")
+
+(defvar ghub-debug nil
+  "Record additional debug information.")
+
+;;; Request
+;;;; Object
+
+(cl-defstruct (ghub--req
+               (:constructor ghub--make-req)
+               (:copier nil))
+  (url         nil :read-only nil)
+  (forge       nil :read-only t)
+  (silent      nil :read-only t)
+  (method      nil :read-only t)
+  (headers     nil :read-only t)
+  (handler     nil :read-only t)
+  (unpaginate  nil :read-only nil)
+  (noerror     nil :read-only t)
+  (reader      nil :read-only t)
+  (buffer      nil :read-only t)
+  (synchronous nil :read-only t)
+  (callback    nil :read-only t)
+  (errorback   nil :read-only t)
+  (value       nil :read-only nil)
+  (extra       nil :read-only nil))
+
+(defalias 'ghub-req-extra #'ghub--req-extra)
+
+;;;; API
+
+(define-error 'ghub-error "Ghub/Url Error" 'error)
+(define-error 'ghub-http-error "HTTP Error" 'ghub-error)
+
+(defvar ghub-response-headers nil
+  "The headers returned in response to the last request.
+`ghub-request' returns the response body and stores the
+response headers in this variable.")
+
+(cl-defun ghub-head (resource
+                     &optional params
+                     &key query payload headers
+                     silent unpaginate noerror reader
+                     username auth host
+                     callback errorback extra)
+  "Make a `HEAD' request for RESOURCE, with optional query PARAMS.
+Like calling `ghub-request' (which see) with \"HEAD\" as METHOD."
+  (ghub-request "HEAD" resource params
+    :query query :payload payload :headers headers
+    :silent silent :unpaginate unpaginate
+    :noerror noerror :reader reader
+    :username username :auth auth :host host
+    :callback callback :errorback errorback :extra extra))
+
+(cl-defun ghub-get (resource
+                    &optional params
+                    &key query payload headers
+                    silent unpaginate noerror reader
+                    username auth host forge
+                    callback errorback extra)
+  "Make a `GET' request for RESOURCE, with optional query PARAMS.
+Like calling `ghub-request' (which see) with \"GET\" as METHOD."
+  (ghub-request "GET" resource params
+    :query query :payload payload :headers headers
+    :silent silent :unpaginate unpaginate
+    :noerror noerror :reader reader
+    :username username :auth auth :host host :forge forge
+    :callback callback :errorback errorback :extra extra))
+
+(cl-defun ghub-put (resource
+                    &optional params
+                    &key query payload headers
+                    silent unpaginate noerror reader
+                    username auth host forge
+                    callback errorback extra)
+  "Make a `PUT' request for RESOURCE, with optional payload PARAMS.
+Like calling `ghub-request' (which see) with \"PUT\" as METHOD."
+  (ghub-request "PUT" resource params
+    :query query :payload payload :headers headers
+    :silent silent :unpaginate unpaginate
+    :noerror noerror :reader reader
+    :username username :auth auth :host host :forge forge
+    :callback callback :errorback errorback :extra extra))
+
+(cl-defun ghub-post (resource
+                     &optional params
+                     &key query payload headers
+                     silent unpaginate noerror reader
+                     username auth host forge
+                     callback errorback extra)
+  "Make a `POST' request for RESOURCE, with optional payload PARAMS.
+Like calling `ghub-request' (which see) with \"POST\" as METHOD."
+  (ghub-request "POST" resource params
+    :query query :payload payload :headers headers
+    :silent silent :unpaginate unpaginate
+    :noerror noerror :reader reader
+    :username username :auth auth :host host :forge forge
+    :callback callback :errorback errorback :extra extra))
+
+(cl-defun ghub-patch (resource
+                      &optional params
+                      &key query payload headers
+                      silent unpaginate noerror reader
+                      username auth host forge
+                      callback errorback extra)
+  "Make a `PATCH' request for RESOURCE, with optional payload PARAMS.
+Like calling `ghub-request' (which see) with \"PATCH\" as METHOD."
+  (ghub-request "PATCH" resource params
+    :query query :payload payload :headers headers
+    :silent silent :unpaginate unpaginate
+    :noerror noerror :reader reader
+    :username username :auth auth :host host :forge forge
+    :callback callback :errorback errorback :extra extra))
+
+(cl-defun ghub-delete (resource
+                       &optional params
+                       &key query payload headers
+                       silent unpaginate noerror reader
+                       username auth host forge
+                       callback errorback extra)
+  "Make a `DELETE' request for RESOURCE, with optional payload PARAMS.
+Like calling `ghub-request' (which see) with \"DELETE\" as METHOD."
+  (ghub-request "DELETE" resource params
+    :query query :payload payload :headers headers
+    :silent silent :unpaginate unpaginate
+    :noerror noerror :reader reader
+    :username username :auth auth :host host :forge forge
+    :callback callback :errorback errorback :extra extra))
+
+(cl-defun ghub-request ( method resource
+                         &optional params
+                         &key query payload headers
+                         silent unpaginate noerror reader
+                         username auth host forge
+                         callback errorback value extra)
+  "Make a request for RESOURCE and return the response body.
+
+Also place the response headers in `ghub-response-headers'.
+
+METHOD is the HTTP method, given as a string.
+RESOURCE is the resource to access, given as a string beginning
+  with a slash.
+
+PARAMS, QUERY, PAYLOAD and HEADERS are alists used to specify
+  data.  The Github API documentation is vague on how data has
+  to be transmitted and for a particular resource usually just
+  talks about \"parameters\".  Generally speaking when the METHOD
+  is \"HEAD\" or \"GET\", then they have to be transmitted as a
+  query, otherwise as a payload.
+Use PARAMS to automatically transmit like QUERY or PAYLOAD would
+  depending on METHOD.
+Use QUERY to explicitly transmit data as a query.
+Use PAYLOAD to explicitly transmit data as a payload.
+  Instead of an alist, PAYLOAD may also be a string, in which
+  case it gets encoded as UTF-8 but is otherwise transmitted as-is.
+Use HEADERS for those rare resources that require that the data
+  is transmitted as headers instead of as a query or payload.
+  When that is the case, then the API documentation usually
+  mentions it explicitly.
+
+If SILENT is non-nil, then don't message progress reports and
+  the like.
+
+If UNPAGINATE is t, then make as many requests as necessary to
+  get all values.  If UNPAGINATE is a natural number, then get
+  at most that many pages.  For any other non-nil value raise
+  an error.
+If NOERROR is non-nil, then do not raise an error if the request
+  fails and return nil instead.  If NOERROR is `return', then
+  return the error payload instead of nil.
+If READER is non-nil, then it is used to read and return from the
+  response buffer.  The default is `ghub--read-json-payload'.
+  For the very few resources that do not return JSON, you might
+  want to use `ghub--decode-payload'.
+
+If USERNAME is non-nil, then make a request on behalf of that
+  user.  It is better to specify the user using the Git variable
+  `github.user' for \"api.github.com\", or `github.HOST.user' if
+  connecting to a Github Enterprise instance.
+
+Each package that uses `ghub' should use its own token.  If AUTH
+  is nil, then the generic `ghub' token is used instead.  This
+  is only acceptable for personal utilities.  A packages that
+  is distributed to other users should always use this argument
+  to identify itself, using a symbol matching its name.
+
+  Package authors who find this inconvenient should write a
+  wrapper around this function and possibly for the
+  method-specific functions as well.
+
+  Some symbols have a special meaning.  `none' means to make an
+  unauthorized request.  `basic' means to make a password based
+  request.  If the value is a string, then it is assumed to be
+  a valid token.  `basic' and an explicit token string are only
+  intended for internal and debugging uses.
+
+If HOST is non-nil, then connect to that Github instance.  This
+  defaults to \"api.github.com\".  When a repository is connected
+  to a Github Enterprise instance, then it is better to specify
+  that using the Git variable `github.host' instead of using this
+  argument.
+
+If optional FORGE is nil, then it is assumed that HOST is a
+  Github host.  When connecting to another forge type, then
+  FORGE must be one of `gitlab', `gitea', `gogs' or `bitbucket'.
+
+If CALLBACK and/or ERRORBACK is non-nil, then make one or more
+  asynchronous requests and call CALLBACK or ERRORBACK when
+  finished.  If no error occurred, then call CALLBACK, unless
+  that is nil.
+
+  If an error occurred, then call ERRORBACK, or if that is nil,
+  then CALLBACK.  ERRORBACK can also be t, in which case an error
+  is signaled instead.  NOERROR is ignored for all asynchronous
+  requests.
+
+Both callbacks are called with four arguments.
+  1. For CALLBACK, the combined value of the retrieved pages.
+     For ERRORBACK, the error that occurred when retrieving the
+     last page.
+  2. The headers of the last page as an alist.
+  3. Status information provided by `url-retrieve'. Its `:error'
+     property holds the same information as ERRORBACK's first
+     argument.
+  4. A `ghub--req' struct, which can be passed to `ghub-continue'
+     (which see) to retrieve the next page, if any."
+  (declare (indent defun))
+  (cl-assert (or (booleanp unpaginate) (natnump unpaginate)))
+  (unless (string-prefix-p "/" resource)
+    (setq resource (concat "/" resource)))
+  (unless host
+    (setq host (ghub--host forge)))
+  (unless (or username (stringp auth) (eq auth 'none))
+    (setq username (ghub--username host forge)))
+  (cond ((not params))
+        ((member method '("GET" "HEAD"))
+         (when query
+           (error "PARAMS and QUERY are mutually exclusive for METHOD %S"
+                  method))
+         (setq query params))
+        (t
+         (when payload
+           (error "PARAMS and PAYLOAD are mutually exclusive for METHOD %S"
+                  method))
+         (setq payload params)))
+  (when (or callback errorback)
+    (setq noerror t))
+  (ghub--retrieve
+   (ghub--encode-payload payload)
+   (ghub--make-req
+    :url         (ghub--encode-url host resource query)
+    :forge       forge
+    :silent      silent
+    :method      (encode-coding-string method 'utf-8) ;#35
+    :headers     (ghub--headers headers host auth username forge)
+    :handler     #'ghub--handle-response
+    :unpaginate  unpaginate
+    :noerror     noerror
+    :reader      reader
+    :buffer      (current-buffer)
+    :synchronous (not (or callback errorback))
+    :callback    callback
+    :errorback   errorback
+    :value       value
+    :extra       extra)))
+
+(defun ghub-continue (req)
+  "If there is a next page, then retrieve that.
+
+This function is only intended to be called from callbacks.  If
+there is a next page, then retrieve that and return the buffer
+that the result will be loaded into, or t if the process has
+already completed.  If there is no next page, then return nil.
+
+Callbacks are called with four arguments (see `ghub-request').
+The forth argument is a `ghub--req' struct, intended to be passed
+to this function.  A callback may use the struct's `extra' slot
+to pass additional information to the callback that will be
+called after the next request has finished.  Use the function
+`ghub-req-extra' to get and set the value of this slot."
+  (and (assq 'next (ghub-response-link-relations req))
+       (or (ghub--retrieve nil req) t)))
+
+(cl-defun ghub-wait (resource
+                     &optional duration
+                     &key username auth host forge)
+  "Busy-wait up to DURATION seconds for RESOURCE to become available.
+
+DURATION specifies how many seconds to wait at most.  It defaults
+to 64 seconds.  The first attempt is made immediately, the second
+after two seconds, and each subsequent attempt is made after
+waiting as long again as we already waited between all preceding
+attempts combined.
+
+See `ghub-request' for information about the other arguments."
+  (unless duration
+    (setq duration 64))
+  (with-local-quit
+    (let ((total 0))
+      (while (not (ghub-request "GET" resource nil
+                    :noerror t
+                    :username username
+                    :auth auth
+                    :host host
+                    :forge forge))
+        (message "Waited (%3ss of %ss) for %s..." total duration resource)
+        (if (= total duration)
+            (error "%s is taking too long to create %s"
+                   (if forge (capitalize (symbol-name forge)) "Github")
+                   resource)
+          (if (> total 0)
+              (let ((wait (min total (- duration total))))
+                (sit-for wait)
+                (incf total wait))
+            (sit-for (setq total 2))))))))
+
+(defun ghub-response-link-relations (req &optional headers payload)
+  "Return an alist of link relations in HEADERS.
+If optional HEADERS is nil, then return those that were
+previously stored in the variable `ghub-response-headers'.
+
+When accessing a Bitbucket instance then the link relations
+are in PAYLOAD instead of HEADERS, making their API merely
+RESTish and forcing this function to append those relations
+to the value of `ghub-response-headers', for later use when
+this function is called with nil for PAYLOAD."
+  (if (eq (ghub--req-forge req) 'bitbucket)
+      (if payload
+          (let* ((page (seq-keep (##assq % payload)
+                                 '(size page pagelen next previous)))
+                 (headers (cons (cons 'link-alist page) headers)))
+            (if (and req (or (ghub--req-callback req)
+                             (ghub--req-errorback req)))
+                (setq-local ghub-response-headers headers)
+              (setq-default ghub-response-headers headers))
+            page)
+        (cdr (assq 'link-alist ghub-response-headers)))
+    (and-let* ((headers (or headers ghub-response-headers))
+               (rels (cdr (or (assoc "Link" headers)
+                              (assoc "link" headers)))))
+      (mapcar (lambda (elt)
+                (pcase-let ((`(,url ,rel) (split-string elt "; ")))
+                  (cons (intern (substring rel 5 -1))
+                        (substring url 1 -1))))
+              (split-string rels ", ?")))))
+
+(cl-defun ghub-repository-id (owner name &key username auth host forge noerror)
+  "Return the id of the specified repository.
+Signal an error if the id cannot be determined."
+  (or (pcase forge
+        ((or 'nil 'github)
+         (let-alist (ghub-query
+                      '(query (repository [(owner $owner String!)
+                                           (name  $name  String!)]
+                                          id))
+                      `((owner . ,owner)
+                        (name  . ,name))
+                      :synchronous t
+                      :username username :auth auth :host host)
+           .repository.id))
+        ('gitlab
+         (number-to-string
+          (alist-get
+           'id (ghub-get (format "/projects/%s%%2F%s"
+                                 (string-replace "/" "%2F" owner)
+                                 name)
+                         nil :forge 'gitlab
+                         :username username :auth auth :host host))))
+        ((or 'forgejo 'gitea 'gogs)
+         (number-to-string
+          (alist-get
+           'id (ghub-get (format "/repos/%s/%s" owner name)
+                         nil :forge forge
+                         :username username :auth auth :host host))))
+        ('bitbucket
+         (substring
+          (alist-get 'uuid
+                     (ghub-get (format "/repositories/%s/%s" owner name)
+                               nil :forge 'bitbucket
+                               :username username :auth auth :host host))
+          1 -1))
+        (_ (error "ghub-repository-id: Forge type `%s' is unknown" forge)))
+      (and (not noerror)
+           (error "Repository %S does not exist on %S.\n%s%S?"
+                  (concat owner "/" name)
+                  (or host (ghub--host forge))
+                  "Maybe it was renamed and you have to update "
+                  "remote.<remote>.url"))))
+
+;;;; Internal
+
+(cl-defun ghub--retrieve (payload req)
+  (pcase-let*
+      (((cl-struct ghub--req headers method url handler silent synchronous) req)
+       (url-request-extra-headers
+        (if (functionp headers) (funcall headers) headers))
+       (url-request-method method)
+       (url-request-data payload)
+       (url-show-status nil))
+    (if synchronous
+        (if-let ((buf (url-retrieve-synchronously url silent)))
+            (with-current-buffer buf
+              (funcall handler (car url-callback-arguments) req))
+          (error "ghub--retrieve: No buffer returned"))
+      (url-retrieve url handler (list req) silent))))
+
+(defun ghub--handle-response (status req)
+  (let ((buf (current-buffer)))
+    (unwind-protect
+        (progn
+          (set-buffer-multibyte t)
+          (let* ((unpaginate (ghub--req-unpaginate req))
+                 (headers (ghub--handle-response-headers status req))
+                 (payload (ghub--handle-response-payload req))
+                 (payload (ghub--handle-response-error status payload req))
+                 (value   (ghub--handle-response-value payload req))
+                 (prev    (ghub--req-url req))
+                 (next    (cdr (assq 'next (ghub-response-link-relations
+                                            req headers payload)))))
+            (when (numberp unpaginate)
+              (decf unpaginate))
+            (setf (ghub--req-url req)
+                  (url-generic-parse-url next))
+            (setf (ghub--req-unpaginate req) unpaginate)
+            (or (and next
+                     unpaginate
+                     (or (eq unpaginate t)
+                         (>  unpaginate 0))
+                     (ghub-continue req))
+                (let ((req-buf   (ghub--req-buffer req))
+                      (callback  (ghub--req-callback req))
+                      (errorback (ghub--req-errorback req))
+                      (err       (plist-get status :error)))
+                  (cond ((and err errorback)
+                         (setf (ghub--req-url req) prev)
+                         (when (eq errorback t)
+                           (setq errorback #'ghub--errorback))
+                         (condition-case nil
+                             (funcall errorback err headers status req)
+                           (wrong-number-of-arguments
+                            (funcall errorback err))))
+                        (callback
+                         (save-current-buffer
+                           (when (buffer-live-p req-buf)
+                             (set-buffer req-buf))
+                           (condition-case nil
+                               (funcall callback value headers status req)
+                             (wrong-number-of-arguments
+                              (funcall callback value)))))
+                        (t value))))))
+      (when (and (buffer-live-p buf)
+                 (not (buffer-local-value 'ghub-debug buf)))
+        (kill-buffer buf)))))
+
+(defun ghub--handle-response-headers (_status req)
+  (let (headers)
+    (when (memq url-http-end-of-headers '(nil 0))
+      (unless url-debug (setq url-debug t))
+      (error "BUG: Missing headers in response buffer %s" (current-buffer)))
+    (goto-char (point-min))
+    (forward-line 1)
+    (while (re-search-forward "^\\([^:]*\\): \\(.+\\)"
+                              url-http-end-of-headers t)
+      (push (cons (match-string 1)
+                  (match-string 2))
+            headers))
+    (setq headers (nreverse headers))
+    (goto-char (1+ url-http-end-of-headers))
+    (if (and req (or (ghub--req-callback req)
+                     (ghub--req-errorback req)))
+        (setq-local ghub-response-headers headers)
+      (setq-default ghub-response-headers headers))
+    headers))
+
+(defun ghub--handle-response-error (status payload req)
+  (if-let ((err (plist-get status :error)))
+      (if-let ((noerror (ghub--req-noerror req)))
+          (if (eq noerror 'return)
+              payload
+            (setcdr (last err) (list payload))
+            nil)
+        (ghub--signal-error err payload req))
+    payload))
+
+(defun ghub--signal-error (err &optional payload req)
+  (pcase-let ((`(,symb . ,data) err))
+    (if (eq symb 'error)
+        (if (eq (car-safe data) 'http)
+            (signal 'ghub-http-error
+                    (let ((code (car (cdr-safe data))))
+                      (list code
+                            (nth 2 (assq code url-http-codes))
+                            (and req (url-recreate-url (ghub--req-url req)))
+                            payload)))
+          (signal 'ghub-error data))
+      (signal symb data))))
+
+(defun ghub--errorback (err _headers _status req)
+  (ghub--signal-error err (nth 3 err) req))
+
+(defun ghub--handle-response-value (payload req)
+  (setf (ghub--req-value req)
+        (nconc (ghub--req-value req)
+               (if-let ((nested (and (eq (ghub--req-forge req) 'bitbucket)
+                                     (assq 'values payload))))
+                   (cdr nested)
+                 payload))))
+
+(defun ghub--handle-response-payload (req)
+  (funcall (or (ghub--req-reader req)
+               'ghub--read-json-payload)
+           url-http-response-status))
+
+(defun ghub--read-json-payload (_status &optional json-type-args)
+  (and-let* ((payload (ghub--decode-payload)))
+    (progn
+      (ghub--assert-json-available)
+      (condition-case nil
+          (apply #'json-parse-string payload
+                 (or json-type-args
+                     '( :object-type alist
+                        :array-type list
+                        :null-object nil
+                        :false-object nil)))
+        (json-parse-error
+         (when ghub-debug
+           (pop-to-buffer (current-buffer)))
+         (setq-local ghub-debug t)
+         `((message . ,(if (looking-at "<!DOCTYPE html>")
+                           (if (re-search-forward
+                                "<p>\\(?:<strong>\\)?\\([^<]+\\)" nil t)
+                               (match-string 1)
+                             "error description missing")
+                         (string-trim (buffer-substring (point) (point-max)))))
+           (documentation_url
+            . "https://github.com/magit/ghub/wiki/Github-Errors")))))))
+
+(defun ghub--decode-payload (&optional _status)
+  (and (not (eobp))
+       (decode-coding-string
+        (buffer-substring-no-properties (point) (point-max))
+        'utf-8)))
+
+(defun ghub--encode-payload (payload)
+  (cl-typecase payload
+    (null nil)
+    (string (encode-coding-string payload 'utf-8))
+    (t (ghub--assert-json-available)
+       (encode-coding-string
+        (json-serialize payload
+                        :null-object :null
+                        :false-object nil)
+        'utf-8))))
+
+(defun ghub--encode-url (host resource &optional query)
+  (url-generic-parse-url
+   (concat (if (member host ghub-insecure-hosts) "http://" "https://")
+           ;; Needed for some Github Enterprise instances.
+           (cond
+             ((and (equal resource "/graphql")
+                   (string-suffix-p "/v3" host))
+              (substring host 0 -3))
+             ;; Needed for all Gitlab instances.
+             ((and (equal resource "/api/graphql")
+                   (string-suffix-p "/api/v4" host))
+              (substring host 0 -7))
+             (host))
+           resource
+           (and query (concat "?" (ghub--url-encode-params query))))))
+
+(defun ghub--url-encode-params (params)
+  (mapconcat (lambda (param)
+               (pcase-let ((`(,key . ,val) param))
+                 (concat (url-hexify-string (symbol-name key)) "="
+                         (cl-typecase val
+                           (integer (number-to-string val))
+                           (boolean (if val "true" "false"))
+                           (t (url-hexify-string val))))))
+             params "&"))
+
+(defun ghub--assert-json-available ()
+  (unless (and (fboundp 'json-available-p)
+               (json-available-p))
+    (error "Ghub requires Emacs 29 --with-json or Emacs >= 30")))
+
+;;; Authentication
+;;;; API
+
+;;;###autoload
+(defun ghub-clear-caches ()
+  "Clear all caches that might negatively affect Ghub.
+
+If a library that is used by Ghub caches incorrect information
+such as a mistyped password, then that can prevent Ghub from
+asking the user for the correct information again.
+
+Set `url-http-real-basic-auth-storage' to nil
+and call `auth-source-forget+'."
+  (interactive)
+  (setq url-http-real-basic-auth-storage nil)
+  (auth-source-forget+))
+
+;;;; Internal
+
+(defun ghub--headers (headers host auth username forge)
+  (push (cons "Content-Type" "application/json") headers)
+  (if (eq auth 'none)
+      headers
+    (unless (or username (stringp auth))
+      (setq username (ghub--username host forge)))
+    (lambda ()
+      (if (eq auth 'basic)
+          (cons (cons "Authorization" (ghub--basic-auth host username))
+                headers)
+        (cons (ghub--auth host auth username forge) headers)))))
+
+(cl-defgeneric ghub--auth (host auth &optional username forge)
+  (unless username
+    (setq username (ghub--username host forge)))
+  (if (eq auth 'basic)
+      (pcase-exhaustive forge
+        ((or 'nil 'forgejo 'gitea 'gogs 'bitbucket)
+         (cons "Authorization" (ghub--basic-auth host username)))
+        ((or 'github 'gitlab)
+         (error "%s does not support basic authentication"
+                (capitalize (symbol-name forge)))))
+    (cons (pcase-exhaustive forge
+            ((or 'nil 'forgejo 'github 'gitea 'gogs 'bitbucket) "Authorization")
+            ('gitlab "Private-Token"))
+          (if (eq forge 'bitbucket)
+              ;; For some undocumented reason Bitbucket supports
+              ;; values of the form "token <token>" only for GET
+              ;; requests.  For PUT requests we have to use basic
+              ;; authentication.  Note that the secret is a token
+              ;; (aka "app password"), not the actual password.
+              ;; The documentation fails to mention this little
+              ;; detail.  See #97.
+              (concat "Basic "
+                      (base64-encode-string
+                       (concat username ":"
+                               (ghub--token host username auth nil forge))
+                       t))
+            (concat
+             (and (not (eq forge 'gitlab)) "token ")
+             (encode-coding-string
+              (cl-typecase auth
+                (string auth)
+                (null   (ghub--token host username 'ghub nil forge))
+                (symbol (ghub--token host username auth  nil forge))
+                (t (signal 'wrong-type-argument
+                           `((or stringp symbolp) ,auth))))
+              'utf-8))))))
+
+(defun ghub--basic-auth (host username)
+  (let ((url (url-generic-parse-url
+              (if (member host ghub-insecure-hosts) "http://" "https://"))))
+    (setf (url-user url) username)
+    (url-basic-auth url t)))
+
+(defun ghub--token (host username package &optional nocreate forge)
+  (let* ((user (ghub--ident username package))
+         (domain (ghub--host-domain host))
+         (token
+          (or (ghub--auth-source-get :secret :host host :user user)
+              (and (not (equal domain host))
+                   (ghub--auth-source-get :secret :host domain :user user)))))
+    (unless (or token nocreate)
+      (error "\
+Required %s token (%S for %s) does not exist.
+See https://docs.magit.vc/ghub/Getting-Started.html
+or (info \"(ghub)Getting Started\") for instructions."
+             (capitalize (symbol-name (or forge 'github)))
+             user
+             (if (equal domain host)
+                 (format "%S" host)
+               (format "either %S or %S" host domain))))
+    (if (functionp token) (funcall token) token)))
+
+(cl-defmethod ghub--host (&optional forge)
+  (let ((forge (or forge 'github)))
+    (or (ghub--git-get (format "%s.host" forge))
+        (alist-get forge ghub-default-host-alist))))
+
+(defun ghub--host-domain (uri)
+  (let* ((uri (if (string-match "/" uri)
+                  (substring uri 0 (match-beginning 0))
+                uri))
+         (uri (split-string uri "\\."))
+         ;; This is an incomplete heuristic handling, e.g., ".co.uk".
+         (2tld (member (car (last uri 2)) '("co" "com" "gov" "net" "org"))))
+    (string-join (drop (- (length uri) (if 2tld 3 2)) uri) ".")))
+
+(cl-defmethod ghub--username (host &optional forge)
+  (let* ((forge (or forge 'github))
+         (host (or host (ghub--host forge)))
+         (host (if (string-match "/" host)
+                   (substring host 0 (match-beginning 0))
+                 host))
+         (var (format "%s.%s.user" forge host))
+         (default-var (and (equal (ghub--host-domain host)
+                                  (ghub--host-domain
+                                   (alist-get forge ghub-default-host-alist)))
+                           (format "%s.user" forge))))
+    (cond ((ghub--git-get var))
+          ((not default-var)
+           (error "Cannot determine username; Git variable `%s' is unset" var))
+          ((ghub--git-get default-var))
+          ((error "Cannot determine username; Git variables `%s' and `%s' %s"
+                  var default-var "are both unset")))))
+
+(defun ghub--ident (username package)
+  (format "%s^%s" username package))
+
+(defun ghub--auth-source-get (keys &rest spec)
+  (declare (indent 1))
+  (if-let ((plist (car (apply #'auth-source-search spec))))
+      (if (keywordp keys)
+          (plist-get plist keys)
+        (mapcar (##plist-get plist %) keys))
+    ;; Auth-Source caches the information that there is no value, but in
+    ;; our case that is a situation that needs fixing, so we want to keep
+    ;; trying, by invalidating that information.
+    (auth-source-forget spec)
+    nil))
+
+(define-advice auth-source-netrc-parse (:around (fn &rest args) handle-symlink)
+  "Follow symlinks for FILE before comparing modification times."
+  (let ((file (plist-get args :file)))
+    (when (and (stringp file)
+               (file-exists-p file))
+      (setq args (plist-put args :file (file-chase-links file)))))
+  (apply fn args))
+
+(defun ghub--git-get (var)
+  (catch 'non-zero
+    (car (process-lines-handling-status
+          "git" (##unless (zerop %) (throw 'non-zero nil))
+          ;; Beginning with Git v2.46 we could use "get".
+          "config" "--get" var))))
+
+;;; _
+(provide 'ghub)
+(require 'ghub-graphql)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"       . "cond-let--and$")
+;;   ("thread$"    . "cond-let--thread$")
+;;   ("when$"      . "cond-let--when$")
+;;   ("and-let*"   . "cond-let--and-let*")
+;;   ("and-let"    . "cond-let--and-let")
+;;   ("if-let*"    . "cond-let--if-let*")
+;;   ("if-let"     . "cond-let--if-let")
+;;   ("when-let*"  . "cond-let--when-let*")
+;;   ("when-let"   . "cond-let--when-let")
+;;   ("while-let*" . "cond-let--while-let*")
+;;   ("while-let"  . "cond-let--while-let"))
+;; End:
+;;; ghub.el ends here
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub.elc b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub.elc
new file mode 100644
index 0000000..537cc3b
Binary files /dev/null and b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub.elc differ
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub.info b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub.info
new file mode 100644
index 0000000..4532393
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ghub-20260731.2254/ghub.info
@@ -0,0 +1,993 @@
+This is ghub.info, produced by makeinfo version 7.1.1 from ghub.texi.
+
+     Copyright (C) 2017-2026 Jonas Bernoulli
+     <emacs.ghub@jonas.bernoulli.dev>
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Ghub: (ghub).         Client library for the Github API.
+END-INFO-DIR-ENTRY
+
+
+File: ghub.info,  Node: Top,  Next: Introduction,  Up: (dir)
+
+Ghub User and Developer Manual
+******************************
+
+Ghub is an Emacs library that is used by various packages to access the
+APIs of various instances of various Git forge implementations.
+
+This manual is for Ghub version 5.3.0.
+
+     Copyright (C) 2017-2026 Jonas Bernoulli
+     <emacs.ghub@jonas.bernoulli.dev>
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+* Menu:
+
+* Introduction::
+* Getting Started::
+* API::
+* Notes::
+* FAQ::
+* Function Index::
+* Variable Index::
+
+-- The Detailed Node Listing --
+
+Getting Started
+
+* Basic Concepts, Arguments and Variables: Basic Concepts Arguments and Variables.
+* Setting the Username::
+* Creating and Storing a Token::
+* Github Configuration Variables::
+
+API
+
+* Their APIs::
+* Making REST Requests::
+* Making GraphQL Requests::
+* Github Convenience Wrappers::
+
+Notes
+
+* Using Ghub in Personal Scripts::
+* Using Ghub in Your Own Package::
+* Forge Limitations and Notes::
+
+
+
+File: ghub.info,  Node: Introduction,  Next: Getting Started,  Prev: Top,  Up: Top
+
+1 Introduction
+**************
+
+Ghub is an Emacs library that is used by various packages to access the
+APIs of various instances of various Git forge implementations.
+
+   A forge is a web-based collaborative software platform for developing
+and distributing computer applications.  Examples include Github and
+Gitlab.
+
+
+File: ghub.info,  Node: Getting Started,  Next: API,  Prev: Introduction,  Up: Top
+
+2 Getting Started
+*****************
+
+This manual guides you through the steps that are necessary to use the
+Forge package and/or to make a request using just Ghub itself, such as
+this:
+
+     (ghub-request "GET" "/user")
+
+   To be able to do that, Ghub needs to know who you want to talk to,
+who you are, and how you are going to prove the latter to the former.
+
+   Additionally Ghub wants to know on behalf of which Emacs package it
+is making a request.  So the question of "who is making the request" has
+to be rephrased as "which human (or bot) is using what (Emacs) package
+to make the request".  If, for example, the human known as "tarsius" is
+using the ‘forge’ package, then that is represented in some places using
+the string "tarsius^forge".
+
+* Menu:
+
+* Basic Concepts, Arguments and Variables: Basic Concepts Arguments and Variables.
+* Setting the Username::
+* Creating and Storing a Token::
+* Github Configuration Variables::
+
+
+File: ghub.info,  Node: Basic Concepts Arguments and Variables,  Next: Setting the Username,  Up: Getting Started
+
+2.1 Basic Concepts, Arguments and Variables
+===========================================
+
+(If you are trying to configure Forge for <https://github.com> and/or
+<https://gitlab.com>, then you can skip this section.)
+
+   Originally Ghub supported only Github but now it also supports
+Gitlab, Gitea, Gogs and Bitbucket.  Because of that, the function
+‘ghub-request’ defaults to acting on a ‘github’ forge, but can be told
+to act on other forges using the FORGE argument.
+
+   The FORGE argument only specifies what kind of forge we are
+accessing, not which host specifically.  The HOST argument can be used
+to select the instance.  For some forges a default instance is defined:
+
+   • Forge ‘github’ defaults to host ‘api.github.com’.
+   • Forge ‘gitlab’ defaults to host ‘gitlab.com/api/v4’.
+   • Forge ‘bitbucket’ defaults to host ‘api.bitbucket.org/2.0’.
+   • No canonical host exists for the ‘gitea’ and ‘gogs’ forges and
+     ‘localhost:3000/api/v1’ is used as the default host in both cases.
+
+   Together the FORGE and HOST arguments specify the forge type and
+instance.  In addition to that, it is also necessary to specify on whose
+behalf the request is being made, which can be done using the USERNAME
+and AUTH arguments.  For example:
+
+     (ghub-request "GET" "/user" nil
+                   :forge 'github
+                   :host "api.github.com"
+                   :username "tarsius"
+                   :auth 'forge)
+
+   Having to specify these arguments for every request is inconvenient.
+Additional variables and convenience functions can be used to make that
+unnecessary in most cases.
+
+   (But for debugging purposes the above explicit form is very useful.
+You will obviously have to change the value of USERNAME and you should
+use ‘ghub’ as AUTH when first trying this at home.)
+
+   These variables can be set globally and/or for a specific repository.
+
+   • For "api.github.com" (aka the API of <https://github.com>) the Git
+     variable ‘github.user’ specifies the user.
+   • For another ‘github’ instance the Git variable ‘github.HOST.user’
+     specifies the user.  The HOST in that variable name is the same as
+     the value of the HOST argument of the called function.
+   • Instead of specifying the HOST in every function call, the Git
+     variable ‘github.host’ can be used.  This should only be set
+     locally.
+
+   These ‘github’ specific variables are discussed in more detail in
+*note Github Configuration Variables::.
+
+For ‘gitlab’ and ‘bitbucket’ forges similar variables are available:
+
+   • ‘gitlab.user’ specifies the <https://gitlab.com> user.
+   • ‘gitlab.HOST.user’ specifies the user for the HOST ‘gitlab’
+     instance.
+   • ‘gitlab.host’ specifies the ‘gitlab’ host, unless the HOST argument
+     is non-‘nil’
+   • ‘bitbucket.user’ specifies the <https://bitbucket.org> user.
+   • ‘bitbucket.HOST.user’ specifies the user for the HOST ‘bitbucket’
+     instance.
+   • ‘bitbucket.host’ specifies the ‘bitbucket’ host, unless the HOST
+     argument is non-‘nil’.
+
+   For the ‘gitea’ and ‘gogs’ forges some similar variables are
+available, however for some of the ‘ghub.*’ variables no equivalent
+variable exist for these two forges:
+
+   • ‘gitea.user’ is *not* used because no canonical ‘gitea’ instance
+     exists.
+   • ‘gitea.HOST.user’ specifies the user for the HOST ‘gitea’ instance.
+   • ‘gitea.host’ specifies the ‘gitea’ host, unless the HOST argument
+     is non-‘nil’
+   • ‘gogs.user’ is *not* used because no canonical ‘gogs’ instance
+     exists.
+   • ‘gogs.HOST.user’ specifies the user for the HOST ‘gogs’ instance.
+   • ‘gogs.host’ specifies the ‘gogs’ host, unless the HOST argument is
+     non-‘nil’
+
+
+File: ghub.info,  Node: Setting the Username,  Next: Creating and Storing a Token,  Prev: Basic Concepts Arguments and Variables,  Up: Getting Started
+
+2.2 Setting the Username
+========================
+
+Ghub needs to know your username, which you use on the host that you
+want it to connect to.  For each host a different Git variable has to be
+set, to specify the username on that host.  More than one variable is
+needed, because you might use different usernames on different hosts.
+
+Setting your Github.com Username
+--------------------------------
+
+To inform Ghub about your "github.com" username do this:
+
+     git config --global github.user USERNAME
+
+   If you need to identify as another user in a particular repository,
+then you have to set that variable locally:
+
+     cd /path/to/repo
+     git config --local github.user USERNAME
+
+Setting your Gitlab.com Username
+--------------------------------
+
+To inform Ghub about your "gitlab.com" username do this:
+
+     git config --global gitlab.user USERNAME
+
+   If you need to identify as another user in a particular repository,
+then you have to set that variable locally:
+
+     cd /path/to/repo
+     git config --local gitlab.user USERNAME
+
+   Make sure you use the correct USERNAME for this forge/host.  It might
+not be the same as on "github.com"!
+
+Setting your Github Enterprise Username
+---------------------------------------
+
+For Github Enterprise instances you have to specify where the API can be
+accessed and a different variable has to be used to set the username.
+
+   For example if the API is available at ‘https://example.com/api/v3’,
+then you should do this:
+
+     git config --global github.example.com/api/v3.user USERNAME
+
+   Make sure you use the correct USERNAME for this instance.  It might
+not be the same as on "github.com"!
+
+   Doing this only tells Ghub who you are on this host, additionally you
+have to tell Ghub which repositories are connected to that forge/host,
+like so:
+
+     cd /path/to/repo
+     git config --local github.host example.com/api/v3
+
+Setting your Username for Other Hosts and/or Forges
+---------------------------------------------------
+
+To inform Ghub about your username on HOST (a FORGE instance) do this:
+
+     git config --global FORGE.HOST.user USERNAME
+
+   FORGE can be one of ‘bitbucket’, ‘gitea’ or ‘gogs’.  It can also be
+‘github’ or ‘gitlab’; but if that is the case, then you should look at
+the preceding sections instead, which discuss these cases specifically.
+
+   HOST identifies the instance.  This actually points at the top-level
+endpoint of the API and may contain path components, e.g.:
+‘example.com/api’.
+
+   If you need to identify as another user in a particular repository,
+then you have to set that variable locally:
+
+     cd /path/to/repo
+     git config --local FORGE.HOST.user USERNAME
+
+
+File: ghub.info,  Node: Creating and Storing a Token,  Next: Github Configuration Variables,  Prev: Setting the Username,  Up: Getting Started
+
+2.3 Creating and Storing a Token
+================================
+
+2.3.1 Creating a Token
+----------------------
+
+To create a token, use the web interface of the host you want to connect
+to.  Here is a list of pages to do this for certain popular hosts:
+
+   • <https://github.com/settings/tokens>
+   • <https://gitlab.com/-/user_settings/personal_access_tokens>
+
+   For other forges we cannot provide a functioning URL because they
+contain unknown values such as your name.  Just go to the general
+settings page of the respective host and then go from there.
+
+   Except on ‘gitea’ and ‘gogs’ each token can be limited to certain
+"scopes", i.e., it is possible to limit for which purposes any given
+token can be used.
+
+   Before you create a token to be used for a certain package, you
+should consult the documentation of that package, which in turn should
+tell you which scopes are needed and why.  The Forge package for example
+does so in *note (forge)Setup for Githubcom:: and *note (forge)Setup for
+Gitlabcom::.
+
+2.3.2 Storing a Token
+---------------------
+
+Please also see *note (auth)Top:: for all the gory details about
+Auth-Source.
+
+   The variable ‘auth-sources’ controls how and where Auth-Source keeps
+its secrets.  The default value is a list of three files:
+‘("~/.authinfo" "~/.authinfo.gpg" "~/.netrc")’, but to avoid confusion
+you should make sure that only one of these files exists, and then you
+should also adjust the value of the variable to only ever use that file,
+for example:
+
+     (setq auth-sources '("~/.authinfo"))
+
+   In ‘~/.authinfo’ secrets are stored in plain text.  If you don't want
+that, then you should use the encrypted ‘~/.authinfo.gpg’ instead:
+
+     (setq auth-sources '("~/.authinfo.gpg"))
+
+   Auth-Source also supports storing secrets in various external
+key-chains.  See *note (auth)Top:: for more information.
+
+   The default Auth-Source backends only support storing three values
+per entry; the "machine", the "login" and the "password".  Because Ghub
+uses separate tokens for each package, it has to squeeze four values
+into those three slots, and it does that by using "USERNAME^PACKAGE" as
+the "login".
+
+   Assuming your *Github* username is "ziggy", the package is named
+"forge", and you want to access *Github.com* with the *token*
+"012345abcdef...", an entry in one of the three mentioned files would
+then look like this:
+
+     machine api.github.com login ziggy^forge password 012345abcdef...
+
+   Assuming your *Gitlab* username is "ziggy", the package is named
+"forge", and you want to access *Gitlab.com* with the *token*
+"012345abcdef...", an entry in one of the three mentioned files would
+then look like this:
+
+     machine gitlab.com/api/v4 login ziggy^forge password 012345abcdef...
+
+
+File: ghub.info,  Node: Github Configuration Variables,  Prev: Creating and Storing a Token,  Up: Getting Started
+
+2.4 Github Configuration Variables
+==================================
+
+The username and, unless you only use Github.com itself, the Github
+Enterprise instance have to be configured using Git variables.  In rare
+cases it might also be necessary to specify the identity of the local
+machine, which is done using a lisp variable.
+
+ -- Variable: github.user
+     The Github.com username.  This should be set globally and if you
+     have multiple Github.com user accounts, then you should set this
+     locally only for those repositories that you want to access using
+     the secondary identity.
+
+ -- Variable: github.HOST.user
+     This variable serves the same purpose as ‘github.user’ but for the
+     Github Enterprise instance identified by ‘HOST’.
+
+     The reason why separate variables are used is that this makes it
+     possible to set both values globally instead of having to set one
+     of the values locally in each and every repository that is
+     connected to the Github Enterprise instance, not Github.com.
+
+ -- Variable: github.host
+     This variable should only be set locally for a repository and
+     specifies the Github Enterprise edition that that repository is
+     connected to.  You should not set this globally because then each
+     and every repository becomes connected to the specified Github
+     Enterprise instance, including those that should actually be
+     connected to Github.com.
+
+     When this is undefined, then "api.github.com" is used (defined in
+     the constant ‘ghub-default-host’, which you should never attempt to
+     change.)
+
+
+File: ghub.info,  Node: API,  Next: Notes,  Prev: Getting Started,  Up: Top
+
+3 API
+*****
+
+* Menu:
+
+* Their APIs::
+* Making REST Requests::
+* Making GraphQL Requests::
+* Github Convenience Wrappers::
+
+
+File: ghub.info,  Node: Their APIs,  Next: Making REST Requests,  Up: API
+
+3.1 Their APIs
+==============
+
+Of course this manual does not cover the APIs of all forges that it
+supports, but for your convenience, here are the links to their API
+manuals:
+
+   • Github:
+        • <https://docs.github.com/en/graphql> (GraphQl)
+        • <https://docs.github.com/en/rest> (REST)
+   • Gitlab:
+        • <https://docs.gitlab.com/api>
+   • Gitea:
+        • <https://docs.gitea.com/next/development/api-usage>
+        • <https://demo.gitea.com>
+   • Gogs:
+        • <https://gogs.io/docs>
+   • Bitbucket:
+        • <https://developer.atlassian.com/cloud/bitbucket>
+
+
+File: ghub.info,  Node: Making REST Requests,  Next: Making GraphQL Requests,  Prev: Their APIs,  Up: API
+
+3.2 Making REST Requests
+========================
+
+ -- Function: ghub-request method resource &optional params &key query
+          payload headers unpaginate noerror reader username auth host
+          callback errorback url value error extra method*
+     This function makes a request for ‘RESOURCE’ using ‘METHOD’.
+     ‘PARAMS’, ‘QUERY’, ‘PAYLOAD’ and/or ‘HEADERS’ are alists holding
+     additional request data.  The response body is returned and the
+     response headers are stored in the variable
+     ‘ghub-response-headers’.
+
+        • ‘METHOD’ is the HTTP method, given as a string.
+        • ‘RESOURCE’ is the resource to access, given as a string
+          beginning with a slash.
+
+        • ‘PARAMS’, ‘QUERY’, ‘PAYLOAD’ and ‘HEADERS’ are alists and are
+          used to specify request data.  All these arguments are alists
+          that resemble the JSON expected and returned by the Github
+          API.  The keys are symbols and the values stored in the ‘cdr’
+          (not the ‘cadr’) can be strings, integers, or lists of strings
+          and integers.
+
+          The Github API documentation is vague on how data has to be
+          transmitted and for a particular resource usually just talks
+          about "parameters".  Generally speaking when the ‘METHOD’ is
+          "HEAD" or "GET", then they have to be transmitted as a query,
+          otherwise as a payload.
+
+             • Use ‘PARAMS’ to automatically transmit like ‘QUERY’ or
+               ‘PAYLOAD’ would depending on ‘METHOD’.
+             • Use ‘QUERY’ to explicitly transmit data as a query.
+             • Use ‘PAYLOAD’ to explicitly transmit data as a payload.
+               Instead of an alist, ‘PAYLOAD’ may also be a string, in
+               which case it gets encoded as UTF-8 but is otherwise
+               transmitted as-is.
+             • Use ‘HEADERS’ for those rare resources that require that
+               the data is transmitted as headers instead of as a query
+               or payload.  When that is the case, then the Github API
+               documentation usually mentions it explicitly.
+
+        • If ‘SILENT’ is non-‘nil’, then progress reports and the like
+          are not messaged.
+
+        • If ‘UNPAGINATE’ is ‘t’, then this function makes as many
+          requests as necessary to get all values.  If ‘UNPAGINATE’ is a
+          natural number, then it gets at most that many pages.  For any
+          other non-‘nil’ value it raises an error.
+
+        • If ‘NOERROR’ is non-‘nil’, then no error is raised if the
+          request fails and ‘nil’ is returned instead.  If ‘NOERROR’ is
+          ‘return’, then the error payload is returned instead of ‘nil’.
+
+        • If ‘READER’ is non-‘nil’, then it is used to read and return
+          from the response buffer.  The default is
+          ‘ghub--read-json-payload’.  For the very few resources that do
+          not return JSON, you might want to use ‘ghub--decode-payload’.
+
+        • If ‘USERNAME’ is non-‘nil’, then the request is made on behalf
+          of that user.  It is better to specify the user using the Git
+          variable ‘github.user’ for "api.github.com", or
+          ‘github.HOST.user’ if connecting to a Github Enterprise
+          instance.
+
+        • Each package that uses Ghub should use its own token.  If
+          ‘AUTH’ is ‘nil’ or unspecified, then the generic ‘ghub’ token
+          is used instead.  This is only acceptable for personal
+          utilities.  A package that is distributed to other users
+          should always use this argument to identify itself, using a
+          symbol matching its name.
+
+          Package authors who find this inconvenient should write a
+          wrapper around this function and possibly for the
+          method-specific functions as well.
+
+          Beside ‘nil’, some other symbols have a special meaning too.
+          ‘none’ means to make an unauthorized request.  ‘basic’ means
+          to make a password based request.  If the value is a string,
+          then it is assumed to be a valid token.  ‘basic’ and an
+          explicit token string are only intended for internal and
+          debugging uses.
+
+        • If ‘HOST’ is non-‘nil’, then connect to that Github instance.
+          This defaults to "api.github.com".  When a repository is
+          connected to a Github Enterprise instance, then it is better
+          to specify that using the Git variable ‘github.host’ instead
+          of using this argument.
+
+        • If ‘FORGE’ is ‘gitlab’, then connect to Gitlab.com or,
+          depending on ‘HOST’, to another Gitlab instance.
+
+        • If ‘CALLBACK’ and/or ‘ERRORBACK’ is non-‘nil’, then this
+          function makes one or more asynchronous requests and calls
+          ‘CALLBACK’ or ‘ERRORBACK’ when finished.  If no error
+          occurred, then it calls ‘CALLBACK’, unless that is ‘nil’.
+
+          If an error occurred, then it calls ‘ERRORBACK’, or if that is
+          ‘nil’, then ‘CALLBACK’.  ‘ERRORBACK’ can also be ‘t’, in which
+          case it signals instead.  ‘NOERROR’ is ignored for all
+          asynchronous requests.
+
+          Both callbacks are called with four arguments.
+
+            1. For ‘CALLBACK’, the combined value of the retrieved
+               pages.  For ‘ERRORBACK’, the error that occurred when
+               retrieving the last page.
+            2. The headers of the last page as an alist.
+            3. Status information provided by ‘url-retrieve’.  Its
+               ‘:error’ property holds the same information as the first
+               argument to ‘ERRORBACK’.
+            4. A ‘ghub--req’ struct, which can be passed to
+               ‘ghub-continue’ (which see) to retrieve the next page, if
+               any.
+
+ -- Function: ghub-continue args
+     If there is a next page, then this function retrieves that.
+
+     This function is only intended to be called from callbacks.  If
+     there is a next page, then that is retrieved and the buffer that
+     the result will be loaded into is returned, or ‘t’ if the process
+     has already completed.  If there is no next page, then return
+     ‘nil’.
+
+     Callbacks are called with four arguments (see ‘ghub-request’).  The
+     forth argument is a ‘ghub--req’ struct, intended to be passed to
+     this function.  A callback may use the struct's ‘extra’ slot to
+     pass additional information to the callback that will be called
+     after the next request.  Use the function ‘ghub-req-extra’ to get
+     and set the value of that slot.
+
+     As an example, using ‘ghub-continue’ in a callback like so:
+
+          (ghub-get "/users/tarsius/repos" nil
+                    :callback (lambda (value _headers _status req)
+                                (unless (ghub-continue req)
+                                  (setq my-value value))))
+
+     is equivalent to:
+
+          (ghub-get "/users/tarsius/repos" nil
+                    :unpaginate t
+                    :callback (lambda (value _headers _status _req)
+                                (setq my-value value)))
+
+     To demonstrate how to pass information from one callback to the
+     next, here we record when we start fetching each page:
+
+          (ghub-get "/users/tarsius/repos" nil
+                    :extra (list (current-time))
+                    :callback (lambda (value _headers _status req)
+                                (push (current-time) (ghub-req-extra req))
+                                (unless (ghub-continue req)
+                                  (setq my-times (ghub-req-extra req))
+                                  (setq my-value value))))
+
+ -- Variable: ghub-response-headers
+     A select few Github API resources respond by transmitting data in
+     the response header instead of in the response body.  Because there
+     are so few of these inconsistencies, ‘ghub-request’ always returns
+     the response body.
+
+     To access the response headers use this variable after
+     ‘ghub-request’ has returned.
+
+ -- Function: ghub-response-link-relations req headers payload
+     This function returns an alist of the link relations in ‘HEADERS’,
+     or if optional ‘HEADERS’ is ‘nil’, then those in
+     ‘ghub-response-headers’.
+
+     When accessing a Bitbucket instance then the link relations are in
+     ‘PAYLOAD’ instead of ‘HEADERS’, making their API merely RESTish and
+     forcing this function to append those relations to the value of
+     ‘ghub-response-headers’, for later use when this function is called
+     with ‘nil’ for ‘PAYLOAD’.
+
+
+File: ghub.info,  Node: Making GraphQL Requests,  Next: Github Convenience Wrappers,  Prev: Making REST Requests,  Up: API
+
+3.3 Making GraphQL Requests
+===========================
+
+ -- Function: ghub-graphql graphql &optional variables &key username
+          auth host callback silent callback errorback value extra
+     This function makes a GraphQL request using ‘GRAPHQL’ and
+     ‘VARIABLES’ as inputs.  ‘GRAPHQL’ is a GraphQL string.  ‘VARIABLES’
+     is a JSON-like alist.  The other arguments behave as for
+     ‘ghub-request’ (which see).
+
+     The response is returned as a JSON-like alist.  Even if the
+     response contains ‘errors’, this function does not raise an error.
+     Cursor-handling is likewise left to the caller.
+
+   ‘ghub-graphql’ is a thin convenience wrapper around ‘ghub-request’,
+similar to ‘ghub-post’ and friends.  While the latter only hard-code the
+value of the ‘METHOD’ argument, the former also hard-codes ‘RESOURCE’
+and constructs ‘PAYLOAD’ from ‘GRAPHQL’ and ‘VARIABLES’.  It also drops
+‘UNPAGINATE’, ‘NOERROR’, ‘READER’ (internal functions expect alist-ified
+JSON) and ‘FORGE’ (only Github currently supports GraphQL).
+
+   ‘ghub-graphql’ does not account for the fact that pagination works
+differently in GraphQL than it does in REST, so users of this function
+have to deal with that themselves.  Likewise error handling works
+differently and has to be done by the caller too.
+
+   An early attempt at implementing automatic unpaginating for GraphQL
+can be found in the ‘faithful-graphql’ branch, provided I haven't
+deleted that by now.  On that branch I try to do things as intended by
+the designers of GraphQL, using variables and fragments, and drowning in
+a sea of boilerplate.
+
+   The problem with that approach is that it only works for applications
+that fetch specific information on demand and actually want things to be
+paginated.  I am convinced that GraphQL is very nice for web apps.
+
+   However the Forge package for which I have implemented all of this
+has very different needs.  It wants to fetch "all the data" and "cache"
+it locally, so that it is available even when there is no internet
+connection.  GraphQL was designed around the idea that you should be
+able to "ask for what you need and get exactly that".  But when that
+boils down to "look, if I persist, then you are going to hand me over
+all the data anyway, so just caught it up already", then things start to
+fall apart.  If Github's GraphQL allowed pagination to be turned off
+completely, then teaching ‘ghub-graphql’ about error handling would be
+enough.
+
+   But it doesn't and when doing things as intended, then that leads to
+huge amounts of repetitive boilerplate, which is so boring to write that
+doing it without introducing bugs left and right is near impossible; so
+I decided to give up on GraphQL variables, fragments and conditions, and
+instead implement something more powerful, though also more opinionated.
+
+ -- Function: ghub--graphql-vacuum query variables callback &optional
+          until &key narrow username auth host forge
+     This function is an opinionated alternative to ‘ghub-graphql’.  It
+     relies on dark magic to get the job done.
+
+     It makes an initial request using ‘QUERY’.  It then looks for
+     paginated edges in the returned data and makes more requests to
+     resolve them.  In order to do so it automatically transforms the
+     initial ‘QUERY’ into another query suitable for that particular
+     edge.  The data retrieved by subsequent requests is then injected
+     into the data of the original request before that is returned or
+     passed to the callback.  If subsequently retrieved data features
+     new paginated edges, then those are followed recursively.
+
+     The end result is essentially the same as using ‘ghub-graphql’, if
+     only it were possible to say "do not paginate anything".  The
+     implementation is much more complicated because it is not possible
+     to do that.
+
+     ‘QUERY’ is a GraphQL query expressed as an s-expression.  The
+     bundled ‘gsexp’ library is used to turn that into a GraphQL query
+     string.  Only a subset of the GraphQL features are supported;
+     fragments for example are not, and magical stuff happens to
+     variables.  This is not documented yet, I am afraid.  Look at
+     existing callers.
+
+     ‘VARIABLES’ is a JSON-like alist as for ‘ghub-graphql’.
+
+     ‘UNTIL’ is an alist ‘((EDGE-until . VALUE)...)’.  When unpaginating
+     ‘EDGE’ try not to fetch beyond the element whose first field has
+     the value ‘VALUE’ and remove that element as well as all "lesser"
+     elements from the retrieved data if necessary.  Look at
+     ‘forge--pull-repository’ for an example.  This is only useful if
+     you "cache" the response locally and want to avoid fetching data
+     again that you already have.
+
+     Other arguments behave as for ‘ghub-graphql’ and ‘ghub-request’,
+     more or less.  If ‘CALLBACK’ is ‘nil’, pretty-print the response.
+
+   Using ‘ghub--graphql-vacuum’, the following resource specific
+functions are implemented.  These functions are not part of the public
+API yet and are very much subject to change.
+
+ -- Function: ghub-fetch-repository owner name callback &optional until
+          &key username auth host forge
+     This function asynchronously fetches forge data about the specified
+     repository.  Once all data has been collected, ‘CALLBACK’ is called
+     with the data as the only argument.
+
+ -- Function: ghub-fetch-issue owner name callback &optional until &key
+          username auth host forge
+     This function asynchronously fetches forge data about the specified
+     issue.  Once all data has been collected, ‘CALLBACK’ is called with
+     the data as the only argument.
+
+ -- Function: ghub-fetch-pullreq owner name callback &optional until
+          &key username auth host forge
+     This function asynchronously fetches forge data about the specified
+     pull-request.  Once all data has been collected, ‘CALLBACK’ is
+     called with the data as the only argument.
+
+   Note that in order to avoid duplication all of these functions base
+their initial query on the query stored in ‘ghub-fetch-repository’.  The
+latter two pass that query through ‘ghub--graphql-prepare-query’, which
+then uses ‘ghub--graphql-narrow-query’ to remove parts the caller is not
+interested in.  These two functions are also used internally, when
+unpaginating, but as demonstrated here they can be useful even before
+making an initial request.
+
+
+File: ghub.info,  Node: Github Convenience Wrappers,  Prev: Making GraphQL Requests,  Up: API
+
+3.4 Github Convenience Wrappers
+===============================
+
+ -- Function: ghub-head resource &optional params &key query payload
+          headers unpaginate noerror reader username auth host callback
+          errorback
+ -- Function: ghub-get resource &optional params &key query payload
+          headers unpaginate noerror reader username auth host callback
+          errorback
+     These functions are simple wrappers around ‘ghub-request’.  Their
+     signature is identical to that of the latter, except that they do
+     not have an argument named ‘METHOD’.  The HTTP method is instead
+     given by the second word in the function name.
+
+     As described in the documentation for ‘ghub-request’, it depends on
+     the used method whether the value of the ‘PARAMS’ argument is used
+     as the query or the payload.  For the "HEAD" and "GET" methods it
+     is used as the query.
+
+ -- Function: ghub-put resource &optional params &key query payload
+          headers unpaginate noerror reader username auth host callback
+          errorback
+ -- Function: ghub-post resource &optional params &key query payload
+          headers unpaginate noerror reader username auth host callback
+          errorback
+ -- Function: ghub-patch resource &optional params &key query payload
+          headers unpaginate noerror reader username auth host callback
+          errorback
+ -- Function: ghub-delete resource &optional params &key query payload
+          headers unpaginate noerror reader username auth host callback
+          errorback
+     These functions are simple wrappers around ‘ghub-request’.  Their
+     signature is identical to that of the latter, except that they do
+     not have an argument named ‘METHOD’.  The HTTP method is instead
+     given by the second word in the function name.
+
+     As described in the documentation for ‘ghub-request’, it depends on
+     the used method whether the value of the ‘PARAMS’ argument is used
+     as the query or the payload.  For the "PUT", "POST", "PATCH" and
+     "DELETE" methods it is used as the payload.
+
+ -- Function: ghub-wait resource &optional duration &key username auth
+          host
+     Some API requests result in an immediate successful response even
+     when the requested action has not actually been carried out yet.
+     An example is the request for the creation of a new repository,
+     which doesn't cause the repository to immediately become available.
+     The Github API documentation usually mentions this when describing
+     an affected resource.
+
+     If you want to do something with some resource right after making a
+     request for its creation, then you might have to wait for it to
+     actually be created.  This function can be used to do so.  It
+     repeatedly tries to access the resource until it becomes available
+     or until a timeout is reached.  In the latter case it signals
+     ‘ghub-error’.
+
+     ‘RESOURCE’ specifies the resource that this function waits for.
+
+     ‘DURATION’ specifies the maximum number of seconds to wait for,
+     defaulting to 64 seconds.  Emacs will block during that time, but
+     the user can abort using ‘C-g’.
+
+     The first attempt is made immediately and will often succeed.  If
+     not, then another attempt is made after two seconds, and each
+     subsequent attempt is made after waiting as long as we already
+     waited between all preceding attempts combined.
+
+     See ‘ghub-request’'s documentation above for information about the
+     other arguments.
+
+
+File: ghub.info,  Node: Notes,  Next: FAQ,  Prev: API,  Up: Top
+
+4 Notes
+*******
+
+* Menu:
+
+* Using Ghub in Personal Scripts::
+* Using Ghub in Your Own Package::
+* Forge Limitations and Notes::
+
+
+File: ghub.info,  Node: Using Ghub in Personal Scripts,  Next: Using Ghub in Your Own Package,  Up: Notes
+
+4.1 Using Ghub in Personal Scripts
+==================================
+
+You can of course use ‘ghub-request’ and its wrapper functions in your
+personal scripts.  Unlike when you use Ghub in a package that you
+distribute for others to use, you don't have to explicitly specify a
+package in personal scripts.
+
+     ;; This is perfectly acceptable in personal scripts ...
+     (ghub-get "/user")
+
+     ;; ... and actually equals to
+     (ghub-get "/user" nil :auth 'ghub)
+
+     ;; In packages you have to specify the package using AUTH.
+     (ghub-get "/user" nil :auth 'some-package)
+
+   When the ‘AUTH’ argument is not specified, then a request is made on
+behalf of the ‘ghub’ package itself.  Like for any other package you
+have to create a dedicated token of course.
+
+
+File: ghub.info,  Node: Using Ghub in Your Own Package,  Next: Forge Limitations and Notes,  Prev: Using Ghub in Personal Scripts,  Up: Notes
+
+4.2 Using Ghub in Your Own Package
+==================================
+
+Every package should use its own token.  This allows you as the author
+of some package to only request access to API scopes that are actually
+needed, which in turn might make it easier for users to trust your
+package not to do unwanted things.
+
+   You have to tell ‘ghub-request’ on behalf of which package a request
+is being made by passing the symbol ‘PACKAGE’ as the value of its ‘AUTH’
+argument.
+
+     (ghub-request "GET" "/user" nil :auth 'PACKAGE)
+
+   Keep in mind that the users of your package will have to manually
+create a suitable token.  To make that easier, you should not only link
+to this manual but also prominently mention the scopes the token needs;
+and explain what they are needed for.
+
+
+File: ghub.info,  Node: Forge Limitations and Notes,  Prev: Using Ghub in Your Own Package,  Up: Notes
+
+4.3 Forge Limitations and Notes
+===============================
+
+   • There are no default Gitea and Gogs instances so the variables
+     ‘gitea.host’ and ‘gogs.host’ are not taken into account.
+
+   • Gitea and Gogs do not support limiting a token to certain scopes.
+
+   • The Bitbucket API is fairly broken and my willingness to deal with
+     that is extremely limited unless someone pays me vast amounts of
+     money.
+
+   • The Gitlab API documentation is not always accurate, though I don't
+     have an example at hand.  It also isn't structured well, making it
+     occasionally difficult to find the information one is looking for.
+
+   • Where one would use ‘user/repo’ when accessing another forge, one
+     has to use ‘user%2Frepo’ when accessing Gitlab, e.g.:
+
+          (ghub-get "/projects/python-mode-devs%2Fpython-mode"
+                    nil :forge 'gitlab)
+
+
+File: ghub.info,  Node: FAQ,  Next: Function Index,  Prev: Notes,  Up: Top
+
+Appendix A FAQ
+**************
+
+See <https://github.com/magit/ghub/wiki/Github-Errors>.
+
+
+File: ghub.info,  Node: Function Index,  Next: Variable Index,  Prev: FAQ,  Up: Top
+
+Appendix B Function Index
+*************************
+
+[index]
+* Menu:
+
+* ghub--graphql-vacuum:                  Making GraphQL Requests.
+                                                              (line  56)
+* ghub-continue:                         Making REST Requests.
+                                                              (line 117)
+* ghub-delete:                           Github Convenience Wrappers.
+                                                              (line  31)
+* ghub-fetch-issue:                      Making GraphQL Requests.
+                                                              (line 105)
+* ghub-fetch-pullreq:                    Making GraphQL Requests.
+                                                              (line 111)
+* ghub-fetch-repository:                 Making GraphQL Requests.
+                                                              (line  99)
+* ghub-get:                              Github Convenience Wrappers.
+                                                              (line   9)
+* ghub-graphql:                          Making GraphQL Requests.
+                                                              (line   6)
+* ghub-head:                             Github Convenience Wrappers.
+                                                              (line   6)
+* ghub-patch:                            Github Convenience Wrappers.
+                                                              (line  28)
+* ghub-post:                             Github Convenience Wrappers.
+                                                              (line  25)
+* ghub-put:                              Github Convenience Wrappers.
+                                                              (line  22)
+* ghub-request:                          Making REST Requests.
+                                                              (line   6)
+* ghub-response-link-relations:          Making REST Requests.
+                                                              (line 167)
+* ghub-wait:                             Github Convenience Wrappers.
+                                                              (line  44)
+
+
+File: ghub.info,  Node: Variable Index,  Prev: Function Index,  Up: Top
+
+Appendix C Variable Index
+*************************
+
+[index]
+* Menu:
+
+* ghub-response-headers:                 Making REST Requests.
+                                                              (line 158)
+* github.host:                           Github Configuration Variables.
+                                                              (line  26)
+* github.HOST.user:                      Github Configuration Variables.
+                                                              (line  17)
+* github.user:                           Github Configuration Variables.
+                                                              (line  11)
+
+
+
+Tag Table:
+Node: Top775
+Node: Introduction2215
+Node: Getting Started2620
+Node: Basic Concepts Arguments and Variables3647
+Node: Setting the Username7651
+Ref: Setting your Githubcom Username8139
+Ref: Setting your Gitlabcom Username8495
+Ref: Setting your Github Enterprise Username8961
+Ref: Setting your Username for Other Hosts and/or Forges9694
+Node: Creating and Storing a Token10500
+Ref: Creating a Token10713
+Ref: Storing a Token11674
+Node: Github Configuration Variables13415
+Node: API15126
+Node: Their APIs15328
+Node: Making REST Requests16010
+Node: Making GraphQL Requests25067
+Node: Github Convenience Wrappers31750
+Node: Notes35410
+Node: Using Ghub in Personal Scripts35606
+Node: Using Ghub in Your Own Package36495
+Node: Forge Limitations and Notes37430
+Node: FAQ38438
+Node: Function Index38604
+Node: Variable Index40870
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/gsexp.el b/emacs/.emacs.d/elpa/ghub-20260731.2254/gsexp.el
new file mode 100644
index 0000000..b420690
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ghub-20260731.2254/gsexp.el
@@ -0,0 +1,103 @@
+;;; gsexp.el --- GraphQl as S-expressions  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2016-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.ghub@jonas.bernoulli.dev>
+;; Homepage: https://github.com/magit/ghub
+;; Keywords: tools
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library encodes S-expressions as GraphQl documents.  Currently
+;; it is rather incomplete and only intended for use by `ghub-graphql'
+;; but I might fill the gaps and add documentation eventually.  I am
+;; not in a hurry though.
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'compat)
+
+(defvar gsexp-one-variable-per-line nil)
+
+(defun gsexp-encode (document)
+  (gsexp--pp (gsexp--encode-field document)))
+
+(defun gsexp--encode-field (field)
+  (cond
+    ((stringp field)
+     field)
+    ((symbolp field)
+     (symbol-name field))
+    ((listp (car field))
+     (concat (format "%s: " (caar field))
+             (gsexp--encode-field (cons (car (cdar field))
+                                        (cdr field)))))
+    ((concat
+      (pcase (pop field)
+        (`[] "")
+        ((and (pred symbolp) op) (symbol-name op))
+        (`[,op] (symbol-name op))
+        (`[,op ,name] (format "%s %s" op name)))
+      (and (vectorp (car field))
+           (format " (%s%s)"
+                   (if gsexp-one-variable-per-line "\n" "")
+                   (mapconcat #'gsexp--encode-argument
+                              (append (pop field) nil)
+                              (if gsexp-one-variable-per-line ",\n" ","))))
+      (and field
+           (format " {\n%s\n}"
+                   (mapconcat #'gsexp--encode-field field "\n")))))))
+
+(cl-defun gsexp--encode-argument ((argument value))
+  (format "%s: %s" argument (gsexp--encode-value value)))
+
+(defun gsexp--encode-value (value)
+  (cond
+    ((numberp value)
+     (number-to-string value))
+    ((symbolp value) ; including variables, enums, booleans and null
+     (symbol-name value))
+    ((stringp value)
+     (prin1-to-string value))
+    ((vectorp value)
+     (format "(%s)" (mapconcat #'gsexp--encode-value value "")))
+    ((listp value)
+     (format "{%s}" (mapconcat
+                     (pcase-lambda (`(,name ,value))
+                       (format "%s: %s" name (gsexp--encode-value value)))
+                     value ", ")))
+    ((error "Invalid field value: %S" value))))
+
+(defun gsexp--pp (string)
+  (with-temp-buffer
+    (save-excursion
+      (insert string))
+    (while (< (point) (point-max))
+      (unless (and (bolp) (eolp))
+        (save-excursion
+          (let ((level (car (syntax-ppss (line-beginning-position)))))
+            (when (looking-at "\\s-*\\s)")
+              (decf level))
+            (indent-line-to (* 2 level)))))
+      (forward-line 1))
+    (buffer-string)))
+
+;;; _
+(provide 'gsexp)
+;;; gsexp.el ends here
diff --git a/emacs/.emacs.d/elpa/ghub-20260731.2254/gsexp.elc b/emacs/.emacs.d/elpa/ghub-20260731.2254/gsexp.elc
new file mode 100644
index 0000000..59ff1df
Binary files /dev/null and b/emacs/.emacs.d/elpa/ghub-20260731.2254/gsexp.elc differ
diff --git a/emacs/.emacs.d/elpa/gnupg/pubring.kbx b/emacs/.emacs.d/elpa/gnupg/pubring.kbx
new file mode 100644
index 0000000..73d9a6a
Binary files /dev/null and b/emacs/.emacs.d/elpa/gnupg/pubring.kbx differ
diff --git a/emacs/.emacs.d/elpa/gnupg/pubring.kbx~ b/emacs/.emacs.d/elpa/gnupg/pubring.kbx~
new file mode 100644
index 0000000..4c858ca
Binary files /dev/null and b/emacs/.emacs.d/elpa/gnupg/pubring.kbx~ differ
diff --git a/emacs/.emacs.d/elpa/gnupg/trustdb.gpg b/emacs/.emacs.d/elpa/gnupg/trustdb.gpg
new file mode 100644
index 0000000..4e11cc4
Binary files /dev/null and b/emacs/.emacs.d/elpa/gnupg/trustdb.gpg differ
diff --git a/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg-autoloads.el b/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg-autoloads.el
new file mode 100644
index 0000000..efbd121
--- /dev/null
+++ b/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg-autoloads.el
@@ -0,0 +1,59 @@
+;;; goto-chg-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from goto-chg.el
+
+(autoload 'goto-last-change "goto-chg" "\
+Go to the point where the last edit was made in the current buffer.
+Repeat the command to go to the second last edit, etc.
+
+To go back to more recent edit, the reverse of this command, use \\[goto-last-change-reverse]
+or precede this command with \\[universal-argument] - (minus).
+
+It does not go to the same point twice even if there has been many edits
+there. I call the minimal distance between distinguishable edits \"span\".
+Set variable `glc-default-span' to control how close is \"the same point\".
+Default span is 8.
+The span can be changed temporarily with \\[universal-argument] right before \\[goto-last-change]:
+\\[universal-argument] <NUMBER> set current span to that number,
+\\[universal-argument] (no number) multiplies span by 4, starting with default.
+The so set span remains until it is changed again with \\[universal-argument], or the consecutive
+repetition of this command is ended by any other command.
+
+When span is zero (i.e. \\[universal-argument] 0) subsequent \\[goto-last-change] visits each and
+every point of edit and a message shows what change was made there.
+In this case it may go to the same point twice.
+
+This command uses undo information. If undo is disabled, so is this command.
+At times, when undo information becomes too large, the oldest information is
+discarded. See variable `undo-limit'.
+
+(fn ARG)" t)
+(autoload 'goto-last-change-reverse "goto-chg" "\
+Go back to more recent changes after \\[goto-last-change] have been used.
+See `goto-last-change' for use of prefix argument.
+
+(fn ARG)" t)
+(register-definition-prefixes "goto-chg" '("glc-"))
+
+;;; End of scraped data
+
+(provide 'goto-chg-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; goto-chg-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg-pkg.el b/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg-pkg.el
new file mode 100644
index 0000000..d29c77e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "goto-chg" "20240407.1110"
+  "Go to last change."
+  '((emacs "24.1"))
+  :url "https://github.com/emacs-evil/goto-chg"
+  :commit "72f556524b88e9d30dc7fc5b0dc32078c166fda7"
+  :revdesc "72f556524b88"
+  :keywords '("convenience" "matching")
+  :authors '(("David Andersson" . "l.david.anderssonsverige.nu"))
+  :maintainers '(("Vasilij Schneidermann" . "mail@vasilij.de")))
diff --git a/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg.el b/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg.el
new file mode 100644
index 0000000..95f6cf7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg.el
@@ -0,0 +1,369 @@
+;;; goto-chg.el --- Go to last change -*- lexical-binding: t -*-
+;;--------------------------------------------------------------------
+;;
+;; Copyright (C) 2002-2008,2013 David Andersson
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;-------------------------------------------------------------------
+;;
+;; Author: David Andersson <l.david.andersson(at)sverige.nu>
+;; Maintainer: Vasilij Schneidermann <mail@vasilij.de>
+;; Created: 16 May 2002
+;; Package-Version: 20240407.1110
+;; Package-Revision: 72f556524b88
+;; Package-Requires: ((emacs "24.1"))
+;; Keywords: convenience, matching
+;; URL: https://github.com/emacs-evil/goto-chg
+;;
+;;; Commentary:
+;;
+;; Goto Last Change
+;;
+;; Goto the point of the most recent edit in the buffer.
+;; When repeated, goto the second most recent edit, etc.
+;; Negative argument, C-u -, for reverse direction.
+;; Works by looking into buffer-undo-list to find points of edit.
+;;
+;; You would probably like to bind this command to a key.
+;; For example in your ~/.emacs:
+;;
+;;   (require 'goto-chg)
+;;
+;;   (global-set-key [(control ?.)] 'goto-last-change)
+;;   (global-set-key [(control ?,)] 'goto-last-change-reverse)
+;;
+;; Works with emacs-19.29, 19.31, 20.3, 20.7, 21.1, 21.4, 22.1 and 23.1
+;; Works with XEmacs-20.4 and 21.4 (but see todo about `last-command' below)
+;;
+;;--------------------------------------------------------------------
+;; History
+;;
+;; Ver 1.7.5 2022-01-04 Axel Foesman, Stefan Kangas
+;;    Consider all entries in undo-tree changesets, bump license to GPL3+
+;; Ver 1.7.4 2020-10-08 Vasilij Schneidermann
+;;    Remove hard dependency on undo-tree
+;; Ver 1.7.3 2019-01-07 Vasilij Schneidermann
+;;    Fix errors when used with persistent undo
+;; Ver 1.7.2 2018-01-05 Vasilij Schneidermann
+;;    Fix byte-compiler warnings again
+;; Ver 1.7.1 2017-12-31 Vasilij Schneidermann
+;;    Fix byte-compiler warnings
+;; Ver 1.7 2017-09-17 Vasilij Schneidermann
+;;    Make it work with undo-tree-mode (see
+;;    <https://github.com/martinp26/goto-chg>)
+;; Ver 1.6 2013-12-12 David Andersson
+;;    Add keywords; Cleanup comments
+;; Ver 1.5 2013-12-11 David Andersson
+;;    Autoload and document `goto-last-change-reverse'
+;; Ver 1.4 2008-09-20 David Andersson
+;;    Improved property change description; Update comments.
+;; Ver 1.3 2007-03-14 David Andersson
+;;    Added `goto-last-change-reverse'
+;; Ver 1.2 2003-04-06 David Andersson
+;;    Don't let repeating error depthen glc-probe-depth.
+;; Ver 1.1 2003-04-06 David Andersson
+;;    Zero arg describe changes. Negative arg go back.
+;;    Autoload. Remove message using nil in stead of an empty string.
+;; Ver 1.0 2002-05-18 David Andersson
+;;    Initial version
+;;
+;;--------------------------------------------------------------------
+;;
+;;todo: Rename "goto-chg.el" -> "gotochange.el" or "goto-chgs" ?
+;;todo: Rename function goto-last-change -> goto-last-edit ?
+;;todo: Rename adjective "-last-" -> "-latest-" or "-most-recent-" ?
+;;todo: There are some, maybe useful, funcs  for region undo
+;;       in simple.el in emacs 20. Take a look.
+;;todo: Add functionality to visit changed point in text order, not only in
+;;        chronological order. (Naa, highlight-changes-mode does that).
+;;todo: Inverse indication that a change has been saved or not
+;;todo: Highlight the range of text involved in the last change?
+;;todo: See session-jump-to-last-change in session.el?
+;;todo: Unhide invisible text (e.g. outline mode) like isearch do.
+;;todo: XEmacs sets last-command to `t' after an error, so you cannot reverse
+;;        after "No furter change info". Should we bother?
+;;todo: Try distinguish "No further change info" (end of truncated undo list)
+;;        and "No further changes" (end of a complete undo list).
+;;
+;;--------------------------------------------------------------------
+
+;;; Code:
+
+(require 'undo-tree nil t)
+
+(defvar glc-default-span 8 "*goto-last-change don't visit the same point twice.
+glc-default-span tells how far around a visited point not to visit again.")
+(defvar glc-current-span 8 "Internal for goto-last-change.\nA copy of glc-default-span or the ARG passed to goto-last-change.")
+(defvar glc-probe-depth 0 "Internal for goto-last-change.\nIt is non-zero between successive goto-last-change.")
+(defvar glc-direction 1 "Direction goto-last-change moves towards.")
+
+;;todo: Find begin and end of line, then use it somewhere
+
+(defun glc-fixup-edit (e)
+  "Convert an Emacs 27.1-style combined change to a regular edit."
+  (when (and (consp e)
+             (eq (car e) 'apply)
+             (not (functionp (cadr e)))
+             (eq (nth 4 e) 'undo--wrap-and-run-primitive-undo))
+    (let ((args (last e)))
+      (when (and (consp args) (= (length args) 1)
+                 (consp (car args)) (= (length (car args)) 1)
+                 (consp (caar args)) (numberp (car (caar args))) (numberp (cdr (caar args))))
+        (setq e (caar args)))))
+  e)
+
+(defun glc-center-ellipsis (str maxlen &optional ellipsis)
+  "Truncate STRING in the middle to length MAXLEN.
+If STRING is max MAXLEN just return the string.
+Optional third argument is the replacement, which defaults to \"...\"."
+  (if (<= (length str) maxlen)
+      str
+    ;; else
+    (let* ((lipsis (or ellipsis "..."))
+           (i (/ (- maxlen (length lipsis)) 2)))
+      (concat (substring str 0 i)
+              lipsis
+              (substring str (- i))))))
+
+(defun glc-adjust-pos2 (pos p1 p2 adj)
+  ;; Helper function to glc-adjust-pos
+  ;; p1, p2: interval where an edit occured
+  ;; adj: amount of text added (positive) or removed (negativ) by the edit
+  ;; Return pos if well before p1, or pos+adj if well after p2, or nil if too close
+  (cond ((<= pos (- p1 glc-current-span))
+         pos)
+        ((> pos (+ p2 glc-current-span))
+         (+ pos adj))
+        ((zerop glc-current-span)
+         p1)
+        (t
+         nil)))
+
+(defun glc-adjust-pos (pos e)
+  "Given POS, a buffer position before the edit E, compute and return
+the \"same\" buffer position after E happened.
+Exception: return nil if POS is closer than `glc-current-span' to the edit E.
+\nInsertion edits before POS returns a larger value.
+Deletion edits before POS returns a smaller value.
+\nThe edit E is an entry from the `buffer-undo-list'. See for details."
+  (setq e (glc-fixup-edit e))
+  (cond ((atom e)                       ; nil==cmd boundary, or, num==changed pos
+         pos)
+        ((numberp (car e))              ; (beg . end)==insertion
+         (glc-adjust-pos2 pos (car e) (car e) (- (cdr e) (car e))))
+        ((stringp (car e))              ; (string . pos)==deletion
+         (glc-adjust-pos2 pos (abs (cdr e)) (+ (abs (cdr e)) (length (car e))) (- (length (car e)))))
+        ((null (car e))                 ; (nil prop val beg . end)==prop change
+         (glc-adjust-pos2 pos (nth 3 e) (nthcdr 4 e) 0))
+        (t                              ; (marker . dist)==marker moved
+         pos)))
+
+;; If recursive in stead of iterative (while), it tends to fill the call stack.
+;; (Isn't it tail optimized?)
+(defun glc-adjust-list (r)
+  "R is list of edit entries in chronological order.
+Pick the point of the first edit entry and update that point with
+the second, third, etc, edit entries. Return the final updated point,
+or nil if the point was closer than `glc-current-span' to some edit in R.
+\nR is basically a reversed slice from the buffer-undo-list."
+  (if r
+      ;; Get pos
+      (let ((pos (glc-get-pos (car r))))
+        (setq r (cdr r))
+        ;; Walk back in reverse list
+        (while (and r pos)
+          (setq pos (glc-adjust-pos pos (car r))
+                r (cdr r)))
+        pos)
+    ;; else
+    nil))
+
+(defun glc-get-pos (e)
+  "If E represents an edit, return a position value in E, the position
+where the edit took place. Return nil if E represents no real change.
+\nE is an entry in the buffer-undo-list."
+  (setq e (glc-fixup-edit e))
+  (cond ((numberp e) e)                 ; num==changed position
+        ((atom e) nil)                  ; nil==command boundary
+        ((numberp (car e)) (cdr e))     ; (beg . end)==insertion
+        ((stringp (car e)) (abs (cdr e))) ; (string . pos)==deletion
+        ((null (car e)) (nthcdr 4 e))   ; (nil ...)==text property change
+        ((atom (car e)) nil)            ; (t ...)==file modification time
+        (t nil)))                       ; (marker ...)==marker moved
+
+(defun glc-get-descript (e &optional n)
+  "If E represents an edit, return a short string describing E.
+Return nil if E represents no real change.
+\nE is an entry in the buffer-undo-list."
+  (setq e (glc-fixup-edit e))
+  (let ((nn (or (format "T-%d: " n) "")))
+    (cond ((numberp e) "New position")  ; num==changed position
+          ((atom e) nil)                ; nil==command boundary
+          ((numberp (car e))            ; (beg . end)==insertion
+           (if (and n (< n 2))
+               (format "%sInserted %d chars \"%s\"" nn (- (cdr e) (car e))
+                       (glc-center-ellipsis (buffer-substring (car e) (cdr e)) 60))
+             ;; else
+             ;; An older insert. The inserted text cannot easily be computed.
+             ;; Just show the char count.
+             (format "%sInserted %d chars" nn (- (cdr e) (car e)))))
+          ((stringp (car e))            ; (string . pos)==deletion
+           (format "%sDeleted \"%s\"" nn (glc-center-ellipsis (car e) 60)))
+          ((null (car e))               ; (nil ...)==text property change
+           (format "%sProperty change" nn))
+          ((atom (car e)) nil)          ; (t ...)==file modification time
+          (t nil))))                    ; (marker ...)==marker moved
+
+(defun glc-is-positionable (e)
+  "Return non-nil if E is an insertion, deletion or text property change.
+\nE is an entry in the buffer-undo-list."
+  (and (not (numberp e)) (glc-get-pos e)))
+
+(defun glc-is-filetime (e)
+  "Return t if E indicates a buffer became \"modified\",
+that is, it was previously saved or unchanged. Nil otherwise."
+  (and (listp e) (eq (car e) t)))
+
+(declare-function undo-tree-current "ext:undo-tree")
+(declare-function undo-tree-node-previous "ext:undo-tree")
+(declare-function undo-tree-node-undo "ext:undo-tree")
+(declare-function undo-list-transfer-to-tree "ext:undo-tree")
+(defvar buffer-undo-tree)
+
+;;;###autoload
+(defun goto-last-change (arg)
+"Go to the point where the last edit was made in the current buffer.
+Repeat the command to go to the second last edit, etc.
+\nTo go back to more recent edit, the reverse of this command, use \\[goto-last-change-reverse]
+or precede this command with \\[universal-argument] - (minus).
+\nIt does not go to the same point twice even if there has been many edits
+there. I call the minimal distance between distinguishable edits \"span\".
+Set variable `glc-default-span' to control how close is \"the same point\".
+Default span is 8.
+The span can be changed temporarily with \\[universal-argument] right before \\[goto-last-change]:
+\\[universal-argument] <NUMBER> set current span to that number,
+\\[universal-argument] (no number) multiplies span by 4, starting with default.
+The so set span remains until it is changed again with \\[universal-argument], or the consecutive
+repetition of this command is ended by any other command.
+\nWhen span is zero (i.e. \\[universal-argument] 0) subsequent \\[goto-last-change] visits each and
+every point of edit and a message shows what change was made there.
+In this case it may go to the same point twice.
+\nThis command uses undo information. If undo is disabled, so is this command.
+At times, when undo information becomes too large, the oldest information is
+discarded. See variable `undo-limit'."
+  (interactive "P")
+  (cond ((not (eq this-command last-command))
+         ;; Start a glc sequence
+         ;; Don't go to current point if last command was an obvious edit
+         ;; (yank or self-insert, but not kill-region). Makes it easier to
+         ;; jump back and forth when copying seleced lines.
+         (setq glc-probe-depth (if (memq last-command '(yank self-insert-command)) 1 0)
+               glc-direction 1
+               glc-current-span glc-default-span)
+         (if (< (prefix-numeric-value arg) 0)
+             (error "Negative arg: Cannot reverse as the first operation"))))
+  (cond ((and (null buffer-undo-list)
+              (or (not (boundp 'buffer-undo-tree))
+                  (null buffer-undo-tree)))
+         (error "Buffer has not been changed"))
+        ((eq buffer-undo-list t)
+         (error "No change info (undo is disabled)")))
+  (cond ((numberp arg)                  ; Numeric arg sets span
+         (setq glc-current-span (abs arg)))
+        ((consp arg)                    ; C-u's multiply previous span by 4
+         (setq glc-current-span (* (abs (car arg)) glc-default-span))
+         (message "Current span is %d chars" glc-current-span))) ;todo: keep message with "waiting" and "is saved"
+  (setq glc-direction (if (< (prefix-numeric-value arg) 0) -1 1))
+  (let* (rev                            ; Reversed (and filtered) undo list
+         pos                            ; The pos we look for, nil until found
+         (n 0)                          ; Steps in undo list (length of 'rev')
+         (undo-tree-p (bound-and-true-p undo-tree-mode))
+         (orig-l (if (not undo-tree-p)
+                     buffer-undo-list
+                   (undo-list-transfer-to-tree)
+                   ;; Each node has a list of undo entries: Need to flatten.
+                   ;; Keep current entries and next node to consider in tuple.
+                   (cons nil (undo-tree-current buffer-undo-tree))))
+         (l orig-l)
+         (passed-save-entry (not (buffer-modified-p)))
+         (new-probe-depth glc-probe-depth))
+    ;; Walk back and forth in the buffer-undo-list, each time one step deeper,
+    ;; until we can walk back the whole list with a 'pos' that is not coming
+    ;; too close to another edit.
+    (while (null pos)
+      (setq new-probe-depth (+ new-probe-depth glc-direction))
+      (when (< glc-direction 0)
+        (setq rev ()
+              n 0
+              l orig-l
+              passed-save-entry (not (buffer-modified-p))))
+      (when (< new-probe-depth 1)
+        (error "No later change info"))
+      (when (> n 150)
+        (message "working..."))
+      ;; Walk forward in buffer-undo-list, glc-probe-depth steps.
+      ;; Build reverse list along the way
+      (while (< n new-probe-depth)
+        (let ((entry (if (not undo-tree-p)
+                         (if l
+                             (pop l)
+                           (error "No further change info"))
+                       (when (null (car l))
+                         (setq l (cons (cons nil
+                                             (undo-tree-node-undo
+                                              (or (cdr l)
+                                                  (error "No further change info"))))
+                                       (undo-tree-node-previous (cdr l)))))
+                       (pop (car l)))))
+          (cond ((glc-is-positionable entry)
+                 (setq n (1+ n)
+                       rev (cons entry rev)))
+                ((or passed-save-entry (glc-is-filetime entry))
+                 (setq passed-save-entry t)))))
+      ;; Walk back in reverse list, from older to newer edits.
+      ;; Adjusting pos along the way.
+      (setq pos (glc-adjust-list rev)))
+    ;; Found a place not previously visited, in 'pos'.
+    ;; (An error have been issued if nothing (more) found.)
+    (if (> n 150)
+        (message nil))                  ; remove message "working..."
+    (if (and (= glc-current-span 0) (glc-get-descript (car rev) n))
+        (message "%s" (glc-get-descript (car rev) n))
+      ;; else
+      (if passed-save-entry
+          (message "(This change is saved)")))
+    (setq glc-probe-depth new-probe-depth)
+    (goto-char pos)))
+
+;;;###autoload
+(defun goto-last-change-reverse (arg)
+  "Go back to more recent changes after \\[goto-last-change] have been used.
+See `goto-last-change' for use of prefix argument."
+  (interactive "P")
+  ;; Negate arg, all kinds
+  (cond ((eq arg nil)  (setq arg '-))
+        ((eq arg '-)   (setq arg nil))
+        ((listp arg)   (setq arg (list (- (car arg)))))
+        (t (setq arg   (- arg))))
+  ;; Make 'goto-last-change-reverse' look like 'goto-last-change'
+  (cond ((eq last-command this-command)
+         (setq last-command 'goto-last-change)))
+  (setq this-command 'goto-last-change)
+  ;; Call 'goto-last-change' to do the job
+  (goto-last-change arg))
+
+(provide 'goto-chg)
+
+;;; goto-chg.el ends here
diff --git a/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg.elc b/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg.elc
new file mode 100644
index 0000000..134157a
Binary files /dev/null and b/emacs/.emacs.d/elpa/goto-chg-20240407.1110/goto-chg.elc differ
diff --git a/emacs/.emacs.d/elpa/helpful-20250408.334/helpful-autoloads.el b/emacs/.emacs.d/elpa/helpful-20250408.334/helpful-autoloads.el
new file mode 100644
index 0000000..87372e3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/helpful-20250408.334/helpful-autoloads.el
@@ -0,0 +1,66 @@
+;;; helpful-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from helpful.el
+
+(autoload 'helpful-function "helpful" "\
+Show help for function named SYMBOL.
+
+See also `helpful-macro', `helpful-command' and `helpful-callable'.
+
+(fn SYMBOL)" t)
+(autoload 'helpful-command "helpful" "\
+Show help for interactive function named SYMBOL.
+
+See also `helpful-function'.
+
+(fn SYMBOL)" t)
+(autoload 'helpful-key "helpful" "\
+Show help for interactive command bound to KEY-SEQUENCE.
+
+(fn KEY-SEQUENCE)" t)
+(autoload 'helpful-macro "helpful" "\
+Show help for macro named SYMBOL.
+
+(fn SYMBOL)" t)
+(autoload 'helpful-callable "helpful" "\
+Show help for function, macro or special form named SYMBOL.
+
+See also `helpful-macro', `helpful-function' and `helpful-command'.
+
+(fn SYMBOL)" t)
+(autoload 'helpful-symbol "helpful" "\
+Show help for SYMBOL, a variable, function, macro, or face.
+
+See also `helpful-callable' and `helpful-variable'.
+
+(fn SYMBOL)" t)
+(autoload 'helpful-variable "helpful" "\
+Show help for variable named SYMBOL.
+
+(fn SYMBOL)" t)
+(autoload 'helpful-at-point "helpful" "\
+Show help for the symbol at point." t)
+(register-definition-prefixes "helpful" '("helpful-"))
+
+;;; End of scraped data
+
+(provide 'helpful-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; helpful-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/helpful-20250408.334/helpful-pkg.el b/emacs/.emacs.d/elpa/helpful-20250408.334/helpful-pkg.el
new file mode 100644
index 0000000..3beb234
--- /dev/null
+++ b/emacs/.emacs.d/elpa/helpful-20250408.334/helpful-pkg.el
@@ -0,0 +1,14 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "helpful" "20250408.334"
+  "A better *help* buffer."
+  '((emacs      "25")
+    (dash       "2.18.0")
+    (s          "1.11.0")
+    (f          "0.20.0")
+    (elisp-refs "1.2"))
+  :url "https://github.com/Wilfred/helpful"
+  :commit "03756fa6ad4dcca5e0920622b1ee3f70abfc4e39"
+  :revdesc "03756fa6ad4d"
+  :keywords '("help" "lisp")
+  :authors '(("Wilfred Hughes" . "me@wilfred.me.uk"))
+  :maintainers '(("Wilfred Hughes" . "me@wilfred.me.uk")))
diff --git a/emacs/.emacs.d/elpa/helpful-20250408.334/helpful.el b/emacs/.emacs.d/elpa/helpful-20250408.334/helpful.el
new file mode 100644
index 0000000..c9ab1b1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/helpful-20250408.334/helpful.el
@@ -0,0 +1,3112 @@
+;;; helpful.el --- A better *help* buffer            -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2017-2022  Wilfred Hughes
+
+;; Author: Wilfred Hughes <me@wilfred.me.uk>
+;; URL: https://github.com/Wilfred/helpful
+;; Keywords: help, lisp
+;; Package-Version: 20250408.334
+;; Package-Revision: 03756fa6ad4d
+;; Package-Requires: ((emacs "25") (dash "2.18.0") (s "1.11.0") (f "0.20.0") (elisp-refs "1.2"))
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Helpful is a replacement for *help* buffers that provides much more
+;; contextual information.  To get started, try:
+;; `M-x helpful-function RET helpful-function
+;;
+;; The full set of commands you can try is:
+;;
+;; * helpful-function
+;; * helpful-command
+;; * helpful-key
+;; * helpful-macro
+;; * helpful-callable
+;; * helpful-variable
+;; * helpful-at-point
+;;
+;; For more information and screenshots, see
+;; https://github.com/wilfred/helpful
+
+;;; Code:
+
+(require 'elisp-refs)
+(require 'help)
+(require 'help-fns)
+(require 'dash)
+(require 's)
+(require 'f)
+(require 'find-func)
+(require 'nadvice)
+(require 'info-look)
+(require 'edebug)
+(require 'trace)
+(require 'imenu)
+(require 'cc-langs)
+
+(declare-function org-link-types "ol" ())
+(declare-function org-link-store-props "ol" (&rest plist))
+(declare-function org-link-get-parameter "ol" (type key))
+
+(defvar-local helpful--sym nil)
+(defvar-local helpful--callable-p nil)
+(defvar-local helpful--associated-buffer nil
+  "The buffer being used when showing inspecting
+buffer-local variables.")
+(defvar-local helpful--start-buffer nil
+  "The buffer we were originally called from.")
+(defvar-local helpful--view-literal nil
+  "Whether to show a value as a literal, or a pretty interactive
+view.")
+(defvar-local helpful--first-display t
+  "Whether this is the first time this results buffer has been
+displayed.
+
+Nil means that we're refreshing, so we don't want to clobber any
+settings changed by the user.")
+
+(defgroup helpful nil
+  "A rich help system with contextual information."
+  :link '(url-link "https://github.com/Wilfred/helpful")
+  :group 'help)
+
+(defcustom helpful-max-buffers
+  5
+  "Helpful will kill the least recently used Helpful buffer
+if there are more than this many.
+
+To disable cleanup entirely, set this variable to nil. See also
+`helpful-kill-buffers' for a one-off cleanup."
+  :type '(choice (const nil) number)
+  :group 'helpful)
+
+(defcustom helpful-switch-buffer-function
+  #'pop-to-buffer
+  "Function called to display the *Helpful* buffer."
+  :type 'function
+  :group 'helpful)
+
+(defcustom helpful-set-variable-function
+  (if (< 29 emacs-major-version) #'setopt #'setq)
+  "Function used by `helpful--set' to interactively set variables."
+  :type 'function
+  :group 'helpful)
+
+;; TODO: explore whether more basic highlighting is fast enough to
+;; handle larger functions. See `c-font-lock-init' and its use of
+;; font-lock-keywords-1.
+(defconst helpful-max-highlight 5000
+  "Don't highlight code with more than this many characters.
+
+This is currently only used for C code, as lisp highlighting
+seems to be more efficient. This may change again in future.
+
+See `this-command' as an example of a large piece of C code that
+can make Helpful very slow.")
+
+(defun helpful--kind-name (symbol callable-p)
+  "Describe what kind of symbol this is."
+  (cond
+   ((not callable-p) "variable")
+   ((commandp symbol) "command")
+   ((macrop symbol) "macro")
+   ((functionp symbol) "function")
+   ((special-form-p symbol) "special form")))
+
+(defun helpful--buffer (symbol callable-p)
+  "Return a buffer to show help for SYMBOL in."
+  (let* ((current-buffer (current-buffer))
+         (buf-name
+          (format "*helpful %s*"
+                  (if (symbolp symbol)
+                      (format "%s: %s"
+                              (helpful--kind-name symbol callable-p)
+                              symbol)
+                    "lambda")))
+         (buf (get-buffer buf-name)))
+    (unless buf
+      ;; If we need to create the buffer, ensure we don't exceed
+      ;; `helpful-max-buffers' by killing the least recently used.
+      (when (numberp helpful-max-buffers)
+        (let* ((buffers (buffer-list))
+               (helpful-bufs (--filter (with-current-buffer it
+                                         (eq major-mode 'helpful-mode))
+                                       buffers))
+               ;; `buffer-list' seems to be ordered by most recently
+               ;; visited first, so keep those.
+               (excess-buffers (-drop (1- helpful-max-buffers) helpful-bufs)))
+          ;; Kill buffers so we have one buffer less than the maximum
+          ;; before we create a new one.
+          (-each excess-buffers #'kill-buffer)))
+
+      (setq buf (get-buffer-create buf-name)))
+
+    ;; Initialise the buffer with the symbol and associated data.
+    (with-current-buffer buf
+      (helpful-mode)
+      (setq helpful--sym symbol)
+      (setq helpful--callable-p callable-p)
+      (setq helpful--start-buffer current-buffer)
+      (setq helpful--associated-buffer current-buffer)
+      (setq list-buffers-directory
+        (if (symbolp symbol) (format "%s: %s" (helpful--kind-name symbol callable-p) symbol) "lambda"))
+      (if (helpful--primitive-p symbol callable-p)
+          (setq-local comment-start "//")
+        (setq-local comment-start ";")))
+    buf))
+
+(defface helpful-heading
+  '((t (:weight bold)))
+  "Face used for headings in Helpful buffers.")
+
+(defun helpful--heading (text)
+  "Propertize TEXT as a heading."
+  (propertize (concat text "\n") 'face 'helpful-heading))
+
+(defun helpful--format-closure (sym form)
+  "Given a closure, return an equivalent defun form."
+  (-let (((_keyword _env args . body) form)
+         (docstring nil))
+    (when (stringp (car body))
+      (setq docstring (car body))
+      (setq body (cdr body))
+      ;; Ensure that the docstring doesn't have lines starting with (,
+      ;; or it breaks indentation.
+      (setq docstring
+            (s-replace "\n(" "\n\\(" docstring)))
+    (if docstring
+        `(defun ,sym ,args ,docstring ,@body)
+      `(defun ,sym ,args ,@body))))
+
+(defun helpful--pretty-print (value)
+  "Pretty-print VALUE.
+
+If VALUE is very big, the user may press \\[keyboard-quit] to
+gracefully stop the printing. If VALUE is self-referential, the
+error will be caught and displayed."
+  ;; Inspired by `ielm-eval-input'.
+  (condition-case err
+      (s-trim-right (pp-to-string value))
+    (error
+     (propertize (format "(Display error: %s)" (cadr err))
+                 'face 'font-lock-comment-face))
+    (quit
+     (propertize "(User quit during pretty-printing.)"
+                 'face 'font-lock-comment-face))))
+
+(defun helpful--sort-symbols (sym-list)
+  "Sort symbols in SYM-LIST alphabetically."
+  (--sort
+   (string< (symbol-name it) (symbol-name other))
+   sym-list))
+
+(defun helpful--button (text type &rest properties)
+  ;; `make-text-button' mutates our string to add properties. Copy
+  ;; TEXT to prevent mutating our arguments, and to support 'pure'
+  ;; strings, which are read-only.
+  (setq text (substring-no-properties text))
+  (apply #'make-text-button
+         text nil
+         :type type
+         properties))
+
+(defun helpful--canonical-symbol (sym callable-p)
+  "If SYM is an alias, return the underlying symbol.
+Return SYM otherwise."
+  (let ((depth 0))
+    (if (and (symbolp sym) callable-p)
+        (progn
+          ;; Follow the chain of symbols until we find a symbol that
+          ;; isn't pointing to a symbol.
+          (while (and (symbolp (symbol-function sym))
+                      (< depth 10))
+            (setq sym (symbol-function sym))
+            (setq depth (1+ depth)))
+          ;; If this is an alias to a primitive, return the
+          ;; primitive's symbol.
+          (when (subrp (symbol-function sym))
+            (setq sym (intern (subr-name (symbol-function sym))))))
+      (setq sym (indirect-variable sym))))
+  sym)
+
+(defun helpful--aliases (sym callable-p)
+  "Return all the aliases for SYM."
+  (let ((canonical (helpful--canonical-symbol sym callable-p))
+        aliases)
+    (mapatoms
+     (lambda (s)
+       (when (and
+              ;; Skip variables that aren't bound, so we're faster.
+              (if callable-p (fboundp s) (boundp s))
+
+              ;; If this symbol is a new alias for our target sym,
+              ;; add it.
+              (eq canonical (helpful--canonical-symbol s callable-p))
+
+              ;; Don't include SYM.
+              (not (eq sym s)))
+         (push s aliases))))
+    (helpful--sort-symbols aliases)))
+
+(defun helpful--obsolete-info (sym callable-p)
+  (when (symbolp sym)
+    (get sym (if callable-p 'byte-obsolete-info 'byte-obsolete-variable))))
+
+(defun helpful--format-alias (sym callable-p)
+  (let ((obsolete-info (helpful--obsolete-info sym callable-p))
+        (sym-button (helpful--button
+                     (symbol-name sym)
+                     'helpful-describe-exactly-button
+                     'symbol sym
+                     'callable-p callable-p)))
+    (cond
+     (obsolete-info
+      (-if-let (version (-last-item obsolete-info))
+          (format "%s (obsolete since %s)" sym-button version)
+        (format "%s (obsolete)" sym-button)))
+     (t
+      sym-button))))
+
+(defun helpful--indent-rigidly (s amount)
+  "Indent string S by adding AMOUNT spaces to each line."
+  (with-temp-buffer
+    (insert s)
+    (indent-rigidly (point-min) (point-max) amount)
+    (buffer-string)))
+
+(defun helpful--format-properties (symbol)
+  "Return a string describing all the properties of SYMBOL."
+  (let* ((syms-and-vals
+          (-partition 2 (and (symbolp symbol) (symbol-plist symbol))))
+         (syms-and-vals
+          (-sort (-lambda ((sym1 _) (sym2 _))
+                   (string-lessp (symbol-name sym1) (symbol-name sym2)))
+                 syms-and-vals))
+         (lines
+          (--map
+           (-let* (((sym val) it)
+                   (pretty-val
+                    (helpful--pretty-print val)))
+             (format "%s\n%s%s"
+                     (propertize (symbol-name sym)
+                                 'face 'font-lock-constant-face)
+                     (helpful--indent-rigidly pretty-val 2)
+                     (cond
+                      ;; Also offer to disassemble byte-code
+                      ;; properties.
+                      ((byte-code-function-p val)
+                       (format "\n  %s"
+                               (helpful--make-disassemble-button val)))
+                      ((eq sym 'ert--test)
+                       (format "\n  %s"
+                               (helpful--make-run-test-button symbol)))
+                      (t
+                       ""))))
+           syms-and-vals)))
+    (when lines
+      (s-join "\n" lines))))
+
+(define-button-type 'helpful-forget-button
+  'action #'helpful--forget
+  'symbol nil
+  'callable-p nil
+  'follow-link t
+  'help-echo "Unbind this function")
+
+;; TODO: it would be nice to optionally delete the source code too.
+(defun helpful--forget (button)
+  "Unbind the current symbol."
+  (let* ((sym (button-get button 'symbol))
+         (callable-p (button-get button 'callable-p))
+         (kind (helpful--kind-name sym callable-p)))
+    (when (yes-or-no-p (format "Forget %s %s?" kind sym))
+      (if callable-p
+          (fmakunbound sym)
+        (makunbound sym))
+      (message "Forgot %s %s." kind sym)
+      (kill-buffer (current-buffer)))))
+
+(define-button-type 'helpful-c-source-directory
+  'action #'helpful--c-source-directory
+  'follow-link t
+  'help-echo "Set directory to Emacs C source code")
+
+(defun helpful--c-source-directory (_button)
+  "Set `find-function-C-source-directory' so we can show the
+source code to primitives."
+  (let ((emacs-src-dir (read-directory-name "Path to Emacs source code: ")))
+    ;; Let the user specify the source path with or without src/,
+    ;; which is a subdirectory in the Emacs tree.
+    (unless (equal (f-filename emacs-src-dir) "src")
+      (setq emacs-src-dir (f-join emacs-src-dir "src")))
+    (setq find-function-C-source-directory emacs-src-dir))
+  (helpful-update))
+
+(define-button-type 'helpful-disassemble-button
+  'action #'helpful--disassemble
+  'follow-link t
+  'object nil
+  'help-echo "Show disassembled bytecode")
+
+(defun helpful--disassemble (button)
+  "Disassemble the current symbol."
+  ;; `disassemble' can handle both symbols (e.g. 'when) and raw
+  ;; byte-code objects.
+  (disassemble (button-get button 'object)))
+
+(define-button-type 'helpful-run-test-button
+  'action #'helpful--run-test
+  'follow-link t
+  'symbol nil
+  'help-echo "Run ERT test")
+
+(defun helpful--run-test (button)
+  "Disassemble the current symbol."
+  (ert (button-get button 'symbol)))
+
+(define-button-type 'helpful-edebug-button
+  'action #'helpful--edebug
+  'follow-link t
+  'symbol nil
+  'help-echo "Toggle edebug (re-evaluates definition)")
+
+(defun helpful--kbd-macro-p (sym)
+  "Is SYM a keyboard macro?"
+  (and (symbolp sym)
+       (let ((func (symbol-function sym)))
+         (or (stringp func)
+             (vectorp func)))))
+
+(defun helpful--edebug-p (sym)
+  "Does function SYM have its definition patched by edebug?"
+  (let ((fn-def (indirect-function sym)))
+    ;; Edebug replaces function source code with a sexp that has
+    ;; `edebug-enter', `edebug-after' etc interleaved. This means the
+    ;; function is interpreted, so `indirect-function' returns a list.
+    (when (and (consp fn-def) (consp (cdr fn-def)))
+      (-let [fn-end (-last-item fn-def)]
+        (and (consp fn-end)
+             (eq (car fn-end) 'edebug-enter))))))
+
+(defun helpful--can-edebug-p (sym callable-p buf pos)
+  "Can we use edebug with SYM?"
+  (and
+   ;; SYM must be a function.
+   callable-p
+   ;; The function cannot be a primitive, it must be defined in elisp.
+   (not (helpful--primitive-p sym callable-p))
+   ;; We need to be able to find its definition, or we can't step
+   ;; through the source.
+   buf pos))
+
+(defun helpful--toggle-edebug (sym)
+  "Enable edebug when function SYM is called,
+or disable if already enabled."
+  (-let ((should-edebug (not (helpful--edebug-p sym)))
+         ((buf pos created) (helpful--definition sym t)))
+    (if (and buf pos)
+        (progn
+          (with-current-buffer buf
+            (save-excursion
+              (save-restriction
+                (widen)
+                (goto-char pos)
+
+                (let* ((edebug-all-forms should-edebug)
+                       (edebug-all-defs should-edebug)
+                       (form (edebug-read-top-level-form)))
+                  ;; Based on `edebug-eval-defun'.
+                  (eval (eval-sexp-add-defvars form) lexical-binding)))))
+          ;; If we're enabling edebug, we need the source buffer to
+          ;; exist. Otherwise, we can clean it up.
+          (when (and created (not should-edebug))
+            (kill-buffer buf)))
+
+      (user-error "Could not find source for edebug"))))
+
+(defun helpful--edebug (button)
+  "Toggle edebug for the current symbol."
+  (helpful--toggle-edebug (button-get button 'symbol))
+  (helpful-update))
+
+(define-button-type 'helpful-trace-button
+  'action #'helpful--trace
+  'follow-link t
+  'symbol nil
+  'help-echo "Toggle function tracing")
+
+(defun helpful--trace (button)
+  "Toggle tracing for the current symbol."
+  (let ((sym (button-get button 'symbol)))
+    (if (trace-is-traced sym)
+        (untrace-function sym)
+      (trace-function sym)))
+  (helpful-update))
+
+(define-button-type 'helpful-navigate-button
+  'action #'helpful--navigate
+  'path nil
+  'position nil
+  'follow-link t
+  'help-echo "Navigate to definition")
+
+(defun helpful--goto-char-widen (pos)
+  "Move point to POS in the current buffer.
+If narrowing is in effect, widen if POS isn't in the narrowed area."
+  (when (or (< pos (point-min))
+            (> pos (point-max)))
+    (widen))
+  (goto-char pos))
+
+(defun helpful--navigate (button)
+  "Navigate to the path this BUTTON represents."
+  (find-file (substring-no-properties (button-get button 'path)))
+  ;; We use `get-text-property' to work around an Emacs 25 bug:
+  ;; http://git.savannah.gnu.org/cgit/emacs.git/commit/?id=f7c4bad17d83297ee9a1b57552b1944020f23aea
+  (-when-let (pos (get-text-property button 'position
+                                     (marker-buffer button)))
+    (helpful--goto-char-widen pos)))
+
+(defun helpful--navigate-button (text path &optional pos)
+  "Return a button that opens PATH and puts point at POS."
+  (helpful--button
+   text
+   'helpful-navigate-button
+   'path path
+   'position pos))
+
+(define-button-type 'helpful-buffer-button
+  'action #'helpful--switch-to-buffer
+  'buffer nil
+  'position nil
+  'follow-link t
+  'help-echo "Switch to this buffer")
+
+(defun helpful--switch-to-buffer (button)
+  "Navigate to the buffer this BUTTON represents."
+  (let ((buf (button-get button 'buffer))
+        (pos (button-get button 'position)))
+    (switch-to-buffer buf)
+    (when pos
+      (helpful--goto-char-widen pos))))
+
+(defun helpful--buffer-button (buffer &optional pos)
+  "Return a button that switches to BUFFER and puts point at POS."
+  (helpful--button
+   (buffer-name buffer)
+   'helpful-buffer-button
+   'buffer buffer
+   'position pos))
+
+(define-button-type 'helpful-customize-button
+  'action #'helpful--customize
+  'symbol nil
+  'follow-link t
+  'help-echo "Open Customize for this symbol")
+
+(defun helpful--customize (button)
+  "Open Customize for this symbol."
+  (customize-variable (button-get button 'symbol)))
+
+(define-button-type 'helpful-associated-buffer-button
+  'action #'helpful--associated-buffer
+  'symbol nil
+  'prompt-p nil
+  'follow-link t
+  'help-echo "Change associated buffer")
+
+(defun helpful--read-live-buffer (prompt predicate)
+  "Read a live buffer name, and return the buffer object.
+
+This is largely equivalent to `read-buffer', but counsel.el
+overrides that to include previously opened buffers."
+  (let* ((names (-map #'buffer-name (buffer-list)))
+         (default
+           (cond
+            ;; If we're already looking at a buffer-local value, start
+            ;; the prompt from the relevant buffer.
+            ((and helpful--associated-buffer
+                  (buffer-live-p helpful--associated-buffer))
+             (buffer-name helpful--associated-buffer))
+            ;; If we're looking at the global value, offer the initial
+            ;; buffer.
+            ((and helpful--start-buffer
+                  (buffer-live-p helpful--start-buffer))
+             (buffer-name helpful--start-buffer))
+            ;; If we're looking at the global value and have no initial
+            ;; buffer, choose the first normal buffer.
+            (t
+             (--first (and (not (s-starts-with-p " " it))
+                           (not (s-starts-with-p "*" it)))
+                      names))
+            )))
+    (get-buffer
+     (completing-read
+      prompt
+      names
+      predicate
+      t
+      nil
+      nil
+      default))))
+
+(defun helpful--associated-buffer (button)
+  "Change the associated buffer, so we can see buffer-local values."
+  (let ((sym (button-get button 'symbol))
+        (prompt-p (button-get button 'prompt-p)))
+    (if prompt-p
+        (setq helpful--associated-buffer
+              (helpful--read-live-buffer
+               "View variable in: "
+               (lambda (buf-name)
+                 (local-variable-p sym (get-buffer buf-name)))))
+      (setq helpful--associated-buffer nil)))
+  (helpful-update))
+
+(define-button-type 'helpful-toggle-button
+  'action #'helpful--toggle
+  'symbol nil
+  'buffer nil
+  'follow-link t
+  'help-echo "Toggle this symbol between t and nil")
+
+(defun helpful--toggle (button)
+  "Toggle the symbol between nil and t."
+  (let ((sym (button-get button 'symbol))
+        (buf (button-get button 'buffer)))
+    (save-current-buffer
+      ;; If this is a buffer-local variable, ensure we're in the right
+      ;; buffer.
+      (when buf
+        (set-buffer buf))
+      (set sym (not (symbol-value sym))))
+    (helpful-update)))
+
+(define-button-type 'helpful-set-button
+  'action #'helpful--set
+  'symbol nil
+  'buffer nil
+  'follow-link t
+  'help-echo "Set the value of this symbol")
+
+(defun helpful--set (button)
+  "Set the value of this symbol."
+  (let* ((sym (button-get button 'symbol))
+         (buf (button-get button 'buffer))
+         (sym-value (helpful--sym-value sym buf))
+         (set-func (if (local-variable-p sym buf)
+                       "setq"
+                     (symbol-name helpful-set-variable-function)))
+         ;; Inspired by `counsel-read-setq-expression'.
+         (expr
+          (minibuffer-with-setup-hook
+              (lambda ()
+                (add-function :before-until (local 'eldoc-documentation-function)
+                              #'elisp-eldoc-documentation-function)
+                (run-hooks 'eval-expression-minibuffer-setup-hook)
+                (goto-char (minibuffer-prompt-end))
+                (forward-char (length (format "(%s %S " set-func sym))))
+            (read-from-minibuffer
+             "Eval: "
+             (format
+              (if (or (consp sym-value)
+                      (and (symbolp sym-value)
+                           (not (null sym-value))
+                           (not (keywordp sym-value))))
+                  "(%s %s '%S)"
+                "(%s %s %S)")
+              set-func sym sym-value)
+             read-expression-map t
+             'read-expression-history))))
+    (save-current-buffer
+      ;; If this is a buffer-local variable, ensure we're in the right
+      ;; buffer.
+      (when buf
+        (set-buffer buf))
+      (eval-expression expr))
+    (helpful-update)))
+
+(define-button-type 'helpful-view-literal-button
+  'action #'helpful--view-literal
+  'help-echo "Toggle viewing as a literal")
+
+(defun helpful--view-literal (_button)
+  "Set the value of this symbol."
+  (setq helpful--view-literal
+        (not helpful--view-literal))
+  (helpful-update))
+
+(define-button-type 'helpful-all-references-button
+  'action #'helpful--all-references
+  'symbol nil
+  'callable-p nil
+  'follow-link t
+  'help-echo "Find all references to this symbol")
+
+(defun helpful--all-references (button)
+  "Find all the references to the symbol that this BUTTON represents."
+  (let ((sym (button-get button 'symbol))
+        (callable-p (button-get button 'callable-p)))
+    (cond
+     ((not callable-p)
+      (elisp-refs-variable sym))
+     ((functionp sym)
+      (elisp-refs-function sym))
+     ((macrop sym)
+      (elisp-refs-macro sym)))))
+
+(define-button-type 'helpful-callees-button
+  'action #'helpful--show-callees
+  'symbol nil
+  'source nil
+  'follow-link t
+  'help-echo "Find the functions called by this function/macro")
+
+(defun helpful--display-callee-group (callees)
+  "Insert every entry in CALLEES."
+  (dolist (sym (helpful--sort-symbols callees))
+    (insert "  "
+            (helpful--button
+             (symbol-name sym)
+             'helpful-describe-exactly-button
+             'symbol sym
+             'callable-p t)
+            "\n")))
+
+(defun helpful--show-callees (button)
+  "Find all the references to the symbol that this BUTTON represents."
+  (let* ((buf (get-buffer-create "*helpful callees*"))
+         (sym (button-get button 'symbol))
+         (raw-source (button-get button 'source))
+         (source
+          (if (stringp raw-source)
+              (read raw-source)
+            raw-source))
+         (syms (helpful--callees source))
+         (primitives (-filter (lambda (sym) (helpful--primitive-p sym t)) syms))
+         (compounds (-remove (lambda (sym) (helpful--primitive-p sym t)) syms)))
+
+    (pop-to-buffer buf)
+    (let ((inhibit-read-only t))
+      (erase-buffer)
+
+      ;; TODO: Macros used, special forms used, global vars used.
+      (insert (format "Functions called by %s:\n\n" sym))
+      (helpful--display-callee-group compounds)
+
+      (when primitives
+        (insert "\n")
+        (insert (format "Primitives called by %s:\n\n" sym))
+        (helpful--display-callee-group primitives))
+
+      (goto-char (point-min))
+
+      (helpful-mode))))
+
+(define-button-type 'helpful-manual-button
+  'action #'helpful--manual
+  'symbol nil
+  'follow-link t
+  'help-echo "View this symbol in the Emacs manual")
+
+(defun helpful--manual (button)
+  "Open the manual for the system that this BUTTON represents."
+  (let ((sym (button-get button 'symbol)))
+    (info-lookup 'symbol sym #'emacs-lisp-mode)))
+
+(define-button-type 'helpful-describe-button
+  'action #'helpful--describe
+  'symbol nil
+  'follow-link t
+  'help-echo "Describe this symbol")
+
+(defun helpful--describe (button)
+  "Describe the symbol that this BUTTON represents."
+  (let ((sym (button-get button 'symbol)))
+    (helpful-symbol sym)))
+
+(define-button-type 'helpful-describe-exactly-button
+  'action #'helpful--describe-exactly
+  'symbol nil
+  'callable-p nil
+  'follow-link t
+  'help-echo "Describe this symbol")
+
+(defun helpful--describe-exactly (button)
+  "Describe the symbol that this BUTTON represents.
+This differs from `helpful--describe' because here we know
+whether the symbol represents a variable or a callable."
+  (let ((sym (button-get button 'symbol))
+        (callable-p (button-get button 'callable-p)))
+    (if callable-p
+        (helpful-callable sym)
+      (helpful-variable sym))))
+
+(define-button-type 'helpful-info-button
+  'action #'helpful--info
+  'info-node nil
+  'follow-link t
+  'help-echo "View this Info node")
+
+(defun helpful--info (button)
+  "Describe the symbol that this BUTTON represents."
+  (info (button-get button 'info-node)))
+
+(define-button-type 'helpful-shortdoc-button
+  'action #'helpful--shortdoc
+  'info-node nil
+  'follow-link t
+  'help-echo "View this Shortdoc group")
+
+(defun helpful--shortdoc (button)
+  "Describe the symbol that this BUTTON represents."
+  (shortdoc-display-group (button-get button 'shortdoc-group)
+                          (button-get button 'symbol)))
+
+(defun helpful--split-first-line (docstring)
+  "If the first line is a standalone sentence, ensure we have a
+blank line afterwards."
+  (let* ((lines (s-lines docstring))
+         (first-line (-first-item lines))
+         (second-line (when (> (length lines) 1) (nth 1 lines))))
+    (if (and (s-ends-with-p "." first-line)
+             (stringp second-line)
+             (not (equal second-line "")))
+        (s-join "\n"
+                (-cons* first-line "" (cdr lines)))
+      docstring)))
+
+(defun helpful--propertize-sym-ref (sym-name before-txt after-txt)
+  "Given a symbol name from a docstring, convert to a button (if
+bound) or else highlight."
+  (let* ((sym (intern sym-name)))
+    (cond
+     ;; Highlight keywords.
+     ((s-matches-p
+       (rx ":"
+           symbol-start
+           (+? (or (syntax word) (syntax symbol)))
+           symbol-end)
+       sym-name)
+      (propertize sym-name
+                  'face 'font-lock-builtin-face))
+     ((and (boundp sym) (s-ends-with-p "variable " (downcase before-txt)))
+      (helpful--button
+       sym-name
+       'helpful-describe-exactly-button
+       'symbol sym
+       'callable-p nil))
+     ((and (fboundp sym)
+           (or
+            (s-starts-with-p " command" (downcase after-txt))
+            (s-ends-with-p "command " (downcase before-txt))
+            (s-ends-with-p "function " (downcase before-txt))))
+      (helpful--button
+       sym-name
+       'helpful-describe-exactly-button
+       'symbol sym
+       'callable-p t))
+     ;; Only create a link if this is a symbol that is bound as a
+     ;; variable or callable.
+     ((or (boundp sym) (fboundp sym))
+      (helpful--button
+       sym-name
+       'helpful-describe-button
+       'symbol sym))
+     ;; If this is already a button, don't modify it.
+     ((get-text-property 0 'button sym-name)
+      sym-name)
+     ;; Highlight the quoted string.
+     (t
+      (propertize sym-name
+                  'face 'font-lock-constant-face)))))
+
+(defun helpful--propertize-info (docstring)
+  "Convert info references in DOCSTRING to buttons."
+  (replace-regexp-in-string
+   ;; Replace all text that looks like a link to an Info page.
+   (rx (seq (group
+             bow
+             (any "Ii")
+             "nfo"
+             (one-or-more whitespace))
+            (group
+             (or "node" "anchor")
+             (one-or-more whitespace))
+            (any "'`‘")
+            (group
+             (one-or-more
+              (not (any "'’"))))
+            (any "'’")))
+   (lambda (it)
+     ;; info-name matches "[Ii]nfo ".
+     ;; space matches "node " or "anchor ".
+     ;; info-node has the form "(cl)Loop Facility".
+     (let ((info-name (match-string 1 it))
+           (space (match-string 2 it))
+           (info-node (match-string 3 it)))
+       ;; If the docstring doesn't specify a manual, assume the Emacs manual.
+       (save-match-data
+         (unless (string-match "^([^)]+)" info-node)
+           (setq info-node (concat "(emacs)" info-node))))
+       (concat
+        info-name
+        space
+        (helpful--button
+         info-node
+         'helpful-info-button
+         'info-node info-node))))
+   docstring
+   t t))
+
+(defun helpful--keymap-keys (keymap)
+  "Return all the keys and commands in KEYMAP.
+Flattens nested keymaps and follows remapped commands.
+
+Returns a list of pairs (KEYCODES COMMAND), where KEYCODES is a
+vector suitable for `key-description', and COMMAND is a smbol."
+  (cond
+   ;; Prefix keys.
+   ((and
+     (symbolp keymap)
+     (fboundp keymap)
+     ;; Prefix keys use a keymap in the function slot of a symbol.
+     (keymapp (symbol-function keymap)))
+    (helpful--keymap-keys (symbol-function keymap)))
+   ;; Other symbols or compiled functions mean we've reached a leaf,
+   ;; so this is a command we can call.
+   ((or
+     (symbolp keymap)
+     (functionp keymap)
+     ;; Strings or vectors mean a keyboard macro.
+     (stringp keymap)
+     (vectorp keymap))
+    `(([] ,keymap)))
+   ((stringp (car keymap))
+    (helpful--keymap-keys (cdr keymap)))
+   ;; Otherwise, recurse on the keys at this level of the keymap.
+   (t
+    (let (result)
+      (dolist (item (cdr keymap))
+        (cond
+         ((and (consp item)
+               (eq (car item) 'menu-bar))
+          ;; Skip menu bar items.
+          nil)
+         ;; Sparse keymaps are lists.
+         ((consp item)
+          (-let [(keycode . value) item]
+            (-each (helpful--keymap-keys value)
+              (-lambda ((keycodes command))
+                (push (list (vconcat (vector keycode) keycodes) command)
+                      result)))))
+         ;; Dense keymaps are char-tables.
+         ((char-table-p item)
+          (map-char-table
+           (lambda (keycode value)
+             (-each (helpful--keymap-keys value)
+               (-lambda ((keycodes command))
+                 (push (list (vconcat (vector keycode) keycodes) command)
+                       result))))
+           item))))
+      ;; For every command `new-func' mapped to a command `orig-func', show `new-func' with
+      ;; the key sequence for `orig-func'.
+      (setq result
+            (-map-when
+             (-lambda ((keycodes _))
+               (and (> (length keycodes) 1)
+                    (eq (elt keycodes 0) 'remap)))
+             (-lambda ((keycodes command))
+               (list
+                (where-is-internal (elt keycodes 1) global-map t)
+                command))
+             result))
+      ;; Preserve the original order of the keymap.
+      (nreverse result)))))
+
+(defun helpful--format-hook (hook-val)
+  "Given a list value assigned to a hook, format it with links to functions."
+  (let ((lines
+         (--map
+          (if (and (symbolp it) (fboundp it))
+              (helpful--button
+               (symbol-name it)
+               'helpful-describe-exactly-button
+               'symbol it
+               'callable-p t)
+            (helpful--syntax-highlight (helpful--pretty-print it)))
+          hook-val)))
+    (format "(%s)"
+            (s-join "\n " lines))))
+
+;; TODO: unlike `substitute-command-keys', this shows keybindings
+;; which are currently shadowed (e.g. a global minor mode map).
+(defun helpful--format-keymap (keymap)
+  "Format KEYMAP."
+  (let* ((keys-and-commands (helpful--keymap-keys keymap))
+         ;; Convert keycodes [27 i] to "C-M-i".
+         (keys (-map #'-first-item keys-and-commands))
+         ;; Add padding so all our strings are the same length.
+         (formatted-keys (-map #'key-description keys))
+         (max-formatted-length (-max (cons 0 (-map #'length formatted-keys))))
+         (aligned-keys (--map (s-pad-right (1+ max-formatted-length)
+                                           " " it)
+                              formatted-keys))
+         ;; Format commands as buttons.
+         (commands (-map (-lambda ((_ command)) command)
+                         keys-and-commands))
+         (formatted-commands
+          (--map
+           (cond
+            ((symbolp it)
+             (helpful--button
+              (symbol-name it)
+              'helpful-describe-button
+              'symbol it))
+            ((or (stringp it) (vectorp it))
+             "Keyboard Macro")
+            (t
+             "#<anonymous-function>"))
+           commands))
+         ;; Build lines for display.
+         (lines
+          (-map (-lambda ((key . command)) (format "%s %s" key command))
+                (-zip-pair aligned-keys formatted-commands))))
+    ;; The flattened keymap will have normal bindings first, and
+    ;; inherited bindings last. Sort so that we group by prefix.
+    (s-join "\n" (-sort #'string< lines))))
+
+(defun helpful--format-commands (str keymap)
+  "Replace all the \\[ references in STR with buttons."
+  (replace-regexp-in-string
+   ;; Text of the form \\[foo-command]
+   (rx "\\[" (group (+ (not (in "]")))) "]")
+   (lambda (it)
+     (let* ((button-face (if (>= emacs-major-version 28) 'help-key-binding 'button))
+            (symbol-name (match-string 1 it))
+            (symbol (intern symbol-name))
+            (key (where-is-internal symbol keymap t))
+            (key-description
+             (if key
+                 (key-description key)
+               (format "M-x %s" symbol-name))))
+       (helpful--button
+        key-description
+        'helpful-describe-exactly-button
+        'symbol symbol
+        'callable-p t
+        'face button-face)))
+   str
+   t
+   t))
+
+(defun helpful--chars-before (pos n)
+  "Return up to N chars before POS in the current buffer.
+The string may be shorter than N or empty if out-of-range."
+  (buffer-substring
+   (max (point-min) (- pos n))
+   pos))
+
+(defun helpful--chars-after (pos n)
+  "Return up to N chars after POS in the current buffer.
+The string may be shorter than N or empty if out-of-range."
+  (buffer-substring
+   pos
+   (min (point-max) (+ pos n))))
+
+(defun helpful--format-command-keys (docstring)
+  "Convert command key references and keymap references
+in DOCSTRING to buttons.
+
+Emacs uses \\= to escape \\[ references, so replace that
+unescaping too."
+  ;; Loosely based on `substitute-command-keys', but converts
+  ;; references to buttons.
+  (let ((keymap nil))
+    (with-temp-buffer
+      (insert docstring)
+      (goto-char (point-min))
+      (while (not (eobp))
+        (cond
+         ((looking-at
+           ;; Text of the form "foo"
+           (rx "\""))
+          ;; For literal strings, escape backslashes so our output
+          ;; shows copy-pasteable literals.
+          (let* ((start-pos (point))
+                 (end-pos (progn (forward-char) (search-forward "\"" nil t)))
+                 contents)
+            (if end-pos
+                (progn
+                  (setq contents (buffer-substring start-pos end-pos))
+                  (delete-region start-pos end-pos)
+                  (insert (s-replace "\\" "\\\\" contents)))
+              (forward-char 1))))
+         ((looking-at
+           ;; Text of the form \=X
+           (rx "\\="))
+          ;; Remove the escaping, then step over the escaped char.
+          ;; Step over the escaped character.
+          (delete-region (point) (+ (point) 2))
+          (forward-char 1))
+         ((looking-at
+           ;; Text of the form `foo'
+           (rx "`"))
+          (let* ((start-pos (point))
+                 (end-pos (search-forward "'" nil t))
+                 (contents
+                  (when end-pos
+                    (buffer-substring (1+ start-pos) (1- end-pos)))))
+            (cond
+             ((null contents)
+              ;; If there's no closing ' to match the opening `, just
+              ;; leave it.
+              (goto-char (1+ start-pos)))
+             ((s-contains-p "`" contents)
+              ;; If we have repeated backticks `foo `bar', leave the
+              ;; first one.
+              (goto-char (1+ start-pos)))
+             ((s-contains-p "\\[" contents)
+              (delete-region start-pos end-pos)
+              (insert (helpful--format-commands contents keymap)))
+             ;; Highlight a normal `foo', extracting the surrounding
+             ;; text so we can detect e.g. "function `foo'".
+             (t
+              (let ((before (helpful--chars-before start-pos 10))
+                    (after (helpful--chars-after end-pos 10)))
+                (delete-region start-pos end-pos)
+                (insert (helpful--propertize-sym-ref contents before after)))))))
+         ((looking-at
+           ;; Text of the form \\<foo-keymap>
+           (rx "\\<" (group (+ (not (in ">")))) ">"
+               (? "\n")))
+          (let* ((symbol-with-parens (match-string 0))
+                 (symbol-name (match-string 1)))
+            ;; Remove the original string.
+            (delete-region (point)
+                           (+ (point) (length symbol-with-parens)))
+            ;; Set the new keymap.
+            (setq keymap (symbol-value (intern symbol-name)))))
+         ((looking-at
+           ;; Text of the form \\{foo-mode-map}
+           (rx "\\{" (group (+ (not (in "}")))) "}"))
+          (let* ((symbol-with-parens (match-string 0))
+                 (symbol-name (match-string 1))
+                 (keymap
+                  ;; Gracefully handle variables not being defined.
+                  (ignore-errors
+                    (symbol-value (intern symbol-name)))))
+            ;; Remove the original string.
+            (delete-region (point)
+                           (+ (point) (length symbol-with-parens)))
+            (if keymap
+                (insert (helpful--format-keymap keymap))
+              (insert (format "Keymap %s is not currently defined."
+                              symbol-name)))))
+         ((looking-at
+           ;; Text of the form \\[foo-command]
+           (rx "\\[" (group (+ (not (in "]")))) "]"))
+          (let* ((symbol-with-parens (match-string 0)))
+            ;; Remove the original string.
+            (delete-region (point)
+                           (+ (point) (length symbol-with-parens)))
+            ;; Add a button.
+            (insert (helpful--format-commands symbol-with-parens keymap))))
+         ;; Don't modify other characters.
+         (t
+          (forward-char 1))))
+      (buffer-string))))
+
+;; TODO: fix upstream Emacs bug that means `-map' is not highlighted
+;; in the docstring for `--map'.
+(defun helpful--format-docstring (docstring)
+  "Replace cross-references with links in DOCSTRING."
+  (-> docstring
+      (helpful--split-first-line)
+      (helpful--propertize-info)
+      (helpful--propertize-links)
+      (helpful--propertize-bare-links)
+      (helpful--format-command-keys)
+      (s-trim)))
+
+(define-button-type 'helpful-link-button
+  'action #'helpful--follow-link
+  'follow-link t
+  'help-echo "Follow this link")
+
+(defun helpful--propertize-links (docstring)
+  "Convert URL links in docstrings to buttons."
+  (replace-regexp-in-string
+   (rx "URL `" (group (*? any)) "'")
+   (lambda (match)
+     (let ((url (match-string 1 match)))
+       (concat "URL "
+               (helpful--button
+                url
+                'helpful-link-button
+                'url url))))
+   docstring))
+
+(defun helpful--propertize-bare-links (docstring)
+  "Convert URL links in docstrings to buttons."
+  (replace-regexp-in-string
+   (rx (group (or string-start space "<"))
+       (group "http" (? "s") "://" (+? (not (any space))))
+       (group (? (any "." ">" ")"))
+              (or space string-end ">")))
+   (lambda (match)
+     (let ((space-before (match-string 1 match))
+           (url (match-string 2 match))
+           (after (match-string 3 match)))
+       (concat
+        space-before
+        (helpful--button
+         url
+         'helpful-link-button
+         'url url)
+        after)))
+   docstring))
+
+(defun helpful--follow-link (button)
+  "Follow the URL specified by BUTTON."
+  (browse-url (button-get button 'url)))
+
+(defconst helpful--highlighting-funcs
+  '(ert--activate-font-lock-keywords
+    highlight-quoted-mode
+    rainbow-delimiters-mode)
+  "Highlighting functions that are safe to run in a temporary buffer.
+This is used in `helpful--syntax-highlight' to support extra
+highlighting that the user may have configured in their mode
+hooks.")
+
+;; TODO: crashes on `backtrace-frame' on a recent checkout.
+
+(defun helpful--syntax-highlight (source &optional mode)
+  "Return a propertized version of SOURCE in MODE."
+  (unless mode
+    (setq mode #'emacs-lisp-mode))
+  (if (or
+       (< (length source) helpful-max-highlight)
+       (eq mode 'emacs-lisp-mode))
+      (with-temp-buffer
+        (insert source)
+
+        ;; Switch to major-mode MODE, but don't run any hooks.
+        (delay-mode-hooks (funcall mode))
+
+        ;; `delayed-mode-hooks' contains mode hooks like
+        ;; `emacs-lisp-mode-hook'. Build a list of functions that are run
+        ;; when the mode hooks run.
+        (let (hook-funcs)
+          (dolist (hook delayed-mode-hooks)
+            (let ((funcs (symbol-value hook)))
+              (setq hook-funcs (append hook-funcs funcs))))
+
+          ;; Filter hooks to those that relate to highlighting, and run them.
+          (setq hook-funcs (-intersection hook-funcs helpful--highlighting-funcs))
+          (-map #'funcall hook-funcs))
+
+        (if (fboundp 'font-lock-ensure)
+            (font-lock-ensure)
+          (with-no-warnings
+            (font-lock-fontify-buffer)))
+        (buffer-string))
+    ;; SOURCE was too long to highlight in a reasonable amount of
+    ;; time.
+    (concat
+     (propertize
+      "// Skipping highlighting due to "
+      'face 'font-lock-comment-face)
+     (helpful--button
+      "helpful-max-highlight"
+      'helpful-describe-exactly-button
+      'symbol 'helpful-max-highlight
+      'callable-p nil)
+     (propertize
+      ".\n"
+      'face 'font-lock-comment-face)
+     source)))
+
+(defun helpful--source (sym callable-p buf pos)
+  "Return the source code of SYM.
+If the source code cannot be found, return the sexp used."
+  (catch 'source
+    (unless (symbolp sym)
+      (throw 'source sym))
+
+    (let ((source nil))
+      (when (and buf pos)
+        (with-current-buffer buf
+          (save-excursion
+            (save-restriction
+              (goto-char pos)
+
+              (if (and (helpful--primitive-p sym callable-p)
+                       (not callable-p))
+                  ;; For variables defined in .c files, only show the
+                  ;; DEFVAR expression rather than the huge containing
+                  ;; function.
+                  (progn
+                    (setq pos (line-beginning-position))
+                    ;; HACK Use the elisp syntax table even though the file is a
+                    ;; C file. This is a temporary workaround for issue #329.
+                    (with-syntax-table emacs-lisp-mode-syntax-table
+                      (forward-list))
+                    (forward-char)
+                    (narrow-to-region pos (point)))
+                ;; Narrow to the top-level definition.
+                (let ((parse-sexp-ignore-comments t))
+                  (narrow-to-defun t)))
+
+              ;; If there was a preceding comment, POS will be
+              ;; after that comment. Move the position to include that comment.
+              (setq pos (point-min))
+
+              (setq source (buffer-substring-no-properties (point-min) (point-max))))))
+        (setq source (s-trim-right source))
+        (when (and source (buffer-file-name buf))
+          (setq source (propertize source
+                                   'helpful-path (buffer-file-name buf)
+                                   'helpful-pos pos
+                                   'helpful-pos-is-start t)))
+        (throw 'source source)))
+
+    (when callable-p
+      ;; Could not find source -- probably defined interactively, or via
+      ;; a macro, or file has changed.
+      ;; TODO: verify that the source hasn't changed before showing.
+      ;; TODO: offer to download C sources for current version.
+      (throw 'source (indirect-function sym)))))
+
+(defun helpful--has-shortdoc-p (sym)
+  "Return non-nil if shortdoc.el is available and SYM is in a shortdoc group."
+  (and (featurep 'shortdoc)
+       (shortdoc-function-groups sym)))
+
+(defun helpful--in-manual-p (sym)
+  "Return non-nil if SYM is in an Info manual."
+  (let ((completions
+         (cl-letf (((symbol-function #'message)
+                    (lambda (_format-string &rest _args))))
+           (info-lookup->completions 'symbol 'emacs-lisp-mode))))
+    (-when-let (buf (get-buffer " temp-info-look"))
+      (kill-buffer buf))
+    (or (assoc sym completions)
+        (assoc-string sym completions))))
+
+(defun helpful--version-info (sym)
+  "If SYM has version information, format and return it.
+Return nil otherwise."
+  (when (symbolp sym)
+    (let ((package-version
+           (get sym 'custom-package-version))
+          (emacs-version
+           (get sym 'custom-version)))
+      (cond
+       (package-version
+        (format
+         "This variable was added, or its default value changed, in %s version %s."
+         (or (car-safe package-version) "unknown")
+         (or (cdr-safe package-version) "unknown")))
+       (emacs-version
+        (format
+         "This variable was added, or its default value changed, in Emacs %s."
+         emacs-version))))))
+
+(defun helpful--library-path (library-name)
+  "Find the absolute path for the source of LIBRARY-NAME.
+
+LIBRARY-NAME takes the form \"foo.el\" , \"foo.el\" or
+\"src/foo.c\".
+
+If .elc files exist without the corresponding .el, return nil."
+  (when (member (f-ext library-name) '("c" "rs"))
+    (setq library-name
+          (f-expand library-name
+                    (f-parent find-function-C-source-directory))))
+  (condition-case nil
+      (find-library-name library-name)
+    (error nil)))
+
+(defun helpful--macroexpand-try (form)
+  "Try to fully macroexpand FORM.
+If it fails, attempt to partially macroexpand FORM."
+  (catch 'result
+    (ignore-errors
+      ;; Happy path: we can fully expand the form.
+      (throw 'result (macroexpand-all form)))
+    (ignore-errors
+      ;; Attempt one level of macroexpansion.
+      (throw 'result (macroexpand-1 form)))
+    ;; Fallback: just return the original form.
+    form))
+
+(defun helpful--tree-any-p (pred tree)
+  "Walk TREE, applying PRED to every subtree.
+Return t if PRED ever returns t."
+  (catch 'found
+    (let ((stack (list tree)))
+      (while stack
+        (let ((next (pop stack)))
+          (cond
+           ((funcall pred next)
+            (throw 'found t))
+           ((consp next)
+            (push (car next) stack)
+            (push (cdr next) stack))))))
+    nil))
+
+(defun helpful--find-by-macroexpanding (buf sym callable-p)
+  "Search BUF for the definition of SYM by macroexpanding
+interesting forms in BUF."
+  (catch 'found
+    (with-current-buffer buf
+      (save-excursion
+        (goto-char (point-min))
+        (condition-case nil
+            (while t
+              (let ((form (read (current-buffer)))
+                    (var-def-p
+                     (lambda (sexp)
+                       (and (eq (car-safe sexp) 'defvar)
+                            (eq (car-safe (cdr sexp)) sym))))
+                    (fn-def-p
+                     (lambda (sexp)
+                       ;; `defun' ultimately expands to `defalias'.
+                       (and (eq (car-safe sexp) 'defalias)
+                            (equal (car-safe (cdr sexp)) `(quote ,sym))))))
+                (setq form (helpful--macroexpand-try form))
+
+                (when (helpful--tree-any-p
+                       (if callable-p fn-def-p var-def-p)
+                       form)
+                  ;; `read' puts point at the end of the form, so go
+                  ;; back to the start.
+                  (throw 'found (scan-sexps (point) -1)))))
+          (end-of-file nil))))))
+
+(defun helpful--open-if-needed (path)
+  "Return a list (BUF OPENED) where BUF is a buffer visiting PATH.
+If a buffer already exists, return that. If not, open PATH with
+the `emacs-lisp-mode' syntax table active but skip any hooks."
+  (let ((initial-buffers (buffer-list))
+        (buf nil)
+        (opened nil)
+        ;; Skip running hooks that may prompt the user.
+        (find-file-hook nil)
+        ;; If we end up opening a buffer, don't bother with file
+        ;; variables. It prompts the user, and we discard the buffer
+        ;; afterwards anyway.
+        (enable-local-variables nil))
+    ;; Opening large .c files can be slow (e.g. when looking at
+    ;; `defalias'), especially if the user has configured mode hooks.
+    ;;
+    ;; Bind `auto-mode-alist' to nil, so we open the buffer in
+    ;; `fundamental-mode' if it isn't already open.
+    (let ((auto-mode-alist nil))
+      (setq buf (find-file-noselect path)))
+
+    (unless (-contains-p initial-buffers buf)
+      (setq opened t)
+
+      (let ((syntax-table emacs-lisp-mode-syntax-table))
+        (when (s-ends-with-p ".c" path)
+          (setq syntax-table (make-syntax-table))
+          (c-populate-syntax-table syntax-table))
+
+        ;; If it's a freshly opened buffer, we need to set the syntax
+        ;; table so we can search correctly.
+        (with-current-buffer buf
+          (set-syntax-table syntax-table))))
+
+    (list buf opened)))
+
+(defun helpful--definition (sym callable-p)
+  "Return a list (BUF POS OPENED) where SYM is defined.
+
+BUF is the buffer containing the definition. If the user wasn't
+already visiting this buffer, OPENED is t and callers should kill
+the buffer when done.
+
+POS is the position of the start of the definition within the
+buffer."
+  (let ((primitive-p (helpful--primitive-p sym callable-p))
+        (library-name nil)
+        (src-path nil)
+        (buf nil)
+        (pos nil)
+        (opened nil))
+    ;; We shouldn't be called on primitive functions if we don't have
+    ;; a directory of Emacs C sourcecode.
+    (cl-assert
+     (or find-function-C-source-directory
+         (not primitive-p)))
+
+    (when (symbolp sym)
+      (if callable-p
+          (setq library-name (cdr (find-function-library sym)))
+        ;; Based on `find-variable-noselect'.
+        (setq library-name
+              (or
+               (symbol-file sym 'defvar)
+               (help-C-file-name sym 'var)))))
+
+    (when library-name
+      (setq src-path (helpful--library-path library-name)))
+
+    (cond
+     ((and (not (symbolp sym)) (functionp sym))
+      (list nil nil nil))
+     ((and callable-p library-name)
+      (when src-path
+        (-let [(src-buf src-opened) (helpful--open-if-needed src-path)]
+          (setq buf src-buf)
+          (setq opened src-opened))
+
+        ;; Based on `find-function-noselect'.
+        (with-current-buffer buf
+          ;; `find-function-search-for-symbol' moves point. Prevent
+          ;; that.
+          (save-excursion
+            ;; Narrowing has been fixed upstream:
+            ;; http://git.savannah.gnu.org/cgit/emacs.git/commit/?id=abd18254aec76b26e86ae27e91d2c916ec20cc46
+            (save-restriction
+              (widen)
+              (setq pos
+                    (cdr (find-function-search-for-symbol sym nil library-name))))))
+        ;; If we found the containing buffer, but not the symbol, attempt
+        ;; to find it by macroexpanding interesting forms.
+        (when (and buf (not pos))
+          (setq pos (helpful--find-by-macroexpanding buf sym t)))))
+     ;; A function, but no file found.
+     (callable-p
+      ;; Functions defined interactively may have an edebug property
+      ;; that contains the location of the definition.
+      (-when-let (edebug-info (get sym 'edebug))
+        (-let [marker (if (consp edebug-info)
+                          (car edebug-info)
+                        edebug-info)]
+          (setq buf (marker-buffer marker))
+          (setq pos (marker-position marker)))))
+     ((and (not callable-p) src-path)
+      (-let [(src-buf src-opened) (helpful--open-if-needed src-path)]
+        (setq buf src-buf)
+        (setq opened src-opened)
+
+        (with-current-buffer buf
+          ;; `find-function-search-for-symbol' moves point. Prevent
+          ;; that.
+          (save-excursion
+            (condition-case _err
+                (setq pos (cdr (find-variable-noselect sym library-name)))
+              (search-failed nil)
+              ;; If your current Emacs instance doesn't match the source
+              ;; code configured in find-function-C-source-directory, we can
+              ;; get an error about not finding source. Try
+              ;; `default-tab-width' against Emacs trunk.
+              (error nil)))))))
+
+    (list buf pos opened)))
+
+(defun helpful--reference-positions (sym callable-p buf)
+  "Return all the buffer positions of references to SYM in BUF."
+  (-let* ((forms-and-bufs
+           (elisp-refs--search-1
+            (list buf)
+            (lambda (buf)
+              (elisp-refs--read-and-find
+               buf sym
+               (if callable-p
+                   #'elisp-refs--function-p
+                 #'elisp-refs--variable-p)))))
+          ;; Since we only searched one buffer, we know that
+          ;; forms-and-bufs has only one item.
+          (forms-and-buf (-first-item forms-and-bufs))
+          ((forms . _buf) forms-and-buf))
+    (-map
+     (-lambda ((_code start-pos _end-pos)) start-pos)
+     forms)))
+
+(defun helpful--all-keymap-syms ()
+  "Return all keymaps defined in this Emacs instance."
+  (let (keymaps)
+    (mapatoms
+     (lambda (sym)
+       (when (and (boundp sym) (keymapp (symbol-value sym)))
+         (push sym keymaps))))
+    keymaps))
+
+(defun helpful--key-sequences (command-sym keymap global-keycodes)
+  "Return all the key sequences of COMMAND-SYM in KEYMAP."
+  (let* ((keycodes
+          ;; Look up this command in the keymap, its parent and the
+          ;; global map. We need to include the global map to find
+          ;; remapped commands.
+          (where-is-internal command-sym keymap nil t))
+         ;; Look up this command in the parent keymap.
+         (parent-keymap (keymap-parent keymap))
+         (parent-keycodes
+          (when parent-keymap
+            (where-is-internal
+             command-sym (list parent-keymap) nil t)))
+         ;; Look up this command in the global map.
+         (global-keycodes
+          (unless (eq keymap global-map)
+            global-keycodes)))
+    (->> keycodes
+         ;; Ignore keybindings from the parent or global map.
+         (--remove (or (-contains-p global-keycodes it)
+                       (-contains-p parent-keycodes it)))
+         ;; Convert raw keycode vectors into human-readable strings.
+         (-map #'key-description))))
+
+(defun helpful--keymaps-containing (command-sym)
+  "Return a list of pairs listing keymap names that contain COMMAND-SYM,
+along with the keybindings in each keymap.
+
+Keymap names are typically variable names, but may also be
+descriptions of values in `minor-mode-map-alist'.
+
+We ignore keybindings that are menu items, and ignore keybindings
+from parent keymaps.
+
+`widget-global-map' is also ignored as it generally contains the
+same bindings as `global-map'."
+  (let* ((keymap-syms (helpful--all-keymap-syms))
+         (keymap-sym-vals (-map #'symbol-value keymap-syms))
+         (global-keycodes (where-is-internal
+                           command-sym (list global-map) nil t))
+         matching-keymaps)
+    ;; Look for this command in all keymaps bound to variables.
+    (-map
+     (-lambda ((keymap-sym . keymap))
+       (let ((key-sequences (helpful--key-sequences command-sym keymap global-keycodes)))
+         (when (and key-sequences (not (eq keymap-sym 'widget-global-map)))
+           (push (cons (symbol-name keymap-sym) key-sequences)
+                 matching-keymaps))))
+     (-zip-pair keymap-syms keymap-sym-vals))
+
+    ;; Look for this command in keymaps used by minor modes that
+    ;; aren't bound to variables.
+    (-map
+     (-lambda ((minor-mode . keymap))
+       ;; Only consider this keymap if we didn't find it bound to a variable.
+       (when (and (keymapp keymap)
+                  (not (memq keymap keymap-sym-vals)))
+         (let ((key-sequences (helpful--key-sequences command-sym keymap global-keycodes)))
+           (when key-sequences
+             (push (cons (format "minor-mode-map-alist (%s)" minor-mode)
+                         key-sequences)
+                   matching-keymaps)))))
+     ;; TODO: examine `minor-mode-overriding-map-alist' too.
+     minor-mode-map-alist)
+
+    matching-keymaps))
+
+(defun helpful--merge-alists (l1 l2)
+  "Given two alists mapping symbols to lists, return a single
+alist with the lists concatenated."
+  (let* ((l1-keys (-map #'-first-item l1))
+         (l2-keys (-map #'-first-item l2))
+         (l2-extra-keys (-difference l2-keys l1-keys))
+         (l2-extra-values
+          (--map (assoc it l2) l2-extra-keys))
+         (l1-with-values
+          (-map (-lambda ((key . values))
+                  (cons key (append values
+                                    (cdr (assoc key l2)))))
+                l1)))
+    (append l1-with-values l2-extra-values)))
+
+(defun helpful--keymaps-containing-aliases (command-sym aliases)
+  "Return a list of pairs mapping keymap symbols to the
+keybindings for COMMAND-SYM in each keymap.
+
+Includes keybindings for aliases, unlike
+`helpful--keymaps-containing'."
+  (let* ((syms (cons command-sym aliases))
+         (syms-keymaps (-map #'helpful--keymaps-containing syms)))
+    (-reduce #'helpful--merge-alists syms-keymaps)))
+
+(defun helpful--format-keys (command-sym aliases)
+  "Describe all the keys that call COMMAND-SYM."
+  (let (mode-lines
+        global-lines)
+    (--each (helpful--keymaps-containing-aliases command-sym aliases)
+      (-let [(map . keys) it]
+        (dolist (key keys)
+          (push
+           (format "%s %s"
+                   (propertize map 'face 'font-lock-variable-name-face)
+                   (if (>= emacs-major-version 28)
+                       (propertize key 'face 'help-key-binding)
+                     key))
+           (if (eq map 'global-map) global-lines mode-lines)))))
+    (setq global-lines (-sort #'string< global-lines))
+    (setq mode-lines (-sort #'string< mode-lines))
+    (-let [lines (-concat global-lines mode-lines)]
+      (if lines
+          (s-join "\n" lines)
+        "This command is not in any keymaps."))))
+
+(defun helpful--outer-sexp (buf pos)
+  "Find position POS in BUF, and return the name of the outer sexp,
+along with its position.
+
+Moves point in BUF."
+  (with-current-buffer buf
+    (goto-char pos)
+    (let* ((ppss (syntax-ppss))
+           (outer-sexp-posns (nth 9 ppss)))
+      (when outer-sexp-posns
+        (goto-char (car outer-sexp-posns))))
+    (list (point) (-take 2 (read buf)))))
+
+(defun helpful--count-values (items)
+  "Return an alist of the count of each value in ITEMS.
+E.g. (x x y z y) -> ((x . 2) (y . 2) (z . 1))"
+  (let (counts)
+    (dolist (item items (nreverse counts))
+      (-if-let (item-and-count (assoc item counts))
+          (setcdr item-and-count (1+ (cdr item-and-count)))
+        (push (cons item 1) counts)))))
+
+(defun helpful--without-advice (sym)
+  "Given advised function SYM, return the function object
+without the advice. Assumes function has been loaded."
+  (advice--cd*r
+   (advice--symbol-function sym)))
+
+(defun helpful--advised-p (sym)
+  "Does SYM have advice associated with it?"
+  (and (symbolp sym)
+       (advice--p (advice--symbol-function sym))))
+
+(defun helpful--format-head (head)
+  "Given a 'head' (the first two symbols of a sexp) format and
+syntax highlight it."
+  (-let* (((def name) head)
+          (formatted-name
+           (if (and (consp name) (eq (car name) 'quote))
+               (format "'%S" (cadr name))
+             (format "%S" name)))
+          (formatted-def
+           (format "(%s %s ...)" def formatted-name))
+          )
+    (helpful--syntax-highlight formatted-def)))
+
+(defun helpful--format-reference (head longest-head ref-count position path)
+  "Return a syntax-highlighted version of HEAD, with a link
+to its source location."
+  (let ((formatted-count
+         (format "%d reference%s"
+                 ref-count (if (> ref-count 1) "s" ""))))
+    (propertize
+     (format
+      "%s %s"
+      (s-pad-right longest-head " " (helpful--format-head head))
+      (propertize formatted-count 'face 'font-lock-comment-face))
+     'helpful-path path
+     'helpful-pos position)))
+
+(defun helpful--format-position-heads (position-heads path)
+  "Given a list of outer sexps, format them for display.
+POSITION-HEADS takes the form ((123 (defun foo)) (456 (defun bar)))."
+  (let ((longest-head
+         (->> position-heads
+              (-map (-lambda ((_pos head)) (helpful--format-head head)))
+              (-map #'length)
+              (-max))))
+    (->> (helpful--count-values position-heads)
+         (-map (-lambda (((pos head) . count))
+                 (helpful--format-reference head longest-head count pos path)))
+         (s-join "\n"))))
+
+(defun helpful--primitive-p (sym callable-p)
+  "Return t if SYM is defined in C."
+  (let ((subrp (if (fboundp 'subr-primitive-p)
+                   #'subr-primitive-p
+                 #'subrp)))
+    (cond
+     ((and callable-p (helpful--advised-p sym))
+      (funcall subrp (helpful--without-advice sym)))
+     (callable-p
+      (funcall subrp (indirect-function sym)))
+     (t
+      (let ((filename (find-lisp-object-file-name sym 'defvar)))
+        (or (eq filename 'C-source)
+            (and (stringp filename)
+                 (let ((ext (file-name-extension filename)))
+                   (or (equal ext "c")
+                       (equal ext "rs"))))))))))
+
+(defun helpful--sym-value (sym buf)
+  "Return the value of SYM in BUF."
+  (cond
+   ;; If we're given a buffer, look up the variable in that buffer.
+   (buf
+    (with-current-buffer buf
+      (symbol-value sym)))
+   ;; If we don't have a buffer, and this is a buffer-local variable,
+   ;; ensure we return the default value.
+   ((local-variable-if-set-p sym)
+    (default-value sym))
+   ;; Otherwise, just return the value in the current buffer, which is
+   ;; the global value.
+   (t
+    (symbol-value sym))))
+
+(defun helpful--insert-section-break ()
+  "Insert section break into helpful buffer."
+  (insert "\n\n"))
+
+(defun helpful--insert-implementations ()
+  "When `helpful--sym' is a generic method, insert its implementations."
+  (let ((func helpful--sym)
+        (content))
+    (when (fboundp #'cl--generic-describe)
+      (with-temp-buffer
+        (declare-function cl--generic-describe "cl-generic" (function))
+        (cl--generic-describe func)
+        (goto-char (point-min))
+        (when (re-search-forward "^Implementations:$" nil t)
+          (setq content (buffer-substring (point) (point-max)))))
+      (when content
+        (helpful--insert-section-break)
+        (insert (helpful--heading "Implementations") (s-trim content))))))
+
+(defun helpful--calculate-references (sym callable-p source-path)
+  "Calculate references for SYM in SOURCE-PATH."
+  (when source-path
+    (let* ((primitive-p (helpful--primitive-p sym callable-p))
+           (buf (elisp-refs--contents-buffer source-path))
+           (positions
+            (if primitive-p
+                nil
+              (helpful--reference-positions
+               helpful--sym helpful--callable-p buf)))
+           (return-value (--map (helpful--outer-sexp buf it) positions)))
+      (kill-buffer buf)
+      return-value)))
+
+(defun helpful--make-shortdoc-sentence (sym)
+  "Make a line for shortdoc groups of SYM."
+  (when (featurep 'shortdoc)
+    (-when-let (groups (--map (helpful--button
+                               (symbol-name it)
+                               'helpful-shortdoc-button
+                               'shortdoc-group it)
+                              (shortdoc-function-groups sym)))
+      (if (= 1 (length groups))
+          (format "Other relevant functions are documented in the %s group."
+                  (car groups))
+        (format "Other relevant functions are documented in the %s groups."
+                (concat (s-join ", " (butlast groups))
+                        " and " (car (last groups))))))))
+
+(defun helpful--make-manual-button (sym)
+  "Make manual button for SYM."
+  (helpful--button
+   "View in manual"
+   'helpful-manual-button
+   'symbol sym))
+
+(defun helpful--make-toggle-button (sym buffer)
+  "Make toggle button for SYM in BUFFER."
+  (helpful--button
+   "Toggle"
+   'helpful-toggle-button
+   'symbol sym
+   'buffer buffer))
+
+(defun helpful--make-set-button (sym buffer)
+  "Make set button for SYM in BUFFER."
+  (helpful--button
+   "Set"
+   'helpful-set-button
+   'symbol sym
+   'buffer buffer))
+
+(defun helpful--make-toggle-literal-button ()
+  "Make set button for SYM in BUFFER."
+  (helpful--button
+   (if helpful--view-literal
+       ;; TODO: only offer for strings that have newlines, tabs or
+       ;; properties.
+       "Pretty view"
+     "View as literal")
+   'helpful-view-literal-button))
+
+(defun helpful--make-customize-button (sym)
+  "Make customize button for SYM."
+  (helpful--button
+   "Customize"
+   'helpful-customize-button
+   'symbol sym))
+
+(defun helpful--make-references-button (sym callable-p)
+  "Make references button for SYM."
+  (helpful--button
+   "Find all references"
+   'helpful-all-references-button
+   'symbol sym
+   'callable-p callable-p))
+
+(defun helpful--make-edebug-button (sym)
+  "Make edebug button for SYM."
+  (helpful--button
+   (format "%s edebug"
+           (if (helpful--edebug-p sym)
+               "Disable" "Enable"))
+   'helpful-edebug-button
+   'symbol sym))
+
+(defun helpful--make-tracing-button (sym)
+  "Make tracing button for SYM."
+  (helpful--button
+   (format "%s tracing"
+           (if (trace-is-traced sym)
+               "Disable" "Enable"))
+   'helpful-trace-button
+   'symbol sym))
+
+(defun helpful--make-disassemble-button (obj)
+  "Make disassemble button for OBJ.
+OBJ may be a symbol or a compiled function object."
+  (helpful--button
+   "Disassemble"
+   'helpful-disassemble-button
+   'object obj))
+
+(defun helpful--make-run-test-button (sym)
+  "Make an ERT test button for SYM."
+  (helpful--button
+   "Run test"
+   'helpful-run-test-button
+   'symbol sym))
+
+(defun helpful--make-forget-button (sym callable-p)
+  "Make forget button for SYM."
+  (helpful--button
+   "Forget"
+   'helpful-forget-button
+   'symbol sym
+   'callable-p callable-p))
+
+(defun helpful--make-callees-button (sym source)
+  (helpful--button
+   (format "Functions used by %s" sym)
+   'helpful-callees-button
+   'symbol sym
+   'source source))
+
+;; TODO: this only reports if a function is autoloaded because we
+;; autoloaded it. This ignores newly defined functions that are
+;; autoloaded. Built-in help has this limitation too, but if we can
+;; find the source, we should instead see if there's an autoload
+;; cookie.
+(defun helpful--autoloaded-p (sym buf)
+  "Return non-nil if function SYM is autoloaded."
+  (-when-let (file-name (buffer-file-name buf))
+    (setq file-name (s-chop-suffix ".gz" file-name))
+    (condition-case nil
+        (help-fns--autoloaded-p sym file-name)
+      ; new in Emacs 29.0.50
+      ; see https://github.com/Wilfred/helpful/pull/283
+      (error (help-fns--autoloaded-p sym)))))
+
+(defun helpful--compiled-p (sym)
+  "Return non-nil if function SYM is byte-compiled"
+  (and (symbolp sym)
+       (byte-code-function-p (symbol-function sym))))
+
+(defun helpful--native-compiled-p (sym)
+  "Return non-nil if function SYM is native-compiled"
+  (and (symbolp sym)
+       (fboundp 'subr-native-elisp-p)
+       (subr-native-elisp-p (symbol-function sym))))
+
+(defun helpful--join-and (items)
+  "Join a list of strings with commas and \"and\"."
+  (cond
+   ((= (length items) 0)
+    "")
+   ((= (length items) 1)
+    (car items))
+   (t
+    (format "%s and %s"
+            (s-join ", " (-drop-last 1 items))
+            (-last-item items)))))
+
+(defun helpful--summary (sym callable-p buf pos)
+  "Return a one sentence summary for SYM."
+  (-let* ((primitive-p (helpful--primitive-p sym callable-p))
+          (canonical-sym (helpful--canonical-symbol sym callable-p))
+          (alias-p (not (eq canonical-sym sym)))
+          (alias-button
+           (if callable-p
+               ;; Show a link to 'defalias' in the manual.
+               (helpful--button
+                "function alias"
+                'helpful-manual-button
+                'symbol 'defalias)
+             ;; Show a link to the variable aliases section in the
+             ;; manual.
+             (helpful--button
+              "alias"
+              'helpful-info-button
+              'info-node "(elisp)Variable Aliases")))
+          (special-form-button
+           (helpful--button
+            "special form"
+            'helpful-info-button
+            'info-node "(elisp)Special Forms"))
+          (user-option-button
+           (helpful--button
+            "customizable"
+            'helpful-info-button
+            'info-node "(elisp)Variable Definitions"))
+          (keyboard-macro-button
+           (helpful--button
+            "keyboard macro"
+            'helpful-info-button
+            'info-node "(elisp)Keyboard Macros"))
+          (interactive-button
+           (helpful--button
+            "interactive"
+            'helpful-info-button
+            'info-node "(elisp)Using Interactive"))
+          (autoload-button
+           (helpful--button
+            "autoloaded"
+            'helpful-info-button
+            'info-node "(elisp)Autoload"))
+          (compiled-button
+           (helpful--button
+            "byte-compiled"
+            'helpful-info-button
+            'info-node "(elisp)Byte Compilation"))
+          (native-compiled-button
+           (helpful--button
+            "natively compiled"
+            'helpful-describe-button
+            'symbol 'native-compile))
+          (buffer-local-button
+           (helpful--button
+            "buffer-local"
+            'helpful-info-button
+            'info-node "(elisp)Buffer-Local Variables"))
+          (autoloaded-p
+           (and callable-p buf (helpful--autoloaded-p sym buf)))
+          (compiled-p
+           (and callable-p (helpful--compiled-p sym)))
+          (native-compiled-p
+           (and callable-p (helpful--native-compiled-p sym)))
+          (buttons
+           (list
+            (if alias-p alias-button)
+            (if (and callable-p autoloaded-p) autoload-button)
+            (if (and callable-p (commandp sym)) interactive-button)
+            (if compiled-p compiled-button)
+            (if native-compiled-p native-compiled-button)
+            (if (and (not callable-p) (custom-variable-p sym))
+                user-option-button)
+            (if (and (not callable-p) (local-variable-if-set-p sym))
+                buffer-local-button)))
+          (description
+           (helpful--join-and (-non-nil buttons)))
+          (kind
+           (cond
+            ((special-form-p sym)
+             special-form-button)
+            (alias-p
+             (format "for %s,"
+                     (helpful--button
+                      (symbol-name canonical-sym)
+                      'helpful-describe-exactly-button
+                      'symbol canonical-sym
+                      'callable-p callable-p)))
+            ((not callable-p) "variable")
+            ((macrop sym) "macro")
+            ((helpful--kbd-macro-p sym) keyboard-macro-button)
+            (t "function")))
+          (defined
+            (cond
+             (buf
+              (let ((path (buffer-file-name buf)))
+                (if path
+                    (format
+                     "defined in %s"
+                     (helpful--navigate-button
+                      (file-name-nondirectory path) path pos))
+                  (format "defined in buffer %s"
+                          (helpful--buffer-button buf pos)))))
+             (primitive-p
+              "defined in C source code")
+             ((helpful--kbd-macro-p sym) nil)
+             (t
+              "without a source file"))))
+
+    (s-word-wrap
+     70
+     (format "%s is %s %s %s%s."
+             (if (symbolp sym)
+                 (helpful--format-symbol sym)
+               "This lambda")
+             (if (string-match-p
+                  (rx bos (or "a" "e" "i" "o" "u"))
+                  description)
+                 "an"
+               "a")
+             description
+             kind
+             (if defined (concat " " defined) "")))))
+
+(defun helpful--callees (form)
+  "Given source code FORM, return a list of all the functions called."
+  (let* ((expanded-form (macroexpand-all form))
+         ;; Find all the functions called after macro expansion.
+         (all-fns (helpful--callees-1 expanded-form))
+         ;; Only consider the functions that were in the original code
+         ;; before macro expansion.
+         (form-syms (-filter #'symbolp (-flatten form)))
+         (form-fns (--filter (memq it form-syms) all-fns)))
+    (-distinct form-fns)))
+
+(defun helpful--callees-1 (form)
+  "Return a list of all the functions called in FORM.
+Assumes FORM has been macro expanded. The returned list
+may contain duplicates."
+  (cond
+   ((not (consp form))
+    nil)
+   ;; See `(elisp)Special Forms'. For these special forms, we recurse
+   ;; just like functions but ignore the car.
+   ((memq (car form) '(and catch defconst defvar if interactive
+                           or prog1 prog2 progn save-current-buffer
+                           save-restriction setq setq-default
+                           track-mouse unwind-protect while))
+    (-flatten
+     (-map #'helpful--callees-1 (cdr form))))
+
+   ((eq (car form) 'cond)
+    (let* ((clauses (cdr form))
+           (clause-fns
+            ;; Each clause is a list of forms.
+            (--map
+             (-map #'helpful--callees-1 it) clauses)))
+      (-flatten clause-fns)))
+
+   ((eq (car form) 'condition-case)
+    (let* ((protected-form (nth 2 form))
+           (protected-form-fns (helpful--callees-1 protected-form))
+           (handlers (-drop 3 form))
+           (handler-bodies (-map #'cdr handlers))
+           (handler-fns
+            (--map
+             (-map #'helpful--callees-1 it) handler-bodies)))
+      (append
+       protected-form-fns
+       (-flatten handler-fns))))
+
+   ;; Calling a function with a well known higher order function, for
+   ;; example (funcall 'foo 1 2).
+   ((and
+     (memq (car form) '(funcall apply call-interactively
+                                mapcar mapc mapconcat -map))
+     (eq (car-safe (nth 1 form)) 'quote))
+    (cons
+     (cadr (nth 1 form))
+     (-flatten
+      (-map #'helpful--callees-1 (cdr form)))))
+
+   ((eq (car form) 'function)
+    (let ((arg (nth 1 form)))
+      (if (symbolp arg)
+          ;; #'foo, which is the same as (function foo), is a function
+          ;; reference.
+          (list arg)
+        ;; Handle (function (lambda ...)).
+        (helpful--callees-1 arg))))
+
+   ((eq (car form) 'lambda)
+    ;; Only consider the body, not the param list.
+    (-flatten (-map #'helpful--callees-1 (-drop 2 form))))
+
+   ((eq (car form) 'closure)
+    ;; Same as lambda, but has an additional argument of the
+    ;; closed-over variables.
+    (-flatten (-map #'helpful--callees-1 (-drop 3 form))))
+
+   ((memq (car form) '(let let*))
+    ;; Extract function calls used to set the let-bound variables.
+    (let* ((var-vals (-second-item form))
+           (var-val-callees
+            (--map
+             (if (consp it)
+                 (-map #'helpful--callees-1 it)
+               nil)
+             var-vals)))
+      (append
+       (-flatten var-val-callees)
+       ;; Function calls in the let body.
+       (-map #'helpful--callees-1 (-drop 2 form)))))
+
+   ((eq (car form) 'quote)
+    nil)
+   (t
+    (cons
+     (car form)
+     (-flatten
+      (-map #'helpful--callees-1 (cdr form)))))))
+
+(defun helpful--ensure-loaded ()
+  "Ensure the symbol associated with the current buffer has been loaded."
+  (when (and helpful--callable-p
+             (symbolp helpful--sym))
+    (let ((fn-obj (symbol-function helpful--sym)))
+      (when (autoloadp fn-obj)
+        (autoload-do-load fn-obj)))))
+
+(defun helpful--hook-p (symbol value)
+  "Does SYMBOL look like a hook?"
+  (and
+   (or
+    (s-ends-with-p "-hook" (symbol-name symbol))
+    ;; E.g. `after-change-functions', which can be used with
+    ;; `add-hook'.
+    (s-ends-with-p "-functions" (symbol-name symbol)))
+   (consp value)))
+
+(defun helpful--format-value (sym value)
+  "Format VALUE as a string."
+  (cond
+   (helpful--view-literal
+    (helpful--syntax-highlight (helpful--pretty-print value)))
+   ;; Allow strings to be viewed with properties rendered in
+   ;; Emacs, rather than as a literal.
+   ((stringp value)
+    value)
+   ;; Allow keymaps to be viewed with keybindings shown and
+   ;; links to the commands bound.
+   ((keymapp value)
+    (helpful--format-keymap value))
+   ((helpful--hook-p sym value)
+    (helpful--format-hook value))
+   (t
+    (helpful--pretty-print value))))
+
+(defun helpful--original-value (sym)
+  "Return the original value for SYM, if any.
+
+If SYM has an original value, return it in a list. Return nil
+otherwise."
+  (let* ((orig-val-expr (get sym 'standard-value)))
+    (when (consp orig-val-expr)
+      (ignore-errors
+        (list
+         (eval (car orig-val-expr)))))))
+
+(defun helpful--original-value-differs-p (sym)
+  "Return t if SYM has an original value, and its current
+value is different."
+  (let ((orig-val-list (helpful--original-value sym)))
+    (and (consp orig-val-list)
+         (not (eq (car orig-val-list)
+                  (symbol-value sym))))))
+
+(defun helpful-update ()
+  "Update the current *Helpful* buffer to the latest
+state of the current symbol."
+  (interactive)
+  (cl-assert (not (null helpful--sym)))
+  (unless (buffer-live-p helpful--associated-buffer)
+    (setq helpful--associated-buffer nil))
+  (helpful--ensure-loaded)
+  (-let* ((val
+           ;; Look at the value before setting `inhibit-read-only', so
+           ;; users can see the correct value of that variable.
+           (unless helpful--callable-p
+             (helpful--sym-value helpful--sym helpful--associated-buffer)))
+          (inhibit-read-only t)
+          (start-line (line-number-at-pos))
+          (start-column (current-column))
+          (primitive-p (helpful--primitive-p helpful--sym helpful--callable-p))
+          (canonical-sym (helpful--canonical-symbol helpful--sym helpful--callable-p))
+          (look-for-src (or (not primitive-p)
+                            find-function-C-source-directory))
+          ((buf pos opened)
+           (if look-for-src
+               (helpful--definition helpful--sym helpful--callable-p)
+             '(nil nil nil)))
+          (source (when look-for-src
+                    (helpful--source helpful--sym helpful--callable-p buf pos)))
+          (source-path (when buf
+                         (buffer-file-name buf)))
+          (references (helpful--calculate-references
+                       helpful--sym helpful--callable-p
+                       source-path))
+          (aliases (helpful--aliases helpful--sym helpful--callable-p)))
+
+    (erase-buffer)
+
+    (insert (helpful--summary helpful--sym helpful--callable-p buf pos))
+
+    (when (helpful--obsolete-info helpful--sym helpful--callable-p)
+      (insert
+       "\n\n"
+       (helpful--format-obsolete-info helpful--sym helpful--callable-p)))
+
+    (when (and helpful--callable-p
+               (not (helpful--kbd-macro-p helpful--sym)))
+      (helpful--insert-section-break)
+      (insert
+       (helpful--heading "Signature")
+       (helpful--syntax-highlight (helpful--signature helpful--sym))))
+
+    (when (not helpful--callable-p)
+      (helpful--insert-section-break)
+      (let* ((sym helpful--sym)
+             (multiple-views-p
+              (or (stringp val)
+                  (keymapp val)
+                  (helpful--hook-p sym val))))
+        (when helpful--first-display
+          (if (stringp val)
+              ;; For strings, it's more intuitive to display them as
+              ;; literals, so "1" and 1 are distinct.
+              (setq helpful--view-literal t)
+            ;; For everything else, prefer the pretty view if available.
+            (setq helpful--view-literal nil)))
+        (insert
+         (helpful--heading
+          (cond
+           ;; Buffer-local variable and we're looking at the value in
+           ;; a specific buffer.
+           ((and
+             helpful--associated-buffer
+             (local-variable-p sym helpful--associated-buffer))
+            (format "Value in %s"
+                    (helpful--button
+                     (format "#<buffer %s>" (buffer-name helpful--associated-buffer))
+                     'helpful-buffer-button
+                     'buffer helpful--associated-buffer
+                     'position pos)))
+           ;; Buffer-local variable but default/global value.
+           ((local-variable-if-set-p sym)
+            "Global Value")
+           ;; This variable is not buffer-local.
+           (t "Value")))
+         (helpful--format-value sym val)
+         "\n\n")
+        (when (helpful--original-value-differs-p sym)
+          (insert
+           (helpful--heading "Original Value")
+           (helpful--format-value
+            sym
+            (car (helpful--original-value sym)))
+           "\n\n"))
+        (when multiple-views-p
+          (insert (helpful--make-toggle-literal-button) " "))
+
+        (when (local-variable-if-set-p sym)
+          (insert
+           (helpful--button
+            "Buffer values"
+            'helpful-associated-buffer-button
+            'symbol sym
+            'prompt-p t)
+           " "
+           (helpful--button
+            "Global value"
+            'helpful-associated-buffer-button
+            'symbol sym
+            'prompt-p nil)
+           " "))
+        (when (memq (helpful--sym-value helpful--sym helpful--associated-buffer) '(nil t))
+          (insert (helpful--make-toggle-button helpful--sym helpful--associated-buffer) " "))
+        (insert (helpful--make-set-button helpful--sym helpful--associated-buffer))
+        (when (custom-variable-p helpful--sym)
+          (insert " " (helpful--make-customize-button helpful--sym)))))
+
+    (let ((docstring (helpful--docstring helpful--sym helpful--callable-p))
+          (version-info (unless helpful--callable-p
+                          (helpful--version-info helpful--sym))))
+      (when (or docstring version-info)
+        (helpful--insert-section-break)
+        (insert
+         (helpful--heading "Documentation"))
+        (when docstring
+          (insert (helpful--format-docstring docstring)))
+        (when version-info
+          (insert "\n\n" (s-word-wrap 70 version-info)))
+        (when (and (symbolp helpful--sym)
+                   helpful--callable-p
+                   (helpful--has-shortdoc-p helpful--sym))
+          (insert "\n\n")
+          (insert (helpful--make-shortdoc-sentence helpful--sym)))
+        (when (and (symbolp helpful--sym) (helpful--in-manual-p helpful--sym))
+          (insert "\n\n")
+          (insert (helpful--make-manual-button helpful--sym)))))
+
+    ;; Show keybindings.
+    ;; TODO: allow users to conveniently add and remove keybindings.
+    (when (commandp helpful--sym)
+      (helpful--insert-section-break)
+      (insert
+       (helpful--heading "Key Bindings")
+       (helpful--format-keys helpful--sym aliases)))
+
+    (helpful--insert-section-break)
+
+    (insert
+     (helpful--heading "References")
+     (let ((src-button
+            (when source-path
+              (helpful--navigate-button
+               (file-name-nondirectory source-path)
+               source-path
+               (or pos
+                   0)))))
+       (cond
+        ((and source-path references)
+         (format "References in %s:\n%s"
+                 src-button
+                 (helpful--format-position-heads references source-path)))
+        ((and source-path primitive-p)
+         (format
+          "Finding references in a .%s file is not supported."
+          (f-ext source-path)))
+        (source-path
+         (format "%s is unused in %s."
+                 helpful--sym
+                 src-button))
+        ((and primitive-p (null find-function-C-source-directory))
+         "C code is not yet loaded.")
+        (t
+         "Could not find source file.")))
+     "\n\n"
+     (helpful--make-references-button helpful--sym helpful--callable-p))
+
+    (when (and
+           helpful--callable-p
+           (symbolp helpful--sym)
+           source
+           (not primitive-p))
+      (insert
+       " "
+       (helpful--make-callees-button helpful--sym source)))
+
+    (when (helpful--advised-p helpful--sym)
+      (helpful--insert-section-break)
+      (insert
+       (helpful--heading "Advice")
+       (format "This %s is advised."
+               (if (macrop helpful--sym) "macro" "function"))))
+
+    (let ((can-edebug
+           (helpful--can-edebug-p helpful--sym helpful--callable-p buf pos))
+          (can-trace
+           (and (symbolp helpful--sym)
+                helpful--callable-p
+                ;; Tracing uses advice, and you can't apply advice to
+                ;; primitive functions that are replaced with special
+                ;; opcodes. For example, `narrow-to-region'.
+                (not (plist-get (symbol-plist helpful--sym) 'byte-opcode))))
+          (can-disassemble
+           (and helpful--callable-p (not primitive-p)))
+          (can-forget
+           (and (not (special-form-p helpful--sym))
+                (not primitive-p))))
+      (when (or can-edebug can-trace can-disassemble can-forget)
+        (helpful--insert-section-break)
+        (insert (helpful--heading "Debugging")))
+      (when can-edebug
+        (insert
+         (helpful--make-edebug-button helpful--sym)))
+      (when can-trace
+        (when can-edebug
+          (insert " "))
+        (insert
+         (helpful--make-tracing-button helpful--sym)))
+
+      (when (and
+             (or can-edebug can-trace)
+             (or can-disassemble can-forget))
+        (insert "\n"))
+
+      (when can-disassemble
+        (insert (helpful--make-disassemble-button helpful--sym)))
+
+      (when can-forget
+        (when can-disassemble
+          (insert " "))
+        (insert (helpful--make-forget-button helpful--sym helpful--callable-p))))
+
+    (when aliases
+      (helpful--insert-section-break)
+      (insert
+       (helpful--heading "Aliases")
+       (s-join "\n" (--map (helpful--format-alias it helpful--callable-p)
+                           aliases))))
+
+    (when helpful--callable-p
+      (helpful--insert-implementations))
+
+    (helpful--insert-section-break)
+
+    (when (or source-path primitive-p)
+      (insert
+       (helpful--heading
+        (if (eq helpful--sym canonical-sym)
+            "Source Code"
+          "Alias Source Code"))
+       (cond
+        (source-path
+         (concat
+          (propertize (format "%s Defined in " (if primitive-p "//" ";;"))
+                      'face 'font-lock-comment-face)
+          (helpful--navigate-button
+           (f-abbrev source-path)
+           source-path
+           pos)
+          "\n"))
+        (primitive-p
+         (concat
+          (propertize
+           "C code is not yet loaded."
+           'face 'font-lock-comment-face)
+          "\n\n"
+          (helpful--button
+           "Set C source directory"
+           'helpful-c-source-directory))))))
+    (when source
+      (insert
+       (cond
+        ((stringp source)
+         (let ((mode (when primitive-p
+                       (pcase (file-name-extension source-path)
+                         ("c" 'c-mode)
+                         ("rs" (when (fboundp 'rust-mode) 'rust-mode))))))
+           (helpful--syntax-highlight source mode)))
+        ((and (consp source) (eq (car source) 'closure))
+         (helpful--syntax-highlight
+          (concat ";; Closure converted to defun by helpful.\n"
+                  (helpful--pretty-print
+                   (helpful--format-closure helpful--sym source)))))
+        (t
+         (helpful--syntax-highlight
+          (concat
+           (if (eq helpful--sym canonical-sym)
+               ";; Could not find source code, showing raw function object.\n"
+             ";; Could not find alias source code, showing raw function object.\n")
+           (helpful--pretty-print source)))))))
+
+    (helpful--insert-section-break)
+
+    (-when-let (formatted-props (helpful--format-properties helpful--sym))
+      (insert
+       (helpful--heading "Symbol Properties")
+       formatted-props))
+
+    (goto-char (point-min))
+    (forward-line (1- start-line))
+    (forward-char start-column)
+    (setq helpful--first-display nil)
+
+    (when opened
+      (kill-buffer buf))))
+
+;; TODO: this isn't sufficient for `edebug-eval-defun'.
+(defun helpful--skip-advice (docstring)
+  "Remove mentions of advice from DOCSTRING."
+  (let* ((lines (s-lines docstring))
+         (relevant-lines
+          (--drop-while
+           (or (s-starts-with-p ":around advice:" it)
+               (s-starts-with-p "This function has :around advice:" it))
+           lines)))
+    (s-trim (s-join "\n" relevant-lines))))
+
+(defun helpful--format-argument (arg)
+  "Format ARG (a symbol) according to Emacs help conventions."
+  (let ((arg-str (symbol-name arg)))
+    (if (s-starts-with-p "&" arg-str)
+        arg-str
+      (s-upcase arg-str))))
+
+(defun helpful--format-symbol (sym)
+  "Format symbol as a string, escaping as necessary."
+  ;; Arguably this is an Emacs bug. We should be able to use
+  ;; (format "%S" sym)
+  ;; but that converts foo? to "foo\\?". You can see this in other
+  ;; parts of the Emacs UI, such as ERT.
+  (s-replace " " "\\ " (format "%s" sym)))
+
+;; TODO: this is broken for -any?.
+(defun helpful--signature (sym)
+  "Get the signature for function SYM, as a string.
+For example, \"(some-func FOO &optional BAR)\"."
+  (let (docstring-sig
+        source-sig
+        (advertised-args
+         (when (symbolp sym)
+           (gethash (symbol-function sym) advertised-signature-table))))
+    ;; Get the usage from the function definition.
+    (let* ((function-args
+            (cond
+             ((symbolp sym)
+              (help-function-arglist sym))
+             ((or (byte-code-function-p sym)
+                  (if (fboundp 'interpreted-function-p)
+                      (interpreted-function-p sym)))
+              ;; argdesc can be a list of arguments or an integer
+              ;; encoding the min/max number of arguments. See
+              ;; Byte-Code Function Objects in the elisp manual.
+              (let ((argdesc (aref sym 0)))
+                (if (consp argdesc)
+                    argdesc
+                  ;; TODO: properly handle argdesc values.
+                  nil)))
+             (t
+              ;; Interpreted function (lambda ...)
+              (cadr sym))))
+           (formatted-args
+            (cond
+             (advertised-args
+              (-map #'helpful--format-argument advertised-args))
+             ((listp function-args)
+              (-map #'helpful--format-argument function-args))
+             (t
+              (list function-args)))))
+      (setq source-sig
+            (cond
+             ;; If it's a function object, just show the arguments.
+             ((not (symbolp sym))
+              (format "(%s)"
+                      (s-join " " formatted-args)))
+             ;; If it has multiple arguments, join them with spaces.
+             (formatted-args
+              (format "(%s %s)"
+                      (helpful--format-symbol sym)
+                      (s-join " " formatted-args)))
+             ;; Otherwise, this function takes no arguments when called.
+             (t
+              (format "(%s)" (helpful--format-symbol sym))))))
+
+    ;; If the docstring ends with (fn FOO BAR), extract that.
+    (-when-let (docstring (documentation sym))
+      (-when-let (docstring-with-usage (help-split-fundoc docstring sym))
+        (setq docstring-sig (car docstring-with-usage))))
+
+    (cond
+     ;; Advertised signature always wins.
+     (advertised-args
+      source-sig)
+     ;; If that's not set, use the usage specification in the
+     ;; docstring, if present.
+     (docstring-sig
+      (replace-regexp-in-string "\\\\=\\(['\\`‘’]\\)" "\\1" docstring-sig t))
+     (t
+      ;; Otherwise, just use the signature from the source code.
+      source-sig))))
+
+(defun helpful--format-obsolete-info (sym callable-p)
+  (-let [(use _ date) (helpful--obsolete-info sym callable-p)]
+    (helpful--format-docstring
+     (s-word-wrap
+      70
+      (format "This %s is obsolete%s%s"
+              (helpful--kind-name sym callable-p)
+              (if date (format " since %s" date)
+                "")
+              (cond ((stringp use) (concat "; " use))
+                    (use (format "; use `%s' instead." use))
+                    (t ".")))))))
+
+(defun helpful--docstring (sym callable-p)
+  "Get the docstring for SYM.
+Note that this returns the raw docstring, including \\=\\=
+escapes that are used by `substitute-command-keys'."
+  (let ((text-quoting-style 'grave)
+        docstring)
+    (if callable-p
+        (progn
+          (setq docstring (documentation sym t))
+          (-when-let (docstring-with-usage (help-split-fundoc docstring sym))
+            (setq docstring (cdr docstring-with-usage))
+            (when docstring
+              ;; Advice mutates the docstring, see
+              ;; `advice--make-docstring'. Undo that.
+              ;; TODO: Only do this if the function is advised.
+              (setq docstring (helpful--skip-advice docstring)))))
+      (setq docstring
+            (documentation-property sym 'variable-documentation t)))
+    docstring))
+
+(defun helpful--read-symbol (prompt default-val predicate)
+  "Read a symbol from the minibuffer, with completion.
+Returns the symbol."
+  (when (and default-val
+             (not (funcall predicate default-val)))
+    (setq default-val nil))
+  (when default-val
+    ;; `completing-read' expects a string.
+    (setq default-val (symbol-name default-val))
+
+    ;; TODO: Only modify the prompt when we don't have ido/ivy/helm,
+    ;; because the default is obvious for them.
+    (setq prompt
+          (replace-regexp-in-string
+           (rx ": " eos)
+           (format " (default: %s): " default-val)
+           prompt)))
+  (intern (completing-read prompt obarray
+                           predicate t nil nil
+                           default-val)))
+
+(defun helpful--update-and-switch-buffer (symbol callable-p)
+  "Update and switch to help buffer for SYMBOL."
+  (let ((buf (helpful--buffer symbol callable-p)))
+    (with-current-buffer buf
+      (helpful-update))
+    (funcall helpful-switch-buffer-function buf)))
+
+;;;###autoload
+(defun helpful-function (symbol)
+  "Show help for function named SYMBOL.
+
+See also `helpful-macro', `helpful-command' and `helpful-callable'."
+  (interactive
+   (list (helpful--read-symbol
+          "Function: "
+          (helpful--callable-at-point)
+          #'functionp)))
+  (helpful--update-and-switch-buffer symbol t))
+
+;;;###autoload
+(defun helpful-command (symbol)
+  "Show help for interactive function named SYMBOL.
+
+See also `helpful-function'."
+  (interactive
+   (list (helpful--read-symbol
+          "Command: "
+          (helpful--callable-at-point)
+          #'commandp)))
+  (helpful--update-and-switch-buffer symbol t))
+
+;;;###autoload
+(defun helpful-key (key-sequence)
+  "Show help for interactive command bound to KEY-SEQUENCE."
+  (interactive
+   (list (read-key-sequence "Press key: ")))
+  (let ((sym (key-binding key-sequence)))
+    (cond
+     ((null sym)
+      (user-error "No command is bound to %s"
+                  (key-description key-sequence)))
+     ((commandp sym t)
+      (helpful--update-and-switch-buffer sym t))
+     (t
+      (user-error "%s is bound to %s which is not a command"
+                  (key-description key-sequence)
+                  sym)))))
+
+;;;###autoload
+(defun helpful-macro (symbol)
+  "Show help for macro named SYMBOL."
+  (interactive
+   (list (helpful--read-symbol
+          "Macro: "
+          (helpful--callable-at-point)
+          #'macrop)))
+  (helpful--update-and-switch-buffer symbol t))
+
+;;;###autoload
+(defun helpful-callable (symbol)
+  "Show help for function, macro or special form named SYMBOL.
+
+See also `helpful-macro', `helpful-function' and `helpful-command'."
+  (interactive
+   (list (helpful--read-symbol
+          "Callable: "
+          (helpful--callable-at-point)
+          #'fboundp)))
+  (helpful--update-and-switch-buffer symbol t))
+
+(defun helpful--variable-p (symbol)
+  "Return non-nil if SYMBOL is a variable."
+  (or (get symbol 'variable-documentation)
+      (and (boundp symbol)
+           (not (keywordp symbol))
+           (not (eq symbol nil))
+           (not (eq symbol t)))))
+
+(defun helpful--bound-p (symbol)
+  "Return non-nil if SYMBOL is a variable, callable, or face.
+
+This differs from `boundp' because we do not consider nil, t
+or :foo."
+  (or (fboundp symbol)
+      (helpful--variable-p symbol)
+      (facep symbol)))
+
+(defun helpful--bookmark-jump (bookmark)
+  "Create and switch to helpful bookmark BOOKMARK."
+  (let ((callable-p (bookmark-prop-get bookmark 'callable-p))
+        (sym (bookmark-prop-get bookmark 'sym))
+        (position (bookmark-prop-get bookmark 'position)))
+    (if callable-p
+        (helpful-callable sym)
+      (helpful-variable sym))
+    (goto-char position)))
+
+(defun helpful--bookmark-make-record ()
+  "Create a bookmark record for helpful buffers.
+
+See docs of `bookmark-make-record-function'."
+  `((sym . ,helpful--sym)
+    (callable-p . ,helpful--callable-p)
+    (position    . ,(point))
+    (handler     . helpful--bookmark-jump)))
+
+(defun helpful--convert-c-name (symbol var)
+  "Convert SYMBOL from a C name to an Elisp name.
+E.g. convert `Fmake_string' to `make-string' or
+`Vgc_cons_percentage' to `gc-cons-percentage'. Interpret
+SYMBOL as variable name if VAR, else a function name. Return
+nil if SYMBOL doesn't begin with \"F\" or \"V\"."
+  (let ((string (symbol-name symbol))
+        (prefix (if var "V" "F")))
+    (when (s-starts-with-p prefix string)
+      (intern
+       (s-chop-prefix
+        prefix
+        (s-replace "_" "-" string))))))
+
+(defun helpful--disambiguate (sym choices)
+  "Prompt the user to disambiguate SYM via a `read-char-choice' selection.
+
+CHOICES is a list of tuples of the form (FN DESC CHAR), where
+
+  CHAR is the input character associated with the choice
+  DESC is a short description of the choice to display in the prompt.
+  FN is the function being chosen, which takes SYM as an argument.
+
+For instance, the choice (#'helpful-variable \"[v]ariable\" ?v)
+calls (helpful-variable SYM) when the key `v' is pressed in the prompt."
+  (let* ((prompt (format "%s is ambiguous: describe %s ?"
+                         (propertize (symbol-name sym) 'face font-lock-keyword-face)
+                         (mapconcat (-lambda ((_ desc _)) desc)
+                                    choices " / ")))
+         (chars (mapcar (-lambda ((_ _ char)) char)
+                        choices))
+         (lookup (mapcar (-lambda ((fn _ char)) (cons char fn))
+                         choices))
+         (input (read-char-choice prompt chars)))
+    (funcall (alist-get input lookup) sym)))
+
+;;;###autoload
+(defun helpful-symbol (symbol)
+  "Show help for SYMBOL, a variable, function, macro, or face.
+
+See also `helpful-callable' and `helpful-variable'."
+  (interactive
+   (list (helpful--read-symbol
+          "Symbol: "
+          (helpful--symbol-at-point)
+          #'helpful--bound-p)))
+  (let (choices)
+    (when-let (c-var-sym (helpful--convert-c-name symbol t))
+      (push (list (lambda (_) (helpful-variable c-var-sym))
+                  "c-style [V]ariable" ?V)
+            choices))
+    (when-let (c-fn-sym (helpful--convert-c-name symbol nil))
+      (push (list (lambda (_) (helpful-callable c-fn-sym))
+                  "c-style [F]unction" ?F)
+            choices))
+    (when (fboundp symbol)
+      (push (list #'helpful-callable "[c]allable" ?c) choices))
+    (when (boundp symbol)
+      (push (list #'helpful-variable "[v]ariable" ?v) choices))
+    (when (facep symbol)
+      (push (list (lambda (face)
+                    (describe-face face)
+                    (funcall helpful-switch-buffer-function (help-buffer)))
+                  "[f]ace" ?f)
+            choices))
+    (cond
+     ((null choices)
+      (user-error "Not bound: %S" symbol))
+     ((= 1 (length choices))
+      (funcall (caar choices) symbol))
+     (t (helpful--disambiguate symbol choices)))))
+
+;;;###autoload
+(defun helpful-variable (symbol)
+  "Show help for variable named SYMBOL."
+  (interactive
+   (list (helpful--read-symbol
+          "Variable: "
+          (helpful--variable-at-point)
+          #'helpful--variable-p)))
+  (helpful--update-and-switch-buffer symbol nil))
+
+(defun helpful--variable-at-point-exactly ()
+  "Return the symbol at point, if it's a bound variable."
+  (let ((var (variable-at-point)))
+    ;; `variable-at-point' uses 0 rather than nil to signify no symbol
+    ;; at point (presumably because 'nil is a symbol).
+    (unless (symbolp var)
+      (setq var nil))
+    (when (helpful--variable-p var)
+      var)))
+
+(defun helpful--variable-defined-at-point ()
+  "Return the variable defined in the form enclosing point."
+  ;; TODO: do the same thing if point is just before a top-level form.
+  (save-excursion
+    (save-restriction
+      (widen)
+      (let* ((ppss (syntax-ppss))
+             (sexp-start (nth 1 ppss))
+             sexp)
+        (when sexp-start
+          (goto-char sexp-start)
+          (setq sexp (condition-case nil
+                         (read (current-buffer))
+                       (error nil)))
+          (when (memq (car-safe sexp)
+                      (list 'defvar 'defvar-local 'defcustom 'defconst))
+            (nth 1 sexp)))))))
+
+(defun helpful--variable-at-point ()
+  "Return the variable exactly under point, or defined at point."
+  (let ((var (helpful--variable-at-point-exactly)))
+    (if var
+        var
+      (let ((var (helpful--variable-defined-at-point)))
+        (when (helpful--variable-p var)
+          var)))))
+
+(defun helpful--callable-at-point ()
+  (let ((sym (symbol-at-point))
+        (enclosing-sym (function-called-at-point)))
+    (if (fboundp sym)
+        sym
+      enclosing-sym)))
+
+(defun helpful--symbol-at-point-exactly ()
+  "Return the symbol at point, if it's bound."
+  (let ((sym (symbol-at-point)))
+    (when (helpful--bound-p sym)
+      sym)))
+
+(defun helpful--symbol-at-point ()
+  "Find the most relevant symbol at or around point.
+Returns nil if nothing found."
+  (or
+   (helpful--symbol-at-point-exactly)
+   (helpful--callable-at-point)
+   (helpful--variable-at-point)))
+
+;;;###autoload
+(defun helpful-at-point ()
+  "Show help for the symbol at point."
+  (interactive)
+  (-if-let (symbol (helpful--symbol-at-point))
+      (helpful-symbol symbol)
+    (user-error "There is no symbol at point.")))
+
+(defun helpful--imenu-index ()
+  "Return a list of headings in the current buffer, suitable for
+imenu."
+  (let (headings)
+    (goto-char (point-min))
+    (while (not (eobp))
+      (when (eq (get-text-property (point) 'face)
+                'helpful-heading)
+        (push
+         (cons
+          (buffer-substring-no-properties
+           (line-beginning-position) (line-end-position))
+          (line-beginning-position))
+         headings))
+      (forward-line))
+    (nreverse headings)))
+
+(defun helpful--flash-region (start end)
+  "Temporarily highlight region from START to END."
+  (let ((overlay (make-overlay start end)))
+    (overlay-put overlay 'face 'highlight)
+    (run-with-timer 1.5 nil 'delete-overlay overlay)))
+
+(defun helpful-visit-reference ()
+  "Go to the reference at point."
+  (interactive)
+  (let* ((sym helpful--sym)
+         (path (get-text-property (point) 'helpful-path))
+         (pos (get-text-property (point) 'helpful-pos))
+         (pos-is-start (get-text-property (point) 'helpful-pos-is-start)))
+    (when (and path pos)
+      ;; If we're looking at a source excerpt, calculate the offset of
+      ;; point, so we don't just go the start of the excerpt.
+      (when pos-is-start
+        (save-excursion
+          (let ((offset 0))
+            (while (and
+                    (get-text-property (point) 'helpful-pos)
+                    (not (eobp)))
+              (backward-char 1)
+              (setq offset (1+ offset)))
+            ;; On the last iteration we moved outside the source
+            ;; excerpt, so we overcounted by one character.
+            (setq offset (1- offset))
+
+            ;; Set POS so we go to exactly the place in the source
+            ;; code where point was in the helpful excerpt.
+            (setq pos (+ pos offset)))))
+
+      (find-file path)
+      (helpful--goto-char-widen pos)
+      (recenter 0)
+      (save-excursion
+        (let ((defun-end (scan-sexps (point) 1)))
+          (while (re-search-forward
+                  (rx-to-string `(seq symbol-start ,(symbol-name sym) symbol-end))
+                  defun-end t)
+            (helpful--flash-region (match-beginning 0) (match-end 0))))))))
+
+(defun helpful-kill-buffers ()
+  "Kill all `helpful-mode' buffers.
+
+See also `helpful-max-buffers'."
+  (interactive)
+  (dolist (buffer (buffer-list))
+    (when (eq (buffer-local-value 'major-mode buffer) 'helpful-mode)
+      (kill-buffer buffer))))
+
+(defvar helpful-mode-map
+  (let* ((map (make-sparse-keymap)))
+    (define-key map (kbd "g") #'helpful-update)
+    (define-key map [remap revert-buffer] #'helpful-update)
+    (when (fboundp 'revert-buffer-quick)
+      (define-key map [remap revert-buffer-quick] #'helpful-update))
+
+    (define-key map (kbd "RET") #'helpful-visit-reference)
+
+    (define-key map (kbd "TAB") #'forward-button)
+    (define-key map (kbd "<backtab>") #'backward-button)
+
+    (define-key map (kbd "n") #'forward-button)
+    (define-key map (kbd "p") #'backward-button)
+    map)
+  "Keymap for `helpful-mode'.")
+
+(declare-function bookmark-prop-get "bookmark" (bookmark prop))
+(declare-function bookmark-make-record-default "bookmark"
+                  (&optional no-file no-context posn))
+;; Ensure this variable is defined even if bookmark.el isn't loaded
+;; yet. This follows the pattern in help-mode.el.gz.
+;; TODO: find a cleaner solution.
+(defvar bookmark-make-record-function)
+
+(defun helpful--add-support-for-org-links ()
+  "Improve support for org \"help\" links through helpful."
+  (helpful--support-storing-org-links)
+  (helpful--prefer-helpful-when-following-org-link))
+
+(defun helpful--support-storing-org-links ()
+  "Make `org-store-link' in a helpful buffer return a \"help\" link."
+  (when (and (fboundp 'org-link-set-parameters)
+             (not (-contains-p (org-link-types) "helpful")))
+    (org-link-set-parameters "helpful"
+                             :store #'helpful--org-link-store)))
+
+(defun helpful--org-link-store ()
+  "Store \"help\" type link when in a helpful buffer."
+  (when (derived-mode-p 'helpful-mode)
+    ;; Create a "help" link instead of a dedicated "helpful" link: the
+    ;; author of the Org document uses helpful, but this is not
+    ;; necessarily the case of the reader of the document.
+    (org-link-store-props :type "help"
+                          :link (format "help:%s" helpful--sym)
+                          :description nil)))
+
+(defun helpful--prefer-helpful-when-following-org-link ()
+  "Prefer helpful when using `org-open-at-point' on a \"help\" link."
+  (when (fboundp 'org-link-set-parameters)
+    (let ((follow-function (org-link-get-parameter "help" :follow)))
+      (when (not (equal follow-function #'helpful--org-link-follow))
+        (org-link-set-parameters "help"
+                                 :follow #'helpful--org-link-follow)))))
+
+(defun helpful--org-link-follow (link _)
+  (helpful-symbol (intern link)))
+
+(defun helpful--outline-function (&optional bound move backward looking-at)
+  "`outline-search-function' for `helpful-mode`.
+See documentation of `outline-search-function' for BOUND, MOVE,
+BACKWARD and LOOKING-AT."
+  (if looking-at
+      (eq 'helpful-heading (get-text-property (point) 'face))
+    (let ((heading-found nil)
+          (bound (if bound bound (if backward (point-min) (point-max)))))
+      (save-excursion
+        (when (eq 'helpful-heading (get-text-property (point) 'face))
+          (forward-line (if backward -1 1)))
+        (if backward
+            (while (not (or (eq (point) bound)
+                            (eq 'helpful-heading (get-text-property (point) 'face))))
+              (goto-char (or (previous-single-property-change (point) 'face nil bound)
+                             bound)))
+          (goto-char (or (text-property-any (point) bound 'face 'helpful-heading)
+                         bound)))
+        (when (eq 'helpful-heading (get-text-property (point) 'face))
+          (setq heading-found (point))))
+      (if heading-found
+          (progn
+            (goto-char heading-found)
+            (set-match-data (list heading-found heading-found)))
+        (when move
+          (goto-char bound) nil)))))
+
+(define-derived-mode helpful-mode special-mode "Helpful"
+  "Major mode for *Helpful* buffers."
+  (add-hook 'xref-backend-functions #'elisp--xref-backend nil t)
+
+  (setq imenu-create-index-function #'helpful--imenu-index)
+  ;; Prevent imenu converting "Source Code" to "Source.Code".
+  (setq-local imenu-space-replacement " ")
+
+  ;; Enable users to bookmark helpful buffers.
+  (set (make-local-variable 'bookmark-make-record-function)
+       #'helpful--bookmark-make-record)
+
+  ;; Enable outline support for Emacs 29 and newer
+  (unless (< emacs-major-version 29)
+    (setq-local outline-search-function #'helpful--outline-function))
+
+  ;; This function should normally only be called once after Org and
+  ;; helpful are loaded. To avoid using `eval-after-load' (which is
+  ;; only recommended in user init files), the function is called each
+  ;; time the major mode is used.
+  (helpful--add-support-for-org-links))
+
+(provide 'helpful)
+;;; helpful.el ends here
diff --git a/emacs/.emacs.d/elpa/helpful-20250408.334/helpful.elc b/emacs/.emacs.d/elpa/helpful-20250408.334/helpful.elc
new file mode 100644
index 0000000..7f0a197
Binary files /dev/null and b/emacs/.emacs.d/elpa/helpful-20250408.334/helpful.elc differ
diff --git a/emacs/.emacs.d/elpa/ht-20230703.558/ht-autoloads.el b/emacs/.emacs.d/elpa/ht-20230703.558/ht-autoloads.el
new file mode 100644
index 0000000..6e244c6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ht-20230703.558/ht-autoloads.el
@@ -0,0 +1,28 @@
+;;; ht-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from ht.el
+
+(register-definition-prefixes "ht" 'nil)
+
+;;; End of scraped data
+
+(provide 'ht-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; ht-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/ht-20230703.558/ht-pkg.el b/emacs/.emacs.d/elpa/ht-20230703.558/ht-pkg.el
new file mode 100644
index 0000000..91a4148
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ht-20230703.558/ht-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "ht" "20230703.558"
+  "The missing hash table library for Emacs."
+  '((dash "2.12.0"))
+  :url "https://github.com/Wilfred/ht.el"
+  :commit "1c49aad1c820c86f7ee35bf9fff8429502f60fef"
+  :revdesc "1c49aad1c820"
+  :keywords '("hash table" "hash map" "hash")
+  :authors '(("Wilfred Hughes" . "me@wilfred.me.uk"))
+  :maintainers '(("Wilfred Hughes" . "me@wilfred.me.uk")))
diff --git a/emacs/.emacs.d/elpa/ht-20230703.558/ht.el b/emacs/.emacs.d/elpa/ht-20230703.558/ht.el
new file mode 100644
index 0000000..9d76509
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ht-20230703.558/ht.el
@@ -0,0 +1,355 @@
+;;; ht.el --- The missing hash table library for Emacs  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2013 Wilfred Hughes
+
+;; Author: Wilfred Hughes <me@wilfred.me.uk>
+;; Package-Version: 20230703.558
+;; Package-Revision: 1c49aad1c820
+;; Keywords: hash table, hash map, hash
+;; Package-Requires: ((dash "2.12.0"))
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; The missing hash table library for Emacs.
+;;
+;; See documentation at https://github.com/Wilfred/ht.el
+
+;;; Code:
+
+(require 'dash)
+(require 'gv)
+(eval-when-compile
+  (require 'inline))
+
+(defmacro ht (&rest pairs)
+  "Create a hash table with the key-value pairs given.
+Keys are compared with `equal'.
+
+\(fn (KEY-1 VALUE-1) (KEY-2 VALUE-2) ...)"
+  (let* ((table-symbol (make-symbol "ht-temp"))
+         (assignments
+          (mapcar
+           (lambda (pair) `(ht-set! ,table-symbol ,@pair))
+           pairs)))
+    `(let ((,table-symbol (ht-create)))
+       ,@assignments
+       ,table-symbol)))
+
+(define-inline ht-set! (table key value)
+  "Associate KEY in TABLE with VALUE."
+  (inline-quote
+   (prog1 nil
+     (puthash ,key ,value ,table))))
+
+(defalias 'ht-set 'ht-set!)
+
+(define-inline ht-create (&optional test)
+  "Create an empty hash table.
+
+TEST indicates the function used to compare the hash
+keys.  Default is `equal'.  It can be `eq', `eql', `equal' or a
+user-supplied test created via `define-hash-table-test'."
+  (declare (side-effect-free t))
+  (inline-quote (make-hash-table :test (or ,test 'equal))))
+
+(defun ht<-alist (alist &optional test)
+  "Create a hash table with initial values according to ALIST.
+
+TEST indicates the function used to compare the hash
+keys.  Default is `equal'.  It can be `eq', `eql', `equal' or a
+user-supplied test created via `define-hash-table-test'."
+  (declare (side-effect-free t))
+  (let ((h (ht-create test)))
+    ;; the first key-value pair in an alist gets precedence, so we
+    ;; start from the end of the list:
+    (dolist (pair (reverse alist) h)
+      (let ((key (car pair))
+            (value (cdr pair)))
+        (ht-set! h key value)))))
+
+(defalias 'ht-from-alist 'ht<-alist)
+
+(defun ht<-plist (plist &optional test)
+  "Create a hash table with initial values according to PLIST.
+
+TEST indicates the function used to compare the hash
+keys.  Default is `equal'.  It can be `eq', `eql', `equal' or a
+user-supplied test created via `define-hash-table-test'."
+  (declare (side-effect-free t))
+  (let ((h (ht-create test)))
+    (dolist (pair (nreverse (-partition 2 plist)) h)
+      (let ((key (car pair))
+            (value (cadr pair)))
+        (ht-set! h key value)))))
+
+(defalias 'ht-from-plist 'ht<-plist)
+
+(define-inline ht-get (table key &optional default)
+  "Look up KEY in TABLE, and return the matching value.
+If KEY isn't present, return DEFAULT (nil if not specified)."
+  (declare (side-effect-free t))
+  (inline-quote
+   (gethash ,key ,table ,default)))
+
+;; Don't use `ht-set!' here, gv setter was assumed to return the value
+;; to be set.
+(gv-define-setter ht-get (value table key) `(puthash ,key ,value ,table))
+
+(define-inline ht-get* (table &rest keys)
+  "Look up KEYS in nested hash tables, starting with TABLE.
+The lookup for each key should return another hash table, except
+for the final key, which may return any value."
+  (declare (side-effect-free t))
+  (inline-letevals (table keys)
+    (inline-quote
+     (progn
+       (while ,keys
+         (setf ,table (ht-get ,table (pop ,keys))))
+       ,table))))
+
+(put 'ht-get* 'compiler-macro
+     (lambda (_ table &rest keys)
+       (--reduce-from `(ht-get ,acc ,it) table keys)))
+
+(defun ht-update! (table from-table)
+  "Update TABLE according to every key-value pair in FROM-TABLE."
+  (maphash
+   (lambda (key value) (puthash key value table))
+   from-table)
+  nil)
+
+(defalias 'ht-update 'ht-update!)
+
+(define-inline ht-update-with! (table key updater &optional default)
+  "Update the value of KEY in TABLE with UPDATER.
+If the value does not exist, do nothing, unless DEFAULT is
+non-nil, in which case act as if the value is DEFAULT.
+
+UPDATER receives one argument, the value, and its return value
+becomes the new value of KEY."
+  (inline-quote
+   (let* ((not-found-symbol (make-symbol "ht--not-found"))
+          (v (gethash ,key ,table
+                      (or ,default not-found-symbol))))
+     (unless (eq v not-found-symbol)
+       (prog1 nil
+         (puthash ,key (funcall ,updater v) ,table))))))
+
+(defun ht-merge (&rest tables)
+  "Crete a new table that includes all the key-value pairs from TABLES.
+If multiple tables have the same key, the value in the last
+table is used."
+  (let ((merged (ht-create)))
+    (mapc (lambda (table) (ht-update! merged table)) tables)
+    merged))
+
+(define-inline ht-remove! (table key)
+  "Remove KEY from TABLE."
+  (inline-quote (remhash ,key ,table)))
+
+(defalias 'ht-remove 'ht-remove!)
+
+(define-inline ht-clear! (table)
+  "Remove all keys from TABLE."
+  (inline-quote
+   (prog1 nil
+     (clrhash ,table))))
+
+(defalias 'ht-clear 'ht-clear!)
+
+(defun ht-map (function table)
+  "Apply FUNCTION to each key-value pair of TABLE, and make a list of the results.
+FUNCTION is called with two arguments, KEY and VALUE."
+  (let (results)
+    (maphash
+     (lambda (key value)
+       (push (funcall function key value) results))
+     table)
+    results))
+
+(defmacro ht-amap (form table)
+  "Anaphoric version of `ht-map'.
+For every key-value pair in TABLE, evaluate FORM with the
+variables KEY and VALUE bound.  If you don't use both of
+these variables, then use `ht-map' to avoid warnings."
+  `(ht-map (lambda (key value) ,form) ,table))
+
+(defun ht-keys (table)
+  "Return a list of all the keys in TABLE."
+  (declare (side-effect-free t))
+  (ht-map (lambda (key _value) key) table))
+
+(defun ht-values (table)
+  "Return a list of all the values in TABLE."
+  (declare (side-effect-free t))
+  (ht-map (lambda (_key value) value) table))
+
+(defun ht-items (table)
+  "Return a list of two-element lists \\='(key value) from TABLE."
+  (declare (side-effect-free t))
+  (ht-amap (list key value) table))
+
+(defalias 'ht-each 'maphash
+  "Apply FUNCTION to each key-value pair of TABLE.
+Returns nil, used for side-effects only.")
+
+(defmacro ht-aeach (form table)
+  "Anaphoric version of `ht-each'.
+For every key-value pair in TABLE, evaluate FORM with the
+variables key and value bound."
+  `(ht-each (lambda (key value) ,form) ,table))
+
+(defun ht-select-keys (table keys)
+  "Return a copy of TABLE with only the specified KEYS."
+  (declare (side-effect-free t))
+  (let ((not-found-symbol (make-symbol "ht--not-found"))
+        result)
+    (setq result (make-hash-table :test (hash-table-test table)))
+    (dolist (key keys result)
+      (if (not (equal (gethash key table not-found-symbol) not-found-symbol))
+          (puthash key (gethash key table) result)))))
+
+(defun ht->plist (table)
+  "Return a flat list \\='(key1 value1 key2 value2...) from TABLE.
+
+Note that hash tables are unordered, so this cannot be an exact
+inverse of `ht<-plist'.  The following is not guaranteed:
+
+\(let ((data \\='(a b c d)))
+  (equalp data
+          (ht->plist (ht<-plist data))))"
+  (declare (side-effect-free t))
+  (apply 'append (ht-items table)))
+
+(defalias 'ht-to-plist 'ht->plist)
+
+(define-inline ht-copy (table)
+  "Return a shallow copy of TABLE (keys and values are shared)."
+  (declare (side-effect-free t))
+  (inline-quote (copy-hash-table ,table)))
+
+(defun ht->alist (table)
+  "Return a list of two-element lists \\='(key . value) from TABLE.
+
+Note that hash tables are unordered, so this cannot be an exact
+inverse of `ht<-alist'.  The following is not guaranteed:
+
+\(let ((data \\='((a . b) (c . d))))
+  (equalp data
+          (ht->alist (ht<-alist data))))"
+  (declare (side-effect-free t))
+  (ht-amap (cons key value) table))
+
+(defalias 'ht-to-alist 'ht->alist)
+
+(defalias 'ht? 'hash-table-p)
+
+(defalias 'ht-p 'hash-table-p)
+
+(define-inline ht-contains? (table key)
+  "Return \\='t if TABLE contains KEY."
+  (declare (side-effect-free t))
+  (inline-quote
+   (let ((not-found-symbol (make-symbol "ht--not-found")))
+     (not (eq (ht-get ,table ,key not-found-symbol) not-found-symbol)))))
+
+(defalias 'ht-contains-p 'ht-contains?)
+
+(define-inline ht-size (table)
+  "Return the actual number of entries in TABLE."
+  (declare (side-effect-free t))
+  (inline-quote
+   (hash-table-count ,table)))
+
+(define-inline ht-empty? (table)
+  "Return true if the actual number of entries in TABLE is zero."
+  (declare (side-effect-free t))
+  (inline-quote
+   (zerop (ht-size ,table))))
+
+(defalias 'ht-empty-p 'ht-empty?)
+
+(defun ht-select (function table)
+  "Return a hash table containing all entries in TABLE for which
+FUNCTION returns a truthy value.
+
+FUNCTION is called with two arguments, KEY and VALUE."
+  (let ((results (ht-create)))
+    (ht-each
+     (lambda (key value)
+       (when (funcall function key value)
+         (ht-set! results key value)))
+     table)
+    results))
+
+(defun ht-reject (function table)
+  "Return a hash table containing all entries in TABLE for which
+FUNCTION returns a falsy value.
+
+FUNCTION is called with two arguments, KEY and VALUE."
+  (let ((results (ht-create)))
+    (ht-each
+     (lambda (key value)
+       (unless (funcall function key value)
+         (ht-set! results key value)))
+     table)
+    results))
+
+(defun ht-reject! (function table)
+  "Delete entries from TABLE for which FUNCTION returns non-nil.
+
+FUNCTION is called with two arguments, KEY and VALUE."
+  (ht-each
+   (lambda (key value)
+     (when (funcall function key value)
+       (remhash key table)))
+   table)
+  nil)
+
+(defalias 'ht-delete-if 'ht-reject!)
+
+(defun ht-find (function table)
+  "Return (key, value) from TABLE for which FUNCTION returns a truthy value.
+Return nil otherwise.
+
+FUNCTION is called with two arguments, KEY and VALUE."
+  (catch 'break
+    (ht-each
+     (lambda (key value)
+       (when (funcall function key value)
+         (throw 'break (list key value))))
+     table)))
+
+(defun ht-equal? (table1 table2)
+  "Return t if TABLE1 and TABLE2 have the same keys and values.
+Does not compare equality predicates."
+  (declare (side-effect-free t))
+  (let ((keys1 (ht-keys table1))
+        (keys2 (ht-keys table2))
+        (sentinel (make-symbol "ht-sentinel")))
+    (and (equal (length keys1) (length keys2))
+         (--all?
+          (if (ht-p (ht-get table1 it))
+              (ht-equal-p (ht-get table1 it)
+                          (ht-get table2 it))
+            (equal (ht-get table1 it)
+                 (ht-get table2 it sentinel)))
+          keys1))))
+
+(defalias 'ht-equal-p 'ht-equal?)
+
+(provide 'ht)
+;;; ht.el ends here
diff --git a/emacs/.emacs.d/elpa/ht-20230703.558/ht.elc b/emacs/.emacs.d/elpa/ht-20230703.558/ht.elc
new file mode 100644
index 0000000..6bcf510
Binary files /dev/null and b/emacs/.emacs.d/elpa/ht-20230703.558/ht.elc differ
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/colir.el b/emacs/.emacs.d/elpa/ivy-20260413.2102/colir.el
new file mode 100644
index 0000000..2db912d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-20260413.2102/colir.el
@@ -0,0 +1,130 @@
+;;; colir.el --- Color blending library -*- lexical-binding: t -*-
+
+;; Copyright (C) 2015-2026 Free Software Foundation, Inc.
+
+;; Author: Oleh Krehel <ohwoeowho@gmail.com>
+
+;; This file is part of GNU Emacs.
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; For a full copy of the GNU General Public License
+;; see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This package solves the problem of adding a face with a background
+;; to text which may already have a background.  In all conflicting
+;; areas, instead of choosing either the original or the new
+;; background face, their blended sum is used.
+;;
+;; The blend mode functions are taken from URL
+;; `https://en.wikipedia.org/wiki/Blend_modes'.
+
+;;; Code:
+
+(require 'cl-lib)
+
+(eval-and-compile
+  ;; Autoloaded since Emacs 31.
+  (unless (fboundp 'color-rgb-to-hex)
+    (autoload 'color-rgb-to-hex "color")))
+
+(defcustom colir-compose-method #'colir-compose-alpha
+  "The method `colir-blend' uses to compose two color channels."
+  :group 'ivy
+  :type '(radio
+          (function-item colir-compose-alpha)
+          (function-item colir-compose-overlay)
+          (function-item colir-compose-soft-light)))
+
+(defun colir-compose-soft-light (a b)
+  "Compose color channels A and B in Soft Light blend mode.
+See URL `https://en.wikipedia.org/wiki/Blend_modes#Soft_Light'."
+  (if (< b 0.5)
+      (+ (* 2 a b) (* a a (- 1 b b)))
+    (+ (* 2 a (- 1 b)) (* (sqrt a) (+ b b -1)))))
+
+(defun colir-compose-overlay (a b)
+  "Compose color channels A and B in Overlay blend mode.
+See URL `https://en.wikipedia.org/wiki/Blend_modes#Overlay'."
+  (if (< a 0.5)
+      (* 2 a b)
+    (- 1 (* 2 (- 1 a) (- 1 b)))))
+
+;; Generalizes Emacs 31 `color-blend'.
+(defun colir-compose-alpha (a b &optional alpha gamma)
+  "Compose color channels A and B using alpha blending.
+Optional argument ALPHA controls the influence of A on the result.
+It is a number between 0.0 and 1.0, inclusive (default 0.5).
+Optional argument GAMMA controls gamma correction (default 2.2)."
+  (setq alpha (or alpha 0.5))
+  (setq gamma (or gamma 2.2))
+  (+ (* (expt a gamma) alpha) (* (expt b gamma) (- 1 alpha))))
+
+(defun colir-blend (c1 c2)
+  "Blend the two colors C1 and C2 using `colir-compose-method'.
+C1 and C2 are triples of floats in [0.0 1.0] range."
+  (apply #'color-rgb-to-hex
+         (cl-mapcar
+          (if (eq (frame-parameter nil 'background-mode) 'dark)
+              ;; This method works nicely for dark themes.
+              #'colir-compose-soft-light
+            colir-compose-method)
+          c1 c2)))
+
+(defun colir-color-parse (color)
+  "Convert string COLOR to triple of floats in [0.0 1.0]."
+  (if (string-match "#\\([[:xdigit:]]\\{2\\}\\)\\([[:xdigit:]]\\{2\\}\\)\\([[:xdigit:]]\\{2\\}\\)" color)
+      (mapcar (lambda (v) (/ (string-to-number v 16) 255.0))
+              (list (match-string 1 color) (match-string 2 color) (match-string 3 color)))
+    ;; does not work properly in terminal (maps color to nearest color
+    ;; from available color palette).
+    (color-name-to-rgb color)))
+
+(defun colir--blend-background (start next prevn face object)
+  (let ((background-prev (face-background prevn)))
+    (put-text-property
+     start next 'face
+     (if background-prev
+         (cons `(background-color
+                 . ,(colir-blend
+                     (colir-color-parse background-prev)
+                     (colir-color-parse (face-background face nil t))))
+               prevn)
+       (list face prevn))
+     object)))
+
+(defun colir-blend-face-background (start end face &optional object)
+  "Append to the face property of the text from START to END the face FACE.
+When the text already has a face with a non-plain background,
+blend it with the background of FACE.
+Optional argument OBJECT is the string or buffer containing the text.
+See also `font-lock-append-text-property'."
+  (let (next prev prevn)
+    (while (/= start end)
+      (setq next (next-single-property-change start 'face object end))
+      (setq prev (get-text-property start 'face object))
+      (setq prevn (if (listp prev)
+                      (cl-find-if #'atom prev)
+                    prev))
+      (cond
+        ((or (keywordp (car-safe prev)) (consp (car-safe prev)))
+         (put-text-property start next 'face (cons face prev) object))
+        ((facep prevn)
+         (colir--blend-background start next prevn face object))
+        (t
+         (put-text-property start next 'face face object)))
+      (setq start next))))
+
+(provide 'colir)
+
+;;; colir.el ends here
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/colir.elc b/emacs/.emacs.d/elpa/ivy-20260413.2102/colir.elc
new file mode 100644
index 0000000..80201a3
Binary files /dev/null and b/emacs/.emacs.d/elpa/ivy-20260413.2102/colir.elc differ
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/dir b/emacs/.emacs.d/elpa/ivy-20260413.2102/dir
new file mode 100644
index 0000000..b68b083
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-20260413.2102/dir
@@ -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
+* Ivy: (ivy).                   Using Ivy for completion.
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-autoloads.el b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-autoloads.el
new file mode 100644
index 0000000..6fb68c7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-autoloads.el
@@ -0,0 +1,154 @@
+;;; ivy-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from colir.el
+
+(register-definition-prefixes "colir" '("colir-"))
+
+
+;;; Generated autoloads from ivy.el
+
+(autoload 'ivy-resume "ivy" "\
+Resume the last completion session, or SESSION if non-nil.
+With a prefix arg, try to restore a recorded completion session,
+if one exists.
+
+(fn &optional SESSION)" t)
+(autoload 'ivy-read "ivy" "\
+Read a string in the minibuffer, with completion.
+
+PROMPT is a string, normally ending in a colon and a space.
+`ivy-count-format' is prepended to PROMPT during completion.
+
+COLLECTION is either a list of strings, a function, an alist, or
+a hash table, supplied for `minibuffer-completion-table'.
+
+PREDICATE is applied to filter out the COLLECTION immediately.
+This argument is for compatibility with `completing-read'.
+
+When REQUIRE-MATCH is non-nil, only members of COLLECTION can be
+selected.  It can also be a lambda.
+
+If INITIAL-INPUT is non-nil, then insert that input in the
+minibuffer initially.
+
+HISTORY is a name of a variable to hold the completion session
+history.
+
+KEYMAP is composed with `ivy-minibuffer-map'.
+
+PRESELECT, when non-nil, determines which one of the candidates
+matching INITIAL-INPUT to select initially.  An integer stands
+for the position of the desired candidate in the collection,
+counting from zero.  Otherwise, use the first occurrence of
+PRESELECT in the collection.  Comparison is first done with
+`equal'.  If that fails, and when applicable, match PRESELECT as
+a regular expression.
+
+DEF is for compatibility with `completing-read'.
+
+UPDATE-FN is called each time the candidate list is re-displayed.
+
+When SORT is non-nil, `ivy-sort-functions-alist' determines how
+to sort candidates before displaying them.
+
+ACTION is a function to call after selecting a candidate.
+It takes one argument, the selected candidate. If COLLECTION is
+an alist, the argument is a cons cell, otherwise it's a string.
+
+MULTI-ACTION, when non-nil, is called instead of ACTION when
+there are marked candidates. It takes the list of candidates as
+its only argument. When it's nil, ACTION is called on each marked
+candidate.
+
+UNWIND is a function of no arguments to call before exiting.
+
+RE-BUILDER is a function transforming input text into a regex
+pattern.
+
+MATCHER is a function which can override how candidates are
+filtered based on user input.  It takes a regex pattern and a
+list of candidates, and returns the list of matching candidates.
+
+DYNAMIC-COLLECTION is a boolean specifying whether the list of
+candidates is updated after each input by calling COLLECTION.
+
+EXTRA-PROPS is a plist that can be used to store
+collection-specific session-specific data.
+
+CALLER is a symbol to uniquely identify the caller to `ivy-read'.
+It is used, along with COLLECTION, to determine which
+customizations apply to the current completion session.
+
+(fn PROMPT COLLECTION &key PREDICATE REQUIRE-MATCH INITIAL-INPUT HISTORY PRESELECT DEF KEYMAP UPDATE-FN SORT ACTION MULTI-ACTION UNWIND RE-BUILDER MATCHER DYNAMIC-COLLECTION EXTRA-PROPS CALLER)")
+(autoload 'ivy-completing-read "ivy" "\
+Read a string in the minibuffer, with completion.
+
+This interface conforms to `completing-read' and can be used for
+`completing-read-function'.
+
+PROMPT is a string that normally ends in a colon and a space.
+COLLECTION is either a list of strings, an alist, an obarray, or a hash table.
+PREDICATE limits completion to a subset of COLLECTION.
+REQUIRE-MATCH is a boolean value or a symbol.  See `completing-read'.
+INITIAL-INPUT is a string inserted into the minibuffer initially.
+HISTORY is a list of previously selected inputs.
+DEF is the default value.
+INHERIT-INPUT-METHOD is currently ignored.
+
+(fn PROMPT COLLECTION &optional PREDICATE REQUIRE-MATCH INITIAL-INPUT HISTORY DEF INHERIT-INPUT-METHOD)")
+(defvar ivy-mode nil "\
+Non-nil if ivy mode is enabled.
+See the `ivy-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 `ivy-mode'.")
+(custom-autoload 'ivy-mode "ivy" nil)
+(autoload 'ivy-mode "ivy" "\
+Toggle Ivy mode on or off.
+Turn Ivy mode on if ARG is positive, off otherwise.
+Turning on Ivy mode sets `completing-read-function' to
+`ivy-completing-read'.
+
+Global bindings:
+\\{ivy-mode-map}
+
+Minibuffer bindings:
+\\{ivy-minibuffer-map}
+
+(fn &optional ARG)" t)
+(autoload 'ivy-switch-buffer "ivy" "\
+Switch to another buffer." t)
+(autoload 'ivy-switch-view "ivy" "\
+Switch to one of the window views stored by `ivy-push-view'." t)
+(autoload 'ivy-switch-buffer-other-window "ivy" "\
+Switch to another buffer in another window." t)
+(register-definition-prefixes "ivy" '("ivy-" "with-ivy-window"))
+
+
+;;; Generated autoloads from ivy-overlay.el
+
+(register-definition-prefixes "ivy-overlay" '("ivy-"))
+
+;;; End of scraped data
+
+(provide 'ivy-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; ivy-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-faces.el b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-faces.el
new file mode 100644
index 0000000..6abd4a2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-faces.el
@@ -0,0 +1,145 @@
+;;; ivy-faces.el --- Faces for Ivy -*- lexical-binding: t -*-
+
+;; Copyright (C) 2020-2026 Free Software Foundation, Inc.
+
+;; Author: Oleh Krehel <ohwoeowho@gmail.com>
+;; Keywords: convenience
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;; Code:
+
+(defgroup ivy-faces nil
+  "Font-lock faces for `ivy'."
+  :group 'ivy
+  :group 'faces)
+
+(defface ivy-cursor
+  '((((class color) (background light))
+     :background "black" :foreground "white")
+    (((class color) (background dark))
+     :background "white" :foreground "black"))
+  "Cursor face for inline completion.")
+
+(defface ivy-current-match
+  '((((class color) (background light))
+     :background "#1a4b77" :foreground "white" :extend t)
+    (((class color) (background dark))
+     :background "#65a7e2" :foreground "black" :extend t))
+  "Face used by Ivy for highlighting the current match.")
+
+(defface ivy-minibuffer-match-highlight
+  '((t :inherit highlight))
+  "Face used by Ivy for highlighting the match under the cursor.")
+
+(defface ivy-minibuffer-match-face-1
+  '((((class color) (background light))
+     :background "#d3d3d3")
+    (((class color) (background dark))
+     :background "#555555"))
+  "The background face for `ivy' minibuffer matches.")
+
+(defface ivy-minibuffer-match-face-2
+  '((((class color) (background light))
+     :background "#e99ce8" :weight bold)
+    (((class color) (background dark))
+     :background "#777777" :weight bold))
+  "Face for `ivy' minibuffer matches numbered 1 modulo 3.")
+
+(defface ivy-minibuffer-match-face-3
+  '((((class color) (background light))
+     :background "#bbbbff" :weight bold)
+    (((class color) (background dark))
+     :background "#7777ff" :weight bold))
+  "Face for `ivy' minibuffer matches numbered 2 modulo 3.")
+
+(defface ivy-minibuffer-match-face-4
+  '((((class color) (background light))
+     :background "#ffbbff" :weight bold)
+    (((class color) (background dark))
+     :background "#8a498a" :weight bold))
+  "Face for `ivy' minibuffer matches numbered 3 modulo 3.")
+
+(defface ivy-confirm-face
+  '((t :foreground "ForestGreen" :inherit minibuffer-prompt))
+  "Face used by Ivy for a confirmation prompt.")
+
+(defface ivy-match-required-face
+  '((t :foreground "red" :inherit minibuffer-prompt))
+  "Face used by Ivy for a match required prompt.")
+
+(defface ivy-subdir
+  '((t :inherit dired-directory))
+  "Face used by Ivy for highlighting subdirs in the alternatives.")
+
+(defface ivy-org
+  '((t :inherit org-level-4))
+  "Face used by Ivy for highlighting Org buffers in the alternatives.")
+
+(defface ivy-modified-buffer
+  '((t :inherit default))
+  "Face used by Ivy for highlighting modified file visiting buffers.")
+
+(defface ivy-modified-outside-buffer
+  '((t :inherit default))
+  "Face used by Ivy for highlighting file visiting buffers modified outside Emacs.")
+
+(defface ivy-remote
+  '((((class color) (background light))
+     :foreground "#110099")
+    (((class color) (background dark))
+     :foreground "#7B6BFF"))
+  "Face used by Ivy for highlighting remotes in the alternatives.")
+
+(defface ivy-virtual
+  '((t :inherit font-lock-builtin-face))
+  "Face used by Ivy for matching virtual buffer names.")
+
+(defface ivy-action
+  '((t :inherit font-lock-builtin-face))
+  "Face used by Ivy for displaying keys in `ivy-read-action'.")
+
+(defface ivy-highlight-face
+  '((t :inherit highlight))
+  "Face used by Ivy to highlight certain candidates.")
+
+(defface ivy-prompt-match
+  '((t :inherit ivy-current-match))
+  "Face used by Ivy for highlighting the selected prompt line.")
+
+(defface ivy-separator
+  '((t :inherit font-lock-doc-face))
+  "Face for multiline source separator.")
+
+(defface ivy-grep-info
+  '((t :inherit compilation-info))
+  "Face for highlighting grep information such as file names.")
+
+(defface ivy-grep-line-number
+  '((t :inherit compilation-line-number))
+  "Face for displaying line numbers in grep messages.")
+
+(defface ivy-completions-annotations
+  '((t :inherit completions-annotations))
+  "Face for displaying completion annotations.")
+
+(defface ivy-yanked-word
+  '((t :inherit highlight))
+  "Face used to highlight yanked word.")
+
+(provide 'ivy-faces)
+
+;;; ivy-faces.el ends here
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-faces.elc b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-faces.elc
new file mode 100644
index 0000000..6b1a1de
Binary files /dev/null and b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-faces.elc differ
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-help.org b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-help.org
new file mode 100644
index 0000000..3a94118
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-help.org
@@ -0,0 +1,138 @@
+* Ivy Generic Help
+
+=ivy= is an Emacs incremental completion framework.
+
+- Narrow the list by typing some pattern,
+- Multiple patterns are allowed by separating with a space,
+- Select with ~C-n~ and ~C-p~, choose with ~RET~.
+
+** Help
+
+- ~C-h m~ :: Pop to this generic help buffer.
+
+** Basic Operations
+*** Key bindings for navigation
+
+- ~C-n~ (=ivy-next-line=) :: next candidate.
+- ~C-p~ (=ivy-previous-line=) :: previous candidate.
+- ~C-v~ (=ivy-scroll-up-command=) :: next page.
+- ~M-v~ (=ivy-scroll-down-command=) :: previous page.
+- ~M-<~ (=ivy-beginning-of-buffer=) :: first candidate.
+- ~M->~ (=ivy-end-of-buffer=) :: last candidate.
+
+*** Key bindings for single selection
+
+When selecting a candidate, an action is called on it. You can think
+of an action as a function that takes the selected candidate as an
+argument and does something with it.
+
+Ivy can offer several actions from which to choose. This can be
+independently composed with whether you want to end completion when
+the action is called. Depending on this, the short term is either
+"calling an action" or "exiting with action".
+
+~C-m~ or ~RET~ (=ivy-done=) - exit with the current action.
+
+~M-o~ (=ivy-dispatching-done=) - select an action and exit with it.
+
+~C-j~ (=ivy-alt-done=) - when the candidate is a directory, enter
+it. Otherwise, exit with the current action.
+
+~TAB~ (=ivy-partial-or-done=) - attempt partial completion, extending
+the current input as much as possible. ~TAB TAB~ is the same as ~C-j~.
+
+~C-M-j~ (=ivy-immediate-done=) - exit with the current action, calling
+it on the /current input/ instead of the current candidate. This is
+useful especially when creating new files or directories - often the
+input will match an existing file, which you don't want to select.
+
+~C-'~ (=ivy-avy=) - select a candidate from the current page with avy
+and exit with the current action.
+
+** Advanced Operations
+*** Key bindings for multiple selection
+
+For repeatedly applying multiple actions or acting on multiple
+candidates, Ivy does not close the minibuffer between commands. It
+keeps the minibuffer open for applying subsequent actions.
+
+Adding an extra meta key to the normal key chord invokes the special
+version of the regular commands that enables applying multiple
+actions.
+
+~C-M-m~ (=ivy-call=) is the non-exiting version of ~C-m~ (=ivy-done=).
+
+~C-M-n~ (=ivy-next-line-and-call=) combines ~C-n~ and ~C-M-m~.
+
+~C-M-p~ (=ivy-previous-line-and-call=) combines ~C-p~ and ~C-M-m~.
+
+~C-M-o~ (=ivy-dispatching-call=) is a non-exiting version of ~M-o~
+(=ivy-dispatching-done=).
+
+*** Key bindings that alter the minibuffer input
+
+~M-n~ (=ivy-next-history-element=) select the next history element or
+symbol/URL at point.
+
+~M-p~ (=ivy-previous-history-element=) select the previous history
+element.
+
+~C-r~ (=ivy-reverse-i-search=) start a recursive completion session to
+select a history element.
+
+~M-i~ (=ivy-insert-current=) insert the current candidate into the
+minibuffer. Useful for copying and renaming files, for example: ~M-i~
+to insert the original file name string, edit it, and then ~C-m~ to
+complete the renaming.
+
+~M-j~ (=ivy-yank-word=) insert the sub-word at point into the
+minibuffer.
+
+~S-SPC~ (=ivy-restrict-to-matches=) deletes the current input, and
+resets the candidates list to the currently restricted matches. This
+is how Ivy provides narrowing in successive tiers.
+
+*** Other key bindings
+
+~M-w~ (=ivy-kill-ring-save=) copies the selected candidates to the
+kill ring; when the region is active, copies the active region.
+
+*** Saving the current completion session to a buffer
+
+~C-c C-o~ (=ivy-occur=) saves the current candidates to a new buffer;
+the list is active in the new buffer.
+
+~RET~ or ~mouse-1~ in the new buffer calls the appropriate action on
+the selected candidate.
+
+Ivy has no limit on the number of active buffers like these.
+
+Ivy takes care of making these buffer names unique. It applies
+descriptive names, for example: =*ivy-occur counsel-describe-variable
+"function$*=.
+
+*** Global key bindings
+
+=ivy-resume= recalls the state of the completion session just before
+its last exit. Useful after an accidental ~C-m~ (=ivy-done=).
+Recommended global binding: ~C-c C-r~.
+
+*** Hydra in the minibuffer
+
+~C-o~ (=hydra-ivy/body=) invokes Hydra menus with key shortcuts.
+
+When in Hydra, ~C-o~ or ~i~ resumes editing.
+
+Hydra reduces key strokes, for example: ~C-n C-n C-n C-n~ is ~C-o
+jjjj~ in Hydra. Besides certain shorter keys, Hydra shows useful info
+such as case folding and the current action.
+
+Additionally, here are the keys that are otherwise not bound:
+
+- ~<~ and ~>~ adjust the height of the minibuffer.
+- ~c~ (=ivy-toggle-calling=) - toggle calling the current action each
+  time a different candidate is selected.
+- ~M~ (=ivy-rotate-preferred-builders=) - rotate regex matcher.
+- ~w~ and ~s~ scroll the actions list.
+
+Minibuffer editing is disabled when Hydra is active.
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-overlay.el b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-overlay.el
new file mode 100644
index 0000000..667d6ba
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-overlay.el
@@ -0,0 +1,176 @@
+;;; ivy-overlay.el --- Overlay display functions for Ivy  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2016-2026 Free Software Foundation, Inc.
+
+;; Author: Oleh Krehel <ohwoeowho@gmail.com>
+;; Keywords: convenience
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Normally, Ivy displays completion candidates and entered text in
+;; the minibuffer.  This file enables in-buffer completion to be
+;; displayed at point instead.
+
+;;; Code:
+
+(eval-when-compile
+  (require 'cl-lib)
+  (require 'subr-x))
+
+(defvar ivy--old-cursor-type t)
+
+(defvar ivy-overlay-at nil
+  "Overlay variable for `ivy-display-function-overlay'.")
+
+(declare-function ivy--truncate-string "ivy")
+
+(defun ivy-left-pad (str width)
+  "Return STR, but with each line indented by WIDTH spaces.
+Lines are truncated to the window width."
+  (let ((padding (make-string width ?\s)))
+    (mapconcat (lambda (x)
+                 (ivy--truncate-string (concat padding x)
+                                       (1- (+ (window-width)
+                                              (window-hscroll)))))
+               (split-string str "\n")
+               "\n")))
+
+(defun ivy-overlay-cleanup ()
+  "Clean up after `ivy-display-function-overlay'."
+  (when (overlayp ivy-overlay-at)
+    (delete-overlay ivy-overlay-at)
+    (setq ivy-overlay-at nil))
+  (unless cursor-type
+    (setq cursor-type ivy--old-cursor-type))
+  (when (fboundp 'company-abort)
+    (company-abort)))
+
+(defvar ivy-height)
+
+(defun ivy-overlay-show-after (str)
+  "Display STR in an overlay at point.
+
+First, fill each line of STR with spaces to the current column.
+Then attach the overlay to the character before point."
+  (if ivy-overlay-at
+      (progn
+        (move-overlay ivy-overlay-at (1- (point)) (line-end-position))
+        (overlay-put ivy-overlay-at 'invisible nil))
+    (let ((available-height (- (window-height) (count-lines (window-start) (point)) 1)))
+      (unless (>= available-height ivy-height)
+        (recenter (- (window-height) ivy-height 2))))
+    (setq ivy-overlay-at (make-overlay (1- (point)) (line-end-position)))
+    ;; Specify face to avoid clashing with other overlays.
+    (overlay-put ivy-overlay-at 'face 'default)
+    (overlay-put ivy-overlay-at 'priority 9999))
+  (overlay-put ivy-overlay-at 'display str)
+  (overlay-put ivy-overlay-at 'after-string ""))
+
+(declare-function org-current-level "org")
+(declare-function org-at-heading-p "org")
+(defvar org-indent-indentation-per-level)
+(defvar ivy-last)
+(defvar ivy-text)
+(defvar ivy-completion-beg)
+(declare-function ivy--get-window "ivy")
+(declare-function ivy-state-window "ivy" t t)
+
+(defun ivy-overlay--current-column ()
+  "Return `current-column', ignoring `ivy-overlay-at'.
+Temporarily make `ivy-overlay-at' invisible so that the
+`string-width' of its `display' property is not included in the
+`current-column' calculation by Emacs >= 29.
+See URL `https://bugs.gnu.org/53795'."
+  (if (overlayp ivy-overlay-at)
+      (cl-letf (((overlay-get ivy-overlay-at 'invisible) t))
+        (1+ (current-column)))
+    (current-column)))
+
+(defun ivy-overlay-impossible-p (_str)
+  (or
+   (and (eq major-mode 'org-mode)
+        ;; If this breaks, an alternative is to call the canonical function
+        ;; `org-in-src-block-p', which is slower.  Neither approach works
+        ;; in Org versions that shipped with Emacs < 26, however.
+        (get-text-property (point) 'src-block))
+   (<= (window-height) (+ ivy-height 2))
+   (bobp)
+   (< (- (+ (window-width) (window-hscroll))
+         (ivy-overlay--current-column))
+      30)))
+
+(defun ivy-overlay--org-indent ()
+  "Return `ivy-overlay-at' indentation due to `org-indent-mode'.
+That is, the additional number of columns needed under the mode."
+  ;; Emacs 28 includes the following fix for `https://bugs.gnu.org/49695':
+  ;;
+  ;; "Fix display of line/wrap-prefix when there's a display property at BOL"
+  ;; 662f91a795 2021-07-22 21:23:48 +0300
+  ;; `https://git.sv.gnu.org/cgit/emacs.git/commit/?id=662f91a795'
+  ;;
+  ;; This increasingly misindents `ivy-overlay-at' with each additional Org
+  ;; level.  See also `https://github.com/abo-abo/swiper/commit/ee7f7f8c79'.
+  ;; FIXME: Is there a better way to work around this?
+  (if (and (eq major-mode 'org-mode)
+           (bound-and-true-p org-indent-mode)
+           (< emacs-major-version 28))
+      (let ((level (org-current-level)))
+        (if (org-at-heading-p)
+            (1- level)
+          (* org-indent-indentation-per-level (or level 1))))
+    0))
+
+(defun ivy-display-function-overlay (str)
+  "Called from the minibuffer, display STR in an overlay in Ivy window.
+Hide the minibuffer contents and cursor."
+  (if (save-selected-window
+        (select-window (ivy-state-window ivy-last))
+        (ivy-overlay-impossible-p str))
+      (let ((buffer-undo-list t))
+        (save-excursion
+          (forward-line 1)
+          (insert str)))
+    (add-face-text-property (minibuffer-prompt-end) (point-max)
+                            '(:foreground "white"))
+    (setq cursor-type nil)
+    (with-selected-window (ivy--get-window ivy-last)
+      (when cursor-type
+        (setq ivy--old-cursor-type cursor-type))
+      (setq cursor-type nil)
+      (let ((overlay-str
+             (apply
+              #'concat
+              (buffer-substring (max (point-min) (1- (point))) (point))
+              ivy-text
+              (and (eolp) " ")
+              (buffer-substring (point) (line-end-position))
+              (and (> (length str) 0)
+                   (list "\n"
+                         (ivy-left-pad
+                          (string-remove-prefix "\n" str)
+                          (+ (ivy-overlay--org-indent)
+                             (save-excursion
+                               (when ivy-completion-beg
+                                 (goto-char ivy-completion-beg))
+                               (ivy-overlay--current-column)))))))))
+        (let ((cursor-offset (1+ (length ivy-text))))
+          (add-face-text-property cursor-offset (1+ cursor-offset)
+                                  'ivy-cursor t overlay-str))
+        (ivy-overlay-show-after overlay-str)))))
+
+(provide 'ivy-overlay)
+
+;;; ivy-overlay.el ends here
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-overlay.elc b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-overlay.elc
new file mode 100644
index 0000000..57c5a38
Binary files /dev/null and b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-overlay.elc differ
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-pkg.el b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-pkg.el
new file mode 100644
index 0000000..99d7bc1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "ivy" "20260413.2102"
+  "Incremental Vertical completYon."
+  '((emacs "24.5"))
+  :url "https://github.com/abo-abo/swiper"
+  :commit "0d02f5063d36ff4fa6138f0973c83c6d3874fba0"
+  :revdesc "0d02f5063d36"
+  :keywords '("matching")
+  :authors '(("Oleh Krehel" . "ohwoeowho@gmail.com"))
+  :maintainers '(("Basil L. Contovounesios" . "basil@contovou.net")))
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy.el b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy.el
new file mode 100644
index 0000000..3564926
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy.el
@@ -0,0 +1,5707 @@
+;;; ivy.el --- Incremental Vertical completYon -*- lexical-binding: t -*-
+
+;; Copyright (C) 2015-2026 Free Software Foundation, Inc.
+
+;; Author: Oleh Krehel <ohwoeowho@gmail.com>
+;; Maintainer: Basil L. Contovounesios <basil@contovou.net>
+;; URL: https://github.com/abo-abo/swiper
+;; Package-Version: 20260413.2102
+;; Package-Revision: 0d02f5063d36
+;; Package-Requires: ((emacs "24.5"))
+;; Keywords: matching
+
+;; This file is part of GNU Emacs.
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; For a full copy of the GNU General Public License
+;; see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This package provides `ivy-read' as an alternative to
+;; `completing-read' and similar functions.
+;;
+;; There's no intricate code to determine the best candidate.
+;; Instead, the user can navigate to it with `ivy-next-line' and
+;; `ivy-previous-line'.
+;;
+;; The matching is done by splitting the input text by spaces and
+;; re-building it into a regex.
+;; So "for example" is transformed into "\\(for\\).*\\(example\\)".
+
+;;; Code:
+
+(require 'colir)
+(require 'ivy-faces)
+(autoload 'ivy-overlay-cleanup "ivy-overlay")
+(autoload 'ivy-display-function-overlay "ivy-overlay")
+
+(require 'cl-lib)
+
+(eval-when-compile
+  (require 'subr-x)
+
+  (unless (fboundp 'static-if)
+    (defmacro static-if (condition then-form &rest else-forms)
+      "Expand to THEN-FORM or ELSE-FORMS based on compile-time CONDITION.
+Polyfill for Emacs 30 `static-if'."
+      (declare (debug (sexp sexp &rest sexp)) (indent 2))
+      (if (eval condition lexical-binding)
+          then-form
+        (macroexp-progn else-forms)))))
+
+;;; Customization
+
+(defgroup ivy nil
+  "Incremental vertical completion."
+  :group 'convenience)
+
+(defcustom ivy-height 10
+  "Number of lines for the minibuffer window.
+
+See also `ivy-height-alist'."
+  :type 'integer)
+
+(defcustom ivy-count-format "%-4d "
+  "The style to use for displaying the current candidate count for `ivy-read'.
+Set this to \"\" to suppress the count visibility.
+Set this to \"(%d/%d) \" to display both the index and the count."
+  :type '(choice
+          (const :tag "Count disabled" "")
+          (const :tag "Count matches" "%-4d ")
+          (const :tag "Count matches and show current match" "(%d/%d) ")
+          string))
+
+(defcustom ivy-pre-prompt-function nil
+  "When non-nil, add strings before the `ivy-read' prompt."
+  :type '(choice
+          (const :tag "Do nothing" nil)
+          (function :tag "Custom function")))
+
+(defcustom ivy-add-newline-after-prompt nil
+  "When non-nil, add a newline after the `ivy-read' prompt."
+  :type 'boolean)
+
+(defcustom ivy-wrap nil
+  "When non-nil, wrap around after the first and the last candidate."
+  :type 'boolean)
+
+(defcustom ivy-display-style 'fancy
+  "The style for formatting the minibuffer.
+
+By default, the matched strings are copied as is.
+
+The fancy display style highlights matching parts of the regexp,
+a behavior similar to `swiper'."
+  :type '(choice
+          (const :tag "Plain" nil)
+          (const :tag "Fancy" fancy)))
+
+(defcustom ivy-on-del-error-function #'abort-recursive-edit
+  "Function to call when deletion fails during completion.
+The usual reason for `ivy-backward-delete-char' to fail is when
+there is no text left to delete, i.e., when it is called at the
+beginning of the minibuffer.
+The default setting provides a quick exit from completion.
+Another common option is `ignore', which does nothing."
+  :type '(choice
+          (const :tag "Exit completion" abort-recursive-edit)
+          (const :tag "Do nothing" ignore)
+          (function :tag "Custom function")))
+
+(defcustom ivy-extra-directories '("../" "./")
+  "Add this to the front of the list when completing file names.
+Only \"./\" and \"../\" apply here.  They appear in reverse order."
+  :type '(repeat :tag "Dirs"
+          (choice
+           (const :tag "Parent Directory" "../")
+           (const :tag "Current Directory" "./"))))
+
+(defcustom ivy-use-virtual-buffers nil
+  "When non-nil, add recent files and/or bookmarks to `ivy-switch-buffer'.
+The value `recentf' includes only recent files to the virtual
+buffers list, whereas the value `bookmarks' does the same for
+bookmarks.  Any other non-nil value includes both."
+  :type '(choice
+          (const :tag "Don't use virtual buffers" nil)
+          (const :tag "Recent files" recentf)
+          (const :tag "Bookmarks" bookmarks)
+          (const :tag "All virtual buffers" t)))
+
+(defvar ivy--display-function nil
+  "The display-function is used in current.")
+
+(defvar ivy-display-functions-props
+  '((ivy-display-function-overlay :cleanup ivy-overlay-cleanup))
+  "Map Ivy display functions to their property lists.
+Examples of properties include associated `:cleanup' functions.")
+
+(defcustom ivy-display-functions-alist
+  '((ivy-completion-in-region . ivy-display-function-overlay)
+    (t . nil))
+  "An alist for customizing where to display the candidates.
+
+Each key is a caller symbol.  When the value is nil (the default),
+the candidates are shown in the minibuffer.  Otherwise, the value
+is a function which takes a string argument comprising the
+current matching candidates and displays it somewhere.
+
+See also `https://github.com/abo-abo/swiper/wiki/ivy-display-function'."
+  :type '(alist
+          :key-type symbol
+          :value-type (choice
+                       (const :tag "Minibuffer" nil)
+                       (const :tag "LV" ivy-display-function-lv)
+                       (const :tag "Popup" ivy-display-function-popup)
+                       (const :tag "Overlay" ivy-display-function-overlay)
+                       (function :tag "Custom function"))))
+
+(defvar ivy-completing-read-dynamic-collection nil
+  "Run `ivy-completing-read' with `:dynamic-collection t`.")
+
+(defcustom ivy-completing-read-handlers-alist
+  '((tmm-menubar . completing-read-default)
+    (tmm-shortcut . completing-read-default)
+    (bbdb-create . ivy-completing-read-with-empty-string-def)
+    (auto-insert . ivy-completing-read-with-empty-string-def)
+    (Info-on-current-buffer . ivy-completing-read-with-empty-string-def)
+    (Info-follow-reference . ivy-completing-read-with-empty-string-def)
+    (Info-menu . ivy-completing-read-with-empty-string-def)
+    (Info-index . ivy-completing-read-with-empty-string-def)
+    (Info-virtual-index . ivy-completing-read-with-empty-string-def)
+    (info-display-manual . ivy-completing-read-with-empty-string-def))
+  "An alist of handlers to replace `completing-read' in `ivy-mode'."
+  :type '(alist :key-type symbol :value-type function))
+
+(defcustom ivy-height-alist nil
+  "An alist to customize `ivy-height'.
+
+It is a list of (CALLER . HEIGHT).  CALLER is a caller of
+`ivy-read' and HEIGHT is the number of lines displayed.
+HEIGHT can also be a function that returns the number of lines."
+  :type '(alist
+          :key-type function
+          :value-type (choice integer function)))
+
+(defvar ivy-completing-read-ignore-handlers-depth -1
+  "Used to avoid infinite recursion.
+
+If `(minibuffer-depth)' equals this, `ivy-completing-read' will
+act as if `ivy-completing-read-handlers-alist' is empty.")
+
+(defvar ivy-highlight-grep-commands nil
+  "List of grep-like commands.")
+
+(defvar ivy--actions-list nil
+  "A list of extra actions per command.")
+
+(defun ivy-set-actions (cmd actions)
+  "Set CMD extra exit points to ACTIONS."
+  (setq ivy--actions-list
+        (plist-put ivy--actions-list cmd actions)))
+
+(defun ivy-add-actions (cmd actions)
+  "Add extra exit points ACTIONS to CMD.
+Existing exit points of CMD are overwritten by those in
+ACTIONS that have the same key."
+  (setq ivy--actions-list
+        (plist-put ivy--actions-list cmd
+                   (cl-delete-duplicates
+                    (append (plist-get ivy--actions-list cmd) actions)
+                    :key #'car :test #'equal))))
+
+(defun ivy--compute-extra-actions (action caller)
+  "Add extra actions to ACTION based on CALLER."
+  (let* ((extra-actions (cl-delete-duplicates
+                         (append (plist-get ivy--actions-list t)
+                                 (plist-get ivy--actions-list this-command)
+                                 (plist-get ivy--actions-list caller))
+                         :key #'car :test #'equal))
+         (override-default (assoc "o" extra-actions)))
+    (cond (override-default
+           (cons 1 (cons override-default
+                         (cl-delete "o" extra-actions
+                                    :key #'car :test #'equal))))
+          ((not extra-actions)
+           action)
+          ((functionp action)
+           `(1
+             ("o" ,action "default")
+             ,@extra-actions))
+          ((null action)
+           `(1
+             ("o" identity "default")
+             ,@extra-actions))
+          (t
+           (cons (car action)
+                 (cl-delete-duplicates (cdr (append action extra-actions))
+                                       :key #'car :test #'equal :from-end t))))))
+
+(defvar ivy--prompts-list nil)
+
+(defun ivy-set-prompt (caller prompt-fn)
+  "Associate CALLER with PROMPT-FN.
+PROMPT-FN is a function of no arguments that returns a prompt string."
+  (setq ivy--prompts-list
+        (plist-put ivy--prompts-list caller prompt-fn)))
+
+(defvar ivy--display-transformers-alist nil
+  "A list of str->str transformers per command.")
+
+(defun ivy-set-display-transformer (cmd transformer)
+  "Set CMD a displayed candidate TRANSFORMER.
+
+It's a lambda that takes a string one of the candidates in the
+collection and returns a string for display, the same candidate
+plus some extra information.
+
+This lambda is called only on the `ivy-height' candidates that
+are about to be displayed, not on the whole collection."
+  (declare (obsolete "use `ivy-configure' :display-transformer-fn instead."
+                     "0.13.2 (2020-05-20)"))
+  (ivy--alist-set 'ivy--display-transformers-alist cmd transformer))
+
+(defvar ivy--sources-list nil
+  "A list of extra sources per command.")
+
+(defun ivy-set-sources (cmd sources)
+  "Attach to CMD a list of extra SOURCES.
+
+Each static source is a function that takes no argument and
+returns a list of strings.
+
+The (original-source) determines the position of the original
+dynamic source.
+
+Extra dynamic sources aren't supported yet.
+
+Example:
+
+    (defun small-recentf ()
+      (cl-subseq recentf-list 0 20))
+
+    (ivy-set-sources
+     \\='counsel-locate
+     \\='((small-recentf)
+       (original-source)))"
+  (setq ivy--sources-list
+        (plist-put ivy--sources-list cmd sources)))
+
+(defun ivy--compute-extra-candidates (caller)
+  (let ((extra-sources (or (plist-get ivy--sources-list caller)
+                           '((original-source))))
+        (result nil))
+    (dolist (source extra-sources)
+      (cond ((equal source '(original-source))
+             (push source result))
+            ((null (cdr source))
+             (push (list (car source) (funcall (car source))) result))))
+    result))
+
+(defvar ivy-current-prefix-arg nil
+  "Prefix arg to pass to actions.
+This is a global variable that is set by ivy functions for use in
+action functions.")
+
+;;; Keymap
+
+(defun ivy-define-key (keymap key def)
+  "Forward to (`define-key' KEYMAP KEY DEF).
+Remove DEF from `counsel-M-x' list."
+  (declare (obsolete define-key "0.16.0"))
+  (function-put def 'no-counsel-M-x t)
+  (define-key keymap key def))
+
+(defun ivy--no-M-x (cmd pred &optional pred-only)
+  "Remove CMD from \\`M-x' completion.
+PRED is either a `completion-predicate' function or a list of
+`command-modes'.  PRED-ONLY nil also excludes CMD from `counsel-M-x'."
+  ;; Avoid unknown defun property warnings with `declare' in Emacs < 28.
+  ;; Test for list rather than function since the latter may not yet be fbound
+  ;; at load time.
+  (let ((prop (if (listp pred) 'command-modes 'completion-predicate)))
+    (function-put cmd prop pred))
+  (unless pred-only
+    (function-put cmd 'no-counsel-M-x t)))
+
+(autoload 'minibuffer-keyboard-quit "delsel" nil t)
+(autoload 'hydra-ivy/body "ivy-hydra" nil t)
+(ivy--no-M-x #'hydra-ivy/body #'ivy--minibuffer-p)
+
+(defvar ivy-minibuffer-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-m") #'ivy-done)
+    (define-key map (kbd "<down-mouse-1>") #'ignore)
+    (define-key map (kbd "<mouse-1>") #'ivy-mouse-done)
+    (define-key map (kbd "<mouse-3>") #'ivy-mouse-dispatching-done)
+    (define-key map (kbd "C-M-m") #'ivy-call)
+    (define-key map (kbd "C-j") #'ivy-alt-done)
+    (define-key map (kbd "C-M-j") #'ivy-immediate-done)
+    (define-key map (kbd "TAB") #'ivy-partial-or-done)
+    (define-key map `[remap ,#'next-line] #'ivy-next-line)
+    (define-key map `[remap ,#'previous-line] #'ivy-previous-line)
+    (define-key map (kbd "C-r") #'ivy-reverse-i-search)
+    (define-key map (kbd "SPC") #'self-insert-command)
+    (define-key map `[remap ,#'delete-backward-char] #'ivy-backward-delete-char)
+    (define-key map `[remap ,#'backward-delete-char-untabify]
+                #'ivy-backward-delete-char)
+    (define-key map `[remap ,#'backward-kill-word] #'ivy-backward-kill-word)
+    (define-key map `[remap ,#'delete-char] #'ivy-delete-char)
+    (define-key map `[remap ,#'forward-char] #'ivy-forward-char)
+    (define-key map (kbd "<right>") #'ivy-forward-char)
+    (define-key map `[remap ,#'kill-word] #'ivy-kill-word)
+    (define-key map `[remap ,#'beginning-of-buffer] #'ivy-beginning-of-buffer)
+    (define-key map `[remap ,#'end-of-buffer] #'ivy-end-of-buffer)
+    (define-key map (kbd "M-n") #'ivy-next-history-element)
+    (define-key map (kbd "M-p") #'ivy-previous-history-element)
+    (define-key map (kbd "C-g") #'minibuffer-keyboard-quit)
+    (define-key map `[remap ,#'scroll-up-command] #'ivy-scroll-up-command)
+    (define-key map `[remap ,#'scroll-down-command] #'ivy-scroll-down-command)
+    (define-key map (kbd "<next>") #'ivy-scroll-up-command)
+    (define-key map (kbd "<prior>") #'ivy-scroll-down-command)
+    (define-key map (kbd "C-v") #'ivy-scroll-up-command)
+    (define-key map (kbd "M-v") #'ivy-scroll-down-command)
+    (define-key map (kbd "C-M-n") #'ivy-next-line-and-call)
+    (define-key map (kbd "C-M-p") #'ivy-previous-line-and-call)
+    (define-key map (kbd "M-a") #'ivy-toggle-marks)
+    (define-key map (kbd "M-r") #'ivy-toggle-regexp-quote)
+    (define-key map (kbd "M-j") #'ivy-yank-word)
+    (define-key map (kbd "M-i") #'ivy-insert-current)
+    (define-key map (kbd "C-M-y") #'ivy-insert-current-full)
+    (define-key map (kbd "C-o") #'hydra-ivy/body)
+    (define-key map (kbd "M-o") #'ivy-dispatching-done)
+    (define-key map (kbd "C-M-o") #'ivy-dispatching-call)
+    (define-key map `[remap ,#'kill-line] #'ivy-kill-line)
+    (define-key map `[remap ,#'kill-whole-line] #'ivy-kill-whole-line)
+    (define-key map (kbd "S-SPC") #'ivy-restrict-to-matches)
+    (define-key map `[remap ,#'kill-ring-save] #'ivy-kill-ring-save)
+    (define-key map (kbd "C-M-a") #'ivy-read-action)
+    (define-key map (kbd "C-c C-o") #'ivy-occur)
+    (define-key map (kbd "C-c C-a") #'ivy-toggle-ignore)
+    (define-key map (kbd "C-c C-s") #'ivy-rotate-sort)
+    (define-key map `[remap ,#'describe-mode] #'ivy-help)
+    (define-key map (kbd "$") #'ivy-magic-read-file-env)
+    map)
+  "Keymap used in the minibuffer.")
+
+(defvar ivy-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map `[remap ,#'switch-to-buffer] #'ivy-switch-buffer)
+    (define-key map `[remap ,#'switch-to-buffer-other-window]
+                    #'ivy-switch-buffer-other-window)
+    map)
+  "Keymap for `ivy-mode'.")
+
+;;; Globals
+
+(cl-defstruct ivy-state
+  "State representing a call to `ivy-read'."
+  prompt collection
+  predicate require-match initial-input
+  history preselect keymap update-fn sort
+  (frame
+   nil :type frame :documentation
+   "The frame in which `ivy-read' was called.")
+  (window
+   nil :type window :documentation
+   "The window in which `ivy-read' was called.")
+  (buffer
+   nil :type buffer :documentation
+   "The buffer in which `ivy-read' was called.")
+  (text
+   nil :type string :documentation
+   "The value of `ivy-text' to be used by `ivy-occur'.")
+  action
+  unwind
+  re-builder
+  matcher
+  (dynamic-collection
+   nil :documentation
+   "When non-nil, call collection anew for each input change.")
+  (display-transformer-fn
+   nil :documentation
+   "A function that formats candidates for display.")
+  directory
+  caller
+  current
+  def
+  ignore
+  multi-action
+  extra-props)
+
+(defvar ivy-last (make-ivy-state)
+  "The last parameters passed to `ivy-read'.
+
+This should eventually become a stack so that you could use
+`ivy-read' recursively.")
+
+(defvar ivy--sessions nil
+  "Alist mapping session symbols to `ivy-state' objects.")
+
+(defvar ivy-recursive-last nil)
+
+(defvar ivy-recursive-restore t
+  "When non-nil, restore the above state when exiting the minibuffer.
+This variable is let-bound to nil by functions that take care of
+the restoring themselves.")
+
+(defsubst ivy-set-action (action)
+  "Set the current `ivy-last' field to ACTION."
+  (setf (ivy-state-action ivy-last) action))
+
+(defvar inhibit-message)
+
+(defvar ffap-machine-p-known)
+
+(defun ivy-thing-at-point ()
+  "Return a string that corresponds to the current thing at point."
+  (substring-no-properties
+   (cond
+     ((use-region-p)
+      (let* ((beg (region-beginning))
+             (end (region-end))
+             (eol (save-excursion (goto-char beg) (line-end-position))))
+        (buffer-substring-no-properties beg (min end eol))))
+     ((let ((url (thing-at-point 'url)))
+        ;; Work around `https://bugs.gnu.org/58091'.
+        (and (stringp url) url)))
+     ((and (eq (ivy-state-collection ivy-last) #'read-file-name-internal)
+           (let ((inhibit-message t)
+                 (ffap-machine-p-known 'reject))
+             (run-hook-with-args-until-success 'file-name-at-point-functions))))
+     ((let ((s (thing-at-point 'symbol)))
+        (and (stringp s)
+             (if (string-match "\\`[`']?\\(.*?\\)'?\\'" s)
+                 (match-string 1 s)
+               s))))
+     ((looking-at "(+\\(\\(?:\\sw\\|\\s_\\)+\\)\\_>")
+      (match-string-no-properties 1))
+     (t
+      ""))))
+
+(defvar ivy-history nil
+  "History list of candidates entered in the minibuffer.
+
+Maximum length of the history list is determined by the value
+of `history-length'.")
+
+(defvar ivy--directory nil
+  "Current directory when completing file names.")
+
+(defvar ivy--directory-hist nil
+  "Store the history of directories.
+This allows RET to reverse consecutive DEL.")
+
+(defvar ivy--length 0
+  "Store the amount of viable candidates.")
+
+(defvar ivy-text ""
+  "Store the user's string as it is typed in.")
+
+(defvar ivy-regex ""
+  "Store the regex value that corresponds to `ivy-text'.")
+
+(defvar ivy--regex-function #'ivy--regex
+  "Current function for building a regex.")
+
+(defun ivy-set-text (str)
+  "Set `ivy-text' to STR."
+  (setq ivy-text str)
+  (setq ivy-regex (funcall ivy--regex-function ivy-text)))
+
+(defvar ivy--index 0
+  "Store the index of the current candidate.")
+
+(defvar ivy--window-index 0
+  "Store the index of the current candidate in the minibuffer window.
+
+This means it's between 0 and `ivy-height'.")
+
+(defvar ivy-exit nil
+  "Store `done' if the completion was successfully selected.
+Otherwise, store nil.")
+
+(defvar ivy--all-candidates nil
+  "Store the candidates passed to `ivy-read'.")
+
+(defvar ivy--extra-candidates '((original-source))
+  "Store candidates added by the extra sources.
+
+This is an internal-use alist.  Each key is a function name, or
+original-source (which represents where the current dynamic
+candidates should go).
+
+Each value is an evaluation of the function, in case of static
+sources.  These values will subsequently be filtered on `ivy-text'.
+
+This variable is set by `ivy-read' and used by `ivy--set-candidates'.")
+
+(defcustom ivy-use-ignore-default t
+  "The default policy for user-configured candidate filtering."
+  :type '(choice
+          (const :tag "Ignore ignored always" always)
+          (const :tag "Ignore ignored when others exist" t)
+          (const :tag "Don't ignore" nil)))
+
+(defvar ivy-use-ignore t
+  "Store policy for user-configured candidate filtering.
+This may be changed dynamically by `ivy-toggle-ignore'.
+Use `ivy-use-ignore-default' for a permanent configuration.")
+
+(defvar ivy--default nil
+  "Default initial input.")
+
+(defvar ivy--prompt nil
+  "Store the format-style prompt.
+When non-nil, it should contain at least one %d.")
+
+(defvar ivy--prompt-extra ""
+  "Temporary modifications to the prompt.")
+
+(defvar ivy--old-re nil
+  "Store the old regexp.
+Either a string or a list for `ivy-re-match'.")
+
+(defvar ivy--old-cands nil
+  "Store the candidates matched by `ivy--old-re'.")
+
+(defvar ivy--highlight-function 'ivy--highlight-default
+  "Current function for formatting the candidates.")
+
+(defvar ivy--subexps 0
+  "Number of groups in the current `ivy--regex'.")
+
+(defvar ivy--full-length nil
+  "The total amount of candidates when :dynamic-collection is non-nil.")
+
+(defvar ivy--old-text ""
+  "Store old `ivy-text' for dynamic completion.")
+
+(defvar ivy--trying-to-resume-dynamic-collection nil
+  "Non-nil if resuming from a dynamic collection.
+When non-nil, ivy will wait until the first chunk of asynchronous
+candidates has been received before selecting the last
+preselected candidate.")
+
+(defun ivy--set-index-dynamic-collection ()
+  (when ivy--trying-to-resume-dynamic-collection
+    (let ((preselect-index
+           (ivy--preselect-index (ivy-state-preselect ivy-last) ivy--all-candidates)))
+      (when preselect-index
+        (ivy-set-index preselect-index)))
+    (setq ivy--trying-to-resume-dynamic-collection nil)))
+
+(defcustom ivy-case-fold-search-default
+  (if search-upper-case
+      'auto
+    case-fold-search)
+  "The default value for `case-fold-search' in Ivy operations.
+The special value `auto' means case folding is performed so long
+as the entire input string comprises lower-case characters.  This
+corresponds to the default behaviour of most Emacs search
+functionality, e.g. as seen in `isearch'."
+  :link '(info-link "(emacs)Lax Search")
+  :type '(choice
+          (const :tag "Auto" auto)
+          (const :tag "Always" t)
+          (const :tag "Never" nil)))
+
+(defvar ivy-case-fold-search ivy-case-fold-search-default
+  "Store the current overriding `case-fold-search'.")
+
+(defcustom ivy-more-chars-alist
+  '((t . 3))
+  "Map commands to their minimum required input length.
+That is the number of characters prompted for before fetching
+candidates.  The special key t is used as a fallback."
+  :type '(alist :key-type symbol :value-type integer))
+
+(defun ivy-more-chars ()
+  "Return two fake candidates prompting for at least N input.
+N is obtained from `ivy-more-chars-alist'."
+  (let ((diff (- (ivy-alist-setting ivy-more-chars-alist)
+                 (length ivy-text))))
+    (when (> diff 0)
+      (list "" (format "%d chars more" diff)))))
+
+(defun ivy--case-fold-p (string)
+  "Return nil if STRING should be matched case-sensitively."
+  (if (eq ivy-case-fold-search 'auto)
+      (string= string (downcase string))
+    ivy-case-fold-search))
+
+(defun ivy--case-fold-string= (s1 s2)
+  "Like `string=', but obeys `case-fold-search'."
+  (eq t (compare-strings s1 nil nil s2 nil nil case-fold-search)))
+
+(defmacro ivy-quit-and-run (&rest body)
+  "Quit the minibuffer and run BODY afterwards."
+  (declare (indent 0))
+  `(progn
+     (put 'quit 'error-message "")
+     (run-at-time nil nil
+                  (lambda ()
+                    (put 'quit 'error-message "Quit")
+                    (with-demoted-errors "Error: %S"
+                      ,@body)))
+     (abort-recursive-edit)))
+
+(defun ivy-exit-with-action (action &optional exit-code)
+  "Quit the minibuffer and call ACTION afterwards."
+  (ivy-set-action
+   `(lambda (x)
+      (funcall ',action x)
+      (ivy-set-action ',(ivy-state-action ivy-last))))
+  (setq ivy-exit (or exit-code 'done))
+  (exit-minibuffer))
+
+(defmacro with-ivy-window (&rest body)
+  "Execute BODY in the window from which `ivy-read' was called."
+  (declare (indent 0)
+           (debug t))
+  `(with-selected-window (ivy--get-window ivy-last)
+     ,@body))
+
+(defun ivy--expand-file-name (text)
+  (cond
+    ((eq (ivy-state-history ivy-last) 'grep-files-history)
+     text)
+    (ivy--directory
+     (if (and (string-match-p "^/" text) (file-remote-p ivy--directory))
+         (let ((parts (split-string ivy--directory ":")))
+           (concat (nth 0 parts) ":" (nth 1 parts) ":" text))
+       (expand-file-name text ivy--directory)))
+    (t
+     text)))
+
+(defun ivy--done (text)
+  "Insert TEXT and exit minibuffer."
+  (if (member (ivy-state-prompt ivy-last) '("Create directory: " "Make directory: "))
+      (ivy-immediate-done)
+    (when (stringp text)
+      (insert
+       (setf (ivy-state-current ivy-last)
+             (ivy--expand-file-name text))))
+    (setq ivy-exit 'done)
+    (exit-minibuffer)))
+
+(defcustom ivy-use-selectable-prompt nil
+  "When non-nil, make the prompt line selectable like a candidate.
+
+The prompt line can be selected by calling `ivy-previous-line' when the first
+regular candidate is selected.  Both actions `ivy-done' and `ivy-alt-done',
+when called on a selected prompt, are forwarded to `ivy-immediate-done', which
+results to the same as calling `ivy-immediate-done' explicitly when a regular
+candidate is selected.
+
+Note that if `ivy-wrap' is set to t, calling `ivy-previous-line' when the
+prompt is selected wraps around to the last candidate, while calling
+`ivy-next-line' on the last candidate wraps around to the first
+candidate, not the prompt."
+  :type 'boolean)
+
+(defvar ivy--use-selectable-prompt nil
+  "Store the effective `ivy-use-selectable-prompt' for current session.")
+
+(defun ivy--prompt-selectable-p ()
+  "Return t if the prompt line is selectable."
+  (and ivy-use-selectable-prompt
+       (or (memq (ivy-state-require-match ivy-last)
+                 '(nil confirm confirm-after-completion))
+           ;; :require-match is t, but "" is in the collection
+           (let ((coll (ivy-state-collection ivy-last)))
+             (and (listp coll)
+                  (if (consp (car coll))
+                      (member '("") coll)
+                    (member "" coll)))))))
+
+(defun ivy--prompt-selected-p ()
+  "Return t if the prompt line is selected."
+  (and ivy--use-selectable-prompt
+       (= ivy--index -1)))
+
+;;; Commands
+
+(defun ivy-done ()
+  "Exit the minibuffer with the selected candidate."
+  (interactive)
+  (if (ivy--prompt-selected-p)
+      (ivy-immediate-done)
+    (setq ivy-current-prefix-arg current-prefix-arg)
+    (let ((require-match (ivy-state-require-match ivy-last))
+          (input (ivy--input)))
+      (delete-minibuffer-contents)
+      (cond ((and (= ivy--length 0)
+                  (eq this-command 'ivy-dispatching-done))
+             (ivy--done ivy-text))
+            ((or (> ivy--length 0)
+                 ;; the action from `ivy-dispatching-done' may not need a
+                 ;; candidate at all
+                 (eq this-command 'ivy-dispatching-done))
+             (ivy--done (ivy-state-current ivy-last)))
+            ((string= " (confirm)" ivy--prompt-extra)
+             (ivy--done ivy-text))
+            ((or (and (memq (ivy-state-collection ivy-last)
+                            '(read-file-name-internal internal-complete-buffer))
+                      (eq confirm-nonexistent-file-or-buffer t))
+                 (and (functionp require-match)
+                      (setq require-match (funcall require-match))))
+             (setq ivy--prompt-extra " (confirm)")
+             (insert input)
+             (ivy--exhibit))
+            ((memq require-match '(nil confirm confirm-after-completion))
+             (ivy--done ivy-text))
+            (t
+             (setq ivy--prompt-extra " (match required)")
+             (insert ivy-text)
+             (ivy--exhibit))))))
+(ivy--no-M-x #'ivy-done #'ivy--minibuffer-p)
+
+(defvar ivy-mouse-1-tooltip
+  "Exit the minibuffer with the selected candidate."
+  "The doc visible in the tooltip for mouse-1 binding in the minibuffer.")
+(defvar ivy-mouse-3-tooltip
+  "Display alternative actions."
+  "The doc visible in the tooltip for mouse-3 binding in the minibuffer.")
+
+(make-obsolete-variable 'ivy-mouse-1-tooltip 'ivy-mouse-1-help
+                        "0.15.0 (2024-01-14)")
+(make-obsolete-variable 'ivy-mouse-3-tooltip 'ivy-mouse-3-help
+                        "0.15.0 (2024-01-14)")
+
+(defvar ivy-mouse-1-help
+  (format (if (> emacs-major-version 28) "\\`%s': %s" "%s: %s")
+          "mouse-1" "Exit the minibuffer with the selected candidate")
+  "Tooltip doc for \\`mouse-1' binding in the minibuffer.")
+
+(defvar ivy-mouse-3-help
+  (format (if (> emacs-major-version 28) "\\`%s': %s" "%s: %s")
+          "mouse-3" "Display alternative actions")
+  "Tooltip doc for \\`mouse-3' binding in the minibuffer.")
+
+(defun ivy--help-echo (_win _obj _pos)
+  "Return a `help-echo' string for mouse bindings on minibuffer candidates."
+  (concat ivy-mouse-1-help (if tooltip-mode "\n" "   ") ivy-mouse-3-help))
+
+(defun ivy-mouse-offset (event)
+  "Compute the offset between the candidate at point and the selected one."
+  (if event
+      (let* ((line-number-at-point
+              (max 2
+                   (line-number-at-pos (posn-point (event-start event)))))
+
+             (line-number-candidate ;; convert to 0 based index
+              (- line-number-at-point 2))
+             (offset
+              (- line-number-candidate
+                 ivy--window-index)))
+        offset)
+    nil))
+
+(defun ivy--mouse-done (event done)
+  "Move to minibuffer mouse EVENT and call DONE."
+  (let ((offset (ivy-mouse-offset event)))
+    (when offset
+      (ivy-next-line offset)
+      (ivy--exhibit)
+      (funcall done))))
+
+(defun ivy-mouse-done (event)
+  (interactive "@e")
+  (ivy--mouse-done event #'ivy-alt-done))
+(ivy--no-M-x #'ivy-mouse-done #'ivy--minibuffer-p)
+
+(defun ivy-mouse-dispatching-done (event)
+  (interactive "@e")
+  (ivy--mouse-done event #'ivy-dispatching-done))
+(ivy--no-M-x #'ivy-mouse-dispatching-done #'ivy--minibuffer-p)
+
+(defcustom ivy-read-action-format-function 'ivy-read-action-format-default
+  "Function used to transform the actions list into a docstring."
+  :type '(radio
+          (function-item ivy-read-action-format-default)
+          (function-item ivy-read-action-format-columns)))
+
+(defun ivy-read-action-format-default (actions)
+  "Create a docstring from ACTIONS.
+
+ACTIONS is a list.  Each list item is a list of 3 items:
+key (a string), cmd and doc (a string)."
+  (format "%s\n%s\n"
+          (if (eq this-command 'ivy-read-action)
+              "Select action: "
+            (ivy-state-current ivy-last))
+          (mapconcat
+           (lambda (x)
+             (format "%s: %s"
+                     (propertize
+                      (car x)
+                      'face 'ivy-action)
+                     (nth 2 x)))
+           actions
+           "\n")))
+
+(defun ivy-read-action-format-columns (actions)
+  "Create a potentially multi-column docstring from ACTIONS.
+Several columns are used as needed to preserve `ivy-height'.
+
+ACTIONS is a list with elements of the form (KEY COMMAND DOC),
+where KEY and DOC are strings."
+  (let ((length (length actions))
+        (i 0)
+        (max-rows (- ivy-height 1))
+        rows cols col lwidth rwidth)
+    (while (< i length)
+      (setq col (cl-subseq actions i (min length (cl-incf i max-rows))))
+      (setq lwidth (apply 'max (mapcar (lambda (x)
+                                         (length (nth 0 x)))
+                                       col)))
+      (setq rwidth (apply 'max (mapcar (lambda (x)
+                                         (length (nth 2 x)))
+                                       col)))
+      (setq col (mapcar (lambda (x)
+                          (format (format "%%%ds: %%-%ds" lwidth rwidth)
+                                  (propertize (car x) 'face 'ivy-action)
+                                  (nth 2 x)))
+                        col))
+      (cond
+        ((null rows)
+         (setq rows (length col)))
+        ((< (length col) rows)
+         (setq col (append col (make-list (- rows (length col)) "")))))
+      (push col cols))
+    (format "%s\n%s\n"
+            (if (eq this-command 'ivy-read-action)
+                "Select action: "
+              (ivy-state-current ivy-last))
+            (mapconcat 'identity
+                       (apply 'cl-mapcar
+                              (lambda (&rest args)
+                                (mapconcat 'identity args " | "))
+                              (nreverse cols))
+                       "\n"))))
+
+(autoload 'ivy-hydra-read-action "ivy-hydra")
+(defcustom ivy-read-action-function #'ivy-read-action-by-key
+  "Function used to read an action."
+  :type `(radio
+          (function-item ,#'ivy-read-action-by-key)
+          (function-item ,#'ivy-read-action-ivy)
+          (function-item ,#'ivy-hydra-read-action)))
+
+(defun ivy-read-action ()
+  "Change the action to one of the available ones.
+
+Return nil for `minibuffer-keyboard-quit' or wrong key during the
+selection, non-nil otherwise."
+  (interactive)
+  (let ((actions (ivy-state-action ivy-last)))
+    (if (not (ivy--actionp actions))
+        t
+      (let ((ivy--directory ivy--directory))
+        (funcall ivy-read-action-function actions)))))
+(ivy--no-M-x #'ivy-read-action #'ivy--minibuffer-p)
+
+(defvar set-message-function)
+
+(defun ivy-read-action-by-key (actions)
+  (let* ((set-message-function nil)
+         (hint (funcall ivy-read-action-format-function (cdr actions)))
+         (resize-mini-windows t)
+         (key "")
+         action-idx)
+    (while (and (setq action-idx (cl-position-if
+                                  (lambda (x)
+                                    (string-prefix-p key (car x)))
+                                  (cdr actions)))
+                (not (string= key (car (nth action-idx (cdr actions))))))
+      (setq key (concat key (key-description (vector (read-key hint))))))
+    ;; Ignore resize errors with minibuffer-only frames (#2726).
+    (ignore-errors (ivy-shrink-after-dispatching))
+    (cond ((member key '("ESC" "C-g" "M-o"))
+           nil)
+          ((null action-idx)
+           (message "%s is not bound" key)
+           nil)
+          (t
+           (message "")
+           (setcar actions (1+ action-idx))
+           (ivy-set-action actions)))))
+
+(defvar ivy-marked-candidates nil
+  "List of marked candidates.
+Use `ivy-mark' to populate this.
+
+When this list is non-nil at the end of the session, the action
+will be called for each element of this list.")
+
+(defun ivy-read-action-ivy (actions)
+  "Select an action from ACTIONS using Ivy."
+  (let ((enable-recursive-minibuffers t))
+    (if (and (> (minibuffer-depth) 1)
+             (eq (ivy-state-caller ivy-last) 'ivy-read-action-ivy))
+        (minibuffer-keyboard-quit)
+      (let ((ivy-marked-candidates ivy-marked-candidates))
+        (ivy-read (format "action (%s): " (ivy-state-current ivy-last))
+                  (cl-mapcar
+                   (lambda (a i) (cons (format "[%s] %s" (nth 0 a) (nth 2 a)) i))
+                   (cdr actions) (number-sequence 1 (length (cdr actions))))
+                  :action (lambda (a)
+                            (setcar actions (cdr a))
+                            (ivy-set-action actions))
+                  :caller 'ivy-read-action-ivy)))))
+
+(defun ivy-shrink-after-dispatching ()
+  "Shrink the window after dispatching when action list is too large."
+  (when (window-minibuffer-p)
+    (window-resize nil (- ivy-height (window-height)))))
+
+(defun ivy-dispatching-done ()
+  "Select one of the available actions and call `ivy-done'."
+  (interactive)
+  (let ((ivy-exit 'ivy-dispatching-done))
+    (when (ivy-read-action)
+      (ivy-done)))
+  (ivy-shrink-after-dispatching))
+(ivy--no-M-x #'ivy-dispatching-done #'ivy--minibuffer-p)
+
+(defun ivy-dispatching-call ()
+  "Select one of the available actions and call `ivy-call'."
+  (interactive)
+  (setq ivy-current-prefix-arg current-prefix-arg)
+  (let ((actions (copy-sequence (ivy-state-action ivy-last)))
+        (old-ivy-text ivy-text))
+    (unwind-protect
+         (when (ivy-read-action)
+           (ivy-set-text old-ivy-text)
+           (ivy-call))
+      (ivy-set-action actions)))
+  (ivy-shrink-after-dispatching))
+(ivy--no-M-x #'ivy-dispatching-call #'ivy--minibuffer-p)
+
+(defun ivy-build-tramp-name (x)
+  "Reconstruct X into a path.
+Is is a cons cell, related to `tramp-get-completion-function'."
+  (let ((user (car x))
+        (domain (cadr x)))
+    (if user
+        (concat user "@" domain)
+      domain)))
+
+(declare-function Info-find-node "info")
+(declare-function Info-read-node-name-1 "info")
+(declare-function tramp-get-completion-function "tramp")
+
+(defcustom ivy-alt-done-functions-alist nil
+  "Customize what `ivy-alt-done' does per-collection."
+  :type '(alist :key-type symbol :value-type function))
+
+(defun ivy--completing-fname-p ()
+  (let* ((table (ivy-state-collection ivy-last))
+         (md (condition-case nil
+                 (completion-metadata ivy-text table nil)
+               (error '(metadata)))))
+    (eq (ivy--metadata-get md 'category) 'file)))
+
+(defun ivy-alt-done (&optional arg)
+  "Exit the minibuffer with the selected candidate.
+When ARG is t, exit with current text, ignoring the candidates.
+When the current candidate during file name completion is a
+directory, continue completion from within that directory instead
+of exiting.  This function is otherwise like `ivy-done'."
+  (interactive "P")
+  (setq ivy-current-prefix-arg current-prefix-arg)
+  (let (alt-done-fn)
+    (cond ((or arg (ivy--prompt-selected-p))
+           (ivy-immediate-done))
+          ((setq alt-done-fn (ivy-alist-setting ivy-alt-done-functions-alist))
+           (funcall alt-done-fn))
+          ((ivy--completing-fname-p)
+           (ivy--directory-done))
+          (t
+           (ivy-done)))))
+(ivy--no-M-x #'ivy-alt-done #'ivy--minibuffer-p)
+
+(defun ivy--info-alt-done ()
+  (if (member (ivy-state-current ivy-last) '("(./)" "(../)"))
+      (ivy-quit-and-run
+        (ivy-read "Go to file: " #'read-file-name-internal
+                  :action (lambda (x)
+                            (Info-find-node
+                             (expand-file-name x ivy--directory)
+                             "Top"))))
+    (ivy-done)))
+
+(defvar ivy-auto-select-single-candidate nil
+  "When non-nil, auto-select the candidate if it is the only one.
+When t, it is the same as if the user were prompted and selected the candidate
+by calling the default action.  This variable has no use unless the collection
+contains a single candidate.")
+
+(defun ivy--directory-enter ()
+  (let (dir)
+    (when (and
+           (> ivy--length 0)
+           (not (string= (ivy-state-current ivy-last) "./"))
+           (setq dir (ivy-expand-file-if-directory (ivy-state-current ivy-last))))
+      (ivy--cd dir)
+      (ivy--exhibit))))
+
+(defun ivy--handle-directory (input)
+  "Detect the next directory based on special values of INPUT."
+  (cond ((string= input "/")
+         "/")
+        ((string= input "/sudo::")
+         (concat input ivy--directory))))
+
+(defun ivy--tramp-candidates ()
+  (let ((method (match-string 1 ivy-text))
+        (user (match-string 2 ivy-text))
+        (rest (match-string 3 ivy-text))
+        res)
+    (dolist (x (tramp-get-completion-function method))
+      (setq res (append res (funcall (car x) (cadr x)))))
+    (setq res (delq nil res))
+    (when user
+      (dolist (x res)
+        (setcar x user)))
+    (setq res (delete-dups res))
+    (let* ((old-ivy-last ivy-last)
+           (enable-recursive-minibuffers t)
+           (host (let ((ivy-auto-select-single-candidate nil))
+                   (ivy-read "user@host: "
+                             (mapcar #'ivy-build-tramp-name res)
+                             :initial-input rest))))
+      (setq ivy-last old-ivy-last)
+      (when host
+        (setq ivy--directory "/")
+        (ivy--cd (concat "/" method ":" host ":/"))))))
+
+(defun ivy--directory-done ()
+  "Handle exit from the minibuffer when completing file names."
+  (let ((dir (ivy--handle-directory ivy-text)))
+    (cond ((equal (ivy-state-current ivy-last) (ivy-state-def ivy-last))
+           (ivy-done))
+          ((and (ivy-state-require-match ivy-last)
+                (equal ivy-text "")
+                (null ivy--old-cands))
+           (ivy-immediate-done))
+          (dir
+           (let ((inhibit-message t))
+             (ivy--cd dir)))
+          ((ivy--directory-enter))
+          ((unless (string= ivy-text "")
+             ;; Obsolete since 26.1 and removed in 28.1.
+             (defvar tramp-completion-mode)
+             (with-no-warnings
+               (let* ((tramp-completion-mode t)
+                      ;; Alternative to `tramp-completion-mode' in newer Tramp.
+                      (non-essential t)
+                      ;; Non-nil changes completion since Tramp 2.6.0.2.
+                      (minibuffer-completing-file-name nil)
+                      (file (expand-file-name
+                             (if (> ivy--length 0) (ivy-state-current ivy-last) ivy-text)
+                             ivy--directory)))
+                 (when (ignore-errors (file-exists-p file))
+                   (if (file-directory-p file)
+                       (ivy--cd (file-name-as-directory file))
+                     (ivy-done))
+                   ivy-text)))))
+          ((or (and (equal ivy--directory "/")
+                    (string-match-p "\\`[^/]+:.*:.*\\'" ivy-text))
+               (string-match-p "\\`/[^/]+:.*:.*\\'" ivy-text))
+           (ivy-done))
+          ((ivy--tramp-prefix-p)
+           (ivy--tramp-candidates))
+          (t
+           (ivy-done)))))
+
+(defun ivy--tramp-prefix-p ()
+  (or (and (equal ivy--directory "/")
+           (cond ((string-match
+                   "\\`\\([^/]+?\\):\\(?:\\(.*\\)@\\)?\\(.*\\)\\'"
+                   ivy-text)
+                  (save-match-data
+                    (ivy-set-text (ivy-state-current ivy-last))))
+                 ((string-match
+                   "\\`\\([^/]+?\\):\\(?:\\(.*\\)@\\)?\\(.*\\)\\'"
+                   (ivy-state-current ivy-last))
+                  (save-match-data
+                    (ivy-set-text (ivy-state-current ivy-last))))))
+      (string-match
+       "\\`/\\([^/]+?\\):\\(?:\\(.*\\)@\\)?\\(.*\\)\\'"
+       ivy-text)))
+
+(defun ivy-expand-file-if-directory (file-name)
+  "Expand FILE-NAME as directory.
+When this directory doesn't exist, return nil."
+  (when (stringp file-name)
+    (let ((full-name
+           ;; Ignore host name must not match method "ssh"
+           (ignore-errors
+             (file-name-as-directory
+              (expand-file-name file-name ivy--directory)))))
+      (when (and full-name (file-directory-p full-name))
+        full-name))))
+
+(defcustom ivy-tab-space nil
+  "When non-nil, `ivy-partial-or-done' should insert a space."
+  :type 'boolean)
+
+(defun ivy-partial-or-done ()
+  "Complete the minibuffer text as much as possible.
+If the text hasn't changed as a result, forward to `ivy-alt-done'."
+  (interactive)
+  (cond
+    ((and (numberp completion-cycle-threshold)
+          (< (length ivy--all-candidates) completion-cycle-threshold))
+     (let ((ivy-wrap t))
+       (ivy-next-line)))
+    ((and (eq (ivy-state-collection ivy-last) #'read-file-name-internal)
+          (or (and (equal ivy--directory "/")
+                   (string-match-p "\\`[^/]+:.*\\'" ivy-text))
+              (= (string-to-char ivy-text) ?/)))
+     (let ((default-directory ivy--directory)
+           dir)
+       (minibuffer-complete)
+       (ivy-set-text (ivy--input))
+       (when (setq dir (ivy-expand-file-if-directory ivy-text))
+         (ivy--cd dir))))
+    (t
+     (or (ivy-partial)
+         (when (or (eq this-command last-command)
+                   (eq ivy--length 1))
+           (ivy-alt-done))))))
+(ivy--no-M-x #'ivy-partial-or-done #'ivy--minibuffer-p)
+
+(defun ivy--partial-cd-for-single-directory ()
+  (when (and
+         (eq (ivy-state-collection ivy-last) #'read-file-name-internal)
+         (= 1 (length
+               (ivy--re-filter
+                (funcall ivy--regex-function
+                         (concat "^" (string-remove-prefix "^" ivy-text)))
+                ivy--all-candidates)))
+         (let ((default-directory ivy--directory))
+           (file-directory-p (ivy-state-current ivy-last))))
+    (ivy--directory-done)))
+
+(defun ivy-partial ()
+  "Complete the minibuffer text as much as possible."
+  (interactive)
+  (if (ivy-state-dynamic-collection ivy-last)
+      (let* ((table (ivy-state-collection ivy-last))
+             (suf (buffer-substring (point) (ivy--pos-eol)))
+             (bnd (ignore-errors
+                    (completion-boundaries ivy-text table nil suf)))
+             (beg (+ (minibuffer-prompt-end)
+                     (or (car bnd) 0))))
+        (delete-region beg (point-max))
+        (insert (ivy-state-current ivy-last))
+        t)
+    (let* ((parts (or (ivy--split-spaces ivy-text) (list "")))
+           (tail (last parts))
+           (postfix (car tail))
+           (case-fold-search (ivy--case-fold-p ivy-text))
+           (completion-ignore-case case-fold-search)
+           (new (try-completion (string-remove-prefix "^" postfix)
+                                (mapcar (lambda (str)
+                                          (let ((i (string-match-p postfix str)))
+                                            (and i (substring str i))))
+                                        ivy--old-cands))))
+      (cond
+        ((eq new t) nil)
+        ((string= new ivy-text) nil)
+        ((string= (car tail) (car (ivy--split-spaces new))) nil)
+        (new
+         (delete-region (minibuffer-prompt-end) (point-max))
+         (setcar tail
+                 (if (= (string-to-char postfix) ?^)
+                     (concat "^" new)
+                   new))
+         (ivy-set-text
+          (concat
+           (mapconcat #'identity parts " ")
+           (and ivy-tab-space (not (= (length ivy--old-cands) 1)) " ")))
+         (insert ivy-text)
+         (ivy--partial-cd-for-single-directory)
+         t)))))
+(ivy--no-M-x #'ivy-partial #'ivy--minibuffer-p)
+
+(defvar ivy-completion-beg nil
+  "Completion bounds start.")
+
+(defvar ivy-completion-end nil
+  "Completion bounds end.")
+
+(defun ivy-immediate-done ()
+  "Exit the minibuffer with current input instead of current candidate."
+  (interactive)
+  (delete-minibuffer-contents)
+  (setf (ivy-state-current ivy-last)
+        (cond ((or (not ivy--directory)
+                   (eq (ivy-state-history ivy-last) 'grep-files-history))
+               ivy-text)
+              ((and (string= ivy-text "")
+                    (eq (ivy-state-collection ivy-last)
+                        #'read-file-name-internal))
+               (if (ivy-state-def ivy-last)
+                   (if (and
+                        (file-exists-p (ivy-state-def ivy-last))
+                        (/= (length ivy--directory)
+                            (1+ (length (expand-file-name (ivy-state-def ivy-last))))))
+                       ivy--directory
+                     (copy-sequence (ivy-state-def ivy-last)))
+                 ivy--directory))
+              (t
+               (expand-file-name ivy-text ivy--directory))))
+  (insert (ivy-state-current ivy-last))
+  (setq ivy-completion-beg ivy-completion-end)
+  (setq ivy-exit 'done)
+  (exit-minibuffer))
+(ivy--no-M-x #'ivy-immediate-done #'ivy--minibuffer-p)
+
+(defun ivy--restore-session (&optional session)
+  "Resume a recorded completion SESSION, if any exists."
+  (when ivy--sessions
+    (unless session
+      (setq session (intern
+                     (let ((ivy-last ivy-last)
+                           ivy--all-candidates
+                           ivy-text)
+                       (ivy-read "Choose ivy session: "
+                                 ivy--sessions
+                                 :require-match t)))))
+    (setq ivy-last (or (cdr (assq session ivy--sessions))
+                       ivy-last)))
+  (let ((data (plist-get (ivy-state-extra-props ivy-last) :ivy-data)))
+    (when data
+      (setq ivy--all-candidates (plist-get data :all-candidates))
+      (setq ivy-text (plist-get data :text)))))
+
+;;;###autoload
+(defun ivy-resume (&optional session)
+  "Resume the last completion session, or SESSION if non-nil.
+With a prefix arg, try to restore a recorded completion session,
+if one exists."
+  (interactive)
+  (when (or current-prefix-arg session)
+    (ivy--restore-session session))
+
+  (if (or (null (ivy-state-action ivy-last))
+          (eq (ivy--get-action ivy-last) #'identity))
+      (user-error "The last session isn't compatible with `ivy-resume'")
+    (when (memq (ivy-state-caller ivy-last)
+                '(swiper
+                  swiper-isearch swiper-backward
+                  swiper-isearch-backward
+                  counsel-grep))
+      (switch-to-buffer (ivy-state-buffer ivy-last)))
+    (with-current-buffer (ivy-state-buffer ivy-last)
+      (let ((default-directory (ivy-state-directory ivy-last))
+            (ivy-use-ignore-default (ivy-state-ignore ivy-last)))
+        (ivy-read
+         (ivy-state-prompt ivy-last)
+         (ivy-state-collection ivy-last)
+         :predicate (ivy-state-predicate ivy-last)
+         :require-match (ivy-state-require-match ivy-last)
+         :initial-input ivy-text
+         :history (ivy-state-history ivy-last)
+         :preselect (ivy-state-current ivy-last)
+         :keymap (ivy-state-keymap ivy-last)
+         :update-fn (ivy-state-update-fn ivy-last)
+         :sort (ivy-state-sort ivy-last)
+         :action (ivy-state-action ivy-last)
+         :unwind (ivy-state-unwind ivy-last)
+         :re-builder (ivy-state-re-builder ivy-last)
+         :matcher (ivy-state-matcher ivy-last)
+         :dynamic-collection (ivy-state-dynamic-collection ivy-last)
+         :extra-props (ivy-state-extra-props ivy-last)
+         :caller (ivy-state-caller ivy-last))))))
+
+(defvar-local ivy-calling nil
+  "When non-nil, call the current action when `ivy--index' changes.")
+
+(defun ivy-set-index (index)
+  "Set `ivy--index' to INDEX."
+  (setq ivy--index index)
+  (when ivy-calling
+    (ivy--exhibit)
+    (ivy-call)))
+
+(defun ivy-beginning-of-buffer ()
+  "Select the first completion candidate."
+  (interactive)
+  (ivy-set-index 0))
+(ivy--no-M-x #'ivy-beginning-of-buffer #'ivy--minibuffer-p)
+
+(defun ivy-end-of-buffer ()
+  "Select the last completion candidate."
+  (interactive)
+  (ivy-set-index (1- ivy--length)))
+(ivy--no-M-x #'ivy-end-of-buffer #'ivy--minibuffer-p)
+
+(defun ivy-scroll-up-command ()
+  "Scroll the candidates upward by the minibuffer height."
+  (interactive)
+  (ivy-set-index (min (1- (+ ivy--index ivy-height))
+                      (1- ivy--length))))
+(ivy--no-M-x #'ivy-scroll-up-command #'ivy--minibuffer-p)
+
+(defun ivy-scroll-down-command ()
+  "Scroll the candidates downward by the minibuffer height."
+  (interactive)
+  (ivy-set-index (max (1+ (- ivy--index ivy-height))
+                      0)))
+(ivy--no-M-x #'ivy-scroll-down-command #'ivy--minibuffer-p)
+
+(defun ivy-next-line (&optional arg)
+  "Move cursor vertically down ARG candidates."
+  (interactive "p")
+  (setq arg (or arg 1))
+  (let ((index (+ ivy--index arg)))
+    (if (> index (1- ivy--length))
+        (if ivy-wrap
+            (ivy-beginning-of-buffer)
+          (ivy-set-index (1- ivy--length)))
+      (ivy-set-index index))))
+(ivy--no-M-x #'ivy-next-line #'ivy--minibuffer-p)
+
+(defun ivy-next-line-or-history (&optional arg)
+  "Move cursor vertically down ARG candidates.
+If the input is empty, select the previous history element instead."
+  (interactive "p")
+  (let ((orig-index ivy--index))
+    (ivy-next-line arg)
+    (when (and (string= ivy-text "") (= ivy--index orig-index))
+      (ivy-previous-history-element 1))))
+(ivy--no-M-x #'ivy-next-line-or-history #'ivy--minibuffer-p)
+
+(defun ivy-previous-line (&optional arg)
+  "Move cursor vertically up ARG candidates."
+  (interactive "p")
+  (setq arg (or arg 1))
+  (let ((index (- ivy--index arg))
+        (min-index (if ivy--use-selectable-prompt -1 0)))
+    (if (< index min-index)
+        (if ivy-wrap
+            (ivy-end-of-buffer)
+          (ivy-set-index min-index))
+      (ivy-set-index index))))
+(ivy--no-M-x #'ivy-previous-line #'ivy--minibuffer-p)
+
+(defun ivy-previous-line-or-history (arg)
+  "Move cursor vertically up ARG candidates.
+If the input is empty, select the previous history element instead."
+  (interactive "p")
+  (let ((orig-index ivy--index))
+    (ivy-previous-line arg)
+    (when (and (string= ivy-text "") (= ivy--index orig-index))
+      (ivy-previous-history-element 1))))
+(ivy--no-M-x #'ivy-previous-line-or-history #'ivy--minibuffer-p)
+
+(defun ivy-toggle-calling ()
+  "Flip `ivy-calling'."
+  (interactive)
+  (when (setq ivy-calling (not ivy-calling))
+    (ivy-call)))
+(ivy--no-M-x #'ivy-toggle-calling #'ivy--minibuffer-p)
+
+(defun ivy-toggle-ignore ()
+  "Toggle user-configured candidate filtering."
+  (interactive)
+  (setq ivy-use-ignore
+        (if ivy-use-ignore
+            nil
+          (or ivy-use-ignore-default t)))
+  (setf (ivy-state-ignore ivy-last) ivy-use-ignore)
+  ;; invalidate cache
+  (setq ivy--old-cands nil))
+(ivy--no-M-x #'ivy-toggle-ignore #'ivy--minibuffer-p)
+
+(defun ivy--get-action (state)
+  "Get the action function from STATE."
+  (let ((action (ivy-state-action state)))
+    (when action
+      (if (functionp action)
+          action
+        (cadr (nth (car action) action))))))
+
+(defun ivy--get-multi-action (state)
+  "Get the multi-action function from STATE."
+  (let* ((action (ivy-state-action state))
+         (multi-action
+          (and (listp action)
+               (not (eq (car action) 'lambda))
+               (nth 3 (nth (car action) action)))))
+    (if multi-action
+        multi-action
+      (when (eq (car action) 1)
+        (ivy-state-multi-action state)))))
+
+(defun ivy--get-window (state)
+  "Get the window from STATE."
+  (if (ivy-state-p state)
+      (let ((window (ivy-state-window state)))
+        (if (window-live-p window)
+            window
+          (next-window)))
+    (selected-window)))
+
+(defun ivy--actionp (x)
+  "Return non-nil when X is a list of actions."
+  (and (consp x) (not (memq (car x) '(closure lambda)))))
+
+(defcustom ivy-action-wrap nil
+  "When non-nil, `ivy-next-action' and `ivy-prev-action' wrap."
+  :type 'boolean)
+
+(defun ivy-next-action ()
+  "When the current action is a list, scroll it forwards."
+  (interactive)
+  (let ((action (ivy-state-action ivy-last)))
+    (when (ivy--actionp action)
+      (let ((len (1- (length action)))
+            (idx (car action)))
+        (if (>= idx len)
+            (when ivy-action-wrap
+              (setf (car action) 1))
+          (cl-incf (car action)))))))
+(ivy--no-M-x #'ivy-next-action #'ivy--minibuffer-p)
+
+(defun ivy-prev-action ()
+  "When the current action is a list, scroll it backwards."
+  (interactive)
+  (let ((action (ivy-state-action ivy-last)))
+    (when (ivy--actionp action)
+      (if (<= (car action) 1)
+          (when ivy-action-wrap
+            (setf (car action) (1- (length action))))
+        (cl-decf (car action))))))
+(ivy--no-M-x #'ivy-prev-action #'ivy--minibuffer-p)
+
+(defun ivy-action-name ()
+  "Return the name associated with the current action."
+  (let ((action (ivy-state-action ivy-last)))
+    (if (ivy--actionp action)
+        (format "[%d/%d] %s"
+                (car action)
+                (1- (length action))
+                (nth 2 (nth (car action) action)))
+      "[1/1] default")))
+
+(defvar ivy-inhibit-action nil
+  "When non-nil, `ivy-call' does nothing.
+
+Example use:
+
+    (let* ((ivy-inhibit-action t)
+           (str (ivy-switch-buffer)))
+     ;; do whatever with str - the corresponding buffer will not be opened
+     )")
+
+(defun ivy-recursive-restore ()
+  "Restore the above state when exiting the minibuffer.
+See variable `ivy-recursive-restore' for further information."
+  (when (and ivy-recursive-last
+             ivy-recursive-restore
+             (not (eq ivy-last ivy-recursive-last)))
+    (ivy--reset-state (setq ivy-last ivy-recursive-last))))
+
+(defvar ivy-mark-prefix ">"
+  "Prefix used by `ivy-mark'.")
+
+(defun ivy--call-marked (action)
+  (let* ((prefix-len (length ivy-mark-prefix))
+         (marked-candidates
+          (mapcar
+           (lambda (s)
+             (let ((cand (substring s prefix-len)))
+               (if ivy--directory
+                   (expand-file-name cand ivy--directory)
+                 cand)))
+           ivy-marked-candidates))
+         (multi-action (ivy--get-multi-action ivy-last)))
+    (if multi-action
+        (let ((default-directory (ivy-state-directory ivy-last)))
+          (funcall multi-action (mapcar #'ivy--call-cand marked-candidates)))
+      (dolist (c marked-candidates)
+        (let ((default-directory (ivy-state-directory ivy-last)))
+          (funcall action (ivy--call-cand c)))))))
+
+(defun ivy--call-cand (current)
+  (let ((collection (ivy-state-collection ivy-last)))
+    (cond
+     ;; Alist type.
+     ((and (consp (car-safe collection))
+           ;; Previously, the cdr of the selected
+           ;; candidate would be returned.  Now, the
+           ;; whole candidate is returned.
+           (let ((idx (get-text-property 0 'idx current)))
+             (if idx
+                 (progn
+                   (ivy--remove-props current 'idx)
+                   (nth idx collection))
+               (assoc current collection)))))
+     (ivy--directory
+      (expand-file-name current ivy--directory))
+     ((equal current "")
+      ivy-text)
+     (t
+      current))))
+
+(defun ivy-call ()
+  "Call the current action without exiting completion."
+  (interactive)
+  ;; Testing with `ivy-with' seems to call `ivy-call' again,
+  ;; in which case `this-command' is nil; so check for this.
+  (unless (memq this-command '(nil
+                               ivy-done
+                               ivy-alt-done
+                               ivy-dispatching-done))
+    (setq ivy-current-prefix-arg current-prefix-arg))
+  (let* ((action
+          (if (functionp ivy-inhibit-action)
+              ivy-inhibit-action
+            (and (not ivy-inhibit-action)
+                 (ivy--get-action ivy-last))))
+         (current (ivy-state-current ivy-last))
+         (x (ivy--call-cand current))
+         (res
+          (cond
+           ((null action)
+            current)
+           (t
+            (select-window (ivy--get-window ivy-last))
+            (set-buffer (ivy-state-buffer ivy-last))
+            (prog1 (unwind-protect
+                       (if ivy-marked-candidates
+                           (ivy--call-marked action)
+                         (funcall action x))
+                     (ivy-recursive-restore))
+              (unless (or (eq ivy-exit 'done)
+                          (minibuffer-window-active-p (selected-window))
+                          (null (active-minibuffer-window)))
+                (select-window (active-minibuffer-window))))))))
+    (if ivy-inhibit-action
+        res
+      current)))
+(ivy--no-M-x #'ivy-call #'ivy--minibuffer-p)
+
+(defun ivy-call-and-recenter ()
+  "Call action and recenter window according to the selected candidate."
+  (interactive)
+  (ivy-call)
+  (with-ivy-window
+    (recenter-top-bottom)))
+(ivy--no-M-x #'ivy-call-and-recenter #'ivy--minibuffer-p)
+
+(defun ivy-next-line-and-call (&optional arg)
+  "Move cursor vertically down ARG candidates.
+Call the permanent action if possible."
+  (interactive "p")
+  (ivy-next-line arg)
+  (ivy--exhibit)
+  (ivy-call))
+(ivy--no-M-x #'ivy-next-line-and-call #'ivy--minibuffer-p)
+
+(defun ivy-previous-line-and-call (&optional arg)
+  "Move cursor vertically up ARG candidates.
+Call the permanent action if possible."
+  (interactive "p")
+  (ivy-previous-line arg)
+  (ivy--exhibit)
+  (ivy-call))
+(ivy--no-M-x #'ivy-previous-line-and-call #'ivy--minibuffer-p)
+
+(defun ivy-previous-history-element (arg)
+  "Forward to `previous-history-element' with ARG."
+  (interactive "p")
+  (previous-history-element arg)
+  (ivy--cd-maybe)
+  (move-end-of-line 1)
+  (ivy--maybe-scroll-history))
+(ivy--no-M-x #'ivy-previous-history-element #'ivy--minibuffer-p)
+
+(defun ivy--insert-symbol-boundaries ()
+  (undo-boundary)
+  (beginning-of-line)
+  (insert "\\_<")
+  (end-of-line)
+  (insert "\\_>"))
+
+(defun ivy-next-history-element (arg)
+  "Forward to `next-history-element' with ARG."
+  (interactive "p")
+  (if (and (= minibuffer-history-position 0)
+           (equal ivy-text ""))
+      (progn
+        (when minibuffer-default
+          (setq ivy--default (car minibuffer-default)))
+        (insert ivy--default)
+        (when (and (with-ivy-window (derived-mode-p 'prog-mode))
+                   (eq (ivy-state-caller ivy-last) 'swiper)
+                   (not (file-exists-p ivy--default))
+                   (not (ivy-ffap-url-p ivy--default))
+                   (not (ivy-state-dynamic-collection ivy-last))
+                   (> (point) (minibuffer-prompt-end)))
+          (ivy--insert-symbol-boundaries)))
+    (next-history-element arg))
+  (ivy--cd-maybe)
+  (move-end-of-line 1)
+  (ivy--maybe-scroll-history))
+(ivy--no-M-x #'ivy-next-history-element #'ivy--minibuffer-p)
+
+(defvar ivy-ffap-url-functions nil
+  "List of functions that check if the point is on a URL.")
+
+(defun ivy--cd-maybe ()
+  "Check if the current input points to a different directory.
+If so, move to that directory, while keeping only the file name."
+  (when ivy--directory
+    (let ((input (ivy--input))
+          url)
+      (if (setq url (or (ivy-ffap-url-p input)
+                        (with-ivy-window
+                          (cl-reduce
+                           (lambda (a b)
+                             (or a (funcall b)))
+                           ivy-ffap-url-functions
+                           :initial-value nil))))
+          (ivy-exit-with-action
+           (lambda (_)
+             (ivy-ffap-url-fetcher url))
+           'no-update-history)
+        (setq input (expand-file-name input))
+        (let ((file (file-name-nondirectory input))
+              (dir (expand-file-name (file-name-directory input))))
+          (if (string= dir ivy--directory)
+              (progn
+                (delete-minibuffer-contents)
+                (insert file))
+            (ivy--cd dir)
+            (insert file)))))))
+
+(defun ivy--maybe-scroll-history ()
+  "If the selected history element has an index, scroll there."
+  (let ((idx (ignore-errors
+               (get-text-property
+                (minibuffer-prompt-end)
+                'ivy-index))))
+    (when idx
+      (ivy--exhibit)
+      (ivy-set-index idx))))
+
+(declare-function tramp-get-completion-methods "tramp")
+
+(defun ivy--cd (dir)
+  "When completing file names, move to directory DIR."
+  (if (ivy--completing-fname-p)
+      (progn
+        (push dir ivy--directory-hist)
+        (setq ivy--old-cands nil)
+        (setq ivy--old-re nil)
+        (ivy-set-index 0)
+        (setq ivy--all-candidates
+              (append
+               (ivy--sorted-files (setq ivy--directory dir))
+               (when (and (string= dir "/") (featurep 'tramp))
+                 (sort
+                  (mapcar
+                   (lambda (s) (substring s 1))
+                   (tramp-get-completion-methods ""))
+                  #'string<))))
+        (ivy-set-text "")
+        (setf (ivy-state-directory ivy-last) dir)
+        (delete-minibuffer-contents))
+    (error "Unexpected")))
+
+(defun ivy--parent-dir (filename)
+  "Return parent directory of absolute FILENAME."
+  (file-name-directory (directory-file-name filename)))
+
+(defun ivy-backward-delete-char ()
+  "Forward to `delete-backward-char'.
+Call `ivy-on-del-error-function' if an error occurs, usually when
+there is no more text to delete at the beginning of the
+minibuffer."
+  (interactive)
+  (if (and ivy--directory (= (minibuffer-prompt-end) (point)))
+      (progn
+        (ivy--cd (ivy--parent-dir (expand-file-name ivy--directory)))
+        (ivy--exhibit))
+    (setq prefix-arg current-prefix-arg)
+    (condition-case nil
+        (call-interactively #'delete-backward-char)
+      (error
+       (when ivy-on-del-error-function
+         (funcall ivy-on-del-error-function))))))
+(ivy--no-M-x #'ivy-backward-delete-char #'ivy--minibuffer-p)
+
+(defun ivy-delete-char (arg)
+  "Forward to `delete-char' ARG."
+  (interactive "p")
+  (unless (eolp)
+    (delete-char arg)))
+(ivy--no-M-x #'ivy-delete-char #'ivy--minibuffer-p)
+
+(defun ivy-forward-char (arg)
+  "Forward to `forward-char' ARG."
+  (interactive "p")
+  (unless (eolp)
+    (forward-char arg)))
+(ivy--no-M-x #'ivy-forward-char #'ivy--minibuffer-p)
+
+(defun ivy-kill-word (arg)
+  "Forward to `kill-word' ARG."
+  (interactive "p")
+  (unless (eolp)
+    (kill-word arg)))
+(ivy--no-M-x #'ivy-kill-word #'ivy--minibuffer-p)
+
+(defun ivy-kill-line ()
+  "Forward to `kill-line'."
+  (interactive)
+  (if (eolp)
+      (progn
+        (kill-region (minibuffer-prompt-end) (point))
+        (setq ivy--old-text (current-kill 0 t)))
+    (kill-line)))
+(ivy--no-M-x #'ivy-kill-line #'ivy--minibuffer-p)
+
+(defalias 'ivy--pos-eol
+  (if (fboundp 'pos-eol)
+      #'pos-eol
+    (lambda (&optional n)
+      (let ((inhibit-field-text-motion t))
+        (line-end-position n))))
+  "Compatibility shim for Emacs 29 `pos-eol'.")
+
+(defun ivy-kill-whole-line ()
+  "Forward to `kill-whole-line'."
+  (interactive)
+  (kill-region (minibuffer-prompt-end) (ivy--pos-eol)))
+(ivy--no-M-x #'ivy-kill-whole-line #'ivy--minibuffer-p)
+
+(defun ivy-backward-kill-word ()
+  "Forward to `backward-kill-word'."
+  (interactive)
+  (if (and ivy--directory (= (minibuffer-prompt-end) (point)))
+      (progn
+        (ivy--cd (ivy--parent-dir (expand-file-name ivy--directory)))
+        (ivy--exhibit))
+    (ignore-errors
+      (let ((pt (point))
+            (last-command (if (eq last-command 'ivy-backward-kill-word)
+                              'kill-region
+                            last-command)))
+        (forward-word -1)
+        (kill-region pt (point))))))
+(ivy--no-M-x #'ivy-backward-kill-word #'ivy--minibuffer-p)
+
+(defvar ivy--regexp-quote #'regexp-quote
+  "Store the regexp quoting state.")
+
+(defun ivy-toggle-regexp-quote ()
+  "Toggle the regexp quoting."
+  (interactive)
+  (setq ivy--old-re nil)
+  (cl-rotatef ivy--regex-function ivy--regexp-quote)
+  (setq ivy--old-text "")
+  (setq ivy-regex (funcall ivy--regex-function ivy-text)))
+(ivy--no-M-x #'ivy-toggle-regexp-quote #'ivy--minibuffer-p)
+
+(defcustom ivy-format-functions-alist
+  '((t . ivy-format-function-default))
+  "An alist of functions that transform the list of candidates into a string.
+This string is inserted into the minibuffer."
+  :type '(alist
+          :key-type symbol
+          :value-type
+          (choice
+           (const :tag "Default" ivy-format-function-default)
+           (const :tag "Arrow prefix" ivy-format-function-arrow)
+           (const :tag "Full line" ivy-format-function-line)
+           (const :tag "Arrow prefix + full line"
+                  ivy-format-function-arrow-line)
+           (function :tag "Custom function"))))
+
+(defun ivy-sort-file-function-default (x y)
+  "Compare two files X and Y.
+Prioritize directories."
+  (let ((xdir (get-text-property 0 'ivy--dir x))
+        (ydir (get-text-property 0 'ivy--dir y)))
+    (if xdir
+        (or (not ydir) (string< xdir ydir))
+      (and (not ydir) (string< x y)))))
+
+(defun ivy-string< (x y)
+  "Like `string<', but operate on CARs when given cons cells."
+  (string< (if (consp x) (car x) x)
+           (if (consp y) (car y) y)))
+
+(define-obsolete-function-alias 'ivy-sort-file-function-using-ido
+    'ido-file-extension-lessp "0.13.0 (2019-10-12)")
+
+(defcustom ivy-sort-functions-alist
+  '((t . ivy-string<))
+  "An alist of sorting functions for each collection function.
+Interactive functions that call completion fit in here as well.
+
+Nil means no sorting, which is useful to turn off the sorting for
+functions that have candidates in the natural buffer order, like
+`org-refile' or `Man-goto-section'.
+
+A list can be used to associate multiple sorting functions with a
+collection.  The car of the list is the current sort
+function.  This list can be rotated with `ivy-rotate-sort'.
+
+The entry associated with t is used for all fall-through cases.
+
+See also `ivy-sort-max-size'."
+  :type
+  '(alist
+    :key-type (choice
+               (const :tag "Fall-through" t)
+               (symbol :tag "Collection"))
+    :value-type (choice
+                 (const :tag "Plain sort" ivy-string<)
+                 (const :tag "File sort" ivy-sort-file-function-default)
+                 (const :tag "File sort using Ido" ido-file-extension-lessp)
+                 (const :tag "No sort" nil)
+                 (function :tag "Custom function")
+                 (repeat (function :tag "Custom function")))))
+
+(defun ivy--sort-function (collection)
+  "Retrieve sort function for COLLECTION from `ivy-sort-functions-alist'."
+  (let ((entry (cdr (or (assq collection ivy-sort-functions-alist)
+                        (assq (ivy-state-caller ivy-last) ivy-sort-functions-alist)
+                        (assq t ivy-sort-functions-alist)))))
+    (and (or (functionp entry)
+             (functionp (setq entry (car-safe entry))))
+         entry)))
+
+(defun ivy-rotate-sort ()
+  "Rotate through sorting functions available for current collection.
+This only has an effect if multiple sorting functions are
+specified for the current collection in
+`ivy-sort-functions-alist'."
+  (interactive)
+  (let ((cell (or (assq (ivy-state-collection ivy-last) ivy-sort-functions-alist)
+                  (assq (ivy-state-caller ivy-last) ivy-sort-functions-alist)
+                  (assq t ivy-sort-functions-alist))))
+    (when (consp (cdr cell))
+      (setcdr cell (nconc (cddr cell) (list (cadr cell))))
+      (ivy--reset-state ivy-last))))
+(ivy--no-M-x #'ivy-rotate-sort #'ivy--minibuffer-p)
+
+(defcustom ivy-index-functions-alist
+  '((t . ivy-recompute-index-zero))
+  "An alist of index recomputing functions for each collection function.
+When the input changes, the appropriate function returns an
+integer - the index of the matched candidate that should be
+selected."
+  :type '(alist :key-type symbol :value-type function))
+
+(defvar ivy-re-builders-alist
+  '((t . ivy--regex-plus))
+  "An alist of regex building functions for each collection function.
+
+Each key is (in order of priority):
+1. The actual collection function, e.g. `read-file-name-internal'.
+2. The symbol passed by :caller into `ivy-read'.
+3. `this-command'.
+4. t.
+
+Each value is a function that should take a string and return a
+valid regex or a regex sequence (see below).
+
+Possible choices: `ivy--regex', `regexp-quote',
+`ivy--regex-plus', `ivy--regex-fuzzy', `ivy--regex-ignore-order'.
+
+If a function returns a list, it should format like this:
+\\='((\"matching-regexp\" . t) (\"non-matching-regexp\") ...).
+
+The matches will be filtered in a sequence, you can mix the
+regexps that should match and that should not match as you
+like.")
+
+(defvar ivy-highlight-functions-alist
+  '((ivy--regex-ignore-order . ivy--highlight-ignore-order)
+    (ivy--regex-fuzzy . ivy--highlight-fuzzy)
+    (ivy--regex-plus . ivy--highlight-default))
+  "An alist of highlighting functions for each regex builder function.")
+
+(defcustom ivy-initial-inputs-alist
+  '((org-refile . "^")
+    (org-agenda-refile . "^")
+    (org-capture-refile . "^")
+    (Man-completion-table . "^")
+    (woman . "^"))
+  "An alist associating commands with their initial input.
+
+Each cdr is either a string or a function called in the context
+of a call to `ivy-read'."
+  :type '(alist
+          :key-type (symbol)
+          :value-type (choice (string) (function))))
+
+(defcustom ivy-hooks-alist nil
+  "An alist associating commands to setup functions.
+Examples: `toggle-input-method', (lambda () (insert \"^\")), etc.
+May supersede `ivy-initial-inputs-alist'."
+  :type '(alist :key-type symbol :value-type function))
+
+(defvar ivy--occurs-list nil
+  "A list of custom occur generators per command.")
+
+(defun ivy-set-occur (cmd occur)
+  "Assign CMD a custom OCCUR function."
+  (setq ivy--occurs-list
+        (plist-put ivy--occurs-list cmd occur)))
+
+(defcustom ivy-update-fns-alist nil
+  "An alist associating commands to their :update-fn values."
+  :type '(alist
+          :key-type symbol
+          :value-type
+          (radio
+           (const :tag "Off" nil)
+           (const :tag "Call action on change" auto))))
+
+(defcustom ivy-unwind-fns-alist nil
+  "An alist associating commands to their :unwind values."
+  :type '(alist :key-type symbol :value-type function))
+
+(defcustom ivy-init-fns-alist nil
+  "An alist associating commands to their :init values.
+An :init is a function with no arguments.
+`ivy-read' calls it to initialize."
+  :type '(alist :key-type symbol :value-type function))
+
+(defun ivy--alist-set (alist-sym key val)
+  (let ((curr-val (symbol-value alist-sym))
+        (customized-val (get alist-sym 'customized-value))
+        (default-val (eval (car (get alist-sym 'standard-value)))))
+    ;; when the value was set by `customize-set-variable', don't touch it
+    (unless customized-val
+      ;; only works if the value wasn't customized by the user
+      (when (or (null default-val) (equal curr-val default-val))
+        (let ((cell (assoc key curr-val)))
+          (if cell
+              (setcdr cell val)
+            (set alist-sym (cons (cons key val)
+                                 (symbol-value alist-sym)))))
+        (when default-val
+          (put alist-sym 'standard-value
+               (list (list 'quote (symbol-value alist-sym)))))))))
+
+(declare-function counsel-set-async-exit-code "counsel")
+
+(defvar ivy--parents-alist nil
+  "Configure parent caller for child caller.
+The child caller inherits and can override the settings of the parent.")
+
+(cl-defun ivy-configure (caller
+                         &key
+                         parent
+                         initial-input
+                         height
+                         occur
+                         update-fn
+                         init-fn
+                         unwind-fn
+                         index-fn
+                         sort-fn
+                         sort-matches-fn
+                         format-fn
+                         display-fn
+                         display-transformer-fn
+                         alt-done-fn
+                         more-chars
+                         grep-p
+                         exit-codes)
+  "Configure `ivy-read' params for CALLER."
+  (declare (indent 1))
+  (when parent
+    (ivy--alist-set 'ivy--parents-alist caller parent))
+  (when initial-input
+    (ivy--alist-set 'ivy-initial-inputs-alist caller initial-input))
+  (when height
+    (ivy--alist-set 'ivy-height-alist caller height))
+  (when occur
+    (ivy-set-occur caller occur))
+  (when update-fn
+    (ivy--alist-set 'ivy-update-fns-alist caller update-fn))
+  (when unwind-fn
+    (ivy--alist-set 'ivy-unwind-fns-alist caller unwind-fn))
+  (when init-fn
+    (ivy--alist-set 'ivy-init-fns-alist caller init-fn))
+  (when index-fn
+    (ivy--alist-set 'ivy-index-functions-alist caller index-fn))
+  (when sort-fn
+    (ivy--alist-set 'ivy-sort-functions-alist caller sort-fn))
+  (when sort-matches-fn
+    (ivy--alist-set 'ivy-sort-matches-functions-alist caller sort-matches-fn))
+  (when format-fn
+    (ivy--alist-set 'ivy-format-functions-alist caller format-fn))
+  (when display-fn
+    (ivy--alist-set 'ivy-display-functions-alist caller display-fn))
+  (when display-transformer-fn
+    (ivy--alist-set 'ivy--display-transformers-alist caller display-transformer-fn))
+  (when alt-done-fn
+    (ivy--alist-set 'ivy-alt-done-functions-alist caller alt-done-fn))
+  (when more-chars
+    (ivy--alist-set 'ivy-more-chars-alist caller more-chars))
+  (when grep-p
+    (cl-pushnew caller ivy-highlight-grep-commands))
+  (when exit-codes
+    (let (code msg)
+      (while (and (setq code (pop exit-codes))
+                  (setq msg (pop exit-codes)))
+        (counsel-set-async-exit-code caller code msg)))))
+
+(defcustom ivy-sort-max-size 30000
+  "Sorting won't be done for collections larger than this."
+  :type 'integer)
+
+(defalias 'ivy--dirname-p
+  ;; Added in Emacs 25.1.
+  (if (fboundp 'directory-name-p)
+      #'directory-name-p
+    (lambda (name)
+      "Return non-nil if NAME ends with a directory separator."
+      (string-suffix-p "/" name))))
+
+(defalias 'ivy--string-search
+  (if (fboundp 'string-search)
+      #'string-search
+    (lambda (needle haystack) ;; Faster than `cl-search'.
+      (string-match-p (regexp-quote needle) haystack)))
+  "Compatibility shim for Emacs 28 `string-search'.
+\n(fn NEEDLE HAYSTACK)")
+
+(defalias 'ivy--string-replace
+  (if (fboundp 'string-replace)
+      #'string-replace
+    (lambda (from to in)
+      (replace-regexp-in-string (regexp-quote from) to in t t)))
+  "Compatibility shim for Emacs 28 `string-replace'.
+\n(fn FROM TO IN)")
+
+;; Moved to subr.el in Emacs 27.1.
+(autoload 'xor "array")
+
+(defun ivy--sorted-files (dir)
+  "Return the list of files in DIR.
+Directories come first."
+  (let* ((coll #'read-file-name-internal)
+         (sort-fn (ivy--sort-function coll))
+         (dirs-first (eq sort-fn #'ivy-sort-file-function-default))
+         (seq (cl-mapcan
+               (lambda (f)
+                 (unless (member f '("./" "../"))
+                   ;; FIXME: Use `substitute-in-file-name'?
+                   ;; Re: #2012, #3060.
+                   (setq f (ivy--string-replace "$$" "$" f))
+                   (list (if (and dirs-first (ivy--dirname-p f))
+                             (propertize f 'ivy--dir (directory-file-name f))
+                           f))))
+               (condition-case nil
+                   (let ((default-directory dir))
+                     (all-completions "" coll (ivy-state-predicate ivy-last)))
+                 (error (directory-files
+                         dir nil directory-files-no-dot-files-regexp))))))
+    (when sort-fn
+      (setq seq (sort seq sort-fn)))
+    (dolist (extra ivy-extra-directories)
+      (push extra seq))
+    (if (string= dir "/")
+        (cl-delete-if (lambda (s) (string-suffix-p ":" s)) (delete "../" seq))
+      seq)))
+
+(defun ivy-alist-setting (alist &optional key)
+  "Return the value associated with KEY in ALIST, using `assq'.
+KEY defaults to the last caller of `ivy-read'; if no entry is
+found, it falls back to the key t."
+  (let ((caller (or key (ivy-state-caller ivy-last))))
+    (or
+     (and caller (cdr (assq caller alist)))
+     (let ((parent (cdr (assq caller ivy--parents-alist))))
+       (when parent
+         (ivy-alist-setting alist parent)))
+     (cdr (assq t alist)))))
+
+(defun ivy--height (caller)
+  (let ((v (or (ivy-alist-setting ivy-height-alist caller)
+               ivy-height)))
+    (if (integerp v)
+        v
+      (if (functionp v)
+          (funcall v caller)
+        (error "Unexpected value: %S" v)))))
+
+(defun ivy--remove-props (str &rest props)
+  "Return STR with text PROPS destructively removed."
+  (ignore-errors
+    (remove-list-of-text-properties 0 (length str) props str))
+  str)
+
+(defun ivy--update-prompt (prompt)
+  (cond ((equal prompt "Keyword, C-h: ")
+         ;; auto-insert.el
+         "Keyword (C-M-j to end): ")
+        (t
+         ;; misearch.el
+         (ivy--string-replace "RET to end" "C-M-j to end" prompt))))
+
+(defalias 'ivy--resignal
+  (if (let ((desc (list 'user-error)))
+        (condition-case err
+            (with-no-warnings (signal desc))
+          (user-error (eq err desc))
+          ;; Emacs 24 complains about an unused lexical argument.
+          (error (ignore err))))
+      #'signal
+    (lambda (err) (signal (car err) (cdr err))))
+  "Compatibility shim for Emacs 31 re-`signal'.
+\n(fn ERROR)")
+
+;;;; Entry Point
+
+;;;###autoload
+(cl-defun ivy-read (prompt collection
+                    &key
+                      predicate require-match initial-input
+                      history preselect def keymap update-fn sort
+                      action multi-action
+                      unwind re-builder matcher
+                      dynamic-collection
+                      extra-props
+                      caller)
+  "Read a string in the minibuffer, with completion.
+
+PROMPT is a string, normally ending in a colon and a space.
+`ivy-count-format' is prepended to PROMPT during completion.
+
+COLLECTION is either a list of strings, a function, an alist, or
+a hash table, supplied for `minibuffer-completion-table'.
+
+PREDICATE is applied to filter out the COLLECTION immediately.
+This argument is for compatibility with `completing-read'.
+
+When REQUIRE-MATCH is non-nil, only members of COLLECTION can be
+selected.  It can also be a lambda.
+
+If INITIAL-INPUT is non-nil, then insert that input in the
+minibuffer initially.
+
+HISTORY is a name of a variable to hold the completion session
+history.
+
+KEYMAP is composed with `ivy-minibuffer-map'.
+
+PRESELECT, when non-nil, determines which one of the candidates
+matching INITIAL-INPUT to select initially.  An integer stands
+for the position of the desired candidate in the collection,
+counting from zero.  Otherwise, use the first occurrence of
+PRESELECT in the collection.  Comparison is first done with
+`equal'.  If that fails, and when applicable, match PRESELECT as
+a regular expression.
+
+DEF is for compatibility with `completing-read'.
+
+UPDATE-FN is called each time the candidate list is re-displayed.
+
+When SORT is non-nil, `ivy-sort-functions-alist' determines how
+to sort candidates before displaying them.
+
+ACTION is a function to call after selecting a candidate.
+It takes one argument, the selected candidate. If COLLECTION is
+an alist, the argument is a cons cell, otherwise it's a string.
+
+MULTI-ACTION, when non-nil, is called instead of ACTION when
+there are marked candidates. It takes the list of candidates as
+its only argument. When it's nil, ACTION is called on each marked
+candidate.
+
+UNWIND is a function of no arguments to call before exiting.
+
+RE-BUILDER is a function transforming input text into a regex
+pattern.
+
+MATCHER is a function which can override how candidates are
+filtered based on user input.  It takes a regex pattern and a
+list of candidates, and returns the list of matching candidates.
+
+DYNAMIC-COLLECTION is a boolean specifying whether the list of
+candidates is updated after each input by calling COLLECTION.
+
+EXTRA-PROPS is a plist that can be used to store
+collection-specific session-specific data.
+
+CALLER is a symbol to uniquely identify the caller to `ivy-read'.
+It is used, along with COLLECTION, to determine which
+customizations apply to the current completion session."
+  (let ((init-fn (ivy-alist-setting ivy-init-fns-alist caller)))
+    (when init-fn
+      (funcall init-fn)))
+  ;; get un-stuck from an existing `read-key' overriding minibuffer keys
+  (when (equal overriding-local-map '(keymap))
+    (keyboard-quit))
+  (setq caller (or caller this-command))
+  (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last))
+         (ivy--display-function
+          (when (or ivy-recursive-last
+                    (not (window-minibuffer-p)))
+            (ivy-alist-setting ivy-display-functions-alist caller))))
+    (setq update-fn (or update-fn (ivy-alist-setting ivy-update-fns-alist caller)))
+    (setq unwind (or unwind (ivy-alist-setting ivy-unwind-fns-alist caller)))
+    (setq ivy-last
+          (make-ivy-state
+           :prompt (ivy--update-prompt prompt)
+           :collection collection
+           :predicate predicate
+           :require-match require-match
+           :initial-input initial-input
+           :history history
+           :preselect preselect
+           :keymap keymap
+           :update-fn (if (eq update-fn 'auto)
+                          (lambda ()
+                            (with-ivy-window
+                              (funcall
+                               (ivy--get-action ivy-last)
+                               (if (consp (car-safe (ivy-state-collection ivy-last)))
+                                   (assoc (ivy-state-current ivy-last)
+                                          (ivy-state-collection ivy-last))
+                                 (ivy-state-current ivy-last)))))
+                        update-fn)
+           :sort sort
+           :action (ivy--compute-extra-actions action caller)
+           :multi-action multi-action
+           :frame (selected-frame)
+           :window (selected-window)
+           :buffer (current-buffer)
+           :unwind unwind
+           :re-builder re-builder
+           :matcher matcher
+           :dynamic-collection dynamic-collection
+           :display-transformer-fn (ivy-alist-setting ivy--display-transformers-alist caller)
+           :directory default-directory
+           :extra-props extra-props
+           :caller caller
+           :def def))
+    (ivy--reset-state ivy-last)
+    (unwind-protect
+         (minibuffer-with-setup-hook
+             #'ivy--minibuffer-setup
+           (let* ((hist (or history 'ivy-history))
+                  (minibuffer-completion-table collection)
+                  (minibuffer-completion-predicate predicate)
+                  (ivy-height (ivy--height caller))
+                  (resize-mini-windows (unless (display-graphic-p)
+                                         'grow-only)))
+             (if (and ivy-auto-select-single-candidate
+                      ivy--all-candidates
+                      (null (cdr ivy--all-candidates)))
+                 (progn
+                   (setf (ivy-state-current ivy-last)
+                         (car ivy--all-candidates))
+                   (setq ivy-exit 'done))
+               (condition-case err
+                   (read-from-minibuffer
+                    prompt
+                    (ivy-state-initial-input ivy-last)
+                    (make-composed-keymap keymap ivy-minibuffer-map)
+                    nil
+                    hist)
+                 (error
+                  (unless (equal err '(error "Selecting deleted buffer"))
+                    (ivy--resignal err)))))
+             (when (eq ivy-exit 'done)
+               (ivy--update-history hist))))
+      (let ((session (or (plist-get extra-props :session)
+                         (unless (or (minibufferp)
+                                     (null (ivy-state-action ivy-last))
+                                     (eq (ivy--get-action ivy-last) #'identity))
+                           caller))))
+        (when session
+          (setf (ivy-state-extra-props ivy-last)
+                (plist-put extra-props :ivy-data `(:all-candidates ,ivy--all-candidates
+                                                   :text ,ivy-text)))
+          (ivy--alist-set 'ivy--sessions session ivy-last)))
+      (ivy--cleanup))
+    (ivy-call)))
+
+(defun ivy--update-history (hist)
+  (unless (eq hist t)
+    (let ((item
+           (if (or (string= ivy-text "")
+                   (eq (plist-get (ivy-state-extra-props ivy-last) :caller)
+                       #'ivy-completing-read)
+                   (eq (ivy-state-history ivy-last) 'file-name-history))
+               (ivy-state-current ivy-last)
+             ivy-text)))
+      (cond ((equal item ""))
+            ((stringp item)
+             (let ((history-delete-duplicates t))
+               (add-to-history
+                hist (propertize item 'ivy-index ivy--index))))))))
+
+(defun ivy--cleanup ()
+  (let ((cleanup (ivy--display-function-prop :cleanup))
+        (unwind (ivy-state-unwind ivy-last)))
+    (when (functionp cleanup)
+      (funcall cleanup))
+    (when unwind
+      (funcall unwind)))
+  (ivy--pulse-cleanup)
+  (unless (eq ivy-exit 'done)
+    (ivy-recursive-restore)))
+
+(defun ivy--display-function-prop (prop)
+  "Return PROP associated with current `ivy--display-function'."
+  (plist-get (cdr (assq ivy--display-function
+                        ivy-display-functions-props))
+             prop))
+
+(defvar Info-complete-menu-buffer)
+
+(defun ivy--alist-to-cands (alist)
+  "Transform ALIST to a list of strings."
+  (let ((i -1))
+    (mapcar (lambda (x)
+              (propertize x 'idx (cl-incf i)))
+            (all-completions "" alist))))
+
+(defvar ivy--minibuffer-metadata nil
+  "Store `completion-metadata'.")
+
+(defun ivy--reset-state (state)
+  "Reset the ivy to STATE.
+This is useful for recursive `ivy-read'."
+  (setq ivy-marked-candidates nil)
+  (setq ivy--minibuffer-metadata nil)
+  (unless (equal (selected-frame) (ivy-state-frame state))
+    (select-window (active-minibuffer-window)))
+  (let* ((prompt (or (ivy-state-prompt state) ""))
+         (collection (ivy-state-collection state))
+         (predicate (ivy-state-predicate state))
+         (history (ivy-state-history state))
+         (preselect (ivy-state-preselect state))
+         (re-builder (ivy-state-re-builder state))
+         (dynamic-collection (ivy-state-dynamic-collection state))
+         (require-match (ivy-state-require-match state))
+         (caller (or (ivy-state-caller state) this-command))
+         (sort (or (ivy-state-sort state) (assoc caller ivy-sort-functions-alist)))
+         (initial-input
+          (or (ivy-state-initial-input state)
+              (let ((init (ivy-alist-setting ivy-initial-inputs-alist caller)))
+                (if (functionp init) (funcall init) init))))
+         (def (ivy-state-def state)))
+    (when (and (eq caller 'swiper-isearch) (buffer-modified-p))
+      (setq preselect nil))
+    (setq ivy--extra-candidates (ivy--compute-extra-candidates caller))
+    (setq ivy--directory nil)
+    (setq ivy--directory-hist (list default-directory))
+    (setq ivy-case-fold-search ivy-case-fold-search-default)
+    (setf (ivy-state-re-builder ivy-last)
+          (setq ivy--regex-function
+                (or re-builder
+                    (and (functionp collection)
+                         (cdr (assq collection ivy-re-builders-alist)))
+                    (ivy-alist-setting ivy-re-builders-alist)
+                    #'ivy--regex)))
+    (setq ivy--subexps 0)
+    (setq ivy--regexp-quote #'regexp-quote)
+    (setq ivy--old-text "")
+    (setq ivy--full-length nil)
+    (ivy-set-text (or initial-input ""))
+    (setq ivy--index 0)
+    (setq ivy-calling nil)
+    (setq ivy-use-ignore ivy-use-ignore-default)
+    (setf (ivy-state-ignore state) ivy-use-ignore)
+    (setq ivy--highlight-function
+          (or (cdr (assq (ivy-alist-setting ivy-re-builders-alist)
+                         ivy-highlight-functions-alist))
+              #'ivy--highlight-default))
+    (let ((ivy-recursive-restore nil)
+          coll sort-fn)
+      (cond ((eq collection #'Info-read-node-name-1)
+             (setq coll
+                   (if (equal (bound-and-true-p Info-current-file) "dir")
+                       (mapcar (lambda (x) (format "(%s)" x))
+                               (delete-dups
+                                (all-completions "(" collection predicate)))
+                     (all-completions "" collection predicate))))
+            ((memq collection '(read-file-name-internal ffap-read-file-or-url-internal))
+             (require 'tramp)
+             (when (and (equal def initial-input)
+                        (member "./" ivy-extra-directories))
+               (setq def nil))
+             (setq ivy--directory default-directory)
+             (when (and initial-input
+                        (not (equal initial-input "")))
+               (cond ((file-directory-p initial-input)
+                      (when (equal (file-name-nondirectory initial-input) "")
+                        (setf (ivy-state-preselect state) (setq preselect nil))
+                        (setq def nil))
+                      (setq ivy--directory (file-name-as-directory initial-input))
+                      (setq initial-input nil)
+                      (when preselect
+                        (let ((preselect-directory
+                               (file-name-directory preselect)))
+                          (when (and preselect-directory
+                                     (not (equal
+                                           (expand-file-name
+                                            preselect-directory)
+                                           (expand-file-name ivy--directory))))
+                            (setf (ivy-state-preselect state)
+                                  (setq preselect nil))))))
+                     ((ignore-errors
+                        (file-exists-p (file-name-directory initial-input)))
+                      (setq ivy--directory (file-name-directory initial-input))
+                      (setf (ivy-state-preselect state)
+                            (file-name-nondirectory initial-input)))))
+             (require 'dired)
+             (when preselect
+               (let ((preselect-directory (ivy--parent-dir preselect)))
+                 (when (and preselect-directory
+                            (not (string= preselect-directory
+                                          default-directory)))
+                   (setq ivy--directory preselect-directory))
+                 (setq preselect (file-relative-name preselect
+                                                     preselect-directory))
+                 (setf (ivy-state-preselect state) preselect)))
+             (setq sort nil)
+             (setq coll (ivy--sorted-files ivy--directory))
+             (when initial-input
+               (unless (or require-match
+                           (equal initial-input default-directory)
+                           (equal initial-input ""))
+                 (setq coll (cons initial-input coll)))
+               (setq initial-input (file-name-nondirectory initial-input))))
+            ((eq collection #'internal-complete-buffer)
+             (setq coll (ivy--buffer-list
+                         ""
+                         (and ivy-use-virtual-buffers
+                              (member caller '(ivy-switch-buffer
+                                               ivy-switch-buffer-other-window
+                                               counsel-switch-buffer)))
+                         predicate)))
+            (dynamic-collection
+             (setq ivy--minibuffer-metadata
+                   (ignore-errors
+                     (completion-metadata
+                      ""
+                      (ivy-state-collection ivy-last)
+                      (ivy-state-predicate ivy-last))))
+             (setq coll (if (and (eq this-command 'ivy-resume) (not (buffer-modified-p)))
+                            ivy--all-candidates
+                          (ivy--dynamic-collection-cands (or initial-input "")))))
+            ((consp (car-safe collection))
+             (when predicate
+               (setq collection (cl-remove-if-not predicate collection)))
+             (when (and sort (setq sort-fn (ivy--sort-function caller)))
+               (setq collection (sort (copy-sequence collection) sort-fn))
+               (setq sort nil))
+             (setf (ivy-state-collection ivy-last) collection)
+             (setq coll (ivy--alist-to-cands collection)))
+            ((or (functionp collection)
+                 (byte-code-function-p collection)
+                 (vectorp collection)
+                 (hash-table-p collection)
+                 (and (listp collection) (symbolp (car collection))))
+             (let ((Info-complete-menu-buffer
+                    ;; FIXME: This is a temporary workaround for issue #1803.
+                    (or (bound-and-true-p Info-complete-menu-buffer)
+                        (ivy-state-buffer state))))
+               (setq coll (all-completions "" collection predicate))))
+            (t
+             (setq coll (all-completions "" collection predicate))))
+      (unless (ivy-state-dynamic-collection ivy-last)
+        (setq coll (delete "" coll)))
+      (when (and sort
+                 (or (functionp collection)
+                     (not (eq history 'org-refile-history)))
+                 (setq sort-fn (ivy--sort-function
+                                (if (functionp collection) collection caller)))
+                 (listp coll)
+                 (null (nthcdr ivy-sort-max-size coll)))
+        (setq coll (sort (copy-sequence coll) sort-fn)))
+      (when def
+        (cond ((stringp (car-safe def))
+               (setq coll
+                     (delete-dups
+                      (append def coll))))
+              ((and (stringp def) (not (member def coll)))
+               (push def coll))))
+      (setq coll (ivy--set-candidates coll))
+      (setq ivy--old-re nil)
+      (setq ivy--old-cands nil)
+      (when initial-input
+        ;; Needed for anchor to work
+        (setq ivy--old-cands coll)
+        (setq ivy--old-cands (ivy--filter initial-input coll)))
+      (unless (setq ivy--trying-to-resume-dynamic-collection
+                    (and preselect dynamic-collection))
+        (when (integerp preselect)
+          (setq ivy--old-re "")
+          (ivy-set-index preselect)))
+      (setq ivy--all-candidates coll)
+      (unless (integerp preselect)
+        (ivy-set-index (or
+                        (and dynamic-collection
+                             ivy--index)
+                        (and preselect
+                             (ivy--preselect-index
+                              preselect
+                              (if initial-input
+                                  ivy--old-cands
+                                coll)))
+                        0))))
+    (setq ivy-exit nil)
+    (setq ivy--default
+          (if (region-active-p)
+              (buffer-substring (region-beginning) (region-end))
+            (ivy-thing-at-point)))
+    (setq ivy--prompt (ivy-add-prompt-count (ivy--quote-format-string prompt)))
+    (setq ivy--use-selectable-prompt (ivy--prompt-selectable-p))
+    (setf (ivy-state-initial-input ivy-last) initial-input)))
+
+(defun ivy-add-prompt-count (prompt)
+  "Add count information to PROMPT."
+  (cond ((null ivy-count-format)
+         (error "`ivy-count-format' must not be nil; set it to \"\" instead"))
+        ((string-match "%d.*\\(%d\\)" ivy-count-format)
+         (let* ((w
+                  (if (listp ivy--all-candidates)
+                      (1+ (floor (log (max 1 (length ivy--all-candidates)) 10)))
+                      1))
+                (s (replace-match (format "%%-%dd" w) t t ivy-count-format 1)))
+           (string-match "%d" s)
+           (concat (replace-match (format "%%%dd" w) t t s)
+                   prompt)))
+        ((string-match-p "%.*d" ivy-count-format)
+         (concat ivy-count-format prompt))
+        (t
+         prompt)))
+
+(defun ivy--quote-format-string (str)
+  "Make STR suitable for `format' with no extra arguments."
+  (ivy--string-replace "%" "%%" str))
+
+(defun ivy--crm-p (collection)
+  "Return non-nil if completing multiple strings from COLLECTION.
+That is, if we are called from `completing-read-multiple'."
+  ;; It would be nicer to check for `crm-completion-table',
+  ;; but that is local to the minibuffer which may be too late.
+  (eq collection 'crm--collection-fn))
+
+;;;###autoload
+(defun ivy-completing-read (prompt collection
+                            &optional predicate require-match initial-input
+                              history def inherit-input-method)
+  "Read a string in the minibuffer, with completion.
+
+This interface conforms to `completing-read' and can be used for
+`completing-read-function'.
+
+PROMPT is a string that normally ends in a colon and a space.
+COLLECTION is either a list of strings, an alist, an obarray, or a hash table.
+PREDICATE limits completion to a subset of COLLECTION.
+REQUIRE-MATCH is a boolean value or a symbol.  See `completing-read'.
+INITIAL-INPUT is a string inserted into the minibuffer initially.
+HISTORY is a list of previously selected inputs.
+DEF is the default value.
+INHERIT-INPUT-METHOD is currently ignored."
+  (let ((handler
+         (and (< ivy-completing-read-ignore-handlers-depth (minibuffer-depth))
+              (assq this-command ivy-completing-read-handlers-alist))))
+    (cond
+     (handler
+      (let (;; This could also be customizable.
+            (completion-in-region-function #'completion--in-region)
+            (ivy-completing-read-ignore-handlers-depth (1+ (minibuffer-depth))))
+        (funcall (cdr handler)
+                 prompt collection predicate require-match
+                 initial-input history def inherit-input-method)))
+     ((ivy--crm-p collection)
+      ;; Ivy is currently incompatible with `completing-read-multiple'.
+      ;; This was harmless while crm called `read-from-minibuffer'
+      ;; directly; but since Emacs 31 it uses `completing-read':
+      ;; `https://bugs.gnu.org/80296'.
+      (completing-read-default prompt collection predicate require-match
+                               initial-input history def inherit-input-method))
+     (t
+      ;; See the doc of `completing-read'.
+      (when (consp history)
+        (when (numberp (cdr history))
+          (setq initial-input (nth (1- (cdr history))
+                                   (symbol-value (car history)))))
+        (setq history (car history)))
+      (when (consp def)
+        (setq def (car def)))
+      (let ((str (ivy-read
+                  prompt collection
+                  :predicate predicate
+                  :require-match (and collection require-match)
+                  :initial-input
+                  (cond ((consp initial-input)
+                         (car initial-input))
+                        ((and (stringp initial-input)
+                              (not (eq collection #'read-file-name-internal)))
+                         (ivy--string-replace "+" "\\+" initial-input))
+                        (initial-input))
+                  :preselect def
+                  :def def
+                  :history history
+                  :keymap nil
+                  :dynamic-collection ivy-completing-read-dynamic-collection
+                  :extra-props '(:caller ivy-completing-read)
+                  :caller (if (and collection (symbolp collection))
+                              collection
+                            this-command))))
+        (if (string= str "")
+            ;; For `completing-read' compat, return the first element of
+            ;; DEFAULT, if it is a list; "", if DEFAULT is nil; or DEFAULT.
+            (or def "")
+          str))))))
+
+(defun ivy-completing-read-with-empty-string-def
+    (prompt collection
+     &optional predicate require-match initial-input
+       history def inherit-input-method)
+  "Same as `ivy-completing-read' but with different handling of DEF.
+
+Specifically, if DEF is nil, it is treated the same as if DEF was
+the empty string. This mimics the behavior of
+`completing-read-default'. This function can therefore be used in
+place of `ivy-completing-read' for commands that rely on this
+behavior."
+  (ivy-completing-read
+   prompt collection predicate require-match initial-input
+   history (or def "") inherit-input-method))
+
+(declare-function mc/all-fake-cursors "ext:multiple-cursors-core")
+
+;; Kludge: Try to retain original minibuffer completion data.
+(defvar ivy--minibuffer-table)
+(defvar ivy--minibuffer-pred)
+(defvar ivy--minibuffer-try nil
+  "Store original `try-completion' result for sole completions.")
+
+(defun ivy-completion-in-region-action (str)
+  "Insert STR, erasing the previous one.
+The previous string is between `ivy-completion-beg' and `ivy-completion-end'."
+  (when (consp str)
+    (setq str (cdr str)))
+  (when (stringp str)
+    (let ((fake-cursors (and (require 'multiple-cursors-core nil t)
+                             (mc/all-fake-cursors)))
+          (pt (point))
+          (beg ivy-completion-beg)
+          (end ivy-completion-end))
+      (when beg
+        (delete-region beg end))
+      (setq ivy-completion-beg (point))
+      (insert (substring-no-properties str))
+      (let ((minibuffer-completion-table (if (boundp 'ivy--minibuffer-table)
+                                             ivy--minibuffer-table
+                                           (ivy-state-collection ivy-last)))
+            (minibuffer-completion-predicate (if (boundp 'ivy--minibuffer-pred)
+                                                 ivy--minibuffer-pred
+                                               (ivy-state-predicate ivy-last)))
+            (newstr (or (car-safe ivy--minibuffer-try) str)))
+        (completion--done newstr (cond ((eq ivy--minibuffer-try t) 'finished)
+                                       ((eq ivy-exit 'done) 'unknown)
+                                       ('exact))))
+      (setq ivy-completion-end (point))
+      (save-excursion
+        (dolist (cursor fake-cursors)
+          (goto-char (overlay-start cursor))
+          (delete-region (+ (point) (- beg pt))
+                         (+ (point) (- end pt)))
+          (insert (substring-no-properties str))
+          ;; manually move the fake cursor
+          (move-overlay cursor (point) (1+ (point)))
+          (set-marker (overlay-get cursor 'point) (point))
+          (set-marker (overlay-get cursor 'mark) (point)))))))
+
+(defalias 'ivy--face-list-p
+  (if (fboundp 'face-list-p)
+      #'face-list-p
+    (lambda (face)
+      (and (listp face)
+           (listp (cdr face))
+           (not (keywordp (car face))))))
+  "Compatibility shim for Emacs 25 `face-list-p'.")
+
+;; FIXME: Should this return the smallest such index instead?
+;; Usually the two are equal, but perhaps there exist more
+;; exotic applications of `completions-first-difference'.
+;;
+;; Completing files under a directory foo/ can have a first difference at
+;; index 0 in some Emacs versions, and no such property in other versions.
+;; So perhaps this function should return 0 instead of (length str) when no
+;; property is found?  That still follows the 'largest index' definition.
+(defun ivy-completion-common-length (str)
+  "Return the length of the completion-matching prefix of STR.
+
+That is, return the largest index into STR at which either the
+`face' or `font-lock-face' property value contains the face
+`completions-first-difference'.
+If no such index is found, return the length of STR.
+
+Typically the completion-matching parts of STR have previously been
+propertized by `completion-all-completions', but then the base-size
+returned by that function should be preferred over
+`ivy-completion-common-length'."
+  (declare (obsolete "it is no longer used." "0.15.1"))
+  (let* ((char-property-alias-alist '((face font-lock-face)))
+         (cmn (length str))
+         (i cmn))
+    (when (> i 0)
+      (while (if (let ((face (get-text-property (1- i) 'face str)))
+                   (or (eq 'completions-first-difference face)
+                       (and (ivy--face-list-p face)
+                            (memq 'completions-first-difference face))))
+                 (ignore (setq cmn (1- i)))
+               (setq i (previous-single-property-change i 'face str)))))
+    cmn))
+
+(defun ivy-completion-in-region (start end collection &optional predicate)
+  "An Ivy function suitable for `completion-in-region-function'.
+The function completes the text between START and END using COLLECTION.
+PREDICATE (a function called with no arguments) says when to exit.
+See `completion-in-region' for further information."
+  (let* ((enable-recursive-minibuffers t)
+         (reg (- end start))
+         (str (buffer-substring-no-properties start end))
+         (completion-ignore-case (ivy--case-fold-p str))
+         (md (completion-metadata str collection predicate))
+         (try (completion-try-completion str collection predicate reg md))
+         (comps (completion-all-completions str collection predicate reg md))
+         (last (last comps))
+         (base-size (or (cdr last) 0))
+         (ivy--minibuffer-table collection)
+         (ivy--minibuffer-pred predicate))
+    (when last (setcdr last ()))
+    ;; For no/sole match:
+    ;; give priority to boolean `try', falling back on `comps'.
+    (cond ((not (and try (or (eq try t) comps)))
+           (and (not completion-fail-discreetly)
+                completion-show-inline-help
+                (minibuffer-message "No matches"))
+           nil)
+          ((and try (or (eq try t) (equal (list str) comps)))
+           (goto-char end)
+           (let ((minibuffer-completion-table collection)
+                 (minibuffer-completion-predicate predicate))
+             (completion--done str 'finished "Sole match"))
+           t)
+          (t
+           (when (ivy--crm-p collection)
+             (setq comps (delete-dups comps)))
+           (let ((initial (substring str base-size))
+                 (base-pos (+ start base-size)))
+             (delete-region base-pos end)
+             (setq ivy-completion-beg base-pos)
+             (setq ivy-completion-end ivy-completion-beg)
+             (if (null (cdr comps))
+                 (let ((ivy--minibuffer-try try))
+                   (unless (minibuffer-window-active-p (selected-window))
+                     (setf (ivy-state-window ivy-last) (selected-window)))
+                   (ivy-completion-in-region-action
+                    (substring-no-properties (car comps))))
+               (dolist (s comps)
+                 ;; Remove face `completions-first-difference'.
+                 (ivy--remove-props s 'face))
+               (setq ivy--old-re nil)
+               (unless (ivy--filter initial comps)
+                 (setq initial nil)
+                 (setq predicate nil)
+                 (setq collection comps))
+               (unless (derived-mode-p #'emacs-lisp-mode)
+                 (setq collection comps)
+                 (setq predicate nil))
+               (ivy-read (format "(%s): " str) collection
+                         :predicate predicate
+                         ;; FIXME: The anchor is intrusive and not easily
+                         ;; configurable by `ivy-initial-inputs-alist' or
+                         ;; `ivy-hooks-alist'.
+                         :initial-input (concat
+                                         (and (derived-mode-p #'emacs-lisp-mode)
+                                              "^")
+                                         initial)
+                         :action #'ivy-completion-in-region-action
+                         :unwind (lambda ()
+                                   (unless (eq ivy-exit 'done)
+                                     (goto-char ivy-completion-beg)
+                                     (when initial
+                                       (insert initial))))
+                         :caller 'ivy-completion-in-region)))
+           ;; Return value should be t on valid completion;
+           ;; see `completion-in-region'.
+           t))))
+
+(defun ivy-completion-in-region-prompt ()
+  "Prompt function for `ivy-completion-in-region'.
+See `ivy-set-prompt'."
+  (and (window-minibuffer-p (ivy-state-window ivy-last))
+       (ivy-add-prompt-count (ivy-state-prompt ivy-last))))
+
+(ivy-set-prompt #'ivy-completion-in-region #'ivy-completion-in-region-prompt)
+
+(defcustom ivy-do-completion-in-region t
+  "When non-nil `ivy-mode' will set `completion-in-region-function'."
+  :type 'boolean)
+
+(defvar ivy--old-crf nil
+  "Store previous value of `completing-read-function'.")
+
+(defvar ivy--old-cirf nil
+  "Store previous value of `completion-in-region-function'.")
+
+;;;###autoload
+(define-minor-mode ivy-mode
+  "Toggle Ivy mode on or off.
+Turn Ivy mode on if ARG is positive, off otherwise.
+Turning on Ivy mode sets `completing-read-function' to
+`ivy-completing-read'.
+
+Global bindings:
+\\{ivy-mode-map}
+
+Minibuffer bindings:
+\\{ivy-minibuffer-map}"
+  :group 'ivy
+  :global t
+  :keymap ivy-mode-map
+  :lighter " ivy"
+  (if ivy-mode
+      (progn
+        (unless (eq completing-read-function #'ivy-completing-read)
+          (setq ivy--old-crf completing-read-function)
+          (setq completing-read-function #'ivy-completing-read))
+        (when ivy-do-completion-in-region
+          (unless (eq completion-in-region-function #'ivy-completion-in-region)
+            (setq ivy--old-cirf completion-in-region-function)
+            (setq completion-in-region-function #'ivy-completion-in-region))))
+    (when (eq completing-read-function #'ivy-completing-read)
+      (setq completing-read-function (or ivy--old-crf
+                                         #'completing-read-default))
+      (setq ivy--old-crf nil))
+    (when (eq completion-in-region-function #'ivy-completion-in-region)
+      (setq completion-in-region-function (or ivy--old-cirf
+                                              #'completion--in-region))
+      (setq ivy--old-cirf nil))))
+
+(defun ivy--preselect-index (preselect candidates)
+  "Return the index of PRESELECT in CANDIDATES."
+  (or (cond ((integerp preselect)
+             (if (integerp (car candidates))
+                 (cl-position preselect candidates)
+               preselect))
+            ((cl-position preselect candidates :test #'equal))
+            ((ivy--regex-p preselect)
+             (cl-position preselect candidates :test #'string-match-p)))
+      0))
+
+;;; Implementation
+;;;; Regexp
+
+(defun ivy-re-match (re-seq str)
+  "Return non-nil if RE-SEQ is matched by STR.
+
+RE-SEQ is a list of (RE . MATCH-P).
+
+RE is a regular expression.
+
+MATCH-P is t when RE should match STR and nil when RE should not
+match STR.
+
+Each element of RE-SEQ must match for the function to return true.
+
+This concept is used to generalize regular expressions for
+`ivy--regex-plus' and `ivy--regex-ignore-order'."
+  (let ((res t))
+    (while (let ((pair (pop re-seq)))
+             (and pair (setq res (xor (not (cdr pair))
+                                      (string-match-p (car pair) str))))))
+    res))
+
+(defvar ivy--regex-hash
+  (make-hash-table :test #'equal)
+  "Store pre-computed regex.")
+
+(defvar ivy--input-garbage nil)
+
+(defun ivy--split (str)
+  "Split STR into list of substrings bounded by spaces.
+Single spaces act as splitting points.  Consecutive spaces
+\"quote\" their preceding spaces, i.e., guard them from being
+split.  This allows the literal interpretation of N spaces by
+inputting N+1 spaces.  Any substring not constituting a valid
+regexp is passed to `regexp-quote'."
+  (let ((len (length str))
+        (i 0)
+        (start 0)
+        (res nil)
+        match-len
+        end
+        c)
+    (catch 'break
+      (while (< i len)
+        (setq c (aref str i))
+        (cond ((= ?\[ c)
+               (if (setq end (ivy--match-regex-brackets
+                              (substring str i)))
+                   (cl-incf i end)
+                 (setq ivy--input-garbage (substring str i))
+                 (throw 'break nil)))
+              ((= ?\\ c)
+               (if (and (< (1+ i) len) (= ?\( (aref str (1+ i))))
+                   (progn
+                     (when (> i start)
+                       (push (substring str start i) res))
+                     (if (eq (string-match "\\\\([^\0]*?\\\\)" str i) i)
+                         (progn
+                           (push (match-string 0 str) res)
+                           (setq i (match-end 0))
+                           (setq start i))
+                       (setq ivy--input-garbage (substring str i))
+                       (throw 'break nil)))
+                 (cl-incf i)))
+              ((= ?\s c)
+               (string-match " +" str i)
+               (setq match-len (- (match-end 0) (match-beginning 0)))
+               (if (= match-len 1)
+                   (progn
+                     (when (> i start)
+                       (push (substring str start i) res))
+                     (setq start (1+ i)))
+                 (setq str (replace-match
+                            (make-string (1- match-len) ?\s)
+                            nil nil str))
+                 (setq len (length str))
+                 (cl-incf i (1- match-len)))
+               (cl-incf i))
+              (t
+               (cl-incf i)))))
+    (when (< start i)
+      (push (substring str start) res))
+    (mapcar #'ivy--regex-or-literal (nreverse res))))
+
+(defun ivy--match-regex-brackets (str)
+  (let ((len (length str))
+        (i 1)
+        (open-count 1)
+        c)
+    (while (and (< i len)
+                (> open-count 0))
+      (setq c (aref str i))
+      (cond ((= c ?\[)
+             (cl-incf open-count))
+            ((= c ?\])
+             (cl-decf open-count)))
+      (cl-incf i))
+    (when (= open-count 0)
+      (if (eq (string-match "[+*?]" str i) i)
+          (match-end 0)
+        i))))
+
+(defun ivy--trim-trailing-re (regex)
+  "Trim incomplete REGEX.
+If REGEX ends with \\|, trim it, since then it matches an empty string."
+  (if (string-match "\\`\\(.*\\)[\\]|\\'" regex)
+      (match-string 1 regex)
+    regex))
+
+(defun ivy--regex (str &optional greedy)
+  "Re-build regex pattern from STR in case it has a space.
+When GREEDY is non-nil, join words in a greedy way."
+  (let ((hashed (unless greedy
+                  (gethash str ivy--regex-hash))))
+    (if hashed
+        (progn
+          (setq ivy--subexps (car hashed))
+          (cdr hashed))
+      (when (string-match-p "\\(?:[^\\]\\|^\\)\\\\\\'" str)
+        (setq str (substring str 0 -1)))
+      (setq str (ivy--trim-trailing-re str))
+      (cdr (puthash str
+                    (let ((subs (ivy--split str)))
+                      (if (= (length subs) 1)
+                          (cons
+                           (setq ivy--subexps 0)
+                           (if (string-match-p "\\`\\.[^.]" (car subs))
+                               (concat "\\." (substring (car subs) 1))
+                             (car subs)))
+                        (cons
+                         (setq ivy--subexps (length subs))
+                         (replace-regexp-in-string
+                          "\\.\\*\\??\\\\( "
+                          "\\( "
+                          (mapconcat
+                           (lambda (x)
+                             (if (string-match-p "\\`\\\\([^?][^\0]*\\\\)\\'" x)
+                                 x
+                               (format "\\(%s\\)" x)))
+                           subs
+                           (if greedy ".*" ".*?"))
+                          t t))))
+                    ivy--regex-hash)))))
+
+(defun ivy--regex-p (object)
+  "Return OBJECT if it is a valid regular expression, else nil."
+  (ignore-errors (ignore (string-match-p object "")) object))
+
+(defun ivy--regex-or-literal (str)
+  "If STR isn't a legal regexp, escape it."
+  (or (ivy--regex-p str) (regexp-quote str)))
+
+(defun ivy--split-negation (str)
+  "Split STR into text before and after ! delimiter.
+Do not split if the delimiter is escaped as \\!.
+
+Assumes there is at most one un-escaped delimiter and discards
+text after delimiter if it is empty.  Modifies match data."
+  (unless (string= str "")
+    (mapcar (lambda (split)
+              ;; Store "\!" as "!".
+              (ivy--string-replace "\\!" "!" split))
+            (let ((delim "\\(?:\\`\\|[^\\]\\)\\(!\\)"))
+              (if (string-match delim str)
+                  ;; Ignore everything past first un-escaped ! rather than
+                  ;; crashing.  We can't warn or error because the minibuffer is
+                  ;; already active.
+                  (let* ((i (match-beginning 1))
+                         (j (and (string-match delim str (1+ i))
+                                 (match-beginning 1)))
+                         (neg (substring str (1+ i) j)))
+                    (cons (substring str 0 i)
+                          (and (not (string= neg ""))
+                               (list neg))))
+                (list str))))))
+
+(defun ivy--split-spaces (str)
+  "Split STR on spaces, unless they're preceded by \\.
+No un-escaped spaces are left in the output.  Any substring not
+constituting a valid regexp is passed to `regexp-quote'."
+  (when str
+    (let ((i 0) ; End of last search.
+          (j 0) ; End of last delimiter.
+          parts)
+      (while (string-match "\\(\\\\ \\)\\| +" str i)
+        (setq i (match-end 0))
+        (if (not (match-beginning 1))
+            ;; Un-escaped space(s).
+            (let ((delim (match-beginning 0)))
+              (when (< j delim)
+                (push (substring str j delim) parts))
+              (setq j i))
+          ;; Store "\ " as " ".
+          (setq str (replace-match " " t t str 1))
+          (setq i (1- i))))
+      (when (< j (length str))
+        (push (substring str j) parts))
+      (mapcar #'ivy--regex-or-literal (nreverse parts)))))
+
+(defun ivy--regex-ignore-order (str)
+  "Re-build regex from STR by splitting at spaces and using ! for negation.
+
+Examples:
+foo          -> matches \"foo\"
+foo bar      -> matches if both \"foo\" and \"bar\" match (any order)
+foo !bar     -> matches if \"foo\" matches and \"bar\" does not match
+foo !bar baz -> matches if \"foo\" matches and neither \"bar\" nor \"baz\" match
+foo[a-z]     -> matches \"foo[a-z]\"
+
+Escaping examples:
+foo\\!bar -> matches \"foo!bar\"
+foo\\ bar -> matches \"foo bar\"
+
+Returns a list suitable for `ivy-re-match'."
+  (setq str (ivy--trim-trailing-re str))
+  (let* (regex-parts
+         (raw-parts (ivy--split-negation str)))
+    (dolist (part (ivy--split-spaces (car raw-parts)))
+      (push (cons part t) regex-parts))
+    (when (cdr raw-parts)
+      (dolist (part (ivy--split-spaces (cadr raw-parts)))
+        (push (cons part nil) regex-parts)))
+    (if regex-parts (nreverse regex-parts)
+      "")))
+
+(defun ivy--regex-plus (str)
+  "Build a regex sequence from STR.
+Spaces are wild card characters, everything before \"!\" should
+match.  Everything after \"!\" should not match."
+  (let ((parts (ivy--split-negation str)))
+    (cl-case (length parts)
+      (0
+       "")
+      (1
+       (if (= (aref str 0) ?!)
+           (list (cons "" t)
+                 (list (ivy--regex (car parts))))
+         (ivy--regex (car parts))))
+      (2
+       (cons
+        (cons (ivy--regex (car parts)) t)
+        (mapcar #'list (split-string (cadr parts) " " t))))
+      (t (error "Unexpected: use only one !")))))
+
+(defun ivy--regex-fuzzy (str)
+  "Build a regex sequence from STR.
+Insert .* between each char."
+  (setq str (ivy--trim-trailing-re str))
+  (if (string-match "\\`\\(\\^?\\)\\(.*?\\)\\(\\$?\\)\\'" str)
+      (prog1
+          (concat (match-string 1 str)
+                  (let ((lst (string-to-list (match-string 2 str))))
+                    (apply #'concat
+                           (cl-mapcar
+                            #'concat
+                            (cons "" (cdr (mapcar (lambda (c) (format "[^%c\n]*" c))
+                                                  lst)))
+                            (mapcar (lambda (x) (format "\\(%s\\)" (regexp-quote (char-to-string x))))
+                                    lst))))
+                  (match-string 3 str))
+        (setq ivy--subexps (length (match-string 2 str))))
+    str))
+
+(defcustom ivy-fixed-height-minibuffer nil
+  "When non nil, fix the height of the minibuffer during ivy completion.
+This effectively sets the minimum height at this level to `ivy-height' and
+tries to ensure that it does not change depending on the number of candidates."
+  :type 'boolean)
+
+;;;; Rest
+
+(defcustom ivy-truncate-lines t
+  "Minibuffer setting for `truncate-lines'."
+  :type 'boolean)
+
+(defvar-local ivy--minibuffer nil
+  "Whether the current buffer is an Ivy minibuffer.")
+
+(defun ivy--minibuffer-setup ()
+  "Set up Ivy completion in `minibuffer-setup-hook'."
+  ;; Guard for --without-x builds where `mwheel' is not preloaded.
+  (when (boundp 'mwheel-scroll-up-function)
+    (setq-local mwheel-scroll-up-function 'ivy-next-line))
+  (when (boundp 'mwheel-scroll-down-function)
+    (setq-local mwheel-scroll-down-function 'ivy-previous-line))
+  (setq-local completion-show-inline-help nil)
+  (setq-local line-spacing nil)
+  (setq-local minibuffer-default-add-function
+              (lambda ()
+                (list ivy--default)))
+  (setq-local inhibit-field-text-motion nil)
+  (setq truncate-lines ivy-truncate-lines)
+  (setq-local max-mini-window-height ivy-height)
+  (let ((height (cond ((and ivy-fixed-height-minibuffer
+                            (not (eq (ivy-state-caller ivy-last)
+                                     #'ivy-completion-in-region)))
+                       (+ ivy-height (if ivy-add-newline-after-prompt 1 0)))
+                      (ivy-add-newline-after-prompt 2))))
+    (when height
+      (set-window-text-height nil height)))
+  (add-hook 'minibuffer-exit-hook #'ivy--minibuffer-exit nil t)
+  (add-hook 'post-command-hook #'ivy--queue-exhibit nil t)
+  (add-hook 'window-size-change-functions #'ivy--window-size-changed nil t)
+  (setq ivy--minibuffer t)
+  (let ((hook (ivy-alist-setting ivy-hooks-alist)))
+    (when (functionp hook)
+      (funcall hook))))
+
+(defun ivy--minibuffer-exit ()
+  "Clean up Ivy completion in `minibuffer-exit-hook'."
+  (remove-hook 'minibuffer-exit-hook #'ivy--minibuffer-exit t)
+  (remove-hook 'post-command-hook #'ivy--queue-exhibit t)
+  (remove-hook 'window-size-change-functions #'ivy--window-size-changed t))
+
+(defun ivy--input ()
+  "Return the current minibuffer input."
+  ;; Assume one-line minibuffer input.
+  (save-excursion
+    (goto-char (minibuffer-prompt-end))
+    (buffer-substring-no-properties (point) (ivy--pos-eol))))
+
+(defun ivy--minibuffer-cleanup ()
+  "Delete the displayed completion candidates."
+  (save-excursion
+    (goto-char (minibuffer-prompt-end))
+    (delete-region (ivy--pos-eol) (point-max))))
+
+(defun ivy-cleanup-string (str)
+  "Destructively remove unwanted text properties from STR."
+  (ivy--remove-props str 'field))
+
+(defvar ivy-set-prompt-text-properties-function
+  #'ivy-set-prompt-text-properties-default
+  "Function to set the text properties of the default ivy prompt.
+Called with two arguments, PROMPT and PROPS, where PROMPT is the
+string to be propertized and PROPS is a plist of default text
+properties that may be applied to PROMPT.  The function should
+return the propertized PROMPT, which may be modified in-place.")
+
+(defun ivy-set-prompt-text-properties-default (prompt props)
+  "Propertize (confirm) and (match required) parts of PROMPT.
+PROPS is a plist of default text properties to apply to these
+parts beyond their respective faces `ivy-confirm-face' and
+`ivy-match-required-face'."
+  (dolist (pair '(("confirm" . ivy-confirm-face)
+                  ("match required" . ivy-match-required-face)))
+    (let* ((beg (ivy--string-search (car pair) prompt))
+           (end (and beg (+ beg (length (car pair))))))
+      (when beg
+        (add-face-text-property beg end (cdr pair) nil prompt)
+        (add-text-properties beg end props prompt))))
+  prompt)
+
+(defun ivy-prompt ()
+  "Return the current prompt."
+  (let* ((caller (ivy-state-caller ivy-last))
+         (fn (plist-get ivy--prompts-list caller)))
+    (if fn
+        (condition-case err
+            (funcall fn)
+          (wrong-number-of-arguments
+           (lwarn 'ivy :error "%s
+  Prompt function set via `ivy-set-prompt' for caller `%s'
+  should take no arguments."
+                  (error-message-string err)
+                  caller)
+           ;; Old behavior.
+           (funcall fn (ivy-state-prompt ivy-last))))
+      ivy--prompt)))
+
+(defun ivy--break-lines (str width)
+  "Break each line in STR with newlines to fit into WIDTH columns."
+  (if (<= width 0)
+      str
+    (let (lines)
+      (dolist (line (split-string str "\n"))
+        (while (and line (> (string-width line) width))
+          (let ((prefix "") (extra 0))
+            (while (string-empty-p prefix)
+              ;; Grow `width' until it fits at least one char from `line'.
+              (setq prefix (truncate-string-to-width line (+ width extra)))
+              (setq extra (1+ extra)))
+            ;; Avoid introducing spurious newline if `prefix' and `line' are
+            ;; equal, i.e., if `line' couldn't be truncated to `width'.
+            (setq line (and (> (length line) (length prefix))
+                            (substring line (length prefix))))
+            (push prefix lines)))
+        (when line (push line lines)))
+      (string-join (nreverse lines) "\n"))))
+
+(defun ivy--propertize-prompt (prompt)
+  "Propertize PROMPT like `read-from-minibuffer' would.
+Also handle `ivy-set-prompt-text-properties-function'."
+  (let ((len (length prompt))
+        ;; Added unconditionally by `read-from-minibuffer'.
+        (props (list 'front-sticky t 'rear-nonsticky t 'field t))
+        ;; Configurable.
+        (extras minibuffer-prompt-properties))
+    ;; Filter out `face'; it is documented as being appended instead, and was
+    ;; historically excluded from `ivy-set-prompt-text-properties-function'.
+    (while extras
+      (let ((key (pop extras))
+            (val (pop extras)))
+        (if (eq key 'face)
+            (add-face-text-property 0 len val t prompt)
+          (setq props (plist-put props key val)))))
+    (add-text-properties 0 len props prompt)
+    (funcall ivy-set-prompt-text-properties-function prompt props)))
+
+(defun ivy--insert-prompt ()
+  "Update the prompt according to `ivy--prompt'."
+  (when (setq ivy--prompt (ivy-prompt))
+    (unless (memq this-command '(ivy-done ivy-alt-done ivy-partial-or-done
+                                 counsel-find-symbol))
+      (setq ivy--prompt-extra ""))
+    (let (head tail)
+      (if (string-match "\\(.*?\\)\\(:? ?\\)\\'" ivy--prompt)
+          (progn
+            (setq head (match-string 1 ivy--prompt))
+            (setq tail (match-string 2 ivy--prompt)))
+        (setq head ivy--prompt)
+        (setq tail ""))
+      (let ((inhibit-read-only t)
+            (n-str
+             (concat
+              (and (bound-and-true-p minibuffer-depth-indicate-mode)
+                   (> (minibuffer-depth) 1)
+                   (format "[%d] " (minibuffer-depth)))
+              (let ((count (or (and (ivy-state-dynamic-collection ivy-last)
+                                    ivy--full-length)
+                               ivy--length)))
+                (if (string-match-p "%d.*%d" ivy-count-format)
+                    (format head (min (1+ ivy--index) count) count)
+                  (format head count)))
+              ivy--prompt-extra
+              tail))
+            (d-str (if ivy--directory
+                       (abbreviate-file-name ivy--directory)
+                     "")))
+        (save-excursion
+          (goto-char (point-min))
+          (delete-region (point-min) (minibuffer-prompt-end))
+          (let ((wid-n (string-width n-str))
+                (wid-d (string-width d-str))
+                (ww (window-width)))
+            (setq n-str
+                  (cond ((> (+ wid-n wid-d) ww)
+                         (concat n-str "\n" d-str "\n"))
+                        ((> (+ wid-n wid-d (string-width ivy-text)) ww)
+                         (concat n-str d-str "\n"))
+                        (t
+                         (concat n-str d-str)))))
+          (when ivy-pre-prompt-function
+            (setq n-str (concat (funcall ivy-pre-prompt-function) n-str)))
+          (when ivy-add-newline-after-prompt
+            (setq n-str (concat n-str "\n")))
+          (setq n-str (ivy--break-lines n-str (window-width)))
+          (insert (ivy--propertize-prompt n-str)))
+        ;; Mark prompt as selected if the user moves there or it is the only
+        ;; option left.  Since the user input stays put, we have to manually
+        ;; remove the face as well.
+        (when ivy--use-selectable-prompt
+          (let ((prompt (minibuffer-prompt-end))
+                (eol (ivy--pos-eol)))
+            (if (= ivy--index -1)
+                (add-face-text-property prompt eol 'ivy-prompt-match)
+              (remove-list-of-text-properties prompt eol '(face)))))
+        ;; get out of the prompt area
+        (constrain-to-field nil (point-max))))))
+
+(defun ivy--sort-maybe (collection)
+  "Sort COLLECTION if needed."
+  (let ((sort (ivy-state-sort ivy-last)))
+    (if (and sort
+             (or (functionp sort)
+                 (functionp (setq sort (ivy--sort-function
+                                        (ivy-state-collection ivy-last))))))
+        (sort (copy-sequence collection) sort)
+      collection)))
+
+(defcustom ivy-magic-slash-non-match-action
+  'ivy-magic-slash-non-match-cd-selected
+  "Action to take when a slash is appended to a nonexistent directory.
+Possible choices are `ivy-magic-slash-non-match-cd-selected',
+`ivy-magic-slash-non-match-create', or nil"
+  :type '(choice
+          (const :tag "Use currently selected directory"
+           ivy-magic-slash-non-match-cd-selected)
+          (const :tag "Create and use new directory"
+           ivy-magic-slash-non-match-create)
+          (const :tag "Do nothing"
+           nil)))
+
+(defun ivy--create-and-cd (dir)
+  "When completing file names, create directory DIR and move there."
+  (make-directory dir)
+  (ivy--cd dir))
+
+(defun ivy--magic-file-doubleslash-directory ()
+  "Return an appropriate directory for when two slashes are entered."
+  (let (remote)
+    (cond
+      ;; Windows
+      ;; ((string-match "\\`[[:alpha:]]:/" ivy--directory)
+      ;;  (match-string 0 ivy--directory))
+      ;; Remote root if on remote
+      ((setq remote (file-remote-p ivy--directory))
+       (concat remote "/"))
+      ;; Local root
+      (t
+       "/"))))
+
+(defun ivy--magic-file-slash ()
+  "Handle slash when completing file names."
+  (when (or (and (eq this-command #'self-insert-command)
+                 (eolp))
+            (eq this-command #'ivy-partial-or-done))
+    (let ((canonical (expand-file-name ivy-text ivy--directory))
+          (magic (not (string= ivy-text "/"))))
+      (cond ((member ivy-text ivy--all-candidates)
+             (ivy--cd canonical))
+            ((and (eq system-type 'windows-nt) (string= ivy-text "//")))
+            ((string-suffix-p "//" ivy-text)
+             (ivy--cd
+              (ivy--magic-file-doubleslash-directory)))
+            ((string-prefix-p "/ssh:" ivy-text)
+             (ivy--cd (file-name-directory ivy-text)))
+            ((string-match "[[:alpha:]]:/\\'" ivy-text)
+             (let ((drive-root (match-string 0 ivy-text)))
+               (when (file-exists-p drive-root)
+                 (ivy--cd drive-root))))
+            ((and magic (file-directory-p canonical))
+             (ivy--cd canonical))
+            ((let ((default-directory ivy--directory))
+               (and (or (> ivy--index 0)
+                        (= ivy--length 1)
+                        magic)
+                    (not (ivy--prompt-selected-p))
+                    (not (equal (ivy-state-current ivy-last) ""))
+                    (file-directory-p (ivy-state-current ivy-last))
+                    (or (eq ivy-magic-slash-non-match-action
+                            'ivy-magic-slash-non-match-cd-selected)
+                        (eq this-command #'ivy-partial-or-done))))
+             (ivy--cd
+              (expand-file-name (ivy-state-current ivy-last) ivy--directory)))
+            ((and (eq ivy-magic-slash-non-match-action
+                      'ivy-magic-slash-non-match-create)
+                  magic)
+             (ivy--create-and-cd canonical))))))
+
+(defun ivy-magic-read-file-env ()
+  "If reading filename, jump to environment variable location."
+  (interactive)
+  (if (and ivy--directory
+           (equal ivy-text ""))
+      (let* ((cands (cl-loop for pair in process-environment
+                       for (var val) = (split-string pair "=" t)
+                       if (and val (not (equal "" val)))
+                       if (file-exists-p
+                           (if (file-name-absolute-p val)
+                               val
+                             (setq val
+                                   (expand-file-name val ivy--directory))))
+                       collect (cons var val)))
+             (enable-recursive-minibuffers t)
+             (x (ivy-read "Env: " cands))
+             (path (cdr (assoc x cands))))
+        (insert (if (file-accessible-directory-p path)
+                    (file-name-as-directory path)
+                  path))
+        (ivy--cd-maybe))
+    (insert last-input-event)))
+(ivy--no-M-x #'ivy-magic-read-file-env #'ivy--minibuffer-p)
+
+(defun ivy-make-magic-action (caller key)
+  "Return a command that does the equivalent of `ivy-read-action' and KEY.
+This happens only when the input is empty.
+The intention is to bind the result to keys that are typically
+bound to `self-insert-command'."
+  (let* ((action (assoc key (plist-get ivy--actions-list caller)))
+         (fn (nth 1 action))
+         (desc (nth 2 action))
+         (keyseq (kbd (concat "M-o " key))))
+    (defalias (make-symbol (format "ivy--magic-%s" caller))
+      (lambda (&optional arg)
+        (interactive "p")
+        (if (string= "" ivy-text)
+            (execute-kbd-macro keyseq)
+          (self-insert-command arg)))
+      (and action (format "Action: %s (`%S')." desc fn)))))
+
+(defcustom ivy-magic-tilde t
+  "When non-nil, ~ will move home when selecting files.
+Otherwise, ~/ will move home."
+  :type 'boolean)
+
+(defcustom ivy-dynamic-exhibit-delay-ms 0
+  "Delay in milliseconds before dynamic collections are refreshed."
+  :type 'integer)
+
+(defvar ivy--exhibit-timer nil
+  "Timer for debouncing calls to `ivy--exhibit'.")
+
+(defvar ivy--queue-last-input nil
+  "Value of `ivy--input' from last `post-command-hook'.")
+
+(defun ivy--queue-exhibit ()
+  "Refresh Ivy completions display, with debouncing.
+This is like `ivy--exhibit', but dynamic collections are delayed by
+`ivy-dynamic-exhibit-delay-ms' to avoid issues with rapid refreshes.
+Should be run via minibuffer `post-command-hook'."
+  (if (or (<= ivy-dynamic-exhibit-delay-ms 0)
+          (not (ivy-state-dynamic-collection ivy-last))
+          (equal ivy--queue-last-input
+                 (setq ivy--queue-last-input (ivy--input))))
+      (ivy--exhibit)
+    (when ivy--exhibit-timer (cancel-timer ivy--exhibit-timer))
+    (setq ivy--exhibit-timer
+          (run-with-timer (/ ivy-dynamic-exhibit-delay-ms 1000.0)
+                          nil #'ivy--exhibit))))
+
+(defalias 'ivy--file-local-name
+  (if (fboundp 'file-local-name)
+      #'file-local-name
+    (lambda (file)
+      (or (file-remote-p file 'localname) file)))
+  "Compatibility shim for `file-local-name'.
+The function was added in Emacs 26.1.")
+
+(defun ivy--magic-tilde-directory (dir)
+  "Return an appropriate home for DIR for when ~ or ~/ are entered."
+  (file-name-as-directory
+   (expand-file-name
+    (let* ((home (expand-file-name (concat (file-remote-p dir) "~/")))
+           (dir-path (ivy--file-local-name dir))
+           (home-path (ivy--file-local-name home)))
+      (if (string= dir-path home-path)
+          "~"
+        home)))))
+
+(defun ivy-update-candidates (cands)
+  (ivy--insert-minibuffer
+   (ivy--format
+    (setq ivy--all-candidates cands))))
+
+;; Perhaps only one of `ivy--completing-p' or `ivy--minibuffer-p' is needed,
+;; but they are not equivalent: the former becomes nil after an error.
+
+(defun ivy--completing-p ()
+  "Return non-nil if Ivy is completing in the current buffer."
+  (memq #'ivy--queue-exhibit post-command-hook))
+
+(defun ivy--minibuffer-p (_cmd buf)
+  "Return non-nil if BUF is an Ivy minibuffer.
+Intended as a `completion-predicate'."
+  (buffer-local-value 'ivy--minibuffer buf))
+
+(defun ivy--exhibit ()
+  "Insert Ivy completions display.
+Should be run in the minibuffer."
+  (when (ivy--completing-p)
+    (let ((inhibit-field-text-motion nil))
+      (constrain-to-field nil (point-max)))
+    (ivy-set-text (ivy--input))
+    (let ((new-minibuffer (ivy--update-minibuffer)))
+      (when new-minibuffer
+        (ivy--insert-minibuffer new-minibuffer)))
+    t))
+
+(defun ivy--dynamic-collection-cands (input)
+  (let ((coll (condition-case nil
+                  (funcall (ivy-state-collection ivy-last) input)
+                (error
+                 (funcall (ivy-state-collection ivy-last) input nil t)))))
+    (if (listp coll)
+        (mapcar (lambda (x) (if (consp x) (car x) x)) coll)
+      coll)))
+
+(defun ivy--update-minibuffer ()
+  (prog1
+      (if (ivy-state-dynamic-collection ivy-last)
+          ;; while-no-input would cause annoying
+          ;; "Waiting for process to die...done" message interruptions
+          (let ((inhibit-message t)
+                coll in-progress)
+            (unless (or (equal ivy--old-text ivy-text)
+                        (eq this-command 'ivy-resume))
+              (while-no-input
+                (setq coll (ivy--dynamic-collection-cands ivy-text))
+                (when (eq coll 0)
+                  (setq coll nil)
+                  (setq ivy--old-re nil)
+                  (setq in-progress t))
+                (setq ivy--all-candidates (ivy--sort-maybe coll))))
+            (when (eq ivy--all-candidates 0)
+              (setq ivy--all-candidates nil)
+              (setq ivy--old-re nil)
+              (setq in-progress t))
+            (when (or ivy--all-candidates
+                      (not (or (get-process " *counsel*")
+                               in-progress)))
+              (ivy--set-index-dynamic-collection)
+              (ivy--format ivy--all-candidates)))
+        (cond (ivy--directory
+               (cond ((or (string= "~/" ivy-text)
+                          (and (string= "~" ivy-text)
+                               ivy-magic-tilde))
+                      (ivy--cd (ivy--magic-tilde-directory ivy--directory)))
+                     ((string-suffix-p "/" ivy-text)
+                      (ivy--magic-file-slash))))
+              ((eq (ivy-state-collection ivy-last) #'internal-complete-buffer)
+               (let ((spaced (= (string-to-char ivy-text) ?\s)))
+                 (when (xor spaced (= (string-to-char ivy--old-text) ?\s))
+                   (setq ivy--all-candidates
+                         (if spaced
+                             (ivy--buffer-list " ")
+                           (ivy--buffer-list "" ivy-use-virtual-buffers)))
+                   (setq ivy--old-re nil)))))
+        (with-current-buffer (ivy-state-buffer ivy-last)
+          (ivy--format
+           (ivy--filter ivy-text ivy--all-candidates))))
+    (setq ivy--old-text ivy-text)))
+
+(defun ivy-display-function-fallback (str)
+  (let ((buffer-undo-list t))
+    (save-excursion
+      (forward-line 1)
+      (insert str))))
+
+(defun ivy--insert-minibuffer (text)
+  "Insert TEXT into minibuffer with appropriate cleanup."
+  (let ((resize-mini-windows nil)
+        (update-fn (ivy-state-update-fn ivy-last))
+        (old-mark (marker-position (mark-marker)))
+        (win (active-minibuffer-window))
+        deactivate-mark)
+    (when win
+      (with-selected-window win
+        (ivy--minibuffer-cleanup)
+        (when update-fn
+          (funcall update-fn))
+        (ivy--insert-prompt)
+        ;; Do nothing if while-no-input was aborted.
+        (when (stringp text)
+          (if ivy--display-function
+              (funcall ivy--display-function text)
+            (ivy-display-function-fallback text)))
+        (ivy--resize-minibuffer-to-fit)
+        ;; prevent region growing due to text remove/add
+        (when (region-active-p)
+          (set-mark old-mark))))))
+
+(defvar ivy-auto-shrink-minibuffer nil
+  "When non-nil and the height < `ivy-height', auto-shrink the minibuffer.")
+
+(make-obsolete-variable 'ivy-auto-shrink-minibuffer
+                        'ivy-auto-shrink-minibuffer-alist
+                        "0.13.2 (2020-04-28)")
+
+(defcustom ivy-auto-shrink-minibuffer-alist nil
+  "An alist to configure auto-shrinking of the minibuffer.
+
+Each key is a caller symbol.  When the value is non-nil, and the
+height < `ivy-height', auto-shrink the minibuffer."
+  :type '(alist
+          :key-type symbol
+          :value-type boolean))
+
+(defun ivy--do-shrink-window ()
+  (let ((h (save-excursion
+             (goto-char (minibuffer-prompt-end))
+             (let ((inhibit-field-text-motion t))
+               (line-number-at-pos)))))
+    (shrink-window (-
+                    (/ (window-body-height nil t)
+                       (frame-char-height))
+                    ivy--length h))))
+
+(defun ivy--resize-minibuffer-to-fit ()
+  "Resize the minibuffer window size to fit the text in the minibuffer."
+  (unless (or (frame-root-window-p (minibuffer-window))
+              (memq this-command '(ivy-read-action
+                                   ivy-dispatching-done
+                                   ivy-dispatching-call)))
+    (with-selected-window (minibuffer-window)
+      (if (fboundp 'window-text-pixel-size)
+          (let ((text-height (cdr (window-text-pixel-size)))
+                (body-height (window-body-height nil t)))
+            (cond ((> text-height body-height)
+                   ;; Note: the size increment needs to be at least
+                   ;; frame-char-height, otherwise resizing won't do
+                   ;; anything.
+                   (let ((delta (max (- text-height body-height)
+                                     (frame-char-height))))
+                     (window-resize nil delta nil t t)))
+                  ((and (or ivy-auto-shrink-minibuffer
+                            (ivy-alist-setting
+                             ivy-auto-shrink-minibuffer-alist))
+                        (< ivy--length ivy-height))
+                   (ivy--do-shrink-window))))
+        (let ((text-height (count-screen-lines))
+              (body-height (window-body-height)))
+          (when (> text-height body-height)
+            (window-resize nil (- text-height body-height) nil t)))))))
+
+(defun ivy--window-size-changed (&rest _)
+  "Resize ivy window to fit with current frame's size."
+  (when (ivy--completing-p)
+    (ivy--resize-minibuffer-to-fit)))
+
+(defun ivy--add-face (str face)
+  "Propertize STR with FACE."
+  (let ((len (length str)))
+    (condition-case nil
+        (progn
+          (colir-blend-face-background 0 len face str)
+          (let ((foreground (face-foreground face)))
+            (when foreground
+              (add-face-text-property
+               0 len (list :foreground foreground) nil str))))
+      (error
+       (ignore-errors
+         (font-lock-append-text-property 0 len 'face face str)))))
+  str)
+
+(declare-function flx-make-string-cache "ext:flx")
+(declare-function flx-score "ext:flx")
+
+(defvar ivy--flx-cache nil)
+
+(with-eval-after-load 'flx
+  (setq ivy--flx-cache (flx-make-string-cache)))
+
+(defun ivy-toggle-case-fold ()
+  "Toggle `case-fold-search' for Ivy operations.
+
+Instead of modifying `case-fold-search' directly, this command
+toggles `ivy-case-fold-search', which can take on more values
+than the former, between nil and either `auto' or t.  See
+`ivy-case-fold-search-default' for the meaning of these values.
+
+In any Ivy completion session, the case folding starts with
+`ivy-case-fold-search-default'."
+  (interactive)
+  (setq ivy-case-fold-search
+        (and (not ivy-case-fold-search)
+             (or ivy-case-fold-search-default 'auto)))
+  ;; Reset cache so that the candidate list updates.
+  (setq ivy--old-re nil))
+(ivy--no-M-x #'ivy-toggle-case-fold #'ivy--minibuffer-p)
+
+(defun ivy--re-filter (filter candidates &optional mkpred)
+  "Return all CANDIDATES matching FILTER, or nil on error.
+FILTER is either a string or a list of (REGEXP . BOOLEAN).
+The result includes those CANDIDATES which are matched by each REGEXP
+whose BOOLEAN is non-nil, and not matched by any other REGEXP.
+A string FILTER is equivalent to ((FILTER . t)).
+
+If MKPRED is non-nil, it is a function to be called on each REGEXP,
+returning a unary predicate for filtering CANDIDATES which overrides
+this function's default regexp matching behavior."
+  (if (member filter '("" ()))
+      candidates
+    (setq candidates (copy-sequence candidates))
+    ;; Return nil (not candidates) on error, e.g., when we try to filter
+    ;; `swiper-isearch' numeric candidates with `string-match-p'.
+    (ignore-errors
+      (dolist (matcher (if (stringp filter) (list (cons filter t)) filter))
+        (let* ((re (car matcher))
+               (pred
+                (if mkpred
+                    (funcall mkpred re)
+                  (lambda (x) (string-match-p re x)))))
+          (setq candidates
+                (cl-delete nil candidates
+                           (if (cdr matcher) :if-not :if)
+                           pred))))
+      candidates)))
+
+(defun ivy--filter (name candidates)
+  "Return all items that match NAME in CANDIDATES.
+CANDIDATES are assumed to be static."
+  (let ((re (funcall ivy--regex-function name)))
+    (if (and
+         ivy--old-re
+         ivy--old-cands
+         (equal re ivy--old-re))
+        ;; quick caching for "C-n", "C-p" etc.
+        ivy--old-cands
+      (let* ((re-str (ivy-re-to-str re))
+             (matcher (ivy-state-matcher ivy-last))
+             (case-fold-search (ivy--case-fold-p name))
+             (cands (cond
+                      (matcher
+                       (funcall matcher re candidates))
+                      ((and ivy--old-re
+                            (stringp re)
+                            (stringp ivy--old-re)
+                            (not (ivy--string-search "\\" ivy--old-re))
+                            (not (equal ivy--old-re ""))
+                            (memq (ivy--string-search
+                                   (string-remove-suffix "\\)" ivy--old-re)
+                                   re)
+                                  '(0 2))
+                            ivy--old-cands
+                            (ivy--re-filter re ivy--old-cands)))
+                      (t
+                       (ivy--re-filter re candidates)))))
+        (if (memq (cdr (assq (ivy-state-caller ivy-last)
+                             ivy-index-functions-alist))
+                  '(ivy-recompute-index-swiper
+                    ivy-recompute-index-swiper-async
+                    ivy-recompute-index-swiper-async-backward
+                    ivy-recompute-index-swiper-backward))
+            (progn
+              (ivy--recompute-index re-str cands)
+              (setq ivy--old-cands (ivy--sort name cands)))
+          (setq ivy--old-cands (ivy--sort name cands))
+          (ivy--recompute-index re-str ivy--old-cands))
+        (setq ivy--old-re re)
+        ivy--old-cands))))
+
+(defun ivy--set-candidates (x)
+  "Update `ivy--all-candidates' with X."
+  (let (res
+        ;; (ivy--recompute-index-inhibit t)
+        )
+    (dolist (source ivy--extra-candidates)
+      (if (equal source '(original-source))
+          (if (null res)
+              (setq res x)
+            (setq res (append x res)))
+        (setq ivy--old-re nil)
+        (setq res (append
+                   (ivy--filter ivy-text (cadr source))
+                   res))))
+    (setq ivy--all-candidates
+          (if (cdr ivy--extra-candidates)
+              (delete-dups res)
+            res))))
+
+(eval-and-compile
+  (defconst ivy--new-sort-p
+    (condition-case nil
+        (with-no-warnings (sort []))
+      (wrong-number-of-arguments))
+    "Whether Emacs 30 `sort' calling convention is available."))
+
+(defun ivy--shorter-matches-first (_name cands)
+  "Sort CANDS according to their length."
+  (if (nthcdr ivy-sort-max-size cands)
+      cands
+    (static-if (bound-and-true-p ivy--new-sort-p)
+        (sort cands :key #'length)
+      (cl-sort (copy-sequence cands) #'< :key #'length))))
+
+(defcustom ivy-sort-matches-functions-alist
+  '((t . nil)
+    (ivy-completion-in-region . ivy--shorter-matches-first)
+    (ivy-switch-buffer . ivy-sort-function-buffer))
+  "An alist of functions for sorting matching candidates.
+
+Unlike `ivy-sort-functions-alist', which is used to sort the
+whole collection only once, this alist of functions are used to
+sort only matching candidates after each change in input.
+
+The alist KEY is either a collection function or t to match
+previously unmatched collection functions.
+
+The alist VAL is a sorting function with the signature of
+`ivy--prefix-sort'."
+  :type '(alist
+          :key-type (choice
+                     (const :tag "Fall-through" t)
+                     (symbol :tag "Collection"))
+          :value-type
+          (choice
+           (const :tag "Don't sort" nil)
+           (const :tag "Put prefix matches ahead" ivy--prefix-sort)
+           (function :tag "Custom sort function"))))
+
+(defun ivy--sort-files-by-date (_name candidates)
+  "Re-sort CANDIDATES according to file modification date."
+  (let ((default-directory ivy--directory))
+    (sort (copy-sequence candidates) #'file-newer-than-file-p)))
+
+(defvar ivy--features ()
+  "Alist mapping features to their `require' result.")
+
+(defun ivy--feature-p (feature)
+  "Try to load FEATURE once; return non-nil on success."
+  (cdr (or (assq feature ivy--features)
+           (let ((entry (cons feature (require feature nil t))))
+             (push entry ivy--features)
+             entry))))
+
+(defun ivy--sort (name candidates)
+  "Re-sort candidates by NAME.
+All CANDIDATES are assumed to match NAME."
+  (let (fun)
+    (cond ((setq fun (ivy-alist-setting ivy-sort-matches-functions-alist))
+           (funcall fun name candidates))
+          ((and (eq ivy--regex-function #'ivy--regex-fuzzy)
+                (ivy--feature-p 'flx))
+           (ivy--flx-sort name candidates))
+          (t
+           candidates))))
+
+(defun ivy--prefix-sort (name candidates)
+  "Re-sort candidates by NAME.
+All CANDIDATES are assumed to match NAME.
+Prefix matches to NAME are put ahead of the list."
+  (if (or (string= name "")
+          (= (aref name 0) ?^))
+      candidates
+    (let ((re-prefix (concat "\\`" (funcall ivy--regex-function name)))
+          res-prefix
+          res-noprefix)
+      (dolist (s candidates)
+        (push s (if (string-match-p re-prefix s)
+                    res-prefix
+                  res-noprefix)))
+      (nconc
+       (nreverse res-prefix)
+       (nreverse res-noprefix)))))
+
+(defvar ivy--virtual-buffers nil
+  "Store the virtual buffers alist.")
+
+(defun ivy-re-to-str (re)
+  "Transform RE to a string.
+
+Functions like `ivy--regex-ignore-order' return a cons list.
+This function extracts a string from the cons list."
+  (if (consp re) (caar re) re))
+
+(defun ivy-sort-function-buffer (name candidates)
+  "Re-sort candidates by NAME.
+CANDIDATES is a list of buffer names each containing NAME.
+Sort open buffers before virtual buffers, and prefix matches
+before substring matches."
+  (if (or (string= name "")
+          (= (aref name 0) ?^))
+      candidates
+    (let* ((base-re (ivy-re-to-str (funcall ivy--regex-function name)))
+           (re-prefix (concat "\\`\\*?" base-re))
+           res-prefix
+           res-noprefix
+           res-virtual-prefix
+           res-virtual-noprefix)
+      (dolist (s candidates)
+        (let ((virtual (assoc s ivy--virtual-buffers))
+              (prefixed (string-match-p re-prefix s)))
+          (push s (cond ((and virtual prefixed) res-virtual-prefix)
+                        (virtual res-virtual-noprefix)
+                        (prefixed res-prefix)
+                        (t res-noprefix)))))
+      (nconc
+       (nreverse res-prefix)
+       (nreverse res-noprefix)
+       (nreverse res-virtual-prefix)
+       (nreverse res-virtual-noprefix)))))
+
+(defvar ivy-flx-limit 200
+  "Used to conditionally turn off flx sorting.
+
+When the amount of matching candidates exceeds this limit, then
+no sorting is done.")
+
+(defvar ivy--recompute-index-inhibit nil
+  "When non-nil, `ivy--recompute-index' is a no-op.")
+
+(defun ivy--recompute-index (re-str cands)
+  "Recompute index of selected candidate matching RE-STR.
+CANDS are the current candidates."
+  (let ((caller (ivy-state-caller ivy-last))
+        (func (or (ivy-alist-setting ivy-index-functions-alist)
+                  #'ivy-recompute-index-zero))
+        (case-fold-search (ivy--case-fold-p re-str))
+        (preselect (ivy-state-preselect ivy-last))
+        (current (ivy-state-current ivy-last))
+        (empty (string= re-str "")))
+    (unless (or (memq this-command '(ivy-resume ivy-partial-or-done))
+                ivy--recompute-index-inhibit)
+      (let ((index (cond
+                     ((or empty (string= re-str "^"))
+                      (ivy--preselect-index preselect cands))
+                     ((and (> (length cands) 10000) (eq func #'ivy-recompute-index-zero))
+                      0)
+                     ((cl-position (string-remove-prefix "^" re-str)
+                                   cands
+                                   :test #'ivy--case-fold-string=))
+                     ((and (ivy--completing-fname-p)
+                           (cl-position (concat re-str "/")
+                                        cands
+                                        :test #'ivy--case-fold-string=)))
+                     ((and (eq caller 'ivy-switch-buffer)
+                           (not empty))
+                      (or (cl-position current cands :test #'string=)
+                          0))
+                     ((and (not empty)
+                           (not (eq caller 'swiper))
+                           (not (and (eq ivy--regex-function #'ivy--regex-fuzzy)
+                                     (ivy--feature-p 'flx)
+                                     ;; Limit to configured number of candidates
+                                     (null (nthcdr ivy-flx-limit cands))))
+                           ;; If there was a preselected candidate, don't try to
+                           ;; keep it selected even if the regexp still matches it.
+                           ;; See issue #1563.  See also `ivy--preselect-index',
+                           ;; which this logic roughly mirrors.
+                           (not (or
+                                 (and (integerp preselect)
+                                      (= ivy--index preselect))
+                                 (equal current preselect)
+                                 (and (ivy--regex-p preselect)
+                                      (stringp current)
+                                      (string-match-p preselect current))))
+                           ivy--old-cands
+                           (cl-position current cands :test #'equal)))
+                     ((funcall func re-str cands))
+                     (t 0))))
+        (ivy-set-index index)))))
+
+(defun ivy-recompute-index-swiper (_re-str cands)
+  "Recompute index of selected candidate when using `swiper'.
+CANDS are the current candidates."
+  (condition-case nil
+      (let ((tail (nthcdr ivy--index ivy--old-cands))
+            idx)
+        (if (and tail ivy--old-cands (not (equal "^" ivy--old-re)))
+            (progn
+              (while (and tail (null idx))
+                ;; Compare with eq to handle equal duplicates in cands
+                (setq idx (cl-position (pop tail) cands)))
+              (or
+               idx
+               (1- (length cands))))
+          (if ivy--old-cands
+              ivy--index
+            ;; already in ivy-state-buffer
+            (let ((n (line-number-at-pos))
+                  (res 0)
+                  (i 0))
+              (dolist (c cands)
+                (when (eq n (get-text-property 0 'swiper-line-number c))
+                  (setq res i))
+                (cl-incf i))
+              res))))
+    (error 0)))
+
+(defun ivy-recompute-index-swiper-backward (re-str cands)
+  "Recompute index of selected candidate when using `swiper-backward'.
+CANDS are the current candidates."
+  (let ((idx (ivy-recompute-index-swiper re-str cands)))
+    (if (or (= idx -1)
+            (<= (get-text-property 0 'swiper-line-number (nth idx cands))
+                (line-number-at-pos)))
+        idx
+      (- idx 1))))
+
+(defun ivy-recompute-index-swiper-async (_re-str cands)
+  "Recompute index of selected candidate when using `swiper' asynchronously.
+CANDS are the current candidates."
+  (if (null ivy--old-cands)
+      (let ((ln (with-ivy-window
+                  (line-number-at-pos))))
+        (or
+         ;; closest to current line going forwards
+         (cl-position-if (lambda (x)
+                           (>= (string-to-number x) ln))
+                         cands)
+         ;; closest to current line going backwards
+         (1- (length cands))))
+    (let ((tail (nthcdr ivy--index ivy--old-cands))
+          idx)
+      (if (and tail ivy--old-cands (not (equal "^" ivy--old-re)))
+          (progn
+            (while (and tail (null idx))
+              ;; Compare with `equal', since the collection is re-created
+              ;; each time with `split-string'
+              (setq idx (cl-position (pop tail) cands :test #'equal)))
+            (or idx 0))
+        ivy--index))))
+
+(defun ivy-recompute-index-swiper-async-backward (re-str cands)
+  "Recompute index of selected candidate when using `swiper-backward'
+asynchronously. CANDS are the current candidates."
+  (if (= (length cands) 0)
+      0
+    (let ((idx (ivy-recompute-index-swiper-async re-str cands)))
+      (if
+          (<= (string-to-number (nth idx cands))
+              (with-ivy-window (line-number-at-pos)))
+          idx
+        (- idx 1)))))
+
+(defun ivy-recompute-index-zero (_re-str _cands)
+  "Recompute index of selected candidate.
+This function serves as a fallback when nothing else is available."
+  0)
+
+(defcustom ivy-minibuffer-faces
+  '(ivy-minibuffer-match-face-1
+    ivy-minibuffer-match-face-2
+    ivy-minibuffer-match-face-3
+    ivy-minibuffer-match-face-4)
+  "List of `ivy' faces for minibuffer group matches."
+  :type '(repeat :tag "Faces"
+          (choice
+           (const ivy-minibuffer-match-face-1)
+           (const ivy-minibuffer-match-face-2)
+           (const ivy-minibuffer-match-face-3)
+           (const ivy-minibuffer-match-face-4)
+           (face :tag "Other face"))))
+
+(defun ivy--minibuffer-face (n)
+  "Return Nth face from `ivy-minibuffer-faces'.
+N wraps around, but skips the first element of the list."
+  (let ((tail (cdr ivy-minibuffer-faces)))
+    (nth (mod (+ n 2) (length tail)) tail)))
+
+(defun ivy--flx-propertize (x)
+  "X is (cons (flx-score STR ...) STR)."
+  (let ((str (copy-sequence (cdr x)))
+        (i 0)
+        (last-j -2))
+    (dolist (j (cdar x))
+      (unless (eq j (1+ last-j))
+        (cl-incf i))
+      (setq last-j j)
+      (add-face-text-property j (1+ j) (ivy--minibuffer-face i) nil str))
+    str))
+
+(defun ivy--flx-sort (name cands)
+  "Sort according to closeness to string NAME the string list CANDS."
+  (condition-case nil
+      (let* ((bolp (= (string-to-char name) ?^))
+             ;; An optimized regex for fuzzy matching
+             ;; "abc" → "^[^a]*a[^b]*b[^c]*c"
+             (fuzzy-regex (concat "\\`"
+                                  (and bolp (regexp-quote (substring name 1 2)))
+                                  (mapconcat
+                                   (lambda (x)
+                                     (setq x (char-to-string x))
+                                     (concat "[^" x "]*" (regexp-quote x)))
+                                   (if bolp (substring name 2) name)
+                                   "")))
+             ;; Strip off the leading "^" for flx matching
+             (flx-name (if bolp (substring name 1) name))
+             cands-left
+             cands-to-sort)
+
+        ;; Filter out non-matching candidates
+        (dolist (cand cands)
+          (when (string-match-p fuzzy-regex cand)
+            (push cand cands-left)))
+
+        ;; pre-sort the candidates by length before partitioning
+        (setq cands-left (static-if (bound-and-true-p ivy--new-sort-p)
+                             (sort cands-left :key #'length :in-place t)
+                           (cl-sort cands-left #'< :key #'length)))
+
+        ;; partition the candidates into sorted and unsorted groups
+        (dotimes (_ (min (length cands-left) ivy-flx-limit))
+          (push (pop cands-left) cands-to-sort))
+
+        (nconc
+         (static-if (bound-and-true-p ivy--new-sort-p)
+             (sort cands-to-sort :in-place t
+                   :key (lambda (cand)
+                          (let ((s (flx-score cand flx-name ivy--flx-cache)))
+                            ;; Sort by decreasing score, increasing length.
+                            (cons (- (car s)) (length cand)))))
+           ;; Compute all of the flx scores in one pass and sort.
+           (mapcar #'car
+                   (sort (mapcar
+                          (lambda (cand)
+                            (cons cand
+                                  (car (flx-score cand flx-name
+                                                  ivy--flx-cache))))
+                          cands-to-sort)
+                         (lambda (c1 c2)
+                           ;; Break ties by length
+                           (if (/= (cdr c1) (cdr c2))
+                               (> (cdr c1)
+                                  (cdr c2))
+                             (< (length (car c1))
+                                (length (car c2))))))))
+
+         ;; Add the unsorted candidates
+         cands-left))
+    (error cands)))
+
+(defun ivy--truncate-string (str width)
+  "Truncate STR to WIDTH."
+  (truncate-string-to-width str width nil nil t))
+
+(defun ivy--format-function-generic (selected-fn other-fn cands separator)
+  "Transform candidates into a string for minibuffer.
+SELECTED-FN is called for the selected candidate, OTHER-FN for the others.
+Both functions take one string argument each.  CANDS is a list of candidates
+and SEPARATOR is used to join them."
+  (mapconcat (let ((i -1))
+               (lambda (str)
+                 (funcall (if (eql (cl-incf i) ivy--window-index)
+                              selected-fn
+                            other-fn)
+                          str)))
+             cands separator))
+
+(defun ivy-format-function-default (cands)
+  "Transform CANDS into a multiline string for the minibuffer.
+Add the face `ivy-current-match' to the selected candidate."
+  (ivy--format-function-generic
+   (lambda (str)
+     (ivy--add-face str 'ivy-current-match))
+   #'identity
+   cands
+   "\n"))
+
+(defun ivy-format-function-arrow (cands)
+  "Transform CANDS into a multiline string for the minibuffer.
+Like `ivy-format-function-default', but also prefix the selected
+candidate with an arrow \">\"."
+  (ivy--format-function-generic
+   (lambda (str)
+     (concat "> " (ivy--add-face str 'ivy-current-match)))
+   (lambda (str)
+     (concat "  " str))
+   cands
+   "\n"))
+
+(defun ivy-format-function-line (cands)
+  "Transform CANDS into a multiline string for the minibuffer.
+Like `ivy-format-function-default', but extend highlighting of
+the selected candidate to the window edge.
+
+Note that since Emacs 27, `ivy-current-match' needs to have a
+non-nil :extend attribute.  This is the case by default, but it
+also needs to be preserved by the current theme."
+  (ivy--format-function-generic
+   (lambda (str)
+     (ivy--add-face (concat str "\n") 'ivy-current-match))
+   (lambda (str)
+     (concat str "\n"))
+   cands
+   ""))
+
+(defun ivy-format-function-arrow-line (cands)
+  "Transform CANDS into a multiline string for the minibuffer.
+This combines the \">\" prefix of `ivy-format-function-arrow'
+with the extended highlighting of `ivy-format-function-line'."
+  (ivy--format-function-generic
+   (lambda (str)
+     (concat "> " (ivy--add-face (concat str "\n") 'ivy-current-match)))
+   (lambda (str)
+     (concat "  " str "\n"))
+   cands
+   ""))
+
+(defun ivy--highlight-ignore-order (str)
+  "Highlight STR, using the ignore-order method."
+  (when (consp ivy--old-re)
+    (let ((i 1))
+      (dolist (re ivy--old-re)
+        (when (string-match (car re) str)
+          (add-face-text-property
+           (match-beginning 0) (match-end 0)
+           (ivy--minibuffer-face i)
+           nil str))
+        (cl-incf i))))
+  str)
+
+(defun ivy--highlight-fuzzy (str)
+  "Highlight STR, using the fuzzy method."
+  (if (and (eq (ivy-alist-setting ivy-re-builders-alist) #'ivy--regex-fuzzy)
+           (ivy--feature-p 'flx))
+      (let ((flx-name (string-remove-prefix "^" ivy-text)))
+        (ivy--flx-propertize
+         (cons (flx-score str flx-name ivy--flx-cache) str)))
+    (ivy--highlight-default str)))
+
+(defcustom ivy-use-group-face-if-no-groups t
+  "If t, and the expression has no subgroups, highlight whole match as a group.
+
+It will then use the second face (first of the \"group\" faces)
+of `ivy-minibuffer-faces'.  Otherwise, always use the first face
+in this case."
+  :type 'boolean)
+
+(defun ivy--positive-regexps ()
+  "Return a list of the positive regexps in `ivy-regex'."
+  (let ((re ivy-regex))
+    (if (listp re)
+        (cl-mapcan (lambda (x) (and (cdr x) (list (car x)))) re)
+      (list re))))
+
+(defun ivy--highlight-default (str)
+  "Highlight STR, using the default method."
+  (let ((regexps (ivy--positive-regexps))
+        start)
+    (dolist (re regexps)
+      (ignore-errors
+        (while (and (string-match re str start)
+                    (> (- (match-end 0) (match-beginning 0)) 0))
+          (setq start (match-end 0))
+          (let ((i 0)
+                (n 0)
+                prev)
+            (while (<= i ivy--subexps)
+              (let ((beg (match-beginning i))
+                    (end (match-end i)))
+                (when (and beg end)
+                  (unless (or (and prev (= prev beg))
+                              (zerop i))
+                    (cl-incf n))
+                  (let ((face
+                         (cond ((and ivy-use-group-face-if-no-groups
+                                     (zerop ivy--subexps))
+                                (cadr ivy-minibuffer-faces))
+                               ((zerop i)
+                                (car ivy-minibuffer-faces))
+                               (t
+                                (ivy--minibuffer-face n)))))
+                    (add-face-text-property beg end face nil str))
+                  (unless (zerop i)
+                    (setq prev end))))
+              (cl-incf i)))))))
+  str)
+
+(defun ivy--format-minibuffer-line (str &optional affix)
+  "Format line STR for use in minibuffer.
+AFFIX is either the (PREFIX SUFFIX) cdr returned by
+`affixation-function', or the result of `annotation-function'."
+  (let* ((str (ivy-cleanup-string (copy-sequence str)))
+         (str (cond
+               ((not (eq ivy-display-style 'fancy)) str)
+               ((memq (ivy-state-caller ivy-last) ivy-highlight-grep-commands)
+                (let* ((start (if (string-match "\\`[^:]+:\\(?:[^:]+:\\)?" str)
+                                  (match-end 0) 0))
+                       (file (substring str 0 start))
+                       (match (substring str start)))
+                  (concat file (funcall ivy--highlight-function match))))
+               ((funcall ivy--highlight-function str))))
+         (mouse '( mouse-face ivy-minibuffer-match-highlight
+                   help-echo ivy--help-echo)))
+    (add-text-properties 0 (length str) mouse str)
+    (cond ((consp affix)
+           (concat (nth 0 affix) str (nth 1 affix)))
+          (affix
+           ;; Existing face takes priority.
+           (unless (text-property-not-all 0 (length affix) 'face nil affix)
+             (setq affix (ivy-append-face affix 'ivy-completions-annotations)))
+           (concat str affix))
+          (str))))
+
+(defun ivy-read-file-transformer (str)
+  "Transform candidate STR when reading files."
+  (if (ivy--dirname-p str)
+      (propertize str 'face 'ivy-subdir)
+    str))
+
+(defun ivy--minibuffer-index-bounds (idx len wnd-len)
+  (let* ((half-height (/ wnd-len 2))
+         (start (max 0
+                     (min (- idx half-height)
+                          (- len (1- wnd-len)))))
+         (end (min (+ start (1- wnd-len)) len)))
+    (list start end (- idx start))))
+
+(defun ivy--format (cands)
+  "Return a string for CANDS suitable for display in the minibuffer.
+CANDS is a list of candidates that :display-transformer can turn into strings."
+  (setq ivy--length (length cands))
+  (when (>= ivy--index ivy--length)
+    (ivy-set-index (max (1- ivy--length) 0)))
+  (if (null cands)
+      (setf (ivy-state-current ivy-last) "")
+    (let ((cur (nth ivy--index cands)))
+      (setf (ivy-state-current ivy-last) (if (stringp cur)
+                                             (copy-sequence cur)
+                                           cur)))
+    (let* ((bnd (ivy--minibuffer-index-bounds
+                 ivy--index ivy--length ivy-height))
+           (wnd-cands (cl-subseq cands (car bnd) (cadr bnd)))
+           (case-fold-search (ivy--case-fold-p (ivy-re-to-str ivy-regex)))
+           transformer-fn)
+      (setq ivy--window-index (nth 2 bnd))
+      (when (setq transformer-fn (ivy-state-display-transformer-fn ivy-last))
+        (with-ivy-window
+          (with-current-buffer (ivy-state-buffer ivy-last)
+            (setq wnd-cands (mapcar transformer-fn wnd-cands)))))
+      (ivy--wnd-cands-to-str wnd-cands))))
+
+(defalias 'ivy--metadata-get
+  (if (>= emacs-major-version 30)
+      #'completion-metadata-get
+    (lambda (metadata prop)
+      (or (completion-metadata-get metadata prop)
+          (plist-get completion-extra-properties
+                     (or (get prop 'ivy--metadata-kwd)
+                         (put prop 'ivy--metadata-kwd
+                              (intern (concat ":" (symbol-name prop)))))))))
+  "Compatibility shim for Emacs 30 `completion-metadata-get'.
+\n(fn METADATA PROP)")
+
+(defun ivy--wnd-cands-to-str (wnd-cands)
+  (let* ((metadata (unless (ivy-state-dynamic-collection ivy-last)
+                     (completion-metadata "" minibuffer-completion-table
+                                          minibuffer-completion-predicate)))
+         (affix (ivy--metadata-get metadata 'affixation-function))
+         (annot (or affix (ivy--metadata-get metadata 'annotation-function)))
+         (fmt (cond (affix
+                     (lambda (triple)
+                       (ivy--format-minibuffer-line (car triple) (cdr triple))))
+                    (annot
+                     (lambda (cand)
+                       (ivy--format-minibuffer-line cand (funcall annot cand))))
+                    (#'ivy--format-minibuffer-line)))
+         (str (funcall (ivy-alist-setting ivy-format-functions-alist)
+                       (condition-case nil
+                           (mapcar fmt (if affix (funcall affix wnd-cands)
+                                         wnd-cands))
+                         (error wnd-cands)))))
+    (concat "\n" (ivy--remove-props str 'read-only))))
+
+(defvar recentf-list)
+(defvar bookmark-alist)
+
+(defcustom ivy-virtual-abbreviate 'name
+  "The mode of abbreviation for virtual buffer names."
+  :type '(choice
+          (const :tag "Only name" name)
+          (const :tag "Abbreviated path" abbreviate)
+          (const :tag "Full path" full)
+          ;; eventually, uniquify
+          ))
+(declare-function bookmark-maybe-load-default-file "bookmark")
+(declare-function bookmark-get-filename "bookmark")
+
+(defun ivy--virtual-buffers ()
+  "Adapted from `ido-add-virtual-buffers-to-list'."
+  (require 'bookmark)
+  (unless recentf-mode
+    (recentf-mode 1))
+  (bookmark-maybe-load-default-file)
+  (let* ((vb-bkm (delete "   - no file -"
+                         (delq nil (mapcar #'bookmark-get-filename
+                                           bookmark-alist))))
+         (vb-list (cond ((eq ivy-use-virtual-buffers 'recentf)
+                         recentf-list)
+                        ((eq ivy-use-virtual-buffers 'bookmarks)
+                         vb-bkm)
+                        (ivy-use-virtual-buffers
+                         (append recentf-list vb-bkm))
+                        (t nil)))
+         virtual-buffers)
+    (dolist (head vb-list)
+      (let* ((file-name (if (stringp head)
+                            head
+                          (cdr head)))
+             (name (cond ((eq ivy-virtual-abbreviate 'name)
+                          (file-name-nondirectory file-name))
+                         ((eq ivy-virtual-abbreviate 'abbreviate)
+                          (abbreviate-file-name file-name))
+                         (t
+                          (expand-file-name file-name)))))
+        (when (equal name "")
+          (setq name
+                (if (consp head)
+                    (car head)
+                  (file-name-nondirectory (directory-file-name file-name)))))
+        (unless (or (equal name "")
+                    (get-file-buffer file-name)
+                    (assoc name virtual-buffers))
+          (push (cons (copy-sequence name) file-name) virtual-buffers))))
+    (when virtual-buffers
+      (dolist (comp virtual-buffers)
+        (put-text-property 0 (length (car comp))
+                           'face 'ivy-virtual
+                           (car comp)))
+      (setq ivy--virtual-buffers (nreverse virtual-buffers))
+      (mapcar #'car ivy--virtual-buffers))))
+
+(defcustom ivy-ignore-buffers '("\\` " "\\`\\*tramp/")
+  "List of regexps or functions matching buffer names to ignore."
+  :type '(repeat (choice regexp function)))
+
+(defvar ivy-switch-buffer-faces-alist '((dired-mode . ivy-subdir)
+                                        (org-mode . ivy-org))
+  "Store face customizations for `ivy-switch-buffer'.
+Each KEY is `major-mode', each VALUE is a face name.")
+
+(defun ivy--buffer-list (str &optional virtual predicate)
+  "Return the buffers that match STR.
+If VIRTUAL is non-nil, add virtual buffers.
+If optional argument PREDICATE is non-nil, use it to test each
+possible match.  See `all-completions' for further information."
+  (delete-dups
+   (nconc
+    (all-completions str #'internal-complete-buffer predicate)
+    (and virtual
+         (ivy--virtual-buffers)))))
+
+(defvar ivy-views (and nil
+                       `(("ivy + *scratch* {}"
+                          (vert
+                           (file ,(expand-file-name "ivy.el"))
+                           (buffer "*scratch*")))
+                         ("swiper + *scratch* {}"
+                          (horz
+                           (file ,(expand-file-name "swiper.el"))
+                           (buffer "*scratch*")))))
+  "Store window configurations selectable by `ivy-switch-buffer'.
+
+The default value is given as an example.
+
+Each element is a list of (NAME VIEW). NAME is a string, it's
+recommended to end it with a distinctive snippet e.g. \"{}\" so
+that it's easy to distinguish the window configurations.
+
+VIEW is either a TREE or a window-configuration (see
+`ivy--get-view-config').
+
+TREE is a nested list with the following valid cars:
+- vert: split the window vertically
+- horz: split the window horizontally
+- file: open the specified file
+- buffer: open the specified buffer
+
+TREE can be nested multiple times to have multiple window splits.")
+
+(defun ivy-default-view-name ()
+  "Return default name for new view."
+  (let* ((wins (mapcar (lambda (w)
+                         (let* ((b (window-buffer w))
+                                (f (buffer-file-name b)))
+                           (if f
+                               (file-name-nondirectory f)
+                             (buffer-name b))))
+                       (window-list)))
+         (default-view-name
+          (string-join (cons "{}" (sort wins #'string-lessp))
+                       " "))
+         (view-name-re (concat "\\`"
+                               (regexp-quote default-view-name)
+                               " \\([0-9]+\\)")))
+    (cond ((let ((num (cl-some (lambda (view)
+                                 (let ((name (car view)))
+                                   (and (string-match view-name-re name)
+                                        (string-to-number
+                                         (match-string 1 name)))))
+                               ivy-views)))
+             (and num (format "%s %d" default-view-name (1+ num)))))
+          ((assoc default-view-name ivy-views)
+           (concat default-view-name " 1"))
+          (t
+           default-view-name))))
+
+(defun ivy--get-view-config ()
+  "Get `current-window-configuration' for `ivy-views'."
+  (dolist (w (window-list))
+    (set-window-parameter w 'ivy-view-data
+                          (with-current-buffer (window-buffer w)
+                            (cond (buffer-file-name
+                                   (list 'file buffer-file-name (point)))
+                                  ((eq major-mode 'dired-mode)
+                                   (list 'file default-directory (point)))
+                                  (t
+                                   (list 'buffer (buffer-name) (point)))))))
+  (let ((window-persistent-parameters
+         (append window-persistent-parameters
+                 (list (cons 'ivy-view-data t)))))
+    (current-window-configuration)))
+
+(defun ivy-push-view (&optional arg)
+  "Push the current window tree on `ivy-views'.
+
+When ARG is non-nil, replace a selected item on `ivy-views'.
+
+Currently, the split configuration (i.e. horizontal or vertical)
+and point positions are saved, but the split positions aren't.
+Use `ivy-pop-view' to delete any item from `ivy-views'."
+  (interactive "P")
+  (let* ((view (ivy--get-view-config))
+         (view-name
+          (if arg
+              (ivy-read "Update view: " ivy-views)
+            (ivy-read "Name view: " nil
+                      :initial-input (ivy-default-view-name)))))
+    (when view-name
+      (let ((x (assoc view-name ivy-views)))
+        (if x
+            (setcdr x (list view))
+          (push (list view-name view) ivy-views))))))
+
+(defun ivy-pop-view-action (view)
+  "Delete VIEW from `ivy-views'."
+  (setq ivy-views (delete view ivy-views))
+  (setq ivy--all-candidates
+        (delete (car view) ivy--all-candidates))
+  (setq ivy--old-cands nil))
+
+(defun ivy-pop-view ()
+  "Delete a view to delete from `ivy-views'."
+  (interactive)
+  (ivy-read "Pop view: " ivy-views
+            :preselect (caar ivy-views)
+            :action #'ivy-pop-view-action
+            :caller 'ivy-pop-view))
+
+(defun ivy-source-views ()
+  "Return the name of the views saved in `ivy-views'."
+  (mapcar #'car ivy-views))
+
+(ivy-set-sources
+ 'ivy-switch-buffer
+ '((original-source)
+   (ivy-source-views)))
+
+(defun ivy-set-view-recur (view)
+  "Set VIEW recursively."
+  (cond  ((window-configuration-p view)
+          (set-window-configuration view)
+          (dolist (w (window-list))
+            (with-selected-window w
+              (ivy-set-view-recur
+               (window-parameter w 'ivy-view-data)))))
+         ((eq (car view) 'vert)
+         (let* ((wnd1 (selected-window))
+                (wnd2 (split-window-vertically))
+                (views (cdr view))
+                (v (pop views))
+                (temp-wnd))
+           (with-selected-window wnd1
+             (ivy-set-view-recur v))
+           (while (setq v (pop views))
+             (with-selected-window wnd2
+               (when views
+                 (setq temp-wnd (split-window-vertically)))
+               (ivy-set-view-recur v)
+               (when views
+                 (setq wnd2 temp-wnd))))))
+        ((eq (car view) 'horz)
+         (let* ((wnd1 (selected-window))
+                (wnd2 (split-window-horizontally))
+                (views (cdr view))
+                (v (pop views))
+                (temp-wnd))
+           (with-selected-window wnd1
+             (ivy-set-view-recur v))
+           (while (setq v (pop views))
+             (with-selected-window wnd2
+               (when views
+                 (setq temp-wnd (split-window-horizontally)))
+               (ivy-set-view-recur v)
+               (when views
+                 (setq wnd2 temp-wnd))))))
+        ((eq (car view) 'file)
+         (let* ((name (nth 1 view))
+                (virtual (assoc name ivy--virtual-buffers))
+                buffer)
+           (cond ((setq buffer (get-buffer name))
+                  (switch-to-buffer buffer nil 'force-same-window))
+                 (virtual
+                  (find-file (cdr virtual)))
+                 ((file-exists-p name)
+                  (find-file name))))
+         (when (and (> (length view) 2)
+                    (numberp (nth 2 view)))
+           (goto-char (nth 2 view))))
+        ((eq (car view) 'buffer)
+         (switch-to-buffer (nth 1 view))
+         (when (and (> (length view) 2)
+                    (numberp (nth 2 view)))
+           (goto-char (nth 2 view))))
+        ((eq (car view) 'sexp)
+         (eval (nth 1 view)))))
+
+(defun ivy--switch-buffer-action (buffer)
+  "Switch to BUFFER.
+BUFFER may be a string or nil."
+  (if (zerop (length buffer))
+      (switch-to-buffer
+       ivy-text nil 'force-same-window)
+    (let ((virtual (assoc buffer ivy--virtual-buffers))
+          (view (assoc buffer ivy-views)))
+      (cond ((and virtual
+                  (not (get-buffer buffer)))
+             (find-file (cdr virtual)))
+            (view
+             (delete-other-windows)
+             (let (
+                   ;; silence "Directory has changed on disk"
+                   (inhibit-message t))
+               (ivy-set-view-recur (cadr view))))
+            (t
+             (switch-to-buffer
+              buffer nil 'force-same-window))))))
+
+(defun ivy--switch-buffer-other-window-action (buffer)
+  "Switch to BUFFER in other window.
+BUFFER may be a string or nil."
+  (if (zerop (length buffer))
+      (switch-to-buffer-other-window ivy-text)
+    (let ((virtual (assoc buffer ivy--virtual-buffers)))
+      (if (and virtual
+               (not (get-buffer buffer)))
+          (find-file-other-window (cdr virtual))
+        (switch-to-buffer-other-window buffer)))))
+
+(defun ivy--rename-buffer-action (buffer)
+  "Rename BUFFER."
+  (let ((new-name (read-string "Rename buffer (to new name): ")))
+    (with-current-buffer buffer
+      (rename-buffer new-name))))
+
+(defun ivy--find-file-action (buffer)
+  "Find file from BUFFER's directory."
+  (let* ((virtual (assoc buffer ivy--virtual-buffers))
+         (default-directory (if virtual
+                                (file-name-directory (cdr virtual))
+                              (buffer-local-value 'default-directory
+                                                  (or (get-buffer buffer)
+                                                      (current-buffer))))))
+    (call-interactively (if (functionp 'counsel-find-file)
+                            #'counsel-find-file
+                          #'find-file))))
+
+(defun ivy--kill-buffer-or-virtual (buffer)
+  (if (get-buffer buffer)
+      (kill-buffer buffer)
+    (setq recentf-list (delete
+                        (cdr (assoc buffer ivy--virtual-buffers))
+                        recentf-list))))
+
+(defun ivy--kill-current-candidate ()
+  (setf (ivy-state-preselect ivy-last) ivy--index)
+  (setq ivy--old-re nil)
+  (setq ivy--all-candidates (delete (ivy-state-current ivy-last) ivy--all-candidates))
+  (let ((ivy--recompute-index-inhibit t))
+    (ivy--exhibit)))
+
+(defun ivy--kill-current-candidate-buffer ()
+  (setf (ivy-state-preselect ivy-last) ivy--index)
+  (setq ivy--old-re nil)
+  (setq ivy--all-candidates (ivy--buffer-list "" ivy-use-virtual-buffers
+                                              (ivy-state-predicate ivy-last)))
+  (let ((ivy--recompute-index-inhibit t))
+    (ivy--exhibit)))
+
+(defun ivy--kill-buffer-action (buffer)
+  "Kill BUFFER."
+  (ivy--kill-buffer-or-virtual buffer)
+  (unless (buffer-live-p (ivy-state-buffer ivy-last))
+    (setf (ivy-state-buffer ivy-last)
+          (with-ivy-window (current-buffer))))
+  (ivy--kill-current-candidate-buffer))
+
+(defvar ivy-switch-buffer-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-k") #'ivy-switch-buffer-kill)
+    map))
+
+(defun ivy-switch-buffer-kill ()
+  "When at end-of-line, kill the current buffer in `ivy-switch-buffer'.
+Otherwise, forward to `ivy-kill-line'."
+  (interactive)
+  (if (not (eolp))
+      (ivy-kill-line)
+    (ivy--kill-buffer-action
+     (ivy-state-current ivy-last))))
+(ivy--no-M-x #'ivy-switch-buffer-kill #'ivy--minibuffer-p)
+
+(ivy-set-actions
+ 'ivy-switch-buffer
+ '(("f"
+    ivy--find-file-action
+    "find file")
+   ("j"
+    ivy--switch-buffer-other-window-action
+    "other window")
+   ("k"
+    ivy--kill-buffer-action
+    "kill")
+   ("r"
+    ivy--rename-buffer-action
+    "rename")))
+
+(ivy-set-actions
+ t
+ `(("i" ,#'ivy--action-insert "insert")
+   ("w" ,#'ivy--action-copy "copy")))
+
+(defun ivy--trim-grep-line-number (x)
+  (if (string-match ":[0-9]+:" x)
+      (substring x (match-end 0))
+    x))
+
+(defun ivy--action-cand-to-str (x)
+  "Try to return Ivy action argument X as a string."
+  (let ((x (if (consp x) (car x) x)))
+    (if (symbolp x) (symbol-name x) x)))
+
+(defun ivy--action-insert (x)
+  "Insert completion candidate X into current buffer at point."
+  (insert (funcall (if (stringp x)
+                       #'ivy--trim-grep-line-number
+                     #'ivy--action-cand-to-str)
+                   x)))
+
+(defun ivy--action-copy (x)
+  "Add completion candidate X to the kill ring."
+  (kill-new (funcall (if (stringp x)
+                         #'ivy--trim-grep-line-number
+                       #'ivy--action-cand-to-str)
+                     x)))
+
+(defun ivy--switch-buffer-matcher (regexp candidates)
+  "Return REGEXP matching CANDIDATES.
+Skip buffers that match `ivy-ignore-buffers'."
+  (if (string-match-p "^:" ivy-text)
+      (delete-dups
+       (cl-delete-if-not
+        (lambda (s)
+          (when (/= (string-to-char s) ?*)
+            (let ((b (get-buffer s)))
+              (and b (string-match-p
+                      regexp (buffer-local-value 'default-directory b))))))
+        (copy-sequence candidates)))
+    (let ((res (ivy--re-filter regexp candidates))
+          (policy ivy-use-ignore)
+          (ignores ivy-ignore-buffers))
+      (cond ((null (and policy ignores))
+             res)
+            ((cl-remove-if (lambda (buf)
+                             (cl-some (lambda (f-or-r)
+                                        (if (stringp f-or-r)
+                                            (string-match-p f-or-r buf)
+                                          (funcall f-or-r buf)))
+                                      ignores))
+                           res))
+            ((eq policy t)
+             res)))))
+
+(defun ivy-append-face (str face)
+  "Append to STR the property FACE."
+  (when face
+    (setq str (copy-sequence str))
+    (add-face-text-property 0 (length str) face t str))
+  str)
+
+(defun ivy--remote-buffer-p (buffer)
+  "Return non-nil if BUFFER object is visiting a remote file.
+If that is the case, value is a string identifying the remote
+connection."
+  (let ((dir (buffer-local-value 'default-directory buffer)))
+    (ignore-errors (file-remote-p dir))))
+
+(defun ivy-switch-buffer-transformer (str)
+  "Transform candidate STR when switching buffers."
+  (let ((buf (get-buffer str)))
+    (cond ((not buf) str)
+          ((let ((remote (ivy--remote-buffer-p buf)))
+             (when remote
+               (format "%s (%s)" (ivy-append-face str 'ivy-remote) remote))))
+          ((not (verify-visited-file-modtime buf))
+           (ivy-append-face str 'ivy-modified-outside-buffer))
+          ((buffer-modified-p buf)
+           (ivy-append-face str 'ivy-modified-buffer))
+          (t
+           (let* ((mode (buffer-local-value 'major-mode buf))
+                  (face (cdr (assq mode ivy-switch-buffer-faces-alist))))
+             (ivy-append-face str face))))))
+
+(defun ivy-switch-buffer-occur (cands)
+  "Occur function for `ivy-switch-buffer' using `ibuffer'.
+CANDS are the candidates to be displayed."
+  (unless cands
+    (setq cands (all-completions ivy-text #'internal-complete-buffer)))
+  (ibuffer
+   nil (buffer-name)
+   `((or ,@(cl-mapcan
+            (lambda (cand)
+              (unless (eq (get-text-property 0 'face cand) 'ivy-virtual)
+                `((name . ,(format "\\_<%s\\_>" (regexp-quote cand))))))
+            cands)))))
+
+;;;###autoload
+(defun ivy-switch-buffer ()
+  "Switch to another buffer."
+  (interactive)
+  (ivy-read "Switch to buffer: " #'internal-complete-buffer
+            :keymap ivy-switch-buffer-map
+            :preselect (buffer-name (other-buffer (current-buffer)))
+            :action #'ivy--switch-buffer-action
+            :matcher #'ivy--switch-buffer-matcher
+            :caller 'ivy-switch-buffer))
+
+(ivy-configure 'ivy-switch-buffer
+  :parent 'internal-complete-buffer
+  :occur #'ivy-switch-buffer-occur)
+
+;;;###autoload
+(defun ivy-switch-view ()
+  "Switch to one of the window views stored by `ivy-push-view'."
+  (interactive)
+  (let ((ivy-initial-inputs-alist
+         '((ivy-switch-buffer . "{}"))))
+    (ivy-switch-buffer)))
+
+;;;###autoload
+(defun ivy-switch-buffer-other-window ()
+  "Switch to another buffer in another window."
+  (interactive)
+  (ivy-read "Switch to buffer in other window: " #'internal-complete-buffer
+            :matcher #'ivy--switch-buffer-matcher
+            :preselect (buffer-name (other-buffer (current-buffer)))
+            :action #'ivy--switch-buffer-other-window-action
+            :keymap ivy-switch-buffer-map
+            :caller 'ivy-switch-buffer-other-window))
+
+(ivy-configure 'ivy-switch-buffer-other-window
+  :parent 'ivy-switch-buffer)
+
+(defun ivy--yank-handle-case-fold (text)
+  (if (and (> (length ivy-text) 0)
+           (string= (downcase ivy-text) ivy-text))
+      (downcase text)
+    text))
+
+(defun ivy--yank-by (fn &rest args)
+  "Pull buffer text from current line into search string.
+The region to extract is determined by the respective values of
+point before and after applying FN to ARGS."
+  (let (text)
+    (with-ivy-window
+      (let ((beg (point))
+            (bol (line-beginning-position))
+            (eol (line-end-position))
+            end)
+        (unwind-protect
+             (progn (apply fn args)
+                    (setq end (goto-char (max bol (min (point) eol))))
+                    (setq text (buffer-substring-no-properties beg end))
+                    (ivy--pulse-region beg end))
+          (unless text
+            (goto-char beg)))))
+    (when text
+      (insert (replace-regexp-in-string
+               "  +" " "
+               (ivy--yank-handle-case-fold text)
+               t t)))))
+
+(defun ivy-yank-word (&optional arg)
+  "Pull next word from buffer into search string.
+If optional ARG is non-nil, pull in the next ARG
+words (previous if ARG is negative)."
+  (interactive "p")
+  (ivy--yank-by #'forward-word arg))
+(ivy--no-M-x #'ivy-yank-word #'ivy--minibuffer-p)
+
+(defun ivy-yank-symbol (&optional arg)
+  "Pull next symbol from buffer into search string.
+If optional ARG is non-nil, pull in the next ARG
+symbols (previous if ARG is negative)."
+  (interactive "p")
+  (ivy--yank-by #'forward-symbol (or arg 1)))
+(ivy--no-M-x #'ivy-yank-symbol #'ivy--minibuffer-p)
+
+(defun ivy-yank-char (&optional arg)
+  "Pull next character from buffer into search string.
+If optional ARG is non-nil, pull in the next ARG
+characters (previous if ARG is negative)."
+  (interactive "p")
+  (ivy--yank-by #'forward-char arg))
+(ivy--no-M-x #'ivy-yank-char #'ivy--minibuffer-p)
+
+(defvar ivy--pulse-overlay nil
+  "Overlay used to highlight yanked word.")
+
+(defvar ivy--pulse-timer nil
+  "Timer used to dispose of `ivy--pulse-overlay'.")
+
+(defcustom ivy-pulse-delay 0.5
+  "Number of seconds to display `ivy-yanked-word' highlight.
+When nil, disable highlighting."
+  :type '(choice
+          (number :tag "Delay in seconds")
+          (const :tag "Disable" nil)))
+
+;; TODO: Could use `pulse-momentary-highlight-region' but Emacs 24.5
+;; runs into `https://bugs.gnu.org/47437' since `ivy-yanked-word'
+;; lacks an explicit :background by default.  So either Emacs 24
+;; support or `ivy-yanked-word' would need to be dropped.
+;; Also, the `pulse' library does not merge adjacent pulses.
+(defun ivy--pulse-region (start end)
+  "Temporarily highlight text between START and END.
+The \"pulse\" duration is determined by `ivy-pulse-delay'."
+  (when ivy-pulse-delay
+    (if ivy--pulse-overlay
+        (let ((ostart (overlay-start ivy--pulse-overlay))
+              (oend (overlay-end ivy--pulse-overlay)))
+          (when (< end start)
+            (cl-rotatef start end))
+          ;; Extend the existing overlay's region to include START..END,
+          ;; but only if the two regions are contiguous.
+          (move-overlay ivy--pulse-overlay
+                        (if (= start oend) ostart start)
+                        (if (= end ostart) oend end)))
+      (setq ivy--pulse-overlay (make-overlay start end))
+      (overlay-put ivy--pulse-overlay 'face 'ivy-yanked-word))
+    (when ivy--pulse-timer
+      (cancel-timer ivy--pulse-timer))
+    (setq ivy--pulse-timer
+          (run-at-time ivy-pulse-delay nil #'ivy--pulse-cleanup))))
+
+(defun ivy--pulse-cleanup ()
+  "Cancel `ivy--pulse-timer' and delete `ivy--pulse-overlay'."
+  (when ivy--pulse-timer
+    (cancel-timer ivy--pulse-timer)
+    (setq ivy--pulse-timer nil))
+  (when ivy--pulse-overlay
+    (delete-overlay ivy--pulse-overlay)
+    (setq ivy--pulse-overlay nil)))
+
+(defun ivy-kill-ring-save ()
+  "Save the current candidates in the kill ring.
+If the region is active, forward to `kill-ring-save' instead."
+  (interactive)
+  (if (use-region-p)
+      (call-interactively #'kill-ring-save)
+    (kill-new (string-join ivy--old-cands "\n"))))
+(ivy--no-M-x #'ivy-kill-ring-save #'ivy--minibuffer-p)
+
+(defun ivy-insert-current ()
+  "Make the current candidate into current input.
+Don't finish completion."
+  (interactive)
+  (delete-minibuffer-contents)
+  (let ((end (and ivy--directory
+                  (ivy--dirname-p (ivy-state-current ivy-last))
+                  -1)))
+    (insert (substring-no-properties
+             (ivy-state-current ivy-last) 0 end))))
+(ivy--no-M-x #'ivy-insert-current #'ivy--minibuffer-p)
+
+(defun ivy-insert-current-full ()
+  "Insert the current directory into the minibuffer."
+  (interactive)
+  (insert ivy--directory))
+(ivy--no-M-x #'ivy-insert-current-full #'ivy--minibuffer-p)
+
+(defcustom ivy-preferred-re-builders
+  '((ivy--regex-plus . "ivy")
+    (ivy--regex-ignore-order . "order")
+    (ivy--regex-fuzzy . "fuzzy"))
+  "Alist of preferred re-builders with display names.
+This list can be rotated with `ivy-rotate-preferred-builders'."
+  :type '(alist :key-type function :value-type string))
+
+(defun ivy-rotate-preferred-builders ()
+  "Switch to the next re builder in `ivy-preferred-re-builders'."
+  (interactive)
+  (when ivy-preferred-re-builders
+    (setq ivy--old-re nil)
+    (setq ivy--regex-function
+          (let ((cell (assq ivy--regex-function ivy-preferred-re-builders)))
+            (car (or (cadr (memq cell ivy-preferred-re-builders))
+                     (car ivy-preferred-re-builders)))))))
+(ivy--no-M-x #'ivy-rotate-preferred-builders #'ivy--minibuffer-p)
+
+(defun ivy-toggle-fuzzy ()
+  "Toggle the re builder between `ivy--regex-fuzzy' and `ivy--regex-plus'."
+  (interactive)
+  (setq ivy--old-re nil)
+  (if (eq ivy--regex-function 'ivy--regex-fuzzy)
+      (setq ivy--regex-function 'ivy--regex-plus)
+    (setq ivy--regex-function 'ivy--regex-fuzzy)))
+(ivy--no-M-x #'ivy-toggle-fuzzy #'ivy--minibuffer-p)
+
+(defun ivy--label-and-delete-dups (entries)
+  "Label ENTRIES with history indices."
+  (let ((ht (and entries (make-hash-table :test #'equal)))
+        (idx 0)
+        entry
+        accum)
+    (while (setq entry (pop entries))
+      (unless (gethash entry ht)
+        (puthash entry t ht)
+        (push `(,entry . ,idx) accum))
+      (cl-incf idx))
+    (nreverse accum)))
+
+(defvar ivy--reverse-i-search-history nil
+  "Store the minibuffer history variable.")
+
+(defun ivy-reverse-i-search-kill ()
+  "Remove the current item from minibuffer history."
+  (interactive)
+  (if (not (eolp))
+      (ivy-kill-line)
+    (let ((current (ivy-state-current ivy-last))
+          (history ivy--reverse-i-search-history))
+      (cond ((booleanp history))
+            ((symbolp history)
+             (set history (delete current (symbol-value history))))
+            ((ring-p history)
+             ;; `ring-p' is autoloaded.
+             (declare-function ring-member "ring")
+             (declare-function ring-remove "ring")
+             (ring-remove history (ring-member history current)))))
+    (ivy--kill-current-candidate)))
+(ivy--no-M-x #'ivy-reverse-i-search-kill #'ivy--minibuffer-p)
+
+(defvar ivy-reverse-i-search-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-k") #'ivy-reverse-i-search-kill)
+    map))
+
+(defun ivy-history-contents (history)
+  "Copy contents of HISTORY.
+A copy is necessary so that we don't clobber any string attributes.
+Also set `ivy--reverse-i-search-history' to HISTORY."
+  (prog1 (ivy--label-and-delete-dups
+          (cond ((booleanp history) ())
+                ((symbolp history)
+                 (copy-sequence (symbol-value history)))
+                ((ring-p history)
+                 ;; `ring-p' is autoloaded.
+                 (declare-function ring-elements "ring")
+                 (ring-elements history))
+                ((sequencep history)
+                 (copy-sequence history))
+                ((error "Expected a symbol, ring, or sequence: %S" history))))
+    (setq ivy--reverse-i-search-history history)))
+
+(defun ivy-reverse-i-search ()
+  "Enter a recursive `ivy-read' session using the current history.
+The selected history element will be inserted into the minibuffer.
+\\<ivy-reverse-i-search-map>
+You can also delete an element from history with \\[ivy-reverse-i-search-kill]."
+  (interactive)
+  (cond
+    ((= (minibuffer-depth) 0)
+     (user-error
+      "This command is intended to be called from within `ivy-read'"))
+    ;; don't recur
+    ((and (> (minibuffer-depth) 1)
+          (eq (ivy-state-caller ivy-last) 'ivy-reverse-i-search)))
+    (t
+     (let ((enable-recursive-minibuffers t)
+           (old-last ivy-last))
+       (ivy-read "Reverse-i-search: "
+                 (ivy-history-contents (ivy-state-history ivy-last))
+                 :keymap ivy-reverse-i-search-map
+                 :action (lambda (x)
+                           (ivy--reset-state
+                            (setq ivy-last old-last))
+                           (delete-minibuffer-contents)
+                           (insert (substring-no-properties (car x)))
+                           (ivy--cd-maybe))
+                 :caller 'ivy-reverse-i-search)))))
+(ivy--no-M-x #'ivy-reverse-i-search #'ivy--minibuffer-p)
+
+(defun ivy-restrict-to-matches ()
+  "Restrict candidates to current input and erase input."
+  (interactive)
+  (delete-minibuffer-contents)
+  (if (ivy-state-dynamic-collection ivy-last)
+      (progn
+        ;; By disabling `ivy-state-dynamic-collection', we lose the ability
+        ;; to clearly differentiate between ternary programmed completion
+        ;; functions and Ivy's unary dynamic collections (short of using
+        ;; `func-arity' or otherwise redesigning things).  So we must also
+        ;; update the dynamic binding of `minibuffer-completion-table' to no
+        ;; longer hold a dynamic collection.
+        (setq minibuffer-completion-table ivy--old-cands)
+        (setq ivy--all-candidates ivy--old-cands)
+        (setf (ivy-state-collection ivy-last) ivy--old-cands)
+        (setf (ivy-state-dynamic-collection ivy-last) nil))
+    (setq ivy--all-candidates
+          (ivy--filter ivy-text ivy--all-candidates))))
+(ivy--no-M-x #'ivy-restrict-to-matches #'ivy--minibuffer-p)
+
+;;; Occur
+
+;; Also used by `ivy--occur-p' to identify Ivy Occur buffers
+;; regardless of `major-mode'.
+(defvar-local ivy-occur-last nil
+  "Buffer-local and Occur-specific value of `ivy-last'.
+Can't reuse `ivy-last' because using, e.g., `swiper' in the same
+buffer would modify `ivy-last'.")
+
+(defun ivy--occur-p (_cmd buf)
+  "Return non-nil if BUF is an Ivy Occur buffer.
+Intended as a `completion-predicate'."
+  (buffer-local-value 'ivy-occur-last buf))
+
+(defvar ivy-occur-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "<mouse-1>") #'ivy-occur-click)
+    (define-key map (kbd "RET") #'ivy-occur-press-and-switch)
+    (define-key map (kbd "j") #'ivy-occur-next-line)
+    (define-key map (kbd "k") #'ivy-occur-previous-line)
+    (define-key map (kbd "h") #'backward-char)
+    (define-key map (kbd "l") #'forward-char)
+    (define-key map (kbd "f") #'ivy-occur-press)
+    (define-key map (kbd "g") #'ivy-occur-revert-buffer)
+    (define-key map (kbd "a") #'ivy-occur-read-action)
+    (define-key map (kbd "o") #'ivy-occur-dispatch)
+    (define-key map (kbd "c") #'ivy-occur-toggle-calling)
+    (define-key map (kbd "q") #'quit-window)
+    (define-key map (kbd "R") #'read-only-mode)
+    (define-key map (kbd "C-d") #'ivy-occur-delete-candidate)
+    (define-key map (kbd "F") #'ivy-occur-flush-lines)
+    map)
+  "Keymap for Ivy Occur mode.")
+
+(defun ivy-occur-toggle-calling ()
+  "Toggle `ivy-calling'."
+  (interactive)
+  (if (setq ivy-calling (not ivy-calling))
+      (progn
+        (setq mode-name "Ivy-Occur [calling]")
+        (ivy-occur-press))
+    (setq mode-name "Ivy-Occur"))
+  (force-mode-line-update))
+(ivy--no-M-x #'ivy-occur-toggle-calling #'ivy--occur-p)
+
+(defun ivy--find-occur-buffer ()
+  (let ((cb (current-buffer)))
+    (cl-find-if
+     (lambda (b)
+       (with-current-buffer b
+         (and (eq major-mode 'ivy-occur-grep-mode)
+              (equal cb (ivy-state-buffer ivy-occur-last)))))
+     (buffer-list))))
+
+(defun ivy--select-occur-buffer ()
+  (let* ((ob (ivy--find-occur-buffer))
+         (ow (get-buffer-window ob)))
+    (if ow
+        (select-window ow)
+      (pop-to-buffer ob))))
+
+(defun ivy-occur-next-line (&optional arg)
+  "Move the cursor down ARG lines.
+When `ivy-calling' isn't nil, call `ivy-occur-press'."
+  (interactive "p")
+  (let ((offset (cond ((derived-mode-p 'ivy-occur-grep-mode) 5)
+                      ((derived-mode-p 'ivy-occur-mode) 2))))
+    (if offset
+        (progn
+          (if (< (line-number-at-pos) offset)
+              (progn
+                (goto-char (point-min))
+                (forward-line (1- offset)))
+            (forward-line arg)
+            (when (eolp)
+              (forward-line -1)))
+          (when ivy-calling
+            (ivy-occur-press)))
+      (ivy--select-occur-buffer)
+      (ivy-occur-next-line arg)
+      (ivy-occur-press-and-switch))))
+(ivy--no-M-x #'ivy-occur-next-line #'ivy--occur-p)
+
+(defun ivy-occur-previous-line (&optional arg)
+  "Move the cursor up ARG lines.
+When `ivy-calling' isn't nil, call `ivy-occur-press'."
+  (interactive "p")
+  (let ((offset (cond ((derived-mode-p 'ivy-occur-grep-mode) 5)
+                      ((derived-mode-p 'ivy-occur-mode) 2))))
+    (if offset
+        (progn
+          (forward-line (- arg))
+          (when (< (line-number-at-pos) offset)
+            (goto-char (point-min))
+            (forward-line (1- offset)))
+          (when ivy-calling
+            (ivy-occur-press)))
+      (ivy--select-occur-buffer)
+      (ivy-occur-previous-line arg)
+      (ivy-occur-press-and-switch))))
+(ivy--no-M-x #'ivy-occur-previous-line #'ivy--occur-p)
+
+(defun ivy-occur-next-error (n &optional reset)
+  "A `next-error-function' for `ivy-occur-mode'."
+  (interactive "p")
+  (when reset
+    (goto-char (point-min)))
+  (setq n (or n 1))
+  (let ((ivy-calling t))
+    (cond ((< n 0) (ivy-occur-previous-line (- n)))
+          (t (ivy-occur-next-line n))))
+  ;; The window's point overrides the buffer's point every time it's redisplayed
+  (dolist (window (get-buffer-window-list nil nil t))
+    (set-window-point window (point))))
+(ivy--no-M-x #'ivy-occur-next-error #'ivy--occur-p)
+
+(define-derived-mode ivy-occur-mode fundamental-mode "Ivy-Occur"
+  "Major mode for output from \\[ivy-occur].
+
+\\{ivy-occur-mode-map}"
+  (setq-local view-read-only nil))
+
+(defvar ivy-occur-grep-mode-map
+  (let ((map (make-sparse-keymap)))
+    (set-keymap-parent map ivy-occur-mode-map)
+    (define-key map (kbd "C-x C-q") #'ivy-wgrep-change-to-wgrep-mode)
+    (define-key map (kbd "w") #'ivy-wgrep-change-to-wgrep-mode)
+    map)
+  "Keymap for Ivy Occur Grep mode.")
+
+(defun ivy-occur-delete-candidate ()
+  (interactive)
+  (let ((inhibit-read-only t))
+    (delete-region (line-beginning-position)
+                   (1+ (line-end-position)))))
+(ivy--no-M-x #'ivy-occur-delete-candidate #'ivy--occur-p)
+
+(defun ivy-occur-flush-lines ()
+  "Delete lines matching regex."
+  (interactive)
+  (let ((inhibit-read-only t))
+    (call-interactively #'flush-lines)))
+(ivy--no-M-x #'ivy-occur-flush-lines #'ivy--occur-p)
+
+(define-derived-mode ivy-occur-grep-mode grep-mode "Ivy-Occur"
+  "Major mode for output from \\[ivy-occur].
+
+\\{ivy-occur-grep-mode-map}"
+  (setq-local view-read-only nil)
+  (when (fboundp 'wgrep-setup)
+    (wgrep-setup)))
+
+(defun ivy--starts-with-dotslash (str)
+  (string-match-p "\\`\\.[/\\]" str))
+
+(defun ivy--occur-insert-lines (cands)
+  "Insert CANDS into `ivy-occur' buffer."
+  (font-lock-mode -1)
+  (dolist (cand cands)
+    (setq cand
+          (if (string-match "\\`\\(.*:[0-9]+:\\)\\(.*\\)\\'" cand)
+              (let ((file-and-line (match-string 1 cand))
+                    (grep-line (match-string 2 cand)))
+                (concat
+                 (propertize file-and-line 'face 'ivy-grep-info)
+                 (ivy--highlight-fuzzy grep-line)))
+            (ivy--highlight-fuzzy (copy-sequence cand))))
+    (add-text-properties
+     0 (length cand)
+     '(mouse-face
+       highlight
+       help-echo "mouse-1: call ivy-action")
+     cand)
+    (insert (if (ivy--starts-with-dotslash cand) "" "    ")
+            cand ?\n)))
+
+(defun ivy--occur-default (cands)
+  "Insert CANDS into the current occur buffer."
+  (unless cands
+    (let ((coll (ivy-state-collection ivy-last)))
+      (when (arrayp coll)
+        (setq coll (all-completions "" coll (ivy-state-predicate ivy-last))))
+      (setq cands (ivy--filter (ivy-state-text ivy-last) coll))))
+  (ivy-occur-mode)
+  (insert (format "%d candidates:\n" (length cands)))
+  (ivy--occur-insert-lines cands)
+  (read-only-mode))
+
+(defun ivy-occur ()
+  "Stop completion and put the current candidates into a new buffer.
+
+The new buffer remembers current action(s).
+
+While in the *ivy-occur* buffer, selecting a candidate with RET or
+a mouse click will call the appropriate action for that candidate.
+
+There is no limit on the number of *ivy-occur* buffers."
+  (interactive)
+  (if (not (window-minibuffer-p))
+      (user-error "No completion session is active")
+    (let* ((caller (ivy-state-caller ivy-last))
+           (occur-fn (or (plist-get ivy--occurs-list caller)
+                         #'ivy--occur-default))
+           (buffer
+            (generate-new-buffer
+             (format "*ivy-occur%s \"%s\"*"
+                     (if caller
+                         (concat " " (prin1-to-string caller))
+                       "")
+                     ivy-text))))
+      (with-current-buffer buffer
+        (funcall occur-fn
+                 (if (ivy-state-dynamic-collection ivy-last)
+                     (funcall (ivy-state-collection ivy-last) ivy-text)
+                   ivy--old-cands))
+        (setf (ivy-state-text ivy-last) ivy-text)
+        (setq ivy-occur-last ivy-last))
+      (ivy-exit-with-action
+       (lambda (_)
+         (pop-to-buffer buffer)
+         (setq next-error-last-buffer buffer)
+         (setq-local next-error-function #'ivy-occur-next-error))))))
+(ivy--no-M-x #'ivy-occur #'ivy--minibuffer-p)
+
+(defun ivy-occur-revert-buffer ()
+  "Refresh the buffer making it up-to date with the collection.
+
+Currently only works for `swiper'.  In that specific case, the
+*ivy-occur* buffer becomes nearly useless as the original buffer
+is updated, since the line numbers no longer match.
+
+Calling this function is as if you called `ivy-occur' on the
+updated original buffer."
+  (interactive)
+  (let ((caller (ivy-state-caller ivy-occur-last))
+        (ivy-last ivy-occur-last))
+    (let ((inhibit-read-only t)
+          (line (line-number-at-pos))
+          (text (ivy-state-text ivy-last)))
+      (erase-buffer)
+      (ivy-set-text text)
+      (funcall (or (plist-get ivy--occurs-list caller)
+                   #'ivy--occur-default)
+               (and (ivy-state-dynamic-collection ivy-last)
+                    (funcall (ivy-state-collection ivy-last)
+                             text)))
+      (goto-char (point-min))
+      (forward-line (1- line)))
+    (setq ivy-occur-last ivy-last)))
+(ivy--no-M-x #'ivy-occur-revert-buffer #'ivy--occur-p)
+
+(declare-function wgrep-change-to-wgrep-mode "ext:wgrep")
+
+(defun ivy-wgrep-change-to-wgrep-mode ()
+  "Forward to `wgrep-change-to-wgrep-mode'."
+  (interactive)
+  (if (require 'wgrep nil 'noerror)
+      (wgrep-change-to-wgrep-mode)
+    (error "Package wgrep isn't installed")))
+(ivy--no-M-x #'ivy-wgrep-change-to-wgrep-mode #'ivy--occur-p)
+
+(defun ivy-occur-read-action ()
+  "Select one of the available actions as the current one."
+  (interactive)
+  (let ((ivy-last ivy-occur-last))
+    (ivy-read-action)))
+(ivy--no-M-x #'ivy-occur-read-action #'ivy--occur-p)
+
+(defun ivy-occur-dispatch ()
+  "Call one of the available actions on the current item."
+  (interactive)
+  (let* ((state-action (ivy-state-action ivy-occur-last))
+         (actions (if (symbolp state-action)
+                      state-action
+                    (copy-sequence state-action))))
+    (unwind-protect
+         (progn
+           (ivy-occur-read-action)
+           (ivy-occur-press))
+      (setf (ivy-state-action ivy-occur-last) actions))))
+(ivy--no-M-x #'ivy-occur-dispatch #'ivy--occur-p)
+
+(defun ivy-occur-click (event)
+  "Execute action for the current candidate.
+EVENT gives the mouse position."
+  (interactive "e")
+  (let ((window (posn-window (event-end event)))
+        (pos (posn-point (event-end event))))
+    (with-current-buffer (window-buffer window)
+      (goto-char pos)
+      (ivy-occur-press))))
+(ivy--no-M-x #'ivy-occur-click #'ivy--occur-p)
+
+(declare-function swiper--cleanup "swiper")
+(declare-function swiper--add-overlays "swiper")
+(defvar ivy-occur-timer nil)
+
+(defun ivy--occur-press-update-window ()
+  (cond
+    ((memq (ivy-state-caller ivy-occur-last)
+           (append '(swiper swiper-isearch) ivy-highlight-grep-commands))
+     (let ((window (ivy-state-window ivy-occur-last))
+           (buffer (ivy-state-buffer ivy-occur-last)))
+       (when (buffer-live-p buffer)
+         (cond ((or (not (window-live-p window))
+                    (equal window (selected-window)))
+                (save-selected-window
+                  (setf (ivy-state-window ivy-occur-last)
+                        (display-buffer buffer))))
+               ((not (equal (window-buffer window) buffer))
+                (with-selected-window window
+                  (switch-to-buffer buffer)))))))
+
+    ((memq (ivy-state-caller ivy-occur-last)
+           '(counsel-describe-function
+             counsel-describe-variable
+             counsel-describe-symbol))
+     (setf (ivy-state-window ivy-occur-last)
+           (selected-window))
+     (selected-window))))
+
+(defun ivy--occur-press-buffer ()
+  (let ((buffer (ivy-state-buffer ivy-last)))
+    (if (buffer-live-p buffer)
+        buffer
+      (current-buffer))))
+
+(defun ivy-occur-press ()
+  "Execute action for the current candidate."
+  (interactive)
+  (ivy--occur-press-update-window)
+  (when (save-excursion
+          (beginning-of-line)
+          (looking-at "\\(?:.[/\\]\\|    \\)\\(.*\\)$"))
+    (let* ((ivy-last ivy-occur-last)
+           (ivy-text (ivy-state-text ivy-last))
+           (str (match-string 1))
+           (offset (or (get-text-property 0 'offset str) 0))
+           (coll (ivy-state-collection ivy-last))
+           (action (ivy--get-action ivy-last))
+           (ivy-exit 'done))
+      (with-ivy-window
+        (with-current-buffer (ivy--occur-press-buffer)
+          (save-restriction
+            (widen)
+            (funcall action
+                     (if (and (consp coll)
+                              (consp (car coll)))
+                         (assoc str coll)
+                       (substring str offset)))))
+        (if (memq (ivy-state-caller ivy-last)
+                  (append '(swiper swiper-isearch) ivy-highlight-grep-commands))
+            (with-current-buffer (window-buffer (selected-window))
+              (swiper--cleanup)
+              (swiper--add-overlays
+               (ivy--regex ivy-text)
+               (line-beginning-position)
+               (line-end-position)
+               (selected-window))
+              (when (timerp ivy-occur-timer)
+                (cancel-timer ivy-occur-timer))
+              (setq ivy-occur-timer
+                    (run-at-time 1.0 nil 'swiper--cleanup))))))))
+(ivy--no-M-x #'ivy-occur-press #'ivy--occur-p)
+
+(defun ivy-occur-press-and-switch ()
+  "Execute action for the current candidate and switch window."
+  (interactive)
+  (ivy-occur-press)
+  (select-window (ivy--get-window ivy-occur-last)))
+(ivy--no-M-x #'ivy-occur-press-and-switch #'ivy--occur-p)
+
+(defun ivy--marked-p ()
+  (member (ivy-state-current ivy-last) ivy-marked-candidates))
+
+(defun ivy--unmark (cand)
+  (setcar (member cand ivy--all-candidates)
+          (setcar (member cand ivy--old-cands)
+                  (substring cand (length ivy-mark-prefix))))
+  (setq ivy-marked-candidates
+        (delete cand ivy-marked-candidates)))
+
+(defun ivy--mark (cand)
+  (let ((marked-cand (copy-sequence (concat ivy-mark-prefix cand))))
+    ;; Primarily for preserving `idx'.  FIXME: the mark
+    ;; prefix shouldn't become part of the candidate!
+    (add-text-properties 0 (length ivy-mark-prefix)
+                         (text-properties-at 0 cand)
+                         marked-cand)
+    (setcar (member cand ivy--all-candidates)
+            (setcar (member cand ivy--old-cands) marked-cand))
+    (setq ivy-marked-candidates
+          (nconc ivy-marked-candidates (list marked-cand)))))
+
+(defun ivy-mark ()
+  "Mark the selected candidate and move to the next one.
+
+In `ivy-call', :action will be called in turn for all marked
+candidates.
+
+However, if :multi-action was supplied to `ivy-read', then it
+will be called with `ivy-marked-candidates'. This way, it can
+make decisions based on the whole marked list."
+  (interactive)
+  (unless (ivy--marked-p)
+    (ivy--mark (ivy-state-current ivy-last)))
+  (ivy-next-line))
+(ivy--no-M-x #'ivy-mark #'ivy--minibuffer-p)
+
+(defun ivy-unmark ()
+  "Unmark the selected candidate and move to the next one."
+  (interactive)
+  (when (ivy--marked-p)
+    (ivy--unmark (ivy-state-current ivy-last)))
+  (ivy-next-line))
+(ivy--no-M-x #'ivy-unmark #'ivy--minibuffer-p)
+
+(defun ivy-unmark-backward ()
+  "Move to the previous candidate and unmark it."
+  (interactive)
+  (ivy-previous-line)
+  (ivy--exhibit)
+  (when (ivy--marked-p)
+    (ivy--unmark (ivy-state-current ivy-last))))
+(ivy--no-M-x #'ivy-unmark-backward #'ivy--minibuffer-p)
+
+(defun ivy-toggle-marks ()
+  "Toggle mark for all narrowed candidates."
+  (interactive)
+  (dolist (cand ivy--old-cands)
+    (if (member cand ivy-marked-candidates)
+        (ivy--unmark cand)
+      (ivy--mark cand))))
+(ivy--no-M-x #'ivy-toggle-marks #'ivy--minibuffer-p)
+
+(defconst ivy-help-file (let ((default-directory
+                               (if load-file-name
+                                   (file-name-directory load-file-name)
+                                 default-directory)))
+                          (if (file-exists-p "ivy-help.org")
+                              (expand-file-name "ivy-help.org")
+                            (if (file-exists-p "doc/ivy-help.org")
+                                (expand-file-name "doc/ivy-help.org"))))
+  "The file for `ivy-help'.")
+
+(defvar org-hide-emphasis-markers)
+
+(defun ivy-help ()
+  "Help for `ivy'."
+  (interactive)
+  (let ((buf (get-buffer "*Ivy Help*"))
+        (inhibit-read-only t))
+    (unless buf
+      (setq buf (get-buffer-create "*Ivy Help*"))
+      (cl-letf (((symbol-function #'help-buffer) (lambda () buf)))
+        (describe-mode))
+      (with-current-buffer buf
+        (goto-char (point-min))
+        (insert "* describe-mode\n")
+        (goto-char (point-min))
+        (insert-file-contents ivy-help-file)
+        (org-mode)
+        (setq-local org-hide-emphasis-markers t)
+        (view-mode)
+        (goto-char (point-min))
+        (let ((inhibit-message t))
+          (org-cycle '(64)))))
+    (if (eq this-command 'ivy-help)
+        (switch-to-buffer buf)
+      (with-ivy-window
+        (pop-to-buffer buf)))
+    (view-mode)
+    (goto-char (point-min))))
+
+(declare-function ffap-url-p "ffap")
+(defvar ffap-url-fetcher)
+
+(defun ivy-ffap-url-p (string)
+  "Forward to `ffap-url-p'."
+  (require 'ffap)
+  (ffap-url-p string))
+
+(defun ivy-ffap-url-fetcher (url)
+  "Calls `ffap-url-fetcher'."
+  (require 'ffap)
+  (funcall ffap-url-fetcher url))
+
+(ivy-configure 'read-file-name-internal
+  :sort-fn #'ivy-sort-file-function-default
+  :display-transformer-fn #'ivy-read-file-transformer
+  :alt-done-fn #'ivy--directory-done)
+
+(ivy-configure 'internal-complete-buffer
+  :display-transformer-fn #'ivy-switch-buffer-transformer)
+
+(ivy-configure 'Info-read-node-name-1
+  :alt-done-fn #'ivy--info-alt-done)
+
+(provide 'ivy)
+
+;;; ivy.el ends here
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy.elc b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy.elc
new file mode 100644
index 0000000..40e7ff2
Binary files /dev/null and b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy.elc differ
diff --git a/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy.info b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy.info
new file mode 100644
index 0000000..9e1151b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-20260413.2102/ivy.info
@@ -0,0 +1,1970 @@
+This is ivy.info, produced by makeinfo version 7.1.1 from ivy.texi.
+
+Ivy manual, version 0.15.1
+
+   Ivy is an interactive interface for completion in Emacs.  Emacs uses
+completion mechanism in a variety of contexts: code, menus, commands,
+variables, functions, etc.  Completion entails listing, sorting,
+filtering, previewing, and applying actions on selected items.  When
+active, ‘ivy-mode’ completes the selection process by narrowing
+available choices while previewing in the minibuffer.  Selecting the
+final candidate is either through simple keyboard character inputs or
+through powerful regular expressions.
+
+   Copyright (C) 2015-2026 Free Software Foundation, Inc.
+
+     Permission is granted to copy, distribute and/or modify this
+     document under the terms of the GNU Free Documentation License,
+     Version 1.3 or any later version published by the Free Software
+     Foundation; with no Invariant Sections, no Front-Cover Texts, and
+     no Back-Cover Texts.  A copy of the license is included in the
+     section entitled "GNU Free Documentation License".
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Ivy: (ivy).           Using Ivy for completion.
+END-INFO-DIR-ENTRY
+
+
+File: ivy.info,  Node: Top,  Next: Introduction,  Up: (dir)
+
+Ivy User Manual
+***************
+
+* Menu:
+
+* Introduction::
+* Installation::
+* Getting started::
+* Key bindings::
+* Completion Styles::
+* Customization::
+* Commands::
+* API::
+* Variable Index::
+* Keystroke Index::
+
+-- The Detailed Node Listing --
+
+Installation
+
+* Installing from Emacs Package Manager::
+* Installing from the Git repository::
+
+Getting started
+
+* Basic customization::
+
+Key bindings
+
+* Global key bindings::
+* Minibuffer key bindings::
+
+Minibuffer key bindings
+
+* Key bindings for navigation::
+* Key bindings for single selection, action, then exit minibuffer: Key bindings for single selection action then exit minibuffer.
+* Key bindings for multiple selections and actions, keep minibuffer open: Key bindings for multiple selections and actions keep minibuffer open.
+* Key bindings that alter the minibuffer input::
+* Other key bindings::
+* Hydra in the minibuffer::
+* Saving the current completion session to a buffer::
+
+Completion Styles
+
+* ivy--regex-plus::
+* ivy--regex-ignore-order::
+* ivy--regex-fuzzy::
+
+Customization
+
+* Faces::
+* Defcustoms::
+* Actions::
+* Packages::
+
+Actions
+
+* What are actions?::
+* How can different actions be called?::
+* How to modify the actions list?::
+* Example - add two actions to each command::
+* Example - define a new command with several actions::
+
+Example - add two actions to each command
+
+* How to undo adding the two actions::
+* How to add actions to a specific command::
+
+Example - define a new command with several actions
+
+* Test the above function with ivy-occur::
+
+Commands
+
+* File Name Completion::
+* Buffer Name Completion::
+* Counsel commands::
+
+File Name Completion
+
+* Using TRAMP::
+
+API
+
+* Required arguments for ivy-read::
+* Optional arguments for ivy-read::
+* Example - counsel-describe-function::
+* Example - counsel-locate::
+* Example - ivy-read-with-extra-properties::
+
+
+
+File: ivy.info,  Node: Introduction,  Next: Installation,  Prev: Top,  Up: Top
+
+1 Introduction
+**************
+
+Ivy is for quick and easy selection from a list.  When Emacs prompts for
+a string from a list of several possible choices, Ivy springs into
+action to assist in narrowing and picking the right string from a vast
+number of choices.
+
+   Ivy strives for minimalism, simplicity, customizability and
+discoverability.
+
+Minimalism
+..........
+
+     Uncluttered minibuffer is minimalism.  Ivy shows the completion
+     defaults, the number of matches, and 10 candidate matches below the
+     input line.  Customize ‘ivy-height’ to adjust the number of
+     candidate matches displayed in the minibuffer.
+
+Simplicity
+..........
+
+     Simplicity is about Ivy's behavior in the minibuffer.  It is also
+     about the code interface to extend Ivy's functionality.  The
+     minibuffer area behaves as close to ‘fundamental-mode’ as possible.
+     ‘SPC’ inserts a space, for example, instead of being bound to the
+     more complex ‘minibuffer-complete-word’.  Ivy's code uses
+     easy-to-examine global variables; avoids needless complications
+     with branch-introducing custom macros.
+
+Customizability
+...............
+
+     Customizability is about being able to use different methods and
+     interfaces of completion to tailor the selection process.  For
+     example, adding a custom display function that points to a selected
+     candidate with ‘>’, instead of highlighting the selected candidate
+     with the ‘ivy-current-match’ face (see
+     ‘ivy-format-functions-alist’).  Or take the customization of
+     actions, say after the candidate function is selected.  ‘RET’ uses
+     ‘counsel-describe-function’ to describe the function, whereas ‘M-o
+     d’ jumps to that function's definition in the code.  The ‘M-o’
+     prefix can be uniformly used with characters like ‘d’ to group
+     similar actions.
+
+Discoverability
+...............
+
+     Ivy displays easily discoverable commands through the Hydra
+     facility.  ‘C-o’ in the minibuffer displays a hydra menu.  It opens
+     up within an expanded minibuffer area.  Each menu item comes with
+     short documentation strings and highlighted one-key completions.
+     So discovering even seldom used keys is simply a matter of ‘C-o’ in
+     the minibuffer while in the midst of the Ivy interaction.  This
+     discoverability minimizes exiting Ivy interface for documentation
+     look-ups.
+
+
+File: ivy.info,  Node: Installation,  Next: Getting started,  Prev: Introduction,  Up: Top
+
+2 Installation
+**************
+
+Install Ivy automatically through Emacs's package manager, or manually
+from Ivy's development repository.
+
+   Emacs 24.5 is the oldest version to run Ivy.
+
+* Menu:
+
+* Installing from Emacs Package Manager::
+* Installing from the Git repository::
+
+
+File: ivy.info,  Node: Installing from Emacs Package Manager,  Next: Installing from the Git repository,  Up: Installation
+
+2.1 Installing from Emacs Package Manager
+=========================================
+
+‘M-x’ ‘package-install’ ‘RET’ ‘counsel’ ‘RET’
+
+   Ivy is installed alongside the ‘counsel’ package, which is available
+from two different package archives, GNU ELPA and MELPA.  For the latest
+stable version, use the GNU ELPA archive.  For the latest development
+snapshot, use the GNU-devel ELPA archive.
+
+   Ivy is split into three packages: ‘ivy’, ‘swiper’ and ‘counsel’; by
+installing ‘counsel’, the other two are brought in as dependencies.  If
+you are not interested in the extra functionality provided by ‘swiper’
+and ‘counsel’, you can install only ‘ivy’.
+
+   See the code below for adding GNU-devel ELPA to your list of package
+archives:
+
+     (require 'package)
+     (add-to-list 'package-archives
+                  '("gnu-devel" . "https://elpa.gnu.org/devel/"))
+
+   After this do ‘M-x’ ‘package-refresh-contents’ ‘RET’, followed by
+‘M-x’ ‘package-install’ ‘RET’ ‘counsel’ ‘RET’.
+
+   For package manager details, see *note (emacs)Packages::.
+
+
+File: ivy.info,  Node: Installing from the Git repository,  Prev: Installing from Emacs Package Manager,  Up: Installation
+
+2.2 Installing from the Git repository
+======================================
+
+Why install from Git?
+.....................
+
+        • No need to wait for GNU ELPA / MELPA builds.
+        • Easy to revert to previous versions.
+        • Contribute to Ivy's development; send patches; pull requests.
+
+Configuration steps
+...................
+
+     First clone the Swiper repository with:
+
+          cd ~/git && git clone 'https://github.com/abo-abo/swiper.git'
+          cd swiper && make deps all
+
+     Second, add these lines to the Emacs init file:
+
+          (add-to-list 'load-path "~/git/swiper")
+          (require 'ivy)
+
+     Then, update the code with:
+
+          git pull
+          make
+
+
+File: ivy.info,  Node: Getting started,  Next: Key bindings,  Prev: Installation,  Up: Top
+
+3 Getting started
+*****************
+
+First enable Ivy completion everywhere:
+
+     (ivy-mode 1)
+
+   Note: ‘ivy-mode’ can be toggled on and off with ‘M-x’ ‘ivy-mode’.
+
+* Menu:
+
+* Basic customization::
+
+
+File: ivy.info,  Node: Basic customization,  Up: Getting started
+
+3.1 Basic customization
+=======================
+
+Here are some basic settings particularly useful for new Ivy users:
+
+     (setopt ivy-use-virtual-buffers t)
+     (setopt ivy-count-format "(%d/%d) ")
+
+   If you want, you can go without any customizations at all.  The
+settings above give the most bang for the buck in terms of
+customization.  So users that typically don't like customizing a lot are
+advised to look at these settings first.
+
+   For more advanced customizations, refer to ‘M-x describe-variable’
+documentation.
+
+
+File: ivy.info,  Node: Key bindings,  Next: Completion Styles,  Prev: Getting started,  Up: Top
+
+4 Key bindings
+**************
+
+* Menu:
+
+* Global key bindings::
+* Minibuffer key bindings::
+
+
+File: ivy.info,  Node: Global key bindings,  Next: Minibuffer key bindings,  Up: Key bindings
+
+4.1 Global key bindings
+=======================
+
+Here is a list of commands that are useful to bind globally, along with
+some sample bindings:
+
+Ivy-based interface to standard commands
+........................................
+
+          (keymap-global-set "C-s" #'swiper-isearch)
+          (keymap-global-set "M-x" #'counsel-M-x)
+          (keymap-global-set "C-x C-f" #'counsel-find-file)
+          (keymap-global-set "M-y" #'counsel-yank-pop)
+          (keymap-global-set "<f1> f" #'counsel-describe-function)
+          (keymap-global-set "<f1> v" #'counsel-describe-variable)
+          (keymap-global-set "<f1> o" #'counsel-describe-symbol)
+          (keymap-global-set "<f1> l" #'counsel-find-library)
+          (keymap-global-set "<f2> i" #'counsel-info-lookup-symbol)
+          (keymap-global-set "<f2> u" #'counsel-unicode-char)
+          (keymap-global-set "<f2> j" #'counsel-set-variable)
+          (keymap-global-set "C-x b" #'ivy-switch-buffer)
+          (keymap-global-set "C-c v" #'ivy-push-view)
+          (keymap-global-set "C-c V" #'ivy-pop-view)
+
+Ivy-based interface to shell and system tools
+.............................................
+
+          (keymap-global-set "C-c c" #'counsel-compile)
+          (keymap-global-set "C-c g" #'counsel-git)
+          (keymap-global-set "C-c j" #'counsel-git-grep)
+          (keymap-global-set "C-c L" #'counsel-git-log)
+          (keymap-global-set "C-c k" #'counsel-rg)
+          (keymap-global-set "C-c m" #'counsel-linux-app)
+          (keymap-global-set "C-c n" #'counsel-fzf)
+          (keymap-global-set "C-x l" #'counsel-locate)
+          (keymap-global-set "C-c J" #'counsel-file-jump)
+          (keymap-global-set "C-S-o" #'counsel-rhythmbox)
+          (keymap-global-set "C-c w" #'counsel-wmctrl)
+
+Ivy-resume and other commands
+.............................
+
+     ‘ivy-resume’ resumes the last Ivy-based completion.
+
+          (keymap-global-set "C-c C-r" #'ivy-resume)
+          (keymap-global-set "C-c b" #'counsel-bookmark)
+          (keymap-global-set "C-c d" #'counsel-descbinds)
+          (keymap-global-set "C-c o" #'counsel-outline)
+          (keymap-global-set "C-c t" #'counsel-load-theme)
+          (keymap-global-set "C-c F" #'counsel-org-file)
+
+   You can also enable ‘counsel-mode’ to make some global key binding
+remapping for you.
+
+
+File: ivy.info,  Node: Minibuffer key bindings,  Prev: Global key bindings,  Up: Key bindings
+
+4.2 Minibuffer key bindings
+===========================
+
+Ivy includes several minibuffer bindings, which are defined in the
+‘ivy-minibuffer-map’ keymap variable.  The most frequently used ones are
+described here.
+
+   ‘swiper’ or ‘counsel-M-x’ add more key bindings through the ‘keymap’
+argument to ‘ivy-read’.  These keys, also active in the minibuffer, are
+described under their respective commands.
+
+   A key feature of ‘ivy-minibuffer-map’ is its full editing capability
+where the familiar ‘C-a’, ‘C-f’, ‘M-d’, ‘M-DEL’, ‘M-b’, ‘M-w’, ‘C-k’,
+‘C-y’ key bindings work the same as in ‘fundamental-mode’.
+
+* Menu:
+
+* Key bindings for navigation::
+* Key bindings for single selection, action, then exit minibuffer: Key bindings for single selection action then exit minibuffer.
+* Key bindings for multiple selections and actions, keep minibuffer open: Key bindings for multiple selections and actions keep minibuffer open.
+* Key bindings that alter the minibuffer input::
+* Other key bindings::
+* Hydra in the minibuffer::
+* Saving the current completion session to a buffer::
+
+
+File: ivy.info,  Node: Key bindings for navigation,  Next: Key bindings for single selection action then exit minibuffer,  Up: Minibuffer key bindings
+
+4.2.1 Key bindings for navigation
+---------------------------------
+
+   • ‘C-n’ (‘ivy-next-line’) selects the next candidate
+   • ‘C-p’ (‘ivy-previous-line’) selects the previous candidate
+   • ‘M-<’ (‘ivy-beginning-of-buffer’) selects the first candidate
+   • ‘M->’ (‘ivy-end-of-buffer’) selects the last candidate
+   • ‘C-v’ (‘ivy-scroll-up-command’) scrolls up by ‘ivy-height’ lines
+   • ‘M-v’ (‘ivy-scroll-down-command’) scrolls down by ‘ivy-height’
+     lines
+
+ -- User Option: ivy-wrap
+     Specifies the wrap-around behavior for ‘C-n’ and ‘C-p’.  When
+     ‘ivy-wrap’ is set to ‘t’, ‘ivy-next-line’ and ‘ivy-previous-line’
+     will cycle past the last and the first candidates respectively.
+
+     Wrap-around behavior is off by default.
+
+ -- User Option: ivy-height
+     Use this option to adjust the minibuffer height, which also affects
+     scroll size when using ‘C-v’ and ‘M-v’ key bindings.
+
+     ‘ivy-height’ is 10 lines by default.
+
+
+File: ivy.info,  Node: Key bindings for single selection action then exit minibuffer,  Next: Key bindings for multiple selections and actions keep minibuffer open,  Prev: Key bindings for navigation,  Up: Minibuffer key bindings
+
+4.2.2 Key bindings for single selection, action, then exit minibuffer
+---------------------------------------------------------------------
+
+Ivy can offer several actions from which to choose which action to run.
+This "calling an action" operates on the selected candidate.  For
+example, when viewing a list of files, one action could open it for
+editing, one to view it, another to invoke a special function, and so
+on.  Custom actions can be added to this interface.  The precise action
+to call on the selected candidate can be delayed until after the
+narrowing is completed.  No need to exit the interface if unsure which
+action to run.  This delayed flexibility and customization of actions
+extends usability of lists in Emacs.
+
+‘C-m’ or ‘RET’ (‘ivy-done’)
+...........................
+
+     Calls the default action and then exits the minibuffer.
+
+‘M-o’ (‘ivy-dispatching-done’)
+..............................
+
+     Presents valid actions from which to choose.  When only one action
+     is available, there is no difference between ‘M-o’ and ‘C-m’.
+
+‘C-j’ (‘ivy-alt-done’)
+......................
+
+     When completing file names, selects the current directory candidate
+     and starts a new completion session there.  Otherwise, it is the
+     same as ‘ivy-done’.
+
+‘TAB’ (‘ivy-partial-or-done’)
+.............................
+
+     Attempts partial completion, extending current input as much as
+     possible.  ‘TAB TAB’ is the same as ‘C-j’ (‘ivy-alt-done’).
+
+     Example ERT test:
+
+          (should
+           (equal (ivy-with
+                   '(progn
+                      (ivy-read "Test: " '("can do" "can't, sorry" "other"))
+                      ivy-text)
+                   "c <tab>")
+                  "can"))
+
+‘C-M-j’ (‘ivy-immediate-done’)
+..............................
+
+     Exits with _the current input_ instead of _the current candidate_
+     (like other commands).
+
+     This is useful e.g.  when you call ‘find-file’ to create a new
+     file, but the desired name matches an existing file.  In that case,
+     using ‘C-j’ would select that existing file, which isn't what you
+     want -- use this command instead.
+
+‘C-'’ (‘ivy-avy’)
+.................
+
+     Uses Avy to select one of the candidates on the current candidate
+     page.  This can often be faster than multiple ‘C-n’ or ‘C-p’
+     keystrokes followed by ‘C-m’.
+
+
+File: ivy.info,  Node: Key bindings for multiple selections and actions keep minibuffer open,  Next: Key bindings that alter the minibuffer input,  Prev: Key bindings for single selection action then exit minibuffer,  Up: Minibuffer key bindings
+
+4.2.3 Key bindings for multiple selections and actions, keep minibuffer open
+----------------------------------------------------------------------------
+
+For repeatedly applying multiple actions or acting on multiple
+candidates, Ivy does not close the minibuffer between commands.  It
+keeps the minibuffer open for applying subsequent actions.
+
+   Adding an extra meta key to the normal key chord invokes the special
+version of the regular commands that enables applying multiple actions.
+
+   Note that these operations are supported only by completion sessions
+that use the ‘ivy-read’ API, rather than the built-in ‘completing-read’.
+
+‘C-M-m’ (‘ivy-call’)
+....................
+
+     Is the non-exiting version of ‘C-m’ (‘ivy-done’).
+
+     Instead of closing the minibuffer, ‘C-M-m’ allows selecting another
+     candidate or another action.  For example, ‘C-M-m’ on functions
+     list invokes ‘describe-function’.  When combined with ‘C-n’,
+     function descriptions can be invoked quickly in succession.
+
+‘C-M-o’ (‘ivy-dispatching-call’)
+................................
+
+     Is the non-exiting version of ‘M-o’ (‘ivy-dispatching-done’).
+
+     For example, during the ‘counsel-rhythmbox’ completion, press
+     ‘C-M-o e’ to en-queue the selected candidate, followed by ‘C-n C-m’
+     to play the next candidate -- the current action reverts to the
+     default one after ‘C-M-o’.
+
+‘C-M-n’ (‘ivy-next-line-and-call’)
+..................................
+
+     Combines ‘C-n’ and ‘C-M-m’.  Moves to next line and applies an
+     action.
+
+     Comes in handy when opening multiple files from
+     ‘counsel-find-file’, ‘counsel-git-grep’, ‘counsel-ag’,
+     ‘counsel-rg’, or ‘counsel-locate’ lists.  Just hold ‘C-M-n’ for
+     rapid-fire default action on each successive element of the list.
+
+‘C-M-p’ (‘ivy-previous-line-and-call’)
+......................................
+
+     Combines ‘C-p’ and ‘C-M-m’.
+
+     Similar to the above except it moves through the list in the other
+     direction.
+
+‘ivy-resume’
+............
+
+     Recalls the state of the completion session just before its last
+     exit.
+
+     Useful after an accidental ‘C-m’ (‘ivy-done’).  Use it with
+     ‘universal-argument’ to resume any previous session.
+
+
+File: ivy.info,  Node: Key bindings that alter the minibuffer input,  Next: Other key bindings,  Prev: Key bindings for multiple selections and actions keep minibuffer open,  Up: Minibuffer key bindings
+
+4.2.4 Key bindings that alter the minibuffer input
+--------------------------------------------------
+
+‘M-n’ (‘ivy-next-history-element’)
+..................................
+
+     Cycles forward through the Ivy command history.
+
+     Ivy updates an internal history list after each action.  When this
+     history list is empty, ‘M-n’ inserts the symbol (or URL) at point
+     into the minibuffer.
+
+‘M-p’ (‘ivy-previous-history-element’)
+......................................
+
+     Cycles backwards through the Ivy command history.
+
+‘M-i’ (‘ivy-insert-current’)
+............................
+
+     Inserts the current candidate into the minibuffer.
+
+     Useful for copying and renaming files, for example: ‘M-i’ to insert
+     the original file name string, edit it, and then ‘C-m’ to complete
+     the renaming.
+
+‘M-j’ (‘ivy-yank-word’)
+.......................
+
+     Inserts the sub-word at point into the minibuffer.
+
+     This is similar to ‘C-s C-w’ with ‘isearch’.  Ivy reserves ‘C-w’
+     for ‘kill-region’.  See also ‘ivy-yank-symbol’ and ‘ivy-yank-char’.
+
+‘S-SPC’ (‘ivy-restrict-to-matches’)
+...................................
+
+     Deletes the current input, and resets the candidates list to the
+     currently restricted matches.
+
+     This is how Ivy provides narrowing in successive tiers.
+
+‘C-r’ (‘ivy-reverse-i-search’)
+..............................
+
+     Starts a recursive completion session through the command's
+     history.
+
+     This works just like ‘C-r’ at the bash command prompt, where the
+     completion candidates are the history items.  Upon completion, the
+     selected candidate string is inserted into the minibuffer.
+
+
+File: ivy.info,  Node: Other key bindings,  Next: Hydra in the minibuffer,  Prev: Key bindings that alter the minibuffer input,  Up: Minibuffer key bindings
+
+4.2.5 Other key bindings
+------------------------
+
+‘M-w’ (‘ivy-kill-ring-save’)
+............................
+
+     Copies selected candidates to the kill ring.
+
+     Copies the region if the region is active.
+
+
+File: ivy.info,  Node: Hydra in the minibuffer,  Next: Saving the current completion session to a buffer,  Prev: Other key bindings,  Up: Minibuffer key bindings
+
+4.2.6 Hydra in the minibuffer
+-----------------------------
+
+‘C-o’ (‘hydra-ivy/body’)
+........................
+
+     Invokes the hydra menu with short key bindings.
+
+   When Hydra is active, minibuffer editing is disabled and menus
+display short aliases:
+
+Short   Normal      Command name
+------------------------------------------------
+‘o’     ‘C-g’       ‘keyboard-escape-quit’
+‘j’     ‘C-n’       ‘ivy-next-line’
+‘k’     ‘C-p’       ‘ivy-previous-line’
+‘h’     ‘M-<’       ‘ivy-beginning-of-buffer’
+‘l’     ‘M->’       ‘ivy-end-of-buffer’
+‘d’     ‘C-m’       ‘ivy-done’
+‘f’     ‘C-j’       ‘ivy-alt-done’
+‘g’     ‘C-M-m’     ‘ivy-call’
+‘u’     ‘C-c C-o’   ‘ivy-occur’
+
+   Hydra reduces key strokes, for example: ‘C-n C-n C-n C-n’ is ‘C-o
+jjjj’ in Hydra.
+
+   Hydra menu offers these additional bindings:
+
+‘c’ (‘ivy-toggle-calling’)
+..........................
+
+     Toggle calling the action after each candidate change.  It modifies
+     ‘j’ to ‘jg’, ‘k’ to ‘kg’ etc.
+
+‘M’ (‘ivy-rotate-preferred-builders’)
+.....................................
+
+     Rotate the current regexp matcher.
+
+‘>’ (‘ivy-minibuffer-grow’)
+...........................
+
+     Increase ‘ivy-height’ for the current minibuffer.
+
+‘<’ (‘ivy-minibuffer-shrink’)
+.............................
+
+     Decrease ‘ivy-height’ for the current minibuffer.
+
+‘w’ (‘ivy-prev-action’)
+.......................
+
+     Select the previous action.
+
+‘s’ (‘ivy-next-action’)
+.......................
+
+     Select the next action.
+
+‘a’ (‘ivy-read-action’)
+.......................
+
+     Use a menu to select an action.
+
+‘C’ (‘ivy-toggle-case-fold’)
+............................
+
+     Toggle case folding (match both upper and lower case characters for
+     lower case input).
+
+   Hydra menu also offers bindings for marking multiple candidates:
+
+Key     Command name
+--------------------------------
+‘m’     ‘ivy-mark’
+‘u’     ‘ivy-unmark’
+‘DEL’   ‘ivy-unmark-backward’
+‘t’     ‘ivy-toggle-marks’
+
+   The action is called on each marked candidate one by one.
+
+
+File: ivy.info,  Node: Saving the current completion session to a buffer,  Prev: Hydra in the minibuffer,  Up: Minibuffer key bindings
+
+4.2.7 Saving the current completion session to a buffer
+-------------------------------------------------------
+
+‘C-c C-o’ (‘ivy-occur’)
+.......................
+
+     Saves the current candidates to a new buffer and exits completion.
+
+   The new buffer is read-only and has a few useful bindings defined.
+
+‘RET’ or ‘f’ (‘ivy-occur-press’)
+................................
+
+     Call the current action on the selected candidate.
+
+‘mouse-1’ (‘ivy-occur-click’)
+.............................
+
+     Call the current action on the selected candidate.
+
+‘j’ (‘next-line’)
+.................
+
+     Move to next line.
+
+‘k’ (‘previous-line’)
+.....................
+
+     Move to previous line.
+
+‘a’ (‘ivy-occur-read-action’)
+.............................
+
+     Read an action and make it current for this buffer.
+
+‘o’ (‘ivy-occur-dispatch’)
+..........................
+
+     Read an action and call it on the selected candidate.
+
+‘q’ (‘quit-window’)
+...................
+
+     Bury the current buffer.
+
+   Ivy has no limit on the number of active buffers like these.
+
+   Ivy takes care of naming buffers uniquely by constructing descriptive
+names.  For example: ‘*ivy-occur counsel-describe-variable "function$*’.
+
+
+File: ivy.info,  Node: Completion Styles,  Next: Customization,  Prev: Key bindings,  Up: Top
+
+5 Completion Styles
+*******************
+
+Ivy's completion functions rely on a regexp builder -- a function that
+transforms a string input into a string regexp.  All current candidates
+simply have to match this regexp.  Each collection can be assigned its
+own regexp builder by customizing ‘ivy-re-builders-alist’.
+
+   The keys of this alist are collection names, and the values are one
+of the following:
+   • ‘ivy--regex’
+   • ‘ivy--regex-plus’
+   • ‘ivy--regex-ignore-order’
+   • ‘ivy--regex-fuzzy’
+   • ‘regexp-quote’
+
+   A catch-all key, ‘t’, applies to all collections that don't have
+their own key.
+
+   The default is:
+
+     (setq ivy-re-builders-alist
+           '((t . ivy--regex-plus)))
+
+   This example shows a custom regexp builder assigned to file name
+completion:
+
+     (setq ivy-re-builders-alist
+           '((read-file-name-internal . ivy--regex-fuzzy)
+             (t . ivy--regex-plus)))
+
+   Here, ‘read-file-name-internal’ is a function that is passed as the
+second argument to ‘completing-read’ for file name completion.
+
+   The regexp builder resolves as follows (in order of priority):
+  1. ‘re-builder’ argument passed to ‘ivy-read’.
+  2. ‘collection’ argument passed to ‘ivy-read’ is a function and has an
+     entry in ‘ivy-re-builders-alist’.
+  3. ‘caller’ argument passed to ‘ivy-read’ has an entry in
+     ‘ivy-re-builders-alist’.
+  4. ‘this-command’ has an entry in ‘ivy-re-builders-alist’.
+  5. ‘t’ has an entry in ‘ivy-re-builders-alist’.
+  6. ‘ivy--regex’.
+
+* Menu:
+
+* ivy--regex-plus::
+* ivy--regex-ignore-order::
+* ivy--regex-fuzzy::
+
+
+File: ivy.info,  Node: ivy--regex-plus,  Next: ivy--regex-ignore-order,  Up: Completion Styles
+
+5.1 ivy-regex-plus
+==================
+
+‘ivy--regex-plus’ is Ivy's default completion method.
+
+   ‘ivy--regex-plus’ matches by splitting the input by spaces and
+rebuilding it into a regexp.
+
+   As the search string is typed in Ivy's minibuffer, it is transformed
+into valid regexp syntax.  If the string is ‘"for example"’, it is
+transformed into:
+
+     "\\(for\\).*\\(example\\)"
+
+   which in regexp terminology matches ‘"for"’ followed by a wild card
+and then ‘"example"’.  Note how Ivy uses the space character to build
+wild cards.  To match a literal white space, use an extra space.  So to
+match one space type two spaces, to match two spaces type three spaces,
+and so on.
+
+   As Ivy transforms typed characters into regexp strings, it provides
+an intuitive feedback through font highlights.
+
+   Ivy supports regexp negation with ‘"!"’.  For example, ‘"define key !
+ivy quit"’ first selects everything matching ‘"define.*key"’, then
+removes everything matching ‘"ivy"’, and finally removes everything
+matching ‘"quit"’.  What remains is the final result set of the negation
+regexp.
+
+   Since Ivy treats minibuffer input as a regexp, the standard regexp
+identifiers work: ‘"^"’, ‘"$"’, ‘"\b"’ or ‘"[a-z]"’.  The exceptions are
+spaces, which translate to ‘".*"’, and ‘"!"’, that signals the beginning
+of a negation group.
+
+
+File: ivy.info,  Node: ivy--regex-ignore-order,  Next: ivy--regex-fuzzy,  Prev: ivy--regex-plus,  Up: Completion Styles
+
+5.2 ivy-regex-ignore-order
+==========================
+
+‘ivy--regex-ignore-order’ ignores the order of regexp tokens when
+searching for matching candidates.  For instance, the input ‘"for
+example"’ will match ‘"example test for"’.
+
+
+File: ivy.info,  Node: ivy--regex-fuzzy,  Prev: ivy--regex-ignore-order,  Up: Completion Styles
+
+5.3 ivy-regex-fuzzy
+===================
+
+‘ivy--regex-fuzzy’ splits each character with a wild card.  Searching
+for ‘"for"’ returns all ‘"f.*o.*r"’ matches, resulting in a large number
+of hits.  Yet some searches need these extra hits.  Ivy sorts such large
+lists using ‘flx’ package's scoring mechanism, if it's installed.
+
+   ‘C-o m’ toggles the current regexp builder.
+
+
+File: ivy.info,  Node: Customization,  Next: Commands,  Prev: Completion Styles,  Up: Top
+
+6 Customization
+***************
+
+* Menu:
+
+* Faces::
+* Defcustoms::
+* Actions::
+* Packages::
+
+
+File: ivy.info,  Node: Faces,  Next: Defcustoms,  Up: Customization
+
+6.1 Faces
+=========
+
+‘ivy-current-match’
+...................
+
+     Highlights the currently selected candidate.
+
+‘ivy-minibuffer-match-face-1’
+.............................
+
+     Highlights the background of the match.
+
+‘ivy-minibuffer-match-face-2’
+.............................
+
+     Highlights the first (modulo 3) matched group.
+
+‘ivy-minibuffer-match-face-3’
+.............................
+
+     Highlights the second (modulo 3) matched group.
+
+‘ivy-minibuffer-match-face-4’
+.............................
+
+     Highlights the third (modulo 3) matched group.
+
+‘ivy-confirm-face’
+..................
+
+     Highlights the "(confirm)" part of the prompt.
+
+     When ‘confirm-nonexistent-file-or-buffer’ is set to ‘t’, confirming
+     non-existent files in ‘ivy-mode’ requires an additional ‘RET’.
+
+     The confirmation prompt will use this face.
+
+     For example:
+
+          (setopt confirm-nonexistent-file-or-buffer t)
+
+     Then call ‘find-file’, enter "eldorado" and press ‘RET’ -- the
+     prompt will have "(confirm)" appended.  Press ‘RET’ once more to
+     confirm, or any key to continue the completion.
+
+‘ivy-match-required-face’
+.........................
+
+     Highlights the "(match required)" part of the prompt.
+
+     When completions have to match available candidates and cannot take
+     random input, the "(match required)" prompt signals this
+     constraint.
+
+     For example, call ‘describe-variable’, enter "waldo" and press
+     ‘RET’ -- "(match required)" is indicated.  Press any key for the
+     indication to disappear.
+
+‘ivy-subdir’
+............
+
+     Highlights directories when completing file names.
+
+‘ivy-remote’
+............
+
+     Highlights remote files when completing file names.
+
+‘ivy-virtual’
+.............
+
+     Highlights virtual buffers when completing buffer names.
+
+     Virtual buffers correspond to bookmarks and the recent files list
+     from ‘recentf’.
+
+     Enable virtual buffers with:
+
+          (setopt ivy-use-virtual-buffers t)
+
+‘ivy-modified-buffer’
+.....................
+
+     Highlights modified buffers when switching buffer.
+
+‘ivy-modified-outside-buffer’
+.............................
+
+     Highlights buffers modified outside Emacs when switching buffer.
+
+     This takes precedence over ‘ivy-modified-buffer’.
+
+
+File: ivy.info,  Node: Defcustoms,  Next: Actions,  Prev: Faces,  Up: Customization
+
+6.2 Defcustoms
+==============
+
+ -- User Option: ivy-count-format
+     A string controlling how to display the number of candidates and
+     the current candidate, if one exists.
+
+     The number of matching candidates by default is shown as a
+     right-padded integer value.
+
+     To disable showing the number of candidates:
+
+          (setopt ivy-count-format "")
+
+     To also display the current candidate:
+
+          (setopt ivy-count-format "(%d/%d) ")
+
+     The ‘format’-style switches this variable uses are described in the
+     ‘format’ documentation.
+
+ -- User Option: ivy-display-style
+     Controls how to highlight candidates in the minibuffer.
+
+     The default setting is ‘fancy’.
+
+     Set ‘ivy-display-style’ to ‘nil’ for a plain minibuffer.
+
+ -- User Option: ivy-on-del-error-function
+     Specifies what to do when ‘DEL’ (‘ivy-backward-delete-char’) fails.
+
+     This is usually the case when there is no text left to delete,
+     i.e., when ‘DEL’ is typed at the beginning of the minibuffer.
+
+     The default behavior is to quit the completion after ‘DEL’ -- a
+     handy key to invoke after mistakenly triggering a completion.
+
+     Another common option is ‘ignore’, which does nothing.
+
+
+File: ivy.info,  Node: Actions,  Next: Packages,  Prev: Defcustoms,  Up: Customization
+
+6.3 Actions
+===========
+
+* Menu:
+
+* What are actions?::
+* How can different actions be called?::
+* How to modify the actions list?::
+* Example - add two actions to each command::
+* Example - define a new command with several actions::
+
+
+File: ivy.info,  Node: What are actions?,  Next: How can different actions be called?,  Up: Actions
+
+6.3.1 What are actions?
+-----------------------
+
+An action is a function that is called after you select a candidate
+during completion.  This function takes a single string argument, which
+is the selected candidate.
+
+Window context when calling an action
+.....................................
+
+     Currently, the action is executed in the minibuffer window context.
+     This means e.g.  that if you call ‘insert’ the text will be
+     inserted into the minibuffer.
+
+     If you want to execute the action in the initial window from which
+     the completion started, use the ‘with-ivy-window’ wrapper macro.
+
+          (defun ivy-insert-action (x)
+            (with-ivy-window
+              (insert x)))
+
+
+File: ivy.info,  Node: How can different actions be called?,  Next: How to modify the actions list?,  Prev: What are actions?,  Up: Actions
+
+6.3.2 How can different actions be called?
+------------------------------------------
+
+   • ‘C-m’ (‘ivy-done’) calls the current action.
+   • ‘M-o’ (‘ivy-dispatching-done’) presents available actions for
+     selection, calls the selected one, and then exits.
+   • ‘C-M-o’ (‘ivy-dispatching-call’) presents available actions for
+     selection, calls the selected one, and then does not exit.
+
+
+File: ivy.info,  Node: How to modify the actions list?,  Next: Example - add two actions to each command,  Prev: How can different actions be called?,  Up: Actions
+
+6.3.3 How to modify the actions list?
+-------------------------------------
+
+Currently, you can append any amount of your own actions to the default
+list of actions.  This can be done either for a specific command, or for
+all commands at once.
+
+   Usually, the command has only one default action.  The convention is
+to use single letters when selecting a command, and the letter ‘o’ is
+designated for the default command.  This way, ‘M-o o’ should always be
+equivalent to ‘C-m’.
+
+
+File: ivy.info,  Node: Example - add two actions to each command,  Next: Example - define a new command with several actions,  Prev: How to modify the actions list?,  Up: Actions
+
+6.3.4 Example - add two actions to each command
+-----------------------------------------------
+
+The first action inserts the current candidate into the Ivy window --
+the window from which ‘ivy-read’ was called.
+
+   The second action copies the current candidate to the kill ring.
+
+     (defun ivy-yank-action (x)
+       (kill-new x))
+
+     (defun ivy-copy-to-buffer-action (x)
+       (with-ivy-window
+         (insert x)))
+
+     (ivy-set-actions
+      t
+      '(("i" ivy-copy-to-buffer-action "insert")
+        ("y" ivy-yank-action "yank")))
+
+   Then in any completion session, ‘M-o y’ invokes ‘ivy-yank-action’,
+and ‘M-o i’ invokes ‘ivy-copy-to-buffer-action’.
+
+* Menu:
+
+* How to undo adding the two actions::
+* How to add actions to a specific command::
+
+
+File: ivy.info,  Node: How to undo adding the two actions,  Next: How to add actions to a specific command,  Up: Example - add two actions to each command
+
+6.3.4.1 How to undo adding the two actions
+..........................................
+
+Since ‘ivy-set-actions’ modifies the internal dictionary with new data,
+set the extra actions list to ‘nil’ by assigning a ‘nil’ value to the
+‘t’ key as follows:
+
+     (ivy-set-actions t nil)
+
+
+File: ivy.info,  Node: How to add actions to a specific command,  Prev: How to undo adding the two actions,  Up: Example - add two actions to each command
+
+6.3.4.2 How to add actions to a specific command
+................................................
+
+Use the command name as the key:
+
+     (ivy-set-actions
+      'swiper
+      '(("i" ivy-copy-to-buffer-action "insert")
+        ("y" ivy-yank-action "yank")))
+
+
+File: ivy.info,  Node: Example - define a new command with several actions,  Prev: Example - add two actions to each command,  Up: Actions
+
+6.3.5 Example - define a new command with several actions
+---------------------------------------------------------
+
+     (defun my-action-1 (x)
+       (message "action-1: %s" x))
+
+     (defun my-action-2 (x)
+       (message "action-2: %s" x))
+
+     (defun my-action-3 (x)
+       (message "action-3: %s" x))
+
+     (defun my-command-with-3-actions ()
+       (interactive)
+       (ivy-read "test: " '("foo" "bar" "baz")
+                 :action '(1
+                           ("o" my-action-1 "action 1")
+                           ("j" my-action-2 "action 2")
+                           ("k" my-action-3 "action 3"))))
+
+   The number 1 above is the index of the default action.  Each action
+has its own string description for easy selection.
+
+* Menu:
+
+* Test the above function with ivy-occur::
+
+
+File: ivy.info,  Node: Test the above function with ivy-occur,  Up: Example - define a new command with several actions
+
+6.3.5.1 Test the above function with ‘ivy-occur’
+................................................
+
+To examine each action with each candidate in a key-efficient way, try:
+
+   • Call ‘my-command-with-3-actions’
+   • Press ‘C-c C-o’ to close the completion window and move to an
+     ‘ivy-occur’ buffer
+   • Press ‘kkk’ to move to the first candidate, since the point is most
+     likely at the end of the buffer
+   • Press ‘oo’ to call the first action
+   • Press ‘oj’ and ‘ok’ to call the second and third actions
+   • Press ‘j’ to move to the next candidate
+   • Press ‘oo’, ‘oj’, ‘ok’
+   • Press ‘j’ to move to the next candidate
+   • and so on...
+
+
+File: ivy.info,  Node: Packages,  Prev: Actions,  Up: Customization
+
+6.4 Packages
+============
+
+‘org-mode’
+..........
+
+     ‘org-mode’ versions 8.3.3 or later obey ‘completing-read-function’
+     (which ‘ivy-mode’ sets).  Try refiling headings with similar names
+     to appreciate ‘ivy-mode’.
+
+‘magit’
+.......
+
+     Uses Ivy by default if Ivy is installed.
+
+‘find-file-in-project’
+......................
+
+     Uses Ivy by default if Ivy is installed.
+
+‘projectile’
+............
+
+     Projectile requires this setting for Ivy completion:
+
+          (setopt projectile-completion-system 'ivy)
+
+‘helm-make’
+...........
+
+     Helm-make requires this setting for Ivy completion.
+
+          (setopt helm-make-completion-method 'ivy)
+
+automatically integrated packages
+.................................
+
+     Ivy reuses the following packages if they are installed: ‘avy’,
+     ‘amx’ or ‘smex’, ‘flx’, and ‘wgrep’.
+
+
+File: ivy.info,  Node: Commands,  Next: API,  Prev: Customization,  Up: Top
+
+7 Commands
+**********
+
+* Menu:
+
+* File Name Completion::
+* Buffer Name Completion::
+* Counsel commands::
+
+
+File: ivy.info,  Node: File Name Completion,  Next: Buffer Name Completion,  Up: Commands
+
+7.1 File Name Completion
+========================
+
+Since file name completion is ubiquitous, Ivy provides extra bindings
+that work here:
+
+‘C-j’ (‘ivy-alt-done’)
+......................
+
+     On a directory, restart completion from that directory.
+
+     On a file or ‘./’, exit completion with the selected candidate.
+
+‘DEL’ (‘ivy-backward-delete-char’)
+..................................
+
+     Restart the completion in the parent directory if current input is
+     empty.
+
+‘//’ (‘self-insert-command’)
+............................
+
+     Switch to the root directory.
+
+‘~’ (‘self-insert-command’)
+...........................
+
+     Switch to the home directory.
+
+‘/’ (‘self-insert-command’)
+...........................
+
+     If the current input matches an existing directory name exactly,
+     switch the completion to that directory.
+
+‘C-M-y’ (‘ivy-insert-current-full’)
+...................................
+
+     Insert the current full file name, in case you want to edit part of
+     it.
+
+‘M-r’ (‘ivy-toggle-regexp-quote’)
+.................................
+
+     Toggle between input as regexp or plain text.
+
+     This can help with matching file names literally, since they often
+     include ‘.’ in their name, which is a special character in regexp
+     mode.
+ -- User Option: ivy-extra-directories
+     Decide whether you want to see ‘../’ and ‘./’ during file name
+     completion.
+
+     Reason to remove: ‘../’ is the same as ‘DEL’.
+
+     Reason not to remove: navigate anywhere with only ‘C-n’, ‘C-p’ and
+     ‘C-j’.
+
+     Likewise, ‘./’ can be removed.
+
+History
+.......
+
+     File history works the same with ‘M-p’, ‘M-n’, and ‘C-r’, but uses
+     a custom code for file name completion that cycles through files
+     previously opened.  It also works with TRAMP files.
+
+* Menu:
+
+* Using TRAMP::
+
+
+File: ivy.info,  Node: Using TRAMP,  Up: File Name Completion
+
+7.1.1 Using TRAMP
+-----------------
+
+‘~’ (tilde)
+...........
+
+     Move to the home directory.  Either the local or the remote one,
+     depending on the current directory.  The boolean option
+     ‘ivy-magic-tilde’ decides whether the binding to do this is ‘~’ or
+     ‘~/’.
+
+‘//’ (double slash)
+...................
+
+     Move to the root directory.  Either the local or the remote one,
+     depending on the current directory.  Here, you can also select a
+     TRAMP connection method, such as ‘ssh’ or ‘scpx’.
+
+‘/ C-j’
+.......
+
+     Move to the local root directory.
+
+‘~~’
+....
+
+     Move to the local home directory.
+
+   From any directory, with the empty input, inserting ‘/ssh:’ and
+pressing ‘C-j’ (or ‘RET’, which is the same thing) completes host and
+user names.
+
+   For ‘/ssh:user@’ input, completes the domain name.
+
+   ‘C-i’ works in a similar way to the default completion.
+
+   You can also get sudo access for the current directory by inputting
+‘/sudo::’ ‘RET’.  Using ‘/sudo:’ (i.e.  single colon instead of double)
+will result in a completion session for the desired user.
+
+   Multi-hopping is possible, although a bit complex.
+
+Example : connect to a remote host ‘cloud’ and open a file with ‘sudo’ there
+............................................................................
+
+        • ‘C-x C-f’ ‘/ssh:cloud|sudo:root:/’.
+
+
+File: ivy.info,  Node: Buffer Name Completion,  Next: Counsel commands,  Prev: File Name Completion,  Up: Commands
+
+7.2 Buffer Name Completion
+==========================
+
+ -- User Option: ivy-use-virtual-buffers
+     When non-‘nil’, add ‘recentf-mode’ and bookmarks to
+     ‘ivy-switch-buffer’ completion candidates.
+
+     Adding this to the Emacs init file:
+
+          (setopt ivy-use-virtual-buffers t)
+     will add additional virtual buffers to the buffers list for recent
+     files.  Selecting such virtual buffers, which are highlighted with
+     ‘ivy-virtual’ face, will visit the corresponding file.
+
+
+File: ivy.info,  Node: Counsel commands,  Prev: Buffer Name Completion,  Up: Commands
+
+7.3 Counsel commands
+====================
+
+The main advantages of ‘counsel-’ functions over their basic equivalents
+in ‘ivy-mode’ are:
+
+  1. Multi-actions and non-exiting actions work.
+  2. ‘ivy-resume’ can resume the last completion session.
+  3. Customize ‘ivy-set-actions’, ‘ivy-re-builders-alist’.
+  4. Customize individual keymaps, such as ‘counsel-describe-map’,
+     ‘counsel-git-grep-map’, or ‘counsel-find-file-map’, instead of
+     customizing ‘ivy-minibuffer-map’ that applies to all completion
+     sessions.
+
+
+File: ivy.info,  Node: API,  Next: Variable Index,  Prev: Commands,  Up: Top
+
+8 API
+*****
+
+The main (and only) entry point is the ‘ivy-read’ function.  It takes
+two required arguments and many optional keyword arguments.  The
+optional ‘:action’ argument is highly recommended for features such as
+multi-actions, non-exiting actions, ‘ivy-occur’ and ‘ivy-resume’.
+
+* Menu:
+
+* Required arguments for ivy-read::
+* Optional arguments for ivy-read::
+* Example - counsel-describe-function::
+* Example - counsel-locate::
+* Example - ivy-read-with-extra-properties::
+
+
+File: ivy.info,  Node: Required arguments for ivy-read,  Next: Optional arguments for ivy-read,  Up: API
+
+8.1 Required arguments for ‘ivy-read’
+=====================================
+
+‘prompt’
+........
+
+     A prompt string normally ending in a colon and a space.
+     ‘ivy-count-format’ is prepended to it during completion.
+
+‘collection’
+............
+
+     Either a list of strings, a function, an alist or a hash table.
+
+     If a function, then it has to be compatible with ‘all-completions’.
+
+
+File: ivy.info,  Node: Optional arguments for ivy-read,  Next: Example - counsel-describe-function,  Prev: Required arguments for ivy-read,  Up: API
+
+8.2 Optional arguments for ‘ivy-read’
+=====================================
+
+‘predicate’
+...........
+
+     Is a function to filter the initial collection.  It has to be
+     compatible with ‘all-completions’.  Tip: sometimes it can be
+     simpler to pre-filter the ‘collection’ argument itself, e.g.:
+     ‘(cl-remove-if-not predicate collection)’.
+
+‘require-match’
+...............
+
+     When set to a non-‘nil’ value, the input must match one of the
+     candidates.  Custom input is not accepted.
+
+‘initial-input’
+...............
+
+     This string argument is included for compatibility with
+     ‘completing-read’, which inserts it into the minibuffer.
+
+     It's recommended to use the ‘preselect’ argument instead of this.
+
+‘history’
+.........
+
+     Name of the symbol to store history.  See ‘completing-read’.
+
+‘preselect’
+...........
+
+     Determines which one of the candidates to initially select.
+
+     When set to an integer value, select the candidate with that index
+     value.
+
+     When set to any other non-‘nil’ value, select the first candidate
+     matching this value.  Comparison is first done with ‘equal’.  If
+     this fails, and when applicable, ‘preselect’ is interpreted as a
+     regular expression.
+
+     Every time the input becomes empty, the item corresponding to
+     ‘preselect’ is selected.
+
+‘keymap’
+........
+
+     A keymap to be composed with ‘ivy-minibuffer-map’.  This keymap has
+     priority over ‘ivy-minibuffer-map’ and can be modified at any later
+     stage.
+
+‘update-fn’
+...........
+
+     Is the function called each time the current candidate changes.
+     This function takes no arguments and is called in the minibuffer's
+     ‘post-command-hook’.  See ‘swiper’ for an example usage.
+
+‘sort’
+......
+
+     When non-‘nil’, use ‘ivy-sort-functions-alist’ to sort the
+     collection as long as the collection is not larger than
+     ‘ivy-sort-max-size’.
+
+‘action’
+........
+
+     Is the function to call after selection.  It takes a string
+     argument.
+
+‘unwind’
+........
+
+     Is the function to call before exiting completion.  It takes no
+     arguments.  This function is called even if the completion is
+     interrupted with ‘C-g’.  See ‘swiper’ for an example usage.
+
+‘re-builder’
+............
+
+     Is a function that takes a string and returns a valid regexp.  See
+     ‘Completion Styles’ for details.
+
+‘matcher’
+.........
+
+     Is a function that takes a regexp string and a list of strings and
+     returns a list of strings matching the regexp.  Any ordinary Emacs
+     matching function will suffice, yet finely tuned matching functions
+     can be used.  See ‘counsel-find-file’ for an example usage.
+
+‘dynamic-collection’
+....................
+
+     When non-‘nil’, ‘collection’ will be used to dynamically generate
+     the candidates each time the input changes, instead of being used
+     once statically with ‘all-completions’ to generate a list of
+     strings.  See ‘counsel-locate’ for an example usage.
+
+‘caller’
+........
+
+     Is a symbol that uniquely identifies the function that called
+     ‘ivy-read’, which may be useful for further customizations.
+
+
+File: ivy.info,  Node: Example - counsel-describe-function,  Next: Example - counsel-locate,  Prev: Optional arguments for ivy-read,  Up: API
+
+8.3 Example - ‘counsel-describe-function’
+=========================================
+
+This is a typical example of a function with a non-async collection,
+which is a collection where all the strings in the collection are known
+prior to any input from the user.
+
+   Only the first two arguments (along with ‘action’) are essential --
+the rest of the arguments are for fine-tuning, and could be omitted.
+
+   The ‘action’ argument could also be omitted -- but then ‘ivy-read’
+would do nothing except return the string result, which you could later
+use yourself.  However, it's recommended that you use the ‘action’
+argument.
+
+     (defun counsel-describe-function ()
+       "Forward to `describe-function'."
+       (interactive)
+       (ivy-read "Describe function: "
+                 (let (cands)
+                   (mapatoms
+                    (lambda (x)
+                      (when (fboundp x)
+                        (push (symbol-name x) cands))))
+                   cands)
+                 :keymap counsel-describe-map
+                 :preselect (ivy-thing-at-point)
+                 :history 'counsel-describe-symbol-history
+                 :require-match t
+                 :action (lambda (x)
+                           (describe-function (intern x)))
+                 :caller 'counsel-describe-function))
+
+   Here are the interesting features of the above function, in the order
+that they appear:
+
+   • The ‘prompt’ argument is a simple string ending in ": ".
+   • The ‘collection’ argument evaluates to a (large) list of strings.
+   • The ‘keymap’ argument is for a custom keymap to supplement
+     ‘ivy-minibuffer-map’.
+   • The ‘preselect’ is provided by ‘ivy-thing-at-point’, which returns
+     a symbol near point.  Ivy then selects the first candidate from the
+     collection that matches this symbol.  To select this preselected
+     candidate, a ‘RET’ will suffice.  No further user input is
+     necessary.
+   • The ‘history’ argument is for keeping the history of this command
+     separate from the common history in ‘ivy-history’.
+   • The ‘require-match’ is set to ‘t’ since it doesn't make sense to
+     call ‘describe-function’ on an uninterned symbol.
+   • The ‘action’ argument calls ‘describe-function’ on the interned
+     selected candidate.
+   • The ‘caller’ argument identifies this completion session.  This is
+     important because, with the collection being a list of strings and
+     not a function name, the only other way for ‘ivy-read’ to identify
+     "who's calling" and to apply the appropriate customizations is to
+     examine ‘this-command’.  But ‘this-command’ would be modified if
+     another command called ‘counsel-describe-function’.
+
+
+File: ivy.info,  Node: Example - counsel-locate,  Next: Example - ivy-read-with-extra-properties,  Prev: Example - counsel-describe-function,  Up: API
+
+8.4 Example - ‘counsel-locate’
+==============================
+
+This is a typical example of a function with an async collection.  Since
+the collection function cannot precompute all the locatable files in
+memory within reasonable limits (time or memory), it relies on user
+input to filter the universe of possible candidates to a manageable size
+while also continuing to search asynchronously for possible candidates.
+Both filtering and searching continue with each character change in the
+input with rapid updates to the displayed collection without idle
+waiting times.  This live update will continue as long as there are
+likely candidates.  Eventually updates to the minibuffer will stop after
+user input, filtering, and searching have exhausted looking for possible
+candidates.
+
+   Async collections suit long-running shell commands, such as ‘locate’.
+With each new input, a new process starts while the old process is
+killed.  The collection is refreshed anew with each new process.
+Meanwhile the user can provide more input characters (for further
+narrowing) or select a candidate from the visible collection.
+
+     (defun counsel-locate-function (str)
+       (or
+        (ivy-more-chars)
+        (progn
+          (counsel--async-command
+           (format "locate %s '%s'"
+                   (string-join counsel-locate-options " ")
+                   (counsel--elisp-to-pcre (ivy--regex str))))
+          '("" "working..."))))
+
+     ;;;###autoload
+     (defun counsel-locate (&optional initial-input)
+       "Call the \"locate\" shell command.
+     INITIAL-INPUT can be given as the initial minibuffer input."
+       (interactive)
+       (ivy-read "Locate: " #'counsel-locate-function
+                 :initial-input initial-input
+                 :dynamic-collection t
+                 :history 'counsel-locate-history
+                 :action (lambda (file)
+                           (when file
+                             (with-ivy-window
+                               (find-file file))))
+                 :unwind #'counsel-delete-process
+                 :caller 'counsel-locate))
+
+   Here are the interesting features of the above functions, in the
+order that they appear:
+
+   • ‘counsel-locate-function’ takes a string argument and returns a
+     list of strings.  Note that this is incompatible with
+     ‘all-completions’, but since we're not using that here, we might as
+     well use one argument instead of three.
+   • ‘ivy-more-chars’ is a simple function that returns, e.g., ‘'("2
+     chars more")’ asking the user for more input.
+   • ‘counsel--async-command’ is a very easy API simplification that
+     takes a single string argument suitable for
+     ‘shell-command-to-string’.  So you could prototype your function as
+     non-async using ‘shell-command-to-string’ and ‘split-string’ to
+     produce a collection, then decide that you want async and simply
+     swap in ‘counsel--async-command’.
+   • ‘counsel-locate’ is an interactive function with an optional
+     ‘initial-input’.
+   • ‘#'counsel-locate-function’ is passed as the ‘collection’ argument.
+   • ‘dynamic-collection’ is set to ‘t’, since this is an async
+     collection.
+   • ‘action’ argument uses the ‘with-ivy-window’ wrapper, since we want
+     to open the selected file in the same window from which
+     ‘counsel-locate’ was called.
+   • ‘unwind’ argument is set to ‘#'counsel-delete-process’: when we
+     press ‘C-g’ we want to kill the running process created by
+     ‘counsel--async-command’.
+   • ‘caller’ argument identifies this command for easier customization.
+
+
+File: ivy.info,  Node: Example - ivy-read-with-extra-properties,  Prev: Example - counsel-locate,  Up: API
+
+8.5 Example - ‘ivy-read-with-extra-properties’
+==============================================
+
+This is another example to show how to associate additional values with
+displayed candidate strings.
+
+     (defun find-candidates-function (str _pred _)
+       (let ((props '(1 2))
+             (strs '("foo" "foo2")))
+         (cl-mapcar (lambda (s p) (propertize s 'property p))
+                    strs
+                    props)))
+
+     (defun find-candidates ()
+       (interactive)
+       (ivy-read "Find symbols: "
+                 #'find-candidates-function
+                 :action (lambda (x)
+                           (message "Value: %s"
+                                    (get-text-property 0 'property x)))))
+
+   Here are the interesting features of the above function:
+
+   • ‘find-candidates-function’ builds up a list of strings and
+     associates "foo" with the value 1 and "foo2" with 2.
+   • ‘find-candidates’ is an interactive function.
+   • ‘#'find-candidates’ is passed as the ‘collection’ argument.
+   • ‘action’ gets passed the selected string with the associated value.
+     It then retrieves that value and displays it.
+
+
+File: ivy.info,  Node: Variable Index,  Next: Keystroke Index,  Prev: API,  Up: Top
+
+9 Variable Index
+****************
+
+[index]
+* Menu:
+
+* ivy-alt-done:                          Key bindings for single selection action then exit minibuffer.
+                                                               (line 30)
+* ivy-alt-done <1>:                      File Name Completion. (line 12)
+* ivy-avy:                               Key bindings for single selection action then exit minibuffer.
+                                                               (line 64)
+* ivy-backward-delete-char:              File Name Completion. (line 19)
+* ivy-call:                              Key bindings for multiple selections and actions keep minibuffer open.
+                                                               (line 19)
+* ivy-confirm-face:                      Faces.                (line 34)
+* ivy-count-format:                      Defcustoms.           (line  6)
+* ivy-current-match:                     Faces.                (line  9)
+* ivy-dispatching-call:                  Key bindings for multiple selections and actions keep minibuffer open.
+                                                               (line 29)
+* ivy-dispatching-done:                  Key bindings for single selection action then exit minibuffer.
+                                                               (line 24)
+* ivy-display-style:                     Defcustoms.           (line 24)
+* ivy-done:                              Key bindings for single selection action then exit minibuffer.
+                                                               (line 19)
+* ivy-extra-directories:                 File Name Completion. (line 52)
+* ivy-height:                            Key bindings for navigation.
+                                                               (line 21)
+* ivy-immediate-done:                    Key bindings for single selection action then exit minibuffer.
+                                                               (line 53)
+* ivy-insert-current:                    Key bindings that alter the minibuffer input.
+                                                               (line 23)
+* ivy-insert-current-full:               File Name Completion. (line 41)
+* ivy-kill-ring-save:                    Other key bindings.   (line  9)
+* ivy-match-required-face:               Faces.                (line 52)
+* ivy-minibuffer-grow:                   Hydra in the minibuffer.
+                                                               (line 45)
+* ivy-minibuffer-map:                    Minibuffer key bindings.
+                                                               (line  6)
+* ivy-minibuffer-match-face-1:           Faces.                (line 14)
+* ivy-minibuffer-match-face-2:           Faces.                (line 19)
+* ivy-minibuffer-match-face-3:           Faces.                (line 24)
+* ivy-minibuffer-match-face-4:           Faces.                (line 29)
+* ivy-minibuffer-shrink:                 Hydra in the minibuffer.
+                                                               (line 50)
+* ivy-modified-buffer:                   Faces.                (line 87)
+* ivy-modified-outside-buffer:           Faces.                (line 92)
+* ivy-next-action:                       Hydra in the minibuffer.
+                                                               (line 60)
+* ivy-next-history-element:              Key bindings that alter the minibuffer input.
+                                                               (line  9)
+* ivy-next-line-and-call:                Key bindings for multiple selections and actions keep minibuffer open.
+                                                               (line 39)
+* ivy-occur:                             Saving the current completion session to a buffer.
+                                                               (line  9)
+* ivy-occur-click:                       Saving the current completion session to a buffer.
+                                                               (line 21)
+* ivy-occur-dispatch:                    Saving the current completion session to a buffer.
+                                                               (line 41)
+* ivy-occur-press:                       Saving the current completion session to a buffer.
+                                                               (line 16)
+* ivy-occur-read-action:                 Saving the current completion session to a buffer.
+                                                               (line 36)
+* ivy-on-del-error-function:             Defcustoms.           (line 31)
+* ivy-partial-or-done:                   Key bindings for single selection action then exit minibuffer.
+                                                               (line 37)
+* ivy-prev-action:                       Hydra in the minibuffer.
+                                                               (line 55)
+* ivy-previous-history-element:          Key bindings that alter the minibuffer input.
+                                                               (line 18)
+* ivy-previous-line-and-call:            Key bindings for multiple selections and actions keep minibuffer open.
+                                                               (line 50)
+* ivy-read-action:                       Hydra in the minibuffer.
+                                                               (line 65)
+* ivy-remote:                            Faces.                (line 70)
+* ivy-restrict-to-matches:               Key bindings that alter the minibuffer input.
+                                                               (line 40)
+* ivy-resume:                            Key bindings for multiple selections and actions keep minibuffer open.
+                                                               (line 58)
+* ivy-reverse-i-search:                  Key bindings that alter the minibuffer input.
+                                                               (line 48)
+* ivy-rotate-preferred-builders:         Hydra in the minibuffer.
+                                                               (line 40)
+* ivy-subdir:                            Faces.                (line 65)
+* ivy-toggle-calling:                    Hydra in the minibuffer.
+                                                               (line 34)
+* ivy-toggle-case-fold:                  Hydra in the minibuffer.
+                                                               (line 70)
+* ivy-toggle-regexp-quote:               File Name Completion. (line 47)
+* ivy-use-virtual-buffers:               Buffer Name Completion.
+                                                               (line  6)
+* ivy-virtual:                           Faces.                (line 75)
+* ivy-wrap:                              Key bindings for navigation.
+                                                               (line 14)
+* ivy-yank-word:                         Key bindings that alter the minibuffer input.
+                                                               (line 32)
+
+
+File: ivy.info,  Node: Keystroke Index,  Prev: Variable Index,  Up: Top
+
+10 Keystroke Index
+******************
+
+[index]
+* Menu:
+
+* /:                                     File Name Completion. (line 35)
+* / C-j:                                 Using TRAMP.          (line 24)
+* //:                                    File Name Completion. (line 25)
+* // <1>:                                Using TRAMP.          (line 17)
+* <:                                     Hydra in the minibuffer.
+                                                               (line 50)
+* >:                                     Hydra in the minibuffer.
+                                                               (line 45)
+* ~:                                     File Name Completion. (line 30)
+* ~ <1>:                                 Using TRAMP.          (line  9)
+* ~~:                                    Using TRAMP.          (line 29)
+* a:                                     Hydra in the minibuffer.
+                                                               (line 65)
+* a <1>:                                 Saving the current completion session to a buffer.
+                                                               (line 36)
+* c:                                     Hydra in the minibuffer.
+                                                               (line 34)
+* C:                                     Hydra in the minibuffer.
+                                                               (line 70)
+* C-':                                   Key bindings for single selection action then exit minibuffer.
+                                                               (line 64)
+* C-c C-o:                               Saving the current completion session to a buffer.
+                                                               (line  9)
+* C-j:                                   Key bindings for single selection action then exit minibuffer.
+                                                               (line 30)
+* C-j <1>:                               File Name Completion. (line 12)
+* C-m:                                   Key bindings for single selection action then exit minibuffer.
+                                                               (line 19)
+* C-M-j:                                 Key bindings for single selection action then exit minibuffer.
+                                                               (line 53)
+* C-M-m:                                 Key bindings for multiple selections and actions keep minibuffer open.
+                                                               (line 19)
+* C-M-n:                                 Key bindings for multiple selections and actions keep minibuffer open.
+                                                               (line 39)
+* C-M-o:                                 Key bindings for multiple selections and actions keep minibuffer open.
+                                                               (line 29)
+* C-M-p:                                 Key bindings for multiple selections and actions keep minibuffer open.
+                                                               (line 50)
+* C-M-y:                                 File Name Completion. (line 41)
+* C-o:                                   Hydra in the minibuffer.
+                                                               (line  9)
+* C-r:                                   Key bindings that alter the minibuffer input.
+                                                               (line 48)
+* DEL:                                   File Name Completion. (line 19)
+* f:                                     Saving the current completion session to a buffer.
+                                                               (line 16)
+* j:                                     Saving the current completion session to a buffer.
+                                                               (line 26)
+* k:                                     Saving the current completion session to a buffer.
+                                                               (line 31)
+* M:                                     Hydra in the minibuffer.
+                                                               (line 40)
+* M-i:                                   Key bindings that alter the minibuffer input.
+                                                               (line 23)
+* M-j:                                   Key bindings that alter the minibuffer input.
+                                                               (line 32)
+* M-n:                                   Key bindings that alter the minibuffer input.
+                                                               (line  9)
+* M-o:                                   Key bindings for single selection action then exit minibuffer.
+                                                               (line 24)
+* M-p:                                   Key bindings that alter the minibuffer input.
+                                                               (line 18)
+* M-r:                                   File Name Completion. (line 47)
+* M-w:                                   Other key bindings.   (line  9)
+* mouse-1:                               Saving the current completion session to a buffer.
+                                                               (line 21)
+* o:                                     Saving the current completion session to a buffer.
+                                                               (line 41)
+* q:                                     Saving the current completion session to a buffer.
+                                                               (line 46)
+* RET:                                   Key bindings for single selection action then exit minibuffer.
+                                                               (line 19)
+* RET <1>:                               Saving the current completion session to a buffer.
+                                                               (line 16)
+* s:                                     Hydra in the minibuffer.
+                                                               (line 60)
+* S-SPC:                                 Key bindings that alter the minibuffer input.
+                                                               (line 40)
+* TAB:                                   Key bindings for single selection action then exit minibuffer.
+                                                               (line 37)
+* w:                                     Hydra in the minibuffer.
+                                                               (line 55)
+
+
+
+Tag Table:
+Node: Top1192
+Node: Introduction3101
+Node: Installation5616
+Node: Installing from Emacs Package Manager5988
+Node: Installing from the Git repository7235
+Node: Getting started8062
+Node: Basic customization8369
+Node: Key bindings8969
+Node: Global key bindings9161
+Node: Minibuffer key bindings11582
+Node: Key bindings for navigation12814
+Node: Key bindings for single selection action then exit minibuffer14021
+Node: Key bindings for multiple selections and actions keep minibuffer open16704
+Node: Key bindings that alter the minibuffer input19326
+Node: Other key bindings21275
+Node: Hydra in the minibuffer21653
+Node: Saving the current completion session to a buffer24071
+Node: Completion Styles25483
+Node: ivy--regex-plus27246
+Node: ivy--regex-ignore-order28733
+Node: ivy--regex-fuzzy29099
+Node: Customization29590
+Node: Faces29776
+Node: Defcustoms32214
+Node: Actions33554
+Node: What are actions?33880
+Node: How can different actions be called?34698
+Node: How to modify the actions list?35265
+Node: Example - add two actions to each command35925
+Node: How to undo adding the two actions36885
+Node: How to add actions to a specific command37339
+Node: Example - define a new command with several actions37755
+Node: Test the above function with ivy-occur38692
+Node: Packages39536
+Node: Commands40504
+Node: File Name Completion40689
+Node: Using TRAMP42698
+Node: Buffer Name Completion44195
+Node: Counsel commands44823
+Node: API45470
+Node: Required arguments for ivy-read46048
+Node: Optional arguments for ivy-read46567
+Node: Example - counsel-describe-function50015
+Node: Example - counsel-locate52960
+Node: Example - ivy-read-with-extra-properties56805
+Node: Variable Index58091
+Node: Keystroke Index65215
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich-autoloads.el b/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich-autoloads.el
new file mode 100644
index 0000000..182a860
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich-autoloads.el
@@ -0,0 +1,82 @@
+;;; ivy-rich-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from ivy-rich.el
+
+(defvar ivy-rich-mode nil "\
+Non-nil if Ivy-Rich mode is enabled.
+See the `ivy-rich-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 `ivy-rich-mode'.")
+(custom-autoload 'ivy-rich-mode "ivy-rich" nil)
+(autoload 'ivy-rich-mode "ivy-rich" "\
+Toggle ivy-rich mode globally.
+
+This is a global minor mode.  If called interactively, toggle the
+`Ivy-Rich mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='ivy-rich-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(autoload 'ivy-rich-reload "ivy-rich")
+(defvar ivy-rich-project-root-cache-mode nil "\
+Non-nil if Ivy-Rich-Project-Root-Cache mode is enabled.
+See the `ivy-rich-project-root-cache-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 `ivy-rich-project-root-cache-mode'.")
+(custom-autoload 'ivy-rich-project-root-cache-mode "ivy-rich" nil)
+(autoload 'ivy-rich-project-root-cache-mode "ivy-rich" "\
+Toggle ivy-rich-root-cache-mode globally.
+
+This is a global minor mode.  If called interactively, toggle the
+`Ivy-Rich-Project-Root-Cache mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='ivy-rich-project-root-cache-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "ivy-rich" '("ivy-rich-"))
+
+;;; End of scraped data
+
+(provide 'ivy-rich-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; ivy-rich-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich-pkg.el b/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich-pkg.el
new file mode 100644
index 0000000..9c3243a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich-pkg.el
@@ -0,0 +1,11 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "ivy-rich" "20230425.1422"
+  "More friendly display transformer for ivy."
+  '((emacs "25.1")
+    (ivy   "0.13.0"))
+  :url "https://github.com/Yevgnen/ivy-rich"
+  :commit "aff9b6bd53e0fdcf350ab83c90e64e651b47dba4"
+  :revdesc "aff9b6bd53e0"
+  :keywords '("convenience" "ivy")
+  :authors '(("Yevgnen Koh" . "wherejoystarts@gmail.com"))
+  :maintainers '(("Yevgnen Koh" . "wherejoystarts@gmail.com")))
diff --git a/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich.el b/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich.el
new file mode 100644
index 0000000..e03434a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich.el
@@ -0,0 +1,705 @@
+;;; ivy-rich.el --- More friendly display transformer for ivy -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2016 Yevgnen Koh
+
+;; Author: Yevgnen Koh <wherejoystarts@gmail.com>
+;; Homepage: https://github.com/Yevgnen/ivy-rich
+;; Package-Requires: ((emacs "25.1") (ivy "0.13.0"))
+;; Package-Version: 20230425.1422
+;; Package-Revision: aff9b6bd53e0
+;; Keywords: convenience, ivy
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.	 See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; More friendly interface (display transformer) for ivy.
+;; Usage:
+;; (require 'ivy-rich)
+;; (ivy-rich-mode 1)
+;;
+;; See documentation on https://github.com/yevgnen/ivy-rich.
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'ivy)
+(require 'subr-x)
+
+(eval-when-compile
+  (require 'package)
+  (require 'bookmark)
+  (require 'project))
+
+(declare-function projectile-project-name "ext:projectile")
+(declare-function projectile-project-p "ext:projectile")
+(declare-function projectile-project-root "ext:projectile")
+
+(defgroup ivy-rich nil
+  "More friendly interface (display transformer) for ivy."
+  :group 'ivy)
+
+(defcustom ivy-rich-display-transformers-list
+  '(ivy-switch-buffer
+    (:columns
+     ((ivy-switch-buffer-transformer (:width 0.35))
+      (ivy-rich-switch-buffer-size (:width 7))
+      (ivy-rich-switch-buffer-indicators (:width 4 :face error :align right))
+      (ivy-rich-switch-buffer-major-mode (:width 12 :face warning))
+      (ivy-rich-switch-buffer-project (:width 0.18 :face success))
+      (ivy-rich-switch-buffer-path (:width (lambda (x) (ivy-rich-switch-buffer-shorten-path x (ivy-rich-minibuffer-width 0.3))))))
+     :predicate
+     (lambda (cand) (get-buffer cand)))
+    counsel-find-file
+    (:columns
+     ((ivy-read-file-transformer)
+      (ivy-rich-counsel-find-file-truename (:face font-lock-doc-face))))
+    counsel-M-x
+    (:columns
+     ((counsel-M-x-transformer (:width 0.4))
+      (ivy-rich-counsel-function-docstring (:face font-lock-doc-face))))
+    counsel-describe-function
+    (:columns
+     ((counsel-describe-function-transformer (:width 0.4))
+      (ivy-rich-counsel-function-docstring (:face font-lock-doc-face))))
+    counsel-describe-variable
+    (:columns
+     ((counsel-describe-variable-transformer (:width 0.4))
+      (ivy-rich-counsel-variable-docstring (:face font-lock-doc-face))))
+    counsel-recentf
+    (:columns
+     ((ivy-rich-candidate (:width 0.8))
+      (ivy-rich-file-last-modified-time (:face font-lock-comment-face))))
+    counsel-bookmark
+    (:columns ((ivy-rich-candidate (:width 0.3))
+               (ivy-rich-bookmark-type)
+               (ivy-rich-bookmark-info)))
+    package-install
+    (:columns
+     ((ivy-rich-candidate (:width 30))
+      (ivy-rich-package-version (:width 16 :face font-lock-comment-face))
+      (ivy-rich-package-archive-summary (:width 7 :face font-lock-builtin-face))
+      (ivy-rich-package-install-summary (:face font-lock-doc-face)))))
+  "Definitions for ivy-rich transformers.
+
+The definitions should be in the following plist format
+
+'(CMD-1 TRANSFORM-PROPS-1
+  ...
+  CMD-N TRANSFORM-PROPS-N)
+
+A transformer named `ivy-rich--CMD-transformer' is built for each
+command CMD.
+
+CMD should be an ivy command, which is typically a return value
+of `ivy-read'.
+
+TRANSFORM-PROPS are properties for defining transformer in plist
+format, i.e.
+
+(:columns (COLUMN-FN1 (KEY1 VALUE1 KEY2 VALUE2 ...))
+                  (COLUMN-FN2 (KEY1 VALUE1 KEY2 VALUE2 ...))
+        :predicate PREDICATE-FN)
+
+COLUMN-FN is a function which takes the completion candidate as
+single argument and it should return a transformed string. This
+function should return an empty string \"\" instead of nil when
+the transformed string is empty.
+
+The KEY-VALUE pairs are custom properties in plist format for the
+corresponding column definition. Current supported keys are
+:width, :face and :align.
+
+A integer (or float) :width value indicates the max
+width (percentage) of current column. For better displaying, you
+should set :width to some reasonable values. If :width is a
+function, the transformed string is again passed to it and it
+should return a new string with properly processed width.
+
+:face is the face property for the column string. :align
+should be set to 'left (default if not given) or 'right to
+indicate where to pad extra spaces to the columns for alignment.
+
+The value of :delimiter should be a string for current
+transformer. If not given, the default is a single space.
+
+If :predicate is provide, it should be a function which takes the
+completion candidate as single argument. A candidate with nil
+predication will not be transformed.
+
+It is possible to set TRANSFORM-PROPS to a pre-defined
+transformer, e.g.
+
+(...
+counsel-M-x
+(:columns
+ ((counsel-M-x-transformer (:width 40))
+  (ivy-rich-counsel-function-docstring (:face font-lock-doc-face))))
+
+execute-extended-command		; reuse transformer built
+ivy-rich--counsel-M-x-transformer	; for `counsel-M-x'
+...)
+
+`execute-extended-command' is set to used `counsel-M-x''s
+transformer. This is useful if one want to reuse transformers
+without duplicating definitions.
+
+Note that you may need to disable and enable the `ivy-rich-mode'
+again to make this variable take effect.")
+
+;;; User convenience functions
+;; Helper functions for user profile configuration
+
+(defun ivy-rich-modify-column (cmd column attrs)
+  "Customize the CMD transformer's properties for a specific COLUMN.
+Each key-value pair in ATTRS is put into the property list for the column.
+Existing properties for the column are left unchanged.
+
+The COLUMN has to be exist. You can't modify a non-exist column
+because ivy-rich doesn't know how to order new columns.
+
+Usage:
+
+(ivy-rich-modify-column 'ivy-switch-buffer
+                        'ivy-rich-switch-buffer-major-mode
+                        '(:width 20 :face error))"
+  (if (cl-evenp (length attrs))
+      (let* ((trans (plist-get ivy-rich-display-transformers-list cmd))
+             (columns (plist-get trans :columns))
+             (props (cadr (assq column columns))))
+        (unless props
+          (error "Can not modify non-exist column"))
+        (while attrs
+          (setq props (plist-put props (pop attrs) (pop attrs))))
+        (setcdr (assq column columns) (list props))
+        (setq ivy-rich-display-transformers-list
+              (plist-put ivy-rich-display-transformers-list
+                         cmd
+                         (plist-put trans :columns columns)))
+        (ivy-rich-set-display-transformer nil))
+
+    (error "Column key-value attributes must be in pairs")))
+
+(defun ivy-rich-modify-columns (cmd column-list)
+  "Customize the CMD transformer's properties for a COLUMN-LIST.
+This is a convenience function that calls `ivy-rich-modify-column' for each item
+in COLUMN-LIST, allowing multiple columns to be modified for a transformer.
+Each item in COLUMN-LIST is a two-item list comprised of a column and list
+of attribute key-value pairs.
+
+Usage:
+
+(ivy-rich-modify-columns
+ 'ivy-switch-buffer
+ '((ivy-rich-switch-buffer-size (:align right))
+   (ivy-rich-switch-buffer-major-mode (:width 20 :face error))))"
+  (while column-list
+    (if-let ((column (caar column-list))
+             (attrs (cadar column-list)))
+        (prog1
+            (ivy-rich-modify-column cmd column attrs)
+          (setq column-list (cdr column-list)))
+      (error "Column/attributes are incorrectly specified"))))
+
+(defun ivy-rich-set-columns (cmd column-list)
+  "Set the CMD transformer's properties for a COLUMN-LIST.
+
+The :columns of the given command will be replaced by COLUMN-LIST.
+Each item in COLUMN-LIST is a two-item list comprised of a column and list
+of attribute key-value pairs.
+
+Usage:
+
+(ivy-rich-set-columns
+ 'counsel-recentf
+ '((file-name-nondirectory
+    (:width 0.2))
+   (ivy-rich-candidate
+    (:width 0.6))))"
+  (let* ((trans (plist-get ivy-rich-display-transformers-list cmd)))
+    (setq ivy-rich-display-transformers-list
+          (plist-put ivy-rich-display-transformers-list
+                     cmd
+                     (plist-put trans :columns column-list)))
+    (ivy-rich-set-display-transformer nil)))
+
+;; Common Functions ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(defalias 'ivy-rich-candidate 'identity)
+
+(defun ivy-rich-empty-p (str)
+  (or (null str)
+      (string-empty-p (string-trim str))))
+
+(defun ivy-rich-normalize-width (str len &optional right-aligned)
+  "Normalize the width of a string.
+
+If the length of STR is smaller than LEN, the string is padded to
+right aligned if RIGHT-ALIGNED is not nil and is padded to left
+otherwise.
+
+If the lenght of STR is larger that LEN, the string is truncated
+using …."
+  (let ((str-len (string-width str)))
+    (cond ((< str-len len)
+           (if right-aligned
+               (concat (make-string (- len str-len) ? ) str)
+             (concat str (make-string (- len str-len) ? ))))
+          ((<= len (- str-len)) "")
+          ((> str-len len)
+           (truncate-string-to-width str len 0 nil "…"))
+          (t str))))
+
+(defun ivy-rich-minibuffer-width (width)
+  (cond ((and (integerp width)
+              (> width 0))
+         width)
+        ((and (floatp width)
+              (> width 0.0)
+              (<= width 1.0))
+         (floor (* (window-width (minibuffer-window)) width)))
+        (t (user-error "Width should be positive integer or float int (0.0, 1.0]"))))
+
+;; Supports for `ivy-switch-buffer' ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(defcustom ivy-rich-path-style
+  'relative
+  "File path style.
+
+When set to 'full or 'absolute, absolute path will be used.
+When set to 'abbrev or 'abbreviate, abbreviated will be used. This
+may not affect remote files since `abbreviate-file-name' does not
+take care of them.
+When set to 'relative or any other value, path relative to project
+home will be used."
+  :type 'symbol)
+
+(defcustom ivy-rich-parse-remote-buffer
+  t
+  "Whether to parse remote files.
+
+When `nil', only basic info of remote buffers, like buffer size,
+major mode, etc. will be parsed, otherwise, all info inculding
+project details, file path will be parsed.
+
+If you have performance issue when accessing tramp files, set
+this to `nil'."
+  :type 'boolean)
+
+(defcustom ivy-rich-parse-remote-file-path
+  nil
+  "Whether `ivy-rich-path-style' should take care of remote file.
+
+When `nil', always show absolute path of remote files,
+otherwise, treat remote files as local files.
+
+Sometimes when you are editing files with same names and same
+directory structures in local and remote machines, setting this
+option to `nil' would make the candidates easier to be
+distinguished.
+
+Note that this variable takes effect only when
+`ivy-rich-parse-remote-buffer' is set to `t'."
+  :type 'boolean)
+
+(defun ivy-rich-switch-buffer-user-buffer-p (buffer)
+  "Check whether BUFFER-NAME is a user buffer."
+  (let ((buffer-name
+         (if (stringp buffer)
+             buffer
+           (buffer-name buffer))))
+    (not (string-match "^\\*" buffer-name))))
+
+(defun ivy-rich-switch-buffer-shorten-path (file len)
+  "Shorten the path of FILE until the length of FILE <= LEN.
+
+For example, a path /a/b/c/d/e/f.el will be shortened to
+   /a/…/c/d/e/f.el
+or /a/…/d/e/f.el
+or /a/…/e/f.el
+or /a/…/f.el."
+  (if (> (length file) len)
+      (let ((new-file (replace-regexp-in-string "/?.+?/\\(\\(…/\\)?.+?\\)/.*" "…" file nil nil 1)))
+        (if (string= new-file file)
+            file
+          (ivy-rich-switch-buffer-shorten-path new-file len)))
+    file))
+
+(defun ivy-rich--local-values (buffer args)
+  (let ((buffer (get-buffer buffer)))
+    (if (listp args)
+        (mapcar #'(lambda (x) (buffer-local-value x buffer)) args)
+      (buffer-local-value args buffer))))
+
+(defun ivy-rich-switch-buffer-buffer-name (candidate)
+  candidate)
+
+(defun ivy-rich-switch-buffer-indicators (candidate)
+  (let* ((buffer (get-buffer candidate))
+         (process-p (get-buffer-process buffer)))
+    (cl-destructuring-bind
+        (filename directory read-only)
+        (ivy-rich--local-values candidate '(buffer-file-name default-directory buffer-read-only))
+      (let ((modified (if (and (buffer-modified-p buffer)
+                               (null process-p)
+                               (ivy-rich-switch-buffer-user-buffer-p candidate))
+                          "*"
+                        ""))
+            (readonly (if (and read-only (ivy-rich-switch-buffer-user-buffer-p candidate))
+                          "!"
+                        ""))
+            (process (if process-p
+                         "&"
+                       ""))
+            (remote (if (file-remote-p (or filename directory))
+                        "@"
+                      "")))
+        (format "%s%s%s%s" remote readonly modified process)))))
+
+(defun ivy-rich-switch-buffer-size (candidate)
+  (with-current-buffer
+      (get-buffer candidate)
+    (let ((size (buffer-size)))
+      (cond
+       ((> size 1000000) (format "%.1fM " (/ size 1000000.0)))
+       ((> size 1000) (format "%.1fk " (/ size 1000.0)))
+       (t (format "%d " size))))))
+
+(defun ivy-rich-switch-buffer-major-mode (candidate)
+  (capitalize
+   (replace-regexp-in-string
+    "-"
+    " "
+    (replace-regexp-in-string
+     "-mode"
+     ""
+     (symbol-name (ivy-rich--local-values candidate 'major-mode))))))
+
+(defun ivy-rich--switch-buffer-directory (candidate)
+      "Return directory of file visited by buffer named CANDIDATE, or nil if no file."
+      (let* ((buffer (get-buffer candidate))
+             (fn (buffer-file-name buffer)))
+        ;; if valid filename, i.e. buffer visiting file:
+        (if fn
+            ;; return containing directory
+            (file-name-directory fn)
+          ;; else if mode explicitly offering list-buffers-directory, return that; else nil.
+          ;; buffers that don't explicitly visit files, but would like to show a filename,
+          ;; e.g. magit or dired, set the list-buffers-directory variable
+          (buffer-local-value 'list-buffers-directory buffer))))
+
+(defvar ivy-rich--project-root-cache
+  (make-hash-table :test 'equal)
+  "Hash-table caching each file's project for
+`ivy-rich-switch-buffer-root'.
+
+The cache can is enabled when `ivy-rich-project-root-cache-mode'
+is enabled and cleared when the mode is disabled. Additionally,
+buffers are removed from the cached when killd.
+
+The cache can be cleared manually by calling
+`ivy-rich-clear-project-root-cache'.")
+
+(defun ivy-rich-clear-project-root-cache ()
+  "Resets `ivy-rich--project-root-cache'."
+  (interactive)
+  (clrhash ivy-rich--project-root-cache))
+
+(defun ivy-rich-switch-buffer-root-lookup (candidate dir)
+  (unless (or (and (file-remote-p dir)
+                     (not ivy-rich-parse-remote-buffer))
+                ;; Workaround for `browse-url-emacs' buffers , it changes
+                ;; `default-directory' to "http://" (#25)
+                (string-match "https?://" dir))
+      (cond ((bound-and-true-p projectile-mode)
+             (let ((project (or (ivy-rich--local-values
+                                 candidate 'projectile-project-root)
+                                (projectile-project-root dir))))
+               (unless (string= project "-")
+                 project)))
+            ((require 'find-file-in-project nil t)
+             (let ((default-directory dir))
+               (ffip-project-root)))
+            ((require 'project nil t)
+             (when-let ((project (project-current nil dir)))
+               (car (project-roots project)))))))
+
+(defun ivy-rich-switch-buffer-root (candidate)
+  (when-let ((dir (ivy-rich--switch-buffer-directory candidate)))
+    (let ((cached-value (if ivy-rich-project-root-cache-mode
+                            (gethash dir ivy-rich--project-root-cache 'not-found)
+                          'not-found)))
+      (if (not (eq cached-value 'not-found))
+          cached-value
+        (let ((value (ivy-rich-switch-buffer-root-lookup candidate dir)))
+          (when ivy-rich-project-root-cache-mode
+            (puthash dir value ivy-rich--project-root-cache))
+          value)))))
+
+(defun ivy-rich-project-root-cache-kill-buffer-hook ()
+  "This hook is used to remove buffer from
+`ivy-rich--project-root-cache' when they are killed."
+  (remhash (ivy-rich--switch-buffer-directory
+            (buffer-name (current-buffer)))
+           ivy-rich--project-root-cache))
+
+(defun ivy-rich-switch-buffer-project (candidate)
+  (file-name-nondirectory
+   (directory-file-name
+    (or (ivy-rich-switch-buffer-root candidate) ""))))
+
+(defun ivy-rich--switch-buffer-root-and-filename (candidate)
+  (when-let ((root (ivy-rich-switch-buffer-root candidate))
+             (dir (ivy-rich--switch-buffer-directory candidate)))
+    (when (bound-and-true-p projectile-mode)
+      (setq dir (or (file-name-directory
+                     (or (ivy-rich--local-values
+                          candidate 'buffer-file-truename)
+                         ""))
+                    (file-truename dir))))
+    (cons (expand-file-name root) (expand-file-name dir))))
+
+(defun ivy-rich-switch-buffer-path (candidate)
+  (if-let ((result (ivy-rich--switch-buffer-root-and-filename candidate)))
+      (cl-destructuring-bind (root . filename) result
+        (cond
+         ;; Case: absolute
+         ((or (memq ivy-rich-path-style '(full absolute))
+              (and (null ivy-rich-parse-remote-file-path)
+                   (or (file-remote-p root))))
+          (or filename root))
+         ;; Case: abbreviate
+         ((memq ivy-rich-path-style '(abbreviate abbrev))
+          (abbreviate-file-name (or filename root)))
+         ;; Case: relative
+         ((or (eq ivy-rich-path-style 'relative)
+              t)	    ; make 'relative default
+          (if (and filename root)
+              (let ((relative-path (string-remove-prefix root filename)))
+                (if (string= relative-path candidate)
+                    (file-name-as-directory
+                     (file-name-nondirectory
+                      (directory-file-name (file-name-directory filename))))
+                  relative-path))
+            ""))))
+    ""))
+
+
+;; Supports for `counsel-find-file'
+(defun ivy-rich-counsel-find-file-truename (candidate)
+  (let ((type (car (ignore-errors (file-attributes (directory-file-name (expand-file-name candidate ivy--directory)))))))
+    (if (stringp type)
+        (concat "-> " (expand-file-name type ivy--directory))
+      "")))
+
+;; Supports for `counsel-M-x', `counsel-describe-function', `counsel-describe-variable'
+(defun ivy-rich-counsel-function-docstring (candidate)
+  (let* (
+         ;; Stole from:
+         ;; https://github.com/minad/marginalia/blob/51f750994aaa0b6798d97366acfb0d397639af66/marginalia.el#L355
+         (regex (rx bos
+                    (1+ (seq (? "This function has ")
+                             (or ":before" ":after" ":around" ":override"
+                                 ":before-while" ":before-until" ":after-while"
+                                 ":after-until" ":filter-args" ":filter-return")
+                             " advice: " (0+ nonl) "\n"))
+                    "\n"))
+         (doc (replace-regexp-in-string
+               regex
+               ""
+               (or (ignore-errors (documentation (intern-soft candidate))) ""))))
+    (if (string-match "^\\(.+\\)\\([\r\n]\\)?" doc)
+        (setq doc (match-string 1 doc))
+      "")))
+
+(defun ivy-rich-counsel-variable-docstring (candidate)
+  (let ((doc (documentation-property
+              (intern-soft candidate) 'variable-documentation)))
+    (if (and doc (string-match "^\\(.+\\)\\([\r\n]\\)?" doc))
+        (setq doc (match-string 1 doc))
+      "")))
+
+;; Supports for `counsel-recentf'
+(defun ivy-rich-file-last-modified-time (candidate)
+  (let ((candidate (expand-file-name candidate ivy--directory)))
+    (if (file-remote-p candidate)
+        "?"
+      (format-time-string "%Y-%m-%d %H:%M:%S" (nth 5 (file-attributes candidate))))))
+
+;; Supports for `counsel-bookmark'
+(defun ivy-rich-bookmark-value (candidate key)
+  (cdr (assoc key (cdr (assoc candidate bookmark-alist)))))
+
+(defun ivy-rich-bookmark-filename (candidate)
+  (ivy-rich-bookmark-value candidate 'filename))
+
+(defun ivy-rich-bookmark-handler-props (candidate)
+  (let ((handler (ivy-rich-bookmark-value candidate 'handler)))
+    (unless (null handler)
+      (list (upcase (car (cl-remove-if (lambda (x)
+                                         (or (string= "bookmark" x)
+                                             (string= "jump" x)))
+                                       (split-string (symbol-name handler) "-"))))
+            'font-lock-keyword-face))))
+
+(defun ivy-rich-bookmark-propertize-type (string face)
+  (propertize (format "%-8.8s" string) 'face face))
+
+(defun ivy-rich-bookmark-type (candidate)
+  (let ((filename (ivy-rich-bookmark-filename candidate)))
+    (apply #'ivy-rich-bookmark-propertize-type
+           (cond ((null filename) (or (ivy-rich-bookmark-handler-props candidate)
+                                      '("NOFILE" warning)))
+                 ((file-remote-p filename) '("REMOTE" mode-line-buffer-id))
+                 ((not (file-exists-p filename)) (or (ivy-rich-bookmark-handler-props candidate)
+                                                     '("NOTFOUND" error)))
+                 ((file-directory-p filename) '("DIRED" warning))
+                 (t '("FILE" success))))))
+
+(defun ivy-rich-bookmark-info (candidate)
+  (let ((filename (ivy-rich-bookmark-filename candidate)))
+    (cond (filename
+           (cond ((null filename)
+                  "")
+                 ((file-remote-p filename)
+                  candidate)
+                 ((file-exists-p filename)
+                  (file-truename filename))
+                 (t filename))))))
+
+;; Supports for `counsel-projectile'
+;; Possible setup:
+;; counsel-projectile-switch-project
+;; (:columns
+;;  ((ivy-rich-counsel-projectile-switch-project-project-name (:width 30 :face success))
+;;   (ivy-rich-candidate)))
+(defun ivy-rich-counsel-projectile-switch-project-project-name (candidate)
+  (or (projectile-project-name candidate) ""))
+
+;; Supports for `package-install'
+(defun ivy-rich-package-install-summary (candidate)
+  (let ((package-desc (cadr (assoc-string candidate package-archive-contents))))
+    (if package-desc (package-desc-summary package-desc) "")))
+
+(defun ivy-rich-package-archive-summary (candidate)
+  (let ((package-arch (cadr (assoc-string candidate package-archive-contents))))
+    (if package-arch (package-desc-archive package-arch) "")))
+
+(defun ivy-rich-package-version (candidate)
+  (let ((package-vers (cadr (assoc-string candidate package-archive-contents))))
+    (if package-vers (package-version-join (package-desc-version package-vers)) "")))
+
+;; Definition of `ivy-rich-mode' ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(defvar ivy-rich--original-display-transformers-list nil)  ; Backup list
+
+(defun ivy-rich-format-column (candidate column)
+  (let* ((fn (car column))
+         (props (cadr column))
+         (width (plist-get props :width))
+         (align (plist-get props :align))
+         (face (plist-get props :face))
+         (formated (funcall fn candidate)))
+    (when width
+      (if (functionp width)
+          (setq formated (funcall width formated))
+        (if (floatp width)
+            (setq width (floor (* (window-width (minibuffer-window)) width))))
+        (setq formated (ivy-rich-normalize-width formated width (eq align 'right)))))
+    (if face
+        (setq formated (propertize formated 'face face)))
+    formated))
+
+(defun ivy-rich-format (candidate columns &optional delimiter)
+  (mapconcat
+   (lambda (column)
+     (or (ivy-rich-format-column candidate column) ""))
+   columns
+   delimiter))
+
+(defun ivy-rich-backup-transformer (cmd)
+  (setq ivy-rich--original-display-transformers-list
+        (plist-put ivy-rich--original-display-transformers-list
+                   cmd
+                   (alist-get cmd ivy--display-transformers-alist))))
+
+(defun ivy-rich-restore-transformer (cmd)
+  (setq ivy--display-transformers-alist
+        (ivy--alist-set 'ivy--display-transformers-alist
+                        cmd
+                        (plist-get ivy-rich--original-display-transformers-list cmd))))
+
+(defun ivy-rich-build-transformer (cmd transformer-props)
+  (if (functionp transformer-props)
+      transformer-props
+    (defalias (intern (format "ivy-rich--%s-transformer" (symbol-name cmd)))
+      (lambda  (candidate)
+        (let ((columns (plist-get transformer-props :columns))
+              (predicate-fn (or (plist-get transformer-props :predicate) (lambda (_) t)))
+              (delimiter (or (plist-get transformer-props :delimiter) " ")))
+          (if (and predicate-fn
+                   (not (funcall predicate-fn candidate)))
+              candidate
+            (ivy-rich-format candidate columns delimiter)))))))
+
+(defun ivy-rich-set-display-transformer (backup)
+  (cl-loop for (cmd transformer-props) on ivy-rich-display-transformers-list by 'cddr do
+           (let* ((cmd-string (symbol-name cmd))
+                  (package (if (string-match "^\\(swiper\\|counsel\\)" cmd-string)
+                               (match-string 1 cmd-string))))
+             (if package
+                 (require (intern package)))  ; NOTE: Need to load the original transformer
+             (if backup
+                 (ivy-rich-backup-transformer cmd))
+             (ivy-set-display-transformer cmd (ivy-rich-build-transformer cmd transformer-props)))))
+
+(defun ivy-rich-unset-display-transformer ()
+  (cl-loop for (cmd _transformer-fn) on ivy-rich--original-display-transformers-list by 'cddr do
+           (ivy-rich-restore-transformer cmd))
+  (setq ivy-rich--original-display-transformers-list nil))
+
+(defun ivy-rich-setup-project-root-cache-mode ()
+  (add-hook 'kill-buffer-hook 'ivy-rich-project-root-cache-kill-buffer-hook))
+
+(defun ivy-rich-cleanup-project-root-cache-mode ()
+  (ivy-rich-clear-project-root-cache)
+  (remove-hook 'kill-buffer-hook 'ivy-rich-project-root-cache-kill-buffer-hook))
+
+;;;###autoload
+(define-minor-mode ivy-rich-mode
+  "Toggle ivy-rich mode globally."
+  :global t
+  (if ivy-rich-mode
+      (unless ivy-rich--original-display-transformers-list
+        (ivy-rich-set-display-transformer 'backup))
+    (ivy-rich-unset-display-transformer)))
+
+;;;###autoload
+(defun ivy-rich-reload ()
+  (when ivy-rich-mode
+    (ivy-rich-mode -1)
+    (ivy-rich-mode 1)))
+
+;;;###autoload
+(define-minor-mode ivy-rich-project-root-cache-mode
+  "Toggle ivy-rich-root-cache-mode globally."
+  :global t
+  (if ivy-rich-project-root-cache-mode
+      (ivy-rich-setup-project-root-cache-mode)
+    (ivy-rich-cleanup-project-root-cache-mode)))
+
+(provide 'ivy-rich)
+
+;;; ivy-rich.el ends here
+
+;; Local Variables:
+;; indent-tabs-mode: nil
+;; End:
diff --git a/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich.elc b/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich.elc
new file mode 100644
index 0000000..f2357b5
Binary files /dev/null and b/emacs/.emacs.d/elpa/ivy-rich-20230425.1422/ivy-rich.elc differ
diff --git a/emacs/.emacs.d/elpa/llama-20260601.1455/.dir-locals.el b/emacs/.emacs.d/elpa/llama-20260601.1455/.dir-locals.el
new file mode 100644
index 0000000..f1fff94
--- /dev/null
+++ b/emacs/.emacs.d/elpa/llama-20260601.1455/.dir-locals.el
@@ -0,0 +1,8 @@
+((nil
+  (indent-tabs-mode . nil))
+ (emacs-lisp-mode
+  (lisp-indent-local-overrides . ((cond . 0) (interactive . 0))))
+ (makefile-mode
+  (indent-tabs-mode . t))
+ (git-commit-mode
+  (git-commit-major-mode . git-commit-elisp-text-mode)))
diff --git a/emacs/.emacs.d/elpa/llama-20260601.1455/llama-autoloads.el b/emacs/.emacs.d/elpa/llama-20260601.1455/llama-autoloads.el
new file mode 100644
index 0000000..2953762
--- /dev/null
+++ b/emacs/.emacs.d/elpa/llama-20260601.1455/llama-autoloads.el
@@ -0,0 +1,112 @@
+;;; llama-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from llama.el
+
+(autoload 'llama "llama" "\
+Expand to a `lambda' expression that wraps around FN and BODY.
+
+This macro provides a compact way to write short `lambda' expressions.
+It expands to a `lambda' expression, which calls the function FN with
+arguments BODY and returns its value.  The arguments of the `lambda'
+expression are derived from symbols found in BODY.
+
+Each symbol from `%1' through `%9', which appears in an unquoted part
+of BODY, specifies a mandatory argument.  Each symbol from `&1' through
+`&9', which appears in an unquoted part of BODY, specifies an optional
+argument.  The symbol `&*' specifies extra (`&rest') arguments.
+
+The shorter symbol `%' can be used instead of `%1', but using both in
+the same expression is not allowed.  Likewise `&' can be used instead
+of `&1'.  These shorthands are not recognized in function position.
+
+To support binding forms that use a vector as VARLIST (such as `-let'
+from the `dash' package), argument symbols are also detected inside of
+vectors.
+
+The space between `##' and FN can be omitted because `##' is read-syntax
+for the symbol whose name is the empty string.  If you prefer you can
+place a space there anyway, and if you prefer to not use this somewhat
+magical symbol at all, you can instead use the alternative name `llama'.
+
+Instead of:
+
+  (lambda (a &optional _ c &rest d)
+    (foo a (bar c) d))
+
+you can use this macro and write:
+
+  (##foo %1 (bar &3) &*)
+
+which expands to:
+
+  (lambda (%1 &optional _&2 &3 &rest &*)
+    (foo %1 (bar &3) &*))
+
+Unused trailing arguments and mandatory unused arguments at the border
+between mandatory and optional arguments are also supported:
+
+  (##list %1 _%3 &5 _&6)
+
+becomes:
+
+  (lambda (%1 _%2 _%3 &optional _&4 &5 _&6)
+    (list %1 &5))
+
+Note how `_%3' and `_&6' are removed from the body, because their names
+begin with an underscore.  Also note that `_&4' is optional, unlike the
+explicitly specified `_%3'.
+
+Consider enabling `llama-fontify-mode' to highlight `##' and its
+special arguments.
+
+(fn FN &rest BODY)" nil t)
+(defvar llama-fontify-mode nil "\
+Non-nil if Llama-Fontify mode is enabled.
+See the `llama-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 `llama-fontify-mode'.")
+(custom-autoload 'llama-fontify-mode "llama" nil)
+(autoload 'llama-fontify-mode "llama" "\
+In Emacs Lisp mode, highlight the `##' macro and its special arguments.
+
+This is a global minor mode.  If called interactively, toggle the
+`Llama-Fontify mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='llama-fontify-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "llama" '("\\#\\#" "all-completions" "elisp-" "intern" "lisp--el-match-keyword@llama" "llama-"))
+
+;;; End of scraped data
+
+(provide 'llama-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; llama-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/llama-20260601.1455/llama-pkg.el b/emacs/.emacs.d/elpa/llama-20260601.1455/llama-pkg.el
new file mode 100644
index 0000000..31b7899
--- /dev/null
+++ b/emacs/.emacs.d/elpa/llama-20260601.1455/llama-pkg.el
@@ -0,0 +1,11 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "llama" "20260601.1455"
+  "Compact syntax for short lambda."
+  '((emacs  "26.1")
+    (compat "31.0"))
+  :url "https://github.com/tarsius/llama"
+  :commit "4d4024048053b898a01521046e0f063ee47615b0"
+  :revdesc "4d4024048053"
+  :keywords '("extensions")
+  :authors '(("Jonas Bernoulli" . "emacs.llama@jonas.bernoulli.dev"))
+  :maintainers '(("Jonas Bernoulli" . "emacs.llama@jonas.bernoulli.dev")))
diff --git a/emacs/.emacs.d/elpa/llama-20260601.1455/llama.el b/emacs/.emacs.d/elpa/llama-20260601.1455/llama.el
new file mode 100644
index 0000000..653579b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/llama-20260601.1455/llama.el
@@ -0,0 +1,573 @@
+;;; llama.el --- Compact syntax for short lambda  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2020-2026 Jonas Bernoulli
+
+;; Author: Jonas Bernoulli <emacs.llama@jonas.bernoulli.dev>
+;; Homepage: https://github.com/tarsius/llama
+;; Keywords: extensions
+
+;; Package-Version: 20260601.1455
+;; Package-Revision: 4d4024048053
+;; Package-Requires: (
+;;     (emacs  "26.1")
+;;     (compat "31.0"))
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This package implements a macro named `##', which provides a compact way
+;; to write short `lambda' expressions.
+
+;; The signature of the macro is (## FN &rest BODY) and it expands to a
+;; `lambda' expression, which calls the function FN with the arguments BODY
+;; and returns the value of that.  The arguments of the `lambda' expression
+;; are derived from symbols found in BODY.
+
+;; Each symbol from `%1' through `%9', which appears in an unquoted part
+;; of BODY, specifies a mandatory argument.  Each symbol from `&1' through
+;; `&9', which appears in an unquoted part of BODY, specifies an optional
+;; argument.  The symbol `&*' specifies extra (`&rest') arguments.
+
+;; The shorter symbol `%' can be used instead of `%1', but using both in
+;; the same expression is not allowed.  Likewise `&' can be used instead
+;; of `&1'.  These shorthands are not recognized in function position.
+
+;; To support binding forms that use a vector as VARLIST (such as `-let'
+;; from the `dash' package), argument symbols are also detected inside of
+;; vectors.
+
+;; The space between `##' and FN can be omitted because `##' is read-syntax
+;; for the symbol whose name is the empty string.  If you prefer you can
+;; place a space there anyway, and if you prefer to not use this somewhat
+;; magical symbol at all, you can instead use the alternative name `llama'.
+
+;; Instead of:
+;;
+;;   (lambda (a &optional _ c &rest d)
+;;     (foo a (bar c) d))
+;;
+;; you can use this macro and write:
+;;
+;;   (##foo %1 (bar &3) &*)
+;;
+;; which expands to:
+;;
+;;   (lambda (%1 &optional _&2 &3 &rest &*)
+;;     (foo %1 (bar &3) &*))
+
+;; Unused trailing arguments and mandatory unused arguments at the border
+;; between mandatory and optional arguments are also supported:
+;;
+;;   (##list %1 _%3 &5 _&6)
+;;
+;; becomes:
+;;
+;;   (lambda (%1 _%2 _%3 &optional _&4 &5 _&6)
+;;     (list %1 &5))
+;;
+;; Note how `_%3' and `_&6' are removed from the body, because their names
+;; begin with an underscore.  Also note that `_&4' is optional, unlike the
+;; explicitly specified `_%3'.
+
+;; Consider enabling `llama-fontify-mode' to highlight `##' and its
+;; special arguments.
+
+;;; Code:
+
+(require 'compat)
+
+;;;###autoload
+(defmacro llama (fn &rest body)
+  "Expand to a `lambda' expression that wraps around FN and BODY.
+
+This macro provides a compact way to write short `lambda' expressions.
+It expands to a `lambda' expression, which calls the function FN with
+arguments BODY and returns its value.  The arguments of the `lambda'
+expression are derived from symbols found in BODY.
+
+Each symbol from `%1' through `%9', which appears in an unquoted part
+of BODY, specifies a mandatory argument.  Each symbol from `&1' through
+`&9', which appears in an unquoted part of BODY, specifies an optional
+argument.  The symbol `&*' specifies extra (`&rest') arguments.
+
+The shorter symbol `%' can be used instead of `%1', but using both in
+the same expression is not allowed.  Likewise `&' can be used instead
+of `&1'.  These shorthands are not recognized in function position.
+
+To support binding forms that use a vector as VARLIST (such as `-let'
+from the `dash' package), argument symbols are also detected inside of
+vectors.
+
+The space between `##' and FN can be omitted because `##' is read-syntax
+for the symbol whose name is the empty string.  If you prefer you can
+place a space there anyway, and if you prefer to not use this somewhat
+magical symbol at all, you can instead use the alternative name `llama'.
+
+Instead of:
+
+  (lambda (a &optional _ c &rest d)
+    (foo a (bar c) d))
+
+you can use this macro and write:
+
+  (##foo %1 (bar &3) &*)
+
+which expands to:
+
+  (lambda (%1 &optional _&2 &3 &rest &*)
+    (foo %1 (bar &3) &*))
+
+Unused trailing arguments and mandatory unused arguments at the border
+between mandatory and optional arguments are also supported:
+
+  (##list %1 _%3 &5 _&6)
+
+becomes:
+
+  (lambda (%1 _%2 _%3 &optional _&4 &5 _&6)
+    (list %1 &5))
+
+Note how `_%3' and `_&6' are removed from the body, because their names
+begin with an underscore.  Also note that `_&4' is optional, unlike the
+explicitly specified `_%3'.
+
+Consider enabling `llama-fontify-mode' to highlight `##' and its
+special arguments."
+  (cond ((symbolp fn))
+        ((and (eq (car-safe fn) backquote-backquote-symbol)
+              (not body))
+         (setq body (cdr fn))
+         (setq fn backquote-backquote-symbol))
+        ((signal 'wrong-type-argument
+                 (list 'symbolp backquote-backquote-symbol fn))))
+  (let* ((args (make-vector 10 nil))
+         (body (cdr (llama--collect (cons fn body) args)))
+         (rest (aref args 0))
+         (args (nreverse (cdr (append args nil))))
+         (args (progn (while (and args (null (car args)))
+                        (setq args (cdr args)))
+                      args))
+         (pos  (length args))
+         (opt  nil)
+         (args (mapcar
+                (lambda (arg)
+                  (if arg
+                      (setq opt (string-match-p "\\`_?&" (symbol-name arg)))
+                    (setq arg (intern (format "_%c%s" (if opt ?& ?%) pos))))
+                  (setq pos (1- pos))
+                  arg)
+                args))
+         (opt  nil)
+         (args (mapcar
+                (lambda (symbol)
+                  (cond
+                    ((string-match-p "\\`_?%" (symbol-name symbol))
+                     (when opt
+                       (error "`%s' cannot follow optional arguments" symbol))
+                     (list symbol))
+                    (opt
+                     (list symbol))
+                    ((setq opt t)
+                     (list '&optional symbol))))
+                (nreverse args))))
+    `(lambda
+       (,@(apply #'nconc args)
+        ,@(and rest (list '&rest rest)))
+       (,fn ,@body))))
+
+(defalias (intern "") 'llama)
+(defalias '\#\# 'llama)
+
+(defconst llama--unused-argument (make-symbol "llama--unused-argument"))
+
+(defun llama--collect (expr args &optional fnpos backquoted unquote)
+  (cond
+    ((memq (car-safe expr) (list (intern "") 'llama 'quote)) expr)
+    ((and backquoted (symbolp expr)) expr)
+    ((and backquoted
+          (memq (car-safe expr)
+                (list backquote-unquote-symbol
+                      backquote-splice-symbol)))
+     (list (car expr)
+           (llama--collect (cadr expr) args nil nil t)))
+    ((memq (car-safe expr)
+           (list backquote-backquote-symbol
+                 backquote-splice-symbol))
+     (list (car expr)
+           (llama--collect (cadr expr) args nil t)))
+    ((symbolp expr)
+     (let ((name (symbol-name expr)))
+       (save-match-data
+         (cond
+           ((string-match "\\`\\(_\\)?[%&]\\([1-9*]\\)?\\'" name)
+            (let* ((pos (match-string 2 name))
+                   (pos (cond ((equal pos "*") 0)
+                              ((not pos) 1)
+                              ((string-to-number pos))))
+                   (sym (aref args pos)))
+              (unless (and fnpos (not unquote) (memq expr '(% &)))
+                (when (and sym (not (equal expr sym)))
+                  (error "`%s' and `%s' are mutually exclusive" sym expr))
+                (aset args pos expr)))
+            (if (match-string 1 name)
+                llama--unused-argument
+              expr))
+           (expr)))))
+    ((or (listp expr)
+         (vectorp expr))
+     (let* ((vectorp (vectorp expr))
+            (expr (if vectorp (append expr ()) expr))
+            (fnpos (and (not vectorp)
+                        (not backquoted)
+                        (ignore-errors (length expr)))) ;proper-list-p
+            (ret ()))
+       (catch t
+         (while t
+           (let ((elt (llama--collect (car expr) args fnpos backquoted)))
+             (unless (eq elt llama--unused-argument)
+               (push elt ret)))
+           (setq fnpos nil)
+           (setq expr (cdr expr))
+           (unless (and expr
+                        (listp expr)
+                        (not (eq (car expr) backquote-unquote-symbol)))
+             (throw t nil))))
+       (setq ret (nreverse ret))
+       (when expr
+         (setcdr (last ret) (llama--collect expr args nil backquoted)))
+       (if vectorp (vconcat ret) ret)))
+    (expr)))
+
+;;; Completion
+
+(define-advice elisp--expect-function-p (:around (fn pos) llama)
+  "Support function completion directly following `##'."
+  (or (and (eq (char-before    pos)    ?#)
+           (eq (char-before (- pos 1)) ?#))
+      (and (eq (char-before    pos)    ?\s)
+           (eq (char-before (- pos 1)) ?#)
+           (eq (char-before (- pos 2)) ?#))
+      (funcall fn pos)))
+
+(define-advice all-completions (:around (fn str table &rest rest) llama)
+  "Remove empty symbol from completion results if originating from `llama'.
+
+`##' is the notation for the symbol whose name is the empty string.
+  (intern \"\") => ##
+  (symbol-name \\='##) => \"\"
+
+The `llama' package uses `##' as the name of a macro, which allows
+it to be used akin to syntax, without actually being new syntax.
+\(`describe-function' won't let you select `##', but because that is an
+alias for `llama', you can access the documentation under that name.)
+
+This advice prevents the empty string from being offered as a completion
+candidate when `obarray' or a completion table that internally uses
+that is used as TABLE."
+  (let ((result (apply fn str table rest)))
+    (if (and (eq obarray table) (equal str ""))
+        (delete "" result)
+      result)))
+
+;;; Fontification
+
+(defgroup llama ()
+  "Compact syntax for short lambda."
+  :group 'extensions
+  :group 'faces
+  :group 'lisp)
+
+(defface llama-\#\#-macro '((t :inherit font-lock-function-call-face))
+  "Face used for the name of the `##' macro.")
+
+(defface llama-llama-macro '((t :inherit font-lock-keyword-face))
+  "Face used for the name of the `llama' macro.")
+
+(defface llama-mandatory-argument '((t :inherit font-lock-variable-use-face))
+  "Face used for mandatory arguments `%1' through `%9' and `%'.")
+
+(defface llama-optional-argument '((t :inherit font-lock-type-face))
+  "Face used for optional arguments `&1' through `&9', `&' and `&*'.")
+
+(defface llama-deleted-argument
+  `((((supports :box t))
+     :box ( :line-width ,(if (>= emacs-major-version 28) (cons -1 -1) -1)
+            :color "red"
+            :style nil))
+    (((supports :underline t))
+     :underline "red")
+    (t
+     :inherit font-lock-warning-face))
+  "Face used for deleted arguments `_%1'...`_%9', `_&1'...`_&9' and `_&*'.
+This face is used in addition to one of llama's other argument faces.
+Unlike implicit unused arguments (which do not appear in the function
+body), these arguments are deleted from the function body during macro
+expansion, and the looks of this face should hint at that.")
+
+(defconst llama-font-lock-keywords-28
+  '(("(\\(##\\)" 1 'llama-\#\#-macro)
+    ("(\\(llama\\)\\_>" 1 'llama-llama-macro)
+    ("\\_<\\(?:_?%[1-9]?\\)\\_>"
+     0 (llama--maybe-face 'llama-mandatory-argument))
+    ("\\_<\\(?:_?&[1-9*]?\\)\\_>"
+     0 (llama--maybe-face 'llama-optional-argument))
+    ("\\_<\\(?:_\\(?:%[1-9]?\\|&[1-9*]?\\)\\)\\_>"
+     0 'llama-deleted-argument prepend)))
+
+(defconst llama-font-lock-keywords-29
+  `(("\\_<\\(&[1-9*]?\\)\\_>" 1 'default)
+    (,(apply-partially #'llama--match-and-fontify "(\\(##\\)")
+     1 'llama-\#\#-macro)
+    (,(apply-partially #'llama--match-and-fontify "(\\(llama\\_>\\)")
+     1 'llama-llama-macro)))
+
+(defvar llama-font-lock-keywords
+  (if (fboundp 'read-positioning-symbols)
+      llama-font-lock-keywords-29
+    llama-font-lock-keywords-28))
+
+(defun llama--maybe-face (face)
+  (and (not (and (member (match-string 0) '("%" "&"))
+                 (and-let* ((beg (ignore-errors
+                                   (scan-lists (match-beginning 0) -1 1))))
+                   (string-match-p "\\`\\(##\\|llama\\_>\\)?[\s\t\n\r]*\\'"
+                                   (buffer-substring-no-properties
+                                    (1+ beg) (match-beginning 0))))))
+       face))
+
+(defun llama--match-and-fontify (re end)
+  (static-if (fboundp 'bare-symbol)
+      (and (re-search-forward re end t)
+           (prog1 t
+             (save-excursion
+               (goto-char (match-beginning 0))
+               (when-let*
+                   ((_(save-match-data (not (nth 8 (syntax-ppss)))))
+                    (expr (ignore-errors
+                            (read-positioning-symbols (current-buffer)))))
+                 (put-text-property (match-beginning 0) (point)
+                                    'font-lock-multiline t)
+                 (llama--fontify (cdr expr) nil nil t)))))
+    (progn re end nil))) ; Silence compiler.
+
+(defun llama--fontify (expr &optional fnpos backquoted top)
+  (static-if (fboundp 'bare-symbol)
+      (cond
+        ((null expr) expr)
+        ((eq (car-safe expr) 'quote))
+        ((eq (ignore-errors (bare-symbol (car-safe expr))) 'quote))
+        ((and (memq (ignore-errors (bare-symbol (car-safe expr)))
+                    (list (intern "") 'llama))
+              (not top)))
+        ((and backquoted (symbol-with-pos-p expr)))
+        ((and backquoted
+              (memq (car-safe expr)
+                    (list backquote-unquote-symbol
+                          backquote-splice-symbol)))
+         (llama--fontify expr))
+        ((symbol-with-pos-p expr)
+         (save-match-data
+           (when-let*
+               ((name (symbol-name (bare-symbol expr)))
+                (face (cond
+                        ((and (string-match
+                               "\\_<\\(?:\\(_\\)?%\\([1-9]\\)?\\)\\_>" name)
+                              (or (not fnpos) (match-end 2)))
+                         'llama-mandatory-argument)
+                        ((and (string-match
+                               "\\_<\\(?:\\(_\\)?&\\([1-9*]\\)?\\)\\_>" name)
+                              (or (not fnpos) (match-end 2)))
+                         'llama-optional-argument))))
+             (when (match-end 1)
+               (setq face (list 'llama-deleted-argument face)))
+             (let ((beg (symbol-with-pos-pos expr)))
+               (put-text-property
+                beg (save-excursion (goto-char beg) (forward-symbol 1))
+                'face face)))))
+        ((or (listp expr)
+             (vectorp expr))
+         (let* ((vectorp (vectorp expr))
+                (expr (if vectorp (append expr ()) expr))
+                (fnpos (and (not vectorp)
+                            (not backquoted)
+                            (ignore-errors (length expr)))))
+           (catch t
+             (while t
+               (cond ((eq (car expr) backquote-backquote-symbol)
+                      (setq expr (cdr expr))
+                      (llama--fontify (car expr) t t))
+                     ((llama--fontify (car expr) fnpos backquoted)))
+               (setq fnpos nil)
+               (setq expr (cdr expr))
+               (unless (and expr
+                            (listp expr)
+                            (not (eq (car expr) backquote-unquote-symbol)))
+                 (throw t nil))))
+           (when expr
+             (llama--fontify expr fnpos))))))
+  (and expr fnpos backquoted top nil)) ; Silence compiler.
+
+(defvar llama-fontify-mode-lighter nil)
+
+;;;###autoload
+(define-minor-mode llama-fontify-mode
+  "In Emacs Lisp mode, highlight the `##' macro and its special arguments."
+  :lighter llama-fontify-mode-lighter
+  :global t
+  (cond
+    (llama-fontify-mode
+     (advice-add 'lisp--el-match-keyword :override
+                 #'lisp--el-match-keyword@llama '((depth . -80)))
+     (advice-add 'elisp-mode-syntax-propertize :override
+                 #'elisp-mode-syntax-propertize@llama)
+     (add-hook 'emacs-lisp-mode-hook #'llama--add-font-lock-keywords))
+    (t
+     (advice-remove 'lisp--el-match-keyword
+                    #'lisp--el-match-keyword@llama)
+     (advice-remove 'elisp-mode-syntax-propertize
+                    #'elisp-mode-syntax-propertize@llama)
+     (remove-hook 'emacs-lisp-mode-hook #'llama--add-font-lock-keywords)))
+  (dolist (buffer (buffer-list))
+    (with-current-buffer buffer
+      (when (derived-mode-p 'emacs-lisp-mode)
+        (if llama-fontify-mode
+            (font-lock-add-keywords  nil llama-font-lock-keywords)
+          (font-lock-remove-keywords nil llama-font-lock-keywords))
+        (font-lock-flush)))))
+
+(defun llama--add-font-lock-keywords ()
+  (font-lock-add-keywords nil llama-font-lock-keywords))
+
+(defun lisp--el-match-keyword@llama (limit)
+  "Highlight symbols following \"(##\" the same as if they followed \"(\"."
+  (catch 'found
+    (while (re-search-forward
+            (concat "(\\(?:## ?\\)?\\("
+                    (static-if (get 'lisp-mode-symbol 'rx-definition) ;>= 29.1
+                        (rx lisp-mode-symbol)
+                      lisp-mode-symbol-regexp)
+                    "\\)\\_>")
+            limit t)
+      (let ((sym (intern-soft (match-string 1))))
+        (when (and (or (special-form-p sym)
+                       (macrop sym)
+                       (and (bound-and-true-p morlock-mode)
+                            ;; Same as in advice of `morlock' package.
+                            (get sym 'morlock-font-lock-keyword)))
+                   (not (get sym 'no-font-lock-keyword))
+                   (static-if (fboundp 'lisp--el-funcall-position-p) ;>= 28.1
+                       (lisp--el-funcall-position-p (match-beginning 0))
+                     (not (lisp--el-non-funcall-position-p
+                           (match-beginning 0)))))
+          (throw 'found t))))))
+
+(defun elisp-mode-syntax-propertize@llama (start end)
+  ;; Synced with Emacs up to 6b9510d94f814cacf43793dce76250b5f7e6f64a.
+  "Highlight `##' as the symbol which it is."
+  (goto-char start)
+  (let ((case-fold-search nil))
+    (funcall
+     (syntax-propertize-rules
+      ;; Empty symbol.
+      ;; {{ Comment out to prevent the `##' from becoming part of
+      ;;    the following symbol when there is no space in between.
+      ;; ("##" (0 (unless (nth 8 (syntax-ppss))
+      ;;            (string-to-syntax "_"))))
+      ;; }}
+      ;; {{ As for other symbols, use `font-lock-constant-face' in
+      ;;    docstrings and comments.
+      ("##" (0 (when (nth 8 (syntax-ppss))
+                 (string-to-syntax "_"))))
+      ;; }}
+      ;; {{ Preserve this part, even though it is absent from
+      ;;    this function in 29.1; backporting it by association.
+      ;; Prevent the @ from becoming part of a following symbol.
+      (",@" (0 (unless (nth 8 (syntax-ppss))
+                 (string-to-syntax "'"))))
+      ;; }}
+      ;; Unicode character names.  (The longest name is 88 characters
+      ;; long.)
+      ("\\?\\\\N{[-A-Za-z0-9 ]\\{,100\\}}"
+       (0 (unless (nth 8 (syntax-ppss))
+            (string-to-syntax "_"))))
+      ((rx "#" (or (seq (group-n 1 "&" (+ digit)) ?\") ; Bool-vector.
+                   (seq (group-n 1 "s") "(")           ; Record.
+                   (seq (group-n 1 (+ "^")) "[")))     ; Char-table.
+       (1 (unless (save-excursion (nth 8 (syntax-ppss (match-beginning 0))))
+            (string-to-syntax "'")))))
+     start end)))
+
+;;; Partial applications
+
+(defun llama--left-apply-partially (fn &rest args)
+  "Return a function that is a partial application of FN to ARGS.
+
+ARGS is a list of the first N arguments to pass to FN.  The result
+is a new function which does the same as FN, except that the first N
+arguments are fixed at the values with which this function was called.
+
+See also `llama--right-apply-partially', which instead fixes the last
+N arguments.
+
+These functions are intended to be used using the names `partial' and
+`rpartial'.  To be able to use these shorthands in a file, you must set
+the file-local value of `read-symbols-shorthands', which was added in
+Emacs 28.1.  For an example see the end of file \"llama.el\".
+
+This is an alternative to `apply-partially', whose name is too long."
+  (declare (pure t) (side-effect-free error-free))
+  (lambda (&rest args2)
+    (apply fn (append args args2))))
+
+(defun llama--right-apply-partially (fn &rest args)
+  "Return a function that is a right partial application of FN to ARGS.
+
+ARGS is a list of the last N arguments to pass to FN.  The result
+is a new function which does the same as FN, except that the last N
+arguments are fixed at the values with which this function was called.
+
+See also `llama--left-apply-partially', which instead fixes the first
+N arguments.
+
+These functions are intended to be used using the names `rpartial' and
+`partial'.  To be able to use these shorthands in a file, you must set
+the file-local value of `read-symbols-shorthands', which was added in
+Emacs 28.1.  For an example see the end of file \"llama.el\"."
+  (declare (pure t) (side-effect-free error-free))
+  (lambda (&rest args2)
+    (apply fn (append args2 args))))
+
+;; An example of how one would use these functions:
+;;
+;; (list (funcall (partial (lambda (a b) (list a b)) 'fixed) 'after)
+;;       (funcall (rpartial (lambda (a b) (list a b)) 'fixed) 'before))
+
+;; An example of the configuration that is necessary to enable this:
+;;
+;; Local Variables:
+;; indent-tabs-mode: nil
+;; read-symbol-shorthands: (
+;;   ("partial" . "llama--left-apply-partially")
+;;   ("rpartial" . "llama--right-apply-partially"))
+;; End:
+;;
+;; Do not set `read-symbol-shorthands' in the ".dir-locals.el"
+;; file, because that does not work for uncompiled libraries.
+
+(provide 'llama)
+
+;;; llama.el ends here
diff --git a/emacs/.emacs.d/elpa/llama-20260601.1455/llama.elc b/emacs/.emacs.d/elpa/llama-20260601.1455/llama.elc
new file mode 100644
index 0000000..049ad9b
Binary files /dev/null and b/emacs/.emacs.d/elpa/llama-20260601.1455/llama.elc differ
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-actionscript.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-actionscript.el
new file mode 100644
index 0000000..60e2ac1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-actionscript.el
@@ -0,0 +1,122 @@
+;;; lsp-actionscript.el --- ActionScript Client settings         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  Jen-Chieh Shen
+;; Copyright (C) 2021-2026 emacs-lsp maintainers
+
+;; Author: Jen-Chieh Shen <jcs090218@gmail.com>
+;; Keywords: actionscript lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for ActionScript
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-actionscript nil
+  "LSP support for ActionScript."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/BowlerHatLLC/vscode-as3mxml")
+  :package-version `(lsp-mode . "8.0.0"))
+
+(defcustom lsp-actionscript-java-path "java"
+  "Path of the java executable."
+  :group 'lsp-actionscript
+  :type 'string)
+
+(defcustom lsp-actionscript-sdk-path ""
+  "Path to supported SDK.
+See https://github.com/BowlerHatLLC/vscode-as3mxml/wiki/Choose-an-ActionScript-SDK-for-the-current-workspace-in-Visual-Studio-Code."
+  :type 'string
+  :group 'lsp-actionscript
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-actionscript-version "1.5.0"
+  "Version of ActionScript language server."
+  :type 'string
+  :group 'lsp-actionscript
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-actionscript-extension-name
+  (format "vscode-nextgenas-%s.vsix" lsp-actionscript-version)
+  "File name of the extension file from language server."
+  :type 'string
+  :group 'lsp-actionscript
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-actionscript-server-download-url
+  (format "https://github.com/BowlerHatLLC/vscode-as3mxml/releases/download/v%s/%s"
+          lsp-actionscript-version lsp-actionscript-extension-name)
+  "Automatic download url for lsp-actionscript."
+  :type 'string
+  :group 'lsp-actionscript
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-actionscript-server-store-path
+  (f-join lsp-server-install-dir "as3mxml")
+  "The path to the file in which `lsp-actionscript' will be stored."
+  :type 'file
+  :group 'lsp-actionscript
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-actionscript-option-charset "UTF8"
+  "The charset to use by the ActionScript Language server."
+  :type 'string
+  :group 'lsp-actionscript
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defun lsp-actionscript--extension-path ()
+  "Return full path of the downloaded extension."
+  (f-join lsp-actionscript-server-store-path lsp-actionscript-extension-name))
+
+(defun lsp-actionscript--extension-dir ()
+  "Return as3mxml extension path."
+  (f-join lsp-actionscript-server-store-path "extension"))
+
+(defun lsp-actionscript--server-command ()
+  "Startup command for ActionScript language server."
+  (list lsp-actionscript-java-path
+        (format "-Droyalelib=%s" lsp-actionscript-sdk-path)
+        (format "-Dfile.encoding=%s" lsp-actionscript-option-charset)
+        "-cp"
+        (format "%s/bundled-compiler/*;%s/bin/*"
+                (lsp-actionscript--extension-dir) (lsp-actionscript--extension-dir))
+        "com.as3mxml.vscode.Main"))
+
+(lsp-dependency
+ 'as3mxml
+ '(:system "as3mxml")
+ `(:download :url lsp-actionscript-server-download-url
+             :decompress :zip
+             :store-path ,(f-no-ext (lsp-actionscript--extension-path))
+             :set-executable? t))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   #'lsp-actionscript--server-command
+                   (lambda () (f-exists? (lsp-actionscript--extension-dir))))
+  :major-modes '(actionscript-mode)
+  :priority -1
+  :server-id 'as3mxml-ls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'as3mxml callback error-callback))))
+
+(lsp-consistency-check lsp-actionscript)
+
+(provide 'lsp-actionscript)
+;;; lsp-actionscript.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ada.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ada.el
new file mode 100644
index 0000000..eeaadbf
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ada.el
@@ -0,0 +1,380 @@
+;;; lsp-ada.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, ada
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Ada Programming Language
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-semantic-tokens)
+
+(defgroup lsp-ada nil
+  "Settings for Ada Language Server.
+
+There is a hierarchy of configuration sources which are considered by
+the Ada Language Server, including `lsp-mode' configuration settings,
+external configuration files, as well as the server's own default
+settings.  When `lsp-mode' does not explicitly provide a value for a
+setting (i.e., it is \\='Not Specified\\='), its value will be
+determined by one of the other configuration sources.  Refer to the Ada
+Language Server's Settings Documentation for specific details."
+  :group 'lsp-mode
+  :link `(url-link :tag "Settings Documentation"
+                   ,(concat "https://github.com/AdaCore/ada_language_server"
+                            "/blob/master/doc/settings.md"))
+  :prefix "lsp-ada-"
+  :package-version '(lsp-mode . "6.2"))
+
+(lsp-defcustom lsp-ada-project-file nil
+  "GNAT Project file used to configure the Language Server.
+
+Both absolute and relative paths are supported within the project file
+name.  When a relative path is used, the path is relative to the root
+folder.
+
+When the project file is not specified, the Language Server will attempt
+to determine the project file itself, either by querying \\='alr\\=', if
+the root folder contains an alire.toml file and \\='alr\\=' was found in
+the path, or otherwise by searching for a unique project file in the
+root folder.  For Alire projects, whose project file was discovered by
+querying \\='alr\\=', the server will also query and populate the Alire
+environment."
+  :type '(choice (string :tag "File")
+                 (const  :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :link '(url-link :tag "Configuration Example"
+                   "https://github.com/AdaCore/ada_language_server")
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.projectFile")
+;;;###autoload(put 'lsp-ada-project-file 'safe-local-variable 'stringp)
+
+(lsp-defcustom lsp-ada-option-charset "UTF-8"
+  "The charset to use by the Ada Language server.  Defaults to \\='UTF-8\\='."
+  :type '(choice (string :tag "Charset")
+                 (const  :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "6.2")
+  :lsp-path "ada.defaultCharset")
+
+(lsp-defcustom lsp-ada-display-method-ancestry-on-navigation nil
+  "Policy for displaying overriding/overridden subprograms on navigation requests."
+  :type '(choice (const "never")
+                 (const "usage_and_abstract_only")
+                 (const "definition_only")
+                 (const "always")
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.displayMethodAncestryOnNavigation")
+
+(lsp-defcustom lsp-ada-documentation-style nil
+  "Style used to extract documentation for an entity."
+  :type '(choice (const "gnat")
+                 (const "leading")
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.documentationStyle")
+
+(lsp-defcustom lsp-ada-enable-diagnostics nil
+  "Whether diagnostics are enabled."
+  :type '(choice (const :tag "Enabled"       t)
+                 (const :tag "Disabled"      :json-false)
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.enableDiagnostics")
+
+(lsp-defcustom lsp-ada-enable-indexing nil
+  "Whether the server indexes the source files after loading a project."
+  :type '(choice (const :tag "Enabled"       t)
+                 (const :tag "Disabled"      :json-false)
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.enableIndexing")
+
+(lsp-defcustom lsp-ada-fold-comments nil
+  "Whether the server sends information to control folding comment blocks."
+  :type '(choice (const :tag "Enabled"       t)
+                 (const :tag "Disabled"      :json-false)
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.foldComments")
+
+(lsp-defcustom lsp-ada-follow-symlinks nil
+  "Whether the server attempts to resolve symlinks for file names."
+  :type '(choice (const :tag "Enabled"       t)
+                 (const :tag "Disabled"      :json-false)
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.followSymlinks")
+
+(lsp-defcustom lsp-ada-insert-with-clauses nil
+  "Whether to automatically insert missing with-clauses for completions."
+  :type '(choice (const :tag "Enabled"       t)
+                 (const :tag "Disabled"      :json-false)
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.insertWithClauses")
+
+(lsp-defcustom lsp-ada-log-threshold nil
+  "Maximum number of preserved trace files in the ALS log directory."
+  :type '(choice (integer :tag "Threshold")
+                 (const   :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :link `(url-link :tag "Traces Documentation"
+                   ,(concat "https://github.com/AdaCore/ada_language_server"
+                            "/blob/master/doc/traces.md"))
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.logThreshold")
+
+(lsp-defcustom lsp-ada-named-notation-threshold nil
+  "Number of parameters when named notation is used in completion snippets."
+  :type '(choice (integer :tag "Threshold")
+                 (const   :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.namedNotationThreshold")
+
+(lsp-defcustom lsp-ada-on-type-formatting-indent-only nil
+  "Whether textDocument/onTypeFormatting request only indents a new line."
+  :type '(choice (const :tag "Enabled"       t)
+                 (const :tag "Disabled"      :json-false)
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.onTypeFormatting.indentOnly")
+
+(lsp-defcustom lsp-ada-project-diagnostics nil
+  "Whether the Ada Language Server should emit project diagnostics.
+
+This setting is ignored if `lsp-ada-enable-diagnostics' is not enabled.
+A workspace reload is necessary to refresh the diagnostics after
+modifying this setting."
+  :type '(choice (const :tag "Enabled"       t)
+                 (const :tag "Disabled"      :json-false)
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.projectDiagnostics")
+
+(lsp-defcustom lsp-ada-relocate-build-tree nil
+  "Path to use for out-of-tree builds."
+  :type '(choice (string :tag "Path")
+                 (const  :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.relocateBuildTree")
+
+(lsp-defcustom lsp-ada-root-dir nil
+  "The root directory for artifact relocation.
+
+This setting must be used in conjunction with `lsp-ada-relocate-build-tree'."
+  :type '(choice (string :tag "Root Dir")
+                 (const  :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.rootDir")
+
+(lsp-defcustom lsp-ada-rename-in-comments nil
+  "Whether to apply textDocument/rename to comments."
+  :type '(choice (const :tag "Enabled"       t)
+                 (const :tag "Disabled"      :json-false)
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.renameInComments")
+
+(lsp-defcustom lsp-ada-scenario-variables nil
+  "Scenario variables for project."
+  :type '(alist :tag "Scenario Variable(s)"
+                :key-type (symbol :tag "Variable Name")
+                :value-type (string :tag "Value"))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.scenarioVariables")
+
+(lsp-defcustom lsp-ada-use-completion-snippets nil
+  "Whether to enable snippets in completion results."
+  :type '(choice (const :tag "Enabled"       t)
+                 (const :tag "Disabled"      :json-false)
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.useCompletionSnippets")
+
+(lsp-defcustom lsp-ada-use-gnatformat nil
+  "Enables GNATformat as the formatting provider for Ada source files.
+
+This option controls the formatting provider."
+  :type '(choice (const :tag "GNATformat"    t)
+                 (const :tag "GNATpp"        :json-false)
+                 (const :tag "Not Specified" nil))
+  :group 'lsp-ada
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "ada.useGnatformat")
+
+(defcustom lsp-ada-als-executable "ada_language_server"
+  "Command to start the Ada language server."
+  :group 'lsp-ada
+  :risky t
+  :type 'file)
+
+(defcustom lsp-ada-library-folders #'lsp-ada--default-library-folders
+  "List of Ada library folders.
+
+Library folders contain source which may be visited from a workspace,
+but whose source files are not themselves considered a separate
+workspace.  This typically applies to language run-time source file
+folders.
+
+Instead of a list of a folders, a function may be provided, which will
+be called with the most recently active workspace as a parameter and
+must return a list of Ada library folders, or nil if none."
+  :group 'lsp-ada
+  :type '(choice function
+                 (repeat :tag "Library Folders"
+                         (directory :tag "Library Folder")))
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-ada-semantic-token-face-overrides
+  '(("namespace" . default)
+    ("modifier"  . lsp-face-semhl-keyword))
+  "Semantic token face overrides to be applied."
+  :type '(alist :key-type string
+                :value-type (choice (face  :tag "Face")
+                                    (const :tag "No Face" nil)))
+  :group 'lsp-ada
+  :package-version '(lsp-mode "9.0.0"))
+
+(defcustom lsp-ada-semantic-token-modifier-face-overrides
+  '(("declaration")
+    ("definition")
+    ("implementation")
+    ("static")
+    ("modification")
+    ("documentation")
+    ("defaultLibrary"))
+  "Semantic token modifier face overrides to be applied."
+  :type '(alist :key-type string
+                :value-type (choice (face  :tag "Face")
+                                    (const :tag "No Face" nil)))
+  :group 'lsp-ada
+  :package-version '(lsp-mode "9.0.0"))
+
+(defvar lsp-ada--als-download-url-cache nil)
+
+(defvar lsp-ada--als-downloaded-executable
+  (f-join lsp-server-install-dir
+          "ada-ls"
+          "integration" "vscode" "ada"
+          (symbol-name (lsp-resolve-value lsp--system-arch))
+          (pcase system-type
+            ('gnu/linux  "linux")
+            ('darwin     "darwin")
+            ('windows-nt "win32")
+            (_           "linux"))
+          (concat "ada_language_server"
+                  (pcase system-type
+                    ('windows-nt ".exe")
+                    (_ "")))))
+
+(defun lsp-ada--als-latest-release-url ()
+  "URL for the latest release of the Ada Language Server."
+  (setq lsp-ada--als-download-url-cache
+        (lsp--find-latest-gh-release-url
+         "https://api.github.com/repos/AdaCore/ada_language_server/releases/latest"
+         (format "%s.tar.gz"
+                 (pcase (list system-type (lsp-resolve-value lsp--system-arch))
+                   ('(gnu/linux  x64)   "linux-x64")
+                   ('(gnu/linux  arm64) "linux-arm64")
+                   ('(darwin     x64)   "darwin-x64")
+                   ('(darwin     arm64) "darwin-arm64")
+                   ('(windows-nt x64)   "win32-x64")
+                   (`(,_         x64)   "linux-x64"))))))
+
+(defun lsp-ada--als-store-path ()
+  "Store Path for the downloaded Ada Language Server."
+  (f-join lsp-server-install-dir
+          "ada-ls"
+          (string-remove-suffix
+           ".tar.gz"
+           (file-name-nondirectory
+            (or lsp-ada--als-download-url-cache
+                (lsp-ada--als-latest-release-url)
+                "ada-ls")))))
+
+(defun lsp-ada--default-library-folders (_workspace)
+  "Determine the set of Ada library folders."
+  (when (string-match-p "/adainclude/" (buffer-file-name))
+    (list (file-name-directory (buffer-file-name)))))
+
+(lsp-dependency
+ 'ada-ls
+ '(:download :url lsp-ada--als-latest-release-url
+             :store-path lsp-ada--als-store-path
+             :decompress :targz
+             :binary-path lsp-ada--als-downloaded-executable
+             :set-executable? t)
+ '(:system lsp-ada-als-executable))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda () (lsp-package-path 'ada-ls)))
+                  :major-modes '(ada-mode ada-ts-mode)
+                  :priority -1
+                  :initialization-options (lambda ()
+                                            (ht-get (lsp-configuration-section "ada") "ada"))
+                  ;; Send workspace/didChangeConfiguration as a workaround for:
+                  ;;   https://github.com/AdaCore/ada_language_server/issues/1209
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                                        (lsp--set-configuration
+                                                         (lsp-configuration-section "ada"))))
+                  :library-folders-fn (lambda (workspace)
+                                        (if (functionp lsp-ada-library-folders)
+                                            (funcall lsp-ada-library-folders workspace)
+                                          lsp-ada-library-folders))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'ada-ls callback error-callback))
+                  :semantic-tokens-faces-overrides `( :types ,lsp-ada-semantic-token-face-overrides
+                                                      :modifiers ,lsp-ada-semantic-token-modifier-face-overrides)
+                  :server-id 'ada-ls))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda () (list (lsp-package-path 'ada-ls)
+                                                    "--language-gpr")))
+                  :major-modes '(gpr-mode gpr-ts-mode)
+                  :priority -1
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'ada-ls callback error-callback))
+                  :server-id 'gpr-ls))
+
+(lsp-consistency-check lsp-ada)
+
+(provide 'lsp-ada)
+;;; lsp-ada.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-angular.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-angular.el
new file mode 100644
index 0000000..27e3aff
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-angular.el
@@ -0,0 +1,102 @@
+;;; lsp-angular.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp,
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Angular Web application framework.
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'f)
+
+
+;;; Angular
+(defgroup lsp-angular nil
+  "Angular LSP client, provided by the Angular Language Service Server."
+  :group 'lsp-mode
+  :version "8.0.0"
+  :link '(url-link "https://github.com/angular/vscode-ng-language-service"))
+
+(defcustom lsp-clients-angular-language-server-command
+  nil
+  "The command that starts the angular language server."
+  :group 'lsp-angular
+  :type '(choice
+          (string :tag "Single string value")
+          (repeat :tag "List of string values"
+                  string)))
+
+(defcustom lsp-clients-angular-node-get-prefix-command
+  "npm config get --global prefix"
+  "The shell command that returns the path of NodeJS's prefix.
+Has no effects when `lsp-clients-angular-language-server-command' is set."
+  :group 'lsp-angular
+  :type 'string)
+
+(defun lsp-client--angular-start-loading (_workspace params)
+  (lsp--info "Started loading project %s" params))
+
+(defun lsp-client--angular-finished-loading (_workspace params)
+  (lsp--info "Finished loading project %s" params))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection
+  (lsp-stdio-connection
+   (lambda ()
+     (if lsp-clients-angular-language-server-command
+         lsp-clients-angular-language-server-command
+       (let ((node-modules-path
+              (f-join
+               (string-trim
+                (shell-command-to-string lsp-clients-angular-node-get-prefix-command))
+               (if (eq system-type 'windows-nt)
+                   "node_modules"
+                 "lib/node_modules"))))
+         ;; The shell command takes a significant time to run,
+         ;; so we "cache" its results after running once
+         (setq lsp-clients-angular-language-server-command
+               (list
+                "ngserver"
+                "--stdio"
+                "--tsProbeLocations"
+                node-modules-path
+                "--ngProbeLocations"
+                (f-join node-modules-path "@angular/language-server/node_modules/")))
+         lsp-clients-angular-language-server-command))))
+  :activation-fn
+  (lambda (&rest _args)
+    (and (string-match-p "\\(\\.html\\|\\.ts\\)\\'" (buffer-file-name))
+         (lsp-workspace-root)
+         (file-exists-p (f-join (lsp-workspace-root) "angular.json"))))
+  :priority -1
+  :notification-handlers
+  (ht ("angular/projectLoadingStart" #'lsp-client--angular-start-loading)
+      ("angular/projectLoadingFinish" #'lsp-client--angular-finished-loading)
+      ("angular/projectLanguageService" #'ignore))
+  :add-on? t
+  :server-id 'angular-ls))
+
+
+(lsp-consistency-check lsp-angular)
+
+(provide 'lsp-angular)
+;;; lsp-angular.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ansible.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ansible.el
new file mode 100644
index 0000000..3f292d2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ansible.el
@@ -0,0 +1,257 @@
+;;; lsp-ansible.el --- lsp-mode ansible integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2026 emacs-lsp maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: lsp, yaml, ansible
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Client for the Ansible Language
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'json)
+
+;;; Ansible
+(defgroup lsp-ansible nil
+  "Settings for the Ansible Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/ansible/ansible-language-server")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-add-on? t
+  "Make the client `add-on' so that it works with other language servers.
+`yamlls`is a common one.
+
+Enabled by default."
+  :type 'boolean
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-language-server-command
+  '("ansible-language-server" "--stdio")
+  "The command that starts the ansible language server."
+  :type '(repeat :tag "List of string values" string)
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-ansible-path "ansible"
+  "Path to the ansible executable.
+$PATH is searched for the executable."
+  :type 'string
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-use-fully-qualified-collection-names t
+  "Toggles use of fully qualified collection names when inserting a module name.
+Disabling it will only use FQCNs when necessary, that is when the collection is
+not configured for the task."
+  :type 'boolean
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-validation-enabled t
+  "Toggle validation provider.
+If enabled and ansible-lint is disabled, validation falls back to
+ansible-playbook --syntax-check."
+  :type 'boolean
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-validation-lint-arguments ""
+  "Optional command line arguments to be appended to ansible-lint invocation.
+See ansible-lint documentation."
+  :type 'string
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-validation-lint-enabled t
+  "Enables/disables use of ansible-lint."
+  :type 'boolean
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-validation-lint-path "ansible-lint"
+  "Path to the ansible-lint executable.
+$PATH is searched for the executable."
+  :type 'string
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-completion-provide-redirect-modules t
+  "Toggle redirected module provider when completing modules."
+  :type 'boolean
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-completion-provide-module-option-aliases t
+  "Toggle alias provider when completing module options."
+  :type 'boolean
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-execution-environment-container-engine "auto"
+  "The container engine to be used while running with execution environment.
+Valid values are auto, podman and docker.  For auto it will look for podman then
+docker."
+  :type '(choice (const "auto")
+                 (const "podman")
+                 (const "docker"))
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-execution-environment-enabled nil
+  "Enable or disable the use of an execution environment."
+  :type 'boolean
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-execution-environment-image "quay.io/ansible/creator-ee:latest"
+  "Specify the name of the execution environment image."
+  :type 'string
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-execution-environment-pull-policy "missing"
+  "Specify the image pull policy.
+Valid values are always, missing, never and tag.  Setting always will always
+pull the image when extension is activated or reloaded.  Setting missing will
+pull if not locally available.  Setting never will never pull the image and
+setting tag will always pull if the image tag is ‘latest’, otherwise pull
+if not locally available."
+  :type '(choice (const "always")
+                 (const "missing")
+                 (const "never")
+                 (const "tag"))
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-execution-environment-pull-arguments ""
+  "Specify any additional parameters for the pull command.
+Example: ‘--tls-verify=false’"
+  :type 'string
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-execution-environment-container-options ""
+  "Extra parameters passed to the container engine command.
+Example: ‘-–net=host’"
+  :type 'string
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-execution-environment-volume-mounts []
+  "Additonnal volumes to mount in container.
+The value is a vector of plists.  Expected properties are:
+- src: the name of the local volume or path to be mounted within execution
+  environment
+- dest: the path where the file or directory are mounted in the container
+- options: the property is optional, and is a comma-separated list of options.
+  Example: ro,Z"
+  :type '(lsp-repeatable-vector plist)
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-python-interpreter-path ""
+  "Path to the python/python3 executable.
+This setting may be used to make the extension work with ansible and
+ansible-lint installations in a Python virtual environment."
+  :type 'string
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-ansible-python-activation-script ""
+  "Path to a custom activate script.
+It will be used instead of `lsp-ansible-python-interpreter-path' to run in a
+Python virtual environment."
+  :type 'string
+  :group 'lsp-ansible
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-dependency 'ansible-language-server
+                '(:system "ansible-language-server")
+                '(:npm :package "@ansible/ansible-language-server"
+                       :path "ansible-language-server"))
+
+(lsp-register-custom-settings
+ '(("ansible.ansible.path" lsp-ansible-ansible-path)
+   ("ansible.ansible.useFullyQualifiedCollectionNames" lsp-ansible-use-fully-qualified-collection-names t)
+   ("ansible.validation.enabled" lsp-ansible-validation-enabled t)
+   ("ansible.validation.lint.arguments" lsp-ansible-validation-lint-arguments)
+   ("ansible.validation.lint.enabled" lsp-ansible-validation-lint-enabled t)
+   ("ansible.validation.lint.path" lsp-ansible-validation-lint-path)
+   ("ansible.completion.provideRedirectModules" lsp-ansible-completion-provide-redirect-modules t)
+   ("ansible.completion.provideModuleOptionAliases" lsp-ansible-completion-provide-module-option-aliases t)
+   ("ansible.executionEnvironment.containerEngine" lsp-ansible-execution-environment-container-engine)
+   ("ansible.executionEnvironment.enabled" lsp-ansible-execution-environment-enabled t)
+   ("ansible.executionEnvironment.image" lsp-ansible-execution-environment-image)
+   ("ansible.executionEnvironment.pull.policy" lsp-ansible-execution-environment-pull-policy)
+   ("ansible.executionEnvironment.pull.arguments" lsp-ansible-execution-environment-pull-arguments)
+   ("ansible.executionEnvironment.containerOptions" lsp-ansible-execution-environment-container-options)
+   ("ansible.executionEnvironment.volumeMounts" lsp-ansible-execution-environment-volume-mounts)
+   ("ansible.python.interpreterPath" lsp-ansible-python-interpreter-path)
+   ("ansible.python.activationScript" lsp-ansible-python-activation-script)))
+
+(defun lsp-ansible-check-ansible-minor-mode (&rest _)
+  "Check whether ansible minor mode is active.
+This prevents the Ansible server from being turned on in all yaml files."
+  (and (or (derived-mode-p 'yaml-mode)
+           (derived-mode-p 'yaml-ts-mode))
+       (bound-and-true-p ansible-mode)))
+
+(declare-function lsp-completion--clear-cache "lsp-completion" (&optional keep-last-result))
+
+(defun lsp-ansible-resync-inventory ()
+  "Resync the inventory cache used by Ansible Language Server for hosts completion."
+  (interactive)
+  (lsp-notify "resync/ansible-inventory" nil)
+  (require 'lsp-completion)
+  (lsp-completion--clear-cache))
+
+(defun lsp-ansible-update-metadata-handler (_workspace params)
+  "Handler for `update/ansible-metadata' notification.
+Pretty print the content of PARAMS."
+  (let ((json-encoding-pretty-print t))
+    (message "Ansible Language Server metadata: %s" (json-encode params))))
+
+(defun lsp-ansible-show-server-metadata ()
+  "Show information about Ansible environment used by the Ansible Language Server."
+  (interactive)
+  (lsp-notify "update/ansible-metadata" nil))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda ()
+                     `(,(or (executable-find
+                             (cl-first lsp-ansible-language-server-command))
+                            (lsp-package-path 'ansible-language-server))
+                       ,@(cl-rest lsp-ansible-language-server-command))))
+  :priority 1
+  :add-on? lsp-ansible-add-on?
+  :multi-root t
+  :notification-handlers (ht ("update/ansible-metadata" #'lsp-ansible-update-metadata-handler))
+  :activation-fn #'lsp-ansible-check-ansible-minor-mode
+  :server-id 'ansible-ls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'ansible-language-server callback error-callback))))
+
+(lsp-consistency-check lsp-ansible)
+
+(provide 'lsp-ansible)
+;;; lsp-ansible.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-asm.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-asm.el
new file mode 100644
index 0000000..e070584
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-asm.el
@@ -0,0 +1,95 @@
+;;; lsp-asm.el --- Assembly Language Client settings         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023  Jen-Chieh Shen
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: Jen-Chieh Shen <jcs090218@gmail.com>
+;; Keywords: asm lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for Assembly Language
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-asm nil
+  "LSP support for Assembly Language."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/bergercookie/asm-lsp")
+  :package-version `(lsp-mode . "9.0.0"))
+
+(defcustom lsp-asm-active-modes
+  '( asm-mode fasm-mode masm-mode nasm-mode gas-mode)
+  "List of major mode that work with asm-lsp."
+  :type '(list symbol)
+  :group 'lsp-asm)
+
+(defcustom lsp-asm-home-url
+  "https://github.com/bergercookie/asm-lsp"
+  "Url we use to install asm-lsp."
+  :type 'string
+  :group 'lsp-asm
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-asm-store-path (f-join lsp-server-install-dir "asm")
+  "The path to the file in which `asm-lsp' will be stored."
+  :type 'file
+  :group 'lsp-asm
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-asm--download-server (_client callback error-callback update?)
+  "Install/update asm-ls language server using `cargo install'.
+
+Will invoke CALLBACK or ERROR-CALLBACK based on result.
+Will update if UPDATE? is t."
+  (when update?
+    (ignore-errors (delete-directory lsp-asm-store-path t)))
+  (lsp-async-start-process
+   callback
+   error-callback
+   "cargo" "install" "--git" lsp-asm-home-url "--root" lsp-asm-store-path "asm-lsp"))
+
+(defun lsp-asm--executable ()
+  "Return asm-lsp executable."
+  (let ((local (f-join lsp-asm-store-path "bin"
+                       (if (eq system-type 'windows-nt)
+                           "asm-lsp.exe"
+                         "asm-lsp"))))
+    (or (and (f-exists? local) local)
+        (executable-find "asm-lsp")
+        (user-error "`asm-lsp' is not installed; for installation see %s for more information" lsp-asm-home-url))))
+
+(defun lsp-asm--server-command ()
+  "Startup command for Assembly language server."
+  (list (lsp-asm--executable)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   #'lsp-asm--server-command
+                   (lambda () (or (executable-find "asm-lsp")
+                                  (f-exists? lsp-asm-store-path))))
+  :major-modes lsp-asm-active-modes
+  :priority -1
+  :server-id 'asm-lsp
+  :download-server-fn #'lsp-asm--download-server))
+
+(lsp-consistency-check lsp-asm)
+
+(provide 'lsp-asm)
+;;; lsp-asm.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-astro.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-astro.el
new file mode 100644
index 0000000..3b92efd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-astro.el
@@ -0,0 +1,59 @@
+;;; lsp-astro.el --- lsp-mode astro integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022 Paweł Kobojek, Luca Fanselau
+;; Copyright (C) 2022-2026 emacs-lsp maintainers
+
+;; Author: Paweł Kobojek
+;; Keywords: languages,astro
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  LSP client for astro-ls
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defun lsp-astro--get-initialization-options ()
+  "Try to get the typescript server path, to supply to the astro language server."
+  (let ((library (f-join (lsp-workspace-root) "node_modules/typescript/lib")))
+    (if (file-exists-p library)
+        `(:typescript (:tsdk ,library))
+      (lsp-warn "Unable to find typescript server path for astro-ls. Guessed: %s" library))))
+
+(defgroup lsp-astro nil
+  "LSP support for Astro.build, using astro-ls."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/withastro/language-tools"))
+
+(lsp-dependency 'astro-language-server
+                '(:system "astroserver")
+                '(:npm :package "@astrojs/language-server"
+                       :path "astroserver"))
+
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection '("astro-ls" "--stdio"))
+                  :activation-fn (lsp-activate-on "astro")
+                  :initialization-options #'lsp-astro--get-initialization-options
+                  :server-id 'astro-ls
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'astro-language-server callback error-callback))))
+
+(lsp-consistency-check lsp-astro)
+
+(provide 'lsp-astro)
+;;; lsp-astro.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-autotools.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-autotools.el
new file mode 100644
index 0000000..9d3f5ba
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-autotools.el
@@ -0,0 +1,79 @@
+;;; lsp-autotools.el --- Support configure.ac, Makefile.am, Makefile  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023  Jen-Chieh Shen
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: Jen-Chieh Shen <jcs090218@gmail.com>
+;; Keywords: autotools lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Support configure.ac, Makefile.am, Makefile
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-autotools nil
+  "LSP support for Autotools."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/Freed-Wu/autotools-language-server")
+  :package-version `(lsp-mode . "9.0.0"))
+
+(defcustom lsp-autotools-active-modes
+  '( autoconf-mode
+     makefile-mode
+     makefile-automake-mode
+     makefile-gmake-mode
+     makefile-makepp-mode
+     makefile-bsdmake-mode
+     makefile-imake-mode)
+  "List of major mode that work with Autotools."
+  :type '(repeat function)
+  :group 'lsp-autotools)
+
+(defun lsp-autotools--download-server (_client callback error-callback update?)
+  "Install/update Autotools language server using `pip
+
+Will invoke CALLBACK or ERROR-CALLBACK based on result.
+Will update if UPDATE? is t."
+  (lsp-async-start-process
+   callback
+   error-callback
+   "pip" "install" "autotools-language-server" (when update? "-U")))
+
+(defun lsp-autotools--server-command ()
+  "Startup command for Autotools language server."
+  (list "autotools-language-server"))
+
+(defun lsp-autotools--test-present ()
+  "Return non-nil if Autotools language server is installed globally."
+  (executable-find "autotools-language-server"))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   #'lsp-autotools--server-command
+                   #'lsp-autotools--test-present)
+  :major-modes lsp-autotools-active-modes
+  :priority -1
+  :server-id 'autotools-ls
+  :download-server-fn #'lsp-autotools--download-server))
+
+(lsp-consistency-check lsp-autotools)
+
+(provide 'lsp-autotools)
+;;; lsp-autotools.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-awk.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-awk.el
new file mode 100644
index 0000000..73b2c33
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-awk.el
@@ -0,0 +1,49 @@
+;;; lsp-awk.el --- AWK client -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: Konstantin Kharlamov <Hi-Angel@yandex.ru>
+;; Keywords: languages lsp awk
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; LSP client for AWK language.
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-awk nil
+  "LSP support for AWK."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/Beaglefoot/awk-language-server"))
+
+(defcustom lsp-awk-executable '("awk-language-server")
+  "Command to run the AWK language server."
+  :group 'lsp-awk
+  :risky t
+  :type '(repeat string))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda () lsp-awk-executable))
+  :activation-fn (lsp-activate-on "awk")
+  :priority -1
+  :server-id 'awkls))
+
+(provide 'lsp-awk)
+;;; lsp-awk.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-bash.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-bash.el
new file mode 100644
index 0000000..4c93be5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-bash.el
@@ -0,0 +1,97 @@
+;;; lsp-bash.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, bash, shell-script
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Bash Programming Language
+
+;;; Code:
+
+(require 'lsp-mode)
+
+;;; Bash
+(defgroup lsp-bash nil
+  "Settings for the Bash Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/bash-lsp/bash-language-server")
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-bash-allowed-shells '(sh bash)
+  "List of allowed `sh-shell` values that LSP will be enabled for."
+  :type '(list symbol)
+  :group 'lsp-bash
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-bash-explainshell-endpoint nil
+  "The endpoint to use explainshell.com to answer `onHover' queries.
+See instructions at https://marketplace.visualstudio.com/items?itemName=mads-hartmann.bash-ide-vscode"
+  :type 'string
+  :risky t
+  :group 'lsp-bash
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-bash-highlight-parsing-errors nil
+  "Consider parsing errors in scripts as `problems'."
+  :type 'boolean
+  :group 'lsp-bash
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-bash-glob-pattern nil
+  "Glob pattern used to find shell script files to parse."
+  :type 'string
+  :group 'lsp-bash
+  :package-version '(lsp-mode . "6.3"))
+
+(defun lsp-bash--bash-ls-server-command ()
+  "Startup command for Bash language server."
+  (list (lsp-package-path 'bash-language-server) "start"))
+
+(lsp-dependency 'bash-language-server
+                '(:system "bash-language-server")
+                '(:npm :package "bash-language-server"
+                       :path "bash-language-server"))
+
+(defvar sh-shell)
+
+(defun lsp-bash-check-sh-shell (&rest _)
+  "Check whether `sh-shell' is supported.
+
+This prevents the Bash server from being turned on for unsupported dialects, e.g. `zsh`."
+  (and (local-variable-p 'sh-shell)
+       (memq sh-shell lsp-bash-allowed-shells)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-bash--bash-ls-server-command)
+  :major-modes '(sh-mode bash-ts-mode ebuild-mode envrc-file-mode)
+  :priority -1
+  :activation-fn #'lsp-bash-check-sh-shell
+  :environment-fn (lambda ()
+                    '(("EXPLAINSHELL_ENDPOINT" . lsp-bash-explainshell-endpoint)
+                      ("HIGHLIGHT_PARSING_ERRORS" . lsp-bash-highlight-parsing-errors)
+                      ("GLOB_PATTERN" . lsp-bash-glob-pattern)))
+  :server-id 'bash-ls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'bash-language-server callback error-callback))))
+
+(lsp-consistency-check lsp-bash)
+
+(provide 'lsp-bash)
+;;; lsp-bash.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-beancount.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-beancount.el
new file mode 100644
index 0000000..1eb31b3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-beancount.el
@@ -0,0 +1,65 @@
+;;; lsp-beancount.el --- Beancount Client settings         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, beancount
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for Beancount
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-beancount nil
+  "Settings for the Beancount Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/polarmutex/beancount-language-server")
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-beancount-langserver-executable "beancount-language-server"
+  "Command to start Beancount language server."
+  :type 'string
+  :group 'lsp-beancount
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-beancount-journal-file nil
+  "Path to Beancount journal file.
+
+The path can be absolute, or relative to the currently opened file.
+Use nil (the default) to use the current beancount buffer as the journal file."
+  :type 'string
+  :group 'lsp-beancount
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection
+  (lsp-stdio-connection
+   (lambda ()
+     `(,lsp-beancount-langserver-executable "--stdio")))
+  :major-modes '(beancount-mode)
+  :initialization-options
+  (lambda ()
+    `((journal_file . ,lsp-beancount-journal-file)))
+  :server-id 'beancount-ls))
+
+(lsp-consistency-check lsp-beancount)
+
+(provide 'lsp-beancount)
+;;; lsp-beancount.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-bufls.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-bufls.el
new file mode 100644
index 0000000..bff8036
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-bufls.el
@@ -0,0 +1,106 @@
+;;; lsp-bufls.el --- bufls-langserver Client settings -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023  Jim Myhrberg
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: Jim Myhrberg
+;; Keywords: lsp, protobuf, buf, bufls
+
+;; This file is not part of GNU Emacs
+
+;;; License:
+;;
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; lsp-bufls client
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-go)
+
+;; Buf Language Server
+(defgroup lsp-bufls nil
+  "Configuration options for Buf Language Server."
+  :group 'lsp-mode
+  :link '(url-lint "https://github.com/bufbuild/buf-language-server")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-bufls-args nil
+  "Arguments to pass to bufls serve."
+  :type '(repeat string)
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-bufls-path "bufls"
+  "Command to run bufls."
+  :type 'string
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-bufls-server--stdio-command ()
+  "Return the command and args to start bufls-langserver."
+  (let ((args (list lsp-bufls-path "serve")))
+    (when (and (listp lsp-bufls-args)
+               (> (length lsp-bufls-args) 0))
+      (setq args (append args lsp-bufls-args)))
+    args))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   #'lsp-bufls-server--stdio-command)
+                  :activation-fn (lsp-activate-on "protobuf")
+                  :language-id "protobuf"
+                  :priority -1
+                  :server-id 'bufls))
+
+;; Buf CLI
+(defgroup lsp-buf nil
+  "Configuration options for buf CLI."
+  :group 'lsp-mode
+  :link '(url-lint "https://github.com/bufbuild/buf")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-buf-args `("lsp" "serve")
+  "Arguments to pass to buf CLI."
+  :type '(repeat string)
+  :group 'lsp-buf
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-buf-path "buf"
+  "Command to run buf CLI."
+  :type 'string
+  :group 'lsp-buf
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-buf--stdio-command ()
+  "Return the command and args to start buf CLI LSP server."
+  (let ((args (list lsp-buf-path)))
+    (when (and (listp lsp-buf-args)
+               (> (length lsp-buf-args) 0))
+      (setq args (append args lsp-buf-args)))
+    args))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   #'lsp-buf--stdio-command)
+                  :activation-fn (lsp-activate-on "protobuf")
+                  :language-id "protobuf"
+                  :priority 0
+                  :server-id 'buf))
+
+(lsp-consistency-check lsp-bufls)
+
+(provide 'lsp-bufls)
+;;; lsp-bufls.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-c3.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-c3.el
new file mode 100644
index 0000000..3b846d8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-c3.el
@@ -0,0 +1,89 @@
+;;; lsp-c3.el --- C3 Client settings             -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2025 Bruno Dias
+;; Copyright (C) 2025-2026 emacs-lsp maintainers
+
+;; Author: Bruno Dias
+;; Keywords: c3 lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-c3 client
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-c3 nil
+  "LSP support for the C3 programming language, using the server from https://github.com/pherrymason/c3-lsp."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/pherrymason/c3-lsp"))
+
+(defcustom lsp-c3-c3-language-server-path nil
+  "Path for c3-language-server.
+Prefer to build by hand for now."
+  :group 'lsp-c3
+  :risky t
+  :type 'file)
+
+(defcustom lsp-c3-c3-path ""
+  "The path to your C3 executable."
+  :type 'file
+  :group 'lsp-c3)
+
+(defcustom lsp-c3-c3-format-path ""
+  "The path to your c3-format executable.
+
+There is an effort to bring formatting/linting to c3."
+  :type 'file
+  :group 'lsp-c3)
+
+(defcustom lsp-c3-server-args '()
+  "Arguments to pass to the server."
+  :type '(repeat string)
+  :group 'lsp-c3)
+
+(defun lsp-c3--c3-language-server-command ()
+  "Generate LSP startup command for the C3 Language Server."
+  (cons
+   (or lsp-c3-c3-language-server-path
+       (lsp-package-path 'c3-language-server))
+   lsp-c3-server-args))
+
+(defun lsp-clients-c3--make-init-options ()
+  "Init options for C3-language-server."
+  `(:c3Path ,lsp-c3-c3-path
+    :c3FormatPath ,lsp-c3-c3-format-path))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-c3--c3-language-server-command)
+  :language-id "c3-ts"
+  :major-modes '(c3-ts-mode)
+  :priority 0
+  :initialization-options #'lsp-clients-c3--make-init-options
+  :server-id 'c3lsp
+  :download-server-fn (lambda (_client callback _error-callback _update?)
+                        (message "To use this lsp, you need to build it
+and use `lsp-c3-c3-language-server-path` to define where the executable is located.
+
+Hope soon, we integrate with the lsp installation system.")
+                        (funcall callback))))
+
+(lsp-consistency-check lsp-c3)
+
+(provide 'lsp-c3)
+;;; lsp-c3.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-camel.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-camel.el
new file mode 100644
index 0000000..4b65042
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-camel.el
@@ -0,0 +1,67 @@
+;;; lsp-camel.el --- LSP Camel server integration        -*- lexical-binding: t; -*-
+
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-camel nil
+  "LSP support for Camel, using camel-language-server"
+  :group 'lsp-mode
+  :tag "Language Server"
+  :package-version '(lsp-mode . "9.0.0"))
+
+;; Define a variable to store camel language server jar version
+(defconst lsp-camel-jar-version "1.5.0")
+
+;; Define a variable to store camel language server jar name
+(defconst lsp-camel-jar-name (format "camel-lsp-server-%s.jar" lsp-camel-jar-version))
+
+;; Directory in which the servers will be installed. Lsp Server Install Dir: ~/.emacs.d/.cache/camells
+(defcustom lsp-camel-jar-file (f-join lsp-server-install-dir "camells" lsp-camel-jar-name)
+  "Camel Language server jar command."
+  :group 'lsp-camel
+  :type 'file
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-camel-jar-download-url
+  (format "https://repo1.maven.org/maven2/com/github/camel-tooling/camel-lsp-server/%s/%s" lsp-camel-jar-version lsp-camel-jar-name)
+  "Automatic download url for lsp-camel."
+  :type 'string
+  :group 'lsp-camel
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-dependency
+ 'camells
+ '(:system lsp-camel-jar-file)
+ `(:download :url lsp-camel-jar-download-url
+             :store-path lsp-camel-jar-file))
+
+(defcustom lsp-camel-server-command `("java" "-jar" , lsp-camel-jar-file)
+  "Camel server command."
+  :type '(repeat string)
+  :group 'lsp-camel
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-camel--create-connection ()
+  (lsp-stdio-connection
+   (lambda () lsp-camel-server-command)
+   (lambda () (f-exists? lsp-camel-jar-file))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-camel--create-connection)
+                  :activation-fn (lsp-activate-on "xml" "java")
+                  :priority 0
+                  :server-id 'camells
+                  :add-on? t
+                  :multi-root t
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration (lsp-configuration-section "camel"))))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'camells callback error-callback))))
+
+(lsp-consistency-check lsp-camel)
+
+(provide 'lsp-camel)
+;;; lsp-camel.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-clangd.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-clangd.el
new file mode 100644
index 0000000..16b6a03
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-clangd.el
@@ -0,0 +1,322 @@
+;;; lsp-clangd.el --- LSP clients for the C Languages Family -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020 Daniel Martin
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+;; URL: https://github.com/emacs-lsp/lsp-mode
+;; Keywords: languages, c, cpp, clang
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP clients for the C Languages Family.
+
+;; ** Clang-tidy Flycheck integration (Clangd) **
+;;
+;; If you invoke `flycheck-display-error-explanation' on a
+;; `clang-tidy' error (if Clangd is configured to show `clang-tidy'
+;; diagnostics), Emacs will open a detailed explanation about the
+;; message by querying the LLVM website. As an embedded web browser is
+;; used to show the documentation, this feature requires that Emacs is
+;; compiled with libxml2 support.
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'cl-lib)
+(require 'rx)
+(require 'seq)
+(require 'dom)
+(eval-when-compile (require 'subr-x))
+
+(require 'dash)
+(require 's)
+
+(defvar flycheck-explain-error-buffer)
+(declare-function flycheck-error-id "ext:flycheck" (err) t)
+(declare-function flycheck-error-group "ext:flycheck" (err) t)
+(declare-function flycheck-error-message "ext:flycheck" (err) t)
+
+(defcustom lsp-clangd-version "15.0.6"
+  "Clangd version to download.
+It has to be set before `lsp-clangd.el' is loaded and it has to
+be available here: https://github.com/clangd/clangd/releases/"
+  :type 'string
+  :group 'lsp-clangd
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clangd-download-url
+  (format (pcase system-type
+            ('darwin "https://github.com/clangd/clangd/releases/download/%s/clangd-mac-%s.zip")
+            ('windows-nt "https://github.com/clangd/clangd/releases/download/%s/clangd-windows-%s.zip")
+            (_ "https://github.com/clangd/clangd/releases/download/%s/clangd-linux-%s.zip"))
+          lsp-clangd-version
+          lsp-clangd-version)
+  "Automatic download url for clangd"
+  :type 'string
+  :group 'lsp-clangd
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clangd-binary-path
+  (f-join lsp-server-install-dir (format "clangd/clangd_%s/bin"
+                                         lsp-clangd-version)
+          (pcase system-type
+            ('windows-nt "clangd.exe")
+            (_ "clangd")))
+  "The path to `clangd' binary."
+  :type 'file
+  :group 'lsp-clangd
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-dependency
+ 'clangd
+ `(:download :url lsp-clangd-download-url
+             :decompress :zip
+             :store-path ,(f-join lsp-server-install-dir "clangd" "clangd.zip")
+             :binary-path lsp-clangd-binary-path
+             :set-executable? t))
+
+(defun lsp-cpp-flycheck-clang-tidy--skip-http-headers ()
+  "Position point just after HTTP headers."
+  (re-search-forward "^$"))
+
+(defun lsp-cpp-flycheck-clang-tidy--narrow-to-http-body ()
+  "Narrow the current buffer to contain the body of an HTTP response."
+  (lsp-cpp-flycheck-clang-tidy--skip-http-headers)
+  (narrow-to-region (point) (point-max)))
+
+(defun lsp-cpp-flycheck-clang-tidy--decode-region-as-utf8 (start end)
+  "Decode a region from START to END in UTF-8."
+  (condition-case nil
+      (decode-coding-region start end 'utf-8)
+    (coding-system-error nil)))
+
+(defun lsp-cpp-flycheck-clang-tidy--remove-crlf ()
+  "Remove carriage return and line feeds from the current buffer."
+  (save-excursion
+    (while (re-search-forward "\r$" nil t)
+      (replace-match "" t t))))
+
+(defun lsp-cpp-flycheck-clang-tidy--extract-relevant-doc-section ()
+  "Extract the parts of the LLVM clang-tidy documentation that are relevant.
+
+This function assumes that the current buffer contains the result
+of browsing `clang.llvm.org', as returned by `url-retrieve'.
+More concretely, this function returns the main <div> element
+with tag `section', and also removes `headerlinks'."
+  (goto-char (point-min))
+  (lsp-cpp-flycheck-clang-tidy--narrow-to-http-body)
+  (lsp-cpp-flycheck-clang-tidy--decode-region-as-utf8 (point-min) (point-max))
+  (lsp-cpp-flycheck-clang-tidy--remove-crlf)
+  (let* ((dom (libxml-parse-html-region (point-min) (point-max)))
+         (section (dom-by-tag dom 'section)))
+    (dolist (headerlink (dom-by-class section "headerlink"))
+      (dom-remove-node section headerlink))
+    section))
+
+(defun lsp-cpp-flycheck-clang-tidy--explain-error (explanation &rest args)
+  "Explain an error in the Flycheck error explanation buffer using EXPLANATION.
+
+EXPLANATION is a function with optional ARGS that, when
+evaluated, inserts the content in the appropriate Flycheck
+buffer."
+  (with-current-buffer flycheck-explain-error-buffer
+    (let ((inhibit-read-only t)
+          (inhibit-modification-hooks t))
+      (erase-buffer)
+      (apply explanation args)
+      (goto-char (point-min)))))
+
+(defun lsp-cpp-flycheck-clang-tidy--show-loading-status ()
+  "Show a loading string while clang-tidy documentation is fetched from llvm.org.
+Recent versions of `flycheck' call `display-message-or-buffer' to
+display error explanations. `display-message-or-buffer' displays
+the documentation string either in the echo area or in a separate
+window, depending on the string's height. This function forces to
+always display it in a separate window by appending the required
+number of newlines."
+  (let* ((num-lines-threshold
+          (round (if resize-mini-windows
+                     (cond ((floatp max-mini-window-height)
+                            (* (frame-height)
+                               max-mini-window-height))
+                           ((integerp max-mini-window-height)
+                            max-mini-window-height)
+                           (t
+                            1))
+                   1)))
+         (extra-new-lines (make-string (1+ num-lines-threshold) ?\n)))
+    (concat "Loading documentation..." extra-new-lines)))
+
+(defun lsp-cpp-flycheck-clang-tidy--show-documentation (error-id)
+  "Show clang-tidy documentation about ERROR-ID.
+
+Information comes from the clang.llvm.org website."
+  ;; Example error-id: modernize-loop-convert
+  ;; Example url: https://clang.llvm.org/extra/clang-tidy/checks/modernize/loop-convert.html
+  (setq error-id (s-join "/" (s-split-up-to "-" error-id 1 t)))
+  (url-retrieve (format
+                 "https://clang.llvm.org/extra/clang-tidy/checks/%s.html" error-id)
+                (lambda (status)
+                  (if-let* ((error-status (plist-get status :error)))
+                      (lsp-cpp-flycheck-clang-tidy--explain-error
+                       #'insert
+                       (format
+                        "Error accessing clang-tidy documentation: %s"
+                        (error-message-string error-status)))
+                    (let ((doc-contents
+                           (lsp-cpp-flycheck-clang-tidy--extract-relevant-doc-section)))
+                      (lsp-cpp-flycheck-clang-tidy--explain-error
+                       #'shr-insert-document doc-contents)))))
+  (lsp-cpp-flycheck-clang-tidy--show-loading-status))
+
+;;;###autoload
+(defun lsp-cpp-flycheck-clang-tidy-error-explainer (error)
+  "Explain a clang-tidy ERROR by scraping documentation from llvm.org."
+  (unless (fboundp 'libxml-parse-html-region)
+    (error "This function requires Emacs to be compiled with libxml2"))
+  (if-let* ((clang-tidy-error-id (flycheck-error-id error)))
+      (condition-case err
+          (lsp-cpp-flycheck-clang-tidy--show-documentation clang-tidy-error-id)
+        (error
+         (format
+          "Error accessing clang-tidy documentation: %s"
+          (error-message-string err))))
+    (error "The clang-tidy error message does not contain an [error-id]")))
+
+
+;;; lsp-clangd
+(defgroup lsp-clangd nil
+  "LSP support for C-family languages (C, C++, Objective-C, Objective-C++, CUDA), using clangd."
+  :group 'lsp-mode
+  :link '(url-link "https://clang.llvm.org/extra/clangd"))
+
+(defcustom lsp-clients-clangd-executable nil
+  "The clangd executable to use.
+When `'non-nil' use the name of the clangd executable file
+available in your path to use. Otherwise the system will try to
+find a suitable one. Set this variable before loading lsp."
+  :group 'lsp-clangd
+  :risky t
+  :type '(choice (file :tag "Path")
+                 (const :tag "Auto" nil)))
+
+(defvar lsp-clients--clangd-default-executable nil
+  "Clang default executable full path when found.
+This must be set only once after loading the clang client.")
+
+(defcustom lsp-clients-clangd-args '("--header-insertion-decorators=0")
+  "Extra arguments for the clangd executable."
+  :group 'lsp-clangd
+  :risky t
+  :type '(repeat string))
+
+(defcustom lsp-clients-clangd-library-directories '("/usr")
+  "List of directories which will be considered to be libraries."
+  :risky t
+  :type '(repeat string)
+  :group 'lsp-clangd
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-clients--clangd-command ()
+  "Generate the language server startup command."
+  (unless lsp-clients--clangd-default-executable
+    (setq lsp-clients--clangd-default-executable
+          (or (lsp-package-path 'clangd)
+              (-first #'executable-find
+                      (-map (lambda (version)
+                              (concat "clangd" version))
+                            ;; Prefer `clangd` without a version number appended.
+                            (cl-list* "" (-map
+                                          (lambda (vernum) (format "-%d" vernum))
+                                          (number-sequence 17 6 -1)))))
+              (lsp-clients-executable-find "xcodebuild" "-find-executable" "clangd")
+              (lsp-clients-executable-find "xcrun" "--find" "clangd"))))
+
+  `(,(or lsp-clients-clangd-executable lsp-clients--clangd-default-executable "clangd")
+    ,@lsp-clients-clangd-args))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   'lsp-clients--clangd-command)
+                  :activation-fn (lsp-activate-on "c" "cpp" "objective-c" "cuda")
+                  :priority -1
+                  :server-id 'clangd
+                  :library-folders-fn (lambda (_workspace) lsp-clients-clangd-library-directories)
+                  :semantic-tokens-faces-overrides '(:types (("dependent"  . lsp-face-semhl-type)
+                                                             ("concept"    . lsp-face-semhl-interface)
+                                                             ("member"     . lsp-face-semhl-member)))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'clangd callback error-callback))))
+
+(defun lsp-clangd-join-region (beg end)
+  "Apply join-line from BEG to END.
+This function is useful when an indented function prototype needs
+to be shown in a single line."
+  (save-excursion
+    (let ((end (copy-marker end)))
+      (goto-char beg)
+      (while (< (point) end)
+        (join-line 1)))
+    (s-trim (buffer-string))))
+
+(cl-defmethod lsp-clients-extract-signature-on-hover (contents (_server-id (eql clangd)))
+  "Extract a representative line from clangd's CONTENTS, to show in the echo area.
+This function tries to extract the type signature from CONTENTS,
+or the first line if it cannot do so. A single line is always
+returned to avoid that the echo area grows uncomfortably."
+  (with-temp-buffer
+    (-let [value (lsp:markup-content-value contents)]
+      (insert value)
+      (goto-char (point-min))
+      (if (re-search-forward (rx (seq "```cpp\n"
+                                      (opt (group "//"
+                                                  (zero-or-more nonl)
+                                                  "\n"))
+                                      (group
+                                       (one-or-more
+                                        (not (any "`")))
+                                       "\n")
+                                      "```")) nil t nil)
+          (progn (narrow-to-region (match-beginning 2) (match-end 2))
+                 (lsp--render-element (lsp-make-marked-string
+                                       :language "cpp"
+                                       :value (lsp-clangd-join-region (point-min) (point-max)))))
+        (car (s-lines (lsp--render-element contents)))))))
+
+(cl-defmethod lsp-diagnostics-flycheck-error-explainer (e (_server-id (eql clangd)))
+  "Explain a `flycheck-error' E that was generated by the Clangd language server."
+  (cond ((string-equal "clang-tidy" (flycheck-error-group e))
+         (lsp-cpp-flycheck-clang-tidy-error-explainer e))
+        (t (flycheck-error-message e))))
+
+(defun lsp-clangd-find-other-file (&optional new-window)
+  "Switch between the corresponding C/C++ source and header file.
+If NEW-WINDOW (interactively the prefix argument) is non-nil,
+open in a new window.
+
+Only works with clangd."
+  (interactive "P")
+  (let ((other (lsp-send-request (lsp-make-request
+                                  "textDocument/switchSourceHeader"
+                                  (lsp--text-document-identifier)))))
+    (unless (s-present? other)
+      (user-error "Could not find other file"))
+    (funcall (if new-window #'find-file-other-window #'find-file)
+             (lsp--uri-to-path other))))
+
+(lsp-consistency-check lsp-clangd)
+
+(provide 'lsp-clangd)
+;;; lsp-clangd.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-clojure.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-clojure.el
new file mode 100644
index 0000000..bf6576a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-clojure.el
@@ -0,0 +1,647 @@
+;;; lsp-clojure.el --- Clojure Client settings -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Benedek Fazekas
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Benedek Fazekas <benedek.fazekas@gmail.com>
+;; Keywords: languages,tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-clojure client
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-protocol)
+(require 'cl-lib)
+(require 'lsp-semantic-tokens)
+
+(defgroup lsp-clojure nil
+  "LSP support for Clojure."
+  :link '(url-link "https://github.com/clojure-lsp/clojure-lsp")
+  :group 'lsp-mode
+  :tag "Lsp Clojure")
+
+(define-obsolete-variable-alias 'lsp-clojure-server-command
+  'lsp-clojure-custom-server-command  "lsp-mode 8.0.0")
+
+(defcustom lsp-clojure-custom-server-command nil
+  "The clojure-lisp server command."
+  :group 'lsp-clojure
+  :risky t
+  :type '(repeat string))
+
+(defcustom lsp-clojure-server-download-url
+  (format "https://github.com/clojure-lsp/clojure-lsp/releases/latest/download/clojure-lsp-native-%s.zip"
+          (let ((arch (car (split-string system-configuration "-"))))
+            (pcase system-type
+              ('gnu/linux (concat "linux-"
+                                  (cond
+                                   ((string= "x86_64" arch) "amd64")
+                                   (t arch))))
+              ('darwin (concat "macos-"
+                               (cond
+                                ((string= "x86_64" arch) "amd64")
+                                (t arch))))
+              ('windows-nt "windows-amd64"))))
+  "Automatic download url for lsp-clojure."
+  :type 'string
+  :group 'lsp-clojure
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clojure-server-store-path
+  (f-join lsp-server-install-dir
+          "clojure"
+          (if (eq system-type 'windows-nt)
+              "clojure-lsp.exe"
+            "clojure-lsp"))
+  "The path to the file in which `clojure-lsp' will be stored."
+  :type 'file
+  :group 'lsp-clojure
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clojure-trace-enable nil
+  "Enable trace logs between client and clojure-lsp server."
+  :group 'lsp-clojure
+  :type 'boolean)
+
+(defcustom lsp-clojure-workspace-dir (expand-file-name (locate-user-emacs-file "workspace/"))
+  "LSP clojure workspace directory."
+  :group 'lsp-clojure
+  :risky t
+  :type 'directory)
+
+(defcustom lsp-clojure-workspace-cache-dir (expand-file-name ".cache/" lsp-clojure-workspace-dir)
+  "LSP clojure workspace cache directory."
+  :group 'lsp-clojure
+  :risky t
+  :type 'directory)
+
+(defcustom lsp-clojure-library-dirs (list lsp-clojure-workspace-cache-dir
+                                          (expand-file-name "~/.gitlibs/libs"))
+  "LSP clojure dirs that should be considered library folders."
+  :group 'lsp-clojure
+  :type '(repeat directory))
+
+(defcustom lsp-clojure-test-tree-position-params nil
+  "The optional test tree position params.
+Defaults to side following treemacs default."
+  :type 'alist
+  :group 'lsp-clojure)
+
+(defcustom lsp-clojure-project-tree-position-params nil
+  "The optional project tree position params.
+Defaults to side following treemacs default."
+  :type 'alist
+  :group 'lsp-clojure)
+
+;; Internal
+
+(eval-and-compile
+  (lsp-interface (Clojure:CursorInfoParams (:textDocument :position) nil)))
+
+(lsp-dependency
+ 'clojure-lsp
+ `(:download :url lsp-clojure-server-download-url
+   :decompress :zip
+   :store-path lsp-clojure-server-store-path
+   :set-executable? t)
+ '(:system "clojure-lsp"))
+
+;; Refactorings
+
+(defun lsp-clojure--execute-command (command &optional args)
+  "Send an executeCommand request for COMMAND with ARGS."
+  (lsp--cur-workspace-check)
+  (lsp-send-execute-command command (apply #'vector args)))
+
+(defun lsp-clojure--refactoring-call (refactor-name &rest additional-args)
+  "Send an executeCommand request for REFACTOR-NAME with ADDITIONAL-ARGS.
+If there are more arguments expected after the line and column numbers."
+  (lsp--cur-workspace-check)
+  (lsp-clojure--execute-command refactor-name (cl-list* (lsp--buffer-uri)
+                                                        (- (line-number-at-pos) 1) ;; clojure-lsp expects line numbers to start at 0
+                                                        (current-column)
+                                                        additional-args)))
+
+(defun lsp-clojure-add-import-to-namespace (import-name)
+  "Add to IMPORT-NAME to :import form."
+  (interactive "MImport name: ")
+  (lsp-clojure--refactoring-call "add-import-to-namespace" import-name))
+
+(defun lsp-clojure-add-missing-libspec ()
+  "Apply add-missing-libspec refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "add-missing-libspec"))
+
+(defun lsp-clojure-clean-ns ()
+  "Apply clean-ns refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "clean-ns"))
+
+(defun lsp-clojure-cycle-coll ()
+  "Apply cycle-coll refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "cycle-coll"))
+
+(defun lsp-clojure-cycle-privacy ()
+  "Apply cycle-privacy refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "cycle-privacy"))
+
+(defun lsp-clojure-expand-let ()
+  "Apply expand-let refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "expand-let"))
+
+(defun lsp-clojure-extract-function (function-name)
+  "Move form at point into a new function named FUNCTION-NAME.
+When a region is active, extract the selected expressions.  Otherwise,
+extract the form at point.
+
+clojure-lsp 2026.01+ always expects the range-based form of the
+`extract-function' command, so we always send the 6-argument form.
+When there is no active region we send the cursor position for both
+start and end, which the server treats as a single-cursor selection
+and then extracts the parent expression at point."
+  (interactive "MFunction name: ") ;; Name of the function
+  (let* ((start (if (use-region-p) (region-beginning) (point)))
+         (end (if (use-region-p) (region-end) (point))))
+    (lsp-clojure--execute-command
+     "extract-function"
+     (list (lsp--buffer-uri)
+           (- (line-number-at-pos start) 1) ;; clojure-lsp expects line numbers to start at 0
+           (save-excursion (goto-char start) (current-column))
+           function-name
+           (- (line-number-at-pos end) 1)
+           (save-excursion (goto-char end) (current-column))))))
+
+(defun lsp-clojure-inline-symbol ()
+  "Apply inline-symbol refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "inline-symbol"))
+
+(defun lsp-clojure-introduce-let (binding-name)
+  "Move form at point into a new let binding as BINDING-NAME."
+  (interactive "MBinding name: ") ;; Name of the let binding
+  (lsp-clojure--refactoring-call "introduce-let" binding-name))
+
+(defun lsp-clojure-move-to-let (binding-name)
+  "Move form at point into nearest existing let binding as BINDING-NAME."
+  (interactive "MBinding name: ") ;; Name of the let binding
+  (lsp-clojure--refactoring-call "move-to-let" binding-name))
+
+(defun lsp-clojure-thread-first ()
+  "Apply thread-first refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "thread-first"))
+
+(defun lsp-clojure-thread-first-all ()
+  "Apply thread-first-all refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "thread-first-all"))
+
+(defun lsp-clojure-thread-last ()
+  "Apply thread-last refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "thread-last"))
+
+(defun lsp-clojure-thread-last-all ()
+  "Apply thread-last-all refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "thread-last-all"))
+
+(defun lsp-clojure-unwind-all ()
+  "Apply unwind-all refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "unwind-all"))
+
+(defun lsp-clojure-unwind-thread ()
+  "Apply unwind-thread refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "unwind-thread"))
+
+(defun lsp-clojure-create-function ()
+  "Apply create-function refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "create-function"))
+
+(defun lsp-clojure-create-test ()
+  "Apply create-test refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "create-test"))
+
+(defun lsp-clojure-sort-map ()
+  "Apply sort-map refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "sort-map"))
+
+(defun lsp-clojure-move-coll-entry-up ()
+  "Apply move coll entry up refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "move-coll-entry-up"))
+
+(defun lsp-clojure-move-coll-entry-down ()
+  "Apply move coll entry down refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "move-coll-entry-down"))
+
+(defun lsp-clojure-forward-slurp ()
+  "Apply forward slurp refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "forward-slurp"))
+
+(defun lsp-clojure-forward-barf ()
+  "Apply forward barf refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "forward-barf"))
+
+(defun lsp-clojure-backward-slurp ()
+  "Apply backward slurp refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "backward-slurp"))
+
+(defun lsp-clojure-backward-barf ()
+  "Apply backward slurp refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "backward-barf"))
+
+(defun lsp-clojure-kill-sexpr ()
+  "Apply kill sexpr refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "kill-sexp"))
+
+(defun lsp-clojure-raise-sexpr ()
+  "Apply raise refactoring at point."
+  (interactive)
+  (lsp-clojure--refactoring-call "raise-sexp"))
+
+(defun lsp-clojure-move-form (dest-filename)
+  "Apply move-form refactoring at point to DEST-FILENAME."
+  (interactive
+   (list (or (read-file-name "Move form to: ")
+             (user-error "No filename selected. Aborting"))))
+  (lsp-clojure--refactoring-call "move-form" (expand-file-name dest-filename)))
+
+(defun lsp-clojure-server-info ()
+  "Request server info."
+  (interactive)
+  (lsp--cur-workspace-check)
+  (lsp-notify "clojure/serverInfo/log" nil))
+
+(defvar lsp-clojure-server-buffer-name "*lsp-clojure-server-log*")
+
+(defun lsp-clojure--server-log-revert-function (original-file-log-buffer &rest _)
+  "Spit contents to ORIGINAL-FILE-LOG-BUFFER."
+  (with-current-buffer (get-buffer-create lsp-clojure-server-buffer-name)
+    (erase-buffer)
+    (insert (with-current-buffer original-file-log-buffer (buffer-string)))
+    (goto-char (point-max))
+    (read-only-mode)))
+
+(defun lsp-clojure-server-log ()
+  "Open a buffer with the server logs."
+  (interactive)
+  (lsp--cur-workspace-check)
+  (let* ((log-path (-> (lsp--json-serialize (lsp-request "clojure/serverInfo/raw" nil))
+                       (lsp--read-json)
+                       (lsp-get :log-path))))
+    (with-current-buffer (find-file log-path)
+      (read-only-mode)
+      (goto-char (point-max)))))
+
+(defun lsp-clojure-server-info-raw ()
+  "Request server info raw data."
+  (interactive)
+  (lsp--cur-workspace-check)
+  (message "%s" (lsp--json-serialize (lsp-request "clojure/serverInfo/raw" nil))))
+
+(defun lsp-clojure-cursor-info ()
+  "Request cursor info at point."
+  (interactive)
+  (lsp--cur-workspace-check)
+  (lsp-notify "clojure/cursorInfo/log"
+              (lsp-make-clojure-cursor-info-params
+               :textDocument (lsp-make-text-document-identifier :uri (lsp--buffer-uri))
+               :position (lsp-make-position :line (- (line-number-at-pos) 1)
+                                            :character (current-column)))))
+
+(defun lsp-clojure-resolve-macro-as ()
+  "Ask to user how the unresolved macro should be resolved."
+  (interactive)
+  (lsp--cur-workspace-check)
+  (lsp-clojure--execute-command "resolve-macro-as"
+                                (list (lsp--buffer-uri)
+                                      (- (line-number-at-pos) 1) ;; clojure-lsp expects line numbers to start at 0
+                                      (current-column))))
+
+(defun lsp-clojure--ensure-dir (path)
+  "Ensure that directory PATH exists."
+  (unless (file-directory-p path)
+    (make-directory path t)))
+
+(defun lsp-clojure--get-metadata-location (file-location)
+  "Given a FILE-LOCATION return the file containing the metadata for the file."
+  (format "%s.%s.metadata"
+          (file-name-directory file-location)
+          (file-name-base file-location)))
+
+(defun lsp-clojure--file-in-jar (uri)
+  "Check URI for a valid jar and include it in workspace."
+  (string-match "^\\(jar\\|zip\\):\\(file:.+\\)!/\\(.+\\)" uri)
+  (let* ((ns-path (match-string 3 uri))
+         (ns (s-replace "/" "." ns-path))
+         (file-location (concat lsp-clojure-workspace-cache-dir ns)))
+    (unless (file-readable-p file-location)
+      (lsp-clojure--ensure-dir (file-name-directory file-location))
+      (with-lsp-workspace (lsp-find-workspace 'clojure-lsp nil)
+        (let ((content (lsp-send-request (lsp-make-request "clojure/dependencyContents" (list :uri uri)))))
+          (with-temp-file file-location
+            (insert content))
+          (with-temp-file (lsp-clojure--get-metadata-location file-location)
+            (insert uri)))))
+    file-location))
+
+(defun lsp-clojure--server-executable-path ()
+  "Return the clojure-lsp server command."
+  (or (executable-find "clojure-lsp")
+      (lsp-package-path 'clojure-lsp)))
+
+(lsp-defun lsp-clojure--show-references ((&Command :arguments? args))
+  "Show references for command with ARGS.
+ARGS is a vector which the first element is the uri, the second the line
+and the third the column."
+  (lsp-show-xrefs
+   (lsp--locations-to-xref-items
+    (lsp-request "textDocument/references"
+                 (lsp--make-reference-params
+                  (lsp--text-document-position-params
+                   (list :uri (seq-elt args 0))
+                   (list :line (1- (seq-elt args 1))
+                         :character (1- (seq-elt args 2)))))))
+   nil
+   t))
+
+;; Test tree
+
+(defvar-local lsp-clojure--test-tree-data nil)
+(defconst lsp-clojure--test-tree-buffer-name "*Clojure Test Tree*")
+
+(defvar treemacs-position)
+(defvar treemacs-width)
+(declare-function lsp-treemacs-render "ext:lsp-treemacs" (tree title expand-depth &optional buffer-name right-click-actions clear-cache?))
+(declare-function lsp-treemacs--open-file-in-mru "ext:lsp-treemacs" (file))
+
+(defun lsp-clojure--test-tree-ret-action (uri range)
+  "Build the ret action for an item in the test tree view.
+URI is the source of the item.
+RANGE is the range of positions to where this item should point."
+  (interactive)
+  (lsp-treemacs--open-file-in-mru (lsp--uri-to-path uri))
+  (goto-char (lsp--position-to-point (lsp:range-start range)))
+  (run-hooks 'xref-after-jump-hook))
+
+(lsp-defun lsp-clojure--test-tree-data->tree (uri (&clojure-lsp:TestTreeNode :name :range :kind :children?))
+  "Builds a test tree.
+URI is the source of the test tree.
+NODE is the node with all test children data."
+  (-let* ((icon (cl-case kind
+                  (1 'namespace)
+                  (2 'method)
+                  (3 'field)))
+          (base-tree (list :key name
+                           :label name
+                           :icon icon
+                           :ret-action (lambda (&rest _) (lsp-clojure--test-tree-ret-action uri range))
+                           :uri uri)))
+    (if (seq-empty-p children?)
+        base-tree
+      (plist-put base-tree :children (seq-map (-partial #'lsp-clojure--test-tree-data->tree uri) children?)))))
+
+(lsp-defun lsp-clojure--render-test-tree ((&clojure-lsp:TestTreeParams :uri :tree))
+  "Render a test tree view for current test tree buffer data."
+  (save-excursion
+    (lsp-treemacs-render
+     (list (lsp-clojure--test-tree-data->tree uri tree))
+     "Clojure Test Tree"
+     t
+     lsp-clojure--test-tree-buffer-name)))
+
+(defun lsp-clojure--show-test-tree (ignore-focus?)
+  "Show a test tree for current buffer.
+Focus on it if IGNORE-FOCUS? is nil."
+  (if lsp-clojure--test-tree-data
+      (-let* ((tree-buffer (lsp-clojure--render-test-tree lsp-clojure--test-tree-data))
+              (position-params (or lsp-clojure-test-tree-position-params
+                                   `((side . ,treemacs-position)
+                                     (slot . 2)
+                                     (window-width . ,treemacs-width))))
+              (window (display-buffer-in-side-window tree-buffer position-params)))
+        (unless ignore-focus?
+          (select-window window)
+          (set-window-dedicated-p window t)))
+    (unless ignore-focus?
+      (lsp-log "No Clojure test tree data found."))))
+
+(lsp-defun lsp-clojure--handle-test-tree (_workspace (notification &as &clojure-lsp:TestTreeParams :uri))
+  "Test tree notification handler for workspace WORKSPACE.
+NOTIFICATION is the test tree notification data received from server.
+It updates the test tree view data."
+  (when (require 'lsp-treemacs nil t)
+    (when-let* ((buffer (find-buffer-visiting (lsp--uri-to-path uri))))
+      (with-current-buffer buffer
+        (setq lsp-clojure--test-tree-data notification)
+        (when (get-buffer-window lsp-clojure--test-tree-buffer-name)
+          (lsp-clojure--show-test-tree t))))))
+
+;;;###autoload
+(defun lsp-clojure-show-test-tree (ignore-focus?)
+  "Show a test tree and focus on it if IGNORE-FOCUS? is nil."
+  (interactive "P")
+  (if (require 'lsp-treemacs nil t)
+      (lsp-clojure--show-test-tree ignore-focus?)
+    (error "The package lsp-treemacs is not installed")))
+
+;; Project Tree
+
+(defconst lsp-clojure--project-tree-buffer-name "*Clojure Project Tree*")
+
+(defun lsp-clojure--project-tree-type->icon (type)
+  "Convert the project tree type TYPE to icon."
+  (cl-case type
+    (1 'project)
+    (2 'folder)
+    (3 'library)
+    (4 'jar)
+    (5 'namespace)
+    (6 'class)
+    (7 'method)
+    (8 'variable)
+    (9 'interface)))
+
+(defun lsp-clojure--project-tree-ret-action (uri range)
+  "Build the ret action for an item in the project tree view.
+URI is the source of the item."
+  (interactive)
+  (lsp-treemacs--open-file-in-mru (lsp--uri-to-path uri))
+  (goto-char (lsp--position-to-point (lsp:range-start range)))
+  (run-hooks 'xref-after-jump-hook))
+
+(lsp-defun lsp-clojure--project-tree-children-data->tree (buffer current-node &optional _ callback)
+  "Builds a project tree considering CURRENT-NODE."
+  (with-current-buffer buffer
+    (lsp-request-async
+     "clojure/workspace/projectTree/nodes"
+     current-node
+     (-lambda ((&clojure-lsp:ProjectTreeNode :nodes?))
+       (funcall
+        callback
+        (-map
+         (-lambda ((node &as &clojure-lsp:ProjectTreeNode :id? :name :type :uri? :range? :detail? :final?))
+           (-let ((label (if detail?
+                             (format "%s %s" name (propertize detail? 'face 'lsp-details-face))
+                           name)))
+             `(:label ,label
+               :key ,(or id? name)
+               :icon ,(lsp-clojure--project-tree-type->icon type)
+               ,@(unless final?
+                   (list :children-async  (-partial #'lsp-clojure--project-tree-children-data->tree buffer node)))
+               ,@(when uri?
+                   (list :uri uri?
+                         :ret-action (lambda (&rest _)
+                                       (interactive)
+                                       (lsp-clojure--project-tree-ret-action uri? range?)))))))
+         nodes?)))
+     :mode 'detached)))
+
+(defun lsp-clojure--project-tree-data->tree ()
+  "Builds a project tree considering CURRENT-NODE."
+  (-let* (((&clojure-lsp:ProjectTreeNode :id? :name :nodes? :uri?) (lsp-request "clojure/workspace/projectTree/nodes" nil))
+          (buffer (current-buffer)))
+    (list :key (or id? name)
+          :label name
+          :icon "clj"
+          :children (seq-map (-lambda ((node &as &clojure-lsp:ProjectTreeNode :id? :name :type :uri?))
+                               (list :key (or id? name)
+                                     :label name
+                                     :icon (lsp-clojure--project-tree-type->icon type)
+                                     :children-async (-partial #'lsp-clojure--project-tree-children-data->tree buffer node)
+                                     :uri uri?))
+                             nodes?)
+          :uri uri?)))
+
+(defun lsp-clojure--render-project-tree ()
+  "Render a project tree view."
+  (save-excursion
+    (lsp-treemacs-render
+     (list (lsp-clojure--project-tree-data->tree))
+     "Clojure Project Tree"
+     nil
+     lsp-clojure--project-tree-buffer-name
+     nil
+     t)))
+
+(defun lsp-clojure--show-project-tree (ignore-focus?)
+  "Show a project tree for current project.
+Focus on it if IGNORE-FOCUS? is nil."
+  (-let* ((tree-buffer (lsp-clojure--render-project-tree))
+          (position-params (or lsp-clojure-project-tree-position-params
+                               `((side . ,treemacs-position)
+                                 (slot . 2)
+                                 (window-width . ,treemacs-width))))
+          (window (display-buffer-in-side-window tree-buffer position-params)))
+    (unless ignore-focus?
+      (select-window window)
+      (set-window-dedicated-p window t))))
+
+;;;###autoload
+(defun lsp-clojure-show-project-tree (ignore-focus?)
+  "Show a project tree with source-paths and dependencies.
+Focus on it if IGNORE-FOCUS? is nil."
+  (interactive "P")
+  (if (require 'lsp-treemacs nil t)
+      (lsp-clojure--show-project-tree ignore-focus?)
+    (error "The package lsp-treemacs is not installed")))
+
+(defun lsp-clojure--build-command ()
+  "Build clojure-lsp start command."
+  (let* ((base-command (or lsp-clojure-custom-server-command
+                           (-some-> (lsp-clojure--server-executable-path) list))))
+    (if lsp-clojure-trace-enable
+        (-map-last #'stringp
+                   (lambda (command)
+                     (concat command " --trace"))
+                   base-command)
+      base-command)))
+
+(lsp-register-client
+ (make-lsp-client
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'clojure-lsp callback error-callback))
+  :semantic-tokens-faces-overrides '(:types (("macro" . font-lock-keyword-face)
+                                             ("keyword" . clojure-keyword-face)
+                                             ("event" . default)))
+  :new-connection (lsp-stdio-connection
+                   #'lsp-clojure--build-command
+                   #'lsp-clojure--build-command)
+  :major-modes '(clojure-mode clojurec-mode clojurescript-mode
+                 clojure-ts-mode clojure-ts-clojurec-mode clojure-ts-clojurescript-mode
+                 edn-mode)
+  :library-folders-fn (lambda (_workspace) lsp-clojure-library-dirs)
+  :uri-handlers (lsp-ht ("jar" #'lsp-clojure--file-in-jar))
+  :action-handlers (lsp-ht ("code-lens-references" #'lsp-clojure--show-references))
+  :notification-handlers (lsp-ht ("clojure/textDocument/testTree" #'lsp-clojure--handle-test-tree))
+  :initialization-options '(:dependency-scheme "jar"
+                            :show-docs-arity-on-same-line? t)
+  :custom-capabilities `((experimental . ((testTree . ,(and (require 'lsp-treemacs nil t) t)))))
+  :server-id 'clojure-lsp))
+
+(lsp-consistency-check lsp-clojure)
+
+;; For debugging
+
+(declare-function cider-connect-clj "ext:cider" (params))
+
+(defun lsp-clojure-nrepl-connect ()
+  "Connect to the running nrepl debug server of clojure-lsp."
+  (interactive)
+  (let ((info (lsp-clojure-server-info-raw)))
+    (save-match-data
+      (when (functionp 'cider-connect-clj)
+        (when-let* ((port (and (string-match "\"port\":\\([0-9]+\\)" info)
+                              (match-string 1 info))))
+          (cider-connect-clj `(:host "localhost"
+                               :port ,port)))))))
+
+;; Cider integration
+
+(defun lsp-clojure-semantic-tokens-refresh (&rest _)
+  "Force refresh semantic tokens."
+  (when-let* ((workspace (and lsp-semantic-tokens-enable
+                             (lsp-find-workspace 'clojure-lsp (buffer-file-name)))))
+    (--each (lsp--workspace-buffers workspace)
+      (when (lsp-buffer-live-p it)
+        (lsp-with-current-buffer it
+          (lsp-semantic-tokens--enable))))))
+
+(with-eval-after-load 'cider
+  (when lsp-semantic-tokens-enable
+    ;; refresh tokens as cider flush font-faces after disconnected
+    (add-hook 'cider-mode-hook #'lsp-clojure-semantic-tokens-refresh)))
+
+(provide 'lsp-clojure)
+;;; lsp-clojure.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cmake.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cmake.el
new file mode 100644
index 0000000..3124704
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cmake.el
@@ -0,0 +1,62 @@
+;;; lsp-cmake.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2023 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, cmake
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the CMake build tool.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-cmake nil
+  "LSP support for CMake, using cmake-language-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/regen100/cmake-language-server"))
+
+(defcustom lsp-cmake-server-command "cmake-language-server"
+  "The binary (or full path to binary) which executes the server."
+  :type 'string
+  :group 'lsp-cmake
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-cmake--download-server (_client callback error-callback update?)
+  "Install/update CMake language server using `pip
+
+Will invoke CALLBACK or ERROR-CALLBACK based on result.
+Will update if UPDATE? is t."
+  (lsp-async-start-process
+   callback
+   error-callback
+   "pip" "install" "cmake-language-server" (when update? "-U")))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     lsp-cmake-server-command))
+                  :activation-fn (lsp-activate-on "cmake")
+                  :priority -1
+                  :server-id 'cmakels
+                  :download-server-fn #'lsp-cmake--download-server))
+
+(lsp-consistency-check lsp-cmake)
+
+(provide 'lsp-cmake)
+;;; lsp-cmake.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cobol.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cobol.el
new file mode 100644
index 0000000..9165d3a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cobol.el
@@ -0,0 +1,155 @@
+;;; lsp-cobol.el --- COBOL support  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024  Shen, Jen-Chieh
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; COBOL support.
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-cobol nil
+  "LSP support for COBOL."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/eclipse-che4z/che-che4z-lsp-for-cobol")
+  :package-version `(lsp-mode . "9.0.0"))
+
+(defcustom lsp-cobol-server-path nil
+  "Path points for COBOL language service.
+
+This is only for development use."
+  :type 'string
+  :group 'lsp-cobol)
+
+(defcustom lsp-cobol-port 1044
+  "Port to connect server to."
+  :type 'integer
+  :group 'lsp-cobol)
+
+;;
+;;; Installation
+
+(defcustom lsp-cobol-server-store-path
+  (expand-file-name "cobol/" lsp-server-install-dir)
+  "The path to the file in which COBOL language service will be stored."
+  :type 'file
+  :group 'lsp-cobol)
+
+(defcustom lsp-cobol-server-version "2.1.1"
+  "The COBOL language service version to install."
+  :type 'file
+  :group 'lsp-cobol)
+
+(defconst lsp-cobol-download-url-format
+  "https://github.com/eclipse-che4z/che-che4z-lsp-for-cobol/releases/download/%s/cobol-language-support-%s-%s-%s%s.vsix"
+  "Format to the download url link.")
+
+(defun lsp-cobol--server-url ()
+  "Return Url points to the cobol language service's zip/tar file."
+  (let* ((x86 (string-prefix-p "x86_64" system-configuration))
+         (arch (if x86 "x64" "arm64"))
+         (version lsp-cobol-server-version))
+    (cl-case system-type
+      ((cygwin windows-nt ms-dos)
+       (format lsp-cobol-download-url-format
+               version "win32" arch version "-signed"))
+      (darwin
+       (format lsp-cobol-download-url-format
+               version "darwin" arch version ""))
+      (gnu/linux
+       (format lsp-cobol-download-url-format
+               version "linux" arch version "")))))
+
+(defun lsp-cobol--stored-executable ()
+  "Return the stored COBOL language service executable."
+  (f-join lsp-cobol-server-store-path
+          (concat "extension/server/native/"
+                  (cl-case system-type
+                    ((cygwin windows-nt ms-dos) "engine.exe")
+                    (darwin                     "server-mac")
+                    (gnu/linux                  "server-linux")))))
+
+(lsp-dependency
+ 'cobol-ls
+ '(:system "cobol-ls")
+ `(:download :url ,(lsp-cobol--server-url)
+             :decompress :zip
+             :store-path ,(f-join lsp-cobol-server-store-path "temp")
+             :set-executable? t)
+ `(:system ,(lsp-cobol--stored-executable)))
+
+;;
+;;; Server
+
+;;;###autoload
+(add-hook 'cobol-mode-hook #'lsp-cobol-start-ls)
+
+;;;###autoload
+(defun lsp-cobol-start-ls ()
+  "Start the COBOL language service."
+  (interactive)
+  (when-let* ((exe (lsp-cobol--executable))
+             ((lsp--port-available "localhost" lsp-cobol-port)))
+    (lsp-async-start-process #'ignore #'ignore exe)))
+
+;;
+;;; Core
+
+(defun lsp-cobol--executable ()
+  "Return the COBOL language service executable."
+  (or lsp-cobol-server-path
+      (lsp-cobol--stored-executable)))
+
+(defun lsp-cobol-server-start-fn (&rest _)
+  "Define COOBL language service start function."
+  `(,(lsp-cobol--executable)))
+
+(defun lsp-cobol--tcp-connect-to-port ()
+  "Define a TCP connection to language server."
+  (list
+   :connect
+   (lambda (filter sentinel name _environment-fn _workspace)
+     (let* ((host "localhost")
+            (port lsp-cobol-port)
+            (tcp-proc (lsp--open-network-stream host port (concat name "::tcp"))))
+
+       ;; TODO: Same :noquery issue (see above)
+       (set-process-query-on-exit-flag tcp-proc nil)
+       (set-process-filter tcp-proc filter)
+       (set-process-sentinel tcp-proc sentinel)
+       (cons tcp-proc tcp-proc)))
+   :test? (lambda () (file-executable-p (lsp-cobol--executable)))))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-cobol--tcp-connect-to-port)
+  :activation-fn (lsp-activate-on "cobol")
+  :priority -1
+  :server-id 'cobol-ls
+  :download-server-fn
+  (lambda (_client callback error-callback _update?)
+    (lsp-package-ensure 'cobol-ls callback error-callback))))
+
+(lsp-consistency-check lsp-cobol)
+
+(provide 'lsp-cobol)
+;;; lsp-cobol.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-completion.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-completion.el
new file mode 100644
index 0000000..04e0ba7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-completion.el
@@ -0,0 +1,965 @@
+;;; lsp-completion.el --- LSP completion -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;;  LSP completion
+;;
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-completion nil
+  "LSP support for completion."
+  :prefix "lsp-completion-"
+  :group 'lsp-mode
+  :tag "LSP Completion")
+
+;;;###autoload
+(define-obsolete-variable-alias 'lsp-prefer-capf
+  'lsp-completion-provider  "lsp-mode 7.0.1")
+
+(defcustom lsp-completion-provider :capf
+  "The completion backend provider."
+  :type '(choice
+          (const :tag "Use company-capf" :capf)
+          (const :tag "None" :none))
+  :group 'lsp-completion
+  :package-version '(lsp-mode . "7.0.1"))
+
+;;;###autoload
+(define-obsolete-variable-alias 'lsp-enable-completion-at-point
+  'lsp-completion-enable "lsp-mode 7.0.1")
+
+;;;###autoload
+(defcustom lsp-completion-enable t
+  "Enable `completion-at-point' integration."
+  :type 'boolean
+  :group 'lsp-completion)
+
+(defcustom lsp-completion-enable-additional-text-edit t
+  "Whether or not to apply additional text edit when performing completion.
+
+If set to non-nil, `lsp-mode' will apply additional text edits
+from the server.  Otherwise, the additional text edits are
+ignored."
+  :type 'boolean
+  :group 'lsp-completion
+  :package-version '(lsp-mode . "6.3.2"))
+
+(defcustom lsp-completion-show-kind t
+  "Whether or not to show kind of completion candidates."
+  :type 'boolean
+  :group 'lsp-completion
+  :package-version '(lsp-mode . "7.0.1"))
+
+(defcustom lsp-completion-show-detail t
+  "Whether or not to show detail of completion candidates."
+  :type 'boolean
+  :group 'lsp-completion)
+
+(defcustom lsp-completion-no-cache nil
+  "Whether or not caching the returned completions from server."
+  :type 'boolean
+  :group 'lsp-completion
+  :package-version '(lsp-mode . "7.0.1"))
+
+(defcustom lsp-completion-filter-on-incomplete t
+  "Whether or not filter incomplete results."
+  :type 'boolean
+  :group 'lsp-completion
+  :package-version '(lsp-mode . "7.0.1"))
+
+(defcustom lsp-completion-sort-initial-results t
+  "Whether or not filter initial results from server."
+  :type 'boolean
+  :group 'lsp-completion
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-completion-use-last-result t
+  "Temporarily use last server result when interrupted by keyboard.
+This will help minimize popup flickering issue in `company-mode'."
+  :type 'boolean
+  :group 'lsp-completion
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-completion-default-behaviour :replace
+  "Default behaviour of `InsertReplaceEdit'."
+  :type '(choice
+          (const :tag "Default completion inserts" :insert)
+          (const :tag "Default completion replaces" :replace))
+  :group 'lsp-completion
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defconst lsp-completion--item-kind
+  [nil
+   "Text"
+   "Method"
+   "Function"
+   "Constructor"
+   "Field"
+   "Variable"
+   "Class"
+   "Interface"
+   "Module"
+   "Property"
+   "Unit"
+   "Value"
+   "Enum"
+   "Keyword"
+   "Snippet"
+   "Color"
+   "File"
+   "Reference"
+   "Folder"
+   "EnumMember"
+   "Constant"
+   "Struct"
+   "Event"
+   "Operator"
+   "TypeParameter"])
+
+(defvar yas-indent-line)
+(defvar company-backends)
+(defvar company-abort-on-unique-match)
+
+(defvar lsp-completion--no-reordering nil
+  "Dont do client-side reordering completion items when set.")
+
+(declare-function company-mode "ext:company")
+(declare-function yas-expand-snippet "ext:yasnippet")
+
+(defun lsp-doc-buffer (&optional string)
+  "Return doc for STRING."
+  (with-current-buffer (get-buffer-create "*lsp-documentation*")
+    (erase-buffer)
+    (fundamental-mode)
+    (when string
+      (save-excursion
+        (insert string)
+        (visual-line-mode)))
+    (current-buffer)))
+
+(defun lsp-falsy? (val)
+  "Non-nil if VAL is falsy."
+  ;; https://developer.mozilla.org/en-US/docs/Glossary/Falsy
+  (or (not val) (equal val "") (equal val 0)))
+
+(cl-defun lsp-completion--make-item (item &key markers prefix)
+  "Make completion item from lsp ITEM and with MARKERS and PREFIX."
+  (-let (((&CompletionItem :label
+                           :sort-text?
+                           :_emacsStartPoint start-point)
+          item))
+    (propertize label
+                'lsp-completion-unresolved-item item
+                'lsp-completion-item item
+                'lsp-sort-text sort-text?
+                'lsp-completion-start-point start-point
+                'lsp-completion-markers markers
+                'lsp-completion-prefix prefix)))
+
+(defun lsp-completion--fix-resolve-data (item)
+  "Patch `CompletionItem' ITEM for rust-analyzer otherwise resolve will fail.
+See #2675"
+  (let ((data (lsp:completion-item-data? item)))
+    (when (lsp-member? data :import_for_trait_assoc_item)
+      (unless (lsp-get data :import_for_trait_assoc_item)
+        (lsp-put data :import_for_trait_assoc_item :json-false)))
+    (when (lsp-member? data :imports)
+      (when-let* ((imports (lsp-get data :imports)))
+        (->> imports
+             (mapc (lambda (import)
+                     (when (lsp-member? import :as_underscore)
+                       (unless (lsp-get import :as_underscore)
+                         (lsp-put import :as_underscore :json-false))))))))
+    (when (lsp-member? data :for_ref)
+      (unless (lsp-get data :for_ref)
+         (lsp-put data :for_ref :json-false)))))
+
+(defun lsp-completion--resolve (item)
+  "Resolve completion ITEM.
+ITEM can be string or a CompletionItem"
+  (cl-assert item nil "Completion item must not be nil")
+  (-let (((completion-item . resolved)
+          (pcase item
+            ((pred stringp) (cons (get-text-property 0 'lsp-completion-item item)
+                                  (get-text-property 0 'lsp-completion-resolved item)))
+            (_ (cons item nil)))))
+    (if resolved item
+      (lsp-completion--fix-resolve-data completion-item)
+      (setq completion-item
+            (or (ignore-errors
+                  (when (lsp-feature? "completionItem/resolve")
+                    (lsp-request "completionItem/resolve"
+                                 (lsp-delete (lsp-copy completion-item) :_emacsStartPoint))))
+                completion-item))
+      (pcase item
+        ((pred stringp)
+         (let ((len (length item)))
+           (put-text-property 0 len 'lsp-completion-item completion-item item)
+           (put-text-property 0 len 'lsp-completion-resolved t item)
+           item))
+        (_ completion-item)))))
+
+(defun lsp-completion--resolve-async (item callback &optional cleanup-fn)
+  "Resolve completion ITEM asynchronously with CALLBACK.
+The CLEANUP-FN will be called to cleanup."
+  (cl-assert item nil "Completion item must not be nil")
+  (-let (((completion-item . resolved)
+          (pcase item
+            ((pred stringp) (cons (get-text-property 0 'lsp-completion-item item)
+                                  (get-text-property 0 'lsp-completion-resolved item)))
+            (_ (cons item nil)))))
+    (ignore-errors
+      (if (and (lsp-feature? "completionItem/resolve") (not resolved))
+          (progn
+            (lsp-completion--fix-resolve-data completion-item)
+            (lsp-request-async "completionItem/resolve"
+                               (lsp-delete (lsp-copy completion-item) :_emacsStartPoint)
+                               (lambda (completion-item)
+                                 (when (stringp item)
+                                   (let ((len (length item)))
+                                     (put-text-property 0 len 'lsp-completion-item completion-item item)
+                                     (put-text-property 0 len 'lsp-completion-resolved t item)
+                                     item))
+                                 (funcall callback completion-item)
+                                 (when cleanup-fn (funcall cleanup-fn)))
+                               :error-handler (lambda (err)
+                                                (when cleanup-fn (funcall cleanup-fn))
+                                                (error (lsp:json-error-message err)))
+                               :cancel-handler cleanup-fn
+                               :mode 'alive))
+        (funcall callback completion-item)
+        (when cleanup-fn (funcall cleanup-fn))))))
+
+(defun lsp-completion--get-label-detail (item &optional omit-description)
+  "Construct label detail from completion item ITEM."
+  (-let (((&CompletionItem :detail? :label-details?) item))
+    (cond ((and label-details?
+                (or (lsp:label-details-detail? label-details?)
+                    (lsp:label-details-description? label-details?)))
+           (-let (((&LabelDetails :detail? :description?) label-details?))
+             (concat
+              (unless (and detail? (string-prefix-p " " detail?))
+                " ")
+              (when detail?
+                (s-replace "\r" "" detail?))
+              (unless (or omit-description
+                          (and description? (string-prefix-p " " description?)))
+                " ")
+              (unless omit-description
+                description?))))
+          (detail?
+           (concat (unless (and detail? (string-prefix-p " " detail?))
+                     " ")
+                   (s-replace "\r" "" detail?))))))
+
+(defun lsp-completion--annotate (cand)
+  "Annotation function for completion candidate CAND.
+
+Returns unresolved completion item detail."
+  (when-let* ((lsp-completion-item (get-text-property 0 'lsp-completion-unresolved-item cand)))
+    (concat
+     (when lsp-completion-show-detail
+       (lsp-completion--get-label-detail lsp-completion-item))
+     (when lsp-completion-show-kind
+       (when-let* ((kind? (lsp:completion-item-kind? lsp-completion-item))
+                   (kind-name (and kind? (aref lsp-completion--item-kind kind?))))
+         (format " (%s)" kind-name))))))
+
+(defun lsp-completion--looking-back-trigger-characterp (trigger-characters)
+  "Return character if text before point match any of the TRIGGER-CHARACTERS."
+  (unless (= (point) (line-beginning-position))
+    (seq-some
+     (lambda (trigger-char)
+       (and (equal (buffer-substring-no-properties (- (point) (length trigger-char)) (point))
+                   trigger-char)
+            trigger-char))
+     trigger-characters)))
+
+(defvar lsp-completion--cache nil
+  "Cached candidates for completion at point function.
+In the form of plist (prefix-pos items :lsp-items :prefix ...).
+When the completion is incomplete, `items' contains value of :incomplete.")
+
+(defvar lsp-completion--last-result nil
+  "Last completion result.")
+
+(defun lsp-completion--clear-cache (&optional keep-last-result)
+  "Clear completion caches.
+KEEP-LAST-RESULT if specified."
+  (-some-> lsp-completion--cache
+    (cddr)
+    (plist-get :markers)
+    (cl-second)
+    (set-marker nil))
+  (setq lsp-completion--cache nil)
+  (unless keep-last-result (setq lsp-completion--last-result nil)))
+
+(lsp-defun lsp-completion--guess-prefix ((item &as &CompletionItem :text-edit?))
+  "Guess ITEM's prefix start point according to following heuristics:
+- If `textEdit' exists, use insertion range start as prefix start point.
+- Else, find the point before current point is longest prefix match of
+`insertText' or `label'. And:
+  - The character before prefix is not word constitute
+Return `nil' when fails to guess prefix."
+  (cond
+   ((lsp-insert-replace-edit? text-edit?)
+    (lsp--position-to-point (lsp:range-start (lsp:insert-replace-edit-insert text-edit?))))
+   (text-edit?
+    (lsp--position-to-point (lsp:range-start (lsp:text-edit-range text-edit?))))
+   (t
+    (-let* (((&CompletionItem :label :insert-text?) item)
+            (text (or (unless (lsp-falsy? insert-text?) insert-text?) label))
+            (point (point))
+            (start (max 1 (- point (length text))))
+            (char-before (char-before start))
+            start-point)
+      (while (and (< start point) (not start-point))
+        (unless (or (and char-before (equal (char-syntax char-before) ?w))
+                    (not (string-prefix-p (buffer-substring-no-properties start point)
+                                          text)))
+          (setq start-point start))
+        (cl-incf start)
+        (setq char-before (char-before start)))
+      start-point))))
+
+(defun lsp-completion--to-internal (items)
+  "Convert ITEMS into internal form."
+  (--> items
+    (-map (-lambda ((item &as &CompletionItem
+                          :label
+                          :filter-text?
+                          :_emacsStartPoint start-point
+                          :score?))
+            `( :label ,(or (unless (lsp-falsy? filter-text?) filter-text?) label)
+               :item ,item
+               :start-point ,start-point
+               :score ,score?))
+          it)))
+
+(cl-defun lsp-completion--filter-candidates (items &key
+                                                   lsp-items
+                                                   markers
+                                                   prefix
+                                                   &allow-other-keys)
+  "List all possible completions in cached ITEMS with their prefixes.
+We can pass LSP-ITEMS, which will be used when there's no cache.
+The MARKERS and PREFIX value will be attached to each candidate."
+  (lsp--while-no-input
+    (->>
+     (if items
+         (--> (let (queries fuz-queries)
+                (-keep (-lambda ((cand &as &plist :label :start-point :score))
+                         (let* ((query (or (plist-get queries start-point)
+                                           (let ((s (buffer-substring-no-properties
+                                                     start-point (point))))
+                                             (setq queries (plist-put queries start-point s))
+                                             s)))
+                                (fuz-query (or (plist-get fuz-queries start-point)
+                                               (let ((s (lsp-completion--regex-fuz query)))
+                                                 (setq fuz-queries
+                                                       (plist-put fuz-queries start-point s))
+                                                 s)))
+                                (label-len (length label))
+                                (case-fold-search completion-ignore-case))
+                           (when (string-match fuz-query label)
+                             (put-text-property 0 label-len 'match-data (match-data) label)
+                             (plist-put cand
+                                        :sort-score
+                                        (* (or (lsp-completion--fuz-score query label) 1e-05)
+                                           (or score 0.001)))
+                             cand)))
+                       items))
+              (if lsp-completion--no-reordering
+                  it
+                (sort it (lambda (o1 o2)
+                           (> (plist-get o1 :sort-score)
+                              (plist-get o2 :sort-score)))))
+              ;; TODO: pass additional function to sort the candidates
+              (-map (-rpartial #'plist-get :item) it))
+       lsp-items)
+     (-map (lambda (item) (lsp-completion--make-item item
+                                                     :markers markers
+                                                     :prefix prefix))))))
+
+(defconst lsp-completion--kind->symbol
+  '((1 . text)
+    (2 . method)
+    (3 . function)
+    (4 . constructor)
+    (5 . field)
+    (6 . variable)
+    (7 . class)
+    (8 . interface)
+    (9 . module)
+    (10 . property)
+    (11 . unit)
+    (12 . value)
+    (13 . enum)
+    (14 . keyword)
+    (15 . snippet)
+    (16 . color)
+    (17 . file)
+    (18 . reference)
+    (19 . folder)
+    (20 . enum-member)
+    (21 . constant)
+    (22 . struct)
+    (23 . event)
+    (24 . operator)
+    (25 . type-parameter)))
+
+(defun lsp-completion--candidate-kind (item)
+  "Return ITEM's kind."
+  (alist-get (lsp:completion-item-kind? (get-text-property 0 'lsp-completion-item item))
+             lsp-completion--kind->symbol))
+
+(defun lsp-completion--candidate-deprecated (item)
+  "Return if ITEM is deprecated."
+  (let ((completion-item (get-text-property 0 'lsp-completion-item item)))
+    (or (lsp:completion-item-deprecated? completion-item)
+        (seq-position (lsp:completion-item-tags? completion-item)
+                      lsp/completion-item-tag-deprecated))))
+
+(defun lsp-completion--company-match (candidate)
+  "Return highlight of typed prefix inside CANDIDATE."
+  (if-let* ((md (cddr (plist-get (text-properties-at 0 candidate) 'match-data))))
+      (let (matches start end)
+        (while (progn (setq start (pop md) end (pop md))
+                      (and start end))
+          (setq matches (nconc matches `((,start . ,end)))))
+        matches)
+    (let* ((prefix (downcase
+                    (buffer-substring-no-properties
+                     ;; Put a safe guard to prevent staled cache from setting a wrong start point #4192
+                     (max (line-beginning-position)
+                          (plist-get (text-properties-at 0 candidate) 'lsp-completion-start-point))
+                     (point))))
+           (prefix-len (length prefix))
+           (prefix-pos 0)
+           (label (downcase candidate))
+           (label-len (length label))
+           (label-pos 0)
+           matches start)
+      (while (and (not matches)
+                  (< prefix-pos prefix-len))
+        (while (and (< prefix-pos prefix-len)
+                    (< label-pos label-len))
+          (if (equal (aref prefix prefix-pos) (aref label label-pos))
+              (progn
+                (unless start (setq start label-pos))
+                (cl-incf prefix-pos))
+            (when start
+              (setq matches (nconc matches `((,start . ,label-pos))))
+              (setq start nil)))
+          (cl-incf label-pos))
+        (when start (setq matches (nconc matches `((,start . ,label-pos)))))
+        ;; Search again when the whole prefix is not matched
+        (when (< prefix-pos prefix-len)
+          (setq matches nil))
+        ;; Start search from next offset of prefix to find a match with label
+        (unless matches
+          (cl-incf prefix-pos)
+          (setq label-pos 0)))
+      matches)))
+
+(defun lsp-completion--company-docsig (cand)
+  "Signature for completion candidate CAND.
+
+Returns resolved completion item details."
+  (and (lsp-completion--resolve cand)
+       (lsp-completion--get-label-detail
+        (get-text-property 0 'lsp-completion-item cand)
+        t)))
+
+(defun lsp-completion--get-documentation (item)
+  "Get doc comment for completion ITEM."
+  (or (get-text-property 0 'lsp-completion-item-doc item)
+      (-let* (((&CompletionItem :detail?
+                                :documentation?)
+               (get-text-property 0 'lsp-completion-item (lsp-completion--resolve item)))
+              (doc
+               (if (and detail? documentation?)
+                   ;; detail was resolved, that means the candidate list has no
+                   ;; detail, so we may need to prepend it to the documentation
+                   (cond ((lsp-markup-content? documentation?)
+                          (-let (((&MarkupContent :kind :value) documentation?))
+                            (cond ((and (equal kind "plaintext")
+                                        (not (string-match-p (regexp-quote detail?) value)))
+
+                                   (lsp--render-string
+                                    (concat detail?
+                                            (if (bound-and-true-p page-break-lines-mode)
+                                                "\n\n"
+                                              "\n\n")
+                                            value)
+                                    kind))
+
+                                  ((and (equal kind "markdown")
+                                        (not (string-match-p (regexp-quote detail?) value)))
+
+                                   (lsp--render-string
+                                    (concat
+                                     "```\n"
+                                     detail?
+                                     "\n```"
+                                     "\n---\n"
+                                     value)
+                                    kind)))))
+
+                         ((and (stringp documentation?)
+                               (not (string-match-p (regexp-quote detail?) documentation?)))
+
+                          (lsp--render-string
+                           (concat detail?
+                                   (if (bound-and-true-p page-break-lines-mode)
+                                       "\n\n"
+                                     "\n\n")
+                                   documentation?)
+                           "plaintext")))
+
+                 (lsp--render-element documentation?))))
+
+        (put-text-property 0 (length item) 'lsp-completion-item-doc doc item)
+        doc)))
+
+(defun lsp-completion--get-context (trigger-characters same-session?)
+  "Get completion context with provided TRIGGER-CHARACTERS and SAME-SESSION?."
+  (let* ((triggered-by-char non-essential)
+         (trigger-char (when triggered-by-char
+                         (lsp-completion--looking-back-trigger-characterp
+                          trigger-characters)))
+         (trigger-kind (cond
+                        (trigger-char
+                         lsp/completion-trigger-kind-trigger-character)
+                        ((and same-session?
+                              (equal (cl-second lsp-completion--cache) :incomplete))
+                         lsp/completion-trigger-kind-trigger-for-incomplete-completions)
+                        (t lsp/completion-trigger-kind-invoked))))
+    (apply #'lsp-make-completion-context
+           (nconc
+            `(:trigger-kind ,trigger-kind)
+            (when trigger-char
+              `(:trigger-character? ,trigger-char))))))
+
+(defun lsp-completion--sort-completions (completions)
+  "Sort COMPLETIONS."
+  (sort
+   completions
+   (-lambda ((&CompletionItem :sort-text? sort-text-left :label label-left)
+             (&CompletionItem :sort-text? sort-text-right :label label-right))
+     (if (equal sort-text-left sort-text-right)
+         (string-lessp label-left label-right)
+       (string-lessp sort-text-left sort-text-right)))))
+
+;;;###autoload
+(defun lsp-completion-at-point ()
+  "Get lsp completions."
+  (when (or (--some (lsp--client-completion-in-comments? (lsp--workspace-client it))
+                    (lsp-workspaces))
+            (not (nth 4 (syntax-ppss))))
+    (let* ((trigger-chars (-> (lsp--capability-for-method "textDocument/completion")
+                              (lsp:completion-options-trigger-characters?)))
+           (bounds-start (or (cl-first (bounds-of-thing-at-point 'symbol))
+                             (point)))
+           result done?
+           (candidates
+            (lambda ()
+              (lsp--catch 'input
+                  (let ((lsp--throw-on-input lsp-completion-use-last-result)
+                        (same-session? (and lsp-completion--cache
+                                            ;; Special case for empty prefix and empty result
+                                            (or (cl-second lsp-completion--cache)
+                                                (not (string-empty-p
+                                                      (plist-get (cddr lsp-completion--cache) :prefix))))
+                                            (equal (cl-first lsp-completion--cache) bounds-start)
+                                            (s-prefix?
+                                             (plist-get (cddr lsp-completion--cache) :prefix)
+                                             (buffer-substring-no-properties bounds-start (point))))))
+                    (cond
+                     ((or done? result) result)
+                     ((and (not lsp-completion-no-cache)
+                           same-session?
+                           (listp (cl-second lsp-completion--cache)))
+                      (setf result (apply #'lsp-completion--filter-candidates
+                                          (cdr lsp-completion--cache))))
+                     (t
+                      (-let* ((resp (lsp-request-while-no-input
+                                     "textDocument/completion"
+                                     (plist-put (lsp--text-document-position-params)
+                                                :context (lsp-completion--get-context trigger-chars same-session?))))
+                              ;; If resp is nil (e.g. no server responded), we treat it as complete
+                              ;; to prevent an infinite retry loop.
+                              (completed (not (and (lsp-completion-list? resp)
+                                                   (lsp:completion-list-is-incomplete resp))))
+                              (items (lsp--while-no-input
+                                       (--> (cond
+                                             ((lsp-completion-list? resp)
+                                              (lsp:completion-list-items resp))
+                                             (t resp))
+                                            (if (or completed
+                                                    (seq-some #'lsp:completion-item-sort-text? it))
+                                                (lsp-completion--sort-completions it)
+                                              it)
+                                            (-map (lambda (item)
+                                                    (lsp-put item
+                                                             :_emacsStartPoint
+                                                             (or (lsp-completion--guess-prefix item)
+                                                                 bounds-start)))
+                                                  it))))
+                              (markers (list bounds-start (copy-marker (point) t)))
+                              (prefix (buffer-substring-no-properties bounds-start (point)))
+                              (lsp-completion--no-reordering (not lsp-completion-sort-initial-results)))
+                        (lsp-completion--clear-cache same-session?)
+                        (setf done? completed
+                              lsp-completion--cache (list bounds-start
+                                                          (cond
+                                                           ((and done? (not (seq-empty-p items)))
+                                                            (lsp-completion--to-internal items))
+                                                           ((not done?) :incomplete))
+                                                          :lsp-items nil
+                                                          :markers markers
+                                                          :prefix prefix)
+                              result (lsp-completion--filter-candidates
+                                      (cond (done?
+                                             (cl-second lsp-completion--cache))
+                                            (lsp-completion-filter-on-incomplete
+                                             (lsp-completion--to-internal items)))
+                                      :lsp-items items
+                                      :markers markers
+                                      :prefix prefix))))))
+                (:interrupted lsp-completion--last-result)
+                (`,res (setq lsp-completion--last-result res))))))
+      (list
+       bounds-start
+       (point)
+       (lambda (probe pred action)
+         (cond
+          ((eq action 'metadata)
+           '(metadata (category . lsp-capf)
+                      (display-sort-function . identity)
+                      (cycle-sort-function . identity)))
+          ((eq (car-safe action) 'boundaries) nil)
+          (t
+           (complete-with-action action (funcall candidates) probe pred))))
+       :annotation-function #'lsp-completion--annotate
+       :company-kind #'lsp-completion--candidate-kind
+       :company-deprecated #'lsp-completion--candidate-deprecated
+       :company-require-match 'never
+       :company-prefix-length
+       (save-excursion
+         (let (
+               ;; 2 is a heuristic number to make sure we look further back than
+               ;; the bounds-start, which can be different from the actual start
+               ;; of the symbol
+               (bounds-left (max (line-beginning-position) (- bounds-start 2)))
+               triggered-by-char?)
+           (while (and (> (point) bounds-left)
+                       (not (equal (char-after) ?\s))
+                       (not triggered-by-char?))
+             (setq triggered-by-char? (lsp-completion--looking-back-trigger-characterp trigger-chars))
+             (goto-char (1- (point))))
+           (and triggered-by-char? t)))
+       :company-match #'lsp-completion--company-match
+       :company-docsig #'lsp-completion--company-docsig
+       :company-doc-buffer (-compose #'lsp-doc-buffer
+                                     #'lsp-completion--get-documentation)
+       :exit-function
+       (-rpartial #'lsp-completion--exit-fn candidates)))))
+
+(defun lsp-completion--find-workspace (server-id)
+  (--first (eq (lsp--client-server-id (lsp--workspace-client it)) server-id)
+           (lsp-workspaces)))
+
+(defun lsp-completion--exit-fn (candidate _status &optional candidates)
+  "Exit function of `completion-at-point'.
+CANDIDATE is the selected completion item.
+Others: CANDIDATES"
+  (unwind-protect
+      (-let* ((candidate (if (plist-member (text-properties-at 0 candidate)
+                                           'lsp-completion-item)
+                             candidate
+                           (cl-find candidate (funcall candidates) :test #'equal)))
+              (item (plist-get (text-properties-at 0 candidate) 'lsp-completion-item))
+              (candidate
+               ;; see #3498 typescript-language-server does not provide the
+               ;; proper insertText without resolving.
+               (if (and (lsp-completion--find-workspace 'ts-ls)
+                        lsp-enable-snippet
+                        (eql (lsp:completion-item-insert-text-format? item)
+                             lsp/insert-text-format-snippet))
+                   (lsp-completion--resolve candidate)
+                 candidate))
+              ((&plist 'lsp-completion-item item
+                       'lsp-completion-start-point start-point
+                       'lsp-completion-markers markers
+                       'lsp-completion-resolved resolved
+                       'lsp-completion-prefix prefix)
+               (text-properties-at 0 candidate))
+              ((&CompletionItem? :label :insert-text? :text-edit? :insert-text-format?
+                                 :additional-text-edits? :insert-text-mode? :command?)
+               item))
+        (cond
+         (text-edit?
+          (apply #'delete-region markers)
+          (insert prefix)
+          (pcase text-edit?
+            ((lsp-interface TextEdit) (lsp--apply-text-edit text-edit?))
+            ((lsp-interface InsertReplaceEdit :insert :replace :new-text)
+             (lsp--apply-text-edit
+              (lsp-make-text-edit
+               :new-text new-text
+               :range (if (or (and current-prefix-arg (eq lsp-completion-default-behaviour :replace))
+                              (and (not current-prefix-arg) (eq lsp-completion-default-behaviour :insert)))
+                          insert
+                        replace))))))
+         ((or (unless (lsp-falsy? insert-text?) insert-text?) label)
+          (apply #'delete-region markers)
+          (insert prefix)
+          (delete-region start-point (point))
+          (insert (or (unless (lsp-falsy? insert-text?) insert-text?) label))))
+
+        (lsp--indent-lines start-point (point) insert-text-mode?)
+        (when (equal insert-text-format? lsp/insert-text-format-snippet)
+          (lsp--expand-snippet (buffer-substring start-point (point))
+                               start-point
+                               (point)))
+
+        (when lsp-completion-enable-additional-text-edit
+          (if (or resolved
+                  (not (seq-empty-p additional-text-edits?)))
+              (lsp--apply-text-edits additional-text-edits? 'completion)
+            (-let [(callback cleanup-fn) (lsp--create-apply-text-edits-handlers)]
+              (lsp-completion--resolve-async
+               item
+               (-compose callback #'lsp:completion-item-additional-text-edits?)
+               cleanup-fn))))
+
+        (if (or resolved command?)
+            (when command? (lsp--execute-command command?))
+          (lsp-completion--resolve-async
+           item
+           (-lambda ((&CompletionItem? :command?))
+             (when command? (lsp--execute-command command?)))))
+
+        (when (and (or
+                    (equal lsp-signature-auto-activate t)
+                    (memq :after-completion lsp-signature-auto-activate)
+                    (and (memq :on-trigger-char lsp-signature-auto-activate)
+                         (-when-let ((&SignatureHelpOptions? :trigger-characters?)
+                                     (lsp--capability :signatureHelpProvider))
+                           (lsp-completion--looking-back-trigger-characterp
+                            trigger-characters?))))
+                   (lsp-feature? "textDocument/signatureHelp"))
+          (lsp-signature-activate))
+
+        (setq-local lsp-inhibit-lsp-hooks nil))
+    (lsp-completion--clear-cache)))
+
+(defun lsp-completion--regex-fuz (str)
+  "Build a regex sequence from STR.  Insert .* between each char."
+  (apply #'concat
+         (cl-mapcar
+          #'concat
+          (cons "" (cdr (seq-map (lambda (c) (format "[^%c]*" c)) str)))
+          (seq-map (lambda (c)
+                     (format "\\(%s\\)" (regexp-quote (char-to-string c))))
+                   str))))
+
+(defun lsp-completion--fuz-score (query str)
+  "Calculate fuzzy score for STR with query QUERY.
+The return is nil or in range of (0, inf)."
+  (-when-let* ((md (cddr (or (get-text-property 0 'match-data str)
+                             (let ((re (lsp-completion--regex-fuz query))
+                                   (case-fold-search completion-ignore-case))
+                               (when (string-match re str)
+                                 (match-data))))))
+               (start (pop md))
+               (len (length str))
+               ;; To understand how this works, consider these bad ascii(tm)
+               ;; diagrams showing how the pattern "foo" flex-matches
+               ;; "fabrobazo", "fbarbazoo" and "barfoobaz":
+
+               ;;      f abr o baz o
+               ;;      + --- + --- +
+
+               ;;      f barbaz oo
+               ;;      + ------ ++
+
+               ;;      bar foo baz
+               ;;      --- +++ ---
+
+               ;; "+" indicates parts where the pattern matched.  A "hole" in
+               ;; the middle of the string is indicated by "-".  Note that there
+               ;; are no "holes" near the edges of the string.  The completion
+               ;; score is a number bound by ]0..1]: the higher the better and
+               ;; only a perfect match (pattern equals string) will have score
+               ;; 1.  The formula takes the form of a quotient.  For the
+               ;; numerator, we use the number of +, i.e. the length of the
+               ;; pattern.  For the denominator, it first computes
+               ;;
+               ;;     hole_i_contrib = 1 + (Li-1)^1.05 for first hole
+               ;;     hole_i_contrib = 1 + (Li-1)^0.25 for hole i of length Li
+               ;;
+               ;; The final value for the denominator is then given by:
+               ;;
+               ;;    (SUM_across_i(hole_i_contrib) + 1)
+               ;;
+               (score-numerator 0)
+               (score-denominator 0)
+               (last-b -1)
+               (q-ind 0)
+               (update-score
+                (lambda (a b)
+                  "Update score variables given match range (A B)."
+                  (setq score-numerator (+ score-numerator (- b a)))
+                  (unless (= a len)
+                    ;; case mismatch will be pushed to near next rank
+                    (unless (equal (aref query q-ind) (aref str a))
+                      (cl-incf a 0.9))
+                    (setq score-denominator
+                          (+ score-denominator
+                             (if (= a last-b) 0
+                               (+ 1 (* (if (< 0 (- a last-b 1)) 1 -1)
+                                       (expt (abs (- a last-b 1))
+                                             ;; Give a higher score for match near start
+                                             (if (eq last-b -1) 0.75 0.25))))))))
+                  (setq last-b b))))
+    (while md
+      (funcall update-score start (cl-first md))
+      ;; Due to the way completion regex is constructed, `(eq end (+ start 1))`
+      (cl-incf q-ind)
+      (pop md)
+      (setq start (pop md)))
+    (unless (zerop len)
+      (/ score-numerator (1+ score-denominator) 1.0))))
+
+
+;;;###autoload
+(defun lsp-completion--enable ()
+  "Enable LSP completion support."
+  (when (and lsp-completion-enable
+             (lsp-feature? "textDocument/completion"))
+    (lsp-completion-mode 1)))
+
+(defun lsp-completion--disable ()
+  "Disable LSP completion support."
+  (lsp-completion-mode -1))
+
+(defun lsp-completion-passthrough-try-completion (string table pred point)
+  "Passthrough try function.
+
+If TABLE is a function, it is called with STRING, PRED and nil to get
+the candidates, otherwise it is treated as the candidates.
+
+If the candidates is non-empty, return the passed STRING and POINT."
+  (when (pcase table
+          ((pred functionp)
+           (funcall table string pred nil))
+          ((pred hash-table-p)
+           (not (hash-table-empty-p table)))
+          (_ table))
+    (cons string point)))
+
+(defun lsp-completion-passthrough-all-completions (_string table pred _point)
+  "Passthrough all completions from TABLE with PRED."
+  (defvar completion-lazy-hilit-fn)
+  (when (bound-and-true-p completion-lazy-hilit)
+    (let ((buf (current-buffer)))
+      (setq completion-lazy-hilit-fn
+            (lambda (candidate)
+              (with-current-buffer buf
+                (->> candidate
+                     lsp-completion--company-match
+                     (mapc (-lambda ((start . end))
+                             (put-text-property start end 'face 'completions-common-part candidate))))
+                candidate)))))
+  (all-completions "" table pred))
+
+;;;###autoload
+(define-minor-mode lsp-completion-mode
+  "Toggle LSP completion support."
+  :group 'lsp-completion
+  :global nil
+  :lighter ""
+  (let ((completion-started-fn (lambda (&rest _)
+                                 (setq-local lsp-inhibit-lsp-hooks t)))
+        (after-completion-fn (lambda (result)
+                               (when (stringp result)
+                                 (lsp-completion--clear-cache))
+                               (setq-local lsp-inhibit-lsp-hooks nil))))
+    (cond
+     (lsp-completion-mode
+      (make-local-variable 'completion-at-point-functions)
+      ;; Ensure that `lsp-completion-at-point' the first CAPF to be tried,
+      ;; unless user has put it elsewhere in the list by their own
+      (add-to-list 'completion-at-point-functions #'lsp-completion-at-point)
+      (make-local-variable 'completion-category-defaults)
+      (setf (alist-get 'lsp-capf completion-category-defaults) '((styles . (lsp-passthrough))))
+      (make-local-variable 'completion-styles-alist)
+      (setf (alist-get 'lsp-passthrough completion-styles-alist)
+            '(lsp-completion-passthrough-try-completion
+              lsp-completion-passthrough-all-completions
+              "Passthrough completion."))
+
+      (cond
+       ((equal lsp-completion-provider :none))
+       ((and (not (equal lsp-completion-provider :none))
+             (fboundp 'company-mode))
+        (setq-local company-abort-on-unique-match nil)
+        (company-mode 1)
+        (setq-local company-backends (cl-adjoin 'company-capf company-backends :test #'equal)))
+       (t
+        (lsp--warn "Unable to autoconfigure company-mode.")))
+
+      (when (bound-and-true-p company-mode)
+        (add-hook 'company-completion-started-hook
+                  completion-started-fn
+                  nil
+                  t)
+        (add-hook 'company-after-completion-hook
+                  after-completion-fn
+                  nil
+                  t))
+      (add-hook 'lsp-unconfigure-hook #'lsp-completion--disable nil t))
+     (t
+      (remove-hook 'completion-at-point-functions #'lsp-completion-at-point t)
+      (setq-local completion-category-defaults
+                  (cl-remove 'lsp-capf completion-category-defaults :key #'cl-first))
+      (setq-local completion-styles-alist
+                  (cl-remove 'lsp-passthrough completion-styles-alist :key #'cl-first))
+      (remove-hook 'lsp-unconfigure-hook #'lsp-completion--disable t)
+      (when (featurep 'company)
+        (remove-hook 'company-completion-started-hook
+                     completion-started-fn
+                     t)
+        (remove-hook 'company-after-completion-hook
+                     after-completion-fn
+                     t))))))
+
+;;;###autoload
+(add-hook 'lsp-configure-hook (lambda ()
+                                (when (and lsp-auto-configure
+                                           lsp-completion-enable)
+                                  (lsp-completion--enable))))
+
+(lsp-consistency-check lsp-completion)
+
+(provide 'lsp-completion)
+;;; lsp-completion.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-copilot.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-copilot.el
new file mode 100644
index 0000000..7b14f7d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-copilot.el
@@ -0,0 +1,243 @@
+;;; lsp-copilot.el --- lsp-mode client for Copilot       -*- lexical-binding: t -*-
+
+;; Copyright (C) 2024 Rodrigo Virote Kassick
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; Author: Rodrigo Virote Kassick <kassick@gmail.com>
+;; Keywords: lsp-mode, generative-ai, code-assistant
+
+;; This file is not part of GNU Emacs
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;; Commentary:
+
+;; LSP client for the Copilot Language Server:
+;; https://www.npmjs.com/package/@github/copilot-language-server
+
+;; Code:
+
+(require 'dash)
+(require 'lsp-mode)
+(require 's)
+
+(defgroup lsp-copilot ()
+  "Copilot LSP configuration"
+  :group 'lsp-mode
+  :tag "Copilot LSP"
+  :link '(url-link "https://www.npmjs.com/package/@github/copilot-language-server"))
+
+(defcustom lsp-copilot-enabled nil
+  "Whether the server should be started to provide completions."
+  :type 'boolean
+  :group 'lsp-copilot)
+
+(defcustom lsp-copilot-auth-check-delay 5
+  "How much time to wait before checking if the server is properly authenticated.
+
+Set this value to nil if you do not want for the check to be made."
+  :type '(choice (const :tag "Do not check" nil)
+                 (integer :tag "Seconds" 5)))
+
+(defcustom lsp-copilot-langserver-command-args '("--stdio")
+  "Command to start copilot-langserver."
+  :type '(repeat string)
+  :group 'lsp-copilot)
+
+(defcustom lsp-copilot-executable "copilot-language-server"
+  "The system-wise executable of lsp-copilot.
+When this executable is not found, you can still use
+lsp-install-server to fetch an emacs-local version of the LSP."
+  :type 'string
+  :group 'lsp-copilot)
+
+(defcustom lsp-copilot-applicable-fn (lambda (&rest _) lsp-copilot-enabled)
+  "A function which returns whether the Copilot is applicable for the buffer.
+The input are the file name and the major mode of the buffer."
+  :type 'function
+  :group 'lsp-copilot)
+
+(defcustom lsp-copilot-server-disabled-languages nil
+  "The languages for which the server must not be enabled (initialization setup for Copilot)"
+  :type '(repeat string)
+  :group 'lsp-copilot)
+
+(defcustom lsp-copilot-server-multi-root t
+  "Whether the Copilot server is started with multi-root."
+  :type 'boolean
+  :group 'lsp-copilot)
+
+(defcustom lsp-copilot-version "1.270.0"
+  "Copilot version."
+  :type '(choice (const :tag "Latest" nil)
+                 (string :tag "Specific Version"))
+  :group 'lsp-copilot)
+
+(lsp-dependency 'copilot-ls
+                `(:system ,lsp-copilot-executable)
+                '(:npm :package "@github/copilot-language-server"
+                       :path "copilot-language-server"
+                       :version lsp-copilot-version))
+
+(defun lsp-copilot--find-active-workspaces ()
+  "Returns a list of lsp-copilot workspaces"
+  (-some->> (lsp-session)
+    (lsp--session-workspaces)
+    (--filter (member (lsp--client-server-id (lsp--workspace-client it))
+                      '(copilot-ls copilot-ls-tramp)))))
+
+(defun lsp-copilot--authenticated-as ()
+  "Returns nil when not authorized; otherwise, the user name"
+  (-if-let (workspace (--some (lsp-find-workspace it (buffer-file-name))
+                              '(copilot-ls copilot-ls-tramp)))
+      (-if-let (checkStatusResponse (with-lsp-workspace workspace
+                                      (lsp-request "checkStatus" '(:dummy "dummy"))))
+          (-let* (((&copilot-ls:CheckStatusResponse? :status :user) checkStatusResponse))
+            (unless (s-present-p status)
+              (error "No status in response %S" checkStatusResponse))
+            ;; Result:
+            (when (s-equals-p status "OK")
+              user))
+        (error "No response from the LSP server"))
+    (error "No lsp-copilot workspace found!")))
+
+;;;###autoload
+(defun lsp-copilot-check-status ()
+  "Checks the status of the Copilot Server"
+  (interactive)
+
+  (condition-case err
+      (progn
+        (let ((user (lsp-copilot--authenticated-as)))
+          (if user
+              (message "Authenticated as %s" user)
+            (user-error "Not Authenticated"))))
+    (t (user-error "Error checking status: %s" err))))
+
+
+;;;###autoload
+(defun lsp-copilot-login ()
+  "Log in with Copilot.
+
+This function is automatically called during the client initialization if needed"
+  (interactive)
+
+  (-when-let (workspace (--some (lsp-find-workspace it) '(copilot-ls copilot-ls-tramp)))
+    (with-lsp-workspace workspace
+      (-when-let* ((response (lsp-request "signInInitiate" '(:dummy "dummy"))))
+        (-let (((&copilot-ls:SignInInitiateResponse? :status :user-code :verification-uri :user) response))
+
+          ;; Bail if already signed in
+          (cond
+           ((s-equals-p status "AlreadySignedIn")
+            (lsp--info "Copilot :: Already signed in as %s" user))
+           ((yes-or-no-p "Copilot requires you to log into your GitHub account. Proceed now?")
+            (if (display-graphic-p)
+                (progn
+                  (gui-set-selection 'CLIPBOARD user-code)
+                  (read-from-minibuffer (format "Your one-time code %s is copied. Press \
+ENTER to open GitHub in your browser. If your browser does not open \
+automatically, browse to %s." user-code verification-uri))
+                  (browse-url verification-uri)
+                  (read-from-minibuffer "Press ENTER if you finish authorizing."))
+              ;; Console:
+              (read-from-minibuffer (format "First copy your one-time code: %s. Press ENTER to continue." user-code))
+              (read-from-minibuffer (format "Please open %s in your browser. Press ENTER if you finish authorizing." verification-uri)))
+
+            (lsp--info "Verifying...")
+            (-let* ((confirmResponse (lsp-request "signInConfirm" (list :userCode user-code)))
+                    ((&copilot-ls:SignInConfirmResponse? :status :user) confirmResponse))
+              (when (s-equals-p status "NotAuthorized")
+                (user-error "User %s is not authorized" user))
+              (lsp--info "User %s is authorized: %s" user status))
+
+            ;; Do we need to confirm?
+            (-let* ((checkStatusResponse (lsp-request "checkStatus" '(:dummy "dummy")))
+                    ((&copilot-ls:CheckStatusResponse? :status :user) checkStatusResponse))
+              (when (s-equals-p status "NotAuthorized")
+                (user-error "User %s is not authorized" user))
+
+              (lsp--info "Authenticated as %s" user)))
+           (t
+            (message "Aborting Copilot login. To avoid being asked again, customize `lsp-copilot-enabled'"))))))))
+
+(defun lsp-copilot-logout ()
+  "Logout from Copilot."
+  (interactive)
+  (-when-let (workspace (--some (lsp-find-workspace it) '(copilot-ls copilot-ls-tramp)))
+    (with-lsp-workspace workspace
+      (lsp-request "signOut" '(:dummy "dummy"))
+      (lsp--info "Logged out."))))
+
+(defun lsp-copilot--server-initialization-options ()
+  ;; Trying to replicate Copilot.vim initialization here ...
+  (list :editorInfo (list :name "emacs" :version emacs-version)
+        :editorPluginInfo (list :name "lsp-copilot" :version (lsp-package-version))
+        :editorConfig (list :enableAutoCompletions lsp-copilot-enabled
+                            :disabledLanguages lsp-copilot-server-disabled-languages)
+        :name "emacs"
+        :version "0.1.0"))
+
+(defun lsp-copilot--mcp-tools-notification (_ params)
+   "Reacts to the copilot/mcpTools notification"
+  (-let* (((&copilot-ls:McpToolsNotification :servers) params)
+          (tools-str (s-join ", " servers)))
+    (when (s-present? tools-str)
+        (lsp--info "Copilot: Available MCP Tools: %s" tools-str))))
+
+(defun lsp-copilot--server-initialized-fn (workspace)
+  ;; Patch capabilities -- server may respond with an empty dict. In plist,
+  ;; this would become nil
+  (let ((caps (lsp--workspace-server-capabilities workspace)))
+    (lsp:set-server-capabilities-inline-completion-provider? caps t))
+
+
+  (when lsp-copilot-auth-check-delay
+    (run-at-time lsp-copilot-auth-check-delay
+                 nil
+                 (lambda ()
+                   (condition-case err
+                       (unless (lsp-copilot--authenticated-as)
+                         (lsp-copilot-login))
+                     (t (lsp--error "Could not authenticate with Copilot: %s" (error-message-string err)))))))
+  t)
+
+;; Server installed by emacs
+(lsp-register-client
+ (make-lsp-client
+  :server-id 'copilot-ls
+  :new-connection (lsp-stdio-connection
+                   (lambda () `(,(lsp-package-path 'copilot-ls) ,@lsp-copilot-langserver-command-args))
+                   )
+  :activation-fn lsp-copilot-applicable-fn
+  :multi-root lsp-copilot-server-multi-root
+  :priority -2
+  :add-on? t
+  :completion-in-comments? t
+  :initialization-options #'lsp-copilot--server-initialization-options
+  :initialized-fn #'lsp-copilot--server-initialized-fn
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'copilot-ls callback error-callback))
+  :notification-handlers (lsp-ht
+                          ("$/progress" (lambda (&rest args) (lsp-message "$/progress with %S" args)))
+                          ("featureFlagsNotification" #'ignore)
+                          ("statusNotification" #'ignore)
+                          ("didChangeStatus" #'ignore)
+                          ("copilot/mcpTools" #'lsp-copilot--mcp-tools-notification)
+                          ("window/logMessage" #'lsp--window-log-message)
+                          ("conversation/preconditionsNotification" #'ignore))))
+
+(lsp-consistency-check lsp-copilot)
+
+(provide 'lsp-copilot)
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-crates.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-crates.el
new file mode 100644
index 0000000..fce4328
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-crates.el
@@ -0,0 +1,181 @@
+;;; lsp-crates.el --- lsp-mode Crates integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2026 emacs-lsp maintainers
+
+;; Author: Jen-Chieh Shen <jcs090218@gmail.com>
+;; Keywords: languages, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  client for the Crates language server
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-crates nil
+  "LSP support for Crates."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/MathiasPius/crates-lsp")
+  :package-version `(lsp-mode . "10.0.0"))
+
+(defcustom lsp-crates-executable "crates-lsp"
+  "The crates-lsp executable to use.
+
+Leave as just the executable name to use the default behavior of finding the
+executable with variable `exec-path'."
+  :group 'lsp-crates
+  :type 'string)
+
+(defcustom lsp-crates-cache-directory ""
+  "Directory in which to cache information about available crate versions, to
+avoid constantly querying crates.io.
+
+Uses the OS-specific cache directory."
+  :group 'lsp-crates
+  :type 'string)
+
+(defcustom lsp-crates-files ["Cargo.toml"]
+  "List of exact filenames for which crates-lsp should provide feedback.
+Avoids `crates-lsp' throwing errors if you happen to open a toml file with a
+[dependencies] section, which does not contain Rust package names."
+  :group 'lsp-crates
+  :type '(vector string))
+
+(defcustom lsp-crates-use-api nil
+  "If true, uses the Crates API instead of the Crate Index.
+There are almost no reasons to ever enable this, and doing so puts a lot more
+strain on the services provided by `crates.io'."
+  :group 'lsp-crates
+  :type 'boolean)
+
+(defcustom lsp-crates-inlay-hints t
+  "If false, disables inlay hints."
+  :group 'lsp-crates
+  :type 'boolean)
+
+(defcustom lsp-crates-up-to-date-hint "✓"
+  "Text of inlay hint to show, when package is up to date."
+  :group 'lsp-crates
+  :type 'string)
+
+(defcustom lsp-crates-needs-update-hint "❌ {}"
+  "Text of inlay hint to show next to packages which should be updated. Any
+appearance of {} within the string, will be replaced by the newer version,
+which the package should be updated to."
+  :group 'lsp-crates
+  :type 'string)
+
+(defcustom lsp-crates-diagnostics t
+  "If false, disables diagnostics."
+  :group 'lsp-crates
+  :type 'boolean)
+
+(defcustom lsp-crates-unknown-dep-severity 2
+  "Sets severity of diagnostics indicating that a package could not be looked up."
+  :group 'lsp-crates
+  :type 'integer)
+
+(defcustom lsp-crates-needs-update-severity 3
+  "Sets severity of diagnostics indicating that a package needs to be updated."
+  :group 'lsp-crates
+  :type 'integer)
+
+(defcustom lsp-crates-up-to-date-severity 4
+  "Sets severity of diagnostics indicating that a package is up to date."
+  :group 'lsp-crates
+  :type 'integer)
+
+;;
+;;; Installation
+
+(defcustom lsp-crates-server-store-path
+  (expand-file-name "crates/" lsp-server-install-dir)
+  "The path to the file in which crates-lsp will be stored."
+  :type 'file
+  :group 'lsp-crates)
+
+(defconst lsp-crates-download-url-format
+  "https://github.com/MathiasPius/crates-lsp/releases/latest/download/crates-lsp-%s-%s.%s"
+  "Format to the download url link.")
+
+(defun lsp-crates--download-url ()
+  "Return Url points to the crates-lsp' zip/tar file."
+  (let* ((x86 (string-prefix-p "x86_64" system-configuration))
+         (arch (if x86 "x86_64" "aarch64")))
+    (cl-case system-type
+      ((cygwin windows-nt ms-dos)
+       (format lsp-crates-download-url-format arch "pc-windows-msvc" "zip"))
+      (darwin
+       (format lsp-crates-download-url-format arch "apple-darwin" "tar.gz"))
+      (gnu/linux
+       (format lsp-crates-download-url-format arch "unknown-linux-gnu" "tar.gz")))))
+
+(defun lsp-crates--stored-executable ()
+  "Return the stored crates-lsp executable.
+
+This is differ from the variable `lsp-crates-executable'; this is local storage
+and not the global storage."
+  (f-join lsp-crates-server-store-path
+          (pcase system-type
+            ('windows-nt "crates-lsp.exe")
+            (_ "crates-lsp"))))
+
+;;
+;;; Core
+
+(lsp-register-custom-settings
+ '(("crates-lsp.cache_directory" lsp-crates-cache-directory t)
+   ("crates-lsp.files" lsp-crates-files t)
+   ("crates-lsp.use_api" lsp-crates-use-api)
+   ("crates-lsp.inlay_hints" lsp-crates-inlay-hints)
+   ("crates-lsp.up_to_date_hint" lsp-crates-up-to-date-hint t)
+   ("crates-lsp.needs_update_hint" lsp-crates-needs-update-hint t)
+   ("crates-lsp.diagnostics" lsp-crates-diagnostics)
+   ("crates-lsp.unknown_dep_severity" lsp-crates-unknown-dep-severity t)
+   ("crates-lsp.needs_update_severity" lsp-crates-needs-update-severity t)
+   ("crates-lsp.up_to_date_severity" lsp-crates-up-to-date-severity t)))
+
+(lsp-dependency
+ 'crates-lsp
+ '(:system "crates-lsp")
+ `(:download :url ,(lsp-crates--download-url)
+             :decompress ,(pcase system-type ('windows-nt :zip) (_ :targz))
+             :store-path ,(f-join lsp-crates-server-store-path "temp")
+             :set-executable? t)
+ `(:system ,(lsp-crates--stored-executable)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda () (or (executable-find lsp-crates-executable)
+                                  (lsp-crates--stored-executable)))
+                   (lambda ()
+                     (or (executable-find lsp-crates-executable)
+                         (file-executable-p (lsp-crates--stored-executable)))))
+  :activation-fn (lsp-activate-on "toml")
+  :priority -1
+  :server-id 'crates-lsp
+  :initialization-options
+  (lambda () (lsp-configuration-section "crates-lsp"))
+  :download-server-fn
+  (lambda (_client callback error-callback _update?)
+    (lsp-package-ensure 'crates-lsp callback error-callback))))
+
+(lsp-consistency-check lsp-crates)
+
+(provide 'lsp-crates)
+;;; lsp-crates.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-credo.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-credo.el
new file mode 100644
index 0000000..9ffa84e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-credo.el
@@ -0,0 +1,98 @@
+;;; lsp-credo.el --- lsp-mode Credo integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023 Wilhelm H Kirschbaum
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: Wilhelm H Kirschbaum
+;; Keywords: lsp, elixir, credo
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Client for Elixir Credo
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-credo nil
+  "Settings for credo language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/elixir-tools/credo-language-server")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-credo-command
+  `(,(f-join lsp-server-install-dir "credo-language-server"
+            "credo-language-server")
+    "--stdio=true")
+  "The command that starts credo-language-server."
+  :type '(repeat :tag "List of string values" string)
+  :group 'lsp-credo
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-credo-version "0.3.0"
+  "Credo language server version to download.
+It has to be set before `lsp-credo.el' is loaded and it has to
+be available here: https://github.com/elixir-tools/credo-language-server/releases."
+  :type 'string
+  :group 'lsp-credo
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-credo-download-url
+  (format (concat "https://github.com/elixir-tools/credo-language-server"
+                  "/releases/download/v%s/credo-language-server")
+          lsp-credo-version)
+  "Automatic download url for credo-language-server."
+  :type 'string
+  :group 'lsp-credo
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-credo-binary-path
+  (f-join lsp-server-install-dir
+          "credo-language-server"
+          "credo-language-server")
+  "The path to `credo-language-server' binary."
+  :type 'file
+  :group 'lsp-credo
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-dependency
+ 'credo-language-server
+ `(:download :url lsp-credo-download-url
+             :store-path lsp-credo-binary-path
+             :set-executable? t))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda ()
+                     `(,(or (executable-find
+                             (cl-first lsp-credo-command))
+                            (lsp-package-path 'credo-language-server))
+                       ,@(cl-rest lsp-credo-command))))
+  :activation-fn (lsp-activate-on "elixir")
+  :priority -1
+  :add-on? t
+  :multi-root nil
+  :server-id 'credo-language-server
+  :download-server-fn
+  (lambda (_client callback error-callback _update?)
+    (lsp-package-ensure 'credo-language-server callback error-callback))))
+
+(lsp-consistency-check lsp-credo)
+
+(provide 'lsp-credo)
+
+;;; lsp-credo.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-crystal.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-crystal.el
new file mode 100644
index 0000000..a377c81
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-crystal.el
@@ -0,0 +1,48 @@
+;;; lsp-crystal.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, crystal
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Crystal Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-crystalline nil
+  "LSP support for Crystal via crystalline."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/elbywan/crystalline"))
+
+(defcustom lsp-clients-crystal-executable '("crystalline" "--stdio")
+  "Command to start the crystalline language server."
+  :group 'lsp-crystalline
+  :risky t
+  :type 'file)
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection lsp-clients-crystal-executable)
+                  :major-modes '(crystal-mode)
+                  :server-id 'crystalline))
+
+(lsp-consistency-check lsp-crystal)
+
+(provide 'lsp-crystal)
+;;; lsp-crystal.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-csharp.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-csharp.el
new file mode 100644
index 0000000..21d9dab
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-csharp.el
@@ -0,0 +1,575 @@
+;;; lsp-csharp.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019 Jostein Kjønigsen, Saulius Menkevicius
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Saulius Menkevicius <saulius.menkevicius@fastmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-csharp client
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'gnutls)
+(require 'f)
+
+(defgroup lsp-csharp nil
+  "LSP support for C#, using the Omnisharp Language Server.
+Version 1.34.3 minimum is required."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/OmniSharp/omnisharp-roslyn"))
+
+(defgroup lsp-csharp-omnisharp nil
+  "LSP support for C#, using the Omnisharp Language Server.
+Version 1.34.3 minimum is required."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/OmniSharp/omnisharp-roslyn")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defconst lsp-csharp--omnisharp-metadata-uri-re
+  "^file:///%24metadata%24/Project/\\(.+\\)/Assembly/\\(.+\\)/Symbol/\\(.+\\)\.cs$"
+  "Regular expression matching omnisharp's metadata uri.
+Group 1 contains the Project name
+Group 2 contains the Assembly name
+Group 3 contains the Type name")
+
+(defcustom lsp-csharp-server-install-dir
+  (f-join lsp-server-install-dir "omnisharp-roslyn/")
+  "Installation directory for OmniSharp Roslyn server."
+  :group 'lsp-csharp-omnisharp
+  :type 'directory)
+
+(defcustom lsp-csharp-server-path
+  nil
+  "The path to the OmniSharp Roslyn language-server binary.
+Set this if you have the binary installed or have it built yourself."
+  :group 'lsp-csharp-omnisharp
+  :type '(string :tag "Single string value or nil"))
+
+(defcustom lsp-csharp-test-run-buffer-name
+  "*lsp-csharp test run*"
+  "The name of buffer used for outputting lsp-csharp test run results."
+  :group 'lsp-csharp-omnisharp
+  :type 'string)
+
+(defcustom lsp-csharp-solution-file
+  nil
+  "Solution to load when starting the server.
+Usually this is to be set in your .dir-locals.el on the project root directory."
+  :group 'lsp-csharp-omnisharp
+  :type 'string)
+
+(defcustom lsp-csharp-omnisharp-roslyn-download-url
+  (concat "https://github.com/omnisharp/omnisharp-roslyn/releases/latest/download/"
+          (cond ((eq system-type 'windows-nt)
+                 ; On Windows we're trying to avoid a crash starting 64bit .NET PE binaries in
+                 ; Emacs by using x86 version of omnisharp-roslyn on older (<= 26.4) versions
+                 ; of Emacs. See https://lists.nongnu.org/archive/html/bug-gnu-emacs/2017-06/msg00893.html"
+                 (if (and (string-match-p "^x86_64-.*" system-configuration)
+                          (version<= "26.4" emacs-version))
+                     "omnisharp-win-x64.zip"
+                   "omnisharp-win-x86.zip"))
+
+                ((eq system-type 'darwin)
+                 (if (string-match-p "aarch64-.*" system-configuration)
+                     "omnisharp-osx-arm64-net6.0.zip"
+                   "omnisharp-osx-x64-net6.0.zip"))
+
+                ((and (eq system-type 'gnu/linux)
+                      (or (eq (string-match-p "^x86_64" system-configuration) 0)
+                          (eq (string-match-p "^i[3-6]86" system-configuration) 0)))
+                 "omnisharp-linux-x64-net6.0.zip")
+
+                (t "omnisharp-mono.zip")))
+  "Automatic download url for omnisharp-roslyn."
+  :group 'lsp-csharp-omnisharp
+  :type 'string)
+
+(defcustom lsp-csharp-omnisharp-roslyn-store-path
+  (f-join lsp-csharp-server-install-dir "latest" "omnisharp-roslyn.zip")
+  "The path where omnisharp-roslyn .zip archive will be stored."
+  :group 'lsp-csharp-omnisharp
+  :type 'file)
+
+(defcustom lsp-csharp-omnisharp-roslyn-binary-path
+  (f-join lsp-csharp-server-install-dir "latest" (if (eq system-type 'windows-nt)
+                                                     "OmniSharp.exe"
+                                                   "OmniSharp"))
+  "The path where omnisharp-roslyn binary after will be stored."
+  :group 'lsp-csharp-omnisharp
+  :type 'file)
+
+(defcustom lsp-csharp-omnisharp-roslyn-server-dir
+  (f-join lsp-csharp-server-install-dir "latest" "omnisharp-roslyn")
+  "The path where omnisharp-roslyn .zip archive will be extracted."
+  :group 'lsp-csharp-omnisharp
+  :type 'file)
+
+
+(defcustom lsp-csharp-omnisharp-enable-decompilation-support
+  nil
+  "Decompile bytecode when browsing method metadata for types in assemblies.
+Otherwise only declarations for the methods are visible (the default)."
+  :group 'lsp-csharp
+  :type 'boolean)
+
+(defcustom lsp-csharp-csharpls-use-dotnet-tool t
+  "Whether to use a dotnet tool version of the expected C#
+ language server; only available for csharp-ls"
+  :group 'lsp-csharp
+  :type 'boolean
+  :risky t)
+
+(defcustom lsp-csharp-csharpls-use-local-tool nil
+  "Whether to use csharp-ls as a global or local dotnet tool.
+
+Note: this variable has no effect if
+lsp-csharp-csharpls-use-dotnet-tool is nil."
+  :group 'lsp-csharp
+  :type 'boolean
+  :risky t)
+
+(lsp-dependency
+ 'omnisharp-roslyn
+ `(:download :url lsp-csharp-omnisharp-roslyn-download-url
+             :decompress :zip
+             :store-path lsp-csharp-omnisharp-roslyn-store-path
+             :binary-path lsp-csharp-omnisharp-roslyn-binary-path
+             :set-executable? t)
+ '(:system "OmniSharp"))
+
+(defun lsp-csharp--omnisharp-download-server (_client callback error-callback _update?)
+  "Download zip package for omnisharp-roslyn and install it.
+Will invoke CALLBACK on success, ERROR-CALLBACK on error."
+  (lsp-package-ensure 'omnisharp-roslyn callback error-callback))
+
+(defun lsp-csharp--language-server-path ()
+  "Resolve path to use to start the server."
+  (let ((executable-name (if (eq system-type 'windows-nt)
+                             "OmniSharp.exe"
+                           "OmniSharp")))
+    (or (and lsp-csharp-server-path
+             (executable-find lsp-csharp-server-path))
+        (executable-find executable-name)
+        (lsp-package-path 'omnisharp-roslyn))))
+
+(defun lsp-csharp-open-project-file ()
+  "Open corresponding project file  (.csproj) for the current file."
+  (interactive)
+  (-let* ((project-info-req (lsp-make-omnisharp-project-information-request :file-name (buffer-file-name)))
+          (project-info (lsp-request "o#/project" project-info-req))
+          ((&omnisharp:ProjectInformation :ms-build-project) project-info)
+          ((&omnisharp:MsBuildProject :path) ms-build-project))
+    (find-file path)))
+
+(defun lsp-csharp--get-buffer-code-elements ()
+  "Retrieve code structure by calling into the /v2/codestructure endpoint.
+Returns :elements from omnisharp:CodeStructureResponse."
+  (-let* ((code-structure (lsp-request "o#/v2/codestructure"
+                                       (lsp-make-omnisharp-code-structure-request :file-name (buffer-file-name))))
+          ((&omnisharp:CodeStructureResponse :elements) code-structure))
+    elements))
+
+(defun lsp-csharp--inspect-code-elements-recursively (fn elements)
+  "Invoke FN for every omnisharp:CodeElement found recursively in ELEMENTS."
+  (seq-each
+   (lambda (el)
+     (funcall fn el)
+     (-let (((&omnisharp:CodeElement :children) el))
+       (lsp-csharp--inspect-code-elements-recursively fn children)))
+   elements))
+
+(defun lsp-csharp--collect-code-elements-recursively (predicate elements)
+  "Flatten the omnisharp:CodeElement tree in ELEMENTS matching PREDICATE."
+  (let ((results nil))
+    (lsp-csharp--inspect-code-elements-recursively (lambda (el)
+                                                     (when (funcall predicate el)
+                                                       (setq results (cons el results))))
+                                                   elements)
+    results))
+
+(lsp-defun lsp-csharp--l-c-within-range (l c (&omnisharp:Range :start :end))
+  "Determine if L (line) and C (column) are within RANGE."
+  (-let* (((&omnisharp:Point :line start-l :column start-c) start)
+          ((&omnisharp:Point :line end-l :column end-c) end))
+    (or (and (= l start-l) (>= c start-c) (or (> end-l start-l) (<= c end-c)))
+        (and (> l start-l) (< l end-l))
+        (and (= l end-l) (<= c end-c)))))
+
+(defun lsp-csharp--code-element-stack-on-l-c (l c elements)
+  "Return omnisharp:CodeElement stack at L (line) and C (column) in ELEMENTS tree."
+  (when-let* ((matching-element (seq-find (lambda (el)
+                                           (-when-let* (((&omnisharp:CodeElement :ranges) el)
+                                                        ((&omnisharp:RangeList :full?) ranges))
+                                             (lsp-csharp--l-c-within-range l c full?)))
+                                         elements)))
+    (-let (((&omnisharp:CodeElement :children) matching-element))
+      (cons matching-element (lsp-csharp--code-element-stack-on-l-c l c children)))))
+
+(defun lsp-csharp--code-element-stack-at-point ()
+  "Return omnisharp:CodeElement stack at point as a list."
+  (let ((pos-line (plist-get (lsp--cur-position) :line))
+        (pos-col (plist-get (lsp--cur-position) :character)))
+    (lsp-csharp--code-element-stack-on-l-c pos-line
+                                           pos-col
+                                           (lsp-csharp--get-buffer-code-elements))))
+
+(lsp-defun lsp-csharp--code-element-test-method-p (element)
+  "Return test method name and test framework for a given ELEMENT."
+  (when element
+    (-when-let* (((&omnisharp:CodeElement :properties) element)
+                 ((&omnisharp:CodeElementProperties :test-method-name? :test-framework?) properties))
+      (list test-method-name? test-framework?))))
+
+(defun lsp-csharp--reset-test-buffer (present-buffer)
+  "Create new or reuse an existing test result output buffer.
+PRESENT-BUFFER will make the buffer be presented to the user."
+  (with-current-buffer (get-buffer-create lsp-csharp-test-run-buffer-name)
+    (compilation-mode)
+    (read-only-mode)
+    (let ((inhibit-read-only t))
+      (erase-buffer)))
+
+  (when present-buffer
+    (display-buffer lsp-csharp-test-run-buffer-name)))
+
+(defun lsp-csharp--start-tests (test-method-framework test-method-names)
+  "Run test(s) identified by TEST-METHOD-NAMES using TEST-METHOD-FRAMEWORK."
+  (if (and test-method-framework test-method-names)
+      (let ((request-message (lsp-make-omnisharp-run-tests-in-class-request
+                              :file-name (buffer-file-name)
+                              :test-frameworkname test-method-framework
+                              :method-names (vconcat test-method-names))))
+        (lsp-csharp--reset-test-buffer t)
+        (lsp-session-set-metadata "last-test-method-framework" test-method-framework)
+        (lsp-session-set-metadata "last-test-method-names" test-method-names)
+        (lsp-request-async "o#/v2/runtestsinclass"
+                           request-message
+                           (-lambda ((&omnisharp:RunTestResponse))
+                             (message "lsp-csharp: Test run has started"))))
+    (message "lsp-csharp: No test methods to run")))
+
+(defun lsp-csharp--test-message (message)
+  "Emit a MESSAGE to lsp-csharp test run buffer."
+  (when-let* ((existing-buffer (get-buffer lsp-csharp-test-run-buffer-name))
+             (inhibit-read-only t))
+    (with-current-buffer existing-buffer
+      (save-excursion
+        (goto-char (point-max))
+        (insert message "\n")))))
+
+(defun lsp-csharp-run-test-at-point ()
+  "Start test run at current point (if any)."
+  (interactive)
+  (let* ((stack (lsp-csharp--code-element-stack-at-point))
+         (element-on-point (car (last stack)))
+         (test-method (lsp-csharp--code-element-test-method-p element-on-point))
+         (test-method-name (car test-method))
+         (test-method-framework (car (cdr test-method))))
+    (lsp-csharp--start-tests test-method-framework (list test-method-name))))
+
+(defun lsp-csharp-run-all-tests-in-buffer ()
+  "Run all test methods in the current buffer."
+  (interactive)
+  (let* ((elements (lsp-csharp--get-buffer-code-elements))
+         (test-methods (lsp-csharp--collect-code-elements-recursively 'lsp-csharp--code-element-test-method-p elements))
+         (test-method-framework (car (cdr (lsp-csharp--code-element-test-method-p (car test-methods)))))
+         (test-method-names (mapcar (lambda (method)
+                                      (car (lsp-csharp--code-element-test-method-p method)))
+                                    test-methods)))
+    (lsp-csharp--start-tests test-method-framework test-method-names)))
+
+(defun lsp-csharp-run-test-in-buffer ()
+  "Run selected test in current buffer."
+  (interactive)
+  (when-let* ((elements (lsp-csharp--get-buffer-code-elements))
+              (test-methods (lsp-csharp--collect-code-elements-recursively 'lsp-csharp--code-element-test-method-p elements))
+              (test-method-framework (car (cdr (lsp-csharp--code-element-test-method-p (car test-methods)))))
+              (test-method-names (mapcar (lambda (method)
+                                           (car (lsp-csharp--code-element-test-method-p method)))
+                                         test-methods))
+              (selected-test-method-name (lsp--completing-read "Select test:" test-method-names 'identity)))
+    (lsp-csharp--start-tests test-method-framework (list selected-test-method-name))))
+
+(defun lsp-csharp-run-last-tests ()
+  "Re-run test(s) that were run last time."
+  (interactive)
+  (if-let* ((last-test-method-framework (lsp-session-get-metadata "last-test-method-framework"))
+           (last-test-method-names (lsp-session-get-metadata "last-test-method-names")))
+      (lsp-csharp--start-tests last-test-method-framework last-test-method-names)
+    (message "lsp-csharp: No test method(s) found to be ran previously on this workspace")))
+
+(lsp-defun lsp-csharp--handle-os-error (_workspace (&omnisharp:ErrorMessage :file-name :text))
+  "Handle the `o#/error' (interop) notification displaying a message."
+  (lsp-warn "%s: %s" file-name text))
+
+(lsp-defun lsp-csharp--handle-os-testmessage (_workspace (&omnisharp:TestMessageEvent :message))
+  "Handle the `o#/testmessage and display test message on test output buffer."
+  (lsp-csharp--test-message message))
+
+(lsp-defun lsp-csharp--handle-os-testcompleted (_workspace (&omnisharp:DotNetTestResult
+                                                            :method-name
+                                                            :outcome
+                                                            :error-message
+                                                            :error-stack-trace
+                                                            :standard-output
+                                                            :standard-error))
+  "Handle the `o#/testcompleted' message from the server.
+
+Will display the results of the test on the lsp-csharp test output buffer."
+  (let ((passed (string-equal "passed" outcome)))
+    (lsp-csharp--test-message
+     (format "[%s] %s "
+             (propertize (upcase outcome) 'font-lock-face (if passed 'success 'error))
+             method-name))
+
+    (unless passed
+      (lsp-csharp--test-message error-message)
+
+      (when error-stack-trace
+        (lsp-csharp--test-message error-stack-trace))
+
+      (unless (seq-empty-p standard-output)
+        (lsp-csharp--test-message "STANDARD OUTPUT:")
+        (seq-doseq (stdout-line standard-output)
+          (lsp-csharp--test-message stdout-line)))
+
+      (unless (seq-empty-p standard-error)
+        (lsp-csharp--test-message "STANDARD ERROR:")
+        (seq-doseq (stderr-line standard-error)
+          (lsp-csharp--test-message stderr-line))))))
+
+(lsp-defun lsp-csharp--action-client-find-references ((&Command :arguments?))
+  "Read first argument from ACTION as Location and display xrefs for that location
+using the `textDocument/references' request."
+  (-if-let* (((&Location :uri :range) (lsp-seq-first arguments?))
+             ((&Range :start range-start) range)
+             (find-refs-params (append (lsp--text-document-position-params (list :uri uri) range-start)
+                                       (list :context (list :includeDeclaration json-false))))
+             (locations-found (lsp-request "textDocument/references" find-refs-params)))
+      (lsp-show-xrefs (lsp--locations-to-xref-items locations-found) nil t)
+    (message "No references found")))
+
+(defun lsp-csharp--omnisharp-path->qualified-name (path)
+  "Convert PATH to qualified-namespace-like name."
+  (replace-regexp-in-string
+   (regexp-quote "/")
+   "."
+   path))
+
+(defun lsp-csharp--omnisharp-metadata-uri-handler (uri)
+  "Handle `file:/(metadata)' URI from omnisharp-roslyn server.
+
+The URI is parsed and then `o#/metadata' request is issued to retrieve
+metadata from the server. A cache file is created on project root dir that
+stores this metadata and filename is returned so lsp-mode can display this file."
+  (string-match lsp-csharp--omnisharp-metadata-uri-re uri)
+  (-when-let* ((project-name (lsp-csharp--omnisharp-path->qualified-name (url-unhex-string (match-string 1 uri))))
+               (assembly-name (lsp-csharp--omnisharp-path->qualified-name (url-unhex-string (match-string 2 uri))))
+               (type-name (lsp-csharp--omnisharp-path->qualified-name (url-unhex-string (match-string 3 uri))))
+               (metadata-req (lsp-make-omnisharp-metadata-request :project-name project-name
+                                                                  :assembly-name assembly-name
+                                                                  :type-name type-name))
+               (metadata (lsp-request "o#/metadata" metadata-req))
+               ((&omnisharp:MetadataResponse :source-name :source) metadata)
+               (filename (f-join ".cache"
+                                 "lsp-csharp"
+                                 "metadata"
+                                 "Project" project-name
+                                 "Assembly" assembly-name
+                                 "Symbol" (concat type-name ".cs")))
+               (file-location (expand-file-name filename (lsp--suggest-project-root)))
+               (metadata-file-location (concat file-location ".metadata-uri"))
+               (path (f-dirname file-location)))
+
+    (unless (find-buffer-visiting file-location)
+      (unless (file-directory-p path)
+        (make-directory path t))
+
+      (with-temp-file metadata-file-location
+        (insert uri))
+
+      (with-temp-file file-location
+        (insert source)))
+
+    file-location))
+
+(defun lsp-csharp--omnisharp-uri->path-fn (uri)
+  "Custom implementation of lsp--uri-to-path function to glue omnisharp's
+metadata uri."
+  (if (string-match-p lsp-csharp--omnisharp-metadata-uri-re uri)
+      (lsp-csharp--omnisharp-metadata-uri-handler uri)
+    (lsp--uri-to-path-1 uri)))
+
+(defun lsp-csharp--omnisharp-environment-fn ()
+  "Build environment structure for current values of lsp-csharp customizables.
+See https://github.com/OmniSharp/omnisharp-roslyn/wiki/Configuration-Options"
+  `(("OMNISHARP_RoslynExtensionsOptions:enableDecompilationSupport" . ,(if lsp-csharp-omnisharp-enable-decompilation-support "true" "false"))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection
+                  (lsp-stdio-connection
+                   #'(lambda ()
+                       (append
+                        (list (lsp-csharp--language-server-path) "-lsp")
+                        (when lsp-csharp-solution-file
+                          (list "-s" (expand-file-name lsp-csharp-solution-file)))))
+                   #'(lambda ()
+                       (when-let* ((binary (lsp-csharp--language-server-path)))
+                         (f-exists? binary))))
+                  :activation-fn (lsp-activate-on "csharp")
+                  :server-id 'omnisharp
+                  :priority -1
+                  :uri->path-fn #'lsp-csharp--omnisharp-uri->path-fn
+                  :environment-fn #'lsp-csharp--omnisharp-environment-fn
+                  :action-handlers (ht ("omnisharp/client/findReferences" 'lsp-csharp--action-client-find-references))
+                  :notification-handlers (ht ("o#/projectadded" 'ignore)
+                                             ("o#/projectchanged" 'ignore)
+                                             ("o#/projectremoved" 'ignore)
+                                             ("o#/packagerestorestarted" 'ignore)
+                                             ("o#/msbuildprojectdiagnostics" 'ignore)
+                                             ("o#/packagerestorefinished" 'ignore)
+                                             ("o#/unresolveddependencies" 'ignore)
+                                             ("o#/error" 'lsp-csharp--handle-os-error)
+                                             ("o#/testmessage" 'lsp-csharp--handle-os-testmessage)
+                                             ("o#/testcompleted" 'lsp-csharp--handle-os-testcompleted)
+                                             ("o#/projectconfiguration" 'ignore)
+                                             ("o#/projectdiagnosticstatus" 'ignore)
+                                             ("o#/backgrounddiagnosticstatus" 'ignore))
+                  :download-server-fn #'lsp-csharp--omnisharp-download-server))
+
+;;
+;; Alternative "csharp-ls" language server support
+;; see https://github.com/razzmatazz/csharp-language-server
+;;
+(lsp-defun lsp-csharp--cls-metadata-uri-handler (uri)
+  "Handle `csharp:/(metadata)' uri from csharp-ls server.
+
+`csharp/metadata' request is issued to retrieve metadata from the server.
+A cache file is created on project root dir that stores this metadata and
+filename is returned so lsp-mode can display this file."
+
+  (-when-let* ((metadata-req (lsp-make-csharp-ls-c-sharp-metadata
+                              :text-document (lsp-make-text-document-identifier :uri uri)))
+               (metadata (lsp-request "csharp/metadata" metadata-req))
+               ((&csharp-ls:CSharpMetadataResponse :project-name
+                                                   :assembly-name
+                                                   :symbol-name
+                                                   :source) metadata)
+               (filename (f-join ".cache"
+                                 "lsp-csharp"
+                                 "metadata"
+                                 "projects" project-name
+                                 "assemblies" assembly-name
+                                 (concat symbol-name ".cs")))
+               (file-location (expand-file-name filename (lsp-workspace-root)))
+               (metadata-file-location (concat file-location ".metadata-uri"))
+               (path (f-dirname file-location))
+               (coding-system-for-write 'utf-8-unix))
+
+    (unless (file-exists-p file-location)
+      (unless (file-directory-p path)
+        (make-directory path t))
+
+      (with-temp-file metadata-file-location
+        (insert uri))
+
+      (with-temp-file file-location
+        (insert source)))
+
+    file-location))
+
+(defun lsp-csharp--cls-before-file-open (_workspace)
+  "Set `lsp-buffer-uri' variable after C# file is open from *.metadata-uri file."
+
+  (let ((metadata-file-name (concat buffer-file-name ".metadata-uri")))
+    (setq-local lsp-buffer-uri
+                (when (file-exists-p metadata-file-name)
+                  (with-temp-buffer (insert-file-contents metadata-file-name)
+                                    (buffer-string))))))
+
+(defun lsp-csharp--cls-find-executable ()
+  (or (when lsp-csharp-csharpls-use-dotnet-tool
+        (if lsp-csharp-csharpls-use-local-tool
+            (list "dotnet" "tool" "run" "csharp-ls")
+          (list "csharp-ls")))
+      (executable-find "csharp-ls")      
+      (f-join (or (getenv "USERPROFILE") (getenv "HOME"))
+              ".dotnet" "tools" "csharp-ls")))
+
+(defun lsp-csharp--cls-make-launch-cmd ()
+  "Return command line to invoke csharp-ls."
+
+  ;; emacs-28.1 on macOS has an issue
+  ;; that it launches processes using posix_spawn but does not reset sigmask properly
+  ;; thus causing dotnet runtime to lockup awaiting a SIGCHLD signal that never comes
+  ;; from subprocesses that quit
+  ;;
+  ;; as a workaround we will wrap csharp-ls invocation in "/bin/ksh -c" on macos
+  ;; so it launches with proper sigmask
+  ;;
+  ;; see https://lists.gnu.org/archive/html/emacs-devel/2022-02/msg00461.html
+
+  (let ((startup-wrapper (cond ((and (eq 'darwin system-type)
+                                     (version= "28.1" emacs-version))
+                                (list "/bin/ksh" "-c"))
+
+                               (t nil)))
+
+        (csharp-ls-exec (lsp-csharp--cls-find-executable))
+
+        (solution-file-params (when lsp-csharp-solution-file
+                                (list "-s" lsp-csharp-solution-file))))
+    (append startup-wrapper
+            (if (listp csharp-ls-exec)
+                csharp-ls-exec
+              (list csharp-ls-exec))
+            solution-file-params)))
+
+(defun lsp-csharp--cls-test-csharp-ls-present ()
+  "Return non-nil if dotnet tool csharp-ls is installed as a dotnet tool."
+  (string-match-p "csharp-ls"
+                  (shell-command-to-string
+                   (if lsp-csharp-csharpls-use-local-tool
+                       "dotnet tool list"
+                     "dotnet tool list -g"))))
+
+(defun lsp-csharp--cls-download-server (_client callback error-callback update?)
+  "Install/update csharp-ls language server using `dotnet tool'.
+
+Will invoke CALLBACK or ERROR-CALLBACK based on result.
+Will update if UPDATE? is t"
+  (lsp-async-start-process
+   callback
+   error-callback
+   "dotnet" "tool" (if update? "update" "install") (if lsp-csharp-csharpls-use-local-tool "" "-g") "csharp-ls"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection #'lsp-csharp--cls-make-launch-cmd)
+                  :priority -2
+                  :server-id 'csharp-ls
+                  :activation-fn (lsp-activate-on "csharp")
+                  :before-file-open-fn #'lsp-csharp--cls-before-file-open
+                  :uri-handlers (ht ("csharp" #'lsp-csharp--cls-metadata-uri-handler))
+                  :download-server-fn #'lsp-csharp--cls-download-server))
+
+(lsp-consistency-check lsp-csharp)
+
+(provide 'lsp-csharp)
+;;; lsp-csharp.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-css.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-css.el
new file mode 100644
index 0000000..15303a2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-css.el
@@ -0,0 +1,255 @@
+;;; lsp-css.el --- CSS language server configuration   -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Ivan Yonchovski
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Ivan Yonchovski <yyoncho@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(require 'lsp-protocol)
+(require 'lsp-mode)
+
+(defgroup lsp-css nil
+  "LSP support for CSS."
+  :group 'lsp-mode
+  :link '(url-link
+          "https://github.com/microsoft/vscode/tree/main/extensions/css-language-features/server"))
+
+(defcustom lsp-css-experimental-custom-data nil
+  "A list of JSON file paths that define custom CSS data that
+loads custom properties, at directives, pseudo classes /
+elements."
+  :type '(repeat string))
+
+(defcustom lsp-css-completion-trigger-property-value-completion t
+  "By default, VS Code triggers property value completion after
+selecting a CSS property. Use this setting to disable this
+behavior."
+  :type 'boolean)
+
+(defcustom lsp-css-validate t
+  "Enables or disables all validations."
+  :type 'boolean)
+
+(defcustom lsp-css-lint-compatible-vendor-prefixes "ignore"
+  "When using a vendor-specific prefix make sure to also include
+all other vendor-specific properties."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-vendor-prefix "warning"
+  "When using a vendor-specific prefix, also include the standard
+property."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-duplicate-properties "ignore"
+  "Do not use duplicate style definitions."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-empty-rules "warning"
+  "Do not use empty rulesets."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-import-statement "ignore"
+  "Import statements do not load in parallel."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-box-model "ignore"
+  nil
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-universal-selector "ignore"
+  nil
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-zero-units "ignore"
+  "No unit for zero needed."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-font-face-properties "warning"
+  nil
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-hex-color-length "error"
+  "Hex colors must consist of three or six hex numbers."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-arguments-in-color-function "error"
+  "Invalid number of parameters."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-unknown-properties "warning"
+  "Unknown property."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-valid-properties nil
+  "A list of properties that are not validated against the
+`unknownProperties` rule."
+  :type '(repeat string))
+
+(defcustom lsp-css-lint-ie-hack "ignore"
+  "IE hacks are only necessary when supporting IE7 and older."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-unknown-vendor-specific-properties "ignore"
+  "Unknown vendor specific property."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-property-ignored-due-to-display "warning"
+  nil
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-important "ignore"
+  nil
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-float "ignore"
+  nil
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-id-selector "ignore"
+  "Selectors should not contain IDs because these rules are too
+tightly coupled with the HTML."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-lint-unknown-at-rules "warning"
+  "Unknown at-rule."
+  :type '(choice
+          (const "ignore")
+          (const "warning")
+          (const "error")))
+
+(defcustom lsp-css-trace-server "off"
+  "Traces the communication between VS Code and the CSS language
+server."
+  :type '(choice
+          (const "off")
+          (const "messages")
+          (const "verbose")))
+
+(lsp-register-custom-settings
+ '(("css.trace.server" lsp-css-trace-server)
+   ("css.lint.unknownAtRules" lsp-css-lint-unknown-at-rules)
+   ("css.lint.idSelector" lsp-css-lint-id-selector)
+   ("css.lint.float" lsp-css-lint-float)
+   ("css.lint.important" lsp-css-lint-important)
+   ("css.lint.propertyIgnoredDueToDisplay" lsp-css-lint-property-ignored-due-to-display)
+   ("css.lint.unknownVendorSpecificProperties" lsp-css-lint-unknown-vendor-specific-properties)
+   ("css.lint.ieHack" lsp-css-lint-ie-hack)
+   ("css.lint.validProperties" lsp-css-lint-valid-properties)
+   ("css.lint.unknownProperties" lsp-css-lint-unknown-properties)
+   ("css.lint.argumentsInColorFunction" lsp-css-lint-arguments-in-color-function)
+   ("css.lint.hexColorLength" lsp-css-lint-hex-color-length)
+   ("css.lint.fontFaceProperties" lsp-css-lint-font-face-properties)
+   ("css.lint.zeroUnits" lsp-css-lint-zero-units)
+   ("css.lint.universalSelector" lsp-css-lint-universal-selector)
+   ("css.lint.boxModel" lsp-css-lint-box-model)
+   ("css.lint.importStatement" lsp-css-lint-import-statement)
+   ("css.lint.emptyRules" lsp-css-lint-empty-rules)
+   ("css.lint.duplicateProperties" lsp-css-lint-duplicate-properties)
+   ("css.lint.vendorPrefix" lsp-css-lint-vendor-prefix)
+   ("css.lint.compatibleVendorPrefixes" lsp-css-lint-compatible-vendor-prefixes)
+   ("css.validate" lsp-css-validate t)
+   ("css.completion.triggerPropertyValueCompletion" lsp-css-completion-trigger-property-value-completion t)
+   ("css.experimental.customData" lsp-css-experimental-custom-data)))
+
+(defun lsp-css--server-command ()
+  "Generate startup command for CSS language server."
+  (list (lsp-package-path 'css-languageserver) "--stdio"))
+
+;;; CSS
+(lsp-defun lsp-css--apply-code-action ((&Command :arguments?))
+  "Apply ACTION as workspace edit command."
+  (lsp--apply-text-edits (cl-caddr arguments?) 'code-action))
+
+(lsp-dependency 'css-languageserver
+                '(:system "vscode-css-language-server")
+                '(:npm :package "vscode-langservers-extracted"
+                       :path "vscode-css-language-server"))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-css--server-command)
+  :activation-fn (lsp-activate-on "css" "scss" "sass" "less")
+  :priority -1
+  :action-handlers (lsp-ht ("_css.applyCodeAction" #'lsp-css--apply-code-action))
+  :server-id 'css-ls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'css-languageserver callback error-callback))))
+
+(lsp-consistency-check lsp-css)
+
+(provide 'lsp-css)
+;;; lsp-css.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cucumber.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cucumber.el
new file mode 100644
index 0000000..f241bbe
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cucumber.el
@@ -0,0 +1,98 @@
+;;; lsp-cucumber.el --- LSP Clients for Cucumber  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024  Shen, Jen-Chieh
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; LSP server implementation for Cucumber
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-cucumber nil
+  "LSP server implementation for Cucumber."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/cucumber/language-server"))
+
+(defcustom lsp-cucumber-server-path nil
+  "Path points for Cucumber language server.
+
+This is only for development use."
+  :type 'string
+  :group 'lsp-cucumber)
+
+(defcustom lsp-cucumber-active-modes
+  '( feature-mode)
+  "List of major mode that work with Cucumber language server."
+  :type '(repeat function)
+  :group 'lsp-cucumber)
+
+(lsp-defcustom lsp-cucumber-features
+  ["src/test/**/*.feature" "features/**/*.feature" "tests/**/*.feature" "*specs*/**/*.feature"]
+  "Configure where the extension should look for .feature files."
+  :type '(repeat string)
+  :group 'lsp-cucumber
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "cucumber.features")
+
+(lsp-defcustom lsp-cucumber-glue
+  ["*specs*/**/*.cs" "features/**/*.js" "features/**/*.jsx" "features/**/*.php" "features/**/*.py" "features/**/*.rs" "features/**/*.rb" "features/**/*.ts" "features/**/*.tsx" "features/**/*_test.go" "**/*_test.go" "src/test/**/*.java" "tests/**/*.py" "tests/**/*.rs"]
+  "Configure where the extension should look for source code where
+step definitions and parameter types are defined."
+  :type '(repeat string)
+  :group 'lsp-cucumber
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "cucumber.glue")
+
+(lsp-defcustom lsp-cucumber-parameter-types []
+  "Configure parameters types to convert output parameters to your own types.
+
+Details at https://github.com/cucumber/cucumber-expressions#custom-parameter-types.
+Sample:
+[(:name \"actor\"
+  :regexp \"[A-Z][a-z]+\")]"
+  :type '(lsp-repeatable-vector plist)
+  :group 'lsp-cucumber
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "cucumber.parameterTypes")
+
+(defun lsp-cucumber--server-command ()
+  "Generate startup command for Cucumber language server."
+  (or (and lsp-cucumber-server-path
+           (list lsp-cucumber-server-path "--stdio"))
+      (list (lsp-package-path 'cucumber-language-server) "--stdio")))
+
+(lsp-dependency 'cucumber-language-server
+                '(:system "cucumber-language-server")
+                '(:npm :package "@cucumber/language-server"
+                       :path "cucumber-language-server"))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-cucumber--server-command)
+  :major-modes lsp-cucumber-active-modes
+  :priority -1
+  :server-id 'cucumber-language-server
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'cucumber-language-server callback error-callback))))
+
+(provide 'lsp-cucumber)
+;;; lsp-cucumber.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cypher.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cypher.el
new file mode 100644
index 0000000..39f5fe4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-cypher.el
@@ -0,0 +1,54 @@
+;;; lsp-cypher.el --- Cypher Client                      -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023 Gustav Hedengran
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: Gustav Hedengran <gustav.hedengran@gmail.com>
+;; Keywords: languages lsp cypher
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-cypher nil
+  "LSP support for Cypher."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/neo4j/cypher-language-support/blob/main/packages/language-server"))
+
+(lsp-dependency 'cypher-language-server
+                '(:system "cypher-language-server")
+                '(:npm :package "@neo4j-cypher/language-server"
+                       :path "cypher-language-server"))
+
+(defun lsp-client--cypher-ls-server-command ()
+  "Startup command for Cypher language server."
+  (list (lsp-package-path 'cypher-language-server) "--stdio"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection #'lsp-client--cypher-ls-server-command)
+                  :activation-fn (lsp-activate-on "cypher")
+                  :language-id "cypher"
+                  :server-id 'cypher-ls
+                  :priority 0
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'cypher-language-server callback error-callback))))
+
+(lsp-consistency-check lsp-cypher)
+
+(provide 'lsp-cypher)
+;;; lsp-cypher.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-d.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-d.el
new file mode 100644
index 0000000..011e54b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-d.el
@@ -0,0 +1,41 @@
+;;; lsp-d.el --- lsp-mode dlang integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021-2026 lsp-mode maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  client for serve-d
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'ht)
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection "serve-d")
+                  :major-modes '(d-mode)
+                  :notification-handlers
+                  (ht ("coded/changedSelectedWorkspace" #'ignore)
+                      ("coded/initDubTree" #'ignore))
+                  :server-id 'serve-d))
+
+(lsp-consistency-check lsp-d)
+
+(provide 'lsp-d)
+;;; lsp-d.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dhall.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dhall.el
new file mode 100644
index 0000000..e54f039
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dhall.el
@@ -0,0 +1,43 @@
+;;; lsp-dhall.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, dhall
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Dhall Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-dhall nil
+  "LSP support for Dhall, using dhall-lsp-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/dhall-lang/dhall-haskell"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection "dhall-lsp-server")
+                  :major-modes '(dhall-mode)
+                  :priority -1
+                  :server-id 'dhallls))
+
+(lsp-consistency-check lsp-dhall)
+
+(provide 'lsp-dhall)
+;;; lsp-dhall.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-diagnostics.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-diagnostics.el
new file mode 100644
index 0000000..dba9d30
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-diagnostics.el
@@ -0,0 +1,419 @@
+;;; lsp-diagnostics.el --- LSP diagnostics integration -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;;  LSP diagnostics integration
+;;
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-diagnostics nil
+  "LSP support for diagnostics"
+  :prefix "lsp-disagnostics-"
+  :group 'lsp-mode
+  :tag "LSP Diagnostics")
+
+;;;###autoload
+(define-obsolete-variable-alias 'lsp-diagnostic-package
+  'lsp-diagnostics-provider  "lsp-mode 7.0.1")
+
+(defcustom lsp-diagnostics-provider :auto
+  "The checker backend provider."
+  :type
+  '(choice
+    (const :tag "Pick flycheck if present and fallback to flymake" :auto)
+    (const :tag "Pick flycheck" :flycheck)
+    (const :tag "Pick flymake" :flymake)
+    (const :tag "Use neither flymake nor lsp" :none)
+    (const :tag "Prefer flymake" t)
+    (const :tag "Prefer flycheck" nil))
+  :group 'lsp-diagnostics
+  :package-version '(lsp-mode . "6.3"))
+
+;;;###autoload
+(define-obsolete-variable-alias 'lsp-flycheck-default-level
+  'lsp-diagnostics-flycheck-default-level  "lsp-mode 7.0.1")
+
+(defcustom lsp-diagnostics-flycheck-default-level 'error
+  "Error level to use when the server does not report back a diagnostic level."
+  :type '(choice
+          (const error)
+          (const warning)
+          (const info))
+  :group 'lsp-diagnostics)
+
+(defcustom lsp-diagnostics-attributes
+  `((unnecessary :foreground "gray")
+    (deprecated  :strike-through t))
+  "The Attributes used on the diagnostics.
+List containing (tag attributes) where tag is the LSP diagnostic tag and
+attributes is a `plist' containing face attributes which will be applied
+on top the flycheck face for that error level."
+  :type '(repeat (list symbol plist))
+  :group 'lsp-diagnostics)
+
+(defcustom lsp-diagnostics-disabled-modes nil
+  "A list of major models for which `lsp-diagnostics-mode' should be disabled."
+  :type '(repeat symbol)
+  :group 'lsp-diagnostics
+  :package-version '(lsp-mode . "8.0.0"))
+
+;; Flycheck integration
+
+(declare-function flycheck-mode "ext:flycheck")
+(declare-function flycheck-define-generic-checker
+                  "ext:flycheck" (symbol docstring &rest properties))
+(declare-function flycheck-error-new "ext:flycheck" t t)
+(declare-function flycheck-error-message "ext:flycheck" (err) t)
+(declare-function flycheck-define-error-level "ext:flycheck" (level &rest properties))
+(declare-function flycheck-buffer "ext:flycheck")
+(declare-function flycheck-valid-checker-p "ext:flycheck")
+(declare-function flycheck-stop "ext:flycheck")
+
+(defvar flycheck-mode)
+(defvar flycheck-check-syntax-automatically)
+(defvar flycheck-checker)
+(defvar flycheck-checkers)
+
+
+(defvar-local lsp-diagnostics--flycheck-enabled nil
+  "True when lsp diagnostics flycheck integration has been enabled in this buffer.")
+
+(defvar-local lsp-diagnostics--flycheck-checker nil
+  "The value of flycheck-checker before lsp diagnostics was activated.")
+
+(defun lsp-diagnostics--flycheck-level (flycheck-level tags)
+  "Generate flycheck level from the original FLYCHECK-LEVEL (e.
+g. `error', `warning') and list of LSP TAGS."
+  (let ((name (format "lsp-flycheck-%s-%s"
+                      flycheck-level
+                      (mapconcat #'symbol-name tags "-"))))
+    (or (intern-soft name)
+        (let* ((face (--doto (intern (format "%s-face" name))
+                       (copy-face (-> flycheck-level
+                                      (get 'flycheck-overlay-category)
+                                      (get 'face))
+                                  it)
+                       (mapc (lambda (tag)
+                               (apply #'set-face-attribute it nil
+                                      (cl-rest (assoc tag lsp-diagnostics-attributes))))
+                             tags)))
+               (category (--doto (intern (format "%s-category" name))
+                           (setf (get it 'face) face
+                                 (get it 'priority) 100)))
+               (new-level (intern name))
+               (bitmap (or (get flycheck-level 'flycheck-fringe-bitmaps)
+                           (get flycheck-level 'flycheck-fringe-bitmap-double-arrow))))
+          (flycheck-define-error-level new-level
+            :severity (get flycheck-level 'flycheck-error-severity)
+            :compilation-level (get flycheck-level 'flycheck-compilation-level)
+            :overlay-category category
+            :fringe-bitmap bitmap
+            :fringe-face (get flycheck-level 'flycheck-fringe-face)
+            :error-list-face face)
+          new-level))))
+
+(defun lsp-diagnostics--flycheck-calculate-level (severity tags)
+  "Calculate flycheck level by SEVERITY and TAGS."
+  (let ((level (pcase severity
+                 (1 'error)
+                 (2 'warning)
+                 (3 'info)
+                 (4 'info)
+                 (_ lsp-flycheck-default-level)))
+        ;; materialize only first tag.
+        (tags (seq-map (lambda (tag)
+                         (cond
+                          ((= tag lsp/diagnostic-tag-unnecessary) 'unnecessary)
+                          ((= tag lsp/diagnostic-tag-deprecated) 'deprecated)))
+                       tags)))
+    (if tags
+        (lsp-diagnostics--flycheck-level level tags)
+      level)))
+
+(defun lsp-diagnostics--flycheck-start (checker callback)
+  "Start an LSP syntax check with CHECKER.
+
+CALLBACK is the status callback passed by Flycheck."
+
+  (remove-hook 'lsp-on-idle-hook #'lsp-diagnostics--flycheck-buffer t)
+
+  (->> (lsp--get-buffer-diagnostics)
+       (-map (-lambda ((&Diagnostic :message :severity? :tags? :code? :source?
+                                    :range (&Range :start (start &as &Position
+                                                                 :line      start-line
+                                                                 :character start-character)
+                                                   :end   (end   &as &Position
+                                                                 :line      end-line
+                                                                 :character end-character))))
+               (flycheck-error-new
+                :buffer (current-buffer)
+                :checker checker
+                :filename buffer-file-name
+                :message message
+                :level (lsp-diagnostics--flycheck-calculate-level severity? tags?)
+                :id code?
+                :group source?
+                :line (lsp-translate-line (1+ start-line))
+                :column (1+ (lsp-translate-column start-character))
+                :end-line (lsp-translate-line (1+ end-line))
+                :end-column (unless (lsp--position-equal start end)
+                              (1+ (lsp-translate-column end-character))))))
+       (funcall callback 'finished)))
+
+(defun lsp-diagnostics--flycheck-buffer ()
+  "Trigger flyckeck on buffer."
+  (remove-hook 'lsp-on-idle-hook #'lsp-diagnostics--flycheck-buffer t)
+  (when (bound-and-true-p flycheck-mode)
+    (flycheck-buffer)))
+
+(defun lsp-diagnostics--flycheck-report ()
+  "Report flycheck.
+This callback is invoked when new diagnostics are received
+from the language server."
+  (when (and (or (memq 'idle-change flycheck-check-syntax-automatically)
+                 (and (memq 'save flycheck-check-syntax-automatically)
+                      (not (buffer-modified-p))))
+             lsp--cur-workspace)
+    ;; make sure diagnostics are published even if the diagnostics
+    ;; have been received after idle-change has been triggered
+    (->> lsp--cur-workspace
+         (lsp--workspace-buffers)
+         (mapc (lambda (buffer)
+                 (when (and (lsp-buffer-live-p buffer)
+                            (or
+                             (not (bufferp buffer))
+                             (and (get-buffer-window buffer)
+                                  (not (-contains? (buffer-local-value 'lsp-on-idle-hook buffer)
+                                                   'lsp-diagnostics--flycheck-buffer)))))
+                   (lsp-with-current-buffer buffer
+                     (add-hook 'lsp-on-idle-hook #'lsp-diagnostics--flycheck-buffer nil t)
+                     (lsp--idle-reschedule (current-buffer)))))))))
+
+(cl-defgeneric lsp-diagnostics-flycheck-error-explainer (e _server-id)
+  "Explain a `flycheck-error' E in a generic way depending on the SERVER-ID."
+  (flycheck-error-message e))
+
+(defvar lsp-diagnostics-mode) ;; properly defined by define-minor-mode below
+
+;;;###autoload
+(defun lsp-diagnostics-lsp-checker-if-needed ()
+  (unless (flycheck-valid-checker-p 'lsp)
+    (flycheck-define-generic-checker 'lsp
+      "A syntax checker using the Language Server Protocol (LSP)
+provided by lsp-mode.
+See https://github.com/emacs-lsp/lsp-mode."
+      :start #'lsp-diagnostics--flycheck-start
+      :modes '(lsp-placeholder-mode) ;; placeholder
+      :predicate (lambda () lsp-diagnostics-mode)
+      :error-explainer (lambda (e)
+                         (lsp-diagnostics-flycheck-error-explainer
+                          e (lsp--workspace-server-id (car-safe (lsp-workspaces))))))))
+
+(defun lsp-diagnostics-flycheck-enable (&rest _)
+  "Enable flycheck integration for the current buffer."
+  (require 'flycheck)
+  (lsp-diagnostics-lsp-checker-if-needed)
+  (and (not lsp-diagnostics--flycheck-enabled)
+       (not (eq flycheck-checker 'lsp))
+       (setq lsp-diagnostics--flycheck-checker flycheck-checker))
+  (setq-local lsp-diagnostics--flycheck-enabled t)
+  (flycheck-mode 1)
+  (flycheck-stop)
+  (setq-local flycheck-checker 'lsp)
+  (lsp-flycheck-add-mode major-mode)
+  (add-to-list 'flycheck-checkers 'lsp)
+  (add-hook 'lsp-diagnostics-updated-hook #'lsp-diagnostics--flycheck-report nil t)
+  (add-hook 'lsp-managed-mode-hook #'lsp-diagnostics--flycheck-report nil t))
+
+(defun lsp-diagnostics-flycheck-disable ()
+  "Disable flycheck integration for the current buffer is it was enabled."
+  (when lsp-diagnostics--flycheck-enabled
+    (flycheck-stop)
+    (when (eq flycheck-checker 'lsp)
+      (setq-local flycheck-checker lsp-diagnostics--flycheck-checker))
+    (setq lsp-diagnostics--flycheck-checker nil)
+    (setq-local lsp-diagnostics--flycheck-enabled nil)
+    (when flycheck-mode
+      (flycheck-mode 1))))
+
+;; Flymake integration
+
+(declare-function flymake-mode "ext:flymake")
+(declare-function flymake-make-diagnostic "ext:flymake")
+(declare-function flymake-diag-region "ext:flymake")
+
+(defvar flymake-diagnostic-functions)
+(defvar flymake-mode)
+(defvar-local lsp-diagnostics--flymake-report-fn nil)
+
+(defun lsp-diagnostics-flymake-default-message-formatter (diag)
+  "Default formatter for the flymake text of an LSP `Diagnostic' DIAG.
+Returns the message, appending the code in brackets when present, e.g.
+\"foo is unused [reportUnusedExpression]\"."
+  (-let (((&Diagnostic :message :code?) diag))
+    (if code?
+        (format "%s [%s]" message code?)
+      message)))
+
+(defcustom lsp-diagnostics-flymake-message-formatter
+  #'lsp-diagnostics-flymake-default-message-formatter
+  "Function used to build the flymake text string for an LSP diagnostic.
+
+Flymake stores a single string per diagnostic
+(`flymake-diagnostic-text'), so any presentation choice (whether to
+append the rule code, the source, severity prefix, etc.) must be made
+before the `flymake-diagnostic' is constructed.  This hook provides the
+place to make that choice.
+
+Called with one argument, the LSP `Diagnostic' plist (with fields such
+as `:message', `:code?', `:source?', `:severity?', `:tags?').  Must
+return a string.
+
+The default `lsp-diagnostics-flymake-default-message-formatter' appends
+`[code]' when the diagnostic carries one and returns the bare message
+otherwise.  Override to suppress the code, prepend the source, or
+reformat the message in any other way."
+  :type 'function
+  :group 'lsp-diagnostics
+  :package-version '(lsp-mode . "10.0.1"))
+
+(defun lsp-diagnostics--flymake-setup ()
+  "Setup flymake."
+  (setq lsp-diagnostics--flymake-report-fn nil)
+  (add-hook 'flymake-diagnostic-functions 'lsp-diagnostics--flymake-backend nil t)
+  (add-hook 'lsp-diagnostics-updated-hook 'lsp-diagnostics--flymake-after-diagnostics nil t)
+  (flymake-mode 1))
+
+(defun lsp-diagnostics--flymake-after-diagnostics ()
+  "Handler for `lsp-diagnostics-updated-hook'."
+  (cond
+   ((and lsp-diagnostics--flymake-report-fn flymake-mode)
+    (lsp-diagnostics--flymake-update-diagnostics))
+   ((not flymake-mode)
+    (setq lsp-diagnostics--flymake-report-fn nil))))
+
+(defun lsp-diagnostics--flymake-backend (report-fn &rest _args)
+  "Flymake backend using REPORT-FN."
+  (let ((first-run (null lsp-diagnostics--flymake-report-fn)))
+    (setq lsp-diagnostics--flymake-report-fn report-fn)
+    (when first-run
+      (lsp-diagnostics--flymake-update-diagnostics))))
+
+(defun lsp-diagnostics--flymake-update-diagnostics ()
+  "Report new diagnostics to flymake."
+  (funcall lsp-diagnostics--flymake-report-fn
+           (-some->> (lsp-diagnostics t)
+             (gethash (lsp--fix-path-casing buffer-file-name))
+             (--map (-let* (((&Diagnostic :severity?
+                                          :range (range &as &Range
+                                                        :start (&Position :line start-line :character)
+                                                        :end (&Position :line end-line))) it)
+                            ((start . end) (lsp--range-to-region range))
+                            (text (funcall lsp-diagnostics-flymake-message-formatter it)))
+                      (when (= start end)
+                        (if-let* ((region (flymake-diag-region (current-buffer)
+                                                               (1+ start-line)
+                                                               character)))
+                            (setq start (car region)
+                                  end (cdr region))
+                          (lsp-save-restriction-and-excursion
+                            (goto-char (point-min))
+                            (setq start (line-beginning-position (1+ start-line))
+                                  end (line-end-position (1+ end-line))))))
+                      (flymake-make-diagnostic (current-buffer)
+                                               start
+                                               end
+                                               (cl-case severity?
+                                                 (1 :error)
+                                                 (2 :warning)
+                                                 (t :note))
+                                               text))))
+           ;; This :region keyword forces flymake to delete old diagnostics in
+           ;; case the buffer hasn't changed since the last call to the report
+           ;; function. See https://github.com/joaotavora/eglot/issues/159
+           :region (cons (point-min) (point-max))))
+
+
+
+;;;###autoload
+(defun lsp-diagnostics--enable ()
+  "Enable LSP checker support."
+  (when (and (member lsp-diagnostics-provider '(:auto :none :flycheck :flymake t nil))
+             (not (member major-mode lsp-diagnostics-disabled-modes)))
+    (lsp-diagnostics-mode 1)))
+
+(defun lsp-diagnostics--disable ()
+  "Disable LSP checker support."
+  (lsp-diagnostics-mode -1))
+
+;;;###autoload
+(define-minor-mode lsp-diagnostics-mode
+  "Toggle LSP diagnostics integration."
+  :group 'lsp-diagnostics
+  :global nil
+  :lighter ""
+  (cond
+   (lsp-diagnostics-mode
+    (cond
+     ((and (or
+            (and (eq lsp-diagnostics-provider :auto)
+                 (functionp 'flycheck-mode))
+            (and (eq lsp-diagnostics-provider :flycheck)
+                 (or (functionp 'flycheck-mode)
+                     (user-error "The lsp-diagnostics-provider is set to :flycheck but flycheck is not installed?")))
+            ;; legacy
+            (null lsp-diagnostics-provider))
+           (require 'flycheck nil t))
+      (lsp-diagnostics-flycheck-enable))
+     ((or (eq lsp-diagnostics-provider :auto)
+          (eq lsp-diagnostics-provider :flymake)
+          (eq lsp-diagnostics-provider t))
+      (require 'flymake)
+      (lsp-diagnostics--flymake-setup))
+     ((not (eq lsp-diagnostics-provider :none))
+      (lsp--warn "Unable to autoconfigure flycheck/flymake. The diagnostics won't be rendered.")))
+
+    (add-hook 'lsp-unconfigure-hook #'lsp-diagnostics--disable nil t))
+   (t (lsp-diagnostics-flycheck-disable)
+      (remove-hook 'lsp-unconfigure-hook #'lsp-diagnostics--disable t))))
+
+;;;###autoload
+(add-hook 'lsp-configure-hook (lambda ()
+                                (when lsp-auto-configure
+                                  (lsp-diagnostics--enable))))
+
+(defun lsp-diagnostics--clear-after-edit (&rest _)
+  "Clear diagnostics for the current buffer after workspace edits.
+This prevents stale diagnostics from appearing at wrong line numbers
+when workspace edits shift line positions (see issue #3888)."
+  (when-let* ((file-path (buffer-file-name))
+              (workspaces (lsp-workspaces)))
+    (let ((path (lsp--fix-path-casing file-path)))
+      (dolist (workspace workspaces)
+        (-let [diagnostics (lsp--workspace-diagnostics workspace)]
+          (remhash path diagnostics))))
+    (run-hooks 'lsp-diagnostics-updated-hook)))
+
+(add-hook 'lsp-after-apply-edits-hook #'lsp-diagnostics--clear-after-edit)
+
+(lsp-consistency-check lsp-diagnostics)
+
+(provide 'lsp-diagnostics)
+;;; lsp-diagnostics.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dired.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dired.el
new file mode 100644
index 0000000..59ac454
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dired.el
@@ -0,0 +1,181 @@
+;;; lsp-dired.el --- `lsp-mode' diagnostics integrated into `dired' -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021-2026 emacs-lsp maintainers
+
+;; Author: Alexander Miller <alexanderm@web.de>
+;; Author: Ivan Yonchovski <yyoncho@gmail.com>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;; `lsp-mode' diagnostics integrated into `dired'
+
+;;; Code:
+
+(require 'dired)
+(require 'pcase)
+(require 'lsp-mode)
+
+(defgroup lsp-dired nil
+  "LSP support for dired"
+  :prefix "lsp-dired-"
+  :group 'lsp-mode
+  :tag "LSP Dired")
+
+(defvar lsp-dired--ranger-adjust nil)
+(with-eval-after-load 'ranger (setf lsp-dired--ranger-adjust t))
+
+(defvar-local lsp-dired-displayed nil
+  "Flags whether icons have been added.")
+
+(defvar-local lsp-dired--covered-subdirs nil
+  "List of subdirs icons were already added for.")
+
+(defun lsp-dired--display ()
+  "Display the icons of files in a dired buffer."
+  (when (and (display-graphic-p)
+             (not lsp-dired-displayed)
+             dired-subdir-alist)
+    (setq-local lsp-dired-displayed t)
+    (pcase-dolist (`(,path . ,pos) dired-subdir-alist)
+      (lsp-dired--insert-for-subdir path pos))))
+
+(defun lsp-dired--insert-for-subdir (path pos)
+  "Display icons for subdir PATH at given POS."
+  (let ((buf (current-buffer)))
+    ;; run the function after current to make sure that we are creating the
+    ;; overlays after `treemacs-icons-dired' has run.
+    (run-with-idle-timer
+     0.0 nil
+     (lambda ()
+       (unless (and (member path lsp-dired--covered-subdirs)
+                    (not (buffer-live-p buf)))
+         (with-current-buffer buf
+           (add-to-list 'lsp-dired--covered-subdirs path)
+           (let (buffer-read-only)
+             (save-excursion
+               (goto-char pos)
+               (forward-line (if lsp-dired--ranger-adjust 1 2))
+               (cl-block :file
+                 (while (not (eobp))
+                   (if (dired-move-to-filename nil)
+                       (let* ((file (dired-get-filename nil t))
+                              (bol (progn
+                                     (search-forward-regexp "^[[:space:]]*" (line-end-position) t)
+                                     (point)))
+                              (face (lsp-dired--face-for-path file)))
+                         (when face
+                           (-doto (make-overlay bol (line-end-position))
+                             (overlay-put 'evaporate t)
+                             (overlay-put 'face face))))
+                     (cl-return-from :file nil))
+                   (forward-line 1)))))))))))
+
+(defface lsp-dired-path-face '((t :inherit font-lock-string-face))
+  "Face used for breadcrumb paths on headerline."
+  :group 'lsp-dired)
+
+(defface lsp-dired-path-error-face
+  '((t :underline (:style wave :color "Red1")))
+  "Face used for breadcrumb paths on headerline when there is an error under
+that path"
+  :group 'lsp-dired)
+
+(defface lsp-dired-path-warning-face
+  '((t :underline (:style wave :color "Yellow")))
+  "Face used for breadcrumb paths on headerline when there is an warning under
+that path"
+  :group 'lsp-dired)
+
+(defface lsp-dired-path-info-face
+  '((t :underline (:style wave :color "Green")))
+  "Face used for breadcrumb paths on headerline when there is an info under that
+path"
+  :group 'lsp-dired)
+
+(defface lsp-dired-path-hint-face
+  '((t :underline (:style wave :color "Green")))
+  "Face used for breadcrumb paths on headerline when there is an hint under that
+path"
+  :group 'lsp-dired)
+
+(defun lsp-dired--face-for-path (dir)
+  "Calculate the face for DIR."
+  (when-let* ((diags (lsp-diagnostics-stats-for (directory-file-name dir))))
+    (cl-labels ((check-severity
+                 (severity)
+                 (not (zerop (aref diags severity)))))
+      (cond
+       ((check-severity lsp/diagnostic-severity-error)
+        'lsp-dired-path-error-face)
+       ((check-severity lsp/diagnostic-severity-warning)
+        'lsp-dired-path-warning-face)
+       ((check-severity lsp/diagnostic-severity-information)
+        'lsp-dired-path-info-face)
+       ((check-severity lsp/diagnostic-severity-hint)
+        'lsp-dired-path-hint-face)))))
+
+(defun lsp-dired--insert-subdir-advice (&rest args)
+  "Advice to dired & dired+ insert-subdir commands.
+Will add icons for the subdir in the `car' of ARGS."
+  (let* ((path (car args))
+         (pos (cdr (assoc path dired-subdir-alist))))
+    (when pos
+      (lsp-dired--insert-for-subdir path pos))))
+
+(defun lsp-dired--kill-subdir-advice (&rest _args)
+  "Advice to dired kill-subdir commands.
+Will remove the killed subdir from `lsp-dired--covered-subdirs'."
+  (setf lsp-dired--covered-subdirs (delete (dired-current-directory)
+                                           lsp-dired--covered-subdirs)))
+
+(defun lsp-dired--reset (&rest _args)
+  "Reset metadata on revert."
+  (setq-local lsp-dired--covered-subdirs nil)
+  (setq-local lsp-dired-displayed nil))
+
+;;;###autoload
+(define-minor-mode lsp-dired-mode
+  "Display `lsp-mode' icons for each file in a dired buffer."
+  :require    'lsp-dired
+  :init-value nil
+  :global     t
+  :group      'lsp-dired
+  (cond
+   (lsp-dired-mode
+    (add-hook 'dired-after-readin-hook #'lsp-dired--display)
+    (advice-add 'dired-kill-subdir :before #'lsp-dired--kill-subdir-advice)
+    (advice-add 'dired-insert-subdir :after #'lsp-dired--insert-subdir-advice)
+    (advice-add 'diredp-insert-subdirs :after #'lsp-dired--insert-subdir-advice)
+    (advice-add 'dired-revert :before #'lsp-dired--reset)
+    (dolist (buffer (buffer-list))
+      (with-current-buffer buffer
+        (when (derived-mode-p 'dired-mode)
+          (lsp-dired--display)))))
+   (t
+    (advice-remove 'dired-kill-subdir #'lsp-dired--kill-subdir-advice)
+    (advice-remove 'dired-insert-subdir #'lsp-dired--insert-subdir-advice)
+    (advice-remove 'diredp-insert-subdirs #'lsp-dired--insert-subdir-advice)
+    (advice-remove 'dired-revert #'lsp-dired--reset)
+    (remove-hook 'dired-after-readin-hook #'lsp-dired--display)
+    (dolist (buffer (buffer-list))
+      (with-current-buffer buffer
+        (when (derived-mode-p 'dired-mode)
+          (dired-revert)))))))
+
+
+(lsp-consistency-check lsp-dired)(provide 'lsp-dired)
+
+
+;;; lsp-dired.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dockerfile.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dockerfile.el
new file mode 100644
index 0000000..35052bc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dockerfile.el
@@ -0,0 +1,177 @@
+;;; lsp-dockerfile.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, dockerfile
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for Dockerfile documents.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+
+;;; Dockerfile
+
+(defgroup lsp-dockerfile nil
+  "Dockerfile LSP client, provided by the Dockerfile Language Server."
+  :group 'lsp-mode
+  :version "8.0.0"
+  :link '(url-link "https://github.com/rcjsuen/dockerfile-language-server-nodejs"))
+
+(defcustom lsp-dockerfile-language-server-command
+  '("docker-langserver" "--stdio")
+  "The command that starts the docker language server."
+  :group 'lsp-dockerfile
+  :type '(repeat :tag "List of string values" string))
+
+;; Diagnostic settings
+(lsp-defcustom lsp-dockerfile-deprecated-maintainer "warning"
+  "Controls the diagnostic severity for the deprecated MAINTAINER instruction."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-dockerfile
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "docker.languageserver.diagnostics.deprecatedMaintainer")
+
+(lsp-defcustom lsp-dockerfile-directive-casing "warning"
+  "Controls the diagnostic severity for parser directive casing.
+Parser directives include escape and syntax."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-dockerfile
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "docker.languageserver.diagnostics.directiveCasing")
+
+(lsp-defcustom lsp-dockerfile-empty-continuation-line "ignore"
+  "Controls the diagnostic severity for empty continuation lines."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-dockerfile
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "docker.languageserver.diagnostics.emptyContinuationLine")
+
+(lsp-defcustom lsp-dockerfile-instruction-casing "warning"
+  "Controls the diagnostic severity for instruction casing.
+Instructions include FROM, RUN, COPY, etc."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-dockerfile
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "docker.languageserver.diagnostics.instructionCasing")
+
+(lsp-defcustom lsp-dockerfile-instruction-cmd-multiple "warning"
+  "Controls the diagnostic severity for multiple CMD instructions.
+Only the last CMD instruction takes effect in a Dockerfile."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-dockerfile
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "docker.languageserver.diagnostics.instructionCmdMultiple")
+
+(lsp-defcustom lsp-dockerfile-instruction-entrypoint-multiple "warning"
+  "Controls the diagnostic severity for multiple ENTRYPOINT instructions.
+Only the last ENTRYPOINT instruction takes effect in a Dockerfile."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-dockerfile
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "docker.languageserver.diagnostics.instructionEntrypointMultiple")
+
+(lsp-defcustom lsp-dockerfile-instruction-healthcheck-multiple "warning"
+  "Controls the diagnostic severity for multiple HEALTHCHECK instructions.
+Only the last HEALTHCHECK instruction takes effect in a Dockerfile."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-dockerfile
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "docker.languageserver.diagnostics.instructionHealthcheckMultiple")
+
+(lsp-defcustom lsp-dockerfile-instruction-json-single-quotes "warning"
+  "Controls the diagnostic severity for JSON arrays using single quotes.
+JSON arrays in Dockerfile instructions should use double quotes."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-dockerfile
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "docker.languageserver.diagnostics.instructionJSONInSingleQuotes")
+
+;; Formatter settings
+(lsp-defcustom lsp-dockerfile-format-ignore-multiline-instructions nil
+  "Whether to ignore multiline instructions during formatting."
+  :type 'boolean
+  :group 'lsp-dockerfile
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "docker.languageserver.formatter.ignoreMultilineInstructions")
+
+(lsp-register-custom-settings
+ '(("docker.languageserver.diagnostics.deprecatedMaintainer"
+    lsp-dockerfile-deprecated-maintainer)
+   ("docker.languageserver.diagnostics.directiveCasing"
+    lsp-dockerfile-directive-casing)
+   ("docker.languageserver.diagnostics.emptyContinuationLine"
+    lsp-dockerfile-empty-continuation-line)
+   ("docker.languageserver.diagnostics.instructionCasing"
+    lsp-dockerfile-instruction-casing)
+   ("docker.languageserver.diagnostics.instructionCmdMultiple"
+    lsp-dockerfile-instruction-cmd-multiple)
+   ("docker.languageserver.diagnostics.instructionEntrypointMultiple"
+    lsp-dockerfile-instruction-entrypoint-multiple)
+   ("docker.languageserver.diagnostics.instructionHealthcheckMultiple"
+    lsp-dockerfile-instruction-healthcheck-multiple)
+   ("docker.languageserver.diagnostics.instructionJSONInSingleQuotes"
+    lsp-dockerfile-instruction-json-single-quotes)
+   ("docker.languageserver.formatter.ignoreMultilineInstructions"
+    lsp-dockerfile-format-ignore-multiline-instructions t)))
+
+(lsp-dependency 'docker-langserver
+                '(:system "docker-langserver")
+                '(:npm :package "dockerfile-language-server-nodejs"
+                       :path "docker-langserver"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     `(,(or (executable-find
+                                             (cl-first lsp-dockerfile-language-server-command))
+                                            (lsp-package-path 'docker-langserver))
+                                       ,@(cl-rest lsp-dockerfile-language-server-command))))
+                  :activation-fn (lsp-activate-on "dockerfile")
+                  :priority -1
+                  :server-id 'dockerfile-ls
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration
+                                       (lsp-configuration-section "docker"))))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'docker-langserver
+                                                            callback error-callback))))
+
+(lsp-consistency-check lsp-dockerfile)
+
+(provide 'lsp-dockerfile)
+;;; lsp-dockerfile.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dot.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dot.el
new file mode 100644
index 0000000..977ae9a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-dot.el
@@ -0,0 +1,58 @@
+;;; lsp-dot.el --- LSP client for the DOT/Graphviz language -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022 Abdelhak Bougouffa
+;; Copyright (C) 2022-2026 emacs-lsp maintainers
+
+;; Author: Abdelhak Bougouffa <abougouffa@fedoraproject.org>
+;; Keywords: languages, tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for the DOT/Graphviz language
+
+;;; Code:
+
+(require 'lsp-mode)
+
+;;; DOT Language (Graphviz)
+(defgroup lsp-dot nil
+  "Settings for the DOT Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/nikeee/dot-language-server")
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defun lsp-dot--dot-ls-server-command ()
+  "Startup command for the DOT language server."
+  (list (lsp-package-path 'dot-language-server) "--stdio"))
+
+(lsp-dependency 'dot-language-server
+                '(:system "dot-language-server")
+                '(:npm :package "dot-language-server"
+                       :path "dot-language-server"))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-dot--dot-ls-server-command)
+  :priority -1
+  :activation-fn (lsp-activate-on "dot")
+  :server-id 'dot-ls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'dot-language-server callback error-callback))))
+
+(lsp-consistency-check lsp-dot)
+
+(provide 'lsp-dot)
+;;; lsp-dot.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-earthly.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-earthly.el
new file mode 100644
index 0000000..5d47487
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-earthly.el
@@ -0,0 +1,95 @@
+;;; lsp-earthly.el --- earthlyls client         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024  Samuel Loury
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; Author: Samuel Loury <konubinixweb@gmail.com>
+;; Keywords: earthly lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for Earthfile
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-earthly nil
+  "LSP support for Earthfile."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/glehmann/earthlyls")
+  :package-version `(lsp-mode . "9.0.0"))
+
+(defcustom lsp-earthly-active-modes
+  '(earthfile-mode)
+  "List of major mode that work with earthlyls."
+  :type '(list symbol)
+  :group 'lsp-earthly)
+
+(defcustom lsp-earthly-home-url
+  "https://github.com/glehmann/earthlyls"
+  "Url we use to install earthlyls."
+  :type 'string
+  :group 'lsp-earthly
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-earthly-store-path (f-join lsp-server-install-dir "earthly")
+  "The path to the file in which `earthlyls' will be stored."
+  :type 'file
+  :group 'lsp-earthly
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-earthly--download-server (_client callback error-callback update?)
+  "Install/update earthly-ls language server using `cargo install'.
+
+Will invoke CALLBACK or ERROR-CALLBACK based on result.
+Will update if UPDATE? is t."
+  (when update?
+    (ignore-errors (delete-directory lsp-earthly-store-path t)))
+  (lsp-async-start-process
+   callback
+   error-callback
+   "cargo" "install" "--git" lsp-earthly-home-url "--root"
+   lsp-earthly-store-path "earthlyls"))
+
+(defun lsp-earthly--executable ()
+  "Return earthlyls executable."
+  (let ((local (f-join lsp-earthly-store-path "bin"
+                       (if (eq system-type 'windows-nt)
+                           "earthlyls.exe"
+                         "earthlyls"))))
+    (or (and (f-exists? local) local)
+        (executable-find "earthlyls")
+        (user-error "`earthlyls' is not installed; for installation see %s for more information" lsp-earthly-home-url))))
+
+(defun lsp-earthly--server-command ()
+  "Startup command for the earthlyls server."
+  (list (lsp-earthly--executable)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   #'lsp-earthly--server-command
+                   (lambda () (f-exists? lsp-earthly-store-path)))
+  :major-modes lsp-earthly-active-modes
+  :priority -1
+  :server-id 'earthlyls
+  :download-server-fn #'lsp-earthly--download-server))
+
+(lsp-consistency-check lsp-earthly)
+
+(provide 'lsp-earthly)
+;;; lsp-earthly.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-elixir.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-elixir.el
new file mode 100644
index 0000000..754d447
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-elixir.el
@@ -0,0 +1,256 @@
+;;; lsp-elixir.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021 emacs-lsp maintainers
+;; Copyright (C) 2021-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, elixir
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Elixir Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'ht)
+
+(defcustom lsp-elixir-auto-build t
+  "Trigger ElixirLS build when code is saved."
+  :type 'boolean
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-elixir-dialyzer-enabled t
+  "Run ElixirLS's rapid Dialyzer when code is saved."
+  :type 'boolean
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-elixir-incremental-dialyzer nil
+  "Use OTP incremental dialyzer."
+  :type 'boolean
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-elixir-dialyzer-warn-opts '()
+  "Dialyzer options to enable or disable warnings.
+
+See Dialyzer's documentation for options. Note that the \"race_conditions\"
+option is unsupported"
+  :type '(repeat string)
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-elixir-dialyzer-format "dialyxir_long"
+  "Formatter to use for Dialyzer warnings."
+  :type 'string
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-elixir-mix-env "test"
+  "Mix environment to use for compilation."
+  :type 'string
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-elixir-mix-target nil
+  "Mix target to use for compilation (requires Elixir >= 1.8)."
+  :type 'string
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-elixir-project-dir nil
+  "Subdirectory containing Mix project if not in the project root.
+
+If value is `\"\"` then defaults to the workspace rootUri."
+  :type 'string
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-elixir-fetch-deps nil
+  "Automatically fetch project dependencies when compiling."
+  :type 'boolean
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-elixir-suggest-specs t
+  "Suggest @spec annotations inline using Dialyzer's inferred success typings.
+This requires Dialyzer."
+  :type 'boolean
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-elixir-auto-insert-required-alias t
+  "Enable auto-insert required alias."
+  :type 'boolean
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-elixir-signature-after-complete t
+  "Show signature help after confirming autocomplete."
+  :type 'boolean
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-elixir-dot-formatter ".formatter.exs"
+  "Filename used for formatting."
+  :type 'string
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-elixir-mcp-enabled nil
+  "Enable or disable the MCP server."
+  :type 'boolean
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-elixir-mcp-port nil
+  "Set a specific port for the MCP server."
+  :type 'number
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defgroup lsp-elixir nil
+  "LSP support for Elixir, using elixir-ls."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/elixir-lsp/elixir-ls"))
+
+(define-obsolete-variable-alias 'lsp-clients-elixir-server-executable 'lsp-elixir-server-command "2021-04-05")
+
+(defcustom lsp-elixir-server-command
+  (if (equal system-type 'windows-nt)
+      '("language_server.bat")
+    '("language_server.sh"))
+  "Command to start elixir-ls.
+
+Leave as default to let `executable-find' search for it."
+  :group 'lsp-elixir
+  :type '(repeat string)
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-elixir-ls-version "v0.29.2"
+  "Elixir-Ls version to download.
+It has to be set before `lsp-elixir.el' is loaded and it has to
+be available here: https://github.com/elixir-lsp/elixir-ls/releases/"
+  :type 'string
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-elixir-ls-download-url
+  (format "https://github.com/elixir-lsp/elixir-ls/releases/download/%1$s/elixir-ls-%1$s.zip"
+          lsp-elixir-ls-version)
+  "Automatic download url for elixir-ls."
+  :type 'string
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defconst lsp-elixir-ls-server-dir
+  (f-join lsp-server-install-dir "elixir-ls")
+  "Elixir-ls local server Directory.")
+
+(defcustom lsp-elixir-local-server-command
+  (f-join lsp-elixir-ls-server-dir
+          (cl-first lsp-elixir-server-command))
+  "Command to start local elixir-ls binary."
+  :group 'lsp-elixir
+  :type '(repeat string)
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-elixir-enable-test-lenses t
+  "Suggest Tests."
+  :type 'boolean
+  :group 'lsp-elixir
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defun lsp-elixir--build-test-command (argument)
+  "Builds the test command from the ARGUMENT."
+  (let ((test-name (lsp-get argument :testName))
+        (module (lsp-get argument :module))
+        (describe (lsp-get argument :describe)))
+    (cond (module (concat "\"" "module:" module "\""))
+          ((not test-name) (concat "\"" "describe:" describe "\""))
+          (describe (concat "\"" "test:test " describe " " test-name "\"" ))
+          (t (concat "\"" "test:test " test-name "\"" )))))
+
+(lsp-defun lsp-elixir--run-test ((&Command :arguments?))
+  "Runs tests."
+  (let* ((argument (lsp-seq-first arguments?))
+         (file-path (lsp-get argument :filePath))
+         (test-command (lsp-elixir--build-test-command argument)))
+    (compile
+     (concat "cd " (lsp-workspace-root file-path) " && "
+             "mix test --exclude test --include " test-command " " file-path
+             " --no-color"))
+    file-path))
+
+(lsp-dependency
+ 'elixir-ls
+ `(:download :url lsp-elixir-ls-download-url
+             :decompress :zip
+             :store-path ,(f-join lsp-server-install-dir "elixir-ls" "elixir-ls.zip")
+             :binary-path lsp-elixir-server-command
+             :set-executable? t))
+
+(lsp-register-custom-settings
+ '(("elixirLS.autoBuild" lsp-elixir-auto-build t)
+   ("elixirLS.dialyzerEnabled" lsp-elixir-dialyzer-enabled t)
+   ("elixirLS.incrementalDialyzer" lsp-elixir-incremental-dialyzer)
+   ("elixirLS.dialyzerWarnOpts" lsp-elixir-dialyzer-warn-opts)
+   ("elixirLS.dialyzerFormat" lsp-elixir-dialyzer-format)
+   ("elixirLS.mixEnv" lsp-elixir-mix-env)
+   ("elixirLS.mixTarget" lsp-elixir-mix-target)
+   ("elixirLS.projectDir" lsp-elixir-project-dir)
+   ("elixirLS.fetchDeps" lsp-elixir-fetch-deps)
+   ("elixirLS.suggestSpecs" lsp-elixir-suggest-specs t)
+   ("elixirLS.autoInsertRequiredAlias" lsp-elixir-auto-insert-required-alias t)
+   ("elixirLS.signatureAfterComplete" lsp-elixir-signature-after-complete t)
+   ("elixirLS.enableTestLenses" lsp-elixir-enable-test-lenses t)
+   ("elixirLS.dotFormatter" lsp-elixir-dot-formatter)
+   ("elixirLS.mcpEnabled" lsp-elixir-mcp-enabled t)
+   ("elixirLS.mcpPort" lsp-elixir-mcp-port)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     `(,(or (when (f-exists? lsp-elixir-local-server-command)
+                                              lsp-elixir-local-server-command)
+                                            (or (executable-find
+                                                 (cl-first lsp-elixir-server-command))
+                                                (lsp-package-path 'elixir-ls))
+                                            "language_server.bat")
+                                       ,@(cl-rest lsp-elixir-server-command))))
+                  :activation-fn (lsp-activate-on "elixir")
+                  :priority -1
+                  :server-id 'elixir-ls
+                  :action-handlers (ht ("elixir.lens.test.run" 'lsp-elixir--run-test))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'elixir-ls callback error-callback))
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration
+                                       (lsp-configuration-section "elixirLS")))
+                                    (lsp-put
+                                     (lsp--workspace-server-capabilities workspace)
+                                     :textDocumentSync
+                                     (lsp-make-text-document-sync-options
+                                      :save t
+                                      :change 2)))))
+
+(lsp-consistency-check lsp-elixir)
+
+(provide 'lsp-elixir)
+;;; lsp-elixir.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-elm.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-elm.el
new file mode 100644
index 0000000..dc8c253
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-elm.el
@@ -0,0 +1,138 @@
+;;; lsp-elm.el --- Elm Client settings             -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019 Daniel V
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Daniel V
+;; Keywords: elm lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-elm client
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-elm nil
+  "LSP support for the Elm programming language, using the server from https://github.com/elm-tooling/elm-language-server"
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/elm-tooling/elm-language-server"))
+
+(defcustom lsp-elm-elm-language-server-path nil
+  "Path for elm-language-server.
+Can be installed globally with: npm i -g @elm-tooling/elm-language-server,
+or manually by cloning the repo and following the installing instructions."
+  :group 'lsp-elm
+  :risky t
+  :type 'file)
+
+(defcustom lsp-elm-trace-server
+  nil
+  "Enable/disable trace logging of client and server communication."
+  :type 'boolean
+  :group 'lsp-elm)
+
+(defcustom lsp-elm-elm-path
+  ""
+  "The path to your elm executable.
+
+Should be empty by default, in that case it will assume the name and try
+to first get it from a local npm installation or a global one.  If you
+set it manually it will not try to load from the npm folder."
+  :type 'file
+  :group 'lsp-elm)
+
+(defcustom lsp-elm-elm-format-path
+  ""
+  "The path to your elm-format executable.
+
+Should be empty by default, in that case it will assume the name and try
+to first get it from a local npm installation or a global one.  If you
+set it manually it will not try to load from the npm folder."
+  :type 'file
+  :group 'lsp-elm)
+
+(defcustom lsp-elm-elm-test-path
+  ""
+  "The path to your elm-test executable.
+
+Should be empty by default, in that case it will assume the name and try
+to first get it from a local npm installation or a global one.  If you
+set it manually it will not try to load from the npm folder."
+  :type 'file
+  :group 'lsp-elm)
+
+(defcustom lsp-elm-disable-elmls-diagnostics
+  nil
+  "Enable/Disable linting diagnostics from the language server."
+  :type 'boolean
+  :group 'lsp-elm)
+
+(defcustom lsp-elm-only-update-diagnostics-on-save
+  nil
+  "Only update compiler diagnostics on save, not on document change."
+  :type 'boolean
+  :group 'lsp-elm)
+
+(defcustom lsp-elm-skip-install-package-confirmation
+  nil
+  "Skip confirmation for the Install Package code action."
+  :type 'boolean
+  :group 'lsp-elm)
+
+(defcustom lsp-elm-server-args
+  '("--stdio")
+  "Arguments to pass to the server."
+  :type '(repeat string)
+  :group 'lsp-elm)
+
+(defun lsp-elm--elm-language-server-command ()
+  "Generate LSP startup command for the Elm Language Server."
+  (cons
+   (or lsp-elm-elm-language-server-path
+       (lsp-package-path 'elm-language-server))
+   lsp-elm-server-args))
+
+(defun lsp-clients-elm--make-init-options ()
+  "Init options for elm-language-server."
+  `(:elmPath ,lsp-elm-elm-path
+    :elmFormatPath ,lsp-elm-elm-format-path
+    :elmTestPath ,lsp-elm-elm-test-path
+    :disableElmLSDiagnostics ,(lsp-json-bool lsp-elm-disable-elmls-diagnostics)
+    :onlyUpdateDiagnosticsOnSave ,(lsp-json-bool lsp-elm-only-update-diagnostics-on-save)
+    :skipInstallPackageConfirmation ,(lsp-json-bool lsp-elm-skip-install-package-confirmation)
+    :trace.server ,(lsp-json-bool lsp-elm-trace-server)))
+
+(lsp-dependency 'elm-language-server
+                '(:system "elm-language-server")
+                '(:npm :package "@elm-tooling/elm-language-server"
+                       :path "elm-language-server"))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-elm--elm-language-server-command)
+  :major-modes '(elm-mode)
+  :priority -1
+  :initialization-options #'lsp-clients-elm--make-init-options
+  :server-id 'elm-ls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'elm-language-server callback error-callback))))
+
+(lsp-consistency-check lsp-elm)
+
+(provide 'lsp-elm)
+;;; lsp-elm.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-emmet.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-emmet.el
new file mode 100644
index 0000000..65c2bef
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-emmet.el
@@ -0,0 +1,65 @@
+;;; lsp-emmet.el --- lsp-mode Emmet integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2026 emacs-lsp maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: lsp, emmet
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Client for Emmet
+
+;;; Code:
+
+(require 'lsp-mode)
+
+;;; emmet-ls
+(defgroup lsp-emmet-ls nil
+  "Settings for emmet-ls."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/aca/emmet-ls")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-emmet-ls-command '("emmet-ls" "--stdio")
+  "The command that starts emmet-ls."
+  :type '(repeat :tag "List of string values" string)
+  :group 'lsp-emmet-ls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-dependency 'emmet-ls
+                '(:system "emmet-ls")
+                '(:npm :package "emmet-ls"
+                       :path "emmet-ls"))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda ()
+                     `(,(or (executable-find (cl-first lsp-emmet-ls-command))
+                            (lsp-package-path 'emmet-ls))
+                       ,@(cl-rest lsp-emmet-ls-command))))
+  :activation-fn (lsp-activate-on "html" "css" "scss" "less" "javascriptreact" "typescriptreact")
+  :priority -1
+  :add-on? t
+  :multi-root t
+  :server-id 'emmet-ls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'emmet-ls callback error-callback))))
+
+(lsp-consistency-check lsp-emmet)
+
+(provide 'lsp-emmet)
+;;; lsp-emmet.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-erlang.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-erlang.el
new file mode 100644
index 0000000..719399e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-erlang.el
@@ -0,0 +1,427 @@
+;;; lsp-erlang.el --- Erlang Client settings         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019-2023 Roberto Aloi, Alan Zimmerman
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Roberto Aloi, Alan Zimmerman
+;; Keywords: erlang lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-erlang client
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-semantic-tokens)
+
+(defgroup lsp-erlang nil
+  "LSP support for the Erlang programming language.
+It can use erlang-ls or erlang-language-platform (ELP)."
+  :group 'lsp-mode)
+
+(defgroup lsp-erlang-ls nil
+  "LSP support for the Erlang programming language using erlang-ls."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/erlang-ls/erlang_ls"))
+
+(defgroup lsp-erlang-elp nil
+  "LSP support for the Erlang programming language using erlang-language-platform (ELP)."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/WhatsApp/erlang-language-platform"))
+
+(defgroup lsp-erlang-elp-semantic-tokens nil
+  "LSP semantic tokens support for ELP."
+  :group 'lsp-erlang-elp
+  :link '(url-link "https://github.com/WhatsApp/erlang-language-platform")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-erlang-server 'erlang-ls
+  "Choose LSP server."
+  :type '(choice (const :tag "erlang-ls" erlang-ls)
+                 (const :tag "erlang-language-platform" erlang-language-platform))
+  :group 'lsp-erlang
+  :package-version '(lsp-mode . "6.2"))
+
+;; ---------------------------------------------------------------------
+;; ELP config settings.  Auto-generated using scripts/lsp-generate-settings.el
+;; And the process in https://github.com/emacs-lsp/lsp-haskell/blob/master/CONTIBUTING.md
+
+(lsp-defcustom lsp-elp-buck-query-use-bxl-enable nil
+  "Use BXL to query for buck project model."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.buck.query.useBxl.enable")
+
+(lsp-defcustom lsp-elp-diagnostics-disabled nil
+  "List of ELP diagnostics to disable."
+  :type 'lsp-string-vector
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.diagnostics.disabled")
+
+(lsp-defcustom lsp-elp-diagnostics-enable-experimental nil
+  "Whether to show experimental ELP diagnostics that might
+have more false positives than usual."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.diagnostics.enableExperimental")
+
+(lsp-defcustom lsp-elp-diagnostics-enable-otp nil
+  "Whether to report diagnostics for OTP files."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.diagnostics.enableOtp")
+
+(lsp-defcustom lsp-elp-diagnostics-on-save-enable nil
+  "Update native diagnostics only when the file is saved."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.diagnostics.onSave.enable")
+
+(lsp-defcustom lsp-elp-eqwalizer-all nil
+  "Whether to report Eqwalizer diagnostics for the whole project and not only for opened files."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.eqwalizer.all")
+
+(lsp-defcustom lsp-elp-eqwalizer-chunk-size 100
+  "Chunk size to use for project-wide eqwalization."
+  :type 'number
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.eqwalizer.chunkSize")
+
+(lsp-defcustom lsp-elp-eqwalizer-max-tasks 32
+  "Maximum number of tasks to run in parallel for project-wide eqwalization."
+  :type 'number
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.eqwalizer.maxTasks")
+
+(lsp-defcustom lsp-elp-highlight-dynamic-enable nil
+  "If enabled, highlight variables with type `dynamic()` when Eqwalizer results are available."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.highlightDynamic.enable")
+
+(lsp-defcustom lsp-elp-hover-actions-doc-links-enable nil
+  "Whether to show Hover Actions of type `docs'. Only applies when
+`#elp.hoverActions.enable#` is set."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.hoverActions.docLinks.enable")
+
+(lsp-defcustom lsp-elp-hover-actions-enable nil
+  "Whether to show Hover Actions."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.hoverActions.enable")
+
+(lsp-defcustom lsp-elp-inlay-hints-parameter-hints-enable t
+  "Whether to show function parameter name inlay hints at the call
+site."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.inlayHints.parameterHints.enable")
+
+(lsp-defcustom lsp-elp-lens-debug-enable nil
+  "Whether to show the `Debug` lenses. Only applies when
+`#elp.lens.enable#` is set."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.lens.debug.enable")
+
+(lsp-defcustom lsp-elp-lens-enable nil
+  "Whether to show Code Lenses in Erlang files."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.lens.enable")
+
+(lsp-defcustom lsp-elp-lens-links-enable nil
+  "Whether to show the `Link` lenses. Only applies when
+`#elp.lens.enable#` is set."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.lens.links.enable")
+
+(lsp-defcustom lsp-elp-lens-run-coverage-enable nil
+  "Display code coverage information when running tests via the
+Code Lenses. Only applies when `#elp.lens.enabled` and
+`#elp.lens.run.enable#` are set."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.lens.run.coverage.enable")
+
+(lsp-defcustom lsp-elp-lens-run-enable nil
+  "Whether to show the `Run` lenses. Only applies when
+`#elp.lens.enable#` is set."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.lens.run.enable")
+
+(lsp-defcustom lsp-elp-lens-run-interactive-enable nil
+  "Whether to show the `Run Interactive` lenses. Only applies when
+`#elp.lens.enable#` is set."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.lens.run.interactive.enable")
+
+(lsp-defcustom lsp-elp-log "error"
+  "Configure LSP-based logging using env_logger syntax."
+  :type 'string
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.log")
+
+(lsp-defcustom lsp-elp-signature-help-enable t
+  "Whether to show Signature Help."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.signatureHelp.enable")
+
+(lsp-defcustom lsp-elp-types-on-hover-enable nil
+  "Display types when hovering over expressions."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.typesOnHover.enable")
+
+;; ---------------------------------------------------------------------
+
+;; erlang-ls
+
+(defcustom lsp-erlang-ls-server-path
+  "erlang_ls"
+  "Path to the Erlang Language Server binary."
+  :group 'lsp-erlang-ls
+  :risky t
+  :type 'file)
+
+(defcustom lsp-erlang-ls-server-connection-type
+  'stdio
+  "Type of connection to use with the Erlang Language Server: tcp or stdio."
+  :group 'lsp-erlang-ls
+  :risky t
+  :type 'symbol)
+
+(defun lsp-erlang-ls-server-start-fun (port)
+  "Command to start erlang_ls in TCP mode on the given PORT."
+  `(,lsp-erlang-ls-server-path
+    "--transport" "tcp"
+    "--port" ,(number-to-string port)))
+
+(defun lsp-erlang-ls-server-connection ()
+  "Command to start erlang_ls in stdio mode."
+  (if (eq lsp-erlang-ls-server-connection-type 'tcp)
+      (lsp-tcp-connection 'lsp-erlang-ls-server-start-fun)
+    (lsp-stdio-connection `(,lsp-erlang-ls-server-path "--transport" "stdio"))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-erlang-ls-server-connection)
+                  :major-modes '(erlang-mode)
+                  :priority -1
+                  :server-id 'erlang-ls))
+
+
+;; erlang-language-platform
+
+(lsp-defcustom lsp-erlang-elp-types-on-hover t
+  "Show eqWAlizer types on hover."
+  :type 'boolean
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "elp.typesOnHover.enable")
+
+(defcustom lsp-erlang-elp-server-command '("elp" "server")
+  "Command to start erlang-language-platform."
+  :type '(repeat string)
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-erlang-elp-otp-download-version "27.1"
+  "OTP version used as part of the file name when downloading the ELP binary.
+It must match those used in https://github.com/WhatsApp/erlang-language-platform/releases/latest"
+  :type '(choice (string :tag "25.3")
+                 (string :tag "26.2")
+                 (string :tag "27.1"))
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-erlang-elp-download-url
+  (format "https://github.com/WhatsApp/erlang-language-platform/releases/latest/download/elp-%s-otp-%s.tar.gz"
+          (pcase system-type
+            ('gnu/linux
+             (if (string-match-p "^aarch64-.*" system-configuration)
+                 "linux-aarch64-unknown-linux-gnu"
+               "linux-x86_64-unknown-linux-gnu"))
+             ('darwin
+              (if (string-match-p "^aarch64-.*" system-configuration)
+                  "macos-aarch64-apple-darwin"
+                "macos-x86_64-apple-darwin")))
+            lsp-erlang-elp-otp-download-version)
+          "Automatic download url for erlang-language-platform."
+          :type 'string
+          :group 'lsp-erlang-elp
+          :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-erlang-elp-store-path (f-join lsp-server-install-dir
+                                                "erlang"
+                                                (if (eq system-type 'windows-nt)
+                                                    "elp.exe"
+                                                  "elp"))
+  "The path to the file in which `elp' will be stored."
+  :type 'file
+  :group 'lsp-erlang-elp
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-dependency
+ 'erlang-language-platform
+ `(:download :url lsp-erlang-elp-download-url
+             :decompress :targz
+             :store-path lsp-erlang-elp-store-path
+             :set-executable? t)
+ '(:system "elp"))
+
+;; Semantic tokens
+
+;; Modifier faces
+
+(defface lsp-erlang-elp-bound-modifier-face
+  '((t :underline t))
+  "The face modification to use for bound variables in patterns."
+  :group 'lsp-erlang-elp-semantic-tokens)
+
+(defface lsp-erlang-elp-exported-function-modifier-face
+  '((t :underline t))
+  "The face modification to use for exported functions."
+  :group 'lsp-erlang-elp-semantic-tokens)
+
+(defface lsp-erlang-elp-exported-type-modifier-face
+  '((t :underline t))
+  "The face modification to use for exported types."
+  :group 'lsp-erlang-elp-semantic-tokens)
+
+(defface lsp-erlang-elp-deprecated-function-modifier-face
+  '((t :strike-through t))
+  "The face modification to use for deprecated functions."
+  :group 'lsp-erlang-elp-semantic-tokens)
+
+(defface lsp-erlang-elp-type-dynamic-modifier-face
+  '((t (:weight bold)))
+  "The face modification to use for dynamic types."
+  :group 'lsp-erlang-elp-semantic-tokens)
+
+;; ---------------------------------------------------------------------
+;; Semantic token modifier face customization
+
+(defcustom lsp-erlang-elp-bound-modifier 'lsp-erlang-elp-bound-modifier-face
+  "Face for semantic token modifier for `bound' attribute."
+  :type 'face
+  :group 'lsp-erlang-elp-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-erlang-elp-exported-function-modifier 'lsp-erlang-elp-exported-function-modifier-face
+  "Face for semantic token modifier for `exported_function' attribute."
+  :type 'face
+  :group 'lsp-erlang-elp-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-erlang-elp-exported-type-modifier 'lsp-erlang-elp-exported-type-modifier-face
+  "Face for semantic token modifier for `exported_type' attribute."
+  :type 'face
+  :group 'lsp-erlang-elp-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-erlang-elp-deprecated-function-modifier 'lsp-erlang-elp-deprecated-function-modifier-face
+  "Face for semantic token modifier for `deprecated_function' attribute."
+  :type 'face
+  :group 'lsp-erlang-elp-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-erlang-elp-type-dynamic-modifier 'lsp-erlang-elp-type-dynamic-modifier-face
+  "Face for semantic token modifier for `type_dynamic' attribute."
+  :type 'face
+  :group 'lsp-erlang-elp-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+;; ---------------------------------------------------------------------
+
+(defun lsp-erlang-elp--semantic-modifiers ()
+  "Mapping between rust-analyzer keywords and fonts to apply.
+The keywords are sent in the initialize response, in the semantic
+tokens legend."
+  `(
+    ("bound" . ,lsp-erlang-elp-bound-modifier)
+    ("exported_function" . ,lsp-erlang-elp-exported-function-modifier)
+    ("exported_type" . ,lsp-erlang-elp-exported-type-modifier)
+    ("deprecated_function" . ,lsp-erlang-elp-deprecated-function-modifier)
+    ("type_dynamic" . ,lsp-erlang-elp-type-dynamic-modifier)))
+
+;; ---------------------------------------------------------------------
+;; Client
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda ()
+                     `(,(or (executable-find
+                             (cl-first lsp-erlang-elp-server-command))
+                            (lsp-package-path 'erlang-language-platform)
+                            "elp")
+                       ,@(cl-rest lsp-erlang-elp-server-command))))
+  :activation-fn (lsp-activate-on "erlang")
+  :priority (if (eq lsp-erlang-server 'erlang-language-platform) 1 -2)
+  :semantic-tokens-faces-overrides `(:discard-default-modifiers t
+                                                                :modifiers
+                                                                ,(lsp-erlang-elp--semantic-modifiers))
+  :server-id 'elp
+  :custom-capabilities `((experimental . ((snippetTextEdit . ,(and lsp-enable-snippet (fboundp 'yas-minor-mode))))))
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'erlang-language-platform callback error-callback))))
+
+(defun lsp-erlang-switch-server (&optional lsp-server)
+  "Switch priorities of lsp servers, unless LSP-SERVER is already active."
+  (interactive)
+  (let ((current-server (if (> (lsp--client-priority (gethash 'erlang-ls lsp-clients)) 0)
+                            'erlang-ls
+                          'erlang-language-platform)))
+    (unless (eq lsp-server current-server)
+      (dolist (server '(erlang-ls erlang-language-platform))
+        (when (natnump (setf (lsp--client-priority (gethash server lsp-clients))
+                             (* (lsp--client-priority (gethash server lsp-clients)) -1)))
+          (message (format "Switched to server %s." server)))))))
+
+(lsp-consistency-check lsp-erlang)
+
+(provide 'lsp-erlang)
+;;; lsp-erlang.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-eslint.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-eslint.el
new file mode 100644
index 0000000..91ad98a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-eslint.el
@@ -0,0 +1,470 @@
+;;; lsp-eslint.el --- lsp-mode eslint integration    -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Ivan Yonchovski
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Ivan Yonchovski <yyoncho@gmail.com>
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(require 'lsp-protocol)
+(require 'lsp-mode)
+
+(defconst lsp-eslint/status-ok 1)
+(defconst lsp-eslint/status-warn 2)
+(defconst lsp-eslint/status-error 3)
+
+(defgroup lsp-eslint nil
+  "ESLint language server group."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/microsoft/vscode-eslint"))
+
+(defcustom lsp-eslint-unzipped-path (f-join lsp-server-install-dir "eslint/unzipped")
+  "The path to the file in which `eslint' will be stored."
+  :type 'file
+  :group 'lsp-eslint
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-eslint-download-url "https://github.com/emacs-lsp/lsp-server-binaries/blob/master/dbaeumer.vscode-eslint-3.0.10.vsix?raw=true"
+  "ESLint language server download url."
+  :type 'string
+  :group 'lsp-eslint
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-eslint-server-command `("node"
+                                       "~/server/out/eslintServer.js"
+                                       "--stdio")
+  "Command to start ESLint server."
+  :risky t
+  :type '(repeat string)
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-enable t
+  "Controls whether ESLint is enabled for JavaScript files or not."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-package-manager "npm"
+  "The package manager you use to install node modules."
+  :type '(choice (const :tag "npm" "npm")
+                 (const :tag "yarn" "yarn")
+                 (const :tag "pnpm" "pnpm")
+                 (string :tag "other"))
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-format t
+  "Whether to perform format."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-node-path nil
+  "A path added to NODE_PATH when resolving the `eslint' module."
+  :type '(repeat string)
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-node "node"
+  "Path to Node.js."
+  :type 'file
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-eslint-options nil
+  "The ESLint options object to provide args normally passed to
+  `eslint' when executed from a command line (see
+  https://eslint.org/docs/latest/integrate/nodejs-api)."
+  :type 'alist)
+
+(defcustom lsp-eslint-experimental nil
+  "The eslint experimental configuration."
+  :type 'alist)
+
+(defcustom lsp-eslint-config-problems nil
+  "The eslint problems configuration."
+  :type 'alist)
+
+(defcustom lsp-eslint-time-budget nil
+  "The eslint config to inform you of slow validation times and
+  long ESLint runs when computing code fixes during save."
+  :type 'alist)
+
+(defcustom lsp-eslint-trace-server "off"
+  "Traces the communication between VSCode and the ESLint linter service."
+  :type 'string)
+
+(defcustom lsp-eslint-run "onType"
+  "Run the linter on save (onSave) or on type (onType)"
+  :type '(choice (const :tag "onSave" "onSave")
+                 (const :tag "onType" "onType"))
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-auto-fix-on-save nil
+  "Turns auto fix on save on or off."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-fix-all-problem-type "all"
+  "Determines which problems are fixed when running the
+source.fixAll code action."
+  :type '(choice
+          (const "all")
+          (const "problems")
+          string)
+  :package-version '(lsp-mode . "7.0.1"))
+
+(defcustom lsp-eslint-quiet nil
+  "Turns on quiet mode, which ignores warnings."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-working-directories []
+  "A vector of working directory names to use.
+Can be a pattern, an absolute path, a path relative to the workspace,
+or a supported mode such as \"auto\" or \"location\".
+Examples:
+ - \"/home/user/abc/\"
+ - \"abc/\"
+ - (directory \"abc\") which is equivalent to \"abc\" above
+ - (pattern \"abc/*\")
+ - (mode \"auto\")
+ - (mode \"location\")
+Note that the home directory reference ~/ is not currently supported, use
+/home/[user]/ instead."
+  :type '(lsp-repeatable-vector (choice string (plist mode string)))
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-validate '("svelte")
+  "An array of language ids which should always be validated by ESLint."
+  :type '(repeat string)
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-eslint-provide-lint-task nil
+  "Controls whether a task for linting the whole workspace will be available."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-lint-task-enable nil
+  "Controls whether a task for linting the whole workspace will be available."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-lint-task-options "."
+  "Command line options applied when running the task for linting the whole
+workspace (see https://eslint.org/docs/user-guide/command-line-interface)."
+  :type 'string
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-runtime nil
+  "The location of the node binary to run ESLint under."
+  :type '(repeat string)
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-code-action-disable-rule-comment t
+  "Controls whether code actions to add a rule-disabling comment should be shown."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-code-action-disable-rule-comment-location "separateLine"
+  "Controls where the disable rule code action places comments.
+
+Accepts the following values:
+- \"separateLine\": Add the comment above the line to be disabled (default).
+- \"sameLine\": Add the comment on the same line that will be disabled."
+  :type '(choice
+          (const "separateLine")
+          (const "sameLine"))
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-eslint-code-action-show-documentation t
+  "Controls whether code actions to show documentation for an ESLint rule should
+be shown."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-eslint-warn-on-ignored-files nil
+  "Controls whether a warning should be emitted when a file is ignored."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-eslint-rules-customizations []
+  "Controls severity overrides for ESLint rules.
+
+The value is a vector of alists, with each alist containing the following keys:
+- rule - The rule to match. Can match wildcards with *, or be prefixed with !
+  to negate the match.
+- severity - The severity to report this rule as. Can be one of the following:
+  - \"off\": Disable the rule.
+  - \"info\": Report as informational.
+  - \"warn\": Report as a warning.
+  - \"error\": Report as an error.
+  - \"upgrade\": Increase by 1 severity level (eg. warning -> error).
+  - \"downgrade\": Decrease by 1 severity level (eg. warning -> info).
+  - \"default\": Report as the same severity specified in the ESLint config."
+  :type '(lsp-repeatable-vector
+          (alist :options ((rule string)
+                           (severity (choice
+                                      (const "off")
+                                      (const "info")
+                                      (const "warn")
+                                      (const "error")
+                                      (const "upgrade")
+                                      (const "downgrade")
+                                      (const "default"))))))
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-eslint-experimental-incremental-sync t
+  "Controls whether the new incremental text document synchronization should
+be used."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-eslint-save-library-choices t
+  "Controls whether to remember choices made to permit or deny ESLint libraries
+from running."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-eslint-library-choices-file (expand-file-name (locate-user-emacs-file ".lsp-eslint-choices"))
+  "The file where choices to permit or deny ESLint libraries from running is
+stored."
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-eslint-multi-root nil
+  "If non nil, `eslint' will be started in multi-root mode."
+  :type 'boolean
+  :safe #'booleanp
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defun lsp--find-eslint ()
+  (or
+   (when-let* ((workspace-folder (lsp-find-session-folder (lsp-session) default-directory)))
+     (let ((eslint-local-path (f-join workspace-folder "node_modules" ".bin"
+                                      (if (eq system-type 'windows-nt) "eslint.cmd" "eslint"))))
+       (when (f-exists? eslint-local-path)
+         eslint-local-path)))
+   "eslint"))
+
+(defun lsp-eslint-create-default-configuration ()
+  "Create default ESLint configuration."
+  (interactive)
+  (unless (lsp-session-folders (lsp-session))
+    (user-error "There are no workspace folders"))
+  (pcase (->> (lsp-session)
+              lsp-session-folders
+              (-filter (lambda (dir)
+                         (-none?
+                          (lambda (file) (f-exists? (f-join dir file)))
+                          '(".eslintrc.js" ".eslintrc.cjs" ".eslintrc.yaml" ".eslintrc.yml" ".eslintrc" ".eslintrc.json")))))
+    (`nil (user-error "All workspace folders contain ESLint configuration"))
+    (folders (let ((default-directory (completing-read "Select project folder: " folders nil t)))
+               (async-shell-command (format "%s --init" (lsp--find-eslint)))))))
+
+(lsp-defun lsp-eslint-status-handler (workspace (&eslint:StatusParams :state))
+  (setf (lsp--workspace-status-string workspace)
+        (propertize "ESLint"
+                    'face (cond
+                           ((eq state lsp-eslint/status-error) 'error)
+                           ((eq state lsp-eslint/status-warn) 'warn)
+                           (t 'success)))))
+
+(lsp-defun lsp-eslint--configuration (_workspace (&ConfigurationParams :items))
+  (->> items
+       (seq-map (-lambda ((&ConfigurationItem :scope-uri?))
+                  (-when-let* ((file (lsp--uri-to-path scope-uri?))
+                               (buffer (find-buffer-visiting file))
+                               (workspace-folder (lsp-find-session-folder (lsp-session) file)))
+                    (with-current-buffer buffer
+                      (list :validate (if (member (lsp-buffer-language) lsp-eslint-validate) "on" "probe")
+                            :packageManager lsp-eslint-package-manager
+                            :codeAction (list
+                                         :disableRuleComment (list
+                                                              :enable (lsp-json-bool lsp-eslint-code-action-disable-rule-comment)
+                                                              :location lsp-eslint-code-action-disable-rule-comment-location)
+                                         :showDocumentation (list
+                                                             :enable (lsp-json-bool lsp-eslint-code-action-show-documentation)))
+                            :codeActionOnSave (list :enable (lsp-json-bool lsp-eslint-auto-fix-on-save)
+                                                    :mode lsp-eslint-fix-all-problem-type)
+                            :format (lsp-json-bool lsp-eslint-format)
+                            :quiet (lsp-json-bool lsp-eslint-quiet)
+                            :onIgnoredFiles (if lsp-eslint-warn-on-ignored-files "warn" "off")
+                            :options (or lsp-eslint-options (ht))
+                            :experimental (or lsp-eslint-experimental (ht))
+                            :problems (or lsp-eslint-config-problems (ht))
+                            :timeBudget (or lsp-eslint-time-budget (ht))
+                            :rulesCustomizations lsp-eslint-rules-customizations
+                            :run lsp-eslint-run
+                            :nodePath lsp-eslint-node-path
+                            :workingDirectory (lsp-eslint--working-directory workspace-folder file)
+                            :workspaceFolder (list :uri (lsp--path-to-uri workspace-folder)
+                                                   :name (f-filename workspace-folder)))))))
+       (apply #'vector)))
+
+(defun lsp-eslint--working-directory (workspace current-file)
+  "Find the first directory in the parameter config.workingDirectories which
+contains the current file"
+  (let* ((directories (-map (lambda (dir)
+                              (when (and (listp dir) (plist-member dir 'directory))
+                                (setq dir (plist-get dir 'directory)))
+                              (cond
+                               ((not (listp dir))
+                                (if (f-absolute? dir) dir (f-join workspace dir)))
+                               ((plist-member dir 'pattern)
+                                (setq dir (plist-get dir 'pattern))
+                                (when (not (f-absolute? dir))
+                                  (setq dir (f-join workspace dir)))
+                                (f-glob dir))
+                               ((plist-member dir 'mode)
+                                ;; we don't want this setting to get flattened by -flatten
+                                `(mode . ,(plist-get dir 'mode)))))
+                            (append lsp-eslint-working-directories nil)))
+         (working-directory (-first (lambda (dir)
+                                      (if (stringp dir)
+                                          (f-ancestor-of-p dir current-file)
+                                        dir))
+                                    (-flatten directories))))
+    (cond
+     ((consp working-directory) `(:mode ,(cdr working-directory)))
+     ((stringp working-directory) (list :directory working-directory :!cwd :json-false)))))
+
+(lsp-defun lsp-eslint--open-doc (_workspace (&eslint:OpenESLintDocParams :url))
+  "Open documentation."
+  (browse-url url))
+
+(defun lsp-eslint-apply-all-fixes ()
+  "Apply all autofixes in the current buffer."
+  (interactive)
+  (lsp-send-execute-command "eslint.applyAllFixes" (vector (lsp--versioned-text-document-identifier))))
+
+;; XXX: replace with `lsp-make-interactive-code-action' macro
+;; (lsp-make-interactive-code-action eslint-fix-all "source.fixAll.eslint")
+
+(defun lsp-eslint-fix-all ()
+  "Perform the source.fixAll.eslint code action, if available."
+  (interactive)
+  (condition-case nil
+      (lsp-execute-code-action-by-kind "source.fixAll.eslint")
+    (lsp-no-code-actions
+     (when (called-interactively-p 'any)
+       (lsp--info "source.fixAll.eslint action not available")))))
+
+(defun lsp-eslint-server-command ()
+  (if (lsp-eslint-server-exists? lsp-eslint-server-command)
+      lsp-eslint-server-command
+    `(,lsp-eslint-node ,(f-join lsp-eslint-unzipped-path
+                                "extension/server/out/eslintServer.js")
+                       "--stdio")))
+
+(defun lsp-eslint-server-exists? (eslint-server-command)
+  (let* ((command-name (f-base (f-filename (cl-first eslint-server-command))))
+         (first-argument (cl-second eslint-server-command))
+         (first-argument-exist (and first-argument (file-exists-p first-argument))))
+    (if (equal command-name lsp-eslint-node)
+        first-argument-exist
+      (executable-find (cl-first eslint-server-command)))))
+
+(defvar lsp-eslint--stored-libraries (ht)
+  "Hash table defining if a given path to an ESLint library is allowed to run.
+If the value for a key is 4, it will be allowed. If it is 1, it will not. If a
+value does not exist for the key, or the value is nil, the user will be prompted
+to allow or deny it.")
+
+(when (and (file-exists-p lsp-eslint-library-choices-file)
+           lsp-eslint-save-library-choices)
+  (setq lsp-eslint--stored-libraries (lsp--read-from-file lsp-eslint-library-choices-file)))
+
+(lsp-defun lsp-eslint--confirm-local (_workspace (&eslint:ConfirmExecutionParams :library-path) callback)
+  (if-let* ((option-alist '(("Always" 4 . t)
+                           ("Yes" 4 . nil)
+                           ("No" 1 . nil)
+                           ("Never" 1 . t)))
+           (remembered-answer (gethash library-path lsp-eslint--stored-libraries)))
+      (funcall callback remembered-answer)
+    (lsp-ask-question
+     (format
+      "Allow lsp-mode to execute %s? Note: The latest versions of the ESLint language server no longer create this prompt."
+      library-path)
+     (mapcar 'car option-alist)
+     (lambda (response)
+       (let ((option (cdr (assoc response option-alist))))
+         (when (cdr option)
+           (puthash library-path (car option) lsp-eslint--stored-libraries)
+           (when lsp-eslint-save-library-choices
+             (lsp--persist lsp-eslint-library-choices-file lsp-eslint--stored-libraries)))
+         (funcall callback (car option)))))))
+
+(defun lsp-eslint--probe-failed (_workspace _message)
+  "Called when the server detects a misconfiguration in ESLint."
+  (lsp--error "ESLint is not configured correctly. Please ensure your eslintrc is set up for the languages you are using."))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection
+  (lsp-stdio-connection
+   (lambda () (lsp-eslint-server-command))
+   (lambda () (lsp-eslint-server-exists? (lsp-eslint-server-command))))
+  :activation-fn (lambda (filename &optional _)
+                   (when lsp-eslint-enable
+                     (or (string-match-p (rx (one-or-more anything) "."
+                                             (or "ts" "js" "jsx" "tsx" "html" "vue" "svelte")eos)
+                                         filename)
+                         (and (derived-mode-p 'js-mode 'js2-mode 'typescript-mode 'typescript-ts-mode 'html-mode 'svelte-mode)
+                           (not (string-match-p "\\.json\\'" filename))))))
+  :priority -1
+  :completion-in-comments? t
+  :add-on? t
+  :multi-root lsp-eslint-multi-root
+  :notification-handlers (ht ("eslint/status" #'lsp-eslint-status-handler))
+  :request-handlers (ht ("workspace/configuration" #'lsp-eslint--configuration)
+                        ("eslint/openDoc" #'lsp-eslint--open-doc)
+                        ("eslint/probeFailed" #'lsp-eslint--probe-failed))
+  :async-request-handlers (ht ("eslint/confirmESLintExecution" #'lsp-eslint--confirm-local))
+  :server-id 'eslint
+  :initialized-fn (lambda (workspace)
+                    (with-lsp-workspace workspace
+                      (lsp--server-register-capability
+                       (lsp-make-registration
+                        :id "random-id"
+                        :method "workspace/didChangeWatchedFiles"
+                        :register-options? (lsp-make-did-change-watched-files-registration-options
+                                            :watchers
+                                            `[,(lsp-make-file-system-watcher
+                                                :glob-pattern "**/.eslintr{c.js,c.yaml,c.yml,c,c.json}")
+                                              ,(lsp-make-file-system-watcher
+                                                :glob-pattern "**/.eslintignore")
+                                              ,(lsp-make-file-system-watcher
+                                                :glob-pattern "**/package.json")])))))
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (let ((tmp-zip (make-temp-file "ext" nil ".zip")))
+                          (delete-file tmp-zip)
+                          (lsp-download-install
+                           (lambda (&rest _)
+                             (condition-case err
+                                 (progn
+                                   (lsp-unzip tmp-zip lsp-eslint-unzipped-path)
+                                   (funcall callback))
+                               (error (funcall error-callback err))))
+                           error-callback
+                           :url lsp-eslint-download-url
+                           :store-path tmp-zip)))))
+
+(lsp-consistency-check lsp-eslint)
+
+(provide 'lsp-eslint)
+;;; lsp-eslint.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fennel.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fennel.el
new file mode 100644
index 0000000..37d923f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fennel.el
@@ -0,0 +1,49 @@
+;;; lsp-fennel.el --- lsp-mode for the fennel-ls -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024 Merrick Luo
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; Author: Merrick Luo
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for fennel-ls - an language server for fennel.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-fennel nil
+  "LSP support for the fennel-ls language server."
+  :group 'lsp-mode
+  :link '(url-link "https://git.sr.ht/~xerool/fennel-ls"))
+
+;; TODO: consider find in luarocks install location
+(defun lsp-fennel--ls-command ()
+  (executable-find "fennel-ls"))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-fennel--ls-command)
+  :activation-fn (lsp-activate-on "fennel")
+  :priority -2
+  :server-id 'fennel-ls))
+
+(lsp-consistency-check lsp-fennel)
+
+(provide 'lsp-fennel)
+;;; lsp-fennel.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fish.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fish.el
new file mode 100644
index 0000000..fc6ba8e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fish.el
@@ -0,0 +1,53 @@
+;;; lsp-fish.el --- lsp-mode fish-shell integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2025-2026 lsp-mode maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  Client for fish, the user-friendly command line shell (https://github.com/fish-shell/fish-shell/)
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-fish nil
+  "Settings for the fish-shell Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://fish-lsp.dev/")
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-fish-executable '("fish-lsp" "start")
+  "Command to run the fish-shell language server."
+  :group 'lsp-fish
+  :risky t
+  :type '(repeat string))
+
+(lsp-dependency 'fish-language-server
+                '(:system "fish-lsp"))
+
+(lsp-register-client
+ (make-lsp-client :server-id 'fish-lsp
+                  :new-connection (lsp-stdio-connection (lambda () lsp-fish-executable))
+                  :activation-fn (lsp-activate-on "fish")
+                  :major-modes '(fish-mode)))
+
+(lsp-consistency-check lsp-fish)
+
+(provide 'lsp-fish)
+;;; lsp-fish.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fortitude.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fortitude.el
new file mode 100644
index 0000000..34144f7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fortitude.el
@@ -0,0 +1,77 @@
+;;; lsp-fortitude.el --- fortitude lsp support             -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2025 Peter Hill
+;;
+;; Author: Peter Hill <peter.hill@york.ac.uk>
+;; Keywords: language tools
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Fortitude LSP Client for the Fortran programming language
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-fortitude nil
+  "LSP support for Fortran, using fortitude's Fortran Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/PlasmaFAIR/fortitude"))
+
+(defcustom lsp-fortitude-server-command '("fortitude" "server")
+  "Command to start fortitude lsp."
+  :risky t
+  :type '(repeat string)
+  :group 'lsp-fortitude)
+
+(defcustom lsp-fortitude-fortitude-args '()
+  "Arguments, passed to fortitude."
+  :risky t
+  :type '(repeat string)
+  :group 'lsp-fortitude)
+
+(defcustom lsp-fortitude-log-level "error"
+  "Tracing level."
+  :type '(choice (const "debug")
+                 (const "error")
+                 (const "info")
+                 (const "off")
+                 (const "warn"))
+  :group 'lsp-fortitude)
+
+(defcustom lsp-fortitude-advertize-fix-all t
+  "Whether to report ability to handle source.fixAll actions."
+  :type 'boolean
+  :group 'lsp-fortitude)
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda () (append lsp-fortitude-server-command lsp-fortitude-fortitude-args)))
+  :activation-fn (lsp-activate-on "fortran")
+  :server-id 'fortitude
+  :priority -2
+  :add-on? t
+  :initialization-options
+  (lambda ()
+    (list :settings
+          (list :logLevel lsp-fortitude-log-level
+                :fixAll (lsp-json-bool lsp-fortitude-advertize-fix-all))))))
+
+(lsp-consistency-check lsp-fortitude)
+
+(provide 'lsp-fortitude)
+;;; lsp-fortitude.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fortran.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fortran.el
new file mode 100644
index 0000000..ad9499b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fortran.el
@@ -0,0 +1,61 @@
+;;; lsp-fortran.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, fortran
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Fortran Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-fortran nil
+  "LSP support for Fortran, using the Fortran Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://gnikit.github.io/fortls"))
+
+(defcustom lsp-clients-fortls-executable "fortls"
+  "The fortls executable to use.
+Leave as just the executable name to use the default behavior of
+finding the executable with `exec-path'."
+  :group 'lsp-fortran
+  :risky t
+  :type 'file)
+
+(defcustom lsp-clients-fortls-args '()
+  "Extra arguments for the fortls executable"
+  :group 'lsp-fortran
+  :risky t
+  :type '(repeat string))
+
+(defun lsp-clients--fortls-command ()
+  "Generate the language server startup command."
+  `(,lsp-clients-fortls-executable,@lsp-clients-fortls-args))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection 'lsp-clients--fortls-command)
+                  :major-modes '(f90-mode fortran-mode)
+                  :priority -1
+                  :server-id 'fortls))
+
+(lsp-consistency-check lsp-fortran)
+
+(provide 'lsp-fortran)
+;;; lsp-fortran.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fsharp.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fsharp.el
new file mode 100644
index 0000000..aaa8ae5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-fsharp.el
@@ -0,0 +1,348 @@
+;;; lsp-fsharp.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Reed Mullanix
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Reed Mullanix <reedmullanix@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-fsharp client
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-fsharp nil
+  "LSP support for the F# Programming Language, using the FsharpAutoComplete server."
+  :link '(url-link "https://github.com/fsharp/FsAutoComplete")
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-fsharp-server-install-dir (f-join lsp-server-install-dir "fsautocomplete/")
+  "Install directory for fsautocomplete server.
+The slash is expected at the end."
+  :group 'lsp-fsharp
+  :risky t
+  :type 'directory
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-fsharp-server-args nil
+  "Extra arguments for the F# language server."
+  :type '(repeat string)
+  :group 'lsp-fsharp
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-fsharp-keywords-autocomplete t
+  "Provides keywords in autocomplete list."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-external-autocomplete nil
+  "Provides autocompletion for symbols from not opened namespaces/modules;
+inserts open on accept."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-linter t
+  "Enables FSharpLint integration, provides additional warnings and code
+action fixes."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-union-case-stub-generation t
+  "Enables a code action to generate pattern matching cases."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-union-case-stub-generation-body "failwith \"Not Implemented\""
+  "Defines dummy body used by pattern matching generator."
+  :group 'lsp-fsharp
+  :type 'string
+  :risky t
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-record-stub-generation t
+  "Enables code action to generate record stub."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-record-stub-generation-body "failwith \"Not Implemented\""
+  "Defines dummy body used by record stub generator."
+  :group 'lsp-fsharp
+  :type 'string
+  :risky t
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-interface-stub-generation t
+  "Enables code action to generate an interface stub."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-interface-stub-generation-object-identifier "this"
+  "Defines object identifier used by interface stub generator,
+e.g. `this' or `self'."
+  :group 'lsp-fsharp
+  :type 'string
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-interface-stub-generation-method-body "failwith \"Not Implemented\""
+  "Defines dummy body used by interface stub generator."
+  :group 'lsp-fsharp
+  :type 'string
+  :risky t
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-unused-opens-analyzer t
+  "Enables unused open detection."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-unused-declarations-analyzer t
+  "Enables unused symbol detection."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-simplify-name-analyzer nil
+  "Enables simplify name analyzer and remove redundant qualifier quick fix."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-resolve-namespaces t
+  "Enables resolve namespace quick fix; adds `open' if symbol is from not yet
+opened module/namespace."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-enable-reference-code-lens t
+  "Enables reference count code lenses."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-fsharp-auto-workspace-init nil
+  "Enable automatic workspace initialization.
+Do note that this can cause unexpected or challenging behaviors, as solutions
+with test projects are not autoloaded by FSharpAutoComplete."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :risky t)
+
+(defcustom lsp-fsharp-generate-binlog nil
+  "Generate a binlog for debugging project cracking."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-fsharp-use-dotnet-tool-for-fsac t
+  "Run FsAutoComplete as a dotnet tool.
+
+The binary will be invoked via \"dotnet fsautocomplete\" in the
+project's root directory, which will run a project-local tool if
+available, else the globally installed tool."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :risky t)
+
+
+(defcustom lsp-fsharp-use-dotnet-local-tool nil
+  "When running FsAutoComplete as a dotnet tool, use the local version.
+
+This variable will have no effect if
+`lsp-fsharp-use-dotnet-tool-for-fsac' is nil.
+
+This variable is risky as a buffer-local, and should instead be
+set per-project (e.g. in a .dir-locals.el at the root of a
+repository)."
+  :group 'lsp-fsharp
+  :type 'boolean
+  :risky t)
+
+(defcustom lsp-fsharp-workspace-extra-exclude-dirs nil
+  "Additional directories to exclude from FsAutoComplete
+ workspace loading / discovery."
+  :group 'lsp-fsharp
+  :type 'lsp-string-vector)
+
+(defun lsp-fsharp--fsac-install (_client callback error-callback update?)
+  "Install/update fsautocomplete language server using `dotnet tool'.
+Will invoke CALLBACK or ERROR-CALLBACK based on result. Will update if
+UPDATE? is t."
+  (lsp-async-start-process
+   callback
+   error-callback
+   "dotnet" "tool" (if update? "update" "install") (when lsp-fsharp-use-dotnet-local-tool "-g") "fsautocomplete"))
+
+(defun lsp-fsharp--fsac-cmd ()
+  "The location of fsautocomplete executable."
+  (or (when lsp-fsharp-use-dotnet-tool-for-fsac
+        (if lsp-fsharp-use-dotnet-local-tool
+            (list "dotnet" "tool" "run" "fsautocomplete")
+          (list "fsautocomplete")))
+      (-let [maybe-local-executable (expand-file-name "fsautocomplete" lsp-fsharp-server-install-dir)]
+        (when (f-exists-p maybe-local-executable)
+          maybe-local-executable))
+      (executable-find "fsautocomplete")
+      (f-join (or (getenv "USERPROFILE") (getenv "HOME"))
+              ".dotnet" "tools" "fsautocomplete")))
+
+(defun lsp-fsharp--make-launch-cmd ()
+  "Build the command required to launch fsautocomplete."
+
+  ;; emacs-28.1 on macOS has an issue
+  ;; that it launches processes using posix_spawn but does not reset sigmask properly
+  ;; thus causing dotnet runtime to lockup awaiting a SIGCHLD signal that never comes
+  ;; from subprocesses that quit
+  ;;
+  ;; as a workaround we will wrap fsautocomplete invocation in "/bin/ksh -c" (on macos)
+  ;; so it launches with proper sigmask
+  ;;
+  ;; see https://lists.gnu.org/archive/html/emacs-devel/2022-02/msg00461.html
+  ;; --
+  ;; we also try to resolve full path to fsautocomplete using `executable-find' as
+  ;; our `startup-wrapper' may use $PATH to interpret the location of fsautocomplete
+  ;; and we want to actually use `exec-path' here
+
+  (let ((startup-wrapper (cond ((and (eq 'darwin system-type)
+                                     (version= "28.1" emacs-version))
+                                (list "/bin/ksh" "-c"))
+
+                               (t nil)))
+        (fsautocomplete-exec (lsp-fsharp--fsac-cmd)))
+    (append startup-wrapper
+            (if (listp fsautocomplete-exec)
+                fsautocomplete-exec
+              (list fsautocomplete-exec))
+            lsp-fsharp-server-args)))
+
+(defun lsp-fsharp--test-fsautocomplete-present ()
+  "Return non-nil if dotnet tool fsautocomplete is installed globally."
+  (if lsp-fsharp-use-dotnet-tool-for-fsac
+      (-let* ((cmd-str (if lsp-fsharp-use-dotnet-local-tool
+                           "dotnet tool list"
+                         "dotnet tool list -g"))
+              (res (string-match-p "fsautocomplete"
+                                  (shell-command-to-string cmd-str))))
+        (if res res
+          (error "Failed to locate fsautocomplete binary; due to lsp-fsharp-use-dotnet-local-tool == %s, checked with command %s" lsp-fsharp-use-dotnet-local-tool cmd-str)))
+
+    (f-exists? (lsp-fsharp--fsac-cmd))))
+
+(defun lsp-fsharp--project-list (workspace)
+  "Get the list of files we need to send to fsharp/workspaceLoad."
+  (let* ((base-exlude-dirs ["paket-files" ".git" "packages" "node_modules"])
+         (exclude-dirs (apply 'vector (append base-exlude-dirs lsp-fsharp-workspace-extra-exclude-dirs)))
+         (response (lsp-request "fsharp/workspacePeek"
+                                `(:directory ,(lsp--workspace-root workspace)
+                                             :deep 10
+                                             :excludedDirs ,exclude-dirs)))
+         (data (lsp--read-json (lsp-get response :content)))
+         (found (-> data (lsp-get :Data) (lsp-get :Found)))
+         (directory (seq-find (lambda (d) (equal "directory" (lsp-get d :Type))) found)))
+    (-> directory (lsp-get :Data) (lsp-get :Fsprojs))))
+
+;;;###autoload
+(defun lsp-fsharp--workspace-load (projects)
+  "Load all of the provided PROJECTS."
+  (lsp-request-async "fsharp/workspaceLoad"
+                     `(:textDocuments ,(vconcat [] (mapcar (lambda (p) `(:uri ,p)) projects)))
+                     (lambda (_)
+                       (lsp--info "Workspace Loaded!"))))
+
+(defvar lsp-fsharp--default-init-options  (list)
+  "Default init options to be passed to FSharpAutoComplete,
+  updated conditionally by `lsp-fsharp--make-init-options'.")
+
+(defun lsp-fsharp--make-init-options ()
+  "Init options for F#."
+  (-let [opts lsp-fsharp--default-init-options]
+    (if lsp-fsharp-auto-workspace-init
+        (push '(:AutomaticWorkspaceInit . t) opts)
+      opts)))
+
+(lsp-register-custom-settings
+ `(("FSharp.KeywordsAutocomplete" lsp-fsharp-keywords-autocomplete t)
+   ("FSharp.ExternalAutocomplete" lsp-fsharp-external-autocomplete t)
+   ("FSharp.Linter" lsp-fsharp-linter t)
+   ("FSharp.UnionCaseStubGeneration" lsp-fsharp-union-case-stub-generation t)
+   ("FSharp.UnionCaseStubGenerationBody" lsp-fsharp-union-case-stub-generation-body)
+   ("FSharp.RecordStubGeneration" lsp-fsharp-record-stub-generation t)
+   ("FSharp.RecordStubGenerationBody" lsp-fsharp-record-stub-generation-body)
+   ("FSharp.InterfaceStubGeneration" lsp-fsharp-interface-stub-generation t)
+   ("FSharp.InterfaceStubGenerationObjectIdentifier" lsp-fsharp-interface-stub-generation-object-identifier)
+   ("FSharp.InterfaceStubGenerationMethodBody" lsp-fsharp-interface-stub-generation-method-body)
+   ("FSharp.UnusedOpensAnalyzer" lsp-fsharp-unused-opens-analyzer t)
+   ("FSharp.UnusedDeclarationsAnalyzer" lsp-fsharp-unused-declarations-analyzer t)
+   ("FSharp.SimplifyNameAnalyzer" lsp-fsharp-simplify-name-analyzer t)
+   ("FSharp.ResolveNamespaces" lsp-fsharp-resolve-namespaces t)
+   ("FSharp.EnableReferenceCodeLens" lsp-fsharp-enable-reference-code-lens t)
+   ("FSharp.GenerateBinlog" lsp-fsharp-generate-binlog t)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   #'lsp-fsharp--make-launch-cmd
+                                   #'lsp-fsharp--test-fsautocomplete-present)
+                  :major-modes '(fsharp-mode fsharp-ts-mode)
+                  :notification-handlers (ht ("fsharp/notifyCancel" #'ignore)
+                                             ("fsharp/notifyWorkspace" #'ignore)
+                                             ("fsharp/fileParsed" #'ignore)
+                                             ("fsharp/notifyWorkspacePeek" #'ignore)
+                                             ("fsharp/documentAnalyzed" #'ignore)
+                                             ("workspace/codeLens/refresh" #'ignore)
+                                             ("fsharp/testDetected" #'ignore))
+                  :initialization-options 'lsp-fsharp--make-init-options
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      ;; Something needs to be calling lsp--set-configuration
+                                      (progn
+                                        (lsp--set-configuration
+                                         (lsp-configuration-section "fsharp"))
+                                        (lsp-fsharp--workspace-load
+                                         (lsp-fsharp--project-list workspace)))))
+                  :after-open-fn ;; workaround https://github.com/fsharp/FsAutoComplete/issues/833
+                  (lambda ()
+                    (setq-local lsp-default-create-error-handler-fn
+                                (lambda (method)
+                                  (lambda (error)
+                                    (when
+                                        (not
+                                         (seq-find (lambda (s)
+                                                     (string= s (lsp-get error :message)))
+                                                   '("Index was outside the bounds of the array."
+                                                     "No symbol information found"
+                                                     "No ident at this location")))
+                                      (lsp--warn
+                                       "%s"
+                                       (or (lsp--error-string error)
+                                           (format "%s Request has failed" method))))))))
+                  :server-id 'fsac
+                  :download-server-fn #'lsp-fsharp--fsac-install))
+
+(lsp-consistency-check lsp-fsharp)
+
+(provide 'lsp-fsharp)
+;;; lsp-fsharp.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-futhark.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-futhark.el
new file mode 100644
index 0000000..df91812
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-futhark.el
@@ -0,0 +1,42 @@
+;;; lsp-futhark.el --- lsp-mode futhark integration    -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024-2026 lsp-mode maintainers
+
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Client for the futhark language server.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-futhark nil
+  "LSP support for Futhark, using futhark lsp"
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/diku-dk/futhark/tree/master/src/Futhark/LSP")
+  :package-version `(lsp-mode . "10.0.0"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection '("futhark" "lsp"))
+                  :activation-fn (lsp-activate-on "futhark")
+                  :server-id 'futhark))
+
+(lsp-consistency-check lsp-futhark)
+
+(provide 'lsp-futhark)
+;;; lsp-futhark.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-gdscript.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-gdscript.el
new file mode 100644
index 0000000..28b0aed
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-gdscript.el
@@ -0,0 +1,63 @@
+;;; lsp-gdscript.el --- LSP mode -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020 Oliver Frank
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: Oliver Frank <oliverfrank321@gmail.com>
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-gdscript client
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-gdscript nil
+  "LSP support for GDScript, using godot's language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/godotengine/godot")
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-gdscript-port 6005
+  "Port to connect server to"
+  :type 'integer
+  :group 'lsp-gdscript)
+
+(defun lsp-gdscript-tcp-connect-to-port ()
+  "Define a TCP connection to language server."
+  (list
+   :connect (lambda (filter sentinel name _environment-fn _workspace)
+              (let* ((host "localhost")
+                     (port lsp-gdscript-port)
+                     (tcp-proc (lsp--open-network-stream host port (concat name "::tcp"))))
+
+                (set-process-query-on-exit-flag tcp-proc nil)
+                (set-process-filter tcp-proc filter)
+                (set-process-sentinel tcp-proc sentinel)
+                (cons tcp-proc tcp-proc)))
+   :test? (lambda () t)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-gdscript-tcp-connect-to-port)
+                  :activation-fn (lsp-activate-on "gdscript")
+                  :server-id 'gdscript))
+
+(lsp-consistency-check lsp-gdscript)
+
+(provide 'lsp-gdscript)
+;;; lsp-gdscript.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-gleam.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-gleam.el
new file mode 100644
index 0000000..8ad1b42
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-gleam.el
@@ -0,0 +1,48 @@
+;;; lsp-gleam.el --- gleam client -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2026 emacs-lsp maintainers
+
+;; Author: Jonathan Arnett
+;; Keywords: lsp gleam
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for the Gleam Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-gleam nil
+  "LSP support for Gleam."
+  :group 'lsp-mode
+  :link '(url-link "https://gleam.run"))
+
+(defcustom lsp-gleam-executable '("gleam" "lsp")
+  "Command to run the Gleam LSP server."
+  :group 'lsp-gleam
+  :risky t
+  :type 'file)
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection lsp-gleam-executable)
+  :major-modes '(gleam-mode gleam-ts-mode)
+  :priority -1
+  :server-id 'gleam-lsp))
+
+(provide 'lsp-gleam)
+;;; lsp-gleam.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-glsl.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-glsl.el
new file mode 100644
index 0000000..adbfaed
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-glsl.el
@@ -0,0 +1,51 @@
+;;; lsp-glsl.el --- GLSL client -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: Jen-Chieh Shen <jcs090218@gmail.com>
+;; Keywords: languages lsp glsl
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; LSP client for the GLSL.
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-glsl nil
+  "LSP support for GLSL."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/svenstaro/glsl-language-server"))
+
+(defcustom lsp-glsl-executable '("glslls" "--stdin")
+  "Command to run the GLSL language server."
+  :group 'lsp-glsl
+  :risky t
+  :type '(repeat string))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda ()
+                     lsp-glsl-executable))
+  :activation-fn (lsp-activate-on "glsl")
+  :priority -1
+  :server-id 'glslls))
+
+(provide 'lsp-glsl)
+;;; lsp-glsl.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-go.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-go.el
new file mode 100644
index 0000000..962c241
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-go.el
@@ -0,0 +1,464 @@
+;;; lsp-go.el --- Go Client settings             -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Muir Manders
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Muir Manders <muir@mnd.rs>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-go client
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-completion)
+
+(defgroup lsp-go nil
+  "LSP support for the Go Programming Language, using the gopls language server."
+  :link '(url-link "https://github.com/golang/tools/blob/master/gopls/README.md")
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.3.2"))
+
+(define-obsolete-variable-alias
+  'lsp-gopls-server-path
+  'lsp-go-gopls-server-path
+  "lsp-mode 7.0.1")
+
+(defcustom lsp-go-gopls-server-path "gopls"
+  "Path to gopls server binary."
+  :type 'string
+  :group 'lsp-go)
+
+(define-obsolete-variable-alias
+  'lsp-gopls-server-args
+  'lsp-go-gopls-server-args
+  "lsp-mode 7.0.1")
+
+(defcustom lsp-go-gopls-server-args '("-remote=auto")
+  "Extra CLI arguments for gopls."
+  :type '(repeat string)
+  :group 'lsp-go)
+
+(define-obsolete-variable-alias
+  'lsp-gopls-use-placeholders
+  'lsp-go-use-placeholders
+  "lsp-mode 7.0.1")
+
+(defcustom lsp-go-use-placeholders t
+  "Cause gopls to provide placeholder parameter snippets when
+completing function calls."
+  :type 'boolean
+  :group 'lsp-go)
+
+(define-obsolete-variable-alias
+  'lsp-gopls-build-flags
+  'lsp-go-build-flags
+  "lsp-mode 7.0.1")
+
+(defcustom lsp-go-build-flags []
+  "A vector of flags passed on to the build system when invoked,
+  applied to queries like `go list'."
+  :type '(lsp-repeatable-vector string)
+  :group 'lsp-go
+  :risky t
+  :package-version '(lsp-mode "6.2"))
+
+(define-obsolete-variable-alias
+  'lsp-gopls-env
+  'lsp-go-env
+  "lsp-mode 7.0.1")
+
+(defcustom lsp-go-env nil
+  "`gopls' has the unusual ability to set environment variables,
+  intended to affect the behavior of commands invoked by `gopls'
+  on the user's behalf. This variable takes a hash table of env
+  var names to desired values."
+  :type '(alist :key-type (symbol :tag "env var name") :value-type (string :tag "value"))
+  :group 'lsp-go
+  :risky t
+  :package-version '(lsp-mode "6.2"))
+
+(defcustom lsp-go-directory-filters []
+  "A vector of directory filters."
+  :link '(url-link "https://github.com/golang/tools/blob/67e49ef2d0f326051e22a4a55bdf9344ae1a8ed8/gopls/doc/settings.md#directoryfilters-string")
+  :group 'lsp-go
+  :type 'lsp-string-vector
+  :package-version '(lsp-mode "8.0.0"))
+
+(define-obsolete-variable-alias
+  'lsp-gopls-hover-kind
+  'lsp-go-hover-kind
+  "lsp-mode 7.0.1")
+
+(defcustom lsp-go-hover-kind "SynopsisDocumentation"
+  "`gopls' allows the end user to select the desired amount of
+  documentation returned during e.g. hover and thing-at-point
+  operations."
+  :type '(choice (const "SynopsisDocumentation")
+                 (const "NoDocumentation")
+                 (const "FullDocumentation")
+                 (const "SingleLine")
+                 (const "Structured"))
+  :group 'lsp-go
+  :risky t
+  :package-version '(lsp-mode "6.2"))
+
+(define-obsolete-variable-alias
+  'lsp-gopls-available-codelens
+  'lsp-go-available-codelenses
+  "lsp-mode 7.0.1")
+
+(define-obsolete-variable-alias
+  'lsp-go-available-codelens
+  'lsp-go-available-codelenses
+  "lsp-mode 7.0.1")
+
+(defvar lsp-go-available-codelenses
+  '(
+    (gc_details . "Toggle the calculation of gc annotations")
+    (generate . "Run `go generate` for a directory")
+    (regenerate_cgo . "Regenerate cgo definitions")
+    (test . "Run `go test` for a specific set of test or benchmark functions (legacy)")
+    (tidy . "Run `go mod tidy` for a module")
+    (upgrade_dependency . "Upgrade a dependency")
+    (vendor . "Runs `go mod vendor' for a module"))
+  "Available codelenses that can be further enabled or disabled
+  through `lsp-go-codelenses'.")
+
+(defun lsp-go--defcustom-available-as-alist-type (alist)
+  "Return a list for the `:type' field in `defcustom' used to populate an alist.
+
+The input ALIST has the form `((\"name\" . \"documentation sentence\") [...])'
+
+The returned type provides a tri-state that either:
+  - does not include the element in the alist
+  - sets element to false (actually, :json-false)
+  - sets element to true \(actually, t)"
+  (let ((list '()))
+    (dolist (v alist)
+      (push `(cons
+              :tag ,(cdr v)
+              (const :format "" ,(car v))
+              (choice (const :tag "Enable" t) (const :tag "Disable" :json-false)))
+            list))
+    (push 'set list)
+    list))
+
+(define-obsolete-variable-alias
+  'lsp-gopls-codelens
+  'lsp-go-codelenses
+  "lsp-mode 7.0.1")
+
+(define-obsolete-variable-alias
+  'lsp-go-codelens
+  'lsp-go-codelenses
+  "lsp-mode 7.0.1")
+
+(defcustom lsp-go-codelenses '((gc_details . :json-false)
+                               (generate . t)
+                               (regenerate_cgo . t)
+                               (tidy . t)
+                               (upgrade_dependency . t)
+                               (test . t)
+                               (vendor . t))
+  "Select what codelenses should be enabled or not.
+
+The codelenses can be found at https://github.com/golang/tools/blob/3fa0e8f87c1aae0a9adc2a63af1a1945d16d9359/internal/lsp/source/options.go#L106-L112."
+  :type (lsp-go--defcustom-available-as-alist-type lsp-go-available-codelenses)
+  :group 'lsp-go
+  :risky t
+  :package-version '(lsp-mode "7.0"))
+
+(define-obsolete-variable-alias
+  'lsp-clients-go-library-directories
+  'lsp-go-library-directories
+  "lsp-mode 7.0.1")
+
+(defcustom lsp-go-library-directories ["/usr"]
+  "List of directories which will be considered to be libraries."
+  :group 'lsp-go
+  :risky t
+  :type '(lsp-repeatable-vector string))
+
+(define-obsolete-variable-alias
+  'lsp-clients-go-library-directories-include-go-modules
+  'lsp-go-library-directories-include-go-modules
+  "lsp-mode 7.0.1")
+
+(defcustom lsp-go-library-directories-include-go-modules t
+  "Whether or not $GOPATH/pkg/mod should be included as a library directory."
+  :type 'boolean
+  :group 'lsp-go)
+
+(defun lsp-go--library-default-directories (_workspace)
+  "Calculate go library directories.
+
+If `lsp-go-library-directories-include-go-modules' is non-nil
+and the environment variable GOPATH is set this function will return
+$GOPATH/pkg/mod along with the value of
+`lsp-go-library-directories'."
+  (let ((library-dirs lsp-go-library-directories))
+    (when (and lsp-go-library-directories-include-go-modules
+               (or (and (not (file-remote-p default-directory)) (executable-find "go"))
+                   (and (version<= "27.0" emacs-version) (with-no-warnings (executable-find "go" (file-remote-p default-directory))))))
+      (with-temp-buffer
+        (when (zerop (process-file "go" nil t nil "env" "GOPATH"))
+          (setq library-dirs
+                (append
+                 library-dirs
+                 (list
+                  (concat
+                   (string-trim-right (buffer-substring (point-min) (point-max)))
+                   "/pkg/mod")))))))
+    (if (file-remote-p default-directory)
+        (mapcar (lambda (path) (concat (file-remote-p default-directory) path)) library-dirs)
+      library-dirs)))
+
+(defcustom lsp-go-link-target "pkg.go.dev"
+  "Which website to use for displaying Go documentation."
+  :type '(choice (const "pkg.go.dev")
+                 (const "godoc.org")
+                 (string :tag "A custom website"))
+  :group 'lsp-go
+  :package-version '(lsp-mode "7.0.1"))
+
+(defcustom lsp-go-links-in-hover t
+  "If non-nil, hover documentation includes links."
+  :type 'boolean
+  :group 'lsp-go
+  :package-version '(lsp-mode "8.0.0"))
+
+(defcustom lsp-go-use-gofumpt nil
+  "If non-nil, use gofumpt formatting."
+  :type 'boolean
+  :group 'lsp-go
+  :package-version '(lsp-mode "8.0.0"))
+
+(defcustom lsp-go-goimports-local ""
+  "Equivalent of the goimports -local flag, which puts imports beginning with
+ this string after third-party packages.  It should be the prefix of the import
+ path whose imports should be grouped separately."
+  :type 'string
+  :group 'lsp-go
+  :package-version '(lsp-mode "8.0.0"))
+
+(defcustom lsp-go-analyses nil
+  "Specify analyses that the user would like to enable or disable. A map of the
+  names of analysis passes that should be enabled/disabled. A full list of
+  analyzers that gopls uses can be found at
+  https://github.com/golang/tools/blob/master/gopls/doc/analyzers.md"
+  :type '(alist :key-type (string :tag "analyzer name") :value-type (boolean :tag "value"))
+  :group 'lsp-go
+  :risky t
+  :package-version '(lsp-mode "8.0.0"))
+
+(defcustom lsp-go-import-shortcut "Both"
+  "Specifies whether import statements should link to documentation or go to
+  definitions."
+  :type '(choice (const "Both")
+                 (const "Link")
+                 (const "Definition"))
+  :group 'lsp-go
+  :risky t
+  :package-version '(lsp-mode "8.0.0"))
+
+(defcustom lsp-go-symbol-matcher "FastFuzzy"
+  "Sets the algorithm that is used when finding workspace symbols."
+  :type '(choice (const "Fuzzy")
+                 (const "FastFuzzy")
+                 (const "CaseInsensitive")
+                 (const "CaseSensitive"))
+  :group 'lsp-go
+  :risky t
+  :package-version '(lsp-mode "8.0.0"))
+
+(defcustom lsp-go-symbol-style "Dynamic"
+  "Controls how symbols are qualified in symbol responses.
+
+  `Dynamic' uses whichever qualifier results in the highest scoring match for
+  the given symbol query. Here a `qualifier' is any `/' or '.' delimited suffix
+  of the fully qualified symbol. i.e. `to/pkg.Foo.Field' or just `Foo.Field'.
+
+  `Full' is fully qualified symbols, i.e. `path/to/pkg.Foo.Field'.
+
+  `Package' is package qualified symbols i.e. `pkg.Foo.Field'."
+  :type '(choice (const "Dynamic")
+                 (const "Full")
+                 (const "Package"))
+  :group 'lsp-go
+  :risky t
+  :package-version '(lsp-mode "8.0.0"))
+
+(defcustom lsp-go-template-extensions []
+  "The extensions of file names that are treated as template files.
+
+The extension is the part of the file name after the final dot."
+  :type '(lsp-repeatable-vector string)
+  :group 'lsp-go
+  :package-version '(lsp-mode "9.1"))
+
+(defcustom lsp-go-standalone-tags ["ignore"]
+  "Specifies a set of build constraints that identify individual Go
+source files that make up the entire main package of an
+executable."
+  :type '(lsp-repeatable-vector string)
+  :group 'lsp-go
+  :package-version '(lsp-mode "9.1"))
+
+(defcustom lsp-go-completion-budget "100ms"
+  "Soft latency goal for completion requests"
+  :type 'string
+  :group 'lsp-go
+  :package-version '(lsp-mode "9.1"))
+
+(defcustom lsp-go-matcher "Fuzzy"
+  "Sets the algorithm that is used when calculating completion candidates."
+  :type '(choice (const "CaseInsensitive")
+                 (const "CaseSensitive")
+                 (const "Fuzzy"))
+  :group 'lsp-go
+  :package-version '(lsp-mode "9.1"))
+
+(defcustom lsp-go-complete-function-calls t
+  "Enables function call completion.
+
+When completing a statement, or when a function return type
+matches the expected of the expression being completed,
+completion may suggest call expressions."
+  :type 'boolean
+  :group 'lsp-go
+  :package-version '(lsp-mode "9.1"))
+
+(defcustom lsp-go-diagnostics-delay "1s"
+  "Controls the amount of time that gopls waits after the most
+recent file modification before computing deep diagnostics."
+  :type 'string
+  :group 'lsp-go
+  :package-version '(lsp-mode "9.1"))
+
+(defcustom lsp-go-analysis-progress-reporting t
+  "Controls whether gopls sends progress notifications when
+construction of its index of analysis facts is taking a long
+time."
+  :type 'boolean
+  :group 'lsp-go
+  :package-version '(lsp-mode "9.1"))
+
+(defcustom lsp-go-symbol-scope "all"
+  "Controls which packages are searched for workspace/symbol
+requests.
+
+When the scope is \"workspace\", gopls searches only workspace
+packages.
+
+When the scope is \"all\", gopls searches all loaded packages,
+including dependencies and the standard library."
+  :type '(choice (const "all")
+                 (const "workspace"))
+  :group 'lsp-go
+  :package-version '(lsp-mode "9.1"))
+
+(defcustom lsp-go-verbose-output t
+  "Enables additional debug logging."
+  :type 'boolean
+  :group 'lsp-go
+  :package-version '(lsp-mode "9.1"))
+
+(lsp-register-custom-settings
+ '(("gopls.analyses" lsp-go-analyses)
+   ("gopls.analysisProgressReporting" lsp-go-analysis-progress-reporting t)
+   ("gopls.buildFlags" lsp-go-build-flags)
+   ("gopls.codelenses" lsp-go-codelenses)
+   ("gopls.completeFunctionCalls" lsp-go-complete-function-calls t)
+   ("gopls.completionBudget" lsp-go-completion-budget)
+   ("gopls.diagnosticsDelay" lsp-go-diagnostics-delay)
+   ("gopls.directoryFilters" lsp-go-directory-filters)
+   ("gopls.env" lsp-go-env)
+   ("gopls.gofumpt" lsp-go-use-gofumpt t)
+   ("gopls.hoverKind" lsp-go-hover-kind)
+   ("gopls.importShortcut" lsp-go-import-shortcut)
+   ("gopls.linkTarget" lsp-go-link-target)
+   ("gopls.linksInHover" lsp-go-links-in-hover t)
+   ("gopls.local" lsp-go-goimports-local)
+   ("gopls.matcher" lsp-go-matcher)
+   ("gopls.standaloneTags" lsp-go-standalone-tags)
+   ("gopls.symbolMatcher" lsp-go-symbol-matcher)
+   ("gopls.symbolScope" lsp-go-symbol-scope)
+   ("gopls.symbolStyle" lsp-go-symbol-style)
+   ("gopls.templateExtensions" lsp-go-template-extensions)
+   ("gopls.usePlaceholders" lsp-go-use-placeholders t)
+   ("gopls.verboseOutput" lsp-go-verbose-output t)))
+
+(defcustom lsp-go-server-wrapper-function
+  #'identity
+  "Function to wrap the language server process started by lsp-go.
+
+For example, you can pick a go binary provided by a repository's
+flake.nix file with:
+
+  (use-package nix-sandbox)
+  (defun my/nix--lsp-go-wrapper (args)
+    (if-let* ((sandbox (nix-current-sandbox)))
+        (apply `nix-shell-command sandbox args)
+      args))
+  (setq lsp-go-server-path \"gopls\"
+        lsp-go-server-wrapper-function `my/nix--lsp-go-wrapper)"
+  :group 'lsp-go
+  :type '(choice
+          (function-item :tag "None" :value identity)
+          (function :tag "Custom function")))
+
+(defun lsp-go--server-command ()
+  "Command and arguments for launching the inferior language server process.
+These are assembled from the customizable variables `lsp-go-server-path'
+and `lsp-go-server-wrapper-function'."
+  (funcall lsp-go-server-wrapper-function (append (list lsp-go-gopls-server-path) lsp-go-gopls-server-args)))
+
+(defun lsp-go--cls-download-server (_client callback error-callback _update?)
+  "Install/update shader-ls language server using `go install'.
+
+Will invoke CALLBACK or ERROR-CALLBACK based on result.
+Will update if UPDATE? is t"
+  (lsp-async-start-process
+   callback
+   error-callback
+   "go" "install" "golang.org/x/tools/gopls@latest"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection 'lsp-go--server-command)
+                  :activation-fn (lsp-activate-on "go" "go.mod")
+                  :language-id "go"
+                  :priority 0
+                  :server-id 'gopls
+                  :completion-in-comments? t
+                  :library-folders-fn #'lsp-go--library-default-directories
+                  :after-open-fn (lambda ()
+                                   ;; https://github.com/golang/tools/commit/b2d8b0336
+                                   (setq-local lsp-completion-filter-on-incomplete nil))
+                  :download-server-fn #'lsp-go--cls-download-server
+                  :initialized-fn (lambda (workspace)
+                                    (let ((caps (lsp--workspace-server-capabilities workspace)))
+                                      (unless (lsp-get caps :inlayHintProvider)
+                                        (lsp:set-server-capabilities-inlay-hint-provider? caps t))
+                                      (unless (lsp-get caps :codeLensProvider)
+                                        (lsp:set-server-capabilities-code-lens-provider? caps t))))))
+
+(lsp-consistency-check lsp-go)
+
+(provide 'lsp-go)
+;;; lsp-go.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-golangci-lint.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-golangci-lint.el
new file mode 100644
index 0000000..2511e1b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-golangci-lint.el
@@ -0,0 +1,183 @@
+;;; lsp-golangci-lint.el --- golangci-lint-langserver Client settings -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023  Jim Myhrberg
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: Jim Myhrberg
+;; Keywords: lsp, go, golang, golangci-lint
+
+;; This file is not part of GNU Emacs
+
+;;; License:
+;;
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; lsp-golangci-lint client
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-go)
+(require 'cl-lib)
+
+(defgroup lsp-golangci-lint nil
+  "Configuration options for lsp-golangci-lint."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/nametake/golangci-lint-langserver")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-server-path "golangci-lint-langserver"
+  "Command to run golangci-lint-langserver."
+  :type 'string
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-server-debug nil
+  "Whether to run golangci-lint-langserver in debug mode or not."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-server-args nil
+  "Arguments to pass to golangci-lint-langserver."
+  :type '(repeat string)
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-path "golangci-lint"
+  "Command to run golangci-lint."
+  :type 'string
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-allow-parallel-runners t
+  "If not nil, pass --allow-parallel-runners flag to golangci-lint run."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-build-tags nil
+  "If non-empty list, pass as --build-tags flag value to golangci-lint run."
+  :type '(repeat string)
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-fast nil
+  "If not nil, pass --fast flag to golangci-lint run."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-enable-all nil
+  "If not nil, pass --enable-all flag to golangci-lint run."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-enable nil
+  "If non-empty list, pass as --enable flag value to golangci-lint run."
+  :type '(repeat string)
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-disable-all nil
+  "If not nil, pass --disable-all to golangci-lint run."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-disable nil
+  "If non-empty list, pass as --disable flag value to golangci-lint run."
+  :type '(repeat string)
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-config nil
+  "If set, pass value as --config flag to golangci-lint run."
+  :type 'string
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-no-config nil
+  "If not nil, pass --no-config flag to golangci-lint run."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-golangci-lint-run-args nil
+  "Arguments to pass to golangci-lint run command."
+  :type '(repeat string)
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-golangci-lint-server--stdio-command ()
+  "Return the command and args to start golangci-lint-langserver."
+  (let ((args (list lsp-golangci-lint-server-path)))
+    (when (and (listp lsp-golangci-lint-server-args)
+               (> (length lsp-golangci-lint-server-args) 0))
+      (setq args (append args lsp-golangci-lint-server-args)))
+    (when lsp-golangci-lint-server-debug
+      (setq args (append args '("-debug"))))
+    args))
+
+(defun lsp-golangci-lint--run-args ()
+  "Return the arguments to pass to golangci-lint run command."
+  (let* ((tags (string-join lsp-golangci-lint-build-tags " "))
+         (enable (string-join lsp-golangci-lint-enable ","))
+         (disable (string-join lsp-golangci-lint-disable ","))
+         (args (cl-loop for (condition flag value) in
+                        `((,lsp-golangci-lint-fast "--fast" nil)
+                          (,(not (string-empty-p tags)) "--build-tags" ,tags)
+                          (,lsp-golangci-lint-enable-all "--enable-all" nil)
+                          (,lsp-golangci-lint-disable-all "--disable-all" nil)
+                          (,(not (string-empty-p enable)) "--enable" ,enable)
+                          (,(not (string-empty-p disable)) "--disable" ,disable)
+                          (,lsp-golangci-lint-allow-parallel-runners
+                           "--allow-parallel-runners" nil)
+                          (,(and (stringp lsp-golangci-lint-config)
+                                 (not (string-empty-p lsp-golangci-lint-config)))
+                           "--config" lsp-golangci-lint-config))
+                        when condition
+                        append (if value (list flag value) (list flag)))))
+    (when (and (listp lsp-golangci-lint-run-args)
+               (> (length lsp-golangci-lint-run-args) 0))
+      (setq args (append args lsp-golangci-lint-run-args)))
+    args))
+
+(defun lsp-golangci-lint--get-version ()
+  "Get the version of golangci-lint."
+  (with-temp-buffer
+    (when (= 0 (call-process lsp-golangci-lint-path nil t nil "version"))
+      (goto-char (point-min))
+      (when (re-search-forward "has version v?\\([0-9]+\\)\\." nil t)
+        (string-to-number (match-string 1))))))
+
+(defun lsp-golangci-lint--get-initialization-options ()
+  "Return initialization options for golangci-lint-langserver."
+  (let* ((opts (make-hash-table :test 'equal))
+         (version (lsp-golangci-lint--get-version))
+         (format-args (if (and version (>= version 2))
+                         ["--output.json.path" "stdout" "--show-stats=false"]
+                         ["--out-format" "json"]))
+         (command (vconcat `(,lsp-golangci-lint-path)
+                          ["run"]
+                          format-args
+                          ["--issues-exit-code=1"]
+                          (lsp-golangci-lint--run-args))))
+    (puthash "command" command opts)
+    opts))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   #'lsp-golangci-lint-server--stdio-command)
+                  :activation-fn (lsp-activate-on "go")
+                  :language-id "go"
+                  :priority 0
+                  :server-id 'golangci-lint
+                  :add-on? t
+                  :library-folders-fn #'lsp-go--library-default-directories
+                  :initialization-options #'lsp-golangci-lint--get-initialization-options))
+
+(lsp-consistency-check lsp-golangci-lint)
+
+(provide 'lsp-golangci-lint)
+;;; lsp-golangci-lint.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-graphql.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-graphql.el
new file mode 100644
index 0000000..d823f1c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-graphql.el
@@ -0,0 +1,86 @@
+;;; lsp-graphql.el --- lsp client for graphql        -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  Binbin Ye
+;; Copyright (C) 2021-2026 emacs-lsp maintainers
+
+;; Author: Binbin Ye
+;; Keywords: lsp, graphql
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Support for running graphql lsp.  Support multiple server running at the same time when editing tsx/jsx.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(lsp-dependency 'graphql-language-service-cli
+                '(:system "graphql-lsp")
+                '(:npm :package "graphql-language-service-cli"
+                       :path "graphql-lsp"))
+
+
+(defgroup lsp-graphql nil
+  "LSP support for the GraphQL, using the graphql-language-service-cli as language server."
+  :link '(url-link "https://github.com/graphql/graphiql/tree/main/packages/graphql-language-service-cli#readme")
+  :group 'lsp-mode)
+
+(defcustom lsp-clients-graphql-server-args '("server" "--method=stream")
+  "CLI arguments for graphql language server."
+  :type '(repeat string)
+  :risky t
+  :group 'lsp-graphql)
+
+(defcustom lsp-graphql-target-file-extensions '("ts" "js" "jsx" "tsx" "vue" "graphql" "graphqls" "gql")
+  "List of target file extensions for the GraphQL language server."
+  :type '(repeat string)
+  :group 'lsp-graphql)
+
+(defcustom lsp-graphql-activated-modes '(js-mode js2-mode typescript-mode typescript-ts-mode)
+  "List of major modes that can activate the GraphQL language server.
+When a buffer is in one of these modes, the GraphQL language server
+may be activated if appropriate GraphQL content is detected."
+  :type '(repeat symbol)
+  :group 'lsp-graphql)
+
+(defun lsp-graphql-activate-p (filename &optional _)
+  "Check if the GraphQL language server should be enabled based on FILENAME."
+  (let ((target-extensions (mapconcat 'identity lsp-graphql-target-file-extensions "\\|")))
+    (or (string-match-p (format "\\.\\(?:%s\\)\\'" target-extensions) filename)
+        (apply 'derived-mode-p lsp-graphql-activated-modes))))
+
+
+(lsp-register-client
+  (make-lsp-client :new-connection (lsp-stdio-connection (lambda()
+                                                           (cons (lsp-package-path 'graphql-language-service-cli)
+                                                                 lsp-clients-graphql-server-args)))
+                   :major-modes '(graphql-mode)
+                   :language-id "graphql"
+                   :server-id 'graphql-lsp
+                   :priority -3
+                   :add-on? t
+                   :multi-root t
+                   :activation-fn 'lsp-graphql-activate-p
+                   :download-server-fn (lambda (_client callback error-callback _update?)
+                                         (lsp-package-ensure
+                                          'graphql-language-service-cli
+                                          callback
+                                          error-callback))))
+
+(lsp-consistency-check lsp-graphql)
+
+(provide 'lsp-graphql)
+;;; lsp-graphql.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-groovy.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-groovy.el
new file mode 100644
index 0000000..4896518
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-groovy.el
@@ -0,0 +1,66 @@
+;;; lsp-groovy.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, groovy
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Groovy Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'f)
+
+(defgroup lsp-groovy nil
+  "LSP support for Groovy, using groovy-language-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/GroovyLanguageServer/groovy-language-server"))
+
+(defcustom lsp-groovy-server-file (f-join lsp-server-install-dir "groovy-language-server-all.jar")
+  "JAR file path for groovy-language-server-all.jar."
+  :group 'lsp-groovy
+  :risky t
+  :type 'file)
+
+(defun lsp-groovy--lsp-command ()
+  "Generate LSP startup command."
+  `("java" "-jar" ,(expand-file-name lsp-groovy-server-file)))
+
+(defcustom lsp-groovy-classpath ["/usr/local/opt/groovy/libexec/lib"]
+  "List of paths to Groovy JARs."
+  :group 'lsp-groovy
+  :risky t
+  :type 'lsp-string-vector)
+
+(lsp-register-custom-settings
+ '(("groovy.classpath" lsp-groovy-classpath)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection 'lsp-groovy--lsp-command)
+                  :major-modes '(groovy-mode)
+                  :priority -1
+                  :server-id 'groovy-ls
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration (lsp-configuration-section "groovy"))))))
+
+(lsp-consistency-check lsp-groovy)
+
+(provide 'lsp-groovy)
+;;; lsp-groovy.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-hack.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-hack.el
new file mode 100644
index 0000000..6dcfdf1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-hack.el
@@ -0,0 +1,54 @@
+;;; lsp-xxx.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, hack
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Hack Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-hack nil
+  "LSP support for Hack, using HHVM."
+  :group 'lsp-mode
+  :link '(url-link "https://docs.hhvm.com/hhvm"))
+
+(defcustom lsp-clients-hack-command '("hh_client" "lsp" "--from" "emacs")
+  "Command to start hh_client."
+  :group 'lsp-hack
+  :risky t
+  :type '(repeat string))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda () lsp-clients-hack-command))
+                  :major-modes '(hack-mode)
+                  :priority -1
+                  :server-id 'hack
+                  ;; ignore some unsupported messages from Nuclide
+                  :notification-handlers (lsp-ht ("telemetry/event" 'ignore)
+                                                 ("$/cancelRequest" 'ignore))
+                  :request-handlers (lsp-ht ("window/showStatus" 'ignore))))
+
+
+(lsp-consistency-check lsp-hack)
+
+(provide 'lsp-hack)
+;;; lsp-hack.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-haxe.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-haxe.el
new file mode 100644
index 0000000..87c33ad
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-haxe.el
@@ -0,0 +1,227 @@
+;;; lsp-haxe.el --- Haxe Client settings             -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Yannik Böttcher
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Yannik Böttcher <yannikboettcher@outlook.de>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-haxe client
+
+;;; Code:
+
+
+;; adapted from lsp-clangd configuration
+(require 'lsp-protocol)
+(require 'lsp-mode)
+
+(defgroup lsp-haxe nil
+  "LSP support for Haxe using the language server provided by vshaxe"
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/vshaxe/vshaxe"))
+
+
+;; Haxe ls is executed via node
+(defcustom lsp-clients--haxe-executable "node"
+  "Haxe ls is executed via node."
+  :group 'lsp-haxe
+  :risky t
+  :type 'file)
+
+;; The server.js is being passed to node as an argument
+(defcustom lsp-clients--haxe-server-path (expand-file-name "~/.haxe-language-server/bin/server.js")
+  "The path to the server.js file."
+  :group 'lsp-haxe
+  :risky t
+  :type 'file)
+
+;; Build the actual Haxe ls command.
+(defun lsp-clients--haxe-command ()
+  "Haxe ls startup command."
+  `(,lsp-clients--haxe-executable ,lsp-clients--haxe-server-path))
+
+;; https://github.com/yyoncho/lsp-mode/commit/72186e1adc089d772c87ed8f287eb3333b66bfa7
+;; This is to force the client to send a didChangeConfiguration Message. Without this, the server won't start, https://github.com/vshaxe/vshaxe/issues/328#issuecomment-471809093
+(defcustom lsp-clients--haxe-settings (list :haxe.executable "haxe")
+  "Lsp clients configuration settings."
+  :group 'lsp-haxe
+  :risky t
+  :type '(repeat string))
+
+;; The build spec for the project.
+(defcustom lsp-haxe-hxml "build.hxml"
+  "The compile file for the haxe project."
+  :type 'file
+  :group 'lsp-haxe
+  :package-version '(lsp-mode . "7.0"))
+
+;; https://github.com/emacs-lsp/lsp-mode/blob/150a933694349df960dc8fd7a15e04f5727e6433/lsp-rust.el#L251
+(lsp-defun lsp-clients--haxe-processStart (_workspace (&haxe:ProcessStartNotification :title))
+  "Handle processStart notification.  Just logs PARAMS."
+  (lsp-log title))
+
+(defcustom lsp-haxe-executable "haxe"
+  nil
+  :type 'file
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-configurations nil
+  nil
+  :type '(repeat string)
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-display-configurations nil
+  nil
+  :type '(repeat string)
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-display-server nil
+  nil
+  :type 'string
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-display-port "auto"
+  nil
+  :type 'number
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-enable-compilation-server t
+  nil
+  :type 'boolean
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-task-presentation
+  '((echo . t)
+    (reveal . "always")
+    (focus . :json-false)
+    (panel . "shared")
+    (showReuseMessage . t)
+    (clear . :json-false))
+  nil
+  :type 'plist
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-enable-code-lens t
+  nil
+  :type 'boolean
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-enable-diagnostics t
+  nil
+  :type 'boolean
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-enable-server-view nil
+  nil
+  :type 'boolean
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-enable-methods-view nil
+  nil
+  :type 'boolean
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-enable-signature-help-documentation t
+  nil
+  :type 'boolean
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-diagnostics-path-filter "${workspaceRoot}"
+  nil
+  :type 'string
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-build-completion-cache t
+  nil
+  :type 'boolean
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-enable-completion-cache-warning t
+  nil
+  :type 'boolean
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-code-generation nil
+  nil
+  :type 'string
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-exclude ["zpp_nape"]
+  nil
+  :type '(repeat string)
+  :group 'lsp-haxe)
+
+(defcustom lsp-haxe-postfix-completion nil
+  nil
+  :type 'string
+  :group 'lsp-haxe)
+
+(lsp-register-custom-settings
+ '(("haxe.hxml" lsp-haxe-hxml)
+   ("haxe.postfixCompletion" lsp-haxe-postfix-completion)
+   ("haxe.exclude" lsp-haxe-exclude)
+   ("haxe.codeGeneration" lsp-haxe-code-generation)
+   ("haxe.enableCompletionCacheWarning" lsp-haxe-enable-completion-cache-warning t)
+   ("haxe.buildCompletionCache" lsp-haxe-build-completion-cache t)
+   ("haxe.diagnosticsPathFilter" lsp-haxe-diagnostics-path-filter)
+   ("haxe.enableSignatureHelpDocumentation" lsp-haxe-enable-signature-help-documentation t)
+   ("haxe.enableMethodsView" lsp-haxe-enable-methods-view t)
+   ("haxe.enableServerView" lsp-haxe-enable-server-view t)
+   ("haxe.enableDiagnostics" lsp-haxe-enable-diagnostics t)
+   ("haxe.enableCodeLens" lsp-haxe-enable-code-lens t)
+   ("haxe.taskPresentation" lsp-haxe-task-presentation)
+   ("haxe.enableCompilationServer" lsp-haxe-enable-compilation-server t)
+   ("haxe.displayPort" lsp-haxe-display-port)
+   ("haxe.displayServer" lsp-haxe-display-server)
+   ("haxe.displayConfigurations" lsp-haxe-display-configurations)
+   ("haxe.configurations" lsp-haxe-configurations)
+   ("haxe.executable" lsp-haxe-executable)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-clients--haxe-command)
+  :major-modes '(haxe-mode)  ; force didChangeConfiguration message
+  :initialized-fn
+  (lambda (workspace)
+    (with-lsp-workspace workspace
+      (lsp--set-configuration (lsp-configuration-section "haxe"))))
+  :priority -1
+  :server-id 'haxe
+  :initialization-options
+  (lambda ()
+    `(:sendMethodResults t
+      :haxelibConfig (:executable "haxelib")
+      :displayServerConfig
+      ( :print (:reusing :json-false :completion :json-false)
+               :arguments []
+               :env nil
+               :path "haxe")
+      :displayArguments [,lsp-haxe-hxml]))
+  :notification-handlers
+  (lsp-ht ("haxe/progressStart" 'lsp-clients--haxe-processStart)
+          ("haxe/progressStop" 'ignore)
+          ("haxe/didDetectOldPreview" 'ignore)
+          ("haxe/didChangeDisplayPort" 'ignore)
+          ("haxe/didRunHaxeMethod" 'ignore)
+          ("haxe/didChangeRequestQueue" 'ignore)
+          ("haxe/cacheBuildFailed" 'ignore))))
+
+(lsp-consistency-check lsp-haxe)
+
+(provide 'lsp-haxe)
+;;; lsp-haxe.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-headerline.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-headerline.el
new file mode 100644
index 0000000..2af2863
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-headerline.el
@@ -0,0 +1,495 @@
+;;; lsp-headerline.el --- LSP headerline features -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;;  LSP headerline features
+;;
+;;; Code:
+
+(require 'lsp-icons)
+(require 'lsp-mode)
+
+(defgroup lsp-headerline nil
+  "LSP support for headerline"
+  :prefix "lsp-headerline-"
+  :group 'lsp-mode
+  :tag "LSP Headerline")
+
+(defcustom lsp-headerline-breadcrumb-segments '(path-up-to-project file symbols)
+  "Segments used in breadcrumb text on headerline."
+  :type '(repeat
+          (choice (const :tag "Include the project name." project)
+                  (const :tag "Include the open file name." file)
+                  (const :tag "Include the directories up to project." path-up-to-project)
+                  (const :tag "Include document symbols if server supports it." symbols)))
+  :group 'lsp-headerline)
+
+(defcustom lsp-headerline-breadcrumb-enable-symbol-numbers nil
+  "Whether to label symbols with numbers on the breadcrumb."
+  :type 'boolean
+  :group 'lsp-headerline)
+
+(defcustom lsp-headerline-breadcrumb-enable-diagnostics t
+  "If non-nil, apply different face on the breadcrumb based on the errors."
+  :type 'boolean
+  :group 'lsp-headerline
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defface lsp-headerline-breadcrumb-separator-face '((t :inherit shadow :height 0.8))
+  "Face used for breadcrumb separator on headerline."
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-path-face '((t :inherit font-lock-string-face))
+  "Face used for breadcrumb paths on headerline."
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-path-error-face
+  '((t :underline (:style wave :color "Red1")
+       :inherit lsp-headerline-breadcrumb-path-face))
+  "Face used for breadcrumb paths on headerline when there is an error under
+that path"
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-path-warning-face
+  '((t :underline (:style wave :color "Yellow")
+       :inherit lsp-headerline-breadcrumb-path-face))
+  "Face used for breadcrumb paths on headerline when there is an warning under
+that path"
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-path-info-face
+  '((t :underline (:style wave :color "Green")
+       :inherit lsp-headerline-breadcrumb-path-face))
+  "Face used for breadcrumb paths on headerline when there is an info under
+that path"
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-path-hint-face
+  '((t :underline (:style wave :color "Green")
+       :inherit lsp-headerline-breadcrumb-path-face))
+  "Face used for breadcrumb paths on headerline when there is an hint under that
+path"
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-project-prefix-face
+  '((t :inherit font-lock-string-face :weight bold))
+  "Face used for breadcrumb prefix on headerline.
+Only if `lsp-headerline-breadcrumb-prefix` is `project-name-only`."
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-unknown-project-prefix-face
+  '((t :inherit shadow :weight bold))
+  "Face used for breadcrumb prefix on headerline.
+Only if `lsp-headerline-breadcrumb-prefix` is `project-name-only`."
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-symbols-face
+  '((t :inherit font-lock-doc-face :weight bold))
+  "Face used for breadcrumb symbols text on headerline."
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-symbols-error-face
+  '((t :inherit lsp-headerline-breadcrumb-symbols-face
+       :underline (:style wave :color "Red1")))
+  "Face used for breadcrumb symbols text on headerline when there
+is an error in symbols range."
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-symbols-warning-face
+  '((t :inherit lsp-headerline-breadcrumb-symbols-face
+       :underline (:style wave :color "Yellow")))
+  "Face used for breadcrumb symbols text on headerline when there
+is an warning in symbols range."
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-symbols-info-face
+  '((t :inherit lsp-headerline-breadcrumb-symbols-face
+       :underline (:style wave :color "Green")))
+  "Face used for breadcrumb symbols text on headerline when there
+is an info in symbols range."
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-symbols-hint-face
+  '((t :inherit lsp-headerline-breadcrumb-symbols-face
+       :underline (:style wave :color "Green")))
+  "Face used for breadcrumb symbols text on headerline when there
+is an hints in symbols range."
+  :group 'lsp-headerline)
+
+(defface lsp-headerline-breadcrumb-deprecated-face
+  '((t :inherit lsp-headerline-breadcrumb-symbols-face
+       :strike-through t))
+  "Face used on breadcrumb deprecated text on modeline."
+  :group 'lsp-headerline)
+
+(defvar lsp-headerline-arrow nil
+  "Holds the current breadcrumb string on headerline.")
+
+(defvar-local lsp-headerline--path-up-to-project-segments nil
+  "Holds the current breadcrumb path-up-to-project segments for
+caching purposes.")
+
+(defvar-local lsp-headerline--cached-workspace-root nil
+  "Holds the current value of lsp-workspace-root for caching purposes")
+
+;; Redefine local vars of `all-the-icons' to avoid bytecode compilation errors.
+(defvar all-the-icons-default-adjust)
+(defvar all-the-icons-scale-factor)
+
+(defun lsp-headerline--arrow-icon ()
+  "Build the arrow icon for headerline breadcrumb."
+  (or
+   lsp-headerline-arrow
+   (setq lsp-headerline-arrow (let ((all-the-icons-scale-factor 1.0)
+                                    (all-the-icons-default-adjust 0))
+                                (lsp-icons-all-the-icons-icon
+                                 'material
+                                 "chevron_right"
+                                 'lsp-headerline-breadcrumb-separator-face
+                                 ">"
+                                 'headerline-breadcrumb)))))
+
+(lsp-defun lsp-headerline--symbol-icon ((&DocumentSymbol :kind))
+  "Build the SYMBOL icon for headerline breadcrumb."
+  (concat (lsp-icons-get-by-symbol-kind kind 'headerline-breadcrumb)
+          " "))
+
+(lsp-defun lsp-headerline--go-to-symbol ((&DocumentSymbol
+                                          :selection-range (&RangeToPoint :start selection-start)
+                                          :range (&RangeToPoint :start narrowing-start
+                                                                :end narrowing-end)))
+  "Go to breadcrumb symbol.
+If the buffer is narrowed and the target symbol lies before the
+minimum reachable point in the narrowed buffer, then widen and
+narrow to the outer symbol."
+  (when (buffer-narrowed-p)
+    (narrow-to-region
+     (min (point-min) narrowing-start)
+     (max (point-max) narrowing-end)))
+  (goto-char selection-start))
+
+(lsp-defun lsp-headerline--narrow-to-symbol ((&DocumentSymbol :range (&RangeToPoint :start :end)))
+  "Narrow to breadcrumb symbol range."
+  (narrow-to-region start end))
+
+(defun lsp-headerline--with-action (local-map help-echo-string display-string)
+  "Assign LOCAL-MAP and HELP-ECHO-STRING to the region around the
+DISPLAY-STRING."
+  (propertize display-string
+              'mouse-face 'header-line-highlight
+              'help-echo help-echo-string
+              'local-map local-map))
+
+(defmacro lsp-headerline--make-mouse-handler (&rest body)
+  "Making mouse event handler.
+Switch to current mouse interacting window before doing BODY."
+  (declare (debug t) (indent 0))
+  `(lambda (event)
+     (interactive "e")
+     (select-window (posn-window (elt event 1)))
+     ,@body))
+
+(defun lsp-headerline--directory-with-action (full-path directory-display-string)
+  "Build action for FULL-PATH and DIRECTORY-DISPLAY-STRING."
+  (lsp-headerline--with-action (let ((map (make-sparse-keymap)))
+                                 (define-key map [header-line mouse-1]
+                                   (lsp-headerline--make-mouse-handler
+                                     (dired full-path)))
+                                 (define-key map [header-line mouse-2]
+                                   (lsp-headerline--make-mouse-handler
+                                     (dired-other-window full-path)))
+                                 map)
+                               (format "mouse-1: browse '%s' with Dired\nmouse-2: browse '%s' with Dired in other window"
+                                       directory-display-string
+                                       directory-display-string)
+                               (propertize directory-display-string
+                                           'lsp-full-path full-path)))
+
+(declare-function evil-set-jump "ext:evil-jumps")
+
+(lsp-defun lsp-headerline--symbol-with-action ((symbol &as &DocumentSymbol :name) symbol-display-string)
+  "Build action for SYMBOL and SYMBOL-STRING."
+  (lsp-headerline--with-action (let ((map (make-sparse-keymap)))
+                                 (define-key map [header-line mouse-1]
+                                   (lsp-headerline--make-mouse-handler
+                                     (when (bound-and-true-p evil-mode)
+                                       (evil-set-jump))
+                                     (lsp-headerline--go-to-symbol symbol)))
+                                 (define-key map [header-line mouse-2]
+                                   (lsp-headerline--make-mouse-handler
+                                     (-let (((&DocumentSymbol :range (&RangeToPoint :start :end)) symbol))
+                                       (if (and (eq (point-min) start) (eq (point-max) end))
+                                           (widen)
+                                         (lsp-headerline--narrow-to-symbol symbol)))))
+                                 map)
+                               (format "mouse-1: go to '%s' symbol\nmouse-2: %s"
+                                       name
+                                       (-let (((&DocumentSymbol :range (&RangeToPoint :start :end)) symbol))
+                                         (if (and (eq (point-min) start) (eq (point-max) end))
+                                             "widen"
+                                           (format "narrow to '%s' range" name))))
+                               symbol-display-string))
+
+(defun lsp-headerline--path-up-to-project-root (root-path path)
+  "Find recursively the folders until the project ROOT-PATH.
+PATH is the current folder to be checked."
+  (let ((current-path path)
+        headerline-path-components)
+    (while (not (lsp-f-same? root-path current-path))
+      (push (lsp-headerline--directory-with-action current-path
+                                                   (f-filename current-path))
+            headerline-path-components)
+      (setq current-path (lsp-f-parent current-path)))
+    headerline-path-components))
+
+(defun lsp-headerline--build-project-string ()
+  "Build the project-segment string for the breadcrumb."
+  (-if-let (root (lsp-headerline--workspace-root))
+      (propertize (lsp-headerline--directory-with-action
+                   root
+                   (f-filename root))
+                  'font-lock-face
+                  'lsp-headerline-breadcrumb-project-prefix-face)
+    (propertize "<unknown>"
+                'font-lock-face
+                'lsp-headerline-breadcrumb-unknown-project-prefix-face)))
+
+(defun lsp-headerline--build-file-string ()
+  "Build the file-segment string for the breadcrumb."
+  (let* ((file-path (or (buffer-file-name) ""))
+         (filename (f-filename file-path)))
+    (if-let* ((file-ext (f-ext file-path)))
+        (concat (lsp-icons-get-by-file-ext file-ext 'headerline-breadcrumb)
+                " "
+                (propertize filename
+                            'font-lock-face
+                            (lsp-headerline--face-for-path file-path)))
+      filename)))
+
+
+(defun lsp-headerline--face-for-path (dir)
+  "Calculate the face for DIR."
+  (if-let* ((diags (lsp-diagnostics-stats-for (directory-file-name dir))))
+      (cl-labels ((check-severity
+                   (severity)
+                   (not (zerop (aref diags severity)))))
+        (cond
+         ((not lsp-headerline-breadcrumb-enable-diagnostics)
+          'lsp-headerline-breadcrumb-path-face)
+         ((check-severity lsp/diagnostic-severity-error)
+          'lsp-headerline-breadcrumb-path-error-face)
+         ((check-severity lsp/diagnostic-severity-warning)
+          'lsp-headerline-breadcrumb-path-warning-face)
+         ((check-severity lsp/diagnostic-severity-information)
+          'lsp-headerline-breadcrumb-path-info-face)
+         ((check-severity lsp/diagnostic-severity-hint)
+          'lsp-headerline-breadcrumb-path-hint-face)
+         (t 'lsp-headerline-breadcrumb-path-face)))
+    'lsp-headerline-breadcrumb-path-face))
+
+(defun lsp-headerline--severity-level-for-range (range)
+  "Get the severity level for RANGE."
+  (let ((range-severity 10))
+    (mapc (-lambda ((&Diagnostic :range (&Range :start) :severity?))
+            (when (and severity?
+                       (lsp-point-in-range? start range))
+              (setq range-severity (min range-severity severity?))))
+          (lsp--get-buffer-diagnostics))
+    range-severity))
+
+(defun lsp-headerline--build-path-up-to-project-string ()
+  "Build the path-up-to-project segment for the breadcrumb."
+  (if-let* ((root (lsp-headerline--workspace-root)))
+      (let ((segments (or
+                       lsp-headerline--path-up-to-project-segments
+                       (setq lsp-headerline--path-up-to-project-segments
+                             (lsp-headerline--path-up-to-project-root
+                              root
+                              (lsp-f-parent (buffer-file-name)))))))
+        (mapconcat (lambda (next-dir)
+                     (propertize next-dir
+                                 'font-lock-face
+                                 (lsp-headerline--face-for-path
+                                  (get-text-property
+                                   0 'lsp-full-path next-dir))))
+                   segments
+                   (concat " " (lsp-headerline--arrow-icon) " ")))
+    ""))
+
+(lsp-defun lsp-headerline--face-for-symbol ((&DocumentSymbol :deprecated?
+                                                             :range))
+  "Get the face for SYMBOL."
+  (let ((range-severity (lsp-headerline--severity-level-for-range range)))
+    (cond
+     (deprecated? 'lsp-headerline-breadcrumb-deprecated-face)
+     ((not lsp-headerline-breadcrumb-enable-diagnostics)
+      'lsp-headerline-breadcrumb-symbols-face)
+     ((= range-severity lsp/diagnostic-severity-error)
+      'lsp-headerline-breadcrumb-symbols-error-face)
+     ((= range-severity lsp/diagnostic-severity-warning)
+      'lsp-headerline-breadcrumb-symbols-warning-face)
+     ((= range-severity lsp/diagnostic-severity-information)
+      'lsp-headerline-breadcrumb-symbols-info-face)
+     ((= range-severity lsp/diagnostic-severity-hint)
+      'lsp-headerline-breadcrumb-symbols-hint-face)
+     (t 'lsp-headerline-breadcrumb-symbols-face))))
+
+(defun lsp-headerline--build-symbol-string ()
+  "Build the symbol segment for the breadcrumb."
+  (if (lsp-feature? "textDocument/documentSymbol")
+      (-if-let* ((lsp--document-symbols-request-async t)
+                 (symbols (lsp--get-document-symbols))
+                 (symbols-hierarchy (lsp--symbols->document-symbols-hierarchy symbols))
+                 (enumerated-symbols-hierarchy
+                  (-map-indexed (lambda (index elt)
+                                  (cons elt (1+ index)))
+                                symbols-hierarchy)))
+          (mapconcat
+           (-lambda (((symbol &as &DocumentSymbol :name)
+                      . index))
+             (let* ((symbol2-name
+                     (propertize name
+                                 'font-lock-face
+                                 (lsp-headerline--face-for-symbol symbol)))
+                    (symbol2-icon (lsp-headerline--symbol-icon symbol))
+                    (full-symbol-2
+                     (concat
+                      (if lsp-headerline-breadcrumb-enable-symbol-numbers
+                          (concat
+                           (propertize (number-to-string index)
+                                       'face
+                                       'lsp-headerline-breadcrumb-symbols-face)
+                           " ")
+                        "")
+                      (if symbol2-icon
+                          (concat symbol2-icon symbol2-name)
+                        symbol2-name))))
+               (lsp-headerline--symbol-with-action symbol full-symbol-2)))
+           enumerated-symbols-hierarchy
+           (concat " " (lsp-headerline--arrow-icon) " "))
+        "")
+    ""))
+
+(defun lsp-headerline--build-string ()
+  "Build the header-line string."
+  (string-trim-right
+   (mapconcat
+    (lambda (segment)
+      (let ((segment-string
+             (pcase segment
+               ('project (lsp-headerline--build-project-string))
+               ('file (lsp-headerline--build-file-string))
+               ('path-up-to-project (lsp-headerline--build-path-up-to-project-string))
+               ('symbols (lsp-headerline--build-symbol-string))
+               (_ (lsp-log "'%s' is not a valid entry for `lsp-headerline-breadcrumb-segments'"
+                           (symbol-name segment))
+                  ""))))
+        (if (string-empty-p segment-string)
+            ""
+          (concat (lsp-headerline--arrow-icon)
+                  " "
+                  segment-string
+                  " "))))
+    lsp-headerline-breadcrumb-segments
+    "")))
+
+(defun lsp-headerline-check-breadcrumb (&rest _)
+  "Request for document symbols to build the breadcrumb."
+  (set-window-parameter (selected-window) 'lsp-headerline--string (lsp-headerline--build-string))
+  (force-mode-line-update))
+
+(defun lsp-headerline--enable-breadcrumb ()
+  "Enable headerline breadcrumb mode."
+  (when (and lsp-headerline-breadcrumb-enable
+             (lsp-feature? "textDocument/documentSymbol"))
+    (lsp-headerline-breadcrumb-mode 1)))
+
+(defun lsp-headerline--disable-breadcrumb ()
+  "Disable headerline breadcrumb mode."
+  (lsp-headerline-breadcrumb-mode -1))
+
+(defun lsp-headerline--workspace-root ()
+  (or lsp-headerline--cached-workspace-root
+      (setq lsp-headerline--cached-workspace-root (lsp-workspace-root))))
+
+;;;###autoload
+(define-minor-mode lsp-headerline-breadcrumb-mode
+  "Toggle breadcrumb on headerline."
+  :group 'lsp-headerline
+  :global nil
+  (cond
+   (lsp-headerline-breadcrumb-mode
+    ;; make sure header-line-format, if non-nil, is a list.  as
+    ;; mode-line-format says: "The value may be nil, a string, a
+    ;; symbol or a list."
+    (unless (listp header-line-format)
+      (setq header-line-format (list header-line-format)))
+    (add-to-list 'header-line-format '(t (:eval (window-parameter nil 'lsp-headerline--string) )))
+
+    (add-hook 'xref-after-jump-hook #'lsp-headerline-check-breadcrumb nil t)
+
+    (add-hook 'lsp-on-idle-hook #'lsp-headerline-check-breadcrumb nil t)
+    (add-hook 'lsp-configure-hook #'lsp-headerline--enable-breadcrumb nil t)
+    (add-hook 'lsp-unconfigure-hook #'lsp-headerline--disable-breadcrumb nil t))
+   (t
+    (remove-hook 'lsp-on-idle-hook #'lsp-headerline-check-breadcrumb t)
+    (remove-hook 'lsp-configure-hook #'lsp-headerline--enable-breadcrumb t)
+    (remove-hook 'lsp-unconfigure-hook #'lsp-headerline--disable-breadcrumb t)
+
+    (remove-hook 'xref-after-jump-hook #'lsp-headerline-check-breadcrumb t)
+
+    (setq lsp-headerline--path-up-to-project-segments nil)
+    (setq header-line-format (remove '(t (:eval (window-parameter nil 'lsp-headerline--string) )) header-line-format)))))
+
+;;;###autoload
+(defun lsp-breadcrumb-go-to-symbol (symbol-position)
+  "Go to the symbol on breadcrumb at SYMBOL-POSITION."
+  (interactive "P")
+  (if (numberp symbol-position)
+      (if (lsp-feature? "textDocument/documentSymbol")
+          (-if-let* ((lsp--document-symbols-request-async t)
+                     (symbols (lsp--get-document-symbols))
+                     (symbols-hierarchy (lsp--symbols->document-symbols-hierarchy symbols)))
+              (lsp-headerline--go-to-symbol (nth (1- symbol-position) symbols-hierarchy))
+            (lsp--info "Symbol not found for position %s" symbol-position))
+        (lsp--info "Server does not support breadcrumb."))
+    (lsp--info "Call this function with a number representing the symbol position on breadcrumb")))
+
+(declare-function evil-set-command-property "ext:evil-common")
+
+(with-eval-after-load 'evil
+  (evil-set-command-property 'lsp-breadcrumb-go-to-symbol :jump t))
+
+;;;###autoload
+(defun lsp-breadcrumb-narrow-to-symbol (symbol-position)
+  "Narrow to the symbol range on breadcrumb at SYMBOL-POSITION."
+  (interactive "P")
+  (if (numberp symbol-position)
+      (if (lsp-feature? "textDocument/documentSymbol")
+          (-if-let* ((lsp--document-symbols-request-async t)
+                     (symbols (lsp--get-document-symbols))
+                     (symbols-hierarchy (lsp--symbols->document-symbols-hierarchy symbols)))
+              (lsp-headerline--narrow-to-symbol (nth (1- symbol-position) symbols-hierarchy))
+            (lsp--info "Symbol not found for position %s" symbol-position))
+        (lsp--info "Server does not support breadcrumb."))
+    (lsp--info "Call this function with a number representing the symbol position on breadcrumb")))
+
+(lsp-consistency-check lsp-headerline)
+
+(provide 'lsp-headerline)
+;;; lsp-headerline.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-html.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-html.el
new file mode 100644
index 0000000..30121d2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-html.el
@@ -0,0 +1,227 @@
+;;; lsp-html.el --- vscode-html-languageserver configuration  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Vibhav Pant
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Vibhav Pant <vibhavp@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-html nil
+  "LSP support for HTML, using vscode's built-in language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/microsoft/vscode/tree/main/extensions/html-language-features/server")
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-custom-data []
+  "A list of JSON file paths that define custom tags, properties and other HTML
+syntax constructs. Only workspace folder setting will be read.
+All json file paths should be relative to your workspace folder."
+  :type 'lsp-repeatable-vector
+  :group 'lsp-html
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-html-format-enable t
+  "Enable/disable default HTML formatter."
+  :type 'boolean
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-format-wrap-line-length 120
+  "Maximum amount of characters per line (0 = disable)."
+  :type 'number
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-format-unformatted "wbr"
+  nil
+  :type '(choice (const nil) string)
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-format-content-unformatted "pre,code,textarea"
+  nil
+  :group 'lsp-html
+  :type '(choice (const nil) string)
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-format-indent-inner-html nil
+  nil
+  :type 'boolean
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-format-preserve-new-lines t
+  "Controls whether existing line breaks before elements should be preserved.
+Only works before elements, not inside tags or for text."
+  :type 'boolean
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-format-max-preserve-new-lines nil
+  nil
+  :type '(choice (const nil) integer)
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-format-indent-handlebars nil nil
+  :type 'boolean
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-format-end-with-newline nil
+  "End with a newline."
+  :type 'boolean
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-format-extra-liners "head, body, /html"
+  nil
+  :type '(choice (const nil) string)
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-format-wrap-attributes "auto"
+  "Wrap attributes."
+  :type '(choice
+          (const "auto")
+          (const "force")
+          (const "force-aligned")
+          (const "force-expand-multiline")
+          (const "aligned-multiple")
+          (const "preserve")
+          (const "preserve-aligned"))
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-suggest-html5 t
+  "Controls whether the built-in HTML language support suggests HTML5 tags,
+properties and values."
+  :type 'boolean
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-validate-scripts t
+  "Controls whether the built-in HTML language support validates embedded
+scripts."
+  :type 'boolean
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-validate-styles t
+  "Controls whether the built-in HTML language support validates embedded
+styles."
+  :type 'boolean
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-auto-closing-tags t
+  "Enable/disable autoclosing of HTML tags."
+  :type 'boolean
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-html-hover-documentation t
+  "Whether to show documentation strings on hover or not."
+  :type 'boolean
+  :group 'lsp-html
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-html-hover-references t
+  "Whether to show MDN references in documentation popups."
+  :type 'boolean
+  :group 'lsp-html
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-html-trace-server "off"
+  "Traces the communication between VS Code and the HTML language server."
+  :type '(choice
+          (const "off")
+          (const "messages")
+          (const "verbose"))
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.1"))
+
+(lsp-register-custom-settings
+ '(("html.trace.server" lsp-html-trace-server)
+   ("html.autoClosingTags" lsp-html-auto-closing-tags t)
+   ("html.validate.styles" lsp-html-validate-styles t)
+   ("html.validate.scripts" lsp-html-validate-scripts t)
+   ("html.suggest.html5" lsp-html-suggest-html5 t)
+   ("html.format.wrapAttributes" lsp-html-format-wrap-attributes)
+   ("html.format.extraLiners" lsp-html-format-extra-liners)
+   ("html.format.endWithNewline" lsp-html-format-end-with-newline t)
+   ("html.format.indentHandlebars" lsp-html-format-indent-handlebars t)
+   ("html.format.maxPreserveNewLines" lsp-html-format-max-preserve-new-lines)
+   ("html.format.preserveNewLines" lsp-html-format-preserve-new-lines t)
+   ("html.format.indentInnerHtml" lsp-html-format-indent-inner-html t)
+   ("html.format.contentUnformatted" lsp-html-format-content-unformatted)
+   ("html.format.unformatted" lsp-html-format-unformatted)
+   ("html.format.wrapLineLength" lsp-html-format-wrap-line-length)
+   ("html.format.enable" lsp-html-format-enable t)
+   ("html.hover.documentation" lsp-html-hover-documentation t)
+   ("html.hover.references" lsp-html-hover-references t)
+   ("html.customData" lsp-html-custom-data)))
+
+(defcustom lsp-html-server-command-args '("--stdio")
+  "Command to start html-languageserver."
+  :type '(repeat string)
+  :group 'lsp-html
+  :package-version '(lsp-mode . "6.3"))
+
+;; Caveat: uri seems to be sent as a single length vector.
+(defun lsp-html--get-content (_workspace files callback)
+  "Helper function for getting the content of a URI/filename."
+  (let* ((filename (aref files 0))
+         (uri (f-join (lsp-workspace-root) filename))
+         (file-content (f-read-text uri)))
+    (funcall callback file-content)))
+
+(lsp-dependency 'html-language-server
+                '(:system "vscode-html-language-server")
+                '(:npm :package "vscode-langservers-extracted"
+                       :path "vscode-html-language-server"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     (cons (lsp-package-path 'html-language-server)
+                                           lsp-html-server-command-args)))
+                  :activation-fn (lsp-activate-on "html")
+                  :priority -4
+                  :completion-in-comments? t
+                  :server-id 'html-ls
+                  :initialization-options (lambda ()
+                                            (list :dataPaths lsp-html-custom-data))
+                  :async-request-handlers (ht ("html/customDataContent" #'lsp-html--get-content))
+                  :initialized-fn (lambda (w)
+                                    (with-lsp-workspace w
+                                      (lsp--set-configuration
+                                       (lsp-configuration-section "html"))))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure
+                                         'html-language-server callback
+                                         error-callback))))
+
+(lsp-consistency-check lsp-html)
+
+(provide 'lsp-html)
+;;; lsp-html.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-hy.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-hy.el
new file mode 100644
index 0000000..51c8b2e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-hy.el
@@ -0,0 +1,51 @@
+;;; lsp-rpm-spec.el --- lsp-mode integration for Hy -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, hy, hylang
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Client for Hylang
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-hy nil
+  "LSP support for Hy."
+  :group 'lsp-mode
+  :link '(url-link ""))
+
+(defcustom lsp-clients-hy-server-executable
+  '("hyuga")
+  "LSP support for the Hy Programming Language, using the hyuga."
+  :group 'lsp-hy
+  :risky t
+  :type '(repeat string))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda () lsp-clients-hy-server-executable))
+                  :activation-fn (lsp-activate-on "hy")
+                  :priority 0
+                  :completion-in-comments? t
+                  :major-modes '(hy-mode)
+                  :server-id 'hyuga))
+
+(lsp-consistency-check lsp-hy)
+
+(provide 'lsp-hy)
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-icons.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-icons.el
new file mode 100644
index 0000000..eb19084
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-icons.el
@@ -0,0 +1,102 @@
+;;; lsp-icons.el --- LSP icons management -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;;  LSP icons management
+;;
+;;; Code:
+(require 'lsp-mode)
+
+(defgroup lsp-icons nil
+  "LSP icons"
+  :group 'lsp-mode
+  :tag "LSP Icons")
+
+(defcustom lsp-headerline-breadcrumb-icons-enable t
+  "If non-nil, icons support is enabled for headerline-breadcrumb."
+  :type 'boolean
+  :group 'lsp-icons)
+
+(defcustom lsp-modeline-code-action-icons-enable t
+  "If non-nil, icons support is enabled for modeline-code-action"
+  :type 'boolean
+  :group 'lsp-icons)
+
+(declare-function lsp-treemacs-symbol-icon "ext:lsp-treemacs" (kind))
+(declare-function lsp-treemacs-get-icon "ext:lsp-treemacs" (icon-name))
+
+(defun lsp-icons--enabled-for-feature (feature)
+  "Check if icons support is enabled for FEATURE."
+  (cond
+   ((eq feature 'headerline-breadcrumb) lsp-headerline-breadcrumb-icons-enable)
+   ((eq feature 'modeline-code-action) lsp-modeline-code-action-icons-enable)
+   (t t)))
+
+(defun lsp-icons--fix-image-background (image)
+  "Fix IMAGE background if it is a file otherwise return as an icon."
+  (if image
+      (let ((display-image (get-text-property 0 'display image)))
+        (if (and (listp display-image)
+                 (plist-member (cl-copy-list (cl-rest display-image)) :type))
+            (propertize " " 'display
+                        (cl-list* 'image
+                                  (plist-put
+                                   (cl-copy-list
+                                    (cl-rest display-image))
+                                   :background (face-attribute 'header-line :background nil t))))
+          (if (stringp display-image)
+              (replace-regexp-in-string "\s\\|\t" "" display-image)
+            (replace-regexp-in-string "\s\\|\t" "" image))))
+    ""))
+
+(defun lsp-icons-get-by-file-ext (file-ext &optional feature)
+  "Get an icon by file FILE-EXT.
+FEATURE is the feature that will use the icon which we should check
+if its enabled."
+  (when (and file-ext
+             (lsp-icons--enabled-for-feature feature)
+             (functionp 'lsp-treemacs-get-icon))
+    (lsp-icons--fix-image-background
+     (lsp-treemacs-get-icon file-ext))))
+
+(defun lsp-icons-get-by-symbol-kind (kind &optional feature)
+  "Get an icon by symbol KIND.
+FEATURE is the feature that will use the icon which we should check
+if its enabled."
+  (when (and kind
+             (lsp-icons--enabled-for-feature feature)
+             (functionp 'lsp-treemacs-symbol-icon))
+    (lsp-icons--fix-image-background
+     (lsp-treemacs-symbol-icon kind))))
+
+(defun lsp-icons-all-the-icons-icon (icon-set icon-name face fallback &optional feature &rest args)
+  "Get icon ICON-NAME from `all-the-icons' ICON-SET using FACE.
+If ARGS is provided, it's a plist passed directly to the `all-the-icons' function.
+Fallback to FALLBACK string if not found or not available.
+FEATURE is the feature that will use the icon which we should check
+if its enabled."
+  (let ((icon-set-fn (intern-soft (concat "all-the-icons-" (symbol-name icon-set)))))
+    (if (and (fboundp icon-set-fn)
+             (lsp-icons--enabled-for-feature feature))
+        (apply icon-set-fn icon-name :face face args)
+      (propertize fallback 'face face))))
+
+(lsp-consistency-check lsp-icons)
+
+(provide 'lsp-icons)
+;;; lsp-icons.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ido.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ido.el
new file mode 100644
index 0000000..63f180b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ido.el
@@ -0,0 +1,142 @@
+;;; lsp-ido.el --- `ido' integration -*- lexical-binding: t -*-
+;;
+;; Copyright (C) 2021-2026 emacs-lsp maintainers
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This module provides an interactive ido interface to the workspace symbol
+;; functionality offered by lsp-mode.
+
+;;; Code:
+
+(require 'ido)
+(require 'lsp-protocol)
+(require 'lsp-mode)
+
+(defgroup lsp-ido nil
+  "LSP support for ido-based symbol completion"
+  :group 'lsp-mode
+  :tag "LSP ido")
+
+(defcustom lsp-ido-symbol-kind-to-string
+  ["    "          ; Unknown - 0
+   "File"          ; File - 1
+   "Modu"          ; Module - 2
+   "Nmsp"          ; Namespace - 3
+   "Pack"          ; Package - 4
+   "Clss"          ; Class - 5
+   "Meth"          ; Method - 6
+   "Prop"          ; Property - 7
+   "Fld "          ; Field - 8
+   "Cons"          ; Constructor - 9
+   "Enum"          ; Enum - 10
+   "Intf"          ; Interface - 11
+   "Func"          ; Function - 12
+   "Var "          ; Variable - 13
+   "Cnst"          ; Constant - 14
+   "Str "          ; String - 15
+   "Num "          ; Number - 16
+   "Bool "         ; Boolean - 17
+   "Arr "          ; Array - 18
+   "Obj "          ; Object - 19
+   "Key "          ; Key - 20
+   "Null"          ; Null - 21
+   "EmMm"          ; EnumMember - 22
+   "Srct"          ; Struct - 23
+   "Evnt"          ; Event - 24
+   "Op  "          ; Operator - 25
+   "TPar"]          ; TypeParameter - 26
+  "A vector of 26 items representing the SymbolKind."
+  :group 'lsp-ido
+  :type '(vector string))
+
+(defcustom lsp-ido-show-symbol-filename
+  t
+  "Whether to show the project-relative path to a symbol's point of definition."
+  :group 'lsp-ido
+  :type 'boolean)
+
+(defcustom lsp-ido-show-symbol-kind
+  t
+  "Whether to show the symbol's kind when showing lsp symbols."
+  :group 'lsp-ido
+  :type 'boolean)
+
+(eval-when-compile
+  (lsp-interface
+   (lsp-ido:FormattedSymbolInformation
+    (:kind :name :location :textualRepresentation)
+    (:containerName :deprecated))))
+
+(lsp-defun lsp-ido--transform-candidate
+  ((symbol-information &as &SymbolInformation :kind :location (&Location :uri))
+   lsp-ido--results project-root)
+  (let* ((sanitized-kind (if (< kind (length lsp-ido-symbol-kind-to-string)) kind 0))
+         (type (elt lsp-ido-symbol-kind-to-string sanitized-kind))
+         (typestr (if lsp-ido-show-symbol-kind
+                      (format "[%s] " type)
+                    ""))
+         (pathstr (if lsp-ido-show-symbol-filename
+                      (propertize (format " . %s" (file-relative-name (lsp--uri-to-path uri) project-root))
+                                  'face 'font-lock-comment-face)
+                    ""))
+         (textual-representation
+          (lsp-render-symbol-information symbol-information "."))
+         (entry (concat typestr textual-representation pathstr)))
+    (puthash entry symbol-information lsp-ido--results)))
+
+(lsp-defun lsp-ido--jump-selected-candidate
+  ((&SymbolInformation
+    :location (&Location :uri :range (&Range :start (&Position :line :character)))))
+  "Jump to selected candidate."
+  (find-file (lsp--uri-to-path uri))
+  (goto-char (point-min))
+  (forward-line line)
+  (forward-char character))
+
+(defun lsp-ido--workspace-symbol (workspaces query)
+  "Search against WORKSPACES based on QUERY."
+  (let* ((lsp-ido--results (make-hash-table :test 'equal))
+         (workspace-root (lsp-workspace-root))
+         (raw-choices
+          (with-lsp-workspaces workspaces
+            (lsp-request
+             "workspace/symbol"
+             (lsp-make-workspace-symbol-params :query query)))))
+    (mapc (lambda (it)
+            (lsp-ido--transform-candidate it lsp-ido--results workspace-root))
+          raw-choices)
+    lsp-ido--results))
+
+;;;###autoload
+(defun lsp-ido-workspace-symbol (arg)
+  "`ido' for lsp workspace/symbol.
+When called with prefix ARG the default selection will be symbol at point."
+  (interactive "P")
+  (let* ((query (if arg "" (read-string "Workspace symbol: ")))
+         (hash-table-candidates (lsp-ido--workspace-symbol (lsp-workspaces) query))
+         (choice (ido-completing-read
+                  "Workspace symbol: "
+                  (hash-table-keys hash-table-candidates)
+                  nil
+                  nil
+                  (when arg (thing-at-point 'symbol)))))
+    (lsp-ido--jump-selected-candidate (gethash choice hash-table-candidates))))
+
+(lsp-consistency-check lsp-ido)
+
+(provide 'lsp-ido)
+;;; lsp-ido.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-idris.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-idris.el
new file mode 100644
index 0000000..d6257ef
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-idris.el
@@ -0,0 +1,70 @@
+;;; lsp-idris.el --- Description -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2022 skykanin
+;; Copyright (C) 2022-2026 emacs-lsp maintainers
+;;
+;; Author: skykanin <https://github.com/skykanin>
+;; Keywords: idris lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;; This file is not part of GNU Emacs.
+;;
+;;; Commentary:
+
+;; LSP Client for the Idris2 Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-semantic-tokens)
+
+(defgroup lsp-idris nil
+  "LSP support for Idris."
+  :link '(url-link "https://github.com/idris-community/idris2-lsp")
+  :group 'lsp-mode
+  :tag "Lsp Idirs"
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-idris2-lsp-path "idris2-lsp"
+  "Command to start Idris 2 language server process."
+  :group 'lsp-idris
+  :type 'string
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-idris2-lsp-trace-server "off"
+  "Traces the communication between VS Code and the language server."
+  :group 'lsp-idris
+  :type '(choice (const "off")
+                 (const "messages")
+                 (const "verbose"))
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-register-custom-settings
+  '(("idris2-lsp.trace.server" lsp-idris2-lsp-trace-server)
+    ("idris2-lsp.path" lsp-idris2-lsp-path)))
+
+;; Register the client itself
+(lsp-register-client
+  (make-lsp-client
+   :new-connection (lsp-stdio-connection lsp-idris2-lsp-path)
+   ;; Activate lsp on idris or idris2 buffers
+   :activation-fn (lsp-activate-on "idris" "idris2")
+   ;; This should run under idris-mode and idris2-mode.
+   :major-modes '(idris-mode idris2-mode)
+   :language-id "idris"
+   :server-id 'idris2-lsp))
+
+(provide 'lsp-idris)
+;;; lsp-idris.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-iedit.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-iedit.el
new file mode 100644
index 0000000..2743edd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-iedit.el
@@ -0,0 +1,149 @@
+;;; lsp-iedit.el --- `iedit' integration -*- lexical-binding: t -*-
+;;
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This module provides features that allow starting `iedit' on various
+;; different lsp-based, semantic units (like documentHighlights, and
+;; linkedEditingRanges in the future).
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'dash)
+
+(declare-function iedit-make-occurrence-overlay "iedit-lib" (begin end))
+(declare-function iedit-start-buffering "iedit-lib" ())
+(declare-function iedit-lib-start "iedit-lib" (mode-exit-func))
+(declare-function iedit-done "iedit" ())
+(declare-function evil-multiedit-mode "evil-multiedit" (mode))
+(declare-function evil-iedit-state "evil-iedit-state" ())
+
+(defvar iedit-mode)
+(defvar iedit-auto-buffering)
+(defvar iedit-occurrences-overlays)
+(defvar iedit-occurrence-keymap)
+(defvar iedit-mode-occurrence-keymap)
+(defvar evil-multiedit--dont-recall)
+
+(defun lsp-iedit--on-ranges (ranges)
+  "Start an `iedit' operation using RANGES.
+RANGES shall be a list of lsp-`&Range's. They can be acquired
+from various lsp protocol requests, e.g.
+`textDocument/documentHighlight', ...."
+  (require 'iedit)
+  (unless (seq-empty-p ranges)
+    (mapc (-lambda ((&RangeToPoint :start :end))
+            (push (iedit-make-occurrence-overlay start end)
+                  iedit-occurrences-overlays))
+          ranges)
+    ;; See `iedit-start'; TODO: upstream this
+    (setq iedit-occurrence-keymap iedit-mode-occurrence-keymap)
+    (setq iedit-mode t)
+    (when iedit-auto-buffering
+      (iedit-start-buffering))
+    (iedit-lib-start 'iedit-done)
+    (run-hooks 'iedit-mode-hook)
+    (add-hook 'before-revert-hook 'iedit-done nil t)
+    (add-hook 'kbd-macro-termination-hook 'iedit-done nil t)
+    (add-hook 'change-major-mode-hook 'iedit-done nil t)
+    (add-hook 'iedit-aborting-hook 'iedit-done nil t)
+    (message "%d occurrences of \"%s\""
+             (seq-length ranges)
+             (lsp--range-text (lsp-seq-first ranges)))))
+
+;; iedit
+
+;;;###autoload
+(defun lsp-iedit-highlights ()
+  "Start an `iedit' operation on the documentHighlights at point.
+This can be used as a primitive `lsp-rename' replacement if the
+language server doesn't support renaming.
+
+See also `lsp-enable-symbol-highlighting'."
+  (interactive)
+  (let ((highlights (lsp-request "textDocument/documentHighlight"
+                                 (lsp--text-document-position-params)))
+        (-compare-fn (-lambda ((&Location :range (&Range :start l-start :end l-end))
+                               (&Location :range (&Range :start r-start :end r-end)))
+                       (and (lsp--position-equal l-start r-start)
+                            (lsp--position-equal l-end   r-end)))))
+    (lsp-iedit--on-ranges (mapcar #'lsp:document-highlight-range (-distinct highlights)))))
+
+;;;###autoload
+(defun lsp-iedit-linked-ranges ()
+  "Start an `iedit' for `textDocument/linkedEditingRange'"
+  (interactive)
+  (unless (lsp-feature? "textDocument/linkedEditingRange")
+    (user-error "`textDocument/linkedEditingRange' is not supported by current server"))
+
+  (-> (lsp-request "textDocument/linkedEditingRange" (lsp--text-document-position-params))
+      (lsp:linked-editing-ranges-ranges)
+      (or (user-error "No editing ranges found"))
+      (lsp-iedit--on-ranges)))
+
+
+;; evil-multi-edit
+
+;;;###autoload
+(defun lsp-evil-multiedit-highlights ()
+  "Start an `evil-multiedit' operation on the documentHighlights at point.
+This can be used as a primitive `lsp-rename' replacement if the
+language server doesn't support renaming.
+
+See also `lsp-enable-symbol-highlighting'."
+  (interactive)
+  (require 'evil-multiedit)
+  (when (fboundp 'ahs-clear) (ahs-clear))
+  (setq evil-multiedit--dont-recall t)
+  (lsp-iedit-highlights)
+  (evil-multiedit-mode +1))
+
+;;;###autoload
+(defun lsp-evil-multiedit-linked-ranges ()
+  "Start an `evil-multiedit' for `textDocument/linkedEditingRange'"
+  (interactive)
+  (require 'evil-multiedit)
+  (when (fboundp 'ahs-clear) (ahs-clear))
+  (setq evil-multiedit--dont-recall t)
+  (lsp-iedit-linked-ranges)
+  (evil-multiedit-mode +1))
+
+;; evil-evil-state
+
+;;;###autoload
+(defun lsp-evil-state-highlights ()
+  "Start `iedit-mode'. for `textDocument/documentHighlight'"
+  (interactive "P")
+  (if (fboundp 'ahs-clear) (ahs-clear))
+  (lsp-iedit-highlights)
+  (evil-iedit-state))
+
+;;;###autoload
+(defun lsp-evil-state-linked-ranges ()
+  "Start `iedit-mode'. for `textDocument/linkedEditingRange'"
+  (interactive "P")
+  (if (fboundp 'ahs-clear) (ahs-clear))
+  (lsp-iedit-linked-ranges)
+  (evil-iedit-state))
+
+
+
+(lsp-consistency-check lsp-iedit)
+
+(provide 'lsp-iedit)
+;;; lsp-iedit.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-inline-completion.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-inline-completion.el
new file mode 100644
index 0000000..ae63707
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-inline-completion.el
@@ -0,0 +1,537 @@
+;;; lsp-inline-completion.el --- LSP mode                              -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: Rodrigo Kassick
+;; Keywords: languages
+;; Package-Requires: ((emacs "28.1") (dash "2.18.0") (spinner "1.7.3"))
+
+;; URL: https://github.com/emacs-lsp/lsp-mode
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Inline Completions support
+;; Specification here https://microsoft.github.io/language-server-protocol/specifications/lsp/3.18/specification/#textDocument_inlineCompletion
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defun lsp-inline-completion--params (implicit &optional identifier position)
+  "Returns a InlineCompletionParams instance"
+  (lsp-make-inline-completion-params
+   :textDocument (or identifier (lsp--text-document-identifier))
+   :position (or position (lsp--cur-position))
+   :context (lsp-make-inline-completion-context
+             :triggerKind (if implicit
+                              lsp/inline-completion-trigger-automatic
+                            lsp/inline-completion-trigger-invoked))))
+
+(defun lsp-inline-completion--parse-items (response)
+  "Parses the response from the server and returns a list of
+InlineCompletionItem objects"
+
+  (pcase response
+    ;; Server responded with a completion list
+    ((lsp-interface InlineCompletionList :items)
+     (seq-into items 'list))
+
+    ;; Server responded with a sequence of completion items
+    ((pred (lambda (i)
+             (and (sequencep i)
+                  (lsp-inline-completion-item? (elt i 0)))))
+     (seq-into response 'list))
+
+    ;; A sequence means multiple server may have responded. Iterate over them and normalize
+    ((pred sequencep)
+     (let ((item-seq (cl-map 'list #'lsp-inline-completion--parse-items response)))
+       (apply 'seq-concatenate `(list ,@item-seq))))))
+
+;;;;;; Default UI -- overlay
+
+(defun lsp-inline-completion--define-key (keymap key def &optional keep)
+  "Defines key on map. With non-nil keep, will mark it as a command that
+should not cancel the inline completion UI"
+  (define-key keymap key def)
+  (when keep
+    (pcase def
+      ;; Command is OK
+      ((pred symbolp)
+       (put def 'lsp-inline-completion-keep t))
+      ;; ("str" . command) is OK
+      (`(,_str . ,defn)
+       (if (symbolp defn)
+           (put defn 'lsp-inline-completion-keep t)
+         (error "Unexpected type (str . defn) key definition %S" (type-of defn))))
+      ;; Keymaps and macros are unsupported
+      (t (error "Unsupported definition with keep -- %S" def)))))
+
+(defvar lsp-inline-completion-active-map
+  (let ((map (make-sparse-keymap)))
+    ;; accept
+    (lsp-inline-completion--define-key map (kbd "C-<return>") #'lsp-inline-completion-accept 'keep)
+    (lsp-inline-completion--define-key map [mouse-1] #'lsp-inline-completion-accept-on-click  'keep)
+    ;; navigate
+    (lsp-inline-completion--define-key map (kbd "C-n") #'lsp-inline-completion-next 'keep)
+    (lsp-inline-completion--define-key map (kbd "C-p") #'lsp-inline-completion-prev 'keep)
+    ;; cancel
+    (lsp-inline-completion--define-key map (kbd "C-g") #'lsp-inline-completion-cancel)
+    (lsp-inline-completion--define-key map (kbd "<escape>") #'lsp-inline-completion-cancel)
+    (lsp-inline-completion--define-key map (kbd "C-c C-k") #'lsp-inline-completion-cancel)
+    ;; useful -- recenter without losing the completion
+    (lsp-inline-completion--define-key map (kbd "C-l") #'recenter-top-bottom 'keep)
+    ;; ignore
+    (lsp-inline-completion--define-key map [down-mouse-1] #'ignore 'keep)
+    (lsp-inline-completion--define-key map [up-mouse-1] #'ignore 'keep)
+    (lsp-inline-completion--define-key map [mouse-movement] #'ignore 'keep)
+    map)
+  "Keymap active when showing inline code suggestions.
+
+When adding new bindings to this map, prefer using
+lsp-inline-completion--define-key. Use a non-nil keep unless the command
+should cancel the completion UI")
+
+(defsubst lsp-inline-completion--keep (cmd)
+  "Returns t if the command should not cancel the current completion"
+  (and (symbolp cmd) (get cmd 'lsp-inline-completion-keep)))
+
+(defface lsp-inline-completion-overlay-face
+  '((t :inherit shadow))
+  "Face for the inline code suggestions overlay."
+  :group 'lsp-mode)
+
+;; Local Buffer State
+
+(defvar-local lsp-inline-completion--items nil "The completions provided by the server.")
+(defvar-local lsp-inline-completion--current nil "The current suggestion to be displayed.")
+(defvar-local lsp-inline-completion--overlay nil "The overlay displaying code suggestions.")
+(defvar-local lsp-inline-completion--start-point nil "The point where the completion started.")
+
+(defcustom lsp-before-inline-completion-hook nil
+  "Hooks run before starting code suggestions."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-after-inline-completion-hook nil
+  "Hooks executed after asking for code suggestions."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-inline-completion-accepted-functions nil
+  "Functions executed after accepting a code suggestion.
+The functions receive the inserted text and the range that was updated by the completion."
+  :type 'hook
+  :group 'lsp-mode)
+
+
+(defcustom lsp-inline-completion-cancelled-hook nil
+  "Hooks executed after cancelling the completion UI."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-inline-completion-before-show-hook nil
+  "Hooks executed before showing a suggestion."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-inline-completion-shown-hook nil
+  "Hooks executed after showing a suggestion."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-inline-completion-overlay-priority 9000
+  "The priority of the overlay."
+  :type '(choice (const :tag "No Priority" nil)
+                 (integer :tag "Simple, Overriding Priority")
+                 (cons :tag "Composite"
+                       (choice (integer :tag "Primary")
+                               (const :tag "Primary Unset" nil))
+                       (integer :tag "Secondary")))
+  :group 'lsp-mode)
+
+(defsubst lsp-inline-completion--active-p ()
+  "Returns whether we are in an active completion"
+  (overlayp lsp-inline-completion--overlay))
+
+(defun lsp-inline-completion--clear-overlay ()
+  "Hide the suggestion overlay."
+  (when (overlayp lsp-inline-completion--overlay)
+    (delete-overlay lsp-inline-completion--overlay))
+  (setq lsp-inline-completion--overlay nil)
+  (internal-pop-keymap lsp-inline-completion-active-map 'overriding-terminal-local-map)
+  (remove-hook 'pre-command-hook #'lsp-inline-completion--pre-command-hook t))
+
+
+(defun lsp-inline-completion--show-keys ()
+  "Shows active keymap hints in the minibuffer."
+
+  (unless (and lsp-inline-completion--items
+               (numberp lsp-inline-completion--current))
+    (error "No completions to show"))
+
+  (let ((message-log-max nil))
+    (message (concat "Completion "
+                     (propertize (format "%d" (1+ lsp-inline-completion--current)) 'face 'bold)
+                     "/"
+                     (propertize (format "%d" (length lsp-inline-completion--items)) 'face 'bold)
+
+                     (-when-let (keys (where-is-internal #'lsp-inline-completion-next lsp-inline-completion-active-map))
+                       (concat ". "
+                               (propertize " Next" 'face 'italic)
+                               (format ": [%s]"
+                                       (string-join (--map (propertize (key-description it) 'face 'help-key-binding)
+                                                           keys)
+                                                    "/"))))
+                     (-when-let (keys (where-is-internal #'lsp-inline-completion-accept lsp-inline-completion-active-map))
+                       (concat (propertize " Accept" 'face 'italic)
+                               (format ": [%s]"
+                                       (string-join (--map (propertize (key-description it) 'face 'help-key-binding)
+                                                           keys)
+                                                    "/"))))))))
+
+
+(defun lsp-inline-completion--get-overlay (beg end)
+  "Build the suggestions overlay."
+  (lsp-inline-completion--clear-overlay)
+
+  (add-hook 'pre-command-hook #'lsp-inline-completion--pre-command-hook nil t)
+  (setq lsp-inline-completion--overlay (make-overlay beg end nil nil t))
+  (overlay-put lsp-inline-completion--overlay 'priority lsp-inline-completion-overlay-priority)
+  (internal-push-keymap lsp-inline-completion-active-map 'overriding-terminal-local-map)
+  (lsp-inline-completion--show-keys)
+
+  lsp-inline-completion--overlay)
+
+
+(defun lsp-inline-completion-show-overlay ()
+  "Makes the suggestion overlay visible."
+  (unless (and lsp-inline-completion--items
+               (numberp lsp-inline-completion--current))
+    (error "No completions to show"))
+
+  (lsp-inline-completion--clear-overlay)
+
+  (run-hooks 'lsp-inline-completion-before-show-hook)
+
+  (-let* ((suggestion
+           (elt lsp-inline-completion--items
+                lsp-inline-completion--current))
+          ((&InlineCompletionItem? :insert-text :range? (&RangeToPoint :start :end)) suggestion)
+          (start-point (or start (point)))
+          (showing-at-eol (save-excursion
+                            (goto-char start-point)
+                            (and (not (bolp)) (eolp))))
+          (beg (if showing-at-eol (1- start-point) start-point))
+          (end-point  (or end (1+ beg)))
+          (text (cond
+                 ((lsp-markup-content? insert-text) (lsp:markup-content-value insert-text))
+                 (t insert-text)))
+          (propertized-text (concat
+                             (buffer-substring beg start-point)
+                             (propertize text 'face 'lsp-inline-completion-overlay-face)))
+          (ov (lsp-inline-completion--get-overlay beg end-point))
+          display-str after-str target-position)
+
+    (goto-char beg)
+
+    (put-text-property 0 (length propertized-text) 'cursor t propertized-text)
+
+    (if (string-prefix-p
+         (buffer-substring-no-properties beg lsp-inline-completion--start-point)
+         text)
+        (progn
+          ;; Show the prefix as `display'
+          (setq display-str (substring propertized-text 0 (- lsp-inline-completion--start-point beg)))
+          (setq after-str (substring propertized-text (- lsp-inline-completion--start-point beg) nil))
+          (setq target-position lsp-inline-completion--start-point))
+      (setq display-str (substring propertized-text 0 1))
+      (setq after-str (substring propertized-text 1))
+      (setq target-position beg))
+
+    (overlay-put ov 'display display-str)
+    (overlay-put ov 'after-string after-str)
+
+    (goto-char target-position)
+
+    (run-hooks 'lsp-inline-completion-shown-hook)))
+
+(defun lsp-inline-completion--insert-sugestion (text kind start end command?)
+  (let* ((text-insert-start (or start lsp-inline-completion--start-point))
+         text-insert-end)
+    (when text-insert-start
+      (goto-char text-insert-start))
+
+    ;; When range is provided, must replace the text of the range by the text
+    ;; to insert
+    (when (and start end (/= start end))
+      (delete-region start end))
+
+    ;; Insert suggestion, keeping the cursor at the start point
+    (insert text)
+
+    (setq text-insert-end (point))
+
+    ;; If a template, format it -- keep track of the end position!
+    (when (eq kind 'snippet)
+      (let ((end-marker (set-marker (make-marker) (point))))
+        (lsp--expand-snippet (buffer-substring text-insert-start text-insert-end)
+                             text-insert-start
+                             text-insert-end)
+        (setq text-insert-end (marker-position end-marker))
+        (set-marker end-marker nil)))
+
+    ;; Post command
+    (when command?
+      (lsp--execute-command command?))
+
+    ;; hooks
+    (run-hook-with-args 'lsp-inline-completion-accepted-functions text text-insert-start text-insert-end)))
+
+(defun lsp-inline-completion-accept ()
+  "Accepts the current suggestion."
+  (interactive)
+  (unless (lsp-inline-completion--active-p)
+     (error "Not showing suggestions"))
+
+  (lsp-inline-completion--clear-overlay)
+
+  (-let* ((suggestion (elt lsp-inline-completion--items lsp-inline-completion--current))
+          ((&InlineCompletionItem? :insert-text :range? :command?) suggestion)
+          ((kind . text) (cond
+                          ((lsp-markup-content? insert-text)
+                           (cons 'snippet (lsp:markup-content-value insert-text) ))
+                          (t (cons 'text insert-text))))
+          ((start . end) (when range?
+                           (-let (((&RangeToPoint :start :end) range?)) (cons start end)))))
+
+    (with-no-warnings
+      ;; Compiler does not believes this macro is defined
+      (lsp-with-undo-amalgamate
+        (lsp-inline-completion--insert-sugestion text kind start end command?)))))
+
+(defun lsp-inline-completion-accept-on-click (event)
+  (interactive "e")
+
+  (lsp-inline-completion-accept)
+  (-let (((col . row) (posn-actual-col-row (event-end event))))
+    (move-to-window-line row)
+    (beginning-of-line)
+    (forward-char (- col
+                     (if (bound-and-true-p display-line-numbers-mode)
+                         (+ 2 (line-number-display-width))
+                       0)))))
+
+(defun lsp-inline-completion-cancel ()
+  "Close the suggestion overlay."
+  (interactive)
+  (message nil) ;; clear echo
+  (let ((was-active (lsp-inline-completion--active-p)))
+    (lsp-inline-completion--clear-overlay)
+
+    (when was-active
+      (goto-char lsp-inline-completion--start-point)
+      (run-hooks 'lsp-inline-completion-cancelled-hook))))
+
+(defun lsp-inline-completion-next ()
+  "Display the next inline completion."
+  (interactive)
+  (unless (lsp-inline-completion--active-p)
+    (error "Not showing suggestions"))
+
+  (setq lsp-inline-completion--current
+        (mod (1+ lsp-inline-completion--current)
+             (length lsp-inline-completion--items)))
+
+  (lsp-inline-completion-show-overlay))
+
+(defun lsp-inline-completion-prev ()
+  "Display the previous inline completion."
+  (interactive)
+
+  (unless (lsp-inline-completion--active-p)
+    (error "Not showing suggestions"))
+
+  (setq lsp-inline-completion--current
+        (mod (1- lsp-inline-completion--current)
+             (length lsp-inline-completion--items)))
+
+  (lsp-inline-completion-show-overlay))
+
+;;;###autoload
+(defun lsp-inline-completion-display (&optional implicit)
+  "Displays the inline completions overlay."
+  (interactive)
+
+  (unless implicit
+    (lsp--spinner-start))
+
+  (run-hooks 'lsp-before-inline-completion-hook)
+
+  (condition-case err
+      (unwind-protect
+          (if-let* ((resp (lsp-request-while-no-input "textDocument/inlineCompletion"
+                                                      (lsp-inline-completion--params implicit)))
+                    (items (lsp-inline-completion--parse-items resp)))
+
+              (progn
+                (lsp-inline-completion--clear-overlay)
+                (setq lsp-inline-completion--items items)
+                (setq lsp-inline-completion--current 0)
+                (setq lsp-inline-completion--start-point (point))
+                (lsp-inline-completion-show-overlay))
+            (unless implicit
+              (lsp--info "No Suggestions!")))
+        ;; Clean up
+        (unless implicit
+          (lsp--spinner-stop)))
+    (t (lsp--error "Could not fetch completions: %s" err))))
+
+(defun lsp-inline-completion--pre-command-hook ()
+  "Cancels the inline completio before a non-keep command"
+  (when (and (lsp-inline-completion--active-p)
+             (not (lsp-inline-completion--keep this-command)))
+    (lsp-inline-completion-cancel)))
+
+
+;; Inline Completion Mode
+;;;###autoload
+(defcustom lsp-inline-completion-enable t
+  "If non-nil it will enable inline completions on idle."
+  :type 'boolean
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-inline-completion-idle-delay 2
+  "The number of seconds before trying to fetch inline completions, when
+lsp-inline-completion-mode is active."
+  :type 'number
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-inline-completion-inhibit-predicates nil
+  "When a function of this list returns non nil, lsp-inline-completion-mode will not show the completion."
+  :type '(repeat function)
+  :group 'lsp-mode)
+
+(defvar-local lsp-inline-completion--idle-timer nil
+  "The idle timer used by lsp-inline-completion-mode.")
+
+;;;###autoload
+(define-minor-mode lsp-inline-completion-mode
+  "Mode automatically displaying inline completions."
+  :lighter nil
+  (cond
+   ((and lsp-inline-completion-mode lsp--buffer-workspaces)
+    (add-hook 'lsp-on-change-hook #'lsp-inline-completion--after-change nil t))
+
+   (t
+    (when lsp-inline-completion--idle-timer
+      (cancel-timer lsp-inline-completion--idle-timer))
+
+    (lsp-inline-completion-cancel)
+
+    (remove-hook 'lsp-on-change-hook #'lsp-inline-completion--after-change t))))
+
+(defun lsp-inline-completion--maybe-display (original-buffer original-point)
+  ;; This is executed on an idle timer -- ensure state did not change before
+  ;; displaying
+  (when (and (buffer-live-p original-buffer)
+             (eq (current-buffer) original-buffer)
+             (eq (point) original-point)
+             (--none? (funcall it) lsp-inline-completion-inhibit-predicates))
+    (setq last-command this-command)
+    (setq this-command 'lsp-inline-completion-display)
+    (lsp-inline-completion-display 'implicit)))
+
+(defun lsp-inline-completion--after-change (&rest _)
+  ;; This function is in lsp-on-change-hooks, which is executed on a timer by
+  ;; lsp-on-change. Do not assume that the buffer/window state has not been
+  ;; modified in the meantime! Use the values in lsp--after-change-vals to
+  ;; ensure this.
+
+  (when lsp-inline-completion--idle-timer
+    (cancel-timer lsp-inline-completion--idle-timer))
+
+  (when (and lsp-inline-completion-mode lsp--buffer-workspaces)
+    (let ((original-buffer (plist-get lsp--after-change-vals :buffer))
+          (original-point (plist-get lsp--after-change-vals :point)))
+      (setq lsp-inline-completion--idle-timer
+            (run-with-idle-timer lsp-inline-completion-idle-delay
+                                 nil
+                                 #'lsp-inline-completion--maybe-display
+                                 original-buffer
+                                 original-point)))))
+
+;;;###autoload
+(add-hook 'lsp-configure-hook (lambda ()
+                                (when (and lsp-inline-completion-enable
+                                           (lsp-feature? "textDocument/inlineCompletion"))
+                                  (lsp-inline-completion-mode))))
+
+;; Company default integration
+
+(declare-function company--active-p "ext:company")
+(declare-function company-cancel "ext:company" (&optional result))
+(declare-function company-manual-begin "ext:company")
+(defvar company--begin-inhibit-commands)
+(defcustom lsp-inline-completion-mode-inhibit-when-company-active t
+  "If the inline completion mode should avoid calling completions when company is active."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defvar-local lsp-inline-completion--showing-company nil "If company was active when the tooltip is shown.")
+
+(defun lsp-inline-completion--company-save-state-and-hide ()
+  (setq lsp-inline-completion--showing-company
+        (and (bound-and-true-p company-mode)
+             (company--active-p)))
+
+  (when lsp-inline-completion--showing-company
+    (company-cancel)))
+
+(defun lsp-inline-completion--company-restore-state ()
+  (when lsp-inline-completion--showing-company
+      (company-manual-begin))
+  (setq lsp-inline-completion--showing-company nil))
+
+(defun lsp-inline-completion--company-active-p ()
+  (and (bound-and-true-p company-mode) (company--active-p)))
+
+;;;###autoload
+(define-minor-mode lsp-inline-completion-company-integration-mode
+  "Minor mode to be used when company mode is active with lsp-inline-completion-mode."
+  :lighter nil
+  (cond
+   ((and lsp-inline-completion-company-integration-mode lsp--buffer-workspaces (bound-and-true-p company-mode))
+    (add-hook 'lsp-inline-completion-before-show-hook #'lsp-inline-completion--company-save-state-and-hide nil t)
+    (add-hook 'lsp-inline-completion-cancelled-hook #'lsp-inline-completion--company-restore-state nil t)
+    (unless (memq #'lsp-inline-completion-display company--begin-inhibit-commands)
+      (setq-local company--begin-inhibit-commands
+                  (cons #'lsp-inline-completion-display company--begin-inhibit-commands)))
+    (when (and lsp-inline-completion-mode-inhibit-when-company-active
+               (not (memq  #'lsp-inline-completion--company-active-p lsp-inline-completion-inhibit-predicates)))
+      (setq-local lsp-inline-completion-inhibit-predicates
+                  (cons #'lsp-inline-completion--company-active-p lsp-inline-completion-inhibit-predicates))))
+
+   (t
+    (remove-hook 'lsp-inline-completion-before-show-hook #'lsp-inline-completion--company-save-state-and-hide t)
+    (remove-hook 'lsp-inline-completion-cancelled-hook #'lsp-inline-completion--company-save-state-and-hide t)
+    (when (boundp 'company--begin-inhibit-commands)
+      (setq-local company--begin-inhibit-commands (delq #'lsp-inline-completion-display company--begin-inhibit-commands)))
+    (setq-local lsp-inline-completion-inhibit-predicates
+          (delq #'lsp-inline-completion--company-active-p lsp-inline-completion-inhibit-predicates)))))
+
+(provide 'lsp-inline-completion)
+;;; lsp-inline-completion.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-javascript.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-javascript.el
new file mode 100644
index 0000000..6e1ef12
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-javascript.el
@@ -0,0 +1,1162 @@
+;;; lsp-javascript.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp,
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the JavaScript and TypeScript Programming Languages.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(lsp-dependency 'javascript-typescript-langserver
+                '(:system "javascript-typescript-stdio")
+                '(:npm :package "javascript-typescript-langserver"
+                       :path "javascript-typescript-stdio"))
+
+(defgroup lsp-typescript-javascript nil
+  "Support for TypeScript/JavaScript, using Sourcegraph's JavaScript/TypeScript language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/sourcegraph/javascript-typescript-langserver"))
+
+;; Original name can be confused with initializationOptions. Preferences is just one option of initializationOptions.
+(define-obsolete-variable-alias
+  'lsp-clients-typescript-init-opts
+  'lsp-clients-typescript-preferences
+  "lsp-mode 9.0.0")
+
+(defcustom lsp-clients-typescript-javascript-server-args '()
+  "Extra arguments for the typescript-language-server language server."
+  :group 'lsp-typescript-javascript
+  :risky t
+  :type '(repeat string))
+
+(defun lsp-typescript-javascript-tsx-jsx-activate-p (filename &optional _)
+  "Check if the js-ts lsp server should be enabled based on FILENAME."
+  (or (string-match-p "\\.vue\\|\\.[cm]js\\|\\.[jt]sx?\\'" filename)
+      (and (derived-mode-p 'js-mode 'js-ts-mode 'typescript-mode 'typescript-ts-mode)
+           (not (derived-mode-p 'json-mode)))))
+
+;; Unmaintained sourcegraph server
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda ()
+                                                          (cons (lsp-package-path 'javascript-typescript-langserver)
+                                                                lsp-clients-typescript-javascript-server-args)))
+                  :activation-fn 'lsp-typescript-javascript-tsx-jsx-activate-p
+                  :priority -3
+                  :completion-in-comments? t
+                  :server-id 'jsts-ls
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure
+                                         'javascript-typescript-langserver
+                                         callback
+                                         error-callback))
+                  :initialized-fn (lambda (_workspace)
+                                    (warn (concat "The javascript-typescript-langserver (jsts-ls) is unmaintained; "
+                                                  "it is recommended to use ts-ls or deno-ls instead.")))))
+
+
+
+(defgroup lsp-typescript nil
+  "LSP support for TypeScript, using Theia/Typefox's TypeScript Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/theia-ide/typescript-language-server"))
+
+(defcustom lsp-clients-typescript-tls-path "typescript-language-server"
+  "Path to the typescript-language-server binary."
+  :group 'lsp-typescript
+  :risky t
+  :type 'string)
+
+(defcustom lsp-clients-typescript-server-args '("--stdio")
+  "Extra arguments for the typescript-language-server language server."
+  :group 'lsp-typescript
+  :risky t
+  :type '(repeat string))
+
+(defcustom lsp-clients-typescript-disable-automatic-typing-acquisition nil
+  "Disable tsserver from automatically fetching missing type definitions.
+\(@types packages) for external modules."
+  :group 'lsp-typescript
+  :type 'boolean)
+
+(defcustom lsp-clients-typescript-log-verbosity "info"
+  "The verbosity level of the information printed in the log by tsserver."
+  :group 'lsp-typescript
+  :type '(choice
+          (const "off")
+          (const "terse")
+          (const "normal")
+          (const "requesttime")
+          (const "verbose")))
+
+(defcustom lsp-clients-typescript-max-ts-server-memory nil
+  "The maximum size of the V8's old memory section in megabytes.
+\(for example 4096 means 4GB). The default value is dynamically configured
+by Node so can differ per system. Increase for very big projects that
+exceed allowed memory usage."
+  :group 'lsp-typescript
+  :type 'integer)
+
+(defcustom lsp-clients-typescript-npm-location nil
+  "Specifies the path to the NPM exec used for Automatic Type Acquisition."
+  :group 'lsp-typescript
+  :type 'string)
+
+(defcustom lsp-clients-typescript-prefer-use-project-ts-server nil
+  "When set, prefers using the tsserver.js from your project. This
+can allow loading plugins configured in your tsconfig.json."
+  :group 'lsp-typescript
+  :type 'boolean)
+
+(defcustom lsp-clients-typescript-plugins (vector)
+  "The list of plugins to load.
+It should be a vector of plist with keys `:location' and `:name'
+where `:name' is the name of the package and `:location' is the
+directory containing the package. Example:
+\(vector
+   \(list :name \"@vsintellicode/typescript-intellicode-plugin\"
+         :location \"<path>.vscode/extensions/visualstudioexptteam.
+                            vscodeintellicode-1.1.9/\"))"
+  :group 'lsp-typescript
+  :type  '(restricted-sexp :tag "Vector"
+                           :match-alternatives
+                           (lambda (xs)
+                             (and (vectorp xs) (seq-every-p
+                                                (-lambda ((&plist :name :location))
+                                                  (and name location))
+                                                xs)))))
+
+(defcustom lsp-clients-typescript-preferences nil
+  "Preferences passed to the Typescript (tsserver) process.
+See https://github.com/typescript-language-server/typescript-language-server#initializationoptions for the list of preferences available in the latest version of TypeScript."
+  :group 'lsp-typescript
+  :type 'plist)
+
+(defcustom lsp-clients-typescript-tsserver nil
+  "Options related to the tsserver process. See below for more info.
+See https://github.com/typescript-language-server/typescript-language-server#initializationoptions for the list of tsserver available in the latest version of TypeScript."
+  :group 'lsp-typescript
+  :type 'plist)
+
+(defcustom lsp-typescript-tsdk nil
+  "Specifies the folder path containing tsserver and lib*.d.ts files to use."
+  :type '(repeat string)
+  :group 'lsp-typescript
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-disable-automatic-type-acquisition nil
+  "Disables automatic type acquisition.
+Automatic type acquisition fetches `@types` packages from npm to improve
+IntelliSense for external libraries."
+  :type 'boolean
+  :group 'lsp-typescript
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-npm nil
+  "Specifies the path to the NPM exec used for Automatic Type Acquisition.
+Requires using TypeScript 2.3.4 or newer in the
+workspace."
+  :type '(repeat string)
+  :group 'lsp-typescript
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-check-npm-is-installed t
+  "Check if NPM is installed for Automatic Type Acquisition."
+  :type 'boolean
+  :group 'lsp-typescript
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-references-code-lens-enabled nil
+  "Enable/disable references CodeLens in JavaScript files."
+  :type 'boolean
+  :group 'lsp-typescript
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-references-code-lens-enabled nil
+  "Enable/disable references CodeLens in TypeScript files."
+  :type 'boolean
+  :group 'lsp-typescript
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-implementations-code-lens-enabled nil
+  "Enable/disable implementations CodeLens.
+This CodeLens shows the implementers of an interface."
+  :type 'boolean
+  :group 'lsp-typescript
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-tsserver-log "off"
+  "Enables logging of the TS server to a file.
+This log can be used to diagnose TS Server issues. The log may contain file
+paths, source code, and other potentially sensitive information
+from your project."
+  :type '(choice
+          (const "off")
+          (const "terse")
+          (const "normal")
+          (const "verbose"))
+  :group 'lsp-typescript
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-tsserver-plugin-paths nil
+  "Additional paths to discover Typescript Language Service plugins.
+Requires using TypeScript 2.3.0 or newer in the
+workspace."
+  :type '(repeat string)
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-tsserver-trace "off"
+  "Enables tracing of messages sent to the TS server.
+This trace can be used to diagnose TS Server issues. The trace may contain
+file paths, source code, and other potentially sensitive
+information from your project."
+  :type '(choice
+          (const "off")
+          (const "messages")
+          (const "verbose"))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-suggest-complete-function-calls nil
+  "Complete functions with their parameter signature."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-suggest-complete-function-calls nil
+  "Complete functions with their parameter signature."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-report-style-checks-as-warnings t
+  "Report style checks as warnings."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-validate-enable t
+  "Enable/disable TypeScript validation."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-enable t
+  "Enable/disable default TypeScript formatter."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-comma-delimiter t
+  "Defines space handling after a comma delimiter."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-constructor nil
+  "Defines space handling after the constructor keyword.
+Requires using TypeScript 2.3.0 or newer in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-semicolon-in-for-statements t
+  "Defines space handling after a semicolon in a for statement."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-before-and-after-binary-operators t
+  "Defines space handling after a binary operator."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-keywords-in-control-flow-statements t
+  "Defines space handling after keywords in a control flow statement."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-function-keyword-for-anonymous-functions t
+  "Defines space handling after function keyword for anonymous functions."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-before-function-parenthesis nil
+  "Defines space handling before function argument parentheses."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-opening-and-before-closing-empty-braces nil
+  "Defines space handling after opening/before closing empty braces."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-opening-and-before-closing-nonempty-parenthesis nil
+  "Defines space handling after opening/before closing non-empty parenthesis."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-opening-and-before-closing-nonempty-brackets nil
+  "Defines space handling after opening and before closing non-empty brackets."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-opening-and-before-closing-nonempty-braces t
+  "Defines space handling after opening and before closing non-empty braces.
+Requires using TypeScript 2.3.0 or newer in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-opening-and-before-closing-template-string-braces nil
+  "Defines space handling after opening/before closing template string braces."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-opening-and-before-closing-jsx-expression-braces nil
+  "Defines space handling after opening/before closing JSX expression braces."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-insert-space-after-type-assertion nil
+  "Defines space handling after type assertions in TypeScript.
+Requires using TypeScript 2.4 or newer in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-place-open-brace-on-new-line-for-functions nil
+  "Defines whether an open brace is put onto a new line for functions or not."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-format-place-open-brace-on-new-line-for-control-blocks nil
+  "Defines whether an open brace is put onto a newline for control blocks."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-validate-enable t
+  "Enable/disable JavaScript validation."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-enable t
+  "Enable/disable default JavaScript formatter."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-after-comma-delimiter t
+  "Defines space handling after a comma delimiter."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-after-constructor nil
+  "Defines space handling after the constructor keyword.
+Requires using TypeScript 2.3.0 or newer in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-after-semicolon-in-for-statements t
+  "Defines space handling after a semicolon in a for statement."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-before-and-after-binary-operators t
+  "Defines space handling after a binary operator."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-after-keywords-in-control-flow-statements t
+  "Defines space handling after keywords in a control flow statement."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-after-function-keyword-for-anonymous-functions t
+  "Defines space handling after function keyword for anonymous functions."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-before-function-parenthesis nil
+  "Defines space handling before function argument parentheses."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-after-opening-and-before-closing-empty-braces nil
+  "Defines space handling after opening/before closing empty braces."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-after-opening-and-before-closing-nonempty-parenthesis nil
+  "Defines space handling after opening and before closing non-empty parenthesis."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-after-opening-and-before-closing-nonempty-brackets nil
+  "Defines space handling after opening and before closing non-empty brackets."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-after-opening-and-before-closing-nonempty-braces t
+  "Defines space handling after opening and before closing non-empty braces.
+Requires using TypeScript 2.3.0 or newer in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-after-opening-and-before-closing-template-string-braces nil
+  "Defines space handling after opening/before closing template string braces."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-insert-space-after-opening-and-before-closing-jsx-expression-braces nil
+  "Defines space handling after opening/before closing JSX expression braces."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-place-open-brace-on-new-line-for-functions nil
+  "Defines whether an open brace is put onto a new line for functions or not."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-format-place-open-brace-on-new-line-for-control-blocks nil
+  "Defines whether an open brace is put onto a new line for control blocks or not."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-implicit-project-config-check-js nil
+  "Enable/disable semantic checking of JavaScript files.
+Existing jsconfig.json or tsconfig.json files override this setting.
+Requires using TypeScript 2.3.1 or newer in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-implicit-project-config-experimental-decorators nil
+  nil
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-suggest-names t
+  "Enable/disable including unique names from the file in JavaScript suggestions."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-tsc-auto-detect "on"
+  "Controls auto detection of tsc tasks."
+  :type '(choice
+          (const "on")
+          (const "off")
+          (const "build")
+          (const "watch"))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-suggest-paths t
+  "Enable/disable suggestions for paths in import statements and require calls."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-suggest-paths t
+  "Enable/disable suggestions for paths in import statements and require calls."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-suggest-auto-imports t
+  "Enable/disable auto import suggestions.
+Requires using TypeScript 2.6.1 or newer in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-suggest-auto-imports t
+  "Enable/disable auto import suggestions. Requires using
+TypeScript 2.6.1 or newer in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-suggest-complete-js-docs t
+  "Enable/disable suggestion to complete JSDoc comments."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-suggest-complete-js-docs t
+  "Enable/disable suggestion to complete JSDoc comments."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-locale nil
+  nil
+  :type '(choice
+          (const "de")
+          (const "es")
+          (const "en")
+          (const "fr")
+          (const "it")
+          (const "ja")
+          (const "ko")
+          (const "ru")
+          (const "zh-CN")
+          (const "zh-TW")
+          (const :tag "default" nil))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-suggestion-actions-enabled t
+  "Enable/disable suggestion diagnostics for JavaScript files in
+the editor. Requires using TypeScript 2.8 or newer in the
+workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-suggestion-actions-enabled t
+  "Enable/disable suggestion diagnostics for TypeScript files in
+the editor. Requires using TypeScript 2.8 or newer in the
+workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-prefer-type-only-auto-imports nil
+  "Prefer to put the `type` keyword before auto-generated imports,
+when they are used only in a type checking context."
+  :type 'boolean
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-javascript-preferences-quote-style "auto" nil
+  :type '(choice
+          (const "auto")
+          (const "single")
+          (const "double"))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-preferences-quote-style "auto" nil
+  :type '(choice
+          (const "auto")
+          (const "single")
+          (const "double"))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-preferences-import-module-specifier "auto"
+  "Preferred path style for auto imports."
+  :type '(choice
+          (const "auto")
+          (const "relative")
+          (const "non-relative"))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-preferences-import-module-specifier "auto"
+  "Infer the shortest path type."
+  :type '(choice
+          (const "auto")
+          (const "relative")
+          (const "non-relative"))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-preferences-import-module-specifier-ending "auto"
+  "Preferred path ending for auto imports.
+Requires using TypeScript 4.5+ in the workspace."
+  :type '(choice
+          (const "auto")
+          (const "minimal")
+          (const "index")
+          (const "js"))
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-typescript-preferences-import-module-specifier-ending "auto"
+  "Preferred path ending for auto imports.
+Requires using TypeScript 4.5+ in the workspace."
+  :type '(choice
+          (const "auto")
+          (const "minimal")
+          (const "index")
+          (const "js"))
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-javascript-preferences-rename-shorthand-properties t
+  "Enable/disable introducing aliases for object shorthand
+properties during renames. Requires using TypeScript 3.4 or newer
+in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-preferences-rename-shorthand-properties t
+  "Enable/disable introducing aliases for object shorthand
+properties during renames. Requires using TypeScript 3.4 or newer
+in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-update-imports-on-file-move-enabled "prompt"
+  "Enable/disable automatic updating of import paths when you
+rename or move a file in VS Code. Requires using TypeScript 2.9
+or newer in the workspace."
+  :type '(choice
+          (const "prompt")
+          (const "always")
+          (const "never"))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-update-imports-on-file-move-enabled "prompt"
+  "Prompt on each rename."
+  :type '(choice
+          (const "prompt")
+          (const "always")
+          (const "never"))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-auto-closing-tags t
+  "Enable/disable automatic closing of JSX tags. Requires using
+TypeScript 3.0 or newer in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-auto-closing-tags t
+  "Enable/disable automatic closing of JSX tags. Requires using
+TypeScript 3.0 or newer in the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-suggest-enabled t
+  "Enable/disable autocomplete suggestions."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-suggest-enabled t
+  "Enable/disable autocomplete suggestions."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-typescript-surveys-enabled t
+  "Enable/disable occasional surveys that help us improve VS
+Code's JavaScript and TypeScript support."
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-javascript-display-enum-member-value-hints nil
+  "Show inlay hints for enum member values."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-javascript-display-return-type-hints nil
+  "Show inlay hints for function return types."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-javascript-display-parameter-type-hints nil
+  "Show inlay hints for function parameters."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-javascript-display-parameter-name-hints "none"
+  "Level of hinting for parameter types."
+  :type '(choice (const :tag "none" "none")
+                 (const :tag "literals" "literals")
+                 (const :tag "all" "all"))
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-javascript-display-parameter-name-hints-when-argument-matches-name nil
+  "Show inlay hints for function parameters even when argument matches
+name (e.g. `data' variable passed as `data' parameter)."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-javascript-display-property-declaration-type-hints nil
+  "Show inlay hints for property declaration types."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-javascript-display-variable-type-hints nil
+  "Show inlay hints for variable types."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-javascript-completions-complete-function-calls t
+  "Complete function calls."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-register-custom-settings
+ '(("javascript.autoClosingTags" lsp-javascript-auto-closing-tags t)
+   ("javascript.implicitProjectConfig.checkJs" lsp-javascript-implicit-project-config-check-js t)
+   ("javascript.implicitProjectConfig.experimentalDecorators" lsp-javascript-implicit-project-config-experimental-decorators t)
+   ("javascript.preferences.importModuleSpecifier" lsp-javascript-preferences-import-module-specifier)
+   ("javascript.preferences.importModuleSpecifierEnding" lsp-javascript-preferences-import-module-specifier-ending)
+   ("javascript.preferences.quoteStyle" lsp-javascript-preferences-quote-style)
+   ("javascript.preferences.renameShorthandProperties" lsp-javascript-preferences-rename-shorthand-properties t)
+   ("javascript.referencesCodeLens.enabled" lsp-javascript-references-code-lens-enabled t)
+   ("javascript.suggest.autoImports" lsp-javascript-suggest-auto-imports t)
+   ("javascript.suggest.completeFunctionCalls" lsp-javascript-suggest-complete-function-calls t)
+   ("javascript.suggest.completeJSDocs" lsp-javascript-suggest-complete-js-docs t)
+   ("javascript.suggest.enabled" lsp-javascript-suggest-enabled t)
+   ("javascript.suggest.names" lsp-javascript-suggest-names t)
+   ("javascript.suggest.paths" lsp-javascript-suggest-paths t)
+   ("javascript.suggestionActions.enabled" lsp-javascript-suggestion-actions-enabled t)
+   ("javascript.updateImportsOnFileMove.enabled" lsp-javascript-update-imports-on-file-move-enabled)
+   ("javascript.validate.enable" lsp-javascript-validate-enable t)
+   ("javascript.format.enable" lsp-javascript-format-enable t)
+   ("javascript.format.insertSpaceAfterCommaDelimiter" lsp-javascript-format-insert-space-after-comma-delimiter t)
+   ("javascript.format.insertSpaceAfterConstructor" lsp-javascript-format-insert-space-after-constructor t)
+   ("javascript.format.insertSpaceAfterFunctionKeywordForAnonymousFunctions" lsp-javascript-format-insert-space-after-function-keyword-for-anonymous-functions t)
+   ("javascript.format.insertSpaceAfterKeywordsInControlFlowStatements" lsp-javascript-format-insert-space-after-keywords-in-control-flow-statements t)
+   ("javascript.format.insertSpaceAfterOpeningAndBeforeClosingJsxExpressionBraces" lsp-javascript-format-insert-space-after-opening-and-before-closing-jsx-expression-braces t)
+   ("javascript.format.insertSpaceAfterOpeningAndBeforeClosingEmptyBraces" lsp-javascript-format-insert-space-after-opening-and-before-closing-empty-braces t)
+   ("javascript.format.insertSpaceAfterOpeningAndBeforeClosingNonemptyBraces" lsp-javascript-format-insert-space-after-opening-and-before-closing-nonempty-braces t)
+   ("javascript.format.insertSpaceAfterOpeningAndBeforeClosingNonemptyBrackets" lsp-javascript-format-insert-space-after-opening-and-before-closing-nonempty-brackets t)
+   ("javascript.format.insertSpaceAfterOpeningAndBeforeClosingNonemptyParenthesis" lsp-javascript-format-insert-space-after-opening-and-before-closing-nonempty-parenthesis t)
+   ("javascript.format.insertSpaceAfterOpeningAndBeforeClosingTemplateStringBraces" lsp-javascript-format-insert-space-after-opening-and-before-closing-template-string-braces t)
+   ("javascript.format.insertSpaceAfterSemicolonInForStatements" lsp-javascript-format-insert-space-after-semicolon-in-for-statements t)
+   ("javascript.format.insertSpaceBeforeAndAfterBinaryOperators" lsp-javascript-format-insert-space-before-and-after-binary-operators t)
+   ("javascript.format.insertSpaceBeforeFunctionParenthesis" lsp-javascript-format-insert-space-before-function-parenthesis t)
+   ("javascript.format.placeOpenBraceOnNewLineForControlBlocks" lsp-javascript-format-place-open-brace-on-new-line-for-control-blocks t)
+   ("javascript.format.placeOpenBraceOnNewLineForFunctions" lsp-javascript-format-place-open-brace-on-new-line-for-functions t)
+   ("typescript.autoClosingTags" lsp-typescript-auto-closing-tags t)
+   ("typescript.check.npmIsInstalled" lsp-typescript-check-npm-is-installed t)
+   ("typescript.disableAutomaticTypeAcquisition" lsp-typescript-disable-automatic-type-acquisition t)
+   ("typescript.implementationsCodeLens.enabled" lsp-typescript-implementations-code-lens-enabled t)
+   ("typescript.locale" lsp-typescript-locale)
+   ("typescript.npm" lsp-typescript-npm)
+   ("typescript.preferences.importModuleSpecifier" lsp-typescript-preferences-import-module-specifier)
+   ("typescript.preferences.preferTypeOnlyAutoImports" lsp-typescript-prefer-type-only-auto-imports t)
+   ("typescript.preferences.importModuleSpecifierEnding" lsp-typescript-preferences-import-module-specifier-ending)
+   ("typescript.preferences.quoteStyle" lsp-typescript-preferences-quote-style)
+   ("typescript.preferences.renameShorthandProperties" lsp-typescript-preferences-rename-shorthand-properties t)
+   ("typescript.referencesCodeLens.enabled" lsp-typescript-references-code-lens-enabled t)
+   ("typescript.reportStyleChecksAsWarnings" lsp-typescript-report-style-checks-as-warnings t)
+   ("typescript.suggest.autoImports" lsp-typescript-suggest-auto-imports t)
+   ("typescript.suggest.completeFunctionCalls" lsp-typescript-suggest-complete-function-calls t)
+   ("typescript.suggest.completeJSDocs" lsp-typescript-suggest-complete-js-docs t)
+   ("typescript.suggest.enabled" lsp-typescript-suggest-enabled t)
+   ("typescript.suggest.paths" lsp-typescript-suggest-paths t)
+   ("typescript.suggestionActions.enabled" lsp-typescript-suggestion-actions-enabled t)
+   ("typescript.surveys.enabled" lsp-typescript-surveys-enabled t)
+   ("typescript.tsc.autoDetect" lsp-typescript-tsc-auto-detect)
+   ("typescript.tsdk" lsp-typescript-tsdk)
+   ("typescript.tsserver.log" lsp-typescript-tsserver-log)
+   ("typescript.tsserver.pluginPaths" lsp-typescript-tsserver-plugin-paths)
+   ("typescript.tsserver.trace" lsp-typescript-tsserver-trace)
+   ("typescript.updateImportsOnFileMove.enabled" lsp-typescript-update-imports-on-file-move-enabled)
+   ("typescript.validate.enable" lsp-typescript-validate-enable t)
+   ("typescript.format.enable" lsp-typescript-format-enable t)
+   ("typescript.format.insertSpaceAfterCommaDelimiter" lsp-typescript-format-insert-space-after-comma-delimiter t)
+   ("typescript.format.insertSpaceAfterConstructor" lsp-typescript-format-insert-space-after-constructor t)
+   ("typescript.format.insertSpaceAfterFunctionKeywordForAnonymousFunctions" lsp-typescript-format-insert-space-after-function-keyword-for-anonymous-functions t)
+   ("typescript.format.insertSpaceAfterKeywordsInControlFlowStatements" lsp-typescript-format-insert-space-after-keywords-in-control-flow-statements t)
+   ("typescript.format.insertSpaceAfterOpeningAndBeforeClosingJsxExpressionBraces" lsp-typescript-format-insert-space-after-opening-and-before-closing-jsx-expression-braces t)
+   ("typescript.format.insertSpaceAfterOpeningAndBeforeClosingEmptyBraces" lsp-typescript-format-insert-space-after-opening-and-before-closing-empty-braces t)
+   ("typescript.format.insertSpaceAfterOpeningAndBeforeClosingNonemptyBraces" lsp-typescript-format-insert-space-after-opening-and-before-closing-nonempty-braces t)
+   ("typescript.format.insertSpaceAfterOpeningAndBeforeClosingNonemptyBrackets" lsp-typescript-format-insert-space-after-opening-and-before-closing-nonempty-brackets t)
+   ("typescript.format.insertSpaceAfterOpeningAndBeforeClosingNonemptyParenthesis" lsp-typescript-format-insert-space-after-opening-and-before-closing-nonempty-parenthesis t)
+   ("typescript.format.insertSpaceAfterOpeningAndBeforeClosingTemplateStringBraces" lsp-typescript-format-insert-space-after-opening-and-before-closing-template-string-braces t)
+   ("typescript.format.insertSpaceAfterSemicolonInForStatements" lsp-typescript-format-insert-space-after-semicolon-in-for-statements t)
+   ("typescript.format.insertSpaceAfterTypeAssertion" lsp-typescript-format-insert-space-after-type-assertion t)
+   ("typescript.format.insertSpaceBeforeAndAfterBinaryOperators" lsp-typescript-format-insert-space-before-and-after-binary-operators t)
+   ("typescript.format.insertSpaceBeforeFunctionParenthesis" lsp-typescript-format-insert-space-before-function-parenthesis t)
+   ("typescript.format.placeOpenBraceOnNewLineForControlBlocks" lsp-typescript-format-place-open-brace-on-new-line-for-control-blocks t)
+   ("typescript.format.placeOpenBraceOnNewLineForFunctions" lsp-typescript-format-place-open-brace-on-new-line-for-functions t)
+   ("typescript.inlayHints.includeInlayEnumMemberValueHints" lsp-javascript-display-enum-member-value-hints t)
+   ("typescript.inlayHints.includeInlayFunctionLikeReturnTypeHints" lsp-javascript-display-return-type-hints t)
+   ("typescript.inlayHints.includeInlayFunctionParameterTypeHints" lsp-javascript-display-parameter-type-hints t)
+   ("typescript.inlayHints.includeInlayParameterNameHints" lsp-javascript-display-parameter-name-hints nil)
+   ("typescript.inlayHints.includeInlayParameterNameHintsWhenArgumentMatchesName" lsp-javascript-display-parameter-name-hints-when-argument-matches-name t)
+   ("typescript.inlayHints.includeInlayPropertyDeclarationTypeHints" lsp-javascript-display-property-declaration-type-hints t)
+   ("typescript.inlayHints.includeInlayVariableTypeHints" lsp-javascript-display-variable-type-hints t)
+   ("javascript.inlayHints.includeInlayEnumMemberValueHints" lsp-javascript-display-enum-member-value-hints t)
+   ("javascript.inlayHints.includeInlayFunctionLikeReturnTypeHints" lsp-javascript-display-return-type-hints t)
+   ("javascript.inlayHints.includeInlayFunctionParameterTypeHints" lsp-javascript-display-parameter-type-hints t)
+   ("javascript.inlayHints.includeInlayParameterNameHints" lsp-javascript-display-parameter-name-hints nil)
+   ("javascript.inlayHints.includeInlayParameterNameHintsWhenArgumentMatchesName" lsp-javascript-display-parameter-name-hints-when-argument-matches-name t)
+   ("javascript.inlayHints.includeInlayPropertyDeclarationTypeHints" lsp-javascript-display-property-declaration-type-hints t)
+   ("javascript.inlayHints.includeInlayVariableTypeHints" lsp-javascript-display-variable-type-hints t)
+   ("completions.completeFunctionCalls" lsp-javascript-completions-complete-function-calls t)))
+
+(lsp-dependency 'typescript-language-server
+                '(:system lsp-clients-typescript-tls-path)
+                '(:npm :package "typescript-language-server"
+                       :path "typescript-language-server"))
+
+(lsp-dependency 'typescript
+                '(:system "tsserver")
+                '(:npm :package "typescript"
+                       :path "tsserver"))
+
+(defun lsp-javascript--rename (_workspace args)
+  (let ((path (lsp--uri-to-path (lsp-get (lsp-get args :textDocument) :uri))))
+    (if (f-exists? path)
+        (with-current-buffer (find-file path)
+          (goto-char (lsp--position-to-point
+                      (lsp-get args :position))))
+      (error "There is no file %s" path)))
+  (call-interactively #'lsp-rename)
+  nil)
+
+(defun lsp-javascript-rename-file ()
+  "Rename current file and all its references in other files."
+  (interactive)
+  (let* ((name (buffer-name))
+         (old (buffer-file-name))
+         (basename (file-name-nondirectory old)))
+    (unless (and old (file-exists-p old))
+      (error "Buffer '%s' is not visiting a file." name))
+    (let ((new (read-file-name "New name: " (file-name-directory old) basename nil basename)))
+      (when (get-file-buffer new)
+        (error "A buffer named '%s' already exists." new))
+      (when (file-exists-p new)
+        (error "A file named '%s' already exists." new))
+      (lsp--send-execute-command
+       "_typescript.applyRenameFile"
+       (vector (list :sourceUri (lsp--buffer-uri)
+                     :targetUri (lsp--path-to-uri new))))
+      (mkdir (file-name-directory new) t)
+      (rename-file old new)
+      (rename-buffer new)
+      (set-visited-file-name new)
+      (set-buffer-modified-p nil)
+      (lsp-disconnect)
+      (setq-local lsp-buffer-uri nil)
+      (lsp)
+      (lsp--info "Renamed '%s' to '%s'." name (file-name-nondirectory new)))))
+
+(lsp-make-interactive-code-action javascript-remove-unused-imports "source.removeUnusedImports")
+
+(defun lsp-javascript-initialized? ()
+  (when-let* ((workspace (lsp-find-workspace 'ts-ls (buffer-file-name))))
+    (eq 'initialized (lsp--workspace-status workspace))))
+
+(defun lsp-clients-typescript-require-resolve (&optional dir)
+  "Get the location of the typescript.
+Use Node.js require.
+The node_modules directory structure is suspect
+and should be trusted as little as possible.
+If you call require in Node.js,
+it should take into account the various hooks.
+For example, yarn PnP.
+
+Optional argument DIR specifies the working directory
+to run the command in."
+  (when-let*
+      ((default-directory (or dir default-directory))
+       (output
+        (string-trim-right
+         (shell-command-to-string
+          "node -e \"console.log(require.resolve('typescript'))\"")))
+       (not-empty (not (string-empty-p output))))
+    (f-parent output)))
+
+(defun lsp-clients-typescript-server-path ()
+  "Return the TS server path based on settings."
+  (if-let* ((use-project-ts lsp-clients-typescript-prefer-use-project-ts-server)
+            (server-path (lsp-clients-typescript-require-resolve))
+            (server-path-exist (f-exists? server-path)))
+      server-path
+    (if (memq system-type '(cygwin windows-nt ms-dos))
+        ;; The Windows environment does not recognize the top-level PATH returned by `lsp-package-path',
+        ;; so the real PATH is returned through Node.js.
+        (lsp-clients-typescript-require-resolve (f-parent (lsp-package-path 'typescript)))
+      (lsp-package-path 'typescript))))
+
+(lsp-defun lsp-clients-typescript-handle-interactive-actions ((&Command :arguments? [args]))
+  (pcase (lsp-get args :action)
+    ("Move to file"
+     (let* ((directory (file-name-directory (buffer-file-name)))
+            (target-file-name (expand-file-name (read-file-name "Destination file: " directory))))
+       (lsp-put args
+                :interactiveRefactorArguments
+                `((targetFile . ,target-file-name)))))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda ()
+                                                          `(,(lsp-package-path 'typescript-language-server)
+                                                            ,@lsp-clients-typescript-server-args)))
+                  :activation-fn 'lsp-typescript-javascript-tsx-jsx-activate-p
+                  :priority -2
+                  :completion-in-comments? t
+                  :initialization-options (lambda ()
+                                            (append
+                                             (when lsp-clients-typescript-disable-automatic-typing-acquisition
+                                               (list :disableAutomaticTypingAcquisition lsp-clients-typescript-disable-automatic-typing-acquisition))
+                                             (when lsp-clients-typescript-log-verbosity
+                                               (list :logVerbosity lsp-clients-typescript-log-verbosity))
+                                             (when lsp-clients-typescript-max-ts-server-memory
+                                               (list :maxTsServerMemory lsp-clients-typescript-max-ts-server-memory))
+                                             (when lsp-clients-typescript-npm-location
+                                               (list :npmLocation lsp-clients-typescript-npm-location))
+                                             (when lsp-clients-typescript-plugins
+                                               (list :plugins lsp-clients-typescript-plugins))
+                                             (when lsp-clients-typescript-preferences
+                                               (list :preferences lsp-clients-typescript-preferences))
+                                             (list :supportsMoveToFileCodeAction t)
+                                             `(:tsserver ( :path ,(lsp-clients-typescript-server-path)
+                                                           ,@lsp-clients-typescript-tsserver))))
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration
+                                       (ht-merge (lsp-configuration-section "javascript")
+                                                 (lsp-configuration-section "typescript")
+                                                 (lsp-configuration-section "completions")
+                                                 (lsp-configuration-section "diagnostics"))))
+                                    (let ((caps (lsp--workspace-server-capabilities workspace))
+                                          (format-enable (or lsp-javascript-format-enable lsp-typescript-format-enable)))
+                                      (lsp:set-server-capabilities-document-formatting-provider? caps format-enable)
+                                      (lsp:set-server-capabilities-document-range-formatting-provider? caps format-enable)))
+                  :action-filter 'lsp-clients-typescript-handle-interactive-actions
+                  :ignore-messages '("readFile .*? requested by TypeScript but content not available")
+                  :server-id 'ts-ls
+                  :request-handlers (ht ("_typescript.rename" #'lsp-javascript--rename))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure
+                                         'typescript
+                                         (-partial #'lsp-package-ensure
+                                                   'typescript-language-server
+                                                   callback
+                                                   error-callback)
+                                         error-callback))))
+
+
+
+(defgroup lsp-flow nil
+  "LSP support for the Flow Javascript type checker."
+  :group 'lsp-mode
+  :link '(url-link "https://flow.org"))
+
+(defcustom lsp-clients-flow-server "flow"
+  "The Flow executable to use.
+Leave as just the executable name to use the default behavior of
+finding the executable with variable `exec-path'."
+  :group 'lsp-flow
+  :risky t
+  :type 'file)
+
+(defcustom lsp-clients-flow-server-args '("lsp")
+  "Extra arguments for starting the Flow language server."
+  :group 'lsp-flow
+  :risky t
+  :type '(repeat string))
+
+(defun lsp-clients-flow-tag-file-present-p (file-name)
+  "Check if the '// @flow' or `/* @flow */' tag is present in
+the contents of FILE-NAME."
+  (if-let* ((buffer (find-buffer-visiting file-name)))
+      (with-current-buffer buffer
+        (lsp-clients-flow-tag-string-present-p))
+    (with-temp-buffer
+      (insert-file-contents file-name)
+      (lsp-clients-flow-tag-string-present-p))))
+
+(defun lsp-clients-flow-tag-string-present-p ()
+  "Helper for `lsp-clients-flow-tag-file-present-p' that works
+with the file contents."
+  (save-excursion
+    (goto-char (point-min))
+    (let (stop found)
+      (while (not stop)
+        (unless (re-search-forward "[^\n[:space:]]" nil t)
+          (setq stop t))
+        (if (= (point) (point-min)) (setq stop t) (backward-char))
+        (cond ((or (looking-at-p "//+[ ]*@flow")
+                   (looking-at-p "/\\**[ ]*@flow")
+                   (looking-at-p "[ ]*\\*[ ]*@flow"))
+               (setq found t) (setq stop t))
+              ((or (looking-at-p "//") (looking-at-p "*"))
+               (forward-line))
+              ((looking-at-p "/\\*")
+               (save-excursion
+                 (unless (re-search-forward "*/" nil t) (setq stop t)))
+               (forward-line))
+              (t (setq stop t))))
+      found)))
+
+(defun lsp-clients-flow-project-p (file-name)
+  "Check if FILE-NAME is part of a Flow project, that is, if
+there is a .flowconfig file in the folder hierarchy."
+  (locate-dominating-file file-name ".flowconfig"))
+
+(defun lsp-clients-flow-activate-p (file-name _mode)
+  "Check if the Flow language server should be enabled for a
+particular FILE-NAME and MODE."
+  (and (derived-mode-p 'js-mode 'web-mode 'js2-mode 'flow-js2-mode 'rjsx-mode)
+       (not (derived-mode-p 'json-mode))
+       (or (lsp-clients-flow-project-p file-name)
+           (lsp-clients-flow-tag-file-present-p file-name))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection
+                  (lsp-stdio-connection (lambda ()
+                                          (cons lsp-clients-flow-server
+                                                lsp-clients-flow-server-args)))
+                  :priority -1
+                  :activation-fn 'lsp-clients-flow-activate-p
+                  :server-id 'flow-ls))
+
+
+
+(defgroup lsp-deno nil
+  "LSP support for the Deno language server.
+
+Deno can be installed via `lsp-install-server' or manually:
+- Shell: curl -fsSL https://deno.land/install.sh | sh
+- Homebrew: brew install deno
+
+Note: npm installation is not recommended due to performance degradation.
+See URL `https://docs.deno.com/runtime/getting_started/installation/'."
+  :group 'lsp-mode
+  :link '(url-link "https://deno.land/"))
+
+(defcustom lsp-clients-deno-server "deno"
+  "The Deno executable to use.
+Leave as just the executable name to use the default behavior of
+finding the executable with variable `exec-path'."
+  :group 'lsp-deno
+  :risky t
+  :type 'file
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clients-deno-server-args '("lsp")
+  "Extra arguments for starting the Deno language server."
+  :group 'lsp-deno
+  :risky t
+  :type '(repeat string)
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clients-deno-enable-lint t
+  "Controls if linting information will be provided by the Deno Language Server."
+  :group 'lsp-deno
+  :risky t
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clients-deno-enable-code-lens-references t
+  "Enables or disables the display of code lens information."
+  :group 'lsp-deno
+  :risky t
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clients-deno-enable-code-lens-references-all-functions t
+  "Enables or disables the display of code lens information for all functions.
+Setting this variable to `non-nil' implicitly enables
+`lsp-clients-deno-enable-code-lens-references'."
+  :group 'lsp-deno
+  :risky t
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clients-deno-enable-code-lens-implementations t
+  "Enables or disables the display of code lens information for implementations."
+  :group 'lsp-deno
+  :risky t
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clients-deno-config nil
+  "The file path to a tsconfig.json file.
+The path can be either be relative to the workspace, or an
+absolute path.
+
+Examples: `./tsconfig.json',
+`/path/to/tsconfig.json', `C:\\path\\to\\tsconfig.json'"
+  :group 'lsp-deno
+  :risky t
+  :type 'file
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clients-deno-import-map nil
+  "The file path to an import map.
+Import maps provide a way to relocate modules based on their
+specifiers.  The path can either be relative to the workspace, or
+an absolute path.
+
+Examples: `./import-map.json',
+`/path/to/import-map.json', `C:\\path\\to\\import-map.json'."
+  :group 'lsp-deno
+  :risky t
+  :type 'file
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clients-deno-enable-unstable nil
+  "Controls if code will be type checked with Deno's unstable APIs."
+  :group 'lsp-deno
+  :risky t
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defun lsp-clients-deno--make-init-options ()
+  "Initialization options for the Deno language server."
+  `( :enable t
+     :config ,lsp-clients-deno-config
+     :importMap ,lsp-clients-deno-import-map
+     :lint ,(lsp-json-bool lsp-clients-deno-enable-lint)
+     :unstable ,(lsp-json-bool lsp-clients-deno-enable-unstable)
+     :codeLens ( :implementations ,(lsp-json-bool lsp-clients-deno-enable-code-lens-implementations)
+                 :references ,(lsp-json-bool (or lsp-clients-deno-enable-code-lens-references
+                                                 lsp-clients-deno-enable-code-lens-references-all-functions))
+                 :referencesAllFunctions ,(lsp-json-bool lsp-clients-deno-enable-code-lens-references-all-functions))))
+
+(lsp-dependency
+ 'deno
+ `(:system ,lsp-clients-deno-server)
+ '(:npm :package "deno" :path "deno"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection
+                  (lsp-stdio-connection (lambda ()
+                                          `(,(lsp-package-path 'deno)
+                                            ,@lsp-clients-deno-server-args)))
+                  :initialization-options #'lsp-clients-deno--make-init-options
+                  :priority -5
+                  :activation-fn #'lsp-typescript-javascript-tsx-jsx-activate-p
+                  :server-id 'deno-ls
+                  :notification-handlers (ht ("deno/didRefreshDenoConfigurationTree" #'ignore)
+                                             ("deno/didChangeDenoConfiguration" #'ignore)
+                                             ("deno/didUpgradeCheck" #'ignore))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure
+                                         'deno
+                                         callback
+                                         error-callback))))
+
+
+
+(defgroup lsp-tsgo nil
+  "LSP support for the TypeScript (Go native) language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/microsoft/typescript-go"))
+
+(defcustom lsp-clients-tsgo-path "tsgo"
+  "Path to the tsgo binary."
+  :group 'lsp-tsgo
+  :risky t
+  :type 'string)
+
+(defcustom lsp-clients-tsgo-args '("--lsp" "--stdio")
+  "Extra arguments for the tsgo language server."
+  :group 'lsp-tsgo
+  :risky t
+  :type '(repeat string))
+
+(lsp-dependency 'tsgo
+                '(:system lsp-clients-tsgo-path)
+                '(:npm :package "@typescript/native-preview"
+                       :path "tsgo"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda ()
+                                                          `(,(lsp-package-path 'tsgo)
+                                                            ,@lsp-clients-tsgo-args)))
+                  :activation-fn 'lsp-typescript-javascript-tsx-jsx-activate-p
+                  :priority -4
+                  :completion-in-comments? t
+                  :initialized-fn (lambda (_workspace))
+                  :server-id 'tsgo
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure
+                                         'tsgo
+                                         callback
+                                         error-callback))))
+
+
+
+(lsp-consistency-check lsp-javascript)
+
+(provide 'lsp-javascript)
+;;; lsp-javascript.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-jq.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-jq.el
new file mode 100644
index 0000000..0208b2b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-jq.el
@@ -0,0 +1,51 @@
+;;; lsp-jq.el --- lsp client for jq -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, jq
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; LSP client for jq language.
+;;
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-jq nil
+  "LSP support for Jq."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/wader/jq-lsp"))
+
+(defcustom lsp-clients-jq-server-executable '("jq-lsp")
+  "The jq language server executable to use."
+  :group 'lsp-jq
+  :risky t
+  :type '(repeat string))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda () lsp-clients-jq-server-executable))
+  :activation-fn (lsp-activate-on "jq")
+  :priority -1
+  :major-modes '(jq-mode jq-ts-mode)
+  :server-id 'jq-lsp))
+
+(lsp-consistency-check lsp-jq)
+
+(provide 'lsp-jq)
+;;; lsp-jq.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-json.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-json.el
new file mode 100644
index 0000000..1543a2c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-json.el
@@ -0,0 +1,142 @@
+;;; lsp-json.el ---  vscode-json-languageserver integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Kien Nguyen
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: kien.n.quang at gmail.com
+;; Keywords: lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'ht)
+(require 'url)
+(require 'url-util)
+
+(defgroup lsp-json nil
+  "LSP support for JSON, using vscode's built-in language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/microsoft/vscode/tree/main/extensions/json-language-features/server")
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-json-schemas nil
+  "Associate schemas to JSON files in the current project example can be found
+here, https://github.com/emacs-lsp/lsp-mode/issues/3368#issuecomment-1049635155."
+  :type '(repeat alist)
+  :group 'lsp-json
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-http-proxy nil
+  "The URL of the proxy server to use when fetching schema."
+  :type 'string
+  :group 'lsp-json
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-http-proxyStrictSSL t
+  "The URL of the proxy server to use when fetching schema."
+  :type 'boolean
+  :group 'lsp-json
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-json-validate t
+  "Enable JSON validation."
+  :type 'boolean
+  :group 'lsp-json
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-register-custom-settings
+ '(("json.schemas" lsp-json-schemas)
+   ("json.validate.enable" lsp-json-validate)
+   ("http.proxy" lsp-http-proxy)
+   ("http.proxyStrictSSL" lsp-http-proxyStrictSSL)))
+
+(defvar lsp-json--extra-init-params
+  `( :provideFormatter t
+     :handledSchemaProtocols ["file" "http" "https"]))
+
+(defvar lsp-json--schema-associations
+  `( :/*.css-data.json ["https://raw.githubusercontent.com/Microsoft/vscode-css-languageservice/master/docs/customData.schema.json"]
+     :/package.json ["http://json.schemastore.org/package"]
+     :/*.html-data.json ["https://raw.githubusercontent.com/Microsoft/vscode-html-languageservice/master/docs/customData.schema.json"]
+     :/*.schema.json ["http://json-schema.org/draft-07/schema#"]
+     :/bower.json ["http://json.schemastore.org/bower"]
+     :/composer.json ["http://json.schemastore.org/composer"]
+     :/tsconfig.json ["http://json.schemastore.org/tsconfig"]
+     :/tsconfig.*.json ["http://json.schemastore.org/tsconfig"]
+     :/typings.json ["http://json.schemastore.org/typings"]
+     :/.bowerrc ["http://json.schemastore.org/bowerrc"]
+     :/.babelrc ["http://json.schemastore.org/babelrc"]
+     :/.babelrc.json ["http://json.schemastore.org/babelrc"]
+     :/babel.config.json ["http://json.schemastore.org/babelrc"]
+     :/jsconfig.json ["http://json.schemastore.org/jsconfig"]
+     :/jsconfig.*.json ["http://json.schemastore.org/jsconfig"]
+     :/project.json ["http://json.schemastore.org/project"]
+     :/omnisharp.json ["http://json.schemastore.org/omnisharp"]
+     :/.eslintrc.json ["http://json.schemastore.org/eslintrc"]
+     :/.eslintrc ["http://json.schemastore.org/eslintrc"])
+  "Default json schemas.")
+
+(defun lsp-json--get-content (_workspace uri callback)
+  "Get content from URI."
+  (ignore-errors
+    (url-retrieve uri
+                  (lambda (_status callback)
+                    (goto-char (point-min))
+                    (re-search-forward "\n\n" nil 'noerror)
+                    (funcall
+                     callback
+                     (decode-coding-string (buffer-substring (point) (point-max))
+                                           'utf-8-unix)))
+                  (list callback))))
+
+(lsp-dependency 'vscode-json-languageserver
+                '(:system "vscode-json-language-server")
+                ;; The binary shipped from microsoft/vscode
+                '(:system "vscode-json-languageserver")
+                '(:npm :package "vscode-langservers-extracted"
+                       :path "vscode-json-language-server"))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection
+  (lsp-stdio-connection
+   (lambda () (list (lsp-package-path 'vscode-json-languageserver) "--stdio")))
+  :activation-fn (lsp-activate-on "json" "jsonc")
+  :server-id 'json-ls
+  :priority 0
+  :multi-root t
+  :completion-in-comments? t
+  :initialization-options lsp-json--extra-init-params
+  :async-request-handlers (ht ("vscode/content" #'lsp-json--get-content))
+  :initialized-fn
+  (lambda (w)
+    (with-lsp-workspace w
+      (lsp--set-configuration
+       (ht-merge (lsp-configuration-section "json")
+                 (lsp-configuration-section "http")))
+      (lsp-notify "json/schemaAssociations" lsp-json--schema-associations)))
+  :download-server-fn
+  (lambda (_client callback error-callback _update?)
+    (lsp-package-ensure 'vscode-json-languageserver callback error-callback))))
+
+(lsp-consistency-check lsp-json)
+
+(provide 'lsp-json)
+;;; lsp-json.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-jsonnet.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-jsonnet.el
new file mode 100644
index 0000000..b23e008
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-jsonnet.el
@@ -0,0 +1,86 @@
+;;; lsp-jsonnet.el --- lsp client for jsonnet -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, jsonnet
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; LSP client for jsonnet language.
+;;
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-jsonnet nil
+  "LSP support for jsonnet."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/grafana/jsonnet-language-server"))
+
+(defcustom lsp-clients-jsonnet-server-executable '("jsonnet-language-server")
+  "The jsonnet language server executable to use."
+  :group 'lsp-jsonnet
+  :risky t
+  :type '(repeat string))
+
+(defcustom lsp-clients-jsonnet-server-download-url
+  (concat "https://github.com/grafana/jsonnet-language-server/releases/download/v0.16.0/"
+          (cond ((and (eq system-type 'gnu/linux)
+                      (string-match-p ".*x86_64.*" system-configuration))
+                 "jsonnet-language-server_0.16.0_linux_amd64")
+                ((and (eq system-type 'gnu/linux)
+                      (string-match-p ".*arm64.*" system-configuration))
+                 "jsonnet-language-server_0.16.0_linux_arm64")
+                ((and (eq system-type 'darwin)
+                      (string-match-p ".*arm.*" system-configuration))
+                 "jsonnet-language-server_0.16.0_darwin_arm64")
+                ((and (eq system-type 'darwin)
+                      (string-match-p ".*x86_64.*" system-configuration))
+                 "jsonnet-language-server_0.16.0_darwin_amd64")
+                ((eq system-type 'windows-nt)
+                 "jsonnet-language-server_0.16.0_windows_amd64.exe")))
+  "The jsonnet language server download url."
+  :group 'lsp-jsonnet
+  :type 'string)
+
+(lsp-dependency 'jsonnet-language-server
+                `(:system ,(cl-first lsp-clients-jsonnet-server-executable))
+                `(:download :url ,lsp-clients-jsonnet-server-download-url
+                            :store-path ,(f-join user-emacs-directory ".cache" "lsp"
+                                                 (if (eq system-type 'windows-nt)
+                                                     (concat (cl-first lsp-clients-jsonnet-server-executable) ".exe")
+                                                   (cl-first lsp-clients-jsonnet-server-executable)))
+                            :set-executable? t))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda ()
+                                          `(,(or (executable-find
+                                                  (cl-first lsp-clients-jsonnet-server-executable))
+                                                 (lsp-package-path 'jsonnet-language-server)
+                                                 (cl-first lsp-clients-jsonnet-server-executable)))))
+  :activation-fn (lsp-activate-on "jsonnet")
+  :priority -1
+  :major-modes '(jsonnet-mode)
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'jsonnet-language-server callback error-callback))
+  :server-id 'jsonnet-lsp))
+
+(lsp-consistency-check lsp-jsonnet)
+
+(provide 'lsp-jsonnet)
+;;; lsp-jsonnet.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-just.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-just.el
new file mode 100644
index 0000000..8c47371
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-just.el
@@ -0,0 +1,53 @@
+;;; lsp-just.el --- lsp-mode Just integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2025-2026 lsp-mode maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  Client for Just (https://github.com/terror/just-lsp)
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-just nil
+  "Settings for the Just Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/terror/just-lsp")
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-just-executable '("just-lsp")
+  "Command to run the Just language server."
+  :group 'lsp-just
+  :risky t
+  :type '(repeat string))
+
+(lsp-dependency 'just-language-server
+                 '(:system "just-lsp"))
+
+(lsp-register-client
+ (make-lsp-client :server-id 'just-lsp
+                  :new-connection (lsp-stdio-connection (lambda () lsp-just-executable))
+                  :major-modes '(just-mode
+                                 just-ts-mode)))
+
+(lsp-consistency-check lsp-just)
+
+(provide 'lsp-just)
+;;; lsp-just.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-kotlin.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-kotlin.el
new file mode 100644
index 0000000..6d0f17f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-kotlin.el
@@ -0,0 +1,352 @@
+;;; lsp-kotlin.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, kotlin
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Kotlin Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'cl-lib)
+(require 'dash)
+
+(defgroup lsp-kotlin nil
+  "LSP support for Kotlin, using KotlinLanguageServer."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/fwcd/KotlinLanguageServer"))
+
+(define-obsolete-variable-alias
+  'lsp-kotlin-language-server-path
+  'lsp-clients-kotlin-server-executable
+  "lsp-mode 6.4")
+
+(defcustom lsp-clients-kotlin-server-executable
+  (if (eq system-type 'windows-nt)
+      "kotlin-language-server.bat"
+    "kotlin-language-server")
+  "The kotlin-language-server executable to use.
+Leave as just the executable name to use the default behavior of finding the
+executable with `exec-path'."
+  :type 'string
+  :group 'lsp-kotlin)
+
+(defcustom lsp-kotlin-trace-server "off"
+  "Traces the communication between VSCode and the Kotlin language server."
+  :type '(choice (const "off")
+                 (const "messages")
+                 (const "verbose"))
+  :group 'lsp-kotlin
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-kotlin-compiler-jvm-target "1.8"
+  "Specifies the JVM target, e.g. \"1.6\" or \"1.8\"."
+  :type 'string
+  :group 'lsp-kotlin
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-kotlin-linting-debounce-time 250
+  "[DEBUG] Specifies the debounce time limit.
+Lower to increase responsiveness at the cost of possible stability issues."
+  :type 'number
+  :group 'lsp-kotlin
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-kotlin-completion-snippets-enabled t
+  "Specifies whether code completion should provide snippets (true) or
+plain-text items (false)."
+  :type 'boolean
+  :group 'lsp-kotlin
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-kotlin-debug-adapter-enabled t
+  "[Recommended] Specifies whether the debug adapter should be used.
+When enabled a debugger for Kotlin will be available."
+  :type 'boolean)
+
+(defcustom lsp-kotlin-debug-adapter-path ""
+  "Optionally a custom path to the debug adapter executable."
+  :type 'string
+  :group 'lsp-kotlin
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-kotlin-external-sources-use-kls-scheme t
+  "[Recommended] Specifies whether URIs inside JARs should be represented
+using the `kls'-scheme."
+  :type 'boolean
+  :group 'lsp-kotlin
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-kotlin-external-sources-auto-convert-to-kotlin t
+  "Specifies whether decompiled/external classes should be auto-converted
+to Kotlin."
+  :type 'boolean
+  :group 'lsp-kotlin
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-kotlin-server-download-url
+  "https://github.com/fwcd/kotlin-language-server/releases/latest/download/server.zip"
+  "The URL for the language server download."
+  :type 'string
+  :group 'lsp-kotlin
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kotlin-workspace-dir (expand-file-name (locate-user-emacs-file "workspace/"))
+  "LSP kotlin workspace directory."
+  :group 'lsp-kotlin
+  :risky t
+  :type 'directory)
+
+(defcustom lsp-kotlin-workspace-cache-dir (expand-file-name ".cache/" lsp-kotlin-workspace-dir)
+  "LSP kotlin workspace cache directory."
+  :group 'lsp-kotlin
+  :risky t
+  :type 'directory)
+
+;; cache in this case is the dependency cache. Given as an initialization option.
+(defcustom lsp-kotlin-ondisk-cache-path nil
+  "Path to the ondisk cache if used. If lsp-kotlin-ondisk-cache-enabled is t,
+but path is nil, then the project root is used as a default."
+  :type 'string
+  :group 'lsp-kotlin)
+
+(defcustom lsp-kotlin-ondisk-cache-enabled nil
+  "Specifies whether to enable ondisk cache or not.  If nil, in-memory cache
+will be used."
+  :type 'boolean
+  :group 'lsp-kotlin)
+
+(defcustom lsp-kotlin-inlayhints-enable-typehints t
+  "Specifies whether to enable type hints or not.
+Requires lsp-inlay-hints-mode."
+  :type 'boolean
+  :group 'lsp-kotlin)
+
+(defcustom lsp-kotlin-inlayhints-enable-parameterhints t
+  "Specifies whether to enable parameter hints or not.
+Requires lsp-inlay-hints-mode."
+  :type 'boolean
+  :group 'lsp-kotlin)
+
+(defcustom lsp-kotlin-inlayhints-enable-chainedhints t
+  "Specifies whether to enable chained hints or not.
+Requires lsp-inlay-hints-mode."
+  :type 'boolean
+  :group 'lsp-kotlin)
+
+(lsp-register-custom-settings
+ '(("kotlin.externalSources.autoConvertToKotlin" lsp-kotlin-external-sources-auto-convert-to-kotlin t)
+   ("kotlin.externalSources.useKlsScheme" lsp-kotlin-external-sources-use-kls-scheme t)
+   ("kotlin.debugAdapter.path" lsp-kotlin-debug-adapter-path)
+   ("kotlin.debugAdapter.enabled" lsp-kotlin-debug-adapter-enabled t)
+   ("kotlin.completion.snippets.enabled" lsp-kotlin-completion-snippets-enabled t)
+   ("kotlin.linting.debounceTime" lsp-kotlin-linting-debounce-time)
+   ("kotlin.compiler.jvm.target" lsp-kotlin-compiler-jvm-target)
+   ("kotlin.trace.server" lsp-kotlin-trace-server)
+   ("kotlin.languageServer.path" lsp-clients-kotlin-server-executable)
+   ("kotlin.inlayHints.typeHints" lsp-kotlin-inlayhints-enable-typehints t)
+   ("kotlin.inlayHints.parameterHints" lsp-kotlin-inlayhints-enable-parameterhints t)
+   ("kotlin.inlayHints.chainedHints" lsp-kotlin-inlayhints-enable-chainedhints t)))
+
+(defvar lsp-kotlin--language-server-path
+  (f-join lsp-server-install-dir
+          "kotlin" "server" "bin" (if (eq system-type 'windows-nt)
+                                      "kotlin-language-server.bat"
+                                    "kotlin-language-server"))
+  "The path to store the language server at if necessary.")
+
+
+;; Debug and running
+(declare-function dap-debug "ext:dap-mode" (template) t)
+
+(defun lsp-kotlin-run-main (main-class project-root debug?)
+  (require 'dap-kotlin)
+  (dap-debug (list :type "kotlin"
+                   :request "launch"
+                   :mainClass main-class
+                   :projectRoot project-root
+                   :noDebug (not debug?))))
+
+(defun lsp-kotlin-lens-backend (_modified? callback)
+  (when lsp-kotlin-debug-adapter-enabled
+    (lsp-request-async
+     "kotlin/mainClass"
+     (list :uri (lsp--buffer-uri))
+     (lambda (mainInfo)
+       (let ((main-class (lsp-get mainInfo :mainClass))
+             (project-root (lsp-get mainInfo :projectRoot))
+             (range (lsp-get mainInfo :range)))
+         (funcall callback
+                  (list (lsp-make-code-lens :range range
+                                            :command
+                                            (lsp-make-command
+                                             :title "Run"
+                                             :command (lambda ()
+                                                        (interactive)
+                                                        (lsp-kotlin-run-main main-class project-root nil))))
+                        (lsp-make-code-lens :range range
+                                            :command
+                                            (lsp-make-command
+                                             :title "Debug"
+                                             :command (lambda ()
+                                                        (interactive)
+                                                        (lsp-kotlin-run-main main-class project-root t)))))
+                  lsp--cur-version)))
+     :mode 'tick)))
+
+(defvar lsp-lens-backends)
+(declare-function lsp-lens-refresh "lsp-lens" (buffer-modified? &optional buffer))
+
+(define-minor-mode lsp-kotlin-lens-mode
+  "Toggle run/debug overlays."
+  :group 'lsp-kotlin
+  :global nil
+  :init-value nil
+  :lighter nil
+  (cond
+   (lsp-kotlin-lens-mode
+    (require 'lsp-lens)
+    ;; set lens backends so they are available is lsp-lens-mode is activated
+    ;; backend does not support lenses, and block our other ones from showing. When backend support lenses again, we can use cl-pushnew to add it to lsp-lens-backends instead of overwriting
+    (setq-local lsp-lens-backends (list #'lsp-kotlin-lens-backend))
+    (lsp-lens-refresh t))
+   (t (setq-local lsp-lens-backends (delete #'lsp-kotlin-lens-backend lsp-lens-backends)))))
+
+
+;; Stolen from lsp-java:
+;; https://github.com/emacs-lsp/lsp-java/blob/a1aff851bcf4f397f2a968557d213db1fede0c8a/lsp-java.el#L1065
+(declare-function helm-make-source "ext:helm-source")
+(defvar lsp-kotlin--helm-result nil)
+(defun lsp-kotlin--completing-read-multiple (message items initial-selection)
+  (if (functionp 'helm)
+      (progn
+        (require 'helm-source)
+        (helm :sources (helm-make-source
+                        message 'helm-source-sync :candidates items
+                        :action '(("Identity" lambda (_)
+                                   (setq lsp-kotlin--helm-result (helm-marked-candidates)))))
+              :buffer "*lsp-kotlin select*"
+              :prompt message)
+        lsp-kotlin--helm-result)
+    (if (functionp 'ivy-read)
+        (let (result)
+          (ivy-read message (mapcar #'car items)
+                    :action (lambda (c) (setq result (list (cdr (assoc c items)))))
+                    :multi-action
+                    (lambda (candidates)
+                      (setq result (mapcar (lambda (c) (cdr (assoc c items))) candidates))))
+          result)
+      (let ((deps initial-selection) dep)
+        (while (setq dep (cl-rest (lsp--completing-read
+                                   (if deps
+                                       (format "%s (selected %s): " message (length deps))
+                                     (concat message ": "))
+                                   items
+                                   (-lambda ((name . id))
+                                     (if (-contains? deps id)
+                                         (concat name " ✓")
+                                       name)))))
+          (if (-contains? deps dep)
+              (setq deps (remove dep deps))
+            (cl-pushnew dep deps)))
+        deps))))
+
+(defun lsp-kotlin-implement-member ()
+  (interactive)
+  (lsp-request-async
+   "kotlin/overrideMember"
+   (list :textDocument (list :uri (lsp--buffer-uri))
+         :position (lsp--cur-position))
+   (lambda (member-options)
+     (-if-let* ((option-items (-map (lambda (x)
+                                      (list (lsp-get x :title)
+                                            (lsp-get (lsp-get (lsp-get x :edit)
+                                                              :changes)
+                                                     (intern (concat ":" (lsp--buffer-uri))))))
+                                    member-options))
+                (selected-members (lsp-kotlin--completing-read-multiple "Select overrides" option-items nil)))
+         (dolist (edit (-flatten selected-members))
+           (lsp--apply-text-edits edit))))))
+
+(defun lsp-kotlin--parse-uri (uri)
+  "Get the path for where we'll store the file, calculating it based on URI."
+  (or (save-match-data
+        (when (string-match "kls:file:///\\(.*\\)!/\\(.*\.\\(class\\|java\\|kt\\)\\)?.*" uri)
+          (let* ((jar-path (match-string 1 uri))
+                 (file-path (match-string 2 uri))
+                 (lib-name (string-join (last (split-string jar-path "/") 2) "."))
+                 (buffer-name (replace-regexp-in-string "/" "." file-path t t))
+                 (file-location (expand-file-name (concat lsp-kotlin-workspace-cache-dir "/" lib-name "/" buffer-name))))
+            file-location)))
+      (error "Unable to match %s" uri)))
+
+(defun lsp-kotlin--uri-handler (uri)
+  "Load a file corresponding to URI executing request to the kotlin server."
+  (let ((file-location (lsp-kotlin--parse-uri uri)))
+    (unless (file-readable-p file-location)
+      (lsp-kotlin--ensure-dir (file-name-directory file-location))
+      (with-lsp-workspace (lsp-find-workspace 'kotlin-ls nil)
+        (let ((content (lsp-send-request (lsp-make-request
+                                          "kotlin/jarClassContents"
+                                          (list :uri uri)))))
+          (with-temp-file file-location
+            (insert content)))))
+    file-location))
+
+(defun lsp-kotlin--ensure-dir (path)
+  "Ensure that directory PATH exists."
+  (unless (file-directory-p path)
+    (make-directory path t)))
+
+(lsp-dependency
+ 'kotlin-language-server
+ `(:system ,lsp-clients-kotlin-server-executable)
+ `(:download :url lsp-kotlin-server-download-url
+             :decompress :zip
+             :store-path ,(f-join lsp-server-install-dir "kotlin" "kotlin-language-server.zip")
+             :binary-path lsp-clients-kotlin-server-executable
+             :set-executable? t))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda ()
+                                          `(,(or (when (f-exists? lsp-kotlin--language-server-path)
+                                                   lsp-kotlin--language-server-path)
+                                                 (or (executable-find lsp-clients-kotlin-server-executable)
+                                                     (lsp-package-path 'kotlin-language-server))
+                                                 "kotlin-language-server"))))
+  :major-modes '(kotlin-mode kotlin-ts-mode)
+  :priority -1
+  :server-id 'kotlin-ls
+  :uri-handlers (lsp-ht ("kls" #'lsp-kotlin--uri-handler))
+  :initialized-fn (lambda (workspace)
+                    (with-lsp-workspace workspace
+                      (lsp--set-configuration (lsp-configuration-section "kotlin"))))
+  :initialization-options (lambda ()
+                            (when lsp-kotlin-ondisk-cache-enabled
+                              (list :storagePath (or lsp-kotlin-ondisk-cache-path
+                                                     (lsp-workspace-root)))))
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'kotlin-language-server callback error-callback))))
+
+(lsp-consistency-check lsp-kotlin)
+
+(provide 'lsp-kotlin)
+;;; lsp-kotlin.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-kubernetes-helm.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-kubernetes-helm.el
new file mode 100644
index 0000000..ada6091
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-kubernetes-helm.el
@@ -0,0 +1,336 @@
+;;; lsp-kubernetes-helm.el --- LSP YAML server integration        -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024 Aaron Gonzales
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; Author: Aaron Gonzales <aarongonzales1@gmail.com>
+;; Keywords: lsp, kubernetes, helm, yaml
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'dash)
+
+(defgroup lsp-kubernetes-helm nil
+  "LSP support for YAML, using Helm Language Server (helm-ls)."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/mrjosh/helm-ls")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defconst lsp-kubernetes-helm--lsp-configuration-section-name "helm-ls"
+  "Key used to grab the lsp configuration section for helm-ls.")
+
+(defcustom lsp-kubernetes-helm-ls-server-path "helm_ls"
+  "Path to the Helm Language Server binary."
+  :group 'lsp-kubernetes-helm
+  :risky t
+  :type 'file)
+
+(defcustom lsp-kubernetes-helm-ls-log-level "info"
+  "Options for the log level of the Helm Language Server."
+  :group 'lsp-kubernetes-helm
+  :type '(choice
+           (const "trace")
+           (const "debug")
+           (const "info")
+           (const "warning")
+           (const "error")
+           (const "fatal")
+           (const "panic"))
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-ls-main-values-file-path "values.yaml"
+  "Path to main values file for Helm Chart."
+  :group 'lsp-kubernetes-helm
+  :type 'file
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-overlay-values-file-path "values.lint.yaml"
+  "Path to values file that may be merged with main values files for Helm Chart."
+  :group 'lsp-kubernetes-helm
+  :type 'file
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-additional-values-files-pattern "values*.yaml"
+  "Pattern for additional values files, which will be shown for completion and hover."
+  :group 'lsp-kubernetes-helm
+  :type 'string
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-server-path "yaml-language-server"
+  "Path to the Yaml Language Server binary that supports the Helm Language Server."
+  :group 'lsp-kubernetes-helm
+  :link '(url-link :tag "Yaml Language Server"
+                   "https://github.com/redhat-developer/yaml-language-server")
+  :risky t
+  :type 'file)
+
+(defcustom lsp-kubernetes-helm-yaml-ls-enable t
+  "Enable/disable default YAML Language Server."
+  :group 'lsp-kubernetes-helm
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-enable-for-globs "*.{yaml,yml}"
+  "Enable/disable default YAML Language Server."
+  :group 'lsp-kubernetes-helm
+  :type 'string
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-diagnostics-limit 25
+  "Limit the amount of yaml diagnostics to return.
+Should typically be set to a low number when editing helm files."
+  :group 'lsp-kubernetes-helm
+  :type 'number
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-schemas '((https://raw.githubusercontent.com/yannh/kubernetes-json-schema/master/v1.30.3-standalone-strict/all.json
+                                                   . ["*.y*"])
+                                                  (kubernetes . [""]))
+  "List used by yaml language server to match schemas to globs.
+This list is prioritized over the schema store schemas. Recommended to set
+kubernetes to an empty string and at the end of the list to override the
+default provided in yaml-language-server."
+  :group 'lsp-kubernetes-helm
+  :type '(alist :key-type (symbol :tag "schema") :value-type (lsp-repeatable-vector :tag "files (glob)"))
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-format-enable t
+  "Enable/disable default YAML formatter."
+  :group 'lsp-kubernetes-helm
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-single-quote nil
+  "Use single quote instead of double quotes."
+  :group 'lsp-kubernetes-helm
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-bracket-spacing t
+  "Print spaces between brackets in objects."
+  :group 'lsp-kubernetes-helm
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-prose-wrap "preserve"
+  "Options for prose-wrap.
+Always: wrap prose if it exceeds the print width.
+Never: never wrap the prose.
+Preserve: wrap prose as-is."
+  :group 'lsp-kubernetes-helm
+  :type '(choice
+          (const "always")
+          (const "never")
+          (const "preserve"))
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-print-width 80
+  "Specify the line length that the printer will wrap on."
+  :group 'lsp-kubernetes-helm
+  :type 'number
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-validate t
+  "Enable/disable validation feature."
+  :group 'lsp-kubernetes-helm
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-hover t
+  "Enable/disable hover feature."
+  :group 'lsp-kubernetes-helm
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-completion t
+  "Enable/disable completion feature."
+  :group 'lsp-kubernetes-helm
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-schema-store-extensions '(((name . "Kubernetes v1.30.3")
+                                                                   (description . "Kubernetes v1.30.3 manifest schema definition")
+                                                                   (url . "https://raw.githubusercontent.com/yannh/kubernetes-json-schema/master/v1.30.3-standalone-strict/all.json")))
+  "Schemas defined by user schemas to files in a glob pattern.
+Used by Yaml Language Server to determine which schema to use for which types of files."
+  :group 'lsp-kubernetes-helm
+  :type '(list (list (alist
+                       :key-type (choice
+                                   (const :tag "Name" name)
+                                   (const :tag "Description" description)
+                                   (const :tag "URL" url))
+                       :value-type string)))
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-schema-store-enable nil
+  "Enable/disable JSON Schema store.  When set to true, available YAML \
+schemas will be automatically pulled from
+`lsp-kubernetes-helm-yaml-ls-schema-store-uri'."
+  :group 'lsp-kubernetes-helm
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-schema-store-uri "https://www.schemastore.org/api/json/catalog.json"
+  "URL of schema store catalog to use."
+  :group 'lsp-kubernetes-helm
+  :type 'string
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-schema-store-local-db
+  (expand-file-name
+    (locate-user-emacs-file
+      (f-join ".cache" "lsp" "lsp-kubernetes-helm-schemas.json")))
+  "Cached database of schema store."
+  :group 'lsp-kubernetes-helm
+  :type 'file
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-custom-tags nil
+  "Custom tags for the parser to use."
+  :group 'lsp-kubernetes-helm
+  :type '(lsp-repeatable-vector string)
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-yaml-ls-max-items-computed 5000
+  "The maximum number of outline symbols and folding regions computed.
+Limited for performance reasons."
+  :group 'lsp-kubernetes-helm
+  :type 'number
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-kubernetes-helm-server-arguments '("serve" "--stdio")
+  "Command to start helm-ls.  Minimally needs serve otherwise the server won't start properly."
+  :type '(repeat string)
+  :group 'lsp-kubernetes-helm
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defvar lsp-kubernetes-helm-yaml-ls--schema-store nil
+  "A list of schemas provided by schema store uri.")
+
+(defun lsp-kubernetes-helm-download-or-refresh-schema-store-db (&optional force-download)
+  "Download remote schema store at `lsp-yaml-schema-store-uri' into local cache.
+Set FORCE-DOWNLOAD to non-nil to force re-download the database.
+FORCE-DOWNLOADING is set to t by default"
+  (interactive "P")
+  (let ((local-db-directory (file-name-directory lsp-kubernetes-helm-yaml-ls-schema-store-local-db))
+         (force-download (or force-download t)))
+    (when (not (file-exists-p lsp-kubernetes-helm-yaml-ls-schema-store-local-db))
+      (unless (file-directory-p local-db-directory)
+        (mkdir local-db-directory t))
+      (url-copy-file lsp-kubernetes-helm-yaml-ls-schema-store-uri lsp-kubernetes-helm-yaml-ls-schema-store-local-db force-download))))
+
+(defun lsp-kubernetes-helm--get-available-schemas ()
+  "Get list of supported schemas."
+  (when (and lsp-kubernetes-helm-yaml-ls-schema-store-enable
+          (not lsp-kubernetes-helm-yaml-ls--schema-store))
+    (lsp-kubernetes-helm-download-or-refresh-schema-store-db nil)
+    (setq lsp-kubernetes-helm-yaml-ls--schema-store
+          (alist-get 'schemas (json-read-file lsp-kubernetes-helm-yaml-ls-schema-store-local-db))))
+  (seq-concatenate 'list lsp-kubernetes-helm-yaml-ls-schema-store-extensions lsp-kubernetes-helm-yaml-ls--schema-store))
+
+(defun lsp-kubernetes-helm-set-buffer-schema (schema-uri-string)
+  "Set yaml schema for the current buffer to SCHEMA-URI-STRING.
+Remove buffer from all other schema associations."
+  (interactive "MURI: ")
+  (let* ((schema-uri (intern schema-uri-string))
+          (buffer-file-path (file-relative-name
+                            (lsp--uri-to-path (lsp--buffer-uri))
+                            (lsp-workspace-root (lsp--buffer-uri))))
+          ;; yaml language server can do partial path matching
+          (glob (concat "/" buffer-file-path))
+          (current-config (assoc schema-uri lsp-kubernetes-helm-yaml-ls-schemas))
+          (current-patterns (and current-config (cdr current-config))))
+    (if current-config
+      (or (member glob (append current-patterns nil))
+        (setq lsp-kubernetes-helm-yaml-ls-schemas
+          (cl-acons schema-uri
+            (vconcat (vector glob) current-patterns)
+            (assq-delete-all schema-uri (mapcar (lambda (x) (lsp-kubernetes-helm--remove-glob-from-all-schemas x glob)) lsp-kubernetes-helm-yaml-ls-schemas)))))
+      (setq lsp-kubernetes-helm-yaml-ls-schemas
+        (cl-acons schema-uri (vector glob) (mapcar (lambda (x) (lsp-kubernetes-helm--remove-glob-from-all-schemas x glob)) lsp-kubernetes-helm-yaml-ls-schemas))))
+    (lsp--set-configuration (lsp-configuration-section lsp-kubernetes-helm--lsp-configuration-section-name))))
+
+(defun lsp-kubernetes-helm-select-buffer-schema ()
+  "Select schema for the current buffer based on the list of supported schemas."
+  (interactive)
+  (let* ((schema (lsp--completing-read "Select buffer schema: "
+                                       (lsp-kubernetes-helm--get-available-schemas)
+                                       (lambda (schema)
+                                         (format "%s: %s" (alist-get 'name schema)(alist-get 'description schema)))
+                                       nil t))
+         (uri (alist-get 'url schema)))
+    (lsp-kubernetes-helm-set-buffer-schema uri)))
+
+(defun lsp-kubernetes-helm--remove-glob-from-all-schemas (schemas glob)
+  "Removes GLOB from all keys in SCHEMAS."
+  (let ((patterns (cdr schemas)))
+    (cons (car schemas)
+      (vconcat (-filter (lambda (p)
+                          (not (equal p glob)))
+                 (append patterns nil)) nil))))
+
+(lsp-register-custom-settings
+  '(("helm-ls.logLevel" lsp-kubernetes-helm-ls-log-level)
+     ("helm-ls.valuesFiles.mainValuesFile" lsp-kubernetes-helm-ls-main-values-file-path)
+     ("helm-ls.valuesFiles.lintOverlayValuesFile" lsp-kubernetes-helm-overlay-values-file-path)
+     ("helm-ls.valuesFiles.additionalValuesFilesGlobPattern" lsp-kubernetes-helm-additional-values-files-pattern)
+     ("helm-ls.yamlls.enabled" lsp-kubernetes-helm-yaml-ls-enable t)
+     ("helm-ls.yamlls.enabledForFilesGlob" lsp-kubernetes-helm-yaml-ls-enable-for-globs)
+     ("helm-ls.yamlls.diagnosticsLimit" lsp-kubernetes-helm-yaml-ls-diagnostics-limit)
+     ("helm-ls.yamlls.path" lsp-kubernetes-helm-yaml-ls-server-path)
+     ("helm-ls.yamlls.config.format.enable" lsp-kubernetes-helm-yaml-ls-format-enable t)
+     ("helm-ls.yamlls.config.format.singleQuote" lsp-kubernetes-helm-yaml-ls-single-quote t)
+     ("helm-ls.yamlls.config.format.bracketSpacing" lsp-kubernetes-helm-yaml-ls-bracket-spacing)
+     ("helm-ls.yamlls.config.format.proseWrap" lsp-kubernetes-helm-yaml-ls-prose-wrap)
+     ("helm-ls.yamlls.config.format.printWidth" lsp-kubernetes-helm-yaml-ls-print-width)
+     ("helm-ls.yamlls.config.validate" lsp-kubernetes-helm-yaml-ls-validate t)
+     ("helm-ls.yamlls.config.hover" lsp-kubernetes-helm-yaml-ls-hover t)
+     ("helm-ls.yamlls.config.completion" lsp-kubernetes-helm-yaml-ls-completion t)
+     ("helm-ls.yamlls.config.schemas" lsp-kubernetes-helm-yaml-ls-schemas)
+     ("helm-ls.yamlls.config.schemaStore.enable" lsp-kubernetes-helm-yaml-ls-schema-store-enable nil)
+     ("helm-ls.yamlls.config.schemaStore.url" lsp-kubernetes-helm-yaml-ls-schema-store-uri)
+     ("helm-ls.yamlls.config.customTags" lsp-kubernetes-helm-yaml-ls-custom-tags)
+     ("helm-ls.yamlls.config.maxItemsComputed" lsp-kubernetes-helm-yaml-ls-max-items-computed)))
+
+(lsp-dependency 'kubernetes-helm-language-server
+  `(:system ,lsp-kubernetes-helm-ls-server-path)
+  `(:system ,lsp-kubernetes-helm-yaml-ls-server-path)
+  `(:npm :package "yaml-language-server"
+     :path ,lsp-kubernetes-helm-yaml-ls-server-path))
+
+(lsp-register-client
+  (make-lsp-client :new-connection (lsp-stdio-connection
+                                     (lambda ()
+                                       `(,(or (executable-find lsp-kubernetes-helm-ls-server-path)
+                                            (lsp-package-path 'kubernetes-helm-language-server))
+                                          ,@lsp-kubernetes-helm-server-arguments)))
+    :activation-fn (lsp-activate-on "helm-ls")
+    :priority 0
+    :server-id 'helm-ls
+    :initialized-fn (lambda (workspace)
+                      (with-lsp-workspace workspace
+                        (lsp--set-configuration
+                          (lsp-configuration-section lsp-kubernetes-helm--lsp-configuration-section-name))))))
+
+(lsp-consistency-check lsp-kubernetes-helm)
+
+(provide 'lsp-kubernetes-helm)
+;;; lsp-kubernetes-helm.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-lens.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-lens.el
new file mode 100644
index 0000000..de0e43d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-lens.el
@@ -0,0 +1,456 @@
+;;; lsp-lens.el --- LSP lens -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;;  LSP lens
+;;
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-lens nil
+  "LSP support for lens"
+  :prefix "lsp-lens-"
+  :group 'lsp-mode
+  :tag "LSP Lens")
+
+(defcustom lsp-lens-debounce-interval 0.001
+  "Debounce interval for loading lenses."
+  :group 'lsp-lens
+  :type 'number)
+
+(defcustom lsp-lens-place-position 'end-of-line
+  "The position to place lens relative to returned lens position."
+  :group 'lsp-lens
+  :type '(choice (const above-line)
+                 (const end-of-line))
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defface lsp-lens-mouse-face
+  '((t :height 0.8 :inherit link))
+  "The face used for code lens overlays."
+  :group 'lsp-lens)
+
+(defface lsp-lens-face
+  '((t :inherit lsp-details-face))
+  "The face used for code lens overlays."
+  :group 'lsp-lens)
+
+(defvar-local lsp-lens--modified? nil)
+
+(defvar-local lsp-lens--overlays nil
+  "Current lenses.")
+
+(defvar-local lsp-lens--page nil
+  "Pair of points which holds the last window location the lenses were loaded.")
+
+(defvar-local lsp-lens--last-count nil
+  "The number of lenses the last time they were rendered.")
+
+(defvar lsp-lens-backends '(lsp-lens--backend)
+  "Backends providing lenses.")
+
+(defvar-local lsp-lens--refresh-timer nil
+  "Refresh timer for the lenses.")
+
+(defvar-local lsp-lens--data nil
+  "Pair of points which holds the last window location the lenses were loaded.")
+
+(defvar-local lsp-lens--backend-cache nil)
+
+(defun lsp-lens--text-width (from to)
+  "Measure the width of the text between FROM and TO.
+Results are meaningful only if FROM and TO are on the same line."
+  ;; `current-column' takes prettification into account
+  (- (save-excursion (goto-char to) (current-column))
+     (save-excursion (goto-char from) (current-column))))
+
+(defun lsp-lens--update (ov)
+  "Redraw quick-peek overlay OV."
+  (let* ((offset (lsp-lens--text-width (save-excursion
+                                         (beginning-of-visual-line)
+                                         (point))
+                                       (save-excursion
+                                         (beginning-of-line-text)
+                                         (point))))
+         (str (if (eq 'end-of-line lsp-lens-place-position)
+                  (overlay-get ov 'lsp--lens-contents)
+                (concat (make-string offset ?\s)
+                        (overlay-get ov 'lsp--lens-contents)))))
+    (save-excursion
+      (goto-char (overlay-start ov))
+      (if (eq 'end-of-line lsp-lens-place-position)
+          (overlay-put ov 'after-string (propertize (concat " " str) 'cursor t))
+        (overlay-put ov 'before-string (concat str "\n")))
+      (overlay-put ov 'lsp-original str))))
+
+(defun lsp-lens--overlay-ensure-at (pos)
+  "Find or create a lens for the line at POS."
+  (-doto (save-excursion
+           (goto-char pos)
+           (let ((eol (line-end-position)))
+             (if (eq 'end-of-line lsp-lens-place-position)
+                 (make-overlay eol eol nil t t)
+               (make-overlay (line-beginning-position) (1+ eol) nil t t))))
+    (overlay-put 'lsp-lens t)
+    (overlay-put 'lsp-lens-position pos)))
+
+(defun lsp-lens--show (str pos metadata)
+  "Show STR in an inline window at POS including METADATA."
+  (let ((ov (lsp-lens--overlay-ensure-at pos)))
+    (save-excursion
+      (goto-char pos)
+      (setf (overlay-get ov 'lsp--lens-contents) str)
+      (setf (overlay-get ov 'lsp--metadata) metadata)
+      (lsp-lens--update ov)
+      ov)))
+
+(defun lsp-lens--idle-function (&optional buffer)
+  "Create idle function for buffer BUFFER."
+  (when (and (or (not buffer) (eq (current-buffer) buffer))
+             (not (equal (cons (window-start) (window-end)) lsp-lens--page)))
+    (lsp-lens--schedule-refresh nil)))
+
+(defun lsp-lens--overlay-matches-pos (ov pos)
+  "Check if OV is a lens covering POS."
+  (and (overlay-get ov 'lsp-lens)
+       (overlay-start ov)
+       (<= (overlay-start ov) pos)
+       (< pos (overlay-end ov))))
+
+(defun lsp-lens--after-save ()
+  "Handler for `after-save-hook' for lens mode."
+  (lsp-lens--schedule-refresh t))
+
+(defun lsp-lens--schedule-refresh (&optional buffer-modified?)
+  "Call each of the backend.
+BUFFER-MODIFIED? determines whether the buffer was modified or
+not."
+  (-some-> lsp-lens--refresh-timer cancel-timer)
+
+  (setq lsp-lens--page (cons (window-start) (window-end)))
+  (setq lsp-lens--refresh-timer
+        (run-with-timer lsp-lens-debounce-interval
+                        nil
+                        #'lsp-lens-refresh
+                        (or lsp-lens--modified? buffer-modified?)
+                        (current-buffer))))
+
+(defun lsp-lens--schedule-refresh-modified ()
+  "Schedule a lens refresh due to a buffer-modification.
+See `lsp-lens--schedule-refresh' for details."
+  (lsp-lens--schedule-refresh t))
+
+(defun lsp-lens--keymap (command)
+  "Build the lens keymap for COMMAND."
+  (-doto (make-sparse-keymap)
+    (define-key [mouse-1] (lsp-lens--create-interactive-command command))))
+
+(defun lsp-lens--create-interactive-command (command?)
+  "Create an interactive COMMAND? for the lens.
+COMMAND? shall be an `&Command' (e.g. `&CodeLens' :command?) and
+mustn't be nil."
+  (if (functionp (lsp:command-command command?))
+      (lsp:command-command command?)
+    (lambda ()
+      (interactive)
+      (lsp--execute-command command?))))
+
+(defun lsp-lens--display (lenses)
+  "Show LENSES."
+  ;; rerender only if there are lenses which are not processed or if their count
+  ;; has changed(e. g. delete lens should trigger redisplay).
+  (let ((scroll-preserve-screen-position t))
+    (setq lsp-lens--modified? nil)
+    (when (or (-any? (-lambda ((&CodeLens :_processed processed))
+                       (not processed))
+                     lenses)
+              (eq (length lenses) lsp-lens--last-count)
+              (not lenses))
+      (setq lsp-lens--last-count (length lenses))
+      (mapc #'delete-overlay lsp-lens--overlays)
+      (setq lsp-lens--overlays
+            (->> lenses
+                 (-filter #'lsp:code-lens-command?)
+                 (--map (prog1 it (lsp-put it :_processed t)))
+                 (-group-by (-compose #'lsp:position-line #'lsp:range-start #'lsp:code-lens-range))
+                 (-map
+                  (-lambda ((_ . lenses))
+                    (let* ((sorted (-sort (-on #'< (-compose #'lsp:position-character
+                                                             #'lsp:range-start
+                                                             #'lsp:code-lens-range))
+                                          lenses))
+                           (data (-map
+                                  (-lambda ((lens &as &CodeLens
+                                                  :command? (command &as
+                                                                     &Command :title :_face face)))
+                                    (propertize
+                                     title
+                                     'face (or face 'lsp-lens-face)
+                                     'action (lsp-lens--create-interactive-command command)
+                                     'pointer 'hand
+                                     'mouse-face 'lsp-lens-mouse-face
+                                     'local-map (lsp-lens--keymap command)))
+                                  sorted)))
+                      (lsp-lens--show
+                       (s-join (propertize "|" 'face 'lsp-lens-face) data)
+                       (-> sorted cl-first lsp:code-lens-range lsp:range-start lsp--position-to-point)
+                       data)))))))))
+
+(defun lsp-lens-refresh (buffer-modified? &optional buffer)
+  "Refresh lenses using lenses backend.
+BUFFER-MODIFIED? determines whether the BUFFER is modified or not."
+  (let ((buffer (or buffer (current-buffer))))
+    (when (buffer-live-p buffer)
+      (with-current-buffer buffer
+        (dolist (backend lsp-lens-backends)
+          (funcall backend buffer-modified?
+                   (lambda (lenses version)
+                     (when (buffer-live-p buffer)
+                       (with-current-buffer buffer
+                         (lsp-lens--process backend lenses version))))))))))
+
+(defun lsp-lens--process (backend lenses version)
+  "Process LENSES originated from BACKEND.
+VERSION is the version of the file. The lenses has to be
+refreshed only when all backends have reported for the same
+version."
+  (setq lsp-lens--data (or lsp-lens--data (make-hash-table)))
+  (puthash backend (cons version (append lenses nil)) lsp-lens--data)
+
+  (-let [backend-data (->> lsp-lens--data ht-values (-filter #'cl-rest))]
+    (when (and
+           (= (length lsp-lens-backends) (ht-size lsp-lens--data))
+           (seq-every-p (-lambda ((version))
+                          (or (not version) (eq version lsp--cur-version)))
+                        backend-data))
+      ;; display the data only when the backends have reported data for the
+      ;; current version of the file
+      (lsp-lens--display (apply #'append (-map #'cl-rest backend-data)))))
+  version)
+
+(lsp-defun lsp--lens-backend-not-loaded? ((&CodeLens :range
+                                                     (&Range :start)
+                                                     :command?
+                                                     :_pending pending))
+  "Return t if LENS has to be loaded."
+  (let ((window (get-buffer-window (current-buffer))))
+    ;; (window-start/end) does not consider current window buffer if not passed manually
+    (and (< (window-start window) (lsp--position-to-point start) (window-end window))
+         (not command?)
+         (not pending))))
+
+(lsp-defun lsp--lens-backend-present? ((&CodeLens :range (&Range :start) :command?))
+  "Return t if LENS has to be loaded."
+  (or command?
+      (not (< (window-start) (lsp--position-to-point start) (window-end)))))
+
+(defun lsp-lens--backend-fetch-missing (lenses callback file-version)
+  "Fetch LENSES without command in for the current window.
+
+TICK is the buffer modified tick. If it does not match
+`buffer-modified-tick' at the time of receiving the updates the
+updates must be discarded..
+CALLBACK - the callback for the lenses.
+FILE-VERSION - the version of the file."
+  (seq-each
+   (lambda (it)
+     (with-lsp-workspace (lsp-get it :_workspace)
+       (lsp-put it :_pending t)
+       (lsp-put it :_workspace nil)
+       (lsp-request-async "codeLens/resolve" it
+                          (-lambda ((&CodeLens :command?))
+                            (lsp-put it :_pending nil)
+                            (lsp-put it :command command?)
+                            (when (seq-every-p #'lsp--lens-backend-present? lenses)
+                              (funcall callback lenses file-version)))
+                          :mode 'tick)))
+   (seq-filter #'lsp--lens-backend-not-loaded? lenses)))
+
+(defun lsp-lens--backend (modified? callback)
+  "Lenses backend using `textDocument/codeLens'.
+MODIFIED? - t when buffer is modified since the last invocation.
+CALLBACK - callback for the lenses."
+  (when (lsp--find-workspaces-for "textDocument/codeLens")
+    (if modified?
+        (progn
+          (setq lsp-lens--backend-cache nil)
+          (lsp-request-async "textDocument/codeLens"
+                             `(:textDocument (:uri ,(lsp--buffer-uri)))
+                             (lambda (lenses)
+                               (setq lsp-lens--backend-cache
+                                     (seq-mapcat
+                                      (-lambda ((workspace . workspace-lenses))
+                                        ;; preserve the original workspace so we can later use it to resolve the lens
+                                        (seq-do (-rpartial #'lsp-put :_workspace workspace) workspace-lenses)
+                                        workspace-lenses)
+                                      lenses))
+                               (if (-every? #'lsp:code-lens-command? lsp-lens--backend-cache)
+                                   (funcall callback lsp-lens--backend-cache lsp--cur-version)
+                                 (lsp-lens--backend-fetch-missing lsp-lens--backend-cache callback lsp--cur-version)))
+                             :error-handler #'ignore
+                             :mode 'tick
+                             :no-merge t
+                             :cancel-token (concat (buffer-name (current-buffer)) "-lenses")))
+      (if (-all? #'lsp--lens-backend-present? lsp-lens--backend-cache)
+          (funcall callback lsp-lens--backend-cache lsp--cur-version)
+        (lsp-lens--backend-fetch-missing lsp-lens--backend-cache callback lsp--cur-version)))))
+
+(defun lsp-lens--refresh-buffer ()
+  "Trigger lens refresh on buffer."
+  (remove-hook 'lsp-on-idle-hook #'lsp-lens--refresh-buffer t)
+  (when (bound-and-true-p lsp-lens-mode)
+    (lsp-lens-refresh t)))
+
+(defun lsp--lens-on-refresh (workspace)
+  "Clear lens within all buffers of WORKSPACE, refreshing all workspace buffers."
+  (cl-assert (not (eq nil workspace)))
+  (->> (lsp--workspace-buffers workspace)
+       (mapc (lambda (buffer)
+               (lsp-with-current-buffer buffer
+                 (if (lsp--buffer-visible-p)
+                     (when (bound-and-true-p lsp-lens-mode)
+                       (lsp-lens-refresh t))
+                   (progn
+                     (add-hook 'lsp-on-idle-hook #'lsp-lens--refresh-buffer nil t)
+                     (lsp--idle-reschedule (current-buffer)))))))))
+
+;;;###autoload
+(defun lsp-lens--enable ()
+  "Enable lens mode."
+  (when (and lsp-lens-enable
+             (lsp-feature? "textDocument/codeLens"))
+    (lsp-lens-mode 1)))
+
+(defun lsp-lens--disable ()
+  "Disable lens mode."
+  (lsp-lens-mode -1))
+
+;;;###autoload
+(defun lsp-lens-show ()
+  "Display lenses in the buffer."
+  (interactive)
+  (->> (lsp-request "textDocument/codeLens"
+                    `(:textDocument (:uri
+                                     ,(lsp--path-to-uri buffer-file-name))))
+       (seq-map (-lambda ((lens &as &CodeAction :command?))
+                  (if command?
+                      lens
+                    (lsp-request "codeLens/resolve" lens))))
+       lsp-lens--display))
+
+;;;###autoload
+(defun lsp-lens-hide ()
+  "Delete all lenses."
+  (interactive)
+  (let ((scroll-preserve-screen-position t))
+    (seq-do #'delete-overlay lsp-lens--overlays)
+    (setq lsp-lens--overlays nil)))
+
+;;;###autoload
+(define-minor-mode lsp-lens-mode
+  "Toggle code-lens overlays."
+  :group 'lsp-lens
+  :global nil
+  :init-value nil
+  :lighter " Lens"
+  (cond
+   (lsp-lens-mode
+    (add-hook 'lsp-unconfigure-hook #'lsp-lens--disable nil t)
+    (add-hook 'lsp-configure-hook #'lsp-lens--enable nil t)
+    (add-hook 'lsp-on-idle-hook #'lsp-lens--idle-function nil t)
+    (add-hook 'lsp-on-change-hook #'lsp-lens--schedule-refresh-modified nil t)
+    (add-hook 'after-save-hook #'lsp-lens--after-save nil t)
+    (add-hook 'before-revert-hook #'lsp-lens-hide nil t)
+    (lsp-lens-refresh t))
+   (t
+    (remove-hook 'lsp-on-idle-hook #'lsp-lens--idle-function t)
+    (remove-hook 'lsp-on-change-hook #'lsp-lens--schedule-refresh-modified t)
+    (remove-hook 'after-save-hook #'lsp-lens--after-save t)
+    (remove-hook 'before-revert-hook #'lsp-lens-hide t)
+    (when lsp-lens--refresh-timer
+      (cancel-timer lsp-lens--refresh-timer))
+    (setq lsp-lens--refresh-timer nil)
+    (lsp-lens-hide)
+    (setq lsp-lens--last-count nil)
+    (setq lsp-lens--backend-cache nil)
+    (remove-hook 'lsp-configure-hook #'lsp-lens--enable t)
+    (remove-hook 'lsp-unconfigure-hook #'lsp-lens--disable t))))
+
+
+;; avy integration
+
+(declare-function avy-process "ext:avy" (candidates &optional overlay-fn cleanup-fn))
+(declare-function avy--key-to-char "ext:avy" (c))
+(defvar avy-action)
+(defvar avy-style)
+
+;;;###autoload
+(defun lsp-avy-lens ()
+  "Click lsp lens using `avy' package."
+  (interactive)
+  (unless lsp-lens--overlays
+    (user-error "No lenses in current buffer"))
+  (let* ((avy-action 'identity)
+         (avy-style 'lsp-avy-lens)
+         (position (if (eq lsp-lens-place-position 'end-of-line)
+                       'after-string
+                     'before-string))
+         (action (cl-third
+                  (avy-process
+                   (-mapcat
+                    (lambda (overlay)
+                      (-map-indexed
+                       (lambda (index lens-token)
+                         (list overlay index
+                               (get-text-property 0 'action lens-token)))
+                       (overlay-get overlay 'lsp--metadata)))
+                    lsp-lens--overlays)
+                   (-lambda (path ((ov index) . _win))
+                     (let* ((path (mapcar #'avy--key-to-char path))
+                            (str (propertize (string (car (last path)))
+                                             'face 'avy-lead-face))
+                            (old-str (overlay-get ov position))
+                            (old-str-tokens (s-split "|" old-str))
+                            (old-token (seq-elt old-str-tokens index))
+                            (tokens `(,@(-take index old-str-tokens)
+                                      ,(-if-let ((_ prefix suffix)
+                                                 (s-match "\\(^[[:space:]]+\\)\\(.*\\)" old-token))
+                                           (concat prefix str suffix)
+                                         (concat str old-token))
+                                      ,@(-drop (1+ index) old-str-tokens)))
+                            (new-str (s-join (propertize "|" 'face 'lsp-lens-face) tokens))
+                            (new-str (if (or (s-ends-with? "\n" new-str)
+                                             (eq lsp-lens-place-position 'end-of-line))
+                                         new-str
+                                       (concat new-str "\n"))))
+                       (overlay-put ov position new-str)))
+                   (lambda ()
+                     (--map
+                      (let ((original (overlay-get it 'lsp-original)))
+                        (overlay-put it position
+                                     (if (eq lsp-lens-place-position 'end-of-line)
+                                         (concat " " original)
+                                       original)))
+                      lsp-lens--overlays))))))
+    (when action (funcall-interactively action))))
+
+(lsp-consistency-check lsp-lens)
+
+(provide 'lsp-lens)
+;;; lsp-lens.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-lisp.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-lisp.el
new file mode 100644
index 0000000..9ac3a03
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-lisp.el
@@ -0,0 +1,93 @@
+;;; lsp-lisp.el --- LSP client for Lisp  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024  Shen, Jen-Chieh
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; LSP client for Lisp.
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-lisp nil
+  "LSP support for Lisp."
+  :group 'lsp-mode
+  :package-version `(lsp-mode . "9.0.0"))
+
+(defcustom lsp-lisp-active-modes
+  '( lisp-mode)
+  "List of major mode that work with lisp."
+  :type '(repeat function)
+  :group 'lsp-lisp)
+
+(defcustom lsp-lisp-alive-port 8006
+  "Port to connect server to."
+  :type 'integer
+  :group 'lsp-lisp)
+
+;;
+;;; Server
+
+;;;###autoload
+(defun lsp-lisp-alive-start-ls ()
+  "Start the alive-lsp."
+  (interactive)
+  (when-let* ((exe (executable-find "sbcl"))
+             ((lsp--port-available "localhost" lsp-lisp-alive-port)))
+    (lsp-async-start-process #'ignore #'ignore
+                             exe
+                             "--noinform"
+                             "--eval"
+                             "(ql:quickload \"alive-lsp\")"
+                             "--eval"
+                             (format "(alive/server::start :port %s)"
+                                     lsp-lisp-alive-port))))
+
+;;
+;;; Core
+
+(defun lsp-lisp-alive--tcp-connect-to-port ()
+  "Define a TCP connection to language server."
+  (list
+   :connect
+   (lambda (filter sentinel name _environment-fn _workspace)
+     (let* ((host "localhost")
+            (port lsp-lisp-alive-port)
+            (tcp-proc (lsp--open-network-stream host port (concat name "::tcp"))))
+
+       ;; TODO: Same :noquery issue (see above)
+       (set-process-query-on-exit-flag tcp-proc nil)
+       (set-process-filter tcp-proc filter)
+       (set-process-sentinel tcp-proc sentinel)
+       (cons tcp-proc tcp-proc)))
+   :test? (lambda () t)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-lisp-alive--tcp-connect-to-port)
+  :major-modes lsp-lisp-active-modes
+  :priority -1
+  :server-id 'alive-lsp))
+
+(lsp-consistency-check lsp-lisp)
+
+(provide 'lsp-lisp)
+;;; lsp-lisp.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-lua.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-lua.el
new file mode 100644
index 0000000..375493c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-lua.el
@@ -0,0 +1,747 @@
+;;; lsp-lua.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020 E. Alexander Barbosa
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: E. Alexander Barbosa <elxbarbosa@outlook.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Lua Programming Language
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'f)
+(require 'files)
+
+(defgroup lsp-emmy-lua nil
+  "Lua LSP client, provided by the EmmyLua Language Server."
+  :group 'lsp-mode
+  :version "8.0.0"
+  :link '(url-link "https://github.com/EmmyLua/EmmyLua-LanguageServer"))
+
+(defcustom lsp-clients-emmy-lua-java-path "java"
+  "Java Runtime binary location."
+  :group 'lsp-emmy-lua
+  :version "8.0.0"
+  :risky t
+  :type 'file)
+
+(defcustom lsp-clients-emmy-lua-jar-path
+  (f-join lsp-server-install-dir "EmmyLua-LS-all.jar")
+  "Emmy Lua language server jar file."
+  :group 'lsp-emmy-lua
+  :version "8.0.0"
+  :risky t
+  :type 'file)
+
+(defcustom lsp-clients-emmy-lua-args '("-jar")
+  "Arguments to the Lua Language server."
+  :group 'lsp-emmy-lua
+  :version "8.0.0"
+  :risky t
+  :type  '(repeat string))
+
+(defcustom lsp-clients-emmy-lua-command nil
+  "Final command to call the Lua Language server."
+  :group 'lsp-emmy-lua
+  :version "8.0.0"
+  :risky t
+  :type '(repeat string))
+
+(defun lsp-clients-emmy-lua-test ()
+  "Test the Emmy Lua binaries and files."
+  (and (executable-find lsp-clients-emmy-lua-java-path)
+       (f-exists? lsp-clients-emmy-lua-jar-path)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda () (or lsp-clients-emmy-lua-command
+                                                       `(,lsp-clients-emmy-lua-java-path
+                                                         ,@lsp-clients-emmy-lua-args
+                                                         ,lsp-clients-emmy-lua-jar-path)))
+                                        #'lsp-clients-emmy-lua-test)
+  :activation-fn (lsp-activate-on "lua")
+  :server-id 'emmy-lua
+  :priority -1
+  :notification-handlers (lsp-ht ("emmy/progressReport" #'ignore))))
+
+
+;;; lua-language-server
+(defgroup lsp-lua-language-server nil
+  "Lua LSP client, provided by the Lua Language Server."
+  :group 'lsp-mode
+  :version "8.0.0"
+  :link '(url-link "https://github.com/LuaLS/lua-language-server"))
+
+(defcustom lsp-clients-lua-language-server-install-dir (f-join lsp-server-install-dir "lua-language-server/")
+  "Installation directory for Lua Language Server."
+  :group 'lsp-lua-language-server
+  :version "8.0.0"
+  :risky t
+  :type 'directory)
+
+(defcustom lsp-clients-lua-language-server-bin
+  (f-join lsp-clients-lua-language-server-install-dir
+          "bin/"
+          (pcase system-type
+            ('gnu/linux "lua-language-server")
+            ('darwin "lua-language-server")
+            ('windows-nt "lua-language-server.exe")
+            (_ "lua-language-server")))
+  "Location of Lua Language Server."
+  :group 'lsp-lua-language-server
+  :version "8.0.0"
+  :risky t
+  :type 'file)
+
+(defcustom lsp-clients-lua-language-server-main-location
+  (f-join lsp-clients-lua-language-server-install-dir
+          "main.lua")
+  "Location of Lua Language Server main.lua."
+  :group 'lsp-lua-language-server
+  :version "8.0.0"
+  :risky t
+  :type 'file)
+
+(defcustom lsp-clients-lua-language-server-args '("-E")
+  "Arguments to run the Lua Language server."
+  :group 'lsp-lua-language-server
+  :version "8.0.0"
+  :risky t
+  :type '(repeat string))
+
+(defcustom lsp-clients-lua-language-server-command nil
+  "Command to start Lua Language server."
+  :group 'lsp-lua-language-server
+  :type '(repeat string))
+
+
+;; Register a `:system' provider so `lsp-package-path' can resolve an
+;; externally installed lua-language-server (e.g. on PATH via package
+;; manager). Mirrors other lsp-mode clients, such as rust-analyzer.
+(lsp-dependency
+ 'lua-language-server
+ '(:system "lua-language-server"))
+
+(defun lsp-clients-lua-language-server--command ()
+  "Compute the command used to start lua-language-server.
+Resolve the binary dynamically so an externally provided server is
+honored, instead of relying solely on the hardcoded install directory.
+This mirrors how the `clangd' and `rust-analyzer' clients resolve their
+executables."
+  (or lsp-clients-lua-language-server-command
+      (let ((bin (or (when (and lsp-clients-lua-language-server-bin
+                                (f-exists? lsp-clients-lua-language-server-bin))
+                       lsp-clients-lua-language-server-bin)
+                     (lsp-package-path 'lua-language-server)
+                     (executable-find "lua-language-server"))))
+        `(,(or bin "lua-language-server")
+          ,@lsp-clients-lua-language-server-args
+          ;; Only pass main.lua for the manual/lsp-managed layout
+          ;; where it exists; standalone launchers locate their own
+          ;; main.lua and must not receive it as an argument.
+          ,@(when (f-exists? lsp-clients-lua-language-server-main-location)
+              (list lsp-clients-lua-language-server-main-location))))))
+
+(defun lsp-clients-lua-language-server-test ()
+  "Test whether the Lua language server is available.
+Checks that the dynamically resolved executable can be found,
+rather than requiring the hardcoded install paths to exist."
+  (when-let* ((bin (car (lsp-clients-lua-language-server--command))))
+    (and (executable-find bin t) t)))
+
+(defcustom lsp-lua-color-mode "Semantic"
+  "Color mode."
+  :type '(choice (const "Grammar")
+                 (const "Semantic"))
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-completion-call-snippet "Disable"
+  "Shows function call snippets."
+  :type '(choice
+          (const "Disable")
+          (const "Both")
+          (const "Replace"))
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-completion-display-context 6
+  "Previewing the relevant code snippet of the suggestion may help you
+understand the usage of the suggestion.
+
+The number set indicates the number of intercepted lines in the code
+fragment.  If it is set to `0`, this feature can be disabled."
+  :type 'number
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-completion-enable t
+  "Enable completion."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-completion-keyword-snippet "Replace"
+  "Shows keyword syntax snippets."
+  :type '(choice (const "Disable")
+                 (const "Both")
+                 (const "Replace"))
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-completion-workspace-word t
+  "Show words within the workspace."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-develop-debugger-port 11412
+  "Listen port of debugger."
+  :type 'number
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-develop-debugger-wait nil
+  "Suspend before debugger connects."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-develop-enable nil
+  "Developer mode.  Do not enable, performance will be affected."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-diagnostics-disable nil
+  "Disabled diagnostic (Use code in hover brackets).
+```json
+\"Lua.diagnostics.disable\" : [
+\"unused-local\",
+\"lowercase-global\"
+]
+```"
+  :type 'lsp-string-vector
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-diagnostics-enable t
+  "Enable diagnostics."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-diagnostics-globals nil
+  "Defined global variables.
+```json
+\"Lua.diagnostics.globals\" : [
+\"GLOBAL1\",
+\"GLOBAL2\"
+]
+```"
+  :type 'lsp-string-vector
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-diagnostics-needed-file-status nil
+  "If you want to check only opened files, choice Opened; else choice Any.
+```json
+\"Lua.diagnostics.neededFileStatus\" : {
+\"ambiguity-1\" : \"Any\",
+\"circle-doc-class\" : \"Opened\"
+}
+```"
+  :type 'alist
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-diagnostics-severity nil
+  "Modified diagnostic severity.
+```json
+\"Lua.diagnostics.severity\" : {
+\"redefined-local\" : \"Warning\",
+\"emmy-lua\" : \"Hint\"
+}
+```"
+  :type 'alist
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-diagnostics-workspace-delay 0
+  "Latency (milliseconds) for workspace diagnostics. When you start the
+workspace, or edit any file, the entire workspace will be re-diagnosed in the
+background. Set to negative to disable workspace diagnostics."
+  :type 'number
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-diagnostics-workspace-rate 100
+  "Workspace diagnostics run rate (%). Decreasing this value reduces CPU usage,
+but also reduces the speed of workspace diagnostics. The diagnosis of the file
+you are currently editing is always done at full speed and is not affected by
+this setting."
+  :type 'number
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-hint-enable nil
+  "Enable hint."
+  :type 'boolean
+  :package-version '(lsp-mmode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-hint-param-name t
+  "Hint parameter name when the parameter called is literal."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-hint-param-type t
+  "Show type hints at the parameter of the function."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-hint-set-type nil
+  "Hint type at assignment operation."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-hover-enable t
+  "Enable hover."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-hover-field-infer 3000
+  "When hovering to view a table, type infer will be performed for each field.
+When the accumulated time of type infer reaches the set value (MS), the type
+infer of subsequent fields will be skipped."
+  :type 'number
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-hover-preview-fields 100
+  "When hovering to view a table, limits the maximum number of previews for
+fields."
+  :type 'number
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-hover-view-number t
+  "Hover to view numeric content (only if literal is not decimal)."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-hover-view-string t
+  "Hover to view the contents of a string (only if the literal contains an
+escape character)."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-hover-view-string-max 1000
+  "The maximum length of a hover to view the contents of a string."
+  :type 'number
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-intelli-sense-search-depth 0
+  "Set the search depth for IntelliSense. Increasing this value increases
+accuracy, but decreases performance. Different workspace have different
+tolerance for this setting. Please adjust it to the appropriate value."
+  :type 'number
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-runtime-file-encoding "utf8"
+  "File encoding.  The `ansi' option is only available under the `Windows'
+platform."
+  :type '(choice (const "utf8")
+                 (const "ansi"))
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-runtime-nonstandard-symbol nil
+  "Supports non-standard symbols. Make sure that your runtime environment
+supports these symbols."
+  :type 'lsp-string-vector
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-runtime-path
+  ["?.lua" "?/init.lua" "?/?.lua"]
+  "`package.path`."
+  :type 'lsp-string-vector
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-runtime-plugin nil
+  "(Proposed) Plugin path. Default is `.vscode/lua/plugin.lua`"
+  :type 'file
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-runtime-special nil
+  "The custom global variables are regarded as some special built-in variables,
+and the language server will provide special support.
+```json
+\"Lua.runtime.special\" : {
+\"include\" : \"require\"
+}
+```"
+  :type 'alist
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-runtime-unicode-name nil
+  "Allows Unicode characters in name."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-runtime-version "Lua 5.4"
+  "Lua runtime version."
+  :type '(choice (const "Lua 5.1")
+                 (const "Lua 5.2")
+                 (const "Lua 5.3")
+                 (const "Lua 5.4")
+                 (const "LuaJIT"))
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-signature-help-enable t
+  "Enable signature help."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-telemetry-enable nil
+  "Enable telemetry to send your editor information and error logs over the
+network."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-window-progress-bar t
+  "Show progress bar in status bar."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-window-status-bar t
+  "Show extension status in status bar."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-workspace-ignore-dir
+  [".vscode"]
+  "Ignored directories (Use `.gitignore` grammar).
+```json
+\"Lua.workspace.ignoreDir\" : [
+\"temp/*.*\",
+\"!temp/*.lua\"
+]
+```"
+  :type 'lsp-string-vector
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-workspace-ignore-submodules t
+  "Ignore submodules."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-workspace-library nil
+  "Load external library.
+
+This feature can load external Lua files, which can be used for definition,
+automatic completion and other functions.  Note that the language server does
+not monitor changes in external files and needs to restart if the external
+files are modified.  The following example shows loaded files in `C:/lua`
+and `../lib` ,exclude `../lib/temp`.
+
+```json
+\"Lua.workspace.library\": {
+\"C:/lua\": true,
+\"../lib\": [
+\"temp/*\"
+]
+}
+```"
+  :type 'alist
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-workspace-max-preload 1000
+  "Max preloaded files."
+  :type 'number
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-workspace-preload-file-size 100
+  "Skip files larger than this value (KB) when preloading."
+  :type 'number
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-workspace-use-git-ignore t
+  "Ignore files list in `.gitignore` ."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-files-associations nil
+  "Files.associations."
+  :type 'alist
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-files-exclude nil
+  "Files.exclude."
+  :type 'alist
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(defcustom lsp-lua-prefer-musl nil
+  "Whether or not to download the musl-compiled server."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-lua-language-server)
+
+(lsp-register-custom-settings
+ '(("files.associations" lsp-lua-files-associations t)
+   ("files.exclude" lsp-lua-files-exclude t)
+   ("Lua.workspace.useGitIgnore" lsp-lua-workspace-use-git-ignore t)
+   ("Lua.workspace.preloadFileSize" lsp-lua-workspace-preload-file-size)
+   ("Lua.workspace.maxPreload" lsp-lua-workspace-max-preload)
+   ("Lua.workspace.library" lsp-lua-workspace-library)
+   ("Lua.workspace.ignoreSubmodules" lsp-lua-workspace-ignore-submodules t)
+   ("Lua.workspace.ignoreDir" lsp-lua-workspace-ignore-dir)
+   ("Lua.window.statusBar" lsp-lua-window-status-bar t)
+   ("Lua.window.progressBar" lsp-lua-window-progress-bar t)
+   ("Lua.telemetry.enable" lsp-lua-telemetry-enable t)
+   ("Lua.signatureHelp.enable" lsp-lua-signature-help-enable t)
+   ("Lua.runtime.version" lsp-lua-runtime-version)
+   ("Lua.runtime.unicodeName" lsp-lua-runtime-unicode-name nil)
+   ("Lua.runtime.special" lsp-lua-runtime-special)
+   ("Lua.runtime.plugin" lsp-lua-runtime-plugin)
+   ("Lua.runtime.path" lsp-lua-runtime-path)
+   ("Lua.runtime.nonstandardSymbol" lsp-lua-runtime-nonstandard-symbol)
+   ("Lua.runtime.fileEncoding" lsp-lua-runtime-file-encoding)
+   ("Lua.intelliSense.searchDepth" lsp-lua-intelli-sense-search-depth)
+   ("Lua.hover.viewStringMax" lsp-lua-hover-view-string-max)
+   ("Lua.hover.viewString" lsp-lua-hover-view-string t)
+   ("Lua.hover.viewNumber" lsp-lua-hover-view-number t)
+   ("Lua.hover.previewFields" lsp-lua-hover-preview-fields)
+   ("Lua.hover.fieldInfer" lsp-lua-hover-field-infer)
+   ("Lua.hover.enable" lsp-lua-hover-enable t)
+   ("Lua.hint.setType" lsp-lua-hint-set-type nil)
+   ("Lua.hint.paramType" lsp-lua-hint-param-type t)
+   ("Lua.hint.paramName" lsp-lua-hint-param-name t)
+   ("Lua.hint.enable" lsp-lua-hint-enable t)
+   ("Lua.diagnostics.workspaceRate" lsp-lua-diagnostics-workspace-rate)
+   ("Lua.diagnostics.workspaceDelay" lsp-lua-diagnostics-workspace-delay)
+   ("Lua.diagnostics.severity" lsp-lua-diagnostics-severity)
+   ("Lua.diagnostics.neededFileStatus" lsp-lua-diagnostics-needed-file-status)
+   ("Lua.diagnostics.globals" lsp-lua-diagnostics-globals)
+   ("Lua.diagnostics.enable" lsp-lua-diagnostics-enable t)
+   ("Lua.diagnostics.disable" lsp-lua-diagnostics-disable)
+   ("Lua.develop.enable" lsp-lua-develop-enable t)
+   ("Lua.develop.debuggerWait" lsp-lua-develop-debugger-wait t)
+   ("Lua.develop.debuggerPort" lsp-lua-develop-debugger-port)
+   ("Lua.completion.workspaceWord" lsp-lua-completion-workspace-word t)
+   ("Lua.completion.keywordSnippet" lsp-lua-completion-keyword-snippet)
+   ("Lua.completion.enable" lsp-lua-completion-enable t)
+   ("Lua.completion.displayContext" lsp-lua-completion-display-context)
+   ("Lua.completion.callSnippet" lsp-lua-completion-call-snippet)
+   ("Lua.color.mode" lsp-lua-color-mode)))
+
+(defun lsp-lua-language-server-install-latest (client callback error-callback update?)
+  "Download the latest version of lua-language-server and extract it to
+`lsp-lua-language-server-install-dir'."
+  (ignore client update?)
+  (let ((store-path (expand-file-name "lua-language-server-github" lsp-clients-lua-language-server-install-dir))
+        (url (lsp--find-latest-gh-release-url
+              "https://api.github.com/repos/LuaLS/lua-language-server/releases/latest"
+              (format "%s%s"
+                      (pcase system-type
+                        ('gnu/linux
+                         (pcase (lsp-resolve-value lsp--system-arch)
+                           ('x64     "linux-x64")
+                           ('arm64   "linux-arm64")))
+                        ('darwin
+                         (pcase (lsp-resolve-value lsp--system-arch)
+                           ('x64     "darwin-x64")
+                           ('arm64   "darwin-arm64")))
+                        ('windows-nt
+                         (pcase (lsp-resolve-value lsp--system-arch)
+                           ('x64     "win32-x64")
+                           ('arm64   "win32-ia32")))
+                        (_
+                         (pcase (lsp-resolve-value lsp--system-arch)
+                           ('x64     "linux-x64"))))
+                      (if lsp-lua-prefer-musl "-musl" "")))))
+    (let ((decompress (if (string-match-p "\.zip$" url)
+                          (progn :zip)
+                        (if (string-match-p "\.tar.gz$" url)
+                            (progn :targz)
+                          :gzip))))
+      (lsp-download-install
+       (lambda (&rest _)
+         (set-file-modes lsp-clients-lua-language-server-bin #o0700)
+         (funcall callback))
+       error-callback
+       :url url
+       :store-path store-path
+       :decompress decompress))))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-clients-lua-language-server--command
+                                        #'lsp-clients-lua-language-server-test)
+  :activation-fn (lsp-activate-on "lua")
+  :priority -2
+  :server-id 'lua-language-server
+  :download-server-fn #'lsp-lua-language-server-install-latest))
+
+;;; lua-lsp
+(defgroup lsp-lua-lsp nil
+  "Lua LSP client, provided by the Lua-Lsp."
+  :group 'lsp-mode
+  :version "8.0.0"
+  :link '(url-link "https://github.com/Alloyed/lua-lsp"))
+
+(defcustom lsp-clients-luarocks-bin-dir (f-join (getenv "HOME") ".luarocks/bin/")
+  "LuaRocks bin directory."
+  :group 'lsp-lua-lsp
+  :version "8.0.0"
+  :risky t
+  :type 'directory)
+
+(defcustom lsp-clients-lua-lsp-server-install-dir nil
+  "Installation directory for Lua-Lsp Language Server."
+  :group 'lsp-lua-lsp
+  :version "8.0.0"
+  :risky t
+  :type 'file)
+
+(defun lsp-clients-lua-lsp-test ()
+  "Test Lua-lsp language server files."
+  (and (f-exists? lsp-clients-lua-lsp-server-install-dir)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda ()
+                                          (or lsp-clients-lua-lsp-server-install-dir
+                                              (f-join lsp-clients-luarocks-bin-dir "lua-lsp")))
+                                        #'lsp-clients-lua-lsp-test)
+  :activation-fn (lsp-activate-on "lua")
+  :priority -3
+  :server-id 'lsp-lua-lsp))
+
+;;; lua-roblox-language-server
+(defgroup lsp-lua-roblox-language-server nil
+  "Roblox Lua LSP client, provided by the Roblox Lua Language Server."
+  :group 'lsp-mode
+  :version "8.0.0"
+  :link '(url-link "https://github.com/NightrainsRbx/RobloxLsp"))
+
+(defcustom lsp-lua-roblox-language-server-install-dir (f-join lsp-server-install-dir "lua-roblox-language-server/")
+  "Installation directory for Lua Language Server."
+  :group 'lsp-lua-roblox-language-server
+  :version "8.0.0"
+  :risky t
+  :type 'directory)
+
+(defcustom lsp-lua-roblox-language-server-bin
+  (f-join lsp-lua-roblox-language-server-install-dir
+          "extension/server/bin/"
+          (pcase system-type
+            ('gnu/linux "Linux/lua-language-server")
+            ('darwin "macOS/lua-language-server")
+            ('windows-nt "Windows/lua-language-server.exe")
+            (_ "Linux/lua-language-server")))
+  "Location of Roblox Lua Language Server."
+  :group 'lsp-lua-roblox-language-server
+  :version "8.0.0"
+  :risky t
+  :type 'file)
+
+(defcustom lsp-lua-roblox-language-server-main-location
+  (f-join lsp-lua-roblox-language-server-install-dir
+          "extension/server/main.lua")
+  "Location of Roblox Lua Language Server main.lua."
+  :group 'lsp-lua-roblox-language-server
+  :version "8.0.0"
+  :risky t
+  :type 'file)
+
+(defcustom lsp-lua-roblox-server-download-url
+  (lsp-vscode-extension-url "Nightrains" "robloxlsp" "1.5.11")
+  "Download url for Roblox Lua vscode extension."
+  :group 'lsp-lua-roblox-language-server
+  :version "8.0.0"
+  :type 'string)
+
+(defcustom lsp-lua-roblox-server-store-path
+  (expand-file-name "vs-lua-roblox" lsp-lua-roblox-language-server-install-dir)
+  "Server file name for the vscode extension."
+  :group 'lsp-lua-roblox-language-server
+  :version "8.0.0"
+  :type 'string)
+
+(defun lsp-lua-roblox-language-server-test ()
+  "Test Lua language server binaries and files."
+  (and (f-exists? lsp-lua-roblox-language-server-main-location)
+       (f-exists? lsp-lua-roblox-language-server-bin)))
+
+(defun lsp-lua-roblox-language-server-install (_client callback error-callback _update?)
+  "Download the latest version of lua-language-server and extract it to
+`lsp-lua-roblox-language-server-download-url'."
+  (lsp-download-install
+   (lambda (&rest _)
+     (set-file-modes lsp-lua-roblox-language-server-bin #o0700)
+     (funcall callback))
+   error-callback
+   :url lsp-lua-roblox-server-download-url
+   :store-path lsp-lua-roblox-server-store-path
+   :decompress :zip))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda () (or lsp-clients-lua-language-server-command
+                                                       `(,lsp-lua-roblox-language-server-bin
+                                                         ,@lsp-clients-lua-language-server-args
+                                                         ,lsp-lua-roblox-language-server-main-location)))
+                                        #'lsp-lua-roblox-language-server-test)
+  :activation-fn (lsp-activate-on "lua")
+  :priority -4
+  :server-id 'lua-roblox-language-server
+  :download-server-fn #'lsp-lua-roblox-language-server-install))
+
+(lsp-consistency-check lsp-lua)
+
+(provide 'lsp-lua)
+;;; lsp-lua.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-magik.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-magik.el
new file mode 100644
index 0000000..4319452
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-magik.el
@@ -0,0 +1,297 @@
+;;; lsp-magik.el --- Language server client for Magik  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022 Keronic
+;; Copyright (C) 2022-2026 emacs-lsp maintainers
+
+;; Author: <robin.putters@keronic.com>
+;; Keywords: lsp, magik
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for the Magik programming language
+;; https://github.com/StevenLooman/magik-tools
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(declare-function magik-utils-get-buffer-mode "magik-utils")
+(declare-function barf-if-no-gis "magik-session")
+(defvar magik-session-buffer)
+(defvar magik-session-buffer-alist-prefix-function)
+
+(defgroup lsp-magik nil
+  "LSP support for Magik."
+  :link '(url-link "https://github.com/StevenLooman/magik-tools")
+  :group 'lsp-mode
+  :tag "Lsp Magik"
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-magik-version "0.12.0"
+  "Version of LSP server."
+  :type 'string
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-magik-download-url-lsp (format "https://github.com/StevenLooman/magik-tools/releases/download/%s/magik-language-server-%s.jar" lsp-magik-version lsp-magik-version)
+  "URL of LSP server to download."
+  :type 'string
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-magik-ls-path
+  (f-join lsp-server-install-dir "magik-ls" (format "magik-language-server-%s.jar" lsp-magik-version))
+  "Path of the language server."
+  :type 'string
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-dependency
+ 'magik-ls
+ `(:download :url lsp-magik-download-url-lsp
+             :store-path ,lsp-magik-ls-path))
+
+(lsp-defcustom lsp-magik-product-dirs []
+  "Paths to (compiled, containing a libs/ directory) products."
+  :type 'lsp-string-vector
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.productDirs")
+
+(lsp-defcustom lsp-magik-lint-override-config-file nil
+  "Override path to magiklintrc.properties."
+  :type 'string
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "magik.lint.overrideConfigFile")
+
+(lsp-defcustom lsp-magik-lint-run-checks-on-change-delay 333
+  "Run checks delayed after <value> milliseconds since last change.
+The next update resets the delay."
+  :type 'number
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "11.0.0")
+  :lsp-path "magik.lint.runChecksOnChangeDelay")
+
+(lsp-defcustom lsp-magik-lint-run-checks-on-save nil
+  "Run checks when saving the file, immediately."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "11.0.0")
+  :lsp-path "magik.lint.runChecksOnSave")
+
+(lsp-defcustom lsp-magik-typing-type-database-paths []
+  "Paths to type databases."
+  :type 'lsp-string-vector
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "magik.typing.typeDatabasePaths")
+
+(lsp-defcustom lsp-magik-typing-show-typing-inlay-hints nil
+  "Show typing inlay hints."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.typing.showTypingInlayHints")
+
+(lsp-defcustom lsp-magik-typing-show-argument-inlay-hints nil
+  "Show (certain) argument name inlay hints."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.typing.showArgumentInlayHints")
+
+(lsp-defcustom lsp-magik-typing-enable-checks nil
+  "Enable typing checks."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "magik.typing.enableChecks")
+
+(lsp-defcustom lsp-magik-typing-index-global-usages t
+  "Enable indexing of usages of globals by methods."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.typing.indexGlobalUsages")
+
+(lsp-defcustom lsp-magik-typing-index-method-usages nil
+  "Enable indexing of usages of methods by methods."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.typing.indexMethodUsages")
+
+(lsp-defcustom lsp-magik-typing-index-slot-usages t
+  "Enable indexing of usages of slots by methods."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.typing.indexSlotUsages")
+
+(lsp-defcustom lsp-magik-typing-index-condition-usages t
+  "Enable indexing of usages of conditions by methods."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.typing.indexConditionUsages")
+
+(lsp-defcustom lsp-magik-typing-cache-indexed-definitions-method-usages nil
+  "Store and load the indexed definitions in the workspace folders."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.typing.cacheIndexedDefinitions")
+
+(lsp-defcustom lsp-magik-formatting-indent-strategy "null"
+  "The strategy used for indentation: \"null\", \"block\", or \"visual\"."
+  :type '(choice (const "null")
+                 (const "block")
+                 (const "visual"))
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.formatting.indentStrategy")
+
+(lsp-defcustom lsp-magik-formatting-indent-char "tab"
+  "Indent character, \"tab\" or \"space\"."
+  :type '(choice (const "tab")
+                 (const "space"))
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.formatting.indentChar")
+
+(lsp-defcustom lsp-magik-formatting-indent-width 8
+  "Indent width (tab size or number of spaces)."
+  :type 'integer
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.formatting.indentWidth")
+
+(lsp-defcustom lsp-magik-formatting-insert-final-newline t
+  "Insert final newline."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.formatting.insertFinalNewline")
+
+(lsp-defcustom lsp-magik-formatting-trim-trailing-whitespace t
+  "Trim trailing whitespace."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.formatting.trimTrailingWhitespace")
+
+(lsp-defcustom lsp-magik-formatting-trim-final-newlines t
+  "Trim final newlines."
+  :type 'boolean
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0")
+  :lsp-path "magik.formatting.trimFinalNewlines")
+
+(defcustom lsp-magik-java-path (lambda ()
+                                 (cond ((eq system-type 'windows-nt)
+                                        (or (lsp-resolve-value (executable-find (expand-file-name "bin/java" (getenv "JAVA_HOME"))))
+                                            (lsp-resolve-value (executable-find "java"))))
+                                       (t "java")))
+  "Path to Java Runtime, Java 11 minimum."
+  :type 'string
+  :group 'lsp-magik
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defun lsp-magik--send-string (string msg)
+  "Send STRING to the active GIS session process and show MSG."
+  (unless (and (require 'magik-utils nil t) (require 'magik-session nil t))
+    (user-error "The magik-mode is not available"))
+  (let* ((gis (magik-utils-get-buffer-mode nil
+                                           'magik-session-mode
+                                           "Enter Magik Session buffer:"
+                                           magik-session-buffer
+                                           'magik-session-buffer-alist-prefix-function))
+         (process (barf-if-no-gis gis)))
+    (message "%s" msg)
+    (when-let* ((window (display-buffer gis)))
+      (set-window-point window (with-current-buffer gis (point-max))))
+    (process-send-string process string)))
+
+(lsp-defun lsp-magik--load-module ((&Command :arguments?))
+  "Load the module in ARGUMENTS? into the GIS session."
+  (when-let* ((module-name (lsp-seq-first arguments?)))
+    (lsp-magik--send-string
+     (format "sw_module_manager.load_module(\"%s\")\n$\n" module-name)
+     (format "Adding module %s" module-name))))
+
+(lsp-defun lsp-magik--add-product ((&Command :arguments?))
+  "Add the product in ARGUMENTS? into the GIS session."
+  (when-let* ((product-dir (lsp-seq-first arguments?)))
+    (lsp-magik--send-string
+     (format "smallworld_product.add_product(\"%s\")\n$\n" product-dir)
+     (format "Adding product %s" product-dir))))
+
+(lsp-defun lsp-magik--run-test ((&Command :arguments?))
+  "Run the test identified by ARGUMENTS? in the active GIS session."
+  (when-let* ((test-id (lsp-seq-first arguments?)))
+    (cond
+     ((string-prefix-p "method:" test-id)
+      (let* ((rest (substring test-id 7))
+             (dot-pos (string-match "\\." rest))
+             (test-expr (format "%s.new(:|%s|)" (substring rest 0 dot-pos) (substring rest (1+ dot-pos)))))
+        (lsp-magik--send-string
+         (format (concat "_block\n"
+                         "    _local suite << sw:test_suite.new()\n"
+                         "    suite.add_test(%s)\n"
+                         "    sw:test_runner.new().run_in_foreground(suite)\n"
+                         "_endblock\n$\n")
+                 test-expr)
+         (format "Running test %s" rest))))
+     ((string-prefix-p "test_case:" test-id)
+      (lsp-magik--send-string
+       (format "sw:test_runner.new().run_in_foreground(%s.suite())\n$\n"
+               (substring test-id 10))
+       (format "Running all tests in %s" (substring test-id 10)))))))
+
+(defun lsp-magik-re-index ()
+  "Trigger the Magik language server to re-index the workspace."
+  (interactive)
+  (lsp--cur-workspace-check)
+  (lsp-send-execute-command "magik.reIndex"))
+
+(lsp-register-client
+ (make-lsp-client
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'magik-ls callback error-callback))
+  :new-connection (lsp-stdio-connection
+                   (lambda ()
+                     (list
+                      (substitute-in-file-name (lsp-resolve-value lsp-magik-java-path))
+                      "-jar"
+                      (substitute-in-file-name lsp-magik-ls-path)
+                      "--debug"))
+                   (lambda ()
+                     (and (executable-find (lsp-resolve-value lsp-magik-java-path) t)
+                          (file-exists-p (substitute-in-file-name lsp-magik-ls-path)))))
+  :activation-fn (lsp-activate-on "magik" "sw-product-def" "sw-module-def" "sw-load-list")
+  :initialized-fn (lambda (workspace)
+                    (with-lsp-workspace workspace
+                      (lsp--set-configuration (lsp-configuration-section "magik"))))
+  :server-id 'magik
+  :action-handlers (ht ("magik.session.loadModule" #'lsp-magik--load-module)
+                       ("magik.session.addProduct" #'lsp-magik--add-product)
+                       ("magik.munit.runTest"      #'lsp-magik--run-test))))
+
+(lsp-consistency-check lsp-magik)
+
+(provide 'lsp-magik)
+;;; lsp-magik.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-markdown.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-markdown.el
new file mode 100644
index 0000000..35b1fab
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-markdown.el
@@ -0,0 +1,102 @@
+;;; lsp-markdown.el --- lsp-mode markdown integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021-2026 lsp-mode maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  LSP client for unified-language-server
+
+;;; Code:
+
+(require 'lsp-mode)
+
+;;; Markdown
+(defgroup lsp-markdown nil
+  "Settings for the markdown language server client."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/unifiedjs/unified-language-server")
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-markdown-server-command "unified-language-server"
+  "The binary (or full path to binary) which executes the server."
+  :type 'string
+  :group 'lsp-markdown
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-markdown-server-command-args '("--parser=remark-parse" "--stdio")
+  "Command-line arguments for the markdown lsp server."
+  :type '(repeat string)
+  :group 'lsp-markdown
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-markdown-remark-plugins [["#remark-preset-lint-markdown-style-guide"]]
+  "The JSON configuration object for plugins.
+
+For a complete list of plugins, check:
+ https://github.com/unifiedjs/unified-language-server/blob/main/CONFIGURATION.md#re-using-settings"
+  :type 'lsp-string-vector
+  :group 'lsp-markdown
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-markdown-remark-check-text-with-setting "retext-english"
+  "Configure `checkTextWith' subproperty.
+
+For a complete list of plugins, check:
+ https://github.com/unifiedjs/unified-language-server/blob/main/CONFIGURATION.md#re-using-settings"
+  :type '(choice (const "retext-english")
+                 (const "remark-parse"))
+  :group 'lsp-markdown
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-markdown-remark-check-text-with-mutator ["#remark-retext" "#parse-latin"]
+  "Vector of additional mutators.
+
+For a complete list of plugins, check:
+ https://github.com/unifiedjs/unified-language-server/blob/main/CONFIGURATION.md#re-using-settings"
+  :type 'lsp-string-vector
+  :group 'lsp-markdown
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-dependency 'unified-language-server
+                '(:system "unified-language-server")
+                '(:npm :package "unified-language-server"
+                       :path "unified-language-server"))
+
+(lsp-register-custom-settings
+ `(("unified-language-server.remark-parse.plugins" lsp-markdown-remark-plugins)
+   ("unified-language-server.remark-parse.checkTextWith.setting" lsp-markdown-remark-check-text-with-setting)
+   ("unified-language-server.remark-parse.checkTextWith.mutator" lsp-markdown-remark-check-text-with-mutator)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     (cons (or (executable-find lsp-markdown-server-command)
+                                               (lsp-package-path 'unified-language-server))
+                                           lsp-markdown-server-command-args)))
+                  :activation-fn (lsp-activate-on "markdown")
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration (lsp-configuration-section "unified-language-server"))))
+                  :priority -1
+                  :server-id 'unified))
+
+(lsp-consistency-check lsp-markdown)
+
+(provide 'lsp-markdown)
+;;; lsp-markdown.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-marksman.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-marksman.el
new file mode 100644
index 0000000..b2a87a9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-marksman.el
@@ -0,0 +1,97 @@
+;;; lsp-marksman.el --- lsp-mode marksman integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021-2026 lsp-mode maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  LSP client for marksman
+
+;;; Code:
+
+(require 'lsp-mode)
+
+;;; Marksman
+(defgroup lsp-marksman nil
+  "Settings for the marksman language server client."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/artempyanykh/marksman")
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-marksman-server-command "marksman"
+  "The binary (or full path to binary) which executes the server."
+  :type 'string
+  :group 'lsp-marksman
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-marksman-server-command-args '()
+  "Command-line arguments for the marksman lsp server. Not normally Needed."
+  :type '(repeat string)
+  :group 'lsp-marksman
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-marksman-download-url
+  (format "https://github.com/artempyanykh/marksman/releases/latest/download/%s"
+          (pcase system-type
+            ('gnu/linux
+             (if (string-match-p "^aarch64-.*" system-configuration)
+                 "marksman-linux-arm64"
+               "marksman-linux-x64"))
+            ('darwin "marksman-macos")
+            ('windows-nt "marksman.exe")))
+  "Automatic download url for Marksman."
+  :type 'string
+  :group 'lsp-marksman
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-marksman-store-path (f-join lsp-server-install-dir
+                                                "marksman"
+                                                (if (eq system-type 'windows-nt)
+                                                    "marksman.exe"
+                                                  "marksman"))
+  "The path to the file in which `marksman' will be stored."
+  :type 'file
+  :group 'lsp-marksman
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-dependency 'marksman
+                '(:system "marksman")
+                `(:download :url lsp-marksman-download-url
+                            :store-path lsp-marksman-store-path
+                            :set-executable? t))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     (cons (or (executable-find lsp-marksman-server-command)
+                                               (lsp-package-path 'marksman)
+                                               "marksman")
+                                           lsp-marksman-server-command-args)))
+                  :activation-fn (lsp-activate-on "markdown")
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration (lsp-configuration-section "marksman"))))
+                  :priority -1
+                  :server-id 'marksman
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'marksman callback error-callback))))
+
+(lsp-consistency-check lsp-marksman)
+
+(provide 'lsp-marksman)
+;;; lsp-marksman.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-matlab.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-matlab.el
new file mode 100644
index 0000000..9e3311d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-matlab.el
@@ -0,0 +1,142 @@
+;;; lsp-matlab.el --- LSP mode integration for MATLAB -*- lexical-binding: t; -*-
+
+;;; Commentary:
+;;
+;; LSP client for the MATLAB language server
+;;
+
+;;; Code:
+(require 'lsp-mode)
+
+;;; MATLAB
+(defgroup lsp-matlab nil
+  "Lsp support for MATLAB."
+  :group 'lsp-mode
+  :tag "Lsp MATLAB")
+
+(defcustom lsp-clients-matlab-nodejs "node"
+  "Node.js to launch the MATLAB language server."
+  :group 'lsp-matlab
+  :type '(string))
+
+(defcustom lsp-clients-matlab-server "/usr/local/apps/matlabls/out/index.js"
+  "Path to the MATLAB language server, index.js.
+
+For an overview and detailed install instructions, see:
+https://github.com/mathworks/Emacs-MATLAB-Mode/blob/doc/\
+matlab-language-server-lsp-mode.org
+
+To setup,
+1. Download the language server (clone or unzip):
+      git clone https://github.com/mathworks/MATLAB-language-server.git
+   or Download and unzip a release from
+      https://github.com/mathworks/MATLAB-language-server
+2. In the clone or unzip directory,
+     npm install
+     npm run compile
+     npm run package  # optional JavaScript minimization
+3. Set lsp-clients-matlab-server to the download directory, or
+   copy the ./out and ./matlab/ directory trees to an install location, e.g.
+     cp -r ./out/ /usr/local/apps/matlabls/out/
+     cp -r ./matlab/ /usr/local/apps/matlabls/matlab/
+   then set `lsp-clients-matlab-server' to the install location."
+  :group 'lsp-matlab
+  :type '(string))
+
+(defcustom lsp-clients-matlab-server-args '("--stdio")
+  "MATLAB language server arguments."
+  :group 'lsp-matlab
+  :risky t
+  :type '(repeat string))
+
+(defcustom lsp-clients-matlab-install-path ""
+  "Path to MATLAB to use.
+If not specified, then matlab is used from the system path."
+  :group 'lsp-matlab
+  :type '(string))
+
+(defcustom lsp-clients-matlab-cmd-args ""
+  "Extra arguments the language server should specify when starting MATLAB."
+  :group 'lsp-matlab
+  :type '(string))
+
+(defcustom lsp-clients-matlab-connection-timing "onStart"
+  "When to start the MATLAB language server."
+  :group 'lsp-matlab
+  :type '(choice
+          (const "onStart")
+          (const "onDemand")
+          (const "never")))
+
+(defcustom lsp-clients-matlab-index-workspace nil
+  "Whether or not to use the full background indexer.
+
+Turning this on instructs the MATLAB language server to index all
+*.m files under the project root.  If there are thousands of *.m
+files, then the MATLAB language server may become unresponsive,
+causing hangs."
+  :group 'lsp-matlab
+  :type '(boolean))
+
+(defun matlabls-command ()
+  "Return matlabls launch command LIST."
+  (let ((cmd (flatten-tree `(,lsp-clients-matlab-nodejs
+                             ,lsp-clients-matlab-server
+                             ,@lsp-clients-matlab-server-args))))
+    cmd))
+
+;; lsp-register-custom-settings plus :initialized-fn send following.
+;; For available settings, see src/lifecycle/ConfigurationManager.ts
+;;   Params: {
+;;     "settings": {
+;;       "MATLAB": {
+;;         "telemetry": false,
+;;         "matlabConnectionTiming": "onStart",
+;;         "installPath": "/path/to/matlab",
+;;         "indexWorkspace": false
+;;       }
+;;     }
+;;   }
+;;
+;; Messages from the MATLAB language server:
+;;   - "telemetry/logdata"
+;;        The client can provide usage (telemetry) data to the server which is collected to improve
+;;        the MATLAB language server. Setting telemetry to false tells the language server that the
+;;        client is not sending data which is what Emacs is currently doing.
+;;   - "mvmStateChange"
+;;        When the MATLAB Virtual Machine (mvm) detects a change in MATLAB's state (disconnected,
+;;        ready, or busy) the client will receive these messages. VS Code uses these messages for
+;;        the embedded MATLAB Command Window. Currently, Emacs ignores these.
+;;   - "matlab/connection/update/server”
+;;        This message indicates a change in connection between the language server and MATLAB
+;;        (connecting, connected, or disconnected). In our case, VS Code updates its UI affordance
+;;        to show the active state of MATLAB.
+
+(lsp-register-custom-settings
+ `(("MATLAB.indexWorkspace" nil t)
+   ("MATLAB.installPath" (lambda () lsp-clients-matlab-install-path))
+   ("MATLAB.matlabConnectionTiming" ,lsp-clients-matlab-connection-timing)
+   ("MATLAB.maxFileSizeForAnalysis" 0)
+   ("MATLAB.telemetry" nil t)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection #'matlabls-command)
+                  :major-modes '(matlab-ts-mode matlab-mode)
+                  :ignore-messages '("readFile .*? requested by MATLAB but content not available")
+                  :server-id 'matlab-ls
+                  :language-id "MATLAB"
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                                        (lsp--set-configuration
+                                                         (lsp-configuration-section "MATLAB"))))
+                  :notification-handlers ;; See src/notifications/NotificationService.ts
+                  (ht ("telemetry/logdata" #'ignore)
+                      ("matlab/connection/update/server" #'ignore)
+                      ("matlab/sections" #'ignore)
+                      ("mvmPromptChange" #'ignore)
+                      ("mvmStateChange" #'ignore))))
+
+(provide 'lsp-matlab)
+;;; lsp-matlab.el ends here
+
+;; LocalWords:  defcustom nodejs matlabls npm defun fn
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mdx.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mdx.el
new file mode 100644
index 0000000..9c610ad
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mdx.el
@@ -0,0 +1,66 @@
+;;; lsp-mdx.el --- lsp-mode mdx integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023-2026 lsp-mode maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  LSP client for mdx-analyzer language-server
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-mdx nil
+  "Settings for the mdx language server client."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/mdx-js/mdx-analyzer/tree/main/packages/language-server")
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-mdx-server-command "mdx-language-server"
+  "The binary (or full path to binary) which executes the server."
+  :type 'string
+  :group 'lsp-mdx
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-mdx-server-command-args '("--stdio")
+  "Command-line arguments for the mdx lsp server."
+  :type '(repeat string)
+  :group 'lsp-mdx
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-dependency 'mdx-language-server
+                '(:system "mdx-language-server")
+                '(:npm :package "@mdx-js/language-server"
+                       :path "mdx-language-server"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     (cons (or (executable-find lsp-mdx-server-command)
+                                               (lsp-package-path 'mdx-language-server))
+                                           lsp-mdx-server-command-args)))
+                  :activation-fn (lambda (&rest _args)
+                                   (string-match-p "\\.mdx\\'" (buffer-file-name)))
+                  :priority -2
+                  :server-id 'mdx-analyzer
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'mdx-language-server callback error-callback))))
+
+(provide 'lsp-mdx)
+;;; lsp-mdx.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-meson.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-meson.el
new file mode 100644
index 0000000..54c7e1a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-meson.el
@@ -0,0 +1,126 @@
+;;; lsp-meson.el --- lsp client for meson -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, meson
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; LSP client for Meson language.
+;;
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-meson nil
+  "LSP support for Meson."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/JCWasmx86/mesonlsp"))
+
+(defcustom lsp-meson-server-executable '("mesonlsp")
+  "The meson language server executable to use."
+  :group 'lsp-meson
+  :risky t
+  :type '(repeat string))
+
+(defcustom lsp-meson-ignore-subproject-diagnostics nil
+  "Ignore diagnostics from subprojects."
+  :type '(choice
+          (const :tag "Off" nil)
+          (const :tag "All subprojects" t)
+          (lsp-repeatable-vector :tag "Specific subprojects" string))
+  :group 'lsp-meson)
+
+(defcustom lsp-meson-no-auto-downloads nil
+  "Never automatically download subprojects/wraps."
+  :type '(boolean)
+  :group 'lsp-meson)
+
+(defcustom lsp-meson-disable-inlay-hints nil
+  "Disable inlay hints."
+  :type '(boolean)
+  :group 'lsp-meson)
+
+(defgroup lsp-meson-linting nil
+  "Linting settings for mesonlsp."
+  :group 'lsp-meson)
+
+(defcustom lsp-meson-disable-name-linting nil
+  "Disable checking whether variable names are snake_case."
+  :type '(boolean)
+  :group 'lsp-meson-linting)
+
+(defcustom lsp-meson-disable-all-id-lints nil
+  "Disable linting for unknown string literals relating to compiler/machine IDs."
+  :type '(boolean)
+  :group 'lsp-meson-linting)
+
+(defcustom lsp-meson-disable-compiler-id-linting nil
+  "Disable lints for unknown IDs compared against `compiler.get_id()'."
+  :type '(boolean)
+  :group 'lsp-meson-linting)
+
+(defcustom lsp-meson-disable-compiler-argument-id-linting nil
+  "Disable lints for unknown IDs compared against `compiler.get_argument_syntax()'."
+  :type '(boolean)
+  :group 'lsp-meson-linting)
+
+(defcustom lsp-meson-disable-linker-id-linting nil
+  "Disable lints for unknown IDs compared against `compiler.get_linker_id()'."
+  :type '(boolean)
+  :group 'lsp-meson-linting)
+
+(defcustom lsp-meson-disable-cpu-family-linting nil
+  "Disable lints for unknown IDs compared against `X_machine.cpu_family()'."
+  :type '(boolean)
+  :group 'lsp-meson-linting)
+
+(defcustom lsp-meson-disable-os-family-linting nil
+  "Disable lints for unknown IDs compared against `X_machine.system()'."
+  :type '(boolean)
+  :group 'lsp-meson-linting)
+
+(defun lsp-meson--make-init-options ()
+  "Init options for mesonlsp."
+  `(:others (:ignoreDiagnosticsFromSubprojects
+             ,(if (vectorp lsp-meson-ignore-subproject-diagnostics)
+                  lsp-meson-ignore-subproject-diagnostics
+                (lsp-json-bool lsp-meson-ignore-subproject-diagnostics))
+             :neverDownloadAutomatically ,(lsp-json-bool lsp-meson-no-auto-downloads)
+             :disableInlayHints ,(lsp-json-bool lsp-meson-disable-inlay-hints))
+    :linting (:disableNameLinting ,(lsp-json-bool lsp-meson-disable-name-linting)
+              :disableAllIdLinting ,(lsp-json-bool lsp-meson-disable-all-id-lints)
+              :disableCompilerIdLinting ,(lsp-json-bool lsp-meson-disable-compiler-id-linting)
+              :disableCompilerArgumentIdLinting ,(lsp-json-bool lsp-meson-disable-compiler-argument-id-linting)
+              :disableLinkerIdLinting ,(lsp-json-bool lsp-meson-disable-linker-id-linting)
+              :disableCpuFamilyLinting ,(lsp-json-bool lsp-meson-disable-cpu-family-linting)
+              :disableOsFamilyLinting ,(lsp-json-bool lsp-meson-disable-os-family-linting))))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda () (append lsp-meson-server-executable '("--lsp"))))
+  :activation-fn (lsp-activate-on "meson")
+  :multi-root nil
+  :priority -1
+  :major-modes '(meson-mode)
+  :initialization-options #'lsp-meson--make-init-options
+  :server-id 'mesonlsp))
+
+(lsp-consistency-check lsp-meson)
+
+(provide 'lsp-meson)
+;;; lsp-meson.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mint.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mint.el
new file mode 100644
index 0000000..4a944f0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mint.el
@@ -0,0 +1,49 @@
+;;; lsp-mint.el --- Mint Language Server configuration  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Ivan Yonchovski
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Ivan Yonchovski <yyoncho@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-mint nil
+  "LSP support for mint-lang."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/mint-lang/mint")
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-clients-mint-executable '("mint" "ls")
+  "Command to start the mint language server."
+  :group 'lsp-mint
+  :risky t
+  :type 'file)
+
+;; Mint
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection lsp-clients-mint-executable)
+                  :major-modes '(mint-mode)
+                  :server-id 'mint-ls))
+
+(provide 'lsp-mint)
+;;; lsp-mint.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mode-autoloads.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mode-autoloads.el
new file mode 100644
index 0000000..9979e73
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mode-autoloads.el
@@ -0,0 +1,1158 @@
+;;; lsp-mode-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from lsp-actionscript.el
+
+(register-definition-prefixes "lsp-actionscript" '("lsp-actionscript-"))
+
+
+;;; Generated autoloads from lsp-ada.el
+
+(put 'lsp-ada-project-file 'safe-local-variable 'stringp)
+(register-definition-prefixes "lsp-ada" '("lsp-ada-"))
+
+
+;;; Generated autoloads from lsp-angular.el
+
+(register-definition-prefixes "lsp-angular" '("lsp-client"))
+
+
+;;; Generated autoloads from lsp-ansible.el
+
+(register-definition-prefixes "lsp-ansible" '("lsp-ansible-"))
+
+
+;;; Generated autoloads from lsp-asm.el
+
+(register-definition-prefixes "lsp-asm" '("lsp-asm-"))
+
+
+;;; Generated autoloads from lsp-astro.el
+
+(register-definition-prefixes "lsp-astro" '("lsp-astro--get-initialization-options"))
+
+
+;;; Generated autoloads from lsp-autotools.el
+
+(register-definition-prefixes "lsp-autotools" '("lsp-autotools-"))
+
+
+;;; Generated autoloads from lsp-awk.el
+
+(register-definition-prefixes "lsp-awk" '("lsp-awk-executable"))
+
+
+;;; Generated autoloads from lsp-bash.el
+
+(register-definition-prefixes "lsp-bash" '("lsp-bash-"))
+
+
+;;; Generated autoloads from lsp-beancount.el
+
+(register-definition-prefixes "lsp-beancount" '("lsp-beancount-"))
+
+
+;;; Generated autoloads from lsp-bufls.el
+
+(register-definition-prefixes "lsp-bufls" '("lsp-buf"))
+
+
+;;; Generated autoloads from lsp-c3.el
+
+(register-definition-prefixes "lsp-c3" '("lsp-c"))
+
+
+;;; Generated autoloads from lsp-camel.el
+
+(register-definition-prefixes "lsp-camel" '("lsp-camel-"))
+
+
+;;; Generated autoloads from lsp-clangd.el
+
+(autoload 'lsp-cpp-flycheck-clang-tidy-error-explainer "lsp-clangd" "\
+Explain a clang-tidy ERROR by scraping documentation from llvm.org.
+
+(fn ERROR)")
+(register-definition-prefixes "lsp-clangd" '("lsp-c"))
+
+
+;;; Generated autoloads from lsp-clojure.el
+
+(autoload 'lsp-clojure-show-test-tree "lsp-clojure" "\
+Show a test tree and focus on it if IGNORE-FOCUS? is nil.
+
+(fn IGNORE-FOCUS?)" t)
+(autoload 'lsp-clojure-show-project-tree "lsp-clojure" "\
+Show a project tree with source-paths and dependencies.
+Focus on it if IGNORE-FOCUS? is nil.
+
+(fn IGNORE-FOCUS?)" t)
+(register-definition-prefixes "lsp-clojure" '("lsp-clojure-"))
+
+
+;;; Generated autoloads from lsp-cmake.el
+
+(register-definition-prefixes "lsp-cmake" '("lsp-cmake-"))
+
+
+;;; Generated autoloads from lsp-cobol.el
+
+(add-hook 'cobol-mode-hook #'lsp-cobol-start-ls)
+(autoload 'lsp-cobol-start-ls "lsp-cobol" "\
+Start the COBOL language service." t)
+(register-definition-prefixes "lsp-cobol" '("lsp-cobol-"))
+
+
+;;; Generated autoloads from lsp-completion.el
+
+(define-obsolete-variable-alias 'lsp-prefer-capf 'lsp-completion-provider "\
+lsp-mode 7.0.1")
+(define-obsolete-variable-alias 'lsp-enable-completion-at-point 'lsp-completion-enable "\
+lsp-mode 7.0.1")
+(defvar lsp-completion-enable t "\
+Enable `completion-at-point' integration.")
+(custom-autoload 'lsp-completion-enable "lsp-completion" t)
+(autoload 'lsp-completion-at-point "lsp-completion" "\
+Get lsp completions.")
+(autoload 'lsp-completion--enable "lsp-completion" "\
+Enable LSP completion support.")
+(autoload 'lsp-completion-mode "lsp-completion" "\
+Toggle LSP completion support.
+
+This is a minor mode.  If called interactively, toggle the
+`Lsp-Completion mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `lsp-completion-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(add-hook 'lsp-configure-hook (lambda nil (when (and lsp-auto-configure lsp-completion-enable) (lsp-completion--enable))))
+(register-definition-prefixes "lsp-completion" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-copilot.el
+
+(autoload 'lsp-copilot-check-status "lsp-copilot" "\
+Checks the status of the Copilot Server" t)
+(autoload 'lsp-copilot-login "lsp-copilot" "\
+Log in with Copilot.
+
+This function is automatically called during the client initialization if needed" t)
+(register-definition-prefixes "lsp-copilot" '("lsp-copilot-"))
+
+
+;;; Generated autoloads from lsp-crates.el
+
+(register-definition-prefixes "lsp-crates" '("lsp-crates-"))
+
+
+;;; Generated autoloads from lsp-credo.el
+
+(register-definition-prefixes "lsp-credo" '("lsp-credo-"))
+
+
+;;; Generated autoloads from lsp-crystal.el
+
+(register-definition-prefixes "lsp-crystal" '("lsp-clients-crystal-executable"))
+
+
+;;; Generated autoloads from lsp-csharp.el
+
+(register-definition-prefixes "lsp-csharp" '("lsp-csharp-"))
+
+
+;;; Generated autoloads from lsp-css.el
+
+(register-definition-prefixes "lsp-css" '("lsp-css-"))
+
+
+;;; Generated autoloads from lsp-cucumber.el
+
+(register-definition-prefixes "lsp-cucumber" '("lsp-cucumber-"))
+
+
+;;; Generated autoloads from lsp-cypher.el
+
+(register-definition-prefixes "lsp-cypher" '("lsp-client--cypher-ls-server-command"))
+
+
+;;; Generated autoloads from lsp-diagnostics.el
+
+(define-obsolete-variable-alias 'lsp-diagnostic-package 'lsp-diagnostics-provider "\
+lsp-mode 7.0.1")
+(define-obsolete-variable-alias 'lsp-flycheck-default-level 'lsp-diagnostics-flycheck-default-level "\
+lsp-mode 7.0.1")
+(autoload 'lsp-diagnostics-lsp-checker-if-needed "lsp-diagnostics")
+(autoload 'lsp-diagnostics--enable "lsp-diagnostics" "\
+Enable LSP checker support.")
+(autoload 'lsp-diagnostics-mode "lsp-diagnostics" "\
+Toggle LSP diagnostics integration.
+
+This is a minor mode.  If called interactively, toggle the
+`Lsp-Diagnostics mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `lsp-diagnostics-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(add-hook 'lsp-configure-hook (lambda nil (when lsp-auto-configure (lsp-diagnostics--enable))))
+(register-definition-prefixes "lsp-diagnostics" '("lsp-diagnostics-"))
+
+
+;;; Generated autoloads from lsp-dired.el
+
+(defvar lsp-dired-mode nil "\
+Non-nil if Lsp-Dired mode is enabled.
+See the `lsp-dired-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 `lsp-dired-mode'.")
+(custom-autoload 'lsp-dired-mode "lsp-dired" nil)
+(autoload 'lsp-dired-mode "lsp-dired" "\
+Display `lsp-mode' icons for each file in a dired buffer.
+
+This is a global minor mode.  If called interactively, toggle the
+`Lsp-Dired mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='lsp-dired-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "lsp-dired" '("lsp-dired-"))
+
+
+;;; Generated autoloads from lsp-dockerfile.el
+
+(register-definition-prefixes "lsp-dockerfile" '("lsp-dockerfile-language-server-command"))
+
+
+;;; Generated autoloads from lsp-dot.el
+
+(register-definition-prefixes "lsp-dot" '("lsp-dot--dot-ls-server-command"))
+
+
+;;; Generated autoloads from lsp-earthly.el
+
+(register-definition-prefixes "lsp-earthly" '("lsp-earthly-"))
+
+
+;;; Generated autoloads from lsp-elixir.el
+
+(register-definition-prefixes "lsp-elixir" '("lsp-elixir-"))
+
+
+;;; Generated autoloads from lsp-elm.el
+
+(register-definition-prefixes "lsp-elm" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-emmet.el
+
+(register-definition-prefixes "lsp-emmet" '("lsp-emmet-ls-command"))
+
+
+;;; Generated autoloads from lsp-erlang.el
+
+(register-definition-prefixes "lsp-erlang" '("lsp-erlang-"))
+
+
+;;; Generated autoloads from lsp-eslint.el
+
+(register-definition-prefixes "lsp-eslint" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-fennel.el
+
+(register-definition-prefixes "lsp-fennel" '("lsp-fennel--ls-command"))
+
+
+;;; Generated autoloads from lsp-fish.el
+
+(register-definition-prefixes "lsp-fish" '("lsp-fish-executable"))
+
+
+;;; Generated autoloads from lsp-fortitude.el
+
+(register-definition-prefixes "lsp-fortitude" '("lsp-fortitude-"))
+
+
+;;; Generated autoloads from lsp-fortran.el
+
+(register-definition-prefixes "lsp-fortran" '("lsp-clients-"))
+
+
+;;; Generated autoloads from lsp-fsharp.el
+
+(autoload 'lsp-fsharp--workspace-load "lsp-fsharp" "\
+Load all of the provided PROJECTS.
+
+(fn PROJECTS)")
+(register-definition-prefixes "lsp-fsharp" '("lsp-fsharp-"))
+
+
+;;; Generated autoloads from lsp-gdscript.el
+
+(register-definition-prefixes "lsp-gdscript" '("lsp-gdscript-"))
+
+
+;;; Generated autoloads from lsp-gleam.el
+
+(register-definition-prefixes "lsp-gleam" '("lsp-gleam-executable"))
+
+
+;;; Generated autoloads from lsp-glsl.el
+
+(register-definition-prefixes "lsp-glsl" '("lsp-glsl-executable"))
+
+
+;;; Generated autoloads from lsp-go.el
+
+(register-definition-prefixes "lsp-go" '("lsp-go-"))
+
+
+;;; Generated autoloads from lsp-golangci-lint.el
+
+(register-definition-prefixes "lsp-golangci-lint" '("lsp-golangci-lint-"))
+
+
+;;; Generated autoloads from lsp-graphql.el
+
+(register-definition-prefixes "lsp-graphql" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-groovy.el
+
+(register-definition-prefixes "lsp-groovy" '("lsp-groovy-"))
+
+
+;;; Generated autoloads from lsp-hack.el
+
+(register-definition-prefixes "lsp-hack" '("lsp-clients-hack-command"))
+
+
+;;; Generated autoloads from lsp-haxe.el
+
+(register-definition-prefixes "lsp-haxe" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-headerline.el
+
+(autoload 'lsp-headerline-breadcrumb-mode "lsp-headerline" "\
+Toggle breadcrumb on headerline.
+
+This is a minor mode.  If called interactively, toggle the
+`Lsp-Headerline-Breadcrumb mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `lsp-headerline-breadcrumb-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(autoload 'lsp-breadcrumb-go-to-symbol "lsp-headerline" "\
+Go to the symbol on breadcrumb at SYMBOL-POSITION.
+
+(fn SYMBOL-POSITION)" t)
+(autoload 'lsp-breadcrumb-narrow-to-symbol "lsp-headerline" "\
+Narrow to the symbol range on breadcrumb at SYMBOL-POSITION.
+
+(fn SYMBOL-POSITION)" t)
+(register-definition-prefixes "lsp-headerline" '("lsp-headerline-"))
+
+
+;;; Generated autoloads from lsp-html.el
+
+(register-definition-prefixes "lsp-html" '("lsp-html-"))
+
+
+;;; Generated autoloads from lsp-hy.el
+
+(register-definition-prefixes "lsp-hy" '("lsp-clients-hy-server-executable"))
+
+
+;;; Generated autoloads from lsp-icons.el
+
+(register-definition-prefixes "lsp-icons" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-ido.el
+
+(autoload 'lsp-ido-workspace-symbol "lsp-ido" "\
+`ido' for lsp workspace/symbol.
+When called with prefix ARG the default selection will be symbol at point.
+
+(fn ARG)" t)
+(register-definition-prefixes "lsp-ido" '("lsp-ido-"))
+
+
+;;; Generated autoloads from lsp-idris.el
+
+(register-definition-prefixes "lsp-idris" '("lsp-idris2-lsp-"))
+
+
+;;; Generated autoloads from lsp-iedit.el
+
+(autoload 'lsp-iedit-highlights "lsp-iedit" "\
+Start an `iedit' operation on the documentHighlights at point.
+This can be used as a primitive `lsp-rename' replacement if the
+language server doesn't support renaming.
+
+See also `lsp-enable-symbol-highlighting'." t)
+(autoload 'lsp-iedit-linked-ranges "lsp-iedit" "\
+Start an `iedit' for `textDocument/linkedEditingRange'" t)
+(autoload 'lsp-evil-multiedit-highlights "lsp-iedit" "\
+Start an `evil-multiedit' operation on the documentHighlights at point.
+This can be used as a primitive `lsp-rename' replacement if the
+language server doesn't support renaming.
+
+See also `lsp-enable-symbol-highlighting'." t)
+(autoload 'lsp-evil-multiedit-linked-ranges "lsp-iedit" "\
+Start an `evil-multiedit' for `textDocument/linkedEditingRange'" t)
+(autoload 'lsp-evil-state-highlights "lsp-iedit" "\
+Start `iedit-mode'. for `textDocument/documentHighlight'" t)
+(autoload 'lsp-evil-state-linked-ranges "lsp-iedit" "\
+Start `iedit-mode'. for `textDocument/linkedEditingRange'" t)
+(register-definition-prefixes "lsp-iedit" '("lsp-iedit--on-ranges"))
+
+
+;;; Generated autoloads from lsp-inline-completion.el
+
+(autoload 'lsp-inline-completion-display "lsp-inline-completion" "\
+Displays the inline completions overlay.
+
+(fn &optional IMPLICIT)" t)
+(defvar lsp-inline-completion-enable t "\
+If non-nil it will enable inline completions on idle.")
+(custom-autoload 'lsp-inline-completion-enable "lsp-inline-completion" t)
+(autoload 'lsp-inline-completion-mode "lsp-inline-completion" "\
+Mode automatically displaying inline completions.
+
+This is a minor mode.  If called interactively, toggle the
+`Lsp-Inline-Completion mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `lsp-inline-completion-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(add-hook 'lsp-configure-hook (lambda nil (when (and lsp-inline-completion-enable (lsp-feature? "textDocument/inlineCompletion")) (lsp-inline-completion-mode))))
+(autoload 'lsp-inline-completion-company-integration-mode "lsp-inline-completion" "\
+Minor mode to be used when company mode is active with lsp-inline-completion-mode.
+
+This is a minor mode.  If called interactively, toggle the
+`Lsp-Inline-Completion-Company-Integration mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `lsp-inline-completion-company-integration-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "lsp-inline-completion" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-javascript.el
+
+(register-definition-prefixes "lsp-javascript" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-jq.el
+
+(register-definition-prefixes "lsp-jq" '("lsp-clients-jq-server-executable"))
+
+
+;;; Generated autoloads from lsp-json.el
+
+(register-definition-prefixes "lsp-json" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-jsonnet.el
+
+(register-definition-prefixes "lsp-jsonnet" '("lsp-clients-jsonnet-server-"))
+
+
+;;; Generated autoloads from lsp-just.el
+
+(register-definition-prefixes "lsp-just" '("lsp-just-executable"))
+
+
+;;; Generated autoloads from lsp-kotlin.el
+
+(register-definition-prefixes "lsp-kotlin" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-kubernetes-helm.el
+
+(register-definition-prefixes "lsp-kubernetes-helm" '("lsp-kubernetes-helm-"))
+
+
+;;; Generated autoloads from lsp-lens.el
+
+(autoload 'lsp-lens--enable "lsp-lens" "\
+Enable lens mode.")
+(autoload 'lsp-lens-show "lsp-lens" "\
+Display lenses in the buffer." t)
+(autoload 'lsp-lens-hide "lsp-lens" "\
+Delete all lenses." t)
+(autoload 'lsp-lens-mode "lsp-lens" "\
+Toggle code-lens overlays.
+
+This is a minor mode.  If called interactively, toggle the
+`Lsp-Lens mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `lsp-lens-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(autoload 'lsp-avy-lens "lsp-lens" "\
+Click lsp lens using `avy' package." t)
+(register-definition-prefixes "lsp-lens" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-lisp.el
+
+(autoload 'lsp-lisp-alive-start-ls "lsp-lisp" "\
+Start the alive-lsp." t)
+(register-definition-prefixes "lsp-lisp" '("lsp-lisp-a"))
+
+
+;;; Generated autoloads from lsp-lua.el
+
+(register-definition-prefixes "lsp-lua" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-magik.el
+
+(register-definition-prefixes "lsp-magik" '("lsp-magik-"))
+
+
+;;; Generated autoloads from lsp-markdown.el
+
+(register-definition-prefixes "lsp-markdown" '("lsp-markdown-"))
+
+
+;;; Generated autoloads from lsp-marksman.el
+
+(register-definition-prefixes "lsp-marksman" '("lsp-marksman-"))
+
+
+;;; Generated autoloads from lsp-matlab.el
+
+(register-definition-prefixes "lsp-matlab" '("lsp-clients-matlab-" "matlabls-command"))
+
+
+;;; Generated autoloads from lsp-mdx.el
+
+(register-definition-prefixes "lsp-mdx" '("lsp-mdx-server-command"))
+
+
+;;; Generated autoloads from lsp-meson.el
+
+(register-definition-prefixes "lsp-meson" '("lsp-meson-"))
+
+
+;;; Generated autoloads from lsp-mint.el
+
+(register-definition-prefixes "lsp-mint" '("lsp-clients-mint-executable"))
+
+
+;;; Generated autoloads from lsp-mode.el
+
+(put 'lsp-enable-file-watchers 'safe-local-variable #'booleanp)
+(put 'lsp-file-watch-ignored-directories 'safe-local-variable 'lsp--string-listp)
+(put 'lsp-file-watch-ignored-files 'safe-local-variable 'lsp--string-listp)
+(put 'lsp-file-watch-threshold 'safe-local-variable (lambda (i) (or (numberp i) (not i))))
+(autoload 'lsp--string-listp "lsp-mode" "\
+Return t if all elements of SEQUENCE are strings, else nil.
+
+(fn SEQUENCE)")
+(autoload 'lsp-load-vscode-workspace "lsp-mode" "\
+Load vscode workspace from FILE
+
+(fn FILE)" t)
+(autoload 'lsp-save-vscode-workspace "lsp-mode" "\
+Save vscode workspace to FILE
+
+(fn FILE)" t)
+(autoload 'lsp-install-server "lsp-mode" "\
+Interactively install or re-install server.
+When prefix UPDATE? is t force installation even if the server is present.
+
+(fn UPDATE? &optional SERVER-ID)" t)
+(autoload 'lsp-uninstall-server "lsp-mode" "\
+Delete a LSP server from `lsp-server-install-dir'.
+
+(fn DIR)" t)
+(autoload 'lsp-uninstall-servers "lsp-mode" "\
+Uninstall all installed servers." t)
+(autoload 'lsp-update-server "lsp-mode" "\
+Interactively update (reinstall) a server.
+
+(fn &optional SERVER-ID)" t)
+(autoload 'lsp-update-servers "lsp-mode" "\
+Update (reinstall) all installed servers." t)
+(autoload 'lsp-ensure-server "lsp-mode" "\
+Ensure server SERVER-ID
+
+(fn SERVER-ID)")
+(autoload 'lsp "lsp-mode" "\
+Entry point for the server startup.
+When ARG is t the lsp mode will start new language server even if
+there is language server which can handle current language. When
+ARG is nil current file will be opened in multi folder language
+server if there is such. When `lsp' is called with prefix
+argument ask the user to select which language server to start.
+
+(fn &optional ARG)" t)
+(autoload 'lsp-deferred "lsp-mode" "\
+Entry point that defers server startup until buffer is visible.
+`lsp-deferred' will wait until the buffer is visible before invoking `lsp'.
+This avoids overloading the server with many files when starting Emacs.")
+(autoload 'lsp-start-plain "lsp-mode" "\
+Start `lsp-mode' using minimal configuration using the latest `melpa' version
+of the packages.
+
+In case the major-mode that you are using for " t)
+(register-definition-prefixes "lsp-mode" '("defcustom-lsp" "lsp-" "make-lsp-client" "when-lsp-workspace" "with-lsp-workspace"))
+
+
+;;; Generated autoloads from lsp-modeline.el
+
+(define-obsolete-variable-alias 'lsp-diagnostics-modeline-scope 'lsp-modeline-diagnostics-scope "\
+lsp-mode 7.0.1")
+(autoload 'lsp-modeline-code-actions-mode "lsp-modeline" "\
+Toggle code actions on modeline.
+
+This is a minor mode.  If called interactively, toggle the
+`Lsp-Modeline-Code-Actions mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `lsp-modeline-code-actions-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(define-obsolete-function-alias 'lsp-diagnostics-modeline-mode 'lsp-modeline-diagnostics-mode "lsp-mode 7.0.1")
+(autoload 'lsp-modeline-diagnostics-mode "lsp-modeline" "\
+Toggle diagnostics modeline.
+
+This is a minor mode.  If called interactively, toggle the
+`Lsp-Modeline-Diagnostics mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `lsp-modeline-diagnostics-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(autoload 'lsp-modeline-workspace-status-mode "lsp-modeline" "\
+Toggle workspace status on modeline.
+
+This is a minor mode.  If called interactively, toggle the
+`Lsp-Modeline-Workspace-Status mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `lsp-modeline-workspace-status-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "lsp-modeline" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-mojo.el
+
+(register-definition-prefixes "lsp-mojo" '("lsp-mojo-executable"))
+
+
+;;; Generated autoloads from lsp-move.el
+
+(register-definition-prefixes "lsp-move" '("lsp-clients-"))
+
+
+;;; Generated autoloads from lsp-nextflow.el
+
+(register-definition-prefixes "lsp-nextflow" '("lsp-nextflow-"))
+
+
+;;; Generated autoloads from lsp-nginx.el
+
+(register-definition-prefixes "lsp-nginx" '("lsp-nginx-"))
+
+
+;;; Generated autoloads from lsp-nim.el
+
+(register-definition-prefixes "lsp-nim" '("lsp-nim-l"))
+
+
+;;; Generated autoloads from lsp-nix.el
+
+(register-definition-prefixes "lsp-nix" '("lsp-nix-"))
+
+
+;;; Generated autoloads from lsp-nushell.el
+
+(register-definition-prefixes "lsp-nushell" '("lsp-nushell-language-server-command"))
+
+
+;;; Generated autoloads from lsp-ocaml.el
+
+(register-definition-prefixes "lsp-ocaml" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-odin.el
+
+(register-definition-prefixes "lsp-odin" '("lsp-odin-"))
+
+
+;;; Generated autoloads from lsp-openscad.el
+
+(register-definition-prefixes "lsp-openscad" '("lsp-openscad-"))
+
+
+;;; Generated autoloads from lsp-perl.el
+
+(register-definition-prefixes "lsp-perl" '("lsp-perl-"))
+
+
+;;; Generated autoloads from lsp-perlnavigator.el
+
+(register-definition-prefixes "lsp-perlnavigator" '("lsp-perlnavigator-"))
+
+
+;;; Generated autoloads from lsp-php.el
+
+(register-definition-prefixes "lsp-php" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-pls.el
+
+(register-definition-prefixes "lsp-pls" '("lsp-pls-"))
+
+
+;;; Generated autoloads from lsp-postgres.el
+
+(register-definition-prefixes "lsp-postgres" '("lsp-postgres-"))
+
+
+;;; Generated autoloads from lsp-prolog.el
+
+(register-definition-prefixes "lsp-prolog" '("lsp-prolog-server-command"))
+
+
+;;; Generated autoloads from lsp-protocol.el
+
+(register-definition-prefixes "lsp-protocol" '("dash-expand:&RangeToPoint" "lsp"))
+
+
+;;; Generated autoloads from lsp-purescript.el
+
+(register-definition-prefixes "lsp-purescript" '("lsp-purescript-"))
+
+
+;;; Generated autoloads from lsp-pwsh.el
+
+(register-definition-prefixes "lsp-pwsh" '("lsp-pwsh-"))
+
+
+;;; Generated autoloads from lsp-pyls.el
+
+(register-definition-prefixes "lsp-pyls" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-pylsp.el
+
+(register-definition-prefixes "lsp-pylsp" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-python-ty.el
+
+(register-definition-prefixes "lsp-python-ty" '("lsp-python-ty-clients-server-command"))
+
+
+;;; Generated autoloads from lsp-qml.el
+
+(register-definition-prefixes "lsp-qml" '("lsp-qml-server-command"))
+
+
+;;; Generated autoloads from lsp-r.el
+
+(register-definition-prefixes "lsp-r" '("lsp-clients-r-server-command"))
+
+
+;;; Generated autoloads from lsp-racket.el
+
+(register-definition-prefixes "lsp-racket" '("lsp-racket-lang"))
+
+
+;;; Generated autoloads from lsp-remark.el
+
+(register-definition-prefixes "lsp-remark" '("lsp-remark-server-command"))
+
+
+;;; Generated autoloads from lsp-rf.el
+
+(register-definition-prefixes "lsp-rf" '("expand-start-command" "lsp-rf-language-server-" "parse-rf-language-server-"))
+
+
+;;; Generated autoloads from lsp-ron.el
+
+(register-definition-prefixes "lsp-ron" '("lsp-ron-executable"))
+
+
+;;; Generated autoloads from lsp-roslyn.el
+
+(register-definition-prefixes "lsp-roslyn" '("lsp-roslyn-"))
+
+
+;;; Generated autoloads from lsp-rpm-spec.el
+
+(register-definition-prefixes "lsp-rpm-spec" '("lsp-rpm-spec-"))
+
+
+;;; Generated autoloads from lsp-rubocop.el
+
+(register-definition-prefixes "lsp-rubocop" '("lsp-rubocop-"))
+
+
+;;; Generated autoloads from lsp-ruby-lsp.el
+
+(register-definition-prefixes "lsp-ruby-lsp" '("lsp-ruby-lsp-"))
+
+
+;;; Generated autoloads from lsp-ruby-syntax-tree.el
+
+(register-definition-prefixes "lsp-ruby-syntax-tree" '("lsp-ruby-syntax-tree-"))
+
+
+;;; Generated autoloads from lsp-ruff.el
+
+(register-definition-prefixes "lsp-ruff" '("lsp-ruff-"))
+
+
+;;; Generated autoloads from lsp-rust.el
+
+(register-definition-prefixes "lsp-rust" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-semantic-tokens.el
+
+(defvar-local semantic-token-modifier-cache (make-hash-table) "\
+A cache of modifier values to the selected fonts.
+This allows whole-bitmap lookup instead of checking each bit. The
+expectation is that usage of modifiers will tend to cluster, so
+we will not have the full range of possible usages, hence a
+tractable hash map.
+
+This is set as buffer-local. It should probably be shared in a
+given workspace/language-server combination.
+
+This cache should be flushed every time any modifier
+configuration changes.")
+(autoload 'lsp--semantic-tokens-initialize-buffer "lsp-semantic-tokens" "\
+Initialize the buffer for semantic tokens.
+IS-RANGE-PROVIDER is non-nil when server supports range requests.")
+(autoload 'lsp--semantic-tokens-initialize-workspace "lsp-semantic-tokens" "\
+Initialize semantic tokens for WORKSPACE.
+
+(fn WORKSPACE)")
+(autoload 'lsp-semantic-tokens--warn-about-deprecated-setting "lsp-semantic-tokens" "\
+Warn about deprecated semantic highlighting variable.")
+(autoload 'lsp-semantic-tokens--enable "lsp-semantic-tokens" "\
+Enable semantic tokens mode.")
+(autoload 'lsp-semantic-tokens-mode "lsp-semantic-tokens" "\
+Toggle semantic-tokens support.
+
+This is a minor mode.  If called interactively, toggle the
+`Lsp-Semantic-Tokens mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `lsp-semantic-tokens-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "lsp-semantic-tokens" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-semgrep.el
+
+(register-definition-prefixes "lsp-semgrep" '("lsp-semgrep-" "semgrep-"))
+
+
+;;; Generated autoloads from lsp-sml.el
+
+(register-definition-prefixes "lsp-sml" '("lsp-sml-millet-"))
+
+
+;;; Generated autoloads from lsp-solargraph.el
+
+(register-definition-prefixes "lsp-solargraph" '("lsp-solargraph-"))
+
+
+;;; Generated autoloads from lsp-solidity.el
+
+(register-definition-prefixes "lsp-solidity" '("lsp-client--solidity-"))
+
+
+;;; Generated autoloads from lsp-sorbet.el
+
+(register-definition-prefixes "lsp-sorbet" '("lsp-sorbet-"))
+
+
+;;; Generated autoloads from lsp-sql.el
+
+(register-definition-prefixes "lsp-sql" '("lsp-sql-"))
+
+
+;;; Generated autoloads from lsp-sqls.el
+
+(register-definition-prefixes "lsp-sqls" '("lsp-sql"))
+
+
+;;; Generated autoloads from lsp-steep.el
+
+(register-definition-prefixes "lsp-steep" '("lsp-steep-"))
+
+
+;;; Generated autoloads from lsp-svelte.el
+
+(register-definition-prefixes "lsp-svelte" '("lsp-svelte-plugin-"))
+
+
+;;; Generated autoloads from lsp-tailwindcss.el
+
+(autoload 'lsp-tailwindcss-rustywind "lsp-tailwindcss" "\
+[Experimental] Sort tailwindcss class name using rustywind." t)
+(autoload 'lsp-tailwindcss-rustywind-before-save "lsp-tailwindcss" "\
+[Experimental] Run rustywind when saving buffer.
+By adding this to `before-save-hook', it only runs when
+lsp-tailwindcss can be activated, see `lsp-tailwindcss--activate-p'.")
+(autoload 'lsp-tailwindcss-installed-server-version "lsp-tailwindcss" "\
+Get the installed version of tailwindcss language server." t)
+(register-definition-prefixes "lsp-tailwindcss" '("lsp-tailwindcss-"))
+
+
+;;; Generated autoloads from lsp-terraform.el
+
+(register-definition-prefixes "lsp-terraform" '("construct-tf-package" "lsp-t"))
+
+
+;;; Generated autoloads from lsp-tex.el
+
+(register-definition-prefixes "lsp-tex" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-toml.el
+
+(register-definition-prefixes "lsp-toml" '("lsp-toml-"))
+
+
+;;; Generated autoloads from lsp-toml-tombi.el
+
+(register-definition-prefixes "lsp-toml-tombi" '("lsp-tombi-toml-"))
+
+
+;;; Generated autoloads from lsp-trunk.el
+
+(register-definition-prefixes "lsp-trunk" '("lsp-trunk-"))
+
+
+;;; Generated autoloads from lsp-ts-query.el
+
+(register-definition-prefixes "lsp-ts-query" '("lsp-ts-query-"))
+
+
+;;; Generated autoloads from lsp-ttcn3.el
+
+(register-definition-prefixes "lsp-ttcn3" '("lsp-ttcn3-lsp-server-command"))
+
+
+;;; Generated autoloads from lsp-typeprof.el
+
+(register-definition-prefixes "lsp-typeprof" '("lsp-typeprof-"))
+
+
+;;; Generated autoloads from lsp-typespec.el
+
+(register-definition-prefixes "lsp-typespec" '("lsp-typespec-"))
+
+
+;;; Generated autoloads from lsp-typos.el
+
+(register-definition-prefixes "lsp-typos" '("lsp-typos-"))
+
+
+;;; Generated autoloads from lsp-typst.el
+
+(register-definition-prefixes "lsp-typst" '("lsp-typst-server-command"))
+
+
+;;; Generated autoloads from lsp-v.el
+
+(register-definition-prefixes "lsp-v" '("lsp-v-"))
+
+
+;;; Generated autoloads from lsp-vala.el
+
+(register-definition-prefixes "lsp-vala" '("lsp-clients-vala-ls-executable"))
+
+
+;;; Generated autoloads from lsp-verilog.el
+
+(register-definition-prefixes "lsp-verilog" '("lsp-clients-"))
+
+
+;;; Generated autoloads from lsp-vetur.el
+
+(register-definition-prefixes "lsp-vetur" '("lsp-vetur-"))
+
+
+;;; Generated autoloads from lsp-vhdl.el
+
+(register-definition-prefixes "lsp-vhdl" '("ghdl-ls-bin-name" "hdl-checker-bin-name" "lsp-vhdl-" "vhdl-"))
+
+
+;;; Generated autoloads from lsp-vimscript.el
+
+(register-definition-prefixes "lsp-vimscript" '("lsp-clients-vim-"))
+
+
+;;; Generated autoloads from lsp-volar.el
+
+(register-definition-prefixes "lsp-volar" '("lsp-volar-"))
+
+
+;;; Generated autoloads from lsp-wat.el
+
+(register-definition-prefixes "lsp-wat" '("lsp-wat-"))
+
+
+;;; Generated autoloads from lsp-wgsl.el
+
+(register-definition-prefixes "lsp-wgsl" '("lsp-wgsl-"))
+
+
+;;; Generated autoloads from lsp-xml.el
+
+(register-definition-prefixes "lsp-xml" '("lsp-xml-"))
+
+
+;;; Generated autoloads from lsp-yaml.el
+
+(register-definition-prefixes "lsp-yaml" '("lsp-"))
+
+
+;;; Generated autoloads from lsp-yang.el
+
+(register-definition-prefixes "lsp-yang" '("lsp-yang-"))
+
+
+;;; Generated autoloads from lsp-zig.el
+
+(register-definition-prefixes "lsp-zig" '("lsp-z"))
+
+;;; End of scraped data
+
+(provide 'lsp-mode-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; lsp-mode-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mode-pkg.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mode-pkg.el
new file mode 100644
index 0000000..b0da34c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mode-pkg.el
@@ -0,0 +1,15 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "lsp-mode" "20260716.755"
+  "LSP mode."
+  '((emacs         "29.1")
+    (dash          "2.18.0")
+    (f             "0.21.0")
+    (ht            "2.3")
+    (spinner       "1.7.3")
+    (markdown-mode "2.3")
+    (lv            "0")
+    (eldoc         "1.11"))
+  :url "https://github.com/emacs-lsp/lsp-mode"
+  :commit "6bfc593d7b1bc0dd656f09ffce52cc085ebced05"
+  :revdesc "6bfc593d7b1b"
+  :keywords '("languages"))
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mode.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mode.el
new file mode 100644
index 0000000..86886c6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mode.el
@@ -0,0 +1,10597 @@
+;;; lsp-mode.el --- LSP mode                              -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: Vibhav Pant, Fangrui Song, Ivan Yonchovski
+;; Keywords: languages
+;; Package-Requires: ((emacs "29.1") (dash "2.18.0") (f "0.21.0") (ht "2.3") (spinner "1.7.3") (markdown-mode "2.3") (lv "0") (eldoc "1.11"))
+;; Package-Version: 20260716.755
+;; Package-Revision: 6bfc593d7b1b
+
+;; URL: https://github.com/emacs-lsp/lsp-mode
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Emacs client/library for the Language Server Protocol
+
+;;; Code:
+
+(require 'cl-generic)
+(require 'cl-lib)
+(require 'compile)
+(require 'dash)
+(require 'epg)
+(require 'ewoc)
+(require 'f)
+(require 'filenotify)
+(require 'files)
+(require 'ht)
+(require 'imenu)
+(require 'inline)
+(require 'json)
+(require 'lv)
+(require 'markdown-mode)
+(require 'network-stream)
+(require 'pcase)
+(require 'rx)
+(require 's)
+(require 'seq)
+(require 'spinner)
+(require 'subr-x)
+(require 'tree-widget)
+(require 'url-parse)
+(require 'url-util)
+(require 'widget)
+(require 'xref)
+(require 'minibuffer)
+(require 'help-mode)
+(require 'vc-git)
+(require 'lsp-protocol)
+
+(defgroup lsp-mode nil
+  "Language Server Protocol client."
+  :group 'tools
+  :tag "Language Server (lsp-mode)")
+
+(declare-function evil-set-command-property "ext:evil-common")
+(declare-function projectile-project-root "ext:projectile")
+(declare-function yas-expand-snippet "ext:yasnippet")
+(declare-function dap-mode "ext:dap-mode")
+(declare-function dap-auto-configure-mode "ext:dap-mode")
+
+(defvar yas-inhibit-overlay-modification-protection)
+(defvar yas-indent-line)
+(defvar yas-wrap-around-region)
+(defvar yas-also-auto-indent-first-line)
+(defvar dap-auto-configure-mode)
+(defvar dap-ui-menu-items)
+(defvar company-minimum-prefix-length)
+
+(defconst lsp--message-type-face
+  `((1 . ,compilation-error-face)
+    (2 . ,compilation-warning-face)
+    (3 . ,compilation-message-face)
+    (4 . ,compilation-info-face)))
+
+(defconst lsp--errors
+  '((-32700 "Parse Error")
+    (-32600 "Invalid Request")
+    (-32601 "Method not Found")
+    (-32602 "Invalid Parameters")
+    (-32603 "Internal Error")
+    (-32099 "Server Start Error")
+    (-32000 "Server End Error")
+    (-32002 "Server Not Initialized")
+    (-32001 "Unknown Error Code")
+    (-32800 "Request Cancelled"))
+  "Alist of error codes to user friendly strings.")
+
+(defconst lsp--empty-ht (make-hash-table))
+
+(eval-and-compile
+  (defun dash-expand:&lsp-wks (key source)
+    `(,(intern-soft (format "lsp--workspace-%s" (eval key))) ,source))
+
+  (defun dash-expand:&lsp-cln (key source)
+    `(,(intern-soft (format "lsp--client-%s" (eval key))) ,source)))
+
+(define-obsolete-variable-alias 'lsp-print-io 'lsp-log-io "lsp-mode 6.1")
+
+(defcustom lsp-log-io nil
+  "If non-nil, log all messages from the language server to a *lsp-log* buffer."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defcustom lsp-log-io-allowlist-methods '()
+  "The methods to filter before print to lsp-log-io."
+  :group 'lsp-mode
+  :type '(repeat string)
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-log-max message-log-max
+  "Maximum number of lines to keep in the log buffer.
+If nil, disable message logging.  If t, log messages but don’t truncate
+the buffer when it becomes large."
+  :group 'lsp-mode
+  :type '(choice (const :tag "Disable" nil)
+                 (integer :tag "lines")
+                 (const :tag "Unlimited" t))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-io-messages-max t
+  "Maximum number of messages that can be locked in a `lsp-io' buffer."
+  :group 'lsp-mode
+  :type '(choice (const :tag "Unlimited" t)
+                 (integer :tag "Messages"))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-keep-workspace-alive t
+  "If non nil keep workspace alive when the last workspace buffer is closed."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defcustom lsp-enable-snippet t
+  "Enable/disable snippet completion support."
+  :group 'lsp-completion
+  :type 'boolean)
+
+(defcustom lsp-enable-folding t
+  "Enable/disable code folding support."
+  :group 'lsp-mode
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(define-obsolete-variable-alias 'lsp-enable-semantic-highlighting 'lsp-semantic-tokens-enable "lsp-mode 8.0.0")
+
+(defcustom lsp-semantic-tokens-enable nil
+  "Enable/disable support for semantic tokens.
+As defined by the Language Server Protocol 3.16."
+  :group 'lsp-semantic-tokens
+  :type 'boolean)
+
+(defcustom lsp-folding-range-limit nil
+  "The maximum number of folding ranges to receive from the language server."
+  :group 'lsp-mode
+  :type '(choice (const :tag "No limit." nil)
+                 (integer :tag "Number of lines."))
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-folding-line-folding-only nil
+  "If non-nil, only fold complete lines."
+  :group 'lsp-mode
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-client-packages
+  '( ccls lsp-actionscript lsp-ada lsp-angular lsp-ansible lsp-asm lsp-astro
+     lsp-autotools lsp-awk lsp-bash lsp-beancount lsp-biome lsp-bufls lsp-clangd
+     lsp-clojure lsp-cmake lsp-cobol lsp-credo lsp-crystal lsp-csharp lsp-c3
+     lsp-css lsp-copilot lsp-crates lsp-cucumber lsp-cypher lsp-d lsp-dart
+     lsp-dhall lsp-docker lsp-dockerfile lsp-earthly lsp-elixir lsp-elm lsp-emmet
+     lsp-erlang lsp-eslint lsp-fortitude lsp-fortran lsp-futhark lsp-fsharp lsp-fish lsp-gdscript
+     lsp-gleam lsp-glsl lsp-go lsp-golangci-lint lsp-grammarly lsp-graphql
+     lsp-groovy lsp-hack lsp-haskell lsp-haxe lsp-idris lsp-java lsp-javascript
+     lsp-just lsp-jq lsp-json lsp-kotlin lsp-kubernetes-helm lsp-latex lsp-lisp
+     lsp-ltex lsp-ltex-plus lsp-lua lsp-fennel lsp-magik lsp-markdown
+     lsp-marksman lsp-matlab lsp-mdx lsp-meson lsp-metals lsp-mint lsp-mojo
+     lsp-move lsp-mssql lsp-nextflow lsp-nginx lsp-nim lsp-nix lsp-nushell
+     lsp-ocaml lsp-odin lsp-openscad lsp-pascal lsp-perl lsp-perlnavigator
+      lsp-php lsp-pls lsp-postgres lsp-prisma lsp-purescript lsp-pwsh lsp-pyls lsp-pylsp
+     lsp-pyright lsp-python-ms lsp-python-ty lsp-qml lsp-r lsp-racket lsp-remark
+     lsp-rf lsp-roc lsp-ron lsp-roslyn lsp-rubocop lsp-ruby-lsp
+     lsp-ruby-syntax-tree lsp-ruff lsp-rust lsp-semgrep lsp-shader
+     lsp-solargraph lsp-solidity lsp-sonarlint lsp-sorbet lsp-sourcekit
+     lsp-sql lsp-sqls lsp-steep lsp-svelte lsp-tailwindcss lsp-terraform
+     lsp-tex lsp-tilt lsp-toml lsp-toml-tombi lsp-trunk lsp-ts-query lsp-ttcn3
+     lsp-typeprof lsp-typespec lsp-typst lsp-typos lsp-v lsp-vala lsp-verilog
+     lsp-vetur lsp-vhdl lsp-vimscript lsp-volar lsp-wat lsp-wgsl lsp-xml
+     lsp-yaml lsp-yang lsp-zig)
+  "List of the clients to be automatically required."
+  :group 'lsp-mode
+  :type '(repeat symbol))
+
+(defcustom lsp-progress-via-spinner t
+  "If non-nil, display LSP $/progress reports via a spinner in the modeline."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defcustom lsp-progress-spinner-type 'progress-bar
+  "Holds the type of spinner to be used in the mode-line.
+Takes a value accepted by `spinner-start'."
+  :group 'lsp-mode
+  :type `(choice :tag "Choose a spinner by name"
+                 ,@(mapcar (lambda (c) (list 'const (car c)))
+                           spinner-types)))
+
+(defvar-local lsp-use-workspace-root-for-server-default-directory nil
+  "Use `lsp-workspace-root' for `default-directory' when starting LSP process.")
+
+(defvar-local lsp--cur-workspace nil)
+
+(defvar-local lsp--cur-version 0)
+(defvar-local lsp--virtual-buffer-connections nil)
+(defvar-local lsp--virtual-buffer nil)
+(defvar lsp--virtual-buffer-mappings (ht))
+
+(defvar lsp--uri-file-prefix (pcase system-type
+                               (`windows-nt "file:///")
+                               (_ "file://"))
+  "Prefix for a file-uri.")
+
+(defvar-local lsp-buffer-uri nil
+  "If set, return it instead of calculating it using `buffer-file-name'.")
+
+(define-error 'lsp-error "Unknown lsp-mode error")
+(define-error 'lsp-empty-response-error
+  "Empty response from the language server" 'lsp-error)
+(define-error 'lsp-timed-out-error
+  "Timed out while waiting for a response from the language server" 'lsp-error)
+(define-error 'lsp-capability-not-supported
+  "Capability not supported by the language server" 'lsp-error)
+(define-error 'lsp-file-scheme-not-supported
+  "Unsupported file scheme" 'lsp-error)
+(define-error 'lsp-client-already-exists-error
+  "A client with this server-id already exists" 'lsp-error)
+(define-error 'lsp-no-code-actions
+  "No code actions" 'lsp-error)
+
+(defcustom lsp-auto-guess-root nil
+  "Automatically guess the project root using projectile/project.
+Do *not* use this setting unless you are familiar with `lsp-mode'
+internals and you are sure that all of your projects are
+following `projectile'/`project.el' conventions."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defcustom lsp-guess-root-without-session nil
+  "Ignore the session file when calculating the project root.
+You almost always want to set lsp-auto-guess-root too.
+Do *not* use this setting unless you are familiar with `lsp-mode'
+internals and you are sure that all of your projects are
+following `projectile'/`project.el' conventions."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defcustom lsp-restart 'interactive
+  "Defines how server-exited events must be handled."
+  :group 'lsp-mode
+  :type '(choice (const interactive)
+                 (const auto-restart)
+                 (const ignore)))
+
+(defcustom lsp-session-file (expand-file-name (locate-user-emacs-file ".lsp-session-v1"))
+  "File where session information is stored."
+  :group 'lsp-mode
+  :type 'file)
+
+(defcustom lsp-auto-configure t
+  "Auto configure `lsp-mode' main features.
+When set to t `lsp-mode' will auto-configure completion,
+code-actions, breadcrumb, `flycheck', `flymake', `imenu', symbol highlighting,
+lenses, links, and so on.
+
+For finer granularity you may use `lsp-enable-*' properties."
+  :group 'lsp-mode
+  :type 'boolean
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-disabled-clients nil
+  "A list of disabled/blocklisted clients.
+Each entry in the list can be either:
+a symbol, the server-id for the LSP client, or
+a cons pair (MAJOR-MODE . CLIENTS), where MAJOR-MODE is the major-mode,
+and CLIENTS is either a client or a list of clients.
+
+This option can also be used as a file- or directory-local variable to
+disable a language server for individual files or directories/projects
+respectively."
+  :group 'lsp-mode
+  :type '(repeat (symbol))
+  :safe 'listp
+  :package-version '(lsp-mode . "6.1"))
+
+(defvar lsp-clients (make-hash-table :test 'eql)
+  "Hash table server-id -> client.
+It contains all of the clients that are currently registered.")
+
+(defvar lsp-enabled-clients nil
+  "List of clients allowed to be used for projects.
+When nil, all registered clients are considered candidates.")
+
+(defvar lsp-last-id 0
+  "Last request id.")
+
+(defcustom lsp-before-initialize-hook nil
+  "List of functions to be called before a Language Server has been initialized
+for a new workspace."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-after-initialize-hook nil
+  "List of functions to be called after a Language Server has been initialized
+for a new workspace."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-before-open-hook nil
+  "List of functions to be called before a new file with LSP support is opened."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-after-open-hook nil
+  "List of functions to be called after a new file with LSP support is opened."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-enable-file-watchers t
+  "If non-nil lsp-mode will watch the files in the workspace if
+the server has requested that."
+  :type 'boolean
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.1"))
+;;;###autoload(put 'lsp-enable-file-watchers 'safe-local-variable #'booleanp)
+
+(define-obsolete-variable-alias 'lsp-file-watch-ignored 'lsp-file-watch-ignored-directories "8.0.0")
+
+(defcustom lsp-file-watch-ignored-directories
+  '(; SCM tools
+    "[/\\\\]\\.git\\'"
+    "[/\\\\]\\.github\\'"
+    "[/\\\\]\\.gitlab\\'"
+    "[/\\\\]\\.circleci\\'"
+    "[/\\\\]\\.hg\\'"
+    "[/\\\\]\\.bzr\\'"
+    "[/\\\\]_darcs\\'"
+    "[/\\\\]\\.svn\\'"
+    "[/\\\\]_FOSSIL_\\'"
+    "[/\\\\]\\.jj\\'"
+    ;; IDE or build tools
+    "[/\\\\]\\.idea\\'"
+    "[/\\\\]\\.ensime_cache\\'"
+    "[/\\\\]\\.eunit\\'"
+    "[/\\\\]node_modules"
+    "[/\\\\]\\.yarn\\'"
+    "[/\\\\]\\.turbo\\'"
+    "[/\\\\]\\.fslckout\\'"
+    "[/\\\\]\\.tox\\'"
+    "[/\\\\]\\.nox\\'"
+    "[/\\\\]dist\\'"
+    "[/\\\\]dist-newstyle\\'"
+    "[/\\\\]\\.hifiles\\'"
+    "[/\\\\]\\.hiefiles\\'"
+    "[/\\\\]\\.stack-work\\'"
+    "[/\\\\]\\.bloop\\'"
+    "[/\\\\]\\.bsp\\'"
+    "[/\\\\]\\.metals\\'"
+    "[/\\\\]target\\'"
+    "[/\\\\]\\.ccls-cache\\'"
+    "[/\\\\]\\.vs\\'"
+    "[/\\\\]\\.vscode\\'"
+    "[/\\\\]\\.venv\\'"
+    "[/\\\\]\\.mypy_cache\\'"
+    "[/\\\\]\\.pytest_cache\\'"
+    ;; Swift Package Manager
+    "[/\\\\]\\.build\\'"
+    ;; Python
+    "[/\\\\]__pycache__\\'"
+    "[/\\\\]site-packages\\'"
+    "[/\\\\].pyenv\\'"
+    ;; Autotools output
+    "[/\\\\]\\.deps\\'"
+    "[/\\\\]build-aux\\'"
+    "[/\\\\]autom4te.cache\\'"
+    "[/\\\\]\\.reference\\'"
+    ;; Bazel
+    "[/\\\\]bazel-[^/\\\\]+\\'"
+    ;; CSharp
+    "[/\\\\]\\.cache[/\\\\]lsp-csharp\\'"
+    "[/\\\\]\\.meta\\'"
+    "[/\\\\]\\.nuget\\'"
+    ;; Lean 4
+    "[/\\\\]\\.lake\\'"
+    ;; Unity
+    "[/\\\\]Library\\'"
+    ;; Clojure
+    "[/\\\\]\\.lsp\\'"
+    "[/\\\\]\\.clj-kondo\\'"
+    "[/\\\\]\\.shadow-cljs\\'"
+    "[/\\\\]\\.babel_cache\\'"
+    "[/\\\\]\\.cpcache\\'"
+    "[/\\\\]\\checkouts\\'"
+    ;; Gradle
+    "[/\\\\]\\.gradle\\'"
+    ;; Maven
+    "[/\\\\]\\.m2\\'"
+    ;; .Net Core build-output
+    "[/\\\\]bin/Debug\\'"
+    "[/\\\\]obj\\'"
+    ;; OCaml and Dune
+    "[/\\\\]_opam\\'"
+    "[/\\\\]_build\\'"
+    ;; Elixir
+    "[/\\\\]\\.elixir_ls\\'"
+    ;; Elixir Credo
+    "[/\\\\]\\.elixir-tools\\'"
+    ;; terraform and terragrunt
+    "[/\\\\]\\.terraform\\'"
+    "[/\\\\]\\.terragrunt-cache\\'"
+    ;; nix-direnv
+    "[/\\\\]\\result"
+    "[/\\\\]\\result-bin"
+    "[/\\\\]\\.direnv\\'"
+    ;; nix-devenv
+    "[/\\\\]\\.devenv\\'")
+  "List of regexps matching directory paths which won't be monitored when
+creating file watches. Customization of this variable is only honored at
+the global level or at a root of an lsp workspace."
+  :group 'lsp-mode
+  :type '(repeat string)
+  :package-version '(lsp-mode . "8.0.0"))
+
+(define-obsolete-function-alias 'lsp-file-watch-ignored 'lsp-file-watch-ignored-directories "7.0.1")
+
+(defun lsp-file-watch-ignored-directories ()
+  lsp-file-watch-ignored-directories)
+
+;; Allow lsp-file-watch-ignored-directories as a file or directory-local variable
+;;;###autoload(put 'lsp-file-watch-ignored-directories 'safe-local-variable 'lsp--string-listp)
+
+(defcustom lsp-file-watch-ignored-files
+  '(
+    ;; Flycheck tempfiles
+    "[/\\\\]flycheck_[^/\\\\]+\\'"
+    ;; lockfiles
+    "[/\\\\]\\.#[^/\\\\]+\\'"
+    ;; backup files
+    "[/\\\\][^/\\\\]+~\\'" )
+  "List of regexps matching files for which change events will
+not be sent to the server.
+
+This setting has no impact on whether a file-watch is created for
+a directory; it merely prevents notifications pertaining to
+matched files from being sent to the server.  To prevent a
+file-watch from being created for a directory, customize
+`lsp-file-watch-ignored-directories'
+
+Customization of this variable is only honored at the global
+level or at a root of an lsp workspace."
+  :group 'lsp-mode
+  :type '(repeat string)
+  :package-version '(lsp-mode . "8.0.0"))
+
+;; Allow lsp-file-watch-ignored-files as a file or directory-local variable
+;;;###autoload(put 'lsp-file-watch-ignored-files 'safe-local-variable 'lsp--string-listp)
+
+(defcustom lsp-after-uninitialized-functions nil
+  "List of functions to be called after a Language Server has been uninitialized."
+  :type 'hook
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.3"))
+
+(defconst lsp--sync-full 1)
+(defconst lsp--sync-incremental 2)
+
+(defcustom lsp-debounce-full-sync-notifications t
+  "If non-nil debounce full sync events.
+This flag affects only servers which do not support incremental updates."
+  :type 'boolean
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-debounce-full-sync-notifications-interval 1.0
+  "Time to wait before sending full sync synchronization after buffer modification."
+  :type 'float
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.1"))
+
+(defvar lsp--stderr-index 0)
+
+(defvar lsp--delayed-requests nil)
+(defvar lsp--delay-timer nil)
+
+(defcustom lsp-document-sync-method nil
+  "How to sync the document with the language server."
+  :type '(choice (const :tag "Documents are synced by always sending the full content of the document." lsp--sync-full)
+                 (const :tag "Documents are synced by always sending incremental changes to the document." lsp--sync-incremental)
+                 (const :tag "Use the method recommended by the language server." nil))
+  :group 'lsp-mode)
+
+(defcustom lsp-auto-execute-action t
+  "Auto-execute single action."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defcustom lsp-enable-links t
+  "If non-nil, all references to links in a file will be made clickable, if
+supported by the language server."
+  :type 'boolean
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-enable-imenu t
+  "If non-nil, automatically enable `imenu' integration when server provides
+`textDocument/documentSymbol'."
+  :type 'boolean
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-enable-dap-auto-configure t
+  "If non-nil, enable `dap-auto-configure-mode`."
+  :type 'boolean
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "7.0"))
+
+(defcustom lsp-eldoc-enable-hover t
+  "If non-nil, `eldoc' will display hover info when it is present."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defcustom lsp-eldoc-render-all nil
+  "Display all of the info returned by textDocument/hover.
+If this is set to nil, `eldoc' will show only the symbol information."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defcustom lsp-enable-symbol-highlighting t
+  "Highlight references of the symbol at point."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defcustom lsp-enable-xref t
+  "Enable xref integration."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(define-obsolete-variable-alias
+  'lsp-references-exclude-definition
+  'lsp-references-exclude-declaration
+  "10.0.0")
+
+(defcustom lsp-references-exclude-declaration nil
+  "If non-nil, exclude declarations when finding references."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defcustom lsp-enable-indentation t
+  "Indent regions using the file formatting functionality provided by the
+language server."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defcustom lsp-enable-on-type-formatting t
+  "Enable `textDocument/onTypeFormatting' integration."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defcustom lsp-enable-text-document-color t
+  "Enable `textDocument/documentColor' integration."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defcustom lsp-before-save-edits t
+  "If non-nil, `lsp-mode' will apply edits suggested by the language server
+before saving a document."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defcustom lsp-format-buffer-on-save nil
+  "If non-nil format buffer on save.
+To only format specific major-mode buffers see `lsp-format-buffer-on-save-list'."
+  :type 'boolean
+  :safe #'booleanp
+  :local t
+  :group 'lsp-mode)
+
+(defcustom lsp-format-buffer-on-save-list '()
+  "If the list is empty format all buffer on save. Else only format buffers
+if their major-mode is in the list."
+  :type '(repeat symbol)
+  :group 'lsp-mode)
+
+(defcustom lsp-fix-all-on-save nil
+  "If non-nil run `source.fixAll' code action on save.
+This applies all auto-fixable issues before saving.
+To only apply to specific modes see `lsp-fix-all-on-save-list'."
+  :type 'boolean
+  :safe #'booleanp
+  :local t
+  :group 'lsp-mode)
+
+(defcustom lsp-fix-all-on-save-list '()
+  "If the list is empty apply fixAll to all buffers on save.
+Else only apply fixAll if their major-mode is in the list."
+  :type '(repeat symbol)
+  :group 'lsp-mode)
+
+(defcustom lsp-after-apply-edits-hook nil
+  "Hooks to run when text edit is applied.
+It contains the operation source."
+  :type 'hook
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-apply-edits-after-file-operations t
+  "Whether to apply edits returned by server after file operations if any.
+Applicable only if server supports workspace.fileOperations for operations:
+`workspace/willRenameFiles', `workspace/willCreateFiles' and
+`workspace/willDeleteFiles'."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defcustom lsp-modeline-code-actions-enable t
+  "Whether to show code actions on modeline."
+  :type 'boolean
+  :group 'lsp-modeline)
+
+(defcustom lsp-modeline-diagnostics-enable t
+  "Whether to show diagnostics on modeline."
+  :type 'boolean
+  :group 'lsp-modeline)
+
+(defcustom lsp-modeline-workspace-status-enable t
+  "Whether to show workspace status on modeline."
+  :type 'boolean
+  :group 'lsp-modeline
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-headerline-breadcrumb-enable t
+  "Whether to enable breadcrumb on headerline."
+  :type 'boolean
+  :group 'lsp-headerline)
+
+(defcustom lsp-configure-hook nil
+  "Hooks to run when `lsp-configure-buffer' is called."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-unconfigure-hook nil
+  "Hooks to run when `lsp-unconfig-buffer' is called."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-after-diagnostics-hook nil
+  "Hooks to run after diagnostics are received.
+Note: it runs only if the receiving buffer is open. Use
+`lsp-diagnostics-updated-hook'if you want to be notified when
+diagnostics have changed."
+  :type 'hook
+  :group 'lsp-mode)
+
+(define-obsolete-variable-alias 'lsp-after-diagnostics-hook
+  'lsp-diagnostics-updated-hook "lsp-mode 6.4")
+
+(defcustom lsp-diagnostics-updated-hook nil
+  "Hooks to run after diagnostics are received."
+  :type 'hook
+  :group 'lsp-mode)
+
+(define-obsolete-variable-alias 'lsp-workspace-folders-changed-hook
+  'lsp-workspace-folders-changed-functions "lsp-mode 6.3")
+
+(defcustom lsp-workspace-folders-changed-functions nil
+  "Hooks to run after the folders has changed.
+The hook will receive two parameters list of added and removed folders."
+  :type 'hook
+  :group 'lsp-mode)
+
+(define-obsolete-variable-alias 'lsp-eldoc-hook 'eldoc-documentation-functions "lsp-mode 9.0.0")
+
+(defcustom lsp-before-apply-edits-hook nil
+  "Hooks to run before applying edits."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defgroup lsp-imenu nil
+  "LSP Imenu."
+  :group 'lsp-mode
+  :tag "LSP Imenu")
+
+(defcustom lsp-imenu-show-container-name t
+  "Display the symbol's container name in an imenu entry."
+  :type 'boolean
+  :group 'lsp-imenu)
+
+(defcustom lsp-imenu-container-name-separator "/"
+  "Separator string to use to separate the container name from the symbol while
+displaying imenu entries."
+  :type 'string
+  :group 'lsp-imenu)
+
+(defcustom lsp-imenu-sort-methods '(kind name)
+  "How to sort the imenu items.
+
+The value is a list of `kind' `name' or `position'.  Priorities
+are determined by the index of the element."
+  :type '(repeat (choice (const name)
+                         (const position)
+                         (const kind)))
+  :group 'lsp-imenu)
+
+(defcustom lsp-imenu-index-symbol-kinds nil
+  "Which symbol kinds to show in imenu."
+  :type '(repeat (choice (const :tag "Miscellaneous" nil)
+                         (const :tag "File" File)
+                         (const :tag "Module" Module)
+                         (const :tag "Namespace" Namespace)
+                         (const :tag "Package" Package)
+                         (const :tag "Class" Class)
+                         (const :tag "Method" Method)
+                         (const :tag "Property" Property)
+                         (const :tag "Field" Field)
+                         (const :tag "Constructor" Constructor)
+                         (const :tag "Enum" Enum)
+                         (const :tag "Interface" Interface)
+                         (const :tag "Function" Function)
+                         (const :tag "Variable" Variable)
+                         (const :tag "Constant" Constant)
+                         (const :tag "String" String)
+                         (const :tag "Number" Number)
+                         (const :tag "Boolean" Boolean)
+                         (const :tag "Array" Array)
+                         (const :tag "Object" Object)
+                         (const :tag "Key" Key)
+                         (const :tag "Null" Null)
+                         (const :tag "Enum Member" EnumMember)
+                         (const :tag "Struct" Struct)
+                         (const :tag "Event" Event)
+                         (const :tag "Operator" Operator)
+                         (const :tag "Type Parameter" TypeParameter)))
+  :group 'lsp-imenu)
+
+;; vibhavp: Should we use a lower value (5)?
+(defcustom lsp-response-timeout 10
+  "Number of seconds to wait for a response from the language server before
+timing out. Nil if no timeout."
+  :type '(choice
+          (number :tag "Seconds")
+          (const :tag "No timeout" nil))
+  :group 'lsp-mode)
+
+(defcustom lsp-tcp-connection-timeout 2
+  "The timeout for tcp connection in seconds."
+  :type 'number
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.2"))
+
+(defconst lsp--imenu-compare-function-alist
+  (list (cons 'name #'lsp--imenu-compare-name)
+        (cons 'kind #'lsp--imenu-compare-kind)
+        (cons 'position #'lsp--imenu-compare-line-col))
+  "An alist of (METHOD . FUNCTION).
+METHOD is one of the symbols accepted by
+`lsp-imenu-sort-methods'.
+
+FUNCTION takes two hash tables representing DocumentSymbol.  It
+returns a negative number, 0, or a positive number indicating
+whether the first parameter is less than, equal to, or greater
+than the second parameter.")
+
+(defcustom lsp-diagnostic-clean-after-change nil
+  "When non-nil, clean the diagnostics on change.
+
+Note that when that setting is nil, `lsp-mode' will show stale
+diagnostics until server publishes the new set of diagnostics"
+  :type 'boolean
+  :group 'lsp-diagnostics
+  :package-version '(lsp-mode . "7.0.1"))
+
+(defcustom lsp-server-trace nil
+  "Request tracing on the server side.
+The actual trace output at each level depends on the language server in use.
+Changes take effect only when a new session is started."
+  :type '(choice (const :tag "Disabled" "off")
+                 (const :tag "Messages only" "messages")
+                 (const :tag "Verbose" "verbose")
+                 (const :tag "Default (disabled)" nil))
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-auto-touch-files t
+  "If non-nil ensure the files exist before sending
+`textDocument/didOpen' notification."
+  :type 'boolean
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defvar lsp-language-id-configuration
+  '(("\\(^CMakeLists\\.txt\\|\\.cmake\\)\\'" . "cmake")
+    ("\\(^Dockerfile\\(?:\\..*\\)?\\|\\.[Dd]ockerfile\\)\\'" . "dockerfile")
+    ("\\.astro$" . "astro")
+    ("\\.cs\\'" . "csharp")
+    ("\\.css$" . "css")
+    ("\\.cypher$" . "cypher")
+    ("Earthfile" . "earthfile")
+    ("\\.ebuild$" . "shellscript")
+    ("\\.go\\'" . "go")
+    ("\\.html$" . "html")
+    ("\\.hx$" . "haxe")
+    ("\\.hy$" . "hy")
+    ("\\.java\\'" . "java")
+    ("\\.jq$"  . "jq")
+    ("\\.js$" . "javascript")
+    ("\\.json$" . "json")
+    ("\\.jsonc$" . "jsonc")
+    ("\\.jsonnet$" . "jsonnet")
+    ("\\.jsx$" . "javascriptreact")
+    ("\\.lua$" . "lua")
+    ("\\.fnl$" . "fennel")
+    ("\\.mdx\\'" . "mdx")
+    ("\\.nu$" . "nushell")
+    ("\\.php$" . "php")
+    ("\\.ps[dm]?1\\'" . "powershell")
+    ("\\.qml$" . "qml")
+    ("\\.rs\\'" . "rust")
+    ("\\.spec\\'" . "rpm-spec")
+    ("\\.sql$" . "sql")
+    ("\\.svelte$" . "svelte")
+    ("\\.toml\\'" . "toml")
+    ("\\.ts$" . "typescript")
+    ("\\.tsp$" . "typespec")
+    ("\\.tsx$" . "typescriptreact")
+    ("\\.ttcn3$" . "ttcn3")
+    ("\\.vue$" . "vue")
+    ("\\.wat$" . "wat")
+    ("\\.xml$" . "xml")
+    ("\\ya?ml$" . "yaml")
+    ("^PKGBUILD$" . "shellscript")
+    ("^go\\.mod\\'" . "go.mod")
+    ("^settings\\.json$" . "jsonc")
+    ("^yang\\.settings$" . "jsonc")
+    ("^meson\\(_options\\.txt\\|\\.\\(build\\|format\\)\\)\\'" . "meson")
+    (ada-mode . "ada")
+    (ada-ts-mode . "ada")
+    (gpr-mode . "gpr")
+    (gpr-ts-mode . "gpr")
+    (awk-mode . "awk")
+    (awk-ts-mode . "awk")
+    (nxml-mode . "xml")
+    (sql-mode . "sql")
+    (vimrc-mode . "vim")
+    (vimscript-ts-mode . "vim")
+    (sh-mode . "shellscript")
+    (bash-ts-mode . "shellscript")
+    (ebuild-mode . "shellscript")
+    (pkgbuild-mode . "shellscript")
+    (envrc-file-mode . "shellscript")
+    (fish-mode . "fish")
+    (scala-mode . "scala")
+    (scala-ts-mode . "scala")
+    (julia-mode . "julia")
+    (julia-ts-mode . "julia")
+    (just-mode . "just")
+    (just-ts-mode . "just")
+    (typst-mode . "typst")
+    (typst-ts-mode . "typst")
+    ("\\.typ\\'" . "typst")
+    (clojure-mode . "clojure")
+    (clojurec-mode . "clojure")
+    (clojurescript-mode . "clojurescript")
+    (clojure-ts-mode . "clojure")
+    (clojure-ts-clojurec-mode . "clojure")
+    (clojure-ts-clojurescript-mode . "clojurescript")
+    (edn-mode . "clojure")
+    (java-mode . "java")
+    (java-ts-mode . "java")
+    (jdee-mode . "java")
+    (groovy-mode . "groovy")
+    (nextflow-mode . "nextflow")
+    (python-mode . "python")
+    (python-ts-mode . "python")
+    (cython-mode . "python")
+    ("\\(\\.mojo\\|\\.🔥\\)\\'" . "mojo")
+    (lsp--render-markdown . "markdown")
+    (move-mode . "move")
+    (rust-mode . "rust")
+    (rust-ts-mode . "rust")
+    (rustic-mode . "rust")
+    (kotlin-mode . "kotlin")
+    (kotlin-ts-mode . "kotlin")
+    (css-mode . "css")
+    (css-ts-mode . "css")
+    (less-mode . "less")
+    (less-css-mode . "less")
+    (lua-mode . "lua")
+    (lua-ts-mode . "lua")
+    (sass-mode . "sass")
+    (ssass-mode . "sass")
+    (scss-mode . "scss")
+    (scad-mode . "openscad")
+    (xml-mode . "xml")
+    (c-mode . "c")
+    (c-ts-mode . "c")
+    (c++-mode . "cpp")
+    (c++-ts-mode . "cpp")
+    (cuda-mode . "cuda")
+    (objc-mode . "objective-c")
+    (html-mode . "html")
+    (html-ts-mode . "html")
+    (sgml-mode . "html")
+    (mhtml-mode . "html")
+    (mint-mode . "mint")
+    (go-dot-mod-mode . "go.mod")
+    (go-mod-ts-mode . "go.mod")
+    (go-mode . "go")
+    (go-ts-mode . "go")
+    (graphql-mode . "graphql")
+    (haskell-mode . "haskell")
+    (haskell-ts-mode . "haskell")
+    (hack-mode . "hack")
+    (php-mode . "php")
+    (php-ts-mode . "php")
+    (powershell-mode . "powershell")
+    (powershell-mode . "PowerShell")
+    (powershell-ts-mode . "powershell")
+    (json-mode . "json")
+    (json-ts-mode . "json")
+    (jsonc-mode . "jsonc")
+    (rjsx-mode . "javascript")
+    (js2-mode . "javascript")
+    (js-mode . "javascript")
+    (js-ts-mode . "javascript")
+    (typescript-mode . "typescript")
+    (typescript-ts-mode . "typescript")
+    (typespec-mode . "typespec")
+    (typespec-ts-mode . "typespec")
+    (tsx-ts-mode . "typescriptreact")
+    (svelte-mode . "svelte")
+    (fsharp-mode . "fsharp")
+    (fsharp-ts-mode . "fsharp")
+    (reason-mode . "reason")
+    (caml-mode . "ocaml")
+    (neocaml-mode . "ocaml")
+    (neocaml-interface-mode . "ocaml")
+    (tuareg-mode . "ocaml")
+    (futhark-mode . "futhark")
+    (swift-mode . "swift")
+    (swift-ts-mode . "swift")
+    (elixir-mode . "elixir")
+    (elixir-ts-mode . "elixir")
+    (heex-ts-mode . "elixir")
+    (conf-javaprop-mode . "spring-boot-properties")
+    (yaml-mode . "yaml")
+    (yaml-ts-mode . "yaml")
+    (ruby-mode . "ruby")
+    (enh-ruby-mode . "ruby")
+    (ruby-ts-mode . "ruby")
+    (feature-mode . "cucumber")
+    (fortran-mode . "fortran")
+    (f90-mode . "fortran")
+    (elm-mode . "elm")
+    (dart-mode . "dart")
+    (erlang-mode . "erlang")
+    (dockerfile-mode . "dockerfile")
+    (dockerfile-ts-mode . "dockerfile")
+    (csharp-mode . "csharp")
+    (csharp-tree-sitter-mode . "csharp")
+    (csharp-ts-mode . "csharp")
+    (plain-tex-mode . "plaintex")
+    (context-mode . "context")
+    (cypher-mode . "cypher")
+    (latex-mode . "latex")
+    (LaTeX-mode . "latex")
+    (v-mode . "v")
+    (vhdl-mode . "vhdl")
+    (vhdl-ts-mode . "vhdl")
+    (verilog-mode . "verilog")
+    (terraform-mode . "terraform")
+    (ess-julia-mode . "julia")
+    (ess-r-mode . "r")
+    (crystal-mode . "crystal")
+    (nim-mode . "nim")
+    (dhall-mode . "dhall")
+    (cmake-mode . "cmake")
+    (cmake-ts-mode . "cmake")
+    (purescript-mode . "purescript")
+    (gdscript-mode . "gdscript")
+    (gdscript-ts-mode . "gdscript")
+    (perl-mode . "perl")
+    (cperl-mode . "perl")
+    (perl-ts-mode . "perl")
+    (robot-mode . "robot")
+    (roc-ts-mode . "roc")
+    (ron-mode . "ron")
+    (racket-mode . "racket")
+    (nix-mode . "nix")
+    (nix-ts-mode . "nix")
+    (prolog-mode . "prolog")
+    (vala-mode . "vala")
+    (actionscript-mode . "actionscript")
+    (d-mode . "d")
+    (zig-mode . "zig")
+    (zig-ts-mode . "zig")
+    (text-mode . "plaintext")
+    (markdown-mode . "markdown")
+    (markdown-ts-mode . "markdown")
+    (gfm-mode . "markdown")
+    (beancount-mode . "beancount")
+    (conf-toml-mode . "toml")
+    (toml-ts-mode . "toml")
+    (org-mode . "org")
+    (org-journal-mode . "org")
+    (nginx-mode . "nginx")
+    (magik-mode . "magik")
+    (magik-ts-mode . "magik")
+    (magik-product-mode . "sw-product-def")
+    (magik-module-mode . "sw-module-def")
+    (magik-loadlist-mode . "sw-load-list")
+    (idris-mode . "idris")
+    (idris2-mode . "idris2")
+    (gleam-mode . "gleam")
+    (gleam-ts-mode . "gleam")
+    (graphviz-dot-mode . "dot")
+    (tiltfile-mode . "tiltfile")
+    (solidity-mode . "solidity")
+    (bibtex-mode . "bibtex")
+    (rst-mode . "restructuredtext")
+    (glsl-mode . "glsl")
+    (shader-mode . "shaderlab")
+    (wgsl-mode . "wgsl")
+    (wat-mode . "wat")
+    (jq-mode . "jq")
+    (jq-ts-mode . "jq")
+    (protobuf-mode . "protobuf")
+    (nushell-mode . "nushell")
+    (nushell-ts-mode . "nushell")
+    (meson-mode . "meson")
+    (yang-mode . "yang")
+    (matlab-mode . "matlab")
+    (matlab-ts-mode . "matlab")
+    (message-mode . "plaintext")
+    (mu4e-compose-mode . "plaintext")
+    (odin-mode . "odin")
+    (odin-ts-mode . "odin")
+    (qml-mode . "qml")
+    (qml-ts-mode . "qml"))
+  "Language id configuration.")
+
+(defvar lsp--last-active-workspaces nil
+  "Keep track of last active workspace.
+We want to try the last workspace first when jumping into a library
+directory")
+
+(defvar lsp-method-requirements
+  '(("textDocument/callHierarchy" :capability :callHierarchyProvider)
+    ("textDocument/codeAction" :capability :codeActionProvider)
+    ("codeAction/resolve"
+     :check-command (lambda (workspace)
+                      (with-lsp-workspace workspace
+                        (lsp:code-action-options-resolve-provider?
+                         (lsp--capability-for-method "textDocument/codeAction")))))
+    ("textDocument/codeLens" :capability :codeLensProvider)
+    ("textDocument/completion" :capability :completionProvider)
+    ("completionItem/resolve"
+     :check-command (lambda (wk)
+                      (with-lsp-workspace wk
+                        (lsp:completion-options-resolve-provider?
+                         (lsp--capability-for-method "textDocument/completion")))))
+    ("textDocument/inlineCompletion" :capability :inlineCompletionProvider)
+    ("textDocument/declaration" :capability :declarationProvider)
+    ("textDocument/definition" :capability :definitionProvider)
+    ("textDocument/documentColor" :capability :colorProvider)
+    ("textDocument/documentLink" :capability :documentLinkProvider)
+    ("textDocument/inlayHint" :capability :inlayHintProvider)
+    ("inlayHint/resolve"
+     :check-command (lambda (wk)
+                      (with-lsp-workspace wk
+                        (when-let* ((cap (lsp--capability :inlayHintProvider)))
+                          (and (not (booleanp cap))
+                               (lsp:inlay-hint-options-resolve-provider? cap))))))
+    ("textDocument/documentHighlight" :capability :documentHighlightProvider)
+    ("textDocument/documentSymbol" :capability :documentSymbolProvider)
+    ("textDocument/foldingRange" :capability :foldingRangeProvider)
+    ("textDocument/formatting" :capability :documentFormattingProvider)
+    ("textDocument/hover" :capability :hoverProvider)
+    ("textDocument/implementation" :capability :implementationProvider)
+    ("textDocument/linkedEditingRange" :capability :linkedEditingRangeProvider)
+    ("textDocument/onTypeFormatting" :capability :documentOnTypeFormattingProvider)
+    ("textDocument/prepareRename"
+     :check-command (lambda (workspace)
+                      (with-lsp-workspace workspace
+                        (lsp:rename-options-prepare-provider?
+                         (lsp--capability-for-method "textDocument/rename")))))
+    ("textDocument/rangeFormatting" :capability :documentRangeFormattingProvider)
+    ("textDocument/references" :capability :referencesProvider)
+    ("textDocument/rename" :capability :renameProvider)
+    ("textDocument/selectionRange" :capability :selectionRangeProvider)
+    ("textDocument/semanticTokens" :capability :semanticTokensProvider)
+    ("textDocument/semanticTokensFull"
+     :check-command (lambda (workspace)
+                      (with-lsp-workspace workspace
+                        (lsp-get (lsp--capability :semanticTokensProvider) :full))))
+    ("textDocument/semanticTokensFull/Delta"
+     :check-command (lambda (workspace)
+                      (with-lsp-workspace workspace
+                        (let ((capFull (lsp-get (lsp--capability :semanticTokensProvider) :full)))
+                          (and (not (booleanp capFull)) (lsp-get capFull :delta))))))
+    ("textDocument/semanticTokensRangeProvider"
+     :check-command (lambda (workspace)
+                      (with-lsp-workspace workspace
+                        (lsp-get (lsp--capability :semanticTokensProvider) :range))))
+    ("textDocument/signatureHelp" :capability :signatureHelpProvider)
+    ("textDocument/typeDefinition" :capability :typeDefinitionProvider)
+    ("textDocument/typeHierarchy" :capability :typeHierarchyProvider)
+    ("textDocument/diagnostic" :capability :diagnosticProvider)
+    ("workspace/executeCommand" :capability :executeCommandProvider)
+    ("workspace/symbol" :capability :workspaceSymbolProvider))
+
+  "Map methods to requirements.
+It is used by request-sending functions to determine which server
+must be used for handling a particular message.")
+
+(defconst lsp--file-change-type
+  `((created . 1)
+    (changed . 2)
+    (deleted . 3)))
+
+(defconst lsp--watch-kind
+  `((create . 1)
+    (change . 2)
+    (delete . 4)))
+
+(defvar lsp-window-body-width 40
+  "Window body width when rendering doc.")
+
+(defface lsp-face-highlight-textual
+  '((t :inherit highlight))
+  "Face used for textual occurrences of symbols."
+  :group 'lsp-mode)
+
+(defface lsp-face-highlight-read
+  '((t :inherit highlight :underline t))
+  "Face used for highlighting symbols being read."
+  :group 'lsp-mode)
+
+(defface lsp-face-highlight-write
+  '((t :inherit highlight :weight bold))
+  "Face used for highlighting symbols being written to."
+  :group 'lsp-mode)
+
+(define-obsolete-variable-alias 'lsp-lens-auto-enable
+  'lsp-lens-enable "lsp-mode 7.0.1")
+
+(defcustom lsp-lens-enable t
+  "Auto enable lenses if server supports."
+  :group 'lsp-lens
+  :type 'boolean
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-symbol-highlighting-skip-current nil
+  "If non-nil skip current symbol when setting symbol highlights."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defcustom lsp-file-watch-threshold 1000
+  "Show warning if the files to watch are more than.
+Set to nil to disable the warning."
+  :type '(choice (const :tag "No warning" nil)
+                 (integer :tag "Number of files"))
+  :group 'lsp-mode)
+;;;###autoload(put 'lsp-file-watch-threshold 'safe-local-variable (lambda (i) (or (numberp i) (not i))))
+
+(defvar lsp-custom-markup-modes
+  '((rust-mode "no_run" "rust,no_run" "rust,ignore" "rust,should_panic"))
+  "Mode to uses with markdown code blocks.
+They are added to `markdown-code-lang-modes'")
+
+(defcustom lsp-signature-render-documentation t
+  "Display signature documentation in `eldoc'."
+  :type 'boolean
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-signature-auto-activate '(:on-trigger-char :on-server-request)
+  "Auto activate signature conditions."
+  :type '(repeat (choice (const :tag "On trigger chars pressed." :on-trigger-char)
+                         (const :tag "After selected completion." :after-completion)
+                         (const :tag "When the server has sent show signature help." :on-server-request)))
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-signature-doc-lines 20
+  "If number, limit the number of lines to show in the docs."
+  :type 'number
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-signature-function 'lsp-lv-message
+  "The function used for displaying signature info.
+It will be called with one param - the signature info. When
+called with nil the signature info must be cleared."
+  :type 'function
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-keymap-prefix "s-l"
+  "LSP-mode keymap prefix."
+  :group 'lsp-mode
+  :type 'string
+  :package-version '(lsp-mode . "6.3"))
+
+(defvar-local lsp--buffer-workspaces ()
+  "List of the buffer workspaces.")
+
+(defvar-local lsp--buffer-deferred nil
+  "Whether buffer was loaded via `lsp-deferred'.")
+
+(defvar lsp--session nil
+  "Contain the `lsp-session' for the current Emacs instance.")
+
+(defvar lsp--tcp-port 10000)
+
+(defvar lsp--client-packages-required nil
+  "If nil, `lsp-client-packages' are yet to be required.")
+
+(defvar lsp--tcp-server-port 0
+  "The server socket which is opened when using `lsp-tcp-server' (a server
+socket is opened in Emacs and the language server connects to it).  The
+default value of 0 ensures that a random high port is used. Set it to a positive
+integer to use a specific port.")
+
+(defvar lsp--tcp-server-wait-seconds 10
+  "Wait this amount of time for the client to connect to our server socket
+when using `lsp-tcp-server'.")
+
+(defvar-local lsp--document-symbols nil
+  "The latest document symbols.")
+
+(defvar-local lsp--document-selection-range-cache nil
+  "The document selection cache.")
+
+(defvar-local lsp--document-symbols-request-async nil
+  "If non-nil, request document symbols asynchronously.")
+
+(defvar-local lsp--document-symbols-tick -1
+  "The value of `buffer-chars-modified-tick' when document
+  symbols were last retrieved.")
+
+(defvar-local lsp--have-document-highlights nil
+  "Set to `t' on symbol highlighting, cleared on
+`lsp--cleanup-highlights-if-needed'. Checking a separately
+defined flag is substantially faster than unconditionally
+calling `remove-overlays'.")
+
+;; Buffer local variable for storing number of lines.
+(defvar lsp--log-lines)
+
+(defvar-local lsp--eldoc-saved-message nil)
+
+(defvar lsp--on-change-timer nil)
+(defvar lsp--on-idle-timer nil)
+
+(defvar-local lsp--signature-last nil)
+(defvar-local lsp--signature-last-index nil)
+(defvar lsp--signature-last-buffer nil)
+
+(defvar-local lsp--virtual-buffer-point-max nil)
+
+(cl-defmethod lsp-execute-command (_server _command _arguments)
+  "Ask SERVER to execute COMMAND with ARGUMENTS.")
+
+(defun lsp-elt (sequence n)
+  "Return Nth element of SEQUENCE or nil if N is out of range."
+  (cond
+   ((listp sequence) (elt sequence n))
+   ((arrayp sequence)
+    (and (> (length sequence) n) (aref sequence n)))
+   (t (and (> (length sequence) n) (elt sequence n)))))
+
+;; define seq-first and seq-rest for older emacs
+(defun lsp-seq-first (sequence)
+  "Return the first element of SEQUENCE."
+  (lsp-elt sequence 0))
+
+(defun lsp-seq-rest (sequence)
+  "Return a sequence of the elements of SEQUENCE except the first one."
+  (seq-drop sequence 1))
+
+;;;###autoload
+(defun lsp--string-listp (sequence)
+  "Return t if all elements of SEQUENCE are strings, else nil."
+  (not (seq-find (lambda (x) (not (stringp x))) sequence)))
+
+(defun lsp--string-vector-p (candidate)
+  "Returns true if CANDIDATE is a vector data structure and
+every element of it is of type string, else nil."
+  (and
+   (vectorp candidate)
+   (seq-every-p #'stringp candidate)))
+
+(make-obsolete 'lsp--string-vector-p nil "lsp-mode 8.0.0")
+
+(defun lsp--editable-vector-match (widget value)
+  "Function for `lsp-editable-vector' :match."
+  ;; Value must be a list or a vector and all the members must match the type.
+  (and (or (listp value) (vectorp value))
+       (length (cdr (lsp--editable-vector-match-inline widget value)))))
+
+(defun lsp--editable-vector-match-inline (widget value)
+  "Value for `lsp-editable-vector' :match-inline."
+  (let ((type (nth 0 (widget-get widget :args)))
+        (ok t)
+        found)
+    (while (and value ok)
+      (let ((answer (widget-match-inline type value)))
+        (if answer
+            (let ((head (if (vectorp answer) (aref answer 0) (car answer)))
+                  (tail (if (vectorp answer) (seq-drop 1 answer) (cdr answer))))
+              (setq found (append found head)
+                    value tail))
+          (setq ok nil))))
+    (cons found value)))
+
+(defun lsp--editable-vector-value-to-external (_widget internal-value)
+  "Convert the internal list value to a vector."
+  (if (listp internal-value)
+      (apply 'vector internal-value)
+    internal-value))
+
+(defun lsp--editable-vector-value-to-internal (_widget external-value)
+  "Convert the external vector value to a list."
+  (if (vectorp external-value)
+      (append external-value nil)
+    external-value))
+
+(define-widget 'lsp--editable-vector 'editable-list
+  "A subclass of `editable-list' that accepts and returns a
+vector instead of a list."
+  :value-to-external 'lsp--editable-vector-value-to-external
+  :value-to-internal 'lsp--editable-vector-value-to-internal
+  :match 'lsp--editable-vector-match
+  :match-inline 'lsp--editable-vector-match-inline)
+
+(define-widget 'lsp-repeatable-vector 'lsp--editable-vector
+  "A variable length homogeneous vector."
+  :tag "Repeat"
+  :format "%{%t%}:\n%v%i\n")
+
+(define-widget 'lsp-string-vector 'lazy
+  "A vector of zero or more elements, every element of which is a string.
+Appropriate for any language-specific `defcustom' that needs to
+serialize as a JSON array of strings.
+
+Deprecated. Use `lsp-repeatable-vector' instead. "
+  :offset 4
+  :tag "Vector"
+  :type '(lsp-repeatable-vector string))
+
+(make-obsolete 'lsp-string-vector nil "lsp-mode 8.0.0")
+
+(defvar lsp--show-message t
+  "If non-nil, show debug message from `lsp-mode'.")
+
+(defun lsp--message  (format &rest args)
+  "Wrapper for `message'
+
+We `inhibit-message' the message when the cursor is in the
+minibuffer and when emacs version is before emacs 27 due to the
+fact that we often use `lsp--info', `lsp--warn' and `lsp--error'
+in async context and the call to these function is removing the
+minibuffer prompt. The issue with async messages is already fixed
+in emacs 27.
+
+See #2049"
+  (when lsp--show-message
+    (let ((inhibit-message (or inhibit-message
+                               (and (minibufferp)
+                                    (version< emacs-version "27.0")))))
+      (apply #'message format args))))
+
+(defun lsp--info (format &rest args)
+  "Display lsp info message with FORMAT with ARGS."
+  (lsp--message "%s :: %s" (propertize "LSP" 'face 'success) (apply #'format format args)))
+
+(defun lsp--warn (format &rest args)
+  "Display lsp warn message with FORMAT with ARGS."
+  (lsp--message "%s :: %s" (propertize "LSP" 'face 'warning) (apply #'format format args)))
+
+(defun lsp--error (format &rest args)
+  "Display lsp error message with FORMAT with ARGS."
+  (lsp--message "%s :: %s" (propertize "LSP" 'face 'error) (apply #'format format args)))
+
+(defun lsp-log (format &rest args)
+  "Log message to the ’*lsp-log*’ buffer.
+
+FORMAT and ARGS i the same as for `message'."
+  (when lsp-log-max
+    (let ((log-buffer (get-buffer "*lsp-log*"))
+          (inhibit-read-only t))
+      (unless log-buffer
+        (setq log-buffer (get-buffer-create "*lsp-log*"))
+        (with-current-buffer log-buffer
+          (buffer-disable-undo)
+          (view-mode 1)
+          (set (make-local-variable 'lsp--log-lines) 0)))
+      (with-current-buffer log-buffer
+        (save-excursion
+          (let* ((message (apply 'format format args))
+                 ;; Count newlines in message.
+                 (newlines (1+ (cl-loop with start = 0
+                                        for count from 0
+                                        while (string-match "\n" message start)
+                                        do (setq start (match-end 0))
+                                        finally return count))))
+            (goto-char (point-max))
+
+            ;; in case the buffer is not empty insert before last \n to preserve
+            ;; the point position(in case it is in the end)
+            (if (eq (point) (point-min))
+                (progn
+                  (insert "\n")
+                  (backward-char))
+              (backward-char)
+              (insert "\n"))
+            (insert message)
+
+            (setq lsp--log-lines (+ lsp--log-lines newlines))
+
+            (when (and (integerp lsp-log-max) (> lsp--log-lines lsp-log-max))
+              (let ((to-delete (- lsp--log-lines lsp-log-max)))
+                (goto-char (point-min))
+                (forward-line to-delete)
+                (delete-region (point-min) (point))
+                (setq lsp--log-lines lsp-log-max)))))))))
+
+(defalias 'lsp-message 'lsp-log)
+
+(defalias 'lsp-ht 'ht)
+
+(defalias 'lsp-file-local-name 'file-local-name)
+
+(defun lsp-f-canonical (file-name)
+  "Return the canonical FILE-NAME, without a trailing slash."
+  (directory-file-name (expand-file-name file-name)))
+
+(defalias 'lsp-canonical-file-name 'lsp-f-canonical)
+
+(defun lsp-f-same? (path-a path-b)
+  "Return t if PATH-A and PATH-B are references to the same file.
+Symlinks are not followed."
+  (when (and (f-exists? path-a)
+             (f-exists? path-b))
+    (equal
+     (lsp-f-canonical (directory-file-name (f-expand path-a)))
+     (lsp-f-canonical (directory-file-name (f-expand path-b))))))
+
+(defun lsp-f-parent (path)
+  "Return the parent directory to PATH.
+Symlinks are not followed."
+  (let ((parent (file-name-directory
+                 (directory-file-name (f-expand path default-directory)))))
+    (unless (lsp-f-same? path parent)
+      (if (f-relative? path)
+          (f-relative parent)
+        (directory-file-name parent)))))
+
+(defun lsp-f-ancestor-of? (path-a path-b)
+  "Return t if PATH-A is an ancestor of PATH-B.
+Symlinks are not followed."
+  (unless (lsp-f-same? path-a path-b)
+    (s-prefix? (concat (lsp-f-canonical path-a) (f-path-separator))
+               (lsp-f-canonical path-b))))
+
+;; compat
+(if (version< emacs-version "29.1")
+    ;; Undo macro probably introduced in 29.1
+    (defmacro lsp-with-undo-amalgamate (&rest body)
+      "Like `progn' but perform BODY with amalgamated undo barriers.
+
+This allows multiple operations to be undone in a single step.
+When undo is disabled this behaves like `progn'."
+      (declare (indent 0) (debug t))
+      (let ((handle (make-symbol "--change-group-handle--")))
+        `(let ((,handle (prepare-change-group))
+               ;; Don't truncate any undo data in the middle of this,
+               ;; otherwise Emacs might truncate part of the resulting
+               ;; undo step: we want to mimic the behavior we'd get if the
+               ;; undo-boundaries were never added in the first place.
+               (undo-outer-limit nil)
+               (undo-limit most-positive-fixnum)
+               (undo-strong-limit most-positive-fixnum))
+           (unwind-protect
+               (progn
+                 (activate-change-group ,handle)
+                 ,@body)
+             (progn
+               (accept-change-group ,handle)
+               (undo-amalgamate-change-group ,handle))))))
+  (defalias 'lsp-with-undo-amalgamate 'with-undo-amalgamate))
+
+(defun lsp--merge-results (results method)
+  "Merge RESULTS by filtering the empty hash-tables and merging
+the lists according to METHOD."
+  (pcase (--map (if (vectorp it)
+                    (append it nil) it)
+                (-filter #'identity results))
+    (`() ())
+    ;; only one result - simply return it
+    (`(,fst) (pcase method
+               ("textDocument/completion"
+                (if (lsp-completion-list? fst) fst
+                  (lsp-make-completion-list :items fst :is-incomplete nil)))
+               (_ fst)))
+    ;; multiple results merge it based on strategy
+    (results
+     (pcase method
+       ("textDocument/hover" (pcase (seq-filter
+                                     (-compose #'not #'lsp-empty?)
+                                     results)
+                               (`(,hover) hover)
+                               (hovers (lsp-make-hover
+                                        :contents
+                                        (-mapcat
+                                         (-lambda ((&Hover :contents))
+                                           (if (and (sequencep contents)
+                                                    (not (stringp contents)))
+                                               (append contents ())
+                                             (list contents)))
+                                         hovers)))))
+       ("textDocument/completion"
+        (lsp-make-completion-list
+         :is-incomplete (seq-some
+                         #'lsp:completion-list-is-incomplete
+                         results)
+         :items (cl-mapcan (lambda (it) (append (if (lsp-completion-list? it)
+                                                    (lsp:completion-list-items it)
+                                                  it)
+                                                nil))
+                           results)))
+       ("completionItem/resolve"
+        (let ((item (cl-first results)))
+          (when-let* ((details (seq-filter #'identity
+                                          (seq-map #'lsp:completion-item-detail? results))))
+            (lsp:set-completion-item-detail?
+             item
+             (string-join details " ")))
+          (when-let* ((docs (seq-filter #'identity
+                                       (seq-map #'lsp:completion-item-documentation? results))))
+            (lsp:set-completion-item-documentation?
+             item
+             (lsp-make-markup-content
+              :kind (or (seq-some (lambda (it)
+                                    (when (equal (lsp:markup-content-kind it)
+                                                 lsp/markup-kind-markdown)
+                                      lsp/markup-kind-markdown))
+                                  docs)
+                        lsp/markup-kind-plain-text)
+              :value (string-join (seq-map (lambda (doc)
+                                             (or (lsp:markup-content-value doc)
+                                                 (and (stringp doc) doc)))
+                                           docs)
+                                  "\n"))))
+          (when-let* ((edits (seq-filter #'identity
+                                        (seq-map #'lsp:completion-item-additional-text-edits? results))))
+            (lsp:set-completion-item-additional-text-edits?
+             item
+             (cl-mapcan (lambda (it) (if (seqp it) it (list it))) edits)))
+          item))
+       (_ (cl-mapcan (lambda (it) (if (seqp it) it (list it))) results))))))
+
+(defun lsp--spinner-start ()
+  "Start spinner indication."
+  (condition-case _err (spinner-start (lsp-progress-spinner-type)) (error)))
+
+(defun lsp--propertize (str type)
+  "Propertize STR as per TYPE."
+  (propertize str 'face (alist-get type lsp--message-type-face)))
+
+(defun lsp-workspaces ()
+  "Return the lsp workspaces associated with the current project."
+  (if lsp--cur-workspace (list lsp--cur-workspace) lsp--buffer-workspaces))
+
+(defun lsp--completing-read (prompt collection transform-fn &optional predicate
+                                    require-match initial-input
+                                    hist def inherit-input-method)
+  "Wrap `completing-read' to provide transformation function and disable sort.
+
+TRANSFORM-FN will be used to transform each of the items before displaying.
+
+PROMPT COLLECTION PREDICATE REQUIRE-MATCH INITIAL-INPUT HIST DEF
+INHERIT-INPUT-METHOD will be proxied to `completing-read' without changes."
+  (let* ((col (--map (cons (funcall transform-fn it) it) collection))
+         (completion (completing-read prompt
+                                      (lambda (string pred action)
+                                        (if (eq action 'metadata)
+                                            `(metadata (display-sort-function . identity))
+                                          (complete-with-action action col string pred)))
+                                      predicate require-match initial-input hist
+                                      def inherit-input-method)))
+    (cdr (assoc completion col))))
+
+(defconst lsp--system-arch (lambda ()
+                             (setq lsp--system-arch
+                                   (pcase system-type
+                                     ('windows-nt
+                                      (pcase system-configuration
+                                        ((rx bol "x86_64-") 'x64)
+                                        (_ 'x86)))
+                                     ('darwin
+                                      (pcase system-configuration
+                                        ((rx "aarch64-") 'arm64)
+                                        (_ 'x64)))
+                                     ('gnu/linux
+                                       (pcase system-configuration
+                                         ((rx bol "aarch64-") 'arm64)
+                                         ((rx bol "x86_64") 'x64)
+                                         ((rx bol (| "i386" "i886")) 'x32)))
+                                     (_
+                                      (pcase system-configuration
+                                        ((rx bol "x86_64") 'x64)
+                                        ((rx bol (| "i386" "i886")) 'x32))))))
+  "Return the system architecture of `Emacs'.
+Special values:
+  `x64'       64bit
+  `x32'       32bit
+  `arm64'     ARM 64bit")
+
+(defmacro lsp-with-current-buffer (buffer-id &rest body)
+  (declare (indent 1) (debug t))
+  `(if-let* ((wcb (plist-get ,buffer-id :with-current-buffer)))
+       (with-lsp-workspaces (plist-get ,buffer-id :workspaces)
+         (funcall wcb (lambda () ,@body)))
+     (with-current-buffer ,buffer-id
+       ,@body)))
+
+(defvar lsp--throw-on-input nil
+  "Make `lsp-*-while-no-input' throws `input' on interrupted.")
+
+(defmacro lsp--catch (tag bodyform &rest handlers)
+  "Catch TAG thrown in BODYFORM.
+The return value from TAG will be handled in HANDLERS by `pcase'."
+  (declare (debug (form form &rest (pcase-PAT body))) (indent 2))
+  (let ((re-sym (make-symbol "re")))
+    `(let ((,re-sym (catch ,tag ,bodyform)))
+       (pcase ,re-sym
+         ,@handlers))))
+
+(defmacro lsp--while-no-input (&rest body)
+  "Wrap BODY in `while-no-input' and respecting `non-essential'.
+If `lsp--throw-on-input' is set, will throw if input is pending, else
+return value of `body' or nil if interrupted."
+  (declare (debug t) (indent 0))
+  `(if non-essential
+       (let ((res (while-no-input ,@body)))
+         (cond
+          ((and lsp--throw-on-input (equal res t))
+           (throw 'input :interrupted))
+          ((booleanp res) nil)
+          (t res)))
+     ,@body))
+
+;; A ‘lsp--client’ object describes the client-side behavior of a language
+;; server.  It is used to start individual server processes, each of which is
+;; represented by a ‘lsp--workspace’ object.  Client objects are normally
+;; created using ‘lsp-define-stdio-client’ or ‘lsp-define-tcp-client’.  Each
+;; workspace refers to exactly one client, but there can be multiple workspaces
+;; for a single client.
+(cl-defstruct lsp--client
+  ;; ‘language-id’ is a function that receives a buffer as a single argument
+  ;; and should return the language identifier for that buffer.  See
+  ;; https://microsoft.github.io/language-server-protocol/specification#textdocumentitem
+  ;; for a list of language identifiers.  Also consult the documentation for
+  ;; the language server represented by this client to find out what language
+  ;; identifiers it supports or expects.
+  (language-id nil)
+
+  ;; ‘add-on?’ when set to t the server will be started no matter whether there
+  ;; is another server handling the same mode.
+  (add-on? nil)
+  ;; ‘new-connection’ is a function that should start a language server process
+  ;; and return a cons (COMMAND-PROCESS . COMMUNICATION-PROCESS).
+  ;; COMMAND-PROCESS must be a process object representing the server process
+  ;; just started.  COMMUNICATION-PROCESS must be a process (including pipe and
+  ;; network processes) that ‘lsp-mode’ uses to communicate with the language
+  ;; server using the language server protocol.  COMMAND-PROCESS and
+  ;; COMMUNICATION-PROCESS may be the same process; in that case
+  ;; ‘new-connection’ may also return that process as a single
+  ;; object. ‘new-connection’ is called with two arguments, FILTER and
+  ;; SENTINEL.  FILTER should be used as process filter for
+  ;; COMMUNICATION-PROCESS, and SENTINEL should be used as process sentinel for
+  ;; COMMAND-PROCESS.
+  (new-connection nil)
+
+  ;; ‘ignore-regexps’ is a list of regexps.  When a data packet from the
+  ;; language server matches any of these regexps, it will be ignored.  This is
+  ;; intended for dealing with language servers that output non-protocol data.
+  (ignore-regexps nil)
+
+  ;; ‘ignore-messages’ is a list of regexps.  When a message from the language
+  ;; server matches any of these regexps, it will be ignored.  This is useful
+  ;; for filtering out unwanted messages; such as servers that send nonstandard
+  ;; message types, or extraneous log messages.
+  (ignore-messages nil)
+
+  ;; ‘notification-handlers’ is a hash table mapping notification method names
+  ;; (strings) to functions handling the respective notifications.  Upon
+  ;; receiving a notification, ‘lsp-mode’ will call the associated handler
+  ;; function passing two arguments, the ‘lsp--workspace’ object and the
+  ;; deserialized notification parameters.
+  (notification-handlers (make-hash-table :test 'equal))
+
+  ;; ‘request-handlers’ is a hash table mapping request method names
+  ;; (strings) to functions handling the respective notifications.  Upon
+  ;; receiving a request, ‘lsp-mode’ will call the associated handler function
+  ;; passing two arguments, the ‘lsp--workspace’ object and the deserialized
+  ;; request parameters.
+  (request-handlers (make-hash-table :test 'equal))
+
+  ;; ‘response-handlers’ is a hash table mapping integral JSON-RPC request
+  ;; identifiers for pending asynchronous requests to functions handling the
+  ;; respective responses.  Upon receiving a response from the language server,
+  ;; ‘lsp-mode’ will call the associated response handler function with a
+  ;; single argument, the deserialized response parameters.
+  (response-handlers (make-hash-table :test 'eql))
+
+  ;; ‘prefix-function’ is called for getting the prefix for completion.
+  ;; The function takes no parameter and returns a cons (start . end) representing
+  ;; the start and end bounds of the prefix. If it's not set, the client uses a
+  ;; default prefix function."
+  (prefix-function nil)
+
+  ;; Contains mapping of scheme to the function that is going to be used to load
+  ;; the file.
+  (uri-handlers (make-hash-table :test #'equal))
+
+  ;; ‘action-handlers’ is a hash table mapping action to a handler function. It
+  ;; can be used in `lsp-execute-code-action' to determine whether the action
+  ;; current client is interested in executing the action instead of sending it
+  ;; to the server.
+  (action-handlers (make-hash-table :test 'equal))
+
+  ;; `action-filter' can be set to a function that modifies any incoming
+  ;; `CodeAction' in place before it is executed. The return value is ignored.
+  ;; This can be used to patch up broken code action requests before they are
+  ;; sent back to the LSP server. See `lsp-fix-code-action-booleans' for an
+  ;; example of a function that can be useful here.
+  (action-filter nil)
+
+  ;; major modes supported by the client.
+  major-modes
+  ;; Function that will be called to decide if this language client
+  ;; should manage a particular buffer. The function will be passed
+  ;; the file name and major mode to inform the decision. Setting
+  ;; `activation-fn' will override `major-modes', if
+  ;; present.
+  activation-fn
+  ;; Break the tie when major-mode is supported by multiple clients.
+  (priority 0)
+  ;; Unique identifier for representing the client object.
+  server-id
+  ;; defines whether the client supports multi root workspaces.
+  multi-root
+  ;; Initialization options or a function that returns initialization options.
+  initialization-options
+  ;; `semantic-tokens-faces-overrides’ is a plist that can be used to extend, or
+  ;; completely replace, the faces used for semantic highlighting on a
+  ;; client-by-client basis.
+  ;;
+  ;; It recognizes four members, all of which are optional: `:types’ and
+  ;; `:modifiers’, respectively, should be face definition lists akin to
+  ;; `:lsp-semantic-token-faces’. If specified, each of these face lists will be
+  ;; merged with the default face definition list.
+  ;;
+  ;; Alternatively, if the plist members `:discard-default-types’ or
+  ;; `:discard-default-modifiers' are non-nil, the default `:type' or `:modifiers'
+  ;; face definitions will be replaced entirely by their respective overrides.
+  ;;
+  ;; For example, setting `:semantic-tokens-faces-overrides' to
+  ;; `(:types (("macro" . font-lock-keyword-face)))' will remap "macro" tokens from
+  ;; their default face `lsp-face-semhl-macro' to `font-lock-keyword-face'.
+  ;;
+  ;; `(:types (("macro" . font-lock-keyword-face) ("not-quite-a-macro" . some-face)))'
+  ;; will also remap "macro", but on top of that associate the fictional token type
+  ;; "not-quite-a-macro" with the face named `some-face'.
+  ;;
+  ;; `(:types (("macro" . font-lock-keyword-face))
+  ;;   :modifiers (("declaration" . lsp-face-semhl-interface))
+  ;;   :discard-default-types t
+  ;;   :discard-default-modifiers t)'
+  ;; will discard all default face definitions, hence leaving the client with
+  ;; only one token type "macro", mapped to `font-lock-keyword-face', and one
+  ;; modifier type "declaration", mapped to `lsp-face-semhl-interface'.
+  semantic-tokens-faces-overrides
+  ;; Provides support for registering LSP Server specific capabilities.
+  custom-capabilities
+  ;; Function which returns the folders that are considered to be not projects but library files.
+  ;; The function accepts one parameter currently active workspace.
+  ;; See: https://github.com/emacs-lsp/lsp-mode/issues/225.
+  library-folders-fn
+  ;; function which will be called when opening file in the workspace to perform
+  ;; client specific initialization. The function accepts one parameter
+  ;; currently active workspace.
+  before-file-open-fn
+  ;; Function which will be called right after a workspace has been initialized.
+  initialized-fn
+  ;; ‘remote?’ indicate whether the client can be used for LSP server over TRAMP.
+  (remote? nil)
+
+  ;; ‘completion-in-comments?’ t if the client supports completion in comments.
+  (completion-in-comments? nil)
+
+  ;; ‘path->uri-fn’ the function to use for path->uri conversion for the client.
+  (path->uri-fn nil)
+
+  ;; ‘uri->path-fn’ the function to use for uri->path conversion for the client.
+  (uri->path-fn nil)
+  ;; Function that returns an environment structure that will be used
+  ;; to set some environment variables when starting the language
+  ;; server process. These environment variables enable some
+  ;; additional features in the language server. The environment
+  ;; structure is an alist of the form (KEY . VALUE), where KEY is a
+  ;; string (regularly in all caps), and VALUE may be a string, a
+  ;; boolean, or a sequence of strings.
+  environment-fn
+
+  ;; ‘after-open-fn’ workspace after open specific hooks.
+  (after-open-fn nil)
+
+  ;; ‘async-request-handlers’ is a hash table mapping request method names
+  ;; (strings) to functions handling the respective requests that may take
+  ;; time to finish.  Upon receiving a request, ‘lsp-mode’ will call the
+  ;; associated handler function passing three arguments, the ‘lsp--workspace’
+  ;; object, the deserialized request parameters and the callback which accept
+  ;; result as its parameter.
+  (async-request-handlers (make-hash-table :test 'equal))
+  download-server-fn
+  download-in-progress?
+  buffers
+  synchronize-sections)
+
+(defun lsp-clients-executable-find (find-command &rest args)
+  "Finds an executable by invoking a search command.
+
+FIND-COMMAND is the executable finder that searches for the
+actual language server executable. ARGS is a list of arguments to
+give to FIND-COMMAND to find the language server.  Returns the
+output of FIND-COMMAND if it exits successfully, nil otherwise.
+
+Typical uses include finding an executable by invoking `find' in
+a project, finding LLVM commands on macOS with `xcrun', or
+looking up project-specific language servers for projects written
+in the various dynamic languages, e.g. `nvm', `pyenv' and `rbenv'
+etc."
+  (when-let* ((find-command-path (executable-find find-command))
+              (executable-path
+               (with-temp-buffer
+                 (when (zerop (apply 'call-process find-command-path nil t nil args))
+                   (buffer-substring-no-properties (point-min) (point-max))))))
+    (string-trim executable-path)))
+
+(defvar lsp--already-widened nil)
+
+(defmacro lsp-save-restriction-and-excursion (&rest form)
+  (declare (indent 0) (debug t))
+  `(if lsp--already-widened
+       (save-excursion ,@form)
+     (-let [lsp--already-widened t]
+       (save-restriction
+         (widen)
+         (save-excursion ,@form)))))
+
+;; Forward-declare; actual `defvar-local' is in the "Position encoding" section.
+(defvar lsp--move-to-column-function)
+
+;; from http://emacs.stackexchange.com/questions/8082/how-to-get-buffer-position-given-line-number-and-column-number
+(defun lsp--line-character-to-point (line character)
+  "Return the point for character CHARACTER on line LINE."
+  (or (lsp-virtual-buffer-call :line/character->point line character)
+      (let ((inhibit-field-text-motion t))
+        (lsp-save-restriction-and-excursion
+          (goto-char (point-min))
+          (forward-line line)
+          (funcall lsp--move-to-column-function character)))))
+
+(lsp-defun lsp--position-to-point ((&Position :line :character))
+  "Convert `Position' object in PARAMS to a point."
+  (lsp--line-character-to-point line character))
+
+(lsp-defun lsp--range-to-region ((&RangeToPoint :start :end))
+  (cons start end))
+
+(lsp-defun lsp--range-text ((&RangeToPoint :start :end))
+  (buffer-substring start end))
+
+(lsp-defun lsp--find-wrapping-range ((&SelectionRange :parent? :range (&RangeToPoint :start :end)))
+  (cond
+   ((and
+     (region-active-p)
+     (<= start (region-beginning) end)
+     (<= start (region-end) end)
+     (or (not (= start (region-beginning)))
+         (not (= end (region-end)))))
+    (cons start end))
+   ((and (<= start (point) end)
+         (not (region-active-p)))
+    (cons start end))
+   (parent? (lsp--find-wrapping-range parent?))))
+
+(defun lsp--get-selection-range ()
+  (or
+   (-when-let ((cache . cache-tick) lsp--document-selection-range-cache)
+     (when (= cache-tick (buffer-modified-tick)) cache))
+   (let ((response (cl-first
+                    (lsp-request
+                     "textDocument/selectionRange"
+                     (list :textDocument (lsp--text-document-identifier)
+                           :positions (vector (lsp--cur-position)))))))
+     (setq lsp--document-selection-range-cache
+           (cons response (buffer-modified-tick)))
+     response)))
+
+(defun lsp-extend-selection ()
+  "Extend selection."
+  (interactive)
+  (unless (lsp-feature? "textDocument/selectionRange")
+    (signal 'lsp-capability-not-supported (list "selectionRangeProvider")))
+  (-when-let ((start . end) (lsp--find-wrapping-range (lsp--get-selection-range)))
+    (goto-char start)
+    (set-mark (point))
+    (goto-char end)
+    (exchange-point-and-mark)))
+
+(defun lsp-warn (message &rest args)
+  "Display a warning message made from (`format-message' MESSAGE ARGS...).
+This is equivalent to `display-warning', using `lsp-mode' as the type and
+`:warning' as the level."
+  (display-warning 'lsp-mode (apply #'format-message message args)))
+
+(defun lsp--get-uri-handler (scheme)
+  "Get uri handler for SCHEME in the current workspace."
+  (--some (gethash scheme (lsp--client-uri-handlers (lsp--workspace-client it)))
+          (or (lsp-workspaces) (lsp--session-workspaces (lsp-session)))))
+
+(defun lsp--fix-path-casing (path)
+  "On windows, downcases path because the windows file system is
+case-insensitive.
+
+On other systems, returns path without change."
+  (if (eq system-type 'windows-nt) (downcase path) path))
+
+(defun lsp--uri-to-path (uri)
+  "Convert URI to a file path."
+  (if-let* ((fn (->> (lsp-workspaces)
+                    (-keep (-compose #'lsp--client-uri->path-fn #'lsp--workspace-client))
+                    (cl-first))))
+      (funcall fn uri)
+    (lsp--uri-to-path-1 uri)))
+
+(defun lsp-remap-path-if-needed (file-name)
+  (-if-let ((virtual-buffer &as &plist :buffer) (gethash file-name lsp--virtual-buffer-mappings))
+      (propertize (buffer-local-value 'buffer-file-name buffer)
+                  'lsp-virtual-buffer virtual-buffer)
+    file-name))
+
+(defun lsp--uri-to-path-1 (uri)
+  "Convert URI to a file path."
+  (let* ((url (url-generic-parse-url uri))
+         (type (url-type url))
+         (file
+          (decode-coding-string (url-unhex-string (url-filename url))
+                                        (or locale-coding-system 'utf-8)))
+         (file-name (if (and type (not (string= type "file")))
+                        (if-let* ((handler (lsp--get-uri-handler type)))
+                            (funcall handler uri)
+                          uri)
+                      ;; `url-generic-parse-url' is buggy on windows:
+                      ;; https://github.com/emacs-lsp/lsp-mode/pull/265
+                      (or (and (eq system-type 'windows-nt)
+                               (eq (elt file 0) ?\/)
+                               (substring file 1))
+                          file))))
+    (->> file-name
+         (concat (-some #'lsp--workspace-host-root (lsp-workspaces)))
+         (lsp-remap-path-if-needed))))
+
+(defun lsp--buffer-uri ()
+  "Return URI of the current buffer."
+  (or lsp-buffer-uri
+      (plist-get lsp--virtual-buffer :buffer-uri)
+      (lsp--path-to-uri
+       (or (buffer-file-name) (buffer-file-name (buffer-base-buffer))))))
+
+(defun lsp-register-client-capabilities (&rest _args)
+  "Implemented only to make `company-lsp' happy.
+DELETE when `lsp-mode.el' is deleted.")
+
+(defconst lsp--url-path-allowed-chars
+  (url--allowed-chars (append '(?/) url-unreserved-chars))
+  "`url-unreserved-chars' with additional delim ?/.
+This set of allowed chars is enough for hexifying local file paths.")
+
+(defun lsp--path-to-uri-1 (path)
+  (concat lsp--uri-file-prefix
+          (--> path
+            (expand-file-name it)
+            (or (file-remote-p it 'localname t) it)
+            (url-hexify-string it lsp--url-path-allowed-chars))))
+
+(defun lsp--path-to-uri (path)
+  "Convert PATH to a uri."
+  (if-let* ((uri-fn (->> (lsp-workspaces)
+                        (-keep (-compose #'lsp--client-path->uri-fn #'lsp--workspace-client))
+                        (cl-first))))
+      (funcall uri-fn path)
+    (lsp--path-to-uri-1 path)))
+
+(defvar lsp--warned-invalid-regexps (make-hash-table :test 'equal)
+  "Hash table of invalid regexps that have already been warned about.
+Used to prevent repeated warnings for the same invalid pattern.")
+
+(defun lsp--string-match-any (regex-list str)
+  "Return the first regex, if any, within REGEX-LIST matching STR.
+Returns the matching regex string on success, nil on no match or invalid regex.
+Invalid regex patterns are logged as warnings (once per pattern) and skipped."
+  (let (result)
+    (while regex-list
+      (let ((re (car regex-list)))
+        (setq regex-list (cdr regex-list))
+        (condition-case err
+            (when (string-match-p re str)
+              (setq result re
+                    regex-list nil))
+          (invalid-regexp
+           (unless (gethash re lsp--warned-invalid-regexps)
+             (puthash re t lsp--warned-invalid-regexps)
+             (lsp-warn "Invalid regexp in watch pattern: %s (parsing %s)"
+                       (error-message-string err) re))))))
+    result))
+
+(cl-defstruct lsp-watch
+  (descriptors (make-hash-table :test 'equal))
+  root-directory)
+
+(defun lsp--folder-watch-callback (event callback watch ignored-files ignored-directories)
+  (let ((file-name (nth 2 event))
+        (event-type (nth 1 event)))
+    (cond
+     ((and (file-directory-p file-name)
+           (eq 'created event-type)
+           (not (lsp--string-match-any ignored-directories file-name)))
+
+      (lsp-watch-root-folder (file-truename file-name) callback ignored-files ignored-directories watch)
+
+      ;; process the files that are already present in
+      ;; the directory.
+      (dolist (f (directory-files-recursively file-name ".*" t))
+        (unless (file-directory-p f)
+          (funcall callback (list nil 'created f)))))
+     ((and (memq event-type '(created deleted changed))
+           (not (file-directory-p file-name))
+           (not (lsp--string-match-any ignored-files file-name)))
+      (funcall callback event))
+     ((and (eq event-type 'renamed)
+           (not (file-directory-p file-name))
+           (not (lsp--string-match-any ignored-files file-name)))
+      (funcall callback (list (car event) 'deleted (nth 2 event)))
+      (funcall callback (list (car event) 'created (nth 3 event)))))))
+
+(defun lsp--ask-about-watching-big-repo (number-of-directories dir)
+  "Ask the user if they want to watch NUMBER-OF-DIRECTORIES from a repository DIR.
+This is useful when there is a lot of files in a repository, as
+that may slow Emacs down. Returns t if the user wants to watch
+the entire repository, nil otherwise."
+  (prog1
+      (yes-or-no-p
+       (format
+        "Watching all the files in %s would require adding watches to %s directories, so watching the repo may slow Emacs down.
+Do you want to watch all files in %s? "
+        dir
+        number-of-directories
+        dir))
+    (lsp--info
+     (concat "You can configure this warning with the `lsp-enable-file-watchers' "
+             "and `lsp-file-watch-threshold' variables"))))
+
+(defun lsp--all-watchable-directories (dir ignored-directories &optional visited)
+  "Traverse DIR recursively returning a list of paths that should have watchers.
+IGNORED-DIRECTORIES will be used for exclusions.
+VISITED is used to track already-visited directories to avoid infinite loops."
+  (let ((visited (or visited (make-hash-table :test 'equal)))
+        (stack (list (if (file-symlink-p dir) (file-truename dir) dir)))
+        result)
+    (while stack
+      (let ((cur (pop stack)))
+        (unless (gethash cur visited)
+          (puthash cur t visited)
+          (push cur result)
+          (dolist (entry (directory-files cur))
+            (unless (or (string= entry ".") (string= entry ".."))
+              (let ((full-path (expand-file-name entry cur)))
+                (when (and (file-accessible-directory-p full-path)
+                           (not (lsp--string-match-any ignored-directories full-path)))
+                  (push (if (file-symlink-p full-path)
+                            (file-truename full-path)
+                          full-path)
+                        stack))))))))
+    (nreverse result)))
+
+(defun lsp-watch-root-folder (dir callback ignored-files ignored-directories &optional watch warn-big-repo?)
+  "Create recursive file notification watch in DIR.
+CALLBACK will be called when there are changes in any of
+the monitored files. WATCHES is a hash table directory->file
+notification handle which contains all of the watch that
+already have been created. Watches will not be created for
+any directory that matches any regex in IGNORED-DIRECTORIES.
+Watches will not be created for any file that matches any
+regex in IGNORED-FILES."
+  (let* ((dir (if (f-symlink? dir)
+                  (file-truename dir)
+                dir))
+         (watch (or watch (make-lsp-watch :root-directory dir)))
+         (dirs-to-watch (lsp--all-watchable-directories dir ignored-directories)))
+    (lsp-log "Creating watchers for following %s folders:\n  %s"
+             (length dirs-to-watch)
+             (s-join "\n  " dirs-to-watch))
+    (when (or
+           (not warn-big-repo?)
+           (not lsp-file-watch-threshold)
+           (let ((number-of-directories (length dirs-to-watch)))
+             (or
+              (< number-of-directories lsp-file-watch-threshold)
+              (condition-case nil
+                  (lsp--ask-about-watching-big-repo number-of-directories dir)
+                (quit)))))
+      (dolist (current-dir dirs-to-watch)
+        (condition-case err
+            (progn
+              (puthash
+               current-dir
+               (file-notify-add-watch current-dir
+                                      '(change)
+                                      (lambda (event)
+                                        (lsp--folder-watch-callback event callback watch ignored-files ignored-directories)))
+               (lsp-watch-descriptors watch)))
+          (error (lsp-log "Failed to create a watch for %s: message" (error-message-string err)))
+          (file-missing (lsp-log "Failed to create a watch for %s: message" (error-message-string err))))))
+    watch))
+
+(defun lsp-kill-watch (watch)
+  "Delete WATCH."
+  (-> watch lsp-watch-descriptors hash-table-values (-each #'file-notify-rm-watch))
+  (ht-clear! (lsp-watch-descriptors watch)))
+
+(defun lsp-json-bool (val)
+  "Convert VAL to JSON boolean."
+  (if val t :json-false))
+
+(defmacro with-lsp-workspace (workspace &rest body)
+  "Helper macro for invoking BODY in WORKSPACE context."
+  (declare (debug (form body))
+           (indent 1))
+  `(let ((lsp--cur-workspace ,workspace)) ,@body))
+
+(defmacro with-lsp-workspaces (workspaces &rest body)
+  "Helper macro for invoking BODY against multiple WORKSPACES."
+  (declare (debug (form body))
+           (indent 1))
+  `(let ((lsp--buffer-workspaces ,workspaces)) ,@body))
+
+
+
+(defmacro lsp-consistency-check (package)
+  `(defconst ,(intern (concat (symbol-name package)
+                              "-plist-value-when-compiled"))
+     (eval-when-compile lsp-use-plists)))
+
+
+;; loading code-workspace files
+
+;;;###autoload
+(defun lsp-load-vscode-workspace (file)
+  "Load vscode workspace from FILE"
+  (interactive "fSelect file to import: ")
+  (mapc #'lsp-workspace-folders-remove (lsp-session-folders (lsp-session)))
+
+  (let ((dir (f-dirname file)))
+    (->> file
+         (json-read-file)
+         (alist-get 'folders)
+         (-map (-lambda ((&alist 'path))
+                 (lsp-workspace-folders-add (expand-file-name path dir)))))))
+
+;;;###autoload
+(defun lsp-save-vscode-workspace (file)
+  "Save vscode workspace to FILE"
+  (interactive "FSelect file to save to: ")
+
+  (let ((json-encoding-pretty-print t))
+    (f-write-text (json-encode
+                   `((folders . ,(->> (lsp-session)
+                                      (lsp-session-folders)
+                                      (--map `((path . ,it)))))))
+                  'utf-8
+                  file)))
+
+
+(defmacro lsp-foreach-workspace (&rest body)
+  "Execute BODY for each of the current workspaces."
+  (declare (debug (form body)))
+  `(--map (with-lsp-workspace it ,@body) (lsp-workspaces)))
+
+(defmacro when-lsp-workspace (workspace &rest body)
+  "Helper macro for invoking BODY in WORKSPACE context if present."
+  (declare (debug (form body))
+           (indent 1))
+  `(when-let* ((lsp--cur-workspace ,workspace)) ,@body))
+
+(lsp-defun lsp--window-show-quick-pick (_workspace (&ShowQuickPickParams :place-holder :can-pick-many :items))
+  (if-let* ((selectfunc (if can-pick-many #'completing-read-multiple #'completing-read))
+            (itemLabels (seq-map (-lambda ((item &as &QuickPickItem :label)) (format "%s" label))
+                                 items))
+            (result (funcall-interactively
+                     selectfunc
+                     (format "%s%s " place-holder (if can-pick-many " (* for all)" "")) itemLabels))
+            (choices (if (listp result)
+                         (if (equal result '("*"))
+                             itemLabels
+                           result)
+                       (list result))))
+      (vconcat (seq-filter #'identity (seq-map (-lambda ((item &as &QuickPickItem :label :user-data))
+                                                 (if (member label choices)
+                                                     (lsp-make-quick-pick-item :label label :picked t :user-data user-data)
+                                                   nil))
+                                               items)))))
+
+(lsp-defun lsp--window-show-input-box (_workspace (&ShowInputBoxParams :prompt :value?))
+  (read-string (format "%s: " prompt) (or value? "")))
+
+(lsp-defun lsp--window-show-message (_workspace (&ShowMessageRequestParams :message :type))
+  "Send the server's messages to log.
+PARAMS - the data sent from _WORKSPACE."
+  (funcall (cl-case type
+             (1 'lsp--error)
+             (2 'lsp--warn)
+             (t 'lsp--info))
+           "%s"
+           message))
+
+(lsp-defun lsp--window-log-message (workspace (&ShowMessageRequestParams :message :type))
+  "Send the server's messages to log.
+PARAMS - the data sent from WORKSPACE."
+  (ignore
+   (let ((client (lsp--workspace-client workspace)))
+     (when (or (not client)
+               (cl-notany (-rpartial #'string-match-p message)
+                          (lsp--client-ignore-messages client)))
+       (lsp-log "%s" (lsp--propertize message type))))))
+
+(lsp-defun lsp--window-log-message-request ((&ShowMessageRequestParams :message :type :actions?))
+  "Display a message request to user sending the user selection back to server."
+  (let* ((message (lsp--propertize message type))
+         (choices (seq-map #'lsp:message-action-item-title actions?)))
+    (if choices
+        (completing-read (concat message " ") (seq-into choices 'list) nil t)
+      (lsp-log message))))
+
+(lsp-defun lsp--window-show-document ((&ShowDocumentParams :uri :selection? :external?))
+  "Show document URI in a buffer or in a external browser if EXTERNAL is t, and go to SELECTION if any."
+  (let ((path (lsp--uri-to-path uri)))
+    (if external?
+        (progn
+          (browse-url uri)
+          t)
+      (when (f-exists? path)
+        (with-current-buffer (find-file path)
+          (when selection?
+            (goto-char (lsp--position-to-point (lsp:range-start selection?))))
+          t)))))
+
+(defcustom lsp-progress-prefix "⌛ "
+  "Progress prefix."
+  :group 'lsp-mode
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-progress-function #'lsp-on-progress-modeline
+  "Function for handling the progress notifications."
+  :group 'lsp-mode
+  :type '(choice
+          (const :tag "Use modeline" lsp-on-progress-modeline)
+          (const :tag "Legacy(uses either `progress-reporter' or `spinner' based on `lsp-progress-via-spinner')"
+                 lsp-on-progress-legacy)
+          (const :tag "Ignore" ignore)
+          (function :tag "Other function"))
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-request-while-no-input-may-block nil
+  "Have `lsp-request-while-no-input` block unless `non-essential` is t."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defun lsp--progress-status ()
+  "Returns the status of the progress for the current workspaces."
+  (-let ((progress-status
+          (s-join
+           "|"
+           (-keep
+            (lambda (workspace)
+              (let ((tokens (lsp--workspace-work-done-tokens workspace)))
+                (unless (ht-empty? tokens)
+                  (mapconcat
+                   (-lambda ((&WorkDoneProgressBegin :message? :title :percentage?))
+                     (concat (if percentage?
+                                 (if (numberp percentage?)
+                                     (format "%.0f%%%% " percentage?)
+                                   (format "%s%%%% " percentage?))
+                               "")
+                             (or message? title)))
+                   (ht-values tokens)
+                   "|"))))
+            (lsp-workspaces)))))
+    (unless (s-blank? progress-status)
+      (concat lsp-progress-prefix progress-status " "))))
+
+(lsp-defun lsp-on-progress-modeline (workspace (&ProgressParams :token :value
+                                                                (value &as &WorkDoneProgress :kind)))
+  "PARAMS contains the progress data.
+WORKSPACE is the workspace that contains the progress token."
+  (add-to-list 'global-mode-string '(t (:eval (lsp--progress-status))))
+  (pcase kind
+    ("begin" (lsp-workspace-set-work-done-token token value workspace))
+    ("report" (lsp-workspace-set-work-done-token token value workspace))
+    ("end" (lsp-workspace-rem-work-done-token token workspace)))
+  (force-mode-line-update))
+
+(lsp-defun lsp-on-progress-legacy (workspace (&ProgressParams :token :value
+                                                              (value &as &WorkDoneProgress :kind)))
+  "PARAMS contains the progress data.
+WORKSPACE is the workspace that contains the progress token."
+  (pcase kind
+    ("begin"
+     (-let* (((&WorkDoneProgressBegin :title :percentage?) value)
+             (reporter
+              (if lsp-progress-via-spinner
+                  (let* ((spinner-strings (alist-get (lsp-progress-spinner-type) spinner-types))
+                         ;; Set message as a tooltip for the spinner strings
+                         (propertized-strings
+                          (seq-map (lambda (string) (propertize string 'help-echo title))
+                                   spinner-strings))
+                         (spinner-type (vconcat propertized-strings)))
+                    ;; The progress relates to the server as a whole,
+                    ;; display it on all buffers.
+                    (mapcar (lambda (buffer)
+                              (lsp-with-current-buffer buffer
+                                (spinner-start spinner-type))
+                              buffer)
+                            (lsp--workspace-buffers workspace)))
+                (if percentage?
+                    (make-progress-reporter title 0 100 percentage?)
+                  ;; No percentage, just progress
+                  (make-progress-reporter title nil nil)))))
+       (lsp-workspace-set-work-done-token token reporter workspace)))
+    ("report"
+     (when-let* ((reporter (lsp-workspace-get-work-done-token token workspace)))
+       (unless lsp-progress-via-spinner
+         (progress-reporter-update reporter (lsp:work-done-progress-report-percentage? value)))))
+
+    ("end"
+     (when-let* ((reporter (lsp-workspace-get-work-done-token token workspace)))
+       (if lsp-progress-via-spinner
+           (mapc (lambda (buffer)
+                   (when (lsp-buffer-live-p buffer)
+                     (lsp-with-current-buffer buffer
+                       (spinner-stop))))
+                 reporter)
+         (progress-reporter-done reporter))
+       (lsp-workspace-rem-work-done-token token workspace)))))
+
+
+;; diagnostics
+
+(defvar lsp-diagnostic-filter nil
+  "A a function which will be called with
+  `&PublishDiagnosticsParams' and `workspace' which can be used
+  to filter out the diagnostics. The function should return
+  `&PublishDiagnosticsParams'.
+
+Common usecase are:
+1. Filter the diagnostics for a particular language server.
+2. Filter out the diagnostics under specific level.")
+
+(defvar lsp-diagnostic-stats (ht))
+
+(defun lsp-diagnostics (&optional current-workspace?)
+  "Return the diagnostics from all workspaces."
+  (or (pcase (if current-workspace?
+                 (lsp-workspaces)
+               (lsp--session-workspaces (lsp-session)))
+        (`() ())
+        (`(,workspace) (lsp--workspace-diagnostics workspace))
+        (`,workspaces (let ((result (make-hash-table :test 'equal)))
+                        (mapc (lambda (workspace)
+                                (->> workspace
+                                     (lsp--workspace-diagnostics)
+                                     (maphash (lambda (file-name diagnostics)
+                                                (puthash file-name
+                                                         (append (gethash file-name result) diagnostics)
+                                                         result)))))
+                              workspaces)
+                        result)))
+      (ht)))
+
+(defun lsp-diagnostics-stats-for (path)
+  "Get diagnostics statistics for PATH.
+The result format is vector [_ errors warnings infos hints] or nil."
+  (gethash (lsp--fix-path-casing path) lsp-diagnostic-stats))
+
+(defun lsp-diagnostics--request-pull-diagnostics (workspace)
+  "Request new diagnostics for the current file within WORKSPACE.
+This is only executed if the server supports pull diagnostics."
+  (when (lsp-feature? "textDocument/diagnostic")
+    (let ((path (lsp--fix-path-casing (buffer-file-name))))
+      (lsp-request-async "textDocument/diagnostic"
+                         (list :textDocument (lsp--text-document-identifier))
+                         (-lambda ((&DocumentDiagnosticReport :kind :items?))
+                           (lsp-diagnostics--apply-pull-diagnostics workspace path kind items?))
+                         :mode 'tick))))
+
+(defun lsp-diagnostics--update-path (path new-stats)
+  (let ((new-stats (copy-sequence new-stats))
+        (path (lsp--fix-path-casing (directory-file-name path))))
+    (if-let* ((old-data (gethash path lsp-diagnostic-stats)))
+        (dotimes (idx 5)
+          (cl-callf + (aref old-data idx)
+            (aref new-stats idx)))
+      (puthash path new-stats lsp-diagnostic-stats))))
+
+(defun lsp-diagnostics--convert-and-update-path-stats (workspace path diagnostics)
+  (let ((path (lsp--fix-path-casing path))
+        (new-stats (make-vector 5 0)))
+    (mapc (-lambda ((&Diagnostic :severity?))
+            (cl-incf (aref new-stats (or severity? 1))))
+          diagnostics)
+    (when-let* ((old-diags (gethash path (lsp--workspace-diagnostics workspace))))
+      (mapc (-lambda ((&Diagnostic :severity?))
+              (cl-decf (aref new-stats (or severity? 1))))
+            old-diags))
+    (lsp-diagnostics--update-path path new-stats)
+    (while (not (string= path (setf path (file-name-directory
+                                          (directory-file-name path)))))
+      (lsp-diagnostics--update-path path new-stats))))
+
+(lsp-defun lsp--on-diagnostics-update-stats (workspace
+                                             (&PublishDiagnosticsParams :uri :diagnostics))
+  (lsp-diagnostics--convert-and-update-path-stats workspace (lsp--uri-to-path uri) diagnostics))
+
+(defun lsp-diagnostics--apply-pull-diagnostics (workspace path kind diagnostics?)
+  "Update WORKSPACE diagnostics at PATH with DIAGNOSTICS?.
+Depends on KIND being a \\='full\\=' update."
+  (cond
+   ((equal kind "full")
+    ;; TODO support `lsp-diagnostic-filter'
+    ;; (the params types differ from the published diagnostics response)
+    (lsp-diagnostics--convert-and-update-path-stats workspace path diagnostics?)
+    (-let* ((lsp--virtual-buffer-mappings (ht))
+            (workspace-diagnostics (lsp--workspace-diagnostics workspace)))
+      (if (seq-empty-p diagnostics?)
+          (remhash path workspace-diagnostics)
+        (puthash path (append diagnostics? nil) workspace-diagnostics))
+      (run-hooks 'lsp-diagnostics-updated-hook)))
+    ((equal kind "unchanged") t)
+    (t (lsp--error "Unknown pull diagnostic result kind '%s'" kind))))
+
+(defun lsp--on-diagnostics (workspace params)
+  "Callback for textDocument/publishDiagnostics.
+interface PublishDiagnosticsParams {
+    uri: string;
+    diagnostics: Diagnostic[];
+}
+PARAMS contains the diagnostics data.
+WORKSPACE is the workspace that contains the diagnostics."
+  (when lsp-diagnostic-filter
+    (setf params (funcall lsp-diagnostic-filter params workspace)))
+
+  (lsp--on-diagnostics-update-stats workspace params)
+
+  (-let* (((&PublishDiagnosticsParams :uri :diagnostics) params)
+          (lsp--virtual-buffer-mappings (ht))
+          (file (lsp--fix-path-casing (lsp--uri-to-path uri)))
+          (workspace-diagnostics (lsp--workspace-diagnostics workspace)))
+
+    (if (seq-empty-p diagnostics)
+        (remhash file workspace-diagnostics)
+      (puthash file (append diagnostics nil) workspace-diagnostics))
+
+    (run-hooks 'lsp-diagnostics-updated-hook)))
+
+(defun lsp-diagnostics--workspace-cleanup (workspace)
+  (->> workspace
+       (lsp--workspace-diagnostics)
+       (maphash (lambda (key _)
+                  (lsp--on-diagnostics-update-stats
+                   workspace
+                   (lsp-make-publish-diagnostics-params
+                    :uri (lsp--path-to-uri key)
+                    :diagnostics [])))))
+  (clrhash (lsp--workspace-diagnostics workspace)))
+
+
+
+;; textDocument/foldingRange support
+
+(cl-defstruct lsp--folding-range beg end kind children)
+
+(defvar-local lsp--cached-folding-ranges nil)
+(defvar-local lsp--cached-nested-folding-ranges nil)
+
+(defun lsp--folding-range-width (range)
+  (- (lsp--folding-range-end range)
+     (lsp--folding-range-beg range)))
+
+(defun lsp--get-folding-ranges ()
+  "Get the folding ranges for the current buffer."
+  (unless (eq (buffer-chars-modified-tick) (car lsp--cached-folding-ranges))
+    (let* ((ranges (lsp-request "textDocument/foldingRange"
+                                `(:textDocument ,(lsp--text-document-identifier))))
+           (sorted-line-col-pairs (->> ranges
+                                       (cl-mapcan (-lambda ((&FoldingRange :start-line
+                                                                           :start-character?
+                                                                           :end-line
+                                                                           :end-character?))
+                                                    (list (cons start-line start-character?)
+                                                          (cons end-line end-character?))))
+                                       (-sort #'lsp--line-col-comparator)))
+           (line-col-to-point-map (lsp--convert-line-col-to-points-batch
+                                   sorted-line-col-pairs)))
+      (setq lsp--cached-folding-ranges
+            (cons (buffer-chars-modified-tick)
+                  (--> ranges
+                    (seq-map (-lambda ((range &as
+                                              &FoldingRange :start-line
+                                              :start-character?
+                                              :end-line
+                                              :end-character?
+                                              :kind?))
+                               (make-lsp--folding-range
+                                :beg (ht-get line-col-to-point-map
+                                             (cons start-line start-character?))
+                                :end (ht-get line-col-to-point-map
+                                             (cons end-line end-character?))
+                                :kind kind?))
+                             it)
+                    (seq-filter (lambda (folding-range)
+                                  (< (lsp--folding-range-beg folding-range)
+                                     (lsp--folding-range-end folding-range)))
+                                it)
+                    (seq-into it 'list)
+                    (delete-dups it))))))
+  (cdr lsp--cached-folding-ranges))
+
+(defun lsp--get-nested-folding-ranges ()
+  "Get a list of nested folding ranges for the current buffer."
+  (-let [(tick . _) lsp--cached-folding-ranges]
+    (if (and (eq tick (buffer-chars-modified-tick))
+             lsp--cached-nested-folding-ranges)
+        lsp--cached-nested-folding-ranges
+      (setq lsp--cached-nested-folding-ranges
+            (lsp--folding-range-build-trees (lsp--get-folding-ranges))))))
+
+(defun lsp--folding-range-build-trees (ranges)
+  (setq ranges (seq-sort #'lsp--range-before-p ranges))
+  (let* ((dummy-node (make-lsp--folding-range
+                      :beg most-negative-fixnum
+                      :end most-positive-fixnum))
+         (stack (list dummy-node)))
+    (dolist (range ranges)
+      (while (not (lsp--range-inside-p range (car stack)))
+        (pop stack))
+      (push range (lsp--folding-range-children (car stack)))
+      (push range stack))
+    (lsp--folding-range-children dummy-node)))
+
+(defun lsp--range-inside-p (r1 r2)
+  "Return non-nil if folding range R1 lies inside R2"
+  (and (>= (lsp--folding-range-beg r1) (lsp--folding-range-beg r2))
+       (<= (lsp--folding-range-end r1) (lsp--folding-range-end r2))))
+
+(defun lsp--range-before-p (r1 r2)
+  "Return non-nil if folding range R1 ends before R2"
+  ;; Ensure r1 comes before r2
+  (or (< (lsp--folding-range-beg r1)
+         (lsp--folding-range-beg r2))
+      ;; If beg(r1) == beg(r2) make sure r2 ends first
+      (and (= (lsp--folding-range-beg r1)
+              (lsp--folding-range-beg r2))
+           (< (lsp--folding-range-end r2)
+              (lsp--folding-range-end r1)))))
+
+(defun lsp--point-inside-range-p (point range)
+  "Return non-nil if POINT lies inside folding range RANGE."
+  (and (>= point (lsp--folding-range-beg range))
+       (<= point (lsp--folding-range-end range))))
+
+(cl-defun lsp--get-current-innermost-folding-range (&optional (point (point)))
+  "Return the innermost folding range POINT lies in."
+  (seq-reduce (lambda (innermost-range curr-range)
+                (if (and (lsp--point-inside-range-p point curr-range)
+                         (or (null innermost-range)
+                             (lsp--range-inside-p curr-range innermost-range)))
+                    curr-range
+                  innermost-range))
+              (lsp--get-folding-ranges)
+              nil))
+
+(cl-defun lsp--get-current-outermost-folding-range (&optional (point (point)))
+  "Return the outermost folding range POINT lies in."
+  (cdr (seq-reduce (-lambda ((best-pair &as outermost-width . _) curr-range)
+                     (let ((curr-width (lsp--folding-range-width curr-range)))
+                       (if (and (lsp--point-inside-range-p point curr-range)
+                                (or (null best-pair)
+                                    (> curr-width outermost-width)))
+                           (cons curr-width curr-range)
+                         best-pair)))
+                   (lsp--get-folding-ranges)
+                   nil)))
+
+(defun lsp--folding-range-at-point-bounds ()
+  (when (and lsp-enable-folding
+             (lsp-feature? "textDocument/foldingRange"))
+    (if-let* ((range (lsp--get-current-innermost-folding-range)))
+        (cons (lsp--folding-range-beg range)
+              (lsp--folding-range-end range)))))
+(put 'lsp--folding-range 'bounds-of-thing-at-point
+     #'lsp--folding-range-at-point-bounds)
+
+(defun lsp--get-nearest-folding-range (&optional backward)
+  (let ((point (point))
+        (found nil))
+    (while (not
+            (or found
+                (if backward
+                    (<= point (point-min))
+                  (>= point (point-max)))))
+      (if backward (cl-decf point) (cl-incf point))
+      (setq found (lsp--get-current-innermost-folding-range point)))
+    found))
+
+(defun lsp--folding-range-at-point-forward-op (n)
+  (when (and lsp-enable-folding
+             (not (zerop n))
+             (lsp-feature? "textDocument/foldingRange"))
+    (cl-block break
+      (dotimes (_ (abs n))
+        (if-let* ((range (lsp--get-nearest-folding-range (< n 0))))
+            (goto-char (if (< n 0)
+                           (lsp--folding-range-beg range)
+                         (lsp--folding-range-end range)))
+          (cl-return-from break))))))
+(put 'lsp--folding-range 'forward-op
+     #'lsp--folding-range-at-point-forward-op)
+
+(defun lsp--folding-range-at-point-beginning-op ()
+  (goto-char (car (lsp--folding-range-at-point-bounds))))
+(put 'lsp--folding-range 'beginning-op
+     #'lsp--folding-range-at-point-beginning-op)
+
+(defun lsp--folding-range-at-point-end-op ()
+  (goto-char (cdr (lsp--folding-range-at-point-bounds))))
+(put 'lsp--folding-range 'end-op
+     #'lsp--folding-range-at-point-end-op)
+
+(defun lsp--range-at-point-bounds ()
+  (or (lsp--folding-range-at-point-bounds)
+      (when-let* ((range (and
+                         (lsp-feature? "textDocument/hover")
+                         (->> (lsp--text-document-position-params)
+                              (lsp-request "textDocument/hover")
+                              (lsp:hover-range?)))))
+        (lsp--range-to-region range))))
+
+;; A more general purpose "thing", useful for applications like focus.el
+(put 'lsp--range 'bounds-of-thing-at-point
+     #'lsp--range-at-point-bounds)
+
+(defun lsp--log-io-p (method)
+  "Return non nil if should log for METHOD."
+  (and lsp-log-io
+       (or (not lsp-log-io-allowlist-methods)
+           (member method lsp-log-io-allowlist-methods))))
+
+
+;; toggles
+
+(defun lsp-toggle-trace-io ()
+  "Toggle client-server protocol logging."
+  (interactive)
+  (setq lsp-log-io (not lsp-log-io))
+  (lsp--info "Server logging %s." (if lsp-log-io "enabled" "disabled")))
+
+(defun lsp-toggle-signature-auto-activate ()
+  "Toggle signature auto activate."
+  (interactive)
+  (setq lsp-signature-auto-activate
+        (unless lsp-signature-auto-activate '(:on-trigger-char)))
+  (lsp--info "Signature autoactivate %s." (if lsp-signature-auto-activate "enabled" "disabled"))
+  (lsp--update-signature-help-hook))
+
+(defun lsp-toggle-on-type-formatting ()
+  "Toggle on type formatting."
+  (interactive)
+  (setq lsp-enable-on-type-formatting (not lsp-enable-on-type-formatting))
+  (lsp--info "On type formatting is %s." (if lsp-enable-on-type-formatting "enabled" "disabled"))
+  (lsp--update-on-type-formatting-hook))
+
+(defun lsp-toggle-symbol-highlight ()
+  "Toggle symbol highlighting."
+  (interactive)
+  (setq lsp-enable-symbol-highlighting (not lsp-enable-symbol-highlighting))
+
+  (cond
+   ((and lsp-enable-symbol-highlighting
+         (lsp-feature? "textDocument/documentHighlight"))
+    (add-hook 'lsp-on-idle-hook #'lsp--document-highlight nil t)
+    (lsp--info "Symbol highlighting enabled in current buffer."))
+   ((not lsp-enable-symbol-highlighting)
+    (remove-hook 'lsp-on-idle-hook #'lsp--document-highlight t)
+    (lsp--remove-overlays 'lsp-highlight)
+    (lsp--info "Symbol highlighting disabled in current buffer."))))
+
+
+;; keybindings
+(defvar lsp--binding-descriptions nil
+  "List of key binding/short description pair.")
+
+(defmacro lsp-define-conditional-key (keymap key def desc cond &rest bindings)
+  "In KEYMAP, define key sequence KEY as DEF conditionally.
+This is like `define-key', except the definition disappears
+whenever COND evaluates to nil.
+DESC is the short-description for the binding.
+BINDINGS is a list of (key def desc cond)."
+  (declare (indent defun)
+           (debug (form form form form form &rest sexp)))
+  (->> (cl-list* key def desc cond bindings)
+       (-partition 4)
+       (-mapcat (-lambda ((key def desc cond))
+                  `((define-key ,keymap ,key
+                      '(menu-item
+                        ,(format "maybe-%s" def)
+                        ,def
+                        :filter
+                        (lambda (item)
+                          (when (with-current-buffer (or (when (buffer-live-p lsp--describe-buffer)
+                                                           lsp--describe-buffer)
+                                                         (current-buffer))
+                                  ,cond)
+                            item))))
+                    (when (stringp ,key)
+                      (setq lsp--binding-descriptions
+                            (append lsp--binding-descriptions '(,key ,desc)))))))
+       macroexp-progn))
+
+(defvar lsp--describe-buffer nil)
+
+(defun lsp-describe-buffer-bindings-advice (fn buffer &optional prefix menus)
+  (let ((lsp--describe-buffer buffer))
+    (funcall fn buffer prefix menus)))
+
+(advice-add 'describe-buffer-bindings
+            :around
+            #'lsp-describe-buffer-bindings-advice)
+
+(defun lsp--prepend-prefix (mappings)
+  (->> mappings
+       (-partition 2)
+       (-mapcat (-lambda ((key description))
+                  (list (concat lsp-keymap-prefix " " key)
+                        description)))))
+
+(defvar lsp-command-map
+  (-doto (make-sparse-keymap)
+    (lsp-define-conditional-key
+      ;; workspaces
+      "wD" lsp-disconnect "disconnect" (lsp-workspaces)
+      "wd" lsp-describe-session "describe session" t
+      "wq" lsp-workspace-shutdown "shutdown server" (lsp-workspaces)
+      "wr" lsp-workspace-restart "restart server" (lsp-workspaces)
+      "ws" lsp "start server" t
+
+      ;; formatting
+      "==" lsp-format-buffer "format buffer" (or (lsp-feature? "textDocument/rangeFormatting")
+                                                 (lsp-feature? "textDocument/formatting"))
+      "=r" lsp-format-region "format region" (lsp-feature? "textDocument/rangeFormatting")
+
+      ;; folders
+      "Fa" lsp-workspace-folders-add "add folder" t
+      "Fb" lsp-workspace-blocklist-remove "un-blocklist folder" t
+      "Fr" lsp-workspace-folders-remove "remove folder" t
+
+      ;; toggles
+      "TD" lsp-modeline-diagnostics-mode "toggle modeline diagnostics" (lsp-feature?
+                                                                        "textDocument/publishDiagnostics")
+      "TL" lsp-toggle-trace-io "toggle log io" t
+      "TS" lsp-ui-sideline-mode "toggle sideline" (featurep 'lsp-ui-sideline)
+      "TT" lsp-treemacs-sync-mode "toggle treemacs integration" (featurep 'lsp-treemacs)
+      "Ta" lsp-modeline-code-actions-mode "toggle modeline code actions" (lsp-feature?
+                                                                          "textDocument/codeAction")
+      "Tb" lsp-headerline-breadcrumb-mode "toggle breadcrumb" (lsp-feature?
+                                                               "textDocument/documentSymbol")
+      "Td" lsp-ui-doc-mode "toggle documentation popup" (featurep 'lsp-ui-doc)
+      "Tf" lsp-toggle-on-type-formatting "toggle on type formatting" (lsp-feature?
+                                                                      "textDocument/onTypeFormatting")
+      "Th" lsp-toggle-symbol-highlight "toggle highlighting" (lsp-feature? "textDocument/documentHighlight")
+      "Tl" lsp-lens-mode "toggle lenses" (lsp-feature? "textDocument/codeLens")
+      "Ts" lsp-toggle-signature-auto-activate "toggle signature" (lsp-feature? "textDocument/signatureHelp")
+
+      ;; goto
+      "ga" xref-find-apropos "find symbol in workspace" (lsp-feature? "workspace/symbol")
+      "gd" lsp-find-declaration "find declarations" (lsp-feature? "textDocument/declaration")
+      "ge" lsp-treemacs-errors-list "show errors" (fboundp 'lsp-treemacs-errors-list)
+      "gg" lsp-find-definition "find definitions" (lsp-feature? "textDocument/definition")
+      "gh" lsp-treemacs-call-hierarchy "call hierarchy" (and (lsp-feature? "callHierarchy/incomingCalls")
+                                                             (fboundp 'lsp-treemacs-call-hierarchy))
+      "gi" lsp-find-implementation "find implementations" (lsp-feature? "textDocument/implementation")
+      "gr" lsp-find-references "find references" (lsp-feature? "textDocument/references")
+      "gt" lsp-find-type-definition "find type definition" (lsp-feature? "textDocument/typeDefinition")
+
+      ;; help
+      "hg" lsp-ui-doc-glance "glance symbol" (and (featurep 'lsp-ui-doc)
+                                                  (lsp-feature? "textDocument/hover"))
+      "hh" lsp-describe-thing-at-point "describe symbol at point" (lsp-feature? "textDocument/hover")
+      "hs" lsp-signature-activate "signature help" (lsp-feature? "textDocument/signatureHelp")
+
+      ;; refactoring
+      "ro" lsp-organize-imports "organize imports" (lsp-feature? "textDocument/codeAction")
+      "rr" lsp-rename "rename" (lsp-feature? "textDocument/rename")
+
+      ;; actions
+      "aa" lsp-execute-code-action "code actions" (lsp-feature? "textDocument/codeAction")
+      "ah" lsp-document-highlight "highlight symbol" (lsp-feature? "textDocument/documentHighlight")
+      "ai" lsp-inlay-hint-accept "accept inlay hint" (lsp-feature? "textDocument/inlayHint")
+      "al" lsp-avy-lens "lens" (and (bound-and-true-p lsp-lens-mode) (featurep 'avy))
+
+      ;; peeks
+      "Gg" lsp-ui-peek-find-definitions "peek definitions" (and (lsp-feature? "textDocument/definition")
+                                                                (fboundp 'lsp-ui-peek-find-definitions))
+      "Gi" lsp-ui-peek-find-implementation "peek implementations" (and
+                                                                   (fboundp 'lsp-ui-peek-find-implementation)
+                                                                   (lsp-feature? "textDocument/implementation"))
+      "Gr" lsp-ui-peek-find-references "peek references" (and (fboundp 'lsp-ui-peek-find-references)
+                                                              (lsp-feature? "textDocument/references"))
+      "Gs" lsp-ui-peek-find-workspace-symbol "peek workspace symbol" (and (fboundp
+                                                                           'lsp-ui-peek-find-workspace-symbol)
+                                                                          (lsp-feature? "workspace/symbol")))))
+
+
+;; which-key integration
+
+(declare-function which-key-add-major-mode-key-based-replacements "ext:which-key")
+(declare-function which-key-add-key-based-replacements "ext:which-key")
+
+(defun lsp-enable-which-key-integration (&optional all-modes)
+  "Adds descriptions for `lsp-mode-map' to `which-key-mode' for the current
+active `major-mode', or for all major modes when ALL-MODES is t."
+  (cl-flet ((which-key-fn (if all-modes
+                              'which-key-add-key-based-replacements
+                            (apply-partially 'which-key-add-major-mode-key-based-replacements major-mode))))
+    (apply
+     #'which-key-fn
+     (lsp--prepend-prefix
+      (cl-list*
+       ""    "lsp"
+       "w"   "workspaces"
+       "F"   "folders"
+       "="   "formatting"
+       "T"   "toggle"
+       "g"   "goto"
+       "h"   "help"
+       "r"   "refactor"
+       "a"   "code actions"
+       "G"   "peek"
+       lsp--binding-descriptions)))))
+
+
+;; Globbing syntax
+
+;; We port VSCode's glob-to-regexp code
+;; (https://github.com/Microsoft/vscode/blob/466da1c9013c624140f6d1473b23a870abc82d44/src/vs/base/common/glob.ts)
+;; since the LSP globbing syntax seems to be the same as that of
+;; VSCode.
+
+(defconst lsp-globstar "**"
+  "Globstar pattern.")
+
+(defconst lsp-glob-split ?/
+  "The character by which we split path components in a glob
+pattern.")
+
+(defconst lsp-path-regexp "[/\\\\]"
+  "Forward or backslash to be used as a path separator in
+computed regexps.")
+
+(defconst lsp-non-path-regexp "[^/\\\\]"
+  "A regexp matching anything other than a slash.")
+
+(defconst lsp-globstar-regexp
+  (format "\\(?:%s\\|%s+%s\\|%s%s+\\)*?"
+          lsp-path-regexp
+          lsp-non-path-regexp lsp-path-regexp
+          lsp-path-regexp lsp-non-path-regexp)
+  "Globstar in regexp form.")
+
+(defun lsp-split-glob-pattern (pattern split-char)
+  "Split PATTERN at SPLIT-CHAR while respecting braces and brackets."
+  (when pattern
+    (let ((segments nil)
+          (in-braces nil)
+          (in-brackets nil)
+          (current-segment ""))
+      (dolist (char (string-to-list pattern))
+        (cl-block 'exit-point
+          (if (eq char split-char)
+              (when (and (null in-braces)
+                         (null in-brackets))
+                (push current-segment segments)
+                (setq current-segment "")
+                (cl-return-from 'exit-point))
+            (pcase char
+              (?{
+               (setq in-braces t))
+              (?}
+               (setq in-braces nil))
+              (?\[
+               (setq in-brackets t))
+              (?\]
+               (setq in-brackets nil))))
+          (setq current-segment (concat current-segment
+                                        (char-to-string char)))))
+      (unless (string-empty-p current-segment)
+        (push current-segment segments))
+      (nreverse segments))))
+
+(defun lsp--glob-to-regexp (pattern)
+  "Helper function to convert a PATTERN from LSP's glob syntax to
+an Elisp regexp."
+  (if (string-empty-p pattern)
+      ""
+    (let ((current-regexp "")
+          (glob-segments (lsp-split-glob-pattern pattern lsp-glob-split)))
+      (if (-all? (lambda (segment) (eq segment lsp-globstar))
+                 glob-segments)
+          ".*"
+        (let ((prev-segment-was-globstar nil))
+          (seq-do-indexed
+           (lambda (segment index)
+             (if (string-equal segment lsp-globstar)
+                 (unless prev-segment-was-globstar
+                   (setq current-regexp (concat current-regexp
+                                                lsp-globstar-regexp))
+                   (setq prev-segment-was-globstar t))
+               (let ((in-braces nil)
+                     (brace-val "")
+                     (in-brackets nil)
+                     (bracket-val ""))
+                 (dolist (char (string-to-list segment))
+                   (cond
+                    ((and (not (char-equal char ?\}))
+                          in-braces)
+                     (setq brace-val (concat brace-val
+                                             (char-to-string char))))
+                    ((and in-brackets
+                          (or (not (char-equal char ?\]))
+                              (string-empty-p bracket-val)))
+                     (let ((curr (cond
+                                  ((char-equal char ?-)
+                                   "-")
+                                  ;; NOTE: ?\^ and ?^ are different characters
+                                  ((and (memq char '(?^ ?!))
+                                        (string-empty-p bracket-val))
+                                   "^")
+                                  ((char-equal char lsp-glob-split)
+                                   "")
+                                  (t
+                                   (regexp-quote (char-to-string char))))))
+                       (setq bracket-val (concat bracket-val curr))))
+                    (t
+                     (cl-case char
+                       (?{
+                        (setq in-braces t))
+                       (?\[
+                        (setq in-brackets t))
+                       (?}
+                        (let* ((choices (lsp-split-glob-pattern brace-val ?\,))
+                               (brace-regexp (concat "\\(?:"
+                                                     (mapconcat #'lsp--glob-to-regexp choices "\\|")
+                                                     "\\)")))
+                          (setq current-regexp (concat current-regexp
+                                                       brace-regexp))
+                          (setq in-braces nil)
+                          (setq brace-val "")))
+                       (?\]
+                        (setq current-regexp
+                              (concat current-regexp
+                                      "[" bracket-val "]"))
+                        (setq in-brackets nil)
+                        (setq bracket-val ""))
+                       (??
+                        (setq current-regexp
+                              (concat current-regexp
+                                      lsp-non-path-regexp)))
+                       (?*
+                        (setq current-regexp
+                              (concat current-regexp
+                                      lsp-non-path-regexp "*?")))
+                       (t
+                        (setq current-regexp
+                              (concat current-regexp
+                                      (regexp-quote (char-to-string char)))))))))
+                 (when (and (< index (1- (length glob-segments)))
+                            (or (not (string-equal (nth (1+ index) glob-segments)
+                                                   lsp-globstar))
+                                (< (+ index 2)
+                                   (length glob-segments))))
+                   (setq current-regexp
+                         (concat current-regexp
+                                 lsp-path-regexp)))
+                 (setq prev-segment-was-globstar nil))))
+           glob-segments)
+          current-regexp)))))
+
+;; See https://github.com/emacs-lsp/lsp-mode/issues/2365
+(defun lsp-glob-unbrace-at-top-level (glob-pattern)
+  "If GLOB-PATTERN does not start with a brace, return a singleton list
+containing GLOB-PATTERN.
+
+If GLOB-PATTERN does start with a brace, return a list of the
+comma-separated globs within the top-level braces."
+  (if (not (string-prefix-p "{" glob-pattern))
+      (list glob-pattern)
+    (lsp-split-glob-pattern (substring glob-pattern 1 -1) ?\,)))
+
+(defun lsp-glob-convert-to-wrapped-regexp (glob-pattern)
+  "Convert GLOB-PATTERN to a regexp wrapped with the beginning-
+and end-of-string meta-characters."
+  (concat "\\`" (lsp--glob-to-regexp (string-trim glob-pattern)) "\\'"))
+
+(defun lsp-glob-to-regexps (glob-pattern)
+  "Convert a GLOB-PATTERN to a list of Elisp regexps."
+  (when-let*
+      ((glob (pcase glob-pattern
+               ((pred stringp) glob-pattern)
+               ((lsp-interface RelativePattern :base-uri :pattern) (format "%s%s" base-uri pattern))
+               (_ (error "Unknown glob-pattern type: %s" glob-pattern))))
+       (trimmed-pattern (string-trim glob))
+       (top-level-unbraced-patterns (lsp-glob-unbrace-at-top-level trimmed-pattern)))
+    (seq-map #'lsp-glob-convert-to-wrapped-regexp
+             top-level-unbraced-patterns)))
+
+
+
+(defvar lsp-mode-menu)
+
+(defun lsp-mouse-click (event)
+  (interactive "e")
+  (let* ((ec (event-start event))
+         (choice (x-popup-menu event lsp-mode-menu))
+         (action (lookup-key lsp-mode-menu (apply 'vector choice))))
+
+    (select-window (posn-window ec))
+
+    (unless (and (region-active-p) (eq action 'lsp-execute-code-action))
+      (goto-char (posn-point ec)))
+    (run-with-idle-timer
+     0.001 nil
+     (lambda ()
+       (cl-labels ((check (value) (not (null value))))
+         (when choice
+           (call-interactively action)))))))
+
+(defvar lsp-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-<down-mouse-1>") #'lsp-find-definition-mouse)
+    (define-key map (kbd "C-<mouse-1>") #'ignore)
+    (define-key map (kbd "<mouse-3>") #'lsp-mouse-click)
+    (define-key map (kbd "C-S-SPC") #'lsp-signature-activate)
+    (when lsp-keymap-prefix
+      (define-key map (kbd lsp-keymap-prefix) lsp-command-map))
+    map)
+  "Keymap for `lsp-mode'.")
+
+(define-minor-mode lsp-mode "Mode for LSP interaction."
+  :keymap lsp-mode-map
+  :lighter
+  (" LSP["
+   (lsp--buffer-workspaces
+    (:eval (mapconcat #'lsp--workspace-print lsp--buffer-workspaces "]["))
+    (:propertize "Disconnected" face warning))
+   "]")
+  :group 'lsp-mode
+  (when (and lsp-mode (not lsp--buffer-workspaces) (not lsp--buffer-deferred))
+    ;; fire up `lsp' when someone calls `lsp-mode' instead of `lsp'
+    (lsp)))
+
+(defvar lsp-mode-menu
+  (easy-menu-create-menu
+   nil
+   `(["Go to definition" lsp-find-definition
+      :active (lsp-feature? "textDocument/definition")]
+     ["Find references" lsp-find-references
+      :active (lsp-feature? "textDocument/references")]
+     ["Find implementations" lsp-find-implementation
+      :active (lsp-feature? "textDocument/implementation")]
+     ["Find declarations" lsp-find-declaration
+      :active (lsp-feature? "textDocument/declaration")]
+     ["Go to type declaration" lsp-find-type-definition
+      :active (lsp-feature? "textDocument/typeDefinition")]
+     "--"
+     ["Describe" lsp-describe-thing-at-point]
+     ["Code action" lsp-execute-code-action]
+     ["Format" lsp-format-buffer]
+     ["Highlight references" lsp-document-highlight]
+     ["Type Hierarchy" lsp-java-type-hierarchy
+      :visible (lsp-can-execute-command? "java.navigate.resolveTypeHierarchy")]
+     ["Type Hierarchy" lsp-treemacs-type-hierarchy
+      :visible (and (not (lsp-can-execute-command? "java.navigate.resolveTypeHierarchy"))
+                    (functionp 'lsp-treemacs-type-hierarchy)
+                    (lsp-feature? "textDocument/typeHierarchy"))]
+     ["Call Hierarchy" lsp-treemacs-call-hierarchy
+      :visible (and (functionp 'lsp-treemacs-call-hierarchy)
+                    (lsp-feature? "textDocument/callHierarchy"))]
+     ["Rename" lsp-rename
+      :active (lsp-feature? "textDocument/rename")]
+     "--"
+     ("Session"
+      ["View logs" lsp-workspace-show-log]
+      ["Describe" lsp-describe-session]
+      ["Shutdown" lsp-shutdown-workspace]
+      ["Restart" lsp-restart-workspace])
+     ("Workspace Folders"
+      ["Add" lsp-workspace-folders-add]
+      ["Remove" lsp-workspace-folders-remove]
+      ["Open" lsp-workspace-folders-open])
+     ("Toggle features"
+      ["Lenses" lsp-lens-mode]
+      ["Headerline breadcrumb" lsp-headerline-breadcrumb-mode]
+      ["Modeline code actions" lsp-modeline-code-actions-mode]
+      ["Modeline diagnostics" lsp-modeline-diagnostics-mode])
+     "---"
+     ("Debug"
+      :active (bound-and-true-p dap-ui-mode)
+      :filter ,(lambda (_)
+                 (and (boundp 'dap-ui-menu-items)
+                      (nthcdr 3 dap-ui-menu-items))))))
+  "Menu for lsp-mode.")
+
+(defalias 'make-lsp-client 'make-lsp--client)
+
+(cl-defstruct lsp--registered-capability
+  (id "")
+  (method " ")
+  (options nil))
+
+;; A ‘lsp--workspace’ object represents exactly one language server process.
+(cl-defstruct lsp--workspace
+  ;; the `ewoc' object for displaying I/O to and from the server
+  (ewoc nil)
+
+  ;; ‘server-capabilities’ is a hash table of the language server capabilities.
+  ;; It is the hash table representation of a LSP ServerCapabilities structure;
+  ;; cf. https://microsoft.github.io/language-server-protocol/specification#initialize.
+  (server-capabilities nil)
+
+  ;; ‘registered-server-capabilities’ is a list of hash tables that represent
+  ;; dynamically-registered Registration objects.  See
+  ;; https://microsoft.github.io/language-server-protocol/specification#client_registerCapability.
+  (registered-server-capabilities nil)
+
+  ;; ‘root’ is a directory name or a directory file name for the workspace
+  ;; root.  ‘lsp-mode’ passes this directory to the ‘initialize’ method of the
+  ;; language server; see
+  ;; https://microsoft.github.io/language-server-protocol/specification#initialize.
+  (root nil)
+
+  ;; ‘client’ is the ‘lsp--client’ object associated with this workspace.
+  (client nil)
+
+  ;; ‘host-root’ contains the host root info as derived from `file-remote-p'. It
+  ;; used to derive the file path in `lsp--uri-to-path' when using tramp
+  ;; connection.
+  (host-root nil)
+
+  ;; ‘proc’ is a process object; it may represent a regular process, a pipe, or
+  ;; a network connection.  ‘lsp-mode’ communicates with ‘proc’ using the
+  ;; language server protocol.  ‘proc’ corresponds to the COMMUNICATION-PROCESS
+  ;; element of the return value of the client’s ‘get-root’ field, which see.
+  (proc nil)
+
+  ;; ‘proc’ is a process object; it must represent a regular process, not a
+  ;; pipe or network process.  It represents the actual server process that
+  ;; corresponds to this workspace.  ‘cmd-proc’ corresponds to the
+  ;; COMMAND-PROCESS element of the return value of the client’s ‘get-root’
+  ;; field, which see.
+  (cmd-proc nil)
+
+  ;; ‘buffers’ is a list of buffers associated with this workspace.
+  (buffers nil)
+
+  ;; if semantic tokens is enabled, `semantic-tokens-faces' contains
+  ;; one face (or nil) for each token type supported by the language server.
+  (semantic-tokens-faces nil)
+
+  ;; If semantic highlighting is enabled, `semantic-tokens-modifier-faces'
+  ;; contains one face (or nil) for each modifier type supported by the language
+  ;; server
+  (semantic-tokens-modifier-faces nil)
+
+  ;; Extra client capabilities provided by third-party packages using
+  ;; `lsp-register-client-capabilities'. It's value is an alist of (PACKAGE-NAME
+  ;; . CAPS), where PACKAGE-NAME is a symbol of the third-party package name,
+  ;; and CAPS is either a plist of the client capabilities, or a function that
+  ;; takes no argument and returns a plist of the client capabilities or nil.
+  (extra-client-capabilities nil)
+
+  ;; Workspace status
+  (status nil)
+
+  ;; ‘metadata’ is a generic storage for workspace specific data. It is
+  ;; accessed via `lsp-workspace-set-metadata' and `lsp-workspace-set-metadata'
+  (metadata (make-hash-table :test 'equal))
+
+  ;; contains all the file notification watches that have been created for the
+  ;; current workspace in format filePath->file notification handle.
+  (watches (make-hash-table :test 'equal))
+
+  ;; list of workspace folders
+  (workspace-folders nil)
+
+  ;; ‘last-id’ the last request id for the current workspace.
+  (last-id 0)
+
+  ;; ‘status-string’ allows extensions to specify custom status string based on
+  ;; the Language Server specific messages.
+  (status-string nil)
+
+  ;; ‘shutdown-action’ flag used to mark that workspace should not be restarted (e.g. it
+  ;; was stopped).
+  shutdown-action
+
+  ;; ‘diagnostics’ a hashmap with workspace diagnostics.
+  (diagnostics (make-hash-table :test 'equal))
+
+  ;; contains all the workDone progress tokens that have been created
+  ;; for the current workspace.
+  (work-done-tokens (make-hash-table :test 'equal)))
+
+
+(cl-defstruct lsp-session
+  ;; contains the folders that are part of the current session
+  folders
+  ;; contains the folders that must not be imported in the current workspace.
+  folders-blocklist
+  ;; contains the list of folders that must be imported in a project in case of
+  ;; multi root LSP server.
+  (server-id->folders (make-hash-table :test 'equal))
+  ;; folder to list of the servers that are associated with the folder.
+  (folder->servers (make-hash-table :test 'equal))
+  ;; ‘metadata’ is a generic storage for workspace specific data. It is
+  ;; accessed via `lsp-workspace-set-metadata' and `lsp-workspace-set-metadata'
+  (metadata (make-hash-table :test 'equal)))
+
+(defun lsp-workspace-status (status-string &optional workspace)
+  "Set current workspace status to STATUS-STRING.
+If WORKSPACE is not specified defaults to lsp--cur-workspace."
+  (let ((status-string (when status-string (replace-regexp-in-string "%" "%%" status-string))))
+    (setf (lsp--workspace-status-string (or workspace lsp--cur-workspace)) status-string)))
+
+(defun lsp-session-set-metadata (key value &optional _workspace)
+  "Associate KEY with VALUE in the WORKSPACE metadata.
+If WORKSPACE is not provided current workspace will be used."
+  (puthash key value (lsp-session-metadata (lsp-session))))
+
+(defalias 'lsp-workspace-set-metadata 'lsp-session-set-metadata)
+
+(defun lsp-session-get-metadata (key &optional _workspace)
+  "Lookup KEY in WORKSPACE metadata.
+If WORKSPACE is not provided current workspace will be used."
+  (gethash key (lsp-session-metadata (lsp-session))))
+
+(defalias 'lsp-workspace-get-metadata 'lsp-session-get-metadata)
+
+(defun lsp-workspace-set-work-done-token (token value workspace)
+  "Associate TOKEN with VALUE in the WORKSPACE work-done-tokens."
+  (puthash token value (lsp--workspace-work-done-tokens workspace)))
+
+(defun lsp-workspace-get-work-done-token (token workspace)
+  "Lookup TOKEN in the WORKSPACE work-done-tokens."
+  (gethash token (lsp--workspace-work-done-tokens workspace)))
+
+(defun lsp-workspace-rem-work-done-token (token workspace)
+  "Remove TOKEN from the WORKSPACE work-done-tokens."
+  (remhash token (lsp--workspace-work-done-tokens workspace)))
+
+
+(defun lsp--make-notification (method &optional params)
+  "Create notification body for method METHOD and parameters PARAMS."
+  (list :jsonrpc "2.0" :method method :params params))
+
+(defalias 'lsp--make-request 'lsp--make-notification)
+(defalias 'lsp-make-request 'lsp--make-notification)
+
+(defun lsp--make-response (id result)
+  "Create response for REQUEST with RESULT."
+  `(:jsonrpc "2.0" :id ,id :result ,result))
+
+(defun lsp-make-notification (method &optional params)
+  "Create notification body for method METHOD and parameters PARAMS."
+  (lsp--make-notification method params))
+
+(defmacro lsp--json-serialize (params)
+  (if (progn
+        (require 'json)
+        (fboundp 'json-serialize))
+      `(json-serialize ,params
+                       :null-object nil
+                       :false-object :json-false)
+    `(let ((json-false :json-false))
+       (json-encode ,params))))
+
+(defun lsp--make-message (params)
+  "Create a LSP message from PARAMS, after encoding it to a JSON string."
+  (let ((body (lsp--json-serialize params)))
+    (concat "Content-Length: "
+            (number-to-string (1+ (string-bytes body)))
+            "\r\n\r\n"
+            body
+            "\n")))
+
+(cl-defstruct lsp--log-entry timestamp process-time type method id body)
+
+(defun lsp--make-log-entry (method id body type &optional process-time)
+  "Create an outgoing log object from BODY with method METHOD and id ID.
+If ID is non-nil, then the body is assumed to be a notification.
+TYPE can either be `incoming' or `outgoing'"
+  (cl-assert (memq type '(incoming-req outgoing-req incoming-notif
+                                       outgoing-notif incoming-resp
+                                       outgoing-resp)))
+  (make-lsp--log-entry
+   :timestamp (format-time-string "%I:%M:%S %p")
+   :process-time process-time
+   :method method
+   :id id
+   :type type
+   :body body))
+
+(defun lsp--log-font-lock-json (body)
+  "Font lock JSON BODY."
+  (with-temp-buffer
+    (insert body)
+    ;; We set the temp buffer file-name extension to .json and call `set-auto-mode'
+    ;; so the users configured json mode is used which could be
+    ;; `json-mode', `json-ts-mode', `jsonian-mode', etc.
+    (let ((buffer-file-name "lsp-log.json"))
+      (delay-mode-hooks
+        (set-auto-mode)
+        (if (fboundp 'font-lock-ensure)
+            (font-lock-ensure)
+          (with-no-warnings
+            (font-lock-fontify-buffer)))))
+    (buffer-string)))
+
+(defun lsp--log-entry-pp (entry)
+  (cl-assert (lsp--log-entry-p entry))
+  (pcase-let (((cl-struct lsp--log-entry timestamp method id type process-time
+                          body)
+               entry)
+              (json-false :json-false)
+              (json-encoding-pretty-print t)
+              (str nil))
+    (setq str
+          (concat (format "[Trace - %s] " timestamp)
+                  (pcase type
+                    ('incoming-req (format "Received request '%s - (%s)." method id))
+                    ('outgoing-req (format "Sending request '%s - (%s)'." method id))
+
+                    ('incoming-notif (format "Received notification '%s'." method))
+                    ('outgoing-notif (format "Sending notification '%s'." method))
+
+                    ('incoming-resp (format "Received response '%s - (%s)' in %dms."
+                                            method id process-time))
+                    ('outgoing-resp
+                     (format
+                      "Sending response '%s - (%s)'. Processing request took %dms"
+                      method id process-time)))
+                  "\n"
+                  (if (memq type '(incoming-resp ougoing-resp))
+                      "Result: "
+                    "Params: ")
+                  (lsp--log-font-lock-json (json-encode body))
+                  "\n\n\n"))
+    (setq str (propertize str 'mouse-face 'highlight 'read-only t))
+    (insert str)))
+
+(defvar-local lsp--log-io-ewoc nil)
+
+(defun lsp--get-create-io-ewoc (workspace)
+  (if (and (lsp--workspace-ewoc workspace)
+           (buffer-live-p (ewoc-buffer (lsp--workspace-ewoc workspace))))
+      (lsp--workspace-ewoc workspace)
+    (with-current-buffer (lsp--get-log-buffer-create workspace)
+      (unless (eq 'lsp-log-io-mode major-mode) (lsp-log-io-mode))
+      (setq-local window-point-insertion-type t)
+      (setq lsp--log-io-ewoc (ewoc-create #'lsp--log-entry-pp nil nil t))
+      (setf (lsp--workspace-ewoc workspace) lsp--log-io-ewoc))
+    (lsp--workspace-ewoc workspace)))
+
+(defun lsp--ewoc-count (ewoc)
+  (let* ((count 0)
+         (count-fn (lambda (_) (setq count (1+ count)))))
+    (ewoc-map count-fn ewoc)
+    count))
+
+(defun lsp--log-entry-new (entry workspace)
+  (let* ((ewoc (lsp--get-create-io-ewoc workspace))
+         (count (and (not (eq lsp-io-messages-max t)) (lsp--ewoc-count ewoc)))
+         (node (if (or (eq lsp-io-messages-max t)
+                       (>= lsp-io-messages-max count))
+                   nil
+                 (ewoc-nth ewoc (1- lsp-io-messages-max))))
+         (prev nil)
+         (inhibit-read-only t))
+    (while node
+      (setq prev (ewoc-prev ewoc node))
+      (ewoc-delete ewoc node)
+      (setq node prev))
+    (ewoc-enter-last ewoc entry)))
+
+(defun lsp--send-notification (body)
+  "Send BODY as a notification to the language server."
+  (lsp-foreach-workspace
+   (when (lsp--log-io-p (plist-get body :method))
+     (lsp--log-entry-new (lsp--make-log-entry
+                          (plist-get body :method)
+                          nil (plist-get body :params) 'outgoing-notif)
+                         lsp--cur-workspace))
+   (lsp--send-no-wait body
+                      (lsp--workspace-proc lsp--cur-workspace))))
+
+(defalias 'lsp-send-notification 'lsp--send-notification)
+
+(defun lsp-notify (method params)
+  "Send notification METHOD with PARAMS."
+  (lsp--send-notification (lsp--make-notification method params)))
+
+(defun lsp--cur-workspace-check ()
+  "Check whether buffer lsp workspace(s) are set."
+  (cl-assert (lsp-workspaces) nil
+             "No language server(s) is associated with this buffer."))
+
+(defun lsp--send-request (body &optional no-wait no-merge)
+  "Send BODY as a request to the language server, get the response.
+If NO-WAIT is non-nil, don't synchronously wait for a response.
+If NO-MERGE is non-nil, don't merge the results but return an
+alist mapping workspace->result."
+  (lsp-request (plist-get body :method)
+               (plist-get body :params)
+               :no-wait no-wait
+               :no-merge no-merge))
+
+(defalias 'lsp-send-request 'lsp--send-request
+  "Send BODY as a request to the language server and return the response
+synchronously.
+\n(fn BODY)")
+
+(cl-defun lsp-request (method params &key no-wait no-merge)
+  "Send request METHOD with PARAMS.
+If NO-MERGE is non-nil, don't merge the results but return alist
+workspace->result.
+If NO-WAIT is non-nil send the request as notification."
+  (if no-wait
+      (lsp-notify method params)
+    (let* ((send-time (float-time))
+           ;; max time by which we must get a response
+           (expected-time
+            (and
+             lsp-response-timeout
+             (+ send-time lsp-response-timeout)))
+           resp-result resp-error done?)
+      (unwind-protect
+          (progn
+            (lsp-request-async method params
+                               (lambda (res) (setf resp-result (or res :finished)) (throw 'lsp-done '_))
+                               :error-handler (lambda (err) (setf resp-error err) (throw 'lsp-done '_))
+                               :no-merge no-merge
+                               :mode 'detached
+                               :cancel-token :sync-request)
+            (while (not (or resp-error resp-result))
+              (if (functionp 'json-rpc-connection)
+                  (catch 'lsp-done (sit-for 0.01))
+                (catch 'lsp-done
+                  (accept-process-output
+                   nil
+                   (if expected-time (- expected-time send-time) 1))))
+              (setq send-time (float-time))
+              (when (and expected-time (< expected-time send-time))
+                (error "Timeout while waiting for response.  Method: %s" method)))
+            (setq done? t)
+            (cond
+             ((eq resp-result :finished) nil)
+             (resp-result resp-result)
+             ((lsp-json-error? resp-error) (error (lsp:json-error-message resp-error)))
+             ((lsp-json-error? (cl-first resp-error))
+              (error (lsp:json-error-message (cl-first resp-error))))))
+        (unless done?
+          (lsp-cancel-request-by-token :sync-request))))))
+
+(cl-defun lsp-request-while-no-input (method params)
+  "Send request METHOD with PARAMS and waits until there is no input.
+Return same value as `lsp--while-no-input' and respecting `non-essential'."
+  (if (or non-essential (not lsp-request-while-no-input-may-block))
+      (let* ((send-time (float-time))
+             ;; max time by which we must get a response
+             (expected-time
+              (and
+               lsp-response-timeout
+               (+ send-time lsp-response-timeout)))
+             resp-result resp-error done?
+             (catch-active t))
+        (unwind-protect
+            (progn
+              (lsp-request-async method params
+                                 (lambda (res)
+                                   (when catch-active
+                                     (setf resp-result (or res :finished))
+                                     (throw 'lsp-done '_)))
+                                 :error-handler (lambda (err)
+                                                  (when catch-active
+                                                    (setf resp-error err)
+                                                    (throw 'lsp-done '_)))
+                                 :mode 'detached
+                                 :cancel-token :sync-request)
+              (while (not (or resp-error resp-result (input-pending-p)))
+                (catch 'lsp-done
+                  (sit-for
+                   (if expected-time (- expected-time send-time) 1)))
+                (setq send-time (float-time))
+                (when (and expected-time (< expected-time send-time))
+                  (error "Timeout while waiting for response.  Method: %s" method)))
+              (setq done? (or resp-error resp-result))
+              (cond
+               ((eq resp-result :finished) nil)
+               (resp-result resp-result)
+               ((lsp-json-error? resp-error) (error (lsp:json-error-message resp-error)))
+               ((lsp-json-error? (cl-first resp-error))
+                (error (lsp:json-error-message (cl-first resp-error))))))
+          (setq catch-active nil)
+          (unless done?
+            (lsp-cancel-request-by-token :sync-request))
+          (when (and (input-pending-p) lsp--throw-on-input)
+            (throw 'input :interrupted))))
+    (lsp-request method params)))
+
+(defvar lsp--cancelable-requests (ht))
+
+(cl-defun lsp-request-async (method params callback
+                                    &key mode error-handler cancel-handler no-merge cancel-token)
+  "Send METHOD with PARAMS as a request to the language server.
+Call CALLBACK with the response received from the server
+asynchronously.
+MODE determines when the callback will be called depending on the
+condition of the original buffer.  It could be:
+- `detached' which means that the callback will be executed no
+matter what has happened to the buffer.
+- `alive' - the callback will be executed only if the buffer from
+which the call was executed is still alive.
+- `current' the callback will be executed only if the original buffer
+is still selected.
+- `tick' - the callback will be executed only if the buffer was not modified.
+- `unchanged' - the callback will be executed only if the buffer hasn't
+changed and if the buffer is not modified.
+
+ERROR-HANDLER will be called in case the request has failed.
+CANCEL-HANDLER will be called in case the request is being canceled.
+If NO-MERGE is non-nil, don't merge the results but return alist
+workspace->result.
+CANCEL-TOKEN is the token that can be used to cancel request."
+  (lsp--send-request-async `(:jsonrpc "2.0" :method ,method :params ,params)
+                           callback mode error-handler cancel-handler no-merge cancel-token))
+
+(defun lsp--create-request-cancel (id workspaces hook buf method cancel-callback)
+  (lambda (&rest _)
+    (unless (and (equal 'post-command-hook hook)
+                 (equal (current-buffer) buf))
+      (lsp--request-cleanup-hooks id)
+      (with-lsp-workspaces workspaces
+        (lsp--cancel-request id)
+        (when cancel-callback (funcall cancel-callback)))
+      (lsp-log "Cancelling %s(%s) in hook %s" method id hook))))
+
+(defun lsp--create-async-callback
+    (callback method no-merge workspaces)
+  "Create async handler expecting COUNT results, merge them and call CALLBACK.
+MODE determines when the callback will be called depending on the
+condition of the original buffer. METHOD is the invoked method.
+If NO-MERGE is non-nil, don't merge the results but return alist
+workspace->result. ID is the request id."
+  (let (results errors)
+    (lambda (result)
+      (push (cons lsp--cur-workspace result)
+            (if (eq result :error) errors results))
+      (when (and (not (eq (length errors) (length workspaces)))
+                 (eq (+ (length errors) (length results)) (length workspaces)))
+        (funcall callback
+                 (if no-merge
+                     results
+                   (lsp--merge-results (-map #'cl-rest results) method)))))))
+
+(defcustom lsp-default-create-error-handler-fn nil
+  "Default error handler customization.
+Handler should give METHOD as argument and return function of one argument
+ERROR."
+  :type 'function
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp--create-default-error-handler (method)
+  "Default error handler.
+METHOD is the executed method."
+  (if lsp-default-create-error-handler-fn
+      (funcall lsp-default-create-error-handler-fn method)
+    (lambda (error)
+      (lsp--warn "%s" (or (lsp--error-string error)
+                          (format "%s Request has failed" method))))))
+
+(defvar lsp--request-cleanup-hooks (ht))
+
+(defun lsp--request-cleanup-hooks (request-id)
+  (when-let* ((cleanup-function (gethash request-id lsp--request-cleanup-hooks)))
+    (funcall cleanup-function)
+    (remhash request-id lsp--request-cleanup-hooks)))
+
+(defun lsp-cancel-request-by-token (cancel-token)
+  "Cancel request using CANCEL-TOKEN."
+  (-when-let ((request-id . workspaces) (gethash cancel-token lsp--cancelable-requests))
+    (with-lsp-workspaces workspaces
+      (lsp--cancel-request request-id))
+    (remhash cancel-token lsp--cancelable-requests)
+    (lsp--request-cleanup-hooks request-id)))
+
+(defun lsp--send-request-async (body callback
+                                     &optional mode error-callback cancel-callback
+                                     no-merge cancel-token)
+  "Send BODY as a request to the language server.
+Call CALLBACK with the response received from the server
+asynchronously.
+MODE determines when the callback will be called depending on the
+condition of the original buffer.  It could be:
+- `detached' which means that the callback will be executed no
+matter what has happened to the buffer.
+- `alive' - the callback will be executed only if the buffer from
+which the call was executed is still alive.
+- `current' the callback will be executed only if the original buffer
+is still selected.
+- `tick' - the callback will be executed only if the buffer was not modified.
+- `unchanged' - the callback will be executed only if the buffer hasn't
+changed and if the buffer is not modified.
+
+ERROR-CALLBACK will be called in case the request has failed.
+CANCEL-CALLBACK will be called in case the request is being canceled.
+If NO-MERGE is non-nil, don't merge the results but return alist
+workspace->result.
+CANCEL-TOKEN is the token that can be used to cancel request."
+  (when cancel-token
+    (lsp-cancel-request-by-token cancel-token))
+
+  (if-let* ((target-workspaces (lsp--find-workspaces-for body)))
+      (let* ((start-time (current-time))
+             (method (plist-get body :method))
+             (id (cl-incf lsp-last-id))
+             (buf (current-buffer))
+             (cancel-callback (when cancel-callback
+                                (pcase mode
+                                  ((or 'alive 'tick 'unchanged)
+                                   (lambda ()
+                                     (with-current-buffer buf
+                                       (funcall cancel-callback))))
+                                  (_ cancel-callback))))
+             ;; calculate what are the (hook . local) pairs which will cancel
+             ;; the request
+             (hooks (pcase mode
+                      ('alive     '((kill-buffer-hook . t)))
+                      ('tick      '((kill-buffer-hook . t) (after-change-functions . t)))
+                      ('unchanged '((after-change-functions . t) (post-command-hook . nil)))
+                      ('current   '((post-command-hook . nil)))))
+             ;; note: lambdas in emacs can be compared but we should make sure
+             ;; that all of the captured arguments are the same - in our case
+             ;; `lsp--create-request-cancel' will return the same lambda when
+             ;; called with the same params.
+             (cleanup-hooks
+              (lambda () (mapc
+                          (-lambda ((hook . local))
+                            (if local
+                                (when (buffer-live-p buf)
+                                  (with-current-buffer buf
+                                    (remove-hook hook
+                                                 (lsp--create-request-cancel
+                                                  id target-workspaces hook buf method cancel-callback)
+                                                 t)))
+                              (remove-hook hook (lsp--create-request-cancel
+                                                 id target-workspaces hook buf method cancel-callback))))
+                          hooks)
+                (remhash cancel-token lsp--cancelable-requests)))
+             (callback (pcase mode
+                         ((or 'alive 'tick 'unchanged) (lambda (&rest args)
+                                                         (with-current-buffer buf
+                                                           (apply callback args))))
+                         (_ callback)))
+             (callback (lsp--create-async-callback callback
+                                                   method
+                                                   no-merge
+                                                   target-workspaces))
+             (callback (lambda (result)
+                         (lsp--request-cleanup-hooks id)
+                         (funcall callback result)))
+             (error-callback (lsp--create-async-callback
+                              (or error-callback
+                                  (lsp--create-default-error-handler method))
+                              method
+                              nil
+                              target-workspaces))
+             (error-callback (lambda (error)
+                               (funcall callback :error)
+                               (lsp--request-cleanup-hooks id)
+                               (funcall error-callback error)))
+             (body (plist-put body :id id)))
+
+        ;; cancel request in any of the hooks
+        (mapc (-lambda ((hook . local))
+                (add-hook hook
+                          (lsp--create-request-cancel
+                           id target-workspaces hook buf method cancel-callback)
+                          nil local))
+              hooks)
+        (puthash id cleanup-hooks lsp--request-cleanup-hooks)
+
+        (setq lsp--last-active-workspaces target-workspaces)
+
+        (when cancel-token
+          (puthash cancel-token (cons id target-workspaces) lsp--cancelable-requests))
+
+        (seq-doseq (workspace target-workspaces)
+          (when (lsp--log-io-p method)
+            (lsp--log-entry-new (lsp--make-log-entry method id
+                                                     (plist-get body :params)
+                                                     'outgoing-req)
+                                workspace))
+          (puthash id
+                   (list callback error-callback method start-time (current-time))
+                   (-> workspace
+                       (lsp--workspace-client)
+                       (lsp--client-response-handlers)))
+          (lsp--send-no-wait body (lsp--workspace-proc workspace)))
+        body)
+    (error "The connected server(s) does not support method %s.
+To find out what capabilities support your server use `M-x lsp-describe-session'
+and expand the capabilities section"
+           (plist-get body :method))))
+
+;; deprecated, use lsp-request-async.
+(defalias 'lsp-send-request-async 'lsp--send-request-async)
+(make-obsolete 'lsp-send-request-async 'lsp-request-async "lsp-mode 7.0.1")
+
+;; Clean up the entire state of lsp mode when Emacs is killed, to get rid of any
+;; pending language servers.
+(add-hook 'kill-emacs-hook #'lsp--global-teardown)
+
+(defun lsp--global-teardown ()
+  "Unload working workspaces."
+  (lsp-foreach-workspace (lsp--shutdown-workspace)))
+
+(defun lsp--shutdown-workspace (&optional restart)
+  "Shut down the language server process for ‘lsp--cur-workspace’."
+  (with-demoted-errors "LSP error: %S"
+    (let ((lsp-response-timeout 0.5))
+      (condition-case err
+          (lsp-request "shutdown" nil)
+        (error (lsp--error "%s" err))))
+    (lsp-notify "exit" nil))
+  (setf (lsp--workspace-shutdown-action lsp--cur-workspace) (or (and restart 'restart) 'shutdown))
+  (lsp--uninitialize-workspace))
+
+(defcustom lsp-inlay-hint-enable nil
+  "If non-nil it will enable inlay hints."
+  :type 'boolean
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp--uninitialize-workspace ()
+  "Cleanup buffer state.
+When a workspace is shut down, by request or from just
+disappearing, unset all the variables related to it."
+  (-let [(&lsp-wks 'cmd-proc 'buffers) lsp--cur-workspace]
+    (lsp-process-kill cmd-proc)
+    (mapc (lambda (buf)
+            (when (lsp-buffer-live-p buf)
+              (lsp-with-current-buffer buf
+                                       (lsp-managed-mode -1))))
+          buffers)
+    (lsp-diagnostics--workspace-cleanup lsp--cur-workspace)))
+
+(defun lsp--client-capabilities (&optional custom-capabilities)
+  "Return the client capabilities appending CUSTOM-CAPABILITIES."
+  (append
+   `((general . ((positionEncodings . ["utf-32" "utf-8" "utf-16"])))
+     (workspace . ((workspaceEdit . ((documentChanges . t)
+                                     (resourceOperations . ["create" "rename" "delete"])))
+                   (applyEdit . t)
+                   (symbol . ((symbolKind . ((valueSet . ,(apply 'vector (number-sequence 1 26)))))))
+                   (executeCommand . ((dynamicRegistration . :json-false)))
+                   ,@(when lsp-enable-file-watchers '((didChangeWatchedFiles . ((dynamicRegistration . t)))))
+                   (workspaceFolders . t)
+                   (configuration . t)
+                   ,@(when lsp-semantic-tokens-enable
+                       `((semanticTokens . ((refreshSupport . ,(or (and (boundp 'lsp-semantic-tokens-honor-refresh-requests)
+                                                                        lsp-semantic-tokens-honor-refresh-requests)
+                                                                   :json-false))))))
+                   ,@(when lsp-lens-enable '((codeLens . ((refreshSupport . t)))))
+                   ,@(when lsp-inlay-hint-enable '((inlayHint . ((refreshSupport . :json-false)))))
+                   (diagnostics . ((refreshSupport . :json-false)))
+                   (fileOperations . ((didCreate . :json-false)
+                                      (willCreate . :json-false)
+                                      (didRename . t)
+                                      (willRename . t)
+                                      (didDelete . :json-false)
+                                      (willDelete . :json-false)))))
+     (textDocument . ((declaration . ((dynamicRegistration . t)
+                                      (linkSupport . t)))
+                      (definition . ((dynamicRegistration . t)
+                                     (linkSupport . t)))
+                      (references . ((dynamicRegistration . t)))
+                      (implementation . ((dynamicRegistration . t)
+                                         (linkSupport . t)))
+                      (typeDefinition . ((dynamicRegistration . t)
+                                         (linkSupport . t)))
+                      (synchronization . ((willSave . t) (didSave . t) (willSaveWaitUntil . t)))
+                      (documentSymbol . ((symbolKind . ((valueSet . ,(apply 'vector (number-sequence 1 26)))))
+                                         (hierarchicalDocumentSymbolSupport . t)))
+                      (formatting . ((dynamicRegistration . t)))
+                      (rangeFormatting . ((dynamicRegistration . t)))
+                      (onTypeFormatting . ((dynamicRegistration . t)))
+                      ,@(when (and lsp-semantic-tokens-enable
+                                   (functionp 'lsp--semantic-tokens-capabilities))
+                          (lsp--semantic-tokens-capabilities))
+                      (rename . ((dynamicRegistration . t) (prepareSupport . t)))
+                      (codeAction . ((dynamicRegistration . t)
+                                     (isPreferredSupport . t)
+                                     (codeActionLiteralSupport . ((codeActionKind . ((valueSet . [""
+                                                                                                  "quickfix"
+                                                                                                  "refactor"
+                                                                                                  "refactor.extract"
+                                                                                                  "refactor.inline"
+                                                                                                  "refactor.rewrite"
+                                                                                                  "source"
+                                                                                                  "source.organizeImports"])))))
+                                     (resolveSupport . ((properties . ["edit" "command"])))
+                                     (dataSupport . t)))
+                      (completion . ((completionItem . ((snippetSupport . ,(cond
+                                                                            ((and lsp-enable-snippet (not (fboundp 'yas-minor-mode)))
+                                                                             (lsp--warn (concat
+                                                                                         "Yasnippet is not installed, but `lsp-enable-snippet' is set to `t'. "
+                                                                                         "You must either install yasnippet, or disable snippet support."))
+                                                                             :json-false)
+                                                                            (lsp-enable-snippet t)
+                                                                            (t :json-false)))
+                                                        (documentationFormat . ["markdown" "plaintext"])
+                                                        ;; Remove this after jdtls support resolveSupport
+                                                        (resolveAdditionalTextEditsSupport . t)
+                                                        (insertReplaceSupport . t)
+                                                        (deprecatedSupport . t)
+                                                        (resolveSupport
+                                                         . ((properties . ["documentation"
+                                                                           "detail"
+                                                                           "additionalTextEdits"
+                                                                           "command"])))
+                                                        (insertTextModeSupport . ((valueSet . [1 2])))
+                                                        (labelDetailsSupport . t)))
+                                     (contextSupport . t)
+                                     (dynamicRegistration . t)))
+                      (signatureHelp . ((signatureInformation . ((parameterInformation . ((labelOffsetSupport . t)))
+                                                                 (activeParameterSupport . t)))
+                                        (dynamicRegistration . t)))
+                      (documentLink . ((dynamicRegistration . t)
+                                       (tooltipSupport . t)))
+                      (hover . ((contentFormat . ["markdown" "plaintext"])
+                                (dynamicRegistration . t)))
+                      ,@(when lsp-enable-folding
+                          `((foldingRange . ((dynamicRegistration . t)
+                                             ,@(when lsp-folding-range-limit
+                                                 `((rangeLimit . ,lsp-folding-range-limit)))
+                                             ,@(when lsp-folding-line-folding-only
+                                                 `((lineFoldingOnly . t)))))))
+                      (selectionRange . ((dynamicRegistration . t)))
+                      (callHierarchy . ((dynamicRegistration . :json-false)))
+                      (typeHierarchy . ((dynamicRegistration . t)))
+                      (publishDiagnostics . ((relatedInformation . t)
+                                             (tagSupport . ((valueSet . [1 2])))
+                                             (versionSupport . t)))
+                      (diagnostic . ((dynamicRegistration . :json-false)
+                                     (relatedDocumentSupport . :json-false)))
+                      (linkedEditingRange . ((dynamicRegistration . t)))
+                      (inlineCompletion . ())
+                      ,@(when lsp-inlay-hint-enable
+                          '((inlayHint . ((dynamicRegistration . :json-false)
+                                          (resolveSupport . ((properties . ["textEdits" "tooltip"])))))))))
+     (window . ((workDoneProgress . t)
+                (showDocument . ((support . t))))))
+   custom-capabilities))
+
+(defun lsp-find-roots-for-workspace (workspace session)
+  "Get all roots for the WORKSPACE."
+  (-filter #'identity (ht-map (lambda (folder workspaces)
+                                (when (-contains? workspaces workspace)
+                                  folder))
+                              (lsp-session-folder->servers session))))
+
+(defun lsp-session-watches (&optional session)
+  "Get watches created for SESSION."
+  (or (gethash "__watches" (lsp-session-metadata (or session (lsp-session))))
+      (-let [res (make-hash-table :test 'equal)]
+        (puthash "__watches" res (lsp-session-metadata (or session (lsp-session))))
+        res)))
+
+(defun lsp--file-process-event (session root-folder event)
+  "Process file event."
+  (let* ((changed-file (cl-third event))
+         (rel-changed-file (f-relative changed-file root-folder))
+         (event-numeric-kind (alist-get (cl-second event) lsp--file-change-type))
+         (bit-position (1- event-numeric-kind))
+         (watch-bit (ash 1 bit-position))
+         (workspaces (gethash root-folder (lsp-session-folder->servers session))))
+    (dolist (workspace workspaces)
+      (when (cl-loop for capability in (lsp--workspace-registered-server-capabilities workspace)
+                     thereis (and (equal (lsp--registered-capability-method capability)
+                                         "workspace/didChangeWatchedFiles")
+                                  (cl-loop for fs-watcher across (lsp:did-change-watched-files-registration-options-watchers
+                                                              (lsp--registered-capability-options capability))
+                                           thereis (let ((kind? (lsp:file-system-watcher-kind? fs-watcher)))
+                                                     (when (or (null kind?)
+                                                               (> (logand kind? watch-bit) 0))
+                                                       (let ((regexes (or (lsp-get fs-watcher :_cachedRegexp)
+                                                                          (let ((regexp (lsp-glob-to-regexps
+                                                                                         (lsp:file-system-watcher-glob-pattern fs-watcher))))
+                                                                            (lsp-put fs-watcher :_cachedRegexp regexp)
+                                                                            regexp))))
+                                                         (cl-loop for re in regexes
+                                                                  thereis (or (string-match-p re changed-file)
+                                                                              (string-match-p re rel-changed-file)))))))))
+        (with-lsp-workspace workspace
+          (lsp-notify
+           "workspace/didChangeWatchedFiles"
+           `((changes . [((type . ,event-numeric-kind)
+                          (uri . ,(lsp--path-to-uri changed-file)))]))))))))
+
+(lsp-defun lsp--server-register-capability ((&Registration :method :id :register-options?))
+  "Register capability REG."
+  (when (and lsp-enable-file-watchers
+             (equal method "workspace/didChangeWatchedFiles"))
+    (-let* ((created-watches (lsp-session-watches (lsp-session)))
+            (root-folders (cl-set-difference
+                           (lsp-find-roots-for-workspace lsp--cur-workspace (lsp-session))
+                           (ht-keys created-watches))))
+      ;; create watch for each root folder without such
+      (dolist (folder root-folders)
+        (let* ((watch (make-lsp-watch :root-directory folder))
+               (ignored-things (lsp--get-ignored-regexes-for-workspace-root folder))
+               (ignored-files-regex-list (car ignored-things))
+               (ignored-directories-regex-list (cadr ignored-things)))
+          (puthash folder watch created-watches)
+          (lsp-watch-root-folder (file-truename folder)
+                                 (-partial #'lsp--file-process-event (lsp-session) folder)
+                                 ignored-files-regex-list
+                                 ignored-directories-regex-list
+                                 watch
+                                 t)))))
+
+  (push
+   (make-lsp--registered-capability :id id :method method :options register-options?)
+   (lsp--workspace-registered-server-capabilities lsp--cur-workspace)))
+
+(defmacro lsp--with-workspace-temp-buffer (workspace-root &rest body)
+  "With a temp-buffer under `WORKSPACE-ROOT' and evaluate `BODY', useful to
+access dir-local variables."
+  (declare (indent 1) (debug t))
+  `(with-temp-buffer
+     ;; Set the buffer's name to something under the root so that we can hack the local variables
+     ;; This file doesn't need to exist and will not be created due to this.
+     (setq-local buffer-file-name (expand-file-name "lsp-mode-temp" (expand-file-name ,workspace-root)))
+     (hack-local-variables)
+     (prog1 ,@body
+       (setq-local buffer-file-name nil))))
+
+(defun lsp--get-ignored-regexes-for-workspace-root (workspace-root)
+  "Return a list of the form
+(lsp-file-watch-ignored-files lsp-file-watch-ignored-directories) for the given
+WORKSPACE-ROOT."
+  ;; The intent of this function is to provide per-root workspace-level customization of the
+  ;; lsp-file-watch-ignored-directories and lsp-file-watch-ignored-files variables.
+  (lsp--with-workspace-temp-buffer workspace-root
+    (list lsp-file-watch-ignored-files (lsp-file-watch-ignored-directories))))
+
+
+(defun lsp--cleanup-hanging-watches ()
+  "Cleanup watches in case there are no more workspaces that are interested
+in that particular folder."
+  (let* ((session (lsp-session))
+         (watches (lsp-session-watches session)))
+    (dolist (watched-folder (ht-keys watches))
+      (when (-none? (lambda (workspace)
+                      (with-lsp-workspace workspace
+                        (lsp--registered-capability "workspace/didChangeWatchedFiles")))
+                    (gethash watched-folder (lsp-session-folder->servers (lsp-session))))
+        (lsp-log "Cleaning up watches for folder %s. There is no workspace watching this folder..." watched-folder)
+        (lsp-kill-watch (gethash watched-folder watches))
+        (remhash watched-folder watches)))))
+
+(lsp-defun lsp--server-unregister-capability ((&Unregistration :id :method))
+  "Unregister capability UNREG."
+  (setf (lsp--workspace-registered-server-capabilities lsp--cur-workspace)
+        (seq-remove (lambda (e) (equal (lsp--registered-capability-id e) id))
+                    (lsp--workspace-registered-server-capabilities lsp--cur-workspace)))
+  (when (equal method "workspace/didChangeWatchedFiles")
+    (lsp--cleanup-hanging-watches)))
+
+(defun lsp--server-capabilities ()
+  "Return the capabilities of the language server associated with the buffer."
+  (->> (lsp-workspaces)
+       (-keep #'lsp--workspace-server-capabilities)
+       (apply #'lsp-merge)))
+
+(defun lsp--send-open-close-p ()
+  "Return whether open and close notifications should be sent to the server."
+  (let ((sync (lsp:server-capabilities-text-document-sync? (lsp--server-capabilities))))
+    (or (memq sync '(1 2))
+        (lsp:text-document-sync-options-open-close? sync))))
+
+(defun lsp--send-will-save-p ()
+  "Return whether willSave notifications should be sent to the server."
+  (-> (lsp--server-capabilities)
+      (lsp:server-capabilities-text-document-sync?)
+      (lsp:text-document-sync-options-will-save?)))
+
+(defun lsp--send-will-save-wait-until-p ()
+  "Return whether willSaveWaitUntil notifications should be sent to the server."
+  (-> (lsp--server-capabilities)
+      (lsp:server-capabilities-text-document-sync?)
+      (lsp:text-document-sync-options-will-save-wait-until?)))
+
+(defun lsp--send-did-save-p ()
+  "Return whether didSave notifications should be sent to the server."
+  (let ((sync (lsp:server-capabilities-text-document-sync? (lsp--server-capabilities))))
+    (or (memq sync '(1 2))
+        (lsp:text-document-sync-options-save? sync))))
+
+(defun lsp--save-include-text-p ()
+  "Return whether save notifications should include the text document's contents."
+  (->> (lsp--server-capabilities)
+       (lsp:server-capabilities-text-document-sync?)
+       (lsp:text-document-sync-options-save?)
+       (lsp:text-document-save-registration-options-include-text?)))
+
+(defun lsp--send-will-rename-files-p (path)
+  "Return whether willRenameFiles request should be sent to the server.
+If any filters, checks if it applies for PATH."
+  (let* ((will-rename (-> (lsp--server-capabilities)
+                          (lsp:server-capabilities-workspace?)
+                          (lsp:workspace-server-capabilities-file-operations?)
+                          (lsp:workspace-file-operations-will-rename?)))
+         (filters (seq-into (lsp:file-operation-registration-options-filters will-rename) 'list)))
+    (and will-rename
+         (or (seq-empty-p filters)
+             (let ((uri (lsp--path-to-uri path)))
+               (cl-loop for filter in filters
+                        for scheme? = (lsp:file-operation-filter-scheme? filter)
+                        for glob = (lsp:file-operation-pattern-glob (lsp:file-operation-filter-pattern filter))
+                        thereis (and (or (not scheme?)
+                                         (string-prefix-p scheme? uri))
+                                     (let ((regexes (lsp-glob-to-regexps glob)))
+                                       (cl-loop for re in regexes
+                                                thereis (string-match-p re path))))))))))
+
+(defun lsp--send-did-rename-files-p ()
+  "Return whether didRenameFiles notification should be sent to the server."
+  (-> (lsp--server-capabilities)
+      (lsp:server-capabilities-workspace?)
+      (lsp:workspace-server-capabilities-file-operations?)
+      (lsp:workspace-file-operations-did-rename?)))
+
+(declare-function project-roots "ext:project" (project) t)
+(declare-function project-root "ext:project" (project) t)
+
+(defun lsp--suggest-project-root ()
+  "Get project root."
+  (or
+   (when (fboundp 'projectile-project-root)
+     (condition-case nil
+         (projectile-project-root)
+       (error nil)))
+   (when (fboundp 'project-current)
+     (when-let* ((project (project-current)))
+       (if (fboundp 'project-root)
+           (project-root project)
+         (car (with-no-warnings
+                (project-roots project))))))
+   default-directory))
+
+(defun lsp--read-from-file (file)
+  "Read FILE content."
+  (when (file-exists-p file)
+    (cl-first (read-from-string (f-read-text file 'utf-8)))))
+
+(defun lsp--persist (file-name to-persist)
+  "Persist TO-PERSIST in FILE-NAME.
+
+This function creates the parent directories if they don't exist
+yet."
+  (let ((print-length nil)
+        (print-level nil))
+    ;; Create all parent directories:
+    (make-directory (f-parent file-name) t)
+    (f-write-text (prin1-to-string to-persist) 'utf-8 file-name)))
+
+(defun lsp-workspace-folders-add (project-root)
+  "Add PROJECT-ROOT to the list of workspace folders."
+  (interactive
+   (list (read-directory-name "Select folder to add: "
+                              (or (lsp--suggest-project-root) default-directory) nil t)))
+  (cl-pushnew (lsp-f-canonical project-root)
+              (lsp-session-folders (lsp-session)) :test 'equal)
+  (lsp--persist-session (lsp-session))
+
+  (run-hook-with-args 'lsp-workspace-folders-changed-functions (list project-root) nil))
+
+(defun lsp-workspace-folders-remove (project-root)
+  "Remove PROJECT-ROOT from the list of workspace folders."
+  (interactive (list (completing-read "Select folder to remove: "
+                                      (lsp-session-folders (lsp-session))
+                                      nil t nil nil
+                                      (lsp-find-session-folder (lsp-session) default-directory))))
+
+  (setq project-root (lsp-f-canonical project-root))
+
+  ;; send remove folder to each multiroot workspace associated with the folder
+  (dolist (wks (->> (lsp-session)
+                    (lsp-session-folder->servers)
+                    (gethash project-root)
+                    (--filter (lsp--client-multi-root (lsp--workspace-client it)))))
+    (with-lsp-workspace wks
+      (lsp-notify "workspace/didChangeWorkspaceFolders"
+                  (lsp-make-did-change-workspace-folders-params
+                   :event (lsp-make-workspace-folders-change-event
+                           :removed (vector (lsp-make-workspace-folder
+                                             :uri (lsp--path-to-uri project-root)
+                                             :name (f-filename project-root)))
+                           :added [])))))
+
+  ;; turn off servers in the removed directory
+  (let* ((session (lsp-session))
+         (folder->servers (lsp-session-folder->servers session))
+         (server-id->folders (lsp-session-server-id->folders session))
+         (workspaces (gethash project-root folder->servers)))
+
+    (remhash project-root folder->servers)
+
+    ;; turn off the servers without root folders
+    (dolist (workspace workspaces)
+      (when (--none? (-contains? it workspace) (ht-values folder->servers))
+        (lsp--info "Shutdown %s since folder %s is removed..."
+                   (lsp--workspace-print workspace) project-root)
+        (with-lsp-workspace workspace (lsp--shutdown-workspace))))
+
+    (setf (lsp-session-folders session)
+          (-remove-item project-root (lsp-session-folders session)))
+
+    (ht-aeach (puthash key
+                       (-remove-item project-root value)
+                       server-id->folders)
+              server-id->folders)
+    (lsp--persist-session (lsp-session)))
+
+  (run-hook-with-args 'lsp-workspace-folders-changed-functions nil (list project-root)))
+
+(defun lsp-workspace-blocklist-remove (project-root)
+  "Remove PROJECT-ROOT from the workspace blocklist."
+  (interactive (list (completing-read "Select folder to remove:"
+                                      (lsp-session-folders-blocklist (lsp-session))
+                                      nil t)))
+  (setf (lsp-session-folders-blocklist (lsp-session))
+        (delete project-root
+                (lsp-session-folders-blocklist (lsp-session))))
+  (lsp--persist-session (lsp-session)))
+
+(define-obsolete-function-alias 'lsp-workspace-folders-switch
+  'lsp-workspace-folders-open "lsp-mode 6.1")
+
+(defun lsp-workspace-folders-open (project-root)
+  "Open the directory located at PROJECT-ROOT"
+  (interactive (list (completing-read "Open folder: "
+                                      (lsp-session-folders (lsp-session))
+                                      nil t)))
+  (find-file project-root))
+
+(defun lsp--maybe-enable-signature-help (trigger-characters)
+  (let ((ch last-command-event))
+    (when (cl-find ch trigger-characters :key #'string-to-char)
+      (lsp-signature-activate))))
+
+(defun lsp--on-type-formatting-handler-create ()
+  (when-let* ((provider (lsp--capability-for-method "textDocument/onTypeFormatting" )))
+    (-let [(&DocumentOnTypeFormattingOptions :more-trigger-character?
+                                             :first-trigger-character) provider]
+      (lambda ()
+        (lsp--on-type-formatting first-trigger-character
+                                 more-trigger-character?)))))
+
+(defun lsp--update-on-type-formatting-hook (&optional cleanup?)
+  (when-let* ((on-type-formatting-handler
+               (and (or lsp-enable-on-type-formatting cleanup?)
+                    (lsp--on-type-formatting-handler-create))))
+    (cond
+     ((and lsp-enable-on-type-formatting (not cleanup?))
+      (add-hook 'post-self-insert-hook on-type-formatting-handler nil t))
+     ((or cleanup? (not lsp-enable-on-type-formatting))
+      (remove-hook 'post-self-insert-hook on-type-formatting-handler t)))))
+
+(defun lsp--signature-help-handler-create ()
+  (-when-let ((&SignatureHelpOptions? :trigger-characters?)
+              (lsp--capability-for-method "textDocument/signatureHelp"))
+    (lambda ()
+      (lsp--maybe-enable-signature-help trigger-characters?))))
+
+(defun lsp--update-signature-help-hook (&optional cleanup?)
+  (let ((signature-auto-activate-p (or (equal lsp-signature-auto-activate t)
+                                       (memq :on-trigger-char lsp-signature-auto-activate))))
+    (when-let* ((signature-help-handler
+                 (and (or signature-auto-activate-p cleanup?)
+                      (lsp--signature-help-handler-create))))
+      (cond
+       ((and signature-auto-activate-p (not cleanup?))
+        (add-hook 'post-self-insert-hook signature-help-handler nil t))
+       ((or cleanup? (not signature-auto-activate-p))
+        (remove-hook 'post-self-insert-hook signature-help-handler t))))))
+
+(defun lsp--after-set-visited-file-name ()
+  (lsp-disconnect)
+  (lsp))
+
+;; TODO remove those eldoc workarounds when dropping support for Emacs 27
+;; https://github.com/emacs-lsp/lsp-mode/issues/3295#issuecomment-1308994099
+(defvar eldoc-documentation-default) ; CI
+(when (< emacs-major-version 28)
+  (unless (boundp 'eldoc-documentation-functions)
+    (load "eldoc" nil 'nomessage))
+  (when (memq (default-value 'eldoc-documentation-function) '(nil ignore))
+    ;; actually `eldoc-documentation-strategy', but CI was failing
+    (setq-default eldoc-documentation-function 'eldoc-documentation-default)))
+
+(define-minor-mode lsp-managed-mode
+  "Mode for source buffers managed by lsp-mode."
+  :lighter nil
+  (cond
+   (lsp-managed-mode
+    (when (lsp-feature? "textDocument/hover")
+      (add-hook 'eldoc-documentation-functions #'lsp-eldoc-function nil t)
+      (eldoc-mode 1))
+
+    (add-hook 'after-change-functions #'lsp-on-change nil t)
+    (add-hook 'after-revert-hook #'lsp-on-revert nil t)
+    (add-hook 'after-save-hook #'lsp-on-save nil t)
+    (add-hook 'auto-save-hook #'lsp--on-auto-save nil t)
+    (add-hook 'before-change-functions #'lsp-before-change nil t)
+    (add-hook 'before-save-hook #'lsp--before-save nil t)
+    (add-hook 'kill-buffer-hook #'lsp--text-document-did-close nil t)
+    (add-hook 'post-command-hook #'lsp--post-command nil t)
+
+    (lsp--update-on-type-formatting-hook)
+    (lsp--update-signature-help-hook)
+
+    (when lsp-enable-xref
+      (add-hook 'xref-backend-functions #'lsp--xref-backend nil t))
+
+    (lsp-configure-buffer)
+
+    ;; make sure we turn off lsp-mode in case major mode changes, because major
+    ;; mode change will wipe the buffer locals.
+    (add-hook 'change-major-mode-hook #'lsp-disconnect nil t)
+    (add-hook 'after-set-visited-file-name-hook #'lsp--after-set-visited-file-name nil t)
+
+    (let ((buffer (lsp-current-buffer)))
+      (run-with-idle-timer
+       0.0 nil
+       (lambda ()
+         (when (lsp-buffer-live-p buffer)
+           (lsp-with-current-buffer buffer
+             (lsp--on-change-debounce buffer)
+             (lsp--on-idle buffer)))))))
+   (t
+    (lsp-unconfig-buffer)
+
+    (remove-hook 'eldoc-documentation-functions #'lsp-eldoc-function t)
+    (remove-hook 'post-command-hook #'lsp--post-command t)
+    (remove-hook 'after-change-functions #'lsp-on-change t)
+    (remove-hook 'after-revert-hook #'lsp-on-revert t)
+    (remove-hook 'after-save-hook #'lsp-on-save t)
+    (remove-hook 'auto-save-hook #'lsp--on-auto-save t)
+    (remove-hook 'before-change-functions #'lsp-before-change t)
+    (remove-hook 'before-save-hook #'lsp--before-save t)
+    (remove-hook 'kill-buffer-hook #'lsp--text-document-did-close t)
+
+    (lsp--update-on-type-formatting-hook :cleanup)
+    (lsp--update-signature-help-hook :cleanup)
+
+    (when lsp--on-idle-timer
+      (cancel-timer lsp--on-idle-timer)
+      (setq lsp--on-idle-timer nil))
+
+    (remove-hook 'lsp-on-idle-hook #'lsp--document-links t)
+    (remove-hook 'lsp-on-idle-hook #'lsp--document-highlight t)
+
+    (lsp--remove-overlays 'lsp-highlight)
+    (lsp--remove-overlays 'lsp-links)
+
+    (remove-hook 'xref-backend-functions #'lsp--xref-backend t)
+    (remove-hook 'change-major-mode-hook #'lsp-disconnect t)
+    (remove-hook 'after-set-visited-file-name-hook #'lsp--after-set-visited-file-name t)
+    (setq-local lsp-buffer-uri nil))))
+
+(defun lsp-configure-buffer ()
+  "Configure LSP features for current buffer."
+  ;; make sure the core is running in the context of all available workspaces
+  ;; to avoid misconfiguration in case we are running in `with-lsp-workspace' context
+  (let ((lsp--buffer-workspaces (cond
+                                 (lsp--buffer-workspaces)
+                                 (lsp--cur-workspace (list lsp--cur-workspace))))
+        lsp--cur-workspace)
+    (when lsp-auto-configure
+      (lsp--auto-configure)
+
+      (when (and lsp-enable-text-document-color
+                 (lsp-feature? "textDocument/documentColor"))
+        (add-hook 'lsp-on-change-hook #'lsp--document-color nil t))
+
+      (when (and lsp-enable-imenu
+                 (lsp-feature? "textDocument/documentSymbol"))
+        (lsp-enable-imenu))
+
+      (when (and lsp-enable-indentation
+                 (lsp-feature? "textDocument/rangeFormatting"))
+        (add-function :override (local 'indent-region-function) #'lsp-format-region))
+
+      (when (and lsp-enable-symbol-highlighting
+                 (lsp-feature? "textDocument/documentHighlight"))
+        (add-hook 'lsp-on-idle-hook #'lsp--document-highlight nil t))
+
+      (when (and lsp-enable-links
+                 (lsp-feature? "textDocument/documentLink"))
+        (add-hook 'lsp-on-idle-hook #'lsp--document-links nil t))
+
+      (when (and lsp-inlay-hint-enable
+                 (lsp-feature? "textDocument/inlayHint"))
+        (lsp-inlay-hints-mode))
+
+      (when (and lsp-enable-dap-auto-configure
+                 (functionp 'dap-mode))
+        (dap-auto-configure-mode 1)))
+    (run-hooks 'lsp-configure-hook)))
+
+(defun lsp-unconfig-buffer ()
+  "Unconfigure LSP features for buffer."
+  (lsp--remove-overlays 'lsp-color)
+
+  (when (advice-function-member-p 'lsp--imenu-create-index imenu-create-index-function)
+    (remove-function (local 'imenu-create-index-function) #'lsp--imenu-create-index)
+    (setq-local imenu-menubar-modified-tick 0)
+    (setq-local imenu--index-alist nil)
+    (imenu--cleanup))
+
+  (remove-function (local 'indent-region-function) #'lsp-format-region)
+
+  (remove-hook 'lsp-on-change-hook #'lsp--document-color t)
+  (remove-hook 'lsp-on-idle-hook #'lsp--document-highlight t)
+  (remove-hook 'lsp-on-idle-hook #'lsp--document-links t)
+
+  (when (and lsp-enable-dap-auto-configure
+             (functionp 'dap-mode))
+    (dap-auto-configure-mode -1))
+
+  (run-hooks 'lsp-unconfigure-hook))
+
+(defun lsp--buffer-content ()
+  (lsp-save-restriction-and-excursion
+    (or (lsp-virtual-buffer-call :buffer-string)
+        (buffer-substring-no-properties (point-min)
+                                        (point-max)))))
+
+(defun lsp--text-document-did-open ()
+  "`document/didOpen' event."
+  (run-hooks 'lsp-before-open-hook)
+  (when (and lsp-auto-touch-files
+             (not (f-exists? (lsp--uri-to-path (lsp--buffer-uri)))))
+    (lsp--info "Saving file '%s' because it is not present on the disk." (lsp--buffer-uri))
+    (save-buffer))
+
+  (setq lsp--cur-version (or lsp--cur-version 0))
+  (cl-pushnew (lsp-current-buffer) (lsp--workspace-buffers lsp--cur-workspace))
+  (lsp-notify
+   "textDocument/didOpen"
+   (list :textDocument
+         (list :uri (lsp--buffer-uri)
+               :languageId (lsp-buffer-language)
+               :version lsp--cur-version
+               :text (lsp--buffer-content))))
+
+  (lsp-managed-mode 1)
+
+  (lsp-diagnostics--request-pull-diagnostics lsp--cur-workspace)
+
+  (run-hooks 'lsp-after-open-hook)
+  (when-let* ((client (-some-> lsp--cur-workspace (lsp--workspace-client))))
+    (-some-> (lsp--client-after-open-fn client)
+      (funcall))
+    (-some-> (format "lsp-%s-after-open-hook" (lsp--client-server-id client))
+      (intern-soft)
+      (run-hooks))))
+
+(defun lsp--text-document-identifier ()
+  "Make TextDocumentIdentifier."
+  (list :uri (lsp--buffer-uri)))
+
+(defun lsp--versioned-text-document-identifier ()
+  "Make VersionedTextDocumentIdentifier."
+  (plist-put (lsp--text-document-identifier) :version lsp--cur-version))
+
+(defun lsp--cur-line (&optional point)
+  (1- (line-number-at-pos point)))
+
+;;
+;; Position encoding
+;;
+;; LSP uses UTF-16 code units for character offsets by default.  Emacs uses
+;; codepoints (effectively UTF-32).  Characters in the supplementary planes
+;; (U+10000–U+10FFFF, e.g. emoji) require 2 UTF-16 code units but only 1
+;; Emacs character position.  The functions below handle the conversion.
+;; With LSP 3.17 positionEncoding negotiation, servers may use UTF-32 or
+;; UTF-8 instead, avoiding the conversion entirely.
+
+(defvar-local lsp--position-column-function #'lsp--utf-32-column
+  "Function to compute the column offset for the current point.
+Set per-buffer based on the negotiated position encoding.")
+
+(defvar-local lsp--move-to-column-function #'lsp--move-to-utf-32-column
+  "Function to move point to a given column offset.
+Set per-buffer based on the negotiated position encoding.")
+
+(defun lsp--utf-16-column ()
+  "Return the current column as a UTF-16 code unit offset from line beginning."
+  (/ (- (length (encode-coding-region (line-beginning-position)
+                                      (point) 'utf-16 t))
+        2)                              ; subtract 2-byte BOM
+     2))                                ; convert bytes to code units
+
+(defun lsp--move-to-utf-16-column (column)
+  "Move point to COLUMN expressed as UTF-16 code unit offset from line beginning."
+  (let ((bol (line-beginning-position))
+        (eol (line-end-position))
+        (goal column))
+    (goto-char bol)
+    (while (and (> goal 0) (< (point) eol))
+      (when (<= #x10000 (char-after) #x10ffff)
+        (setq goal (1- goal)))           ; supplementary char = 2 UTF-16 units
+      (forward-char 1)
+      (setq goal (1- goal)))
+    (point)))
+
+(defun lsp--utf-32-column ()
+  "Return the current column as a codepoint offset from line beginning."
+  (- (point) (line-beginning-position)))
+
+(defun lsp--move-to-utf-32-column (column)
+  "Move point to COLUMN expressed as codepoint offset from line beginning."
+  (goto-char (min (+ (line-beginning-position) column) (line-end-position)))
+  (point))
+
+(defun lsp--utf-8-column ()
+  "Return the current column as a UTF-8 byte offset from line beginning."
+  (- (position-bytes (point)) (position-bytes (line-beginning-position))))
+
+(defun lsp--move-to-utf-8-column (column)
+  "Move point to COLUMN expressed as UTF-8 byte offset from line beginning."
+  (let ((bol (line-beginning-position))
+        (eol (line-end-position))
+        (goal-byte (+ (position-bytes (line-beginning-position)) column)))
+    (goto-char bol)
+    (while (and (< (position-bytes (point)) goal-byte) (< (point) eol))
+      (forward-char 1))
+    (point)))
+
+(defun lsp--set-position-encoding (encoding)
+  "Set position encoding functions for the current buffer.
+ENCODING is a string: \"utf-16\", \"utf-32\", or \"utf-8\"."
+  (pcase encoding
+    ("utf-16"
+     (setq-local lsp--position-column-function #'lsp--utf-16-column)
+     (setq-local lsp--move-to-column-function #'lsp--move-to-utf-16-column))
+    ("utf-8"
+     (setq-local lsp--position-column-function #'lsp--utf-8-column)
+     (setq-local lsp--move-to-column-function #'lsp--move-to-utf-8-column))
+    (_
+     (setq-local lsp--position-column-function #'lsp--utf-32-column)
+     (setq-local lsp--move-to-column-function #'lsp--move-to-utf-32-column))))
+
+(defun lsp--cur-position ()
+  "Make a Position object for the current point."
+  (or (lsp-virtual-buffer-call :cur-position)
+      (lsp-save-restriction-and-excursion
+        (list :line (lsp--cur-line)
+              :character (funcall lsp--position-column-function)))))
+
+(defun lsp--point-to-position (point)
+  "Convert POINT to Position."
+  (lsp-save-restriction-and-excursion
+    (goto-char point)
+    (lsp--cur-position)))
+
+(defun lsp--range (start end)
+  "Make Range body from START and END."
+  ;; make sure start and end are Position objects
+  (list :start start :end end))
+
+(defun lsp--region-to-range (start end)
+  "Make Range object for the current region."
+  (lsp--range (lsp--point-to-position start)
+              (lsp--point-to-position end)))
+
+(defun lsp--region-or-line ()
+  "The active region or the current line."
+  (if (use-region-p)
+      (lsp--region-to-range (region-beginning) (region-end))
+    (lsp--region-to-range (line-beginning-position) (line-end-position))))
+
+(defun lsp--check-document-changes-version (document-changes)
+  "Verify that DOCUMENT-CHANGES have the proper version."
+  (unless (seq-every-p
+           (-lambda ((&TextDocumentEdit :text-document))
+             (or
+              (not text-document)
+              (let* ((filename (-> text-document
+                                   lsp:versioned-text-document-identifier-uri
+                                   lsp--uri-to-path))
+                     (version (lsp:versioned-text-document-identifier-version? text-document)))
+                (with-current-buffer (find-file-noselect filename)
+                  (or (null version) (zerop version) (= -1 version)
+                      (equal version lsp--cur-version))))))
+           document-changes)
+    (error "Document changes cannot be applied due to different document version")))
+
+(defun lsp--apply-workspace-edit (workspace-edit &optional operation)
+  "Apply the WorkspaceEdit object WORKSPACE-EDIT.
+OPERATION is symbol representing the source of this text edit."
+  (-let (((&WorkspaceEdit :document-changes? :changes?) workspace-edit))
+    (if-let* ((document-changes (seq-reverse document-changes?)))
+        (progn
+          (lsp--check-document-changes-version document-changes)
+          (->> document-changes
+               (seq-filter (-lambda ((&CreateFile :kind)) (equal kind "create")))
+               (seq-do (lambda (change) (lsp--apply-text-document-edit change operation))))
+          (->> document-changes
+               (seq-filter (-lambda ((&CreateFile :kind))
+                             (and (or (not kind) (equal kind "edit"))
+                                  (not (equal kind "create")))))
+               (seq-do (lambda (change) (lsp--apply-text-document-edit change operation))))
+          (->> document-changes
+               (seq-filter (-lambda ((&CreateFile :kind))
+                             (and (not (or (not kind) (equal kind "edit")))
+                                  (not (equal kind "create")))))
+               (seq-do (lambda (change) (lsp--apply-text-document-edit change operation)))))
+      (lsp-map
+       (lambda (uri text-edits)
+         (with-current-buffer (-> uri lsp--uri-to-path find-file-noselect)
+           (lsp--apply-text-edits text-edits operation)))
+       changes?))))
+
+(defmacro lsp-with-filename (file &rest body)
+  "Execute BODY with FILE as a context.
+Need to handle the case when FILE indicates virtual buffer."
+  (declare (indent 1) (debug t))
+  `(if-let* ((lsp--virtual-buffer (get-text-property 0 'lsp-virtual-buffer ,file)))
+       (lsp-with-current-buffer lsp--virtual-buffer
+         ,@body)
+     ,@body))
+
+(defun lsp--apply-text-document-edit (edit &optional operation)
+  "Apply the TextDocumentEdit object EDIT.
+OPERATION is symbol representing the source of this text edit.
+If the file is not being visited by any buffer, it is opened with
+`find-file-noselect'.
+Because lsp-mode does not store previous document versions, the edit is only
+applied if the version of the textDocument matches the version of the
+corresponding file.
+
+interface TextDocumentEdit {
+  textDocument: VersionedTextDocumentIdentifier;
+  edits: TextEdit[];
+}"
+  (pcase (lsp:edit-kind edit)
+    ("create" (-let* (((&CreateFile :uri :options?) edit)
+                      (file-name (lsp--uri-to-path uri)))
+                (mkdir (f-dirname file-name) t)
+                (f-touch file-name)
+                (when (lsp:create-file-options-overwrite? options?)
+                  (f-write-text "" nil file-name))
+                (find-file-noselect file-name)))
+    ("delete" (-let (((&DeleteFile :uri :options? (&DeleteFileOptions? :recursive?)) edit))
+                (f-delete (lsp--uri-to-path uri) recursive?)))
+    ("rename" (-let* (((&RenameFile :old-uri :new-uri :options? (&RenameFileOptions? :overwrite?)) edit)
+                      (old-file-name (lsp--uri-to-path old-uri))
+                      (new-file-name (lsp--uri-to-path new-uri))
+                      (buf (find-buffer-visiting old-file-name)))
+                (when buf
+                  (lsp-with-current-buffer buf
+                    (save-buffer)
+                    (lsp--text-document-did-close)))
+                (mkdir (f-dirname new-file-name) t)
+                (rename-file old-file-name new-file-name overwrite?)
+                (when buf
+                  (lsp-with-current-buffer buf
+                    (set-buffer-modified-p nil)
+                    (setq lsp-buffer-uri nil)
+                    (set-visited-file-name new-file-name)
+                    (lsp)))))
+    (_ (let ((file-name (->> edit
+                             (lsp:text-document-edit-text-document)
+                             (lsp:versioned-text-document-identifier-uri)
+                             (lsp--uri-to-path))))
+         (lsp-with-current-buffer (find-buffer-visiting file-name)
+           (lsp-with-filename file-name
+             (lsp--apply-text-edits (lsp:text-document-edit-edits edit) operation)))))))
+
+(lsp-defun lsp--position-compare ((&Position :line left-line
+                                             :character left-character)
+                                  (&Position :line right-line
+                                             :character right-character))
+  "Return t if position LEFT is greater than RIGHT."
+  (if (= left-line right-line)
+      (> left-character right-character)
+    (> left-line right-line)))
+
+(lsp-defun lsp-point-in-range? (position (&Range :start :end))
+  "Returns if POINT is in RANGE."
+  (not (or (lsp--position-compare start position)
+           (lsp--position-compare position end))))
+
+(lsp-defun lsp--position-equal ((&Position :line left-line
+                                           :character left-character)
+                                (&Position :line right-line
+                                           :character right-character))
+  "Return whether LEFT and RIGHT positions are equal."
+  (and (= left-line right-line)
+       (= left-character right-character)))
+
+(lsp-defun lsp--text-edit-sort-predicate ((&TextEdit :range (&Range :start left-start :end left-end))
+                                          (&TextEdit :range (&Range :start right-start :end right-end)))
+  (if (lsp--position-equal left-start right-start)
+      (lsp--position-compare left-end right-end)
+    (lsp--position-compare left-start right-start)))
+
+(lsp-defun lsp--apply-text-edit ((edit &as &TextEdit :range (&RangeToPoint :start :end) :new-text))
+  "Apply the edits described in the TextEdit object in TEXT-EDIT."
+  (setq new-text (s-replace "\r" "" (or new-text "")))
+  (lsp:set-text-edit-new-text edit new-text)
+  (goto-char start)
+  (delete-region start end)
+  (insert new-text))
+
+;; WORKAROUND: typescript-language might send -1 when applying code actions.
+;; see https://github.com/emacs-lsp/lsp-mode/issues/1582
+(lsp-defun lsp--fix-point ((point &as &Position :character :line))
+  (-doto point
+    (lsp:set-position-line (max 0 line))
+    (lsp:set-position-character (max 0 character))))
+
+(lsp-defun lsp--apply-text-edit-replace-region-contents ((edit &as
+                                                               &TextEdit
+                                                               :range (&Range :start :end)
+                                                               :new-text))
+  "Apply the edits described in the TextEdit object in TEXT-EDIT.
+The method uses `replace-region-contents'."
+  (setq new-text (s-replace "\r" "" (or new-text "")))
+  (lsp:set-text-edit-new-text edit new-text)
+  (-let* ((source (current-buffer))
+          ((beg . end) (lsp--range-to-region (lsp-make-range :start (lsp--fix-point start)
+                                                             :end (lsp--fix-point end)))))
+    (with-temp-buffer
+      (insert new-text)
+      (let ((temp (current-buffer)))
+        (with-current-buffer source
+          (save-excursion
+            (save-restriction
+              (let ((inhibit-modification-hooks t)
+                    (length (- end beg)))
+                (run-hook-with-args 'before-change-functions
+                                    beg end)
+                (replace-region-contents beg end
+                                         (lambda (&rest _) temp))
+                (run-hook-with-args 'after-change-functions
+                                    beg (+ beg (length new-text))
+                                    length)))))))))
+
+(defun lsp--to-yasnippet-snippet (snippet)
+  "Convert LSP SNIPPET to yasnippet snippet."
+  ;; LSP snippet doesn't escape "{" and "`", but yasnippet requires escaping it.
+  (replace-regexp-in-string (rx (or bos (not (any "$" "\\"))) (group (or "{" "`")))
+                            (rx "\\" (backref 1))
+                            snippet
+                            nil nil 1))
+
+(defvar-local lsp-enable-relative-indentation nil
+  "Enable relative indentation when insert texts, snippets ...
+from language server.")
+
+(defun lsp--expand-snippet (snippet &optional start end expand-env)
+  "Wrapper of `yas-expand-snippet' with all of it arguments.
+The snippet will be convert to LSP style and indent according to
+LSP server result."
+  (require 'yasnippet nil t)
+  (let* ((inhibit-field-text-motion t)
+         (yas-wrap-around-region nil)
+         (yas-indent-line 'none)
+         (yas-also-auto-indent-first-line nil))
+    (yas-expand-snippet
+     (lsp--to-yasnippet-snippet snippet)
+     start end expand-env)))
+
+(defun lsp--indent-lines (start end &optional insert-text-mode?)
+  "Indent from START to END based on INSERT-TEXT-MODE? value.
+- When INSERT-TEXT-MODE? is provided
+  - if it's `lsp/insert-text-mode-as-it', do no editor indentation.
+  - if it's `lsp/insert-text-mode-adjust-indentation', adjust leading
+    whitespaces to match the line where text is inserted.
+- When it's not provided, using `indent-line-function' for each line."
+  (save-excursion
+    (goto-char end)
+    (let* ((end-line (line-number-at-pos))
+           (offset (save-excursion
+                     (goto-char start)
+                     (current-indentation)))
+           (indent-line-function
+            (cond ((equal insert-text-mode? lsp/insert-text-mode-as-it)
+                   #'ignore)
+                  ((or (equal insert-text-mode? lsp/insert-text-mode-adjust-indentation)
+                       lsp-enable-relative-indentation
+                       ;; Indenting snippets is extremely slow in `org-mode' buffers
+                       ;; since it has to calculate indentation based on SRC block
+                       ;; position.  Thus we use relative indentation as default.
+                       (derived-mode-p 'org-mode))
+                   (lambda () (save-excursion
+                                (beginning-of-line)
+                                (indent-to-column offset))))
+                  (t indent-line-function))))
+      (goto-char start)
+      (forward-line)
+      (while (and (not (eobp))
+                  (<= (line-number-at-pos) end-line))
+        (funcall indent-line-function)
+        (forward-line)))))
+
+(defun lsp--apply-text-edits (edits &optional operation)
+  "Apply the EDITS described in the TextEdit[] object.
+OPERATION is symbol representing the source of this text edit."
+  (unless (seq-empty-p edits)
+    (atomic-change-group
+      (run-hooks 'lsp-before-apply-edits-hook)
+      (let* ((change-group (prepare-change-group))
+             (howmany (length edits))
+             (message (format "Applying %s edits to `%s' ..." howmany (current-buffer)))
+             (_ (lsp--info message))
+             (reporter (make-progress-reporter message 0 howmany))
+             (done 0)
+             (apply-edit (if (not lsp--virtual-buffer)
+                             #'lsp--apply-text-edit-replace-region-contents
+                           #'lsp--apply-text-edit)))
+        (unwind-protect
+            (->> edits
+                 ;; We sort text edits so as to apply edits that modify latter
+                 ;; parts of the document first. Furthermore, because the LSP
+                 ;; spec dictates that: "If multiple inserts have the same
+                 ;; position, the order in the array defines which edit to
+                 ;; apply first."  We reverse the initial list and sort stably
+                 ;; to make sure the order among edits with the same position
+                 ;; is preserved.
+                 (nreverse)
+                 (seq-sort #'lsp--text-edit-sort-predicate)
+                 (mapc (lambda (edit)
+                         (progress-reporter-update reporter (cl-incf done))
+                         (funcall apply-edit edit)
+                         (when (lsp:snippet-text-edit-insert-text-format? edit)
+                           (-when-let ((&SnippetTextEdit :range (&RangeToPoint :start)
+                                                         :insert-text-format? :new-text) edit)
+                             (when (eq insert-text-format? lsp/insert-text-format-snippet)
+                               ;; No `save-excursion' needed since expand snippet will change point anyway
+                               (goto-char (+ start (length new-text)))
+                               (lsp--indent-lines start (point))
+                               (lsp--expand-snippet new-text start (point)))))
+                         (run-hook-with-args 'lsp-after-apply-edits-hook operation))))
+          (undo-amalgamate-change-group change-group)
+          (progress-reporter-done reporter))))))
+
+(defun lsp--create-apply-text-edits-handlers ()
+  "Create (handler cleanup-fn) for applying text edits in async request.
+Only works when mode is `tick or `alive."
+  (let* (first-edited
+         (func (lambda (start &rest _)
+                 (setq first-edited (if first-edited
+                                        (min start first-edited)
+                                      start)))))
+    (add-hook 'before-change-functions func nil t)
+    (list
+     (lambda (edits)
+       (if (and first-edited
+                (seq-find (-lambda ((&TextEdit :range (&RangeToPoint :end)))
+                            ;; Text edit region is overlapped
+                            (> end first-edited))
+                          edits))
+           (lsp--warn "TextEdits will not be applied since document has been modified before of them.")
+         (lsp--apply-text-edits edits 'completion-cleanup)))
+     (lambda ()
+       (remove-hook 'before-change-functions func t)))))
+
+(defvar lsp--empty-options-sentinel '(:lsp-empty-object t)
+  "Stand-in value for an empty JSON options object \"{}\" in capabilities.
+
+A server may advertise e.g. `\"completionProvider\": {}' to mean
+\"supported, with no specific options set — take all defaults.\"
+Under `lsp-use-plists', `json-parse-string' parses the empty `{}' to
+Elisp nil, which is indistinguishable from the field being absent, so
+the feature ends up silently disabled.  `lsp--capability' returns this
+sentinel in that case to restore the distinction.
+
+The sentinel is truthy, so capability checks recognize the feature as
+supported.  It contains no LSP option keys, so any subsequent option
+lookup — for example `(lsp:completion-options-trigger-characters? ...)'
+— returns nil, which matches what an empty options object actually
+means on the wire: no specific options were set, take defaults.
+
+Caveat: JSON `false' also parses to nil under `lsp-use-plists', so a
+server explicitly advertising e.g. `\"foo\": false' (\"not supported\")
+is also treated by this fix as supported.  Rare in practice — servers
+usually omit unsupported capabilities rather than send `false'.
+Distinguishing the two would require parsing JSON `false' to a non-nil
+value, a much wider change.")
+
+(defun lsp--capability (cap &optional capabilities)
+  "Return the value of capability CAP.
+If CAPABILITIES is non-nil, look up CAP there; otherwise use the
+current server\\='s capabilities.  When CAP is present in the
+capabilities plist with a nil value — typically because the server
+advertised `{}' on the wire — return `lsp--empty-options-sentinel'
+instead of nil, so the feature is recognized as supported.  See that
+variable\\='s docstring for the rationale."
+  (when (stringp cap)
+    (setq cap (intern (concat ":" cap))))
+
+  (let ((src (or capabilities (lsp--server-capabilities))))
+    (or (lsp-get src cap)
+        (and (lsp-member? src cap) lsp--empty-options-sentinel))))
+
+(defun lsp--registered-capability (method)
+  "Check whether there is workspace providing METHOD."
+  (->> (lsp-workspaces)
+       (--keep (seq-find (lambda (reg)
+                           (equal (lsp--registered-capability-method reg) method))
+                         (lsp--workspace-registered-server-capabilities it)))
+       cl-first))
+
+(defun lsp--capability-for-method (method)
+  "Get the value of capability for METHOD."
+  (-let* ((reqs (cdr (assoc method lsp-method-requirements)))
+          ((&plist :capability) reqs))
+    (or (and capability (lsp--capability capability))
+        (-some-> (lsp--registered-capability method)
+          (lsp--registered-capability-options)))))
+
+(defvar-local lsp--before-change-vals nil
+  "Store the positions from the `lsp-before-change' function call, for
+validation and use in the `lsp-on-change' function.")
+
+(defun lsp--text-document-content-change-event (start end length)
+  "Make a TextDocumentContentChangeEvent body for START to END, of length LENGTH."
+  ;; So (47 54 0) means add    7 chars starting at pos 47
+  ;; must become
+  ;;   {"range":{"start":{"line":5,"character":6}
+  ;;             ,"end" :{"line":5,"character":6}}
+  ;;             ,"rangeLength":0
+  ;;             ,"text":"\nbb = 5"}
+  ;;
+  ;; And (47 47 7) means delete 7 chars starting at pos 47
+  ;; must become
+  ;;   {"range":{"start":{"line":6,"character":0}
+  ;;            ,"end"  :{"line":7,"character":0}}
+  ;;            ,"rangeLength":7
+  ;;            ,"text":""}
+  ;;
+  ;; (208 221 3) means delete 3 chars starting at pos 208, and replace them with
+  ;; 13 chars. So it must become
+  ;;   {"range":{"start":{"line":5,"character":8}
+  ;;             ,"end" :{"line":5,"character":11}}
+  ;;             ,"rangeLength":3
+  ;;             ,"text":"new-chars-xxx"}
+  ;;
+
+  ;; Adding text:
+  ;;   lsp-before-change:(start,end)=(33,33)
+  ;;   lsp-on-change:(start,end,length)=(33,34,0)
+  ;;
+  ;; Changing text:
+  ;;   lsp-before-change:(start,end)=(208,211)
+  ;;   lsp-on-change:(start,end,length)=(208,221,3)
+  ;;
+  ;; Deleting text:
+  ;;   lsp-before-change:(start,end)=(19,27)
+  ;;   lsp-on-change:(start,end,length)=(19,19,8)
+  (if (zerop length)
+      ;; Adding something only, work from start only
+      `( :range ,(lsp--range
+                  (lsp--point-to-position start)
+                  (lsp--point-to-position start))
+         :rangeLength 0
+         :text ,(buffer-substring-no-properties start end))
+
+    (if (eq start end)
+        ;; Deleting something only
+        (if (lsp--bracketed-change-p start length)
+            ;; The before-change value is bracketed, use it
+            `( :range ,(lsp--range
+                        (lsp--point-to-position start)
+                        (plist-get lsp--before-change-vals :end-pos))
+               :rangeLength ,length
+               :text "")
+          ;; If the change is not bracketed, send a full change event instead.
+          (lsp--full-change-event))
+
+      ;; Deleting some things, adding others
+      (if (lsp--bracketed-change-p start length)
+          ;; The before-change value is valid, use it
+          `( :range ,(lsp--range
+                      (lsp--point-to-position start)
+                      (plist-get lsp--before-change-vals :end-pos))
+             :rangeLength ,length
+             :text ,(buffer-substring-no-properties start end))
+        (lsp--full-change-event)))))
+
+(defun lsp--bracketed-change-p (start length)
+  "If the before and after positions are the same, and the length
+is the size of the start range, we are probably good."
+  (-let [(&plist :end before-end :start before-start) lsp--before-change-vals]
+    (and (eq start before-start)
+         (eq length (- before-end before-start)))))
+
+(defun lsp--full-change-event ()
+  `(:text ,(lsp--buffer-content)))
+
+(defun lsp-before-change (start end)
+  "Executed before a file is changed.
+Added to `before-change-functions'."
+  ;; Note:
+  ;;
+  ;; This variable holds a list of functions to call when Emacs is about to
+  ;; modify a buffer. Each function gets two arguments, the beginning and end of
+  ;; the region that is about to change, represented as integers. The buffer
+  ;; that is about to change is always the current buffer when the function is
+  ;; called.
+  ;;
+  ;; WARNING:
+  ;;
+  ;; Do not expect the before-change hooks and the after-change hooks be called
+  ;; in balanced pairs around each buffer change. Also don't expect the
+  ;; before-change hooks to be called for every chunk of text Emacs is about to
+  ;; delete. These hooks are provided on the assumption that Lisp programs will
+  ;; use either before- or the after-change hooks, but not both, and the
+  ;; boundaries of the region where the changes happen might include more than
+  ;; just the actual changed text, or even lump together several changes done
+  ;; piecemeal.
+  (save-match-data
+    (lsp-save-restriction-and-excursion
+      (setq lsp--before-change-vals
+            (list :start start
+                  :end end
+                  :end-pos (lsp--point-to-position end))))))
+
+(defun lsp--flush-delayed-changes ()
+  (let ((inhibit-quit t))
+    (when lsp--delay-timer
+      (cancel-timer lsp--delay-timer))
+    (mapc (-lambda ((workspace buffer document change))
+            (with-current-buffer buffer
+              (with-lsp-workspace workspace
+                (lsp-notify "textDocument/didChange"
+                            (list :textDocument document
+                                  :contentChanges (vector change)))
+                (lsp-diagnostics--request-pull-diagnostics workspace))))
+          (prog1 (nreverse lsp--delayed-requests)
+            (setq lsp--delayed-requests nil)))))
+
+(defun lsp--workspace-sync-method (workspace)
+  (let ((sync (-> workspace
+                  (lsp--workspace-server-capabilities)
+                  (lsp:server-capabilities-text-document-sync?))))
+    (if (lsp-text-document-sync-options? sync)
+        (lsp:text-document-sync-options-change? sync)
+      sync)))
+
+(defvaralias 'lsp--revert-buffer-in-progress
+  (if (boundp 'revert-buffer-in-progress)
+      'revert-buffer-in-progress
+    'revert-buffer-in-progress-p)
+  "Alias for `revert-buffer-in-progress' if available, or `revert-buffer-in-progress-p'
+prior to emacs 31.")
+
+(defun lsp-on-change (start end length &optional content-change-event-fn)
+  "Executed when a file is changed.
+Added to `after-change-functions'."
+  ;; Note:
+  ;;
+  ;; Each function receives three arguments: the beginning and end of the region
+  ;; just changed, and the length of the text that existed before the change.
+  ;; All three arguments are integers. The buffer that has been changed is
+  ;; always the current buffer when the function is called.
+  ;;
+  ;; The length of the old text is the difference between the buffer positions
+  ;; before and after that text as it was before the change. As for the
+  ;; changed text, its length is simply the difference between the first two
+  ;; arguments.
+  ;;
+  ;; So (47 54 0) means add    7 chars starting at pos 47
+  ;; So (47 47 7) means delete 7 chars starting at pos 47
+  (save-match-data
+    (let ((inhibit-quit t)
+          ;; make sure that `lsp-on-change' is called in multi-workspace context
+          ;; see #2901
+          lsp--cur-workspace)
+      ;; A (revert-buffer) call with the 'preserve-modes parameter (eg, as done
+      ;; by auto-revert-mode) will cause this handler to get called with a nil
+      ;; buffer-file-name. We need the buffer-file-name to send notifications;
+      ;; so we skip handling revert-buffer-caused changes and instead handle
+      ;; reverts separately in lsp-on-revert
+      (when (not lsp--revert-buffer-in-progress)
+        (cl-incf lsp--cur-version)
+        (mapc
+         (lambda (workspace)
+           (pcase (or lsp-document-sync-method
+                      (lsp--workspace-sync-method workspace))
+             (1
+              (if lsp-debounce-full-sync-notifications
+                  (setq lsp--delayed-requests
+                        (->> lsp--delayed-requests
+                             (-remove (-lambda ((_ buffer))
+                                        (equal (current-buffer) buffer)))
+                             (cons (list workspace
+                                         (current-buffer)
+                                         (lsp--versioned-text-document-identifier)
+                                         (lsp--full-change-event)))))
+                (with-lsp-workspace workspace
+                  (lsp-notify "textDocument/didChange"
+                              (list :contentChanges (vector (lsp--full-change-event))
+                                    :textDocument (lsp--versioned-text-document-identifier)))
+                  (lsp-diagnostics--request-pull-diagnostics workspace))))
+             (2
+              (with-lsp-workspace workspace
+                (lsp-notify
+                 "textDocument/didChange"
+                 (list :textDocument (lsp--versioned-text-document-identifier)
+                       :contentChanges (vector
+                                        (if content-change-event-fn
+                                            (funcall content-change-event-fn start end length)
+                                          (lsp--text-document-content-change-event
+                                           start end length)))))
+                (lsp-diagnostics--request-pull-diagnostics workspace)))))
+         (lsp-workspaces))
+        (when lsp--delay-timer (cancel-timer lsp--delay-timer))
+        (setq lsp--delay-timer (run-with-idle-timer
+                                lsp-debounce-full-sync-notifications-interval
+                                nil
+                                #'lsp--flush-delayed-changes))
+        ;; force cleanup overlays after each change
+        (lsp--remove-overlays 'lsp-highlight)
+        (lsp--after-change (current-buffer))))))
+
+
+
+;; facilities for on change hooks. We do not want to make lsp calls on each
+;; change event so we add debounce to avoid flooding the server with events.
+;; Additionally, we want to have a mechanism for stopping the server calls in
+;; particular cases like, e. g. when performing completion.
+
+(defvar lsp-inhibit-lsp-hooks nil
+  "Flag to control.")
+
+(defcustom lsp-on-change-hook nil
+  "Hooks to run when buffer has changed."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defcustom lsp-idle-delay 0.500
+  "Debounce interval for `after-change-functions'."
+  :type 'number
+  :group 'lsp-mode)
+
+(defcustom lsp-on-idle-hook nil
+  "Hooks to run after `lsp-idle-delay'."
+  :type 'hook
+  :group 'lsp-mode)
+
+(defun lsp--idle-reschedule (buffer)
+  (when lsp--on-idle-timer
+    (cancel-timer lsp--on-idle-timer))
+
+  (setq lsp--on-idle-timer (run-with-idle-timer
+                            lsp-idle-delay
+                            nil
+                            #'lsp--on-idle
+                            buffer)))
+
+(defun lsp--post-command ()
+  (lsp--cleanup-highlights-if-needed)
+  (lsp--idle-reschedule (current-buffer)))
+
+(defun lsp--on-idle (buffer)
+  "Start post command loop."
+  (when (and (buffer-live-p buffer)
+             (equal buffer (current-buffer))
+             (not lsp-inhibit-lsp-hooks)
+             lsp-managed-mode)
+    (run-hooks 'lsp-on-idle-hook)))
+
+(defun lsp--on-change-debounce (buffer)
+  (when (and (buffer-live-p buffer)
+             (equal buffer (current-buffer))
+             (not lsp-inhibit-lsp-hooks)
+             lsp-managed-mode)
+    (run-hooks 'lsp-on-change-hook)))
+
+
+(defvar-local lsp--after-change-vals nil
+  "plist that stores the buffer state when `lsp--after-change' has ben activated. Since the
+functions in `lsp-on-change-hook' are called with a timer, mouse
+movements may have changed the position")
+
+(defun lsp--after-change (buffer)
+  "Called after most textDocument/didChange events."
+  (setq lsp--signature-last-index nil
+        lsp--signature-last nil)
+
+  ;; cleanup diagnostics
+  (when lsp-diagnostic-clean-after-change
+    (dolist (workspace (lsp-workspaces))
+      (-let [diagnostics (lsp--workspace-diagnostics workspace)]
+        (remhash (lsp--fix-path-casing (buffer-file-name)) diagnostics))))
+
+  (when (fboundp 'lsp--semantic-tokens-refresh-if-enabled)
+    (lsp--semantic-tokens-refresh-if-enabled buffer))
+  (when lsp--on-change-timer
+    (cancel-timer lsp--on-change-timer))
+
+  (setq lsp--after-change-vals (list :point (point)
+                                     :buffer (current-buffer)))
+  (setq lsp--on-change-timer (run-with-idle-timer
+                              lsp-idle-delay
+                              nil
+                              #'lsp--on-change-debounce
+                              buffer))
+  (lsp--idle-reschedule buffer))
+
+
+(defcustom lsp-trim-trailing-whitespace t
+  "Trim trailing whitespace on a line."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defcustom lsp-insert-final-newline t
+  "Insert a newline character at the end of the file if one does not exist."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defcustom lsp-trim-final-newlines t
+  "Trim all newlines after the final newline at the end of the file."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defun lsp--on-type-formatting-do-apply (data)
+  (lsp--apply-text-edits data 'format))
+
+(defun lsp--on-type-formatting (first-trigger-characters more-trigger-characters)
+  "Self insert handling.
+Applies on type formatting."
+  (let ((ch last-command-event))
+    (when (or (eq (string-to-char first-trigger-characters) ch)
+              (cl-find ch more-trigger-characters :key #'string-to-char))
+
+      ;; defer to after hooks -- avoids the request being cancelled by smart
+      ;; parens, electric indent or other hooks
+      (run-at-time
+       0 nil
+       (lambda (pos-marker)
+         (lsp-request-async "textDocument/onTypeFormatting"
+                            (lsp-make-document-on-type-formatting-params
+                             :text-document (lsp--text-document-identifier)
+                             :options (lsp-make-formatting-options
+                                       :tab-size (symbol-value (lsp--get-indent-width major-mode))
+                                       :insert-spaces (lsp-json-bool (not indent-tabs-mode))
+                                       :trim-trailing-whitespace? (lsp-json-bool lsp-trim-trailing-whitespace)
+                                       :insert-final-newline? (lsp-json-bool lsp-insert-final-newline)
+                                       :trim-final-newlines? (lsp-json-bool lsp-trim-final-newlines))
+                             :ch (char-to-string ch)
+                             :position (lsp--point-to-position (marker-position pos-marker)))
+                            #'lsp--on-type-formatting-do-apply
+                            :mode 'tick)
+         (set-marker pos-marker nil))
+
+       ;; argument to lambda:
+       (point-marker)))))
+
+
+;; links
+(defun lsp--document-links ()
+  (when (lsp-feature? "textDocument/documentLink")
+    (lsp-request-async
+     "textDocument/documentLink"
+     `(:textDocument ,(lsp--text-document-identifier))
+     (lambda (links)
+       (lsp--remove-overlays 'lsp-link)
+       (seq-do
+        (-lambda ((link &as &DocumentLink :range (&Range :start :end)))
+          (-doto (make-button (lsp--position-to-point start)
+                              (lsp--position-to-point end)
+                              'action (lsp--document-link-keymap link)
+                              'keymap (let ((map (make-sparse-keymap)))
+                                        (define-key map [M-return] 'push-button)
+                                        (define-key map [mouse-2] 'push-button)
+                                        map)
+                              'help-echo "mouse-2, M-RET: Visit this link")
+            (overlay-put 'lsp-link t)))
+        links))
+     :mode 'unchanged)))
+
+(defun lsp--document-link-handle-target (url)
+  (let* ((parsed-url (url-generic-parse-url (url-unhex-string url)))
+         (type (url-type parsed-url)))
+    (pcase type
+      ("file"
+       (xref-push-marker-stack)
+       (find-file (lsp--uri-to-path url))
+       (-when-let ((_ line column) (s-match (rx "#" (optional "L") (group (1+ num)) (or "," "#") (group (1+ num))) url))
+         (goto-char (lsp--position-to-point
+                     (lsp-make-position :character (1- (string-to-number column))
+                                        :line (1- (string-to-number line)))))))
+      ((or "http" "https") (browse-url url))
+      (type (if-let* ((handler (lsp--get-uri-handler type)))
+                (funcall handler url)
+              (signal 'lsp-file-scheme-not-supported (list url)))))))
+
+(lsp-defun lsp--document-link-keymap ((link &as &DocumentLink :target?))
+  (if target?
+      (lambda (_)
+        (interactive)
+        (lsp--document-link-handle-target target?))
+    (lambda (_)
+      (interactive)
+      (when (lsp:document-link-registration-options-resolve-provider?
+             (lsp--capability-for-method "textDocument/documentLink"))
+        (lsp-request-async
+         "documentLink/resolve"
+         link
+         (-lambda ((&DocumentLink :target?))
+           (lsp--document-link-handle-target target?)))))))
+
+
+
+(defcustom lsp-warn-no-matched-clients t
+  "Whether to show messages when there are no supported clients."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defun lsp-buffer-language--configured-id ()
+  "Return nil when not registered."
+  (->> lsp-language-id-configuration
+       (-first
+        (-lambda ((mode-or-pattern . language))
+          (cond
+           ((and (stringp mode-or-pattern)
+                 (buffer-file-name)
+                 (s-matches? mode-or-pattern (buffer-file-name)))
+            language)
+           ((eq mode-or-pattern major-mode) language))))
+       cl-rest))
+
+(defvar-local lsp--buffer-language nil
+  "Locally cached returned value of `lsp-buffer-language'.")
+
+(defun lsp-buffer-language ()
+  "Get language corresponding current buffer."
+  (or lsp--buffer-language
+      (let* ((configured-language (lsp-buffer-language--configured-id)))
+        (setq lsp--buffer-language
+              (or configured-language
+                  ;; ensure non-nil
+                  (string-remove-suffix "-mode" (symbol-name major-mode))))
+        (when (and lsp-warn-no-matched-clients
+                   (null configured-language))
+          (lsp-warn "Unable to calculate the languageId for buffer `%s'. \
+Take a look at `lsp-language-id-configuration'. The `major-mode' is %s"
+                    (buffer-name)
+                    major-mode))
+        lsp--buffer-language)))
+
+(defun lsp-activate-on (&rest languages)
+  "Returns language activation function.
+The function will return t when the `lsp-buffer-language' returns
+one of the LANGUAGES."
+  (lambda (_file-name _mode)
+    (-contains? languages (lsp-buffer-language))))
+
+(defun lsp-workspace-root (&optional path)
+  "Find the workspace root for the current file or PATH."
+  (-when-let* ((file-name (or path (buffer-file-name)))
+               (file-name (lsp-f-canonical file-name)))
+    (->> (lsp-session)
+         (lsp-session-folders)
+         (--filter (and (lsp--files-same-host it file-name)
+                        (or (lsp-f-ancestor-of? it file-name)
+                            (equal it file-name))))
+         (--max-by (> (length it) (length other))))))
+
+(defun lsp-on-revert ()
+  "Executed when a file is reverted.
+Added to `after-revert-hook'."
+  (let ((n (buffer-size))
+        (lsp--revert-buffer-in-progress nil))
+    (lsp-on-change 0 n n)))
+
+(defun lsp--text-document-did-close (&optional keep-workspace-alive)
+  "Executed when the file is closed, added to `kill-buffer-hook'.
+
+If KEEP-WORKSPACE-ALIVE is non-nil, do not shutdown the workspace
+if it's closing the last buffer in the workspace."
+  (lsp-foreach-workspace
+   (cl-callf2 delq (lsp-current-buffer) (lsp--workspace-buffers lsp--cur-workspace))
+   (with-demoted-errors "Error sending didClose notification in ‘lsp--text-document-did-close’: %S"
+     (lsp-notify "textDocument/didClose"
+                 `(:textDocument ,(lsp--text-document-identifier))))
+   (when (and (not lsp-keep-workspace-alive)
+              (not keep-workspace-alive)
+              (not (lsp--workspace-buffers lsp--cur-workspace)))
+     (lsp--shutdown-workspace))))
+
+(defun lsp--will-save-text-document-params (reason)
+  (list :textDocument (lsp--text-document-identifier)
+        :reason reason))
+
+(defun lsp--before-save ()
+  "Before save handler."
+  (with-demoted-errors "Error in ‘lsp--before-save’: %S"
+    (let ((params (lsp--will-save-text-document-params 1)))
+      (when (lsp--send-will-save-p)
+        (lsp-notify "textDocument/willSave" params))
+      (when (and (lsp--send-will-save-wait-until-p) lsp-before-save-edits)
+        (let ((lsp-response-timeout 0.1))
+          (condition-case nil
+              (lsp--apply-text-edits
+               (lsp-request "textDocument/willSaveWaitUntil"
+                            params)
+               'before-save)
+            (error)))))))
+
+(defun lsp--format-buffer-before-save ()
+  (when lsp-format-buffer-on-save
+    (if (not lsp-format-buffer-on-save-list)
+        (lsp-format-buffer)
+      (when (member major-mode lsp-format-buffer-on-save-list)
+        (lsp-format-buffer)))))
+
+(defun lsp--fix-all-before-save ()
+  "Run `source.fixAll' code action before save if configured.
+This is controlled by `lsp-fix-all-on-save' and `lsp-fix-all-on-save-list'."
+  (with-demoted-errors "Error in 'lsp--fix-all-before-save': %S"
+    (when (and lsp-fix-all-on-save
+               (lsp-workspaces)
+               (or (not lsp-fix-all-on-save-list)
+                   (member major-mode lsp-fix-all-on-save-list)))
+      (condition-case nil
+          (lsp-execute-code-action-by-kind-buffer-wide "source.fixAll")
+        (lsp-no-code-actions nil)))))
+
+(defun lsp--on-auto-save ()
+  "Handler for auto-save."
+  (when (lsp--send-will-save-p)
+    (with-demoted-errors "Error in ‘lsp--on-auto-save’: %S"
+      (lsp-notify "textDocument/willSave" (lsp--will-save-text-document-params 2)))))
+
+(defun lsp--text-document-did-save ()
+  "Executed when the file is closed, added to `after-save-hook''."
+  (when (lsp--send-did-save-p)
+    (with-demoted-errors "Error on ‘lsp--text-document-did-save: %S’"
+      (lsp-notify "textDocument/didSave"
+                  `( :textDocument ,(lsp--versioned-text-document-identifier)
+                     ,@(when (lsp--save-include-text-p)
+                         (list :text (lsp--buffer-content))))))))
+
+(defun lsp--text-document-position-params (&optional identifier position)
+  "Make TextDocumentPositionParams for the current point in the current document.
+If IDENTIFIER and POSITION are non-nil, they will be used as the document
+identifier and the position respectively."
+  (list :textDocument (or identifier (lsp--text-document-identifier))
+        :position (or position (lsp--cur-position))))
+
+(defun lsp--get-buffer-diagnostics ()
+  "Return buffer diagnostics."
+  (gethash (or
+            (plist-get lsp--virtual-buffer :buffer-file-name)
+            (lsp--fix-path-casing (buffer-file-name)))
+           (lsp-diagnostics t)))
+
+(defun lsp-cur-line-diagnostics ()
+  "Return any diagnostics that apply to the current line."
+  (-let [(&plist :start (&plist :line start) :end (&plist :line end)) (lsp--region-or-line)]
+    (cl-coerce (-filter
+                (-lambda ((&Diagnostic :range (&Range :start (&Position :line))))
+                  (and (>= line start) (<= line end)))
+                (lsp--get-buffer-diagnostics))
+               'vector)))
+
+(lsp-defun lsp-range-overlapping?((left &as &Range :start left-start :end left-end)
+                                  (right &as &Range :start right-start :end right-end))
+  (or (lsp-point-in-range? right-start left)
+      (lsp-point-in-range? right-end left)
+      (lsp-point-in-range? left-start right)
+      (lsp-point-in-range? left-end right)))
+
+(defun lsp-make-position-1 (position)
+  (lsp-make-position :line (plist-get position :line)
+                     :character (plist-get position :character)))
+
+(defun lsp-cur-possition-diagnostics ()
+  "Return any diagnostics that apply to the current line."
+  (-let* ((start (if (use-region-p) (region-beginning) (point)))
+          (end (if (use-region-p) (region-end) (point)))
+          (current-range (lsp-make-range :start (lsp-make-position-1 (lsp-point-to-position start))
+                                         :end (lsp-make-position-1 (lsp-point-to-position end)))))
+    (->> (lsp--get-buffer-diagnostics)
+         (-filter
+          (-lambda ((&Diagnostic :range))
+            (lsp-range-overlapping? range current-range)))
+         (apply 'vector))))
+
+(defalias 'lsp--cur-line-diagnotics 'lsp-cur-line-diagnostics)
+
+(defun lsp--extract-line-from-buffer (pos)
+  "Return the line pointed to by POS (a Position object) in the current buffer."
+  (let* ((point (lsp--position-to-point pos))
+         (inhibit-field-text-motion t))
+    (save-excursion
+      (goto-char point)
+      (buffer-substring (line-beginning-position) (line-end-position)))))
+
+(lsp-defun lsp--xref-make-item (filename (&Range :start (start &as &Position :character start-char :line start-line)
+                                                 :end (end &as &Position :character end-char)))
+  "Return a xref-item from a RANGE in FILENAME."
+  (let* ((line (lsp--extract-line-from-buffer start))
+         (len (length line)))
+    (add-face-text-property (max (min start-char len) 0)
+                            (max (min end-char len) 0)
+                            'xref-match t line)
+    ;; LINE is nil when FILENAME is not being current visited by any buffer.
+    (xref-make-match (or line filename)
+                     (xref-make-file-location
+                      filename
+                      (lsp-translate-line (1+ start-line))
+                      (lsp-translate-column start-char))
+                     (- end-char start-char))))
+
+(defun lsp--location-uri (loc)
+  (if (lsp-location? loc)
+      (lsp:location-uri loc)
+    (lsp:location-link-target-uri loc)))
+
+(lsp-defun lsp-goto-location ((loc &as &Location :uri :range (&Range :start)))
+  "Go to location."
+  (let ((path (lsp--uri-to-path uri)))
+    (if (f-exists? path)
+        (with-current-buffer (find-file path)
+          (goto-char (lsp--position-to-point start)))
+      (error "There is no file %s" path))))
+
+(defun lsp--location-range (loc)
+  (if (lsp-location? loc)
+      (lsp:location-range loc)
+    (lsp:location-link-target-selection-range loc)))
+
+(defun lsp--locations-to-xref-items (locations)
+  "Return a list of `xref-item' given LOCATIONS, which can be of
+type Location, LocationLink, Location[] or LocationLink[]."
+  (setq locations
+        (pcase locations
+          ((seq (or (lsp-interface Location)
+                    (lsp-interface LocationLink)))
+           (append locations nil))
+          ((or (lsp-interface Location)
+               (lsp-interface LocationLink))
+           (list locations))))
+
+  (cl-labels ((get-xrefs-in-file
+               (file-locs)
+               (-let [(filename . matches) file-locs]
+                 (condition-case err
+                     (let ((visiting (find-buffer-visiting filename))
+                           (fn (lambda (loc)
+                                 (lsp-with-filename filename
+                                   (lsp--xref-make-item filename
+                                                        (lsp--location-range loc))))))
+                       (if visiting
+                           (with-current-buffer visiting
+                             (seq-map fn matches))
+                         (when (file-readable-p filename)
+                           (with-temp-buffer
+                             (insert-file-contents-literally filename)
+                             (seq-map fn matches)))))
+                   (error (lsp-warn "Failed to process xref entry for filename '%s': %s"
+                                    filename (error-message-string err)))
+                   (file-error (lsp-warn "Failed to process xref entry, file-error, '%s': %s"
+                                         filename (error-message-string err)))))))
+
+    (->> locations
+         (seq-sort #'lsp--location-before-p)
+         (seq-group-by (-compose #'lsp--uri-to-path #'lsp--location-uri))
+         (seq-map #'get-xrefs-in-file)
+         (apply #'nconc))))
+
+(defun lsp--location-before-p (left right)
+  "Sort first by file, then by line, then by column."
+  (let ((left-uri (lsp--location-uri left))
+        (right-uri (lsp--location-uri right)))
+    (if (not (string= left-uri right-uri))
+        (string< left-uri right-uri)
+      (-let (((&Range :start left-start) (lsp--location-range left))
+             ((&Range :start right-start) (lsp--location-range right)))
+        (lsp--position-compare right-start left-start)))))
+
+(defun lsp--make-reference-params (&optional td-position exclude-declaration)
+  "Make a ReferenceParam object.
+If TD-POSITION is non-nil, use it as TextDocumentPositionParams object instead.
+If EXCLUDE-DECLARATION is non-nil, request the server to include declarations."
+  (let ((json-false :json-false))
+    (plist-put (or td-position (lsp--text-document-position-params))
+               :context `(:includeDeclaration ,(lsp-json-bool (not exclude-declaration))))))
+
+(defun lsp--cancel-request (id)
+  "Cancel request with ID in all workspaces."
+  (lsp-foreach-workspace
+   (->> lsp--cur-workspace lsp--workspace-client lsp--client-response-handlers (remhash id))
+   (lsp-notify "$/cancelRequest" `(:id ,id))))
+
+(defvar-local lsp--hover-saved-bounds nil)
+
+(defun lsp-eldoc-function (cb &rest _ignored)
+  "`lsp-mode' eldoc function to display hover info (based on `textDocument/hover')."
+  (if (and lsp--hover-saved-bounds
+           (lsp--point-in-bounds-p lsp--hover-saved-bounds))
+      lsp--eldoc-saved-message
+    (setq lsp--hover-saved-bounds nil
+          lsp--eldoc-saved-message nil)
+    (if (looking-at-p "[[:space:]\n]")
+        (setq lsp--eldoc-saved-message nil) ; And returns nil.
+      (when (and lsp-eldoc-enable-hover (lsp-feature? "textDocument/hover"))
+        (lsp-request-async
+         "textDocument/hover"
+         (lsp--text-document-position-params)
+         (-lambda ((hover &as &Hover? :range? :contents))
+           (setq lsp--hover-saved-bounds (when range?
+                                           (lsp--range-to-region range?)))
+           (funcall cb (setq lsp--eldoc-saved-message
+                             (when contents
+                               (lsp--render-on-hover-content
+                                contents
+                                lsp-eldoc-render-all)))))
+         :error-handler #'ignore
+         :mode 'tick
+         :cancel-token :eldoc-hover)))))
+
+(defun lsp--point-on-highlight? ()
+  (-some? (lambda (overlay)
+            (overlay-get overlay 'lsp-highlight))
+          (overlays-at (point))))
+
+(defun lsp--cleanup-highlights-if-needed ()
+  (when (and lsp-enable-symbol-highlighting
+             lsp--have-document-highlights
+             (not (lsp--point-on-highlight?)))
+    (lsp--remove-overlays 'lsp-highlight)
+    (setq lsp--have-document-highlights nil)
+    (lsp-cancel-request-by-token :highlights)))
+
+(defvar-local lsp--symbol-bounds-of-last-highlight-invocation nil
+  "The bounds of the symbol from which `lsp--document-highlight'
+  most recently requested highlights.")
+
+(defun lsp--document-highlight ()
+  (when (lsp-feature? "textDocument/documentHighlight")
+    (let ((curr-sym-bounds (bounds-of-thing-at-point 'symbol)))
+      (unless (or (looking-at-p "[[:space:]\n]")
+                  (not lsp-enable-symbol-highlighting)
+                  (and lsp--have-document-highlights
+                       curr-sym-bounds
+                       (equal curr-sym-bounds
+                              lsp--symbol-bounds-of-last-highlight-invocation)))
+        (setq lsp--symbol-bounds-of-last-highlight-invocation
+              curr-sym-bounds)
+        (lsp-request-async "textDocument/documentHighlight"
+                           (lsp--text-document-position-params)
+                           #'lsp--document-highlight-callback
+                           :mode 'tick
+                           :cancel-token :highlights)))))
+
+(defun lsp--help-open-link (&rest _)
+  "Open markdown link at point via mouse or keyboard."
+  (interactive "P")
+  (let ((buffer-list-update-hook nil))
+    (-let [(buffer point) (if-let* ((valid (and (listp last-input-event)
+                                                (eq (car last-input-event) 'mouse-2)))
+                                    (event (cadr last-input-event))
+                                    (win (posn-window event))
+                                    (buffer (window-buffer win)))
+                              `(,buffer ,(posn-point event))
+                            `(,(current-buffer) ,(point)))]
+      (with-current-buffer buffer
+        (when-let* ((face (get-text-property point 'face))
+                    (url (or (and (eq face 'markdown-link-face)
+                                  (get-text-property point 'help-echo))
+                             (and (memq face '(markdown-url-face markdown-plain-url-face))
+                                  (nth 3 (markdown-link-at-pos point))))))
+          (lsp--document-link-handle-target url))))))
+
+(defvar lsp-help-mode-map
+  (-doto (make-sparse-keymap)
+    (define-key [remap markdown-follow-link-at-point] #'lsp--help-open-link))
+  "Keymap for `lsp-help-mode'.")
+
+(define-derived-mode lsp-help-mode help-mode "LspHelp"
+  "Major mode for displaying lsp help.")
+
+(defun lsp--display-contents (contents)
+  "Display CONTENTS in a dedicated buffer."
+  (if (and contents (not (equal contents "")))
+      (let ((lsp-help-buf-name "*lsp-help*"))
+        (with-current-buffer (get-buffer-create lsp-help-buf-name)
+          (delay-mode-hooks
+            (lsp-help-mode)
+            (with-help-window lsp-help-buf-name
+              (insert
+               (mapconcat 'string-trim-right
+                          (split-string (lsp--render-on-hover-content contents t) "\n")
+                          "\n"))))
+          (run-mode-hooks)))
+    (lsp--info "No content at point.")))
+
+(defun lsp-describe-thing-at-point ()
+  "Display the type signature and documentation of the thing at point."
+  (interactive)
+  (let ((contents (-some->> (lsp--text-document-position-params)
+                    (lsp--make-request "textDocument/hover")
+                    (lsp--send-request)
+                    (lsp:hover-contents))))
+    (lsp--display-contents contents)))
+
+(defun lsp--point-in-bounds-p (bounds)
+  "Return whether the current point is within BOUNDS."
+  (and (<= (car bounds) (point)) (< (point) (cdr bounds))))
+
+(defun lsp-get-renderer (language)
+  "Get renderer for LANGUAGE."
+  (lambda (str)
+    (lsp--render-string str language)))
+
+(defun lsp--setup-markdown (mode)
+  "Setup the ‘markdown-mode’ in the frame.
+MODE is the mode used in the parent frame."
+  (make-local-variable 'markdown-code-lang-modes)
+  (dolist (mark (alist-get mode lsp-custom-markup-modes))
+    (add-to-list 'markdown-code-lang-modes (cons mark mode)))
+  (setq-local markdown-fontify-code-blocks-natively t)
+  (setq-local markdown-fontify-code-block-default-mode mode)
+  (setq-local markdown-hide-markup t)
+
+  ;; Render some common HTML entities.
+  ;; This should really happen in markdown-mode instead,
+  ;; but it doesn't, so we do it here for now.
+  (setq prettify-symbols-alist
+        (cl-loop for i from 0 to 255
+                 collect (cons (format "&#x%02X;" i) i)))
+  (push '("&lt;" . ?<) prettify-symbols-alist)
+  (push '("&gt;" . ?>) prettify-symbols-alist)
+  (push '("&amp;" . ?&) prettify-symbols-alist)
+  (push '("&nbsp;" . ? ) prettify-symbols-alist)
+  (setq prettify-symbols-compose-predicate
+        (lambda (_start _end _match) t))
+  (prettify-symbols-mode 1))
+
+(defvar lsp-help-link-keymap
+  (let ((map (make-sparse-keymap)))
+    (define-key map [mouse-2] #'lsp--help-open-link)
+    (define-key map "\r" #'lsp--help-open-link)
+    map)
+  "Keymap active on links in *lsp-help* mode.")
+
+(defun lsp--fix-markdown-links ()
+  (let ((inhibit-read-only t)
+        (inhibit-modification-hooks t)
+        (prop))
+    (save-restriction
+      (goto-char (point-min))
+      (while (setq prop (markdown-find-next-prop 'face))
+        (let ((end (or (next-single-property-change (car prop) 'face)
+                       (point-max))))
+          (when (memq (get-text-property (car prop) 'face)
+                      '(markdown-link-face
+                        markdown-url-face
+                        markdown-plain-url-face))
+            (add-text-properties (car prop) end
+                                 (list 'button t
+                                       'category 'lsp-help-link
+                                       'follow-link t
+                                       'keymap lsp-help-link-keymap)))
+          (goto-char end))))))
+
+(defun lsp--buffer-string-visible ()
+  "Return visible buffer string.
+Stolen from `org-copy-visible'."
+  (let ((temp (generate-new-buffer " *temp*"))
+        (beg (point-min))
+        (end (point-max)))
+    (while (/= beg end)
+      (when (get-char-property beg 'invisible)
+        (setq beg (next-single-char-property-change beg 'invisible nil end)))
+      (let* ((next (next-single-char-property-change beg 'invisible nil end))
+             (substring (buffer-substring beg next)))
+        (with-current-buffer temp (insert substring))
+        ;; (setq result (concat result substring))
+        (setq beg next)))
+    (setq deactivate-mark t)
+    (prog1 (with-current-buffer temp
+             (s-chop-suffix "\n" (buffer-string)))
+      (kill-buffer temp))))
+
+(defvar lsp-buffer-major-mode nil
+  "Holds the major mode when fontification function is running.
+See #2588")
+
+(defvar view-inhibit-help-message)
+
+(defun lsp--render-markdown ()
+  "Render markdown."
+
+  (let ((markdown-enable-math nil))
+    (goto-char (point-min))
+    (while (re-search-forward
+            (rx (and "\\" (group (or "\\" "`" "*" "_" ":" "/"
+                                     "{" "}" "[" "]" "(" ")"
+                                     "#" "+" "-" "." "!" "|"))))
+            nil t)
+      (replace-match (rx (backref 1))))
+
+    ;; markdown-mode v2.3 does not yet provide gfm-view-mode
+    (if (fboundp 'gfm-view-mode)
+        (let ((view-inhibit-help-message t))
+          (gfm-view-mode))
+      (gfm-mode))
+
+    (lsp--setup-markdown lsp-buffer-major-mode)))
+
+(defvar lsp--display-inline-image-alist
+  '((lsp--render-markdown
+     (:regexp
+      "!\\[.*?\\](data:image/[a-zA-Z]+;base64,\\([A-Za-z0-9+/\n]+?=*?\\)\\(|[^)]+\\)?)"
+      :sexp
+      (create-image
+       (base64-decode-string
+        (buffer-substring-no-properties (match-beginning 1) (match-end 1)))
+       nil t))))
+  "Replaced string regexp and function returning image.
+Each element should have the form (MODE . (PROPERTY-LIST...)).
+MODE (car) is function which is defined in `lsp-language-id-configuration'.
+Cdr should be list of PROPERTY-LIST.
+
+Each PROPERTY-LIST should have properties:
+:regexp  Regexp which determines what string is replaced to image.
+         You should also get information of image, by parenthesis constructs.
+         By default, all matched string is replaced to image, but you can
+         change index of replaced string by keyword :replaced-index.
+
+:sexp    Return image when evaluated. You can use information of regexp
+         by using (match-beggining N), (match-end N) or (match-substring N).
+
+In addition, each can have property:
+:replaced-index  Determine index which is used to replace regexp to image.
+                 The value means first argument of `match-beginning' and
+                 `match-end'. If omitted, interpreted as index 0.")
+
+(defcustom lsp-display-inline-image t
+  "Showing inline image or not."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defcustom lsp-enable-suggest-server-download t
+  "When non-nil enable server downloading suggestions."
+  :group 'lsp-mode
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-auto-register-remote-clients t
+  "When non-nil register remote when registering the local one."
+  :group 'lsp-mode
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp--display-inline-image (mode)
+  "Add image property if available."
+  (let ((plist-list (cdr (assq mode lsp--display-inline-image-alist))))
+    (when (and (display-images-p) lsp-display-inline-image)
+      (cl-loop
+       for plist in plist-list
+       with regexp with replaced-index
+       do
+       (setq regexp (plist-get plist :regexp))
+       (setq replaced-index (or (plist-get plist :replaced-index) 0))
+
+       (font-lock-remove-keywords nil (list regexp replaced-index))
+       (let ((inhibit-read-only t))
+         (save-excursion
+           (goto-char (point-min))
+           (while (re-search-forward regexp nil t)
+             (set-text-properties
+              (match-beginning replaced-index) (match-end replaced-index)
+              nil)
+             (add-text-properties
+              (match-beginning replaced-index) (match-end replaced-index)
+              `(display ,(eval (plist-get plist :sexp)))))))))))
+
+(defun lsp--fontlock-with-mode (str mode)
+  "Fontlock STR with MODE."
+  (let ((lsp-buffer-major-mode major-mode))
+    (with-temp-buffer
+      (with-demoted-errors "Error during doc rendering: %s"
+        (insert str)
+        (delay-mode-hooks (funcall mode))
+        (cl-flet ((window-body-width () lsp-window-body-width))
+          ;; This can go wrong in some cases, and the fontification would
+          ;; not work as expected.
+          ;;
+          ;; See #2984
+          (ignore-errors (font-lock-ensure))
+          (lsp--display-inline-image mode)
+          (when (eq mode 'lsp--render-markdown)
+            (lsp--fix-markdown-links))))
+      (lsp--buffer-string-visible))))
+
+(defun lsp--render-string (str language)
+  "Render STR using `major-mode' corresponding to LANGUAGE.
+When language is nil render as markup if `markdown-mode' is loaded."
+  (setq str (s-replace "\r" "" (or str "")))
+  (if-let* ((modes (-keep (-lambda ((mode . lang))
+                            (when (and (equal lang language) (functionp mode))
+                              mode))
+                          lsp-language-id-configuration))
+            (mode (car (or (member major-mode modes) modes))))
+      (lsp--fontlock-with-mode str mode)
+    str))
+
+(defun lsp--render-element (content)
+  "Render CONTENT element."
+  (let ((inhibit-message t))
+    (or
+     (pcase content
+       ((lsp-interface MarkedString :value :language)
+        (lsp--render-string value language))
+       ((lsp-interface MarkupContent :value :kind)
+        (lsp--render-string value kind))
+       ;; plain string
+       ((pred stringp) (lsp--render-string content "markdown"))
+       ((pred null) "")
+       (_ (error "Failed to handle %s" content)))
+     "")))
+
+(defun lsp--create-unique-string-fn ()
+  (let (elements)
+    (lambda (element)
+      (let ((count (cl-count element elements :test #'string=)))
+        (prog1 (if (zerop count)
+                   element
+                 (format "%s (%s)" element count))
+          (push element elements))))))
+
+(defun lsp--select-action (actions)
+  "Select an action to execute from ACTIONS."
+  (cond
+   ((seq-empty-p actions) (signal 'lsp-no-code-actions nil))
+   ((and (eq (seq-length actions) 1) lsp-auto-execute-action)
+    (lsp-seq-first actions))
+   (t (let ((completion-ignore-case t))
+        (lsp--completing-read "Select code action: "
+                              (seq-into actions 'list)
+                              (-compose (lsp--create-unique-string-fn)
+                                        #'lsp:code-action-title)
+                              nil t)))))
+
+(defun lsp--workspace-server-id (workspace)
+  "Return the server ID of WORKSPACE."
+  (-> workspace lsp--workspace-client lsp--client-server-id))
+
+(defun lsp--handle-rendered-for-echo-area (contents)
+  "Return a single line from RENDERED, appropriate for display in the echo area."
+  (pcase (lsp-workspaces)
+    (`(,workspace)
+     (lsp-clients-extract-signature-on-hover contents (lsp--workspace-server-id workspace)))
+    ;; For projects with multiple active workspaces we also default to
+    ;; render the first line.
+    (_ (lsp-clients-extract-signature-on-hover contents nil))))
+
+(cl-defmethod lsp-clients-extract-signature-on-hover (contents _server-id)
+  "Extract a representative line from CONTENTS, to show in the echo area."
+  (car (s-lines (s-trim (lsp--render-element contents)))))
+
+(defun lsp--render-on-hover-content (contents render-all)
+  "Render the content received from `textDocument/hover' request.
+CONTENTS  - MarkedString | MarkedString[] | MarkupContent
+RENDER-ALL - nil if only the signature should be rendered."
+  (cond
+   ((lsp-markup-content? contents)
+    ;; MarkupContent.
+    ;; It tends to be long and is not suitable to display fully in the echo area.
+    ;; Just display the first line which is typically the signature.
+    (if render-all
+        (lsp--render-element contents)
+      (lsp--handle-rendered-for-echo-area contents)))
+   ((and (stringp contents) (not (string-match-p "\n" contents)))
+    ;; If the contents is a single string containing a single line,
+    ;; render it always.
+    (lsp--render-element contents))
+   (t
+    ;; MarkedString -> MarkedString[]
+    (when (or (lsp-marked-string? contents) (stringp contents))
+      (setq contents (list contents)))
+    ;; Consider the signature consisting of the elements who have a renderable
+    ;; "language" property. When render-all is nil, ignore other elements.
+    (string-join
+     (seq-map
+      #'lsp--render-element
+      (if render-all
+          contents
+        ;; Only render contents that have an available renderer.
+        (seq-take
+         (seq-filter
+          (-andfn #'lsp-marked-string?
+                  (-compose #'lsp-get-renderer #'lsp:marked-string-language))
+          contents)
+         1)))
+     (if (bound-and-true-p page-break-lines-mode)
+         "\n\n"
+       "\n")))))
+
+
+
+(defvar lsp-signature-mode-map
+  (-doto (make-sparse-keymap)
+    (define-key (kbd "M-n") #'lsp-signature-next)
+    (define-key (kbd "M-p") #'lsp-signature-previous)
+    (define-key (kbd "M-a") #'lsp-signature-toggle-full-docs)
+    (define-key (kbd "C-c C-k") #'lsp-signature-stop)
+    (define-key (kbd "C-g") #'lsp-signature-stop))
+  "Keymap for `lsp-signature-mode'.")
+
+(define-minor-mode lsp-signature-mode
+  "Mode used to show signature popup."
+  :keymap lsp-signature-mode-map
+  :lighter ""
+  :group 'lsp-mode)
+
+(defun lsp-signature-stop ()
+  "Stop showing current signature help."
+  (interactive)
+  (lsp-cancel-request-by-token :signature)
+  (remove-hook 'post-command-hook #'lsp-signature)
+  (funcall lsp-signature-function nil)
+  (lsp-signature-mode -1))
+
+(declare-function page-break-lines--update-display-tables "ext:page-break-lines")
+
+(defun lsp--setup-page-break-mode-if-present ()
+  "Enable `page-break-lines-mode' in current buffer."
+  (when (fboundp 'page-break-lines-mode)
+    (page-break-lines-mode)
+    ;; force page-break-lines-mode to update the display tables.
+    (page-break-lines--update-display-tables)))
+
+(defun lsp-lv-message (message)
+  (add-hook 'lv-window-hook #'lsp--setup-page-break-mode-if-present)
+  (if message
+      (progn
+        (setq lsp--signature-last-buffer (current-buffer))
+        (let ((lv-force-update t))
+          (lv-message "%s" message)))
+    (lv-delete-window)
+    (remove-hook 'lv-window-hook #'lsp--setup-page-break-mode-if-present)))
+
+(declare-function posframe-show "ext:posframe")
+(declare-function posframe-hide "ext:posframe")
+(declare-function posframe-poshandler-point-bottom-left-corner-upward "ext:posframe")
+
+(defface lsp-signature-posframe
+  '((t :inherit tooltip))
+  "Background and foreground for `lsp-signature-posframe'."
+  :group 'lsp-mode)
+
+(defvar lsp-signature-posframe-params
+  (list :poshandler #'posframe-poshandler-point-bottom-left-corner-upward
+        :height 10
+        :width 60
+        :border-width 1
+        :min-width 60)
+  "Params for signature and `posframe-show'.")
+
+(defun lsp-signature-posframe (str)
+  "Use posframe to show the STR signatureHelp string."
+  (if str
+      (apply #'posframe-show
+             (with-current-buffer (get-buffer-create " *lsp-signature*")
+               (erase-buffer)
+               (insert str)
+               (visual-line-mode 1)
+               (lsp--setup-page-break-mode-if-present)
+               (current-buffer))
+             (append
+              lsp-signature-posframe-params
+              (list :position (point)
+                    :background-color (face-attribute 'lsp-signature-posframe :background nil t)
+                    :foreground-color (face-attribute 'lsp-signature-posframe :foreground nil t)
+                    :border-color (face-attribute (if (facep 'child-frame-border)
+                                                      'child-frame-border
+                                                    'internal-border)
+                                                  :background nil t))))
+    (posframe-hide " *lsp-signature*")))
+
+(defun lsp--handle-signature-update (signature)
+  (let ((message
+         (if (lsp-signature-help? signature)
+             (lsp--signature->message signature)
+           (mapconcat #'lsp--signature->message signature "\n"))))
+    (if (s-present? message)
+        (funcall lsp-signature-function message)
+      (lsp-signature-stop))))
+
+(defun lsp-signature-activate ()
+  "Activate signature help.
+It will show up only if current point has signature help."
+  (interactive)
+  (setq lsp--signature-last nil
+        lsp--signature-last-index nil
+        lsp--signature-last-buffer (current-buffer))
+  (add-hook 'post-command-hook #'lsp-signature)
+  (lsp-signature-mode t))
+
+(defcustom lsp-signature-cycle t
+  "Whether `lsp-signature-next' and prev should cycle."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defun lsp-signature-next ()
+  "Show next signature."
+  (interactive)
+  (let ((nsigs (length (lsp:signature-help-signatures lsp--signature-last))))
+    (when (and lsp--signature-last-index
+               lsp--signature-last
+               (or lsp-signature-cycle (< (1+ lsp--signature-last-index) nsigs)))
+      (setq lsp--signature-last-index (% (1+ lsp--signature-last-index) nsigs))
+      (funcall lsp-signature-function (lsp--signature->message lsp--signature-last)))))
+
+(defun lsp-signature-previous ()
+  "Next signature."
+  (interactive)
+  (when (and lsp--signature-last-index
+             lsp--signature-last
+             (or lsp-signature-cycle (not (zerop lsp--signature-last-index))))
+    (setq lsp--signature-last-index (1- (if (zerop lsp--signature-last-index)
+                                            (length (lsp:signature-help-signatures lsp--signature-last))
+                                          lsp--signature-last-index)))
+    (funcall lsp-signature-function (lsp--signature->message lsp--signature-last))))
+
+(defun lsp-signature-toggle-full-docs ()
+  "Toggle full/partial signature documentation."
+  (interactive)
+  (let ((all? (not (numberp lsp-signature-doc-lines))))
+    (setq lsp-signature-doc-lines (if all?
+                                      (or (car-safe lsp-signature-doc-lines)
+                                          20)
+                                    (list lsp-signature-doc-lines))))
+  (lsp-signature-activate))
+
+(defface lsp-signature-highlight-function-argument
+  '((t :inherit eldoc-highlight-function-argument))
+  "The face to use to highlight function arguments in signatures."
+  :group 'lsp-mode)
+
+(defun lsp--signature->message (signature-help)
+  "Generate eldoc message from SIGNATURE-HELP response."
+  (setq lsp--signature-last signature-help)
+
+  (when (and signature-help (not (seq-empty-p (lsp:signature-help-signatures signature-help))))
+    (-let* (((&SignatureHelp :active-signature?
+                             :active-parameter?
+                             :signatures) signature-help)
+            (active-signature? (or lsp--signature-last-index active-signature? 0))
+            (_ (setq lsp--signature-last-index active-signature?))
+            ((signature &as &SignatureInformation? :label :parameters?) (seq-elt signatures active-signature?))
+            (active-parameter? (or (lsp:signature-information-active-parameter? signature)
+                                   active-parameter?))
+            (prefix (if (= (length signatures) 1)
+                        ""
+                      (concat (propertize (format " %s/%s"
+                                                  (1+ active-signature?)
+                                                  (length signatures))
+                                          'face 'success)
+                              " ")))
+            (method-docs (when
+                             (and lsp-signature-render-documentation
+                                  (or (not (numberp lsp-signature-doc-lines)) (< 0 lsp-signature-doc-lines)))
+                           (let ((docs (lsp--render-element
+                                        (lsp:parameter-information-documentation? signature))))
+                             (when (s-present? docs)
+                               (concat
+                                "\n"
+                                (if (fboundp 'page-break-lines-mode)
+                                    "\n"
+                                  "")
+                                (if (and (numberp lsp-signature-doc-lines)
+                                         (> (length (s-lines docs)) lsp-signature-doc-lines))
+                                    (concat (s-join "\n" (-take lsp-signature-doc-lines (s-lines docs)))
+                                            (propertize "\nTruncated..." 'face 'highlight))
+                                  docs)))))))
+      (when (and active-parameter? (not (seq-empty-p parameters?)))
+        (-when-let* ((param (when (and (< -1 active-parameter? (length parameters?)))
+                              (seq-elt parameters? active-parameter?)))
+                     (selected-param-label (let ((label (lsp:parameter-information-label param)))
+                                             (if (stringp label) label (append label nil))))
+                     (start (if (stringp selected-param-label)
+                                (s-index-of selected-param-label label)
+                              (cl-first selected-param-label)))
+                     (end (if (stringp selected-param-label)
+                              (+ start (length selected-param-label))
+                            (cl-second selected-param-label))))
+          (add-face-text-property start end 'lsp-signature-highlight-function-argument nil label)))
+      (concat prefix label method-docs))))
+
+(defun lsp-signature ()
+  "Display signature info (based on `textDocument/signatureHelp')"
+  (if (and lsp--signature-last-buffer
+           (not (equal (current-buffer) lsp--signature-last-buffer)))
+      (lsp-signature-stop)
+    (lsp-request-async "textDocument/signatureHelp"
+                       (lsp--text-document-position-params)
+                       #'lsp--handle-signature-update
+                       :cancel-token :signature)))
+
+
+(defcustom lsp-overlay-document-color-char "■"
+  "Display the char represent the document color in overlay"
+  :type 'string
+  :group 'lsp-mode)
+
+;; color presentation
+(defun lsp--color-create-interactive-command (color range)
+  (lambda ()
+    (interactive)
+    (-let [(&ColorPresentation? :text-edit?
+                                :additional-text-edits?)
+           (lsp--completing-read
+            "Select color presentation: "
+            (lsp-request
+             "textDocument/colorPresentation"
+             `( :textDocument ,(lsp--text-document-identifier)
+                :color ,color
+                :range ,range))
+            #'lsp:color-presentation-label
+            nil
+            t)]
+      (when text-edit?
+        (lsp--apply-text-edit text-edit?))
+      (when additional-text-edits?
+        (lsp--apply-text-edits additional-text-edits? 'color-presentation)))))
+
+(defun lsp--number->color (number)
+  (let ((result (format "%x"
+                        (round (* (or number 0) 255.0)))))
+    (if (= 1 (length result))
+        (concat "0" result)
+      result)))
+
+(defun lsp--document-color ()
+  "Document color handler."
+  (when (lsp-feature? "textDocument/documentColor")
+    (lsp-request-async
+     "textDocument/documentColor"
+     `(:textDocument ,(lsp--text-document-identifier))
+     (lambda (result)
+       (lsp--remove-overlays 'lsp-color)
+       (seq-do
+        (-lambda ((&ColorInformation :color (color &as &Color :red :green :blue)
+                                     :range))
+          (-let* (((beg . end) (lsp--range-to-region range))
+                  (overlay (make-overlay beg end))
+                  (command (lsp--color-create-interactive-command color range)))
+            (overlay-put overlay 'lsp-color t)
+            (overlay-put overlay 'evaporate t)
+            (overlay-put overlay
+                         'before-string
+                         (propertize
+                          lsp-overlay-document-color-char
+                          'face `((:foreground ,(format
+                                                 "#%s%s%s"
+                                                 (lsp--number->color red)
+                                                 (lsp--number->color green)
+                                                 (lsp--number->color blue))))
+                          'action command
+                          'mouse-face 'lsp-lens-mouse-face
+                          'local-map (-doto (make-sparse-keymap)
+                                       (define-key [mouse-1] command))))))
+        result))
+     :mode 'unchanged
+     :cancel-token :document-color-token)))
+
+
+
+(defun lsp--action-trigger-parameter-hints (_command)
+  "Handler for editor.action.triggerParameterHints."
+  (when (member :on-server-request lsp-signature-auto-activate)
+    (lsp-signature-activate)))
+
+(defun lsp--action-trigger-suggest (_command)
+  "Handler for editor.action.triggerSuggest."
+  (cond
+   ((and (bound-and-true-p company-mode)
+         (fboundp 'company-auto-begin)
+         (fboundp 'company-post-command))
+    (run-at-time 0 nil
+                 (lambda ()
+                   (let ((this-command 'company-idle-begin)
+                         (company-minimum-prefix-length 0))
+                     (company-auto-begin)
+                     (company-post-command)))))
+   (t
+    (completion-at-point))))
+
+(defconst lsp--default-action-handlers
+  (ht ("editor.action.triggerParameterHints" #'lsp--action-trigger-parameter-hints)
+      ("editor.action.triggerSuggest" #'lsp--action-trigger-suggest))
+  "Default action handlers.")
+
+(defun lsp--find-action-handler (command)
+  "Find action handler for particular COMMAND."
+  (or
+   (--some (-some->> it
+             (lsp--workspace-client)
+             (lsp--client-action-handlers)
+             (gethash command))
+           (lsp-workspaces))
+   (gethash command lsp--default-action-handlers)))
+
+(defun lsp--text-document-code-action-params (&optional kind buffer-wide)
+  "Code action params.
+When BUFFER-WIDE is non-nil, use entire buffer range and all diagnostics.
+This is useful for source actions like `source.fixAll' that operate on the
+whole buffer rather than the current position."
+  (let* ((diagnostics (if buffer-wide
+                          (apply #'vector (lsp--get-buffer-diagnostics))
+                        (lsp-cur-possition-diagnostics)))
+         (range (cond (buffer-wide
+                       (lsp--region-to-range (point-min) (point-max)))
+                      ((use-region-p)
+                       (lsp--region-to-range (region-beginning) (region-end)))
+                      (diagnostics
+                       (let* ((start (point)) (end (point)))
+                         (mapc (-lambda
+                                 ((&Diagnostic
+                                   :range (&Range :start (&Position :line l1 :character c1)
+                                                  :end (&Position :line l2 :character c2))))
+                                 (setq start (min (lsp--line-character-to-point l1 c1) start))
+                                 (setq end (max (lsp--line-character-to-point l2 c2) end)))
+                               diagnostics)
+                         (lsp--region-to-range start end)))
+                      (t (lsp--region-to-range (point) (point))))))
+    (list :textDocument (lsp--text-document-identifier)
+          :range range
+          :context `( :diagnostics ,diagnostics
+                      ,@(when kind (list :only (vector kind)))))))
+
+(defun lsp-code-actions-at-point (&optional kind)
+  "Retrieve the code actions for the active region or the current line.
+It will filter by KIND if non nil."
+  (lsp-request "textDocument/codeAction" (lsp--text-document-code-action-params kind)))
+
+(defun lsp-execute-code-action-by-kind (command-kind)
+  "Execute code action by COMMAND-KIND."
+  (if-let* ((action (->> (lsp-get-or-calculate-code-actions command-kind)
+                        (-filter (-lambda ((&CodeAction :kind?))
+                                   (and kind? (s-prefix? command-kind kind?))))
+                        lsp--select-action)))
+      (lsp-execute-code-action action)
+    (signal 'lsp-no-code-actions '(command-kind))))
+
+(defalias 'lsp-get-or-calculate-code-actions 'lsp-code-actions-at-point)
+
+(lsp-defun lsp--execute-command ((action &as &Command :command :arguments?))
+  "Parse and execute a code ACTION represented as a Command LSP type."
+  (let ((server-id (->> (lsp-workspaces)
+                        (cl-first)
+                        (or lsp--cur-workspace)
+                        (lsp--workspace-client)
+                        (lsp--client-server-id))))
+    (condition-case nil
+        (with-no-warnings
+          (lsp-execute-command server-id (intern command) arguments?))
+      (cl-no-applicable-method
+       (if-let* ((action-handler (lsp--find-action-handler command)))
+           (funcall action-handler action)
+         (lsp-send-execute-command command arguments?))))))
+
+(lsp-defun lsp-execute-code-action ((action &as &CodeAction :command? :edit?))
+  "Execute code action ACTION. For example, when text under the
+caret has a suggestion to apply a fix from an lsp-server, calling
+this function will do so.
+If ACTION is not set it will be selected from `lsp-code-actions-at-point'.
+Request codeAction/resolve for more info if server supports."
+  (interactive (list (lsp--select-action (lsp-code-actions-at-point))))
+  (if (and (lsp-feature? "codeAction/resolve")
+           (not command?)
+           (not edit?))
+      (lsp--execute-code-action (lsp-request "codeAction/resolve" action))
+    (lsp--execute-code-action action)))
+
+(lsp-defun lsp--execute-code-action ((action &as &CodeAction :command? :edit?))
+  "Execute code action ACTION."
+  (when edit?
+    (lsp--apply-workspace-edit edit? 'code-action))
+
+  (cond
+   ((stringp command?) (lsp--execute-command action))
+   ((lsp-command? command?) (progn
+                              (when-let* ((action-filter (->> (lsp-workspaces)
+                                                             (cl-first)
+                                                             (or lsp--cur-workspace)
+                                                             (lsp--workspace-client)
+                                                             (lsp--client-action-filter))))
+                                (funcall action-filter command?))
+                              (lsp--execute-command command?)))))
+
+(lsp-defun lsp-fix-code-action-booleans ((&Command :arguments?) boolean-action-arguments)
+  "Patch incorrect boolean argument values in the provided `CodeAction' command
+in place, based on the BOOLEAN-ACTION-ARGUMENTS list. The values
+in this list can be either symbols or lists of symbols that
+represent paths to boolean arguments in code actions:
+
+> (lsp-fix-code-action-booleans command `(:foo :bar (:some :nested :boolean)))
+
+When there are available code actions, the server sends
+`lsp-mode' a list of possible command names and arguments as
+JSON. `lsp-mode' parses all boolean false values as `nil'. As a
+result code action arguments containing falsy values don't
+roundtrip correctly because `lsp-mode' will end up sending null
+values back to the client. This list makes it possible to
+selectively transform `nil' values back into `:json-false'."
+  (seq-doseq (path boolean-action-arguments)
+    (seq-doseq (args arguments?)
+      (lsp--fix-nested-boolean args (if (listp path) path (list path))))))
+
+(defun lsp--fix-nested-boolean (structure path)
+  "Traverse STRUCTURE using the paths from the PATH list, changing the value to
+`:json-false' if it was `nil'. PATH should be a list containing
+one or more symbols, and STRUCTURE should be compatible with
+`lsp-member?', `lsp-get', and `lsp-put'."
+  (let ((key (car path))
+        (rest (cdr path)))
+    (if (null rest)
+        ;; `lsp-put' returns `nil' both when the key doesn't exist and when the
+        ;; value is `nil', so we need to explicitly check its presence here
+        (when (and (lsp-member? structure key) (not (lsp-get structure key)))
+          (lsp-put structure key :json-false))
+      ;; If `key' does not exist, then we'll silently ignore it
+      (when-let* ((child (lsp-get structure key)))
+        (lsp--fix-nested-boolean child rest)))))
+
+(defvar lsp--formatting-indent-alist
+  ;; Taken from `dtrt-indent-mode'
+  '(
+    (ada-mode                   . ada-indent)                       ; Ada
+    (ada-ts-mode                . ada-ts-mode-indent-offset)
+    (c++-mode                   . c-basic-offset)                   ; C++
+    (c++-ts-mode                . c-ts-mode-indent-offset)
+    (c-mode                     . c-basic-offset)                   ; C
+    (c-ts-mode                  . c-ts-mode-indent-offset)
+    (cperl-mode                 . cperl-indent-level)               ; Perl
+    (crystal-mode               . crystal-indent-level)             ; Crystal (Ruby)
+    (csharp-mode                . c-basic-offset)                   ; C#
+    (csharp-tree-sitter-mode    . csharp-tree-sitter-indent-offset) ; C#
+    (csharp-ts-mode             . csharp-ts-mode-indent-offset)     ; C# (tree-sitter, Emacs29)
+    (css-mode                   . css-indent-offset)                ; CSS
+    (d-mode                     . c-basic-offset)                   ; D
+    (enh-ruby-mode              . enh-ruby-indent-level)            ; Ruby
+    (erlang-mode                . erlang-indent-level)              ; Erlang
+    (ess-mode                   . ess-indent-offset)                ; ESS (R)
+    (go-ts-mode                 . go-ts-mode-indent-offset)
+    (gpr-mode                   . gpr-indent-offset)                ; GNAT Project
+    (gpr-ts-mode                . gpr-ts-mode-indent-offset)
+    (hack-mode                  . hack-indent-offset)               ; Hack
+    (java-mode                  . c-basic-offset)                   ; Java
+    (java-ts-mode               . java-ts-mode-indent-offset)
+    (jde-mode                   . c-basic-offset)                   ; Java (JDE)
+    (js-mode                    . js-indent-level)                  ; JavaScript
+    (js-ts-mode                 . js-indent-level)
+    (js2-mode                   . js2-basic-offset)                 ; JavaScript-IDE
+    (js3-mode                   . js3-indent-level)                 ; JavaScript-IDE
+    (json-mode                  . js-indent-level)                  ; JSON
+    (json-ts-mode               . json-ts-mode-indent-offset)
+    (lua-mode                   . lua-indent-level)                 ; Lua
+    (lua-ts-mode                . lua-ts-indent-offset)
+    (nxml-mode                  . nxml-child-indent)                ; XML
+    (objc-mode                  . c-basic-offset)                   ; Objective C
+    (pascal-mode                . pascal-indent-level)              ; Pascal
+    (perl-mode                  . perl-indent-level)                ; Perl
+    (php-mode                   . c-basic-offset)                   ; PHP
+    (php-ts-mode                . php-ts-mode-indent-offset)        ; PHP
+    (powershell-mode            . powershell-indent)                ; PowerShell
+    (powershell-ts-mode         . powershell-ts-mode-indent-offset) ; PowerShell
+    (raku-mode                  . raku-indent-offset)               ; Perl6/Raku
+    (ruby-mode                  . ruby-indent-level)                ; Ruby
+    (rust-mode                  . rust-indent-offset)               ; Rust
+    (rust-ts-mode               . rust-ts-mode-indent-offset)
+    (rustic-mode                . rustic-indent-offset)             ; Rust
+    (scala-mode                 . scala-indent:step)                ; Scala
+    (sgml-mode                  . sgml-basic-offset)                ; SGML
+    (sh-mode                    . sh-basic-offset)                  ; Shell Script
+    (swift-mode                 . swift-mode:basic-offset)          ; Swift
+    (toml-ts-mode               . toml-ts-mode-indent-offset)
+    (typescript-mode            . typescript-indent-level)          ; Typescript
+    (typescript-ts-mode         . typescript-ts-mode-indent-offset) ; Typescript (tree-sitter, Emacs29)
+    (tsx-mode                   . typescript-indent-level)          ; TSX
+    (tsx-ts-mode                . typescript-ts-mode-indent-offset) ; TSX (tree-sitter, Emacs29)
+    (yaml-mode                  . yaml-indent-offset)               ; YAML
+    (yang-mode                  . c-basic-offset)                   ; YANG (yang-mode)
+
+    (default                    . standard-indent))                 ; default fallback
+  "A mapping from `major-mode' to its indent variable.")
+
+(defun lsp--get-indent-width (mode)
+  "Get indentation offset for MODE."
+  (or (alist-get mode lsp--formatting-indent-alist)
+      (lsp--get-indent-width (or (get mode 'derived-mode-parent) 'default))))
+
+(defun lsp--make-document-formatting-params ()
+  "Create document formatting params."
+  (lsp-make-document-formatting-params
+   :text-document (lsp--text-document-identifier)
+   :options (lsp-make-formatting-options
+             :tab-size (symbol-value (lsp--get-indent-width major-mode))
+             :insert-spaces (lsp-json-bool (not indent-tabs-mode))
+             :trim-trailing-whitespace? (lsp-json-bool lsp-trim-trailing-whitespace)
+             :insert-final-newline? (lsp-json-bool lsp-insert-final-newline)
+             :trim-final-newlines? (lsp-json-bool lsp-trim-final-newlines))))
+
+(defun lsp-format-buffer ()
+  "Ask the server to format this document."
+  (interactive "*")
+  (cond ((lsp-feature? "textDocument/formatting")
+         (let ((edits (lsp-request "textDocument/formatting"
+                                   (lsp--make-document-formatting-params))))
+           (if (seq-empty-p edits)
+               (lsp--info "No formatting changes provided")
+             (lsp--apply-text-edits edits 'format))))
+        ((lsp-feature? "textDocument/rangeFormatting")
+         (save-restriction
+           (widen)
+           (lsp-format-region (point-min) (point-max))))
+        (t (signal 'lsp-capability-not-supported (list "documentFormattingProvider")))))
+
+(defun lsp-format-region (s e)
+  "Ask the server to format the region, or if none is selected, the current line."
+  (interactive
+   (if (use-region-p)
+       (list (region-beginning) (region-end))
+     (list (point) (point))))
+  (let ((edits (lsp-request
+                "textDocument/rangeFormatting"
+                (lsp--make-document-range-formatting-params s e))))
+    (if (seq-empty-p edits)
+        (lsp--info "No formatting changes provided")
+      (lsp--apply-text-edits edits 'format))))
+
+(defmacro lsp-make-interactive-code-action (func-name code-action-kind)
+  "Define an interactive function FUNC-NAME that attempts to
+execute a CODE-ACTION-KIND action."
+  `(defun ,(intern (concat "lsp-" (symbol-name func-name))) ()
+     ,(format "Perform the %s code action, if available." code-action-kind)
+     (interactive)
+     ;; Even when `lsp-auto-execute-action' is nil, it still makes sense to
+     ;; auto-execute here: the user has specified exactly what they want.
+     (let ((lsp-auto-execute-action t))
+       (condition-case nil
+           (lsp-execute-code-action-by-kind ,code-action-kind)
+         (lsp-no-code-actions
+          (when (called-interactively-p 'any)
+            (lsp--info ,(format "%s action not available" code-action-kind))))))))
+
+(lsp-make-interactive-code-action organize-imports "source.organizeImports")
+
+(defun lsp-code-actions-buffer-wide (&optional kind)
+  "Retrieve the code actions for the entire buffer.
+This is useful for source actions like `source.fixAll' that operate on the
+whole buffer rather than the current position.
+It will filter by KIND if non nil."
+  (lsp-request "textDocument/codeAction" (lsp--text-document-code-action-params kind t)))
+
+(defun lsp-execute-code-action-by-kind-buffer-wide (command-kind)
+  "Execute code action by COMMAND-KIND for the entire buffer.
+Unlike `lsp-execute-code-action-by-kind', this function passes the entire
+buffer range and all diagnostics to the language server."
+  (if-let* ((action (->> (lsp-code-actions-buffer-wide command-kind)
+                        (-filter (-lambda ((&CodeAction :kind?))
+                                   (and kind? (s-prefix? command-kind kind?))))
+                        lsp--select-action)))
+      (lsp-execute-code-action action)
+    (signal 'lsp-no-code-actions '(command-kind))))
+
+(defun lsp-fix-all ()
+  "Perform the source.fixAll code action for the entire buffer, if available.
+This action fixes all auto-fixable issues in the buffer."
+  (interactive)
+  (let ((lsp-auto-execute-action t))
+    (condition-case nil
+        (lsp-execute-code-action-by-kind-buffer-wide "source.fixAll")
+      (lsp-no-code-actions
+       (when (called-interactively-p 'any)
+         (lsp--info "source.fixAll action not available"))))))
+
+(defun lsp--make-document-range-formatting-params (start end)
+  "Make DocumentRangeFormattingParams for selected region."
+  (lsp:set-document-range-formatting-params-range (lsp--make-document-formatting-params)
+                                                  (lsp--region-to-range start end)))
+
+(defconst lsp--highlight-kind-face
+  '((1 . lsp-face-highlight-textual)
+    (2 . lsp-face-highlight-read)
+    (3 . lsp-face-highlight-write)))
+
+(defun lsp--remove-overlays (name)
+  (save-restriction
+    (widen)
+    (remove-overlays (point-min) (point-max) name t)))
+
+(defun lsp-document-highlight ()
+  "Highlight all relevant references to the symbol under point."
+  (interactive)
+  (lsp--remove-overlays 'lsp-highlight) ;; clear any previous highlights
+  (setq lsp--have-document-highlights nil
+        lsp--symbol-bounds-of-last-highlight-invocation nil)
+  (let ((lsp-enable-symbol-highlighting t))
+    (lsp--document-highlight)))
+
+(defun lsp--document-highlight-callback (highlights)
+  "Create a callback to process the reply of a
+`textDocument/documentHighlight' message for the buffer BUF.
+A reference is highlighted only if it is visible in a window."
+  (lsp--remove-overlays 'lsp-highlight)
+
+  (let* ((wins-visible-pos (-map (lambda (win)
+                                   (cons (1- (line-number-at-pos (window-start win) t))
+                                         (1+ (line-number-at-pos (min (window-end win)
+                                                                      (with-current-buffer (window-buffer win)
+                                                                        (buffer-end +1)))
+                                                                 t))))
+                                 (get-buffer-window-list nil nil 'visible))))
+    (setq lsp--have-document-highlights t)
+    (-map
+     (-lambda ((&DocumentHighlight :range (&Range :start (start &as &Position :line start-line)
+                                                  :end (end &as &Position :line end-line))
+                                   :kind?))
+       (-map
+        (-lambda ((start-window . end-window))
+          ;; Make the overlay only if the reference is visible
+          (when (and (> (1+ start-line) start-window)
+                     (< (1+ end-line) end-window))
+            (let ((start-point (lsp--position-to-point start))
+                  (end-point (lsp--position-to-point end)))
+              (when (not (and lsp-symbol-highlighting-skip-current
+                              (<= start-point (point) end-point)))
+                (-doto (make-overlay start-point end-point)
+                  (overlay-put 'face (cdr (assq (or kind? 1) lsp--highlight-kind-face)))
+                  (overlay-put 'lsp-highlight t))))))
+        wins-visible-pos))
+     highlights)))
+
+(defcustom lsp-symbol-kinds
+  '((1 . "File")
+    (2 . "Module")
+    (3 . "Namespace")
+    (4 . "Package")
+    (5 . "Class")
+    (6 . "Method")
+    (7 . "Property")
+    (8 . "Field")
+    (9 . "Constructor")
+    (10 . "Enum")
+    (11 . "Interface")
+    (12 . "Function")
+    (13 . "Variable")
+    (14 . "Constant")
+    (15 . "String")
+    (16 . "Number")
+    (17 . "Boolean")
+    (18 . "Array")
+    (19 . "Object")
+    (20 . "Key")
+    (21 . "Null")
+    (22 . "Enum Member")
+    (23 . "Struct")
+    (24 . "Event")
+    (25 . "Operator")
+    (26 . "Type Parameter"))
+  "Alist mapping SymbolKinds to human-readable strings.
+Various Symbol objects in the LSP protocol have an integral type,
+specifying what they are. This alist maps such type integrals to
+readable representations of them. See
+`https://microsoft.github.io/language-server-protocol/specifications/specification-current/',
+namespace SymbolKind."
+  :group 'lsp-mode
+  :type '(alist :key-type integer :value-type string))
+(defalias 'lsp--symbol-kind 'lsp-symbol-kinds)
+
+(lsp-defun lsp--symbol-information-to-xref
+  ((&SymbolInformation :kind :name
+                       :location (&Location :uri :range (&Range :start
+                                                                (&Position :line :character)))))
+  "Return a `xref-item' from SYMBOL information."
+  (xref-make (format "[%s] %s" (alist-get kind lsp-symbol-kinds) name)
+             (xref-make-file-location (lsp--uri-to-path uri)
+                                      line
+                                      character)))
+
+(defun lsp--get-document-symbols ()
+  "Get document symbols.
+
+If the buffer has not been modified since symbols were last
+retrieved, simply return the latest result.
+
+Else, if the request was initiated by Imenu updating its menu-bar
+entry, perform it asynchronously; i.e., give Imenu the latest
+result and then force a refresh when a new one is available.
+
+Else (e.g., due to interactive use of `imenu' or `xref'),
+perform the request synchronously."
+  (if (= (buffer-chars-modified-tick) lsp--document-symbols-tick)
+      lsp--document-symbols
+    (let ((method "textDocument/documentSymbol")
+          (params `(:textDocument ,(lsp--text-document-identifier)))
+          (tick (buffer-chars-modified-tick)))
+      (if (not lsp--document-symbols-request-async)
+          (prog1
+              (setq lsp--document-symbols (lsp-request method params))
+            (setq lsp--document-symbols-tick tick))
+        (lsp-request-async method params
+                           (lambda (document-symbols)
+                             (setq lsp--document-symbols document-symbols
+                                   lsp--document-symbols-tick tick)
+                             (lsp--imenu-refresh))
+                           :mode 'alive
+                           :cancel-token :document-symbols)
+        lsp--document-symbols))))
+
+(advice-add 'imenu-update-menubar :around
+            (lambda (oldfun &rest r)
+              (let ((lsp--document-symbols-request-async t))
+                (apply oldfun r))))
+
+(defun lsp--document-symbols->document-symbols-hierarchy (document-symbols current-position)
+  "Convert DOCUMENT-SYMBOLS to symbols hierarchy on CURRENT-POSITION."
+  (-let (((symbol &as &DocumentSymbol? :children?)
+          (seq-find (-lambda ((&DocumentSymbol :range))
+                      (lsp-point-in-range? current-position range))
+                    document-symbols)))
+    (if children?
+        (cons symbol (lsp--document-symbols->document-symbols-hierarchy children? current-position))
+      (when symbol
+        (list symbol)))))
+
+(lsp-defun lsp--symbol-information->document-symbol ((&SymbolInformation :name :kind :location :container-name? :deprecated?))
+  "Convert a SymbolInformation to a DocumentInformation"
+  (lsp-make-document-symbol :name name
+                            :kind kind
+                            :range (lsp:location-range location)
+                            :children? nil
+                            :deprecated? deprecated?
+                            :selection-range (lsp:location-range location)
+                            :detail? container-name?))
+
+(defun lsp--symbols-informations->document-symbols-hierarchy (symbols-informations current-position)
+  "Convert SYMBOLS-INFORMATIONS to symbols hierarchy on CURRENT-POSITION.
+
+Skips SymbolInformation entries whose `:location' field is missing
+— pylsp occasionally emits duplicate entries without `:location',
+and destructuring `(&Location :range)' off a nil `:location' blew
+up the breadcrumb idle timer with
+`(wrong-type-argument hash-table-p nil)' (issue #5047)."
+  (--> symbols-informations
+    (-keep (-lambda ((symbol &as &SymbolInformation :location))
+             (when-let* ((range (and location (lsp:location-range location))))
+               (when (lsp-point-in-range? current-position range)
+                 (lsp--symbol-information->document-symbol symbol))))
+           it)
+    (sort it (-lambda ((&DocumentSymbol :range (&Range :start a-start-position :end a-end-position))
+                       (&DocumentSymbol :range (&Range :start b-start-position :end b-end-position)))
+               (and (lsp--position-compare b-start-position a-start-position)
+                    (lsp--position-compare a-end-position b-end-position))))))
+
+(defun lsp--symbols->document-symbols-hierarchy (symbols)
+  "Convert SYMBOLS to symbols-hierarchy."
+  (when-let* ((first-symbol (lsp-seq-first symbols)))
+    (let ((cur-position (lsp-make-position :line (plist-get (lsp--cur-position) :line)
+                                           :character (plist-get (lsp--cur-position) :character))))
+      (if (lsp-symbol-information? first-symbol)
+          (lsp--symbols-informations->document-symbols-hierarchy symbols cur-position)
+        (lsp--document-symbols->document-symbols-hierarchy symbols cur-position)))))
+
+(defun lsp--xref-backend () 'xref-lsp)
+
+(cl-defmethod xref-backend-identifier-at-point ((_backend (eql xref-lsp)))
+  (propertize (or (thing-at-point 'symbol) "")
+              'identifier-at-point t))
+
+(defun lsp--xref-elements-index (symbols path)
+  (-mapcat
+   (-lambda (sym)
+     (pcase-exhaustive sym
+       ((lsp-interface DocumentSymbol :name :children? :selection-range (lsp-interface Range :start))
+        (cons (cons (concat path name)
+                    (lsp--position-to-point start))
+              (lsp--xref-elements-index children? (concat path name " / "))))
+       ((lsp-interface SymbolInformation :name :location (lsp-interface Location :range (lsp-interface Range :start)))
+        (list (cons (concat path name)
+                    (lsp--position-to-point start))))))
+   symbols))
+
+(defvar-local lsp--symbols-cache nil)
+
+(cl-defmethod xref-backend-identifier-completion-table ((_backend (eql xref-lsp)))
+  (if (lsp--find-workspaces-for "textDocument/documentSymbol")
+      (progn
+        (setq lsp--symbols-cache (lsp--xref-elements-index
+                                  (lsp--get-document-symbols) nil))
+        lsp--symbols-cache)
+    (list (propertize (or (thing-at-point 'symbol) "")
+                      'identifier-at-point t))))
+
+(cl-defmethod xref-backend-definitions ((_backend (eql xref-lsp)) identifier)
+  (save-excursion
+    (unless (get-text-property 0 'identifier-at-point identifier)
+      (goto-char (cl-rest (or (assoc identifier lsp--symbols-cache)
+                              (user-error "Unable to find symbol %s in current document" identifier)))))
+    (lsp--locations-to-xref-items (lsp-request "textDocument/definition"
+                                               (lsp--text-document-position-params)))))
+
+(cl-defmethod xref-backend-references ((_backend (eql xref-lsp)) identifier)
+  (save-excursion
+    (unless (get-text-property 0 'identifier-at-point identifier)
+      (goto-char (cl-rest (or (assoc identifier lsp--symbols-cache)
+                              (user-error "Unable to find symbol %s" identifier)))))
+    (lsp--locations-to-xref-items (lsp-request "textDocument/references"
+                                               (lsp--make-reference-params nil lsp-references-exclude-declaration)))))
+
+(cl-defmethod xref-backend-apropos ((_backend (eql xref-lsp)) pattern)
+  (seq-map #'lsp--symbol-information-to-xref
+           (lsp-request "workspace/symbol" `(:query ,pattern))))
+
+(defcustom lsp-rename-use-prepare t
+  "Whether `lsp-rename' should do a prepareRename first.
+For some language servers, textDocument/prepareRename might be
+too slow, in which case this variable may be set to nil.
+`lsp-rename' will then use `thing-at-point' `symbol' to determine
+the symbol to rename at point."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defun lsp--get-symbol-to-rename ()
+  "Get a symbol to rename and placeholder at point.
+Returns a cons ((START . END) . PLACEHOLDER?), and nil if
+renaming is generally supported but cannot be done at point.
+START and END are the bounds of the identifiers being renamed,
+while PLACEHOLDER?, is either nil or a string suggested by the
+language server as the initial input of a new-name prompt."
+  (unless (lsp-feature? "textDocument/rename")
+    (error "The connected server(s) doesn't support renaming"))
+  (if (and lsp-rename-use-prepare (lsp-feature? "textDocument/prepareRename"))
+      (when-let* ((response
+                  (lsp-request "textDocument/prepareRename"
+                               (lsp--text-document-position-params))))
+        (let* ((bounds (lsp--range-to-region
+                        (if (lsp-range? response)
+                            response
+                          (lsp:prepare-rename-result-range response))))
+               (placeholder
+                (and (not (lsp-range? response))
+                     (lsp:prepare-rename-result-placeholder response))))
+          (cons bounds placeholder)))
+    (when-let* ((bounds (bounds-of-thing-at-point 'symbol)))
+      (cons bounds nil))))
+
+(defface lsp-face-rename '((t :underline t))
+  "Face used to highlight the identifier being renamed.
+Renaming can be done using `lsp-rename'."
+  :group 'lsp-mode)
+
+(defface lsp-rename-placeholder-face '((t :inherit font-lock-variable-name-face))
+  "Face used to display the rename placeholder in.
+When calling `lsp-rename' interactively, this will be the face of
+the new name."
+  :group 'lsp-mode)
+
+(defvar lsp-rename-history '()
+  "History for `lsp--read-rename'.")
+
+(defun lsp--read-rename (at-point)
+  "Read a new name for a `lsp-rename' at `point' from the user.
+AT-POINT shall be a structure as returned by
+`lsp--get-symbol-to-rename'.
+
+Returns a string, which should be the new name for the identifier
+at point. If renaming cannot be done at point (as determined from
+AT-POINT), throw a `user-error'.
+
+This function is for use in `lsp-rename' only, and shall not be
+relied upon."
+  (unless at-point
+    (user-error "`lsp-rename' is invalid here"))
+  (-let* ((((start . end) . placeholder?) at-point)
+          ;; Do the `buffer-substring' first to not include `lsp-face-rename'
+          (rename-me (buffer-substring start end))
+          (placeholder (or placeholder? rename-me))
+          (placeholder (propertize placeholder 'face 'lsp-rename-placeholder-face))
+
+          overlay)
+    ;; We need unwind protect, as the user might cancel here, causing the
+    ;; overlay to linger.
+    (unwind-protect
+        (progn
+          (setq overlay (make-overlay start end))
+          (overlay-put overlay 'face 'lsp-face-rename)
+
+          (read-string (format "Rename %s to: " rename-me) placeholder
+                       'lsp-rename-history))
+      (and overlay (delete-overlay overlay)))))
+
+(defun lsp-rename (newname)
+  "Rename the symbol (and all references to it) under point to NEWNAME."
+  (interactive (list (lsp--read-rename (lsp--get-symbol-to-rename))))
+  (when-let* ((edits (lsp-request "textDocument/rename"
+                                 `( :textDocument ,(lsp--text-document-identifier)
+                                    :position ,(lsp--cur-position)
+                                    :newName ,newname))))
+    (lsp--apply-workspace-edit edits 'rename)))
+
+(defun lsp--on-rename-file (old-func old-name new-name &rest args)
+  "Advice around file renaming functions such as `rename-file'.
+Applies OLD-FUNC with OLD-NAME, NEW-NAME and remaining ARGS.
+
+This advice sends workspace/willRenameFiles before renaming file
+to check if server wants to apply any workspaceEdits after renamed."
+  (if (and lsp-apply-edits-after-file-operations
+           (lsp--send-will-rename-files-p old-name))
+      (let ((params (lsp-make-rename-files-params
+                     :files (vector (lsp-make-file-rename
+                                     :oldUri (lsp--path-to-uri old-name)
+                                     :newUri (lsp--path-to-uri new-name))))))
+        (if-let* ((edits (lsp-request "workspace/willRenameFiles" params)))
+            (progn
+              (lsp--apply-workspace-edit edits 'rename-file)
+              (apply old-func old-name new-name args)
+              (when (lsp--send-did-rename-files-p)
+                (lsp-notify "workspace/didRenameFiles" params)))
+          (apply old-func old-name new-name args)))
+    (apply old-func old-name new-name args)))
+
+(advice-add 'rename-file :around #'lsp--on-rename-file)
+(advice-add 'vc-git-rename-file :around #'lsp--on-rename-file)
+
+(defcustom lsp-xref-force-references nil
+  "If non-nil threat everything as references(e. g. jump if only one item.)"
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defun lsp-show-xrefs (xrefs display-action references?)
+  (unless (region-active-p) (push-mark nil t))
+  (if (boundp 'xref-show-definitions-function)
+      (with-no-warnings
+        (xref-push-marker-stack)
+        (funcall (if (and references? (not lsp-xref-force-references))
+                     xref-show-xrefs-function
+                   xref-show-definitions-function)
+                 (-const xrefs)
+                 `((window . ,(selected-window))
+                   (display-action . ,display-action)
+                   ,(if (and references? (not lsp-xref-force-references))
+                        `(auto-jump . ,xref-auto-jump-to-first-xref)
+                      `(auto-jump . ,xref-auto-jump-to-first-definition)))))
+    (xref--show-xrefs xrefs display-action)))
+
+(cl-defmethod seq-empty-p ((ht hash-table))
+  "Function `seq-empty-p' for hash-table."
+  (hash-table-empty-p ht))
+
+(cl-defun lsp-find-locations (method &optional extra &key display-action references?)
+  "Send request named METHOD and get cross references of the symbol under point.
+EXTRA is a plist of extra parameters.
+REFERENCES? t when METHOD returns references."
+  (let ((loc (lsp-request method
+                          (append (lsp--text-document-position-params) extra))))
+    (if (seq-empty-p loc)
+        (lsp--error "Not found for: %s" (or (thing-at-point 'symbol t) ""))
+      (lsp-show-xrefs (lsp--locations-to-xref-items loc) display-action references?))))
+
+(cl-defun lsp-find-declaration (&key display-action)
+  "Find declarations of the symbol under point."
+  (interactive)
+  (lsp-find-locations "textDocument/declaration" nil :display-action display-action))
+
+(cl-defun lsp-find-definition (&key display-action)
+  "Find definitions of the symbol under point."
+  (interactive)
+  (lsp-find-locations "textDocument/definition" nil :display-action display-action))
+
+(defun lsp-find-definition-mouse (click)
+  "Click to start `lsp-find-definition' at clicked point."
+  (interactive "e")
+  (let* ((ec (event-start click))
+         (p1 (posn-point ec))
+         (w1 (posn-window ec)))
+    (select-window w1)
+    (goto-char p1)
+    (lsp-find-definition)))
+
+(cl-defun lsp-find-implementation (&key display-action)
+  "Find implementations of the symbol under point."
+  (interactive)
+  (lsp-find-locations "textDocument/implementation"
+                      nil
+                      :display-action display-action
+                      :references? t))
+
+(cl-defun lsp-find-references (&optional exclude-declaration &key display-action)
+  "Find references of the symbol under point."
+  (interactive "P")
+  (lsp-find-locations "textDocument/references"
+                      (list :context `(:includeDeclaration ,(lsp-json-bool (not (or exclude-declaration lsp-references-exclude-declaration)))))
+                      :display-action display-action
+                      :references? t))
+
+(cl-defun lsp-find-type-definition (&key display-action)
+  "Find type definitions of the symbol under point."
+  (interactive)
+  (lsp-find-locations "textDocument/typeDefinition" nil :display-action display-action))
+
+(defalias 'lsp-find-custom #'lsp-find-locations)
+(defalias 'lsp-goto-implementation #'lsp-find-implementation)
+(defalias 'lsp-goto-type-definition #'lsp-find-type-definition)
+
+(with-eval-after-load 'evil
+  (evil-set-command-property 'lsp-find-definition :jump t)
+  (evil-set-command-property 'lsp-find-implementation :jump t)
+  (evil-set-command-property 'lsp-find-references :jump t)
+  (evil-set-command-property 'lsp-find-type-definition :jump t))
+
+(defun lsp--workspace-method-supported? (check-command method capability workspace)
+  (with-lsp-workspace workspace
+    (if check-command
+        (funcall check-command workspace)
+      (or
+       (when capability (lsp--capability capability))
+       (lsp--registered-capability method)
+       (and (not capability) (not check-command))))))
+
+(defun lsp-disable-method-for-server (method server-id)
+  "Disable METHOD for SERVER-ID."
+  (cl-callf
+      (lambda (reqs)
+        (-let (((&plist :check-command :capability) reqs))
+          (list :check-command
+                (lambda (workspace)
+                  (unless (-> workspace
+                              lsp--workspace-client
+                              lsp--client-server-id
+                              (eq server-id))
+                    (lsp--workspace-method-supported? check-command
+                                                      method
+                                                      capability
+                                                      workspace))))))
+      (alist-get method lsp-method-requirements nil nil 'string=)))
+
+(defun lsp--find-workspaces-for (msg-or-method)
+  "Find all workspaces in the current project that can handle MSG."
+  (let ((method (if (stringp msg-or-method)
+                    msg-or-method
+                  (plist-get msg-or-method :method))))
+    (-if-let (reqs (cdr (assoc method lsp-method-requirements)))
+        (-let (((&plist :capability :check-command) reqs))
+          (-filter
+           (-partial #'lsp--workspace-method-supported?
+                     check-command method capability)
+           (lsp-workspaces)))
+      (lsp-workspaces))))
+
+(defun lsp-can-execute-command? (command-name)
+  "Returns non-nil if current language server(s) can execute COMMAND-NAME.
+The command is executed via `workspace/executeCommand'"
+  (cl-position
+   command-name
+   (lsp:execute-command-options-commands
+    (lsp:server-capabilities-execute-command-provider?
+     (lsp--server-capabilities)))
+   :test #'equal))
+
+(defalias 'lsp-feature? 'lsp--find-workspaces-for)
+
+(cl-defmethod lsp-execute-command (_server _command _arguments)
+  "Dispatch COMMAND execution."
+  (signal 'cl-no-applicable-method nil))
+
+(defun lsp-workspace-command-execute (command &optional args)
+  "Execute workspace COMMAND with ARGS."
+  (condition-case-unless-debug err
+      (let ((params (if args
+                        (list :command command :arguments args)
+                      (list :command command))))
+        (lsp-request "workspace/executeCommand" params))
+    (error
+     (error "`workspace/executeCommand' with `%s' failed.\n\n%S"
+            command err))))
+
+(defun lsp-send-execute-command (command &optional args)
+  "Create and send a `workspace/executeCommand' message having command COMMAND
+and optional ARGS."
+  (lsp-workspace-command-execute command args))
+
+(defalias 'lsp-point-to-position #'lsp--point-to-position)
+(defalias 'lsp-text-document-identifier #'lsp--text-document-identifier)
+(defalias 'lsp--send-execute-command #'lsp-send-execute-command)
+(defalias 'lsp-on-open #'lsp--text-document-did-open)
+(defalias 'lsp-on-save #'lsp--text-document-did-save)
+
+(defun lsp--set-configuration (settings)
+  "Set the SETTINGS for the lsp server."
+  (lsp-notify "workspace/didChangeConfiguration" `(:settings ,settings)))
+
+(defun lsp-current-buffer ()
+  (or lsp--virtual-buffer
+      (current-buffer)))
+
+(defun lsp-buffer-live-p (buffer-id)
+  (if-let* ((buffer-live (plist-get buffer-id :buffer-live?)))
+      (funcall buffer-live buffer-id)
+    (buffer-live-p buffer-id)))
+
+(defun lsp--on-set-visited-file-name (old-func &rest args)
+  "Advice around function `set-visited-file-name'.
+
+This advice sends textDocument/didClose for the old file and
+textDocument/didOpen for the new file."
+  (when lsp--cur-workspace
+    (lsp--text-document-did-close t))
+  (prog1 (apply old-func args)
+    (when lsp--cur-workspace
+      (lsp--text-document-did-open))))
+
+(advice-add 'set-visited-file-name :around #'lsp--on-set-visited-file-name)
+
+(defcustom lsp-flush-delayed-changes-before-next-message t
+  "If non-nil send the document changes update before sending other messages.
+
+If nil, and `lsp-debounce-full-sync-notifications' is non-nil,
+ change notifications will be throttled by
+ `lsp-debounce-full-sync-notifications-interval' regardless of
+ other messages."
+  :group 'lsp-mode
+  :type 'boolean)
+
+(defvar lsp--not-flushing-delayed-changes t)
+
+(defun lsp--send-no-wait (message proc)
+  "Send MESSAGE to PROC without waiting for further output."
+
+  (when (and lsp--not-flushing-delayed-changes
+             lsp-flush-delayed-changes-before-next-message)
+    (let ((lsp--not-flushing-delayed-changes nil))
+      (lsp--flush-delayed-changes)))
+  (lsp-process-send proc message))
+
+(define-error 'lsp-parse-error
+  "Error parsing message from language server" 'lsp-error)
+(define-error 'lsp-unknown-message-type
+  "Unknown message type" '(lsp-error lsp-parse-error))
+(define-error 'lsp-unknown-json-rpc-version
+  "Unknown JSON-RPC protocol version" '(lsp-error lsp-parse-error))
+(define-error 'lsp-no-content-length
+  "Content-Length header missing in message" '(lsp-error lsp-parse-error))
+(define-error 'lsp-invalid-header-name
+  "Invalid header name" '(lsp-error lsp-parse-error))
+
+;;  id  method
+;;   x    x     request
+;;   x    .     response
+;;   .    x     notification
+(defun lsp--get-message-type (json-data)
+  "Get the message type from JSON-DATA."
+  (if (lsp:json-message-id? json-data)
+      (if (lsp:json-message-error? json-data)
+          'response-error
+        (if (lsp:json-message-method? json-data)
+            'request
+          'response))
+    'notification))
+
+(defconst lsp--default-notification-handlers
+  (ht ("window/showMessage" #'lsp--window-show-message)
+      ("window/logMessage" #'lsp--window-log-message)
+      ("window/showInputBox" #'lsp--window-show-input-box)
+      ("window/showQuickPick" #'lsp--window-show-quick-pick)
+      ("textDocument/publishDiagnostics" #'lsp--on-diagnostics)
+      ("textDocument/diagnosticsEnd" #'ignore)
+      ("textDocument/diagnosticsBegin" #'ignore)
+      ("telemetry/event" #'ignore)
+      ("$/progress" (lambda (workspace params)
+                      (funcall lsp-progress-function workspace params)))))
+
+(lsp-defun lsp--on-notification (workspace (&JSONNotification :params :method))
+  "Call the appropriate handler for NOTIFICATION."
+  (-let ((client (lsp--workspace-client workspace)))
+    (when (lsp--log-io-p method)
+      (lsp--log-entry-new (lsp--make-log-entry method nil params 'incoming-notif)
+                          lsp--cur-workspace))
+    (if-let* ((handler (or (gethash method (lsp--client-notification-handlers client))
+                          (gethash method lsp--default-notification-handlers))))
+        (funcall handler workspace params)
+      (when (and method (not (string-prefix-p "$" method)))
+        (lsp-warn "Unknown notification: %s" method)))))
+
+(lsp-defun lsp--build-workspace-configuration-response ((&ConfigurationParams :items))
+  "Get section configuration.
+If a section in the request is empty, all configuration items are returned.
+PARAMS are the `workspace/configuration' request params"
+  (->> items
+       (-map (-lambda ((&ConfigurationItem :section?))
+               (if section?
+                   (lsp--section-workspace-configuration section?)
+                 (lsp--default-workspace-configuration))))
+       (apply #'vector)))
+
+(defun lsp--section-workspace-configuration (section-from-request)
+  "Get the configuration for the SECTION from the `workspace/configuration' request."
+  (-let* ((path-parts (split-string section-from-request "\\."))
+          (path-without-last (s-join "." (-slice path-parts 0 -1)))
+          (path-parts-len (length path-parts)))
+    (cond
+     ((<= path-parts-len 1)
+      (ht-get (lsp-configuration-section section-from-request)
+              (car-safe path-parts)
+              (ht-create)))
+     ((> path-parts-len 1)
+      (when-let* ((section (lsp-configuration-section path-without-last))
+                  (keys path-parts))
+        (while (and keys section)
+          (setf section (ht-get section (pop keys))))
+        section)))))
+
+(defun lsp--ms-since (timestamp)
+  "Integer number of milliseconds since TIMESTAMP.  Fractions discarded."
+  (floor (* 1000 (float-time (time-since timestamp)))))
+
+(defun lsp--send-request-response (workspace recv-time request response)
+  "Send the RESPONSE for REQUEST in WORKSPACE and log if needed."
+  (-let* (((&JSONResponse :params :method :id) request)
+          (process (lsp--workspace-proc workspace))
+          (response (lsp--make-response id response))
+          (req-entry (and lsp-log-io
+                          (lsp--make-log-entry method id params 'incoming-req)))
+          (resp-entry (and lsp-log-io
+                           (lsp--make-log-entry method id response 'outgoing-resp
+                                                (lsp--ms-since recv-time)))))
+    ;; Send response to the server.
+    (when (lsp--log-io-p method)
+      (lsp--log-entry-new req-entry workspace)
+      (lsp--log-entry-new resp-entry workspace))
+    (lsp--send-no-wait response process)))
+
+(lsp-defun lsp--on-request (workspace (request &as &JSONRequest :params :method))
+  "Call the appropriate handler for REQUEST, and send the return value to the
+server. WORKSPACE is the active workspace."
+  (-let* ((recv-time (current-time))
+          (client (lsp--workspace-client workspace))
+          (buffers (lsp--workspace-buffers workspace))
+          handler
+          (response (cond
+                     ((setq handler (gethash method (lsp--client-request-handlers client) nil))
+                      (funcall handler workspace params))
+                     ((setq handler (gethash method (lsp--client-async-request-handlers client) nil))
+                      (funcall handler workspace params
+                               (-partial #'lsp--send-request-response
+                                         workspace recv-time request))
+                      'delay-response)
+                     ((equal method "client/registerCapability")
+                      (mapc #'lsp--server-register-capability
+                            (lsp:registration-params-registrations params))
+                      (mapc (lambda (buf)
+                              (when (lsp-buffer-live-p buf)
+                                (lsp-with-current-buffer buf
+                                  (lsp-unconfig-buffer)
+                                  (lsp-configure-buffer))))
+                            buffers)
+                      nil)
+                     ((equal method "window/showMessageRequest")
+                      (let ((choice (lsp--window-log-message-request params)))
+                        `(:title ,choice)))
+                     ((equal method "window/showDocument")
+                      (let ((success? (lsp--window-show-document params)))
+                        (lsp-make-show-document-result :success (or success?
+                                                                    :json-false))))
+                     ((equal method "client/unregisterCapability")
+                      (mapc #'lsp--server-unregister-capability
+                            (lsp:unregistration-params-unregisterations params))
+                      (mapc (lambda (buf)
+                              (when (lsp-buffer-live-p buf)
+                                (lsp-with-current-buffer buf
+                                  (lsp-unconfig-buffer)
+                                  (lsp-configure-buffer))))
+                            buffers)
+                      nil)
+                     ((equal method "workspace/applyEdit")
+                      (list :applied (condition-case err
+                                         (prog1 t
+                                           (lsp--apply-workspace-edit (lsp:apply-workspace-edit-params-edit params) 'server-requested))
+                                       (error
+                                        (lsp--error "Failed to apply edits with message %s"
+                                                    (error-message-string err))
+                                        :json-false))))
+                     ((equal method "workspace/configuration")
+                      (with-lsp-workspace workspace
+                        (if-let* ((buf (car buffers)))
+                            (lsp-with-current-buffer buf
+                              (lsp--build-workspace-configuration-response params))
+                          (lsp--with-workspace-temp-buffer (lsp--workspace-root workspace)
+                            (lsp--build-workspace-configuration-response params)))))
+                     ((equal method "workspace/workspaceFolders")
+                      (let ((folders (or (-> workspace
+                                             (lsp--workspace-client)
+                                             (lsp--client-server-id)
+                                             (gethash (lsp-session-server-id->folders (lsp-session))))
+                                         (lsp-session-folders (lsp-session)))))
+                        (->> folders
+                             (-distinct)
+                             (-map (lambda (folder)
+                                     (list :uri (lsp--path-to-uri folder))))
+                             (apply #'vector))))
+                     ((equal method "window/workDoneProgress/create")
+                      nil ;; no specific reply, no processing required
+                      )
+                     ((equal method "workspace/semanticTokens/refresh")
+                      (when (and lsp-semantic-tokens-enable
+                                 (fboundp 'lsp--semantic-tokens-on-refresh))
+                        (lsp--semantic-tokens-on-refresh workspace))
+                      nil)
+                     ((equal method "workspace/codeLens/refresh")
+                      (when (and lsp-lens-enable
+                                 (fboundp 'lsp--lens-on-refresh))
+                        (lsp--lens-on-refresh workspace))
+                      nil)
+                     ((equal method "workspace/diagnostic/refresh")
+                      nil)
+                     (t (lsp-warn "Unknown request method: %s" method) nil))))
+    ;; Send response to the server.
+    (unless (eq response 'delay-response)
+      (lsp--send-request-response workspace recv-time request response))))
+
+(lsp-defun lsp--error-string ((&JSONError :message :code))
+  "Format ERR as a user friendly string."
+  (format "Error from the Language Server: %s (%s)"
+          message
+          (or (car (alist-get code lsp--errors)) "Unknown error")))
+
+(defun lsp--get-body-length (headers)
+  (let ((content-length (cdr (assoc "Content-Length" headers))))
+    (if content-length
+        (string-to-number content-length)
+
+      ;; This usually means either the server or our parser is
+      ;; screwed up with a previous Content-Length
+      (error "No Content-Length header"))))
+
+(defun lsp--parse-header (s)
+  "Parse string S as a LSP (KEY . VAL) header."
+  (let ((pos (string-match-p "\:" s))
+        key val)
+    (unless pos
+      (signal 'lsp-invalid-header-name (list s)))
+    (setq key (substring s 0 pos)
+          val (s-trim-left (substring s (+ 1 pos))))
+    (when (equal key "Content-Length")
+      (cl-assert (cl-loop for c across val
+                          when (or (> c ?9) (< c ?0)) return nil
+                          finally return t)
+                 nil (format "Invalid Content-Length value: %s" val)))
+    (cons key val)))
+
+(defmacro lsp--read-json (str)
+  "Read json string STR."
+  (if (progn
+        (require 'json)
+        (fboundp 'json-parse-string))
+      `(json-parse-string ,str
+                          :object-type (if lsp-use-plists
+                                           'plist
+                                         'hash-table)
+                          :null-object nil
+                          :false-object nil)
+    `(let ((json-array-type 'vector)
+           (json-object-type (if lsp-use-plists
+                                 'plist
+                               'hash-table))
+           (json-false nil))
+       (json-read-from-string ,str))))
+
+(defmacro lsp-json-read-buffer ()
+  "Read json from the current buffer."
+  (if (progn
+        (require 'json)
+        (fboundp 'json-parse-buffer))
+      `(json-parse-buffer :object-type (if lsp-use-plists
+                                           'plist
+                                         'hash-table)
+                          :null-object nil
+                          :false-object nil)
+    `(let ((json-array-type 'vector)
+           (json-object-type (if lsp-use-plists
+                                 'plist
+                               'hash-table))
+           (json-false nil))
+       (json-read))))
+
+(defun lsp--read-json-file (file-path)
+  "Read json file."
+  (-> file-path
+    (f-read-text)
+    (lsp--read-json)))
+
+(defun lsp--parser-on-message (json-data workspace)
+  "Called when the parser P read a complete MSG from the server."
+  (cl-labels ((json-get (obj key)
+                (cond
+                 ((hash-table-p obj)
+                  (gethash key obj))
+                 ((listp obj)
+                  (or (plist-get obj (intern (concat ":" key)))
+                      (plist-get obj (intern key))))
+                 (t nil))))
+    ;; Silently catch and log any errors during message processing. This prevents
+    ;; a single malformed message from crashing the entire LSP client.
+    (with-demoted-errors "Error processing message %S."
+      (with-lsp-workspace workspace
+        (let* ((client (lsp--workspace-client workspace))
+               (method (json-get json-data "method"))
+               (raw-id (json-get json-data "id"))
+               (has-method (and method t))
+               (has-id (and raw-id t))
+               (has-error (and (json-get json-data "error") t))
+               ;; Kind-First routing: if a method exists, it's a server-initiated
+               ;; message (request/notification) regardless of ID collisions.
+               (message-type (cond
+                              (has-method (if has-id 'request 'notification))
+                              (has-id (if has-error 'response-error 'response))
+                              (t 'notification)))
+               ;; Normalize response IDs only (client-generated ids are numeric).
+               (id (and (memq message-type '(response response-error))
+                        raw-id
+                        (if (stringp raw-id) (string-to-number raw-id) raw-id))))
+          (pcase message-type
+            ('response
+             (when id
+               (let ((handler (gethash id (lsp--client-response-handlers client))))
+                 (when handler
+                   (let ((callback (nth 0 handler))
+                         (cb-method (nth 2 handler))
+                         (before-send (nth 4 handler))
+                         (result (json-get json-data "result")))
+                     (when (lsp--log-io-p cb-method)
+                       (lsp--log-entry-new
+                        (lsp--make-log-entry cb-method id result 'incoming-resp
+                                             (lsp--ms-since before-send))
+                        workspace))
+                     (when callback
+                       (remhash id (lsp--client-response-handlers client))
+                       (funcall callback result)))))))
+            ('response-error
+             (when id
+               (let ((handler (gethash id (lsp--client-response-handlers client))))
+                 (when handler
+                   (let ((err-callback (nth 1 handler))
+                         (cb-method (nth 2 handler))
+                         (before-send (nth 4 handler))
+                         (err (json-get json-data "error")))
+                     (when (lsp--log-io-p cb-method)
+                       (lsp--log-entry-new
+                        (lsp--make-log-entry cb-method id err 'incoming-resp
+                                             (lsp--ms-since before-send))
+                        workspace))
+                     (when err-callback
+                       (remhash id (lsp--client-response-handlers client))
+                       (funcall err-callback err)))))))
+            ('notification
+             (lsp--on-notification workspace json-data))
+            ('request
+             (lsp--on-request workspace json-data))))))))
+
+(defun lsp--create-filter-function (workspace)
+  "Make filter for the workspace."
+  (let ((body-received 0)
+        leftovers body-length body chunk)
+    (lambda (_proc input)
+      (setf chunk (if (s-blank? leftovers)
+                      (encode-coding-string input 'utf-8-unix t)
+                    (concat leftovers (encode-coding-string input 'utf-8-unix t))))
+
+      (let (messages)
+        ;; Wrap the while-loop parsing the messages in a condition-case. If any
+        ;; error escapes the loop, log it, reset parser state for the next read,
+        ;; and fall through to the dispatch step for already-parsed messages.
+        ;; This ensures that any message parsed before the error still gets
+        ;; dispatched.
+        (condition-case parsing-err
+            (while (not (s-blank? chunk))
+              (if (not body-length)
+                  ;; Read headers
+                  (if-let* ((body-sep-pos (string-match-p "\r\n\r\n" chunk)))
+                      ;; We've got all the headers, handle them all at once:
+                      (setf body-length (lsp--get-body-length
+                                         (mapcar #'lsp--parse-header
+                                                 (split-string
+                                                  (substring-no-properties chunk
+                                                                           (or (string-match-p "Content-Length" chunk)
+                                                                               (error "Unable to find Content-Length header."))
+                                                                           body-sep-pos)
+                                                  "\r\n")))
+                            body-received 0
+                            leftovers nil
+                            chunk (substring-no-properties chunk (+ body-sep-pos 4)))
+
+                    ;; Haven't found the end of the headers yet. Save everything
+                    ;; for when the next chunk arrives and await further input.
+                    (setf leftovers chunk
+                          chunk nil))
+                (let* ((chunk-length (string-bytes chunk))
+                       (left-to-receive (- body-length body-received))
+                       (this-body (if (< left-to-receive chunk-length)
+                                      (prog1 (substring-no-properties chunk 0 left-to-receive)
+                                        (setf chunk (substring-no-properties chunk left-to-receive)))
+                                    (prog1 chunk
+                                      (setf chunk nil))))
+                       (body-bytes (string-bytes this-body)))
+                  (push this-body body)
+                  (setf body-received (+ body-received body-bytes))
+                  (when (>= chunk-length left-to-receive)
+                    (condition-case err
+                        (with-temp-buffer
+                          (apply #'insert
+                                 (nreverse
+                                  (prog1 body
+                                    (setf leftovers nil
+                                          body-length nil
+                                          body-received nil
+                                          body nil))))
+                          (decode-coding-region (point-min)
+                                                (point-max)
+                                                'utf-8)
+                          (goto-char (point-min))
+                          (push (lsp-json-read-buffer) messages))
+
+                      (error
+                       (lsp-warn "Failed to parse the following chunk:\n'''\n%s\n'''\nwith message %s"
+                                 (concat leftovers input)
+                                 err)))))))
+          (error
+           ;; Parsing error interrupted the loop, e.g., caused by a wrong
+           ;; framing of the LSP message (e.g. mid-body bytes mistaken for
+           ;; headers). Reset parser state and fall through so that
+           ;; already-parsed messages still reach the dispatcher instead of
+           ;; being silently discarded.
+           (lsp-warn "LSP message framing error when filtering messages; salvaged %d parsed message(s): %S"
+                     (length messages) parsing-err)
+           (setf leftovers nil
+                 body-length nil
+                 body-received 0
+                 body nil)))
+        ;; Per-message dispatch: catch known throw tags ('lsp-done or 'input) so
+        ;; that a non-local exit from the handler of one message doesn't cause
+        ;; the rest of the batch to be abandoned. The throw is re-issued after
+        ;; all messages have been dispatched, so the original target catch (e.g.
+        ;; (catch 'lsp-done ...) in `lsp-request-while-no-input' or (lsp--catch
+        ;; 'input ...) in lsp-completion.el) still receives it.
+        (let ((no-throw
+               ;; Allocate a unique fresh object to signal that the handler
+               ;; returned normally (i.e., no non-local exit). Allocated using
+               ;; `cons' so `eq' reliably distinguishes it from any value throw
+               ;; could carry.
+               (cons nil nil))
+              queued-tag queued-value)
+          (dolist (msg (nreverse messages))
+            (let ((r (catch 'lsp-done
+                       (let ((r2 (catch 'input
+                                   (lsp--parser-on-message msg workspace)
+                                   no-throw)))
+                         (unless (eq r2 no-throw)
+                           ;; If 'input was thrown, stash the tag and
+                           ;; value for later re-throwing.
+                           (setq queued-tag 'input queued-value r2))
+                         ;; Yield the marker, so the outer (catch 'lsp-done ...)
+                         ;; returns no-throw whenever 'lsp-done was not thrown
+                         ;; (regardless of whether or not 'input was thrown and
+                         ;; caught above).
+                         no-throw))))
+              (unless (eq r no-throw)
+                ;; If 'lsp-done was thrown, stash the tag and value for later
+                ;; later re-throwing.
+                (setq queued-tag 'lsp-done queued-value r))))
+          ;; When we reach this point, we have safely processed all messages and
+          ;; stashed any possible non-local exit tag and associated value in
+          ;; 'queued-tag.
+          (when queued-tag
+            ;; Re-throw the non-local exit that was caught while processing
+            ;; the messages.
+            (throw queued-tag queued-value)))))))
+
+(defvar-local lsp--line-col-to-point-hash-table nil
+  "Hash table with keys (line . col) and values that are either point positions
+or markers.")
+
+(defcustom lsp-imenu-detailed-outline t
+  "Whether `lsp-imenu' should include signatures.
+This will be ignored if the server doesn't provide the necessary
+information, for example if it doesn't support DocumentSymbols."
+  :group 'lsp-imenu
+  :type 'boolean)
+
+(defcustom lsp-imenu-hide-parent-details t
+  "Whether `lsp-imenu' should hide signatures of parent nodes."
+  :group 'lsp-imenu
+  :type 'boolean)
+
+(defface lsp-details-face '((t :height 0.8 :inherit shadow))
+  "Used to display additional information throughout `lsp'.
+Things like line numbers, signatures, ... are considered
+additional information. Often, additional faces are defined that
+inherit from this face by default, like `lsp-signature-face', and
+they may be customized for finer control."
+  :group 'lsp-mode)
+
+(defface lsp-signature-face '((t :inherit lsp-details-face))
+  "Used to display signatures in `imenu', ...."
+  :group 'lsp-mode)
+
+(lsp-defun lsp-render-symbol ((&DocumentSymbol :name :detail? :deprecated?)
+                              show-detail?)
+  "Render INPUT0, an `&DocumentSymbol', to a string.
+If SHOW-DETAIL? is set, make use of its `:detail?' field (often
+the signature)."
+  (let ((detail (and show-detail? (s-present? detail?)
+                     (propertize (concat " " (s-trim-left detail?))
+                                 'face 'lsp-signature-face)))
+        (name (if deprecated?
+                  (propertize name 'face 'lsp-face-semhl-deprecated) name)))
+    (concat name detail)))
+
+(lsp-defun lsp-render-symbol-information ((&SymbolInformation :name :deprecated? :container-name?)
+                                          separator)
+  "Render a piece of SymbolInformation.
+Handle :deprecated?. If SEPARATOR is non-nil, the
+symbol's (optional) parent, SEPARATOR and the symbol itself are
+concatenated."
+  (when (and separator container-name? (not (string-empty-p container-name?)))
+    (setq name (concat name separator container-name?)))
+  (if deprecated? (propertize name 'face 'lsp-face-semhl-deprecated) name))
+
+(defun lsp--symbol-to-imenu-elem (sym)
+  "Convert SYM to imenu element.
+
+SYM is a SymbolInformation message.
+
+Return a cons cell (full-name . start-point)."
+  (let ((start-point (ht-get lsp--line-col-to-point-hash-table
+                             (lsp--get-line-and-col sym))))
+    (cons (lsp-render-symbol-information
+           sym (and lsp-imenu-show-container-name
+                    lsp-imenu-container-name-separator))
+          start-point)))
+
+(lsp-defun lsp--symbol-to-hierarchical-imenu-elem ((sym &as &DocumentSymbol :children?))
+  "Convert SYM to hierarchical imenu elements.
+
+SYM is a DocumentSymbol message.
+
+Return cons cell (\"symbol-name (symbol-kind)\" . start-point) if
+SYM doesn't have any children. Otherwise return a cons cell with
+an alist
+
+  (\"symbol-name\" . ((\"(symbol-kind)\" . start-point)
+                    cons-cells-from-children))"
+  (let ((filtered-children (lsp--imenu-filter-symbols children?))
+        (signature (lsp-render-symbol sym lsp-imenu-detailed-outline)))
+    (if (seq-empty-p filtered-children)
+        (cons signature
+              (ht-get lsp--line-col-to-point-hash-table
+                      (lsp--get-line-and-col sym)))
+      (cons signature
+            (lsp--imenu-create-hierarchical-index filtered-children)))))
+
+(lsp-defun lsp--symbol-ignore ((&SymbolInformation :kind))
+  "Determine if SYM is for the current document and is to be shown."
+  ;; It's a SymbolInformation or DocumentSymbol, which is always in the
+  ;; current buffer file.
+  (and lsp-imenu-index-symbol-kinds
+       (numberp kind)
+       (let ((clamped-kind (if (< 0 kind (length lsp/symbol-kind-lookup))
+                               kind
+                             0)))
+         (not (memql (aref lsp/symbol-kind-lookup clamped-kind)
+                     lsp-imenu-index-symbol-kinds)))))
+
+(lsp-defun lsp--get-symbol-type ((&SymbolInformation :kind))
+  "The string name of the kind of SYM."
+  (alist-get kind lsp-symbol-kinds "Other"))
+
+(defun lsp--get-line-and-col (sym)
+  "Obtain the line and column corresponding to SYM."
+  (-let* ((location (lsp:symbol-information-location sym))
+          (name-range (or (and location (lsp:location-range location))
+                          (lsp:document-symbol-selection-range sym)))
+          ((&Range :start (&Position :line :character)) name-range))
+    (cons line character)))
+
+(defun lsp--collect-lines-and-cols (symbols)
+  "Return a sorted list ((line . col) ...) of the locations of SYMBOLS."
+  (let ((stack (mapcar 'identity symbols))
+        line-col-list)
+    (while stack
+      (let ((sym (pop stack)))
+        (push (lsp--get-line-and-col sym) line-col-list)
+        (unless (seq-empty-p (lsp:document-symbol-children? sym))
+          (setf stack (nconc (lsp--imenu-filter-symbols (lsp:document-symbol-children? sym)) stack)))))
+    (-sort #'lsp--line-col-comparator line-col-list)))
+
+(defun lsp--convert-line-col-to-points-batch (line-col-list)
+  "Convert a sorted list of positions from line-column
+representation to point representation."
+  (let ((line-col-to-point-map (ht-create))
+        (inhibit-field-text-motion t)
+        (curr-line 0))
+    (lsp-save-restriction-and-excursion
+      (goto-char (point-min))
+      (cl-loop for (line . col) in line-col-list do
+               (forward-line (- line curr-line))
+               (setq curr-line line)
+               (let ((line-end (line-end-position)))
+                 (if (or (not col) (> col (- line-end (point))))
+                     (goto-char line-end)
+                   (forward-char col)))
+               (ht-set! line-col-to-point-map (cons line col) (if imenu-use-markers
+                                                                  (point-marker)
+                                                                (point)))))
+    line-col-to-point-map))
+
+(cl-defun lsp--line-col-comparator ((l1 . c1) (l2 . c2))
+  (or (< l1 l2)
+      (and (= l1 l2)
+           (cond ((and c1 c2)
+                  (< c1 c2))
+                 (c1 t)))))
+
+(defun lsp-imenu-create-uncategorized-index (symbols)
+  "Create imenu index from document SYMBOLS.
+This function, unlike `lsp-imenu-create-categorized-index', does
+not categorize by type, but instead returns an `imenu' index
+corresponding to the symbol hierarchy returned by the server
+directly."
+  (let* ((lsp--line-col-to-point-hash-table (-> symbols
+                                                lsp--collect-lines-and-cols
+                                                lsp--convert-line-col-to-points-batch)))
+    (if (lsp--imenu-hierarchical-p symbols)
+        (lsp--imenu-create-hierarchical-index symbols)
+      (lsp--imenu-create-non-hierarchical-index symbols))))
+
+(defcustom lsp-imenu-symbol-kinds
+  '((1 . "Files")
+    (2 . "Modules")
+    (3 . "Namespaces")
+    (4 . "Packages")
+    (5 . "Classes")
+    (6 . "Methods")
+    (7 . "Properties")
+    (8 . "Fields")
+    (9 . "Constructors")
+    (10 . "Enums")
+    (11 . "Interfaces")
+    (12 . "Functions")
+    (13 . "Variables")
+    (14 . "Constants")
+    (15 . "Strings")
+    (16 . "Numbers")
+    (17 . "Booleans")
+    (18 . "Arrays")
+    (19 . "Objects")
+    (20 . "Keys")
+    (21 . "Nulls")
+    (22 . "Enum Members")
+    (23 . "Structs")
+    (24 . "Events")
+    (25 . "Operators")
+    (26 . "Type Parameters"))
+  "`lsp-symbol-kinds', but only used by `imenu'.
+A new variable is needed, as it is `imenu' convention to use
+pluralized categories, which `lsp-symbol-kinds' doesn't. If the
+non-pluralized names are preferred, this can be set to
+`lsp-symbol-kinds'."
+  :type '(alist :key-type integer :value-type string))
+
+(defun lsp--imenu-kind->name (kind)
+  (alist-get kind lsp-imenu-symbol-kinds "?"))
+
+(defun lsp-imenu-create-top-level-categorized-index (symbols)
+  "Create an `imenu' index categorizing SYMBOLS by type.
+Only root symbols are categorized.
+
+See `lsp-symbol-kinds' to customize the category naming. SYMBOLS
+shall be a list of DocumentSymbols or SymbolInformation."
+  (mapcan
+   (-lambda ((type . symbols))
+     (let ((cat (lsp--imenu-kind->name type))
+           (symbols (lsp-imenu-create-uncategorized-index symbols)))
+       ;; If there is no :kind (this is being defensive), or we couldn't look it
+       ;; up, just display the symbols inline, without categories.
+       (if cat (list (cons cat symbols)) symbols)))
+   (sort (seq-group-by #'lsp:document-symbol-kind symbols)
+         (-lambda ((kinda) (kindb)) (< kinda kindb)))))
+
+(lsp-defun lsp--symbol->imenu ((sym &as &DocumentSymbol :selection-range (&RangeToPoint :start)))
+  "Convert an `&DocumentSymbol' to an `imenu' entry."
+  (cons (lsp-render-symbol sym lsp-imenu-detailed-outline) start))
+
+(defun lsp--imenu-create-categorized-index-1 (symbols)
+  "Returns an `imenu' index from SYMBOLS categorized by type.
+The result looks like this: ((\"Variables\" . (...)))."
+  (->>
+   symbols
+   (mapcan
+    (-lambda ((sym &as &DocumentSymbol :kind :children?))
+      (if (seq-empty-p children?)
+          (list (list kind (lsp--symbol->imenu sym)))
+        (let ((parent (lsp-render-symbol sym (and lsp-imenu-detailed-outline
+                                                  (not lsp-imenu-hide-parent-details)))))
+          (cons
+           (list kind (lsp--symbol->imenu sym))
+           (mapcar (-lambda ((type .  imenu-items))
+                     (list type (cons parent (mapcan #'cdr imenu-items))))
+                   (-group-by #'car (lsp--imenu-create-categorized-index-1 children?))))))))
+   (-group-by #'car)
+   (mapcar
+    (-lambda ((kind . syms))
+      (cons kind (mapcan #'cdr syms))))))
+
+(defun lsp--imenu-create-categorized-index (symbols)
+  (let ((syms (lsp--imenu-create-categorized-index-1 symbols)))
+    (dolist (sym syms)
+      (setcar sym (lsp--imenu-kind->name (car sym))))
+    syms))
+
+(lsp-defun lsp--symbol-information->imenu ((sym &as &SymbolInformation :location (&Location :range (&RangeToPoint :start))))
+  (cons (lsp-render-symbol-information sym nil) start))
+
+(defun lsp--imenu-create-categorized-index-flat (symbols)
+  "Create a kind-categorized index for SymbolInformation."
+  (mapcar (-lambda ((kind . syms))
+            (cons (lsp--imenu-kind->name kind)
+                  (mapcan (-lambda ((parent . children))
+                            (let ((children (mapcar #'lsp--symbol-information->imenu children)))
+                              (if parent (list (cons parent children)) children)))
+                          (-group-by #'lsp:symbol-information-container-name? syms))))
+          (seq-group-by #'lsp:symbol-information-kind symbols)))
+
+(defun lsp-imenu-create-categorized-index (symbols)
+  (if (lsp--imenu-hierarchical-p symbols)
+      (lsp--imenu-create-categorized-index symbols)
+    (lsp--imenu-create-categorized-index-flat symbols)))
+
+(defcustom lsp-imenu-index-function #'lsp-imenu-create-uncategorized-index
+  "Function that should create an `imenu' index.
+It will be called with a list of SymbolInformation or
+DocumentSymbols, whose first level is already filtered. It shall
+then return an appropriate `imenu' index (see
+`imenu-create-index-function').
+
+Note that this interface is not stable, and subject to change any
+time."
+  :group 'lsp-imenu
+  :type '(radio
+          (const :tag "Categorize by type"
+                 lsp-imenu-create-categorized-index)
+          (const :tag "Categorize root symbols by type"
+                 lsp-imenu-create-top-level-categorized-index)
+          (const :tag "Uncategorized, inline entries"
+                 lsp-imenu-create-uncategorized-index)
+          (function :tag "Custom function")))
+
+(defun lsp--imenu-create-index ()
+  "Create an `imenu' index based on the language server.
+Respects `lsp-imenu-index-function'."
+  (let ((symbols (lsp--imenu-filter-symbols (lsp--get-document-symbols))))
+    (funcall lsp-imenu-index-function symbols)))
+
+(defun lsp--imenu-filter-symbols (symbols)
+  "Filter out unsupported symbols from SYMBOLS."
+  (seq-remove #'lsp--symbol-ignore symbols))
+
+(defun lsp--imenu-hierarchical-p (symbols)
+  "Determine whether any element in SYMBOLS has children."
+  (seq-some #'lsp-document-symbol? symbols))
+
+(defun lsp--imenu-create-non-hierarchical-index (symbols)
+  "Create imenu index for non-hierarchical SYMBOLS.
+
+SYMBOLS are a list of DocumentSymbol messages.
+
+Return a nested alist keyed by symbol names. e.g.
+
+   ((\"SomeClass\" (\"(Class)\" . 10)
+                 (\"someField (Field)\" . 20)
+                 (\"someFunction (Function)\" . 25)
+                 (\"SomeSubClass\" (\"(Class)\" . 30)
+                                  (\"someSubField (Field)\" . 35))
+    (\"someFunction (Function)\" . 40))"
+  (seq-map (lambda (nested-alist)
+             (cons (car nested-alist)
+                   (seq-map #'lsp--symbol-to-imenu-elem (cdr nested-alist))))
+           (seq-group-by #'lsp--get-symbol-type symbols)))
+
+(defun lsp--imenu-create-hierarchical-index (symbols)
+  "Create imenu index for hierarchical SYMBOLS.
+
+SYMBOLS are a list of DocumentSymbol messages.
+
+Return a nested alist keyed by symbol names. e.g.
+
+   ((\"SomeClass\" (\"(Class)\" . 10)
+                 (\"someField (Field)\" . 20)
+                 (\"someFunction (Function)\" . 25)
+                 (\"SomeSubClass\" (\"(Class)\" . 30)
+                                  (\"someSubField (Field)\" . 35))
+    (\"someFunction (Function)\" . 40))"
+  (seq-map #'lsp--symbol-to-hierarchical-imenu-elem
+           (seq-sort #'lsp--imenu-symbol-lessp symbols)))
+
+(defun lsp--imenu-symbol-lessp (sym1 sym2)
+  (let* ((compare-results (mapcar (lambda (method)
+                                    (funcall (alist-get method lsp--imenu-compare-function-alist)
+                                             sym1 sym2))
+                                  lsp-imenu-sort-methods))
+         (result (seq-find (lambda (result)
+                             (not (= result 0)))
+                           compare-results
+                           0)))
+    (and (numberp result) (< result 0))))
+
+(lsp-defun lsp--imenu-compare-kind ((&SymbolInformation :kind left)
+                                    (&SymbolInformation :kind right))
+  "Compare SYM1 and SYM2 by kind."
+  (- left right))
+
+(defun lsp--imenu-compare-line-col (sym1 sym2)
+  (if (lsp--line-col-comparator
+       (lsp--get-line-and-col sym1)
+       (lsp--get-line-and-col sym2))
+      -1
+    1))
+
+(lsp-defun lsp--imenu-compare-name ((&SymbolInformation :name name1)
+                                    (&SymbolInformation :name name2))
+  "Compare SYM1 and SYM2 by name."
+  (let ((result (compare-strings name1 0 (length name1) name2 0 (length name2))))
+    (if (numberp result) result 0)))
+
+(defun lsp--imenu-refresh ()
+  "Force Imenu to refresh itself."
+  (imenu--menubar-select imenu--rescan-item))
+
+(defun lsp-enable-imenu ()
+  "Use lsp-imenu for the current buffer."
+  (imenu--cleanup)
+  (add-function :override (local 'imenu-create-index-function) #'lsp--imenu-create-index)
+  (setq-local imenu-menubar-modified-tick -1)
+  (setq-local imenu--index-alist nil)
+  (when menu-bar-mode
+    (lsp--imenu-refresh)))
+
+(defun lsp-resolve-final-command (command &optional test?)
+  "Resolve final function COMMAND."
+  (let* ((command (lsp-resolve-value command))
+         ;; Filter out nil values before validation (issue #4099)
+         (command (if (listp command) (delq nil command) command))
+         (command (cl-etypecase command
+                    (list
+                     (cl-assert (seq-every-p (apply-partially #'stringp) command) nil
+                                "Invalid command list")
+                     command)
+                    (string (list command)))))
+    (if (and (file-remote-p default-directory) (not test?))
+        (list shell-file-name "-c"
+              (string-join (cons "stty raw > /dev/null;"
+                                 (mapcar #'shell-quote-argument command))
+                           " "))
+      command)))
+
+(defun lsp-server-present? (final-command)
+  "Check whether FINAL-COMMAND is present."
+  (let ((binary-found? (executable-find (cl-first final-command) t)))
+    (if binary-found?
+        (lsp-log "Command \"%s\" is present on the path." (s-join " " final-command))
+      (lsp-log "Command \"%s\" is not present on the path." (s-join " " final-command)))
+    binary-found?))
+
+(defun lsp--value-to-string (value)
+  "Convert VALUE to a string that can be set as value in an environment
+variable."
+  (cond
+   ((stringp value) value)
+   ((booleanp value) (if value
+                         "1"
+                       "0"))
+   ((and (sequencep value)
+         (seq-every-p #'stringp value)) (string-join value ":"))
+   (t (user-error "Only strings, booleans, and sequences of strings are supported as environment variables"))))
+
+(defun lsp--compute-process-environment (environment-fn)
+  "Append a list of KEY=VALUE from the alist ENVIRONMENT to `process-environment'.
+Ignore non-boolean keys whose value is nil."
+  (let ((environment (if environment-fn
+                         (funcall environment-fn)
+                       nil)))
+    (-flatten (cons (cl-loop for (key . value) in environment
+                             if (or (eval value)
+                                    (eq (get value 'custom-type) 'boolean))
+                             collect (concat key "=" (lsp--value-to-string
+                                                      (eval value))))
+                    process-environment))))
+
+(defun lsp--default-directory-for-connection (&optional path)
+  "Return path to be used for the working directory of a LSP process.
+
+If `lsp-use-workspace-root-for-server-default-directory' is
+non-nil, uses `lsp-workspace-root' to find the directory
+corresponding to PATH, else returns `default-directory'."
+  (if lsp-use-workspace-root-for-server-default-directory
+      (lsp-workspace-root path)
+    default-directory))
+
+(defun lsp--fix-remote-cmd (program)
+  "Helper for `lsp-stdio-connection'.
+Originally copied from eglot."
+
+  (if (file-remote-p default-directory)
+      (list shell-file-name "-c"
+            (string-join (cons "stty raw > /dev/null;"
+                               (mapcar #'shell-quote-argument program))
+                         " "))
+    program))
+
+(defvar tramp-use-ssh-controlmaster-options)
+(defvar tramp-ssh-controlmaster-options)
+
+(defun lsp-stdio-connection (command &optional test-command)
+  "Returns a connection property list using COMMAND.
+COMMAND can be: A string, denoting the command to launch the
+language server. A list of strings, denoting an executable with
+its command line arguments. A function, that either returns a
+string or a list of strings. In all cases, the launched language
+server should send and receive messages on standard I/O.
+TEST-COMMAND is a function with no arguments which returns
+whether the command is present or not. When not specified
+`lsp-mode' will check whether the first element of the list
+returned by COMMAND is available via `executable-find'"
+  (cl-check-type command (or string
+                             function
+                             (and list
+                                  (satisfies (lambda (l)
+                                               (seq-every-p (lambda (el)
+                                                              (stringp el))
+                                                            l))))))
+  (list :connect (lambda (filter sentinel name environment-fn workspace)
+                   (if (and (functionp 'json-rpc-connection)
+                            (not (file-remote-p default-directory)))
+                       (lsp-json-rpc-connection workspace (lsp-resolve-final-command command))
+                     (let ((final-command (lsp-resolve-final-command command))
+                           (process-name (generate-new-buffer-name name))
+                           (process-environment
+                            (lsp--compute-process-environment environment-fn)))
+                       (let* ((stderr-buf (get-buffer-create (format "*%s::stderr*" process-name)))
+                              (default-directory (lsp--default-directory-for-connection))
+                              (tramp-use-ssh-controlmaster-options 'suppress)
+                              (tramp-ssh-controlmaster-options "-o ControlMaster=no -o ControlPath=none")
+                              (proc (make-process
+                                     :name process-name
+                                     :connection-type 'pipe
+                                     :buffer (format "*%s*" process-name)
+                                     :coding 'no-conversion
+                                     :command final-command
+                                     :filter filter
+                                     :sentinel sentinel
+                                     :stderr stderr-buf
+                                     :noquery t
+                                     :file-handler t)))
+                         (set-process-query-on-exit-flag proc nil)
+                         (set-process-query-on-exit-flag (get-buffer-process stderr-buf) nil)
+                         (with-current-buffer (get-buffer stderr-buf)
+                           ;; Make the *NAME::stderr* buffer buffer-read-only, q to bury, etc.
+                           (special-mode))
+                         (cons proc proc)))))
+        :test? (or
+                test-command
+                (lambda ()
+                  (lsp-server-present? (lsp-resolve-final-command command t))))))
+
+(defun lsp--open-network-stream (host port name)
+  "Open network stream to HOST:PORT.
+  NAME will be passed to `open-network-stream'.
+  RETRY-COUNT is the number of the retries.
+  SLEEP-INTERVAL is the sleep interval between each retry."
+  (let* ((retries 0)
+         (sleep-interval 0.01)
+         (number-of-retries (/ lsp-tcp-connection-timeout sleep-interval))
+         connection)
+    (while (and (not connection) (< retries number-of-retries))
+      (condition-case err
+          (setq connection (open-network-stream name nil host port
+                                                :type 'plain
+                                                :coding 'no-conversion))
+        (file-error
+         (let ((inhibit-message t))
+           (lsp--warn "Failed to connect to %s:%s with error message %s"
+                      host
+                      port
+                      (error-message-string err))
+           (sleep-for sleep-interval)
+           (cl-incf retries)))))
+    (or connection (error "Port %s was never taken. Consider increasing `lsp-tcp-connection-timeout'." port))))
+
+(defun lsp--port-available (host port)
+  "Return non-nil if HOST and PORT are available."
+  (condition-case _err
+      (delete-process (open-network-stream "*connection-test*" nil host port :type 'plain))
+    (file-error t)))
+
+(defun lsp--find-available-port (host starting-port)
+  "Find available port on HOST starting from STARTING-PORT."
+  (let ((port starting-port))
+    (while (not (lsp--port-available host port))
+      (cl-incf port))
+    port))
+
+(defun lsp-tcp-connection (command-fn)
+  "Returns a connection property list similar to `lsp-stdio-connection'.
+COMMAND-FN can only be a function that takes a single argument, a
+port number. It should return a command for launches a language server
+process listening for TCP connections on the provided port."
+  (cl-check-type command-fn function)
+  (list
+   :connect (lambda (filter sentinel name environment-fn _workspace)
+              (let* ((host "localhost")
+                     (port (lsp--find-available-port host (cl-incf lsp--tcp-port)))
+                     (command (funcall command-fn port))
+                     (final-command (if (consp command) command (list command)))
+                     (_ (unless (lsp-server-present? final-command)
+                          (user-error (format "Couldn't find executable %s" (cl-first final-command)))))
+                     (process-environment
+                      (lsp--compute-process-environment environment-fn))
+                     (proc (make-process :name name :connection-type 'pipe :coding 'no-conversion
+                                         :command final-command :sentinel sentinel :stderr (format "*%s::stderr*" name) :noquery t))
+                     (tcp-proc (lsp--open-network-stream host port (concat name "::tcp"))))
+
+                ;; TODO: Same :noquery issue (see above)
+                (set-process-query-on-exit-flag proc nil)
+                (set-process-query-on-exit-flag tcp-proc nil)
+                (set-process-filter tcp-proc filter)
+                (cons tcp-proc proc)))
+   :test? (lambda () (lsp-server-present? (funcall command-fn 0)))))
+
+(defalias 'lsp-tcp-server 'lsp-tcp-server-command)
+
+(defun lsp-tcp-server-command (command-fn)
+  "Create tcp server connection.
+In this mode Emacs is TCP server and the language server connects
+to it. COMMAND is function with one parameter(the port) and it
+should return the command to start the LS server."
+  (cl-check-type command-fn function)
+  (list
+   :connect (lambda (filter sentinel name environment-fn _workspace)
+              (let* (tcp-client-connection
+                     (tcp-server (make-network-process :name (format "*tcp-server-%s*" name)
+                                                       :buffer (format "*tcp-server-%s*" name)
+                                                       :family 'ipv4
+                                                       :service lsp--tcp-server-port
+                                                       :sentinel (lambda (proc _string)
+                                                                   (lsp-log "Language server %s is connected." name)
+                                                                   (setf tcp-client-connection proc))
+                                                       :server 't))
+                     (port (process-contact tcp-server :service))
+                     (final-command (funcall command-fn port))
+                     (process-environment
+                      (lsp--compute-process-environment environment-fn))
+                     (cmd-proc (make-process :name name
+                                             :connection-type 'pipe
+                                             :coding 'no-conversion
+                                             :command final-command
+                                             :stderr (format "*tcp-server-%s*::stderr" name)
+                                             :noquery t)))
+                (let ((retries 0))
+                  ;; wait for the client to connect (we sit-for 500 ms, so have to double lsp--tcp-server-wait-seconds)
+                  (while (and (not tcp-client-connection) (< retries (* 2 lsp--tcp-server-wait-seconds)))
+                    (lsp--info "Waiting for connection for %s, retries: %s" name retries)
+                    (sit-for 0.500)
+                    (cl-incf retries)))
+
+                (unless tcp-client-connection
+                  (condition-case nil (delete-process tcp-server) (error))
+                  (condition-case nil (delete-process cmd-proc) (error))
+                  (error "Failed to create connection to %s on port %s" name port))
+                (lsp--info "Successfully connected to %s" name)
+
+                (set-process-query-on-exit-flag cmd-proc nil)
+                (set-process-query-on-exit-flag tcp-client-connection nil)
+                (set-process-query-on-exit-flag tcp-server nil)
+
+                (set-process-filter tcp-client-connection filter)
+                (set-process-sentinel tcp-client-connection sentinel)
+                (cons tcp-client-connection cmd-proc)))
+   :test? (lambda () (lsp-server-present? (funcall command-fn 0)))))
+
+(defalias 'lsp-tramp-connection 'lsp-stdio-connection)
+
+(defun lsp--auto-configure ()
+  "Autoconfigure `company', `flycheck', `lsp-ui', etc if they are installed."
+  (when (functionp 'lsp-ui-mode)
+    (lsp-ui-mode))
+
+  (if lsp-headerline-breadcrumb-enable
+      (add-hook 'lsp-configure-hook 'lsp-headerline-breadcrumb-mode)
+    (remove-hook 'lsp-configure-hook 'lsp-headerline-breadcrumb-mode))
+  (if lsp-modeline-code-actions-enable
+      (add-hook 'lsp-configure-hook 'lsp-modeline-code-actions-mode)
+    (remove-hook 'lsp-configure-hook 'lsp-modeline-code-actions-mode))
+  (if lsp-modeline-diagnostics-enable
+      (add-hook 'lsp-configure-hook 'lsp-modeline-diagnostics-mode)
+    (remove-hook 'lsp-configure-hook 'lsp-modeline-diagnostics-mode))
+  (if lsp-modeline-workspace-status-enable
+      (add-hook 'lsp-configure-hook 'lsp-modeline-workspace-status-mode)
+    (remove-hook 'lsp-configure-hook 'lsp-modeline-workspace-status-mode))
+  (if lsp-lens-enable
+      (add-hook 'lsp-configure-hook 'lsp-lens--enable)
+    (remove-hook 'lsp-configure-hook 'lsp-lens--enable))
+  (if lsp-semantic-tokens-enable
+      (add-hook 'lsp-configure-hook 'lsp-semantic-tokens--enable)
+    (remove-hook 'lsp-configure-hook 'lsp-semantic-tokens--enable))
+
+  ;; yas-snippet config
+  (setq-local yas-inhibit-overlay-modification-protection t))
+
+(defun lsp--restart-if-needed (workspace)
+  "Handler restart for WORKSPACE."
+  (when (or (eq lsp-restart 'auto-restart)
+            (eq (lsp--workspace-shutdown-action workspace) 'restart)
+            (and (eq lsp-restart 'interactive)
+                 (let ((query (format
+                               "Server %s exited (check corresponding stderr buffer for details). Do you want to restart it?"
+                               (lsp--workspace-print workspace))))
+                   (y-or-n-p query))))
+    (--each (lsp--workspace-buffers workspace)
+      (when (lsp-buffer-live-p it)
+        (lsp-with-current-buffer it
+          (if lsp--buffer-deferred
+              (lsp-deferred)
+            (lsp--info "Restarting LSP in buffer %s" (buffer-name))
+            (lsp)))))))
+
+(defun lsp--update-key (table key fn)
+  "Apply FN on value corresponding to KEY in TABLE."
+  (let ((existing-value (gethash key table)))
+    (if-let* ((new-value (funcall fn existing-value)))
+        (puthash key new-value table)
+      (remhash key table))))
+
+(defun lsp--process-sentinel (workspace process exit-str)
+  "Create the sentinel for WORKSPACE."
+  (unless (process-live-p process)
+    (lsp--handle-process-exit workspace exit-str)))
+
+(defun lsp--handle-process-exit (workspace exit-str)
+  (let* ((folder->workspaces (lsp-session-folder->servers (lsp-session)))
+         (proc (lsp--workspace-proc workspace)))
+    (lsp--warn "%s has exited (%s)"
+               (lsp-process-name proc)
+               (string-trim-right (or exit-str "")))
+    (with-lsp-workspace workspace
+      ;; Clean workspace related data in each of the buffers
+      ;; in the workspace.
+      (--each (lsp--workspace-buffers workspace)
+        (when (lsp-buffer-live-p it)
+          (lsp-with-current-buffer it
+            (setq lsp--buffer-workspaces (delete workspace lsp--buffer-workspaces))
+            (lsp--uninitialize-workspace)
+            (lsp--spinner-stop)
+            (lsp--remove-overlays 'lsp-highlight))))
+
+      ;; Cleanup session from references to the closed workspace.
+      (--each (hash-table-keys folder->workspaces)
+        (lsp--update-key folder->workspaces it (apply-partially 'delete workspace)))
+
+      (lsp-process-cleanup proc))
+
+    (run-hook-with-args 'lsp-after-uninitialized-functions workspace)
+
+    (if (eq (lsp--workspace-shutdown-action workspace) 'shutdown)
+        (lsp--info "Workspace %s shutdown." (lsp--workspace-print workspace))
+      (lsp--restart-if-needed workspace))
+    (lsp--cleanup-hanging-watches)))
+
+(defun lsp-workspace-folders (workspace)
+  "Return all folders associated with WORKSPACE."
+  (let (result)
+    (->> (lsp-session)
+         (lsp-session-folder->servers)
+         (maphash (lambda (folder workspaces)
+                    (when (-contains? workspaces workspace)
+                      (push folder result)))))
+    result))
+
+(defun lsp--start-workspace (session client-template root &optional initialization-options)
+  "Create new workspace for CLIENT-TEMPLATE with project root ROOT.
+INITIALIZATION-OPTIONS are passed to initialize function.
+SESSION is the active session."
+  (lsp--spinner-start)
+  (-let* ((default-directory root)
+          (client (copy-lsp--client client-template))
+          (workspace (make-lsp--workspace
+                      :root root
+                      :client client
+                      :status 'starting
+                      :buffers (list (lsp-current-buffer))
+                      :host-root (file-remote-p root)))
+          ((&lsp-cln 'server-id 'environment-fn 'new-connection 'custom-capabilities
+                     'initialized-fn) client)
+          ((proc . cmd-proc) (funcall
+                              (or (plist-get new-connection :connect)
+                                  (user-error "Client %s is configured incorrectly" client))
+                              (lsp--create-filter-function workspace)
+                              (apply-partially #'lsp--process-sentinel workspace)
+                              (format "%s" server-id)
+                              environment-fn
+                              workspace))
+          (workspace-folders (gethash server-id (lsp-session-server-id->folders session))))
+    (setf (lsp--workspace-proc workspace) proc
+          (lsp--workspace-cmd-proc workspace) cmd-proc)
+
+    ;; update (lsp-session-folder->servers) depending on whether we are starting
+    ;; multi/single folder workspace
+    (mapc (lambda (project-root)
+            (->> session
+                 (lsp-session-folder->servers)
+                 (gethash project-root)
+                 (cl-pushnew workspace)))
+          (or workspace-folders (list root)))
+
+    (with-lsp-workspace workspace
+      (run-hooks 'lsp-before-initialize-hook)
+      (lsp-request-async
+       "initialize"
+       (append
+        (list :processId (unless (file-remote-p (or (buffer-file-name)
+                                                    default-directory))
+                           (emacs-pid))
+              :rootPath (lsp-file-local-name (expand-file-name root))
+              :clientInfo (list :name "emacs"
+                                :version (emacs-version))
+              :rootUri (lsp--path-to-uri root)
+              :capabilities (lsp--client-capabilities custom-capabilities)
+              :initializationOptions initialization-options
+              :workDoneToken "1")
+        (when lsp-server-trace
+          (list :trace lsp-server-trace))
+        (->> (or workspace-folders (list root))
+               (-distinct)
+               (-map (lambda (folder)
+                       (list :uri (lsp--path-to-uri folder)
+                             :name (f-filename folder))))
+               (apply 'vector)
+               (list :workspaceFolders)))
+       (-lambda ((&InitializeResult :capabilities))
+         (pcase server-id
+           ;; we know that Rust Analyzer will send {} which will be parsed as null
+           ;; when using plists
+           ('rust-analyzer
+            (-> capabilities
+                (lsp:server-capabilities-text-document-sync?)
+                (lsp:set-text-document-sync-options-save? t))))
+
+         (setf (lsp--workspace-server-capabilities workspace) capabilities
+               (lsp--workspace-status workspace) 'initialized)
+
+         ;; Apply the negotiated position encoding to all workspace buffers.
+         (when-let* ((encoding (lsp:server-capabilities-position-encoding? capabilities)))
+           (mapc (lambda (buffer)
+                   (when (lsp-buffer-live-p buffer)
+                     (lsp-with-current-buffer buffer
+                       (lsp--set-position-encoding encoding))))
+                 (lsp--workspace-buffers workspace)))
+
+         (with-lsp-workspace workspace
+           (lsp-notify "initialized" lsp--empty-ht))
+
+         (when initialized-fn (funcall initialized-fn workspace))
+
+         (cl-callf2 -filter #'lsp-buffer-live-p (lsp--workspace-buffers workspace))
+         (->> workspace
+              (lsp--workspace-buffers)
+              (mapc (lambda (buffer)
+                      (lsp-with-current-buffer buffer
+                        (lsp--open-in-workspace workspace)))))
+
+         (with-lsp-workspace workspace
+           (run-hooks 'lsp-after-initialize-hook))
+         (lsp--info "%s initialized successfully in folders: %s"
+                    (lsp--workspace-print workspace)
+                    (lsp-workspace-folders workspace)))
+       :mode 'detached))
+    workspace))
+
+(defun lsp--load-default-session ()
+  "Load default session."
+  (setq lsp--session (or (condition-case err
+                             (lsp--read-from-file lsp-session-file)
+                           (error (lsp--error "Failed to parse the session %s, starting with clean one."
+                                              (error-message-string err))
+                                  nil))
+                         (make-lsp-session))))
+
+(defun lsp-session ()
+  "Get the session associated with the current buffer."
+  (or lsp--session (setq lsp--session (lsp--load-default-session))))
+
+(defun lsp--client-disabled-p (buffer-major-mode client)
+  (seq-some
+   (lambda (entry)
+     (pcase entry
+       ((pred symbolp) (eq entry client))
+       (`(,mode . ,client-or-list)
+        (and (eq mode buffer-major-mode)
+             (if (listp client-or-list)
+                 (memq client client-or-list)
+               (eq client client-or-list))))))
+   lsp-disabled-clients))
+
+
+;; download server
+
+(defcustom lsp-server-install-dir (expand-file-name
+                                   (locate-user-emacs-file (f-join ".cache" "lsp")))
+  "Directory in which the servers will be installed."
+  :risky t
+  :type 'directory
+  :package-version '(lsp-mode . "6.3")
+  :group 'lsp-mode)
+
+(defcustom lsp-verify-signature t
+  "Whether to check GPG signatures of downloaded files."
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-mode)
+
+(defvar lsp--dependencies (ht))
+
+(defun lsp-dependency (name &rest definitions)
+  "Used to specify a language server DEPENDENCY, the server
+executable or other required file path. Typically, the
+DEPENDENCY is found by locating it on the system path using
+`executable-find'.
+
+You can explicitly call lsp-dependency in your environment to
+specify the absolute path to the DEPENDENCY. For example, the
+typescript-language-server requires both the server and the
+typescript compiler. If you have installed them in a team shared
+read-only location, you can instruct lsp-mode to use them via
+
+ (eval-after-load `lsp-mode
+   `(progn
+      (require lsp-javascript)
+      (lsp-dependency typescript-language-server (:system ,tls-exe))
+      (lsp-dependency typescript (:system ,ts-js))))
+
+where tls-exe is the absolute path to the typescript-language-server
+executable and ts-js is the absolute path to the typescript compiler
+JavaScript file, tsserver.js (the *.js is required for Windows)."
+  (ht-set lsp--dependencies name definitions))
+
+(defun lsp--server-binary-present? (client)
+  (unless (equal (lsp--client-server-id client) 'lsp-pwsh)
+    (condition-case ()
+        (-some-> client lsp--client-new-connection (plist-get :test?) funcall)
+      (error nil)
+      (args-out-of-range nil))))
+
+(define-minor-mode lsp-installation-buffer-mode
+  "Mode used in *lsp-installation* buffers.
+It can be used to set-up keybindings, etc. Disabling this mode
+detaches the installation buffer from commands like
+`lsp-select-installation-buffer'."
+  :init-value nil
+  :lighter nil)
+
+(defface lsp-installation-finished-buffer-face '((t :foreground "orange"))
+  "Face used for finished installation buffers.
+Used in `lsp-select-installation-buffer'."
+  :group 'lsp-mode)
+
+(defface lsp-installation-buffer-face '((t :foreground "green"))
+  "Face used for installation buffers still in progress.
+Used in `lsp-select-installation-buffer'."
+  :group 'lsp-mode)
+
+(defun lsp--installation-buffer? (buf)
+  "Check whether BUF is an `lsp-async-start-process' buffer."
+  (buffer-local-value 'lsp-installation-buffer-mode buf))
+
+(defun lsp-select-installation-buffer (&optional show-finished)
+  "Interactively choose an installation buffer.
+If SHOW-FINISHED is set, leftover (finished) installation buffers
+are still shown."
+  (interactive "P")
+  (let ((bufs (--filter (and (lsp--installation-buffer? it)
+                             (or show-finished (get-buffer-process it)))
+                        (buffer-list))))
+    (pcase bufs
+      (`nil (user-error "No installation buffers"))
+      (`(,buf) (pop-to-buffer buf))
+      (bufs (pop-to-buffer (completing-read "Select installation buffer: "
+                                            (--map (propertize (buffer-name it) 'face
+                                                               (if (get-buffer-process it)
+                                                                   'lsp-installation-buffer-face
+                                                                 'lsp-installation-finished-buffer-face))
+                                                   bufs)))))))
+
+(defun lsp-cleanup-installation-buffers ()
+  "Delete finished *lsp-installation* buffers."
+  (interactive)
+  (dolist (buf (buffer-list))
+    (when (and (lsp--installation-buffer? buf) (not (get-buffer-process buf)))
+      (kill-buffer buf))))
+
+(defun lsp--download-status ()
+  (-some--> #'lsp--client-download-in-progress?
+    (lsp--filter-clients it)
+    (-map (-compose #'symbol-name #'lsp--client-server-id) it)
+    (format "%s" it)
+    (propertize it 'face 'success)
+    (format " Installing following servers: %s" it)
+    (propertize it
+                'local-map (make-mode-line-mouse-map
+                            'mouse-1 #'lsp-select-installation-buffer)
+                'mouse-face 'highlight)))
+
+(defun lsp--install-server-internal (client &optional update?)
+  (unless (lsp--client-download-server-fn client)
+    (user-error "There is no automatic installation for `%s', you have to install it manually following lsp-mode's documentation."
+                (lsp--client-server-id client)))
+
+  (setf (lsp--client-download-in-progress? client) t)
+  (add-to-list 'global-mode-string '(t (:eval (lsp--download-status))))
+  (cl-flet ((done
+             (success? &optional error-message)
+             ;; run with idle timer to make sure the lsp command is executed in
+             ;; the main thread, see #2739.
+             (run-with-timer
+              0.0
+              nil
+              (lambda ()
+                (-let [(&lsp-cln 'server-id 'buffers) client]
+                  (setf (lsp--client-download-in-progress? client) nil
+                        (lsp--client-buffers client) nil)
+                  (if success?
+                      (lsp--info "Server %s downloaded, auto-starting in %s buffers." server-id
+                                 (length buffers))
+                    (lsp--error "Server %s install process failed with the following error message: %s.
+Check `*lsp-install*' and `*lsp-log*' buffer."
+                                server-id
+                                error-message))
+                  (seq-do
+                   (lambda (buffer)
+                     (when (lsp-buffer-live-p buffer)
+                       (lsp-with-current-buffer buffer
+                         (cl-callf2 -remove-item '(t (:eval (lsp--download-status)))
+                                    global-mode-string)
+                         (when success? (lsp)))))
+                   buffers)
+                  (unless (lsp--filter-clients #'lsp--client-download-in-progress?)
+                    (cl-callf2 -remove-item '(t (:eval (lsp--download-status)))
+                               global-mode-string)))))))
+    (lsp--info "Download %s started." (lsp--client-server-id client))
+    (condition-case err
+        (funcall
+         (lsp--client-download-server-fn client)
+         client
+         (lambda () (done t))
+         (lambda (msg) (done nil msg))
+         update?)
+      (error
+       (done nil (error-message-string err))))))
+
+(defun lsp--require-packages ()
+  "Load `lsp-client-packages' if needed."
+  (when (and lsp-auto-configure (not lsp--client-packages-required))
+    (seq-do (lambda (package)
+              ;; loading client is slow and `lsp' can be called repeatedly
+              (unless (featurep package)
+                (require package nil t)))
+            lsp-client-packages)
+    (setq lsp--client-packages-required t)))
+
+;;;###autoload
+(defun lsp-install-server (update? &optional server-id)
+  "Interactively install or re-install server.
+When prefix UPDATE? is t force installation even if the server is present."
+  (interactive "P")
+  (lsp--require-packages)
+  (let* ((chosen-client (or (gethash server-id lsp-clients)
+                            (lsp--completing-read
+                             "Select server to install/re-install: "
+                             (or (->> lsp-clients
+                                      (ht-values)
+                                      (-filter (-andfn
+                                                (-not #'lsp--client-download-in-progress?)
+                                                #'lsp--client-download-server-fn)))
+                                 (user-error "There are no servers with automatic installation"))
+                             (lambda (client)
+                               (let ((server-name (-> client lsp--client-server-id symbol-name)))
+                                 (if (lsp--server-binary-present? client)
+                                     (concat server-name " (Already installed)")
+                                   server-name)))
+                             nil
+                             t)))
+         (update? (or update?
+                      (and (not (lsp--client-download-in-progress? chosen-client))
+                           (lsp--server-binary-present? chosen-client)))))
+    (lsp--install-server-internal chosen-client update?)))
+
+;;;###autoload
+(defun lsp-uninstall-server (dir)
+  "Delete a LSP server from `lsp-server-install-dir'."
+  (interactive
+   (list (read-directory-name "Uninstall LSP server: " (f-slash lsp-server-install-dir))))
+  (unless (file-directory-p dir)
+    (user-error "Couldn't find %s directory" dir))
+  (delete-directory dir 'recursive)
+  (message "Server `%s' uninstalled." (file-name-nondirectory (directory-file-name dir))))
+
+;;;###autoload
+(defun lsp-uninstall-servers ()
+  "Uninstall all installed servers."
+  (interactive)
+  (let* ((dir lsp-server-install-dir)
+         (servers (ignore-errors
+                    (directory-files dir t
+                                     directory-files-no-dot-files-regexp))))
+    (if (or (not (file-directory-p dir)) (zerop (length servers)))
+        (user-error "No servers to uninstall")
+      (when (yes-or-no-p
+             (format "Servers to uninstall: %d (%s), proceed? "
+                     (length servers)
+                     (mapconcat (lambda (server)
+                                  (file-name-nondirectory (directory-file-name server)))
+                                servers " ")))
+        (mapc #'lsp-uninstall-server servers)
+        (message "All servers uninstalled")))))
+
+;;;###autoload
+(defun lsp-update-server (&optional server-id)
+  "Interactively update (reinstall) a server."
+  (interactive)
+  (lsp--require-packages)
+  (let ((chosen-client (or (gethash server-id lsp-clients)
+                           (lsp--completing-read
+                            "Select server to update (if not on the list, probably you need to `lsp-install-server`): "
+                            (or (->> lsp-clients
+                                     (ht-values)
+                                     (-filter (-andfn
+                                               (-not #'lsp--client-download-in-progress?)
+                                               #'lsp--client-download-server-fn
+                                               #'lsp--server-binary-present?)))
+                                (user-error "There are no servers to update"))
+                            (lambda (client)
+                              (-> client lsp--client-server-id symbol-name))
+                            nil
+                            t))))
+    (lsp--install-server-internal chosen-client t)))
+
+;;;###autoload
+(defun lsp-update-servers ()
+  "Update (reinstall) all installed servers."
+  (interactive)
+  (lsp--require-packages)
+  (mapc (lambda (client) (lsp--install-server-internal client t))
+        (-filter (-andfn
+                  (-not #'lsp--client-download-in-progress?)
+                  #'lsp--client-download-server-fn
+                  #'lsp--server-binary-present?) (hash-table-values lsp-clients))))
+
+;;;###autoload
+(defun lsp-ensure-server (server-id)
+  "Ensure server SERVER-ID"
+  (lsp--require-packages)
+  (if-let* ((client (gethash server-id lsp-clients)))
+      (unless (lsp--server-binary-present? client)
+        (lsp--info "Server `%s' is not preset, installing..." server-id)
+        (lsp-install-server nil server-id))
+    (warn "Unable to find server registration with id %s" server-id)))
+
+(defun lsp-async-start-process (callback error-callback &rest command)
+  "Start async process COMMAND with CALLBACK and ERROR-CALLBACK."
+  (let ((name (cl-first command)))
+    (with-current-buffer (compilation-start (mapconcat #'shell-quote-argument (-filter (lambda (cmd)
+                                                                                         (not (null cmd)))
+                                                                                       command)
+                                                       " ") t
+                                            (lambda (&rest _)
+                                              (generate-new-buffer-name (format "*lsp-install: %s*" name))))
+      (lsp-installation-buffer-mode +1)
+      (view-mode +1)
+      (add-hook
+       'compilation-finish-functions
+       (lambda (_buf status)
+         (if (string= "finished\n" status)
+             (condition-case err
+                 (funcall callback)
+               (error
+                (funcall error-callback (error-message-string err))))
+           (funcall error-callback (s-trim-right status))))
+       nil t))))
+
+(defun lsp-resolve-value (value)
+  "Resolve VALUE's value.
+If it is function - call it.
+If it is a variable - return it's value
+Otherwise returns value itself."
+  (cond
+   ((functionp value) (funcall value))
+   ((and (symbolp value) (boundp value)) (symbol-value value))
+   (value)))
+
+(defvar lsp-deps-providers
+  (list :npm (list :path #'lsp--npm-dependency-path
+                   :install #'lsp--npm-dependency-install)
+        :cargo (list :path #'lsp--cargo-dependency-path
+                     :install #'lsp--cargo-dependency-install)
+        :system (list :path #'lsp--system-path)
+        :download (list :path #'lsp-download-path
+                        :install #'lsp-download-install)))
+
+(defun lsp--system-path (path)
+  "If PATH is absolute and exists return it as is. Otherwise,
+return the absolute path to the executable defined by PATH or
+nil."
+  ;; For node.js 'sub-packages' PATH may point to a *.js file. Consider the
+  ;; typescript-language-server. When lsp invokes the server, lsp needs to
+  ;; supply the path to the typescript compiler, tsserver.js, as an argument. To
+  ;; make code platform independent, one must pass the absolute path to the
+  ;; tsserver.js file (Windows requires a *.js file - see help on the JavaScript
+  ;; child process spawn command that is invoked by the
+  ;; typescript-language-server). This is why we check for existence and not
+  ;; that the path is executable.
+  (let ((path (lsp-resolve-value path)))
+    (cond
+     ((and (f-absolute? path)
+           (f-exists? path))
+      path)
+     ((executable-find path t)))))
+
+(defun lsp-package-path (dependency)
+  "Path to the DEPENDENCY each of the registered providers."
+  (let (path)
+    (--first (-let [(provider . rest) it]
+              (setq path (-some-> lsp-deps-providers
+                           (plist-get provider)
+                           (plist-get :path)
+                           (apply rest))))
+             (gethash dependency lsp--dependencies))
+    path))
+
+(defun lsp-package-ensure (dependency callback error-callback)
+  "Asynchronously ensure a package."
+  (or (-first (-lambda ((provider . rest))
+                (-some-> lsp-deps-providers
+                  (plist-get provider)
+                  (plist-get :install)
+                  (apply (cl-list* callback error-callback rest))))
+              (gethash dependency lsp--dependencies))
+      (funcall error-callback (format "Unable to find a way to install %s" dependency))))
+
+
+;; npm handling
+
+;; https://docs.npmjs.com/files/folders#executables
+(cl-defun lsp--npm-dependency-path (&key package path &allow-other-keys)
+  "Return npm dependency PATH for PACKAGE."
+  (let ((path* (executable-find
+                (f-join lsp-server-install-dir "npm" package
+                        (cond ((eq system-type 'windows-nt) "")
+                              (t "bin"))
+                        path)
+                t)))
+    (unless path*
+      (error "The package %s is not installed.  Unable to find %s" package path))
+    path*))
+
+(cl-defun lsp--npm-dependency-install (callback error-callback &key package version &allow-other-keys)
+  (if-let* ((npm-binary (executable-find "npm")))
+      (progn
+        ;; Explicitly `make-directory' to work around NPM bug in
+        ;; versions 7.0.0 through 7.4.1. See
+        ;; https://github.com/emacs-lsp/lsp-mode/issues/2364 for
+        ;; discussion.
+        (make-directory (f-join lsp-server-install-dir "npm" package "lib") 'parents)
+        (lsp-async-start-process (lambda ()
+                                   (if (string-empty-p
+                                        (string-trim (shell-command-to-string
+                                                      (mapconcat #'shell-quote-argument `(,npm-binary "view" ,package "peerDependencies") " "))))
+                                       (funcall callback)
+                                     (let ((default-directory (f-dirname (car (last (directory-files-recursively (f-join lsp-server-install-dir "npm" package) "package.json")))))
+                                           (process-environment (append '("npm_config_yes=true") process-environment))) ;; Disable prompting for older versions of npx
+                                       (when (f-dir-p default-directory)
+                                         (lsp-async-start-process callback
+                                                                  error-callback
+                                                                  (executable-find "npx")
+                                                                  "i-peers")))))
+                                 error-callback
+                                 npm-binary
+                                 "-g"
+                                 "--prefix"
+                                 (f-join lsp-server-install-dir "npm" package)
+                                 "install"
+                                 (if-let* ((version (lsp-resolve-value version)))
+                                     (format "%s@%s" package version)
+                                   package)))
+    (lsp-log "Unable to install %s via `npm' because it is not present" package)
+    nil))
+
+
+;; Cargo dependency handling
+(cl-defun lsp--cargo-dependency-path (&key package path &allow-other-keys)
+  (let ((path (executable-find
+               (f-join lsp-server-install-dir
+                       "cargo"
+                       package
+                       "bin"
+                       path)
+               t)))
+    (unless (and path (f-exists? path))
+      (error "The package %s is not installed.  Unable to find %s" package path))
+    path))
+
+(cl-defun lsp--cargo-dependency-install (callback error-callback &key package git &allow-other-keys)
+  (if-let* ((cargo-binary (executable-find "cargo")))
+      (lsp-async-start-process
+       callback
+       error-callback
+       cargo-binary
+       "install"
+       package
+       (when git
+         "--git")
+       git
+       "--root"
+       (f-join lsp-server-install-dir "cargo" package))
+    (lsp-log "Unable to install %s via `cargo' because it is not present" package)
+    nil))
+
+
+
+;; Download URL handling
+
+(defun lsp--download-file (url path on-success on-error)
+  "Download URL to PATH using curl as an async subprocess.
+ON-SUCCESS is called with no arguments on the main thread when curl exits
+successfully.  ON-ERROR is called with a list `(error MESSAGE)' on failure.
+The caller is responsible for ensuring curl is available."
+  (lsp--info "Starting to download %s to %s..." url path)
+  (make-process
+   :name (format "lsp-download-%s" (file-name-nondirectory path))
+   :noquery t
+   :command (list "curl" "--silent" "--location" "--compressed" "--output" path url)
+   :sentinel (lambda (_proc event)
+               (if (string= event "finished\n")
+                   (progn
+                     (lsp--info "Finished downloading %s..." path)
+                     (funcall on-success))
+                 (funcall on-error
+                          (list 'error (format "curl failed downloading %s: %s"
+                                               url (string-trim event))))))))
+
+(cl-defun lsp-download-install (callback error-callback &key url asc-url pgp-key store-path decompress &allow-other-keys)
+  (let* ((url (lsp-resolve-value url))
+         (store-path (lsp-resolve-value store-path))
+         ;; (decompress (lsp-resolve-value decompress))
+         (download-path
+          (pcase decompress
+            (:gzip (concat store-path ".gz"))
+            (:zip (concat store-path ".zip"))
+            (:targz (concat store-path ".tar.gz"))
+            (:tarxz (concat store-path ".tar.xz"))
+            (`nil store-path)
+            (_ (error ":decompress must be `:gzip', `:zip', `:targz', `:tarxz' or `nil'")))))
+    (condition-case err
+        (progn
+          (unless (executable-find "curl")
+            (error "curl is not available; install curl to download LSP servers"))
+          (when (f-exists? download-path)
+            (f-delete download-path))
+          (when (f-exists? store-path)
+            (f-delete store-path))
+          (mkdir (f-parent download-path) t)
+          ;; Final step: decompression runs in a thread (CPU-bound, does not
+          ;; touch the NS event loop, so thread-safe on macOS).
+          (let ((do-decompress
+                 (lambda ()
+                   (if (not decompress)
+                       (funcall callback)
+                     (make-thread
+                      (lambda ()
+                        (condition-case err
+                            (progn
+                              (lsp--info "Decompressing %s..." download-path)
+                              (pcase decompress
+                                (:gzip (lsp-gunzip download-path))
+                                (:zip (lsp-unzip download-path (f-parent store-path)))
+                                (:targz (lsp-tar-gz-decompress download-path (f-parent store-path)))
+                                ;; NOTE: lsp-tar-gz-decompress handles all tar-compressed paths.
+                                (:tarxz (lsp-tar-gz-decompress download-path (f-parent store-path))))
+                              (lsp--info "Decompressed %s..." store-path)
+                              (funcall callback))
+                          (error (funcall error-callback err)))))))))
+            ;; Download the main file; sentinel fires on the main thread.
+            (lsp--download-file
+             url download-path
+             (lambda ()
+               (if (not (and lsp-verify-signature asc-url pgp-key))
+                   (funcall do-decompress)
+                 (if (not (executable-find epg-gpg-program))
+                     (progn
+                       (lsp--warn "GPG is not installed, skipping the signature check.")
+                       (funcall do-decompress))
+                   (let ((asc-path (concat download-path ".asc")))
+                     (when (f-exists? asc-path)
+                       (f-delete asc-path))
+                     ;; Download the .asc file; sentinel fires on the main thread.
+                     (lsp--download-file
+                      asc-url asc-path
+                      (lambda ()
+                        (condition-case err
+                            (let* ((context (epg-make-context))
+                                   fingerprint signature)
+                              (epg-import-keys-from-string context pgp-key)
+                              (setq fingerprint
+                                    (epg-import-status-fingerprint
+                                     (car (epg-import-result-imports
+                                           (epg-context-result-for context 'import)))))
+                              (lsp--info "Verifying signature %s..." asc-path)
+                              (epg-verify-file context asc-path download-path)
+                              (setq signature (car (epg-context-result-for context 'verify)))
+                              (unless (and (eq (epg-signature-status signature) 'good)
+                                           (equal (epg-signature-fingerprint signature) fingerprint))
+                                (error "Failed to verify GPG signature: %s"
+                                       (epg-signature-to-string signature)))
+                              (funcall do-decompress))
+                          (error (funcall error-callback err))))
+                      error-callback)))))
+             error-callback)))
+      (error (funcall error-callback err)))))
+
+(cl-defun lsp-download-path (&key store-path binary-path set-executable? &allow-other-keys)
+  "Download URL and store it into STORE-PATH.
+
+SET-EXECUTABLE? when non-nil change the executable flags of
+STORE-PATH to make it executable. BINARY-PATH can be specified
+when the binary to start does not match the name of the
+archive (e.g. when the archive has multiple files)"
+  (let ((store-path (or (lsp-resolve-value binary-path)
+                        (lsp-resolve-value store-path))))
+    (cond
+     ((executable-find store-path) store-path)
+     ((and set-executable? (f-exists? store-path))
+      (set-file-modes store-path #o0700)
+      store-path)
+     ((f-exists? store-path) store-path))))
+
+(defun lsp--find-latest-gh-release-url (url regex)
+  "Fetch the latest version in the releases given by URL by using REGEX."
+  (let ((url-request-method "GET"))
+    (with-current-buffer (url-retrieve-synchronously url)
+      (goto-char (point-min))
+      (re-search-forward "\n\n" nil 'noerror)
+      (delete-region (point-min) (point))
+      (let* ((json-result (lsp-json-read-buffer)))
+        (message "Latest version found: %s" (lsp-get json-result :tag_name))
+        (--> json-result
+             (lsp-get it :assets)
+             (seq-find (lambda (entry) (string-match-p regex (lsp-get entry :name))) it)
+             (lsp-get it :browser_download_url))))))
+
+;; unzip
+
+(defconst lsp-ext-pwsh-script "pwsh -noprofile -noninteractive \
+-nologo -ex bypass -c Expand-Archive -Path '%s' -DestinationPath '%s'"
+  "Pwsh script to unzip file.")
+
+(defconst lsp-ext-powershell-script "powershell -noprofile -noninteractive \
+-nologo -ex bypass -command Expand-Archive -path '%s' -dest '%s'"
+  "Powershell script to unzip file.")
+
+(defconst lsp-ext-unzip-script "bash -c 'mkdir -p %2$s && unzip -qq -o %1$s -d %2$s'"
+  "Unzip script to unzip file.")
+
+(defcustom lsp-unzip-script (lambda ()
+                              (cond ((and (eq system-type 'windows-nt)
+                                          (executable-find "pwsh"))
+                                     lsp-ext-pwsh-script)
+                                    ((and (eq system-type 'windows-nt)
+                                          (executable-find "powershell"))
+                                     lsp-ext-powershell-script)
+                                    ((executable-find "unzip") lsp-ext-unzip-script)
+                                    ((executable-find "pwsh") lsp-ext-pwsh-script)
+                                    (t nil)))
+  "The script to unzip."
+  :group 'lsp-mode
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defun lsp-unzip (zip-file dest)
+  "Unzip ZIP-FILE to DEST."
+  (unless lsp-unzip-script
+    (error "Unable to find `unzip' or `powershell' on the path, please customize `lsp-unzip-script'"))
+  (shell-command (format (lsp-resolve-value lsp-unzip-script) zip-file dest)))
+
+;; gunzip
+
+(defconst lsp-ext-gunzip-script "gzip -d %1$s"
+  "Script to decompress a gzippped file with gzip.")
+
+(defcustom lsp-gunzip-script (lambda ()
+                               (cond ((executable-find "gzip") lsp-ext-gunzip-script)
+                                     (t nil)))
+  "The script to decompress a gzipped file.
+Should be a format string with one argument for the file to be decompressed
+in place."
+  :group 'lsp-mode
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defun lsp-gunzip (gz-file)
+  "Decompress GZ-FILE in place."
+  (unless lsp-gunzip-script
+    (error "Unable to find `gzip' on the path, please either customize `lsp-gunzip-script' or manually decompress %s" gz-file))
+  (shell-command (format (lsp-resolve-value lsp-gunzip-script) gz-file)))
+
+;; tar.gz decompression
+
+(defconst lsp-ext-tar-script "bash -c 'mkdir -p %2$s; tar xf %1$s --directory=%2$s'"
+  "Script to decompress a .tar.gz file.")
+
+(defcustom lsp-tar-script (lambda ()
+                            (cond ((executable-find "tar") lsp-ext-tar-script)
+                                  (t nil)))
+  "The script to decompress a .tar.gz file.
+Should be a format string with one argument for the file to be decompressed
+in place."
+  :group 'lsp-mode
+  :type 'string)
+
+(defun lsp-tar-gz-decompress (targz-file dest)
+  "Decompress TARGZ-FILE in DEST."
+  (unless lsp-tar-script
+    (error "Unable to find `tar' on the path, please either customize `lsp-tar-script' or manually decompress %s" targz-file))
+  (shell-command (format (lsp-resolve-value lsp-tar-script) targz-file dest)))
+
+
+;; VSCode marketplace
+
+(defcustom lsp-vscode-ext-url
+  "https://marketplace.visualstudio.com/_apis/public/gallery/publishers/%s/vsextensions/%s/%s/vspackage%s"
+  "Vscode extension template url."
+  :group 'lsp-mode
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defun lsp-vscode-extension-url (publisher name version &optional targetPlatform)
+  "Return the URL to vscode extension.
+PUBLISHER is the extension publisher.
+NAME is the name of the extension.
+VERSION is the version of the extension.
+TARGETPLATFORM is the targetPlatform of the extension."
+  (format lsp-vscode-ext-url publisher name version (or targetPlatform "")))
+
+
+
+;; Queueing prompts
+
+(defvar lsp--question-queue nil
+  "List of questions yet to be asked by `lsp-ask-question'.")
+
+(defun lsp-ask-question (question options callback)
+  "Prompt the user to answer the QUESTION with one of the OPTIONS from the
+minibuffer. Once the user selects an option, the CALLBACK function will be
+called, passing the selected option to it.
+
+If the user is currently being shown a question, the question will be stored in
+`lsp--question-queue', and will be asked once the user has answered the current
+question."
+  (add-to-list 'lsp--question-queue `(("question" . ,question)
+                                      ("options" . ,options)
+                                      ("callback" . ,callback)) t)
+  (when (eq (length lsp--question-queue) 1)
+    (lsp--process-question-queue)))
+
+(defun lsp--process-question-queue ()
+  "Take the first question from `lsp--question-queue', process it, then process
+the next question until the queue is empty."
+  (-let* (((&alist "question" "options" "callback") (car lsp--question-queue))
+          (answer (completing-read question options nil t)))
+    (pop lsp--question-queue)
+    (funcall callback answer)
+    (when lsp--question-queue
+      (lsp--process-question-queue))))
+
+(defun lsp--supports-buffer? (client)
+  (and
+   ;; both file and client remote or both local
+   ;; Fall back to `default-directory' for buffers with no file name, so
+   ;; `file-remote-p' is never called with nil (which would signal).
+   (eq (---truthy? (file-remote-p (or (buffer-file-name) default-directory)))
+       (---truthy? (lsp--client-remote? client)))
+
+   ;; activation function or major-mode match.
+   (if-let* ((activation-fn (lsp--client-activation-fn client)))
+       (funcall activation-fn (buffer-file-name) major-mode)
+     (-contains? (lsp--client-major-modes client) major-mode))
+
+   ;; check whether it is enabled if `lsp-enabled-clients' is not null
+   (or (null lsp-enabled-clients)
+       (or (member (lsp--client-server-id client) lsp-enabled-clients)
+           (ignore (lsp--info "Client %s is not in lsp-enabled-clients"
+                              (lsp--client-server-id client)))))
+
+   ;; check whether it is not disabled.
+   (not (lsp--client-disabled-p major-mode (lsp--client-server-id client)))))
+
+(defun lsp--filter-clients (pred)
+  (->> lsp-clients hash-table-values (-filter pred)))
+
+(defun lsp--find-clients ()
+  "Find clients which can handle current buffer."
+  (-when-let (matching-clients (lsp--filter-clients (-andfn #'lsp--supports-buffer?
+                                                            #'lsp--server-binary-present?)))
+    (lsp-log "Found the following clients for %s: %s"
+             (buffer-file-name)
+             (s-join ", "
+                     (-map (lambda (client)
+                             (format "(server-id %s, priority %s)"
+                                     (lsp--client-server-id client)
+                                     (lsp--client-priority client)))
+                           matching-clients)))
+    (-let* (((add-on-clients main-clients) (-separate #'lsp--client-add-on? matching-clients))
+            (selected-clients (if-let* ((main-client (and main-clients
+                                                         (--max-by (> (lsp--client-priority it)
+                                                                      (lsp--client-priority other))
+                                                                   main-clients))))
+                                  (cons main-client add-on-clients)
+                                add-on-clients)))
+      (lsp-log "The following clients were selected based on priority: %s"
+               (s-join ", "
+                       (-map (lambda (client)
+                               (format "(server-id %s, priority %s)"
+                                       (lsp--client-server-id client)
+                                       (lsp--client-priority client)))
+                             selected-clients)))
+      selected-clients)))
+
+(defun lsp-workspace-remove-all-folders()
+  "Delete all lsp tracked folders."
+  (interactive)
+  (--each (lsp-session-folders (lsp-session))
+    (lsp-workspace-folders-remove it)))
+
+(defun lsp-register-client (client)
+  "Registers LSP client CLIENT."
+  (let ((client-id (lsp--client-server-id client)))
+    (puthash client-id client lsp-clients)
+    (setplist (intern (format "lsp-%s-after-open-hook" client-id))
+              `( standard-value (nil) custom-type hook
+                 custom-package-version (lsp-mode . "7.0.1")
+                 variable-documentation ,(format "Hooks to run after `%s' server is run." client-id)
+                 custom-requests nil)))
+  (when (and lsp-auto-register-remote-clients
+             (not (lsp--client-remote? client)))
+    (let ((remote-client (copy-lsp--client client)))
+      (setf (lsp--client-remote? remote-client) t
+            (lsp--client-server-id remote-client) (intern
+                                                   (format "%s-tramp"
+                                                           (lsp--client-server-id client)))
+            ;; disable automatic download
+            (lsp--client-download-server-fn remote-client) nil)
+      (lsp-register-client remote-client))))
+
+(defun lsp--create-initialization-options (_session client)
+  "Create initialization-options from SESSION and CLIENT.
+Add workspace folders depending on server being multiroot and
+session workspace folder configuration for the server."
+  (let* ((initialization-options-or-fn (lsp--client-initialization-options client)))
+    (if (functionp initialization-options-or-fn)
+        (funcall initialization-options-or-fn)
+      initialization-options-or-fn)))
+
+(defvar lsp-client-settings (make-hash-table :test 'equal)
+  "For internal use, any external users please use
+  `lsp-register-custom-settings' function instead")
+
+(defun lsp-register-custom-settings (props)
+  "Register PROPS.
+PROPS is list of triple (path value boolean?) where PATH is the path to the
+property; VALUE can be a literal value, symbol to be evaluated, or either a
+function or lambda function to be called without arguments; BOOLEAN? is an
+optional flag that should be non-nil for boolean settings, when it is nil the
+property will be ignored if the VALUE is nil.
+
+Example: `(lsp-register-custom-settings `((\"foo.bar.buzz.enabled\" t t)))'
+\(note the double parentheses)"
+  (mapc
+   (-lambda ((path . rest))
+     (puthash path rest lsp-client-settings))
+   props))
+
+(defun lsp-region-text (region)
+  "Get the text for REGION in current buffer."
+  (-let (((start . end) (lsp--range-to-region region)))
+    (buffer-substring-no-properties start end)))
+
+(defun lsp-ht-set (tbl paths value)
+  "Set nested hash table value.
+TBL - a hash table, PATHS is the path to the nested VALUE."
+  (pcase paths
+    (`(,path) (ht-set! tbl path value))
+    (`(,path . ,rst) (let ((nested-tbl (or (gethash path tbl)
+                                           (let ((temp-tbl (ht)))
+                                             (ht-set! tbl path temp-tbl)
+                                             temp-tbl))))
+                       (lsp-ht-set nested-tbl rst value)))))
+
+;; sections
+
+(defalias 'defcustom-lsp 'lsp-defcustom)
+
+(defmacro lsp-defcustom (symbol standard doc &rest args)
+  "Defines `lsp-mode' server property."
+  (declare (doc-string 3) (debug (name body))
+           (indent defun))
+  (let ((path (plist-get args :lsp-path))
+        (setter (intern (concat (symbol-name symbol) "--set"))))
+    (cl-remf args :lsp-path)
+    `(progn
+       (lsp-register-custom-settings
+        (quote ((,path ,symbol ,(equal ''boolean (plist-get args :type))))))
+
+       (defcustom ,symbol ,standard ,doc ,@args)
+
+       ;; Use a variable watcher instead of registering a `defcustom'
+       ;; setter since `hack-local-variables' is not aware of custom
+       ;; setters and won't invoke them.
+
+       (defun ,setter (sym val op _where)
+         (when (eq op 'set)
+           (lsp--set-custom-property sym val ,path)))
+
+       (add-variable-watcher ',symbol #',setter))))
+
+(defun lsp--set-custom-property (sym val path)
+  (set sym val)
+  (let ((section (cl-first (s-split "\\." path))))
+    (mapc (lambda (workspace)
+            (when (-contains? (lsp--client-synchronize-sections (lsp--workspace-client workspace))
+                              section)
+              (with-lsp-workspace workspace
+                (lsp--set-configuration (lsp-configuration-section section)))))
+          (lsp--session-workspaces (lsp-session)))))
+
+(defun lsp-configuration-section (section)
+  "Get settings for SECTION."
+  (let ((ret (ht-create)))
+    (maphash (-lambda (path (variable boolean?))
+               (when (s-matches? (concat (regexp-quote section) "\\..*") path)
+                 (let* ((symbol-value (-> variable
+                                          lsp-resolve-value
+                                          lsp-resolve-value))
+                        (value (if (and boolean? (not symbol-value))
+                                   :json-false
+                                 symbol-value)))
+                   (when (or boolean? value)
+                     (lsp-ht-set ret (s-split "\\." path) value)))))
+             lsp-client-settings)
+    ret))
+
+(defun lsp--default-workspace-configuration ()
+  "Get all defined settings."
+  (let ((ret (ht-create)))
+    (maphash (-lambda (path (variable boolean?))
+               ;; Trap any error to be safe, as in an older version of lsp-mode,
+               ;; when resolving the variable lsp-volar-get-typescript-tsdk-path,
+               ;; the following error was signaled:
+               ;; :package "typescript" :path "tsserver"
+               ;;  "The package typescript is not installed.  Unable to find nil"
+               (condition-case nil
+                   (let* ((symbol-value (-> variable
+                                            lsp-resolve-value
+                                            lsp-resolve-value))
+                          (value (if (and boolean? (not symbol-value))
+                                     :json-false
+                                   symbol-value)))
+                     (when (or boolean? value)
+                       (lsp-ht-set ret (s-split "\\." path) value)))
+                 (error nil)))
+             lsp-client-settings)
+    ret))
+
+
+(defun lsp--start-connection (session client project-root)
+  "Initiates connection created from CLIENT for PROJECT-ROOT.
+SESSION is the active session."
+  (when (lsp--client-multi-root client)
+    (cl-pushnew project-root (gethash (lsp--client-server-id client)
+                                      (lsp-session-server-id->folders session))))
+  (run-hook-with-args 'lsp-workspace-folders-changed-functions (list project-root) nil)
+
+  (unwind-protect
+      (lsp--start-workspace session client project-root (lsp--create-initialization-options session client))
+    (lsp--spinner-stop)))
+
+;; lsp-log-io-mode
+
+(defvar lsp-log-io-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "M-n") #'lsp-log-io-next)
+    (define-key map (kbd "M-p") #'lsp-log-io-prev)
+    (define-key map (kbd "k") #'lsp--erase-log-buffer)
+    (define-key map (kbd "K") #'lsp--erase-session-log-buffers)
+    map)
+  "Keymap for lsp log buffer mode.")
+
+(define-derived-mode lsp-log-io-mode special-mode "LspLogIo"
+  "Special mode for viewing IO logs.")
+
+(defun lsp-workspace-show-log (workspace)
+  "Display the log buffer of WORKSPACE."
+  (interactive
+   (list (if lsp-log-io
+             (if (eq (length (lsp-workspaces)) 1)
+                 (cl-first (lsp-workspaces))
+               (lsp--completing-read "Workspace: " (lsp-workspaces)
+                                     #'lsp--workspace-print nil t))
+           (user-error "IO logging is disabled"))))
+  (pop-to-buffer (lsp--get-log-buffer-create workspace)))
+
+(defalias 'lsp-switch-to-io-log-buffer 'lsp-workspace-show-log)
+
+(defun lsp--get-log-buffer-create (workspace)
+  "Return the lsp log buffer of WORKSPACE, creating a new one if needed."
+  (let* ((server-id (-> workspace lsp--workspace-client lsp--client-server-id symbol-name))
+         (pid (-> workspace lsp--workspace-cmd-proc lsp-process-id)))
+    (get-buffer-create (format "*lsp-log: %s:%s*" server-id pid))))
+
+(defun lsp--erase-log-buffer (&optional all)
+  "Delete contents of current lsp log buffer.
+When ALL is t, erase all log buffers of the running session."
+  (interactive)
+  (let* ((workspaces (lsp--session-workspaces (lsp-session)))
+         (current-log-buffer (current-buffer)))
+    (dolist (w workspaces)
+      (let ((b (lsp--get-log-buffer-create w)))
+        (when (or all (eq b current-log-buffer))
+          (with-current-buffer b
+            (let ((inhibit-read-only t))
+              (erase-buffer))))))))
+
+(defun lsp--erase-session-log-buffers ()
+  "Erase log buffers of the running session."
+  (interactive)
+  (lsp--erase-log-buffer t))
+
+(defun lsp-log-io-next (arg)
+  "Move to next log entry."
+  (interactive "P")
+  (ewoc-goto-next lsp--log-io-ewoc (or arg 1)))
+
+(defun lsp-log-io-prev (arg)
+  "Move to previous log entry."
+  (interactive "P")
+  (ewoc-goto-prev lsp--log-io-ewoc (or arg 1)))
+
+
+
+(cl-defmethod lsp-process-id ((process process))
+  (process-id process))
+
+(cl-defmethod lsp-process-name ((process process)) (process-name process))
+
+(cl-defmethod lsp-process-status ((process process)) (process-status process))
+
+(cl-defmethod lsp-process-kill ((process process))
+  (when (process-live-p process)
+    (kill-process process)))
+
+(cl-defmethod lsp-process-send ((process process) message)
+  (condition-case err
+      (process-send-string process (lsp--make-message message))
+    (error (lsp--error "Sending to process failed with the following error: %s"
+                       (error-message-string err)))))
+
+(cl-defmethod lsp-process-cleanup (process)
+  ;; Kill standard error buffer only if the process exited normally.
+  ;; Leave it intact otherwise for debugging purposes.
+  (let ((buffer (-> process process-name get-buffer)))
+    (when (and (eq (process-status process) 'exit)
+               (zerop (process-exit-status process))
+               (buffer-live-p buffer))
+      (kill-buffer buffer))))
+
+
+;; native JSONRPC
+
+(declare-function json-rpc "ext:json")
+(declare-function json-rpc-connection "ext:json")
+(declare-function json-rpc-send "ext:json")
+(declare-function json-rpc-shutdown "ext:json")
+(declare-function json-rpc-stderr "ext:json")
+(declare-function json-rpc-pid "ext:json")
+
+(defvar lsp-json-rpc-thread nil)
+(defvar lsp-json-rpc-queue nil)
+(defvar lsp-json-rpc-done nil)
+(defvar lsp-json-rpc-mutex (make-mutex))
+(defvar lsp-json-rpc-condition (make-condition-variable lsp-json-rpc-mutex))
+
+(defun lsp-json-rpc-process-queue ()
+  (while (not lsp-json-rpc-done)
+    (while lsp-json-rpc-queue
+      (-let (((proc . message) (pop lsp-json-rpc-queue)))
+        (json-rpc-send
+         proc message
+         :null-object nil
+         :false-object :json-false)))
+    (with-mutex lsp-json-rpc-mutex
+      (condition-wait lsp-json-rpc-condition))))
+
+(cl-defmethod lsp-process-id (process) (json-rpc-pid process))
+
+(cl-defmethod lsp-process-name (_process) "TBD")
+
+(cl-defmethod lsp-process-kill (process) (json-rpc-shutdown process))
+
+(cl-defmethod lsp-process-send (proc message)
+  (unless lsp-json-rpc-thread
+    (with-current-buffer (get-buffer-create " *json-rpc*")
+      (setq lsp-json-rpc-thread (make-thread #'lsp-json-rpc-process-queue "*json-rpc-queue*"))))
+
+  (with-mutex lsp-json-rpc-mutex
+    (setq lsp-json-rpc-queue (append lsp-json-rpc-queue
+                                     (list (cons proc message))))
+    (condition-notify lsp-json-rpc-condition)))
+
+(cl-defmethod lsp-process-cleanup (_proc))
+
+(defun lsp-json-rpc-connection (workspace command)
+  (let ((con (apply #'json-rpc-connection command))
+        (object-type (if lsp-use-plists 'plist 'hash-table)))
+    (with-current-buffer (get-buffer-create " *json-rpc*")
+      (make-thread
+       (lambda ()
+         (json-rpc
+          con
+          (lambda (result err done)
+            (run-with-timer
+             0.0
+             nil
+             (lambda ()
+               (cond
+                (result (lsp--parser-on-message result workspace))
+                (err (warn "Json parsing failed with the following error: %s" err))
+                (done (lsp--handle-process-exit workspace ""))))))
+          :object-type object-type
+          :null-object nil
+          :false-object nil))
+       "*json-rpc-connection*"))
+    (cons con con)))
+
+(defun lsp-json-rpc-stderr ()
+  (interactive)
+  (--when-let (pcase (lsp-workspaces)
+                (`nil (user-error "There are no active servers in the current buffer"))
+                (`(,workspace) workspace)
+                (workspaces (lsp--completing-read "Select server: "
+                                                  workspaces
+                                                  'lsp--workspace-print nil t)))
+    (let ((content (json-rpc-stderr (lsp--workspace-cmd-proc it)))
+          (buffer (format "*stderr-%s*" (lsp--workspace-print it)) ))
+      (with-current-buffer (get-buffer-create buffer)
+        (with-help-window buffer
+          (insert content))))))
+
+
+(defun lsp--workspace-print (workspace)
+  "Visual representation WORKSPACE."
+  (let* ((proc (lsp--workspace-cmd-proc workspace))
+         (status (lsp--workspace-status workspace))
+         (server-id (-> workspace lsp--workspace-client lsp--client-server-id symbol-name))
+         (pid (lsp-process-id proc)))
+
+    (if (eq 'initialized status)
+        (format "%s:%s" server-id pid)
+      (format "%s:%s/%s" server-id pid status))))
+
+(defun lsp--map-tree-widget (m)
+  "Build `tree-widget' from a hash-table or plist M."
+  (when (lsp-structure-p m)
+    (let (nodes)
+      (lsp-map (lambda (k v)
+                 (push `(tree-widget
+                         :tag ,(if (lsp-structure-p v)
+                                   (format "%s:" k)
+                                 (format "%s: %s" k
+                                         (propertize (format "%s" v)
+                                                     'face
+                                                     'font-lock-string-face)))
+                         :open t
+                         ,@(lsp--map-tree-widget v))
+                       nodes))
+               m)
+      nodes)))
+
+(defun lsp-buffer-name (buffer-id)
+  (if-let* ((buffer-name (plist-get buffer-id :buffer-name)))
+      (funcall buffer-name buffer-id)
+    (buffer-name buffer-id)))
+
+(defun lsp--render-workspace (workspace)
+  "Tree node representation of WORKSPACE."
+  `(tree-widget :tag ,(lsp--workspace-print workspace)
+                :open t
+                (tree-widget :tag ,(propertize "Buffers" 'face 'font-lock-function-name-face)
+                             :open t
+                             ,@(->> workspace
+                                    (lsp--workspace-buffers)
+                                    (--map `(tree-widget
+                                             :tag ,(when (lsp-buffer-live-p it)
+                                                     (let ((buffer-name (lsp-buffer-name it)))
+                                                       (if (lsp-with-current-buffer it buffer-read-only)
+                                                           (propertize buffer-name 'face 'font-lock-constant-face)
+                                                         buffer-name)))))))
+                (tree-widget :tag ,(propertize "Capabilities" 'face 'font-lock-function-name-face)
+                             ,@(-> workspace lsp--workspace-server-capabilities lsp--map-tree-widget))))
+
+(define-derived-mode lsp-browser-mode special-mode "LspBrowser"
+  "Define mode for displaying lsp sessions."
+  (setq-local display-buffer-base-action '(nil . ((inhibit-same-window . t)))))
+
+(defun lsp-describe-session ()
+  "Describes current `lsp-session'."
+  (interactive)
+  (let ((session (lsp-session))
+        (buf (get-buffer-create "*lsp session*"))
+        (root (lsp-workspace-root)))
+    (with-current-buffer buf
+      (lsp-browser-mode)
+      (let ((inhibit-read-only t))
+        (erase-buffer)
+        (--each (lsp-session-folders session)
+          (widget-create
+           `(tree-widget
+             :tag ,(propertize it 'face 'font-lock-keyword-face)
+             :open t
+             ,@(->> session
+                    (lsp-session-folder->servers)
+                    (gethash it)
+                    (-map 'lsp--render-workspace)))))))
+    (pop-to-buffer buf)
+    (goto-char (point-min))
+    (cl-loop for tag = (widget-get (widget-get (widget-at) :node) :tag)
+             until (or (and root (string= tag root)) (eobp))
+             do (goto-char (next-overlay-change (point))))))
+
+(defun lsp--session-workspaces (session)
+  "Get all workspaces that are part of the SESSION."
+  (-> session lsp-session-folder->servers hash-table-values -flatten -uniq))
+
+(defun lsp--find-multiroot-workspace (session client project-root)
+  "Look for a multiroot connection in SESSION created from CLIENT for
+PROJECT-ROOT and BUFFER-MAJOR-MODE."
+  (when (lsp--client-multi-root client)
+    (-when-let (multi-root-workspace (->> session
+                                          (lsp--session-workspaces)
+                                          (--first (eq (-> it lsp--workspace-client lsp--client-server-id)
+                                                       (lsp--client-server-id client)))))
+      (with-lsp-workspace multi-root-workspace
+        (lsp-notify "workspace/didChangeWorkspaceFolders"
+                    (lsp-make-did-change-workspace-folders-params
+                     :event (lsp-make-workspace-folders-change-event
+                             :added (vector (lsp-make-workspace-folder
+                                             :uri (lsp--path-to-uri project-root)
+                                             :name (f-filename project-root)))
+                             :removed []))))
+
+      (->> session (lsp-session-folder->servers) (gethash project-root) (cl-pushnew multi-root-workspace))
+      (->> session (lsp-session-server-id->folders) (gethash (lsp--client-server-id client)) (cl-pushnew project-root))
+
+      (lsp--persist-session session)
+
+      (lsp--info "Opened folder %s in workspace %s" project-root (lsp--workspace-print multi-root-workspace))
+      (lsp--open-in-workspace multi-root-workspace)
+
+      multi-root-workspace)))
+
+(defun lsp--ensure-lsp-servers (session clients project-root ignore-multi-folder)
+  "Ensure that SESSION contain server CLIENTS created for PROJECT-ROOT.
+IGNORE-MULTI-FOLDER to ignore multi folder server."
+  (-map (lambda (client)
+          (or
+           (lsp--find-workspace session client project-root)
+           (unless ignore-multi-folder
+             (lsp--find-multiroot-workspace session client project-root))
+           (lsp--start-connection session client project-root)))
+        clients))
+
+(defun lsp--spinner-stop ()
+  "Stop the spinner in case all of the workspaces are started."
+  (when (--all? (eq (lsp--workspace-status it) 'initialized)
+                lsp--buffer-workspaces)
+    (spinner-stop)))
+
+(defun lsp--open-in-workspace (workspace)
+  "Open in existing WORKSPACE."
+  (if (eq 'initialized (lsp--workspace-status workspace))
+      ;; when workspace is initialized just call document did open.
+      (progn
+        (when-let* ((encoding (lsp:server-capabilities-position-encoding?
+                               (lsp--workspace-server-capabilities workspace))))
+          (lsp--set-position-encoding encoding))
+        (with-lsp-workspace workspace
+          (when-let* ((before-document-open-fn (-> workspace
+                                                  lsp--workspace-client
+                                                  lsp--client-before-file-open-fn)))
+            (funcall before-document-open-fn workspace))
+          (lsp--text-document-did-open))
+        (lsp--spinner-stop))
+    ;; when it is not initialized
+    (lsp--spinner-start)
+    (cl-pushnew (lsp-current-buffer) (lsp--workspace-buffers workspace))))
+
+(defun lsp--find-workspace (session client project-root)
+  "Find server connection created with CLIENT in SESSION for PROJECT-ROOT."
+  (when-let* ((workspace (->> session
+                             (lsp-session-folder->servers)
+                             (gethash project-root)
+                             (--first (eql (-> it lsp--workspace-client lsp--client-server-id)
+                                           (lsp--client-server-id client))))))
+    (lsp--open-in-workspace workspace)
+    workspace))
+
+(defun lsp--read-char (prompt &optional options)
+  "Wrapper for `read-char-from-minibuffer' if Emacs +27.
+Fallback to `read-key' otherwise.
+PROMPT is the message and OPTIONS the available options."
+  (if (fboundp 'read-char-from-minibuffer)
+      (read-char-from-minibuffer prompt options)
+    (read-key prompt)))
+
+(defun lsp--find-root-interactively (session)
+  "Find project interactively.
+Returns nil if the project should not be added to the current SESSION."
+  (condition-case nil
+      (let* ((project-root-suggestion (or (lsp--suggest-project-root) default-directory))
+             (action (lsp--read-char
+                      (format
+                       "%s is not part of any project.
+
+%s ==> Import project root %s
+%s ==> Import project by selecting root directory interactively
+%s ==> Import project at current directory %s
+%s ==> Do not ask again for the current project by adding %s to lsp-session-folders-blocklist
+%s ==> Do not ask again for the current project by selecting ignore path interactively
+%s ==> Do nothing: ask again when opening other files from the current project
+
+Select action: "
+                       (propertize (buffer-name) 'face 'bold)
+                       (propertize "i" 'face 'success)
+                       (propertize project-root-suggestion 'face 'bold)
+                       (propertize "I" 'face 'success)
+                       (propertize "." 'face 'success)
+                       (propertize default-directory 'face 'bold)
+                       (propertize "d" 'face 'warning)
+                       (propertize project-root-suggestion 'face 'bold)
+                       (propertize "D" 'face 'warning)
+                       (propertize "n" 'face 'warning))
+                      '(?i ?\r ?I ?. ?d ?D ?n))))
+        (cl-case action
+          (?i project-root-suggestion)
+          (?\r project-root-suggestion)
+          (?I (read-directory-name "Select workspace folder to add: "
+                                   (or project-root-suggestion default-directory)
+                                   nil
+                                   t))
+          (?. default-directory)
+          (?d (push project-root-suggestion (lsp-session-folders-blocklist session))
+              (lsp--persist-session session)
+              nil)
+          (?D (push (read-directory-name "Select folder to blocklist: "
+                                         (or project-root-suggestion default-directory)
+                                         nil
+                                         t)
+                    (lsp-session-folders-blocklist session))
+              (lsp--persist-session session)
+              nil)
+          (t nil)))
+    (quit)))
+
+(declare-function tramp-file-name-host "ext:tramp" (file) t)
+(declare-function tramp-dissect-file-name "ext:tramp" (file &optional nodefault))
+
+(defun lsp--files-same-host (f1 f2)
+  "Predicate on whether or not two files are on the same host."
+  (or (not (or (file-remote-p f1) (file-remote-p f2)))
+      (and (file-remote-p f1)
+           (file-remote-p f2)
+           (progn (require 'tramp)
+                  (equal (tramp-file-name-host (tramp-dissect-file-name f1))
+                         (tramp-file-name-host (tramp-dissect-file-name f2)))))))
+
+(defun lsp-find-session-folder (session file-name)
+  "Look in the current SESSION for folder containing FILE-NAME."
+  (let ((file-name-canonical (lsp-f-canonical file-name)))
+    (->> session
+         (lsp-session-folders)
+         (--filter (and (lsp--files-same-host it file-name-canonical)
+                        (or (lsp-f-same? it file-name-canonical)
+                            (and (f-dir? it)
+                                 (lsp-f-ancestor-of? it file-name-canonical)))))
+         (--max-by (> (length it)
+                      (length other))))))
+
+(defun lsp-find-workspace (server-id &optional file-name)
+  "Find workspace for SERVER-ID for FILE-NAME."
+  (-when-let* ((session (lsp-session))
+               (folder->servers (lsp-session-folder->servers session))
+               (workspaces (if file-name
+                               (gethash (lsp-find-session-folder session file-name) folder->servers)
+                             (lsp--session-workspaces session))))
+
+    (--first (eq (lsp--client-server-id (lsp--workspace-client it)) server-id) workspaces)))
+
+(defun lsp--calculate-root (session file-name)
+  "Calculate project root for FILE-NAME in SESSION."
+  (and
+   (->> session
+        (lsp-session-folders-blocklist)
+        (--first (and (lsp--files-same-host it file-name)
+                      (lsp-f-ancestor-of? it file-name)
+                      (prog1 t
+                        (lsp--info "File %s is in blocklisted directory %s" file-name it))))
+        not)
+   (or
+    (when lsp-auto-guess-root
+      (lsp--suggest-project-root))
+    (unless lsp-guess-root-without-session
+      (lsp-find-session-folder session file-name))
+    (unless lsp-auto-guess-root
+      (when-let* ((root-folder (lsp--find-root-interactively session)))
+        (if (or (not (f-equal? root-folder (expand-file-name "~/")))
+                (yes-or-no-p
+                 (concat
+                  (propertize "[WARNING] " 'face 'warning)
+                  "You are trying to import your home folder as project root. This may cause performance issue because some language servers (python, lua, etc) will try to scan all files under project root. To avoid that you may:
+
+1. Use `I' option from the interactive project import to select subfolder(e. g. `~/foo/bar' instead of `~/').
+2. If your file is under `~/' then create a subfolder and move that file in this folder.
+
+Type `No' to go back to project selection.
+Type `Yes' to confirm `HOME' as project root.
+Type `C-g' to cancel project import process and stop `lsp'")))
+            root-folder
+          (lsp--calculate-root session file-name)))))))
+
+(defun lsp--try-open-in-library-workspace ()
+  "Try opening current file as library file in any of the active workspace.
+The library folders are defined by each client for each of the active workspace."
+  (when-let* ((workspace (->> (lsp-session)
+                             (lsp--session-workspaces)
+                             ;; Sort the last active workspaces first as they are more likely to be
+                             ;; the correct ones, especially when jumping to a definition.
+                             (-sort (lambda (a _b)
+                                      (-contains? lsp--last-active-workspaces a)))
+                             (--first
+                              (and (-> it lsp--workspace-client lsp--supports-buffer?)
+                                   (when-let* ((library-folders-fn
+                                               (-> it lsp--workspace-client lsp--client-library-folders-fn)))
+                                     (-first (lambda (library-folder)
+                                               (lsp-f-ancestor-of? library-folder (buffer-file-name)))
+                                             (funcall library-folders-fn it))))))))
+    (lsp--open-in-workspace workspace)
+    (view-mode t)
+    (lsp--info "Opening read-only library file %s." (buffer-file-name))
+    (list workspace)))
+
+(defun lsp--persist-session (session)
+  "Persist SESSION to `lsp-session-file'."
+  (if lsp-session-file
+      (lsp--persist lsp-session-file (make-lsp-session
+                                      :folders (lsp-session-folders session)
+                                      :folders-blocklist (lsp-session-folders-blocklist session)
+                                      :server-id->folders
+                                      (lsp-session-server-id->folders session)))
+    (message "lsp-session-file is nil, not persisting session.")))
+
+(defun lsp--try-project-root-workspaces (ask-for-client ignore-multi-folder)
+  "Try create opening file as a project file.
+When IGNORE-MULTI-FOLDER is t the lsp mode will start new
+language server even if there is language server which can handle
+current language. When IGNORE-MULTI-FOLDER is nil current file
+will be opened in multi folder language server if there is
+such."
+  (-let ((session (lsp-session)))
+    (-if-let (clients (if ask-for-client
+                          (list (lsp--completing-read "Select server to start: "
+                                                      (ht-values lsp-clients)
+                                                      (-compose 'symbol-name 'lsp--client-server-id) nil t))
+                        (lsp--find-clients)))
+        (-if-let (project-root (-some-> session
+                                 (lsp--calculate-root (buffer-file-name))
+                                 (lsp-f-canonical)))
+            (progn
+              ;; update project roots if needed and persist the lsp session
+              (unless (-contains? (lsp-session-folders session) project-root)
+                (cl-pushnew project-root (lsp-session-folders session))
+                (lsp--persist-session session))
+              (lsp--ensure-lsp-servers session clients project-root ignore-multi-folder))
+          (lsp--warn "%s not in project or it is blocklisted." (buffer-name))
+          nil)
+      (lsp--warn "No LSP server for %s(check *lsp-log*)." major-mode)
+      nil)))
+
+(defun lsp-shutdown-workspace ()
+  "Shutdown language server."
+  (interactive)
+  (--when-let (pcase (lsp-workspaces)
+                (`nil (user-error "There are no active servers in the current buffer"))
+                (`(,workspace) (when (y-or-n-p (format "Are you sure you want to stop the server %s?"
+                                                       (lsp--workspace-print workspace)))
+                                 workspace))
+                (workspaces (lsp--completing-read "Select server: "
+                                                  workspaces
+                                                  'lsp--workspace-print nil t)))
+    (lsp-workspace-shutdown it)))
+
+(make-obsolete 'lsp-shutdown-workspace 'lsp-workspace-shutdown "lsp-mode 6.1")
+
+(defcustom lsp-auto-select-workspace t
+  "Shutdown or restart a single workspace.
+If set and the current buffer has only a single workspace
+associated with it, `lsp-shutdown-workspace' and
+`lsp-restart-workspace' will act on it without asking."
+  :type 'boolean
+  :group 'lsp-mode)
+
+(defun lsp--read-workspace ()
+  "Ask the user to select a workspace.
+Errors if there are none."
+  (pcase (lsp-workspaces)
+    (`nil (error "No workspaces associated with the current buffer"))
+    ((and `(,workspace) (guard lsp-auto-select-workspace)) workspace)
+    (workspaces (lsp--completing-read "Select workspace: " workspaces
+                                      #'lsp--workspace-print nil t))))
+
+(defun lsp-workspace-shutdown (workspace)
+  "Shut the workspace WORKSPACE and the language server associated with it"
+  (interactive (list (lsp--read-workspace)))
+  (lsp--warn "Stopping %s" (lsp--workspace-print workspace))
+  (with-lsp-workspace workspace (lsp--shutdown-workspace)))
+
+(defun lsp-disconnect ()
+  "Disconnect the buffer from the language server."
+  (interactive)
+  (lsp--text-document-did-close t)
+  (lsp-managed-mode -1)
+  (lsp-mode -1)
+  (remove-hook 'before-save-hook #'lsp--format-buffer-before-save t)
+  (remove-hook 'before-save-hook #'lsp--fix-all-before-save t)
+  (setq lsp--buffer-workspaces nil)
+  (lsp--info "Disconnected"))
+
+(defun lsp-restart-workspace ()
+  (interactive)
+  (--when-let (pcase (lsp-workspaces)
+                (`nil (user-error "There are no active servers in the current buffer"))
+                (`(,workspace) workspace)
+                (workspaces (lsp--completing-read "Select server: "
+                                                  workspaces
+                                                  'lsp--workspace-print nil t)))
+    (lsp-workspace-restart it)))
+
+(make-obsolete 'lsp-restart-workspace 'lsp-workspace-restart "lsp-mode 6.1")
+
+(defun lsp-workspace-restart (workspace)
+  "Restart the workspace WORKSPACE and the language server associated with it"
+  (interactive (list (lsp--read-workspace)))
+  (lsp--warn "Restarting %s" (lsp--workspace-print workspace))
+  (with-lsp-workspace workspace (lsp--shutdown-workspace t)))
+
+;;;###autoload
+(defun lsp (&optional arg)
+  "Entry point for the server startup.
+When ARG is t the lsp mode will start new language server even if
+there is language server which can handle current language. When
+ARG is nil current file will be opened in multi folder language
+server if there is such. When `lsp' is called with prefix
+argument ask the user to select which language server to start."
+  (interactive "P")
+
+  (lsp--require-packages)
+
+  (when (buffer-file-name)
+    (let (clients
+          (matching-clients (lsp--filter-clients
+                             (-andfn #'lsp--supports-buffer?
+                                     #'lsp--server-binary-present?))))
+      (cond
+       (matching-clients
+        (when (setq lsp--buffer-workspaces
+                    (or (and
+                         ;; Don't open as library file if file is part of a project.
+                         (not (lsp-find-session-folder (lsp-session) (buffer-file-name)))
+                         (lsp--try-open-in-library-workspace))
+                        (lsp--try-project-root-workspaces (equal arg '(4))
+                                                          (and arg (not (equal arg 1))))))
+          (lsp-mode 1)
+          ;; Register before-save hooks. Emacs runs hooks in reverse order,
+          ;; so fix-all runs before format (fix issues first, then format).
+          (add-hook 'before-save-hook #'lsp--format-buffer-before-save nil t)
+          (add-hook 'before-save-hook #'lsp--fix-all-before-save nil t)
+          (when lsp-auto-configure (lsp--auto-configure))
+          (setq lsp-buffer-uri (lsp--buffer-uri))
+          (lsp--info "Connected to %s."
+                     (apply 'concat (--map (format "[%s %s]"
+                                                   (lsp--workspace-print it)
+                                                   (lsp--workspace-root it))
+                                           lsp--buffer-workspaces)))))
+       ;; look for servers which are currently being downloaded.
+       ((setq clients (lsp--filter-clients (-andfn #'lsp--supports-buffer?
+                                                   #'lsp--client-download-in-progress?)))
+        (lsp--info "There are language server(%s) installation in progress.
+The server(s) will be started in the buffer when it has finished."
+                   (-map #'lsp--client-server-id clients))
+        (seq-do (lambda (client)
+                  (cl-pushnew (current-buffer) (lsp--client-buffers client)))
+                clients))
+       ;; look for servers to install
+       ((setq clients (lsp--filter-clients
+                       (-andfn #'lsp--supports-buffer?
+                               (-const lsp-enable-suggest-server-download)
+                               #'lsp--client-download-server-fn
+                               (-not #'lsp--client-download-in-progress?))))
+        (let ((client (lsp--completing-read
+                       (concat "Unable to find installed server supporting this file. "
+                               "The following servers could be installed automatically: ")
+                       clients
+                       (-compose #'symbol-name #'lsp--client-server-id)
+                       nil
+                       t)))
+          (cl-pushnew (current-buffer) (lsp--client-buffers client))
+          (lsp--install-server-internal client)))
+       ;; ignore other warnings
+       ((not lsp-warn-no-matched-clients)
+        nil)
+       ;; automatic installation disabled
+       ((setq clients (unless matching-clients
+                        (lsp--filter-clients (-andfn #'lsp--supports-buffer?
+                                                     #'lsp--client-download-server-fn
+                                                     (-not (-const lsp-enable-suggest-server-download))
+                                                     (-not #'lsp--server-binary-present?)))))
+        (lsp--warn "The following servers support current file but automatic download is disabled: %s
+\(If you have already installed the server check *lsp-log*)."
+                   (mapconcat (lambda (client)
+                                (symbol-name (lsp--client-server-id client)))
+                              clients
+                              " ")))
+       ;; no clients present
+       ((setq clients (unless matching-clients
+                        (lsp--filter-clients (-andfn #'lsp--supports-buffer?
+                                                     (-not #'lsp--server-binary-present?)))))
+        (lsp--warn "The following servers support current file but do not have automatic installation: %s
+You may find the installation instructions at https://emacs-lsp.github.io/lsp-mode/page/languages.
+\(If you have already installed the server check *lsp-log*)."
+                   (mapconcat (lambda (client)
+                                (symbol-name (lsp--client-server-id client)))
+                              clients
+                              " ")))
+       ;; no matches
+       ((-> #'lsp--supports-buffer? lsp--filter-clients not)
+        (lsp--error "There are no language servers supporting current mode `%s' registered with `lsp-mode'.
+This issue might be caused by:
+1. The language you are trying to use does not have built-in support in `lsp-mode'. You must install the required support manually. Examples of this are `lsp-java' or `lsp-metals'.
+2. The language server that you expect to run is not configured to run for major mode `%s'. You may check that by checking the `:major-modes' that are passed to `lsp-register-client'.
+3. The language server that you expect to run has an `:activation-fn` passed to `lsp-register-client` that prevents it supporting this buffer.
+4. `lsp-mode' doesn't have any integration for the language behind `%s'. Refer to https://emacs-lsp.github.io/lsp-mode/page/languages and https://langserver.org/ .
+5. You are over `tramp'. In this case follow https://emacs-lsp.github.io/lsp-mode/page/remote/.
+6. You have disabled the `lsp-mode' clients for that file. (Check `lsp-enabled-clients' and `lsp-disabled-clients').
+You can customize `lsp-warn-no-matched-clients' to disable this message."
+                    major-mode major-mode major-mode))))))
+
+(defun lsp--buffer-visible-p ()
+  "Return non nil if current buffer is visible."
+  (or (buffer-modified-p) (get-buffer-window nil t)))
+
+(defun lsp--init-if-visible ()
+  "Run `lsp' for the current buffer if the buffer is visible.
+Returns non nil if `lsp' was run for the buffer."
+  (when (lsp--buffer-visible-p)
+    (remove-hook 'window-configuration-change-hook #'lsp--init-if-visible t)
+    (lsp)
+    t))
+
+;;;###autoload
+(defun lsp-deferred ()
+  "Entry point that defers server startup until buffer is visible.
+`lsp-deferred' will wait until the buffer is visible before invoking `lsp'.
+This avoids overloading the server with many files when starting Emacs."
+  ;; Workspace may not be initialized yet. Use a buffer local variable to
+  ;; remember that we deferred loading of this buffer.
+  (setq lsp--buffer-deferred t)
+  (let ((buffer (current-buffer)))
+    ;; Avoid false positives as desktop-mode restores buffers by deferring
+    ;; visibility check until the stack clears.
+    (run-with-idle-timer 0 nil (lambda ()
+                                 (when (buffer-live-p buffer)
+                                   (with-current-buffer buffer
+                                     (unless (lsp--init-if-visible)
+                                       (add-hook 'window-configuration-change-hook #'lsp--init-if-visible nil t))))))))
+
+
+
+(defvar lsp-file-truename-cache (ht))
+
+(defmacro lsp-with-cached-filetrue-name (&rest body)
+  "Executes BODY caching the `file-truename' calls."
+  `(let ((old-fn (symbol-function 'file-truename)))
+     (unwind-protect
+         (progn
+           (fset 'file-truename
+                 (lambda (file-name &optional counter prev-dirs)
+                   (or (gethash file-name lsp-file-truename-cache)
+                       (puthash file-name (apply old-fn (list file-name counter prev-dirs))
+                                lsp-file-truename-cache))))
+           ,@body)
+       (fset 'file-truename old-fn))))
+
+
+(defun lsp-virtual-buffer-call (key &rest args)
+  (when lsp--virtual-buffer
+    (when-let* ((fn (plist-get lsp--virtual-buffer key)))
+      (apply fn args))))
+
+(defun lsp-translate-column (column)
+  "Translate COLUMN taking into account virtual buffers."
+  (or (lsp-virtual-buffer-call :real->virtual-char column)
+      column))
+
+(defun lsp-translate-line (line)
+  "Translate LINE taking into account virtual buffers."
+  (or (lsp-virtual-buffer-call :real->virtual-line line)
+      line))
+
+
+;; lsp internal validation.
+
+(defmacro lsp--doctor (&rest checks)
+  `(-let [buf (current-buffer)]
+     (with-current-buffer (get-buffer-create "*lsp-performance*")
+       (with-help-window (current-buffer)
+         ,@(-map (-lambda ((msg form))
+                   `(insert (format "%s: %s\n" ,msg
+                                    (let ((res (with-current-buffer buf
+                                                 ,form)))
+                                      (cond
+                                       ((eq res :optional) (propertize "OPTIONAL" 'face 'warning))
+                                       (res (propertize "OK" 'face 'success))
+                                       (t (propertize "ERROR" 'face 'error)))))))
+                 (-partition 2 checks))))))
+
+(define-obsolete-function-alias 'lsp-diagnose
+  'lsp-doctor "lsp-mode 8.0.0")
+
+(defun lsp-doctor ()
+  "Validate performance settings."
+  (interactive)
+  (lsp--doctor
+   "Checking for Native JSON support" (functionp 'json-serialize)
+   "Check emacs supports `read-process-output-max'" (boundp 'read-process-output-max)
+   "Check `read-process-output-max' default has been changed from 4k"
+   (and (boundp 'read-process-output-max)
+        (> read-process-output-max 4096))
+   "Byte compiled against Native JSON (recompile lsp-mode if failing when Native JSON available)"
+   (condition-case _err
+       (progn (lsp--make-message (list "a" "b"))
+              nil)
+     (error t))
+   "`gc-cons-threshold' increased?" (> gc-cons-threshold 800000)
+   "Using `plist' for deserialized objects? (refer to https://emacs-lsp.github.io/lsp-mode/page/performance/#use-plists-for-deserialization)" (or lsp-use-plists :optional)
+   "Using emacs 28+ with native compilation?"
+   (or (and (fboundp 'native-comp-available-p)
+            (native-comp-available-p))
+       :optional)))
+
+(declare-function package-version-join "ext:package")
+(declare-function package-desc-version "ext:package")
+(declare-function package--alist "ext:package")
+
+(defun lsp-package-version ()
+  "Returns a string with the version of the lsp-mode package."
+  (condition-case nil
+      (package-version-join
+       (package-desc-version
+        (car (alist-get 'lsp-mode (package--alist)))))
+    (error "10.0.0")))
+
+(defun lsp-version ()
+  "Return string describing current version of `lsp-mode'."
+  (interactive)
+  (unless (featurep 'package)
+    (require 'package))
+  (let ((ver (format "lsp-mode %s, Emacs %s, %s"
+                     (lsp-package-version)
+                     emacs-version
+                     system-type)))
+    (if (called-interactively-p 'interactive)
+        (lsp--info "%s" ver)
+      ver)))
+
+
+
+;; org-mode/virtual-buffer
+
+(declare-function org-babel-get-src-block-info "ext:ob-core")
+(declare-function org-do-remove-indentation "ext:org-macs")
+(declare-function org-src-get-lang-mode "ext:org-src")
+(declare-function org-element-context "ext:org-element")
+
+(defvar lsp--org-element-use-new-api nil
+  "Whether org-element supports the new property-based API.
+This is t for org-mode 9.7 and later, nil for earlier versions.
+Determined at load time to avoid runtime performance impact.")
+
+(defun lsp--detect-org-element-api ()
+  "Detect which org-element API version is available.
+Returns t if org 9.7+ API is available (property-based), nil otherwise."
+  (with-temp-buffer
+    (insert "#+BEGIN_SRC emacs-lisp\n(+ 1 1)\n#+END_SRC")
+    (org-mode)
+    (goto-char (point-min))
+    (let ((elem (org-element-context)))
+      (not (plist-member (cl-second elem) :begin)))))
+
+(with-eval-after-load 'org-element
+  (setq lsp--org-element-use-new-api (lsp--detect-org-element-api)))
+
+(defun lsp--virtual-buffer-update-position ()
+  (-if-let (virtual-buffer (-first (-lambda ((&plist :in-range))
+                                     (funcall in-range))
+                                   lsp--virtual-buffer-connections))
+      (unless (equal virtual-buffer lsp--virtual-buffer)
+        (lsp-org))
+    (when lsp-managed-mode
+      (lsp-managed-mode -1)
+      (lsp-mode -1)
+      (setq lsp--buffer-workspaces nil)
+      (setq lsp--virtual-buffer nil)
+      (setq lsp-buffer-uri nil)
+
+      ;; force refresh of diagnostics
+      (run-hooks 'lsp-after-diagnostics-hook))))
+
+(defun lsp-virtual-buffer-on-change (start end length)
+  "Adjust on change event to be executed against the proper language server."
+  (let ((max-point (max end
+                        (or (plist-get lsp--before-change-vals :end) 0)
+                        (+ start length))))
+    (when-let* ((virtual-buffer (-first (lambda (vb)
+                                         (let ((lsp--virtual-buffer vb))
+                                           (and (lsp-virtual-buffer-call :in-range start)
+                                                (lsp-virtual-buffer-call :in-range max-point))))
+                                       lsp--virtual-buffer-connections)))
+      (lsp-with-current-buffer virtual-buffer
+        (lsp-on-change start end length
+                       (lambda (&rest _)
+                         (list :range (lsp--range (list :character 0 :line 0)
+                                                  lsp--virtual-buffer-point-max)
+                               :text (lsp--buffer-content))))))))
+
+(defun lsp-virtual-buffer-before-change (start _end)
+  (when-let* ((virtual-buffer (-first (lambda (vb)
+                                       (lsp-with-current-buffer vb
+                                         (lsp-virtual-buffer-call :in-range start)))
+                                     lsp--virtual-buffer-connections)))
+    (lsp-with-current-buffer virtual-buffer
+      (setq lsp--virtual-buffer-point-max
+            (lsp--point-to-position (lsp-virtual-buffer-call :last-point))))))
+
+(defun lsp-patch-on-change-event ()
+  (remove-hook 'after-change-functions #'lsp-on-change t)
+  (add-hook 'after-change-functions #'lsp-virtual-buffer-on-change nil t)
+  (add-hook 'before-change-functions #'lsp-virtual-buffer-before-change nil t))
+
+(defun lsp-kill-virtual-buffers ()
+  (mapc #'lsp-virtual-buffer-disconnect lsp--virtual-buffer-connections))
+
+(defun lsp--move-point-in-indentation (point indentation)
+  (save-excursion
+    (goto-char point)
+    (if (<= point (+ (line-beginning-position) indentation))
+        (line-beginning-position)
+      point)))
+
+(declare-function flycheck-checker-supports-major-mode-p "ext:flycheck")
+(declare-function flycheck-add-mode "ext:flycheck")
+(declare-function lsp-diagnostics-lsp-checker-if-needed "lsp-diagnostics")
+
+(defalias 'lsp-client-download-server-fn 'lsp--client-download-server-fn)
+
+(defun lsp-flycheck-add-mode (mode)
+  "Register flycheck support for MODE."
+  (lsp-diagnostics-lsp-checker-if-needed)
+  (unless (flycheck-checker-supports-major-mode-p 'lsp mode)
+    (flycheck-add-mode 'lsp mode)))
+
+(defun lsp-progress-spinner-type ()
+  "Retrieve the spinner type value, if value is not a symbol of `spinner-types
+defaults to `progress-bar."
+  (or (car (assoc lsp-progress-spinner-type spinner-types)) 'progress-bar))
+
+(defun lsp-org ()
+  (interactive)
+  (-if-let ((virtual-buffer &as &plist :workspaces) (-first (-lambda ((&plist :in-range))
+                                                              (funcall in-range))
+                                                            lsp--virtual-buffer-connections))
+      (unless (equal lsp--virtual-buffer virtual-buffer)
+        (setq lsp--buffer-workspaces workspaces)
+        (setq lsp--virtual-buffer virtual-buffer)
+        (setq lsp-buffer-uri nil)
+        (lsp-mode 1)
+        (lsp-managed-mode 1)
+        (lsp-patch-on-change-event))
+
+    (save-excursion
+      (-let* (virtual-buffer
+              (wcb (lambda (f)
+                     (with-current-buffer (plist-get virtual-buffer :buffer)
+                       (-let* (((&plist :major-mode :buffer-file-name
+                                        :goto-buffer :workspaces) virtual-buffer)
+                               (lsp--virtual-buffer virtual-buffer)
+                               (lsp--buffer-workspaces workspaces))
+                         (save-excursion
+                           (funcall goto-buffer)
+                           (funcall f))))))
+              ((begin end post-blank language)
+               (if lsp--org-element-use-new-api
+                   ;; org 9.7+ - use property-based API
+                   (with-no-warnings
+                     (--map (org-element-property it (org-element-context) nil t)
+                            '(:begin :end :post-blank :language)))
+                 ;; org < 9.7 - use plist destructuring
+                 (cl-second (org-element-context))))
+              ((&alist :tangle file-name) (cl-third (org-babel-get-src-block-info 'light)))
+
+              (file-name (if file-name
+                             (f-expand file-name)
+                           (user-error "You should specify file name in the src block header.")))
+              (begin-marker (progn
+                              (goto-char begin)
+                              (forward-line)
+                              (set-marker (make-marker) (point))))
+              (end-marker (progn
+                            (goto-char end)
+                            (forward-line (1- (- post-blank)))
+                            (set-marker (make-marker) (1+ (point)))))
+              (buf (current-buffer))
+              (src-block (buffer-substring-no-properties begin-marker
+                                                         (1- end-marker)))
+              (indentation (with-temp-buffer
+                             (insert src-block)
+
+                             (goto-char (point-min))
+                             (let ((indentation (current-indentation)))
+                               (plist-put lsp--virtual-buffer :indentation indentation)
+                               (org-do-remove-indentation)
+                               (goto-char (point-min))
+                               (- indentation (current-indentation))))))
+        (add-hook 'post-command-hook #'lsp--virtual-buffer-update-position nil t)
+
+        (when (fboundp 'flycheck-add-mode)
+          (lsp-flycheck-add-mode 'org-mode))
+
+        (setq lsp--virtual-buffer
+              (list
+               :in-range (lambda (&optional point)
+                           (<= begin-marker (or point (point)) (1- end-marker)))
+               :goto-buffer (lambda () (goto-char begin-marker))
+               :buffer-string
+               (lambda ()
+                 (let ((src-block (buffer-substring-no-properties
+                                   begin-marker
+                                   (1- end-marker))))
+                   (with-temp-buffer
+                     (insert src-block)
+
+                     (goto-char (point-min))
+                     (while (not (eobp))
+                       (delete-region (point) (if (> (+ (point) indentation) (line-end-position))
+                                                  (line-end-position)
+                                                (+ (point) indentation)))
+                       (forward-line))
+                     (buffer-substring-no-properties (point-min)
+                                                     (point-max)))))
+               :buffer buf
+               :begin begin-marker
+               :end end-marker
+               :indentation indentation
+               :last-point (lambda () (1- end-marker))
+               :cur-position (lambda ()
+                               (lsp-save-restriction-and-excursion
+                                 (list :line (- (lsp--cur-line)
+                                                (lsp--cur-line begin-marker))
+                                       :character (let ((character (- (point)
+                                                                      (line-beginning-position)
+                                                                      indentation)))
+                                                    (if (< character 0)
+                                                        0
+                                                      character)))))
+               :line/character->point (-lambda (line character)
+                                        (-let [inhibit-field-text-motion t]
+                                          (+ indentation
+                                             (lsp-save-restriction-and-excursion
+                                               (goto-char begin-marker)
+                                               (forward-line line)
+                                               (-let [line-end (line-end-position)]
+                                                 (if (> character (- line-end (point)))
+                                                     line-end
+                                                   (forward-char character)
+                                                   (point)))))))
+               :major-mode (org-src-get-lang-mode language)
+               :buffer-file-name file-name
+               :buffer-uri (lsp--path-to-uri file-name)
+               :with-current-buffer wcb
+               :buffer-live? (lambda (_) (buffer-live-p buf))
+               :buffer-name (lambda (_)
+                              (propertize (format "%s(%s:%s)%s"
+                                                  (buffer-name buf)
+                                                  begin-marker
+                                                  end-marker
+                                                  language)
+                                          'face 'italic))
+               :real->virtual-line (lambda (line)
+                                     (+ line (line-number-at-pos begin-marker) -1))
+               :real->virtual-char (lambda (char) (+ char indentation))
+               :cleanup (lambda ()
+                          (set-marker begin-marker nil)
+                          (set-marker end-marker nil))))
+        (setf virtual-buffer lsp--virtual-buffer)
+        (puthash file-name virtual-buffer lsp--virtual-buffer-mappings)
+        (push virtual-buffer lsp--virtual-buffer-connections)
+
+        ;; TODO: tangle only connected sections
+        (add-hook 'after-save-hook 'org-babel-tangle nil t)
+        (add-hook 'lsp-after-open-hook #'lsp-patch-on-change-event nil t)
+        (add-hook 'kill-buffer-hook #'lsp-kill-virtual-buffers nil t)
+
+        (setq lsp--buffer-workspaces
+              (lsp-with-current-buffer virtual-buffer
+                (lsp)
+                (plist-put virtual-buffer :workspaces (lsp-workspaces))
+                (lsp-workspaces)))))))
+
+(defun lsp-virtual-buffer-disconnect (virtual-buffer)
+  (interactive (list (or
+                      lsp--virtual-buffer
+                      (when lsp--virtual-buffer-connections
+                        (lsp--completing-read "Select virtual buffer to disconnect: "
+                                              lsp--virtual-buffer-connections
+                                              (-lambda ((&plist :buffer-file-name))
+                                                buffer-file-name))))))
+  (-if-let ((&plist :buffer-file-name file-name :cleanup) virtual-buffer)
+      (progn
+        (lsp-with-current-buffer virtual-buffer
+          (lsp--text-document-did-close))
+        (setq lsp--virtual-buffer-connections (-remove-item virtual-buffer lsp--virtual-buffer-connections))
+        (when (eq virtual-buffer lsp--virtual-buffer)
+          (setf lsp--virtual-buffer nil))
+        (when cleanup (funcall cleanup))
+        (remhash file-name lsp--virtual-buffer-mappings)
+
+        (lsp--virtual-buffer-update-position)
+        (lsp--info "Disconnected from buffer %s" file-name))
+    (lsp--error "Nothing to disconnect from?")))
+
+
+;; inlay hints
+
+(defface lsp-inlay-hint-face
+  '((t :inherit font-lock-comment-face))
+  "The face to use for inlay hints."
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defface lsp-inlay-hint-type-face
+  '((t :inherit lsp-inlay-hint-face))
+  "Face for inlay type hints (e.g. inferred variable types)."
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-inlay-hint-type-format "%s"
+  "Format string for variable inlays (part of the inlay face)."
+  :type '(string :tag "String")
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defface lsp-inlay-hint-parameter-face
+  '((t :inherit lsp-inlay-hint-face))
+  "Face for inlay parameter hints (e.g. function parameter names at
+call-site)."
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-inlay-hint-param-format "%s"
+  "Format string for parameter inlays (part of the inlay face)."
+  :type '(string :tag "String")
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-update-inlay-hints-on-scroll t
+  "If non-nil update inlay hints immediately when scrolling or
+modifying window sizes."
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp--format-inlay (text kind)
+  (cond
+   ((eql kind lsp/inlay-hint-kind-type-hint) (format lsp-inlay-hint-type-format text))
+   ((eql kind lsp/inlay-hint-kind-parameter-hint) (format lsp-inlay-hint-param-format text))
+   (t text)))
+
+(defun lsp--face-for-inlay (kind)
+  (cond
+   ((eql kind lsp/inlay-hint-kind-type-hint) 'lsp-inlay-hint-type-face)
+   ((eql kind lsp/inlay-hint-kind-parameter-hint) 'lsp-inlay-hint-parameter-face)
+   (t 'lsp-inlay-hint-face)))
+
+(defun lsp--inlay-hint-tooltip-text (tooltip)
+  "Extract plain text from TOOLTIP (string or MarkupContent)."
+  (cond
+   ((stringp tooltip) tooltip)
+   ((lsp-markup-content? tooltip) (lsp:markup-content-value tooltip))
+   (t nil)))
+
+(defun lsp--update-inlay-hints-scroll-function (window start)
+  (lsp-update-inlay-hints start (window-end window t)))
+
+(defun lsp--update-inlay-hints ()
+  (lsp-update-inlay-hints (window-start) (window-end nil t)))
+
+(defun lsp--inlay-hint-label-part-string (part kind)
+  "Render a single InlayHintLabelPart PART with text properties for KIND."
+  (-let (((&InlayHintLabelPart :value :tooltip? :location? :command?) part))
+    (let ((str value)
+          (face (lsp--face-for-inlay kind))
+          (interactive (or location? command?)))
+      (apply #'propertize str
+             'font-lock-face face
+             (append
+              (when tooltip?
+                (list 'help-echo (lsp--inlay-hint-tooltip-text tooltip?)))
+              (when interactive
+                (list 'mouse-face 'highlight
+                      'pointer 'hand))
+              (when location?
+                (list 'lsp-inlay-hint-location location?))
+              (when command?
+                (list 'lsp-inlay-hint-command command?)))))))
+
+(defun lsp--label-from-inlay-hints-response (label kind)
+  "Build a propertized string from LABEL for inlay hint of KIND.
+LABEL is either a string or a vector of InlayHintLabelPart."
+  (cl-typecase label
+    (string (propertize (lsp--format-inlay label kind)
+                        'font-lock-face (lsp--face-for-inlay kind)))
+    (vector
+     (string-join (mapcar (lambda (part)
+                            (lsp--inlay-hint-label-part-string part kind))
+                          label)))))
+
+(defun lsp--inlay-hint-resolve (hint)
+  "Resolve HINT by sending inlayHint/resolve if the server supports it.
+Returns the resolved hint, or the original if resolve is not supported."
+  (if (lsp-feature? "inlayHint/resolve")
+      (condition-case err
+          (lsp-request "inlayHint/resolve" hint)
+        (error
+         (lsp--warn "Failed to resolve inlay hint: %s" (error-message-string err))
+         hint))
+    hint))
+
+(defun lsp-inlay-hint-accept ()
+  "Accept the inlay hint at point, applying its text edits.
+If the hint has no textEdits, tries to resolve them via inlayHint/resolve."
+  (interactive)
+  (if-let* ((overlays (overlays-in (point) (1+ (point))))
+            (overlay (cl-find-if (lambda (ov)
+                                   (and (overlay-get ov 'lsp-inlay-hint)
+                                        (= (overlay-start ov) (point))))
+                                 overlays))
+            (hint (overlay-get overlay 'lsp-inlay-hint-data)))
+      (let* ((resolved (if (lsp:inlay-hint-text-edits? hint)
+                           hint
+                         (lsp--inlay-hint-resolve hint)))
+             (edits (lsp:inlay-hint-text-edits? resolved)))
+        (if edits
+            (progn
+              (lsp--apply-text-edits edits 'inlay-hint-accept)
+              (lsp--update-inlay-hints))
+          (lsp--info "No text edits available for this inlay hint.")))
+    (lsp--info "No inlay hint at point.")))
+
+(defun lsp--inlay-hint-mouse-handler (event)
+  "Handle mouse click EVENT on an inlay hint overlay.
+Click precedence: label part location > label part command > hint accept."
+  (interactive "e")
+  (let* ((pos-data (posn-string (event-start event)))
+         (string (car pos-data))
+         (char-pos (cdr pos-data)))
+    (cond
+     ;; Label part with location: navigate
+     ((and string char-pos
+           (get-text-property char-pos 'lsp-inlay-hint-location string))
+      (-let* ((location (get-text-property char-pos 'lsp-inlay-hint-location string))
+              ((&Location :uri :range (&Range :start)) location)
+              (path (lsp--uri-to-path uri)))
+        (xref-push-marker-stack)
+        (find-file path)
+        (goto-char (lsp--position-to-point start))))
+     ;; Label part with command: execute
+     ((and string char-pos
+           (get-text-property char-pos 'lsp-inlay-hint-command string))
+      (lsp--execute-command
+       (get-text-property char-pos 'lsp-inlay-hint-command string)))
+     ;; Default: accept the hint (apply textEdits)
+     (t
+      (let* ((click-posn (event-start event))
+             (window (posn-window click-posn))
+             (pos (posn-point click-posn)))
+        (with-selected-window window
+          (goto-char pos)
+          (lsp-inlay-hint-accept)))))))
+
+(defvar lsp--inlay-hint-mouse-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map [mouse-1] #'lsp--inlay-hint-mouse-handler)
+    map)
+  "Keymap for inlay hint overlays.")
+
+(defun lsp-update-inlay-hints (start end)
+  "Update inlay hints between START and END buffer positions."
+  (lsp-request-async
+   "textDocument/inlayHint"
+   (lsp-make-inlay-hints-params
+    :text-document (lsp--text-document-identifier)
+    :range (lsp-make-range :start
+                           (lsp-point-to-position start)
+                           :end
+                           (lsp-point-to-position end)))
+   (lambda (res)
+     (lsp--remove-overlays 'lsp-inlay-hint)
+     (dolist (hint res)
+       (-let* (((&InlayHint :label :position :kind? :padding-left? :padding-right?
+                             :tooltip?) hint)
+               (kind (or kind? lsp/inlay-hint-kind-type-hint))
+               (label-str (lsp--label-from-inlay-hints-response label kind))
+               (pos (lsp--position-to-point position)))
+         (when label-str
+           (let ((overlay (make-overlay pos pos nil 'front-advance 'end-advance)))
+             (overlay-put overlay 'lsp-inlay-hint t)
+             (overlay-put overlay 'lsp-inlay-hint-data hint)
+             (overlay-put overlay 'before-string
+                          (propertize
+                           (format "%s%s%s"
+                                   (if padding-left? " " "")
+                                   (let ((s label-str))
+                                     ;; Add hint-level tooltip as help-echo if no per-part tooltip
+                                     (when (and tooltip? (stringp label))
+                                       (setq s (propertize s 'help-echo
+                                                           (lsp--inlay-hint-tooltip-text tooltip?))))
+                                     s)
+                                   (if padding-right? " " ""))
+                           'keymap lsp--inlay-hint-mouse-map)))))))
+   :mode 'tick
+   :cancel-token :inlay-hints))
+
+(define-minor-mode lsp-inlay-hints-mode
+  "Mode for displaying inlay hints."
+  :lighter nil
+  (cond
+   ((and lsp-inlay-hints-mode lsp--buffer-workspaces)
+    (add-hook 'lsp-on-idle-hook #'lsp--update-inlay-hints nil t)
+    (when lsp-update-inlay-hints-on-scroll
+      (add-to-list (make-local-variable 'window-scroll-functions)
+                   #'lsp--update-inlay-hints-scroll-function)))
+   (t
+    (lsp--remove-overlays 'lsp-inlay-hint)
+    (remove-hook 'lsp-on-idle-hook #'lsp--update-inlay-hints t)
+    (setf window-scroll-functions
+          (delete #'lsp--update-inlay-hints-scroll-function window-scroll-functions)))))
+
+
+
+;;;###autoload
+(defun lsp-start-plain ()
+  "Start `lsp-mode' using minimal configuration using the latest `melpa' version
+of the packages.
+
+In case the major-mode that you are using for "
+  (interactive)
+  (let ((start-plain (make-temp-file "plain" nil ".el")))
+    (url-copy-file "https://raw.githubusercontent.com/emacs-lsp/lsp-mode/master/scripts/lsp-start-plain.el"
+                   start-plain t)
+    (start-process "lsp-start-plain"
+                   (generate-new-buffer " *lsp-start-plain*")
+                   (expand-file-name invocation-name invocation-directory)
+                    "-q" "-l" start-plain (or (buffer-file-name) ""))))
+
+
+
+(provide 'lsp-mode)
+;;; lsp-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-modeline.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-modeline.el
new file mode 100644
index 0000000..36ab8ad
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-modeline.el
@@ -0,0 +1,352 @@
+;;; lsp-modeline.el --- LSP modeline features -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;;  LSP modeline
+;;
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-icons)
+
+(defgroup lsp-modeline nil
+  "LSP support for modeline"
+  :prefix "lsp-modeline-"
+  :group 'lsp-mode
+  :tag "LSP Modeline")
+
+(defcustom lsp-modeline-code-actions-kind-regex "$\\|quickfix.*\\|refactor.*"
+  "Regex for the code actions kinds to show in the modeline."
+  :type 'string
+  :group 'lsp-modeline)
+
+(defcustom lsp-modeline-code-actions-segments '(count icon)
+  "Define what should display on the modeline when code actions are available."
+  :type '(repeat (choice
+                  (const :tag "Show the lightbulb icon" icon)
+                  (const :tag "Show the name of the preferred code action" name)
+                  (const :tag "Show the count of how many code actions available" count)))
+  :group 'lsp-modeline
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-modeline-code-action-fallback-icon "💡"
+  "Define what should display on the modeline when code actions are available."
+  :type 'string
+  :group 'lsp-modeline
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defface lsp-modeline-code-actions-face
+  '((t :inherit homoglyph))
+  "Face used to code action text on modeline."
+  :group 'lsp-modeline)
+
+(defface lsp-modeline-code-actions-preferred-face
+  '((t :foreground "yellow"))
+  "Face used to code action text on modeline."
+  :group 'lsp-modeline)
+
+;;;###autoload
+(define-obsolete-variable-alias 'lsp-diagnostics-modeline-scope
+  'lsp-modeline-diagnostics-scope  "lsp-mode 7.0.1")
+
+(defcustom lsp-modeline-diagnostics-scope :workspace
+  "The modeline diagnostics scope."
+  :group 'lsp-modeline
+  :type '(choice (const :tag "File" :file)
+                 (const :tag "Project" :workspace)
+                 (const :tag "All Projects" :global))
+  :package-version '(lsp-mode . "6.3"))
+
+(declare-function lsp-treemacs-errors-list "ext:lsp-treemacs" t)
+
+
+;; code actions
+
+(defvar-local lsp-modeline--code-actions-string nil
+  "Holds the current code action string on modeline.")
+
+(defun lsp-modeline--code-action-face (preferred-code-action)
+  "Return the face checking if there is any PREFERRED-CODE-ACTION."
+  (if preferred-code-action
+      'lsp-modeline-code-actions-preferred-face
+    'lsp-modeline-code-actions-face))
+
+(defun lsp-modeline--code-action-name (actions preferred-code-action-title)
+  "Return the code action name from ACTIONS and PREFERRED-CODE-ACTION-TITLE."
+  (or preferred-code-action-title
+      (->> actions
+           lsp-seq-first
+           lsp-modeline--code-action->string)))
+
+(defun lsp-modeline--code-action->string (action)
+  "Convert code ACTION to friendly string."
+  (->> action
+       lsp:code-action-title
+       (replace-regexp-in-string "[\n\t ]+" " ")))
+
+(defun lsp-modeline--build-code-actions-segments (actions)
+  "Build the code ACTIONS string from the defined segments."
+  (let* ((preferred-code-action (-some->> actions
+                                  (-first #'lsp:code-action-is-preferred?)
+                                  lsp-modeline--code-action->string))
+         (face (lsp-modeline--code-action-face preferred-code-action)))
+    (mapconcat
+     (lambda (segment)
+       (pcase segment
+         ('icon (lsp-icons-all-the-icons-icon
+                 'octicon
+                 "light-bulb"
+                 face
+                 lsp-modeline-code-action-fallback-icon
+                 'modeline-code-action
+                 :v-adjust -0.0575))
+         ('name (propertize (lsp-modeline--code-action-name actions preferred-code-action)
+                            'face face))
+         ('count (propertize (number-to-string (seq-length actions))
+                             'face face))))
+     lsp-modeline-code-actions-segments " ")))
+
+(defun lsp-modeline--build-code-actions-string (actions)
+  "Build the string to be presented on modeline for code ACTIONS."
+  (-let* ((single-action? (= (length actions) 1))
+          (keybinding (concat "("
+                              (-some->> #'lsp-execute-code-action
+                                where-is-internal
+                                (-find (lambda (o)
+                                         (not (member (aref o 0) '(menu-bar normal-state)))))
+                                key-description)
+                              ")"))
+          (built-string (lsp-modeline--build-code-actions-segments actions))
+          (preferred-code-action (-some->> actions
+                                   (-first #'lsp:code-action-is-preferred?)
+                                   lsp-modeline--code-action->string)))
+    (add-text-properties 0 (length built-string)
+                         (list 'help-echo
+                               (concat (format "Apply code actions %s\nmouse-1: " keybinding)
+                                       (if single-action?
+                                           (lsp-modeline--code-action-name actions preferred-code-action)
+                                         "select from multiple code actions"))
+                               'mouse-face 'mode-line-highlight
+                               'local-map (make-mode-line-mouse-map
+                                           'mouse-1 (lambda ()
+                                                      (interactive)
+                                                      (if single-action?
+                                                          (lsp-execute-code-action (lsp-seq-first actions))
+                                                        (lsp-execute-code-action (lsp--select-action actions))))))
+                         built-string)
+    (unless (string= "" built-string)
+      (concat built-string " "))))
+
+(defun lsp--modeline-update-code-actions (actions)
+  "Update modeline with new code ACTIONS."
+  (when lsp-modeline-code-actions-kind-regex
+    (setq actions (seq-filter (-lambda ((&CodeAction :kind?))
+                                (or (not kind?)
+                                    (s-match lsp-modeline-code-actions-kind-regex kind?)))
+                              actions)))
+  (setq lsp-modeline--code-actions-string
+        (if (seq-empty-p actions) ""
+          (lsp-modeline--build-code-actions-string actions)))
+  (force-mode-line-update))
+
+(defun lsp-modeline--check-code-actions (&rest _)
+  "Request code actions to update modeline for given BUFFER."
+  (when (lsp-feature? "textDocument/codeAction")
+    (lsp-request-async
+     "textDocument/codeAction"
+     (lsp--text-document-code-action-params)
+     #'lsp--modeline-update-code-actions
+     :mode 'unchanged
+     :cancel-token :lsp-modeline-code-actions)))
+
+(defun lsp-modeline--enable-code-actions ()
+  "Enable code actions on modeline mode."
+  (when (and lsp-modeline-code-actions-enable
+             (lsp-feature? "textDocument/codeAction"))
+    (lsp-modeline-code-actions-mode 1)))
+
+(defun lsp-modeline--disable-code-actions ()
+  "Disable code actions on modeline mode."
+  (lsp-modeline-code-actions-mode -1))
+
+;;;###autoload
+(define-minor-mode lsp-modeline-code-actions-mode
+  "Toggle code actions on modeline."
+  :group 'lsp-modeline
+  :global nil
+  :lighter ""
+  (cond
+   (lsp-modeline-code-actions-mode
+    (add-to-list 'global-mode-string '(t (:eval lsp-modeline--code-actions-string)))
+
+    (add-hook 'lsp-on-idle-hook 'lsp-modeline--check-code-actions nil t)
+    (add-hook 'lsp-configure-hook #'lsp-modeline--enable-code-actions nil t)
+    (add-hook 'lsp-unconfigure-hook #'lsp-modeline--disable-code-actions nil t))
+   (t
+    (remove-hook 'lsp-on-idle-hook 'lsp-modeline--check-code-actions t)
+    (remove-hook 'lsp-configure-hook #'lsp-modeline--enable-code-actions t)
+    (remove-hook 'lsp-unconfigure-hook #'lsp-modeline--disable-code-actions t)
+    (setq global-mode-string (remove '(t (:eval lsp-modeline--code-actions-string)) global-mode-string)))))
+
+
+;; diagnostics
+
+(defvar-local lsp-modeline--diagnostics-string nil
+  "Value of current buffer diagnostics statistics.")
+
+(defvar lsp-modeline--diagnostics-wks->strings nil
+  "Plist of workspaces to their modeline strings.
+The `:global' workspace is global one.")
+
+(defun lsp-modeline-diagnostics-statistics ()
+  "Calculate diagnostics statistics based on `lsp-modeline-diagnostics-scope'."
+  (let ((diagnostics (cond
+                      ((equal :file lsp-modeline-diagnostics-scope)
+                       (list (lsp--get-buffer-diagnostics)))
+                      (t (->> (eq :workspace lsp-modeline-diagnostics-scope)
+                              (lsp-diagnostics)
+                              (ht-values)))))
+        (stats (make-vector lsp/diagnostic-severity-max 0))
+        strs
+        (i 0))
+    (mapc (lambda (buf-diags)
+            (mapc (lambda (diag)
+                    (-let [(&Diagnostic? :severity?) diag]
+                      (when severity?
+                        (cl-incf (aref stats severity?)))))
+                  buf-diags))
+          diagnostics)
+    (while (< i lsp/diagnostic-severity-max)
+      (when (> (aref stats i) 0)
+        (setq strs
+              (nconc strs
+                     `(,(propertize
+                         (format "%s" (aref stats i))
+                         'face
+                         (cond
+                          ((= i lsp/diagnostic-severity-error) 'error)
+                          ((= i lsp/diagnostic-severity-warning) 'warning)
+                          ((= i lsp/diagnostic-severity-information) 'success)
+                          ((= i lsp/diagnostic-severity-hint) 'success)))))))
+      (cl-incf i))
+    (-> (s-join "/" strs)
+        (propertize 'mouse-face 'mode-line-highlight
+                    'help-echo "mouse-1: Show diagnostics"
+                    'local-map (when (require 'lsp-treemacs nil t)
+                                 (make-mode-line-mouse-map
+                                  'mouse-1 #'lsp-treemacs-errors-list))))))
+
+(defun lsp-modeline--diagnostics-reset-modeline-cache ()
+  "Reset the modeline diagnostics cache."
+  (plist-put lsp-modeline--diagnostics-wks->strings (car (lsp-workspaces)) nil)
+  (plist-put lsp-modeline--diagnostics-wks->strings :global nil)
+  (setq lsp-modeline--diagnostics-string nil))
+
+(defun lsp-modeline--diagnostics-update-modeline ()
+  "Update diagnostics modeline string."
+  (cl-labels ((calc-modeline ()
+                             (let ((str (lsp-modeline-diagnostics-statistics)))
+                               (if (string-empty-p str) ""
+                                 (concat str " ")))))
+    (setq lsp-modeline--diagnostics-string
+          (cl-case lsp-modeline-diagnostics-scope
+            (:file (or lsp-modeline--diagnostics-string
+                       (calc-modeline)))
+            (:workspace
+             (let ((wk (car (lsp-workspaces))))
+               (or (plist-get lsp-modeline--diagnostics-wks->strings wk)
+                   (let ((ml (calc-modeline)))
+                     (setq lsp-modeline--diagnostics-wks->strings
+                           (plist-put lsp-modeline--diagnostics-wks->strings wk ml))
+                     ml))))
+            (:global
+             (or (plist-get lsp-modeline--diagnostics-wks->strings :global)
+                 (let ((ml (calc-modeline)))
+                   (setq lsp-modeline--diagnostics-wks->strings
+                         (plist-put lsp-modeline--diagnostics-wks->strings :global ml))
+                   ml)))))))
+
+(defun lsp-modeline--enable-diagnostics ()
+  "Enable diagnostics on modeline mode."
+  (when (and lsp-modeline-diagnostics-enable
+             (lsp-feature? "textDocument/publishDiagnostics"))
+    (lsp-modeline-diagnostics-mode 1)))
+
+(defun lsp-modeline--disable-diagnostics ()
+  "Disable diagnostics on modeline mode."
+  (lsp-modeline-diagnostics-mode -1))
+
+;;;###autoload
+(define-obsolete-function-alias 'lsp-diagnostics-modeline-mode
+  'lsp-modeline-diagnostics-mode "lsp-mode 7.0.1")
+
+;;;###autoload
+(define-minor-mode lsp-modeline-diagnostics-mode
+  "Toggle diagnostics modeline."
+  :group 'lsp-modeline
+  :global nil
+  :lighter ""
+  (cond
+   (lsp-modeline-diagnostics-mode
+    (add-hook 'lsp-configure-hook #'lsp-modeline--enable-diagnostics nil t)
+    (add-hook 'lsp-unconfigure-hook #'lsp-modeline--disable-diagnostics nil t)
+    (add-to-list 'global-mode-string '(t (:eval (lsp-modeline--diagnostics-update-modeline))))
+    (add-hook 'lsp-diagnostics-updated-hook 'lsp-modeline--diagnostics-reset-modeline-cache))
+   (t
+    (remove-hook 'lsp-configure-hook #'lsp-modeline--enable-diagnostics t)
+    (remove-hook 'lsp-unconfigure-hook #'lsp-modeline--disable-diagnostics t)
+    (remove-hook 'lsp-diagnostics-updated-hook 'lsp-modeline--diagnostics-reset-modeline-cache)
+    (setq global-mode-string (remove '(t (:eval (lsp-modeline--diagnostics-update-modeline))) global-mode-string)))))
+
+
+;; workspace status
+
+(defun lsp-modeline--workspace-status-string ()
+  "Build the workspace status string."
+  '(t (:eval (-keep #'lsp--workspace-status-string (lsp-workspaces)))))
+
+(defun lsp-modeline--enable-workspace-status ()
+  "Enable workspace status on modeline."
+  (let ((status (lsp-modeline--workspace-status-string)))
+    (setq-local global-mode-string (if (-contains? global-mode-string status)
+                                       global-mode-string
+                                     (cons status global-mode-string)))))
+
+(defun lsp-modeline--disable-workspace-status ()
+  "Disable workspace status on modeline."
+  (let ((status (lsp-modeline--workspace-status-string)))
+    (setq-local global-mode-string (remove status global-mode-string))))
+
+;;;###autoload
+(define-minor-mode lsp-modeline-workspace-status-mode
+  "Toggle workspace status on modeline."
+  :group 'lsp-modeline
+  :global nil
+  :lighter ""
+  (cond
+   (lsp-modeline-workspace-status-mode
+    (add-hook 'lsp-configure-hook #'lsp-modeline--enable-workspace-status nil t)
+    (add-hook 'lsp-unconfigure-hook #'lsp-modeline--disable-workspace-status nil t))
+   (t
+    (remove-hook 'lsp-configure-hook #'lsp-modeline--enable-workspace-status t)
+    (remove-hook 'lsp-unconfigure-hook #'lsp-modeline--disable-workspace-status t))))
+
+(lsp-consistency-check lsp-modeline)
+
+(provide 'lsp-modeline)
+;;; lsp-modeline.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mojo.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mojo.el
new file mode 100644
index 0000000..44569c2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-mojo.el
@@ -0,0 +1,51 @@
+;;; lsp-mojo.el --- lsp-mode Mojo integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023 Adam Liter
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: Adam Liter <io@adamliter.org>
+;; Keywords: languages,tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  client for Mojo 🔥
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-mojo nil
+  "LSP support for Mojo 🔥, using mojo-lsp-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/modularml/mojo"))
+
+(defcustom lsp-mojo-executable "mojo-lsp-server"
+  "The Mojo 🔥 LSP executable to use.
+Leave as just the executable name to use the default behavior of
+finding the executable with variable `exec-path'."
+  :group 'lsp-mojo
+  :type 'string)
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda () lsp-mojo-executable))
+  :activation-fn (lsp-activate-on "mojo")
+  :server-id 'mojo))
+
+(lsp-consistency-check lsp-mojo)
+
+(provide 'lsp-mojo)
+;;; lsp-mojo.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-move.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-move.el
new file mode 100644
index 0000000..803b2a2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-move.el
@@ -0,0 +1,72 @@
+;;; lsp-move.el --- MOVE client settings -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Dmitri Makarov
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: Dmitri Makarov
+;; Keywords: lsp, move
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;; To enable lsp-move include the following lisp code in init.el after
+;;; loading lsp-mode
+;;;
+;;;    (with-eval-after-load 'lsp-mode
+;;;      (require 'move-mode)
+;;;      (require 'lsp-move)
+;;;      (add-hook 'move-mode-hook #'lsp)
+;;;
+;;; See `lsp-clients-move-analyzer-executable' to customize the path to move-analyzer.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-move nil
+  "LSP support for Move."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/move-language/move"))
+
+(defcustom lsp-clients-move-analyzer-executable "move-analyzer"
+  "The move-analyzer executable to use.
+Leave as just the executable name to use the default behavior of
+finding the executable with `exec-path'."
+  :group 'lsp-move
+  :risky t
+  :type 'file)
+
+(defcustom lsp-clients-move-analyzer-args '()
+  "Extra arguments for the move-analyzer executable."
+  :group 'lsp-move
+  :risky t
+  :type '(repeat string))
+
+(defun lsp-clients--move-analyzer-command ()
+  "Generate the language server startup command."
+  `(,lsp-clients-move-analyzer-executable ,@lsp-clients-move-analyzer-args))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   'lsp-clients--move-analyzer-command)
+  :activation-fn (lsp-activate-on "move")
+  :major-modes '(move-mode)
+  :priority -1
+  :server-id 'move-analyzer))
+
+(provide 'lsp-move)
+
+;;; lsp-move.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nextflow.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nextflow.el
new file mode 100644
index 0000000..f36c8d8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nextflow.el
@@ -0,0 +1,196 @@
+;;; lsp-nextflow.el --- lsp-mode nextflow integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024 Edmund Miller
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; Author: Edmund Miller
+;; Keywords: lsp, nextflow, groovy
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Nextflow Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'f)
+
+(defgroup lsp-nextflow nil
+  "LSP support for nextflow, using nextflow-language-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/nextflow-io/language-server"))
+
+(defcustom lsp-nextflow-java-path "java"
+  "Path of the java executable."
+  :group 'lsp-nextflow
+  :type 'string)
+
+(lsp-defcustom lsp-nextflow-language-version "25.10"
+  "Nextflow language version to be used by the language server."
+  :type '(choice (const "26.04 (preview)") (const "25.10") (const "25.04") (const "24.10"))
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.languageVersion")
+
+(defcustom lsp-nextflow-server-download-url
+  (format "https://github.com/nextflow-io/language-server/releases/download/v%s/language-server-all.jar"
+          lsp-nextflow-language-version)
+  "Automatic download url for lsp-nextflow."
+  :type 'string
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-nextflow-server-file
+  (f-join lsp-server-install-dir "nextflow-language-server.jar")
+  "The path to the file in which `lsp-nextflow' will be stored."
+  :group 'lsp-nextflow
+  :risky t
+  :type 'file
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-nextflow-server-command ()
+  "Startup command for Nextflow language server."
+  `("java" "-jar" ,(expand-file-name lsp-nextflow-server-file)))
+
+(lsp-dependency 'nextflow-lsp
+                '(:system lsp-nextflow-server-file)
+                `(:download :url lsp-nextflow-server-download-url
+                  :store-path lsp-nextflow-server-file))
+
+;;
+;;; Settings
+
+;; (lsp-generate-settings "~/src/nf-core/vscode-language-nextflow/package.json" 'lsp-nextflow)
+
+(lsp-defcustom lsp-nextflow-debug nil
+  "Enable debug logging and debug information in hover hints."
+  :type 'boolean
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.debug")
+
+(lsp-defcustom lsp-nextflow-files-exclude [".git" ".nf-test" "work"]
+  "Folders that should be excluded when scanning the workspace for Nextflow files."
+  :type 'lsp-string-vector
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.files.exclude")
+
+(lsp-defcustom lsp-nextflow-formatting-harshil-alignment nil
+  "Use the [Harshil Alignment™️](https://nf-co.re/docs/contributing/code_editors_and_styling/harshil_alignment) when formatting Nextflow scripts and config files.
+
+*Note: not all rules are supported.*"
+  :type 'boolean
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.formatting.harshilAlignment")
+
+(lsp-defcustom lsp-nextflow-java-home ""
+  "Specify the folder path to the desired Java runtime.
+
+Equivalent to the `JAVA_HOME` environment variable, i.e.
+the Java binary should be located at `$JAVA_HOME/bin/java`.
+Use this setting if the extension cannot find Java automatically."
+  :type 'string
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.java.home")
+
+(lsp-defcustom lsp-nextflow-suppress-future-warnings t
+  "Hide warnings for future changes, deprecations, and removals."
+  :type 'boolean
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.suppressFutureWarnings")
+
+(lsp-defcustom lsp-nextflow-completion-extended nil
+  "Provide auto-completions from outside the current script.
+
+If an external completion is selected, it will be automatically
+included into the current script."
+  :type 'boolean
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.completion.extended")
+
+(lsp-defcustom lsp-nextflow-completion-max-items 100
+  "The maximum number of auto-completions to suggest at a time."
+  :type 'number
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.completion.maxItems")
+
+(lsp-defcustom lsp-nextflow-error-reporting-mode "warnings"
+  "Set the desired level of error reporting."
+  :type '(choice (const "off") (const "errors") (const "warnings") (const "paranoid"))
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.errorReportingMode")
+
+(lsp-defcustom lsp-nextflow-formatting-mahesh-form nil
+  "Place process outputs at the end of the process body when formatting Nextflow scripts."
+  :type 'boolean
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.formatting.maheshForm")
+
+(lsp-defcustom lsp-nextflow-formatting-sort-declarations nil
+  "Sort script declarations when formatting Nextflow scripts."
+  :type 'boolean
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.formatting.sortDeclarations")
+
+(lsp-defcustom lsp-nextflow-telemetry-enabled nil
+  "Enable usage data to be sent to Seqera.
+
+See the welcome page for more information about what we do and do not collect."
+  :type 'boolean
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.telemetry.enabled")
+
+(lsp-defcustom lsp-nextflow-type-checking nil
+  "Enable static type checking."
+  :type 'boolean
+  :group 'lsp-nextflow
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nextflow.typeChecking")
+
+;;
+;;; Client
+
+(lsp-register-client
+ (make-lsp-client
+  ;; FIXME
+  ;; :download-server-fn (lambda (_client callback error-callback _update?)
+  ;;                       (lsp-package-ensure 'nextflow-lsp callback error-callback))
+  :new-connection (lsp-stdio-connection #'lsp-nextflow-server-command)
+  :major-modes '(nextflow-mode)
+  :multi-root t
+  :activation-fn (lsp-activate-on "nextflow")
+  :priority -1
+  :initialized-fn (lambda (workspace)
+                    (with-lsp-workspace workspace
+                      (lsp--set-configuration
+                       (lsp-configuration-section "nextflow"))))
+  ;; TODO Handle preview dag
+  :server-id 'nextflow-lsp))
+
+(lsp-consistency-check lsp-nextflow)
+
+(provide 'lsp-nextflow)
+;;; lsp-nextflow.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nginx.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nginx.el
new file mode 100644
index 0000000..10e96ab
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nginx.el
@@ -0,0 +1,65 @@
+;;; lsp-nginx.el --- Nginx Client settings  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021-2023  Shen, Jen-Chieh
+;; Copyright (C) 2021-2026 emacs-lsp maintainers
+
+;; Author: Jen-Chieh Shen <jcs090218@gmail.com>
+;; Keywords: nginx lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; LSP client for Nginx
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-nginx nil
+  "LSP support for Nginx."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/pappasam/nginx-language-server")
+  :package-version `(lsp-mode . "9.0.0"))
+
+(defcustom lsp-nginx-server-command '("nginx-language-server")
+  "Command to start Nginx Language Server."
+  :risky t
+  :group 'lsp-nginx
+  :type '(repeat string)
+  :package-version `(lsp-mode . "9.0.0"))
+
+(defun lsp-nginx--download-server (_client callback error-callback update?)
+  "Install/update Nginx language server using `pip
+
+Will invoke CALLBACK or ERROR-CALLBACK based on result.
+Will update if UPDATE? is t."
+  (lsp-async-start-process
+   callback
+   error-callback
+   "pip" "install" "nginx-language-server" (when update? "-U")))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda () lsp-nginx-server-command))
+                  :major-modes '(nginx-mode)
+                  :priority -1
+                  :server-id 'nginx-ls
+                  :download-server-fn #'lsp-nginx--download-server))
+
+(lsp-consistency-check lsp-nginx)
+
+(provide 'lsp-nginx)
+;;; lsp-nginx.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nim.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nim.el
new file mode 100644
index 0000000..082653c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nim.el
@@ -0,0 +1,105 @@
+;;; lsp-nim.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, nim
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Nim Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+;; Nim
+(defgroup lsp-nimlsp nil
+  "LSP support for Nim, using nimlsp."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/PMunch/nimlsp"))
+
+(lsp-defcustom lsp-nim-project-mapping []
+  "Nimsuggest project mapping. Sample value
+
+[(:projectFile \"root.nim\"
+  :fileRegex \".*\\.nim\")]"
+
+  :type '(lsp-repeatable-vector plist)
+  :group 'lsp-nim
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nim.projectMapping")
+
+(lsp-defcustom lsp-nim-timeout 120000
+  "Timeout for restarting `nimsuggest'"
+  :type 'number
+  :group 'lsp-nim
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nim.timeout")
+
+(lsp-defcustom lsp-nim-nimsuggest-path "nimsuggest"
+  "Path to `nimsuggest' to use."
+  :type 'number
+  :group 'lsp-nim
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nim.nimsuggestPath")
+
+(lsp-defcustom lsp-nim-auto-check-file t
+  "Check the file on the fly"
+  :type 'boolean
+  :group 'lsp-nim
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nim.autoCheckFile")
+
+(lsp-defcustom lsp-nim-auto-check-project t
+  "Check the project after saving the file"
+  :type 'boolean
+  :group 'lsp-nim
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "nim.autoCheckProject")
+
+(defcustom lsp-nim-langserver "nimlangserver"
+  "Path to `nimlangserver'"
+  :type 'number
+  :group 'lsp-nim
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-nim-lsp "nimlsp"
+  "Path to `nimlsp'"
+  :type 'number
+  :group 'lsp-nim
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda () lsp-nim-lsp))
+                  :activation-fn (lsp-activate-on "nim")
+                  :priority -1
+                  :server-id 'nimlsp))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda () lsp-nim-langserver))
+                  :synchronize-sections '("nim")
+                  :activation-fn (lsp-activate-on "nim")
+                  :notification-handlers
+                  (ht ("extension/statusUpdate" #'ignore))
+                  :server-id 'nimlangserver))
+
+(lsp-consistency-check lsp-nim)
+
+(provide 'lsp-nim)
+;;; lsp-nim.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nix.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nix.el
new file mode 100644
index 0000000..9d014aa
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nix.el
@@ -0,0 +1,176 @@
+;;; lsp-nix.el --- lsp-mode nix integration    -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 lsp-mode maintainers
+
+;; Author: Seong Yong-ju <sei40kr@gmail.com>
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Client for the rnix language server.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-nix-rnix nil
+  "LSP support for Nix, using rnix-lsp."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/nix-community/rnix-lsp"))
+
+(defcustom lsp-nix-rnix-server-path "rnix-lsp"
+  "Executable path for the server."
+  :group 'lsp-nix-rnix
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda () lsp-nix-rnix-server-path))
+                  :major-modes '(nix-mode nix-ts-mode)
+                  :server-id 'rnix-lsp
+                  :priority -2))
+
+(defgroup lsp-nix-nixd nil
+  "LSP support for Nix, using nixd language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/nix-community/nixd"))
+
+(defcustom lsp-nix-nixd-server-path "nixd"
+  "Executable path for the server."
+  :group 'lsp-nix-nixd
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-nix-nixd-server-arguments '()
+  "Extra arguments for the server."
+  :group 'lsp-nix-nixd
+  :type '(repeat string)
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-nix-nixd-formatting-command nil
+  "External formatter command with arguments.
+
+  Example: `[\"nixpkgs-fmt\"]`"
+  :type 'lsp-string-vector
+  :group 'lsp-nix-nixd
+  :lsp-path "nixd.formatting.command"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-nix-nixd-nixpkgs-expr nil
+  "This expression will be interpreted as \"nixpkgs\" toplevel
+  Nixd provides package, lib completion/information from it.
+
+  Resource Usage: Entries are lazily evaluated, entire nixpkgs takes 200~300MB
+  for just \"names\". Package documentation, versions, are evaluated by-need.
+
+  Example: `\"import <nixpkgs> { }\"`"
+  :type 'string
+  :group 'lsp-nix-nixd
+  :lsp-path "nixd.nixpkgs.expr"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-nix-nixd-nixos-options-expr nil
+  "Option set for NixOS option completion. If this is omitted, the default
+  search path (`<nixpkgs>`) will be used.
+
+  Example:
+  `\"(builtins.getFlake \"/home/nb/nix\").nixosConfigurations.mnd.options\"`"
+  :type 'string
+  :group 'lsp-nix-nixd
+  :lsp-path "nixd.options.nixos.expr"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-nix-nixd-home-manager-options-expr nil
+  "Option set for home-manager option completion.
+
+  Example:
+  `\"(builtins.getFlake \"/home/nb/nix\").homeConfigurations.\"nb@mnd\".options\"`"
+  :type 'string
+  :group 'lsp-nix-nixd
+  :lsp-path "nixd.options.home-manager.expr"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda () (cons lsp-nix-nixd-server-path lsp-nix-nixd-server-arguments)))
+                  :major-modes '(nix-mode nix-ts-mode)
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration
+                                       (lsp-configuration-section "nixd"))))
+                  :synchronize-sections '("nixd")
+                  :server-id 'nixd-lsp
+                  :priority -1))
+
+(defgroup lsp-nix-nil nil
+  "LSP support for Nix, using nil."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/oxalica/nil"))
+
+(defcustom lsp-nix-nil-server-path "nil"
+  "Executable path for the server."
+  :group 'lsp-nix-nil
+  :type 'string
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-defcustom lsp-nix-nil-formatter nil
+  "External formatter command with arguments.
+
+  Example [nixpkgs-fmt]."
+  :type 'lsp-string-vector
+  :group 'lsp-nix-nil
+  :lsp-path "nil.formatting.command"
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-defcustom lsp-nix-nil-ignored-diagnostics nil
+  "Ignored diagnostic kinds."
+  :type 'lsp-string-vector
+  :group 'lsp-nix-nil
+  :lsp-path "nil.diagnostics.ignored"
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-defcustom lsp-nix-nil-exclude-files-diagnostic nil
+  "Files to exclude from showing diagnostics."
+  :type 'lsp-string-vector
+  :group 'lsp-nix-nil
+  :lsp-path "nil.diagnostics.excludedFiles"
+  :package-version '(lsp-mode . "9.0.0"))
+(lsp-defcustom lsp-nix-nil-max-mem 10000
+  "Max Memory MB"
+  :type 'number
+  :group 'lsp-nix-nil
+  :lsp-path "nil.nix.maxMemoryMB"
+  :package-version '(lsp-mode . "9.0.0"))
+(lsp-defcustom lsp-nix-nil-auto-eval-inputs t
+  "Auto Eval Inputs"
+  :type 'boolean
+  :group 'lsp-nix-nil
+  :lsp-path "nil.nix.flake.autoEvalInputs"
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda () lsp-nix-nil-server-path))
+                  :major-modes '(nix-mode nix-ts-mode)
+                  :initialized-fn (lambda (workspace)
+                    (with-lsp-workspace workspace
+                      (lsp--set-configuration
+                       (lsp-configuration-section "nil"))))
+                  :synchronize-sections '("nil")
+                  :server-id 'nix-nil))
+
+(lsp-consistency-check lsp-nix)
+
+(provide 'lsp-nix)
+;;; lsp-nix.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nushell.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nushell.el
new file mode 100644
index 0000000..fd4938f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-nushell.el
@@ -0,0 +1,59 @@
+;;; lsp-nushell.el --- lsp-mode ansible integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: lsp, nushell
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Client for the nushell Language
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-nushell nil
+  "LSP support for nushell."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/nushell/nushell"))
+
+(defcustom lsp-nushell-language-server-command
+  '("nu" "--lsp")
+  "The command that starts the nushell language server."
+  :type '(repeat :tag "List of string values" string)
+  :group 'lsp-nushell)
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection lsp-nushell-language-server-command)
+                  :activation-fn (lsp-activate-on "nushell")
+                  :priority -1
+                  :initialized-fn (lambda (workspace)
+                                    ;; Nushell server returns an empty list of
+                                    ;; completion options at initialization
+                                    ;; so completionProvider capability is {}
+                                    ;; When using plists, this value is parsed as
+                                    ;; null/nil so we need to force it to "t"
+                                    ;; to enable completion
+                                    (let ((caps (lsp--workspace-server-capabilities workspace)))
+                                      (unless (lsp-get caps :completionProvider)
+                                        (lsp:set-server-capabilities-completion-provider? caps t))))
+                  :server-id 'nushell-ls))
+
+(lsp-consistency-check lsp-nushell)
+
+(provide 'lsp-nushell)
+;;; lsp-nushell.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ocaml.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ocaml.el
new file mode 100644
index 0000000..9c02ba7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ocaml.el
@@ -0,0 +1,393 @@
+;;; lsp-ocaml.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, ocaml
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Ocaml Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'find-file)
+
+(defgroup lsp-ocaml nil
+  "LSP support for OCaml, using ocaml-language-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/freebroccolo/ocaml-language-server"))
+
+(define-obsolete-variable-alias
+  'lsp-ocaml-ocaml-lang-server-command
+  'lsp-ocaml-lang-server-command
+  "lsp-mode 6.1")
+
+(defcustom lsp-ocaml-lang-server-command
+  '("ocaml-language-server" "--stdio")
+  "Command to start ocaml-language-server."
+  :group 'lsp-ocaml
+  :type '(choice
+          (string :tag "Single string value")
+          (repeat :tag "List of string values"
+                  string)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda () lsp-ocaml-lang-server-command))
+                  :major-modes '(reason-mode caml-mode neocaml-mode neocaml-interface-mode tuareg-mode)
+                  :priority -1
+                  :server-id 'ocaml-ls))
+
+(defgroup lsp-ocaml-lsp-server nil
+  "LSP support for OCaml, using ocaml-lsp-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/ocaml/ocaml-lsp"))
+
+(define-obsolete-variable-alias 'lsp-merlin 'lsp-ocaml-lsp-server "lsp-mode 6.1")
+(define-obsolete-variable-alias 'lsp-merlin-command 'lsp-ocaml-lsp-server-command "lsp-mode 6.1")
+
+;;; -------------------
+;;; OCaml-lsp custom variables
+;;; -------------------
+
+(defcustom lsp-ocaml-lsp-server-command
+  '("opam" "exec" "--" "ocamllsp")
+  "Command to start ocaml-lsp-server."
+  :group 'lsp-ocaml-lsp-server
+  :type '(choice
+          (string :tag "Single string value")
+          (repeat :tag "List of string values"
+                  string)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection
+  (lsp-stdio-connection (lambda () lsp-ocaml-lsp-server-command))
+  :major-modes '(reason-mode caml-mode neocaml-mode neocaml-interface-mode tuareg-mode)
+  :priority 0
+  :server-id 'ocaml-lsp-server))
+
+(defcustom lsp-cut-signature 'space
+  "If non-nil, signatures returned on hover will not be split on newline."
+  :group 'lsp-ocaml-lsp-server
+  :type '(choice (symbol :tag "Default behaviour" 'cut)
+                 (symbol :tag "Display all the lines with spaces" 'space)))
+
+(defcustom lsp-ocaml-markupkind 'markdown
+  "Preferred markup format."
+  :group 'lsp-ocaml-lsp-server
+  :type '(choice (symbol :tag "Markdown" 'markdown)
+                 (symbol :tag "Plain text" 'plaintext)))
+
+(defcustom lsp-ocaml-enclosing-type-verbosity 1
+  "Number of expansions of aliases in answers."
+  :group 'lsp-ocaml-lsp-server
+  :type 'int)
+
+(defcustom lsp-ocaml-enclosing-type-cycle nil
+  "When growing up or down the enclosings of a type, cycle when reaching one bound."
+  :group 'lsp-ocaml-server
+  :type 'boolean)
+
+;;; -------------------
+;;; OCaml-lsp faces
+;;; -------------------
+
+(defface lsp-ocaml-highlight-region-face '((t (:inherit region)))
+  "Face used to highlight a region.")
+
+;;; -------------------
+;;; OCaml-lsp extensions interface
+;;; -------------------
+
+;;; The following functions are used to create an interface between custom OCaml-lsp requests and lsp-mode
+
+(defun lsp-ocaml--switch-impl-intf ()
+  "Switch to the file(s) that the current file can switch to.
+
+OCaml-lsp custom protocol documented here
+https://github.com/ocaml/ocaml-lsp/blob/master/ocaml-lsp-server/docs/ocamllsp/switchImplIntf-spec.md"
+  (-if-let* ((params (make-vector 1 (lsp--buffer-uri)))
+             (uris (lsp-request "ocamllsp/switchImplIntf" params)))
+      uris
+    (lsp--warn "Your version of ocaml-lsp doesn't support the switchImplIntf extension")))
+
+(defun lsp-ocaml--type-enclosing (verbosity index)
+  "Get the type of the identifier at point.
+
+VERBOSITY and INDEX use is described in the OCaml-lsp protocol documented here
+https://github.com/ocaml/ocaml-lsp/blob/master/ocaml-lsp-server/docs/ocamllsp/typeEnclosing-spec.md"
+  (-if-let* ((params (lsp-make-ocaml-lsp-type-enclosing-params
+                      :uri (lsp--buffer-uri)
+                      :at (lsp--cur-position)
+                      :index index
+                      :verbosity verbosity))
+             (result (lsp-request "ocamllsp/typeEnclosing" params)))
+      result
+    (lsp--warn "Your version of ocaml-lsp doesn't support the typeEnclosing extension")))
+
+(defun lsp-ocaml--get-documentation (identifier content-format)
+  "Get the documentation of IDENTIFIER or the identifier at point if IDENTIFIER is nil.
+
+CONTENT-FORMAT is `Markdown' or `Plaintext'.
+OCaml-lsp protocol documented here
+https://github.com/ocaml/ocaml-lsp/blob/master/ocaml-lsp-server/docs/ocamllsp/getDocumentation-spec.md"
+  (-if-let* ((position (if identifier nil (lsp--cur-position)))
+             ((&TextDocumentPositionParams :text-document :position) (lsp--text-document-position-params identifier position))
+             (params (lsp-make-ocaml-lsp-get-documentation-params
+                      :textDocument text-document
+                      :position position
+                      :contentFormat content-format)))
+      ;; Don't exit if the request returns nil, an identifier can have no documentation
+      (lsp-request "ocamllsp/getDocumentation" params)
+    (lsp--warn "Your version of ocaml-lsp doesn't support the getDocumentation extension")))
+
+(defun lsp-ocaml--infer-intf ()
+  "Infer the interface of the given URI.
+
+The URI should correspond to an implementation file, not an interface one.
+
+OCaml-lsp protocol is documented here:
+https://github.com/ocaml/ocaml-lsp/blob/master/ocaml-lsp-server/docs/ocamllsp/inferIntf-spec.md"
+  (-if-let* ((params (make-vector 1 (lsp--buffer-uri)))
+             (result (lsp-request "ocamllsp/inferIntf" params)))
+      result
+    (lsp--warn "Your version of ocaml-lsp doesn't support the inferIntf extension")))
+
+;;; -------------------
+;;; OCaml-lsp general utilities
+;;; -------------------
+
+(defun lsp-ocaml--has-one-element-p (lst)
+  "Return t if LST is a singleton."
+  (and lst (= (length lst) 1)))
+
+;;; -------------------
+;;; OCaml-lsp URI utilities
+;;; -------------------
+
+(defun lsp-ocaml--is-interface (uri)
+  "Return non-nil if the given URI is an interface, nil otherwise."
+  (let ((path (lsp--uri-to-path uri)))
+    (string-match-p "\\.\\(mli\\|rei\\|eliomi\\)\\'" path)))
+
+(defun lsp-ocaml--on-interface ()
+  "Return non-nil if the current URI is an interface, nil otherwise."
+  (lsp-ocaml--is-interface (lsp--buffer-uri)))
+
+(defun lsp-ocaml--load-uri (uri &optional other-window)
+  "Check if URI exists and open its buffer or create a new one.
+
+If OTHER-WINDOW is not nil, open the buffer in an other window."
+  (let ((path (lsp--uri-to-path uri)))
+    (cond
+
+     ;; A buffer already exists with PATH
+     ((bufferp (get-file-buffer path))
+      (ff-switch-to-buffer (get-file-buffer path) other-window)
+      path)
+
+     ;; PATH is an existing file
+     ((file-exists-p path)
+      (ff-find-file path other-window nil)
+      path)
+
+     ;; PATH is not an existing file
+     (t
+      nil))))
+
+(defun lsp-ocaml--find-alternate-uri ()
+  "Return the URI corresponding to the alternate file if there's only one or prompt for a choice."
+  (let ((uris (lsp-ocaml--switch-impl-intf)))
+    (if (lsp-ocaml--has-one-element-p uris)
+        (car uris)
+      (let* ((filenames (mapcar #'f-filename uris))
+             (selected-file (completing-read "Choose an alternate file " filenames)))
+        (nth (cl-position selected-file filenames :test #'string=) uris)))))
+
+;;; -------------------
+;;; OCaml-lsp type enclosing utilities
+;;; ------------------
+
+(defvar-local lsp-ocaml--type-enclosing-verbosity lsp-ocaml-enclosing-type-verbosity)
+(defvar-local lsp-ocaml--type-enclosing-index 0)
+(defvar-local lsp-ocaml--type-enclosing-saved-type nil)
+(defvar-local lsp-ocaml--type-enclosing-type-enclosings nil)
+
+(defun lsp-ocaml--init-type-enclosing-config ()
+  "Create a new config for the type enclosing requests."
+  (setq lsp-ocaml--type-enclosing-verbosity lsp-ocaml-enclosing-type-verbosity)
+  (setq lsp-ocaml--type-enclosing-index 0)
+  (setq lsp-ocaml--type-enclosing-saved-type nil)
+  (setq lsp-ocaml--type-enclosing-type-enclosings nil))
+
+(defun lsp-ocaml--highlight-current-type (range)
+  "Highlight RANGE.
+
+RANGE is (:start (:character .. :line ..)) :end (:character .. :line ..)"
+  (remove-overlays nil nil 'face 'lsp-ocaml-highlight-region-face)
+  (let* ((point-min (lsp--position-to-point (cl-getf range :start)))
+         (point-max (lsp--position-to-point (cl-getf range :end)))
+         (overlay (make-overlay point-min point-max)))
+    (overlay-put overlay 'face 'lsp-ocaml-highlight-region-face)
+    (unwind-protect (sit-for 10) (delete-overlay overlay))))
+
+(defun lsp-ocaml--display-type (markupkind type doc)
+  "Display TYPE in MARKUPKIND with its DOC attached.
+
+If TYPE is a single-line that represents a module type, reformat it."
+  (let* (;; Regroup the type and documentation at point
+         (single-linep (not (string-match-p "\n" type)))
+         (new-type (if single-linep (string-replace " val " "\n  val " type) type))
+         (new-type (if single-linep (string-replace " end" "\nend" new-type) type))
+         (contents `(:kind ,markupkind
+                           :value ,(mapconcat #'identity `("```ocaml" ,new-type "```" "***" ,doc) "\n"))))
+    (lsp--display-contents contents)))
+
+;;; -------------------
+;;; OCaml-lsp type enclosing transient map
+;;; -------------------
+
+(defvar lsp-ocaml-type-enclosing-map
+  (let ((keymap (make-sparse-keymap)))
+    (define-key keymap (kbd "C-<up>") #'lsp-ocaml-type-enclosing-go-up)
+    (define-key keymap (kbd "C-<down>") #'lsp-ocaml-type-enclosing-go-down)
+    (define-key keymap (kbd "C-w") #'lsp-ocaml-type-enclosing-copy)
+    (define-key keymap (kbd "C-t") #'lsp-ocaml-type-enclosing-increase-verbosity)
+    (define-key keymap (kbd "C-<right>") #'lsp-ocaml-type-enclosing-increase-verbosity)
+    (define-key keymap (kbd "C-<left>") #'lsp-ocaml-type-enclosing-decrease-verbosity)
+    keymap)
+  "Keymap for OCaml-lsp type enclosing transient mode.")
+
+(defun lsp-ocaml-type-enclosing-go-up ()
+  "Go up the type's enclosing."
+  (interactive)
+  (when lsp-ocaml--type-enclosing-type-enclosings
+    (setq lsp-ocaml--type-enclosing-index
+          (if lsp-ocaml-enclosing-type-cycle
+              (mod (1+ lsp-ocaml--type-enclosing-index)
+                   (length lsp-ocaml--type-enclosing-type-enclosings))
+            (min (1+ lsp-ocaml--type-enclosing-index)
+                 (1- (length lsp-ocaml--type-enclosing-type-enclosings))))))
+  (lsp-ocaml--get-and-display-type-enclosing))
+
+(defun lsp-ocaml-type-enclosing-go-down ()
+  "Go down the type's enclosing."
+  (interactive)
+  (when lsp-ocaml--type-enclosing-type-enclosings
+    (setq lsp-ocaml--type-enclosing-index
+          (if lsp-ocaml-enclosing-type-cycle
+              (mod (1- lsp-ocaml--type-enclosing-index)
+                   (length lsp-ocaml--type-enclosing-type-enclosings))
+            (max (1- lsp-ocaml--type-enclosing-index) 0))))
+  (lsp-ocaml--get-and-display-type-enclosing))
+
+(defun lsp-ocaml-type-enclosing-decrease-verbosity ()
+  "Decreases the number of expansions of aliases in answer."
+  (interactive)
+  (let ((verbosity (max 0 (1- lsp-ocaml--type-enclosing-verbosity))))
+    (setq lsp-ocaml--type-enclosing-verbosity verbosity))
+  (lsp-ocaml--get-and-display-type-enclosing))
+
+(defun lsp-ocaml-type-enclosing-increase-verbosity ()
+  "Increases the number of expansions of aliases in answer."
+  (interactive)
+  (let ((verbosity (1+ lsp-ocaml--type-enclosing-verbosity)))
+    (setq lsp-ocaml--type-enclosing-verbosity verbosity))
+  (lsp-ocaml--get-and-display-type-enclosing t))
+
+(defun lsp-ocaml-type-enclosing-copy ()
+  "Copy the type of the saved enclosing type to the `kill-ring'."
+  (interactive)
+  (when lsp-ocaml--type-enclosing-saved-type
+    (message "Copied `%s' to kill-ring"
+             lsp-ocaml--type-enclosing-saved-type)
+    (kill-new lsp-ocaml--type-enclosing-saved-type)))
+
+(defun lsp-ocaml--get-and-display-type-enclosing (&optional increased-verbosity)
+  "Compute the type enclosing request.
+
+  If INCREASED-VERBOSITY is t, if the computed type is the same as the previous
+  one, decrease the verbosity.
+  This allows to make sure that we don't increase infinitely the verbosity."
+  (-let* ((verbosity lsp-ocaml--type-enclosing-verbosity)
+          (index lsp-ocaml--type-enclosing-index)
+          (type_result (lsp-ocaml--type-enclosing verbosity index))
+          ((&ocaml-lsp:TypeEnclosingResult :index :type :enclosings) type_result)
+          ;; Get documentation information
+          (markupkind (symbol-name lsp-ocaml-markupkind))
+          (doc_result (lsp-ocaml--get-documentation nil markupkind))
+          (doc (cl-getf (cl-getf doc_result :doc) :value)))
+    (when (and increased-verbosity
+               (string= type lsp-ocaml--type-enclosing-saved-type))
+      (setq lsp-ocaml--type-enclosing-verbosity (1- verbosity)))
+    (setq lsp-ocaml--type-enclosing-saved-type type)
+    (setq lsp-ocaml--type-enclosing-type-enclosings enclosings)
+    (lsp-ocaml--display-type markupkind type doc)
+    (lsp-ocaml--highlight-current-type (aref enclosings index))
+    type))
+
+;;; -------------------
+;;; OCaml-lsp extensions
+;;; -------------------
+
+;;; The following functions are interactive implementations of the OCaml-lsp requests
+
+(defun lsp-ocaml-infer-interface ()
+  "Infer the interface for the current file."
+  (interactive)
+  (let* ((current-uri (lsp--buffer-uri))
+         (intf-uri (if (lsp-ocaml--is-interface current-uri)
+                       current-uri
+                     (lsp-ocaml--find-alternate-uri)))
+         (impl-uri (if (lsp-ocaml--is-interface current-uri)
+                       (lsp-ocaml--find-alternate-uri)
+                     current-uri))
+         (intf-path (lsp--uri-to-path intf-uri))
+         (impl-path (lsp--uri-to-path impl-uri)))
+    (if (lsp-ocaml--load-uri impl-uri) ; the impl file needs to be loaded
+        (when (y-or-n-p
+               (format "Try to generate an interface for %s? " impl-path))
+          (let ((result (lsp-ocaml--infer-intf)))
+            (with-current-buffer (get-buffer-create intf-path)
+              (when (or (= (buffer-size) 0)
+                        (y-or-n-p "The buffer is not empty, overwrite it? "))
+                (erase-buffer)
+                (insert result)
+                ;; Create the file if it doesn’t exist
+                (unless (file-exists-p intf-path)
+                  (write-file intf-path)))))))))
+
+(defun lsp-ocaml-find-alternate-file ()
+  "Return the URI corresponding to the alternate file if there's only one or prompt for a choice."
+  (interactive)
+  (let ((uri (lsp-ocaml--find-alternate-uri)))
+    (unless (lsp-ocaml--load-uri uri nil)
+      (message "No alternate file %s could be found for %s" (f-filename uri) (buffer-name)))))
+
+(defun lsp-ocaml-type-enclosing ()
+  "Returns the type of the indent at point."
+  (interactive)
+  (lsp-ocaml--init-type-enclosing-config)
+  (when-let* ((type (lsp-ocaml--get-and-display-type-enclosing)))
+    (set-transient-map lsp-ocaml-type-enclosing-map t)))
+
+(lsp-consistency-check lsp-ocaml)
+
+(provide 'lsp-ocaml)
+;;; lsp-ocaml.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-odin.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-odin.el
new file mode 100644
index 0000000..857e915
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-odin.el
@@ -0,0 +1,109 @@
+;;; lsp-odin.el --- Description -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2025-2026 Sam Precious
+;; Copyright (C) 2025-2026 emacs-lsp maintainers
+;;
+;; Author: Sam Precious <samwdp@gmail.com>
+;; Keywords: lsp, odin
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;; LSP client for Odin using the ols language server
+;;
+;;; Code:
+
+(require 'lsp-mode)
+(require 'f)
+
+(defgroup lsp-odin-ols nil
+  "LSP support for Odin, using ols."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/DanielGavin/ols")
+  :package-version '(lsp-mode . "9.0.0"))
+
+
+(defcustom lsp-odin-ols-download-url
+  (let* ((x86 (string-prefix-p "x86_64" system-configuration))
+         (arch (if x86 "x86_64" "arm64")))
+    (format "https://github.com/DanielGavin/ols/releases/download/nightly/%s"
+            (pcase system-type
+              ('gnu/linux (format "ols-%s-unknown-linux-gnu.zip" arch))
+              ('darwin (format "ols-%s-darwin.zip" arch))
+              ('windows-nt (format "ols-%s-pc-windows-msvc.zip" arch)))))
+  "Automatic download url for ols language server."
+  :type 'string
+  :group 'lsp-odin-ols
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-odin-ols-server-install-dir
+  (f-join lsp-server-install-dir "ols/")
+  "Installation directory for ols server."
+  :group 'lsp-odin-ols
+  :type 'directory)
+
+(defcustom lsp-odin-ols-store-path
+  (f-join lsp-odin-ols-server-install-dir "latest" "ols.zip")
+  "The path where ols .zip archive will be stored."
+  :group 'lsp-odin-ols
+  :type 'file)
+
+(defcustom lsp-odin-ols-server-dir
+  (f-join lsp-odin-ols-server-install-dir "latest" "ols")
+  "The path where ols .zip archive will be extracted."
+  :group 'lsp-odin-ols
+  :type 'file)
+
+(defcustom lsp-odin-ols-binary-path
+  (f-join lsp-odin-ols-server-install-dir "latest"
+          (pcase system-type
+            ('windows-nt
+             "ols-x86_64-pc-windows-msvc.exe")
+            ('darwin
+             (if (string-match-p "aarch64-.*" system-configuration)
+                 "ols-arm64-darwin"
+               "ols-x86_64-darwin"))
+            (_
+             "ols-x86_64-unknown-linux-gnu")))
+  "The path where ols binary after will be stored."
+  :group 'lsp-odin-ols
+  :type 'file)
+
+
+(lsp-dependency
+ 'ols
+ `(:download :url lsp-odin-ols-download-url
+             :decompress :zip
+             :store-path lsp-odin-ols-store-path
+             :binary-path lsp-odin-ols-binary-path
+             :set-executable? t)
+ '(:system "ols"))
+
+(defun lsp-odin--ols-download-server (_client callback error-callback _update?)
+  "Download zip package for ols and install it.
+Will invoke CALLBACK on success, ERROR-CALLBACK on error."
+  (lsp-package-ensure 'ols callback error-callback))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection lsp-odin-ols-binary-path)
+                  :major-modes '(odin-mode odin-ts-mode)
+                  :language-id "odin"
+                  :activation-fn (lsp-activate-on "odin")
+                  :server-id 'ols
+                  :multi-root t
+                  :download-server-fn #'lsp-odin--ols-download-server))
+
+(provide 'lsp-odin)
+;;; lsp-odin.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-openscad.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-openscad.el
new file mode 100644
index 0000000..d7f78f1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-openscad.el
@@ -0,0 +1,109 @@
+;;; lsp-openscad.el --- openscad client         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022 Len Trigg
+;; Copyright (C) 2022-2026 emacs-lsp maintainers
+
+;; Author: Len Trigg
+;; Keywords: openscad lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-openscad client
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-openscad nil
+  "LSP support for openscad."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/Leathong/openscad-LSP"))
+
+(defcustom lsp-openscad-server
+  "openscad-lsp"
+  "Path to the openscad language server."
+  :group 'lsp-openscad
+  :risky t
+  :type 'file)
+
+(defcustom lsp-openscad-server-connection-type
+  'tcp
+  "Type of connection to use with the OpenSCAD Language Server: tcp or stdio."
+  :group 'lsp-openscad
+  :risky t
+  :type 'symbol)
+
+(defcustom lsp-openscad-search-paths ""
+  "Customized search path."
+  :type 'string
+  :group 'lsp-openscad)
+
+(defcustom lsp-openscad-indent "    "
+  "Indentation string used by Topiary when formatting."
+  :type 'string
+  :group 'lsp-openscad)
+
+(defcustom lsp-openscad-query-file ""
+  "Path to a custom Topiary query file for OpenSCAD formatting."
+  :type 'file
+  :group 'lsp-openscad)
+
+(defcustom lsp-openscad-default-param t
+  "Whether to include default parameter values in auto-completion."
+  :type 'boolean
+  :group 'lsp-openscad)
+
+(lsp-register-custom-settings
+ '(("openscad.search_paths" lsp-openscad-search-paths)
+   ("openscad.indent" lsp-openscad-indent)
+   ("openscad.query_file" lsp-openscad-query-file)
+   ("openscad.default_param" lsp-openscad-default-param t)))
+
+(defun lsp-openscad-server-stdio-start-fun ()
+  "Create arguments to start openscad language server in stdio mode."
+  `(,lsp-openscad-server "--stdio" ))
+
+(defun lsp-openscad-server-tcp-start-fun (port)
+  "Create arguments to start openscad language server in TCP mode on PORT."
+  `(,lsp-openscad-server "--port" ,(number-to-string port)))
+
+(defun lsp-openscad-server-connection ()
+  "Create command line arguments to start openscad language server."
+  (if (eq lsp-openscad-server-connection-type 'tcp)
+      (lsp-tcp-connection 'lsp-openscad-server-tcp-start-fun)
+    (lsp-stdio-connection 'lsp-openscad-server-stdio-start-fun)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-openscad-server-connection)
+                  :major-modes '(scad-mode)
+                  :priority -1
+                  :initialized-fn (lambda (workspace)
+                                    ;; OpenSCAD-LSP returns an empty list of
+                                    ;; completion options at initialization
+                                    ;; so completionProvider capability is {}
+                                    ;; When using plists, this value is parsed as
+                                    ;; null/nil so we need to force it to "t"
+                                    ;; to enable completion
+                                    (let ((caps (lsp--workspace-server-capabilities workspace)))
+                                      (unless (lsp-get caps :completionProvider)
+                                        (lsp:set-server-capabilities-completion-provider? caps t)))
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration
+                                       (lsp-configuration-section "openscad"))))
+                  :server-id 'openscad))
+
+(provide 'lsp-openscad)
+;;; lsp-openscad.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-perl.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-perl.el
new file mode 100644
index 0000000..28569f7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-perl.el
@@ -0,0 +1,117 @@
+;;; lsp-perl.el --- lsp-perl config  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: Hiroki Noda <kubo39@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-perl client
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-perl nil
+  "LSP support for Perl"
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/richterger/Perl-LanguageServer")
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-perl-language-server-path "perl"
+  "Path to perl interpreter."
+  :type 'string
+  :group 'lsp-perl
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-perl-language-server-port 13603
+  "Choose listen port."
+  :type 'integer
+  :group 'lsp-perl
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-perl-language-server-client-version "2.1.0"
+  "Choose client version."
+  :type 'string
+  :group 'lsp-perl
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-perl-perl-cmd nil
+  "Path to perl interpreter used in Perl Language Server.
+Defaults to `perl' if nil."
+  :type 'string
+  :group 'lsp-perl
+  :package-version '(lsp-mode . "7.0.1"))
+(defcustom lsp-perl-perl-inc nil
+  "A vector of paths to add to perl library path."
+  :type 'lsp-string-vector
+  :group 'lsp-perl
+  :package-version '(lsp-mode . "7.0.1"))
+(defcustom lsp-perl-file-filter nil
+  "A vector of directories filtering perl file.
+Defaults to `[\".pm\" \".pl\"]' if nil."
+  :type 'lsp-string-vector
+  :group 'lsp-perl
+  :package-version '(lsp-mode . "7.0.1"))
+(defcustom lsp-perl-ignore-dirs nil
+  "A vector of directories to ignore.
+Defaults to `[\".vscode\" \".git\" \".svn\"]' if nil."
+  :type 'lsp-string-vector
+  :group 'lsp-perl
+  :package-version '(lsp-mode . "7.0.1"))
+
+(defcustom lsp-perl-show-local-vars nil
+  "If true, show also local variables in symbol view.
+Defaults to false if nil"
+  :type 'boolean
+  :group 'lsp-perl
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-perl-log-level nil
+  "Log level 0-2.
+Defaults to 0."
+  :type 'integer
+  :group 'lsp-perl
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-register-custom-settings
+ '(("perl.perlCmd" lsp-perl-perl-cmd)
+   ("perl.perlInc" lsp-perl-perl-inc)
+   ("perl.fileFilter" lsp-perl-file-filter)
+   ("perl.ignoreDirs" lsp-perl-ignore-dirs)
+   ("perl.showLocalVars" lsp-perl-show-local-vars t)
+   ("perl.logLevel" lsp-perl-log-level)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     (list lsp-perl-language-server-path
+                                           "-MPerl::LanguageServer" "-e" "Perl::LanguageServer::run" "--"
+                                           (format "--port %d --version %s"
+                                                   lsp-perl-language-server-port lsp-perl-language-server-client-version))))
+                  :major-modes '(perl-mode cperl-mode)
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration
+                                       (lsp-configuration-section "perl"))))
+                  :priority -2
+                  :server-id 'perl-language-server))
+
+(lsp-consistency-check lsp-perl)
+
+(provide 'lsp-perl)
+;;; lsp-perl.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-perlnavigator.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-perlnavigator.el
new file mode 100644
index 0000000..51cbc76
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-perlnavigator.el
@@ -0,0 +1,207 @@
+;;; lsp-perlnavigator.el --- Integrates the Perl Navigator LSP Server with lsp-mode  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022  Matthew Feinberg
+;; Copyright (C) 2022-2026 emacs-lsp maintainers
+
+;; Author: Matthew Feinberg <matthew.feinberg@gmail.com>
+;; Keywords: lsp, perl
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-perlnavigator nil
+  "LSP support for Perl Navigator."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/bscan/PerlNavigator")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-perl-path "perl"
+  "Full path to the perl executable (no aliases, .bat files or ~/)."
+  :type 'string
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-enable-warnings t
+  "Enable warnings using -Mwarnings command switch."
+  :type 'boolean
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-perltidy-profile nil
+  "Path to perl tidy profile (no aliases, .bat files or ~/)."
+  :type 'string
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-perlcritic-profile nil
+  "Path to perl critic profile. Otherwise perlcritic itself will
+default to ~/.perlcriticrc. (no aliases, .bat files or ~/)."
+  :type 'string
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-perlcritic-enabled t
+  "Enable perl critic."
+  :type 'boolean
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defconst lsp-perlnavigator--log-level-type
+  '(choice  (const "error")
+            (const "warning")
+            (const "info")
+            (const "hint")
+            (const "none")))
+
+(defcustom lsp-perlnavigator-severity5 "warning"
+  "Editor Diagnostic severity level for Critic severity 5."
+  :type lsp-perlnavigator--log-level-type
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-severity4 "info"
+  "Editor Diagnostic severity level for Critic severity 4."
+  :type lsp-perlnavigator--log-level-type
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-severity3 "hint"
+  "Editor Diagnostic severity level for Critic severity 3."
+  :type lsp-perlnavigator--log-level-type
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-severity2 "hint"
+  "Editor Diagnostic severity level for Critic severity 2."
+  :type lsp-perlnavigator--log-level-type
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-severity1 "hint"
+  "Editor Diagnostic severity level for Critic severity 1."
+  :type lsp-perlnavigator--log-level-type
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-include-paths nil
+  "Array of paths added to @INC.  You can use $workspaceRoot as a placeholder."
+  :type 'lsp-string-vector
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-logging t
+  "Log to stdout from the navigator.  Viewable in the Perl Navigator LSP log."
+  :type 'boolean
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-perlnavigator-trace-server "messages"
+  "Traces the communication between VS Code and the language server."
+  :type '(choice (const "off")
+                 (const "messages")
+                 (const "verbose"))
+  :group 'lsp-perlnavigator
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-register-custom-settings
+ '(("perlnavigator.trace.server" lsp-perlnavigator-trace-server)
+   ("perlnavigator.logging" lsp-perlnavigator-logging t)
+   ("perlnavigator.includePaths" lsp-perlnavigator-include-paths)
+   ("perlnavigator.severity1" lsp-perlnavigator-severity1)
+   ("perlnavigator.severity2" lsp-perlnavigator-severity2)
+   ("perlnavigator.severity3" lsp-perlnavigator-severity3)
+   ("perlnavigator.severity4" lsp-perlnavigator-severity4)
+   ("perlnavigator.severity5" lsp-perlnavigator-severity5)
+   ("perlnavigator.perlcriticEnabled" lsp-perlnavigator-perlcritic-enabled t)
+   ("perlnavigator.perlcriticProfile" lsp-perlnavigator-perlcritic-profile)
+   ("perlnavigator.perltidyProfile" lsp-perlnavigator-perltidy-profile)
+   ("perlnavigator.enableWarnings" lsp-perlnavigator-enable-warnings t)
+   ("perlnavigator.perlPath" lsp-perlnavigator-perl-path)))
+
+(defcustom lsp-perlnavigator-executable "perlnavigator"
+  "Location of the perlnavigator binary."
+  :group 'lsp-perlnavigator
+  :risky t
+  :type 'file)
+
+(defvar lsp-perlnavigator--os-suffix
+  (let ((x86_64 (eq (string-match-p "^x86_64" system-configuration) 0)))
+    (cond ((and x86_64 (eq system-type 'windows-nt))
+           "-win-x86_64")
+
+          ((and x86_64 (eq system-type 'darwin))
+           "-macos-x86_64")
+
+          ((and x86_64 (eq system-type 'gnu/linux))
+           "-linux-x86_64")))
+
+  "The suffix used to specify the download for this operating system.")
+
+(defcustom lsp-perlnavigator-download-url
+  (let ((base-url "https://github.com/bscan/PerlNavigator/releases/latest/download/"))
+    (if lsp-perlnavigator--os-suffix
+        (concat base-url "perlnavigator" lsp-perlnavigator--os-suffix ".zip")))
+
+  "Automatic download url for PerlNavigator."
+  :group 'lsp-perlnavigator
+  :type 'string)
+
+(defcustom lsp-perlnavigator-autoinstall-dir
+  (f-join lsp-server-install-dir "perlnavigator")
+  "Automatic installation directory for Perl Navigator."
+  :group 'lsp-perlnavigator
+  :type 'directory)
+
+(defvar lsp-perlnavigator--autoinstall-store-path
+  (f-join lsp-perlnavigator-autoinstall-dir "latest" (concat "perlnavigator" lsp-perlnavigator--os-suffix ".zip"))
+  "The path where the downloaded PerlNavigator .zip archive will be stored.")
+
+
+(defvar lsp-perlnavigator--autoinstall-binary-path
+  (let ((exe-name (if (eq system-type 'windows-nt) "perlnavigator.exe" "perlnavigator")))
+    (f-join lsp-perlnavigator-autoinstall-dir "latest" (concat "perlnavigator" lsp-perlnavigator--os-suffix) exe-name))
+  "The path to the automatically installed language server executable.")
+
+(lsp-dependency
+ 'perlnavigator
+ '(:system lsp-perlnavigator-executable)
+ `(:download
+   :decompress
+   :zip
+   :binary-path lsp-perlnavigator--autoinstall-binary-path
+   :url lsp-perlnavigator-download-url
+   :store-path lsp-perlnavigator--autoinstall-store-path
+   :set-executable? t))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda ()
+                                                          (list
+                                                           (or (lsp-package-path 'perlnavigator)
+                                                               lsp-perlnavigator-executable)
+                                                           "--stdio")))
+                  :activation-fn (lsp-activate-on "perl")
+                  :priority 0
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'perlnavigator callback error-callback))
+                  :server-id 'perlnavigator))
+
+(provide 'lsp-perlnavigator)
+;;; lsp-perlnavigator.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-php.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-php.el
new file mode 100644
index 0000000..a0df3cd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-php.el
@@ -0,0 +1,475 @@
+;;; lsp-php.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, php
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the PHP Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-protocol)
+
+;; PHP Language Server
+(defgroup lsp-php nil
+  "LSP support for PHP, using php-language-server."
+  :link '(url-link "https://github.com/felixfbecker/php-language-server")
+  :group 'lsp-mode)
+
+(defun lsp-php-get-composer-dir ()
+  "Get composer home directory if possible."
+  (if (executable-find "composer")
+      (replace-regexp-in-string "\n$" "" (shell-command-to-string "composer config --global home"))
+    "~/.composer"))
+
+(defcustom lsp-php-composer-dir nil
+  "Home directory of composer."
+  :group 'lsp-php
+  :type 'string)
+
+(defcustom lsp-clients-php-server-command nil
+  "Install directory for php-language-server."
+  :group 'lsp-php
+  :type '(repeat string))
+
+(defun lsp-php--create-connection ()
+  "Create lsp connection."
+  (lsp-stdio-connection
+   (lambda ()
+     (unless lsp-php-composer-dir
+       (setq lsp-php-composer-dir (lsp-php-get-composer-dir)))
+     (unless lsp-clients-php-server-command
+       (setq lsp-clients-php-server-command
+             `("php",
+               (expand-file-name
+                (f-join lsp-php-composer-dir "vendor/felixfbecker/language-server/bin/php-language-server.php")))))
+     lsp-clients-php-server-command)
+   (lambda ()
+     (if (and (cdr lsp-clients-php-server-command)
+              (eq (string-match-p "php[0-9.]*\\'" (car lsp-clients-php-server-command)) 0))
+         ;; Start with the php command and the list has more elems. Test the existence of the PHP script.
+         (let ((php-file (nth 1 lsp-clients-php-server-command)))
+           (or (file-exists-p php-file)
+               (progn
+                 (lsp-log "%s is not present." php-file)
+                 nil)))
+       nil))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-php--create-connection)
+                  :activation-fn (lsp-activate-on "php")
+                  :priority -3
+                  :server-id 'php-ls))
+
+;;; Intelephense
+(defgroup lsp-intelephense nil
+  "LSP support for PHP, using Intelephense."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/bmewburn/vscode-intelephense")
+  :package-version '(lsp-mode . "6.1"))
+
+(lsp-defcustom lsp-intelephense-php-version "9.0.0"
+  "Minimum version of PHP to refer to. Affects code actions, diagnostic &
+completions."
+  :type 'string
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.1")
+  :lsp-path "intelephense.environment.phpVersion")
+
+(lsp-defcustom lsp-intelephense-files-max-size 1000000
+  "Maximum file size in bytes."
+  :type 'number
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.1")
+  :lsp-path "intelephense.files.maxSize")
+
+(lsp-defcustom lsp-intelephense-files-associations
+  ["*.php" "*.phtml"]
+  "Configure glob patterns to make files available for language
+server features."
+  :type '(repeat string)
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.1")
+  :lsp-path "intelephense.files.associations")
+
+(lsp-defcustom lsp-intelephense-files-exclude
+  ["**/.git/**" "**/.svn/**" "**/.hg/**" "**/CVS/**" "**/.DS_Store/**"
+   "**/node_modules/**" "**/bower_components/**" "**/vendor/**/{Test,test,Tests,tests}/**"]
+  "Configure glob patterns to exclude certain files and folders
+from all language server features."
+  :type '(repeat string)
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.1")
+  :lsp-path "intelephense.files.exclude")
+
+(lsp-defcustom lsp-intelephense-paths-include
+  []
+  "Configure additional paths outside workspace."
+  :type 'lsp-string-vector
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "8.1")
+  :lsp-path "intelephense.environment.includePaths")
+
+(lsp-defcustom lsp-intelephense-stubs
+  ["apache" "bcmath" "bz2" "calendar"
+   "com_dotnet" "Core" "ctype" "curl" "date" "dba" "dom" "enchant"
+   "exif" "fileinfo" "filter" "fpm" "ftp" "gd" "hash" "iconv" "imap" "interbase"
+   "intl" "json" "ldap" "libxml" "mbstring" "mcrypt" "meta" "mssql" "mysqli"
+   "oci8" "odbc" "openssl" "pcntl" "pcre" "PDO" "pdo_ibm" "pdo_mysql"
+   "pdo_pgsql" "pdo_sqlite" "pgsql" "Phar" "posix" "pspell" "random" "readline" "recode"
+   "Reflection" "regex" "session" "shmop" "SimpleXML" "snmp" "soap" "sockets"
+   "sodium" "SPL" "sqlite3" "standard" "superglobals" "sybase" "sysvmsg"
+   "sysvsem" "sysvshm" "tidy" "tokenizer" "wddx" "xml" "xmlreader" "xmlrpc"
+   "xmlwriter" "Zend OPcache" "zip" "zlib"]
+  "Configure stub files for built in symbols and common
+extensions. The default setting includes PHP core and all
+bundled extensions."
+  :type '(repeat string)
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.1")
+  :lsp-path "intelephense.stubs")
+
+(lsp-defcustom lsp-intelephense-completion-insert-use-declaration t
+  "Use declarations will be automatically inserted for namespaced
+classes, traits, interfaces, functions, and constants."
+  :type 'boolean
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.1")
+  :lsp-path "intelephense.completion.insertUseDeclaration")
+
+(lsp-defcustom lsp-intelephense-completion-fully-qualify-global-constants-and-functions nil
+  "Global namespace constants and functions will be fully
+qualified (prefixed with a backslash)."
+  :type 'boolean
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.1")
+  :lsp-path "intelephense.completion.fullyQualifyGlobalConstantsAndFunctions")
+
+(lsp-defcustom lsp-intelephense-completion-trigger-parameter-hints t
+  "Method and function completions will include parentheses and
+trigger parameter hints."
+  :type 'boolean
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.2")
+  :lsp-path "intelephense.completion.triggerParameterHints")
+
+(lsp-defcustom lsp-intelephense-completion-max-items 100
+  "The maximum number of completion items returned per request."
+  :type 'number
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.2")
+  :lsp-path "intelephense.completion.maxItems")
+
+(lsp-defcustom lsp-intelephense-format-enable t
+  "Enables formatting."
+  :type 'boolean
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.1")
+  :lsp-path "intelephense.format.enable")
+
+(lsp-defcustom lsp-intelephense-format-braces "psr12"
+  "Formatting braces style. psr12, allman or k&r"
+  :type 'string
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "8.1")
+  :lsp-path "intelephense.format.braces")
+
+(defcustom lsp-intelephense-licence-key nil
+  "Enter your intelephense licence key here to access premium
+features."
+  :type 'string
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.2"))
+
+(lsp-defcustom lsp-intelephense-telemetry-enabled nil
+  "Anonymous usage and crash data will be sent to Azure
+Application Insights."
+  :type 'boolean
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.2")
+  :lsp-path "intelephense.telemetry.enabled")
+
+(lsp-defcustom lsp-intelephense-rename-exclude
+  ["**/vendor/**"]
+  "Glob patterns to exclude files and folders from having symbols
+renamed. Rename operation will fail if references and/or
+definitions are found in excluded files/folders."
+  :type '(repeat string)
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.2")
+  :lsp-path "intelephense.rename.exclude")
+
+(lsp-defcustom lsp-intelephense-trace-server "off"
+  "Traces the communication between VSCode and the intelephense
+language server."
+  :type '(choice (const "off")
+                 (const "messages")
+                 (const "verbose"))
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.1")
+  :lsp-path "intelephense.trace.server")
+
+(defcustom lsp-intelephense-storage-path
+  (expand-file-name (locate-user-emacs-file "lsp-cache"))
+  "Optional absolute path to storage dir."
+  :type 'directory
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-intelephense-global-storage-path
+  (expand-file-name (locate-user-emacs-file "intelephense"))
+  "Optional absolute path to global storage dir."
+  :type 'directory
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-intelephense-clear-cache nil
+  "Optional flag to clear server state."
+  :type 'boolean
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-intelephense-multi-root t
+  "Flag to control if the server supports multi-root projects."
+  :type 'boolean
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.3"))
+
+(define-obsolete-variable-alias
+  'lsp-clients-php-iph-server-command
+  'lsp-intelephense-server-command
+  "lsp-mode 6.1")
+
+(defcustom lsp-intelephense-server-command
+  `("intelephense" "--stdio")
+  "Command to start Intelephense."
+  :type '(repeat string)
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "6.1"))
+
+(lsp-defcustom lsp-intelephense-phpdoc-use-fully-qualified-names nil
+  "If non-nil, Intelephense will use fully qualified names in generated PHPDoc.
+This corresponds to the LSP setting `intelephense.phpdoc.useFullyQualifiedNames`."
+  :type 'boolean
+  :group 'lsp-intelephense
+  :package-version '(lsp-mode . "9.0")
+  :lsp-path "intelephense.phpdoc.useFullyQualifiedNames")
+
+(lsp-dependency 'intelephense
+                '(:system "intelephense")
+                '(:npm :package "intelephense"
+                       :path "intelephense"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     `(,(or (executable-find
+                                             (cl-first lsp-intelephense-server-command))
+                                            (lsp-package-path 'intelephense))
+                                       ,@(cl-rest lsp-intelephense-server-command))))
+                  :activation-fn (lsp-activate-on "php")
+                  :priority -1
+                  :notification-handlers (ht ("indexingStarted" #'ignore)
+                                             ("indexingEnded" #'ignore))
+                  :initialization-options (lambda ()
+                                            (list :storagePath lsp-intelephense-storage-path
+                                                  :globalStoragePath lsp-intelephense-global-storage-path
+                                                  :licenceKey lsp-intelephense-licence-key
+                                                  :clearCache lsp-intelephense-clear-cache))
+                  :multi-root lsp-intelephense-multi-root
+                  :completion-in-comments? t
+                  :server-id 'iph
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'intelephense
+                                                            callback error-callback))
+                  :synchronize-sections '("intelephense")))
+
+
+;;; Serenata
+(defgroup lsp-serenata nil
+  "LSP support for the PHP programming language, using serenata."
+  :group 'lsp-mode
+  :link '(url-link "https://gitlab.com/Serenata/Serenata")
+  :package-version '(lsp-mode . "7.0"))
+
+(defcustom lsp-serenata-server-path
+  "serenata.phar"
+  "Path to the Serenata Language Server phar file.
+It can be downloaded from https://gitlab.com/Serenata/Serenata/-/releases."
+  :group 'lsp-serenata
+  :type 'file)
+
+(defcustom lsp-serenata-uris
+  []
+  "A list of folders to index for your project.
+This does not have to include the root of the project itself, in
+case you have need of an exotic configuration where the root of
+the project is at some location but your actual PHP code is
+somewhere else.  Note that if you are running Serenata in a
+container, you will have to ensure that these URI's are mapped
+inside it.  Avoid using file paths containing spaces. This is
+currently broken due to apparent PHP quirks.  By default, the
+value is taken from the lsp workspace location."
+  :group 'lsp-serenata
+  :type 'lsp-string-vector)
+
+(defcustom lsp-serenata-php-version
+  7.3
+  "Allows you to specify the PHP version your project is written in.
+At the moment this directive is still ignored, but it will
+influence functionality such as refactoring in the future, where
+older PHP versions may not support scalar type hints, which may
+then be omitted from places such as getters and setters."
+  :group 'lsp-serenata
+  :type 'number)
+
+(defcustom lsp-serenata-file-extensions
+  ["php"]
+  "List of file extensions (without dot) to process.
+Files that do not match this whitelist will be ignored during
+indexing.  Usually you'll want to set this to at least include
+php, as it is the most common PHP extension.  phpt is not
+included by default as it is often used to contain test code that
+is not directly part of the code.  Note that for existing
+projects, removing extensions will not not automatically prune
+files having them from the index if they are already present.
+Adding new ones will cause the files having them to be picked up
+on the next project initialization."
+  :group 'lsp-serenata
+  :type 'lsp-string-vector)
+
+(defcustom lsp-serenata-index-database-uri (lsp--path-to-uri (f-join  user-emacs-directory "index.sqlite"))
+  "The location to store the index database.
+Note that, as the index database uses SQLite and WAL mode,
+additional files (usually two) may be generated and used in the
+same folder.  Note also that Serenata relies on the Doctrine DBAL
+library as well as the SQLite backends in PHP, which may not
+support non-file URI's, which may prevent you from using these."
+  :group 'lsp-serenata
+  :type 'file)
+
+(defcustom lsp-serenata-exclude-path-expressions ["/.+Test.php$/"]
+  "One or more expressions of paths to ignore.
+This uses Symfony's Finder in the background, so this means you
+can configure anything here that can also be passed to the name
+function, which includes plain strings, globs, as well as regular
+expressions.  Note that for existing projects, modifying these
+will not not automatically prune them from the index if they are
+already present."
+  :group 'lsp-serenata
+  :type 'lsp-string-vector)
+
+(defun lsp-serenata-server-start-fun (port)
+  "Define serenata start function, it requires a PORT."
+  `(,lsp-serenata-server-path
+    "-u" ,(number-to-string port)))
+
+(defun lsp-serenata-init-options ()
+  "Init options for lsp-serenata."
+  `( :configuration ( :uris ,lsp-serenata-uris
+                      :indexDatabaseUri ,lsp-serenata-index-database-uri
+                      :phpVersion ,lsp-serenata-php-version
+                      :excludedPathExpressions ,lsp-serenata-exclude-path-expressions
+                      :fileExtensions ,lsp-serenata-file-extensions)))
+
+
+(eval-and-compile
+  (lsp-interface (serenata:didProgressIndexing (:sequenceOfIndexedItem :totalItemsToIndex :progressPercentage :folderUri :fileUri :info) nil)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-tcp-connection 'lsp-serenata-server-start-fun)
+  :activation-fn (lsp-activate-on "php")
+  :priority -2
+  :notification-handlers (ht ("serenata/didProgressIndexing"
+                              (lambda (_server data)
+                                (lsp-log "%s" (lsp:serenata-did-progress-indexing-info data)))))
+
+  :initialization-options #'lsp-serenata-init-options
+  :initialized-fn (lambda (workspace)
+                    (when (equal (length lsp-serenata-uris) 0)
+                      (let* ((lsp-root (lsp--path-to-uri (lsp-workspace-root))))
+                        (setq lsp-serenata-uris (vector lsp-root))))
+                    (with-lsp-workspace workspace
+                      (lsp--set-configuration
+                       (lsp-configuration-section "serenata"))))
+  :server-id 'serenata))
+
+;;; phpactor
+
+(defgroup lsp-phpactor nil
+  "LSP support for Phpactor."
+  :link '(url-link "https://github.com/phpactor/phpactor")
+  :group 'lsp-mode)
+
+(defcustom lsp-phpactor-path nil
+  "Path to the `phpactor' command."
+  :group 'lsp-phpactor
+  :type 'string)
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda ()
+                     (unless lsp-php-composer-dir
+                       (setq lsp-php-composer-dir (lsp-php-get-composer-dir)))
+                     (unless lsp-phpactor-path
+                       (setq lsp-phpactor-path (or (executable-find "phpactor")
+                                                   (f-join lsp-php-composer-dir "vendor/phpactor/phpactor/bin/phpactor"))))
+                     (list lsp-phpactor-path "language-server")))
+  :activation-fn (lsp-activate-on "php")
+  ;; `phpactor' is not really that feature-complete: it doesn't support
+  ;; `textDocument/showOccurence' and sometimes errors (e.g. find references on
+  ;; a global free-standing function).
+  :priority -4
+  ;; Even though `phpactor' itself supports no options, this needs to be
+  ;; serialized as an empty object (otherwise the LS won't even start, due to a
+  ;; type error).
+  :initialization-options (ht)
+  :server-id 'phpactor))
+
+(defcustom lsp-phpactor-extension-alist '(("Phpstan" . "phpactor/language-server-phpstan-extension")
+                                          ("Behat" . "phpactor/behat-extension")
+                                          ("PHPUnit" . "phpactor/phpunit-extension"))
+  "Alist mapping extension names to `composer' packages.
+These extensions can be installed using
+`lsp-phpactor-install-extension'."
+  :type '(alist :key-type string :value-type string)
+  :group 'lsp-phpactor)
+
+(defun lsp-phpactor-install-extension (extension)
+  "Install a `phpactor' EXTENSION.
+See `lsp-phpactor-extension-alist' and
+https://phpactor.readthedocs.io/en/develop/extensions.html."
+  (interactive (list (completing-read "Select extension: "
+                                      lsp-phpactor-extension-alist)))
+  (compilation-start
+   (format "%s extension:install %s"
+           (shell-quote-argument (expand-file-name lsp-phpactor-path))
+           (shell-quote-argument
+            (cdr (assoc extension lsp-phpactor-extension-alist))))
+   nil
+   (lambda (_mode)
+     (format "*Phpactor install %s*" extension))))
+
+(lsp-consistency-check lsp-php)
+
+(provide 'lsp-php)
+;;; lsp-php.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pls.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pls.el
new file mode 100644
index 0000000..f5437fb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pls.el
@@ -0,0 +1,133 @@
+;;; lsp-pls.el --- PLS Integration for lsp-mode -*- lexical-binding: t -*-
+
+;; Copyright (C) 2022 Alexander Adolf
+;; Copyright (C) 2022-2026 emacs-lsp maintainers
+
+;; Author: Alexander Adolf <alexander.adolf@condition-alpha.com>
+;; Maintainer: Alexander Adolf <alexander.adolf@condition-alpha.com>
+;; Keywords: perl, lsp
+
+;; This file is not part of GNU Emacs
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; PLS client
+;; https://metacpan.org/pod/PLS
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-pls nil
+  "LSP Mode support for PLS, the Perl Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://metacpan.org/pod/PLS")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-pls-executable "pls"
+  "Full path to the PLS executable."
+  :type '(string)
+  :group 'lsp-pls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-pls-arguments nil
+  "Additional arguments needed to execute PLS."
+  :type '(repeat string)
+  :group 'lsp-pls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-pls-working-dir nil
+  "Working directory to run PLS in.
+Defaults to the workspace root when not configured."
+  :type '(string)
+  :group 'lsp-pls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-pls-include nil
+  "Paths to be added to your @INC."
+  :type '(repeat string)
+  :group 'lsp-pls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-pls-perltidy-rc nil
+  "Path to your .perltidyrc file.
+Default is \"~/.perltidyrc\" when not configured."
+  :type '(string)
+  :group 'lsp-pls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-pls-perlcritic-rc nil
+  "Path to your .perlcriticrc file.
+Default is \"~/.perlcriticrc\" when not configured."
+  :type '(string)
+  :group 'lsp-pls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-pls-perlcritic-enabled t
+  "Enable perlcritic checking."
+  :type '(boolean)
+  :group 'lsp-pls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-pls-syntax-enabled t
+  "Enable syntax checking."
+  :type '(boolean)
+  :group 'lsp-pls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-pls-syntax-perl nil
+  "Full path to an alternate perl used for syntax checking.
+By default, the perl used to run PLS will be used."
+  :type '(string)
+  :group 'lsp-pls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-pls-syntax-args nil
+  "Additional arguments to pass to Perl when syntax checking.
+This is useful if there is a BEGIN block in your code that
+changes behavior depending on the contents of @ARGV."
+  :type '(repeat string)
+  :group 'lsp-pls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-register-custom-settings
+ '(("pls.cmd"                      lsp-pls-executable)
+   ("pls.args"                     lsp-pls-arguments)
+   ("pls.cwd"                      lsp-pls-working-dir)
+   ("pls.inc"                      lsp-pls-include)
+   ("pls.perltidy.perltidyrc"      lsp-pls-perltidy-rc)
+   ("pls.perlcritic.perlcriticrc"  lsp-pls-perlcritic-rc)
+   ("pls.perlcritic.enabled"       lsp-pls-perlcritic-enabled)
+   ("pls.syntax.enabled"           lsp-pls-syntax-enabled)
+   ("pls.syntax.perl"              lsp-pls-syntax-perl)
+   ("pls.syntax.args"              lsp-pls-syntax-args)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda () (cons lsp-pls-executable lsp-pls-arguments)))
+  :activation-fn (lsp-activate-on "perl")
+  :initialized-fn (lambda (workspace)
+                    (with-lsp-workspace workspace
+                      (lsp--set-configuration
+                       (lsp-configuration-section "pls"))))
+  :priority -1
+  :server-id 'pls))
+
+;; (lsp-consistency-check lsp-pls)
+
+(provide 'lsp-pls)
+;;; lsp-pls.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-postgres.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-postgres.el
new file mode 100644
index 0000000..8881c39
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-postgres.el
@@ -0,0 +1,94 @@
+;;; lsp-postgres.el --- Postgres client settings.  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2025  Shen, Jen-Chieh
+;; Copyright (C) 2025-2026 emacs-lsp maintainers
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; LSP client for Postgres language server.
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-postgres nil
+  "LSP support for SQL, using Postgres language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/supabase-community/postgres-language-server")
+  :package-version `(lsp-mode . "10.0.0"))
+
+(defcustom lsp-postgres-server-path nil
+  "Path points for Postgres language server.
+
+This is only for development use."
+  :type 'string
+  :group 'lsp-postgres)
+
+(defcustom lsp-postgres-server-store-path
+  (expand-file-name "postgres-ls/" lsp-server-install-dir)
+  "The path to the file in which Postgres ls will be stored."
+  :type 'file
+  :group 'lsp-postgres)
+
+(defconst lsp-postgres-download-url-format
+  "https://github.com/supabase-community/postgres-language-server/releases/latest/download/postgres-language-server_%s-%s"
+  "Format to the download url link.")
+
+(defun lsp-postgres--postgres-ls-url ()
+  "Return Url points to the zls' zip/tar file."
+  (let* ((x86 (string-prefix-p "x86_64" system-configuration))
+         (arch (if x86 "x86_64" "aarch64")))
+    (cl-case system-type
+      ((cygwin windows-nt ms-dos)
+       (format lsp-postgres-download-url-format arch "pc-windows-msvc"))
+      (darwin
+       (format lsp-postgres-download-url-format arch "apple-darwin"))
+      (gnu/linux
+       (format lsp-postgres-download-url-format arch "unknown-linux-gnu")))))
+
+(defun lsp-postgres--server-command ()
+  "Generate startup command for Postgres language server."
+  (list (or lsp-postgres-server-path
+            (lsp-package-path 'postgres-ls))
+        "lsp-proxy"))
+
+(lsp-dependency
+ 'postgres-ls
+ '(:system "postgres-language-server")
+ `(:download :url ,(lsp-postgres--postgres-ls-url)
+             :store-path ,(f-join lsp-postgres-server-store-path
+                                  (pcase system-type
+                                    ('windows-nt "postgres-language-server.exe")
+                                    (_           "postgres-language-server")))
+             :set-executable? t))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-postgres--server-command)
+  :major-modes '(sql-mode)
+  :priority -2
+  :multi-root t
+  :server-id 'postgres-ls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'postgres-ls callback error-callback))))
+
+(lsp-consistency-check lsp-postgres)
+
+(provide 'lsp-postgres)
+;;; lsp-postgres.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-prisma.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-prisma.el
new file mode 100644
index 0000000..25752e0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-prisma.el
@@ -0,0 +1,61 @@
+;;; lsp-prisma.el --- LSP client for Prisma Schema Language  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2026 ChuYanLon
+;; Copyright (C) 2026 emacs-lsp maintainers
+
+;; Author: ChuYanLon <a1008611abcd@126.com>
+;; Keywords: languages, prisma
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for Prisma Schema Language, using prisma-language-server
+;; from @prisma/language-server (https://github.com/prisma/language-tools).
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-prisma nil
+  "LSP support for Prisma Schema Language."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/prisma/language-tools"))
+
+(lsp-dependency 'prisma-language-server
+                '(:system "prisma-language-server")
+                '(:npm :package "@prisma/language-server"
+                       :path "prisma-language-server"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     `(,(lsp-package-path 'prisma-language-server)
+                                       "--stdio")))
+                  :activation-fn (lambda (filename _mode)
+                                   (string= (file-name-extension filename) "prisma"))
+                  :language-id "prisma"
+                  :server-id 'prisma-ls
+                  :multi-root t
+                  :download-server-fn
+                  (lambda (_client callback error-callback _update?)
+                    (lsp-package-ensure 'prisma-language-server
+                                        callback error-callback))))
+
+(add-to-list 'lsp-language-id-configuration '(prisma-mode . "prisma"))
+
+(lsp-consistency-check lsp-prisma)
+
+(provide 'lsp-prisma)
+;;; lsp-prisma.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-prolog.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-prolog.el
new file mode 100644
index 0000000..b631759
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-prolog.el
@@ -0,0 +1,56 @@
+;;; lsp-prolog.el --- Prolog Client settings -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020  James Cash
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: James Cash <james.nvc@gmail.com>
+;; Keywords: languages,tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-prolog client
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-prolog nil
+  "LSP support for Prolog."
+  :link '(url-link "https://github.com/jamesnvc/lsp_server")
+  :group 'lsp-mode
+  :tag "Lsp Prolog")
+
+(defcustom lsp-prolog-server-command '("swipl"
+                                       "-g" "use_module(library(lsp_server))."
+                                       "-g" "lsp_server:main"
+                                       "-t" "halt"
+                                       "--" "stdio")
+  "The prolog-lsp server command."
+  :group 'lsp-prolog
+  :risky t
+  :type '(repeat string))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda () lsp-prolog-server-command))
+  :major-modes '(prolog-mode)
+  :multi-root t
+  :server-id 'prolog-lsp))
+
+(lsp-consistency-check lsp-prolog)
+
+(provide 'lsp-prolog)
+;;; lsp-prolog.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-protocol.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-protocol.el
new file mode 100644
index 0000000..ba34d75
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-protocol.el
@@ -0,0 +1,853 @@
+;;; lsp-protocol.el --- Language Sever Protocol Bindings  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020  Ivan Yonchovski
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: Ivan Yonchovski <yyoncho@gmail.com>
+;; Keywords: convenience
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Autogenerated bindings from lsp4j using
+;; https://github.com/victools/jsonschema-generator+scripts to generate
+;; scripts/generated.protocol.schema.json and then
+;; scripts/lsp-generate-bindings.el
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'dash)
+(require 'ht)
+(require 's)
+(require 'json)
+
+(eval-and-compile
+  (defun lsp-keyword->symbol (keyword)
+    "Convert a KEYWORD to symbol."
+    (intern (substring (symbol-name keyword) 1)))
+
+  (defun lsp-keyword->string (keyword)
+    "Convert a KEYWORD to string."
+    (substring (symbol-name keyword) 1))
+
+  (defvar lsp-use-plists (getenv "LSP_USE_PLISTS")))
+
+(defmacro lsp-interface (&rest interfaces)
+  "Generate LSP bindings from INTERFACES triplet.
+
+Example usage with `dash`.
+
+\(-let [(&ApplyWorkspaceEditResponse
+  :failure-reason?) (ht (\"failureReason\" \"...\"))]
+  failure-reason?)
+
+\(fn (INTERFACE-NAME-1 REQUIRED-FIELDS-1 OPTIONAL-FIELDS-1) (INTERFACE-NAME-2 REQUIRED-FIELDS-2 OPTIONAL-FIELDS-2) ...)"
+  (with-case-table ascii-case-table
+    (->> interfaces
+         (-map (-lambda ((interface required optional))
+                 (let ((params (nconc
+                                (-map (lambda (param-name)
+                                        (cons
+                                         (intern (concat ":" (s-dashed-words (symbol-name param-name)) "?"))
+                                         param-name))
+                                      optional)
+                                (-map (lambda (param-name)
+                                        (cons (intern (concat ":" (s-dashed-words (symbol-name param-name))))
+                                              param-name))
+                                      required))))
+                   (cl-list*
+                    `(defun ,(intern (format "dash-expand:&%s" interface)) (key source)
+                       (unless (or (member key ',(-map #'cl-first params))
+                                   (s-starts-with? ":_" (symbol-name key)))
+                         (error "Unknown key: %s.  Available keys: %s" key ',(-map #'cl-first params)))
+                       ,(if lsp-use-plists
+                            ``(plist-get ,source
+                                         ,(if (s-starts-with? ":_" (symbol-name key))
+                                              key
+                                            (cl-rest (assoc key ',params))))
+                          ``(gethash ,(if (s-starts-with? ":_" (symbol-name key))
+                                          (substring (symbol-name key) 1)
+                                        (substring (symbol-name
+                                                    (cl-rest (assoc key ',params)))
+                                                   1))
+                                     ,source)))
+                    `(defun ,(intern (format "dash-expand:&%s?" interface)) (key source)
+                       (unless (member key ',(-map #'cl-first params))
+                         (error "Unknown key: %s.  Available keys: %s" key ',(-map #'cl-first params)))
+                       ,(if lsp-use-plists
+                            ``(plist-get ,source
+                                         ,(if (s-starts-with? ":_" (symbol-name key))
+                                              key
+                                            (cl-rest (assoc key ',params))))
+                          ``(when (ht? ,source)
+                              (gethash ,(substring (symbol-name
+                                                    (cl-rest (assoc key ',params)))
+                                                   1)
+                                       ,source))))
+
+                    `(defun ,(intern (format "lsp-%s?" (s-dashed-words (symbol-name interface)))) (object)
+                       (cond
+                        ((ht? object)
+                         (-all? (let ((keys (ht-keys object)))
+                                  (lambda (prop)
+                                    (member prop keys)))
+                                ',(-map (lambda (field-name)
+                                          (substring (symbol-name field-name) 1))
+                                        required)))
+                        ((listp object) (-all? (lambda (prop)
+                                                 (plist-member object prop))
+                                               ',required))))
+                    `(cl-defun ,(intern (format "lsp-make-%s" (s-dashed-words (symbol-name interface))))
+                         (&rest plist &key ,@(-map (-lambda ((key))
+                                                     (let ((key-sym (intern (substring (symbol-name key) 1))))
+                                                       (if (special-variable-p key-sym)
+                                                           `((,key ,(intern (format "%s_" (symbol-name key-sym)))))
+                                                         key-sym)))
+                                                   params)
+                                &allow-other-keys)
+                       ,(format "Constructs %s from `plist.'
+Allowed params: %s" interface (reverse (-map #'cl-first params)))
+                       (ignore ,@(-map (-lambda ((key))
+                                         (let ((key-sym (intern (substring (symbol-name key) 1))))
+                                           (if (special-variable-p key-sym)
+                                               (intern (format "%s_" (symbol-name key-sym)))
+                                             key-sym)))
+                                       params))
+                       ,(if lsp-use-plists
+                            `(-mapcat (-lambda ((key value))
+                                        (list (or (cl-rest (assoc key ',params)) key) value))
+                                      (-partition 2 plist))
+                          `(let (($$result (ht)))
+                             (mapc (-lambda ((key value))
+                                     (puthash (lsp-keyword->string (or (cl-rest (assoc key ',params))
+                                                                       key))
+                                              value
+                                              $$result))
+                                   (-partition 2 plist))
+                             $$result)))
+                    `(cl-defun ,(intern (format "lsp--pcase-macroexpander-%s" interface)) (&rest property-bindings)
+                       ,(if lsp-use-plists
+                            ``(and
+                               (pred listp)
+                               ;; Check if all the types required by the
+                               ;; interface exist in the expr-val.
+                               ,@(-map
+                                  (lambda (key)
+                                    `(pred
+                                      (lambda (plist)
+                                        (plist-member plist ,key))))
+                                  ',required)
+                               ;; Recursively generate the bindings.
+                               ,@(let ((current-list property-bindings)
+                                       (output-bindings nil))
+                                   ;; Invariant: while current-list is
+                                   ;; non-nil, the car of current-list is
+                                   ;; always of the form :key, while the
+                                   ;; cadr of current-list is either a)
+                                   ;; nil, b) of the form :key-next or c)
+                                   ;; a pcase pattern that can
+                                   ;; recursively match an expression.
+                                   (while current-list
+                                     (-let* (((curr-binding-as-keyword next-entry . _) current-list)
+                                             (curr-binding-as-camelcased-symbol
+                                              (or (alist-get curr-binding-as-keyword ',params)
+                                                  (error "Unknown key: %s.  Available keys: %s"
+                                                         (symbol-name curr-binding-as-keyword)
+                                                         ',(-map #'cl-first params))))
+                                             (bound-name (lsp-keyword->symbol curr-binding-as-keyword))
+                                             (next-entry-is-key-or-nil
+                                              (and (symbolp next-entry)
+                                                   (or (null next-entry)
+                                                       (s-starts-with? ":" (symbol-name next-entry))))))
+                                       (cond
+                                        ;; If the next-entry is either a
+                                        ;; plist-key or nil, then bind to
+                                        ;; bound-name the value corresponding
+                                        ;; to the camelcased symbol.  Pop
+                                        ;; current-list once.
+                                        (next-entry-is-key-or-nil
+                                         (push `(app (lambda (plist)
+                                                       (plist-get plist ,curr-binding-as-camelcased-symbol))
+                                                     ,bound-name)
+                                               output-bindings)
+                                         (setf current-list (cdr current-list)))
+                                        ;; Otherwise, next-entry is a pcase
+                                        ;; pattern we recursively match to the
+                                        ;; expression. This can in general
+                                        ;; create additional bindings that we
+                                        ;; persist in the top level of
+                                        ;; bindings.  We pop current-list
+                                        ;; twice.
+                                        (t
+                                         (push `(app (lambda (plist)
+                                                       (plist-get plist ,curr-binding-as-camelcased-symbol))
+                                                     ,next-entry)
+                                               output-bindings)
+                                         (setf current-list (cddr current-list))))))
+                                   output-bindings))
+                          ``(and
+                             (pred ht?)
+                             ,@(-map
+                                (lambda (key)
+                                  `(pred
+                                    (lambda (hash-table)
+                                      (ht-contains? hash-table ,(lsp-keyword->string key)))))
+                                ',required)
+                             ,@(let ((current-list property-bindings)
+                                     (output-bindings nil))
+                                 (while current-list
+                                   (-let* (((curr-binding-as-keyword next-entry . _) current-list)
+                                           (curr-binding-as-camelcased-string
+                                            (lsp-keyword->string (or (alist-get curr-binding-as-keyword ',params)
+                                                                     (error "Unknown key: %s.  Available keys: %s"
+                                                                            (symbol-name curr-binding-as-keyword)
+                                                                            ',(-map #'cl-first params)))))
+                                           (bound-name (lsp-keyword->symbol curr-binding-as-keyword))
+                                           (next-entry-is-key-or-nil
+                                            (and (symbolp next-entry)
+                                                 (or (null next-entry)
+                                                     (s-starts-with? ":" (symbol-name next-entry))))))
+                                     (cond
+                                      (next-entry-is-key-or-nil
+                                       (push `(app (lambda (hash-table)
+                                                     (ht-get hash-table ,curr-binding-as-camelcased-string))
+                                                   ,bound-name)
+                                             output-bindings)
+                                       (setf current-list (cdr current-list)))
+                                      (t
+                                       (push `(app (lambda (hash-table)
+                                                     (ht-get hash-table ,curr-binding-as-camelcased-string))
+                                                   ,next-entry)
+                                             output-bindings)
+                                       (setf current-list (cddr current-list))))))
+                                 output-bindings))))
+                    (-mapcat (-lambda ((label . name))
+                               (list
+                                `(defun ,(intern (format "lsp:%s-%s"
+                                                         (s-dashed-words (symbol-name interface))
+                                                         (substring (symbol-name label) 1)))
+                                     (object)
+                                   ,(if lsp-use-plists
+                                        `(plist-get object ,name)
+                                      `(when (ht? object) (gethash ,(lsp-keyword->string name) object))))
+                                `(defun ,(intern (format "lsp:set-%s-%s"
+                                                         (s-dashed-words (symbol-name interface))
+                                                         (substring (symbol-name label) 1)))
+                                     (object value)
+                                   ,@(if lsp-use-plists
+                                         `((plist-put object ,name value))
+                                       `((puthash ,(lsp-keyword->string name) value object)
+                                         object)))))
+                             params)))))
+         (apply #'append)
+         (cl-list* 'progn))))
+
+(pcase-defmacro lsp-interface (interface &rest property-bindings)
+  "If EXPVAL is an instance of INTERFACE, destructure it by matching its
+properties. EXPVAL should be a plist or hash table depending on the variable
+`lsp-use-plists'.
+
+INTERFACE should be an LSP interface defined with `lsp-interface'. This form
+will not match if any of INTERFACE's required fields are missing in EXPVAL.
+
+Each :PROPERTY keyword matches a field in EXPVAL. The keyword may be followed by
+an optional PATTERN, which is a `pcase' pattern to apply to the field's value.
+Otherwise, PROPERTY is let-bound to the field's value.
+
+\(fn INTERFACE [:PROPERTY [PATTERN]]...)"
+  (cl-check-type interface symbol)
+  (let ((lsp-pcase-macroexpander
+         (intern (format "lsp--pcase-macroexpander-%s" interface))))
+    (cl-assert (fboundp lsp-pcase-macroexpander) nil "not a known LSP interface: %s" interface)
+    (apply lsp-pcase-macroexpander property-bindings)))
+
+(if lsp-use-plists
+    (progn
+      (defun lsp-get (from key)
+        (plist-get from key))
+      (defun lsp-put (where key value)
+        (plist-put where key value))
+      (defun lsp-map (fn value)
+        (-map (-lambda ((k v))
+                (funcall fn (lsp-keyword->string k) v))
+              (-partition 2 value )))
+      (defalias 'lsp-merge 'append)
+      (defalias 'lsp-empty? 'null)
+      (defalias 'lsp-copy 'copy-sequence)
+      (defun lsp-member? (from key)
+        (when (listp from)
+          (plist-member from key)))
+      (defalias 'lsp-structure-p 'json-plist-p)
+      (defun lsp-delete (from key)
+        (cl-remf from key)
+        from))
+  (defun lsp-get (from key)
+    (when from
+      (gethash (lsp-keyword->string key) from)))
+  (defun lsp-put (where key value)
+    (prog1 where
+      (puthash (lsp-keyword->string key) value where)))
+  (defun lsp-map (fn value)
+    (when value
+      (maphash fn value)))
+  (defalias 'lsp-merge 'ht-merge)
+  (defalias 'lsp-empty? 'ht-empty?)
+  (defalias 'lsp-copy 'ht-copy)
+  (defun lsp-member? (from key)
+    (when (hash-table-p from)
+      (not (eq (gethash (lsp-keyword->string key) from :__lsp_default)
+               :__lsp_default))))
+  (defalias 'lsp-structure-p 'hash-table-p)
+  (defun lsp-delete (from key)
+    (ht-remove from (lsp-keyword->string key))
+    from))
+
+(defmacro lsp-defun (name match-form &rest body)
+  "Define a function named NAME.
+The function destructures its input as MATCH-FORM then executes BODY.
+
+Note that you have to enclose the MATCH-FORM in a pair of parens,
+such that:
+
+  (-defun (x) body)
+  (-defun (x y ...) body)
+
+has the usual semantics of `defun'.  Furthermore, these get
+translated into a normal `defun', so there is no performance
+penalty.
+
+See `-let' for a description of the destructuring mechanism."
+  (declare (doc-string 3) (indent defun)
+           (debug (&define name sexp
+                           [&optional stringp]
+                           [&optional ("declare" &rest sexp)]
+                           [&optional ("interactive" interactive)]
+                           def-body)))
+  (cond
+   ((nlistp match-form)
+    (signal 'wrong-type-argument (list #'listp match-form)))
+   ;; no destructuring, so just return regular defun to make things faster
+   ((-all? #'symbolp match-form)
+    `(defun ,name ,match-form ,@body))
+   (t
+    (-let* ((inputs (--map-indexed (list it (make-symbol (format "input%d" it-index))) match-form))
+            ((body docs) (cond
+                          ;; only docs
+                          ((and (stringp (car body))
+                                (not (cdr body)))
+                           (list body (car body)))
+                          ;; docs + body
+                          ((stringp (car body))
+                           (list (cdr body) (car body)))
+                          ;; no docs
+                          (t (list body))))
+            ((body interactive-form) (cond
+                                      ;; interactive form
+                                      ((and (listp (car body))
+                                            (eq (caar body) 'interactive))
+                                       (list (cdr body) (car body)))
+                                      ;; no interactive form
+                                      (t (list body)))))
+      ;; TODO: because inputs to the defun are evaluated only once,
+      ;; -let* need not to create the extra bindings to ensure that.
+      ;; We should find a way to optimize that.  Not critical however.
+      `(defun ,name ,(-map #'cadr inputs)
+         ,@(when docs (list docs))
+         ,@(when interactive-form (list interactive-form))
+         (-let* ,inputs ,@body))))))
+
+
+
+
+;; manually defined interfaces
+(defconst lsp/markup-kind-plain-text "plaintext")
+(defconst lsp/markup-kind-markdown "markdown")
+
+(eval-and-compile
+  (lsp-interface (JSONResponse (:params :id :method :result) nil)
+                 (JSONResponseError (:error) nil)
+                 (JSONMessage nil (:params :id :method :result :error))
+                 (JSONResult nil (:params :id :method))
+                 (JSONNotification (:params :method) nil)
+                 (JSONRequest (:params :method) nil)
+                 (JSONError (:message :code) (:data))
+                 (ProgressParams (:token :value) nil)
+                 (Edit (:kind) nil)
+                 (WorkDoneProgress (:kind) nil)
+                 (WorkDoneProgressBegin  (:kind :title) (:cancellable :message :percentage))
+                 (WorkDoneProgressReport  (:kind) (:cancellable :message :percentage))
+                 (WorkDoneProgressEnd  (:kind) (:message))
+                 (WorkDoneProgressOptions nil (:workDoneProgress))
+                 (SemanticTokensOptions (:legend) (:rangeProvider :documentProvider))
+                 (SemanticTokensLegend (:tokenTypes :tokenModifiers))
+                 (SemanticTokensResult (:resultId) (:data))
+                 (SemanticTokensPartialResult nil (:data))
+                 (SemanticTokensEdit (:start :deleteCount) (:data))
+                 (SemanticTokensDelta (:resultId) (:edits))
+                 (SemanticTokensDeltaPartialResult nil (:edits)))
+
+  (lsp-interface (v1:ProgressParams (:id :title) (:message :percentage :done))))
+
+(defun dash-expand:&RangeToPoint (key source)
+  "Convert the position KEY from SOURCE into a point."
+  `(lsp--position-to-point
+    (lsp-get ,source ,key)))
+
+(eval-and-compile
+  (lsp-interface (eslint:StatusParams  (:state) nil)
+                 (eslint:OpenESLintDocParams (:url) nil)
+                 (eslint:ConfirmExecutionParams (:scope :file :libraryPath) nil))
+
+  (lsp-interface (haxe:ProcessStartNotification (:title) nil))
+
+  (lsp-interface (pwsh:ScriptRegion (:StartLineNumber :EndLineNumber :StartColumnNumber :EndColumnNumber :Text) nil))
+
+  (lsp-interface (omnisharp:ErrorMessage (:Text :FileName :Line :Column))
+                 (omnisharp:ProjectInformationRequest (:FileName))
+                 (omnisharp:MsBuildProject (:IsUnitProject :IsExe :Platform :Configuration :IntermediateOutputPath :OutputPath :TargetFrameworks :SourceFiles :TargetFramework :TargetPath :AssemblyName :Path :ProjectGuid))
+                 (omnisharp:ProjectInformation (:ScriptProject :MsBuildProject))
+                 (omnisharp:CodeStructureRequest (:FileName))
+                 (omnisharp:CodeStructureResponse (:Elements))
+                 (omnisharp:CodeElement (:Kind :Name :DisplayName :Children :Ranges :Properties))
+                 (omnisharp:CodeElementProperties () (:static :accessibility :testMethodName :testFramework))
+                 (omnisharp:Range (:Start :End))
+                 (omnisharp:RangeList () (:attributes :full :name))
+                 (omnisharp:Point (:Line :Column))
+                 (omnisharp:RunTestsInClassRequest (:MethodNames :RunSettings :TestFrameworkname :TargetFrameworkVersion :NoBuild :Line :Column :Buffer :FileName))
+                 (omnisharp:RunTestResponse (:Results :Pass :Failure :ContextHadNoTests))
+                 (omnisharp:TestMessageEvent (:MessageLevel :Message))
+                 (omnisharp:DotNetTestResult (:MethodName :Outcome :ErrorMessage :ErrorStackTrace :StandardOutput :StandardError))
+                 (omnisharp:MetadataRequest (:AssemblyName :TypeName :ProjectName :VersionNumber :Language))
+                 (omnisharp:MetadataResponse (:SourceName :Source)))
+
+  (lsp-interface (csharp-ls:CSharpMetadata (:textDocument))
+                 (csharp-ls:CSharpMetadataResponse (:source :projectName :assemblyName :symbolName)))
+
+  (lsp-interface (ocaml-lsp:TypeEnclosingParams (:uri :at :index :verbosity) nil)
+                 (ocaml-lsp:TypeEnclosingResult (:index :enclosings :type) nil)
+                 (ocaml-lsp:GetDocumentationParams (:textDocument :position :contentFormat) nil))
+
+  (lsp-interface (rls:Cmd (:args :binary :env :cwd) nil))
+
+  (lsp-interface (rust-analyzer:AnalyzerStatusParams (:textDocument))
+                 (rust-analyzer:SyntaxTreeParams (:textDocument) (:range))
+                 (rust-analyzer:ViewHir (:textDocument :position))
+                 (rust-analyzer:ViewItemTree (:textDocument))
+                 (rust-analyzer:ExpandMacroParams (:textDocument :position) nil)
+                 (rust-analyzer:ExpandedMacro (:name :expansion) nil)
+                 (rust-analyzer:MatchingBraceParams (:textDocument :positions) nil)
+                 (rust-analyzer:OpenCargoTomlParams (:textDocument) nil)
+                 (rust-analyzer:OpenExternalDocsParams (:textDocument :position) nil)
+                 (rust-analyzer:ResovedCodeActionParams (:id :codeActionParams) nil)
+                 (rust-analyzer:JoinLinesParams (:textDocument :ranges) nil)
+                 (rust-analyzer:MoveItemParams (:textDocument :range :direction) nil)
+                 (rust-analyzer:RunnablesParams (:textDocument) (:position))
+                 (rust-analyzer:Runnable (:label :kind :args) (:location))
+                 (rust-analyzer:RunnableArgs (:cargoArgs :executableArgs) (:workspaceRoot :expectTest :environment))
+                 (rust-analyzer:RelatedTestsParams (:textDocument :position) nil)
+                 (rust-analyzer:RelatedTests (:runnable) nil)
+                 (rust-analyzer:SsrParams (:query :parseOnly) nil)
+                 (rust-analyzer:CommandLink (:title :command) (:arguments :tooltip))
+                 (rust-analyzer:CommandLinkGroup (:commands) (:title)))
+
+  (lsp-interface (clojure-lsp:TestTreeParams (:uri :tree) nil)
+                 (clojure-lsp:TestTreeNode (:name :range :nameRange :kind) (:children))
+                 (clojure-lsp:ProjectTreeNode (:name :type) (:nodes :final :id :uri :detail :range)))
+
+  (lsp-interface (terraform-ls:ModuleCalls (:v :module_calls) nil))
+  (lsp-interface (terraform-ls:Module (:name :docs_link :version :source_type :dependent_modules) nil))
+  (lsp-interface (terraform-ls:Providers (:v :provider_requirements :installed_providers) nil))
+  (lsp-interface (terraform-ls:module.terraform (:v :required_version :discovered_version)))
+
+  (lsp-interface
+   (copilot-ls:SignInInitiateResponse (:status :userCode :verificationUri :expiresIn :interval :user) nil)
+   (copilot-ls:SignInConfirmResponse (:status :user))
+   (copilot-ls:CheckStatusResponse (:status :user))
+   (copilot-ls:McpToolsNotification (:servers))))
+
+
+;; begin autogenerated code
+
+(defvar lsp/completion-item-kind-lookup
+  [nil Text Method Function Constructor Field Variable Class Interface Module Property Unit Value Enum Keyword Snippet Color File Reference Folder EnumMember Constant Struct Event Operator TypeParameter])
+(defconst lsp/completion-item-kind-text 1)
+(defconst lsp/completion-item-kind-method 2)
+(defconst lsp/completion-item-kind-function 3)
+(defconst lsp/completion-item-kind-constructor 4)
+(defconst lsp/completion-item-kind-field 5)
+(defconst lsp/completion-item-kind-variable 6)
+(defconst lsp/completion-item-kind-class 7)
+(defconst lsp/completion-item-kind-interface 8)
+(defconst lsp/completion-item-kind-module 9)
+(defconst lsp/completion-item-kind-property 10)
+(defconst lsp/completion-item-kind-unit 11)
+(defconst lsp/completion-item-kind-value 12)
+(defconst lsp/completion-item-kind-enum 13)
+(defconst lsp/completion-item-kind-keyword 14)
+(defconst lsp/completion-item-kind-snippet 15)
+(defconst lsp/completion-item-kind-color 16)
+(defconst lsp/completion-item-kind-file 17)
+(defconst lsp/completion-item-kind-reference 18)
+(defconst lsp/completion-item-kind-folder 19)
+(defconst lsp/completion-item-kind-enum-member 20)
+(defconst lsp/completion-item-kind-constant 21)
+(defconst lsp/completion-item-kind-struct 22)
+(defconst lsp/completion-item-kind-event 23)
+(defconst lsp/completion-item-kind-operator 24)
+(defconst lsp/completion-item-kind-type-parameter 25)
+(defvar lsp/completion-trigger-kind-lookup
+  [nil Invoked TriggerCharacter TriggerForIncompleteCompletions])
+(defconst lsp/completion-trigger-kind-invoked 1)
+(defconst lsp/completion-trigger-kind-trigger-character 2)
+(defconst lsp/completion-trigger-kind-trigger-for-incomplete-completions 3)
+(defconst lsp/inline-completion-trigger-invoked 1 "Explicit invocation as per https://microsoft.github.io/language-server-protocol/specifications/lsp/3.18/specification/#inlineCompletionTriggerKind")
+(defconst lsp/inline-completion-trigger-automatic 2 "Automatic invocation as per https://microsoft.github.io/language-server-protocol/specifications/lsp/3.18/specification/#inlineCompletionTriggerKind")
+(defvar lsp/diagnostic-severity-lookup
+  [nil Error Warning Information Hint Max])
+(defconst lsp/diagnostic-severity-error 1)
+(defconst lsp/diagnostic-severity-warning 2)
+(defconst lsp/diagnostic-severity-information 3)
+(defconst lsp/diagnostic-severity-hint 4)
+(defconst lsp/diagnostic-severity-max 5)
+(defvar lsp/diagnostic-tag-lookup
+  [nil Unnecessary Deprecated])
+(defconst lsp/diagnostic-tag-unnecessary 1)
+(defconst lsp/diagnostic-tag-deprecated 2)
+(defvar lsp/completion-item-tag-lookup
+  [nil Deprecated])
+(defconst lsp/completion-item-tag-deprecated 1)
+(defvar lsp/document-highlight-kind-lookup
+  [nil Text Read Write])
+(defconst lsp/document-highlight-kind-text 1)
+(defconst lsp/document-highlight-kind-read 2)
+(defconst lsp/document-highlight-kind-write 3)
+(defvar lsp/file-change-type-lookup
+  [nil Created Changed Deleted])
+(defconst lsp/file-change-type-created 1)
+(defconst lsp/file-change-type-changed 2)
+(defconst lsp/file-change-type-deleted 3)
+(defvar lsp/insert-text-format-lookup
+  [nil PlainText Snippet])
+(defconst lsp/insert-text-format-plain-text 1)
+(defconst lsp/insert-text-format-snippet 2)
+(defvar lsp/insert-text-mode-lookup
+  [nil AsIs AdjustIndentation])
+(defconst lsp/insert-text-mode-as-it 1)
+(defconst lsp/insert-text-mode-adjust-indentation 2)
+(defvar lsp/message-type-lookup
+  [nil Error Warning Info Log])
+(defconst lsp/message-type-error 1)
+(defconst lsp/message-type-warning 2)
+(defconst lsp/message-type-info 3)
+(defconst lsp/message-type-log 4)
+(defvar lsp/signature-help-trigger-kind-lookup
+  [nil Invoked TriggerCharacter ContentChange])
+(defconst lsp/signature-help-trigger-kind-invoked 1)
+(defconst lsp/signature-help-trigger-kind-trigger-character 2)
+(defconst lsp/signature-help-trigger-kind-content-change 3)
+(defvar lsp/symbol-kind-lookup
+  [nil File Module Namespace Package Class Method Property Field Constructor Enum Interface Function Variable Constant String Number Boolean Array Object Key Null EnumMember Struct Event Operator TypeParameter])
+(defconst lsp/symbol-kind-file 1)
+(defconst lsp/symbol-kind-module 2)
+(defconst lsp/symbol-kind-namespace 3)
+(defconst lsp/symbol-kind-package 4)
+(defconst lsp/symbol-kind-class 5)
+(defconst lsp/symbol-kind-method 6)
+(defconst lsp/symbol-kind-property 7)
+(defconst lsp/symbol-kind-field 8)
+(defconst lsp/symbol-kind-constructor 9)
+(defconst lsp/symbol-kind-enum 10)
+(defconst lsp/symbol-kind-interface 11)
+(defconst lsp/symbol-kind-function 12)
+(defconst lsp/symbol-kind-variable 13)
+(defconst lsp/symbol-kind-constant 14)
+(defconst lsp/symbol-kind-string 15)
+(defconst lsp/symbol-kind-number 16)
+(defconst lsp/symbol-kind-boolean 17)
+(defconst lsp/symbol-kind-array 18)
+(defconst lsp/symbol-kind-object 19)
+(defconst lsp/symbol-kind-key 20)
+(defconst lsp/symbol-kind-null 21)
+(defconst lsp/symbol-kind-enum-member 22)
+(defconst lsp/symbol-kind-struct 23)
+(defconst lsp/symbol-kind-event 24)
+(defconst lsp/symbol-kind-operator 25)
+(defconst lsp/symbol-kind-type-parameter 26)
+(defvar lsp/text-document-save-reason-lookup
+  [nil Manual AfterDelay FocusOut])
+(defconst lsp/text-document-save-reason-manual 1)
+(defconst lsp/text-document-save-reason-after-delay 2)
+(defconst lsp/text-document-save-reason-focus-out 3)
+(defvar lsp/text-document-sync-kind-lookup
+  [None Full Incremental])
+(defconst lsp/text-document-sync-kind-none 0)
+(defconst lsp/text-document-sync-kind-full 1)
+(defconst lsp/text-document-sync-kind-incremental 2)
+(defvar lsp/type-hierarchy-direction-lookup
+  [nil Children Parents Both])
+(defconst lsp/type-hierarchy-direction-children 1)
+(defconst lsp/type-hierarchy-direction-parents 2)
+(defconst lsp/type-hierarchy-direction-both 3)
+(defvar lsp/call-hierarchy-direction-lookup
+  [nil CallsFrom CallsTo])
+(defconst lsp/call-hierarchy-direction-calls-from 1)
+(defconst lsp/call-hierarchy-direction-calls-to 2)
+(defvar lsp/response-error-code-lookup
+  [nil ParseError InvalidRequest MethodNotFound InvalidParams InternalError serverErrorStart serverErrorEnd])
+(defconst lsp/response-error-code-parse-error 1)
+(defconst lsp/response-error-code-invalid-request 2)
+(defconst lsp/response-error-code-method-not-found 3)
+(defconst lsp/response-error-code-invalid-params 4)
+(defconst lsp/response-error-code-internal-error 5)
+(defconst lsp/response-error-code-server-error-start 6)
+(defconst lsp/response-error-code-server-error-end 7)
+
+(eval-and-compile
+  (lsp-interface
+   (CallHierarchyCapabilities nil (:dynamicRegistration))
+ (CallHierarchyItem (:kind :name :range :selectionRange :uri) (:detail :tags))
+ (ClientCapabilities nil (:experimental :textDocument :workspace))
+ (ClientInfo (:name) (:version))
+ (CodeActionCapabilities nil (:codeActionLiteralSupport :dynamicRegistration :isPreferredSupport :dataSupport :resolveSupport))
+ (CodeActionContext (:diagnostics) (:only))
+ (CodeActionKindCapabilities (:valueSet) nil)
+ (CodeActionLiteralSupportCapabilities nil (:codeActionKind))
+ (CodeActionOptions nil (:codeActionKinds :resolveProvider))
+ (CodeLensCapabilities nil (:dynamicRegistration))
+ (CodeLensOptions (:resolveProvider) nil)
+ (Color (:red :green :blue :alpha) nil)
+ (ColorProviderCapabilities nil (:dynamicRegistration))
+ (ColorProviderOptions nil (:documentSelector :id))
+ (ColoringInformation (:range :styles) nil)
+ (Command (:title :command) (:arguments))
+ (CompletionCapabilities nil (:completionItem :completionItemKind :contextSupport :dynamicRegistration))
+ (CompletionContext (:triggerKind) (:triggerCharacter))
+ (CompletionItem (:label) (:additionalTextEdits :command :commitCharacters :data :deprecated :detail :documentation :filterText :insertText :insertTextFormat :insertTextMode :kind :preselect :sortText :tags :textEdit :score :labelDetails))
+ (CompletionItemCapabilities nil (:commitCharactersSupport :deprecatedSupport :documentationFormat :preselectSupport :snippetSupport :tagSupport :insertReplaceSupport :resolveSupport :labelDetailsSupport))
+ (CompletionItemKindCapabilities nil (:valueSet))
+ (CompletionItemTagSupportCapabilities (:valueSet) nil)
+ (CompletionOptions nil (:resolveProvider :triggerCharacters :allCommitCharacters))
+ (ConfigurationItem nil (:scopeUri :section))
+ (CreateFileOptions nil (:ignoreIfExists :overwrite))
+ (DeclarationCapabilities nil (:dynamicRegistration :linkSupport))
+ (DefinitionCapabilities nil (:dynamicRegistration :linkSupport))
+ (DeleteFileOptions nil (:ignoreIfNotExists :recursive))
+ (Diagnostic (:range :message) (:code :relatedInformation :severity :source :tags))
+ (DiagnosticClientCapabilities nil (:dynamicRegistration :relatedDocumentSupport))
+ (DiagnosticOptions (:interFileDependencies :workspaceDiagnostics) (:identifier))
+ (DiagnosticRelatedInformation (:location :message) nil)
+ (DiagnosticServerCancellationData (:retriggerRequest) nil)
+ (DiagnosticsTagSupport (:valueSet) nil)
+ (DidChangeConfigurationCapabilities nil (:dynamicRegistration))
+ (DidChangeWatchedFilesCapabilities nil (:dynamicRegistration))
+ (DocumentDiagnosticParams (:textDocument) (:identifier :previousResultId))
+ (DocumentDiagnosticReport (:kind) (:resultId :items :relatedDocuments))
+ (DocumentFilter nil (:language :pattern :scheme))
+ (DocumentHighlightCapabilities nil (:dynamicRegistration))
+ (DocumentLinkCapabilities nil (:dynamicRegistration :tooltipSupport))
+ (DocumentLinkOptions nil (:resolveProvider))
+ (DocumentOnTypeFormattingOptions (:firstTriggerCharacter) (:moreTriggerCharacter))
+ (DocumentSymbol (:kind :name :range :selectionRange) (:children :deprecated :detail))
+ (DocumentSymbolCapabilities nil (:dynamicRegistration :hierarchicalDocumentSymbolSupport :symbolKind))
+ (ExecuteCommandCapabilities nil (:dynamicRegistration))
+ (ExecuteCommandOptions (:commands) nil)
+ (FileEvent (:type :uri) nil)
+ (FileSystemWatcher (:globPattern) (:kind))
+ (FileOperationFilter (:pattern) (:scheme))
+ (FileOperationPattern (:glob) (:matches :options))
+ (FileOperationPatternOptions nil (:ignoreCase))
+ (FileOperationRegistrationOptions (:filters) nil)
+ (FoldingRangeCapabilities nil (:dynamicRegistration :lineFoldingOnly :rangeLimit))
+ (FoldingRangeProviderOptions nil (:documentSelector :id))
+ (FormattingCapabilities nil (:dynamicRegistration))
+ (FormattingOptions (:tabSize :insertSpaces) (:trimTrailingWhitespace :insertFinalNewline :trimFinalNewlines))
+ (HoverCapabilities nil (:contentFormat :dynamicRegistration))
+ (ImplementationCapabilities nil (:dynamicRegistration :linkSupport))
+ (LinkedEditingRanges (:ranges) (:wordPattern))
+ (Location (:range :uri) nil)
+ (MarkedString (:language :value) nil)
+ (MarkupContent (:kind :value) nil)
+ (MessageActionItem (:title) nil)
+ (OnTypeFormattingCapabilities nil (:dynamicRegistration))
+ (ParameterInformation (:label) (:documentation))
+ (ParameterInformationCapabilities nil (:labelOffsetSupport))
+ (Position (:character :line) nil)
+ (PublishDiagnosticsCapabilities nil (:relatedInformation :tagSupport :versionSupport))
+ (Range (:start :end) nil)
+ (RangeFormattingCapabilities nil (:dynamicRegistration))
+ (ReferenceContext (:includeDeclaration) nil)
+ (ReferencesCapabilities nil (:dynamicRegistration))
+ (Registration (:method :id) (:registerOptions))
+ (RenameCapabilities nil (:dynamicRegistration :prepareSupport))
+ (RenameFileOptions nil (:ignoreIfExists :overwrite))
+ (RenameOptions nil (:documentSelector :id :prepareProvider))
+ (ResourceChange nil (:current :newUri))
+ (ResourceOperation (:kind) nil)
+ (SaveOptions nil (:includeText))
+ (SelectionRange (:range) (:parent))
+ (SelectionRangeCapabilities nil (:dynamicRegistration))
+ (SemanticHighlightingCapabilities nil (:semanticHighlighting))
+ (SemanticHighlightingInformation (:line) (:tokens))
+ (SemanticHighlightingServerCapabilities nil (:scopes))
+ (ServerCapabilities nil (:callHierarchyProvider :codeActionProvider :codeLensProvider :colorProvider :completionProvider :declarationProvider :definitionProvider :documentFormattingProvider :documentHighlightProvider :documentLinkProvider :documentOnTypeFormattingProvider :documentRangeFormattingProvider :documentSymbolProvider :executeCommandProvider :experimental :foldingRangeProvider :hoverProvider :implementationProvider :positionEncoding :referencesProvider :renameProvider :selectionRangeProvider :semanticHighlighting :signatureHelpProvider :textDocumentSync :typeDefinitionProvider :typeHierarchyProvider :workspace :workspaceSymbolProvider :semanticTokensProvider :inlineCompletionProvider :inlayHintProvider))
+ (ServerInfo (:name) (:version))
+ (SignatureHelp (:signatures) (:activeParameter :activeSignature))
+ (SignatureHelpCapabilities nil (:contextSupport :dynamicRegistration :signatureInformation))
+ (SignatureHelpContext (:triggerKind :isRetrigger) (:activeSignatureHelp :triggerCharacter))
+ (SignatureHelpOptions nil (:retriggerCharacters :triggerCharacters))
+ (SignatureInformation (:label) (:documentation :parameters :activeParameter))
+ (SignatureInformationCapabilities nil (:documentationFormat :parameterInformation))
+ (StaticRegistrationOptions nil (:documentSelector :id))
+ (SymbolCapabilities nil (:dynamicRegistration :symbolKind))
+ (SymbolKindCapabilities nil (:valueSet))
+ (SynchronizationCapabilities nil (:didSave :dynamicRegistration :willSave :willSaveWaitUntil))
+ (TextDocumentClientCapabilities nil (:callHierarchy :codeAction :codeLens :colorProvider :completion :declaration :definition :documentHighlight :documentLink :documentSymbol :foldingRange :formatting :hover :implementation :onTypeFormatting :publishDiagnostics :rangeFormatting :references :rename :selectionRange :semanticHighlightingCapabilities :signatureHelp :synchronization :typeDefinition :typeHierarchyCapabilities))
+ (TextDocumentContentChangeEvent (:text) (:range :rangeLength))
+ (TextDocumentEdit (:textDocument :edits) nil)
+ (TextDocumentIdentifier (:uri) nil)
+ (TextDocumentItem (:languageId :text :uri :version) nil)
+ (TextDocumentSyncOptions nil (:change :openClose :save :willSave :willSaveWaitUntil))
+ (TextEdit (:newText :range) nil)
+ (InsertReplaceEdit (:newText :insert :replace) nil)
+ (SnippetTextEdit (:newText :range) (:insertTextFormat))
+ (TypeDefinitionCapabilities nil (:dynamicRegistration :linkSupport))
+ (TypeHierarchyCapabilities nil (:dynamicRegistration))
+ (TypeHierarchyItem (:kind :name :range :selectionRange :uri) (:children :data :deprecated :detail :parents))
+ (Unregistration (:method :id) nil)
+ (VersionedTextDocumentIdentifier (:uri) (:version))
+ (WorkspaceClientCapabilities nil (:applyEdit :configuration :didChangeConfiguration :didChangeWatchedFiles :executeCommand :symbol :workspaceEdit :workspaceFolders))
+ (WorkspaceEdit nil (:changes :documentChanges :resourceChanges))
+ (WorkspaceEditCapabilities nil (:documentChanges :failureHandling :resourceChanges :resourceOperations))
+ (WorkspaceFolder (:uri :name) nil)
+ (WorkspaceFoldersChangeEvent (:removed :added) nil)
+ (WorkspaceFoldersOptions nil (:changeNotifications :supported))
+ (WorkspaceServerCapabilities nil (:workspaceFolders :fileOperations))
+ (WorkspaceFileOperations nil (:didCreate :willCreate :didRename :willRename :didDelete :willDelete))
+ (ApplyWorkspaceEditParams (:edit) (:label))
+ (ApplyWorkspaceEditResponse (:applied) nil)
+ (CallHierarchyIncomingCall (:from :fromRanges) nil)
+ (CallHierarchyIncomingCallsParams (:item) nil)
+ (CallHierarchyOutgoingCall (:to :fromRanges) nil)
+ (CallHierarchyOutgoingCallsParams (:item) nil)
+ (CallHierarchyPrepareParams (:textDocument :position) (:uri))
+ (CodeAction (:title) (:command :diagnostics :edit :isPreferred :kind :data))
+ (CodeActionKind nil nil)
+ (CodeActionParams (:textDocument :context :range) nil)
+ (CodeLens (:range) (:command :data))
+ (CodeLensParams (:textDocument) nil)
+ (CodeLensRegistrationOptions nil (:documentSelector :resolveProvider))
+ (ColorInformation (:color :range) nil)
+ (ColorPresentation (:label) (:additionalTextEdits :textEdit))
+ (ColorPresentationParams (:color :textDocument :range) nil)
+ (ColoringParams (:uri :infos) nil)
+ (ColoringStyle nil nil)
+ (CompletionList (:items :isIncomplete) nil)
+ (CompletionParams (:textDocument :position) (:context :uri))
+ (CompletionRegistrationOptions nil (:documentSelector :resolveProvider :triggerCharacters))
+ (ConfigurationParams (:items) nil)
+ (CreateFile (:kind :uri) (:options))
+ (DeclarationParams (:textDocument :position) (:uri))
+ (DefinitionParams (:textDocument :position) (:uri))
+ (DeleteFile (:kind :uri) (:options))
+ (DidChangeConfigurationParams (:settings) nil)
+ (DidChangeTextDocumentParams (:contentChanges :textDocument) (:uri))
+ (DidChangeWatchedFilesParams (:changes) nil)
+ (DidChangeWatchedFilesRegistrationOptions (:watchers) nil)
+ (DidChangeWorkspaceFoldersParams (:event) nil)
+ (DidCloseTextDocumentParams (:textDocument) nil)
+ (DidOpenTextDocumentParams (:textDocument) (:text))
+ (DidSaveTextDocumentParams (:textDocument) (:text))
+ (DocumentColorParams (:textDocument) nil)
+ (DocumentFormattingParams (:textDocument :options) nil)
+ (DocumentHighlight (:range) (:kind))
+ (DocumentHighlightParams (:textDocument :position) (:uri))
+ (DocumentLink (:range) (:data :target :tooltip))
+ (DocumentLinkParams (:textDocument) nil)
+ (DocumentLinkRegistrationOptions nil (:documentSelector :resolveProvider))
+ (DocumentOnTypeFormattingParams (:ch :textDocument :options :position) nil)
+ (DocumentOnTypeFormattingRegistrationOptions (:firstTriggerCharacter) (:documentSelector :moreTriggerCharacter))
+ (DocumentRangeFormattingParams (:textDocument :options :range) nil)
+ (DocumentSymbolParams (:textDocument) nil)
+ (DynamicRegistrationCapabilities nil (:dynamicRegistration))
+ (ExecuteCommandParams (:command) (:arguments))
+ (ExecuteCommandRegistrationOptions (:commands) nil)
+ (FailureHandlingKind nil nil)
+ (FileRename (:oldUri :newUri) nil)
+ (FoldingRange (:endLine :startLine) (:endCharacter :kind :startCharacter))
+ (FoldingRangeKind nil nil)
+ (FoldingRangeRequestParams (:textDocument) nil)
+ (Hover (:contents) (:range))
+ (HoverParams (:textDocument :position) (:uri))
+ (ImplementationParams (:textDocument :position) (:uri))
+ (InitializeError (:retry) nil)
+ (InitializeErrorCode nil nil)
+ (InitializeParams nil (:capabilities :clientInfo :clientName :initializationOptions :processId :rootPath :rootUri :trace :workspaceFolders))
+ (InitializeResult (:capabilities) (:serverInfo))
+ (InitializedParams nil nil)
+ (LocationLink (:targetSelectionRange :targetUri :targetRange) (:originSelectionRange))
+ (MarkupKind nil nil)
+ (MessageParams (:type :message) nil)
+ (PrepareRenameParams (:textDocument :position) (:uri))
+ (PrepareRenameResult (:range :placeholder) nil)
+ (PublishDiagnosticsParams (:diagnostics :uri) (:version))
+ (QuickPickItem (:label :picked :userData) nil)
+ (ReferenceParams (:textDocument :context :position) (:uri))
+ (RegistrationParams (:registrations) nil)
+ (RenameFile (:kind :newUri :oldUri) (:options))
+ (RenameFilesParams (:files) nil)
+ (RenameParams (:newName :textDocument :position) (:uri))
+ (ResolveTypeHierarchyItemParams (:item :resolve :direction) nil)
+ (ResourceOperationKind nil nil)
+ (SelectionRangeParams (:textDocument :positions) nil)
+ (SemanticHighlightingParams (:textDocument :lines) nil)
+ (ShowDocumentParams (:uri) (:external :takeFocus :selection))
+ (ShowDocumentResult (:success) nil)
+ (ShowInputBoxParams (:prompt) (:value))
+ (ShowMessageRequestParams (:type :message) (:actions))
+ (ShowQuickPickParams (:placeHolder :canPickMany :items) nil)
+ (SignatureHelpParams (:textDocument :position) (:context :uri))
+ (SignatureHelpRegistrationOptions nil (:documentSelector :triggerCharacters))
+ (SymbolInformation (:kind :name :location) (:containerName :deprecated))
+ (TextDocumentChangeRegistrationOptions (:syncKind) (:documentSelector))
+ (TextDocumentPositionParams (:textDocument :position) (:uri))
+ (TextDocumentRegistrationOptions nil (:documentSelector))
+ (TextDocumentSaveRegistrationOptions nil (:documentSelector :includeText))
+ (TypeDefinitionParams (:textDocument :position) (:uri))
+ (TypeHierarchyParams (:resolve :textDocument :position) (:direction :uri))
+ (UnregistrationParams (:unregisterations) nil)
+ (WatchKind nil nil)
+ (WillSaveTextDocumentParams (:reason :textDocument) nil)
+ (WorkspaceSymbolParams (:query) nil)
+ ;; 3.17
+ (RelativePattern (:baseUri :pattern) nil)
+ (LabelDetails nil (:detail :description))
+ (InlayHintOptions nil (:resolveProvider))
+ (InlayHint (:label :position) (:kind :paddingLeft :paddingRight :textEdits :tooltip :data))
+ (InlayHintLabelPart (:value) (:tooltip :location :command))
+ (InlayHintsParams (:textDocument) (:range))
+ ;; 3.18
+ (InlineCompletionParams (:textDocument :position :context))
+ (InlineCompletionContext (:triggerKind))
+ (InlineCompletionItem (:insertText) (:filterText :range :command))
+ (InlineCompletionList (:items) nil)))
+
+;; 3.17
+(defconst lsp/inlay-hint-kind-type-hint 1)
+(defconst lsp/inlay-hint-kind-parameter-hint 2)
+
+
+(provide 'lsp-protocol)
+;;; lsp-protocol.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-protocol.elc b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-protocol.elc
new file mode 100644
index 0000000..5b5ade3
Binary files /dev/null and b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-protocol.elc differ
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-purescript.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-purescript.el
new file mode 100644
index 0000000..f8f4631
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-purescript.el
@@ -0,0 +1,98 @@
+;;; lsp-purescript.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, purescript
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the PureScript Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-purescript nil
+  "LSP support for PureScript, using purescript-language-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/nwolverson/purescript-language-server"))
+
+(defcustom lsp-purescript-server-executable nil
+  "Path to server executable."
+  :type 'string
+  :risky t
+  :group 'lsp-purescript)
+
+(defcustom lsp-purescript-server-args
+  '("--stdio")
+  "Arguments to pass to the server."
+  :type '(repeat string)
+  :risky t
+  :group 'lsp-purescript)
+
+(defun lsp-purescript--server-command ()
+  "Generate LSP startup command for purescript-language-server."
+  (cons (or lsp-purescript-server-executable
+            (lsp-package-path 'purescript-language-server))
+        lsp-purescript-server-args))
+
+(lsp-defcustom lsp-purescript-add-spago-sources t
+  "Whether to add spago sources to the globs.
+Passed to the IDE server for source locations."
+  :type 'boolean
+  :group 'lsp-purescript
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "purescript.addSpagoSources")
+
+(lsp-defcustom lsp-purescript-add-npm-path nil
+  "Whether to add the local npm bin directory to the PATH."
+  :type 'boolean
+  :group 'lsp-purescript
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "purescript.addNpmPath")
+
+(lsp-defcustom lsp-purescript-formatter "purty"
+  "Tool to use to for formatting.
+Must be installed and on PATH (or npm installed with addNpmPath set)"
+  :type '(choice (const "none")
+                 (const "purty")
+                 (const "purs-tidy")
+                 (const "pose"))
+  :group 'lsp-purescript
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "purescript.formatter")
+
+(lsp-dependency 'purescript-language-server
+                '(:system "purescript-language-server")
+                '(:npm :package "purescript-language-server"
+                       :path "purescript-language-server"))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   #'lsp-purescript--server-command)
+  :major-modes '(purescript-mode)
+  :priority -1
+  :server-id 'pursls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'purescript-language-server callback error-callback))))
+
+
+(lsp-consistency-check lsp-purescript)
+
+(provide 'lsp-purescript)
+;;; lsp-purescript.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pwsh.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pwsh.el
new file mode 100644
index 0000000..19ca79b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pwsh.el
@@ -0,0 +1,368 @@
+;;; lsp-pwsh.el --- client for PowerShellEditorServices  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Kien Nguyen
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: kien.n.quang at gmail.com
+;; Keywords: lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(require 'f)
+(require 'dash)
+(require 's)
+(require 'ht)
+
+(require 'lsp-protocol)
+(require 'lsp-mode)
+
+(defgroup lsp-pwsh nil
+  "LSP support for PowerShell, using the PowerShellEditorServices."
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "6.2"))
+
+;; PowerShell vscode flags
+(defcustom lsp-pwsh-help-completion "BlockComment"
+  "Controls the comment-based help completion behavior triggered by typing '##'.
+Set the generated help style with \='BlockComment\=' or \='LineComment\='.
+Disable the feature with \='Disabled\='."
+  :type
+  '(choice (const "Disabled")
+           (const "BlockComment")
+           (const "LineComment"))
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-script-analysis-enable t
+  "Enables real-time script analysis from PowerShell Script Analyzer.
+Uses the newest installed version of the PSScriptAnalyzer module or the
+version bundled with this extension, if it is newer."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-script-analysis-settings-path ""
+  "Specifies the path to a PowerShell Script Analyzer settings file.
+To override the default settings for all projects, enter an absolute path,
+or enter a path relative to your workspace."
+  :type 'string
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-folding-enable t
+  "Enables syntax based code folding.
+When disabled, the default indentation based code folding is used."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-folding-show-last-line t
+  "Shows the last line of a folded section.
+Similar to the default VSCode folding style.
+When disabled, the entire folded region is hidden."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-preset "Custom"
+  "Sets the codeformatting options to follow the given indent style.
+Sets in a way that is compatible with PowerShell syntax.
+For more information about the brace styles please refer to https://github.com/PoshCode/PowerShellPracticeAndStyle/issues/81."
+  :type
+  '(choice (const "Custom")
+           (const "Allman")
+           (const "OTBS")
+           (const "Stroustrup"))
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-open-brace-on-same-line t
+  "Places open brace on the same line as its associated statement."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-new-line-after-open-brace t
+  "Adds a newline (line break) after an open brace."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-new-line-after-close-brace t
+  "Adds a newline (line break) after a closing brace."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-pipeline-indentation-style "NoIndentation"
+  "Multi-line pipeline style settings."
+  :type
+  '(choice (const "IncreaseIndentationForFirstPipeline")
+           (const "IncreaseIndentationAfterEveryPipeline")
+           (const "NoIndentation"))
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-whitespace-before-open-brace t
+  "Adds a space between a keyword and its associated scriptblock expression."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-whitespace-before-open-paren t
+  "Adds a space between a keyword (if, elseif, while, switch, etc) and its
+associated conditional expression."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-whitespace-around-operator t
+  "Adds spaces before and after an operator ('=', '+', '-', etc.)."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-whitespace-after-separator t
+  "Adds a space after a separator (',' and ';')."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-whitespace-inside-brace t
+  "Adds a space after an opening brace ('{') and before a closing brace ('}')."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-whitespace-around-pipe t
+  "Adds a space before and after the pipeline operator ('|')."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-ignore-one-line-block t
+  "Does not reformat one-line code blocks, such as \"if (...) {...} else
+{...}\"."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-align-property-value-pairs t
+  "Align assignment statements in a hashtable or a DSC Configuration."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-code-formatting-use-correct-casing nil
+  "Use correct casing for cmdlets."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-developer-editor-services-log-level "Normal"
+  "Sets the log level for the PowerShell Editor Services host executable.
+Valid values are \='Diagnostic\=', \='Verbose\=', \='Normal\=',
+ \='Warning\=', and \='Error\='"
+  :type
+  '(choice (const "Diagnostic")
+           (const "Verbose")
+           (const "Normal")
+           (const "Warning")
+           (const "Error"))
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-developer-editor-services-wait-for-debugger nil
+  "Launches the language service with the /waitForDebugger flag to force it to
+wait for a .NET debugger to attach before proceeding."
+  :type 'boolean
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-developer-feature-flags nil
+  "An array of strings that enable experimental features in the PowerShell
+extension."
+  :type
+  '(repeat string)
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(lsp-register-custom-settings
+ '(("powershell.developer.featureFlags" lsp-pwsh-developer-feature-flags)
+   ("powershell.developer.editorServicesWaitForDebugger" lsp-pwsh-developer-editor-services-wait-for-debugger t)
+   ("powershell.codeFormatting.useCorrectCasing" lsp-pwsh-code-formatting-use-correct-casing t)
+   ("powershell.codeFormatting.alignPropertyValuePairs" lsp-pwsh-code-formatting-align-property-value-pairs t)
+   ("powershell.codeFormatting.ignoreOneLineBlock" lsp-pwsh-code-formatting-ignore-one-line-block t)
+   ("powershell.codeFormatting.whitespaceAroundPipe" lsp-pwsh-code-formatting-whitespace-around-pipe t)
+   ("powershell.codeFormatting.whitespaceInsideBrace" lsp-pwsh-code-formatting-whitespace-inside-brace t)
+   ("powershell.codeFormatting.whitespaceAfterSeparator" lsp-pwsh-code-formatting-whitespace-after-separator t)
+   ("powershell.codeFormatting.whitespaceAroundOperator" lsp-pwsh-code-formatting-whitespace-around-operator t)
+   ("powershell.codeFormatting.whitespaceBeforeOpenParen" lsp-pwsh-code-formatting-whitespace-before-open-paren t)
+   ("powershell.codeFormatting.whitespaceBeforeOpenBrace" lsp-pwsh-code-formatting-whitespace-before-open-brace t)
+   ("powershell.codeFormatting.pipelineIndentationStyle" lsp-pwsh-code-formatting-pipeline-indentation-style)
+   ("powershell.codeFormatting.newLineAfterCloseBrace" lsp-pwsh-code-formatting-new-line-after-close-brace t)
+   ("powershell.codeFormatting.newLineAfterOpenBrace" lsp-pwsh-code-formatting-new-line-after-open-brace t)
+   ("powershell.codeFormatting.openBraceOnSameLine" lsp-pwsh-code-formatting-open-brace-on-same-line t)
+   ("powershell.codeFormatting.preset" lsp-pwsh-code-formatting-preset)
+   ("powershell.codeFolding.showLastLine" lsp-pwsh-code-folding-show-last-line t)
+   ("powershell.codeFolding.enable" lsp-pwsh-code-folding-enable t)
+   ("powershell.scriptAnalysis.settingsPath" lsp-pwsh-script-analysis-settings-path)
+   ("powershell.scriptAnalysis.enable" lsp-pwsh-script-analysis-enable t)
+   ("powershell.helpCompletion" lsp-pwsh-help-completion)))
+
+;; lsp-pwsh custom variables
+(defcustom lsp-pwsh-ext-path (expand-file-name "pwsh" lsp-server-install-dir)
+  "The path to powershell vscode extension."
+  :type 'string
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-exe (or (executable-find "pwsh") (executable-find "powershell"))
+  "PowerShell executable."
+  :type 'string
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pwsh-dir lsp-pwsh-ext-path
+  "Path to PowerShellEditorServices without last slash."
+  :type 'string
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defvar lsp-pwsh-pses-script (expand-file-name "PowerShellEditorServices/Start-EditorServices.ps1"
+                                               lsp-pwsh-dir)
+  "Main script to start PSES.")
+
+(defvar lsp-pwsh-log-path (expand-file-name "logs" lsp-pwsh-ext-path)
+  "Path to directory where server will write log files.
+Must not nil.")
+
+(defvar lsp-pwsh--sess-id (emacs-pid))
+
+(defun lsp-pwsh--command ()
+  "Return the command to start server."
+  `(,lsp-pwsh-exe "-NoProfile" "-NonInteractive" "-NoLogo"
+                  ,@(if (eq system-type 'windows-nt) '("-ExecutionPolicy" "Bypass"))
+                  "-OutputFormat" "Text"
+                  "-File"
+                  ,lsp-pwsh-pses-script
+                  "-HostName" "\"Emacs Host\""
+                  "-HostProfileId" "'Emacs.LSP'"
+                  "-HostVersion" "9.0.0"
+                  "-LogPath" ,(expand-file-name "emacs-powershell.log" lsp-pwsh-log-path)
+                  "-LogLevel" ,lsp-pwsh-developer-editor-services-log-level
+                  "-SessionDetailsPath" ,(expand-file-name (format "PSES-VSCode-%d" lsp-pwsh--sess-id)
+                                                           lsp-pwsh-log-path)
+                  ;; "-AdditionalModules" "@('PowerShellEditorServices.VSCode')"
+                  "-Stdio"
+                  "-BundledModulesPath" ,lsp-pwsh-dir
+                  "-FeatureFlags" "@()"))
+
+(defun lsp-pwsh--extra-init-params ()
+  "Return form describing parameters for language server.")
+
+(lsp-defun lsp-pwsh--apply-code-action-edits ((&Command :command :arguments?))
+  "Handle ACTION for PowerShell.ApplyCodeActionEdits."
+  (-if-let* (((&pwsh:ScriptRegion :start-line-number :end-line-number
+                                  :start-column-number :end-column-number :text)
+              (lsp-seq-first arguments?))
+             (start-position (lsp-make-position :line (1- start-line-number)
+                                                :character (1- start-column-number)))
+             (end-position (lsp-make-position :line (1- end-line-number)
+                                              :character (1- end-column-number)))
+             (edits `[,(lsp-make-text-edit :range (lsp-make-range :start start-position
+                                                                  :end end-position)
+                                           :newText text)]))
+      (lsp--apply-text-edits edits 'code-action)
+    (lsp-send-execute-command command arguments?)))
+
+(lsp-defun lsp-pwsh--show-code-action-document ((&Command :arguments?))
+  "Handle ACTION for PowerShell.ShowCodeActionDocumentation."
+  (-if-let* ((rule-raw (lsp-seq-first arguments?))
+             (rule-id (if (s-prefix-p "PS" rule-raw) (substring rule-raw 2) rule-raw)))
+      (browse-url
+       (concat "https://learn.microsoft.com/en-us/powershell/utility-modules/psscriptanalyzer/rules/"
+               rule-id))
+    (lsp-warn "Cannot show documentation for code action, no ruleName was supplied")))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-pwsh--command
+                                        (lambda ()
+                                          (f-exists? lsp-pwsh-pses-script)))
+  :activation-fn (lsp-activate-on "powershell")
+  :server-id 'pwsh-ls
+  :priority -1
+  :initialization-options #'lsp-pwsh--extra-init-params
+  :notification-handlers (ht ("powerShell/executionStatusChanged" #'ignore)
+                             ("output" #'ignore))
+  :action-handlers (ht ("PowerShell.ApplyCodeActionEdits"
+                        #'lsp-pwsh--apply-code-action-edits)
+                       ("PowerShell.ShowCodeActionDocumentation"
+                        #'lsp-pwsh--show-code-action-document))
+  :initialized-fn (lambda (w)
+                    (with-lsp-workspace w
+                      (lsp--set-configuration
+                       (lsp-configuration-section "powershell")))
+                    (let ((caps (lsp--workspace-server-capabilities w)))
+                      (lsp:set-server-capabilities-document-range-formatting-provider? caps t)
+                      (lsp:set-server-capabilities-document-formatting-provider? caps t)))
+  :download-server-fn #'lsp-pwsh-setup))
+
+(defcustom lsp-pwsh-github-asset-url
+  "https://github.com/%s/%s/releases/latest/download/%s"
+  "GitHub latest asset template url."
+  :type 'string
+  :group 'lsp-pwsh
+  :package-version '(lsp-mode . "6.2"))
+
+(defun lsp-pwsh-setup (_client callback error-callback update)
+  "Downloads PowerShellEditorServices to `lsp-pwsh-dir'.
+CALLBACK is called when the download finish successfully otherwise
+ERROR-CALLBACK is called.
+UPDATE is non-nil if it is already downloaded.
+FORCED if specified with prefix argument."
+
+  (unless (and lsp-pwsh-exe (file-executable-p lsp-pwsh-exe))
+    (user-error "Use `lsp-pwsh-exe' with the value of `%s' is not a valid powershell binary"
+                lsp-pwsh-exe))
+
+  (let ((url (format lsp-pwsh-github-asset-url "PowerShell"
+                     "PowerShellEditorServices" "PowerShellEditorServices.zip"))
+        (temp-file (make-temp-file "ext" nil ".zip")))
+    (unless (f-exists? lsp-pwsh-log-path)
+      (mkdir lsp-pwsh-log-path 'create-parent))
+    (unless (and (not update) (f-exists? lsp-pwsh-pses-script))
+      ;; since we know it's installed, use powershell to download the file
+      ;; (and avoid url.el bugginess or additional libraries)
+      (when (f-exists? lsp-pwsh-dir) (delete-directory lsp-pwsh-dir 'recursive))
+      (lsp-async-start-process
+       callback
+       error-callback
+       lsp-pwsh-exe "-noprofile" "-noninteractive" "-nologo"
+       "-ex" "bypass" "-command"
+       "Invoke-WebRequest" "-UseBasicParsing" "-uri" url "-outfile" temp-file ";"
+       "Expand-Archive" "-Path" temp-file
+       "-DestinationPath" lsp-pwsh-dir))))
+
+(lsp-consistency-check lsp-pwsh)
+
+(provide 'lsp-pwsh)
+;;; lsp-pwsh.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pyls.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pyls.el
new file mode 100644
index 0000000..f5361bd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pyls.el
@@ -0,0 +1,506 @@
+;;; lsp-pyls.el --- pyls configuration               -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Ivan Yonchovski
+;; Copyright (C) 2019-2026 emacs-lsp maintainers
+
+;; Author: Ivan Yonchovski <yyoncho@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; PYLS configuration
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-pyls nil
+  "LSP support for Python, using Palantir's Python Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/palantir/python-language-server")
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-clients-python-library-directories '("/usr/")
+  "List of directories which will be considered to be libraries."
+  :risky t
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(define-obsolete-variable-alias
+  'lsp-clients-python-command
+  'lsp-pyls-server-command
+  "6.1")
+
+(defcustom lsp-pyls-disable-warning nil
+  "Disable Palantir python-language-server deprecation warning"
+  :group 'lsp-pyls
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-pyls-server-command '("pyls")
+  "Command to start pyls."
+  :risky t
+  :group 'lsp-pyls
+  :type '(repeat string)
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-configuration-sources ["pycodestyle"]
+  "List of configuration sources to use."
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-jedi-completion-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-jedi-completion-include-params t
+  "Auto-completes methods and classes with tabstops for each
+parameter."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-jedi-definition-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-jedi-definition-follow-imports t
+  "The goto call will follow imports."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-jedi-definition-follow-builtin-imports t
+  "If follow_imports is True will decide if it follow builtin
+imports."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-jedi-hover-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-jedi-references-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-jedi-signature-help-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-jedi-symbols-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-jedi-symbols-all-scopes t
+  "If True lists the names of all scopes instead of only the
+module namespace."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-mccabe-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-mccabe-threshold 15
+  "The minimum threshold that triggers warnings about cyclomatic
+complexity."
+  :type 'number
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-preload-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-preload-modules nil
+  "List of modules to import on startup"
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pylint-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pylint-args []
+  "Arguments, passed to pylint"
+  :risky t
+  :type 'lsp-string-vector
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pycodestyle-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pycodestyle-exclude nil
+  "Exclude files or directories which match these patterns."
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pycodestyle-filename nil
+  "When parsing directories, only check filenames matching these
+patterns."
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pycodestyle-select nil
+  "Select errors and warnings"
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pycodestyle-ignore nil
+  "Ignore errors and warnings"
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pycodestyle-hang-closing nil
+  "Hang closing bracket instead of matching indentation of
+opening bracket's line."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pycodestyle-max-line-length nil
+  "Set maximum allowed line length."
+  :type 'number
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pydocstyle-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pydocstyle-convention nil
+  "Choose the basic list of checked errors by specifying an
+existing convention."
+  :type '(choice (const "pep257")
+                 (const "numpy"))
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pydocstyle-add-ignore nil
+  "Ignore errors and warnings in addition to the specified
+convention."
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pydocstyle-add-select nil
+  "Select errors and warnings in addition to the specified
+convention."
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pydocstyle-ignore nil
+  "Ignore errors and warnings"
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pydocstyle-select nil
+  "Select errors and warnings"
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pydocstyle-match "(?!test_).*\\.py"
+  "Check only files that exactly match the given regular
+expression; default is to match files that don't start with
+`test_' but end with `.py'."
+  :type 'string
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pydocstyle-match-dir "[^\\.].*"
+  "Search only dirs that exactly match the given regular
+expression; default is to match dirs which do not begin with a
+dot."
+  :type 'string
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-pyflakes-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-rope-completion-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-autopep8-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pyls-plugins-yapf-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-rope-extension-modules nil
+  "Builtin and c-extension modules that are allowed to be
+imported and inspected by rope."
+  :type 'string
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-rope-rope-folder nil
+  "The name of the folder in which rope stores project
+configurations and data. Pass `nil` for not using such a folder
+at all."
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-pyls-plugins-flake8-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pyls-plugins-flake8-exclude nil
+  "List of glob patterns to exclude from checks."
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pyls-plugins-flake8-filename nil
+  "List of glob patterns to include for checks."
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pyls-plugins-flake8-hang-closing nil
+  "Toggle whether pycodestyle should enforce matching the indentation of the
+opening bracket’s line. When you specify this, it will prefer that you hang the
+closing bracket rather than match the indentation."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pyls-plugins-flake8-ignore nil
+  "A list of codes to ignore."
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pyls-plugins-flake8-max-line-length nil
+  "Set the maximum length that any line (with some exceptions) may be.
+Exceptions include lines that are either strings or comments which are
+entirely URLs."
+  :type 'integer
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pyls-plugins-flake8-select nil
+  "Specify the list of error codes you wish Flake8 to report. Similarly to
+`lsp-pyls-plugins-flake8-ignore'. You can specify a portion of an error code to
+get all that start with that string. For example, you can use E, E4, E43, and
+E431"
+  :type '(repeat string)
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-pyls-plugins-flake8-config nil
+  "A path to a config file that will be the only config file read and used.
+This will cause Flake8 to ignore all other config files that exist.
+
+NOTE: other parameters as `lsp-pyls-plugins-flake8-max-line-length' take
+precedence over parameters referenced in config."
+  :type 'string
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-pyls-plugins-jedi-use-pyenv-environment nil
+  "If enabled, pass the environment got by pyenv to jedi"
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-pyls-plugins-jedi-environment nil
+  "Specify the environment that jedi runs on where <environment>/bin/python
+should be the python executable. This option will be prioritized over
+`lsp-pyls-plugins-jedi-use-pyenv-environment'."
+  :type 'string
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-pyls-plugins-jedi-completion-fuzzy nil
+  "If enabled, uses fuzzy completion in jedi. Requires pyls >= 0.32.0
+Can hit performance, as well as lsp-mode implements its own fuzzy search on
+completion items."
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "7.0"))
+
+(defcustom lsp-pyls-plugins-jedi-completion-include-class-objects t
+  "If enabled, adds class objects to completion in order to avoid snippet
+with init args.
+
+Has no effect if `lsp-pyls-plugins-jedi-completion-include-params' is disabled.
+Requires pyls >= 0.33.0"
+  :type 'boolean
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "7.0"))
+
+(defcustom lsp-pyls-rename-backend 'jedi
+  "Choose renaming backend.
+
+Jedi is preferred but only works for python >= 3.6 and pyls >= 0.32.0
+Beware that Jedi is lazy and doesn't scan the whole project.
+So it will rename only references it can find."
+  :type '(choice (const :tag "jedi" jedi)
+                 (const :tag "rope" rope))
+  :group 'lsp-pyls
+  :package-version '(lsp-mode . "7.0"))
+
+
+(defun lsp-pyls-get-pyenv-environment ()
+  "Get the pyenv-managed environment for current workspace, where
+<ENV>/bin/python is the corresponding Python executable"
+  (if lsp-pyls-plugins-jedi-environment
+      lsp-pyls-plugins-jedi-environment
+    (when lsp-pyls-plugins-jedi-use-pyenv-environment
+      (let ((pyenv-version (getenv "PYENV_VERSION"))
+            (root (lsp-seq-first (lsp-find-roots-for-workspace lsp--cur-workspace (lsp-session)))))
+        (when root
+          (setenv "PYENV_VERSION" nil)
+          (let* ((pyenv-command-path (executable-find "pyenv"))
+                 (python-env (when pyenv-command-path
+                               (f-parent
+                                (f-parent
+                                 (shell-command-to-string
+                                  (format "PYENV_DIR='%s' %s which python"
+                                          root pyenv-command-path)))))))
+            (if python-env (lsp--info "Configure pyls with environment: %s" python-env)
+              (lsp--warn "Can't find the python environment for
+              %s even if
+              `lsp-pyls-plugins-jedi-use-pyenv-environment` is
+              enabled") root)
+            (setenv "PYENV_VERSION" pyenv-version)
+            python-env))))))
+
+(lsp-register-custom-settings
+ '(("pyls.rope.ropeFolder" lsp-pyls-rope-rope-folder)
+   ("pyls.rope.extensionModules" lsp-pyls-rope-extension-modules)
+   ("pyls.plugins.rope_rename.enabled" (lambda () (eq lsp-pyls-rename-backend 'rope)) t)
+   ("pyls.plugins.autopep8.enabled" lsp-pyls-plugins-autopep8-enabled t)
+   ("pyls.plugins.yapf.enabled" lsp-pyls-plugins-yapf-enabled t)
+   ("pyls.plugins.rope_completion.enabled" lsp-pyls-plugins-rope-completion-enabled t)
+   ("pyls.plugins.pyflakes.enabled" lsp-pyls-plugins-pyflakes-enabled t)
+   ("pyls.plugins.pydocstyle.matchDir" lsp-pyls-plugins-pydocstyle-match-dir)
+   ("pyls.plugins.pydocstyle.match" lsp-pyls-plugins-pydocstyle-match)
+   ("pyls.plugins.pydocstyle.select" lsp-pyls-plugins-pydocstyle-select)
+   ("pyls.plugins.pydocstyle.ignore" lsp-pyls-plugins-pydocstyle-ignore)
+   ("pyls.plugins.pydocstyle.addSelect" lsp-pyls-plugins-pydocstyle-add-select)
+   ("pyls.plugins.pydocstyle.addIgnore" lsp-pyls-plugins-pydocstyle-add-ignore)
+   ("pyls.plugins.pydocstyle.convention" lsp-pyls-plugins-pydocstyle-convention)
+   ("pyls.plugins.pydocstyle.enabled" lsp-pyls-plugins-pydocstyle-enabled t)
+   ("pyls.plugins.pycodestyle.maxLineLength" lsp-pyls-plugins-pycodestyle-max-line-length)
+   ("pyls.plugins.pycodestyle.hangClosing" lsp-pyls-plugins-pycodestyle-hang-closing t)
+   ("pyls.plugins.pycodestyle.ignore" lsp-pyls-plugins-pycodestyle-ignore)
+   ("pyls.plugins.pycodestyle.select" lsp-pyls-plugins-pycodestyle-select)
+   ("pyls.plugins.pycodestyle.filename" lsp-pyls-plugins-pycodestyle-filename)
+   ("pyls.plugins.pycodestyle.exclude" lsp-pyls-plugins-pycodestyle-exclude)
+   ("pyls.plugins.pycodestyle.enabled" lsp-pyls-plugins-pycodestyle-enabled t)
+   ("pyls.plugins.pylint.enabled" lsp-pyls-plugins-pylint-enabled t)
+   ("pyls.plugins.pylint.args" lsp-pyls-plugins-pylint-args)
+   ("pyls.plugins.flake8.enabled" lsp-pyls-plugins-flake8-enabled)
+   ("pyls.plugins.flake8.exclude" lsp-pyls-plugins-flake8-exclude)
+   ("pyls.plugins.flake8.filename" lsp-pyls-plugins-flake8-filename)
+   ("pyls.plugins.flake8.hangClosing" lsp-pyls-plugins-flake8-hang-closing)
+   ("pyls.plugins.flake8.ignore" lsp-pyls-plugins-flake8-ignore)
+   ("pyls.plugins.flake8.maxLineLength" lsp-pyls-plugins-flake8-max-line-length)
+   ("pyls.plugins.flake8.select" lsp-pyls-plugins-flake8-select)
+   ("pyls.plugins.flake8.config" lsp-pyls-plugins-flake8-config)
+   ("pyls.plugins.preload.modules" lsp-pyls-plugins-preload-modules)
+   ("pyls.plugins.preload.enabled" lsp-pyls-plugins-preload-enabled t)
+   ("pyls.plugins.mccabe.threshold" lsp-pyls-plugins-mccabe-threshold)
+   ("pyls.plugins.mccabe.enabled" lsp-pyls-plugins-mccabe-enabled t)
+   ("pyls.plugins.jedi_symbols.all_scopes" lsp-pyls-plugins-jedi-symbols-all-scopes t)
+   ("pyls.plugins.jedi_symbols.enabled" lsp-pyls-plugins-jedi-symbols-enabled t)
+   ("pyls.plugins.jedi_signature_help.enabled" lsp-pyls-plugins-jedi-signature-help-enabled t)
+   ("pyls.plugins.jedi_references.enabled" lsp-pyls-plugins-jedi-references-enabled t)
+   ("pyls.plugins.jedi_hover.enabled" lsp-pyls-plugins-jedi-hover-enabled t)
+   ("pyls.plugins.jedi_definition.follow_builtin_imports" lsp-pyls-plugins-jedi-definition-follow-builtin-imports t)
+   ("pyls.plugins.jedi_definition.follow_imports" lsp-pyls-plugins-jedi-definition-follow-imports t)
+   ("pyls.plugins.jedi_definition.enabled" lsp-pyls-plugins-jedi-definition-enabled t)
+   ("pyls.plugins.jedi_completion.include_params" lsp-pyls-plugins-jedi-completion-include-params t)
+   ("pyls.plugins.jedi_completion.enabled" lsp-pyls-plugins-jedi-completion-enabled t)
+   ("pyls.plugins.jedi_completion.include_class_objects" lsp-pyls-plugins-jedi-completion-include-class-objects t)
+   ("pyls.plugins.jedi.environment" lsp-pyls-get-pyenv-environment)
+   ("pyls.plugins.jedi_completion.fuzzy" lsp-pyls-plugins-jedi-completion-fuzzy t)
+   ("pyls.plugins.jedi_rename.enabled" (lambda () (eq lsp-pyls-rename-backend 'jedi)) t)
+   ("pyls.configurationSources" lsp-pyls-configuration-sources)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda () lsp-clients-python-command))
+                  :activation-fn (lsp-activate-on "python")
+                  :priority -2
+                  :server-id 'pyls
+                  :library-folders-fn (lambda (_workspace) lsp-clients-python-library-directories)
+                  :initialized-fn (lambda (workspace)
+                                    (unless lsp-pyls-disable-warning
+                                      (warn (concat "The palantir python-language-server (pyls) is unmaintained; "
+                                                    "a maintained fork is the python-lsp-server (pylsp) project; "
+                                                    "you can install it with pip via: pip install python-lsp-server")))
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration (lsp-configuration-section "pyls"))))))
+
+(lsp-consistency-check lsp-pyls)
+
+(provide 'lsp-pyls)
+;;; lsp-pyls.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pylsp.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pylsp.el
new file mode 100644
index 0000000..f950199
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-pylsp.el
@@ -0,0 +1,692 @@
+;;; lsp-pylsp.el --- python-lsp-server support       -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  Doug Davis
+;; Copyright (C) 2021-2026 emacs-lsp maintainers
+
+;; Author: Doug Davis <ddavis@ddavis.io>
+;; Keywords: language tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; pylsp configuration
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-pylsp nil
+  "LSP support for Python, using python-lsp's Python Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/python-lsp/python-lsp-server"))
+
+(defcustom lsp-clients-pylsp-library-directories '("/usr/")
+  "List of directories which will be considered to be libraries."
+  :risky t
+  :type '(repeat string)
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-server-command '("pylsp")
+  "Command to start pylsp."
+  :risky t
+  :group 'lsp-pylsp
+  :type '(repeat string))
+
+(defcustom lsp-pylsp-configuration-sources ["flake8"]
+  "List of configuration sources to use."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-completion-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-completion-include-params t
+  "Auto-completes methods and classes with tabstops for each
+parameter."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-definition-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-definition-follow-imports t
+  "The goto call will follow imports."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-definition-follow-builtin-imports t
+  "If follow_imports is True will decide if it follow builtin
+imports."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-hover-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-references-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-signature-help-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-symbols-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-symbols-all-scopes t
+  "If True lists the names of all scopes instead of only the
+module namespace."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-mccabe-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-mccabe-threshold 15
+  "The minimum threshold that triggers warnings about cyclomatic
+complexity."
+  :type 'number
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-preload-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-preload-modules nil
+  "List of modules to import on startup"
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pylint-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pylint-args []
+  "Arguments, passed to pylint"
+  :risky t
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pycodestyle-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pycodestyle-exclude nil
+  "Exclude files or directories which match these patterns."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pycodestyle-filename nil
+  "When parsing directories, only check filenames matching these
+patterns."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pycodestyle-select nil
+  "Select errors and warnings"
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pycodestyle-ignore nil
+  "Ignore errors and warnings"
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pycodestyle-hang-closing nil
+  "Hang closing bracket instead of matching indentation of
+opening bracket's line."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pycodestyle-max-line-length nil
+  "Set maximum allowed line length."
+  :type 'number
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pydocstyle-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pydocstyle-convention nil
+  "Choose the basic list of checked errors by specifying an
+existing convention."
+  :type '(choice (const "pep257")
+                 (const "numpy"))
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pydocstyle-add-ignore nil
+  "Ignore errors and warnings in addition to the specified
+convention."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pydocstyle-add-select nil
+  "Select errors and warnings in addition to the specified
+convention."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pydocstyle-ignore nil
+  "Ignore errors and warnings"
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pydocstyle-select nil
+  "Select errors and warnings"
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pydocstyle-match "(?!test_).*\\.py"
+  "Check only files that exactly match the given regular
+expression; default is to match files that don't start with
+`test_' but end with `.py'."
+  :type 'string
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pydocstyle-match-dir "[^\\.].*"
+  "Search only dirs that exactly match the given regular
+expression; default is to match dirs which do not begin with a
+dot."
+  :type 'string
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-pyflakes-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-rope-autoimport-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-rope-autoimport-memory nil
+  "Make the autoimport database memory only.
+
+Drastically increases startup time."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-rope-autoimport-completions-enabled nil
+  "Enable or disable completions from rope-autoimport."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-rope-autoimport-code-actions-enabled nil
+  "Enable or disable code actions from rope-autoimport."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-rope-completion-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-rope-completion-eager nil
+  "Resolve documentation and detail eagerly."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-autopep8-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-yapf-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-black-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-isort-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-rope-extension-modules nil
+  "Builtin and c-extension modules that are allowed to be
+imported and inspected by rope."
+  :type 'string
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-rope-rope-folder nil
+  "The name of the folder in which rope stores project
+configurations and data. Pass `nil` for not using such a folder
+at all."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-flake8-enabled t
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-flake8-exclude nil
+  "List of glob patterns to exclude from checks."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-flake8-filename nil
+  "List of glob patterns to include for checks."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-flake8-hang-closing nil
+  "Toggle whether pycodestyle should enforce matching the indentation of the
+opening bracket’s line. When you specify this, it will prefer that you hang the
+closing bracket rather than match the indentation."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-flake8-ignore nil
+  "A list of codes to ignore."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-flake8-max-line-length nil
+  "Set the maximum length that any line (with some exceptions) may be.
+Exceptions include lines that are either strings or comments which are
+entirely URLs."
+  :type 'integer
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-flake8-select nil
+  "Specify the list of error codes you wish Flake8 to report. Similarly to
+`lsp-pylsp-plugins-flake8-ignore'. You can specify a portion of an error code to
+get all that start with that string. For example, you can use E, E4, E43, and
+E431"
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-flake8-config nil
+  "A path to a config file that will be the only config file read and used.
+This will cause Flake8 to ignore all other config files that exist.
+
+NOTE: other parameters as `lsp-pylsp-plugins-flake8-max-line-length' take
+precedence over parameters referenced in config."
+  :type 'string
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-use-pyenv-environment nil
+  "If enabled, pass the environment got by pyenv to jedi"
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-environment nil
+  "Specify the environment that jedi runs on where <environment>/bin/python
+should be the python executable. This option will be prioritized over
+`lsp-pylsp-plugins-jedi-use-pyenv-environment'."
+  :type 'string
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-completion-fuzzy nil
+  "If enabled, uses fuzzy completion in jedi. Requires pylsp >= 0.32.0
+Can hit performance, as well as lsp-mode implements its own fuzzy search on
+completion items."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-jedi-completion-include-class-objects t
+  "If enabled, adds class objects to completion in order to avoid snippet
+with init args.
+
+Has no effect if `lsp-pylsp-plugins-jedi-completion-include-params' is disabled.
+Requires pylsp >= 0.33.0"
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+;; See https://github.com/python-lsp/python-lsp-ruff#configuration
+
+(defcustom lsp-pylsp-plugins-ruff-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-executable nil
+  "Custom path to ruff."
+  :type 'file
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-config nil
+  "Custom config for ruff to use."
+  :type 'file
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-extend-select nil
+  "Rules that are additionally used by ruff."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-extend-ignore nil
+  "Rules that are additionally ignored by ruff."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-format nil
+  "Rules that should be fixed when running textDocument/formatting.
+
+Note each rule must additionally be marked as fixable by ruff."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-format-enabled t
+  "Enable formatting using ruff's formatter."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-severities nil
+  "Optional table of rules where a custom severity is desired."
+  :type '(alist :key-type (lsp-string-vector :tag "rules") :value-type (string :tag "severity"))
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-unsafe-fixes nil
+  "Whether or not to offer unsafe fixes as code actions.
+
+Note this is ignored with the \"Fix All\" action."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+;; Rules that are ignored when a pyproject.toml or ruff.toml is present
+(defcustom lsp-pylsp-plugins-ruff-line-length 88
+  "Line length to pass to ruff checking and formatting.
+
+Note this variable will be ignored when a when a pyproject.toml or ruff.toml is
+present."
+  :type 'integer
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-exclude nil
+  "Files to be excluded by ruff checking.
+
+Note this variable will be ignored when a when a pyproject.toml or ruff.toml
+is present."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-select nil
+  "Rules to be enabled by ruff.
+
+Note this variable will be ignored when a when a pyproject.toml or ruff.toml
+is present."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-ignore nil
+  "Rules to be ignored by ruff.
+
+Note this variable will be ignored when a when a pyproject.toml or ruff.toml
+is present."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-per-file-ignores nil
+  "Rules that should be ignored for specific files.
+
+Note this variable will be ignored when a when a pyproject.toml or ruff.toml
+is present."
+  :type '(alist :key-type (lsp-string-vector :tag "files") :value-type (string :tag "rule"))
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-preview nil
+  "Whether to enable the preview style linting and formatting.
+
+Note this variable will be ignored when a when a pyproject.toml or ruff.toml
+is present."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-ruff-target-version nil
+  "The minimum python version to target (applies for both linting and formatting).
+
+Note this variable will be ignored when a when a pyproject.toml or ruff.toml
+is present."
+  :type 'string
+  :group 'lsp-pylsp)
+
+;; See https://github.com/python-lsp/pylsp-mypy#configuration
+
+(defcustom lsp-pylsp-plugins-mypy-enabled nil
+  "Enable or disable the plugin."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-mypy-live-mode t
+  "If non-nil, type checking is provided as you type.
+
+This writes to a tempfile every time a check is done.  Turning off live_mode
+means you must save your changes for mypy diagnostics to update correctly."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-mypy-dmypy nil
+  "If non-nil, use \"dmypy run\" rather than mypy.
+
+This uses the dmypy daemon and may dramatically improve the responsiveness of
+the pylsp server, however this currently does not work in live_mode.  Enabling
+this disables live_mode, even for conflicting configs."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-mypy-strict nil
+  "If non-nil, enable the strict option of mypy.
+
+This option often is too strict to be useful."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-mypy-overrides [t]
+  "A list of alternate or supplemental command-line options.
+
+This modifies the options passed to mypy or the mypy-specific ones passed to
+dmypy run.  When present, the special boolean member True is replaced with
+the command-line options that would've been passed had overrides not been
+specified.  Later options take precedence, which allows for replacing or
+negating individual default options (see mypy.main:process_options and mypy
+--help | grep inverse)."
+  :type '(vector (choice string boolean))
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-mypy-dmypy-status-file ".dmypy.json"
+  "The status file dmypy should use.
+
+This modifies the --status-file option passed to dmypy given dmypy is active."
+  :type 'string
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-mypy-config-sub-paths nil
+  "Sub paths under which the mypy configuration file may be found.
+
+For each directory searched for the mypy config file, this also searches the
+sub paths specified here."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-mypy-report-progress nil
+  "If non-nil, report basic progress to the LSP client.
+
+With this option, pylsp-mypy will report when mypy is running, given your editor
+supports LSP progress reporting.  For small files this might produce annoying
+flashing, especially in with live_mode.  For large projects, enabling this can
+be helpful to assure yourself whether mypy is still running."
+  :type 'boolean
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-plugins-mypy-exclude nil
+  "A list of regular expressions which should be ignored.
+
+The mypy runner will not be invoked when a document path is matched by one of the
+expressions.  Note that this differs from the exclude directive of a mypy config
+which is only used for recursively discovering files when mypy is invoked on a
+whole directory.  For both windows or unix platforms you should use forward
+slashes (/) to indicate paths."
+  :type 'lsp-string-vector
+  :group 'lsp-pylsp)
+
+(defcustom lsp-pylsp-rename-backend 'jedi
+  "Choose renaming backend.
+
+Jedi is preferred but only works for python >= 3.6 and pylsp >= 0.32.0
+Beware that Jedi is lazy and doesn't scan the whole project.
+So it will rename only references it can find."
+  :type '(choice (const :tag "jedi" jedi)
+                 (const :tag "rope" rope))
+  :group 'lsp-pylsp)
+
+(defun lsp-pylsp-get-pyenv-environment ()
+  "Get the pyenv-managed environment for current workspace, where
+<ENV>/bin/python is the corresponding Python executable"
+  (if lsp-pylsp-plugins-jedi-environment
+      lsp-pylsp-plugins-jedi-environment
+    (when lsp-pylsp-plugins-jedi-use-pyenv-environment
+      (let ((pyenv-version (getenv "PYENV_VERSION"))
+            (root (lsp-seq-first (lsp-find-roots-for-workspace lsp--cur-workspace (lsp-session)))))
+        (when root
+          (setenv "PYENV_VERSION" nil)
+          (let* ((pyenv-command-path (executable-find "pyenv"))
+                 (python-env (when pyenv-command-path
+                               (f-parent
+                                (f-parent
+                                 (shell-command-to-string
+                                  (format "PYENV_DIR='%s' %s which python"
+                                          root pyenv-command-path)))))))
+            (if python-env (lsp--info "Configure pylsp with environment: %s" python-env)
+              (lsp--warn "Can't find the python environment for
+              %s even if
+              `lsp-pylsp-plugins-jedi-use-pyenv-environment` is
+              enabled") root)
+            (setenv "PYENV_VERSION" pyenv-version)
+            python-env))))))
+
+(lsp-register-custom-settings
+ '(("pylsp.rope.ropeFolder" lsp-pylsp-rope-rope-folder)
+   ("pylsp.rope.extensionModules" lsp-pylsp-rope-extension-modules)
+   ("pylsp.plugins.rope_rename.enabled" (lambda () (eq lsp-pylsp-rename-backend 'rope)) t)
+   ("pylsp.plugins.autopep8.enabled" lsp-pylsp-plugins-autopep8-enabled t)
+   ("pylsp.plugins.yapf.enabled" lsp-pylsp-plugins-yapf-enabled t)
+   ("pylsp.plugins.black.enabled" lsp-pylsp-plugins-black-enabled t)
+   ("pylsp.plugins.pyls_isort.enabled" lsp-pylsp-plugins-isort-enabled t)
+   ("pylsp.plugins.rope_autoimport.enabled" lsp-pylsp-plugins-rope-autoimport-enabled t)
+   ("pylsp.plugins.rope_autoimport.memory" lsp-pylsp-plugins-rope-autoimport-memory t)
+   ("pylsp.plugins.rope_autoimport.completions.enabled" lsp-pylsp-plugins-rope-autoimport-completions-enabled t)
+   ("pylsp.plugins.rope_autoimport.code_actions.enabled" lsp-pylsp-plugins-rope-autoimport-code-actions-enabled t)
+   ("pylsp.plugins.rope_completion.enabled" lsp-pylsp-plugins-rope-completion-enabled t)
+   ("pylsp.plugins.rope_completion.eager" lsp-pylsp-plugins-rope-completion-eager t)
+   ("pylsp.plugins.pyflakes.enabled" lsp-pylsp-plugins-pyflakes-enabled t)
+   ("pylsp.plugins.pydocstyle.matchDir" lsp-pylsp-plugins-pydocstyle-match-dir)
+   ("pylsp.plugins.pydocstyle.match" lsp-pylsp-plugins-pydocstyle-match)
+   ("pylsp.plugins.pydocstyle.select" lsp-pylsp-plugins-pydocstyle-select)
+   ("pylsp.plugins.pydocstyle.ignore" lsp-pylsp-plugins-pydocstyle-ignore)
+   ("pylsp.plugins.pydocstyle.addSelect" lsp-pylsp-plugins-pydocstyle-add-select)
+   ("pylsp.plugins.pydocstyle.addIgnore" lsp-pylsp-plugins-pydocstyle-add-ignore)
+   ("pylsp.plugins.pydocstyle.convention" lsp-pylsp-plugins-pydocstyle-convention)
+   ("pylsp.plugins.pydocstyle.enabled" lsp-pylsp-plugins-pydocstyle-enabled t)
+   ("pylsp.plugins.pycodestyle.maxLineLength" lsp-pylsp-plugins-pycodestyle-max-line-length)
+   ("pylsp.plugins.pycodestyle.hangClosing" lsp-pylsp-plugins-pycodestyle-hang-closing t)
+   ("pylsp.plugins.pycodestyle.ignore" lsp-pylsp-plugins-pycodestyle-ignore)
+   ("pylsp.plugins.pycodestyle.select" lsp-pylsp-plugins-pycodestyle-select)
+   ("pylsp.plugins.pycodestyle.filename" lsp-pylsp-plugins-pycodestyle-filename)
+   ("pylsp.plugins.pycodestyle.exclude" lsp-pylsp-plugins-pycodestyle-exclude)
+   ("pylsp.plugins.pycodestyle.enabled" lsp-pylsp-plugins-pycodestyle-enabled t)
+   ("pylsp.plugins.pylint.enabled" lsp-pylsp-plugins-pylint-enabled t)
+   ("pylsp.plugins.pylint.args" lsp-pylsp-plugins-pylint-args)
+   ("pylsp.plugins.flake8.enabled" lsp-pylsp-plugins-flake8-enabled)
+   ("pylsp.plugins.flake8.exclude" lsp-pylsp-plugins-flake8-exclude)
+   ("pylsp.plugins.flake8.filename" lsp-pylsp-plugins-flake8-filename)
+   ("pylsp.plugins.flake8.hangClosing" lsp-pylsp-plugins-flake8-hang-closing)
+   ("pylsp.plugins.flake8.ignore" lsp-pylsp-plugins-flake8-ignore)
+   ("pylsp.plugins.flake8.maxLineLength" lsp-pylsp-plugins-flake8-max-line-length)
+   ("pylsp.plugins.flake8.select" lsp-pylsp-plugins-flake8-select)
+   ("pylsp.plugins.flake8.config" lsp-pylsp-plugins-flake8-config)
+   ("pylsp.plugins.preload.modules" lsp-pylsp-plugins-preload-modules)
+   ("pylsp.plugins.preload.enabled" lsp-pylsp-plugins-preload-enabled t)
+   ("pylsp.plugins.mccabe.threshold" lsp-pylsp-plugins-mccabe-threshold)
+   ("pylsp.plugins.mccabe.enabled" lsp-pylsp-plugins-mccabe-enabled t)
+   ("pylsp.plugins.ruff.enabled" lsp-pylsp-plugins-ruff-enabled t)
+   ("pylsp.plugins.ruff.executable" lsp-pylsp-plugins-ruff-executable)
+   ("pylsp.plugins.ruff.config" lsp-pylsp-plugins-ruff-config)
+   ("pylsp.plugins.ruff.extendSelect" lsp-pylsp-plugins-ruff-extend-select)
+   ("pylsp.plugins.ruff.extendIgnore" lsp-pylsp-plugins-ruff-extend-ignore)
+   ("pylsp.plugins.ruff.format" lsp-pylsp-plugins-ruff-format)
+   ("pylsp.plugins.ruff.formatEnabled" lsp-pylsp-plugins-ruff-format-enabled t)
+   ("pylsp.plugins.ruff.severities" lsp-pylsp-plugins-ruff-severities)
+   ("pylsp.plugins.ruff.unsafeFixes" lsp-pylsp-plugins-ruff-unsafe-fixes t)
+   ("pylsp.plugins.ruff.lineLength" lsp-pylsp-plugins-ruff-line-length)
+   ("pylsp.plugins.ruff.exclude" lsp-pylsp-plugins-ruff-exclude)
+   ("pylsp.plugins.ruff.select" lsp-pylsp-plugins-ruff-select)
+   ("pylsp.plugins.ruff.ignore" lsp-pylsp-plugins-ruff-ignore)
+   ("pylsp.plugins.ruff.perFileIgnores" lsp-pylsp-plugins-ruff-per-file-ignores)
+   ("pylsp.plugins.ruff.preview" lsp-pylsp-plugins-ruff-preview t)
+   ("pylsp.plugins.ruff.targetVersion" lsp-pylsp-plugins-ruff-target-version)
+   ("pylsp.plugins.pylsp_mypy.enabled" lsp-pylsp-plugins-mypy-enabled t)
+   ("pylsp.plugins.pylsp_mypy.live_mode" lsp-pylsp-plugins-mypy-live-mode t)
+   ("pylsp.plugins.pylsp_mypy.dmypy" lsp-pylsp-plugins-mypy-dmypy t)
+   ("pylsp.plugins.pylsp_mypy.strict" lsp-pylsp-plugins-mypy-strict t)
+   ("pylsp.plugins.pylsp_mypy.overrides" lsp-pylsp-plugins-mypy-overrides)
+   ("pylsp.plugins.pylsp_mypy.dmypy_status_file" lsp-pylsp-plugins-mypy-dmypy-status-file)
+   ("pylsp.plugins.pylsp_mypy.config_sub_paths" lsp-pylsp-plugins-mypy-config-sub-paths)
+   ("pylsp.plugins.pylsp_mypy.report_progress" lsp-pylsp-plugins-mypy-report-progress t)
+   ("pylsp.plugins.pylsp_mypy.exclude" lsp-pylsp-plugins-mypy-exclude)
+   ("pylsp.plugins.jedi_symbols.all_scopes" lsp-pylsp-plugins-jedi-symbols-all-scopes t)
+   ("pylsp.plugins.jedi_symbols.enabled" lsp-pylsp-plugins-jedi-symbols-enabled t)
+   ("pylsp.plugins.jedi_signature_help.enabled" lsp-pylsp-plugins-jedi-signature-help-enabled t)
+   ("pylsp.plugins.jedi_references.enabled" lsp-pylsp-plugins-jedi-references-enabled t)
+   ("pylsp.plugins.jedi_hover.enabled" lsp-pylsp-plugins-jedi-hover-enabled t)
+   ("pylsp.plugins.jedi_definition.follow_builtin_imports" lsp-pylsp-plugins-jedi-definition-follow-builtin-imports t)
+   ("pylsp.plugins.jedi_definition.follow_imports" lsp-pylsp-plugins-jedi-definition-follow-imports t)
+   ("pylsp.plugins.jedi_definition.enabled" lsp-pylsp-plugins-jedi-definition-enabled t)
+   ("pylsp.plugins.jedi_completion.include_params" lsp-pylsp-plugins-jedi-completion-include-params t)
+   ("pylsp.plugins.jedi_completion.enabled" lsp-pylsp-plugins-jedi-completion-enabled t)
+   ("pylsp.plugins.jedi_completion.include_class_objects" lsp-pylsp-plugins-jedi-completion-include-class-objects t)
+   ("pylsp.plugins.jedi.environment" lsp-pylsp-get-pyenv-environment)
+   ("pylsp.plugins.jedi_completion.fuzzy" lsp-pylsp-plugins-jedi-completion-fuzzy t)
+   ("pylsp.plugins.jedi_rename.enabled" (lambda () (eq lsp-pylsp-rename-backend 'jedi)) t)
+   ("pylsp.configurationSources" lsp-pylsp-configuration-sources)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda () lsp-pylsp-server-command))
+                  :activation-fn (lsp-activate-on "python")
+                  :priority -1
+                  :server-id 'pylsp
+                  :library-folders-fn (lambda (_workspace) lsp-clients-pylsp-library-directories)
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration (lsp-configuration-section "pylsp"))))))
+
+(lsp-consistency-check lsp-pylsp)
+
+(provide 'lsp-pylsp)
+;;; lsp-pylsp.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-python-ty.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-python-ty.el
new file mode 100644
index 0000000..6d42a04
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-python-ty.el
@@ -0,0 +1,54 @@
+;;; lsp-python-ty.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2025-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, python
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Python(ty) Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-python-ty nil
+  "LSP support for Python(ty)."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/astral-sh/ty"))
+
+(defcustom lsp-python-ty-clients-server-command '("ty" "server")
+  "Command to start the python-ty language server."
+  :group 'lsp-python-ty
+  :risky t
+  :type '(repeat string))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda () lsp-python-ty-clients-server-command))
+                  :activation-fn (lsp-activate-on "python")
+                  :priority -1
+                  :add-on? t
+                  :server-id 'ty-ls
+                  :initialized-fn (lambda (workspace)
+                                    (let ((caps (lsp--workspace-server-capabilities workspace)))
+                                      (unless (lsp-get caps :inlayHintProvider)
+                                        (lsp:set-server-capabilities-inlay-hint-provider? caps t))))))
+
+(lsp-consistency-check lsp-python-ty)
+
+(provide 'lsp-python-ty)
+;;; lsp-python-ty.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-qml.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-qml.el
new file mode 100644
index 0000000..987b249
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-qml.el
@@ -0,0 +1,43 @@
+;;; lsp-qml.el --- LSP Client for QML -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, qt, qml, gui,
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Client for QML (Qt Modeling Language).
+
+;;; Code:
+(require 'lsp-mode)
+
+(defcustom lsp-qml-server-command "qmlls"
+  "Server executable to use."
+  :type 'string
+  :group 'lsp-qml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     (executable-find lsp-qml-server-command)))
+                  :activation-fn (lsp-activate-on "qml")
+                  :priority -1
+                  :server-id 'qml-ls))
+
+(provide 'lsp-qml)
+;;; lsp-qml.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-r.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-r.el
new file mode 100644
index 0000000..5ef01ef
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-r.el
@@ -0,0 +1,49 @@
+;;; lsp-r.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, r
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the R Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-r nil
+  "LSP support for R."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/REditorSupport/languageserver"))
+
+(defcustom lsp-clients-r-server-command '("R" "--slave" "-e" "languageserver::run()")
+  "Command to start the R language server."
+  :group 'lsp-r
+  :risky t
+  :type '(repeat string))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection lsp-clients-r-server-command)
+                  :major-modes '(ess-r-mode)
+                  :server-id 'lsp-r))
+
+
+(lsp-consistency-check lsp-r)
+
+(provide 'lsp-r)
+;;; lsp-r.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-racket.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-racket.el
new file mode 100644
index 0000000..2f32d5a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-racket.el
@@ -0,0 +1,77 @@
+;;; lsp-racket.el --- lsp-mode racket integration    -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 lsp-mode maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Client for the Racket language server.
+
+;;; Code:
+
+(require 'ht)
+(require 'lsp-mode)
+
+
+;; racket-langserver
+
+(defgroup lsp-racket-langserver nil
+  "LSP support for Racket, using racket-langserver"
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/jeapostrophe/racket-langserver"))
+
+(defcustom lsp-racket-langserver-command '("racket" "--lib" "racket-langserver")
+  "Command to start the server."
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda () lsp-racket-langserver-command))
+                  :major-modes '(racket-mode)
+                  :priority 1
+                  :server-id 'racket-langserver))
+
+
+;; Theia
+
+(defgroup lsp-racket-language-server nil
+  "LSP support for Racket, using racket-language-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/theia-ide/racket-language-server"))
+
+(defcustom lsp-racket-language-server-path "racket-language-server"
+  "Executable path for the server."
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defun lsp-racket-language-server-colorize-handler (&rest _args)
+  "Handler for the colorize notification."
+  ;; TODO:
+  nil)
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda () lsp-racket-language-server-path))
+                  :major-modes '(racket-mode)
+                  :priority -1
+                  :notification-handlers (ht ("racket/colorize" #'lsp-racket-language-server-colorize-handler))
+                  :server-id 'racket-language-server))
+
+(lsp-consistency-check lsp-racket)
+
+(provide 'lsp-racket)
+;;; lsp-racket.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-remark.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-remark.el
new file mode 100644
index 0000000..5e52061
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-remark.el
@@ -0,0 +1,69 @@
+;;; lsp-remark.el --- lsp-mode remark integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021-2026 lsp-mode maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  LSP client for remark-language-server
+
+;;; Code:
+
+(require 'lsp-mode)
+
+;;; Markdown
+(defgroup lsp-remark nil
+  "Settings for the markdown language server client."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/remarkjs/remark-language-server")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-remark-server-command "remark-language-server"
+  "The binary (or full path to binary) which executes the server."
+  :type 'string
+  :group 'lsp-remark
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-remark-server-command-args '("--stdio")
+  "Command-line arguments for the markdown lsp server."
+  :type '(repeat string)
+  :group 'lsp-remark
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-dependency 'remark-language-server
+                '(:system "remark-language-server")
+                '(:npm :package "remark-language-server"
+                       :path "remark-language-server"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     (cons (or (executable-find lsp-remark-server-command)
+                                               (lsp-package-path 'remark-language-server))
+                                           lsp-remark-server-command-args)))
+                  :activation-fn (lsp-activate-on "markdown")
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration (lsp-configuration-section "remark-language-server"))))
+                  :priority 0
+                  :server-id 'remark))
+
+(lsp-consistency-check lsp-remark)
+
+(provide 'lsp-remark)
+;;; lsp-remark.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rf.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rf.el
new file mode 100644
index 0000000..3e516f8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rf.el
@@ -0,0 +1,147 @@
+;;; lsp-rf.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, rf, robot
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Robot Framework.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-rf nil
+  "Settings for Robot Framework Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/tomi/vscode-rf-language-server"))
+
+(defcustom lsp-rf-language-server-start-command '("~/.nvm/versions/node/v9.11.2/bin/node" "~/.vscode/extensions/tomiturtiainen.rf-intellisense-2.8.0/server/server.js")
+  "Path to the server.js file of the rf-intellisense server.
+Accepts a list of strings (path/to/interpreter path/to/server.js)"
+  :type '(repeat string)
+  :group 'lsp-rf)
+
+(defcustom lsp-rf-language-server-include-paths []
+  "An array of files that should be included by the parser.
+Glob patterns as strings are accepted (eg. *.robot between double quotes)"
+  :type 'lsp-string-vector
+  :group 'lsp-rf)
+
+(defcustom lsp-rf-language-server-exclude-paths []
+  "An array of files that should be ignored by the parser.
+Glob patterns as strings are accepted (eg. *bad.robot between double quotes)"
+  :type 'lsp-string-vector
+  :group 'lsp-rf)
+
+(defcustom lsp-rf-language-server-dir "~/.vscode/extensions/tomiturtiainen.rf-intellisense-2.8.0/server/library-docs/"
+  "Libraries directory for libraries in `lsp-rf-language-server-libraries'"
+  :type 'string
+  :group 'lsp-rf)
+
+(defcustom lsp-rf-language-server-libraries ["BuiltIn-3.1.1" "Collections-3.0.4"]
+  "Libraries whose keywords are suggested with `auto-complete'."
+  :type '(repeat string)
+  ;; :type 'lsp-string-vector
+  :group 'lsp-rf)
+
+(defcustom lsp-rf-language-server-log-level "debug"
+  "What language server log messages are printed."
+  :type 'string
+  ;; :type '(choice (:tag "off" "errors" "info" "debug"))
+  :group 'lsp-rf)
+
+(defcustom lsp-rf-language-server-trace-server "verbose"
+  "Traces the communication between VSCode and the rfLanguageServer service."
+  :type 'string
+  ;; :type '(choice (:tag "off" "messages" "verbose"))
+  :group 'lsp-rf)
+
+(defun parse-rf-language-server-library-dirs (dirs)
+  (vconcat (mapcar
+   (lambda (x)
+     (concat
+      (expand-file-name
+       lsp-rf-language-server-dir)
+      x
+      ".json"))
+   dirs)))
+
+(defun expand-start-command ()
+  (mapcar 'expand-file-name lsp-rf-language-server-start-command))
+
+(defun parse-rf-language-server-globs-to-regex (vector)
+  "Convert a VECTOR of globs to a regex."
+  (--> (mapcan #'lsp-glob-to-regexps vector)
+       (s-join "\\|" it)
+       (concat "\\(?:" it "\\)")))
+
+(defun parse-rf-language-server-include-path-regex (vector)
+  "Creates regexp to select files from workspace directory."
+  (let ((globs (if (equal vector [])
+                        ["*.robot" "*.resource"]
+                      vector)))
+    (parse-rf-language-server-globs-to-regex globs)))
+
+(defun parse-rf-language-server-exclude-paths (seq)
+  "Creates regexp to select files from workspace directory."
+  (if (equal lsp-rf-language-server-exclude-paths [])
+      seq
+  (cl-delete-if (lambda (x) (string-match-p
+                             (parse-rf-language-server-globs-to-regex
+                              lsp-rf-language-server-exclude-paths)
+                             x))
+                seq)))
+
+(lsp-register-custom-settings
+ '(
+   ("rfLanguageServer.trace.server" lsp-rf-language-server-trace-server)
+   ("rfLanguageServer.logLevel" lsp-rf-language-server-log-level)
+   ("rfLanguageServer.libraries" lsp-rf-language-server-libraries)
+   ("rfLanguageServer.excludePaths" lsp-rf-language-server-exclude-paths)
+   ("rfLanguageServer.includePaths" lsp-rf-language-server-include-paths)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (expand-start-command))
+                  :major-modes '(robot-mode)
+                  :server-id 'rf-intellisense
+                  ;; :library-folders-fn (lambda (_workspace)
+                  ;;                        lsp-rf-language-server-libraries)
+                  :library-folders-fn (lambda (_workspace)
+                                         (parse-rf-language-server-library-dirs
+                                         lsp-rf-language-server-libraries))
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration
+                                       (lsp-configuration-section "rfLanguageServer"))
+                                      (lsp-request "buildFromFiles"
+                                                   (list :files
+                                                         (vconcat
+                                                          (parse-rf-language-server-exclude-paths
+                                                           (directory-files-recursively
+                                                            (lsp--workspace-root workspace)
+                                                            (parse-rf-language-server-include-path-regex
+                                                             lsp-rf-language-server-include-paths))))))))))
+
+
+
+(lsp-consistency-check lsp-rf)
+
+(provide 'lsp-rf)
+;;; lsp-rf.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-roc.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-roc.el
new file mode 100644
index 0000000..56048c8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-roc.el
@@ -0,0 +1,41 @@
+;;; lsp-roc.el --- lsp-mode roc integration    -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2025-2026 lsp-mode maintainers
+
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Client for the Roc language server.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-roc nil
+  "LSP support for Roc, using roc_language_server"
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/roc-lang/roc/tree/main/crates/language_server")
+  :package-version `(lsp-mode . "10.0.0"))
+
+(lsp-register-client (make-lsp-client :new-connection (lsp-stdio-connection "roc_language_server")
+                                      :activation-fn (lsp-activate-on "roc")
+                                      :major-modes '(roc-ts-mode)
+                                      :server-id 'roc_language_server))
+(lsp-consistency-check lsp-roc)
+
+(provide 'lsp-roc)
+;;; lsp-futhark.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ron.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ron.el
new file mode 100644
index 0000000..2b37847
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ron.el
@@ -0,0 +1,52 @@
+;;; lsp-ron.el --- lsp-mode RON integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2025-2026 lsp-mode maintainers
+
+;; Author: lsp-mode maintainers
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  Client for RON, Rusty Object notation (https://github.com/ron-rs/ron)
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-ron nil
+  "Settings for the RON Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/jasonjmcghee/ron-lsp/")
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-ron-executable '("ron-lsp")
+  "Command to run the RON language server."
+  :group 'lsp-ron
+  :risky t
+  :type '(repeat string))
+
+(lsp-dependency 'ron-language-server
+                '(:system "ron-lsp"))
+
+(lsp-register-client
+ (make-lsp-client :server-id 'ron-lsp
+                  :new-connection (lsp-stdio-connection (lambda () lsp-ron-executable))
+                  :major-modes '(ron-mode)))
+
+(lsp-consistency-check lsp-ron)
+
+(provide 'lsp-ron)
+;;; lsp-ron.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-roslyn-stdpipe.ps1 b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-roslyn-stdpipe.ps1
new file mode 100644
index 0000000..0071424
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-roslyn-stdpipe.ps1
@@ -0,0 +1,136 @@
+param (
+    [string]$ServerName = ".",
+    [Parameter(Mandatory=$true)][string]$PipeName
+)
+
+# Use named pipe as stdin/out
+
+$Source = @"
+using System;
+using System.Text;
+using System.IO;
+using System.IO.Pipes;
+using System.Threading.Tasks;
+
+public static class StdPipe
+{
+    public static void RouteToPipe(string pipeServer, string pipeName)
+    {
+        var pipeClient = new NamedPipeClientStream(pipeServer, pipeName, PipeDirection.InOut, PipeOptions.Asynchronous);
+        pipeClient.Connect();
+
+        var pipeReader = new BufferedStream(pipeClient);
+        var pipeWriter = new BufferedStream(pipeClient);
+
+        var stdin = new BufferedStream(Console.OpenStandardInput());
+        var stdout = new BufferedStream(Console.OpenStandardOutput());
+
+        var tasks = new Task<byte[]>[2]
+        {
+            ReadHeaderDelimitedAsync(pipeReader),
+            ReadHeaderDelimitedAsync(stdin)
+        };
+
+        while (true)
+        {
+            var doneIdx = Task.WaitAny(tasks);
+
+            var bytesRead = tasks[doneIdx].Result;
+            if (doneIdx == 0)
+            {
+                // pipe in -> stdout
+                if (bytesRead.Length == 0)
+                {
+                    // pipe was closed
+                    break;
+                }
+
+                stdout.Write(bytesRead, 0, bytesRead.Length);
+                stdout.Flush();
+                tasks[doneIdx] = ReadHeaderDelimitedAsync(pipeReader);
+            }
+            else
+            {
+                // stdin -> pipe out
+                pipeWriter.Write(bytesRead, 0, bytesRead.Length);
+                pipeWriter.Flush();
+                tasks[doneIdx] = ReadHeaderDelimitedAsync(stdin);
+            }
+        }
+    }
+
+    private static async Task<byte[]> ReadHeaderDelimitedAsync(Stream stream)
+    {
+        // Assigning new tasks with this function blocks the thread
+        // unless this is awaited first.
+        await Task.Yield();
+
+        var idx = 0;
+        var header = new byte[64];
+        int b = 0;
+        do
+        {
+            var bytesRead = await stream.ReadAsync(header, idx, 1);
+            if (bytesRead == 0)
+                continue;
+            b = header[idx++];
+        } while (b != '\r');
+
+        var colonPos = Array.IndexOf(header, (byte)':');
+        if (colonPos == -1)
+        {
+            return new byte[0];
+        }
+
+        var headerName = new byte[colonPos];
+        Array.Copy(header, headerName, colonPos);
+        var headerContent = new byte[idx - colonPos - 1];
+        Array.Copy(header, colonPos + 2, headerContent, 0, headerContent.Length - 2);
+
+        if (Encoding.ASCII.GetString(headerName) != "Content-Length")
+        {
+            return new byte[0];
+        }
+        if (headerContent.Length > 20)
+        {
+            return new byte[0];
+        }
+        int contentLength;
+        try
+        {
+            contentLength = int.Parse(Encoding.ASCII.GetString(headerContent));
+        }
+        catch (Exception)
+        {
+            return new byte[0];
+        }
+
+        var buffer = new byte[contentLength + idx + 3];
+        var c = 0;
+        for (var i = 0; i < idx; i++)
+        {
+            buffer[c++] = header[i];
+        }
+
+        // LF, CRLF
+        var bytesToRead = contentLength + 3;
+        while (bytesToRead > 0)
+        {
+            var bytesRead = await stream.ReadAsync(buffer, c, bytesToRead);
+            bytesToRead -= bytesRead;
+            c += bytesRead;
+        }
+
+        return buffer;
+    }
+}
+"@
+
+Add-Type -TypeDefinition $Source -Language CSharp
+
+try {
+    [StdPipe]::RouteToPipe($ServerName, $PipeName)
+} catch [System.AggregateException] {
+    Write-Error $error[0].exception.innerexception
+    throw $error[0].exception.innerexception
+}
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-roslyn.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-roslyn.el
new file mode 100644
index 0000000..c8e0f35
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-roslyn.el
@@ -0,0 +1,358 @@
+;;; lsp-roslyn.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023 Ruin0x11
+;; Copyright (C) 2023-2026 lsp-mode maintainers
+
+;; Author: Ruin0x11 <ipickering2@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; C# client using the Roslyn language server
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-roslyn nil
+  "LSP support for the C# programming language, using the Roslyn language server."
+  :link '(url-link "https://github.com/dotnet/roslyn/tree/main/src/LanguageServer")
+  :group 'lsp-mode
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defconst lsp-roslyn--stdpipe-path (expand-file-name
+                                    "lsp-roslyn-stdpipe.ps1"
+                                    (file-name-directory (locate-library "lsp-roslyn")))
+  "Path to the `stdpipe' script.
+On Windows, this script is used as a proxy for the language server's named pipe.
+Unused on other platforms.")
+
+(defcustom lsp-roslyn-install-path (expand-file-name "roslyn" lsp-server-install-dir)
+  "The path to install the Roslyn server to."
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-roslyn)
+
+(defcustom lsp-roslyn-server-dll-override-path nil
+  "Custom path to Microsoft.CodeAnalysis.LanguageServer.dll."
+  :type '(choice (const nil) string)
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-roslyn)
+
+(defcustom lsp-roslyn-server-timeout-seconds 60
+  "Amount of time to wait for Roslyn server startup, in seconds."
+  :type 'integer
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-roslyn)
+
+(defcustom lsp-roslyn-server-log-level "Information"
+  "Log level for the Roslyn language server."
+  :type '(choice (const "None")
+                 (const "Trace")
+                 (const "Debug")
+                 (const "Information")
+                 (const "Warning")
+                 (const "Error")
+                 (const "Critical"))
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-roslyn)
+
+(defcustom lsp-roslyn-server-log-directory (concat (temporary-file-directory) (file-name-as-directory "lsp-roslyn"))
+  "Log directory for the Roslyn language server."
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-roslyn)
+
+(defcustom lsp-roslyn-server-extra-args '()
+  "Extra arguments for the Roslyn language server."
+  :type '(repeat string)
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-roslyn)
+
+(defcustom lsp-roslyn-dotnet-executable "dotnet"
+  "Dotnet executable to use with the Roslyn language server."
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-roslyn)
+
+(defcustom lsp-roslyn-package-version "4.13.0-2.24564.12"
+  "Version of the Roslyn package to install.
+Gotten from https://dev.azure.com/azure-public/vside/_artifacts/feed/vs-impl/NuGet/Microsoft.CodeAnalysis.LanguageServer.win-x64"
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0")
+  :group 'lsp-roslyn)
+
+(defvar lsp-roslyn--pipe-name nil)
+
+(defun lsp-roslyn--parse-pipe-name (pipe)
+  (if (eq system-type 'windows-nt)
+      (progn
+        (string-match "\\([a-z0-9]+\\)$" pipe)
+        (match-string 1 pipe))
+    pipe))
+
+(defun lsp-roslyn--parent-process-filter (_process output)
+  "Parses the named pipe's name that the Roslyn server process prints on stdout."
+  (let* ((data (json-parse-string output :object-type 'plist))
+         (pipe (plist-get data :pipeName)))
+    (when pipe
+      (setq lsp-roslyn--pipe-name (lsp-roslyn--parse-pipe-name pipe)))))
+
+(defun lsp-roslyn--make-named-pipe-process (filter sentinel environment-fn process-name stderr-buf)
+  "Creates the process that will handle the JSON-RPC communication."
+  (let* ((process-environment
+          (lsp--compute-process-environment environment-fn))
+         (default-directory (lsp--default-directory-for-connection)))
+    (cond
+     ((eq system-type 'windows-nt)
+      (make-process
+       :name process-name
+       :connection-type 'pipe
+       :buffer (format "*%s*" process-name)
+       :coding 'no-conversion
+       :filter filter
+       :sentinel sentinel
+       :stderr stderr-buf
+       :noquery t
+       :command (lsp-resolve-final-command
+                 `("PowerShell" "-NoProfile" "-ExecutionPolicy" "Bypass" "-Command"
+                   ,lsp-roslyn--stdpipe-path "."
+                   ,lsp-roslyn--pipe-name))))
+     (t (make-network-process
+         :service "roslyn"
+         :name process-name
+         :remote lsp-roslyn--pipe-name
+         :sentinel sentinel
+         :filter filter
+         :noquery t)))))
+
+(defun lsp-roslyn--connect (filter sentinel name environment-fn _workspace)
+  "Creates a connection to the Roslyn language server's named pipe.
+
+First creates an instance of the language server process, then
+creates another process connecting to the named pipe it specifies."
+  (setq lsp-roslyn--pipe-name nil)
+  (let* ((parent-process-name name)
+         (parent-stderr-buf (format "*%s::stderr*" parent-process-name))
+         (command-process (make-process
+                           :name parent-process-name
+                           :buffer (generate-new-buffer-name parent-process-name)
+                           :coding 'no-conversion
+                           :filter 'lsp-roslyn--parent-process-filter
+                           :sentinel sentinel
+                           :stderr parent-stderr-buf
+                           :command `(,lsp-roslyn-dotnet-executable
+                                      ,(lsp-roslyn--get-server-dll-path)
+                                      ,(format "--logLevel=%s" lsp-roslyn-server-log-level)
+                                      ,(format "--extensionLogDirectory=%s" lsp-roslyn-server-log-directory)
+                                      ,@lsp-roslyn-server-extra-args)
+                           :noquery t)))
+    (accept-process-output command-process lsp-roslyn-server-timeout-seconds) ; wait for JSON with pipe name to print on stdout, like {"pipeName":"\\\\.\\pipe\\d1b72351"}
+    (when (not lsp-roslyn--pipe-name)
+      (error "Failed to receive pipe name from Roslyn server process"))
+    (let* ((process-name (generate-new-buffer-name (format "%s-pipe" name)))
+           (stderr-buf (format "*%s::stderr*" process-name))
+           (communication-process
+            (lsp-roslyn--make-named-pipe-process filter sentinel environment-fn process-name stderr-buf)))
+      (with-current-buffer (get-buffer parent-stderr-buf)
+        (special-mode))
+      (when-let* ((stderr-buffer (get-buffer stderr-buf)))
+        (with-current-buffer stderr-buffer
+          ;; Make the *NAME::stderr* buffer buffer-read-only, q to bury, etc.
+          (special-mode))
+        (set-process-query-on-exit-flag (get-buffer-process stderr-buffer) nil))
+      (set-process-query-on-exit-flag command-process nil)
+      (set-process-query-on-exit-flag communication-process nil)
+      (cons communication-process command-process))))
+
+(defun lsp-roslyn--uri-to-path (uri)
+  "Convert a URI to a file path, without unhexifying."
+  (let* ((url (url-generic-parse-url uri))
+         (type (url-type url))
+         (target (url-target url))
+         (file
+          (concat (decode-coding-string (url-filename url)
+                                        (or locale-coding-system 'utf-8))
+                  (when (and target
+                             (not (s-match
+                                   (rx "#" (group (1+ num)) (or "," "#")
+                                       (group (1+ num))
+                                       string-end)
+                                   uri)))
+                    (concat "#" target))))
+         (file-name (if (and type (not (string= type "file")))
+                        (if-let* ((handler (lsp--get-uri-handler type)))
+                            (funcall handler uri)
+                          uri)
+                      ;; `url-generic-parse-url' is buggy on windows:
+                      ;; https://github.com/emacs-lsp/lsp-mode/pull/265
+                      (or (and (eq system-type 'windows-nt)
+                               (eq (elt file 0) ?\/)
+                               (substring file 1))
+                          file))))
+    (->> file-name
+         (concat (-some #'lsp--workspace-host-root (lsp-workspaces)))
+         (lsp-remap-path-if-needed))))
+
+(defun lsp-roslyn--path-to-uri (path)
+  "Convert PATH to a URI, without hexifying."
+  (url-unhex-string (lsp--path-to-uri-1 path)))
+
+(lsp-defun lsp-roslyn--on-project-initialization-complete (workspace _params)
+  (lsp--info "%s: Project initialized successfully."
+             (lsp--workspace-print workspace)))
+
+(defun lsp-roslyn--find-files-in-parent-directories (directory regex &optional result)
+  "Search DIRECTORY for files matching REGEX and return their full paths if found."
+  (let* ((parent-dir (file-truename (concat (file-name-directory directory) "../")))
+         (found (directory-files directory 't regex))
+         (result (append (or result '()) found)))
+    (if (and (not (string= (file-truename directory) parent-dir))
+             (< (length parent-dir) (length (file-truename directory))))
+        (lsp-roslyn--find-files-in-parent-directories parent-dir regex result)
+      result)))
+
+(defun lsp-roslyn--pick-solution-file-interactively (solution-files)
+  (completing-read "Solution file for this workspace: " solution-files nil t))
+
+(defun lsp-roslyn--find-solution-file ()
+  (let ((solutions (lsp-roslyn--find-files-in-parent-directories
+                    (file-name-directory (buffer-file-name))
+                    (rx (* anychar) ".sln" eos))))
+    (cond
+     ((not solutions) nil)
+     ((eq (length solutions) 1) (cl-first solutions))
+     (t (lsp-roslyn--pick-solution-file-interactively solutions)))))
+
+(defun lsp-roslyn-open-solution-file ()
+  "Chooses the solution file to associate with the Roslyn language server."
+  (interactive)
+  (let ((solution-file (lsp-roslyn--find-solution-file)))
+    (if solution-file
+        (lsp-notify "solution/open" (list :solution (lsp--path-to-uri solution-file)))
+      (lsp--error "No solution file was found for this workspace."))))
+
+(defun lsp-roslyn--on-initialized (_workspace)
+  "Handler for Roslyn server initialization."
+  (lsp-roslyn-open-solution-file))
+
+(defun lsp-roslyn--get-package-name ()
+  "Gets the package name of the Roslyn language server."
+  (format "microsoft.codeanalysis.languageserver.%s" (lsp-roslyn--get-rid)))
+
+(defun lsp-roslyn--get-server-dll-path ()
+  "Gets the path to the language server DLL.
+Assumes it was installed with the server install function."
+  (if lsp-roslyn-server-dll-override-path
+      lsp-roslyn-server-dll-override-path
+    (f-join lsp-roslyn-install-path "out"
+            (lsp-roslyn--get-package-name)
+            lsp-roslyn-package-version
+            "content" "LanguageServer"
+            (lsp-roslyn--get-rid)
+            "Microsoft.CodeAnalysis.LanguageServer.dll")))
+
+(defun lsp-roslyn--get-rid ()
+  "Retrieves the .NET Runtime Identifier (RID) for the current system."
+  (let* ((is-x64 (string-match-p "x86_64" system-configuration))
+         (is-arm64 (string-match-p "aarch64" system-configuration))
+         (is-x86 (and (string-match-p "x86" system-configuration) (not is-x64))))
+    (if-let* ((platform-name (cond
+                              ((eq system-type 'gnu/linux) "linux")
+                              ((eq system-type 'darwin) "osx")
+                              ((eq system-type 'windows-nt) "win")))
+              (arch-name (cond
+                          (is-x64 "x64")
+                          (is-arm64 "arm64")
+                          (is-x86 "x86"))))
+        (format "%s-%s" platform-name arch-name)
+      (error "Unsupported platform: %s (%s)" system-type system-configuration))))
+
+;; Adapted from roslyn.nvim's version
+(defconst lsp-roslyn--temp-project-nuget-config
+  "<?xml version=\"1.0\" encoding=\"utf-8\"?>
+<configuration>
+  <packageSources>
+    <add key=\"vs-impl\" value=\"https://pkgs.dev.azure.com/azure-public/vside/_packaging/vs-impl/nuget/v3/index.json\" />
+  </packageSources>
+</configuration>"
+  "The nuget.config to use when downloading Roslyn.")
+
+;; Adapted from roslyn.nvim's version
+(defun lsp-roslyn--temp-project-csproj (pkg-name pkg-version)
+  "Generates a temporary .csproj to use for downloading the language server."
+  (format
+   "<Project Sdk=\"Microsoft.Build.NoTargets/1.0.80\">
+    <PropertyGroup>
+        <!-- Changes the global packages folder -->
+        <RestorePackagesPath>out</RestorePackagesPath>
+        <!-- This is not super relevant, as long as your SDK version supports it. -->
+        <TargetFramework>net7.0</TargetFramework>
+        <!-- If a package is resolved to a fallback folder, it may not be downloaded -->
+        <DisableImplicitNuGetFallbackFolder>true</DisableImplicitNuGetFallbackFolder>
+        <!-- We don't want to build this project, so we do not need the reference assemblies for the framework we chose -->
+        <AutomaticallyUseReferenceAssemblyPackages>false</AutomaticallyUseReferenceAssemblyPackages>
+    </PropertyGroup>
+    <ItemGroup>
+        <PackageDownload Include=\"%s\" version=\"[%s]\" />
+    </ItemGroup>
+</Project>"
+   pkg-name pkg-version))
+
+(defun lsp-roslyn--download-server (_client callback error-callback update?)
+  "Downloads the Roslyn language server to `lsp-roslyn-install-path'.
+CALLBACK is called when the download finish successfully otherwise
+ERROR-CALLBACK is called.
+UPDATE is non-nil if it is already downloaded.
+FORCED if specified with prefix argument."
+
+  (let ((pkg-name (lsp-roslyn--get-package-name)))
+    (when update?
+      (ignore-errors (delete-directory lsp-roslyn-install-path t)))
+    (unless (f-exists? lsp-roslyn-install-path)
+      (mkdir lsp-roslyn-install-path 'create-parent))
+    (f-write-text lsp-roslyn--temp-project-nuget-config
+                  'utf-8 (expand-file-name "nuget.config" lsp-roslyn-install-path))
+    (f-write-text (lsp-roslyn--temp-project-csproj pkg-name lsp-roslyn-package-version)
+                  'utf-8 (expand-file-name "DownloadRoslyn.csproj" lsp-roslyn-install-path))
+    (lsp-async-start-process
+     callback
+     error-callback
+     lsp-roslyn-dotnet-executable "restore" "--interactive" lsp-roslyn-install-path
+     (format "/p:PackageName=%s" pkg-name)
+     (format "/p:PackageVersion=%s" lsp-roslyn-package-version))))
+
+(defun lsp-roslyn--make-connection ()
+  (list :connect (lambda (f s n e w) (lsp-roslyn--connect f s n e w))
+        :test? (lambda () (f-exists? (lsp-roslyn--get-server-dll-path)))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-roslyn--make-connection)
+                  :priority 0
+                  :server-id 'csharp-roslyn
+                  :activation-fn (lsp-activate-on "csharp")
+                  :notification-handlers (ht ("workspace/projectInitializationComplete" 'lsp-roslyn--on-project-initialization-complete))
+
+                  ;; These two functions are the same as lsp-mode's except they do not
+                  ;; (un)hexify URIs.
+                  :path->uri-fn 'lsp-roslyn--path-to-uri
+                  :uri->path-fn 'lsp-roslyn--uri-to-path
+
+                  :initialized-fn #'lsp-roslyn--on-initialized
+                  :download-server-fn #'lsp-roslyn--download-server))
+
+(provide 'lsp-roslyn)
+;;; lsp-roslyn.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rpm-spec.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rpm-spec.el
new file mode 100644
index 0000000..00edccb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rpm-spec.el
@@ -0,0 +1,64 @@
+;;; lsp-rpm-spec.el --- lsp-mode integration for the rpm-spec-language-server -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, rpm-spec
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Client for RPM Spec files
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-rpm-spec nil
+  "LSP support for RPM spec files using rpm-spec-language-server."
+  :group 'lsp-mode
+  :tag "Language Server"
+  :link '(url-link "https://github.com/dcermak/rpm-spec-language-server"))
+
+(defcustom lsp-rpm-spec-server-command '("python" "-m" "rpm_spec_language_server" "-vvv")
+  "Command to start rpm-spec-language-server."
+  :risky t
+  :group 'lsp-rpm-spec
+  :type '(repeat string))
+
+(defun lsp-rpm-spec--install-server (_client callback error-callback update?)
+  "Install the rpm-spec-language-server via pip.
+
+Will invoke CALLBACK or ERROR-CALLBACK based on result.
+If UPDATE? is true, then pip will update the server."
+  (lsp-async-start-process
+   callback
+   error-callback
+   "pip" "install" "--user" "rpm-spec-language-server" (when update? "-U")))
+
+(defun lsp-rpm-spec-server-start-fun (port)
+  "Command to start the language server in TCP mode, requires PORT."
+  (append lsp-rpm-spec-server-command (list "--port" (number-to-string port))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-tcp-connection 'lsp-rpm-spec-server-start-fun)
+                  :activation-fn (lsp-activate-on "rpm-spec")
+                  :server-id 'rpm-spec-language-server))
+
+(lsp-consistency-check lsp-rpm-spec)
+
+(provide 'lsp-rpm-spec)
+
+;;; lsp-rpm-spec.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rubocop.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rubocop.el
new file mode 100644
index 0000000..9725d4e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rubocop.el
@@ -0,0 +1,67 @@
+;;; lsp-rubocop.el --- lsp-mode for RuboCop  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023  Koichi Ito
+;; Copyright (C) 2023-2026 lsp-mode maintainers
+
+;; Author: Koichi Ito <koic.ito@gmail.com>
+;; Keywords: lsp, ruby, languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for RuboCop which is a Ruby static code analyzer (a.k.a. linter)
+;; and code formatter.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-rubocop nil
+  "LSP support for RuboCop, using the RuboCop built-in language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/rubocop/rubocop")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rubocop-use-bundler nil
+  "Run RuboCop using Bundler."
+  :type 'boolean
+  :safe #'booleanp
+  :group 'lsp-rubocop
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rubocop-server-path nil
+  "Path of the RuboCop built-in language server executable.
+If specified, `lsp-rubocop-use-bundler' is ignored."
+  :type 'file
+  :group 'lsp-rubocop
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-rubocop--build-command ()
+  "Build a command to start the RuboCop built-in language server."
+  (append
+   (if (and lsp-rubocop-use-bundler (not lsp-rubocop-server-path)) '("bundle" "exec"))
+   (list (or lsp-rubocop-server-path "rubocop") "--lsp")))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-rubocop--build-command)
+  :activation-fn (lsp-activate-on "ruby")
+  :priority -1
+  :server-id 'rubocop-ls))
+
+(lsp-consistency-check lsp-rubocop)
+
+(provide 'lsp-rubocop)
+;;; lsp-rubocop.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ruby-lsp.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ruby-lsp.el
new file mode 100644
index 0000000..f23a734
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ruby-lsp.el
@@ -0,0 +1,95 @@
+;;; lsp-ruby-lsp.el --- lsp-mode for the Ruby ruby-lsp gem -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023 Šimon Lukašík
+;; Copyright (C) 2023-2026 lsp-mode maintainers
+
+;; Author: Šimon Lukašík
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for the Ruby ruby-lsp - an optionated language server for Ruby.
+;; Not to be confused with lsp-ruby that has been deprecated for a while.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-ruby-lsp nil
+  "LSP support for the ruby-lsp language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/shopify/ruby-lsp"))
+
+(defcustom lsp-ruby-lsp-use-bundler nil
+  "Run ruby-lsp using bundler."
+  :type 'boolean
+  :safe #'booleanp
+  :group 'lsp-ruby-lsp)
+
+(defcustom lsp-ruby-lsp-library-directories
+  '("~/.rbenv/" "/usr/lib/ruby/" "~/.rvm/" "~/.gem/" "~/.asdf")
+  "List of directories which will be considered to be libraries."
+  :type '(repeat string)
+  :group 'lsp-ruby-lsp
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-ruby-lsp-server-command '("ruby-lsp")
+  "Command to start ruby-lsp language server."
+  :type '(repeat string)
+  :group 'lsp-ruby-lsp
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defun lsp-ruby-lsp--build-command ()
+  (append
+   (if lsp-ruby-lsp-use-bundler '("bundle" "exec"))
+   lsp-ruby-lsp-server-command))
+
+(defun lsp-ruby-lsp--open-file (action)
+  "Open a file. This function is for code-lens provided by ruby-lsp-rails."
+  (let* ((arguments (lsp-get action :arguments))
+         (uri (aref (aref arguments 0) 0))
+         (path-with-line-number (split-string (lsp--uri-to-path uri) "#L"))
+         (path (car path-with-line-number))
+         (line-number (cadr path-with-line-number)))
+    (find-file path)
+    (when line-number (forward-line (1- (string-to-number line-number))))))
+
+(defun lsp-ruby-lsp--run-test (action)
+  "Run a test file. This function is for code-lens provided by ruby-lsp-rails."
+  (let* ((arguments (lsp-get action :arguments))
+         (command (aref arguments 2))
+         (default-directory (lsp-workspace-root))
+         (buffer-name "*run test results*")
+         (buffer (progn
+                   (when (get-buffer buffer-name) (kill-buffer buffer-name))
+                   (generate-new-buffer buffer-name))))
+    (async-shell-command command buffer)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-ruby-lsp--build-command)
+  :activation-fn (lsp-activate-on "ruby")
+  :library-folders-fn (lambda (_workspace) lsp-ruby-lsp-library-directories)
+  :priority -2
+  :action-handlers (ht ("rubyLsp.openFile" #'lsp-ruby-lsp--open-file)
+                       ("rubyLsp.runTest" #'lsp-ruby-lsp--run-test)
+                       ("rubyLsp.runTestInTerminal" #'lsp-ruby-lsp--run-test))
+  :server-id 'ruby-lsp-ls))
+
+(lsp-consistency-check lsp-ruby-lsp)
+
+(provide 'lsp-ruby-lsp)
+;;; lsp-ruby-lsp.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ruby-syntax-tree.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ruby-syntax-tree.el
new file mode 100644
index 0000000..28d131d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ruby-syntax-tree.el
@@ -0,0 +1,60 @@
+;;; lsp-ruby-syntax-tree.el --- lsp-mode for the Ruby syntax_tree gem -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022 Geoffrey Lessel
+;; Copyright (C) 2022-2026 lsp-mode maintainers
+
+;; Author: Geoffrey Lessel
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for the Ruby syntax_tree gem.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-ruby-syntax-tree nil
+  "LSP support for the Ruby syntax_tree gem."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/ruby-syntax-tree/syntax_tree"))
+
+(defcustom lsp-ruby-syntax-tree-use-bundler nil
+  "Run stree (the syntax_tree executable) using bundler."
+  :type 'boolean
+  :safe #'booleanp
+  :group 'lsp-ruby-syntax-tree)
+
+(defcustom lsp-ruby-syntax-tree-format-options nil
+  "Options to pass to the stree lsp server."
+  :type '(repeat string)
+  :group 'lsp-ruby-syntax-tree)
+
+(defun lsp-ruby-syntax-tree--build-command ()
+  (append
+   (if lsp-ruby-syntax-tree-use-bundler '("bundle" "exec"))
+   '("stree" "lsp")
+   lsp-ruby-syntax-tree-format-options))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-ruby-syntax-tree--build-command)
+  :activation-fn (lsp-activate-on "ruby")
+  :priority -4
+  :server-id 'ruby-syntax-tree-ls))
+
+(provide 'lsp-ruby-syntax-tree)
+;;; lsp-ruby-syntax-tree.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ruff.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ruff.el
new file mode 100644
index 0000000..295addb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ruff.el
@@ -0,0 +1,136 @@
+;;; lsp-ruff.el --- ruff lsp support             -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023 Freja Nordsiek
+;; Copyright (C) 2023-2026 lsp-mode maintainers
+;;
+;; Author: Freja Nordsiek <fnordsie@posteo.net
+;; Keywords: language tools
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; ruff LSP Client for the Python programming language
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-ruff nil
+  "LSP support for Python, using ruff's Python Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/astral-sh/ruff"))
+
+(defcustom lsp-ruff-server-command '("ruff" "server")
+  "Command to start ruff lsp.
+Previous ruff-lsp should change this to (\"ruff-lsp\")"
+  :risky t
+  :type '(repeat string)
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-ruff-args '()
+  "Arguments, passed to ruff."
+  :risky t
+  :type '(repeat string)
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-log-level "error"
+  "Tracing level."
+  :type '(choice (const "debug")
+                 (const "error")
+                 (const "info")
+                 (const "off")
+                 (const "warn"))
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-python-path "python3"
+  "Path to the Python interpreter."
+  :risky t
+  :type 'string
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-show-notifications "off"
+  "When notifications are shown."
+  :type '(choice (const "off")
+                 (const "onError")
+                 (const "onWarning")
+                 (const "always"))
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-advertize-organize-imports t
+  "Whether to report ability to handle source.organizeImports actions."
+  :type 'boolean
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-advertize-fix-all t
+  "Whether to report ability to handle source.fixAll actions."
+  :type 'boolean
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-import-strategy "fromEnvironment"
+  "Where ruff is imported from if lsp-ruff-ruff-path is not set."
+  :type '(choice (const "fromEnvironment")
+                 (const "useBundled"))
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-multi-root t
+  "If non nil, lsp-ruff will be started in multi-root mode."
+  :type 'boolean
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-lint-enable t
+  "Whether to enable linting."
+  :type 'boolean
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-lint-select []
+  "A list of rule codes or prefixes to enable."
+  :type '(lsp-repeatable-vector string)
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-lint-extend-select []
+  "A list of rule codes or prefixes to enable, in addition to those specified by `select'."
+  :type '(lsp-repeatable-vector string)
+  :group 'lsp-ruff)
+
+(defcustom lsp-ruff-lint-ignore []
+  "A list of rule codes or prefixes to ignore."
+  :type '(lsp-repeatable-vector string)
+  :group 'lsp-ruff)
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda () (append lsp-ruff-server-command lsp-ruff-ruff-args)))
+  :activation-fn (lsp-activate-on "python")
+  :server-id 'ruff
+  :priority -2
+  :add-on? t
+  :multi-root lsp-ruff-multi-root
+  :initialization-options
+  (lambda ()
+    (list :settings
+          (list :logLevel lsp-ruff-log-level
+                :organizeImports (lsp-json-bool lsp-ruff-advertize-organize-imports)
+                :fixAll (lsp-json-bool lsp-ruff-advertize-fix-all)
+                :importStrategy lsp-ruff-import-strategy
+                :lint (list :enable (lsp-json-bool lsp-ruff-lint-enable)
+                            :select lsp-ruff-lint-select
+                            :extendSelect lsp-ruff-lint-extend-select
+                            :ignore lsp-ruff-lint-ignore))))))
+
+(lsp-consistency-check lsp-ruff)
+
+(provide 'lsp-ruff)
+;;; lsp-ruff.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rust.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rust.el
new file mode 100644
index 0000000..ca71270
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-rust.el
@@ -0,0 +1,1935 @@
+;;; lsp-rust.el --- Rust Client settings             -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Ivan Yonchovski
+;; Copyright (C) 2019-2026 lsp-mode maintainers
+
+;; Author: Ivan Yonchovski <yyoncho@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-rust client
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'ht)
+(require 'dash)
+(require 'lsp-semantic-tokens)
+(require 's)
+
+(defgroup lsp-rust nil
+  "LSP support for Rust, using Rust Language Server or rust-analyzer."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/rust-lang/rls")
+  :package-version '(lsp-mode . "6.1"))
+
+(defgroup lsp-rust-rls nil
+  "LSP support for Rust, using Rust Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/rust-lang/rls")
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defgroup lsp-rust-analyzer nil
+  "LSP support for Rust, using rust-analyzer."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/rust-lang/rust-analyzer")
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defgroup lsp-rust-analyzer-semantic-tokens nil
+  "LSP semantic tokens support for rust-analyzer."
+  :group 'lsp-rust-analyzer
+  :link '(url-link "https://github.com/rust-lang/rust-analyzer")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-server 'rust-analyzer
+  "Choose LSP server."
+  :type '(choice (const :tag "rls" rls)
+                 (const :tag "rust-analyzer" rust-analyzer))
+  :group 'lsp-rust
+  :package-version '(lsp-mode . "6.2"))
+
+;; RLS
+
+(defcustom lsp-rust-rls-server-command '("rls")
+  "Command to start RLS."
+  :type '(repeat string)
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-library-directories
+  '("~/.cargo/registry/src" "~/.rustup/toolchains")
+  "List of directories which will be considered to be libraries."
+  :risky t
+  :type '(repeat string)
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-sysroot nil
+  "If non-nil, use the given path as the sysroot for all rustc invocations
+instead of trying to detect the sysroot automatically."
+  :type '(choice
+          (const :tag "None" nil)
+          (string :tag "Sysroot"))
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-target nil
+  "If non-nil, use the given target triple for all rustc invocations."
+  :type '(choice
+          (const :tag "None" nil)
+          (string :tag "Target"))
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-rustflags nil
+  "Flags added to RUSTFLAGS."
+  :type '(choice
+          (const :tag "None" nil)
+          (string :tag "Flags"))
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-clear-env-rust-log t
+  "Clear the RUST_LOG environment variable before running rustc or cargo."
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-build-lib nil
+  "If non-nil, checks the project as if you passed the `--lib' argument to
+cargo.
+
+Mutually exclusive with, and preferred over, `lsp-rust-build-bin'. (Unstable)"
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-build-bin nil
+  "If non-nil, checks the project as if you passed `-- bin <build_bin>'
+argument to cargo.
+
+Mutually exclusive with `lsp-rust-build-lib'. (Unstable)"
+  :type '(choice
+          (const :tag "None" nil)
+          (string :tag "Binary"))
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-cfg-test nil
+  "If non-nil, checks the project as if you were running `cargo test' rather
+than cargo build.
+
+I.e., compiles (but does not run) test code."
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-unstable-features nil
+  "Enable unstable features."
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-wait-to-build nil
+  "Time in milliseconds between receiving a change notification
+and starting build. If not specified, automatically inferred by
+the latest build duration."
+  :type '(choice
+          (const :tag "Auto" nil)
+          (number :tag "Time"))
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-show-warnings t
+  "Show warnings."
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-crate-blocklist  [
+                                      "cocoa"
+                                      "gleam"
+                                      "glium"
+                                      "idna"
+                                      "libc"
+                                      "openssl"
+                                      "rustc_serialize"
+                                      "serde"
+                                      "serde_json"
+                                      "typenum"
+                                      "unicode_normalization"
+                                      "unicode_segmentation"
+                                      "winapi"
+                                      ]
+  "A list of Cargo crates to blocklist."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-build-on-save nil
+  "Only index the project when a file is saved and not on change."
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-features []
+  "List of features to activate.
+Corresponds to the `rust-analyzer` setting `rust-analyzer.cargo.features`.
+Set this to `\"all\"` to pass `--all-features` to cargo."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-all-features nil
+  "Enable all Cargo features."
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-no-default-features nil
+  "Do not enable default Cargo features."
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-racer-completion t
+  "Enables code completion using racer."
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-clippy-preference "opt-in"
+  "Controls eagerness of clippy diagnostics when available.
+Valid values are (case-insensitive):
+ - \"off\": Disable clippy lints.
+ - \"opt-in\": Clippy lints are shown when crates specify `#![warn(clippy)]'.
+ - \"on\": Clippy lints enabled for all crates in workspace.
+
+You need to install clippy via rustup if you haven't already."
+  :type '(choice
+          (const "on")
+          (const "opt-in")
+          (const "off"))
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-jobs nil
+  "Number of Cargo jobs to be run in parallel."
+  :type '(choice
+          (const :tag "Auto" nil)
+          (number :tag "Jobs"))
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-all-targets t
+  "Checks the project as if you were running cargo check --all-targets.
+I.e., check all targets and integration tests too."
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-target-dir nil
+  "When specified, it places the generated analysis files at the
+specified target directory. By default it is placed target/rls
+directory."
+  :type '(choice
+          (const :tag "Default" nil)
+          (string :tag "Directory"))
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-rustfmt-path nil
+  "When specified, RLS will use the Rustfmt pointed at the path
+instead of the bundled one"
+  :type '(choice
+          (const :tag "Bundled" nil)
+          (string :tag "Path"))
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-build-command nil
+  "EXPERIMENTAL (requires `rust.unstable_features')
+If set, executes a given program responsible for rebuilding save-analysis to be
+loaded by the RLS. The program given should output a list of resulting .json
+files on stdout.
+
+Implies `rust.build_on_save': true."
+  :type '(choice
+          (const :tag "None" nil)
+          (string :tag "Command"))
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-full-docs nil
+  "Instructs cargo to enable full documentation extraction during
+save-analysis while building the crate."
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-rust-show-hover-context t
+  "Show additional context in hover tooltips when available. This
+is often the type local variable declaration."
+  :type 'boolean
+  :group 'lsp-rust-rls
+  :package-version '(lsp-mode . "6.1"))
+
+(lsp-register-custom-settings
+ '(("rust.show_hover_context" lsp-rust-show-hover-context t)
+   ("rust.full_docs" lsp-rust-full-docs t)
+   ("rust.build_command" lsp-rust-build-command)
+   ("rust.rustfmt_path" lsp-rust-rustfmt-path)
+   ("rust.target_dir" lsp-rust-target-dir)
+   ("rust.all_targets" lsp-rust-all-targets t)
+   ("rust.jobs" lsp-rust-jobs)
+   ("rust.clippy_preference" lsp-rust-clippy-preference)
+   ("rust.racer_completion" lsp-rust-racer-completion t)
+   ("rust.no_default_features" lsp-rust-no-default-features t)
+   ("rust.all_features" lsp-rust-all-features t)
+   ("rust.features" lsp-rust-features)
+   ("rust.build_on_save" lsp-rust-build-on-save t)
+   ("rust.crate_blocklist" lsp-rust-crate-blocklist)
+   ("rust.show_warnings" lsp-rust-show-warnings t)
+   ("rust.wait_to_build" lsp-rust-wait-to-build)
+   ("rust.unstable_features" lsp-rust-unstable-features t)
+   ("rust.cfg_test" lsp-rust-cfg-test t)
+   ("rust.build_bin" lsp-rust-build-bin)
+   ("rust.build_lib" lsp-rust-build-lib t)
+   ("rust.clear_env_rust_log" lsp-rust-clear-env-rust-log t)
+   ("rust.rustflags" lsp-rust-rustflags)
+   ("rust.target" lsp-rust-target)
+   ("rust.sysroot" lsp-rust-sysroot)))
+
+(defun lsp-clients--rust-window-progress (workspace params)
+  "Progress report handling.
+PARAMS progress report notification data."
+  (-let [(&v1:ProgressParams :done? :message? :title) params]
+    (if (or done? (s-blank-str? message?))
+        (lsp-workspace-status nil workspace)
+      (lsp-workspace-status (format "%s - %s" title (or message? "")) workspace))))
+
+(lsp-defun lsp-rust--rls-run ((&Command :arguments? params))
+  (-let* (((&rls:Cmd :env :binary :args :cwd) (lsp-seq-first params))
+          (default-directory (or cwd (lsp-workspace-root) default-directory) ))
+    (compile
+     (format "%s %s %s"
+             (s-join " " (ht-amap (format "%s=%s" key value) env))
+             binary
+             (s-join " " args)))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda () lsp-rust-rls-server-command))
+                  :activation-fn (lsp-activate-on "rust")
+                  :priority (if (eq lsp-rust-server 'rls) 1 -1)
+                  :initialization-options '((omitInitBuild . t)
+                                            (cmdRun . t))
+                  :notification-handlers (ht ("window/progress" 'lsp-clients--rust-window-progress))
+                  :action-handlers (ht ("rls.run" 'lsp-rust--rls-run))
+                  :library-folders-fn (lambda (_workspace) lsp-rust-library-directories)
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration
+                                       (lsp-configuration-section "rust"))))
+                  :server-id 'rls))
+
+
+;; rust-analyzer
+(defcustom lsp-rust-analyzer-server-command '("rust-analyzer")
+  "Command to start rust-analyzer."
+  :type '(repeat string)
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-rust-analyzer-library-directories
+  '("~/.cargo/git" "~/.cargo/registry/src" "~/.rustup/toolchains")
+  "List of directories which will be considered to be libraries."
+  :risky t
+  :type '(repeat string)
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-server-format-inlay-hints t
+  "Whether to ask rust-analyzer to format inlay hints itself.  If
+active, the various inlay format settings are not used."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-hide-closure-initialization nil
+  "Whether to hide inlay type hints for `let` statements that initialize
+to a closure. Only applies to closures with blocks, same as
+`#rust-analyzer.inlayHints.closureReturnTypeHints.enable#`."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-highlight-breakpoints t
+  "Enables highlighting of related references while the cursor is on
+`break`, `loop`, `while`, or `for` keywords."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-highlight-closure-captures t
+  "Enables highlighting of all captures of a closure while the
+cursor is on the `|` or move keyword of a closure."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-highlight-exit-points t
+  "Enables highlighting of all exit points while the cursor is on
+any `return`, `?`, `fn`, or return type arrow (`->`)."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-highlight-references t
+  "Enables highlighting of related references while the cursor is on
+any identifier."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-highlight-yield-points t
+  "Enables highlighting of all break points for a loop or block
+context while the cursor is on any `async` or `await` keywords."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-closure-return-type-hints "never"
+  "Whether to show inlay type hints for return types of closures."
+  :type '(choice
+          (const "never")
+          (const "always")
+          (const "with_block"))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-discriminants-hints "never"
+  "Whether to show enum variant discriminant hints."
+  :type '(choice
+          (const "never")
+          (const "always")
+          (const "fieldless"))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-expression-adjustment-hints "never"
+  "Whether to show inlay hints for type adjustments.."
+  :type '(choice
+          (const "never")
+          (const "always")
+          (const "reborrow"))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-expression-adjustment-hints-mode "prefix"
+  "Whether to show inlay hints as postfix ops (`.*` instead of `*`, etc)."
+  :type '(choice
+          (const "prefix")
+          (const "postfix")
+          (const "prefer_prefix")
+          (const "prefer_postfix"))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-expression-adjustment-hide-unsafe nil
+  "Whether to hide inlay hints for type adjustments outside of
+`unsafe` blocks."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-implicit-drops nil
+  "Whether to show implicit drop hints."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+
+(defcustom lsp-rust-analyzer-closure-capture-hints nil
+  "Whether to show inlay hints for closure captures."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-closure-style "impl_fn"
+  "Closure notation in type and chaining inlay hints."
+  :type 'string
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-hide-named-constructor nil
+  "Whether to hide inlay type hints for constructors."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-max-inlay-hint-length nil
+  "Max inlay hint length."
+  :type 'integer
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2.2"))
+
+(defcustom lsp-rust-analyzer-display-chaining-hints nil
+  "Whether to show inlay type hints for method chains.  These
+hints will be formatted with the type hint formatting options, if
+the mode is not configured to ask the server to format them."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2.2"))
+
+(defcustom lsp-rust-analyzer-display-lifetime-elision-hints-enable "never"
+  "Whether to show elided lifetime inlay hints."
+  :type '(choice
+          (const "never")
+          (const "always")
+          (const "skip_trivial"))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-display-lifetime-elision-hints-use-parameter-names nil
+  "When showing elided lifetime inlay hints, whether to use
+parameter names or numeric placeholder names for the lifetimes."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-display-closure-return-type-hints nil
+  "Whether to show closure return type inlay hints for closures
+with block bodies."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-display-parameter-hints nil
+  "Whether to show function parameter name inlay hints at the call site."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2.2"))
+
+(defcustom lsp-rust-analyzer-display-reborrow-hints "never"
+  "Whether to show inlay type hints for compiler inserted reborrows."
+  :type '(choice
+          (const "always")
+          (const "never")
+          (const "mutable"))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-binding-mode-hints nil
+  "Whether to show inlay type hints for binding modes."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-closing-brace-hints t
+  "Whether to show inlay hints after a closing `}` to indicate what item it
+belongs to."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-closing-brace-hints-min-lines 25
+  "Minimum number of lines required before the `}` until the hint is shown
+\(set to 0 or 1 to always show them)."
+  :type 'integer
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-lru-capacity nil
+  "Number of syntax trees rust-analyzer keeps in memory."
+  :type 'integer
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2.2"))
+
+(defcustom lsp-rust-analyzer-cargo-target nil
+  "Compilation target (target triple)."
+  :type '(choice
+          (string :tag "Target")
+          (const :tag "None" nil))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-cargo-target-dir nil
+  "Optional path to a rust-analyzer specific target directory.
+This prevents rust-analyzer's `cargo check` and initial build-script and
+proc-macro building from locking the `Cargo.lock` at the expense of
+duplicating build artifacts.
+
+Set to `true` to use a subdirectory of the existing target directory or
+set to a path relative to the workspace to use that path."
+  :type '(choice
+          (string :tag "Directory")
+          boolean)
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-cargo-watch-enable t
+  "Enable Cargo watch."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2.2"))
+
+(defcustom lsp-rust-analyzer-cargo-watch-command "check"
+  "Cargo watch command."
+  :type 'string
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2.2"))
+
+(defcustom lsp-rust-analyzer-cargo-watch-args []
+  "Extra arguments for `cargo check`."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2.2"))
+
+(defcustom lsp-rust-analyzer-cargo-override-command []
+  "Advanced option, fully override the command rust-analyzer uses for checking.
+The command should include `--message=format=json` or similar option."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2.2"))
+
+(defcustom lsp-rust-analyzer-check-all-targets t
+  "Enables --all-targets for `cargo check`."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.2"))
+
+(defcustom lsp-rust-analyzer-checkonsave-features nil
+  "List of features to activate.
+Corresponds to the `rust-analyzer` setting `rust-analyzer.check.features`.
+When set to `nil` (default), the value of `lsp-rust-features' is inherited.
+Set this to `\"all\"` to pass `--all-features` to cargo.
+Note: setting this to `nil` means \"unset\", whereas setting this
+to `[]` (empty vector) means \"set to empty list of features\",
+which overrides any value that would otherwise be inherited from
+`lsp-rust-features'."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-rust-analyzer
+  :package-version '(lsp-mode . "8.0.2"))
+
+(defcustom lsp-rust-analyzer-check-invocation-location "workspace"
+  "Specifies the working directory for running checks.
+- \"workspace\": run checks for workspaces in the corresponding workspaces' root directories.  This falls back to \"root\" if rust-analyzer.check.invocationStrategy is set to once.
+- \"root\": run checks in the project’s root directory.
+This config only has an effect when rust-analyzer.check.overrideCommand is set."
+  :type '(choice
+          (const "workspace")
+          (const "root"))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-rust-analyzer-check-invocation-strategy "per_workspace"
+  "Specifies the invocation strategy to use when running the check command.
+If per_workspace is set, the command will be executed for each workspace.
+If once is set, the command will be executed once.
+This config only has an effect when rust-analyzer.check.overrideCommand is set."
+  :type '(choice
+          (const "per_workspace")
+          (const "once"))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-rust-analyzer-cargo-unset-test []
+  "force rust-analyzer to unset `#[cfg(test)]` for the specified crates."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-cfg-set-test t
+  "force rust-analyzer to set `#[cfg(test)]` for the current crate / workspace."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-use-client-watching t
+  "Use client watching"
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2.2"))
+
+(defcustom lsp-rust-analyzer-exclude-globs []
+  "Exclude globs"
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2.2"))
+
+(defcustom lsp-rust-analyzer-exclude-dirs []
+  "These directories will be ignored by rust-analyzer."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-macro-expansion-method 'lsp-rust-analyzer-macro-expansion-default
+  "Use a different function if you want formatted macro expansion results and
+syntax highlighting."
+  :type 'function
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.2.2"))
+
+(defcustom lsp-rust-analyzer-diagnostics-enable t
+  "Whether to show native rust-analyzer diagnostics."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.3.2"))
+
+(defcustom lsp-rust-analyzer-diagnostics-enable-experimental nil
+  "Whether to show native rust-analyzer diagnostics that are still experimental
+\(might have more false positives than usual)."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-diagnostics-disabled []
+  "List of native rust-analyzer diagnostics to disable."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-diagnostics-warnings-as-hint []
+  "List of warnings that should be displayed with hint severity."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-diagnostics-warnings-as-info []
+  "List of warnings that should be displayed with info severity."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(define-obsolete-variable-alias
+  'lsp-rust-analyzer-cargo-load-out-dirs-from-check
+  'lsp-rust-analyzer-cargo-run-build-scripts
+  "8.0.0")
+
+(defcustom lsp-rust-analyzer-cargo-run-build-scripts t
+  "Whether to run build scripts (`build.rs`) for more precise code analysis."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-cargo-build-scripts-invocation-location "workspace"
+  "Specifies the working directory for running checks.
+- \"workspace\": run checks for workspaces in the corresponding workspaces' root directories.  This falls back to \"root\" if rust-analyzer.check.invocationStrategy is set to once.
+- \"root\": run checks in the project’s root directory.
+This config only has an effect when rust-analyzer.check.overrideCommand is set."
+  :type '(choice
+          (const "workspace")
+          (const "root"))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-rust-analyzer-cargo-build-scripts-invocation-strategy "per_workspace"
+  "Specifies the invocation strategy to use when running the check command.
+If per_workspace is set, the command will be executed for each workspace.
+If once is set, the command will be executed once.
+This config only has an effect when rust-analyzer.check.overrideCommand is set."
+  :type '(choice
+          (const "per_workspace")
+          (const "once"))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-rust-analyzer-cargo-build-scripts-override-command []
+  "Override the command rust-analyzer uses to run build scripts and build procedural macros."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-rust-analyzer-rustfmt-extra-args []
+  "Additional arguments to rustfmt."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.3.2"))
+
+(defcustom lsp-rust-analyzer-rustfmt-override-command []
+  "Advanced option, fully override the command rust-analyzer uses
+for formatting."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.3.2"))
+
+(defcustom lsp-rust-analyzer-rustfmt-rangeformatting-enable nil
+  "Enables the use of rustfmt's unstable range formatting command for the
+`textDocument/rangeFormatting` request. The rustfmt option is unstable and only
+available on a nightly build."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-assist-prefer-self nil
+  "Prefer to use `Self` over the type name when inserting a type (e.g. in “fill
+match arms” assist)."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-rust-analyzer-completion-add-call-parenthesis t
+  "Whether to add parenthesis when completing functions."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.3.2"))
+
+(defcustom lsp-rust-analyzer-completion-add-call-argument-snippets t
+  "Whether to add argument snippets when completing functions."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.3.2"))
+
+(defcustom lsp-rust-analyzer-completion-postfix-enable t
+  "Whether to show postfix snippets like `dbg`, `if`, `not`, etc."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.3.2"))
+
+(defcustom lsp-rust-analyzer-call-info-full t
+  "Whether to show function name and docs in parameter hints."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.3.2"))
+
+(defcustom lsp-rust-analyzer-proc-macro-enable t
+  "Enable Proc macro support.
+Implies `lsp-rust-analyzer-cargo-run-build-scripts'"
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "6.3.2"))
+
+(defcustom lsp-rust-analyzer-proc-macro-server nil
+  "Internal config, path to proc-macro server executable."
+  :type 'string
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-rust-analyzer-import-prefix "plain"
+  "The path structure for newly inserted paths to use.
+Valid values are:
+ - \"plain\": Insert import paths relative to the current module, using up to
+one `super' prefix if the parent module contains the requested item.
+ - \"by_self\": Prefix all import paths with `self' if they don't begin with
+`self', `super', `crate' or a crate name.
+ - \"by_crate\": Force import paths to be absolute by always starting
+them with `crate' or the crate name they refer to."
+  :type '(choice
+          (const "plain")
+          (const "by_self")
+          (const "by_crate"))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-import-granularity "crate"
+  "How imports should be grouped into use statements."
+  :type '(choice
+          (const :tag "Merge imports from the same crate into a single use statement. This kind of nesting is only supported in Rust versions later than 1.24." "crate" )
+          (const :tag "Merge imports from the same module into a single use statement." "module" )
+          (const :tag "Don’t merge imports at all, creating one import per item." "item" )
+          (const :tag "Do not change the granularity of any imports. For auto-import this has the same effect as `\"item\"'" "preserve" ))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-cargo-auto-reload t
+  "Automatically refresh project info via `cargo metadata' on `Cargo.toml' changes."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-use-rustc-wrapper-for-build-scripts t
+  "Use `RUSTC_WRAPPER=rust-analyzer' when running build scripts to avoid
+compiling unnecessary things."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-completion-auto-import-enable t
+  "Toggles the additional completions that automatically add imports when
+completed. `lsp-completion-enable-additional-text-edit' must be non-nil
+ for this feature to be fully enabled."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-completion-auto-self-enable t
+  "Toggles the additional completions that automatically show method calls
+and field accesses with self prefixed to them when inside a method."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-completion-term-search-enable nil
+  "Enable term search based snippets like `Some(foo.bar().baz())`."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-rust-analyzer-import-enforce-granularity nil
+  "Whether to enforce the import granularity setting for all files.
+ If set to nil rust-analyzer will try to keep import styles consistent per file."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-imports-merge-glob t
+  "Whether to allow import insertion to merge new imports into single path
+glob imports like `use std::fmt::*;`."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-import-group t
+  "Group inserted imports by the following order:
+https://rust-analyzer.github.io/manual.html#auto-import.
+ Groups are separated by newlines."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-highlighting-strings t
+  "Use semantic tokens for strings."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-rustc-source nil
+  "Path to the Cargo.toml of the rust compiler workspace."
+  :type '(choice
+          (file :tag "Path")
+          (const :tag "None" nil))
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-linked-projects []
+  "Disable project auto-discovery in favor of explicitly specified set of
+projects. Elements must be paths pointing to `Cargo.toml`, `rust-project.json`,
+or JSON objects in `rust-project.json` format."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-experimental-proc-attr-macros t
+  "Whether to enable experimental support for expanding proc macro attributes."
+  :type 'boolean
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+;; https://rust-analyzer.github.io/book/configuration#cargo.cfgs
+(defcustom lsp-rust-analyzer-cargo-cfgs ["debug_assertions" "miri"]
+  "Extra configurations that are passed to every cargo invocation."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-cargo-extra-args []
+  "Extra arguments that are passed to every cargo invocation."
+  :type 'lsp-string-vector
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-cargo-extra-env #s(hash-table)
+  "Extra environment variables that will be set when running cargo, rustc or
+other commands within the workspace.  Useful for setting RUSTFLAGS."
+  :type 'alist
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-cargo-sysroot-src nil
+  "Relative path to the sysroot library sources.
+If left unset, this will default to {cargo.sysroot}/lib/rustlib/src/rust/library.
+This option does not take effect until rust-analyzer is restarted."
+  :type 'string
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-version . "10.0.0"))
+
+(defconst lsp-rust-notification-handlers
+  '(("rust-analyzer/publishDecorations" . (lambda (_w _p)))))
+
+(defconst lsp-rust-action-handlers
+  '())
+
+(define-derived-mode lsp-rust-analyzer-syntax-tree-mode special-mode "Rust-Analyzer-Syntax-Tree"
+  "Mode for the rust-analyzer syntax tree buffer.")
+
+(defun lsp-rust-analyzer-syntax-tree ()
+  "Display syntax tree for current buffer."
+  (interactive)
+  (-let* ((root (lsp-workspace-root default-directory))
+          (params (lsp-make-rust-analyzer-syntax-tree-params
+                   :text-document (lsp--text-document-identifier)
+                   :range? (if (use-region-p)
+                               (lsp--region-to-range (region-beginning) (region-end))
+                             (lsp--region-to-range (point-min) (point-max)))))
+          (results (lsp-send-request (lsp-make-request
+                                      "rust-analyzer/syntaxTree"
+                                      params))))
+    (let ((buf (get-buffer-create (format "*rust-analyzer syntax tree %s*" root)))
+          (inhibit-read-only t))
+      (with-current-buffer buf
+        (lsp-rust-analyzer-syntax-tree-mode)
+        (erase-buffer)
+        (insert results)
+        (goto-char (point-min)))
+      (pop-to-buffer buf))))
+
+(define-derived-mode lsp-rust-analyzer-status-mode special-mode "Rust-Analyzer-Status"
+  "Mode for the rust-analyzer status buffer.")
+
+(defun lsp-rust-analyzer-status ()
+  "Displays status information for rust-analyzer."
+  (interactive)
+  (-let* ((root (lsp-workspace-root default-directory))
+          (params (lsp-make-rust-analyzer-analyzer-status-params
+                   :text-document (lsp--text-document-identifier)))
+          (results (lsp-send-request (lsp-make-request
+                                      "rust-analyzer/analyzerStatus"
+                                      params))))
+    (let ((buf (get-buffer-create (format "*rust-analyzer status %s*" root)))
+          (inhibit-read-only t))
+      (with-current-buffer buf
+        (lsp-rust-analyzer-status-mode)
+        (erase-buffer)
+        (insert results)
+        (pop-to-buffer buf)))))
+
+(defun lsp-rust-analyzer-view-item-tree ()
+  "Show item tree of rust file."
+  (interactive)
+  (-let* ((params (lsp-make-rust-analyzer-view-item-tree
+                   :text-document (lsp--text-document-identifier)))
+          (results (lsp-send-request (lsp-make-request
+                                      "rust-analyzer/viewItemTree"
+                                      params))))
+    (let ((buf (get-buffer-create "*rust-analyzer item tree*"))
+          (inhibit-read-only t))
+      (with-current-buffer buf
+        (special-mode)
+        (erase-buffer)
+        (insert (lsp--render-string results "rust"))
+        (pop-to-buffer buf)))))
+
+(defun lsp-rust-analyzer-view-hir ()
+  "View Hir of function at point."
+  (interactive)
+  (-let* ((params (lsp-make-rust-analyzer-expand-macro-params
+                   :text-document (lsp--text-document-identifier)
+                   :position (lsp--cur-position)))
+          (results (lsp-send-request (lsp-make-request
+                                      "rust-analyzer/viewHir"
+                                      params))))
+    (let ((buf (get-buffer-create "*rust-analyzer hir*"))
+          (inhibit-read-only t))
+      (with-current-buffer buf
+        (special-mode)
+        (erase-buffer)
+        (insert results)
+        (pop-to-buffer buf)))))
+
+(defun lsp-rust-analyzer-join-lines ()
+  "Join selected lines into one, smartly fixing up whitespace and trailing commas."
+  (interactive)
+  (let* ((params (lsp-make-rust-analyzer-join-lines-params
+                  :text-document (lsp--text-document-identifier)
+                  :ranges (vector (if (use-region-p)
+                                      (lsp--region-to-range (region-beginning) (region-end))
+                                    (lsp--region-to-range (point) (point))))))
+         (result (lsp-send-request (lsp-make-request "experimental/joinLines" params))))
+    (lsp--apply-text-edits result 'code-action)))
+
+(defun lsp-rust-analyzer-reload-workspace ()
+  "Reload workspace, picking up changes from Cargo.toml"
+  (interactive)
+  (lsp--cur-workspace-check)
+  (lsp-send-request (lsp-make-request "rust-analyzer/reloadWorkspace")))
+
+(defcustom lsp-rust-analyzer-download-url
+  (let* ((x86 (string-prefix-p "x86_64" system-configuration))
+         (arch (if x86 "x86_64" "aarch64")))
+    (format "https://github.com/rust-lang/rust-analyzer/releases/latest/download/%s"
+            (pcase system-type
+              ('gnu/linux (format "rust-analyzer-%s-unknown-linux-gnu.gz" arch))
+              ('darwin (format "rust-analyzer-%s-apple-darwin.gz" arch))
+              ('windows-nt (format "rust-analyzer-%s-pc-windows-msvc.zip" arch)))))
+  "Automatic download url for Rust Analyzer"
+  :type 'string
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-rust-analyzer-store-path (f-join lsp-server-install-dir "rust"
+                                                (pcase system-type
+                                                  ('windows-nt "rust-analyzer.exe")
+                                                  (_ "rust-analyzer")))
+  "The path to the file in which `rust-analyzer' will be stored."
+  :type 'file
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-dependency
+ 'rust-analyzer
+ `(:download :url lsp-rust-analyzer-download-url
+             :decompress ,(pcase system-type ('windows-nt :zip) (_ :gzip))
+             :store-path lsp-rust-analyzer-store-path
+             :set-executable? t)
+ `(:system ,(file-name-nondirectory lsp-rust-analyzer-store-path)))
+
+(lsp-defun lsp-rust--analyzer-run-single ((&Command :arguments?))
+  (lsp-rust-analyzer-run (lsp-seq-first arguments?)))
+
+(lsp-defun lsp-rust--analyzer-show-references
+  ((&Command :title :arguments? [_uri _filepos references]))
+  (lsp-show-xrefs (lsp--locations-to-xref-items references) nil
+                  (s-contains-p "reference" title)))
+
+(declare-function dap-debug "ext:dap-mode" (template) t)
+
+(lsp-defun lsp-rust--analyzer-debug-lens ((&Command :arguments? [args]))
+  (lsp-rust-analyzer-debug args))
+
+;; Semantic tokens
+
+;; Modifier faces
+(defface lsp-rust-analyzer-documentation-modifier-face
+  '((t nil))
+  "The face modification to use for documentation items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-declaration-modifier-face
+  '((t nil))
+  "The face modification to use for declaration items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-definition-modifier-face
+  '((t nil))
+  "The face modification to use for definition items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-static-modifier-face
+  '((t nil))
+  "The face modification to use for static items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-abstract-modifier-face
+  '((t nil))
+  "The face modification to use for abstract items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-deprecated-modifier-face
+  '((t nil))
+  "The face modification to use for deprecated items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-readonly-modifier-face
+  '((t nil))
+  "The face modification to use for readonly items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-default-library-modifier-face
+  '((t nil))
+  "The face modification to use for default-library items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-async-modifier-face
+  '((t nil))
+  "The face modification to use for async items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-attribute-modifier-face
+  '((t nil))
+  "The face modification to use for attribute items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-callable-modifier-face
+  '((t nil))
+  "The face modification to use for callable items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-constant-modifier-face
+  '((t nil))
+  "The face modification to use for constant items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-consuming-modifier-face
+  '((t nil))
+  "The face modification to use for consuming items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-control-flow-modifier-face
+  '((t nil))
+  "The face modification to use for control-flow items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-crate-root-modifier-face
+  '((t nil))
+  "The face modification to use for crate-root items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-injected-modifier-face
+  '((t nil))
+  "The face modification to use for injected items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-intra-doc-link-modifier-face
+  '((t nil))
+  "The face modification to use for intra-doc-link items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-library-modifier-face
+  '((t nil))
+  "The face modification to use for library items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-mutable-modifier-face
+  '((t :underline t))
+  "The face modification to use for mutable items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-public-modifier-face
+  '((t nil))
+  "The face modification to use for public items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-reference-modifier-face
+  '((t :bold t))
+  "The face modification to use for reference items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-trait-modifier-face
+  '((t nil))
+  "The face modification to use for trait items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+(defface lsp-rust-analyzer-unsafe-modifier-face
+  '((t nil))
+  "The face modification to use for unsafe items."
+  :group 'lsp-rust-analyzer-semantic-tokens)
+
+
+;; ---------------------------------------------------------------------
+;; Semantic token modifier face customization
+
+(defcustom lsp-rust-analyzer-documentation-modifier 'lsp-rust-analyzer-documentation-modifier-face
+  "Face for semantic token modifier for `documentation' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-declaration-modifier 'lsp-rust-analyzer-declaration-modifier-face
+  "Face for semantic token modifier for `declaration' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-definition-modifier 'lsp-rust-analyzer-definition-modifier-face
+  "Face for semantic token modifier for `definition' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-static-modifier 'lsp-rust-analyzer-static-modifier-face
+  "Face for semantic token modifier for `static' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-abstract-modifier 'lsp-rust-analyzer-abstract-modifier-face
+  "Face for semantic token modifier for `abstract' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-deprecated-modifier 'lsp-rust-analyzer-deprecated-modifier-face
+  "Face for semantic token modifier for `deprecated' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-readonly-modifier 'lsp-rust-analyzer-readonly-modifier-face
+  "Face for semantic token modifier for `readonly' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-default-library-modifier 'lsp-rust-analyzer-default-library-modifier-face
+  "Face for semantic token modifier for `default' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-async-modifier 'lsp-rust-analyzer-async-modifier-face
+  "Face for semantic token modifier for `async' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-attribute-modifier 'lsp-rust-analyzer-attribute-modifier-face
+  "Face for semantic token modifier for `attribute' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-callable-modifier 'lsp-rust-analyzer-callable-modifier-face
+  "Face for semantic token modifier for `callable' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-constant-modifier 'lsp-rust-analyzer-constant-modifier-face
+  "Face for semantic token modifier for `constant' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-consuming-modifier 'lsp-rust-analyzer-consuming-modifier-face
+  "Face for semantic token modifier for `consuming' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-control-flow-modifier 'lsp-rust-analyzer-control-flow-modifier-face
+  "Face for semantic token modifier for `control_flow' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-crate-root-modifier 'lsp-rust-analyzer-crate-root-modifier-face
+  "Face for semantic token modifier for `crate_root' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-injected-modifier 'lsp-rust-analyzer-injected-modifier-face
+  "Face for semantic token modifier for `injected' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-intra-doc-link-modifier 'lsp-rust-analyzer-intra-doc-link-modifier-face
+  "Face for semantic token modifier for `intra_doc_link' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-library-modifier 'lsp-rust-analyzer-library-modifier-face
+  "Face for semantic token modifier for `library' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-mutable-modifier 'lsp-rust-analyzer-mutable-modifier-face
+  "Face for semantic token modifier for `mutable' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-public-modifier 'lsp-rust-analyzer-public-modifier-face
+  "Face for semantic token modifier for `public' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-reference-modifier 'lsp-rust-analyzer-reference-modifier-face
+  "Face for semantic token modifier for `reference' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-trait-modifier 'lsp-rust-analyzer-trait-modifier-face
+  "Face for semantic token modifier for `trait' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-unsafe-modifier 'lsp-rust-analyzer-unsafe-modifier-face
+  "Face for semantic token modifier for `unsafe' attribute."
+  :type 'face
+  :group 'lsp-rust-analyzer-semantic-tokens
+  :package-version '(lsp-mode . "9.0.0"))
+
+;; ---------------------------------------------------------------------
+
+(defun lsp-rust-analyzer--semantic-modifiers ()
+  "Mapping between rust-analyzer keywords and fonts to apply.
+The keywords are sent in the initialize response, in the semantic
+tokens legend."
+  `(("documentation"   . ,lsp-rust-analyzer-documentation-modifier)
+    ("declaration"     . ,lsp-rust-analyzer-declaration-modifier)
+    ("definition"      . ,lsp-rust-analyzer-definition-modifier)
+    ("static"          . ,lsp-rust-analyzer-static-modifier)
+    ("abstract"        . ,lsp-rust-analyzer-abstract-modifier)
+    ("deprecated"      . ,lsp-rust-analyzer-deprecated-modifier)
+    ("readonly"        . ,lsp-rust-analyzer-readonly-modifier)
+    ("default_library" . ,lsp-rust-analyzer-default-library-modifier)
+    ("async"           . ,lsp-rust-analyzer-async-modifier)
+    ("attribute"       . ,lsp-rust-analyzer-attribute-modifier)
+    ("callable"        . ,lsp-rust-analyzer-callable-modifier)
+    ("constant"        . ,lsp-rust-analyzer-constant-modifier)
+    ("consuming"       . ,lsp-rust-analyzer-consuming-modifier)
+    ("control_flow"    . ,lsp-rust-analyzer-control-flow-modifier)
+    ("crate_root"      . ,lsp-rust-analyzer-crate-root-modifier)
+    ("injected"        . ,lsp-rust-analyzer-injected-modifier)
+    ("intra_doc_link"  . ,lsp-rust-analyzer-intra-doc-link-modifier)
+    ("library"         . ,lsp-rust-analyzer-library-modifier)
+    ("mutable"         . ,lsp-rust-analyzer-mutable-modifier)
+    ("public"          . ,lsp-rust-analyzer-public-modifier)
+    ("reference"       . ,lsp-rust-analyzer-reference-modifier)
+    ("trait"           . ,lsp-rust-analyzer-trait-modifier)
+    ("unsafe"          . ,lsp-rust-analyzer-unsafe-modifier)))
+
+(defun lsp-rust-switch-server (&optional lsp-server)
+  "Switch priorities of lsp servers, unless LSP-SERVER is already active."
+  (interactive)
+  (let ((current-server (if (> (lsp--client-priority (gethash 'rls lsp-clients)) 0)
+                            'rls
+                          'rust-analyzer)))
+    (unless (eq lsp-server current-server)
+      (dolist (server '(rls rust-analyzer))
+        (when (natnump (setf (lsp--client-priority (gethash server lsp-clients))
+                             (* (lsp--client-priority (gethash server lsp-clients)) -1)))
+          (message (format "Switched to server %s." server)))))))
+
+;;
+;;; Inlay hints
+
+(defcustom lsp-rust-analyzer-debug-lens-extra-dap-args
+  '(:MIMode "gdb" :miDebuggerPath "gdb" :stopAtEntry t :externalConsole :json-false)
+  "Extra arguments to pass to DAP template when debugging a test from code lens.
+
+As a rule of the thumb, do not add extra keys to this plist unless you exactly
+what you are doing, it might break the \"Debug test\" lens otherwise.
+
+See dap-mode documentation and cpptools documentation for the extra variables
+meaning."
+  :type 'plist
+  :group 'lsp-rust-analyzer
+  :package-version '(lsp-mode . "8.0.0"))
+
+;;
+;;; Lenses
+
+(defgroup lsp-rust-analyzer-lens nil
+  "LSP lens support for Rust when using rust-analyzer.
+
+Lenses are (depending on your configuration) clickable links to
+the right of function definitions and the like. These display
+some useful information in their own right and/or perform a
+shortcut action when clicked such as displaying uses of that
+function or running an individual test.
+"
+  :prefix "lsp-rust-analyzer-lens-"
+  :group 'lsp-rust-analyzer
+  :link '(url-link "https://emacs-lsp.github.io/lsp-mode/")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-lens-debug-enable t
+  "Enable or disable the Debug lens."
+  :type 'boolean
+  :group 'lsp-rust-analyzer-lens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-lens-enable t
+  "Master-enable of lenses in Rust files."
+  :type 'boolean
+  :group 'lsp-rust-analyzer-lens
+  :package-version '(lsp-mode . "9.0.0"))
+
+;; This customisation "works" in that it works as described, but the default is fine and changing it
+;; from the default will either stop lenses working or do nothing.
+;;
+;; If this is ever uncommented to re-enable the option, don't forget to also uncomment it in defun
+;; lsp-rust-analyzer--make-init-options too or it'll not do anything.
+
+;; (defcustom lsp-rust-analyzer-lens-force-custom-commands t
+;;   "Internal config: use custom client-side commands even when the
+;; client doesn't set the corresponding capability."
+;;   :type 'boolean
+;;   :group 'lsp-rust-analyzer-lens
+;;   :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-lens-implementations-enable t
+  "Enable or disable the Implementations lens.
+
+The Implementations lens shows `NN implementations' to the right
+of the first line of an enum, struct, or union declaration. This
+is the count of impl blocks, including derived traits. Clicking
+on it gives a list of the impls of that type.
+"
+  :type 'boolean
+  :group 'lsp-rust-analyzer-lens
+  :package-version '(lsp-mode . "9.0.0"))
+
+;; The valid range of values for this is documented in the rust-lang/rust-analyzer repository at the
+;; path "editors/code/package.json"; the TL:DR is that it's "above_name" or "above_whole_item".
+;; However, setting it to "above_whole_item" causes lenses to disappear in Emacs. I suspect this
+;; feature has only ever been tested in some other IDE and it's broken in Emacs. So I've disabled it
+;; for now.
+;;
+;; If this is ever uncommented to re-enable the option, don't forget to also uncomment it in defun
+;; lsp-rust-analyzer--make-init-options too or it'll not do anything.
+
+;; (defcustom lsp-rust-analyzer-lens-location "above_name"
+;;   "Where to render annotations."
+;;    :type '(choice
+;;            (const :tag "Above name" "above_name")
+;;            (const :tag "Above whole item" "above_whole_item")
+;;    :group 'lsp-rust-analyzer-lens
+;;    :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-lens-references-adt-enable nil
+  "Enable or disable the References lens on enums, structs, and traits.
+
+The References lens shows `NN references` to the right of the
+first line of each enum, struct, or union declaration. This is
+the count of uses of that type. Clicking on it gives a list of
+where that type is used."
+  :type 'boolean
+  :group 'lsp-rust-analyzer-lens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-lens-references-enum-variant-enable nil
+  "Enable or disable the References lens on enum variants.
+
+The References lens shows `NN references` to the right of the
+first (or only) line of each enum variant. This is the count of
+uses of that enum variant. Clicking on it gives a list of where
+that enum variant is used."
+  :type 'boolean
+  :group 'lsp-rust-analyzer-lens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-lens-references-method-enable nil
+  "Enable or disable the References lens on functions.
+
+The References lens shows `NN references` to the right of the
+first line of each function declaration. This is the count of
+uses of that function. Clicking on it gives a list of where that
+function is used."
+
+  :type 'boolean
+  :group 'lsp-rust-analyzer-lens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-lens-references-trait-enable nil
+  "Enable or disable the References lens on traits.
+
+The References lens shows `NN references` to the right of the
+first line of each trait declaration. This is a count of uses of
+that trait. Clicking on it gives a list of where that trait is
+used.
+
+There is some overlap with the Implementations lens which slows
+all of the trait's impl blocks, but this also shows other uses
+such as imports and dyn traits."
+  :type 'boolean
+  :group 'lsp-rust-analyzer-lens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-rust-analyzer-lens-run-enable t
+  "Enable or disable the Run lens."
+  :type 'boolean
+  :group 'lsp-rust-analyzer-lens
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-rust-analyzer-initialized? ()
+  (when-let* ((workspace (lsp-find-workspace 'rust-analyzer (buffer-file-name))))
+    (eq 'initialized (lsp--workspace-status workspace))))
+
+(defun lsp-rust-analyzer-expand-macro ()
+  "Expands the macro call at point recursively."
+  (interactive)
+  (-if-let* ((params (lsp-make-rust-analyzer-expand-macro-params
+                      :text-document (lsp--text-document-identifier)
+                      :position (lsp--cur-position)))
+             (response (lsp-request
+                        "rust-analyzer/expandMacro"
+                        params))
+             ((&rust-analyzer:ExpandedMacro :expansion) response))
+      (funcall lsp-rust-analyzer-macro-expansion-method expansion)
+    (lsp--error "No macro found at point, or it could not be expanded.")))
+
+(defun lsp-rust-analyzer-macro-expansion-default (result)
+  "Default method for displaying macro expansion."
+  (let* ((root (lsp-workspace-root default-directory))
+         (buf (get-buffer-create (get-buffer-create (format "*rust-analyzer macro expansion %s*" root)))))
+    (with-current-buffer buf
+      (let ((inhibit-read-only t))
+        (erase-buffer)
+        (insert (lsp--render-string result "rust"))
+        (special-mode)))
+    (pop-to-buffer buf)))
+
+;;
+;;; Runnables
+
+(defvar lsp-rust-analyzer--last-runnable nil
+  "Record the last runnable.")
+
+(defun lsp-rust-analyzer--runnables ()
+  "Return list of runnables."
+  (lsp-send-request (lsp-make-request
+                     "experimental/runnables"
+                     (lsp-make-rust-analyzer-runnables-params
+                      :text-document (lsp--text-document-identifier)
+                      :position? (lsp--cur-position)))))
+
+(defun lsp-rust-analyzer--select-runnable ()
+  "Select runnable."
+  (lsp--completing-read
+   "Select runnable:"
+   (if lsp-rust-analyzer--last-runnable
+       (cons lsp-rust-analyzer--last-runnable
+             (-remove (-lambda ((&rust-analyzer:Runnable :label))
+                        (equal label (lsp-get lsp-rust-analyzer--last-runnable :label)))
+                      (lsp-rust-analyzer--runnables)))
+     (lsp-rust-analyzer--runnables))
+   (-lambda ((&rust-analyzer:Runnable :label)) label)))
+
+(defun lsp-rust-analyzer--common-runner (runnable)
+  "Execute a given RUNNABLE.
+
+Extract the arguments, prepare the minor mode (cargo-process-mode if possible)
+and run a compilation"
+  (-let* (((&rust-analyzer:Runnable :kind :label :args) runnable)
+          ((&rust-analyzer:RunnableArgs :cargo-args :executable-args :workspace-root? :expect-test? :environment?) args)
+          (default-directory (or workspace-root? default-directory)))
+    (if (not (string-equal kind "cargo"))
+        (lsp--error "'%s' runnable is not supported" kind)
+      (compilation-start
+       (string-join (append (when expect-test? '("env" "UPDATE_EXPECT=1"))
+                            (when environment? (lsp-rust-analyzer--to-bash-env environment?))
+                            (list "cargo") cargo-args
+                            (when executable-args '("--")) executable-args '()) " ")
+
+       ;; cargo-process-mode is nice, but try to work without it...
+       (if (functionp 'cargo-process-mode) 'cargo-process-mode nil)
+       (lambda (_) (concat "*" label "*"))))))
+
+(defun lsp-rust-analyzer--to-bash-env (env-vars)
+  "Extract the environment variables from plist ENV-VARS."
+  (cl-loop for (key value) on env-vars by 'cddr
+           collect (format "%s=%s" (substring (symbol-name key) 1) value)))
+
+(defun lsp-rust-analyzer-run (runnable)
+  "Select and run a RUNNABLE action."
+  (interactive (list (lsp-rust-analyzer--select-runnable)))
+  (when (lsp-rust-analyzer--common-runner runnable)
+    (setq lsp-rust-analyzer--last-runnable runnable)))
+
+(defun lsp-rust-analyzer-debug (runnable)
+  "Select and debug a RUNNABLE action."
+  (interactive (list (lsp-rust-analyzer--select-runnable)))
+  (unless (or (featurep 'dap-cpptools) (featurep 'dap-gdb))
+    (user-error "You must require `dap-cpptools' or 'dap-gdb'"))
+  (-let (((&rust-analyzer:Runnable
+           :args (&rust-analyzer:RunnableArgs :cargo-args :workspace-root? :executable-args)
+           :label) runnable))
+    (pcase (aref cargo-args 0)
+      ("run" (aset cargo-args 0 "build"))
+      ("test" (unless (-contains? (append cargo-args ()) "--no-run")
+                (cl-callf append cargo-args (list "--no-run")))))
+    (->> (append (list (executable-find "cargo"))
+                 cargo-args
+                 (list "--message-format=json"))
+         (s-join " ")
+         (shell-command-to-string)
+         (s-lines)
+         (-keep (lambda (s)
+                  (condition-case nil
+                      (-let* ((json-object-type 'plist)
+                              ((msg &as &plist :reason :executable) (json-read-from-string s)))
+                        (when (and executable (string= "compiler-artifact" reason))
+                          executable))
+                    (error))))
+         (funcall
+          (lambda (artifact-spec)
+            (pcase artifact-spec
+              (`() (user-error "No compilation artifacts or obtaining the runnable artifacts failed"))
+              (`(,spec) spec)
+              (_ (user-error "Multiple compilation artifacts are not supported")))))
+         (list :type (if (featurep 'dap-gdb) "gdb" "cppdbg")
+               :request "launch"
+               :name label
+               :args executable-args
+               :cwd workspace-root?
+               :sourceLanguages ["rust"]
+               :program)
+         (append lsp-rust-analyzer-debug-lens-extra-dap-args)
+         (dap-debug))))
+
+(defun lsp-rust-analyzer-rerun (&optional runnable)
+  (interactive (list (or lsp-rust-analyzer--last-runnable
+                         (lsp-rust-analyzer--select-runnable))))
+  (lsp-rust-analyzer-run (or runnable lsp-rust-analyzer--last-runnable)))
+
+;; goto parent module
+(cl-defun lsp-rust-find-parent-module (&key display-action)
+  "Find parent module of current module."
+  (interactive)
+  (lsp-find-locations "experimental/parentModule" nil :display-action display-action))
+
+(defun lsp-rust-analyzer-open-cargo-toml (&optional new-window)
+  "Open the closest Cargo.toml from the current file.
+
+Rust-Analyzer LSP protocol documented here and added in November 2020
+https://github.com/rust-lang/rust-analyzer/blob/master/docs/dev/lsp-extensions.md#open-cargotoml
+
+If NEW-WINDOW (interactively the prefix argument) is non-nil,
+open in a new window."
+  (interactive "P")
+  (-if-let (workspace (lsp-find-workspace 'rust-analyzer (buffer-file-name)))
+      (-if-let* ((response (with-lsp-workspace workspace
+                             (lsp-send-request (lsp-make-request
+                                                "experimental/openCargoToml"
+                                                (lsp-make-rust-analyzer-open-cargo-toml-params
+                                                 :text-document (lsp--text-document-identifier))))))
+                 ((&Location :uri :range) response))
+          (funcall (if new-window #'find-file-other-window #'find-file)
+                   (lsp--uri-to-path uri))
+        (lsp--warn "Couldn't find a Cargo.toml file or your version of rust-analyzer doesn't support this extension"))
+    (lsp--error "OpenCargoToml is an extension available only with rust-analyzer")))
+
+(defun lsp-rust-analyzer-open-external-docs ()
+  "Open a URL for documentation related to the current TextDocumentPosition.
+
+Rust-Analyzer LSP protocol documented here
+https://github.com/rust-lang/rust-analyzer/blob/master/docs/dev/lsp-extensions.md#open-external-documentation"
+  (interactive)
+  (-if-let* ((params (lsp-make-rust-analyzer-open-external-docs-params
+                      :text-document (lsp--text-document-identifier)
+                      :position (lsp--cur-position)))
+             (url (lsp-request "experimental/externalDocs" params)))
+      (browse-url url)
+    (lsp--warn "Couldn't find documentation URL or your version of rust-analyzer doesn't support this extension")))
+
+(defun lsp-rust-analyzer--related-tests ()
+  "Get runnable test items related to the current TextDocumentPosition.
+Calls a rust-analyzer LSP extension endpoint that returns a wrapper over
+Runnable[]."
+  (lsp-send-request (lsp-make-request
+                     "rust-analyzer/relatedTests"
+                     (lsp--text-document-position-params))))
+
+(defun lsp-rust-analyzer--select-related-test ()
+  "Call the endpoint and ask for user selection.
+
+Cannot reuse `lsp-rust-analyzer--select-runnable' because the runnables endpoint
+responds with Runnable[], while relatedTests responds with TestInfo[],
+which is a wrapper over runnable. Also, this method doesn't set
+the `lsp-rust-analyzer--last-runnable' variable."
+  (-if-let* ((resp (lsp-rust-analyzer--related-tests))
+             (runnables (seq-map
+                         #'lsp:rust-analyzer-related-tests-runnable
+                         resp)))
+      (lsp--completing-read
+       "Select test: "
+       runnables
+       #'lsp:rust-analyzer-runnable-label)))
+
+(defun lsp-rust-analyzer-related-tests (runnable)
+  "Execute a RUNNABLE test related to the current document position.
+
+Rust-Analyzer LSP protocol extension
+https://github.com/rust-lang/rust-analyzer/blob/master/docs/dev/lsp-extensions.md#related-tests"
+  (interactive (list (lsp-rust-analyzer--select-related-test)))
+  (if runnable
+      (lsp-rust-analyzer--common-runner runnable)
+    (lsp--info "There are no tests related to the symbol at point")))
+
+(defun lsp-rust-analyzer-move-item (direction)
+  "Move item under cursor or selection in some DIRECTION"
+  (let* ((params (lsp-make-rust-analyzer-move-item-params
+                  :text-document (lsp--text-document-identifier)
+                  :range (if (use-region-p)
+                             (lsp--region-to-range (region-beginning) (region-end))
+                           (lsp--region-to-range (point) (point)))
+                  :direction direction))
+         (edits (lsp-request "experimental/moveItem" params)))
+    (lsp--apply-text-edits edits 'code-action)))
+
+(defun lsp-rust-analyzer-move-item-up ()
+  "Move item under cursor or selection up"
+  (interactive)
+  (lsp-rust-analyzer-move-item "Up"))
+
+(defun lsp-rust-analyzer-move-item-down ()
+  "Move item under cursor or selection down"
+  (interactive)
+  (lsp-rust-analyzer-move-item "Down"))
+
+(defun lsp-rust-analyzer--make-init-options ()
+  "Init options for rust-analyzer"
+  `(:diagnostics
+    ( :enable ,(lsp-json-bool lsp-rust-analyzer-diagnostics-enable)
+      :enableExperimental ,(lsp-json-bool lsp-rust-analyzer-diagnostics-enable-experimental)
+      :disabled ,lsp-rust-analyzer-diagnostics-disabled
+      :warningsAsHint ,lsp-rust-analyzer-diagnostics-warnings-as-hint
+      :warningsAsInfo ,lsp-rust-analyzer-diagnostics-warnings-as-info)
+    :imports ( :granularity ( :enforce ,(lsp-json-bool lsp-rust-analyzer-import-enforce-granularity)
+                              :group ,lsp-rust-analyzer-import-granularity)
+               :group ,(lsp-json-bool lsp-rust-analyzer-import-group)
+               :merge (:glob ,(lsp-json-bool lsp-rust-analyzer-imports-merge-glob))
+               :prefix ,lsp-rust-analyzer-import-prefix)
+    :lruCapacity ,lsp-rust-analyzer-lru-capacity
+    ;; This `checkOnSave` is called `check` in the `rust-analyzer` docs, not
+    ;; `checkOnSave`, but the `rust-analyzer` source code shows that both names
+    ;; work. The `checkOnSave` name has been supported by `rust-analyzer` for a
+    ;; long time, whereas the `check` name was introduced here in 2023:
+    ;; https://github.com/rust-lang/rust-analyzer/commit/d2bb62b6a81d26f1e41712e04d4ac760f860d3b3
+    :checkOnSave ( :enable ,(lsp-json-bool lsp-rust-analyzer-cargo-watch-enable)
+                   :command ,lsp-rust-analyzer-cargo-watch-command
+                   :extraArgs ,lsp-rust-analyzer-cargo-watch-args
+                   :allTargets ,(lsp-json-bool lsp-rust-analyzer-check-all-targets)
+                   ;; We need to distinguish between setting this to the empty
+                   ;; vector, and not setting it at all, which `rust-analyzer`
+                   ;; interprets as "inherit from
+                   ;; `rust-analyzer.cargo.features`". We use `nil` to mean
+                   ;; "unset".
+                   ,@(when (vectorp lsp-rust-analyzer-checkonsave-features)
+                       `(:features ,lsp-rust-analyzer-checkonsave-features))
+                   :overrideCommand ,lsp-rust-analyzer-cargo-override-command
+                   :invocationLocation ,lsp-rust-analyzer-check-invocation-location
+                   :invocationStrategy ,lsp-rust-analyzer-check-invocation-strategy)
+    :highlightRelated ( :breakPoints (:enable ,(lsp-json-bool lsp-rust-analyzer-highlight-breakpoints))
+                        :closureCaptures (:enable ,(lsp-json-bool lsp-rust-analyzer-highlight-closure-captures))
+                        :exitPoints (:enable ,(lsp-json-bool lsp-rust-analyzer-highlight-exit-points))
+                        :references (:enable ,(lsp-json-bool lsp-rust-analyzer-highlight-references))
+                        :yieldPoints (:enable ,(lsp-json-bool lsp-rust-analyzer-highlight-yield-points)))
+    :files ( :exclude ,lsp-rust-analyzer-exclude-globs
+             :watcher ,(if lsp-rust-analyzer-use-client-watching "client" "notify")
+             :excludeDirs ,lsp-rust-analyzer-exclude-dirs)
+    :cfg ( :setTest ,(lsp-json-bool lsp-rust-analyzer-cfg-set-test) )
+    :cargo ( :allFeatures ,(lsp-json-bool lsp-rust-all-features)
+             :noDefaultFeatures ,(lsp-json-bool lsp-rust-no-default-features)
+             :features ,lsp-rust-features
+             :cfgs ,lsp-rust-analyzer-cargo-cfgs
+             :extraArgs ,lsp-rust-analyzer-cargo-extra-args
+             :extraEnv ,lsp-rust-analyzer-cargo-extra-env
+             :target ,lsp-rust-analyzer-cargo-target
+             :targetDir ,lsp-rust-analyzer-cargo-target-dir
+             :runBuildScripts ,(lsp-json-bool lsp-rust-analyzer-cargo-run-build-scripts)
+             ;; Obsolete, but used by old Rust-Analyzer versions
+             :loadOutDirsFromCheck ,(lsp-json-bool lsp-rust-analyzer-cargo-run-build-scripts)
+             :autoreload ,(lsp-json-bool lsp-rust-analyzer-cargo-auto-reload)
+             :useRustcWrapperForBuildScripts ,(lsp-json-bool lsp-rust-analyzer-use-rustc-wrapper-for-build-scripts)
+             :unsetTest ,lsp-rust-analyzer-cargo-unset-test
+             :sysrootSrc ,lsp-rust-analyzer-cargo-sysroot-src
+             :buildScripts (:enable ,(lsp-json-bool lsp-rust-analyzer-cargo-run-build-scripts)
+                            :overrideCommand ,lsp-rust-analyzer-cargo-build-scripts-override-command
+                            :invocationLocation ,lsp-rust-analyzer-cargo-build-scripts-invocation-location
+                            :invocationStrategy ,lsp-rust-analyzer-cargo-build-scripts-invocation-strategy))
+    :rustfmt ( :extraArgs ,lsp-rust-analyzer-rustfmt-extra-args
+               :overrideCommand ,lsp-rust-analyzer-rustfmt-override-command
+               :rangeFormatting (:enable ,(lsp-json-bool lsp-rust-analyzer-rustfmt-rangeformatting-enable)))
+    :lens ( :debug (:enable ,(lsp-json-bool lsp-rust-analyzer-lens-debug-enable))
+            :enable ,(lsp-json-bool lsp-rust-analyzer-lens-enable)
+            ;; :forceCustomCommands ,(lsp-json-bool lsp-rust-analyzer-lens-force-custom-commands)
+            :implementations (:enable ,(lsp-json-bool lsp-rust-analyzer-lens-implementations-enable))
+            ;; :location ,lsp-rust-analyzer-lens-location
+            :references ( :adt (:enable ,(lsp-json-bool lsp-rust-analyzer-lens-references-adt-enable))
+                          :enumVariant (:enable ,(lsp-json-bool lsp-rust-analyzer-lens-references-enum-variant-enable))
+                          :method (:enable ,(lsp-json-bool lsp-rust-analyzer-lens-references-method-enable))
+                          :trait (:enable ,(lsp-json-bool lsp-rust-analyzer-lens-references-trait-enable)))
+            :run (:enable ,(lsp-json-bool lsp-rust-analyzer-lens-run-enable)))
+
+    :inlayHints ( :bindingModeHints (:enable ,(lsp-json-bool lsp-rust-analyzer-binding-mode-hints))
+                  :chainingHints (:enable ,(lsp-json-bool lsp-rust-analyzer-display-chaining-hints))
+                  :closingBraceHints ( :enable ,(lsp-json-bool lsp-rust-analyzer-closing-brace-hints)
+                                       :minLines ,lsp-rust-analyzer-closing-brace-hints-min-lines)
+                  :closureCaptureHints (:enable ,(lsp-json-bool lsp-rust-analyzer-closure-capture-hints))
+                  :closureReturnTypeHints (:enable ,lsp-rust-analyzer-closure-return-type-hints)
+                  :closureStyle ,lsp-rust-analyzer-closure-style
+                  :discriminantHints (:enable ,lsp-rust-analyzer-discriminants-hints)
+
+                  :expressionAdjustmentHints ( :enable ,lsp-rust-analyzer-expression-adjustment-hints
+                                               :hideOutsideUnsafe ,(lsp-json-bool lsp-rust-analyzer-expression-adjustment-hide-unsafe)
+                                               :mode ,lsp-rust-analyzer-expression-adjustment-hints-mode)
+                  :implicitDrops (:enable ,(lsp-json-bool lsp-rust-analyzer-implicit-drops))
+                  :lifetimeElisionHints ( :enable ,lsp-rust-analyzer-display-lifetime-elision-hints-enable
+                                          :useParameterNames ,(lsp-json-bool lsp-rust-analyzer-display-lifetime-elision-hints-use-parameter-names))
+                  :maxLength ,lsp-rust-analyzer-max-inlay-hint-length
+                  :parameterHints (:enable ,(lsp-json-bool lsp-rust-analyzer-display-parameter-hints))
+                  :reborrowHints (:enable ,lsp-rust-analyzer-display-reborrow-hints)
+                  :renderColons ,(lsp-json-bool lsp-rust-analyzer-server-format-inlay-hints)
+                  :typeHints ( :enable ,(lsp-json-bool lsp-inlay-hint-enable)
+                               :hideClosureInitialization ,(lsp-json-bool lsp-rust-analyzer-hide-closure-initialization)
+                               :hideNamedConstructor ,(lsp-json-bool lsp-rust-analyzer-hide-named-constructor)))
+    :assist ( :preferSelf ,(lsp-json-bool lsp-rust-analyzer-assist-prefer-self))
+    :completion ( :addCallParenthesis ,(lsp-json-bool lsp-rust-analyzer-completion-add-call-parenthesis)
+                  :addCallArgumentSnippets ,(lsp-json-bool lsp-rust-analyzer-completion-add-call-argument-snippets)
+                  :postfix (:enable ,(lsp-json-bool lsp-rust-analyzer-completion-postfix-enable))
+                  :autoimport (:enable ,(lsp-json-bool lsp-rust-analyzer-completion-auto-import-enable))
+                  :autoself (:enable ,(lsp-json-bool lsp-rust-analyzer-completion-auto-self-enable))
+                  :termSearch (:enable ,(lsp-json-bool lsp-rust-analyzer-completion-term-search-enable)))
+    :callInfo (:full ,(lsp-json-bool lsp-rust-analyzer-call-info-full))
+    :procMacro (:enable ,(lsp-json-bool lsp-rust-analyzer-proc-macro-enable)
+                :server ,lsp-rust-analyzer-proc-macro-server)
+    :rustcSource ,lsp-rust-analyzer-rustc-source
+    :linkedProjects ,lsp-rust-analyzer-linked-projects
+    :highlighting (:strings ,(lsp-json-bool lsp-rust-analyzer-highlighting-strings))
+    :experimental (:procAttrMacros ,(lsp-json-bool lsp-rust-analyzer-experimental-proc-attr-macros))))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda ()
+                     `(,(or (executable-find
+                             (cl-first lsp-rust-analyzer-server-command)
+                             t)
+                            (lsp-package-path 'rust-analyzer)
+                            "rust-analyzer")
+                       ,@(cl-rest lsp-rust-analyzer-server-command)))
+                   (lambda () t))
+  :activation-fn (lsp-activate-on "rust")
+  :priority (if (eq lsp-rust-server 'rust-analyzer) 1 -1)
+  :initialization-options 'lsp-rust-analyzer--make-init-options
+  :notification-handlers (ht<-alist lsp-rust-notification-handlers)
+  :action-handlers (ht ("rust-analyzer.runSingle" #'lsp-rust--analyzer-run-single)
+                       ("rust-analyzer.debugSingle" #'lsp-rust--analyzer-debug-lens)
+                       ("rust-analyzer.showReferences" #'lsp-rust--analyzer-show-references)
+                       ("rust-analyzer.triggerParameterHints" #'lsp--action-trigger-parameter-hints))
+  :library-folders-fn (lambda (_workspace) lsp-rust-analyzer-library-directories)
+  :semantic-tokens-faces-overrides `( :discard-default-modifiers t
+                                      :modifiers ,(lsp-rust-analyzer--semantic-modifiers))
+  :server-id 'rust-analyzer
+  :custom-capabilities `((experimental .
+                                       ((snippetTextEdit . ,(and lsp-enable-snippet (fboundp 'yas-minor-mode)))
+                                        (commands . ((commands .
+                                                               [
+                                                                "rust-analyzer.runSingle"
+                                                                "rust-analyzer.debugSingle"
+                                                                "rust-analyzer.showReferences"
+                                                                ;; "rust-analyzer.gotoLocation"
+                                                                "rust-analyzer.triggerParameterHints"
+                                                                ;; "rust-analyzer.rename"
+                                                                ]))))))
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'rust-analyzer callback error-callback))))
+
+(cl-defmethod lsp-clients-extract-signature-on-hover (contents (_server-id (eql rust-analyzer)))
+  "Extract first non-comment line from rust-analyzer's hover CONTENTS.
+The first line of the hover contents is usually about memory layout or notable
+traits starting with //, with the actual signature follows."
+  (let* ((lines (s-lines (s-trim (lsp--render-element contents))))
+         (non-comment-lines (--filter (not (s-prefix? "//" it)) lines)))
+    (if non-comment-lines
+        (car non-comment-lines)
+      (car lines))))
+
+(lsp-consistency-check lsp-rust)
+
+(provide 'lsp-rust)
+;;; lsp-rust.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-semantic-tokens.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-semantic-tokens.el
new file mode 100644
index 0000000..ae077ea
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-semantic-tokens.el
@@ -0,0 +1,896 @@
+;;; lsp-semantic-tokens.el --- Semantic tokens -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2020 emacs-lsp maintainers
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;;  Semantic tokens
+;;  https://microsoft.github.io/language-server-protocol/specifications/specification-current/#textDocument_semanticTokens
+;;
+;;; Code:
+
+(require 'lsp-mode)
+(require 'dash)
+
+(defgroup lsp-semantic-tokens nil
+  "LSP support for semantic-tokens."
+  :prefix "lsp-semantic-tokens-"
+  :group 'lsp-mode
+  :tag "LSP Semantic tokens")
+
+(define-obsolete-variable-alias 'lsp-semantic-highlighting-warn-on-missing-face 'lsp-semantic-tokens-warn-on-missing-face "lsp-mode 8.0.0")
+
+(defcustom lsp-semantic-tokens-warn-on-missing-face nil
+  "Warning on missing face for token type/modifier.
+When non-nil, this option will emit a warning any time a token
+or modifier type returned by a language server has no face associated with it."
+  :group 'lsp-semantic-tokens
+  :type 'boolean)
+
+(defcustom lsp-semantic-tokens-apply-modifiers t
+  "Whether semantic tokens should take token modifiers into account."
+  :group 'lsp-semantic-tokens
+  :type 'boolean)
+
+(defcustom lsp-semantic-tokens-allow-ranged-requests t
+  "Whether to use ranged semantic token requests when available.
+
+Note that even when this is set to t, delta requests will
+be preferred whenever possible, unless
+`lsp-semantic-tokens-allow-delta-requests' is false."
+  :group 'lsp-semantic-tokens
+  :type 'boolean)
+
+(defcustom lsp-semantic-tokens-allow-delta-requests t
+  "Whether to use semantic token delta requests when available.
+
+When supported by the language server, delta requests are always
+preferred over both full and ranged token requests."
+  :group 'lsp-semantic-tokens
+  :type 'boolean)
+
+(defcustom lsp-semantic-tokens-honor-refresh-requests nil
+  "Whether to honor semanticTokens/refresh requests.
+
+When set to nil, refresh requests will be silently discarded.
+When set to t, semantic tokens will be re-requested for all buffers
+associated with the requesting language server."
+  :group 'lsp-semantic-tokens
+  :type 'boolean)
+
+(defcustom lsp-semantic-tokens-enable-multiline-token-support t
+  "When set to nil, tokens will be truncated after end-of-line."
+  :group 'lsp-semantic-tokens
+  :type 'boolean)
+
+(defface lsp-face-semhl-constant
+  '((t :inherit font-lock-constant-face))
+  "Face used for semantic highlighting scopes matching constant scopes."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-variable
+  '((t :inherit font-lock-variable-name-face))
+  "Face used for semantic highlighting scopes matching variable.*.
+Unless overridden by a more specific face association."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-function
+  '((t :inherit font-lock-function-name-face))
+  "Face used for semantic highlighting scopes matching entity.name.function.*.
+Unless overridden by a more specific face association."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-method
+  '((t :inherit lsp-face-semhl-function))
+  "Face used for semantic highlighting scopes matching entity.name.method.*.
+Unless overridden by a more specific face association."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-namespace
+  '((t :inherit lsp-face-semhl-type :weight bold))
+  "Face used for semantic highlighting scopes matching entity.name.namespace.*.
+Unless overridden by a more specific face association."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-comment
+  '((t (:inherit font-lock-comment-face)))
+  "Face used for comments."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-keyword
+  '((t (:inherit font-lock-keyword-face)))
+  "Face used for keywords."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-string
+  '((t (:inherit font-lock-string-face)))
+  "Face used for strings."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-number
+  '((t (:inherit lsp-face-semhl-constant)))
+  "Face used for numbers."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-regexp
+  '((t (:inherit lsp-face-semhl-string :slant italic)))
+  "Face used for regexps."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-operator
+  '((t (:inherit font-lock-function-name-face)))
+  "Face used for operators."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-type
+  '((t (:inherit font-lock-type-face)))
+  "Face used for types."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-struct
+  '((t (:inherit lsp-face-semhl-type)))
+  "Face used for structs."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-class
+  '((t (:inherit lsp-face-semhl-type)))
+  "Face used for classes."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-interface
+  '((t (:inherit lsp-face-semhl-type)))
+  "Face used for interfaces."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-enum
+  '((t (:inherit lsp-face-semhl-type)))
+  "Face used for enums."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-type-parameter
+  '((t (:inherit lsp-face-semhl-type)))
+  "Face used for type parameters."
+  :group 'lsp-semantic-tokens)
+
+;; function face already defined, move here when support
+;; for theia highlighting gets removed
+(defface lsp-face-semhl-member
+  '((t (:inherit font-lock-variable-name-face)))
+  "Face used for members."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-property
+  '((t (:inherit lsp-face-semhl-variable)))
+  "Face used for properties."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-event
+  '((t (:inherit lsp-face-semhl-variable)))
+  "Face used for event properties."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-macro
+  '((t (:inherit font-lock-preprocessor-face)))
+  "Face used for macros."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-parameter
+  '((t (:inherit lsp-face-semhl-variable)))
+  "Face used for parameters."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-label
+  '((t (:inherit font-lock-comment-face)))
+  "Face used for labels.
+
+Obsolete: no longer referenced by the default `lsp-semantic-token-faces'
+alist since 10.0.1 (the LSP 3.17 spec has no `label' token type). Kept
+for backward compatibility with user `set-face-attribute' calls and
+with clients that still register `label' through
+`:semantic-tokens-faces-overrides'. May be removed in a future release."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-enum-member
+  '((t :inherit lsp-face-semhl-constant))
+  "Face used for enum members/variants (LSP `enumMember')."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-modifier
+  '((t :inherit lsp-face-semhl-keyword))
+  "Face used for modifiers (LSP `modifier', e.g. public/private/static)."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-decorator
+  '((t :inherit lsp-face-semhl-macro))
+  "Face used for decorators (LSP `decorator', since 3.17).
+Examples: Python `@decorator', Java annotations."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-deprecated
+  '((t :strike-through t))
+  "Face used for semantic highlighting scopes matching constant scopes."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-definition
+  '((t :inherit font-lock-function-name-face :weight bold))
+  "Face used for definition modifier."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-implementation
+  '((t :inherit font-lock-function-name-face :weight bold))
+  "Face used for implementation modifier."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-default-library
+  '((t :inherit font-lock-builtin-face))
+  "Face used for defaultLibrary modifier."
+  :group 'lsp-semantic-tokens)
+
+(defface lsp-face-semhl-static
+  '((t :inherit font-lock-keyword-face))
+  "Face used for static modifier."
+  :group 'lsp-semantic-tokens)
+
+(defvar-local lsp-semantic-token-faces
+  '(("comment" . lsp-face-semhl-comment)
+    ("keyword" . lsp-face-semhl-keyword)
+    ("string" . lsp-face-semhl-string)
+    ("number" . lsp-face-semhl-number)
+    ("regexp" . lsp-face-semhl-regexp)
+    ("operator" . lsp-face-semhl-operator)
+    ("namespace" . lsp-face-semhl-namespace)
+    ("type" . lsp-face-semhl-type)
+    ("struct" . lsp-face-semhl-struct)
+    ("class" . lsp-face-semhl-class)
+    ("interface" . lsp-face-semhl-interface)
+    ("enum" . lsp-face-semhl-enum)
+    ("typeParameter" . lsp-face-semhl-type-parameter)
+    ("function" . lsp-face-semhl-function)
+    ("method" . lsp-face-semhl-method)
+    ("property" . lsp-face-semhl-property)
+    ("event" . lsp-face-semhl-event)
+    ("macro" . lsp-face-semhl-macro)
+    ("variable" . lsp-face-semhl-variable)
+    ("parameter" . lsp-face-semhl-parameter)
+    ("enumMember" . lsp-face-semhl-enum-member)
+    ("modifier" . lsp-face-semhl-modifier)
+    ("decorator" . lsp-face-semhl-decorator))
+  "Faces to use for LSP 3.17 semantic token types.
+Servers that emit non-spec token types (e.g. clangd's `dependent' and
+`concept', or tree-sitter-backed servers emitting `member' / `label')
+should register them through `:semantic-tokens-faces-overrides' on
+their `lsp-client' rather than relying on entries in this default alist.
+See URL `https://microsoft.github.io/language-server-protocol/specifications/lsp/3.17/specification/#semanticTokenTypes'.")
+
+(defvar-local lsp-semantic-token-modifier-faces
+  '(("declaration" . lsp-face-semhl-interface)
+    ("definition" . lsp-face-semhl-definition)
+    ("implementation" . lsp-face-semhl-implementation)
+    ("readonly" . lsp-face-semhl-constant)
+    ("static" . lsp-face-semhl-static)
+    ("deprecated" . lsp-face-semhl-deprecated)
+    ("abstract" . lsp-face-semhl-keyword)
+    ("async" . lsp-face-semhl-macro)
+    ("modification" . lsp-face-semhl-operator)
+    ("documentation" . lsp-face-semhl-comment)
+    ("defaultLibrary" . lsp-face-semhl-default-library))
+  "Semantic tokens modifier faces.
+Faces to use for semantic token modifiers if
+`lsp-semantic-tokens-apply-modifiers' is non-nil.")
+
+(defconst lsp--semantic-tokens-font-lock-keywords
+  '((lsp--semantic-tokens-fontify)))
+
+(defun lsp--semantic-tokens-capabilities ()
+  `((semanticTokens
+     . ((dynamicRegistration . t)
+        (requests . ((range . t) (full . t)))
+        (tokenModifiers . ,(if lsp-semantic-tokens-apply-modifiers
+                               (apply 'vector (mapcar #'car (lsp-semantic-tokens--modifier-faces-for (lsp--workspace-client lsp--cur-workspace))))
+                             []))
+        (overlappingTokenSupport . t)
+        (multilineTokenSupport . ,(if lsp-semantic-tokens-enable-multiline-token-support t json-false))
+        (tokenTypes . ,(apply 'vector (mapcar #'car (lsp-semantic-tokens--type-faces-for (lsp--workspace-client lsp--cur-workspace)))))
+        (formats . ["relative"])))))
+
+(defvar lsp--semantic-tokens-pending-full-token-requests '()
+  "Buffers which should have their semantic tokens refreshed on idle.
+
+This is an alist of the form ((buffer_i . fontify_immediately_i) ...); entries
+with fontify_immediately set to t will immediately refontify once their
+token request is answered.")
+
+;; NOTE: doesn't keep track of outstanding requests, so might still produce large latency outliers
+;; if the language server doesn't process all outstanding token requests within one lsp-idle-delay
+(defcustom lsp-semantic-tokens-max-concurrent-idle-requests 1
+  "Maximum number of on-idle token requests to be dispatched simultaneously."
+  :group 'lsp-semantic-tokens
+  :type 'integer)
+
+(defvar lsp--semantic-tokens-idle-timer nil)
+
+(defun lsp--semantic-tokens-process-pending-requests ()
+  (let ((fuel lsp-semantic-tokens-max-concurrent-idle-requests))
+    (while (and lsp--semantic-tokens-pending-full-token-requests (> fuel 0))
+      (-let (((buffer . fontify-immediately) (pop lsp--semantic-tokens-pending-full-token-requests)))
+        (when (buffer-live-p buffer)
+          (setq fuel (1- fuel))
+          (with-current-buffer buffer
+            (lsp--semantic-tokens-request nil fontify-immediately))))))
+  (unless lsp--semantic-tokens-pending-full-token-requests
+    (cancel-timer lsp--semantic-tokens-idle-timer)
+    (setq lsp--semantic-tokens-idle-timer nil)))
+
+(defun lsp--semantic-tokens-sort-pending-requests (pending-requests)
+  ;; service currently visible buffers first, otherwise prefer immediate-fontification requests
+  (-sort (lambda (entry-a entry-b)
+           (let ((a-hidden (eq nil (get-buffer-window (car entry-a))))
+                 (b-hidden (eq nil (get-buffer-window (car entry-b)))))
+             (cond ((and b-hidden (not a-hidden)) t)   ; sort a before b
+                   ((and a-hidden (not b-hidden)) nil) ; sort b before a
+                   ((and (not (cdr entry-a)) (cdr entry-b)) nil) ; otherwise sort b before a only if b is immediate and a is not
+                   (t t))))
+         (--filter (buffer-live-p (car it)) pending-requests)))
+
+(defun lsp--semantic-tokens-request-full-token-set-when-idle (buffer fontify-immediately)
+  "Request full token set after an idle timeout of `lsp-idle-delay'.
+
+If FONTIFY-IMMEDIATELY is non-nil, fontification will be performed immediately
+ once the corresponding response is received."
+  (let ((do-fontify-immediately (or fontify-immediately
+                                    (cdr (assoc buffer lsp--semantic-tokens-pending-full-token-requests)))))
+    (setq lsp--semantic-tokens-pending-full-token-requests
+          (lsp--semantic-tokens-sort-pending-requests
+           (cons (cons buffer do-fontify-immediately)
+                 (--remove (eq buffer (car it)) lsp--semantic-tokens-pending-full-token-requests)))))
+  (unless lsp--semantic-tokens-idle-timer
+    (setq lsp--semantic-tokens-idle-timer
+          (run-with-idle-timer lsp-idle-delay t #'lsp--semantic-tokens-process-pending-requests))))
+
+(defun lsp--semantic-tokens-refresh-if-enabled (buffer)
+  (when (buffer-local-value 'lsp-semantic-tokens-mode buffer)
+    (lsp--semantic-tokens-request-full-token-set-when-idle buffer t)))
+
+(defvar-local lsp--semantic-tokens-cache nil
+  "Previously returned token set.
+
+When non-nil, `lsp--semantic-tokens-cache' should adhere to the
+following lsp-interface:
+`(_SemanticTokensCache
+  (:_documentVersion)
+  (:response :_region))'.")
+
+(defsubst lsp--semantic-tokens-putcache (k v)
+  "Set key K of `lsp--semantic-tokens-cache' to V."
+  (setq lsp--semantic-tokens-cache
+        (plist-put lsp--semantic-tokens-cache k v)))
+
+(defvar-local lsp--semantic-tokens-teardown nil)
+
+(defun lsp--semantic-tokens-ingest-range-response (response)
+  "Handle RESPONSE to semanticTokens/range request."
+  (lsp--semantic-tokens-putcache :response response)
+  (cl-assert (plist-get lsp--semantic-tokens-cache :_region))
+  (lsp--semantic-tokens-request-full-token-set-when-idle (current-buffer) nil))
+
+(defun lsp--semantic-tokens-ingest-full-response (response)
+  "Handle RESPONSE to semanticTokens/full request."
+  (lsp--semantic-tokens-putcache :response response)
+  (cl-assert (not (plist-get lsp--semantic-tokens-cache :_region))))
+
+(defsubst lsp--semantic-tokens-apply-delta-edits (old-data edits)
+  "Apply EDITS obtained from full/delta request to OLD-DATA."
+  (let* ((old-token-count (length old-data))
+         (old-token-index 0)
+         (substrings))
+    (cl-loop
+     for edit across edits
+     do
+     (when (< old-token-index (lsp-get edit :start))
+       (push (substring old-data old-token-index (lsp-get edit :start)) substrings))
+     (push (lsp-get edit :data) substrings)
+     (setq old-token-index (+ (lsp-get edit :start) (lsp-get edit :deleteCount)))
+     finally do (push (substring old-data old-token-index old-token-count) substrings))
+    (apply #'vconcat (nreverse substrings))))
+
+(defun lsp--semantic-tokens-ingest-full/delta-response (response)
+  "Handle RESPONSE to semanticTokens/full/delta request."
+  (if (lsp-get response :edits)
+      (let ((old-data (--> lsp--semantic-tokens-cache (plist-get it :response) (lsp-get it :data))))
+        (cl-assert (not (plist-get lsp--semantic-tokens-cache :_region)))
+        (when old-data
+          (lsp--semantic-tokens-putcache
+           :response (lsp-put response
+                              :data (lsp--semantic-tokens-apply-delta-edits
+                                     old-data (lsp-get response :edits))))))
+    ;; server decided to send full response instead
+    (lsp--semantic-tokens-ingest-full-response response)))
+
+
+(defun lsp--semantic-tokens-request (region fontify-immediately)
+  "Send semantic tokens request to the language server.
+
+A full/delta request will be sent if delta requests are supported by
+the language server, allowed via `lsp-semantic-tokens-allow-delta-requests',
+and if a full set of tokens had previously been received.
+Otherwise, a ranged request will be dispatched if REGION is non-nil,
+ranged requests are supported by the language server, and allowed via
+`lsp-semantic-tokens-allow-delta-requests'. In all other cases, a full
+tokens request will be dispatched.
+
+If FONTIFY-IMMEDIATELY is non-nil, fontification will be performed immediately
+ upon receiving the response."
+  (let ((request-type "textDocument/semanticTokens/full")
+        (request `(:textDocument ,(lsp--text-document-identifier)))
+        (response-handler nil)
+        (final-region nil))
+    (cond
+     ((and lsp-semantic-tokens-allow-delta-requests
+           (lsp-feature? "textDocument/semanticTokensFull/Delta")
+           (--> lsp--semantic-tokens-cache
+                (plist-get it :response)
+                (and (lsp-get it :resultId) (lsp-get it :data)
+                     (not (plist-get lsp--semantic-tokens-cache :_region)))))
+      (setq request-type "textDocument/semanticTokens/full/delta")
+      (setq response-handler #'lsp--semantic-tokens-ingest-full/delta-response)
+      (setq request
+            (plist-put request :previousResultId
+                       (lsp-get (plist-get lsp--semantic-tokens-cache :response) :resultId))))
+     ((and lsp-semantic-tokens-allow-ranged-requests region
+           (lsp-feature? "textDocument/semanticTokensRangeProvider"))
+      (setq request-type "textDocument/semanticTokens/range")
+      (setq final-region region)
+      (setq request
+            (plist-put request :range (lsp--region-to-range (car final-region) (cdr final-region))))
+      (setq response-handler #'lsp--semantic-tokens-ingest-range-response))
+     (t (setq response-handler #'lsp--semantic-tokens-ingest-full-response)))
+    (lsp-request-async
+     request-type request
+     (lambda (response)
+       (lsp--semantic-tokens-putcache :_documentVersion lsp--cur-version)
+       (lsp--semantic-tokens-putcache :_region final-region)
+       (funcall response-handler response)
+       (when fontify-immediately (font-lock-flush)))
+     :error-handler ;; buffer is not captured in `error-handler', it is in `callback'
+     (let ((buf (current-buffer)))
+       (lambda (&rest _)
+         (when (buffer-live-p buf)
+           (lsp--semantic-tokens-request-full-token-set-when-idle buf t))))
+     :mode 'tick
+     :cancel-token (format "semantic-tokens-%s" (lsp--buffer-uri)))))
+
+
+;;;###autoload
+(defvar-local semantic-token-modifier-cache (make-hash-table)
+  "A cache of modifier values to the selected fonts.
+This allows whole-bitmap lookup instead of checking each bit. The
+expectation is that usage of modifiers will tend to cluster, so
+we will not have the full range of possible usages, hence a
+tractable hash map.
+
+This is set as buffer-local. It should probably be shared in a
+given workspace/language-server combination.
+
+This cache should be flushed every time any modifier
+configuration changes.")
+
+(defun lsp--semantic-tokens-fontify (end)
+  "Apply semantic tokens from point to END."
+  ;; TODO: support multiple language servers per buffer?
+  (let ((faces (seq-some #'lsp--workspace-semantic-tokens-faces lsp--buffer-workspaces))
+        (modifier-faces
+         (when lsp-semantic-tokens-apply-modifiers
+           (seq-some #'lsp--workspace-semantic-tokens-modifier-faces lsp--buffer-workspaces))))
+    (unless (or (eq nil faces)
+                (eq nil lsp--semantic-tokens-cache)
+                (eq nil (plist-get lsp--semantic-tokens-cache :response))
+                ;; NOTE: perhaps we'd rather have stale highlights than temporarily dropping them altogether?
+                (not (= lsp--cur-version (plist-get lsp--semantic-tokens-cache :_documentVersion))))
+      
+      (-let* ((inhibit-field-text-motion t)
+              (data (lsp-get (plist-get lsp--semantic-tokens-cache :response) :data))
+              (i0 0)
+              (i-max (1- (length data)))
+              (current-line 1)
+              (line-delta)
+              (column 0)
+              (face)
+              (beg)
+              (line-start-pos)
+              (line-min)
+              (text-property-beg)
+              (text-property-end))
+        ;; TODO: do we need to save mark and excursion within function-type font-lock keywords?
+        (save-restriction
+          (widen)
+          (setq line-min (line-number-at-pos))
+          (setq beg (point))
+          (with-silent-modifications
+            (let ((skip-lines (- line-min current-line)))
+              (while (and (<= i0 i-max) (< (aref data i0) skip-lines))
+                (setq skip-lines (- skip-lines (aref data i0)))
+                (setq i0 (+ i0 5)))
+              (setq current-line (- line-min skip-lines)))
+            (forward-line (- current-line line-min))
+            (setq line-start-pos (point))
+            (cl-loop
+             for i from i0 to i-max by 5 do
+             (setq line-delta (aref data i))
+             (unless (= line-delta 0)
+               (forward-line line-delta)
+               (setq line-start-pos (point))
+               (setq column 0)
+               (setq current-line (+ current-line line-delta)))
+             (setq column (+ column (aref data (1+ i))))
+             (setq face (aref faces (aref data (+ i 3))))
+             (setq text-property-beg (+ line-start-pos column))
+             (setq text-property-end
+                   (min (if lsp-semantic-tokens-enable-multiline-token-support
+                            (point-max) (line-end-position))
+                        (+ text-property-beg (aref data (+ i 2)))))
+             (unless (< text-property-beg beg)
+               (when face
+                 (put-text-property text-property-beg text-property-end 'face face))
+               ;; Deal with modifiers. We cache common combinations of
+               ;; modifiers, storing the faces they resolve to.
+               (let* ((modifier-code (aref data (+ i 4)))
+                      (faces-to-apply (gethash modifier-code semantic-token-modifier-cache 'not-found)))
+                 (when (eq 'not-found faces-to-apply)
+                   (setq faces-to-apply nil)
+                   (cl-loop for j from 0 to (1- (length modifier-faces)) do
+                            (when (and (aref modifier-faces j)
+                                       (> (logand modifier-code (ash 1 j)) 0))
+                              (push (aref modifier-faces j) faces-to-apply)))
+                   (puthash modifier-code faces-to-apply semantic-token-modifier-cache))
+                 (dolist (face faces-to-apply)
+                   (add-face-text-property text-property-beg text-property-end face))))
+             when (>= (point) end) return nil)))))))
+
+(defun lsp-semantic-tokens--request-update ()
+  "Request semantic-tokens update."
+  ;; when dispatching ranged requests, we'll over-request by several chunks in both directions,
+  ;; which should minimize those occasions where font-lock region extension extends beyond the
+  ;; region covered by our freshly requested tokens (see lsp-mode issue #3154), while still limiting
+  ;; requests to fairly small regions even if the underlying buffer is large
+  (when (lsp-feature? "textDocument/semanticTokensFull")
+    (lsp--semantic-tokens-request
+     (cons (max (point-min) (- (window-start) (* 5 jit-lock-chunk-size)))
+           (min (point-max) (+ (window-end) (* 5 jit-lock-chunk-size)))) t)))
+
+(defun lsp--semantic-tokens-as-defined-by-workspace (workspace)
+  "Return plist of token-types and token-modifiers defined by WORKSPACE,
+or nil if none are defined."
+  (when-let* ((token-capabilities
+              (or
+               (-some->
+                   (lsp--registered-capability "textDocument/semanticTokens")
+                 (lsp--registered-capability-options))
+               (lsp:server-capabilities-semantic-tokens-provider?
+                (lsp--workspace-server-capabilities workspace)))))
+    (-let* (((&SemanticTokensOptions :legend) token-capabilities))
+      `(:token-types ,(lsp:semantic-tokens-legend-token-types legend)
+        :token-modifiers ,(lsp:semantic-tokens-legend-token-modifiers legend)))))
+
+(defun lsp-semantic-tokens-suggest-overrides ()
+  "Suggest face overrides that best match the faces
+chosen by `font-lock-fontify-region'."
+  (interactive)
+  (-when-let* ((token-info (-some #'lsp--semantic-tokens-as-defined-by-workspace lsp--buffer-workspaces))
+               ((&plist :token-types token-types :token-modifiers token-modifiers) token-info))
+    (let* ((tokens (lsp-request
+                    "textDocument/semanticTokens/full"
+                    `(:textDocument, (lsp--text-document-identifier))))
+           (inhibit-field-text-motion t)
+           (data (lsp-get tokens :data))
+           (associated-faces '())
+           (line-delta)
+           ;; KLUDGE: clear cache so our font-lock advice won't apply semantic-token faces
+           (old-cache lsp--semantic-tokens-cache)
+           (face-or-faces))
+      (setq lsp--semantic-tokens-cache nil)
+      (save-restriction
+        (save-excursion
+          (widen)
+          (font-lock-fontify-region (point-min) (point-max) t)
+          (save-mark-and-excursion
+            (save-restriction
+              (widen)
+              (goto-char (point-min))
+              (cl-loop
+               for i from 0 to (1- (length data)) by 5 do
+               (setq line-delta (aref data i))
+               (unless (= line-delta 0) (forward-line line-delta))
+               (forward-char (aref data (+ i 1)))
+               (setq face-or-faces (get-text-property (point) 'face))
+               ;; TODO: consider modifiers?
+               (when face-or-faces
+                 (--each (if (listp face-or-faces) face-or-faces (list face-or-faces))
+                   (cl-pushnew `(,(aref data (+ i 3)) . ,it) associated-faces :test #'equal))))
+              (setq lsp--semantic-tokens-cache old-cache)
+              (font-lock-flush)))))
+      (switch-to-buffer (get-buffer-create "*Suggested Overrides*"))
+      (insert "(")
+      ;; TODO: sort alternatives by frequency
+      (--each-indexed (-group-by #'car associated-faces)
+        (insert (if (= it-index 0) "(" "\n ("))
+        (insert (format "%s . " (aref token-types (car it))))
+        (--each-indexed (mapcar #'cdr (cdr it))
+          (insert (if (= it-index 0) (format "%s)" (prin1-to-string it))
+                    (format " ; Alternative: %s" (prin1-to-string it))))))
+      (insert ")"))))
+
+(declare-function tree-sitter-hl-mode "ext:tree-sitter-hl")
+
+(with-eval-after-load 'tree-sitter-hl
+  (add-hook
+   'tree-sitter-hl-mode-hook
+   (lambda ()
+     (when (and lsp-mode lsp--semantic-tokens-teardown
+                (boundp 'tree-sitter-hl-mode) tree-sitter-hl-mode)
+       (lsp-warn "It seems you have configured tree-sitter-hl to activate after lsp-mode.
+To prevent tree-sitter-hl from overriding lsp-mode's semantic token highlighting, lsp-mode
+will now disable both semantic highlighting and tree-sitter-hl mode and subsequently re-enable both,
+starting with tree-sitter-hl-mode.
+
+Please adapt your config to prevent unnecessary mode reinitialization in the future.")
+       (tree-sitter-hl-mode -1)
+       (funcall lsp--semantic-tokens-teardown)
+       (setq lsp--semantic-tokens-teardown nil)
+       (tree-sitter-hl-mode t)
+       (lsp--semantic-tokens-initialize-buffer)))))
+
+;;;###autoload
+(defun lsp--semantic-tokens-initialize-buffer ()
+  "Initialize the buffer for semantic tokens.
+IS-RANGE-PROVIDER is non-nil when server supports range requests."
+  (let* ((buffer (current-buffer)))
+    (setq lsp--semantic-tokens-cache nil)
+    (add-hook 'lsp-on-change-hook #'lsp-semantic-tokens--request-update nil t)
+    (lsp-semantic-tokens--request-update)
+    (setq lsp--semantic-tokens-teardown
+          (lambda ()
+            (font-lock-remove-keywords nil lsp--semantic-tokens-font-lock-keywords)
+            (setq lsp--semantic-tokens-pending-full-token-requests
+                  (--remove (eq buffer (car it)) lsp--semantic-tokens-pending-full-token-requests))
+            (setq lsp--semantic-tokens-cache nil)
+            (remove-hook 'lsp-on-change-hook #'lsp-semantic-tokens--request-update t)))
+    (font-lock-add-keywords nil lsp--semantic-tokens-font-lock-keywords)))
+
+(defun lsp--semantic-tokens-build-face-map (identifiers faces category varname)
+  "Build map of FACES for IDENTIFIERS using CATEGORY and VARNAME."
+  (apply 'vector
+         (mapcar (lambda (id)
+                   (let ((maybe-face (cdr (assoc id faces))))
+                     (when (and lsp-semantic-tokens-warn-on-missing-face (not maybe-face))
+                       (lsp-warn "No face has been associated to the %s '%s': consider adding a corresponding definition to %s"
+                                 category id varname)) maybe-face)) identifiers)))
+
+(defun lsp-semantic-tokens--apply-alist-overrides (base overrides discard-defaults)
+  "Merge or replace BASE with OVERRIDES, depending on DISCARD-DEFAULTS.
+For keys present in both alists, the assignments made by
+OVERRIDES will take precedence."
+  (if discard-defaults
+      overrides
+    (let* ((copy-base (copy-alist base)))
+      (mapc (-lambda ((key . value)) (setf (alist-get key copy-base nil nil #'string=) value)) overrides)
+      copy-base)))
+
+(defun lsp-semantic-tokens--type-faces-for (client)
+  "Return the semantic token type faces for CLIENT."
+  (lsp-semantic-tokens--apply-alist-overrides
+   lsp-semantic-token-faces
+   (plist-get (lsp--client-semantic-tokens-faces-overrides client) :types)
+   (plist-get (lsp--client-semantic-tokens-faces-overrides client) :discard-default-types)))
+
+(defun lsp-semantic-tokens--modifier-faces-for (client)
+  "Return the semantic token type faces for CLIENT."
+  (lsp-semantic-tokens--apply-alist-overrides
+   lsp-semantic-token-modifier-faces
+   (plist-get (lsp--client-semantic-tokens-faces-overrides client) :modifiers)
+   (plist-get (lsp--client-semantic-tokens-faces-overrides client) :discard-default-modifiers)))
+
+(defun lsp--semantic-tokens-on-refresh (workspace)
+  "Clear semantic tokens within all buffers of WORKSPACE,
+refresh in currently active buffer."
+  (cl-assert (not (eq nil workspace)))
+  (when lsp-semantic-tokens-honor-refresh-requests
+    (cl-loop
+     for ws-buffer in (lsp--workspace-buffers workspace) do
+     (let ((fontify-immediately (equal (current-buffer) ws-buffer)))
+       (with-current-buffer ws-buffer (lsp--semantic-tokens-request nil fontify-immediately))))))
+
+;;;###autoload
+(defun lsp--semantic-tokens-initialize-workspace (workspace)
+  "Initialize semantic tokens for WORKSPACE."
+  (cl-assert workspace)
+  (-let (((&plist :token-types types :token-modifiers modifiers)
+          (lsp--semantic-tokens-as-defined-by-workspace workspace))
+         (client (lsp--workspace-client workspace)))
+    (setf (lsp--workspace-semantic-tokens-faces workspace)
+          (lsp--semantic-tokens-build-face-map
+           types (lsp-semantic-tokens--type-faces-for client)
+           "semantic token" "lsp-semantic-token-faces"))
+    (setf (lsp--workspace-semantic-tokens-modifier-faces workspace)
+          (lsp--semantic-tokens-build-face-map
+           modifiers (lsp-semantic-tokens--modifier-faces-for client)
+           "semantic token modifier" "lsp-semantic-token-modifier-faces"))))
+
+;;;###autoload
+(defun lsp-semantic-tokens--warn-about-deprecated-setting ()
+  "Warn about deprecated semantic highlighting variable."
+  (when (boundp 'lsp-semantic-highlighting)
+    (pcase lsp-semantic-highlighting
+      (:semantic-tokens
+       (lsp-warn "It seems you wish to use semanticTokens-based
+ highlighting. To do so, please remove any references to the
+ deprecated variable `lsp-semantic-highlighting' from your
+ configuration and set `lsp-semantic-tokens-enable' to `t'
+ instead.")
+       (setq lsp-semantic-tokens-enable t))
+      ((or :immediate :deferred)
+       (lsp-warn "It seems you wish to use Theia-based semantic
+ highlighting. This protocol has been superseded by the
+ semanticTokens protocol specified by LSP v3.16 and is no longer
+ supported by lsp-mode. If your language server provides
+ semanticToken support, please set
+ `lsp-semantic-tokens-enable' to `t' to use it.")))))
+
+;;;###autoload
+(defun lsp-semantic-tokens--enable ()
+  "Enable semantic tokens mode."
+  (when (and lsp-semantic-tokens-enable
+             (lsp-feature? "textDocument/semanticTokensFull"))
+    (lsp-semantic-tokens--warn-about-deprecated-setting)
+    (lsp-semantic-tokens-mode 1)))
+
+(defun lsp-semantic-tokens--disable ()
+  "Disable semantic tokens mode."
+  (lsp-semantic-tokens-mode -1))
+
+;;;###autoload
+(define-minor-mode lsp-semantic-tokens-mode
+  "Toggle semantic-tokens support."
+  :group 'lsp-semantic-tokens
+  :global nil
+  (cond
+   ((and lsp-semantic-tokens-mode (lsp-feature? "textDocument/semanticTokensFull"))
+    (add-hook 'lsp-configure-hook #'lsp-semantic-tokens--enable nil t)
+    (add-hook 'lsp-unconfigure-hook #'lsp-semantic-tokens--disable nil t)
+    (mapc #'lsp--semantic-tokens-initialize-workspace
+          (lsp--find-workspaces-for "textDocument/semanticTokensFull"))
+    (lsp--semantic-tokens-initialize-buffer))
+   (t
+    (remove-hook 'lsp-configure-hook #'lsp-semantic-tokens--enable t)
+    (remove-hook 'lsp-unconfigure-hook #'lsp-semantic-tokens--disable t)
+    (when lsp--semantic-tokens-teardown
+      (funcall lsp--semantic-tokens-teardown))
+    (lsp-semantic-tokens--request-update)
+    (setq lsp--semantic-tokens-cache nil
+          lsp--semantic-tokens-teardown nil))))
+
+;; debugging helpers
+(defun lsp--semantic-tokens-verify ()
+  "Store current token set and compare with the response to a full token request."
+  (interactive)
+  (let ((old-tokens (--> lsp--semantic-tokens-cache (plist-get it :response) (lsp-get it :data)))
+        (old-version (--> lsp--semantic-tokens-cache (plist-get it :_documentVersion))))
+    (if (not (equal lsp--cur-version old-version))
+        (message "Stored documentVersion %d differs from current version %d" old-version lsp--cur-version)
+      (lsp-request-async
+       "textDocument/semanticTokens/full" `(:textDocument ,(lsp--text-document-identifier))
+       (lambda (response)
+         (let ((new-tokens (lsp-get response :data)))
+           (if (equal old-tokens new-tokens)
+               (message "New tokens (total count %d) are identical to previously held token set"
+                        (length new-tokens))
+             (message "Newly returned tokens differ from old token set")
+             (print old-tokens)
+             (print new-tokens))))
+       :mode 'tick
+       :cancel-token (format "semantic-tokens-%s" (lsp--buffer-uri))))))
+
+(defvar-local lsp-semantic-tokens--log '())
+
+(defvar-local lsp-semantic-tokens--prev-response nil)
+
+(defun lsp-semantic-tokens--log-buffer-contents (tag)
+  "Log buffer contents for TAG."
+  (save-restriction
+    (save-excursion
+      (widen) (push `(:tag ,tag
+                      :buffer-contents ,(buffer-substring (point-min) (point-max))
+                      :prev-response ,lsp-semantic-tokens--prev-response)
+                    lsp-semantic-tokens--log))))
+
+(defun lsp-semantic-tokens-enable-log ()
+  "Enable logging of intermediate fontification states.
+
+This is a debugging tool, and may incur significant performance penalties."
+  (setq lsp-semantic-tokens--log '())
+  (defun lsp-advice-tokens-fontify (orig-func old-fontify-region beg-orig end-orig &optional loudly)
+    (lsp-semantic-tokens--log-buffer-contents 'before)
+    (let ((result (funcall orig-func old-fontify-region beg-orig end-orig loudly)))
+      (lsp-semantic-tokens--log-buffer-contents 'after)
+      result))
+  (advice-add 'lsp-semantic-tokens--fontify :around 'lsp-advice-tokens-fontify)
+
+  (defun lsp-log-delta-response (response)
+    (setq lsp-semantic-tokens--prev-response `(:request-type "delta"
+                                               :response ,response
+                                               :version ,lsp--cur-version)))
+  (advice-add 'lsp--semantic-tokens-ingest-full/delta-response :before 'lsp-log-delta-response)
+
+  (defun lsp-log-full-response (response)
+    (setq lsp-semantic-tokens--prev-response `(:request-type "full"
+                                               :response ,response
+                                               :version ,lsp--cur-version)))
+  (advice-add 'lsp--semantic-tokens-ingest-full-response :before 'lsp-log-full-response)
+
+  (defun lsp-log-range-response (response)
+    (setq lsp-semantic-tokens--prev-response `(:request-type "range"
+                                               :response ,response
+                                               :version ,lsp--cur-version)))
+  (advice-add 'lsp--semantic-tokens-ingest-range-response :before 'lsp-log-range-response))
+
+(defun lsp-semantic-tokens-disable-log ()
+  "Disable logging of intermediate fontification states."
+  (advice-remove 'lsp-semantic-tokens--fontify 'lsp-advice-tokens-fontify)
+  (advice-remove 'lsp--semantic-tokens-ingest-full/delta-response 'lsp-log-delta-response)
+  (advice-remove 'lsp--semantic-tokens-ingest-full-response 'lsp-log-full-response)
+  (advice-remove 'lsp--semantic-tokens-ingest-range-response 'lsp-log-range-response))
+
+(declare-function htmlize-buffer "ext:htmlize")
+
+(defun lsp-semantic-tokens-export-log ()
+  "Write HTML-formatted snapshots of previous fontification results to /tmp."
+  (require 'htmlize)
+  (let* ((outdir (f-join "/tmp" "semantic-token-snapshots"))
+         (progress-reporter
+          (make-progress-reporter
+           (format "Writing buffer snapshots to %s..." outdir)
+           0 (length lsp-semantic-tokens--log))))
+    (f-mkdir outdir)
+    (--each-indexed (reverse lsp-semantic-tokens--log)
+      (-let* (((&plist :tag tag
+                       :buffer-contents buffer-contents
+                       :prev-response prev-response) it)
+              (html-buffer))
+        ;; FIXME: doesn't update properly; sit-for helps... somewhat,
+        ;; but unreliably
+        (when (= (% it-index 5) 0)
+          (progress-reporter-update progress-reporter it-index)
+          (sit-for 0.01))
+        ;; we're emitting 2 snapshots (before & after) per update, so request
+        ;; parameters should only change on every 2nd invocation
+        (when (cl-evenp it-index)
+          (with-temp-buffer
+            (insert (prin1-to-string prev-response))
+            (write-file (f-join outdir (format "parameters_%d.el" (/ it-index 2))))))
+        (with-temp-buffer
+          (insert buffer-contents)
+          (setq html-buffer (htmlize-buffer))
+          (with-current-buffer html-buffer
+            ;; some configs such as emacs-doom may autoformat on save; switch to
+            ;; fundamental-mode to avoid this
+            (fundamental-mode)
+            (write-file (f-join outdir (format "buffer_%d_%s.html" (/ it-index 2) tag)))))
+        (kill-buffer html-buffer)))
+    (progress-reporter-done progress-reporter)))
+
+(lsp-consistency-check lsp-semantic-tokens)
+
+(provide 'lsp-semantic-tokens)
+;;; lsp-semantic-tokens.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-semgrep.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-semgrep.el
new file mode 100644
index 0000000..ded8c2f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-semgrep.el
@@ -0,0 +1,236 @@
+;;; lsp-semgrep.el --- semgrep support -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2023 Austin Theriault
+;; Copyright (C) 2023-2026 lsp-mode maintainers
+;;
+;; Author: Austin Theriault <austin@cutedogs.org>
+;; Keywords: language tools sast
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;; This file is not part of GNU Emacs.
+;;
+;;; Commentary:
+;;
+;;  Semgrep support for lsp-mode
+;;
+;;; Code:
+
+
+
+(require 'lsp-mode)
+
+(defgroup lsp-semgrep nil
+  "LSP support for Semgrep."
+  :group 'lsp-mode
+  :link `(url-link "https://github.com/returntocorp/semgrep"))
+
+(defgroup lsp-semgrep-scan nil
+  "Semgrep LS scan options."
+  :group 'lsp-semgrep
+  )
+
+(defgroup lsp-semgrep-metrics nil
+  "Semgrep LS metrics options."
+  :group 'lsp-semgrep)
+
+;; General options
+
+(defcustom lsp-semgrep-trace-server "off"
+  "Trace Semgrep LS server"
+  :group 'lsp-semgrep
+  :type '(choice (const "off")
+          (const "messages")
+          (const "verbose")))
+
+(defcustom lsp-semgrep-server-command '("semgrep" "lsp")
+  "Semgrep LS server command."
+  :group 'lsp-semgrep
+  :type '(repeat string))
+
+(defcustom lsp-semgrep-languages '("apex"
+                                  "bash"
+                                  "sh"
+                                  "c"
+                                  "cairo"
+                                  "clojure"
+                                  "cpp"
+                                  "c++"
+                                  "csharp"
+                                  "c#"
+                                  "dart"
+                                  "dockerfile"
+                                  "docker"
+                                  "ex"
+                                  "elixir"
+                                  "go"
+                                  "golang"
+                                  "hack"
+                                  "html"
+                                  "java"
+                                  "js"
+                                  "javascript"
+                                  "json"
+                                  "jsonnet"
+                                  "julia"
+                                  "kt"
+                                  "kotlin"
+                                  "lisp"
+                                  "lua"
+                                  "ocaml"
+                                  "php"
+                                  "python2"
+                                  "python3"
+                                  "py"
+                                  "python"
+                                  "r"
+                                  "regex"
+                                  "none"
+                                  "ruby"
+                                  "rust"
+                                  "scala"
+                                  "scheme"
+                                  "solidity"
+                                  "sol"
+                                  "swift"
+                                  "tf"
+                                  "hcl"
+                                  "terraform"
+                                  "ts"
+                                  "typescript"
+                                  "vue"
+                                  "xml"
+                                  "yaml")
+  "List of languages to enable Semgrep LS for."
+  :group 'lsp-semgrep
+  :type '(repeat string))
+;; Scan options
+
+(defcustom lsp-semgrep-scan-configuration []
+  "Semgrep rule files, or registry rules to scan with, e.g. ['r/all','rules.yaml']."
+  :group 'lsp-semgrep-scan
+  :type '(repeat string))
+
+(defcustom lsp-semgrep-scan-exclude []
+  "List of files or directories to exclude from scan."
+  :group 'lsp-semgrep-scan
+  :type '(repeat string))
+
+(defcustom lsp-semgrep-scan-include []
+  "List of files or directories to include in scan."
+  :group 'lsp-semgrep-scan
+  :type '(repeat string))
+
+(defcustom lsp-semgrep-scan-jobs 1
+  "Number of parallel jobs to run."
+  :group 'lsp-semgrep-scan
+  :type 'integer)
+
+(defcustom lsp-semgrep-scan-max-memory 0
+  "Maximum memory to use for scan, in MB."
+  :group 'lsp-semgrep-scan
+  :type 'integer)
+
+(defcustom lsp-semgrep-scan-max-target-bytes 1000000
+  "Maximum size of target file to scan, in bytes."
+  :group 'lsp-semgrep-scan
+  :type 'integer)
+
+(defcustom lsp-semgrep-scan-timeout 30
+  "Maximum time to wait for scan to complete, in seconds."
+  :group 'lsp-semgrep-scan
+  :type 'integer)
+
+(defcustom lsp-semgrep-scan-timeout-threshold 30
+  "Maximum time to wait for scan to complete, in seconds."
+  :group 'lsp-semgrep-scan
+  :type 'integer)
+
+(defcustom lsp-semgrep-scan-only-git-dirty t
+  "Only scan files that are dirty in git."
+  :group 'lsp-semgrep-scan
+  :type 'boolean)
+
+;; Metrics options
+
+(defcustom lsp-semgrep-metrics-enabled t
+  "Enable metrics collection."
+  :group 'lsp-semgrep-metrics
+  :type 'boolean)
+
+(defcustom lsp-semgrep-metrics-extension-type "emacs"
+  "Extension host type."
+  :group 'lsp-semgrep-metrics
+  :type 'string)
+
+;; Custom commands
+
+(defun semgrep-scan-workspace (full)
+  "Scan workspace with Semgrep.
+If FULL is non-nil, scan all files in workspace, regardless of git status."
+  (interactive (list (lsp--completing-read "Scan: " (list "Changed files in workspace" "All files in workspace") 'identity)))
+  (lsp-notify "semgrep/scanWorkspace" (list :full (if (string= full "All files in workspace") t :json-false))))
+
+(defun semgrep-refresh-rules ()
+  "Refresh Semgrep rules."
+  (interactive)
+  (lsp-notify "semgrep/refreshRules" lsp--empty-ht))
+
+
+(defun semgrep-login ()
+  "Login to Semgrep."
+  (interactive)
+  (lsp-request-async "semgrep/login" lsp--empty-ht
+                     (lambda (result)
+                       (list
+                        (browse-url (lsp-get result :url))
+                        (lsp-message "Please login to Semgrep and return to Emacs.")
+                        (lsp-notify "semgrep/loginFinish" result)))))
+
+(defun semgrep-logout ()
+  "Logout from Semgrep."
+  (interactive)
+  (lsp-notify "semgrep/logout" lsp--empty-ht))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda () lsp-semgrep-server-command))
+  :activation-fn (lambda (_file-name _mode)
+                   (-contains? lsp-semgrep-languages (lsp-buffer-language)))
+  :server-id 'semgrep-ls
+  :priority -1
+  :add-on? t
+  :notification-handlers (ht ("semgrep/rulesRefreshed" #'ignore))
+  :initialization-options
+  (lambda ()
+    (list
+     :scan (list
+            :configuration lsp-semgrep-scan-configuration
+            :exclude lsp-semgrep-scan-exclude
+            :include lsp-semgrep-scan-include
+            :jobs lsp-semgrep-scan-jobs
+            :maxMemory lsp-semgrep-scan-max-memory
+            :maxTargetBytes lsp-semgrep-scan-max-target-bytes
+            :timeout lsp-semgrep-scan-timeout
+            :timeoutThreshold lsp-semgrep-scan-timeout-threshold
+            :onlyGitDirty lsp-semgrep-scan-only-git-dirty)
+     :metrics (list
+               :enabled lsp-semgrep-metrics-enabled
+               :extensionType lsp-semgrep-metrics-extension-type)
+     :trace (list
+             :server lsp-semgrep-trace-server)))))
+
+(lsp-consistency-check lsp-semgrep)
+
+(provide 'lsp-semgrep)
+;;; lsp-semgrep.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sml.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sml.el
new file mode 100644
index 0000000..2dd68a0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sml.el
@@ -0,0 +1,93 @@
+;;; lsp-sml.el --- Standard ML client settings -*- lexical-binding: t; -*-
+
+;; Copyright (c) 2023 Ariel Davis
+;; Copyright (C) 2023-2026 lsp-mode maintainers
+
+;; Author: Ariel Davis <ariel.z.davis@icloud.com>
+;; Keywords: languages, lsp, sml, standard-ml, millet
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-sml client via Millet
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-completion)
+
+(defgroup lsp-sml nil
+  "LSP support for Standard ML, using the Millet language server."
+  :link '(url-link "https://github.com/azdavis/millet")
+  :group 'lsp-mode)
+
+(defcustom lsp-sml-millet-format-engine "none"
+  "**WARNING: THE FORMATTER IS HIGHLY EXPERIMENTAL.
+IT MAY IRREVOCABLY DESTROY SOME OR ALL OF YOUR CODE.**
+
+How to format open SML files on save."
+  :type '(choice (const :tag "No formatting." "none")
+                 (const :tag "Naive formatting." "naive")
+                 (const :tag "Formatting provided by https://github.com/shwestrick/smlfmt." "smlfmt"))
+  :group 'lsp-sml)
+
+(defcustom lsp-sml-millet-server-diagnostics-filter "syntax"
+  "What diagnostics to send per file."
+  :type '(choice (const :tag "No filter, i.e. all available diagnostics are sent." "none")
+                 (const :tag "If there are syntax errors (lex, parse, etc),
+send only those, and do not send e.g. statistics diagnostics." "syntax"))
+  :group 'lsp-sml)
+
+(defcustom lsp-sml-millet-server-diagnostics-moreInfoHint-enable t
+  "Show a hint on diagnostic messages about clicking the error code number for
+more information."
+  :type 'boolean
+  :group 'lsp-sml)
+
+(defcustom lsp-sml-millet-server-diagnostics-onChange-enable nil
+  "Send diagnostics when file contents change before saving."
+  :type 'boolean
+  :group 'lsp-sml)
+
+(defcustom lsp-sml-millet-server-hover-token-enable t
+  "Show information about tokens on hover."
+  :type 'boolean
+  :group 'lsp-sml)
+
+(defcustom lsp-sml-millet-server-path "millet-ls"
+  "Path to the `millet-ls` executable."
+  :type 'string
+  :group 'lsp-sml)
+
+(lsp-register-custom-settings
+ '(("millet.format.engine" lsp-sml-millet-format-engine)
+   ("millet.server.diagnostics.filter" lsp-sml-millet-server-diagnostics-filter)
+   ("millet.server.diagnostics.moreInfoHint.enable" lsp-sml-millet-server-diagnostics-moreInfoHint-enable)
+   ("millet.server.diagnostics.onChange.enable" lsp-sml-millet-server-diagnostics-onChange-enable)
+   ("millet.server.hover.token.enable" lsp-sml-millet-server-hover-token-enable)
+   ("millet.server.path" lsp-sml-millet-server-path)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda () lsp-sml-millet-server-path))
+                  :activation-fn (lsp-activate-on "sml" "millet.toml")
+                  :language-id "sml"
+                  :priority -1
+                  :server-id 'millet))
+
+(lsp-consistency-check lsp-sml)
+
+(provide 'lsp-sml)
+;;; lsp-sml.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-solargraph.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-solargraph.el
new file mode 100644
index 0000000..326ea18
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-solargraph.el
@@ -0,0 +1,174 @@
+;;; lsp-solargraph.el --- Solargraph server configuration  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Ivan Yonchovski
+;; Copyright (C) 2019-2026 lsp-mode maintainers
+
+;; Author: Ivan Yonchovski <yyoncho@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-solargraph nil
+  "LSP support for Ruby, using the Solargraph language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/castwide/solargraph")
+  :package-version '(lsp-mode . "6.1"))
+
+;; (defcustom lsp-solargraph-check-gem-version t
+;;   "Automatically check if a new version of the Solargraph gem is available."
+;;   :type 'boolean)
+
+(defcustom lsp-solargraph-completion t
+  "Enable completion"
+  :type 'boolean
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-solargraph-hover t
+  "Enable hover"
+  :type 'boolean
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-solargraph-diagnostics t
+  "Enable diagnostics"
+  :type 'boolean
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-solargraph-autoformat nil
+  "Enable automatic formatting while typing (WARNING: experimental)"
+  :type 'boolean
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-solargraph-formatting t
+  "Enable document formatting"
+  :type 'boolean
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-solargraph-symbols t
+  "Enable symbols"
+  :type 'boolean
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-solargraph-definitions t
+  "Enable definitions (go to, etc.)"
+  :type 'boolean
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-solargraph-rename t
+  "Enable symbol renaming"
+  :type 'boolean
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-solargraph-references t
+  "Enable finding references"
+  :type 'boolean
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-solargraph-folding t
+  "Enable folding ranges"
+  :type 'boolean
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-solargraph-log-level "warn"
+  "Level of debug info to log. `warn` is least and `debug` is most."
+  :type '(choice (const "warn")
+                 (const "info")
+                 (const "debug"))
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+;; https://github.com/castwide/solargraph#solargraph-and-bundler
+(defcustom lsp-solargraph-use-bundler nil
+  "Run solargraph under bundler"
+  :type 'boolean
+  :safe #'booleanp
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-solargraph-multi-root t
+  "If non nil, `solargraph' will be started in multi-root mode."
+  :type 'boolean
+  :safe #'booleanp
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-solargraph-library-directories
+  '("~/.rbenv/" "/usr/lib/ruby/" "~/.rvm/" "~/.gem/")
+  "List of directories which will be considered to be libraries."
+  :type '(repeat string)
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "7.0.1"))
+
+(defcustom lsp-solargraph-server-command '("solargraph" "stdio")
+  "Command to start Solargraph Ruby language server."
+  :type '(repeat string)
+  :group 'lsp-solargraph
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-solargraph--build-command ()
+  "Build solargraph command"
+  (if lsp-solargraph-use-bundler
+      (append '("bundle" "exec") lsp-solargraph-server-command)
+    lsp-solargraph-server-command))
+
+(lsp-register-custom-settings
+ '(("solargraph.logLevel" lsp-solargraph-log-level)
+   ("solargraph.folding" lsp-solargraph-folding t)
+   ("solargraph.references" lsp-solargraph-references t)
+   ("solargraph.rename" lsp-solargraph-rename t)
+   ("solargraph.definitions" lsp-solargraph-definitions t)
+   ("solargraph.symbols" lsp-solargraph-symbols t)
+   ("solargraph.formatting" lsp-solargraph-formatting t)
+   ("solargraph.autoformat" lsp-solargraph-autoformat t)
+   ("solargraph.diagnostics" lsp-solargraph-diagnostics t)
+   ("solargraph.hover" lsp-solargraph-hover t)
+   ("solargraph.completion" lsp-solargraph-completion t)
+   ("solargraph.useBundler" lsp-solargraph-use-bundler t)))
+
+;; Ruby
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   #'lsp-solargraph--build-command)
+  :activation-fn (lsp-activate-on "ruby")
+  :priority -1
+  :multi-root lsp-solargraph-multi-root
+  :library-folders-fn (lambda (_workspace) lsp-solargraph-library-directories)
+  :server-id 'ruby-ls
+  :initialized-fn (lambda (workspace)
+                    (with-lsp-workspace workspace
+                      (lsp--set-configuration
+                       (lsp-configuration-section "solargraph"))))))
+
+(lsp-consistency-check lsp-solargraph)
+
+(provide 'lsp-solargraph)
+;;; lsp-solargraph.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-solidity.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-solidity.el
new file mode 100644
index 0000000..649f103
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-solidity.el
@@ -0,0 +1,62 @@
+;;; lsp-solidity.el --- solidity LSP                      -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023  konubinix
+;; Copyright (C) 2023-2026 lsp-mode maintainers
+
+;; Author: konubinix <konubinixweb@gmail.com>
+;; Keywords: tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(lsp-dependency 'solidity-language-server
+                '(:system "nomicfoundation-solidity-language-server")
+                '(:npm :package "@nomicfoundation/solidity-language-server"
+                       :path "nomicfoundation-solidity-language-server"))
+
+
+(defun lsp-client--solidity-ls-server-command ()
+  "Startup command for Solidity language server."
+  (list (lsp-package-path 'solidity-language-server) "--stdio"))
+
+
+(defgroup lsp-solidity nil
+  "LSP support for Solidity."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/NomicFoundation/hardhat-vscode/blob/development/server/README.md"))
+
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection #'lsp-client--solidity-ls-server-command)
+                  :activation-fn (lsp-activate-on "solidity" "sol")
+                  :server-id 'solidity
+                  :notification-handlers
+                  (ht ("custom/validation-job-status"
+                       #'lsp-client--solidity-validation-job-status))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'solidity-language-server callback error-callback))))
+
+(defun lsp-client--solidity-validation-job-status (_workspace _params)
+  ;; noop until I find out what to do with this
+  )
+
+(lsp-consistency-check lsp-solidity)
+
+(provide 'lsp-solidity)
+;;; lsp-solidity.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sorbet.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sorbet.el
new file mode 100644
index 0000000..820f737
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sorbet.el
@@ -0,0 +1,66 @@
+;;; lsp-sorbet.el --- Sorbet server configuration  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 lsp-mode maintainers
+
+;; Author: Christopher Wilson <chris@sencjw.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-sorbet client
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-sorbet nil
+  "LSP support for Ruby, using the Sorbet language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/sorbet/sorbet")
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-sorbet-use-bundler nil
+  "Run sorbet under bundler"
+  :type 'boolean
+  :group 'lsp-sorbet
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-sorbet-as-add-on nil
+  "Run sorbet LSP server alongside other LSP server(s)"
+  :type 'boolean
+  :group 'lsp-sorbet
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defun lsp-sorbet--build-command ()
+  "Build sorbet command"
+  (let ((lsp-command '("srb" "typecheck" "--lsp" "--disable-watchman")))
+    (if lsp-sorbet-use-bundler
+              (append '("bundle" "exec") lsp-command)
+            lsp-command)))
+
+(lsp-register-client
+ (make-lsp-client
+  :add-on? lsp-sorbet-as-add-on
+  :new-connection (lsp-stdio-connection
+                   #'lsp-sorbet--build-command)
+  :priority -2
+  :activation-fn (lsp-activate-on "ruby")
+  :server-id 'sorbet-ls))
+
+(lsp-consistency-check lsp-sorbet)
+
+(provide 'lsp-sorbet)
+;;; lsp-sorbet.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sql.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sql.el
new file mode 100644
index 0000000..8c44f1f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sql.el
@@ -0,0 +1,67 @@
+;;; lsp-sql.el --- SQL Client settings.  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024  Shen, Jen-Chieh
+;; Copyright (C) 2024-2026 lsp-mode maintainers
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; LSP client for SQL.
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-sql nil
+  "LSP support for SQL, using sql-language-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/joe-re/sql-language-server")
+  :package-version `(lsp-mode . "10.0.0"))
+
+(defcustom lsp-sql-server-path nil
+  "Path points for SQL language server.
+
+This is only for development use."
+  :type 'string
+  :group 'lsp-sql)
+
+(defun lsp-sql--server-command ()
+  "Generate startup command for SQL language server."
+  (list (or lsp-sql-server-path
+            (lsp-package-path 'sql-ls))
+        "up" "--method" "stdio"))
+
+(lsp-dependency 'sql-ls
+                '(:system "sql-ls")
+                '(:npm :package "sql-language-server"
+                       :path "sql-language-server"))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-sql--server-command)
+  :major-modes '(sql-mode)
+  :priority -1
+  :multi-root t
+  :server-id 'sql-ls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'sql-ls callback error-callback))))
+
+(lsp-consistency-check lsp-sql)
+
+(provide 'lsp-sql)
+;;; lsp-sql.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sqls.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sqls.el
new file mode 100644
index 0000000..1edfca7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-sqls.el
@@ -0,0 +1,203 @@
+;;; lsp-sqls.el --- SQL Client settings -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020 Shunya Ishii
+;; Copyright (C) 2020-2026 lsp-mode maintainers
+
+;; Author: Shunya Ishii
+;; Keywords: sql lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for SQL
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-sqls nil
+  "LSP support for SQL, using sqls."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/sqls-server/sqls")
+  :package-version `(lsp-mode . "7.0"))
+
+(defcustom lsp-sqls-server "sqls"
+  "Path to the `sqls` binary."
+  :group 'lsp-sqls
+  :risky t
+  :type 'file
+  :package-version `(lsp-mode . "7.0"))
+
+(defcustom lsp-sqls-workspace-config-path "workspace"
+  "If non-nil then setup workspace configuration with json file path."
+  :group 'lsp-sqls
+  :risky t
+  :type '(choice (const "workspace")
+                 (const "root"))
+  :package-version `(lsp-mode . "7.0"))
+
+(defun lsp-sqls--make-launch-cmd ()
+  (-let [base `(,lsp-sqls-server)]
+    ;; we can add some options to command. (e.g. "-config")
+    base))
+
+
+(defcustom lsp-sqls-timeout 0.5
+  "Timeout to use for `sqls' requests."
+  :type 'number
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-sqls-connections nil
+  "The connections to the SQL server(s)."
+  :type '(repeat (alist :key-type (choice
+                                   (const :tag "Driver" driver)
+                                   (const :tag "Connection String" dataSourceName))
+                        :value-type string)))
+
+(defun lsp-sqls-setup-workspace-configuration ()
+  "Setup workspace configuration using json file.
+Depending on `lsp-sqls-workspace-config-path'."
+
+  (if lsp-sqls-connections
+      (lsp--set-configuration `(:sqls (:connections ,(apply #'vector lsp-sqls-connections))))
+    (when-let* ((config-json-path (cond
+                                  ((equal lsp-sqls-workspace-config-path "workspace")
+                                   ".sqls/config.json")
+                                  ((equal lsp-sqls-workspace-config-path "root")
+                                   (-> (lsp-workspace-root)
+                                       (f-join ".sqls/config.json"))))))
+      (when (file-exists-p config-json-path)
+        (lsp--set-configuration (lsp--read-json-file config-json-path))))))
+
+(defun lsp-sqls--show-results (result)
+  (with-current-buffer (get-buffer-create "*sqls results*")
+    (with-help-window (buffer-name)
+      (erase-buffer)
+      (insert result))))
+
+(defun lsp-sql-execute-query (&optional command start end)
+  "Execute COMMAND on buffer text against current database.
+Buffer text is between START and END.  If START and END are nil,
+use the current region if set, otherwise the entire buffer."
+  (interactive)
+  (lsp-sqls--show-results
+   (lsp-request
+    "workspace/executeCommand"
+    (list :command "executeQuery"
+          :arguments (or
+                      (when command
+                        (lsp:command-arguments? command))
+                      (vector (lsp--buffer-uri)))
+          :timeout lsp-sqls-timeout
+          :range (list
+                  :start (lsp--point-to-position
+                          (cond
+                           (start start)
+                           ((use-region-p) (region-beginning))
+                            (t (point-min))))
+                  :end (lsp--point-to-position
+                        (cond
+                         (end end)
+                         ((use-region-p) (region-end))
+                         (t (point-max)))))))))
+
+(defun lsp-sql-execute-paragraph (&optional command)
+  "Execute COMMAND on paragraph against current database."
+  (interactive)
+  (let ((start (save-excursion (backward-paragraph) (point)))
+        (end (save-excursion (forward-paragraph) (point))))
+    (lsp-sql-execute-query command start end)))
+
+(defun lsp-sql-show-databases (&optional _command)
+  "Show databases."
+  (interactive)
+  (lsp-sqls--show-results
+   (lsp-request
+    "workspace/executeCommand"
+    (list :command "showDatabases" :timeout lsp-sqls-timeout))))
+
+(defun lsp-sql-show-schemas (&optional _command)
+  "Show schemas."
+  (interactive)
+  (lsp-sqls--show-results
+   (lsp-request
+    "workspace/executeCommand"
+    (list :command "showSchemas" :timeout lsp-sqls-timeout))))
+
+(defun lsp-sql-show-connections (&optional _command)
+  "Show connections."
+  (interactive)
+  (lsp-sqls--show-results
+   (lsp-request
+    "workspace/executeCommand"
+    (list :command "showConnections" :timeout lsp-sqls-timeout))))
+
+(defun lsp-sql-show-tables (&optional _command)
+  "Show tables."
+  (interactive)
+  (lsp-sqls--show-results
+   (lsp-request
+    "workspace/executeCommand"
+    (list :command "showTables" :timeout lsp-sqls-timeout))))
+
+(defun lsp-sql-switch-database (&optional _command)
+  "Switch database."
+  (interactive)
+  (lsp-workspace-command-execute
+   "switchDatabase"
+   (vector (completing-read
+            "Select database: "
+            (s-lines (lsp-workspace-command-execute "showDatabases"))
+            nil
+            t))))
+
+(defun lsp-sql-switch-connection (&optional _command)
+  "Switch connection."
+  (interactive)
+  (lsp-workspace-command-execute
+   "switchConnections"
+   (vector (cl-first
+            (s-match "\\([[:digit:]]*\\)"
+                     (completing-read
+                      "Select connection: "
+                      (s-lines (lsp-workspace-command-execute  "showConnections"))
+                      nil
+                      t))))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection #'lsp-sqls--make-launch-cmd)
+                  :major-modes '(sql-mode)
+                  :priority -2
+                  :action-handlers (ht ("executeParagraph" #'lsp-sql-execute-paragraph)
+                                       ("executeQuery" #'lsp-sql-execute-query)
+                                       ("showDatabases" #'lsp-sql-show-databases)
+                                       ("showSchemas" #'lsp-sql-show-schemas)
+                                       ("showConnections" #'lsp-sql-show-connections)
+                                       ("showTables" #'lsp-sql-show-tables)
+                                       ("switchDatabase" #'lsp-sql-switch-database)
+                                       ("switchConnections" #'lsp-sql-switch-connection))
+                  :server-id 'sqls
+                  :multi-root t
+                  :initialized-fn (lambda (workspace)
+                                    (-> workspace
+                                        (lsp--workspace-server-capabilities)
+                                        (lsp:set-server-capabilities-execute-command-provider? t))
+                                    (with-lsp-workspace workspace
+                                      (lsp-sqls-setup-workspace-configuration)))))
+
+(lsp-consistency-check lsp-sqls)
+
+(provide 'lsp-sqls)
+;;; lsp-sqls.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-steep.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-steep.el
new file mode 100644
index 0000000..2183e01
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-steep.el
@@ -0,0 +1,74 @@
+;;; lsp-steep.el --- lsp-mode for Steep  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020  Masafumi Koba
+;; Copyright (C) 2020-2026 lsp-mode maintainers
+
+;; Author: Masafumi Koba <ybiquitous@gmail.com>
+;; Keywords: languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for Steep which is a Ruby type checker.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-steep nil
+  "LSP support for Steep, using the Steep language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/soutaro/steep"))
+
+(defcustom lsp-steep-log-level "warn"
+  "Log level of Steep."
+  :type '(choice
+          (const "fatal")
+          (const "error")
+          (const "warn")
+          (const "info")
+          (const "debug"))
+  :group 'lsp-steep)
+
+(defcustom lsp-steep-use-bundler nil
+  "Run Steep using Bundler."
+  :type 'boolean
+  :safe #'booleanp
+  :group 'lsp-steep)
+
+(defcustom lsp-steep-server-path nil
+  "Path of the Steep language server executable.
+If specified, `lsp-steep-use-bundler' is ignored."
+  :type 'file
+  :group 'lsp-steep
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defun lsp-steep--build-command ()
+  "Build a command to start the Steep language server."
+  (append
+   (if (and lsp-steep-use-bundler (not lsp-steep-server-path)) '("bundle" "exec"))
+   (list (or lsp-steep-server-path "steep") "langserver" "--log-level" lsp-steep-log-level)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection #'lsp-steep--build-command)
+  :activation-fn (lsp-activate-on "ruby")
+  :priority -3
+  :server-id 'steep-ls))
+
+(lsp-consistency-check lsp-steep)
+
+(provide 'lsp-steep)
+;;; lsp-steep.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-svelte.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-svelte.el
new file mode 100644
index 0000000..1885d35
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-svelte.el
@@ -0,0 +1,308 @@
+;;; lsp-svelte.el --- LSP Svelte integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020 Stepan Lusnikov
+;; Copyright (C) 2020-2026 lsp-mode maintainers
+
+;; Author: Stepan Lusnikov <endenwer@gmail.com>
+;; Keywords: lsp svelte
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for Svelte
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-svelte nil
+  "LSP support for Svelte."
+  :group 'lsp-mode
+  :link '(url-link
+          "https://github.com/sveltejs/language-tools"))
+
+(lsp-dependency 'svelte-language-server
+                '(:system "svelteserver")
+                '(:npm :package "svelte-language-server"
+                       :path "svelteserver"))
+
+(defcustom lsp-svelte-plugin-typescript-enable t
+  "Enable the TypeScript plugin"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-typescript-diagnostics-enable t
+  "Enable diagnostic messages for TypeScript"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-typescript-hover-enable t
+  "Enable hover info for TypeScript"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-typescript-document-symbols-enable t
+  "Enable document symbols for TypeScript"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-typescript-completions-enable t
+  "Enable completions for TypeScript"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-typescript-find-references-enable t
+  "Enable find-references for TypeScript"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-typescript-definitions-enable t
+  "Enable go to definition for TypeScript"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-typescript-code-actions-enable t
+  "Enable code actions for TypeScript"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-typescript-selection-range-enable t
+  "Enable selection range for TypeScript"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-typescript-signature-help-enable t
+  "Enable signature help (parameter hints) for TypeScript"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-typescript-rename-enable t
+  "Enable rename functionality for JS/TS variables inside Svelte files"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-css-enable t
+  "Enable the CSS plugin"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-css-globals ""
+  "Which css files should be checked for global variables
+(`--global-var: value;`).
+
+These variables are added to the css completions.  String of comma-separated
+file paths or globs relative to workspace root."
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-css-diagnostics-enable t
+  "Enable diagnostic messages for CSS"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-css-hover-enable t
+  "Enable hover info for CSS"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-css-completions-enable t
+  "Enable auto completions for CSS"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-css-completions-emmet t
+  "Enable emmet auto completions for CSS"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-css-document-colors-enable t
+  "Enable document colors for CSS"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-css-color-presentations-enable t
+  "Enable color picker for CSS"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-css-document-symbols-enable t
+  "Enable document symbols for CSS"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-css-selection-range-enable t
+  "Enable selection range for CSS"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-html-enable t
+  "Enable the HTML plugin"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-html-hover-enable t
+  "Enable hover info for HTML"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-html-completions-enable t
+  "Enable auto completions for HTML"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-html-completions-emmet t
+  "Enable emmet auto completions for HTML"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-html-tag-complete-enable t
+  "Enable HTML tag auto closing"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-html-document-symbols-enable t
+  "Enable document symbols for HTML"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-svelte-enable t
+  "Enable the Svelte plugin"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-svelte-diagnostics-enable t
+  "Enable diagnostic messages for Svelte"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-svelte-compiler-warnings nil
+  "Svelte compiler warning codes to ignore or to treat as errors.
+Example: `((css-unused-selector . ignore) (unused-export-let . error))"
+  :type '(alist :key-type (symbol :tag "Warning code")
+                :value-type (choice
+                             (const :tag "Ignore" ignore)
+                             (const :tag "Treat as error" error)))
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-svelte-format-enable t
+  "Enable formatting for Svelte (includes css & js)"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-svelte-completions-enable t
+  "Enable auto completions for Svelte"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-svelte-hover-enable t
+  "Enable hover information for Svelte"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-svelte-code-actions-enable t
+  "Enable Code Actions for Svelte"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-svelte-selection-range-enable t
+  "Enable selection range for Svelte"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-svelte-plugin-svelte-rename-enable t
+  "Enable rename/move Svelte files functionality"
+  :type 'boolean
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-register-custom-settings
+ '(("svelte.plugin.svelte.rename.enable" lsp-svelte-plugin-svelte-rename-enable t)
+   ("svelte.plugin.svelte.selectionRange.enable" lsp-svelte-plugin-svelte-selection-range-enable t)
+   ("svelte.plugin.svelte.codeActions.enable" lsp-svelte-plugin-svelte-code-actions-enable t)
+   ("svelte.plugin.svelte.hover.enable" lsp-svelte-plugin-svelte-hover-enable t)
+   ("svelte.plugin.svelte.completions.enable" lsp-svelte-plugin-svelte-completions-enable t)
+   ("svelte.plugin.svelte.format.enable" lsp-svelte-plugin-svelte-format-enable t)
+   ("svelte.plugin.svelte.compilerWarnings" lsp-svelte-plugin-svelte-compiler-warnings)
+   ("svelte.plugin.svelte.diagnostics.enable" lsp-svelte-plugin-svelte-diagnostics-enable t)
+   ("svelte.plugin.svelte.enable" lsp-svelte-plugin-svelte-enable t)
+   ("svelte.plugin.html.documentSymbols.enable" lsp-svelte-plugin-html-document-symbols-enable t)
+   ("svelte.plugin.html.tagComplete.enable" lsp-svelte-plugin-html-tag-complete-enable t)
+   ("svelte.plugin.html.completions.emmet" lsp-svelte-plugin-html-completions-emmet t)
+   ("svelte.plugin.html.completions.enable" lsp-svelte-plugin-html-completions-enable t)
+   ("svelte.plugin.html.hover.enable" lsp-svelte-plugin-html-hover-enable t)
+   ("svelte.plugin.html.enable" lsp-svelte-plugin-html-enable t)
+   ("svelte.plugin.css.selectionRange.enable" lsp-svelte-plugin-css-selection-range-enable t)
+   ("svelte.plugin.css.documentSymbols.enable" lsp-svelte-plugin-css-document-symbols-enable t)
+   ("svelte.plugin.css.colorPresentations.enable" lsp-svelte-plugin-css-color-presentations-enable t)
+   ("svelte.plugin.css.documentColors.enable" lsp-svelte-plugin-css-document-colors-enable t)
+   ("svelte.plugin.css.completions.emmet" lsp-svelte-plugin-css-completions-emmet t)
+   ("svelte.plugin.css.completions.enable" lsp-svelte-plugin-css-completions-enable t)
+   ("svelte.plugin.css.hover.enable" lsp-svelte-plugin-css-hover-enable t)
+   ("svelte.plugin.css.diagnostics.enable" lsp-svelte-plugin-css-diagnostics-enable t)
+   ("svelte.plugin.css.globals" lsp-svelte-plugin-css-globals)
+   ("svelte.plugin.css.enable" lsp-svelte-plugin-css-enable t)
+   ("svelte.plugin.typescript.rename.enable" lsp-svelte-plugin-typescript-rename-enable t)
+   ("svelte.plugin.typescript.signatureHelp.enable" lsp-svelte-plugin-typescript-signature-help-enable t)
+   ("svelte.plugin.typescript.selectionRange.enable" lsp-svelte-plugin-typescript-selection-range-enable t)
+   ("svelte.plugin.typescript.codeActions.enable" lsp-svelte-plugin-typescript-code-actions-enable t)
+   ("svelte.plugin.typescript.definitions.enable" lsp-svelte-plugin-typescript-definitions-enable t)
+   ("svelte.plugin.typescript.findReferences.enable" lsp-svelte-plugin-typescript-find-references-enable t)
+   ("svelte.plugin.typescript.completions.enable" lsp-svelte-plugin-typescript-completions-enable t)
+   ("svelte.plugin.typescript.documentSymbols.enable" lsp-svelte-plugin-typescript-document-symbols-enable t)
+   ("svelte.plugin.typescript.hover.enable" lsp-svelte-plugin-typescript-hover-enable t)
+   ("svelte.plugin.typescript.diagnostics.enable" lsp-svelte-plugin-typescript-diagnostics-enable t)
+   ("svelte.plugin.typescript.enable" lsp-svelte-plugin-typescript-enable t)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda ()
+                     `(,(lsp-package-path 'svelte-language-server)
+                       "--stdio")))
+  :activation-fn (lambda (file-name _mode)
+                   (string= (f-ext file-name)
+                            "svelte"))
+  :initialization-options
+  (lambda ()
+    (list :config (ht-get* (lsp-configuration-section "svelte.plugin")
+                           "svelte"
+                           "plugin")
+          :prettierConfig (lsp-configuration-section "prettier")
+          :emmetConfig (lsp-configuration-section "emmet")
+          :typescriptConfig: (list :typescript (lsp-configuration-section "typescript")
+                                   :javascript (lsp-configuration-section "javascript"))
+          :dontFilterIncompleteCompletions t))
+  :server-id 'svelte-ls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'svelte-language-server callback error-callback))
+  :initialized-fn
+  (lambda (workspace)
+    (with-lsp-workspace workspace
+      (lsp--set-configuration
+       (ht-merge (lsp-configuration-section "svelte")
+                 (lsp-configuration-section "javascript")
+                 (lsp-configuration-section "typescript")))
+      (lsp--server-register-capability
+       (lsp-make-registration
+        :id "js/ts/id"
+        :method "workspace/didChangeWatchedFiles"
+        :register-options? (lsp-make-did-change-watched-files-registration-options
+                            :watchers
+                            (vector (lsp-make-file-system-watcher :glob-pattern "**/*.js")
+                                    (lsp-make-file-system-watcher :glob-pattern "**/*.ts")))))))))
+
+(lsp-consistency-check lsp-svelte)
+
+(provide 'lsp-svelte)
+;;; lsp-svelte.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-tailwindcss.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-tailwindcss.el
new file mode 100644
index 0000000..176369f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-tailwindcss.el
@@ -0,0 +1,358 @@
+;;; lsp-tailwindcss.el --- A lsp-mode client for Tailwind CSS  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020 Merrick Luo
+;; Copyright (C) 2024-2026 emacs-lsp maintainers
+
+;; Author: Merrick Luo <merrick@luois.me>
+;; Keywords: language tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for the Tailwind CSS language server.
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'f)
+
+(defgroup lsp-tailwindcss nil
+  "Adds lsp-mode support for Tailwind CSS."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/tailwindlabs/tailwindcss-intellisense"))
+
+(defcustom lsp-tailwindcss-add-on-mode t
+  "Specify lsp-tailwindcss as add-on so it can work with other language servers."
+  :type 'boolean
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-server-version "0.14.7"
+  "Specify the version of tailwindcss intellisense."
+  :type 'string
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-server-path ""
+  "Path to the tailwindcss lsp server binary (node.js executable).
+
+Leave empty to use the managed installation."
+  :type 'string
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-major-modes '(rjsx-mode web-mode html-mode css-mode typescript-mode typescript-tsx-mode tsx-ts-mode)
+  "Major modes that lsp-tailwindcss should activate."
+  :type '(repeat symbol)
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-rustywind-command (executable-find "rustywind")
+  "[Experimental] Command used for sorting the tailwindcss classes."
+  :type 'string
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-rustywind-extra-args nil
+  "[Experimental] Extra arguments to use when invoking rustywind."
+  :type '(repeat string)
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-skip-config-check nil
+  "Force skip config file check.
+Only use it when your config file is in an unconventional location
+and you are sure tailwindcss language server can find it."
+  :type 'boolean
+  :group 'lsp-tailwindcss)
+
+;;;###autoload
+(defun lsp-tailwindcss-rustywind ()
+  "[Experimental] Sort tailwindcss class name using rustywind."
+  (interactive)
+  (if (and lsp-tailwindcss-rustywind-command
+           (f-executable-p lsp-tailwindcss-rustywind-command))
+      (let ((tmpfile (make-nearby-temp-file "rustywind" nil nil))
+            (coding-system-for-read 'utf-8)
+            (coding-system-for-write 'utf-8))
+
+        (unwind-protect
+            (save-restriction
+              (widen)
+              (write-region nil nil tmpfile)
+
+              (let ((rustywind-args (append (list "--write" (file-local-name tmpfile)) lsp-tailwindcss-rustywind-extra-args)))
+                (when (zerop (apply #'process-file lsp-tailwindcss-rustywind-command nil nil nil rustywind-args))
+                  (insert-file-contents tmpfile nil nil nil t))))
+
+          (delete-file tmpfile)))
+    (error "Can't find rustywind executable at %s" lsp-tailwindcss-rustywind-command)))
+
+;;;###autoload
+(defun lsp-tailwindcss-rustywind-before-save ()
+  "[Experimental] Run rustywind when saving buffer.
+By adding this to `before-save-hook', it only runs when
+lsp-tailwindcss can be activated, see `lsp-tailwindcss--activate-p'."
+  (when (lsp-tailwindcss--activate-p)
+    (lsp-tailwindcss-rustywind)))
+
+;;;###autoload
+(defun lsp-tailwindcss-installed-server-version ()
+  "Get the installed version of tailwindcss language server."
+  (interactive)
+  (let ((package-json-file (f-join lsp-server-install-dir "tailwindcss/extension/package.json")))
+    (if (f-exists? package-json-file)
+        (let ((json-object-type 'hash-table)
+              (json-array-type 'list)
+              (json-key-type 'string))
+          (message "%s" (gethash "version" (json-read-file package-json-file))))
+      (error "Can't find package.json file at %s" package-json-file))))
+
+;;; Language server global settings:
+
+(defcustom lsp-tailwindcss-emmet-completions nil
+  "Enable completions when using Emmet-style syntax.
+For example div.bg-red-500.uppercase."
+  :type 'boolean
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-show-pixel-equivalents t
+  "Show px equivalents for rem CSS values in completions and hovers."
+  :type 'boolean
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-root-font-size 16
+  "Root font size in pixels.
+Used to convert rem CSS values to their px equivalents.
+See `lsp-tailwindcss-show-pixel-equivalents'."
+  :type 'number
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-validate t
+  "Enable linting.
+Rules can be configured individually using the lsp-tailwindcss-lint-* settings:
+  ignore: disable lint rule entirely
+  warning: rule violations will be considered \"warnings\"
+  error: rule violations will be considered \"errors\""
+  :type 'boolean
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-hovers t
+  "Enable hovers."
+  :type 'boolean
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-suggestions t
+  "Enable autocomplete suggestions."
+  :type 'boolean
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-code-actions t
+  "Enable code actions."
+  :type 'boolean
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-lint-invalid-screen "error"
+  "Unknown screen name used with the @screen directive."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-lint-invalid-variant "error"
+  "Unknown variant name used with the @variants directive."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-lint-invalid-tailwind-directive "error"
+  "Unknown value used with the @tailwind directive."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-lint-invalid-apply "error"
+  "Unsupported use of the @apply directive."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-lint-invalid-config-path "error"
+  "Unknown or invalid path used with the theme helper."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-lint-css-conflict "warning"
+  "Class names on the same HTML element which apply the same CSS property or properties."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-lint-recommended-variant-order "warning"
+  "Class variants not in the recommended order (applies in JIT mode only)."
+  :type '(choice (const "ignore")
+                 (const "warning")
+                 (const "error"))
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-experimental-class-regex ""
+  "Custom regex to match tailwindcss classes."
+  :type 'string
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-class-attributes ["class" "className" "ngClass" "class:list"]
+  "The HTML attributes to provide class completions, hover previews, linting etc."
+  :type 'lsp-string-vector
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-class-functions nil
+  "Functions in which to provide completions, hover previews, linting etc.
+Currently, this works for both function calls and tagged template literals
+in JavaScript / TypeScript."
+  :type 'lsp-string-vector
+  :group 'lsp-tailwindcss)
+
+(defcustom lsp-tailwindcss-experimental-config-file nil
+  "Manually specify the Tailwind config file or files.
+It can be a single string or a hash map.  See
+https://github.com/tailwindlabs/tailwindcss-intellisense#tailwindcssexperimentalconfigfile
+
+Example:
+  (setq lsp-tailwindcss-experimental-config-file \"config/tailwindcss.conf.js\")
+
+  (setq lsp-tailwindcss-experimental-config-file
+        (ht
+         (\"themes/simple/tailwind.config.js\" \"themes/simple/**\")
+         (\"themes/neon/tailwind.config.js\" \"themes/neon/**\")))"
+  :type 'sexp
+  :group 'lsp-tailwindcss)
+
+(lsp-register-custom-settings
+ '(("tailwindCSS.emmetCompletions" lsp-tailwindcss-emmet-completions t)
+   ("tailwindCSS.showPixelEquivalents" lsp-tailwindcss-show-pixel-equivalents t)
+   ("tailwindCSS.rootFontSize" lsp-tailwindcss-root-font-size)
+   ("tailwindCSS.validate" lsp-tailwindcss-validate t)
+   ("tailwindCSS.hovers" lsp-tailwindcss-hovers t)
+   ("tailwindCSS.suggestions" lsp-tailwindcss-suggestions t)
+   ("tailwindCSS.codeActions" lsp-tailwindcss-code-actions t)
+   ("tailwindCSS.lint.invalidScreen" lsp-tailwindcss-lint-invalid-screen)
+   ("tailwindCSS.lint.invalidVariant" lsp-tailwindcss-lint-invalid-variant)
+   ("tailwindCSS.lint.invalidTailwindDirective" lsp-tailwindcss-lint-invalid-tailwind-directive)
+   ("tailwindCSS.lint.invalidApply" lsp-tailwindcss-lint-invalid-apply)
+   ("tailwindCSS.lint.invalidConfigPath" lsp-tailwindcss-lint-invalid-config-path)
+   ("tailwindCSS.lint.cssConflict" lsp-tailwindcss-lint-css-conflict)
+   ("tailwindCSS.lint.recommendedVariantOrder" lsp-tailwindcss-lint-recommended-variant-order)
+   ("tailwindCSS.experimental.classRegex" lsp-tailwindcss-experimental-class-regex)
+   ("tailwindCSS.experimental.configFile" lsp-tailwindcss-experimental-config-file)
+   ("tailwindCSS.classAttributes" lsp-tailwindcss-class-attributes)
+   ("tailwindCSS.classFunctions" lsp-tailwindcss-class-functions)))
+
+;;; Server setup:
+
+(defun lsp-tailwindcss--download-url ()
+  "Build language server download url from version."
+  (let ((version lsp-tailwindcss-server-version))
+    (lsp-vscode-extension-url "bradlc" "vscode-tailwindcss" version)))
+
+(defun lsp-tailwindcss-server-command ()
+  "Return the path to the server command when installed from the vscode extension."
+  (f-join lsp-server-install-dir "tailwindcss/extension/dist/tailwindServer.js"))
+
+(lsp-dependency 'tailwindcss-language-server
+                `(:download
+                  :url lsp-tailwindcss--download-url
+                  :decompress :zip
+                  :store-path ,(f-join lsp-server-install-dir "tailwindcss" "server")
+                  :binary-path lsp-tailwindcss-server-command))
+
+(defun lsp-tailwindcss--has-config-file ()
+  "Check if there is a tailwindcss config file.
+To keep it simple and performant, only check for conventional locations.
+See `lsp-tailwindcss-skip-config-check'."
+  (or lsp-tailwindcss-skip-config-check
+      lsp-tailwindcss-experimental-config-file
+      (f-glob "tailwind.config.*" (lsp-workspace-root))
+      (f-glob "**/tailwind.config.*" (lsp-workspace-root))))
+
+(defun lsp-tailwindcss--package-version (&optional file)
+  "Return tailwindcss version from package.json closest to FILE or current buffer.
+Checks both \"dependencies\" and \"devDependencies\"."
+  (when-let* ((start-file (or file (buffer-file-name)))
+              (package-root (locate-dominating-file start-file "package.json"))
+              (package-file (expand-file-name "package.json" package-root)))
+    (let* ((json-object-type 'hash-table)
+           (json-array-type 'list)
+           (json-key-type 'string)
+           (data (json-read-file package-file)))
+      (or (gethash "tailwindcss" (gethash "dependencies" data (make-hash-table :test 'equal)))
+          (gethash "tailwindcss" (gethash "devDependencies" data (make-hash-table :test 'equal)))))))
+
+(defun lsp-tailwindcss--version-v4-p (&optional version)
+  "Check if tailwindcss package VERSION is v4 or above.
+Will try to lookup the version if not provided."
+  (when-let* ((version (or version (lsp-tailwindcss--package-version))))
+    (string-match-p "^[~^]?\\([4-9]\\|[0-9]\\{2\\}\\)\\.?" version)))
+
+(defun lsp-tailwindcss--activate-p (&rest _args)
+  "Check if tailwindcss language server can/should start."
+  (and (lsp-workspace-root)
+       (apply #'provided-mode-derived-p major-mode lsp-tailwindcss-major-modes)
+       (or (lsp-tailwindcss--has-config-file) (lsp-tailwindcss--version-v4-p))))
+
+(defun lsp-tailwindcss--company-dash-hack (workspace)
+  "Append \"-\" to the lsp completion trigger characters for WORKSPACE.
+Workaround for company-mode completion not working when typing \"-\" in classname."
+  (with-lsp-workspace workspace
+    (let* ((caps (lsp--workspace-server-capabilities workspace))
+           (comp (lsp:server-capabilities-completion-provider? caps))
+           (trigger-chars (append (lsp:completion-options-trigger-characters? comp) nil)))
+      (lsp:set-completion-options-trigger-characters?
+       comp
+       (vconcat
+        (cl-pushnew "-" trigger-chars :test #'string=))))))
+
+(defun lsp-tailwindcss--server-path ()
+  "Return path to the tailwindcss language server."
+  (if (string-empty-p lsp-tailwindcss-server-path)
+      (lsp-package-path 'tailwindcss-language-server)
+    lsp-tailwindcss-server-path))
+
+(defun lsp-tailwindcss--initialization-options ()
+  "Return initialization options for the tailwindcss language server."
+  (ht ("configuration" (lsp-configuration-section "tailwindcss"))))
+
+(lsp-register-client
+ (make-lsp-client
+   :new-connection (lsp-stdio-connection
+                    (lambda ()
+                      `("node" ,(lsp-tailwindcss--server-path) "--stdio"))
+                    (lambda ()
+                      (when-let* ((server-path (lsp-tailwindcss--server-path)))
+                        (file-exists-p server-path))))
+  :activation-fn #'lsp-tailwindcss--activate-p
+  :server-id 'tailwindcss
+  :priority -1
+  :add-on? lsp-tailwindcss-add-on-mode
+  :initialization-options #'lsp-tailwindcss--initialization-options
+  :initialized-fn #'lsp-tailwindcss--company-dash-hack
+  :notification-handlers (ht ("@/tailwindCSS/projectInitialized" #'ignore)
+                             ("@/tailwindCSS/projectsDestroyed" #'ignore))
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'tailwindcss-language-server callback error-callback))))
+
+(lsp-consistency-check lsp-tailwindcss)
+
+(provide 'lsp-tailwindcss)
+;;; lsp-tailwindcss.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-terraform.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-terraform.el
new file mode 100644
index 0000000..48b2759
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-terraform.el
@@ -0,0 +1,458 @@
+;;; lsp-terraform.el --- Terraform Client settings         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019 Ross Donaldson, Sibi Prabakaran
+;; Copyright (C) 2019-2026 lsp-mode maintainers
+
+;; Author: Ross Donaldson, Sibi Prabakaran
+;; Keywords: terraform lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for Terraform
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-semantic-tokens)
+(require 'lsp-protocol)
+(require 'dash)
+
+;; terraform-lsp
+
+(defgroup lsp-terraform nil
+  "LSP support for Terraform, using terraform-lsp."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/juliosueiras/terraform-lsp")
+  :package-version `(lsp-mode . "6.2"))
+
+(defcustom lsp-terraform-server "terraform-lsp"
+  "Path to the `terraform-lsp' binary."
+  :group 'lsp-terraform
+  :risky t
+  :type '(choice
+          (file :tag "File")
+          (repeat string))
+  :package-version `(lsp-mode . "6.2"))
+
+(defcustom lsp-terraform-enable-logging nil
+  "If non-nil, enable `terraform-ls''s native logging."
+  :group 'lsp-terraform
+  :risky t
+  :type 'boolean
+  :package-version `(lsp-mode . "6.2"))
+
+
+(defun lsp-terraform--make-launch-cmd ()
+  (-let [base (if (stringp lsp-terraform-server)
+                  `(,lsp-terraform-server)
+                lsp-terraform-server)]
+    (when lsp-terraform-enable-logging
+      (push "-enable-log-file" base))
+    base))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection #'lsp-terraform--make-launch-cmd)
+                  :major-modes '(terraform-mode)
+                  :priority -1
+                  :server-id 'tfls))
+
+
+;; terraform-ls
+
+(defgroup lsp-terraform-ls nil
+  "LSP support for Terraform, using terraform-ls from Hashicorp."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/hashicorp/terraform-ls")
+  :package-version `(lsp-mode . "9.0.0"))
+
+(defcustom lsp-terraform-ls-server "terraform-ls"
+  "Path to the `terraform-ls' binary."
+  :group 'lsp-terraform-ls
+  :risky t
+  :type '(choice
+          (file :tag "File")
+          (repeat string))
+  :package-version `(lsp-mode . "9.0.0"))
+
+(defcustom lsp-terraform-ls-enable-show-reference nil
+  "Enable reference counts.
+
+Display reference counts above top level blocks and
+attributes.  This is an experimental feature provided by the
+language server."
+  :group 'lsp-terraform-ls
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-terraform-ls-validate-on-save nil
+  "Enable validating the current open file on save.
+
+This is an experimental feature provided by the language server."
+  :group 'lsp-terraform-ls
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-terraform-ls-prefill-required-fields nil
+  "Enable completion of required fields.
+
+Enable autocompletion for required fields when completing
+Terraform blocks.  This is an experimental feature provided by the
+language server."
+  :group 'lsp-terraform-ls
+  :type 'boolean
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-terraform-ls-providers-position-params nil
+  "The optional providers tree position params.
+Defaults to side following treemacs default."
+  :type 'alist
+  :group 'lsp-terraform-ls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-terraform-ls-module-calls-position-params nil
+  "The optional module calls tree position params.
+Defaults to side following treemacs default."
+  :type 'alist
+  :group 'lsp-terraform-ls
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-terraform-ls--make-launch-cmd ()
+  `(,lsp-terraform-ls-server "serve"))
+
+(lsp-defun lsp-terraform-ls--show-references ((&Command :arguments?))
+  "Show references for command with ARGS."
+  (lsp-show-xrefs
+     (lsp--locations-to-xref-items
+      (lsp-request "textDocument/references"
+                   (lsp--make-reference-params
+                    (lsp--text-document-position-params nil (elt arguments? 0)))))
+     t
+     t))
+
+(defun lsp-terraform-ls--custom-capabilities ()
+  "Construct custom capabilities for the language server."
+  (when lsp-terraform-ls-enable-show-reference
+    '((experimental . ((showReferencesCommandId . "client.showReferences"))))))
+
+(defun lsp-terraform-ls--init-options ()
+  "Construct initialization options for the lanague server."
+  `((experimentalFeatures . ((validateOnSave . ,(lsp-json-bool lsp-terraform-ls-validate-on-save))
+                             (prefillRequiredFields . ,(lsp-json-bool lsp-terraform-ls-prefill-required-fields))))))
+
+(defcustom lsp-terraform-semantic-token-faces
+  '(("namespace" . lsp-face-semhl-namespace)
+    ("type" . lsp-face-semhl-type)
+    ("class" . lsp-face-semhl-class)
+    ("enum" . lsp-face-semhl-enum)
+    ("interface" . lsp-face-semhl-interface)
+    ("struct" . lsp-face-semhl-struct)
+    ("typeParameter" . lsp-face-semhl-type-parameter)
+    ("parameter" . lsp-face-semhl-parameter)
+    ("variable" . lsp-face-semhl-variable)
+    ("property" . lsp-face-semhl-property)
+    ("enumMember" . lsp-face-semhl-enum-member)
+    ("event" . lsp-face-semhl-event)
+    ("function" . lsp-face-semhl-function)
+    ("method" . lsp-face-semhl-method)
+    ("macro" . lsp-face-semhl-macro)
+    ("keyword" . lsp-face-semhl-keyword)
+    ("modifier" . lsp-face-semhl-member)
+    ("comment" . lsp-face-semhl-comment)
+    ("string" . lsp-face-semhl-string)
+    ("number" . lsp-face-semhl-number)
+    ("regexp" . lsp-face-semhl-regexp)
+    ("operator" . lsp-face-semhl-operator)
+    ("hcl-attrName" . lsp-face-semhl-member)
+    ("hcl-blockType" . lsp-face-semhl-struct)
+    ("hcl-blockLabel" . lsp-face-semhl-member)
+    ("hcl-bool" . lsp-face-semhl-constant)
+    ("hcl-string" . lsp-face-semhl-string)
+    ("hcl-number" . lsp-face-semhl-number)
+    ("hcl-objectKey" . lsp-face-semhl-member)
+    ("hcl-mapKey" . lsp-face-semhl-member)
+    ("hcl-keyword" . lsp-face-semhl-keyword)
+    ("hcl-traversalStep" . lsp-face-semhl-member)
+    ("hcl-typeCapsule" . lsp-face-semhl-type)
+    ("hcl-typePrimitive" . lsp-face-semhl-type))
+  "Mapping between terrafom-ls tokens and fonts to apply."
+  :group 'lsp-terraform
+  :type '(alist :key-type string :value-type face)
+  :package-version '(lsp-mode . "8.1"))
+
+(defcustom lsp-terraform-semantic-token-modifier-faces
+  '(("declaration" . lsp-face-semhl-class)
+    ("definition" . lsp-face-semhl-definition)
+    ("readonly" . lsp-face-semhl-constant)
+    ("static" . lsp-face-semhl-static)
+    ("deprecated" . lsp-face-semhl-deprecated)
+    ("abstract" . lsp-face-semhl-keyword)
+    ("async" . lsp-face-semhl-macro)
+    ("modification" . lsp-face-semhl-operator)
+    ("documentation" . lsp-face-semhl-comment)
+    ("defaultLibrary" . lsp-face-semhl-default-library)
+    ("hcl-dependent" . lsp-face-semhl-constant)
+    ("terraform-data" . lsp-face-semhl-constant)
+    ("terraform-locals" . lsp-face-semhl-variable)
+    ("terraform-module" . lsp-face-semhl-namespace)
+    ("terraform-output" . lsp-face-semhl-constant)
+    ("terraform-provider" . lsp-face-semhl-class)
+    ("terraform-resource" . lsp-face-semhl-interface)
+    ("terraform-provisioner" . lsp-face-semhl-default-library)
+    ("terraform-connection" . lsp-face-semhl-constant)
+    ("terraform-variable" . lsp-face-semhl-variable)
+    ("terraform-terraform" . lsp-face-semhl-constant)
+    ("terraform-backend" . lsp-face-semhl-definition)
+    ("terraform-name" . lsp-face-semhl-interface)
+    ("terraform-type" . lsp-face-semhl-type)
+    ("terraform-requiredProviders" . lsp-face-semhl-default-library))
+  "Mapping between terraform-ls modifiers and fonts to apply."
+  :group 'lsp-terraform
+  :type '(alist :key-type string :value-type face)
+  :package-version '(lsp-mode . "8.1"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection #'lsp-terraform-ls--make-launch-cmd)
+                  :major-modes '(terraform-mode)
+                  :priority 1
+                  :server-id 'tfmls
+                  :action-handlers (ht ("client.showReferences" #'lsp-terraform-ls--show-references))
+                  :semantic-tokens-faces-overrides `(:discard-default-modifiers t
+                                                     :discard-default-types t
+                                                     :modifiers ,lsp-terraform-semantic-token-modifier-faces
+                                                     :types ,lsp-terraform-semantic-token-faces)
+                  :initialization-options (lsp-terraform-ls--init-options)
+                  :custom-capabilities (lsp-terraform-ls--custom-capabilities)))
+
+(defun lsp-terraform-ls-validate ()
+  "Execute terraform validate on project root."
+  (interactive)
+  (lsp-request
+   "workspace/executeCommand"
+   (list :command "terraform-ls.terraform.validate"
+         :arguments (vector (format "uri=%s" (lsp--path-to-uri (lsp-workspace-root))))
+         )
+   :no-wait t
+   :no-merge t))
+
+(defun lsp-terraform-ls-init ()
+  "Execute terraform init on project root.
+
+This is a synchronous action."
+  (interactive)
+  (lsp-request
+     "workspace/executeCommand"
+     (list :command "terraform-ls.terraform.init"
+           :arguments (vector (format "uri=%s" (lsp--path-to-uri (lsp-workspace-root)))))
+     :no-wait nil
+     :no-merge t))
+
+(defun lsp-terraform-ls-version ()
+  "Get information about the terraform binary version for the current module."
+  (interactive)
+  (let ((terraform-data (lsp-request
+                         "workspace/executeCommand"
+                         (list :command "terraform-ls.module.terraform"
+                               :arguments (vector (format "uri=%s" (lsp--path-to-uri (lsp-workspace-root))))))))
+    (lsp--info "Required: %s, Current: %s"
+               (lsp:terraform-ls-module-terraform-required-version terraform-data)
+               (lsp:terraform-ls-module-terraform-discovered-version terraform-data))))
+
+(lsp-consistency-check lsp-terraform)
+
+(defvar treemacs-position)
+(defvar treemacs-width)
+(declare-function lsp-treemacs-render "ext:lsp-treemacs" (tree title expand-depth &optional buffer-name))
+
+(defvar-local lsp-terraform-ls--providers-tree-data nil)
+(defvar-local lsp-terraform-ls--modules-call-tree-data nil)
+(defvar-local lsp-tf--modules-control-buffer nil)
+(defconst lsp-terraform-ls--providers-buffer-name "*Terraform Providers*")
+(defconst lsp-terraform-ls--modules-buffer-name "*Terraform Modules*")
+
+(defvar lsp-terraform-modules-mode-map
+  (let ((m (make-sparse-keymap)))
+    (define-key m (kbd "g") 'lsp-terraform-ls--modules-refresh)
+    m)
+  "Keymap for `lsp-terraform-modules-mode'.")
+
+(define-minor-mode lsp-terraform-modules-mode "LSP Treemacs mode for terraform modules."
+  :keymap lsp-terraform-modules-mode-map
+  :group 'lsp-terraform-ls)
+
+(cl-defstruct tf-package display-name doc-link installed-version version-constraint)
+
+(cl-defstruct tf-module name doc-link version source-type dependent-modules)
+
+(defun construct-tf-package (provider installed-version)
+  "Construct `TF-PACKAGE' using PROVIDER and INSTALLED-VERSION."
+  (make-tf-package :display-name (lsp-get provider :display_name)
+                   :doc-link (lsp-get provider :docs_link)
+                   :installed-version installed-version
+                   :version-constraint (lsp-get provider :version_constraint)))
+
+(lsp-defun construct-tf-module ((&terraform-ls:Module :name :docs-link :version :source-type :dependent-modules))
+  "Construct `TF-MODULE' using MODULE."
+  (make-tf-module :name name
+                  :doc-link docs-link
+                  :version version
+                  :source-type source-type
+                  :dependent-modules dependent-modules))
+
+(lsp-defun lsp-terraform-ls--providers-to-tf-package ((&terraform-ls:Providers :provider-requirements :installed-providers))
+  "Convert PROVIDERS-TREE-DATA to list of `tf-package'."
+  (let* ((provider-requirements-keys (hash-table-keys provider-requirements))
+         (installed-versions (mapcar (lambda (x) (lsp-get installed-providers (make-symbol (format ":%s" x)))) provider-requirements-keys))
+         (providers (mapcar (lambda (x) (lsp-get provider-requirements (make-symbol (format ":%s" x)))) provider-requirements-keys))
+         (tf-packages (-zip-with (lambda (x y) (construct-tf-package x y)) providers installed-versions)))
+    tf-packages))
+
+(lsp-defun lsp-terraform-ls--modules-to-tf-module ((&terraform-ls:ModuleCalls :module-calls))
+  "Convert MODULES-TREE-DATA to list of `TF-MODULE'."
+  (let* ((modules (-map (lambda (x) (construct-tf-module x)) module-calls)))
+    modules))
+
+(defun lsp-terraform-ls--fetch-modules-data (project-root)
+  "Fetch modules data and set it in `lsp-terraform-ls--modules-call-tree-data'."
+  (let* ((tree-data (lsp-request
+                     "workspace/executeCommand"
+                     (list :command "terraform-ls.module.calls"
+                           :arguments (vector (format "uri=%s" (lsp--path-to-uri project-root))))
+                     :no-wait nil
+                     :no-merge nil))
+         (modules (lsp-terraform-ls--modules-to-tf-module tree-data)))
+    (setq-local lsp-terraform-ls--modules-call-tree-data modules)))
+
+(defun lsp-terraform-ls--fetch-providers ()
+  "Fetch modules call data and set it in `lsp-terraform-ls--providers-tree-data'."
+  (let* ((tree-data (lsp-request
+                     "workspace/executeCommand"
+                     (list :command "terraform-ls.module.providers"
+                           :arguments (vector (format "uri=%s" (lsp--path-to-uri (lsp-workspace-root)))))
+                     :no-wait nil
+                     :no-merge nil))
+         (tf-packages (lsp-terraform-ls--providers-to-tf-package tree-data)))
+    (setq-local lsp-terraform-ls--providers-tree-data tf-packages)))
+
+(defun lsp-terraform-ls--tf-packages-to-treemacs (tf-packages)
+  "Convert list of `TF-PACKAGES' to treemacs compatible data."
+  (mapcar (lambda (package) (list :label (format "%s %s" (tf-package-display-name package) (tf-package-installed-version package))
+                                  :icon 'package
+                                  :key (tf-package-display-name package)
+                                  :children (list (list
+                                                   :icon 'library
+                                                   :label (tf-package-version-constraint package)))
+                                  :ret-action (lambda (&rest _) (browse-url (tf-package-doc-link package))))) tf-packages))
+
+(defun lsp-terraform-ls--tf-modules-to-treemacs (tf-modules)
+  "Convert list of `TF-MODULES' to treemacs compatible data."
+  (mapcar (lambda (module) (list :label (format "%s %s" (tf-module-name module) (tf-module-version module))
+                                 :icon 'package
+                                 :key (tf-module-name module)
+                                 :ret-action (lambda (&rest _) (browse-url (tf-module-doc-link module)))
+                                 )) tf-modules))
+
+(defun lsp-terraform-ls--show-providers (ignore-focus?)
+  "Show terraform providers and focus on it if IGNORE-FOCUS? is nil."
+  (unless lsp-terraform-ls--providers-tree-data
+    (lsp-terraform-ls--fetch-providers))
+  (let* ((lsp-terraform-treemacs
+          (lsp-terraform-ls--tf-packages-to-treemacs lsp-terraform-ls--providers-tree-data))
+         (buffer (lsp-treemacs-render lsp-terraform-treemacs
+                                      lsp-terraform-ls--providers-buffer-name
+                                      t
+                                      "Terraform Providers"))
+         (position-params (or lsp-terraform-ls-providers-position-params
+                              `((side . ,treemacs-position)
+                                (slot . 2)
+                                (window-width . ,treemacs-width))))
+         (window
+          (display-buffer-in-side-window buffer position-params)))
+    (unless ignore-focus?
+      (select-window window)
+      (set-window-dedicated-p window t))))
+
+(defun lsp-terraform-ls--show-module-calls (ignore-focus? project-root)
+  "Show terraform modules and focus on it if IGNORE-FOCUS? is nil."
+  (unless lsp-terraform-ls--modules-call-tree-data
+    (lsp-terraform-ls--fetch-modules-data project-root))
+  (unless lsp-terraform-ls--modules-call-tree-data
+    (error "Modules data is empty"))
+  (let* ((lsp-terraform-treemacs
+          (lsp-terraform-ls--tf-modules-to-treemacs lsp-terraform-ls--modules-call-tree-data))
+         (buffer (lsp-treemacs-render lsp-terraform-treemacs
+                                      lsp-terraform-ls--modules-buffer-name
+                                      t
+                                      "Terraform Modules"))
+         (modules-buffer (current-buffer))
+         (position-params (or lsp-terraform-ls-module-calls-position-params
+                              `((side . ,treemacs-position)
+                                (slot . 1)
+                                (window-width . ,treemacs-width))))
+         (window
+          (display-buffer-in-side-window buffer position-params)))
+    (select-window window)
+    (setq-local lsp-tf--modules-control-buffer modules-buffer)
+    (lsp-terraform-modules-mode t)
+    (set-window-dedicated-p window t)
+    (when ignore-focus?
+      (select-window (previous-window)))))
+
+(defun lsp-terraform-ls--refresh-module-calls ()
+  "Refresh terraform modules."
+  (lsp-terraform-ls--fetch-modules-data (lsp-workspace-root))
+  (unless lsp-terraform-ls--modules-call-tree-data
+    (error "Modules data is empty"))
+  (let* ((lsp-terraform-treemacs
+          (lsp-terraform-ls--tf-modules-to-treemacs lsp-terraform-ls--modules-call-tree-data))
+         (buffer (lsp-treemacs-render lsp-terraform-treemacs
+                                      lsp-terraform-ls--modules-buffer-name
+                                      t
+                                      "Terraform Modules"))
+         (position-params (or lsp-terraform-ls-module-calls-position-params
+                              `((side . ,treemacs-position)
+                                (slot . 1)
+                                (window-width . ,treemacs-width))))
+         (window
+          (display-buffer-in-side-window buffer position-params)))
+    (select-window window)
+    (lsp-terraform-modules-mode t)
+    (set-window-dedicated-p window t)
+    (lsp--info "Refresh completed")))
+
+(defun lsp-terraform-ls-providers (&optional ignore-focus?)
+  "Show terraform providers with focus on it if IGNORE-FOCUS? is nil."
+  (interactive)
+  (if (require 'lsp-treemacs nil t)
+      (lsp-terraform-ls--show-providers ignore-focus?)
+    (error "The package lsp-treemacs is not installed")))
+
+(defun lsp-terraform-ls-module-calls (&optional ignore-focus?)
+  "Show terraform modules with focus on it if IGNORE-FOCUS? is nil."
+  (interactive)
+  (if (require 'lsp-treemacs nil t)
+      (lsp-terraform-ls--show-module-calls ignore-focus? (lsp-workspace-root))
+    (error "The package lsp-treemacs is not installed")))
+
+(defun lsp-terraform-ls--modules-refresh ()
+  "Refresh terraform modules data."
+  (interactive)
+  (unless (buffer-live-p lsp-tf--modules-control-buffer)
+    (error "Original buffer not present.  Do M-x lsp-terraform-ls-module-calls"))
+  (with-current-buffer lsp-tf--modules-control-buffer
+    (lsp-terraform-ls--refresh-module-calls)))
+
+(provide 'lsp-terraform)
+;;; lsp-terraform.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-tex.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-tex.el
new file mode 100644
index 0000000..61c585a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-tex.el
@@ -0,0 +1,68 @@
+;;; lsp-tex.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, tex
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the Tex Typesetting Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-tex nil
+  "LSP support for TeX and friends, using Digestif and texlab."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/astoff/digestif/")
+  :link '(url-link "https://github.com/latex-lsp/texlab"))
+
+(defcustom lsp-tex-server 'texlab
+  "Choose LSP tex server."
+  :type '(choice (const :tag "texlab" texlab)
+                 (const :tag "digestif" digestif))
+  :group 'lsp-tex)
+
+(defcustom lsp-clients-digestif-executable "digestif"
+  "Command to start the Digestif language server."
+  :group 'lsp-tex
+  :risky t
+  :type 'file)
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection lsp-clients-digestif-executable)
+                  :major-modes '(plain-tex-mode latex-mode context-mode texinfo-mode LaTeX-mode)
+                  :priority (if (eq lsp-tex-server 'digestif) 1 -1)
+                  :server-id 'digestif))
+
+(defcustom lsp-clients-texlab-executable "texlab"
+  "Command to start the texlab language server."
+  :group 'lsp-tex
+  :risky t
+  :type 'file)
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection lsp-clients-texlab-executable)
+                  :major-modes '(plain-tex-mode latex-mode LaTeX-mode)
+                  :priority (if (eq lsp-tex-server 'texlab) 1 -1)
+                  :server-id 'texlab))
+
+(lsp-consistency-check lsp-tex)
+
+(provide 'lsp-tex)
+;;; lsp-tex.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-tilt.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-tilt.el
new file mode 100644
index 0000000..8b82ecd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-tilt.el
@@ -0,0 +1,36 @@
+;;; lsp-tilt.el --- tilt LSP                      -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023  konubinix
+;; Copyright (C) 2023-2026 lsp-mode maintainers
+
+;; Author: konubinix <konubinixweb@gmail.com>
+;; Keywords: tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Using tilt mode from https://github.com/Konubinix/tilt-mode
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(lsp-register-client
+    (make-lsp-client :new-connection (lsp-stdio-connection '("tilt" "lsp" "start"))
+        :activation-fn (lsp-activate-on "tiltfile")
+        :server-id 'tiltfile))
+
+(provide 'lsp-tilt)
+;;; lsp-tilt.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-toml-tombi.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-toml-tombi.el
new file mode 100644
index 0000000..1cbf8a4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-toml-tombi.el
@@ -0,0 +1,56 @@
+;;; lsp-toml-tombi.el --- lsp-mode TOML integration  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2025-2026  Sibi Prabakaran
+
+;; Author: Sibi Prabakaran <sibi@psibi.in>
+;; Keywords: lsp, toml
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Client for tombi
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-tombi-toml nil
+  "LSP support for TOML, using Tombi."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/tombi-toml/tombi"))
+
+(defcustom lsp-tombi-toml-command "tombi"
+  "Path to tombi command."
+  :type 'string
+  :group 'lsp-tombi-toml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-tombi-toml--check-enabled (_file-name _mode)
+  "Check if the tombi language server should be enabled in this buffer."
+  (when (string= (lsp-buffer-language) "toml")
+    t))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda () (list lsp-tombi-toml-command "lsp")))
+  :activation-fn #'lsp-tombi-toml--check-enabled
+  :multi-root t
+  :server-id 'tombi
+  :priority -2))
+
+(lsp-consistency-check lsp-tombi-toml)
+
+(provide 'lsp-toml-tombi)
+;;; lsp-toml-tombi.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-toml.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-toml.el
new file mode 100644
index 0000000..441e9c7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-toml.el
@@ -0,0 +1,172 @@
+;;; lsp-toml.el --- lsp-mode TOML integration  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  Taiki Sugawara
+;; Copyright (C) 2021-2026 lsp-mode maintainers
+
+;; Author: Taiki Sugawara <buzz.taiki@gmail.com>
+;; Keywords: lsp, toml
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Client for taplo.
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'ht)
+(require 'f)
+
+(defgroup lsp-toml nil
+  "LSP support for TOML, using Taplo."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/tamasfe/taplo"))
+
+(defcustom lsp-toml-command "taplo"
+  "Path to taplo command."
+  :type 'string
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-toml-cache-path (expand-file-name
+                                (locate-user-emacs-file (f-join ".cache" "lsp-toml")))
+  "Path to cache."
+  :type 'string
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-defcustom lsp-toml-taplo-config-file-path nil
+  "An absolute, or workspace relative path to the Taplo configuration file."
+  :type 'string
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "evenBetterToml.taplo.configFile.path")
+
+(lsp-defcustom lsp-toml-taplo-config-file-enabled t
+  "Whether to enable the usage of a Taplo configuration file."
+  :type 'boolean
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "evenBetterToml.taplo.configFile.enabled")
+
+(lsp-defcustom lsp-toml-semantic-tokens nil
+  "Enable semantic tokens for inline table and array keys."
+  :type 'boolean
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "evenBetterToml.semanticTokens")
+
+(lsp-defcustom lsp-toml-schema-enabled t
+  "Enable completion and validation based on JSON schemas."
+  :type 'boolean
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "evenBetterToml.schema.enabled")
+
+(lsp-defcustom lsp-toml-schema-links nil
+  "Whether to show clickable links for keys in the editor."
+  :type 'boolean
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "evenBetterToml.schema.links")
+
+(lsp-defcustom lsp-toml-schema-catalogs
+  ["https://www.schemastore.org/api/json/catalog.json"]
+  "A list of URLs to schema catalogs where schemas and associations
+can be fetched from"
+  :type 'lsp-string-vector
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "evenBetterToml.schema.catalogs")
+
+(lsp-defcustom lsp-toml-schema-associations nil
+  "Additional document and schema associations.
+
+The key must be a regular expression, this pattern is used to
+associate schemas with absolute document URIs.
+
+The value must be an absolute URI to the JSON schema"
+  :type '(alist :key-type symbol :value-type string)
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "evenBetterToml.schema.associations")
+
+(lsp-defcustom lsp-toml-schema-cache-memory-expiration 60
+  "The amount of seconds after which schemas will be invalidated from memory."
+  :type 'number
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "evenBetterToml.schema.cache.memoryExpiration")
+
+(lsp-defcustom lsp-toml-schema-cache-disk-expiration 600
+  "The amount of seconds after which cached catalogs and schemas
+expire and will be attempted to be fetched again."
+  :type 'number
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "evenBetterToml.schema.cache.diskExpiration")
+
+(lsp-defcustom lsp-toml-completion-max-keys 5
+  "The maximum amount of keys in a dotted key to display during
+completion, 0 effectively disables key completions."
+  :type 'number
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "evenBetterToml.completion.maxKeys")
+
+(lsp-defcustom lsp-toml-syntax-semantic-tokens t
+  "Whether to enable semantic tokens for tables and arrays."
+  :type 'boolean
+  :group 'lsp-toml
+  :package-version '(lsp-mode . "9.0.0")
+  :lsp-path "evenBetterToml.syntax.semanticTokens")
+
+
+(defun lsp-toml--initialization-options ()
+  "Initialization options for taplo."
+  (list :configurationSection "evenBetterToml"
+        :cachePath lsp-toml-cache-path))
+
+(defun lsp-toml--handle-message-with-output (_workspace params)
+  "Handle taplo/messageWithOutput notification with PARAMS."
+  (funcall (pcase (ht-get params "kind")
+             ("error" 'lsp--error)
+             ("warn" 'lsp--warn)
+             ("info" 'lsp--info)
+             (_ 'lsp--info))
+           "lsp-toml: %s"
+           (ht-get params "message")))
+
+(defun lsp-toml--check-enabled (_file-name _mode)
+  "Check if the taplo language server should be enabled in this buffer."
+  (when (string= (lsp-buffer-language) "toml")
+    (make-directory lsp-toml-cache-path t)
+    t))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda () (list lsp-toml-command "lsp" "stdio")))
+  :activation-fn #'lsp-toml--check-enabled
+  :initialization-options #'lsp-toml--initialization-options
+  :notification-handlers (ht ("taplo/messageWithOutput" #'lsp-toml--handle-message-with-output)
+                             ("taplo/didChangeSchemaAssociation" #'ignore))
+  :multi-root t
+  :server-id 'taplo
+  :priority -1))
+
+(lsp-consistency-check lsp-toml)
+
+(provide 'lsp-toml)
+;;; lsp-toml.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-trunk.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-trunk.el
new file mode 100644
index 0000000..b4a01ed
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-trunk.el
@@ -0,0 +1,89 @@
+;;; lsp-trunk.el --- trunk support -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2024 Trunk Technologies, Inc.
+;; Copyright (C) 2024-2026 lsp-mode maintainers
+;;
+;; Author: Tyler Jang <tyler@trunk.io>
+;; Keywords: trunk, lsp, meta-linter
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;; This file is not part of GNU Emacs.
+;;
+;;; Commentary:
+;;
+;;  Trunk support for lsp-mode
+;;
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-trunk nil
+  "LSP support for Trunk."
+  :group 'lsp-mode
+  :link `(url-link "https://docs.trunk.io"))
+
+(defcustom lsp-trunk-executable "trunk"
+  "Path to the trunk executable"
+  :group 'lsp-trunk
+  :type 'string)
+
+(defcustom lsp-trunk-args '("lsp-proxy")
+  "Additional arguments to pass to the trunk startup"
+  :group 'lsp-trunk
+  :type '(repeat string))
+
+(defun lsp-trunk-check-for-init (filename &optional _)
+  "Check if the file exists in a workspace that has a .trunk/trunk.yaml"
+  (when-let* ((dir (file-name-directory filename))
+             (trunk-file ".trunk/trunk.yaml"))
+    (locate-dominating-file dir trunk-file)))
+
+(defun lsp-trunk-check-disable (command)
+  "Disable a linter in your repo."
+  (shell-command
+   (concat lsp-trunk-executable " check disable "
+           (mapconcat 'identity (gethash "arguments" command) " "))))
+
+(defun lsp-trunk-check-enable (command)
+  "Enable a linter in your repo."
+  (shell-command
+   (concat lsp-trunk-executable " check enable "
+           (mapconcat 'identity (gethash "arguments" command) " "))))
+
+(defun lsp-trunk-open-config (&optional _command)
+  "Open the trunk config file."
+  (find-file ".trunk/trunk.yaml"))
+
+(lsp-register-client
+ (make-lsp-client
+  :activation-fn #'lsp-trunk-check-for-init
+  :new-connection (lsp-stdio-connection 
+                   (lambda () (append (list lsp-trunk-executable) lsp-trunk-args)))
+  :server-id 'trunk-lsp
+  :initialization-options (lambda ()
+                            (list
+                             :version "0.1.0"
+                             :clientType "emacs"
+                             :clientVersion (symbol-value 'emacs-version)))
+  :notification-handlers (ht ("$/progress" #'ignore))
+  :action-handlers (ht ("trunk.checkDisable" #'lsp-trunk-check-disable)
+                       ("trunk.checkEnable" #'lsp-trunk-check-enable)
+                       ("trunk.openConfigFile" #'lsp-trunk-open-config))
+  :priority -2
+  :add-on? t))
+
+(lsp-consistency-check lsp-trunk)
+
+(provide 'lsp-trunk)
+;;; lsp-trunk.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ts-query.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ts-query.el
new file mode 100644
index 0000000..68c74f1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ts-query.el
@@ -0,0 +1,136 @@
+;;; lsp-ts-query.el --- LSP client for tree-sitter query  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024-2026  emacs-lsp maintainers
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; LSP client for tree-sitter query.
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(declare-function tree-sitter-langs--bin-dir "ext:tree-sitter-langs-build.el")
+
+(defgroup lsp-ts-query nil
+  "LSP client for tree-sitter query."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/ribru17/ts_query_ls"))
+
+(defcustom lsp-ts-query-executable "ts_query_ls"
+  "The ts-query-ls executable to use.
+
+Leave as just the executable name to use the default behavior of finding the
+executable with variable `exec-path'."
+  :group 'lsp-ts-query
+  :type 'string)
+
+(defcustom lsp-ts-query-parser-install-directories
+  (cl-remove-if #'null
+                (vector (expand-file-name (locate-user-emacs-file "tree-sitter"))
+                        (and (featurep 'tree-sitter-langs)
+                             (tree-sitter-langs--bin-dir))))
+  "Where to look for parsers, of the form <lang>.(so|dll|dylib) or
+tree-sitter-<lang>.wasm."
+  :group 'lsp-ts-query
+  :type '(vector string))
+
+(defcustom lsp-ts-query-language-retrieval-patterns nil
+  "A list of patterns to aid the LSP in finding a language, given a file
+path. Patterns must have one capture group which represents the language
+name. Ordered from highest to lowest precedence."
+  :group 'lsp-ts-query
+  :type '(vector string))
+
+;;
+;;; Installation
+
+(defcustom lsp-ts-query-server-store-path
+  (expand-file-name "ts-query/" lsp-server-install-dir)
+  "The path to the file in which ts-query will be stored."
+  :type 'file
+  :group 'lsp-ts-query)
+
+(defconst lsp-ts-query--download-url-format
+  "https://github.com/ribru17/ts_query_ls/releases/latest/download/ts_query_ls-%s-%s.%s"
+  "Format to the download url link.")
+
+(defun lsp-ts-query--url ()
+  "Return Url points to the ts-query' zip/tar file."
+  (let* ((x86 (string-prefix-p "x86_64" system-configuration))
+         (arch (if x86 "x86_64" "aarch64")))
+    (cl-case system-type
+      ((cygwin windows-nt ms-dos)
+       (format lsp-ts-query--download-url-format arch "pc-windows-msvc" "zip"))
+      (darwin
+       (format lsp-ts-query--download-url-format arch "apple-darwin" "tar.gz"))
+      (gnu/linux
+       (format lsp-ts-query--download-url-format arch "unknown-linux-gnu" "tar.gz")))))
+
+(defun lsp-ts-query--stored-executable ()
+  "Return the stored ts-query executable.
+
+This is differ from the variable `lsp-ts-query-executable'; this is local storage
+and not the global storage."
+  (f-join lsp-ts-query-server-store-path
+          (pcase system-type ('windows-nt "ts_query_ls.exe") (_ "ts_query_ls"))))
+
+(lsp-dependency
+ 'ts-query-ls
+ '(:system "ts_query_ls")
+ `(:download :url ,(lsp-ts-query--url)
+             :decompress ,(pcase system-type ('windows-nt :zip) (_ :targz))
+             :store-path ,(f-join lsp-ts-query-server-store-path "temp")
+             :set-executable? t)
+ `(:system ,(lsp-ts-query--stored-executable)))
+
+(defun lsp-ts-query--check-enabled (file-name _mode)
+  "Check if the the language server should be enabled in this buffer
+or FILE-NAME."
+  (let ((ext (file-name-extension file-name)))
+    (when (and (string-match-p "/queries/" file-name)
+               (equal "scm" ext))
+      t)))
+
+(defun lsp-ts-query--make-init-options ()
+  "Init options for ts-query server."
+  `( :parser_install_directories ,lsp-ts-query-parser-install-directories
+     :language_retrieval_patterns ,lsp-ts-query-language-retrieval-patterns))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda () (or (executable-find lsp-ts-query-executable)
+                                  (lsp-ts-query--stored-executable)))
+                   (lambda ()
+                     (or (executable-find lsp-ts-query-executable)
+                         (file-executable-p (lsp-ts-query--stored-executable)))))
+  :activation-fn #'lsp-ts-query--check-enabled
+  :priority -1
+  :add-on? t
+  :initialization-options #'lsp-ts-query--make-init-options
+  :server-id 'ts-query-ls
+  :download-server-fn
+  (lambda (_client callback error-callback _update?)
+    (lsp-package-ensure 'ts-query-ls callback error-callback))))
+
+(lsp-consistency-check lsp-ts-query)
+
+(provide 'lsp-ts-query)
+;;; lsp-ts-query.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ttcn3.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ttcn3.el
new file mode 100644
index 0000000..18553b9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-ttcn3.el
@@ -0,0 +1,51 @@
+;;; lsp-ttcn3.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, ttcn3
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the TTCN3 Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-ttcn3 nil
+  "LSP support for TTCN3, using ntt-language-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/nokia/ntt"))
+
+(defcustom lsp-ttcn3-lsp-server-command
+  '("ntt" "langserver")
+  "Command to start ttcn3-language-server."
+  :group 'lsp-ttcn3
+  :type '(choice
+          (string :tag "Single string value")
+          (repeat :tag "List of string values"
+                  string)))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection lsp-ttcn3-lsp-server-command)
+                  :activation-fn (lsp-activate-on "ttcn3")
+                  :priority -1
+                  :server-id 'ntt))
+
+(provide 'lsp-ttcn3)
+;;; lsp-ttcn3.el ends here
+
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typeprof.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typeprof.el
new file mode 100644
index 0000000..a7d5395
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typeprof.el
@@ -0,0 +1,62 @@
+;;; lsp-typeprof.el --- TypeProf server configuration  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2022  Taiki Sugawara
+;; Copyright (C) 2022-2026 lsp-mode maintainers
+
+;; Author: Taiki Sugawara <buzz.taiki@gmail.com>
+;; Keywords: lsp, ruby
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Client for TypeProf.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-typeprof nil
+  "LSP support for Ruby, using the TypeProf language server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/ruby/typeprof")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-typeprof-use-bundler nil
+  "Run typeprof under bundler."
+  :type 'boolean
+  :safe #'booleanp
+  :group 'lsp-typeprof
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-typeprof--build-command ()
+  "Build typeprof command."
+  (let ((lsp-command '("typeprof" "--lsp" "--stdio")))
+    (if lsp-typeprof-use-bundler
+              (append '("bundle" "exec") lsp-command)
+            lsp-command)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   #'lsp-typeprof--build-command)
+  :priority -4
+  :activation-fn (lsp-activate-on "ruby")
+  :server-id 'typeprof-ls
+  :multi-root t))
+
+(lsp-consistency-check lsp-typeprof)
+
+(provide 'lsp-typeprof)
+;;; lsp-typeprof.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typespec.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typespec.el
new file mode 100644
index 0000000..d0f1494
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typespec.el
@@ -0,0 +1,90 @@
+;;; lsp-typespec.el --- Typespec Client settings -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024  jeremy.ymeng@gmail.com
+;; Copyright (C) 2024-2026 lsp-mode maintainers
+
+;; Author: Jeremy Meng  <jeremy.ymeng@gmail.com>
+;; Keywords: languages,tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; lsp-typespec client
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-semantic-tokens)
+
+(defgroup lsp-typespec nil
+  "LSP support for Typespec."
+  :link '(url-link "https://github.com/microsoft/typespec/blob/9c95ccda8c84c7c6afa24b2f4b21cf1ecbe680dd/packages/compiler/cmd/tsp-server.js")
+  :group 'lsp-mode
+  :tag "Lsp Typespec")
+
+(defcustom lsp-typespec-custom-server-command nil
+  "The typespec-lisp server command."
+  :group 'lsp-typespec
+  :risky t
+  :type '(repeat string))
+
+(lsp-dependency
+ 'typespec-lsp
+ '(:npm
+   :package "@typespec/compiler"
+   :path "tsp-server")
+ '(:system "tsp-server"))
+
+(defun lsp-typespec--server-executable-path ()
+  "Return the typespec-lsp server command."
+  (or
+   (when-let* ((workspace-folder (lsp-find-session-folder (lsp-session) default-directory)))
+     (let ((tsp-server-local-path (f-join workspace-folder "node_modules" ".bin"
+                                          (if (eq system-type 'windows-nt) "tsp-server.cmd" "tsp-server"))))
+       (when (f-exists? tsp-server-local-path)
+         tsp-server-local-path)))
+   (executable-find "tsp-server")
+   (lsp-package-path 'tsp-server)
+   "tsp-server"))
+
+(lsp-register-client
+ (make-lsp-client
+  :semantic-tokens-faces-overrides '(:types (("docCommentTag" . font-lock-keyword-face)
+                                             ("event" . default)))
+  :new-connection (lsp-stdio-connection `(,(lsp-typespec--server-executable-path) "--stdio"))
+  :activation-fn (lsp-activate-on "typespec")
+  :major-modes '(typespec-mode typespec-ts-mode)
+  :server-id 'typespec-lsp))
+
+(lsp-consistency-check lsp-typespec)
+
+(defun lsp-typespec-semantic-tokens-refresh (&rest _)
+  "Force refresh semantic tokens."
+  (when-let* ((workspace (and lsp-semantic-tokens-enable
+                              (lsp-find-workspace 'typespec-lsp (buffer-file-name)))))
+    (--each (lsp--workspace-buffers workspace)
+      (when (lsp-buffer-live-p it)
+        (lsp-with-current-buffer it
+          (lsp-semantic-tokens--enable))))))
+
+(with-eval-after-load 'typespec
+  (when lsp-semantic-tokens-enable
+    ;; refresh tokens
+    (dolist (hook '(typespec-mode-hook typespec-ts-mode-hook))
+      (add-hook hook #'lsp-typespec-semantic-tokens-refresh))))
+
+(provide 'lsp-typespec)
+;;; lsp-typespec.el ends here
+
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typos.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typos.el
new file mode 100644
index 0000000..eec5b61
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typos.el
@@ -0,0 +1,86 @@
+;;; lsp-typos.el --- LSP client for typos-lsp -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2025 Thanh Vuong
+;; Copyright (C) 2025-2026 emacs-lsp maintainers
+;;
+;; Author: Thanh Vuong <thanhvg@gmail.com>
+;; Keywords: lsp, typos
+;;
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;; LSP client for typos-lsp
+;;
+;; This client is disabled by default to avoid confusion as it will run
+;; everywhere lsp mode is on if enabled. Users could use
+;; https://www.gnu.org/software/emacs/manual/html_node/emacs/Directory-Variables.html
+;; to have it run per project.
+;;
+;; Consult https://github.com/tekumara/typos-lsp and
+;; https://github.com/crate-ci/typos for more information.
+;;
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-typos nil
+  "LSP support for typos source code spell checker."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/tekumara/typos-lsp"))
+
+(defcustom lsp-typos-path "typos-lsp"
+  "Path to typos-lsp executable."
+  :group 'lsp-typos
+  :type 'string)
+
+(defcustom lsp-typos-enable nil
+  "Enable or disable LSP Typos."
+  :group 'lsp-typos
+  :type 'boolean
+  :safe #'booleanp)
+
+(defcustom lsp-typos-config nil
+  "Path to toml config file."
+  :group 'lsp-typos
+  :type '(choice (const :tag "None" nil)
+                 (string :tag "Toml File Path") )
+  :safe (lambda (it) (or (stringp it) (null it))))
+
+(defcustom lsp-typos-diagnostic-severity "Warning"
+  "Severity level for typos diagnostics.
+Can be one of \"Error\",\"Warning\", \"Information\", or \"Hint\"."
+  :group 'lsp-typos
+  :type '(choice
+          (const :tag "Error" "Error")
+          (const :tag "Warning" "Warning")
+          (const :tag "Information" "Information")
+          (const :tag "Hint" "Hint"))
+  :safe #'stringp)
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection lsp-typos-path)
+  :activation-fn (lambda (_file-name _mode) lsp-typos-enable)
+  :initialization-options (lambda ()
+                            (append (when lsp-typos-config
+                                      `(:config ,lsp-typos-config))
+                                    `(:diagnosticSeverity ,lsp-typos-diagnostic-severity)))
+  :priority -1
+  :add-on? t
+  :multi-root t
+  :server-id 'typos-lsp))
+
+(provide 'lsp-typos)
+;;; lsp-typos.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typst.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typst.el
new file mode 100644
index 0000000..b0dfc07
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-typst.el
@@ -0,0 +1,186 @@
+;;; lsp-typst.el --- lsp-mode Typst integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, languages
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  Client for the Tinymist language server for Typst.
+;;  https://github.com/Myriad-Dreamin/tinymist
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-typst nil
+  "LSP support for Typst, using Tinymist."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/Myriad-Dreamin/tinymist")
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defcustom lsp-typst-server-command '("tinymist")
+  "Command to run the Tinymist language server."
+  :type '(repeat string)
+  :group 'lsp-typst
+  :risky t
+  :package-version '(lsp-mode . "10.0.0"))
+
+;;; Formatter options
+
+(lsp-defcustom lsp-typst-formatter-mode "typstyle"
+  "Formatter to use for Typst documents."
+  :type '(choice (const "disable")
+                 (const "typstyle")
+                 (const "typstfmt"))
+  :group 'lsp-typst
+  :lsp-path "tinymist.formatterMode"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-typst-formatter-indent-size 2
+  "Number of spaces for indentation."
+  :type 'number
+  :group 'lsp-typst
+  :lsp-path "tinymist.formatterIndentSize"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-typst-formatter-print-width 120
+  "Soft limit on line width for the formatter."
+  :type 'number
+  :group 'lsp-typst
+  :lsp-path "tinymist.formatterPrintWidth"
+  :package-version '(lsp-mode . "10.0.0"))
+
+;;; Export options
+
+(lsp-defcustom lsp-typst-export-pdf "never"
+  "When to export PDF.
+Possible values: never, onSave, onType, onDocumentHasTitle."
+  :type '(choice (const "never")
+                 (const "onSave")
+                 (const "onType")
+                 (const "onDocumentHasTitle"))
+  :group 'lsp-typst
+  :lsp-path "tinymist.exportPdf"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-typst-export-target "paged"
+  "Export target format."
+  :type '(choice (const "paged")
+                 (const "html"))
+  :group 'lsp-typst
+  :lsp-path "tinymist.exportTarget"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-typst-output-path ""
+  "Path pattern for output files.
+Supports $root, $dir, $name variable substitution."
+  :type 'string
+  :group 'lsp-typst
+  :risky t
+  :lsp-path "tinymist.outputPath"
+  :package-version '(lsp-mode . "10.0.0"))
+
+;;; Lint options
+
+(lsp-defcustom lsp-typst-lint-enabled nil
+  "Enable or disable lint checks."
+  :type 'boolean
+  :group 'lsp-typst
+  :lsp-path "tinymist.lint.enabled"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-typst-lint-when "onSave"
+  "When to perform lint checks."
+  :type '(choice (const "onSave")
+                 (const "onType"))
+  :group 'lsp-typst
+  :lsp-path "tinymist.lint.when"
+  :package-version '(lsp-mode . "10.0.0"))
+
+;;; Font and path options
+
+(lsp-defcustom lsp-typst-font-paths nil
+  "List of file or directory paths to fonts."
+  :type 'lsp-string-vector
+  :group 'lsp-typst
+  :risky t
+  :lsp-path "tinymist.fontPaths"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-typst-system-fonts t
+  "Include system fonts in font search."
+  :type 'boolean
+  :group 'lsp-typst
+  :lsp-path "tinymist.systemFonts"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-typst-root-path nil
+  "Root path for absolute paths in Typst.
+Set to \"-\" to use parent directory of the file."
+  :type '(choice (const nil)
+                 string)
+  :group 'lsp-typst
+  :risky t
+  :lsp-path "tinymist.rootPath"
+  :package-version '(lsp-mode . "10.0.0"))
+
+;;; Miscellaneous options
+
+(lsp-defcustom lsp-typst-semantic-tokens t
+  "Enable semantic tokens for syntax highlighting."
+  :type 'boolean
+  :group 'lsp-typst
+  :lsp-path "tinymist.semanticTokens"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-typst-project-resolution "singleFile"
+  "How to resolve projects.
+singleFile: Manage documents like Markdown.
+lockDatabase: Manage documents like Rust with project tracking."
+  :type '(choice (const "singleFile")
+                 (const "lockDatabase"))
+  :group 'lsp-typst
+  :lsp-path "tinymist.projectResolution"
+  :package-version '(lsp-mode . "10.0.0"))
+
+(lsp-defcustom lsp-typst-extra-args ""
+  "Extra arguments to pass to the Typst compiler."
+  :type 'string
+  :group 'lsp-typst
+  :lsp-path "tinymist.typstExtraArgs"
+  :package-version '(lsp-mode . "10.0.0"))
+
+;;; Client registration
+
+(lsp-dependency 'tinymist
+                '(:system "tinymist"))
+
+(lsp-register-client
+ (make-lsp-client :server-id 'tinymist
+                  :new-connection (lsp-stdio-connection (lambda () lsp-typst-server-command))
+                  :activation-fn (lsp-activate-on "typst")
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration
+                                       (lsp-configuration-section "tinymist"))))
+                  :synchronize-sections '("tinymist")))
+
+(lsp-consistency-check lsp-typst)
+
+(provide 'lsp-typst)
+;;; lsp-typst.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-v.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-v.el
new file mode 100644
index 0000000..c168a2e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-v.el
@@ -0,0 +1,91 @@
+;;; lsp-v.el --- lsp-mode V integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021 remimimimi
+;; Copyright (C) 2024 niontrix
+;; Copyright (C) 2021-2026 lsp-mode maintainers
+
+;; Author: remimimimi
+;;         niontrix
+;; Keywords: languages,tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  Basic configuration for V LSP support
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-v nil
+  "LSP support for V via vls. NOTICE!: `vls' is deprecated"
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/vlang/vls/tree/master"))
+
+(defgroup lsp-v-analyzer nil
+  "LSP support for V, using v-analyzer."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/vlang/v-analyzer"))
+
+(defcustom lsp-v-vls-executable "vls"
+  "NOTICE!: vls is deprecated you should use `v-analyzer' instead.
+The vls executable to use.
+Leave as just the executable name to use the default behavior of
+finding the executable with variable `exec-path'. "
+  :group 'lsp-v
+  :type 'string
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-v-analyzer-path "v-analyzer"
+  "Path to `v-analyzer'
+Leave as just the executable name to use the default behavior of
+finding the executable with variable `exec-path'. "
+  :type 'string
+  :group 'lsp-v
+  :package-version '(lsp-mode . "9.0.0"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda () lsp-v-vls-executable))
+                  :activation-fn (lsp-activate-on "V")
+                  :priority -1
+                  :server-id 'v-ls))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda () lsp-v-analyzer-path))
+                  :activation-fn (lsp-activate-on "v")
+                  :notification-handlers
+                  (ht ("experimental/serverStatus" #'ignore))
+                  :language-id "v"
+                  :priority 1
+                  :server-id 'v-analyzer))
+
+(defun lsp-v-analyzer-init ()
+  "Runs the `v-analyzer init' command in the root folder of the current project.
+After this `v-analyzer' can be further configured through the file
+`.v-analyzer/config.toml'."
+  (interactive)
+  (let* ((project-root (lsp--suggest-project-root))
+         (default-directory project-root)
+         (v-analyzer-config ".v-analyzer/config.toml"))
+    (when (and project-root
+               (not (file-exists-p v-analyzer-config)))
+      (message
+       (shell-command-to-string (concat lsp-v-analyzer-path " init"))))))
+
+(lsp-consistency-check lsp-v)
+
+(provide 'lsp-v)
+;;; lsp-v.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vala.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vala.el
new file mode 100644
index 0000000..57b1184
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vala.el
@@ -0,0 +1,52 @@
+;;; lsp-vala.el --- Vala Client settings         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020 Daniel Svensson
+;; Copyright (C) 2020-2026 lsp-mode maintainers
+
+;; Author: Daniel Svensson
+;; Keywords: vala lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP client for Vala
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-vala nil
+  "LSP support for Vala, using vala-language-server"
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/benwaffle/vala-language-server")
+  :package-version `(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clients-vala-ls-executable "vala-language-server"
+  "Path to the `vala-language-server' binary."
+  :group 'lsp-vala
+  :risky t
+  :type 'file
+  :package-version `(lsp-mode . "8.0.0"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection (lambda () lsp-clients-vala-ls-executable))
+                  :major-modes '(vala-mode)
+                  :priority -1
+                  :server-id 'valals))
+
+(lsp-consistency-check lsp-vala)
+
+(provide 'lsp-vala)
+;;; lsp-vala.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-verilog.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-verilog.el
new file mode 100644
index 0000000..2cd9721
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-verilog.el
@@ -0,0 +1,214 @@
+;;; lsp-verilog.el --- Verilog Client settings         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019 Patrick Grogan
+;; Copyright (C) 2019-2026 lsp-mode maintainers
+
+;; Author: Patrick Grogan <pogrogan@gmail.com>
+;; Created: 7 December 2019
+;; Keywords: languages, lsp, verilog
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; LSP client support for Verilog/SystemVerilog. The following language
+;; servers are available:
+;;   1) HDL Checker. See https://github.com/suoto/hdl_checker
+;;   2) SVLangserver. See https://github.com/imc-trading/svlangserver
+;;   3) Verible. See https://github.com/chipsalliance/verible
+;;
+;; This file is based on the lsp-vhdl.el file.
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-svlangserver nil
+  "Settings for the SystemVerilog language server client."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/imc-trading/svlangserver")
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-clients-svlangserver-includeIndexing '["**/*.{sv,svh}"]
+  "Files included for indexing (glob pattern)"
+  :group 'lsp-svlangserver
+  :type '(lsp-repeatable-vector string)
+  :safe (lambda (x) (seq-every-p #'stringp x)))
+
+(defcustom lsp-clients-svlangserver-excludeIndexing '["test/**/*.{sv,svh}"]
+  "Files excluded for indexing (glob pattern)"
+  :group 'lsp-svlangserver
+  :type '(lsp-repeatable-vector string)
+  :safe (lambda (x) (seq-every-p #'stringp x)))
+
+(defcustom lsp-clients-svlangserver-defines nil
+  "Defines needed for linting"
+  :group 'lsp-svlangserver
+  :type '(lsp-repeatable-vector string)
+  :safe (lambda (x) (seq-every-p #'stringp x)))
+
+(defcustom lsp-clients-svlangserver-launchConfiguration "verilator -sv --lint-only -Wall"
+  "Verilator command used for linting"
+  :group 'lsp-svlangserver
+  :type 'string
+  :safe (lambda (x) (stringp x)))
+
+(defcustom lsp-clients-svlangserver-lintOnUnsaved t
+  "Enable linting on unsaved files"
+  :group 'lsp-svlangserver
+  :type 'boolean
+  :safe (lambda (x) (booleanp x)))
+
+(defcustom lsp-clients-svlangserver-formatCommand "verible-verilog-format"
+  "Verible verilog format command"
+  :group 'lsp-svlangserver
+  :type 'string
+  :safe (lambda (x) (stringp x)))
+
+(defcustom lsp-clients-svlangserver-disableCompletionProvider nil
+  "Disable auto completion provided by the language server"
+  :group 'lsp-svlangserver
+  :type 'boolean
+  :safe (lambda (x) (booleanp x)))
+
+(defcustom lsp-clients-svlangserver-disableHoverProvider nil
+  "Disable hover over help provided by the language server"
+  :group 'lsp-svlangserver
+  :type 'boolean
+  :safe (lambda (x) (booleanp x)))
+
+(defcustom lsp-clients-svlangserver-disableSignatureHelpProvider nil
+  "Disable signature help provided by the language server"
+  :group 'lsp-svlangserver
+  :type 'boolean
+  :safe (lambda (x) (booleanp x)))
+
+(defcustom lsp-clients-svlangserver-disableLinting nil
+  "Disable verilator linting"
+  :group 'lsp-svlangserver
+  :type 'boolean
+  :safe (lambda (x) (booleanp x)))
+
+(defcustom lsp-clients-svlangserver-workspace-additional-dirs nil
+  "Additional directories to be managed by this instance of svlangserver"
+  :group 'lsp-svlangserver
+  :type '(lsp-repeatable-vector string)
+  :safe (lambda (x) (seq-every-p #'stringp x)))
+
+(defcustom lsp-clients-svlangserver-bin-path "svlangserver"
+  "svlangserver binary path"
+  :group 'lsp-svlangserver
+  :type 'string
+  :safe (lambda (x) (stringp x)))
+
+(defcustom lsp-clients-svlangserver-bin-args nil
+  "command line arguments for svlangserver binary"
+  :group 'lsp-svlangserver
+  :type '(lsp-repeatable-vector string)
+  :safe (lambda (x) (seq-every-p #'stringp x)))
+
+(defcustom lsp-clients-svlangserver-node-command "node"
+  "node binary path"
+  :group 'lsp-svlangserver
+  :type 'string
+  :safe (lambda (x) (stringp x)))
+
+(defcustom lsp-clients-svlangserver-module-path "svlangserver.js"
+  "svlangserver module path"
+  :group 'lsp-svlangserver
+  :type 'string
+  :safe (lambda (x) (stringp x)))
+
+(defun lsp-clients-svlangserver-build-index ()
+  (interactive)
+  (lsp-send-execute-command "systemverilog.build_index"))
+
+(defun lsp-clients-svlangserver-report-hierarchy (container-name)
+  (interactive (list (read-string "Module/interface: " (cond ((use-region-p) (buffer-substring (region-beginning) (region-end))) (t "")))))
+  (lsp-send-execute-command "systemverilog.report_hierarchy" (vector container-name)))
+
+(lsp-dependency 'svlangserver
+                '(:system "svlangserver"))
+
+(defun lsp-clients-svlangserver-get-workspace-additional-dirs (_workspace)
+  lsp-clients-svlangserver-workspace-additional-dirs)
+
+(defun lsp-clients-svlangserver-command ()
+  (let ((svlangserver-bin-path (lsp-package-path 'svlangserver)))
+    (if svlangserver-bin-path
+      (cons svlangserver-bin-path lsp-clients-svlangserver-bin-args)
+      (if (file-exists-p lsp-clients-svlangserver-bin-path)
+        (cons lsp-clients-svlangserver-bin-path lsp-clients-svlangserver-bin-args)
+        (if (file-exists-p lsp-clients-svlangserver-module-path)
+          `(,lsp-clients-svlangserver-node-command ,lsp-clients-svlangserver-module-path ,"--stdio")
+          `(,"svlangserver"))))))
+
+(lsp-register-client
+    (make-lsp-client :new-connection (lsp-stdio-connection 'lsp-clients-svlangserver-command)
+                     :major-modes '(verilog-mode)
+                     :priority -1
+                     :library-folders-fn 'lsp-clients-svlangserver-get-workspace-additional-dirs
+                     :server-id 'svlangserver))
+
+(lsp-register-custom-settings '(("systemverilog.includeIndexing" lsp-clients-svlangserver-includeIndexing)
+                                ("systemverilog.excludeIndexing" lsp-clients-svlangserver-excludeIndexing)
+                                ("systemverilog.defines" lsp-clients-svlangserver-defines)
+                                ("systemverilog.launchConfiguration" lsp-clients-svlangserver-launchConfiguration)
+                                ("systemverilog.lintOnUnsaved" lsp-clients-svlangserver-lintOnUnsaved)
+                                ("systemverilog.formatCommand" lsp-clients-svlangserver-formatCommand)
+                                ("systemverilog.disableCompletionProvider" lsp-clients-svlangserver-disableCompletionProvider)
+                                ("systemverilog.disableHoverProvider" lsp-clients-svlangserver-disableHoverProvider)
+                                ("systemverilog.disableSignatureHelpProvider" lsp-clients-svlangserver-disableSignatureHelpProvider)
+                                ("systemverilog.disableLinting" lsp-clients-svlangserver-disableLinting)))
+
+(defgroup lsp-verilog nil
+  "LSP support for Verilog/SystemVerilog."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/suoto/hdl_checker"))
+
+(defcustom lsp-clients-verilog-executable '("hdl_checker" "--lsp")
+  "Command to start the hdl_checker language server."
+  :group 'lsp-verilog
+  :risky t
+  :type 'file)
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection lsp-clients-verilog-executable)
+                  :major-modes '(verilog-mode)
+                  :language-id "verilog"
+    	          :priority -2
+                  :server-id 'lsp-verilog))
+
+(lsp-consistency-check lsp-verilog)
+
+(defgroup lsp-verible nil
+  "LSP support for Verilog/SystemVerilog using the Verible suite."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/chipsalliance/verible"))
+
+(defcustom lsp-clients-verible-executable '("verible-verilog-ls")
+  "Command to start the Verible Verilog language server."
+  :group 'lsp-verible
+  :risky t
+  :type 'file)
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection lsp-clients-verible-executable)
+                  :major-modes '(verilog-mode)
+                  :language-id "verilog"
+                  :priority -2
+                  :server-id 'lsp-verilog-verible))
+
+(provide 'lsp-verilog)
+;;; lsp-verilog.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vetur.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vetur.el
new file mode 100644
index 0000000..51bcc03
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vetur.el
@@ -0,0 +1,354 @@
+;;; lsp-vetur.el --- vls configuration                 -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Ivan Yonchovski
+;; Copyright (C) 2019-2026 lsp-mode maintainers
+
+;; Author: Ivan Yonchovski <yyoncho@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; VLS configuration
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'lsp-html)
+;; vls shares the same format configurations with ts-ls.
+(require 'lsp-javascript)
+
+(defgroup lsp-vetur nil
+  "LSP support for Vue, using the Vue Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/vuejs/vetur/tree/master/server")
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-ignore-project-warning nil
+  "Ignore projects without jsconfig.json or tsconfig.json warnings."
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-vetur-use-workspace-dependencies nil
+  "Use dependencies from workspace. Currently only for
+TypeScript."
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-completion-auto-import t
+  "Include completion for module export and auto import them"
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-completion-scaffold-snippet-sources
+  '((workspace . "(W)")
+    (user . "(U)")
+    (vetur . "(V)"))
+  "Where Vetur source Scaffold Snippets from and how to indicate them.
+- workspace: <WORKSPACE>/.vscode/vetur/snippets.
+- user: <USER-DATA-DIR>/User/snippets/vetur.
+- vetur: Bundled in Vetur.
+The source value can be a string \"(User)\" or an emoji \"✌\".
+Set a source to \"\" to disable it.
+"
+  :type 'alist
+  :group 'lsp-vetur
+  :link '(url-link "https://vuejs.github.io/vetur/guide/snippet.html")
+  :package-version '(lsp-mode. "9.0.0"))
+
+(defcustom lsp-vetur-completion-tag-casing "kebab"
+  "Casing conversion for tag completion"
+  :type '(choice
+          (const "initial")
+          (const "kebab"))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-grammar-custom-blocks '((docs . "md") (i18n . "json"))
+  "Mapping from custom block tag name to language name. Used for
+ generating grammar to support syntax highlighting for custom
+ blocks."
+  :type 'alist
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-validation-template t
+  "Validate vue-html in <template> using eslint-plugin-vue"
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-language-features-code-actions t
+  "Enable/disable code actions."
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-vetur-validation-style t
+  "Validate css/scss/less/postcss in <style>"
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-validation-script t
+  "Validate js/ts in <script>"
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-enable t
+  "Enable/disable the Vetur document formatter."
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-options-tab-size 2
+  "Number of spaces per indentation level. Inherited by all formatters."
+  :type 'number
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-options-use-tabs nil
+  "Use tabs for indentation. Inherited by all formatters."
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-default-formatter-html "prettyhtml"
+  "Default formatter for <template> region"
+  :type '(choice
+          (const "none")
+          (const "prettyhtml")
+          (const "js-beautify-html")
+          (const "prettier"))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-default-formatter-css "prettier"
+  "Default formatter for <style> region"
+  :type '(choice
+          (const "none")
+          (const "prettier"))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-default-formatter-postcss "prettier"
+  "Default formatter for <style lang='postcss'> region"
+  :type '(choice
+          (const "none")
+          (const "prettier"))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-default-formatter-scss "prettier"
+  "Default formatter for <style lang='scss'> region"
+  :type '(choice
+          (const "none")
+          (const "prettier"))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-default-formatter-less "prettier"
+  "Default formatter for <style lang='less'> region"
+  :type '(choice
+          (const "none")
+          (const "prettier"))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-default-formatter-stylus "stylus-supremacy"
+  "Default formatter for <style lang='stylus'> region"
+  :type '(choice
+          (const "none")
+          (const "stylus-supremacy"))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-default-formatter-js "prettier"
+  "Default formatter for <script> region"
+  :type '(choice
+          (const "none")
+          (const "prettier")
+          (const "prettier-eslint")
+          (const "vscode-typescript"))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-default-formatter-ts "prettier"
+  "Default formatter for <script> region"
+  :type '(choice
+          (const "none")
+          (const "prettier")
+          (const "vscode-typescript"))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-default-formatter-options
+  '((js-beautify-html (wrap_attributes . "force-expand-multiline"))
+    (prettyhtml (printWidth . 100)
+                (singleQuote . :json-false)
+                (wrapAttributes . :json-false)
+                (sortAttributes . :json-false)))
+  "Options for all default formatters"
+  :type 'alist
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-style-initial-indent nil
+  "Whether to have initial indent for <style> region"
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-format-script-initial-indent nil
+  "Whether to have initial indent for <script> region"
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-trace-server "off"
+  "Traces the communication between VS Code and Vue Language Server."
+  :type '(choice
+          (const "off")
+          (const "messages")
+          (const "verbose"))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-vetur-dev-vls-path ""
+  "The vls path for development"
+  :type 'string
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-vetur-dev-vls-port -1
+  "The vls port for development"
+  :type 'integer
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-vetur-dev-log-level "INFO"
+  "The vls log level for development"
+  :type '(choice
+          (const "INFO")
+          (const "DEBUG"))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-vetur-experimental-template-interpolation-service nil
+  "Whether to have template interpolation service"
+  :type 'boolean
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.3"))
+
+(defcustom lsp-vetur-emmet "never"
+  "Controls the Emmet suggestions that show up in the suggestion/completion list."
+  :type  '(choice
+           (const "never")
+           (const "inMarkupAndStylesheetFilesOnly")
+           (const "always" ))
+  :group 'lsp-vetur
+  :package-version '(lsp-mode . "6.1"))
+
+(lsp-register-custom-settings
+ '(("vetur.trace.server" lsp-vetur-trace-server)
+   ("vetur.ignoreProjectWarning" lsp-vetur-ignore-project-warning t)
+   ("vetur.format.scriptInitialIndent" lsp-vetur-format-script-initial-indent t)
+   ("vetur.format.styleInitialIndent" lsp-vetur-format-style-initial-indent t)
+   ("vetur.format.defaultFormatterOptions" lsp-vetur-format-default-formatter-options)
+   ("vetur.format.defaultFormatter.ts" lsp-vetur-format-default-formatter-ts)
+   ("vetur.format.defaultFormatter.js" lsp-vetur-format-default-formatter-js)
+   ("vetur.format.defaultFormatter.stylus" lsp-vetur-format-default-formatter-stylus)
+   ("vetur.format.defaultFormatter.less" lsp-vetur-format-default-formatter-less)
+   ("vetur.format.defaultFormatter.scss" lsp-vetur-format-default-formatter-scss)
+   ("vetur.format.defaultFormatter.postcss" lsp-vetur-format-default-formatter-postcss)
+   ("vetur.format.defaultFormatter.css" lsp-vetur-format-default-formatter-css)
+   ("vetur.format.defaultFormatter.html" lsp-vetur-format-default-formatter-html)
+   ("vetur.format.options.useTabs" lsp-vetur-format-options-use-tabs t)
+   ("vetur.format.options.tabSize" lsp-vetur-format-options-tab-size)
+   ("vetur.format.enable" lsp-vetur-format-enable t)
+   ("vetur.validation.script" lsp-vetur-validation-script t)
+   ("vetur.validation.style" lsp-vetur-validation-style t)
+   ("vetur.validation.template" lsp-vetur-validation-template t)
+   ("vetur.languageFeatures.codeActions" lsp-vetur-language-features-code-actions t)
+   ("vetur.grammar.customBlocks" lsp-vetur-grammar-custom-blocks)
+   ("vetur.completion.tagCasing" lsp-vetur-completion-tag-casing)
+   ("vetur.completion.scaffoldSnippetSources" lsp-vetur-completion-scaffold-snippet-sources)
+   ("vetur.completion.autoImport" lsp-vetur-completion-auto-import t)
+   ("vetur.useWorkspaceDependencies" lsp-vetur-use-workspace-dependencies t)
+   ("vetur.dev.vlsPath" lsp-vetur-dev-vls-path)
+   ("vetur.dev.vlsPort" lsp-vetur-dev-vls-port)
+   ("vetur.dev.logLevel" lsp-vetur-dev-log-level)
+   ("vetur.experimental.templateInterpolationService" lsp-vetur-experimental-template-interpolation-service t)
+   ("emmet.showExpandedAbbreviation" lsp-vetur-emmet)))
+
+(define-obsolete-variable-alias
+  'lsp-vetur-server
+  'lsp-vetur-server-command
+  "lsp-mode 6.1")
+
+(defcustom lsp-vetur-global-snippets-dir (expand-file-name (locate-user-emacs-file ".snippets/vetur"))
+  "Path to snippets dir."
+  :type 'file
+  :risky t
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-vetur-server-command '("vls")
+  "Command to start vetur."
+  :type '(repeat string)
+  :risky t
+  :package-version '(lsp-mode . "6.1"))
+
+(lsp-dependency 'vetur-language-server
+                '(:system "vls")
+                '(:npm :package "vls" :path "vls"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     `(,(or (executable-find (cl-first lsp-vetur-server-command))
+                                            (lsp-package-path 'vetur-language-server))
+                                       ,@(cl-rest lsp-vetur-server-command))))
+                  :activation-fn (lambda (filename _mode)
+                                   (string= (file-name-extension filename) "vue"))
+                  :priority -1
+                  :multi-root t
+                  :ignore-messages '("readFile .*? requested by Vue but content not available")
+                  :server-id 'vls
+                  :initialization-options (lambda () (ht-merge (lsp-configuration-section "vetur")
+                                                               (lsp-configuration-section "html")
+                                                               (lsp-configuration-section "javascript")
+                                                               (lsp-configuration-section "typescript")
+                                                               (lsp-configuration-section "emmet")
+                                                               (ht ("globalSnippetDir" lsp-vetur-global-snippets-dir))))
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration
+                                       (ht-merge (lsp-configuration-section "vetur")
+                                                 (lsp-configuration-section "html")
+                                                 (lsp-configuration-section "javascript")
+                                                 (lsp-configuration-section "emmet")
+                                                 (lsp-configuration-section "typescript")))))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'vetur-language-server
+                                                            callback error-callback))))
+
+(lsp-consistency-check lsp-vetur)
+
+(provide 'lsp-vetur)
+;;; lsp-vetur.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vhdl.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vhdl.el
new file mode 100644
index 0000000..f8e44bc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vhdl.el
@@ -0,0 +1,132 @@
+;;; lsp-vhdl.el --- VHDL Client settings         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019 Christian Birk Sørensen
+;; Copyright (C) 2019-2026 lsp-mode maintainers
+
+;; Author: Christian Birk Sørensen <chrbirks+emacs@gmail.com>
+;; Created: 6 October 2019
+;; Keywords: languages, lsp, vhdl
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP support for VHDL using using an external language server. Currently
+;; the supported servers are:
+;;
+;; VHDL-tool. See http://www.vhdltool.com/configuration for setting up the
+;; project file.
+;;
+;; HDL Checker. See https://github.com/suoto/hdl_checker/wiki/setting-up-a-project
+;; for setting up the project file.
+;;
+;; VHDL LS. See https://github.com/VHDL-LS/rust_hdl#configuration for setting
+;; up the project file.
+;;
+;; GHDL LS. See https://github.com/ghdl/ghdl-language-server for setting up the
+;; project file.
+;;
+;; Set the symbol lsp-vhdl-server to select the language server and set
+;; lsp-vhdl-server-path if the binary is not in the user PATH.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defvar vhdl-tool-bin-name "vhdl-tool"
+  "Name of the VHDL Tool binary.")
+
+(defvar hdl-checker-bin-name "hdl_checker"
+  "Name of HDL Checker binary.")
+
+(defvar vhdl-ls-bin-name "vhdl_ls"
+  "Name of the VHDL LS binary.")
+
+(defvar ghdl-ls-bin-name "ghdl-ls"
+  "Name of the GHDL LS binary.")
+
+(defgroup lsp-vhdl nil
+  "LSP support for VHDL. Set lsp-vhdl-server to select server. The default is to use VHDL-tool."
+  :group 'lsp-mode)
+
+(defcustom lsp-vhdl-server 'vhdl-tool
+  "Select which server to use:
+VHDL-tool: A syntax checking, type checking and linting tool
+\(http://vhdltool.com).
+
+HDL Checker: A wrapper for third party tools such as GHDL,
+ModelSim, Vivado Simulator
+\(https://github.com/suoto/hdl_checker).
+
+VHDL LS: A complete VHDL language server protocol implementation
+with diagnostics, navigate to symbol, find all references etc
+\(https://github.com/VHDL-LS/rust_hdl).
+
+GHDL LS: A LSP server for VHDL based on GHDL
+\(https://github.com/ghdl/ghdl-language-server)."
+  :type '(choice (const :tag "VHDL-tool" vhdl-tool)
+                 (const :tag "HDL Checker" hdl-checker)
+                 (const :tag "VHDL LS" vhdl-ls)
+                 (const :tag "GHDL LS" ghdl-ls))
+  :group 'lsp-vhdl)
+
+(defcustom lsp-vhdl-server-path nil
+  "Path to binary server file."
+  :group 'lsp-vhdl
+  :risky t
+  :type 'file)
+
+(defvar lsp-vhdl--params nil)
+
+(defun lsp-vhdl--create-connection ()
+  "Return lsp-stdio-connection based on the selected server."
+  (lsp-vhdl--set-server-path)
+  (lsp-vhdl--set-server-args)
+  (lsp-stdio-connection
+    (lambda () (cons (plist-get lsp-vhdl--params 'server-path) (plist-get lsp-vhdl--params 'server-args)))
+    (lambda () (executable-find (plist-get lsp-vhdl--params 'server-path)))))
+
+(defun lsp-vhdl--set-server-path()
+  "Set path to server binary based on selection in lsp-vhdl-server."
+  (cond ((eq lsp-vhdl-server 'hdl-checker) (if (eq lsp-vhdl-server-path nil)
+					       (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-path hdl-checker-bin-name))
+					     (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-path lsp-vhdl-server-path))))
+	((eq lsp-vhdl-server 'vhdl-tool) (if (eq lsp-vhdl-server-path nil)
+					     (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-path vhdl-tool-bin-name))
+					   (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-path lsp-vhdl-server-path))))
+	((eq lsp-vhdl-server 'vhdl-ls) (if (eq lsp-vhdl-server-path nil)
+					   (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-path vhdl-ls-bin-name))
+					 (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-path lsp-vhdl-server-path))))
+	((eq lsp-vhdl-server 'ghdl-ls) (if (eq lsp-vhdl-server-path nil)
+					   (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-path ghdl-ls-bin-name))
+					 (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-path lsp-vhdl-server-path))))))
+
+(defun lsp-vhdl--set-server-args()
+  "Set server arguments based on server selection."
+  (cond ((eq lsp-vhdl-server 'hdl-checker) (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-args '("--lsp"))))
+	((eq lsp-vhdl-server 'vhdl-tool) (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-args '("lsp"))))
+	((eq lsp-vhdl-server 'vhdl-ls) (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-args '())))
+	((eq lsp-vhdl-server 'ghdl-ls) (setq lsp-vhdl--params (plist-put lsp-vhdl--params 'server-args '())))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-vhdl--create-connection)
+                  :major-modes '(vhdl-mode vhdl-ts-mode)
+                  :language-id "VHDL"
+                  :priority -1
+                  :server-id 'lsp-vhdl))
+
+(lsp-consistency-check lsp-vhdl)
+
+(provide 'lsp-vhdl)
+;;; lsp-vhdl.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vimscript.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vimscript.el
new file mode 100644
index 0000000..aeda42e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-vimscript.el
@@ -0,0 +1,75 @@
+;;; lsp-vimscript.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, vim, vimscript
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for the VimScript Programming Language.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-vim nil
+  "LSP support for viml using vim-language-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/iamcco/vim-language-server"))
+
+(defcustom lsp-clients-vim-executable '("vim-language-server" "--stdio")
+  "Command to start the vim language server."
+  :group 'lsp-vim
+  :risky t
+  :type 'file)
+
+(defcustom lsp-clients-vim-initialization-options '((iskeyword . "vim iskeyword option")
+                                                    (vimruntime . "/usr/bin/vim")
+                                                    (runtimepath . "/usr/bin/vim")
+                                                    (diagnostic . ((enable . t)))
+                                                    (indexes . ((runtimepath . t)
+                                                                (gap . 100)
+                                                                (count . 3)))
+                                                    (suggest . ((fromVimruntime . t)
+                                                                (fromRuntimepath . :json-false))))
+  "Initialization options for vim language server."
+  :group 'lsp-vim
+  :type 'alist)
+
+(lsp-dependency 'vim-language-server
+                '(:system "vim-language-server")
+                '(:npm :package "vim-language-server"
+                       :path "vim-language-server"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     `(,(or (executable-find (cl-first lsp-clients-vim-executable))
+                                            (lsp-package-path 'vim-language-server))
+                                       ,@(cl-rest lsp-clients-vim-executable))))
+                  :major-modes '(vimrc-mode vimscript-ts-mode)
+                  :priority -1
+                  :server-id 'vimls
+                  :initialization-options (lambda () lsp-clients-vim-initialization-options)
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'vim-language-server
+                                                            callback error-callback))))
+
+(lsp-consistency-check lsp-vimscript)
+
+(provide 'lsp-vimscript)
+;;; lsp-vimscript.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-volar.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-volar.el
new file mode 100644
index 0000000..de9332c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-volar.el
@@ -0,0 +1,149 @@
+;;; lsp-volar.el --- A lsp-mode client for Vue3 -*- lexical-binding: t; -*-
+;;
+;; Copyright (C) 2021 JadeStrong
+;; Copyright (C) 2021-2026 lsp-mode maintainers
+;;
+;; Author: JadeStrong <https://github.com/jadestrong>
+;; Maintainer: JadeStrong <jadestrong@163.com>
+;; Created: November 08, 2021
+;; Modified: November 08, 2021
+;; Keywords: abbrev bib c calendar comm convenience data docs emulations extensions faces files frames games hardware help hypermedia i18n internal languages lisp local maint mail matching mouse multimedia news outlines processes terminals tex tools unix vc wp
+;; Homepage: https://github.com/jadestrong/lsp-volar
+;;
+;; This file is not part of GNU Emacs.
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;
+;;; Commentary:
+;;
+;; provide the connection to lsp-mode and volar language server
+;;
+;;; Code:
+(require 'lsp-mode)
+(require 'lsp-javascript)
+(require 'dash)
+
+(defgroup lsp-volar nil
+  "Lsp support for vue3."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/vuejs/language-tools")
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-volar-typescript-server-id 'ts-ls
+  "The server id of the typescript language server to use."
+  :group 'lsp-volar
+  :package-version '(lsp-mode . "10.0.0")
+  :type 'symbol)
+
+(defcustom lsp-volar-support-vue2 nil
+  "Whether to ping Volar's version to ~3.0 to support vue2.
+
+Volar is dropping Vue 2 and vue-class-component Support in v3.1.
+Reference: https://github.com/vuejs/language-tools/discussions/5455"
+  :group 'lsp-volar
+  :package-version '(lsp-mode . "10.0.0")
+  :type 'boolean)
+
+(defcustom lsp-volar-location-for-typescript-plugin :auto
+  "Location of vue package used by typescript plugin.
+Specify a manual value if automatic detection does not work."
+  :group 'lsp-volar
+  :package-version '(lsp-mode . "10.0.0")
+  :type '(choice (const :tag "Automatic detection" :auto)
+                 (directory :tag "Manual value")))
+
+(defun lsp-volar--activate-p (filename &optional _)
+  "Check if the volar-language-server should be enabled base on FILENAME."
+  (and filename (string-suffix-p ".vue" filename)))
+
+(lsp-dependency 'volar-language-server
+                '(:system "vue-language-server")
+                '(:npm :package "@vue/language-server" :path "vue-language-server"
+                       :version (lambda () (when lsp-volar-support-vue2 "~3.0"))))
+
+;; Set lsp-clients-typescript-plugins
+(when-let* ((package-path (ignore-errors (lsp-package-path 'volar-language-server)))
+            (location (if (eq lsp-volar-location-for-typescript-plugin :auto)
+                          (cl-find-if #'file-directory-p
+                                      `(,(f-join package-path "../.." "lib/node_modules/@vue/language-server/")
+                                        ,(f-join (file-chase-links package-path) "../../")))
+                        lsp-volar-location-for-typescript-plugin))
+            (vue-plugin (list :name "@vue/typescript-plugin"
+                              :location location
+                              :languages (vector "vue")
+                              :configNamespace "typescript"
+                              :enableForWorkspaceTypeScriptVersions t)))
+  (setq lsp-clients-typescript-plugins
+        (vconcat lsp-clients-typescript-plugins (vector vue-plugin))))
+
+(defun lsp-volar--send-notify (workspace method params)
+  "Send notification to WORKSPACE with METHOD PARAMS."
+  (with-lsp-workspace workspace
+    (let ((body (lsp--make-notification method params)))
+      (lsp--send-no-wait body
+        (lsp--workspace-proc lsp--cur-workspace)))))
+
+(defun lsp-volar--tsserver-request-handler (volar-workspace params)
+  "Handles `tsserver/request` notification from VOLAR-WORKSPACE.
+And forwarding PARAMS to the typescript LSP server.
+
+Reference:
+- https://github.com/vuejs/language-tools/discussions/5456
+- https://github.com/vuejs/language-tools/wiki/Neovim#configuration"
+  (if-let* ((ts-ls-workspace (lsp-find-workspace lsp-volar-typescript-server-id nil)))
+    (with-lsp-workspace ts-ls-workspace
+      (-let [[[id command payload]] params]
+        (lsp-request-async
+          "workspace/executeCommand"
+          (list :command "typescript.tsserverRequest"
+            :arguments (vector command payload))
+          ;; response callback
+          (lambda (response)
+            (let ((body (lsp-get response :body)))
+              (lsp-volar--send-notify volar-workspace "tsserver/response" (vector (vector id body)))))
+          ;; error callback
+          :error-handler (lambda (error-response)
+                           (lsp--warn "tsserver/request async error: %S" error-response)))))
+    (lsp--error "[lsp-volar] Could not found `%s` lsp client, lsp-volar would not work without it" lsp-volar-typescript-server-id)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda ()
+                     `(,(lsp-package-path 'volar-language-server) "--stdio")))
+  :activation-fn 'lsp-volar--activate-p
+  :priority 0
+  :multi-root nil
+  :add-on? t  ;; work with typescript server
+  :server-id 'vue-semantic-server
+  :initialization-options (lambda () (ht-merge (lsp-configuration-section "vue")))
+  :notification-handlers (ht ("tsserver/request" #'lsp-volar--tsserver-request-handler))
+  :initialized-fn (lambda (workspace)
+                    (with-lsp-workspace workspace
+                      (lsp--server-register-capability
+                       (lsp-make-registration
+                        :id "random-id"
+                        :method "workspace/didChangeWatchedFiles"
+                        :register-options? (lsp-make-did-change-watched-files-registration-options
+                                            :watchers
+                                            `[
+                                               ,(lsp-make-file-system-watcher :glob-pattern "**/*.vue")
+                                              ])))))
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'volar-language-server
+                                            callback error-callback))))
+
+(provide 'lsp-volar)
+;;; lsp-volar.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-wat.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-wat.el
new file mode 100644
index 0000000..209becb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-wat.el
@@ -0,0 +1,224 @@
+;;; lsp-wat.el --- lsp-mode WAT integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2026 Pig Fang
+;; Copyright (C) 2026 lsp-mode maintainers
+
+;; Author: Pig Fang
+;; Keywords: languages,tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; client for WebAssembly Text Format via wasm-language-tools
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-wat nil
+  "LSP support for WebAssembly Text Format."
+  :link '(url-link "https://github.com/g-plane/wasm-language-tools")
+  :group 'lsp-mode)
+
+(defcustom lsp-wat-server-command '("wat_server")
+  "The wat_server command."
+  :group 'lsp-wat
+  :type 'string)
+
+(defcustom lsp-wat-format-split-closing-parens nil
+  "Control whether closing parentheses should be splitted into different lines."
+  :group 'lsp-wat
+  :type 'boolean)
+
+(defcustom lsp-wat-format-wrap-before-locals "always"
+  "Control whether to insert line break before function locals."
+  :group 'lsp-wat
+  :type '(choice (const "never")
+                 (const "overflow")
+                 (const "multiOnly")
+                 (const "always")))
+
+(defcustom lsp-wat-format-wrap-before-fields "multiOnly"
+  "Control whether to insert line break before struct fields."
+  :group 'lsp-wat
+  :type '(choice (const "never")
+                 (const "overflow")
+                 (const "multiOnly")
+                 (const "always")))
+
+(defcustom lsp-wat-format-wrap-before-const-expr "always"
+  "Control whether to insert line break before constant expression."
+  :group 'lsp-wat
+  :type '(choice (const "never")
+                 (const "overflow")
+                 (const "multiOnly")
+                 (const "always")))
+
+(defcustom lsp-wat-format-multi-line-locals "smart"
+  "Control how to insert whitespace between multiple locals in a function."
+  :group 'lsp-wat
+  :type '(choice (const "never")
+                 (const "overflow")
+                 (const "smart")
+                 (const "wrap")
+                 (const "always")))
+
+(defcustom lsp-wat-format-multi-line-fields "smart"
+  "Control how to insert whitespace between multiple fields in a struct."
+  :group 'lsp-wat
+  :type '(choice (const "never")
+                 (const "overflow")
+                 (const "smart")
+                 (const "wrap")
+                 (const "always")))
+
+(defcustom lsp-wat-format-format-comments nil
+  "Control whether whitespace should be inserted at the beginning and end of comments."
+  :group 'lsp-wat
+  :type 'boolean)
+
+(defcustom lsp-wat-format-ignore-comment-directive "fmt-ignore"
+  "Text directive for ignoring formatting specific module or module field."
+  :group 'lsp-wat
+  :type 'string)
+
+(defcustom lsp-wat-lint-unused "warn"
+  "Lint for detecting unused items."
+  :group 'lsp-wat
+  :type '(choice (const "allow")
+                 (const "hint")
+                 (const "warn")
+                 (const "deny")))
+
+(defcustom lsp-wat-lint-unread "warn"
+  "Lint for detecting unread locals."
+  :group 'lsp-wat
+  :type '(choice (const "allow")
+                 (const "hint")
+                 (const "warn")
+                 (const "deny")))
+
+(defcustom lsp-wat-lint-shadow "warn"
+  "Lint for detecting shadowing."
+  :group 'lsp-wat
+  :type '(choice (const "allow")
+                 (const "hint")
+                 (const "warn")
+                 (const "deny")))
+
+(defcustom lsp-wat-lint-implicit-module "allow"
+  "Lint for top-level module fields without declaring a module."
+  :group 'lsp-wat
+  :type '(choice (const "allow")
+                 (const "hint")
+                 (const "warn")
+                 (const "deny")))
+
+(defcustom lsp-wat-lint-multi-modules "deny"
+  "Lint for detecting multiple modules in a single file."
+  :group 'lsp-wat
+  :type '(choice (const "allow")
+                 (const "hint")
+                 (const "warn")
+                 (const "deny")))
+
+(defcustom lsp-wat-lint-unreachable "hint"
+  "Lint for detecting unreachable code."
+  :group 'lsp-wat
+  :type '(choice (const "allow")
+                 (const "hint")
+                 (const "warn")
+                 (const "deny")))
+
+(defcustom lsp-wat-lint-deprecated "warn"
+  "Lint for deprecated usage."
+  :group 'lsp-wat
+  :type '(choice (const "allow")
+                 (const "hint")
+                 (const "warn")
+                 (const "deny")))
+
+(defcustom lsp-wat-lint-needless-mut "warn"
+  "Lint for detecting mutable globals that are never mutated."
+  :group 'lsp-wat
+  :type '(choice (const "allow")
+                 (const "hint")
+                 (const "warn")
+                 (const "deny")))
+
+(defcustom lsp-wat-lint-needless-try-table "warn"
+  "Lint for detecting `try_table` block without catch clauses."
+  :group 'lsp-wat
+  :type '(choice (const "allow")
+                 (const "hint")
+                 (const "warn")
+                 (const "deny")))
+
+(defcustom lsp-wat-lint-useless-catch "warn"
+  "Lint for detecting useless catch clauses."
+  :group 'lsp-wat
+  :type '(choice (const "allow")
+                 (const "hint")
+                 (const "warn")
+                 (const "deny")))
+
+(defcustom lsp-wat-inlay-hint-types t
+  "Inlay hints for indicating types."
+  :group 'lsp-wat
+  :type 'boolean)
+
+(defcustom lsp-wat-inlay-hint-ending t
+  "Inlay hints that show at the end of blocks and functions."
+  :group 'lsp-wat
+  :type 'boolean)
+
+(defcustom lsp-wat-inlay-hint-index t
+  "Inlay hints for showing idx."
+  :group 'lsp-wat
+  :type 'boolean)
+
+(lsp-register-custom-settings
+ '(("wasmLanguageTools.format.splitClosingParens" lsp-wat-format-split-closing-parens)
+   ("wasmLanguageTools.format.wrapBeforeLocals" lsp-wat-format-wrap-before-locals)
+   ("wasmLanguageTools.format.wrapBeforeFields" lsp-wat-format-wrap-before-fields)
+   ("wasmLanguageTools.format.wrapBeforeConstExpr" lsp-wat-format-wrap-before-const-expr)
+   ("wasmLanguageTools.format.multiLineLocals" lsp-wat-format-multi-line-locals)
+   ("wasmLanguageTools.format.multiLineFields" lsp-wat-format-multi-line-fields)
+   ("wasmLanguageTools.format.formatComments" lsp-wat-format-format-comments)
+   ("wasmLanguageTools.format.ignoreCommentDirective" lsp-wat-format-ignore-comment-directive)
+   ("wasmLanguageTools.lint.unused" lsp-wat-lint-unused)
+   ("wasmLanguageTools.lint.unread" lsp-wat-lint-unread)
+   ("wasmLanguageTools.lint.shadow" lsp-wat-lint-shadow)
+   ("wasmLanguageTools.lint.implicitModule" lsp-wat-lint-implicit-module)
+   ("wasmLanguageTools.lint.multiModules" lsp-wat-lint-multi-modules)
+   ("wasmLanguageTools.lint.unreachable" lsp-wat-lint-unreachable)
+   ("wasmLanguageTools.lint.deprecated" lsp-wat-lint-deprecated)
+   ("wasmLanguageTools.lint.needlessMut" lsp-wat-lint-needless-mut)
+   ("wasmLanguageTools.lint.needlessTryTable" lsp-wat-lint-needless-try-table)
+   ("wasmLanguageTools.lint.uselessCatch" lsp-wat-lint-useless-catch)
+   ("wasmLanguageTools.inlayHint.types" lsp-wat-inlay-hint-types)
+   ("wasmLanguageTools.inlayHint.ending" lsp-wat-inlay-hint-ending)
+   ("wasmLanguageTools.inlayHint.index" lsp-wat-inlay-hint-index)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda () lsp-wat-server-command))
+  :activation-fn (lsp-activate-on "wat")
+  :server-id 'wat_server))
+
+(lsp-consistency-check lsp-wat)
+
+(provide 'lsp-wat)
+;;; lsp-wat.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-wgsl.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-wgsl.el
new file mode 100644
index 0000000..0319e4d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-wgsl.el
@@ -0,0 +1,204 @@
+;;; lsp-wgsl.el --- description -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2023-2026 emacs-lsp maintainers
+
+;; Author: emacs-lsp maintainers
+;; Keywords: lsp, wgsl, shaders, graphics programming,
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP Clients for WGSL (WebGPU Shading Language).
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-wgsl nil
+  "LSP support for wgsl, using wgsl-analyzer."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/wgsl-analyzer/wgsl-analyzer")
+  :package-version '(lsp-mode . "9.0.0"))
+
+
+(defcustom lsp-wgsl-server-command "wgsl-analyzer"
+  "Command to run the wgsl-analyzer executable."
+  :type 'boolean
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+;; Various toggling settings for the lsp server
+(defcustom lsp-wgsl-diagnostics-type-errors t
+  "Whether to show type errors in diagnostics or not."
+  :type 'boolean
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-wgsl-diagnostics-naga-parsing-errors t
+  "Whether to show naga parsing errors in diagnostics or not."
+  :type 'boolean
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-wgsl-diagnostics-naga-validation-errors t
+  "Whether to show naga validation errors in diagnostics or not."
+  :type 'boolean
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-wgsl-diagnostics-naga-version "main"
+  "Naga version to use."
+  :type 'string
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-wgsl-inlayhints-enabled t
+  "Whether to enable inlay hints or not."
+  :type 'boolean
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-wgsl-inlayhints-typehints t
+  "Whether to enable type hints or not when using inlay hints."
+  :type 'boolean
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-wgsl-inlayhints-parameterhints t
+  "Whether to enable parameter hints or not when using inlay hints."
+  :type 'boolean
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-wgsl-inlayhints-structlayout t
+  "Whether to enable struct layout hints or not when using inlay hints."
+  :type 'boolean
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+;; TODO: maybe type choice instead?
+(defcustom lsp-wgsl-inlayhints-type-verbosity "compact"
+  "The type verbosity to use for inlay hints."
+  :type '(choice (string "full")
+                 (string "compact")
+                 (string "inner"))
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-wgsl-custom-imports (lsp-ht)
+  "List of custom imports in the style of Bevy"
+  :type 'ht
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-wgsl-shaderdefs []
+  "Defines that should be valid for preprocessor operations like ifdef,
+  e.g, [\='USE_TYPES\=',\='DEBUG\=']"
+  :type 'lsp-string-vector
+  :group 'lsp-wgsl
+  :package-version '(lsp-mode . "9.0.0"))
+
+;; wgsl-analyzer is a bit weird with how it gets config.
+;; Currently it relies on a custom extension to query the clients.
+;; (could not get standard custom-settings blocks to work)
+(defun lsp-wgsl--send-configuration (&rest _)
+  ;; TODO: why doesn't this behave like the normal lists?!?!? I can't just send a list?!?!?! why the fuck?!?!
+  (list :customImports lsp-wgsl-custom-imports
+        :diagnostics (list :typeErrors (lsp-json-bool lsp-wgsl-diagnostics-type-errors)
+                           :nagaParsingErrors (lsp-json-bool lsp-wgsl-diagnostics-naga-parsing-errors)
+                           :nagaValidationErrors (lsp-json-bool lsp-wgsl-diagnostics-naga-validation-errors)
+                           :nagaVersion lsp-wgsl-diagnostics-naga-version)
+        :inlayHints (list :enabled (lsp-json-bool lsp-wgsl-inlayhints-enabled)
+                          :typeHints (lsp-json-bool lsp-wgsl-inlayhints-typehints)
+                          :parameterHints (lsp-json-bool lsp-wgsl-inlayhints-parameterhints)
+                          :structLayoutHints (lsp-json-bool lsp-wgsl-inlayhints-structlayout)
+                          :typeVerbosity lsp-wgsl-inlayhints-type-verbosity)
+        :shaderDefs lsp-wgsl-shaderdefs
+        ;; not configurable at the moment, as they don't seem to have much effect.
+        ;; Fails if not given.
+        :trace (list :extension t
+                     :server t)))
+
+(defvar wgsl-font-lock-keywords)
+
+;; Various interactive functions to use the custom LSP extensions from the server
+(defun lsp-wgsl-full-source ()
+  "Gets the full source of the file with all imports and preprocessor
+definitions resolved."
+  (interactive)
+  (lsp-request-async
+   "wgsl-analyzer/fullSource"
+   (list :textDocument (list :uri (lsp--buffer-uri)))
+   (lambda (source)
+     (let ((buffer (get-buffer-create "*WGSL-full-source*")))
+       (with-current-buffer buffer
+         (setq-local buffer-read-only nil)
+         (erase-buffer)
+         (insert source)
+         (read-only-mode)
+         ;; activate only syntax highlighting
+         (font-lock-add-keywords nil wgsl-font-lock-keywords)
+         (font-lock-mode))
+       (switch-to-buffer buffer)))))
+
+(defun lsp-wgsl-syntax-tree ()
+  "Gets the syntax tree of the current buffer."
+  (interactive)
+  (lsp-request-async
+   "wgsl-analyzer/syntaxTree"
+   (list :textDocument (list :uri (lsp--buffer-uri))
+         :range (if (use-region-p)
+                    (lsp--region-to-range (region-beginning) (region-end))
+                  (lsp--region-to-range (point-min) (point-max))))
+   (lambda (syntax-tree)
+     (let ((buffer (get-buffer-create (format "*WGSL-syntax-tree %s*" (lsp--buffer-uri)))))
+       (with-current-buffer buffer
+         (setq-local buffer-read-only nil)
+         (erase-buffer)
+         (insert syntax-tree)
+         (read-only-mode))
+       (switch-to-buffer buffer)))))
+
+
+(lsp-dependency 'wgsl-analyzer
+                '(:system lsp-wgsl-server-command)
+                '(:cargo :package "wgsl-analyzer"
+                         :path "wgsl-analyzer"
+                         :git "https://github.com/wgsl-analyzer/wgsl-analyzer"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     (or (lsp-package-path 'wgsl-analyzer)
+                                         lsp-wgsl-server-command)))
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      ;; wgsl-analyzer handles configuration in a VERY non-standard way
+                                      ;; https://github.com/wgsl-analyzer/wgsl-analyzer/issues/77
+                                      (lsp--set-configuration '())))
+                  :request-handlers (lsp-ht ("wgsl-analyzer/requestConfiguration" #'lsp-wgsl--send-configuration))
+                  :major-modes '(wgsl-mode)
+                  :activation-fn (lsp-activate-on "wgsl")
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'wgsl-analyzer
+                                                            callback error-callback))
+                  :priority -1
+                  :server-id 'wgsl-analyzer))
+
+
+(lsp-consistency-check lsp-wgsl)
+
+(provide 'lsp-wgsl)
+;;; lsp-wgsl.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-xml.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-xml.el
new file mode 100644
index 0000000..dd549a2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-xml.el
@@ -0,0 +1,392 @@
+;;; lsp-xml.el --- LSP XML server integration        -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Ivan Yonchovski
+;; Copyright (C) 2019-2026 lsp-mode maintainers
+
+;; Author: Ivan Yonchovski <yyoncho@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-xml nil
+  "Settings for rls."
+  :group 'tools
+  :tag "Language Server"
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-trace-server "off"
+  "Traces the communication between VS Code and the XML language server."
+  :type '(choice
+          (const "off")
+          (const "messages")
+          (const "verbose"))
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-catalogs nil
+  "Array of XML Catalogs"
+  :type '(repeat string)
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-logs-client t
+  "Should the server log to client output"
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-format-split-attributes nil
+  "Split multiple attributes each onto a new line"
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-format-join-cdata-lines nil
+  "Join lines in a CDATA tag's content"
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-format-join-comment-lines nil
+  "Join comment content on format"
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-format-space-before-empty-close-tag t
+  "Insert space before end of self closing tag.
+Example: <tag/> -> <tag />"
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-format-join-content-lines nil
+  "Normalize the whitespace of content inside an element.
+Newlines and excess whitespace are removed."
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-format-preserve-empty-content nil
+  "Preserve empty content/whitespace in a tag."
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-format-enabled t
+  "Enable/disable ability to format document"
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-preferences-quote-style "double"
+  "The preferred quote style for attribute values."
+  :type '(choice
+          (const "double")
+          (const "single"))
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-format-comments t
+  "Enable/disable comment formatting."
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-format-closing-bracket-new-line nil
+  "Enable/disable moving the closing bracket.
+
+This only affects tags with two or more (split) attributes."
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-format-split-attributes-indent-size 2
+  "The indentation used for split attributes."
+  :type 'integer
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-format-preserve-attribute-line-breaks t
+  "Enable/disable preserving line breaks in attributes."
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-format-enforce-quote-style "ignore"
+  "The way in which quote style should be enforced."
+  :type '(choice
+          (const "ignore")
+          (const "preferred"))
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-format-preserved-newlines 2
+  "The number of empty newlines to be preserved."
+  :type 'integer
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-format-xsi-schema-location-split "onPair"
+  "XSI schema location split settings."
+  :type '(choice
+          (const "onElement")
+          (const "onPair")
+          (const "none"))
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-format-experimental nil
+  "Enable/disable experimental formatter."
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-format-max-line-width 80
+  "Max line width.
+
+This only applies to experimental formatter."
+  :type 'integer
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-format-preserve-space ["xsl:text"
+                                          "xsl:comment"
+                                          "xsl:processing-instruction"
+                                          "literallayout"
+                                          "programlisting"
+                                          "screen"
+                                          "synopsis"
+                                          "pre"
+                                          "xd:pre"]
+  "List of elements which must preserve space.
+
+This option only affects the experimental formatter."
+  :type 'lsp-string-vector
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-format-grammar-aware-formatting t
+  "Enable/disable grammar aware formatting.
+
+This only affects the experimental formatter."
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-xml-file-associations nil
+  "Allows XML schemas to be associated to file name patterns.
+  Example: [{ \"systemId\":\"path/to/file.xsd\",\"pattern\":
+  \"file1.xml\" },{ \"systemId\":
+  \"http://www.w3.org/2001/XMLSchema.xsd\",\"pattern\":
+  \"**/*.xsd\" }]"
+  :type '(repeat string)
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-completion-auto-close-tags t
+  "Enable/disable autoclosing of XML tags. IMPORTANT: Turn off
+  editor.autoClosingTags for this to work"
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-server-vmargs ["-noverify" "-Xmx64M" "-XX:+UseG1GC"
+                                  "-XX:+UseStringDeduplication"]
+  "Specifies extra VM arguments used to launch the XML Language
+  Server. Eg. use `-noverify -Xmx1G -XX:+UseG1GC
+  -XX:+UseStringDeduplication` to bypass class verification,
+  increase the heap size to 1GB and enable String deduplication
+  with the G1 Garbage collector"
+  :type 'lsp-string-vector
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-server-work-dir (expand-file-name ".lsp4xml" "~")
+  "Set a custom folder path for cached XML Schemas. An absolute
+  path is expected, although the ~ prefix (for the user home
+  directory) is supported."
+  :type 'string
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-validation-no-grammar "hint"
+  "The message severity when a document has no associated
+  grammar."
+  :type '(choice  (const "ignore")
+                  (const "hint")
+                  (const "info")
+                  (const "warning")
+                  (const "error"))
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-validation-enabled t
+  "Enable/disable all validation."
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-validation-resolve-external-entities nil
+  "Enable/disable resolution (downloading) of external entities from the internet."
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "8.0.0"))
+
+(defcustom lsp-xml-validation-schema '((enabled . "always"))
+  "The XML schema settings.
+
+The value for `enabled' can be always, never or onValidSchema."
+  :type 'alist
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(lsp-register-custom-settings '
+ (("xml.validation.schema" lsp-xml-validation-schema)
+  ("xml.validation.resolveExternalEntities" lsp-xml-validation-resolve-external-entities)
+  ("xml.validation.enabled" lsp-xml-validation-enabled t)
+  ("xml.validation.noGrammar" lsp-xml-validation-no-grammar)
+  ("xml.server.workDir" lsp-xml-server-work-dir)
+  ("xml.server.vmargs" lsp-xml-server-vmargs)
+  ("xml.completion.autoCloseTags" lsp-xml-completion-auto-close-tags t)
+  ("xml.fileAssociations" lsp-xml-file-associations)
+  ("xml.preferences.quoteStyle" lsp-xml-preferences-quote-style)
+  ("xml.format.enabled" lsp-xml-format-enabled t)
+  ("xml.format.preserveEmptyContent" lsp-xml-format-preserve-empty-content t)
+  ("xml.format.joinContentLines" lsp-xml-format-join-content-lines t)
+  ("xml.format.spaceBeforeEmptyCloseTag" lsp-xml-format-space-before-empty-close-tag t)
+  ("xml.format.joinCommentLines" lsp-xml-format-join-comment-lines t)
+  ("xml.format.joinCDATALines" lsp-xml-format-join-cdata-lines t)
+  ("xml.format.splitAttributes" lsp-xml-format-split-attributes t)
+  ("xml.format.formatComments" lsp-xml-format-comments t)
+  ("xml.format.closingBracketNewLine" lsp-xml-format-closing-bracket-new-line t)
+  ("xml.format.splitAttributesIndentSize" lsp-xml-format-split-attributes-indent-size)
+  ("xml.format.preserveAttributeLineBreaks" lsp-xml-format-preserve-attribute-line-breaks t)
+  ("xml.format.enforceQuoteStyle" lsp-xml-format-enforce-quote-style)
+  ("xml.format.preservedNewlines" lsp-xml-format-preserved-newlines)
+  ("xml.format.xsiSchemaLocationSplit" lsp-xml-format-xsi-schema-location-split)
+  ("xml.format.experimental" lsp-xml-format-experimental t)
+  ("xml.format.maxLineWidth" lsp-xml-format-max-line-width)
+  ("xml.format.preserveSpace" lsp-xml-format-preserve-space)
+  ("xml.format.grammarAwareFormatting" lsp-xml-format-grammar-aware-formatting t)
+  ("xml.logs.client" lsp-xml-logs-client t)
+  ("xml.catalogs" lsp-xml-catalogs)
+  ("xml.trace.server" lsp-xml-trace-server)))
+
+(defcustom lsp-xml-prefer-jar t
+  "Prefer using the jar file instead of the native binary."
+  :type 'boolean
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "8.0.2"))
+
+(defconst lsp-xml-jar-version "0.27.0")
+
+(defconst lsp-xml-jar-name "org.eclipse.lemminx-uber.jar")
+
+(defcustom lsp-xml-jar-file (f-join lsp-server-install-dir "xmlls" lsp-xml-jar-name)
+  "Xml server jar command."
+  :group 'lsp-xml
+  :type 'file
+  :package-version '(lsp-mode . "6.1"))
+
+(defcustom lsp-xml-jar-download-url
+  (format
+   "https://download.eclipse.org/lemminx/releases/%s/%s"
+   lsp-xml-jar-version
+   lsp-xml-jar-name)
+  "Automatic download url for lsp-xml."
+  :type 'string
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "8.0.0"))
+
+(lsp-dependency
+ 'xmlls
+ '(:system lsp-xml-jar-file)
+ `(:download :url lsp-xml-jar-download-url
+             :store-path lsp-xml-jar-file))
+
+(defconst lsp-xml-bin-base-name
+  (format "lemminx-%s" (let ((arch (if (string-prefix-p "x86_64" system-configuration) "x86_64" "aarch_64")))
+                         (pcase system-type
+                           ('darwin (format "osx-%s" arch))
+                           ('gnu/linux "linux")
+                           ('windows-nt "win32")))))
+
+(defconst lsp-xml-bin-name (format "%s%s" lsp-xml-bin-base-name (if (eq system-type 'windows-nt) ".exe" "")))
+
+(defcustom lsp-xml-bin-file (f-join lsp-server-install-dir "xmlls" lsp-xml-bin-name)
+  "Xml server binary."
+  :group 'lsp-xml
+  :type 'file
+  :package-version '(lsp-mode . "8.0.2"))
+
+(defcustom lsp-xml-bin-download-url
+  ;; This is the version with `latest` tag
+  (format "https://github.com/redhat-developer/vscode-xml/releases/latest/download/%s.zip"
+          lsp-xml-bin-base-name)
+  "Automatic download url for lsp-xml's native binary."
+  :type 'string
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "8.0.2"))
+
+(lsp-dependency
+ 'xmlls-bin
+ '(:system ,(file-name-nondirectory lsp-xml-bin-file))
+ `(:download :url lsp-xml-bin-download-url
+             :decompress :zip
+             :store-path lsp-xml-bin-file))
+
+(defsubst lsp-xml-has-java? () (executable-find "java"))
+
+(defcustom lsp-xml-server-command
+  (lambda () (or (and (lsp-xml-has-java?) lsp-xml-prefer-jar `("java" "-jar" ,lsp-xml-jar-file))
+                 `(,lsp-xml-bin-file)))
+  "Xml server command."
+  :type '(choice (repeat string) (function))
+  :group 'lsp-xml
+  :package-version '(lsp-mode . "6.1"))
+
+(defun lsp-xml--create-connection ()
+  "Create a connection for the XML language server."
+  (lsp-stdio-connection
+   (lambda () (lsp-resolve-value lsp-xml-server-command))
+   (lambda () (or (and (lsp-xml-has-java?) lsp-xml-prefer-jar (f-exists? lsp-xml-jar-file))
+                  (f-exists? lsp-xml-bin-file)))))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-xml--create-connection)
+                  :activation-fn (lsp-activate-on "xml")
+                  :priority 0
+                  :server-id 'xmlls
+                  :multi-root t
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration (lsp-configuration-section "xml"))))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure (or (and (lsp-xml-has-java?) lsp-xml-prefer-jar 'xmlls)
+                                                                'xmlls-bin)
+                                                            callback error-callback))))
+
+(lsp-consistency-check lsp-xml)
+
+(provide 'lsp-xml)
+;;; lsp-xml.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-yaml.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-yaml.el
new file mode 100644
index 0000000..e728f60
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-yaml.el
@@ -0,0 +1,253 @@
+;;; lsp-yaml.el --- LSP YAML server integration        -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019  Aya Igarashi
+;; Copyright (C) 2019-2026 lsp-mode maintainers
+
+;; Author: Aya Igarashi <ladiclexxx@gmail.com>
+;; Keywords:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'dash)
+
+(defgroup lsp-yaml nil
+  "LSP support for YAML, using yaml-language-server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/redhat-developer/yaml-language-server")
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-format-enable t
+  "Enable/disable default YAML formatter."
+  :type 'boolean
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-single-quote nil
+  "Use single quote instead of double quotes."
+  :type 'boolean
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-bracket-spacing t
+  "Print spaces between brackets in objects."
+  :type 'boolean
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-prose-wrap "preserve"
+  "Options for prose-wrap.
+   Always: wrap prose if it exceeds the print width.
+   Never: never wrap the prose.
+   Preserve: wrap prose as-is."
+  :type '(choice (const "always")
+                 (const "never")
+                 (const "preserve"))
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-print-width 80
+  "Specify the line length that the printer will wrap on."
+  :type 'number
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-validate t
+  "Enable/disable validation feature."
+  :type 'boolean
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-hover t
+  "Enable/disable hover feature."
+  :type 'boolean
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-completion t
+  "Enable/disable completion feature."
+  :type 'boolean
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-schemas '()
+  "Associate schemas to YAML files in a glob pattern."
+  :type '(alist :key-type (symbol :tag "schema") :value-type (lsp-string-vector :tag "files (glob)"))
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-schema-store-enable t
+  "Enable/disable JSON Schema store. When set to true, available YAML
+   schemas will be automatically pulled from the store."
+  :type 'boolean
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-custom-tags nil
+  "Custom tags for the parser to use."
+  :type '(lsp-repeatable-vector string)
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(defcustom lsp-yaml-schema-store-uri "https://www.schemastore.org/api/json/catalog.json"
+  "URL of schema store catalog to use."
+  :type 'string
+  :group 'lsp-yaml)
+
+(defcustom lsp-yaml-schema-store-local-db
+  (expand-file-name
+   (locate-user-emacs-file (f-join ".cache" "lsp" "lsp-yaml-schemas.json")))
+  "Cached database of schema store."
+  :type 'file
+  :group 'lsp-yaml)
+
+(defcustom lsp-yaml-max-items-computed 5000
+  "The maximum number of outline symbols and folding regions computed.
+Limited for performance reasons."
+  :type 'number
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "8.0.0"))
+
+
+(defvar lsp-yaml--schema-store-schemas-alist nil
+  "A list of schemas fetched from schema stores.")
+
+(lsp-register-custom-settings
+ '(("yaml.format.enable" lsp-yaml-format-enable t)
+   ("yaml.format.singleQuote" lsp-yaml-single-quote t)
+   ("yaml.format.bracketSpacing" lsp-yaml-bracket-spacing)
+   ("yaml.format.proseWrap" lsp-yaml-prose-wrap)
+   ("yaml.format.printWidth" lsp-yaml-print-width)
+   ("yaml.validate" lsp-yaml-validate t)
+   ("yaml.hover" lsp-yaml-hover t)
+   ("yaml.completion" lsp-yaml-completion t)
+   ("yaml.schemas" lsp-yaml-schemas)
+   ("yaml.schemaStore.enable" lsp-yaml-schema-store-enable t)
+   ("yaml.schemaStore.url" lsp-yaml-schema-store-uri)
+   ("yaml.customTags" lsp-yaml-custom-tags)
+   ("yaml.maxItemsComputed" lsp-yaml-max-items-computed)))
+
+(defcustom lsp-yaml-server-command '("yaml-language-server" "--stdio")
+  "Command to start yaml-languageserver."
+  :type '(repeat string)
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "6.2"))
+
+(lsp-dependency 'yaml-language-server
+                '(:system "yaml-language-server")
+                '(:npm :package "yaml-language-server"
+                       :path "yaml-language-server"))
+
+(lsp-register-client
+ (make-lsp-client :new-connection (lsp-stdio-connection
+                                   (lambda ()
+                                     `(,(or (executable-find (cl-first lsp-yaml-server-command))
+                                            (lsp-package-path 'yaml-language-server))
+                                       ,@(cl-rest lsp-yaml-server-command))))
+                  :activation-fn (lsp-activate-on "yaml")
+                  :priority 0
+                  :server-id 'yamlls
+                  :initialized-fn (lambda (workspace)
+                                    (with-lsp-workspace workspace
+                                      (lsp--set-configuration
+                                       (lsp-configuration-section "yaml"))))
+                  :download-server-fn (lambda (_client callback error-callback _update?)
+                                        (lsp-package-ensure 'yaml-language-server
+                                                            callback error-callback))))
+
+(defconst lsp--yaml-schema-extension-type
+  '(list (cons 'name  string)
+         (cons 'description string)
+         (cons 'url string)
+         (cons 'fileMatch (repeat string))))
+
+(defcustom lsp-yaml-schema-extensions '(((name . "Kubernetes v1.30.3")
+                                         (description . "Kubernetes v1.30.3 manifest schema definition")
+                                         (url . "https://raw.githubusercontent.com/yannh/kubernetes-json-schema/master/v1.30.3-standalone-strict/all.json")
+                                         (fileMatch . ["*-k8s.yaml" "*-k8s.yml"])))
+  "User defined schemas that extend default schema store.
+Used in `lsp-yaml--get-supported-schemas' to supplement schemas provided by
+`lsp-yaml-schema-store-uri'."
+  :type  '(repeat lsp--yaml-schema-extension-type)
+  :group 'lsp-yaml
+  :package-version '(lsp-mode . "10.0.0"))
+
+(defun lsp-yaml-download-schema-store-db (&optional force-downloading)
+  "Download remote schema store at `lsp-yaml-schema-store-uri' into local cache.
+Set FORCE-DOWNLOADING to non-nil to force re-download the database."
+  (interactive "P")
+  (when (or force-downloading (not (file-exists-p lsp-yaml-schema-store-local-db)))
+    (unless (file-directory-p (file-name-directory lsp-yaml-schema-store-local-db))
+      (mkdir (file-name-directory lsp-yaml-schema-store-local-db) t))
+    (url-copy-file lsp-yaml-schema-store-uri lsp-yaml-schema-store-local-db force-downloading)))
+
+(defun lsp-yaml--get-supported-schemas ()
+  "Get out the list of supported schemas."
+  (when (and lsp-yaml-schema-store-enable
+             (not lsp-yaml--schema-store-schemas-alist))
+    (lsp-yaml-download-schema-store-db)
+    (setq lsp-yaml--schema-store-schemas-alist
+          (alist-get 'schemas (json-read-file lsp-yaml-schema-store-local-db))))
+  (seq-concatenate 'list lsp-yaml-schema-extensions lsp-yaml--schema-store-schemas-alist))
+
+(defun lsp-yaml-set-buffer-schema (uri-string)
+  "Set yaml schema for the current buffer to URI-STRING."
+  (interactive "MURI: ")
+  (let* ((uri (intern uri-string))
+         (workspace-path (file-relative-name
+                          (lsp--uri-to-path (lsp--buffer-uri))
+                          (lsp-workspace-root (lsp--buffer-uri))))
+         (glob (concat "/" workspace-path))
+         (current-config (assoc uri lsp-yaml-schemas))
+         (current-patterns (and current-config (cdr current-config))))
+    (if current-config
+        (or (member glob (append current-patterns nil))
+            (setq lsp-yaml-schemas
+                  (cl-acons uri
+                            (vconcat (vector glob) current-patterns)
+                            (assq-delete-all uri
+                                             (mapcar (lambda (x) (lsp-yaml--remove-glob x glob))
+                                                     lsp-yaml-schemas)))))
+      (setq lsp-yaml-schemas
+            (cl-acons uri (vector glob) (mapcar (lambda (x) (lsp-yaml--remove-glob x glob))
+                                                lsp-yaml-schemas))))
+    (lsp--set-configuration (lsp-configuration-section "yaml"))))
+
+(defun lsp-yaml-select-buffer-schema ()
+  "Select schema for the current buffer based on the list of supported schemas."
+  (interactive)
+  (let* ((schema (lsp--completing-read "Select buffer schema: "
+                                       (lsp-yaml--get-supported-schemas)
+                                       (lambda (schema)
+                                         (format "%s: %s" (alist-get 'name schema)(alist-get 'description schema)))
+                                       nil t))
+         (uri (alist-get 'url schema)))
+    (lsp-yaml-set-buffer-schema uri)))
+
+(defun lsp-yaml--remove-glob (mapping glob)
+  (let ((patterns (cdr mapping)))
+    (cons (car mapping)
+          (vconcat (-filter (lambda (p) (not (equal p glob)))
+                            (append patterns nil)) nil))))
+
+(lsp-consistency-check lsp-yaml)
+
+(provide 'lsp-yaml)
+;;; lsp-yaml.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-yang.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-yang.el
new file mode 100644
index 0000000..b3866da
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-yang.el
@@ -0,0 +1,123 @@
+;;; lsp-yang.el --- YANG Client settings         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024 Siddharth Sharma
+;; Copyright (C) 2024-2026 lsp-mode maintainers
+
+;; Author: Siddharth Sharma <siddharth.sharma@ericsson.com>
+;; Keywords: languages, yang, lsp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; LSP support for YANG using using an external language server. Currently
+;; the supported server is:
+;;
+;; yang-lsp (yls).
+;; See https://github.com/TypeFox/yang-lsp/blob/master/docs/Settings.md
+;; for setting up the user/project/workspace files.
+
+;;; Code:
+
+(require 'lsp-mode)
+
+(defgroup lsp-yang nil
+  "LSP support for the YANG data modeling language using yang-lsp server."
+  :group 'lsp-yang
+  :link '(url-link "https://github.com/TypeFox/yang-lsp"))
+
+(defcustom lsp-yang-yls-version "0.7.6"
+  "yang-lsp server version to download.
+
+It has to be set before `lsp-yang.el' is loaded and it has to
+be available here: https://github.com/TypeFox/yang-lsp/releases/"
+  :type 'string
+  :group 'lsp-yang
+  :package-version '(lsp-mode . "9.0.0"))
+
+(add-to-list 'auto-mode-alist '("^yang\\.settings$" . jsonc-mode))
+
+(defcustom lsp-yang-yls-settings-schema-url
+  (format "https://raw.githubusercontent.com/TypeFox/yang-lsp/v%s/schema/yang-lsp-settings-schema.json"
+          lsp-yang-yls-version)
+  "URL for yang-lsp server settings schema"
+  :type 'string
+  :group 'lsp-yang
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-yang-yls-executable "yang-language-server"
+  "The yang-lsp server executable to use.
+
+Leave as just the executable name to use the default behavior of finding the
+executable with variable `exec-path'."
+  :group 'lsp-yang
+  :type 'string)
+
+(defcustom lsp-yang-yls-download-url
+  (format "https://github.com/TypeFox/yang-lsp/releases/download/v%s/yang-language-server_%s.zip"
+          lsp-yang-yls-version
+          lsp-yang-yls-version)
+  "Automatic download url for yang-lsp server"
+  :type 'string
+  :group 'lsp-yang
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-yang-yls-store-path
+  (f-join lsp-server-install-dir "yang-lsp" "yang-lsp")
+  "The path to the file in which `yang-language-server' will be stored."
+  :type 'file
+  :group 'lsp-yang
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defcustom lsp-yang-yls-binary-path
+  (f-join lsp-server-install-dir (format "yang-lsp/yang-language-server-%s/bin"
+                                         lsp-yang-yls-version)
+          (pcase system-type
+            ('windows-nt "yang-language-server.bat")
+            (_ "yang-language-server")))
+  "The path to `yang-language-server' binary."
+  :type 'file
+  :group 'lsp-yang
+  :package-version '(lsp-mode . "9.0.0"))
+
+(defun lsp-yang--stored-yls-executable ()
+  "Return the stored yang-lsp server executable."
+  (executable-find lsp-yang-yls-binary-path))
+
+(lsp-dependency
+  'yang-lsp
+  `(:download :url lsp-yang-yls-download-url
+              :decompress :zip
+              :store-path lsp-yang-yls-store-path
+              :binary-path lsp-yang-yls-binary-path
+              :set-exectutable? t))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda () (or (executable-find lsp-yang-yls-executable)
+                                  (lsp-yang--stored-yls-executable)))
+                   (lambda () (or (executable-find lsp-yang-yls-executable)
+                                  (file-executable-p (lsp-yang--stored-yls-executable)))))
+  :major-modes '(yang-mode)
+  :language-id "YANG"
+  :priority -1
+  :server-id 'yls
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'yang-lsp callback error-callback))))
+
+(lsp-consistency-check lsp-yang)
+
+(provide 'lsp-yang)
+;;; lsp-yang.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-zig.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-zig.el
new file mode 100644
index 0000000..564c6e1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp-zig.el
@@ -0,0 +1,343 @@
+;;; lsp-zig.el --- lsp-mode Zig integration -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021 Riccardo Binetti
+;; Copyright (C) 2021-2026 lsp-mode maintainers
+
+;; Author: Riccardo Binetti <rbino@gmx.com>
+;; Keywords: languages,tools
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;  client for zls, the Zig language server
+
+;;; Code:
+
+(require 'lsp-mode)
+(require 'url)
+(require 'json)
+
+(defgroup lsp-zig nil
+  "LSP support for Zig via zls."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/zigtools/zls"))
+
+(defcustom lsp-zig-zls-executable "zls"
+  "The zls executable to use.
+
+Leave as just the executable name to use the default behavior of finding the
+executable with variable `exec-path'."
+  :group 'lsp-zig
+  :type 'string)
+
+(defcustom lsp-zig-trace-server "off"
+  "Traces the communication between Emacs and the language server."
+  :group 'lsp-zig
+  :type '(choice (const "off")
+                 (const "messages")
+                 (const "verbose")))
+
+(defcustom lsp-zls-enable-snippets t
+  "Enables snippet completions when the client also supports them."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-enable-argument-placeholders t
+  "Whether to enable function argument placeholder completions."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-enable-build-on-save nil
+  "Whether to enable build-on-save diagnostics."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-build-on-save-step "install"
+  "Select which step should be executed on build-on-save."
+  :group 'lsp-zig
+  :type 'string)
+
+(defcustom lsp-zig-enable-autofix nil
+  "Whether to automatically fix errors on save.
+Currently supports adding and removing discards."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-semantic-tokens "partial"
+  "Traces the communication between Emacs and the language server."
+  :group 'lsp-zig
+  :type '(choice (const "off")
+                 (const "messages")
+                 (const "verbose")))
+
+(defcustom lsp-zig-enable-inlay-hints t
+  "Enables inlay hint support when the client also supports it."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-inlay-hints-show-variable-type-hints t
+  "Enable inlay hints for variable type."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-inlay-hints-show-parameter-name t
+  "Enable inlay hints for parameter names."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-inlay-hints-exclude-single-argument t
+  "Don't show inlay hints for single argument calls."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-inlay-hints-show-builtin t
+  "Don't show inlay hints for single argument calls."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-inlay-hints-hide-redundant-param-names nil
+  "Hides inlay hints when parameter name matches the identifier (e.g. foo: foo)."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-inlay-hints-hide-redundant-param-names-last-token nil
+  "Hides inlay hints when parameter name matches the last token of a parameter
+node (e.g. foo: bar.foo, foo: &foo)."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-warn-style nil
+  "Enables warnings for style guideline mismatches."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-highlight-global-var-declarations nil
+  "Whether to highlight global var declarations."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-dangerous-comptime-experiments-do-not-enable nil
+  "When true, skips searching for references in std.
+Improves lookup speed for functions in user's code.  Renaming and
+go-to-definition will continue to work as is."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-skip-std-references nil
+  "hen true, skips searching for references in std.
+Improves lookup speed for functions in user's code.  Renaming and
+ go-to-definition will continue to work as is."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-prefer-ast-check-as-child-process t
+  "Favor using `zig ast-check` instead of ZLS's fork."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-record-session nil
+  "When true, zls will record all request is receives and write in into
+`record_session_path`, so that they can replayed with `zls replay`."
+  :group 'lsp-zig
+  :type 'boolean)
+
+(defcustom lsp-zig-record-session-path ""
+  "Output file path when `record_session` is set.
+The recommended file extension *.zlsreplay."
+  :group 'lsp-zig
+  :type 'string)
+
+(defcustom lsp-zig-replay-session-path ""
+  "Used when calling `zls replay` for specifying the replay file.
+If no extra argument is given `record_session_path` is used as the default path."
+  :group 'lsp-zig
+  :type 'string)
+
+(defcustom lsp-zig-builtin-path nil
+  "Path to `builtin'; useful for debugging, automatically set if let null."
+  :group 'lsp-zig
+  :type '(choice (const nil) string))
+
+(defcustom lsp-zig-zig-lib-path nil
+  "Zig library path.
+e.g. `/path/to/zig/lib/zig`, used to analyze std library imports."
+  :group 'lsp-zig
+  :type '(choice (const nil) string))
+
+(defcustom lsp-zig-zig-exe-path nil
+  "	Zig executable path.
+e.g. /path/to/zig/zig, used to run the custom build runner.  If null, zig is
+looked up in PATH.  Will be used to infer the zig standard library path if none
+is provided."
+  :group 'lsp-zig
+  :type '(choice (const nil) string))
+
+(defcustom lsp-zig-build-runner-path nil
+  "Path to the `build_runner.zig` file provided by zls.
+null is equivalent to `${executable_directory}/build_runner.zig`."
+  :group 'lsp-zig
+  :type '(choice (const nil) string))
+
+(defcustom lsp-zig-global-cache-path nil
+  "Path to a directory that will be used as zig's cache.
+null is equivalent to `${KnownFolders.Cache}/zls`."
+  :group 'lsp-zig
+  :type '(choice (const nil) string))
+
+(defcustom lsp-zig-build-runner-global-cache-path nil
+  "Path to a directory that will be used as the global cache path when executing
+a projects build.zig.  null is equivalent to the path shown by `zig env`."
+  :group 'lsp-zig
+  :type '(choice (const nil) string))
+
+(defcustom lsp-zig-completions-with-replace nil
+  "Completions confirm behavior.
+If `true', replace the text after the cursor."
+  :group 'lsp-zig
+  :type 'boolean)
+
+;;
+;;; Installation
+
+(defcustom lsp-zig-server-store-path
+  (expand-file-name "zig/" lsp-server-install-dir)
+  "The path to the file in which zls will be stored."
+  :type 'file
+  :group 'lsp-zig)
+
+(defun lsp-zig--get-zls-latest-version ()
+  "Fetch the version number (tag_name) of the latest zls release from GitHub."
+  (let ((url "https://api.github.com/repos/zigtools/zls/releases/latest")
+        (buffer nil)
+        (json-data nil))
+    (message "Fetching latest ZLS version...")
+    ;; Fetch the JSON data synchronously
+    (setq buffer (url-retrieve-synchronously url))
+    (if (not buffer)
+        (message "Failed to retrieve URL")
+      (with-current-buffer buffer
+        (goto-char (point-min))
+        ;; Skip HTTP headers (search for the first empty line)
+        (re-search-forward "^$" nil 'move)
+        (forward-char) ;; Move past the newline
+        ;; Parse the JSON
+        (condition-case err
+            (setq json-data (json-read))
+          (error (message "Error parsing JSON: %s" err)))
+        ;; Clean up the temporary buffer
+        (kill-buffer buffer)))
+
+    ;; Extract the tag_name
+    (when json-data
+      (cdr (assoc 'tag_name json-data)))))
+
+(defcustom lsp-zig-server-version nil
+  "The target language server version for zls.
+
+If the value is `nil', it will use the latest version instead."
+  :type '(choice (string :tag "Specified version")
+                 (const :tag "Latest version" nil))
+  :group 'lsp-zig)
+
+(defconst lsp-zig-download-url-format
+  "https://builds.zigtools.org/zls-%s-%s-%s.%s"
+  "Format to the download url link.")
+
+(defun lsp-zig--zls-url ()
+  "Return Url points to the zls' zip/tar file."
+  (let* ((x86 (string-prefix-p "x86_64" system-configuration))
+         (arch (if x86 "x86_64" "aarch64"))
+         (ver (or lsp-zig-server-version
+                  (lsp-zig--get-zls-latest-version))))
+    (cl-case system-type
+      ((cygwin windows-nt ms-dos)
+       (format lsp-zig-download-url-format
+               arch "windows" ver "zip"))
+      (darwin
+       (format lsp-zig-download-url-format
+               arch "macos" ver "tar.xz"))
+      (gnu/linux
+       (format lsp-zig-download-url-format
+               arch "linux" ver "tar.xz")))))
+
+(defun lsp-zig--stored-zls-executable ()
+  "Return the stored zls executable.
+
+This is differ from the variable `lsp-zig-zls-executable'; this is local storage
+and not the global storage."
+  (f-join lsp-zig-server-store-path
+          (pcase system-type ('windows-nt "zls.exe") (_ "zls"))))
+
+(lsp-dependency
+ 'zls
+ '(:system "zls")
+ `(:download :url ,(lambda (&rest _) (lsp-zig--zls-url))
+             :decompress ,(pcase system-type ('windows-nt :zip) (_ :tarxz))
+             :store-path ,(f-join lsp-zig-server-store-path "temp")
+             :set-executable? t)
+ `(:system ,(lsp-zig--stored-zls-executable)))
+
+;;
+;;; Core
+
+(lsp-register-custom-settings
+ '(("zls.enable_snippets" lsp-zls-enable-snippets t)
+   ("zls.enable_argument_placeholders" lsp-zig-enable-argument-placeholders t)
+   ("zls.enable_build_on_save" lsp-zig-enable-build-on-save t)
+   ("zls.build_on_save_step" lsp-zig-build-on-save-step)
+   ("zls.enable_autofix" lsp-zig-enable-autofix t)
+   ("zls.semantic_tokens" lsp-zig-semantic-tokens)
+   ("zls.enable_inlay_hints" lsp-zig-enable-inlay-hints t)
+   ("zls.inlay_hints_show_variable_type_hints" lsp-zig-inlay-hints-show-variable-type-hints t)
+   ("zls.inlay_hints_show_parameter_name" lsp-zig-inlay-hints-show-parameter-name t)
+   ("zls.inlay_hints_show_builtin" lsp-zig-inlay-hints-show-builtin t)
+   ("zls.inlay_hints_exclude_single_argument" lsp-zig-inlay-hints-exclude-single-argument t)
+   ("zls.inlay_hints_hide_redundant_param_names" lsp-zig-inlay-hints-hide-redundant-param-names t)
+   ("zls.inlay_hints_hide_redundant_param_names_last_token" lsp-zig-inlay-hints-hide-redundant-param-names-last-token t)
+   ("zls.warn_style" lsp-zig-warn-style t)
+   ("zls.highlight_global_var_declarations" lsp-zig-highlight-global-var-declarations t)
+   ("zls.dangerous_comptime_experiments_do_not_enable" lsp-zig-dangerous-comptime-experiments-do-not-enable t)
+   ("zls.skip_std_references" lsp-zig-skip-std-references t)
+   ("zls.prefer_ast_check_as_child_process" lsp-zig-prefer-ast-check-as-child-process t)
+   ("zls.record_session" lsp-zig-record-session t)
+   ("zls.record_session_path" lsp-zig-record-session-path)
+   ("zls.replay_session_path" lsp-zig-replay-session-path)
+   ("zls.builtin_path" lsp-zig-builtin-path)
+   ("zls.zig_lib_path" lsp-zig-zig-lib-path)
+   ("zls.zig_exe_path" lsp-zig-zig-exe-path)
+   ("zls.build_runner_path" lsp-zig-build-runner-path)
+   ("zls.global_cache_path" lsp-zig-global-cache-path)
+   ("zls.build_runner_global_cache_path" lsp-zig-build-runner-global-cache-path)
+   ("zls.completion_label_details" lsp-zig-completions-with-replace t)))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection
+                   (lambda () (or (executable-find lsp-zig-zls-executable)
+                                  (lsp-zig--stored-zls-executable)))
+                   (lambda ()
+                     (or (executable-find lsp-zig-zls-executable)
+                         (file-executable-p (lsp-zig--stored-zls-executable)))))
+  :activation-fn (lsp-activate-on "zig")
+  :priority -1
+  :server-id 'zls
+  :download-server-fn
+  (lambda (_client callback error-callback _update?)
+    (lsp-package-ensure 'zls callback error-callback))))
+
+(lsp-consistency-check lsp-zig)
+
+(provide 'lsp-zig)
+;;; lsp-zig.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp.el b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp.el
new file mode 100644
index 0000000..177cfc9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-mode-20260716.755/lsp.el
@@ -0,0 +1,8 @@
+;; The code was moved into lsp-mode.el. This file is kept only for backward compatibility. -*- lexical-binding: t -*-
+(require 'lsp-mode)
+
+;; (warn "Replace (require 'lsp) with (require 'lsp-mode)")
+
+(provide 'lsp)
+
+;;; lsp.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright-autoloads.el b/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright-autoloads.el
new file mode 100644
index 0000000..7e28823
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright-autoloads.el
@@ -0,0 +1,28 @@
+;;; lsp-pyright-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from lsp-pyright.el
+
+(register-definition-prefixes "lsp-pyright" '("lsp-pyright-"))
+
+;;; End of scraped data
+
+(provide 'lsp-pyright-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; lsp-pyright-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright-pkg.el b/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright-pkg.el
new file mode 100644
index 0000000..5d15743
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright-pkg.el
@@ -0,0 +1,11 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "lsp-pyright" "20260507.1742"
+  "Python LSP client using Pyright."
+  '((emacs    "29.1")
+    (lsp-mode "7.0")
+    (dash     "2.18.0")
+    (ht       "2.0"))
+  :url "https://github.com/emacs-lsp/lsp-pyright"
+  :commit "187e08caee4e1630a9975f492274c739f325392f"
+  :revdesc "187e08caee4e"
+  :keywords '("languages" "tools" "lsp"))
diff --git a/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright.el b/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright.el
new file mode 100644
index 0000000..63be8cd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright.el
@@ -0,0 +1,335 @@
+;;; lsp-pyright.el --- Python LSP client using Pyright -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020-2025 emacs-lsp maintainers
+
+;; Author: Arif Rezai, Vincent Zhang, Andrew Christianson
+;; Package-Version: 20260507.1742
+;; Package-Revision: 187e08caee4e
+;; Package-Requires: ((emacs "29.1") (lsp-mode "7.0") (dash "2.18.0") (ht "2.0"))
+;; Homepage: https://github.com/emacs-lsp/lsp-pyright
+;; Keywords: languages, tools, lsp
+
+
+;; This file is not part of GNU Emacs
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; For a full copy of the GNU General Public License
+;; see <https://www.gnu.org/licenses/>.
+;;
+;;; Commentary:
+;;
+;;  Pyright language server.
+;;
+;;; Code:
+
+(require 'lsp-mode)
+(require 'dash)
+(require 'ht)
+(require 'cl-lib)
+
+;; Group declaration
+(defgroup lsp-pyright nil
+  "LSP support for python using the Pyright Language Server."
+  :group 'lsp-mode
+  :link '(url-link "https://github.com/microsoft/pyright")
+  :link '(url-link "https://github.com/DetachHead/basedpyright"))
+
+(defcustom lsp-pyright-langserver-command "pyright"
+  "Choose whether to use Pyright or the BasedPyright fork."
+  :type '(choice
+          (const "pyright")
+          (const "basedpyright"))
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-langserver-command-args '("--stdio")
+  "Command to start pyright-langserver."
+  :type '(repeat string)
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-disable-language-services nil
+  "Disables all language services except for \"hover\"."
+  :type 'boolean
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-disable-organize-imports nil
+  "Disables the \"Organize Imports\" command."
+  :type 'boolean
+  :group 'lsp-pyright)
+
+
+(defcustom lsp-pyright-disable-tagged-hints nil
+  "Disables grayed out special hint diagnostics tags."
+  :type 'boolean
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-diagnostic-mode "openFilesOnly"
+  "Determines pyright diagnostic mode.
+Whether pyright analyzes (and reports errors for) all files
+in the workspace, as indicated by the config file.
+If this option is set to \"openFilesOnly\", pyright analyzes only open files."
+  :type '(choice
+          (const "openFilesOnly")
+          (const "workspace"))
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-type-checking-mode "standard"
+  "Specifies the default rule set to use.
+
+\"off\" disables all type-checking rules, but Python syntax and semantic
+errors are still reported. \"all\" reports all errors in basedpyright,
+but is not supported by pyright. "
+  :type '(choice
+          (const :tag "Off" "off")
+          (const :tag "Basic" "basic")
+          (const :tag "Standard" "standard")
+          (const :tag "Strict" "strict")
+          (const :tag "All (basedpyright only)" "all"))
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-log-level "info"
+  "Determines the default log level used by pyright.
+This can be overridden in the configuration file."
+  :type '(choice
+          (const "error")
+          (const "warning")
+          (const "info")
+          (const "trace"))
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-auto-search-paths t
+  "Determines whether pyright automatically adds common search paths.
+i.e: Paths like \"src\" if there are no execution environments defined in the
+config file."
+  :type 'boolean
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-extra-paths []
+  "Paths to add to the default execution environment extra paths.
+If there are no execution environments defined in the config file."
+  :type 'lsp-string-vector
+  :group 'lsp-pyright)
+(make-variable-buffer-local 'lsp-pyright-extra-paths)
+
+(defcustom lsp-pyright-auto-import-completions t
+  "Determines whether pyright offers auto-import completions."
+  :type 'boolean
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-venv-path nil
+  "Path to folder with subdirectories that contain virtual environments.
+Virtual Envs specified in pyrightconfig.json will be looked up in this path."
+  :type '(choice (const :tag "None" nil) file)
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-venv-directory nil
+  "Folder with subdirectories that contain virtual environments.
+Virtual Envs specified in pyrightconfig.json will be looked up in this path."
+  :type '(choice (const :tag "None" nil) directory)
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-multi-root t
+  "If non nil, lsp-pyright will be started in multi-root mode."
+  :type 'boolean
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-python-executable-cmd "python"
+  "Command to specify the Python command for pyright.
+Similar to the `python-shell-interpreter', but used only with mspyls.
+Useful when there are multiple python versions in system.
+e.g, there are `python2' and `python3', both in system PATH,
+and the default `python' links to python2,
+set as `python3' to let ms-pyls use python 3 environments."
+  :type 'string
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-prefer-remote-env t
+  "If non nil, lsp-pyright will prefer remote python environment.
+Only available in Emacs 27 and above."
+  :type 'boolean
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-python-search-functions
+  '(lsp-pyright--locate-python-venv
+    lsp-pyright--locate-python-python)
+  "List of functions to search for python executable."
+  :type 'list
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-diagnostic-severity-overrides '()
+  "Overrides certain rules severity leve l"
+  :group 'lsp-pyright
+  :type `(alist :key-type (string :tag "Rule Name")
+                :value-type (choice
+                             (const :tag "No Error" "none")
+                             (const :tag "Warning""warning")
+                             (const :tag "Information" "information")
+                             (const :tag "Error" "error")
+                             (const :tag "An error is generated" t)
+                             (const :tag "No error is generated" ,json-false))))
+
+(defcustom lsp-pyright-basedpyright-inlay-hints-variable-types t
+  "Whether to show inlay hints on assignments to variables.
+
+Basedpyright only."
+  :type 'boolean
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-basedpyright-inlay-hints-call-argument-names t
+  "Whether to show inlay hints on function arguments.
+
+Basedpyright only."
+  :type 'boolean
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-basedpyright-inlay-hints-function-return-types t
+  "Whether to show inlay hints on function return types.
+
+Basedpyright only."
+  :type 'boolean
+  :group 'lsp-pyright)
+
+(defcustom lsp-pyright-basedpyright-inlay-hints-generic-types nil
+  "Whether to show inlay hints on inferred generic types.
+
+Basedpyright only."
+  :type 'boolean
+  :group 'lsp-pyright)
+
+(defun lsp-pyright--locate-venv ()
+  "Look for virtual environments local to the workspace."
+  (or lsp-pyright-venv-path
+      (and lsp-pyright-venv-directory
+           (-when-let (venv-base-directory (locate-dominating-file default-directory lsp-pyright-venv-directory))
+             (concat venv-base-directory lsp-pyright-venv-directory)))
+      (-when-let (venv-base-directory (locate-dominating-file default-directory "venv/"))
+        (concat venv-base-directory "venv"))
+      (-when-let (venv-base-directory (locate-dominating-file default-directory ".venv/"))
+        (concat venv-base-directory ".venv"))))
+
+(defun lsp-pyright--locate-python-venv ()
+  "Find a python executable based on the current virtual environment."
+  (executable-find (f-expand "bin/python" (lsp-pyright--locate-venv))))
+
+(defun lsp-pyright--locate-python-python ()
+  "Find a python executable based on the version of python on the PATH."
+  (with-no-warnings
+    (if (>= emacs-major-version 27)
+        (executable-find lsp-pyright-python-executable-cmd lsp-pyright-prefer-remote-env)
+      (executable-find lsp-pyright-python-executable-cmd))))
+
+(defun lsp-pyright-locate-python ()
+  "Find a python executable cmd for the workspace."
+  (cl-some #'funcall lsp-pyright-python-search-functions))
+
+(defun lsp-pyright--begin-progress-callback (workspace &rest _)
+  "Log begin progress information.
+Current LSP WORKSPACE should be passed in."
+  (when lsp-progress-via-spinner
+    (with-lsp-workspace workspace
+      (--each (lsp--workspace-buffers workspace)
+        (when (buffer-live-p it)
+          (with-current-buffer it
+            (lsp--spinner-start))))))
+  (lsp-log "Pyright language server is analyzing..."))
+
+(defun lsp-pyright--report-progress-callback (_workspace params)
+  "Log report progress information.
+First element of PARAMS will be passed into `lsp-log'."
+  (when (and (arrayp params) (> (length params) 0))
+    (lsp-log (aref params 0))))
+
+(defun lsp-pyright--end-progress-callback (workspace &rest _)
+  "Log end progress information.
+Current LSP WORKSPACE should be passed in."
+  (when lsp-progress-via-spinner
+    (with-lsp-workspace workspace
+      (--each (lsp--workspace-buffers workspace)
+        (when (buffer-live-p it)
+          (with-current-buffer it
+            (lsp--spinner-stop))))))
+  (lsp-log "Pyright language server is analyzing...done"))
+
+(defun lsp-pyright-organize-imports ()
+  "Organize imports in current buffer."
+  (interactive)
+  (lsp-send-execute-command (concat lsp-pyright-langserver-command ".organizeimports")
+                            (vector (concat "file://" (buffer-file-name)))))
+
+(lsp-register-custom-settings
+ `((,(concat lsp-pyright-langserver-command ".disableLanguageServices") lsp-pyright-disable-language-services t)
+   (,(concat lsp-pyright-langserver-command ".disableOrganizeImports") lsp-pyright-disable-organize-imports t)
+   (,(concat lsp-pyright-langserver-command ".disableTaggedHints") lsp-pyright-disable-tagged-hints t)
+   (,(concat lsp-pyright-langserver-command ".typeCheckingMode") lsp-pyright-type-checking-mode)
+   (,(concat lsp-pyright-langserver-command ".analysis.diagnosticSeverityOverrides") (lambda () (ht-from-alist lsp-pyright-diagnostic-severity-overrides)))
+   ("python.analysis.diagnosticSeverityOverrides" (lambda () (ht-from-alist lsp-pyright-diagnostic-severity-overrides)))
+   ("basedpyright.analysis.inlayHints.variableTypes" lsp-pyright-basedpyright-inlay-hints-variable-types t)
+   ("basedpyright.analysis.inlayHints.callArgumentNames" lsp-pyright-basedpyright-inlay-hints-call-argument-names t)
+   ("basedpyright.analysis.inlayHints.functionReturnTypes" lsp-pyright-basedpyright-inlay-hints-function-return-types t)
+   ("basedpyright.analysis.inlayHints.genericTypes" lsp-pyright-basedpyright-inlay-hints-generic-types t)
+   ("python.analysis.typeCheckingMode" lsp-pyright-type-checking-mode)
+   ("python.analysis.autoImportCompletions" lsp-pyright-auto-import-completions t)
+   ("python.analysis.diagnosticMode" lsp-pyright-diagnostic-mode)
+   ("python.analysis.logLevel" lsp-pyright-log-level)
+   ("python.analysis.autoSearchPaths" lsp-pyright-auto-search-paths t)
+   ("python.analysis.extraPaths" lsp-pyright-extra-paths)
+   ("python.pythonPath" lsp-pyright-locate-python)
+   ;; We need to send empty string, otherwise  pyright-langserver fails with parse error
+   ("python.venvPath" (lambda () (or lsp-pyright-venv-path "")))))
+
+(lsp-dependency 'pyright
+                `(:system ,(concat lsp-pyright-langserver-command "-langserver"))
+                `(:npm :package ,lsp-pyright-langserver-command
+                  :path ,(concat lsp-pyright-langserver-command "-langserver")))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection (lsp-stdio-connection (lambda ()
+                                          (cons (lsp-package-path 'pyright)
+                                                lsp-pyright-langserver-command-args)))
+  :major-modes '(python-mode python-ts-mode)
+  :server-id 'pyright
+  :multi-root lsp-pyright-multi-root
+  :priority 2
+  :initialized-fn (lambda (workspace)
+                    (with-lsp-workspace workspace
+                      ;; we send empty settings initially, LSP server will ask for the
+                      ;; configuration of each workspace folder later separately
+                      (lsp--set-configuration
+                       (make-hash-table :test 'equal))))
+  :download-server-fn (lambda (_client callback error-callback _update?)
+                        (lsp-package-ensure 'pyright callback error-callback))
+  :notification-handlers (lsp-ht ((concat lsp-pyright-langserver-command "/beginProgress") 'lsp-pyright--begin-progress-callback)
+                                 ((concat lsp-pyright-langserver-command "/reportProgress") 'lsp-pyright--report-progress-callback)
+                                 ((concat lsp-pyright-langserver-command "/endProgress") 'lsp-pyright--end-progress-callback))))
+
+(lsp-register-client
+ (make-lsp-client
+  :new-connection
+  (lsp-tramp-connection (lambda ()
+                          (cons (concat lsp-pyright-langserver-command "-langserver") lsp-pyright-langserver-command-args)))
+  :major-modes '(python-mode python-ts-mode)
+  :server-id 'pyright-remote
+  :multi-root lsp-pyright-multi-root
+  :remote? t
+  :priority 1
+  :initialized-fn (lambda (workspace)
+                    (with-lsp-workspace workspace
+                      ;; we send empty settings initially, LSP server will ask for the
+                      ;; configuration of each workspace folder later separately
+                      (lsp--set-configuration
+                       (make-hash-table :test 'equal))))
+  :notification-handlers (lsp-ht ((concat lsp-pyright-langserver-command "/beginProgress") 'lsp-pyright--begin-progress-callback)
+                                 ((concat lsp-pyright-langserver-command "/reportProgress") 'lsp-pyright--report-progress-callback)
+                                 ((concat lsp-pyright-langserver-command "/endProgress") 'lsp-pyright--end-progress-callback))))
+
+(provide 'lsp-pyright)
+;;; lsp-pyright.el ends here
diff --git a/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright.elc b/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright.elc
new file mode 100644
index 0000000..741a897
Binary files /dev/null and b/emacs/.emacs.d/elpa/lsp-pyright-20260507.1742/lsp-pyright.elc differ
diff --git a/emacs/.emacs.d/elpa/lv-20200507.1518/lv-autoloads.el b/emacs/.emacs.d/elpa/lv-20200507.1518/lv-autoloads.el
new file mode 100644
index 0000000..e6e83ef
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lv-20200507.1518/lv-autoloads.el
@@ -0,0 +1,28 @@
+;;; lv-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from lv.el
+
+(register-definition-prefixes "lv" '("lv-"))
+
+;;; End of scraped data
+
+(provide 'lv-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; lv-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/lv-20200507.1518/lv-pkg.el b/emacs/.emacs.d/elpa/lv-20200507.1518/lv-pkg.el
new file mode 100644
index 0000000..ab54bdf
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lv-20200507.1518/lv-pkg.el
@@ -0,0 +1,7 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "lv" "20200507.1518"
+  "Other echo area."
+  ()
+  :url "https://github.com/abo-abo/hydra"
+  :commit "87873d788891029d9e44fa5458321d6a05849b94"
+  :revdesc "87873d788891")
diff --git a/emacs/.emacs.d/elpa/lv-20200507.1518/lv.el b/emacs/.emacs.d/elpa/lv-20200507.1518/lv.el
new file mode 100644
index 0000000..f8bc702
--- /dev/null
+++ b/emacs/.emacs.d/elpa/lv-20200507.1518/lv.el
@@ -0,0 +1,151 @@
+;;; lv.el --- Other echo area
+
+;; Copyright (C) 2015  Free Software Foundation, Inc.
+
+;; Author: Oleh Krehel
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
+
+;; Package-Version: 20200507.1518
+;; Package-Revision: 87873d788891
+
+;;; Commentary:
+;;
+;; This package provides `lv-message' intended to be used in place of
+;; `message' when semi-permanent hints are needed, in order to not
+;; interfere with Echo Area.
+;;
+;;    "Я тихо-тихо пiдглядаю,
+;;     І тiшуся собi, як бачу то,
+;;     Шо страшить i не пiдпускає,
+;;     А iншi п’ють тебе, як воду пiсок."
+;;     --  Андрій Кузьменко, L.V.
+
+;;; Code:
+
+(require 'cl-lib)
+
+(defgroup lv nil
+  "The other echo area."
+  :group 'minibuffer
+  :group 'hydra)
+
+(defcustom lv-use-separator nil
+  "Whether to draw a line between the LV window and the Echo Area."
+  :group 'lv
+  :type 'boolean)
+
+(defcustom lv-use-padding nil
+  "Whether to use horizontal padding in the LV window."
+  :group 'lv
+  :type 'boolean)
+
+(defface lv-separator
+  '((((class color) (background light)) :background "grey80")
+    (((class color) (background  dark)) :background "grey30"))
+  "Face used to draw line between the lv window and the echo area.
+This is only used if option `lv-use-separator' is non-nil.
+Only the background color is significant."
+  :group 'lv)
+
+(defvar lv-wnd nil
+  "Holds the current LV window.")
+
+(defvar display-line-numbers)
+(defvar display-fill-column-indicator)
+(defvar tab-line-format)
+
+(defvar lv-window-hook nil
+  "Hook to run by `lv-window' when a new window is created.")
+
+(defun lv-window ()
+  "Ensure that LV window is live and return it."
+  (if (window-live-p lv-wnd)
+      lv-wnd
+    (let ((ori (selected-window))
+          buf)
+      (prog1 (setq lv-wnd
+                   (select-window
+                    (let ((ignore-window-parameters t))
+                      (split-window
+                       (frame-root-window) -1 'below))
+                    'norecord))
+        (if (setq buf (get-buffer " *LV*"))
+            (switch-to-buffer buf 'norecord)
+          (switch-to-buffer " *LV*" 'norecord)
+          (fundamental-mode)
+          (set-window-hscroll lv-wnd 0)
+          (setq window-size-fixed t)
+          (setq mode-line-format nil)
+          (setq header-line-format nil)
+          (setq tab-line-format nil)
+          (setq cursor-type nil)
+          (setq display-line-numbers nil)
+          (setq display-fill-column-indicator nil)
+          (set-window-dedicated-p lv-wnd t)
+          (set-window-parameter lv-wnd 'no-other-window t)
+          (run-hooks 'lv-window-hook))
+        (select-window ori 'norecord)))))
+
+(defvar golden-ratio-mode)
+
+(defvar lv-force-update nil
+  "When non-nil, `lv-message' will refresh even for the same string.")
+
+(defun lv--pad-to-center (str width)
+  "Pad STR with spaces on the left to be centered to WIDTH."
+  (let* ((strs (split-string str "\n"))
+         (padding (make-string
+                   (/ (- width (length (car strs))) 2)
+                   ?\ )))
+    (mapconcat (lambda (s) (concat padding s)) strs "\n")))
+
+(defun lv-message (format-string &rest args)
+  "Set LV window contents to (`format' FORMAT-STRING ARGS)."
+  (let* ((str (apply #'format format-string args))
+         (n-lines (cl-count ?\n str))
+         deactivate-mark
+         golden-ratio-mode)
+    (with-selected-window (lv-window)
+      (when lv-use-padding
+        (setq str (lv--pad-to-center str (window-width))))
+      (unless (and (string= (buffer-string) str)
+                   (null lv-force-update))
+        (delete-region (point-min) (point-max))
+        (insert str)
+        (when (and (window-system) lv-use-separator)
+          (unless (looking-back "\n" nil)
+            (insert "\n"))
+          (insert
+           (propertize "__" 'face 'lv-separator 'display '(space :height (1)))
+           (propertize "\n" 'face 'lv-separator 'line-height t)))
+        (set (make-local-variable 'window-min-height) n-lines)
+        (setq truncate-lines (> n-lines 1))
+        (let ((window-resize-pixelwise t)
+              (window-size-fixed nil))
+          (fit-window-to-buffer nil nil 1)))
+      (goto-char (point-min)))))
+
+(defun lv-delete-window ()
+  "Delete LV window and kill its buffer."
+  (when (window-live-p lv-wnd)
+    (let ((buf (window-buffer lv-wnd)))
+      (delete-window lv-wnd)
+      (kill-buffer buf))))
+
+(provide 'lv)
+
+;;; lv.el ends here
diff --git a/emacs/.emacs.d/elpa/lv-20200507.1518/lv.elc b/emacs/.emacs.d/elpa/lv-20200507.1518/lv.elc
new file mode 100644
index 0000000..4caec6c
Binary files /dev/null and b/emacs/.emacs.d/elpa/lv-20200507.1518/lv.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/.dir-locals.el b/emacs/.emacs.d/elpa/magit-20260822.1158/.dir-locals.el
new file mode 100644
index 0000000..51b9194
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/.dir-locals.el
@@ -0,0 +1,22 @@
+((nil
+  (indent-tabs-mode . nil))
+ (emacs-lisp-mode
+  (checkdoc-allow-quoting-nil-and-t . t)
+  (lisp-indent-local-overrides
+   (cond . 0)
+   (cond-let--thread$ . defun)
+   (interactive . 0)
+   (make-obsolete-variable . 1)
+   (thread-first . defun)
+   (thread-last . defun)))
+ (makefile-mode
+  (indent-tabs-mode . t)
+  (mode . outline-minor)
+  (outline-regexp . "#\\(#+\\)"))
+ (git-commit-mode
+  (git-commit-major-mode . git-commit-elisp-text-mode))
+ (".github/PULL_REQUEST_TEMPLATE"
+  (nil (truncate-lines . nil)))
+ ("CHANGELOG"
+  (nil (fill-column . 70)
+       (mode . display-fill-column-indicator))))
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/AUTHORS.md b/emacs/.emacs.d/elpa/magit-20260822.1158/AUTHORS.md
new file mode 100644
index 0000000..d36edfd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/AUTHORS.md
@@ -0,0 +1,434 @@
+The following people have contributed to Magit.
+For statistics see https://stats.magit.vc/magit/authors.html.
+
+Authors
+-------
+
+- Marius Vollmer
+- Jonas Bernoulli
+
+Active Maintainers
+------------------
+
+- Jonas Bernoulli
+- Kyle Meyer
+
+Former Maintainers
+------------------
+
+- Nicolas Dudebout
+- Noam Postavsky
+- Peter J. Weisberg
+- Phil Jackson
+- Rémi Vanicat
+- Yann Hodique
+
+All Contributors
+----------------
+
+- Aaron Culich
+- Aaron L. Zeng
+- Aaron Madlon-Kay
+- Abdo Roig-Maranges
+- Adam Benanti
+- Adam Jones
+- Adam Kruszewski
+- Adam Porter
+- Adam Spiers
+- Adeodato Simó
+- Ævar Arnfjörð Bjarmason
+- Alan Falloon
+- Alban Gruin
+- Aleksey Uimanov
+- Alexander Gramiak
+- Alexander Miller
+- Alex Branham
+- Alex Dunn
+- Alexey Voinov
+- Alex Kost
+- Alex Kreisher
+- Alex Ott
+- Allen Li
+- Andrea Alberti
+- Andreas Fuchs
+- Andreas Liljeqvist
+- Andreas Rottmann
+- Andrei Chițu
+- Andrew Eggenberger
+- Andrew Kirkpatrick
+- Andrew Psaltis
+- Andrew Schwartzmeyer
+- Andrew Zipperer
+- Andrey Smirnov
+- Andriy Kmit'
+- Andy Sawyer
+- Angel de Vicente
+- Aria Edmonds
+- Arialdo Martini
+- Arnau Roig Ninerola
+- Ashlynn Anderson
+- Barak A. Pearlmutter
+- Bar Magal
+- Bart Bakker
+- Basil L. Contovounesios
+- Bastian Beischer
+- Bastian Beranek
+- Benjamin Motz
+- Ben North
+- Ben Walton
+- Ben Zanin
+- Bob Uhl
+- Boruch Baum
+- Bradley Wright
+- Brandon W Maister
+- Brennan Vincent
+- Brian Leung
+- Brian Warner
+- Bryan Shell
+- Buster Copley
+- Cameron Chaparro
+- Carl Lei
+- Carl Lieberman
+- Chillar Anand
+- Chris Bernard
+- Chris Done
+- Chris LaRose
+- Chris Moore
+- Chris Ring
+- Chris Shoemaker
+- Christian Dietrich
+- Christian Kluge
+- Christian Tietze
+- Christophe Junke
+- Christopher Carlile
+- Christopher Monsanto
+- Clément Pit-Claudel
+- Cornelius Mika
+- Craig Andera
+- Curt Brune
+- Daanturo
+- Dale Hagglund
+- Damien Cassou
+- Dan Davison
+- Dan Erikson
+- Daniel Brockman
+- Daniel Farina
+- Daniel Fleischer
+- Daniel Gröber
+- Daniel Hackney
+- Daniel Kraus
+- Daniel Mai
+- Daniel Martín
+- Daniel Mendler
+- Daniel Nagy
+- Dan Kessler
+- Dan LaManna
+- Danny Zhu
+- Dato Simó
+- David Abrahams
+- David Ellison
+- David Hull
+- David L. Rager
+- David Wallin
+- Dean Kariniemi
+- Dennis Paskorz
+- Divye Kapoor
+- Dominique Quatravaux
+- Duianto Vebotci
+- Eli Barzilay
+- Ellis Kenyo
+- Eric
+- Eric Davis
+- Eric Prud'hommeaux
+- Eric Schulte
+- Erik Anderson
+- Eugene Mikhaylov
+- Evan Torrie
+- Evgkeni Sampelnikof
+- Eyal Lotem
+- Eyal Soha
+- Fabian Wiget
+- Felix Geller
+- Felix Yan
+- Feng Li
+- Florian Ragwitz
+- Franklin Delehelle
+- Frédéric Giquel
+- Fritz Grabo
+- Fritz Stelzer
+- gemmaro
+- Geoff Shannon
+- George Kadianakis
+- Géza Herman
+- Graham Clark
+- Graham Dobbins
+- Greg A. Woods
+- Greg Lucas
+- Gregory Heytings
+- Greg Sexton
+- Greg Steuck
+- Guillaume Martres
+- Hannu Koivisto
+- Hans-Peter Deifel
+- hokomo
+- Huon Wilson
+- Hussein Ait-Lahcen
+- Ian Eure
+- Ian Milligan
+- Ilya Grigoriev
+- Iñaki Arenaza
+- Ingmar Sittl
+- Ingo Lohmar
+- Ioan-Adrian Ratiu
+- Ivan Brennan
+- Jacob Ilsø
+- Jan Tatarik
+- Jasper St. Pierre
+- JD Smith
+- Jean-Louis Giordano
+- Jeff Bellegarde
+- Jeff Dairiki
+- Jeremy Meng
+- Jeremy Sowden
+- Jesse Alama
+- Jim Blandy
+- Joakim Jalap
+- Johannes Altmanninger
+- Johannes Maier
+- Johann Klähn
+- John Eismeier
+- John Mastro
+- John Morris
+- John Wiegley
+- Jonas Bernoulli
+- Jonas Galvão Xavier
+- Jonathan Arnett
+- Jonathan del Strother
+- Jonathan Leech-Pepin
+- Jonathan Roes
+- Jonathon McKitrick
+- Jon Vanderwijk
+- Jordan Galby
+- Jordan Greenberg
+- Jorge Israel Peña
+- Josh Elsasser
+- Josiah Schwab
+- Julien Danjou
+- Justin Burkett
+- Justin Caratzas
+- Justin Guenther
+- Justin Thomas
+- Kan-Ru Chen
+- Kenny Ballou
+- Keshav Kini
+- Kevin Brubeck Unhammer
+- Kevin J. Foley
+- Kévin Le Gouguec
+- Kimberly Wolk
+- Knut Olav Bøhmer
+- Kyle Meyer
+- Laurent Laffont
+- Laverne Schrock
+- Leandro Facchinetti
+- Lele Gaifax
+- Lénaïc Huard
+- Leo Liu
+- Leonard Lausen
+- Leonardo Etcheverry
+- Leo Vivier
+- Li Chen
+- Lingchao Xin
+- Lin Sun
+- Li-Yun Chang
+- Lluís Vilanova
+- Loic Dachary
+- Louis Roché
+- Lucius Chen
+- Luís Oliveira
+- Luke Amdor
+- Magnar Sveen
+- Magnus Malm
+- Mak Kolybabi
+- Manuel Vázquez Acosta
+- Marcel Wolf
+- Marc Herbert
+- Marcin Bachry
+- Marco Craveiro
+- Marco Wahl
+- Marc Sherry
+- Marian Schubert
+- Mario Rodas
+- Marius Vollmer
+- Mark Hepburn
+- Mark Karpov
+- Mark Oteiza
+- Markus Beppler
+- Martin Joerg
+- Martin Polden
+- Matt Beshara
+- Matthew Fluet
+- Matthew Kraai
+- Matthieu Hauglustaine
+- Matus Goljer
+- Maxim Cournoyer
+- Michael Fogleman
+- Michael Griffiths
+- Michael Heerdegen
+- Michal Sojka
+- Miciah Masters
+- Miles Bader
+- Miloš Mošić
+- Mitchel Humpherys
+- Moritz Bunkus
+- Nacho Barrientos
+- Naoya Yamashita
+- Natalie Weizenbaum
+- Nguyễn Tuấn Anh
+- Nic Ferier
+- Nicholas Vollmer
+- Nick Alcock
+- Nick Alexander
+- Nick Dimiduk
+- Nicklas Lindgren
+- Nicolas Dudebout
+- Nicolas Petton
+- Nicolas Richard
+- Nikita Leshenko
+- Nikolay Martynov
+- Noam Postavsky
+- N. Troy de Freitas
+- Ola Nilsson
+- Ole Arndt
+- Oleh Krehel
+- Orivej Desh
+- Óscar Fuentes
+- Pancho Horrillo
+- Park Zhou
+- Paul Pogonyshev
+- Paul Stadig
+- Pavel Holejsovsky
+- Pedro Ribeiro Mendes Júnior
+- Pekka Pessi
+- Pengji Zhang
+- Peter Eisentraut
+- Peter Jaros
+- Peter J. Weisberg
+- Peter Vasil
+- Philippe Cavalaria
+- Philippe Vaucher
+- Philipp Fehre
+- Philipp Haselwarter
+- Philipp Stephani
+- Philip Weaver
+- Phil Jackson
+- Phil Sainty
+- Pierre Neidhardt
+- Pieter Praet
+- Pieter van Oostrum
+- Prathamesh Sonpatki
+- Pratyush Yadav
+- Pritam Baral
+- rabio
+- Radon Rosborough
+- Rafael Laboissiere
+- Rahul Rameshbabu
+- Raimon Grau
+- Ramkumar Ramachandra
+- Remco van 't Veer
+- Rémi Vanicat
+- René Stadler
+- Richard Kim
+- Richard Sent
+- Robert Boone
+- Robert Irelan
+- Robin Green
+- Roey Darwish Dror
+- Roger Crew
+- Roland Marchand
+- Romain Francoise
+- Ron Parker
+- Roy Crihfield
+- Rüdiger Sonderfeld
+- Russell Black
+- Ryan C. Thompson
+- Sam Cedarbaum
+- Samuel Bronson
+- Samuel W. Flint
+- Sanjoy Das
+- Sean Allred
+- Sean Bryant
+- Sean Farley
+- Sean Whitton
+- Sebastian Wiesner
+- Sébastien Gross
+- Seong-Kook Shin
+- Sergey Pashinin
+- Sergey Vinokurov
+- Servilio Afre Puentes
+- shoefone
+- Shuguang Sun
+- Siavash Askari Nasr
+- Silent Sphere
+- Simon Pintarelli
+- Stefan Kangas
+- Štěpán Němec
+- Steven Chow
+- Steven E. Harris
+- Steven Thomas
+- Steven Vancoillie
+- Steve Purcell
+- StrawberryTea
+- Suhail Shergill
+- Sylvain Rousseau
+- Syohei Yoshida
+- Szunti
+- Takafumi Arakaki
+- Tassilo Horn
+- TEC
+- Teemu Likonen
+- Teruki Shigitani
+- Thierry Volpiatto
+- Thomas A Caswell
+- Thomas Ferrand
+- Thomas Fini Hansen
+- Thomas Frössman
+- Thomas Jost
+- Thomas Riccardi
+- Tibor Simko
+- Timo Juhani Lindfors
+- Tim Perkins
+- Tim Wraight
+- Ting-Yu Lin
+- Tom Feist
+- Toon Claes
+- Topi Miettinen
+- Troy Hinckley
+- Tsuyoshi Kitamoto
+- Tunc Uzlu
+- Ulrich Müller
+- Vineet Naik
+- Vitaly Ostashov
+- Vladimir Ivanov
+- Vladimir Panteleev
+- Vladimir Sedach
+- Waqar Hameed
+- Wei Huang
+- Wilfred Hughes
+- Win Treese
+- Wojciech Siewierski
+- Wouter Bolsterlee
+- X4lldux
+- Xavier Noria
+- Xavier Young
+- Xu Chunyang
+- Yann Herklotz
+- Yann Hodique
+- Ynilu
+- York Zhao
+- Yuichi Higashi
+- Yuri Khan
+- Zach Latta
+- zakora
+- Zhu Zihao
+- ziggy
+- zilongshanren
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/LICENSE b/emacs/.emacs.d/elpa/magit-20260822.1158/LICENSE
new file mode 100644
index 0000000..f288702
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/LICENSE
@@ -0,0 +1,674 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 3, 29 June 2007
+
+ Copyright (C) 2007 Free Software Foundation, Inc. <https://fsf.org/>
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The GNU General Public License is a free, copyleft license for
+software and other kinds of works.
+
+  The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+the GNU General Public License is intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.  We, the Free Software Foundation, use the
+GNU General Public License for most of our software; it applies also to
+any other work released this way by its authors.  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+  To protect your rights, we need to prevent others from denying you
+these rights or asking you to surrender the rights.  Therefore, you have
+certain responsibilities if you distribute copies of the software, or if
+you modify it: responsibilities to respect the freedom of others.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must pass on to the recipients the same
+freedoms that you received.  You must make sure that they, too, receive
+or can get the source code.  And you must show them these terms so they
+know their rights.
+
+  Developers that use the GNU GPL protect your rights with two steps:
+(1) assert copyright on the software, and (2) offer you this License
+giving you legal permission to copy, distribute and/or modify it.
+
+  For the developers' and authors' protection, the GPL clearly explains
+that there is no warranty for this free software.  For both users' and
+authors' sake, the GPL requires that modified versions be marked as
+changed, so that their problems will not be attributed erroneously to
+authors of previous versions.
+
+  Some devices are designed to deny users access to install or run
+modified versions of the software inside them, although the manufacturer
+can do so.  This is fundamentally incompatible with the aim of
+protecting users' freedom to change the software.  The systematic
+pattern of such abuse occurs in the area of products for individuals to
+use, which is precisely where it is most unacceptable.  Therefore, we
+have designed this version of the GPL to prohibit the practice for those
+products.  If such problems arise substantially in other domains, we
+stand ready to extend this provision to those domains in future versions
+of the GPL, as needed to protect the freedom of users.
+
+  Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish to
+avoid the special danger that patents applied to a free program could
+make it effectively proprietary.  To prevent this, the GPL assures that
+patents cannot be used to render the program non-free.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+                       TERMS AND CONDITIONS
+
+  0. Definitions.
+
+  "This License" refers to version 3 of the GNU General Public License.
+
+  "Copyright" also means copyright-like laws that apply to other kinds of
+works, such as semiconductor masks.
+
+  "The Program" refers to any copyrightable work licensed under this
+License.  Each licensee is addressed as "you".  "Licensees" and
+"recipients" may be individuals or organizations.
+
+  To "modify" a work means to copy from or adapt all or part of the work
+in a fashion requiring copyright permission, other than the making of an
+exact copy.  The resulting work is called a "modified version" of the
+earlier work or a work "based on" the earlier work.
+
+  A "covered work" means either the unmodified Program or a work based
+on the Program.
+
+  To "propagate" a work means to do anything with it that, without
+permission, would make you directly or secondarily liable for
+infringement under applicable copyright law, except executing it on a
+computer or modifying a private copy.  Propagation includes copying,
+distribution (with or without modification), making available to the
+public, and in some countries other activities as well.
+
+  To "convey" a work means any kind of propagation that enables other
+parties to make or receive copies.  Mere interaction with a user through
+a computer network, with no transfer of a copy, is not conveying.
+
+  An interactive user interface displays "Appropriate Legal Notices"
+to the extent that it includes a convenient and prominently visible
+feature that (1) displays an appropriate copyright notice, and (2)
+tells the user that there is no warranty for the work (except to the
+extent that warranties are provided), that licensees may convey the
+work under this License, and how to view a copy of this License.  If
+the interface presents a list of user commands or options, such as a
+menu, a prominent item in the list meets this criterion.
+
+  1. Source Code.
+
+  The "source code" for a work means the preferred form of the work
+for making modifications to it.  "Object code" means any non-source
+form of a work.
+
+  A "Standard Interface" means an interface that either is an official
+standard defined by a recognized standards body, or, in the case of
+interfaces specified for a particular programming language, one that
+is widely used among developers working in that language.
+
+  The "System Libraries" of an executable work include anything, other
+than the work as a whole, that (a) is included in the normal form of
+packaging a Major Component, but which is not part of that Major
+Component, and (b) serves only to enable use of the work with that
+Major Component, or to implement a Standard Interface for which an
+implementation is available to the public in source code form.  A
+"Major Component", in this context, means a major essential component
+(kernel, window system, and so on) of the specific operating system
+(if any) on which the executable work runs, or a compiler used to
+produce the work, or an object code interpreter used to run it.
+
+  The "Corresponding Source" for a work in object code form means all
+the source code needed to generate, install, and (for an executable
+work) run the object code and to modify the work, including scripts to
+control those activities.  However, it does not include the work's
+System Libraries, or general-purpose tools or generally available free
+programs which are used unmodified in performing those activities but
+which are not part of the work.  For example, Corresponding Source
+includes interface definition files associated with source files for
+the work, and the source code for shared libraries and dynamically
+linked subprograms that the work is specifically designed to require,
+such as by intimate data communication or control flow between those
+subprograms and other parts of the work.
+
+  The Corresponding Source need not include anything that users
+can regenerate automatically from other parts of the Corresponding
+Source.
+
+  The Corresponding Source for a work in source code form is that
+same work.
+
+  2. Basic Permissions.
+
+  All rights granted under this License are granted for the term of
+copyright on the Program, and are irrevocable provided the stated
+conditions are met.  This License explicitly affirms your unlimited
+permission to run the unmodified Program.  The output from running a
+covered work is covered by this License only if the output, given its
+content, constitutes a covered work.  This License acknowledges your
+rights of fair use or other equivalent, as provided by copyright law.
+
+  You may make, run and propagate covered works that you do not
+convey, without conditions so long as your license otherwise remains
+in force.  You may convey covered works to others for the sole purpose
+of having them make modifications exclusively for you, or provide you
+with facilities for running those works, provided that you comply with
+the terms of this License in conveying all material for which you do
+not control copyright.  Those thus making or running the covered works
+for you must do so exclusively on your behalf, under your direction
+and control, on terms that prohibit them from making any copies of
+your copyrighted material outside their relationship with you.
+
+  Conveying under any other circumstances is permitted solely under
+the conditions stated below.  Sublicensing is not allowed; section 10
+makes it unnecessary.
+
+  3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+  No covered work shall be deemed part of an effective technological
+measure under any applicable law fulfilling obligations under article
+11 of the WIPO copyright treaty adopted on 20 December 1996, or
+similar laws prohibiting or restricting circumvention of such
+measures.
+
+  When you convey a covered work, you waive any legal power to forbid
+circumvention of technological measures to the extent such circumvention
+is effected by exercising rights under this License with respect to
+the covered work, and you disclaim any intention to limit operation or
+modification of the work as a means of enforcing, against the work's
+users, your or third parties' legal rights to forbid circumvention of
+technological measures.
+
+  4. Conveying Verbatim Copies.
+
+  You may convey verbatim copies of the Program's source code as you
+receive it, in any medium, provided that you conspicuously and
+appropriately publish on each copy an appropriate copyright notice;
+keep intact all notices stating that this License and any
+non-permissive terms added in accord with section 7 apply to the code;
+keep intact all notices of the absence of any warranty; and give all
+recipients a copy of this License along with the Program.
+
+  You may charge any price or no price for each copy that you convey,
+and you may offer support or warranty protection for a fee.
+
+  5. Conveying Modified Source Versions.
+
+  You may convey a work based on the Program, or the modifications to
+produce it from the Program, in the form of source code under the
+terms of section 4, provided that you also meet all of these conditions:
+
+    a) The work must carry prominent notices stating that you modified
+    it, and giving a relevant date.
+
+    b) The work must carry prominent notices stating that it is
+    released under this License and any conditions added under section
+    7.  This requirement modifies the requirement in section 4 to
+    "keep intact all notices".
+
+    c) You must license the entire work, as a whole, under this
+    License to anyone who comes into possession of a copy.  This
+    License will therefore apply, along with any applicable section 7
+    additional terms, to the whole of the work, and all its parts,
+    regardless of how they are packaged.  This License gives no
+    permission to license the work in any other way, but it does not
+    invalidate such permission if you have separately received it.
+
+    d) If the work has interactive user interfaces, each must display
+    Appropriate Legal Notices; however, if the Program has interactive
+    interfaces that do not display Appropriate Legal Notices, your
+    work need not make them do so.
+
+  A compilation of a covered work with other separate and independent
+works, which are not by their nature extensions of the covered work,
+and which are not combined with it such as to form a larger program,
+in or on a volume of a storage or distribution medium, is called an
+"aggregate" if the compilation and its resulting copyright are not
+used to limit the access or legal rights of the compilation's users
+beyond what the individual works permit.  Inclusion of a covered work
+in an aggregate does not cause this License to apply to the other
+parts of the aggregate.
+
+  6. Conveying Non-Source Forms.
+
+  You may convey a covered work in object code form under the terms
+of sections 4 and 5, provided that you also convey the
+machine-readable Corresponding Source under the terms of this License,
+in one of these ways:
+
+    a) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by the
+    Corresponding Source fixed on a durable physical medium
+    customarily used for software interchange.
+
+    b) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by a
+    written offer, valid for at least three years and valid for as
+    long as you offer spare parts or customer support for that product
+    model, to give anyone who possesses the object code either (1) a
+    copy of the Corresponding Source for all the software in the
+    product that is covered by this License, on a durable physical
+    medium customarily used for software interchange, for a price no
+    more than your reasonable cost of physically performing this
+    conveying of source, or (2) access to copy the
+    Corresponding Source from a network server at no charge.
+
+    c) Convey individual copies of the object code with a copy of the
+    written offer to provide the Corresponding Source.  This
+    alternative is allowed only occasionally and noncommercially, and
+    only if you received the object code with such an offer, in accord
+    with subsection 6b.
+
+    d) Convey the object code by offering access from a designated
+    place (gratis or for a charge), and offer equivalent access to the
+    Corresponding Source in the same way through the same place at no
+    further charge.  You need not require recipients to copy the
+    Corresponding Source along with the object code.  If the place to
+    copy the object code is a network server, the Corresponding Source
+    may be on a different server (operated by you or a third party)
+    that supports equivalent copying facilities, provided you maintain
+    clear directions next to the object code saying where to find the
+    Corresponding Source.  Regardless of what server hosts the
+    Corresponding Source, you remain obligated to ensure that it is
+    available for as long as needed to satisfy these requirements.
+
+    e) Convey the object code using peer-to-peer transmission, provided
+    you inform other peers where the object code and Corresponding
+    Source of the work are being offered to the general public at no
+    charge under subsection 6d.
+
+  A separable portion of the object code, whose source code is excluded
+from the Corresponding Source as a System Library, need not be
+included in conveying the object code work.
+
+  A "User Product" is either (1) a "consumer product", which means any
+tangible personal property which is normally used for personal, family,
+or household purposes, or (2) anything designed or sold for incorporation
+into a dwelling.  In determining whether a product is a consumer product,
+doubtful cases shall be resolved in favor of coverage.  For a particular
+product received by a particular user, "normally used" refers to a
+typical or common use of that class of product, regardless of the status
+of the particular user or of the way in which the particular user
+actually uses, or expects or is expected to use, the product.  A product
+is a consumer product regardless of whether the product has substantial
+commercial, industrial or non-consumer uses, unless such uses represent
+the only significant mode of use of the product.
+
+  "Installation Information" for a User Product means any methods,
+procedures, authorization keys, or other information required to install
+and execute modified versions of a covered work in that User Product from
+a modified version of its Corresponding Source.  The information must
+suffice to ensure that the continued functioning of the modified object
+code is in no case prevented or interfered with solely because
+modification has been made.
+
+  If you convey an object code work under this section in, or with, or
+specifically for use in, a User Product, and the conveying occurs as
+part of a transaction in which the right of possession and use of the
+User Product is transferred to the recipient in perpetuity or for a
+fixed term (regardless of how the transaction is characterized), the
+Corresponding Source conveyed under this section must be accompanied
+by the Installation Information.  But this requirement does not apply
+if neither you nor any third party retains the ability to install
+modified object code on the User Product (for example, the work has
+been installed in ROM).
+
+  The requirement to provide Installation Information does not include a
+requirement to continue to provide support service, warranty, or updates
+for a work that has been modified or installed by the recipient, or for
+the User Product in which it has been modified or installed.  Access to a
+network may be denied when the modification itself materially and
+adversely affects the operation of the network or violates the rules and
+protocols for communication across the network.
+
+  Corresponding Source conveyed, and Installation Information provided,
+in accord with this section must be in a format that is publicly
+documented (and with an implementation available to the public in
+source code form), and must require no special password or key for
+unpacking, reading or copying.
+
+  7. Additional Terms.
+
+  "Additional permissions" are terms that supplement the terms of this
+License by making exceptions from one or more of its conditions.
+Additional permissions that are applicable to the entire Program shall
+be treated as though they were included in this License, to the extent
+that they are valid under applicable law.  If additional permissions
+apply only to part of the Program, that part may be used separately
+under those permissions, but the entire Program remains governed by
+this License without regard to the additional permissions.
+
+  When you convey a copy of a covered work, you may at your option
+remove any additional permissions from that copy, or from any part of
+it.  (Additional permissions may be written to require their own
+removal in certain cases when you modify the work.)  You may place
+additional permissions on material, added by you to a covered work,
+for which you have or can give appropriate copyright permission.
+
+  Notwithstanding any other provision of this License, for material you
+add to a covered work, you may (if authorized by the copyright holders of
+that material) supplement the terms of this License with terms:
+
+    a) Disclaiming warranty or limiting liability differently from the
+    terms of sections 15 and 16 of this License; or
+
+    b) Requiring preservation of specified reasonable legal notices or
+    author attributions in that material or in the Appropriate Legal
+    Notices displayed by works containing it; or
+
+    c) Prohibiting misrepresentation of the origin of that material, or
+    requiring that modified versions of such material be marked in
+    reasonable ways as different from the original version; or
+
+    d) Limiting the use for publicity purposes of names of licensors or
+    authors of the material; or
+
+    e) Declining to grant rights under trademark law for use of some
+    trade names, trademarks, or service marks; or
+
+    f) Requiring indemnification of licensors and authors of that
+    material by anyone who conveys the material (or modified versions of
+    it) with contractual assumptions of liability to the recipient, for
+    any liability that these contractual assumptions directly impose on
+    those licensors and authors.
+
+  All other non-permissive additional terms are considered "further
+restrictions" within the meaning of section 10.  If the Program as you
+received it, or any part of it, contains a notice stating that it is
+governed by this License along with a term that is a further
+restriction, you may remove that term.  If a license document contains
+a further restriction but permits relicensing or conveying under this
+License, you may add to a covered work material governed by the terms
+of that license document, provided that the further restriction does
+not survive such relicensing or conveying.
+
+  If you add terms to a covered work in accord with this section, you
+must place, in the relevant source files, a statement of the
+additional terms that apply to those files, or a notice indicating
+where to find the applicable terms.
+
+  Additional terms, permissive or non-permissive, may be stated in the
+form of a separately written license, or stated as exceptions;
+the above requirements apply either way.
+
+  8. Termination.
+
+  You may not propagate or modify a covered work except as expressly
+provided under this License.  Any attempt otherwise to propagate or
+modify it is void, and will automatically terminate your rights under
+this License (including any patent licenses granted under the third
+paragraph of section 11).
+
+  However, if you cease all violation of this License, then your
+license from a particular copyright holder is reinstated (a)
+provisionally, unless and until the copyright holder explicitly and
+finally terminates your license, and (b) permanently, if the copyright
+holder fails to notify you of the violation by some reasonable means
+prior to 60 days after the cessation.
+
+  Moreover, your license from a particular copyright holder is
+reinstated permanently if the copyright holder notifies you of the
+violation by some reasonable means, this is the first time you have
+received notice of violation of this License (for any work) from that
+copyright holder, and you cure the violation prior to 30 days after
+your receipt of the notice.
+
+  Termination of your rights under this section does not terminate the
+licenses of parties who have received copies or rights from you under
+this License.  If your rights have been terminated and not permanently
+reinstated, you do not qualify to receive new licenses for the same
+material under section 10.
+
+  9. Acceptance Not Required for Having Copies.
+
+  You are not required to accept this License in order to receive or
+run a copy of the Program.  Ancillary propagation of a covered work
+occurring solely as a consequence of using peer-to-peer transmission
+to receive a copy likewise does not require acceptance.  However,
+nothing other than this License grants you permission to propagate or
+modify any covered work.  These actions infringe copyright if you do
+not accept this License.  Therefore, by modifying or propagating a
+covered work, you indicate your acceptance of this License to do so.
+
+  10. Automatic Licensing of Downstream Recipients.
+
+  Each time you convey a covered work, the recipient automatically
+receives a license from the original licensors, to run, modify and
+propagate that work, subject to this License.  You are not responsible
+for enforcing compliance by third parties with this License.
+
+  An "entity transaction" is a transaction transferring control of an
+organization, or substantially all assets of one, or subdividing an
+organization, or merging organizations.  If propagation of a covered
+work results from an entity transaction, each party to that
+transaction who receives a copy of the work also receives whatever
+licenses to the work the party's predecessor in interest had or could
+give under the previous paragraph, plus a right to possession of the
+Corresponding Source of the work from the predecessor in interest, if
+the predecessor has it or can get it with reasonable efforts.
+
+  You may not impose any further restrictions on the exercise of the
+rights granted or affirmed under this License.  For example, you may
+not impose a license fee, royalty, or other charge for exercise of
+rights granted under this License, and you may not initiate litigation
+(including a cross-claim or counterclaim in a lawsuit) alleging that
+any patent claim is infringed by making, using, selling, offering for
+sale, or importing the Program or any portion of it.
+
+  11. Patents.
+
+  A "contributor" is a copyright holder who authorizes use under this
+License of the Program or a work on which the Program is based.  The
+work thus licensed is called the contributor's "contributor version".
+
+  A contributor's "essential patent claims" are all patent claims
+owned or controlled by the contributor, whether already acquired or
+hereafter acquired, that would be infringed by some manner, permitted
+by this License, of making, using, or selling its contributor version,
+but do not include claims that would be infringed only as a
+consequence of further modification of the contributor version.  For
+purposes of this definition, "control" includes the right to grant
+patent sublicenses in a manner consistent with the requirements of
+this License.
+
+  Each contributor grants you a non-exclusive, worldwide, royalty-free
+patent license under the contributor's essential patent claims, to
+make, use, sell, offer for sale, import and otherwise run, modify and
+propagate the contents of its contributor version.
+
+  In the following three paragraphs, a "patent license" is any express
+agreement or commitment, however denominated, not to enforce a patent
+(such as an express permission to practice a patent or covenant not to
+sue for patent infringement).  To "grant" such a patent license to a
+party means to make such an agreement or commitment not to enforce a
+patent against the party.
+
+  If you convey a covered work, knowingly relying on a patent license,
+and the Corresponding Source of the work is not available for anyone
+to copy, free of charge and under the terms of this License, through a
+publicly available network server or other readily accessible means,
+then you must either (1) cause the Corresponding Source to be so
+available, or (2) arrange to deprive yourself of the benefit of the
+patent license for this particular work, or (3) arrange, in a manner
+consistent with the requirements of this License, to extend the patent
+license to downstream recipients.  "Knowingly relying" means you have
+actual knowledge that, but for the patent license, your conveying the
+covered work in a country, or your recipient's use of the covered work
+in a country, would infringe one or more identifiable patents in that
+country that you have reason to believe are valid.
+
+  If, pursuant to or in connection with a single transaction or
+arrangement, you convey, or propagate by procuring conveyance of, a
+covered work, and grant a patent license to some of the parties
+receiving the covered work authorizing them to use, propagate, modify
+or convey a specific copy of the covered work, then the patent license
+you grant is automatically extended to all recipients of the covered
+work and works based on it.
+
+  A patent license is "discriminatory" if it does not include within
+the scope of its coverage, prohibits the exercise of, or is
+conditioned on the non-exercise of one or more of the rights that are
+specifically granted under this License.  You may not convey a covered
+work if you are a party to an arrangement with a third party that is
+in the business of distributing software, under which you make payment
+to the third party based on the extent of your activity of conveying
+the work, and under which the third party grants, to any of the
+parties who would receive the covered work from you, a discriminatory
+patent license (a) in connection with copies of the covered work
+conveyed by you (or copies made from those copies), or (b) primarily
+for and in connection with specific products or compilations that
+contain the covered work, unless you entered into that arrangement,
+or that patent license was granted, prior to 28 March 2007.
+
+  Nothing in this License shall be construed as excluding or limiting
+any implied license or other defenses to infringement that may
+otherwise be available to you under applicable patent law.
+
+  12. No Surrender of Others' Freedom.
+
+  If conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot convey a
+covered work so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you may
+not convey it at all.  For example, if you agree to terms that obligate you
+to collect a royalty for further conveying from those to whom you convey
+the Program, the only way you could satisfy both those terms and this
+License would be to refrain entirely from conveying the Program.
+
+  13. Use with the GNU Affero General Public License.
+
+  Notwithstanding any other provision of this License, you have
+permission to link or combine any covered work with a work licensed
+under version 3 of the GNU Affero General Public License into a single
+combined work, and to convey the resulting work.  The terms of this
+License will continue to apply to the part which is the covered work,
+but the special requirements of the GNU Affero General Public License,
+section 13, concerning interaction through a network will apply to the
+combination as such.
+
+  14. Revised Versions of this License.
+
+  The Free Software Foundation may publish revised and/or new versions of
+the GNU General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+  Each version is given a distinguishing version number.  If the
+Program specifies that a certain numbered version of the GNU General
+Public License "or any later version" applies to it, you have the
+option of following the terms and conditions either of that numbered
+version or of any later version published by the Free Software
+Foundation.  If the Program does not specify a version number of the
+GNU General Public License, you may choose any version ever published
+by the Free Software Foundation.
+
+  If the Program specifies that a proxy can decide which future
+versions of the GNU General Public License can be used, that proxy's
+public statement of acceptance of a version permanently authorizes you
+to choose that version for the Program.
+
+  Later license versions may give you additional or different
+permissions.  However, no additional obligations are imposed on any
+author or copyright holder as a result of your choosing to follow a
+later version.
+
+  15. Disclaimer of Warranty.
+
+  THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
+APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
+HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
+OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
+THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+PURPOSE.  THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
+IS WITH YOU.  SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
+ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+  16. Limitation of Liability.
+
+  IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
+THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
+GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
+USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
+DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
+PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
+EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGES.
+
+  17. Interpretation of Sections 15 and 16.
+
+  If the disclaimer of warranty and limitation of liability provided
+above cannot be given local legal effect according to their terms,
+reviewing courts shall apply local law that most closely approximates
+an absolute waiver of all civil liability in connection with the
+Program, unless a warranty or assumption of liability accompanies a
+copy of the Program in return for a fee.
+
+                     END OF TERMS AND CONDITIONS
+
+            How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+state the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software: you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation, either version 3 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+Also add information on how to contact you by electronic and paper mail.
+
+  If the program does terminal interaction, make it output a short
+notice like this when it starts in an interactive mode:
+
+    <program>  Copyright (C) <year>  <name of author>
+    This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, your program's commands
+might be different; for a GUI interface, you would use an "about box".
+
+  You should also get your employer (if you work as a programmer) or school,
+if any, to sign a "copyright disclaimer" for the program, if necessary.
+For more information on this, and how to apply and follow the GNU GPL, see
+<https://www.gnu.org/licenses/>.
+
+  The GNU General Public License does not permit incorporating your program
+into proprietary programs.  If your program is a subroutine library, you
+may consider it more useful to permit linking proprietary applications with
+the library.  If this is what you want to do, use the GNU Lesser General
+Public License instead of this License.  But first, please read
+<https://www.gnu.org/licenses/why-not-lgpl.html>.
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/dir b/emacs/.emacs.d/elpa/magit-20260822.1158/dir
new file mode 100644
index 0000000..dfdbd71
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/dir
@@ -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
+* Magit: (magit).               Using Git from Emacs with Magit.
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/git-commit.el b/emacs/.emacs.d/elpa/magit-20260822.1158/git-commit.el
new file mode 100644
index 0000000..fa3c2b7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/git-commit.el
@@ -0,0 +1,1389 @@
+;;; git-commit.el --- Edit Git commit messages  -*- lexical-binding:t; coding:utf-8 -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;;     Sebastian Wiesner <lunaryorn@gmail.com>
+;;     Florian Ragwitz <rafl@debian.org>
+;;     Marius Vollmer <marius.vollmer@gmail.com>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;; You should have received a copy of the AUTHORS.md file, which
+;; lists all contributors.  If not, see https://magit.vc/authors.
+
+;;; Commentary:
+
+;; This package assists the user in writing good Git commit messages.
+
+;; While Git allows for the message to be provided on the command
+;; line, it is preferable to tell Git to create the commit without
+;; actually passing it a message.  Git then invokes the `$GIT_EDITOR'
+;; (or if that is undefined `$EDITOR') asking the user to provide the
+;; message by editing the file ".git/COMMIT_EDITMSG" (or another file
+;; in that directory, e.g., ".git/MERGE_MSG" for merge commits).
+
+;; When `global-git-commit-mode' is enabled, which it is by default,
+;; then opening such a file causes the features described below, to
+;; be enabled in that buffer.  Normally this would be done using a
+;; major-mode but to allow the use of any major-mode, as the user sees
+;; fit, it is done here by running a setup function, which among other
+;; things turns on the preferred major-mode, by default `text-mode'.
+
+;; Git waits for the `$EDITOR' to finish and then either creates the
+;; commit using the contents of the file as commit message, or, if the
+;; editor process exited with a non-zero exit status, aborts without
+;; creating a commit.  Unfortunately Emacsclient (which is what Emacs
+;; users should be using as `$EDITOR' or at least as `$GIT_EDITOR')
+;; does not differentiate between "successfully" editing a file and
+;; aborting; not out of the box that is.
+
+;; By making use of the `with-editor' package this package provides
+;; both ways of finish an editing session.  In either case the file
+;; is saved, but Emacseditor's exit code differs.
+;;
+;;   C-c C-c  Finish the editing session successfully by returning
+;;            with exit code 0.  Git then creates the commit using
+;;            the message it finds in the file.
+;;
+;;   C-c C-k  Aborts the edit editing session by returning with exit
+;;            code 1.  Git then aborts the commit.
+
+;; Aborting the commit does not cause the message to be lost, but
+;; relying solely on the file not being tampered with is risky.  This
+;; package additionally stores all aborted messages for the duration
+;; of the current session (i.e., until you close Emacs).  To get back
+;; an aborted message use M-p and M-n while editing a message.
+;;
+;;   M-p      Replace the buffer contents with the previous message
+;;            from the message ring.  Of course only after storing
+;;            the current content there too.
+;;
+;;   M-n      Replace the buffer contents with the next message from
+;;            the message ring, after storing the current content.
+
+;; Support for inserting Git trailers (as described in the manpage
+;; git-interpret-trailers(1)) is available.
+;;
+;;   C-c C-i  Insert a trailer selected from a transient menu.
+
+;; When Git requests a commit message from the user, it does so by
+;; having her edit a file which initially contains some comments,
+;; instructing her what to do, and providing useful information, such
+;; as which files were modified.  These comments, even when left
+;; intact by the user, do not become part of the commit message.  This
+;; package ensures these comments are propertizes as such and further
+;; prettifies them by using different faces for various parts, such as
+;; files.
+
+;; Finally this package highlights style errors, like lines that are
+;; too long, or when the second line is not empty.  It may even nag
+;; you when you attempt to finish the commit without having fixed
+;; these issues.  The style checks and many other settings can easily
+;; be configured:
+;;
+;;   M-x customize-group RET git-commit RET
+
+;;; Code:
+
+(require 'magit-git)
+(require 'magit-mode)
+(require 'magit-process)
+
+(require 'log-edit)
+(require 'ring)
+(require 'server)
+(require 'transient)
+(require 'with-editor)
+
+(defvar dabbrev--abbrev-char-regexp)
+(defvar diff-default-read-only)
+(defvar flyspell-generic-check-word-predicate)
+(defvar font-lock-beg)
+(defvar font-lock-end)
+(defvar recentf-exclude)
+
+(defvar git-commit-need-summary-line)
+
+(declare-function dabbrev--reset-global-variables "dabbrev" ())
+(declare-function dabbrev-capf "dabbrev" ())
+(declare-function magit-commit-diff--args "magit-commit" ())
+(declare-function magit-diff--modified-defuns "magit-diff" ())
+(declare-function magit-diff-arguments "magit-diff" (&optional mode))
+
+(define-obsolete-variable-alias
+  'git-commit-known-pseudo-headers
+  'git-commit-trailers
+  "git-commit 4.0.0")
+
+;;; Options
+;;;; Variables
+
+(defgroup git-commit nil
+  "Edit Git commit messages."
+  :prefix "git-commit-"
+  :link '(info-link "(magit)Editing Commit Messages")
+  :group 'tools)
+
+(defcustom git-commit-major-mode #'text-mode
+  "Major mode used to edit Git commit messages.
+
+The major mode configured here is turned on by the minor mode
+`git-commit-mode'."
+  :group 'git-commit
+  :type '(radio (function-item text-mode)
+                (function-item markdown-mode)
+                (function-item org-mode)
+                (function-item fundamental-mode)
+                (function-item log-edit-mode)
+                (function-item git-commit-elisp-text-mode)
+                (function :tag "Another mode")
+                (const :tag "No major mode")))
+;;;###autoload(put 'git-commit-major-mode 'safe-local-variable
+;;;###autoload     (lambda (val)
+;;;###autoload       (memq val '(text-mode
+;;;###autoload                   markdown-mode
+;;;###autoload                   org-mode
+;;;###autoload                   fundamental-mode
+;;;###autoload                   log-edit-mode
+;;;###autoload                   git-commit-elisp-text-mode))))
+
+(defvaralias 'git-commit-mode-hook 'git-commit-setup-hook
+  "This variable is an alias for `git-commit-setup-hook' (which see).
+Also note that `git-commit-mode' (which see) is not a major-mode.")
+
+(defcustom git-commit-setup-hook
+  (list #'git-commit-ensure-comment-gap
+        #'git-commit-save-message
+        #'git-commit-setup-capf
+        #'git-commit-setup-changelog-support
+        #'git-commit-setup-auto-fill
+        #'git-commit-propertize-diff
+        #'git-commit-collapse-diff
+        #'bug-reference-mode)
+  "Hook run at the end of `git-commit-setup'."
+  :group 'git-commit
+  :type 'hook
+  :get #'magit-hook-custom-get
+  :options '(git-commit-ensure-comment-gap
+             git-commit-save-message
+             git-commit-setup-capf
+             git-commit-setup-changelog-support
+             magit-generate-changelog
+             git-commit-setup-auto-fill
+             git-commit-setup-orglink
+             git-commit-setup-flyspell
+             git-commit-propertize-diff
+             git-commit-collapse-diff
+             bug-reference-mode))
+
+(defcustom git-commit-finish-query-functions
+  (list #'git-commit-check-style-conventions)
+  "List of functions called to query before performing commit.
+
+The commit message buffer is current while the functions are
+called.  If any of them returns nil, then the commit is not
+performed and the buffer is not killed.  The user should then
+fix the issue and try again.
+
+The functions are called with one argument.  If it is non-nil,
+then that indicates that the user used a prefix argument to
+force finishing the session despite issues.  Functions should
+usually honor this wish and return non-nil."
+  :options '(git-commit-check-style-conventions)
+  :type 'hook
+  :group 'git-commit)
+
+(defcustom git-commit-style-convention-checks '(non-empty-second-line)
+  "List of checks performed by `git-commit-check-style-conventions'.
+
+Valid members are `non-empty-second-line' and `overlong-summary-line'.
+That function is a member of `git-commit-finish-query-functions'."
+  :options '(non-empty-second-line overlong-summary-line)
+  :type '(list :convert-widget custom-hook-convert-widget)
+  :group 'git-commit)
+
+(defcustom git-commit-summary-max-length 68
+  "Column beyond which characters in the summary lines are highlighted.
+
+The highlighting indicates that the summary is getting too long
+by some standards.  It does in no way imply that going over the
+limit a few characters or in some cases even many characters is
+anything that deserves shaming.  It's just a friendly reminder
+that if you can make the summary shorter, then you might want
+to consider doing so."
+  :group 'git-commit
+  :safe 'numberp
+  :type 'number)
+
+(defcustom git-commit-trailers
+  '("Acked-by"
+    "Modified-by"
+    "Reviewed-by"
+    "Signed-off-by"
+    "Tested-by"
+    "Cc"
+    "Reported-by"
+    "Suggested-by"
+    "Co-authored-by"
+    "Co-developed-by")
+  "A list of Git trailers to be highlighted.
+
+See also manpage git-interpret-trailer(1).  This package does
+not use that Git command, but the initial description still
+serves as a good introduction."
+  :group 'git-commit
+  :safe (##and (listp %) (all #'stringp %))
+  :type '(repeat string))
+
+(defcustom git-commit-use-local-message-ring nil
+  "Whether to use a local message ring instead of the global one.
+
+This can be set globally, in which case every repository gets its
+own commit message ring, or locally for a single repository."
+  :group 'git-commit
+  :safe 'booleanp
+  :type 'boolean)
+
+(defcustom git-commit-cd-to-toplevel nil
+  "Whether to set `default-directory' to the worktree in message buffer.
+
+Editing a commit message is done by visiting a file located in the git
+directory, usually \"COMMIT_EDITMSG\".  As is done when visiting any
+file, the local value of `default-directory' is set to the directory
+that contains the file.
+
+If this option is non-nil, then the local `default-directory' is changed
+to the working tree from which the commit command was invoked.  You may
+wish to do that, to make it easier to open a file that is located in the
+working tree, directly from the commit message buffer.
+
+If the git variable `safe.bareRepository' is set to \"explicit\", then
+you have to enable this, to be able to commit at all.  See issue #5100.
+
+This option only has an effect if the commit was initiated from Magit."
+  :group 'git-commit
+  :type 'boolean)
+
+;;;; Faces
+
+(defgroup git-commit-faces nil
+  "Faces used for highlighting Git commit messages."
+  :prefix "git-commit-"
+  :group 'git-commit
+  :group 'faces)
+
+(defface git-commit-summary
+  '((t :inherit font-lock-type-face))
+  "Face used for the summary in commit messages."
+  :group 'git-commit-faces)
+
+(defface git-commit-overlong-summary
+  '((t :inherit font-lock-warning-face))
+  "Face used for the tail of overlong commit message summaries."
+  :group 'git-commit-faces)
+
+(defface git-commit-nonempty-second-line
+  '((t :inherit font-lock-warning-face))
+  "Face used for non-whitespace on the second line of commit messages."
+  :group 'git-commit-faces)
+
+(defface git-commit-keyword
+  '((t :inherit font-lock-string-face))
+  "Face used for keywords in commit messages.
+In this context a \"keyword\" is text surrounded by brackets."
+  :group 'git-commit-faces)
+
+(defface git-commit-trailer-token
+  '((t :inherit font-lock-keyword-face))
+  "Face used for Git trailer tokens in commit messages."
+  :group 'git-commit-faces)
+
+(defface git-commit-trailer-value
+  '((t :inherit font-lock-string-face))
+  "Face used for Git trailer values in commit messages."
+  :group 'git-commit-faces)
+
+(defface git-commit-comment-branch-local
+  '((t :inherit magit-branch-local))
+  "Face used for names of local branches in commit message comments."
+  :group 'git-commit-faces)
+
+(defface git-commit-comment-branch-remote
+  '((t :inherit magit-branch-remote))
+  "Face used for names of remote branches in commit message comments."
+  :group 'git-commit-faces)
+
+(defface git-commit-comment-detached
+  '((t :inherit git-commit-comment-branch-local))
+  "Face used for detached `HEAD' in commit message comments."
+  :group 'git-commit-faces)
+
+(defface git-commit-comment-heading
+  '((t :inherit git-commit-trailer-token))
+  "Face used for headings in commit message comments."
+  :group 'git-commit-faces)
+
+(defface git-commit-comment-button
+  '((t :inherit git-commit-comment-heading :underline t))
+  "Face used for buttons in commit message comments."
+  :group 'git-commit-faces)
+
+(defface git-commit-comment-file
+  '((t :inherit git-commit-trailer-value))
+  "Face used for file names in commit message comments."
+  :group 'git-commit-faces)
+
+(defface git-commit-comment-action
+  '((t :inherit bold))
+  "Face used for actions in commit message comments."
+  :group 'git-commit-faces)
+
+;;; Keymap
+
+(defvar-keymap git-commit-redundant-bindings
+  :doc "Bindings made redundant by `git-commit-insert-trailer'.
+This keymap is used as the parent of `git-commit-mode-map',
+to avoid upsetting muscle-memory.  If you would rather avoid
+the redundant bindings, then set this to nil, before loading
+`git-commit'."
+  "C-c C-a" #'git-commit-ack
+  "C-c M-i" #'git-commit-suggested
+  "C-c C-m" #'git-commit-modified
+  "C-c C-o" #'git-commit-cc
+  "C-c C-p" #'git-commit-reported
+  "C-c C-r" #'git-commit-review
+  "C-c C-s" #'git-commit-signoff
+  "C-c C-t" #'git-commit-test)
+
+(defvar-keymap git-commit-mode-map
+  :doc "Keymap used by `git-commit-mode'."
+  :parent git-commit-redundant-bindings
+  "M-p"     #'git-commit-prev-message
+  "M-n"     #'git-commit-next-message
+  "C-c M-p" #'git-commit-search-message-backward
+  "C-c M-n" #'git-commit-search-message-forward
+  "C-c C-i" #'git-commit-insert-trailer
+  "C-c M-s" #'git-commit-save-message
+  "C-c C-d" 'magit-diff-while-committing
+  "C-c C-w" 'magit-pop-revision-stack)
+
+;;; Menu
+
+(require 'easymenu)
+(easy-menu-define git-commit-mode-menu git-commit-mode-map
+  "Git Commit Mode Menu."
+  '("Commit"
+    ["Previous" git-commit-prev-message t]
+    ["Next" git-commit-next-message t]
+    "-"
+    ["Ack" git-commit-ack t
+     :help "Insert an 'Acked-by' trailer"]
+    ["Modified-by" git-commit-modified t
+     :help "Insert a 'Modified-by' trailer"]
+    ["Reviewed-by" git-commit-review t
+     :help "Insert a 'Reviewed-by' trailer"]
+    ["Sign-Off" git-commit-signoff t
+     :help "Insert a 'Signed-off-by' trailer"]
+    ["Tested-by" git-commit-test t
+     :help "Insert a 'Tested-by' trailer"]
+    "-"
+    ["CC" git-commit-cc t
+     :help "Insert a 'Cc' trailer"]
+    ["Reported" git-commit-reported t
+     :help "Insert a 'Reported-by' trailer"]
+    ["Suggested" git-commit-suggested t
+     :help "Insert a 'Suggested-by' trailer"]
+    ["Co-authored-by" git-commit-co-authored t
+     :help "Insert a 'Co-authored-by' trailer"]
+    ["Co-developed-by" git-commit-co-developed t
+     :help "Insert a 'Co-developed-by' trailer"]
+    "-"
+    ["Save" git-commit-save-message t]
+    ["Cancel" with-editor-cancel t]
+    ["Commit" with-editor-finish t]))
+
+;;; Global Mode
+
+(define-minor-mode global-git-commit-mode
+  "Edit Git commit messages.
+
+This global mode arranges for `git-commit-setup' to be called
+when a Git commit message file is opened.  That usually happens
+when Git uses the Emacsclient as $GIT_EDITOR to have the user
+provide such a commit message.
+
+Loading the library `git-commit' by default enables this mode,
+but the library is not automatically loaded because doing that
+would pull in many dependencies and increase startup time too
+much.  You can either rely on `magit' loading this library or
+you can load it explicitly.  Autoloading is not an alternative
+because in this case autoloading would immediately trigger
+full loading."
+  :group 'git-commit
+  :type 'boolean
+  :global t
+  :init-value t
+  :initialize
+  (lambda (symbol exp)
+    (custom-initialize-default symbol exp)
+    (when global-git-commit-mode
+      (add-hook 'find-file-hook #'git-commit-setup-check-buffer)
+      (remove-hook 'after-change-major-mode-hook
+                   #'git-commit-setup-font-lock-in-buffer)))
+  (cond
+    (global-git-commit-mode
+     (add-hook 'find-file-hook #'git-commit-setup-check-buffer)
+     (add-hook 'after-change-major-mode-hook
+               #'git-commit-setup-font-lock-in-buffer))
+    (t
+     (remove-hook 'find-file-hook #'git-commit-setup-check-buffer)
+     (remove-hook 'after-change-major-mode-hook
+                  #'git-commit-setup-font-lock-in-buffer))))
+
+(defconst git-commit-filename-regexp "/\\(\
+\\(\\(COMMIT\\|NOTES\\|PULLREQ\\|MERGEREQ\\|TAG\\)_EDIT\\|MERGE_\\|\\)MSG\
+\\|\\(BRANCH\\|EDIT\\)_DESCRIPTION\\)\\'")
+
+(with-eval-after-load 'recentf
+  (add-to-list 'recentf-exclude git-commit-filename-regexp))
+
+(add-to-list 'with-editor-file-name-history-exclude git-commit-filename-regexp)
+
+(defun git-commit-setup-font-lock-in-buffer ()
+  (when (and buffer-file-name
+             (string-match-p git-commit-filename-regexp buffer-file-name))
+    (git-commit-setup-font-lock)))
+
+(defun git-commit-setup-check-buffer ()
+  (when (and buffer-file-name
+             (string-match-p git-commit-filename-regexp buffer-file-name))
+    (git-commit-setup)))
+
+(defun git-commit-file-not-found ()
+  ;; cygwin git will pass a cygwin path (/cygdrive/c/foo/.git/...),
+  ;; try to handle this in window-nt Emacs.
+  (when-let*
+      ((file (and (or (string-match-p git-commit-filename-regexp
+                                      buffer-file-name)
+                      (and (boundp 'git-rebase-filename-regexp)
+                           (string-match-p git-rebase-filename-regexp
+                                           buffer-file-name)))
+                  (not (file-accessible-directory-p
+                        (file-name-directory buffer-file-name)))
+                  (magit-expand-git-file-name (substring buffer-file-name 2))))
+       (_(file-accessible-directory-p (file-name-directory file)))
+       (inhibit-read-only t))
+    (insert-file-contents file t)
+    t))
+
+(when (eq system-type 'windows-nt)
+  (add-hook 'find-file-not-found-functions #'git-commit-file-not-found))
+
+;;; Local Mode
+
+(defvar git-commit-mode)
+
+(defconst git-commit-default-usage-message "\
+Type \\[with-editor-finish] to finish, \
+\\[with-editor-cancel] to cancel, and \
+\\[git-commit-prev-message] and \\[git-commit-next-message] \
+to recover older messages")
+
+(defvar git-commit-usage-message git-commit-default-usage-message
+  "Message displayed when editing a commit message.
+When this is nil, then `with-editor-usage-message' is displayed
+instead.  One of these messages has to be displayed; otherwise
+the user gets to see the message displayed by `server-execute'.
+That message is misleading and because we cannot prevent it from
+being displayed, we have to immediately show another message to
+prevent the user from seeing it.")
+
+(defvar git-commit-header-line-format nil
+  "If non-nil, header line format used by `git-commit-mode'.
+Used as the local value of `header-line-format', in buffer using
+`git-commit-mode'.  If it is a string, then it is passed through
+`substitute-command-keys' first.  A useful setting may be:
+  (setq git-commit-header-line-format git-commit-default-usage-message)
+  (setq git-commit-usage-message nil) ; show a shorter message")
+
+(defun git-commit-setup ()
+  ;; If an error occurs when `emacsclient' is used, and it turns out
+  ;; to not be triggered by something in this function, then another
+  ;; likely source are functions on `server-switch-hook'.  Debugging
+  ;; is suppressed while running that hook, so it may be necessary to
+  ;; force debugging by modifying those functions directly.  Enabling
+  ;; `magit-process-record-invocations' may also help.
+  (let ((gitdir default-directory)
+        (cd (and git-commit-cd-to-toplevel
+                 (or (car (rassoc default-directory magit--separated-gitdirs))
+                     (magit-toplevel)))))
+    ;; Pretend that git-commit-mode is a major-mode,
+    ;; so that directory-local settings can be used.
+    (let ((default-directory
+           (or (and (not (file-exists-p
+                          (expand-file-name ".dir-locals.el" gitdir)))
+                    ;; When $GIT_DIR/.dir-locals.el doesn't exist,
+                    ;; fallback to $GIT_WORK_TREE/.dir-locals.el,
+                    ;; because the maintainer can use the latter
+                    ;; to enforce conventions, while s/he has no
+                    ;; control over the former.
+                    (or cd (magit-toplevel)))
+               gitdir)))
+      (let ((buffer-file-name nil)         ; trick hack-dir-local-variables
+            (major-mode 'git-commit-mode)) ; trick dir-locals-collect-variables
+        (hack-dir-local-variables)
+        (hack-local-variables-apply)))
+    (when cd
+      (setq default-directory cd)))
+  (when git-commit-major-mode
+    (let ((auto-mode-alist
+           ;; `set-auto-mode--apply-alist' removes the remote part from
+           ;; the file-name before looking it up in `auto-mode-alist'.
+           ;; For our temporary entry to be found, we have to modify the
+           ;; file-name the same way.
+           (list (cons (concat "\\`"
+                               (regexp-quote
+                                (or (file-remote-p buffer-file-name 'localname)
+                                    buffer-file-name))
+                               "\\'")
+                       git-commit-major-mode)))
+          ;; The major-mode hook might want to consult these minor
+          ;; modes, while the minor-mode hooks might want to consider
+          ;; the major mode.
+          (git-commit-mode t)
+          (with-editor-mode t))
+      (normal-mode t)))
+  ;; Below we instead explicitly show a message.
+  (setq with-editor-show-usage nil)
+  (unless with-editor-mode
+    ;; Maybe already enabled when using `shell-command' or an Emacs shell.
+    (with-editor-mode 1))
+  (add-hook 'with-editor-finish-query-functions
+            #'git-commit-finish-query-functions nil t)
+  (add-hook 'with-editor-pre-finish-hook #'git-commit-save-message nil t)
+  (add-hook 'with-editor-pre-cancel-hook #'git-commit-save-message nil t)
+  (when (fboundp 'magit-commit--reset-command)
+    (add-hook 'with-editor-post-finish-hook #'magit-commit--reset-command)
+    (add-hook 'with-editor-post-cancel-hook #'magit-commit--reset-command))
+  (git-commit-add-post-finish-hook)
+  (setq with-editor-cancel-message
+        #'git-commit-cancel-message)
+  (git-commit-setup-font-lock)
+  (git-commit-prepare-message-ring)
+  (when (boundp 'save-place)
+    (setq save-place nil))
+  (let ((git-commit-mode-hook nil))
+    (git-commit-mode 1))
+  (with-demoted-errors "Error running git-commit-setup-hook: %S"
+    (run-hooks 'git-commit-setup-hook))
+  (set-buffer-modified-p nil)
+  (when$ git-commit-header-line-format
+    (setq header-line-format
+          (if (stringp $) (substitute-command-keys $) $)))
+  (when git-commit-usage-message
+    (setq with-editor-usage-message git-commit-usage-message))
+  (with-editor-usage-message))
+
+(define-minor-mode git-commit-mode
+  "Auxiliary minor mode used when editing Git commit messages.
+This mode is only responsible for setting up some key bindings.
+Don't use it directly; instead enable `global-git-commit-mode'.
+Variable `git-commit-major-mode' controls which major-mode is
+used."
+  :lighter "")
+
+(put 'git-commit-mode 'permanent-local t)
+
+;;; Setup
+
+(defun git-commit-ensure-comment-gap ()
+  "Separate initial empty line from initial comment.
+If the buffer begins with an empty line followed by a comment, insert
+an additional newline in between, so that once the users start typing,
+the input isn't tacked to the comment."
+  (save-excursion
+    (goto-char (point-min))
+    (when (looking-at (format "\\`\n%s" comment-start))
+      (open-line 1))))
+
+(defun git-commit-setup-capf ()
+  "Teach `complete-symbol' about `dabbrev-capf'.
+When \"git commit\"'s \"--verbose\" argument is used, this allows
+completing modified symbols and other text appearing in the diff."
+  (require 'dabbrev)
+  (unless dabbrev--abbrev-char-regexp
+    ;; Initialize (not "reset") variables.  See #5545.
+    (dabbrev--reset-global-variables))
+  (add-hook 'completion-at-point-functions #'dabbrev-capf -90 t))
+
+(defun git-commit-setup-changelog-support ()
+  "Treat ChangeLog entries as unindented paragraphs."
+  (setq-local fill-paragraph-function #'log-edit-fill-entry)
+  (setq-local fill-indent-according-to-mode t)
+  (setq-local paragraph-start (concat paragraph-start "\\|\\*\\|(")))
+
+(defun git-commit-setup-auto-fill ()
+  "Unconditionally turn on Auto Fill mode.
+Ensure auto filling happens everywhere, except in the summary line."
+  (auto-fill-mode 1)
+  (setq-local comment-auto-fill-only-comments nil)
+  (when git-commit-need-summary-line
+    (setq-local auto-fill-function #'git-commit--auto-fill-except-summary)))
+
+(defun git-commit--auto-fill-except-summary ()
+  "Do not fill summary line."
+  (unless (eq (line-beginning-position) 1)
+    (do-auto-fill)))
+
+(defun git-commit-setup-orglink ()
+  "Turn on Orglink mode if it is available.
+If `git-commit-major-mode' is `org-mode', then silently forgo
+turning on `orglink-mode'."
+  (when (and (not (derived-mode-p 'org-mode))
+             (boundp 'orglink-match-anywhere)
+             (fboundp 'orglink-mode))
+    (setq-local orglink-match-anywhere t)
+    (orglink-mode 1)))
+
+(defun git-commit-setup-flyspell ()
+  "Unconditionally turn on Flyspell mode.
+Also check text that is already in the buffer, while avoiding to check
+most text that Git will strip from the final message, such as the last
+comment and anything below the cut line (\"--- >8 ---\")."
+  (require 'flyspell)
+  (flyspell-mode 1)
+  (setq flyspell-generic-check-word-predicate #'git-commit--flyspell-verify)
+  (let ((end nil)
+        ;; The "cut line" is defined in "git/wt-status.c".  It appears
+        ;; in the commit message when `commit.verbose' is set to true.
+        (cut-line-regex (format "^%s -\\{8,\\} >8 -\\{8,\\}$" comment-start))
+        (comment-start-regex (format "^\\(%s\\|$\\)" comment-start)))
+    (save-excursion
+      (goto-char (or (re-search-forward cut-line-regex nil t)
+                     (point-max)))
+      (while (and (not (bobp)) (looking-at comment-start-regex))
+        (forward-line -1))
+      (unless (looking-at comment-start-regex)
+        (forward-line))
+      (setq end (point)))
+    (flyspell-region (point-min) end)))
+
+(defun git-commit--flyspell-verify ()
+  "Do not check spelling in comments."
+  (not (= (char-after (line-beginning-position))
+          (aref comment-start 0))))
+
+(defun git-commit-collapse-diff ()
+  "Collapse inline diff and add button to allow expanding it."
+  (save-excursion
+    (goto-char (point-min))
+    (when (re-search-forward (format "%s -+ >8 -+" comment-start) nil t)
+      (let ((elt '(git-commit-diff t)))
+        (add-to-invisibility-spec elt)
+        (make-button (line-beginning-position) (point)
+                     'face 'git-commit-comment-button
+                     'keymap (define-keymap :parent button-map
+                               "<return>" #'push-button
+                               "<tab>" #'push-button)
+                     'action (lambda (_)
+                               (if (memq elt buffer-invisibility-spec)
+                                   (remove-from-invisibility-spec elt)
+                                 (add-to-invisibility-spec elt))
+                               ;; KLUDGE Force "redisplay".
+                               (when-let ((w1 (selected-window))
+                                          (w2 (next-window)))
+                                 (select-window w2)
+                                 (select-window w1)))))
+      (let ((ov (make-overlay (point) (point-max))))
+        (overlay-put ov 'invisible 'git-commit-diff)))))
+
+;;; Finish
+
+(defun git-commit-finish-query-functions (force)
+  (run-hook-with-args-until-failure
+   'git-commit-finish-query-functions force))
+
+(defun git-commit-check-style-conventions (force)
+  "Check for violations of certain basic style conventions.
+
+For each violation ask the user if she wants to proceed anyway.
+Option `git-commit-style-convention-checks' controls which
+conventions are checked."
+  (or force
+      (save-excursion
+        (goto-char (point-min))
+        (re-search-forward (git-commit-summary-regexp) nil t)
+        (if (equal (match-str 1) "")
+            t ; Just try; we don't know whether --allow-empty-message was used.
+          (and (or (not (memq 'overlong-summary-line
+                              git-commit-style-convention-checks))
+                   (equal (match-str 2) "")
+                   (y-or-n-p "Summary line is too long.  Commit anyway? "))
+               (or (not (memq 'non-empty-second-line
+                              git-commit-style-convention-checks))
+                   (not (match-str 3))
+                   (y-or-n-p "Second line is not empty.  Commit anyway? ")))))))
+
+(defun git-commit-cancel-message ()
+  (message
+   (concat "Commit canceled"
+           (and (memq 'git-commit-save-message with-editor-pre-cancel-hook)
+                ".  Message saved to `log-edit-comment-ring'"))))
+
+;;; History
+
+(defun git-commit-prev-message (arg)
+  "Cycle backward through message history, after saving current message.
+With a numeric prefix ARG, go back ARG messages."
+  (interactive "*p")
+  (let ((len (ring-length log-edit-comment-ring)))
+    (if (<= len 0)
+        (progn (message "Empty comment ring") (ding))
+      ;; Unlike `log-edit-previous-comment' we save the current
+      ;; non-empty and newly written comment, because otherwise
+      ;; it would be irreversibly lost.
+      (when-let* ((message (git-commit-buffer-message))
+                  (_(not (ring-member log-edit-comment-ring message))))
+        (ring-insert log-edit-comment-ring message)
+        (incf arg)
+        (setq len (ring-length log-edit-comment-ring)))
+      ;; Delete the message but not the instructions at the end.
+      (save-restriction
+        (goto-char (point-min))
+        (narrow-to-region
+         (point)
+         (if (re-search-forward (concat "^" comment-start) nil t)
+             (max 1 (- (point) 2))
+           (point-max)))
+        (delete-region (point-min) (point)))
+      (setq log-edit-comment-ring-index (log-edit-new-comment-index arg len))
+      (message "Comment %d" (1+ log-edit-comment-ring-index))
+      (insert (ring-ref log-edit-comment-ring log-edit-comment-ring-index)))))
+
+(defun git-commit-next-message (arg)
+  "Cycle forward through message history, after saving current message.
+With a numeric prefix ARG, go forward ARG messages."
+  (interactive "*p")
+  (git-commit-prev-message (- arg)))
+
+(defun git-commit-search-message-backward (string)
+  "Search backward through message history for a match for STRING.
+Save current message first."
+  (interactive
+    (list (read-string (format-prompt "Comment substring"
+                                      log-edit-last-comment-match)
+                       nil nil log-edit-last-comment-match)))
+  (cl-letf (((symbol-function #'log-edit-previous-comment)
+             (symbol-function #'git-commit-prev-message)))
+    (log-edit-comment-search-backward string)))
+
+(defun git-commit-search-message-forward (string)
+  "Search forward through message history for a match for STRING.
+Save current message first."
+  (interactive
+    (list (read-string (format-prompt "Comment substring"
+                                      log-edit-last-comment-match)
+                       nil nil log-edit-last-comment-match)))
+  (cl-letf (((symbol-function #'log-edit-previous-comment)
+             (symbol-function #'git-commit-prev-message)))
+    (log-edit-comment-search-forward string)))
+
+(defun git-commit-save-message ()
+  "Save current message to `log-edit-comment-ring'."
+  (interactive)
+  (cond-let
+    ([message (git-commit-buffer-message)]
+     (when-let ((index (ring-member log-edit-comment-ring message)))
+       (ring-remove log-edit-comment-ring index))
+     (ring-insert log-edit-comment-ring message)
+     (when git-commit-use-local-message-ring
+       (magit-repository-local-set 'log-edit-comment-ring
+                                   log-edit-comment-ring))
+     (message "Message saved"))
+    ((message "Only whitespace and/or comments; message not saved"))))
+
+(defun git-commit-prepare-message-ring ()
+  (make-local-variable 'log-edit-comment-ring-index)
+  (when git-commit-use-local-message-ring
+    (setq-local log-edit-comment-ring
+                (magit-repository-local-get
+                 'log-edit-comment-ring
+                 (make-ring log-edit-maximum-comment-ring-size)))))
+
+(defun git-commit-buffer-message ()
+  (let ((flush (concat "^" comment-start))
+        (str (buffer-substring-no-properties (point-min) (point-max))))
+    (with-temp-buffer
+      (insert str)
+      (goto-char (point-min))
+      (when (re-search-forward (concat flush " -+ >8 -+$") nil t)
+        (delete-region (line-beginning-position) (point-max)))
+      (goto-char (point-min))
+      (flush-lines flush)
+      (goto-char (point-max))
+      (unless (eq (char-before) ?\n)
+        (insert ?\n))
+      (setq str (buffer-string)))
+    (and (not (string-match "\\`[ \t\n\r]*\\'" str))
+         (progn
+           (when (string-match "\\`\n\\{2,\\}" str)
+             (setq str (replace-match "\n" t t str)))
+           (when (string-match "\n\\{2,\\}\\'" str)
+             (setq str (replace-match "\n" t t str)))
+           str))))
+
+;;; Changelog
+
+(defun git-commit--modified-defuns ()
+  (if (save-excursion
+        (goto-char (point-min))
+        (re-search-forward "^diff --git" nil t))
+      (magit-diff--modified-defuns)
+    (with-temp-buffer
+      (pcase-let ((`(,rev ,arg) (magit-commit-diff--args)))
+        (save-excursion
+          (magit-git-insert "diff" "-p" arg (car (magit-diff-arguments)) rev)))
+      (magit-diff--modified-defuns))))
+
+;;;###autoload
+(defun git-commit-insert-changelog-gnu ()
+  "Insert a GNU-style changelog at point while authorig a commit message.
+
+The modified definitions are extracted from the diff in the message
+buffer, which is only available if \"git commit\" was invoked with
+\"--verbose\"."
+  (interactive)
+  (unless git-commit-mode
+    (user-error "Not in a commit message buffer"))
+  ;; Like `change-log-insert-entries'.
+  (pcase-dolist (`(,file . ,defuns) (git-commit--modified-defuns))
+    (if (not defuns)
+        (insert "* " file ":\n")
+      (insert "* " file " ")
+      (dolist (def defuns)
+        (insert "(" def "):\n")))))
+
+;;;###autoload
+(defun git-commit-insert-changelog-plain ()
+  "Insert a simple changelog at point while authorig a commit message.
+
+Defuns are slightly indented and quoted like in elisp docstrings.
+The exact format is still subject to change.
+
+The modified definitions are extracted from the diff in the message
+buffer, which is only available if \"git commit\" was invoked with
+\"--verbose\"."
+  (interactive)
+  (unless git-commit-mode
+    (user-error "Not in a commit message buffer"))
+  (pcase-dolist (`(,file . ,defuns) (git-commit--modified-defuns))
+    (insert file ":\n")
+    (dolist (def defuns)
+      (insert "  `" def "'\n"))))
+
+;;; Trailers
+
+(transient-define-prefix git-commit-insert-trailer ()
+  "Insert a commit message trailer.
+
+See also manpage git-interpret-trailer(1).  This command does
+not use that Git command, but the initial description still
+serves as a good introduction."
+  [[:description (##cond (prefix-arg
+                          "Insert trailer ... by someone ")
+                         ("Insert trailer ... by yourself"))
+    ("a"   "Ack"          git-commit-ack)
+    ("m"   "Modified"     git-commit-modified)
+    ("r"   "Reviewed"     git-commit-review)
+    ("s"   "Signed-off"   git-commit-signoff)
+    ("t"   "Tested"       git-commit-test)]
+   ["Insert trailer ... by someone"
+    ("C-c" "Cc"           git-commit-cc)
+    ("C-r" "Reported"     git-commit-reported)
+    ("C-i" "Suggested"    git-commit-suggested)
+    ("C-a" "Co-authored"  git-commit-co-authored)
+    ("C-d" "Co-developed" git-commit-co-developed)]]
+  ["Insert changelog"
+   ("l g" "GNU-style"     git-commit-insert-changelog-gnu)
+   ("l p" "plain"         git-commit-insert-changelog-plain)])
+
+(defun git-commit-ack (name mail)
+  "Insert a trailer acknowledging that you have looked at the commit."
+  (interactive (git-commit-get-ident "Acked-by"))
+  (git-commit--insert-ident-trailer "Acked-by" name mail))
+
+(defun git-commit-modified (name mail)
+  "Insert a trailer to signal that you have modified the commit."
+  (interactive (git-commit-get-ident "Modified-by"))
+  (git-commit--insert-ident-trailer "Modified-by" name mail))
+
+(defun git-commit-review (name mail)
+  "Insert a trailer acknowledging that you have reviewed the commit.
+With a prefix argument, prompt for another person who performed a
+review."
+  (interactive (git-commit-get-ident "Reviewed-by"))
+  (git-commit--insert-ident-trailer "Reviewed-by" name mail))
+
+(defun git-commit-signoff (name mail)
+  "Insert a trailer to sign off the commit.
+With a prefix argument, prompt for another person who signed off."
+  (interactive (git-commit-get-ident "Signed-off-by"))
+  (git-commit--insert-ident-trailer "Signed-off-by" name mail))
+
+(defun git-commit-test (name mail)
+  "Insert a trailer acknowledging that you have tested the commit.
+With a prefix argument, prompt for another person who tested."
+  (interactive (git-commit-get-ident "Tested-by"))
+  (git-commit--insert-ident-trailer "Tested-by" name mail))
+
+(defun git-commit-cc (name mail)
+  "Insert a trailer mentioning someone who might be interested."
+  (interactive (git-commit-read-ident "Cc"))
+  (git-commit--insert-ident-trailer "Cc" name mail))
+
+(defun git-commit-reported (name mail)
+  "Insert a trailer mentioning the person who reported the issue."
+  (interactive (git-commit-read-ident "Reported-by"))
+  (git-commit--insert-ident-trailer "Reported-by" name mail))
+
+(defun git-commit-suggested (name mail)
+  "Insert a trailer mentioning the person who suggested the change."
+  (interactive (git-commit-read-ident "Suggested-by"))
+  (git-commit--insert-ident-trailer "Suggested-by" name mail))
+
+(defun git-commit-co-authored (name mail)
+  "Insert a trailer mentioning the person who co-authored the commit."
+  (interactive (git-commit-read-ident "Co-authored-by"))
+  (git-commit--insert-ident-trailer "Co-authored-by" name mail))
+
+(defun git-commit-co-developed (name mail)
+  "Insert a trailer mentioning the person who co-developed the commit."
+  (interactive (git-commit-read-ident "Co-developed-by"))
+  (git-commit--insert-ident-trailer "Co-developed-by" name mail))
+
+(defun git-commit-get-ident (&optional prompt)
+  "Return name and email of the user or read another name and email.
+If PROMPT and `current-prefix-arg' are both non-nil, read name
+and email using `git-commit-read-ident' (which see), otherwise
+return name and email of the current user (you)."
+  (if (and prompt current-prefix-arg)
+      (git-commit-read-ident prompt)
+    (list (or (getenv "GIT_AUTHOR_NAME")
+              (getenv "GIT_COMMITTER_NAME")
+              (with-demoted-errors "Error running 'git config user.name': %S"
+                (magit-get "user.name"))
+              user-full-name
+              (read-string "Name: "))
+          (or (getenv "GIT_AUTHOR_EMAIL")
+              (getenv "GIT_COMMITTER_EMAIL")
+              (getenv "EMAIL")
+              (with-demoted-errors "Error running 'git config user.email': %S"
+                (magit-get "user.email"))
+              (read-string "Email: ")))))
+
+(defalias 'git-commit-self-ident #'git-commit-get-ident)
+
+(defvar git-commit-read-ident-history nil)
+
+(defun git-commit-read-ident (prompt)
+  "Read a name and email, prompting with PROMPT, and return them.
+Read them using a single prompt, offering past commit authors as
+completion candidates.  The input must have the form \"NAME <EMAIL>\"."
+  (let ((str (magit-completing-read
+              prompt
+              (sort (delete-dups
+                     (magit-git-lines "log" "-n9999" "--format=%aN <%ae>"))
+                    #'string<)
+              nil 'any nil 'git-commit-read-ident-history)))
+    (save-match-data
+      (if (string-match "\\`\\([^<]+\\) *<\\([^>]+\\)>\\'" str)
+          (list (save-match-data (string-trim (match-str 1 str)))
+                (string-trim (match-str 2 str)))
+        (user-error "Invalid input")))))
+
+(defun git-commit--insert-ident-trailer (trailer name email)
+  (git-commit--insert-trailer trailer (format "%s <%s>" name email)))
+
+(defun git-commit--insert-trailer (trailer value)
+  (git-commit--insert-trailer-1 (format "%s: %s\n" trailer value)))
+
+(defun git-commit--insert-trailer-1 (string &optional before-trailers)
+  (save-excursion
+    (goto-char (point-min))
+    (while (looking-at comment-start)
+      (forward-line))
+    (when (or (eobp) (looking-at "diff --git"))
+      (goto-char (point-min))
+      (save-excursion (insert ?\n)))
+    (let ((bound (and (not (or (bobp) (eobp))) (point))))
+      (goto-char (point-max))
+      (unless (or (bobp) (= (char-before) ?\n))
+        (insert ?\n))
+      (cond (before-trailers
+             (git-commit--goto-insert-position bound)
+             (while (re-search-backward (git-commit--trailer-regexp) nil t))
+             (unless (looking-back "\n\n" nil)
+               (insert ?\n)))
+            ((re-search-backward (git-commit--trailer-regexp) nil t)
+             (goto-char (match-end 0))
+             (if (eobp) (insert ?\n) (forward-char)))
+            (t
+             (git-commit--goto-insert-position bound)
+             (unless (looking-back "\n\n" nil)
+               (insert ?\n)))))
+    (insert string)
+    (unless (ignore-errors (= (char-before) ?\n)) (insert ?\n))
+    (unless (ignore-errors (= (char-after)  ?\n)) (insert ?\n))))
+
+(defun git-commit--goto-insert-position (bound)
+  (let ((match (point)))
+    (cond ((re-search-backward (format "^%s -+ >8 -+" comment-start) nil t))
+          ((and (eobp) (bolp))
+           (forward-line -1)))
+    (while (and (or (looking-at comment-start)
+                    (looking-at "[\s\t]*$"))
+                (or (not bound) (> (point) bound))
+                (not (bobp)))
+      (setq match (point))
+      (forward-line -1))
+    (goto-char match)))
+
+;;; Font-Lock
+
+(defvar-local git-commit-need-summary-line t
+  "Whether the text should have a heading that is separated from the body.
+
+For commit messages that is a convention that should not
+be violated.  For notes it is up to the user.  If you do
+not want to insist on an empty second line here, then use
+something like:
+
+  (add-hook \\='git-commit-setup-hook
+            (lambda ()
+              (when (equal (file-name-nondirectory (buffer-file-name))
+                           \"NOTES_EDITMSG\")
+                (setq git-commit-need-summary-line nil))))")
+
+(defun git-commit--trailer-regexp ()
+  (format
+   "^\\(?:\\(%s:\\)\\( .*\\)\\|\\([-a-zA-Z]+\\): \\([^<\n]+? <[^>\n]+>\\)\\)"
+   (regexp-opt git-commit-trailers)))
+
+(defun git-commit-summary-regexp ()
+  (if git-commit-need-summary-line
+      (concat
+       ;; Leading empty lines and comments
+       (format "\\`\\(?:^\\(?:\\s-*\\|%s.*\\)\n\\)*" comment-start)
+       ;; Summary line
+       (format "\\(.\\{0,%d\\}\\)\\(.*\\)" git-commit-summary-max-length)
+       ;; Non-empty non-comment second line
+       (format "\\(?:\n%s\\|\n\\(.+\\)\\)?" comment-start))
+    "\\(EASTER\\) \\(EGG\\)"))
+
+(defun git-commit-extend-region-summary-line ()
+  "Identify the multiline summary-regexp construct.
+Added to `font-lock-extend-region-functions'."
+  (save-excursion
+    (save-match-data
+      (goto-char (point-min))
+      (when (looking-at (git-commit-summary-regexp))
+        (let ((summary-beg (match-beginning 0))
+              (summary-end (match-end 0)))
+          (when (or (< summary-beg font-lock-beg summary-end)
+                    (< summary-beg font-lock-end summary-end))
+            (setq font-lock-beg (min font-lock-beg summary-beg))
+            (setq font-lock-end (max font-lock-end summary-end))))))))
+
+(defvar-local git-commit--branch-name-regexp nil)
+
+(defconst git-commit-comment-headings
+  '("Changes to be committed:"
+    "Untracked files:"
+    "Changed but not updated:"
+    "Changes not staged for commit:"
+    "Unmerged paths:"
+    "Author:"
+    "Date:")
+  "Also fontified outside of comments in `git-commit-font-lock-keywords-2'.")
+
+(defconst git-commit-font-lock-keywords-1
+  '(;; Trailers
+    (eval . `(,(git-commit--trailer-regexp)
+              (1 'git-commit-trailer-token nil t)
+              (2 'git-commit-trailer-value nil t)
+              (3 'git-commit-trailer-token nil t)
+              (4 'git-commit-trailer-value nil t)))
+    ;; Summary
+    (eval . `(,(git-commit-summary-regexp)
+              (1 'git-commit-summary)))
+    ;; - Keyword [aka "text in brackets"] (overrides summary)
+    ("\\[[^][]+?\\]"
+     (0 'git-commit-keyword t))
+    ;; - Non-empty second line (overrides summary and note)
+    (eval . `(,(git-commit-summary-regexp)
+              (2 'git-commit-overlong-summary t t)
+              (3 'git-commit-nonempty-second-line t t)))))
+
+(defconst git-commit-font-lock-keywords-2
+  `(,@git-commit-font-lock-keywords-1
+    ;; Comments
+    (eval . `(,(format "^%s.*" comment-start)
+              (0 'font-lock-comment-face append)))
+    (eval . `(,(format "^%s On branch \\(.*\\)" comment-start)
+              (1 'git-commit-comment-branch-local t)))
+    (eval . `(,(format "^%s \\(HEAD\\) detached at" comment-start)
+              (1 'git-commit-comment-detached t)))
+    (eval . `(,(format "^%s %s" comment-start
+                       (regexp-opt git-commit-comment-headings t))
+              (1 'git-commit-comment-heading t)))
+    (eval . `(,(format "^%s\t\\(?:\\([^:\n]+\\):\\s-+\\)?\\(.*\\)" comment-start)
+              (1 'git-commit-comment-action t t)
+              (2 'git-commit-comment-file t)))
+    ;; "commit HASH"
+    (eval . '("^commit [[:alnum:]]+$"
+              (0 'git-commit-trailer-value)))
+    ;; `git-commit-comment-headings' (but not in commented lines)
+    (eval . `(,(format "\\(?:^%s[[:blank:]]+.+$\\)"
+                       (regexp-opt git-commit-comment-headings))
+              (0 'git-commit-trailer-value)))))
+
+(defconst git-commit-font-lock-keywords-3
+  `(,@git-commit-font-lock-keywords-2
+    ;; More comments
+    (eval
+     ;; Your branch is ahead of 'master' by 3 commits.
+     ;; Your branch is behind 'master' by 2 commits, and can be fast-forwarded.
+     . `(,(format
+           "^%s Your branch is \\(?:ahead\\|behind\\) of '%s' by \\([0-9]*\\)"
+           comment-start git-commit--branch-name-regexp)
+         (1 'git-commit-comment-branch-local t)
+         (2 'git-commit-comment-branch-remote t)
+         (3 'bold t)))
+    (eval
+     ;; Your branch is up to date with 'master'.
+     ;; Your branch and 'master' have diverged,
+     . `(,(format
+           "^%s Your branch \\(?:is up[- ]to[- ]date with\\|and\\) '%s'"
+           comment-start git-commit--branch-name-regexp)
+         (1 'git-commit-comment-branch-local t)
+         (2 'git-commit-comment-branch-remote t)))
+    (eval
+     ;; and have 1 and 2 different commits each, respectively.
+     . `(,(format
+           "^%s and have \\([0-9]*\\) and \\([0-9]*\\) commits each"
+           comment-start)
+         (1 'bold t)
+         (2 'bold t)))))
+
+(defvar git-commit-font-lock-keywords git-commit-font-lock-keywords-3
+  "Font-Lock keywords for Git-Commit mode.")
+
+(defun git-commit-setup-font-lock ()
+  (with-demoted-errors "Error running git-commit-setup-font-lock: %S"
+    (let ((table (make-syntax-table (syntax-table))))
+      (when comment-start
+        (modify-syntax-entry (string-to-char comment-start) "." table))
+      (modify-syntax-entry ?#  "." table)
+      (modify-syntax-entry ?\" "." table)
+      (modify-syntax-entry ?\' "." table)
+      (modify-syntax-entry ?`  "." table)
+      (set-syntax-table table))
+    (setq-local comment-start (or (magit-get "core.commentchar") "#"))
+    (setq-local comment-start-skip (format "^%s+[\s\t]*" comment-start))
+    (setq-local comment-end "")
+    (setq-local comment-end-skip "\n")
+    (setq-local comment-use-syntax nil)
+    (when (and (derived-mode-p 'markdown-mode)
+               (fboundp 'markdown-fill-paragraph))
+      (setq-local fill-paragraph-function
+                  (lambda (&optional justify)
+                    (and (not (= (char-after (line-beginning-position))
+                                 (aref comment-start 0)))
+                         (markdown-fill-paragraph justify)))))
+    (setq-local git-commit--branch-name-regexp
+                ;; When using cygwin git, we may end up in a
+                ;; non-existing directory, which would cause
+                ;; any git calls to signal an error.
+                (if (file-accessible-directory-p default-directory)
+                    ;; Font-Lock wants every submatch to succeed, so
+                    ;; also match the empty string.  Avoid listing
+                    ;; remote branches and using `regexp-quote',
+                    ;; because in repositories that have thousands of
+                    ;; branches that would be very slow.  See #4353.
+                    (format "\\(\\(?:%s\\)\\|\\)\\([^']+\\)"
+                            (string-join (magit-list-local-branch-names) "\\|"))
+                  "\\([^']*\\)"))
+    (setq-local font-lock-multiline t)
+    (add-hook 'font-lock-extend-region-functions
+              #'git-commit-extend-region-summary-line
+              t t)
+    (font-lock-add-keywords nil git-commit-font-lock-keywords)))
+
+(defun git-commit-propertize-diff ()
+  (require 'diff-mode)
+  (save-excursion
+    (goto-char (point-min))
+    (when (re-search-forward "^diff --git" nil t)
+      (beginning-of-line)
+      (let ((buffer (current-buffer)))
+        (insert
+         (with-temp-buffer
+           (insert
+            (with-current-buffer buffer
+              (prog1 (buffer-substring-no-properties (point) (point-max))
+                (delete-region (point) (point-max)))))
+           (let ((diff-default-read-only nil))
+             (diff-mode))
+           ;; These won't survive copying to another buffer,
+           ;; so let's not waste any time.  See #5483.
+           (setq-local diff-refine nil)
+           (setq-local diff-font-lock-syntax nil)
+           (setq-local diff-font-lock-prettify nil)
+           (let ((font-lock-verbose nil)
+                 (font-lock-support-mode nil))
+             (font-lock-ensure))
+           (let ((pos (point-min)))
+             (while-let ((next (next-single-property-change pos 'face)))
+               (put-text-property pos next 'font-lock-face
+                                  (get-text-property pos 'face))
+               (setq pos next))
+             (put-text-property pos (point-max) 'font-lock-face
+                                (get-text-property pos 'face)))
+           (buffer-string)))))))
+
+;;; Elisp Text Mode
+
+(define-derived-mode git-commit-elisp-text-mode text-mode "ElText"
+  "Major mode for editing commit messages of elisp projects.
+This is intended for use as `git-commit-major-mode' for projects
+that expect `symbols' to look like this.  I.e., like they look in
+Elisp doc-strings, including this one.  Unlike in doc-strings,
+\"strings\" also look different than the other text."
+  (setq font-lock-defaults '(git-commit-elisp-text-mode-keywords)))
+
+(defvar git-commit-elisp-text-mode-keywords
+  `((,(concat "[`‘]\\(" lisp-mode-symbol-regexp "\\)['’]")
+     (1 font-lock-constant-face prepend))
+    ("\"[^\"]*\"" (0 font-lock-string-face prepend))))
+
+;;; Post Hook
+
+(defcustom git-commit-post-finish-hook nil
+  "Hook run after the user finished writing a commit message.
+
+\\<with-editor-mode-map>\
+This hook is only run after pressing \\[with-editor-finish] in a buffer used
+to edit a commit message.  If a commit is created without the
+user typing a message into a buffer, then this hook is not run.
+
+This hook is not run until the new commit has been created.  If
+that takes Git longer than `git-commit-post-finish-hook-timeout'
+seconds, then this hook isn't run at all.  For certain commands
+such as `magit-rebase-continue' this hook is never run because
+doing so would lead to a race condition.
+
+Also see `magit-post-commit-hook'."
+  :group 'git-commit
+  :type 'hook
+  :get #'magit-hook-custom-get)
+
+(defcustom git-commit-post-finish-hook-timeout 2
+  "Time in seconds to wait for git to create a commit.
+
+The hook `git-commit-post-finish-hook' (which see) is run only
+after git is done creating a commit.  If it takes longer than
+`git-commit-post-finish-hook-timeout' seconds to create the
+commit, then the hook is not run at all."
+  :group 'git-commit
+  :safe 'numberp
+  :type 'number)
+
+(defun git-commit-add-post-finish-hook ()
+  (unless (memq last-command
+                '(magit-sequencer-continue
+                  magit-sequencer-skip
+                  magit-am-continue
+                  magit-am-skip
+                  magit-rebase-continue
+                  magit-rebase-skip))
+    (add-hook 'with-editor-post-finish-hook
+              (apply-partially #'git-commit-run-post-finish-hook
+                               (magit-rev-parse "HEAD"))
+              nil t)))
+
+(defun git-commit-run-post-finish-hook (previous)
+  (when git-commit-post-finish-hook
+    (if (with-timeout (git-commit-post-finish-hook-timeout)
+          (while (equal (magit-rev-parse "HEAD") previous)
+            (sit-for 0.01))
+          t)
+        (run-hooks 'git-commit-post-finish-hook)
+      (message "No commit created after %s second.  Not running %s."
+               git-commit-post-finish-hook-timeout
+               'git-commit-post-finish-hook))))
+
+;;; _
+
+(define-obsolete-function-alias
+  'git-commit-insert-pseudo-header
+  'git-commit-insert-trailer
+  "git-commit 4.0.0")
+(define-obsolete-function-alias
+  'git-commit-insert-header
+  'git-commit--insert-ident-trailer
+  "git-commit 4.0.0")
+(define-obsolete-face-alias
+ 'git-commit-pseudo-header
+ 'git-commit-trailer-value
+ "git-commit 4.0.0")
+(define-obsolete-face-alias
+ 'git-commit-known-pseudo-header
+ 'git-commit-trailer-token
+ "git-commit 4.0.0")
+
+(define-obsolete-function-alias
+  'git-commit-turn-on-auto-fill
+  'git-commit-setup-auto-fill
+  "git-commit 4.6.0")
+(define-obsolete-function-alias
+  'git-commit-turn-on-flyspell
+  'git-commit-setup-flyspell
+  "git-commit 4.6.0")
+(define-obsolete-function-alias
+  'git-commit-turn-on-orglink
+  'git-commit-setup-orglink
+  "git-commit 4.6.0")
+
+(provide 'git-commit)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; git-commit.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/git-commit.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/git-commit.elc
new file mode 100644
index 0000000..97ac9e6
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/git-commit.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/git-rebase.el b/emacs/.emacs.d/elpa/magit-20260822.1158/git-rebase.el
new file mode 100644
index 0000000..0a8135e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/git-rebase.el
@@ -0,0 +1,960 @@
+;;; git-rebase.el --- Edit Git rebase files  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Phil Jackson <phil@shellarchive.co.uk>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This package assists the user in editing the list of commits to be
+;; rewritten during an interactive rebase.
+
+;; When the user initiates an interactive rebase, e.g., using "r e" in
+;; a Magit buffer or on the command line using "git rebase -i REV",
+;; Git invokes the `$GIT_SEQUENCE_EDITOR' (or if that is undefined
+;; `$GIT_EDITOR' or even `$EDITOR') letting the user rearrange, drop,
+;; reword, edit, and squash commits.
+
+;; This package provides the major-mode `git-rebase-mode' which makes
+;; doing so much more fun, by making the buffer more colorful and
+;; providing the following commands:
+;;
+;;   C-c C-c  Tell Git to make it happen.
+;;   C-c C-k  Tell Git that you changed your mind, i.e., abort.
+;;
+;;   p        Move point to previous line.
+;;   n        Move point to next line.
+;;
+;;   M-p      Move the commit at point up.
+;;   M-n      Move the commit at point down.
+;;
+;;   d        Drop the commit at point.
+;;   c        Keep the commit at point.
+;;   r        Change the message of the commit at point.
+;;   e        Edit the commit at point.
+;;   s        Squash the commit at point, into the one above.
+;;   f        Like "s" but don't also edit the commit message.
+;;   b        Break for editing at this point in the sequence.
+;;   x        Add a script to be run with the commit at point
+;;            being checked out.
+;;   k        Un-/comment current line.
+;;   z        Add noop action at point.
+;;
+;;   SPC      Show the commit at point in another buffer.
+;;   RET      Show the commit at point in another buffer and
+;;            select its window.
+;;   C-/      Undo last change.
+;;
+;;   Commands for --rebase-merges:
+;;   l        Associate label with current HEAD in sequence.
+;;   MM       Merge specified revisions into HEAD.
+;;   Mt       Toggle whether the merge will invoke an editor
+;;            before committing.
+;;   t        Reset HEAD to the specified label.
+
+;; You should probably also read the `git-rebase' manpage.
+
+;;; Code:
+
+(require 'magit)
+
+(require 'easymenu)
+(require 'server)
+(require 'with-editor)
+
+(defvar recentf-exclude)
+
+;;; Options
+;;;; Variables
+
+(defgroup git-rebase nil
+  "Edit Git rebase sequences."
+  :link '(info-link "(magit)Editing Rebase Sequences")
+  :group 'tools)
+
+(defcustom git-rebase-auto-advance t
+  "Whether to move to next line after changing a line."
+  :group 'git-rebase
+  :type 'boolean)
+
+(defcustom git-rebase-show-instructions t
+  "Whether to show usage instructions inside the rebase buffer."
+  :group 'git-rebase
+  :type 'boolean)
+
+(defcustom git-rebase-confirm-cancel t
+  "Whether confirmation is required to cancel."
+  :group 'git-rebase
+  :type 'boolean)
+
+;;;; Faces
+
+(defgroup git-rebase-faces nil
+  "Faces used by Git-Rebase mode."
+  :group 'faces
+  :group 'git-rebase)
+
+(defface git-rebase-hash '((t :inherit magit-hash))
+  "Face for commit hashes."
+  :group 'git-rebase-faces)
+
+(defface git-rebase-label '((t :inherit magit-refname))
+  "Face for labels in label, merge, and reset lines."
+  :group 'git-rebase-faces)
+
+(defface git-rebase-description '((t nil))
+  "Face for commit descriptions."
+  :group 'git-rebase-faces)
+
+(defface git-rebase-action
+  '((t :inherit font-lock-keyword-face))
+  "Face for action keywords."
+  :group 'git-rebase-faces)
+
+(defface git-rebase-killed-action
+  '((t :inherit font-lock-comment-face :strike-through t))
+  "Face for commented commit action lines."
+  :group 'git-rebase-faces)
+
+(defface git-rebase-comment-hash
+  '((t :inherit git-rebase-hash :weight bold))
+  "Face for commit hashes in commit message comments."
+  :group 'git-rebase-faces)
+
+(defface git-rebase-comment-heading
+  '((t :inherit font-lock-keyword-face))
+  "Face for headings in rebase message comments."
+  :group 'git-rebase-faces)
+
+;;; Keymaps
+
+(defvar-keymap git-rebase-mode-map
+  :doc "Keymap for Git-Rebase mode."
+  :parent special-mode-map
+  "C-m" #'git-rebase-show-commit
+  "p"   #'git-rebase-backward-line
+  "n"   #'forward-line
+  "M-p" #'git-rebase-move-line-up
+  "M-n" #'git-rebase-move-line-down
+  "c"   #'git-rebase-pick
+  "d"   #'git-rebase-drop
+  "k"   #'git-rebase-kill-line
+  "C-k" #'git-rebase-kill-line
+  "b"   #'git-rebase-break
+  "e"   #'git-rebase-edit
+  "l"   #'git-rebase-label
+  "M M" #'git-rebase-merge
+  "M t" #'git-rebase-merge-toggle-editmsg
+  "m"   #'git-rebase-edit
+  "s"   #'git-rebase-squash
+  "S"   #'git-rebase-squish
+  "f"   #'git-rebase-fixup
+  "F"   #'git-rebase-alter
+  "A"   #'git-rebase-alter
+  "q"   #'undefined
+  "r"   #'git-rebase-reword
+  "w"   #'git-rebase-reword
+  "t"   #'git-rebase-reset
+  "u"   #'git-rebase-update-ref
+  "x"   #'git-rebase-exec
+  "y"   #'git-rebase-insert
+  "z"   #'git-rebase-noop
+  "SPC" #'git-rebase-show-or-scroll-up
+  "DEL" #'git-rebase-show-or-scroll-down
+  "C-x C-t"        #'git-rebase-move-line-up
+  "M-<up>"         #'git-rebase-move-line-up
+  "M-<down>"       #'git-rebase-move-line-down
+  "<remap> <undo>" #'git-rebase-undo)
+(put 'git-rebase-alter        :advertised-binding (kbd "F"))
+(put 'git-rebase-reword       :advertised-binding (kbd "r"))
+(put 'git-rebase-move-line-up :advertised-binding (kbd "M-p"))
+(put 'git-rebase-kill-line    :advertised-binding (kbd "k"))
+
+(easy-menu-define git-rebase-mode-menu git-rebase-mode-map
+  "Git-Rebase mode menu."
+  '("Rebase"
+    ["Pick" git-rebase-pick t]
+    ["Drop" git-rebase-drop t]
+    ["Reword" git-rebase-reword t]
+    ["Edit" git-rebase-edit t]
+    ["Squash" git-rebase-squash t]
+    ["Fixup" git-rebase-fixup t]
+    ["Kill" git-rebase-kill-line t]
+    ["Noop" git-rebase-noop t]
+    ["Execute" git-rebase-exec t]
+    ["Move Down" git-rebase-move-line-down t]
+    ["Move Up" git-rebase-move-line-up t]
+    "---"
+    ["Cancel" with-editor-cancel t]
+    ["Finish" with-editor-finish t]))
+
+(defvar git-rebase-command-descriptions
+  '((with-editor-finish           . "tell Git to make it happen")
+    (with-editor-cancel           . "tell Git that you changed your mind, i.e., abort")
+    (git-rebase-backward-line     . "move point to previous line")
+    (forward-line                 . "move point to next line")
+    (git-rebase-move-line-up      . "move the commit at point up")
+    (git-rebase-move-line-down    . "move the commit at point down")
+    (git-rebase-show-or-scroll-up . "show the commit at point in another buffer")
+    (git-rebase-show-commit
+     . "show the commit at point in another buffer and select its window")
+    (undo                         . "undo last change")
+    (git-rebase-drop              . "drop the commit at point")
+    (git-rebase-kill-line         . "un-/comment current line")
+    (git-rebase-insert            . "insert a line for an arbitrary commit")
+    (git-rebase-noop              . "add noop action at point")))
+
+(defvar git-rebase-fixup-descriptions
+  '((git-rebase-squish
+     . "fixup -c <commit> = use commit, but meld into previous commit,\n#\
+          dropping previous commit's message, and open the editor")
+    (git-rebase-fixup
+     . "fixup <commit> = use commit, but meld into previous commit,\n#\
+          dropping <commit>'s message")
+    (git-rebase-alter
+     . "fixup -C <commit> = use commit, but meld into previous commit,\n#\
+          dropping previous commit's message")))
+
+;;; Commands
+
+(defun git-rebase-pick ()
+  "Use commit on current line.
+If the region is active, act on all lines touched by the region."
+  (interactive)
+  (git-rebase-set-action "pick"))
+
+(defun git-rebase-drop ()
+  "Drop commit on current line.
+If the region is active, act on all lines touched by the region."
+  (interactive)
+  (git-rebase-set-action "drop"))
+
+(defun git-rebase-reword ()
+  "Edit message of commit on current line.
+If the region is active, act on all lines touched by the region."
+  (interactive)
+  (git-rebase-set-action "reword"))
+
+(defun git-rebase-edit ()
+  "Stop at the commit on the current line.
+If the region is active, act on all lines touched by the region."
+  (interactive)
+  (git-rebase-set-action "edit"))
+
+(defun git-rebase-squash ()
+  "Fold commit on current line into previous commit, edit combined message.
+If the region is active, act on all lines touched by the region."
+  (interactive)
+  (git-rebase-set-action "squash"))
+
+(defun git-rebase-squish ()
+  "Fold current into previous commit, discard previous message and edit current.
+This is like `git-rebase-squash', except that the other message is kept.
+The action indicatore shown in the list commits is \"fixup -c\".  If the
+region is active, act on all lines touched by the region."
+  (interactive)
+  (git-rebase-set-action "fixup -c"))
+
+(defun git-rebase-fixup ()
+  "Fold commit on current line into previous commit, discard current message.
+If the region is active, act on all lines touched by the region."
+  (interactive)
+  (git-rebase-set-action "fixup"))
+
+(defun git-rebase-alter ()
+  "Meld current into previous commit, discard previous message and use current.
+This is like `git-rebase-fixup', except that the other message is kept.
+The action indicatore shown in the list commits is \"fixup -C\".  If the
+region is active, act on all lines touched by the region."
+  (interactive)
+  (git-rebase-set-action "fixup -C"))
+
+(defvar-local git-rebase-comment-re nil)
+
+(defvar git-rebase-short-options
+  '((?b . "break")
+    (?d . "drop")
+    (?e . "edit")
+    (?f . "fixup")
+    (?l . "label")
+    (?m . "merge")
+    (?p . "pick")
+    (?r . "reword")
+    (?s . "squash")
+    (?t . "reset")
+    (?u . "update-ref")
+    (?x . "exec"))
+  "Alist mapping single key of an action to the full name.")
+
+(defclass git-rebase-action ()
+  (;; action-type: commit, exec, bare, label, merge
+   (action-type    :initarg :action-type    :initform nil)
+   ;; Examples for each action type:
+   ;; | action | action options | target  | trailer |
+   ;; |--------+----------------+---------+---------|
+   ;; | pick   |                | hash    | subject |
+   ;; | exec   |                | command |         |
+   ;; | noop   |                |         |         |
+   ;; | reset  |                | name    | subject |
+   ;; | merge  | -C hash        | name    | subject |
+   (action         :initarg :action         :initform nil)
+   (action-options :initarg :action-options :initform nil)
+   (target         :initarg :target         :initform nil)
+   (trailer        :initarg :trailer        :initform nil)
+   (comment-p      :initarg :comment-p      :initform nil)
+   (abbrev)))
+
+(defvar git-rebase-line-regexps
+  ;; 1: action, 2: option, 3: target, 4: "#", 5: description.
+  ;;
+  ;; <action> <commit> [[# ] <oneline>]
+  ;; fixup [-C|-c] <commit> [[# ] <oneline>]
+  `((commit . ,(concat
+                (regexp-opt '("d"    "drop"
+                              "e"    "edit"
+                              "f"    "fixup"
+                              "f -C" "fixup -C"
+                              "f -c" "fixup -c"
+                              "p"    "pick"
+                              "r"    "reword"
+                              "s"    "squash")
+                            "\\(?1:")
+                " \\(?3:[^ \n]+\\)"
+                "\\(?: \\(?4:# \\)?\\(?5:.*\\)\\)?"))
+    (exec . "\\(?1:x\\|exec\\) \\(?3:.*\\)")
+    (bare . ,(concat (regexp-opt '("b" "break" "noop") "\\(?1:")
+                     " *$"))
+    (label . ,(concat (regexp-opt '("l" "label"
+                                    "t" "reset"
+                                    "u" "update-ref")
+                                  "\\(?1:")
+                      " \\(?3:[^ \n]+\\)"
+                      "\\(?: \\(?4:# \\)?\\(?5:.*\\)\\)?"))
+    ;; merge [-C <commit> | -c <commit>] <label> [# <oneline>]
+    ;; <commit> is matched by group 22 (part of group 2), not group 3
+    (merge . ,(concat "\\(?1:m\\|merge\\) "
+                      "\\(?:\\(?2:\\(?21:-[cC]\\) \\(?22:[^ \n]+\\)\\) \\)?"
+                      "\\(?3:[^ \n]+\\)"
+                      "\\(?: \\(?4:# \\)?\\(?5:.*\\)\\)?"))))
+
+;;;###autoload
+(defun git-rebase-current-line (&optional batch)
+  "Parse current line into a `git-rebase-action' instance.
+If the current line isn't recognized as a rebase line, an
+instance with all nil values is returned, unless optional
+BATCH is non-nil, in which case nil is returned.  Non-nil
+BATCH also ignores commented lines."
+  (save-excursion
+    (goto-char (line-beginning-position))
+    (cond-let*
+      ([re-start (if batch
+                     "^"
+                   (format "^\\(?99:%s\\)? *" (regexp-quote comment-start)))]
+       [type (seq-some (pcase-lambda (`(,type . ,re))
+                         (let ((case-fold-search nil))
+                           (and (looking-at (concat re-start re)) type)))
+                       git-rebase-line-regexps)]
+       (git-rebase-action
+        :action-type    type
+        :action         (and-let ((action (match-str 1)))
+                          (or (cdr (assoc action git-rebase-short-options))
+                              action))
+        :action-options (match-str 2)
+        :target         (match-str 3)
+        :trailer        (match-str 5)
+        :comment-p      (and (match-str 99) t)))
+      ((not batch)
+       ;; Use empty object rather than nil to ease handling.
+       (git-rebase-action)))))
+
+(defun git-rebase-set-action (action)
+  "Set action of commit line to ACTION.
+If the region is active, operate on all lines that it touches.
+Otherwise, operate on the current line.  As a special case, an
+ACTION of nil comments or uncomments the rebase line, regardless
+of its action type."
+  (pcase (git-rebase-region-bounds t)
+    (`(,beg ,end)
+     (let ((end-marker (copy-marker end))
+           (pt-below-p (and mark-active (< (mark) (point)))))
+       (set-marker-insertion-type end-marker t)
+       (goto-char beg)
+       (while (< (point) end-marker)
+         (with-slots (action-type target trailer comment-p)
+             (git-rebase-current-line)
+           (cond
+             ((and action (eq action-type 'commit))
+              (let ((inhibit-read-only t))
+                (magit-delete-line)
+                (insert (concat action " " target " "))
+                (when (magit-git-version>= "2.50.0")
+                  (insert "# "))
+                (insert (concat trailer "\n"))))
+             ((and (not action) action-type)
+              (let ((inhibit-read-only t))
+                (if comment-p
+                    (delete-region beg (+ beg 2))
+                  (insert comment-start " ")))
+              (forward-line))
+             ;; In the case of --rebase-merges, commit lines may have
+             ;; other lines with other action types, empty lines, and
+             ;; "Branch" comments interspersed.  Move along.
+             ((forward-line)))))
+       (goto-char (cond (git-rebase-auto-advance end-marker)
+                        (pt-below-p (1- end-marker))
+                        (beg)))
+       (goto-char (line-beginning-position))))
+    (_ (ding))))
+
+(defun git-rebase-line-p (&optional pos)
+  (save-excursion
+    (when pos (goto-char pos))
+    (and (oref (git-rebase-current-line) action-type)
+         t)))
+
+(defun git-rebase-region-bounds (&optional fallback)
+  "Return region bounds if both ends touch rebase lines.
+Each bound is extended to include the entire line touched by the
+point or mark.  If the region isn't active and FALLBACK is
+non-nil, return the beginning and end of the current rebase line,
+if any."
+  (cond
+    ((use-region-p)
+     (let ((beg (magit--bol-position (region-beginning)))
+           (end (magit--eol-position (region-end))))
+       (and (git-rebase-line-p beg)
+            (git-rebase-line-p end)
+            (list beg (1+ end)))))
+    ((and fallback (git-rebase-line-p))
+     (list (line-beginning-position)
+           (1+ (line-end-position))))))
+
+(defun git-rebase-move-line-down (n)
+  "Move the current commit (or command) N lines down.
+If N is negative, move the commit up instead.  With an active
+region, move all the lines that the region touches, not just the
+current line."
+  (interactive "p")
+  (pcase-let* ((`(,beg ,end)
+                (or (git-rebase-region-bounds)
+                    (list (line-beginning-position)
+                          (1+ (line-end-position)))))
+               (pt-offset (- (point) beg))
+               (mark-offset (and mark-active (- (mark) beg))))
+    (save-restriction
+      (narrow-to-region
+       (point-min)
+       (1-
+        (if git-rebase-show-instructions
+            (save-excursion
+              (goto-char (point-min))
+              (while (or (git-rebase-line-p)
+                         ;; The output for --rebase-merges has empty
+                         ;; lines and "Branch" comments interspersed.
+                         (looking-at-p "^$")
+                         (looking-at-p (concat git-rebase-comment-re
+                                               " Branch")))
+                (forward-line))
+              (line-beginning-position))
+          (point-max))))
+      (if (or (and (< n 0) (= beg (point-min)))
+              (and (> n 0) (= end (point-max)))
+              (> end (point-max)))
+          (ding)
+        (goto-char (if (< n 0) beg end))
+        (forward-line n)
+        (atomic-change-group
+          (let ((inhibit-read-only t))
+            (insert (delete-and-extract-region beg end)))
+          (let ((new-beg (- (point) (- end beg))))
+            (when (use-region-p)
+              (setq deactivate-mark nil)
+              (set-mark (+ new-beg mark-offset)))
+            (goto-char (+ new-beg pt-offset))))))))
+
+(defun git-rebase-move-line-up (n)
+  "Move the current commit (or command) N lines up.
+If N is negative, move the commit down instead.  With an active
+region, move all the lines that the region touches, not just the
+current line."
+  (interactive "p")
+  (git-rebase-move-line-down (- n)))
+
+(defun git-rebase-highlight-region (start end window rol)
+  (let ((inhibit-read-only t)
+        (deactivate-mark nil)
+        (bounds (git-rebase-region-bounds)))
+    (mapc #'delete-overlay magit-section-highlight-overlays)
+    (when bounds
+      (magit-section-highlight-range (car bounds) (cadr bounds)
+                                     'magit-section-heading-selection))
+    (if (and bounds (not magit-section-keep-region-overlay))
+        (funcall (default-value 'redisplay-unhighlight-region-function) rol)
+      (funcall (default-value 'redisplay-highlight-region-function)
+               start end window rol))))
+
+(defun git-rebase-unhighlight-region (rol)
+  (mapc #'delete-overlay magit-section-highlight-overlays)
+  (funcall (default-value 'redisplay-unhighlight-region-function) rol))
+
+(defun git-rebase-kill-line ()
+  "Comment the current action line.
+If the action line is already commented, then uncomment it.
+If the region is active, act on all lines touched by the region."
+  (interactive)
+  (git-rebase-set-action nil))
+
+(defun git-rebase-insert (rev)
+  "Read an arbitrary commit and insert it below current line."
+  (interactive (list (magit-read-branch-or-commit "Insert revision")))
+  (forward-line)
+  (if-let ((info (magit-rev-format "%h %s" rev)))
+      (let ((inhibit-read-only t))
+        (insert "pick " info ?\n))
+    (user-error "Unknown revision")))
+
+(defun git-rebase-set-noncommit-action (action value-fn arg)
+  (goto-char (line-beginning-position))
+  (pcase-let* ((inhibit-read-only t)
+               (`(,initial ,trailer ,comment-p)
+                (and (not arg)
+                     (with-slots ((ln-action action)
+                                  target trailer comment-p)
+                         (git-rebase-current-line)
+                       (and (equal ln-action action)
+                            (list target trailer comment-p)))))
+               (value (funcall value-fn initial)))
+    (pcase (list value initial comment-p)
+      (`("" nil ,_)
+       (ding))
+      (`(""  ,_ ,_)
+       (magit-delete-line))
+      (_
+       (if initial
+           (magit-delete-line)
+         (forward-line))
+       (insert (concat action " " value
+                       (and (equal value initial)
+                            trailer
+                            (concat " " trailer))
+                       "\n"))
+       (unless git-rebase-auto-advance
+         (forward-line -1))))))
+
+(defun git-rebase-exec (arg)
+  "Insert a shell command to be run after the current commit.
+
+If there already is such a command on the current line, then edit
+that instead.  With a prefix argument insert a new command even
+when there already is one on the current line.  With empty input
+remove the command on the current line, if any."
+  (interactive "P")
+  (git-rebase-set-noncommit-action
+   "exec"
+   (lambda (initial) (read-shell-command "Execute: " initial))
+   arg))
+
+(defun git-rebase-label (arg)
+  "Add a label after the current commit.
+If there already is a label on the current line, then edit that
+instead.  With a prefix argument, insert a new label even when
+there is already a label on the current line.  With empty input,
+remove the label on the current line, if any."
+  (interactive "P")
+  (git-rebase-set-noncommit-action
+   "label"
+   (lambda (initial)
+     (read-from-minibuffer
+      "Label: " initial magit-minibuffer-local-ns-map))
+   arg))
+
+(defun git-rebase-buffer-labels ()
+  (let (labels)
+    (save-excursion
+      (goto-char (point-min))
+      (while (re-search-forward "^\\(?:l\\|label\\) \\([^ \n]+\\)" nil t)
+        (push (match-str 1) labels)))
+    (nreverse labels)))
+
+(defun git-rebase-reset (arg)
+  "Reset the current HEAD to a label.
+If there already is a reset command on the current line, then
+edit that instead.  With a prefix argument, insert a new reset
+line even when point is already on a reset line.  With empty
+input, remove the reset command on the current line, if any."
+  (interactive "P")
+  (git-rebase-set-noncommit-action
+   "reset"
+   (lambda (initial)
+     (or (magit-completing-read "Label" (git-rebase-buffer-labels)
+                                nil t initial)
+         ""))
+   arg))
+
+(defun git-rebase-update-ref (arg)
+  "Insert an update-ref action after the current line.
+If there is already an update-ref action on the current line,
+then edit that instead.  With a prefix argument, insert a new
+action even when there is already one on the current line.  With
+empty input, remove the action on the current line, if any."
+  (interactive "P")
+  (git-rebase-set-noncommit-action
+   "update-ref"
+   (lambda (initial)
+     (or (magit-completing-read "Ref" (magit-list-refs) nil nil initial)
+         ""))
+   arg))
+
+(defun git-rebase-merge (arg)
+  "Add a merge command after the current commit.
+If there is already a merge command on the current line, then
+replace that command instead.  With a prefix argument, insert a
+new merge command even when there is already one on the current
+line.  With empty input, remove the merge command on the current
+line, if any."
+  (interactive "P")
+  (git-rebase-set-noncommit-action
+   "merge"
+   (lambda (_)
+     (or (magit-completing-read "Merge" (git-rebase-buffer-labels))
+         ""))
+   arg))
+
+(defun git-rebase-merge-toggle-editmsg ()
+  "Toggle whether an editor is invoked when performing the merge at point.
+When a merge command uses a lower-case -c, the message for the
+specified commit will be opened in an editor before creating the
+commit.  For an upper-case -C, the message will be used as is."
+  (interactive)
+  (with-slots (action-type target action-options trailer)
+      (git-rebase-current-line)
+    (if (eq action-type 'merge)
+        (let ((inhibit-read-only t))
+          (magit-delete-line)
+          (insert
+           (format "merge %s %s %s\n"
+                   (replace-regexp-in-string
+                    "-[cC]" (##if (equal % "-c") "-C" "-c")
+                    action-options t t)
+                   target
+                   trailer)))
+      (ding))))
+
+(defun git-rebase-set-bare-action (action arg)
+  (goto-char (line-beginning-position))
+  (with-slots ((ln-action action) comment-p)
+      (git-rebase-current-line)
+    (let ((same-action-p (equal action ln-action))
+          (inhibit-read-only t))
+      (when (or arg
+                (not ln-action)
+                (not same-action-p)
+                (and same-action-p comment-p))
+        (unless (or arg (not same-action-p))
+          (magit-delete-line))
+        (insert action ?\n)
+        (unless git-rebase-auto-advance
+          (forward-line -1))))))
+
+(defun git-rebase-noop (&optional arg)
+  "Add noop action at point.
+
+If the current line already contains a noop action, leave it
+unchanged.  If there is a commented noop action present, remove
+the comment.  Otherwise add a new noop action.  With a prefix
+argument insert a new noop action regardless of what is already
+present on the current line.
+
+A noop action can be used to make git perform a rebase even if
+no commits are selected.  Without the noop action present, git
+would see an empty file and therefore do nothing."
+  (interactive "P")
+  (git-rebase-set-bare-action "noop" arg))
+
+(defun git-rebase-break (&optional arg)
+  "Add break action at point.
+
+If there is a commented break action present, remove the comment.
+If the current line already contains a break action, add another
+break action only if a prefix argument is given.
+
+A break action can be used to interrupt the rebase at the
+specified point.  It is particularly useful for pausing before
+the first commit in the sequence.  For other cases, the
+equivalent behavior can be achieved with `git-rebase-edit'."
+  (interactive "P")
+  (git-rebase-set-bare-action "break" arg))
+
+(defun git-rebase-undo (&optional arg)
+  "Undo some previous changes.
+Like `undo' but works in read-only buffers."
+  (interactive "P")
+  (let ((inhibit-read-only t))
+    (undo arg)))
+
+(defun git-rebase--show-commit (&optional scroll)
+  (let ((magit--disable-save-buffers t))
+    (save-excursion
+      (goto-char (line-beginning-position))
+      (if-let ((rev (with-slots (action-type target)
+                        (git-rebase-current-line)
+                      (and (eq action-type 'commit)
+                           target))))
+          (pcase scroll
+            ('up   (magit-diff-show-or-scroll-up))
+            ('down (magit-diff-show-or-scroll-down))
+            (_     (apply #'magit-show-commit rev
+                          (magit-diff-arguments 'magit-revision-mode))))
+        (ding)))))
+
+(defun git-rebase-show-commit ()
+  "Show the commit on the current line if any."
+  (interactive)
+  (git-rebase--show-commit))
+
+(defun git-rebase-show-or-scroll-up ()
+  "Update the commit buffer for commit on current line.
+
+Either show the commit at point in the appropriate buffer, or if
+that buffer is already being displayed in the current frame and
+contains information about that commit, then instead scroll the
+buffer up."
+  (interactive)
+  (git-rebase--show-commit 'up))
+
+(defun git-rebase-show-or-scroll-down ()
+  "Update the commit buffer for commit on current line.
+
+Either show the commit at point in the appropriate buffer, or if
+that buffer is already being displayed in the current frame and
+contains information about that commit, then instead scroll the
+buffer down."
+  (interactive)
+  (git-rebase--show-commit 'down))
+
+(defun git-rebase-backward-line (&optional n)
+  "Move N lines backward (forward if N is negative).
+Like `forward-line' but go into the opposite direction."
+  (interactive "p")
+  (forward-line (- (or n 1))))
+
+;;; Mode
+
+;;;###autoload
+(define-derived-mode git-rebase-mode special-mode "Git Rebase"
+  "Major mode for editing of a Git rebase file.
+
+Rebase files are generated when you run \"git rebase -i\" or run
+`magit-interactive-rebase'.  They describe how Git should perform
+the rebase.  See the documentation for git-rebase (e.g., by
+running \"man git-rebase\" at the command line) for details."
+  :interactive nil
+  :group 'git-rebase
+  (setq comment-start (or (magit-get "core.commentChar") "#"))
+  (setq git-rebase-comment-re (concat "^" (regexp-quote comment-start)))
+  (setq font-lock-defaults (list (git-rebase-mode-font-lock-keywords) t t))
+  (unless git-rebase-show-instructions
+    (let ((inhibit-read-only t))
+      (flush-lines git-rebase-comment-re)))
+  (unless with-editor-mode
+    ;; Maybe already enabled when using `shell-command' or an Emacs shell.
+    (with-editor-mode 1))
+  (when git-rebase-confirm-cancel
+    (add-hook 'with-editor-cancel-query-functions
+              #'git-rebase-cancel-confirm nil t))
+  (setq-local redisplay-highlight-region-function
+              #'git-rebase-highlight-region)
+  (setq-local redisplay-unhighlight-region-function
+              #'git-rebase-unhighlight-region)
+  (add-hook 'with-editor-pre-cancel-hook  #'git-rebase-autostash-save  nil t)
+  (add-hook 'with-editor-post-cancel-hook #'git-rebase-autostash-apply nil t)
+  (setq imenu-prev-index-position-function
+        #'magit-imenu--rebase-prev-index-position-function)
+  (setq imenu-extract-index-name-function
+        #'magit-imenu--rebase-extract-index-name-function)
+  (when (boundp 'save-place)
+    (setq save-place nil)))
+
+(defun git-rebase-cancel-confirm (force)
+  (or (not (buffer-modified-p))
+      force
+      (magit-confirm 'abort-rebase "Abort this rebase" nil 'noabort)))
+
+(defun git-rebase-autostash-save ()
+  (when-let ((rev (magit-file-line
+                   (expand-file-name "rebase-merge/autostash" (magit-gitdir)))))
+    (push (cons 'stash rev) with-editor-cancel-alist)))
+
+(defun git-rebase-autostash-apply ()
+  (when-let ((rev (cdr (assq 'stash with-editor-cancel-alist))))
+    (magit-stash-apply rev)))
+
+(defun git-rebase-match-comment-line (limit)
+  (re-search-forward (concat git-rebase-comment-re ".*") limit t))
+
+(defun git-rebase-mode-font-lock-keywords ()
+  "Font lock keywords for Git-Rebase mode."
+  `((,(concat "^" (cdr (assq 'commit git-rebase-line-regexps)))
+     (1 'git-rebase-action)
+     (3 'git-rebase-hash)
+     (4 'font-lock-comment-face nil t)
+     (5 'git-rebase-description nil t))
+    (,(concat "^" (cdr (assq 'exec git-rebase-line-regexps)))
+     (1 'git-rebase-action)
+     (3 'git-rebase-description))
+    (,(concat "^" (cdr (assq 'bare git-rebase-line-regexps)))
+     (1 'git-rebase-action))
+    (,(concat "^" (cdr (assq 'label git-rebase-line-regexps)))
+     (1 'git-rebase-action)
+     (3 'git-rebase-label)
+     (4 'font-lock-comment-face nil t)
+     (5 'git-rebase-description nil t))
+    (,(concat "^" (cdr (assq 'merge git-rebase-line-regexps)))
+     (1  'git-rebase-action)
+     (21 'git-rebase-action nil t)
+     (22 'git-rebase-hash t t)
+     (3  'magit-branch-local)
+     (4  'font-lock-comment-face nil t)
+     (5  'git-rebase-description nil t))
+    (,(format "^%s Branch \\(.*\\)" comment-start)
+     (1 'magit-branch-local t))
+    ("^drop \\(.+\\)"
+     (1 'git-rebase-killed-action t))
+    (,(concat git-rebase-comment-re " *"
+              (cdr (assq 'commit git-rebase-line-regexps)))
+     (0 'git-rebase-killed-action t))
+    (git-rebase-match-comment-line
+     (0 'font-lock-comment-face))
+    ("\\[[^[]*\\]"
+     (0 'magit-keyword t))
+    ("\\(?:fixup!\\|squash!\\|amend!\\)"
+     (0 'magit-keyword-squash t))
+    (,(format "^%s Rebase \\([^ ]*\\) onto \\([^ ]*\\)" comment-start)
+     (1 'git-rebase-comment-hash t)
+     (2 'git-rebase-comment-hash t))
+    (,(format "^%s \\(Commands:\\)" comment-start)
+     (1 'git-rebase-comment-heading t))))
+
+(defun git-rebase-mode-show-keybindings ()
+  "Modify the \"Commands:\" section of the comment Git generates.
+Modify that section to replace Git's one-letter command abbreviation,
+with the key bindings used in Magit.  By default, these are the same,
+except for the \"pick\" command."
+  (let ((inhibit-read-only t))
+    (save-excursion
+      (goto-char (point-min))
+      (when (and git-rebase-show-instructions
+                 (re-search-forward
+                  (concat git-rebase-comment-re "\\s-+p, pick")
+                  nil t))
+        (goto-char (line-beginning-position))
+        (git-rebase--insert-descriptions git-rebase-command-descriptions)
+        (let ((cmd nil)
+              (line (concat git-rebase-comment-re "\\(?:\\( \\.?     *\\)\\|"
+                            "\\( +\\)\\([^\n,],\\) \\([^\n ]+\\) \\)")))
+          (while (re-search-forward line nil t)
+            (if (match-str 1)
+                (if (assq cmd git-rebase-fixup-descriptions)
+                    (delete-line)
+                  (replace-match (make-string 10 ?\s) t t nil 1))
+              (setq cmd (intern (concat "git-rebase-" (match-str 4))))
+              (cond
+                ((not (fboundp cmd))
+                 (delete-line))
+                ((eq cmd 'git-rebase-fixup)
+                 (delete-line)
+                 (git-rebase--insert-descriptions git-rebase-fixup-descriptions))
+                (t
+                 (add-text-properties (line-beginning-position)
+                                      (1+ (line-end-position))
+                                      '(font-lock-face font-lock-comment-face))
+                 (replace-match " " t t nil 2)
+                 (replace-match
+                  (string-pad
+                   (save-match-data
+                     (substitute-command-keys (format "\\[%s]" cmd)))
+                   8)
+                  t t nil 3))))))))))
+
+(defun git-rebase--insert-descriptions (alist)
+  (pcase-dolist (`(,cmd . ,desc) alist)
+    (insert
+     (format (propertize "%s %s %s\n" 'font-lock-face 'font-lock-comment-face)
+             comment-start
+             (string-pad (substitute-command-keys (format "\\[%s]" cmd)) 8)
+             (string-replace "#" comment-start desc)))))
+
+(add-hook 'git-rebase-mode-hook #'git-rebase-mode-show-keybindings t)
+
+(defun git-rebase-mode-disable-before-save-hook ()
+  (setq-local before-save-hook nil))
+
+(add-hook 'git-rebase-mode-hook #'git-rebase-mode-disable-before-save-hook)
+
+;;;###autoload
+(defconst git-rebase-filename-regexp "/git-rebase-todo\\'")
+;;;###autoload
+(add-to-list 'auto-mode-alist
+             (cons git-rebase-filename-regexp #'git-rebase-mode))
+
+(add-to-list 'with-editor-server-window-alist
+             (cons git-rebase-filename-regexp #'switch-to-buffer))
+
+(with-eval-after-load 'recentf
+  (add-to-list 'recentf-exclude git-rebase-filename-regexp))
+
+(add-to-list 'with-editor-file-name-history-exclude git-rebase-filename-regexp)
+
+;;; Imenu Support
+
+(defun magit-imenu--rebase-prev-index-position-function ()
+  "Move point to previous commit in git-rebase buffer.
+Used as a value for `imenu-prev-index-position-function'."
+  (catch 'found
+    (while (not (bobp))
+      (git-rebase-backward-line)
+      (when (git-rebase-line-p)
+        (throw 'found t)))))
+
+(defun magit-imenu--rebase-extract-index-name-function ()
+  "Return imenu name for line at point.
+Point should be at the beginning of the line.  This function
+is used as a value for `imenu-extract-index-name-function'."
+  (buffer-substring-no-properties (line-beginning-position)
+                                  (line-end-position)))
+
+;;; _
+(provide 'git-rebase)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; git-rebase.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/git-rebase.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/git-rebase.elc
new file mode 100644
index 0000000..16f9b3c
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/git-rebase.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/githooks/config b/emacs/.emacs.d/elpa/magit-20260822.1158/githooks/config
new file mode 100644
index 0000000..cc44e82
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/githooks/config
@@ -0,0 +1,6 @@
+# -*- mode: gitconfig -*-
+[hook "magit-common-post-commit"]
+        event = post-commit
+        event = post-merge
+        event = post-rewrite
+        command = magit-run-git-hook magit-common-git-post-commit-functions
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/githooks/magit-run-git-hook b/emacs/.emacs.d/elpa/magit-20260822.1158/githooks/magit-run-git-hook
new file mode 100755
index 0000000..0d6dfd1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/githooks/magit-run-git-hook
@@ -0,0 +1,8 @@
+#!/usr/bin/env bash
+if [ -n "$MAGIT_HOOK_EDITOR" ]
+then
+    for arg in "$@"; do args+="\"$arg\""; done
+    $MAGIT_HOOK_EDITOR --eval "(magit-run-git-hook ${args[@]})"
+else
+    true
+fi
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-apply.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-apply.el
new file mode 100644
index 0000000..9dd94d6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-apply.el
@@ -0,0 +1,865 @@
+;;; magit-apply.el --- Apply Git diffs  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements commands for applying Git diffs or parts
+;; of such a diff.  The supported "apply variants" are apply, stage,
+;; unstage, discard, and reverse - more than Git itself knows about,
+;; at least at the porcelain level.
+
+;;; Code:
+
+(require 'magit-core)
+(require 'magit-diff)
+(require 'magit-wip)
+
+(require 'dired)
+(require 'transient) ; See #3732.
+
+;; For `magit-apply'
+(declare-function magit-am "magit-sequence" () t)
+(declare-function magit-patch-apply "magit-patch" () t)
+;; For `magit-discard-files'
+(declare-function magit-checkout-stage "magit-merge" (file arg))
+(declare-function magit-checkout-read-stage "magit-merge" (file))
+(defvar auto-revert-verbose)
+;; For `magit-stage-untracked'
+(declare-function magit-submodule-add-1 "magit-submodule"
+                  (url &optional path name args))
+(declare-function magit-submodule-read-name-for-path "magit-submodule"
+                  (path &optional prefer-short))
+(defvar borg-user-emacs-directory)
+
+;;; Options
+
+(defcustom magit-delete-by-moving-to-trash t
+  "Whether Magit uses the system's trash can.
+
+You should absolutely not disable this and also remove `discard'
+from `magit-no-confirm'.  You shouldn't do that even if you have
+all of the Magit-Wip modes enabled, because those modes do not
+track any files that are not tracked in the proper branch."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-essentials
+  :type 'boolean)
+
+(defcustom magit-unstage-committed t
+  "Whether unstaging a committed change reverts it instead.
+
+A committed change cannot be unstaged, because staging and
+unstaging are actions that are concerned with the differences
+between the index and the working tree, not with committed
+changes.
+
+If this option is non-nil (the default), then typing \"u\"
+\(`magit-unstage') on a committed change, causes it to be
+reversed in the index but not the working tree.  For more
+information see command `magit-reverse-in-index'."
+  :package-version '(magit . "2.4.1")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defcustom magit-reverse-atomically nil
+  "Whether to reverse changes atomically.
+
+If some changes can be reversed while others cannot, then nothing
+is reversed if the value of this option is non-nil.  But when it
+is nil, then the changes that can be reversed are reversed and
+for the other changes diff files are created that contain the
+rejected reversals."
+  :package-version '(magit . "2.7.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defcustom magit-post-stage-hook nil
+  "Hook run after staging changes.
+This hook is run by `magit-refresh' if `this-command'
+is a member of `magit-post-stage-hook-commands'."
+  :package-version '(magit . "2.90.0")
+  :group 'magit-commands
+  :type 'hook)
+
+(defcustom magit-post-unstage-hook nil
+  "Hook run after unstaging changes.
+This hook is run by `magit-refresh' if `this-command'
+is a member of `magit-post-unstage-hook-commands'."
+  :package-version '(magit . "2.90.0")
+  :group 'magit-commands
+  :type 'hook)
+
+;;; Commands
+;;;; Apply
+
+(defun magit-apply (&rest args)
+  "Apply the change at point to the working tree.
+With a prefix argument fallback to a 3-way merge.  Doing
+so causes the change to be applied to the index as well."
+  (interactive (and current-prefix-arg (list "--3way")))
+  (when$ (magit-apply--get-selection)
+    (pcase (list (magit-diff-type) (magit-diff-scope))
+      (`(,(or 'unstaged 'staged) ,_)
+       (user-error "Change is already in the working tree"))
+      (`(untracked ,(or 'file 'files))
+       (call-interactively #'magit-am))
+      (`(rebase-sequence file)
+       (call-interactively #'magit-patch-apply))
+      (`(,_ region) (magit-apply-region $ args))
+      (`(,_   hunk) (magit-apply-hunk   $ args))
+      (`(,_  hunks) (magit-apply-hunks  $ args))
+      (`(,_   file) (magit-apply-diff   $ args))
+      (`(,_  files) (magit-apply-diffs  $ args)))))
+
+(defun magit-apply--section-content (section)
+  (buffer-substring-no-properties (if (magit-hunk-section-p section)
+                                      (oref section start)
+                                    (oref section content))
+                                  (oref section end)))
+
+(defun magit-apply-diffs (sections &rest args)
+  (setq sections (magit-apply--get-diffs sections))
+  (magit-apply-patch sections args
+                     (mapconcat (##concat (magit-diff-file-header %)
+                                          (magit-apply--section-content %))
+                                sections "")))
+
+(defun magit-apply-diff (section &rest args)
+  (setq section (car (magit-apply--get-diffs (list section))))
+  (magit-apply-patch section args
+                     (concat (magit-diff-file-header section)
+                             (magit-apply--section-content section))))
+
+(defun magit-apply--adjust-hunk-new-starts (hunks)
+  "Adjust new line numbers in headers of HUNKS for partial application.
+HUNKS should be a list of ordered, contiguous hunks to be applied
+from a file.  For example, if there is a sequence of hunks with
+the headers
+
+  @@ -2,6 +2,7 @@
+  @@ -10,6 +11,7 @@
+  @@ -18,6 +20,7 @@
+
+and only the second and third are to be applied, they would be
+adjusted as \"@@ -10,6 +10,7 @@\" and \"@@ -18,6 +19,7 @@\"."
+  (let* ((first-hunk (car hunks))
+         (offset (if (string-match diff-hunk-header-re-unified first-hunk)
+                     (- (string-to-number (match-str 3 first-hunk))
+                        (string-to-number (match-str 1 first-hunk)))
+                   (error "Header hunks have to be applied individually"))))
+    (if (= offset 0)
+        hunks
+      (mapcar (lambda (hunk)
+                (if (string-match diff-hunk-header-re-unified hunk)
+                    (replace-match (number-to-string
+                                    (- (string-to-number (match-str 3 hunk))
+                                       offset))
+                                   t t hunk 3)
+                  (error "Hunk does not have expected header")))
+              hunks))))
+
+(defun magit-apply--adjust-hunk-new-start (hunk)
+  (car (magit-apply--adjust-hunk-new-starts (list hunk))))
+
+(defun magit-apply-hunks (hunks &rest args)
+  (let ((file (oref (car hunks) parent)))
+    (when (magit-diff--combined-p file)
+      (user-error "Cannot un-/stage resolution hunks.  Stage the whole file"))
+    (magit-apply-patch
+     file args
+     (concat (oref file header)
+             (string-join (magit-apply--adjust-hunk-new-starts
+                           (mapcar #'magit-apply--section-content hunks)))))))
+
+(defun magit-apply-hunk (hunk &rest args)
+  (let ((file (oref hunk parent)))
+    (when (magit-diff--combined-p file)
+      (user-error "Cannot un-/stage resolution hunks.  Stage the whole file"))
+    (let* ((header (car (oref hunk value)))
+           (header (and (symbolp header) header))
+           (content (magit-apply--section-content hunk)))
+      (magit-apply-patch
+       file args
+       (concat (magit-diff-file-header hunk (not (eq header 'rename)))
+               (if header
+                   content
+                 (magit-apply--adjust-hunk-new-start content)))))))
+
+(defun magit-apply-region (hunk &rest args)
+  (let ((file (oref hunk parent)))
+    (when (magit-diff--combined-p file)
+      (user-error "Cannot un-/stage resolution hunks.  Stage the whole file"))
+    (magit-apply-patch
+     file args
+     (concat (magit-diff-file-header hunk)
+             (magit-apply--adjust-hunk-new-start
+              (magit-diff-hunk-region-patch hunk args))))))
+
+(defun magit-apply-patch (section:s args patch)
+  (let* ((files (if (atom section:s)
+                    (list (oref section:s value))
+                  (mapcar (##oref % value) section:s)))
+         (command (symbol-name this-command))
+         (command (if (and command (string-match "^magit-\\([^-]+\\)" command))
+                      (match-str 1 command)
+                    "apply"))
+         (context (magit-diff-get-context))
+         (ignore-context (magit-diff-ignore-any-space-p)))
+    (unless (magit-diff-context-p)
+      (user-error "Not enough context to apply patch.  Increase the context"))
+    (unless magit-inhibit-refresh
+      (magit-run-before-change-functions files command))
+    (if (eq this-command 'magit-copy-diff-as-kill)
+        (kill-new patch)
+      (with-temp-buffer
+        (insert patch)
+        (let ((magit-inhibit-refresh t))
+          (magit-run-git-with-input
+           "apply" args "-p0"
+           (if ignore-context "-C0" (format "-C%s" context))
+           "--ignore-space-change" "-")))
+      (unless magit-inhibit-refresh
+        (magit-run-after-apply-functions files command)
+        (magit-refresh)))))
+
+(defun magit-apply--get-selection (&optional noerror)
+  (or (magit-region-sections '(hunk file module) t)
+      (let ((section (magit-current-section)))
+        (pcase (oref section type)
+          ((or 'hunk 'file 'module) section)
+          ((or 'staged 'unstaged
+               'stashed-index 'stashed-worktree 'stashed-untracked)
+           (oref section children))
+          ('untracked t)
+          ((guard noerror) nil)
+          (_ (user-error "Cannot apply this, it's not a change"))))))
+
+(defun magit-apply--get-diffs (sections)
+  (magit-section-case
+    ([file diffstat]
+     (mapcar (lambda (section)
+               (or (magit-get-section
+                    (append `((file . ,(oref section value)))
+                            (magit-section-ident magit-root-section)))
+                   (error "Cannot get required diff headers")))
+             sections))
+    (t sections)))
+
+(defun magit-apply--ignore-whitespace-p (selection type scope)
+  "Return t if it is necessary and possible to ignore whitespace.
+It is necessary to do so when the diff ignores whitespace changes
+and whole files are being applied.  It is possible when no binary
+files are involved.  If it is both necessary and impossible, then
+return nil, possibly causing whitespace changes to be applied."
+  (and (memq type  '(unstaged staged))
+       (memq scope '(file files list))
+       (cl-find-if (lambda (arg)
+                     (member arg '("--ignore-space-at-eol"
+                                   "--ignore-space-change"
+                                   "--ignore-all-space"
+                                   "--ignore-blank-lines")))
+                   magit-buffer-diff-args)
+       (not (cl-find-if (##oref % binary)
+                        (ensure-list selection)))))
+
+;;;; Stage
+
+(defun magit-stage (&optional intent)
+  "Add the change at point to the staging area.
+With a prefix argument, INTENT, and an untracked file (or files)
+at point, stage the file but not its content."
+  (interactive "P")
+  (if-let ((s (and (derived-mode-p 'magit-mode)
+                   (magit-apply--get-selection)))
+           (type (magit-diff-type))
+           (scope (magit-diff-scope)))
+      (pcase (list type scope
+                   (magit-apply--ignore-whitespace-p s type scope))
+        (`(untracked     ,_  ,_) (magit-stage-untracked intent))
+        (`(unstaged  region  ,_) (magit-apply-region s "--cached"))
+        (`(unstaged    hunk  ,_) (magit-apply-hunk   s "--cached"))
+        (`(unstaged   hunks  ,_) (magit-apply-hunks  s "--cached"))
+        ('(unstaged    file   t) (magit-apply-diff   s "--cached"))
+        ('(unstaged   files   t) (magit-apply-diffs  s "--cached"))
+        ('(unstaged    list   t) (magit-apply-diffs  s "--cached"))
+        ('(unstaged    file nil) (magit-stage-1 "-u" (list (oref s value))))
+        ('(unstaged   files nil) (magit-stage-1 "-u" (magit-region-values nil t)))
+        ('(unstaged    list nil) (magit-stage-modified))
+        (`(staged        ,_  ,_) (user-error "Already staged"))
+        (`(committed     ,_  ,_) (user-error "Cannot stage committed changes"))
+        (`(undefined     ,_  ,_) (user-error "Cannot stage this change")))
+    (call-interactively #'magit-stage-files)))
+
+;;;###autoload
+(defun magit-stage-files (files &optional force)
+  "Read one or more files and stage all changes in those files.
+With prefix argument FORCE, offer ignored files for completion."
+  (interactive
+    (let* ((choices (if current-prefix-arg
+                        (magit-ignored-files)
+                      (nconc (magit-unstaged-files)
+                             (magit-untracked-files))))
+           (default (or (magit-section-value-if 'file)
+                        (magit-file-relative-name)))
+           (default (car (member default choices))))
+      (list (magit-completing-read-multiple
+             (if current-prefix-arg "Stage ignored file,s: " "Stage file,s: ")
+             choices nil t nil nil default)
+            current-prefix-arg)))
+  (magit-with-toplevel
+    (magit-stage-1 (and force "--force") files)))
+
+;;;###autoload
+(defun magit-stage-modified (&optional all)
+  "Stage all changes to files modified in the worktree.
+Stage all new content of tracked files and remove tracked files
+that no longer exist in the working tree from the index also.
+With a prefix argument also stage previously untracked (but not
+ignored) files."
+  (interactive "P")
+  (when (magit-anything-staged-p)
+    (magit-confirm 'stage-all-changes))
+  (magit-with-toplevel
+    (magit-stage-1 (if all "--all" "-u") magit-buffer-diff-files)))
+
+(defun magit-stage-1 (arg &optional files)
+  (magit-run-before-change-functions files "stage")
+  (magit-run-git "add" arg (if files (cons "--" files) "."))
+  (when magit-auto-revert-mode
+    (mapc #'magit-turn-on-auto-revert-mode-if-desired files))
+  (magit-run-after-apply-functions files "stage"))
+
+(defun magit-stage-untracked (&optional intent)
+  (let* ((section (magit-current-section))
+         (files (pcase (magit-diff-scope)
+                  ('file  (list (oref section value)))
+                  ('files (magit-region-values nil t))
+                  ('list  (magit-untracked-files))))
+         plain repos)
+    (dolist (file files)
+      (if (and (not (file-symlink-p file))
+               (magit-git-repo-p file t))
+          (push file repos)
+        (push file plain)))
+    (magit-run-before-change-functions files "stage")
+    (when plain
+      (magit-run-git "add" (and intent "--intent-to-add")
+                     "--" plain)
+      (when magit-auto-revert-mode
+        (mapc #'magit-turn-on-auto-revert-mode-if-desired plain)))
+    (dolist (repo repos)
+      (save-excursion
+        (when-let ((section (magit-get-section
+                             `((file . ,repo) (untracked) (status)))))
+          (goto-char (oref section start))
+          (let* ((topdir (magit-toplevel))
+                 (url (let ((default-directory
+                             (file-name-as-directory (expand-file-name repo))))
+                        (or (magit-get "remote" (magit-get-some-remote) "url")
+                            (file-name-concat "." repo))))
+                 (package
+                  (and (equal borg-user-emacs-directory topdir)
+                       (file-name-nondirectory (directory-file-name repo)))))
+            (if (and package
+                     (fboundp 'borg-assimilate)
+                     (y-or-n-p (format "Also assimilate `%s' drone?" package)))
+                (borg-assimilate package url)
+              (magit-submodule-add-1
+               url repo (magit-submodule-read-name-for-path repo package))
+              (when (and package
+                         (fboundp 'borg--sort-submodule-sections)
+                         (fboundp 'borg--maybe-absorb-gitdir))
+                (borg--sort-submodule-sections
+                 (expand-file-name ".gitmodules" topdir))
+                (let ((default-directory borg-user-emacs-directory))
+                  (borg--maybe-absorb-gitdir package))))))))
+    (magit-run-after-apply-functions files "stage")))
+
+(defvar magit-post-stage-hook-commands
+  (list #'magit-stage
+        #'magit-stage-files
+        #'magit-stage-modified
+        'magit-file-stage))
+
+;;;###autoload
+(defun magit-run-post-stage-hook ()
+  (when (memq this-command magit-post-stage-hook-commands)
+    (magit-run-hook-with-benchmark 'magit-post-stage-hook)))
+
+;;;; Unstage
+
+(defun magit-unstage ()
+  "Remove the change at point from the staging area."
+  (interactive)
+  (when-let ((s (magit-apply--get-selection))
+             (type (magit-diff-type))
+             (scope (magit-diff-scope)))
+    (pcase (list type scope
+                 (magit-apply--ignore-whitespace-p s type scope))
+      (`(untracked     ,_  ,_) (user-error "Cannot unstage untracked changes"))
+      (`(unstaged    file  ,_) (magit-unstage-intent (list (oref s value))))
+      (`(unstaged   files  ,_) (magit-unstage-intent (magit-region-values nil t)))
+      (`(unstaged      ,_  ,_) (user-error "Already unstaged"))
+      (`(staged    region  ,_) (magit-apply-region s "--reverse" "--cached"))
+      (`(staged      hunk  ,_) (magit-apply-hunk   s "--reverse" "--cached"))
+      (`(staged     hunks  ,_) (magit-apply-hunks  s "--reverse" "--cached"))
+      ('(staged      file   t) (magit-apply-diff   s "--reverse" "--cached"))
+      ('(staged     files   t) (magit-apply-diffs  s "--reverse" "--cached"))
+      ('(staged      list   t) (magit-apply-diffs  s "--reverse" "--cached"))
+      ('(staged      file nil) (magit-unstage-1 (list (oref s value))))
+      ('(staged     files nil) (magit-unstage-1 (magit-region-values nil t)))
+      ('(staged      list nil) (magit-unstage-all))
+      (`(committed     ,_  ,_) (if magit-unstage-committed
+                                   (magit-reverse-in-index)
+                                 (user-error "Cannot unstage committed changes")))
+      (`(undefined     ,_  ,_) (user-error "Cannot unstage this change")))))
+
+;;;###autoload
+(defun magit-unstage-files (files)
+  "Read one or more files and unstage all changes to those files."
+  (interactive
+    (let* ((choices (magit-staged-files))
+           (default (or (magit-section-value-if 'file)
+                        (magit-file-relative-name)))
+           (default (car (member default choices))))
+      (list (magit-completing-read-multiple "Unstage file,s: " choices
+                                            nil t nil nil default))))
+  (magit-with-toplevel
+    (magit-unstage-1 files)))
+
+(defun magit-unstage-1 (files)
+  (magit-run-before-change-functions files "unstage")
+  (if (magit-no-commit-p)
+      (magit-run-git "rm" "--cached" "--" files)
+    (magit-run-git "reset" "HEAD" "--" files))
+  (magit-run-after-apply-functions files "unstage"))
+
+(defun magit-unstage-intent (files)
+  (if-let* ((staged (magit-staged-files))
+            (intent (seq-filter (##member % staged) files)))
+      (magit-unstage-1 intent)
+    (user-error "Already unstaged")))
+
+;;;###autoload
+(defun magit-unstage-all ()
+  "Remove all changes from the staging area."
+  (interactive)
+  (unless (magit-anything-staged-p)
+    (user-error "Nothing to unstage"))
+  (when (or (magit-anything-unstaged-p)
+            (magit-untracked-files))
+    (magit-confirm 'unstage-all-changes))
+  (magit-run-before-change-functions nil "unstage")
+  (magit-run-git "reset" "HEAD" "--" magit-buffer-diff-files)
+  (magit-run-after-apply-functions nil "unstage"))
+
+(defvar magit-post-unstage-hook-commands
+  (list #'magit-unstage
+        #'magit-unstage-files
+        #'magit-unstage-all
+        'magit-file-unstage))
+
+;;;###autoload
+(defun magit-run-post-unstage-hook ()
+  (when (memq this-command magit-post-unstage-hook-commands)
+    (magit-run-hook-with-benchmark 'magit-post-unstage-hook)))
+
+;;;; Discard
+
+(defun magit-discard ()
+  "Remove the change at point.
+
+On a hunk or file with unresolved conflicts prompt which side to
+keep (while discarding the other).  If point is within the text
+of a side, then keep that side without prompting."
+  (interactive)
+  (when$ (magit-apply--get-selection)
+    (pcase (list (magit-diff-type) (magit-diff-scope))
+      (`(committed   ,_) (user-error "Cannot discard committed changes"))
+      (`(undefined   ,_) (user-error "Cannot discard this change"))
+      (`(untracked list) (magit-discard-untracked))
+      (`(,_      region) (magit-discard-region $))
+      (`(,_        hunk) (magit-discard-hunk   $))
+      (`(,_       hunks) (magit-discard-hunks  $))
+      (`(,_        file) (magit-discard-file   $))
+      (`(,_       files) (magit-discard-files  $))
+      (`(,_        list) (magit-discard-files  $)))))
+
+(defun magit-discard-untracked ()
+  (magit-discard-files--delete
+   (magit-with-toplevel (magit-list-untracked-files))
+   nil)
+  (magit-refresh))
+
+(defun magit-discard-region (section)
+  (magit-confirm 'discard "Discard region")
+  (magit-discard-apply section 'magit-apply-region))
+
+(defun magit-discard-hunk (section)
+  (magit-confirm 'discard "Discard hunk")
+  (let ((file (magit-section-parent-value section)))
+    (pcase (cddr (car (magit-file-status file)))
+      ('(?U ?U) (magit-smerge-keep-current))
+      (_ (magit-discard-apply section #'magit-apply-hunk)))))
+
+(defun magit-discard-hunks (sections)
+  (magit-confirm 'discard
+    (list "Discard %d hunks from %s"
+          (length sections)
+          (magit-section-parent-value (car sections))))
+  (magit-discard-apply sections #'magit-apply-hunks))
+
+(defun magit-discard-apply (section:s apply)
+  (let ((primus (if (atom section:s) section:s (car section:s))))
+    (cond ((eq (magit-diff-type primus) 'unstaged)
+           (funcall apply section:s "--reverse"))
+          ((magit-anything-unstaged-p
+            nil (if (magit-file-section-p primus)
+                    (oref primus value)
+                  (magit-section-parent-value primus)))
+           (let ((magit-inhibit-refresh t))
+             (funcall apply section:s "--reverse" "--cached")
+             (funcall apply section:s "--reverse" "--reject"))
+           (magit-refresh))
+          ((funcall apply section:s "--reverse" "--index")))))
+
+(defun magit-discard-file (section)
+  (magit-discard-files (list section)))
+
+(defun magit-discard-files (sections)
+  (let ((auto-revert-verbose nil)
+        (type (magit-diff-type (car sections)))
+        (status (magit-file-status))
+        files delete resurrect rename discard discard-new resolve)
+    (dolist (section sections)
+      (let ((file (oref section value)))
+        (push file files)
+        (pcase (cons (pcase type
+                       (`staged ?X)
+                       (`unstaged ?Y)
+                       (`untracked ?Z))
+                     (cddr (assoc file status)))
+          ('(?Z) (dolist (f (magit-untracked-files nil file))
+                   (push f delete)))
+          ((or '(?Z ?? ??) '(?Z ?! ?!)) (push file delete))
+          ('(?Z ?D ? )                  (push file delete))
+          (`(,_ ?D ?D)                  (push file resolve))
+          ((or `(,_ ?U ,_) `(,_ ,_ ?U)) (push file resolve))
+          (`(,_ ?A ?A)                  (push file resolve))
+          (`(?X ?M ,(or ?  ?M ?D)) (push section discard))
+          (`(?Y ,_         ?M    ) (push section discard))
+          ('(?X ?A         ?M    ) (push file discard-new))
+          ('(?X ?C         ?M    ) (push file discard-new))
+          (`(?X ?A ,(or ?     ?D)) (push file delete))
+          (`(?X ?C ,(or ?     ?D)) (push file delete))
+          (`(?X ?D ,(or ?  ?M   )) (push file resurrect))
+          (`(?Y ,_            ?D ) (push file resurrect))
+          (`(?X ?R ,(or ?  ?M ?D)) (push file rename)))))
+    (unwind-protect
+        (let ((magit-inhibit-refresh t))
+          (magit-run-before-change-functions files "discard")
+          (when resolve
+            (magit-discard-files--resolve (nreverse resolve)))
+          (when resurrect
+            (magit-discard-files--resurrect (nreverse resurrect)))
+          (when delete
+            (magit-discard-files--delete (nreverse delete) status))
+          (when rename
+            (magit-discard-files--rename (nreverse rename) status))
+          (when (or discard discard-new)
+            (magit-discard-files--discard (nreverse discard)
+                                          (nreverse discard-new)))
+          (magit-run-after-apply-functions files "discard"))
+      (magit-refresh))))
+
+(defun magit-discard-files--resolve (files)
+  (if-let ((arg (and (cdr files)
+                     (magit-read-char-case
+                         (format "For these %d files\n%s\ncheckout:\n"
+                                 (length files)
+                                 (mapconcat (##concat "  " %) files "\n"))
+                         t
+                       (?o "[o]ur stage"   "--ours")
+                       (?t "[t]heir stage" "--theirs")
+                       (?c "[c]onflict"    "--merge")
+                       (?i "decide [i]ndividually" nil)))))
+      (dolist (file files)
+        (magit-checkout-stage file arg))
+    (dolist (file files)
+      (magit-checkout-stage file (magit-checkout-read-stage file)))))
+
+(defun magit-discard-files--resurrect (files)
+  (magit-confirm-files 'resurrect files)
+  (if (eq (magit-diff-type) 'staged)
+      (magit-call-git "reset"  "--" files)
+    (magit-call-git "checkout" "--" files)))
+
+(defun magit-discard-files--delete (files status)
+  (magit-confirm-files (if magit-delete-by-moving-to-trash 'trash 'delete)
+                       files)
+  (let ((delete-by-moving-to-trash magit-delete-by-moving-to-trash))
+    (dolist (file files)
+      (when (string-match-p "\\`\\\\?~" file)
+        (error "Refusing to delete %S, too dangerous" file))
+      (pcase (nth 3 (assoc file status))
+        ((guard (memq (magit-diff-type) '(unstaged untracked)))
+         (dired-delete-file file dired-recursive-deletes
+                            magit-delete-by-moving-to-trash)
+         (dired-clean-up-after-deletion file))
+        (?\s (delete-file file t)
+             (magit-call-git "rm" "--cached" "--" file))
+        (?M  (let ((temp (magit-git-string "checkout-index" "--temp" file)))
+               (string-match
+                (format "\\(.+?\\)\t%s" (regexp-quote file)) temp)
+               (rename-file (match-str 1 temp)
+                            (setq temp (concat file ".~{index}~")))
+               (delete-file temp t))
+             (magit-call-git "rm" "--cached" "--force" "--" file))
+        (?D  (magit-call-git "checkout" "--" file)
+             (delete-file file t)
+             (magit-call-git "rm" "--cached" "--force" "--" file))))))
+
+(defun magit-discard-files--rename (files status)
+  (magit-confirm 'rename "Undo rename %s" "Undo %d renames" nil
+    (mapcar (lambda (file)
+              (setq file (assoc file status))
+              (format "%s -> %s" (cadr file) (car file)))
+            files))
+  (dolist (file files)
+    (let ((orig (cadr (assoc file status))))
+      (cond ((file-exists-p file)
+             (when$ (file-name-directory orig)
+               (make-directory $ t))
+             (magit-call-git "mv" file orig))
+            (t
+             (magit-call-git "rm" "--cached" "--" file)
+             (magit-call-git "reset" "--" orig))))))
+
+(defun magit-discard-files--discard (sections new-files)
+  (let ((files (mapcar (##oref % value) sections)))
+    (magit-confirm-files 'discard (append files new-files)
+                         (format "Discard %s changes in" (magit-diff-type)))
+    (if (eq (magit-diff-type (car sections)) 'unstaged)
+        (magit-call-git "checkout" "--" files)
+      (when new-files
+        (magit-call-git "add"   "--" new-files)
+        (magit-call-git "reset" "--" new-files))
+      (let ((binaries (magit-binary-files "--cached")))
+        (when binaries
+          (setq sections
+                (seq-remove (##member (oref % value) binaries)
+                            sections)))
+        (when sections
+          (magit-discard-apply sections #'magit-apply-diffs))
+        (when binaries
+          (let ((modified (magit-unstaged-files t)))
+            (setq binaries (magit--separate (##member % modified) binaries)))
+          (when (cadr binaries)
+            (magit-call-git "reset" "--" (cadr binaries)))
+          (when (car binaries)
+            (user-error
+             (concat
+              "Cannot discard staged changes to binary files, "
+              "which also have unstaged changes.  Unstage instead."))))))))
+
+;;;; Reverse
+
+(defun magit-reverse (&rest args)
+  "Reverse the change at point in the working tree.
+With a prefix argument fallback to a 3-way merge.  Doing
+so causes the change to be applied to the index as well."
+  (interactive (and current-prefix-arg (list "--3way")))
+  (when$ (magit-apply--get-selection)
+    (pcase (list (magit-diff-type) (magit-diff-scope))
+      (`(untracked ,_) (user-error "Cannot reverse untracked changes"))
+      (`(unstaged  ,_) (user-error "Cannot reverse unstaged changes"))
+      (`(,_    region) (magit-reverse-region $ args))
+      (`(,_      hunk) (magit-reverse-hunk   $ args))
+      (`(,_     hunks) (magit-reverse-hunks  $ args))
+      (`(,_      file) (magit-reverse-file   $ args))
+      (`(,_     files) (magit-reverse-files  $ args))
+      (`(,_      list) (magit-reverse-files  $ args)))))
+
+(defun magit-reverse-region (section args)
+  (magit-confirm 'reverse "Reverse region")
+  (magit-reverse-apply section #'magit-apply-region args))
+
+(defun magit-reverse-hunk (section args)
+  (magit-confirm 'reverse "Reverse hunk")
+  (magit-reverse-apply section #'magit-apply-hunk args))
+
+(defun magit-reverse-hunks (sections args)
+  (magit-confirm 'reverse
+    (list "Reverse %d hunks from %s"
+          (length sections)
+          (magit-section-parent-value (car sections))))
+  (magit-reverse-apply sections #'magit-apply-hunks args))
+
+(defun magit-reverse-file (section args)
+  (magit-reverse-files (list section) args))
+
+(defun magit-reverse-files (sections args)
+  (pcase-let ((`(,binaries ,sections)
+               (let ((bs (magit-binary-files
+                          (cond ((derived-mode-p 'magit-revision-mode)
+                                 magit-buffer-diff-range)
+                                ((derived-mode-p 'magit-diff-mode)
+                                 magit-buffer-diff-range)
+                                ("--cached")))))
+                 (magit--separate (##member (oref % value) bs)
+                                  sections))))
+    (magit-confirm-files 'reverse (mapcar (##oref % value) sections))
+    (cond ((length= sections 1)
+           (magit-reverse-apply (car sections) #'magit-apply-diff args))
+          (sections
+           (magit-reverse-apply sections #'magit-apply-diffs args)))
+    (when binaries
+      (user-error "Cannot reverse binary files"))))
+
+(defun magit-reverse-apply (section:s apply args)
+  (funcall apply section:s "--reverse" args
+           (and (not magit-reverse-atomically)
+                (not (member "--3way" args))
+                "--reject")))
+
+(defun magit-reverse-in-index (&rest args)
+  "Reverse the change at point in the index but not the working tree.
+
+Use this command to extract a change from `HEAD', while leaving
+it in the working tree, so that it can later be committed using
+a separate commit.  A typical workflow would be:
+
+0. Optionally make sure that there are no uncommitted changes.
+1. Visit the `HEAD' commit and navigate to the change that should
+   not have been included in that commit.
+2. Type \"u\" (`magit-unstage') to reverse it in the index.
+   This assumes that `magit-unstage-committed' is non-nil.
+3. Type \"c e\" to extend `HEAD' with the staged changes,
+   including those that were already staged before.
+4. Optionally stage the remaining changes using \"s\" or \"S\"
+   and then type \"c c\" to create a new commit."
+  (interactive)
+  (magit-reverse (cons "--cached" args)))
+
+;;;; Copy
+
+(defun magit-copy-diff-as-kill ()
+  "Save the diff at point to the kill ring.
+This command can be used on staged and unstaged changes, and anywhere
+`magit-apply' can be used.  Additionally, if there is no diff at point
+but `magit-buffer-revision' is non-nil, or there is a commit at point,
+the diff for that commit is saved."
+  (interactive)
+  (cond-let
+    ([$ (magit-apply--get-selection t)]
+     (pcase (list (magit-diff-type) (magit-diff-scope))
+       (`(untracked ,(or 'file 'files))
+        (user-error "Cannot copy this as a diff"))
+       (`(rebase-sequence file)
+        (user-error "Cannot copy this as a diff"))
+       (`(,_ region) (magit-apply-region $))
+       (`(,_   hunk) (magit-apply-hunk   $))
+       (`(,_  hunks) (magit-apply-hunks  $))
+       (`(,_   file) (magit-apply-diff   $))
+       (`(,_  files) (magit-apply-diffs  $))))
+    ([rev (or (magit-commit-at-point) magit-buffer-revision)]
+     (magit--with-temp-process-buffer
+       (magit-git-insert "show" "-p" "--format=" rev)
+       (kill-new (buffer-string))))
+    ((user-error "Cannot copy this as a diff"))))
+
+;;; Smerge Support
+
+(defun magit-smerge-keep-current ()
+  "Keep the current version of the conflict at point."
+  (interactive)
+  (magit-call-smerge #'smerge-keep-current))
+
+(defun magit-smerge-keep-upper ()
+  "Keep the upper/our version of the conflict at point."
+  (interactive)
+  (magit-call-smerge #'smerge-keep-upper))
+
+(defun magit-smerge-keep-base ()
+  "Keep the base version of the conflict at point."
+  (interactive)
+  (magit-call-smerge #'smerge-keep-base))
+
+(defun magit-smerge-keep-lower ()
+  "Keep the lower/their version of the conflict at point."
+  (interactive)
+  (magit-call-smerge #'smerge-keep-lower))
+
+(defun magit-smerge-keep-all ()
+  "Keep all versions of the conflict at point."
+  (interactive)
+  (magit-call-smerge #'smerge-keep-all))
+
+(defun magit-call-smerge (fn)
+  (pcase-let* ((file (magit-file-at-point t t))
+               (keep (get-file-buffer file))
+               (`(,buf ,pos) (magit-diff-visit-file--noselect))
+               (keep (eq keep buf)))
+    (with-current-buffer buf
+      (save-excursion
+        (save-restriction
+          (unless (<= (point-min) pos (point-max))
+            (widen))
+          (goto-char pos)
+          (condition-case nil
+              (smerge-match-conflict)
+            (error
+             (if (eq fn #'smerge-keep-current)
+                 (when (eq this-command #'magit-discard)
+                   (re-search-forward smerge-begin-re nil t)
+                   (setq fn
+                         (magit-read-char-case "Keep side: " t
+                           (?o "[o]urs/upper"   #'smerge-keep-upper)
+                           (?b "[b]ase"         #'smerge-keep-base)
+                           (?t "[t]heirs/lower" #'smerge-keep-lower))))
+               (re-search-forward smerge-begin-re nil t))))
+          (funcall fn)))
+      (when (and keep (magit-anything-unmerged-p file))
+        (smerge-start-session))
+      (save-buffer))
+    (unless keep
+      (kill-buffer buf))
+    (magit-refresh)))
+
+;;; _
+(provide 'magit-apply)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-apply.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-apply.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-apply.elc
new file mode 100644
index 0000000..57b4b30
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-apply.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-autoloads.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-autoloads.el
new file mode 100644
index 0000000..e45f594
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-autoloads.el
@@ -0,0 +1,2255 @@
+;;; magit-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from git-commit.el
+
+(put 'git-commit-major-mode 'safe-local-variable
+    (lambda (val)
+      (memq val '(text-mode
+                  markdown-mode
+                  org-mode
+                  fundamental-mode
+                  log-edit-mode
+                  git-commit-elisp-text-mode))))
+(autoload 'git-commit-insert-changelog-gnu "git-commit" "\
+Insert a GNU-style changelog at point while authorig a commit message.
+
+The modified definitions are extracted from the diff in the message
+buffer, which is only available if \"git commit\" was invoked with
+\"--verbose\"." t)
+(autoload 'git-commit-insert-changelog-plain "git-commit" "\
+Insert a simple changelog at point while authorig a commit message.
+
+Defuns are slightly indented and quoted like in elisp docstrings.
+The exact format is still subject to change.
+
+The modified definitions are extracted from the diff in the message
+buffer, which is only available if \"git commit\" was invoked with
+\"--verbose\"." t)
+(register-definition-prefixes "git-commit" '("git-commit-" "global-git-commit-mode"))
+
+
+;;; Generated autoloads from git-rebase.el
+
+(autoload 'git-rebase-current-line "git-rebase" "\
+Parse current line into a `git-rebase-action' instance.
+If the current line isn't recognized as a rebase line, an
+instance with all nil values is returned, unless optional
+BATCH is non-nil, in which case nil is returned.  Non-nil
+BATCH also ignores commented lines.
+
+(fn &optional BATCH)")
+(autoload 'git-rebase-mode "git-rebase" "\
+Major mode for editing of a Git rebase file.
+
+Rebase files are generated when you run \"git rebase -i\" or run
+`magit-interactive-rebase'.  They describe how Git should perform
+the rebase.  See the documentation for git-rebase (e.g., by
+running \"man git-rebase\" at the command line) for details.
+
+(fn)" t)
+(defconst git-rebase-filename-regexp "/git-rebase-todo\\'")
+(add-to-list 'auto-mode-alist (cons git-rebase-filename-regexp #'git-rebase-mode))
+(register-definition-prefixes "git-rebase" '("git-rebase-" "magit-imenu--rebase-"))
+
+
+;;; Generated autoloads from magit.el
+
+(defvar magit-define-global-key-bindings 'default "\
+Which set of key bindings to add to the global keymap, if any.
+
+This option controls which set of Magit key bindings, if any, may
+be added to the global keymap, even before Magit is first used in
+the current Emacs session.
+
+If the value is nil, no bindings are added.
+
+If \\+`default', maybe add:
+
+    \\`C-x' \\`g'     `magit-status'
+    \\`C-x' \\`M-g'   `magit-dispatch'
+    \\`C-c' \\`M-g'   `magit-file-dispatch'
+
+If `recommended', maybe add:
+
+    \\`C-x' \\`g'     `magit-status'
+    \\`C-c' \\`g'     `magit-dispatch'
+    \\`C-c' \\`f'     `magit-file-dispatch'
+
+    These bindings are strongly recommended, but we cannot use
+    them by default, because the \\`C-c <LETTER>' namespace is
+    strictly reserved for bindings added by the user.
+
+The bindings in the chosen set may be added when
+`after-init-hook' is run.  Each binding is added if, and only
+if, at that time no other key is bound to the same command,
+and no other command is bound to the same key.  In other words
+we try to avoid adding bindings that are unnecessary, as well
+as bindings that conflict with other bindings.
+
+Adding these bindings is delayed until `after-init-hook' is
+run to allow users to set the variable anywhere in their init
+file (without having to make sure to do so before `magit' is
+loaded or autoloaded) and to increase the likelihood that all
+the potentially conflicting user bindings have already been
+added.
+
+To set this variable use either `setq' or the Custom interface.
+Do not use the function `customize-set-variable' because doing
+that would cause Magit to be loaded immediately, when that form
+is evaluated (this differs from `custom-set-variables', which
+doesn't load the libraries that define the customized variables).
+
+Setting this variable has no effect if `after-init-hook' has
+already been run.")
+(custom-autoload 'magit-define-global-key-bindings "magit" t)
+(defun magit-maybe-define-global-key-bindings (&optional force) "\
+See variable `magit-define-global-key-bindings'." (when magit-define-global-key-bindings (let ((map (current-global-map))) (pcase-dolist (`(,key \, def) (cond ((eq magit-define-global-key-bindings 'recommended) '(("C-x g" . magit-status) ("C-c g" . magit-dispatch) ("C-c f" . magit-file-dispatch))) ('(("C-x g" . magit-status) ("C-x M-g" . magit-dispatch) ("C-c M-g" . magit-file-dispatch))))) (when (or force (not (or (lookup-key map (kbd key)) (where-is-internal def (make-sparse-keymap) t)))) (define-key map (kbd key) def))))))
+(if after-init-time (magit-maybe-define-global-key-bindings) (add-hook 'after-init-hook #'magit-maybe-define-global-key-bindings t))
+(autoload 'magit-dispatch "magit" nil t)
+(autoload 'magit-run "magit" nil t)
+(autoload 'magit-git-command "magit" "\
+Execute COMMAND asynchronously; display output.
+
+Interactively, prompt for COMMAND in the minibuffer.  \"git \" is
+used as initial input, but can be deleted to run another command.
+
+With a prefix argument COMMAND is run in the top-level directory
+of the current working tree, otherwise in `default-directory'.
+
+(fn COMMAND)" t)
+(autoload 'magit-git-command-topdir "magit" "\
+Execute COMMAND asynchronously; display output.
+
+Interactively, prompt for COMMAND in the minibuffer.  \"git \" is
+used as initial input, but can be deleted to run another command.
+
+COMMAND is run in the top-level directory of the current
+working tree.
+
+(fn COMMAND)" t)
+(autoload 'magit-shell-command "magit" "\
+Execute COMMAND asynchronously; display output.
+
+Interactively, prompt for COMMAND in the minibuffer.  With a
+prefix argument COMMAND is run in the top-level directory of
+the current working tree, otherwise in `default-directory'.
+
+(fn COMMAND)" t)
+(autoload 'magit-shell-command-topdir "magit" "\
+Execute COMMAND asynchronously; display output.
+
+Interactively, prompt for COMMAND in the minibuffer.  COMMAND
+is run in the top-level directory of the current working tree.
+
+(fn COMMAND)" t)
+(autoload 'magit-version "magit" "\
+Return the version of Magit currently in use.
+
+If optional argument PRINT-DEST is non-nil, also print the used
+versions of Magit, Transient, Git and Emacs to the output stream
+selected by that argument.  Interactively use the echo area, or
+with a prefix argument use the current buffer.  Additionally put
+the output in the kill ring.
+
+(fn &optional PRINT-DEST)" t)
+(register-definition-prefixes "magit" '("magit-"))
+
+
+;;; Generated autoloads from magit-apply.el
+
+(autoload 'magit-stage-files "magit-apply" "\
+Read one or more files and stage all changes in those files.
+With prefix argument FORCE, offer ignored files for completion.
+
+(fn FILES &optional FORCE)" t)
+(autoload 'magit-stage-modified "magit-apply" "\
+Stage all changes to files modified in the worktree.
+Stage all new content of tracked files and remove tracked files
+that no longer exist in the working tree from the index also.
+With a prefix argument also stage previously untracked (but not
+ignored) files.
+
+(fn &optional ALL)" t)
+(autoload 'magit-run-post-stage-hook "magit-apply")
+(autoload 'magit-unstage-files "magit-apply" "\
+Read one or more files and unstage all changes to those files.
+
+(fn FILES)" t)
+(autoload 'magit-unstage-all "magit-apply" "\
+Remove all changes from the staging area." t)
+(autoload 'magit-run-post-unstage-hook "magit-apply")
+(register-definition-prefixes "magit-apply" '("magit-"))
+
+
+;;; Generated autoloads from magit-autorevert.el
+
+(defun magit-auto-revert-mode--initialize (symbol value) (internal--define-uninitialized-variable symbol) (if (not load-file-name) (custom-initialize-set symbol value) (defalias 'magit-auto-revert-mode--after-load (apply-partially (lambda (symbol value mode-file file) (when (equal file mode-file) (remove-hook 'after-load-functions 'magit-auto-revert-mode--after-load) (fmakunbound 'magit-auto-revert-mode--after-load) (if after-init-time (custom-initialize-set symbol value) (defalias 'magit-auto-revert-mode--after-init (apply-partially (lambda (symbol value) (remove-hook 'after-init-hook 'magit-auto-revert-mode--after-init) (fmakunbound 'magit-auto-revert-mode--after-init) (custom-initialize-set symbol value)) symbol value)) (add-hook 'after-init-hook 'magit-auto-revert-mode--after-init)))) symbol value load-file-name)) (add-hook 'after-load-functions 'magit-auto-revert-mode--after-load)))
+(put 'magit-auto-revert-mode 'globalized-minor-mode t)
+(defcustom magit-auto-revert-mode (not (or global-auto-revert-mode noninteractive)) "\
+Non-nil if Magit-Auto-Revert mode is enabled.
+See the `magit-auto-revert-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 `magit-auto-revert-mode'." :set #'custom-set-minor-mode :initialize #'magit-auto-revert-mode--initialize :type 'boolean :group 'magit-auto-revert :group 'magit-essentials :package-version '(magit . "2.4.0") :link '(info-link "(magit)Automatic Reverting of File-Visiting Buffers"))
+(custom-autoload 'magit-auto-revert-mode "magit-autorevert" nil)
+(autoload 'magit-auto-revert-mode "magit-autorevert" "\
+Toggle Auto-Revert mode in all buffers.
+With prefix ARG, enable Magit-Auto-Revert mode if ARG is positive;
+otherwise, disable it.
+
+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.
+
+Auto-Revert mode is enabled in all buffers where
+`magit-turn-on-auto-revert-mode-if-desired' would do it.
+
+See `auto-revert-mode' for more information on Auto-Revert mode.
+
+(fn &optional ARG)" t)
+(autoload 'magit-auto-revert-buffers "magit-autorevert")
+(register-definition-prefixes "magit-autorevert" '("auto-revert-buffer" "magit-"))
+
+
+;;; Generated autoloads from magit-base.el
+
+(autoload 'magit-emacs-Q-command "magit-base" "\
+Show a shell command that runs an uncustomized Emacs with only Magit loaded.
+See info node `(magit)Debugging Tools' for more information." t)
+(define-advice Info-follow-nearest-node (:around (fn &optional fork) gitman) (let ((node (Info-get-token (point) "\\*note[ 
+	]+" "\\*note[ 
+	]+\\([^:]*\\):\\(:\\|[ 
+	]*(\\)?"))) (if (and node (string-match "^(gitman)\\(.+\\)" node)) (pcase magit-view-git-manual-method ('info (funcall fn fork)) ('man (require 'man) (man (match-str 1 node))) ('woman (require 'woman) (woman (match-str 1 node))) (_ (user-error "Invalid value for `magit-view-git-manual-method'"))) (funcall fn fork))))
+(define-advice org-man-export (:around (fn link description format) gitman) (if (and (eq format 'texinfo) (string-prefix-p "git" link)) (string-replace "%s" link "
+@ifinfo
+@ref{%s,,,gitman,}.
+@end ifinfo
+@ifhtml
+@html
+the <a href=\"http://git-scm.com/docs/%s\">%s(1)</a> manpage.
+@end html
+@end ifhtml
+@iftex
+the %s(1) manpage.
+@end iftex
+") (funcall fn link description format)))
+(register-definition-prefixes "magit-base" '("magit-"))
+
+
+;;; Generated autoloads from magit-bisect.el
+
+(autoload 'magit-bisect "magit-bisect" nil t)
+(autoload 'magit-bisect-start "magit-bisect" "\
+Start a bisect session.
+
+Bisecting a bug means to find the commit that introduced it.
+This command starts such a bisect session by asking for a known
+good and a known bad commit.  To move the session forward use the
+other actions from the bisect transient command (\\<magit-status-mode-map>\\[magit-bisect]).
+
+(fn BAD GOOD ARGS)" t)
+(autoload 'magit-bisect-reset "magit-bisect" "\
+After bisecting, cleanup bisection state and return to original `HEAD'." t)
+(autoload 'magit-bisect-good "magit-bisect" "\
+While bisecting, mark the current commit as good.
+Use this after you have asserted that the commit does not contain
+the bug in question." t)
+(autoload 'magit-bisect-bad "magit-bisect" "\
+While bisecting, mark the current commit as bad.
+Use this after you have asserted that the commit does contain the
+bug in question." t)
+(autoload 'magit-bisect-mark "magit-bisect" "\
+While bisecting, mark the current commit with a bisect term.
+During a bisect using alternate terms, commits can still be
+marked with `magit-bisect-good' and `magit-bisect-bad', as those
+commands map to the correct term (\"good\" to --term-old's value
+and \"bad\" to --term-new's).  However, in some cases, it can be
+difficult to keep that mapping straight in your head; this
+command provides an interface that exposes the underlying terms." t)
+(autoload 'magit-bisect-skip "magit-bisect" "\
+While bisecting, skip the current commit.
+Use this if for some reason the current commit is not a good one
+to test.  This command lets Git choose a different one." t)
+(autoload 'magit-bisect-run "magit-bisect" "\
+Bisect automatically by running commands after each step.
+
+Unlike \"git bisect run\" this can be used before bisecting has begun.
+In that case it behaves like \"git bisect start; git bisect run\".
+
+(fn CMDLINE &optional BAD GOOD ARGS)" t)
+(register-definition-prefixes "magit-bisect" '("magit-"))
+
+
+;;; Generated autoloads from magit-blame.el
+
+(autoload 'magit-blame-echo "magit-blame" nil t)
+(autoload 'magit-blame-addition "magit-blame" nil t)
+(autoload 'magit-blame-removal "magit-blame" nil t)
+(autoload 'magit-blame-reverse "magit-blame" nil t)
+(autoload 'magit-blame "magit-blame" nil t)
+(register-definition-prefixes "magit-blame" '("magit-"))
+
+
+;;; Generated autoloads from magit-branch.el
+
+(autoload 'magit-branch "magit" nil t)
+(autoload 'magit-checkout "magit-branch" "\
+Checkout COMMIT, updating the index and the working tree.
+If COMMIT is a local branch, then that becomes the current
+branch.  If it is something else, then `HEAD' becomes detached.
+Checkout fails if the working tree or the staging area contain
+changes.
+
+(git checkout COMMIT).
+
+(fn COMMIT &optional ARGS)" t)
+(function-put 'magit-checkout 'interactive-only 'magit--checkout)
+(autoload 'magit-branch-create "magit-branch" "\
+Create BRANCH at branch or revision START-POINT.
+
+(fn BRANCH START-POINT)" t)
+(function-put 'magit-branch-create 'interactive-only 'magit-call-git)
+(autoload 'magit-branch-and-checkout "magit-branch" "\
+Create and checkout BRANCH at branch or revision START-POINT.
+
+(fn BRANCH START-POINT &optional ARGS)" t)
+(function-put 'magit-branch-and-checkout 'interactive-only 'magit-call-git)
+(autoload 'magit-branch-or-checkout "magit-branch" "\
+Hybrid between `magit-checkout' and `magit-branch-and-checkout'.
+
+Ask the user for an existing branch or revision.  If the user
+input actually can be resolved as a branch or revision, then
+check that out, just like `magit-checkout' would.
+
+Otherwise create and checkout a new branch using the input as
+its name.  Before doing so read the starting-point for the new
+branch.  This is similar to what `magit-branch-and-checkout'
+does.
+
+(fn ARG &optional START-POINT)" t)
+(function-put 'magit-branch-or-checkout 'interactive-only 'magit-call-git)
+(autoload 'magit-branch-checkout "magit-branch" "\
+Checkout an existing or new local branch.
+
+Read a branch name from the user offering all local branches and
+a subset of remote branches as candidates.  Omit remote branches
+for which a local branch by the same name exists from the list
+of candidates.  The user can also enter a completely new branch
+name.
+
+- If the user selects an existing local branch, then check that
+  out.
+
+- If the user selects a remote branch, then create and checkout
+  a new local branch with the same name.  Configure the selected
+  remote branch as push target.
+
+- If the user enters a new branch name, then create and check
+  that out, after also reading the starting-point from the user.
+
+In the latter two cases the upstream is also set.  Whether it is
+set to the chosen START-POINT or something else depends on the
+value of `magit-branch-adjust-remote-upstream-alist', just like
+when using `magit-branch-and-checkout'.
+
+(fn BRANCH &optional START-POINT)" t)
+(function-put 'magit-branch-checkout 'interactive-only 'magit-call-git)
+(autoload 'magit-branch-orphan "magit-branch" "\
+Create and checkout an orphan BRANCH with contents from revision START-POINT.
+
+(fn BRANCH START-POINT)" t)
+(autoload 'magit-checkout-remote-ref "magit-branch" "\
+Checkout reference REF from REMOTE.
+
+This command queries the REMOTE for a list of its references.  After
+the user has selected on of them, it fetches just that, and finally
+it checks out \"FETCH_HEAD\", which now refers to the same commit as
+REF does on REMOTE.
+
+This is only useful if you usually only fetch a subset of the refs
+from REMOTE.  Otherwise it is better to use `magit-checkout', as
+that avoids a round-trip.
+
+(fn REMOTE REF)" t)
+(function-put 'magit-checkout-remote-ref 'interactive-only 'magit-call-git)
+(autoload 'magit-branch-spinout "magit-branch" "\
+Create new branch from the unpushed commits.
+Like `magit-branch-spinoff' but remain on the current branch.
+If there are any uncommitted changes, then behave exactly like
+`magit-branch-spinoff'.
+
+(fn BRANCH &optional FROM)" t)
+(autoload 'magit-branch-spinoff "magit-branch" "\
+Create new branch from the unpushed commits.
+
+Create and checkout a new branch starting at and tracking the
+current branch.  That branch in turn is reset to the last commit
+it shares with its upstream.  If the current branch has no
+upstream or no unpushed commits, then the new branch is created
+anyway and the previously current branch is not touched.
+
+This is useful to create a feature branch after work has already
+began on the old branch (likely but not necessarily \"master\").
+
+If the current branch is a member of the value of option
+`magit-branch-prefer-remote-upstream' (which see), then the
+current branch will be used as the starting point as usual, but
+the upstream of the starting-point may be used as the upstream
+of the new branch, instead of the starting-point itself.
+
+If optional FROM is non-nil, then the source branch is reset
+to `FROM~', instead of to the last commit it shares with its
+upstream.  Interactively, FROM is only ever non-nil, if the
+region selects some commits, and among those commits, FROM is
+the commit that is the fewest commits ahead of the source
+branch.
+
+The commit at the other end of the selection actually does not
+matter, all commits between FROM and `HEAD' are moved to the new
+branch.  If FROM is not reachable from `HEAD' or is reachable
+from the source branch's upstream, then an error is raised.
+
+(fn BRANCH &optional FROM)" t)
+(autoload 'magit-branch-reset "magit-branch" "\
+Reset a branch to the tip of another branch or any other commit.
+
+When the branch being reset is the current branch, then do a
+hard reset.  If there are any uncommitted changes, then the user
+has to confirm the reset because those changes would be lost.
+
+This is useful when you have started work on a feature branch but
+realize it's all crap and want to start over.
+
+When resetting to another branch and a prefix argument is used,
+then also set the target branch as the upstream of the branch
+that is being reset.
+
+(fn BRANCH TO &optional SET-UPSTREAM)" t)
+(autoload 'magit-branch-delete "magit-branch" "\
+Delete one or multiple branches.
+
+If the region marks multiple branches, then offer to delete
+those, otherwise prompt for a single branch to be deleted,
+defaulting to the branch at point.
+
+Require confirmation when deleting branches is dangerous in some
+way.  Option `magit-no-confirm' can be customized to not require
+confirmation in certain cases.  See its docstring to learn why
+confirmation is required by default in certain cases or if a
+prompt is confusing.
+
+(fn BRANCHES &optional FORCE)" t)
+(autoload 'magit-branch-rename "magit-branch" "\
+Rename the branch named OLD to NEW.
+
+With a prefix argument FORCE, rename even if a branch named NEW
+already exists.
+
+If `branch.OLD.pushRemote' is set, then unset it.  Depending on
+the value of `magit-branch-rename-push-target' (which see) maybe
+set `branch.NEW.pushRemote' and maybe rename the push-target on
+the remote.
+
+(fn OLD NEW &optional FORCE)" t)
+(autoload 'magit-branch-shelve "magit-branch" "\
+Shelve a BRANCH.
+Rename \"refs/heads/BRANCH\" to \"refs/shelved/YYYY-MM-DD-BRANCH\",
+and also rename the respective reflog file.
+
+(fn BRANCH)" t)
+(autoload 'magit-branch-unshelve "magit-branch" "\
+Unshelve a BRANCH.
+Rename \"refs/shelved/BRANCH\" to \"refs/heads/BRANCH\".  If BRANCH
+is prefixed with \"YYYY-MM-DD\", then drop that part of the name.
+Also rename the respective reflog file.
+
+(fn BRANCH)" t)
+(autoload 'magit-branch-configure "magit-branch" nil t)
+(register-definition-prefixes "magit-branch" '("magit-"))
+
+
+;;; Generated autoloads from magit-bundle.el
+
+(autoload 'magit-bundle "magit-bundle" nil t)
+(autoload 'magit-bundle-import "magit-bundle" nil t)
+(autoload 'magit-bundle-create-tracked "magit-bundle" "\
+Create and track a new bundle.
+
+(fn FILE TAG BRANCH REFS ARGS)" t)
+(autoload 'magit-bundle-update-tracked "magit-bundle" "\
+Update a bundle that is being tracked using TAG.
+
+(fn TAG)" t)
+(autoload 'magit-bundle-verify "magit-bundle" "\
+Check whether FILE is valid and applies to the current repository.
+
+(fn FILE)" t)
+(autoload 'magit-bundle-list-heads "magit-bundle" "\
+List the refs in FILE.
+
+(fn FILE)" t)
+(register-definition-prefixes "magit-bundle" '("magit-"))
+
+
+;;; Generated autoloads from magit-clone.el
+
+(autoload 'magit-clone "magit-clone" nil t)
+(autoload 'magit-clone-regular "magit-clone" "\
+Create a clone of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository.
+
+(fn REPOSITORY DIRECTORY ARGS)" t)
+(autoload 'magit-clone-shallow "magit-clone" "\
+Create a shallow clone of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository.
+With a prefix argument read the DEPTH of the clone;
+otherwise use 1.
+
+(fn REPOSITORY DIRECTORY ARGS DEPTH)" t)
+(autoload 'magit-clone-shallow-since "magit-clone" "\
+Create a shallow clone of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository.
+Exclude commits before DATE, which is read from the
+user.
+
+(fn REPOSITORY DIRECTORY ARGS DATE)" t)
+(autoload 'magit-clone-shallow-exclude "magit-clone" "\
+Create a shallow clone of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository.
+Exclude commits reachable from EXCLUDE, which is a
+branch or tag read from the user.
+
+(fn REPOSITORY DIRECTORY ARGS EXCLUDE)" t)
+(autoload 'magit-clone-bare "magit-clone" "\
+Create a bare clone of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository.
+
+(fn REPOSITORY DIRECTORY ARGS)" t)
+(autoload 'magit-clone-mirror "magit-clone" "\
+Create a mirror of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository.
+
+(fn REPOSITORY DIRECTORY ARGS)" t)
+(autoload 'magit-clone-sparse "magit-clone" "\
+Clone REPOSITORY into DIRECTORY and create a sparse checkout.
+
+(fn REPOSITORY DIRECTORY ARGS)" t)
+(register-definition-prefixes "magit-clone" '("magit-"))
+
+
+;;; Generated autoloads from magit-commit.el
+
+(autoload 'magit-commit "magit-commit" nil t)
+(autoload 'magit-commit-create "magit-commit" "\
+Create a new commit.
+
+(fn &optional ARGS)" t)
+(autoload 'magit-commit-extend "magit-commit" "\
+Amend staged changes to the last commit, without editing its message.
+
+With a prefix argument do not update the committer date; without an
+argument update it.  The option `magit-commit-extend-override-date'
+can be used to inverse the meaning of the prefix argument.  Called
+non-interactively, the optional OVERRIDE-DATE argument controls this
+behavior, and the option is of no relevance.
+
+(fn &optional ARGS OVERRIDE-DATE)" t)
+(autoload 'magit-commit-amend "magit-commit" "\
+Amend staged changes (if any) to the last commit, and edit its message.
+
+(fn &optional ARGS)" t)
+(autoload 'magit-commit-reword "magit-commit" "\
+Reword the message of the last commit, without amending its tree.
+
+With a prefix argument do not update the committer date; without an
+argument update it.  The option `magit-commit-reword-override-date'
+can be used to inverse the meaning of the prefix argument.  Called
+non-interactively, the optional OVERRIDE-DATE argument controls this
+behavior, and the option is of no relevance.
+
+(fn &optional ARGS OVERRIDE-DATE)" t)
+(autoload 'magit-commit-fixup "magit-commit" "\
+Create a fixup commit, leaving the original commit message untouched.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+During a later rebase, when this commit gets squashed into its targeted
+commit, the original message of the targeted commit is used as-is.
+
+In other words, call \"git commit --fixup=COMMIT --no-edit\".
+
+(fn &optional COMMIT ARGS)" t)
+(autoload 'magit-commit-squash "magit-commit" "\
+Create a squash commit, without the user authoring a commit message.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+During a later rebase, when this commit gets squashed into its targeted
+commit, the user is given a chance to edit the original message to take
+the changes from the squash commit into account.
+
+In other words, call \"git commit --squash=COMMIT --no-edit\".
+
+(fn &optional COMMIT ARGS)" t)
+(autoload 'magit-commit-alter "magit-commit" "\
+Create a squash commit, authoring the final commit message now.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+During a later rebase, when this commit gets squashed into its targeted
+commit, the original message of the targeted commit is replaced with the
+message of this commit, without the user automatically being given a
+chance to edit again.
+
+In other words, call \"git commit --fixup=amend:COMMIT --edit\".
+
+(fn &optional COMMIT ARGS)" t)
+(autoload 'magit-commit-augment "magit-commit" "\
+Create a squash commit, authoring a new temporary commit message.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+During a later rebase, when this commit gets squashed into its targeted
+commit, the user is asked to write a final commit message, in a buffer
+that starts out containing both the original commit message, as well as
+the temporary commit message of the squash commit.
+
+In other words, call \"git commit --squash=COMMIT --edit\".
+
+(fn &optional COMMIT ARGS)" t)
+(autoload 'magit-commit-revise "magit-commit" "\
+Reword the message of an existing commit, without editing its tree.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+During a later rebase, when this commit gets squashed into its targeted
+commit, a combined commit is created which uses the message of the fixup
+commit and the tree of the targeted commit.
+
+In other words, call \"git commit --fixup=reword:COMMIT --edit\".
+
+(fn &optional COMMIT ARGS)" t)
+(autoload 'magit-commit-instant-fixup "magit-commit" "\
+Create a fixup commit, and immediately combine it with its target.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+Leave the original commit message of the targeted commit untouched.
+
+Like `magit-commit-fixup' but also run a \"--autofixup\" rebase.
+
+(fn &optional COMMIT ARGS)" t)
+(autoload 'magit-commit-instant-squash "magit-commit" "\
+Create a squash commit, and immediately combine it with its target.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+Turing the rebase phase, when the two commits are being squashed, ask
+the user to author the final commit message, based on the original
+message of the targeted commit.
+
+Like `magit-commit-squash' but also run a \"--autofixup\" rebase.
+
+(fn &optional COMMIT ARGS)" t)
+(autoload 'magit-commit-reshelve "magit-commit" "\
+Change committer (and possibly author) date of the last commit.
+
+The current time is used as the initial minibuffer input and the
+original author or committer date is available as the previous
+history element.
+
+Both the author and the committer dates are changed, unless one
+of the following is true, in which case only the committer date
+is updated:
+- You are not the author of the commit that is being reshelved.
+- The command was invoked with a prefix argument.
+- Non-interactively if UPDATE-AUTHOR is nil.
+
+(fn DATE UPDATE-AUTHOR &optional ARGS)" t)
+(autoload 'magit-commit-absorb-modules "magit-commit" "\
+Spread modified modules across recent commits.
+
+(fn PHASE COMMIT)" t)
+(autoload 'magit-commit-absorb "magit-commit" nil t)
+(autoload 'magit-commit-autofixup "magit-commit" nil t)
+(autoload 'magit-run-post-commit-hook "magit-commit")
+(register-definition-prefixes "magit-commit" '("magit-"))
+
+
+;;; Generated autoloads from magit-diff.el
+
+(autoload 'magit-diff "magit-diff" nil t)
+(autoload 'magit-diff-refresh "magit-diff" nil t)
+(autoload 'magit-diff-dwim "magit-diff" "\
+Show changes for the thing at point.
+
+For example, if point is on a commit, show the changes introduced by
+that commit.  Likewise if point is on the section titled \"Unstaged
+changes\", then show those changes in a separate buffer.  Generally
+speaking, compare the thing at point with the most logical, trivial
+and (in *any* situation) at least potentially useful other thing it
+could be compared to.
+
+When the region selects commits, then compare the two commits at
+either end.  There are different ways two commits can be compared.
+In the buffer showing the diff, you can control how the comparison,
+is done, using \"D r\" and \"D f\".
+
+This function does not always show the changes that you might want
+to view in any given situation.  You can think of the changes being
+shown as the smallest common denominator.  There is no AI involved.
+If this command never does what you want, then ignore it, and instead
+use the commands that allow you to explicitly specify what you need.
+
+(fn &optional ARGS FILES)" t)
+(autoload 'magit-diff-range "magit-diff" "\
+Show differences between two commits.
+
+REV-OR-RANGE should be a range or a single revision.  If it is a
+revision, then show changes in the working tree relative to that
+revision.  If it is a range, but one side is omitted, then show
+changes relative to `HEAD'.
+
+If the region is active, use the revisions on the first and last
+line of the region as the two sides of the range.  With a prefix
+argument, instead of diffing the revisions, choose a revision to
+view changes along, starting at the common ancestor of both
+revisions (i.e., use a \"...\" range).
+
+(fn REV-OR-RANGE &optional ARGS FILES)" t)
+(autoload 'magit-diff-working-tree "magit-diff" "\
+Show changes between the current working tree and the `HEAD' commit.
+With a prefix argument show changes between the working tree and
+a commit read from the minibuffer.
+
+(fn &optional REV ARGS FILES)" t)
+(autoload 'magit-diff-staged "magit-diff" "\
+Show changes between the index and the `HEAD' commit.
+With a prefix argument show changes between the index and
+a commit read from the minibuffer.
+
+(fn &optional REV ARGS FILES)" t)
+(autoload 'magit-diff-unstaged "magit-diff" "\
+Show changes between the working tree and the index.
+
+(fn &optional ARGS FILES)" t)
+(autoload 'magit-diff-unmerged "magit-diff" "\
+Show changes that are being merged.
+
+(fn &optional ARGS FILES)" t)
+(autoload 'magit-diff-while-committing "magit-diff" "\
+While committing, show the changes that are about to be committed.
+While amending, invoking the command again toggles between
+showing just the new changes or all the changes that will
+be committed." t)
+(autoload 'magit-diff-buffer-file "magit-diff" "\
+Show diff for the blob or file visited in the current buffer.
+
+Limit the diff to the file or blob.
+
+When the buffer visits a blob, then show the respective commit.
+When the buffer visits a file, then show the differences between
+`HEAD' and the working tree, or the index with a prefix argument.
+
+(fn &optional UNSTAGED-ONLY)" t)
+(autoload 'magit-diff-paths "magit-diff" "\
+Show changes between any two files on disk.
+
+(fn A B)" t)
+(autoload 'magit-show-commit "magit-diff" "\
+Visit the revision at point in another buffer.
+
+If there is no revision at point, or with a prefix argument, prompt
+for a revision.
+
+By default the same per-repository revision buffer is reused for all
+revision.  When you want to display multiple revisions at the same
+time, you can lock a revision buffer to its value, which prevents it
+from being reused to display another revision.
+
+Alternatively, you can use a dedicated buffer for every revision.
+To do so, enable `magit-revision-use-dedicated-buffers', but only
+after readings its docstring, to make sure you are can live with
+the trade-offs.
+
+(fn REV &optional ARGS FILES MODULE)" t)
+(autoload 'magit-show-commit-removing-file "magit-diff" "\
+Show the commit that removed FILE.
+
+(fn FILE &optional ARGS)" t)
+(register-definition-prefixes "magit-diff" '("magit-"))
+
+
+;;; Generated autoloads from magit-dired.el
+
+(autoload 'magit-dired-jump "magit-dired" "\
+Visit file at point using Dired.
+With a prefix argument, visit in another window.  If there
+is no file at point, then instead visit `default-directory'.
+
+(fn &optional OTHER-WINDOW)" t)
+(autoload 'magit-dired-stage "magit-dired" "\
+In Dired, staged all marked files or the file at point." t)
+(autoload 'magit-dired-unstage "magit-dired" "\
+In Dired, unstaged all marked files or the file at point." t)
+(autoload 'magit-dired-log "magit-dired" "\
+In Dired, show log for all marked files or the directory if none are marked.
+
+(fn &optional FOLLOW)" t)
+(autoload 'magit-dired-am-apply-patches "magit-dired" "\
+In Dired, apply the marked (or next ARG) files as patches.
+If inside a repository, then apply in that.  Otherwise prompt
+for a repository.
+
+(fn REPO &optional ARG)" t)
+(autoload 'magit-do-async-shell-command "magit-dired" "\
+Open FILE with `dired-do-async-shell-command'.
+Interactively, open the file at point.
+
+(fn FILE)" t)
+
+
+;;; Generated autoloads from magit-ediff.el
+
+(autoload 'magit-ediff "magit-ediff" nil t)
+(autoload 'magit-ediff-resolve-all "magit-ediff" nil t)
+(autoload 'magit-ediff-resolve-rest "magit-ediff" nil t)
+(autoload 'magit-ediff-stage "magit-ediff" nil t)
+(autoload 'magit-ediff-compare "magit-ediff" nil t)
+(autoload 'magit-ediff-dwim "magit-ediff" nil t)
+(autoload 'magit-ediff-show-staged "magit-ediff" nil t)
+(autoload 'magit-ediff-show-unstaged "magit-ediff" nil t)
+(autoload 'magit-ediff-show-working-tree "magit-ediff" nil t)
+(autoload 'magit-ediff-show-commit "magit-ediff" nil t)
+(autoload 'magit-ediff-show-stash "magit-ediff" nil t)
+(register-definition-prefixes "magit-ediff" '("magit-ediff-"))
+
+
+;;; Generated autoloads from magit-extras.el
+
+(autoload 'magit-git-mergetool "magit-extras" nil t)
+(autoload 'magit-run-git-gui-blame "magit-extras" "\
+Run \"git gui blame\" on the given FILENAME and COMMIT.
+Interactively run it for the current file and the `HEAD', with a
+prefix or when the current file cannot be determined let the user
+choose.  When the current buffer is visiting FILENAME instruct
+blame to center around the line point is on.
+
+(fn COMMIT FILENAME &optional LINENUM)" t)
+(autoload 'magit-run-git-gui "magit-extras" "\
+Run \"git gui\" for the current git repository." t)
+(autoload 'magit-run-gitk "magit-extras" "\
+Run `gitk' in the current repository." t)
+(autoload 'magit-run-gitk-branches "magit-extras" "\
+Run `gitk --branches' in the current repository." t)
+(autoload 'magit-run-gitk-all "magit-extras" "\
+Run `gitk --all' in the current repository." t)
+(autoload 'magit-project-status "magit-extras" "\
+Run `magit-status' in the current project's root.
+
+To teach `project-switch-project' about this command, you have to
+add something like this to your configuration:
+
+    (keymap-set project-prefix-map \"m\" #\\='magit-project-status)
+    (add-to-list \\='project-switch-commands
+                 \\='(magit-project-status \"Magit\") t)
+
+Also see `magit-project-dispatch'." t)
+(autoload 'magit-project-dispatch "magit-extras" "\
+Run `magit-dispatch' in the current project's root.
+
+Note that for `magit-dispatch' to operate in the selected project,
+the current buffer's `default-directory' must be located in the
+selected repository.  To achieve that, a Dired buffer is created.
+
+To teach `project-switch-project' about this command, you have to
+add something like this to your configuration:
+
+    (keymap-set project-prefix-map \"M\" #\\='magit-project-dispatch)
+    (add-to-list \\='project-switch-commands
+                 \\='(magit-project-dispatch \"Magit Dispatch\") t)
+
+Also see `magit-project-status'." t)
+(autoload 'magit-previous-line "magit-extras" "\
+Like `previous-line' but with Magit-specific shift-selection.
+
+Magit's selection mechanism is based on the region but selects an
+area that is larger than the region.  This causes `previous-line'
+when invoked while holding the shift key to move up one line and
+thereby select two lines.  When invoked inside a hunk body this
+command does not move point on the first invocation and thereby
+it only selects a single line.  Which inconsistency you prefer
+is a matter of preference.
+
+(fn &optional ARG TRY-VSCROLL)" t)
+(function-put 'magit-previous-line 'interactive-only '"use `forward-line' with negative argument instead.")
+(autoload 'magit-next-line "magit-extras" "\
+Like `next-line' but with Magit-specific shift-selection.
+
+Magit's selection mechanism is based on the region but selects
+an area that is larger than the region.  This causes `next-line'
+when invoked while holding the shift key to move down one line
+and thereby select two lines.  When invoked inside a hunk body
+this command does not move point on the first invocation and
+thereby it only selects a single line.  Which inconsistency you
+prefer is a matter of preference.
+
+(fn &optional ARG TRY-VSCROLL)" t)
+(function-put 'magit-next-line 'interactive-only 'forward-line)
+(autoload 'magit-clean "magit-extras" "\
+Remove untracked files from the working tree.
+With a prefix argument also remove ignored files,
+with two prefix arguments remove ignored files only.
+
+(git clean -f -d [-x|-X])
+
+(fn &optional ARG)" t)
+(autoload 'magit-generate-changelog "magit-extras" "\
+Insert ChangeLog entries into the current buffer.
+
+The entries are generated from the diff being committed.
+If prefix argument, AMENDING, is non-nil, include changes
+in HEAD as well as staged changes in the diff to check.
+
+(fn &optional AMENDING)" t)
+(autoload 'magit-add-change-log-entry "magit-extras" "\
+Find change log file and add date entry and item for current change.
+This differs from `add-change-log-entry' (which see) in that
+it acts on the current hunk in a Magit buffer instead of on
+a position in a file-visiting buffer.
+
+(fn &optional WHOAMI FILE-NAME OTHER-WINDOW)" t)
+(autoload 'magit-add-change-log-entry-other-window "magit-extras" "\
+Find change log file in other window and add entry and item.
+This differs from `add-change-log-entry-other-window' (which see)
+in that it acts on the current hunk in a Magit buffer instead of
+on a position in a file-visiting buffer.
+
+(fn &optional WHOAMI FILE-NAME)" t)
+(autoload 'magit-edit-line-commit "magit-extras" "\
+Edit the commit that added the current line.
+
+With a prefix argument edit the commit that removes the line,
+if any.  The commit is determined using \"git blame\" and made
+editable using \"git rebase --interactive\" if it is reachable
+from `HEAD', or by checking out the commit (or a branch that
+points at it) otherwise.
+
+(fn &optional TYPE)" t)
+(autoload 'magit-diff-edit-hunk-commit "magit-extras" "\
+From a hunk, edit the respective commit and visit the file.
+
+First visit the file being modified by the hunk at the correct
+location using `magit-diff-visit-file'.  This actually visits a
+blob.  When point is on a diff header, not within an individual
+hunk, then this visits the blob the first hunk is about.
+
+Then invoke `magit-edit-line-commit', which uses an interactive
+rebase to make the commit editable, or if that is not possible
+because the commit is not reachable from `HEAD' by checking out
+that commit directly.  This also causes the actual worktree file
+to be visited.
+
+Neither the blob nor the file buffer are killed when finishing
+the rebase.  If that is undesirable, then it might be better to
+use `magit-rebase-edit-commit' instead of this command." t)
+(autoload 'magit-reshelve-since "magit-extras" "\
+Change the author and committer dates of the commits since COMMIT.
+
+Ask the user for the first reachable commit whose dates should
+be changed.  Then read the new date for that commit.  The initial
+minibuffer input and the previous history element offer good
+values.  The next commit will be created one minute later and so
+on.
+
+This command is only intended for interactive use and should only
+be used on highly rearranged and unpublished history.
+
+If KEYID is non-nil, then use that to sign all reshelved commits.
+Interactively use the value of the \"--gpg-sign\" option in the
+list returned by `magit-rebase-arguments'.
+
+(fn COMMIT KEYID)" t)
+(autoload 'magit-pop-revision-stack "magit-extras" "\
+Insert a representation of a revision into the current buffer.
+
+Pop a revision from the `magit-revision-stack' and insert it into
+the current buffer according to `magit-pop-revision-stack-format'.
+Revisions can be put on the stack using `magit-copy-section-value'
+and `magit-copy-buffer-revision'.
+
+If the stack is empty or with a prefix argument, instead read a
+revision in the minibuffer.  By using the minibuffer history this
+allows selecting an item which was popped earlier or to insert an
+arbitrary reference or revision without first pushing it onto the
+stack.
+
+When reading the revision from the minibuffer, then it might not
+be possible to guess the correct repository.  When this command
+is called inside a repository (e.g., while composing a commit
+message), then that repository is used.  Otherwise (e.g., while
+composing an email) then the repository recorded for the top
+element of the stack is used (even though we insert another
+revision).  If not called inside a repository and with an empty
+stack, or with two prefix arguments, then read the repository in
+the minibuffer too.
+
+(fn REV TOPLEVEL)" t)
+(autoload 'magit-copy-section-value "magit-extras" "\
+Save the value of the current section for later use.
+
+Save the section value to the `kill-ring', and, provided that
+the current section is a commit, branch, or tag section, push
+the (referenced) revision to the `magit-revision-stack' for use
+with `magit-pop-revision-stack'.
+
+When `magit-copy-revision-abbreviated' is non-nil, save the
+abbreviated revision to the `kill-ring' and the
+`magit-revision-stack'.
+
+When the current section is a branch or a tag, and a prefix
+argument is used, then save the revision at its tip to the
+`kill-ring' instead of the reference name.
+
+When the region is active, then save that to the `kill-ring',
+like `kill-ring-save' would, instead of behaving as described
+above.  If a prefix argument is used and the region is within
+a hunk, then strip the diff marker column and keep only either
+the added or removed lines, depending on the sign of the prefix
+argument.
+
+(fn ARG)" t)
+(autoload 'magit-copy-buffer-revision "magit-extras" "\
+Save the revision of the current buffer for later use.
+
+Save the revision shown in the current buffer to the `kill-ring'
+and push it to the `magit-revision-stack'.
+
+This command is mainly intended for use in `magit-revision-mode'
+buffers, the only buffers where it is always unambiguous exactly
+which revision should be saved.
+
+Most other Magit buffers usually show more than one revision, in
+some way or another, so this command has to select one of them,
+and that choice might not always be the one you think would have
+been the best pick.
+
+In such buffers it is often more useful to save the value of
+the current section instead, using `magit-copy-section-value'.
+
+When the region is active, then save that to the `kill-ring',
+like `kill-ring-save' would, instead of behaving as described
+above.
+
+When `magit-copy-revision-abbreviated' is non-nil, save the
+abbreviated revision to the `kill-ring' and the
+`magit-revision-stack'." t)
+(autoload 'magit-display-repository-buffer "magit-extras" "\
+Display a Magit buffer belonging to the current Git repository.
+The buffer is displayed using `magit-display-buffer', which see.
+
+(fn BUFFER)" t)
+(autoload 'magit-switch-to-repository-buffer "magit-extras" "\
+Switch to a Magit buffer belonging to the current Git repository.
+
+(fn BUFFER)" t)
+(autoload 'magit-switch-to-repository-buffer-other-window "magit-extras" "\
+Switch to a Magit buffer belonging to the current Git repository.
+
+(fn BUFFER)" t)
+(autoload 'magit-switch-to-repository-buffer-other-frame "magit-extras" "\
+Switch to a Magit buffer belonging to the current Git repository.
+
+(fn BUFFER)" t)
+(autoload 'magit-abort-dwim "magit-extras" "\
+Abort current operation.
+Depending on the context, this will abort a merge, a rebase, a
+patch application, a cherry-pick, a revert, or a bisect." t)
+(autoload 'magit-back-to-indentation "magit-extras" "\
+Move point to the first non-whitespace character on this line.
+In Magit diffs, also skip over - and + at the beginning of the line." t)
+(register-definition-prefixes "magit-extras" '("magit-"))
+
+
+;;; Generated autoloads from magit-fetch.el
+
+(autoload 'magit-fetch "magit-fetch" nil t)
+(autoload 'magit-fetch-from-pushremote "magit-fetch" nil t)
+(autoload 'magit-fetch-from-upstream "magit-fetch" nil t)
+(autoload 'magit-fetch-other "magit-fetch" "\
+Fetch from another repository.
+
+(fn REMOTE ARGS)" t)
+(autoload 'magit-fetch-branch "magit-fetch" "\
+Fetch a BRANCH from a REMOTE.
+
+(fn REMOTE BRANCH ARGS)" t)
+(autoload 'magit-fetch-refspec "magit-fetch" "\
+Fetch a REFSPEC from a REMOTE.
+
+(fn REMOTE REFSPEC ARGS)" t)
+(autoload 'magit-fetch-all "magit-fetch" "\
+Fetch from all remotes.
+
+(fn ARGS)" t)
+(autoload 'magit-fetch-all-prune "magit-fetch" "\
+Fetch from all remotes, and prune.
+Prune remote tracking branches for branches that have been
+removed on the respective remote." t)
+(autoload 'magit-fetch-all-no-prune "magit-fetch" "\
+Fetch from all remotes." t)
+(autoload 'magit-fetch-modules "magit-fetch" nil t)
+(register-definition-prefixes "magit-fetch" '("magit-"))
+
+
+;;; Generated autoloads from magit-files.el
+
+(autoload 'magit-find-file "magit-files" "\
+View FILE from REV.
+Switch to a buffer visiting blob REV:FILE, creating one if none
+already exists.  If prior to calling this command the current
+buffer and/or cursor position is about the same file, then go
+to the line and column corresponding to that location.
+
+(fn REV FILE)" t)
+(autoload 'magit-find-file-other-window "magit-files" "\
+View FILE from REV, in another window.
+Switch to a buffer visiting blob REV:FILE, creating one if none
+already exists.  If prior to calling this command the current
+buffer and/or cursor position is about the same file, then go to
+the line and column corresponding to that location.
+
+(fn REV FILE)" t)
+(autoload 'magit-find-file-other-frame "magit-files" "\
+View FILE from REV, in another frame.
+Switch to a buffer visiting blob REV:FILE, creating one if none
+already exists.  If prior to calling this command the current
+buffer and/or cursor position is about the same file, then go to
+the line and column corresponding to that location.
+
+(fn REV FILE)" t)
+(autoload 'magit-file-dispatch "magit" nil t)
+(autoload 'magit-blob-visit-file "magit-files" "\
+View the file from the worktree corresponding to the current blob.
+When visiting a blob or the version from the index, then go to
+the same location in the respective file in the working tree." t)
+(autoload 'magit-file-stage "magit-files" "\
+Stage all changes to the file being visited in the current buffer." t)
+(autoload 'magit-file-unstage "magit-files" "\
+Unstage all changes to the file being visited in the current buffer." t)
+(autoload 'magit-file-untrack "magit-files" "\
+Untrack the selected FILES or one file read in the minibuffer.
+
+With a prefix argument FORCE do so even when the files have
+staged as well as unstaged changes.
+
+(fn FILES &optional FORCE)" t)
+(autoload 'magit-file-rename "magit-files" "\
+Rename or move FILE to NEWNAME.
+NEWNAME may be a file or directory name.  If FILE isn't tracked in
+Git, fallback to using `rename-file'.
+
+(fn FILE NEWNAME)" t)
+(autoload 'magit-file-delete "magit-files" "\
+Delete the selected FILES or one file read in the minibuffer.
+
+With a prefix argument FORCE do so even when the files have
+uncommitted changes.  When the files aren't being tracked in
+Git, then fallback to using `delete-file'.
+
+(fn FILES &optional FORCE)" t)
+(autoload 'magit-file-checkout "magit-files" "\
+Checkout FILE from REV.
+
+(fn REV FILE)" t)
+(register-definition-prefixes "magit-files" '("magit-"))
+
+
+;;; Generated autoloads from magit-git.el
+
+(register-definition-prefixes "magit-git" '("magit-"))
+
+
+;;; Generated autoloads from magit-gitignore.el
+
+(autoload 'magit-gitignore "magit-gitignore" nil t)
+(autoload 'magit-gitignore-in-topdir "magit-gitignore" nil t)
+(autoload 'magit-gitignore-in-subdir "magit-gitignore" nil t)
+(autoload 'magit-gitignore-in-gitdir "magit-gitignore" nil t)
+(autoload 'magit-gitignore-on-system "magit-gitignore" nil t)
+(autoload 'magit-skip-worktree "magit-gitignore" "\
+Call \"git update-index --skip-worktree -- FILE\".
+
+(fn FILE)" t)
+(autoload 'magit-no-skip-worktree "magit-gitignore" "\
+Call \"git update-index --no-skip-worktree -- FILE\".
+
+(fn FILE)" t)
+(autoload 'magit-assume-unchanged "magit-gitignore" "\
+Call \"git update-index --assume-unchanged -- FILE\".
+
+(fn FILE)" t)
+(autoload 'magit-no-assume-unchanged "magit-gitignore" "\
+Call \"git update-index --no-assume-unchanged -- FILE\".
+
+(fn FILE)" t)
+(register-definition-prefixes "magit-gitignore" '("magit-"))
+
+
+;;; Generated autoloads from magit-log.el
+
+(autoload 'magit-log "magit-log" nil t)
+(autoload 'magit-log-refresh "magit-log" nil t)
+(autoload 'magit-log-current "magit-log" nil t)
+(autoload 'magit-log-head "magit-log" "\
+Show log for `HEAD'.
+
+(fn &optional ARGS FILES)" t)
+(autoload 'magit-log-related "magit-log" "\
+Show log for the current branch, its upstream and its push target.
+When the upstream is a local branch, then also show its own
+upstream.  When `HEAD' is detached, then show log for that, the
+previously checked out branch and its upstream and push-target.
+
+(fn REVS &optional ARGS FILES)" t)
+(autoload 'magit-log-other "magit-log" "\
+Show log for one or more revs read from the minibuffer.
+The user can input any revision or revisions separated by a
+space, or even ranges, but only branches and tags, and a
+representation of the commit at point, are available as
+completion candidates.
+
+(fn REVS &optional ARGS FILES)" t)
+(autoload 'magit-log-branches "magit-log" "\
+Show log for all local branches and `HEAD'.
+
+(fn &optional ARGS FILES)" t)
+(autoload 'magit-log-matching-branches "magit-log" "\
+Show log for all branches matching PATTERN and `HEAD'.
+
+(fn PATTERN &optional ARGS FILES)" t)
+(autoload 'magit-log-matching-tags "magit-log" "\
+Show log for all tags matching PATTERN and `HEAD'.
+
+(fn PATTERN &optional ARGS FILES)" t)
+(autoload 'magit-log-all-branches "magit-log" "\
+Show log for all local and remote branches and `HEAD'.
+
+(fn &optional ARGS FILES)" t)
+(autoload 'magit-log-all "magit-log" "\
+Show log for all references and `HEAD'.
+
+(fn &optional ARGS FILES)" t)
+(autoload 'magit-log-reflog "magit-log" "\
+Show log for all objects mentioned in all reflogs.
+
+(fn &optional ARGS FILES)" t)
+(autoload 'magit-log-buffer-file "magit-log" "\
+Show log for the blob or file visited in the current buffer.
+With a prefix argument or when \"--follow\" is an active log
+argument, then follow renames.  When the region is active,
+restrict the log to the lines that the region touches.
+
+(fn &optional FOLLOW BEG END)" t)
+(autoload 'magit-log-trace-definition "magit-log" "\
+Show log for the definition at point.
+
+(fn FILE FN COMMIT)" t)
+(autoload 'magit-log-merged "magit-log" "\
+Show log for the merge of COMMIT into BRANCH.
+
+More precisely, find merge commit M that brought COMMIT into
+BRANCH, and show the log of the range \"M^1..M\". If COMMIT is
+directly on BRANCH, then show approximately
+`magit-log-merged-commit-count' surrounding commits instead.
+
+This command requires git-when-merged, which is available from
+https://github.com/mhagger/git-when-merged.
+
+(fn COMMIT BRANCH &optional ARGS FILES)" t)
+(autoload 'magit-delete-shelved-branch "magit-log" "\
+Delete the shelved BRANCH.
+Delete a ref created by `magit-branch-shelve'.
+
+(fn BRANCH)" t)
+(autoload 'magit-log-move-to-parent "magit-log" "\
+Move to the Nth parent of the current commit.
+
+(fn &optional N)" t)
+(autoload 'magit-shortlog "magit-log" nil t)
+(autoload 'magit-shortlog-since "magit-log" "\
+Show a history summary for commits since REV.
+
+(fn COMMIT ARGS)" t)
+(autoload 'magit-shortlog-range "magit-log" "\
+Show a history summary for commit or range REV-OR-RANGE.
+
+(fn REV-OR-RANGE ARGS)" t)
+(autoload 'magit-cherry "magit-log" "\
+Show commits in a branch that are not merged in the upstream branch.
+
+(fn HEAD UPSTREAM)" t)
+(register-definition-prefixes "magit-log" '("magit-"))
+
+
+;;; Generated autoloads from magit-margin.el
+
+(register-definition-prefixes "magit-margin" '("magit-"))
+
+
+;;; Generated autoloads from magit-merge.el
+
+(autoload 'magit-merge "magit" nil t)
+(autoload 'magit-merge-plain "magit-merge" "\
+Merge commit REV into the current branch; using default message.
+
+Unless there are conflicts or a prefix argument is used create a
+merge commit using a generic commit message and without letting
+the user inspect the result.  With a prefix argument pretend the
+merge failed to give the user the opportunity to inspect the
+merge.
+
+To create an octopus-merge, separate branches with commas.
+
+(git merge --no-edit|--no-commit [ARGS] REV)
+
+(fn REV &optional ARGS NOCOMMIT)" t)
+(autoload 'magit-merge-editmsg "magit-merge" "\
+Merge commit REV into the current branch; and edit message.
+
+Perform the merge and prepare a commit message but let the user
+edit it.
+
+To create an octopus-merge, separate branches with commas.
+
+(git merge --edit --no-ff [ARGS] REV)
+
+(fn REV &optional ARGS)" t)
+(autoload 'magit-merge-nocommit "magit-merge" "\
+Merge commit REV into the current branch; pretending it failed.
+
+Pretend the merge failed to give the user the opportunity to
+inspect the merge and change the commit message.
+
+To create an octopus-merge, separate branches with commas.
+
+(git merge --no-commit --no-ff [ARGS] REV)
+
+(fn REV &optional ARGS)" t)
+(autoload 'magit-merge-dissolve "magit-merge" "\
+Merge the current branch into BRANCH and remove the former.
+
+Before merging, force push the source branch to its push-remote,
+provided the respective remote branch already exists, ensuring
+that the respective pull-request (if any) won't get stuck on some
+obsolete version of the commits that are being merged.  Finally
+if `forge-branch-pullreq' was used to create the merged branch,
+then also remove the respective remote branch.
+
+(fn BRANCH &optional ARGS)" t)
+(autoload 'magit-merge-absorb "magit-merge" "\
+Merge BRANCH into the current branch and remove the former.
+
+Before merging, force push the source branch to its push-remote,
+provided the respective remote branch already exists, ensuring
+that the respective pull-request (if any) won't get stuck on some
+obsolete version of the commits that are being merged.  Finally
+if `forge-branch-pullreq' was used to create the merged branch,
+then also remove the respective remote branch.
+
+(fn BRANCH &optional ARGS)" t)
+(autoload 'magit-merge-squash "magit-merge" "\
+Squash commit REV into the current branch; don't create a commit.
+
+(git merge --squash REV)
+
+(fn REV)" t)
+(autoload 'magit-merge-preview "magit-merge" "\
+Preview result of merging REV into the current branch.
+
+(fn REV)" t)
+(autoload 'magit-merge-abort "magit-merge" "\
+Abort the current merge operation.
+
+(git merge --abort)" t)
+(register-definition-prefixes "magit-merge" '("magit-"))
+
+
+;;; Generated autoloads from magit-mode.el
+
+(autoload 'magit-info "magit-mode" "\
+Visit the Magit manual." t)
+(register-definition-prefixes "magit-mode" '("magit-"))
+
+
+;;; Generated autoloads from magit-notes.el
+
+(autoload 'magit-notes "magit" nil t)
+(register-definition-prefixes "magit-notes" '("magit-notes-"))
+
+
+;;; Generated autoloads from magit-patch.el
+
+(autoload 'magit-patch "magit-patch" nil t)
+(autoload 'magit-patch-create "magit-patch" nil t)
+(autoload 'magit-patch-apply "magit-patch" nil t)
+(autoload 'magit-patch-save "magit-patch" "\
+Write current diff into patch FILE.
+
+What arguments are used to create the patch depends on the value
+of `magit-patch-save-arguments' and whether a prefix argument is
+used.
+
+If the value is the symbol `buffer', then use the same arguments
+as the buffer.  With a prefix argument use no arguments.
+
+If the value is a list beginning with the symbol `exclude', then
+use the same arguments as the buffer except for those matched by
+entries in the cdr of the list.  The comparison is done using
+`string-prefix-p'.  With a prefix argument use the same arguments
+as the buffer.
+
+If the value is a list of strings (including the empty list),
+then use those arguments.  With a prefix argument use the same
+arguments as the buffer.
+
+Of course the arguments that are required to actually show the
+same differences as those shown in the buffer are always used.
+
+(fn FILE &optional ARG)" t)
+(autoload 'magit-request-pull "magit-patch" "\
+Request upstream to pull from your public repository.
+
+URL is the url of your publicly accessible repository.
+START is a commit that already is in the upstream repository.
+END is the last commit, usually a branch name, which upstream
+is asked to pull.  START has to be reachable from that commit.
+
+(fn URL START END)" t)
+(register-definition-prefixes "magit-patch" '("magit-"))
+
+
+;;; Generated autoloads from magit-process.el
+
+(register-definition-prefixes "magit-process" '("magit-"))
+
+
+;;; Generated autoloads from magit-pull.el
+
+(autoload 'magit-pull "magit-pull" nil t)
+(autoload 'magit-pull-from-pushremote "magit-pull" nil t)
+(autoload 'magit-pull-from-upstream "magit-pull" nil t)
+(autoload 'magit-pull-into-upstream "magit-pull" nil t)
+(autoload 'magit-pull-branch "magit-pull" "\
+Pull from a branch read in the minibuffer.
+
+(fn SOURCE ARGS)" t)
+(register-definition-prefixes "magit-pull" '("magit-pull-"))
+
+
+;;; Generated autoloads from magit-push.el
+
+(autoload 'magit-push "magit-push" nil t)
+(autoload 'magit-push-current-to-pushremote "magit-push" nil t)
+(autoload 'magit-push-current-to-upstream "magit-push" nil t)
+(autoload 'magit-push-current "magit-push" "\
+Push the current branch to a branch read in the minibuffer.
+
+(fn TARGET ARGS)" t)
+(autoload 'magit-push-other "magit-push" "\
+Push an arbitrary branch or commit somewhere.
+Both the source and the target are read in the minibuffer.
+
+(fn SOURCE TARGET ARGS)" t)
+(autoload 'magit-push-refspecs "magit-push" "\
+Push one or multiple REFSPECS to a REMOTE.
+Both the REMOTE and the REFSPECS are read in the minibuffer.  To
+use multiple REFSPECS, separate them with commas.  Completion is
+only available for the part before the colon, or when no colon
+is used.
+
+(fn REMOTE REFSPECS ARGS)" t)
+(autoload 'magit-push-matching "magit-push" "\
+Push all matching branches to another repository.
+If multiple remotes exist, then read one from the user.
+If just one exists, use that without requiring confirmation.
+
+(fn REMOTE &optional ARGS)" t)
+(autoload 'magit-push-tags "magit-push" "\
+Push all tags to another repository.
+If only one remote exists, then push to that.  Otherwise prompt
+for a remote, offering the remote configured for the current
+branch as default.
+
+(fn REMOTE &optional ARGS)" t)
+(autoload 'magit-push-tag "magit-push" "\
+Push a tag to another repository.
+
+(fn TAG REMOTE &optional ARGS)" t)
+(autoload 'magit-push-notes-ref "magit-push" "\
+Push a notes ref to another repository.
+
+(fn REF REMOTE &optional ARGS)" t)
+(autoload 'magit-push-implicitly "magit-push" nil t)
+(autoload 'magit-push-to-remote "magit-push" nil t)
+(register-definition-prefixes "magit-push" '("magit-"))
+
+
+;;; Generated autoloads from magit-reflog.el
+
+(autoload 'magit-reflog-current "magit-reflog" "\
+Display the reflog of the current branch.
+If `HEAD' is detached, then show the reflog for that instead." t)
+(autoload 'magit-reflog-other "magit-reflog" "\
+Display the reflog of a branch or another ref.
+
+(fn REF)" t)
+(autoload 'magit-reflog-head "magit-reflog" "\
+Display the `HEAD' reflog." t)
+(register-definition-prefixes "magit-reflog" '("magit-reflog-"))
+
+
+;;; Generated autoloads from magit-refs.el
+
+(autoload 'magit-show-refs "magit-refs" nil t)
+(autoload 'magit-show-refs-head "magit-refs" "\
+List and compare references in a dedicated buffer.
+Compared with `HEAD'.
+
+(fn &optional ARGS)" t)
+(autoload 'magit-show-refs-current "magit-refs" "\
+List and compare references in a dedicated buffer.
+Compare with the current branch or `HEAD' if it is detached.
+
+(fn &optional ARGS)" t)
+(autoload 'magit-show-refs-other "magit-refs" "\
+List and compare references in a dedicated buffer.
+Compared with a branch read from the user.
+
+(fn &optional REF ARGS)" t)
+(register-definition-prefixes "magit-refs" '("magit-"))
+
+
+;;; Generated autoloads from magit-remote.el
+
+(autoload 'magit-remote "magit-remote" nil t)
+(autoload 'magit-remote-add "magit-remote" "\
+Add a remote named REMOTE and fetch it.
+
+(fn REMOTE URL &optional ARGS)" t)
+(autoload 'magit-remote-rename "magit-remote" "\
+Rename the remote named OLD to NEW.
+
+(fn OLD NEW)" t)
+(autoload 'magit-remote-remove "magit-remote" "\
+Delete the remote named REMOTE.
+
+(fn REMOTE)" t)
+(autoload 'magit-remote-prune "magit-remote" "\
+Remove stale remote-tracking branches for REMOTE.
+
+(fn REMOTE)" t)
+(autoload 'magit-remote-prune-refspecs "magit-remote" "\
+Remove stale refspecs for REMOTE.
+
+A refspec is stale if there no longer exists at least one branch
+on the remote that would be fetched due to that refspec.  A stale
+refspec is problematic because its existence causes Git to refuse
+to fetch according to the remaining non-stale refspecs.
+
+If only stale refspecs remain, then offer to either delete the
+remote or to replace the stale refspecs with the default refspec.
+
+Also remove the remote-tracking branches that were created due to
+the now stale refspecs.  Other stale branches are not removed.
+
+(fn REMOTE)" t)
+(autoload 'magit-remote-set-head "magit-remote" "\
+Set the local representation of REMOTE's default branch.
+Query REMOTE and set the symbolic-ref refs/remotes/<remote>/HEAD
+accordingly.  With a prefix argument query for the branch to be
+used, which allows you to select an incorrect value if you fancy
+doing that.
+
+(fn REMOTE &optional BRANCH)" t)
+(autoload 'magit-remote-unset-head "magit-remote" "\
+Unset the local representation of REMOTE's default branch.
+Delete the symbolic-ref \"refs/remotes/<remote>/HEAD\".
+
+(fn REMOTE)" t)
+(autoload 'magit-update-default-branch "magit-remote" nil t)
+(autoload 'magit-remote-unshallow "magit-remote" "\
+Convert a shallow remote into a full one.
+If only a single refspec is set and it does not contain a
+wildcard, then also offer to replace it with the standard
+refspec.
+
+(fn REMOTE)" t)
+(autoload 'magit-remote-configure "magit-remote" nil t)
+(register-definition-prefixes "magit-remote" '("magit-"))
+
+
+;;; Generated autoloads from magit-repos.el
+
+(autoload 'magit-list-repositories "magit-repos" "\
+Display a list of repositories.
+
+Use the option `magit-repository-directories' to control which
+repositories are displayed." t)
+(register-definition-prefixes "magit-repos" '("magit-"))
+
+
+;;; Generated autoloads from magit-reset.el
+
+(autoload 'magit-reset "magit" nil t)
+(autoload 'magit-reset-mixed "magit-reset" "\
+Reset the `HEAD' and index to COMMIT, but not the working tree.
+
+(git reset --mixed COMMIT)
+
+(fn COMMIT)" t)
+(autoload 'magit-reset-soft "magit-reset" "\
+Reset the `HEAD' to COMMIT, but not the index and working tree.
+
+(git reset --soft COMMIT)
+
+(fn COMMIT)" t)
+(autoload 'magit-reset-hard "magit-reset" "\
+Reset the `HEAD', index, and working tree to COMMIT.
+
+(git reset --hard COMMIT)
+
+(fn COMMIT)" t)
+(autoload 'magit-reset-keep "magit-reset" "\
+Reset the `HEAD' and index to COMMIT, while keeping uncommitted changes.
+
+(git reset --keep COMMIT)
+
+(fn COMMIT)" t)
+(autoload 'magit-reset-index "magit-reset" "\
+Reset the index to COMMIT.
+Keep the `HEAD' and working tree as-is, so if COMMIT refers to the
+head this effectively unstages all changes.
+
+(git reset COMMIT .)
+
+(fn COMMIT)" t)
+(autoload 'magit-reset-worktree "magit-reset" "\
+Reset the worktree to COMMIT.
+Keep the `HEAD' and index as-is.
+
+(fn COMMIT)" t)
+(autoload 'magit-reset-quickly "magit-reset" "\
+Reset the `HEAD' and index to COMMIT, and possibly the working tree.
+With a prefix argument reset the working tree otherwise don't.
+
+(git reset --mixed|--hard COMMIT)
+
+(fn COMMIT &optional HARD)" t)
+(register-definition-prefixes "magit-reset" '("magit-reset-"))
+
+
+;;; Generated autoloads from magit-sequence.el
+
+(autoload 'magit-sequencer-continue "magit-sequence" "\
+Resume the current cherry-pick or revert sequence." t)
+(autoload 'magit-sequencer-skip "magit-sequence" "\
+Skip the stopped at commit during a cherry-pick or revert sequence." t)
+(autoload 'magit-sequencer-abort "magit-sequence" "\
+Abort the current cherry-pick or revert sequence.
+This discards all changes made since the sequence started." t)
+(autoload 'magit-cherry-pick "magit-sequence" nil t)
+(autoload 'magit-cherry-copy "magit-sequence" "\
+Copy COMMITS from another branch onto the current branch.
+Prompt for a commit, defaulting to the commit at point.  If
+the region selects multiple commits, then pick all of them,
+without prompting.
+
+(fn COMMITS &optional ARGS)" t)
+(autoload 'magit-cherry-apply "magit-sequence" "\
+Apply the changes in COMMITS but do not commit them.
+Prompt for a commit, defaulting to the commit at point.  If
+the region selects multiple commits, then apply all of them,
+without prompting.
+
+(fn COMMITS &optional ARGS)" t)
+(autoload 'magit-cherry-harvest "magit-sequence" "\
+Move COMMITS from another BRANCH onto the current branch.
+Remove the COMMITS from BRANCH and stay on the current branch.
+If a conflict occurs, then you have to fix that and finish the
+process manually.
+
+(fn COMMITS BRANCH &optional ARGS)" t)
+(autoload 'magit-cherry-donate "magit-sequence" "\
+Move COMMITS from the current branch onto another existing BRANCH.
+Remove COMMITS from the current branch and stay on that branch.
+If a conflict occurs, then you have to fix that and finish the
+process manually.  `HEAD' is allowed to be detached initially.
+
+(fn COMMITS BRANCH &optional ARGS)" t)
+(autoload 'magit-cherry-spinout "magit-sequence" "\
+Move COMMITS from the current branch onto a new BRANCH.
+Remove COMMITS from the current branch and stay on that branch.
+If a conflict occurs, then you have to fix that and finish the
+process manually.
+
+(fn COMMITS BRANCH START-POINT &optional ARGS)" t)
+(autoload 'magit-cherry-spinoff "magit-sequence" "\
+Move COMMITS from the current branch onto a new BRANCH.
+Remove COMMITS from the current branch and checkout BRANCH.
+If a conflict occurs, then you have to fix that and finish
+the process manually.
+
+(fn COMMITS BRANCH START-POINT &optional ARGS)" t)
+(autoload 'magit-revert "magit-sequence" nil t)
+(autoload 'magit-revert-and-commit "magit-sequence" "\
+Revert COMMIT by creating a new commit.
+Prompt for a commit, defaulting to the commit at point.  If
+the region selects multiple commits, then revert all of them,
+without prompting.
+
+(fn COMMIT &optional ARGS)" t)
+(autoload 'magit-revert-no-commit "magit-sequence" "\
+Revert COMMIT by applying it in reverse to the worktree.
+Prompt for a commit, defaulting to the commit at point.  If
+the region selects multiple commits, then revert all of them,
+without prompting.
+
+(fn COMMIT &optional ARGS)" t)
+(autoload 'magit-am "magit-sequence" nil t)
+(autoload 'magit-am-apply-patches "magit-sequence" "\
+Apply the patches FILES.
+
+(fn &optional FILES ARGS)" t)
+(autoload 'magit-am-apply-maildir "magit-sequence" "\
+Apply the patches from MAILDIR.
+
+(fn &optional MAILDIR ARGS)" t)
+(autoload 'magit-am-continue "magit-sequence" "\
+Resume the current patch applying sequence." t)
+(autoload 'magit-am-skip "magit-sequence" "\
+Skip the stopped at patch during a patch applying sequence." t)
+(autoload 'magit-am-abort "magit-sequence" "\
+Abort the current patch applying sequence.
+This discards all changes made since the sequence started." t)
+(autoload 'magit-rebase "magit-sequence" nil t)
+(autoload 'magit-rebase-onto-pushremote "magit-sequence" nil t)
+(autoload 'magit-rebase-onto-upstream "magit-sequence" nil t)
+(autoload 'magit-rebase-branch "magit-sequence" "\
+Rebase the current branch onto a branch read in the minibuffer.
+All commits that are reachable from `HEAD' but not from the
+selected branch TARGET are being rebased.
+
+(fn TARGET ARGS)" t)
+(autoload 'magit-rebase-subset "magit-sequence" "\
+Rebase a subset of the current branch's history onto a new base.
+Rebase commits from START to `HEAD' onto NEWBASE.
+START has to be selected from a list of recent commits.
+
+(fn NEWBASE START ARGS)" t)
+(autoload 'magit-rebase-interactive "magit-sequence" "\
+Start an interactive rebase sequence.
+
+(fn COMMIT ARGS)" t)
+(autoload 'magit-rebase-autosquash "magit-sequence" "\
+Combine squash and fixup commits with their intended targets.
+By default only squash into commits that are not reachable from
+the upstream branch.  If no upstream is configured or with a prefix
+argument, prompt for the first commit to potentially squash into.
+
+(fn SELECT ARGS)" t)
+(autoload 'magit-rebase-edit-commit "magit-sequence" "\
+Edit a single older commit using rebase.
+
+(fn COMMIT ARGS)" t)
+(autoload 'magit-rebase-reword-commit "magit-sequence" "\
+Reword a single older commit using rebase.
+
+(fn COMMIT ARGS)" t)
+(autoload 'magit-rebase-remove-commit "magit-sequence" "\
+Remove a single older commit using rebase.
+
+(fn COMMIT ARGS)" t)
+(autoload 'magit-rebase-continue "magit-sequence" "\
+Restart the current rebasing operation.
+In some cases this pops up a commit message buffer for you do
+edit.  With a prefix argument the old message is reused as-is.
+
+(fn &optional NOEDIT)" t)
+(autoload 'magit-rebase-skip "magit-sequence" "\
+Skip the current commit and restart the current rebase operation." t)
+(autoload 'magit-rebase-edit "magit-sequence" "\
+Edit the todo list of the current rebase operation." t)
+(autoload 'magit-rebase-abort "magit-sequence" "\
+Abort the current rebase operation, restoring the original branch." t)
+(register-definition-prefixes "magit-sequence" '("magit-"))
+
+
+;;; Generated autoloads from magit-sparse-checkout.el
+
+(autoload 'magit-sparse-checkout "magit-sparse-checkout" nil t)
+(autoload 'magit-sparse-checkout-enable "magit-sparse-checkout" "\
+Convert the working tree to a sparse checkout.
+
+(fn &optional ARGS)" t)
+(autoload 'magit-sparse-checkout-set "magit-sparse-checkout" "\
+Restrict working tree to DIRECTORIES.
+To extend rather than override the currently configured
+directories, call `magit-sparse-checkout-add' instead.
+
+(fn DIRECTORIES)" t)
+(autoload 'magit-sparse-checkout-add "magit-sparse-checkout" "\
+Add DIRECTORIES to the working tree.
+To override rather than extend the currently configured
+directories, call `magit-sparse-checkout-set' instead.
+
+(fn DIRECTORIES)" t)
+(autoload 'magit-sparse-checkout-reapply "magit-sparse-checkout" "\
+Reapply the sparse checkout rules to the working tree.
+Some operations such as merging or rebasing may need to check out
+files that aren't included in the sparse checkout.  Call this
+command to reset to the sparse checkout state." t)
+(autoload 'magit-sparse-checkout-disable "magit-sparse-checkout" "\
+Convert sparse checkout to full checkout.
+Note that disabling the sparse checkout does not clear the
+configured directories.  Call `magit-sparse-checkout-enable' to
+restore the previous sparse checkout." t)
+(register-definition-prefixes "magit-sparse-checkout" '("magit-sparse-checkout-"))
+
+
+;;; Generated autoloads from magit-stash.el
+
+(autoload 'magit-stash "magit-stash" nil t)
+(autoload 'magit-stash-both "magit-stash" "\
+Create a stash of the index and working tree.
+Untracked files are included according to infix arguments.
+One prefix argument is equivalent to \"--include-untracked\"
+while two prefix arguments are equivalent to \"--all\".
+
+(fn MESSAGE &optional INCLUDE-UNTRACKED)" t)
+(autoload 'magit-stash-index "magit-stash" "\
+Create a stash of the index only.
+Unstaged and untracked changes are not stashed.  The stashed
+changes are applied in reverse to both the index and the
+worktree.  This command can fail when the worktree is not clean.
+Applying the resulting stash has the inverse effect.
+
+(fn MESSAGE)" t)
+(autoload 'magit-stash-worktree "magit-stash" "\
+Create a stash of unstaged changes in the working tree.
+Untracked files are included according to infix arguments.
+One prefix argument is equivalent to \"--include-untracked\"
+while two prefix arguments are equivalent to \"--all\".
+
+(fn MESSAGE &optional INCLUDE-UNTRACKED)" t)
+(autoload 'magit-stash-keep-index "magit-stash" "\
+Create a stash of the index and working tree, keeping index intact.
+Untracked files are included according to infix arguments.
+One prefix argument is equivalent to \"--include-untracked\"
+while two prefix arguments are equivalent to \"--all\".
+
+(fn MESSAGE &optional INCLUDE-UNTRACKED)" t)
+(autoload 'magit-snapshot-both "magit-stash" "\
+Create a snapshot of the index and working tree.
+Untracked files are included according to infix arguments.
+One prefix argument is equivalent to \"--include-untracked\"
+while two prefix arguments are equivalent to \"--all\".
+
+(fn &optional INCLUDE-UNTRACKED)" t)
+(autoload 'magit-snapshot-index "magit-stash" "\
+Create a snapshot of the index only.
+Unstaged and untracked changes are not stashed." t)
+(autoload 'magit-snapshot-worktree "magit-stash" "\
+Create a snapshot of unstaged changes in the working tree.
+Untracked files are included according to infix arguments.
+One prefix argument is equivalent to \"--include-untracked\"
+while two prefix arguments are equivalent to \"--all\".
+
+(fn &optional INCLUDE-UNTRACKED)" t)
+(autoload 'magit-stash-push "magit-stash" nil t)
+(autoload 'magit-stash-apply "magit-stash" "\
+Apply a stash to the working tree.
+
+When using a Git release before v2.38.0, simply run \"git stash
+apply\" or with a prefix argument \"git stash apply --index\".
+
+When using Git v2.38.0 or later, behave more intelligently:
+
+First try \"git stash apply --index\", which tries to preserve the
+index stored in the stash, if any.  This may fail because applying
+the stash could result in conflicts and those have to be stored in
+the index, making it impossible to also store the stash's index
+there.
+
+If \"git stash\" fails, then potentially fall back to using \"git
+apply\".  If the stash does not touch any unstaged files, then pass
+\"--3way\" to that command.  Otherwise ask the user whether to use
+that argument or \"--reject\".  Customize `magit-no-confirm' if you
+want to fall back to using \"--3way\", without being prompted.
+
+(fn STASH)" t)
+(autoload 'magit-stash-pop "magit-stash" "\
+Apply a stash to the working tree, on success remove it from stash list.
+
+When using a Git release before v2.38.0, simply run \"git stash
+pop\" or with a prefix argument \"git stash pop --index\".
+
+When using Git v2.38.0 or later, behave more intelligently:
+
+First try \"git stash apply --index\", which tries to preserve the
+index stored in the stash, if any.  This may fail because applying
+the stash could result in conflicts and those have to be stored in
+the index, making it impossible to also store the stash's index
+there.
+
+If \"git stash\" fails, then potentially fall back to using \"git
+apply\".  If the stash does not touch any unstaged files, then pass
+\"--3way\" to that command.  Otherwise ask the user whether to use
+that argument or \"--reject\".  Customize `magit-no-confirm' if you
+want to fall back to using \"--3way\", without being prompted.
+
+(fn STASH)" t)
+(autoload 'magit-stash-drop "magit-stash" "\
+Remove a stash from the stash list.
+When the region is active offer to drop all contained stashes.
+
+(fn STASH)" t)
+(autoload 'magit-stash-clear "magit-stash" "\
+Remove all stashes saved in REF's reflog by deleting REF.
+
+(fn REF)" t)
+(autoload 'magit-stash-branch "magit-stash" "\
+Create and checkout a new BRANCH from an existing STASH.
+The new branch starts at the commit that was current when the
+stash was created.  If the stash applies cleanly, then drop it.
+
+(fn STASH BRANCH)" t)
+(autoload 'magit-stash-branch-here "magit-stash" "\
+Create and checkout a new BRANCH from an existing STASH.
+Use the current branch or `HEAD' as the starting-point of BRANCH.
+Then apply STASH, dropping it if it applies cleanly.
+
+(fn STASH BRANCH)" t)
+(autoload 'magit-stash-format-patch "magit-stash" "\
+Create a patch from STASH.
+
+(fn STASH)" t)
+(autoload 'magit-stash-list "magit-stash" "\
+List all stashes in a buffer." t)
+(autoload 'magit-stash-show "magit-stash" "\
+Show all diffs of a stash in a buffer.
+
+(fn STASH &optional ARGS FILES)" t)
+(register-definition-prefixes "magit-stash" '("magit-"))
+
+
+;;; Generated autoloads from magit-status.el
+
+(autoload 'magit-init "magit-status" "\
+Initialize a Git repository, then show its status.
+
+If the directory is below an existing repository, then the user
+has to confirm that a new one should be created inside.  If the
+directory is the root of the existing repository, then the user
+has to confirm that it should be reinitialized.
+
+Non-interactively DIRECTORY is (re-)initialized unconditionally.
+
+(fn DIRECTORY)" t)
+(autoload 'magit-status "magit-status" "\
+Show the status of the current Git repository in a buffer.
+
+If the current directory isn't located within a Git repository,
+then prompt for an existing repository or an arbitrary directory,
+depending on option `magit-repository-directories', and show the
+status of the selected repository instead.
+
+* If that option specifies any existing repositories, then offer
+  those for completion and show the status buffer for the
+  selected one.
+
+* Otherwise read an arbitrary directory using regular file-name
+  completion.  If the selected directory is the top-level of an
+  existing working tree, then show the status buffer for that.
+
+* Otherwise offer to initialize the selected directory as a new
+  repository.  After creating the repository show its status
+  buffer.
+
+These fallback behaviors can also be forced using one or more
+prefix arguments:
+
+* With two prefix arguments (or more precisely a numeric prefix
+  value of 16 or greater) read an arbitrary directory and act on
+  it as described above.  The same could be accomplished using
+  the command `magit-init'.
+
+* With a single prefix argument read an existing repository, or
+  if none can be found based on `magit-repository-directories',
+  then fall back to the same behavior as with two prefix
+  arguments.
+
+(fn &optional DIRECTORY CACHE)" t)
+(defalias 'magit #'magit-status "\
+Begin using Magit.
+
+This alias for `magit-status' exists for better discoverability.
+
+Instead of invoking this alias for `magit-status' using
+\"M-x magit RET\", you should bind a key to `magit-status'
+and read the info node `(magit)Getting Started', which
+also contains other useful hints.")
+(autoload 'magit-status-here "magit-status" "\
+Like `magit-status' but with non-nil `magit-status-goto-file-position'.
+Before doing so, save all file-visiting buffers belonging to the current
+repository without prompting." t)
+(autoload 'magit-status-quick "magit-status" "\
+Show the status of the current Git repository, maybe without refreshing.
+
+If the status buffer of the current Git repository exists but
+isn't being displayed in the selected frame, then display it
+without refreshing it.
+
+If the status buffer is being displayed in the selected frame,
+then also refresh it.
+
+Prefix arguments have the same meaning as for `magit-status',
+and additionally cause the buffer to be refresh.
+
+To use this function instead of `magit-status', add this to your
+init file: (global-set-key (kbd \"C-x g\") \\='magit-status-quick).
+
+Non-interactively another repository can be specified using the
+optional DIRECTORY argument, which must then name the top-level
+directory of an existing repository.
+
+(fn &optional DIRECTORY)" t)
+(autoload 'magit-status-setup-buffer "magit-status" "\
+
+
+(fn &optional DIRECTORY)")
+(register-definition-prefixes "magit-status" '("magit-"))
+
+
+;;; Generated autoloads from magit-submodule.el
+
+(autoload 'magit-submodule "magit-submodule" nil t)
+(autoload 'magit-submodule-add "magit-submodule" nil t)
+(autoload 'magit-submodule-read-name-for-path "magit-submodule" "\
+
+
+(fn PATH &optional PREFER-SHORT)")
+(autoload 'magit-submodule-register "magit-submodule" nil t)
+(autoload 'magit-submodule-populate "magit-submodule" nil t)
+(autoload 'magit-submodule-update "magit-submodule" nil t)
+(autoload 'magit-submodule-synchronize "magit-submodule" nil t)
+(autoload 'magit-submodule-unpopulate "magit-submodule" nil t)
+(autoload 'magit-submodule-remove "magit-submodule" "\
+Unregister MODULES and remove their working directories.
+
+For safety reasons, do not remove the gitdirs and if a module has
+uncommitted changes, then do not remove it at all.  If a module's
+gitdir is located inside the working directory, then move it into
+the gitdir of the superproject first.
+
+With the \"--force\" argument offer to remove dirty working
+directories and with a prefix argument offer to delete gitdirs.
+Both actions are very dangerous and have to be confirmed.  There
+are additional safety precautions in place, so you might be able
+to recover from making a mistake here, but don't count on it.
+
+(fn MODULES ARGS TRASH-GITDIRS)" t)
+(autoload 'magit-insert-modules "magit-submodule" "\
+Insert submodule sections.
+Hook `magit-module-sections-hook' controls which module sections
+are inserted, and option `magit-module-sections-nested' controls
+whether they are wrapped in an additional section.")
+(autoload 'magit-insert-modules-overview "magit-submodule" "\
+Insert sections for all modules.
+For each section insert the path and the output of \"git describe --tags\",
+or, failing that, the abbreviated HEAD commit hash.")
+(autoload 'magit-insert-modules-unpulled-from-upstream "magit-submodule" "\
+Insert sections for modules that haven't been pulled from the upstream.
+These sections can be expanded to show the respective commits.")
+(autoload 'magit-insert-modules-unpulled-from-pushremote "magit-submodule" "\
+Insert sections for modules that haven't been pulled from the push-remote.
+These sections can be expanded to show the respective commits.")
+(autoload 'magit-insert-modules-unpushed-to-upstream "magit-submodule" "\
+Insert sections for modules that haven't been pushed to the upstream.
+These sections can be expanded to show the respective commits.")
+(autoload 'magit-insert-modules-unpushed-to-pushremote "magit-submodule" "\
+Insert sections for modules that haven't been pushed to the push-remote.
+These sections can be expanded to show the respective commits.")
+(autoload 'magit-list-submodules "magit-submodule" "\
+Display a list of the current repository's populated submodules." t)
+(register-definition-prefixes "magit-submodule" '("magit-"))
+
+
+;;; Generated autoloads from magit-subtree.el
+
+(autoload 'magit-subtree "magit-subtree" nil t)
+(autoload 'magit-subtree-import "magit-subtree" nil t)
+(autoload 'magit-subtree-export "magit-subtree" nil t)
+(autoload 'magit-subtree-add "magit-subtree" "\
+Add REF from REPOSITORY as a new subtree at PREFIX.
+
+(fn PREFIX REPOSITORY REF ARGS)" t)
+(autoload 'magit-subtree-add-commit "magit-subtree" "\
+Add COMMIT as a new subtree at PREFIX.
+
+(fn PREFIX COMMIT ARGS)" t)
+(autoload 'magit-subtree-merge "magit-subtree" "\
+Merge COMMIT into the PREFIX subtree.
+
+(fn PREFIX COMMIT ARGS)" t)
+(autoload 'magit-subtree-pull "magit-subtree" "\
+Pull REF from REPOSITORY into the PREFIX subtree.
+
+(fn PREFIX REPOSITORY REF ARGS)" t)
+(autoload 'magit-subtree-push "magit-subtree" "\
+Extract the history of the subtree PREFIX and push it to REF on REPOSITORY.
+
+(fn PREFIX REPOSITORY REF ARGS)" t)
+(autoload 'magit-subtree-split "magit-subtree" "\
+Extract the history of the subtree PREFIX.
+
+(fn PREFIX COMMIT ARGS)" t)
+(register-definition-prefixes "magit-subtree" '("magit-"))
+
+
+;;; Generated autoloads from magit-tag.el
+
+(autoload 'magit-tag "magit" nil t)
+(autoload 'magit-tag-create "magit-tag" "\
+Create a new tag with the given NAME at COMMIT.
+With a prefix argument annotate the tag.
+
+(git tag [--annotate] NAME REV)
+
+(fn NAME COMMIT &optional ARGS)" t)
+(autoload 'magit-tag-delete "magit-tag" "\
+Delete one or more tags.
+If the region marks multiple tags (and nothing else), then offer
+to delete those, otherwise prompt for a single tag to be deleted,
+defaulting to the tag at point.
+
+(git tag -d TAGS)
+
+(fn TAGS)" t)
+(autoload 'magit-tag-prune "magit-tag" "\
+Offer to delete tags missing locally from REMOTE, and vice versa.
+
+(fn TAGS REMOTE-TAGS REMOTE)" t)
+(autoload 'magit-tag-release "magit-tag" "\
+Create a release tag for `HEAD'.
+
+Assume that release tags match `magit-release-tag-regexp'.
+
+If `HEAD's message matches `magit-release-commit-regexp', then
+base the tag on the version string specified by that.  Otherwise
+prompt for the name of the new tag using the highest existing
+tag as initial input and leaving it to the user to increment the
+desired part of the version string.
+
+When creating an annotated tag, prepare a message based on the message
+of the highest existing tag, provided that contains the corresponding
+version string, and substituting the new version string for that.  If
+that is not the case, propose a message using a reasonable format.
+
+(fn TAG MSG &optional ARGS)" t)
+(register-definition-prefixes "magit-tag" '("magit-"))
+
+
+;;; Generated autoloads from magit-transient.el
+
+(register-definition-prefixes "magit-transient" '("magit-"))
+
+
+;;; Generated autoloads from magit-wip.el
+
+(defvar magit-wip-mode nil "\
+Non-nil if Magit-Wip mode is enabled.
+See the `magit-wip-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 `magit-wip-mode'.")
+(custom-autoload 'magit-wip-mode "magit-wip" nil)
+(autoload 'magit-wip-mode "magit-wip" "\
+Automatically save uncommitted changes to work-in-progress refs.
+
+This is a global minor mode.  If called interactively, toggle the
+`Magit-Wip mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='magit-wip-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "magit-wip" '("magit-"))
+
+
+;;; Generated autoloads from magit-worktree.el
+
+(autoload 'magit-worktree "magit-worktree" nil t)
+(autoload 'magit-worktree-checkout "magit-worktree" "\
+Checkout COMMIT in a new worktree in DIRECTORY.
+COMMIT may, but does not have to be, a local branch.
+Interactively, use `magit-read-worktree-directory-function'.
+
+(fn DIRECTORY COMMIT)" t)
+(autoload 'magit-worktree-branch "magit-worktree" "\
+Create a new BRANCH and check it out in a new worktree at DIRECTORY.
+Interactively, use `magit-read-worktree-directory-function'.
+
+(fn DIRECTORY BRANCH START-POINT)" t)
+(autoload 'magit-worktree-move "magit-worktree" "\
+Move existing WORKTREE directory to DIRECTORY.
+
+(fn WORKTREE DIRECTORY)" t)
+(register-definition-prefixes "magit-worktree" '("magit-"))
+
+;;; End of scraped data
+
+(provide 'magit-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; magit-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-autorevert.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-autorevert.el
new file mode 100644
index 0000000..9742806
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-autorevert.el
@@ -0,0 +1,278 @@
+;;; magit-autorevert.el --- Revert buffers when files in repository change  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for automatically reverting buffers
+;; when visited files in the repository change.
+
+;; See (info "(magit)Automatic Reverting of File-Visiting Buffers").
+
+;;; Code:
+
+(require 'autorevert)
+(require 'compat)
+
+(declare-function magit-file-tracked-p "magit-git" (file))
+(declare-function magit-toplevel "magit-git" (&optional directory))
+(declare-function magit-git-executable "magit-git" ())
+
+;;; Options
+
+(defgroup magit-auto-revert nil
+  "Revert buffers when files in repository change."
+  :link '(custom-group-link auto-revert)
+  :link '(info-link "(magit)Automatic Reverting of File-Visiting Buffers")
+  :group 'auto-revert
+  :group 'magit-essentials
+  :group 'magit-modes)
+
+(defcustom auto-revert-buffer-list-filter nil
+  "Filter that determines which buffers `auto-revert-buffers' reverts.
+
+This option is provided by Magit, which also advises
+`auto-revert-buffers' to respect it.  Magit users who do not turn
+on the local mode `auto-revert-mode' themselves, are best served
+by setting the value to `magit-auto-revert-repository-buffer-p'.
+
+However the default is nil, so as not to disturb users who do use
+the local mode directly.  If you experience delays when running
+Magit commands, then you should consider using one of the
+predicates provided by Magit - especially if you also use Tramp.
+
+Users who do turn on `auto-revert-mode' in buffers in which Magit
+doesn't do that for them, should likely not use any filter.
+Users who turn on `global-auto-revert-mode', do not have to worry
+about this option, because it is disregarded if the global mode
+is enabled."
+  :package-version '(magit . "2.4.2")
+  :group 'auto-revert
+  :group 'magit-auto-revert
+  :group 'magit-related
+  :type `(radio (const :tag "No filter" nil)
+                (function-item ,#'magit-auto-revert-buffer-p)
+                (function-item ,#'magit-auto-revert-repository-buffer-p)
+                function))
+
+(defcustom magit-auto-revert-tracked-only t
+  "Whether `magit-auto-revert-mode' only reverts tracked files."
+  :package-version '(magit . "2.4.0")
+  :group 'magit-auto-revert
+  :type 'boolean
+  :set (lambda (var val)
+         (set var val)
+         (when (and (bound-and-true-p magit-auto-revert-mode)
+                    (featurep 'magit-autorevert))
+           (magit-auto-revert-mode -1)
+           (magit-auto-revert-mode))))
+
+(defcustom magit-auto-revert-immediately t
+  "Whether Magit reverts buffers immediately.
+
+If this is non-nil and either `global-auto-revert-mode' or
+`magit-auto-revert-mode' is enabled, then Magit immediately
+reverts buffers by explicitly calling `auto-revert-buffers'
+after running Git for side-effects.
+
+If `auto-revert-use-notify' is non-nil (and file notifications
+are actually supported), then `magit-auto-revert-immediately'
+does not have to be non-nil, because the reverts happen
+immediately anyway.
+
+If `magit-auto-revert-immediately' and `auto-revert-use-notify'
+are both nil, then reverts happen after `auto-revert-interval'
+seconds of user inactivity.  That is not desirable."
+  :package-version '(magit . "2.4.0")
+  :group 'magit-auto-revert
+  :type 'boolean)
+
+;;; Mode
+
+;;;###autoload
+(progn ; magit-auto-revert-mode--initialize
+  (defun magit-auto-revert-mode--initialize (symbol value)
+    (internal--define-uninitialized-variable symbol)
+    (if (not load-file-name)
+        (custom-initialize-set symbol value)
+      ;; Bugs in package managers prevent the use of lexical
+      ;; bindings in autoloaded code.  See #5476 and #5485.
+      (defalias 'magit-auto-revert-mode--after-load
+        (apply-partially
+         (lambda (symbol value mode-file file)
+           (when (equal file mode-file)
+             (remove-hook 'after-load-functions
+                          'magit-auto-revert-mode--after-load)
+             (fmakunbound 'magit-auto-revert-mode--after-load)
+             (if after-init-time
+                 (custom-initialize-set symbol value)
+               ;; Delay activation in case the user disables the mode
+               ;; after loading this library but still during startup.
+               (defalias 'magit-auto-revert-mode--after-init
+                 (apply-partially
+                  (lambda (symbol value)
+                    (remove-hook 'after-init-hook
+                                 'magit-auto-revert-mode--after-init)
+                    (fmakunbound 'magit-auto-revert-mode--after-init)
+                    (custom-initialize-set symbol value))
+                  symbol value))
+               (add-hook 'after-init-hook 'magit-auto-revert-mode--after-init))))
+         symbol value load-file-name))
+      (add-hook 'after-load-functions 'magit-auto-revert-mode--after-load))))
+
+(defun magit-turn-on-auto-revert-mode-if-desired (&optional file)
+  (cond (file
+         (let ((buffer (find-buffer-visiting file)))
+           (when buffer
+             (with-current-buffer buffer
+               (magit-turn-on-auto-revert-mode-if-desired)))))
+        ((and (not auto-revert-mode)        ; see #3014
+              (not global-auto-revert-mode) ; see #3460
+              buffer-file-name
+              (or auto-revert-remote-files  ; see #5422
+                  (not (file-remote-p buffer-file-name)))
+              (file-readable-p buffer-file-name)
+              (require 'magit-process)
+              (executable-find (magit-git-executable) t)
+              (magit-toplevel)
+              (or (not magit-auto-revert-tracked-only)
+                  (magit-file-tracked-p buffer-file-name)))
+         (auto-revert-mode 1))))
+
+;;;###autoload
+(define-globalized-minor-mode magit-auto-revert-mode auto-revert-mode
+  magit-turn-on-auto-revert-mode-if-desired
+  :package-version '(magit . "2.4.0")
+  :link '(info-link "(magit)Automatic Reverting of File-Visiting Buffers")
+  :group 'magit-auto-revert
+  :group 'magit-essentials
+  :init-value (not (or global-auto-revert-mode noninteractive))
+  :initialize #'magit-auto-revert-mode--initialize)
+
+(defun magit-auto-revert-mode--disable ()
+  "When enabling `global-auto-revert-mode', disable `magit-auto-revert-mode'."
+  (when (and global-auto-revert-mode
+             (bound-and-true-p magit-auto-revert-mode))
+    (magit-auto-revert-mode -1)))
+
+(add-hook 'global-auto-revert-mode-hook #'magit-auto-revert-mode--disable)
+
+(put 'magit-auto-revert-mode 'function-documentation
+     "Toggle Magit Auto Revert mode.
+
+If called interactively, enable Magit Auto Revert mode if ARG is
+positive, and disable it if ARG is zero or negative.  If called
+from Lisp, also enable the mode if ARG is omitted or nil, and
+toggle it if ARG is `toggle'; disable the mode otherwise.
+
+Magit Auto Revert mode is a global minor mode that reverts
+buffers associated with a file that is located inside a Git
+repository when the file changes on disk.  Use `auto-revert-mode'
+to revert a particular buffer.  Or use `global-auto-revert-mode'
+to revert all file-visiting buffers, not just those that visit
+a file located inside a Git repository.
+
+This global mode works by turning on the buffer-local mode
+`auto-revert-mode' at the time a buffer is first created.  The
+local mode is turned on if the visited file is being tracked in
+a Git repository at the time when the buffer is created.
+
+If `magit-auto-revert-tracked-only' is non-nil (the default),
+then only tracked files are reverted.  But if you stage a
+previously untracked file using `magit-stage', then this mode
+notices that.
+
+Unlike `global-auto-revert-mode', this mode never reverts any
+buffers that are not visiting files.
+
+The behavior of this mode can be customized using the options
+in the `autorevert' and `magit-autorevert' groups.
+
+This function calls the hook `magit-auto-revert-mode-hook'.
+
+Like nearly every mode, this mode should be enabled or disabled
+by calling the respective mode function, the reason being that
+changing the state of a mode involves more than merely toggling
+a single switch, so setting the mode variable is not enough.
+Also, you should not use `after-init-hook' to disable this mode.
+
+\(fn &optional ARG)")
+
+;;;###autoload
+(defun magit-auto-revert-buffers ()
+  (when (and magit-auto-revert-immediately
+             (or global-auto-revert-mode
+                 (and magit-auto-revert-mode auto-revert-buffer-list)))
+    (let ((auto-revert-buffer-list-filter
+           (or auto-revert-buffer-list-filter
+               #'magit-auto-revert-repository-buffer-p)))
+      (auto-revert-buffers))))
+
+(defvar magit-auto-revert-toplevel nil)
+
+(defvar magit-auto-revert-counter 1
+  "Incremented each time `auto-revert-buffers' is called.")
+
+(defun magit-auto-revert-buffer-p (buffer)
+  "Return non-nil if BUFFER visits a file inside the current repository.
+The current repository is the one containing `default-directory'.
+If there is no current repository, then return t for any BUFFER."
+  (magit-auto-revert-repository-buffer-p buffer t))
+
+(defun magit-auto-revert-repository-buffer-p (buffer &optional fallback)
+  "Return non-nil if BUFFER visits a file inside the current repository.
+The current repository is the one containing `default-directory'.
+If there is no current repository, then return FALLBACK (which
+defaults to nil) for any BUFFER."
+  ;; Call `magit-toplevel' just once per cycle.
+  (unless (and magit-auto-revert-toplevel
+               (= (cdr magit-auto-revert-toplevel)
+                  magit-auto-revert-counter))
+    (require 'magit-process)
+    (setq magit-auto-revert-toplevel
+          (cons (or (magit-toplevel) 'no-repo)
+                magit-auto-revert-counter)))
+  (let ((top (car magit-auto-revert-toplevel)))
+    (if (eq top 'no-repo)
+        fallback
+      (let ((dir (buffer-local-value 'default-directory buffer)))
+        (and (equal (file-remote-p dir)
+                    (file-remote-p top))
+             ;; ^ `tramp-handle-file-in-directory-p' lacks this optimization.
+             (file-in-directory-p dir top))))))
+
+(define-advice auto-revert-buffers (:around (fn) buffer-list-filter)
+  (incf magit-auto-revert-counter)
+  (if (or global-auto-revert-mode
+          (not auto-revert-buffer-list)
+          (not auto-revert-buffer-list-filter))
+      (funcall fn)
+    (let ((auto-revert-buffer-list
+           (seq-filter auto-revert-buffer-list-filter
+                       auto-revert-buffer-list)))
+      (funcall fn))
+    (unless auto-revert-timer
+      (auto-revert-set-timer))))
+
+;;; _
+(provide 'magit-autorevert)
+;; `cond-let' intentionally not used.
+;;; magit-autorevert.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-autorevert.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-autorevert.elc
new file mode 100644
index 0000000..7a7996c
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-autorevert.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-base.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-base.el
new file mode 100644
index 0000000..9a0440e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-base.el
@@ -0,0 +1,1239 @@
+;;; magit-base.el --- Early birds  -*- lexical-binding:t; coding:utf-8 -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;; This file contains code taken from GNU Emacs, which is
+;; Copyright (C) 1976-2023 Free Software Foundation, Inc.
+
+;;; Commentary:
+
+;; This library defines utility functions, options and other things that
+;; have to be available early on because they are used by several other
+;; libraries, which cannot depend on one another, because that would lead
+;; to circular dependencies.
+
+;;; Code:
+
+;; Also update EMACS_VERSION in "default.mk".
+(defconst magit--minimal-emacs "28.1")
+(defconst magit--minimal-git "2.25.0")
+
+(require 'cl-lib)
+(require 'compat)
+(require 'cond-let)
+(require 'eieio)
+(require 'llama) ; For (##these ...) see M-x describe-function RET # # RET.
+(require 'subr-x)
+
+(require 'crm)
+
+(require 'magit-section)
+
+(eval-when-compile (require 'info))
+(declare-function Info-get-token "info" (pos start all &optional errorstring))
+
+(eval-when-compile (require 'vc-git))
+(declare-function vc-git--run-command-string "vc-git" (file &rest args))
+
+(eval-when-compile (require 'which-func))
+(declare-function which-function "which-func" ())
+
+;;; Options
+
+(defcustom magit-completing-read-function #'magit-builtin-completing-read
+  "Function to be called when requesting input from the user.
+
+The default, `magit-builtin-completing-read', support third-party
+completion frameworks, including `vertico-mode', `ivy-mode' and
+`helm-mode'.
+
+However, if you would like to use Ivy or Helm completion with Magit but
+not enable the respective modes globally, then customize this option to
+use `ivy-completing-read' or `helm--completing-read-default'.
+
+If you still use `ido-mode', you'll likely need the `magit-ido' package."
+  :group 'magit-essentials
+  :type `(radio (function-item ,#'magit-builtin-completing-read)
+                (function-item ivy-completing-read)
+                (function-item helm--completing-read-default)
+                (function :tag "Other function")))
+
+(defcustom magit-dwim-selection
+  ;; Do not function-quote to avoid circular dependencies.
+  '((magit-stash-apply        nil t)
+    (magit-ediff-resolve-all  nil t)
+    (magit-ediff-resolve-rest nil t)
+    (magit-stash-branch       nil t)
+    (magit-stash-branch-here  nil t)
+    (magit-stash-format-patch nil t)
+    (magit-stash-drop         nil ask)
+    (magit-stash-pop          nil ask))
+  "When not to offer alternatives and ask for confirmation.
+
+Many commands by default ask the user to select from a list of
+possible candidates.  They do so even when there is a thing at
+point that they can act on, which is then offered as the default.
+
+This option can be used to tell certain commands to use the thing
+at point instead of asking the user to select a candidate to act
+on, with or without confirmation.
+
+The value has the form ((COMMAND nil|PROMPT DEFAULT)...).
+
+- COMMAND is the command that should not prompt for a choice.
+  To have an effect, the command has to use the function
+  `magit-completing-read' or a utility function which in turn uses
+  that function.
+
+- If the command uses `magit-completing-read' multiple times, then
+  PROMPT can be used to only affect one of these uses.  PROMPT, if
+  non-nil, is a regular expression that is used to match against
+  the PROMPT argument passed to `magit-completing-read'.
+
+- DEFAULT specifies how to use the default.  If it is t, then
+  the DEFAULT argument passed to `magit-completing-read' is used
+  without confirmation.  If it is `ask', then the user is given
+  a chance to abort.  DEFAULT can also be nil, in which case the
+  entry has no effect."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-commands
+  :type '(repeat
+          (list (symbol :tag "Command") ; It might not be fboundp yet.
+                (choice (const  :tag "For all prompts" nil)
+                        (regexp :tag "For prompts matching regexp"))
+                (choice (const  :tag "Offer other choices" nil)
+                        (const  :tag "Require confirmation" ask)
+                        (const  :tag "Use default without confirmation" t)))))
+
+(defconst magit--confirm-actions
+  '((const discard)
+    (const reverse)
+    (const stage-all-changes)
+    (const unstage-all-changes)
+    (const delete)
+    (const trash)
+    (const resurrect)
+    (const untrack)
+    (const rename)
+    (const reset-bisect)
+    (const abort-cherry-pick)
+    (const abort-revert)
+    (const abort-rebase)
+    (const abort-merge)
+    (const merge-dirty)
+    (const delete-unmerged-branch)
+    (const delete-branch-on-remote)
+    (const delete-pr-remote)
+    (const drop-stashes)
+    (const set-and-push)
+    (const amend-published)
+    (const rebase-published)
+    (const edit-published)
+    (const remove-modules)
+    (const remove-dirty-modules)
+    (const trash-module-gitdirs)
+    (const stash-apply-3way)
+    (const kill-process)
+    (const safe-with-wip)))
+
+(defcustom magit-no-confirm '(set-and-push)
+  "A list of symbols for actions Magit should not confirm, or t.
+
+Many potentially dangerous commands by default ask the user for
+confirmation.  Each of the below symbols stands for an action
+which, when invoked unintentionally or without being fully aware
+of the consequences, could lead to tears.  In many cases there
+are several commands that perform variations of a certain action,
+so we don't use the command names but more generic symbols.
+
+Applying changes:
+
+  `discard' Discarding one or more changes (i.e., hunks or the
+  complete diff for a file) loses that change, obviously.
+
+  `reverse' Reverting one or more changes can usually be undone
+  by reverting the reversion.
+
+  `stage-all-changes', `unstage-all-changes' When there are both
+  staged and unstaged changes, then un-/staging everything would
+  destroy that distinction.  Of course that also applies when
+  un-/staging a single change, but then less is lost and one does
+  that so often that having to confirm every time would be
+  unacceptable.
+
+Files:
+
+  `delete' When a file that isn't yet tracked by Git is deleted
+  then it is completely lost, not just the last changes.  Very
+  dangerous.
+
+  `trash' Instead of deleting a file it can also be move to the
+  system trash.  Obviously much less dangerous than deleting it.
+
+  Also see option `magit-delete-by-moving-to-trash'.
+
+  `resurrect' A deleted file can easily be resurrected by
+  \"deleting\" the deletion, which is done using the same command
+  that was used to delete the same file in the first place.
+
+  `untrack' Untracking a file can be undone by tracking it again.
+
+  `rename' Renaming a file can easily be undone.
+
+Sequences:
+
+  `reset-bisect' Aborting (known to Git as \"resetting\") a
+  bisect operation loses all information collected so far.
+
+  `abort-cherry-pick' Aborting a cherry-pick throws away all
+  conflict resolutions which has already been carried out by the
+  user.
+
+  `abort-revert' Aborting a revert throws away all conflict
+  resolutions which has already been carried out by the user.
+
+  `abort-rebase' Aborting a rebase throws away all already
+  modified commits, but it's possible to restore those from the
+  reflog.
+
+  `abort-merge' Aborting a merge throws away all conflict
+  resolutions which has already been carried out by the user.
+
+  `merge-dirty' Merging with a dirty worktree can make it hard to
+  go back to the state before the merge was initiated.
+
+References:
+
+  `delete-unmerged-branch' Once a branch has been deleted it can
+  only be restored using low-level recovery tools provided by
+  Git.  And even then the reflog is gone.  The user always has
+  to confirm the deletion of a branch by accepting the default
+  choice (or selecting another branch), but when a branch has
+  not been merged yet, also make sure the user is aware of that.
+
+  `delete-branch-on-remote' Deleting a \"remote branch\" may mean
+  deleting the (local) \"remote-tracking\" branch only, or also
+  removing it from the remote itself.  The latter often makes more
+  sense because otherwise simply fetching from the remote would
+  restore the remote-tracking branch, but doing that can be
+  surprising and hard to recover from, so we ask.
+
+  `delete-pr-remote' When deleting a branch that was created from
+  a pull-request and if no other branches still exist on that
+  remote, then `magit-branch-delete' offers to delete the remote
+  as well.  This should be safe because it only happens if no
+  other refs exist in the remotes namespace, and you can recreate
+  the remote if necessary.
+
+  `drop-stashes' Dropping a stash is dangerous because Git stores
+  stashes in the reflog.  Once a stash is removed, there is no
+  going back without using low-level recovery tools provided by
+  Git.  When a single stash is dropped, then the user always has
+  to confirm by accepting the default (or selecting another).
+  This action only concerns the deletion of multiple stashes at
+  once.
+
+Publishing:
+
+  `set-and-push' When pushing to the upstream or the push-remote
+  and that isn't actually configured yet, then the user can first
+  set the target.  If s/he confirms the default too quickly, then
+  s/he might end up pushing to the wrong branch and if the remote
+  repository is configured to disallow fixing such mistakes, then
+  that can be quite embarrassing and annoying.
+
+Edit published history:
+
+  Without adding these symbols here, you will be warned before
+  editing commits that have already been pushed to one of the
+  branches listed in `magit-published-branches'.
+
+  `amend-published' Affects most commands that amend to `HEAD'.
+
+  `rebase-published' Affects commands that perform interactive
+  rebases.  This includes commands from the commit popup that
+  modify a commit other than `HEAD', namely the various fixup
+  and squash variants.
+
+  `edit-published' Affects the commands `magit-edit-line-commit'
+  and `magit-diff-edit-hunk-commit'.  These two commands make
+  it quite easy to accidentally edit a published commit, so you
+  should think twice before configuring them not to ask for
+  confirmation.
+
+  To disable confirmation completely, add all three symbols here
+  or set `magit-published-branches' to nil.
+
+Removing modules:
+
+  `remove-modules' When you remove the working directory of a
+  module that does not contain uncommitted changes, then that is
+  safer than doing so when there are uncommitted changes and/or
+  when you also remove the gitdir.  Still, you don't want to do
+  that by accident.
+
+  `remove-dirty-modules' When you remove the working directory of
+  a module that contains uncommitted changes, then those changes
+  are gone for good.  It is better to go to the module, inspect
+  these changes and only if appropriate discard them manually.
+
+  `trash-module-gitdirs' When you remove the gitdir of a module,
+  then all unpushed changes are gone for good.  It is very easy
+  to forget that you have some unfinished work on an unpublished
+  feature branch or even in a stash.
+
+  Actually there are some safety precautions in place, that might
+  help you out if you make an unwise choice here, but don't count
+  on it.  In case of emergency, stay calm and check the stash and
+  the `trash-directory' for traces of lost work.
+
+Various:
+
+  `stash-apply-3way' When a stash cannot be applied using \"git
+  stash apply\", then Magit uses \"git apply\" instead, possibly
+  using the \"--3way\" argument, which isn't always perfectly
+  safe.  See also `magit-stash-apply'.
+
+  `kill-process' There seldom is a reason to kill a process.
+
+Global settings:
+
+  Instead of adding all of the above symbols to the value of this
+  option you can also set it to the atom `t', which has the same
+  effect as adding all of the above symbols.  Doing that most
+  certainly is a bad idea, especially because other symbols might
+  be added in the future.  So even if you don't want to be asked
+  for confirmation for any of these actions, you are still better
+  of adding all of the respective symbols individually.
+
+  When `magit-wip-mode' is enabled then these actions can fairly
+  easily be undone: `discard', `reverse', `stage-all-changes', and
+  `unstage-all-changes'.  If and only if this mode is enabled, then
+  `safe-with-wip' has the same effect as adding all of these symbols
+  individually."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-essentials
+  :group 'magit-commands
+  :type `(choice (const :tag "Always require confirmation" nil)
+                 (const :tag "Never require confirmation" t)
+                 (set   :tag "Require confirmation except for"
+                        ;; `remove-dirty-modules' and
+                        ;; `trash-module-gitdirs' intentionally
+                        ;; omitted.
+                        ,@magit--confirm-actions)))
+
+(defcustom magit-slow-confirm '(drop-stashes)
+  "Whether to ask user \"y or n\" or \"yes or no\" questions.
+
+When this is nil, then `y-or-n-p' is used when the user has to
+confirm a potentially destructive action.  When this is t, then
+`yes-or-no-p' is used instead.  If this is a list of symbols
+identifying actions, then `yes-or-no-p' is used for those,
+`y-or-no-p' for all others.  The list of actions is the same as
+for `magit-no-confirm' (which see)."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-miscellaneous
+  :type `(choice (const :tag "Always ask \"yes or no\" questions" t)
+                 (const :tag "Always ask \"y or n\" questions" nil)
+                 (set   :tag "Ask \"yes or no\" questions only for"
+                        ,@magit--confirm-actions)))
+
+(defcustom magit-no-message nil
+  "A list of messages Magit should not display.
+
+Magit displays most echo area messages using `message', but a few
+are displayed using `magit-message' instead, which takes the same
+arguments as the former, FORMAT-STRING and ARGS.  `magit-message'
+forgoes printing a message if any member of this list is a prefix
+of the respective FORMAT-STRING.
+
+If Magit prints a message which causes you grief, then please
+first investigate whether there is another option which can be
+used to suppress it.  If that is not the case, then ask the Magit
+maintainers to start using `magit-message' instead of `message'
+in that case.  We are not proactively replacing all uses of
+`message' with `magit-message', just in case someone *might* find
+some of these messages useless.
+
+Messages which can currently be suppressed using this option are:
+* \"Turning on magit-auto-revert-mode...\""
+  :package-version '(magit . "2.8.0")
+  :group 'magit-miscellaneous
+  :type '(repeat string))
+
+(defcustom magit-verbose-messages nil
+  "Whether to make certain prompts and messages more verbose.
+
+Occasionally a user suggests that a certain prompt or message
+should be more verbose, but I would prefer to keep it as-is
+because I don't think that the fact that that one user did not
+understand the existing prompt/message means that a large number
+of users would have the same difficulty, and that making it more
+verbose would actually do a disservice to users who understand
+the shorter prompt well enough.
+
+Going forward I will start offering both messages when I feel the
+suggested longer message is reasonable enough, and the value of
+this option decides which will be used.  Note that changing the
+value of this option affects all such messages and that I do not
+intend to add an option per prompt."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-miscellaneous
+  :type 'boolean)
+
+(defcustom magit-ellipsis
+  '((margin (?… . ">"))
+    (t      (?… . "...")))
+  "Characters or strings used to abbreviate text in some buffers.
+
+Each element has the form (WHERE (FANCY . UNIVERSAL)).
+
+FANCY is a single character or nil whereas UNIVERSAL is a string
+of any length.  The ellipsis produced by `magit--ellipsis' will
+be FANCY if it's a non-nil character that can be displayed with
+the available fonts, otherwise UNIVERSAL will be used.  FANCY is
+meant to be a rich character like a horizontal ellipsis symbol or
+an emoji whereas UNIVERSAL something simpler available in a less
+rich environment like the CLI.  WHERE determines the use-case for
+the ellipsis definition.  Currently the only acceptable values
+for WHERE are `margin' or t (representing the default).
+
+Whether collapsed sections are indicated using ellipsis is
+controlled by option `magit-section-visibility-indicators'."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-miscellaneous
+  :type '(repeat (list (symbol :tag "Where")
+                       (cons (choice :tag "Fancy" character (const nil))
+                             (string :tag "Universal")))))
+
+(defcustom magit-update-other-window-delay 0.2
+  "Delay before automatically updating the other window.
+
+When moving around in certain buffers, then certain other
+buffers, which are being displayed in another window, may
+optionally be updated to display information about the
+section at point.
+
+When holding down a key to move by more than just one section,
+then that would update that buffer for each section on the way.
+To prevent that, updating the revision buffer is delayed, and
+this option controls for how long.  For optimal experience you
+might have to adjust this delay and/or the keyboard repeat rate
+and delay of your graphical environment or operating system."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-miscellaneous
+  :type 'number)
+
+(defcustom magit-view-git-manual-method 'info
+  "How links to Git documentation are followed from Magit's Info manuals.
+
+`info'  Follow the link to the node in the `gitman' Info manual
+        as usual.  Unfortunately that manual is not installed by
+        default on some platforms, and when it is then the nodes
+        look worse than the actual manpages.
+
+`man'   View the respective man-page using the `man' package.
+
+`woman' View the respective man-page using the `woman' package."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-miscellaneous
+  :type '(choice (const :tag "View info manual" info)
+                 (const :tag "View manpage using `man'" man)
+                 (const :tag "View manpage using `woman'" woman)))
+
+;;; Section Classes
+
+(defclass magit-commit-section (magit-section)
+  ((keymap :initform 'magit-commit-section-map)))
+
+(setf (alist-get 'commit magit--section-type-alist) 'magit-commit-section)
+
+(defclass magit-diff-section (magit-section)
+  ((keymap :initform 'magit-diff-section-map))
+  :abstract t)
+
+(defclass magit-file-section (magit-diff-section)
+  ((keymap :initform 'magit-file-section-map)
+   (source :initform nil :initarg :source)
+   (header :initform nil :initarg :header)
+   (binary :initform nil :initarg :binary)
+   (heading-highlight-face :initform 'magit-diff-file-heading-highlight)
+   (heading-selection-face :initform 'magit-diff-file-heading-selection)))
+
+(defclass magit-module-section (magit-file-section)
+  ((keymap :initform 'magit-module-section-map)
+   (range  :initform nil :initarg :range)))
+
+(defclass magit-hunk-section (magit-diff-section)
+  ((keymap      :initform 'magit-hunk-section-map)
+   (painted     :initform nil)
+   (fontified   :initform nil)
+   (refined     :initform nil)
+   (combined    :initform nil :initarg :combined)
+   (from-range  :initform nil :initarg :from-range)
+   (from-ranges :initform nil)
+   (to-range    :initform nil :initarg :to-range)
+   (about       :initform nil :initarg :about)
+   (heading-highlight-face :initform 'magit-diff-hunk-heading-highlight)
+   (heading-selection-face :initform 'magit-diff-hunk-heading-selection)))
+
+(defun magit--meta-hunk-p (section)
+  (not (cdr (oref section value))))
+
+(setf (alist-get 'file   magit--section-type-alist) 'magit-file-section)
+(setf (alist-get 'module magit--section-type-alist) 'magit-module-section)
+(setf (alist-get 'hunk   magit--section-type-alist) 'magit-hunk-section)
+
+(defclass magit-log-section (magit-section)
+  ((keymap :initform 'magit-log-section-map))
+  :abstract t)
+(defclass magit-unpulled-section (magit-log-section) ())
+(defclass magit-unpushed-section (magit-log-section) ())
+(defclass magit-unmerged-section (magit-log-section) ())
+
+(setf (alist-get 'unpulled magit--section-type-alist) 'magit-unpulled-section)
+(setf (alist-get 'unpushed magit--section-type-alist) 'magit-unpushed-section)
+(setf (alist-get 'unmerged magit--section-type-alist) 'magit-unmerged-section)
+
+;;; User Input
+
+(defvar helm-completion-in-region-default-sort-fn)
+(defvar helm-crm-default-separator)
+(defvar ivy-sort-functions-alist)
+(defvar ivy-sort-matches-functions-alist)
+(defvar vertico-sort-function)
+
+(defvar magit-completing-read--silent-default nil)
+
+(defvar magit-completing-read-default-prompt-predicate
+  (lambda ()
+    (and (eq magit-completing-read-function
+             'magit-builtin-completing-read)
+         (not (or (bound-and-true-p helm-mode)
+                  (bound-and-true-p ivy-mode)
+                  (bound-and-true-p selectrum-mode)
+                  (bound-and-true-p vertico-mode)))))
+  "Function used to determine whether to add default to prompt.
+
+This is used by `magit-completing-read' (which see).
+
+The default function returns nil, when a completion frameworks is used
+for which this is undesirable.  More precisely, it returns nil, when
+`magit-completing-read-function' is not `magit-builtin-completing-read',
+or one of `helm-mode', `ivy-mode', `selectrum-mode' or `vertico-mode'
+is enabled.  When this function returns nil, then nil is passed to
+`format-prompt' (which see), instead of the default (DEF or FALLBACK).")
+
+(defun magit-completing-read ( prompt collection &optional
+                               predicate require-match initial-input
+                               hist def fallback)
+  "Read a choice in the minibuffer, or use the default choice.
+
+This is the function that Magit commands use when they need the
+user to select a single thing to act on.  The arguments have the
+same meaning as for `completing-read', except for FALLBACK, which
+is unique to this function and is described below.
+
+Instead of asking the user to choose from a list of possible
+candidates, this function may instead just return the default
+specified by DEF, with or without requiring user confirmation.
+Whether that is the case depends on PROMPT, `this-command' and
+`magit-dwim-selection'.  See the documentation of the latter for
+more information.
+
+If it does use the default without the user even having to
+confirm that, then `magit-completing-read--silent-default' is set
+to t, otherwise nil.
+
+If it does read a value in the minibuffer, then this function
+acts similarly to `completing-read', except for the following:
+
+- COLLECTION must be a list of choices.  A function is not
+  supported.
+
+- If REQUIRE-MATCH is nil and the user exits without a choice,
+  then nil is returned instead of an empty string.
+
+- If REQUIRE-MATCH is `any', then do not require a match but
+  do require non-empty input (or non-nil DEFAULT, since that
+  is substituted for empty input).
+
+- If REQUIRE-MATCH is non-nil and the user exits without a
+  choice, `user-error' is raised.
+
+- FALLBACK specifies a secondary default that is only used if
+  the primary default DEF is nil.  The secondary default is not
+  subject to `magit-dwim-selection' — if DEF is nil but FALLBACK
+  is not, then this function always asks the user to choose a
+  candidate, just as if both defaults were nil.
+
+- `format-prompt' is called on PROMPT and DEF (or FALLBACK if
+  DEF is nil).  This appends \": \" to the prompt and may also
+  add the default to the prompt, using the format specified by
+  `minibuffer-default-prompt-format' and depending on
+  `magit-completing-read-default-prompt-predicate'."
+  (setq magit-completing-read--silent-default nil)
+  (if-let ((_ def)
+           (dwim (seq-some (pcase-lambda (`(,cmd ,re ,dwim))
+                             (and (eq cmd this-command)
+                                  (or (not re)
+                                      (string-match-p re prompt))
+                                  dwim))
+                           magit-dwim-selection)))
+      (if (eq dwim 'ask)
+          (if (y-or-n-p (format "%s %s? " prompt def))
+              def
+            (user-error "Abort"))
+        (setq magit-completing-read--silent-default t)
+        def)
+    (unless def
+      (setq def fallback))
+    (when (and def
+               (not (functionp collection))
+               (not (member def collection)))
+      (setq collection (cons def collection)))
+    (let ((command this-command)
+          (reply (funcall magit-completing-read-function
+                          (magit--format-prompt prompt def)
+                          collection predicate
+                          (if (eq require-match 'any) nil require-match)
+                          initial-input hist def)))
+      (setq this-command command)
+      ;; Note: Avoid `string=' to support `helm-comp-read-use-marked'.
+      (if (equal reply "")
+          (if (and require-match
+                   (not (and (listp collection)
+                             (member "" collection))))
+              (user-error "Nothing selected")
+            nil)
+        reply))))
+
+(defun magit--format-prompt (prompt default)
+  (format-prompt (if (string-suffix-p ": " prompt)
+                     (substring prompt 0 -2)
+                   prompt)
+                 (and (funcall magit-completing-read-default-prompt-predicate)
+                      default)))
+
+(defun magit--completion-table (collection)
+  (lambda (string pred action)
+    (if (eq action 'metadata)
+        '(metadata (display-sort-function . identity))
+      (complete-with-action action collection string pred))))
+
+(defun magit-builtin-completing-read
+    (prompt choices &optional predicate require-match initial-input hist def)
+  "Magit wrapper for standard `completing-read' function."
+  (unless (or (bound-and-true-p helm-mode)
+              (bound-and-true-p ivy-mode))
+    (setq choices (magit--completion-table choices)))
+  (let ((ivy-sort-functions-alist nil))
+    (completing-read prompt
+                     (lambda (str pred action)
+                       (if (eq action 'metadata)
+                           '(metadata (display-sort-function . identity)
+                                      (cycle-sort-function . identity))
+                         (complete-with-action action choices str pred)))
+                     predicate require-match
+                     initial-input hist def)))
+
+(define-obsolete-function-alias 'magit-completing-read-multiple*
+  'magit-completing-read-multiple "Magit-Section 4.0.0")
+
+(defun magit-completing-read-multiple
+    ( prompt table &optional predicate require-match initial-input
+      hist def inherit-input-method
+      no-split)
+  "Read multiple strings in the minibuffer, with completion.
+Like `completing-read-multiple' but don't mess with order of
+TABLE and take an additional argument NO-SPLIT, which causes
+the user input to be returned as a single unmodified string.
+Also work around various incompatible features of various
+third-party completion frameworks."
+  (cl-letf*
+      (;; To implement NO-SPLIT we have to manipulate the respective
+       ;; `split-string' invocation.  We cannot simply advice it to
+       ;; return the input string because `SELECTRUM' would choke on
+       ;; that string.  Use a variable to pass along the raw user
+       ;; input string. aa5f098ab
+       (input nil)
+       (split-string (symbol-function #'split-string))
+       ((symbol-function #'split-string)
+        (lambda (string &optional separators omit-nulls trim)
+          (when (and no-split
+                     (equal separators crm-separator)
+                     (equal omit-nulls t))
+            (setq input string))
+          (funcall split-string string separators omit-nulls trim)))
+       ;; Add the default to the table if absent, which is necessary
+       ;; because we don't add it to the prompt for some frameworks.
+       (table (if (and def
+                       (listp table)
+                       (not (listp (car table)))
+                       (not (member def table)))
+                  (cons def table)
+                table))
+       ;; Prevent `BUILT-IN' completion from messing up our existing
+       ;; order of the completion candidates. aa5f098ab
+       (table (magit--completion-table table))
+       ;; Prevent `IVY' from messing up our existing order. c7af78726
+       (ivy-sort-matches-functions-alist nil)
+       ;; Prevent `HELM' from messing up our existing order.  6fcf994bd
+       (helm-completion-in-region-default-sort-fn nil)
+       ;; Prevent `HELM' from automatically appending the separator,
+       ;; which is counterproductive when NO-SPLIT is non-nil and/or
+       ;; when reading commit ranges. 798aff564
+       (helm-crm-default-separator
+        (if no-split nil (bound-and-true-p helm-crm-default-separator)))
+       ;; And now, the moment we have all been waiting for...
+       (values (completing-read-multiple
+                (magit--format-prompt prompt def)
+                table predicate
+                (if (eq require-match 'any) nil require-match)
+                initial-input hist def inherit-input-method)))
+    (when (and (eq require-match 'any)
+               (not values))
+      (user-error "Nothing selected"))
+    (if no-split input values)))
+
+(defvar-keymap magit-minibuffer-local-ns-map
+  :parent minibuffer-local-map
+  "SPC" #'magit-whitespace-disallowed
+  "TAB" #'magit-whitespace-disallowed)
+
+(defun magit-whitespace-disallowed ()
+  "Beep to tell the user that whitespace is not allowed."
+  (interactive)
+  (ding)
+  (message "Whitespace isn't allowed here")
+  (setq defining-kbd-macro nil)
+  (force-mode-line-update))
+
+(defun magit-read-string ( prompt &optional initial-input history default-value
+                           inherit-input-method no-whitespace)
+  "Read a string from the minibuffer, prompting with string PROMPT.
+
+This is similar to `read-string', but
+* empty input is only allowed if DEFAULT-VALUE is non-nil in
+  which case that is returned,
+* whitespace is not allowed and leading and trailing whitespace is
+  removed automatically if NO-WHITESPACE is non-nil,
+* `format-prompt' is used internally.
+* an invalid DEFAULT-VALUE is silently ignored."
+  (when default-value
+    (when (consp default-value)
+      (setq default-value (car default-value)))
+    (unless (stringp default-value)
+      (setq default-value nil)))
+  (let* ((minibuffer-completion-table nil)
+         (val (read-from-minibuffer
+               (format-prompt prompt default-value)
+               initial-input (and no-whitespace magit-minibuffer-local-ns-map)
+               nil history default-value inherit-input-method))
+         (trim (lambda (regexp string)
+                 (save-match-data
+                   (if (string-match regexp string)
+                       (replace-match "" t t string)
+                     string)))))
+    (when (and (string= val "") default-value)
+      (setq val default-value))
+    (when no-whitespace
+      (setq val (funcall trim "\\`\\(?:[ \t\n\r]+\\)"
+                         (funcall trim "\\(?:[ \t\n\r]+\\)\\'" val))))
+    (cond ((string= val "")
+           (user-error "Need non-empty input"))
+          ((and no-whitespace (string-match-p "[\s\t\n]" val))
+           (user-error "Input contains whitespace"))
+          (val))))
+
+(defun magit-read-string-ns ( prompt &optional initial-input history
+                              default-value inherit-input-method)
+  "Call `magit-read-string' with non-nil NO-WHITESPACE."
+  (magit-read-string prompt initial-input history default-value
+                     inherit-input-method t))
+
+(defmacro magit-read-char-case (prompt verbose &rest clauses)
+  (declare (indent 2)
+           (debug (form form &rest (characterp form body))))
+  `(prog1 (pcase (read-char-choice
+                  (let ((parts (nconc (list ,@(mapcar #'cadr clauses))
+                                      ,(and verbose '(list "[C-g] to abort")))))
+                    (concat ,prompt
+                            (string-join (butlast parts) ", ")
+                            ", or "  (car (last parts)) " "))
+                  ',(mapcar #'car clauses))
+            ,@(mapcar (##`(,(car %) ,@(cddr %))) clauses))
+     (message "")))
+
+(defun magit-y-or-n-p (prompt &optional action)
+  "Ask user a \"y or n\" or a \"yes or no\" question using PROMPT.
+Which kind of question is used depends on whether
+ACTION is a member of option `magit-slow-confirm'."
+  (if (or (eq magit-slow-confirm t)
+          (and action (member action magit-slow-confirm)))
+      (yes-or-no-p prompt)
+    (y-or-n-p prompt)))
+
+(defvar magit--no-confirm-alist
+  '((safe-with-wip magit-wip-mode
+                   discard reverse stage-all-changes unstage-all-changes)))
+
+(cl-defun magit-confirm ( action &optional prompt prompt-n noabort
+                          (items nil sitems) prompt-suffix)
+  (declare (indent defun))
+  (when (and prompt (listp prompt))
+    (setq prompt
+          (apply #'format (car prompt)
+                 (mapcar (##if (stringp %) (string-replace "%" "%%" %) %)
+                         (cdr prompt)))))
+  (when (and prompt-n (listp prompt-n))
+    (setq prompt-n
+          (apply #'format (car prompt-n)
+                 (mapcar (##if (stringp %) (string-replace "%" "%%" %) %)
+                         (cdr prompt-n)))))
+  (setq prompt-n (format (concat (or prompt-n prompt) "? ") (length items)))
+  (setq prompt   (format (concat (or prompt (magit-confirm-make-prompt action))
+                                 "? ")
+                         (car items)))
+  (when prompt-suffix
+    (setq prompt (concat prompt prompt-suffix)))
+  (or (cond ((and (not (eq action t))
+                  (or (eq magit-no-confirm t)
+                      (memq action magit-no-confirm)
+                      (any (pcase-lambda (`(,key ,var . ,sub))
+                             (and (memq key magit-no-confirm)
+                                  (memq action sub)
+                                  (or (not var)
+                                      (and (boundp var)
+                                           (symbol-value var)))))
+                           magit--no-confirm-alist)))
+             (or (not sitems) items))
+            ((not sitems)
+             (magit-y-or-n-p prompt action))
+            ((length= items 1)
+             (and (magit-y-or-n-p prompt action) items))
+            ((length> items 1)
+             (and (magit-y-or-n-p (concat (string-join items "\n")
+                                          "\n\n" prompt-n)
+                                  action)
+                  items)))
+      (if noabort nil (user-error "Abort"))))
+
+(defun magit-confirm-files (action files &optional prompt prompt-suffix noabort)
+  (when files
+    (unless prompt
+      (setq prompt (magit-confirm-make-prompt action)))
+    (magit-confirm action
+      (concat prompt " \"%s\"")
+      (concat prompt " %d files")
+      noabort files prompt-suffix)))
+
+(defun magit-confirm-make-prompt (action)
+  (let ((prompt (symbol-name action)))
+    (string-replace "-" " "
+                    (concat (upcase (substring prompt 0 1))
+                            (substring prompt 1)))))
+
+(defun magit-read-number-string (prompt &optional default _history)
+  "Like `read-number' but return value is a string.
+DEFAULT may be a number or a numeric string."
+  (number-to-string
+   (read-number prompt (if (stringp default)
+                           (string-to-number default)
+                         default))))
+
+;;; Debug Utilities
+
+;;;###autoload
+(defun magit-emacs-Q-command ()
+  "Show a shell command that runs an uncustomized Emacs with only Magit loaded.
+See info node `(magit)Debugging Tools' for more information."
+  (interactive)
+  (let ((cmd (mapconcat
+              #'shell-quote-argument
+              `(,(concat invocation-directory invocation-name)
+                "-Q" "--eval" "(setq debug-on-error t)"
+                ,@(mapcan
+                   (##list "-L" %)
+                   (delete-dups
+                    (seq-keep
+                     (lambda (lib)
+                       (if-let ((path (locate-library lib)))
+                           (file-name-directory path)
+                         (error "Cannot find mandatory dependency %s" lib)))
+                     '(;; Like `LOAD_PATH' in `default.mk'.
+                       "compat"
+                       "cond-let"
+                       "llama"
+                       "seq"
+                       "transient"
+                       "with-editor"
+                       ;; Obviously `magit' itself is needed too.
+                       "magit"
+                       ;; While this is part of the Magit repository,
+                       ;; it is distributed as a separate package.
+                       "magit-section"))))
+                ;; Avoid Emacs bug#16406 by using full path.
+                "-l" ,(file-name-sans-extension (locate-library "magit")))
+              " ")))
+    (message "Uncustomized Magit command saved to kill-ring, %s"
+             "please run it in a terminal.")
+    (kill-new cmd)))
+
+;;; Text Utilities
+
+(defmacro magit-bind-match-strings (varlist string &rest body)
+  "Bind variables to submatches according to VARLIST then evaluate BODY.
+Bind the symbols in VARLIST to submatches of the current match data,
+starting with 1 and incrementing by 1 for each symbol.  If the last
+match was against a string, then that has to be provided as STRING."
+  (declare (indent 2) (debug (listp form body)))
+  (let ((s (gensym "string"))
+        (i 0))
+    `(let* ((,s ,string)
+            ,@(save-match-data
+                (seq-keep (lambda (sym)
+                            (incf i)
+                            (and (not (eq (aref (symbol-name sym) 0) ?_))
+                                 `(,sym (match-str ,i ,s))))
+                          varlist)))
+       ,@body)))
+
+(defun magit-delete-line ()
+  "Delete the rest of the current line."
+  (delete-region (point) (1+ (line-end-position))))
+
+(defun magit-delete-match (&optional num)
+  "Delete text matched by last search.
+If optional NUM is specified, only delete that subexpression."
+  (delete-region (match-beginning (or num 0))
+                 (match-end (or num 0))))
+
+(defun magit-file-line (file)
+  "Return the first line of FILE as a string."
+  (and (file-regular-p file)
+       (with-temp-buffer
+         (insert-file-contents file)
+         (buffer-substring-no-properties (point-min)
+                                         (line-end-position)))))
+
+(defun magit-file-lines (file &optional keep-empty-lines)
+  "Return a list of strings containing one element per line in FILE.
+Unless optional argument KEEP-EMPTY-LINES is t, trim all empty lines."
+  (and (file-regular-p file)
+       (with-temp-buffer
+         (insert-file-contents file)
+         (split-string (buffer-string) "\n" (not keep-empty-lines)))))
+
+(defun magit-set-header-line-format (string)
+  "Set `header-line-format' in the current buffer based on STRING.
+Pad the left side of STRING so that it aligns with the text area."
+  (setq header-line-format
+        (concat (propertize " " 'display '(space :align-to 0))
+                string)))
+
+(defun magit--format-spec (format specification)
+  "Like `format-spec' but preserve text properties in SPECIFICATION."
+  (with-temp-buffer
+    (insert format)
+    (goto-char (point-min))
+    (while (search-forward "%" nil t)
+      (cond
+        ;; Quoted percent sign.
+        ((eq (char-after) ?%)
+         (delete-char 1))
+        ;; Valid format spec.
+        ((looking-at "\\([-0-9.]*\\)\\([a-zA-Z]\\)")
+         (let* ((num (match-str 1))
+                (spec (string-to-char (match-str 2)))
+                (val (assq spec specification)))
+           (unless val
+             (error "Invalid format character: `%%%c'" spec))
+           (setq val (cdr val))
+           ;; Pad result to desired length.
+           (let ((text (format (concat "%" num "s") val)))
+             ;; Insert first, to preserve text properties.
+             (if (next-property-change 0 (concat " " text))
+                 ;; If the inserted text has properties, then preserve those.
+                 (insert text)
+               ;; Otherwise preserve FORMAT's properties, like `format-spec'.
+               (insert-and-inherit text))
+             ;; Delete the specifier body.
+             (delete-region (+ (match-beginning 0) (length text))
+                            (+ (match-end 0) (length text)))
+             ;; Delete the percent sign.
+             (delete-region (1- (match-beginning 0)) (match-beginning 0)))))
+        ;; Signal an error on bogus format strings.
+        ((error "Invalid format string"))))
+    (buffer-string)))
+
+;;; Missing from Emacs
+
+(defun magit--separate (pred list)
+  "Separate elements of LIST that do and don't satisfy PRED.
+Return a list of two lists; the first containing the elements that
+do satisfy PRED and the second containing the elements that don't."
+  (let (y n)
+    (dolist (elt list)
+      (push elt (if (funcall pred elt) y n)))
+    (list (nreverse y)
+          (nreverse n))))
+
+(defun magit--version> (v1 v2)
+  "Return t if version V1 is higher (younger) than V2.
+This function should be named `version>' and be part of Emacs."
+  (version-list-< (version-to-list v2) (version-to-list v1)))
+
+(defun magit--version>= (v1 v2)
+  "Return t if version V1 is higher (younger) than or equal to V2.
+This function should be named `version>=' and be part of Emacs."
+  (version-list-<= (version-to-list v2) (version-to-list v1)))
+
+(defun magit--delete-text-properties (string &optional props)
+  "Delete text properties PROPS from STRING and return it.
+If PROPS is nil, remove all properties.  To leave STRING unchanged
+and return a new string, instead use `magit--remove-text-properties'."
+  (set-text-properties 0 (length string) props string)
+  string)
+
+(defun magit--remove-text-properties (string &optional props)
+  "Return a copy of STRING with text properties PROPS removed.
+If PROPS is nil, remove all properties."
+  (magit--delete-text-properties (copy-sequence string) props))
+
+;;; Kludges for Emacs Bugs
+
+(defun magit-which-function ()
+  "Return current function name based on point, without caching.
+
+This is a simple wrapper around `which-function', that resets
+Imenu's potentially outdated and therefore unreliable cache by
+setting `imenu--index-alist' to nil before calling that function."
+  (setq imenu--index-alist nil)
+  (which-function))
+
+(static-when (version< emacs-version "31.1")
+  (define-advice dabbrev-capf (:around (fn) git-commit)
+    "Backport bugfix from debbug#80645 / a7d05207214 / 31.1.
+See #5551, #5556 and #5558 (I wish I had not rushed this)."
+    (pcase-let ((`(,beg ,end ,table . ,rest) (funcall fn)))
+      `( ,beg ,end
+         ,(lambda (&rest args)
+            (condition-case err
+                (apply table args)
+              (user-error
+               (unless (string-prefix-p "No dynamic expansion" (cadr err))
+                 (signal (car err) (cdr err))))))
+         ,@rest))))
+
+;;; Kludges for Custom
+
+(defun magit-custom-initialize-reset (symbol exp)
+  "Initialize SYMBOL based on EXP.
+Set the value of the variable SYMBOL, using `set-default'
+\(unlike `custom-initialize-reset', which uses the `:set'
+function if any).  The value is either the symbol's current
+value (as obtained using the `:get' function), if any, or
+the value in the symbol's `saved-value' property if any, or
+\(last of all) the value of EXP."
+  (set-default-toplevel-value
+   symbol
+   (condition-case nil
+       (let ((def (default-toplevel-value symbol))
+             (getter (get symbol 'custom-get)))
+         (if getter (funcall getter symbol) def))
+     (error
+      (eval (let ((sv (get symbol 'saved-value)))
+              (if sv (car sv) exp)))))))
+
+(defun magit-hook-custom-get (symbol)
+  (if (symbol-file symbol 'defvar)
+      (default-toplevel-value symbol)
+    ;;
+    ;; Called by `custom-initialize-reset' on behalf of `symbol's
+    ;; `defcustom', which is being evaluated for the first time to
+    ;; set the initial value, but there's already a default value,
+    ;; which most likely was established by one or more `add-hook'
+    ;; calls.
+    ;;
+    ;; We combine the `standard-value' and the current value, while
+    ;; preserving the order established by `:options', and return
+    ;; the result of that to be used as the "initial" default value.
+    ;;
+    (let ((standard (eval (car (get symbol 'standard-value))))
+          (current (default-toplevel-value symbol))
+          (value nil))
+      (dolist (fn (get symbol 'custom-options))
+        (when (or (memq fn standard)
+                  (memq fn current))
+          (push fn value)))
+      (dolist (fn current)
+        (unless (memq fn value)
+          (push fn value)))
+      (nreverse value))))
+
+;;; Kludges for Info Manuals
+
+;;;###autoload
+(define-advice Info-follow-nearest-node (:around (fn &optional fork) gitman)
+  ;; Do not use `if-let*' (aka `cond-let--if-let*') because this is
+  ;; copied to the autoload file, which does not require `cond-let'.
+  (let ((node (Info-get-token
+               (point) "\\*note[ \n\t]+"
+               "\\*note[ \n\t]+\\([^:]*\\):\\(:\\|[ \n\t]*(\\)?")))
+    (if (and node (string-match "^(gitman)\\(.+\\)" node))
+        (pcase magit-view-git-manual-method
+          ('info  (funcall fn fork))
+          ('man   (require 'man)
+                  (man (match-str 1 node)))
+          ('woman (require 'woman)
+                  (woman (match-str 1 node)))
+          (_ (user-error "Invalid value for `magit-view-git-manual-method'")))
+      (funcall fn fork))))
+
+;; When making changes here, then also adjust the copy in docs/Makefile.
+;;;###autoload
+(define-advice org-man-export (:around (fn link description format) gitman)
+  (if (and (eq format 'texinfo)
+           (string-prefix-p "git" link))
+      (string-replace "%s" link "
+@ifinfo
+@ref{%s,,,gitman,}.
+@end ifinfo
+@ifhtml
+@html
+the <a href=\"http://git-scm.com/docs/%s\">%s(1)</a> manpage.
+@end html
+@end ifhtml
+@iftex
+the %s(1) manpage.
+@end iftex
+")
+    (funcall fn link description format)))
+
+;;; Kludges for Package Managers
+
+(defun magit--chase-links (filename)
+  "Chase links in FILENAME until a name that is not a link.
+
+This is the same as `file-chase-links', except that it also handles
+fake symlinks that are created by some source based package managers
+\(Elpaca and Straight) on Windows.
+
+See <https://github.com/raxod502/straight.el/issues/520>."
+  (when-let*
+      ((manager (cond ((bound-and-true-p straight-symlink-mode) 'straight)
+                      ((bound-and-true-p elpaca-no-symlink-mode) 'elpaca)))
+       (build (pcase manager
+                ('straight (bound-and-true-p straight-build-dir))
+                ('elpaca (bound-and-true-p elpaca-builds-directory))))
+       (_(string-prefix-p build filename))
+       (repo (pcase manager
+               ('straight
+                (and (bound-and-true-p straight-base-dir)
+                     (expand-file-name "repos/magit/lisp/" straight-base-dir)))
+               ('elpaca
+                (and (bound-and-true-p elpaca-repos-directory)
+                     (expand-file-name "magit/lisp/" elpaca-repos-directory))))))
+    (setq filename (expand-file-name (file-name-nondirectory filename) repo)))
+  (file-chase-links filename))
+
+;;; Miscellaneous
+
+(defun magit-message (format-string &rest args)
+  "Display a message at the bottom of the screen, or not.
+Like `message', except that if the users configured option
+`magit-no-message' to prevent the message corresponding to
+FORMAT-STRING to be displayed, then don't."
+  (unless (seq-find (##string-prefix-p % format-string) magit-no-message)
+    (apply #'message format-string args)))
+
+(defun magit-msg (format-string &rest args)
+  "Display a message at the bottom of the screen, but don't log it.
+Like `message', except that `message-log-max' is bound to nil."
+  (let ((message-log-max nil))
+    (apply #'message format-string args)))
+
+(defmacro magit--with-temp-position (buf pos &rest body)
+  (declare (indent 2))
+  `(with-current-buffer ,buf
+     (save-excursion
+       (save-restriction
+         (widen)
+         (goto-char (or ,pos 1))
+         ,@body))))
+
+(defun magit--ellipsis (&optional where)
+  "Build an ellipsis always as string, depending on WHERE."
+  (cond-let
+    ((stringp magit-ellipsis)
+     magit-ellipsis)
+    ([pair (car (or (alist-get (or where t) magit-ellipsis)
+                    (alist-get t magit-ellipsis)))]
+     (pcase-let* ((`(,fancy . ,universal) pair)
+                  (ellipsis (if (and fancy (char-displayable-p fancy))
+                                fancy
+                              universal)))
+       (if (characterp ellipsis)
+           (char-to-string ellipsis)
+         ellipsis)))
+    ((user-error "Variable magit-ellipsis is invalid"))))
+
+(defun magit--ext-regexp-quote (string)
+  "Like `reqexp-quote', but for Extended Regular Expressions."
+  (let ((special (string-to-list "[*.\\?+^$({"))
+        (quoted nil))
+    (dolist (char string)
+      (when (memq char special)
+        (push ?\\ quoted))
+      (push char quoted))
+    (concat (nreverse quoted))))
+
+(defun magit--find-buffer (&rest plist)
+  "Like `find-buffer' but take multiple VARIABLE-VALUE pairs."
+  (seq-find (lambda (buf)
+              (let ((plist plist))
+                (while (and plist
+                            (equal (buffer-local-value (car plist) buf)
+                                   (cadr plist)))
+                  (setq plist (cddr plist)))
+                (not plist)))
+            (buffer-list)))
+
+;;; _
+(provide 'magit-base)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-base.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-base.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-base.elc
new file mode 100644
index 0000000..ad53c0e
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-base.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bisect.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bisect.el
new file mode 100644
index 0000000..811daf3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bisect.el
@@ -0,0 +1,340 @@
+;;; magit-bisect.el --- Bisect support for Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Use a binary search to find the commit that introduced a bug.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Options
+
+(defcustom magit-bisect-show-graph t
+  "Whether to use \"--graph\" in the log showing commits yet to be bisected."
+  :package-version '(magit . "2.8.0")
+  :group 'magit-status
+  :type 'boolean)
+
+(defface magit-bisect-good
+  '((t :foreground "DarkOliveGreen"))
+  "Face for good bisect revisions."
+  :group 'magit-faces)
+
+(defface magit-bisect-skip
+  '((t :foreground "DarkGoldenrod"))
+  "Face for skipped bisect revisions."
+  :group 'magit-faces)
+
+(defface magit-bisect-bad
+  '((t :foreground "IndianRed4"))
+  "Face for bad bisect revisions."
+  :group 'magit-faces)
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-bisect "magit-bisect" nil t)
+(transient-define-prefix magit-bisect ()
+  "Narrow in on the commit that introduced a bug."
+  :man-page "git-bisect"
+  [:class transient-subgroups
+   :if-not magit-bisect-in-progress-p
+   ["Arguments"
+    ("-n" "Don't checkout commits"              "--no-checkout")
+    ("-p" "Follow only first parent of a merge" "--first-parent"
+     :if (##magit-git-version>= "2.29"))
+    (magit-bisect:--term-old :level 6)
+    (magit-bisect:--term-new :level 6)]
+   ["Actions"
+    ("B" "Start"        magit-bisect-start)
+    ("s" "Start script" magit-bisect-run)]]
+  ["Actions"
+   :if magit-bisect-in-progress-p
+   ("B" "Bad"          magit-bisect-bad)
+   ("g" "Good"         magit-bisect-good)
+   ("m" "Mark"         magit-bisect-mark :level 6)
+   ("k" "Skip"         magit-bisect-skip)
+   ("r" "Reset"        magit-bisect-reset)
+   ("s" "Run script"   magit-bisect-run)])
+
+(transient-define-argument magit-bisect:--term-old ()
+  :description "Old/good term"
+  :class 'transient-option
+  :key "=o"
+  :argument "--term-old=")
+
+(transient-define-argument magit-bisect:--term-new ()
+  :description "New/bad term"
+  :class 'transient-option
+  :key "=n"
+  :argument "--term-new=")
+
+;;;###autoload
+(defun magit-bisect-start (bad good args)
+  "Start a bisect session.
+
+Bisecting a bug means to find the commit that introduced it.
+This command starts such a bisect session by asking for a known
+good and a known bad commit.  To move the session forward use the
+other actions from the bisect transient command (\
+\\<magit-status-mode-map>\\[magit-bisect])."
+  (interactive (if (magit-bisect-in-progress-p)
+                   (user-error "Already bisecting")
+                 (magit-bisect-start-read-args)))
+  (magit-bisect-start--assert bad good args)
+  (magit-repository-local-set 'bisect--first-parent
+                              (transient-arg-value "--first-parent" args))
+  (magit-git-bisect "start" (list args bad good) t))
+
+(defun magit-bisect-start-read-args ()
+  (let ((args (transient-args 'magit-bisect))
+        (revs (magit-region-values '(commit branch) t)))
+    (or (and revs
+             (let ((a (car revs))
+                   (b (last revs)))
+               (cond ((magit-rev-ancestor-p a b) (list b a args))
+                     ((magit-rev-ancestor-p b a) (list a b args)))))
+        (let ((bad (magit-read-branch-or-commit
+                    (format "Start bisect with %s revision"
+                            (or (transient-arg-value "--term-new=" args)
+                                "bad")))))
+          (list bad
+                (magit-read-other-branch-or-commit
+                 (format "%s revision"
+                         (or (transient-arg-value "--term-old=" args)
+                             "Good"))
+                 bad)
+                args)))))
+
+(defun magit-bisect-start--assert (bad good args)
+  (unless (magit-merge-base bad good)
+    (user-error
+     "%s `%s' or merge-base has to be an ancestor of %s `%s')"
+     (or (transient-arg-value "--term-old=" args) "Good")
+     good
+     (or (transient-arg-value "--term-new=" args) "bad")
+     bad))
+  (when (magit-anything-modified-p)
+    (user-error "Cannot bisect with uncommitted changes")))
+
+;;;###autoload
+(defun magit-bisect-reset ()
+  "After bisecting, cleanup bisection state and return to original `HEAD'."
+  (interactive)
+  (magit-confirm 'reset-bisect)
+  (magit-run-git "bisect" "reset")
+  (magit-repository-local-delete 'bisect--first-parent)
+  (ignore-errors
+    (delete-file (expand-file-name "BISECT_CMD_OUTPUT" (magit-gitdir)))))
+
+;;;###autoload
+(defun magit-bisect-good ()
+  "While bisecting, mark the current commit as good.
+Use this after you have asserted that the commit does not contain
+the bug in question."
+  (interactive)
+  (magit-git-bisect (or (cadr (magit-bisect-terms))
+                        (user-error "Not bisecting"))))
+
+;;;###autoload
+(defun magit-bisect-bad ()
+  "While bisecting, mark the current commit as bad.
+Use this after you have asserted that the commit does contain the
+bug in question."
+  (interactive)
+  (magit-git-bisect (or (car (magit-bisect-terms))
+                        (user-error "Not bisecting"))))
+
+;;;###autoload
+(defun magit-bisect-mark ()
+  "While bisecting, mark the current commit with a bisect term.
+During a bisect using alternate terms, commits can still be
+marked with `magit-bisect-good' and `magit-bisect-bad', as those
+commands map to the correct term (\"good\" to --term-old's value
+and \"bad\" to --term-new's).  However, in some cases, it can be
+difficult to keep that mapping straight in your head; this
+command provides an interface that exposes the underlying terms."
+  (interactive)
+  (magit-git-bisect
+   (pcase-let ((`(,term-new ,term-old) (or (magit-bisect-terms)
+                                           (user-error "Not bisecting"))))
+     (pcase (read-char-choice
+             (format "Mark HEAD as %s ([n]ew) or %s ([o]ld)"
+                     term-new term-old)
+             (list ?n ?o))
+       (?n term-new)
+       (?o term-old)))))
+
+;;;###autoload
+(defun magit-bisect-skip ()
+  "While bisecting, skip the current commit.
+Use this if for some reason the current commit is not a good one
+to test.  This command lets Git choose a different one."
+  (interactive)
+  (magit-git-bisect "skip"))
+
+;;;###autoload
+(defun magit-bisect-run (cmdline &optional bad good args)
+  "Bisect automatically by running commands after each step.
+
+Unlike \"git bisect run\" this can be used before bisecting has begun.
+In that case it behaves like \"git bisect start; git bisect run\"."
+  (interactive (let ((args (and (not (magit-bisect-in-progress-p))
+                                (magit-bisect-start-read-args))))
+                 (cons (read-shell-command "Bisect shell command: ") args)))
+  (when (and bad good)
+    (magit-bisect-start--assert bad good args)
+    ;; Avoid `magit-git-bisect' because it's asynchronous, but the
+    ;; next "git bisect run" call requires the bisect to be started.
+    (magit-with-toplevel
+      (magit-process-git
+       (list :file (expand-file-name "BISECT_CMD_OUTPUT" (magit-gitdir)))
+       "bisect" "start" bad good args)
+      (magit-refresh)))
+  (with-connection-local-variables
+    (magit-git-bisect "run" (list shell-file-name
+                                  shell-command-switch cmdline))))
+
+(defun magit-git-bisect (subcommand &optional args no-assert)
+  (unless (or no-assert (magit-bisect-in-progress-p))
+    (user-error "Not bisecting"))
+  (message "Bisecting...")
+  (magit-with-toplevel
+    (magit-run-git-async "bisect" subcommand args))
+  (set-process-sentinel
+   magit-this-process
+   (lambda (process event)
+     (when (memq (process-status process) '(exit signal))
+       (if (> (process-exit-status process) 0)
+           (magit-process-sentinel process event)
+         (process-put process 'inhibit-refresh t)
+         (magit-process-sentinel process event)
+         (when (buffer-live-p (process-buffer process))
+           (with-current-buffer (process-buffer process)
+             (when-let* ((section (magit-section-at))
+                         (output (buffer-substring-no-properties
+                                  (oref section content)
+                                  (oref section end))))
+               (with-temp-file
+                   (expand-file-name "BISECT_CMD_OUTPUT" (magit-gitdir))
+                 (insert output)))))
+         (magit-refresh))
+       (message "Bisecting...done")))))
+
+;;; Sections
+
+(defun magit-bisect-in-progress-p ()
+  (file-exists-p (expand-file-name "BISECT_LOG" (magit-gitdir))))
+
+(defun magit-bisect-terms ()
+  (magit-file-lines (expand-file-name "BISECT_TERMS" (magit-gitdir))))
+
+(defun magit-insert-bisect-output ()
+  "While bisecting, insert section with output from \"git bisect\"."
+  (when (magit-bisect-in-progress-p)
+    (let* ((lines
+            (or (magit-file-lines
+                 (expand-file-name "BISECT_CMD_OUTPUT" (magit-gitdir)))
+                (list "Bisecting: (no saved bisect output)"
+                      "It appears you have invoked \"git bisect\" from a shell."
+                      "There is nothing wrong with that, we just cannot display"
+                      "anything useful here.  Consult the shell output instead.")))
+           (done-re "^\\([a-z0-9]\\{40,\\}\\) is the first bad commit$")
+           (bad-line (or (and (string-match done-re (car lines))
+                              (pop lines))
+                         (seq-find (##string-match done-re %) lines))))
+      (magit-insert-section ((eval (if bad-line 'commit 'bisect-output))
+                             (and bad-line (match-str 1 bad-line)))
+        (magit-insert-heading
+          (propertize (or bad-line (pop lines))
+                      'font-lock-face 'magit-section-heading))
+        (dolist (line lines)
+          (insert line "\n"))))
+    (insert "\n")))
+
+(defun magit-insert-bisect-rest ()
+  "While bisecting, insert section visualizing the bisect state."
+  (when (magit-bisect-in-progress-p)
+    (magit-insert-section (bisect-view)
+      (magit-insert-heading t "Bisect Rest")
+      (magit-git-wash (apply-partially #'magit-log-wash-log 'bisect-vis)
+        "bisect" "visualize" "git" "log"
+        "--format=%h%x00%D%x00%s" "--decorate=full"
+        (and magit-bisect-show-graph "--graph")
+        (and (magit-repository-local-get 'bisect--first-parent)
+             "--first-parent")))))
+
+(defun magit-insert-bisect-log ()
+  "While bisecting, insert section logging bisect progress."
+  (when (magit-bisect-in-progress-p)
+    (magit-insert-section (bisect-log)
+      (magit-insert-heading t "Bisect Log")
+      (magit-git-wash #'magit-wash-bisect-log "bisect" "log")
+      (insert ?\n))))
+
+(defun magit-wash-bisect-log (_args)
+  (let (beg)
+    (while (progn (setq beg (point-marker))
+                  (re-search-forward
+                   "^\\(\\(?:git bisect\\|# status:\\) [^\n]+\n\\)" nil t))
+      (if (string-prefix-p "# status:" (match-str 1))
+          (magit-delete-match)
+        (magit-bind-match-strings (heading) nil
+          (magit-delete-match)
+          (save-restriction
+            (narrow-to-region beg (point))
+            (goto-char (point-min))
+            (magit-insert-section (bisect-item heading t)
+              (magit-insert-heading
+                (propertize heading 'font-lock-face
+                            'magit-section-secondary-heading))
+              (magit-wash-sequence
+               (apply-partially #'magit-log-wash-rev 'bisect-log
+                                (magit-abbrev-length)))
+              (insert ?\n))))))
+    (when (re-search-forward
+           "# first bad commit: \\[\\([a-z0-9]\\{40,\\}\\)\\] [^\n]+\n" nil t)
+      (magit-bind-match-strings (hash) nil
+        (magit-delete-match)
+        (magit-insert-section (bisect-item)
+          (insert hash " is the first bad commit\n"))))))
+
+;;; _
+(provide 'magit-bisect)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-bisect.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bisect.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bisect.elc
new file mode 100644
index 0000000..6b519ed
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bisect.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-blame.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-blame.el
new file mode 100644
index 0000000..1549172
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-blame.el
@@ -0,0 +1,1020 @@
+;;; magit-blame.el --- Blame support for Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Annotates each line in file-visiting buffer with information from
+;; the revision which last modified the line.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Options
+
+(defgroup magit-blame nil
+  "Blame support for Magit."
+  :link '(info-link "(magit)Blaming")
+  :group 'magit-modes)
+
+(defcustom magit-blame-styles
+  '((headings
+     (heading-format   . "%-20a %C %s\n"))
+    (highlight
+     (highlight-face   . magit-blame-highlight))
+    (lines
+     (show-lines       . t)
+     (show-message     . t)))
+  "List of styles used to visualize blame information.
+
+The style used in the current buffer can be cycled from the blame
+popup.  Blame commands (except `magit-blame-echo') use the first
+style as the initial style when beginning to blame in a buffer.
+
+Each entry has the form (IDENT (KEY . VALUE)...).  IDENT has
+to be a symbol uniquely identifying the style.  The following
+KEYs are recognized:
+
+ `show-lines'
+    Whether to prefix each chunk of lines with a thin line.
+    This has no effect if `heading-format' is non-nil.
+ `show-message'
+    Whether to display a commit's summary line in the echo area
+    when crossing chunks.
+ `highlight-face'
+    Face used to highlight the first line of each chunk.
+    If this is nil, then those lines are not highlighted.
+ `heading-format'
+    String specifying the information to be shown above each
+    chunk of lines.  It must end with a newline character.
+ `margin-format'
+    String specifying the information to be shown in the left
+    buffer margin.  It must NOT end with a newline character.
+    This can also be a list of formats used for the lines at
+    the same positions within the chunk.  If the chunk has
+    more lines than formats are specified, then the last is
+    repeated.  WARNING: Adding this key affects performance;
+    see the note at the end of this docstring.
+ `margin-width'
+    Width of the margin, provided `margin-format' is non-nil.
+ `margin-face'
+    Face used in the margin, provided `margin-format' is
+    non-nil.  This face is used in combination with the faces
+    that are specific to the used %-specs.  If this is nil,
+    then `magit-blame-margin' is used.
+ `margin-body-face'
+    Face used in the margin for all but first line of a chunk.
+    This face is used in combination with the faces that are
+    specific to the used %-specs.  This can also be a list of
+    faces (usually one face), in which case only these faces
+    are used and the %-spec faces are ignored.  A good value
+    might be `(magit-blame-dimmed)'.  If this is nil, then
+    the same face as for the first line is used.
+
+The following %-specs can be used in `heading-format' and
+`margin-format':
+
+  %H    hash              using face `magit-blame-hash'
+  %h    truncated hash    using face `magit-blame-hash'
+  %s    summary           using face `magit-blame-summary'
+  %a    author            using face `magit-blame-name'
+  %A    author time       using face `magit-blame-date'
+  %c    committer         using face `magit-blame-name'
+  %C    committer time    using face `magit-blame-date'
+
+Note that for performance reasons %h results in truncated
+hashes, as opposed to properly abbreviated hashes that are
+guaranteed to uniquely identify a commit.
+
+Additionally if `margin-format' ends with %f, then the string
+that is displayed in the margin is made at least `margin-width'
+characters wide, which may be desirable if the used face sets
+the background color.
+
+Blame information is displayed using overlays.  Such extensive
+use of overlays is known to slow down even basic operations, such
+as moving the cursor.  To reduce the number of overlays the margin
+style had to be removed from the default value of this option.
+
+Note that the margin overlays are created even if another style
+is currently active.  This can only be prevented by not even
+defining a style that uses the margin.  If you want to use this
+style anyway, you can restore this definition, which used to be
+part of the default value:
+
+  (margin
+   (margin-format    . (\" %s%f\" \" %C %a\" \" %H\"))
+   (margin-width     . 42)
+   (margin-face      . magit-blame-margin)
+   (margin-body-face . (magit-blame-dimmed)))"
+  :package-version '(magit . "2.13.0")
+  :group 'magit-blame
+  :type '(alist :key-type symbol
+                :value-type (alist :key-type symbol :value-type sexp)))
+
+(defcustom magit-blame-echo-style 'lines
+  "The blame visualization style used by `magit-blame-echo'.
+A symbol that has to be used as the identifier for one of the
+styles defined in `magit-blame-styles'."
+  :package-version '(magit . "2.13.0")
+  :group 'magit-blame
+  :type 'symbol)
+
+(defcustom magit-blame-time-format "%F %H:%M"
+  "Format for time strings in blame headings."
+  :group 'magit-blame
+  :type 'string)
+
+(defcustom magit-blame-read-only t
+  "Whether to initially make the blamed buffer read-only."
+  :package-version '(magit . "2.13.0")
+  :group 'magit-blame
+  :type 'boolean)
+
+(defcustom magit-blame-disable-modes '(fci-mode yascroll-bar-mode)
+  "List of modes not compatible with Magit-Blame mode.
+This modes are turned off when Magit-Blame mode is turned on,
+and then turned on again when turning off the latter."
+  :group 'magit-blame
+  :type '(repeat (symbol :tag "Mode")))
+
+(defcustom magit-blame-mode-lighter " Blame"
+  "The mode-line lighter of the Magit-Blame mode."
+  :group 'magit-blame
+  :type '(choice (const :tag "No lighter" "") string))
+
+(defcustom magit-blame-goto-chunk-hook
+  (list #'magit-blame-maybe-update-revision-buffer
+        #'magit-blame-maybe-show-message)
+  "Hook run after point entered another chunk."
+  :package-version '(magit . "2.13.0")
+  :group 'magit-blame
+  :type 'hook
+  :get #'magit-hook-custom-get
+  :options (list #'magit-blame-maybe-update-revision-buffer
+                 #'magit-blame-maybe-show-message))
+
+;;; Faces
+
+(defface magit-blame-highlight
+  '((((class color) (background light))
+     :extend t
+     :background "grey80"
+     :foreground "black")
+    (((class color) (background dark))
+     :extend t
+     :background "grey25"
+     :foreground "white"))
+  "Face used for highlighting when blaming.
+Also see option `magit-blame-styles'."
+  :group 'magit-faces)
+
+(defface magit-blame-margin
+  '((t :inherit magit-blame-highlight
+       :weight normal
+       :slant normal))
+  "Face used for the blame margin by default when blaming.
+Also see option `magit-blame-styles'."
+  :group 'magit-faces)
+
+(defface magit-blame-dimmed
+  '((t :inherit magit-dimmed
+       :weight normal
+       :slant normal))
+  "Face used for the blame margin in some cases when blaming.
+Also see option `magit-blame-styles'."
+  :group 'magit-faces)
+
+(defface magit-blame-heading
+  '((t :extend t
+       :inherit magit-blame-highlight
+       :weight normal
+       :slant normal))
+  "Face used for blame headings by default when blaming.
+Also see option `magit-blame-styles'."
+  :group 'magit-faces)
+
+(defface magit-blame-summary '((t nil))
+  "Face used for commit summaries when blaming."
+  :group 'magit-faces)
+
+(defface magit-blame-hash '((t nil))
+  "Face used for commit hashes when blaming."
+  :group 'magit-faces)
+
+(defface magit-blame-name '((t nil))
+  "Face used for author and committer names when blaming."
+  :group 'magit-faces)
+
+(defface magit-blame-date '((t nil))
+  "Face used for dates when blaming."
+  :group 'magit-faces)
+
+;;; Variables
+
+(defvar-local magit-blame-buffer-read-only nil)
+(defvar-local magit-blame-cache nil)
+(defvar-local magit-blame-disabled-modes nil)
+(defvar-local magit-blame-process nil)
+(defvar-local magit-blame-recursive-p nil)
+(defvar-local magit-blame-type nil)
+(defvar-local magit-blame-separator nil)
+(defvar-local magit-blame-previous-chunk nil)
+
+(defvar-local magit-blame--make-margin-overlays nil)
+(defvar-local magit-blame--style nil)
+
+;;; Chunks
+
+(defclass magit-blame-chunk ()
+  (;; <orig-rev> <orig-line> <final-line> <num-lines>
+   (orig-rev   :initarg :orig-rev)
+   (orig-line  :initarg :orig-line)
+   (final-line :initarg :final-line)
+   (num-lines  :initarg :num-lines)
+   ;; previous <prev-rev> <prev-file>
+   (prev-rev   :initform nil)
+   (prev-file  :initform nil)
+   ;; filename <orig-file>
+   (orig-file)))
+
+(defun magit-current-blame-chunk (&optional type noerror)
+  (or (and (not (and type (not (eq type magit-blame-type))))
+           (magit-blame-chunk-at (point)))
+      (and type
+           (let ((rev magit-buffer-revision)
+                 (file (and (not (derived-mode-p 'dired-mode))
+                            (magit-file-relative-name
+                             nil (not magit-buffer-file-name))))
+                 (line (format "%d,+1" (line-number-at-pos))))
+             (cond (file
+                    (with-temp-buffer
+                      (magit-with-toplevel
+                        (magit-git-insert
+                         "blame" "--porcelain"
+                         (if (memq magit-blame-type '(final removal))
+                             (cons "--reverse" (magit-blame-arguments))
+                           (magit-blame-arguments))
+                         "-L" line rev "--" file)
+                        (goto-char (point-min))
+                        (cond ((not (eobp))
+                               (car (magit-blame--parse-chunk type)))
+                              ((not noerror)
+                               (error "Cannot get blame chunk at eob"))))))
+                   ((not noerror)
+                    (error "Buffer does not visit a tracked file")))))))
+
+(defun magit-blame-chunk-at (pos)
+  (seq-some (##overlay-get % 'magit-blame-chunk)
+            (overlays-at pos)))
+
+(defun magit-blame--overlay-at (&optional pos key)
+  (unless pos
+    (setq pos (point)))
+  (seq-find (##overlay-get % (or key 'magit-blame-chunk))
+            (nconc (overlays-at pos)
+                   (overlays-in pos pos))))
+
+;;; Keymaps
+
+(defvar-keymap magit-blame-mode-map
+  :doc "Keymap for `magit-blame-mode'.
+Note that most blaming key bindings are defined
+in `magit-blame-read-only-mode-map' instead."
+  "C-c C-q" #'magit-blame-quit)
+
+(defvar-keymap magit-blame-read-only-mode-map
+  :doc "Keymap for `magit-blame-read-only-mode'."
+  "C-m" #'magit-show-commit
+  "p"   #'magit-blame-previous-chunk
+  "P"   #'magit-blame-previous-chunk-same-commit
+  "n"   #'magit-blame-next-chunk
+  "N"   #'magit-blame-next-chunk-same-commit
+  "b"   #'magit-blame-addition
+  "r"   #'magit-blame-removal
+  "f"   #'magit-blame-reverse
+  "B"   #'magit-blame
+  "c"   #'magit-blame-cycle-style
+  "q"   #'magit-blame-quit
+  "M-w" #'magit-blame-copy-hash
+  "SPC"   #'magit-diff-show-or-scroll-up
+  "S-SPC" #'magit-diff-show-or-scroll-down
+  "DEL"   #'magit-diff-show-or-scroll-down)
+
+;;; Modes
+;;;; Base Mode
+
+(define-minor-mode magit-blame-mode
+  "Display blame information inline."
+  :lighter magit-blame-mode-lighter
+  :interactive nil
+  (cond (magit-blame-mode
+         (add-hook 'after-save-hook     #'magit-blame--refresh t t)
+         (add-hook 'post-command-hook   #'magit-blame-goto-chunk-hook t t)
+         (add-hook 'before-revert-hook  #'magit-blame--remove-overlays t t)
+         (add-hook 'after-revert-hook   #'magit-blame--refresh t t)
+         (add-hook 'read-only-mode-hook #'magit-blame-toggle-read-only t t)
+         (setq magit-blame-buffer-read-only buffer-read-only)
+         (when (or magit-blame-read-only magit-buffer-file-name)
+           (read-only-mode 1))
+         (dolist (mode magit-blame-disable-modes)
+           (when (and (boundp mode) (symbol-value mode))
+             (funcall mode -1)
+             (push mode magit-blame-disabled-modes)))
+         (setq magit-blame-separator (magit-blame--format-separator))
+         (unless magit-blame--style
+           (setq magit-blame--style (car magit-blame-styles)))
+         (setq magit-blame--make-margin-overlays
+               (and (cl-find-if (##assq 'margin-format (cdr %))
+                                magit-blame-styles)
+                    t))
+         (magit-blame--update-margin 'enable))
+        (t
+         (when (process-live-p magit-blame-process)
+           (kill-process magit-blame-process)
+           (while magit-blame-process
+             (sit-for 0.01))) ; avoid racing the sentinel
+         (remove-hook 'after-save-hook     #'magit-blame--refresh t)
+         (remove-hook 'post-command-hook   #'magit-blame-goto-chunk-hook t)
+         (remove-hook 'before-revert-hook  #'magit-blame--remove-overlays t)
+         (remove-hook 'after-revert-hook   #'magit-blame--refresh t)
+         (remove-hook 'read-only-mode-hook #'magit-blame-toggle-read-only t)
+         (unless magit-blame-buffer-read-only
+           (read-only-mode -1))
+         (magit-blame-read-only-mode -1)
+         (dolist (mode magit-blame-disabled-modes)
+           (funcall mode 1))
+         (kill-local-variable 'magit-blame-disabled-modes)
+         (kill-local-variable 'magit-blame-type)
+         (kill-local-variable 'magit-blame--style)
+         (magit-blame--update-margin 'disable)
+         (magit-blame--remove-overlays))))
+
+(defun magit-blame--refresh ()
+  (magit-blame--run (magit-blame-arguments)))
+
+(defun magit-blame-goto-chunk-hook ()
+  (let ((chunk (magit-blame-chunk-at (point))))
+    (when (cl-typep chunk 'magit-blame-chunk)
+      (unless (eq chunk magit-blame-previous-chunk)
+        (run-hooks 'magit-blame-goto-chunk-hook))
+      (setq magit-blame-previous-chunk chunk))))
+
+(defun magit-blame-toggle-read-only ()
+  (magit-blame-read-only-mode (if buffer-read-only 1 -1)))
+
+;;;; Read-Only Mode
+
+(define-minor-mode magit-blame-read-only-mode
+  "Provide keybindings for Magit-Blame mode.
+
+This minor-mode provides the key bindings for Magit-Blame mode,
+but only when Read-Only mode is also enabled because these key
+bindings would otherwise conflict badly with regular bindings.
+
+When both Magit-Blame mode and Read-Only mode are enabled, then
+this mode gets automatically enabled too and when one of these
+modes is toggled, then this mode also gets toggled automatically.
+
+\\{magit-blame-read-only-mode-map}")
+
+;;;; Kludges
+
+(defun magit-blame-put-keymap-before-view-mode ()
+  "Put `magit-blame-read-only-mode' ahead of `view-mode' in `minor-mode-map-alist'."
+  (when-let ((entry (assq 'magit-blame-read-only-mode
+                          (cl-member 'view-mode minor-mode-map-alist
+                                     :key #'car))))
+    (setq minor-mode-map-alist
+          (cons entry
+                (delq entry minor-mode-map-alist))))
+  (remove-hook 'view-mode-hook #'magit-blame-put-keymap-before-view-mode))
+
+(add-hook 'view-mode-hook #'magit-blame-put-keymap-before-view-mode)
+
+;;; Process
+
+(defun magit-blame--run (args)
+  (magit-with-toplevel
+    (unless magit-blame-mode
+      (magit-blame-mode 1))
+    (message "Blaming...")
+    (magit-blame-run-process
+     (and (not (equal magit-buffer-revision "{index}"))
+          magit-buffer-revision)
+     (magit-file-relative-name nil (not magit-buffer-file-name))
+     (if (memq magit-blame-type '(final removal))
+         (cons "--reverse" args)
+       args)
+     (list (line-number-at-pos (window-start))
+           (line-number-at-pos (1- (window-end nil t)))))
+    (set-process-sentinel magit-this-process
+                          #'magit-blame-process-quickstart-sentinel)))
+
+(defun magit-blame-run-process (rev file args &optional lines)
+  (let ((process (magit-parse-git-async
+                  "blame" "--incremental" args
+                  (and lines (list "-L" (apply #'format "%s,%s" lines)))
+                  rev "--" file)))
+    (set-process-filter   process #'magit-blame-process-filter)
+    (set-process-sentinel process #'magit-blame-process-sentinel)
+    (process-put process 'arguments (list rev file args))
+    (setq magit-blame-cache (make-hash-table :test #'equal))
+    (setq magit-blame-process process)))
+
+(defun magit-blame-process-quickstart-sentinel (process event)
+  (when (memq (process-status process) '(exit signal))
+    (magit-blame-process-sentinel process event t)
+    (magit-blame-assert-buffer process)
+    (with-current-buffer (process-get process 'command-buf)
+      (when magit-blame-mode
+        (let ((default-directory (magit-toplevel)))
+          (apply #'magit-blame-run-process
+                 (process-get process 'arguments)))))))
+
+(defun magit-blame-process-sentinel (process _event &optional quiet)
+  (let ((status (process-status process)))
+    (when (memq status '(exit signal))
+      (kill-buffer (process-buffer process))
+      (kill-buffer (process-get process 'stderr-buf))
+      (if (and (eq status 'exit)
+               (zerop (process-exit-status process)))
+          (unless quiet
+            (message "Blaming...done"))
+        (magit-blame-assert-buffer process)
+        (with-current-buffer (process-get process 'command-buf)
+          (cond (magit-blame-mode
+                 (magit-blame-mode -1)
+                 (message "Blaming...failed"))
+                ((message "Blaming...aborted")))))
+      (kill-local-variable 'magit-blame-process))))
+
+(defun magit-blame-process-filter (process string)
+  (internal-default-process-filter process string)
+  (let ((buf  (process-get process 'command-buf))
+        (pos  (process-get process 'parsed))
+        (mark (process-mark process))
+        type cache)
+    (with-current-buffer buf
+      (setq type  magit-blame-type)
+      (setq cache magit-blame-cache))
+    (with-current-buffer (process-buffer process)
+      (goto-char pos)
+      (while (and (< (point) mark)
+                  (save-excursion (re-search-forward "^filename .+\n" nil t)))
+        (pcase-let* ((`(,chunk ,revinfo)
+                      (magit-blame--parse-chunk type))
+                     (rev (oref chunk orig-rev)))
+          (if revinfo
+              (puthash rev revinfo cache)
+            (setq revinfo
+                  (or (gethash rev cache)
+                      (puthash rev (magit-blame--commit-alist rev) cache))))
+          (magit-blame--make-overlays buf chunk revinfo))
+        (process-put process 'parsed (point))))))
+
+(defun magit-blame--parse-chunk (type)
+  (let (chunk revinfo)
+    (unless (looking-at "^\\(.\\{40,\\}\\) \\([0-9]+\\) \\([0-9]+\\) \\([0-9]+\\)")
+      (error "Blaming failed due to unexpected output: %s"
+             (buffer-substring-no-properties (point) (line-end-position))))
+    (with-slots (orig-rev orig-file prev-rev prev-file)
+        (setq chunk (magit-blame-chunk
+                     :orig-rev                     (match-str 1)
+                     :orig-line  (string-to-number (match-str 2))
+                     :final-line (string-to-number (match-str 3))
+                     :num-lines  (string-to-number (match-str 4))))
+      (forward-line)
+      (let (done)
+        (while (not done)
+          (cond ((looking-at "^filename \\(.+\\)")
+                 (setq done t)
+                 (setf orig-file (magit-decode-git-path (match-str 1))))
+                ((looking-at "^previous \\(.\\{40,\\}\\) \\(.+\\)")
+                 (setf prev-rev  (match-str 1))
+                 (setf prev-file (magit-decode-git-path (match-str 2))))
+                ((looking-at "^\\([^ ]+\\) \\(.+\\)")
+                 (push (cons (match-str 1)
+                             (match-str 2))
+                       revinfo)))
+          (forward-line)))
+      (when (and (eq type 'removal) prev-rev)
+        (cl-rotatef orig-rev  prev-rev)
+        (cl-rotatef orig-file prev-file)
+        (setq revinfo nil)))
+    (list chunk revinfo)))
+
+(defun magit-blame--commit-alist (rev)
+  (cl-mapcar 'cons
+             '("summary"
+               "author" "author-time" "author-tz"
+               "committer" "committer-time" "committer-tz")
+             (split-string (magit-rev-format "%s\v%an\v%ad\v%cn\v%cd" rev
+                                             "--date=format:%s\v%z")
+                           "\v")))
+
+(defun magit-blame-assert-buffer (process)
+  (unless (buffer-live-p (process-get process 'command-buf))
+    (kill-process process)
+    (user-error "Buffer being blamed has been killed")))
+
+;;; Display
+
+(defvar-local magit-blame--previous-margin-width nil)
+
+(defsubst magit-blame--style-get (key)
+  (cdr (assoc key (cdr magit-blame--style))))
+
+(defun magit-blame--make-overlays (buf chunk revinfo)
+  (with-current-buffer buf
+    (save-excursion
+      (save-restriction
+        (widen)
+        (let* ((line (oref chunk final-line))
+               (beg (magit-blame--line-beginning-position line))
+               (end (magit-blame--line-beginning-position
+                     (+ line (oref chunk num-lines))))
+               (before (magit-blame-chunk-at (1- beg))))
+          (when (and before
+                     (equal (oref before orig-rev)
+                            (oref chunk orig-rev)))
+            (setq beg (magit-blame--line-beginning-position
+                       (oset chunk final-line (oref before final-line))))
+            (incf (oref chunk num-lines)
+                  (oref before num-lines)))
+          (magit-blame--remove-overlays beg end)
+          (when magit-blame--make-margin-overlays
+            (magit-blame--make-margin-overlays chunk revinfo beg end))
+          (magit-blame--make-heading-overlay chunk revinfo beg end)
+          (magit-blame--make-highlight-overlay chunk beg))))))
+
+(defun magit-blame--line-beginning-position (line)
+  (save-excursion
+    (goto-char (point-min))
+    (forward-line (1- line))
+    (point)))
+
+(defun magit-blame--make-margin-overlays (chunk revinfo beg end)
+  (save-excursion
+    (let ((line 0))
+      (goto-char beg)
+      (while (< (point) end)
+        (magit-blame--make-margin-overlay chunk revinfo line)
+        (forward-line)
+        (incf line)))))
+
+(defun magit-blame--make-margin-overlay (chunk revinfo line)
+  (let* ((end (line-end-position))
+         ;; If possible avoid putting this on the first character
+         ;; of the line to avoid a conflict with the line overlay.
+         (beg (min (1+ (line-beginning-position)) end))
+         (ov  (make-overlay beg end)))
+    (overlay-put ov 'magit-blame-chunk chunk)
+    (overlay-put ov 'magit-blame-revinfo revinfo)
+    (overlay-put ov 'magit-blame-margin line)
+    (magit-blame--update-margin-overlay ov)))
+
+(defun magit-blame--make-heading-overlay (chunk revinfo beg end)
+  (let ((ov (make-overlay beg end)))
+    (overlay-put ov 'magit-blame-chunk chunk)
+    (overlay-put ov 'magit-blame-revinfo revinfo)
+    (overlay-put ov 'magit-blame-heading t)
+    (magit-blame--update-heading-overlay ov)))
+
+(defun magit-blame--make-highlight-overlay (chunk beg)
+  (let ((ov (make-overlay beg (1+ (magit--eol-position beg)))))
+    (overlay-put ov 'magit-blame-chunk chunk)
+    (overlay-put ov 'magit-blame-highlight t)
+    (magit-blame--update-highlight-overlay ov)))
+
+(defun magit-blame--update-margin (&optional action)
+  (when (eq action 'enable)
+    (setq magit-blame--previous-margin-width left-margin-width))
+  (setq left-margin-width
+        (if (eq action 'disable)
+            (prog1 magit-blame--previous-margin-width
+              (setq magit-blame--previous-margin-width nil))
+          (or (magit-blame--style-get 'margin-width)
+              magit-blame--previous-margin-width)))
+  (set-window-buffer (selected-window) (current-buffer)))
+
+(defun magit-blame--update-overlays ()
+  (save-restriction
+    (widen)
+    (dolist (ov (overlays-in (point-min) (point-max)))
+      (cond ((overlay-get ov 'magit-blame-heading)
+             (magit-blame--update-heading-overlay ov))
+            ((overlay-get ov 'magit-blame-margin)
+             (magit-blame--update-margin-overlay ov))
+            ((overlay-get ov 'magit-blame-highlight)
+             (magit-blame--update-highlight-overlay ov))))))
+
+(defun magit-blame--update-margin-overlay (ov)
+  (overlay-put
+   ov 'before-string
+   (and (magit-blame--style-get 'margin-width)
+        (propertize
+         "o" 'display
+         (list (list 'margin 'left-margin)
+               (let ((line   (overlay-get ov 'magit-blame-margin))
+                     (format (magit-blame--style-get 'margin-format))
+                     (face   (magit-blame--style-get 'margin-face)))
+                 (magit-blame--format-string
+                  ov
+                  (or (and (atom format)
+                           format)
+                      (nth line format)
+                      (car (last format)))
+                  (or (and (not (zerop line))
+                           (magit-blame--style-get 'margin-body-face))
+                      face
+                      'magit-blame-margin))))))))
+
+(defun magit-blame--update-heading-overlay (ov)
+  (overlay-put
+   ov 'before-string
+   (if-let ((format (magit-blame--style-get 'heading-format)))
+       ;; Use `default' as the last face to avoid picking up any face
+       ;; attributes from the first character of the text on which we
+       ;; put the overlay.  See #5233.
+       (magit-blame--format-string ov format '(magit-blame-heading default))
+     (and (magit-blame--style-get 'show-lines)
+          (or (not (magit-blame--style-get 'margin-format))
+              (save-excursion
+                (goto-char (overlay-start ov))
+                ;; Special case of the special case described in
+                ;; `magit-blame--make-margin-overlay'.  For empty
+                ;; lines it is not possible to show both overlays
+                ;; without the line being too high.
+                (not (= (point) (line-end-position)))))
+          magit-blame-separator))))
+
+(defun magit-blame--update-highlight-overlay (ov)
+  (overlay-put ov 'font-lock-face (magit-blame--style-get 'highlight-face)))
+
+(defun magit-blame--format-string (ov format face)
+  (let* ((chunk   (overlay-get ov 'magit-blame-chunk))
+         (revinfo (overlay-get ov 'magit-blame-revinfo))
+         (key     (list format face))
+         (string  (cdr (assoc key revinfo))))
+    (unless string
+      (setq string
+            (and format
+                 (magit-blame--format-string-1 (oref chunk orig-rev)
+                                               revinfo format face)))
+      (nconc revinfo (list (cons key string))))
+    string))
+
+(defun magit-blame--format-string-1 (rev revinfo format face)
+  (let ((str
+         (if (string-match-p "\\`0\\{40,\\}\\'" rev)
+             (propertize (concat (if (string-prefix-p "\s" format) "\s" "")
+                                 "Not Yet Committed"
+                                 (if (string-suffix-p "\n" format) "\n" ""))
+                         'font-lock-face face)
+           (magit--format-spec
+            (propertize format 'font-lock-face face)
+            (cl-flet* ((p0 (s f)
+                         (propertize s 'font-lock-face
+                                     (if face (cons f (ensure-list face)) f)))
+                       (p1 (k f)
+                         (p0 (cdr (assoc k revinfo)) f))
+                       (p2 (k1 k2 f)
+                         (p0 (magit-blame--format-time-string
+                              (cdr (assoc k1 revinfo))
+                              (cdr (assoc k2 revinfo)))
+                             f)))
+              `((?H . ,(p0 rev                             'magit-blame-hash))
+                (?h . ,(p0 (magit-blame--abbrev-hash rev)  'magit-blame-hash))
+                (?s . ,(p1 "summary"                       'magit-blame-summary))
+                (?a . ,(p1 "author"                        'magit-blame-name))
+                (?c . ,(p1 "committer"                     'magit-blame-name))
+                (?A . ,(p2 "author-time"    "author-tz"    'magit-blame-date))
+                (?C . ,(p2 "committer-time" "committer-tz" 'magit-blame-date))
+                (?f . "")))))))
+    (if-let ((width (and (string-suffix-p "%f" format)
+                         (magit-blame--style-get 'margin-width))))
+        (concat str
+                (propertize (make-string (max 0 (- width (length str))) ?\s)
+                            'font-lock-face face))
+      str)))
+
+(defun magit-blame--format-separator ()
+  (propertize (concat (propertize "\s" 'display '(space :height (2)))
+                      (propertize "\n" 'line-height t))
+              'font-lock-face
+              `( :extend t
+                 :background
+                 ,(face-attribute 'magit-blame-heading :background nil t))))
+
+(defun magit-blame--format-time-string (time tz)
+  (let* ((time-format (or (magit-blame--style-get 'time-format)
+                          magit-blame-time-format))
+         (tz-in-second (and (string-search "%z" time-format)
+                            (car (last (parse-time-string tz))))))
+    (format-time-string time-format
+                        (seconds-to-time (string-to-number time))
+                        tz-in-second)))
+
+(defvar-local magit-blame--abbrev-length nil)
+
+(defun magit-blame--abbrev-hash (rev)
+  (substring rev 0 (or magit-blame--abbrev-length
+                       (setq magit-blame--abbrev-length
+                             (magit-abbrev-length)))))
+
+(defun magit-blame--remove-overlays (&optional beg end)
+  (save-restriction
+    (widen)
+    (dolist (ov (overlays-in (or beg (point-min))
+                             (or end (point-max))))
+      (when (overlay-get ov 'magit-blame-chunk)
+        (delete-overlay ov)))))
+
+(defun magit-blame-maybe-show-message ()
+  (cond-let
+    ((not (magit-blame--style-get 'show-message)))
+    ([msg (cdr (assoc "summary"
+                      (gethash (oref (magit-current-blame-chunk) orig-rev)
+                               magit-blame-cache)))]
+     (set-text-properties 0 (length msg) nil msg)
+     (magit-msg "%S" msg))
+    ((magit-msg "Commit data not available yet.  Still blaming."))))
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-blame-echo "magit-blame" nil t)
+(transient-define-suffix magit-blame-echo (args)
+  "For each line show the revision in which it was added.
+Show the information about the chunk at point in the echo area
+when moving between chunks.  Unlike other blaming commands, do
+not turn on `read-only-mode'."
+  :if (##and buffer-file-name
+             (or (not magit-blame-mode)
+                 buffer-read-only))
+  (interactive (list (magit-blame-arguments)))
+  (when magit-buffer-file-name
+    (user-error "Blob buffers aren't supported"))
+  (setq-local magit-blame--style
+              (assq magit-blame-echo-style magit-blame-styles))
+  (setq-local magit-blame-disable-modes
+              (cons 'eldoc-mode magit-blame-disable-modes))
+  (if (not magit-blame-mode)
+      (let ((magit-blame-read-only nil))
+        (magit-blame--pre-blame-assert 'addition)
+        (magit-blame--pre-blame-setup  'addition)
+        (magit-blame--run args))
+    (read-only-mode -1)
+    (magit-blame--update-overlays)))
+
+;;;###autoload(autoload 'magit-blame-addition "magit-blame" nil t)
+(transient-define-suffix magit-blame-addition (args)
+  "For each line show the revision in which it was added."
+  (interactive (list (magit-blame-arguments)))
+  (magit-blame--pre-blame-assert 'addition)
+  (magit-blame--pre-blame-setup  'addition)
+  (magit-blame--run args))
+
+;;;###autoload(autoload 'magit-blame-removal "magit-blame" nil t)
+(transient-define-suffix magit-blame-removal (args)
+  "For each line show the revision in which it was removed."
+  :if-nil 'buffer-file-name
+  (interactive (list (magit-blame-arguments)))
+  (unless magit-buffer-file-name
+    (user-error "Only blob buffers can be blamed in reverse"))
+  (magit-blame--pre-blame-assert 'removal)
+  (magit-blame--pre-blame-setup  'removal)
+  (magit-blame--run args))
+
+;;;###autoload(autoload 'magit-blame-reverse "magit-blame" nil t)
+(transient-define-suffix magit-blame-reverse (args)
+  "For each line show the last revision in which it still exists."
+  :if-nil 'buffer-file-name
+  (interactive (list (magit-blame-arguments)))
+  (unless magit-buffer-file-name
+    (user-error "Only blob buffers can be blamed in reverse"))
+  (magit-blame--pre-blame-assert 'final)
+  (magit-blame--pre-blame-setup  'final)
+  (magit-blame--run args))
+
+(defun magit-blame--pre-blame-assert (type)
+  (unless (magit-toplevel)
+    (magit--not-inside-repository-error))
+  (cond ((and magit-blame-mode
+              (eq type magit-blame-type))
+         (if-let ((chunk (magit-current-blame-chunk)))
+             (unless (oref chunk prev-rev)
+               (user-error "Chunk has no further history"))
+           (message "Still blaming, commit data not available yet")))
+        ((not (magit-file-relative-name nil (not magit-buffer-file-name)))
+         (if buffer-file-name
+             (user-error "Buffer isn't visiting a tracked file")
+           (user-error "Buffer isn't visiting a file")))))
+
+(defun magit-blame--pre-blame-setup (type)
+  (when magit-blame-mode
+    (if (eq type magit-blame-type)
+        (let ((style magit-blame--style))
+          (magit-blame-visit-other-file)
+          (setq-local magit-blame--style style)
+          (setq-local magit-blame-recursive-p t)
+          ;; Set window-start for the benefit of quickstart.
+          (redisplay))
+      (magit-blame--remove-overlays)))
+  (setq magit-blame-type type))
+
+(defun magit-blame-visit-other-file ()
+  "Visit another blob related to the current chunk."
+  (interactive)
+  (with-slots (prev-rev prev-file orig-line)
+      (magit-current-blame-chunk)
+    (unless prev-rev
+      (user-error "Chunk has no further history"))
+    (magit-with-toplevel
+      (magit-find-file prev-rev prev-file))
+    ;; TODO Adjust line like magit-diff-visit-file.
+    (goto-char (point-min))
+    (forward-line (1- orig-line))))
+
+(defun magit-blame-visit-file ()
+  "Visit the blob related to the current chunk."
+  (interactive)
+  (with-slots (orig-rev orig-file orig-line)
+      (magit-current-blame-chunk)
+    (magit-with-toplevel
+      (magit-find-file orig-rev orig-file))
+    (goto-char (point-min))
+    (forward-line (1- orig-line))))
+
+(transient-define-suffix magit-blame-quit ()
+  "Turn off Magit-Blame mode.
+If the buffer was created during a recursive blame,
+then also kill the buffer."
+  :if-non-nil 'magit-blame-mode
+  (interactive)
+  (magit-blame-mode -1)
+  (when magit-blame-recursive-p
+    (kill-buffer)))
+
+(defun magit-blame-next-chunk ()
+  "Move to the next chunk."
+  (interactive)
+  (if-let ((next (next-single-char-property-change
+                  (point) 'magit-blame-chunk)))
+      (goto-char next)
+    (user-error "No more chunks")))
+
+(defun magit-blame-previous-chunk ()
+  "Move to the previous chunk."
+  (interactive)
+  (if-let ((prev (previous-single-char-property-change
+                  (point) 'magit-blame-chunk)))
+      (goto-char prev)
+    (user-error "No more chunks")))
+
+(defun magit-blame-next-chunk-same-commit (&optional previous)
+  "Move to the next chunk from the same commit.
+\n(fn)"
+  (interactive)
+  (if-let ((rev (oref (magit-current-blame-chunk) orig-rev)))
+      (let ((pos (point)) ov)
+        (save-excursion
+          (while (and (not ov)
+                      (not (= pos (if previous (point-min) (point-max))))
+                      (setq pos (funcall
+                                 (if previous
+                                     #'previous-single-char-property-change
+                                   #'next-single-char-property-change)
+                                 pos 'magit-blame-chunk)))
+            (when-let
+                ((o (magit-blame--overlay-at pos))
+                 (_(equal (oref (magit-blame-chunk-at pos) orig-rev) rev)))
+              (setq ov o))))
+        (if ov
+            (goto-char (overlay-start ov))
+          (user-error "No more chunks from same commit")))
+    (user-error "This chunk hasn't been blamed yet")))
+
+(defun magit-blame-previous-chunk-same-commit ()
+  "Move to the previous chunk from the same commit."
+  (interactive)
+  (magit-blame-next-chunk-same-commit #'previous-single-char-property-change))
+
+(defun magit-blame-cycle-style ()
+  "Change how blame information is visualized.
+Cycle through the elements of option `magit-blame-styles'."
+  (interactive)
+  (setq magit-blame--style
+        (or (cadr (cl-member (car magit-blame--style)
+                             magit-blame-styles :key #'car))
+            (car magit-blame-styles)))
+  (magit-blame--update-margin)
+  (magit-blame--update-overlays))
+
+(defun magit-blame-copy-hash ()
+  "Save hash of the current chunk's commit to the kill ring.
+
+When the region is active, then save the region's content
+instead of the hash, like `kill-ring-save' would."
+  (interactive)
+  (if (use-region-p)
+      (call-interactively #'copy-region-as-kill)
+    (kill-new (message "%s" (oref (magit-current-blame-chunk) orig-rev)))))
+
+;;; Menu
+
+;;;###autoload(autoload 'magit-blame "magit-blame" nil t)
+(transient-define-prefix magit-blame ()
+  "Show the commits that added or removed lines in the visited file."
+  :man-page "git-blame"
+  :value '("-w")
+  ["Arguments"
+   ("-w" "Ignore whitespace" "-w")
+   ("-r" "Do not treat root commits as boundaries" "--root")
+   ("-P" "Follow only first parent" "--first-parent")
+   (magit-blame:-M)
+   (magit-blame:-C)]
+  ["Actions"
+   ("b" "Show commits adding lines" magit-blame-addition)
+   ("r" "Show commits removing lines" magit-blame-removal)
+   ("f" "Show last commits that still have lines" magit-blame-reverse)
+   ("m" "Blame echo" magit-blame-echo)
+   ("q" "Quit blaming" magit-blame-quit)]
+  ["Refresh"
+   :if-non-nil magit-blame-mode
+   ("c" "Cycle style" magit-blame-cycle-style :transient t)])
+
+(defun magit-blame-arguments ()
+  (transient-args 'magit-blame))
+
+(transient-define-argument magit-blame:-M ()
+  :description "Detect lines moved or copied within a file"
+  :class 'transient-option
+  :argument "-M"
+  :allow-empty t
+  :reader #'transient-read-number-N+)
+
+(transient-define-argument magit-blame:-C ()
+  :description "Detect lines moved or copied between files"
+  :class 'transient-option
+  :argument "-C"
+  :allow-empty t
+  :reader #'transient-read-number-N+)
+
+;;; Utilities
+
+(defun magit-blame-maybe-update-revision-buffer ()
+  (when-let* ((chunk  (magit-current-blame-chunk))
+              (commit (oref chunk orig-rev))
+              (buffer (magit-get-mode-buffer 'magit-revision-mode nil t)))
+    (if magit--update-revision-buffer
+        (setq magit--update-revision-buffer (list commit buffer))
+      (setq magit--update-revision-buffer (list commit buffer))
+      (run-with-idle-timer
+       magit-update-other-window-delay nil
+       (lambda ()
+         (pcase-let ((`(,rev ,buf) magit--update-revision-buffer))
+           (setq magit--update-revision-buffer nil)
+           (when (buffer-live-p buf)
+             (let ((magit-display-buffer-noselect t))
+               (apply #'magit-show-commit rev
+                      (magit-diff-arguments 'magit-revision-mode))))))))))
+
+;;; _
+(provide 'magit-blame)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-blame.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-blame.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-blame.elc
new file mode 100644
index 0000000..24514c7
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-blame.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bookmark.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bookmark.el
new file mode 100644
index 0000000..d8e9e08
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bookmark.el
@@ -0,0 +1,176 @@
+;;; magit-bookmark.el --- Bookmarks for Magit buffers  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Inspired by an earlier implementation by Yuri Khan.
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Support for bookmarks for most Magit buffers.
+
+;;; Code:
+
+(require 'magit)
+
+(require 'bookmark)
+
+;;; Common
+
+(cl-defmethod magit-bookmark-get-filename (&context (major-mode magit-mode))
+  (magit-toplevel))
+
+(cl-defmethod magit-bookmark--store-buffer-values
+  (bookmark &context (major-mode magit-mode))
+  (dolist (var (get major-mode 'magit-bookmark-variables))
+    (bookmark-prop-set bookmark var (symbol-value var))))
+
+(cl-defmethod magit-bookmark-get-buffer-create
+  (bookmark (mode (derived-mode magit-mode)))
+  (let ((default-directory (bookmark-get-filename bookmark))
+        (magit-display-buffer-function #'identity)
+        (magit-display-buffer-noselect t))
+    (apply (intern (format "%s-setup-buffer"
+                           (substring (symbol-name mode) 0 -5)))
+           (mapcar (##bookmark-prop-get bookmark %)
+                   (get mode 'magit-bookmark-variables)))))
+
+;;; Diff
+;;;; Diff
+
+(put 'magit-diff-mode 'magit-bookmark-variables
+     '(magit-buffer-diff-range-oids
+       magit-buffer-diff-typearg
+       magit-buffer-diff-args
+       magit-buffer-diff-files))
+
+(cl-defmethod magit-bookmark-name (&context (major-mode magit-diff-mode))
+  (format "magit-diff(%s%s)"
+          (pcase (magit-diff-type)
+            ('staged "staged")
+            ('unstaged "unstaged")
+            ('committed magit-buffer-diff-range)
+            ('undefined
+             (delq nil
+                   (list magit-buffer-diff-typearg magit-buffer-diff-range-oids))))
+          (if magit-buffer-diff-files
+              (concat " -- " (string-join magit-buffer-diff-files " "))
+            "")))
+
+;;;; Revision
+
+(put 'magit-revision-mode 'magit-bookmark-variables
+     '(magit-buffer-revision-oid
+       magit-buffer-diff-args
+       magit-buffer-diff-files))
+
+(cl-defmethod magit-bookmark-name (&context (major-mode magit-revision-mode))
+  (format "magit-revision(%s %s)"
+          (magit-rev-abbrev magit-buffer-revision)
+          (if magit-buffer-diff-files
+              (string-join magit-buffer-diff-files " ")
+            (magit-rev-format "%s" magit-buffer-revision))))
+
+;;;; Stash
+
+(put 'magit-stash-mode 'magit-bookmark-variables
+     '(magit-buffer-revision-oid
+       magit-buffer-diff-args
+       magit-buffer-diff-files))
+
+(cl-defmethod magit-bookmark-name (&context (major-mode magit-stash-mode))
+  (format "magit-stash(%s %s)"
+          (magit-rev-abbrev magit-buffer-revision)
+          (if magit-buffer-diff-files
+              (string-join magit-buffer-diff-files " ")
+            (magit-rev-format "%s" magit-buffer-revision))))
+
+(cl-defmethod magit-bookmark--get-child-value
+  (section &context (major-mode magit-stash-mode))
+  (string-replace magit-buffer-revision
+                  magit-buffer-revision-oid
+                  (oref section value)))
+
+;;; Log
+;;;; Log
+
+(put 'magit-log-mode 'magit-bookmark-variables
+     '(magit-buffer-log-revisions
+       magit-buffer-log-args
+       magit-buffer-log-files))
+
+(cl-defmethod magit-bookmark-name (&context (major-mode magit-log-mode))
+  (format "magit-log(%s%s)"
+          (string-join magit-buffer-log-revisions " ")
+          (if magit-buffer-log-files
+              (concat " -- " (string-join magit-buffer-log-files " "))
+            "")))
+
+;;;; Cherry
+
+(put 'magit-cherry-mode 'magit-bookmark-variables
+     '(magit-buffer-refname
+       magit-buffer-cherry-upstream))
+
+(cl-defmethod magit-bookmark-name (&context (major-mode magit-cherry-mode))
+  (format "magit-cherry(%s > %s)"
+          magit-buffer-refname
+          magit-buffer-cherry-upstream))
+
+;;;; Reflog
+
+(put 'magit-reflog-mode 'magit-bookmark-variables
+     '(magit-buffer-refname))
+
+(cl-defmethod magit-bookmark-name (&context (major-mode magit-reflog-mode))
+  (format "magit-reflog(%s)" magit-buffer-refname))
+
+;;; Misc
+
+(put 'magit-status-mode 'magit-bookmark-variables nil)
+
+(put 'magit-refs-mode 'magit-bookmark-variables
+     '(magit-buffer-refs-upstream
+       magit-buffer-refs-args))
+
+(put 'magit-stashes-mode 'magit-bookmark-variables nil)
+
+(cl-defmethod magit-bookmark-name (&context (major-mode magit-stashes-mode))
+  (format "magit-states(%s)" magit-buffer-refname))
+
+;;; _
+(provide 'magit-bookmark)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-bookmark.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bookmark.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bookmark.elc
new file mode 100644
index 0000000..464dd9b
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bookmark.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-branch.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-branch.el
new file mode 100644
index 0000000..27a2666
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-branch.el
@@ -0,0 +1,1044 @@
+;;; magit-branch.el --- Branch support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for branches.  It defines commands
+;; for creating, checking out, manipulating, and configuring branches.
+;; Commands defined here are mainly concerned with branches as
+;; pointers, commands that deal with what a branch points at, are
+;; defined elsewhere.
+
+;;; Code:
+
+(require 'magit)
+(require 'magit-reset)
+
+;;; Options
+
+(defcustom magit-branch-read-upstream-first t
+  "Whether to read upstream before name of new branch when creating a branch.
+
+`nil'      Read the branch name first.
+`t'        Read the upstream first.
+`fallback' Read the upstream first, but if it turns out that the chosen
+           value is not a valid upstream (because it cannot be resolved
+           as an existing revision), then treat it as the name of the
+           new branch and continue by reading the upstream next."
+  :package-version '(magit . "2.2.0")
+  :group 'magit-commands
+  :type '(choice (const :tag "Read branch name first" nil)
+                 (const :tag "Read upstream first" t)
+                 (const :tag "Read upstream first, with fallback" fallback)))
+
+(defcustom magit-branch-name-suggestions nil
+  "List of names and/or prefixes suggested when naming a new branch."
+  :package-version '(magit . "4.6.0")
+  :group 'magit-commands
+  :type '(repeat string)
+  :safe (##and (listp %) (all #'stringp %)))
+
+(defcustom magit-branch-prefer-remote-upstream nil
+  "Whether to favor remote upstreams when creating new branches.
+
+When a new branch is created, then the branch, commit, or stash
+at point is suggested as the default starting point of the new
+branch, or if there is no such revision at point the current
+branch.  In either case the user may choose another starting
+point.
+
+If the chosen starting point is a branch, then it may also be set
+as the upstream of the new branch, depending on the value of the
+Git variable `branch.autoSetupMerge'.  By default this is done
+for remote branches, but not for local branches.
+
+You might prefer to always use some remote branch as upstream.
+If the chosen starting point is (1) a local branch, (2) whose
+name matches a member of the value of this option, (3) the
+upstream of that local branch is a remote branch with the same
+name, and (4) that remote branch can be fast-forwarded to the
+local branch, then the chosen branch is used as starting point,
+but its own upstream is used as the upstream of the new branch.
+
+Members of this option's value are treated as branch names that
+have to match exactly unless they contain a character that makes
+them invalid as a branch name.  Recommended characters to use
+to trigger interpretation as a regexp are \"*\" and \"^\".  Some
+other characters which you might expect to be invalid, actually
+are not, e.g., \".+$\" are all perfectly valid.  More precisely,
+if \"git check-ref-format --branch STRING\" exits with a non-zero
+status, then treat STRING as a regexp.
+
+Assuming the chosen branch matches these conditions you would end
+up with with e.g.:
+
+  feature --upstream--> origin/master
+
+instead of
+
+  feature --upstream--> master --upstream--> origin/master
+
+Which you prefer is a matter of personal preference.  If you do
+prefer the former, then you should add branches such as \"master\",
+\"next\", and \"maint\" to the value of this options."
+  :package-version '(magit . "2.4.0")
+  :group 'magit-commands
+  :type '(repeat string))
+
+(defcustom magit-branch-adjust-remote-upstream-alist nil
+  "Alist of upstreams to be used when branching from remote branches.
+
+When creating a local branch from an ephemeral branch located
+on a remote, e.g., a feature or hotfix branch, then that remote
+branch should usually not be used as the upstream branch, since
+the push-remote already allows accessing it and having both the
+upstream and the push-remote reference the same related branch
+would be wasteful.  Instead a branch like \"maint\" or \"master\"
+should be used as the upstream.
+
+This option allows specifying the branch that should be used as
+the upstream when branching certain remote branches.  The value
+is an alist of the form ((UPSTREAM . RULE)...).  The first
+element is used whose UPSTREAM exists and whose RULE matches
+the name of the new branch.  Subsequent elements are ignored.
+
+UPSTREAM is the branch to be used as the upstream for branches
+specified by RULE.  It can be a local or a remote branch.
+
+RULE can either be a regular expression, matching branches whose
+upstream should be the one specified by UPSTREAM.  Or it can be
+a list of the only branches that should *not* use UPSTREAM; all
+other branches will.  Matching is done after stripping the remote
+part of the name of the branch that is being branched from.
+
+If you use a finite set of non-ephemeral branches across all your
+repositories, then you might use something like:
+
+  ((\"origin/master\" . (\"master\" \"next\" \"maint\")))
+
+Or if the names of all your ephemeral branches contain a slash,
+at least in some repositories, then a good value could be:
+
+  ((\"origin/master\" . \"/\"))
+
+Of course you can also fine-tune:
+
+  ((\"origin/maint\" . \"\\\\\\=`hotfix/\")
+   (\"origin/master\" . \"\\\\\\=`feature/\"))
+
+UPSTREAM can be a local branch:
+
+  ((\"master\" . (\"master\" \"next\" \"maint\")))
+
+Because the main branch is no longer almost always named \"master\"
+you should also account for other common names:
+
+  ((\"main\"  . (\"main\" \"master\" \"next\" \"maint\"))
+   (\"master\" . (\"main\" \"master\" \"next\" \"maint\")))
+
+If you use remote branches as UPSTREAM, then you might also want
+to set `magit-branch-prefer-remote-upstream' to a non-nil value.
+However, I recommend that you use local branches as UPSTREAM."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-commands
+  :type '(alist :key-type (string :tag "Use upstream")
+                :value-type (choice :tag "For branches" ;???
+                                    (regexp :tag "Matching")
+                                    (repeat :tag "Except"
+                                            (string :tag "Branch")))))
+
+(defcustom magit-branch-rename-push-target t
+  "Whether the push-remote setup is preserved when renaming a branch.
+
+The command `magit-branch-rename' renames a branch named OLD to
+NEW.  This option controls how much of the push-remote setup is
+preserved when doing so.
+
+When nil, then preserve nothing and unset `branch.OLD.pushRemote'.
+
+When `local-only', then set `branch.NEW.pushRemote' to the same
+  value as `branch.OLD.pushRemote'.
+
+When t, then additionally rename the branch named OLD on the
+  remote specified by `branch.OLD.pushRemote' to NEW, provided
+  OLD exists on that remote and unless NEW already exists on the
+  remote.
+
+When `forge-only' and the `forge' package is available, then
+  behave like `t', iff the remote points to a repository on a
+  forge (currently Github or Gitlab), otherwise like `local-only'."
+  :package-version '(magit . "2.90.0")
+  :group 'magit-commands
+  :type '(choice
+          (const :tag "Don't preserve push-remote setup" nil)
+          (const :tag "Preserve push-remote setup" local-only)
+          (const :tag "... and rename corresponding branch on remote" t)
+          (const :tag "... but only if remote is on a forge" forge-only)))
+
+(defcustom magit-branch-direct-configure t
+  "Whether the command `magit-branch' shows Git variables.
+When set to nil, no variables are displayed by this transient
+command, instead the sub-transient `magit-branch-configure'
+has to be used to view and change branch related variables."
+  :package-version '(magit . "2.7.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defcustom magit-published-branches '("origin/master")
+  "List of branches that are considered to be published."
+  :package-version '(magit . "2.13.0")
+  :group 'magit-commands
+  :type '(repeat string))
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-branch "magit" nil t)
+(transient-define-prefix magit-branch (branch)
+  "Add, configure or remove a branch."
+  :man-page "git-branch"
+  [:if (##and magit-branch-direct-configure (transient-scope))
+   :description (##concat
+                 (propertize "Configure " 'face 'transient-heading)
+                 (propertize (transient-scope) 'face 'magit-branch-local))
+   ("d" magit-branch.<branch>.description)
+   ("u" magit-branch.<branch>.merge/remote)
+   ("r" magit-branch.<branch>.rebase)
+   ("p" magit-branch.<branch>.pushRemote)]
+  [:if-non-nil magit-branch-direct-configure
+   :description "Configure repository defaults"
+   ("R" magit-pull.rebase)
+   ("P" magit-remote.pushDefault)
+   ("B" "Update default branch" magit-update-default-branch
+    :inapt-if-not magit-get-some-remote)]
+  ["Arguments"
+   (6 "-m" "Automatically merge conflicting local modifications" "--merge")
+   (7 "-r" "Recurse submodules when checking out an existing branch"
+      "--recurse-submodules")]
+  [["Checkout"
+    ("b" "branch/revision"   magit-checkout)
+    ("l" "local branch"      magit-branch-checkout)
+    (6 "o" "new orphan"      magit-branch-orphan)
+    (0 "r" "remote ref"      magit-checkout-remote-ref)]
+   [""
+    ("c" "new branch"        magit-branch-and-checkout)
+    ("s" "new spin-off"      magit-branch-spinoff)
+    (5 "w" "new worktree"    magit-worktree-checkout)]
+   ["Create"
+    ("n" "new branch"        magit-branch-create)
+    ("S" "new spin-out"      magit-branch-spinout)
+    (5 "W" "new worktree"    magit-worktree-branch)]
+   ["Do"
+    ("C" "configure..."      magit-branch-configure)
+    ("m" "rename"            magit-branch-rename)
+    ("x" "reset"             magit-branch-reset)
+    ("k" "delete"            magit-branch-delete)]
+   [""
+    (7 "h" "shelve"          magit-branch-shelve)
+    (7 "H" "unshelve"        magit-branch-unshelve)]]
+  (interactive (list (magit-get-current-branch)))
+  (transient-setup 'magit-branch nil nil :scope branch))
+
+(defun magit-branch-arguments ()
+  (transient-args 'magit-branch))
+
+;;;###autoload
+(defun magit-checkout (commit &optional args)
+  "Checkout COMMIT, updating the index and the working tree.
+If COMMIT is a local branch, then that becomes the current
+branch.  If it is something else, then `HEAD' becomes detached.
+Checkout fails if the working tree or the staging area contain
+changes.
+\n(git checkout COMMIT)."
+  (declare (interactive-only magit--checkout))
+  (interactive (list (magit-read-other-branch-or-commit "Checkout")
+                     (magit-branch-arguments)))
+  (when (string-match "\\`heads/\\(.+\\)" commit)
+    (setq commit (match-str 1 commit)))
+  (magit-run-git-async "checkout" args commit))
+
+(defun magit--checkout (rev &optional args)
+  (when (string-match "\\`heads/\\(.+\\)" rev)
+    (setq rev (match-str 1 rev)))
+  (magit-call-git "checkout" args rev))
+
+;;;###autoload
+(defun magit-branch-create (branch start-point)
+  "Create BRANCH at branch or revision START-POINT."
+  (declare (interactive-only magit-call-git))
+  (interactive (magit-branch-read-args "Create branch"))
+  (magit-run-git-async "branch" branch start-point)
+  (set-process-sentinel
+   magit-this-process
+   (lambda (process event)
+     (when (memq (process-status process) '(exit signal))
+       (magit-branch-maybe-adjust-upstream branch start-point)
+       (magit-process-sentinel process event)))))
+
+;;;###autoload
+(defun magit-branch-and-checkout (branch start-point &optional args)
+  "Create and checkout BRANCH at branch or revision START-POINT."
+  (declare (interactive-only magit-call-git))
+  (interactive (append (magit-branch-read-args "Create and checkout branch")
+                       (list (magit-branch-arguments))))
+  (if (string-match-p "^stash@{[0-9]+}$" start-point)
+      (magit-run-git "stash" "branch" branch start-point)
+    (magit-run-git-async "checkout" args "-b" branch start-point)
+    (set-process-sentinel
+     magit-this-process
+     (lambda (process event)
+       (when (memq (process-status process) '(exit signal))
+         (magit-branch-maybe-adjust-upstream branch start-point)
+         (magit-process-sentinel process event))))))
+
+;;;###autoload
+(defun magit-branch-or-checkout (arg &optional start-point)
+  "Hybrid between `magit-checkout' and `magit-branch-and-checkout'.
+
+Ask the user for an existing branch or revision.  If the user
+input actually can be resolved as a branch or revision, then
+check that out, just like `magit-checkout' would.
+
+Otherwise create and checkout a new branch using the input as
+its name.  Before doing so read the starting-point for the new
+branch.  This is similar to what `magit-branch-and-checkout'
+does."
+  (declare (interactive-only magit-call-git))
+  (interactive
+    (let ((arg (magit-read-other-branch-or-commit "Checkout")))
+      (list arg
+            (and (not (magit-commit-p arg))
+                 (magit-read-starting-point "Create and checkout branch" arg)))))
+  (when (string-match "\\`heads/\\(.+\\)" arg)
+    (setq arg (match-str 1 arg)))
+  (if start-point
+      (with-suppressed-warnings ((interactive-only magit-branch-and-checkout))
+        (magit-branch-and-checkout arg start-point))
+    (magit--checkout arg)
+    (magit-refresh)))
+
+;;;###autoload
+(defun magit-branch-checkout (branch &optional start-point)
+  "Checkout an existing or new local branch.
+
+Read a branch name from the user offering all local branches and
+a subset of remote branches as candidates.  Omit remote branches
+for which a local branch by the same name exists from the list
+of candidates.  The user can also enter a completely new branch
+name.
+
+- If the user selects an existing local branch, then check that
+  out.
+
+- If the user selects a remote branch, then create and checkout
+  a new local branch with the same name.  Configure the selected
+  remote branch as push target.
+
+- If the user enters a new branch name, then create and check
+  that out, after also reading the starting-point from the user.
+
+In the latter two cases the upstream is also set.  Whether it is
+set to the chosen START-POINT or something else depends on the
+value of `magit-branch-adjust-remote-upstream-alist', just like
+when using `magit-branch-and-checkout'."
+  (declare (interactive-only magit-call-git))
+  (interactive
+    (let* ((current (magit-get-current-branch))
+           (local   (magit-list-local-branch-names))
+           (remote  (seq-filter (##and (string-match "[^/]+/" %)
+                                       (not (member (substring % (match-end 0))
+                                                    (cons "HEAD" local))))
+                                (magit-list-remote-branch-names)))
+           (choices (nconc (delete current local) remote))
+           (atpoint (magit-branch-at-point))
+           (choice  (magit-completing-read
+                     "Checkout branch" choices
+                     nil nil nil 'magit-revision-history
+                     (or (car (member atpoint choices))
+                         (and atpoint
+                              (car (member (and (string-match "[^/]+/" atpoint)
+                                                (substring atpoint (match-end 0)))
+                                           choices)))))))
+      (cond ((member choice remote)
+             (list (and (string-match "[^/]+/" choice)
+                        (substring choice (match-end 0)))
+                   choice))
+            ((member choice local)
+             (list choice))
+            ((list choice (magit-read-starting-point "Create" choice))))))
+  (cond
+    ((not start-point)
+     (magit--checkout branch (magit-branch-arguments))
+     (magit-refresh))
+    (t
+     (when (and (magit-anything-modified-p t)
+                (not (transient-arg-value "--merge" (magit-branch-arguments))))
+       (user-error "Cannot checkout when there are uncommitted changes"))
+     (magit-run-git-async "checkout" (magit-branch-arguments)
+                          "-b" branch start-point)
+     (set-process-sentinel
+      magit-this-process
+      (lambda (process event)
+        (when (memq (process-status process) '(exit signal))
+          (magit-branch-maybe-adjust-upstream branch start-point)
+          (when (magit-remote-branch-p start-point)
+            (pcase-let ((`(,remote . ,remote-branch)
+                         (magit-split-branch-name start-point)))
+              (when (and (equal branch remote-branch)
+                         (not (equal remote (magit-get "remote.pushDefault"))))
+                (magit-set remote "branch" branch "pushRemote"))))
+          (magit-process-sentinel process event)))))))
+
+(defun magit-branch-maybe-adjust-upstream (branch start-point)
+  (when-let ((upstream
+              (or (and (magit-get-upstream-branch branch)
+                       (magit-get-indirect-upstream-branch start-point))
+                  (and (magit-remote-branch-p start-point)
+                       (let ((name (cdr (magit-split-branch-name start-point))))
+                         (seq-some
+                          (pcase-lambda (`(,upstream . ,rule))
+                            (and (magit-branch-p upstream)
+                                 (if (listp rule)
+                                     (not (member name rule))
+                                   (string-match-p rule name))
+                                 upstream))
+                          magit-branch-adjust-remote-upstream-alist))))))
+    (magit-call-git "branch" (concat "--set-upstream-to=" upstream) branch)))
+
+;;;###autoload
+(defun magit-branch-orphan (branch start-point)
+  "Create and checkout an orphan BRANCH with contents from revision START-POINT."
+  (interactive (magit-branch-read-args "Create and checkout orphan branch"))
+  (magit-run-git "checkout" "--orphan" branch start-point))
+
+;;;###autoload
+(defun magit-checkout-remote-ref (remote ref)
+  "Checkout reference REF from REMOTE.
+
+This command queries the REMOTE for a list of its references.  After
+the user has selected on of them, it fetches just that, and finally
+it checks out \"FETCH_HEAD\", which now refers to the same commit as
+REF does on REMOTE.
+
+This is only useful if you usually only fetch a subset of the refs
+from REMOTE.  Otherwise it is better to use `magit-checkout', as
+that avoids a round-trip."
+  (declare (interactive-only magit-call-git))
+  (interactive
+    (let ((remote (magit-read-remote "Checkout ref from remote" nil t)))
+      (list remote
+            (magit-completing-read
+             "Fetch and checkout ref"
+             (prog2 (message "Fetching list of remote refs...")
+                 (magit-remote-list-refs remote)
+               (message "Fetching list of remote refs...done"))))))
+  (magit-run-git-async "fetch" remote ref)
+  (set-process-sentinel
+   magit-this-process
+   (lambda (process _event)
+     (when (memq (process-status process) '(exit signal))
+       (magit--checkout "FETCH_HEAD")
+       (magit-refresh)))))
+
+(defun magit-branch-read-args (prompt &optional default-start)
+  (cond-let
+    ((not magit-branch-read-upstream-first)
+     (let ((name (magit-branch--read-name (concat prompt " named"))))
+       (list name (magit-read-starting-point prompt name default-start))))
+    [[start (magit-read-starting-point prompt nil default-start)]]
+    ((magit-rev-verify start)
+     (list (magit-branch--read-name
+            (if magit-completing-read--silent-default
+                (format "%s (starting at `%s')" prompt start)
+              "Name for new branch")
+            start)
+           start))
+    [[name start]]
+    ((eq magit-branch-read-upstream-first 'fallback)
+     (list name (magit-read-starting-point prompt name default-start)))
+    ((user-error "Not a valid starting-point: %s" name))))
+
+(defun magit-branch--read-name (prompt &optional start-point)
+  (let ((taken (magit-list-local-branch-names))
+        (choices magit-branch-name-suggestions))
+    (when (and start-point
+               (magit-remote-branch-p start-point)
+               (string-match "/" start-point))
+      (cl-pushnew (substring start-point (match-end 0))
+                  choices :test #'equal))
+    (magit-completing-read
+     prompt (seq-difference choices taken) nil
+     ;; Ivy does not handle the PREDICATE correctly, so give
+     ;; up on any validation for the time being when that is
+     ;; being used.  See #5599, #5581, and the proposed fix
+     ;; https://github.com/abo-abo/swiper/pull/3083.
+     (and (not (bound-and-true-p ivy-mode))
+          (lambda (&optional choice)
+            (cond
+              ((not choice)
+               ;; ( This is currently dead code, see above comment.  Even
+               ;;   with this, Ivy users would always have to confirm and
+               ;;   the below check would remain unreachable. )
+               ;; This function ought to be called with one argument (see
+               ;; `completing-read') but Ivy calls it with zero arguments.
+               ;; Since Ivy doesn't tell us what choice the user made, we
+               ;; also cannot validate it, and assume it is valid.
+               t)
+              ((member choice taken)
+               (run-with-timer
+                0 nil (##minibuffer-message "conflicts with existing branch"))
+               nil)
+              ((not (magit-git-success "check-ref-format" "--branch" choice))
+               (run-with-timer
+                0 nil (##minibuffer-message "not a valid branch name"))
+               nil)
+              (t)))))))
+
+;;;###autoload
+(defun magit-branch-spinout (branch &optional from)
+  "Create new branch from the unpushed commits.
+Like `magit-branch-spinoff' but remain on the current branch.
+If there are any uncommitted changes, then behave exactly like
+`magit-branch-spinoff'."
+  (interactive (list (magit-read-string-ns "Spin out branch")
+                     (car (last (magit-region-values 'commit)))))
+  (magit--branch-spinoff branch from nil))
+
+;;;###autoload
+(defun magit-branch-spinoff (branch &optional from)
+  "Create new branch from the unpushed commits.
+
+Create and checkout a new branch starting at and tracking the
+current branch.  That branch in turn is reset to the last commit
+it shares with its upstream.  If the current branch has no
+upstream or no unpushed commits, then the new branch is created
+anyway and the previously current branch is not touched.
+
+This is useful to create a feature branch after work has already
+began on the old branch (likely but not necessarily \"master\").
+
+If the current branch is a member of the value of option
+`magit-branch-prefer-remote-upstream' (which see), then the
+current branch will be used as the starting point as usual, but
+the upstream of the starting-point may be used as the upstream
+of the new branch, instead of the starting-point itself.
+
+If optional FROM is non-nil, then the source branch is reset
+to `FROM~', instead of to the last commit it shares with its
+upstream.  Interactively, FROM is only ever non-nil, if the
+region selects some commits, and among those commits, FROM is
+the commit that is the fewest commits ahead of the source
+branch.
+
+The commit at the other end of the selection actually does not
+matter, all commits between FROM and `HEAD' are moved to the new
+branch.  If FROM is not reachable from `HEAD' or is reachable
+from the source branch's upstream, then an error is raised."
+  (interactive (list (magit-read-string-ns "Spin off branch")
+                     (car (last (magit-region-values 'commit)))))
+  (magit--branch-spinoff branch from t))
+
+(defun magit--branch-spinoff (branch from checkout)
+  (when (magit-branch-p branch)
+    (user-error "Cannot spin off %s.  It already exists" branch))
+  (when (and (not checkout)
+             (magit-anything-modified-p))
+    (message "Staying on HEAD due to uncommitted changes")
+    (setq checkout t))
+  (cond-let
+    ([current (magit-get-current-branch)]
+     (let ((tracked (magit-get-upstream-branch current))
+           base)
+       (when from
+         (unless (magit-rev-ancestor-p from current)
+           (user-error "Cannot spin off %s.  %s is not reachable from %s"
+                       branch from current))
+         (when (and tracked
+                    (magit-rev-ancestor-p from tracked))
+           (user-error "Cannot spin off %s.  %s is ancestor of upstream %s"
+                       branch from tracked)))
+       (let ((magit-process-raise-error t))
+         (if checkout
+             (magit-call-git "checkout" "-b" branch current)
+           (magit-call-git "branch" branch current)))
+       (when$ (magit-get-indirect-upstream-branch current)
+         (magit-call-git "branch" "--set-upstream-to" $ branch))
+       (when (and tracked
+                  (setq base
+                        (if from
+                            (concat from "^")
+                          (magit-merge-base current tracked)))
+                  (not (magit-rev-eq base current)))
+         (if checkout
+             (magit-call-git "update-ref" "-m"
+                             (format "reset: moving to %s" base)
+                             (concat "refs/heads/" current) base)
+           (magit-call-git "reset" "--hard" base)))))
+    (checkout
+     (magit-call-git "checkout" "-b" branch))
+    ((magit-call-git "branch" branch)))
+  (magit-refresh))
+
+;;;###autoload
+(defun magit-branch-reset (branch to &optional set-upstream)
+  "Reset a branch to the tip of another branch or any other commit.
+
+When the branch being reset is the current branch, then do a
+hard reset.  If there are any uncommitted changes, then the user
+has to confirm the reset because those changes would be lost.
+
+This is useful when you have started work on a feature branch but
+realize it's all crap and want to start over.
+
+When resetting to another branch and a prefix argument is used,
+then also set the target branch as the upstream of the branch
+that is being reset."
+  (interactive
+    (let ((branch (magit-read-local-branch "Reset branch"
+                                           (magit-local-branch-at-point))))
+      (list branch
+            (magit-read-branch-or-commit (format "Reset %s to" branch)
+                                         (magit-get-upstream-branch branch)
+                                         branch)
+            current-prefix-arg)))
+  (let ((magit-inhibit-refresh t))
+    (if (equal branch (magit-get-current-branch))
+        (if (and (magit-anything-modified-p)
+                 (not (yes-or-no-p
+                       "Uncommitted changes will be lost.  Proceed? ")))
+            (user-error "Abort")
+          (magit-reset-hard to))
+      (magit-call-git "update-ref"
+                      "-m" (format "reset: moving to %s" to)
+                      (magit-ref-fullname branch)
+                      to))
+    (when (and set-upstream (magit-branch-p to))
+      (magit-set-upstream-branch branch to)
+      (magit-branch-maybe-adjust-upstream branch to)))
+  (magit-refresh))
+
+(defvar magit-branch-delete-never-verify nil
+  "Whether `magit-branch-delete' always pushes with \"--no-verify\".")
+
+;;;###autoload
+(defun magit-branch-delete (branches &optional force)
+  "Delete one or multiple branches.
+
+If the region marks multiple branches, then offer to delete
+those, otherwise prompt for a single branch to be deleted,
+defaulting to the branch at point.
+
+Require confirmation when deleting branches is dangerous in some
+way.  Option `magit-no-confirm' can be customized to not require
+confirmation in certain cases.  See its docstring to learn why
+confirmation is required by default in certain cases or if a
+prompt is confusing."
+  ;; One would expect this to be a command as simple as, for example,
+  ;; `magit-branch-rename'; but it turns out everyone wants to squeeze
+  ;; a bit of extra functionality into this one, including myself.
+  (interactive
+    (let ((branches (magit-region-values 'branch t))
+          (force current-prefix-arg))
+      (if (length> branches 1)
+          (magit-confirm t nil "Delete %d branches" nil branches)
+        (setq branches
+              (list (magit-read-branch-prefer-other
+                     (if force "Force delete branch" "Delete branch")))))
+      (cond-let
+        (force)
+        [[unmerged (seq-remove #'magit-branch-merged-p branches)]]
+        ((magit-confirm 'delete-unmerged-branch
+           "Delete unmerged branch %s"
+           "Delete %d unmerged branches"
+           'noabort unmerged)
+         (setq force branches))
+        ((setq branches (cl-set-difference branches unmerged :test #'equal)))
+        ((user-error "Abort")))
+      (list branches force)))
+  (let ((refs (mapcar #'magit-ref-fullname branches)))
+    ;; If a member of refs is nil, that means that
+    ;; the respective branch name is ambiguous.
+    (when-let ((ambiguous (seq-filter #'null refs)))
+      (user-error
+       "%s ambiguous; please cleanup using git directly"
+       (let ((len (length ambiguous)))
+         (cond
+           ((= len 1)
+            (format "%s is" (seq-find #'magit-ref-ambiguous-p branches)))
+           ((= len (length refs))
+            (format "These %s names are" len))
+           ((format "%s of these names are" len))))))
+    (cond
+      ((string-match "^refs/remotes/\\([^/]+\\)" (car refs))
+       (let* ((remote (match-str 1 (car refs)))
+              (offset (1+ (length remote))))
+         (cond
+           ((magit-confirm 'delete-branch-on-remote
+              (list "Deleting local %s.  Also delete on %s"
+                    (magit-ref-fullname (car branches))
+                    remote)
+              (list "Deleting %d local refs.  Also delete on %s"
+                    (length refs)
+                    remote)
+              'noabort refs)
+            ;; The ref may actually point at another rev on the remote,
+            ;; but this is better than nothing.
+            (dolist (ref refs)
+              (message "Delete %s (was %s)" ref
+                       (magit-rev-parse "--short" ref)))
+            ;; Assume the branches actually still exist on the remote.
+            (magit-run-git-async
+             "push" "--delete"
+             (and (or force magit-branch-delete-never-verify) "--no-verify")
+             remote
+             (mapcar (##concat "refs/heads/" (substring % offset)) branches))
+            ;; If that is not the case, then this deletes the tracking branches.
+            (set-process-sentinel
+             magit-this-process
+             (apply-partially #'magit-delete-remote-branch-sentinel remote refs)))
+           (t
+            (dolist (ref refs)
+              (message "Delete %s (was %s)" ref
+                       (magit-rev-parse "--short" ref))
+              (magit-call-git "update-ref" "-d" ref))
+            (magit-refresh)))))
+      ((length> branches 1)
+       (setq branches (delete (magit-get-current-branch) branches))
+       (mapc #'magit-branch-maybe-delete-pr-remote branches)
+       (mapc #'magit-branch-unset-pushRemote branches)
+       (magit-run-git "branch" (if force "-D" "-d") branches))
+      (t ; And now for something completely different.
+       (let* ((branch (car branches))
+              (prompt (format "Branch %s is checked out.  " branch))
+              (target (magit-get-indirect-upstream-branch branch t)))
+         (when (equal branch (magit-get-current-branch))
+           (when (or (equal branch target)
+                     (not target))
+             (setq target (magit-main-branch)))
+           (pcase (if (or (equal branch target)
+                          (not target))
+                      (magit-read-char-case prompt nil
+                        (?d "[d]etach HEAD & delete" 'detach)
+                        (?a "[a]bort"                'abort))
+                    (magit-read-char-case prompt nil
+                      (?d "[d]etach HEAD & delete" 'detach)
+                      (?c (format "[c]heckout %s & delete" target) 'target)
+                      (?a "[a]bort" 'abort)))
+             (`detach (unless (or (equal force '(4))
+                                  (member branch force)
+                                  (magit-branch-merged-p branch t))
+                        (magit-confirm 'delete-unmerged-branch
+                          "Delete unmerged branch %s" ""
+                          nil (list branch)))
+                      (magit-call-git "checkout" "--detach"))
+             (`target (unless (or (equal force '(4))
+                                  (member branch force)
+                                  (magit-branch-merged-p branch target))
+                        (magit-confirm 'delete-unmerged-branch
+                          "Delete unmerged branch %s" ""
+                          nil (list branch)))
+                      (magit-call-git "checkout" target))
+             (`abort  (user-error "Abort")))
+           (setq force t))
+         (magit-branch-maybe-delete-pr-remote branch)
+         (magit-branch-unset-pushRemote branch)
+         (magit-run-git "branch" (if force "-D" "-d") branch))))))
+
+(put 'magit-branch-delete 'interactive-only t)
+
+(defun magit-branch-maybe-delete-pr-remote (branch)
+  (when-let ((remote (magit-get "branch" branch "pullRequestRemote")))
+    (let* ((variable (format "remote.%s.fetch" remote))
+           (refspecs (magit-get-all variable)))
+      (unless (member (format "+refs/heads/*:refs/remotes/%s/*" remote)
+                      refspecs)
+        (let ((refspec
+               (if (equal (magit-get "branch" branch "pushRemote") remote)
+                   (format "+refs/heads/%s:refs/remotes/%s/%s"
+                           branch remote branch)
+                 (let ((merge (magit-get "branch" branch "merge")))
+                   (and merge
+                        (string-prefix-p "refs/heads/" merge)
+                        (setq merge (substring merge 11))
+                        (format "+refs/heads/%s:refs/remotes/%s/%s"
+                                merge remote merge))))))
+          (when (member refspec refspecs)
+            (if (and (length= refspecs 1)
+                     (magit-confirm 'delete-pr-remote
+                       (list "Also delete remote %s (%s)" remote
+                             "no pull-request branch remains")
+                       nil t))
+                (magit-call-git "remote" "rm" remote)
+              (magit-call-git "config" "--unset-all" variable
+                              (format "^%s$" (regexp-quote refspec))))))))))
+
+(defun magit-branch-unset-pushRemote (branch)
+  (magit-set nil "branch" branch "pushRemote"))
+
+(defun magit-delete-remote-branch-sentinel (remote refs process event)
+  (cond-let*
+    ((not (memq (process-status process) '(exit signal))))
+    ([_(= (process-exit-status process) 1)]
+     [on-remote (mapcar (##concat "refs/remotes/" remote "/" %)
+                        (magit-remote-list-branches remote))]
+     [rest (seq-filter (##and (not (member % on-remote))
+                              (magit-ref-exists-p %))
+                       refs)]
+     (process-put process 'inhibit-refresh t)
+     (magit-process-sentinel process event)
+     (setq magit-this-error nil)
+     (message "Some remote branches no longer exist.  %s"
+              "Deleting just the local tracking refs instead...")
+     (dolist (ref rest)
+       (magit-call-git "update-ref" "-d" ref))
+     (magit-refresh)
+     (message "Deleting local remote-tracking refs...done"))
+    ((magit-process-sentinel process event))))
+
+;;;###autoload
+(defun magit-branch-rename (old new &optional force)
+  "Rename the branch named OLD to NEW.
+
+With a prefix argument FORCE, rename even if a branch named NEW
+already exists.
+
+If `branch.OLD.pushRemote' is set, then unset it.  Depending on
+the value of `magit-branch-rename-push-target' (which see) maybe
+set `branch.NEW.pushRemote' and maybe rename the push-target on
+the remote."
+  (interactive
+    (let ((branch (magit-read-local-branch "Rename branch")))
+      (list branch
+            (magit-read-string-ns (format "Rename branch '%s' to" branch)
+                                  nil 'magit-revision-history)
+            current-prefix-arg)))
+  (when (string-match "\\`heads/\\(.+\\)" old)
+    (setq old (match-str 1 old)))
+  (cond ((equal old new)
+         (user-error "Old and new branch names are the same"))
+        ((and (magit-local-branch-p new) (not force))
+         (user-error "Branch `%s' already exists" new)))
+  (let* ((push-branch  (magit-get-push-branch old))
+         (push-remote  (magit-get "branch" old "pushRemote"))
+         (push-default (magit-get "remote.pushDefault"))
+         (remote       (or push-remote push-default)))
+    (magit-call-git "branch" (if force "-M" "-m") old new)
+    (when push-remote
+      (magit-set nil "branch" old "pushRemote")
+      (magit-set push-remote "branch" new "pushRemote"))
+    (when (and (magit-rev-verify (concat remote "/" old))
+               (not (magit-rev-verify (concat remote "/" new)))
+               (or (eq magit-branch-rename-push-target t)
+                   (and-let ((_(eq magit-branch-rename-push-target 'forge-only))
+                             (_(require (quote forge) nil t))
+                             (_(fboundp 'forge--split-forge-url))
+                             (url (magit-git-string "remote" "get-url" remote)))
+                     (forge--split-forge-url url)))
+               (magit-y-or-n-p (format "Also rename %S to %S on \"%s\"?"
+                                       old new remote)))
+      (magit-call-git "push" "-v" remote
+                      (format "%s:refs/heads/%s" push-branch new)
+                      (format ":refs/heads/%s" old))))
+  (magit-refresh))
+
+;;;###autoload
+(defun magit-branch-shelve (branch)
+  "Shelve a BRANCH.
+Rename \"refs/heads/BRANCH\" to \"refs/shelved/YYYY-MM-DD-BRANCH\",
+and also rename the respective reflog file."
+  (interactive (list (magit-read-other-local-branch "Shelve branch")))
+  (let ((old (concat "refs/heads/" branch))
+        (new (format "refs/shelved/%s-%s"
+                     (magit-rev-format "%cs" branch)
+                     branch)))
+    (magit-git "update-ref" new old "")
+    (magit--rename-reflog-file old new)
+    (magit-branch-unset-pushRemote branch)
+    (magit-run-git "branch" "-D" branch)))
+
+;;;###autoload
+(defun magit-branch-unshelve (branch)
+  "Unshelve a BRANCH.
+Rename \"refs/shelved/BRANCH\" to \"refs/heads/BRANCH\".  If BRANCH
+is prefixed with \"YYYY-MM-DD\", then drop that part of the name.
+Also rename the respective reflog file."
+  (interactive (list (magit-read-shelved-branch "Unshelve branch")))
+  (let ((old (concat "refs/shelved/" branch))
+        (new (concat "refs/heads/"
+                     (if (string-match-p
+                          "\\`[0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\}-" branch)
+                         (substring branch 11)
+                       branch))))
+    (magit-git "update-ref" new old "")
+    (magit--rename-reflog-file old new)
+    (magit-run-git "update-ref" "-d" old)))
+
+(defun magit--rename-reflog-file (old new)
+  (let* ((dir (magit-gitdir))
+         (old (expand-file-name (concat "logs/" old) dir))
+         (new (expand-file-name (concat "logs/" new) dir)))
+    (when (file-exists-p old)
+      (make-directory (file-name-directory new) t)
+      (rename-file old new t))))
+
+;;; Configure
+
+;;;###autoload(autoload 'magit-branch-configure "magit-branch" nil t)
+(transient-define-prefix magit-branch-configure (branch)
+  "Configure a branch."
+  :man-page "git-branch"
+  [:description (##concat
+                 (propertize "Configure " 'face 'transient-heading)
+                 (propertize (transient-scope) 'face 'magit-branch-local))
+   ("d" magit-branch.<branch>.description)
+   ("u" magit-branch.<branch>.merge/remote)
+   ("r" magit-branch.<branch>.rebase)
+   ("p" magit-branch.<branch>.pushRemote)]
+  ["Configure repository defaults"
+   ("R" magit-pull.rebase)
+   ("P" magit-remote.pushDefault)
+   ("B" "Update default branch" magit-update-default-branch
+    :inapt-if-not magit-get-some-remote)]
+  ["Configure branch creation"
+   ("a m" magit-branch.autoSetupMerge)
+   ("a r" magit-branch.autoSetupRebase)]
+  (interactive
+    (list (or (and (not current-prefix-arg)
+                   (not (and magit-branch-direct-configure
+                             (eq transient-current-command 'magit-branch)))
+                   (magit-get-current-branch))
+              (magit--read-branch-scope))))
+  (transient-setup 'magit-branch-configure nil nil :scope branch))
+
+(defun magit--read-branch-scope (&optional obj)
+  (magit-read-local-branch
+   (if obj
+       (format "Set %s for branch"
+               (format (oref obj variable) "<name>"))
+     "Configure branch")))
+
+(transient-define-suffix magit-branch.<branch>.description (branch)
+  "Edit the description of BRANCH."
+  :class 'magit--git-variable
+  :transient nil
+  :variable "branch.%s.description"
+  (interactive (list (oref transient-current-prefix scope)))
+  (magit-run-git-with-editor "branch" "--edit-description" branch))
+
+(defclass magit--git-branch:upstream (magit--git-variable)
+  ((format            :initform " %k %m %M\n   %r %R")
+   (accessible-format :initform "%k %m is %M and %r is %R")))
+
+(transient-define-infix magit-branch.<branch>.merge/remote ()
+  :class 'magit--git-branch:upstream)
+
+(cl-defmethod transient-init-value ((obj magit--git-branch:upstream))
+  (when-let* ((branch (transient-scope))
+              (remote (magit-get "branch" branch "remote"))
+              (merge  (magit-get "branch" branch "merge")))
+    (oset obj value (list remote merge))))
+
+(cl-defmethod transient-infix-read ((obj magit--git-branch:upstream))
+  (if (oref obj value)
+      (oset obj value nil)
+    (magit-read-upstream-branch (transient-scope) "Upstream")))
+
+(cl-defmethod transient-infix-set ((obj magit--git-branch:upstream) refname)
+  (magit-set-upstream-branch (transient-scope) refname)
+  (oset obj value
+        (and-let* ((branch (transient-scope))
+                   (r (magit-get "branch" branch "remote"))
+                   (m (magit-get "branch" branch "merge")))
+          (list r m)))
+  (magit-refresh))
+
+(cl-defmethod transient-format ((obj magit--git-branch:upstream))
+  (let ((branch (transient-scope)))
+    (format-spec
+     (transient--get-format obj)
+     `((?k . ,(transient-format-key obj))
+       (?r . ,(format "branch.%s.remote" branch))
+       (?m . ,(format "branch.%s.merge" branch))
+       (?R . ,(transient-format-value obj #'car))
+       (?M . ,(transient-format-value obj #'cadr))))))
+
+(cl-defmethod transient-format-value ((obj magit--git-branch:upstream) key)
+  (if-let ((value (funcall key (oref obj value))))
+      (propertize value 'face 'transient-argument)
+    (propertize "unset" 'face 'transient-inactive-argument)))
+
+(transient-define-infix magit-branch.<branch>.rebase ()
+  :class 'magit--git-variable:choices
+  :scope #'magit--read-branch-scope
+  :variable "branch.%s.rebase"
+  :fallback "pull.rebase"
+  :choices '("true" "merges" "interactive" "false")
+  :default "false")
+
+(transient-define-infix magit-branch.<branch>.pushRemote ()
+  :class 'magit--git-variable:choices
+  :scope #'magit--read-branch-scope
+  :variable "branch.%s.pushRemote"
+  :fallback "remote.pushDefault"
+  :choices #'magit-list-remotes)
+
+(transient-define-infix magit-pull.rebase ()
+  :class 'magit--git-variable:choices
+  :variable "pull.rebase"
+  :choices '("true" "merges" "interactive" "false")
+  :default "false")
+
+(transient-define-infix magit-remote.pushDefault ()
+  :class 'magit--git-variable:choices
+  :variable "remote.pushDefault"
+  :choices #'magit-list-remotes)
+
+(transient-define-infix magit-branch.autoSetupMerge ()
+  :class 'magit--git-variable:choices
+  :variable "branch.autoSetupMerge"
+  :choices '("always" "true" "false")
+  :default "true")
+
+(transient-define-infix magit-branch.autoSetupRebase ()
+  :class 'magit--git-variable:choices
+  :variable "branch.autoSetupRebase"
+  :choices '("always" "local" "remote" "never")
+  :default "never")
+
+;;; _
+(provide 'magit-branch)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-branch.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-branch.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-branch.elc
new file mode 100644
index 0000000..a4c8d68
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-branch.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bundle.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bundle.el
new file mode 100644
index 0000000..23a8e93
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bundle.el
@@ -0,0 +1,155 @@
+;;; magit-bundle.el --- Bundle support for Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for "git bundle".
+;; The entry point is the `magit-bundle' menu command.
+
+;; See (man "git-bundle").
+
+;;; Code:
+
+(require 'magit)
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-bundle "magit-bundle" nil t)
+(transient-define-prefix magit-bundle ()
+  "Create or verify Git bundles."
+  :man-page "git-bundle"
+  ["Actions"
+   ("c" "create"     magit-bundle-create)
+   ("v" "verify"     magit-bundle-verify)
+   ("l" "list-heads" magit-bundle-list-heads)])
+
+;;;###autoload(autoload 'magit-bundle-import "magit-bundle" nil t)
+(transient-define-prefix magit-bundle-create (&optional file refs args)
+  "Create a bundle."
+  :man-page "git-bundle"
+  ["Arguments"
+   ("-a" "Include all refs" "--all")
+   ("-b" "Include branches" "--branches=" :allow-empty t)
+   ("-t" "Include tags"     "--tags="     :allow-empty t)
+   ("-r" "Include remotes"  "--remotes="  :allow-empty t)
+   ("-g" "Include refs"     "--glob=")
+   ("-e" "Exclude refs"     "--exclude=")
+   (magit-log:-n)
+   (magit-log:--since)
+   (magit-log:--until)]
+  ["Actions"
+   ("c" "create regular bundle" magit-bundle-create)
+   ("t" "create tracked bundle" magit-bundle-create-tracked)
+   ("u" "update tracked bundle" magit-bundle-update-tracked)]
+  (interactive
+    (and (eq transient-current-command 'magit-bundle-create)
+         (list (read-file-name "Create bundle: " nil nil nil
+                               (concat (file-name-nondirectory
+                                        (directory-file-name (magit-toplevel)))
+                                       ".bundle"))
+               (magit-completing-read-multiple "Refnames (zero or more): "
+                                               (magit-list-refnames))
+               (transient-args 'magit-bundle-create))))
+  (if file
+      (magit-git-bundle "create" file refs args)
+    (transient-setup 'magit-bundle-create)))
+
+;;;###autoload
+(defun magit-bundle-create-tracked (file tag branch refs args)
+  "Create and track a new bundle."
+  (interactive
+    (let ((tag    (magit-read-tag "Track bundle using tag"))
+          (branch (magit-read-branch "Bundle branch"))
+          (refs   (magit-completing-read-multiple
+                   "Additional refnames (zero or more): "
+                   (magit-list-refnames))))
+      (list (read-file-name "File: " nil nil nil (concat tag ".bundle"))
+            tag branch
+            (if (equal branch (magit-get-current-branch))
+                (cons "HEAD" refs)
+              refs)
+            (transient-args 'magit-bundle-create))))
+  (magit-git-bundle "create" file (cons branch refs) args)
+  (magit-git "tag" "--force" tag branch
+             "-m" (concat ";; git-bundle tracking\n"
+                          (pp-to-string `((file   . ,file)
+                                          (branch . ,branch)
+                                          (refs   . ,refs)
+                                          (args   . ,args))))))
+
+;;;###autoload
+(defun magit-bundle-update-tracked (tag)
+  "Update a bundle that is being tracked using TAG."
+  (interactive (list (magit-read-tag "Update bundle tracked by tag")))
+  (let (msg)
+    (let-alist (magit--with-temp-process-buffer
+                 (save-excursion
+                   (magit-git-insert "for-each-ref" "--format=%(contents)"
+                                     (concat "refs/tags/" tag)))
+                 (setq msg (buffer-string))
+                 (ignore-errors (read (current-buffer))))
+      (unless (and .file .branch)
+        (error "Tag %s does not appear to track a bundle" tag))
+      (magit-git-bundle "create" .file
+                        (cons (concat tag ".." .branch) .refs)
+                        .args)
+      (magit-git "tag" "--force" tag .branch "-m" msg))))
+
+;;;###autoload
+(defun magit-bundle-verify (file)
+  "Check whether FILE is valid and applies to the current repository."
+  (interactive (list (magit-bundle--read-file-name "Verify bundle: ")))
+  (magit-process-buffer)
+  (magit-git-bundle "verify" file))
+
+;;;###autoload
+(defun magit-bundle-list-heads (file)
+  "List the refs in FILE."
+  (interactive (list (magit-bundle--read-file-name "List heads of bundle: ")))
+  (magit-process-buffer)
+  (magit-git-bundle "list-heads" file))
+
+(defun magit-bundle--read-file-name (prompt)
+  (read-file-name prompt nil nil t (magit-file-at-point) #'file-regular-p))
+
+(defun magit-git-bundle (command file &optional refs args)
+  (magit-git "bundle" command (magit-convert-filename-for-git file) refs args))
+
+;;; _
+(provide 'magit-bundle)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-bundle.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bundle.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bundle.elc
new file mode 100644
index 0000000..b36a77a
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-bundle.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-clone.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-clone.el
new file mode 100644
index 0000000..3b68f23
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-clone.el
@@ -0,0 +1,367 @@
+;;; magit-clone.el --- Clone a repository  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements clone commands.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Options
+
+(defcustom magit-clone-set-remote-head nil
+  "Whether cloning creates the symbolic-ref `<remote>/HEAD'."
+  :package-version '(magit . "2.4.2")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defcustom magit-clone-set-remote.pushDefault 'ask
+  "Whether to set the value of `remote.pushDefault' after cloning.
+
+If t, then set without asking.  If nil, then don't set.  If
+`ask', then ask."
+  :package-version '(magit . "2.4.0")
+  :group 'magit-commands
+  :type '(choice (const :tag "Set" t)
+                 (const :tag "Ask" ask)
+                 (const :tag "Don't set" nil)))
+
+(defcustom magit-clone-default-directory nil
+  "Default directory to use when `magit-clone' reads destination.
+If nil (the default), then use the value of `default-directory'.
+If a directory, then use that.  If a function, then call that
+with the remote url as only argument and use the returned value."
+  :package-version '(magit . "2.90.0")
+  :group 'magit-commands
+  :type '(choice (const     :tag "Value of default-directory")
+                 (directory :tag "Constant directory")
+                 (function  :tag "Function's value")))
+
+(defcustom magit-clone-always-transient nil
+  "Whether `magit-clone' always acts as a transient prefix command.
+If nil, then a prefix argument has to be used to show the transient
+popup instead of invoking the default suffix `magit-clone-regular'
+directly."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defcustom magit-clone-name-alist
+  '(("\\`\\(?:github:\\|gh:\\)?\\([^:]+\\)\\'" "github.com" "github.user")
+    ("\\`\\(?:gitlab:\\|gl:\\)\\([^:]+\\)\\'"  "gitlab.com" "gitlab.user")
+    ("\\`\\(?:sourcehut:\\|sh:\\)\\([^:]+\\)\\'" "git.sr.ht" "sourcehut.user"))
+  "Alist mapping repository names to repository urls.
+
+Each element has the form (REGEXP HOSTNAME USER).  When the user
+enters a name when a cloning command asks for a name or url, then
+that is looked up in this list.  The first element whose REGEXP
+matches is used.
+
+The format specified by option `magit-clone-url-format' is used
+to turn the name into an url, using HOSTNAME and the repository
+name.  If the provided name contains a slash, then that is used.
+Otherwise if the name omits the owner of the repository, then the
+default user specified in the matched entry is used.
+
+If USER contains a dot, then it is treated as a Git variable and
+the value of that is used as the username.  Otherwise it is used
+as the username itself."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-commands
+  :type '(repeat (list regexp
+                       (string :tag "Hostname")
+                       (string :tag "User name or git variable"))))
+
+(defcustom magit-clone-url-format
+  '(("git.sr.ht" . "git@%h:%n")
+    (t . "git@%h:%n.git"))
+  "Format(s) used when turning repository names into urls.
+
+In a format string, %h is the hostname and %n is the repository
+name, including the name of the owner.
+
+The value can be a string (representing a single static format)
+or an alist with elements (HOSTNAME . FORMAT) mapping hostnames
+to formats.  When an alist is used, the t key represents the
+default.  Also see `magit-clone-name-alist'."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-commands
+  :type '(choice (string :tag "Format")
+                 (alist :key-type (choice (string :tag "Host")
+                                          (const :tag "Default" t))
+                        :value-type (string :tag "Format"))))
+
+(defcustom magit-post-clone-hook nil
+  "Hook run after the repository has been successfully cloned.
+
+When the hook is called, `default-directory' is let-bound to the
+directory where the repository has been cloned."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-commands
+  :type 'hook)
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-clone "magit-clone" nil t)
+(transient-define-prefix magit-clone (&optional transient)
+  "Clone a repository."
+  :man-page "git-clone"
+  ["Fetch arguments"
+   ("-B" "Clone a single branch"  "--single-branch")
+   ("-n" "Do not clone tags"      "--no-tags")
+   ("-S" "Clones submodules"      "--recurse-submodules" :level 6)
+   ("-l" "Do not optimize"        "--no-local" :level 7)]
+  ["Setup arguments"
+   ("-o" "Set name of remote"     ("-o" "--origin="))
+   ("-b" "Set HEAD branch"        ("-b" "--branch="))
+   (magit-clone:--filter :level 7)
+   ("-g" "Separate git directory" "--separate-git-dir="
+    transient-read-directory :level 7)
+   ("-t" "Use template directory" "--template="
+    transient-read-existing-directory :level 6)]
+  ["Local sharing arguments"
+   ("-s" "Share objects"          ("-s" "--shared" :level 7))
+   ("-h" "Do not use hardlinks"   "--no-hardlinks")]
+  ["Clone"
+   ("C" "regular"            magit-clone-regular)
+   ("s" "shallow"            magit-clone-shallow)
+   ("d" "shallow since date" magit-clone-shallow-since :level 7)
+   ("e" "shallow excluding"  magit-clone-shallow-exclude :level 7)
+   (">" "sparse checkout"    magit-clone-sparse :level 6)
+   ("b" "bare"               magit-clone-bare)
+   ("m" "mirror"             magit-clone-mirror)]
+  (interactive (list (or magit-clone-always-transient current-prefix-arg)))
+  (if transient
+      (transient-setup 'magit-clone)
+    (call-interactively #'magit-clone-regular)))
+
+(transient-define-argument magit-clone:--filter ()
+  :description "Filter some objects"
+  :class 'transient-option
+  :key "-f"
+  :argument "--filter="
+  :reader #'magit-clone-read-filter)
+
+(defun magit-clone-read-filter (prompt initial-input history)
+  (magit-completing-read prompt
+                         (list "blob:none" "tree:0")
+                         nil nil initial-input history))
+
+;;;###autoload
+(defun magit-clone-regular (repository directory args)
+  "Create a clone of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository."
+  (interactive (magit-clone-read-args))
+  (magit-clone-internal repository directory args))
+
+;;;###autoload
+(defun magit-clone-shallow (repository directory args depth)
+  "Create a shallow clone of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository.
+With a prefix argument read the DEPTH of the clone;
+otherwise use 1."
+  (interactive (append (magit-clone-read-args)
+                       (list (if current-prefix-arg
+                                 (read-number "Depth: " 1)
+                               1))))
+  (magit-clone-internal repository directory
+                        (cons (format "--depth=%s" depth) args)))
+
+;;;###autoload
+(defun magit-clone-shallow-since (repository directory args date)
+  "Create a shallow clone of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository.
+Exclude commits before DATE, which is read from the
+user."
+  (interactive (append (magit-clone-read-args)
+                       (list (transient-read-date "Exclude commits before: "
+                                                  nil nil))))
+  (magit-clone-internal repository directory
+                        (cons (format "--shallow-since=%s" date) args)))
+
+;;;###autoload
+(defun magit-clone-shallow-exclude (repository directory args exclude)
+  "Create a shallow clone of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository.
+Exclude commits reachable from EXCLUDE, which is a
+branch or tag read from the user."
+  (interactive (append (magit-clone-read-args)
+                       (list (read-string "Exclude commits reachable from: "))))
+  (magit-clone-internal repository directory
+                        (cons (format "--shallow-exclude=%s" exclude) args)))
+
+;;;###autoload
+(defun magit-clone-bare (repository directory args)
+  "Create a bare clone of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository."
+  (interactive (magit-clone-read-args))
+  (magit-clone-internal repository directory (cons "--bare" args)))
+
+;;;###autoload
+(defun magit-clone-mirror (repository directory args)
+  "Create a mirror of REPOSITORY in DIRECTORY.
+Then show the status buffer for the new repository."
+  (interactive (magit-clone-read-args))
+  (magit-clone-internal repository directory (cons "--mirror" args)))
+
+;;;###autoload
+(defun magit-clone-sparse (repository directory args)
+  "Clone REPOSITORY into DIRECTORY and create a sparse checkout."
+  (interactive (magit-clone-read-args))
+  (magit-clone-internal repository directory (cons "--no-checkout" args)
+                        'sparse))
+
+(defun magit-clone-internal (repository directory args &optional sparse)
+  (let* ((checkout (not (member (car args) '("--bare" "--mirror"))))
+         (remote (or (transient-arg-value "--origin=" args)
+                     (magit-get "clone.defaultRemote")
+                     "origin"))
+         (set-push-default
+          (and checkout
+               (or (eq  magit-clone-set-remote.pushDefault t)
+                   (and magit-clone-set-remote.pushDefault
+                        (y-or-n-p (format "Set `remote.pushDefault' to %S? "
+                                          remote)))))))
+    (run-hooks 'magit-credential-hook)
+    (setq directory (file-name-as-directory (expand-file-name directory)))
+    (when (file-exists-p directory)
+      (if (file-directory-p directory)
+          (when (length> (directory-files directory) 2)
+            (let ((name (magit-clone--url-to-name repository)))
+              (unless (and name
+                           (setq directory (file-name-as-directory
+                                            (expand-file-name name directory)))
+                           (not (file-exists-p directory)))
+                (user-error "%s already exists" directory))))
+        (user-error "%s already exists and is not a directory" directory)))
+    (magit-run-git-async "clone" args "--" repository
+                         (magit-convert-filename-for-git directory))
+    ;; Don't refresh the buffer we're calling from.
+    (process-put magit-this-process 'inhibit-refresh t)
+    (set-process-sentinel
+     magit-this-process
+     (lambda (process event)
+       (when (memq (process-status process) '(exit signal))
+         (let ((magit-process-raise-error t))
+           (magit-process-sentinel process event)))
+       (when (and (eq (process-status process) 'exit)
+                  (= (process-exit-status process) 0))
+         (when checkout
+           (let ((default-directory directory))
+             (when set-push-default
+               (setf (magit-get "remote.pushDefault") remote))
+             (unless magit-clone-set-remote-head
+               (magit-remote-unset-head remote))))
+         (when (and sparse checkout)
+           (let ((default-directory directory))
+             (magit-call-git "sparse-checkout" "init" "--cone")
+             (magit-call-git "checkout" (magit-get-current-branch))))
+         (let ((default-directory directory))
+           (run-hooks 'magit-post-clone-hook))
+         (with-current-buffer (process-get process 'command-buf)
+           (magit-status-setup-buffer directory)))))))
+
+(defun magit-clone-read-args ()
+  (let ((repo (magit-clone-read-repository)))
+    (list repo
+          (read-directory-name
+           "Clone to: "
+           (if (functionp magit-clone-default-directory)
+               (funcall magit-clone-default-directory repo)
+             magit-clone-default-directory)
+           nil nil
+           (magit-clone--url-to-name repo))
+          (transient-args 'magit-clone))))
+
+(defun magit-clone-read-repository ()
+  (magit-read-char-case "Clone from " nil
+    (?u "[u]rl or name"
+        (let ((str (magit-read-string-ns "Clone from url or name")))
+          (if (string-match-p "\\(://\\|@\\)" str)
+              str
+            (magit-clone--name-to-url str))))
+    (?p "[p]ath"
+        (magit-convert-filename-for-git
+         (read-directory-name "Clone repository: ")))
+    (?l "[l]ocal url"
+        (concat "file://"
+                (magit-convert-filename-for-git
+                 (read-directory-name "Clone repository: file://"))))
+    (?b "[b]undle"
+        (magit-convert-filename-for-git
+         (read-file-name "Clone from bundle: ")))))
+
+(defun magit-clone--url-to-name (url)
+  (and (string-match "\\([^/:]+?\\)\\(/?\\.git\\)?$" url)
+       (match-str 1 url)))
+
+(defun magit-clone--name-to-url (name)
+  (or (seq-some
+       (pcase-lambda (`(,re ,host ,user))
+         (and (string-match re name)
+              (let ((repo (match-str 1 name)))
+                (magit-clone--format-url host user repo))))
+       magit-clone-name-alist)
+      (user-error "Not an url and no matching entry in `%s'"
+                  'magit-clone-name-alist)))
+
+(defun magit-clone--format-url (host user repo)
+  (if-let ((url-format
+            (cond ((listp magit-clone-url-format)
+                   (cdr (or (assoc host magit-clone-url-format)
+                            (assoc t magit-clone-url-format))))
+                  ((stringp magit-clone-url-format)
+                   magit-clone-url-format))))
+      (format-spec
+       url-format
+       `((?h . ,host)
+         (?n . ,(cond
+                  ((string-search "/" repo) repo)
+                  ((string-search "." user)
+                   (if-let ((user (magit-get user)))
+                       (concat user "/" repo)
+                     (user-error "Set %S or specify owner explicitly" user)))
+                  ((concat user "/" repo))))))
+    (user-error
+     "Bogus `magit-clone-url-format' (bad type or missing default)")))
+
+;;; _
+(provide 'magit-clone)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-clone.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-clone.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-clone.elc
new file mode 100644
index 0000000..6da21d8
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-clone.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-commit.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-commit.el
new file mode 100644
index 0000000..b5a45a9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-commit.el
@@ -0,0 +1,878 @@
+;;; magit-commit.el --- Create Git commits  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements commands for creating Git commits.  These
+;; commands just initiate the commit, support for writing the commit
+;; messages is implemented in `git-commit.el'.
+
+;;; Code:
+
+(require 'magit)
+(require 'magit-sequence)
+
+;;; Options
+
+(defcustom magit-commit-ask-to-stage 'verbose
+  "Whether to ask to stage everything when committing and nothing is staged."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-commands
+  :type '(choice (const :tag "Ask" t)
+                 (const :tag "Ask showing diff" verbose)
+                 (const :tag "Stage without confirmation" stage)
+                 (const :tag "Don't ask" nil)))
+
+(defcustom magit-commit-show-diff t
+  "Whether the relevant diff is automatically shown when committing."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defcustom magit-commit-extend-override-date t
+  "Whether using `magit-commit-extend' changes the committer date."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defcustom magit-commit-reword-override-date t
+  "Whether using `magit-commit-reword' changes the committer date."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defcustom magit-commit-squash-confirm t
+  "Whether the commit targeted by squash and fixup has to be confirmed.
+When non-nil then the commit at point (if any) is used as default
+choice, otherwise it has to be confirmed.  This option only
+affects `magit-commit-squash' and `magit-commit-fixup'.  The
+\"instant\" variants always require confirmation because making
+an error while using those is harder to recover from."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defcustom magit-commit-diff-inhibit-same-window nil
+  "Whether to inhibit use of same window when showing diff while committing.
+
+When writing a commit, then a diff of the changes to be committed
+is automatically shown.  The idea is that the diff is shown in a
+different window of the same frame and for most users that just
+works.  In other words most users can completely ignore this
+option because its value doesn't make a difference for them.
+
+However for users who configured Emacs to never create a new
+window even when the package explicitly tries to do so, then
+displaying two new buffers necessarily means that the first is
+immediately replaced by the second.  In our case the message
+buffer is immediately replaced by the diff buffer, which is of
+course highly undesirable.
+
+A workaround is to suppress this user configuration in this
+particular case.  Users have to explicitly opt-in by toggling
+this option.  We cannot enable the workaround unconditionally
+because that again causes issues for other users: if the frame
+is too tiny or the relevant settings too aggressive, then the
+diff buffer would end up being displayed in a new frame.
+
+Also see https://github.com/magit/magit/issues/4132."
+  :package-version '(magit . "3.3.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defvar magit-common-git-post-commit-functions nil
+  "Hook run by Git hooks `post-commit', `post-merge' and `post-rewrite'.
+
+There is not a single Git hook, which is called after a commit is
+created; to achieve that, all of these Git hooks have to be used.
+
+Git hooks are documented in the githooks(5) manpage.  This Lisp hook
+is only run if `magit-run-hooks-from-githooks' is non-nil, and Magit
+runs Git asynchronously and on the local machine.  The hook functions
+are called with the same arguments as the Git hook; see the mentioned
+manpage for details.")
+
+;;; Menu
+
+;;;###autoload(autoload 'magit-commit "magit-commit" nil t)
+(transient-define-prefix magit-commit ()
+  "Create a new commit or replace an existing commit."
+  :info-manual "(magit)Initiating a Commit"
+  :man-page "git-commit"
+  :value '("--verbose")
+  ["Arguments"
+   ("-a" "Stage all modified and deleted files"   ("-a" "--all"))
+   ("-e" "Allow empty commit"                     "--allow-empty")
+   ("-v" "Show diff of changes to be committed"   ("-v" "--verbose"))
+   ("-n" "Disable hooks"                          ("-n" "--no-verify"))
+   ("-R" "Claim authorship and reset author date" "--reset-author")
+   (magit:--author :description "Override the author")
+   (magit-commit:--date :level 7)
+   (magit:--gpg-sign :level 5)
+   (magit:--signoff)
+   (magit-commit:--reuse-message)
+   (magit-commit:--reedit-message)]
+  [["Create"
+    ("c" "Commit"         magit-commit-create)]
+   ["Edit HEAD"
+    ("e" "Extend"         magit-commit-extend)
+    ""
+    ("a" "Amend"          magit-commit-amend)
+    ""
+    ("w" "Reword"         magit-commit-reword)
+    ("d" "Reshelve"       magit-commit-reshelve :level 0)]
+   ["Edit"
+    ("f" "Fixup"          magit-commit-fixup)
+    ("s" "Squash"         magit-commit-squash)
+    ("A" "Alter"          magit-commit-alter)
+    ("n" "Augment"        magit-commit-augment)
+    ("W" "Revise"         magit-commit-revise)]
+   ["Edit and rebase"
+    ("F" "Instant fixup"  magit-commit-instant-fixup)
+    ("S" "Instant squash" magit-commit-instant-squash)
+    ""
+    ""
+    ("R" "Reword past"    magit-rebase-reword-commit :level 0)]
+   ["Spread across commits"
+    ("x" "Modified files"  magit-commit-autofixup :level 6)
+    ("X" "Updated modules" magit-commit-absorb-modules :level 6)]]
+  (interactive)
+  (if-let ((buffer (magit-commit-message-buffer)))
+      (switch-to-buffer buffer)
+    (transient-setup 'magit-commit)))
+
+(defun magit-commit-arguments nil
+  (transient-args 'magit-commit))
+
+(transient-define-argument magit-commit:--date ()
+  :description "Override the author date"
+  :class 'transient-option
+  :shortarg "-D"
+  :argument "--date="
+  :reader #'transient-read-date)
+
+(transient-define-argument magit-commit:--reuse-message ()
+  :description "Reuse commit message"
+  :class 'transient-option
+  :shortarg "-C"
+  :argument "--reuse-message="
+  :reader #'magit-read-reuse-message
+  :history-key 'magit-revision-history)
+
+(transient-define-argument magit-commit:--reedit-message ()
+  :description "Reedit commit message"
+  :class 'transient-option
+  :shortarg "-c"
+  :argument "--reedit-message="
+  :reader #'magit-read-reuse-message
+  :history-key 'magit-revision-history)
+
+(defun magit-read-reuse-message (prompt &optional default history)
+  (if current-prefix-arg
+      (let (rev)
+        (magit-log-select
+          (lambda (r) (setq rev r) (exit-recursive-edit))
+          "Type %p on a commit to reuse its message")
+        (recursive-edit)
+        rev)
+    (magit-completing-read prompt (magit-list-refnames)
+                           nil nil nil history
+                           (or default
+                               (magit-commit-at-point)
+                               (and (magit-rev-verify "ORIG_HEAD")
+                                    "ORIG_HEAD")))))
+
+;;; Commands
+;;;; Create
+
+;;;###autoload
+(defun magit-commit-create (&optional args)
+  "Create a new commit."
+  (interactive (list (magit-commit-arguments)))
+  (cond ((member "--all" args)
+         (setq this-command 'magit-commit--all))
+        ((member "--allow-empty" args)
+         (setq this-command 'magit-commit--allow-empty)))
+  (when (setq args (magit-commit-assert args))
+    (let ((default-directory (magit-toplevel)))
+      (magit-run-git-with-editor "commit" args))))
+
+;;;; Edit HEAD
+
+;;;###autoload
+(defun magit-commit-extend (&optional args override-date)
+  "Amend staged changes to the last commit, without editing its message.
+
+With a prefix argument do not update the committer date; without an
+argument update it.  The option `magit-commit-extend-override-date'
+can be used to inverse the meaning of the prefix argument.  Called
+non-interactively, the optional OVERRIDE-DATE argument controls this
+behavior, and the option is of no relevance."
+  (interactive (list (magit-commit-arguments)
+                     (if current-prefix-arg
+                         (not magit-commit-extend-override-date)
+                       magit-commit-extend-override-date)))
+  (when (setq args (magit-commit-assert args))
+    (magit-commit-amend-assert)
+    (if override-date
+        (magit-run-git-with-editor "commit" "--amend" "--no-edit" args)
+      (with-environment-variables
+          (("GIT_COMMITTER_DATE" (magit-rev-format "%cD")))
+        (magit-run-git-with-editor "commit" "--amend" "--no-edit" args)))))
+
+;;;###autoload
+(defun magit-commit-amend (&optional args)
+  "Amend staged changes (if any) to the last commit, and edit its message."
+  (interactive (list (magit-commit-arguments)))
+  (magit-commit-amend-assert)
+  (magit-run-git-with-editor "commit" "--amend" args))
+
+;;;###autoload
+(defun magit-commit-reword (&optional args override-date)
+  "Reword the message of the last commit, without amending its tree.
+
+With a prefix argument do not update the committer date; without an
+argument update it.  The option `magit-commit-reword-override-date'
+can be used to inverse the meaning of the prefix argument.  Called
+non-interactively, the optional OVERRIDE-DATE argument controls this
+behavior, and the option is of no relevance."
+  (interactive (list (magit-commit-arguments)
+                     (if current-prefix-arg
+                         (not magit-commit-reword-override-date)
+                       magit-commit-reword-override-date)))
+  (magit-commit-amend-assert)
+  (cl-pushnew "--allow-empty" args :test #'equal)
+  (if override-date
+      (magit-run-git-with-editor "commit" "--amend" "--only" args)
+    (with-environment-variables
+        (("GIT_COMMITTER_DATE" (magit-rev-format "%cD")))
+      (magit-run-git-with-editor "commit" "--amend" "--only" args))))
+
+;;;; Edit
+
+;;;###autoload
+(defun magit-commit-fixup (&optional commit args)
+  "Create a fixup commit, leaving the original commit message untouched.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+During a later rebase, when this commit gets squashed into its targeted
+commit, the original message of the targeted commit is used as-is.
+
+In other words, call \"git commit --fixup=COMMIT --no-edit\"."
+  (interactive (list (magit-commit-at-point)
+                     (magit-commit-arguments)))
+  (magit-commit-squash-internal "--fixup=" commit args))
+
+;;;###autoload
+(defun magit-commit-squash (&optional commit args)
+  "Create a squash commit, without the user authoring a commit message.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+During a later rebase, when this commit gets squashed into its targeted
+commit, the user is given a chance to edit the original message to take
+the changes from the squash commit into account.
+
+In other words, call \"git commit --squash=COMMIT --no-edit\"."
+  (interactive (list (magit-commit-at-point)
+                     (magit-commit-arguments)))
+  (magit-commit-squash-internal "--squash=" commit args))
+
+;;;###autoload
+(defun magit-commit-alter (&optional commit args)
+  "Create a squash commit, authoring the final commit message now.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+During a later rebase, when this commit gets squashed into its targeted
+commit, the original message of the targeted commit is replaced with the
+message of this commit, without the user automatically being given a
+chance to edit again.
+
+In other words, call \"git commit --fixup=amend:COMMIT --edit\"."
+  (interactive (list (magit-commit-at-point)
+                     (magit-commit-arguments)))
+  (magit-commit-squash-internal "--fixup=amend:" commit args nil 'edit))
+
+;;;###autoload
+(defun magit-commit-augment (&optional commit args)
+  "Create a squash commit, authoring a new temporary commit message.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+During a later rebase, when this commit gets squashed into its targeted
+commit, the user is asked to write a final commit message, in a buffer
+that starts out containing both the original commit message, as well as
+the temporary commit message of the squash commit.
+
+In other words, call \"git commit --squash=COMMIT --edit\"."
+  (interactive (list (magit-commit-at-point)
+                     (magit-commit-arguments)))
+  (magit-commit-squash-internal "--squash=" commit args nil 'edit))
+
+;;;###autoload
+(defun magit-commit-revise (&optional commit args)
+  "Reword the message of an existing commit, without editing its tree.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+During a later rebase, when this commit gets squashed into its targeted
+commit, a combined commit is created which uses the message of the fixup
+commit and the tree of the targeted commit.
+
+In other words, call \"git commit --fixup=reword:COMMIT --edit\"."
+  (interactive (list (magit-commit-at-point)
+                     (magit-commit-arguments)))
+  (magit-commit-squash-internal "--fixup=reword:" commit args 'nopatch 'edit))
+
+;;;; Edit and Rebase
+
+;;;###autoload
+(defun magit-commit-instant-fixup (&optional commit args)
+  "Create a fixup commit, and immediately combine it with its target.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+Leave the original commit message of the targeted commit untouched.
+
+Like `magit-commit-fixup' but also run a \"--autofixup\" rebase."
+  (interactive (list (magit-commit-at-point)
+                     (magit-commit-arguments)))
+  (magit-commit-squash-internal "--fixup=" commit args nil nil 'rebase))
+
+;;;###autoload
+(defun magit-commit-instant-squash (&optional commit args)
+  "Create a squash commit, and immediately combine it with its target.
+
+If there is a reachable commit at point, target that.  Otherwise prompt
+for a commit.  If `magit-commit-squash-confirm' is non-nil, always make
+the user explicitly select a commit, in a buffer dedicated to that task.
+
+Turing the rebase phase, when the two commits are being squashed, ask
+the user to author the final commit message, based on the original
+message of the targeted commit.
+
+Like `magit-commit-squash' but also run a \"--autofixup\" rebase."
+  (interactive (list (magit-commit-at-point)
+                     (magit-commit-arguments)))
+  (magit-commit-squash-internal "--squash=" commit args nil nil 'rebase))
+
+;;;; Internal
+
+(defun magit-commit-squash-internal
+    (option commit &optional args nopatch edit rebase confirmed)
+  (when-let ((args (magit-commit-assert args nopatch (not edit))))
+    (when (and commit rebase (not (magit-rev-ancestor-p commit "HEAD")))
+      (magit-read-char-case
+          (format "%s isn't an ancestor of HEAD.  " commit) nil
+        (?c "[c]reate without rebasing" (setq rebase nil))
+        (?s "[s]elect other"            (setq commit nil))
+        (?a "[a]bort"                   (user-error "Quit"))))
+    (when commit
+      (setq commit (magit-rebase-interactive-assert commit t)))
+    (if (and commit
+             (or confirmed
+                 (not (or rebase
+                          current-prefix-arg
+                          magit-commit-squash-confirm))))
+        (let ((magit-commit-show-diff nil))
+          (push (concat option commit) args)
+          (push (if edit "--edit" "--no-edit") args)
+          (if rebase
+              (magit-with-editor
+                (magit-call-git
+                 "commit" "--no-gpg-sign"
+                 (seq-remove (apply-partially #'string-prefix-p "--gpg-sign=")
+                             args)))
+            (magit-run-git-with-editor "commit" args))
+          t) ; The commit was created; used by below lambda.
+      (let ((winconf (and magit-commit-show-diff
+                          (current-window-configuration))))
+        (magit-log-select
+          (lambda (commit)
+            (when (and (magit-commit-squash-internal option commit args
+                                                     nopatch edit rebase t)
+                       rebase)
+              (magit-commit-amend-assert commit)
+              (magit-rebase-interactive-1 commit
+                  (list "--autosquash" "--autostash" "--keep-empty")
+                "" "true" nil t))
+            (when winconf
+              (set-window-configuration winconf)))
+          (format "Type %%p on a commit to %s into it,"
+                  (substring option 2))
+          nil nil nil commit))
+      (when (and magit-commit-show-diff (not nopatch))
+        (let ((magit-display-buffer-noselect t))
+          (apply #'magit-diff-staged nil (magit-diff-arguments)))))))
+
+(defun magit-commit-amend-assert (&optional commit)
+  (when-let ((branches (magit-list-publishing-branches commit)))
+    (let ((m1 "This commit has already been published to ")
+          (m2 ".\nDo you really want to modify it"))
+      (magit-confirm 'amend-published
+        (concat m1 "%s" m2)
+        (concat m1 "%d public branches" m2)
+        nil branches))))
+
+(defun magit-commit-assert (args &optional nopatch strict)
+  (cond
+    (nopatch (or args (list "--")))
+    ((or (magit-anything-staged-p)
+         (and (magit-anything-unstaged-p)
+              ;; ^ Everything of nothing is still nothing.
+              (member "--all" args))
+         (and (not strict)
+              ;; ^ For amend variants that don't make sense otherwise.
+              (or (member "--amend" args)
+                  (member "--allow-empty" args)
+                  (member "--reset-author" args)
+                  (member "--signoff" args)
+                  (transient-arg-value "--author=" args)
+                  (transient-arg-value "--date=" args))))
+     (or args (list "--")))
+    ((and (magit-rebase-in-progress-p)
+          (not (magit-anything-unstaged-p))
+          (y-or-n-p "Nothing staged.  Continue in-progress rebase? "))
+     (setq this-command #'magit-rebase-continue)
+     (magit-run-git-sequencer "rebase" "--continue")
+     nil)
+    ((file-exists-p (expand-file-name "MERGE_MSG" (magit-gitdir)))
+     (cond ((magit-anything-unmerged-p)
+            (user-error "Unresolved conflicts"))
+           ((and (magit-anything-unstaged-p)
+                 (not (y-or-n-p
+                       "Proceed with merge despite unstaged changes? ")))
+            (user-error "Abort"))
+           ((or args (list "--")))))
+    ((not (magit-anything-unstaged-p))
+     (user-error "Nothing staged (or unstaged)"))
+    (magit-commit-ask-to-stage
+     (when (eq magit-commit-ask-to-stage 'verbose)
+       (apply #'magit-diff-unstaged (magit-diff-arguments)))
+     (prog1 (when (or (eq magit-commit-ask-to-stage 'stage)
+                      (y-or-n-p
+                       "Nothing staged.  Commit all uncommitted changes? "))
+              (setq this-command 'magit-commit--all)
+              (cons "--all" (or args (list "--"))))
+       (when (and (eq magit-commit-ask-to-stage 'verbose)
+                  (derived-mode-p 'magit-diff-mode))
+         (magit-mode-bury-buffer))))
+    (t
+     (user-error "Nothing staged"))))
+
+;;;; Reshelve
+
+(defvar magit--reshelve-history nil)
+
+;;;###autoload
+(defun magit-commit-reshelve (date update-author &optional args)
+  "Change committer (and possibly author) date of the last commit.
+
+The current time is used as the initial minibuffer input and the
+original author or committer date is available as the previous
+history element.
+
+Both the author and the committer dates are changed, unless one
+of the following is true, in which case only the committer date
+is updated:
+- You are not the author of the commit that is being reshelved.
+- The command was invoked with a prefix argument.
+- Non-interactively if UPDATE-AUTHOR is nil."
+  (interactive
+    (let ((update-author (and (magit-rev-author-p "HEAD")
+                              (not current-prefix-arg))))
+      (push (magit-rev-format (if update-author "%ad" "%cd") "HEAD"
+                              (concat "--date=format:%F %T %z"))
+            magit--reshelve-history)
+      (list (read-string (if update-author
+                             "Change author and committer dates to: "
+                           "Change committer date to: ")
+                         (cons (format-time-string "%F %T %z") 17)
+                         'magit--reshelve-history)
+            update-author
+            (magit-commit-arguments))))
+  (with-environment-variables (("GIT_COMMITTER_DATE" date))
+    (magit-run-git "commit" "--amend" "--no-edit"
+                   (and update-author (concat "--date=" date))
+                   args)))
+
+;;;; Spread
+
+;;;###autoload
+(defun magit-commit-absorb-modules (phase commit)
+  "Spread modified modules across recent commits."
+  (interactive (list 'select (magit-get-upstream-branch)))
+  (let ((modules (magit-list-modified-modules)))
+    (unless modules
+      (user-error "There are no modified modules that could be absorbed"))
+    (when commit
+      (setq commit (magit-rebase-interactive-assert commit t)))
+    (cond ((and commit (eq phase 'run))
+           (dolist (module modules)
+             (when-let ((msg (magit-git-string
+                              "log" "-1" "--format=%s"
+                              (concat commit "..") "--" module)))
+               (magit-git "commit" "-m" (concat "fixup! " msg)
+                          "--only" "--" module)))
+           (magit-refresh)
+           t)
+          ((magit-log-select
+             (lambda (commit)
+               (magit-commit-absorb-modules 'run commit))
+             nil nil nil nil commit)))))
+
+;;;###autoload(autoload 'magit-commit-absorb "magit-commit" nil t)
+(transient-define-prefix magit-commit-absorb (phase commit args)
+  "Spread staged changes across recent commits.
+With a prefix argument use a transient command to select infix
+arguments.  This command requires git-absorb executable, which
+is available from https://github.com/tummychow/git-absorb.
+See `magit-commit-autofixup' for an alternative implementation."
+  :value '("-v")
+  ["Arguments"
+   ("-f" "Skip safety checks" ("-f" "--force"))
+   ("-v" "Increase verbosity" ("-v" "--verbose"))]
+  ["Actions"
+   ("x"  "Absorb" magit-commit-absorb)]
+  (interactive (if current-prefix-arg
+                   (list 'transient nil nil)
+                 (list 'select
+                       (and$ (magit-get-upstream-branch)
+                             (magit-merge-base $ "HEAD"))
+                       (transient-args 'magit-commit-absorb))))
+  (if (eq phase 'transient)
+      (transient-setup 'magit-commit-absorb)
+    (unless (magit-git-executable-find "git-absorb")
+      (user-error "This command requires the git-absorb executable, which %s"
+                  "is available from https://github.com/tummychow/git-absorb"))
+    (unless (magit-anything-staged-p)
+      (if (magit-anything-unstaged-p)
+          (if (y-or-n-p "Nothing staged.  Absorb all unstaged changes? ")
+              (magit-with-toplevel
+                (magit-run-git "add" "-u" "."))
+            (user-error "Abort"))
+        (user-error "There are no changes that could be absorbed")))
+    (when commit
+      (setq commit (magit-rebase-interactive-assert commit t)))
+    (if (and commit (eq phase 'run))
+        (prog1 t (magit-run-git-async "absorb" args "-b" commit))
+      (magit-log-select
+        (lambda (commit)
+          (with-no-warnings ; about non-interactive use
+            (magit-commit-absorb 'run commit args)))
+        nil nil nil nil commit))))
+
+(transient-augment-suffix magit-commit-absorb :transient 'transient--do-exit)
+
+;;;###autoload(autoload 'magit-commit-autofixup "magit-commit" nil t)
+(transient-define-prefix magit-commit-autofixup (phase commit args)
+  "Spread staged or unstaged changes across recent commits.
+
+If there are any staged then spread only those, otherwise spread all
+unstaged changes.  With a prefix argument use a transient command to
+select infix arguments.
+
+This command requires the git-autofixup script, which is available from
+https://github.com/torbiak/git-autofixup.  See `magit-commit-absorb' for
+an alternative implementation."
+  :value '("-vv")
+  ["Arguments"
+   (magit-autofixup:--context)
+   (magit-autofixup:--strict)
+   ("-v" "Increase verbosity" "-vv")]
+  ["Actions"
+   ("x"  "Absorb" magit-commit-autofixup)]
+  (interactive (if current-prefix-arg
+                   (list 'transient nil nil)
+                 (list 'select
+                       (and$ (magit-get-upstream-branch)
+                             (magit-merge-base $ "HEAD"))
+                       (transient-args 'magit-commit-autofixup))))
+  (if (eq phase 'transient)
+      (transient-setup 'magit-commit-autofixup)
+    (unless (magit-git-executable-find "git-autofixup")
+      (user-error "This command requires the git-autofixup script, which %s"
+                  "is available from https://github.com/torbiak/git-autofixup"))
+    (unless (magit-anything-modified-p)
+      (user-error "There are no changes that could be absorbed"))
+    (when commit
+      (setq commit (magit-rebase-interactive-assert commit t)))
+    (if (and commit (eq phase 'run))
+        (prog1 t (magit-run-git-async "autofixup" args commit))
+      (magit-log-select
+        (lambda (commit)
+          (with-no-warnings ; about non-interactive use
+            (magit-commit-autofixup 'run commit args)))
+        nil nil nil nil commit))))
+
+(transient-augment-suffix magit-commit-autofixup :transient 'transient--do-exit)
+
+(transient-define-argument magit-autofixup:--context ()
+  :description "Diff context lines"
+  :class 'transient-option
+  :shortarg "-c"
+  :argument "--context="
+  :reader #'transient-read-number-N0)
+
+(transient-define-argument magit-autofixup:--strict ()
+  :description "Strictness"
+  :class 'transient-option
+  :shortarg "-s"
+  :argument "--strict="
+  :reader #'transient-read-number-N0)
+
+;;; Pending Diff
+
+(defun magit-commit-diff ()
+  (magit-repository-local-set 'this-commit-command
+                              (if (eq this-command 'with-editor-finish)
+                                  'magit-commit--rebase
+                                last-command))
+  (when (and git-commit-mode magit-commit-show-diff)
+    (when-let ((diff-buffer
+                ;; This signals an error if not inside a Git repository,
+                ;; but the user may be visiting COMMIT_EDITMSG using a
+                ;; tool other than git, which can be used outside a Git
+                ;; repository.  See #5527.
+                (ignore-error magit-outside-git-repo
+                  (magit-get-mode-buffer 'magit-diff-mode))))
+      ;; This window just started displaying the commit message buffer.
+      ;; Without unrecording that buffer would immediately be replaced
+      ;; with the diff buffer.  See #2632.
+      (unrecord-window-buffer nil diff-buffer))
+    (message "Diffing changes to be committed (C-g to abort diffing)")
+    (let ((inhibit-quit nil))
+      (condition-case nil
+          (with-demoted-errors "Error showing commit diff: %S"
+            (magit-commit-diff--show))
+        (quit)))))
+
+(defun magit-commit-diff--args ()
+  (let ((rev nil)
+        (arg "--cached")
+        (command (magit-repository-local-get 'this-commit-command))
+        (staged (magit-anything-staged-p))
+        (unstaged
+         ;; Escape $GIT_DIR because `magit-anything-unstaged-p'
+         ;; requires a working tree.
+         (magit-with-toplevel
+           (magit-anything-unstaged-p)))
+        (squash (let ((f (expand-file-name "rebase-merge/rewritten-pending"
+                                           (magit-gitdir))))
+                  (and (file-exists-p f) (length (magit-file-lines f)))))
+        (noalt nil))
+    (pcase (list staged unstaged command)
+      ((guard (not (magit-commit-p "HEAD^")))
+       (setq rev "HEAD")
+       (setq arg nil))
+      ((and `(,_ ,_ magit-commit--rebase)
+            (guard (integerp squash)))
+       (setq rev (format "HEAD~%s" squash)))
+      (`(,_ ,_ magit-commit-amend)
+       (setq rev "HEAD^"))
+      (`(nil nil magit-commit--allow-empty)
+       (setq rev "HEAD")
+       (setq arg nil))
+      ((or `(,_ ,_ magit-commit-reword)
+           `(nil nil ,_))
+       (setq rev "HEAD^..HEAD")
+       (setq arg nil))
+      (`(,_ t magit-commit--all)
+       (setq rev "HEAD")
+       (setq arg nil))
+      (`(nil t handle-switch-frame)
+       ;; Either --all or --allow-empty. Assume it is the former.
+       (setq rev "HEAD")
+       (setq arg nil)))
+    (cond
+      ((not
+        (and-let*
+            ((_(eq this-command 'magit-diff-while-committing))
+             (buf (magit-get-mode-buffer 'magit-diff-mode nil 'selected))
+             (_(equal rev (buffer-local-value 'magit-buffer-diff-range buf)))
+             (_(equal arg (buffer-local-value 'magit-buffer-diff-typearg buf)))))))
+      ((eq command 'magit-commit-amend)
+       (setq rev nil))
+      ((or squash
+           (file-exists-p (expand-file-name "rebase-merge/amend" (magit-gitdir))))
+       (setq rev "HEAD^"))
+      ((setq noalt t)))
+    (list rev arg noalt)))
+
+(defun magit-commit-diff--show ()
+  (pcase-let ((`(,rev ,arg ,noalt) (magit-commit-diff--args)))
+    (if noalt
+        (message "No alternative diff while committing")
+      (let ((magit-inhibit-save-previous-winconf 'unset)
+            (magit-display-buffer-noselect t)
+            (display-buffer-overriding-action
+             display-buffer-overriding-action))
+        (when magit-commit-diff-inhibit-same-window
+          (setq display-buffer-overriding-action
+                '(nil (inhibit-same-window . t))))
+        (magit-diff-setup-buffer rev arg (car (magit-diff-arguments)) nil
+                                 (cond ((equal rev "HEAD") 'staged)
+                                       ((equal rev "HEAD^..HEAD") 'committed)
+                                       ('undefined)))))))
+
+(add-hook 'server-switch-hook #'magit-commit-diff)
+(add-hook 'with-editor-filter-visit-hook #'magit-commit-diff)
+
+(add-to-list 'with-editor-server-window-alist
+             (cons git-commit-filename-regexp #'switch-to-buffer))
+
+(defun magit-commit--reset-command ()
+  (magit-repository-local-delete 'this-commit-command))
+
+;;; Message Utilities
+
+(defun magit-commit-message-buffer ()
+  (let* ((find-file-visit-truename t) ; git uses truename of COMMIT_EDITMSG
+         (topdir (magit-toplevel)))
+    (seq-find (##equal topdir (with-current-buffer %
+                                (and git-commit-mode (magit-toplevel))))
+              (append (buffer-list (selected-frame))
+                      (buffer-list)))))
+
+(defvar magit-commit-add-log-insert-function #'magit-commit-add-log-insert
+  "Used by `magit-commit-add-log' to insert a single entry.")
+
+(defun magit-commit-add-log ()
+  "Add a stub for the current change into the commit message buffer.
+If no commit is in progress, then initiate it.  Use the function
+specified by variable `magit-commit-add-log-insert-function' to
+actually insert the entry."
+  (interactive)
+  (pcase-let* ((hunk (and (magit-section-match 'hunk)
+                          (magit-current-section)))
+               (log  (magit-commit-message-buffer))
+               (`(,buf ,pos) (magit-diff-visit-file--noselect)))
+    (unless log
+      (unless (magit-commit-assert nil)
+        (user-error "Abort"))
+      (magit-commit-create)
+      (while (not (setq log (magit-commit-message-buffer)))
+        (sit-for 0.01)))
+    (magit--with-temp-position buf pos
+      (funcall magit-commit-add-log-insert-function log
+               (magit-file-relative-name)
+               (and hunk (add-log-current-defun))))))
+
+(defun magit-commit-add-log-insert (buffer file defun)
+  (with-current-buffer buffer
+    (undo-boundary)
+    (goto-char (point-max))
+    (git-commit--goto-insert-position nil)
+    (while (re-search-backward (git-commit--trailer-regexp) nil t))
+    (save-restriction
+      (narrow-to-region (point-min) (point))
+      (cond ((re-search-backward (format "* %s\\(?: (\\([^)]+\\))\\)?: " file)
+                                 nil t)
+             (when (equal (match-str 1) defun)
+               (setq defun nil))
+             (re-search-forward ": "))
+            (t
+             (when (re-search-backward "^[\\*(].+\n" nil t)
+               (goto-char (match-end 0)))
+             (while (re-search-forward "^[^\\*\n].*\n" nil t))
+             (if defun
+                 (progn (insert (format "* %s (%s): \n" file defun))
+                        (setq defun nil))
+               (insert (format "* %s: \n" file)))
+             (backward-char)
+             (unless (looking-at "\n[\n\\']")
+               (insert ?\n)
+               (backward-char))))
+      (when defun
+        (forward-line)
+        (let ((limit (save-excursion
+                       (and (re-search-forward "^\\*" nil t)
+                            (point)))))
+          (unless (or (looking-back (format "(%s): " defun)
+                                    (line-beginning-position))
+                      (re-search-forward (format "^(%s): " defun) limit t))
+            (while (re-search-forward "^[^\\*\n].*\n" limit t))
+            (insert (format "(%s): \n" defun))
+            (backward-char)))))))
+
+;;; Post Hook
+
+(defcustom magit-post-commit-hook nil
+  "Hook run after creating a commit without the user editing a message.
+
+This hook is run by `magit-refresh' if `this-command' is a member
+of `magit-post-commit-hook-commands'.  This only includes commands
+named `magit-commit-*' that do *not* require that the user edits
+the commit message in a buffer and then finishes by pressing
+\\<with-editor-mode-map>\\[with-editor-finish].
+
+Also see `git-commit-post-finish-hook'."
+  :package-version '(magit . "2.90.0")
+  :group 'magit-commands
+  :type 'hook)
+
+(defvar magit-post-commit-hook-commands
+  (list #'magit-commit-extend
+        #'magit-commit-fixup
+        #'magit-commit-augment
+        #'magit-commit-instant-fixup
+        #'magit-commit-instant-squash))
+
+;;;###autoload
+(defun magit-run-post-commit-hook ()
+  (when (and (not this-command)
+             (memq last-command magit-post-commit-hook-commands))
+    (run-hooks 'magit-post-commit-hook)))
+
+;;; _
+(provide 'magit-commit)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-commit.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-commit.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-commit.elc
new file mode 100644
index 0000000..4edfba2
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-commit.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-core.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-core.el
new file mode 100644
index 0000000..79eb381
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-core.el
@@ -0,0 +1,139 @@
+;;; magit-core.el --- Core functionality  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library requires several other libraries, so that yet other
+;; libraries can just require this one, instead of having to require
+;; all the other ones.  In other words this separates the low-level
+;; stuff from the rest.  It also defines some Custom groups.
+
+;;; Code:
+
+(require 'magit-base)
+(require 'magit-git)
+(require 'magit-mode)
+(require 'magit-margin)
+(require 'magit-process)
+(require 'magit-transient)
+(require 'magit-autorevert)
+
+;;; Options
+
+(defgroup magit nil
+  "Controlling Git from Emacs."
+  :link '(url-link "https://magit.vc")
+  :link '(info-link "(magit)FAQ")
+  :link '(info-link "(magit)")
+  :group 'tools)
+
+(defgroup magit-essentials nil
+  "Options that every Magit user should briefly think about.
+
+Each of these options falls into one or more of these categories:
+
+* Options that affect Magit's behavior in fundamental ways.
+* Options that affect safety.
+* Options that affect performance.
+* Options that are of a personal nature."
+  :link '(info-link "(magit)Essential Settings")
+  :group 'magit)
+
+(defgroup magit-miscellaneous nil
+  "Miscellaneous Magit options."
+  :group 'magit)
+
+(defgroup magit-commands nil
+  "Options controlling behavior of certain commands."
+  :group 'magit)
+
+(defgroup magit-modes nil
+  "Modes used or provided by Magit."
+  :group 'magit)
+
+(defgroup magit-buffers nil
+  "Options concerning Magit buffers."
+  :link '(info-link "(magit)Modes and Buffers")
+  :group 'magit)
+
+(defgroup magit-refresh nil
+  "Options controlling how Magit buffers are refreshed."
+  :link '(info-link "(magit)Automatic Refreshing of Magit Buffers")
+  :group 'magit
+  :group 'magit-buffers)
+
+(defgroup magit-faces nil
+  "Faces used by Magit."
+  :group 'magit
+  :group 'faces)
+
+(custom-add-to-group 'magit-faces 'diff-refine-added   'custom-face)
+(custom-add-to-group 'magit-faces 'diff-refine-removed 'custom-face)
+
+(defgroup magit-extensions nil
+  "Extensions to Magit."
+  :group 'magit)
+
+(custom-add-to-group 'magit-modes   'git-commit        'custom-group)
+(custom-add-to-group 'magit-faces   'git-commit-faces  'custom-group)
+(custom-add-to-group 'magit-modes   'git-rebase        'custom-group)
+(custom-add-to-group 'magit-faces   'git-rebase-faces  'custom-group)
+(custom-add-to-group 'magit         'magit-section     'custom-group)
+(custom-add-to-group 'magit-faces   'magit-section-faces 'custom-group)
+(custom-add-to-group 'magit-process 'with-editor       'custom-group)
+
+(defgroup magit-related nil
+  "Options that are relevant to Magit but that are defined elsewhere."
+  :link '(custom-group-link vc)
+  :link '(custom-group-link smerge)
+  :link '(custom-group-link ediff)
+  :link '(custom-group-link auto-revert)
+  :group 'magit
+  :group 'magit-extensions
+  :group 'magit-essentials)
+
+(custom-add-to-group 'magit-related     'auto-revert-check-vc-info 'custom-variable)
+(custom-add-to-group 'magit-auto-revert 'auto-revert-check-vc-info 'custom-variable)
+
+(custom-add-to-group 'magit-related 'ediff-window-setup-function 'custom-variable)
+(custom-add-to-group 'magit-related 'smerge-refine-ignore-whitespace 'custom-variable)
+(custom-add-to-group 'magit-related 'vc-follow-symlinks 'custom-variable)
+
+;;; _
+(provide 'magit-core)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-core.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-core.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-core.elc
new file mode 100644
index 0000000..7ae103f
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-core.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-diff.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-diff.el
new file mode 100644
index 0000000..61d8686
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-diff.el
@@ -0,0 +1,4104 @@
+;;; magit-diff.el --- Inspect Git diffs  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for looking at Git diffs and
+;; commits.
+
+;;; Code:
+
+(require 'magit-core)
+(require 'git-commit)
+
+(eval-when-compile (require 'ansi-color))
+(require 'diff-mode)
+(require 'image)
+(require 'smerge-mode)
+(require 'which-func)
+
+;; For `magit-diff--get-value'
+(defvar magit-status-use-buffer-arguments)
+;; For `magit-diff-popup'
+(declare-function magit-stash-show "magit-stash" (stash &optional args files))
+;; For `magit-diff-visit-file'
+(declare-function magit-find-file-noselect "magit-files"
+                  (rev file &optional no-restore-position volatile))
+(declare-function magit-status-setup-buffer "magit-status" (&optional directory))
+;; For `magit-diff-wash-diff'
+(defvar magit-log-heading-re)
+;; For `magit-diff-while-committing'
+(declare-function magit-commit-diff--show "magit-commit" ())
+(declare-function magit-commit-message-buffer "magit-commit" ())
+;; For `magit-insert-revision-gravatar'
+(defvar gravatar-size)
+;; For `magit-show-commit' and `magit-diff-show-or-scroll'
+(declare-function magit-current-blame-chunk "magit-blame" (&optional type noerror))
+(declare-function magit-blame-mode "magit-blame" (&optional arg))
+(defvar magit-blame-mode)
+;; For `magit-show-commit--arguments' and `magit-diff-wash-diff'
+(defvar magit-buffer-log-args)
+(defvar magit-buffer-log-files)
+;; For `magit-diff-show-or-scroll'
+(declare-function git-rebase-current-line "git-rebase" (&optional batch))
+;; For `magit-diff-unmerged'
+(declare-function magit-merge-in-progress-p "magit-merge" ())
+(declare-function magit--merge-range "magit-merge" (&optional head))
+;; For `magit-diff--dwim'
+(declare-function forge--pullreq-range "ext:forge-pullreq"
+                  (pullreq &optional endpoints))
+(declare-function forge--pullreq-ref "ext:forge-pullreq" (pullreq))
+;; For `magit-diff-wash-diff'
+(declare-function ansi-color-apply-on-region "ansi-color")
+;; For `magit-diff-wash-submodule'
+(declare-function magit-log-wash-log "magit-log" (style args))
+;; For keymaps and menus
+(declare-function magit-apply "magit-apply" (&rest args))
+(declare-function magit-stage "magit-apply" (&optional indent))
+(declare-function magit-unstage "magit-apply" ())
+(declare-function magit-discard "magit-apply" ())
+(declare-function magit-reverse "magit-apply" (&rest args))
+(declare-function magit-file-rename "magit-files" (file newname))
+(declare-function magit-file-untrack "magit-files" (files &optional force))
+(declare-function magit-commit-add-log "magit-commit" ())
+(declare-function magit-diff-trace-definition "magit-log" ())
+(declare-function magit-patch-save "magit-patch" (files &optional arg))
+(declare-function magit-do-async-shell-command "magit-dired" (file))
+(declare-function magit-add-change-log-entry "magit-extras"
+                  (&optional whoami file-name other-window))
+(declare-function magit-add-change-log-entry-other-window "magit-extras"
+                  (&optional whoami file-name))
+(declare-function magit-diff-edit-hunk-commit "magit-extras" ())
+(declare-function magit-smerge-keep-current "magit-apply" ())
+(declare-function magit-smerge-keep-all "magit-apply" ())
+(declare-function magit-smerge-keep-upper "magit-apply" ())
+(declare-function magit-smerge-keep-base "magit-apply" ())
+(declare-function magit-smerge-keep-lower "magit-apply" ())
+
+(eval-and-compile ;declare slot names
+  (cl-pushnew 'orig-rev eieio--known-slot-names)
+  (cl-pushnew 'action-type eieio--known-slot-names)
+  (cl-pushnew 'target eieio--known-slot-names))
+
+(define-obsolete-variable-alias 'magit-diff-section-base-map
+  'magit-diff-section-map "Magit 4.0.0")
+
+(define-obsolete-variable-alias 'magit-wash-message-hook
+  'magit-revision-wash-message-hook "Magit 4.3.0")
+
+(make-obsolete-variable 'magit-diff-highlight-keywords
+                        'magit-revision-wash-message-hook
+                        "Magit 4.3.0")
+
+;;; Options
+;;;; Diff Mode
+
+(defgroup magit-diff nil
+  "Inspect and manipulate Git diffs."
+  :link '(info-link "(magit)Diffing")
+  :group 'magit-commands
+  :group 'magit-modes)
+
+(defcustom magit-diff-mode-hook nil
+  "Hook run after entering Magit-Diff mode."
+  :group 'magit-diff
+  :type 'hook)
+
+(defcustom magit-diff-sections-hook
+  (list #'magit-insert-diff
+        #'magit-insert-xref-buttons)
+  "Hook run to insert sections into a `magit-diff-mode' buffer."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-diff
+  :type 'hook)
+
+(defcustom magit-diff-expansion-threshold 60
+  "After how many seconds not to expand anymore diffs.
+
+Except in status buffers, diffs usually start out fully expanded.
+Because that can take a long time, all diffs that haven't been
+fontified during a refresh before the threshold defined here are
+instead displayed with their bodies collapsed.
+
+Note that this can cause sections that were previously expanded
+to be collapsed.  So you should not pick a very low value here.
+
+The hook function `magit-diff-expansion-threshold' has to be a
+member of `magit-section-set-visibility-hook' for this option
+to have any effect."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-diff
+  :type 'float)
+
+(defcustom magit-diff-highlight-hunk-body t
+  "Whether to highlight bodies of selected hunk sections."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-diff
+  :type 'boolean)
+
+(defcustom magit-diff-highlight-hunk-region-functions
+  (list #'magit-diff-highlight-hunk-region-dim-outside
+        #'magit-diff-highlight-hunk-region-using-overlays)
+  "The functions used to highlight the hunk-internal region.
+
+`magit-diff-highlight-hunk-region-dim-outside' overlays the outside
+of the hunk internal selection with a face that causes the added and
+removed lines to have the same background color as context lines.
+This function should not be removed from the value of this option.
+
+`magit-diff-highlight-hunk-region-using-overlays' and
+`magit-diff-highlight-hunk-region-using-underline' emphasize the
+region by placing delimiting horizontal lines before and after it.
+The underline variant was implemented because Eli said that is
+how we should do it.  However the overlay variant actually works
+better.  Also see https://github.com/magit/magit/issues/2758.
+
+Instead of, or in addition to, using delimiting horizontal lines,
+to emphasize the boundaries, you may wish to emphasize the text
+itself, using `magit-diff-highlight-hunk-region-using-face'.
+
+In terminal frames it's not possible to draw lines as the overlay
+and underline variants normally do, so there they fall back to
+calling the face function instead."
+  :package-version '(magit . "2.9.0")
+  :set-after '(magit-diff-show-lines-boundaries)
+  :group 'magit-diff
+  :type 'hook
+  :options (list #'magit-diff-highlight-hunk-region-dim-outside
+                 #'magit-diff-highlight-hunk-region-using-underline
+                 #'magit-diff-highlight-hunk-region-using-overlays
+                 #'magit-diff-highlight-hunk-region-using-face))
+
+(defcustom magit-diff-unmarked-lines-keep-foreground t
+  "Whether `magit-diff-highlight-hunk-region-dim-outside' preserves foreground.
+When this is set to nil, then that function only adjusts the
+foreground color but added and removed lines outside the region
+keep their distinct foreground colors."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-diff
+  :type 'boolean)
+
+(defcustom magit-diff-refine-hunk nil
+  "Whether to refine hunks to show word-granularity differences.
+
+`nil'  Never show fine differences.
+`all'  Show fine differences for all displayed diff hunks.
+`t'    Refine each hunk once it becomes the current section.
+       Keep the refinement when another section is selected.
+       Refreshing the buffer removes all refinement.  This
+       variant is only provided for performance reasons."
+  :group 'magit-diff
+  :safe (##memq % '(nil t all))
+  :type '(choice (const :tag "No refinement" nil)
+                 (const :tag "Immediately refine all hunks" all)
+                 (const :tag "Refine each hunk when moving to it" t)))
+
+(put 'magit-diff-refine-hunk 'permanent-local t)
+
+(defcustom magit-diff-fontify-hunk nil
+  "Whether to apply syntax highlighting to diff hunks.
+
+`nil'  Never fontify diff hunks.
+`all'  Fontify all diff hunks.
+`t'    Fontify each hunk once it becomes the current section.
+       Keep the fontification when another section is selected.
+       Refreshing the buffer removes all fontification.  This
+       variant is only provided for performance reasons.
+
+If this is enabled, then `magit-diff-specify-hunk-foreground' should
+be disabled.  Also consider enabling `magit-diff-use-indicator-faces'.
+Emacs has to be restarted, after changing the value of the former.
+
+This is considered experimental and is disabled by default, because the
+fontification is done synchronously, and that can lead to a noticeable
+delay.  The plan is to make it asynchronous, probably with the help of
+the new `futur' package, which itself still under heavy development."
+  :package-version '(magit . "4.6.0")
+  :group 'magit-diff
+  :safe (##memq % '(nil t all))
+  :type '(choice (const :tag "No fontification" nil)
+                 (const :tag "Immediately fontify all hunks" all)
+                 (const :tag "Fontify each hunk when moving to it" t)))
+
+(put 'magit-diff-fontify-hunk 'permanent-local t)
+
+(defcustom magit-diff-refine-ignore-whitespace smerge-refine-ignore-whitespace
+  "Whether to ignore whitespace changes in word-granularity differences."
+  :package-version '(magit . "3.0.0")
+  :set-after '(smerge-refine-ignore-whitespace)
+  :group 'magit-diff
+  :safe 'booleanp
+  :type 'boolean)
+
+(defcustom magit-diff-adjust-tab-width nil
+  "Whether to adjust the width of tabs in diffs.
+
+Determining the correct width can be expensive if it requires
+opening large and/or many files, so the widths are cached in
+the variable `magit-diff--tab-width-cache'.  Set that to `nil'
+to invalidate the cache.
+
+`nil'     Never adjust tab width.  Use `tab-width's value from
+          the Magit buffer itself instead.
+
+`t'       If the corresponding file-visiting buffer exits, then
+          use `tab-width's value from that buffer.  Doing this is
+          cheap, so this value is used even if a corresponding
+          cache entry exists.
+
+`always'  If there is no such buffer, then temporarily visit the
+          file to determine the value.
+
+NUMBER    Like `always', but don't visit files larger than NUMBER
+          bytes."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-diff
+  :type '(choice (const   :tag "Never" nil)
+                 (const   :tag "If file-visiting buffer exists" t)
+                 (integer :tag "If file isn't larger than N bytes")
+                 (const   :tag "Always" always)))
+
+(defcustom magit-diff-paint-whitespace t
+  "Specify where to highlight whitespace errors.
+
+`nil'          Never highlight whitespace errors.
+`t'            Highlight whitespace errors everywhere.
+`uncommitted'  Only highlight whitespace errors in diffs
+               showing uncommitted changes.
+
+For backward compatibility `status' is treated as a synonym
+for `uncommitted'.
+
+The option `magit-diff-paint-whitespace-lines' controls for
+what lines (added/remove/context) errors are highlighted.
+
+The options `magit-diff-highlight-trailing' and
+`magit-diff-highlight-indentation' control what kind of
+whitespace errors are highlighted."
+  :group 'magit-diff
+  :safe (##memq % '(t nil uncommitted status))
+  :type '(choice (const :tag "In all diffs" t)
+                 (const :tag "Only in uncommitted changes" uncommitted)
+                 (const :tag "Never" nil)))
+
+(defcustom magit-diff-paint-whitespace-lines t
+  "Specify in what kind of lines to highlight whitespace errors.
+
+`t'       Highlight only in added lines.
+`both'    Highlight in added and removed lines.
+`all'     Highlight in added, removed and context lines."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-diff
+  :safe (##memq % '(t both all))
+  :type '(choice (const :tag "In added lines" t)
+                 (const :tag "In added and removed lines" both)
+                 (const :tag "In added, removed and context lines" all)))
+
+(defcustom magit-diff-highlight-trailing t
+  "Whether to highlight whitespace at the end of a line in diffs.
+Used only when `magit-diff-paint-whitespace' is non-nil."
+  :group 'magit-diff
+  :safe 'booleanp
+  :type 'boolean)
+
+(defcustom magit-diff-highlight-indentation nil
+  "Highlight the \"wrong\" indentation style.
+Used only when `magit-diff-paint-whitespace' is non-nil.
+
+The value is an alist of the form ((REGEXP . INDENT)...).  The
+path to the current repository is matched against each element
+in reverse order.  Therefore if a REGEXP matches, then earlier
+elements are not tried.
+
+If the used INDENT is `tabs', highlight indentation with tabs.
+If INDENT is an integer, highlight indentation with at least
+that many spaces.  Otherwise, highlight neither."
+  :group 'magit-diff
+  :type `(alist :key-type (regexp :tag "Directory regexp")
+                :value-type (choice (const :tag "Tabs" tabs)
+                                    (natnum :tag "Spaces" :value ,tab-width)
+                                    (const :tag "Neither" nil))))
+
+(defcustom magit-diff-hide-trailing-cr-characters
+  (and (memq system-type '(ms-dos windows-nt)) t)
+  "Whether to hide ^M characters at the end of a line in diffs."
+  :package-version '(magit . "2.6.0")
+  :group 'magit-diff
+  :type 'boolean)
+
+(defcustom magit-diff-extra-stat-arguments nil
+  "Additional arguments to be used alongside \"--stat\".
+
+A list of zero or more arguments or a function that takes no
+argument and returns such a list.  These arguments are allowed
+here: \"--stat-width\", \"--stat-name-width\", \"--stat-graph-width\"
+and \"--compact-summary\".  See the git-diff(1) manpage."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-diff
+  :type `(radio (function-item ,#'magit-diff-use-window-width-as-stat-width)
+                function
+                (list string)
+                (const :tag "None" nil)))
+
+(defcustom magit-format-file-function #'magit-format-file-default
+  "Function used to format lines representing a file.
+
+This function is used for file headings in diffs, in diffstats and for
+lists of files (such as the untracked files).  Depending on the caller,
+it receives either three or five arguments; the signature has to be
+\(kind file face &optional status orig).  KIND is one of `diff',
+`module', `stat' and `list'."
+  :package-version '(magit . "4.3.1")
+  :group 'magit-diff
+  :type `(radio (function-item ,#'magit-format-file-default)
+                (function-item ,#'magit-format-file-all-the-icons)
+                (function-item ,#'magit-format-file-nerd-icons)
+                function))
+
+;;;; File Diff
+
+(defcustom magit-diff-buffer-file-locked t
+  "Whether `magit-diff-buffer-file' uses a dedicated buffer."
+  :package-version '(magit . "2.7.0")
+  :group 'magit-commands
+  :group 'magit-diff
+  :type 'boolean)
+
+;;;; Revision Mode
+
+(defgroup magit-revision nil
+  "Inspect and manipulate Git commits."
+  :link '(info-link "(magit)Revision Buffer")
+  :group 'magit-modes)
+
+(defcustom magit-revision-mode-hook
+  (list #'bug-reference-mode
+        #'goto-address-mode)
+  "Hook run after entering Magit-Revision mode."
+  :group 'magit-revision
+  :type 'hook
+  :options '(bug-reference-mode
+             goto-address-mode))
+
+(defcustom magit-revision-sections-hook
+  (list #'magit-insert-revision-tag
+        #'magit-insert-revision-headers
+        #'magit-insert-revision-message
+        #'magit-insert-revision-notes
+        #'magit-insert-revision-diff
+        #'magit-insert-xref-buttons)
+  "Hook run to insert sections into a `magit-revision-mode' buffer."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-revision
+  :type 'hook)
+
+(defcustom magit-revision-wash-message-hook
+  (list #'magit-highlight-squash-markers
+        #'magit-highlight-bracket-keywords)
+  "Functions used to highlight parts of a commit message.
+
+These functions are called in order, in a buffer narrowed to the commit
+message.  They should set text properties as they see fit, usually just
+`font-lock-face'.  Before each function is called, point is at the
+beginning of the narrowed region of the buffer.
+
+See also the related `magit-log-wash-summary-hook'.  You likely want to
+use the same functions for both hooks."
+  :package-version '(magit . "4.3.0")
+  :group 'magit-log
+  :type 'hook
+  :options (list #'magit-highlight-squash-markers
+                 #'magit-highlight-bracket-keywords))
+
+(defcustom magit-revision-headers-format "\
+Author:     %aN <%aE>
+AuthorDate: %ad
+Commit:     %cN <%cE>
+CommitDate: %cd
+"
+  "Format string used to insert headers in revision buffers.
+
+All headers in revision buffers are inserted by the section
+inserter `magit-insert-revision-headers'.  Some of the headers
+are created by calling \"git show --format=FORMAT\" where FORMAT
+is the format specified here.  Other headers are hard coded or
+subject to option `magit-revision-insert-related-refs'."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-revision
+  :type 'string)
+
+(defcustom magit-revision-insert-related-refs t
+  "Whether to show related branches in revision buffers.
+
+`nil'   Don't show any related branches.
+`t'     Show related local branches.
+`all'   Show related local and remote branches.
+`mixed' Show all containing branches and local merged branches.
+
+See user option `magit-revision-insert-related-refs-display-alist'
+to hide specific sets of related branches."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-revision
+  :type '(choice (const :tag "Do not" nil)
+                 (const :tag "Local only" t)
+                 (const :tag "All related" all)
+                 (const :tag "All containing, local merged" mixed)))
+
+(defcustom magit-revision-insert-related-refs-display-alist nil
+  "How `magit-insert-revision-headers' displays related branch types.
+
+This is an alist, with recognised keys being the symbols
+`parents', `merged', `contained', `follows', and `precedes';
+and the supported values for each key being:
+
+`nil'   Hide these related branches.
+`t'     Show these related branches.
+
+Keys which are not present in the alist have an implicit value `t'
+\(so the default alist value of `nil' means all related branch types
+will be shown.)
+
+The types to be shown are additionally subject to user option
+`magit-revision-insert-related-refs'."
+  :package-version '(magit . "3.3.1")
+  :group 'magit-revision
+  :type '(alist :key-type (symbol :tag "Type of related branch")
+                :value-type (boolean :tag "Display"))
+  :options (mapcar (lambda (sym)
+                     `(,sym (choice (const :tag "Hide" nil)
+                                    (const :tag "Show" t))))
+                   '(parents merged contained follows precedes)))
+
+(defcustom magit-revision-use-hash-sections 'quicker
+  "Whether to turn hashes inside the commit message into sections.
+
+If non-nil, then hashes inside the commit message are turned into
+`commit' sections.  There is a trade off to be made between
+performance and reliability:
+
+- `slow' calls git for every word to be absolutely sure.
+- `quick' skips words less than seven characters long.
+- `quicker' additionally skips words that don't contain a number.
+- `quickest' uses all words that are at least seven characters
+  long and which contain at least one number as well as at least
+  one letter.
+
+If `nil', then no hashes are turned into sections, but you can
+still visit the commit at point using \"RET\"."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-revision
+  :type '(choice (const :tag "Use sections, quickest" quickest)
+                 (const :tag "Use sections, quicker" quicker)
+                 (const :tag "Use sections, quick" quick)
+                 (const :tag "Use sections, slow" slow)
+                 (const :tag "Don't use sections" nil)))
+
+(defcustom magit-revision-show-gravatars nil
+  "Whether to show gravatar images in revision buffers.
+
+If `nil', then don't insert any gravatar images.  If `t', then
+insert both images.  If `author' or `committer', then insert
+only the respective image.
+
+If you have customized the option `magit-revision-header-format'
+and want to insert the images then you might also have to specify
+where to do so.  In that case the value has to be a cons-cell of
+two regular expressions.  The car specifies where to insert the
+author's image.  The top half of the image is inserted right
+after the matched text, the bottom half on the next line in the
+same column.  The cdr specifies where to insert the committer's
+image, accordingly.  Either the car or the cdr may be `nil'."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-revision
+  :type '(choice
+          (const :tag "Don't show gravatars" nil)
+          (const :tag "Show gravatars" t)
+          (const :tag "Show author gravatar" author)
+          (const :tag "Show committer gravatar" committer)
+          (cons  :tag "Show gravatars using custom regexps"
+                 (choice (const  :tag "No author image" nil)
+                         (regexp :tag "Author regexp"    "^Author:     "))
+                 (choice (const  :tag "No committer image" nil)
+                         (regexp :tag "Committer regexp" "^Commit:     ")))))
+
+(defcustom magit-revision-fill-summary-line nil
+  "Whether to fill excessively long summary lines.
+
+If this is an integer, then the summary line is filled if it is
+longer than either the limit specified here or `window-width'.
+
+You may want to only set this locally in \".dir-locals-2.el\" for
+repositories known to contain bad commit messages.
+
+The body of the message is left alone because (a) most people who
+write excessively long summary lines usually don't add a body and
+\(b) even people who have the decency to wrap their lines may have
+a good reason to include a long line in the body sometimes."
+  :package-version '(magit . "2.90.0")
+  :group 'magit-revision
+  :type '(choice (const   :tag "Don't fill" nil)
+                 (integer :tag "Fill if longer than")))
+
+(defcustom magit-revision-filter-files-on-follow nil
+  "Whether to honor file filter if log arguments include \"--follow\".
+
+When a commit is displayed from a log buffer, the resulting revision
+buffer usually shares the log's file arguments, restricting the diff to
+those files.  However, there's a complication when the log arguments
+include \"--follow\": if the log follows a file across a rename event,
+keeping the file restriction would mean showing an empty diff in
+revision buffers for commits before the rename event.
+
+When this option is nil, the revision buffer ignores the log's filter
+if the log arguments include \"--follow\".  If non-nil, the log's file filter
+is always honored."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-revision
+  :type 'boolean)
+
+(defcustom magit-revision-use-dedicated-buffers nil
+  "Whether `magit-show-commit' uses a dedicated buffer for each revision.
+
+If this is nil, then each revision is initially displayed in the same
+per-repository buffer.  You can then lock that buffer to the revision;
+if you later display another revision, the locked buffer continues to
+display the same revision as before and the new revision is displayed
+in another bufer.
+
+If this is t, then each revision is displayed in a dedicated buffer.
+A revision buffer is only reused (i.e., raised), if it already displays
+the requested revision.  If you enable this, you will quickly accumulate
+revision buffers and will have to find a way to keep that under control.
+`magit-{blame,log,status}-maybe-update-revision-buffer' also will stop
+working, if this is enabled.  For these reasons it is recommended, that
+you do not enable this."
+  :package-version '(magit . "4.7.0")
+  :group 'magit-revision
+  :type 'boolean)
+
+;;;; Visit Commands
+
+(defcustom magit-diff-visit-prefer-worktree nil
+  "Whether `magit-diff-visit-file' prefers visiting the worktree file.
+
+By default `magit-diff-visit-file' does not do that.  Instead it
+behaves for staged and unstaged changes as it does for committed
+changes, by visiting a blob from the old/left or new/right side,
+depending on whether point is on a removed line or not.
+
+Setting this to nil, causes `magit-diff-visit-file' to always go to
+the file in the worktree when invoked from anywhere within a staged
+or unstaged change.
+
+It is strongly recommended that instead of changing the value of
+this option, you use the command `magit-diff-visit-worktree-file',
+which was created for that very purpose.  See the description of
+this option in the manual for an explanation."
+  :package-version '(magit . "4.4.0")
+  :group 'magit-diff
+  :type 'boolean)
+
+(defcustom magit-diff-visit-previous-blob t
+  "Whether `magit-diff-visit-file' may visit the previous blob.
+
+When this is t (the default) and point is on a removed line, then
+`magit-diff-visit-file' visits the blob from the old/left commit,
+which still has that line, instead of going to the new/right blob,
+which removes that line.
+
+Setting this to nil, causes `magit-diff-visit-file' to always go to
+the new/right blob, even when point is on a removed line.  This is
+very strongly discouraged.  Instead place the cursor anywhere else
+within the hunk but on a removed line, if you want to visit the new
+side.  That way you don't lose the ability to visit the old side."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-diff
+  :type 'boolean)
+
+;;; Faces
+;;;; Headings
+
+(defface magit-diff-file-heading
+  '((t :extend t :weight bold))
+  "Face for diff file headings."
+  :group 'magit-faces)
+
+(defface magit-diff-file-heading-highlight
+  '((t :extend t :inherit magit-section-highlight))
+  "Face for current diff file headings."
+  :group 'magit-faces)
+
+(defface magit-diff-file-heading-selection
+  '((((class color) (background light))
+     :extend t
+     :inherit magit-diff-file-heading-highlight
+     :foreground "salmon4")
+    (((class color) (background dark))
+     :extend t
+     :inherit magit-diff-file-heading-highlight
+     :foreground "LightSalmon3"))
+  "Face for selected diff file headings."
+  :group 'magit-faces)
+
+(defface magit-diff-hunk-heading
+  '((((class color) (background light))
+     :extend t
+     :background "grey90"
+     :foreground "grey20")
+    (((class color) (background dark))
+     :extend t
+     :background "grey25"
+     :foreground "grey95"))
+  "Face for diff hunk headings."
+  :group 'magit-faces)
+
+(defface magit-diff-hunk-heading-highlight
+  '((((class color) (background light))
+     :extend t
+     :background "grey80"
+     :foreground "grey20")
+    (((class color) (background dark))
+     :extend t
+     :background "grey35"
+     :foreground "grey95"))
+  "Face for current diff hunk headings."
+  :group 'magit-faces)
+
+(defface magit-diff-hunk-heading-selection
+  '((((class color) (background light))
+     :extend t
+     :inherit magit-diff-hunk-heading-highlight
+     :foreground "salmon4")
+    (((class color) (background dark))
+     :extend t
+     :inherit magit-diff-hunk-heading-highlight
+     :foreground "LightSalmon3"))
+  "Face for selected diff hunk headings."
+  :group 'magit-faces)
+
+(defface magit-diff-conflict-heading
+  '((t :inherit magit-diff-hunk-heading))
+  "Face for conflict markers."
+  :group 'magit-faces)
+
+(defface magit-diff-conflict-heading-highlight
+  '((t :inherit magit-diff-hunk-heading-highlight))
+  "Face for conflict markers."
+  :group 'magit-faces)
+
+(defface magit-diff-revision-summary
+  '((t :inherit magit-diff-hunk-heading))
+  "Face for commit message summaries."
+  :group 'magit-faces)
+
+(defface magit-diff-revision-summary-highlight
+  '((t :inherit magit-diff-hunk-heading-highlight))
+  "Face for highlighted commit message summaries."
+  :group 'magit-faces)
+
+(defface magit-diff-lines-heading
+  '((((class color) (background light))
+     :extend t
+     :inherit magit-diff-hunk-heading-highlight
+     :background "LightSalmon3")
+    (((class color) (background dark))
+     :extend t
+     :inherit magit-diff-hunk-heading-highlight
+     :foreground "grey80"
+     :background "salmon4"))
+  "Face for diff hunk heading when lines are marked."
+  :group 'magit-faces)
+
+(defface magit-diff-our-heading
+  `((((class color) (background light))
+     :extend t
+     :background "#aa2222"
+     :foreground "#ffdddd")
+    (((class color) (background dark))
+     :extend t
+     :background "#ffdddd"
+     :foreground "#553333"))
+  "Face for headings of our side in merge conflicts."
+  :group 'magit-faces)
+
+(defface magit-diff-base-heading
+  `((((class color) (background light))
+     :extend t
+     :background "#aaaa11"
+     :foreground "#ffffcc")
+    (((class color) (background dark))
+     :extend t
+     :background "#ffffcc"
+     :foreground "#555522"))
+  "Face for headings of common base in merge conflicts."
+  :group 'magit-faces)
+
+(defface magit-diff-their-heading
+  `((((class color) (background light))
+     :extend t
+     :background "#22aa22"
+     :foreground "#ddffdd")
+    (((class color) (background dark))
+     :extend t
+     :background "#ddffdd"
+     :foreground "#335533"))
+  "Face for headings of their side in merge conflicts."
+  :group 'magit-faces)
+
+;;;; Lines
+
+(defcustom magit-diff-specify-hunk-foreground t
+  "Whether to specify foreground colors for hunk faces.
+Setting this only has an effect if done before Magit is loaded."
+  :package-version '(magit . "4.6.0")
+  :group 'magit-faces
+  :type 'boolean)
+
+(defface magit-diff-context
+  `((((class color) (background light))
+     :extend t
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "grey50")))
+    (((class color) (background  dark))
+     :extend t
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "grey70"))))
+  "Face for lines in a diff that are unchanged."
+  :group 'magit-faces)
+
+(defface magit-diff-removed
+  `((((class color) (background light))
+     :extend t
+     :background "#ffdddd"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#aa2222")))
+    (((class color) (background dark))
+     :extend t
+     :background "#553333"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#ffdddd"))))
+  "Face for lines in a diff that have been removed."
+  :group 'magit-faces)
+
+(defface magit-diff-added
+  `((((class color) (background light))
+     :extend t
+     :background "#ddffdd"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#22aa22")))
+    (((class color) (background dark))
+     :extend t
+     :background "#335533"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#ddffdd"))))
+  "Face for lines in a diff that have been added."
+  :group 'magit-faces)
+
+(defface magit-diff-our
+  '((t :inherit magit-diff-removed))
+  "Face for lines in a diff for our side in a conflict."
+  :group 'magit-faces)
+
+(defface magit-diff-base
+  `((((class color) (background light))
+     :extend t
+     :background "#ffffcc"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#aaaa11")))
+    (((class color) (background dark))
+     :extend t
+     :background "#555522"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#ffffcc"))))
+  "Face for lines in a diff for the base side in a conflict."
+  :group 'magit-faces)
+
+(defface magit-diff-their
+  '((t :inherit magit-diff-added))
+  "Face for lines in a diff for their side in a conflict."
+  :group 'magit-faces)
+
+;;;; Highlights
+
+(defface magit-diff-context-highlight
+  `((((class color) (background light))
+     :extend t
+     :background "grey95"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "grey50")))
+    (((class color) (background dark))
+     :extend t
+     :background "grey20"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "grey70"))))
+  "Face for lines in the current context in a diff."
+  :group 'magit-faces)
+
+(defface magit-diff-removed-highlight
+  `((((class color) (background light))
+     :extend t
+     :background "#eecccc"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#aa2222")))
+    (((class color) (background dark))
+     :extend t
+     :background "#663333"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#eecccc"))))
+  "Face for lines in a diff that have been removed."
+  :group 'magit-faces)
+
+(defface magit-diff-added-highlight
+  `((((class color) (background light))
+     :extend t
+     :background "#cceecc"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#22aa22")))
+    (((class color) (background dark))
+     :extend t
+     :background "#336633"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#cceecc"))))
+  "Face for lines in a diff that have been added."
+  :group 'magit-faces)
+
+(defface magit-diff-our-highlight
+  '((t :inherit magit-diff-removed-highlight))
+  "Face for lines in a diff for our side in a conflict."
+  :group 'magit-faces)
+
+(defface magit-diff-base-highlight
+  `((((class color) (background light))
+     :extend t
+     :background "#eeeebb"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#aaaa11")))
+    (((class color) (background dark))
+     :extend t
+     :background "#666622"
+     ,@(and magit-diff-specify-hunk-foreground '(:foreground "#eeeebb"))))
+  "Face for lines in a diff for the base side in a conflict."
+  :group 'magit-faces)
+
+(defface magit-diff-their-highlight
+  '((t :inherit magit-diff-added-highlight))
+  "Face for lines in a diff for their side in a conflict."
+  :group 'magit-faces)
+
+;;;; Indicators
+
+(defcustom magit-diff-use-indicator-faces nil
+  "Whether to use separate faces for diff side indicators.
+If non-nil, use, for example, `magit-diff-removed-indicator' for the
+plus sign at the beginning of a removed line.  If nil, use the same
+face as for the rest of the line."
+  :package-version '(magit . "4.6.0")
+  :group 'magit-faces
+  :type 'boolean)
+
+(defface magit-diff-removed-indicator
+  `((((class color) (background light)) :foreground "#aa2222")
+    (((class color) (background  dark)) :foreground "#eecccc"))
+  "Face for indicators on lines in a diff that have been removed.
+Only used if `magit-diff-use-indicator-faces' is non-nil."
+  :group 'magit-faces)
+
+(defface magit-diff-added-indicator
+  `((((class color) (background light)) :foreground "#22aa22")
+    (((class color) (background  dark)) :foreground "#cceecc"))
+  "Face for indicators on lines in a diff that have been added.
+Only used if `magit-diff-use-indicator-faces' is non-nil."
+  :group 'magit-faces)
+
+(defface magit-diff-our-indicator
+  '((t :inherit magit-diff-removed-indicator))
+  "Face for indicators on lines in a diff for our side in a conflict.
+Only used if `magit-diff-use-indicator-faces' is non-nil."
+  :group 'magit-faces)
+
+(defface magit-diff-base-indicator
+  `((((class color) (background light)) :foreground "#aaaa11")
+    (((class color) (background  dark)) :foreground "#ffffcc"))
+  "Face for indicators on lines in a diff for base side in a conflict.
+Only used if `magit-diff-use-indicator-faces' is non-nil."
+  :group 'magit-faces)
+
+(defface magit-diff-their-indicator
+  '((t :inherit magit-diff-added-indicator))
+  "Face for indicators on lines in a diff for their side in a conflict.
+Only used if `magit-diff-use-indicator-faces' is non-nil."
+  :group 'magit-faces)
+
+;;;; Diffstats
+
+(defface magit-diffstat-removed
+  '((((class color) (background light)) :foreground "#aa2222")
+    (((class color) (background  dark)) :foreground "#aa4444"))
+  "Face for removal indicator in diffstat."
+  :group 'magit-faces)
+
+(defface magit-diffstat-added
+  '((((class color) (background light)) :foreground "#22aa22")
+    (((class color) (background  dark)) :foreground "#448844"))
+  "Face for addition indicator in diffstat."
+  :group 'magit-faces)
+
+;;;; Region
+
+(defface magit-diff-lines-boundary
+  '((t :extend t :inherit magit-diff-lines-heading))
+  "Face for boundary of marked lines in diff hunk."
+  :group 'magit-faces)
+
+(defface magit-diff-hunk-region
+  `((t :inherit bold
+       :extend ,(ignore-errors (face-attribute 'region :extend))))
+  "Face used by `magit-diff-highlight-hunk-region-using-face'.
+
+This face is overlaid over text that uses other hunk faces,
+and those normally set the foreground and background colors.
+The `:foreground' and especially the `:background' properties
+should be avoided here.  Setting the latter would cause the
+loss of information.  Good properties to set here are `:weight'
+and `:slant'."
+  :group 'magit-faces)
+
+;;;; Whitespace
+
+(defface magit-diff-whitespace-warning
+  '((t :inherit trailing-whitespace))
+  "Face for highlighting whitespace errors added lines."
+  :group 'magit-faces)
+
+;;; Variables
+
+(defvar-local magit-buffer-diff-range nil)
+(defvar-local magit-buffer-diff-range-oids nil)
+(defvar-local magit-buffer-diff-type nil)
+(defvar-local magit-buffer-diff-typearg nil)
+(defvar-local magit-buffer-diff-args nil)
+(defvar-local magit-buffer-diff-files nil)
+(defvar-local magit-buffer-diff-files-suspended nil)
+
+;; Preserve when refreshing status buffer.
+(put 'magit-buffer-diff-files-suspended 'permanent-local t)
+
+;;; Arguments
+;;;; Prefix Classes
+
+(defclass magit-diff-prefix (transient-prefix)
+  ((history-key :initform 'magit-diff)
+   (major-mode  :initform 'magit-diff-mode)))
+
+(defclass magit-diff-refresh-prefix (magit-diff-prefix)
+  ((history-key :initform 'magit-diff)
+   (major-mode  :initform nil)))
+
+;;;; Prefix Methods
+
+(cl-defmethod transient-prefix-value ((obj magit-diff-prefix))
+  (let ((args (cl-call-next-method obj)))
+    (list (seq-filter #'atom args)
+          (cdr (assoc "--" args)))))
+
+(cl-defmethod transient-init-value ((obj magit-diff-prefix))
+  (pcase-let ((`(,args ,files)
+               (magit-diff--get-value 'magit-diff-mode 'prefix)))
+    (when-let ((_(not (eq transient-current-command 'magit-dispatch)))
+               (file (magit-file-relative-name)))
+      (setq files (list file)))
+    (oset obj value (if files `(("--" ,@files) ,@args) args))))
+
+(cl-defmethod transient-init-value ((obj magit-diff-refresh-prefix))
+  (oset obj value (if magit-buffer-diff-files
+                      `(("--" ,@magit-buffer-diff-files)
+                        ,@magit-buffer-diff-args)
+                    magit-buffer-diff-args)))
+
+(cl-defmethod transient-set-value ((obj magit-diff-prefix))
+  (magit-diff--set-value obj))
+
+(cl-defmethod transient-save-value ((obj magit-diff-prefix))
+  (magit-diff--set-value obj 'save))
+
+;;;; Argument Access
+
+(defun magit-diff-arguments (&optional mode)
+  "Return the current diff arguments."
+  (if (memq transient-current-command '(magit-diff magit-diff-refresh))
+      (transient-args transient-current-command)
+    (magit-diff--get-value (or mode 'magit-diff-mode) 'direct)))
+
+(defun magit-diff--get-value (mode &optional use-buffer-args)
+  (setq use-buffer-args
+        (pcase-exhaustive use-buffer-args
+          ('prefix magit-prefix-use-buffer-arguments)
+          ('status magit-status-use-buffer-arguments)
+          ('direct magit-direct-use-buffer-arguments)
+          ('nil    magit-direct-use-buffer-arguments)
+          ((or 'always 'selected 'current 'never)
+           use-buffer-args)))
+  (cond-let
+    ((and (memq use-buffer-args '(always selected current))
+          (eq major-mode mode))
+     (list magit-buffer-diff-args
+           magit-buffer-diff-files))
+    ([_(memq use-buffer-args '(always selected))]
+     [buffer (magit-get-mode-buffer mode nil (eq use-buffer-args 'selected))]
+     (list (buffer-local-value 'magit-buffer-diff-args buffer)
+           (buffer-local-value 'magit-buffer-diff-files buffer)))
+    ((plist-member (symbol-plist mode) 'magit-diff-current-arguments)
+     (list (get mode 'magit-diff-current-arguments) nil))
+    ([elt (assq (intern (format "magit-diff:%s" mode)) transient-values)]
+     (list (cdr elt) nil))
+    ((list (get mode 'magit-diff-default-arguments) nil))))
+
+(defun magit-diff--set-value (obj &optional save)
+  (pcase-let* ((obj  (oref obj prototype))
+               (mode (or (oref obj major-mode) major-mode))
+               (key  (intern (format "magit-diff:%s" mode)))
+               (`(,args ,files) (transient-args (oref obj command))))
+    (put mode 'magit-diff-current-arguments args)
+    (when save
+      (setf (alist-get key transient-values) args)
+      (transient-save-values))
+    (transient--history-push obj)
+    (setq magit-buffer-diff-args args)
+    (setq magit-buffer-diff-files files)
+    (magit-refresh)))
+
+;;; Commands
+;;;; Prefix Commands
+
+(transient-define-group magit-diff-infix-arguments
+  ["Limit arguments"
+   (magit:--)
+   (magit-diff:--ignore-submodules)
+   ("-b" "Ignore whitespace changes"  ("-b" "--ignore-space-change"))
+   ("-w" "Ignore all whitespace"      ("-w" "--ignore-all-space"))
+   ("-D" "Omit preimage for deletes"  ("-D" "--irreversible-delete")
+    :level 5)]
+  ["Context arguments"
+   (magit-diff:-U)
+   ("-W" "Show surrounding functions" ("-W" "--function-context"))]
+  ["Tune arguments"
+   (magit-diff:--diff-algorithm)
+   (magit-diff:--diff-merges)
+   (magit-diff:-M)
+   (magit-diff:-C               :level 5)
+   ("-H" "Detect copies if source unmodified" "--find-copies-harder" :level 5)
+   (magit-diff:-R               :level 5)
+   (magit-diff:--color-moved    :level 5)
+   (magit-diff:--color-moved-ws :level 5)
+   (magit-diff:--no-ext-diff)
+   (magit-diff:--stat)
+   (magit-diff:--show-signature)])
+
+;;;###autoload(autoload 'magit-diff "magit-diff" nil t)
+(transient-define-prefix magit-diff ()
+  "Show changes between different versions."
+  :man-page "git-diff"
+  :class 'magit-diff-prefix
+  'magit-diff-infix-arguments
+  ["Actions"
+   [("d" "Dwim"          magit-diff-dwim)
+    ("r" "Diff range"    magit-diff-range)
+    ("p" "Diff paths"    magit-diff-paths)]
+   [("u" "Diff unstaged" magit-diff-unstaged)
+    ("s" "Diff staged"   magit-diff-staged)
+    ("w" "Diff worktree" magit-diff-working-tree)]
+   [("c" "Show commit"   magit-show-commit)
+    ("t" "Show stash"    magit-stash-show)]])
+
+;;;###autoload(autoload 'magit-diff-refresh "magit-diff" nil t)
+(transient-define-prefix magit-diff-refresh ()
+  "Change the arguments used for the diff(s) in the current buffer."
+  :man-page "git-diff"
+  :class 'magit-diff-refresh-prefix
+  'magit-diff-infix-arguments
+  [["Refresh"
+    ("g" "buffer"                   magit-diff-refresh)
+    ("s" "buffer and set defaults"  transient-set-and-exit)
+    ("w" "buffer and save defaults" transient-save-and-exit)]
+   ["Toggle"
+    ("t" "hunk refinement"          magit-diff-toggle-refine-hunk)
+    ("T" "hunk fontification"       magit-diff-toggle-fontify-hunk)
+    ("F" "file filter"              magit-diff-toggle-file-filter)
+    ("b" "buffer lock"              magit-toggle-buffer-lock
+     :if-mode (magit-diff-mode magit-revision-mode magit-stash-mode))]
+   [:if-mode magit-diff-mode
+    :description "Do"
+    ("r" "switch range type"        magit-diff-switch-range-type)
+    ("f" "flip revisions"           magit-diff-flip-revs)]]
+  (interactive)
+  (when (derived-mode-p 'magit-merge-preview-mode)
+    (user-error "Cannot use %s in %s" this-command major-mode))
+  (if (not (eq transient-current-command 'magit-diff-refresh))
+      (transient-setup 'magit-diff-refresh)
+    (pcase-let ((`(,args ,files) (magit-diff-arguments)))
+      (setq magit-buffer-diff-args args)
+      (setq magit-buffer-diff-files files))
+    (magit-refresh)))
+
+;;;; Infix Commands
+
+(transient-define-argument magit:-- ()
+  :description "Limit to files"
+  :class 'transient-files
+  :key "--"
+  :argument "--"
+  :prompt "Limit to file,s: "
+  :reader #'magit-read-files
+  :multi-value t)
+
+(defun magit-read-files (prompt initial-input history &optional list-fn)
+  (magit-completing-read-multiple prompt
+                                  (funcall (or list-fn #'magit-list-files))
+                                  nil nil
+                                  (or initial-input (magit-file-at-point))
+                                  history))
+
+(transient-define-argument magit-diff:-U ()
+  :description "Context lines"
+  :class 'transient-option
+  :argument "-U"
+  :reader #'transient-read-number-N0)
+
+(transient-define-argument magit-diff:-M ()
+  :description "Detect renames"
+  :class 'transient-option
+  :argument "-M"
+  :allow-empty t
+  :reader #'magit-read-similarity-index)
+
+(transient-define-argument magit-diff:-C ()
+  :description "Detect copies"
+  :class 'transient-option
+  :argument "-C"
+  :allow-empty t
+  :reader #'magit-read-similarity-index)
+
+(defun magit-read-similarity-index (prompt initial-input history)
+  "Read a similarity index.  See \"--find-renames\" in git-diff(1) manpage."
+  (catch 'valid
+    (while t
+      (let ((input (read-from-minibuffer prompt initial-input nil nil history)))
+        (if (string-match-p "\\`[0-9]+%?\\'" input)
+            (throw 'valid input)
+	  (message "Please enter a percentage ending in %%, %s"
+                   "or a fraction, omitting the implied leading \"0.\"")
+	  (sit-for 1))))))
+
+(transient-define-argument magit-diff:--diff-algorithm ()
+  :description "Diff algorithm"
+  :class 'transient-option
+  :key "-A"
+  :argument "--diff-algorithm="
+  :reader #'magit-diff-select-algorithm
+  :always-read t)
+
+(defun magit-diff-select-algorithm (&rest _ignore)
+  (magit-read-char-case nil t
+    (?u "[u]nspecified" nil)
+    (?d "[d]efault"     "default")
+    (?m "[m]inimal"     "minimal")
+    (?p "[p]atience"    "patience")
+    (?h "[h]istogram"   "histogram")))
+
+(transient-define-argument magit-diff:--diff-merges ()
+  :description "Diff merges"
+  :class 'transient-option
+  :key "-X"
+  :argument "--diff-merges="
+  :reader #'magit-diff-select-merges
+  :always-read t)
+
+(defun magit-diff-select-merges (&rest _ignore)
+  (magit-read-char-case nil t
+    (?u "[u]nspecified"    nil)
+    (?o "[o]ff"            "off")
+    (?f "[f]irst-parent"   "first-parent")
+    (?c "[c]ombined"       "combined")
+    (?d "[d]ense-combined" "dense-combined")))
+
+(transient-define-argument magit-diff:--ignore-submodules ()
+  :description "Ignore submodules"
+  :class 'transient-option
+  :key "-i"
+  :argument "--ignore-submodules="
+  :reader #'magit-diff-select-ignore-submodules)
+
+(defun magit-diff-select-ignore-submodules (&rest _ignored)
+  (magit-read-char-case "Ignore submodules " t
+    (?n "[n]one"      "none")
+    (?u "[u]ntracked" "untracked")
+    (?d "[d]irty"     "dirty")
+    (?a "[a]ll"       "all")))
+
+(transient-define-argument magit-diff:--color-moved ()
+  :description "Color moved lines"
+  :class 'transient-option
+  :key "-m"
+  :argument "--color-moved="
+  :reader #'magit-diff-select-color-moved-mode)
+
+(defun magit-diff-select-color-moved-mode (&rest _ignore)
+  (magit-read-char-case "Color moved " t
+    (?d "[d]efault" "default")
+    (?p "[p]lain"   "plain")
+    (?b "[b]locks"  "blocks")
+    (?z "[z]ebra"   "zebra")
+    (?Z "[Z] dimmed-zebra" "dimmed-zebra")))
+
+(transient-define-argument magit-diff:--color-moved-ws ()
+  :description "Whitespace treatment for --color-moved"
+  :class 'transient-option
+  :key "=w"
+  :argument "--color-moved-ws="
+  :reader #'magit-diff-select-color-moved-ws-mode)
+
+(defun magit-diff-select-color-moved-ws-mode (&rest _ignore)
+  (magit-read-char-case "Ignore whitespace " t
+    (?i "[i]ndentation"  "allow-indentation-change")
+    (?e "[e]nd of line"  "ignore-space-at-eol")
+    (?s "[s]pace change" "ignore-space-change")
+    (?a "[a]ll space"    "ignore-all-space")
+    (?n "[n]o"           "no")))
+
+(transient-define-argument magit-diff:-R ()
+  :description "Reverse sides"
+  :class 'transient-switch
+  :argument "-R"
+  :if 'magit-diff-argument-predicate)
+
+(transient-define-argument magit-diff:--no-ext-diff ()
+  :description "Disallow external diff drivers"
+  :class 'transient-switch
+  :argument "--no-ext-diff"
+  :key "-x")
+
+(transient-define-argument magit-diff:--stat ()
+  :description "Show stats"
+  :class 'transient-switch
+  :argument "--stat"
+  :key "-s"
+  :if 'magit-diff-argument-predicate)
+
+(transient-define-argument magit-diff:--show-signature ()
+  :description "Show signature"
+  :class 'transient-switch
+  :argument "--show-signature"
+  :key "=g"
+  :if 'magit-diff-argument-predicate)
+
+(defun magit-diff-argument-predicate ()
+  (or (eq (oref transient--prefix command) 'magit-diff)
+      (derived-mode-p 'magit-diff-mode)))
+
+;;;; Setup Commands
+
+;;;###autoload
+(defun magit-diff-dwim (&optional args files)
+  "Show changes for the thing at point.
+
+For example, if point is on a commit, show the changes introduced by
+that commit.  Likewise if point is on the section titled \"Unstaged
+changes\", then show those changes in a separate buffer.  Generally
+speaking, compare the thing at point with the most logical, trivial
+and (in *any* situation) at least potentially useful other thing it
+could be compared to.
+
+When the region selects commits, then compare the two commits at
+either end.  There are different ways two commits can be compared.
+In the buffer showing the diff, you can control how the comparison,
+is done, using \"D r\" and \"D f\".
+
+This function does not always show the changes that you might want
+to view in any given situation.  You can think of the changes being
+shown as the smallest common denominator.  There is no AI involved.
+If this command never does what you want, then ignore it, and instead
+use the commands that allow you to explicitly specify what you need."
+  (interactive (magit-diff-arguments))
+  (let ((default-directory default-directory)
+        (section (magit-current-section)))
+    (cond
+      ((magit-section-match 'module section)
+       (setq default-directory
+             (expand-file-name
+              (file-name-as-directory (oref section value))))
+       (magit-diff-range (oref section range)))
+      (t
+       (when (magit-section-match 'module-commit section)
+         (setq args nil)
+         (setq files nil)
+         (setq default-directory
+               (expand-file-name
+                (file-name-as-directory (magit-section-parent-value section)))))
+       (pcase (magit-diff--dwim)
+         ('unmerged (magit-diff-unmerged args files))
+         ('unstaged (magit-diff-unstaged args files))
+         ('staged
+          (let ((file (magit-file-at-point)))
+            (if (and file (equal (cddr (car (magit-file-status file))) '(?D ?U)))
+                ;; File was deleted by us and modified by them.  Show the latter.
+                (magit-diff-unmerged args (list file))
+              (magit-diff-staged nil args files))))
+         (`(stash . ,value) (magit-stash-show value args))
+         (`(commit . ,value)
+          (magit-diff-range (format "%s^..%s" value value) args files))
+         ((and range (pred stringp))
+          (magit-diff-range range args files))
+         (_ (call-interactively #'magit-diff-range)))))))
+
+(defun magit-diff--dwim ()
+  "Return information for performing DWIM diff.
+
+The information can be in three forms:
+1. TYPE
+   A symbol describing a type of diff where no additional information
+   is needed to generate the diff.  One of `staged', `unstaged',
+   `unmerged', and `undefined'.
+2. (TYPE . VALUE)
+   Like #1 but the diff requires additional information, which is
+   given by VALUE.  Currently, this includes `commit' and `stash',
+   where VALUE is the given commit or stash, respectively.
+3. RANGE
+   A string indicating a diff range.
+
+If no DWIM context is found, nil is returned."
+  (cond-let
+    ([commits (magit-region-values '(commit branch) t)]
+     (deactivate-mark)
+     (concat (car (last commits)) ".." (car commits)))
+    ((derived-mode-p 'magit-stash-mode)
+     (cons 'commit
+           (magit-section-case
+             (commit (oref it value))
+             (file (thread-first it
+                     (oref parent)
+                     (oref value)))
+             (hunk (thread-first it
+                     (oref parent)
+                     (oref parent)
+                     (oref value))))))
+    (magit-buffer-revision
+     (cons 'commit magit-buffer-revision))
+    ((derived-mode-p 'magit-diff-mode)
+     (pcase-exhaustive magit-buffer-diff-type
+       ('committed magit-buffer-diff-range)
+       ((or 'unstaged 'staged 'undefined) magit-buffer-diff-type)))
+    ((magit-section-case
+       ([* unstaged] 'unstaged)
+       ([* staged] 'staged)
+       (unmerged 'unmerged)
+       (unpushed (magit-diff--range-to-endpoints (oref it value)))
+       (unpulled (magit-diff--range-to-endpoints (oref it value)))
+       (branch (cond-let
+                 [[current (magit-get-current-branch)]
+                  [atpoint (oref it value)]]
+                 ((not (equal atpoint current))
+                  (format "%s...%s" (or current "HEAD") atpoint))
+                 ([upstream (magit-get-upstream-branch)]
+                  (format "%s...%s" upstream current))
+                 ((magit-anything-modified-p)
+                  current)
+                 ((cons 'commit current))))
+       (commit (cons 'commit (oref it value)))
+       ([file commit] (cons 'commit (oref (oref it parent) value)))
+       ([hunk file commit]
+        (cons 'commit (oref (oref (oref it parent) parent) value)))
+       (stash (cons 'stash (oref it value)))
+       (pullreq (forge--pullreq-range (oref it value) t))))))
+
+(defun magit-diff--range-to-endpoints (range)
+  (cond ((string-match "\\.\\.\\." range) (replace-match ".."  nil nil range))
+        ((string-match "\\.\\."    range) (replace-match "..." nil nil range))
+        (range)))
+
+(defun magit-diff--region-range (&optional interactive mbase)
+  (and-let* ((commits (magit-region-values '(commit branch) t))
+             (revA (car (last commits)))
+             (revB (car commits)))
+    (progn
+      (when interactive
+        (deactivate-mark))
+      (if mbase
+          (let ((base (magit-merge-base revA revB)))
+            (cond
+              ((string= (magit-rev-parse revA) base)
+               (format "%s..%s" revA revB))
+              ((string= (magit-rev-parse revB) base)
+               (format "%s..%s" revB revA))
+              (interactive
+                (let ((main (magit-completing-read "View changes along"
+                                                   (list revA revB)
+                                                   nil t nil nil revB)))
+                  (format "%s...%s"
+                          (if (string= main revB) revA revB) main)))
+              ((format "%s...%s" revA revB))))
+        (format "%s..%s" revA revB)))))
+
+(defun magit-diff-read-range-or-commit (prompt &optional secondary-default mbase)
+  "Read range or revision with special diff range treatment.
+If MBASE is non-nil, prompt for which rev to place at the end of
+a \"revA...revB\" range.  Otherwise, always construct
+\"revA..revB\" range."
+  (or (magit-diff--region-range t mbase)
+      (magit-read-range prompt
+                        (or (pcase (magit-diff--dwim)
+                              (`(commit . ,value)
+                               (format "%s^..%s" value value))
+                              ((and range (pred stringp))
+                               range))
+                            secondary-default
+                            (magit-get-current-branch)))))
+
+;;;###autoload
+(defun magit-diff-range (rev-or-range &optional args files)
+  "Show differences between two commits.
+
+REV-OR-RANGE should be a range or a single revision.  If it is a
+revision, then show changes in the working tree relative to that
+revision.  If it is a range, but one side is omitted, then show
+changes relative to `HEAD'.
+
+If the region is active, use the revisions on the first and last
+line of the region as the two sides of the range.  With a prefix
+argument, instead of diffing the revisions, choose a revision to
+view changes along, starting at the common ancestor of both
+revisions (i.e., use a \"...\" range)."
+  (interactive (cons (magit-diff-read-range-or-commit "Diff for range"
+                                                      nil current-prefix-arg)
+                     (magit-diff-arguments)))
+  (magit-diff-setup-buffer rev-or-range nil args files 'committed))
+
+;;;###autoload
+(defun magit-diff-working-tree (&optional rev args files)
+  "Show changes between the current working tree and the `HEAD' commit.
+With a prefix argument show changes between the working tree and
+a commit read from the minibuffer."
+  (interactive
+    (cons (and current-prefix-arg
+               (magit-read-branch-or-commit "Diff working tree and commit"))
+          (magit-diff-arguments)))
+  (magit-diff-setup-buffer (or rev "HEAD") nil args files 'committed))
+
+;;;###autoload
+(defun magit-diff-staged (&optional rev args files)
+  "Show changes between the index and the `HEAD' commit.
+With a prefix argument show changes between the index and
+a commit read from the minibuffer."
+  (interactive
+    (cons (and current-prefix-arg
+               (magit-read-branch-or-commit "Diff index and commit"))
+          (magit-diff-arguments)))
+  (magit-diff-setup-buffer rev "--cached" args files 'staged))
+
+;;;###autoload
+(defun magit-diff-unstaged (&optional args files)
+  "Show changes between the working tree and the index."
+  (interactive (magit-diff-arguments))
+  (magit-diff-setup-buffer nil nil args files 'unstaged))
+
+;;;###autoload
+(defun magit-diff-unmerged (&optional args files)
+  "Show changes that are being merged."
+  (interactive (magit-diff-arguments))
+  (unless (magit-merge-in-progress-p)
+    (user-error "No merge is in progress"))
+  (magit-diff-setup-buffer (magit--merge-range) nil args files 'committed))
+
+;;;###autoload
+(defun magit-diff-while-committing ()
+  "While committing, show the changes that are about to be committed.
+While amending, invoking the command again toggles between
+showing just the new changes or all the changes that will
+be committed."
+  (interactive)
+  (unless (magit-commit-message-buffer)
+    (user-error "No commit in progress"))
+  (magit-commit-diff--show))
+
+;;;###autoload
+(defun magit-diff-buffer-file (&optional unstaged-only)
+  "Show diff for the blob or file visited in the current buffer.
+
+Limit the diff to the file or blob.
+
+When the buffer visits a blob, then show the respective commit.
+When the buffer visits a file, then show the differences between
+`HEAD' and the working tree, or the index with a prefix argument."
+  (interactive (list current-prefix-arg))
+  (require 'magit)
+  (if-let ((file (magit-file-relative-name)))
+      (if magit-buffer-revision
+          (magit-show-commit magit-buffer-revision
+                             (car (magit-show-commit--arguments))
+                             (list file))
+        (save-buffer)
+        (let ((line (line-number-at-pos))
+              (col (current-column)))
+          (with-current-buffer
+              (magit-diff-setup-buffer (and (not unstaged-only)
+                                            (or (magit-get-current-branch)
+                                                "HEAD"))
+                                       nil
+                                       (car (magit-diff-arguments))
+                                       (list file)
+                                       'unstaged
+                                       magit-diff-buffer-file-locked)
+            (magit-diff--goto-file-position file line col))))
+    (user-error "Buffer isn't visiting a file")))
+
+;;;###autoload
+(defun magit-diff-paths (a b)
+  "Show changes between any two files on disk."
+  (interactive (list (read-file-name "First file: " nil nil t)
+                     (read-file-name "Second file: " nil nil t)))
+  (magit-diff-setup-buffer nil "--no-index" nil
+                           (list (magit-convert-filename-for-git
+                                  (expand-file-name a))
+                                 (magit-convert-filename-for-git
+                                  (expand-file-name b)))
+                           'undefined))
+
+(defun magit-show-commit--arguments ()
+  (pcase-let ((`(,args ,diff-files)
+               (magit-diff-arguments 'magit-revision-mode)))
+    (list args (if (derived-mode-p 'magit-log-mode)
+                   (and (or magit-revision-filter-files-on-follow
+                            (not (member "--follow" magit-buffer-log-args)))
+                        magit-buffer-log-files)
+                 diff-files))))
+
+;;;###autoload
+(defun magit-show-commit (rev &optional args files module)
+  "Visit the revision at point in another buffer.
+
+If there is no revision at point, or with a prefix argument, prompt
+for a revision.
+
+By default the same per-repository revision buffer is reused for all
+revision.  When you want to display multiple revisions at the same
+time, you can lock a revision buffer to its value, which prevents it
+from being reused to display another revision.
+
+Alternatively, you can use a dedicated buffer for every revision.
+To do so, enable `magit-revision-use-dedicated-buffers', but only
+after readings its docstring, to make sure you are can live with
+the trade-offs."
+  (interactive
+    (pcase-let* ((mcommit (magit-section-value-if 'module-commit))
+                 (atpoint (or mcommit
+                              (magit-thing-at-point 'git-revision t)
+                              (magit-branch-or-commit-at-point)))
+                 (`(,args ,files) (magit-show-commit--arguments)))
+      (list (or (and (not current-prefix-arg) atpoint)
+                (magit-read-branch-or-commit "Show commit" atpoint))
+            args
+            files
+            (and mcommit
+                 (magit-section-parent-value (magit-current-section))))))
+  (require 'magit)
+  (let* ((file (magit-file-relative-name))
+         (line (and file (line-number-at-pos))))
+    (magit-with-toplevel
+      (when module
+        (setq default-directory
+              (expand-file-name (file-name-as-directory module))))
+      (unless (magit-commit-oid rev t)
+        (user-error "%s cannot be dereferenced as a commit" rev))
+      (when file
+        (save-buffer))
+      (let ((buf (magit-revision-setup-buffer rev args files)))
+        (when file
+          (let ((line (magit-diff-visit--offset line file "-R" rev))
+                (col (current-column)))
+            (with-current-buffer buf
+              (magit-diff--goto-file-position file line col))))))))
+
+;;;###autoload
+(defun magit-show-commit-removing-file (file &optional args)
+  "Show the commit that removed FILE."
+  (interactive
+    (let* ((files (magit-removed-files))
+           (default (magit-file-relative-name))
+           (default (and default (member default files) default)))
+      (list (magit-completing-read "Show commit removing file: "
+                                   files nil nil nil nil default)
+            (car (magit-show-commit--arguments)))))
+  (if-let ((rev (magit-with-toplevel
+                  (magit-git-string "log" "--format=%H" "--diff-filter=D"
+                                    "--full-history" "-n" "1" "--" file))))
+      (magit-show-commit rev args)
+    (error "%s has not been removed" file)))
+
+(defun magit-diff--locate-file-position (file line column &optional parent)
+  (and-let*
+      ((parent (pcase parent
+                 ('unstaged (magit-get-section '((unstaged) (status))))
+                 ('staged   (magit-get-section '((staged)   (status))))
+                 ('nil (and (cl-typep (car (oref magit-root-section children))
+                                      'magit-file-section)
+                            magit-root-section))
+                 (_ parent)))
+       (diff (cl-find-if (##equal (oref % value) file)
+                         (oref parent children)))
+       (hunks (oref diff children)))
+    (let (hunk pos found)
+      (while (and (setq hunk (pop hunks))
+                  (not pos))
+        (when-let* ((range (oref hunk to-range))
+                    (beg (car range))
+                    (len (cadr range))
+                    (end (+ beg len)))
+          (cond
+            ((> beg line)
+             (setq pos (oref diff start)))
+            ((<= beg line end)
+             (save-excursion
+               (goto-char (oref hunk content))
+               (let ((l beg))
+                 (while (or (< l line)
+                            (= (char-after) ?-))
+                   (unless (= (char-after) ?-)
+                     (incf l))
+                   (forward-line)))
+               (setq found (if (= (char-after) ?+) 'line 'hunk))
+               (forward-char (1+ column))
+               (setq pos (point))))
+            ((null hunks)
+             (setq pos (oref hunk start))))))
+      (and pos
+           (list pos (or found file))))))
+
+(defun magit-diff--goto-file-position (file line column &optional parent)
+  (when-let ((pos (magit-diff--locate-file-position file line column parent)))
+    (goto-char (car pos))
+    (magit-section-reveal (magit-current-section))))
+
+;;;; Setting Commands
+
+(defun magit-diff-switch-range-type ()
+  "Convert diff range type.
+Change \"revA..revB\" to \"revA...revB\", or vice versa."
+  (interactive)
+  (cond ((and magit-buffer-diff-range
+              (derived-mode-p 'magit-diff-mode)
+              (string-match magit-range-re magit-buffer-diff-range))
+         (setq magit-buffer-diff-range
+               (replace-match
+                (if (string= (match-str 2 magit-buffer-diff-range) "..")
+                    "..."
+                  "..")
+                t t magit-buffer-diff-range 2))
+         (magit-refresh))
+        ((user-error "No range to change"))))
+
+(defun magit-diff-flip-revs ()
+  "Swap revisions in diff range.
+Change \"revA..revB\" to \"revB..revA\"."
+  (interactive)
+  (cond ((and magit-buffer-diff-range
+              (derived-mode-p 'magit-diff-mode)
+              (string-match magit-range-re magit-buffer-diff-range))
+         (setq magit-buffer-diff-range
+               (concat (match-str 3 magit-buffer-diff-range)
+                       (match-str 2 magit-buffer-diff-range)
+                       (match-str 1 magit-buffer-diff-range)))
+         (magit-refresh))
+        ((user-error "No range to swap"))))
+
+(defun magit-diff-toggle-file-filter ()
+  "Toggle the file restriction of the current buffer's diffs.
+If the current buffer's mode is derived from `magit-log-mode',
+toggle the file restriction in the repository's revision buffer
+instead."
+  (interactive)
+  (cl-flet ((toggle ()
+              (if (or magit-buffer-diff-files
+                      magit-buffer-diff-files-suspended)
+                  (cl-rotatef magit-buffer-diff-files
+                              magit-buffer-diff-files-suspended)
+                (setq magit-buffer-diff-files
+                      (transient-infix-read 'magit:--)))
+              (magit-refresh)))
+    (cond
+      ((derived-mode-p 'magit-log-mode
+                       'magit-cherry-mode
+                       'magit-reflog-mode)
+       (if-let ((buffer (magit-get-mode-buffer 'magit-revision-mode)))
+           (with-current-buffer buffer (toggle))
+         (message "No revision buffer")))
+      ((local-variable-p 'magit-buffer-diff-files)
+       (toggle))
+      ((user-error "Cannot toggle file filter in this buffer")))))
+
+(defun magit-diff-less-context (&optional count)
+  "Decrease the context for diff hunks by COUNT lines."
+  (interactive "p")
+  (magit-diff-set-context (##max 0 (- (or % 0) count))))
+
+(defun magit-diff-more-context (&optional count)
+  "Increase the context for diff hunks by COUNT lines."
+  (interactive "p")
+  (magit-diff-set-context (##+ (or % 0) count)))
+
+(defun magit-diff-default-context ()
+  "Reset context for diff hunks to the default height."
+  (interactive)
+  (magit-diff-set-context #'ignore))
+
+(defun magit-diff-set-context (fn)
+  (when (derived-mode-p 'magit-merge-preview-mode)
+    (user-error "Cannot use %s in %s" this-command major-mode))
+  (let* ((def (if-let ((context (magit-get "diff.context")))
+                  (string-to-number context)
+                3))
+         (val magit-buffer-diff-args)
+         (arg (seq-find (##string-match "^-U\\([0-9]+\\)?$" %) val))
+         (num (if-let ((str (and arg (match-str 1 arg))))
+                  (string-to-number str)
+                def))
+         (val (delete arg val))
+         (num (funcall fn num))
+         (arg (and num (not (= num def)) (format "-U%d" num)))
+         (val (if arg (cons arg val) val)))
+    (setq magit-buffer-diff-args val))
+  (magit-refresh))
+
+(defun magit-diff-get-context ()
+  (string-to-number
+   (or (seq-some (##and (string-match "\\`-U\\([0-9]+\\)?\\'" %)
+                        (match-str 1 %))
+                 magit-buffer-diff-args)
+       (magit-get "diff.context")
+       "3")))
+
+(defun magit-diff-context-p ()
+  (if-let ((arg (seq-find (##string-match "^-U\\([0-9]+\\)$" %)
+                          magit-buffer-diff-args)))
+      (not (equal arg "-U0"))
+    t))
+
+(defun magit-diff-ignore-any-space-p ()
+  (seq-some (##member % magit-buffer-diff-args)
+            '("--ignore-cr-at-eol"
+              "--ignore-space-at-eol"
+              "--ignore-space-change" "-b"
+              "--ignore-all-space" "-w"
+              "--ignore-blank-space")))
+
+(defun magit-diff-toggle-refine-hunk (&optional style)
+  "Turn hunk refinement on or off, or switch refinement method.
+
+If hunk refinement is currently on, then turn off hunk refinement.
+If hunk refinement is off, then turn on immediate hunk refinement.
+
+With a prefix argument, an alternative refinement method comes into
+play.  When using that method, mode hunks are not refined immediately,
+instead each hunk is refined once it is selected, and then stays refined
+until the next refresh of the buffer.  If hunk refinement is currently
+on, then toggle between refining all hunks up front or only once they
+are selected.  If hunk refinement is off, then turn on hunk refinement,
+using the eventual refinement method.
+
+Customize option `magit-diff-refine-hunk' to change the default method."
+  (interactive "P")
+  (setq-local magit-diff-refine-hunk
+              (if style
+                  (if (eq magit-diff-refine-hunk t) 'all t)
+                (if magit-diff-refine-hunk nil 'all)))
+  (magit-diff-update-hunk-refinement))
+
+(defun magit-diff-toggle-fontify-hunk (&optional style)
+  "Turn hunk fontification on or off, or switch fontification method.
+
+If hunk fontification is currently on, then turn off hunk fontification.
+If hunk fontification is off, then turn on immediate hunk fontification.
+
+With a prefix argument, an alternative fontification method comes into
+play.  When using that method, mode hunks are not refined immediately,
+instead each hunk is refined once it is selected, and then stays refined
+until the next refresh of the buffer.  If hunk fontification is currently
+on, then toggle between refining all hunks up front or only once they
+are selected.  If hunk fontification is off, then turn on fontification,
+using the eventual fontification method.
+
+Customize option `magit-diff-fontify-hunk' to change the default method."
+  (interactive "P")
+  (setq-local magit-diff-fontify-hunk
+              (if style
+                  (if (eq magit-diff-fontify-hunk t) 'all t)
+                (if magit-diff-fontify-hunk nil 'all)))
+  (magit-diff--update-hunk-syntax))
+
+;;;; Visit Commands
+;;;;; Dwim Variants
+
+(defun magit-diff-visit-file (&optional other-window)
+  "From a diff, visit the appropriate version of the file at point.
+
+Display the buffer in the selected window.  With a prefix argument,
+OTHER-WINDOW, instead display the buffer in another window.
+
+In the visited file or blob, go to the location corresponding to the
+location in the diff.
+
+If point is on an added or context line, visit the blob corresponding
+to our side (i.e., the new/right side).  If point is on a removed line,
+visit the blob corresponding to their side (i.e., the old/left side).
+
+This applies to diffs of staged and unstaged changes as well.  For
+staged changes the two sides are blobs from the index and the `HEAD'
+commit.  For unstaged changes the two sides are the actual file in
+the worktree and the blob from the index.
+
+To visit the file in the worktree, regardless of what the current diff
+is about, use \
+\\<magit-diff-section-map>\
+\\[magit-diff-visit-worktree-file] \
+(`magit-diff-visit-worktree-file').
+
+In the past \\`<return>' (this command) used to go to the file in the
+worktree, if point is on an added or context line of a diff showing
+staged changes.  Set `magit-diff-visit-prefer-worktree' to t to restore
+that behavior, but note that doing so makes the behavior inconsistent
+and you would give up on the ability to visit the index blob.  If you
+already use \\[magit-diff-visit-worktree-file] to jump to the live \
+file from committed changes,
+it might be better to retrain muscle memory to do the same from staged
+changes.
+
+This command only works when point is inside a diff; elsewhere use
+`magit-find-file'."
+  (interactive "P")
+  (magit-diff-visit-file--internal
+   (and magit-diff-visit-prefer-worktree
+        (memq (magit-diff--dwim) '(staged unstaged)))
+   (and other-window t)))
+
+(defun magit-diff-visit-file-other-window ()
+  "From a diff visit a version of the file at point in another window.
+Like `magit-diff-visit-file' but always display in another window."
+  (interactive)
+  (magit-diff-visit-file--internal
+   (and magit-diff-visit-prefer-worktree
+        (memq (magit-diff--dwim) '(staged unstaged)))
+   #'switch-to-buffer-other-window))
+
+(defun magit-diff-visit-file-other-frame ()
+  "From a diff visit a version of the file at point in another frame.
+Like `magit-diff-visit-file' but always display in another frame."
+  (interactive)
+  (magit-diff-visit-file--internal
+   (and magit-diff-visit-prefer-worktree
+        (memq (magit-diff--dwim) '(staged unstaged)))
+   #'switch-to-buffer-other-frame))
+
+;;;;; Worktree Variants
+
+(defun magit-diff-visit-worktree-file (&optional other-window)
+  "From a diff visit the worktree version of the file at point.
+
+Display the buffer in the selected window.  With a prefix argument,
+OTHER-WINDOW, display the buffer in another window instead.
+
+Visit the worktree version of the appropriate file.  The location
+of point inside the diff determines which file is being visited.
+
+Unlike `magit-diff-visit-file' always visits the \"real\" file in
+the working tree, i.e., the \"current version\" of the file.
+
+In the file-visiting buffer also go to the line that corresponds
+to the line that point is on in the diff.  Lines that were added
+or removed in the working tree, the index and other commits in
+between are automatically accounted for."
+  (interactive "P")
+  (magit-diff-visit-file--internal t (and other-window t)))
+
+(defun magit-diff-visit-worktree-file-other-window ()
+  "From a diff visit the file at point in another window.
+Like `magit-diff-visit-worktree-file' but display in another window."
+  (interactive)
+  (magit-diff-visit-file--internal t #'switch-to-buffer-other-window))
+
+(defun magit-diff-visit-worktree-file-other-frame ()
+  "From a diff visit the file at point in another frame.
+Like `magit-diff-visit-worktree-file' but display in another frame."
+  (interactive)
+  (magit-diff-visit-file--internal t #'switch-to-buffer-other-frame))
+
+;;;;; Internal
+
+(defun magit-diff-visit-file--internal (force-worktree display)
+  "From a diff visit the appropriate version of FILE.
+If FORCE-WORKTREE is non-nil, then visit the worktree version of the
+file, even if the diff is about a committed change.  DISPLAY controls
+how the buffer is displayed.  If nil display in the same window, if
+t display in another window, or if a function, use that to display."
+  (let ((file (or (magit-diff--file)
+                  (user-error "Cannot determine file to visit"))))
+    (if (file-accessible-directory-p file)
+        (magit-diff-visit-directory file display)
+      (pcase-let ((`(,buf ,pos)
+                   (magit-diff-visit-file--noselect force-worktree)))
+        (pcase display
+          ('nil (pop-to-buffer-same-window buf))
+          ('t   (switch-to-buffer-other-window buf))
+          (_    (funcall display buf)))
+        (magit-diff-visit-file--setup buf pos)
+        buf))))
+
+(defun magit-diff-visit-directory (directory &optional other-window)
+  "Visit DIRECTORY in some window.
+Display the buffer in the selected window unless OTHER-WINDOW is
+non-nil.  If DIRECTORY is the top-level directory of the current
+repository, then visit the containing directory using Dired and
+in the Dired buffer put point on DIRECTORY.  Otherwise display
+the Magit-Status buffer for DIRECTORY."
+  (if (equal (magit-toplevel directory)
+             (magit-toplevel))
+      (dired-jump other-window (concat directory "/."))
+    (let ((display-buffer-overriding-action
+           (if other-window
+               '(nil (inhibit-same-window . t))
+             '(display-buffer-same-window))))
+      (magit-status-setup-buffer directory))))
+
+(defun magit-diff-visit-file--setup (buf pos)
+  (with-selected-window (or (get-buffer-window buf) (selected-window))
+    (with-current-buffer buf
+      (when pos
+        (unless (<= (point-min) pos (point-max))
+          (widen))
+        (goto-char pos))
+      (when (and buffer-file-name
+                 (magit-anything-unmerged-p buffer-file-name))
+        (smerge-start-session))
+      (run-hooks 'magit-diff-visit-file-hook))))
+
+(defun magit-diff-visit-file--noselect (&optional goto-file)
+  (pcase-let*
+      ((`(,old ,new)  (magit-diff-visit--sides))
+       (goto-from     (and (not goto-file) (magit-diff-on-removed-line-p)))
+       (goto-file     (or goto-file
+                          (equal magit-buffer-diff-typearg "--no-index")))
+       (`(,rev ,file) (if goto-from old new))
+       (buffer        (magit-find-file-noselect (if goto-file "{worktree}" rev)
+                                                file)))
+    (list buffer
+          (magit-diff-visit--position buffer rev file goto-from goto-file))))
+
+(defun magit-diff-visit--sides ()
+  (pcase-let* (((eieio source value)
+                (magit-diff--file-section))
+               (old-file (or source value))
+               (new-file value)
+               (spec (magit-diff--dwim))
+               (`(,old-rev . ,new-rev)
+                (pcase spec
+                  ((pred stringp)
+                   (magit-split-range spec t))
+                  (`(,(or 'commit 'stash) . ,rev)
+                   (cons (magit-rev-abbrev (concat rev "^"))
+                         (magit--abbrev-if-oid rev)))
+                  ('staged    (cons (magit-rev-abbrev "HEAD") "{index}"))
+                  ('unstaged  (cons (if (magit-anything-staged-p nil old-file)
+                                        "{index}"
+                                      (magit-rev-abbrev "HEAD"))
+                                    "{worktree}"))
+                  ('nil       (cons "{worktree}" "{worktree}"))
+                  ('unmerged  (cons "{worktree}" "{worktree}"))
+                  ('undefined (cons "{worktree}" "{worktree}")) ;--no-index
+                  (_          (error "BUG: Unexpected diff type %s" spec)))))
+    (when (equal magit-buffer-diff-typearg "--no-index")
+      (setq old-file (concat "/" old-file))
+      (setq new-file (concat "/" new-file)))
+    (list (list old-rev old-file)
+          (list new-rev new-file))))
+
+(defun magit-diff-visit--position (buffer rev file goto-from goto-file)
+  (and-let* ((hunk   (magit-diff--hunk-section))
+             (line   (magit-diff-hunk-line   hunk goto-from))
+             (column (magit-diff-hunk-column hunk goto-from)))
+    (with-current-buffer buffer
+      (save-restriction
+        (widen)
+        (goto-char (point-min))
+        (forward-line
+         (1- (pcase rev
+               ((guard (not goto-file)) line)
+               ("{worktree}" line)
+               ("{index}" (magit-diff-visit--offset line file))
+               (_ (magit-diff-visit--offset line file rev)))))
+        (move-to-column column)
+        (point)))))
+
+(defun magit-diff-hunk-line (section goto-from)
+  (save-excursion
+    (goto-char (line-beginning-position))
+    (with-slots (content combined from-ranges from-range to-range) section
+      (when (or from-range to-range)
+        (when (< (point) content)
+          (goto-char content)
+          (re-search-forward "^[-+]"))
+        (+ (car (if goto-from from-range to-range))
+           (let ((prefix (if combined (length from-ranges) 1))
+                 (target (point))
+                 (offset 0))
+             (goto-char content)
+             (while (< (point) target)
+               (unless (string-search
+                        (if goto-from "+" "-")
+                        (buffer-substring (point) (+ (point) prefix)))
+                 (incf offset))
+               (forward-line))
+             offset))))))
+
+(defun magit-diff-hunk-column (section goto-from)
+  (if (or (< (magit-point)
+             (oref section content))
+          (and (not goto-from)
+               (= (char-after (line-beginning-position)) ?-)))
+      0
+    (max 0 (- (+ (current-column) 2)
+              (length (oref section value))))))
+
+(defun magit-diff-visit--offset (line file &rest args)
+  (let ((offset 0))
+    (with-temp-buffer
+      (save-excursion
+        (magit-with-toplevel
+          (cond ((stringp file)
+                 (magit-git-insert "diff" args "--" file))
+                ((magit-git-version< "2.50"))
+                ((apply #'magit--diff-pair (current-buffer) file)))))
+      (catch 'found
+        (while (re-search-forward
+                "^@@ -\\([0-9]+\\),\\([0-9]+\\) \\+\\([0-9]+\\),\\([0-9]+\\) @@.*\n"
+                nil t)
+          (let ((from-beg (string-to-number (match-str 1)))
+                (from-len (string-to-number (match-str 2)))
+                (  to-len (string-to-number (match-str 4))))
+            (if (<= from-beg line)
+                (if (< (+ from-beg from-len) line)
+                    (incf offset (- to-len from-len))
+                  (let ((rest (- line from-beg)))
+                    (while (> rest 0)
+                      (pcase (char-after)
+                        (?\s               (decf rest))
+                        (?-  (decf offset) (decf rest))
+                        (?+  (incf offset)))
+                      (forward-line))))
+              (throw 'found nil))))))
+    (+ line offset)))
+
+(defun magit--diff-pair (buffer a b &optional file)
+  (with-temp-buffer
+    (insert (format ":100644 100644 %s %s M\0%s\0" a b (or file "blob")))
+    (call-process-region (point-min) (point-max)
+                         (magit-git-executable) nil buffer nil
+                         "diff-pairs" "-z")))
+
+;;;;; Modified
+
+(defun magit-diff--modified-defuns ()
+  (let (value eof)
+    (save-excursion
+      (goto-char (point-min))
+      (while (re-search-forward "^diff --git" nil t)
+        (save-excursion
+          (setq eof (and (re-search-forward "^diff --git" nil t)
+                         (match-beginning 0))))
+        (let (-rev +rev)
+          (while (progn (forward-line) (looking-at "^[a-z]"))
+            (when (looking-at "^index \\([^.]+\\)\\.\\.\\([^ ]+\\)")
+              (setq -rev (magit-rev-parse (match-string 1)))
+              (setq +rev (magit-rev-parse (match-string 2)))))
+          (pcase-let*
+              ((-file (and (looking-at "^--- a/\\(.+\\)")
+                           (prog1 (match-str 1) (forward-line))))
+               (+file (and (looking-at "^\\+\\+\\+ b/\\(.+\\)")
+                           (prog1 (match-str 1) (forward-line))))
+               (`(,-lines ,+lines) (magit-diff--modified-lines eof))
+               (-defuns (and -lines (magit-diff--modified-defuns-1
+                                     -rev -file -lines)))
+               (+defuns (and +lines (magit-diff--modified-defuns-1
+                                     +rev +file +lines))))
+            (if (equal -file +file)
+                (when$ (nconc +defuns -defuns)
+                  (push (cons +file (delete-dups $)) value))
+              (when -defuns (push (cons -file -defuns) value))
+              (when +defuns (push (cons +file +defuns) value)))))))
+    (nreverse value)))
+
+(defun magit-diff--modified-defuns-1 (rev file lines)
+  (with-current-buffer (magit-find-file-noselect rev file t t)
+    (save-excursion
+      (save-restriction
+        (widen)
+        (let (defuns)
+          (while-let ((line (pop lines)))
+            (goto-char (point-min))
+            (forward-line line)
+            (when-let ((def (which-function)))
+              (cl-pushnew def defuns :test #'equal)
+              (when-let ((end (condition-case nil (end-of-defun)
+                                (:success (line-number-at-pos))
+                                (error nil))))
+                (while (and lines (> end (car lines)))
+                  (pop lines)))))
+          (nreverse defuns))))))
+
+(defun magit-diff--modified-lines (bound)
+  (let (-lines +lines)
+    (while (re-search-forward
+            "^@@ -\\([0-9]+\\),[^ ]+ \\+\\([0-9]+\\),[^ ]+ @@.*\n" bound t)
+      (let ((-line (string-to-number (match-string 1)))
+            (+line (string-to-number (match-string 2))))
+        (while (and (not (eobp))
+                    (memq (char-after) '(?\s ?- ?+)))
+          (pcase (char-after)
+            (?\s (incf -line)
+                 (incf +line))
+            (?-  (push (incf -line) -lines))
+            (?+  (push (incf +line) +lines)))
+          (forward-line))))
+    (list (nreverse -lines)
+          (nreverse +lines))))
+
+;;;; Scroll Commands
+
+(defun magit-diff-show-or-scroll-up ()
+  "Update the commit or diff buffer for the thing at point.
+
+Either show the commit or stash at point in the appropriate
+buffer, or if that buffer is already being displayed in the
+current frame and contains information about that commit or
+stash, then instead scroll the buffer up.  If there is no
+commit or stash at point, then prompt for a commit."
+  (interactive)
+  (magit-diff-show-or-scroll #'scroll-up))
+
+(defun magit-diff-show-or-scroll-down ()
+  "Update the commit or diff buffer for the thing at point.
+
+Either show the commit or stash at point in the appropriate
+buffer, or if that buffer is already being displayed in the
+current frame and contains information about that commit or
+stash, then instead scroll the buffer down.  If there is no
+commit or stash at point, then prompt for a commit."
+  (interactive)
+  (magit-diff-show-or-scroll #'scroll-down))
+
+(defun magit-diff-show-or-scroll (fn)
+  (let (rev cmd buf)
+    (cond
+      ((and (bound-and-true-p magit-blame-mode)
+            (fboundp 'magit-current-blame-chunk))
+       (setq rev (oref (magit-current-blame-chunk) orig-rev))
+       (setq cmd #'magit-show-commit)
+       (setq buf (magit-get-mode-buffer 'magit-revision-mode)))
+      ((derived-mode-p 'git-rebase-mode)
+       (with-slots (action-type target)
+           (git-rebase-current-line)
+         (if (not (eq action-type 'commit))
+             (user-error "No commit on this line")
+           (setq rev target)
+           (setq cmd #'magit-show-commit)
+           (setq buf (magit-get-mode-buffer 'magit-revision-mode)))))
+      ((magit-section-case
+         (branch
+          (setq rev (magit-ref-maybe-qualify (oref it value)))
+          (setq cmd #'magit-show-commit)
+          (setq buf (magit-get-mode-buffer 'magit-revision-mode)))
+         (commit
+          (setq rev (oref it value))
+          (setq cmd #'magit-show-commit)
+          (setq buf (magit-get-mode-buffer 'magit-revision-mode)))
+         (tag
+          (setq rev (magit-commit-oid (oref it value)))
+          (setq cmd #'magit-show-commit)
+          (setq buf (magit-get-mode-buffer 'magit-revision-mode)))
+         (stash
+          (setq rev (oref it value))
+          (setq cmd #'magit-stash-show)
+          (setq buf (magit-get-mode-buffer 'magit-stash-mode))))))
+    (cond-let*
+      ((not rev)
+       (call-interactively #'magit-show-commit))
+      ([_ buf]
+       [win (get-buffer-window buf)]
+       [_ (equal (buffer-local-value 'magit-buffer-revision buf) rev)]
+       [_ (equal (buffer-local-value 'magit-buffer-revision-oid buf)
+                 (magit-rev-parse rev))]
+       (with-selected-window win
+         (condition-case nil
+             (funcall fn)
+           (error
+            (pcase-exhaustive fn
+              ('scroll-up   (goto-char (point-min)))
+              ('scroll-down (goto-char (point-max))))))))
+      [[magit-display-buffer-noselect t]]
+      ((eq cmd #'magit-show-commit)
+       (apply #'magit-show-commit rev (magit-show-commit--arguments)))
+      ((funcall cmd rev)))))
+
+;;;; Section Commands
+
+(defun magit-section-cycle-diffs ()
+  "Cycle visibility of diff-related sections in the current buffer."
+  (interactive)
+  (cond-let*
+    [[sections
+      (cond ((derived-mode-p 'magit-status-mode)
+             (mapcan (lambda (section)
+                       (and section
+                            (progn
+                              (when (oref section hidden)
+                                (magit-section-show section))
+                              (copy-sequence (oref section children)))))
+                     (list (magit-get-section '((staged)   (status)))
+                           (magit-get-section '((unstaged) (status))))))
+            ((derived-mode-p 'magit-diff-mode)
+             (seq-filter #'magit-file-section-p
+                         (oref magit-root-section children))))]]
+    ((not sections))
+    ((seq-some (##oref % hidden) sections)
+     (dolist (s sections)
+       (magit-section-show s)
+       (magit-section-hide-children s)))
+    [[children (mapcan (##copy-sequence (oref % children)) sections)]]
+    ((and (seq-some (##oref % hidden)   children)
+          (seq-some (##oref % children) children))
+     (mapc #'magit-section-show-headings sections))
+    ((seq-some #'magit-section-hidden-body children)
+     (mapc #'magit-section-show-children sections))
+    ((mapc #'magit-section-hide sections))))
+
+;;;; Jump Commands
+
+(transient-define-prefix magit-revision-jump (&optional menu)
+  "In a Magit-Revision buffer, jump to a section.
+Show a menu to choose a section, unless point is on a file
+heading, or with a prefix argument, in which case behave
+like 'magit-jump-to-diffstat-or-diff'."
+  [["Jump to"
+    ("h" magit-jump-to-revision-headers)
+    ("m" magit-jump-to-revision-message)
+    ("n" magit-jump-to-revision-notes)
+    ("s" magit-jump-to-revision-diffstat)
+    ("d" magit-jump-to-revision-diff)]
+   ["Jump using"
+    ("j" "Imenu" imenu)]]
+  (interactive (list (or (not (magit-section-match 'file))
+                         current-prefix-arg)))
+  (if menu
+      (transient-setup 'magit-revision-jump)
+    (magit-jump-to-diffstat-or-diff)))
+
+(magit-define-section-jumper magit-jump-to-revision-headers
+  "Headings" headers nil magit-insert-revision-headers)
+
+(magit-define-section-jumper magit-jump-to-revision-message
+  "Message" commit-message nil magit-insert-revision-message)
+
+(magit-define-section-jumper magit-jump-to-revision-notes
+  "Notes" notes nil magit-insert-revision-notes)
+
+(transient-define-suffix magit-jump-to-revision-diffstat (&optional expand)
+  :description "Diffstat"
+  :inapt-if-not (##cl-find-if (##eq (oref % type) 'diffstat)
+                              (oref magit-root-section children))
+  (interactive "P")
+  (cond-let
+    ([section (magit-get-section
+               (append (magit-section-case
+                         (file `((file . ,(oref it value)) (diffstat)))
+                         (hunk `((file . ,(magit-section-parent-value it))
+                                 (diffstat)))
+                         (t '((diffstat))))
+                       (magit-section-ident magit-root-section)))]
+     (goto-char (oref section start))
+     (when expand
+       (with-local-quit (magit-section-show section))
+       (recenter 0)))
+    ((message (format "No diff sections found")))))
+
+(transient-define-suffix magit-jump-to-revision-diff (&optional expand)
+  :description "Diff"
+  :inapt-if-not (##cl-find-if (##eq (oref % type) 'file)
+                              (oref magit-root-section children))
+  (interactive "P")
+  (cond-let
+    ([section (cl-find-if (##eq (oref % type) 'file)
+                          (oref magit-root-section children))]
+     (goto-char (oref section start))
+     (when expand
+       (with-local-quit (magit-section-show section))
+       (recenter 0)))
+    ((message (format "No diff sections found")))))
+
+(defun magit-jump-to-diffstat-or-diff (&optional expand)
+  "Jump to the diffstat or diff.
+When point is on a file inside the diffstat section, then jump
+to the respective diff section, otherwise jump to the diffstat
+section or a child thereof."
+  (interactive)
+  (cond-let
+    ([section (magit-get-section
+               (append (magit-section-case
+                         ([file diffstat] `((file . ,(oref it value))))
+                         (file `((file . ,(oref it value)) (diffstat)))
+                         (hunk `((file . ,(magit-section-parent-value it))
+                                 (diffstat)))
+                         (t '((diffstat))))
+                       (magit-section-ident magit-root-section)))]
+     (goto-char (oref section start))
+     (when expand
+       (with-local-quit (magit-section-show section))
+       (recenter 0)))
+    ((user-error "No diffstat in this buffer"))))
+
+;;; Diff Mode
+
+(defvar-keymap magit-diff-mode-map
+  :doc "Keymap for `magit-diff-mode'."
+  :parent magit-mode-map
+  "C-c C-d" #'magit-diff-while-committing
+  "C-c C-b" #'magit-go-backward
+  "C-c C-f" #'magit-go-forward
+  "SPC"     #'scroll-up
+  "S-SPC"   #'scroll-down
+  "DEL"     #'scroll-down
+  "j"       #'magit-jump-to-diffstat-or-diff
+  "<remap> <write-file>" #'magit-patch-save)
+
+(define-derived-mode magit-diff-mode magit-mode "Magit Diff"
+  "Mode for looking at a Git diff.
+
+This mode is documented in info node `(magit)Diff Buffer'.
+
+\\<magit-mode-map>\
+Type \\[magit-refresh] to refresh the current buffer.
+Type \\[magit-section-toggle] to expand or hide the section at point.
+Type \\[magit-visit-thing] to visit the hunk or file at point.
+
+Staging and applying changes is documented in info node
+`(magit)Staging and Unstaging' and info node `(magit)Applying'.
+
+\\<magit-hunk-section-map>Type \
+\\[magit-apply] to apply the change at point, \
+\\[magit-stage] to stage,
+\\[magit-unstage] to unstage, \
+\\[magit-discard] to discard, or \
+\\[magit-reverse] to reverse it.
+
+\\{magit-diff-mode-map}"
+  :interactive nil
+  :group 'magit-diff
+  (magit-hack-dir-local-variables)
+  (setq magit--imenu-item-types 'file))
+
+(put 'magit-diff-mode 'magit-diff-default-arguments
+     '("--stat" "--no-ext-diff"))
+
+(defun magit-diff-setup-buffer ( range typearg args files
+                                 &optional type locked)
+  (require 'magit)
+  (magit-setup-buffer #'magit-diff-mode locked
+    (magit-buffer-diff-range range)
+    (magit-buffer-diff-typearg typearg)
+    (magit-buffer-diff-type type)
+    (magit-buffer-diff-args args)
+    (magit-buffer-diff-files files)
+    (magit-buffer-diff-files-suspended nil)))
+
+(defun magit-diff-refresh-buffer ()
+  "Refresh the current `magit-diff-mode' buffer."
+  (magit-set-header-line-format
+   (if (equal magit-buffer-diff-typearg "--no-index")
+       (apply #'format "Differences between %s and %s" magit-buffer-diff-files)
+     (concat (cond (magit-buffer-diff-range
+                    (cond-let
+                      ((string-match-p "\\(\\.\\.\\|\\^-\\)"
+                                       magit-buffer-diff-range)
+                       (format "Changes in %s" magit-buffer-diff-range))
+                      [[msg "Changes from %s to %s"]
+                       [end (if (equal magit-buffer-diff-typearg "--cached")
+                                "index"
+                              "working tree")]]
+                      ((member "-R" magit-buffer-diff-args)
+                       (format msg end magit-buffer-diff-range))
+                      ((format msg magit-buffer-diff-range end))))
+                   ((equal magit-buffer-diff-typearg "--cached")
+                    "Staged changes")
+                   ((and (magit-repository-local-get 'this-commit-command)
+                         (not (magit-anything-staged-p)))
+                    "Uncommitting changes")
+                   ("Unstaged changes"))
+             (pcase (length magit-buffer-diff-files)
+               (0)
+               (1 (concat " in file " (car magit-buffer-diff-files)))
+               (_ (concat " in files "
+                          (string-join magit-buffer-diff-files ", ")))))))
+  (setq magit-buffer-diff-range-oids
+        (and magit-buffer-diff-range
+             (magit-hash-range magit-buffer-diff-range)))
+  (magit-insert-section (diffbuf)
+    (magit-run-section-hook 'magit-diff-sections-hook)))
+
+(cl-defmethod magit-buffer-value (&context (major-mode magit-diff-mode))
+  (nconc (cond
+           (magit-buffer-diff-range
+            (delq nil (list magit-buffer-diff-range magit-buffer-diff-typearg)))
+           ((equal magit-buffer-diff-typearg "--cached")
+            (list 'staged))
+           ((list 'unstaged magit-buffer-diff-typearg)))
+         (and magit-buffer-diff-files (cons "--" magit-buffer-diff-files))))
+
+(cl-defmethod magit-menu-common-value ((_section magit-diff-section))
+  (magit-diff-scope))
+
+(defvar-keymap magit-diff-section-map
+  :doc "Keymap for diff sections.
+The classes `magit-file-section' and `magit-hunk-section' derive
+from the abstract `magit-diff-section' class.  Accordingly this
+keymap is the parent of their keymaps."
+  "C-j"            #'magit-diff-visit-worktree-file
+  "C-<return>"     #'magit-diff-visit-worktree-file
+  "C-x 4 <return>" #'magit-diff-visit-file-other-window
+  "C-x 5 <return>" #'magit-diff-visit-file-other-frame
+  "&"              #'magit-do-async-shell-command
+  "C"              #'magit-commit-add-log
+  "C-x a"          #'magit-add-change-log-entry
+  "C-x 4 a"        #'magit-add-change-log-entry-other-window
+  "C-c C-t"        #'magit-diff-trace-definition
+  "C-c C-e"        #'magit-diff-edit-hunk-commit
+  "<remap> <magit-file-rename>"      #'magit-file-rename
+  "<remap> <magit-file-untrack>"     #'magit-file-untrack
+  "<remap> <magit-visit-thing>"      #'magit-diff-visit-file
+  "<remap> <magit-revert-no-commit>" #'magit-reverse
+  "<remap> <magit-delete-thing>"     #'magit-discard
+  "<remap> <magit-unstage-files>"    #'magit-unstage
+  "<remap> <magit-stage-files>"      #'magit-stage
+  "<remap> <magit-cherry-apply>"     #'magit-apply
+  "<8>" (magit-menu-item "Rename file" #'magit-file-rename
+                         '(:enable (eq (magit-diff-scope) 'file)))
+  "<7>" (magit-menu-item "Untrack %x" #'magit-file-untrack)
+  "<6>" (magit-menu-item "Visit file" #'magit-diff-visit-file
+                         '(:enable (memq (magit-diff-scope) '(file files))))
+  "<5>" (magit-menu-item "Reverse %x" #'magit-reverse
+                         '(:enable (not (memq (magit-diff-type)
+                                              '(untracked unstaged)))))
+  "<4>" (magit-menu-item "Discard %x" #'magit-discard
+                         '(:enable (not (memq (magit-diff-type)
+                                              '(committed undefined)))))
+  "<3>" (magit-menu-item "Unstage %x" #'magit-unstage
+                         '(:enable (eq (magit-diff-type) 'staged)))
+  "<2>" (magit-menu-item "Stage %x"   #'magit-stage
+                         '(:enable (eq (magit-diff-type) 'unstaged)))
+  "<1>" (magit-menu-item "Apply %x" #'magit-apply
+                         '(:enable (not (memq (magit-diff-type)
+                                              '(unstaged staged))))))
+
+(defvar-keymap magit-file-section-map
+  ;; Even though this derived map doesn't add any bindings by default,
+  ;; it is quite possible that some users would want to add their own.
+  :doc "Keymap for `file' sections."
+  :parent magit-diff-section-base-map)
+
+(defvar-keymap magit-hunk-section-smerge-map
+  :doc "Keymap bound to `smerge-command-prefix' in `magit-hunk-section-map'."
+  "RET" #'magit-smerge-keep-current
+  "a"   #'magit-smerge-keep-all
+  "u"   #'magit-smerge-keep-upper
+  "b"   #'magit-smerge-keep-base
+  "l"   #'magit-smerge-keep-lower)
+
+(defvar magit-hunk-section-map
+  (let ((map (make-sparse-keymap))
+        (key (key-description smerge-command-prefix)))
+    (when (key-valid-p key)
+      (keymap-set map key magit-hunk-section-smerge-map))
+    (set-keymap-parent map magit-diff-section-base-map)
+    map)
+  "Keymap for `hunk' sections.")
+
+;;; Diff Insert
+
+(defvar magit-diff--reset-non-color-moved
+  (list
+   "-c" "color.diff.context=normal"
+   "-c" "color.diff.plain=normal" ; historical synonym for context
+   "-c" "color.diff.meta=normal"
+   "-c" "color.diff.frag=normal"
+   "-c" "color.diff.func=normal"
+   "-c" "color.diff.old=normal"
+   "-c" "color.diff.new=normal"
+   "-c" "color.diff.commit=normal"
+   "-c" "color.diff.whitespace=normal"
+   ;; "git-range-diff" does not support "--color-moved", so we don't
+   ;; need to reset contextDimmed, oldDimmed, newDimmed, contextBold,
+   ;; oldBold, and newBold.
+   ))
+
+(defun magit-insert-diff ()
+  "Insert the diff into this `magit-diff-mode' buffer."
+  (magit--insert-diff t
+    "diff" magit-buffer-diff-range "-p" "--no-prefix"
+    (and (member "--stat" magit-buffer-diff-args) "--numstat")
+    magit-buffer-diff-typearg
+    magit-buffer-diff-args "--"
+    magit-buffer-diff-files))
+
+(defun magit--insert-diff (keep-error &rest args)
+  (declare (indent 1))
+  (pcase-let ((`(,cmd . ,args)
+               (flatten-tree args))
+              (magit-git-global-arguments
+               (remove "--literal-pathspecs" magit-git-global-arguments)))
+    ;; We need to generate diffs with "--ita-visible-in-index" so that
+    ;; `magit-stage' can work with intent-to-add files (see #4026).
+    ;; When "-C" is used don't add "--ita-visible-in-index" because
+    ;; that renders the former ineffective (see ##5629).
+    (unless (or (equal cmd "merge-tree")
+                (seq-some (##string-prefix-p "-C" %) args))
+      (push "--ita-visible-in-index" args))
+    (setq args (magit-diff--maybe-add-stat-arguments args))
+    (when (any (##string-prefix-p "--color-moved" %) args)
+      (push "--color=always" args)
+      (setq magit-git-global-arguments
+            (append magit-diff--reset-non-color-moved
+                    magit-git-global-arguments)))
+    (magit--git-wash #'magit-diff-wash-diffs
+        (if (member "--no-index" args)
+            'wash-anyway
+          (or keep-error t))
+      cmd args)))
+
+(defun magit-diff--maybe-add-stat-arguments (args)
+  (if (member "--stat" args)
+      (append (if (functionp magit-diff-extra-stat-arguments)
+                  (funcall magit-diff-extra-stat-arguments)
+                magit-diff-extra-stat-arguments)
+              args)
+    args))
+
+;;; Diff Wash
+
+(defconst magit-diff-conflict-headline-re
+  (concat "^" (regexp-opt
+               ;; Defined in merge-tree.c in this order.
+               '("merged"
+                 "added in remote"
+                 "added in both"
+                 "added in local"
+                 "removed in both"
+                 "changed in both"
+                 "removed in local"
+                 "removed in remote"))))
+
+(defconst magit-diff-headline-re
+  (concat "^\\(@@@?\\|diff\\|Submodule\\|"
+          "\\* Unmerged path\\|"
+          (substring magit-diff-conflict-headline-re 1)
+          "\\)"))
+
+(defconst magit-diff-statline-re
+  (concat "^ ?"
+          "\\(.*\\)"     ; file
+          "\\( +| +\\)"  ; separator
+          "\\([0-9]+\\|Bin\\(?: +[0-9]+ -> [0-9]+ bytes\\)?$\\) ?"
+          "\\(\\+*\\)"   ; add
+          "\\(-*\\)$"))  ; del
+
+(defun magit-diff-use-window-width-as-stat-width ()
+  "Use the `window-width' as the value of \"--stat-width\"."
+  (and$ (get-buffer-window (current-buffer) 'visible)
+        (list (format "--stat-width=%d" (window-width $)))))
+
+(defun magit-diff-wash-diffs (args &optional limit)
+  (run-hooks 'magit-diff-wash-diffs-hook)
+  (when (member "--show-signature" args)
+    (magit-diff-wash-signature magit-buffer-revision-oid))
+  (when (any (##string-prefix-p "--color-moved" %) args)
+    (require 'ansi-color)
+    (ansi-color-apply-on-region (point-min) (point-max)))
+  (when (member "--stat" args)
+    (magit-diff-wash-diffstat))
+  (when (re-search-forward magit-diff-headline-re limit t)
+    (goto-char (line-beginning-position))
+    (magit-wash-sequence (##magit-diff-wash-diff args))
+    (insert ?\n)))
+
+(defun magit-diff-wash-signature (object)
+  (cond
+    ((looking-at "^No signature")
+     (delete-line))
+    ((looking-at "^gpg: ")
+     (let (title end)
+       (save-excursion
+         (while (looking-at "^gpg: ")
+           (cond
+             ((looking-at "^gpg: Good signature from")
+              (setq title (magit--propertize-face
+                           (buffer-substring (point) (line-end-position))
+                           'magit-signature-good)))
+             ((looking-at "^gpg: Can't check signature")
+              (setq title (magit--propertize-face
+                           (buffer-substring (point) (line-end-position))
+                           '(italic bold)))))
+           (forward-line))
+         (setq end (point-marker)))
+       (magit-insert-section (signature object title)
+         (when title
+           (magit-insert-heading title))
+         (goto-char end)
+         (set-marker end nil)
+         (insert "\n"))))))
+
+(defun magit-diff-wash-diffstat ()
+  (let (heading (beg (point)))
+    (when (re-search-forward "^ ?\\([0-9]+ +files? change[^\n]*\n\\)" nil t)
+      (setq heading (match-str 1))
+      (magit-delete-match)
+      (goto-char beg)
+      (magit-insert-section (diffstat)
+        (magit-insert-heading
+          (propertize heading 'font-lock-face 'magit-diff-file-heading))
+        (let (files)
+          (while (looking-at "^[-0-9]+\t[-0-9]+\t\\(.+\\)$")
+            (push (magit-decode-git-path
+                   (cond-let
+                     [[file (match-str 1)]]
+                     ((string-match "{.* => \\(.*\\)}" file)
+                      (replace-match (match-str 1 file) nil t file))
+                     ((string-match " => " file)
+                      (substring file (match-end 0)))
+                     (file)))
+                  files)
+            (magit-delete-line))
+          (setq files (nreverse files))
+          (while (looking-at magit-diff-statline-re)
+            (magit-bind-match-strings (file sep cnt add del) nil
+              (magit-delete-line)
+              (when (string-match " +$" file)
+                (setq sep (concat (match-str 0 file) sep))
+                (setq file (substring file 0 (match-beginning 0))))
+              (let ((le (length file)) ld)
+                (setq file (magit-decode-git-path file))
+                (setq ld (length file))
+                (when (> le ld)
+                  (setq sep (concat (make-string (- le ld) ?\s) sep))))
+              (magit-insert-section (file (pop files))
+                (insert (magit-format-file 'stat file 'magit-filename))
+                (insert sep cnt " ")
+                (when add
+                  (insert (propertize add 'font-lock-face
+                                      'magit-diffstat-added)))
+                (when del
+                  (insert (propertize del 'font-lock-face
+                                      'magit-diffstat-removed)))
+                (insert "\n")))))
+        (if (looking-at "^$") (forward-line) (insert "\n"))))))
+
+(defun magit-diff-wash-diff (args)
+  (cond
+    ((looking-at "^Submodule")
+     (magit-diff-wash-submodule))
+    ((looking-at "^\\* Unmerged path \\(.*\\)")
+     (let ((file (magit-decode-git-path (match-str 1))))
+       (magit-delete-line)
+       (unless (and (derived-mode-p 'magit-status-mode)
+                    (not (member "--cached" args)))
+         (magit-insert-section (file file)
+           (insert (propertize
+                    (format "unmerged   %s%s" file
+                            (pcase (cddr (car (magit-file-status file)))
+                              ('(?D ?D) " (both deleted)")
+                              ('(?D ?U) " (deleted by us)")
+                              ('(?U ?D) " (deleted by them)")
+                              ('(?A ?A) " (both added)")
+                              ('(?A ?U) " (added by us)")
+                              ('(?U ?A) " (added by them)")
+                              ('(?U ?U) "")))
+                    'font-lock-face 'magit-diff-file-heading))
+           (insert ?\n))))
+     t)
+    ((looking-at magit-diff-conflict-headline-re)
+     (let ((long-status (match-str 0))
+           (status "BUG")
+           file orig base)
+       (cond ((equal long-status "merged")
+              (setq status long-status)
+              (setq long-status nil))
+             ((setq status
+                    (pcase-exhaustive long-status
+                      ("added in remote"   "new file")
+                      ("added in both"     "new file")
+                      ("added in local"    "new file")
+                      ("removed in both"   "removed")
+                      ("changed in both"   "changed")
+                      ("removed in local"  "removed")
+                      ("removed in remote" "removed")))))
+       (magit-delete-line)
+       (while (looking-at
+               "^  \\([^ ]+\\) +[0-9]\\{6\\} \\([a-z0-9]\\{40,\\}\\) \\(.+\\)$")
+         (magit-bind-match-strings (side _blob name) nil
+           (pcase side
+             ("result" (setq file name))
+             ("our"    (setq orig name))
+             ("their"  (setq file name))
+             ("base"   (setq base name))))
+         (magit-delete-line))
+       (when orig (setq orig (magit-decode-git-path orig)))
+       (when file (setq file (magit-decode-git-path file)))
+       (magit-diff-insert-file-section
+        (or file base) orig status nil nil nil nil long-status)))
+    ;; The files on this line may be ambiguous due to whitespace.
+    ;; That's okay. We can get their names from subsequent headers.
+    ((looking-at "^diff --\
+\\(?:\\(?1:git\\) \\(?:\\(?2:.+?\\) \\2\\)?\
+\\|\\(?:cc\\|combined\\) \\(?3:.+\\)\\)")
+     (let ((status (cond ((equal (match-str 1) "git")           "modified")
+                         ((derived-mode-p 'magit-revision-mode) "resolved")
+                         (t                                     "unmerged")))
+           (orig nil)
+           (file (or (match-str 2) (match-str 3)))
+           (header (list (buffer-substring-no-properties
+                          (line-beginning-position) (1+ (line-end-position)))))
+           (modes nil)
+           (rename nil)
+           (binary nil))
+       (magit-delete-line)
+       (while (not (or (eobp)
+                       (looking-at magit-diff-headline-re)
+                       (looking-at magit-log-heading-re)))
+         (cond
+           ((looking-at "old mode \\(?:[^\n]+\\)\nnew mode \\(?:[^\n]+\\)\n")
+            (setq modes (match-str 0)))
+           ((looking-at "deleted file .+\n")
+            (setq status "deleted"))
+           ((looking-at "new file .+\n")
+            (setq status "new file"))
+           ((looking-at "rename from \\(.+\\)\nrename to \\(.+\\)\n")
+            (setq rename (match-str 0))
+            (setq orig (match-str 1))
+            (setq file (match-str 2))
+            (setq status "renamed"))
+           ((looking-at "copy from \\(.+\\)\ncopy to \\(.+\\)\n")
+            (setq orig (match-str 1))
+            (setq file (match-str 2))
+            (setq status "copied"))
+           ((looking-at "similarity index .+\n"))
+           ((looking-at "dissimilarity index .+\n"))
+           ((looking-at "index .+\n"))
+           ((looking-at "--- \\(.+?\\)\t?\n")
+            (unless (equal (match-str 1) "/dev/null")
+              (setq orig (match-str 1))))
+           ((looking-at "\\+\\+\\+ \\(.+?\\)\t?\n")
+            (unless (equal (match-str 1) "/dev/null")
+              (setq file (match-str 1))))
+           ((looking-at "Binary files .+ and .+ differ\n")
+            (setq binary t))
+           ((looking-at "Binary files differ\n")
+            (setq binary t))
+           ;; TODO Use all combined diff extended headers.
+           ((looking-at "mode .+\n"))
+           ((error "BUG: Unknown extended header: %S"
+                   (buffer-substring (point) (line-end-position)))))
+         ;; These headers are treated as some sort of special hunk.
+         (unless (or (string-prefix-p "old mode" (match-str 0))
+                     (string-prefix-p "rename"   (match-str 0)))
+           (push (match-str 0) header))
+         (magit-delete-match))
+       (when orig
+         (setq orig (magit-decode-git-path orig)))
+       (setq file (magit-decode-git-path file))
+       (setq header (nreverse header))
+       ;; KLUDGE Before v2.54, "git log" ignored "--no-prefix"
+       ;; when "-L" is used.
+       (when (and (magit-git-version< "2.54")
+                  (derived-mode-p 'magit-log-mode)
+                  (seq-some (##string-prefix-p "-L" %)
+                            magit-buffer-log-args))
+         (when orig
+           (setq orig (substring orig 2)))
+         (setq file (substring file 2))
+         (setq header (list (save-excursion
+                              (string-match "diff [^ ]+" (car header))
+                              (format "%s %s %s\n"
+                                      (match-str 0 (car header))
+                                      (or orig file)
+                                      (or file orig)))
+                            (format "--- %s\n" (or orig "/dev/null"))
+                            (format "+++ %s\n" (or file "/dev/null")))))
+       (setq header (string-join header))
+       (magit-diff-insert-file-section
+        file orig status modes rename header binary nil)))))
+
+(defun magit-diff-insert-file-section
+    (file orig status modes rename header binary long-status)
+  (magit-insert-section
+      ( file file
+        (or (equal status "deleted") (derived-mode-p 'magit-status-mode))
+        :source (and (not (equal orig file)) orig)
+        :header header
+        :binary binary)
+    (magit-insert-heading
+      (magit-format-file 'diff file 'magit-diff-file-heading status
+                         (and (not (equal orig file)) orig))
+      (cond ((and binary long-status)
+             (format " (%s, binary)" long-status))
+            ((or binary long-status)
+             (format " (%s)" (if binary "binary" long-status)))))
+    (when modes
+      (magit-insert-section (hunk '(chmod))
+        (magit-insert-heading (magit--propertize-face modes 'default))))
+    (when rename
+      (magit-insert-section (hunk '(rename))
+        (magit-insert-heading (magit--propertize-face rename 'default))))
+    (magit-wash-sequence #'magit-diff-wash-hunk)))
+
+(defun magit-format-file (kind file face &optional status orig)
+  (funcall magit-format-file-function kind file face status orig))
+
+(defun magit-format-file-default (_kind file face &optional status orig)
+  "Show only the Git status and the filename."
+  (propertize (concat (and status (format "%-11s" status))
+                      (if orig (format "%s -> %s" orig file) file))
+              'font-lock-face face))
+
+(defun magit-format-file-all-the-icons (kind file face &optional status orig)
+  "Show the status, filename and icon (using the `all-the-icons' package).
+You have to explicitly install the `all-the-icons' package, else this
+function errors."
+  (magit--get-file-icon kind file face status orig
+                        'all-the-icons-icon-for-file
+                        'all-the-icons-icon-for-dir
+                        'all-the-icons-dir-is-submodule))
+
+(defun magit-format-file-nerd-icons (kind file face &optional status orig)
+  "Show the status, filename and icon (using the `nerd-icons' package).
+You have to explicitly install the `nerd-icons' package, else this
+function errors."
+  (magit--get-file-icon kind file face status orig
+                        'nerd-icons-icon-for-file
+                        'nerd-icons-icon-for-dir
+                        'nerd-icons-dir-is-submodule))
+
+(defun magit--get-file-icon ( kind file face status orig
+                              icon-for-file icon-for-dir dir-is-submodule)
+  (cl-flet ((icon (if (or (eq kind 'module) (string-suffix-p "/" file))
+                      icon-for-dir
+                    icon-for-file)))
+    (cl-letf (((symbol-function dir-is-submodule)
+               (if (eq kind 'module)
+                   (lambda (_) t)
+                 (symbol-function dir-is-submodule))))
+      (if orig
+          (format (magit--propertize-face "%s%s %s -> %s %s" face)
+                  (if status (format "%-11s" status) "")
+                  (icon orig) orig
+                  (icon file) file)
+        (format (magit--propertize-face "%s%s %s" face)
+                (if status (format "%-11s" status) "")
+                (icon file)
+                file)))))
+
+(defun magit-diff-wash-submodule ()
+  ;; See `show_submodule_summary' in submodule.c and "this" commit.
+  (when (looking-at "^Submodule \\([^ ]+\\)")
+    (let ((module (match-str 1))
+          untracked modified)
+      (when (looking-at "^Submodule [^ ]+ contains untracked content$")
+        (magit-delete-line)
+        (setq untracked t))
+      (when (looking-at "^Submodule [^ ]+ contains modified content$")
+        (magit-delete-line)
+        (setq modified t))
+      (cond
+        ((and (looking-at "^Submodule \\([^ ]+\\) \\([^ :]+\\)\\( (rewind)\\)?:$")
+              (equal (match-str 1) module))
+         (magit-bind-match-strings (_module range rewind) nil
+           (magit-delete-line)
+           (while (looking-at "^  \\([<>]\\) \\(.*\\)$")
+             (magit-delete-line))
+           (when rewind
+             (setq range (replace-regexp-in-string "[^.]\\(\\.\\.\\)[^.]"
+                                                   "..." range t t 1)))
+           (magit-insert-section (module module t)
+             (magit-insert-heading
+               (magit-format-file 'module module 'magit-diff-file-heading
+                                  "modified")
+               " ("
+               (cond (rewind "rewind")
+                     ((string-search "..." range) "non-ff")
+                     ("new commits"))
+               (and (or modified untracked)
+                    (concat ", "
+                            (and modified "modified")
+                            (and modified untracked " and ")
+                            (and untracked "untracked")
+                            " content"))
+               ")")
+             (magit-insert-section-body
+               (let ((default-directory
+                      (file-name-as-directory
+                       (expand-file-name module (magit-toplevel)))))
+                 (magit-git-wash (apply-partially #'magit-log-wash-log 'module)
+                   "log" "--oneline" "--left-right" range)
+                 (delete-char -1))))))
+        ((and (looking-at "^Submodule \\([^ ]+\\) \\([^ ]+\\) (\\([^)]+\\))$")
+              (equal (match-str 1) module))
+         (magit-bind-match-strings (_module _range msg) nil
+           (magit-delete-line)
+           (magit-insert-section (module module)
+             (magit-insert-heading
+               (magit-format-file 'module module 'magit-diff-file-heading
+                                  "submodule")
+               " (" msg ")"))))
+        (t
+         (magit-insert-section (module module)
+           (magit-insert-heading
+             (magit-format-file 'module module 'magit-diff-file-heading
+                                "modified")
+             " ("
+             (and modified "modified")
+             (and modified untracked " and ")
+             (and untracked "untracked")
+             " content)")))))))
+
+(defun magit-diff-wash-hunk ()
+  (when (looking-at "^@\\{2,\\} \\(.+?\\) @\\{2,\\}\\(?: \\(.*\\)\\)?")
+    (let* ((heading  (match-str 0))
+           (ranges   (mapcar
+                      (lambda (str)
+                        (let ((range
+                               (mapcar #'string-to-number
+                                       (split-string (substring str 1) ","))))
+                          ;; A single line is +1 rather than +1,1.
+                          (if (length= range 1)
+                              (nconc range (list 1))
+                            range)))
+                      (split-string (match-str 1))))
+           (about    (match-str 2))
+           (combined (length= ranges 3))
+           (value    (cons about ranges)))
+      (magit-delete-line)
+      (magit-insert-section
+          ( hunk value nil
+            :combined combined
+            :from-range (if combined (butlast ranges) (car ranges))
+            :to-range (car (last ranges))
+            :about about)
+        (magit-insert-heading
+          (propertize (concat heading "\n")
+                      'font-lock-face 'magit-diff-hunk-heading))
+        (while (not (or (eobp) (looking-at "^[^-+\s\\]")))
+          (forward-line))))
+    t))
+
+(defun magit-diff-expansion-threshold (section)
+  "Keep new diff sections collapsed if washing takes too long."
+  (and (magit-file-section-p section)
+       (> (float-time (time-since magit--refresh-start-time))
+          magit-diff-expansion-threshold)
+       'hide))
+
+(add-hook 'magit-section-set-visibility-hook #'magit-diff-expansion-threshold)
+
+;;; Revision Mode
+
+(defvar-keymap magit-revision-mode-map
+  :doc "Keymap for `magit-revision-mode'."
+  :parent magit-diff-mode-map
+  "j" #'magit-revision-jump)
+
+(define-derived-mode magit-revision-mode magit-diff-mode "Magit Rev"
+  "Mode for looking at a Git commit.
+
+This mode is documented in info node `(magit)Revision Buffer'.
+
+\\<magit-mode-map>\
+Type \\[magit-refresh] to refresh the current buffer.
+Type \\[magit-section-toggle] to expand or hide the section at point.
+Type \\[magit-visit-thing] to visit the hunk or file at point.
+
+Staging and applying changes is documented in info node
+`(magit)Staging and Unstaging' and info node `(magit)Applying'.
+
+\\<magit-hunk-section-map>Type \
+\\[magit-apply] to apply the change at point, \
+\\[magit-stage] to stage,
+\\[magit-unstage] to unstage, \
+\\[magit-discard] to discard, or \
+\\[magit-reverse] to reverse it.
+
+\\{magit-revision-mode-map}"
+  :interactive nil
+  :group 'magit-revision
+  (magit-hack-dir-local-variables))
+
+(put 'magit-revision-mode 'magit-diff-default-arguments
+     '("--stat" "--no-ext-diff"))
+
+(defun magit-revision-setup-buffer (rev args files)
+  (magit-setup-buffer #'magit-revision-mode
+      magit-revision-use-dedicated-buffers
+    (magit-buffer-revision rev)
+    (magit-buffer-diff-range (format "%s^..%s" rev rev))
+    (magit-buffer-diff-type 'committed)
+    (magit-buffer-diff-args args)
+    (magit-buffer-diff-files files)
+    (magit-buffer-diff-files-suspended nil)))
+
+(defun magit-revision-refresh-buffer ()
+  (setq magit-buffer-revision-oid (magit-commit-oid magit-buffer-revision))
+  (magit-set-header-line-format
+   (concat (magit-object-type magit-buffer-revision)
+           " "  magit-buffer-revision
+           (pcase (length magit-buffer-diff-files)
+             (0)
+             (1 (concat " limited to file " (car magit-buffer-diff-files)))
+             (_ (concat " limited to files "
+                        (string-join magit-buffer-diff-files ", "))))))
+  (magit-insert-section (commitbuf)
+    (magit-run-section-hook 'magit-revision-sections-hook)))
+
+(cl-defmethod magit-buffer-value (&context (major-mode magit-revision-mode))
+  (cons magit-buffer-revision magit-buffer-diff-files))
+
+;;; Revision Sections
+
+(defun magit-insert-revision-diff ()
+  "Insert the diff into this `magit-revision-mode' buffer."
+  (magit--insert-diff t
+    "show" "-p" "--format=" "--no-prefix"
+    (and (member "--stat" magit-buffer-diff-args) "--numstat")
+    magit-buffer-diff-args
+    (magit--rev-dereference magit-buffer-revision)
+    "--" magit-buffer-diff-files))
+
+(defun magit-insert-revision-tag ()
+  "Insert tag message and headers into a revision buffer.
+This function only inserts anything when `magit-show-commit' is
+called with a tag as argument, when that is called with a commit
+or a ref which is not a branch, then it inserts nothing."
+  (when (magit-annotated-tag-p magit-buffer-revision)
+    (magit-insert-section (taginfo)
+      (let ((beg (point)))
+        ;; "git verify-tag -v" would output what we need, but the gpg
+        ;; output is send to stderr and we have no control over the
+        ;; order in which stdout and stderr are inserted, which would
+        ;; make parsing hard.  We are forced to use "git cat-file tag"
+        ;; instead, which inserts the signature instead of verifying
+        ;; it.  We remove that later and then insert the verification
+        ;; output using "git verify-tag" (without the "-v").
+        (magit-git-insert "cat-file" "tag" magit-buffer-revision)
+        (goto-char beg)
+        (forward-line 3)
+        (delete-region beg (point)))
+      (looking-at "^tagger \\([^<]+\\) <\\([^>]+\\)")
+      (let ((heading (format "Tagger: %s <%s>"
+                             (match-str 1)
+                             (match-str 2))))
+        (magit-delete-line)
+        (magit-insert-heading
+          (propertize heading 'font-lock-face
+                      'magit-section-secondary-heading)))
+      (forward-line)
+      (magit-insert-section
+          ( message nil nil
+            :heading-highlight-face 'magit-diff-revision-summary-highlight)
+        (let ((beg (point)))
+          (forward-line)
+          (magit--add-face-text-property
+           beg (point) 'magit-diff-revision-summary))
+        (magit-insert-heading)
+        (if (re-search-forward "-----BEGIN PGP SIGNATURE-----" nil t)
+            (goto-char (match-beginning 0))
+          (goto-char (point-max)))
+        (insert ?\n))
+      (cond ((re-search-forward "-----BEGIN PGP SIGNATURE-----" nil t)
+             (let ((beg (match-beginning 0)))
+               (re-search-forward "-----END PGP SIGNATURE-----\n")
+               (delete-region beg (point)))
+             (save-excursion
+               (magit-process-git t "verify-tag" magit-buffer-revision))
+             (magit-diff-wash-signature magit-buffer-revision))
+            ((goto-char (point-max))))
+      (insert ?\n))))
+
+(defvar-keymap magit-commit-message-section-map
+  :doc "Keymap for `commit-message' sections."
+  "<remap> <magit-visit-thing>"  #'magit-show-commit
+  "<1>" (magit-menu-item "Visit %t" #'magit-show-commit
+                         '(:enable (magit-thing-at-point 'git-revision t))))
+
+(defun magit-insert-revision-message ()
+  "Insert the commit message into a revision buffer."
+  (magit-insert-section
+      ( commit-message nil nil
+        :heading-highlight-face 'magit-diff-revision-summary-highlight)
+    (cond-let*
+      ([rev magit-buffer-revision]
+       [msg (with-temp-buffer
+              (save-excursion (magit-rev-insert-format "%B" rev))
+              (magit-revision--wash-message))]
+       (save-excursion (insert msg))
+       (magit-revision--wash-message-hashes)
+       (save-excursion
+         (magit--add-face-text-property (point)
+                                        (progn (forward-line) (point))
+                                        'magit-diff-revision-summary
+                                        t nil t)
+         (magit-insert-heading))
+       (goto-char (point-max)))
+      ((insert "(no message)\n")))))
+
+(defun magit-insert-revision-notes ()
+  "Insert commit notes into a revision buffer."
+  (let ((default (or (magit-get "core.notesRef") "refs/notes/commits")))
+    (dolist (ref (magit-list-active-notes-refs))
+      (when-let* ((rev magit-buffer-revision)
+                  (msg (with-temp-buffer
+                         (save-excursion
+                           (magit-git-insert "-c" (concat "core.notesRef=" ref)
+                                             "notes" "show" rev))
+                         (magit-revision--wash-message))))
+        (magit-insert-section
+            ( notes ref (not (equal ref default))
+              :heading-highlight-face 'magit-diff-hunk-heading-highlight)
+          (save-excursion (insert msg))
+          (magit-revision--wash-message-hashes)
+          (save-excursion
+            (end-of-line)
+            (insert (format " (%s)"
+                            (propertize (if (string-prefix-p "refs/notes/" ref)
+                                            (substring ref 11)
+                                          ref)
+                                        'font-lock-face 'magit-refname))))
+          (magit--add-face-text-property (point)
+                                         (progn (forward-line) (point))
+                                         'magit-diff-revision-summary
+                                         t nil t)
+          (magit-insert-heading)
+          (goto-char (point-max))
+          (insert ?\n))))))
+
+(defun magit-revision--wash-message ()
+  (let ((major-mode 'git-commit-mode))
+    (hack-dir-local-variables)
+    (hack-local-variables-apply))
+  (unless (memq git-commit-major-mode '(nil text-mode))
+    (funcall git-commit-major-mode)
+    (font-lock-ensure))
+  (when (> (point-max) (point-min))
+    (save-excursion
+      (while (search-forward "\r\n" nil t) ; Remove trailing CRs.
+        (delete-region (match-beginning 0) (1+ (match-beginning 0)))))
+    (when magit-revision-fill-summary-line
+      (let ((fill-column (min magit-revision-fill-summary-line
+                              (window-width (get-buffer-window nil t)))))
+        (fill-region (point) (line-end-position))))
+    (run-hook-wrapped 'magit-revision-wash-message-hook
+                      (lambda (fn) (prog1 nil (save-excursion (funcall fn)))))
+    (buffer-string)))
+
+(defun magit-highlight-squash-markers ()
+  "Highlight \"squash!\" and similar markers."
+  (when (looking-at "\\(?:squash!\\|fixup!\\|amend!\\)")
+    (magit--add-face-text-property (match-beginning 0) (match-end 0)
+                                   'magit-keyword-squash)))
+
+(defun magit-highlight-bracket-keywords ()
+  "Highlight text between brackets."
+  (while (re-search-forward "\\[[^][]*]" nil t)
+    (put-text-property (match-beginning 0)
+                       (match-end 0)
+                       'font-lock-face 'magit-keyword)))
+
+(defun magit-revision--wash-message-hashes ()
+  (when magit-revision-use-hash-sections
+    (save-excursion
+      ;; Start after beg to prevent a (commit text) section from
+      ;; starting at the same point as the (commit-message)
+      ;; section.
+      (while (not (eobp))
+        (re-search-forward "\\_<" nil 'move)
+        (let ((beg (point)))
+          (re-search-forward "\\_>" nil t)
+          (when (> (point) beg)
+            (let ((text (buffer-substring-no-properties beg (point))))
+              (when (pcase magit-revision-use-hash-sections
+                      ('quickest ; false negatives and positives
+                       (and (>= (length text) 7)
+                            (string-match-p "[0-9]" text)
+                            (string-match-p "[a-z]" text)))
+                      ('quicker  ; false negatives (number-less hashes)
+                       (and (>= (length text) 7)
+                            (string-match-p "[0-9]" text)
+                            (magit-commit-p text)))
+                      ('quick    ; false negatives (short hashes)
+                       (and (>= (length text) 7)
+                            (magit-commit-p text)))
+                      ('slow
+                       (magit-commit-p text)))
+                (put-text-property beg (point)
+                                   'font-lock-face 'magit-hash)
+                (let ((end (point)))
+                  (goto-char beg)
+                  (magit-insert-section (commit text)
+                    (goto-char end)))))))))))
+
+(defun magit-insert-revision-headers ()
+  "Insert headers about the commit into a revision buffer."
+  (magit-insert-section (headers)
+    (magit-insert-heading nil
+      (and$ (magit-rev-format "%D" magit-buffer-revision "--decorate=full")
+            (concat (magit-format-ref-labels $) " "))
+      (propertize
+       (magit-rev-parse (magit--rev-dereference magit-buffer-revision))
+       'font-lock-face 'magit-hash))
+    (let ((beg (point)))
+      (magit-rev-insert-format magit-revision-headers-format
+                               magit-buffer-revision)
+      (magit-insert-revision-gravatars magit-buffer-revision beg))
+    (when magit-revision-insert-related-refs
+      (when (magit-revision-insert-related-refs-display-p 'parents)
+        (dolist (parent (magit-commit-parents magit-buffer-revision))
+          (magit-insert-section (commit parent)
+            (let ((line (magit-rev-format "%h %s" parent)))
+              (string-match "^\\([^ ]+\\) \\(.*\\)" line)
+              (magit-bind-match-strings (hash msg) line
+                (insert "Parent:     ")
+                (insert (propertize hash 'font-lock-face 'magit-hash))
+                (insert " " msg "\n"))))))
+      (when (magit-revision-insert-related-refs-display-p 'merged)
+        (magit--insert-related-refs
+         magit-buffer-revision "--merged" "Merged"
+         (eq magit-revision-insert-related-refs 'all)))
+      (when (magit-revision-insert-related-refs-display-p 'contained)
+        (magit--insert-related-refs
+         magit-buffer-revision "--contains" "Contained"
+         (memq magit-revision-insert-related-refs '(all mixed))))
+      (when-let ((_(magit-revision-insert-related-refs-display-p 'follows))
+                 (follows (magit-get-current-tag magit-buffer-revision t)))
+        (let ((tag (car  follows))
+              (cnt (cadr follows)))
+          (magit-insert-section (tag tag)
+            (insert
+             (format "Follows:    %s (%s)\n"
+                     (propertize tag 'font-lock-face 'magit-tag)
+                     (propertize (number-to-string cnt)
+                                 'font-lock-face 'magit-branch-local))))))
+      (when-let ((_(magit-revision-insert-related-refs-display-p 'precedes))
+                 (precedes (magit-get-next-tag magit-buffer-revision t)))
+        (let ((tag (car  precedes))
+              (cnt (cadr precedes)))
+          (magit-insert-section (tag tag)
+            (insert (format "Precedes:   %s (%s)\n"
+                            (propertize tag 'font-lock-face 'magit-tag)
+                            (propertize (number-to-string cnt)
+                                        'font-lock-face 'magit-tag))))))
+      (insert ?\n))))
+
+(defun magit-revision-insert-related-refs-display-p (sym)
+  "Whether to display related branches of type SYM.
+Refer to user option `magit-revision-insert-related-refs-display-alist'."
+  (if-let ((elt (assq sym magit-revision-insert-related-refs-display-alist)))
+      (cdr elt)
+    t))
+
+(defun magit--insert-related-refs (rev arg title remote)
+  (when-let ((refs (magit-list-related-branches arg rev (and remote "-a"))))
+    (magit-insert-section (related-refs)
+      (insert title ":" (make-string (- 10 (length title)) ?\s))
+      (dolist (branch refs)
+        (if (<= (+ (current-column) 1 (length branch))
+                (window-width))
+            (insert ?\s)
+          (insert ?\n (make-string 12 ?\s)))
+        (insert (propertize branch 'font-lock-face
+                            (if (string-prefix-p "remotes/" branch)
+                                'magit-branch-remote
+                              'magit-branch-local))))
+      (insert ?\n))))
+
+(defun magit-insert-revision-gravatars (rev beg)
+  (when (and magit-revision-show-gravatars
+             (window-system))
+    (require 'gravatar)
+    (pcase-let ((`(,author . ,committer)
+                 (pcase magit-revision-show-gravatars
+                   ('t '("^Author:     " . "^Commit:     "))
+                   ('author '("^Author:     " . nil))
+                   ('committer '(nil . "^Commit:     "))
+                   (_ magit-revision-show-gravatars))))
+      (when-let ((email (and author (magit-rev-format "%aE" rev))))
+        (magit-insert-revision-gravatar beg rev email author))
+      (when-let ((email (and committer (magit-rev-format "%cE" rev))))
+        (magit-insert-revision-gravatar beg rev email committer)))))
+
+(defun magit-insert-revision-gravatar (beg rev email regexp)
+  (save-excursion
+    (goto-char beg)
+    (when-let ((_(re-search-forward regexp nil t))
+               (window (get-buffer-window)))
+      (let* ((column   (length (match-str 0)))
+             (font-obj (query-font (font-at (point) window)))
+             (size     (* 2 (+ (aref font-obj 4)
+                               (aref font-obj 5))))
+             (align-to (+ column
+                          (ceiling (/ size (aref font-obj 7) 1.0))
+                          1))
+             (gravatar-size (- size 2)))
+        (ignore-errors ; service may be unreachable
+          (gravatar-retrieve email #'magit-insert-revision-gravatar-cb
+                             (list gravatar-size rev
+                                   (point-marker)
+                                   align-to column)))))))
+
+(defun magit-insert-revision-gravatar-cb (image size rev marker align-to column)
+  (cond-let
+    ((eq image 'error))
+    ([buffer (marker-buffer marker)]
+     (with-current-buffer buffer
+       (save-excursion
+         (goto-char marker)
+         ;; The buffer might display another revision by now or
+         ;; it might have been refreshed, in which case another
+         ;; process might already have inserted the image.
+         (when (and (equal rev magit-buffer-revision)
+                    (not (eq (car-safe
+                              (car-safe
+                               (get-text-property (point) 'display)))
+                             'image)))
+           (setf (image-property image :ascent) 'center)
+           (setf (image-property image :relief) 1)
+           (setf (image-property image :scale)  1)
+           (setf (image-property image :height) size)
+           (let ((top (list image '(slice 0.0 0.0 1.0 0.5)))
+                 (bot (list image '(slice 0.0 0.5 1.0 1.0)))
+                 (align `((space :align-to ,align-to))))
+             (let ((inhibit-read-only t))
+               (insert (propertize " " 'display top))
+               (insert (propertize " " 'display align))
+               (forward-line)
+               (forward-char column)
+               (insert (propertize " " 'display bot))
+               (insert (propertize " " 'display align))))))))))
+
+;;; Merge-Preview Mode
+
+(define-derived-mode magit-merge-preview-mode magit-diff-mode "Magit Merge"
+  "Mode for previewing a merge."
+  :interactive nil
+  :group 'magit-diff
+  (magit-hack-dir-local-variables))
+
+(put 'magit-merge-preview-mode 'magit-diff-default-arguments
+     '("--no-ext-diff"))
+
+(defun magit-merge-preview-setup-buffer (rev)
+  (magit-setup-buffer #'magit-merge-preview-mode nil
+    (magit-buffer-revision rev)
+    (magit-buffer-diff-range (format "%s^..%s" rev rev))))
+
+(defun magit-merge-preview-refresh-buffer ()
+  (let* ((branch (magit-get-current-branch))
+         (head (or branch (magit-rev-verify "HEAD"))))
+    (magit-set-header-line-format (format "Preview merge of %s into %s"
+                                          magit-buffer-revision
+                                          (or branch "HEAD")))
+    (magit-insert-section (diffbuf)
+      (magit--insert-diff t
+        "merge-tree" (magit-merge-base head magit-buffer-revision)
+        head magit-buffer-revision))))
+
+(cl-defmethod magit-buffer-value (&context (major-mode magit-merge-preview-mode))
+  magit-buffer-revision)
+
+;;; Hunk Section
+
+(defun magit-hunk-set-window-start (section)
+  "When SECTION is a `hunk', ensure that its beginning is visible.
+It the SECTION has a different type, then do nothing."
+  (when (magit-hunk-section-p section)
+    (magit-section-set-window-start section)))
+
+(add-hook 'magit-section-movement-hook #'magit-hunk-set-window-start)
+
+(cl-defmethod magit-section-get-relative-position ((_section magit-hunk-section))
+  (nconc (cl-call-next-method)
+         (and (region-active-p)
+              (progn
+                (goto-char (line-beginning-position))
+                (when  (looking-at "^[-+]") (forward-line))
+                (while (looking-at "^[ @]") (forward-line))
+                (let ((beg (magit-point)))
+                  (list (cond
+                          ((looking-at "^[-+]")
+                           (forward-line)
+                           (while (looking-at "^[-+]") (forward-line))
+                           (while (looking-at "^ ")    (forward-line))
+                           (forward-line -1)
+                           (regexp-quote (buffer-substring-no-properties
+                                          beg (line-end-position))))
+                          (t))))))))
+
+(cl-defmethod magit-section-goto-successor ((section magit-hunk-section)
+                                            line char &optional arg)
+  (or (magit-section-goto-successor--same section line char)
+      (and-let ((parent (magit-get-section
+                         (magit-section-ident
+                          (oref section parent)))))
+        (let* ((children (oref parent children))
+               (siblings (magit-section-siblings section 'prev))
+               (previous (nth (length siblings) children)))
+          (if (not arg)
+              (when-let ((sibling (or previous (car (last children)))))
+                (magit-section-goto sibling)
+                t)
+            (when previous
+              (magit-section-goto previous))
+            (if (and (stringp arg)
+                     (re-search-forward arg (oref parent end) t))
+                (goto-char (match-beginning 0))
+              (goto-char (oref (car (last children)) end))
+              (forward-line -1)
+              (while (looking-at "^ ")    (forward-line -1))
+              (while (looking-at "^[-+]") (forward-line -1))
+              (forward-line)))))
+      (magit-section-goto-successor--related section)))
+
+;;; Diff Sections
+
+(defvar-keymap magit-unstaged-section-map
+  :doc "Keymap for the `unstaged' section."
+  "<remap> <magit-visit-thing>"  #'magit-diff-unstaged
+  "<remap> <magit-stage-files>"  #'magit-stage
+  "<remap> <magit-delete-thing>" #'magit-discard
+  "<3>" (magit-menu-item "Discard all" #'magit-discard)
+  "<2>" (magit-menu-item "Stage all"   #'magit-stage)
+  "<1>" (magit-menu-item "Visit diff"  #'magit-diff-unstaged))
+
+(magit-define-section-jumper magit-jump-to-unstaged
+  "Unstaged changes" unstaged nil magit-insert-unstaged-changes)
+
+(defun magit-insert-unstaged-changes ()
+  "Insert section showing unstaged changes."
+  (magit-insert-section (unstaged)
+    (magit-insert-heading t "Unstaged changes")
+    (magit--insert-diff nil
+      "diff" magit-buffer-diff-args "--no-prefix"
+      "--" magit-buffer-diff-files)))
+
+(defvar-keymap magit-staged-section-map
+  :doc "Keymap for the `staged' section."
+  "<remap> <magit-revert-no-commit>" #'magit-reverse
+  "<remap> <magit-delete-thing>"     #'magit-discard
+  "<remap> <magit-unstage-files>"    #'magit-unstage
+  "<remap> <magit-visit-thing>"      #'magit-diff-staged
+  "<4>" (magit-menu-item "Reverse all" #'magit-reverse)
+  "<3>" (magit-menu-item "Discard all" #'magit-discard)
+  "<2>" (magit-menu-item "Unstage all" #'magit-unstage)
+  "<1>" (magit-menu-item "Visit diff"  #'magit-diff-staged))
+
+(magit-define-section-jumper magit-jump-to-staged
+  "Staged changes" staged nil magit-insert-staged-changes)
+
+(defun magit-insert-staged-changes ()
+  "Insert section showing staged changes."
+  ;; Avoid listing all files as deleted when visiting a bare repo.
+  (unless (magit-bare-repo-p)
+    (magit-insert-section (staged)
+      (magit-insert-heading t "Staged changes")
+      (magit--insert-diff nil
+        "diff" "--cached" magit-buffer-diff-args "--no-prefix"
+        "--" magit-buffer-diff-files))))
+
+;;; Diff Information
+
+(defun magit-diff-type (&optional section)
+  "Return the diff type of SECTION.
+
+The returned type is one of the symbols `staged', `unstaged',
+`committed', or `undefined'.  This type serves a similar purpose
+as the general type common to all sections (which is stored in
+the `type' slot of the corresponding `magit-section' struct) but
+takes additional information into account.  When the SECTION
+isn't related to diffs and the buffer containing it also isn't
+a diff-only buffer, then return nil.
+
+Currently the type can also be one of `tracked' and `untracked'
+but these values are not handled explicitly everywhere they
+should be and a possible fix could be to just return nil here.
+
+The section has to be a `diff' or `hunk' section, or a section
+whose children are of type `diff'.  If optional SECTION is nil,
+return the diff type for the current section.  In buffers whose
+major mode is `magit-diff-mode' SECTION is ignored and the type
+is determined using other means.  In `magit-revision-mode'
+buffers the type is always `committed'.
+
+Do not confuse this with `magit-diff-scope' (which see)."
+  (when-let ((section (or section (magit-current-section))))
+    (cond ((derived-mode-p 'magit-revision-mode 'magit-stash-mode) 'committed)
+          ((derived-mode-p 'magit-diff-mode)
+           (cond
+             (magit-buffer-diff-type)
+             ((equal magit-buffer-diff-typearg "--no-index")
+              'undefined)
+             ((not magit-buffer-diff-range)
+              'undefined)
+             ((string-search "." magit-buffer-diff-range)
+              'committed)
+             ((magit-rev-head-p magit-buffer-diff-range)
+              (if (equal magit-buffer-diff-typearg "--cached")
+                  'staged
+                'unstaged))
+             ('committed)))
+          ((derived-mode-p 'magit-status-mode)
+           (pcase (oref section type)
+             ((and type (or 'staged 'unstaged 'tracked 'untracked))
+              type)
+             ((or 'file 'module)
+              (let* ((parent (oref section parent))
+                     (type   (oref parent type)))
+                (if (memq type '(file module))
+                    (magit-diff-type parent)
+                  type)))
+             ('hunk (thread-first section
+                      (oref parent)
+                      (oref parent)
+                      (oref type)))))
+          ((derived-mode-p 'magit-log-mode)
+           (if (or (and (magit-section-match 'commit section)
+                        (oref section children))
+                   (magit-section-match [* file commit] section))
+               'committed
+             'undefined))
+          ('undefined))))
+
+(cl-defun magit-diff-scope (&optional (section nil ssection) strict)
+  "Return the diff scope of SECTION or the selected section(s).
+
+A diff's \"scope\" describes what part of a diff is selected, it is
+a symbol, one of `region', `hunk', `hunks', `file', `files', or
+`list'.  Do not confuse this with the diff \"type\", as returned by
+`magit-diff-type'.
+
+If optional SECTION is non-nil, then return the scope of that,
+ignoring the sections selected by the region.  Otherwise return
+the scope of the current section, or if the region is active and
+selects a valid group of diff related sections, the type of these
+sections, i.e., `hunks' or `files'.  If SECTION, or if that is nil
+the current section, is a `hunk' section; and the region region
+starts and ends inside the body of a that section, then the type
+is `region'.  If the region is empty after a mouse click, then
+`hunk' is returned instead of `region'.
+
+If optional STRICT is non-nil, then return nil if the diff type of
+the section at point is `untracked' or the section at point is not
+actually a `diff' but a `diffstat' section."
+  (let ((siblings (and (not ssection) (magit-region-sections nil t))))
+    (setq section (or section (car siblings) (magit-current-section)))
+    (when (and section
+               (or (not strict)
+                   (and (not (eq (magit-diff-type section) 'untracked))
+                        (not (eq (and$ (oref section parent)
+                                       (oref $ type))
+                                 'diffstat)))))
+      (pcase (list (oref section type)
+                   (and siblings t)
+                   (magit-diff-use-hunk-region-p)
+                   ssection)
+        (`(hunk   nil   t  ,_)
+         (if (magit-section-internal-region-p section) 'region 'hunk))
+        ('(hunk     t   t nil) 'hunks)
+        (`(hunk    ,_  ,_  ,_) 'hunk)
+        ('(file     t   t nil) 'files)
+        (`(file    ,_  ,_  ,_) 'file)
+        ('(module   t   t nil) 'files)
+        (`(module  ,_  ,_  ,_) 'file)
+        (`(,(or 'staged 'unstaged 'untracked) nil ,_ ,_) 'list)))))
+
+(defun magit-diff-use-hunk-region-p ()
+  (and (region-active-p)
+       ;; TODO implement this from first principals
+       ;; currently it's trial-and-error
+       (not (and (or (eq this-command #'mouse-drag-region)
+                     (eq last-command #'mouse-drag-region)
+                     ;; When another window was previously
+                     ;; selected then the last-command is
+                     ;; some byte-code function.
+                     (byte-code-function-p last-command))
+                 (eq (region-end) (region-beginning))))))
+
+(defun magit-diff--hunk-section ()
+  (and-let* ((section (magit-current-section))
+             (scope (magit-diff-scope section)))
+    ;; Currently the `hunk' type is also abused for file
+    ;; mode changes, which we are not interested in here.
+    (cl-flet ((first-hunk (file-section)
+                (seq-find (##not (equal (oref % value) '(chmod)))
+                          (oref file-section children))))
+      (pcase scope
+        ('hunk section)
+        ('file (first-hunk section))
+        ('list (and$ (car (oref section children))
+                     (first-hunk $)))
+        ('module nil)))))
+
+(defun magit-diff--file-section ()
+  (and-let* ((section (magit-current-section))
+             (scope (magit-diff-scope section)))
+    (pcase scope
+      ('hunk (oref section parent))
+      ('file section)
+      ('list (car (oref section children)))
+      ('module section))))
+
+(defun magit-diff--file ()
+  (and-let* ((file-section (magit-diff--file-section))
+             (file (or (and (magit-section-match 'hunk)
+                            (magit-diff-on-removed-line-p)
+                            (oref file-section source))
+                       (oref file-section value))))
+    (if (equal magit-buffer-diff-typearg "--no-index")
+        (concat "/" file)
+      (expand-file-name file (magit-toplevel)))))
+
+;;; Hunk Paint
+;;;; Paint
+
+(cl-defmethod magit-section-paint ((section magit-hunk-section) highlight)
+  (unless magit-diff-highlight-hunk-body
+    (setq highlight nil))
+  (let ((end (oref section end))
+        (merging (looking-at "@@@"))
+        (diff-type (magit-diff-type))
+        (sign-face-side nil)
+        (line-face-side nil)
+        (tab-width (magit-diff-tab-width
+                    (magit-section-parent-value section))))
+    (forward-line)
+    (while (< (point) end)
+      (let ((bol (point))
+            (eol (line-end-position))
+            (sign-face nil)
+            (line-face nil))
+        (when (and magit-diff-hide-trailing-cr-characters
+                   (char-equal ?\r (char-before eol)))
+          (put-text-property (1- eol) eol 'invisible t))
+        (cond
+          ((looking-at "^\\+\\+?\\([<=|>]\\)\\{7\\}")
+           (setq line-face
+                 (pcase (match-str 1)
+                   ("<" 'magit-diff-our-heading)
+                   ("|" 'magit-diff-base-heading)
+                   ("=" 'magit-diff-their-heading)
+                   (">" 'magit-diff-their-heading)))
+           (setq sign-face-side
+                 (pcase (match-str 1)
+                   ("<" 'magit-diff-our-indicator)
+                   ("|" 'magit-diff-base-indicator)
+                   ("=" 'magit-diff-their-indicator)
+                   (">" nil)))
+           (setq line-face-side
+                 (pcase (list (match-str 1) highlight)
+                   ('("<" nil) 'magit-diff-our)
+                   ('("<"   t) 'magit-diff-our-highlight)
+                   ('("|" nil) 'magit-diff-base)
+                   ('("|"   t) 'magit-diff-base-highlight)
+                   ('("=" nil) 'magit-diff-their)
+                   ('("="   t) 'magit-diff-their-highlight)
+                   ;; `(">" ,_) results in bogus warning.
+                   ('(">" nil) nil)
+                   ('(">"   t) nil))))
+          ((looking-at (if merging "^\\(\\+\\| \\+\\)" "^\\+"))
+           (magit-diff-paint-tab merging tab-width)
+           (magit-diff-paint-whitespace merging 'added diff-type)
+           (cond (line-face-side
+                  (setq sign-face sign-face-side)
+                  (setq line-face line-face-side))
+                 (t
+                  (setq sign-face 'magit-diff-added-indicator)
+                  (setq line-face (if highlight
+                                      'magit-diff-added-highlight
+                                    'magit-diff-added)))))
+          ((looking-at (if merging "^\\(-\\| -\\)" "^-"))
+           (magit-diff-paint-tab merging tab-width)
+           (magit-diff-paint-whitespace merging 'removed diff-type)
+           (setq sign-face 'magit-diff-removed-indicator)
+           (setq line-face (if highlight
+                               'magit-diff-removed-highlight
+                             'magit-diff-removed)))
+          (t
+           (magit-diff-paint-tab merging tab-width)
+           (magit-diff-paint-whitespace merging 'context diff-type)
+           (setq line-face (if highlight
+                               'magit-diff-context-highlight
+                             'magit-diff-context))))
+        (put-text-property bol (1+ eol) 'font-lock-face line-face)
+        (when (and sign-face magit-diff-use-indicator-faces)
+          (magit--add-face-text-property
+           bol (+ bol (if merging 2 1)) sign-face)))
+      (forward-line)))
+  (unless (magit--meta-hunk-p section)
+    (when (eq magit-diff-fontify-hunk 'all)
+      (magit-diff--update-hunk-syntax section))
+    (when (eq magit-diff-refine-hunk 'all)
+      (magit-diff-update-hunk-refinement section)))
+  (oset section painted (if highlight 'highlight 'plain)))
+
+;;;; Whitespace
+
+(defvar magit-diff--tab-width-cache nil)
+
+(defun magit-diff-tab-width (file)
+  (cond-let
+    ((not magit-diff-adjust-tab-width)
+     tab-width)
+    [[file (expand-file-name file)]]
+    ((and$ (find-buffer-visiting file)
+           (setf (alist-get file magit-diff--tab-width-cache nil nil #'equal)
+                 (buffer-local-value 'tab-width $))))
+    ((and$ (assoc file magit-diff--tab-width-cache)
+           (or (cdr $) tab-width)))
+    ((or (eq magit-diff-adjust-tab-width 'always)
+         (and (numberp magit-diff-adjust-tab-width)
+              (>= magit-diff-adjust-tab-width
+                  (nth 7 (file-attributes file)))))
+     (let* ((buf (find-file-noselect file))
+            (val (buffer-local-value 'tab-width buf)))
+       (kill-buffer buf)
+       (setf (alist-get file magit-diff--tab-width-cache nil nil #'equal) val)))
+    ((prog1 tab-width
+       (setf (alist-get file magit-diff--tab-width-cache nil nil #'equal)
+             nil))))) ; The buffer is too large.  Don't check size again.
+
+(defun magit-diff-paint-tab (merging width)
+  (save-excursion
+    (forward-char (if merging 2 1))
+    (while (= (char-after) ?\t)
+      (put-text-property (point) (1+ (point))
+                         'display (list (list 'space :width width)))
+      (forward-char))))
+
+(defun magit-diff-paint-whitespace (merging line-type diff-type)
+  (when (and magit-diff-paint-whitespace
+             (or (not (memq magit-diff-paint-whitespace '(uncommitted status)))
+                 (memq diff-type '(staged unstaged)))
+             (cl-case line-type
+               (added   t)
+               (removed (memq magit-diff-paint-whitespace-lines '(all both)))
+               (context (memq magit-diff-paint-whitespace-lines '(all)))))
+    (let ((prefix (if merging "^[-\\+\s]\\{2\\}" "^[-\\+\s]"))
+          (indent
+           (if (local-variable-p 'magit-diff-highlight-indentation)
+               magit-diff-highlight-indentation
+             (setq-local
+              magit-diff-highlight-indentation
+              (cdr (seq-find (##string-match-p (car %) default-directory)
+                             (nreverse
+                              (default-value
+                               'magit-diff-highlight-indentation))))))))
+      (when (and magit-diff-highlight-trailing
+                 (looking-at (concat prefix ".*?\\([ \t]+\\)
?$")))
+        (let ((ov (make-overlay (match-beginning 1) (match-end 1) nil t)))
+          (overlay-put ov 'font-lock-face 'magit-diff-whitespace-warning)
+          (overlay-put ov 'priority 2)
+          (overlay-put ov 'evaporate t)))
+      (when (or (and (eq indent 'tabs)
+                     (looking-at (concat prefix "\\( *\t[ \t]*\\)")))
+                (and (integerp indent)
+                     (looking-at (format "%s\\([ \t]* \\{%s,\\}[ \t]*\\)"
+                                         prefix indent))))
+        (let ((ov (make-overlay (match-beginning 1) (match-end 1) nil t)))
+          (overlay-put ov 'font-lock-face 'magit-diff-whitespace-warning)
+          (overlay-put ov 'priority 2)
+          (overlay-put ov 'evaporate t))))))
+
+;;;; Refinement
+
+(cl-defmethod magit-section--refine ((section magit-hunk-section))
+  (unless (magit--meta-hunk-p section)
+    (when (eq magit-diff-fontify-hunk t)
+      (magit-diff--update-hunk-syntax section))
+    (when (eq magit-diff-refine-hunk t)
+      (magit-diff-update-hunk-refinement section))))
+
+(defun magit-diff-update-hunk-refinement (&optional section allow-remove)
+  (if section
+      (unless (oref section hidden)
+        (pcase (list magit-diff-refine-hunk
+                     (oref section refined)
+                     (eq section (magit-current-section)))
+          ((or `(all nil ,_) '(t nil t))
+           (oset section refined t)
+           (save-excursion
+             (goto-char (oref section start))
+             ;; `diff-refine-hunk' does not handle combined diffs.
+             (unless (looking-at "@@@")
+               (let ((smerge-refine-ignore-whitespace
+                      magit-diff-refine-ignore-whitespace)
+                     ;; Avoid fsyncing many small temp files.
+                     (write-region-inhibit-fsync t))
+                 (diff-refine-hunk)))))
+          ((and (guard allow-remove)
+                (or `(nil t ,_) '(t t nil)))
+           (oset section refined nil)
+           (remove-overlays (oref section start)
+                            (oref section end)
+                            'diff-mode 'fine))))
+    (named-let update ((section magit-root-section))
+      (if (magit-section-match 'hunk section)
+          (magit-diff-update-hunk-refinement section t)
+        (dolist (child (oref section children))
+          (update child))))))
+
+;;;; Syntax
+
+(defun magit-diff--update-hunk-syntax (&optional hunk)
+  (if hunk
+      (pcase-let (((eieio fontified content end) hunk))
+        (unless fontified
+          (oset hunk fontified t)
+          (save-excursion
+            (goto-char content)
+            (pcase-let*
+                ((`(,old ,new) (magit-diff-visit--sides))
+                 (old (apply #'magit-diff--get-hunk-syntax hunk 'old old))
+                 (new (apply #'magit-diff--get-hunk-syntax hunk 'new new)))
+              (while (< (point) end)
+                (pcase-dolist (`(,b ,e ,face)
+                               (pcase (char-after (point))
+                                 (?-  (pop old))
+                                 (?+  (pop new))
+                                 (?\s (pop old)
+                                      (pop new))))
+                  (let ((o (make-overlay (+ (point) 1 b) (+ (point) 1 e) nil t)))
+                    (overlay-put o 'evaporate t)
+                    (overlay-put o 'face face)))
+                (forward-line 1))))))
+    (named-let update ((section magit-root-section))
+      (if (magit-section-match 'hunk section)
+          (unless (magit--meta-hunk-p section)
+            (magit-diff--update-hunk-syntax section))
+        (dolist (child (oref section children))
+          (update child))))))
+
+(defun magit-diff--get-hunk-syntax (hunk side rev file)
+  (let ((args (magit-diff--get-hunk-text hunk (eq side 'old))))
+    (unless (listp (car (cadr args))) ; TODO Support unmerged changes.
+      (with-current-buffer (magit-find-file-noselect rev file t t)
+        (save-excursion
+          (apply #'diff-syntax-fontify-props nil args))))))
+
+(defun magit-diff--get-hunk-text (hunk from)
+  (pcase-let* (((eieio start end from-range to-range) hunk)
+               (`(,line ,lines) (if from from-range to-range)))
+    (with-demoted-errors "Error getting hunk text: %S"
+      (list (string-trim-right
+             (diff-hunk-text (buffer-substring-no-properties start end)
+                             (not from) nil))
+            (list line lines)))))
+
+;;; Hunk Region
+
+(defun magit-diff-hunk-region-beginning ()
+  (magit--bol-position (region-beginning)))
+
+(defun magit-diff-hunk-region-end ()
+  (magit--eol-position (region-end)))
+
+(defun magit-diff-update-hunk-region (section)
+  "Highlight the hunk-internal region if any."
+  (when (and (eq (oref section type) 'hunk)
+             (eq (magit-diff-scope section t) 'region))
+    (magit-diff--make-hunk-overlay
+     (oref section start)
+     (1- (oref section content))
+     'font-lock-face 'magit-diff-lines-heading
+     'display (magit-diff-hunk-region-header section)
+     'after-string (magit-diff--hunk-after-string 'magit-diff-lines-heading))
+    (run-hook-with-args 'magit-diff-highlight-hunk-region-functions section)
+    t))
+
+(defun magit-diff-highlight-hunk-region-dim-outside (section)
+  "Dim the parts of the hunk that are outside the hunk-internal region.
+This is done by using the same foreground and background color
+for added and removed lines as for context lines."
+  (let ((face (if magit-diff-highlight-hunk-body
+                  'magit-diff-context-highlight
+                'magit-diff-context)))
+    (when magit-diff-unmarked-lines-keep-foreground
+      (setq face `(:extend t :background ,(face-attribute face :background))))
+    (magit-diff--make-hunk-overlay (oref section content)
+                                   (magit-diff-hunk-region-beginning)
+                                   'font-lock-face face
+                                   'priority 2)
+    (magit-diff--make-hunk-overlay (1+ (magit-diff-hunk-region-end))
+                                   (oref section end)
+                                   'font-lock-face face
+                                   'priority 2)))
+
+(defun magit-diff-highlight-hunk-region-using-face (_section)
+  "Highlight the hunk-internal region by making it bold.
+Or rather highlight using the face `magit-diff-hunk-region', though
+changing only the `:weight' and/or `:slant' is recommended for that
+face."
+  (magit-diff--make-hunk-overlay (magit-diff-hunk-region-beginning)
+                                 (1+ (magit-diff-hunk-region-end))
+                                 'font-lock-face 'magit-diff-hunk-region))
+
+(defun magit-diff-highlight-hunk-region-using-overlays (section)
+  "Emphasize the hunk-internal region using delimiting horizontal lines.
+This is implemented as single-pixel newlines places inside overlays."
+  (if (window-system)
+      (let ((beg (magit-diff-hunk-region-beginning))
+            (end (magit-diff-hunk-region-end))
+            (str (propertize
+                  (concat (propertize "\s" 'display '(space :height (1)))
+                          (propertize "\n" 'line-height t))
+                  'font-lock-face 'magit-diff-lines-boundary)))
+        (magit-diff--make-hunk-overlay beg (1+ beg) 'before-string str)
+        (magit-diff--make-hunk-overlay end (1+ end) 'after-string  str))
+    (magit-diff-highlight-hunk-region-using-face section)))
+
+(defun magit-diff-highlight-hunk-region-using-underline (section)
+  "Emphasize the hunk-internal region using delimiting horizontal lines.
+This is implemented by overlining and underlining the first and
+last (visual) lines of the region."
+  (if (window-system)
+      (let* ((beg (magit-diff-hunk-region-beginning))
+             (end (magit-diff-hunk-region-end))
+             (beg-eol (save-excursion (goto-char beg)
+                                      (end-of-visual-line)
+                                      (point)))
+             (end-bol (save-excursion (goto-char end)
+                                      (beginning-of-visual-line)
+                                      (point)))
+             (color (face-background 'magit-diff-lines-boundary nil t)))
+        (cl-flet ((ln (b e &rest face)
+                    (magit-diff--make-hunk-overlay
+                     b e 'font-lock-face face 'after-string
+                     (magit-diff--hunk-after-string face))))
+          (if (= beg end-bol)
+              (ln beg beg-eol :overline color :underline color)
+            (ln beg beg-eol :overline color)
+            (ln end-bol end :underline color))))
+    (magit-diff-highlight-hunk-region-using-face section)))
+
+(defun magit-diff--make-hunk-overlay (start end &rest args)
+  (let ((ov (make-overlay start end nil t)))
+    (overlay-put ov 'evaporate t)
+    (while args (overlay-put ov (pop args) (pop args)))
+    (push ov magit-section--region-overlays)
+    ov))
+
+(defun magit-diff--hunk-after-string (face)
+  (propertize "\s"
+              'font-lock-face face
+              'display (list 'space :align-to
+                             `(+ (0 . right)
+                                 ,(min (window-hscroll)
+                                       (- (line-end-position)
+                                          (line-beginning-position)))))
+              ;; This prevents the cursor from being rendered at the
+              ;; edge of the window.
+              'cursor t))
+
+;;; Utilities
+
+(defun magit-diff-inside-hunk-body-p ()
+  "Return t if point is inside the body of a hunk."
+  (and-let* ((section (magit-current-section))
+             (_(cl-typep section 'magit-hunk-section))
+             (content (oref section content)))
+    (> (magit-point) content)))
+
+(defun magit-diff-on-removed-line-p ()
+  "Return t if point is on a removed line inside the body of a hunk.
+If `magit-diff-visit-previous-blob' is nil, then always return nil."
+  (let ((section (magit-current-section)))
+    (and magit-diff-visit-previous-blob
+         (cl-typep section 'magit-hunk-section)
+         (not (oref section combined))
+         (= (char-after (pos-bol)) ?-))))
+
+(defun magit-diff--combined-p (section)
+  (cl-assert (cl-typep section 'magit-file-section))
+  (string-match-p "\\`diff --\\(combined\\|cc\\)" (oref section value)))
+
+;;; Diff Extract
+
+(defun magit-diff-file-header (section &optional no-rename)
+  (when (magit-hunk-section-p section)
+    (setq section (oref section parent)))
+  (and (magit-file-section-p section)
+       (let ((header (oref section header)))
+         (if (or (not no-rename)
+                 (string-match-p "^--- /dev/null" header))
+             header
+           (replace-regexp-in-string
+            "^--- \\(.+\\)" (oref section value) header t t 1)))))
+
+(defun magit-diff-hunk-region-header (section)
+  (let ((patch (magit-diff-hunk-region-patch section)))
+    (string-match "\n" patch)
+    (substring patch 0 (1- (match-end 0)))))
+
+(defun magit-diff-hunk-region-patch (section &optional args)
+  (let ((op (if (member "--reverse" args) "+" "-"))
+        (sbeg (oref section start))
+        (rbeg (magit-diff-hunk-region-beginning))
+        (rend (region-end))
+        (send (oref section end))
+        (patch nil))
+    (save-excursion
+      (goto-char sbeg)
+      (while (< (point) send)
+        (looking-at "\\(.\\)\\([^\n]*\n\\)")
+        (cond ((or (string-match-p "[@ ]" (match-str 1))
+                   (and (>= (point) rbeg)
+                        (<= (point) rend)))
+               (push (match-str 0) patch))
+              ((equal op (match-str 1))
+               (push (concat " " (match-str 2)) patch)))
+        (forward-line)))
+    (let ((buffer-list-update-hook nil)) ; #3759
+      (with-temp-buffer
+        (insert (string-join (reverse patch)))
+        (diff-fixup-modifs (point-min) (point-max))
+        (setq patch (buffer-string))))
+    patch))
+
+;;; _
+(provide 'magit-diff)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-diff.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-diff.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-diff.elc
new file mode 100644
index 0000000..d440f2d
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-diff.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-dired.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-dired.el
new file mode 100644
index 0000000..85f58d1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-dired.el
@@ -0,0 +1,129 @@
+;;; magit-dired.el --- Dired support for Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Dired support for Magit.
+
+;;; Code:
+
+(require 'magit)
+
+(require 'dired)
+
+;; For `magit-do-async-shell-command'.
+(declare-function dired-read-shell-command "dired-aux" (prompt arg files))
+
+;;; Open Dired from Magit
+
+;;;###autoload
+(defun magit-dired-jump (&optional other-window)
+  "Visit file at point using Dired.
+With a prefix argument, visit in another window.  If there
+is no file at point, then instead visit `default-directory'."
+  (interactive "P")
+  (dired-jump other-window
+              (and-let ((file (if (derived-mode-p 'magit-repolist-mode)
+                                  (tabulated-list-get-id)
+                                (magit-file-at-point))))
+                (expand-file-name (if (file-directory-p file)
+                                      (file-name-as-directory file)
+                                    file)))))
+
+;;; Commands for Dired Buffers
+
+;;;###autoload
+(defun magit-dired-stage ()
+  "In Dired, staged all marked files or the file at point."
+  (interactive)
+  (magit-stage-files (dired-get-marked-files)))
+
+;;;###autoload
+(defun magit-dired-unstage ()
+  "In Dired, unstaged all marked files or the file at point."
+  (interactive)
+  (magit-unstage-files (dired-get-marked-files)))
+
+;;;###autoload
+(defun magit-dired-log (&optional follow)
+  "In Dired, show log for all marked files or the directory if none are marked."
+  (interactive "P")
+  (if-let ((topdir (magit-toplevel default-directory)))
+      (let ((args (car (magit-log-arguments)))
+            (files (or (dired-get-marked-files nil 'marked)
+                       (list default-directory))))
+        (when (and follow
+                   (not (member "--follow" args))
+                   (not (cdr files)))
+          (push "--follow" args))
+        (magit-log-setup-buffer
+         (list (or (magit-get-current-branch) "HEAD"))
+         args
+         (let ((default-directory topdir))
+           (mapcar #'file-relative-name files))
+         magit-log-buffer-file-locked))
+    (magit--not-inside-repository-error)))
+
+;;;###autoload
+(defun magit-dired-am-apply-patches (repo &optional arg)
+  "In Dired, apply the marked (or next ARG) files as patches.
+If inside a repository, then apply in that.  Otherwise prompt
+for a repository."
+  (interactive (list (or (magit-toplevel)
+                         (magit-read-repository t))
+                     current-prefix-arg))
+  (let ((files (dired-get-marked-files nil arg nil nil t)))
+    (magit-status-setup-buffer repo)
+    (magit-am-apply-patches files)))
+
+;;; Miscellaneous Commands
+
+;;;###autoload
+(defun magit-do-async-shell-command (file)
+  "Open FILE with `dired-do-async-shell-command'.
+Interactively, open the file at point."
+  (interactive (list (or (magit-file-at-point)
+                         (magit-read-file "Act on file" nil t))))
+  (require 'dired-aux)
+  (dired-do-async-shell-command
+   (dired-read-shell-command "& on %s: " current-prefix-arg (list file))
+   nil (list file)))
+
+;;; _
+(provide 'magit-dired)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-dired.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-dired.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-dired.elc
new file mode 100644
index 0000000..12a9270
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-dired.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-ediff.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-ediff.el
new file mode 100644
index 0000000..f49e540
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-ediff.el
@@ -0,0 +1,595 @@
+;;; magit-ediff.el --- Ediff extension for Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library provides basic support for Ediff.
+
+;;; Code:
+
+(require 'magit)
+
+(require 'ediff)
+(require 'smerge-mode)
+
+(defvar smerge-ediff-buf)
+(defvar smerge-ediff-windows)
+
+;;; Options
+
+(defgroup magit-ediff nil
+  "Ediff support for Magit."
+  :link '(info-link "(magit)Ediffing")
+  :group 'magit-extensions)
+
+(defcustom magit-ediff-quit-hook
+  (list #'magit-ediff-restore-previous-winconf)
+  "Hooks to run after finishing Ediff, when that was invoked using Magit.
+The hooks are run in the Ediff control buffer.  This is similar
+to `ediff-quit-hook' but takes the needs of Magit into account.
+The `ediff-quit-hook' is ignored by Ediff sessions which were
+invoked using Magit."
+  :package-version '(magit . "4.6.0")
+  :group 'magit-ediff
+  :type 'hook
+  :get #'magit-hook-custom-get
+  :options (list #'magit-ediff-restore-previous-winconf))
+
+(defcustom magit-ediff-dwim-resolve-function #'magit-ediff-resolve-rest
+  "The function `magit-ediff-dwim' uses to resolve conflicts."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-ediff
+  :type '(choice (const magit-ediff-resolve-rest)
+                 (const magit-ediff-resolve-all)
+                 (const magit-git-mergetool)))
+
+(defcustom magit-ediff-dwim-show-on-hunks nil
+  "Whether `magit-ediff-dwim' runs show variants on hunks.
+If non-nil, `magit-ediff-show-staged' or
+`magit-ediff-show-unstaged' are called based on what section the
+hunk is in.  Otherwise, `magit-ediff-dwim' runs
+`magit-ediff-stage' when point is on an uncommitted hunk."
+  :package-version '(magit . "2.2.0")
+  :group 'magit-ediff
+  :type 'boolean)
+
+(defcustom magit-ediff-show-stash-with-index t
+  "Whether `magit-ediff-show-stash' shows the state of the index.
+
+If non-nil, use a third Ediff buffer to distinguish which changes
+in the stash were staged.  In cases where the stash contains no
+staged changes, fall back to a two-buffer Ediff.
+
+More specifically, a stash is a merge commit, stash@{N}, with
+potentially three parents.
+
+* stash@{N}^1 represents the `HEAD' commit at the time the stash
+  was created.
+
+* stash@{N}^2 records any changes that were staged when the stash
+  was made.
+
+* stash@{N}^3, if it exists, contains files that were untracked
+  when stashing.
+
+If this option is non-nil, `magit-ediff-show-stash' will run
+Ediff on a file using three buffers: one for stash@{N}, another
+for stash@{N}^1, and a third for stash@{N}^2.
+
+Otherwise, Ediff uses two buffers, comparing
+stash@{N}^1..stash@{N}.  Along with any unstaged changes, changes
+in the index commit, stash@{N}^2, will be shown in this
+comparison unless they conflicted with changes in the working
+tree at the time of stashing."
+  :package-version '(magit . "2.6.0")
+  :group 'magit-ediff
+  :type 'boolean)
+
+(defvar magit-ediff-use-indirect-buffers nil
+  "Whether to use indirect buffers.
+Ediff already does a lot of buffer and file shuffling and I
+recommend you do not further complicate that by enabling this.")
+
+;;; Commands
+
+(defvar magit-ediff-previous-winconf nil)
+
+;;;###autoload(autoload 'magit-ediff "magit-ediff" nil t)
+(transient-define-prefix magit-ediff ()
+  "Show differences using the Ediff package."
+  :info-manual "(ediff)"
+  ["Ediff"
+   [("E" "Dwim"          magit-ediff-dwim)
+    ("s" "Stage"         magit-ediff-stage)]
+   [("m" "Resolve rest"            magit-ediff-resolve-rest)
+    ("M" "Resolve all conflicts"   magit-ediff-resolve-all)
+    ("t" "Resolve using mergetool" magit-git-mergetool)]
+   [("u" "Show unstaged" magit-ediff-show-unstaged)
+    ("i" "Show staged"   magit-ediff-show-staged)
+    ("w" "Show worktree" magit-ediff-show-working-tree)]
+   [("c" "Show commit"   magit-ediff-show-commit)
+    ("r" "Show range"    magit-ediff-compare)
+    ("z" "Show stash"    magit-ediff-show-stash)]])
+
+;;;###autoload(autoload 'magit-ediff-resolve-all "magit-ediff" nil t)
+(transient-define-suffix magit-ediff-resolve-all (file)
+  "Resolve all conflicts in the FILE at point using Ediff.
+
+If there is no file at point or if it doesn't have any unmerged
+changes, then prompt for a file.
+
+See info node `(magit) Ediffing' for more information about this
+and alternative commands."
+  :inapt-if-not #'magit-anything-unmerged-p
+  (interactive (list (magit-read-unmerged-file)))
+  (magit-with-toplevel
+    (let* ((dir   (magit-gitdir))
+           (revA  (or (magit-name-branch "HEAD")
+                      (magit-commit-oid "HEAD")))
+           (revB  (cl-find-if (##file-exists-p (expand-file-name % dir))
+                              '("MERGE_HEAD" "CHERRY_PICK_HEAD" "REVERT_HEAD")))
+           (revB  (or (magit-name-branch revB)
+                      (magit-commit-oid revB)))
+           (revC  (magit-commit-oid (magit-merge-base revA revB)))
+           (fileA (magit--rev-file-name file revA revB))
+           (fileB (magit--rev-file-name file revB revA))
+           (fileC (or (magit--rev-file-name file revC revA)
+                      (magit--rev-file-name file revC revB))))
+      ;; Ediff assumes that the FILE where it is going to store the merge
+      ;; result does not exist yet, so move the existing file out of the
+      ;; way.  If a buffer visits FILE, then we have to kill that upfront.
+      (when-let ((buffer (find-buffer-visiting file)))
+        (when (and (buffer-modified-p buffer)
+                   (not (y-or-n-p (format "Save buffer %s %s? "
+                                          (buffer-name buffer)
+                                          "(cannot continue otherwise)"))))
+          (user-error "Abort"))
+        (kill-buffer buffer))
+      (let ((orig (concat file ".ORIG")))
+        (when (file-exists-p orig)
+          (rename-file orig (make-temp-name (concat orig "_"))))
+        (rename-file file orig))
+      (let ((setup (lambda ()
+                     ;; Use the same conflict marker style as Git uses.
+                     (setq-local ediff-combination-pattern
+                                 '("<<<<<<< HEAD" A
+                                   ,(format "||||||| %s" revC) Ancestor
+                                   "=======" B
+                                   ,(format ">>>>>>> %s" revB)))))
+            (quit  (lambda ()
+                     ;; For merge jobs Ediff switches buffer names around.
+                     ;; At this point `ediff-buffer-C' no longer refers to
+                     ;; the ancestor buffer but to the merge result buffer.
+                     ;; See (if ediff-merge-job ...) in `ediff-setup'.
+                     (when (buffer-live-p ediff-buffer-C)
+                       (with-current-buffer ediff-buffer-C
+                         (save-buffer)
+                         (save-excursion
+                           (goto-char (point-min))
+                           (unless (re-search-forward "^<<<<<<< " nil t)
+                             (magit-stage-files (list file)))))))))
+        (magit-ediff-buffers
+         (magit-ediff--find-file revA fileA)
+         (magit-ediff--find-file revB fileB)
+         (and fileC (magit-ediff--find-file revC fileC))
+         setup quit file)))))
+
+;;;###autoload(autoload 'magit-ediff-resolve-rest "magit-ediff" nil t)
+(transient-define-suffix magit-ediff-resolve-rest (file)
+  "Resolve outstanding conflicts in the FILE at point using Ediff.
+
+If there is no file at point or if it doesn't have any unmerged
+changes, then prompt for a file.
+
+See info node `(magit) Ediffing' for more information about this
+and alternative commands."
+  :inapt-if-not #'magit-anything-unmerged-p
+  (interactive (list (magit-read-unmerged-file)))
+  (magit-with-toplevel
+    (let ((winconf (current-window-configuration)))
+      (with-current-buffer (find-file-noselect file)
+        (smerge-ediff)
+        (setq-local ediff-quit-merge-hook nil)
+        (setq-local ediff-quit-hook nil)
+        (add-hook 'ediff-quit-hook
+                  (lambda ()
+                    (let ((bufC ediff-buffer-C)
+                          (bufS smerge-ediff-buf))
+                      (with-current-buffer bufS
+                        (when (yes-or-no-p
+                               (format "Conflict resolution finished; save %s? "
+                                       buffer-file-name))
+                          (erase-buffer)
+                          (insert-buffer-substring bufC)
+                          (save-buffer)))))
+                  t t)
+        (add-hook 'ediff-quit-hook (##magit-ediff--cleanup-buffers t) t t)
+        (add-hook 'ediff-quit-hook
+                  (lambda ()
+                    (let ((magit-ediff-previous-winconf winconf))
+                      (run-hooks 'magit-ediff-quit-hook)))
+                  t t)))))
+
+;;;###autoload(autoload 'magit-ediff-stage "magit-ediff" nil t)
+(transient-define-suffix magit-ediff-stage (file)
+  "Stage and unstage changes to FILE using Ediff.
+FILE has to be relative to the top directory of the repository."
+  :inapt-if-not #'magit-anything-modified-p
+  (interactive
+    (let ((files (magit-tracked-files)))
+      (list (magit-completing-read "Selectively stage file" files nil t nil nil
+                                   (car (member (magit-current-file) files))))))
+  (magit-with-toplevel
+    (let* ((bufC (magit-ediff--find-file "{worktree}" file))
+           ;; Use the same encoding for all three buffers or we
+           ;; may end up changing the file in an unintended way.
+           (coding-system-for-read
+            (buffer-local-value 'buffer-file-coding-system bufC))
+           (bufA (magit-ediff--find-file "HEAD" file))
+           (bufB (magit-ediff--find-file "{index}" file))
+           (lockB (buffer-local-value 'buffer-read-only bufB))
+           (modeB (buffer-local-value 'magit-blob-mode bufB)))
+      (with-current-buffer bufB
+        ;; Make writable and don't shadow self-insert-command.
+        (magit-blob-mode -1))
+      (magit-ediff-buffers
+       bufA bufB bufC nil
+       (lambda ()
+         (when (buffer-live-p ediff-buffer-B)
+           (when lockB
+             (with-current-buffer bufB
+               (if modeB
+                   (magit-blob-mode 1)
+                 (setq-local buffer-read-only t)
+                 (setq-local read-only-mode--state t))))
+           (when (buffer-modified-p ediff-buffer-B)
+             (with-current-buffer ediff-buffer-B
+               (magit-update-index))))
+         (when (and (buffer-live-p ediff-buffer-C)
+                    (buffer-modified-p ediff-buffer-C))
+           (with-current-buffer ediff-buffer-C
+             (when (y-or-n-p (format "Save file %s? " buffer-file-name))
+               (save-buffer)))))))))
+
+;;;###autoload(autoload 'magit-ediff-compare "magit-ediff" nil t)
+(transient-define-suffix magit-ediff-compare (revA revB fileA fileB)
+  "Compare REVA:FILEA with REVB:FILEB using Ediff.
+
+FILEA and FILEB have to be relative to the top directory of the
+repository.
+
+If the region is active, use the revisions on the first and last
+line of the region.  With a prefix argument, instead of diffing
+the revisions, choose a revision to view changes along, starting
+at the common ancestor of both revisions (i.e., use a \"...\"
+range)."
+  (interactive
+    (pcase-let ((`(,revA ,revB) (magit-ediff-compare--read-revisions
+                                 nil current-prefix-arg)))
+      (nconc (list revA revB)
+             (magit-ediff-read-files revA revB))))
+  (magit-ediff-buffers
+   (magit-ediff--find-file revA fileA)
+   (magit-ediff--find-file revB fileB)))
+
+(defun magit-ediff-compare--read-revisions (&optional arg mbase)
+  (let ((input (or arg (magit-diff-read-range-or-commit
+                        "Compare range or commit"
+                        nil mbase))))
+    (if-let ((range (magit-split-range input)))
+        (list (car range) (cdr range))
+      (list input "{worktree}"))))
+
+(defun magit-ediff-read-files (revA revB &optional fileB)
+  "Read file in REVB, return it and the corresponding file in REVA.
+When FILEB is non-nil, use this as REVB's file instead of
+prompting for it."
+  (when (equal revA "{worktree}") (setq revA nil))
+  (when (equal revB "{worktree}") (setq revB nil))
+  (unless (and fileB (member fileB (magit-revision-files revB)))
+    (setq fileB
+          (or (and fileB
+                   magit-buffer-log-files
+                   (derived-mode-p 'magit-log-mode)
+                   (member "--follow" magit-buffer-log-args)
+                   (cdr (assoc fileB
+                               (magit-renamed-files
+                                revB
+                                (oref (car (oref magit-root-section children))
+                                      value)))))
+              (magit-read-file-choice
+               (format "File to compare between %s and %s"
+                       revA (or revB "the working tree"))
+               (magit-changed-files revA revB)
+               (format "No changed files between %s and %s"
+                       revA (or revB "the working tree"))))))
+  (list (or (car (member fileB (magit-revision-files revA)))
+            (cdr (assoc fileB (magit-renamed-files revB revA)))
+            (magit-read-file-choice
+             (format "File in %s to compare with %s in %s"
+                     revA fileB (or revB "the working tree"))
+             (magit-changed-files revB revA)
+             (format "No files have changed between %s and %s"
+                     revA revB)))
+        fileB))
+
+;;;###autoload(autoload 'magit-ediff-dwim "magit-ediff" nil t)
+(transient-define-suffix magit-ediff-dwim ()
+  "Compare, stage, or resolve using Ediff.
+This command tries to guess what file, and what commit or range
+the user wants to compare, stage, or resolve using Ediff.  It
+might only be able to guess either the file, or range or commit,
+in which case the user is asked about the other.  It might not
+always guess right, in which case the appropriate `magit-ediff-*'
+command has to be used explicitly.  If it cannot read the user's
+mind at all, then it asks the user for a command to run."
+  (interactive)
+  (magit-section-case
+    (hunk (save-excursion
+            (goto-char (oref (oref it parent) start))
+            (magit-ediff-dwim)))
+    (t
+     (let ((range (magit-diff--dwim))
+           (file (magit-current-file))
+           command revA revB)
+       (pcase range
+         ((and (guard (not magit-ediff-dwim-show-on-hunks))
+               (or 'unstaged 'staged))
+          (setq command (if (magit-anything-unmerged-p)
+                            magit-ediff-dwim-resolve-function
+                          #'magit-ediff-stage)))
+         ('unstaged (setq command #'magit-ediff-show-unstaged))
+         ('staged (setq command #'magit-ediff-show-staged))
+         (`(commit . ,value)
+          (setq command #'magit-ediff-show-commit)
+          (setq revB value))
+         (`(stash . ,value)
+          (setq command #'magit-ediff-show-stash)
+          (setq revB value))
+         ((pred stringp)
+          (pcase-let ((`(,a ,b) (magit-ediff-compare--read-revisions range)))
+            (setq command #'magit-ediff-compare)
+            (setq revA a)
+            (setq revB b)))
+         (_
+          (when (derived-mode-p 'magit-diff-mode)
+            (pcase (magit-diff-type)
+              ('committed (pcase-let ((`(,a ,b)
+                                       (magit-ediff-compare--read-revisions
+                                        magit-buffer-diff-range)))
+                            (setq revA a)
+                            (setq revB b)))
+              ((guard (not magit-ediff-dwim-show-on-hunks))
+               (setq command #'magit-ediff-stage))
+              ('unstaged  (setq command #'magit-ediff-show-unstaged))
+              ('staged    (setq command #'magit-ediff-show-staged))
+              ('undefined (setq command nil))
+              (_          (setq command nil))))))
+       (cond ((not command)
+              (call-interactively
+               (magit-read-char-case
+                   "Failed to read your mind; do you want to " t
+                 (?c "[c]ommit"  #'magit-ediff-show-commit)
+                 (?r "[r]ange"   #'magit-ediff-compare)
+                 (?s "[s]tage"   #'magit-ediff-stage)
+                 (?m "[m] resolve remaining conflicts"
+                     #'magit-ediff-resolve-rest)
+                 (?M "[M] resolve all conflicts"
+                     #'magit-ediff-resolve-all))))
+             ((eq command #'magit-ediff-compare)
+              (apply #'magit-ediff-compare revA revB
+                     (magit-ediff-read-files revA revB file)))
+             ((eq command #'magit-ediff-show-commit)
+              (magit-ediff-show-commit revB))
+             ((eq command #'magit-ediff-show-stash)
+              (magit-ediff-show-stash revB))
+             (file
+              (funcall command file))
+             ((call-interactively command)))))))
+
+;;;###autoload(autoload 'magit-ediff-show-staged "magit-ediff" nil t)
+(transient-define-suffix magit-ediff-show-staged (file)
+  "Show staged changes using Ediff.
+
+This only allows looking at the changes; to stage, unstage,
+and discard changes using Ediff, use `magit-ediff-stage'.
+
+FILE must be relative to the top directory of the repository."
+  :inapt-if-not #'magit-anything-staged-p
+  (interactive
+    (list (magit-read-file-choice "Show staged changes for file"
+                                  (magit-staged-files)
+                                  "No staged files")))
+  (magit-ediff-buffers (magit-ediff--find-file "HEAD" file)
+                       (magit-ediff--find-file "{index}" file)))
+
+;;;###autoload(autoload 'magit-ediff-show-unstaged "magit-ediff" nil t)
+(transient-define-suffix magit-ediff-show-unstaged (file)
+  "Show unstaged changes using Ediff.
+
+This only allows looking at the changes; to stage, unstage,
+and discard changes using Ediff, use `magit-ediff-stage'.
+
+FILE must be relative to the top directory of the repository."
+  :inapt-if-not #'magit-anything-unstaged-p
+  (interactive
+    (list (magit-read-file-choice "Show unstaged changes for file"
+                                  (magit-unstaged-files)
+                                  "No unstaged files")))
+  (magit-ediff-buffers (magit-ediff--find-file "{index}" file)
+                       (magit-ediff--find-file "{worktree}" file)))
+
+;;;###autoload(autoload 'magit-ediff-show-working-tree "magit-ediff" nil t)
+(transient-define-suffix magit-ediff-show-working-tree (file)
+  "Show changes between `HEAD' and working tree using Ediff.
+FILE must be relative to the top directory of the repository."
+  :inapt-if-not #'magit-anything-modified-p
+  (interactive
+    (list (magit-read-file-choice "Show changes in file"
+                                  (magit-modified-files)
+                                  "No changed files")))
+  (magit-ediff-buffers (magit-ediff--find-file "HEAD" file)
+                       (magit-ediff--find-file "{worktree}" file)))
+
+;;;###autoload(autoload 'magit-ediff-show-commit "magit-ediff" nil t)
+(transient-define-suffix magit-ediff-show-commit (commit)
+  "Show changes introduced by COMMIT using Ediff."
+  (interactive (list (magit-read-branch-or-commit "Revision")))
+  (let ((revA (concat commit "^"))
+        (revB commit))
+    (apply #'magit-ediff-compare
+           revA revB
+           (magit-ediff-read-files revA revB (magit-current-file)))))
+
+;;;###autoload(autoload 'magit-ediff-show-stash "magit-ediff" nil t)
+(transient-define-suffix magit-ediff-show-stash (stash)
+  "Show changes introduced by STASH using Ediff.
+`magit-ediff-show-stash-with-index' controls whether a three-buffer
+Ediff is used in order to distinguish changes in the stash that were
+staged."
+  :inapt-if-not #'magit-list-stashes
+  (interactive (list (magit-read-stash "Stash")))
+  (pcase-let* ((revA (concat stash "^1"))
+               (revB (concat stash "^2"))
+               (revC stash)
+               (`(,fileA ,fileC) (magit-ediff-read-files revA revC))
+               (fileB fileC))
+    (if (and magit-ediff-show-stash-with-index
+             (member fileA (magit-changed-files revB revA)))
+        (magit-ediff-buffers
+         (magit-ediff--find-file revA fileA)
+         (magit-ediff--find-file revB fileB)
+         (magit-ediff--find-file revC fileC))
+      (magit-ediff-compare revA revC fileA fileC))))
+
+;;; Setup
+
+(defun magit-ediff-buffers (a b &optional c setup quit file)
+  "Run Ediff on two or three buffers A, B and C.
+
+If optional FILE is non-nil, then perform a merge.  The merge result
+is put in FILE.
+
+Neutralize the hooks `ediff-quit-hook' and `ediff-quit-merge-hook'
+because they usually feature functions that do not work for Magit.
+Instead run optional QUIT (if non-nil), `magit-ediff--cleanup-buffers'
+and `magit-ediff-quit-hook', with no arguments.
+
+Optional SETUP, if non-nil, is called with no arguments after Ediff
+is done setting up buffers."
+  (magit-with-toplevel
+    (ediff-buffers-internal
+     a b c
+     (let ((winconf (current-window-configuration)))
+       (list (lambda ()
+               (when setup
+                 (funcall setup))
+               (setq-local ediff-quit-merge-hook nil)
+               (setq-local ediff-quit-hook nil)
+               (when quit
+                 (add-hook 'ediff-quit-hook quit nil t))
+               (add-hook 'ediff-quit-hook #'magit-ediff--cleanup-buffers t t)
+               (add-hook 'ediff-quit-hook
+                         (lambda ()
+                           (let ((magit-ediff-previous-winconf winconf))
+                             (run-hooks 'magit-ediff-quit-hook)))
+                         t t))))
+     (pcase (list (and c t) (and file t))
+       ('(nil nil) 'ediff-buffers)
+       ('(nil t)   'ediff-merge-buffers)
+       ('(t   nil) 'ediff-buffers3)
+       ('(t   t)   'ediff-merge-buffers-with-ancestor))
+     file)))
+
+(defun magit-ediff--find-file (rev file)
+  (let ((buffer (magit-find-file-noselect rev file t 'ediff)))
+    (when magit-ediff-use-indirect-buffers
+      (setq buffer (make-indirect-buffer
+                    buffer (generate-new-buffer-name (buffer-name buffer)) t)))
+    buffer))
+
+;;; Quit
+
+(defun magit-ediff--cleanup-buffers (&optional smerge)
+  (cond (smerge
+         (when (buffer-live-p ediff-buffer-A) (kill-buffer ediff-buffer-A))
+         (when (buffer-live-p ediff-buffer-B) (kill-buffer ediff-buffer-B))
+         (when (buffer-live-p ediff-buffer-C) (kill-buffer ediff-buffer-C))
+         (when (buffer-live-p ediff-ancestor-buffer)
+           (kill-buffer ediff-ancestor-buffer)))
+        (t
+         (magit-ediff--bury-buffer ediff-buffer-A)
+         (magit-ediff--bury-buffer ediff-buffer-B)
+         (magit-ediff--bury-buffer ediff-buffer-C)
+         (magit-ediff--bury-buffer ediff-ancestor-buffer)))
+  (let* ((ctl-buf ediff-control-buffer)
+         (ctl-win (ediff-get-visible-buffer-window ctl-buf))
+         (ctl-frm ediff-control-frame)
+         (main-frame (cond ((window-live-p ediff-window-A)
+                            (window-frame ediff-window-A))
+                           ((window-live-p ediff-window-B)
+                            (window-frame ediff-window-B)))))
+    (ediff-kill-buffer-carefully ediff-diff-buffer)
+    (ediff-kill-buffer-carefully ediff-custom-diff-buffer)
+    (ediff-kill-buffer-carefully ediff-fine-diff-buffer)
+    (ediff-kill-buffer-carefully ediff-tmp-buffer)
+    (ediff-kill-buffer-carefully ediff-error-buffer)
+    (ediff-kill-buffer-carefully ediff-msg-buffer)
+    (ediff-kill-buffer-carefully ediff-debug-buffer)
+    (when (boundp 'ediff-patch-diagnostics)
+      (ediff-kill-buffer-carefully ediff-patch-diagnostics))
+    (cond ((and (display-graphic-p)
+                (frame-live-p ctl-frm))
+           (delete-frame ctl-frm))
+          ((window-live-p ctl-win)
+           (delete-window ctl-win)))
+    (ediff-kill-buffer-carefully ctl-buf)
+    (when (frame-live-p main-frame)
+      (select-frame main-frame))))
+
+(defun magit-ediff--bury-buffer (buffer)
+  (when (and (ediff-buffer-live-p buffer)
+             (eq (buffer-local-value 'magit-buffer--volatile buffer) 'ediff))
+    (kill-buffer (get-buffer buffer))))
+
+(defun magit-ediff-restore-previous-winconf ()
+  (set-window-configuration magit-ediff-previous-winconf))
+
+;;; _
+(provide 'magit-ediff)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-ediff.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-ediff.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-ediff.elc
new file mode 100644
index 0000000..5745694
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-ediff.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-extras.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-extras.el
new file mode 100644
index 0000000..097d7af
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-extras.el
@@ -0,0 +1,880 @@
+;;; magit-extras.el --- Additional functionality for Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Additional functionality for Magit.
+
+;;; Code:
+
+(require 'magit)
+
+;; For `magit-project-status'.
+(declare-function vc-git-command "vc-git"
+                  (buffer okstatus file-or-list &rest flags))
+
+(defvar project-prefix-map)
+(defvar project-switch-commands)
+
+(defgroup magit-extras nil
+  "Additional functionality for Magit."
+  :group 'magit-extensions)
+
+;;; Git Tools
+;;;; Git-Mergetool
+
+;;;###autoload(autoload 'magit-git-mergetool "magit-extras" nil t)
+(transient-define-prefix magit-git-mergetool (file args &optional transient)
+  "Resolve conflicts in FILE using \"git mergetool --gui\".
+With a prefix argument allow changing ARGS using a transient
+popup.  See info node `(magit) Ediffing' for information about
+alternative commands."
+  :man-page "git-mergetool"
+  ["Settings"
+   ("-t" magit-git-mergetool:--tool)
+   ("=t" magit-merge.guitool)
+   ("=T" magit-merge.tool)
+   ("-r" magit-mergetool.hideResolved)
+   ("-b" magit-mergetool.keepBackup)
+   ("-k" magit-mergetool.keepTemporaries)
+   ("-w" magit-mergetool.writeToTemp)]
+  ["Actions"
+   (" m" "Invoke mergetool" magit-git-mergetool)]
+  (interactive
+    (if (and (not (eq transient-current-command 'magit-git-mergetool))
+             current-prefix-arg)
+        (list nil nil t)
+      (list (magit-read-unmerged-file "Resolve")
+            (transient-args 'magit-git-mergetool))))
+  (if transient
+      (transient-setup 'magit-git-mergetool)
+    (magit-run-git-async "mergetool" "--gui" args "--" file)))
+
+(transient-define-infix magit-git-mergetool:--tool ()
+  :description "Override mergetool"
+  :class 'transient-option
+  :shortarg "-t"
+  :argument "--tool="
+  :reader #'magit--read-mergetool)
+
+(transient-define-infix magit-merge.guitool ()
+  :class 'magit--git-variable
+  :variable "merge.guitool"
+  :global t
+  :reader #'magit--read-mergetool)
+
+(transient-define-infix magit-merge.tool ()
+  :class 'magit--git-variable
+  :variable "merge.tool"
+  :global t
+  :reader #'magit--read-mergetool)
+
+(defun magit--read-mergetool (prompt _initial-input history)
+  (let ((choices nil)
+        (lines (cdr (magit-git-lines "mergetool" "--tool-help"))))
+    (while (string-prefix-p "\t\t" (car lines))
+      (push (substring (pop lines) 2) choices))
+    (setq choices (nreverse choices))
+    (magit-completing-read (or prompt "Select mergetool")
+                           choices nil t nil history)))
+
+(transient-define-infix magit-mergetool.hideResolved ()
+  :class 'magit--git-variable:boolean
+  :variable "mergetool.hideResolved"
+  :default "false"
+  :global t)
+
+(transient-define-infix magit-mergetool.keepBackup ()
+  :class 'magit--git-variable:boolean
+  :variable "mergetool.keepBackup"
+  :default "true"
+  :global t)
+
+(transient-define-infix magit-mergetool.keepTemporaries ()
+  :class 'magit--git-variable:boolean
+  :variable "mergetool.keepTemporaries"
+  :default "false"
+  :global t)
+
+(transient-define-infix magit-mergetool.writeToTemp ()
+  :class 'magit--git-variable:boolean
+  :variable "mergetool.writeToTemp"
+  :default "false"
+  :global t)
+
+;;;; Git-Gui
+
+;;;###autoload
+(defun magit-run-git-gui-blame (commit filename &optional linenum)
+  "Run \"git gui blame\" on the given FILENAME and COMMIT.
+Interactively run it for the current file and the `HEAD', with a
+prefix or when the current file cannot be determined let the user
+choose.  When the current buffer is visiting FILENAME instruct
+blame to center around the line point is on."
+  (interactive
+    (let (revision filename)
+      (when (or current-prefix-arg
+                (progn
+                  (setq revision "HEAD")
+                  (not (setq filename (magit-file-relative-name nil 'tracked)))))
+        (setq revision (magit-read-branch-or-commit "Blame from revision"))
+        (setq filename (magit-read-file-from-rev revision "Blame file")))
+      (list revision filename
+            (and (equal filename
+                        (ignore-errors
+                          (magit-file-relative-name buffer-file-name)))
+                 (line-number-at-pos)))))
+  (magit-with-toplevel
+    (magit-process-git 0 "gui" "blame"
+                       (and linenum (list (format "--line=%d" linenum)))
+                       commit
+                       filename)))
+
+;;;; Gitk
+
+(defcustom magit-gitk-executable
+  (or (and (eq system-type 'windows-nt)
+           (let ((exe (magit-git-string
+                       "-c" "alias.X=!x() { which \"$1\" | cygpath -mf -; }; x"
+                       "X" "gitk.exe")))
+             (and exe (file-executable-p exe) exe)))
+      (executable-find "gitk") "gitk")
+  "The Gitk executable."
+  :group 'magit-extras
+  :set-after '(magit-git-executable)
+  :type 'string)
+
+;;;###autoload
+(defun magit-run-git-gui ()
+  "Run \"git gui\" for the current git repository."
+  (interactive)
+  (magit-with-toplevel (magit-process-git 0 "gui")))
+
+;;;###autoload
+(defun magit-run-gitk ()
+  "Run `gitk' in the current repository."
+  (interactive)
+  (magit-process-file magit-gitk-executable nil 0))
+
+;;;###autoload
+(defun magit-run-gitk-branches ()
+  "Run `gitk --branches' in the current repository."
+  (interactive)
+  (magit-process-file magit-gitk-executable nil 0 nil "--branches"))
+
+;;;###autoload
+(defun magit-run-gitk-all ()
+  "Run `gitk --all' in the current repository."
+  (interactive)
+  (magit-process-file magit-gitk-executable nil 0 nil "--all"))
+
+;;; Emacs Tools
+
+;;;###autoload
+(defun magit-project-status ()
+  "Run `magit-status' in the current project's root.
+
+To teach `project-switch-project' about this command, you have to
+add something like this to your configuration:
+
+    (keymap-set project-prefix-map \"m\" #\\='magit-project-status)
+    (add-to-list \\='project-switch-commands
+                 \\='(magit-project-status \"Magit\") t)
+
+Also see `magit-project-dispatch'."
+  (interactive)
+  (if (fboundp 'project-root)
+      (magit-status-setup-buffer (project-root (project-current t)))
+    (user-error "`magit-project-status' requires `project' 0.3.0 or greater")))
+
+;;;###autoload
+(defun magit-project-dispatch ()
+  "Run `magit-dispatch' in the current project's root.
+
+Note that for `magit-dispatch' to operate in the selected project,
+the current buffer's `default-directory' must be located in the
+selected repository.  To achieve that, a Dired buffer is created.
+
+To teach `project-switch-project' about this command, you have to
+add something like this to your configuration:
+
+    (keymap-set project-prefix-map \"M\" #\\='magit-project-dispatch)
+    (add-to-list \\='project-switch-commands
+                 \\='(magit-project-dispatch \"Magit Dispatch\") t)
+
+Also see `magit-project-status'."
+  (interactive)
+  (if (fboundp 'project-root)
+      (let ((dir (project-root (project-current t))))
+        (find-file dir)
+        (transient-setup 'magit-dispatch))
+    (user-error "`magit-project-status' requires `project' 0.3.0 or greater")))
+
+;;; Shift Selection
+
+(defun magit--turn-on-shift-select-mode-p ()
+  (and shift-select-mode
+       this-command-keys-shift-translated
+       (not mark-active)
+       (not (eq (car-safe transient-mark-mode) 'only))))
+
+;;;###autoload
+(defun magit-previous-line (&optional arg try-vscroll)
+  "Like `previous-line' but with Magit-specific shift-selection.
+
+Magit's selection mechanism is based on the region but selects an
+area that is larger than the region.  This causes `previous-line'
+when invoked while holding the shift key to move up one line and
+thereby select two lines.  When invoked inside a hunk body this
+command does not move point on the first invocation and thereby
+it only selects a single line.  Which inconsistency you prefer
+is a matter of preference."
+  (declare (interactive-only
+            "use `forward-line' with negative argument instead."))
+  (interactive "p\np")
+  (unless arg (setq arg 1))
+  (let ((stay (or (magit-diff-inside-hunk-body-p)
+                  (magit-section-position-in-heading-p))))
+    (if (and stay (= arg 1) (magit--turn-on-shift-select-mode-p))
+        (push-mark nil nil t)
+      (with-no-warnings
+        (handle-shift-selection)
+        (previous-line (if stay (max (1- arg) 1) arg) try-vscroll)))))
+
+;;;###autoload
+(defun magit-next-line (&optional arg try-vscroll)
+  "Like `next-line' but with Magit-specific shift-selection.
+
+Magit's selection mechanism is based on the region but selects
+an area that is larger than the region.  This causes `next-line'
+when invoked while holding the shift key to move down one line
+and thereby select two lines.  When invoked inside a hunk body
+this command does not move point on the first invocation and
+thereby it only selects a single line.  Which inconsistency you
+prefer is a matter of preference."
+  (declare (interactive-only forward-line))
+  (interactive "p\np")
+  (unless arg (setq arg 1))
+  (let ((stay (or (magit-diff-inside-hunk-body-p)
+                  (magit-section-position-in-heading-p))))
+    (if (and stay (= arg 1) (magit--turn-on-shift-select-mode-p))
+        (push-mark nil nil t)
+      (with-no-warnings
+        (handle-shift-selection)
+        (next-line (if stay (max (1- arg) 1) arg) try-vscroll)))))
+
+;;; Clean
+
+;;;###autoload
+(defun magit-clean (&optional arg)
+  "Remove untracked files from the working tree.
+With a prefix argument also remove ignored files,
+with two prefix arguments remove ignored files only.
+\n(git clean -f -d [-x|-X])"
+  (interactive "p")
+  (when (yes-or-no-p (format "Remove %s files? "
+                             (pcase arg
+                               (1 "untracked")
+                               (4 "untracked and ignored")
+                               (_ "ignored"))))
+    (magit-run-before-change-functions nil "clean")
+    (magit-run-git "clean" "-f" "-d" (pcase arg (4 "-x") (16 "-X")))))
+
+(put 'magit-clean 'disabled t)
+
+;;; ChangeLog
+
+;;;###autoload
+(defun magit-generate-changelog (&optional amending)
+  "Insert ChangeLog entries into the current buffer.
+
+The entries are generated from the diff being committed.
+If prefix argument, AMENDING, is non-nil, include changes
+in HEAD as well as staged changes in the diff to check."
+  (interactive "P")
+  (unless (magit-commit-message-buffer)
+    (user-error "No commit in progress"))
+  (require 'diff-mode) ; `diff-add-log-current-defuns'.
+  (require 'vc-git)    ; `vc-git-diff'.
+  (require 'add-log)   ; `change-log-insert-entries'.
+  (setq default-directory (magit-toplevel))
+  (let ((rev1 (if amending "HEAD^1" "HEAD"))
+        (rev2 nil))
+    ;; Magit may have updated the files without notifying vc, but
+    ;; `diff-add-log-current-defuns' relies on vc being up-to-date.
+    (mapc #'vc-file-clearprops (magit-staged-files))
+    (change-log-insert-entries
+     (with-temp-buffer
+       (vc-git-command (current-buffer) 1 nil
+                       "diff-index" "--exit-code" "--patch"
+                       (and (magit-anything-staged-p) "--cached")
+                       rev1 "--")
+       ;; `diff-find-source-location' consults these vars.
+       (defvar diff-vc-revisions)
+       (setq-local diff-vc-revisions (list rev1 rev2))
+       (setq-local diff-vc-backend 'Git)
+       (diff-add-log-current-defuns)))))
+
+;;;###autoload
+(defun magit-add-change-log-entry (&optional whoami file-name other-window)
+  "Find change log file and add date entry and item for current change.
+This differs from `add-change-log-entry' (which see) in that
+it acts on the current hunk in a Magit buffer instead of on
+a position in a file-visiting buffer."
+  (interactive (list current-prefix-arg
+                     (prompt-for-change-log-name)))
+  (pcase-let ((`(,buf ,pos) (magit-diff-visit-file--noselect)))
+    (magit--with-temp-position buf pos
+      (let ((add-log-buffer-file-name-function #'magit-buffer-file-name))
+        (add-change-log-entry whoami file-name other-window)))))
+
+;;;###autoload
+(defun magit-add-change-log-entry-other-window (&optional whoami file-name)
+  "Find change log file in other window and add entry and item.
+This differs from `add-change-log-entry-other-window' (which see)
+in that it acts on the current hunk in a Magit buffer instead of
+on a position in a file-visiting buffer."
+  (interactive (and current-prefix-arg
+                    (list current-prefix-arg
+                          (prompt-for-change-log-name))))
+  (magit-add-change-log-entry whoami file-name t))
+
+;;; Edit Line Commit
+
+;;;###autoload
+(defun magit-edit-line-commit (&optional type)
+  "Edit the commit that added the current line.
+
+With a prefix argument edit the commit that removes the line,
+if any.  The commit is determined using \"git blame\" and made
+editable using \"git rebase --interactive\" if it is reachable
+from `HEAD', or by checking out the commit (or a branch that
+points at it) otherwise."
+  (interactive (list (and current-prefix-arg 'removal)))
+  (let* ((chunk (magit-current-blame-chunk (or type 'addition)))
+         (rev   (oref chunk orig-rev)))
+    (if (string-match-p "\\`0\\{40,\\}\\'" rev)
+        (message "This line has not been committed yet")
+      (let ((rebase (magit-rev-ancestor-p rev "HEAD"))
+            (file   (expand-file-name (oref chunk orig-file)
+                                      (magit-toplevel))))
+        (if rebase
+            (let ((magit--rebase-published-symbol 'edit-published))
+              (magit-rebase-edit-commit rev (magit-rebase-arguments)))
+          (magit--checkout (or (magit-rev-branch rev) rev)))
+        (unless (and buffer-file-name
+                     (file-equal-p file buffer-file-name))
+          (let ((blame-type (and magit-blame-mode magit-blame-type)))
+            (if rebase
+                (set-process-sentinel
+                 magit-this-process
+                 (lambda (process event)
+                   (magit-sequencer-process-sentinel process event)
+                   (when (eq (process-status process) 'exit)
+                     (find-file file)
+                     (when blame-type
+                       (magit-blame--pre-blame-setup blame-type)
+                       (magit-blame--run (magit-blame-arguments))))))
+              (find-file file)
+              (when blame-type
+                (magit-blame--pre-blame-setup blame-type)
+                (magit-blame--run (magit-blame-arguments))))))))))
+
+(put 'magit-edit-line-commit 'disabled t)
+
+;;;###autoload
+(defun magit-diff-edit-hunk-commit ()
+  "From a hunk, edit the respective commit and visit the file.
+
+First visit the file being modified by the hunk at the correct
+location using `magit-diff-visit-file'.  This actually visits a
+blob.  When point is on a diff header, not within an individual
+hunk, then this visits the blob the first hunk is about.
+
+Then invoke `magit-edit-line-commit', which uses an interactive
+rebase to make the commit editable, or if that is not possible
+because the commit is not reachable from `HEAD' by checking out
+that commit directly.  This also causes the actual worktree file
+to be visited.
+
+Neither the blob nor the file buffer are killed when finishing
+the rebase.  If that is undesirable, then it might be better to
+use `magit-rebase-edit-commit' instead of this command."
+  (interactive)
+  (let ((magit-diff-visit-previous-blob nil))
+    (with-current-buffer
+        (magit-diff-visit-file--internal nil #'pop-to-buffer-same-window)
+      (magit-edit-line-commit))))
+
+(put 'magit-diff-edit-hunk-commit 'disabled t)
+
+;;; Reshelve
+
+(defcustom magit-reshelve-since-committer-only nil
+  "Whether `magit-reshelve-since' changes only the committer dates.
+Otherwise the author dates are also changed."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+;;;###autoload
+(defun magit-reshelve-since (commit keyid)
+  "Change the author and committer dates of the commits since COMMIT.
+
+Ask the user for the first reachable commit whose dates should
+be changed.  Then read the new date for that commit.  The initial
+minibuffer input and the previous history element offer good
+values.  The next commit will be created one minute later and so
+on.
+
+This command is only intended for interactive use and should only
+be used on highly rearranged and unpublished history.
+
+If KEYID is non-nil, then use that to sign all reshelved commits.
+Interactively use the value of the \"--gpg-sign\" option in the
+list returned by `magit-rebase-arguments'."
+  (interactive (list nil
+                     (transient-arg-value "--gpg-sign="
+                                          (magit-rebase-arguments))))
+  (let* ((current (or (magit-get-current-branch)
+                      (user-error "Refusing to reshelve detached head")))
+         (backup (concat "refs/original/refs/heads/" current)))
+    (cond
+      ((not commit)
+       (when (and (magit-ref-p backup)
+                  (not (magit-y-or-n-p
+                        (format "Backup ref %s already exists.  Override? "
+                                backup))))
+         (user-error "Abort"))
+       (magit-log-select
+         (lambda (rev)
+           (magit-reshelve-since rev keyid))
+         "Type %p on a commit to reshelve it and the commits above it,"))
+      (t
+       (cl-flet ((adjust (time offset)
+                   (format-time-string
+                    "%F %T %z"
+                    (+ (floor time)
+                       (* offset 60)
+                       (- (car (decode-time time)))))))
+         (let* ((start (concat commit "^"))
+                (range (concat start ".." current))
+                (time-rev (adjust (float-time (string-to-number
+                                               (magit-rev-format "%at" start)))
+                                  1))
+                (time-now (adjust (float-time)
+                                  (- (string-to-number
+                                      (magit-git-string "rev-list" "--count"
+                                                        range))))))
+           (push time-rev magit--reshelve-history)
+           (let ((date (floor
+                        (float-time
+                         (date-to-time
+                          (read-string "Date for first commit: "
+                                       time-now 'magit--reshelve-history))))))
+             (with-environment-variables (("FILTER_BRANCH_SQUELCH_WARNING" "1"))
+               (magit-with-toplevel
+                 (magit-run-git-async
+                  "filter-branch" "--force" "--env-filter"
+                  (format
+                   "case $GIT_COMMIT in %s\nesac"
+                   (mapconcat
+                    (lambda (rev)
+                      (prog1
+                          (concat
+                           (format "%s) " rev)
+                           (and (not magit-reshelve-since-committer-only)
+                                (format "export GIT_AUTHOR_DATE=\"%s\"; " date))
+                           (format "export GIT_COMMITTER_DATE=\"%s\";;" date))
+                        (incf date 60)))
+                    (magit-git-lines "rev-list" "--reverse" range)
+                    " "))
+                  (and keyid
+                       (list "--commit-filter"
+                             (format "git commit-tree --gpg-sign=%s \"$@\";"
+                                     keyid)))
+                  range "--"))
+               (set-process-sentinel
+                magit-this-process
+                (lambda (process event)
+                  (when (memq (process-status process) '(exit signal))
+                    (if (> (process-exit-status process) 0)
+                        (magit-process-sentinel process event)
+                      (process-put process 'inhibit-refresh t)
+                      (magit-process-sentinel process event)
+                      (magit-run-git "update-ref" "-d" backup)))))))))))))
+
+;;; Revision Stack
+
+(defvar magit-revision-stack nil)
+
+(defcustom magit-pop-revision-stack-format
+  '("[%N: %h] "
+    "%N: %cs %H\n   %s\n"
+    "\\[\\([0-9]+\\)[]:]")
+  "Control how `magit-pop-revision-stack' inserts a revision.
+
+The command `magit-pop-revision-stack' inserts a representation
+of the revision last pushed to the `magit-revision-stack' into
+the current buffer.  It inserts text at point and/or near the end
+of the buffer, and removes the consumed revision from the stack.
+
+The entries on the stack have the format (HASH TOPLEVEL) and this
+option has the format (POINT-FORMAT EOB-FORMAT INDEX-REGEXP), all
+of which may be nil or a string (though either one of EOB-FORMAT
+or POINT-FORMAT should be a string, and if INDEX-REGEXP is
+non-nil, then the two formats should be too).
+
+First INDEX-REGEXP is used to find the previously inserted entry,
+by searching backward from point.  The first submatch must match
+the index number.  That number is incremented by one, and becomes
+the index number of the entry to be inserted.  If you don't want
+to number the inserted revisions, then use nil for INDEX-REGEXP.
+
+If INDEX-REGEXP is non-nil, then both POINT-FORMAT and EOB-FORMAT
+should contain \"%N\", which is replaced with the number that was
+determined in the previous step.
+
+Both formats, if non-nil and after removing %N, are then expanded
+using \"git show --format=FORMAT ...\" inside TOPLEVEL.
+
+The expansion of POINT-FORMAT is inserted at point, and the
+expansion of EOB-FORMAT is inserted at the end of the buffer (if
+the buffer ends with a comment, then it is inserted right before
+that)."
+  :package-version '(magit . "3.2.0")
+  :group 'magit-commands
+  :type '(list (choice (string :tag "Insert at point format")
+                       (cons (string :tag "Insert at point format")
+                             (repeat (string :tag "Argument to git show")))
+                       (const :tag "Don't insert at point" nil))
+               (choice (string :tag "Insert at eob format")
+                       (cons (string :tag "Insert at eob format")
+                             (repeat (string :tag "Argument to git show")))
+                       (const :tag "Don't insert at eob" nil))
+               (choice (regexp :tag "Find index regexp")
+                       (const :tag "Don't number entries" nil))))
+
+(defcustom magit-copy-revision-abbreviated nil
+  "Whether to save abbreviated revision to `kill-ring' and `magit-revision-stack'."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-miscellaneous
+  :type 'boolean)
+
+;;;###autoload
+(defun magit-pop-revision-stack (rev toplevel)
+  "Insert a representation of a revision into the current buffer.
+
+Pop a revision from the `magit-revision-stack' and insert it into
+the current buffer according to `magit-pop-revision-stack-format'.
+Revisions can be put on the stack using `magit-copy-section-value'
+and `magit-copy-buffer-revision'.
+
+If the stack is empty or with a prefix argument, instead read a
+revision in the minibuffer.  By using the minibuffer history this
+allows selecting an item which was popped earlier or to insert an
+arbitrary reference or revision without first pushing it onto the
+stack.
+
+When reading the revision from the minibuffer, then it might not
+be possible to guess the correct repository.  When this command
+is called inside a repository (e.g., while composing a commit
+message), then that repository is used.  Otherwise (e.g., while
+composing an email) then the repository recorded for the top
+element of the stack is used (even though we insert another
+revision).  If not called inside a repository and with an empty
+stack, or with two prefix arguments, then read the repository in
+the minibuffer too."
+  (interactive
+    (if (or current-prefix-arg (not magit-revision-stack))
+        (let ((default-directory
+               (or (and (not (= (prefix-numeric-value current-prefix-arg) 16))
+                        (or (magit-toplevel)
+                            (cadr (car magit-revision-stack))))
+                   (magit-read-repository))))
+          (list (magit-read-branch-or-commit "Insert revision")
+                default-directory))
+      (push (caar magit-revision-stack) magit-revision-history)
+      (pop magit-revision-stack)))
+  (unless rev
+    (user-error "Revision stack is empty"))
+  (pcase-let ((`(,pnt-format ,eob-format ,idx-format)
+               magit-pop-revision-stack-format))
+    (let ((default-directory toplevel)
+          (idx (and idx-format
+                    (if (save-excursion
+                          (re-search-backward idx-format nil t))
+                        (number-to-string (1+ (string-to-number (match-str 1))))
+                      "1")))
+          (pnt-args nil)
+          (eob-args nil))
+      (when (listp pnt-format)
+        (pcase-setq `(,pnt-format . ,pnt-args) pnt-format))
+      (when (listp eob-format)
+        (pcase-setq `(,eob-format . ,eob-args) eob-format))
+      (when pnt-format
+        (when idx-format
+          (setq pnt-format (string-replace "%N" idx pnt-format)))
+        (when (and (bolp) comment-start (looking-at comment-start))
+          (save-excursion (insert ?\n)))
+        (magit-rev-insert-format pnt-format rev pnt-args)
+        (delete-char -1))
+      (when eob-format
+        (when idx-format
+          (setq eob-format (string-replace "%N" idx eob-format)))
+        (git-commit--insert-trailer-1
+         (with-temp-buffer
+           (magit-rev-insert-format eob-format rev eob-args)
+           (string-trim (buffer-string)))
+         t)))))
+
+;;;###autoload
+(defun magit-copy-section-value (arg)
+  "Save the value of the current section for later use.
+
+Save the section value to the `kill-ring', and, provided that
+the current section is a commit, branch, or tag section, push
+the (referenced) revision to the `magit-revision-stack' for use
+with `magit-pop-revision-stack'.
+
+When `magit-copy-revision-abbreviated' is non-nil, save the
+abbreviated revision to the `kill-ring' and the
+`magit-revision-stack'.
+
+When the current section is a branch or a tag, and a prefix
+argument is used, then save the revision at its tip to the
+`kill-ring' instead of the reference name.
+
+When the region is active, then save that to the `kill-ring',
+like `kill-ring-save' would, instead of behaving as described
+above.  If a prefix argument is used and the region is within
+a hunk, then strip the diff marker column and keep only either
+the added or removed lines, depending on the sign of the prefix
+argument."
+  (interactive "P")
+  (cond-let*
+    ((and arg
+          (magit-section-internal-region-p)
+          (magit-section-match 'hunk))
+     (kill-new
+      (thread-last (buffer-substring-no-properties
+                    (region-beginning)
+                    (region-end))
+        (replace-regexp-in-string
+         (format "^\\%c.*\n?" (if (< (prefix-numeric-value arg) 0) ?+ ?-))
+         "")
+        (replace-regexp-in-string "^[ +-]" "")))
+     (deactivate-mark))
+    ((use-region-p)
+     (call-interactively #'copy-region-as-kill))
+    ([section (magit-current-section)]
+     [value (oref section value)]
+     (magit-section-case
+       ((branch commit module-commit tag)
+        (let ((default-directory default-directory) ref)
+          (magit-section-case
+            ((branch tag)
+             (setq ref value))
+            (module-commit
+             (setq default-directory
+                   (file-name-as-directory
+                    (expand-file-name (magit-section-parent-value section)
+                                      (magit-toplevel))))))
+          (setq value (magit-rev-parse
+                       (and magit-copy-revision-abbreviated "--short")
+                       value))
+          (push (list value default-directory) magit-revision-stack)
+          (kill-new (message "%s" (or (and current-prefix-arg ref)
+                                      value)))))
+       (t (kill-new (message "%s" value)))))))
+
+;;;###autoload
+(defun magit-copy-buffer-revision ()
+  "Save the revision of the current buffer for later use.
+
+Save the revision shown in the current buffer to the `kill-ring'
+and push it to the `magit-revision-stack'.
+
+This command is mainly intended for use in `magit-revision-mode'
+buffers, the only buffers where it is always unambiguous exactly
+which revision should be saved.
+
+Most other Magit buffers usually show more than one revision, in
+some way or another, so this command has to select one of them,
+and that choice might not always be the one you think would have
+been the best pick.
+
+In such buffers it is often more useful to save the value of
+the current section instead, using `magit-copy-section-value'.
+
+When the region is active, then save that to the `kill-ring',
+like `kill-ring-save' would, instead of behaving as described
+above.
+
+When `magit-copy-revision-abbreviated' is non-nil, save the
+abbreviated revision to the `kill-ring' and the
+`magit-revision-stack'."
+  (interactive)
+  (cond-let*
+    ((use-region-p)
+     (call-interactively #'copy-region-as-kill))
+    ([rev (or magit-buffer-revision
+              (cl-case major-mode
+                (magit-diff-mode
+                 (if (string-match "\\.\\.\\.?\\(.+\\)"
+                                   magit-buffer-diff-range)
+                     (match-str 1 magit-buffer-diff-range)
+                   magit-buffer-diff-range))
+                (magit-status-mode "HEAD")))]
+     [_(magit-commit-p rev)]
+     (setq rev (magit-rev-parse
+                (and magit-copy-revision-abbreviated "--short")
+                rev))
+     (push (list rev default-directory) magit-revision-stack)
+     (kill-new (message "%s" rev)))))
+
+;;; Buffer Switching
+
+;;;###autoload
+(defun magit-display-repository-buffer (buffer)
+  "Display a Magit buffer belonging to the current Git repository.
+The buffer is displayed using `magit-display-buffer', which see."
+  (interactive (list (magit--read-repository-buffer
+                      "Display magit buffer: ")))
+  (magit-display-buffer (get-buffer buffer)))
+
+;;;###autoload
+(defun magit-switch-to-repository-buffer (buffer)
+  "Switch to a Magit buffer belonging to the current Git repository."
+  (interactive (list (magit--read-repository-buffer
+                      "Switch to magit buffer: ")))
+  (switch-to-buffer buffer))
+
+;;;###autoload
+(defun magit-switch-to-repository-buffer-other-window (buffer)
+  "Switch to a Magit buffer belonging to the current Git repository."
+  (interactive (list (magit--read-repository-buffer
+                      "Switch to magit buffer in another window: ")))
+  (switch-to-buffer-other-window buffer))
+
+;;;###autoload
+(defun magit-switch-to-repository-buffer-other-frame (buffer)
+  "Switch to a Magit buffer belonging to the current Git repository."
+  (interactive (list (magit--read-repository-buffer
+                      "Switch to magit buffer in another frame: ")))
+  (switch-to-buffer-other-frame buffer))
+
+(defun magit--read-repository-buffer (prompt)
+  (if-let ((topdir (magit-rev-parse-safe "--show-toplevel")))
+      (read-buffer
+       prompt (magit-get-mode-buffer 'magit-status-mode) t
+       (pcase-lambda (`(,_ . ,buf))
+         (and buf
+              (with-current-buffer buf
+                (and (or (derived-mode-p 'magit-mode
+                                         'magit-repolist-mode
+                                         'magit-submodule-list-mode
+                                         'git-rebase-mode)
+                         (and buffer-file-name
+                              (string-match-p git-commit-filename-regexp
+                                              buffer-file-name)))
+                     (equal (magit-rev-parse-safe "--show-toplevel")
+                            topdir))))))
+    (user-error "Not inside a Git repository")))
+
+;;; Miscellaneous
+
+;;;###autoload
+(defun magit-abort-dwim ()
+  "Abort current operation.
+Depending on the context, this will abort a merge, a rebase, a
+patch application, a cherry-pick, a revert, or a bisect."
+  (interactive)
+  (cond ((magit-merge-in-progress-p)     (magit-merge-abort))
+        ((magit-rebase-in-progress-p)    (magit-rebase-abort))
+        ((magit-am-in-progress-p)        (magit-am-abort))
+        ((magit-sequencer-in-progress-p) (magit-sequencer-abort))
+        ((magit-bisect-in-progress-p)    (magit-bisect-reset))))
+
+;;;###autoload
+(defun magit-back-to-indentation ()
+  "Move point to the first non-whitespace character on this line.
+In Magit diffs, also skip over - and + at the beginning of the line."
+  (interactive "^")
+  (beginning-of-line 1)
+  (when (and (magit-section-match 'hunk)
+             (looking-at (if (oref (magit-current-section) combined)
+                             "^ ?[-+]+"
+                           "^[-+]")))
+    (goto-char (match-end 0)))
+  (skip-syntax-forward " " (line-end-position))
+  (backward-prefix-chars))
+
+(defun magit-insert-nested-repositories ()
+  "Insert repositories below the current repository.
+
+If the current repository has submodules, then do nothing (in this case
+the expectation is that all nested repositories are submodules and that
+they are being listed using a function such as `magit-insert-modules').
+Otherwise look for nested repositories once, using \"find\", and cache
+the result.  That cache can be invalidated using `magit-zap-caches'.
+
+Note that \"find\" will be run once in every repository, including in
+huge repositories, which don't actually have any nested repositories.
+This may be highly inefficient and you might have to implement your own
+version of this function, which is more suited to your situation.  This
+function is mostly intended as a proof-of-concept."
+  (unless (magit-list-module-names)
+    (unless (magit-repository-local-exists-p 'nested-repos)
+      (magit-repository-local-set
+       'nested-repos
+       (mapcar (##file-name-directory (substring % 2))
+               (process-lines "find" "-name" ".git" "-mindepth" "2"))))
+    (when-let ((repos (magit-repository-local-get 'nested-repos)))
+      (magit-insert-section (repos repos t)
+        (magit-insert-heading
+          (format "%s (%s)"
+                  (propertize "Nested repositories"
+                              'font-lock-face 'magit-section-heading)
+                  (length repos)))
+        (magit-insert-section-body
+          (magit--insert-modules-overview nil repos))))))
+
+;;; _
+(provide 'magit-extras)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-extras.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-extras.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-extras.elc
new file mode 100644
index 0000000..0add570
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-extras.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-fetch.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-fetch.el
new file mode 100644
index 0000000..98e7f30
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-fetch.el
@@ -0,0 +1,204 @@
+;;; magit-fetch.el --- Download objects and refs  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements fetch commands.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-fetch "magit-fetch" nil t)
+(transient-define-prefix magit-fetch ()
+  "Fetch from another repository."
+  :man-page "git-fetch"
+  ["Arguments"
+   ("-p" "Prune deleted branches" ("-p" "--prune"))
+   ("-t" "Fetch all tags" ("-t" "--tags"))
+   ("-u" "Fetch full history" "--unshallow" :level 7)
+   ("-F" "Force" ("-f" "--force"))]
+  ["Fetch from"
+   ("p" magit-fetch-from-pushremote)
+   ("u" magit-fetch-from-upstream)
+   ("e" "elsewhere"        magit-fetch-other)
+   ("a" "all remotes"      magit-fetch-all)]
+  ["Fetch"
+   ("o" "another branch"   magit-fetch-branch)
+   ("r" "explicit refspec" magit-fetch-refspec)
+   ("m" "submodules"       magit-fetch-modules)]
+  ["Configure"
+   ("C" "variables..." magit-branch-configure)])
+
+(defun magit-fetch-arguments ()
+  (transient-args 'magit-fetch))
+
+(defun magit-git-fetch (remote args)
+  (run-hooks 'magit-credential-hook)
+  (magit-run-git-async "fetch" remote args))
+
+;;;###autoload(autoload 'magit-fetch-from-pushremote "magit-fetch" nil t)
+(transient-define-suffix magit-fetch-from-pushremote (args)
+  "Fetch from the current push-remote.
+
+With a prefix argument or when the push-remote is either not
+configured or unusable, then let the user first configure the
+push-remote."
+  :description #'magit-fetch--pushremote-description
+  (interactive (list (magit-fetch-arguments)))
+  (let ((remote (magit-get-push-remote)))
+    (when (or current-prefix-arg
+              (not (member remote (magit-list-remotes))))
+      (let ((var (magit--push-remote-variable)))
+        (setq remote
+              (magit-read-remote (format "Set %s and fetch from there" var)))
+        (magit-set remote var)))
+    (magit-git-fetch remote args)))
+
+(defun magit-fetch--pushremote-description ()
+  (let* ((branch (magit-get-current-branch))
+         (remote (magit-get-push-remote branch))
+         (v (magit--push-remote-variable branch t)))
+    (cond
+      ((member remote (magit-list-remotes)) remote)
+      (remote
+       (format "%s, replacing invalid" v))
+      ((format "%s, setting that" v)))))
+
+;;;###autoload(autoload 'magit-fetch-from-upstream "magit-fetch" nil t)
+(transient-define-suffix magit-fetch-from-upstream (remote args)
+  "Fetch from the \"current\" remote, usually the upstream.
+
+If the upstream is configured for the current branch and names
+an existing remote, then use that.  Otherwise try to use another
+remote: If only a single remote is configured, then use that.
+Otherwise if a remote named \"origin\" exists, then use that.
+
+If no remote can be determined, then this command is not available
+from the `magit-fetch' transient prefix and invoking it directly
+results in an error."
+  :if          (##magit-get-current-remote t)
+  :description (##magit-get-current-remote t)
+  (interactive (list (magit-get-current-remote t)
+                     (magit-fetch-arguments)))
+  (unless remote
+    (error "The \"current\" remote could not be determined"))
+  (magit-git-fetch remote args))
+
+;;;###autoload
+(defun magit-fetch-other (remote args)
+  "Fetch from another repository."
+  (interactive (list (magit-read-remote "Fetch remote")
+                     (magit-fetch-arguments)))
+  (magit-git-fetch remote args))
+
+;;;###autoload
+(defun magit-fetch-branch (remote branch args)
+  "Fetch a BRANCH from a REMOTE."
+  (interactive
+    (let ((remote (magit-read-remote-or-url "Fetch from remote or url")))
+      (list remote
+            (magit-read-remote-branch "Fetch branch" remote)
+            (magit-fetch-arguments))))
+  (magit-git-fetch remote (cons branch args)))
+
+;;;###autoload
+(defun magit-fetch-refspec (remote refspec args)
+  "Fetch a REFSPEC from a REMOTE."
+  (interactive
+    (let ((remote (magit-read-remote-or-url "Fetch from remote or url")))
+      (list remote
+            (magit-read-refspec "Fetch using refspec" remote)
+            (magit-fetch-arguments))))
+  (magit-git-fetch remote (cons refspec args)))
+
+;;;###autoload
+(defun magit-fetch-all (args)
+  "Fetch from all remotes."
+  (interactive (list (magit-fetch-arguments)))
+  (magit-git-fetch nil (cons "--all" args)))
+
+;;;###autoload
+(defun magit-fetch-all-prune ()
+  "Fetch from all remotes, and prune.
+Prune remote tracking branches for branches that have been
+removed on the respective remote."
+  (interactive)
+  (run-hooks 'magit-credential-hook)
+  (magit-run-git-async "remote" "update" "--prune"))
+
+;;;###autoload
+(defun magit-fetch-all-no-prune ()
+  "Fetch from all remotes."
+  (interactive)
+  (run-hooks 'magit-credential-hook)
+  (magit-run-git-async "remote" "update"))
+
+;;;###autoload(autoload 'magit-fetch-modules "magit-fetch" nil t)
+(transient-define-prefix magit-fetch-modules (&optional transient args)
+  "Fetch all populated submodules.
+
+Fetching is done using \"git fetch --recurse-submodules\", which
+means that the super-repository and recursively all submodules
+are also fetched.
+
+To set and potentially save other arguments invoke this command
+with a prefix argument."
+  :man-page "git-fetch"
+  :value (list "--verbose" "--jobs=4")
+  ["Arguments"
+   ("-v" "verbose"        "--verbose")
+   ("-j" "number of jobs" "--jobs=" :reader transient-read-number-N+)]
+  ["Action"
+   ("m" "fetch modules" magit-fetch-modules)]
+  (interactive (if current-prefix-arg
+                   (list t)
+                 (list nil (transient-args 'magit-fetch-modules))))
+  (if transient
+      (transient-setup 'magit-fetch-modules)
+    (magit-with-toplevel
+      (magit-run-git-async "fetch" "--recurse-submodules" args))
+    ;; Tried anyway; a future Git release may fix this defect.
+    (unless (magit-list-remotes)
+      (message "Cannot fetch modules if super-repository has no remotes"))))
+
+;;; _
+(provide 'magit-fetch)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-fetch.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-fetch.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-fetch.elc
new file mode 100644
index 0000000..aa14d17
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-fetch.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-files.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-files.el
new file mode 100644
index 0000000..f4ffbba
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-files.el
@@ -0,0 +1,864 @@
+;;; magit-files.el --- Finding files  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for finding blobs, staged files,
+;; and Git configuration files.  It also implements modes useful in
+;; buffers visiting files and blobs, and the commands used by those
+;; modes.
+
+;;; Code:
+
+(require 'magit)
+
+(require 'bookmark)
+
+(declare-function ediff-quit "ediff-util" (reverse-default-keep-variants))
+
+;;; Find Blob
+
+(define-obsolete-variable-alias 'magit-find-file-hook
+  'magit-find-blob-hook "Magit 4.6.0")
+
+(define-obsolete-variable-alias 'magit-find-index-hook
+  'magit-find-blob-hook "Magit 4.6.0")
+
+(defvar magit-find-blob-hook (list #'magit-blob-mode))
+
+(defvar-local magit-buffer-blob-oid--init nil)
+(defvar-local magit-buffer--volatile nil)
+(put 'magit-buffer--volatile 'permanent-local t)
+
+;;;###autoload
+(defun magit-find-file (rev file)
+  "View FILE from REV.
+Switch to a buffer visiting blob REV:FILE, creating one if none
+already exists.  If prior to calling this command the current
+buffer and/or cursor position is about the same file, then go
+to the line and column corresponding to that location."
+  (interactive (magit-find-file-read-args "Find file"))
+  (pop-to-buffer-same-window (magit-find-file-noselect rev file)))
+
+;;;###autoload
+(defun magit-find-file-other-window (rev file)
+  "View FILE from REV, in another window.
+Switch to a buffer visiting blob REV:FILE, creating one if none
+already exists.  If prior to calling this command the current
+buffer and/or cursor position is about the same file, then go to
+the line and column corresponding to that location."
+  (interactive (magit-find-file-read-args "Find file in other window"))
+  (switch-to-buffer-other-window (magit-find-file-noselect rev file)))
+
+;;;###autoload
+(defun magit-find-file-other-frame (rev file)
+  "View FILE from REV, in another frame.
+Switch to a buffer visiting blob REV:FILE, creating one if none
+already exists.  If prior to calling this command the current
+buffer and/or cursor position is about the same file, then go to
+the line and column corresponding to that location."
+  (interactive (magit-find-file-read-args "Find file in other frame"))
+  (switch-to-buffer-other-frame (magit-find-file-noselect rev file)))
+
+(defun magit-find-file-read-args (prompt)
+  (let* ((pseudo-revs '("{worktree}" "{index}"))
+         (rev (magit-completing-read "Find file from revision"
+                                     (append pseudo-revs
+                                             (magit-list-refnames nil t))
+                                     nil 'any nil 'magit-revision-history
+                                     (or (magit-branch-or-commit-at-point)
+                                         (magit-get-current-branch)))))
+    (list rev
+          (magit-read-file-from-rev (if (member rev pseudo-revs) "HEAD" rev)
+                                    prompt))))
+
+(defun magit-find-file-noselect (rev file &optional no-restore-position volatile)
+  "Read FILE from REV into a buffer and return the buffer.
+REV is a revision or one of \"{worktree}\" or \"{index}\".
+Non-interactively REV can also be a blob object."
+  (let* ((rev (pcase rev
+                ('nil "{worktree}")
+                ((and "{index}"
+                      (guard (length> (magit--file-index-stages file) 1)))
+                 "{worktree}")
+                (rev rev)))
+         (topdir (magit-toplevel))
+         (file (expand-file-name file topdir))
+         (buffer
+          (cond-let
+            ((equal rev "{worktree}")
+             (let ((revert-without-query
+                    (if (and$ (find-buffer-visiting file)
+                              (buffer-local-value 'auto-revert-mode $))
+                        (cons "." revert-without-query)
+                      revert-without-query)))
+               (find-file-noselect file volatile)))
+            ((not topdir)
+             (error "%s is not inside a Git repository" file))
+            ([defdir (file-name-directory file)]
+             [rev (magit--abbrev-if-oid rev)]
+             (unless (file-in-directory-p file topdir)
+               (error "%s is not inside Git repository %s" file topdir))
+             (with-current-buffer
+                 (magit--get-blob-buffer rev file volatile)
+               (if (magit-blob-p rev)
+                   (setq magit-buffer-blob-oid--init (magit-rev-parse rev))
+                 (setq magit-buffer-revision rev))
+               (setq magit-buffer-file-name file)
+               (setq default-directory
+                     (if (file-exists-p defdir) defdir topdir))
+               (setq-local revert-buffer-function #'magit--revert-blob-buffer)
+               (setq-local buffer-read-only t)
+               (setq-local read-only-mode--state t)
+               (magit--refresh-blob-buffer)
+               (current-buffer)))
+            ((error "Unexpected error")))))
+    (when (and (not no-restore-position)
+               (equal magit-buffer-file-name file))
+      (let ((pos (magit-find-file--position)))
+        (with-current-buffer buffer
+          (apply #'magit-find-file--restore-position pos))))
+    buffer))
+
+(defun magit--get-blob-buffer (obj file &optional volatile)
+  ;; If OBJ is a commit, it is assumed to be abbreviated.
+  ;; FILE is assumed to be relative to the top-level.
+  (cond-let
+    ([buf (if (magit-blob-p obj)
+              (magit--find-buffer 'magit-buffer-blob-oid (magit-rev-parse obj)
+                                  'magit-buffer-file-name file)
+            (magit--find-buffer 'magit-buffer-revision obj
+                                'magit-buffer-file-name file))]
+     (with-current-buffer buf
+       (when (and (not volatile) magit-buffer--volatile)
+         (setq magit-buffer--volatile nil)
+         (rename-buffer (magit--blob-buffer-name obj file))
+         (magit--blob-cache-remove buf)))
+     buf)
+    ([buf (get-buffer-create (magit--blob-buffer-name obj file volatile))]
+     (with-current-buffer buf
+       (setq magit-buffer--volatile volatile)
+       (magit--blob-cache-put buf))
+     (buffer-enable-undo buf)
+     buf)))
+
+(defun magit--blob-buffer-name (obj file &optional volatile relative)
+  (format "%s%s.~%s~"
+          (if volatile " " "")
+          (or (if relative (file-relative-name file (magit-toplevel)) file)
+              (and (magit-blob-p obj) "{blob}"))
+          (subst-char-in-string ?/ ?_ obj)))
+
+(defun magit--revert-blob-buffer (_ignore-auto _noconfirm)
+  (let ((pos (magit-find-file--position)))
+    (magit--refresh-blob-buffer t)
+    (apply #'magit-find-file--restore-position pos)))
+
+(defun magit--refresh-blob-buffer (&optional force)
+  (let ((old-blob-oid magit-buffer-blob-oid))
+    (cond
+      (magit-buffer-revision
+       (setq magit-buffer-revision-oid
+             (magit-commit-oid magit-buffer-revision t))
+       (setq magit-buffer-blob-oid
+             (magit-blob-oid magit-buffer-revision magit-buffer-file-name)))
+      (magit-buffer-blob-oid--init
+       (setq magit-buffer-blob-oid magit-buffer-blob-oid--init)
+       (setq magit-buffer-blob-oid--init nil)))
+    (when (or force (not (equal old-blob-oid magit-buffer-blob-oid)))
+      (let ((inhibit-read-only t))
+        (erase-buffer)
+        (save-excursion
+          (magit--insert-blob-contents magit-buffer-revision
+                                       (magit-file-relative-name))))
+      (magit--blob-normal-mode))))
+
+(defun magit--blob-normal-mode ()
+  (let ((buffer-file-name magit-buffer-file-name)
+        (buffer-name (buffer-name)))
+    ;; `font-lock-mode' contains a hardcoded condition that prevents it
+    ;; from being enabled in hidden buffers.  Use a fake `buffer-name'
+    ;; to trick it into believing the buffer is not hidden.
+    (if (eq (aref buffer-name 0) ?\s)
+        (letrec ((adv (lambda (fn &optional buffer)
+                        (let ((name (funcall fn buffer)))
+                          (if (equal name buffer-name)
+                              (substring name 1)
+                            name)))))
+          (advice-add 'buffer-name :around adv)
+          (unwind-protect
+              (normal-mode (not enable-local-variables))
+            (advice-remove 'buffer-name adv)))
+      ;; We want `normal-mode' to respect nil `enable-local-variables'.
+      ;; The FIND-FILE argument wasn't designed for our use case,
+      ;; so we have to use this strange invocation to achieve that.
+      (normal-mode (not enable-local-variables)))
+    ;; Set this here, so we don't have to make it permanent-local, which
+    ;; we probably shouldn't do, because for other packages changing the.
+    ;; If the user calls `normal-mode', this value will be discarded.
+    (setq-local bookmark-make-record-function #'magit--make-blob-bookmark)
+    (set-buffer-modified-p nil)
+    (run-hooks 'magit-find-blob-hook)))
+
+(defun magit-find-file--position ()
+  (list (or magit-buffer-revision-oid magit-buffer-revision "{worktree}")
+        magit-buffer-blob-oid
+        (line-number-at-pos)
+        (current-column)))
+
+(defun magit-find-file--restore-position (before blob line col)
+  (let ((file (magit-file-relative-name))
+        (rev (or magit-buffer-revision-oid magit-buffer-revision "{worktree}")))
+    (goto-char (point-min))
+    (forward-line
+     (1-
+      (pcase (list before rev)
+        ((guard (equal magit-buffer-blob-oid blob)) line)
+        ('("{worktree}" "{worktree}") line)
+        ('("{worktree}" "{index}")
+         (magit-diff-visit--offset line file "-R"))
+        (`("{worktree}" ,_)
+         (magit-diff-visit--offset line file "-R" rev))
+        ('("{index}" "{worktree}")
+         (magit-diff-visit--offset line file))
+        ('("{index}" "{index}")
+         (magit-diff-visit--offset line (list blob magit-buffer-blob-oid file)))
+        (`("{index}" ,_)
+         (magit-diff-visit--offset line file "-R" "--cached"))
+        (`(,_ "{worktree}")
+         (magit-diff-visit--offset line file before))
+        (`(,_ "{index}")
+         (magit-diff-visit--offset line file "--cached"))
+        (_
+         (magit-diff-visit--offset line file before rev)))))
+    (move-to-column col)))
+
+(defvar magit--blob-cache-limit 100
+  "Limit number of volatile blob buffers to be kept alive.
+If nil, only use `magit--blob-cache-timeout'.")
+(defvar magit--blob-cache-timeout 1800
+  "Limit age, since last access, of volatile blob buffers to be kept alive.
+Age is tracked in seconds.  If nil, only use `magit--blob-cache-limit'.")
+(defvar magit--blob-cache-interval 600
+  "Seconds between volatile blob buffer pruning runs.")
+(defvar magit--blob-cache-timer nil)
+(defvar magit--blob-cache nil)
+
+(defun magit--blob-cache-put (buffer)
+  (if-let ((elt (assq buffer magit--blob-cache)))
+      (setcdr elt (current-time))
+    (push (cons buffer (current-time)) magit--blob-cache))
+  (magit--blob-cache-start))
+
+(defun magit--blob-cache-remove (buffer)
+  (and$ (assq buffer magit--blob-cache)
+        (delq $ magit--blob-cache)))
+
+(defun magit--blob-cache-start ()
+  (when (and magit--blob-cache-interval
+             (not magit--blob-cache-timer))
+    (setq magit--blob-cache-timer
+          (run-with-timer magit--blob-cache-interval nil
+                          #'magit--blob-cache-prune))))
+
+(defun magit--blob-cache-prune ()
+  (when magit--blob-cache-timer
+    (cancel-timer magit--blob-cache-timer)
+    (setq magit--blob-cache-timer nil))
+  (pcase-let
+      ((`(,active ,rest)
+        (magit--separate
+         (pcase-lambda (`(,buffer))
+           (or (get-buffer-window buffer t)
+               (not (eq (buffer-local-value 'magit-buffer--volatile buffer) t))))
+         magit--blob-cache)))
+    (when magit--blob-cache-timeout
+      (setq rest
+            (seq-filter (pcase-lambda (`(,buffer . ,time))
+                          (cond
+                            ((not (buffer-live-p buffer)) nil)
+                            ((time-less-p (time-subtract (current-time) time)
+                                          magit--blob-cache-timeout)
+                             buffer)
+                            (t (kill-buffer buffer) nil)))
+                        rest)))
+    (when-let* ((_ magit--blob-cache-limit)
+                (ceiling (- magit--blob-cache-limit (length active)))
+                (_ (length> rest ceiling)))
+      (let ((sorted (compat-call sort rest
+                                 :key (##float-time (cdr %))
+                                 :lessp #'<
+                                 :reverse t)))
+        (dolist (kill (nthcdr ceiling sorted))
+          (kill-buffer (car kill)))
+        (setq rest (ntake ceiling sorted))))
+    (setq magit--blob-cache (nconc active rest)))
+  (magit--blob-cache-start))
+
+(defun magit--blob-cache-zap ()
+  (pcase-dolist (`(,buffer) magit--blob-cache)
+    (kill-buffer buffer))
+  (setq magit--blob-cache nil))
+
+(defun magit--inhibit-in-blob-buffers (fn &rest args)
+  "Prevent the advised function from doing anything in Magit blob buffers."
+  (unless magit-buffer-blob-oid
+    (apply fn args)))
+;; See bb8a65269d.
+(advice-add 'global-diff-hl-mode-enable-in-buffer ; Emacs >= 30
+            :around #'magit--inhibit-in-blob-buffers)
+(advice-add 'global-diff-hl-mode-enable-in-buffers ; Emacs < 30
+            :around #'magit--inhibit-in-blob-buffers)
+;; See 234a787b8c.
+(advice-add 'eglot--maybe-activate-editing-mode
+            :around #'magit--inhibit-in-blob-buffers)
+;; See https://github.com/doomemacs/doomemacs/pull/6309.
+(advice-add 'lsp
+            :around #'magit--inhibit-in-blob-buffers)
+
+;;; Blob Bookmarks
+
+(defun magit--make-blob-bookmark ()
+  (let* ((obj (or magit-buffer-revision
+                  magit-buffer-blob-oid))
+         (bookmark (cons nil (bookmark-make-record-default 'no-file))))
+    (bookmark-prop-set bookmark 'handler #'magit--handle-blob-bookmark)
+    (bookmark-prop-set bookmark 'revision obj)
+    (bookmark-prop-set bookmark 'filename magit-buffer-file-name)
+    ;; Determine buffer name anew to avoid using volatile name.
+    ;; These are offered to the user when they name the bookmark.
+    (bookmark-prop-set
+     bookmark 'defaults
+     (list (magit--blob-buffer-name obj magit-buffer-file-name nil t)
+           (magit--blob-buffer-name obj magit-buffer-file-name)))
+    bookmark))
+
+(defun magit--handle-blob-bookmark (bookmark)
+  (pop-to-buffer-same-window
+   (magit-find-file-noselect (bookmark-prop-get bookmark 'revision)
+                             (bookmark-prop-get bookmark 'filename)
+                             t)))
+
+;;; Update Index
+
+(defun magit-update-index ()
+  "Update the index with the contents of the current buffer.
+The current buffer has to be visiting a file in the index, which
+is done using `magit-find-index-noselect'."
+  (interactive)
+  (let ((file (magit-file-relative-name)))
+    (unless (equal magit-buffer-revision "{index}")
+      (user-error "%s isn't visiting the index" file))
+    (if (y-or-n-p (format "Update index with contents of %s?" (buffer-name)))
+        (let ((index (make-temp-name
+                      (expand-file-name "magit-update-index-" (magit-gitdir))))
+              (buffer (current-buffer)))
+          (magit-run-before-change-functions file "un-/stage")
+          (unwind-protect
+              (progn
+                (let ((coding-system-for-write buffer-file-coding-system))
+                  (with-temp-file index
+                    (insert-buffer-substring buffer)))
+                (magit-with-toplevel
+                  (magit-call-git
+                   "update-index" "--cacheinfo"
+                   (substring (magit-git-string "ls-files" "-s" file)
+                              0 6)
+                   (magit-git-string "hash-object" "-t" "blob" "-w"
+                                     (concat "--path=" file)
+                                     "--" (magit-convert-filename-for-git index))
+                   file)))
+            (ignore-errors (delete-file index)))
+          (set-buffer-modified-p nil)
+          (magit-run-after-apply-functions file "un-/stage"))
+      (message "Abort")))
+  (when$ (magit-get-mode-buffer 'magit-status-mode)
+    (with-current-buffer $
+      (magit-refresh)))
+  t)
+
+;;; Find Config File
+
+(defun magit-find-git-config-file (filename &optional wildcards)
+  "Edit a file located in the current repository's git directory.
+
+When \".git\", located at the root of the working tree, is a
+regular file, then that makes it cumbersome to open a file
+located in the actual git directory.
+
+This command is like `find-file', except that it temporarily
+binds `default-directory' to the actual git directory, while
+reading the FILENAME."
+  (interactive
+    (let ((default-directory (magit-gitdir)))
+      (find-file-read-args "Find file: "
+                           (confirm-nonexistent-file-or-buffer))))
+  (find-file filename wildcards))
+
+(defun magit-find-git-config-file-other-window (filename &optional wildcards)
+  "Edit a file located in the current repo's git directory, in another window.
+
+When \".git\", located at the root of the working tree, is a
+regular file, then that makes it cumbersome to open a file
+located in the actual git directory.
+
+This command is like `find-file-other-window', except that it
+temporarily binds `default-directory' to the actual git
+directory, while reading the FILENAME."
+  (interactive
+    (let ((default-directory (magit-gitdir)))
+      (find-file-read-args "Find file in other window: "
+                           (confirm-nonexistent-file-or-buffer))))
+  (find-file-other-window filename wildcards))
+
+(defun magit-find-git-config-file-other-frame (filename &optional wildcards)
+  "Edit a file located in the current repo's git directory, in another frame.
+
+When \".git\", located at the root of the working tree, is a
+regular file, then that makes it cumbersome to open a file
+located in the actual git directory.
+
+This command is like `find-file-other-frame', except that it
+temporarily binds `default-directory' to the actual git
+directory, while reading the FILENAME."
+  (interactive
+    (let ((default-directory (magit-gitdir)))
+      (find-file-read-args "Find file in other frame: "
+                           (confirm-nonexistent-file-or-buffer))))
+  (find-file-other-frame filename wildcards))
+
+;;; File Dispatch
+
+;;;###autoload(autoload 'magit-file-dispatch "magit" nil t)
+(transient-define-prefix magit-file-dispatch ()
+  "Invoke a Magit command that acts on the visited file.
+When invoked outside a file-visiting buffer, then fall back
+to `magit-dispatch'."
+  :info-manual "(magit) Minor Mode for Buffers Visiting Files"
+  [:if magit-file-relative-name
+   ["File actions"
+    ("  s" "Stage"    magit-file-stage :if-not-derived dired-mode)
+    ("  s" "Stage"    magit-dired-stage :if-derived dired-mode)
+    ("  u" "Unstage"  magit-file-unstage :if-not-derived dired-mode)
+    ("  u" "Unstage"  magit-dired-unstage :if-derived dired-mode)
+    (", x" "Untrack"  magit-file-untrack)
+    (", r" "Rename"   magit-file-rename)
+    (", k" "Delete"   magit-file-delete)
+    (", c" "Checkout" magit-file-checkout)]
+   ["Inspect"
+    ("D" "Diff..."    magit-diff)
+    ("d" "Diff"       magit-diff-buffer-file)]
+   [""
+    ("L" "Log..."     magit-log)
+    ("l" "Log"        magit-log-buffer-file :if-not-derived dired-mode)
+    ("l" "Log"        magit-dired-log :if-derived dired-mode)
+    ("t" "Trace"      magit-log-trace-definition)
+    ("M" "Merged"     magit-log-merged :level 7)]
+   [""
+    ("B" "Blame..."   magit-blame)
+    ("b" "Blame"      magit-blame-addition)
+    ("r" "...removal" magit-blame-removal)
+    ("f" "...reverse" magit-blame-reverse)
+    ("m" "Blame echo" magit-blame-echo)
+    ("q" "Quit blame" magit-blame-quit)]
+   ["Navigate"
+    ("p" "Prev blob"   magit-blob-previous)
+    ("n" "Next blob"   magit-blob-next)
+    ("v" "Goto blob"   magit-find-file)
+    ("V" "Goto file"   magit-blob-visit-file)
+    ("g" "Goto status" magit-status-here)
+    ("G" "Goto magit"  magit-display-repository-buffer)]
+   ["More actions"
+    ("c" "Commit"     magit-commit)
+    ("e" "Edit line"  magit-edit-line-commit)]]
+  [:if-not magit-file-relative-name
+   ["File actions"
+    ("s" "Stage"    magit-stage-files)
+    ("u" "Unstage"  magit-unstage-files)
+    ("x" "Untrack"  magit-file-untrack)
+    ("r" "Rename"   magit-file-rename)
+    ("k" "Delete"   magit-file-delete)
+    ("c" "Checkout" magit-file-checkout)]
+   ["Navigate"
+    ("g" "Goto status" magit-status-here :if-not-mode magit-status-mode)
+    ("G" "Goto magit"  magit-display-repository-buffer)]])
+
+;;; Blob Mode
+
+(defvar-keymap magit-blob-mode-map
+  :doc "Keymap for `magit-blob-mode'."
+  "<remap> <read-only-mode>" #'magit-blob-mode
+  "g" #'revert-buffer
+  "p" #'magit-blob-previous
+  "n" #'magit-blob-next
+  "b" #'magit-blame-addition
+  "r" #'magit-blame-removal
+  "f" #'magit-blame-reverse
+  "q" #'magit-bury-or-kill-buffer)
+
+(define-minor-mode magit-blob-mode
+  "Enable key bindings, which are useful in blob-visiting buffers.
+
+\\{magit-blob-mode-map}
+When the user disables `read-only-mode', these bindings would conflict
+with bindings for `self-insert-command'.  To avoid this conflict,
+`read-only-mode' is remapped to `magit-blob-mode' and disabling the
+latter disables both modes.  Likewise, enabling it, also enables
+`read-only-mode'.
+
+When this mode is disabled, many of the commands, for which it would
+single-character bindings, are accessible via \\[magit-file-dispatch]."
+  :package-version '(magit . "2.3.0")
+  ;; Don't actually call `read-only-mode'.  Because
+  ;; that could enable the incompatible `view-mode'.
+  (setq-local buffer-read-only magit-blob-mode)
+  (setq-local read-only-mode--state magit-blob-mode))
+
+(defun magit-bury-buffer (&optional kill-buffer)
+  "Bury the current buffer, or with a prefix argument kill it.
+
+If the buffer is used by an Ediff session, refuse to kill or bury just
+that buffer.  That former would break the session and the latter makes
+little sense in this context.  Instead offer to quit the whole session."
+  (interactive "P")
+  (cond ((bound-and-true-p ediff-this-buffer-ediff-sessions)
+         (ediff-quit nil))
+        (kill-buffer (kill-buffer))
+        ((bury-buffer))))
+
+(defun magit-bury-or-kill-buffer (&optional bury-buffer)
+  "Bury the current buffer if displayed in multiple windows, else kill it.
+
+With a prefix argument only bury the buffer even if it is only
+displayed in a single window.
+
+If the buffer is used by an Ediff session, refuse to kill or bury just
+that buffer.  That former would break the session and the latter makes
+little sense in this context.  Instead offer to quit the whole session."
+  (interactive "P")
+  (cond ((bound-and-true-p ediff-this-buffer-ediff-sessions)
+         (ediff-quit nil))
+        ((or bury-buffer (cdr (get-buffer-window-list nil nil t)))
+         (bury-buffer))
+        ((kill-buffer))))
+
+(defun magit-kill-this-buffer ()
+  "Kill the current buffer."
+  (interactive)
+  (kill-buffer))
+
+(transient-define-suffix magit-blob-previous ()
+  "Visit the previous blob which modified the current file."
+  :inapt-if-not (##and$ (magit-buffer-file-name)
+                        (magit-blob-ancestor (magit-buffer-revision) $))
+  (interactive)
+  (cond-let
+    [[rev  (or magit-buffer-revision "{worktree}")]
+     [file (magit-buffer-file-name)]]
+    ((not file)
+     (user-error "Buffer isn't visiting a file or blob"))
+    ([prev (magit-blob-ancestor rev file)]
+     (apply #'magit-blob-visit prev))
+    ((user-error "You have reached the beginning of time"))))
+
+(transient-define-suffix magit-blob-next ()
+  "Visit the next blob which modified the current file."
+  :inapt-if-nil 'magit-buffer-file-name
+  (interactive)
+  (cond-let
+    [[rev  (or magit-buffer-revision "{worktree}")]
+     [file (magit-buffer-file-name)]]
+    ((not file)
+     (user-error "Buffer isn't visiting a file or blob"))
+    ([next (magit-blob-successor rev file)]
+     (apply #'magit-blob-visit next))
+    ((user-error "You have reached the end of time"))))
+
+;;;###autoload
+(defun magit-blob-visit-file ()
+  "View the file from the worktree corresponding to the current blob.
+When visiting a blob or the version from the index, then go to
+the same location in the respective file in the working tree."
+  (interactive)
+  (if-let ((file (magit-file-relative-name)))
+      (pop-to-buffer-same-window (magit-find-file-noselect "{worktree}" file))
+    (user-error "Not visiting a blob")))
+
+(defun magit-blob-visit (rev file)
+  (magit-find-file rev file)
+  (unless (member rev '("{worktree}" "{index}"))
+    (apply #'message "%s (%s %s ago)"
+           (magit-rev-format "%s" rev)
+           (magit--age (magit-rev-format "%ct" rev)))))
+
+(defun magit-blob-ancestor (rev file)
+  (pcase rev
+    ((and "{worktree}" (guard (magit-anything-staged-p nil file)))
+     (list "{index}" file))
+    ((or "{worktree}" "{index}")
+     (list (magit-rev-abbrev "HEAD") file))
+    (_ (nth (if rev 1 0)
+            (magit-with-toplevel
+              (seq-partition
+               (magit-git-lines "log" "-2" "--format=%h" "--name-only"
+                                "--follow" (or rev "HEAD") "--" file)
+               2))))))
+
+(defun magit-blob-successor (rev file)
+  (pcase rev
+    ("{worktree}" nil)
+    ("{index}" (list "{worktree}" file))
+    (_ (let ((lines (magit-with-toplevel
+                      (magit-git-lines "log" "--format=%h" "--name-only"
+                                       "--follow" "HEAD" "--" file))))
+         (catch 'found
+           (while lines
+             (if (equal (nth 2 lines) rev)
+                 (throw 'found (list (nth 0 lines) (nth 1 lines)))
+               (setq lines (nthcdr 2 lines))))
+           (list (if (magit-anything-staged-p nil file) "{index}" "{worktree}")
+                 file))))))
+
+;;; File Commands
+
+;;;###autoload
+(defun magit-file-stage ()
+  "Stage all changes to the file being visited in the current buffer."
+  (interactive)
+  (unless buffer-file-name
+    (user-error "Not visiting a file"))
+  (magit-with-toplevel
+    (magit-stage-1 (and (magit-file-ignored-p buffer-file-name)
+                        (if (y-or-n-p "Visited file is ignored; stage anyway?")
+                            "--force"
+                          (user-error "Abort")))
+                   (list (magit-file-relative-name)))))
+
+;;;###autoload
+(defun magit-file-unstage ()
+  "Unstage all changes to the file being visited in the current buffer."
+  (interactive)
+  (unless buffer-file-name
+    (user-error "Not visiting a file"))
+  (magit-with-toplevel
+    (magit-unstage-1 (list (magit-file-relative-name)))))
+
+;;;###autoload
+(defun magit-file-untrack (files &optional force)
+  "Untrack the selected FILES or one file read in the minibuffer.
+
+With a prefix argument FORCE do so even when the files have
+staged as well as unstaged changes."
+  (interactive (list (or (if-let ((files (magit-region-values 'file t)))
+                             (if (magit-file-tracked-p (car files))
+                                 (magit-confirm-files 'untrack files "Untrack")
+                               (user-error "Already untracked"))
+                           (list (magit-read-tracked-file "Untrack file" t))))
+                     current-prefix-arg))
+  (magit-with-toplevel
+    (magit-run-git "rm" "--cached" (and force "--force") "--" files)))
+
+;;;###autoload
+(defun magit-file-rename (file newname)
+  "Rename or move FILE to NEWNAME.
+NEWNAME may be a file or directory name.  If FILE isn't tracked in
+Git, fallback to using `rename-file'."
+  (interactive
+    (let* ((file (magit-read-file "Rename file" nil t))
+           (path (expand-file-name file (magit-toplevel))))
+      (list path (expand-file-name
+                  (read-file-name (format "Move %s to destination: " file)
+                                  (file-name-directory path))))))
+  (let ((oldbuf (get-file-buffer file))
+        (dstdir (file-name-directory newname))
+        (dstfile (if (directory-name-p newname)
+                     (concat newname (file-name-nondirectory file))
+                   newname)))
+    (when (and oldbuf (buffer-modified-p oldbuf))
+      (user-error "Save %s before moving it" file))
+    (when (file-exists-p dstfile)
+      (user-error "%s already exists" dstfile))
+    (unless (file-exists-p dstdir)
+      (user-error "Destination directory %s does not exist" dstdir))
+    (if (magit-file-tracked-p file)
+        (magit-call-git "mv"
+                        (magit-convert-filename-for-git file)
+                        (magit-convert-filename-for-git newname))
+      (rename-file file newname current-prefix-arg))
+    (when oldbuf
+      (with-current-buffer oldbuf
+        (let ((buffer-read-only buffer-read-only))
+          (set-visited-file-name dstfile nil t))
+        (if (fboundp 'vc-refresh-state)
+            (vc-refresh-state)
+          (with-no-warnings
+            (vc-find-file-hook))))))
+  (magit-refresh))
+
+;;;###autoload
+(defun magit-file-delete (files &optional force)
+  "Delete the selected FILES or one file read in the minibuffer.
+
+With a prefix argument FORCE do so even when the files have
+uncommitted changes.  When the files aren't being tracked in
+Git, then fallback to using `delete-file'."
+  (interactive (list (if-let ((files (magit-region-values 'file t)))
+                         (magit-confirm-files 'delete files "Delete")
+                       (list (magit-read-file "Delete file" nil t)))
+                     current-prefix-arg))
+  (let ((args (and force (list "--force"))))
+    (when-let ((dirs (seq-filter #'file-directory-p files)))
+      (if (yes-or-no-p (format "Recursively delete %s %S:"
+                               (if (length= dirs 1) "directory" "directories")
+                               (string-join dirs ",")))
+          (push "-r" args)
+        (user-error "Abort")))
+    (if (magit-file-tracked-p (car files))
+        (magit-call-git "rm" args "--" files)
+      (let ((topdir (magit-toplevel)))
+        (dolist (file files)
+          (setq file (expand-file-name file topdir))
+          (if (file-directory-p file)
+              (delete-directory file t t)
+            (delete-file file t))))))
+  (magit-refresh))
+
+;;;###autoload
+(defun magit-file-checkout (rev file)
+  "Checkout FILE from REV."
+  (interactive
+    (let ((rev (magit-read-branch-or-commit
+                "Checkout from revision" magit-buffer-revision)))
+      (list rev (magit-read-file-from-rev rev "Checkout file" nil t))))
+  (magit-with-toplevel
+    (magit-run-git "checkout" rev "--" file)))
+
+;;; Read File
+
+(defvar magit-read-file-hist nil)
+
+(defun magit-read-file-from-rev (rev prompt &optional default include-dirs)
+  (let ((files (magit-revision-files rev)))
+    (when include-dirs
+      (setq files (sort (nconc files (magit-revision-directories rev))
+                        #'string<)))
+    (magit-completing-read
+     prompt files nil t nil 'magit-read-file-hist
+     (car (member (or default (magit-current-file)) files)))))
+
+(defun magit-read-file (prompt &optional tracked-only include-dirs)
+  (let* ((files (nconc (magit-list-files)
+                       (and (not tracked-only)
+                            (magit-untracked-files))))
+         (choices
+          (if include-dirs
+              (let (dirs)
+                (dolist (file files)
+                  (while (and file
+                              (setq file (file-name-parent-directory file))
+                              (not (equal file "./")))
+                    (if (member file dirs)
+                        (setq file nil)
+                      (push file dirs))))
+                (sort (nconc dirs files) #'string<))
+            files)))
+    (magit-completing-read
+     prompt choices nil t nil nil
+     (car (member (or (magit-section-value-if '(file submodule))
+                      (magit-file-relative-name nil tracked-only))
+                  choices)))))
+
+(defun magit-read-tracked-file (prompt &optional include-dirs)
+  (magit-read-file prompt t include-dirs))
+
+(defun magit-read-unmerged-file (&optional prompt)
+  (let ((current  (magit-current-file))
+        (unmerged (magit-unmerged-files)))
+    (unless unmerged
+      (user-error "There are no unresolved conflicts"))
+    (magit-completing-read (or prompt "Resolve file")
+                           unmerged nil t nil nil
+                           (car (member current unmerged)))))
+
+(defun magit-read-file-choice (prompt files &optional error default)
+  "Read file from FILES.
+
+If FILES has only one member, return that instead of prompting.
+If FILES has no members, give a user error.  ERROR can be given
+to provide a more informative error.
+
+If DEFAULT is non-nil, use this as the default value instead of
+`magit-current-file'."
+  (pcase (length files)
+    (0 (user-error (or error "No file choices")))
+    (1 (car files))
+    (_ (magit-completing-read
+        prompt files nil t nil 'magit-read-file-hist
+        (car (member (or default (magit-current-file)) files))))))
+
+(defun magit-read-changed-file (rev-or-range prompt &optional default)
+  (magit-read-file-choice
+   prompt
+   (magit-changed-files rev-or-range)
+   default
+   (concat "No file changed in " rev-or-range)))
+
+;;; _
+
+(define-obsolete-function-alias 'magit-stage-buffer-file
+  'magit-file-stage "Magit 4.3.2")
+
+(define-obsolete-function-alias 'magit-unstage-buffer-file
+  'magit-file-unstage "Magit 4.3.2")
+
+(define-obsolete-function-alias 'magit-find-file-noselect-1
+  'magit-find-file-noselect "Magit 4.4.0")
+
+(defun magit-find-file--internal (rev file display)
+  (declare (obsolete magit-find-file-noselect "Magit 4.6.0"))
+  (let ((buf (magit-find-file-noselect rev file)))
+    (funcall display buf)
+    buf))
+
+(defun magit-find-file-index-noselect (file)
+  "Read FILE from the index into a buffer and return the buffer."
+  (declare (obsolete magit-find-file-noselect "Magit 4.6.0"))
+  (magit-find-file-noselect "{index}" file t))
+
+(provide 'magit-files)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-files.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-files.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-files.elc
new file mode 100644
index 0000000..2dbe81f
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-files.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-git.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-git.el
new file mode 100644
index 0000000..8df9dab
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-git.el
@@ -0,0 +1,3229 @@
+;;; magit-git.el --- Git functionality  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements wrappers for various Git plumbing commands.
+
+;;; Code:
+
+(require 'magit-base)
+
+(require 'format-spec)
+(require 'server)
+
+;; From `magit-branch'.
+(defvar magit-branch-prefer-remote-upstream)
+(defvar magit-published-branches)
+
+;; From `magit-margin'.
+(declare-function magit-maybe-make-margin-overlay "magit-margin" ())
+
+;; From `magit-mode'.
+(declare-function magit-buffer-file-name "magit-mode" ())
+(declare-function magit-get-mode-buffer "magit-mode"
+                  (mode &optional value frame))
+(declare-function magit-refresh "magit-mode" ())
+(defvar magit-buffer-diff-type)
+(defvar magit-buffer-diff-args)
+(defvar magit-buffer-file-name)
+(defvar magit-buffer-log-args)
+(defvar magit-buffer-log-files)
+(defvar magit-buffer-revision)
+
+;; From `magit-process'.
+(declare-function magit-call-git "magit-process" (&rest args))
+(declare-function magit-git "magit-process" (&rest args))
+(declare-function magit-process-buffer "magit-process" (&optional nodisplay))
+(declare-function magit-process-file "magit-process"
+                  (process &optional infile buffer display &rest args))
+(declare-function magit-process-finish-section "magit-process"
+                  (section exit-code))
+(declare-function magit-process-git "magit-process" (destination &rest args))
+(declare-function magit-process-insert-section "magit-process"
+                  (pwd program args &optional errcode errlog face))
+(defvar magit-this-error)
+(defvar magit-process-error-message-regexps)
+
+;; From `magit-status'.
+(defvar magit-status-show-untracked-files)
+
+(eval-and-compile ;declare slot names
+  (cl-pushnew 'orig-rev eieio--known-slot-names)
+  (cl-pushnew 'number eieio--known-slot-names))
+
+(defvar crm-prompt) ; Emacs 31.1
+
+;;; Options
+
+;; For now this is shared between `magit-process' and `magit-git'.
+(defgroup magit-process nil
+  "Git and other external processes used by Magit."
+  :group 'magit)
+
+(defvar magit-git-environment
+  (list (format "INSIDE_EMACS=%s,magit" emacs-version))
+  "Prepended to `process-environment' while running git.")
+
+(defcustom magit-git-output-coding-system
+  (and (eq system-type 'windows-nt) 'utf-8)
+  "Coding system for receiving output from Git.
+
+If non-nil, the Git config value `i18n.logOutputEncoding' should
+be set via `magit-git-global-arguments' to value consistent with
+this."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-process
+  :type '(choice (coding-system :tag "Coding system to decode Git output")
+                 (const :tag "Use system default" nil)))
+
+(defun magit--early-process-lines (program &rest args)
+  "Only used to initialize custom options."
+  (let ((process-environment
+         (append magit-git-environment process-environment)))
+    (ignore-error file-missing
+      (apply #'process-lines-ignore-status program args))))
+
+(defvar magit--git-w32-path-hack nil
+  "Alist of (EXE . (PATHENTRY)).
+This specifies what additional PATH setting needs to be added to
+the environment in order to run the non-wrapper git executables
+successfully.  Set when `magit-git-executable' is (re)initialized.")
+
+(defcustom magit-git-executable
+  (or (and (eq system-type 'windows-nt)
+           ;; Avoid the wrappers "cmd/git.exe" and "cmd/git.cmd",
+           ;; which are much slower than using "bin/git.exe" directly.
+           (and-let ((exec (executable-find "git")))
+             ;; Git for Windows 2.x provides cygpath so we can
+             ;; ask it for native paths.
+             (let* ((core-exe
+                     (car (magit--early-process-lines
+                           exec "-c"
+                           "alias.X=!x() { which \"$1\" | cygpath -mf -; }; x"
+                           "X" "git")))
+                    (hack-entry (assoc core-exe magit--git-w32-path-hack))
+                    ;; Running the libexec/git-core executable
+                    ;; requires some extra PATH entries.
+                    (path-hack
+                     (list (concat "PATH="
+                                   (car (magit--early-process-lines
+                                         exec "-c"
+                                         "alias.P=!cygpath -wp \"$PATH\""
+                                         "P"))))))
+               ;; The defcustom STANDARD expression can be
+               ;; evaluated many times, so make sure it is
+               ;; idempotent.
+               (if hack-entry
+                   (setcdr hack-entry path-hack)
+                 (push (cons core-exe path-hack) magit--git-w32-path-hack))
+               core-exe)))
+      (and (eq system-type 'darwin)
+           (executable-find "git"))
+      "git")
+  "The Git executable used by Magit on the local host.
+On remote machines `magit-remote-git-executable' is used instead."
+  :package-version '(magit . "3.2.0")
+  :group 'magit-process
+  :type 'string)
+
+(defcustom magit-remote-git-executable "git"
+  "The Git executable used by Magit on remote machines.
+On the local host `magit-git-executable' is used instead.
+Consider customizing `tramp-remote-path' instead of this
+option."
+  :package-version '(magit . "3.2.0")
+  :group 'magit-process
+  :type 'string)
+
+(defcustom magit-run-hooks-from-githooks t
+  "Whether Git hooks may run Lisp hooks.
+
+By default the Lisp hook `magit-common-git-post-commit-functions' is
+run by the Git hooks `post-commit', `post-merge' and `post-rewrite'.
+Use `magit-user-githook-file' (which see) to define additional hooks.
+
+Git hooks can only run Lisp hooks, if Magit invokes Git asynchronously
+and on the local machine, and at least Git v2.54.0 is used."
+  :package-version '(magit . "4.6.0")
+  :group 'magit-process
+  :type 'boolean)
+
+(defcustom magit-user-githook-file (locate-user-emacs-file "magit-githooks")
+  "File containing user Git hook to Lisp hook mappings.
+
+Magit ships with one such mapping, defined in the included file
+\"githooks/config\", which looks like this:
+
+[hook \"magit-common-post-commit\"]
+  event = post-commit
+  event = post-merge
+  event = post-rewrite
+  command = magit-run-git-hook magit-common-git-post-commit-functions
+
+That file should not be edited by users, as those edits would be lost
+when Magit is updated; instead the file specified by this option, has
+to be used, to add additional mappings.
+
+See the git-hook(1) and githooks(5) manpages for details about the
+Git part.  The command should always use the \"magit-run-git-hook\"
+executable, which takes the name of the Lisp hook to be run as the
+first argument.
+
+See also `magit-run-hooks-from-githooks'."
+  :package-version '(magit . "4.6.0")
+  :group 'magit-process
+  :type 'file)
+
+(defvar magit-githook-directory nil
+  "Directory containing files Magit needs to map Git to Lisp hooks.
+
+This directory must contains two files; \"config\", which maps Git
+hooks to the `magit-common-git-post-commit-functions' hook, and an
+executable \"magit-run-git-hook\", which is used in that, and
+potentially other hooks.
+
+The value of this variable is set by `magit-process-git-arguments',
+when it is first needed.  Users can set it to another directory,
+but that should rarely be necessary.  Additional hook mappings
+should instead be defined in `magit-user-githook-file'.")
+
+(defcustom magit-git-global-arguments
+  `("--no-pager" "--literal-pathspecs"
+    "-c" "core.preloadIndex=true"
+    "-c" "log.showSignature=false"
+    "-c" "color.ui=false"
+    "-c" "color.diff=false"
+    "-c" "diff.noPrefix=false"
+    ,@(and (eq system-type 'windows-nt)
+           (list "-c" "i18n.logOutputEncoding=UTF-8")))
+  "Global Git arguments.
+
+The arguments set here are used every time the git executable is run
+as a subprocess.  They are placed right after the executable itself
+and before the git command - as in \"git HERE... COMMAND REST\".
+See the manpage `git(1)' for valid arguments.
+
+Be careful what you add here, especially if you are using Tramp to
+connect to servers with ancient Git versions.  Never remove anything
+that is part of the default value, unless you really know what you
+are doing.  And think very hard before adding something; it will be
+used every time Magit runs Git for any purpose."
+  :package-version '(magit . "4.3.2")
+  :group 'magit-commands
+  :group 'magit-process
+  :type '(repeat string))
+
+(defcustom magit-prefer-remote-upstream nil
+  "Whether to favor remote branches when reading the upstream branch.
+
+This controls whether commands that read a branch from the user
+and then set it as the upstream branch, offer a local or a remote
+branch as default completion candidate, when they have the choice.
+
+This affects all commands that use `magit-read-upstream-branch'
+or `magit-read-starting-point', which includes most commands
+that change the upstream and many that create new branches."
+  :package-version '(magit . "2.4.2")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defcustom magit-list-refs-namespaces
+  '("refs/heads"
+    "refs/remotes"
+    "refs/tags")
+  "List of ref namespaces considered when reading a ref.
+
+This controls which refs are returned by `magit-list-refs', which
+is called by functions like `magit-list-branch-names' to generate
+the collection of refs.  Additionally namespaces appear in the same
+order as specified here."
+  :package-version '(magit . "4.4.0")
+  :group 'magit-commands
+  :type '(repeat string))
+
+(defcustom magit-list-refs-sortby nil
+  "How to sort the ref collection in the prompt.
+
+This affects commands that read a ref.  More specifically, it
+controls the order of refs returned by `magit-list-refs', which
+is called by functions like `magit-list-branch-names' to generate
+the collection of refs.  By default, refs are sorted according to
+their full refname (i.e., \"refs/...\").
+
+Any value accepted by the \"--sort\" flag of \"git for-each-ref\" can
+be used.  For example, \"-creatordate\" places refs with more
+recent committer or tagger dates earlier in the list.  A list of
+strings can also be given in order to pass multiple sort keys to
+\"git for-each-ref\".
+
+Regardless of what is specified here, refs are first sorted by
+namespace, according to the order of `magit-list-refs-namespaces'.
+
+Note that, depending on the completion framework you use, this
+may not be sufficient to change the order in which the refs are
+displayed.  It only controls the order of the collection passed
+to `magit-completing-read' or, for commands that support reading
+multiple strings, `read-from-minibuffer'.  The completion
+framework ultimately determines how the collection is displayed."
+  :package-version '(magit . "2.11.0")
+  :group 'magit-miscellaneous
+  :type '(choice string (repeat string)))
+
+(defcustom magit-cygwin-mount-points
+  (and (eq system-type 'windows-nt)
+       (compat-call
+        sort (mapcar (lambda (mount)
+                       (if (string-match "^\\(.*\\) on \\(.*\\) type" mount)
+                           (cons (file-name-as-directory (match-str 2 mount))
+                                 (file-name-as-directory (match-str 1 mount)))
+                         (lwarn '(magit) :error
+                                "Failed to parse Cygwin mount: %S" mount)))
+                     ;; If --exec-path is not a native Windows path,
+                     ;; then we probably have a cygwin git.
+                     (and-let ((dirs (magit--early-process-lines
+                                      magit-git-executable "--exec-path")))
+                       (and (not (string-match-p "\\`[a-zA-Z]:" (car dirs)))
+                            (magit--early-process-lines "mount"))))
+        :lessp #'< :reverse t :key (pcase-lambda (`(,cyg . ,_win)) (length cyg))))
+  "Alist of (CYGWIN . WIN32) directory names.
+Sorted from longest to shortest CYGWIN name."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-process
+  :type '(alist :key-type string :value-type directory))
+
+;;; Git
+
+(defvar magit-git-debug nil
+  "Whether and how to enable additional debugging of git errors.
+
+Use `magit-toggle-git-debug' (which see) to toggle the boolean value of
+this variable.  This can also manually be set to `include-success', in
+which case successful git invocations are also logged.
+
+This can also be a function, which takes one argument, the error output
+as a string.  This is intended for internal use and is established using
+let-bindings around critical code (i.e., in `magit--assert-usable-git').")
+
+(defun magit-toggle-git-debug ()
+  "Toggle whether additional git errors are reported.
+
+Magit basically calls git for one of these two reasons: for
+side-effects or to do something with its standard output.
+
+When git is run for side-effects then its output, including error
+messages, go into the process buffer which is shown when using \
+\\<magit-mode-map>\\[magit-process-buffer].
+
+When git's output is consumed in some way, then it would be too
+expensive to also insert it into this buffer, but with this command
+that can be enabled temporarily.  In that case, if git returns with
+a non-zero exit status, then at least its standard error is inserted
+into this buffer.
+
+See info node `(magit)Debugging Tools' for more information."
+  (interactive)
+  (setq magit-git-debug (not magit-git-debug))
+  (message "Additional reporting of Git errors %s"
+           (if magit-git-debug "enabled" "disabled")))
+
+(defvar magit--refresh-cache nil
+  "Cache used during refreshes and other expensive operations.
+
+If non-nil, this has the form ((HITS . COUNT) . ENTRIES).  HITS is how
+many times any of the cached ENTRIES were accessed.  COUNT is the number
+of ENTRIES.  Each entry has the form (KEY . VALUE).  KEY can have one
+of two forms (TOPDIR . ARGUMENTS) or (TOPDIR . ACTION).  TOPDIR is the
+top-level directory of a repository.  ARGUMENTS are arguments to git.
+ACTION is a symbol identifying an action other than calling git.  VALUE
+is the cached value.")
+
+(defmacro magit--with-refresh-cache (key &rest body)
+  (declare (indent 1) (debug (form body)))
+  (let ((k (gensym))
+        (hit (gensym)))
+    `(if magit--refresh-cache
+         (let ((,k ,key))
+           (unless (zerop (recursion-depth))
+             (setq magit--refresh-cache nil))
+           (if-let ((,hit (assoc ,k (cdr magit--refresh-cache))))
+               (progn (incf (caar magit--refresh-cache))
+                      (cdr ,hit))
+             (let ((value ,(macroexp-progn body)))
+               (when (zerop (recursion-depth))
+                 (incf (cdar magit--refresh-cache))
+                 (push (cons ,k value)
+                       (cdr magit--refresh-cache)))
+               value)))
+       ,@body)))
+
+(defvar magit-with-editor-envvar "GIT_EDITOR"
+  "The environment variable exported by `magit-with-editor'.
+Set this to \"GIT_SEQUENCE_EDITOR\" if you do not want to use
+Emacs to edit commit messages but would like to do so to edit
+rebase sequences.")
+
+(defmacro magit-with-editor (&rest body)
+  "Like `with-editor*' but let-bind some more variables.
+Also respect the value of `magit-with-editor-envvar', prevent the
+process buffer from popping up, and on Windows possibly employ a
+kludge to fix an unusable value of `shell-file-name'."
+  (declare (indent 0) (debug (body)))
+  `(let ((magit-process-popup-time -1)
+         ;; The user may have customized `shell-file-name' to something
+         ;; which results in `w32-shell-dos-semantics' being nil (which
+         ;; changes the quoting style used by `shell-quote-argument'),
+         ;; but Git for Windows expects shell quoting in the dos style.
+         (shell-file-name (if (and (eq system-type 'windows-nt)
+                                   ;; If we have Cygwin mount points,
+                                   ;; the git flavor is cygwin, so dos
+                                   ;; shell quoting is probably wrong.
+                                   (not magit-cygwin-mount-points))
+                              "cmdproxy"
+                            shell-file-name)))
+     (with-editor* magit-with-editor-envvar
+       ,@body)))
+
+(defmacro magit--with-temp-process-buffer (&rest body)
+  "Like `with-temp-buffer', but always propagate `process-environment'.
+When that var is buffer-local in the calling buffer, it is not
+propagated by `with-temp-buffer', so we explicitly ensure that
+happens, so that processes will be invoked consistently.  BODY is
+as for that macro."
+  (declare (indent 0) (debug (body)))
+  (let ((p (gensym)))
+    `(let ((,p process-environment))
+       (with-temp-buffer
+         (setq-local process-environment ,p)
+         ,@body))))
+
+(defsubst magit-git-executable ()
+  "Return value of `magit-git-executable' or `magit-remote-git-executable'.
+The variable is chosen depending on whether `default-directory'
+is remote."
+  (if (file-remote-p default-directory)
+      magit-remote-git-executable
+    magit-git-executable))
+
+(defun magit-process-git-arguments--split (program args)
+  (if (equal program (magit-git-executable))
+      (let* ((length (length magit-git-global-arguments))
+             (global (seq-take args length))
+             (local  (seq-drop args length)))
+        (while (equal (car local) "-c")
+          (setq global (append global (seq-take local 2)))
+          (setq local (seq-drop local 2)))
+        (list global local))
+    (list nil args)))
+
+(defun magit-process-git-arguments (args &optional async)
+  "Prepare ARGS for a function that invokes Git.
+
+Magit has many specialized functions for running Git; they all
+pass arguments through this function before handing them to Git,
+to do the following.
+
+* Prepend `magit-git-global-arguments' to ARGS.
+* If ASYNC is non-nil, potentially add additional arguments to load
+  the hook configuration in \"/path/to/magit/githooks/config\" and/or
+  `magit-user-githook-file'.
+* Flatten ARGS, removing nil arguments.
+* If `system-type' is `windows-nt', encode ARGS to `w32-ansi-code-page'."
+  (let ((githookp (and async
+                       (magit-git-version>= "2.54")
+                       (not (file-remote-p default-directory)))))
+    (cond
+      ((not githookp))
+      (magit-githook-directory)
+      ((and (stringp magit-run-hooks-from-githooks)
+            (file-directory-p magit-run-hooks-from-githooks))
+       (setq magit-githook-directory
+             (magit-convert-filename-for-git
+              magit-run-hooks-from-githooks)))
+      (magit-run-hooks-from-githooks
+       (setq magit-githook-directory
+             (magit-convert-filename-for-git
+              (expand-file-name "githooks"
+                                (locate-dominating-file
+                                 (locate-library "magit.el") "githooks"))))))
+    (setq args
+          (append magit-git-global-arguments
+                  (and githookp
+                       magit-githook-directory
+                       `("-c" ,(format "include.path=%s/config"
+                                       magit-githook-directory)
+                         ,@(and magit-user-githook-file
+                                (file-exists-p magit-user-githook-file)
+                                `("-c" ,(concat "include.path="
+                                                magit-user-githook-file)))))
+                  (flatten-tree args))))
+  (if (and (eq system-type 'windows-nt) (boundp 'w32-ansi-code-page))
+      ;; On w32, the process arguments *must* be encoded in the
+      ;; current code-page (see #3250).
+      (let ((coding (intern (format "cp%d" w32-ansi-code-page))))
+        (mapcar (##encode-coding-string % coding) args))
+    args))
+
+(defun magit-git-exit-code (&rest args)
+  "Execute Git with ARGS, returning its exit code."
+  (magit-process-git nil args))
+
+(defun magit-git-success (&rest args)
+  "Execute Git with ARGS, returning t if its exit code is 0."
+  (= (magit-git-exit-code args) 0))
+
+(defun magit-git-failure (&rest args)
+  "Execute Git with ARGS, returning t if its exit code is 1."
+  (= (magit-git-exit-code args) 1))
+
+(defun magit-git-string-ng (&rest args)
+  "Execute Git with ARGS, returning the first line of its output.
+If the exit code isn't zero or if there is no output, then that
+is considered an error, but instead of actually signaling an
+error, return nil.  Additionally the output is put in the process
+buffer (creating it if necessary) and the error message is shown
+in the status buffer (provided it exists).
+
+This is an experimental replacement for `magit-git-string', and
+still subject to major changes."
+  (magit--with-refresh-cache
+      (list default-directory 'magit-git-string-ng args)
+    (magit--with-temp-process-buffer
+      (let* ((args (magit-process-git-arguments args))
+             (status (magit-process-git t args)))
+        (if (zerop status)
+            (and (not (bobp))
+                 (progn
+                   (goto-char (point-min))
+                   (buffer-substring-no-properties
+                    (point) (line-end-position))))
+          (let ((buf (current-buffer)))
+            (with-current-buffer (magit-process-buffer t)
+              (magit-process-insert-section default-directory
+                                            magit-git-executable args
+                                            status buf
+                                            'magit-section-secondary-heading)))
+          (when-let ((status-buf (magit-get-mode-buffer 'magit-status-mode)))
+            (let ((msg (magit--locate-error-message)))
+              (with-current-buffer status-buf
+                (setq magit-this-error msg))))
+          nil)))))
+
+(defun magit-git-str (&rest args)
+  "Execute Git with ARGS, returning the first line of its output.
+If there is no output, return nil.  If the output begins with a
+newline, return an empty string.  Like `magit-git-string' but
+ignore `magit-git-debug'."
+  (setq args (flatten-tree args))
+  (magit--with-refresh-cache (cons default-directory args)
+    (magit--with-temp-process-buffer
+      (magit-process-git (list t nil) args)
+      (unless (bobp)
+        (goto-char (point-min))
+        (buffer-substring-no-properties (point) (line-end-position))))))
+
+(defun magit-git-output (&rest args)
+  "Execute Git with ARGS, returning its output."
+  (setq args (flatten-tree args))
+  (magit--with-refresh-cache (cons default-directory args)
+    (magit--with-temp-process-buffer
+      (magit-process-git (list t nil) args)
+      (buffer-substring-no-properties (point-min) (point-max)))))
+
+(define-error 'magit-invalid-git-boolean "Not a Git boolean")
+
+(defun magit-git-true (&rest args)
+  "Execute Git with ARGS, returning t if it prints \"true\".
+If it prints \"false\", then return nil.  For any other output
+signal `magit-invalid-git-boolean'."
+  (pcase (magit-git-output args)
+    ((or "true"  "true\n")  t)
+    ((or "false" "false\n") nil)
+    (output (signal 'magit-invalid-git-boolean (list output)))))
+
+(defun magit-git-false (&rest args)
+  "Execute Git with ARGS, returning t if it prints \"false\".
+If it prints \"true\", then return nil.  For any other output
+signal `magit-invalid-git-boolean'."
+  (pcase (magit-git-output args)
+    ((or "true"  "true\n")  nil)
+    ((or "false" "false\n") t)
+    (output (signal 'magit-invalid-git-boolean (list output)))))
+
+(defun magit-git-config-p (variable &optional default)
+  "Return the boolean value of the Git variable VARIABLE.
+VARIABLE has to be specified as a string.  If VARIABLE is unset,
+return nil by default, unless DEFAULT is non-nil, in which case
+return t.  Signal an error if VARIABLE is set but not a boolean."
+  (let ((args (list "config" "--bool" "--default" (if default "true" "false")
+                    variable)))
+    (magit--with-refresh-cache (cons default-directory args)
+      (magit--with-temp-process-buffer
+        (let ((status (magit-process-git t args))
+              (output (buffer-substring (point-min) (1- (point-max)))))
+          (if (zerop status)
+              (equal output "true")
+            (signal 'magit-invalid-git-boolean (list output))))))))
+
+(defun magit-git-insert (&rest args)
+  "Execute Git with ARGS, insert stdout at point and return exit code.
+If `magit-git-debug' is non-nil and the exit code is non-zero, then
+insert the run command and stderr into the process buffer."
+  (apply #'magit--git-insert nil args))
+
+(defun magit--git-insert (return-error &rest args)
+  (setq args (flatten-tree args))
+  (if (or return-error magit-git-debug)
+      (let (log)
+        (unwind-protect
+            (let (exit errmsg)
+              (setq log (make-temp-file "magit-stderr"))
+              (delete-file log)
+              (setq exit (magit-process-git (list t log) args))
+              (when (or (> exit 0) (eq magit-git-debug 'include-success))
+                (when (file-exists-p log)
+                  (with-temp-buffer
+                    (insert-file-contents log)
+                    (goto-char (point-max))
+                    (setq errmsg
+                          (cond
+                            ((eq return-error 'full)
+                             (let ((str (buffer-string)))
+                               (and (not (equal str "")) str)))
+                            ((functionp magit-git-debug)
+                             (funcall magit-git-debug (buffer-string)))
+                            ((magit--locate-error-message)))))
+                  (when magit-git-debug
+                    (let ((magit-git-debug nil))
+                      (with-current-buffer (magit-process-buffer t)
+                        (magit-process-finish-section
+                         (magit-process-insert-section
+                          default-directory magit-git-executable
+                          (magit-process-git-arguments args)
+                          exit log 'magit-section-secondary-heading)
+                         exit)))))
+                (cond ((not magit-git-debug))
+                      (errmsg (message "magit--git-insert: %S" errmsg))
+                      ((zerop exit))
+                      ((message "magit--git-insert: %s %s"
+                                "Git returned with exit-code" exit))))
+              (or (and return-error errmsg)
+                  exit))
+          (ignore-errors (delete-file log))))
+    (magit-process-git (list t nil) args)))
+
+(defun magit--locate-error-message ()
+  (goto-char (point-max))
+  (and (run-hook-wrapped 'magit-process-error-message-regexps
+                         (##re-search-backward % nil t))
+       (match-str 1)))
+
+(defun magit-git-string (&rest args)
+  "Execute Git with ARGS, returning the first line of its output (stdout).
+If the exit code isn't zero or if there is no output, then return nil.
+Neither of these results is considered an error; if that is what you
+want, then use `magit-git-string-ng' instead."
+  (setq args (flatten-tree args))
+  (magit--with-refresh-cache (cons default-directory args)
+    (magit--with-temp-process-buffer
+      (and (zerop (apply #'magit-git-insert args))
+           (not (bobp))
+           (progn
+             (goto-char (point-min))
+             (buffer-substring-no-properties (point) (line-end-position)))))))
+
+(defun magit-git-lines (&rest args)
+  "Execute Git with ARGS, returning its output as a list of lines.
+Empty lines anywhere in the output are omitted.
+
+If Git exits with a non-zero exit status, show a message and add
+a section in the respective process buffer."
+  (magit--with-temp-process-buffer
+    (apply #'magit-git-insert args)
+    (split-string (buffer-string) "\n" t)))
+
+(defun magit-git-items (&rest args)
+  "Execute Git with ARGS, returning its null-separated output as a list.
+Empty items anywhere in the output are omitted.
+
+If Git exits with a non-zero exit status, show a message and add
+a section in the respective process buffer."
+  (magit--with-temp-process-buffer
+    (apply #'magit-git-insert args)
+    (split-string (buffer-string) "\0" t)))
+
+(defun magit-git-wash (washer &rest args)
+  "Execute git with ARGS, inserting washed output at point.
+
+First insert the raw output at point.  If there is no output, call
+`magit-cancel-section'.  Otherwise temporarily narrow the buffer to
+the inserted text, move to its beginning, and finally call function
+WASHER with ARGS as its sole argument.
+
+If git exits with a non-zero exit status, apply the `error' face to
+the error message, instead of calling WASHER.  To instead cancel the
+section use `magit--git-wash'."
+  (declare (indent 1))
+  (apply #'magit--git-wash washer t args))
+
+(defun magit--git-wash (washer keep-error &rest args)
+  "Execute git with ARGS, inserting washed output at point.
+
+Like `magit-git-wash' but if KEEP-ERROR is nil and an error occurs, also
+insert standard error.  If KEEP-ERROR is `wash-anyway', insert and wash
+standard output even in case of an error."
+  (declare (indent 2))
+  (setq args (flatten-tree args))
+  (let ((beg (point))
+        (exit (magit--git-insert (and keep-error 'full) args)))
+    (when (stringp exit)
+      (goto-char beg)
+      (insert (magit--propertize-face exit 'error))
+      (insert (if (bolp) "\n" "\n\n")))
+    (if (= (point) beg)
+        (magit-cancel-section)
+      (unless (bolp)
+        (insert "\n"))
+      (when (or (equal exit 0)
+                (eq keep-error 'wash-anyway))
+        (save-restriction
+          (narrow-to-region beg (point))
+          (goto-char beg)
+          (funcall washer args))
+        (when (or (= (point) beg)
+                  (= (point) (1+ beg)))
+          (magit-cancel-section))
+        (magit-maybe-make-margin-overlay)))
+    exit))
+
+(defun magit-git-executable-find (command)
+  "Search for COMMAND in Git's exec path, falling back to `exec-path'.
+Like `executable-find', return the absolute file name of the
+executable."
+  (or (locate-file command
+                   (list (concat
+                          (file-remote-p default-directory)
+                          (or (magit-git-string "--exec-path")
+                              (error "\"git --exec-path\" failed"))))
+                   exec-suffixes
+                   #'file-executable-p)
+      (executable-find command t)))
+
+;;; Git Version
+
+(defconst magit--git-version-regexp
+  "\\`git version \\([0-9]+\\(\\.[0-9]+\\)\\{1,2\\}\\)")
+
+(defvar magit--host-git-version-cache nil)
+
+(defun magit-git-version>= (n)
+  "Return t if `magit-git-version's value is greater than or equal to N."
+  (magit--version>= (magit-git-version) n))
+
+(defun magit-git-version< (n)
+  "Return t if `magit-git-version's value is smaller than N."
+  (version< (magit-git-version) n))
+
+(defun magit-git-version ()
+  "Return the Git version used for `default-directory'.
+Raise an error if Git cannot be found, if it exits with a
+non-zero status, or the output does not have the expected
+format."
+  (magit--with-refresh-cache (list default-directory)
+    (let ((host (file-remote-p default-directory)))
+      (or (cdr (assoc host magit--host-git-version-cache))
+          (magit--with-temp-process-buffer
+            ;; Unset global arguments for ancient Git versions.
+            (let* ((magit-git-global-arguments nil)
+                   (status (magit-process-git t "version"))
+                   (output (buffer-string)))
+              (cond
+                ((not (zerop status))
+                 (display-warning
+                  'magit
+                  (format "%S\n\nRunning \"%s --version\" failed with output:\n\n%s"
+                          (if host
+                              (format "Magit cannot find Git on host %S.\n
+Check the value of `magit-remote-git-executable' using
+`magit-debug-git-executable' and consult the info node
+`(tramp)Remote programs'." host)
+                            "Magit cannot find Git.\n
+Check the values of `magit-git-executable' and `exec-path'
+using `magit-debug-git-executable'.")
+                          (magit-git-executable)
+                          output)))
+                ((save-match-data
+                   (and (string-match magit--git-version-regexp output)
+                        (let ((version (match-str 1 output)))
+                          (push (cons host version)
+                                magit--host-git-version-cache)
+                          version))))
+                ((error "Unexpected \"%s --version\" output: %S"
+                        (magit-git-executable)
+                        output)))))))))
+
+(defun magit-git-version-assert (&optional minimal who)
+  "Assert that the used Git version is greater than or equal to MINIMAL.
+If optional MINIMAL is nil, compare with `magit--minimal-git'
+instead.  Optional WHO if non-nil specifies what functionality
+needs at least MINIMAL, otherwise it defaults to \"Magit\"."
+  (when (magit-git-version< (or minimal magit--minimal-git))
+    (let* ((host (file-remote-p default-directory))
+           (msg (format-spec
+                 (cond (host "\
+%w requires Git %m or greater, but on %h the version is %v.
+
+If multiple Git versions are installed on the host, then the
+problem might be that TRAMP uses the wrong executable.
+
+Check the value of `magit-remote-git-executable' and consult
+the info node `(tramp)Remote programs'.\n")
+                       (t "\
+%w requires Git %m or greater, but you are using %v.
+
+If you have multiple Git versions installed, then check the
+values of `magit-remote-git-executable' and `exec-path'.\n"))
+                 `((?w . ,(or who "Magit"))
+                   (?m . ,(or minimal magit--minimal-git))
+                   (?v . ,(magit-git-version))
+                   (?h . ,host)))))
+      (display-warning 'magit msg :error))))
+
+(defun magit--safe-git-version ()
+  "Return the Git version used for `default-directory' or an error message."
+  (magit--with-temp-process-buffer
+    (let* ((magit-git-global-arguments nil)
+           (status (magit-process-git t "version"))
+           (output (buffer-string)))
+      (cond ((not (zerop status)) output)
+            ((save-match-data
+               (and (string-match magit--git-version-regexp output)
+                    (match-str 1 output))))
+            (output)))))
+
+(defun magit-debug-git-executable ()
+  "Display a buffer with information about `magit-git-executable'.
+Also include information about `magit-remote-git-executable'.
+See info node `(magit)Debugging Tools' for more information."
+  (interactive)
+  (with-current-buffer (get-buffer-create "*magit-git-executable*")
+    (pop-to-buffer (current-buffer))
+    (erase-buffer)
+    (insert (format "magit-remote-git-executable: %S\n"
+                    magit-remote-git-executable))
+    (insert (concat
+             (format "magit-git-executable: %S" magit-git-executable)
+             (and (not (file-name-absolute-p magit-git-executable))
+                  (format " [%S]" (executable-find magit-git-executable)))
+             (format " (%s)\n" (magit--safe-git-version))))
+    (insert (format "exec-path: %S\n" exec-path))
+    (when-let ((diff (cl-set-difference
+                      (seq-filter #'file-exists-p (remq nil (parse-colon-path
+                                                             (getenv "PATH"))))
+                      (seq-filter #'file-exists-p (remq nil exec-path))
+                      :test #'file-equal-p)))
+      (insert (format "  entries in PATH, but not in exec-path: %S\n" diff)))
+    (dolist (execdir exec-path)
+      (insert (format "  %s (%s)\n" execdir (car (file-attributes execdir))))
+      (when (file-directory-p execdir)
+        (dolist (exec (directory-files
+                       execdir t (concat
+                                  "\\`git" (regexp-opt exec-suffixes) "\\'")))
+          (insert (format "    %s (%s)\n" exec
+                          (magit--safe-git-version))))))))
+
+;;; Variables
+
+(defun magit-config-get-from-cached-list (key)
+  (gethash
+   (thread$ key
+     ;; "git config --list" downcases first and last components.
+     (replace-regexp-in-string "\\`[^.]+" #'downcase $ t t)
+     (replace-regexp-in-string "[^.]+\\'" #'downcase $ t t))
+   (magit--with-refresh-cache (cons (magit-toplevel) 'config)
+     (let ((configs (make-hash-table :test #'equal)))
+       (dolist (conf (magit-git-items "config" "--list" "-z"))
+         (let* ((nl-pos (cl-position ?\n conf))
+                (key (substring conf 0 nl-pos))
+                (val (if nl-pos (substring conf (1+ nl-pos)) "")))
+           (puthash key (nconc (gethash key configs) (list val)) configs)))
+       configs))))
+
+(defun magit-get (&rest keys)
+  "Return the value of the Git variable specified by KEYS."
+  (car (last (apply #'magit-get-all keys))))
+
+(defun magit-get-all (&rest keys)
+  "Return all values of the Git variable specified by KEYS."
+  (let ((magit-git-debug nil)
+        (arg (and (or (null (car keys))
+                      (string-prefix-p "--" (car keys)))
+                  (pop keys)))
+        (key (string-join keys ".")))
+    (if (and magit--refresh-cache (not arg))
+        (magit-config-get-from-cached-list key)
+      (magit-git-items "config" arg "-z" "--get-all" "--include" key))))
+
+(defun magit-get-boolean (&rest keys)
+  "Return the boolean value of the Git variable specified by KEYS.
+Also see `magit-git-config-p'."
+  (let ((arg (and (or (null (car keys))
+                      (string-prefix-p "--" (car keys)))
+                  (pop keys)))
+        (key (string-join keys ".")))
+    (equal (if magit--refresh-cache
+               (car (last (magit-config-get-from-cached-list key)))
+             (magit-git-str "config" arg "--bool" "--include" key))
+           "true")))
+
+(defun magit-set (value &rest keys)
+  "Set the value of the Git variable specified by KEYS to VALUE."
+  (let ((arg (and (or (null (car keys))
+                      (string-prefix-p "--" (car keys)))
+                  (pop keys)))
+        (key (string-join keys ".")))
+    (if value
+        (magit-git-success "config" arg key value)
+      (magit-git-success "config" arg "--unset" key))
+    value))
+
+(gv-define-setter magit-get (val &rest keys)
+  `(magit-set ,val ,@keys))
+
+(defun magit-set-all (values &rest keys)
+  "Set all values of the Git variable specified by KEYS to VALUES."
+  (let ((arg (and (or (null (car keys))
+                      (string-prefix-p "--" (car keys)))
+                  (pop keys)))
+        (var (string-join keys ".")))
+    (when (magit-get var)
+      (magit-call-git "config" arg "--unset-all" var))
+    (dolist (v values)
+      (magit-call-git "config" arg "--add" var v))))
+
+;;; Repository
+;;;; Repository Locations
+
+(defun magit--safe-default-directory (&optional file)
+  (catch 'unsafe-default-dir
+    (let ((dir (file-name-as-directory
+                (expand-file-name (or file default-directory))))
+          (previous nil))
+      (while (not (file-accessible-directory-p dir))
+        (setq dir (file-name-directory (directory-file-name dir)))
+        (when (equal dir previous)
+          (throw 'unsafe-default-dir nil))
+        (setq previous dir))
+      dir)))
+
+(defmacro magit--with-safe-default-directory (file &rest body)
+  (declare (indent 1) (debug (form body)))
+  `(when-let ((default-directory (magit--safe-default-directory ,file)))
+     ,@body))
+
+(defun magit-git-dir (&optional path)
+  "Like (expand-file-name PATH (magit-gitdir)) or just (magit-gitdir)."
+  (declare (obsolete magit-gitdir "Magit 4.0.0"))
+  (and$ (magit-gitdir)
+        (if path (expand-file-name (convert-standard-filename path) $) $)))
+
+(defun magit-gitdir (&optional directory common)
+  "Return the absolute and resolved path of the .git directory.
+
+If the `GIT_DIR' environment variable is defined, return that.
+Otherwise return the .git directory for DIRECTORY, or if that is
+nil, then for `default-directory' instead.  If the directory is
+not located inside a Git repository, then return nil.
+
+For a linked worktree, the worktree-specific .git directory is returned
+by default.  If COMMON is non-nil, return the `GIT_COMMON_DIR'
+environment variable, if defined.  Otherwise return the common .git
+directory, falling back to the main .git directory when DIRECTORY does
+not belong to a linked worktree."
+  (let ((default-directory (or directory default-directory)))
+    (magit--with-refresh-cache (list default-directory 'magit-gitdir)
+      (magit--with-safe-default-directory nil
+        (and-let*
+            ((dir (magit-rev-parse-safe (if common "--git-common-dir" "--git-dir")))
+             (dir (file-name-as-directory (magit-expand-git-file-name dir))))
+          (if (file-remote-p dir)
+              dir
+            (concat (file-remote-p default-directory) dir)))))))
+
+(defvar magit--separated-gitdirs nil)
+
+(defun magit--record-separated-gitdir ()
+  (let ((topdir (magit-toplevel))
+        (gitdir (magit-gitdir)))
+    ;; Kludge: git-annex converts submodule gitdirs to symlinks. See #3599.
+    (when (file-symlink-p (directory-file-name gitdir))
+      (setq gitdir (file-truename gitdir)))
+    ;; We want to delete the entry for `topdir' here, rather than
+    ;; within (unless ...), in case a "--separate-git-dir" repository
+    ;; was switched to the standard structure (i.e., "topdir/.git/").
+    (setq magit--separated-gitdirs (cl-delete topdir
+                                              magit--separated-gitdirs
+                                              :key #'car :test #'equal))
+    (unless (equal (file-name-as-directory (expand-file-name ".git" topdir))
+                   gitdir)
+      (push (cons topdir gitdir) magit--separated-gitdirs))))
+
+(defun magit-toplevel (&optional directory)
+  "Return the absolute path to the toplevel of the current repository.
+
+From within the working tree or control directory of a repository
+return the absolute path to the toplevel directory of the working
+tree.  As a special case, from within a bare repository return the
+control directory instead.  When called outside a repository, return
+nil.
+
+When optional DIRECTORY is non-nil, return the toplevel for that
+directory, instead of the one for `default-directory'.
+
+Try to respect the option `find-file-visit-truename', i.e., when the
+value of that option is nil, avoid needlessly returning the truename.
+When a symlink to a sub-directory of the working tree is involved,
+or when called from within a sub-directory of the gitdir or from the
+toplevel of a gitdir, which itself is not located within the working
+tree, then it is not possible to avoid returning the truename."
+  (magit--with-refresh-cache
+      (cons (or directory default-directory) 'magit-toplevel)
+    (magit--with-safe-default-directory directory
+      (cond-let*
+        ([topdir (magit-rev-parse-safe "--show-toplevel")]
+         [topdir (magit-expand-git-file-name topdir)]
+         (cond-let*
+           (;; Always honor these settings.
+            [_(not find-file-visit-truename)]
+            [_(not (getenv "GIT_WORK_TREE"))]
+            ;; "--show-cdup" is the relative path to the toplevel from
+            ;; (file-truename default-directory).  Here we pretend it is
+            ;; relative to `default-directory', and go to that directory.
+            ;; Then we check whether "--show-toplevel" still returns the
+            ;; same value and whether "--show-cdup" now is the empty
+            ;; string.  If both is the case, then we are at the toplevel
+            ;; of the same working tree, but also avoided needlessly
+            ;; following any symlinks.
+            [updir (file-name-as-directory
+                    (magit-rev-parse-safe "--show-cdup"))]
+            [updir (if (file-name-absolute-p updir)
+                       (concat (file-remote-p default-directory) updir)
+                     (expand-file-name updir))]
+            [updir->topdir
+             (let ((default-directory updir))
+               (and (string-equal (magit-rev-parse-safe "--show-cdup") "")
+                    (magit-rev-parse-safe "--show-toplevel")))]
+            [_(string-equal (magit-expand-git-file-name updir->topdir) topdir)]
+            updir)
+           ((concat (file-remote-p default-directory)
+                    (file-name-as-directory topdir)))))
+        ([gitdir (magit-rev-parse-safe "--git-dir")]
+         [gitdir (file-name-as-directory
+                  (if (file-name-absolute-p gitdir)
+                      ;; We might have followed a symlink.
+                      (concat (file-remote-p default-directory)
+                              (magit-expand-git-file-name gitdir))
+                    (expand-file-name gitdir)))]
+         (cond-let*
+           ((magit-bare-repo-p) gitdir)
+           ;; Return the linked working tree, if any.
+           ([link (expand-file-name "gitdir" gitdir)]
+            [wtree (and (file-exists-p link)
+                        (magit-file-line link))]
+            ;; Ignore ".git/gitdir" files that result from a Git bug.
+            ;; This has long been fixed, but old repository may still
+            ;; exist that contain such a file.  See #2364.
+            [_(not (equal wtree ".git"))]
+            (file-name-directory (expand-file-name wtree default-directory)))
+           ;; The working directory may not be the parent
+           ;; directory of .git if it was set up with
+           ;; "git init --separate-git-dir".  See #2955.
+           ((car (rassoc gitdir magit--separated-gitdirs)))
+           ;; Step outside the control directory to enter the working tree.
+           ((file-name-directory (directory-file-name gitdir)))))))))
+
+(defun magit--toplevel-safe ()
+  (or (magit-toplevel)
+      (magit--not-inside-repository-error)))
+
+(defmacro magit-with-toplevel (&rest body)
+  (declare (indent defun) (debug (body)))
+  `(let ((default-directory (magit--toplevel-safe)))
+     ,@body))
+
+;;;; Repository Predicates
+
+(define-error 'magit-outside-git-repo "Not inside Git repository")
+(define-error 'magit-corrupt-git-config "Corrupt Git configuration")
+(define-error 'magit-git-executable-not-found "Git executable cannot be found")
+
+(defun magit--assert-usable-git ()
+  (if (not (executable-find (magit-git-executable) t))
+      (signal 'magit-git-executable-not-found (magit-git-executable))
+    (let ((magit-git-debug
+           (lambda (err)
+             (signal 'magit-corrupt-git-config
+                     (format "%s: %s" default-directory err)))))
+      ;; This should always succeed unless there is a corrupt
+      ;; config (or possibly a similarly severe failing state).
+      (magit-git-string "config" "--default=_" "core.bare"))
+    nil))
+
+(defun magit--not-inside-repository-error ()
+  (magit--assert-usable-git)
+  (signal 'magit-outside-git-repo default-directory))
+
+(defun magit-inside-gitdir-p (&optional noerror)
+  "Return t if `default-directory' is below the repository directory.
+If it is below the working directory, then return nil.
+If it isn't below either, then signal an error unless NOERROR
+is non-nil, in which case return nil."
+  (and (magit--assert-default-directory noerror)
+       ;; Below a repository directory that is not located below the
+       ;; working directory "git rev-parse --is-inside-git-dir" prints
+       ;; "false", which is wrong.
+       (let ((gitdir (magit-gitdir)))
+         (cond (gitdir (file-in-directory-p default-directory gitdir))
+               (noerror nil)
+               ((signal 'magit-outside-git-repo default-directory))))))
+
+(defun magit-inside-worktree-p (&optional noerror)
+  "Return t if `default-directory' is below a working directory.
+If it is below the repository directory, then return nil.
+If it isn't below either, then signal an error unless NOERROR
+is non-nil, in which case return nil."
+  (and (magit--assert-default-directory noerror)
+       (condition-case nil
+           (magit-rev-parse-true "--is-inside-work-tree")
+         (magit-invalid-git-boolean
+          (and (not noerror)
+               (signal 'magit-outside-git-repo default-directory))))))
+
+(cl-defgeneric magit-bare-repo-p (&optional noerror)
+  "Return t if the current repository is bare.
+If it is non-bare, then return nil.  If `default-directory'
+isn't below a Git repository, then signal an error unless
+NOERROR is non-nil, in which case return nil."
+  (and (magit--assert-default-directory noerror)
+       (condition-case nil
+           (magit-rev-parse-true "--is-bare-repository")
+         (magit-invalid-git-boolean
+          (and (not noerror)
+               (signal 'magit-outside-git-repo default-directory))))))
+
+(defun magit--assert-default-directory (&optional noerror)
+  (or (file-directory-p default-directory)
+      (and (not noerror)
+           (let ((exists (file-exists-p default-directory)))
+             (signal (if exists 'file-error 'file-missing)
+                     (list "Running git in directory"
+                           (if exists
+                               "Not a directory"
+                             "No such file or directory")
+                           default-directory))))))
+
+(defun magit-git-repo-p (directory &optional non-bare)
+  "Return t if DIRECTORY is a Git repository.
+When optional NON-BARE is non-nil also return nil if DIRECTORY is
+a bare repository."
+  (and (file-directory-p directory) ; Avoid archives, see #3397.
+       (or (file-regular-p (expand-file-name ".git" directory))
+           (file-directory-p (expand-file-name ".git" directory))
+           (and (not non-bare)
+                (file-regular-p (expand-file-name "HEAD" directory))
+                (file-directory-p (expand-file-name "refs" directory))
+                (file-directory-p (expand-file-name "objects" directory))))))
+
+;;; Files
+;;;; File Predicates
+
+(defun magit-file-ignored-p (file)
+  (magit-git-string "ls-files" "--others" "--ignored" "--exclude-standard"
+                    "--" (magit-convert-filename-for-git file)))
+
+(defun magit-file-tracked-p (file)
+  (magit-git-success "ls-files" "--error-unmatch"
+                     "--" (magit-convert-filename-for-git file)))
+
+;;;; File Lists
+
+(defun magit-list-files (&rest args)
+  (magit-with-toplevel
+    (apply #'magit-git-items "ls-files" "-z" args)))
+
+(defun magit-tracked-files (&rest args)
+  (magit-list-files "--cached" args))
+
+(defun magit-untracked-files (&optional include-ignored directory)
+  "Return a list of untracked files.
+If optional INCLUDE-IGNORED is non-nil, include ignored files.
+If optional DIRECTORY is non-nil, then limit to that directory.
+DIRECTORY can also be a list of files and directories."
+  (magit-with-toplevel
+    (seq-keep (##and (memq (aref % 0) '(?? ?!))
+                     (substring % 3))
+              (magit-git-items "status" "-z" "--porcelain"
+                               (and include-ignored "--ignored")
+                               "--untracked-files=all"
+                               "--" directory))))
+
+(defun magit--untracked-directories (&optional include-ignored directory)
+  "Return a list of directories containing only untracked files.
+If optional INCLUDE-IGNORED is non-nil, consider ignored files.
+If optional DIRECTORY is non-nil, then limit to that directory.
+DIRECTORY can also be a list of files and directories."
+  (magit-with-toplevel
+    (seq-keep (##and (memq (aref % 0) '(?? ?!))
+                     (eq (aref % (1- (length %))) ?/)
+                     (substring % 3))
+              (magit-git-items "status" "-z" "--porcelain"
+                               (and include-ignored "--ignored")
+                               "--untracked-files=normal"
+                               "--" directory))))
+
+(defun magit-list-untracked-files (&optional files)
+  "Return a list of untracked files.
+
+List files if `magit-status-show-untracked-files' is non-nil, but also
+take the local value of Git variable `status.showUntrackedFiles' into
+account.  The local value of the Lisp variable takes precedence over the
+local value of the Git variable.  The global value of the Git variable
+is always ignored.
+
+See also `magit-untracked-files'."
+  (and-let*
+      ((value (or (and (local-variable-p 'magit-status-show-untracked-files)
+                       magit-status-show-untracked-files)
+                  (pcase (magit-get "--local" "status.showUntrackedFiles")
+                    ((or "no" "off" "false" "0") 'no)
+                    ((or "yes" "on" "true" "1") t)
+                    ("all" 'all))
+                  magit-status-show-untracked-files))
+       (_(not (eq value 'no))))
+    (seq-keep (##and (eq (aref % 0) ??)
+                     (substring % 3))
+              (apply #'magit-git-items "status" "-z" "--porcelain"
+                     (format "--untracked-files=%s"
+                             (if (eq value 'all) "all" "normal"))
+                     "--" files))))
+
+(defun magit-ignored-files (&rest args)
+  (magit-list-files "--others" "--ignored" "--exclude-standard" args))
+
+(defun magit-modified-files (&optional nomodules files)
+  (magit-git-items "diff-index" "-z" "--name-only"
+                   ;; Work around a bug in Git v2.46.0. See #5212 and #5221.
+                   (if nomodules "--ignore-submodules" "--submodule=short")
+                   (magit-headish) "--" files))
+
+(defun magit-unstaged-files (&optional nomodules files)
+  (magit-git-items "diff-files" "-z" "--name-only" "--diff-filter=u"
+                   ;; Work around a bug in Git v2.46.0. See #5212 and #5221.
+                   (if nomodules "--ignore-submodules" "--submodule=short")
+                   "--" files))
+
+(defun magit-staged-files (&optional nomodules files)
+  (magit-git-items "diff-index" "-z" "--name-only" "--cached"
+                   ;; Work around a bug in Git v2.46.0. See #5212 and #5221.
+                   (if nomodules "--ignore-submodules" "--submodule=short")
+                   (magit-headish) "--" files))
+
+(defun magit-binary-files (&rest args)
+  (seq-keep (##and (string-match "^-\t-\t\\(.+\\)" %)
+                   (match-str 1 %))
+            (apply #'magit-git-items
+                   "diff" "-z" "--numstat" "--ignore-submodules"
+                   args)))
+
+(defun magit-unmerged-files ()
+  (magit-git-items "diff-files" "-z" "--name-only" "--diff-filter=U"))
+
+(defun magit-stashed-files (stash)
+  (magit-git-items "stash" "show" "-z" "--name-only" stash))
+
+(defun magit-removed-files ()
+  (seq-difference (delete-consecutive-dups
+                   (sort (magit-git-items "log" "-z" "--format="
+                                          "--name-only" "--diff-filter=D")
+                         #'string<))
+                  (magit-list-files)))
+
+(defun magit-skip-worktree-files (&rest args)
+  (seq-keep (##and (= (aref % 0) ?S)
+                   (substring % 2))
+            (magit-list-files "-t" args)))
+
+(defun magit-assume-unchanged-files (&rest args)
+  (seq-keep (##and (memq (aref % 0) '(?h ?s ?m ?r ?c ?k))
+                   (substring % 2))
+            (magit-list-files "-v" args)))
+
+(defun magit-revision-files (rev)
+  (magit-git-items "ls-tree" "-z" "--full-tree" "-r" "--name-only" rev))
+
+(defun magit-revision-directories (rev)
+  "List directories that contain a tracked file in revision REV."
+  (mapcar #'file-name-as-directory
+          (magit-git-items "ls-tree" "-z" "--full-tree" "-r" "-d" "--name-only"
+                           rev)))
+
+(defun magit-changed-files (rev-or-range &optional other-rev)
+  "Return list of files the have changed between two revisions.
+If OTHER-REV is non-nil, REV-OR-RANGE should be a revision, not a
+range.  Otherwise, it can be any revision or range accepted by
+\"git diff\" (i.e., <rev>, <revA>..<revB>, or <revA>...<revB>)."
+  (magit-with-toplevel
+    (magit-git-items "diff" "-z" "--name-only" rev-or-range other-rev)))
+
+(defun magit-renamed-files (revA revB)
+  (mapcar (pcase-lambda (`(,_status ,fileA ,fileB))
+            (cons fileA fileB))
+          (seq-partition (magit-git-items "diff" "-z" "--name-status"
+                                          "--find-renames"
+                                          "--diff-filter=R" revA revB)
+                         3)))
+
+;;;; File Names
+
+(defun magit-file-relative-name (&optional file tracked)
+  "Return the path of FILE relative to the repository root.
+
+If optional FILE is nil or omitted, return the relative path of
+the file being visited in the current buffer, if any, else nil.
+If the file is not inside a Git repository, then return nil.
+
+If TRACKED is non-nil, return the path only if it matches a
+tracked file."
+  (with-current-buffer (or (buffer-base-buffer) (current-buffer))
+    (and-let* ((file (or file
+                         (magit-buffer-file-name)
+                         (and (derived-mode-p 'dired-mode)
+                              default-directory)))
+               (dir (magit-toplevel (magit--safe-default-directory
+                                     (file-name-parent-directory file))))
+               (_(or (not tracked)
+                     (magit-file-tracked-p file))))
+      (file-relative-name file dir))))
+
+(defun magit--rev-file-name (file rev other-rev)
+  "For FILE, potentially renamed between REV and OTHER-REV, return name in REV.
+Return nil, if FILE appears neither in REV nor OTHER-REV,
+or if no rename is detected."
+  (or (car (member file (magit-revision-files rev)))
+      (and$ (magit-renamed-files rev other-rev)
+            (car (rassoc file $)))))
+
+(defun magit-expand-git-file-name (filename)
+  (unless (file-name-absolute-p filename)
+    (setq filename (expand-file-name filename)))
+  (if-let ((cyg:win (and (not (file-remote-p default-directory)) ; see #4976
+                         (cl-assoc filename magit-cygwin-mount-points
+                                   :test (##string-prefix-p %2 %1)))))
+      (concat (cdr cyg:win)
+              (substring filename (length (car cyg:win))))
+    filename))
+
+(defun magit-convert-filename-for-git (filename)
+  "Convert FILENAME so that it can be passed to git.
+1. If it is a absolute filename, then pass it through
+   `expand-file-name' to replace things such as \"~/\" that
+   Git does not understand.
+2. If it is a remote filename, then remove the remote part.
+3. Deal with an `windows-nt' Emacs vs. Cygwin Git incompatibility."
+  (cond-let
+    ((not (file-name-absolute-p filename))
+     filename)
+    ([cyg:win (cl-rassoc filename magit-cygwin-mount-points
+                         :test (##string-prefix-p %2 %1))]
+     (concat (car cyg:win)
+             (substring filename (length (cdr cyg:win)))))
+    ([expanded (expand-file-name filename)]
+     (or (file-remote-p expanded 'localname)
+         expanded))))
+
+(defun magit-decode-git-path (path)
+  (if (eq (aref path 0) ?\")
+      (decode-coding-string (read path)
+                            (or magit-git-output-coding-system
+                                (car default-process-coding-system))
+                            t)
+    path))
+
+;;;; File Miscellaneous
+
+(defun magit-file-at-point (&optional expand assert)
+  (cond-let
+    ([file (magit-section-case
+             (file (oref it value))
+             (hunk (magit-section-parent-value it)))]
+     (if expand
+         (expand-file-name file (magit-toplevel))
+       file))
+    (assert
+     (user-error "No file at point"))))
+
+(defun magit-current-file ()
+  (or (magit-file-relative-name)
+      (magit-file-at-point)
+      (and (derived-mode-p 'magit-log-mode)
+           (car magit-buffer-log-files))))
+
+(defun magit-file-status (&rest args)
+  (magit--with-temp-process-buffer
+    (save-excursion (magit-git-insert "status" "-z" args))
+    (let ((pos (point)) status)
+      (while (> (skip-chars-forward "[:print:]") 0)
+        (let ((x (char-after     pos))
+              (y (char-after (1+ pos)))
+              (file (buffer-substring (+ pos 3) (point))))
+          (forward-char)
+          (cond ((memq x '(?R ?C))
+                 (setq pos (point))
+                 (skip-chars-forward "[:print:]")
+                 (push (list file (buffer-substring pos (point)) x y) status)
+                 (forward-char))
+                ((push (list file nil x y) status))))
+        (setq pos (point)))
+      status)))
+
+;;; Blobs
+
+(defun magit-blob-p (obj)
+  (equal (magit-object-type obj) "blob"))
+
+(defun magit-blob-oid (rev file)
+  (cond-let
+    ((equal rev "{index}")
+     (cadr (car (magit--file-index-stages file))))
+    ;; --object-only and --format were only added in Git v2.36.0.
+    ([out (magit-git-string "ls-tree" "--full-tree" rev "--"
+                            (magit-convert-filename-for-git file))]
+     (nth 2 (split-string out "[\s\t]")))))
+
+(defun magit--file-index-stages (file)
+  (mapcar (##split-string % " ")
+          (magit-git-lines "ls-files" "--stage" "--"
+                           (magit-convert-filename-for-git file))))
+
+(defun magit--insert-blob-contents (obj file)
+  (let ((coding-system-for-read (or coding-system-for-read 'undecided)))
+    (if (magit-blob-p obj)
+        (magit-git-insert "cat-file" "blob" obj)
+      (magit-git-insert "cat-file" "-p"
+                        (if (equal obj "{index}")
+                            (concat ":" file)
+                          (concat obj ":" file))))
+    (setq buffer-file-coding-system last-coding-system-used)
+    nil))
+
+;;; Predicates
+
+(defun magit-no-commit-p ()
+  "Return t if there is no commit in the current Git repository."
+  (not (magit-rev-verify "HEAD")))
+
+(defun magit-merge-commit-p (commit)
+  "Return t if COMMIT is a merge commit."
+  (length> (magit-commit-parents commit) 1))
+
+(defun magit-anything-staged-p (&optional ignore-submodules &rest files)
+  "Return t if there are any staged changes.
+If optional FILES is non-nil, then only changes to those files
+are considered."
+  ;; The "--submodule=short" is needed to work around a bug in Git v2.46.0
+  ;; and v2.46.1.  See #5212 and #5221.  There are actually two related
+  ;; bugs, both of which are fixed in v2.46.2, with the following commits,
+  ;; but there is no workaround for the second bug.
+  ;; 11591850dd diff: report dirty submodules as changes in builtin_diff()
+  ;; 87cf96094a diff: report copies and renames as changes in run_diff_cmd()
+  (magit-git-failure "diff" "--quiet" "--cached"
+                     (if ignore-submodules
+                         "--ignore-submodules"
+                       "--submodule=short")
+                     "--" files))
+
+(defun magit-anything-unstaged-p (&optional ignore-submodules &rest files)
+  "Return t if there are any unstaged changes.
+If optional FILES is non-nil, then only changes to those files
+are considered."
+  (magit-git-failure "diff" "--quiet"
+                     (if ignore-submodules
+                         "--ignore-submodules"
+                       ;; Work around a bug in Git v2.46.0. See #5212 and #5221.
+                       "--submodule=short")
+                     "--" files))
+
+(defun magit-anything-modified-p (&optional ignore-submodules &rest files)
+  "Return t if there are any staged or unstaged changes.
+If optional FILES is non-nil, then only changes to those files
+are considered."
+  (or (apply #'magit-anything-staged-p   ignore-submodules files)
+      (apply #'magit-anything-unstaged-p ignore-submodules files)))
+
+(defun magit-anything-unmerged-p (&rest files)
+  "Return t if there are any merge conflicts.
+If optional FILES is non-nil, then only conflicts in those files
+are considered."
+  (and (magit-git-string "ls-files" "--unmerged" files) t))
+
+(defun magit-module-worktree-p (module)
+  (magit-with-toplevel
+    (file-exists-p (expand-file-name ".git" module))))
+
+(defun magit-module-no-worktree-p (module)
+  (not (magit-module-worktree-p module)))
+
+(defun magit-ignore-submodules-p (&optional return-argument)
+  (or (and-let* ((arg (cl-find-if (##string-prefix-p "--ignore-submodules" %)
+                                  magit-buffer-diff-args))
+                 (_(not (equal arg "--ignore-submodules=none"))))
+        arg)
+      (and-let* ((val (magit-get "diff.ignoreSubmodules"))
+                 (_(not (equal val "none"))))
+        (if return-argument
+            (concat "--ignore-submodules=" val)
+          (concat "diff.ignoreSubmodules=" val)))))
+
+;;; Revisions and References
+
+(defun magit-rev-parse (&rest args)
+  "Execute \"git rev-parse ARGS\", returning first line of output.
+If there is no output, return nil."
+  (apply #'magit-git-string "rev-parse" args))
+
+(defun magit-rev-parse-safe (&rest args)
+  "Execute \"git rev-parse ARGS\", returning first line of output.
+If there is no output, return nil.  Like `magit-rev-parse' but
+ignore `magit-git-debug'."
+  (apply #'magit-git-str "rev-parse" args))
+
+(defun magit-rev-parse-true (&rest args)
+  "Execute \"git rev-parse ARGS\", returning t if it prints \"true\".
+If it prints \"false\", then return nil.  For any other output
+signal an error."
+  (magit-git-true "rev-parse" args))
+
+(defun magit-rev-parse-false (&rest args)
+  "Execute \"git rev-parse ARGS\", returning t if it prints \"false\".
+If it prints \"true\", then return nil.  For any other output
+signal an error."
+  (magit-git-false "rev-parse" args))
+
+(defun magit-rev-parse-p (&rest args)
+  "Execute \"git rev-parse ARGS\", returning t if it prints \"true\".
+Return t if the first (and usually only) output line is the
+string \"true\", otherwise return nil."
+  (equal (magit-git-str "rev-parse" args) "true"))
+
+(defun magit-rev-verify (rev)
+  (magit-git-string "rev-parse" "--verify" rev))
+
+(defun magit-commit-p (rev)
+  "Return non-nil if REV can be dereferences as a commit.
+Otherwise return nil.  Use `magit-commit-oid' if you actually need
+the oid; eventually this function will return t instead of the oid,
+as it currently does for backward compatibility."
+  ;; TODO Return t instead of the oid.
+  (magit-rev-verify (magit--rev-dereference rev)))
+
+(defun magit-commit-oid (rev &optional noerror)
+  "Return commit oid for REV if it can be dereferences as a commit.
+Otherwise signal an error, or return nil, if optional NOERROR is non-nil."
+  (cond ((magit-rev-verify (magit--rev-dereference rev)))
+        (noerror nil)
+        ((error "%s cannot be dereferenced as a commit" rev))))
+
+(defun magit--rev-dereference (rev)
+  "Return a rev that forces Git to interpret REV as a commit.
+Do so by appending \"^{commit}\"; see \"--verify\" in git-rev-parse(1).
+However, if REV is nil or has the form \":/TEXT\", return REV itself."
+  (cond ((not rev) nil)
+        ((string-prefix-p ":/" rev) rev)
+        ((concat rev "^{commit}"))))
+
+(defun magit-merge-base (a b &rest args)
+  "Return the merge-base of commits A and B.
+Optional ARGS are additional argument to \"git merge-base\"."
+  (magit-git-string "merge-base" args a b))
+
+(defun magit-rev-ancestor-p (a b)
+  "Return non-nil if commit A is an ancestor of commit B."
+  (magit-git-success "merge-base" "--is-ancestor" a b))
+
+(defun magit-rev-equal (a b)
+  "Return t if there are no differences between the commits A and B."
+  (magit-git-success "diff" "--quiet" a b))
+
+(defun magit-rev-eq (a b)
+  "Return t if A and B refer to the same commit."
+  (and-let ((a (magit-commit-oid a t))
+            (b (magit-commit-oid b t)))
+    (equal a b)))
+
+(defun magit-rev-head-p (rev)
+  "Return t if REV can be dereferences as the `HEAD' commit."
+  (or (equal rev "HEAD")
+      (magit-rev-eq rev "HEAD")))
+
+(defun magit-rev-author-p (rev)
+  "Return t if the user is the author of REV.
+More precisely return t if `user.name' is equal to the author
+name of REV and/or `user.email' is equal to the author email
+of REV."
+  (or (equal (magit-get "user.name")  (magit-rev-format "%an" rev))
+      (equal (magit-get "user.email") (magit-rev-format "%ae" rev))))
+
+(defun magit-rev-name (rev &optional pattern not-anchored)
+  "Return a symbolic name for REV using `git-name-rev'.
+
+PATTERN can be used to limit the result to a matching ref.  Unless
+NOT-ANCHORED is non-nil, the beginning of the ref must match PATTERN.
+An anchored lookup is done using the arguments \"--exclude=*/<PATTERN>\"
+and \"--exclude=*/HEAD\", in addition to \"--refs=<PATTERN>\"."
+  (magit-git-string "name-rev" "--name-only" "--no-undefined"
+                    (and pattern (concat "--refs=" pattern))
+                    (and pattern
+                         (not not-anchored)
+                         (list "--exclude=*/HEAD"
+                               (concat "--exclude=*/" pattern)))
+                    rev))
+
+(defun magit-rev-branch (rev)
+  (and$ (magit-rev-name rev "refs/heads/*")
+        (and (not (string-match-p "[~^]" $)) $)))
+
+(defun magit-rev-fixup-target (rev)
+  (let ((msg (magit-rev-format "%s" rev)))
+    (save-match-data
+      (and (string-match "\\`\\(squash!\\|fixup!\\|amend!\\) \\(.+\\)" msg)
+           (magit-rev-format
+            "%h" (format "%s^{/^%s}" rev
+                         (magit--ext-regexp-quote (match-str 2 msg))))))))
+
+(defun magit-get-shortname (rev)
+  (let* ((fn (apply-partially #'magit-rev-name rev))
+         (name (or (funcall fn "refs/tags/*")
+                   (funcall fn "refs/heads/*")
+                   (funcall fn "refs/remotes/*"))))
+    (cond ((not name)
+           (magit-rev-parse "--short" rev))
+          ((string-match "^\\(?:tags\\|remotes\\)/\\(.+\\)" name)
+           (if (magit-ref-ambiguous-p (match-str 1 name))
+               name
+             (match-str 1 name)))
+          ((magit-ref-maybe-qualify name)))))
+
+(defun magit-name-branch (rev &optional lax)
+  (or (magit-name-local-branch rev)
+      (magit-name-remote-branch rev)
+      (and lax (or (magit-name-local-branch rev t)
+                   (magit-name-remote-branch rev t)))))
+
+(defun magit-name-local-branch (rev &optional lax)
+  (and$ (magit-rev-name rev "refs/heads/*")
+        (and (or lax (not (string-match-p "[~^]" $))) $)))
+
+(defun magit-name-remote-branch (rev &optional lax)
+  (and$ (magit-rev-name rev "refs/remotes/*")
+        (and (or lax (not (string-match-p "[~^]" $)))
+             (substring $ 8))))
+
+(defun magit-name-tag (rev &optional lax)
+  (and-let ((name (magit-rev-name rev "refs/tags/*")))
+    (progn
+      (when (string-suffix-p "^0" name)
+        (setq name (substring name 0 -2)))
+      (and (or lax (not (string-match-p "[~^]" name)))
+           (substring name 5)))))
+
+(defun magit-ref-abbrev (refname)
+  "Return an unambiguous abbreviation of REFNAME."
+  (magit-rev-parse "--verify" "--abbrev-ref" refname))
+
+(defun magit-ref-fullname (refname)
+  "Return fully qualified refname for REFNAME.
+If REFNAME is ambiguous, return nil."
+  (magit-rev-parse "--verify" "--symbolic-full-name" refname))
+
+(defun magit-ref-ambiguous-p (refname)
+  (save-match-data
+    (if (string-match "\\`\\([^^~]+\\)\\(.*\\)" refname)
+        (not (magit-ref-fullname (match-str 1 refname)))
+      (error "%S has an unrecognized format" refname))))
+
+(defun magit-ref-maybe-qualify (refname &optional prefix)
+  "If REFNAME is ambiguous, try to disambiguate it by prepend PREFIX to it.
+Return an unambiguous refname, either REFNAME or that prefixed
+with PREFIX, nil otherwise.  If REFNAME has an offset suffix
+such as \"~1\", then that is preserved.  If optional PREFIX is
+nil, then use \"heads/\"."
+  (if (magit-ref-ambiguous-p refname)
+      (let ((refname (concat (or prefix "heads/") refname)))
+        (and (not (magit-ref-ambiguous-p refname)) refname))
+    refname))
+
+(defun magit-ref-exists-p (ref)
+  (magit-git-success "show-ref" "--verify" ref))
+
+(defun magit-ref-equal (a b)
+  "Return t if the refnames A and B are `equal'.
+A symbolic-ref pointing to some ref, is `equal' to that ref,
+as are two symbolic-refs pointing to the same ref.  Refnames
+may be abbreviated."
+  (and-let ((a (magit-ref-fullname a))
+            (b (magit-ref-fullname b)))
+    (equal a b)))
+
+(defun magit-ref-eq (a b)
+  "Return t if the refnames A and B are `eq'.
+A symbolic-ref is `eq' to itself, but not to the ref it points
+to, or to some other symbolic-ref that points to the same ref."
+  (let ((symbolic-a (magit-symbolic-ref-p a))
+        (symbolic-b (magit-symbolic-ref-p b)))
+    (or (and symbolic-a
+             symbolic-b
+             (equal a b))
+        (and (not symbolic-a)
+             (not symbolic-b)
+             (magit-ref-equal a b)))))
+
+(defun magit-headish ()
+  "Return the `HEAD' or if that doesn't exist the hash of the empty tree."
+  (if (magit-no-commit-p)
+      (magit-git-string "mktree")
+    "HEAD"))
+
+(defun magit-branch-at-point ()
+  (magit-section-case
+    (branch (oref it value))
+    (commit (or (magit--painted-branch-at-point)
+                (magit-name-branch (oref it value))))
+    (pullreq (and (fboundp 'forge--pullreq-branch-active)
+                  (forge--pullreq-branch-active (oref it value))))
+    (related-refs (magit--painted-branch-at-point))
+    ((unpulled unpushed)
+     (magit-ref-abbrev
+      (replace-regexp-in-string "\\.\\.\\.?" "" (oref it value))))))
+
+(defun magit--painted-branch-at-point (&optional type)
+  (or (and (not (eq type 'remote))
+           (memq (get-text-property (magit-point) 'font-lock-face)
+                 (list 'magit-branch-local
+                       'magit-branch-current))
+           (and$ (magit-thing-at-point 'git-revision t)
+                 (cdr (magit-split-branch-name $))))
+      (and (not (eq type 'local))
+           (memq (get-text-property (magit-point) 'font-lock-face)
+                 (list 'magit-branch-remote
+                       'magit-branch-remote-head))
+           (thing-at-point 'git-revision t))))
+
+(defun magit-local-branch-at-point ()
+  (magit-section-case
+    (branch (let ((branch (magit-ref-maybe-qualify (oref it value))))
+              (when (member branch (magit-list-local-branch-names))
+                branch)))
+    (commit (or (magit--painted-branch-at-point 'local)
+                (magit-name-local-branch (oref it value))))))
+
+(defun magit-remote-branch-at-point ()
+  (magit-section-case
+    (branch (let ((branch (oref it value)))
+              (when (member branch (magit-list-remote-branch-names))
+                branch)))
+    (commit (or (magit--painted-branch-at-point 'remote)
+                (magit-name-remote-branch (oref it value))))))
+
+(defun magit-commit-at-point ()
+  (or (magit-section-value-if 'commit)
+      (magit-thing-at-point 'git-revision t)
+      (and-let ((chunk (and (bound-and-true-p magit-blame-mode)
+                            (fboundp 'magit-current-blame-chunk)
+                            (magit-current-blame-chunk))))
+        (oref chunk orig-rev))
+      (and (derived-mode-p 'magit-stash-mode
+                           'magit-merge-preview-mode
+                           'magit-revision-mode)
+           magit-buffer-revision)))
+
+(defun magit-branch-or-commit-at-point ()
+  (or (magit-section-case
+        (branch (magit-ref-maybe-qualify (oref it value)))
+        (commit (or (magit--painted-branch-at-point)
+                    (let ((rev (oref it value)))
+                      (or (magit-name-branch rev) rev))))
+        (tag (magit-ref-maybe-qualify (oref it value) "tags/"))
+        (pullreq (or (and (fboundp 'forge--pullreq-branch-active)
+                          (forge--pullreq-branch-active (oref it value)))
+                     (and (fboundp 'forge--pullreq-ref)
+                          (forge--pullreq-ref (oref it value)))))
+        ((unpulled unpushed)
+         (magit-ref-abbrev
+          (replace-regexp-in-string "\\.\\.\\.?" "" (oref it value)))))
+      (magit-thing-at-point 'git-revision t)
+      (and-let ((chunk (and (bound-and-true-p magit-blame-mode)
+                            (fboundp 'magit-current-blame-chunk)
+                            (magit-current-blame-chunk))))
+        (oref chunk orig-rev))
+      (and magit-buffer-file-name
+           magit-buffer-revision)
+      (and (derived-mode-p 'magit-stash-mode
+                           'magit-merge-preview-mode
+                           'magit-revision-mode)
+           magit-buffer-revision)))
+
+(defun magit-tag-at-point ()
+  (magit-section-case
+    (tag    (oref it value))
+    (commit (magit-name-tag (oref it value)))))
+
+(defun magit-stash-at-point ()
+  (magit-section-value-if 'stash))
+
+(defun magit-remote-at-point ()
+  (magit-section-case
+    (remote (oref it value))
+    ([branch remote] (magit-section-parent-value it))))
+
+(defun magit-module-at-point (&optional predicate)
+  (when (magit-section-match 'module)
+    (let ((module (oref (magit-current-section) value)))
+      (and (or (not predicate)
+               (funcall predicate module))
+           module))))
+
+(defun magit-get-current-branch ()
+  "Return the refname of the currently checked out branch.
+Return nil if no branch is currently checked out."
+  (magit-git-string "symbolic-ref" "--short" "HEAD"))
+
+(defvar magit-get-previous-branch-timeout 0.5
+  "Maximum time to spend in `magit-get-previous-branch'.
+Given as a number of seconds.")
+
+(defun magit-get-previous-branch ()
+  "Return the refname of the previously checked out branch.
+Return nil if no branch can be found in the `HEAD' reflog
+which is different from the current branch and still exists.
+The amount of time spent searching is limited by
+`magit-get-previous-branch-timeout'."
+  (let ((t0 (float-time))
+        (current (magit-get-current-branch))
+        (i 1) prev)
+    (while (cond ((> (- (float-time) t0) magit-get-previous-branch-timeout)
+                  (setq prev nil))
+                 ((setq prev (magit-rev-verify (format "@{-%d}" i)))
+                  (or (not (setq prev (magit-rev-branch prev)))
+                      (equal prev current))))
+      (incf i))
+    prev))
+
+(defun magit--set-default-branch (newname oldname)
+  (let ((remote (or (magit-primary-remote)
+                    (user-error "Cannot determine primary remote")))
+        (branches (mapcar (##split-string % "\t")
+                          (magit-git-lines
+                           "for-each-ref" "refs/heads"
+                           "--format=%(refname:short)\t%(upstream:short)"))))
+    (when-let ((old (assoc oldname branches))
+               (_(not (assoc newname branches))))
+      (magit-call-git "branch" "-m" oldname newname)
+      (setcar old newname))
+    (let ((new (if (magit-branch-p newname)
+                   newname
+                 (concat remote "/" newname))))
+      (pcase-dolist (`(,branch ,upstream) branches)
+        (cond
+          ((equal upstream oldname)
+           (magit-set-upstream-branch branch new))
+          ((equal upstream (concat remote "/" oldname))
+           (magit-set-upstream-branch branch (concat remote "/" newname))))))))
+
+(defun magit--get-default-branch (&optional update)
+  (let ((remote (magit-primary-remote)))
+    (when update
+      (if (not remote)
+          (user-error "Cannot determine primary remote")
+        (message "Determining default branch...")
+        (magit-git "fetch" "--prune")
+        (magit-git "remote" "set-head" "--auto" remote)
+        (message "Determining default branch...done")))
+    (let ((branch (magit-git-string "symbolic-ref" "--short"
+                                    (format "refs/remotes/%s/HEAD" remote))))
+      (when (and update (not branch))
+        (error "Cannot determine new default branch"))
+      (list remote (and branch (cdr (magit-split-branch-name branch)))))))
+
+(defun magit-set-upstream-branch (branch upstream)
+  "Set UPSTREAM as the upstream of BRANCH.
+If UPSTREAM is nil, then unset BRANCH's upstream.
+Otherwise UPSTREAM has to be an existing branch."
+  (if upstream
+      (magit-call-git "branch" "--set-upstream-to" upstream branch)
+    (magit-call-git "branch" "--unset-upstream" branch)))
+
+(defun magit-get-upstream-ref (&optional branch)
+  "Return the upstream branch of BRANCH as a fully qualified ref.
+It BRANCH is nil, then return the upstream of the current branch,
+if any, nil otherwise.  If the upstream is not configured, the
+configured remote is an url, or the named branch does not exist,
+then return nil.  I.e.,  return an existing local or
+remote-tracking branch ref."
+  (and$ (or branch (magit-get-current-branch))
+        (magit-ref-fullname (concat $ "@{upstream}"))))
+
+(defun magit-get-upstream-branch (&optional branch)
+  "Return the name of the upstream branch of BRANCH.
+It BRANCH is nil, then return the upstream of the current branch
+if any, nil otherwise.  If the upstream is not configured, the
+configured remote is an url, or the named branch does not exist,
+then return nil.  I.e., return the name of an existing local or
+remote-tracking branch.  The returned string is colorized
+according to the branch type."
+  (magit--with-refresh-cache
+      (list default-directory 'magit-get-upstream-branch branch)
+    (and-let* ((branch (or branch (magit-get-current-branch)))
+               (upstream (magit-ref-abbrev (concat branch "@{upstream}"))))
+      (magit--propertize-face
+       upstream (if (equal (magit-get "branch" branch "remote") ".")
+                    'magit-branch-local
+                  'magit-branch-remote)))))
+
+(defun magit-get-local-upstream-branch (&optional branch)
+  (and-let* ((upstream (magit-get-upstream-branch branch))
+             (upstream (cdr (magit-split-branch-name upstream))))
+    (and (magit-branch-p upstream) upstream)))
+
+(defun magit-get-indirect-upstream-branch (branch &optional force)
+  (let ((remote (magit-get "branch" branch "remote")))
+    (and remote (not (equal remote "."))
+         ;; The user has opted in...
+         (or force
+             (seq-some (##if (magit-git-success "check-ref-format" "--branch" %)
+                           (equal % branch)
+                         (string-match-p % branch))
+                       magit-branch-prefer-remote-upstream))
+         ;; and local BRANCH tracks a remote branch...
+         (let ((upstream (magit-get-upstream-branch branch)))
+           ;; whose upstream...
+           (and upstream
+                ;; has the same name as BRANCH...
+                (equal (substring upstream (1+ (length remote))) branch)
+                ;; and can be fast-forwarded to BRANCH.
+                (magit-rev-ancestor-p upstream branch)
+                upstream)))))
+
+(defun magit-get-upstream-remote (&optional branch allow-unnamed)
+  (and-let* ((branch (or branch (magit-get-current-branch)))
+             (remote (magit-get "branch" branch "remote")))
+    (and (not (equal remote "."))
+         (cond ((member remote (magit-list-remotes))
+                (magit--propertize-face remote 'magit-branch-remote))
+               ((and allow-unnamed
+                     (string-match-p "\\(\\`.\\{0,2\\}/\\|[:@]\\)" remote))
+                (magit--propertize-face remote 'bold))))))
+
+(defun magit-get-unnamed-upstream (&optional branch)
+  (and-let* ((branch (or branch (magit-get-current-branch)))
+             (remote (magit-get "branch" branch "remote"))
+             (merge  (magit-get "branch" branch "merge")))
+    (and (magit--unnamed-upstream-p remote merge)
+         (list (magit--propertize-face remote 'bold)
+               (magit--propertize-face merge 'magit-branch-remote)))))
+
+(defun magit--unnamed-upstream-p (remote merge)
+  (and remote (string-match-p "\\(\\`\\.\\{0,2\\}/\\|[:@]\\)" remote)
+       merge  (string-prefix-p "refs/" merge)))
+
+(defun magit--valid-upstream-p (remote merge)
+  (and (or (equal remote ".")
+           (member remote (magit-list-remotes)))
+       (string-prefix-p "refs/" merge)))
+
+(defun magit-get-current-remote (&optional allow-unnamed)
+  (or (magit-get-upstream-remote nil allow-unnamed)
+      (and-let* ((remotes (magit-list-remotes))
+                 (remote (if (length= remotes 1)
+                             (car remotes)
+                           (magit-primary-remote))))
+        (magit--propertize-face remote 'magit-branch-remote))))
+
+(defun magit-get-push-remote (&optional branch)
+  (and-let ((remote
+             (or (and (or branch (setq branch (magit-get-current-branch)))
+                      (magit-get "branch" branch "pushRemote"))
+                 (magit-get "remote.pushDefault"))))
+    (magit--propertize-face remote 'magit-branch-remote)))
+
+(defun magit-get-push-branch (&optional branch verify)
+  (magit--with-refresh-cache
+      (list default-directory 'magit-get-push-branch branch verify)
+    (and-let*
+        ((branch (cond ((not branch)
+                        (magit-get-current-branch))
+                       ((string-prefix-p "refs/" branch)
+                        (magit-ref-abbrev branch))
+                       (branch)))
+         (remote (magit-get-push-remote branch))
+         (target (concat remote "/" branch)))
+      (and (or (not verify)
+               (magit-rev-verify target))
+           (magit--propertize-face target 'magit-branch-remote)))))
+
+(defun magit-get-@{push}-branch (&optional branch)
+  (and-let* ((branch (magit-ref-abbrev (or branch (magit-get-current-branch))))
+             (target (magit-ref-fullname (concat branch "@{push}"))))
+    (magit-ref-abbrev target)))
+
+(defun magit-get-remote (&optional branch)
+  (and (or branch (setq branch (magit-get-current-branch)))
+       (let ((remote (magit-get "branch" branch "remote")))
+         (and (not (equal remote "."))
+              remote))))
+
+(defun magit-get-some-remote (&optional branch)
+  (or (magit-get-remote branch)
+      (and$ (magit-main-branch)
+            (magit-get-remote $))
+      (magit-primary-remote)
+      (car (magit-list-remotes))))
+
+(defvar magit-primary-remote-names
+  '("upstream" "origin"))
+
+(defun magit-primary-remote ()
+  "Return the primary remote.
+
+The primary remote is the remote that tracks the repository that
+other repositories are forked from.  It often is called \"origin\"
+but because many people name their own fork \"origin\", using that
+term would be ambiguous.  Likewise we avoid the term \"upstream\"
+because a branch's @{upstream} branch may be a local branch or a
+branch from a remote other than the primary remote.
+
+If a remote exists whose name matches `magit.primaryRemote', then
+that is considered the primary remote.  If no remote by that name
+exists, then remotes in `magit-primary-remote-names' are tried in
+order and the first remote from that list that actually exists in
+the current repository is considered its primary remote."
+  (let ((remotes (magit-list-remotes)))
+    (seq-find (##member % remotes)
+              (delete-dups
+               (delq nil
+                     (cons (magit-get "magit.primaryRemote")
+                           magit-primary-remote-names))))))
+
+(defun magit-branch-merged-p (branch &optional target)
+  "Return non-nil if BRANCH is merged into its upstream and TARGET.
+
+TARGET defaults to the current branch.  If `HEAD' is detached and
+TARGET is nil, then always return nil.  As a special case, if
+TARGET is t, then return non-nil if BRANCH is merged into any one
+of the other local branches.
+
+If, and only if, BRANCH has an upstream, then only return non-nil
+if BRANCH is merged into both TARGET (as described above) as well
+as into its upstream."
+  (and (if-let ((upstream (and (magit-branch-p branch)
+                               (magit-get-upstream-branch branch))))
+           (magit-rev-ancestor-p branch upstream)
+         t)
+       (cond-let
+         ((eq target t)
+          (delete (magit-name-local-branch branch)
+                  (magit-list-containing-branches branch)))
+         ([target (or target (magit-get-current-branch))]
+          (magit-rev-ancestor-p branch target)))))
+
+(defun magit-get-tracked (refname)
+  "Return the remote branch tracked by the remote-tracking branch REFNAME.
+The returned value has the form (REMOTE . REF), where REMOTE is
+the name of a remote and REF is the ref local to the remote."
+  (and-let ((ref (magit-ref-fullname refname)))
+    (save-match-data
+      (seq-some (lambda (line)
+                  (and (string-match "\
+\\`remote\\.\\([^.]+\\)\\.fetch=\\+?\\([^:]+\\):\\(.+\\)" line)
+                       (let ((rmt (match-str 1 line))
+                             (src (match-str 2 line))
+                             (dst (match-str 3 line)))
+                         (and (string-match (format "\\`%s\\'"
+                                                    (string-replace
+                                                     "*" "\\(.+\\)" dst))
+                                            ref)
+                              (cons rmt (string-replace
+                                         "*" (match-str 1 ref) src))))))
+                (magit-git-lines "config" "--local" "--list")))))
+
+(defun magit-split-branch-name (branch)
+  (cond ((member branch (magit-list-local-branch-names))
+         (cons "." branch))
+        ((string-match "/" branch)
+         (or (seq-some (lambda (remote)
+                         (and (string-match
+                               (format "\\`\\(%s\\)/\\(.+\\)\\'" remote)
+                               branch)
+                              (cons (match-str 1 branch)
+                                    (match-str 2 branch))))
+                       (magit-list-remotes))
+             (error "Invalid branch name %s" branch)))))
+
+(defun magit-get-current-tag (&optional rev with-distance)
+  "Return the closest tag reachable from REV.
+
+If optional REV is nil, then default to `HEAD'.
+If optional WITH-DISTANCE is non-nil then return (TAG COMMITS),
+if it is `dirty' return (TAG COMMIT DIRTY).  COMMITS is the number
+of commits in `HEAD' but not in TAG and DIRTY is t if there are
+uncommitted changes, nil otherwise."
+  (and-let ((str (magit-git-str "describe" "--long" "--tags"
+                                (and (eq with-distance 'dirty) "--dirty")
+                                rev)))
+    (save-match-data
+      (string-match
+       "\\(.+\\)-\\(?:0[0-9]*\\|\\([0-9]+\\)\\)-g[0-9a-z]+\\(-dirty\\)?$" str)
+      (if with-distance
+          `(,(match-str 1 str)
+            ,(string-to-number (or (match-str 2 str) "0"))
+            ,@(and (match-str 3 str) (list t)))
+        (match-str 1 str)))))
+
+(defun magit-get-next-tag (&optional rev with-distance)
+  "Return the closest tag from which REV is reachable.
+
+If optional REV is nil, then default to `HEAD'.
+If no such tag can be found or if the distance is 0 (in which
+case it is the current tag, not the next), return nil instead.
+If optional WITH-DISTANCE is non-nil, then return (TAG COMMITS)
+where COMMITS is the number of commits in TAG but not in REV."
+  (and-let ((str (magit-git-str "describe" "--contains" (or rev "HEAD"))))
+    (save-match-data
+      (when (string-match "^[^^~]+" str)
+        (setq str (match-str 0 str))
+        (unless (equal str (magit-get-current-tag rev))
+          (if with-distance
+              (list str (car (magit-rev-diff-count str rev)))
+            str))))))
+
+(defun magit-list-refs (&optional namespaces format sortby)
+  "Return list of references, excluding symbolic references.
+
+When NAMESPACES is non-nil, list refs from these namespaces
+rather than those from `magit-list-refs-namespaces'.
+
+FORMAT is passed to the \"--format\" flag of \"git for-each-ref\"
+and defaults to \"%(refname)\".
+
+SORTBY is a key or list of keys to pass to the \"--sort\" flag
+of \"git for-each-ref\" to sort the refs within each namespace.
+When nil, use `magit-list-refs-sortby'.  If both are nil, use
+\"version:refname\", but only for \"refs/tags\"."
+  (let ((format (concat "--format=%(symref)" (or format "%(refname)")))
+        (sortby (mapcar (##concat "--sort=" %)
+                        (ensure-list (or sortby magit-list-refs-sortby)))))
+    (seq-keep (lambda (line)
+                (pcase-let* ((`(,symrefp ,value)
+                              (split-string line ""))
+                             (symrefp (not (equal symrefp ""))))
+                  (and (not symrefp) value)))
+              (mapcan (lambda (ns)
+                        (if (and (not sortby)
+                                 (equal ns "refs/tags"))
+                            (magit-git-lines "for-each-ref" format
+                                             "--sort=-version:refname" ns)
+                          (magit-git-lines "for-each-ref" format sortby ns)))
+                      (ensure-list
+                       (or namespaces magit-list-refs-namespaces))))))
+
+(defun magit-list-branches ()
+  "Return list of local and remote-tracking branches."
+  (magit-list-refs (list "refs/heads" "refs/remotes")))
+
+(defun magit-list-local-branches ()
+  "Return list of local branches."
+  (magit-list-refs "refs/heads"))
+
+(defun magit-list-remote-branches (&optional remote)
+  "Return list of remote-tracking branches.
+If optional REMOTE is non-nil, return only branches from that remote."
+  (magit-list-refs (concat "refs/remotes/" remote)))
+
+(defun magit-list-related-branches (relation &optional rev &rest args)
+  "Return list of branches related to REV.
+RELATION must be one of \"--contains\", \"--no-contains\", \"--merged\",
+\"--no-merged\" and \"--points-at\".  If optional REV is nil, default to
+the \"HEAD\" commit.  Optional ARGS are additional arguments passed to
+\"git branch\"."
+  (seq-remove (##string-match-p "\\(\\`(HEAD\\|HEAD -> \\)" %)
+              (mapcar (##substring % 2)
+                      (magit-git-lines "branch" args relation rev))))
+
+(defun magit-list-containing-branches (&optional rev &rest args)
+  "Return list of branches containing REV.
+If optional REV is nil, default to the \"HEAD\" commit.
+Optional ARGS are additional arguments passed to \"git branch\"."
+  (magit-list-related-branches "--contains" rev args))
+
+(defun magit-list-publishing-branches (&optional rev)
+  (seq-filter (##magit-rev-ancestor-p (or rev "HEAD") %)
+              magit-published-branches))
+
+(defun magit-list-merged-branches (&optional rev &rest args)
+  "Return list of branches merged into REV.
+If optional REV is nil, default to the \"HEAD\" commit.
+Optional ARGS are additional arguments passed to \"git branch\"."
+  (magit-list-related-branches "--merged" rev args))
+
+(defun magit-list-unmerged-branches (&optional rev &rest args)
+  "Return list of branches not merged into REV.
+If optional REV is nil, default to the \"HEAD\" commit.
+Optional ARGS are additional arguments passed to \"git branch\"."
+  (magit-list-related-branches "--no-merged" rev args))
+
+(defun magit-list-unmerged-to-upstream-branches ()
+  "Return list of branches not merged into their respective upstreams."
+  (seq-filter (##and-let ((upstream (magit-get-upstream-branch %)))
+                (member % (magit-list-unmerged-branches upstream)))
+              (magit-list-local-branch-names)))
+
+(defun magit-list-branches-pointing-at (rev)
+  "Return list of branches pointing at REV."
+  (let ((re (format "\\`%s refs/\\(heads\\|remotes\\)/\\(.*\\)\\'"
+                    (magit-rev-verify rev))))
+    (seq-keep (##and (string-match re %)
+                     (let ((name (match-str 2 %)))
+                       (and (not (string-suffix-p "HEAD" name))
+                            name)))
+              (magit-git-lines "show-ref"))))
+
+(defun magit-list-refnames (&optional namespaces include-special)
+  (nconc (magit-list-refs namespaces "%(refname:short)")
+         (and include-special
+              (magit-list-special-refnames))))
+
+(defvar magit-special-refnames
+  '("HEAD" "ORIG_HEAD" "FETCH_HEAD" "MERGE_HEAD" "CHERRY_PICK_HEAD"))
+
+(defun magit-list-special-refnames ()
+  (let ((gitdir (magit-gitdir)))
+    (cl-remove-if-not (##file-exists-p (expand-file-name % gitdir))
+                      magit-special-refnames)))
+
+(defun magit-list-branch-names ()
+  (magit-list-refnames (list "refs/heads" "refs/remotes")))
+
+(defun magit-list-local-branch-names ()
+  (magit-list-refnames "refs/heads"))
+
+(defun magit-list-remote-branch-names (&optional remote relative)
+  (if (and remote relative)
+      (let ((regexp (format "^refs/remotes/%s/\\(.+\\)" remote)))
+        (seq-keep (##and (string-match regexp %)
+                         (match-str 1 %))
+                  (magit-list-remote-branches remote)))
+    (magit-list-refnames (concat "refs/remotes/" remote))))
+
+(defun magit-format-refs (format &rest args)
+  (let ((lines (magit-git-lines
+                "for-each-ref" (concat "--format=" format)
+                (or args (list "refs/heads" "refs/remotes" "refs/tags")))))
+    (if (string-search "\f" format)
+        (mapcar (##split-string % "\f") lines)
+      lines)))
+
+(defun magit-list-remotes ()
+  (magit-git-lines "remote"))
+
+(defun magit-list-tags ()
+  (magit-git-lines "tag"))
+
+(defun magit-list-stashes (&optional format)
+  (magit-git-lines "stash" "list" (concat "--format=" (or format "%gd"))))
+
+(defun magit-list-active-notes-refs ()
+  "Return notes refs according to `core.notesRef' and `notes.displayRef'."
+  (magit-git-lines "for-each-ref" "--format=%(refname)"
+                   (or (magit-get "core.notesRef") "refs/notes/commits")
+                   (magit-get-all "notes.displayRef")))
+
+(defun magit-list-notes-refnames ()
+  (mapcar (##substring % 6) (magit-list-refnames "refs/notes")))
+
+(defun magit-remote-list-tags (remote)
+  (seq-keep (##and (not (string-suffix-p "^{}" %))
+                   (substring % 51))
+            (magit-git-lines "ls-remote" "--tags" remote)))
+
+(defun magit-remote-list-branches (remote)
+  (seq-keep (##and (not (string-suffix-p "^{}" %))
+                   (substring % 52))
+            (magit-git-lines "ls-remote" "--heads" remote)))
+
+(defun magit-remote-list-refs (remote)
+  (seq-keep (##and (not (string-suffix-p "^{}" %))
+                   (substring % 41))
+            (magit-git-lines "ls-remote" remote)))
+
+(defun magit-remote-head (remote)
+  (and$ (cl-find-if (##string-match
+                     "\\`ref: refs/heads/\\([^\s\t]+\\)[\s\t]HEAD\\'" %)
+                    (magit-git-lines "ls-remote" "--symref" remote "HEAD"))
+        (match-str 1 $)))
+
+(defun magit-list-modified-modules ()
+  (seq-keep (##and (string-match "\\`\\+\\([^ ]+\\) \\(.+\\) (.+)\\'" %)
+                   (match-str 2 %))
+            (magit-git-lines "submodule" "status")))
+
+(defun magit-list-module-paths ()
+  (magit-with-toplevel
+    (seq-keep (##and (string-match "^160000 [0-9a-z]\\{40,\\} 0\t\\(.+\\)$" %)
+                     (match-str 1 %))
+              (magit-git-items "ls-files" "-z" "--stage"))))
+
+(defun magit-list-module-names ()
+  (mapcar #'magit-get-submodule-name (magit-list-module-paths)))
+
+(defun magit-get-submodule-name (path)
+  "Return the name of the submodule at PATH.
+PATH has to be relative to the super-repository."
+  (if (magit-git-version>= "2.38.0")
+      ;; "git submodule--helper name" was removed,
+      ;; but might still come back in another form.
+      (substring
+       (car (split-string
+             (car (or (magit-git-items
+                       "config" "-z"
+                       "-f" (expand-file-name ".gitmodules" (magit-toplevel))
+                       "--get-regexp" "^submodule\\..*\\.path$"
+                       (concat "^" (regexp-quote (directory-file-name path)) "$"))
+                      (error "No such submodule `%s'" path)))
+             "\n"))
+       10 -5)
+    (magit-git-string "submodule--helper" "name" path)))
+
+(defun magit-list-worktrees ()
+  "Return list of the worktrees of this repository.
+
+The returned list has the form (PATH COMMIT BRANCH BARE DETACHED
+LOCKED PRUNABLE).  The last four elements are booleans, with the
+exception of LOCKED and PRUNABLE, which may also be strings.
+See git-worktree(1) manpage for the meaning of the various parts.
+
+This function corrects a situation where \"git worktree list\"
+would claim a worktree is bare, even though the working tree is
+specified using `core.worktree'."
+  (let ((remote (file-remote-p default-directory))
+        worktrees worktree)
+    (dolist (line (if (magit-git-version>= "2.36")
+                      (magit-git-items "worktree" "list" "--porcelain" "-z")
+                    (magit-git-lines "worktree" "list" "--porcelain")))
+      (cond ((string-prefix-p "worktree" line)
+             (let ((path (substring line 9)))
+               (when remote
+                 (setq path (concat remote path)))
+               ;; If the git directory is separate from the main
+               ;; worktree, then "git worktree" returns the git
+               ;; directory instead of the worktree, which isn't
+               ;; what it is supposed to do and not what we want.
+               ;; However, if the worktree has been removed, then
+               ;; we want to return it anyway; instead of nil.
+               (setq path (or (magit-toplevel path) path))
+               (setq worktree (list path nil nil nil nil nil nil))
+               (push worktree worktrees)))
+            ((string-prefix-p "HEAD" line)
+             (setf (nth 1 worktree) (substring line 5)))
+            ((string-prefix-p "branch" line)
+             (setf (nth 2 worktree) (substring line 18)))
+            ((string-equal line "bare")
+             (let* ((default-directory (car worktree))
+                    (wt (and (not (magit-get-boolean "core.bare"))
+                             (magit-get "core.worktree"))))
+               (cond ((and wt (file-exists-p (expand-file-name wt)))
+                      (setf (nth 0 worktree) (expand-file-name wt))
+                      (setf (nth 2 worktree) (magit-rev-parse "HEAD"))
+                      (setf (nth 3 worktree) (magit-get-current-branch)))
+                     ((setf (nth 3 worktree) t)))))
+            ((string-equal "detached" line)
+             (setf (nth 4 worktree) t))
+            ((string-prefix-p "locked" line)
+             (setf (nth 5 worktree)
+                   (if (> (length line) 6) (substring line 7) t)))
+            ((string-prefix-p "prunable" line)
+             (setf (nth 6 worktree)
+                   (if (> (length line) 8) (substring line 9) t)))))
+    (nreverse worktrees)))
+
+(defun magit-symbolic-ref-p (string)
+  "Return t if STRING is a reference, nil otherwise.
+Signal an error if STRING is not a string."
+  (cl-assert (stringp string))
+  (magit-git-success "symbolic-ref" "--quiet" string))
+
+(defun magit-ref-p (string)
+  "Return t if STRING is a reference, nil otherwise.
+Signal an error if STRING is not a string."
+  (cl-assert (stringp string))
+  (and (magit-ref-fullname string)
+       (not (magit-symbolic-ref-p string))))
+
+(defun magit-branch-p (string)
+  "Return t if STRING is a local or remote-tracking branch, nil otherwise.
+Signal an error if STRING is not a string."
+  (cl-assert (stringp string))
+  (or (magit-local-branch-p string)
+      (magit-remote-branch-p string)))
+
+(defun magit-local-branch-p (string)
+  "Return t if STRING is a local branch.
+Signal an error if STRING is not a string."
+  (cl-assert (stringp string))
+  (magit-git-success "show-ref" "--quiet"
+                     (if (magit-git-version>= "2.46") "--branches" "--heads")
+                     string))
+
+(defun magit-remote-branch-p (string)
+  "Return t if STRING is a remote-tracking branch, nil otherwise.
+Signal an error if STRING is not a string."
+  (cl-assert (stringp string))
+  (seq-some (lambda (line)
+              (let ((ref (cadr (split-string line " "))))
+                (or (equal string ref)
+                    (equal string (substring ref 5))
+                    (equal string (substring ref 13)))))
+            (magit-git-lines "show-ref" string)))
+
+(defun magit-tag-p (string)
+  "Return t if STRING is an annotated or lightweight tag, nil otherwise.
+Signal an error if STRING is not a string."
+  (cl-assert (stringp string))
+  (magit-git-success "show-ref" "--quiet" "--tags" string))
+
+(defun magit-annotated-tag-p (string)
+  "Return t if STRING is an annotated tag, nil otherwise.
+Signal an error if STRING is not a string."
+  (cl-assert (stringp string))
+  (equal (magit-object-type string) "tag"))
+
+(defun magit-lightweight-tag-p (string)
+  "Return t if STRING is a lightweight (un-annotated) tag, nil otherwise.
+Signal an error if STRING is not a string."
+  (cl-assert (stringp string))
+  (and (magit-tag-p string)
+       (not (magit-annotated-tag-p string))))
+
+(defun magit-remote-p (string)
+  "Return t if STRING is a remote, nil otherwise.
+Signal an error if STRING is not a string."
+  (cl-assert (stringp string))
+  (and (member string (magit-list-remotes)) t))
+
+(defun magit-branch-set-face (branch)
+  (magit--propertize-face branch (if (magit-local-branch-p branch)
+                                     'magit-branch-local
+                                   'magit-branch-remote)))
+
+(defvar magit-main-branch-names
+  '("main" "master" "trunk" "development")
+  "Branch names reserved for use by the primary branch.
+Use function `magit-main-branch' to get the name actually used in
+the current repository.")
+
+(defvar magit-long-lived-branches
+  (append magit-main-branch-names (list "maint" "next"))
+  "Branch names reserved for use by long lived branches.")
+
+(defun magit-main-branch ()
+  "Return the main branch.
+
+If a branch exists whose name matches `init.defaultBranch', then
+that is considered the main branch.  If no branch by that name
+exists, then the branch names in `magit-main-branch-names' are
+tried in order.  The first branch from that list that actually
+exists in the current repository is considered its main branch."
+  (let ((branches (magit-list-local-branch-names)))
+    (seq-find (##member % branches)
+              (delete-dups
+               (delq nil
+                     (cons (magit-get "init.defaultBranch")
+                           magit-main-branch-names))))))
+
+(defun magit-rev-diff-count (a b &optional first-parent)
+  "Return the commits in A but not B and vice versa.
+Return a list of two integers: (A>B B>A).
+
+If `first-parent' is set, traverse only first parents."
+  (mapcar #'string-to-number
+          (split-string (magit-git-string "rev-list"
+                                          "--count" "--left-right"
+                                          (and first-parent "--first-parent")
+                                          (concat a "..." b))
+                        "\t")))
+
+(defun magit-abbrev-length ()
+  (cond-let*
+    ([abbrev (magit-get "core.abbrev")]
+     [_(not (equal abbrev "auto"))]
+     (string-to-number abbrev))
+    ;; Guess the length git will be using based on an example
+    ;; abbreviation.  Actually HEAD's abbreviation might be an
+    ;; outlier, so use the shorter of the abbreviations for two
+    ;; commits.  See #3034.
+    ([head (magit-rev-parse "--short" "HEAD")]
+     [head-len (length head)]
+     (min head-len
+          (if-let ((rev (magit-rev-parse "--short" "HEAD~")))
+              (length rev)
+            head-len)))
+    ;; We're on an unborn branch, but perhaps the repository has
+    ;; other commits.  See #4123.
+    ([commits (magit-git-lines "rev-list" "-n2" "--all" "--abbrev-commit")]
+     (apply #'min (mapcar #'length commits)))
+    ;; A commit does not exist.  Fall back to the default of 7.
+    (7)))
+
+(defun magit-abbrev-arg (&optional arg)
+  (format "--%s=%d" (or arg "abbrev") (magit-abbrev-length)))
+
+(defun magit-rev-abbrev (rev)
+  (magit-rev-parse (magit-abbrev-arg "short") rev))
+
+(defun magit--abbrev-if-oid (obj)
+  (cond ((member obj '("{index}" "{worktree}")) obj)
+        ((magit-ref-p obj) obj)
+        ((magit-rev-parse (magit-abbrev-arg "short") obj))
+        (obj)))
+
+(defun magit-commit-children (rev &optional args)
+  (seq-keep (lambda (line)
+              (pcase-let ((`(,child . ,parents) (split-string line " ")))
+                (and (member rev parents) child)))
+            (magit-git-lines "log" "--format=%H %P"
+                             (or args (list "--branches" "--tags" "--remotes"))
+                             "--not" rev)))
+
+(defun magit-commit-parents (rev)
+  (and$ (magit-git-string "rev-list" "-1" "--parents" rev)
+        (cdr (split-string $))))
+
+(defun magit-patch-id (rev)
+  (with-connection-local-variables
+    (magit--with-temp-process-buffer
+      (magit-process-file
+       shell-file-name nil '(t nil) nil shell-command-switch
+       (let ((exec (shell-quote-argument (magit-git-executable))))
+         (format "%s diff-tree -u %s | %s patch-id" exec rev exec)))
+      (car (split-string (buffer-string))))))
+
+(defun magit-rev-format (format &optional rev args)
+  ;; Prefer "git log --no-walk" to "git show --no-patch" because it
+  ;; performs better in some scenarios.
+  (let ((str (magit-git-string "log" "--no-walk"
+                               (concat "--format=" format) args
+                               (if rev (magit--rev-dereference rev) "HEAD")
+                               "--")))
+    (and (not (string-equal str ""))
+         str)))
+
+(defun magit-rev-insert-format (format &optional rev args)
+  ;; Prefer "git log --no-walk" to "git show --no-patch" because it
+  ;; performs better in some scenarios.
+  (magit-git-insert "log" "--no-walk"
+                    (concat "--format=" format) args
+                    (if rev (magit--rev-dereference rev) "HEAD")
+                    "--"))
+
+(defun magit-format-rev-summary (rev)
+  (and-let ((str (magit-rev-format "%h %s" rev)))
+    (progn
+      (magit--put-face 0 (string-match " " str) 'magit-hash str)
+      str)))
+
+(defvar magit-ref-namespaces
+  '(("\\`HEAD\\'"                  . magit-head)
+    ("\\`refs/tags/\\(.+\\)"       . magit-tag)
+    ("\\`refs/heads/\\(.+\\)"      . magit-branch-local)
+    ("\\`refs/remotes/\\(.+\\)"    . magit-branch-remote)
+    ("\\`refs/bisect/\\(bad\\)"    . magit-bisect-bad)
+    ("\\`refs/bisect/\\(skip.*\\)" . magit-bisect-skip)
+    ("\\`refs/bisect/\\(good.*\\)" . magit-bisect-good)
+    ("\\`refs/stash$"              . magit-refname-stash)
+    ("\\`refs/wip/\\(.+\\)"        . magit-refname-wip)
+    ("\\`refs/pullreqs/\\(.+\\)"   . magit-refname-pullreq)
+    ("\\`\\(bad\\):"               . magit-bisect-bad)
+    ("\\`\\(skip\\):"              . magit-bisect-skip)
+    ("\\`\\(good\\):"              . magit-bisect-good)
+    ("\\`\\(.+\\)"                 . magit-refname))
+  "How refs are formatted for display.
+
+Each entry controls how a certain type of ref is displayed, and
+has the form (REGEXP . FACE).  REGEXP is a regular expression
+used to match full refs.  The first entry whose REGEXP matches
+the reference is used.
+
+In log and revision buffers the first regexp submatch becomes the
+\"label\" that represents the ref and is propertized with FONT.
+In refs buffers the displayed text is controlled by other means
+and this option only controls what face is used.")
+
+(defun magit-format-ref-labels (string)
+  (save-match-data
+    (let ((refs (split-string
+                 (replace-regexp-in-string "\\(tag: \\|HEAD -> \\)" "" string)
+                 ", " t))
+          state head upstream tags branches remotes other combined)
+      (dolist (ref refs)
+        (let* ((face (cdr (seq-find (##string-match (car %) ref)
+                                    magit-ref-namespaces)))
+               (name (match-str 1 ref))
+               (name (if (and name
+                              (not (string-prefix-p "refs/tags/" ref))
+                              (magit-rev-verify (concat "refs/tags/" name)))
+                         (magit-ref-abbrev ref)
+                       (or name ref)))
+               (name (magit--propertize-face name face)))
+          (cl-case face
+            ((magit-bisect-bad magit-bisect-skip magit-bisect-good)
+             (setq state name))
+            (magit-head
+             (setq head (magit--propertize-face "@" 'magit-head)))
+            (magit-tag            (push name tags))
+            (magit-branch-local   (push name branches))
+            (magit-branch-remote  (push name remotes))
+            (t                    (push name other)))))
+      (setq remotes
+            (seq-keep
+             (lambda (name)
+               (if (string-match "\\`\\([^/]*\\)/\\(.*\\)\\'" name)
+                   (let ((r (match-str 1 name))
+                         (b (match-str 2 name)))
+                     (and (not (equal b "HEAD"))
+                          (if (equal (concat "refs/remotes/" name)
+                                     (magit-git-string
+                                      "symbolic-ref"
+                                      (format "refs/remotes/%s/HEAD" r)))
+                              (magit--propertize-face
+                               name 'magit-branch-remote-head)
+                            name)))
+                 name))
+             remotes))
+      (let* ((current (magit-get-current-branch))
+             (target  (magit-get-upstream-branch current)))
+        (dolist (name branches)
+          (let ((push (car (member (magit-get-push-branch name) remotes))))
+            (when push
+              (setq remotes (delete push remotes))
+              (string-match "^[^/]*/" push)
+              (setq push (substring push 0 (match-end 0))))
+            (cond
+              ((equal name current)
+               (setq head
+                     (concat push
+                             (magit--propertize-face
+                              name 'magit-branch-current))))
+              ((equal name target)
+               (setq upstream
+                     (concat push
+                             (magit--propertize-face
+                              name '(magit-branch-upstream
+                                     magit-branch-local)))))
+              ((push (concat push name) combined)))))
+        (cond-let
+          ((or upstream (not target)))
+          ((member target remotes)
+           (magit--add-face-text-property
+            0 (length target) 'magit-branch-upstream nil target)
+           (setq upstream target)
+           (setq remotes (delete target remotes)))
+          ([target (car (member target combined))]
+           (magit--add-face-text-property
+            0 (length target) 'magit-branch-upstream nil target)
+           (setq upstream target)
+           (setq combined (delete target combined)))))
+      (string-join (flatten-tree `(,state
+                                   ,head
+                                   ,upstream
+                                   ,@(nreverse tags)
+                                   ,@(nreverse combined)
+                                   ,@(nreverse remotes)
+                                   ,@other))
+                   " "))))
+
+(defun magit-object-type (object)
+  (magit-git-string "cat-file" "-t" object))
+
+(defmacro magit-with-blob (rev file &rest body)
+  (declare (indent 2)
+           (debug (form form body)))
+  `(magit--with-temp-process-buffer
+     (let ((buffer-file-name ,file))
+       (save-excursion
+         (magit-git-insert "cat-file" "-p"
+                           (concat ,rev ":" buffer-file-name)))
+       (decode-coding-inserted-region
+        (point-min) (point-max) buffer-file-name t nil nil t)
+       ,@body)))
+
+(defmacro magit-with-temp-index (tree arg &rest body)
+  (declare (indent 2) (debug (form form body)))
+  (let ((file (gensym "file")))
+    `(let ((magit--refresh-cache nil)
+           (,file (magit-convert-filename-for-git
+                   (make-temp-name
+                    (expand-file-name "index.magit." (magit-gitdir))))))
+       (unwind-protect
+           (magit-with-toplevel
+             (when-let* ((tree ,tree)
+                         (_(not (magit-git-success
+                                 "read-tree" ,arg tree
+                                 (concat "--index-output=" ,file)))))
+               (error "Cannot read tree %s" tree))
+             (with-environment-variables (("GIT_INDEX_FILE" ,file))
+               ,@body))
+         (ignore-errors
+           (delete-file (concat (file-remote-p default-directory) ,file)))))))
+
+(defun magit-commit-tree (message &optional tree &rest parents)
+  (magit-git-string "commit-tree" "--no-gpg-sign" "-m" message
+                    (mapcan (##list "-p" %) (delq nil parents))
+                    (or tree
+                        (magit-git-string "write-tree")
+                        (error "Cannot write tree"))))
+
+(defun magit-commit-worktree (message &optional arg &rest other-parents)
+  (magit-with-temp-index "HEAD" arg
+    (and (magit-update-files (magit-unstaged-files))
+         (apply #'magit-commit-tree message nil "HEAD" other-parents))))
+
+(defun magit-update-files (files)
+  (magit-git-success "update-index" "--add" "--remove" "--" files))
+
+(defun magit-update-ref (ref message rev)
+  (let ((magit--refresh-cache nil))
+    (unless (zerop (magit-call-git "update-ref" "--create-reflog"
+                                   "-m" message ref rev
+                                   (or (magit-rev-verify ref) "")))
+      (error "Cannot update %s with %s" ref rev))))
+
+(defconst magit-range-re
+  (concat "\\`\\([^ \t]*[^.]\\)?"       ; revA
+          "\\(\\.\\.\\.?\\)"            ; range marker
+          "\\([^.][^ \t]*\\)?\\'"))     ; revB
+
+(defun magit-split-range (range &optional abbrev)
+  (pcase-let* ((`(,beg ,end ,sep) (magit--split-range-raw range))
+               (beg (or beg "HEAD"))
+               (end (or end "HEAD")))
+    (when abbrev
+      (setq beg (magit--abbrev-if-oid beg))
+      (setq end (magit--abbrev-if-oid end)))
+    (pcase sep
+      (".."  (cons beg end))
+      ("..." (and$ (magit-merge-base beg end)
+                   (cons (if abbrev (magit-rev-abbrev $) $)
+                         end))))))
+
+(defun magit--split-range-raw (range)
+  (and (string-match magit-range-re range)
+       (magit-bind-match-strings (beg sep end) range
+         (and (or beg end)
+              (list beg end sep)))))
+
+(defun magit-hash-range (range)
+  "Return a string with the revisions in RANGE replaced with commit oids.
+Either side of RANGE may be omitted, and RANGE may be just a revision.
+If either revision cannot be dereferenced as a commit, signal an error."
+  (if (string-match magit-range-re range)
+      (magit-bind-match-strings (beg sep end) range
+        (and (or beg end)
+             (let ((beg-oid (and beg (magit-commit-oid beg)))
+                   (end-oid (and end (magit-commit-oid end))))
+               (and (or (not beg) beg-oid)
+                    (or (not end) end-oid)
+                    (concat beg-oid sep end-oid)))))
+    (magit-commit-oid range)))
+
+(defvar magit-revision-faces
+  '(magit-hash
+    magit-tag
+    magit-branch-remote
+    magit-branch-remote-head
+    magit-branch-local
+    magit-branch-current
+    magit-branch-upstream
+    magit-branch-warning
+    magit-head
+    magit-refname
+    magit-refname-stash
+    magit-refname-wip
+    magit-refname-pullreq))
+
+(put 'git-revision 'thing-at-point #'magit-thingatpt--git-revision)
+(defun magit-thingatpt--git-revision (&optional disallow)
+  ;; Support hashes and references.
+  (and-let* ((bounds
+              (let ((c (concat "\s\n\t~^:?*[\\" disallow)))
+                (cl-letf
+                    (((get 'git-revision 'beginning-op)
+                      (lambda ()
+                        (if (re-search-backward (format "[%s]" c) nil t)
+                            (forward-char)
+                          (goto-char (point-min)))))
+                     ((get 'git-revision 'end-op)
+                      (lambda ()
+                        (re-search-forward (format "\\=[^%s]*" c) nil t))))
+                  (bounds-of-thing-at-point 'git-revision))))
+             (string (buffer-substring-no-properties (car bounds) (cdr bounds)))
+             ;; References are allowed to contain most parentheses and
+             ;; most punctuation, but if those characters appear at the
+             ;; edges of a possible reference in arbitrary text, then
+             ;; they are much more likely to be intended as just that:
+             ;; punctuation and delimiters.
+             (string (thread-first string
+                       (string-trim-left  "[(</]")
+                       (string-trim-right "[])>/.,;!]"))))
+    (let (disallow)
+      (when (or (string-match-p "\\.\\." string)
+                (string-match-p "/\\." string))
+        (setq disallow (concat disallow ".")))
+      (when (string-match-p "@{" string)
+        (setq disallow (concat disallow "@{")))
+      (if disallow
+          ;; These additional restrictions overcompensate,
+          ;; but that only matters in rare cases.
+          (magit-thingatpt--git-revision disallow)
+        (and (not (equal string "@"))
+             (or (and (>= (length string) 7)
+                      (string-match-p "[a-z]" string)
+                      (magit-commit-oid string t))
+                 (and (magit-ref-p string)
+                      (member (get-text-property (point) 'face)
+                              magit-revision-faces)))
+             string)))))
+
+(put 'git-revision-range 'thing-at-point #'magit-thingatpt--git-revision-range)
+(defun magit-thingatpt--git-revision-range ()
+  ;; Support hashes but no references.
+  (and-let* ((bounds
+              (cl-letf (((get 'git-revision 'beginning-op)
+                         (lambda ()
+                           (if (re-search-backward "[^a-z0-9.]" nil t)
+                               (forward-char)
+                             (goto-char (point-min)))))
+                        ((get 'git-revision 'end-op)
+                         (lambda ()
+                           (and (re-search-forward "[^a-z0-9.]" nil t)
+                                (backward-char)))))
+                (bounds-of-thing-at-point 'git-revision)))
+             (range (buffer-substring-no-properties (car bounds) (cdr bounds))))
+    ;; Validate but return as-is.
+    (and (magit-hash-range range) range)))
+
+;;; Completion
+
+(defvar magit-revision-history nil)
+
+(defun magit--minibuf-default-add-commit ()
+  (let ((fn minibuffer-default-add-function))
+    (setq-local
+     minibuffer-default-add-function
+     (lambda ()
+       (let ((rest (and (functionp fn) (funcall fn))))
+         (if-let ((commit (with-selected-window (minibuffer-selected-window)
+                            (or (magit-thing-at-point 'git-revision-range t)
+                                (magit-commit-at-point)))))
+             (let ((rest (cons commit (delete commit rest)))
+                   (def minibuffer-default))
+               (if (listp def)
+                   (append def rest)
+                 (cons def (delete def rest))))
+           rest))))))
+
+(defun magit-read-branch (prompt &optional secondary-default)
+  (magit-completing-read prompt (magit-list-branch-names)
+                         nil t nil 'magit-revision-history
+                         (or (magit-branch-at-point)
+                             secondary-default
+                             (magit-get-current-branch))))
+
+(defun magit-read-branch-or-commit (prompt &optional secondary-default exclude)
+  (let* ((current (magit-get-current-branch))
+         (branch-at-point (magit-branch-at-point))
+         (commit-at-point (magit-commit-at-point))
+         (exclude (ensure-list exclude))
+         (choices (cl-set-difference (magit-list-refnames nil t)
+                                     exclude :test #'equal)))
+    (when (member current exclude)
+      (setq current nil))
+    (when (member branch-at-point exclude)
+      (setq branch-at-point nil))
+    (when (and commit-at-point (not branch-at-point))
+      (setq choices (cons commit-at-point choices)))
+    (minibuffer-with-setup-hook #'magit--minibuf-default-add-commit
+      (magit-completing-read
+       prompt choices nil 'any nil 'magit-revision-history
+       (or branch-at-point commit-at-point secondary-default current)))))
+
+(defun magit-read-range-or-commit (prompt &optional secondary-default)
+  (magit-read-range
+   prompt
+   (or (and-let ((revs (magit-region-values '(commit branch) t)))
+         (prog1 (concat (car (last revs)) ".." (car revs))
+           (deactivate-mark)))
+       (magit-branch-or-commit-at-point)
+       secondary-default
+       (magit-get-current-branch))))
+
+(defun magit-read-range (prompt &optional default)
+  (minibuffer-with-setup-hook
+      (lambda ()
+        (magit--minibuf-default-add-commit)
+        (setq-local crm-separator "\\.\\.\\.?"))
+    (let ((crm-prompt "%p"))
+      (magit-completing-read-multiple
+       (concat prompt ": ")
+       (magit-list-refnames)
+       nil 'any nil 'magit-revision-history default nil t))))
+
+(defun magit-read-remote-branch
+    (prompt &optional remote default local-branch require-match)
+  (let ((choice (magit-completing-read
+                 prompt
+                 (cl-union (and local-branch
+                                (if remote
+                                    (list local-branch)
+                                  (mapcar (##concat % "/" local-branch)
+                                          (magit-list-remotes))))
+                           (magit-list-remote-branch-names remote t)
+                           :test #'equal)
+                 nil (or require-match 'any)
+                 nil 'magit-revision-history default)))
+    (if (or remote (string-match "\\`\\([^/]+\\)/\\(.+\\)" choice))
+        choice
+      (user-error "`%s' doesn't have the form REMOTE/BRANCH" choice))))
+
+(defun magit-read-refspec (prompt remote)
+  (magit-completing-read prompt
+                         (prog2 (message "Determining available refs...")
+                             (magit-remote-list-refs remote)
+                           (message "Determining available refs...done"))
+                         nil 'any))
+
+(defun magit-read-local-branch (prompt &optional secondary-default)
+  (magit-completing-read prompt (magit-list-local-branch-names)
+                         nil t nil 'magit-revision-history
+                         (or (magit-local-branch-at-point)
+                             secondary-default
+                             (magit-get-current-branch))))
+
+(defun magit-read-local-branch-or-commit (prompt)
+  (let ((choices (nconc (magit-list-local-branch-names)
+                        (magit-list-special-refnames)))
+        (commit (magit-commit-at-point)))
+    (when commit
+      (push commit choices))
+    (minibuffer-with-setup-hook #'magit--minibuf-default-add-commit
+      (magit-completing-read prompt choices
+                             nil 'any nil 'magit-revision-history
+                             (or (magit-local-branch-at-point) commit)))))
+
+(defun magit-read-local-branch-or-ref (prompt &optional secondary-default)
+  (magit-completing-read prompt (nconc (magit-list-local-branch-names)
+                                       (magit-list-refs "refs/"))
+                         nil t nil 'magit-revision-history
+                         (or (magit-local-branch-at-point)
+                             secondary-default
+                             (magit-get-current-branch))))
+
+(defun magit-read-other-branch
+    (prompt &optional exclude secondary-default)
+  (let* ((current (magit-get-current-branch))
+         (atpoint (magit-branch-at-point))
+         (exclude (or exclude current))
+         (default (or (and (not (equal atpoint exclude)) atpoint)
+                      (and (not (equal current exclude)) current)
+                      secondary-default
+                      (magit-get-previous-branch))))
+    (magit-completing-read prompt (delete exclude (magit-list-branch-names))
+                           nil t nil 'magit-revision-history default)))
+
+(defun magit-read-other-branch-or-commit
+    (prompt &optional exclude secondary-default)
+  (let* ((current (magit-get-current-branch))
+         (atpoint (magit-branch-or-commit-at-point))
+         (exclude (or exclude current))
+         (default (or (and (not (equal atpoint exclude))
+                           (not (and (not current)
+                                     (magit-rev-equal atpoint "HEAD")))
+                           atpoint)
+                      (and (not (equal current exclude)) current)
+                      secondary-default
+                      (magit-get-previous-branch))))
+    (minibuffer-with-setup-hook #'magit--minibuf-default-add-commit
+      (magit-completing-read prompt (delete exclude (magit-list-refnames))
+                             nil 'any nil 'magit-revision-history default))))
+
+(defun magit-read-other-branches-or-commits
+    (prompt &optional exclude secondary-default)
+  (let* ((current (magit-get-current-branch))
+         (atpoint (magit-branch-or-commit-at-point))
+         (exclude (or exclude current))
+         (default (or (and (not (equal atpoint exclude))
+                           (not (and (not current)
+                                     (magit-rev-equal atpoint "HEAD")))
+                           atpoint)
+                      (and (not (equal current exclude)) current)
+                      secondary-default
+                      (magit-get-previous-branch))))
+    (minibuffer-with-setup-hook #'magit--minibuf-default-add-commit
+      (magit-completing-read-multiple
+       prompt (delete exclude (magit-list-refnames))
+       nil 'any nil 'magit-revision-history default))))
+
+(defun magit-read-other-local-branch
+    (prompt &optional exclude secondary-default)
+  (let* ((current (magit-get-current-branch))
+         (atpoint (magit-local-branch-at-point))
+         (exclude (or exclude current))
+         (default (or (and (not (equal atpoint exclude)) atpoint)
+                      (and (not (equal current exclude)) current)
+                      secondary-default
+                      (magit-get-previous-branch))))
+    (magit-completing-read prompt
+                           (delete exclude (magit-list-local-branch-names))
+                           nil t nil 'magit-revision-history default)))
+
+(defun magit-read-branch-prefer-other (prompt)
+  (let* ((current (magit-get-current-branch))
+         (commit  (magit-commit-at-point))
+         (atrev   (and commit (magit-list-branches-pointing-at commit)))
+         (atpoint (magit--painted-branch-at-point)))
+    (magit-completing-read prompt (magit-list-branch-names)
+                           nil t nil 'magit-revision-history
+                           (or (magit-section-value-if 'branch)
+                               atpoint
+                               (and (not (cdr atrev)) (car atrev))
+                               (seq-find (##not (equal % current)) atrev)
+                               (magit-get-previous-branch)
+                               (car atrev)))))
+
+(defun magit-read-upstream-branch (&optional branch prompt)
+  "Read the upstream for BRANCH using PROMPT.
+If optional BRANCH is nil, then read the upstream for the
+current branch, or raise an error if no branch is checked
+out.  Only existing branches can be selected."
+  (unless branch
+    (setq branch (or (magit-get-current-branch)
+                     (error "Need a branch to set its upstream"))))
+  (let ((branches (delete branch (magit-list-branch-names))))
+    (magit-completing-read
+     (or prompt (format "Change upstream of %s to" branch))
+     branches nil t nil 'magit-revision-history
+     (or (let ((r (car (member (magit-remote-branch-at-point) branches)))
+               (l (car (member (magit-local-branch-at-point) branches))))
+           (if magit-prefer-remote-upstream (or r l) (or l r)))
+         (and-let ((main (magit-main-branch)))
+           (let ((r (car (member (concat "origin/" main) branches)))
+                 (l (car (member main branches))))
+             (if magit-prefer-remote-upstream (or r l) (or l r))))
+         (car (member (magit-get-previous-branch) branches))))))
+
+(defun magit-read-starting-point (prompt &optional branch default)
+  (or (minibuffer-with-setup-hook #'magit--minibuf-default-add-commit
+        (magit-completing-read
+         (concat prompt
+                 (and branch
+                      (if (bound-and-true-p ivy-mode)
+                          ;; Ivy-mode strips faces from prompt.
+                          (format  " `%s'" branch)
+                        (concat " " (magit--propertize-face
+                                     branch 'magit-branch-local))))
+                 " starting at")
+         (let ((refnames (magit-list-refnames)))
+           (when-let ((upstream (magit-get-upstream-branch)))
+             (setq refnames (cons upstream (delete upstream refnames))))
+           (nconc refnames
+                  (list "HEAD")
+                  (directory-files (magit-gitdir) nil "_HEAD\\'")))
+         nil 'any nil 'magit-revision-history
+         (or default (magit--default-starting-point))))
+      (user-error "Nothing selected")))
+
+(defun magit--default-starting-point ()
+  (or (let ((r (magit-remote-branch-at-point))
+            (l (magit-local-branch-at-point)))
+        (if magit-prefer-remote-upstream (or r l) (or l r)))
+      (magit-commit-at-point)
+      (magit-stash-at-point)
+      (magit-get-current-branch)))
+
+(defun magit-read-tag (prompt)
+  (magit-completing-read prompt (magit-list-tags) nil t nil
+                         'magit-revision-history
+                         (magit-tag-at-point)))
+
+(defun magit-read-stash (prompt)
+  (let* ((atpoint (magit-stash-at-point))
+         (default (and atpoint
+                       (concat atpoint (magit-rev-format " %s" atpoint))))
+         (choices (mapcar (lambda (c)
+                            (pcase-let ((`(,rev ,msg) (split-string c "\0")))
+                              (concat (propertize rev 'face 'magit-hash)
+                                      " " msg)))
+                          (magit-list-stashes "%gd%x00%s")))
+         (choice  (magit-completing-read prompt choices
+                                         nil t nil nil
+                                         default
+                                         (car choices))))
+    (and choice
+         (string-match "^\\([^ ]+\\) \\(.+\\)" choice)
+         (substring-no-properties (match-str 1 choice)))))
+
+(defun magit-read-shelved-branch (prompt)
+  (magit-completing-read
+   prompt
+   (mapcar (##substring % 8)
+           (nreverse (magit-list-refnames "refs/shelved")))
+   nil t nil nil
+   (and$ (magit-section-value-if 'shelved-branch)
+         (substring $ 13))))
+
+(defun magit-read-remote (prompt &optional default use-only)
+  (let ((remotes (magit-list-remotes)))
+    (if (and use-only (length= remotes 1))
+        (car remotes)
+      (magit-completing-read prompt remotes
+                             nil t nil nil
+                             (or default
+                                 (magit-remote-at-point)
+                                 (magit-get-remote))))))
+
+(defun magit-read-remote-or-url (prompt &optional default)
+  (magit-completing-read prompt
+                         (nconc (magit-list-remotes)
+                                (list "https://" "git://" "git@"))
+                         nil 'any nil nil
+                         (or default
+                             (magit-remote-at-point)
+                             (magit-get-remote))))
+
+(defun magit-read-module-path (prompt &optional predicate)
+  ;; Predicates are evaluate with the minibuffer as the current buffer.
+  ;; Unlike for other completion frameworks, Helm does not ensure that
+  ;; the value of `default-directory' in that buffer is the same as in
+  ;; the buffer from which completion was invoked.
+  (magit-completing-read prompt (magit-list-module-paths)
+                         (and predicate
+                              (let ((dir default-directory))
+                                (lambda (module)
+                                  (let ((default-directory dir))
+                                    (funcall predicate module)))))
+                         t nil nil
+                         (magit-module-at-point predicate)))
+
+(defun magit-module-confirm (verb &optional predicate)
+  ;; Some predicates use the inefficient `magit-toplevel'
+  ;; and some repositories have thousands of submodules.
+  (let ((magit--refresh-cache (list (cons 0 0)))
+        (modules nil))
+    (cond (current-prefix-arg
+           (setq modules (magit-list-module-paths))
+           (when predicate
+             (setq modules (seq-filter predicate modules)))
+           (unless modules
+             (if predicate
+                 (user-error "No modules satisfying %s available" predicate)
+               (user-error "No modules available"))))
+          (t
+           (setq modules (magit-region-values 'module))
+           (when modules
+             (when predicate
+               (setq modules (seq-filter predicate modules)))
+             (unless modules
+               (user-error "No modules satisfying %s selected" predicate)))))
+    (if (or (length> modules 1) current-prefix-arg)
+        (magit-confirm t nil (format "%s %%d modules" verb) nil modules)
+      (list (magit-read-module-path (format "%s module" verb) predicate)))))
+
+;;; Git Hooks
+
+(defun magit-run-git-hook (hook &rest args)
+  "Run the Lisp HOOK with the specified arguments ARGS.
+
+ARGS are the arguments (a possibly empty list of strings), which
+the Git hook was called with.  HOOK is a string naming a hook.
+
+This function is only intended to be called via \"emacsclient\", by
+an executable by the same name, which in turn is only intended to
+be called by Git hooks."
+  (setq hook (intern hook))
+  (when (and (boundp hook)
+             (symbol-value hook))
+    (magit--client-message "Running %s..." hook)
+    (advice-add 'message :override #'magit--client-message)
+    (unwind-protect (apply #'run-hook-with-args hook args)
+      (advice-remove 'message #'magit--client-message))
+    (magit--client-message "Running %s...done" hook))
+  '---) ; Emacsclient insists on printing the value.
+
+(defun magit--client-message (format-string &rest args)
+  ;; See `server-process-filter'.
+  (let ((msg (format "-print %s\n"
+                     (server-quote-arg
+                      (apply #'format-message format-string args)))))
+    (dolist (client server-clients)
+      (server-send-string client msg))))
+
+;;; _
+
+(define-obsolete-function-alias 'magit-git-string-p
+  #'magit-git-string "Magit 4.6.0")
+
+(define-obsolete-function-alias 'magit-rev-verify-commit
+  #'magit-commit-p "Magit 4.6.0")
+
+(define-obsolete-function-alias 'magit-rev-hash
+  #'magit-commit-p "Magit 4.6.0"
+  "Return oid for REV if it names an existing commit, nil otherwise.
+Instead use `magit-commit-p' or `magit-commit-oid'.")
+
+(define-obsolete-function-alias 'magit--abbrev-if-hash
+  #'magit--abbrev-if-oid "Magit 4.6.0")
+
+(provide 'magit-git)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-git.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-git.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-git.elc
new file mode 100644
index 0000000..a96e285
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-git.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-gitignore.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-gitignore.el
new file mode 100644
index 0000000..75f9137
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-gitignore.el
@@ -0,0 +1,220 @@
+;;; magit-gitignore.el --- Intentionally untracked files  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements gitignore commands.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Transient
+
+;;;###autoload(autoload 'magit-gitignore "magit-gitignore" nil t)
+(transient-define-prefix magit-gitignore ()
+  "Instruct Git to ignore a file or pattern."
+  :man-page "gitignore"
+  ["Gitignore"
+   ("t" magit-gitignore-in-topdir)
+   ("s" magit-gitignore-in-subdir)
+   ("p" magit-gitignore-in-gitdir)
+   ("g" magit-gitignore-on-system)]
+  ["Skip worktree"
+   (7 "w" "do skip worktree"     magit-skip-worktree)
+   (7 "W" "do not skip worktree" magit-no-skip-worktree)]
+  ["Assume unchanged"
+   (7 "u" "do assume unchanged"     magit-assume-unchanged)
+   (7 "U" "do not assume unchanged" magit-no-assume-unchanged)])
+
+;;; Gitignore Commands
+
+;;;###autoload(autoload 'magit-gitignore-in-topdir "magit-gitignore" nil t)
+(transient-define-suffix magit-gitignore-in-topdir (rule)
+  "Add the Git ignore RULE to the top-level \".gitignore\" file.
+Since this file is tracked, it is shared with other clones of the
+repository.  Also stage the file."
+  :description "shared at toplevel (.gitignore)"
+  (interactive (list (magit-gitignore-read-pattern)))
+  (magit--gitignore rule (expand-file-name ".gitignore" (magit-toplevel)) t))
+
+;;;###autoload(autoload 'magit-gitignore-in-subdir "magit-gitignore" nil t)
+(transient-define-suffix magit-gitignore-in-subdir (rule directory)
+  "Add the Git ignore RULE to a \".gitignore\" file in DIRECTORY.
+Prompt the user for a directory and add the rule to the
+\".gitignore\" file in that directory.  Since such files are
+tracked, they are shared with other clones of the repository.
+Also stage the file."
+  :description "shared in subdirectory (path/to/.gitignore)"
+  (interactive (let ((dir (expand-file-name
+                           (read-directory-name
+                            "Limit rule to files in: "
+                            (and$ (magit-current-file)
+                                  (file-name-directory
+                                   (expand-file-name $ (magit-toplevel))))))))
+                 (list (magit-gitignore-read-pattern dir) dir)))
+  (magit--gitignore rule (expand-file-name ".gitignore" directory) t))
+
+;;;###autoload(autoload 'magit-gitignore-in-gitdir "magit-gitignore" nil t)
+(transient-define-suffix magit-gitignore-in-gitdir (rule)
+  "Add the Git ignore RULE to \"$GIT_DIR/info/exclude\".
+Rules in that file only affects this clone of the repository.  If the
+repository has multiple worktrees, the rules apply to all worktrees."
+  :description "privately (.git/info/exclude)"
+  (interactive (list (magit-gitignore-read-pattern)))
+  (magit--gitignore
+   rule
+   (expand-file-name "info/exclude" (magit-gitdir nil t))))
+
+;;;###autoload(autoload 'magit-gitignore-on-system "magit-gitignore" nil t)
+(transient-define-suffix magit-gitignore-on-system (rule)
+  "Add the Git ignore RULE to the file specified by `core.excludesFile'.
+Rules that are defined in that file affect all local repositories."
+  :inapt-if-not (##magit-get "core.excludesfile")
+  :description (##format "privately for all repositories (%s)"
+                         (or (magit-get "core.excludesfile")
+                             "core.excludesfile is not set"))
+  (interactive (list (magit-gitignore-read-pattern)))
+  (if-let ((file (magit-get "core.excludesFile")))
+      (magit--gitignore rule file)
+    (error "Variable `core.excludesFile' isn't set")))
+
+(defun magit--gitignore (rule file &optional stage)
+  (when$ (file-name-directory file)
+    (make-directory $ t))
+  (with-temp-buffer
+    (when (file-exists-p file)
+      (insert-file-contents file))
+    (goto-char (point-max))
+    (unless (bolp)
+      (insert "\n"))
+    (insert (replace-regexp-in-string "\\(\\\\*\\)" "\\1\\1" rule))
+    (insert "\n")
+    (write-region nil nil file))
+  (if stage
+      (magit-with-toplevel
+        (magit-run-git "add" (magit-convert-filename-for-git file)))
+    (magit-refresh)))
+
+(defun magit-gitignore-read-pattern (&optional directory)
+  (let ((choices (magit--gitignore-patterns directory))
+        (default (magit-current-file)))
+    (when default
+      (when directory
+        (setq default
+              (substring default
+                         (length
+                          (file-relative-name directory (magit-toplevel))))))
+      (setq default (concat "/" default))
+      (unless (member default choices)
+        (setq default (concat "*." (file-name-extension default)))
+        (unless (member default choices)
+          (setq default nil))))
+    (magit-completing-read "File or pattern to ignore"
+                           choices nil 'any nil nil default)))
+
+(defun magit--gitignore-patterns (&optional directory)
+  (let* ((topdir (magit-toplevel))
+         (default-directory (or directory topdir))
+         (files (magit-untracked-files nil directory))
+         ;; Include directories that contain only untracked files.
+         (dirs (magit--untracked-directories nil directory))
+         (globs nil)
+         (dirglobs nil))
+    (when directory
+      (let ((beg (length (file-relative-name directory topdir))))
+        (setq files (mapcar (##substring % beg) files))
+        (setq dirs  (mapcar (##substring % beg) dirs))))
+    (dolist (file files)
+      (when-let ((ext (file-name-extension file)))
+        (cl-pushnew (concat "*." ext) globs :test #'equal)
+        (when-let ((dir (file-name-directory file)))
+          (cl-pushnew (concat dir "*." ext) dirglobs :test #'equal))))
+    (sort (nconc globs
+                 (mapcar (##concat "/" %) (nconc files dirs dirglobs)))
+          #'string<)))
+
+;;; Skip Worktree Commands
+
+;;;###autoload
+(defun magit-skip-worktree (file)
+  "Call \"git update-index --skip-worktree -- FILE\"."
+  (interactive
+    (list (magit-read-file-choice "Skip worktree for"
+                                  (cl-set-difference
+                                   (magit-list-files)
+                                   (magit-skip-worktree-files)
+                                   :test #'equal))))
+  (magit-with-toplevel
+    (magit-run-git "update-index" "--skip-worktree" "--" file)))
+
+;;;###autoload
+(defun magit-no-skip-worktree (file)
+  "Call \"git update-index --no-skip-worktree -- FILE\"."
+  (interactive
+    (list (magit-read-file-choice "Do not skip worktree for"
+                                  (magit-skip-worktree-files))))
+  (magit-with-toplevel
+    (magit-run-git "update-index" "--no-skip-worktree" "--" file)))
+
+;;; Assume Unchanged Commands
+
+;;;###autoload
+(defun magit-assume-unchanged (file)
+  "Call \"git update-index --assume-unchanged -- FILE\"."
+  (interactive
+    (list (magit-read-file-choice "Assume file to be unchanged"
+                                  (cl-set-difference
+                                   (magit-list-files)
+                                   (magit-assume-unchanged-files)
+                                   :test #'equal))))
+  (magit-with-toplevel
+    (magit-run-git "update-index" "--assume-unchanged" "--" file)))
+
+;;;###autoload
+(defun magit-no-assume-unchanged (file)
+  "Call \"git update-index --no-assume-unchanged -- FILE\"."
+  (interactive
+    (list (magit-read-file-choice "Do not assume file to be unchanged"
+                                  (magit-assume-unchanged-files))))
+  (magit-with-toplevel
+    (magit-run-git "update-index" "--no-assume-unchanged" "--" file)))
+
+;;; _
+(provide 'magit-gitignore)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-gitignore.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-gitignore.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-gitignore.elc
new file mode 100644
index 0000000..b5e8d90
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-gitignore.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-log.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-log.el
new file mode 100644
index 0000000..ef73800
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-log.el
@@ -0,0 +1,2153 @@
+;;; magit-log.el --- Inspect Git history  -*- lexical-binding:t; coding:utf-8 -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for looking at Git logs, including
+;; special logs like cherry-logs, as well as for selecting a commit
+;; from a log.
+
+;;; Code:
+
+(require 'magit-core)
+(require 'magit-diff)
+
+(declare-function magit-blob-visit "magit-files" (rev file))
+(declare-function magit-cherry-apply "magit-sequence" (commit &optional args))
+(declare-function magit-insert-head-branch-header "magit-status"
+                  (&optional branch))
+(declare-function magit-insert-upstream-branch-header "magit-status"
+                  (&optional branch pull keyword))
+(declare-function magit-read-file-from-rev "magit-files"
+                  (rev prompt &optional default include-dirs))
+(declare-function magit-rebase--get-state-lines "magit-sequence"
+                  (file))
+(declare-function magit-show-commit "magit-diff"
+                  (arg1 &optional arg2 arg3 arg4))
+(declare-function magit-reflog-format-subject "magit-reflog" (subject))
+(defvar magit-refs-focus-column-width)
+(defvar magit-refs-margin)
+(defvar magit-refs-show-commit-count)
+(defvar magit--right-margin-config)
+(defvar magit-status-margin)
+(defvar magit-status-sections-hook)
+(defvar magit-status-use-buffer-arguments)
+
+(require 'ansi-color)
+(require 'crm)
+(require 'which-func)
+
+(make-obsolete-variable 'magit-log-highlight-keywords
+                        'magit-log-wash-summary-hook
+                        "Magit 4.3.0")
+
+(make-obsolete-variable 'magit-log-format-message-function
+                        'magit-log-wash-summary-hook
+                        "Magit 4.3.0")
+
+;;; Options
+;;;; Log Mode
+
+(defgroup magit-log nil
+  "Inspect and manipulate Git history."
+  :link '(info-link "(magit)Logging")
+  :group 'magit-commands
+  :group 'magit-modes)
+
+(defcustom magit-log-mode-hook nil
+  "Hook run after entering Magit-Log mode."
+  :group 'magit-log
+  :type 'hook)
+
+(defcustom magit-log-remove-graph-args '("--follow" "-G" "-S" "-L")
+  "The log arguments that cause the \"--graph\" argument to be dropped.
+
+The default value lists the arguments that are incompatible with
+\"--graph\" and therefore must be dropped when that is used.  You
+can add additional arguments that are available in `magit-log',
+but I recommend that you don't do that.  Nowadays I would define
+this as a constant, but I am preserving it as an option, in case
+someone actually customized it."
+  :package-version '(magit . "4.3.7")
+  :group 'magit-log
+  :type '(repeat (string :tag "Argument"))
+  :options '("--follow" "-G" "-S" "-L"))
+
+(defcustom magit-log-revision-headers-format "\
+%+b%+N
+Author:    %aN <%aE>
+Committer: %cN <%cE>"
+  "Additional format string used with the `++header' argument."
+  :package-version '(magit . "3.2.0")
+  :group 'magit-log
+  :type 'string)
+
+(defcustom magit-log-auto-more nil
+  "Insert more log entries automatically when moving past the last entry.
+Only considered when moving past the last entry with
+`magit-goto-*-section' commands."
+  :group 'magit-log
+  :type 'boolean)
+
+(defcustom magit-log-margin '(t age magit-log-margin-width t 18)
+  "Format of the margin in `magit-log-mode' buffers.
+
+The value has the form (INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH).
+
+If INIT is non-nil, then the margin is shown initially.
+STYLE controls how to format the author or committer date.
+  It can be one of `age' (to show the age of the commit),
+  `age-abbreviated' (to abbreviate the time unit to a character),
+  or a string (suitable for `format-time-string') to show the
+  actual date.  Option `magit-log-margin-show-committer-date'
+  controls which date is being displayed.
+WIDTH controls the width of the margin.  This exists for forward
+  compatibility and currently the value should not be changed.
+AUTHOR controls whether the name of the author is also shown by
+  default.
+AUTHOR-WIDTH has to be an integer.  When the name of the author
+  is shown, then this specifies how much space is used to do so."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-log
+  :group 'magit-margin
+  :type magit-log-margin--custom-type
+  :initialize #'magit-custom-initialize-reset
+  :set (apply-partially #'magit-margin-set-variable 'magit-log-mode))
+
+(defcustom magit-log-margin-show-committer-date nil
+  "Whether to show the committer date in the margin.
+
+This option only controls whether the committer date is displayed
+instead of the author date.  Whether some date is displayed in
+the margin and whether the margin is displayed at all is
+controlled by other options."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-log
+  :group 'magit-margin
+  :type 'boolean)
+
+(defcustom magit-log-show-refname-after-summary nil
+  "Whether to show refnames after commit summaries.
+This is useful if you use really long branch names."
+  :package-version '(magit . "2.2.0")
+  :group 'magit-log
+  :type 'boolean)
+
+(defcustom magit-log-wash-summary-hook
+  (list #'magit-highlight-squash-markers
+        #'magit-highlight-bracket-keywords)
+  "Functions used to highlight parts of each individual commit summary.
+
+These functions are called in order, in a buffer containing the first
+line of the commit message.  They should set text properties as they see
+fit, usually just `font-lock-face'.  Before each function is called,
+point is at the beginning of the buffer.
+
+See also the related `magit-revision-wash-message-hook'.  You likely
+want to use the same functions for both hooks."
+  :package-version '(magit . "4.3.0")
+  :group 'magit-log
+  :type 'hook
+  :options (list #'magit-highlight-squash-markers
+                 #'magit-highlight-bracket-keywords))
+
+(defcustom magit-log-trailer-labels nil
+  "Whether and how to insert labels, derived from commit message trailers.
+
+If non-nil, the value has the form (FUNCTION . OPTIONS).  FUNCTION is
+called with one argument, the trailers as an alist, and should return a
+string, which is then inserted in between the refnames and the message,
+or nil.  OPTIONS specifies additional options for \"%(trailers)\".  You
+should probably use something like \"key=KEY1,key=KEY2,only=true\".
+\"unfold=true,separator=^^,key_value_separator=^_\" is always appended
+to the options specified here.  See the git-log(1) manpage."
+  :package-version '(magit . "4.4.1")
+  :group 'magit-log
+  :type '(choice (const :tag "Ignore trailers" nil)
+                 (cons  :tag "Process trailers"
+                        (function :tag "Formatting function")
+                        (string   :tag "Options for %%(trailers)"))))
+
+(defcustom magit-log-header-line-function #'magit-log-header-line-sentence
+  "Function used to generate text shown in header line of log buffers."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-log
+  :type `(radio (function-item ,#'magit-log-header-line-arguments)
+                (function-item ,#'magit-log-header-line-sentence)
+                function))
+
+(defcustom magit-log-trace-definition-function #'magit-which-function
+  "Function used to determine the function at point.
+This is used by the command `magit-log-trace-definition'.
+You should prefer `magit-which-function' over `which-function'
+because the latter may make use of Imenu's outdated cache."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-log
+  :type `(radio (function-item ,#'magit-which-function)
+                (function-item ,#'which-function)
+                (function-item ,#'add-log-current-defun)
+                function))
+
+(defcustom magit-log-color-graph-limit 256
+  "Number of commits over which log graphs are not colored.
+When showing more commits than specified, then the \"--color\"
+argument is silently dropped.  This is necessary because the
+`ansi-color' library, which is used to turn control sequences
+into faces, is just too slow."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-log
+  :type 'number)
+
+(defcustom magit-log-show-signatures-limit 256
+  "Number of commits over which signatures are not verified.
+When showing more commits than specified by this option, then the
+\"--show-signature\" argument, if specified, is silently dropped.
+This is necessary because checking the signature of a large
+number of commits is just too slow."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-log
+  :type 'number)
+
+(defface magit-log-graph
+  '((((class color) (background light)) :foreground "grey30")
+    (((class color) (background  dark)) :foreground "grey80"))
+  "Face for the graph part of the log output."
+  :group 'magit-faces)
+
+(defface magit-log-author
+  '((((class color) (background light))
+     :foreground "firebrick"
+     :slant normal
+     :weight normal)
+    (((class color) (background  dark))
+     :foreground "tomato"
+     :slant normal
+     :weight normal))
+  "Face for the author part of the log output."
+  :group 'magit-faces)
+
+(defface magit-log-date
+  '((((class color) (background light))
+     :foreground "grey30"
+     :slant normal
+     :weight normal)
+    (((class color) (background  dark))
+     :foreground "grey80"
+     :slant normal
+     :weight normal))
+  "Face for the date part of the log output."
+  :group 'magit-faces)
+
+(defface magit-header-line-log-select
+  '((t :inherit bold))
+  "Face for the `header-line' in `magit-log-select-mode'."
+  :group 'magit-faces)
+
+;;;; File Log
+
+(defcustom magit-log-buffer-file-locked t
+  "Whether `magit-log-buffer-file-quick' uses a dedicated buffer."
+  :package-version '(magit . "2.7.0")
+  :group 'magit-commands
+  :group 'magit-log
+  :type 'boolean)
+
+;;;; Select Mode
+
+(defcustom magit-log-select-show-usage 'both
+  "Whether to show usage information when selecting a commit from a log.
+The message can be shown in the `echo-area' or the `header-line', or in
+`both' places.  If the value isn't one of these symbols, then it should
+be nil, in which case no usage information is shown."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-log
+  :type '(choice (const :tag "In echo-area" echo-area)
+                 (const :tag "In header-line" header-line)
+                 (const :tag "In both places" both)
+                 (const :tag "Nowhere")))
+
+(defcustom magit-log-select-margin
+  (list (nth 0 magit-log-margin)
+        (nth 1 magit-log-margin)
+        'magit-log-margin-width t
+        (nth 4 magit-log-margin))
+  "Format of the margin in `magit-log-select-mode' buffers.
+
+The value has the form (INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH).
+
+If INIT is non-nil, then the margin is shown initially.
+STYLE controls how to format the author or committer date.
+  It can be one of `age' (to show the age of the commit),
+  `age-abbreviated' (to abbreviate the time unit to a character),
+  or a string (suitable for `format-time-string') to show the
+  actual date.  Option `magit-log-margin-show-committer-date'
+  controls which date is being displayed.
+WIDTH controls the width of the margin.  This exists for forward
+  compatibility and currently the value should not be changed.
+AUTHOR controls whether the name of the author is also shown by
+  default.
+AUTHOR-WIDTH has to be an integer.  When the name of the author
+  is shown, then this specifies how much space is used to do so."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-log
+  :group 'magit-margin
+  :type magit-log-margin--custom-type
+  :initialize #'magit-custom-initialize-reset
+  :set-after '(magit-log-margin)
+  :set (apply-partially #'magit-margin-set-variable 'magit-log-select-mode))
+
+;;;; Cherry Mode
+
+(defcustom magit-cherry-sections-hook
+  (list #'magit-insert-cherry-headers
+        #'magit-insert-cherry-commits)
+  "Hook run to insert sections into the cherry buffer."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-log
+  :type 'hook)
+
+(defcustom magit-cherry-margin
+  (list (nth 0 magit-log-margin)
+        (nth 1 magit-log-margin)
+        'magit-log-margin-width t
+        (nth 4 magit-log-margin))
+  "Format of the margin in `magit-cherry-mode' buffers.
+
+The value has the form (INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH).
+
+If INIT is non-nil, then the margin is shown initially.
+STYLE controls how to format the author or committer date.
+  It can be one of `age' (to show the age of the commit),
+  `age-abbreviated' (to abbreviate the time unit to a character),
+  or a string (suitable for `format-time-string') to show the
+  actual date.  Option `magit-log-margin-show-committer-date'
+  controls which date is being displayed.
+WIDTH controls the width of the margin.  This exists for forward
+  compatibility and currently the value should not be changed.
+AUTHOR controls whether the name of the author is also shown by
+  default.
+AUTHOR-WIDTH has to be an integer.  When the name of the author
+  is shown, then this specifies how much space is used to do so."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-log
+  :group 'magit-margin
+  :type magit-log-margin--custom-type
+  :initialize #'magit-custom-initialize-reset
+  :set-after '(magit-log-margin)
+  :set (apply-partially #'magit-margin-set-variable 'magit-cherry-mode))
+
+;;;; Log Sections
+
+(defcustom magit-log-section-commit-count 10
+  "How many recent commits to show in certain log sections.
+How many recent commits `magit-insert-recent-commits' and
+`magit-insert-unpushed-to-upstream-or-recent' (provided
+the upstream isn't ahead of the current branch) show."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-status
+  :type 'number)
+
+(defcustom magit-log-merged-commit-count 20
+  "How many surrounding commits to show for `magit-log-merged'.
+`magit-log-merged' will shows approximately half of this number
+commits before and half after."
+  :package-version '(magit . "3.3.0")
+  :group 'magit-log
+  :type 'integer)
+
+;;; Variables
+
+(defvar-local magit-buffer-log-revisions nil)
+(defvar-local magit-buffer-log-args nil)
+(defvar-local magit-buffer-log-files nil)
+
+;;; Arguments
+;;;; Prefix Classes
+
+(defclass magit-log-prefix (transient-prefix)
+  ((history-key :initform 'magit-log)
+   (major-mode  :initform 'magit-log-mode)))
+
+(defclass magit-log-refresh-prefix (magit-log-prefix)
+  ((history-key :initform 'magit-log)
+   (major-mode  :initform nil)))
+
+;;;; Prefix Methods
+
+(cl-defmethod transient-prefix-value ((obj magit-log-prefix))
+  (let ((args (cl-call-next-method obj)))
+    (list (seq-filter #'atom args)
+          (cdr (assoc "--" args)))))
+
+(cl-defmethod transient-init-value ((obj magit-log-prefix))
+  (pcase-let ((`(,args ,files)
+               (magit-log--get-value 'magit-log-mode 'prefix)))
+    (when-let ((_(not (eq transient-current-command 'magit-dispatch)))
+               (file (magit-file-relative-name)))
+      (setq files (list file)))
+    (oset obj value (if files `(("--" ,@files) ,@args) args))))
+
+(cl-defmethod transient-init-value ((obj magit-log-refresh-prefix))
+  (oset obj value (if magit-buffer-log-files
+                      `(("--" ,@magit-buffer-log-files)
+                        ,@magit-buffer-log-args)
+                    magit-buffer-log-args)))
+
+(cl-defmethod transient-set-value ((obj magit-log-prefix))
+  (magit-log--set-value obj))
+
+(cl-defmethod transient-save-value ((obj magit-log-prefix))
+  (magit-log--set-value obj 'save))
+
+;;;; Argument Access
+
+(defun magit-log-arguments (&optional mode)
+  "Return the current log arguments."
+  (if (memq transient-current-command '(magit-log magit-log-refresh))
+      (transient-args transient-current-command)
+    (magit-log--get-value (or mode 'magit-log-mode) 'direct)))
+
+(defun magit-log--get-value (mode &optional use-buffer-args)
+  (setq use-buffer-args
+        (pcase-exhaustive use-buffer-args
+          ('prefix magit-prefix-use-buffer-arguments)
+          ('status magit-status-use-buffer-arguments)
+          ('direct magit-direct-use-buffer-arguments)
+          ('nil    magit-direct-use-buffer-arguments)
+          ((or 'always 'selected 'current 'never)
+           use-buffer-args)))
+  (cond-let
+    ((and (memq use-buffer-args '(always selected current))
+          (eq major-mode mode))
+     (list magit-buffer-log-args
+           magit-buffer-log-files))
+    ([_(memq use-buffer-args '(always selected))]
+     [buffer (magit-get-mode-buffer mode nil (eq use-buffer-args 'selected))]
+     (list (buffer-local-value 'magit-buffer-log-args buffer)
+           (buffer-local-value 'magit-buffer-log-files buffer)))
+    ((plist-member (symbol-plist mode) 'magit-log-current-arguments)
+     (list (get mode 'magit-log-current-arguments) nil))
+    ([elt (assq (intern (format "magit-log:%s" mode)) transient-values)]
+     (list (cdr elt) nil))
+    ((list (get mode 'magit-log-default-arguments) nil))))
+
+(defun magit-log--set-value (obj &optional save)
+  (pcase-let* ((obj  (oref obj prototype))
+               (mode (or (oref obj major-mode) major-mode))
+               (key  (intern (format "magit-log:%s" mode)))
+               (`(,args ,files) (transient-args (oref obj command))))
+    (put mode 'magit-log-current-arguments args)
+    (when save
+      (setf (alist-get key transient-values) args)
+      (transient-save-values))
+    (transient--history-push obj)
+    (setq magit-buffer-log-args args)
+    (unless (derived-mode-p 'magit-log-select-mode)
+      (setq magit-buffer-log-files files))
+    (magit-refresh)))
+
+;;; Commands
+;;;; Prefix Commands
+
+(transient-define-group magit-log-infix-arguments
+  ;; The grouping in git-log(1) appears to be guided by implementation
+  ;; details, so our logical grouping only follows it to an extent.
+  ;; Arguments that are "misplaced" here:
+  ;;   1. From "Commit Formatting".
+  ;;   2. From "Common Diff Options". ;FIXME
+  ;;   3. From unnamed first group.
+  ;;   4. Implemented by Magit.
+  ["Commit limiting"
+   :if magit-log-infix-arguments--show-p
+   (magit-log:-n)
+   (magit:--author)
+   (7 magit-log:--since)
+   (7 magit-log:--until)
+   (magit-log:--grep)
+   (7 "-i" "Search case-insensitive" ("-i" "--regexp-ignore-case"))
+   (7 "-I" "Invert search pattern"   "--invert-grep")
+   (magit-log:-G)     ;2
+   (magit-log:-S)     ;2
+   (magit-log:-L)     ;2
+   (7 "=M" "Only merges"            "--merges")
+   (7 "=m" "Omit merges"            "--no-merges")
+   (7 "=p" "First parent"           "--first-parent")]
+  ["History simplification"
+   :if magit-log-infix-arguments--show-p
+   (  "-D" "Simplify by decoration"                  "--simplify-by-decoration")
+   (magit:--)
+   (  "-f" "Follow renames when showing single-file log"     "--follow") ;3
+   (6 "/s" "Only commits changing given paths"               "--sparse")
+   (7 "/d" "Only selected commits plus meaningful history"   "--dense")
+   (7 "/a" "Only commits existing directly on ancestry path" "--ancestry-path")
+   (6 "/f" "Do not prune history"                            "--full-history")
+   (7 "/m" "Prune some history"                              "--simplify-merges")]
+  ["Commit ordering"
+   :if magit-log-infix-arguments--show-p
+   (magit-log:--*-order)
+   ("-r" "Reverse order" "--reverse")]
+  ["Formatting"
+   :if magit-log-infix-arguments--show-p
+   ("-g" "Show graph"          "--graph")          ;1
+   ("-c" "Show graph in color" "--color")          ;2
+   (magit-log:--graph-lane-limit :level 5)         ;TODO
+   ("-d" "Show refnames"       "--decorate")       ;3
+   ("=S" "Show signatures"     "--show-signature") ;1
+   ("-h" "Show header"         "++header")         ;4
+   ("-p" "Show diffs"          ("-p" "--patch"))   ;2
+   ("-s" "Show diffstats"      "--stat")])         ;2
+
+(defun magit-log-infix-arguments--show-p ()
+  (if (eq (oref (transient-prefix-object) command) 'magit-log-refresh)
+      (eq major-mode 'magit-log-mode)
+    t))
+
+;;;###autoload(autoload 'magit-log "magit-log" nil t)
+(transient-define-prefix magit-log ()
+  "Show a commit or reference log."
+  :man-page "git-log"
+  :class 'magit-log-prefix
+  :incompatible '(("--merges" "--no-merges"))
+  'magit-log-infix-arguments
+  [["Log"
+    ("l"                     magit-log-current)
+    ("o" "other"             magit-log-other)
+    ("h" "HEAD"              magit-log-head :level 0)
+    ("u" "related"           magit-log-related)]
+   [""
+    ("L" "local branches"    magit-log-branches)
+    ("b" "all branches"      magit-log-all-branches)
+    ("a" "all references"    magit-log-all)
+    ("R" "reflog objects"    magit-log-reflog            :level 0)
+    ("B" "matching branches" magit-log-matching-branches :level 7)
+    ("T" "matching tags"     magit-log-matching-tags     :level 7)
+    ("m" "merged"            magit-log-merged            :level 7)]
+   ["Reflog"
+    ("r" "current"           magit-reflog-current)
+    ("O" "other"             magit-reflog-other)
+    ("H" "HEAD"              magit-reflog-head)]
+   [:if-non-nil magit-wip-mode
+    :description "Wiplog"
+    ("i" "index"             magit-wip-log-index)
+    ("w" "worktree"          magit-wip-log-worktree)]
+   ["Other"
+    ("s" "shortlog"          magit-shortlog)]])
+
+;;;###autoload(autoload 'magit-log-refresh "magit-log" nil t)
+(transient-define-prefix magit-log-refresh ()
+  "Change the arguments used for the log(s) in the current buffer."
+  :man-page "git-log"
+  :class 'magit-log-refresh-prefix
+  :incompatible '(("--merges" "--no-merges"))
+  'magit-log-infix-arguments
+  [:if-not-mode magit-log-mode
+   :description "Arguments"
+   (magit-log:-n)
+   (magit-log:--*-order)
+   ("-g" "Show graph"               "--graph")
+   ("-c" "Show graph in color"      "--color")
+   ("-d" "Show refnames"            "--decorate")]
+  [["Refresh"
+    ("g" "buffer"                   magit-log-refresh)
+    ("s" "buffer and set defaults"  transient-set-and-exit)
+    ("w" "buffer and save defaults" transient-save-and-exit)]
+   ["Margin"
+    (magit-toggle-margin)
+    (magit-cycle-margin-style)
+    (magit-toggle-margin-details)
+    (magit-toggle-log-margin-style)]
+   [:if-mode magit-log-mode
+    :description "Toggle"
+    ("b" "buffer lock"              magit-toggle-buffer-lock)]]
+  (interactive)
+  (cond
+    ((not (eq transient-current-command 'magit-log-refresh))
+     (pcase major-mode
+       ('magit-reflog-mode
+        (user-error "Cannot change log arguments in reflog buffers"))
+       ('magit-cherry-mode
+        (user-error "Cannot change log arguments in cherry buffers")))
+     (transient-setup 'magit-log-refresh))
+    (t
+     (pcase-let ((`(,args ,files) (magit-log-arguments)))
+       (setq magit-buffer-log-args args)
+       (unless (derived-mode-p 'magit-log-select-mode)
+         (setq magit-buffer-log-files files)))
+     (magit-refresh))))
+
+;;;; Infix Commands
+
+(transient-define-argument magit-log:-n ()
+  :description "Limit number of commits"
+  :class 'transient-option
+  ;; For historic reasons (and because it easy to guess what "-n"
+  ;; stands for) this is the only argument where we do not use the
+  ;; long argument ("--max-count").
+  :shortarg "-n"
+  :argument "-n"
+  :reader #'transient-read-number-N+)
+
+(transient-define-argument magit-log:--graph-lane-limit ()
+  :description "Show graph lanes"
+  :class 'transient-option
+  :key "=g"
+  :argument "--graph-lane-limit="
+  :reader #'transient-read-number-N+
+  :if (##magit-git-version>= "2.55"))
+
+(transient-define-argument magit:--author ()
+  :description "Limit to author"
+  :class 'transient-option
+  :key "-A"
+  :argument "--author="
+  :reader #'magit-transient-read-person)
+
+(transient-define-argument magit-log:--since ()
+  :description "Limit to commits since"
+  :class 'transient-option
+  :key "=s"
+  :argument "--since="
+  :reader #'transient-read-date)
+
+(transient-define-argument magit-log:--until ()
+  :description "Limit to commits until"
+  :class 'transient-option
+  :key "=u"
+  :argument "--until="
+  :reader #'transient-read-date)
+
+(transient-define-argument magit-log:--*-order ()
+  :description "Order commits by"
+  :class 'transient-switches
+  :key "-o"
+  :argument-format "--%s-order"
+  :argument-regexp "\\(--\\(topo\\|author-date\\|date\\)-order\\)"
+  :choices '("topo" "author-date" "date"))
+
+(transient-define-argument magit-log:--grep ()
+  :description "Search messages"
+  :class 'transient-option
+  :key "-F"
+  :argument "--grep=")
+
+(transient-define-argument magit-log:-G ()
+  :description "Search changes"
+  :class 'transient-option
+  :argument "-G")
+
+(transient-define-argument magit-log:-S ()
+  :description "Search occurrences"
+  :class 'transient-option
+  :argument "-S")
+
+(transient-define-argument magit-log:-L ()
+  :description "Trace line evolution"
+  :class 'transient-option
+  :argument "-L"
+  :reader #'magit-read-file-trace)
+
+(defun magit-read-file-trace (&rest _ignored)
+  (let ((file  (magit-read-file-from-rev "HEAD" "File"))
+        (trace (magit-read-string "Trace")))
+    (concat trace ":" file)))
+
+;;;; Setup Commands
+
+(defvar-keymap magit-log-read-revs-map
+  :parent crm-local-completion-map
+  "SPC" #'self-insert-command)
+
+(defun magit-log-read-revs (&optional use-current)
+  (or (and use-current (and$ (magit-get-current-branch) (list $)))
+      (let ((crm-separator "\\(\\.\\.\\.?\\|[, ]\\)")
+            (crm-local-completion-map magit-log-read-revs-map))
+        (split-string (magit-completing-read-multiple
+                       "Log rev,s: "
+                       (magit-list-refnames nil t)
+                       nil 'any nil 'magit-revision-history
+                       (or (magit-branch-or-commit-at-point)
+                           (and (not use-current)
+                                (magit-get-previous-branch)))
+                       nil t)
+                      "[, ]" t))))
+
+(defun magit-log-read-pattern (option)
+  "Read a string from the user to pass as parameter to OPTION."
+  (magit-read-string (format "Type a pattern to pass to %s" option)))
+
+;;;###autoload(autoload 'magit-log-current "magit-log" nil t)
+(transient-define-suffix magit-log-current (&optional args files)
+  "Show log for the current branch, or `HEAD' if no branch is checked out."
+  :description (##if (magit-get-current-branch) "current" "HEAD")
+  (interactive (magit-log-arguments))
+  (magit-log-setup-buffer (list (or (magit-get-current-branch) "HEAD"))
+                          args files))
+
+;;;###autoload
+(defun magit-log-head (&optional args files)
+  "Show log for `HEAD'."
+  (interactive (magit-log-arguments))
+  (magit-log-setup-buffer (list "HEAD") args files))
+
+;;;###autoload
+(defun magit-log-related (revs &optional args files)
+  "Show log for the current branch, its upstream and its push target.
+When the upstream is a local branch, then also show its own
+upstream.  When `HEAD' is detached, then show log for that, the
+previously checked out branch and its upstream and push-target."
+  (interactive
+    (cons (let ((current (magit-get-current-branch))
+                head rebase target upstream upup)
+            (unless current
+              (setq rebase (magit-rebase--get-state-lines "head-name"))
+              (cond (rebase
+                     (setq rebase (magit-ref-abbrev rebase))
+                     (setq current rebase)
+                     (setq head "HEAD"))
+                    ((setq current (magit-get-previous-branch)))))
+            (cond (current
+                   (setq current
+                         (magit--propertize-face current 'magit-branch-local))
+                   (setq target (magit-get-push-branch current t))
+                   (setq upstream (magit-get-upstream-branch current))
+                   (when upstream
+                     (setq upup (and (magit-local-branch-p upstream)
+                                     (magit-get-upstream-branch upstream)))))
+                  ((setq head "HEAD")))
+            (delq nil (list current head target upstream upup)))
+          (magit-log-arguments)))
+  (magit-log-setup-buffer revs args files))
+
+;;;###autoload
+(defun magit-log-other (revs &optional args files)
+  "Show log for one or more revs read from the minibuffer.
+The user can input any revision or revisions separated by a
+space, or even ranges, but only branches and tags, and a
+representation of the commit at point, are available as
+completion candidates."
+  (interactive (cons (magit-log-read-revs)
+                     (magit-log-arguments)))
+  (magit-log-setup-buffer revs args files))
+
+;;;###autoload
+(defun magit-log-branches (&optional args files)
+  "Show log for all local branches and `HEAD'."
+  (interactive (magit-log-arguments))
+  (magit-log-setup-buffer (if (magit-get-current-branch)
+                              (list "--branches")
+                            (list "HEAD" "--branches"))
+                          args files))
+
+;;;###autoload
+(defun magit-log-matching-branches (pattern &optional args files)
+  "Show log for all branches matching PATTERN and `HEAD'."
+  (interactive (cons (magit-log-read-pattern "--branches")
+                     (magit-log-arguments)))
+  (magit-log-setup-buffer (list "HEAD" (format "--branches=%s" pattern))
+                          args files))
+
+;;;###autoload
+(defun magit-log-matching-tags (pattern &optional args files)
+  "Show log for all tags matching PATTERN and `HEAD'."
+  (interactive (cons (magit-log-read-pattern "--tags")
+                     (magit-log-arguments)))
+  (magit-log-setup-buffer (list "HEAD" (format "--tags=%s" pattern))
+                          args files))
+
+;;;###autoload
+(defun magit-log-all-branches (&optional args files)
+  "Show log for all local and remote branches and `HEAD'."
+  (interactive (magit-log-arguments))
+  (magit-log-setup-buffer (if (magit-get-current-branch)
+                              (list "--branches" "--remotes")
+                            (list "HEAD" "--branches" "--remotes"))
+                          args files))
+
+;;;###autoload
+(defun magit-log-all (&optional args files)
+  "Show log for all references and `HEAD'."
+  (interactive (magit-log-arguments))
+  (magit-log-setup-buffer (list "--all") args files))
+
+;;;###autoload
+(defun magit-log-reflog (&optional args files)
+  "Show log for all objects mentioned in all reflogs."
+  (interactive (magit-log-arguments))
+  (magit-log-setup-buffer (list "--reflog") args files))
+
+;;;###autoload
+(defun magit-log-buffer-file (&optional follow beg end)
+  "Show log for the blob or file visited in the current buffer.
+With a prefix argument or when \"--follow\" is an active log
+argument, then follow renames.  When the region is active,
+restrict the log to the lines that the region touches."
+  (interactive (cons current-prefix-arg (magit-file-region-line-numbers)))
+  (require 'magit)
+  (if-let ((file (magit-file-relative-name)))
+      (magit-log-setup-buffer
+       (list (or magit-buffer-revision
+                 (magit-get-current-branch)
+                 "HEAD"))
+       (let ((args (car (magit-log-arguments))))
+         (when (and follow (not (member "--follow" args)))
+           (push "--follow" args))
+         (when (and beg end)
+           (setq args (cons (format "-L%s,%s:%s" beg end file)
+                            (cl-delete "-L" args :test
+                                       #'string-prefix-p)))
+           (setq file nil))
+         args)
+       (and file (list file))
+       magit-log-buffer-file-locked)
+    (user-error "Buffer isn't visiting a file")))
+
+;;;###autoload
+(defun magit-log-trace-definition (file fn commit)
+  "Show log for the definition at point."
+  (interactive (list (or (magit-file-relative-name)
+                         (user-error "Buffer isn't visiting a file"))
+                     (or (funcall magit-log-trace-definition-function)
+                         (user-error "No function at point found"))
+                     (or magit-buffer-revision
+                         (magit-get-current-branch)
+                         "HEAD")))
+  (require 'magit)
+  (magit-log-setup-buffer
+   (list commit)
+   (cons (format "-L:%s%s:%s"
+                 (string-replace ":" "\\:" (regexp-quote fn))
+                 (if (derived-mode-p 'lisp-mode 'emacs-lisp-mode)
+                     ;; Git doesn't treat "-" the same way as
+                     ;; "_", leading to false-positives such as
+                     ;; "foo-suffix" being considered a match
+                     ;; for "foo".  Wing it.
+                     "\\( \\|$\\)"
+                   ;; We could use "\\b" here, but since Git
+                   ;; already does something equivalent, that
+                   ;; isn't necessary.
+                   "")
+                 file)
+         (cl-delete "-L" (car (magit-log-arguments))
+                    :test #'string-prefix-p))
+   nil magit-log-buffer-file-locked))
+
+(defun magit-diff-trace-definition ()
+  "Show log for the definition at point in a diff."
+  (interactive)
+  (pcase-let ((`(,buf ,pos) (magit-diff-visit-file--noselect)))
+    (magit--with-temp-position buf pos
+      (call-interactively #'magit-log-trace-definition))))
+
+;;;###autoload
+(defun magit-log-merged (commit branch &optional args files)
+  "Show log for the merge of COMMIT into BRANCH.
+
+More precisely, find merge commit M that brought COMMIT into
+BRANCH, and show the log of the range \"M^1..M\". If COMMIT is
+directly on BRANCH, then show approximately
+`magit-log-merged-commit-count' surrounding commits instead.
+
+This command requires git-when-merged, which is available from
+https://github.com/mhagger/git-when-merged."
+  (interactive
+    (append (let ((commit (magit-read-branch-or-commit "Log merge of commit")))
+              (list commit
+                    (magit-read-other-branch "Merged into" commit)))
+            (magit-log-arguments)))
+  (unless (magit-git-executable-find "git-when-merged")
+    (user-error "This command requires git-when-merged (%s)"
+                "https://github.com/mhagger/git-when-merged"))
+  (let (exit m)
+    (with-temp-buffer
+      (save-excursion
+        (setq exit (magit-process-git t "when-merged" "-c"
+                                      (magit-abbrev-arg)
+                                      commit branch)))
+      (setq m (buffer-substring-no-properties (point) (line-end-position))))
+    (if (zerop exit)
+        (magit-log-setup-buffer (list (format "%s^1..%s" m m))
+                                args files nil commit)
+      ;; Output: "<ref><lots of spaces><message>".
+      ;; This is not the same as `string-trim'.
+      (setq m (string-trim-left (substring m (string-match " " m))))
+      (if (equal m "Commit is directly on this branch.")
+          (let* ((from (format "%s~%d" commit
+                               (/ magit-log-merged-commit-count 2)))
+                 (to (- (car (magit-rev-diff-count branch commit t))
+                        (/ magit-log-merged-commit-count 2)))
+                 (to (if (<= to 0)
+                         branch
+                       (format "%s~%s" branch to))))
+            (unless (magit-commit-p from)
+              (setq from (magit-git-string "rev-list" "--max-parents=0"
+                                           commit)))
+            (magit-log-setup-buffer (list (concat from ".." to))
+                                    (cons "--first-parent" args)
+                                    files nil commit))
+        (user-error "Could not find when %s was merged into %s: %s"
+                    commit branch m)))))
+
+;;;###autoload
+(defun magit-delete-shelved-branch (branch)
+  "Delete the shelved BRANCH.
+Delete a ref created by `magit-branch-shelve'."
+  (interactive (list (magit-read-shelved-branch "Delete shelved branch")))
+  (magit-run-git "update-ref" "-d" (concat "refs/shelved/" branch)))
+
+;;;; Limit Commands
+
+(defun magit-log-toggle-commit-limit ()
+  "Toggle the number of commits the current log buffer is limited to.
+If the number of commits is currently limited, then remove that
+limit.  Otherwise set it to 256."
+  (interactive)
+  (magit-log-set-commit-limit (lambda (&rest _) nil)))
+
+(defun magit-log-double-commit-limit ()
+  "Double the number of commits the current log buffer is limited to."
+  (interactive)
+  (magit-log-set-commit-limit '*))
+
+(defun magit-log-half-commit-limit ()
+  "Half the number of commits the current log buffer is limited to."
+  (interactive)
+  (magit-log-set-commit-limit '/))
+
+(defun magit-log-set-commit-limit (fn)
+  (let* ((val magit-buffer-log-args)
+         (arg (seq-find (##string-match "^-n\\([0-9]+\\)?$" %) val))
+         (num (and arg (string-to-number (match-str 1 arg))))
+         (num (if num (funcall fn num 2) 256)))
+    (setq val (remove arg val))
+    (setq magit-buffer-log-args
+          (if (and num (> num 0))
+              (cons (format "-n%d" num) val)
+            val)))
+  (magit-refresh))
+
+(defun magit-log-get-commit-limit (&optional args)
+  (and$ (seq-find (##string-match "^-n\\([0-9]+\\)?$" %)
+                  (or args magit-buffer-log-args))
+        (string-to-number (match-str 1 $))))
+
+;;;; Mode Commands
+
+(defun magit-log-bury-buffer (&optional arg)
+  "Bury the current buffer or the revision buffer in the same frame.
+Like `magit-mode-bury-buffer' (which see) but with a negative
+prefix argument instead bury the revision buffer, provided it
+is displayed in the current frame."
+  (interactive "p")
+  (cond-let*
+    ((>= arg 0)
+     (magit-mode-bury-buffer (> arg 1)))
+    ([buf (magit-get-mode-buffer 'magit-revision-mode)]
+     [win (get-buffer-window buf (selected-frame))]
+     (with-selected-window win
+       (with-current-buffer buf
+         (magit-mode-bury-buffer (> (abs arg) 1)))))
+    ((user-error "No revision buffer in this frame"))))
+
+;;;###autoload
+(defun magit-log-move-to-parent (&optional n)
+  "Move to the Nth parent of the current commit."
+  (interactive "p")
+  (when (and (derived-mode-p 'magit-log-mode)
+             (magit-section-match 'commit))
+    (let* ((section (magit-current-section))
+           (parent-rev (format "%s^%s" (oref section value) (or n 1))))
+      (if-let ((parent-hash (magit-rev-parse "--short" parent-rev)))
+          (if-let ((parent (seq-find (##equal (oref % value) parent-hash)
+                                     (magit-section-siblings section 'next))))
+              (magit-section-goto parent)
+            (user-error
+             (substitute-command-keys
+              (concat "Parent " parent-hash " not found.  Try typing "
+                      "\\[magit-log-double-commit-limit] first"))))
+        (user-error "Parent %s does not exist" parent-rev)))))
+
+(defun magit-log-move-to-revision (commit)
+  "Read a commit and move to it in current log buffer.
+
+If the chosen reference or commit isn't being displayed in
+the current log buffer, then inform the user about that and do
+nothing else.
+
+If invoked outside any log buffer, then display the log buffer
+of the current repository first; creating it if necessary."
+  (interactive
+    (list (magit-completing-read
+           "In log, jump to"
+           (magit-list-refnames nil t)
+           nil 'any nil 'magit-revision-history
+           (or (and$ (magit-commit-at-point)
+                     (magit-rev-fixup-target $))
+               (magit-get-current-branch)))))
+  (with-current-buffer
+      (cond ((derived-mode-p 'magit-log-mode)
+             (current-buffer))
+            ((and$ (magit-get-mode-buffer 'magit-log-mode)
+                   (pop-to-buffer-same-window $)))
+            ((apply #'magit-log-all-branches (magit-log-arguments))))
+    (unless (magit-log-goto-commit-section (magit-rev-abbrev commit))
+      (user-error "%s isn't visible in the current log buffer" commit))))
+
+;;;; Shortlog Commands
+
+;;;###autoload(autoload 'magit-shortlog "magit-log" nil t)
+(transient-define-prefix magit-shortlog ()
+  "Show a history summary."
+  :man-page "git-shortlog"
+  :value '("--numbered" "--summary")
+  ["Arguments"
+   ("-n" "Sort by number of commits"      ("-n" "--numbered"))
+   ("-s" "Show commit count summary only" ("-s" "--summary"))
+   ("-e" "Show email addresses"           ("-e" "--email"))
+   ("-g" "Group commits by" "--group="
+    :choices ("author" "committer" "trailer:"))
+   (7 "-f" "Format string" "--format=")
+   (7 "-w" "Linewrap" "-w" :class transient-option)]
+  ["Shortlog"
+   ("s" "since" magit-shortlog-since)
+   ("r" "range" magit-shortlog-range)])
+
+(defun magit-git-shortlog (rev args)
+  (let ((dir default-directory))
+    (with-current-buffer (get-buffer-create "*magit-shortlog*")
+      (setq default-directory dir)
+      (setq buffer-read-only t)
+      (let ((inhibit-read-only t))
+        (erase-buffer)
+        (save-excursion
+          (magit-git-insert "shortlog" args rev))
+        (switch-to-buffer-other-window (current-buffer))))))
+
+;;;###autoload
+(defun magit-shortlog-since (commit args)
+  "Show a history summary for commits since REV."
+  (interactive
+    (list (magit-read-branch-or-commit "Shortlog since" (magit-get-current-tag))
+          (transient-args 'magit-shortlog)))
+  (magit-git-shortlog (concat commit "..") args))
+
+;;;###autoload
+(defun magit-shortlog-range (rev-or-range args)
+  "Show a history summary for commit or range REV-OR-RANGE."
+  (interactive
+    (list (magit-read-range-or-commit "Shortlog for revision or range")
+          (transient-args 'magit-shortlog)))
+  (magit-git-shortlog rev-or-range args))
+
+;;;; Movement Commands
+
+(defvar magit-reference-movement-faces
+  '(magit-tag
+    magit-branch-remote
+    magit-branch-remote-head
+    magit-branch-local
+    magit-branch-current
+    magit-branch-upstream
+    magit-branch-warning
+    magit-head
+    magit-refname
+    magit-refname-stash
+    magit-refname-wip
+    magit-refname-pullreq))
+
+(defvar-keymap magit-reference-navigation-repeat-map
+  :repeat t
+  "p" #'magit-previous-reference
+  "n" #'magit-next-reference
+  "r" #'magit-next-reference)
+
+(defun magit-previous-reference ()
+  "Move to the previous Git reference appearing in the current buffer.
+
+Move to the previous location that uses a face appearing in
+`magit-reference-movement-faces'.  If `repeat-mode' is enabled,
+this command and its counterpart can be repeated using \
+\\<magit-reference-navigation-repeat-map>\
+\\[magit-previous-reference] and \\[magit-next-reference]."
+  (interactive)
+  (magit-next-reference t))
+
+(defun magit-next-reference (&optional previous)
+  "Move to the next Git reference appearing in the current buffer.
+
+Move to the next location that uses a face appearing in
+`magit-reference-movement-faces'.  If `repeat-mode' is enabled,
+this command and its counterpart can be repeated using \
+\\<magit-reference-navigation-repeat-map>\
+\\[magit-previous-reference] and \\[magit-next-reference]."
+  (interactive)
+  (catch 'found
+    (let ((pos (point)))
+      (while (and (not (eobp))
+                  (setq pos (if previous
+                                (previous-single-property-change pos 'face)
+                              (next-single-property-change pos 'face))))
+        (when (cl-intersection (ensure-list (get-text-property pos 'face))
+                               magit-reference-movement-faces)
+          (throw 'found (goto-char pos))))
+      (message "No more references"))))
+
+;;; Log Mode
+
+(defvar magit-log-disable-graph-hack-args
+  '("-G" "--grep" "--author")
+  "Arguments which disable the graph speedup hack.")
+
+(defvar-keymap magit-log-mode-map
+  :doc "Keymap for `magit-log-mode'."
+  :parent magit-mode-map
+  "C-c C-b" #'magit-go-backward
+  "C-c C-f" #'magit-go-forward
+  "C-c C-n" #'magit-log-move-to-parent
+  "j" #'magit-log-move-to-revision
+  "=" #'magit-log-toggle-commit-limit
+  "+" #'magit-log-double-commit-limit
+  "-" #'magit-log-half-commit-limit
+  "q" #'magit-log-bury-buffer)
+
+(define-derived-mode magit-log-mode magit-mode "Magit Log"
+  "Mode for looking at Git log.
+
+This mode is documented in info node `(magit)Log Buffer'.
+
+\\<magit-mode-map>\
+Type \\[magit-refresh] to refresh the current buffer.
+Type \\[magit-visit-thing] or \\[magit-diff-show-or-scroll-up] \
+to visit the commit at point.
+
+Type \\[magit-branch] to see available branch commands.
+Type \\[magit-merge] to merge the branch or commit at point.
+Type \\[magit-cherry-pick] to apply the commit at point.
+Type \\[magit-reset] to reset `HEAD' to the commit at point.
+
+\\{magit-log-mode-map}"
+  :interactive nil
+  :group 'magit-log
+  (magit-hack-dir-local-variables)
+  (setq magit--imenu-item-types 'commit))
+
+(put 'magit-log-mode 'magit-log-default-arguments
+     '("--graph" "-n256" "--decorate"))
+
+(defun magit-log-setup-buffer (revs args files &optional locked focus)
+  (require 'magit)
+  (with-current-buffer
+      (magit-setup-buffer #'magit-log-mode locked
+        (magit-buffer-log-revisions revs)
+        (magit-buffer-log-args args)
+        (magit-buffer-log-files files))
+    (when (if focus
+              (magit-log-goto-commit-section focus)
+            (magit-log-goto-same-commit))
+      (magit-section-update-highlight))
+    (current-buffer)))
+
+(defun magit-log-refresh-buffer ()
+  (let ((revs  magit-buffer-log-revisions)
+        (args  magit-buffer-log-args)
+        (files magit-buffer-log-files)
+        (limit (magit-log-get-commit-limit)))
+    (magit-set-header-line-format
+     (funcall magit-log-header-line-function revs args files))
+    (unless (length= files 1)
+      (setq args (remove "--follow" args)))
+    (when (and (car magit-log-remove-graph-args)
+               (let ((re (concat "^" (regexp-opt magit-log-remove-graph-args))))
+                 (seq-some (##string-match-p re %) args)))
+      (setq args (remove "--graph" args)))
+    (setq args (magit-log--maybe-drop-color-graph args limit))
+    (when-let* ((limit limit)
+                (limit (* 2 limit)) ; increase odds for complete graph
+                (count (and (length= revs 1)
+                            (> limit 1024) ; otherwise it's fast enough
+                            (setq revs (car revs))
+                            (not (string-search ".." revs))
+                            (not (member revs '("--all" "--branches")))
+                            (not (seq-some
+                                  (lambda (arg)
+                                    (seq-some (##string-prefix-p % arg)
+                                              magit-log-disable-graph-hack-args))
+                                  args))
+                            (magit-git-string "rev-list" "--count"
+                                              "--first-parent" args revs))))
+      (setq revs (if (< (string-to-number count) limit)
+                     revs
+                   (format "%s~%s..%s" revs limit revs))))
+    (let ((delay (cl-find-if (##member % '("++header" "--patch" "--stat"))
+                             args)))
+      (setq magit-section-inhibit-markers (if delay 'delay t))
+      (setq magit-section-insert-in-reverse (not delay)))
+    (magit-insert-section (logbuf)
+      (magit--insert-log t revs args files))))
+
+(defvar-local magit-log--color-graph nil)
+
+(defun magit-log--maybe-drop-color-graph (args limit)
+  (cond ((not (member "--color" args))
+         (setq magit-log--color-graph nil))
+        ((cond ((not (member "--graph" args)) t)
+               ((not magit-log-color-graph-limit) nil)
+               ((not limit)
+                (message "Dropping --color because -n isn't set (see %s)"
+                         'magit-log-color-graph-limit))
+               ((> limit magit-log-color-graph-limit)
+                (message "Dropping --color because -n is larger than %s"
+                         'magit-log-color-graph-limit)))
+         (setq args (remove "--color" args))
+         (setq magit-log--color-graph nil))
+        ((setq magit-log--color-graph t)))
+  args)
+
+(cl-defmethod magit-buffer-value (&context (major-mode magit-log-mode))
+  (append magit-buffer-log-revisions
+          (if (and magit-buffer-log-revisions magit-buffer-log-files)
+              (cons "--" magit-buffer-log-files)
+            magit-buffer-log-files)))
+
+(defun magit-log-header-line-arguments (revs args files)
+  "Return string describing some of the used arguments."
+  (mapconcat (##if (string-search " " %) (prin1 %) %)
+             `("git" "log" ,@args ,@revs "--" ,@files)
+             " "))
+
+(defun magit-log-header-line-sentence (revs args files)
+  "Return string containing all arguments."
+  (concat "Commits in "
+          (string-join revs " ")
+          (and (member "--reverse" args)
+               " in reverse")
+          (and files (concat " touching "
+                             (string-join files " ")))
+          (seq-some (##and (string-prefix-p "-L" %)
+                           (concat " " %))
+                    args)))
+
+(defun magit-insert-log (revs &optional args files)
+  (declare (obsolete magit--insert-log "Magit 4.0.0"))
+  (magit--insert-log nil revs args files))
+
+(defconst magit-log-heading-format
+  ;; See `magit-log-heading-re'.
+  (concat "--format="
+          "%s"         ;  4     graph    --graph
+          "%%h%%x0c"   ;  1 %h  hash
+          "%s%%x0c"    ;  3 %D  refs     --decorate
+          "%s%%x0c"    ;  7 %G? gpg      --show-signature
+          "%%aN%%x0c"  ;  5 %aN author
+          "%s%%x0c"    ;  6 %at date     magit-log-margin-show-committer-date
+          "%s%%x0c"    ; 12 %() trailers magit-log-trailer-labels
+          "%%s"        ;  2 %s  msg
+          "%s"))       ; \n ..  headers  magit-log-revision-headers-format
+
+(defun magit--insert-log (keep-error revs &optional args files)
+  "Insert a log section.
+Do not add this to a hook variable."
+  (declare (indent defun))
+  (setq magit-section-preserve-visibility t) ; TODO do it here?
+  (let ((magit-git-global-arguments
+         (remove "--literal-pathspecs" magit-git-global-arguments)))
+    (magit--git-wash (apply-partially #'magit-log-wash-log 'log) keep-error
+      "log"
+      (format magit-log-heading-format
+              (if (and (member "--left-right" args)
+                       (not (member "--graph" args)))
+                  "%m "
+                "")
+              (if (member "--decorate" args) "%D" "")
+              (if (not (member "--show-signature" args))
+                  ""
+                (setq args (remove "--show-signature" args))
+                (let ((limit (magit-log-get-commit-limit args)))
+                  (cond
+                    ((not limit)
+                     (message
+                      "Dropping --show-signature because -n isn't set (see %s)"
+                      'magit-log-show-signatures-limit)
+                     "")
+                    ((> limit magit-log-show-signatures-limit)
+                     (message
+                      "Dropping --show-signature because -n is larger than %s"
+                      'magit-log-show-signatures-limit)
+                     "")
+                    ("%G?"))))
+              (if magit-log-margin-show-committer-date "%ct" "%at")
+              (if magit-log-trailer-labels
+                  (format "%%(trailers:%s%s)"
+                          (if (not (equal (cdr magit-log-trailer-labels) ""))
+                              (concat (cdr magit-log-trailer-labels) ",")
+                            "")
+                          "unfold=true,separator=,key_value_separator=")
+                "")
+              (if (member "++header" args)
+                  (if (member "--graph" (setq args (remove "++header" args)))
+                      (concat "\n" magit-log-revision-headers-format "\n")
+                    (concat "\n" magit-log-revision-headers-format "\n"))
+                ""))
+      (progn
+        (when-let ((order (seq-find (##string-match "^\\+\\+order=\\(.+\\)$" %)
+                                    args)))
+          (setq args (cons (format "--%s-order" (match-str 1 order))
+                           (remove order args))))
+        (when (member "--decorate" args)
+          (setq args (cons "--decorate=full" (remove "--decorate" args))))
+        (when (member "--reverse" args)
+          (setq args (remove "--graph" args)))
+        (setq args (magit-diff--maybe-add-stat-arguments args))
+        args)
+      "--use-mailmap" "--no-prefix" revs "--" files)))
+
+(cl-defmethod magit-menu-common-value ((_section magit-commit-section))
+  (or (magit-diff--region-range)
+      (oref (magit-current-section) value)))
+
+(defvar-keymap magit-commit-section-map
+  :doc "Keymap for `commit' sections."
+  "<remap> <magit-visit-thing>" #'magit-show-commit
+  "<3>" (magit-menu-item "Apply %x" #'magit-cherry-apply)
+  "<2>" (magit-menu-item "Show commit %x" #'magit-show-commit
+                         '(:visible (not (region-active-p))))
+  "<1>" (magit-menu-item "Diff %x" #'magit-diff-range
+                         '(:visible (region-active-p))))
+
+(defvar-keymap magit-module-commit-section-map
+  :doc "Keymap for `module-commit' sections."
+  :parent magit-commit-section-map)
+
+(defconst magit-log-heading-re
+  ;; Use a form feed instead of a null byte as the delimiter because using
+  ;; the latter interferes with the graph prefix when ++header is used.
+  (concat "^"
+          "\\(?4:[-_/|\\*o<>. ]*\\)"               ; graph
+          "\\(?1:[0-9a-fA-F]+\\)?"               ; hash
+          "\\(?3:[^\n]+\\)?"                   ; refs
+          "\\(?7:[BGUXYREN]\\)?"                 ; gpg
+          "\\(?5:[^\n]*\\)"                    ; author
+          ;; Prior to Git v2.19.0, "git rebase -i --root" corrupted the
+          ;; root's author date.  Keep date optional because even though
+          ;; we no longer support such old releases, the roots they create
+          ;; may live on.
+          "\\(?6:[^\n]*\\)"                    ; date
+          "\\(?12:[^\n]+\\)?"                  ; trailers
+          "\\(?2:.*\\)$"))                         ; msg
+
+(defconst magit-log-cherry-re
+  (concat "^"
+          "\\(?8:[-+]\\) "                         ; cherry
+          "\\(?1:[0-9a-fA-F]+\\) "                 ; hash
+          "\\(?2:.*\\)$"))                         ; msg
+
+(defconst magit-log-module-re
+  (concat "^"
+          "\\(?:\\(?11:[<>]\\) \\)?"               ; side
+          "\\(?1:[0-9a-fA-F]+\\) "                 ; hash
+          "\\(?2:.*\\)$"))                         ; msg
+
+(defconst magit-log-bisect-vis-re
+  (concat "^"
+          "\\(?4:[-_/|\\*o<>. ]*\\)"               ; graph
+          "\\(?1:[0-9a-fA-F]+\\)?\0"               ; hash
+          "\\(?3:[^\0\n]+\\)?\0"                   ; refs
+          "\\(?2:.*\\)$"))                         ; msg
+
+(defconst magit-log-bisect-log-re
+  (concat "^# "
+          "\\(?3:[^: \n]+:\\) "                    ; "refs"
+          "\\[\\(?1:[^]\n]+\\)\\] "                ; hash
+          "\\(?2:.*\\)$"))                         ; msg
+
+(defconst magit-log-reflog-re
+  (concat "^"
+          "\\(?1:[^\0\n]+\\)\0"                    ; hash
+          "\\(?5:[^\0\n]*\\)\0"                    ; author
+          "\\(?:\\(?:[^@\n]+@{\\(?6:[^}\n]+\\)}\0" ; date
+                                                 ;;; refsub
+          "\\(?10:merge \\|autosave \\|restart \\|rewritten \\|[^:\n]+: \\)?"
+          "\\(?2:.*\\)\\)\\|\0\\)$"))              ; msg
+
+(defconst magit-reflog-subject-re
+  (concat "\\(?1:[^ ]+\\) ?"                       ; command
+          "\\(?2:\\(?: ?-[^ ]+\\)+\\)?"            ; option
+          "\\(?: ?(\\(?3:[^)]+\\))\\)?"))          ; type
+
+(defconst magit-log-stash-re
+  (concat "^"
+          "\\(?1:[^\0\n]+\\)\0"                    ; "hash"
+          "\\(?5:[^\0\n]*\\)\0"                    ; author
+          "\\(?6:[^\0\n]+\\)\0"                    ; date
+          "\\(?2:.*\\)$"))                         ; msg
+
+(defvar magit-log-count nil)
+
+(defun magit-log-wash-log (style args)
+  (setq args (flatten-tree args))
+  (when (if (derived-mode-p 'magit-log-mode)
+            magit-log--color-graph
+          (and (member "--graph" args)
+               (member "--color" args)))
+    (let ((ansi-color-apply-face-function
+           (lambda (beg end face)
+             (put-text-property beg end 'font-lock-face
+                                (or face 'magit-log-graph)))))
+      (ansi-color-apply-on-region (point-min) (point-max))))
+  (when (eq style 'cherry)
+    (reverse-region (point-min) (point-max)))
+  (let ((magit-log-count 0))
+    (when (looking-at "^\\.\\.\\.")
+      (magit-delete-line))
+    (magit-wash-sequence (apply-partially #'magit-log-wash-rev style
+                                          (magit-abbrev-length)))
+    (if (derived-mode-p 'magit-log-mode 'magit-reflog-mode)
+        (when (eq magit-log-count (magit-log-get-commit-limit))
+          (magit-insert-section (longer)
+            (insert-text-button
+             (substitute-command-keys
+              (format "Type \\<%s>\\[%s] to show more history"
+                      'magit-log-mode-map
+                      'magit-log-double-commit-limit))
+             'action (lambda (_button)
+                       (magit-log-double-commit-limit))
+             'follow-link t
+             'mouse-face 'magit-section-highlight)))
+      (insert ?\n))))
+
+(cl-defun magit-log-wash-rev (style abbrev)
+  (when (derived-mode-p 'magit-log-mode 'magit-reflog-mode)
+    (incf magit-log-count))
+  (looking-at (pcase style
+                ('log        magit-log-heading-re)
+                ('cherry     magit-log-cherry-re)
+                ('module     magit-log-module-re)
+                ('reflog     magit-log-reflog-re)
+                ('stash      magit-log-stash-re)
+                ('bisect-vis magit-log-bisect-vis-re)
+                ('bisect-log magit-log-bisect-log-re)))
+  (let* ((hash     (match-str 1))
+         (msg      (match-str 2))
+         (refs     (match-str 3))
+         (refs     (and refs (magit-format-ref-labels refs)))
+         (graph    (match-string 4))
+         (author   (match-str 5))
+         (date     (match-str 6))
+         (gpg      (match-str 7))
+         (cherry   (match-str 8))
+         (refsub   (match-str 10))
+         (side     (match-str 11))
+         (trailers (match-str 12))
+         (trailers (and trailers
+                        (funcall (car magit-log-trailer-labels)
+                                 (mapcar (##split-string % "")
+                                         (split-string trailers "")))))
+         (align    (or (eq style 'cherry)
+                       (not (member "--stat" magit-buffer-log-args))))
+         (non-graph-re (if (eq style 'bisect-vis)
+                           magit-log-bisect-vis-re
+                         magit-log-heading-re)))
+    (magit-delete-line)
+    ;; If the reflog entries have been pruned, the output of `git
+    ;; reflog show' includes a partial line that refers to the hash
+    ;; of the youngest expired reflog entry.
+    (when (and (eq style 'reflog) (not date))
+      (cl-return-from magit-log-wash-rev t))
+    (magit-insert-section
+        ((eval (pcase style
+                 ('stash  'stash)
+                 ('module 'module-commit)
+                 (_       'commit)))
+         hash)
+      (setq hash (propertize (if (eq style 'bisect-log)
+                                 (magit-rev-parse "--short" hash)
+                               hash)
+                             'font-lock-face
+                             (pcase (and gpg (aref gpg 0))
+                               (?G 'magit-signature-good)
+                               (?B 'magit-signature-bad)
+                               (?U 'magit-signature-untrusted)
+                               (?X 'magit-signature-expired)
+                               (?Y 'magit-signature-expired-key)
+                               (?R 'magit-signature-revoked)
+                               (?E 'magit-signature-error)
+                               (?N 'magit-hash)
+                               (_  'magit-hash))))
+      (when cherry
+        (when (and (derived-mode-p 'magit-refs-mode)
+                   magit-refs-show-commit-count)
+          (insert (make-string (1- magit-refs-focus-column-width) ?\s)))
+        (insert (propertize cherry 'font-lock-face
+                            (if (string= cherry "-")
+                                'magit-cherry-equivalent
+                              'magit-cherry-unmatched)))
+        (insert ?\s))
+      (when side
+        (insert (propertize side 'font-lock-face
+                            (if (string= side "<")
+                                'magit-cherry-equivalent
+                              'magit-cherry-unmatched)))
+        (insert ?\s))
+      (when align
+        (insert hash ?\s))
+      (when graph
+        (insert graph))
+      (unless align
+        (insert hash ?\s))
+      (unless magit-log-show-refname-after-summary
+        (when refs
+          (insert refs ?\s))
+        (when trailers
+          (insert trailers ?\s)))
+      (when (eq style 'reflog)
+        (insert (format "%-2s " (1- magit-log-count)))
+        (when refsub
+          (insert (magit-reflog-format-subject
+                   (substring refsub 0
+                              (if (string-search ":" refsub) -2 -1))))))
+      (insert (magit-log--wash-summary msg))
+      (when magit-log-show-refname-after-summary
+        (when refs
+          (insert ?\s refs))
+        (when trailers
+          (insert ?\s trailers)))
+      (insert ?\n)
+      (when (memq style '(log reflog stash))
+        (goto-char (line-beginning-position))
+        (when (and refsub
+                   (string-match "\\`\\([^ ]\\) \\+\\(..\\)\\(..\\)" date))
+          (setq date (+ (string-to-number (match-str 1 date))
+                        (* (string-to-number (match-str 2 date)) 60 60)
+                        (* (string-to-number (match-str 3 date)) 60))))
+        (magit-log-format-margin hash author date))
+      (when (and (eq style 'cherry)
+                 (magit--right-margin-active))
+        (apply #'magit-log-format-margin hash
+               (split-string (magit-rev-format "%aN%x00%ct" hash) "\0")))
+      (when (and graph
+                 (not (eobp))
+                 (not (looking-at non-graph-re)))
+        (when (looking-at "")
+          (magit-insert-heading)
+          (delete-char 1)
+          (magit-insert-section (commit-header)
+            (forward-line)
+            (magit-insert-heading)
+            (re-search-forward "")
+            (delete-char -1)
+            (forward-char)
+            (insert ?\n))
+          (delete-char 1))
+        (if (looking-at "^\\(---\\|\n\s\\|\ndiff\\)")
+            (let ((limit (save-excursion
+                           (and (re-search-forward non-graph-re nil t)
+                                (match-beginning 0)))))
+              (unless (oref magit-insert-section--current content)
+                (magit-insert-heading))
+              (delete-char (if (looking-at "\n") 1 4))
+              (magit-diff-wash-diffs (list "--stat") limit))
+          (when align
+            (setq align (make-string (1+ abbrev) ?\s)))
+          (when (and (not (eobp)) (not (looking-at non-graph-re)))
+            (when align
+              (setq align (make-string (1+ abbrev) ?\s)))
+            (while (and (not (eobp)) (not (looking-at non-graph-re)))
+              (when align
+                (save-excursion (insert align)))
+              (forward-line)
+              (magit-make-margin-overlay))
+            ;; When "--format" is used and its value isn't one of the
+            ;; predefined formats, then "git log" does not insert a
+            ;; separator line.
+            (save-excursion
+              (forward-line -1)
+              (looking-at "[-_/|\\*o<>. ]*"))
+            (setq graph (match-string 0))
+            (unless (string-match-p "[/\\.]" graph)
+              (insert graph ?\n)))))))
+  t)
+
+(defun magit-log--wash-summary (summary)
+  (with-temp-buffer
+    (save-excursion (insert summary))
+    (run-hook-wrapped 'magit-log-wash-summary-hook
+                      (lambda (fn) (prog1 nil (save-excursion (funcall fn)))))
+    (buffer-string)))
+
+(defun magit-log-maybe-show-more-commits (section)
+  "When point is at the end of a log buffer, insert more commits.
+
+Log buffers end with a button \"Type + to show more history\".
+When the use of a section movement command puts point on that
+button, then automatically show more commits, without the user
+having to press \"+\".
+
+This function is called by `magit-section-movement-hook' and
+exists mostly for backward compatibility reasons."
+  (when (and (eq (oref section type) 'longer)
+             magit-log-auto-more)
+    (magit-log-double-commit-limit)
+    (forward-line -1)
+    (magit-section-forward)))
+
+(add-hook 'magit-section-movement-hook #'magit-log-maybe-show-more-commits)
+(add-hook 'magit-mouse-set-point-hook  #'magit-log-maybe-show-more-commits)
+
+(defvar magit--update-revision-buffer nil)
+
+(defun magit-log-maybe-update-revision-buffer (&optional _)
+  "When moving in a log or cherry buffer, update the revision buffer.
+If there is no revision buffer in the same frame, then do nothing.
+See also info node `(magit)Section Movement'."
+  (when (derived-mode-p 'magit-log-mode 'magit-cherry-mode 'magit-reflog-mode)
+    (magit--maybe-update-revision-buffer)))
+
+(add-hook 'magit-section-movement-hook #'magit-log-maybe-update-revision-buffer)
+(add-hook 'magit-mouse-set-point-hook  #'magit-log-maybe-update-revision-buffer)
+
+(defun magit--maybe-update-revision-buffer ()
+  (when-let* ((commit (magit-section-value-if 'commit))
+              (buffer (magit-get-mode-buffer 'magit-revision-mode nil t)))
+    (if magit--update-revision-buffer
+        (setq magit--update-revision-buffer (list commit buffer))
+      (setq magit--update-revision-buffer (list commit buffer))
+      (run-with-idle-timer
+       magit-update-other-window-delay nil
+       (let ((args (let ((magit-direct-use-buffer-arguments 'selected))
+                     (magit-show-commit--arguments))))
+         (lambda ()
+           (pcase-let ((`(,rev ,buf) magit--update-revision-buffer))
+             (setq magit--update-revision-buffer nil)
+             (when (buffer-live-p buf)
+               (let ((magit-display-buffer-noselect t))
+                 (apply #'magit-show-commit rev args))))
+           (setq magit--update-revision-buffer nil)))))))
+
+(defvar magit--update-blob-buffer nil)
+
+(defun magit-log-maybe-update-blob-buffer (&optional _)
+  "When moving in a log or cherry buffer, update the blob buffer.
+If there is no blob buffer in the same frame, then do nothing.
+See also info node `(magit)Section Movement'."
+  (when (derived-mode-p 'magit-log-mode 'magit-cherry-mode 'magit-reflog-mode)
+    (magit--maybe-update-blob-buffer)))
+
+(defun magit--maybe-update-blob-buffer ()
+  (when-let* ((commit (magit-section-value-if 'commit))
+              (buffer (seq-find (##with-current-buffer %
+                                  (eq revert-buffer-function
+                                      'magit-revert-rev-file-buffer))
+                                (mapcar #'window-buffer (window-list)))))
+    (if magit--update-blob-buffer
+        (setq magit--update-blob-buffer (list commit buffer))
+      (setq magit--update-blob-buffer (list commit buffer))
+      (run-with-idle-timer
+       magit-update-other-window-delay nil
+       (lambda ()
+         (pcase-let ((`(,rev ,buf) magit--update-blob-buffer))
+           (setq magit--update-blob-buffer nil)
+           (when (buffer-live-p buf)
+             (with-selected-window (get-buffer-window buf)
+               (with-current-buffer buf
+                 (save-excursion
+                   (magit-blob-visit (magit-rev-parse rev)
+                                     (magit-file-relative-name
+                                      magit-buffer-file-name))))))))))))
+
+(defun magit-log-goto-commit-section (rev)
+  (let ((abbrev (magit-rev-format "%h" rev)))
+    (when-let ((section (seq-find (##equal (oref % value) abbrev)
+                                  (oref magit-root-section children))))
+      (goto-char (oref section start)))))
+
+(defun magit-log-goto-same-commit ()
+  (when (and magit-previous-section
+             (magit-section-match '(commit branch)
+                                  magit-previous-section))
+    (magit-log-goto-commit-section (oref magit-previous-section value))))
+
+;;; Log Margin
+
+(defvar-local magit-log-margin-show-shortstat nil)
+
+(transient-define-suffix magit-toggle-log-margin-style ()
+  "Toggle between the regular and the shortstat margin style.
+The shortstat style is experimental and rather slow."
+  :description "Toggle shortstat"
+  :key "x"
+  :transient t
+  (interactive)
+  (setq magit-log-margin-show-shortstat
+        (not magit-log-margin-show-shortstat))
+  (magit-set-buffer-margins nil t))
+
+(defun magit-log-format-margin (rev author date)
+  (when (magit--right-margin-option)
+    (if magit-log-margin-show-shortstat
+        (magit-log-format-shortstat-margin rev)
+      (magit-log-format-author-margin author date))))
+
+(defun magit-log-format-author-margin (author date)
+  (pcase-let ((`(,_ ,style ,width ,details ,details-width)
+               (or magit--right-margin-config
+                   (symbol-value (magit--right-margin-option))
+                   (error "No margin format specified for %s" major-mode))))
+    (magit-make-margin-overlay
+     (concat (and details
+                  (concat (magit--propertize-face
+                           (truncate-string-to-width
+                            (or author "")
+                            details-width
+                            nil ?\s
+                            (magit--ellipsis 'margin))
+                           'magit-log-author)
+                          " "))
+             (magit--propertize-face
+              (if (stringp style)
+                  (format-time-string
+                   style
+                   (seconds-to-time (string-to-number date)))
+                (pcase-let* ((abbr (eq style 'age-abbreviated))
+                             (`(,cnt ,unit) (magit--age date abbr)))
+                  (format (format (if abbr "%%2d%%-%dc" "%%2d %%-%ds")
+                                  (- width (if details (1+ details-width) 0)))
+                          cnt unit)))
+              'magit-log-date)))))
+
+(defun magit-log-format-shortstat-margin (rev)
+  (magit-make-margin-overlay
+   (if-let ((line (and rev (magit-git-string
+                            "show" "--format=" "--shortstat" rev))))
+       (if (string-match "\
+\\([0-9]+\\) files? changed, \
+\\(?:\\([0-9]+\\) insertions?(\\+)\\)?\
+\\(?:\\(?:, \\)?\\([0-9]+\\) deletions?(-)\\)?\\'" line)
+           (magit-bind-match-strings (files add del) line
+             (format
+              "%5s %5s%4s"
+              (if add
+                  (magit--propertize-face (format "%s+" add)
+                                          'magit-diffstat-added)
+                "")
+              (if del
+                  (magit--propertize-face (format "%s-" del)
+                                          'magit-diffstat-removed)
+                "")
+              files))
+         "")
+     "")))
+
+(defun magit-log-margin-width (style details details-width)
+  (if magit-log-margin-show-shortstat
+      16
+    (+ (if details (1+ details-width) 0)
+       (if (stringp style)
+           (length (format-time-string style))
+         (+ 2 ; two digits
+            1 ; trailing space
+            (if (eq style 'age-abbreviated)
+                1  ; single character
+              (+ 1 ; gap after digits
+                 (apply #'max (mapcar (##max (length (nth 1 %))
+                                             (length (nth 2 %)))
+                                      magit--age-spec)))))))))
+
+;;; Select Mode
+
+(defvar-keymap magit-log-select-mode-map
+  :doc "Keymap for `magit-log-select-mode'."
+  :parent magit-log-mode-map
+  "C-c C-b" #'undefined
+  "C-c C-f" #'undefined
+  "."       #'magit-log-select-pick
+  "e"       #'magit-log-select-pick
+  "C-c C-c" #'magit-log-select-pick
+  "q"       #'magit-log-select-quit
+  "C-c C-k" #'magit-log-select-quit)
+(put 'magit-log-select-pick :advertised-binding [?\C-c ?\C-c])
+(put 'magit-log-select-quit :advertised-binding [?\C-c ?\C-k])
+
+(define-derived-mode magit-log-select-mode magit-log-mode "Magit Select"
+  "Mode for selecting a commit from history.
+
+This mode is documented in info node `(magit)Select from Log'.
+
+\\<magit-mode-map>\
+Type \\[magit-refresh] to refresh the current buffer.
+Type \\[magit-visit-thing] or \\[magit-diff-show-or-scroll-up] \
+to visit the commit at point.
+
+\\<magit-log-select-mode-map>\
+Type \\[magit-log-select-pick] to select the commit at point.
+Type \\[magit-log-select-quit] to abort without selecting a commit."
+  :group 'magit-log
+  (magit-hack-dir-local-variables))
+
+(put 'magit-log-select-mode 'magit-log-default-arguments
+     '("--graph" "-n256" "--decorate"))
+
+(defun magit-log-select-setup-buffer (revs args)
+  (magit-setup-buffer #'magit-log-select-mode nil
+    (magit-buffer-log-revisions revs)
+    (magit-buffer-log-args args)))
+
+(defun magit-log-select-refresh-buffer ()
+  (setq magit-section-inhibit-markers t)
+  (setq magit-section-insert-in-reverse t)
+  (magit-insert-section (logbuf)
+    (magit--insert-log t magit-buffer-log-revisions
+      (magit-log--maybe-drop-color-graph
+       magit-buffer-log-args
+       (magit-log-get-commit-limit)))))
+
+(cl-defmethod magit-buffer-value (&context (major-mode magit-log-select-mode))
+  magit-buffer-log-revisions)
+
+(defvar-local magit-log-select-pick-function nil)
+(defvar-local magit-log-select-quit-function nil)
+
+(defun magit-log-select (pick &optional msg quit branch args initial)
+  (declare (indent defun))
+  (unless initial
+    (setq initial (magit-commit-at-point)))
+  (magit-log-select-setup-buffer
+   (or branch (magit-get-current-branch) "HEAD")
+   (append args
+           (car (magit-log--get-value 'magit-log-select-mode 'direct))))
+  (if initial
+      (magit-log-goto-commit-section initial)
+    (while-let* ((rev (magit-section-value-if 'commit))
+                 (_(string-match-p "\\`\\(squash!\\|fixup!\\|amend!\\)"
+                                   (magit-rev-format "%s" rev)))
+                 (section (magit-current-section))
+                 (next (car (magit-section-siblings section 'next))))
+      (magit-section-goto next)))
+  (setq magit-log-select-pick-function pick)
+  (setq magit-log-select-quit-function quit)
+  (when magit-log-select-show-usage
+    (let ((pick (propertize (substitute-command-keys
+                             "\\[magit-log-select-pick]")
+                            'font-lock-face
+                            'magit-header-line-key))
+          (quit (propertize (substitute-command-keys
+                             "\\[magit-log-select-quit]")
+                            'font-lock-face
+                            'magit-header-line-key)))
+      (setq msg (format-spec
+                 (if msg
+                     (if (string-suffix-p "," msg)
+                         (concat msg " or %q to abort")
+                       msg)
+                   "Type %p to select commit at point, or %q to abort")
+                 `((?p . ,pick)
+                   (?q . ,quit)))))
+    (magit--add-face-text-property
+     0 (length msg) 'magit-header-line-log-select t msg)
+    (when (memq magit-log-select-show-usage '(both header-line))
+      (magit-set-header-line-format msg))
+    (when (memq magit-log-select-show-usage '(both echo-area))
+      (message "%s" (substring-no-properties msg)))))
+
+(defun magit-log-select-pick ()
+  "Select the commit at point and act on it.
+Call `magit-log-select-pick-function' with the selected
+commit as argument."
+  (interactive)
+  (let ((fun magit-log-select-pick-function)
+        (rev (magit-commit-at-point)))
+    (magit-mode-bury-buffer 'kill)
+    (funcall fun rev)))
+
+(defun magit-log-select-quit ()
+  "Abort selecting a commit, don't act on any commit.
+Call `magit-log-select-quit-function' if set."
+  (interactive)
+  (let ((fun magit-log-select-quit-function))
+    (magit-mode-bury-buffer 'kill)
+    (when fun (funcall fun))))
+
+;;; Cherry Mode
+
+(defvar-keymap magit-cherry-mode-map
+  :doc "Keymap for `magit-cherry-mode'."
+  :parent magit-mode-map
+  "q" #'magit-log-bury-buffer
+  "L" #'magit-margin-settings)
+
+(define-derived-mode magit-cherry-mode magit-mode "Magit Cherry"
+  "Mode for looking at commits not merged upstream.
+
+\\<magit-mode-map>\
+Type \\[magit-refresh] to refresh the current buffer.
+Type \\[magit-visit-thing] or \\[magit-diff-show-or-scroll-up] \
+to visit the commit at point.
+
+Type \\[magit-cherry-pick] to apply the commit at point.
+
+\\{magit-cherry-mode-map}"
+  :interactive nil
+  :group 'magit-log
+  (magit-hack-dir-local-variables)
+  (setq magit--imenu-group-types 'cherries))
+
+(defvar-local magit-buffer-cherry-upstream nil)
+(defvar-local magit-buffer-cherry-range nil)
+
+(defun magit-cherry-setup-buffer (head upstream)
+  (magit-setup-buffer #'magit-cherry-mode nil
+    (magit-buffer-refname head)
+    (magit-buffer-cherry-upstream upstream)
+    (magit-buffer-cherry-range (concat upstream ".." head))))
+
+(defun magit-cherry-refresh-buffer ()
+  (setq magit-section-insert-in-reverse t)
+  (magit-insert-section (cherry)
+    (magit-run-section-hook 'magit-cherry-sections-hook)))
+
+(cl-defmethod magit-buffer-value (&context (major-mode magit-cherry-mode))
+  magit-buffer-cherry-range)
+
+;;;###autoload
+(defun magit-cherry (head upstream)
+  "Show commits in a branch that are not merged in the upstream branch."
+  (interactive
+    (let  ((head (magit-read-branch "Cherry head")))
+      (list head (magit-read-other-branch "Cherry upstream" head
+                                          (magit-get-upstream-branch head)))))
+  (require 'magit)
+  (magit-cherry-setup-buffer head upstream))
+
+(defun magit-insert-cherry-headers ()
+  "Insert headers appropriate for `magit-cherry-mode' buffers."
+  (let ((branch   (magit-branch-set-face magit-buffer-refname))
+        (upstream (magit-branch-set-face magit-buffer-cherry-upstream)))
+    (magit-insert-head-branch-header branch)
+    (magit-insert-upstream-branch-header branch upstream "Upstream: ")
+    (insert ?\n)))
+
+(defun magit-insert-cherry-commits ()
+  "Insert commit sections into a `magit-cherry-mode' buffer."
+  (magit-insert-section (cherries)
+    (magit-insert-heading t "Cherry commits")
+    (magit-git-wash (apply-partially #'magit-log-wash-log 'cherry)
+      "cherry" "-v" "--abbrev"
+      magit-buffer-cherry-upstream
+      magit-buffer-refname)))
+
+;;; Log Sections
+;;;; Standard Log Sections
+
+(defvar-keymap magit-log-section-map
+  :doc "Keymap for log sections.
+The classes `magit-{unpulled,unpushed,unmerged}-section' derive
+from the abstract `magit-log-section' class.  Accordingly this
+keymap is the parent of their keymaps."
+  "<remap> <magit-visit-thing>" #'magit-diff-dwim
+  "<1>" (magit-menu-item "Visit diff" #'magit-diff-dwim))
+
+(cl-defmethod magit-section-ident-value ((section magit-unpulled-section))
+  "Return \"..@{push}\".
+\"..@{push}\" cannot be used as the value because that is ambiguous
+if `push.default' does not allow a 1:1 mapping, and many commands
+would fail because of that.  But here that does not matter and we
+need an unique value, so we use that string in the pushremote case."
+  (let ((value (oref section value)))
+    (if (equal value "..@{upstream}") value "..@{push}")))
+
+(magit-define-section-jumper magit-jump-to-unpulled-from-upstream
+  "Unpulled from @{upstream}" unpulled "..@{upstream}"
+  magit-insert-unpulled-from-upstream)
+
+(defun magit-insert-unpulled-from-upstream ()
+  "Insert commits that haven't been pulled from the upstream yet."
+  (when-let ((upstream (magit-get-upstream-branch)))
+    (magit-insert-section (unpulled "..@{upstream}" t)
+      (magit-insert-heading
+        (format (propertize "Unpulled from %s."
+                            'font-lock-face 'magit-section-heading)
+                upstream))
+      (magit--insert-log nil "..@{upstream}" magit-buffer-log-args)
+      (magit-log-insert-child-count))))
+
+(magit-define-section-jumper magit-jump-to-unpulled-from-pushremote
+  "Unpulled from <push-remote>" unpulled "..@{push}"
+  magit-insert-unpulled-from-pushremote)
+
+(defun magit-insert-unpulled-from-pushremote ()
+  "Insert commits that haven't been pulled from the push-remote yet."
+  (when-let* ((target (magit-get-push-branch))
+              (range  (concat ".." target))
+              (_(magit--insert-pushremote-log-p)))
+    (magit-insert-section (unpulled range t)
+      (magit-insert-heading
+        (format (propertize "Unpulled from %s."
+                            'font-lock-face 'magit-section-heading)
+                (propertize target 'font-lock-face 'magit-branch-remote)))
+      (magit--insert-log nil range magit-buffer-log-args)
+      (magit-log-insert-child-count))))
+
+(cl-defmethod magit-section-ident-value ((section magit-unpushed-section))
+  "Return \"..@{push}\".
+\"..@{push}\" cannot be used as the value because that is ambiguous
+if `push.default' does not allow a 1:1 mapping, and many commands
+would fail because of that.  But here that does not matter and we
+need an unique value, so we use that string in the pushremote case."
+  (let ((value (oref section value)))
+    (if (equal value "@{upstream}..") value "@{push}..")))
+
+(magit-define-section-jumper magit-jump-to-unpushed-to-upstream
+  "Unpushed to @{upstream}" unpushed "@{upstream}.." nil
+  :if (lambda ()
+        (or (memq 'magit-insert-unpushed-to-upstream-or-recent
+                  magit-status-sections-hook)
+            (memq 'magit-insert-unpushed-to-upstream
+                  magit-status-sections-hook)))
+  :description (lambda ()
+                 (let ((upstream (magit-get-upstream-branch)))
+                   (if (or (not upstream)
+                           (magit-rev-ancestor-p "HEAD" upstream))
+                       "Recent commits"
+                     "Unmerged into upstream"))))
+
+(defun magit-insert-unpushed-to-upstream-or-recent ()
+  "Insert section showing unpushed or other recent commits.
+If an upstream is configured for the current branch and it is
+behind of the current branch, then show the commits that have
+not yet been pushed into the upstream branch.  If no upstream is
+configured or if the upstream is not behind of the current branch,
+then show the last `magit-log-section-commit-count' commits."
+  (let ((upstream (magit-get-upstream-branch)))
+    (if (or (not upstream)
+            (magit-rev-ancestor-p "HEAD" upstream))
+        (magit-insert-recent-commits 'unpushed "@{upstream}..")
+      (magit-insert-unpushed-to-upstream))))
+
+(defun magit-insert-unpushed-to-upstream ()
+  "Insert commits that haven't been pushed to the upstream yet."
+  (when (magit-git-success "rev-parse" "@{upstream}")
+    (magit-insert-section (unpushed "@{upstream}..")
+      (magit-insert-heading
+        (format (propertize "Unmerged into %s."
+                            'font-lock-face 'magit-section-heading)
+                (magit-get-upstream-branch)))
+      (magit--insert-log nil "@{upstream}.." magit-buffer-log-args)
+      (magit-log-insert-child-count))))
+
+(defun magit-insert-recent-commits (&optional type value)
+  "Insert section showing recent commits.
+Show the last `magit-log-section-commit-count' commits."
+  (let* ((start (format "HEAD~%s" magit-log-section-commit-count))
+         (range (and (magit-rev-verify start)
+                     (concat start "..HEAD"))))
+    (magit-insert-section ((eval (or type 'recent))
+                           (or value range)
+                           t)
+      (magit-insert-heading "Recent commits")
+      (magit--insert-log nil
+        (and (member "--graph" magit-buffer-log-args) range)
+        (cons (format "-n%d" magit-log-section-commit-count)
+              (seq-remove (##string-prefix-p "-n" %)
+                          magit-buffer-log-args))))))
+
+(magit-define-section-jumper magit-jump-to-unpushed-to-pushremote
+  "Unpushed to <push-remote>" unpushed "@{push}.."
+  magit-insert-unpushed-to-pushremote)
+
+(defun magit-insert-unpushed-to-pushremote ()
+  "Insert commits that haven't been pushed to the push-remote yet."
+  (when-let* ((target (magit-get-push-branch))
+              (range  (concat target ".."))
+              (_(magit--insert-pushremote-log-p)))
+    (magit-insert-section (unpushed range t)
+      (magit-insert-heading
+        (format (propertize "Unpushed to %s."
+                            'font-lock-face 'magit-section-heading)
+                (propertize target 'font-lock-face 'magit-branch-remote)))
+      (magit--insert-log nil range magit-buffer-log-args)
+      (magit-log-insert-child-count))))
+
+(defun magit--insert-pushremote-log-p ()
+  (magit--with-refresh-cache
+      (cons default-directory 'magit--insert-pushremote-log-p)
+    (not (and (equal (magit-get-push-branch)
+                     (magit-get-upstream-branch))
+              (or (memq 'magit-insert-unpulled-from-upstream
+                        magit-status-sections-hook)
+                  (memq 'magit-insert-unpulled-from-upstream-or-recent
+                        magit-status-sections-hook))))))
+
+(defun magit-log-insert-child-count ()
+  (when magit-section-show-child-count
+    (let ((count (length (oref magit-insert-section--current children))))
+      (when (> count 0)
+        (when (eq count (magit-log-get-commit-limit))
+          (setq count (format "%s+" count)))
+        (save-excursion
+          (goto-char (- (oref magit-insert-section--current content) 2))
+          (insert (format " (%s)" count))
+          (delete-char 1))))))
+
+;;;; Auxiliary Log Sections
+
+(defun magit-insert-unpulled-cherries ()
+  "Insert section showing unpulled commits.
+Like `magit-insert-unpulled-from-upstream' but prefix each commit
+which has not been applied yet (i.e., a commit with a patch-id
+not shared with any local commit) with \"+\", and all others with
+\"-\"."
+  (when (magit-git-success "rev-parse" "@{upstream}")
+    (magit-insert-section (unpulled "..@{upstream}")
+      (magit-insert-heading t "Unpulled commits")
+      (magit-git-wash (apply-partially #'magit-log-wash-log 'cherry)
+        "cherry" "-v" (magit-abbrev-arg)
+        (magit-get-current-branch) "@{upstream}"))))
+
+(defun magit-insert-unpushed-cherries ()
+  "Insert section showing unpushed commits.
+Like `magit-insert-unpushed-to-upstream' but prefix each commit
+which has not been applied to upstream yet (i.e., a commit with
+a patch-id not shared with any upstream commit) with \"+\", and
+all others with \"-\"."
+  (when (magit-git-success "rev-parse" "@{upstream}")
+    (magit-insert-section (unpushed "@{upstream}..")
+      (magit-insert-heading t "Unpushed commits")
+      (magit-git-wash (apply-partially #'magit-log-wash-log 'cherry)
+        "cherry" "-v" (magit-abbrev-arg) "@{upstream}"))))
+
+;;; _
+(provide 'magit-log)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-log.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-log.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-log.elc
new file mode 100644
index 0000000..9c53fcf
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-log.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-margin.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-margin.el
new file mode 100644
index 0000000..887d585
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-margin.el
@@ -0,0 +1,276 @@
+;;; magit-margin.el --- Margins in Magit buffers  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for showing additional information
+;; in the margins of Magit buffers.  Currently this is only used for
+;; commits, for which the committer date or age, and optionally the
+;; author name are shown.
+
+;;; Code:
+
+(require 'magit-base)
+(require 'magit-transient)
+(require 'magit-mode)
+
+;;; Options
+
+(defgroup magit-margin nil
+  "Information Magit displays in the margin.
+
+You can change the STYLE and AUTHOR-WIDTH of all `magit-*-margin'
+options to the same values by customizing `magit-log-margin'
+*before* `magit' is loaded.  If you do that, then the respective
+values for the other options will default to what you have set
+for that variable.  Likewise if you set `magit-log-margin's INIT
+to nil, then that is used in the default of all other options.  But
+setting it to t, i.e., re-enforcing the default for that option,
+does not carry to other options."
+  :link '(info-link "(magit)Log Margin")
+  :group 'magit-log)
+
+;;; Settings
+
+(defvar-local magit--right-margin-delayed nil)
+
+(defvar-local magit--right-margin-config nil)
+(put 'magit--right-margin-config 'permanent-local t)
+
+(defun magit--right-margin-active ()
+  (car magit--right-margin-config))
+
+(defun magit--right-margin-option ()
+  (pcase major-mode
+    ('magit-cherry-mode        'magit-cherry-margin)
+    ('magit-log-mode           'magit-log-margin)
+    ('magit-log-select-mode    'magit-log-select-margin)
+    ('magit-reflog-mode        'magit-reflog-margin)
+    ('magit-refs-mode          'magit-refs-margin)
+    ('magit-stashes-mode       'magit-stashes-margin)
+    ('magit-status-mode        'magit-status-margin)
+    ('forge-notifications-mode 'magit-status-margin)
+    ('forge-topics-mode        'magit-status-margin)))
+
+;;; Commands
+
+(transient-define-prefix magit-margin-settings ()
+  "Change what information is displayed in the right margin."
+  :info-manual "(magit) Log Margin"
+  ["Margin"
+   (magit-toggle-margin)
+   (magit-cycle-margin-style)
+   (magit-toggle-margin-details)
+   (magit-refs-set-show-commit-count)])
+
+(transient-define-suffix magit-toggle-margin ()
+  "Show or hide the right margin."
+  :description "Toggle visibility"
+  :key "L"
+  :transient t
+  (interactive)
+  (unless (magit--right-margin-option)
+    (user-error "Magit margin isn't supported in this buffer"))
+  (setcar magit--right-margin-config (not (magit--right-margin-active)))
+  (magit-set-buffer-margins))
+
+(defvar magit-margin-default-time-format nil
+  "See https://github.com/magit/magit/pull/4605.")
+
+(transient-define-suffix magit-cycle-margin-style ()
+  "Cycle style used for the right margin."
+  :description "Cycle style"
+  :key "l"
+  :transient t
+  (interactive)
+  (unless (magit--right-margin-option)
+    (user-error "Magit margin isn't supported in this buffer"))
+  ;; This is only suitable for commit margins (there are not others).
+  (setf (cadr magit--right-margin-config)
+        (pcase (cadr magit--right-margin-config)
+          ('age 'age-abbreviated)
+          ('age-abbreviated
+           (let ((default (or magit-margin-default-time-format
+                              (cadr (symbol-value (magit--right-margin-option))))))
+             (if (stringp default) default "%Y-%m-%d %H:%M ")))
+          (_ 'age)))
+  (magit-set-buffer-margins nil t))
+
+(transient-define-suffix magit-toggle-margin-details ()
+  "Show or hide details in the right margin."
+  :description "Toggle details"
+  :key "d"
+  :transient t
+  (interactive)
+  (unless (magit--right-margin-option)
+    (user-error "Magit margin isn't supported in this buffer"))
+  (setf (nth 3 magit--right-margin-config)
+        (not (nth 3 magit--right-margin-config)))
+  (magit-set-buffer-margins nil t))
+
+;;; Core
+
+(defun magit-set-buffer-margins (&optional reset-right refresh-right)
+  (let ((lmargin nil)
+        (rmargin nil)
+        (roption (magit--right-margin-option)))
+    (when (or lmargin roption)
+      (when roption
+        (let* ((default (symbol-value roption))
+               (default-width (nth 2 default)))
+          (when (or reset-right (not magit--right-margin-config))
+            (setq magit--right-margin-config (copy-sequence default)))
+          (pcase-let ((`(,enable ,style ,_width ,details ,details-width)
+                       magit--right-margin-config))
+            (setq rmargin enable)
+            (when (functionp default-width)
+              (setf (nth 2 magit--right-margin-config)
+                    (funcall default-width style details details-width))))))
+      (dolist (window (get-buffer-window-list nil nil 0))
+        (with-selected-window window
+          (magit-set-window-margins window)
+          (if (or lmargin rmargin)
+              (add-hook  'window-configuration-change-hook
+                         #'magit-set-window-margins nil t)
+            (remove-hook 'window-configuration-change-hook
+                         #'magit-set-window-margins t))))
+      (when (and rmargin (or refresh-right magit--right-margin-delayed))
+        (magit-refresh-buffer)))))
+
+(defun magit-set-window-margins (&optional window)
+  (when (or window (setq window (get-buffer-window)))
+    (with-selected-window window
+      (set-window-margins
+       nil
+       (if (characterp (car (magit-section-visibility-indicator)))
+           1
+         (car (window-margins)))
+       (and (magit--right-margin-active)
+            (nth 2 magit--right-margin-config))))))
+
+(cl-defun magit-make-margin-overlay (&optional string (previous-line nil sline))
+  "Display STRING in the margin of the previous (or current) line.
+If point is at the beginning of a line, set the margin string for
+the previous line, otherwise for the current line.  Semi-obsolete
+optional PREVIOUS-LINE can be used to explicitly specify which
+line is affected."
+  (save-excursion
+    (forward-line (if (if sline previous-line (bolp)) -1 0))
+    ;; Don't put the overlay on the complete line to work around #1880.
+    (let ((o (make-overlay (1+ (point)) (line-end-position) nil t)))
+      (overlay-put o 'evaporate t)
+      (overlay-put o 'before-string
+                   (propertize "o" 'display
+                               (list (list 'margin 'right-margin)
+                                     (or string " ")))))))
+
+(defvar magit-margin-overlay-conditions
+  '( unpulled unpushed recent stashes local cherries
+     [remote branchbuf]
+     [shelved branchbuf]
+     [tags branchbuf]
+     topics discussions issues pullreqs))
+
+(defun magit-maybe-make-margin-overlay ()
+  (when (magit-section-match magit-margin-overlay-conditions
+                             magit-insert-section--current)
+    (magit-make-margin-overlay)))
+
+;;; Custom Support
+
+(defun magit-margin-set-variable (mode symbol value)
+  (set-default symbol value)
+  (message "Updating margins in %s buffers..." mode)
+  (dolist (buffer (buffer-list))
+    (with-current-buffer buffer
+      (when (eq major-mode mode)
+        (magit-set-buffer-margins t)
+        (magit-refresh))))
+  (message "Updating margins in %s buffers...done" mode))
+
+(defconst magit-log-margin--custom-type
+  '(list (boolean :tag "Show margin initially")
+         (choice  :tag "Show committer"
+                  (string :tag "date using time-format" "%Y-%m-%d %H:%M ")
+                  (const  :tag "date's age" age)
+                  (const  :tag "date's age (abbreviated)" age-abbreviated))
+         (const   :tag "Calculate width using magit-log-margin-width"
+                  magit-log-margin-width)
+         (boolean :tag "Show author name by default")
+         (integer :tag "Show author name using width")))
+
+;;; Time Utilities
+
+(defvar magit--age-spec
+  `((?Y "year"   "years"   ,(round (* 60 60 24 365.2425)))
+    (?M "month"  "months"  ,(round (* 60 60 24 30.436875)))
+    (?w "week"   "weeks"   ,(* 60 60 24 7))
+    (?d "day"    "days"    ,(* 60 60 24))
+    (?h "hour"   "hours"   ,(* 60 60))
+    (?m "minute" "minutes" 60)
+    (?s "second" "seconds" 1))
+  "Time units used when formatting relative commit ages.
+
+The value is a list of time units, beginning with the longest.
+Each element has the form (CHAR UNIT UNITS SECONDS).  UNIT is the
+time unit, UNITS is the plural of that unit.  CHAR is a character
+abbreviation.  And SECONDS is the number of seconds in one UNIT.
+
+This is defined as a variable to make it possible to use time
+units for a language other than English.  It is not defined
+as an option, because most other parts of Magit are always in
+English.")
+
+(defun magit--age (date &optional abbreviate)
+  (named-let calc ((age (abs (- (float-time)
+                                (if (stringp date)
+                                    (string-to-number date)
+                                  date))))
+                   (spec magit--age-spec))
+    (pcase-let* ((`((,char ,unit ,units ,weight) . ,spec) spec)
+                 (cnt (round (/ age weight 1.0))))
+      (if (or (not spec)
+              (>= (/ age weight) 1))
+          (list cnt (cond (abbreviate char)
+                          ((= cnt 1) unit)
+                          (units)))
+        (calc age spec)))))
+
+;;; _
+(provide 'magit-margin)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-margin.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-margin.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-margin.elc
new file mode 100644
index 0000000..2adedf2
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-margin.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-merge.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-merge.el
new file mode 100644
index 0000000..62557ee
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-merge.el
@@ -0,0 +1,338 @@
+;;; magit-merge.el --- Merge functionality  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements merge commands.
+
+;;; Code:
+
+(require 'magit)
+(require 'magit-diff)
+
+(declare-function magit-git-push "magit-push" (branch target args))
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-merge "magit" nil t)
+(transient-define-prefix magit-merge ()
+  "Merge branches."
+  :man-page "git-merge"
+  :incompatible '(("--ff-only" "--no-ff"))
+  ["Arguments"
+   :if-not magit-merge-in-progress-p
+   ("-f" "Fast-forward only" "--ff-only")
+   ("-n" "No fast-forward"   "--no-ff")
+   (magit-merge:--strategy)
+   (5 magit-merge:--strategy-option)
+   (5 "-b" "Ignore changes in amount of whitespace" "-Xignore-space-change")
+   (5 "-w" "Ignore whitespace when comparing lines" "-Xignore-all-space")
+   (5 magit-diff:--diff-algorithm :argument "-Xdiff-algorithm=")
+   (magit:--gpg-sign)
+   (magit:--signoff)]
+  ["Actions"
+   :if-not magit-merge-in-progress-p
+   [("m" "Merge"                  magit-merge-plain)
+    ("e" "Merge and edit message" magit-merge-editmsg)
+    ("n" "Merge but don't commit" magit-merge-nocommit)
+    ("a" "Absorb"                 magit-merge-absorb)]
+   [("p" "Preview merge"          magit-merge-preview)
+    ""
+    ("s" "Squash merge"           magit-merge-squash)
+    ("d" "Dissolve"               magit-merge-dissolve)]]
+  ["Actions"
+   :if magit-merge-in-progress-p
+   ("m" "Commit merge" magit-commit-create)
+   ("a" "Abort merge"  magit-merge-abort)])
+
+(defun magit-merge-arguments ()
+  (transient-args 'magit-merge))
+
+(transient-define-argument magit-merge:--strategy ()
+  :description "Strategy"
+  :class 'transient-option
+  ;; key for merge and rebase: "-s"
+  ;; key for cherry-pick and revert: "=s"
+  ;; shortarg for merge and rebase: "-s"
+  ;; shortarg for cherry-pick and revert: none
+  :key "-s"
+  :argument "--strategy="
+  :choices '("resolve" "recursive" "octopus" "ours" "subtree"))
+
+(transient-define-argument magit-merge:--strategy-option ()
+  :description "Strategy Option"
+  :class 'transient-option
+  :key "-X"
+  :argument "--strategy-option="
+  :choices '("ours" "theirs" "patience"))
+
+;;;###autoload
+(defun magit-merge-plain (rev &optional args nocommit)
+  "Merge commit REV into the current branch; using default message.
+
+Unless there are conflicts or a prefix argument is used create a
+merge commit using a generic commit message and without letting
+the user inspect the result.  With a prefix argument pretend the
+merge failed to give the user the opportunity to inspect the
+merge.
+
+To create an octopus-merge, separate branches with commas.
+
+\(git merge --no-edit|--no-commit [ARGS] REV)"
+  (interactive (list (magit-read-other-branches-or-commits "Merge")
+                     (magit-merge-arguments)
+                     current-prefix-arg))
+  (magit-merge-assert)
+  (magit-run-git-async "merge" (if nocommit "--no-commit" "--no-edit") args rev))
+
+;;;###autoload
+(defun magit-merge-editmsg (rev &optional args)
+  "Merge commit REV into the current branch; and edit message.
+
+Perform the merge and prepare a commit message but let the user
+edit it.
+
+To create an octopus-merge, separate branches with commas.
+
+\(git merge --edit --no-ff [ARGS] REV)"
+  (interactive (list (magit-read-other-branches-or-commits "Merge")
+                     (magit-merge-arguments)))
+  (magit-merge-assert)
+  (cl-pushnew "--no-ff" args :test #'equal)
+  (magit-run-git-with-editor "merge" "--edit" (delete "--ff-only" args) rev))
+
+;;;###autoload
+(defun magit-merge-nocommit (rev &optional args)
+  "Merge commit REV into the current branch; pretending it failed.
+
+Pretend the merge failed to give the user the opportunity to
+inspect the merge and change the commit message.
+
+To create an octopus-merge, separate branches with commas.
+
+\(git merge --no-commit --no-ff [ARGS] REV)"
+  (interactive (list (magit-read-other-branches-or-commits "Merge")
+                     (magit-merge-arguments)))
+  (magit-merge-assert)
+  (cl-pushnew "--no-ff" args :test #'equal)
+  (magit-run-git-async "merge" "--no-commit" args rev))
+
+;;;###autoload
+(defun magit-merge-dissolve (branch &optional args)
+  "Merge the current branch into BRANCH and remove the former.
+
+Before merging, force push the source branch to its push-remote,
+provided the respective remote branch already exists, ensuring
+that the respective pull-request (if any) won't get stuck on some
+obsolete version of the commits that are being merged.  Finally
+if `forge-branch-pullreq' was used to create the merged branch,
+then also remove the respective remote branch."
+  (interactive
+    (list (let ((branch (magit-get-current-branch)))
+            (magit-read-other-local-branch
+             (format "Merge `%s' into" (or branch (magit-rev-parse "HEAD")))
+             nil
+             (and branch (magit-get-local-upstream-branch branch))))
+          (magit-merge-arguments)))
+  (let ((current (magit-get-current-branch))
+        (head (magit-rev-parse "HEAD")))
+    (when (zerop (magit-call-git "checkout" branch))
+      (if current
+          (magit--merge-absorb current args)
+        (magit-run-git-with-editor "merge" args head)))))
+
+;;;###autoload
+(defun magit-merge-absorb (branch &optional args)
+  "Merge BRANCH into the current branch and remove the former.
+
+Before merging, force push the source branch to its push-remote,
+provided the respective remote branch already exists, ensuring
+that the respective pull-request (if any) won't get stuck on some
+obsolete version of the commits that are being merged.  Finally
+if `forge-branch-pullreq' was used to create the merged branch,
+then also remove the respective remote branch."
+  (interactive (list (magit-read-other-local-branch "Absorb branch")
+                     (magit-merge-arguments)))
+  (magit--merge-absorb branch args))
+
+(defun magit--merge-absorb (branch args &optional message)
+  (when (equal branch (magit-main-branch))
+    (unless (yes-or-no-p
+             (format "Do you really want to merge `%s' into another branch? "
+                     branch))
+      (user-error "Abort")))
+  (cond-let
+    ([target (magit-get-push-branch branch t)]
+     (magit-git-push branch target (list "--force-with-lease"))
+     (set-process-sentinel
+      magit-this-process
+      (lambda (process event)
+        (when (memq (process-status process) '(exit signal))
+          (if (not (zerop (process-exit-status process)))
+              (magit-process-sentinel process event)
+            (process-put process 'inhibit-refresh t)
+            (magit-process-sentinel process event)
+            (magit--merge-absorb-1 branch args))
+          (when message
+            (message message))))))
+    ((magit--merge-absorb-1 branch args))))
+
+(defun magit--merge-absorb-1 (branch args)
+  (if-let ((pr (magit-get "branch" branch "pullRequest")))
+      (magit-run-git-async
+       "merge" args "-m"
+       (format "Merge branch '%s'%s [#%s]"
+               branch
+               (let ((current (magit-get-current-branch)))
+                 (if (equal current (magit-main-branch))
+                     ""
+                   (format " into %s" current)))
+               pr)
+       branch)
+    (magit-run-git-async "merge" args "--no-edit" branch))
+  (set-process-sentinel
+   magit-this-process
+   (lambda (process event)
+     (when (memq (process-status process) '(exit signal))
+       (if (> (process-exit-status process) 0)
+           (magit-process-sentinel process event)
+         (process-put process 'inhibit-refresh t)
+         (magit-process-sentinel process event)
+         (magit-branch-maybe-delete-pr-remote branch)
+         (magit-branch-unset-pushRemote branch)
+         (magit-run-git "branch" "-D" branch))))))
+
+;;;###autoload
+(defun magit-merge-squash (rev)
+  "Squash commit REV into the current branch; don't create a commit.
+\n(git merge --squash REV)"
+  (interactive (list (magit-read-other-branch-or-commit "Squash")))
+  (magit-merge-assert)
+  (magit-run-git-async "merge" "--squash" rev))
+
+;;;###autoload
+(defun magit-merge-preview (rev)
+  "Preview result of merging REV into the current branch."
+  (interactive (list (magit-read-other-branch-or-commit "Preview merge")))
+  (magit-merge-preview-setup-buffer rev))
+
+;;;###autoload
+(defun magit-merge-abort ()
+  "Abort the current merge operation.
+\n(git merge --abort)"
+  (interactive)
+  (unless (file-exists-p (expand-file-name "MERGE_HEAD" (magit-gitdir)))
+    (user-error "No merge in progress"))
+  (magit-confirm 'abort-merge)
+  (magit-run-git-async "merge" "--abort"))
+
+(defun magit-checkout-stage (file arg)
+  "During a conflict checkout and stage side, or restore conflict."
+  (interactive
+    (let ((file (magit-completing-read "Checkout file"
+                                       (magit-tracked-files) nil 'any nil
+                                       'magit-read-file-hist
+                                       (magit-current-file))))
+      (cond ((member file (magit-unmerged-files))
+             (list file (magit-checkout-read-stage file)))
+            ((yes-or-no-p (format "Restore conflicts in %s? " file))
+             (list file "--merge"))
+            ((user-error "Quit")))))
+  (pcase (cons arg (cddr (car (magit-file-status file))))
+    ((or `("--ours"   ?D ,_)
+         '("--ours"   ?U ?A)
+         `("--theirs" ,_ ?D)
+         '("--theirs" ?A ?U))
+     (magit-run-git "rm" "--" file))
+    (_ (if (equal arg "--merge")
+           ;; This fails if the file was deleted on one
+           ;; side.  And we cannot do anything about it.
+           (magit-run-git "checkout" "--merge" "--" file)
+         (magit-call-git "checkout" arg "--" file)
+         (magit-run-git "add" "-u" "--" file)))))
+
+;;; Utilities
+
+(defun magit-merge-in-progress-p ()
+  (file-exists-p (expand-file-name "MERGE_HEAD" (magit-gitdir))))
+
+(defun magit--merge-range (&optional head)
+  (unless head
+    (setq head (magit-get-shortname
+                (car (magit-file-lines
+                      (expand-file-name "MERGE_HEAD" (magit-gitdir)))))))
+  (and head
+       (concat (magit-merge-base "HEAD" head "--octopus")
+               ".." head)))
+
+(defun magit-merge-assert ()
+  (or (not (magit-anything-modified-p t))
+      (magit-confirm 'merge-dirty
+        "Merging with dirty worktree is risky.  Continue")))
+
+(defun magit-checkout-read-stage (file)
+  (magit-read-char-case (format "For %s checkout: " file) t
+    (?o "[o]ur stage"   "--ours")
+    (?t "[t]heir stage" "--theirs")
+    (?c (if magit-verbose-messages "restore [c]onflict" "[c]onflict")
+        "--merge")))
+
+;;; Sections
+
+(defun magit-insert-merge-log ()
+  "Insert section for the on-going merge.
+Display the heads that are being merged.
+If no merge is in progress, do nothing."
+  (when (magit-merge-in-progress-p)
+    (let* ((heads (mapcar #'magit-get-shortname
+                          (magit-file-lines
+                           (expand-file-name "MERGE_HEAD" (magit-gitdir)))))
+           (range (magit--merge-range (car heads))))
+      (magit-insert-section (unmerged range)
+        (magit-insert-heading
+          (format "Merging %s:" (string-join heads ", ")))
+        (magit--insert-log nil
+          range
+          (let ((args magit-buffer-log-args))
+            (unless (member "--decorate=full" magit-buffer-log-args)
+              (push "--decorate=full" args))
+            args))))))
+
+;;; _
+(provide 'magit-merge)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-merge.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-merge.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-merge.elc
new file mode 100644
index 0000000..3ff2270
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-merge.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-mode.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-mode.el
new file mode 100644
index 0000000..5371e40
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-mode.el
@@ -0,0 +1,1650 @@
+;;; magit-mode.el --- Create and refresh Magit buffers  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements the abstract major-mode `magit-mode' from
+;; which almost all other Magit major-modes derive.  The code in here
+;; is mostly concerned with creating and refreshing Magit buffers.
+
+;;; Code:
+
+(require 'magit-base)
+(require 'magit-git)
+
+(require 'benchmark)
+(require 'browse-url)
+(require 'format-spec)
+(require 'help-mode)
+
+(require 'transient)
+
+(defvar bookmark-make-record-function)
+
+(eval-when-compile (require 'elp))
+(declare-function elp-reset-all "elp" ())
+(declare-function elp-instrument-package "elp" (prefix))
+(declare-function elp-results "elp" ())
+(declare-function elp-restore-all "elp" ())
+
+(defvar magit--wip-inhibit-autosave)
+(defvar magit-wip-mode)
+(declare-function magit-wip-get-ref "magit-wip" ())
+(declare-function magit-wip-commit-worktree "magit-wip" (ref files msg))
+
+(declare-function magit--blob-cache-zap "magit-files" ())
+
+;;; Options
+
+(defcustom magit-mode-hook nil
+  "Hook run when entering a mode derived from Magit mode."
+  :package-version '(magit . "4.4.2")
+  :group 'magit-modes
+  :type 'hook
+  :options (list #'bug-reference-mode))
+
+(defcustom magit-setup-buffer-hook
+  (list #'magit-maybe-save-repository-buffers
+        'magit-set-buffer-margins) ; from magit-margin.el
+  "Hook run by `magit-setup-buffer'.
+
+This is run right after displaying the buffer and right before
+generating or updating its content.  `magit-mode-hook' and other,
+more specific, `magit-mode-*-hook's on the other hand are run
+right before displaying the buffer.  Usually one of these hooks
+should be used instead of this one."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-modes
+  :type 'hook
+  :options (list #'magit-maybe-save-repository-buffers
+                 'magit-set-buffer-margins))
+
+(defcustom magit-pre-refresh-hook
+  (list #'magit-maybe-save-repository-buffers)
+  "Hook run before refreshing in `magit-refresh'.
+
+This hook, or `magit-post-refresh-hook', should be used
+for functions that are not tied to a particular buffer.
+
+To run a function with a particular buffer current, use
+`magit-refresh-buffer-hook' and use `derived-mode-p'
+inside your function."
+  :package-version '(magit . "2.4.0")
+  :group 'magit-refresh
+  :type 'hook
+  :options (list #'magit-maybe-save-repository-buffers))
+
+(defcustom magit-post-refresh-hook
+  ;; Do not function-quote to avoid circular dependencies.
+  ;; Functions added here have to be autoloaded.
+  '(magit-auto-revert-buffers
+    magit-run-post-commit-hook
+    magit-run-post-stage-hook
+    magit-run-post-unstage-hook)
+  "Hook run after refreshing in `magit-refresh'.
+
+This hook, or `magit-pre-refresh-hook', should be used
+for functions that are not tied to a particular buffer.
+
+To run a function with a particular buffer current, use
+`magit-refresh-buffer-hook' and use `derived-mode-p'
+inside your function."
+  :package-version '(magit . "2.4.0")
+  :group 'magit-refresh
+  :type 'hook
+  :options '(magit-auto-revert-buffers
+             magit-run-post-commit-hook
+             magit-run-post-stage-hook
+             magit-run-post-unstage-hook))
+
+(defcustom magit-display-buffer-function #'magit-display-buffer-traditional
+  "The function used to display a Magit buffer.
+
+All Magit buffers (buffers whose major-modes derive from
+`magit-mode') are displayed using `magit-display-buffer',
+which in turn uses the function specified here."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-buffers
+  :type `(radio (function-item ,#'magit-display-buffer-traditional)
+                (function-item ,#'magit-display-buffer-same-window-except-diff-v1)
+                (function-item ,#'magit-display-buffer-fullframe-status-v1)
+                (function-item ,#'magit-display-buffer-fullframe-status-topleft-v1)
+                (function-item ,#'magit-display-buffer-fullcolumn-most-v1)
+                (function-item ,#'display-buffer)
+                (function :tag "Function")))
+
+(defcustom magit-pre-display-buffer-hook
+  (list #'magit-save-window-configuration)
+  "Hook run by `magit-display-buffer' before displaying the buffer."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-buffers
+  :type 'hook
+  :get #'magit-hook-custom-get
+  :options (list #'magit-save-window-configuration))
+
+(defcustom magit-post-display-buffer-hook (list #'magit-maybe-set-dedicated)
+  "Hook run by `magit-display-buffer' after displaying the buffer."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-buffers
+  :type 'hook
+  :get #'magit-hook-custom-get
+  :options (list #'magit-maybe-set-dedicated))
+
+(defcustom magit-generate-buffer-name-function
+  #'magit-generate-buffer-name-default-function
+  "The function used to generate the name for a Magit buffer."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-buffers
+  :type `(radio (function-item ,#'magit-generate-buffer-name-default-function)
+                (function :tag "Function")))
+
+(defcustom magit-buffer-name-format "%x%M%v: %t%x"
+  "The format string used to name Magit buffers.
+
+The following %-sequences are supported:
+
+`%m' The name of the major-mode, but with the `-mode' suffix
+     removed.
+
+`%M' Like \"%m\" but abbreviate `magit-status-mode' as `magit'.
+
+`%v' The value the buffer is locked to, in parentheses, or an
+     empty string if the buffer is not locked to a value.
+
+`%V' Like \"%v\", but the string is prefixed with a space, unless
+     it is an empty string.
+
+`%t' The top-level directory of the working tree of the
+     repository, or if `magit-uniquify-buffer-names' is non-nil
+     an abbreviation of that.
+
+`%x' If `magit-uniquify-buffer-names' is nil \"*\", otherwise the
+     empty string.  Due to limitations of the `uniquify' package,
+     buffer names must end with the path.
+
+The value should always contain \"%m\" or \"%M\", \"%v\" or \"%V\", and
+\"%t\".  If `magit-uniquify-buffer-names' is non-nil, then the
+value must end with \"%t\" or \"%t%x\".  See issue #2841.
+
+This is used by `magit-generate-buffer-name-default-function'.
+If another `magit-generate-buffer-name-function' is used, then
+it may not respect this option, or on the contrary it may
+support additional %-sequences."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-buffers
+  :type 'string)
+
+(defcustom magit-uniquify-buffer-names t
+  "Whether to uniquify the names of Magit buffers."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-buffers
+  :type 'boolean)
+
+(defcustom magit-bury-buffer-function #'magit-mode-quit-window
+  "The function used to bury or kill the current Magit buffer."
+  :package-version '(magit . "3.2.0")
+  :group 'magit-buffers
+  :type `(radio (function-item ,#'quit-window)
+                (function-item ,#'magit-mode-quit-window)
+                (function-item ,#'magit-restore-window-configuration)
+                (function :tag "Function")))
+
+(defcustom magit-prefix-use-buffer-arguments 'selected
+  "Whether certain prefix commands reuse arguments active in relevant buffer.
+
+This affects the transient prefix commands `magit-diff',
+`magit-log' and `magit-show-refs'.
+
+Valid values are:
+
+`always': Always use the set of arguments that is currently
+  active in the respective buffer, provided that buffer exists
+  of course.
+`selected': Use the set of arguments from the respective
+  buffer, but only if it is displayed in a window of the current
+  frame.  This is the default.
+`current': Use the set of arguments from the respective buffer,
+  but only if it is the current buffer.
+`never': Never use the set of arguments from the respective
+  buffer.
+
+For more information see info node `(magit)Transient Arguments
+and Buffer Variables'."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-buffers
+  :group 'magit-commands
+  :group 'magit-diff
+  :group 'magit-log
+  :type '(choice
+          (const :tag "Always use args from buffer" always)
+          (const :tag "Use args from buffer if displayed in frame" selected)
+          (const :tag "Use args from buffer if it is current" current)
+          (const :tag "Never use args from buffer" never)))
+
+(defcustom magit-direct-use-buffer-arguments 'selected
+  "Whether certain commands reuse arguments active in relevant buffer.
+
+This affects certain commands such as `magit-show-commit' that
+are suffixes of the diff or log transient prefix commands, but
+only if they are invoked directly, i.e., *not* as a suffix.
+
+Valid values are:
+
+`always': Always use the set of arguments that is currently
+  active in the respective buffer, provided that buffer exists
+  of course.
+`selected': Use the set of arguments from the respective
+  buffer, but only if it is displayed in a window of the current
+  frame.  This is the default.
+`current': Use the set of arguments from the respective buffer,
+  but only if it is the current buffer.
+`never': Never use the set of arguments from the respective
+  buffer.
+
+For more information see info node `(magit)Transient Arguments
+and Buffer Variables'."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-buffers
+  :group 'magit-commands
+  :group 'magit-diff
+  :group 'magit-log
+  :type '(choice
+          (const :tag "Always use args from buffer" always)
+          (const :tag "Use args from buffer if displayed in frame" selected)
+          (const :tag "Use args from buffer if it is current" current)
+          (const :tag "Never use args from buffer" never)))
+
+(defcustom magit-region-highlight-hook
+  '(magit-diff-update-hunk-region) ; from magit-diff.el
+  "Functions used to highlight the region.
+
+Each function is run with the current section as only argument
+until one of them returns non-nil.  If all functions return nil,
+then fall back to regular region highlighting."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-refresh
+  :type 'hook
+  :options '(magit-diff-update-hunk-region))
+
+(defcustom magit-create-buffer-hook nil
+  "Normal hook run while creating a new `magit-mode' buffer.
+Runs before the buffer is populated with sections.  Also see
+`magit-post-create-buffer-hook'."
+  :package-version '(magit . "2.90.0")
+  :group 'magit-refresh
+  :type 'hook)
+
+(defcustom magit-post-create-buffer-hook nil
+  "Normal hook run after creating a new `magit-mode' buffer.
+Runs after the buffer is populated with sections for the first
+time.  Also see `magit-create-buffer-hook' (which runs earlier)
+and `magit-refresh-buffer-hook' (which runs on every refresh)."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-refresh
+  :type 'hook)
+
+(defcustom magit-refresh-buffer-hook nil
+  "Normal hook for `magit-refresh-buffer' to run after refreshing."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-refresh
+  :type 'hook)
+
+(defcustom magit-refresh-status-buffer t
+  "Whether the status buffer is refreshed after running git.
+
+When this is non-nil, then the status buffer is automatically
+refreshed after running git for side-effects, in addition to the
+current Magit buffer, which is always refreshed automatically.
+
+Only set this to nil after exhausting all other options to
+improve performance."
+  :package-version '(magit . "2.4.0")
+  :group 'magit-refresh
+  :group 'magit-status
+  :type 'boolean)
+
+(defcustom magit-refresh-verbose nil
+  "Whether to revert Magit buffers verbosely."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-refresh
+  :type 'boolean)
+
+(defcustom magit-save-repository-buffers t
+  "Whether to save file-visiting buffers when appropriate.
+
+If non-nil, then all modified file-visiting buffers belonging
+to the current repository may be saved before running Magit
+commands and before creating or refreshing Magit buffers.
+If `dontask', then this is done without user intervention, for
+any other non-nil value the user has to confirm each save.
+
+The default is t to avoid surprises, but `dontask' is the
+recommended value."
+  :group 'magit-essentials
+  :group 'magit-buffers
+  :type '(choice (const :tag "Never" nil)
+                 (const :tag "Ask" t)
+                 (const :tag "Save without asking" dontask)))
+
+;;; Key Bindings
+
+(defvar-keymap magit-mode-map
+  :doc "Parent keymap for all keymaps of modes derived from `magit-mode'."
+  :parent magit-section-mode-map
+  ;; Don't function-quote but make sure all commands are autoloaded.
+  "C-<return>"  'magit-visit-thing
+  "RET"         'magit-visit-thing
+  "M-TAB"       'magit-dired-jump
+  "M-<tab>"     'magit-section-cycle-diffs
+  "SPC"         'magit-diff-show-or-scroll-up
+  "S-SPC"       'magit-diff-show-or-scroll-down
+  "DEL"         'magit-diff-show-or-scroll-down
+  "+"           'magit-diff-more-context
+  "-"           'magit-diff-less-context
+  "0"           'magit-diff-default-context
+  "a" 'magit-cherry-apply
+  "A" 'magit-cherry-pick
+  "b" 'magit-branch
+  "B" 'magit-bisect
+  "c" 'magit-commit
+  "C" 'magit-clone
+  "d" 'magit-diff
+  "D" 'magit-diff-refresh
+  "e" 'magit-ediff-dwim
+  "E" 'magit-ediff
+  "f" 'magit-fetch
+  "F" 'magit-pull
+  "g" 'magit-refresh
+  "G" 'magit-refresh-all
+  "h" 'magit-dispatch
+  "?" 'magit-dispatch
+  "H" 'magit-describe-section
+  "i" 'magit-gitignore
+  "I" 'magit-init
+  "j" 'magit-status-quick
+  "J" 'magit-display-repository-buffer
+  "k" 'magit-delete-thing
+  "K" 'magit-file-untrack
+  "l" 'magit-log
+  "L" 'magit-log-refresh
+  "m" 'magit-merge
+  "M" 'magit-remote
+  ;; "n" magit-section-forward in magit-section-mode-map
+  ;; "N" forge-dispatch, added by forge package
+  "o" 'magit-submodule
+  "O" 'magit-subtree
+  ;; "p" magit-section-backward in magit-section-mode-map
+  "P" 'magit-push
+  "q" 'magit-mode-bury-buffer
+  "Q" 'magit-git-command
+  ":" 'magit-git-command
+  "r" 'magit-rebase
+  "R" 'magit-file-rename
+  "s" 'magit-stage-files
+  "S" 'magit-stage-modified
+  "t" 'magit-tag
+  "T" 'magit-notes
+  "u" 'magit-unstage-files
+  "U" 'magit-unstage-all
+  "v" 'magit-revert-no-commit
+  "V" 'magit-revert
+  "w" 'magit-am
+  "W" 'magit-patch
+  "x" 'magit-reset-quickly
+  "X" 'magit-reset
+  "y" 'magit-show-refs
+  "Y" 'magit-cherry
+  "z" 'magit-stash
+  "Z" 'magit-worktree
+  "%" 'magit-worktree
+  "$" 'magit-process-buffer
+  "!" 'magit-run
+  ">" 'magit-sparse-checkout
+  "C-c C-c" 'magit-dispatch
+  "C-c C-r" 'magit-next-reference
+  "C-c C-e" 'magit-edit-thing
+  "C-c C-o" 'magit-browse-thing
+  "C-c C-w" 'magit-copy-thing
+  "C-w"     'magit-copy-section-value
+  "M-w"     'magit-copy-buffer-revision
+  "<remap> <mouse-set-point>"     'magit-mouse-set-point
+  "<remap> <back-to-indentation>" 'magit-back-to-indentation
+  "<remap> <previous-line>"       'magit-previous-line
+  "<remap> <next-line>"           'magit-next-line
+  "<remap> <evil-previous-line>"  'evil-previous-visual-line
+  "<remap> <evil-next-line>"      'evil-next-visual-line)
+
+(defun magit-delete-thing ()
+  "This is a placeholder command, which signals an error if called.
+Where applicable, other keymaps remap this command to another,
+which actually deletes the thing at point."
+  (declare (completion ignore))
+  (interactive)
+  (user-error "There is no thing at point that could be deleted"))
+
+(defun magit-visit-thing ()
+  "This is a placeholder command, which may signal an error if called.
+Where applicable, other keymaps remap this command to another,
+which actually visits the thing at point."
+  (declare (completion ignore))
+  (interactive)
+  (cond-let
+    ((eq transient-current-command 'magit-dispatch)
+     (call-interactively (key-binding (this-command-keys))))
+    ([url (thing-at-point 'url t)]
+     (browse-url url))
+    ((user-error "There is no thing at point that could be visited"))))
+
+(defun magit-edit-thing ()
+  "This is a placeholder command, which may signal an error if called.
+Where applicable, other keymaps remap this command to another,
+which actually lets you edit the thing at point, likely in another
+buffer."
+  (declare (completion ignore))
+  (interactive)
+  (if (eq transient-current-command 'magit-dispatch)
+      (call-interactively (key-binding (this-command-keys)))
+    (user-error "There is no thing at point that could be edited")))
+
+(defun magit-browse-thing ()
+  "This is a placeholder command, which may signal an error if called.
+Where applicable, other keymaps remap this command to another,
+which actually visits thing at point using `browse-url'."
+  (declare (completion ignore))
+  (interactive)
+  (if-let ((url (thing-at-point 'url t)))
+      (browse-url url)
+    (user-error "There is no thing at point that could be browsed")))
+
+(defun magit-copy-thing ()
+  "This is a placeholder command, which signals an error if called.
+Where applicable, other keymaps remap this command to another,
+which actually copies some representation of the thing at point
+to the kill ring."
+  (declare (completion ignore))
+  (interactive)
+  (user-error "There is no thing at point that we know how to copy"))
+
+;;;###autoload
+(defun magit-info ()
+  "Visit the Magit manual."
+  (interactive)
+  (info "magit"))
+
+(defvar bug-reference-map)
+(with-eval-after-load 'bug-reference
+  (keymap-set bug-reference-map "<remap> <magit-visit-thing>"
+              'bug-reference-push-button))
+
+(easy-menu-define magit-mode-menu magit-mode-map
+  "Magit menu."
+  ;; Similar to `magit-dispatch' but exclude:
+  ;; - commands that are available from context menus:
+  ;;   apply, reverse, discard, stage, unstage,
+  ;;   cherry-pick, revert, reset,
+  ;;   describe-section
+  ;; - commands that are available from submenus:
+  ;;   git-command, ediff-dwim
+  ;; - and: refresh-all, status-jump, status-quick.
+  '("Magit"
+    "---" "Inspect"
+    ["     Bisect..."             magit-bisect t]
+    ["     Cherries..."           magit-cherry t]
+    ["     Diff..."               magit-diff t]
+    ["     Ediff..."              magit-ediff t]
+    ["     Log..."                magit-log t]
+    ["     References..."         magit-show-refs t]
+    "---" "Manipulate"
+    ["     Commit..."             magit-commit t]
+    ["     Stash..."              magit-stash t]
+    ["     Tag..."                magit-tag t]
+    "---"
+    ["     Branch..."             magit-branch t]
+    ["     Remote..."             magit-remote t]
+    "---"
+    ["     Merge..."              magit-merge t]
+    ["     Rebase..."             magit-rebase t]
+    "---" "Transfer"
+    ["     Fetch..."              magit-fetch t]
+    ["     Pull..."               magit-pull t]
+    ["     Push..."               magit-push t]
+    "---" "Setup"
+    ["     Clone..."              magit-clone t]
+    ["     Ignore..."             magit-gitignore t]
+    ["     Init..."               magit-init t]
+    "---"
+    ("Advanced"
+     ["Run..."                    magit-run t]
+     "---"
+     ["Apply patches..."          magit-am t]
+     ["Format patches..."         magit-patch t]
+     "---"
+     ["Note..."                   magit-notes t]
+     "---"
+     ["Submodule..."              magit-submodule t]
+     ["Subtree..."                magit-subtree t]
+     ["Worktree..."               magit-worktree t])
+    "---"
+    ["Show command dispatcher..." magit-dispatch t]
+    ["Show manual"                magit-info t]
+    ["Show another buffer"        magit-display-repository-buffer t]
+    "---"
+    ("Change buffer arguments"
+     ["Diff arguments"            magit-diff-refresh t]
+     ["Log arguments"             magit-log-refresh t])
+    ["Refresh buffer"             magit-refresh t]
+    ["Bury buffer"                magit-mode-bury-buffer t]))
+
+;;; Mode
+
+(define-derived-mode magit-mode magit-section-mode "Magit"
+  "Parent major mode from which Magit major modes inherit.
+
+Magit is documented in info node `(magit)'."
+  :interactive nil
+  :group 'magit
+  (magit-hack-dir-local-variables)
+  (face-remap-add-relative 'header-line 'magit-header-line)
+  (setq mode-line-process (magit-repository-local-get 'mode-line-process))
+  (setq-local revert-buffer-function #'magit-revert-buffer)
+  (setq-local bookmark-make-record-function #'magit--make-bookmark)
+  (setq-local imenu-create-index-function #'magit--imenu-create-index)
+  (setq-local imenu-default-goto-function #'magit--imenu-goto-function)
+  (setq-local isearch-filter-predicate #'magit-section--open-temporarily))
+
+(defun magit-hack-dir-local-variables ()
+  "Like `hack-dir-local-variables-non-file-buffer' but ignore some variables."
+  (let ((ignored-local-variables
+         `(show-trailing-whitespace
+           ,@ignored-local-variables)))
+    (hack-dir-local-variables-non-file-buffer)))
+
+;;; Local Variables
+
+(defvaralias 'magit-buffer-refname 'magit-buffer-revision)
+(defvar-local magit-buffer-revision nil)
+(defvar-local magit-buffer-revision-oid nil)
+(defvar-local magit-buffer-blob-oid nil)
+(defvar-local magit-buffer-file-name nil)
+
+;; Preserve when major-mode is changed in file-visiting buffers.
+(put 'magit-buffer-revision 'permanent-local t)
+(put 'magit-buffer-revision-oid 'permanent-local t)
+(put 'magit-buffer-blob-oid 'permanent-local t)
+(put 'magit-buffer-file-name 'permanent-local t)
+
+(eval-and-compile
+  (defvar magit-define-aliases-for:magit-buffer-* t)
+  (when magit-define-aliases-for:magit-buffer-*
+    ;; Unfortunately defvar-local can only be used at top-level,
+    ;; so instead we have to use make-variable-buffer-local below.
+    (defvar magit-buffer-arguments nil)
+    (make-obsolete-variable 'magit-buffer-arguments
+      "use a mode- or package-specific `magit-buffer-{*}-args' instead"
+      "magit 4.6.0")
+    (defvar magit-buffer-upstream nil)
+    (make-obsolete-variable 'magit-buffer-upstream
+      "use a mode- or package-specific `magit-buffer-{*}-upstream' instead"
+      "magit 4.6.0")
+    (define-obsolete-variable-alias 'magit-buffer-range-hashed
+      'magit-buffer-diff-range-oids "magit 4.6.0")
+    (define-obsolete-variable-alias 'magit-buffer-revisions
+      'magit-buffer-log-revisions "magit 4.6.0")
+    (define-obsolete-variable-alias 'magit-buffer-revision-hash
+      'magit-buffer-revision-oid "magit 4.6.0")
+    (define-obsolete-variable-alias 'magit-buffer-typearg
+      'magit-buffer-diff-typearg "magit 4.6.0")))
+(make-variable-buffer-local 'magit-buffer-arguments)
+(make-variable-buffer-local 'magit-buffer-upstream)
+
+(defun magit-buffer-file-name ()
+  "Return `magit-buffer-file-name' or if that is nil `buffer-file-name'.
+In an indirect buffer get the value for its base buffer."
+  (or magit-buffer-file-name
+      (buffer-file-name (buffer-base-buffer))))
+
+(defun magit-buffer-revision ()
+  "Return `magit-buffer-revision' or if that is nil \"{worktree}\".
+If not visiting a blob or file, or the file isn't being tracked,
+return nil.  If visiting a blob but `magit-buffer-revision' is nil,
+return nil."
+  (or magit-buffer-revision
+      (and buffer-file-name
+           (magit-file-tracked-p buffer-file-name)
+           "{worktree}")))
+
+(cl-defgeneric magit-buffer-value ()
+  "Return the value of the current buffer.
+The \"value\" identifies what is being displayed in the buffer.
+The buffer's major-mode should derive from `magit-section-mode'."
+  nil)
+
+(defvar-local magit-previous-section nil)
+(put 'magit-previous-section 'permanent-local t)
+
+;;; Setup Buffer
+
+(defmacro magit-setup-buffer (mode &optional locked &rest args)
+  "\n\n(fn MODE &optional LOCKED &key BUFFER DIRECTORY \
+INITIAL-SECTION SELECT-SECTION &rest BINDINGS)"
+  (declare (indent 2)
+           (debug (form [&optional locked]
+                        [&rest keywordp form]
+                        [&rest (symbolp form)])))
+  (let (kwargs)
+    (while (keywordp (car args))
+      (push (pop args) kwargs)
+      (push (pop args) kwargs))
+    `(magit-setup-buffer-internal
+      ,mode ,locked
+      ,(cons 'list (mapcar (pcase-lambda (`(,var ,form))
+                             `(list ',var ,form))
+                           args))
+      ,@(nreverse kwargs))))
+
+(cl-defun magit-setup-buffer-internal
+    ( mode locked bindings
+      &key buffer directory initial-section select-section)
+  (let* ((value   (and locked
+                       (with-temp-buffer
+                         (mapc (##apply #'set-local %) bindings)
+                         (let ((major-mode mode))
+                           (magit-buffer-value)))))
+         (buffer  (if buffer
+                      (get-buffer-create buffer)
+                    (magit-get-mode-buffer mode value)))
+         (section (and buffer (magit-current-section)))
+         (created (not buffer)))
+    (unless buffer
+      (setq buffer (magit-generate-new-buffer mode value)))
+    (with-current-buffer buffer
+      (setq magit-previous-section section)
+      (when directory
+        (setq default-directory directory))
+      (funcall mode)
+      (magit-xref-setup #'magit-setup-buffer-internal bindings)
+      (mapc (##apply #'set-local %) bindings)
+      (when created
+        (run-hooks 'magit-create-buffer-hook)))
+    (magit-display-buffer buffer)
+    (with-current-buffer buffer
+      (run-hooks 'magit-setup-buffer-hook)
+      (magit-refresh-buffer created
+                            :initial-section initial-section
+                            :select-section select-section)
+      (when created
+        (run-hooks 'magit-post-create-buffer-hook)))
+    buffer))
+
+;;; Display Buffer
+
+(defvar magit-display-buffer-noselect nil
+  "If non-nil, then `magit-display-buffer' doesn't call `select-window'.")
+
+(defun magit-display-buffer (buffer &optional display-function)
+  "Display BUFFER in some window and maybe select it.
+
+If optional DISPLAY-FUNCTION is non-nil, then use that to display
+the buffer.  Otherwise use `magit-display-buffer-function', which
+is the normal case.
+
+Then, unless `magit-display-buffer-noselect' is non-nil, select
+the window which was used to display the buffer.
+
+Also run the hooks `magit-pre-display-buffer-hook'
+and `magit-post-display-buffer-hook'."
+  (with-current-buffer buffer
+    (run-hooks 'magit-pre-display-buffer-hook))
+  (let ((window (funcall (or display-function magit-display-buffer-function)
+                         buffer)))
+    (unless magit-display-buffer-noselect
+      (let ((old-frame (selected-frame))
+            (new-frame (window-frame window)))
+        (select-window window)
+        (unless (eq old-frame new-frame)
+          (select-frame-set-input-focus new-frame)))))
+  (with-current-buffer buffer
+    (run-hooks 'magit-post-display-buffer-hook)))
+
+(defun magit-display-buffer-traditional (buffer)
+  "Display BUFFER the way this has traditionally been done."
+  (display-buffer
+   buffer (if (and (derived-mode-p 'magit-mode)
+                   (not (memq (with-current-buffer buffer major-mode)
+                              '(magit-process-mode
+                                magit-revision-mode
+                                magit-diff-mode
+                                magit-stash-mode
+                                magit-status-mode))))
+              '(display-buffer-same-window)
+            nil))) ; display in another window
+
+(defun magit-display-buffer-same-window-except-diff-v1 (buffer)
+  "Display BUFFER in the selected window except for some modes.
+If a buffer's `major-mode' derives from `magit-diff-mode' or
+`magit-process-mode', display it in another window.  Display all
+other buffers in the selected window."
+  (display-buffer
+   buffer (if (with-current-buffer buffer
+                (derived-mode-p 'magit-diff-mode 'magit-process-mode))
+              '(nil (inhibit-same-window . t))
+            '(display-buffer-same-window))))
+
+(defun magit--display-buffer-fullframe (buffer alist)
+  (when-let ((window (or (display-buffer-reuse-window buffer alist)
+                         (display-buffer-same-window buffer alist)
+                         (display-buffer-pop-up-window buffer alist)
+                         (display-buffer-use-some-window buffer alist))))
+    (delete-other-windows window)
+    window))
+
+(defun magit-display-buffer-fullframe-status-v1 (buffer)
+  "Display BUFFER, filling entire frame if BUFFER is a status buffer.
+Otherwise, behave like `magit-display-buffer-traditional'."
+  (if (eq (with-current-buffer buffer major-mode)
+          'magit-status-mode)
+      (display-buffer buffer '(magit--display-buffer-fullframe))
+    (magit-display-buffer-traditional buffer)))
+
+(defun magit--display-buffer-topleft (buffer alist)
+  (or (display-buffer-reuse-window buffer alist)
+      (when-let ((window2 (display-buffer-pop-up-window buffer alist)))
+        (let ((window1 (get-buffer-window))
+              (buffer1 (current-buffer))
+              (buffer2 (window-buffer window2))
+              (w2-quit-restore (window-parameter window2 'quit-restore)))
+          (set-window-buffer window1 buffer2)
+          (set-window-buffer window2 buffer1)
+          (select-window window2)
+          ;; Swap some window state that `magit-mode-quit-window' and
+          ;; `quit-restore-window' inspect.
+          (set-window-prev-buffers window2 (cdr (window-prev-buffers window1)))
+          (set-window-prev-buffers window1 nil)
+          (set-window-parameter window2 'magit-dedicated
+                                (window-parameter window1 'magit-dedicated))
+          (set-window-parameter window1 'magit-dedicated t)
+          (set-window-parameter window1 'quit-restore
+                                (list 'window 'window
+                                      (nth 2 w2-quit-restore)
+                                      (nth 3 w2-quit-restore)))
+          (set-window-parameter window2 'quit-restore nil)
+          window1))))
+
+(defun magit-display-buffer-fullframe-status-topleft-v1 (buffer)
+  "Display BUFFER, filling entire frame if BUFFER is a status buffer.
+When BUFFER derives from `magit-diff-mode' or
+`magit-process-mode', try to display BUFFER to the top or left of
+the current buffer rather than to the bottom or right, as
+`magit-display-buffer-fullframe-status-v1' would.  Whether the
+split is made vertically or horizontally is determined by
+`split-window-preferred-function'."
+  (display-buffer
+   buffer
+   (cond ((eq (with-current-buffer buffer major-mode)
+              'magit-status-mode)
+          '(magit--display-buffer-fullframe))
+         ((with-current-buffer buffer
+            (derived-mode-p 'magit-diff-mode 'magit-process-mode))
+          '(magit--display-buffer-topleft))
+         ('(display-buffer-same-window)))))
+
+(defun magit--display-buffer-fullcolumn (buffer alist)
+  (when-let ((window (or (display-buffer-reuse-window buffer alist)
+                         (display-buffer-same-window buffer alist)
+                         (display-buffer-below-selected buffer alist))))
+    (delete-other-windows-vertically window)
+    window))
+
+(defun magit-display-buffer-fullcolumn-most-v1 (buffer)
+  "Display BUFFER using the full column except in some cases.
+For most cases where BUFFER's `major-mode' derives from
+`magit-mode', display it in the selected window and grow that
+window to the full height of the frame, deleting other windows in
+that column as necessary.  However, display BUFFER in another
+window if 1) BUFFER's mode derives from `magit-process-mode', or
+2) BUFFER's mode derives from `magit-diff-mode', provided that
+the mode of the current buffer derives from `magit-log-mode' or
+`magit-cherry-mode'."
+  (display-buffer
+   buffer
+   (cond ((and (or (bound-and-true-p git-commit-mode)
+                   (derived-mode-p 'magit-log-mode
+                                   'magit-cherry-mode
+                                   'magit-reflog-mode))
+               (with-current-buffer buffer
+                 (derived-mode-p 'magit-diff-mode)))
+          nil)
+         ((with-current-buffer buffer
+            (derived-mode-p 'magit-process-mode))
+          nil)
+         ('(magit--display-buffer-fullcolumn)))))
+
+(defun magit-maybe-set-dedicated ()
+  "Mark the selected window as dedicated if appropriate.
+
+If a new window was created to display the buffer, then remember
+that fact.  That information is used by `magit-mode-quit-window',
+to determine whether the window should be deleted when its last
+Magit buffer is buried."
+  (let ((window (get-buffer-window (current-buffer))))
+    (when (and (window-live-p window)
+               (not (window-prev-buffers window)))
+      (set-window-parameter window 'magit-dedicated t))))
+
+;;; Get Buffer
+
+(defvar-local magit--default-directory nil
+  "Value of `default-directory' when buffer is generated.
+This exists to prevent a let-bound `default-directory' from
+tricking `magit-get-mode-buffer' or `magit-mode-get-buffers'
+into thinking a buffer belongs to a repo that it doesn't.")
+(put 'magit--default-directory 'permanent-local t)
+
+(defun magit-mode-get-buffers ()
+  (let ((topdir (magit-toplevel)))
+    (seq-filter (##with-current-buffer %
+                  (and (derived-mode-p 'magit-mode)
+                       (equal magit--default-directory topdir)))
+                (buffer-list))))
+
+(defvar-local magit-buffer-locked-p nil)
+(put 'magit-buffer-locked-p 'permanent-local t)
+
+(defun magit-get-mode-buffer (mode &optional value frame)
+  "Return buffer belonging to the current repository whose major-mode is MODE.
+
+If no such buffer exists then return nil.  Multiple buffers with
+the same major-mode may exist for a repository but only one can
+exist that hasn't been locked to its value.  Return that buffer
+\(or nil if there is no such buffer) unless VALUE is non-nil, in
+which case return the buffer that has been locked to that value.
+
+If FRAME is nil or omitted, then consider all buffers.  Otherwise
+  only consider buffers that are displayed in some live window
+  on some frame.
+If `all', then consider all buffers on all frames.
+If `visible', then only consider buffers on all visible frames.
+If `selected' or t, then only consider buffers on the selected
+  frame.
+If a frame, then only consider buffers on that frame."
+  (let ((topdir (magit--toplevel-safe)))
+    (cl-flet* ((b (buffer)
+                 (with-current-buffer buffer
+                   (and (eq major-mode mode)
+                        (equal magit--default-directory topdir)
+                        (if value
+                            (and magit-buffer-locked-p
+                                 (equal (magit-buffer-value) value))
+                          (not magit-buffer-locked-p))
+                        buffer)))
+               (w (window)
+                 (b (window-buffer window)))
+               (f (frame)
+                 (seq-some #'w (window-list frame 'no-minibuf))))
+      (pcase-exhaustive frame
+        ('nil                   (seq-some #'b (buffer-list)))
+        ('all                   (seq-some #'f (frame-list)))
+        ('visible               (seq-some #'f (visible-frame-list)))
+        ((or 'selected 't)      (seq-some #'w (window-list (selected-frame))))
+        ((guard (framep frame)) (seq-some #'w (window-list frame)))))))
+
+(defun magit-generate-new-buffer (mode &optional value directory)
+  (let* ((default-directory (or directory (magit--toplevel-safe)))
+         (name (funcall magit-generate-buffer-name-function mode value))
+         (buffer (generate-new-buffer name)))
+    (with-current-buffer buffer
+      (setq magit--default-directory default-directory)
+      (setq magit-buffer-locked-p (and value t))
+      (magit-restore-section-visibility-cache mode))
+    (magit--maybe-uniquify-buffer-names buffer name mode)
+    buffer))
+
+(defun magit-generate-buffer-name-default-function (mode &optional value)
+  "Generate buffer name for a MODE buffer in the current repository.
+The returned name is based on `magit-buffer-name-format' and
+takes `magit-uniquify-buffer-names' and VALUE, if non-nil, into
+account."
+  (let ((m (substring (symbol-name mode) 0 -5))
+        (v (and value (format "%s" (ensure-list value))))
+        (n (if magit-uniquify-buffer-names
+               (file-name-nondirectory
+                (directory-file-name default-directory))
+             (abbreviate-file-name default-directory))))
+    (format-spec
+     magit-buffer-name-format
+     `((?m . ,m)
+       (?M . ,(if (eq mode 'magit-status-mode) "magit" m))
+       (?v . ,(or v ""))
+       (?V . ,(if v (concat " " v) ""))
+       (?t . ,n)
+       (?x . ,(if magit-uniquify-buffer-names "" "*"))))))
+
+(defun magit--maybe-uniquify-buffer-names (buffer name mode)
+  (when magit-uniquify-buffer-names
+    (cl-pushnew mode uniquify-list-buffers-directory-modes)
+    (with-current-buffer buffer
+      (setq list-buffers-directory (abbreviate-file-name default-directory)))
+    (let ((uniquify-buffer-name-style
+           (if (memq uniquify-buffer-name-style '(nil forward))
+               'post-forward-angle-brackets
+             uniquify-buffer-name-style)))
+      (uniquify-rationalize-file-buffer-names
+       name (file-name-directory (directory-file-name default-directory))
+       buffer))))
+
+;;; Buffer Lock
+
+(defun magit-toggle-buffer-lock ()
+  "Lock the current buffer to its value or unlock it.
+
+Locking a buffer to its value prevents it from being reused to
+display another value.  The name of a locked buffer contains its
+value, which allows telling it apart from other locked buffers
+and the unlocked buffer.
+
+Not all Magit buffers can be locked to their values, for example
+it wouldn't make sense to lock a status buffer.
+
+There can only be a single unlocked buffer using a certain
+major-mode per repository.  So when a buffer is being unlocked
+and another unlocked buffer already exists for that mode and
+repository, then the former buffer is instead deleted and the
+latter is displayed in its place."
+  (interactive)
+  (cond-let
+    (magit-buffer-locked-p
+     (if-let ((unlocked (magit-get-mode-buffer major-mode)))
+         (let ((locked (current-buffer)))
+           (switch-to-buffer unlocked nil t)
+           (kill-buffer locked))
+       (setq magit-buffer-locked-p nil)
+       (let ((name (funcall magit-generate-buffer-name-function major-mode))
+             (buffer (current-buffer))
+             (mode major-mode))
+         (rename-buffer (generate-new-buffer-name name))
+         (with-temp-buffer
+           (magit--maybe-uniquify-buffer-names buffer name mode)))))
+    ([value (magit-buffer-value)]
+     (if-let ((locked (magit-get-mode-buffer major-mode value)))
+         (let ((unlocked (current-buffer)))
+           (switch-to-buffer locked nil t)
+           (kill-buffer unlocked))
+       (setq magit-buffer-locked-p t)
+       (let ((name (funcall magit-generate-buffer-name-function
+                            major-mode value))
+             (buffer (current-buffer))
+             (mode major-mode))
+         (rename-buffer (generate-new-buffer-name name))
+         (with-temp-buffer
+           (magit--maybe-uniquify-buffer-names buffer name mode)))))
+    ((user-error "Buffer has no value it could be locked to"))))
+
+;;; Bury Buffer
+
+(defun magit-mode-bury-buffer (&optional kill-buffer)
+  "Bury or kill the current buffer.
+
+Use `magit-bury-buffer-function' to bury the buffer when called
+without a prefix argument or to kill it when called with a single
+prefix argument.
+
+With two prefix arguments, always kill the current and all other
+Magit buffers, associated with this repository."
+  (interactive "P")
+  (if (>= (prefix-numeric-value kill-buffer) 16)
+      (mapc #'kill-buffer (magit-mode-get-buffers))
+    (funcall magit-bury-buffer-function kill-buffer)))
+
+(defun magit-mode-quit-window (kill-buffer)
+  "Quit the selected window and bury its buffer.
+
+This behaves similar to `quit-window', but when the window
+was originally created to display a Magit buffer and the
+current buffer is the last remaining Magit buffer that was
+ever displayed in the selected window, then delete that
+window."
+  (if (or (one-window-p)
+          (seq-find (pcase-lambda (`(,buffer))
+                      (and (not (eq buffer (current-buffer)))
+                           (buffer-live-p buffer)
+                           (or (not (window-parameter nil 'magit-dedicated))
+                               (with-current-buffer buffer
+                                 (derived-mode-p 'magit-mode
+                                                 'magit-process-mode)))))
+                    (window-prev-buffers)))
+      (quit-window kill-buffer)
+    (let ((window (selected-window)))
+      (quit-window kill-buffer)
+      (when (window-live-p window)
+        (delete-window window)))))
+
+;;; Refresh Buffers
+
+(defvar magit-inhibit-refresh nil)
+
+(defun magit-refresh ()
+  "Refresh some buffers belonging to the current repository.
+
+Refresh the current buffer if its major mode derives from
+`magit-mode', and refresh the corresponding status buffer.
+
+Run hooks `magit-pre-refresh-hook', `magit-post-refresh-hook'
+and `magit-unwind-refresh-hook'."
+  (interactive)
+  (unless magit-inhibit-refresh
+    (unwind-protect
+        (let ((start (current-time))
+              (magit--refresh-cache (or magit--refresh-cache
+                                        (list (cons 0 0)))))
+          (when magit-refresh-verbose
+            (message "Refreshing magit..."))
+          (magit-run-hook-with-benchmark 'magit-pre-refresh-hook)
+          (cond ((derived-mode-p 'magit-mode)
+                 (magit-refresh-buffer))
+                ((derived-mode-p 'tabulated-list-mode)
+                 (revert-buffer)))
+          (when-let ((buffer (and magit-refresh-status-buffer
+                                  (not (derived-mode-p 'magit-status-mode))
+                                  (magit-get-mode-buffer 'magit-status-mode))))
+            (with-current-buffer buffer
+              (magit-refresh-buffer)))
+          (magit-run-hook-with-benchmark 'magit-post-refresh-hook)
+          (when magit-refresh-verbose
+            (let* ((c (caar magit--refresh-cache))
+                   (a (+ c (cdar magit--refresh-cache))))
+              (message "Refreshing magit...done (%.3fs, cached %s/%s (%.0f%%))"
+                       (float-time (time-since start))
+                       c a (* (/ c (* a 1.0)) 100)))))
+      (run-hooks 'magit-unwind-refresh-hook))))
+
+(defun magit-refresh-all ()
+  "Refresh all buffers belonging to the current repository.
+
+Refresh all Magit buffers belonging to the current repository,
+and revert buffers that visit files located inside the current
+repository.
+
+Run hooks `magit-pre-refresh-hook' and `magit-post-refresh-hook'."
+  (interactive)
+  (magit-run-hook-with-benchmark 'magit-pre-refresh-hook)
+  (dolist (buffer (magit-mode-get-buffers))
+    (with-current-buffer buffer (magit-refresh-buffer)))
+  (magit-run-hook-with-benchmark 'magit-post-refresh-hook))
+
+(defvar-local magit--refresh-start-time nil)
+
+(cl-defun magit-refresh-buffer ( &optional created
+                                 &key initial-section select-section)
+  "Refresh the current Magit buffer.
+The arguments are for internal use."
+  (interactive)
+  (when-let ((refresh (magit--refresh-buffer-function)))
+    (let ((magit--refreshing-buffer-p t)
+          (magit--refresh-start-time (current-time))
+          (magit--refresh-cache (or magit--refresh-cache (list (cons 0 0))))
+          (action (if created "Creating" "Refreshing")))
+      (when magit-refresh-verbose
+        (message "%s buffer `%s'..." action (buffer-name)))
+      (cond
+        (created
+         (funcall refresh)
+         (cond (initial-section (funcall initial-section))
+               (select-section (funcall select-section))))
+        (t
+         (deactivate-mark)
+         (setq magit-section-pre-command-section nil)
+         (setq magit-section-highlight-overlays nil)
+         (setq magit-section-selection-overlays nil)
+         (setq magit-section-highlighted-sections nil)
+         (setq magit-section-focused-sections nil)
+         (let ((positions (magit--refresh-buffer-get-positions)))
+           (funcall refresh)
+           (cond (select-section (funcall select-section))
+                 ((magit--refresh-buffer-set-positions positions))))))
+      (let ((magit-section-cache-visibility nil))
+        (magit-section-show magit-root-section))
+      (run-hooks 'magit-refresh-buffer-hook)
+      (magit-section-update-highlight)
+      (set-buffer-modified-p nil)
+      (push (current-buffer) magit-section--refreshed-buffers)
+      (when magit-refresh-verbose
+        (message "%s buffer `%s'...done (%.3fs)" action (buffer-name)
+                 (float-time (time-since magit--refresh-start-time)))))))
+
+(defun magit--refresh-buffer-function ()
+  (let ((fn (intern (format "%s-refresh-buffer"
+                            (substring (symbol-name major-mode) 0 -5)))))
+    (and (functionp fn)
+         (lambda ()
+           (let ((inhibit-read-only t))
+             (erase-buffer)
+             (save-excursion (funcall fn)))))))
+
+(defun magit--refresh-buffer-get-positions ()
+  (or (let ((buffer (current-buffer)))
+        (mapcan
+         (lambda (window)
+           (with-selected-window window
+             (with-current-buffer buffer
+               (and-let ((section (magit-section-at)))
+                 `((,window
+                    ,section
+                    ,@(magit-section-get-relative-position section)
+                    ,@(and-let ((ws (magit-section-at (window-start))))
+                        (list ws
+                              (car (magit-section-get-relative-position ws))
+                              (window-start)))))))))
+         ;; For hunks we run `magit-section-movement-hook' (once for
+         ;; each window displaying the buffer).  The selected window
+         ;; comes first in this list, but we want to process it last.
+         (nreverse (get-buffer-window-list buffer nil t))))
+      (and$ (magit-section-at)
+            `((nil ,$ ,@(magit-section-get-relative-position $))))))
+
+(defun magit--refresh-buffer-set-positions (positions)
+  (pcase-dolist
+      (`(,window ,section ,line ,char ,ws-section ,ws-line ,window-start)
+       positions)
+    (if window
+        (with-selected-window window
+          (magit-section-goto-successor section line char)
+          (cond-let
+            ((derived-mode-p 'magit-log-mode))
+            ((or (not window-start)
+                 (> window-start (point))))
+            ((magit-section-equal ws-section (magit-section-at window-start))
+             (set-window-start window window-start t))
+            ([pos (save-excursion
+                    (and (magit-section-goto-successor--same
+                          ws-section ws-line 0)
+                         (point)))]
+             (set-window-start window pos t))))
+      ;; We must make sure this does not call `set-window-start',
+      ;; which the HUNK METHOD does by calling `magit-section-goto'
+      ;; because that runs the `magit-section-goto-successor-hook'
+      ;; and thus `magit-hunk-set-window-start'.  The window does
+      ;; not display this buffer, so the window start would be set
+      ;; for the wrong buffer.  Originally reported in #4196 and
+      ;; fixed with 482c25a3204468a4f6c2fe12ff061666b61f5f4d.
+      (let ((magit-section-movement-hook nil))
+        (magit-section-goto-successor section line char)
+        ;; To store the point value for the selected window, it isn't
+        ;; enough for it to be current, the window has to "display" it.
+        ;; The effect of `goto-char', used by the above function, is not
+        ;; preserved, and using just `set-window-point' would affect the
+        ;; wrong buffer.
+        (unless (eq (window-dedicated-p) t)
+          (let ((restore (window-buffer))
+                (window-scroll-functions nil)
+                (window-configuration-change-hook nil))
+            (unwind-protect
+                (progn
+                  (set-window-buffer nil (current-buffer) t)
+                  (set-window-point nil (point)))
+              (set-window-buffer nil restore t))))))))
+
+(defun magit-revert-buffer (_ignore-auto _noconfirm)
+  "Wrapper around `magit-refresh-buffer' suitable as `revert-buffer-function'."
+  (magit-refresh-buffer))
+
+(defun magit-profile-refresh-buffer ()
+  "Profile refreshing the current Magit buffer."
+  (interactive)
+  (require (quote elp))
+  (elp-reset-all)
+  (message "Profiling Magit and Forge...")
+  (elp-instrument-package "magit-")
+  (elp-instrument-package "forge-")
+  (magit-refresh-buffer)
+  (message "Profiling Magit and Forge...done")
+  (elp-results)
+  (elp-reset-all))
+
+(defun magit-toggle-profiling ()
+  "Start profiling Magit, or if in progress, stop and display the results."
+  (interactive)
+  (require (quote elp))
+  (cond ((catch 'in-progress
+           (mapatoms (##and (get % elp-timer-info-property)
+                            (throw 'in-progress t))))
+         (message "Stop profiling and display results...")
+         (elp-results)
+         (elp-restore-all))
+        (t
+         (message "Start profiling Magit and Forge...")
+         (elp-reset-all)
+         (elp-instrument-package "magit-")
+         (elp-instrument-package "forge-"))))
+
+;;; Save File-Visiting Buffers
+
+(defvar magit--disable-save-buffers nil)
+
+(defun magit-pre-command-hook ()
+  (setq magit--disable-save-buffers nil))
+(add-hook 'pre-command-hook #'magit-pre-command-hook)
+
+(defvar magit-after-save-refresh-buffers nil)
+
+(defun magit-after-save-refresh-buffers ()
+  (unless magit-inhibit-refresh
+    (dolist (buffer magit-after-save-refresh-buffers)
+      (when (buffer-live-p buffer)
+        (with-current-buffer buffer
+          (magit-refresh-buffer))))
+    (setq magit-after-save-refresh-buffers nil)
+    (remove-hook 'post-command-hook #'magit-after-save-refresh-buffers)))
+
+(defun magit-after-save-refresh-status ()
+  "Refresh the status buffer of the current repository.
+
+This function is intended to be added to `after-save-hook'.
+
+If the status buffer does not exist or the file being visited in
+the current buffer isn't inside the working tree of a repository,
+then do nothing.
+
+Note that refreshing a Magit buffer is done by re-creating its
+contents from scratch, which can be slow in large repositories.
+If you are not satisfied with Magit's performance, then you
+should obviously not add this function to that hook."
+  (when-let ((_(not magit-inhibit-refresh))
+             (_(magit-inside-worktree-p t))
+             (buf (ignore-errors (magit-get-mode-buffer 'magit-status-mode))))
+    (cl-pushnew buf magit-after-save-refresh-buffers)
+    (add-hook 'post-command-hook #'magit-after-save-refresh-buffers)))
+
+(defun magit-maybe-save-repository-buffers ()
+  "Maybe save file-visiting buffers belonging to the current repository.
+Do so if `magit-save-repository-buffers' is non-nil.  You should
+not remove this from any hooks, instead set that variable to nil
+if you so desire."
+  (when (and magit-save-repository-buffers
+             (not magit--disable-save-buffers))
+    (setq magit--disable-save-buffers t)
+    (let ((msg (current-message)))
+      (magit-save-repository-buffers
+       (eq magit-save-repository-buffers 'dontask))
+      (when (and msg
+                 (current-message)
+                 (not (equal msg (current-message))))
+        (message "%s" msg)))))
+
+(defvar-local magit-inhibit-refresh-save nil)
+
+(defvar magit-save-repository-buffers-predicate
+  (lambda (topdir)
+    (let ((remote (file-remote-p default-directory))
+          (topdirs nil)
+          ;; If the current file is modified and resides inside
+          ;; a repository, and a let-binding is in effect, which
+          ;; places us in another repository, then this binding
+          ;; is needed to prevent that file from being saved.
+          (default-directory default-directory))
+      (and buffer-file-name
+           (setq default-directory (file-name-directory buffer-file-name))
+           ;; Check whether the repository still exists.
+           (file-exists-p default-directory)
+           ;; Check whether refreshing is disabled.
+           (not magit-inhibit-refresh-save)
+           ;; Check whether the visited file is either on the
+           ;; same remote as the repository, or both are on
+           ;; the local system.
+           (equal (file-remote-p buffer-file-name) remote)
+           ;; Delayed checks that are more expensive for remote
+           ;; repositories, due to the required network access.
+           ;;
+           ;; Check whether the file is inside the repository.
+           (equal (or (cdr (assoc default-directory topdirs))
+                      (let ((top (magit-rev-parse-safe "--show-toplevel")))
+                        (push (cons default-directory top) topdirs)
+                        top))
+                  topdir)
+           ;; Check whether the file is actually writable.
+           (file-writable-p buffer-file-name))))
+  "Predicate for `magit-save-repository-buffers'.
+
+This function is called for each buffer that might need saving with
+one argument, the working tree of the respective repository.  If it
+returns non-nil, the current buffer is saved.")
+
+(defun magit-save-repository-buffers (&optional arg)
+  "Save file-visiting buffers belonging to the current repository.
+After any buffer where `buffer-save-without-query' is non-nil
+is saved without asking, the user is asked about each modified
+buffer, which visits a file in the current repository.  Optional
+argument (the prefix) non-nil means save all with no questions."
+  (interactive "P")
+  (when-let ((topdir (magit-rev-parse-safe "--show-toplevel")))
+    (let ((save-some-buffers-action-alist
+           `((?Y ,(##with-current-buffer %
+                    (setq buffer-save-without-query t)
+                    (save-buffer))
+                 "to save the current buffer and remember choice")
+             (?N ,(##with-current-buffer %
+                    (setq magit-inhibit-refresh-save t))
+                 "to skip the current buffer and remember choice")
+             ,@save-some-buffers-action-alist))
+          ;; Create a single wip commit for all saved files.
+          (magit--wip-inhibit-autosave t)
+          (saved nil))
+      (unwind-protect
+          (save-some-buffers
+           arg
+           (lambda ()
+             (and (funcall magit-save-repository-buffers-predicate topdir)
+                  (prog1 t
+                    (when magit-wip-mode
+                      (push (expand-file-name buffer-file-name) saved))))))
+        (when saved
+          (let ((default-directory topdir))
+            (magit-wip-commit-worktree
+             (magit-wip-get-ref)
+             saved
+             (if (cdr saved)
+                 (format "autosave %s files after save" (length saved))
+               (format "autosave %s after save"
+                       (file-relative-name (car saved)))))))))))
+
+;;; Restore Window Configuration
+
+(defvar magit-inhibit-save-previous-winconf nil)
+
+(defvar-local magit-previous-window-configuration nil)
+(put 'magit-previous-window-configuration 'permanent-local t)
+
+(defun magit-save-window-configuration ()
+  "Save the current window configuration.
+
+Later, when the buffer is buried, it may be restored by
+`magit-restore-window-configuration'."
+  (cond (magit-inhibit-save-previous-winconf
+         (when (eq magit-inhibit-save-previous-winconf 'unset)
+           (setq magit-previous-window-configuration nil)))
+        ((not (get-buffer-window (current-buffer) (selected-frame)))
+         (setq magit-previous-window-configuration
+               (current-window-configuration)))))
+
+(defun magit-restore-window-configuration (&optional kill-buffer)
+  "Bury or kill the current buffer and restore previous window configuration."
+  (let ((winconf magit-previous-window-configuration)
+        (buffer (current-buffer))
+        (frame (selected-frame)))
+    (quit-window kill-buffer (selected-window))
+    (when (and winconf (equal frame (window-configuration-frame winconf)))
+      (set-window-configuration winconf)
+      (when (buffer-live-p buffer)
+        (with-current-buffer buffer
+          (setq magit-previous-window-configuration nil)))
+      (set-buffer (with-selected-window (selected-window)
+                    (current-buffer))))))
+
+;;; Buffer History
+
+(defun magit-go-backward ()
+  "Move backward in current buffer's history."
+  (interactive)
+  (if help-xref-stack
+      (help-xref-go-back (current-buffer))
+    (user-error "No previous entry in buffer's history")))
+
+(defun magit-go-forward ()
+  "Move forward in current buffer's history."
+  (interactive)
+  (if help-xref-forward-stack
+      (help-xref-go-forward (current-buffer))
+    (user-error "No next entry in buffer's history")))
+
+(defun magit-insert-xref-buttons ()
+  "Insert xref buttons."
+  (when (and (not magit-buffer-locked-p)
+             (or help-xref-stack help-xref-forward-stack))
+    (when help-xref-stack
+      (magit-xref-insert-button help-back-label 'magit-xref-backward))
+    (when help-xref-forward-stack
+      (when help-xref-stack
+        (insert " "))
+      (magit-xref-insert-button help-forward-label 'magit-xref-forward))))
+
+(defun magit-xref-insert-button (label type)
+  (magit-insert-section (button label)
+    (insert-text-button label 'type type
+                        'help-args (list (current-buffer)))))
+
+(define-button-type 'magit-xref-backward
+  :supertype 'help-back
+  'mouse-face 'magit-section-highlight
+  'help-echo (purecopy "mouse-2, RET: go back to previous history entry"))
+
+(define-button-type 'magit-xref-forward
+  :supertype 'help-forward
+  'mouse-face 'magit-section-highlight
+  'help-echo (purecopy "mouse-2, RET: go back to next history entry"))
+
+(defvar magit-xref-modes
+  ;; Do not function-quote to avoid circular dependencies.
+  '(magit-log-mode
+    magit-reflog-mode
+    magit-diff-mode
+    magit-revision-mode)
+  "List of modes for which to insert navigation buttons.")
+
+(defun magit-xref-setup (fn args)
+  (when (memq major-mode magit-xref-modes)
+    (when help-xref-stack-item
+      (push (cons (point) help-xref-stack-item) help-xref-stack)
+      (setq help-xref-forward-stack nil))
+    (when-let ((tail (nthcdr 30 help-xref-stack)))
+      (setcdr tail nil))
+    (setq help-xref-stack-item
+          (list 'magit-xref-restore fn default-directory args))))
+
+(defun magit-xref-restore (fn dir args)
+  (setq default-directory dir)
+  (funcall fn major-mode nil args))
+
+;;; Repository-Local Cache
+
+(defvar magit-repository-local-cache nil
+  "Alist mapping `magit-toplevel' paths to alists of key/value pairs.")
+
+(defun magit-repository-local-repository ()
+  "Return the key for the current repository."
+  (or (bound-and-true-p magit--default-directory)
+      (magit-toplevel)))
+
+(defun magit-repository-local-set (key value &optional repository)
+  "Set the repository-local VALUE for KEY.
+
+Unless specified, REPOSITORY is the current buffer's repository.
+
+If REPOSITORY is nil (meaning there is no current repository),
+then the value is not cached, and we return nil."
+  (let* ((repokey (or repository (magit-repository-local-repository)))
+         (cache (assoc repokey magit-repository-local-cache)))
+    ;; Don't cache values for a nil REPOSITORY, as the 'set' and 'get'
+    ;; calls for some KEY may happen in unrelated contexts.
+    (when repokey
+      (if cache
+          (let ((keyvalue (assoc key (cdr cache))))
+            (if keyvalue
+                ;; Update pre-existing value for key.
+                (setcdr keyvalue value)
+              ;; No such key in repository-local cache.
+              (push (cons key value) (cdr cache))))
+        ;; No cache for this repository.
+        (push (cons repokey (list (cons key value)))
+              magit-repository-local-cache)))))
+
+(defun magit-repository-local-exists-p (key &optional repository)
+  "Non-nil when a repository-local value exists for KEY.
+
+Return a (KEY . VALUE) cons cell.
+
+The KEY is matched using `equal'.
+
+Unless specified, REPOSITORY is the current buffer's repository."
+  (and-let ((cache (assoc (or repository
+                              (magit-repository-local-repository))
+                          magit-repository-local-cache)))
+    (assoc key (cdr cache))))
+
+(defun magit-repository-local-get (key &optional default repository)
+  "Return the repository-local value for KEY.
+
+Return DEFAULT if no value for KEY exists.
+
+The KEY is matched using `equal'.
+
+Unless specified, REPOSITORY is the current buffer's repository."
+  (if-let ((keyvalue (magit-repository-local-exists-p key repository)))
+      (cdr keyvalue)
+    default))
+
+(defun magit-repository-local-delete (key &optional repository)
+  "Delete the repository-local value for KEY.
+
+Unless specified, REPOSITORY is the current buffer's repository.
+If REPOSITORY is `all', then delete the value for KEY for all
+repositories."
+  (cond-let
+    ((eq repository 'all)
+     (dolist (cache magit-repository-local-cache)
+       (setf cache (assoc-delete-all key cache))))
+    ([cache (assoc (or repository (magit-repository-local-repository))
+                   magit-repository-local-cache)]
+     (setf cache (assoc-delete-all key cache)))))
+
+(defmacro magit--with-repository-local-cache (key &rest body)
+  (declare (indent 1) (debug (form body)))
+  (let ((k (gensym)))
+    `(let ((,k ,key))
+       (if-let ((kv (magit-repository-local-exists-p ,k)))
+           (cdr kv)
+         (let ((v ,(macroexp-progn body)))
+           (magit-repository-local-set ,k v)
+           v)))))
+
+(defun magit-preserve-section-visibility-cache ()
+  (when (derived-mode-p 'magit-status-mode 'magit-refs-mode)
+    (magit-repository-local-set
+     (cons major-mode 'magit-section-visibility-cache)
+     magit-section-visibility-cache)))
+
+(defun magit-restore-section-visibility-cache (mode)
+  (setq magit-section-visibility-cache
+        (magit-repository-local-get
+         (cons mode 'magit-section-visibility-cache))))
+
+(defun magit-zap-caches (&optional all)
+  "Zap caches for the current repository.
+
+Remove the repository's entry from `magit-repository-local-cache',
+remove the host's entry from `magit--host-git-version-cache', set
+`magit-section-visibility-cache' to nil for all Magit buffers of
+the repository, and empty the `magit--blob-cache'.
+
+With a prefix argument or if optional ALL is non-nil, discard the
+mentioned caches completely."
+  (interactive)
+  (magit--blob-cache-zap)
+  (cond (all
+         (setq magit-repository-local-cache nil)
+         (setq magit--host-git-version-cache nil)
+         (setq magit-githook-directory nil)
+         (dolist (buffer (buffer-list))
+           (with-current-buffer buffer
+             (when (derived-mode-p 'magit-mode)
+               (setq magit-section-visibility-cache nil)))))
+        (t
+         (magit-with-toplevel
+           (setq magit-repository-local-cache
+                 (cl-delete default-directory
+                            magit-repository-local-cache
+                            :key #'car :test #'equal))
+           (setq magit--host-git-version-cache
+                 (cl-delete (file-remote-p default-directory)
+                            magit--host-git-version-cache
+                            :key #'car :test #'equal)))
+         (dolist (buffer (magit-mode-get-buffers))
+           (with-current-buffer buffer
+             (setq magit-section-visibility-cache nil))))))
+
+;;; Utilities
+
+(defun magit-toggle-verbose-refresh ()
+  "Toggle whether Magit refreshes buffers verbosely.
+Enabling this helps figuring out which sections are bottlenecks.
+The additional output can be found in the *Messages* buffer."
+  (interactive)
+  (setq magit-refresh-verbose (not magit-refresh-verbose))
+  (message "%s verbose refreshing"
+           (if magit-refresh-verbose "Enabled" "Disabled")))
+
+(defun magit-run-hook-with-benchmark (hook)
+  (cond
+    ((not hook))
+    (magit-refresh-verbose
+     (message "Running %s..." hook)
+     (message "Running %s...done (%.3fs)" hook
+              (benchmark-elapse
+                (run-hook-wrapped
+                 hook
+                 (lambda (fn)
+                   (message "  %-50s %f" fn (benchmark-elapse (funcall fn))))))))
+    ((run-hooks hook))))
+
+(defun magit-file-region-line-numbers ()
+  "Return the bounds of the region as line numbers.
+The returned value has the form (BEGINNING-LINE END-LINE).  If
+the region ends at the beginning of a line, do not include that
+line.  Avoid including the line after the end of the file."
+  (and (magit-buffer-file-name)
+       (region-active-p)
+       (not (= (region-beginning) (region-end) (1+ (buffer-size))))
+       (let ((beg (region-beginning))
+             (end (min (region-end) (buffer-size))))
+         (list (line-number-at-pos beg t)
+               (line-number-at-pos (if (= (magit--bol-position end) end)
+                                       (max beg (1- end))
+                                     end)
+                                   t)))))
+
+;;; _
+(provide 'magit-mode)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-mode.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-mode.elc
new file mode 100644
index 0000000..61ce4e2
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-notes.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-notes.el
new file mode 100644
index 0000000..b4f432d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-notes.el
@@ -0,0 +1,217 @@
+;;; magit-notes.el --- Notes support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for `git-notes'.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-notes "magit" nil t)
+(transient-define-prefix magit-notes ()
+  "Edit notes attached to commits."
+  :man-page "git-notes"
+  ["Configure local settings"
+   ("c" magit-core.notesRef)
+   ("d" magit-notes.displayRef)]
+  ["Configure global settings"
+   ("C" magit-global-core.notesRef)
+   ("D" magit-global-notes.displayRef)]
+  ["Arguments for prune"
+   :if-not magit-notes-merging-p
+   ("-n" "Dry run" ("-n" "--dry-run"))]
+  ["Arguments for edit and remove"
+   :if-not magit-notes-merging-p
+   (magit-notes:--ref)]
+  ["Arguments for merge"
+   :if-not magit-notes-merging-p
+   (magit-notes:--strategy)]
+  ["Actions"
+   :if-not magit-notes-merging-p
+   ("T" "Edit"         magit-notes-edit)
+   ("r" "Remove"       magit-notes-remove)
+   ("m" "Merge"        magit-notes-merge)
+   ("p" "Prune"        magit-notes-prune)]
+  ["Actions"
+   :if magit-notes-merging-p
+   ("c" "Commit merge" magit-notes-merge-commit)
+   ("a" "Abort merge"  magit-notes-merge-abort)])
+
+(defun magit-notes-merging-p ()
+  (let ((dir (expand-file-name "NOTES_MERGE_WORKTREE" (magit-gitdir))))
+    (and (file-directory-p dir)
+         (directory-files dir nil "\\`[^.]"))))
+
+(transient-define-infix magit-core.notesRef ()
+  :class 'magit--git-variable
+  :variable "core.notesRef"
+  :reader #'magit-notes-read-ref
+  :prompt "Set local core.notesRef")
+
+(transient-define-infix magit-notes.displayRef ()
+  :class 'magit--git-variable
+  :variable "notes.displayRef"
+  :multi-value t
+  :reader #'magit-notes-read-refs
+  :prompt "Set local notes.displayRef")
+
+(transient-define-infix magit-global-core.notesRef ()
+  :class 'magit--git-variable
+  :variable "core.notesRef"
+  :global t
+  :reader #'magit-notes-read-ref
+  :prompt "Set global core.notesRef")
+
+(transient-define-infix magit-global-notes.displayRef ()
+  :class 'magit--git-variable
+  :variable "notes.displayRef"
+  :global t
+  :multi-value t
+  :reader #'magit-notes-read-refs
+  :prompt "Set global notes.displayRef")
+
+(transient-define-argument magit-notes:--ref ()
+  :description "Manipulate ref"
+  :class 'transient-option
+  :key "-r"
+  :argument "--ref="
+  :reader #'magit-notes-read-ref)
+
+(transient-define-argument magit-notes:--strategy ()
+  :description "Merge strategy"
+  :class 'transient-option
+  :shortarg "-s"
+  :argument "--strategy="
+  :choices '("manual" "ours" "theirs" "union" "cat_sort_uniq"))
+
+(defun magit-notes-edit (commit &optional ref)
+  "Edit the note attached to COMMIT.
+REF is the notes ref used to store the notes.
+
+Interactively or when optional REF is nil use the value of Git
+variable `core.notesRef' or \"refs/notes/commits\" if that is
+undefined."
+  (interactive (magit-notes-read-args "Edit notes"))
+  (magit-run-git-with-editor "notes" (and ref (concat "--ref=" ref))
+                             "edit" commit))
+
+(defun magit-notes-remove (commit &optional ref)
+  "Remove the note attached to COMMIT.
+REF is the notes ref from which the note is removed.
+
+Interactively or when optional REF is nil use the value of Git
+variable `core.notesRef' or \"refs/notes/commits\" if that is
+undefined."
+  (interactive (magit-notes-read-args "Remove notes"))
+  (magit-run-git-with-editor "notes" (and ref (concat "--ref=" ref))
+                             "remove" commit))
+
+(defun magit-notes-merge (ref)
+  "Merge the notes ref REF into the current notes ref.
+
+The current notes ref is the value of Git variable
+`core.notesRef' or \"refs/notes/commits\" if that is undefined.
+
+When there are conflicts, then they have to be resolved in the
+temporary worktree \".git/NOTES_MERGE_WORKTREE\".  When
+done use `magit-notes-merge-commit' to finish.  To abort
+use `magit-notes-merge-abort'."
+  (interactive (list (magit-read-string-ns "Merge reference")))
+  (magit-run-git-with-editor "notes" "merge" ref))
+
+(defun magit-notes-merge-commit ()
+  "Commit the current notes ref merge.
+Also see `magit-notes-merge'."
+  (interactive)
+  (magit-run-git-with-editor "notes" "merge" "--commit"))
+
+(defun magit-notes-merge-abort ()
+  "Abort the current notes ref merge.
+Also see `magit-notes-merge'."
+  (interactive)
+  (magit-run-git-with-editor "notes" "merge" "--abort"))
+
+(defun magit-notes-prune (&optional dry-run)
+  "Remove notes about unreachable commits."
+  (interactive (list (and (member "--dry-run" (transient-args 'magit-notes)) t)))
+  (when dry-run
+    (magit-process-buffer))
+  (magit-run-git-with-editor "notes" "prune" (and dry-run "--dry-run")))
+
+;;; Readers
+
+(defun magit-notes-read-ref (prompt &optional _initial-input history)
+  (and-let ((ref (magit-completing-read
+                  prompt (magit-list-notes-refnames) nil t
+                  (and-let ((def (magit-get "core.notesRef")))
+                    (if (string-prefix-p "refs/notes/" def)
+                        (substring def 11)
+                      def))
+                  history)))
+    (if (string-prefix-p "refs/" ref)
+        ref
+      (concat "refs/notes/" ref))))
+
+(defun magit-notes-read-refs (prompt &optional _initial-input _history)
+  (mapcar (lambda (ref)
+            (if (string-prefix-p "refs/" ref)
+                ref
+              (concat "refs/notes/" ref)))
+          (completing-read-multiple
+           (concat prompt ": ")
+           (magit-list-notes-refnames) nil nil
+           (mapconcat (lambda (ref)
+                        (if (string-prefix-p "refs/notes/" ref)
+                            (substring ref 11)
+                          ref))
+                      (magit-get-all "notes.displayRef")
+                      ","))))
+
+(defun magit-notes-read-args (prompt)
+  (list (magit-read-branch-or-commit prompt (magit-stash-at-point))
+        (and-let ((str (seq-find (##string-match "^--ref=\\(.+\\)" %)
+                                 (transient-args 'magit-notes))))
+          (match-str 1 str))))
+
+;;; _
+(provide 'magit-notes)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-notes.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-notes.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-notes.elc
new file mode 100644
index 0000000..1d9e2be
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-notes.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-patch.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-patch.el
new file mode 100644
index 0000000..e08df1a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-patch.el
@@ -0,0 +1,349 @@
+;;; magit-patch.el --- Creating and applying patches  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements patch commands.
+
+;;; Code:
+
+(require 'magit)
+
+(declare-function message-goto-body "message" (&optional interactive))
+
+;;; Options
+
+(defcustom magit-patch-save-arguments '(exclude "--stat")
+  "Control arguments used by the command `magit-patch-save'.
+
+`magit-patch-save' (which see) saves a diff for the changes
+shown in the current buffer in a patch file.  It may use the
+same arguments as used in the buffer or a subset thereof, or
+a constant list of arguments, depending on this option and
+the prefix argument."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-diff
+  :type '(choice (const :tag "Use buffer arguments" buffer)
+                 (cons :tag "Use buffer arguments except"
+                       (const :format "" exclude)
+                       (repeat :format "%v%i\n"
+                               (string :tag "Argument")))
+                 (repeat :tag "Use constant arguments"
+                         (string :tag "Argument"))))
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-patch "magit-patch" nil t)
+(transient-define-prefix magit-patch ()
+  "Create or apply patches."
+  ["Actions"
+   [("c"  "Create patches"     magit-patch-create)
+    ("w"  "Apply patches"      magit-am)]
+   [("a"  "Apply plain patch"  magit-patch-apply)
+    ("s"  "Save diff as patch" magit-patch-save)]
+   [("r"  "Request pull"       magit-request-pull)]])
+
+;;;###autoload(autoload 'magit-patch-create "magit-patch" nil t)
+(transient-define-prefix magit-patch-create (range args files)
+  "Create patches for the commits in RANGE.
+When a single commit is given for RANGE, create a patch for the
+changes introduced by that commit (unlike 'git format-patch'
+which creates patches for all commits that are reachable from
+`HEAD' but not from the specified commit)."
+  :man-page "git-format-patch"
+  :incompatible '(("--subject-prefix=" "--rfc"))
+  ["Mail arguments"
+   (6 magit-format-patch:--in-reply-to)
+   (6 magit-format-patch:--thread)
+   (6 magit-format-patch:--from)
+   (6 magit-format-patch:--to)
+   (6 magit-format-patch:--cc)]
+  ["Patch arguments"
+   (magit-format-patch:--base)
+   (magit-format-patch:--reroll-count)
+   (5 magit-format-patch:--interdiff)
+   (magit-format-patch:--range-diff)
+   (magit-format-patch:--subject-prefix)
+   ("C-m r  " "RFC subject prefix" "--rfc")
+   ("C-m l  " "Add cover letter" "--cover-letter")
+   (5 magit-format-patch:--cover-from-description)
+   (5 magit-format-patch:--notes)
+   (magit-format-patch:--output-directory)]
+  ["Diff arguments"
+   (magit-diff:-U)
+   (magit-diff:-M)
+   (magit-diff:-C)
+   (magit-diff:--diff-algorithm)
+   (magit:--)
+   (7 "-b" "Ignore whitespace changes" ("-b" "--ignore-space-change"))
+   (7 "-w" "Ignore all whitespace"     ("-w" "--ignore-all-space"))]
+  ["Actions"
+   ("c" "Create patches" magit-patch-create)]
+  (interactive
+    (if (not (eq transient-current-command 'magit-patch-create))
+        (list nil nil nil)
+      (cons (cond-let
+              ([revs (magit-region-values 'commit)]
+               (if (length> revs 1)
+                   (concat (car (last revs)) "^.." (car revs))
+                 (format "%s^..%s" (car revs) (car revs))))
+              ([range (magit-read-range-or-commit
+                       "Create patches for range or commit")]
+               (if (string-search ".." range)
+                   range
+                 (format "%s^..%s" range range))))
+            (let ((args (transient-args 'magit-patch-create)))
+              (list (seq-filter #'stringp args)
+                    (cdr (assoc "--" args)))))))
+  (if (not range)
+      (transient-setup 'magit-patch-create)
+    (magit-run-git "format-patch" range args "--" files)
+    (when (member "--cover-letter" args)
+      (save-match-data
+        (find-file
+         (expand-file-name
+          (concat (and$ (transient-arg-value "--reroll-count=" args)
+                        (format "v%s-" $))
+                  "0000-cover-letter.patch")
+          (let ((topdir (magit-toplevel)))
+            (if-let ((dir (transient-arg-value "--output-directory=" args)))
+                (expand-file-name dir topdir)
+              topdir))))))))
+
+(transient-define-argument magit-format-patch:--in-reply-to ()
+  :description "In reply to"
+  :class 'transient-option
+  :key "C-m C-r"
+  :argument "--in-reply-to=")
+
+(transient-define-argument magit-format-patch:--thread ()
+  :description "Thread style"
+  :class 'transient-option
+  :key "C-m s  "
+  :argument "--thread="
+  :reader #'magit-format-patch-select-thread-style)
+
+(defun magit-format-patch-select-thread-style (&rest _ignore)
+  (magit-read-char-case "Thread style " t
+    (?d "[d]eep" "deep")
+    (?s "[s]hallow" "shallow")))
+
+(transient-define-argument magit-format-patch:--base ()
+  :description "Insert base commit"
+  :class 'transient-option
+  :key "C-m b  "
+  :argument "--base="
+  :reader #'magit-format-patch-select-base)
+
+(defun magit-format-patch-select-base (prompt initial-input history)
+  (magit-completing-read prompt (cons "auto" (magit-list-refnames))
+                         nil 'any initial-input history "auto"))
+
+(transient-define-argument magit-format-patch:--reroll-count ()
+  :description "Reroll count"
+  :class 'transient-option
+  :key "C-m v  "
+  :shortarg "-v"
+  :argument "--reroll-count="
+  :reader #'transient-read-number-N+)
+
+(transient-define-argument magit-format-patch:--interdiff ()
+  :description "Insert interdiff"
+  :class 'transient-option
+  :key "C-m d i"
+  :argument "--interdiff="
+  :reader #'magit-transient-read-revision)
+
+(transient-define-argument magit-format-patch:--range-diff ()
+  :description "Insert range-diff"
+  :class 'transient-option
+  :key "C-m d r"
+  :argument "--range-diff="
+  :reader #'magit-format-patch-select-range-diff)
+
+(defun magit-format-patch-select-range-diff (prompt _initial-input _history)
+  (magit-read-range-or-commit prompt))
+
+(transient-define-argument magit-format-patch:--subject-prefix ()
+  :description "Subject Prefix"
+  :class 'transient-option
+  :key "C-m p  "
+  :argument "--subject-prefix=")
+
+(transient-define-argument magit-format-patch:--cover-from-description ()
+  :description "Use branch description"
+  :class 'transient-option
+  :key "C-m D  "
+  :argument "--cover-from-description="
+  :reader #'magit-format-patch-select-description-mode)
+
+(defun magit-format-patch-select-description-mode (&rest _ignore)
+  (magit-read-char-case "Use description as " t
+    (?m "[m]essage" "message")
+    (?s "[s]ubject" "subject")
+    (?a "[a]uto"    "auto")
+    (?n "[n]othing" "none")))
+
+(transient-define-argument magit-format-patch:--notes ()
+  :description "Insert commentary from notes"
+  :class 'transient-option
+  :key "C-m n  "
+  :argument "--notes="
+  :reader #'magit-notes-read-ref)
+
+(transient-define-argument magit-format-patch:--from ()
+  :description "From"
+  :class 'transient-option
+  :key "C-m C-f"
+  :argument "--from="
+  :reader #'magit-transient-read-person)
+
+(transient-define-argument magit-format-patch:--to ()
+  :description "To"
+  :class 'transient-option
+  :key "C-m C-t"
+  :argument "--to="
+  :reader #'magit-transient-read-person)
+
+(transient-define-argument magit-format-patch:--cc ()
+  :description "CC"
+  :class 'transient-option
+  :key "C-m C-c"
+  :argument "--cc="
+  :reader #'magit-transient-read-person)
+
+(transient-define-argument magit-format-patch:--output-directory ()
+  :description "Output directory"
+  :class 'transient-option
+  :key "C-m o  "
+  :shortarg "-o"
+  :argument "--output-directory="
+  :reader #'transient-read-existing-directory)
+
+;;;###autoload(autoload 'magit-patch-apply "magit-patch" nil t)
+(transient-define-prefix magit-patch-apply (file &rest args)
+  "Apply the patch file FILE."
+  :man-page "git-apply"
+  ["Arguments"
+   ("-i" "Also apply to index" "--index")
+   ("-c" "Only apply to index" "--cached")
+   ("-3" "Fall back on 3way merge" ("-3" "--3way"))]
+  ["Actions"
+   ("a"  "Apply patch" magit-patch-apply)]
+  (interactive
+    (if (not (eq transient-current-command 'magit-patch-apply))
+        (list nil)
+      (list (expand-file-name
+             (read-file-name "Apply patch: "
+                             default-directory nil nil
+                             (and$ (magit-file-at-point)
+                                   (file-relative-name $))))
+            (transient-args 'magit-patch-apply))))
+  (if (not file)
+      (transient-setup 'magit-patch-apply)
+    (magit-run-git "apply" args "--" (magit-convert-filename-for-git file))))
+
+;;;###autoload
+(defun magit-patch-save (file &optional arg)
+  "Write current diff into patch FILE.
+
+What arguments are used to create the patch depends on the value
+of `magit-patch-save-arguments' and whether a prefix argument is
+used.
+
+If the value is the symbol `buffer', then use the same arguments
+as the buffer.  With a prefix argument use no arguments.
+
+If the value is a list beginning with the symbol `exclude', then
+use the same arguments as the buffer except for those matched by
+entries in the cdr of the list.  The comparison is done using
+`string-prefix-p'.  With a prefix argument use the same arguments
+as the buffer.
+
+If the value is a list of strings (including the empty list),
+then use those arguments.  With a prefix argument use the same
+arguments as the buffer.
+
+Of course the arguments that are required to actually show the
+same differences as those shown in the buffer are always used."
+  (interactive (list (read-file-name "Write patch file: " default-directory)
+                     current-prefix-arg))
+  (unless (derived-mode-p 'magit-diff-mode)
+    (user-error "Only diff buffers can be saved as patches"))
+  (let ((rev     magit-buffer-diff-range)
+        (typearg magit-buffer-diff-typearg)
+        (args    magit-buffer-diff-args)
+        (files   magit-buffer-diff-files))
+    (cond ((eq magit-patch-save-arguments 'buffer)
+           (when arg
+             (setq args nil)))
+          ((eq (car-safe magit-patch-save-arguments) 'exclude)
+           (unless arg
+             (setq args
+                   (cl-set-difference args (cdr magit-patch-save-arguments)
+                                      :test #'equal))))
+          ((not arg)
+           (setq args magit-patch-save-arguments)))
+    (with-temp-file file
+      (magit-git-insert "diff" rev "-p" typearg args "--" files)))
+  (magit-refresh))
+
+;;;###autoload
+(defun magit-request-pull (url start end)
+  "Request upstream to pull from your public repository.
+
+URL is the url of your publicly accessible repository.
+START is a commit that already is in the upstream repository.
+END is the last commit, usually a branch name, which upstream
+is asked to pull.  START has to be reachable from that commit."
+  (interactive
+    (list (magit-get "remote" (magit-read-remote "Remote") "url")
+          (magit-read-branch-or-commit "Start" (magit-get-upstream-branch))
+          (magit-read-branch-or-commit "End")))
+  (require 'message)
+  (let ((dir default-directory))
+    ;; mu4e changes default-directory
+    (compose-mail)
+    (setq default-directory dir))
+  (message-goto-body)
+  (magit-git-insert "request-pull" start url end)
+  (set-buffer-modified-p nil))
+
+;;; _
+(provide 'magit-patch)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-patch.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-patch.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-patch.elc
new file mode 100644
index 0000000..85f20ab
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-patch.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-pkg.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-pkg.el
new file mode 100644
index 0000000..fc2c792
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-pkg.el
@@ -0,0 +1,19 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "magit" "20260822.1158"
+  "A Git porcelain inside Emacs."
+  '((emacs         "28.1")
+    (compat        "31.0")
+    (cond-let      "1.1")
+    (llama         "1.0")
+    (magit-section "4.7")
+    (seq           "2.24")
+    (transient     "0.13")
+    (with-editor   "3.5"))
+  :url "https://github.com/magit/magit"
+  :commit "137f137dccb37097ae9caa31018cafa071ff4ec1"
+  :revdesc "137f137dccb3"
+  :keywords '("git" "tools" "vc")
+  :authors '(("Marius Vollmer" . "marius.vollmer@gmail.com")
+             ("Jonas Bernoulli" . "emacs.magit@jonas.bernoulli.dev"))
+  :maintainers '(("Jonas Bernoulli" . "emacs.magit@jonas.bernoulli.dev")
+                 ("Kyle Meyer" . "kyle@kyleam.com")))
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-process.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-process.el
new file mode 100644
index 0000000..475289a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-process.el
@@ -0,0 +1,1384 @@
+;;; magit-process.el --- Process functionality  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements the tools used to run Git for side-effects.
+
+;; Note that the functions used to run Git and then consume its
+;; output, are defined in `magit-git.el'.  There's a bit of overlap
+;; though.
+
+;;; Code:
+
+(require 'magit-base)
+(require 'magit-git)
+(require 'magit-mode)
+
+(require 'ansi-color)
+(require 'auth-source)
+(require 'with-editor)
+
+(defvar messages-buffer-name)
+(defvar y-or-n-p-map)
+
+(define-obsolete-variable-alias 'magit-process-finish-apply-ansi-colors
+  'magit-process-apply-ansi-colors "Magit-Section 4.3.2")
+
+(defclass magit-process-section (magit-section)
+  ((process :initform nil)))
+
+;;; Options
+
+(defcustom magit-process-connection-type (not (eq system-type 'cygwin))
+  "Connection type used for the Git process.
+
+If nil, use pipes: this is usually more efficient, and works on Cygwin.
+If t, use ptys: this enables Magit to prompt for passphrases when needed."
+  :group 'magit-process
+  :type '(choice (const :tag "Pipe" nil)
+                 (const :tag "Pty" t)))
+
+(defcustom magit-need-cygwin-noglob
+  (and (eq system-type 'windows-nt)
+       (with-temp-buffer
+         (let ((process-environment
+                (append magit-git-environment process-environment)))
+           (condition-case e
+               (process-file magit-git-executable
+                             nil (current-buffer) nil
+                             "-c" "alias.echo=!echo" "echo" "x{0}")
+             (file-error
+              (lwarn 'magit-process :warning
+                     "Could not run Git: %S" e))))
+         (equal "x0\n" (buffer-string))))
+  "Whether to use a workaround for Cygwin's globbing behavior.
+
+If non-nil, add environment variables to `process-environment' to
+prevent the git.exe distributed by Cygwin and MSYS2 from
+attempting to perform glob expansion when called from a native
+Windows build of Emacs.  See #2246."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-process
+  :type '(choice (const :tag "Yes" t)
+                 (const :tag "No" nil)))
+
+(defcustom magit-process-popup-time -1
+  "Popup the process buffer if a command takes longer than this many seconds."
+  :group 'magit-process
+  :type '(choice (const :tag "Never" -1)
+                 (const :tag "Immediately" 0)
+                 (integer :tag "After this many seconds")))
+
+(defcustom magit-process-log-max 32
+  "Maximum number of sections to keep in a process log buffer.
+When adding a new section would go beyond the limit set here,
+then the older half of the sections are remove.  Sections that
+belong to processes that are still running are never removed.
+When this is nil, no sections are ever removed."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-process
+  :type '(choice (const :tag "Never remove old sections" nil) integer))
+
+(defcustom magit-process-error-tooltip-max-lines 20
+  "The number of lines for `magit-process-error-lines' to return.
+
+These are displayed in a tooltip for `mode-line-process' errors.
+
+If `magit-process-error-tooltip-max-lines' is nil, the tooltip
+displays the text of `magit-process-error-summary' instead."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-process
+  :type '(choice (const :tag "Use summary line" nil)
+                 integer))
+
+(defcustom magit-credential-cache-daemon-socket
+  (seq-some (lambda (line)
+              (pcase-let ((`(,prog . ,args) (split-string line)))
+                (and prog
+                     (string-match-p
+                      "\\`\\(?:\\(?:/.*/\\)?git-credential-\\)?cache\\'" prog)
+                     (or (cadr (member "--socket" args))
+                         (expand-file-name "~/.git-credential-cache/socket")))))
+            (magit--early-process-lines
+             magit-git-executable "config" "--get-all" "credential.helper"))
+  "If non-nil, start a credential cache daemon using this socket.
+
+When using Git's cache credential helper in the normal way, Emacs
+sends a SIGHUP to the credential daemon after the git subprocess
+has exited, causing the daemon to also quit.  This can be avoided
+by starting the `git-credential-cache--daemon' process directly
+from Emacs.
+
+The function `magit-maybe-start-credential-cache-daemon' takes
+care of starting the daemon if necessary, using the value of this
+option as the socket.  If this option is nil, then it does not
+start any daemon.  Likewise if another daemon is already running,
+then it starts no new daemon.  This function has to be a member
+of the hook variable `magit-credential-hook' for this to work.
+If an error occurs while starting the daemon, most likely because
+the necessary executable is missing, then the function removes
+itself from the hook, to avoid further futile attempts."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-process
+  :type '(choice (file  :tag "Socket")
+                 (const :tag "Don't start a cache daemon" nil)))
+
+(defcustom magit-process-yes-or-no-prompt-regexp
+  (eval-when-compile
+    (concat " [([]"
+            "\\([Yy]\\(?:es\\)?\\)"
+            "[/|]"
+            "\\([Nn]o?\\)"
+            ;; OpenSSH v8 prints this.  See #3969.
+            "\\(?:/\\[fingerprint\\]\\)?"
+            "[])] ?[?:]? ?$"))
+  "Regexp matching Yes-or-No prompts of Git and its subprocesses."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-process
+  :type 'regexp)
+
+(defcustom magit-process-password-prompt-regexps
+  ;; See also history in test `magit-process:password-prompt-regexps'.
+  '(;; * CLI-prompt for passphrase for key:
+    "^\\(\\(Please e\\|E\\)nter \\(the \\)?p\\|P\\)assphrase.*: ?$"
+    ;; * Password for something other than a host:
+    "^\\(\\(Please e\\|E\\)nter \\(the \\)?p\\|P\\)assword: ?$"
+    ;; * Password for [user@]host (which we put in match group 99):
+    "^\\(\\(Please e\\|E\\)nter \\(the \\)?p\\|P\\)assword for \
+[\"']?\\(https?://\\)?\\(?99:[^\"']+\\)[\"']?: ?$"
+    "^(\\(?1:[^) ]+\\)) Password for \\(?99:\\1\\): ?$" ;#4992
+    "^\\(?99:[^']+\\)\\('s\\)? password: ?$"
+    ;; * Token for git-credential-manager-core (#4318):
+    "^Token: ?$"
+    ;; * Secret for card:
+    "^Yubikey for .*: ?$"
+    "^Enter PIN for .*: ?$"
+    ;; * Unanchored TUI-prompt for passphrase for key:
+    "Please enter the passphrase for the ssh key"
+    "Please enter the passphrase to unlock the OpenPGP secret key")
+  "List of regexps matching password prompts of Git and its subprocesses.
+Also see `magit-process-find-password-functions'."
+  :package-version '(magit . "4.3.0")
+  :group 'magit-process
+  :type '(repeat (regexp)))
+
+(defcustom magit-process-find-password-functions nil
+  "List of functions to try in sequence to get a password.
+
+These functions may be called when git asks for a password, which
+is detected using `magit-process-password-prompt-regexps'.  They
+are called if and only if matching the prompt resulted in the
+value of the 99th submatch to be non-nil.  Therefore users can
+control for which prompts these functions should be called by
+putting the host name in the 99th submatch, or not.
+
+If the functions are called, then they are called in the order
+given, with the host name as only argument, until one of them
+returns non-nil.  If they are not called or none of them returns
+non-nil, then the password is read from the user instead."
+  :package-version '(magit . "2.3.0")
+  :group 'magit-process
+  :type 'hook
+  :options (list #'magit-process-password-auth-source))
+
+(defcustom magit-process-username-prompt-regexps
+  '("^Username for '.*': ?$")
+  "List of regexps matching username prompts of Git and its subprocesses."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-process
+  :type '(repeat (regexp)))
+
+(defcustom magit-process-prompt-functions nil
+  "List of functions used to forward arbitrary questions to the user.
+
+Magit has dedicated support for forwarding username and password
+prompts and Yes-or-No questions asked by Git and its subprocesses
+to the user.  This can be customized using other options in the
+`magit-process' customization group.
+
+If you encounter a new question that isn't handled by default,
+then those options should be used instead of this hook.
+
+However subprocesses may also ask questions that differ too much
+from what the code related to the above options assume, and this
+hook allows users to deal with such questions explicitly.
+
+Each function is called with the process and the output string
+as arguments until one of the functions returns non-nil.  The
+function is responsible for asking the user the appropriate
+question using, e.g., `read-char-choice' and then forwarding the
+answer to the process using `process-send-string'.
+
+While functions such as `magit-process-yes-or-no-prompt' may not
+be sufficient to handle some prompt, it may still be of benefit
+to look at the implementations to gain some insights on how to
+implement such functions."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-process
+  :type 'hook)
+
+(defcustom magit-process-ensure-unix-line-ending t
+  "Whether Magit should ensure a unix coding system when talking to Git."
+  :package-version '(magit . "2.6.0")
+  :group 'magit-process
+  :type 'boolean)
+
+(defcustom magit-process-display-mode-line-error t
+  "Whether Magit should retain and highlight process errors in the mode line.
+
+See `magit-show-process-buffer-hint' for another way to display the
+complete output on demand."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-process
+  :type 'boolean)
+
+(defcustom magit-show-process-buffer-hint t
+  "Whether to append hint about process buffer to Git error messages.
+
+When Magit runs Git for side-effects, the output is always logged to
+a per-repository process buffer.  If Git exits with a non-zero status,
+then a single line of its error output is shown in the repositories
+status buffer and in the echo area.
+
+When a user want to learn more about the error, they can switch to that
+process buffer, to see the complete output, but initially users are not
+aware of this, so Magit appends a usage hint to the error message in
+both of these places.
+
+Once you are aware of this, you probably won't need the reminder and can
+set this option to nil.
+
+See `magit-process-display-mode-line-error' for another way to display
+the complete output on demand."
+  :package-version '(magit . "4.3.7")
+  :group 'magit-process
+  :type 'boolean)
+
+(defcustom magit-process-apply-ansi-colors nil
+  "Whether and when to apply color escapes in the process buffer.
+
+Magit instructs Git to not colorize its output, but third-party Git
+hooks may do so anyway.  We recommend you figure out how to prevent
+such hooks from colorizing their output instead of customizing this
+option.
+
+If `nil' (the default), do not apply color escape sequences.  If `t',
+apply them once the subprocess has finished.  If `filter', apply them
+as input arrives (which is more expensive and potentially fragile).
+This is a footgun; starter-kits should leave this option untouched."
+  :package-version '(magit . "4.3.2")
+  :group 'magit-process
+  :type '(choice (const :tag "Do not apply" nil)
+                 (const :tag "Apply when subprocess has finished" t)
+                 (const :tag "Apply using process filter" filter)))
+
+(defcustom magit-process-timestamp-format nil
+  "Format of timestamp for each process in the process buffer.
+If non-nil, pass this to `format-time-string' when creating a
+process section in the process buffer, and insert the returned
+string in the heading of its section."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-process
+  :type '(choice (const :tag "None" nil) string))
+
+(defvar tramp-pipe-stty-settings)
+(defvar magit-tramp-pipe-stty-settings ""
+  "Override `tramp-pipe-stty-settings' in `magit-start-process'.
+
+The default for that Tramp variable is \"-icanon min 1 time 0\",
+which causes staging of individual hunks to hang.  Using \"\"
+prevents that, but apparently has other issues, which is why it
+isn't the default.
+
+This variable defaults to \"\" and is used to override the Tramp
+variable in `magit-start-process'.  This only has an effect when
+using Tramp 2.6.2 or greater.  This can also be set to `pty', in
+which case a pty is used instead of a pipe.  That also prevents
+the hanging, but doesn't work for files with DOS line endings
+\(see #20).
+
+For connections that have `tramp-direct-async-process' enabled,
+staging hunks hangs, unless this variable is set to `pty' (see
+#5220).
+
+To fall back to the value of `tramp-pipe-stty-settings', set this
+variable to nil.
+
+Also see https://github.com/magit/magit/issues/4720
+and https://debbugs.gnu.org/cgi/bugreport.cgi?bug=62093.")
+
+(defface magit-process-ok
+  '((t :inherit magit-section-heading :foreground "green"))
+  "Face for zero exit-status."
+  :group 'magit-faces)
+
+(defface magit-process-ng
+  '((t :inherit magit-section-heading :foreground "red"))
+  "Face for non-zero exit-status."
+  :group 'magit-faces)
+
+(defface magit-mode-line-process
+  '((t :inherit mode-line-emphasis))
+  "Face for `mode-line-process' status when Git is running for side-effects."
+  :group 'magit-faces)
+
+(defface magit-mode-line-process-error
+  '((t :inherit error))
+  "Face for `mode-line-process' error status.
+
+Used when `magit-process-display-mode-line-error' is non-nil."
+  :group 'magit-faces)
+
+;;; Process Mode
+
+(defvar-keymap magit-process-mode-map
+  :doc "Keymap for `magit-process-mode'."
+  :parent magit-mode-map
+  "<remap> <magit-refresh>"      #'undefined
+  "<remap> <magit-delete-thing>" #'magit-process-kill)
+
+(define-derived-mode magit-process-mode magit-mode "Magit Process"
+  "Mode for looking at Git process output."
+  :interactive nil
+  :group 'magit-process
+  (magit-hack-dir-local-variables)
+  (setq magit--imenu-item-types 'process))
+
+(defun magit-process-buffer (&optional nodisplay)
+  "Display the current repository's process buffer.
+
+If that buffer doesn't exist yet, then create it.
+Non-interactively return the buffer and unless
+optional NODISPLAY is non-nil also display it."
+  (interactive)
+  (let ((topdir (magit-toplevel)))
+    (unless topdir
+      (magit--with-safe-default-directory nil
+        (setq topdir default-directory)
+        (let (prev)
+          (while (not (equal topdir prev))
+            (setq prev topdir)
+            (setq topdir (file-name-directory (directory-file-name topdir)))))))
+    (let ((buffer (or (seq-find (##with-current-buffer %
+                                  (and (eq major-mode 'magit-process-mode)
+                                       (equal default-directory topdir)))
+                                (buffer-list))
+                      (magit-generate-new-buffer 'magit-process-mode
+                                                 nil topdir))))
+      (with-current-buffer buffer
+        (if magit-root-section
+            (when magit-process-log-max
+              (magit-process-truncate-log))
+          (magit-process-mode)
+          (let ((inhibit-read-only t)
+                (magit-insert-section--parent  nil)
+                (magit-insert-section--oldroot nil))
+            (make-local-variable 'text-property-default-nonsticky)
+            (magit-insert-section (processbuf)
+              (insert "\n")))))
+      (unless nodisplay
+        (magit-display-buffer buffer))
+      buffer)))
+
+(defun magit-process-kill ()
+  "Interrupt or kill the process at point.
+First try to interrupt the process.  If that fails a second
+invocation instead kill the process."
+  (interactive)
+  (cond-let
+    [[process (magit-section-value-if 'process)]]
+    ((not process)
+     (message "No process at point"))
+    ((not (eq (process-status process) 'run))
+     (message "Process no longer running"))
+    ((not (eq (process-get process 'sigint) t))
+     (magit-confirm 'kill-process)
+     (process-put process 'sigint t)
+     (interrupt-process process))
+    ((kill-process process))))
+
+;;; Synchronous Processes
+
+(defvar magit-process-raise-error nil)
+
+(defvar magit-process-record-invocations nil)
+(defvar magit-process-record-buffer-name " *magit-process-file record*")
+(defvar magit-process-record-entry-format "%T %%d $ %%a")
+
+(defun magit-toggle-subprocess-record ()
+  "Toggle whether subprocess invocations are recorded.
+
+When enabled, all subprocesses started by `magit-process-file' are
+logged into the buffer specified by `magit-process-record-buffer-name'
+using the format `magit-process-record-entry-format'.  This is for
+debugging purposes.
+
+This is in addition to and distinct from the default logging done by
+default, and additional logging enabled with ~magit-toggle-git-debug~.
+
+For alternatives, see info node `(magit)Debugging Tools'."
+  (interactive)
+  (setq magit-process-record-invocations (not magit-process-record-invocations))
+  (message "Recording of subprocess invocations %s"
+           (if magit-process-record-invocations "enabled" "disabled")))
+
+(defun magit-git (&rest args)
+  "Call Git synchronously in a separate process, for side-effects.
+
+Option `magit-git-executable' specifies the Git executable.
+The arguments ARGS specify arguments to Git, they are flattened
+before use.
+
+Process output goes into a new section in the buffer returned by
+`magit-process-buffer'.  If Git exits with a non-zero status,
+then raise an error."
+  (let ((magit-process-raise-error t))
+    (magit-call-git args)))
+
+(defun magit-run-git (&rest args)
+  "Call Git synchronously in a separate process, and refresh.
+
+Function `magit-git-executable' specifies the Git executable and
+option `magit-git-global-arguments' specifies constant arguments.
+The arguments ARGS specify arguments to Git, they are flattened
+before use.
+
+After Git returns, the current buffer (if it is a Magit buffer)
+as well as the current repository's status buffer are refreshed.
+
+Process output goes into a new section in the buffer returned by
+`magit-process-buffer'.  Return the exit code."
+  (let ((magit--refresh-cache (list (cons 0 0))))
+    (prog1 (magit-call-git args)
+      (when (member (car args) '("init" "clone"))
+        ;; Creating a new repository invalidates the cache.
+        (setq magit--refresh-cache nil))
+      (magit-refresh))))
+
+(defvar magit-pre-call-git-hook (list #'magit-maybe-save-repository-buffers))
+
+(defun magit-call-git (&rest args)
+  "Call Git synchronously in a separate process.
+
+Function `magit-git-executable' specifies the Git executable and
+option `magit-git-global-arguments' specifies constant arguments.
+The arguments ARGS specify arguments to Git, they are flattened
+before use.
+
+Process output goes into a new section in the buffer returned by
+`magit-process-buffer'.  Return the exit code."
+  (run-hooks 'magit-pre-call-git-hook)
+  (let ((default-process-coding-system (magit--process-coding-system)))
+    (apply #'magit-call-process
+           (magit-git-executable)
+           (magit-process-git-arguments args))))
+
+(defun magit-call-process (program &rest args)
+  "Call PROGRAM synchronously in a separate process.
+Process output goes into a new section in the buffer returned by
+`magit-process-buffer'.  Return the exit code."
+  (pcase-let ((`(,process-buf . ,section)
+               (magit-process-setup program args)))
+    (magit-process-finish
+     (let ((inhibit-read-only t))
+       (apply #'magit-process-file program nil process-buf nil args))
+     process-buf (current-buffer) default-directory section)))
+
+(defun magit-process-git (destination &rest args)
+  "Call Git synchronously in a separate process, returning its exit code.
+DESTINATION specifies how to handle the output, like for
+`call-process', except that file handlers are supported.
+Enable Cygwin's \"noglob\" option during the call and
+ensure unix eol conversion."
+  (apply #'magit-process-file
+         (magit-git-executable)
+         nil destination nil
+         (magit-process-git-arguments args)))
+
+(defun magit-process-file (process &optional infile buffer display &rest args)
+  "Process files synchronously in a separate process.
+Return the exit code.  Similar to `process-file' but temporarily
+enable Cygwin's \"noglob\" option during the call and ensure unix
+eol conversion."
+  (when magit-process-record-invocations
+    (let ((messages-buffer-name magit-process-record-buffer-name)
+          (inhibit-message t))
+      (message
+       "%s" (format-spec
+             (format-time-string magit-process-record-entry-format)
+             `((?d . ,(abbreviate-file-name default-directory))
+               (?a . ,(magit-process--format-arguments process args)))))))
+  (let ((process-environment (magit-process-environment))
+        (default-process-coding-system (magit--process-coding-system)))
+    (apply #'process-file process infile buffer display args)))
+
+(defun magit-process-environment ()
+  (cond
+    ((file-remote-p default-directory)
+     `(,@magit-git-environment
+       ,@process-environment))
+    (`(,@magit-git-environment
+       ,@(and magit-githook-directory
+              (not (file-remote-p default-directory))
+              (list (format "PATH=%s:%s"
+                            magit-githook-directory
+                            (getenv "PATH"))))
+       ;; The various w32 hacks are only applicable when running on the
+       ;; local machine.  A local binding of process-environment different
+       ;; from the top-level value affects the environment used by Tramp.
+       ,@(cdr (assoc magit-git-executable magit--git-w32-path-hack))
+       ,@(and magit-need-cygwin-noglob
+              (mapcar (lambda (var)
+                        (concat var "=" (if-let ((val (getenv var)))
+                                            (concat val " noglob")
+                                          "noglob")))
+                      '("CYGWIN" "MSYS")))
+       ,@process-environment))))
+
+(defvar magit-this-process nil)
+
+(defun magit-run-git-with-input (&rest args)
+  "Call Git in a separate process.
+ARGS is flattened and then used as arguments to Git.
+
+The current buffer's content is used as the process's standard
+input.  The buffer is assumed to be temporary and thus OK to
+modify.  Return the exit code.
+
+Function `magit-git-executable' specifies the Git executable and
+option `magit-git-global-arguments' specifies constant arguments.
+The remaining arguments ARGS specify arguments to Git, they are
+flattened before use."
+  (when (eq system-type 'windows-nt)
+    ;; On w32, git expects UTF-8 encoded input, ignore any user
+    ;; configuration telling us otherwise (see #3250).
+    (encode-coding-region (point-min) (point-max) 'utf-8-unix))
+  (cond
+    ((file-remote-p default-directory)
+     ;; We lack `process-file-region', so fall back to asynch +
+     ;; waiting in remote case.
+     (magit-start-git (current-buffer) args)
+     (while (and magit-this-process
+                 (eq (process-status magit-this-process) 'run))
+       (sleep-for 0.005)))
+    (t
+     (run-hooks 'magit-pre-call-git-hook)
+     (pcase-let* ((process-environment (magit-process-environment))
+                  (default-process-coding-system (magit--process-coding-system))
+                  (flat-args (magit-process-git-arguments args t))
+                  (`(,process-buf . ,section)
+                   (magit-process-setup (magit-git-executable) flat-args))
+                  (inhibit-read-only t))
+       (magit-process-finish
+        (apply #'call-process-region (point-min) (point-max)
+               (magit-git-executable) nil process-buf nil flat-args)
+        process-buf nil default-directory section)))))
+
+;;; Asynchronous Processes
+
+(defun magit-run-git-async (&rest args)
+  "Start Git, prepare for refresh, and return the process object.
+ARGS is flattened and then used as arguments to Git.
+
+Display the command line arguments in the echo area.
+
+After Git returns some buffers are refreshed: the buffer that was
+current when this function was called (if it is a Magit buffer
+and still alive), as well as the respective Magit status buffer.
+
+See `magit-start-process' for more information."
+  (magit-msg "Running %s %s" (magit-git-executable)
+             (let ((m (string-join (flatten-tree args) " ")))
+               (remove-list-of-text-properties 0 (length m) '(face) m)
+               m))
+  (with-editor* "MAGIT_HOOK_EDITOR"
+    (magit-start-git nil args)))
+
+(defun magit-run-git-with-editor (&rest args)
+  "Export GIT_EDITOR and start Git.
+Also prepare for refresh and return the process object.
+ARGS is flattened and then used as arguments to Git.
+
+Display the command line arguments in the echo area.
+
+After Git returns some buffers are refreshed: the buffer that was
+current when this function was called (if it is a Magit buffer
+and still alive), as well as the respective Magit status buffer.
+
+See `magit-start-process' and `with-editor' for more information."
+  (magit-msg "Running %s %s" (magit-git-executable)
+             (let ((m (string-join (flatten-tree args) " ")))
+               (remove-list-of-text-properties 0 (length m) '(face) m)
+               m))
+  (magit--record-separated-gitdir)
+  (with-editor* "MAGIT_HOOK_EDITOR"
+    (with-environment-variables
+        ((magit-with-editor-envvar (getenv "MAGIT_HOOK_EDITOR")))
+      (let ((magit-process-popup-time -1))
+        (magit-start-git nil args)))))
+
+(defun magit-run-git-sequencer (&rest args)
+  "Export GIT_EDITOR and start Git.
+Also prepare for refresh and return the process object.
+ARGS is flattened and then used as arguments to Git.
+
+Display the command line arguments in the echo area.
+
+After Git returns some buffers are refreshed: the buffer that was
+current when this function was called (if it is a Magit buffer
+and still alive), as well as the respective Magit status buffer.
+If the sequence stops at a commit, make the section representing
+that commit the current section by moving `point' there.
+
+See `magit-start-process' and `with-editor' for more information."
+  (apply #'magit-run-git-with-editor args)
+  (set-process-sentinel magit-this-process #'magit-sequencer-process-sentinel)
+  magit-this-process)
+
+(defvar magit-pre-start-git-hook (list #'magit-maybe-save-repository-buffers))
+
+(defun magit-start-git (input &rest args)
+  "Start Git, prepare for refresh, and return the process object.
+
+If INPUT is non-nil, it has to be a buffer or the name of an
+existing buffer.  The buffer content becomes the processes
+standard input.
+
+Function `magit-git-executable' specifies the Git executable and
+option `magit-git-global-arguments' specifies constant arguments.
+The remaining arguments ARGS specify arguments to Git, they are
+flattened before use.
+
+After Git returns some buffers are refreshed: the buffer that was
+current when this function was called (if it is a Magit buffer
+and still alive), as well as the respective Magit status buffer.
+
+See `magit-start-process' for more information."
+  (run-hooks 'magit-pre-start-git-hook)
+  (let ((default-process-coding-system (magit--process-coding-system)))
+    (apply #'magit-start-process (magit-git-executable) input
+           (magit-process-git-arguments args t))))
+
+(defun magit-start-process (program &optional input &rest args)
+  "Start PROGRAM, prepare for refresh, and return the process object.
+
+If optional argument INPUT is non-nil, it has to be a buffer or
+the name of an existing buffer.  The buffer content becomes the
+processes standard input.
+
+The process is started using `start-file-process' and then setup
+to use the sentinel `magit-process-sentinel' and the filter
+`magit-process-filter'.  Information required by these functions
+is stored in the process object.  When this function returns the
+process has not started to run yet so it is possible to override
+the sentinel and filter.
+
+After the process returns, `magit-process-sentinel' refreshes the
+buffer that was current when `magit-start-process' was called (if
+it is a Magit buffer and still alive), as well as the respective
+Magit status buffer."
+  (pcase-let*
+      ((`(,process-buf . ,section)
+        (magit-process-setup program args))
+       (process
+        (let ((process-connection-type ;t=pty nil=pipe
+               (or
+                ;; With Tramp, maybe force use a pty.  #4720
+                (and (file-remote-p default-directory)
+                     (eq magit-tramp-pipe-stty-settings 'pty))
+                ;; Without input, don't use a pty, because it would
+                ;; set icrnl, which would modify the input.  #20
+                (and (not input) magit-process-connection-type)))
+              (tramp-pipe-stty-settings
+               (or (and (not (eq magit-tramp-pipe-stty-settings 'pty))
+                        ;; Defaults to "", to allow staging hunks over
+                        ;; Tramp again.  #4720
+                        magit-tramp-pipe-stty-settings)
+                   (bound-and-true-p tramp-pipe-stty-settings)))
+              (process-environment (magit-process-environment))
+              (default-process-coding-system (magit--process-coding-system)))
+          (apply #'start-file-process
+                 (file-name-nondirectory program)
+                 process-buf program args))))
+    (with-editor-set-process-filter process #'magit-process-filter)
+    (set-process-sentinel process #'magit-process-sentinel)
+    (set-process-buffer   process process-buf)
+    (when (eq system-type 'windows-nt)
+      ;; On w32, git expects UTF-8 encoded input, ignore any user
+      ;; configuration telling us otherwise.
+      (set-process-coding-system process nil 'utf-8-unix))
+    (process-put process 'section section)
+    (process-put process 'command-buf (current-buffer))
+    (process-put process 'default-dir default-directory)
+    (when magit-inhibit-refresh
+      (process-put process 'inhibit-refresh t))
+    (oset section process process)
+    (with-current-buffer process-buf
+      (set-marker (process-mark process) (point)))
+    (when input
+      (with-current-buffer input
+        (process-send-region process (point-min) (point-max))
+        ;; `process-send-eof' appears to be broken over
+        ;;  Tramp from Windows. See #3624 and bug#43226.
+        (if (and (eq system-type 'windows-nt)
+                 (file-remote-p (process-get process 'default-dir) nil t))
+            (process-send-string process "")
+          (process-send-eof process))))
+    (setq magit-this-process process)
+    (oset section value process)
+    (magit-process-display-buffer process)
+    process))
+
+(defun magit-parse-git-async (&rest args)
+  (setq args (magit-process-git-arguments args t))
+  (let ((command-buf (current-buffer))
+        (stdout-buf (generate-new-buffer " *git-stdout*"))
+        (stderr-buf (generate-new-buffer " *git-stderr*"))
+        (toplevel (magit-toplevel)))
+    (with-current-buffer stdout-buf
+      (setq default-directory toplevel)
+      (let ((process
+             (let ((process-environment (magit-process-environment)))
+               (make-process :name "git"
+                             :buffer stdout-buf
+                             :stderr stderr-buf
+                             :command (cons (magit-git-executable) args)
+                             :coding (magit--process-coding-system)
+                             :file-handler t))))
+        (process-put process 'command-buf command-buf)
+        (process-put process 'stderr-buf stderr-buf)
+        (process-put process 'parsed (point))
+        (setq magit-this-process process)
+        process))))
+
+;;; Process Internals
+
+(setf (alist-get 'process magit--section-type-alist) 'magit-process-section)
+
+(defun magit-process-setup (program args)
+  (magit-process-set-mode-line program args)
+  (let ((pwd default-directory)
+        (buf (magit-process-buffer t)))
+    (cons buf (with-current-buffer buf
+                (prog1 (magit-process-insert-section pwd program args nil nil)
+                  (backward-char 1))))))
+
+(defun magit-process-insert-section
+    (pwd program args &optional errcode errlog face)
+  (let ((inhibit-read-only t)
+        (magit-insert-section--current nil)
+        (magit-insert-section--parent magit-root-section)
+        (magit-insert-section--oldroot nil))
+    (goto-char (1- (point-max)))
+    (magit-insert-section (process)
+      (insert (if errcode
+                  (format "%3s " (propertize (number-to-string errcode)
+                                             'font-lock-face 'magit-process-ng))
+                "run "))
+      (when magit-process-timestamp-format
+        (insert (format-time-string magit-process-timestamp-format) " "))
+      (let ((cmd (concat
+                  (and (not (equal
+                             (file-name-as-directory (expand-file-name pwd))
+                             (file-name-as-directory (expand-file-name
+                                                      default-directory))))
+                       (concat (file-relative-name pwd default-directory) " "))
+                  (magit-process--format-arguments program args))))
+        (magit-insert-heading
+          (if face (magit--propertize-face cmd face) cmd)))
+      (when errlog
+        (if (bufferp errlog)
+            (insert (with-current-buffer errlog
+                      (buffer-substring-no-properties (point-min) (point-max))))
+          (insert-file-contents errlog)
+          (goto-char (1- (point-max)))))
+      (insert "\n"))))
+
+(defun magit-process--format-arguments (program args)
+  (cond
+    ((and args (equal program (magit-git-executable)))
+     (pcase-let ((`(,global ,local)
+                  (magit-process-git-arguments--split program args)))
+       (concat
+        (propertize (file-name-nondirectory program)
+                    'font-lock-face 'magit-section-heading)
+        " "
+        (propertize (magit--ellipsis)
+                    'font-lock-face 'magit-section-heading
+                    'help-echo (string-join global " "))
+        " "
+        (propertize (mapconcat #'shell-quote-argument local " ")
+                    'font-lock-face 'magit-section-heading))))
+    ((and args (equal program shell-file-name))
+     (propertize (cadr args)
+                 'font-lock-face 'magit-section-heading))
+    ((concat (propertize (file-name-nondirectory program)
+                         'font-lock-face 'magit-section-heading)
+             " "
+             (propertize (mapconcat #'shell-quote-argument args " ")
+                         'font-lock-face 'magit-section-heading)))))
+
+(defun magit-process-truncate-log ()
+  (let* ((head nil)
+         (tail (oref magit-root-section children))
+         (count (length tail)))
+    (when (> (1+ count) magit-process-log-max)
+      (while (and (cdr tail)
+                  (> count (/ magit-process-log-max 2)))
+        (let* ((inhibit-read-only t)
+               (section (car tail))
+               (process (oref section process)))
+          (cond ((not process))
+                ((memq (process-status process) '(exit signal))
+                 (delete-region (oref section start)
+                                (1+ (oref section end)))
+                 (decf count))
+                ((push section head))))
+        (pop tail))
+      (oset magit-root-section children
+            (nconc (reverse head) tail)))))
+
+(defun magit-process-sentinel (process event)
+  "Default sentinel used by `magit-start-process'."
+  (when (memq (process-status process) '(exit signal))
+    (setq event (substring event 0 -1))
+    (when (string-match "^finished" event)
+      (message (concat (capitalize (process-name process)) " finished")))
+    (magit-process-finish process)
+    (when (eq process magit-this-process)
+      (setq magit-this-process nil))
+    (unless (process-get process 'inhibit-refresh)
+      (let ((command-buf (process-get process 'command-buf)))
+        (if (buffer-live-p command-buf)
+            (with-current-buffer command-buf
+              (magit-refresh))
+          (with-temp-buffer
+            (setq default-directory (process-get process 'default-dir))
+            (magit-refresh)))))))
+
+(defun magit-sequencer-process-sentinel (process event)
+  "Special sentinel used by `magit-run-git-sequencer'."
+  (when (memq (process-status process) '(exit signal))
+    (magit-process-sentinel process event)
+    (when-let* ((process-buf (process-buffer process))
+                (_(buffer-live-p process-buf))
+                (status-buf (with-current-buffer process-buf
+                              (magit-get-mode-buffer 'magit-status-mode))))
+      (with-current-buffer status-buf
+        (when-let
+            ((section
+              (magit-get-section
+               `((commit . ,(magit-rev-parse "HEAD"))
+                 (,(pcase-let ((`(,cmd . ,args) (process-command process)))
+                     (pcase (cadr (magit-process-git-arguments--split cmd args))
+                       ((or "rebase" "am") 'rebase-sequence)
+                       ((or "cherry-pick" "revert") 'sequence))))
+                 (status)))))
+          (goto-char (oref section start))
+          (magit-section-update-highlight))))))
+
+(defun magit-process-filter (proc string)
+  "Default filter used by `magit-start-process'."
+  (with-current-buffer (process-buffer proc)
+    (let ((inhibit-read-only t))
+      (goto-char (process-mark proc))
+      ;; Find last ^M in string.  If one was found, ignore
+      ;; everything before it and delete the current line.
+      (when-let ((ret-pos (cl-position ?\r string :from-end t)))
+        (setq string (substring string (1+ ret-pos)))
+        (delete-region (line-beginning-position) (point)))
+      (setq string (magit-process-remove-bogus-errors string))
+      (when (eq magit-process-apply-ansi-colors 'filter)
+        (setq string (ansi-color-apply string)))
+      (insert (propertize string 'magit-section
+                          (process-get proc 'section)))
+      (set-marker (process-mark proc) (point))
+      ;; Make sure prompts are matched after removing ^M.
+      (magit-process-yes-or-no-prompt proc string)
+      (magit-process-username-prompt  proc string)
+      (magit-process-password-prompt  proc string)
+      (run-hook-with-args-until-success 'magit-process-prompt-functions
+                                        proc string))))
+
+(defun magit-process-make-keymap (process parent)
+  "Remap `abort-minibuffers' to a command that also kills PROCESS.
+PARENT is used as the parent of the returned keymap."
+  (let ((cmd (lambda ()
+               (interactive)
+               (ignore-errors (kill-process process))
+               (if (fboundp 'abort-minibuffers)
+                   (abort-minibuffers)
+                 (abort-recursive-edit)))))
+    (define-keymap :parent parent
+      "C-g" cmd
+      "<remap> <abort-minibuffers>" cmd
+      "<remap> <abort-recursive-edit>" cmd)))
+
+(defmacro magit-process-kill-on-abort (process &rest body)
+  (declare (indent 1)
+           (debug (form body))
+           (obsolete magit-process-make-keymap "Magit 4.0.0"))
+  `(let ((minibuffer-local-map
+          (magit-process-make-keymap ,process minibuffer-local-map)))
+     ,@body))
+
+(defun magit-process-remove-bogus-errors (str)
+  (save-match-data
+    (when (string-match "^\\(\\*ERROR\\*: \\)Canceled by user" str)
+      (setq str (replace-match "" nil nil str 1)))
+    (when (string-match "^error: There was a problem with the editor.*\n" str)
+      (setq str (replace-match "" nil nil str)))
+    (when (string-match
+           "^Please supply the message using either -m or -F option\\.\n" str)
+      (setq str (replace-match "" nil nil str))))
+  str)
+
+(defun magit-process-yes-or-no-prompt (process string)
+  "Forward Yes-or-No prompts to the user."
+  (when-let ((beg (string-match magit-process-yes-or-no-prompt-regexp string)))
+    (process-send-string
+     process
+     (if (save-match-data
+           (let ((max-mini-window-height 30)
+                 (minibuffer-local-map
+                  (magit-process-make-keymap process minibuffer-local-map))
+                 ;; In case yes-or-no-p is fset to that, but does
+                 ;; not cover use-dialog-box-p and y-or-n-p-read-key.
+                 (y-or-n-p-map
+                  (magit-process-make-keymap process y-or-n-p-map)))
+             (yes-or-no-p (substring string 0 beg))))
+         (concat (downcase (match-str 1 string)) "\n")
+       (concat (downcase (match-str 2 string)) "\n")))))
+
+(defun magit-process-password-auth-source (key)
+  "Use `auth-source-search' to get a password.
+If found, return the password.  Otherwise, return nil.
+
+KEY typically derives from a prompt such as:
+  Password for \\='https://yourname@github.com\\='
+in which case it would be the string
+  yourname@github.com
+which matches the ~/.authinfo.gpg entry
+  machine github.com login yourname password 12345
+or iff that is undefined, for backward compatibility
+  machine yourname@github.com password 12345
+
+On github.com you should not use your password but a
+personal access token, see [1].  For information about
+the peculiarities of other forges, please consult the
+respective documentation.
+
+After manually editing ~/.authinfo.gpg you must reset
+the cache using
+  \\`M-x' `auth-source-forget-all-cached' \\`RET'
+
+The above will save you from having to repeatedly type
+your token or password, but you might still repeatedly
+be asked for your username.  To prevent that, change an
+URL like
+  https://github.com/foo/bar.git
+to
+  https://yourname@github.com/foo/bar.git
+
+Instead of changing all such URLs manually, they can
+be translated on the fly by doing this once
+  git config --global \
+    url.https://yourname@github.com.insteadOf \
+    https://github.com
+
+[1]: https://docs.github.com/en/github/authenticating-to-github/creating-a-personal-access-token."
+  (require 'auth-source)
+  (and (fboundp 'auth-source-search)
+       (string-match "\\`\\(.+\\)@\\([^@]+\\)\\'" key)
+       (let* ((user (match-str 1 key))
+              (host (match-str 2 key))
+              (secret
+               (plist-get
+                (car (or (auth-source-search :max 1 :host host :user user)
+                         (auth-source-search :max 1 :host key)))
+                :secret)))
+         (if (functionp secret)
+             (funcall secret)
+           secret))))
+
+(defun magit-process-git-credential-manager-core (process string)
+  "Authenticate using `git-credential-manager-core'.
+
+To use this function add it to the appropriate hook
+  (add-hook \\='magit-process-prompt-functions
+            \\='magit-process-git-credential-manager-core)"
+  (and (string-match "^option (enter for default): $" string)
+       (progn
+         (magit-process-buffer)
+         (let ((option (format "%c\n"
+                               (read-char-choice "Option: " '(?\r ?\j ?1 ?2)))))
+           (insert-before-markers-and-inherit option)
+           (process-send-string process option)))))
+
+(defun magit-process-password-prompt (process string)
+  "Find a password based on prompt STRING and send it to git.
+Use `magit-process-password-prompt-regexps' to find a known
+prompt.  If and only if one is found, then call functions in
+`magit-process-find-password-functions' until one of them returns
+the password.  If all functions return nil, then read the password
+from the user."
+  (when-let ((prompt (magit-process-match-prompt
+                      magit-process-password-prompt-regexps string)))
+    (process-send-string
+     process
+     (concat (or (and$ (match-str 99 string)
+                       (run-hook-with-args-until-success
+                        'magit-process-find-password-functions $))
+                 (let ((read-passwd-map
+                        (magit-process-make-keymap process read-passwd-map)))
+                   (read-passwd prompt)))
+             "\n"))))
+
+(defun magit-process-username-prompt (process string)
+  "Forward username prompts to the user."
+  (when-let ((prompt (magit-process-match-prompt
+                      magit-process-username-prompt-regexps string)))
+    (process-send-string
+     process
+     (let ((minibuffer-local-map
+            (magit-process-make-keymap process minibuffer-local-map)))
+       (concat (read-string prompt nil nil (user-login-name)) "\n")))))
+
+(defun magit-process-match-prompt (prompts string)
+  "Match STRING against PROMPTS and set match data.
+Return the matched string, appending \": \" if needed."
+  (when (seq-some (##string-match % string) prompts)
+    (let ((prompt (match-str 0 string)))
+      (cond ((string-suffix-p ": " prompt) prompt)
+            ((string-suffix-p ":"  prompt) (concat prompt " "))
+            (t                             (concat prompt ": "))))))
+
+(defun magit--process-coding-system ()
+  (let ((fro (or magit-git-output-coding-system
+                 (car default-process-coding-system)))
+        (to (cdr default-process-coding-system)))
+    (if magit-process-ensure-unix-line-ending
+        (cons (coding-system-change-eol-conversion fro 'unix)
+              (coding-system-change-eol-conversion to 'unix))
+      (cons fro to))))
+
+(defvar magit-credential-hook nil
+  "Hook run before Git needs credentials.")
+
+(defvar magit-credential-cache-daemon-process nil)
+
+(defun magit-maybe-start-credential-cache-daemon ()
+  "Maybe start a `git-credential-cache--daemon' process.
+
+If such a process is already running or if the value of option
+`magit-credential-cache-daemon-socket' is nil, then do nothing.
+Otherwise start the process passing the value of that options
+as argument."
+  (unless (or (not magit-credential-cache-daemon-socket)
+              (process-live-p magit-credential-cache-daemon-process)
+              (memq magit-credential-cache-daemon-process
+                    (list-system-processes)))
+    (setq magit-credential-cache-daemon-process
+          (or (seq-find (lambda (process)
+                          (let* ((attr (process-attributes process))
+                                 (comm (cdr (assq 'comm attr)))
+                                 (user (cdr (assq 'user attr))))
+                            (and (string= comm "git-credential-cache--daemon")
+                                 (string= user user-login-name))))
+                        (list-system-processes))
+              (condition-case nil
+                  (start-process "git-credential-cache--daemon"
+                                 " *git-credential-cache--daemon*"
+                                 (magit-git-executable)
+                                 "credential-cache--daemon"
+                                 magit-credential-cache-daemon-socket)
+                ;; Some Git implementations (e.g., Windows) won't have
+                ;; this program; if we fail the first time, stop trying.
+                ((debug error)
+                 (remove-hook 'magit-credential-hook
+                              #'magit-maybe-start-credential-cache-daemon)))))))
+
+(add-hook 'magit-credential-hook #'magit-maybe-start-credential-cache-daemon)
+
+(defvar-keymap magit-mode-line-process-map
+  :doc "Keymap for `mode-line-process'."
+  "<mode-line> <mouse-1>" 'magit-process-buffer)
+
+(defun magit-process-set-mode-line (program args)
+  "Display the git command (sans arguments) in the mode line."
+  (when (equal program (magit-git-executable))
+    (setq args (cadr (magit-process-git-arguments--split program args))))
+  (let ((str (concat " " (propertize
+                          (concat (file-name-nondirectory program)
+                                  (and args (concat " " (car args))))
+                          'mouse-face 'highlight
+                          'keymap magit-mode-line-process-map
+                          'help-echo "mouse-1: Show process buffer"
+                          'font-lock-face 'magit-mode-line-process))))
+    (magit-repository-local-set 'mode-line-process str)
+    (dolist (buf (magit-mode-get-buffers))
+      (with-current-buffer buf
+        (setq mode-line-process str)))
+    (force-mode-line-update t)))
+
+(defun magit-process-set-mode-line-error-status (&optional error str)
+  "Apply an error face to the string set by `magit-process-set-mode-line'.
+
+If ERROR is supplied, include it in the `mode-line-process' tooltip.
+
+If STR is supplied, it replaces the `mode-line-process' text."
+  (setq str (or str (magit-repository-local-get 'mode-line-process)))
+  (when str
+    (setq error (format "%smouse-1: Show process buffer"
+                        (if (stringp error)
+                            (concat error "\n\n")
+                          "")))
+    (setq str (concat " " (propertize
+                           (substring-no-properties str 1)
+                           'mouse-face 'highlight
+                           'keymap magit-mode-line-process-map
+                           'help-echo error
+                           'font-lock-face 'magit-mode-line-process-error)))
+    (magit-repository-local-set 'mode-line-process str)
+    (dolist (buf (magit-mode-get-buffers))
+      (with-current-buffer buf
+        (setq mode-line-process str)))
+    (force-mode-line-update t)
+    ;; We remove any error status from the mode line when a magit
+    ;; buffer is refreshed (see `magit-refresh-buffer'), but we must
+    ;; ensure that we ignore any refreshes during the remainder of the
+    ;; current command -- otherwise a newly-set error status would be
+    ;; removed before it was seen.  We set a flag which prevents the
+    ;; status from being removed prior to the next command, so that
+    ;; the error status is guaranteed to remain visible until then.
+    (let ((repokey (magit-repository-local-repository)))
+      ;; The following closure captures the repokey value, and is
+      ;; added to `pre-command-hook'.
+      (cl-labels ((enable-magit-process-unset-mode-line ()
+                    ;; Remove ourself from the hook variable, so
+                    ;; that we only run once.
+                    (remove-hook 'pre-command-hook
+                                 #'enable-magit-process-unset-mode-line)
+                    ;; Clear the inhibit flag for the repository in
+                    ;; which we set it.
+                    (magit-repository-local-set
+                     'inhibit-magit-process-unset-mode-line nil repokey)))
+        ;; Set the inhibit flag until the next command is invoked.
+        (magit-repository-local-set
+         'inhibit-magit-process-unset-mode-line t repokey)
+        (add-hook 'pre-command-hook
+                  #'enable-magit-process-unset-mode-line)))))
+
+(defun magit-process-unset-mode-line-error-status ()
+  "Remove any current error status from the mode line."
+  (let ((status (or mode-line-process
+                    (magit-repository-local-get 'mode-line-process))))
+    (when (and status
+               (eq (get-text-property 1 'font-lock-face status)
+                   'magit-mode-line-process-error))
+      (magit-process-unset-mode-line))))
+
+(add-hook 'magit-refresh-buffer-hook
+          #'magit-process-unset-mode-line-error-status)
+
+(defun magit-process-unset-mode-line (&optional directory)
+  "Remove the git command from the mode line."
+  (let ((default-directory (or directory default-directory)))
+    (unless (magit-repository-local-get 'inhibit-magit-process-unset-mode-line)
+      (magit-repository-local-set 'mode-line-process nil)
+      (dolist (buf (magit-mode-get-buffers))
+        (with-current-buffer buf (setq mode-line-process nil)))
+      (force-mode-line-update t))))
+
+(defvar magit-process-error-message-regexps
+  (list "^\\*ERROR\\*: Canceled by user$"
+        "^\\(?:error\\|fatal\\|git\\): \\(.*\\)$"
+        "^\\(Cannot rebase:.*\\)$"))
+
+(define-error 'magit-git-error "Git error")
+
+(defun magit-process-error-summary (process-buf section)
+  "Return one-line error summary from SECTION in PROCESS-BUF.
+If PROCESS-BUF is no longer alive, return nil."
+  (and (buffer-live-p process-buf)
+       (with-current-buffer process-buf
+         (and (oref section content)
+              (save-excursion
+                (goto-char (oref section end))
+                (run-hook-wrapped
+                 'magit-process-error-message-regexps
+                 (lambda (re)
+                   (save-excursion
+                     (and (re-search-backward re (oref section start) t)
+                          (match-str 1))))))))))
+
+(defun magit-process-error-tooltip (process-buf section)
+  "Return text from SECTION in PROCESS-BUF.
+Option `magit-process-error-tooltip-max-lines' limits how many lines to
+return.  If that is nil, or PROCESS-BUF is no longer alive, return nil."
+  (and (integerp magit-process-error-tooltip-max-lines)
+       (> magit-process-error-tooltip-max-lines 0)
+       (buffer-live-p process-buf)
+       (with-current-buffer process-buf
+         (save-excursion
+           (goto-char (or (oref section content)
+                          (oref section start)))
+           (buffer-substring-no-properties
+            (point)
+            (save-excursion
+              (forward-line magit-process-error-tooltip-max-lines)
+              (goto-char
+               (if (> (point) (oref section end))
+                   (oref section end)
+                 (point)))
+              ;; Remove any trailing whitespace.
+              (when (re-search-backward "[^[:space:]\n]"
+                                        (oref section start) t)
+                (forward-char 1))
+              (point)))))))
+
+(defvar-local magit-this-error nil)
+
+(defun magit-process-finish (arg &optional process-buf _command-buf
+                                 default-dir section)
+  (unless (integerp arg)
+    (setq process-buf (process-buffer arg))
+    (setq default-dir (process-get arg 'default-dir))
+    (setq section     (process-get arg 'section))
+    (setq arg         (process-exit-status arg)))
+  (when (fboundp 'dired-uncache)
+    (dired-uncache default-dir))
+  (when (buffer-live-p process-buf)
+    (with-current-buffer process-buf
+      (magit-process-finish-section section arg)))
+  (if (= arg 0)
+      (magit-process-unset-mode-line default-dir)
+    (let ((msg (magit-process-error-summary process-buf section)))
+      (if magit-process-display-mode-line-error
+          (magit-process-set-mode-line-error-status
+           (or (magit-process-error-tooltip process-buf section) msg))
+        (magit-process-unset-mode-line default-dir))
+      (when (buffer-live-p process-buf)
+        (with-current-buffer process-buf
+          (when-let ((status-buf (magit-get-mode-buffer 'magit-status-mode)))
+            (with-current-buffer status-buf
+              (setq magit-this-error msg)))))
+      (let ((usage
+             (and magit-show-process-buffer-hint
+                  (if-let ((keys (where-is-internal 'magit-process-buffer)))
+                      (format "Type %s to see %S for details"
+                              (key-description (car keys)) process-buf)
+                    (format "See %S for details" process-buf)))))
+        (if magit-process-raise-error
+            (signal 'magit-git-error
+                    (list msg (or usage (list 'in default-dir))))
+          (message "Git error: %s"
+                   (concat msg (and usage (format " [%s]" usage))))))))
+  arg)
+
+(defun magit-process-finish-section (section exit-code)
+  (let ((inhibit-read-only t)
+        (buffer (current-buffer))
+        (marker (oref section start)))
+    (goto-char marker)
+    (save-excursion
+      (delete-char 3)
+      (set-marker-insertion-type marker nil)
+      (insert (propertize (format "%3s" exit-code)
+                          'magit-section section
+                          'font-lock-face (if (= exit-code 0)
+                                              'magit-process-ok
+                                            'magit-process-ng)))
+      (set-marker-insertion-type marker t))
+    (when (eq magit-process-apply-ansi-colors t)
+      (ansi-color-apply-on-region (oref section content)
+                                  (oref section end)))
+    (cond ((= (oref section end)
+              (+ (line-end-position) 2))
+           (save-excursion
+             (goto-char (1+ (line-end-position)))
+             (delete-char -1)
+             (oset section content nil)))
+          ((and (= exit-code 0)
+                (not (seq-some (##eq (window-buffer %) buffer)
+                               (window-list))))
+           (magit-section-hide section)))))
+
+(defun magit-process-display-buffer (process)
+  (when (process-live-p process)
+    (let ((buf (process-buffer process)))
+      (cond ((not (buffer-live-p buf)))
+            ((= magit-process-popup-time 0)
+             (if (minibufferp)
+                 (switch-to-buffer-other-window buf)
+               (pop-to-buffer buf)))
+            ((> magit-process-popup-time 0)
+             (run-with-timer magit-process-popup-time nil
+                             (lambda (p)
+                               (when-let* ((_(eq (process-status p) 'run))
+                                           (buf (process-buffer p))
+                                           (_(buffer-live-p buf)))
+                                 (if (minibufferp)
+                                     (switch-to-buffer-other-window buf)
+                                   (pop-to-buffer buf))))
+                             process))))))
+
+(defun magit--log-action (summary line list)
+  (let (heading lines)
+    (cond ((cdr list)
+           (setq lines (mapcar line list))
+           (setq heading (funcall summary list)))
+          ((setq heading (funcall line (car list)))))
+    (with-current-buffer (magit-process-buffer t)
+      (goto-char (1- (point-max)))
+      (let ((inhibit-read-only t))
+        (magit-insert-section (message)
+          (magit-insert-heading (concat "  * " heading))
+          (when lines
+            (dolist (line lines)
+              (insert line "\n"))
+            (insert "\n"))))
+      (let ((inhibit-message t))
+        (when heading
+          (setq lines (cons heading lines)))
+        (message (string-join lines "\n"))))))
+
+;;; _
+(provide 'magit-process)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-process.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-process.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-process.elc
new file mode 100644
index 0000000..4f3d63f
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-process.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-pull.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-pull.el
new file mode 100644
index 0000000..40a3cb4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-pull.el
@@ -0,0 +1,222 @@
+;;; magit-pull.el --- Update local objects and refs  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements pull commands.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Options
+
+(defcustom magit-pull-or-fetch nil
+  "Whether `magit-pull' also offers some fetch suffixes."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-pull "magit-pull" nil t)
+(transient-define-prefix magit-pull ()
+  "Pull from another repository."
+  :man-page "git-pull"
+  :incompatible
+  '(("--ff-only" "--rebase=true" "--rebase=merges" "--rebase=interactive"))
+  [:description
+   (lambda () (if magit-pull-or-fetch "Pull arguments" "Arguments"))
+   ("-f" "Fast-forward only" "--ff-only")
+   ("-r" magit-pull:--rebase)
+   ("-A" "Autostash" "--autostash" :level 7)
+   ("-F" "Force" ("-f" "--force"))]
+  [:description
+   (lambda ()
+     (if-let ((branch (magit-get-current-branch)))
+         (concat
+          (propertize "Pull into " 'face 'transient-heading)
+          (propertize branch       'face 'magit-branch-local)
+          (propertize " from"      'face 'transient-heading))
+       (propertize "Pull from" 'face 'transient-heading)))
+   ("p" magit-pull-from-pushremote)
+   ("u" magit-pull-from-upstream)
+   ("e" "elsewhere"         magit-pull-branch)]
+  [:description
+   (lambda ()
+     (format (propertize "Pull into %s from" 'face 'transient-heading)
+             (magit-get-upstream-branch)))
+   ("U" magit-pull-into-upstream :level 7)]
+  ["Fetch from"
+   :if-non-nil magit-pull-or-fetch
+   ("f" "remotes"           magit-fetch-all-no-prune)
+   ("F" "remotes and prune" magit-fetch-all-prune)]
+  ["Fetch"
+   :if-non-nil magit-pull-or-fetch
+   ("o" "another branch"    magit-fetch-branch)
+   ("s" "explicit refspec"  magit-fetch-refspec)
+   ("m" "submodules"        magit-fetch-modules)]
+  ["Configure"
+   ("r" magit-branch.<branch>.rebase :if magit-get-current-branch)
+   ("C" "variables..." magit-branch-configure)]
+  (interactive)
+  (transient-setup 'magit-pull nil nil :scope (magit-get-current-branch)))
+
+(defun magit-pull-arguments ()
+  (transient-args 'magit-pull))
+
+(transient-define-infix magit-pull:--rebase ()
+  :class 'transient-option
+  :description "Rebase local commits"
+  :argument "--rebase="
+  :shortarg "-r"
+  :choices '("true" "merges" "interactive" "false"))
+
+;;;###autoload(autoload 'magit-pull-from-pushremote "magit-pull" nil t)
+(transient-define-suffix magit-pull-from-pushremote (args)
+  "Pull from the push-remote of the current branch.
+
+With a prefix argument or when the push-remote is either not
+configured or unusable, then let the user first configure the
+push-remote."
+  :if #'magit-get-current-branch
+  :description #'magit-pull--pushbranch-description
+  (interactive (list (magit-pull-arguments)))
+  (pcase-let ((`(,branch ,remote)
+               (magit--select-push-remote "pull from there")))
+    (run-hooks 'magit-credential-hook)
+    (magit-run-git-with-editor "pull" args remote branch)))
+
+(defun magit-pull--pushbranch-description ()
+  ;; Also used by `magit-rebase-onto-pushremote'.
+  (let* ((branch (magit-get-current-branch))
+         (target (magit-get-push-branch branch t))
+         (remote (magit-get-push-remote branch))
+         (v (magit--push-remote-variable branch t)))
+    (cond (target)
+          ((member remote (magit-list-remotes))
+           (format "%s, replacing non-existent" v))
+          (remote
+           (format "%s, replacing invalid" v))
+          ((format "%s, setting that" v)))))
+
+;;;###autoload(autoload 'magit-pull-from-upstream "magit-pull" nil t)
+(transient-define-suffix magit-pull-from-upstream (args)
+  "Pull from the upstream of the current branch.
+
+With a prefix argument or when the upstream is either not
+configured or unusable, then let the user first configure
+the upstream."
+  :if #'magit-get-current-branch
+  :description #'magit-pull--upstream-description
+  (interactive (list (magit-pull-arguments)))
+  (let* ((branch (or (magit-get-current-branch)
+                     (user-error "No branch is checked out")))
+         (remote (magit-get "branch" branch "remote"))
+         (merge  (magit-get "branch" branch "merge")))
+    (when (or current-prefix-arg
+              (not (or (magit-get-upstream-branch branch)
+                       (magit--unnamed-upstream-p remote merge))))
+      (magit-set-upstream-branch
+       branch (magit-read-upstream-branch
+               branch (format "Set upstream of %s and pull from there" branch)))
+      (setq remote (magit-get "branch" branch "remote"))
+      (setq merge  (magit-get "branch" branch "merge")))
+    (run-hooks 'magit-credential-hook)
+    (magit-run-git-with-editor "pull" args remote merge)))
+
+(defun magit-pull--upstream-description ()
+  (and-let ((branch (magit-get-current-branch)))
+    (or (magit-get-upstream-branch branch)
+        (let ((remote (magit-get "branch" branch "remote"))
+              (merge  (magit-get "branch" branch "merge"))
+              (u (magit--propertize-face "@{upstream}" 'bold)))
+          (cond
+            ((magit--unnamed-upstream-p remote merge)
+             (format "%s of %s"
+                     (magit--propertize-face merge 'magit-branch-remote)
+                     (magit--propertize-face remote 'bold)))
+            ((magit--valid-upstream-p remote merge)
+             (concat u ", replacing non-existent"))
+            ((or remote merge)
+             (concat u ", replacing invalid"))
+            ((concat u ", setting that")))))))
+
+;;;###autoload(autoload 'magit-pull-into-upstream "magit-pull" nil t)
+(transient-define-suffix magit-pull-into-upstream ()
+  "Update the upstream of the current branch from its own upstream.
+
+If the upstream of the current branch is a local branch, and the
+upstream of that is a remote branch, then update the local upstream.
+This makes it possible to update the upstream branch, without having
+to first check it out."
+  :if #'magit-pull--upstreams
+  :description (##cdr (magit-pull--upstreams))
+  (interactive)
+  (if-let ((upstreams (magit-pull--upstreams)))
+      (pcase-let* ((`(,up1 . ,up2) upstreams)
+                   (`(,remote . ,branch) (magit-split-branch-name up2)))
+        (magit-run-git-async "fetch" remote branch)
+        (set-process-sentinel
+         magit-this-process
+         (lambda (process _event)
+           (when (memq (process-status process) '(exit signal))
+             (magit-run-git-async "update-ref" (concat "refs/heads/" up1)
+                                  "FETCH_HEAD")))))
+    (user-error "Cannot perform background update of upstream branch")))
+
+(defun magit-pull--upstreams ()
+  (and-let* ((up1 (magit-get-upstream-branch))
+             (_   (magit-local-branch-p up1))
+             (up2 (magit-get-upstream-branch up1))
+             (_   (magit-remote-branch-p up2)))
+    (cons up1 up2)))
+
+;;;###autoload
+(defun magit-pull-branch (source args)
+  "Pull from a branch read in the minibuffer."
+  (interactive (list (magit-read-remote-branch "Pull" nil nil nil t)
+                     (magit-pull-arguments)))
+  (run-hooks 'magit-credential-hook)
+  (pcase-let ((`(,remote . ,branch)
+               (magit-get-tracked source)))
+    (magit-run-git-with-editor "pull" args remote branch)))
+
+;;; _
+(provide 'magit-pull)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-pull.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-pull.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-pull.elc
new file mode 100644
index 0000000..4f8296d
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-pull.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-push.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-push.el
new file mode 100644
index 0000000..7d6730a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-push.el
@@ -0,0 +1,406 @@
+;;; magit-push.el --- Update remote objects and refs  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements push commands.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Options
+
+(defcustom magit-push-options '("skip-ci" "ci.skip")
+  "Choices offered when setting \"--push-options\" in the push menu."
+  :package-version '(magit . "4.7.0")
+  :group 'magit-commands
+  :type '(repeat string))
+
+;;; Menu
+
+;;;###autoload(autoload 'magit-push "magit-push" nil t)
+(transient-define-prefix magit-push ()
+  "Push to another repository."
+  :man-page "git-push"
+  ["Arguments"
+   ("-f" "Force with lease" (nil "--force-with-lease"))
+   ("-F" "Force"            ("-f" "--force"))
+   ("-h" "Disable hooks"    "--no-verify")
+   ("-n" "Dry run"          ("-n" "--dry-run"))
+   ("-u" "Set upstream"     "--set-upstream" :level 5)
+   ("-T" "Include all tags" "--tags")
+   ("-t" "Include related annotated tags" "--follow-tags")
+   ("-o" magit-push:--push-option :level 5)]
+  [:if magit-get-current-branch
+   :description (##format (propertize "Push %s to" 'face 'transient-heading)
+                          (propertize (magit-get-current-branch)
+                                      'face 'magit-branch-local))
+   ("p" magit-push-current-to-pushremote)
+   ("u" magit-push-current-to-upstream)
+   ("e" "elsewhere" magit-push-current)]
+  ["Push"
+   [("o" "another branch"    magit-push-other)
+    ("r" "explicit refspecs" magit-push-refspecs)
+    ("m" "matching branches" magit-push-matching)]
+   [("T" "a tag"             magit-push-tag)
+    ("t" "all tags"          magit-push-tags)
+    (6 "n" "a note ref"      magit-push-notes-ref)]]
+  ["Configure"
+   ("C" "Set variables..."  magit-branch-configure)])
+
+(defun magit-push-arguments ()
+  (transient-args 'magit-push))
+
+(transient-define-infix magit-push:--push-option ()
+  :description "Set push-options"
+  :class 'transient-option
+  :shortarg "-o"
+  :argument "--push-option="
+  :multi-value 'repeat
+  :choices (lambda () magit-push-options))
+
+;;; Commands
+
+(defun magit-git-push (branch target args)
+  (run-hooks 'magit-credential-hook)
+  ;; If the remote branch already exists, then we do not have to
+  ;; qualify the target, which we prefer to avoid doing because
+  ;; using the default namespace is wrong in obscure cases.
+  (pcase-let ((namespace (if (magit-get-tracked target) "" "refs/heads/"))
+              (`(,remote . ,target)
+               (magit-split-branch-name target)))
+    (magit-run-git-async "push" "-v" args remote
+                         (format "%s:%s%s" branch namespace target))))
+
+;;;###autoload(autoload 'magit-push-current-to-pushremote "magit-push" nil t)
+(transient-define-suffix magit-push-current-to-pushremote (args)
+  "Push the current branch to its push-remote.
+
+When the push-remote is not configured, then read the push-remote
+from the user, set it, and then push to it.  With a prefix
+argument the push-remote can be changed before pushed to it."
+  :if #'magit-get-current-branch
+  :description #'magit-push--pushbranch-description
+  (interactive (list (magit-push-arguments)))
+  (pcase-let ((`(,branch ,remote ,changed)
+               (magit--select-push-remote "push there")))
+    (when changed
+      (magit-confirm 'set-and-push
+        (list "Really use \"%s\" as push-remote and push \"%s\" there"
+              remote branch)))
+    (run-hooks 'magit-credential-hook)
+    (magit-run-git-async "push" "-v" args remote
+                         (format "refs/heads/%s:refs/heads/%s"
+                                 branch branch)))) ; see #3847 and #3872
+
+(defun magit-push--pushbranch-description ()
+  (let* ((branch (magit-get-current-branch))
+         (target (magit-get-push-branch branch t))
+         (remote (magit-get-push-remote branch))
+         (v (magit--push-remote-variable branch t)))
+    (cond
+      (target)
+      ((member remote (magit-list-remotes))
+       (format "%s, creating it"
+               (magit--propertize-face (concat remote "/" branch)
+                                       'magit-branch-remote)))
+      (remote
+       (format "%s, replacing invalid" v))
+      ((format "%s, setting that" v)))))
+
+;;;###autoload(autoload 'magit-push-current-to-upstream "magit-push" nil t)
+(transient-define-suffix magit-push-current-to-upstream (args)
+  "Push the current branch to its upstream branch.
+
+With a prefix argument or when the upstream is either not
+configured or unusable, then let the user first configure
+the upstream."
+  :if #'magit-get-current-branch
+  :description #'magit-push--upstream-description
+  (interactive (list (magit-push-arguments)))
+  (let* ((branch (or (magit-get-current-branch)
+                     (user-error "No branch is checked out")))
+         (remote (magit-get "branch" branch "remote"))
+         (merge  (magit-get "branch" branch "merge")))
+    (when (or current-prefix-arg
+              (not (or (magit-get-upstream-branch branch)
+                       (magit--unnamed-upstream-p remote merge)
+                       (magit--valid-upstream-p remote merge))))
+      (let* ((branches (cl-union (mapcar (##concat % "/" branch)
+                                         (magit-list-remotes))
+                                 (magit-list-remote-branch-names)
+                                 :test #'equal))
+             (upstream (magit-completing-read
+                        (format "Set upstream of %s and push there" branch)
+                        branches nil 'any nil 'magit-revision-history
+                        (or (car (member (magit-remote-branch-at-point) branches))
+                            (car (member "origin/master" branches)))))
+             (upstream* (or (magit-get-tracked upstream)
+                            (magit-split-branch-name upstream))))
+        (setq remote (car upstream*))
+        (setq merge  (cdr upstream*))
+        (unless (string-prefix-p "refs/" merge)
+          ;; User selected a non-existent remote-tracking branch.
+          ;; It is very likely, but not certain, that this is the
+          ;; correct thing to do.  It is even more likely that it
+          ;; is what the user wants to happen.
+          (setq merge (concat "refs/heads/" merge)))
+        (magit-confirm 'set-and-push
+          (list "Really use \"%s\" as upstream and push \"%s\" there"
+                upstream branch)))
+      (cl-pushnew "--set-upstream" args :test #'equal))
+    (run-hooks 'magit-credential-hook)
+    (magit-run-git-async "push" "-v" args remote (concat branch ":" merge))))
+
+(defun magit-push--upstream-description ()
+  (and-let ((branch (magit-get-current-branch)))
+    (or (magit-get-upstream-branch branch)
+        (let ((remote (magit-get "branch" branch "remote"))
+              (merge  (magit-get "branch" branch "merge"))
+              (u (magit--propertize-face "@{upstream}" 'bold)))
+          (cond
+            ((magit--unnamed-upstream-p remote merge)
+             (format "%s as %s"
+                     (magit--propertize-face remote 'bold)
+                     (magit--propertize-face merge 'magit-branch-remote)))
+            ((magit--valid-upstream-p remote merge)
+             (format "%s creating %s"
+                     (magit--propertize-face remote 'magit-branch-remote)
+                     (magit--propertize-face merge 'magit-branch-remote)))
+            ((or remote merge)
+             (concat u ", creating it and replacing invalid"))
+            ((concat u ", creating it")))))))
+
+;;;###autoload
+(defun magit-push-current (target args)
+  "Push the current branch to a branch read in the minibuffer."
+  (interactive
+    (if-let ((current (magit-get-current-branch)))
+        (list (magit-read-remote-branch (format "Push %s to" current)
+                                        nil nil current 'confirm)
+              (magit-push-arguments))
+      (user-error "No branch is checked out")))
+  (magit-git-push (magit-get-current-branch) target args))
+
+;;;###autoload
+(defun magit-push-other (source target args)
+  "Push an arbitrary branch or commit somewhere.
+Both the source and the target are read in the minibuffer."
+  (interactive
+    (let ((source (magit-read-local-branch-or-commit "Push")))
+      (list source
+            (magit-read-remote-branch
+             (format "Push %s to" source) nil
+             (cond ((magit-local-branch-p source)
+                    (or (magit-get-push-branch source)
+                        (magit-get-upstream-branch source)))
+                   ((magit-rev-ancestor-p source "HEAD")
+                    (or (magit-get-push-branch)
+                        (magit-get-upstream-branch))))
+             source 'confirm)
+            (magit-push-arguments))))
+  (magit-git-push source target args))
+
+(defvar magit-push-refspecs-history nil)
+
+;;;###autoload
+(defun magit-push-refspecs (remote refspecs args)
+  "Push one or multiple REFSPECS to a REMOTE.
+Both the REMOTE and the REFSPECS are read in the minibuffer.  To
+use multiple REFSPECS, separate them with commas.  Completion is
+only available for the part before the colon, or when no colon
+is used."
+  (interactive
+    (list (magit-read-remote "Push to remote")
+          (magit-completing-read-multiple
+           "Push refspec,s: "
+           (cons "HEAD" (magit-list-local-branch-names))
+           nil 'any nil 'magit-push-refspecs-history)
+          (magit-push-arguments)))
+  (run-hooks 'magit-credential-hook)
+  (magit-run-git-async "push" "-v" args remote refspecs))
+
+;;;###autoload
+(defun magit-push-matching (remote &optional args)
+  "Push all matching branches to another repository.
+If multiple remotes exist, then read one from the user.
+If just one exists, use that without requiring confirmation."
+  (interactive (list (magit-read-remote "Push matching branches to" nil t)
+                     (magit-push-arguments)))
+  (run-hooks 'magit-credential-hook)
+  (magit-run-git-async "push" "-v" args remote ":"))
+
+;;;###autoload
+(defun magit-push-tags (remote &optional args)
+  "Push all tags to another repository.
+If only one remote exists, then push to that.  Otherwise prompt
+for a remote, offering the remote configured for the current
+branch as default."
+  (interactive (list (magit-read-remote "Push tags to remote" nil t)
+                     (magit-push-arguments)))
+  (run-hooks 'magit-credential-hook)
+  (magit-run-git-async "push" remote "--tags" args))
+
+;;;###autoload
+(defun magit-push-tag (tag remote &optional args)
+  "Push a tag to another repository."
+  (interactive
+    (let  ((tag (magit-read-tag "Push tag")))
+      (list tag (magit-read-remote (format "Push %s to remote" tag) nil t)
+            (magit-push-arguments))))
+  (run-hooks 'magit-credential-hook)
+  (magit-run-git-async "push" remote tag args))
+
+;;;###autoload
+(defun magit-push-notes-ref (ref remote &optional args)
+  "Push a notes ref to another repository."
+  (interactive
+    (let ((note (magit-notes-read-ref "Push notes")))
+      (list note
+            (magit-read-remote (format "Push %s to remote" note) nil t)
+            (magit-push-arguments))))
+  (run-hooks 'magit-credential-hook)
+  (magit-run-git-async "push" remote ref args))
+
+;;;###autoload(autoload 'magit-push-implicitly "magit-push" nil t)
+(transient-define-suffix magit-push-implicitly (args)
+  "Push somewhere without using an explicit refspec.
+
+This command simply runs \"git push -v [ARGS]\".  ARGS are the
+arguments specified in the popup buffer.  No explicit refspec
+arguments are used.  Instead the behavior depends on at least
+these Git variables: `push.default', `remote.pushDefault',
+`branch.<branch>.pushRemote', `branch.<branch>.remote',
+`branch.<branch>.merge', and `remote.<remote>.push'.
+
+If you add this suffix to a transient prefix without explicitly
+specifying the description, then an attempt is made to predict
+what this command will do.  To add it use something like:
+
+  (transient-insert-suffix \\='magit-push \"o\"
+    \\='(\"i\" magit-push-implicitly))"
+  :description #'magit-push-implicitly--desc
+  (interactive (list (magit-push-arguments)))
+  (run-hooks 'magit-credential-hook)
+  (magit-run-git-async "push" "-v" args))
+
+(defun magit-push-implicitly--desc ()
+  ;; This implements the logic for git push as documented.
+  ;; First, we resolve a remote to use based on various remote and
+  ;; pushRemote options.
+  ;; Then, we resolve the refspec to use for the remote based on push
+  ;; and pushDefault options.
+  ;; Note that the remote and refspec to push are handled separately,
+  ;; so it doesn't make sense to talk about "pushing to upstream".
+  ;; Depending on the options, you could end up pushing to the
+  ;; "upstream" remote but not the "upstream" branch, and vice versa.
+  (let* ((branch (magit-get-current-branch))
+         (remote (or (magit-get-push-remote branch)
+                     ;; Note: Avoid `magit-get-remote' because it
+                     ;; filters out the local repo case (".").
+                     (magit-get "branch" branch "remote")
+                     (cond-let
+                       [[remotes (magit-list-remotes)]]
+                       ((and (magit-git-version>= "2.27")
+                             (length= remotes 1))
+                        (car remotes))
+                       ((car (member "origin" remotes)))))))
+    (if (null remote)
+        "nothing (no remote)"
+      (let ((refspec (magit-get "remote" remote "push")))
+        (if refspec
+            (format "to %s with refspecs %s"
+                    (magit--propertize-face remote 'bold)
+                    (magit--propertize-face refspec 'bold))
+          (pcase (or (magit-get "push.default") "simple")
+            ("nothing" "nothing (due to push.default)")
+            ((or "current" "simple")
+             (format "%s to %s"
+                     (magit--propertize-face branch 'magit-branch-current)
+                     (magit--propertize-face (format "%s/%s" remote branch)
+                                             'magit-branch-remote)))
+            ((or "upstream" "tracking")
+             (let ((ref (magit-get "branch" branch "merge")))
+               (if ref
+                   (format "%s to %s"
+                           (magit--propertize-face branch 'magit-branch-current)
+                           (cond
+                             ((string-prefix-p "refs/heads/" ref)
+                              (magit--propertize-face
+                               (format "%s/%s" remote
+                                       (substring ref (length "refs/heads/")))
+                               'magit-branch-remote))
+                             ((not (string-match "/" ref))
+                              (magit--propertize-face (format "%s/%s" remote ref)
+                                                      'magit-branch-remote))
+                             ((format "%s as %s"
+                                      (magit--propertize-face remote 'bold)
+                                      (magit--propertize-face ref 'bold)))))
+                 "nothing (no upstream)")))
+            ("matching" (format "all matching to %s"
+                                (magit--propertize-face remote 'bold)))))))))
+
+;;;###autoload(autoload 'magit-push-to-remote "magit-push" nil t)
+(transient-define-suffix magit-push-to-remote (remote args)
+  "Push to REMOTE without using an explicit refspec.
+The REMOTE is read in the minibuffer.
+
+This command simply runs \"git push -v [ARGS] REMOTE\".  ARGS
+are the arguments specified in the popup buffer.  No refspec
+arguments are used.  Instead the behavior depends on at least
+these Git variables: `push.default', `remote.pushDefault',
+`branch.<branch>.pushRemote', `branch.<branch>.remote',
+`branch.<branch>.merge', and `remote.<remote>.push'.
+
+You can add this command as a suffix using something like:
+
+  (transient-insert-suffix \\='magit-push \"o\"
+    \\='(\"x\" magit-push-to-remote))"
+  :description #'magit-push-to-remote--desc
+  (interactive (list (magit-read-remote "Push to remote")
+                     (magit-push-arguments)))
+  (run-hooks 'magit-credential-hook)
+  (magit-run-git-async "push" "-v" args remote))
+
+(defun magit-push-to-remote--desc ()
+  (format "using %s" (magit--propertize-face "git push <remote>" 'bold)))
+
+;;; _
+(provide 'magit-push)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-push.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-push.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-push.elc
new file mode 100644
index 0000000..23b24a8
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-push.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reflog.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reflog.el
new file mode 100644
index 0000000..d7556c4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reflog.el
@@ -0,0 +1,224 @@
+;;; magit-reflog.el --- Inspect ref history  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for looking at Git reflogs.
+
+;;; Code:
+
+(require 'magit-core)
+(require 'magit-log)
+
+;;; Options
+
+(defcustom magit-reflog-limit 256
+  "Maximal number of entries initially shown in reflog buffers.
+The limit in the current buffer can be changed using \"+\"
+and \"-\"."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-commands
+  :type 'number)
+
+(defcustom magit-reflog-margin
+  (list (nth 0 magit-log-margin)
+        (nth 1 magit-log-margin)
+        'magit-log-margin-width nil
+        (nth 4 magit-log-margin))
+  "Format of the margin in `magit-reflog-mode' buffers.
+
+The value has the form (INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH).
+
+If INIT is non-nil, then the margin is shown initially.
+STYLE controls how to format the author or committer date.
+  It can be one of `age' (to show the age of the commit),
+  `age-abbreviated' (to abbreviate the time unit to a character),
+  or a string (suitable for `format-time-string') to show the
+  actual date.  Option `magit-log-margin-show-committer-date'
+  controls which date is being displayed.
+WIDTH controls the width of the margin.  This exists for forward
+  compatibility and currently the value should not be changed.
+AUTHOR controls whether the name of the author is also shown by
+  default.
+AUTHOR-WIDTH has to be an integer.  When the name of the author
+  is shown, then this specifies how much space is used to do so."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-log
+  :group 'magit-margin
+  :type magit-log-margin--custom-type
+  :initialize #'magit-custom-initialize-reset
+  :set-after '(magit-log-margin)
+  :set (apply-partially #'magit-margin-set-variable 'magit-reflog-mode))
+
+;;; Faces
+
+(defface magit-reflog-commit '((t :foreground "green"))
+  "Face for commit commands in reflogs."
+  :group 'magit-faces)
+
+(defface magit-reflog-amend '((t :foreground "magenta"))
+  "Face for amend commands in reflogs."
+  :group 'magit-faces)
+
+(defface magit-reflog-merge '((t :foreground "green"))
+  "Face for merge, checkout and branch commands in reflogs."
+  :group 'magit-faces)
+
+(defface magit-reflog-checkout '((t :foreground "blue"))
+  "Face for checkout commands in reflogs."
+  :group 'magit-faces)
+
+(defface magit-reflog-reset '((t :foreground "red"))
+  "Face for reset commands in reflogs."
+  :group 'magit-faces)
+
+(defface magit-reflog-rebase '((t :foreground "magenta"))
+  "Face for rebase commands in reflogs."
+  :group 'magit-faces)
+
+(defface magit-reflog-cherry-pick '((t :foreground "green"))
+  "Face for cherry-pick commands in reflogs."
+  :group 'magit-faces)
+
+(defface magit-reflog-remote '((t :foreground "cyan"))
+  "Face for pull and clone commands in reflogs."
+  :group 'magit-faces)
+
+(defface magit-reflog-other '((t :foreground "cyan"))
+  "Face for other commands in reflogs."
+  :group 'magit-faces)
+
+;;; Commands
+
+;;;###autoload
+(defun magit-reflog-current ()
+  "Display the reflog of the current branch.
+If `HEAD' is detached, then show the reflog for that instead."
+  (interactive)
+  (magit-reflog-setup-buffer (or (magit-get-current-branch) "HEAD")))
+
+;;;###autoload
+(defun magit-reflog-other (ref)
+  "Display the reflog of a branch or another ref."
+  (interactive (list (magit-read-local-branch-or-ref "Show reflog for")))
+  (magit-reflog-setup-buffer ref))
+
+;;;###autoload
+(defun magit-reflog-head ()
+  "Display the `HEAD' reflog."
+  (interactive)
+  (magit-reflog-setup-buffer "HEAD"))
+
+;;; Mode
+
+(defvar-keymap magit-reflog-mode-map
+  :doc "Keymap for `magit-reflog-mode'."
+  :parent magit-log-mode-map
+  "C-c C-n" #'undefined
+  "L"       #'magit-margin-settings)
+
+(define-derived-mode magit-reflog-mode magit-mode "Magit Reflog"
+  "Mode for looking at Git reflog.
+
+This mode is documented in info node `(magit)Reflog'.
+
+\\<magit-mode-map>\
+Type \\[magit-refresh] to refresh the current buffer.
+Type \\[magit-visit-thing] or \\[magit-diff-show-or-scroll-up] \
+to visit the commit at point.
+
+Type \\[magit-cherry-pick] to apply the commit at point.
+Type \\[magit-reset] to reset `HEAD' to the commit at point.
+
+\\{magit-reflog-mode-map}"
+  :interactive nil
+  :group 'magit-log
+  (magit-hack-dir-local-variables)
+  (setq magit--imenu-item-types 'commit))
+
+(defun magit-reflog-setup-buffer (ref)
+  (require 'magit)
+  (magit-setup-buffer #'magit-reflog-mode nil
+    (magit-buffer-refname ref)
+    (magit-buffer-log-args (list (format "-n%s" magit-reflog-limit)))))
+
+(defun magit-reflog-refresh-buffer ()
+  (magit-set-header-line-format (concat "Reflog for " magit-buffer-refname))
+  (magit-insert-section (reflogbuf)
+    (magit-git-wash (apply-partially #'magit-log-wash-log 'reflog)
+      "reflog" "show" "--format=%h%x00%aN%x00%gd%x00%gs" "--date=raw"
+      magit-buffer-log-args magit-buffer-refname "--")))
+
+(cl-defmethod magit-buffer-value (&context (major-mode magit-reflog-mode))
+  magit-buffer-refname)
+
+(defvar magit-reflog-labels
+  '(("commit"      . magit-reflog-commit)
+    ("amend"       . magit-reflog-amend)
+    ("merge"       . magit-reflog-merge)
+    ("checkout"    . magit-reflog-checkout)
+    ("branch"      . magit-reflog-checkout)
+    ("reset"       . magit-reflog-reset)
+    ("rebase"      . magit-reflog-rebase)
+    ("rewritten"   . magit-reflog-rebase)
+    ("cherry-pick" . magit-reflog-cherry-pick)
+    ("initial"     . magit-reflog-commit)
+    ("pull"        . magit-reflog-remote)
+    ("clone"       . magit-reflog-remote)
+    ("autosave"    . magit-reflog-commit)
+    ("restart"     . magit-reflog-reset)))
+
+(defun magit-reflog-format-subject (subject)
+  (let* ((match (string-match magit-reflog-subject-re subject))
+         (command (and match (match-str 1 subject)))
+         (option  (and match (match-str 2 subject)))
+         (type    (and match (match-str 3 subject)))
+         (label (if (string= command "commit")
+                    (or type command)
+                  command))
+         (text (if (string= command "commit")
+                   label
+                 (string-join (delq nil (list command option type)) " "))))
+    (format "%-16s "
+            (magit--propertize-face
+             text (or (cdr (assoc label magit-reflog-labels))
+                      'magit-reflog-other)))))
+
+;;; _
+(provide 'magit-reflog)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-reflog.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reflog.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reflog.elc
new file mode 100644
index 0000000..cdf9133
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reflog.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-refs.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-refs.el
new file mode 100644
index 0000000..fc918e9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-refs.el
@@ -0,0 +1,830 @@
+;;; magit-refs.el --- Listing references  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for listing references in a buffer.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Options
+
+(defgroup magit-refs nil
+  "Inspect and manipulate Git branches and tags."
+  :link '(info-link "(magit)References Buffer")
+  :group 'magit-modes)
+
+(defcustom magit-refs-mode-hook nil
+  "Hook run after entering Magit-Refs mode."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-refs
+  :type 'hook)
+
+(defcustom magit-refs-sections-hook
+  (list #'magit-insert-error-header
+        #'magit-insert-branch-description
+        #'magit-insert-local-branches
+        #'magit-insert-remote-branches
+        #'magit-insert-tags)
+  "Hook run to insert sections into a references buffer."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-refs
+  :type 'hook)
+
+(defcustom magit-refs-show-commit-count nil
+  "Whether to show commit counts in Magit-Refs mode buffers.
+
+all    Show counts for branches and tags.
+branch Show counts for branches only.
+nil    Never show counts.
+
+To change the value in an existing buffer use the command
+`magit-refs-set-show-commit-count'."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-refs
+  :safe (##memq % '(all branch nil))
+  :type '(choice (const :tag "For branches and tags" all)
+                 (const :tag "For branches only"     branch)
+                 (const :tag "Never"                 nil)))
+(put 'magit-refs-show-commit-count 'safe-local-variable 'symbolp)
+(put 'magit-refs-show-commit-count 'permanent-local t)
+
+(defcustom magit-refs-pad-commit-counts nil
+  "Whether to pad all counts on all sides in `magit-refs-mode' buffers.
+
+If this is nil, then some commit counts are displayed right next
+to one of the branches that appear next to the count, without any
+space in between.  This might look bad if the branch name faces
+look too similar to `magit-dimmed'.
+
+If this is non-nil, then spaces are placed on both sides of all
+commit counts."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-refs
+  :type 'boolean)
+
+(defvar magit-refs-show-push-remote nil
+  "Whether to show the push-remotes of local branches.
+Also show the commits that the local branch is ahead and behind
+the push-target.  Unfortunately there is a bug in Git that makes
+this useless (the commits ahead and behind the upstream are
+shown), so this isn't enabled yet.")
+
+(defcustom magit-refs-show-remote-prefix nil
+  "Whether to show the remote prefix in lists of remote branches.
+
+This is redundant because the name of the remote is already shown
+in the heading preceding the list of its branches."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-refs
+  :type 'boolean)
+
+(defcustom magit-refs-show-branch-descriptions nil
+  "Whether to show the description, if any, of local branches.
+To distinguish branch descriptions from the commit summary of the tip,
+which is shown when there is no description or this option is disabled,
+descriptions use the bold face."
+  :package-version '(magit . "4.3.0")
+  :group 'magit-refs
+  :type 'boolean)
+
+(defcustom magit-refs-margin
+  (list nil
+        (nth 1 magit-log-margin)
+        'magit-log-margin-width nil
+        (nth 4 magit-log-margin))
+  "Format of the margin in `magit-refs-mode' buffers.
+
+The value has the form (INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH).
+
+If INIT is non-nil, then the margin is shown initially.
+STYLE controls how to format the author or committer date.
+  It can be one of `age' (to show the age of the commit),
+  `age-abbreviated' (to abbreviate the time unit to a character),
+  or a string (suitable for `format-time-string') to show the
+  actual date.  Option `magit-log-margin-show-committer-date'
+  controls which date is being displayed.
+WIDTH controls the width of the margin.  This exists for forward
+  compatibility and currently the value should not be changed.
+AUTHOR controls whether the name of the author is also shown by
+  default.
+AUTHOR-WIDTH has to be an integer.  When the name of the author
+  is shown, then this specifies how much space is used to do so."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-refs
+  :group 'magit-margin
+  :safe (##memq % '(all branch nil))
+  :type magit-log-margin--custom-type
+  :initialize #'magit-custom-initialize-reset
+  :set-after '(magit-log-margin)
+  :set (apply-partially #'magit-margin-set-variable 'magit-refs-mode))
+
+(defcustom magit-refs-margin-for-tags nil
+  "Whether to show information about tags in the margin.
+
+This is disabled by default because it is slow if there are many
+tags."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-refs
+  :group 'magit-margin
+  :type 'boolean)
+
+(defcustom magit-refs-primary-column-width '(16 . 32)
+  "Width of the focus column in `magit-refs-mode' buffers.
+
+The primary column is the column that contains the name of the
+branch that the current row is about.
+
+If this is an integer, then the column is that many columns wide.
+Otherwise it has to be a cons-cell of two integers.  The first
+specifies the minimal width, the second the maximal width.  In that
+case the actual width is determined using the length of the names
+of the shown local branches.  (Remote branches and tags are not
+taken into account when calculating to optimal width.)"
+  :package-version '(magit . "2.12.0")
+  :group 'magit-refs
+  :type '(choice (integer :tag "Constant wide")
+                 (cons    :tag "Wide constrains"
+                          (integer :tag "Minimum")
+                          (integer :tag "Maximum"))))
+
+(defcustom magit-refs-focus-column-width 5
+  "Width of the focus column in `magit-refs-mode' buffers.
+
+The focus column is the first column, which marks one
+branch (usually the current branch) as the focused branch using
+\"*\" or \"@\".  For each other reference, this column optionally
+shows how many commits it is ahead of the focused branch and \"<\", or
+if it isn't ahead then the commits it is behind and \">\", or if it
+isn't behind either, then a \"=\".
+
+This column may also display only \"*\" or \"@\" for the focused
+branch, in which case this option is ignored.  Use \"L v\" to
+change the verbosity of this column."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-refs
+  :type 'integer)
+
+(defcustom magit-refs-filter-alist nil
+  "Alist controlling which refs are omitted from `magit-refs-mode' buffers.
+
+The purpose of this option is to forgo displaying certain refs
+based on their name.  If you want to not display any refs of a
+certain type, then you should remove the appropriate function
+from `magit-refs-sections-hook' instead.
+
+All keys are tried in order until one matches.  Then its value
+is used and subsequent elements are ignored.  If the value is
+non-nil, then the reference is displayed, otherwise it is not.
+If no element matches, then the reference is displayed.
+
+A key can either be a regular expression that the refname has to
+match, or a function that takes the refname as only argument and
+returns a boolean.  A remote branch such as \"origin/master\" is
+displayed as just \"master\", however for this comparison the
+former is used."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-refs
+  :type '(alist :key-type   (choice  :tag "Key" regexp function)
+                :value-type (boolean :tag "Value"
+                                     :on  "show (non-nil)"
+                                     :off "omit (nil)")))
+
+(defcustom magit-visit-ref-behavior nil
+  "Control how `magit-visit-ref' behaves in `magit-refs-mode' buffers.
+
+By default `magit-visit-ref' behaves like `magit-show-commit',
+in all buffers, including `magit-refs-mode' buffers.  When the
+type of the section at point is `commit' then \"RET\" is bound to
+`magit-show-commit', and when the type is either `branch' or
+`tag' then it is bound to `magit-visit-ref'.
+
+\"RET\" is one of Magit's most essential keys and at least by
+default it should behave consistently across all of Magit,
+especially because users quickly learn that it does something
+very harmless; it shows more information about the thing at point
+in another buffer.
+
+However \"RET\" used to behave differently in `magit-refs-mode'
+buffers, doing surprising things, some of which cannot really be
+described as \"visit this thing\".  If you have grown accustomed
+to such inconsistent, but to you useful, behavior, then you can
+restore that by adding one or more of the below symbols to the
+value of this option.  But keep in mind that by doing so you
+don't only introduce inconsistencies, you also lose some
+functionality and might have to resort to `M-x magit-show-commit'
+to get it back.
+
+`magit-visit-ref' looks for these symbols in the order in which
+they are described here.  If the presence of a symbol applies to
+the current situation, then the symbols that follow do not affect
+the outcome.
+
+`focus-on-ref'
+
+  With a prefix argument update the buffer to show commit counts
+  and lists of cherry commits relative to the reference at point
+  instead of relative to the current buffer or `HEAD'.
+
+  Instead of adding this symbol, consider pressing \\`C-u y o RET'.
+
+`create-branch'
+
+  If point is on a remote branch, then create a new local branch
+  with the same name, use the remote branch as its upstream, and
+  then check out the local branch.
+
+  Instead of adding this symbol, consider pressing \"b c RET RET\",
+  like you would do in other buffers.
+
+`checkout-any'
+
+  Check out the reference at point.  If that reference is a tag
+  or a remote branch, then this results in a detached `HEAD'.
+
+  Instead of adding this symbol, consider pressing \"b b RET\",
+  like you would do in other buffers.
+
+`checkout-branch'
+
+  Check out the local branch at point.
+
+  Instead of adding this symbol, consider pressing \"b b RET\",
+  like you would do in other buffers."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-refs
+  :group 'magit-commands
+  :options '(focus-on-ref create-branch checkout-any checkout-branch)
+  :type '(list :convert-widget custom-hook-convert-widget))
+
+;;; Mode
+
+(defvar-keymap magit-refs-mode-map
+  :doc "Keymap for `magit-refs-mode'."
+  :parent magit-mode-map
+  "C-y" #'magit-refs-set-show-commit-count
+  "L"   #'magit-margin-settings)
+
+(define-derived-mode magit-refs-mode magit-mode "Magit Refs"
+  "Mode which lists and compares references.
+
+This mode is documented in info node `(magit)References Buffer'.
+
+\\<magit-mode-map>\
+Type \\[magit-refresh] to refresh the current buffer.
+Type \\[magit-section-toggle] to expand or hide the section at point.
+Type \\[magit-visit-thing] or \\[magit-diff-show-or-scroll-up] \
+to visit the commit or branch at point.
+
+Type \\[magit-branch] to see available branch commands.
+Type \\[magit-merge] to merge the branch or commit at point.
+Type \\[magit-cherry-pick] to apply the commit at point.
+Type \\[magit-reset] to reset `HEAD' to the commit at point.
+
+\\{magit-refs-mode-map}"
+  :interactive nil
+  :group 'magit-refs
+  (magit-hack-dir-local-variables)
+  (setq magit--imenu-group-types '(local remote tags)))
+
+(defvar-local magit-buffer-refs-args nil)
+(defvar-local magit-buffer-refs-upstream nil)
+
+(defun magit-refs-setup-buffer (ref args)
+  (magit-setup-buffer #'magit-refs-mode nil
+    (magit-buffer-refs-upstream ref)
+    (magit-buffer-refs-args args)))
+
+(defun magit-refs-refresh-buffer ()
+  (setq magit--right-margin-delayed (not (magit--right-margin-active)))
+  (unless (magit-rev-verify magit-buffer-refs-upstream)
+    (setq magit-refs-show-commit-count nil))
+  (magit-set-header-line-format
+   (format "%s %s" magit-buffer-refs-upstream
+           (string-join magit-buffer-refs-args " ")))
+  (magit-insert-section (branchbuf)
+    (magit-run-section-hook 'magit-refs-sections-hook))
+  (add-hook 'kill-buffer-hook #'magit-preserve-section-visibility-cache))
+
+(cl-defmethod magit-buffer-value (&context (major-mode magit-refs-mode))
+  (cons magit-buffer-refs-upstream magit-buffer-refs-args))
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-show-refs "magit-refs" nil t)
+(transient-define-prefix magit-show-refs (&optional transient)
+  "List and compare references in a dedicated buffer."
+  :man-page "git-branch"
+  :value (##magit-show-refs-arguments magit-prefix-use-buffer-arguments)
+  ["Arguments"
+   (magit-for-each-ref:--contains)
+   ("-M" "Merged"               "--merged=" magit-transient-read-revision)
+   ("-m" "Merged to HEAD"       "--merged")
+   ("-N" "Not merged"           "--no-merged=" magit-transient-read-revision)
+   ("-n" "Not merged to HEAD"   "--no-merged")
+   (magit-for-each-ref:--sort)]
+  ["Actions"
+   ("y" "Show refs, comparing them with HEAD"           magit-show-refs-head)
+   ("c" "Show refs, comparing them with current branch" magit-show-refs-current)
+   ("o" "Show refs, comparing them with other branch"   magit-show-refs-other)
+   ("r" "Show refs, changing commit count display"
+    magit-refs-set-show-commit-count)]
+  (interactive (list (or (derived-mode-p 'magit-refs-mode)
+                         current-prefix-arg)))
+  (if transient
+      (transient-setup 'magit-show-refs)
+    (magit-refs-setup-buffer "HEAD" (magit-show-refs-arguments))))
+
+(defun magit-show-refs-arguments (&optional use-buffer-args)
+  (unless use-buffer-args
+    (setq use-buffer-args magit-direct-use-buffer-arguments))
+  (cond-let*
+    ((eq transient-current-command 'magit-show-refs)
+     (transient-args 'magit-show-refs))
+    ((eq major-mode 'magit-refs-mode)
+     magit-buffer-refs-args)
+    ([_(memq use-buffer-args '(always selected))]
+     [buffer (magit-get-mode-buffer 'magit-refs-mode nil
+                                    (eq use-buffer-args 'selected))]
+     (buffer-local-value 'magit-buffer-refs-args buffer))
+    ((alist-get 'magit-show-refs transient-values))))
+
+(transient-define-argument magit-for-each-ref:--contains ()
+  :description "Contains"
+  :class 'transient-option
+  :key "-c"
+  :argument "--contains="
+  :reader #'magit-transient-read-revision)
+
+(transient-define-argument magit-for-each-ref:--sort ()
+  :description "Sort"
+  :class 'transient-option
+  :key "-s"
+  :argument "--sort="
+  :reader #'magit-read-ref-sort)
+
+(defun magit-read-ref-sort (prompt initial-input _history)
+  (magit-completing-read prompt
+                         '("-committerdate" "-authordate"
+                           "committerdate" "authordate")
+                         nil nil initial-input))
+
+;;;###autoload
+(defun magit-show-refs-head (&optional args)
+  "List and compare references in a dedicated buffer.
+Compared with `HEAD'."
+  (interactive (list (magit-show-refs-arguments)))
+  (magit-refs-setup-buffer "HEAD" args))
+
+;;;###autoload
+(defun magit-show-refs-current (&optional args)
+  "List and compare references in a dedicated buffer.
+Compare with the current branch or `HEAD' if it is detached."
+  (interactive (list (magit-show-refs-arguments)))
+  (magit-refs-setup-buffer (magit-get-current-branch) args))
+
+;;;###autoload
+(defun magit-show-refs-other (&optional ref args)
+  "List and compare references in a dedicated buffer.
+Compared with a branch read from the user."
+  (interactive (list (magit-read-other-branch "Compare with")
+                     (magit-show-refs-arguments)))
+  (magit-refs-setup-buffer ref args))
+
+(transient-define-suffix magit-refs-set-show-commit-count ()
+  "Change for which refs the commit count is shown."
+  :description "Change verbosity"
+  :key "v"
+  :transient nil
+  :if-derived 'magit-refs-mode
+  (interactive)
+  (setq-local magit-refs-show-commit-count
+              (magit-read-char-case "Show commit counts for " nil
+                (?a "[a]ll refs" 'all)
+                (?b "[b]ranches only" t)
+                (?n "[n]othing" nil)))
+  (magit-refresh))
+
+(defun magit-visit-ref ()
+  "Visit the reference or revision at point in another buffer.
+If there is no revision at point or with a prefix argument prompt
+for a revision.
+
+This command behaves just like `magit-show-commit', except if
+point is on a reference in a `magit-refs-mode' buffer (a buffer
+listing branches and tags), in which case the behavior may be
+different, but only if you have customized the option
+`magit-visit-ref-behavior' (which see).  When invoked from a
+menu this command always behaves like `magit-show-commit'."
+  (interactive)
+  (cond-let
+    ((not (and (derived-mode-p 'magit-refs-mode)
+               (magit-section-match '(branch tag))
+               (not (magit-menu-position))))
+     (call-interactively #'magit-show-commit))
+    [[ref (oref (magit-current-section) value)]]
+    ((and current-prefix-arg
+          (memq 'focus-on-ref magit-visit-ref-behavior))
+     (magit-refs-setup-buffer ref (magit-show-refs-arguments)))
+    ((and current-prefix-arg
+          magit-visit-ref-behavior
+          ;; Don't prompt for commit to visit.
+          (let ((current-prefix-arg nil))
+            (call-interactively #'magit-show-commit))))
+    ((and (memq 'create-branch magit-visit-ref-behavior)
+          (magit-section-match [branch remote]))
+     (let ((branch (cdr (magit-split-branch-name ref))))
+       (if (magit-branch-p branch)
+           (if (magit-rev-eq branch ref)
+               (magit-call-git "checkout" branch)
+             (setq branch (propertize branch 'face 'magit-branch-local))
+             (setq ref (propertize ref 'face 'magit-branch-remote))
+             (pcase (prog1 (read-char-choice (format (propertize "\
+Branch %s already exists.
+  [c]heckout %s as-is
+  [r]reset %s to %s and checkout %s
+  [a]bort " 'face 'minibuffer-prompt) branch branch branch ref branch)
+                                             '(?c ?r ?a))
+                      (message "")) ; otherwise prompt sticks
+               (?c (magit-call-git "checkout" branch))
+               (?r (magit-call-git "checkout" "-B" branch ref))
+               (?a (user-error "Abort"))))
+         (magit-call-git "checkout" "-b" branch ref))
+       (setq magit-buffer-refs-upstream branch)
+       (magit-refresh)))
+    ((or (memq 'checkout-any magit-visit-ref-behavior)
+         (and (memq 'checkout-branch magit-visit-ref-behavior)
+              (magit-section-match [branch local])))
+     (magit-call-git "checkout" ref)
+     (setq magit-buffer-refs-upstream ref)
+     (magit-refresh))
+    ((call-interactively #'magit-show-commit))))
+
+;;; Sections
+
+(defvar-keymap magit-remote-section-map
+  :doc "Keymap for `remote' sections."
+  "<remap> <magit-file-rename>"  #'magit-remote-rename
+  "<remap> <magit-delete-thing>" #'magit-remote-remove
+  "<2>" (magit-menu-item "Rename %s" #'magit-remote-rename)
+  "<1>" (magit-menu-item "Remove %m" #'magit-remote-remove))
+
+(defvar-keymap magit-branch-section-map
+  :doc "Keymap for `branch' sections."
+  "<remap> <magit-file-rename>"  #'magit-branch-rename
+  "<remap> <magit-delete-thing>" #'magit-branch-delete
+  "<remap> <magit-visit-thing>"  #'magit-visit-ref
+  "<3>" (magit-menu-item "Rename %s"    #'magit-branch-rename)
+  "<2>" (magit-menu-item "Delete %m"    #'magit-branch-delete)
+  "<1>" (magit-menu-item "Visit commit" #'magit-visit-ref))
+
+(defvar-keymap magit-shelved-branch-section-map
+  :doc "Keymap for `shelved-branch' sections."
+  "<remap> <magit-delete-thing>" #'magit-delete-shelved-branch)
+
+(defvar-keymap magit-tag-section-map
+  :doc "Keymap for `tag' sections."
+  "<remap> <magit-delete-thing>" #'magit-tag-delete
+  "<remap> <magit-visit-thing>"  #'magit-visit-ref
+  "<2>" (magit-menu-item "Delete %m" #'magit-tag-delete)
+  "<1>" (magit-menu-item "Visit %s"  #'magit-visit-ref))
+
+(defun magit--painted-branch-as-menu-section (section)
+  (and-let ((_(magit-section-match 'commit))
+            (branch (magit--painted-branch-at-point)))
+    (let ((dummy (magit-section :type 'branch :value branch)))
+      (oset dummy keymap magit-branch-section-map)
+      (dolist (slot '(start content hidden parent children))
+        (when (slot-boundp section slot)
+          (setf (eieio-oref dummy slot)
+                (eieio-oref section slot))))
+      dummy)))
+
+(add-hook 'magit-menu-alternative-section-hook
+          #'magit--painted-branch-as-menu-section)
+
+(defun magit-insert-branch-description ()
+  "Insert header containing the description of the current branch.
+Insert a header line with the name and description of the
+current branch.  The description is taken from the Git variable
+`branch.<NAME>.description'; if that is undefined then no header
+line is inserted at all."
+  (when-let* ((branch (magit-get-current-branch))
+              (desc (magit-get "branch" branch "description"))
+              (desc (split-string desc "\n")))
+    (when (equal (car (last desc)) "")
+      (setq desc (butlast desc)))
+    (magit-insert-section (branchdesc branch t)
+      (magit-insert-heading branch ": " (car desc))
+      (when (cdr desc)
+        (insert (string-join (cdr desc) "\n"))
+        (insert "\n\n")))))
+
+(defun magit-insert-tags ()
+  "Insert sections showing all tags."
+  (when-let ((tags (magit-git-lines "tag" "--list" "-n" magit-buffer-refs-args)))
+    (let ((_head (magit-rev-parse "HEAD")))
+      (magit-insert-section (tags)
+        (magit-insert-heading (length tags) "Tags")
+        (dolist (tag tags)
+          (string-match "^\\([^ \t]+\\)[ \t]+\\([^ \t\n].*\\)?" tag)
+          (let ((tag (match-str 1 tag))
+                (msg (match-str 2 tag)))
+            (when (magit-refs--insert-refname-p tag)
+              (magit-insert-section (tag tag t)
+                (magit-insert-heading
+                  (magit-refs--format-focus-column tag 'tag)
+                  (propertize tag 'font-lock-face 'magit-tag)
+                  (make-string
+                   (max 1 (- (if (consp magit-refs-primary-column-width)
+                                 (car magit-refs-primary-column-width)
+                               magit-refs-primary-column-width)
+                             (length tag)))
+                   ?\s)
+                  (and msg (magit-log--wash-summary msg)))
+                (when magit-refs-margin-for-tags
+                  (magit-refs--maybe-format-margin tag))
+                (magit-refs--insert-cherry-commits tag)))))
+        (insert ?\n)
+        (magit-make-margin-overlay)))))
+
+(defun magit-insert-remote-branches ()
+  "Insert sections showing all remote-tracking branches."
+  (dolist (remote (magit-list-remotes))
+    (magit-insert-section (remote remote)
+      (magit-insert-heading
+        (let ((pull (magit-get "remote" remote "url"))
+              (push (magit-get "remote" remote "pushurl")))
+          (format (propertize "Remote %s (%s):"
+                              'font-lock-face 'magit-section-heading)
+                  (propertize remote 'font-lock-face 'magit-branch-remote)
+                  (concat pull (and pull push ", ") push))))
+      (let (head)
+        (dolist (line (magit-git-lines "for-each-ref" "--format=\
+%(symref:short)%00%(refname:short)%00%(refname)%00%(subject)"
+                                       (concat "refs/remotes/" remote)
+                                       magit-buffer-refs-args))
+          (pcase-let ((`(,head-branch ,branch ,ref ,msg)
+                       (cl-substitute nil ""
+                                      (split-string line "\0")
+                                      :test #'equal)))
+            (cond
+              (head-branch
+               ;; Note: Use `ref' instead of `branch' for the check
+               ;; below because 'refname:short' shortens the remote
+               ;; HEAD to '<remote>' instead of '<remote>/HEAD' as of
+               ;; Git v2.40.0.
+               (cl-assert
+                (equal ref (concat "refs/remotes/" remote "/HEAD")))
+               (setq head head-branch))
+              ((not (equal ref (concat "refs/remotes/" remote "/HEAD")))
+               ;; ^ Skip mis-configured remotes where HEAD is not a
+               ;; symref.  See #5092.
+               (when (magit-refs--insert-refname-p branch)
+                 (magit-insert-section (branch branch t)
+                   (let ((headp (equal branch head))
+                         (abbrev (if magit-refs-show-remote-prefix
+                                     branch
+                                   (substring branch (1+ (length remote))))))
+                     (magit-insert-heading
+                       (magit-refs--format-focus-column branch)
+                       (magit-refs--propertize-branch
+                        abbrev ref (and headp 'magit-branch-remote-head))
+                       (make-string
+                        (max 1 (- (if (consp magit-refs-primary-column-width)
+                                      (car magit-refs-primary-column-width)
+                                    magit-refs-primary-column-width)
+                                  (length abbrev)))
+                        ?\s)
+                       (and msg (magit-log--wash-summary msg))))
+                   (magit-refs--maybe-format-margin branch)
+                   (magit-refs--insert-cherry-commits branch))))))))
+      (insert ?\n)
+      (magit-make-margin-overlay))))
+
+(defun magit-insert-local-branches ()
+  "Insert sections showing all local branches."
+  (magit-insert-section (local nil)
+    (magit-insert-heading t "Branches")
+    (dolist (line (magit-refs--format-local-branches))
+      (pcase-let ((`(,branch . ,strings) line))
+        (magit-insert-section
+            ((eval (if branch 'branch 'commit))
+             (or branch (magit-rev-parse "HEAD"))
+             t)
+          (apply #'magit-insert-heading strings)
+          (magit-refs--maybe-format-margin branch)
+          (magit-refs--insert-cherry-commits branch))))
+    (insert ?\n)
+    (magit-make-margin-overlay)))
+
+(defun magit-insert-shelved-branches ()
+  "Insert sections showing all shelved branches."
+  (when-let ((refs (magit-list-refs "refs/shelved/")))
+    (magit-insert-section (shelved nil t)
+      (magit-insert-heading t "Shelved branches")
+      (dolist (ref (nreverse refs))
+        (magit-insert-section (shelved-branch ref t)
+          (magit-insert-heading
+            "  " (magit--propertize-face (substring ref 13) 'magit-refname))
+          (magit-refs--maybe-format-margin ref)
+          (magit-refs--insert-cherry-commits ref)))
+      (insert ?\n)
+      (magit-make-margin-overlay))))
+
+(defun magit-refs--format-local-branches ()
+  (let ((lines (seq-keep #'magit-refs--format-local-branch
+                         (magit-git-lines
+                          "for-each-ref"
+                          (concat "--format=\
+%(HEAD)%00%(refname:short)%00%(refname)%00\
+%(upstream:short)%00%(upstream)%00%(upstream:track)%00"
+                                  (if magit-refs-show-push-remote "\
+%(push:remotename)%00%(push)%00%(push:track)%00%(subject)"
+                                    "%00%00%00%(subject)"))
+                          "refs/heads"
+                          magit-buffer-refs-args))))
+    (unless (magit-get-current-branch)
+      (push (magit-refs--format-local-branch
+             (concat "*\0\0\0\0\0\0\0\0" (magit-rev-format "%s")))
+            lines))
+    (setq-local magit-refs-primary-column-width
+                (let ((def (default-value 'magit-refs-primary-column-width)))
+                  (if (atom def)
+                      def
+                    (pcase-let ((`(,min . ,max) def))
+                      (min max (apply #'max min (mapcar #'car lines)))))))
+    (mapcar (pcase-lambda (`( ,_ ,branch ,focus
+                   ,branch-desc ,u:ahead ,p:ahead
+                   ,u:behind ,upstream ,p:behind ,msg))
+              (list branch focus branch-desc u:ahead p:ahead
+                    (make-string (max 1 (- magit-refs-primary-column-width
+                                           (length (concat branch-desc
+                                                           u:ahead
+                                                           p:ahead
+                                                           u:behind))))
+                                 ?\s)
+                    u:behind upstream p:behind msg))
+            lines)))
+
+(defun magit-refs--format-local-branch (line)
+  (pcase-let ((`(,head ,branch ,ref ,upstream ,u:ref ,u:track
+                       ,push ,p:ref ,p:track ,msg)
+               (cl-substitute nil "" (split-string line "\0") :test #'equal)))
+    (when (or (not branch)
+              (magit-refs--insert-refname-p branch))
+      (let* ((headp (equal head "*"))
+             (pushp (and push
+                         magit-refs-show-push-remote
+                         (magit-rev-verify p:ref)
+                         (not (equal p:ref u:ref))))
+             (branch-pretty
+              (if branch
+                  (magit-refs--propertize-branch
+                   branch ref (and headp 'magit-branch-current))
+                (magit--propertize-face "(detached)" 'magit-branch-warning)))
+             (u:ahead  (and u:track
+                            (string-match "ahead \\([0-9]+\\)" u:track)
+                            (magit--propertize-face
+                             (concat (and magit-refs-pad-commit-counts " ")
+                                     (match-str 1 u:track)
+                                     ">")
+                             'magit-dimmed)))
+             (u:behind (and u:track
+                            (string-match "behind \\([0-9]+\\)" u:track)
+                            (magit--propertize-face
+                             (concat "<"
+                                     (match-str 1 u:track)
+                                     (and magit-refs-pad-commit-counts " "))
+                             'magit-dimmed)))
+             (p:ahead  (and pushp p:track
+                            (string-match "ahead \\([0-9]+\\)" p:track)
+                            (magit--propertize-face
+                             (concat (match-str 1 p:track)
+                                     ">"
+                                     (and magit-refs-pad-commit-counts " "))
+                             'magit-branch-remote)))
+             (p:behind (and pushp p:track
+                            (string-match "behind \\([0-9]+\\)" p:track)
+                            (magit--propertize-face
+                             (concat "<"
+                                     (match-str 1 p:track)
+                                     (and magit-refs-pad-commit-counts " "))
+                             'magit-dimmed))))
+        (list (1+ (length (concat branch-pretty u:ahead p:ahead u:behind)))
+              branch
+              (magit-refs--format-focus-column branch headp)
+              branch-pretty u:ahead p:ahead
+              u:behind
+              (and upstream
+                   (concat (if (equal u:track "[gone]")
+                               (magit--propertize-face upstream 'error)
+                             (magit-refs--propertize-branch upstream u:ref))
+                           " "))
+              (and pushp
+                   (concat p:behind
+                           (magit--propertize-face
+                            push 'magit-branch-remote)
+                           " "))
+              (if-let ((_ magit-refs-show-branch-descriptions)
+                       (desc (magit-get "branch" branch "description")))
+                  (magit--propertize-face desc 'bold)
+                (and msg (magit-log--wash-summary msg))))))))
+
+(defun magit-refs--format-focus-column (ref &optional type)
+  (let ((focus magit-buffer-refs-upstream)
+        (width (if magit-refs-show-commit-count
+                   magit-refs-focus-column-width
+                 1)))
+    (format
+     (format "%%%ss " width)
+     (cond ((or (equal ref focus)
+                (and (eq type t)
+                     (equal focus "HEAD")))
+            (magit--propertize-face (concat (if (equal focus "HEAD") "@" "*")
+                                            (make-string (1- width) ?\s))
+                                    'magit-section-heading))
+           ((if (eq type 'tag)
+                (eq magit-refs-show-commit-count 'all)
+              magit-refs-show-commit-count)
+            (pcase-let ((`(,behind ,ahead)
+                         (magit-rev-diff-count magit-buffer-refs-upstream ref)))
+              (magit--propertize-face
+               (cond ((> ahead  0) (concat "<" (number-to-string ahead)))
+                     ((> behind 0) (concat (number-to-string behind) ">"))
+                     ("="))
+               'magit-dimmed)))
+           ("")))))
+
+(defun magit-refs--propertize-branch (branch ref &optional head-face)
+  (let ((face (cdr (cl-find-if (pcase-lambda (`(,re . ,_))
+                                 (string-match-p re ref))
+                               magit-ref-namespaces))))
+    (magit--propertize-face
+     branch (if head-face (list face head-face) face))))
+
+(defun magit-refs--insert-refname-p (refname)
+  (if-let ((entry (seq-find (pcase-lambda (`(,key . ,_))
+                              (if (functionp key)
+                                  (funcall key refname)
+                                (string-match-p key refname)))
+                            magit-refs-filter-alist)))
+      (cdr entry)
+    t))
+
+(defun magit-refs--insert-cherry-commits (ref)
+  (magit-insert-section-body
+    (let ((start (point))
+          (magit-insert-section--current nil))
+      (magit-git-wash (apply-partially #'magit-log-wash-log 'cherry)
+        "cherry" "-v" (magit-abbrev-arg) magit-buffer-refs-upstream ref)
+      (if (= (point) start)
+          (message "No cherries for %s" ref)
+        (magit-make-margin-overlay)))))
+
+(defun magit-refs--maybe-format-margin (rev)
+  (when (magit--right-margin-active)
+    (if-let ((line (magit-rev-format "%cN%x00%ct" rev)))
+        (apply #'magit-log-format-margin rev (split-string line "\0"))
+      (magit-make-margin-overlay))))
+
+;;; _
+(provide 'magit-refs)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-refs.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-refs.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-refs.elc
new file mode 100644
index 0000000..a5c5b45
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-refs.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-remote.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-remote.el
new file mode 100644
index 0000000..bc7d725
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-remote.el
@@ -0,0 +1,435 @@
+;;; magit-remote.el --- Transfer Git commits  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements remote commands.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Options
+
+(defcustom magit-remote-add-set-remote.pushDefault 'ask-if-unset
+  "Whether to set the value of `remote.pushDefault' after adding a remote.
+
+If `ask', then always ask.  If `ask-if-unset', then ask, but only
+if the variable isn't set already.  If nil, then don't ever set.
+If the value is a string, then set without asking, provided that
+the name of the added remote is equal to that string and the
+variable isn't already set."
+  :package-version '(magit . "2.4.0")
+  :group 'magit-commands
+  :type '(choice (const  :tag "Ask if unset" ask-if-unset)
+                 (const  :tag "Always ask" ask)
+                 (string :tag "Set if named")
+                 (const  :tag "Don't set")))
+
+(defcustom magit-remote-direct-configure t
+  "Whether the command `magit-remote' shows Git variables.
+When set to nil, no variables are displayed by this transient
+command, instead the sub-transient `magit-remote-configure'
+has to be used to view and change remote related variables."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defcustom magit-prefer-push-default nil
+  "Whether to prefer `remote.pushDefault' over per-branch variables."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-remote "magit-remote" nil t)
+(transient-define-prefix magit-remote (remote)
+  "Add, configure or remove a remote."
+  :man-page "git-remote"
+  :value '("-f")
+  ["Variables"
+   :if (##and magit-remote-direct-configure (transient-scope))
+   ("u" magit-remote.<remote>.url)
+   ("U" magit-remote.<remote>.fetch)
+   ("s" magit-remote.<remote>.pushurl)
+   ("S" magit-remote.<remote>.push)
+   ("O" magit-remote.<remote>.tagopt)
+   ("h" magit-remote.<remote>.followremotehead)]
+  ["Arguments for add"
+   ("-f" "Fetch after add" "-f")]
+  ["Actions"
+   [("a" "Add"                  magit-remote-add)
+    ("r" "Rename"               magit-remote-rename)
+    ("k" "Remove"               magit-remote-remove)]
+   [("C" "Configure..."         magit-remote-configure)
+    ("p" "Prune stale branches" magit-remote-prune)
+    ("P" "Prune stale refspecs" magit-remote-prune-refspecs)
+    (7 "z" "Unshallow remote"   magit-remote-unshallow)]
+   [("d u" magit-update-default-branch)]]
+  (interactive (list (magit-get-current-remote)))
+  (transient-setup 'magit-remote nil nil :scope remote))
+
+(defun magit-read-url (prompt &optional initial-input)
+  (let ((url (magit-read-string-ns prompt initial-input)))
+    (if (string-prefix-p "~" url)
+        (expand-file-name url)
+      url)))
+
+;;;###autoload
+(defun magit-remote-add (remote url &optional args)
+  "Add a remote named REMOTE and fetch it."
+  (interactive
+    (let ((origin (magit-get "remote.origin.url"))
+          (remote (magit-read-string-ns "Remote name")))
+      (list remote
+            (magit-read-url
+             "Remote url"
+             (and origin
+                  (string-match "\\([^:/]+\\)/[^/]+\\(\\.git\\)?\\'" origin)
+                  (replace-match remote t t origin 1)))
+            (transient-args 'magit-remote))))
+  (cond ((pcase (list magit-remote-add-set-remote.pushDefault
+                      (magit-get "remote.pushDefault"))
+           (`(,(pred stringp) ,_) t)
+           ((or `(ask ,_) '(ask-if-unset nil))
+            (y-or-n-p (format "Set `remote.pushDefault' to \"%s\"? " remote))))
+         (magit-call-git "remote" "add" args remote url)
+         (setf (magit-get "remote.pushDefault") remote)
+         (magit-refresh))
+        ((magit-run-git-async "remote" "add" args remote url))))
+
+;;;###autoload
+(defun magit-remote-rename (old new)
+  "Rename the remote named OLD to NEW."
+  (interactive
+    (let  ((remote (magit-read-remote "Rename remote")))
+      (list remote (magit-read-string-ns (format "Rename %s to" remote)))))
+  (unless (string= old new)
+    (magit-call-git "remote" "rename" old new)
+    (magit-remote--cleanup-push-variables old new)
+    (magit-refresh)))
+
+;;;###autoload
+(defun magit-remote-remove (remote)
+  "Delete the remote named REMOTE."
+  (interactive (list (magit-read-remote "Delete remote")))
+  (magit-call-git "remote" "rm" remote)
+  (magit-remote--cleanup-push-variables remote)
+  (magit-refresh))
+
+(defun magit-remote--cleanup-push-variables (remote &optional new-name)
+  (magit-with-toplevel
+    (when (equal (magit-get "remote.pushDefault") remote)
+      (magit-set new-name "remote.pushDefault"))
+    (dolist (var (magit-git-lines "config" "--name-only"
+                                  "--get-regexp" "^branch\\.[^.]*\\.pushRemote"
+                                  (format "^%s$" remote)))
+      (magit-call-git "config" (and (not new-name) "--unset") var new-name))))
+
+(defconst magit--refspec-re "\\`\\(\\+\\)?\\([^:]+\\):\\(.*\\)\\'")
+
+;;;###autoload
+(defun magit-remote-prune (remote)
+  "Remove stale remote-tracking branches for REMOTE."
+  (interactive (list (magit-read-remote "Prune stale branches of remote")))
+  (magit-run-git-async "remote" "prune" remote))
+
+;;;###autoload
+(defun magit-remote-prune-refspecs (remote)
+  "Remove stale refspecs for REMOTE.
+
+A refspec is stale if there no longer exists at least one branch
+on the remote that would be fetched due to that refspec.  A stale
+refspec is problematic because its existence causes Git to refuse
+to fetch according to the remaining non-stale refspecs.
+
+If only stale refspecs remain, then offer to either delete the
+remote or to replace the stale refspecs with the default refspec.
+
+Also remove the remote-tracking branches that were created due to
+the now stale refspecs.  Other stale branches are not removed."
+  (interactive (list (magit-read-remote "Prune refspecs of remote")))
+  (let* ((tracking-refs (magit-list-remote-branches remote))
+         (remote-refs (magit-remote-list-refs remote))
+         (variable (format "remote.%s.fetch" remote))
+         (refspecs (magit-get-all variable))
+         stale)
+    (dolist (refspec refspecs)
+      (when (string-match magit--refspec-re refspec)
+        (let ((theirs (match-str 2 refspec))
+              (ours   (match-str 3 refspec)))
+          (unless (if (string-match "\\*" theirs)
+                      (let ((re (replace-match ".*" t t theirs)))
+                        (seq-some (##string-match-p re %) remote-refs))
+                    (member theirs remote-refs))
+            (push (cons refspec
+                        (if (string-match "\\*" ours)
+                            (let ((re (replace-match ".*" t t ours)))
+                              (seq-filter (##string-match-p re %)
+                                          tracking-refs))
+                          (list (car (member ours tracking-refs)))))
+                  stale)))))
+    (if (not stale)
+        (message "No stale refspecs for remote %S" remote)
+      (if (= (length stale)
+             (length refspecs))
+          (magit-read-char-case
+              (format "All of %s's refspecs are stale.  " remote) nil
+            (?s "replace with [d]efault refspec"
+                (magit-set-all
+                 (list (format "+refs/heads/*:refs/remotes/%s/*" remote))
+                 variable))
+            (?r "[r]emove remote"
+                (magit-call-git "remote" "rm" remote))
+            (?a "[a]abort"
+                (user-error "Abort")))
+        (if (if (length= stale 1)
+                (pcase-let ((`(,refspec . ,refs) (car stale)))
+                  (magit-confirm 'prune-stale-refspecs
+                    (list "Prune stale refspec %s and branch %%s" refspec)
+                    (list "Prune stale refspec %s and %%d branches" refspec)
+                    nil refs))
+              (magit-confirm 'prune-stale-refspecs nil
+                (format "Prune %%d stale refspecs and %d branches"
+                        (length (mapcan (##copy-sequence (cdr %)) stale)))
+                nil
+                (mapcar (pcase-lambda (`(,refspec . ,refs))
+                          (concat refspec "\n"
+                                  (mapconcat (##concat "  " %) refs "\n")))
+                        stale)))
+            (pcase-dolist (`(,refspec . ,refs) stale)
+              (magit-call-git "config" "--unset" variable
+                              (regexp-quote refspec))
+              (magit--log-action
+               (lambda (refs)
+                 (format "Deleting %d branches" (length refs)))
+               (lambda (ref)
+                 (format "Deleting branch %s (was %s)" ref
+                         (magit-rev-parse "--short" ref)))
+               refs)
+              (dolist (ref refs)
+                (magit-call-git "update-ref" "-d" ref)))
+          (user-error "Abort")))
+      (magit-refresh))))
+
+;;;###autoload
+(defun magit-remote-set-head (remote &optional branch)
+  "Set the local representation of REMOTE's default branch.
+Query REMOTE and set the symbolic-ref refs/remotes/<remote>/HEAD
+accordingly.  With a prefix argument query for the branch to be
+used, which allows you to select an incorrect value if you fancy
+doing that."
+  (interactive
+    (let  ((remote (magit-read-remote "Set HEAD for remote")))
+      (list remote
+            (and current-prefix-arg
+                 (magit-read-remote-branch (format "Set %s/HEAD to" remote)
+                                           remote nil nil t)))))
+  (magit-run-git "remote" "set-head" remote (or branch "--auto")))
+
+;;;###autoload
+(defun magit-remote-unset-head (remote)
+  "Unset the local representation of REMOTE's default branch.
+Delete the symbolic-ref \"refs/remotes/<remote>/HEAD\"."
+  (interactive (list (magit-read-remote "Unset HEAD for remote")))
+  (magit-run-git "remote" "set-head" remote "--delete"))
+
+;;;###autoload(autoload 'magit-update-default-branch "magit-remote" nil t)
+(transient-define-suffix magit-update-default-branch ()
+  "Update name of the default branch after upstream changed it."
+  :description "Update default branch"
+  :inapt-if-not #'magit-get-some-remote
+  (interactive)
+  (pcase-let ((`(,_remote ,oldname) (magit--get-default-branch))
+              (`( ,remote ,newname) (magit--get-default-branch t)))
+    (cond
+      ((equal oldname newname)
+       (setq oldname
+             (read-string
+              (format
+               "Name of default branch is still `%s', %s\n%s `%s': " oldname
+               "but the upstreams of some local branches might need updating."
+               "Name of upstream branches to replace with" newname)))
+       (magit--set-default-branch newname oldname)
+       (magit-refresh))
+      (t
+       (unless oldname
+         (setq oldname
+               (magit-read-other-local-branch
+                (format "Name of old default branch to be renamed to `%s'"
+                        newname)
+                newname "master")))
+       (cond
+         ((y-or-n-p (format "Default branch changed from `%s' to `%s' on %s.%s?"
+                            oldname newname remote "  Do the same locally"))
+          (magit--set-default-branch newname oldname)
+          (magit-refresh))
+         ((user-error "Abort")))))))
+
+;;;###autoload
+(defun magit-remote-unshallow (remote)
+  "Convert a shallow remote into a full one.
+If only a single refspec is set and it does not contain a
+wildcard, then also offer to replace it with the standard
+refspec."
+  (interactive (list (or (magit-get-current-remote)
+                         (magit-read-remote "Delete remote"))))
+  (let ((refspecs (magit-get-all "remote" remote "fetch"))
+        (standard (format "+refs/heads/*:refs/remotes/%s/*" remote)))
+    (when (and (length= refspecs 1)
+               (not (string-search "*" (car refspecs)))
+               (yes-or-no-p (format "Also replace refspec %s with %s? "
+                                    (car refspecs)
+                                    standard)))
+      (magit-set standard "remote" remote "fetch"))
+    (magit-git-fetch "--unshallow" remote)))
+
+;;; Configure
+
+;;;###autoload(autoload 'magit-remote-configure "magit-remote" nil t)
+(transient-define-prefix magit-remote-configure (remote)
+  "Configure a remote."
+  :man-page "git-remote"
+  [:description (##concat
+                 (propertize "Configure " 'face 'transient-heading)
+                 (propertize (transient-scope) 'face 'magit-branch-remote))
+   ("u" magit-remote.<remote>.url)
+   ("U" magit-remote.<remote>.fetch)
+   ("s" magit-remote.<remote>.pushurl)
+   ("S" magit-remote.<remote>.push)
+   ("O" magit-remote.<remote>.tagopt)
+   ("h" magit-remote.<remote>.followremotehead)]
+  (interactive
+    (list (or (and (not current-prefix-arg)
+                   (not (and magit-remote-direct-configure
+                             (eq transient-current-command 'magit-remote)))
+                   (magit-get-current-remote))
+              (magit--read-remote-scope))))
+  (transient-setup 'magit-remote-configure nil nil :scope remote))
+
+(defun magit--read-remote-scope (&optional obj)
+  (magit-read-remote
+   (if obj
+       (format "Set %s for remote"
+               (format (oref obj variable) "<name>"))
+     "Configure remote")))
+
+(transient-define-infix magit-remote.<remote>.url ()
+  :class 'magit--git-variable:urls
+  :scope #'magit--read-remote-scope
+  :variable "remote.%s.url"
+  :multi-value t
+  :history-key 'magit-remote.<remote>.*url)
+
+(transient-define-infix magit-remote.<remote>.fetch ()
+  :class 'magit--git-variable
+  :scope #'magit--read-remote-scope
+  :variable "remote.%s.fetch"
+  :multi-value t)
+
+(transient-define-infix magit-remote.<remote>.pushurl ()
+  :class 'magit--git-variable:urls
+  :scope #'magit--read-remote-scope
+  :variable "remote.%s.pushurl"
+  :multi-value t
+  :history-key 'magit-remote.<remote>.*url
+  :seturl-arg "--push")
+
+(transient-define-infix magit-remote.<remote>.push ()
+  :class 'magit--git-variable
+  :scope #'magit--read-remote-scope
+  :variable "remote.%s.push")
+
+(transient-define-infix magit-remote.<remote>.tagopt ()
+  :class 'magit--git-variable:choices
+  :scope #'magit--read-remote-scope
+  :variable "remote.%s.tagOpt"
+  :choices '("--no-tags" "--tags"))
+
+(transient-define-infix magit-remote.<remote>.followremotehead ()
+  "How \"git fetch\" handles updates to \"remotes/<remote>/HEAD\".
+
+This command sets the local value of the Git variable
+`remote.<remote>.followRemoteHEAD', where <remote> is a stand-in for
+the actual remote, as displayed in the menu, from which this command
+is invoked.  This variable is documented in (man \"git-config(1)\").
+
+Unfortunately Git does not provide a variable to set a default for
+all remotes of all repositories, but you can set the global value for
+a remote name used in multiple repository, which will then be used as
+the default for that remote in all repositories.  You should consider
+using \"always\" for remotes named \"origin\".
+
+  git config set --global remote.origin.followRemoteHEAD always"
+  :class 'magit--git-variable:choices
+  :scope #'magit--read-remote-scope
+  :variable "remote.%s.followRemoteHEAD"
+  :choices '("create" "always" "warn")
+  :default "create")
+
+;;; Transfer Utilities
+
+(defun magit--push-remote-variable (&optional branch short)
+  (unless branch
+    (setq branch (magit-get-current-branch)))
+  (magit--propertize-face
+   (if (or (not branch) magit-prefer-push-default)
+       (if short "pushDefault" "remote.pushDefault")
+     (if short "pushRemote" (format "branch.%s.pushRemote" branch)))
+   'bold))
+
+(defun magit--select-push-remote (prompt-suffix)
+  (let* ((branch (or (magit-get-current-branch)
+                     (user-error "No branch is checked out")))
+         (remote (magit-get-push-remote branch))
+         (changed nil))
+    (when (or current-prefix-arg
+              (not remote)
+              (not (member remote (magit-list-remotes))))
+      (setq changed t)
+      (setq remote
+            (magit-read-remote (format "Set %s and %s"
+                                       (magit--push-remote-variable)
+                                       prompt-suffix)))
+      (setf (magit-get (magit--push-remote-variable branch)) remote))
+    (list branch remote changed)))
+
+;;; _
+(provide 'magit-remote)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-remote.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-remote.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-remote.elc
new file mode 100644
index 0000000..c3fca57
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-remote.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-repos.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-repos.el
new file mode 100644
index 0000000..71663bb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-repos.el
@@ -0,0 +1,579 @@
+;;; magit-repos.el --- Listing repositories  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for listing repositories.  This
+;; includes getting a Lisp list of known repositories as well as a
+;; mode for listing repositories in a buffer.
+
+;;; Code:
+
+(require 'magit-core)
+
+(declare-function magit-status-setup-buffer "magit-status" (&optional directory))
+(declare-function magit-dired-jump "magit-dired" (&optional other-window))
+
+(defvar x-stretch-cursor)
+
+;;; Options
+
+(defcustom magit-repository-directories nil
+  "List of directories that are or contain Git repositories.
+
+Each element has the form (DIRECTORY . DEPTH).  DIRECTORY has
+to be a directory or a directory file-name, a string.  DEPTH,
+an integer, specifies the maximum depth to look for Git
+repositories.  If it is 0, then only add DIRECTORY itself.
+
+This option controls which repositories are being listed by
+`magit-list-repositories'.  It also affects `magit-status'
+\(which see) in potentially surprising ways."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-essentials
+  :type '(repeat (cons directory (integer :tag "Depth"))))
+
+(defgroup magit-repolist nil
+  "List repositories in a buffer."
+  :link '(info-link "(magit)Repository List")
+  :group 'magit-modes)
+
+(defcustom magit-repolist-mode-hook (list #'hl-line-mode)
+  "Hook run after entering Magit-Repolist mode."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-repolist
+  :type 'hook
+  :get #'magit-hook-custom-get
+  :options (list #'hl-line-mode))
+
+(defcustom magit-repolist-columns
+  `(("Name"    25 ,#'magit-repolist-column-ident
+     ())
+    ("Version" 25 ,#'magit-repolist-column-version
+     ((:sort magit-repolist-version<)))
+    ("B<U"      3 ,#'magit-repolist-column-unpulled-from-upstream
+     (;; (:help-echo "Upstream changes not in branch")
+      (:right-align t)
+      (:sort <)))
+    ("B>U"      3 ,#'magit-repolist-column-unpushed-to-upstream
+     (;; (:help-echo "Local changes not in upstream")
+      (:right-align t)
+      (:sort <)))
+    ("Path"    99 ,#'magit-repolist-column-path
+     ()))
+  "List of columns displayed by `magit-list-repositories'.
+
+Each element has the form (HEADER WIDTH FORMAT PROPS).
+
+HEADER is the string displayed in the header.  WIDTH is the width
+of the column.  FORMAT is a function that is called with one
+argument, the repository identification (usually its basename),
+and with `default-directory' bound to the toplevel of its working
+tree.  It has to return a string to be inserted or nil.  PROPS is
+an alist that supports the keys `:right-align', `:pad-right' and
+`:sort'.
+
+The `:sort' function has a weird interface described in the
+docstring of `tabulated-list--get-sort'.  Alternatively `<' and
+`magit-repolist-version<' can be used as those functions are
+automatically replaced with functions that satisfy the interface.
+Set `:sort' to nil to inhibit sorting; if unspecified, then the
+column is sortable using the default sorter.
+
+You may wish to display a range of numeric columns using just one
+character per column and without any padding between columns, in
+which case you should use an appropriate HEADER, set WIDTH to 1,
+and set `:pad-right' to 0.  \"+\" is substituted for numbers higher
+than 9."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-repolist
+  :type '(repeat (list :tag "Column"
+                       (string   :tag "Header Label")
+                       (integer  :tag "Column Width")
+                       (function :tag "Inserter Function")
+                       (repeat   :tag "Properties"
+                                 (list (choice :tag "Property"
+                                               (const :right-align)
+                                               (const :pad-right)
+                                               (const :sort)
+                                               (symbol))
+                                       (sexp   :tag "Value"))))))
+
+(defcustom magit-repolist-column-flag-alist
+  `((,#'magit-untracked-files . "N")
+    (,#'magit-unstaged-files . "U")
+    (,#'magit-staged-files . "S"))
+  "Association list of predicates and flags for `magit-repolist-column-flag'.
+
+Each element is of the form (FUNCTION . FLAG).  Each FUNCTION is
+called with no arguments, with `default-directory' bound to the
+top level of a repository working tree, until one of them returns
+a non-nil value.  FLAG corresponding to that function is returned
+as the value of `magit-repolist-column-flag'."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-repolist
+  :type '(alist :key-type (function :tag "Predicate Function")
+                :value-type (string :tag "Flag")))
+
+(defcustom magit-repolist-sort-key '("Path" . nil)
+  "Initial sort key for buffer created by `magit-list-repositories'.
+If nil, no additional sorting is performed.  Otherwise, this
+should be a cons cell (NAME . FLIP).  NAME is a string matching
+one of the column names in `magit-repolist-columns'.  FLIP, if
+non-nil, means to invert the resulting sort."
+  :package-version '(magit . "3.2.0")
+  :group 'magit-repolist
+  :type '(choice (const nil)
+                 (cons (string :tag "Column name")
+                       (boolean :tag "Flip order"))))
+
+;;; List Repositories
+;;;; List Commands
+;;;###autoload
+(defun magit-list-repositories ()
+  "Display a list of repositories.
+
+Use the option `magit-repository-directories' to control which
+repositories are displayed."
+  (interactive)
+  (magit-repolist-setup (default-value 'magit-repolist-columns)))
+
+;;;; Mode Commands
+
+(defun magit-repolist-status (&optional _button)
+  "Show the status for the repository at point."
+  (interactive)
+  (if-let ((id (tabulated-list-get-id)))
+      (magit-status-setup-buffer (expand-file-name id))
+    (user-error "There is no repository at point")))
+
+(defun magit-repolist-mark ()
+  "Mark a repository and move to the next line."
+  (interactive)
+  (magit-repolist--ensure-padding)
+  (tabulated-list-put-tag "*" t))
+
+(defun magit-repolist-unmark ()
+  "Unmark a repository and move to the next line."
+  (interactive)
+  (tabulated-list-put-tag " " t))
+
+(defun magit-repolist-fetch (repos)
+  "Fetch all marked or listed repositories."
+  (interactive (list (magit-repolist--get-repos ?*)))
+  (run-hooks 'magit-credential-hook)
+  (magit-repolist--mapc (##magit-run-git "remote" "update")
+                        repos "Fetching in %s..."))
+
+(defun magit-repolist-find-file-other-frame (repos file)
+  "Find a file in all marked or listed repositories."
+  (interactive (list (magit-repolist--get-repos ?*)
+                     (read-string "Find file in repositories: ")))
+  (magit-repolist--mapc (##find-file-other-frame file) repos))
+
+(defun magit-repolist--ensure-padding ()
+  "Set `tabulated-list-padding' to 2, unless that is already non-zero."
+  (when (zerop tabulated-list-padding)
+    (setq tabulated-list-padding 2)
+    (tabulated-list-init-header)
+    (tabulated-list-print t)))
+
+(defun magit-repolist--get-repos (&optional char)
+  "Return marked repositories or `all' if none are marked.
+If optional CHAR is non-nil, then only return repositories
+marked with that character.  If no repositories are marked
+then ask whether to act on all repositories instead."
+  (or (magit-repolist--marked-repos char)
+      (if (magit-confirm 'repolist-all
+            "Nothing selected.  Act on ALL displayed repositories")
+          'all
+        (user-error "Abort"))))
+
+(defun magit-repolist--marked-repos (&optional char)
+  "Return marked repositories.
+If optional CHAR is non-nil, then only return repositories
+marked with that character."
+  (let (c list)
+    (save-excursion
+      (goto-char (point-min))
+      (while (not (eobp))
+        (setq c (char-after))
+        (unless (eq c ?\s)
+          (if char
+              (when (eq c char)
+                (push (tabulated-list-get-id) list))
+            (push (cons c (tabulated-list-get-id)) list)))
+        (forward-line)))
+    list))
+
+(defun magit-repolist--mapc (fn repos &optional msg)
+  "Apply FN to each directory in REPOS for side effects only.
+If REPOS is the symbol `all', then call FN for all displayed
+repositories.  When FN is called, `default-directory' is bound to
+the top-level directory of the current repository.  If optional
+MSG is non-nil then that is displayed around each call to FN.
+If it contains \"%s\" then the directory is substituted for that."
+  (when (eq repos 'all)
+    (setq repos nil)
+    (save-excursion
+      (goto-char (point-min))
+      (while (not (eobp))
+        (push (tabulated-list-get-id) repos)
+        (forward-line)))
+    (setq repos (nreverse repos)))
+  (let ((base default-directory)
+        (len (length repos))
+        (i 0))
+    (dolist (repo repos)
+      (let ((default-directory
+             (file-name-as-directory (expand-file-name repo base))))
+        (if msg
+            (let ((msg (concat (format "(%s/%s) " (incf i) len)
+                               (format msg default-directory))))
+              (message msg)
+              (funcall fn)
+              (message (concat msg "done")))
+          (funcall fn))))))
+
+;;;; Mode
+
+(defvar-keymap magit-repolist-mode-map
+  :doc "Local keymap for Magit-Repolist mode buffers."
+  :parent tabulated-list-mode-map
+  "C-m" #'magit-repolist-status
+  "m"   #'magit-repolist-mark
+  "u"   #'magit-repolist-unmark
+  "f"   #'magit-repolist-fetch
+  "5"   #'magit-repolist-find-file-other-frame
+  "<remap> <dired-jump>" #'magit-dired-jump)
+
+(define-derived-mode magit-repolist-mode tabulated-list-mode "Repos"
+  "Major mode for browsing a list of Git repositories."
+  :interactive nil
+  :group 'magit-repolist
+  (setq-local x-stretch-cursor nil)
+  (setq tabulated-list-padding 0)
+  (setq-local tabulated-list-revert-hook (list #'magit-repolist-refresh t))
+  (setq imenu-prev-index-position-function
+        #'magit-repolist--imenu-prev-index-position)
+  (setq imenu-extract-index-name-function #'tabulated-list-get-id))
+
+(defun magit-repolist-setup (columns)
+  (unless magit-repository-directories
+    (user-error "You need to customize `magit-repository-directories' %s"
+                "before you can list repositories"))
+  (with-current-buffer (get-buffer-create "*Magit Repositories*")
+    (setq default-directory (expand-file-name "~"))
+    (magit-repolist-mode)
+    (setq-local magit-repolist-columns columns)
+    (magit-repolist-setup-1)
+    (magit-repolist-refresh)
+    (switch-to-buffer (current-buffer))))
+
+(defun magit-repolist-setup-1 ()
+  (unless tabulated-list-sort-key
+    (setq tabulated-list-sort-key
+          (pcase-let ((`(,column . ,flip) magit-repolist-sort-key))
+            (cons (or (car (assoc column magit-repolist-columns))
+                      (caar magit-repolist-columns))
+                  flip))))
+  (setq tabulated-list-format
+        (vconcat (seq-map-indexed
+                  (lambda (column idx)
+                    (pcase-let* ((`(,title ,width ,_fn ,props) column)
+                                 (sort-set (assoc :sort props))
+                                 (sort-fn (cadr sort-set)))
+                      (nconc (list title width
+                                   (cond ((eq sort-fn '<)
+                                          (magit-repolist-make-sorter
+                                           sort-fn #'string-to-number idx))
+                                         ((eq sort-fn 'magit-repolist-version<)
+                                          (magit-repolist-make-sorter
+                                           sort-fn #'identity idx))
+                                         (sort-fn sort-fn)
+                                         (sort-set nil)
+                                         (t)))
+                             (flatten-tree props))))
+                  magit-repolist-columns))))
+
+(defun magit-repolist-refresh ()
+  (setq tabulated-list-entries
+        (mapcar #'magit-repolist--format-entry
+                (magit-list-repos-uniquify
+                 (mapcar (##cons (file-name-nondirectory (directory-file-name %))
+                                 %)
+                         (magit-list-repos)))))
+  (message "Listing repositories...")
+  (tabulated-list-init-header)
+  (tabulated-list-print t)
+  (message "Listing repositories...done"))
+
+(defun magit-repolist--format-entry (entry)
+  (pcase-let ((`(,id . ,default-directory) entry))
+    (list default-directory
+          (vconcat
+           (mapcar (pcase-lambda (`(,title ,width ,fn ,props))
+                     (or (funcall fn `((:id ,id)
+                                       (:title ,title)
+                                       (:width ,width)
+                                       ,@props))
+                         ""))
+                   magit-repolist-columns)))))
+
+(defun magit-repolist--imenu-prev-index-position ()
+  (and (not (bobp))
+       (forward-line -1)))
+
+;;;; Columns
+
+(defun magit-repolist-make-sorter (sort-predicate convert-cell column-idx)
+  "Return a function suitable as a sorter for tabulated lists.
+See `tabulated-list--get-sorter'.  Given a more reasonable API
+this would not be necessary and one could just use SORT-PREDICATE
+directly.  CONVERT-CELL can be used to turn the cell value, which
+is always a string back into, e.g., a number.  COLUMN-IDX has to
+be the index of the column that uses the returned sorter function."
+  (lambda (a b)
+    (funcall sort-predicate
+             (funcall convert-cell (aref (cadr a) column-idx))
+             (funcall convert-cell (aref (cadr b) column-idx)))))
+
+(defun magit-repolist-column-ident (spec)
+  "Insert the identification of the repository.
+Usually this is just its basename."
+  (cadr (assq :id spec)))
+
+(defun magit-repolist-column-path (_)
+  "Insert the absolute path of the repository."
+  (abbreviate-file-name default-directory))
+
+(defvar magit-repolist-column-version-regexp "\
+\\(?1:-\\(?2:[0-9]*\\)\
+\\(?3:-g[a-z0-9]*\\)\\)?\
+\\(?:-\\(?4:dirty\\)\\)\
+?\\'")
+
+(defun magit-repolist-column-version (_)
+  "Insert a description of the repository's `HEAD' revision."
+  (and-let ((v (or (magit-git-string "describe" "--tags" "--dirty")
+                   ;; If there are no tags, use the date in MELPA format.
+                   (magit-rev-format "%cd-g%h" nil
+                                     "--date=format:%Y%m%d.%H%M"))))
+    (save-match-data
+      (when (string-match magit-repolist-column-version-regexp v)
+        (magit--put-face (match-beginning 0) (match-end 0) 'shadow v)
+        (when (match-end 2)
+          (magit--put-face (match-beginning 2) (match-end 2) 'bold v))
+        (when (match-end 4)
+          (magit--put-face (or (match-beginning 3) (match-beginning 4))
+                           (match-end 4) 'error v)))
+      (cond ((not v) nil)
+            ((string-match "\\`[0-9]" v)
+             (concat " " v))
+            ((string-match "\\`[^0-9]+" v)
+             (magit--put-face 0 (match-end 0) 'shadow v)
+             v)))))
+
+(defun magit-repolist-version< (a b)
+  (save-match-data
+    (let ((re "[0-9]+\\(\\.[0-9]*\\)*"))
+      (setq a (and (string-match re a) (match-str 0 a)))
+      (setq b (and (string-match re b) (match-str 0 b)))
+      (cond ((and a b) (version< a b))
+            (b nil)
+            (t)))))
+
+(defun magit-repolist-column-branch (_)
+  "Insert the current branch."
+  (if (file-exists-p ".git")
+      (let ((branch (magit-get-current-branch)))
+        (if (member branch magit-main-branch-names)
+            (magit--propertize-face branch 'shadow)
+          branch))
+    (magit--propertize-face "(unpopulated)" 'warning)))
+
+(defun magit-repolist-column-upstream (_)
+  "Insert the upstream branch of the current branch."
+  (magit-get-upstream-branch))
+
+(defun magit-repolist-column-flag (_)
+  "Insert a flag as specified by `magit-repolist-column-flag-alist'.
+
+By default this indicates whether there are uncommitted changes.
+- N if there is at least one untracked file.
+- U if there is at least one unstaged file.
+- S if there is at least one staged file.
+Only one letter is shown, the first that applies."
+  (seq-some (pcase-lambda (`(,fun . ,flag))
+              (and (funcall fun) flag))
+            magit-repolist-column-flag-alist))
+
+(defun magit-repolist-column-flags (_)
+  "Insert all flags as specified by `magit-repolist-column-flag-alist'.
+This is an alternative to function `magit-repolist-column-flag',
+which only lists the first one found."
+  (mapconcat (pcase-lambda (`(,fun . ,flag))
+               (if (funcall fun) flag " "))
+             magit-repolist-column-flag-alist
+             ""))
+
+(defun magit-repolist-column-unpulled-from-upstream (spec)
+  "Insert number of upstream commits not in the current branch."
+  (and$ (magit-get-upstream-branch)
+        (magit-repolist-insert-count (cadr (magit-rev-diff-count "HEAD" $))
+                                     spec)))
+
+(defun magit-repolist-column-unpulled-from-pushremote (spec)
+  "Insert number of commits in the push branch but not the current branch."
+  (and$ (magit-get-push-branch nil t)
+        (magit-repolist-insert-count (cadr (magit-rev-diff-count "HEAD" $))
+                                     spec)))
+
+(defun magit-repolist-column-unpushed-to-upstream (spec)
+  "Insert number of commits in the current branch but not its upstream."
+  (and$ (magit-get-upstream-branch)
+        (magit-repolist-insert-count (car (magit-rev-diff-count "HEAD" $))
+                                     spec)))
+
+(defun magit-repolist-column-unpushed-to-pushremote (spec)
+  "Insert number of commits in the current branch but not its push branch."
+  (and$ (magit-get-push-branch nil t)
+        (magit-repolist-insert-count (car (magit-rev-diff-count "HEAD" $))
+                                     spec)))
+
+(defun magit-repolist-column-branches (spec)
+  "Insert number of branches."
+  (magit-repolist-insert-count (length (magit-list-local-branches))
+                               `((:normal-count 1) ,@spec)))
+
+(defun magit-repolist-column-stashes (spec)
+  "Insert number of stashes."
+  (magit-repolist-insert-count (length (magit-list-stashes)) spec))
+
+(defun magit-repolist-insert-count (n spec)
+  (magit--propertize-face
+   (if (and  (> n 9) (= (cadr (assq :width spec)) 1))
+       "+"
+     (number-to-string n))
+   (if (> n (or (cadr (assq :normal-count spec)) 0)) 'bold 'shadow)))
+
+;;; Read Repository
+
+(defun magit-read-repository (&optional read-directory-name)
+  "Read a Git repository in the minibuffer, with completion.
+
+The completion choices are the basenames of top-levels of
+repositories found in the directories specified by option
+`magit-repository-directories'.  In case of name conflicts
+the basenames are prefixed with the name of the respective
+parent directories.  The returned value is the actual path
+to the selected repository.
+
+If READ-DIRECTORY-NAME is non-nil or no repositories can be
+found based on the value of `magit-repository-directories',
+then read an arbitrary directory using `read-directory-name'
+instead."
+  (if-let ((repos (and (not read-directory-name)
+                       magit-repository-directories
+                       (magit-repos-alist))))
+      (let ((reply (magit-completing-read
+                    "Git repository" repos nil 'any nil nil
+                    (and-let* ((_(derived-mode-p 'dired-mode))
+                               (path (and (fboundp 'dired-get-filename)
+                                          (dired-get-filename nil t)))
+                               (_(magit-git-repo-p path))
+                               (name (file-relative-name path)))
+                      (if (member (cdr (assoc name repos)) (list path nil))
+                          name
+                        path)))))
+        (file-name-as-directory
+         (or (cdr (assoc reply repos))
+             (if (file-directory-p reply)
+                 (expand-file-name reply)
+               (user-error "Not a repository or a directory: %s" reply)))))
+    (file-name-as-directory
+     (read-directory-name "Git repository: "
+                          (or (magit-toplevel) default-directory)))))
+
+(defun magit-list-repos ()
+  (mapcan (pcase-lambda (`(,dir . ,depth))
+            (magit-list-repos-1 dir depth))
+          magit-repository-directories))
+
+(defun magit-list-repos-1 (directory depth)
+  (cond ((file-readable-p (expand-file-name ".git" directory))
+         (list (file-name-as-directory directory)))
+        ((and (> depth 0) (file-accessible-directory-p directory))
+         (mapcan (##and (file-directory-p %)
+                        (magit-list-repos-1 % (1- depth)))
+                 (directory-files directory t
+                                  directory-files-no-dot-files-regexp t)))))
+
+(defun magit-list-repos-uniquify (alist)
+  (let (result (dict (make-hash-table :test #'equal)))
+    (dolist (a (delete-dups alist))
+      (puthash (car a) (cons (cdr a) (gethash (car a) dict)) dict))
+    (maphash
+     (lambda (key value)
+       (if (length= value 1)
+           (push (cons key (car value)) result)
+         (setq result
+               (append
+                result
+                (magit-list-repos-uniquify
+                 (mapcar (lambda (v)
+                           (cons (concat
+                                  key
+                                  (or (bound-and-true-p uniquify-separator)
+                                      "\\")
+                                  (file-name-nondirectory
+                                   (directory-file-name
+                                    (substring v 0 (- (1+ (length key)))))))
+                                 v))
+                         value))))))
+     dict)
+    result))
+
+(defun magit-repos-alist ()
+  (magit-list-repos-uniquify
+   (mapcar (##cons (file-name-nondirectory (directory-file-name %)) %)
+           (magit-list-repos))))
+
+;;; _
+(provide 'magit-repos)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-repos.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-repos.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-repos.elc
new file mode 100644
index 0000000..4f1e3c2
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-repos.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reset.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reset.el
new file mode 100644
index 0000000..47358e9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reset.el
@@ -0,0 +1,153 @@
+;;; magit-reset.el --- Reset functionality  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements reset commands.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-reset "magit" nil t)
+(transient-define-prefix magit-reset ()
+  "Reset the `HEAD', index and/or worktree to a previous state."
+  :man-page "git-reset"
+  [["Reset"
+    ("b" "branch" magit-branch-reset)
+    ("f" "file"   magit-file-checkout)]
+   ["Reset this"
+    ("m" "mixed    (HEAD and index)" magit-reset-mixed)
+    ("s" "soft     (HEAD only)"      magit-reset-soft)
+    ("h" "hard     (HEAD, index and worktree)" magit-reset-hard)
+    ("k" "keep     (HEAD and index, keeping uncommitted)" magit-reset-keep)
+    ("i" "index    (only)"           magit-reset-index)
+    ("w" "worktree (only)"           magit-reset-worktree)]])
+
+;;;###autoload
+(defun magit-reset-mixed (commit)
+  "Reset the `HEAD' and index to COMMIT, but not the working tree.
+\n(git reset --mixed COMMIT)"
+  (interactive (list (magit-reset-read-branch-or-commit "Reset %s to")))
+  (magit-reset-internal "--mixed" commit))
+
+;;;###autoload
+(defun magit-reset-soft (commit)
+  "Reset the `HEAD' to COMMIT, but not the index and working tree.
+\n(git reset --soft COMMIT)"
+  (interactive (list (magit-reset-read-branch-or-commit "Soft reset %s to")))
+  (magit-reset-internal "--soft" commit))
+
+;;;###autoload
+(defun magit-reset-hard (commit)
+  "Reset the `HEAD', index, and working tree to COMMIT.
+\n(git reset --hard COMMIT)"
+  (interactive (list (magit-reset-read-branch-or-commit
+                      (concat (magit--propertize-face "Hard" 'bold)
+                              " reset %s to"))))
+  (magit-reset-internal "--hard" commit))
+
+;;;###autoload
+(defun magit-reset-keep (commit)
+  "Reset the `HEAD' and index to COMMIT, while keeping uncommitted changes.
+\n(git reset --keep COMMIT)"
+  (interactive (list (magit-reset-read-branch-or-commit "Reset %s to")))
+  (magit-reset-internal "--keep" commit))
+
+;;;###autoload
+(defun magit-reset-index (commit)
+  "Reset the index to COMMIT.
+Keep the `HEAD' and working tree as-is, so if COMMIT refers to the
+head this effectively unstages all changes.
+\n(git reset COMMIT .)"
+  (interactive (list (magit-read-branch-or-commit "Reset index to")))
+  (magit-reset-internal nil commit "."))
+
+;;;###autoload
+(defun magit-reset-worktree (commit)
+  "Reset the worktree to COMMIT.
+Keep the `HEAD' and index as-is."
+  (interactive (list (magit-read-branch-or-commit "Reset worktree to")))
+  (magit-run-before-change-functions nil "reset")
+  (magit-with-temp-index commit nil
+    (magit-call-git "checkout-index" "--all" "--force"))
+  (magit-run-after-apply-functions nil "reset")
+  (magit-refresh))
+
+;;;###autoload
+(defun magit-reset-quickly (commit &optional hard)
+  "Reset the `HEAD' and index to COMMIT, and possibly the working tree.
+With a prefix argument reset the working tree otherwise don't.
+\n(git reset --mixed|--hard COMMIT)"
+  (interactive (list (magit-reset-read-branch-or-commit
+                      (if current-prefix-arg
+                          (concat (magit--propertize-face "Hard" 'bold)
+                                  " reset %s to")
+                        "Reset %s to"))
+                     current-prefix-arg))
+  (magit-reset-internal (if hard "--hard" "--mixed") commit))
+
+(defun magit-reset-read-branch-or-commit (prompt)
+  "Prompt for and return a ref to reset HEAD to.
+
+PROMPT is a format string, where either the current branch name
+or \"detached head\" will be substituted for %s."
+  (magit-read-branch-or-commit
+   (format prompt (or (magit-get-current-branch) "detached head"))))
+
+(defun magit-reset-internal (arg commit &optional path)
+  (when (and (not (member arg '("--hard" nil)))
+             (equal (magit-rev-parse commit)
+                    (magit-rev-parse "HEAD~")))
+    (with-temp-buffer
+      (magit-git-insert "show" "-s" "--format=%B" "HEAD")
+      (when git-commit-major-mode
+        (funcall git-commit-major-mode))
+      (git-commit-setup-font-lock)
+      (git-commit-save-message)))
+  (let ((cmd (if (and (equal commit "HEAD") (not arg)) "unstage" "reset")))
+    (magit-run-before-change-functions nil cmd)
+    (magit-run-git "reset" arg commit "--" path)
+    (when (equal cmd "unstage")
+      (magit-run-after-apply-functions nil "unstage"))))
+
+;;; _
+(provide 'magit-reset)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-reset.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reset.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reset.elc
new file mode 100644
index 0000000..f2e265e
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-reset.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sequence.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sequence.el
new file mode 100644
index 0000000..2a7c445
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sequence.el
@@ -0,0 +1,1159 @@
+;;; magit-sequence.el --- History manipulation in Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Support for Git commands that replay commits and help the user make
+;; changes along the way.  Supports `cherry-pick', `revert', `rebase',
+;; `rebase--interactive' and `am'.
+
+;;; Code:
+
+(require 'magit)
+
+;; For `magit-rebase--todo'.
+(declare-function git-rebase-current-line "git-rebase" (&optional batch))
+
+(eval-and-compile ;declare slot names
+  (cl-pushnew 'abbrev eieio--known-slot-names)
+  (cl-pushnew 'action eieio--known-slot-names)
+  (cl-pushnew 'action-options eieio--known-slot-names)
+  (cl-pushnew 'action-type eieio--known-slot-names)
+  (cl-pushnew 'target eieio--known-slot-names)
+  (cl-pushnew 'trailer eieio--known-slot-names))
+
+;;; Options
+;;;; Faces
+
+(defface magit-sequence-pick
+  '((t :inherit default))
+  "Face used in sequence sections."
+  :group 'magit-faces)
+
+(defface magit-sequence-stop
+  '((((class color) (background light)) :foreground "DarkOliveGreen4")
+    (((class color) (background dark))  :foreground "DarkSeaGreen2"))
+  "Face used in sequence sections."
+  :group 'magit-faces)
+
+(defface magit-sequence-part
+  '((((class color) (background light)) :foreground "Goldenrod4")
+    (((class color) (background dark))  :foreground "LightGoldenrod2"))
+  "Face used in sequence sections."
+  :group 'magit-faces)
+
+(defface magit-sequence-head
+  '((((class color) (background light)) :foreground "SkyBlue4")
+    (((class color) (background dark))  :foreground "LightSkyBlue1"))
+  "Face used in sequence sections."
+  :group 'magit-faces)
+
+(defface magit-sequence-drop
+  '((((class color) (background light)) :foreground "IndianRed")
+    (((class color) (background dark))  :foreground "IndianRed"))
+  "Face used in sequence sections."
+  :group 'magit-faces)
+
+(defface magit-sequence-done
+  '((t :inherit magit-hash))
+  "Face used in sequence sections."
+  :group 'magit-faces)
+
+(defface magit-sequence-onto
+  '((t :inherit magit-sequence-done))
+  "Face used in sequence sections."
+  :group 'magit-faces)
+
+(defface magit-sequence-exec
+  '((t :inherit magit-hash))
+  "Face used in sequence sections."
+  :group 'magit-faces)
+
+;;; Common
+
+;;;###autoload
+(defun magit-sequencer-continue ()
+  "Resume the current cherry-pick or revert sequence."
+  (interactive)
+  (cond
+    ((not (magit-sequencer-in-progress-p))
+     (user-error "No cherry-pick or revert in progress"))
+    ((magit-anything-unmerged-p)
+     (user-error "Cannot continue due to unresolved conflicts"))
+    ((magit-run-git-sequencer
+      (if (magit-revert-in-progress-p) "revert" "cherry-pick") "--continue"))))
+
+;;;###autoload
+(defun magit-sequencer-skip ()
+  "Skip the stopped at commit during a cherry-pick or revert sequence."
+  (interactive)
+  (unless (magit-sequencer-in-progress-p)
+    (user-error "No cherry-pick or revert in progress"))
+  (magit-call-git "reset" "--hard")
+  (magit-sequencer-continue))
+
+;;;###autoload
+(defun magit-sequencer-abort ()
+  "Abort the current cherry-pick or revert sequence.
+This discards all changes made since the sequence started."
+  (interactive)
+  (cond
+    ((not (magit-sequencer-in-progress-p))
+     (user-error "No cherry-pick or revert in progress"))
+    ((magit-revert-in-progress-p)
+     (magit-confirm 'abort-revert "Really abort revert")
+     (magit-run-git-sequencer "revert" "--abort"))
+    ((magit-confirm 'abort-cherry-pick "Really abort cherry-pick")
+     (magit-run-git-sequencer "cherry-pick" "--abort"))))
+
+(defun magit-sequencer-in-progress-p ()
+  (or (magit-cherry-pick-in-progress-p)
+      (magit-revert-in-progress-p)))
+
+;;; Cherry-Pick
+
+(defvar magit-perl-executable "perl"
+  "The Perl executable.")
+
+;;;###autoload(autoload 'magit-cherry-pick "magit-sequence" nil t)
+(transient-define-prefix magit-cherry-pick ()
+  "Apply or transplant commits."
+  :man-page "git-cherry-pick"
+  :value '("--ff")
+  :incompatible '(("--ff" "-x"))
+  ["Arguments"
+   :if-not magit-sequencer-in-progress-p
+   (magit-cherry-pick:--mainline)
+   ("=s" magit-merge:--strategy)
+   ("-F" "Attempt fast-forward"               "--ff")
+   ("-x" "Reference cherry in commit message" "-x")
+   ("-e" "Edit commit messages"               ("-e" "--edit"))
+   (magit:--gpg-sign)
+   (magit:--signoff)]
+  [:if-not magit-sequencer-in-progress-p
+   ["Apply here"
+    ("A" "Pick"    magit-cherry-copy)
+    ("a" "Apply"   magit-cherry-apply)
+    ("h" "Harvest" magit-cherry-harvest)
+    ("m" "Squash"  magit-merge-squash)]
+   ["Apply elsewhere"
+    ("d" "Donate"  magit-cherry-donate)
+    ("n" "Spinout" magit-cherry-spinout)
+    ("s" "Spinoff" magit-cherry-spinoff)]]
+  ["Actions"
+   :if magit-sequencer-in-progress-p
+   ("A" "Continue" magit-sequencer-continue)
+   ("s" "Skip"     magit-sequencer-skip)
+   ("a" "Abort"    magit-sequencer-abort)])
+
+(transient-define-argument magit-cherry-pick:--mainline ()
+  :description "Replay merge relative to parent"
+  :class 'transient-option
+  :shortarg "-m"
+  :argument "--mainline="
+  :reader #'transient-read-number-N+)
+
+(defun magit-cherry-pick-read-args (prompt)
+  (list (or (nreverse (magit-region-values 'commit))
+            (magit-read-other-branch-or-commit prompt))
+        (transient-args 'magit-cherry-pick)))
+
+(defun magit--cherry-move-read-args (verb away fn &optional allow-detached)
+  (declare (indent defun))
+  (let ((commits (or (nreverse (magit-region-values 'commit))
+                     (list (funcall (if away
+                                        #'magit-read-branch-or-commit
+                                      #'magit-read-other-branch-or-commit)
+                                    (format "%s cherry" (capitalize verb))))))
+        (current (or (magit-get-current-branch)
+                     (and allow-detached (magit-rev-parse "HEAD")))))
+    (unless current
+      (user-error "Cannot %s cherries while HEAD is detached" verb))
+    (let ((reachable (magit-rev-ancestor-p (car commits) current))
+          (msg "Cannot %s cherries that %s reachable from HEAD"))
+      (pcase (list away reachable)
+        ('(nil t) (user-error msg verb "are"))
+        ('(t nil) (user-error msg verb "are not"))))
+    `(,commits
+      ,@(funcall fn commits)
+      ,(transient-args 'magit-cherry-pick))))
+
+(defun magit--cherry-spinoff-read-args (verb)
+  (magit--cherry-move-read-args verb t
+    (lambda (commits)
+      (magit-branch-read-args
+       (format "Create branch from %s cherries" (length commits))
+       (magit-get-upstream-branch)))))
+
+;;;###autoload
+(defun magit-cherry-copy (commits &optional args)
+  "Copy COMMITS from another branch onto the current branch.
+Prompt for a commit, defaulting to the commit at point.  If
+the region selects multiple commits, then pick all of them,
+without prompting."
+  (interactive (magit-cherry-pick-read-args "Cherry-pick"))
+  (magit--cherry-pick commits args))
+
+;;;###autoload
+(defun magit-cherry-apply (commits &optional args)
+  "Apply the changes in COMMITS but do not commit them.
+Prompt for a commit, defaulting to the commit at point.  If
+the region selects multiple commits, then apply all of them,
+without prompting."
+  (interactive (magit-cherry-pick-read-args "Apply changes from commit"))
+  (magit--cherry-pick commits (cons "--no-commit" (remove "--ff" args))))
+
+;;;###autoload
+(defun magit-cherry-harvest (commits branch &optional args)
+  "Move COMMITS from another BRANCH onto the current branch.
+Remove the COMMITS from BRANCH and stay on the current branch.
+If a conflict occurs, then you have to fix that and finish the
+process manually."
+  (interactive
+    (magit--cherry-move-read-args "harvest" nil
+      (lambda (commits)
+        (list (let ((branches (magit-list-containing-branches (car commits))))
+                (pcase (length branches)
+                  (0 nil)
+                  (1 (car branches))
+                  (_ (magit-completing-read
+                      (let ((len (length commits)))
+                        (if (= len 1)
+                            "Remove 1 cherry from branch"
+                          (format "Remove %s cherries from branch" len)))
+                      branches nil t))))))))
+  (magit--cherry-move commits branch (magit-get-current-branch) args nil t))
+
+;;;###autoload
+(defun magit-cherry-donate (commits branch &optional args)
+  "Move COMMITS from the current branch onto another existing BRANCH.
+Remove COMMITS from the current branch and stay on that branch.
+If a conflict occurs, then you have to fix that and finish the
+process manually.  `HEAD' is allowed to be detached initially."
+  (interactive
+    (magit--cherry-move-read-args "donate" t
+      (lambda (commits)
+        (list (magit-read-other-branch
+               (let ((len (length commits)))
+                 (if (= len 1)
+                     "Move 1 cherry to branch"
+                   (format "Move %s cherries to branch" len))))))
+      'allow-detached))
+  (magit--cherry-move commits
+                      (or (magit-get-current-branch)
+                          (magit-rev-parse "HEAD"))
+                      branch args))
+
+;;;###autoload
+(defun magit-cherry-spinout (commits branch start-point &optional args)
+  "Move COMMITS from the current branch onto a new BRANCH.
+Remove COMMITS from the current branch and stay on that branch.
+If a conflict occurs, then you have to fix that and finish the
+process manually."
+  (interactive (magit--cherry-spinoff-read-args "spinout"))
+  (magit--cherry-move commits (magit-get-current-branch) branch args
+                      start-point))
+
+;;;###autoload
+(defun magit-cherry-spinoff (commits branch start-point &optional args)
+  "Move COMMITS from the current branch onto a new BRANCH.
+Remove COMMITS from the current branch and checkout BRANCH.
+If a conflict occurs, then you have to fix that and finish
+the process manually."
+  (interactive (magit--cherry-spinoff-read-args "spinoff"))
+  (magit--cherry-move commits (magit-get-current-branch) branch args
+                      start-point t))
+
+(defun magit--cherry-move (commits src dst args
+                                   &optional start-point checkout-dst)
+  (let ((current (magit-get-current-branch)))
+    (unless (magit-branch-p dst)
+      (let ((magit-process-raise-error t))
+        (magit-call-git "branch" dst start-point))
+      (when$ (magit-get-indirect-upstream-branch start-point)
+        (magit-call-git "branch" "--set-upstream-to" $ dst)))
+    (unless (equal dst current)
+      (let ((magit-process-raise-error t))
+        (magit-call-git "checkout" dst)))
+    (if (not src) ; harvest only
+        (magit--cherry-pick commits args)
+      (let ((tip (car (last commits)))
+            (keep (concat (car commits) "^")))
+        (magit--cherry-pick commits args)
+        (set-process-sentinel
+         magit-this-process
+         (lambda (process event)
+           (when (memq (process-status process) '(exit signal))
+             (if (> (process-exit-status process) 0)
+                 (magit-process-sentinel process event)
+               (process-put process 'inhibit-refresh t)
+               (magit-process-sentinel process event)
+               (cond
+                 ((magit-rev-equal tip src)
+                  (magit-call-git "update-ref"
+                                  "-m" (format "reset: moving to %s" keep)
+                                  (magit-ref-fullname src)
+                                  keep tip)
+                  (if (not checkout-dst)
+                      (magit-run-git "checkout" src)
+                    (magit-refresh)))
+                 (t
+                  (magit-git "checkout" src)
+                  (with-environment-variables
+                      (("GIT_SEQUENCE_EDITOR"
+                        (format "%s -i -ne '/^pick (%s)/ or print'"
+                                magit-perl-executable
+                                (mapconcat #'magit-rev-abbrev commits "|"))))
+                    (magit-run-git-sequencer "rebase" "-i" keep))
+                  (when checkout-dst
+                    (set-process-sentinel
+                     magit-this-process
+                     (lambda (process event)
+                       (when (memq (process-status process) '(exit signal))
+                         (if (> (process-exit-status process) 0)
+                             (magit-process-sentinel process event)
+                           (process-put process 'inhibit-refresh t)
+                           (magit-process-sentinel process event)
+                           (magit-run-git "checkout" dst))))))))))))))))
+
+(defun magit--cherry-pick (commits args &optional revert)
+  (let ((command (if revert "revert" "cherry-pick")))
+    (when (stringp commits)
+      (setq commits (if (string-search ".." commits)
+                        (split-string commits "\\.\\.")
+                      (list commits))))
+    (magit-run-git-sequencer
+     (if revert "revert" "cherry-pick")
+     (let ((merges (seq-filter #'magit-merge-commit-p commits)))
+       (cond
+         ((not merges)
+          (seq-remove (##string-prefix-p "--mainline=" %) args))
+         ((cl-set-difference commits merges :test #'equal)
+          (user-error "Cannot %s merge and non-merge commits at once"
+                      command))
+         ((seq-find (##string-prefix-p "--mainline=" %) args)
+          args)
+         ((cons (format "--mainline=%s"
+                        (read-number "Replay merges relative to parent: "))
+                args))))
+     commits)))
+
+(defun magit-cherry-pick-in-progress-p ()
+  ;; .git/sequencer/todo does not exist when there is only one commit left.
+  (let ((dir (magit-gitdir)))
+    (or (file-exists-p (expand-file-name "CHERRY_PICK_HEAD" dir))
+        ;; And CHERRY_PICK_HEAD does not exist when a conflict happens
+        ;; while picking a series of commits with --no-commit.
+        (and$ (magit-file-line (expand-file-name "sequencer/todo" dir))
+              (string-prefix-p "pick" $)))))
+
+;;; Revert
+
+;;;###autoload(autoload 'magit-revert "magit-sequence" nil t)
+(transient-define-prefix magit-revert ()
+  "Revert existing commits, with or without creating new commits."
+  :man-page "git-revert"
+  :value '("--edit")
+  ["Arguments"
+   :if-not magit-sequencer-in-progress-p
+   (magit-cherry-pick:--mainline)
+   ("-e" "Edit commit message"       ("-e" "--edit"))
+   ("-E" "Don't edit commit message" "--no-edit")
+   ("=s" magit-merge:--strategy)
+   (magit:--gpg-sign)
+   (magit:--signoff)]
+  ["Actions"
+   :if-not magit-sequencer-in-progress-p
+   ("V" "Revert commit(s)" magit-revert-and-commit)
+   ("v" "Revert changes"   magit-revert-no-commit)]
+  ["Actions"
+   :if magit-sequencer-in-progress-p
+   ("V" "Continue" magit-sequencer-continue)
+   ("s" "Skip"     magit-sequencer-skip)
+   ("a" "Abort"    magit-sequencer-abort)])
+
+(defun magit-revert-read-args (prompt)
+  (list (or (magit-region-values 'commit)
+            (magit-read-branch-or-commit prompt))
+        (transient-args 'magit-revert)))
+
+;;;###autoload
+(defun magit-revert-and-commit (commit &optional args)
+  "Revert COMMIT by creating a new commit.
+Prompt for a commit, defaulting to the commit at point.  If
+the region selects multiple commits, then revert all of them,
+without prompting."
+  (interactive (magit-revert-read-args "Revert commit"))
+  (magit--cherry-pick commit args t))
+
+;;;###autoload
+(defun magit-revert-no-commit (commit &optional args)
+  "Revert COMMIT by applying it in reverse to the worktree.
+Prompt for a commit, defaulting to the commit at point.  If
+the region selects multiple commits, then revert all of them,
+without prompting."
+  (interactive (magit-revert-read-args "Revert changes"))
+  (magit--cherry-pick commit (cons "--no-commit" args) t))
+
+(defun magit-revert-in-progress-p ()
+  ;; .git/sequencer/todo does not exist when there is only one commit left.
+  (let ((dir (magit-gitdir)))
+    (or (file-exists-p (expand-file-name "REVERT_HEAD" dir))
+        ;; And REVERT_HEAD does not exist when a conflict happens
+        ;; while reverting a series of commits with --no-commit.
+        (and$ (magit-file-line (expand-file-name "sequencer/todo" dir))
+              (string-prefix-p "revert" $)))))
+
+;;; Patch
+
+;;;###autoload(autoload 'magit-am "magit-sequence" nil t)
+(transient-define-prefix magit-am ()
+  "Apply patches received by email."
+  :man-page "git-am"
+  :value '("--3way")
+  ["Arguments"
+   :if-not magit-am-in-progress-p
+   ("-3" "Fall back on 3way merge"           ("-3" "--3way"))
+   ("-R" "Reject only failed hunks"          "--reject")
+   (magit-apply:-p)
+   ("-c" "Remove text before scissors line"  ("-c" "--scissors"))
+   ("-k" "Inhibit removal of email cruft"    ("-k" "--keep"))
+   ("-b" "Limit removal of email cruft"      "--keep-non-patch")
+   ("-d" "Use author date as committer date" "--committer-date-is-author-date")
+   ("-t" "Use current time as author date"   "--ignore-date")
+   (magit:--gpg-sign)
+   (magit:--signoff)]
+  ["Apply"
+   :if-not magit-am-in-progress-p
+   ("m" "maildir"     magit-am-apply-maildir)
+   ("w" "patches"     magit-am-apply-patches)
+   ("a" "plain patch" magit-patch-apply)]
+  ["Actions"
+   :if magit-am-in-progress-p
+   ("w" "Continue" magit-am-continue)
+   ("s" "Skip"     magit-am-skip)
+   ("a" "Abort"    magit-am-abort)])
+
+(defun magit-am-arguments ()
+  (transient-args 'magit-am))
+
+(transient-define-argument magit-apply:-p ()
+  :description "Remove leading slashes from paths"
+  :class 'transient-option
+  :argument "-p"
+  :allow-empty t
+  :reader #'transient-read-number-N+)
+
+;;;###autoload
+(defun magit-am-apply-patches (&optional files args)
+  "Apply the patches FILES."
+  (interactive (list (or (magit-region-values 'file)
+                         (list (let ((default (magit-file-at-point)))
+                                 (read-file-name
+                                  (if default
+                                      (format "Apply patch (%s): " default)
+                                    "Apply patch: ")
+                                  nil default))))
+                     (magit-am-arguments)))
+  (magit-run-git-sequencer "am" args "--"
+                           (mapcar (##magit-convert-filename-for-git
+                                    (expand-file-name %))
+                                   files)))
+
+;;;###autoload
+(defun magit-am-apply-maildir (&optional maildir args)
+  "Apply the patches from MAILDIR."
+  (interactive (list (read-file-name "Apply mbox or Maildir: ")
+                     (magit-am-arguments)))
+  (magit-run-git-sequencer "am" args (magit-convert-filename-for-git
+                                      (expand-file-name maildir))))
+
+;;;###autoload
+(defun magit-am-continue ()
+  "Resume the current patch applying sequence."
+  (interactive)
+  (cond
+    ((not (magit-am-in-progress-p))
+     (user-error "Not applying any patches"))
+    ((magit-anything-unstaged-p t)
+     (user-error "Cannot continue due to unstaged changes"))
+    ((magit-run-git-sequencer "am" "--continue"))))
+
+;;;###autoload
+(defun magit-am-skip ()
+  "Skip the stopped at patch during a patch applying sequence."
+  (interactive)
+  (unless (magit-am-in-progress-p)
+    (user-error "Not applying any patches"))
+  (magit-run-git-sequencer "am" "--skip"))
+
+;;;###autoload
+(defun magit-am-abort ()
+  "Abort the current patch applying sequence.
+This discards all changes made since the sequence started."
+  (interactive)
+  (unless (magit-am-in-progress-p)
+    (user-error "Not applying any patches"))
+  (magit-run-git "am" "--abort"))
+
+(defun magit-am-in-progress-p ()
+  (file-exists-p (expand-file-name "rebase-apply/applying" (magit-gitdir))))
+
+;;; Rebase
+
+;;;###autoload(autoload 'magit-rebase "magit-sequence" nil t)
+(transient-define-prefix magit-rebase ()
+  "Transplant commits and/or modify existing commits."
+  :man-page "git-rebase"
+  :value '("--autostash")
+  ["Arguments"
+   :if-not magit-rebase-in-progress-p
+   ("-k" "Keep empty commits"       "--keep-empty")
+   ("-p" "Preserve merges"          ("-p" "--preserve-merges")
+    :if (##magit-git-version< "2.33.0"))
+   ("-r" "Rebase merges"            ("-r" "--rebase-merges=")
+    magit-rebase-merges-select-mode)
+   ("-u" "Update branches"          "--update-refs"
+    :if (##magit-git-version>= "2.38.0"))
+   (7 magit-merge:--strategy)
+   (7 magit-merge:--strategy-option)
+   (7 "=X" magit-diff:--diff-algorithm :argument "-Xdiff-algorithm=")
+   (7 "-f" "Force rebase"           ("-f" "--force-rebase"))
+   ("-d" "Use author date as committer date" "--committer-date-is-author-date")
+   ("-t" "Use current time as author date"   "--ignore-date")
+   ("-a" "Autosquash"               "--autosquash")
+   ("-A" "Autostash"                "--autostash")
+   ("-i" "Interactive"              ("-i" "--interactive"))
+   ("-h" "Disable hooks"            "--no-verify")
+   (7 magit-rebase:--exec)
+   (magit:--gpg-sign)
+   (magit:--signoff)]
+  [:if-not magit-rebase-in-progress-p
+   :description (##format (propertize "Rebase %s onto" 'face 'transient-heading)
+                          (propertize (or (magit-get-current-branch) "HEAD")
+                                      'face 'magit-branch-local))
+   ("p" magit-rebase-onto-pushremote)
+   ("u" magit-rebase-onto-upstream)
+   ("e" "elsewhere" magit-rebase-branch)]
+  ["Rebase"
+   :if-not magit-rebase-in-progress-p
+   [("i" "interactively"      magit-rebase-interactive)
+    ("s" "a subset"           magit-rebase-subset)]
+   [("m" "to modify a commit" magit-rebase-edit-commit)
+    ("w" "to reword a commit" magit-rebase-reword-commit)
+    ("k" "to remove a commit" magit-rebase-remove-commit)]
+   [("f" "to autosquash"      magit-rebase-autosquash)
+    (6 "t" "to change dates"  magit-reshelve-since)]]
+  ["Actions"
+   :if magit-rebase-in-progress-p
+   ("r" "Continue" magit-rebase-continue)
+   ("s" "Skip"     magit-rebase-skip)
+   ("e" "Edit"     magit-rebase-edit)
+   ("a" "Abort"    magit-rebase-abort)])
+
+(transient-define-argument magit-rebase:--exec ()
+  :description "Run command after commits"
+  :class 'transient-option
+  :shortarg "-x"
+  :argument "--exec="
+  :reader #'read-shell-command)
+
+(defun magit-rebase-merges-select-mode (&rest _ignore)
+  (magit-read-char-case nil t
+    (?n "[n]o-rebase-cousins" "no-rebase-cousins")
+    (?r "[r]ebase-cousins" "rebase-cousins")))
+
+(defun magit-rebase-arguments ()
+  (transient-args 'magit-rebase))
+
+(defun magit-git-rebase (target args)
+  (magit-run-git-sequencer "rebase" args target))
+
+;;;###autoload(autoload 'magit-rebase-onto-pushremote "magit-sequence" nil t)
+(transient-define-suffix magit-rebase-onto-pushremote (args)
+  "Rebase the current branch onto its push-remote branch.
+
+With a prefix argument or when the push-remote is either not
+configured or unusable, then let the user first configure the
+push-remote."
+  :if #'magit-get-current-branch
+  :description #'magit-pull--pushbranch-description
+  (interactive (list (magit-rebase-arguments)))
+  (pcase-let ((`(,branch ,remote)
+               (magit--select-push-remote "rebase onto that")))
+    (magit-git-rebase (concat remote "/" branch) args)))
+
+;;;###autoload(autoload 'magit-rebase-onto-upstream "magit-sequence" nil t)
+(transient-define-suffix magit-rebase-onto-upstream (args)
+  "Rebase the current branch onto its upstream branch.
+
+With a prefix argument or when the upstream is either not
+configured or unusable, then let the user first configure
+the upstream."
+  :if #'magit-get-current-branch
+  :description #'magit-rebase--upstream-description
+  (interactive (list (magit-rebase-arguments)))
+  (let* ((branch (or (magit-get-current-branch)
+                     (user-error "No branch is checked out")))
+         (upstream (magit-get-upstream-branch branch)))
+    (when (or current-prefix-arg (not upstream))
+      (setq upstream
+            (magit-read-upstream-branch
+             branch (format "Set upstream of %s and rebase onto that" branch)))
+      (magit-set-upstream-branch branch upstream))
+    (magit-git-rebase upstream args)))
+
+(defun magit-rebase--upstream-description ()
+  (and-let ((branch (magit-get-current-branch)))
+    (or (magit-get-upstream-branch branch)
+        (let ((remote (magit-get "branch" branch "remote"))
+              (merge  (magit-get "branch" branch "merge"))
+              (u (magit--propertize-face "@{upstream}" 'bold)))
+          (cond
+            ((magit--unnamed-upstream-p remote merge)
+             (concat u ", replacing unnamed"))
+            ((magit--valid-upstream-p remote merge)
+             (concat u ", replacing non-existent"))
+            ((or remote merge)
+             (concat u ", replacing invalid"))
+            ((concat u ", setting that")))))))
+
+;;;###autoload
+(defun magit-rebase-branch (target args)
+  "Rebase the current branch onto a branch read in the minibuffer.
+All commits that are reachable from `HEAD' but not from the
+selected branch TARGET are being rebased."
+  (interactive (list (magit-read-other-branch-or-commit "Rebase onto")
+                     (magit-rebase-arguments)))
+  (message "Rebasing...")
+  (magit-git-rebase target args)
+  (message "Rebasing...done"))
+
+;;;###autoload
+(defun magit-rebase-subset (newbase start args)
+  "Rebase a subset of the current branch's history onto a new base.
+Rebase commits from START to `HEAD' onto NEWBASE.
+START has to be selected from a list of recent commits."
+  (interactive (list (magit-read-other-branch-or-commit
+                      "Rebase subset onto" nil
+                      (magit-get-upstream-branch))
+                     nil
+                     (magit-rebase-arguments)))
+  (cond (start
+         (message "Rebasing...")
+         (magit-run-git-sequencer "rebase" "--onto" newbase start args)
+         (message "Rebasing...done"))
+        ((magit-log-select
+           `(lambda (commit)
+              (magit-rebase-subset ,newbase (concat commit "^") (list ,@args)))
+           (concat "Type %p on a commit to rebase it "
+                   "and commits above it onto " newbase ",")))))
+
+(defun magit-rebase-interactive-1
+    ( commit args message
+      &optional editor delay-edit-confirm noassert confirm exact)
+  (declare (indent 2))
+  (cond ((not commit))
+        ((not (magit-rev-ancestor-p commit "HEAD"))
+         (user-error "%s isn't an ancestor of HEAD" commit))
+        ((not (magit-commit-parents commit))
+         (setq args (cons "--root" args)))
+        ((not exact)
+         (setq commit (concat commit "^"))))
+  (when (and commit (not noassert))
+    (setq commit (magit-rebase-interactive-assert
+                  commit delay-edit-confirm
+                  (seq-some (##string-prefix-p "--rebase-merges" %) args))))
+  (if (and commit (not confirm))
+      (let ((process-environment process-environment))
+        (when editor
+          (push (concat "GIT_SEQUENCE_EDITOR="
+                        (if (functionp editor)
+                            (funcall editor commit)
+                          editor))
+                process-environment))
+        (magit-run-git-sequencer "rebase" "-i" args
+                                 (and (not (member "--root" args)) commit)))
+    (magit-log-select
+      `(lambda (commit)
+         ;; In some cases (currently just magit-rebase-remove-commit), "-c
+         ;; commentChar=#" is added to the global arguments for git.  Ensure
+         ;; that the same happens when we chose the commit via
+         ;; magit-log-select, below.
+         (let ((magit-git-global-arguments (list ,@magit-git-global-arguments)))
+           (magit-rebase-interactive-1 commit (list ,@args)
+             ,message ,editor ,delay-edit-confirm ,noassert)))
+      message)))
+
+(defvar magit--rebase-published-symbol nil)
+(defvar magit--rebase-public-edit-confirmed nil)
+
+(defun magit-rebase-interactive-assert
+    (since &optional delay-edit-confirm rebase-merges)
+  (let* ((commit (magit-rebase--target-commit since))
+         (branches (magit-list-publishing-branches commit)))
+    (setq magit--rebase-public-edit-confirmed
+          (delete (magit-toplevel) magit--rebase-public-edit-confirmed))
+    (when (and branches
+               (or (not delay-edit-confirm)
+                   ;; The user might have stopped at a published commit
+                   ;; merely to add new commits *after* it.  Try not to
+                   ;; ask users whether they really want to edit public
+                   ;; commits, when they don't actually intend to do so.
+                   (not (all (##magit-rev-equal % commit) branches))))
+      (let ((m1 "Some of these commits have already been published to ")
+            (m2 ".\nDo you really want to modify them"))
+        (magit-confirm (or magit--rebase-published-symbol 'rebase-published)
+          (concat m1 "%s" m2)
+          (concat m1 "%d public branches" m2)
+          nil branches))
+      (push (magit-toplevel) magit--rebase-public-edit-confirmed)))
+  (if (and (magit-git-lines "rev-list" "--merges" (concat since "..HEAD"))
+           (not rebase-merges))
+      (magit-read-char-case "Proceed despite merge in rebase range?  " nil
+        (?c "[c]ontinue" since)
+        (?s "[s]elect other" nil)
+        (?a "[a]bort" (user-error "Quit")))
+    since))
+
+(defun magit-rebase--target-commit (since)
+  (if (string-suffix-p "^" since)
+      ;; If SINCE is "REV^", then the user selected
+      ;; "REV", which is the first commit that will
+      ;; be replaced.  (from^..to] <=> [from..to]
+      (substring since 0 -1)
+    ;; The "--root" argument is being used.
+    since))
+
+(defvar magit-rebase-interactive-include-selected t)
+
+;;;###autoload
+(defun magit-rebase-interactive (commit args)
+  "Start an interactive rebase sequence."
+  (interactive (list (magit-commit-at-point)
+                     (magit-rebase-arguments)))
+  (magit-rebase-interactive-1 commit args
+    "Type %p on a commit to rebase it and all commits above it,"
+    nil t nil nil
+    (not magit-rebase-interactive-include-selected)))
+
+;;;###autoload
+(defun magit-rebase-autosquash (select args)
+  "Combine squash and fixup commits with their intended targets.
+By default only squash into commits that are not reachable from
+the upstream branch.  If no upstream is configured or with a prefix
+argument, prompt for the first commit to potentially squash into."
+  (interactive (list current-prefix-arg
+                     (magit-rebase-arguments)))
+  (magit-rebase-interactive-1
+      (and-let ((_(not select))
+                (upstream (magit-get-upstream-branch)))
+        (magit-merge-base upstream "HEAD"))
+      (nconc (list "--autosquash" "--keep-empty") args)
+    "Type %p on a commit to squash into it and then rebase as necessary,"
+    "true" nil t nil t))
+
+;;;###autoload
+(defun magit-rebase-edit-commit (commit args)
+  "Edit a single older commit using rebase."
+  (interactive (list (magit-commit-at-point)
+                     (magit-rebase-arguments)))
+  (magit-rebase-interactive-1 commit args
+    "Type %p on a commit to edit it,"
+    (apply-partially #'magit-rebase--perl-editor 'edit)
+    t))
+
+;;;###autoload
+(defun magit-rebase-reword-commit (commit args)
+  "Reword a single older commit using rebase."
+  (interactive (list (magit-commit-at-point)
+                     (magit-rebase-arguments)))
+  (magit-rebase-interactive-1 commit args
+    "Type %p on a commit to reword its message,"
+    (apply-partially #'magit-rebase--perl-editor 'reword)))
+
+;;;###autoload
+(defun magit-rebase-remove-commit (commit args)
+  "Remove a single older commit using rebase."
+  (interactive (list (magit-commit-at-point)
+                     (magit-rebase-arguments)))
+  ;; magit-rebase--perl-editor assumes that the comment character is "#".
+  (let ((magit-git-global-arguments
+         (nconc (list "-c" "core.commentChar=#")
+                magit-git-global-arguments)))
+    (magit-rebase-interactive-1 commit args
+      "Type %p on a commit to remove it,"
+      (apply-partially #'magit-rebase--perl-editor 'remove)
+      nil nil t)))
+
+(defun magit-rebase--perl-editor (action since)
+  (let ((commit (magit-rev-abbrev (magit-rebase--target-commit since))))
+    (format "%s -i -p -e '++$x if not $x and s/^pick %s/%s %s/'"
+            magit-perl-executable
+            commit
+            (cl-case action
+              (edit   "edit")
+              (remove "noop\n# pick")
+              (reword "reword")
+              (t      (error "Unknown action: %s" action)))
+            commit)))
+
+;;;###autoload
+(defun magit-rebase-continue (&optional noedit)
+  "Restart the current rebasing operation.
+In some cases this pops up a commit message buffer for you do
+edit.  With a prefix argument the old message is reused as-is."
+  (interactive "P")
+  (cond
+    ((not (magit-rebase-in-progress-p))
+     (user-error "No rebase in progress"))
+    ((magit-anything-unstaged-p t)
+     (user-error "Cannot continue rebase with unstaged changes"))
+    (t
+     (let ((dir (magit-gitdir)))
+       (when (and (magit-anything-staged-p)
+                  (file-exists-p (expand-file-name "rebase-merge" dir))
+                  (not (member (magit-toplevel)
+                               magit--rebase-public-edit-confirmed)))
+         (magit-commit-amend-assert
+          (magit-file-line (expand-file-name "rebase-merge/orig-head" dir)))))
+     (if noedit
+         (with-environment-variables (("GIT_EDITOR" "true"))
+           (magit-run-git-async (magit--rebase-resume-command) "--continue")
+           (set-process-sentinel magit-this-process
+                                 #'magit-sequencer-process-sentinel)
+           magit-this-process)
+       (magit-run-git-sequencer (magit--rebase-resume-command) "--continue")))))
+
+;;;###autoload
+(defun magit-rebase-skip ()
+  "Skip the current commit and restart the current rebase operation."
+  (interactive)
+  (unless (magit-rebase-in-progress-p)
+    (user-error "No rebase in progress"))
+  (magit-run-git-sequencer (magit--rebase-resume-command) "--skip"))
+
+;;;###autoload
+(defun magit-rebase-edit ()
+  "Edit the todo list of the current rebase operation."
+  (interactive)
+  (unless (magit-rebase-in-progress-p)
+    (user-error "No rebase in progress"))
+  (magit-run-git-sequencer "rebase" "--edit-todo"))
+
+;;;###autoload
+(defun magit-rebase-abort ()
+  "Abort the current rebase operation, restoring the original branch."
+  (interactive)
+  (unless (magit-rebase-in-progress-p)
+    (user-error "No rebase in progress"))
+  (magit-confirm 'abort-rebase "Abort this rebase")
+  (magit-run-git (magit--rebase-resume-command) "--abort"))
+
+(defun magit-rebase-in-progress-p ()
+  "Return t if a rebase is in progress."
+  (let ((dir (magit-gitdir)))
+    (or (file-exists-p (expand-file-name "rebase-merge" dir))
+        (file-exists-p (expand-file-name "rebase-apply/onto" dir)))))
+
+(defun magit--rebase-resume-command ()
+  (if (file-exists-p (expand-file-name "rebase-recursive" (magit-gitdir)))
+      "rbr"
+    "rebase"))
+
+(defun magit-rebase--get-state-lines (file)
+  (and (magit-rebase-in-progress-p)
+       (let ((dir (magit-gitdir)))
+         (magit-file-line
+          (expand-file-name
+           (concat (if (file-directory-p (expand-file-name "rebase-merge" dir))
+                       "rebase-merge/"
+                     "rebase-apply/")
+                   file)
+           dir)))))
+
+;;; Sections
+
+(defun magit-insert-sequencer-sequence ()
+  "Insert section for the on-going cherry-pick or revert sequence.
+If no such sequence is in progress, do nothing."
+  (let ((picking (magit-cherry-pick-in-progress-p)))
+    (when (or picking (magit-revert-in-progress-p))
+      (let ((dir (magit-gitdir)))
+        (magit-insert-section (sequence)
+          (magit-insert-heading (if picking "Cherry Picking" "Reverting"))
+          (when-let ((lines (cdr (magit-file-lines
+                                  (expand-file-name "sequencer/todo" dir)))))
+            (dolist (line (nreverse lines))
+              (when (string-match
+                     "^\\(pick\\|revert\\) \\([^ ]+\\) \\(.*\\)$" line)
+                (magit-bind-match-strings (cmd hash msg) line
+                  (magit-insert-section (commit hash)
+                    (insert (propertize cmd 'font-lock-face 'magit-sequence-pick)
+                            " " (propertize hash 'font-lock-face 'magit-hash)
+                            " " msg "\n"))))))
+          (magit-sequence-insert-sequence
+           (magit-file-line
+            (expand-file-name (if picking "CHERRY_PICK_HEAD" "REVERT_HEAD")
+                              dir))
+           (magit-file-line (expand-file-name "sequencer/head" dir)))
+          (insert "\n"))))))
+
+(defun magit-insert-am-sequence ()
+  "Insert section for the on-going patch applying sequence.
+If no such sequence is in progress, do nothing."
+  (when (magit-am-in-progress-p)
+    (magit-insert-section (rebase-sequence)
+      (magit-insert-heading "Applying patches")
+      (let* ((patches (nreverse (magit-rebase-patches)))
+             (dir (expand-file-name "rebase-apply" (magit-gitdir)))
+             (i (string-to-number
+                 (magit-file-line (expand-file-name "last" dir))))
+             (cur (string-to-number
+                   (magit-file-line (expand-file-name "next" dir))))
+             patch commit)
+        (while (and patches (>= i cur))
+          (setq patch (pop patches))
+          (setq commit
+                (magit-commit-oid (cadr (split-string (magit-file-line patch)))
+                                  t))
+          (cond ((and commit (= i cur))
+                 (magit-sequence-insert-commit
+                  "stop" commit 'magit-sequence-stop))
+                ((= i cur)
+                 (magit-sequence-insert-am-patch
+                  "stop" patch 'magit-sequence-stop))
+                (commit
+                 (magit-sequence-insert-commit
+                  "pick" commit 'magit-sequence-pick))
+                ((magit-sequence-insert-am-patch
+                  "pick" patch 'magit-sequence-pick)))
+          (decf i)))
+      (magit-sequence-insert-sequence nil "ORIG_HEAD")
+      (insert ?\n))))
+
+(defun magit-sequence-insert-am-patch (type patch face)
+  (magit-insert-section (file patch)
+    (let ((title
+           (with-temp-buffer
+             (insert-file-contents patch nil nil 4096)
+             (unless (re-search-forward "^Subject: " nil t)
+               (goto-char (point-min)))
+             (buffer-substring (point) (line-end-position)))))
+      (insert (propertize type 'font-lock-face face)
+              ?\s (propertize (file-name-nondirectory patch)
+                              'font-lock-face 'magit-hash)
+              ?\s title
+              ?\n))))
+
+(defun magit-insert-rebase-sequence ()
+  "Insert section for the on-going rebase sequence.
+If no such sequence is in progress, do nothing."
+  (when (magit-rebase-in-progress-p)
+    (let* ((gitdir (magit-gitdir))
+           (mergep (file-directory-p (expand-file-name "rebase-merge" gitdir)))
+           (dir  (if mergep "rebase-merge/" "rebase-apply/"))
+           (name (thread-first (concat dir "head-name")
+                   (expand-file-name gitdir)
+                   magit-file-line))
+           (onto (thread-first (concat dir "onto")
+                   (expand-file-name gitdir)
+                   magit-file-line))
+           (onto (or (magit-rev-name onto name)
+                     (magit-rev-name onto "refs/heads/*") onto))
+           (name (or (magit-rev-name name "refs/heads/*") name)))
+      (magit-insert-section (rebase-sequence)
+        (magit-insert-heading (format "Rebasing %s onto %s" name onto))
+        (if mergep
+            (magit-rebase-insert-merge-sequence onto)
+          (magit-rebase-insert-apply-sequence onto))
+        (insert ?\n)))))
+
+(defun magit-rebase--todo ()
+  "Return `git-rebase-action' instances for remaining rebase actions.
+These are ordered the same way they'll be sorted in the status
+buffer (i.e., the reverse of how they will be applied)."
+  (let ((comment-start (or (magit-get "core.commentChar") "#"))
+        (commits ())
+        (actions ()))
+    (with-temp-buffer
+      (insert-file-contents
+       (expand-file-name "rebase-merge/git-rebase-todo" (magit-gitdir)))
+      (while (not (eobp))
+        (when-let ((obj (git-rebase-current-line t)))
+          (push obj actions)
+          (when (memq (oref obj action-type) '(commit merge))
+            (push obj commits)))
+        (forward-line)))
+    (let ((abbrevs
+           (and commits
+                (magit-git-lines
+                 "log" "--no-walk=unsorted" "--format=%h"
+                 (mapcar (lambda (obj)
+                           (if (eq (oref obj action-type) 'merge)
+                               (let ((options (oref obj action-options)))
+                                 (and (string-match "-[cC] \\([^ ]+\\)" options)
+                                      (match-str 1 options)))
+                             (oref obj target)))
+                         commits)))))
+      (cl-assert (equal (length commits) (length abbrevs)))
+      (while-let ((obj (pop commits))
+                  (val (pop abbrevs)))
+        (oset obj abbrev val)))
+    actions))
+
+(defun magit-rebase-insert-merge-sequence (onto)
+  (dolist (obj (magit-rebase--todo))
+    (with-slots (action-type action action-options target abbrev trailer) obj
+      (pcase action-type
+        ((or 'commit (and 'merge (guard abbrev)))
+         (magit-sequence-insert-commit action target 'magit-sequence-pick
+                                       abbrev trailer))
+        ((guard action) (magit-sequence-insert-step action target)))))
+  (let ((dir (magit-gitdir)))
+    (magit-sequence-insert-sequence
+     (magit-file-line (expand-file-name "rebase-merge/stopped-sha" dir))
+     onto
+     (and$ (magit-file-lines (expand-file-name "rebase-merge/done" dir))
+           (cadr (split-string (car (last $))))))))
+
+(defun magit-rebase-insert-apply-sequence (onto)
+  (let* ((dir (magit-gitdir))
+         (rewritten
+          (mapcar (##car (split-string %))
+                  (magit-file-lines
+                   (expand-file-name "rebase-apply/rewritten" dir))))
+         (stop (magit-file-line
+                (expand-file-name "rebase-apply/original-commit" dir))))
+    (dolist (patch (nreverse (cdr (magit-rebase-patches))))
+      (let ((hash (cadr (split-string (magit-file-line patch)))))
+        (unless (or (member hash rewritten)
+                    (equal hash stop))
+          (magit-sequence-insert-commit "pick" hash 'magit-sequence-pick))))
+    (magit-sequence-insert-sequence
+     (magit-file-line (expand-file-name "rebase-apply/original-commit" dir))
+     onto)))
+
+(defun magit-rebase-patches ()
+  (directory-files (expand-file-name "rebase-apply" (magit-gitdir))
+                   t "\\`[0-9]\\{4\\}\\'"))
+
+(defun magit-sequence-insert-sequence (stop onto &optional orig)
+  (let ((head (magit-rev-parse "HEAD")) done)
+    (setq onto (if onto (magit-rev-parse onto) head))
+    (setq done (mapcar (##split-string % "\0")
+                       (magit-git-lines "log" "--format=%H%x00%h%x00%s"
+                                        (concat onto "..HEAD"))))
+    (when (and stop (not (assoc (magit-rev-parse stop) done)))
+      (let ((id (magit-patch-id stop)))
+        (if-let ((matched (car (assoc (##equal (magit-patch-id %) id) done))))
+            (setq stop matched)
+          (cond
+            ((assoc (##magit-rev-equal % stop) done)
+             ;; The commit's testament has been executed.
+             (magit-sequence-insert-commit "void" stop 'magit-sequence-drop))
+            ;; The faith of the commit is still undecided...
+            ((magit-anything-unmerged-p)
+             ;; ...and time travel isn't for the faint of heart.
+             (magit-sequence-insert-commit "join" stop 'magit-sequence-part))
+            ((magit-anything-modified-p t)
+             ;; ...and the dust hasn't settled yet...
+             (magit-sequence-insert-commit
+              (let* ((magit--refresh-cache nil)
+                     (staged   (magit-commit-tree "oO" nil "HEAD"))
+                     (unstaged (magit-commit-worktree "oO" "--reset")))
+                (cond
+                  ;; ...but we could end up at the same tree just by committing.
+                  ((or (magit-rev-equal staged   stop)
+                       (magit-rev-equal unstaged stop))
+                   "goal")
+                  ;; ...but the changes are still there, untainted.
+                  ((or (equal (magit-patch-id staged)   id)
+                       (equal (magit-patch-id unstaged) id))
+                   "same")
+                  ;; ...and some changes are gone and/or others were added.
+                  ("work")))
+              stop 'magit-sequence-part))
+            ;; The commit is definitely gone...
+            ((assoc (##magit-rev-equal % stop) done)
+             ;; ...but all of its changes are still in effect.
+             (magit-sequence-insert-commit "poof" stop 'magit-sequence-drop))
+            ;; ...and some changes are gone and/or other changes were added.
+            ((magit-sequence-insert-commit "gone" stop 'magit-sequence-drop)))
+          (setq stop nil))))
+    (pcase-dolist (`(,rev ,abbrev ,msg) done)
+      (apply #'magit-sequence-insert-commit
+             (cond ((equal rev stop)
+                    ;; ...but its reincarnation lives on.
+                    ;; Or it didn't die in the first place.
+                    (list (if (and (equal rev head)
+                                   (equal (magit-patch-id rev)
+                                          (magit-patch-id orig)))
+                              "stop" ; We haven't done anything yet.
+                            "like")  ; There are new commits.
+                          rev (if (equal rev head)
+                                  'magit-sequence-head
+                                'magit-sequence-stop)
+                          abbrev msg))
+                   ((equal rev head)
+                    (list "done" rev 'magit-sequence-head abbrev msg))
+                   ((list "done" rev 'magit-sequence-done abbrev msg)))))
+    (magit-sequence-insert-commit "onto" onto
+                                  (if (equal onto head)
+                                      'magit-sequence-head
+                                    'magit-sequence-onto))))
+
+(defun magit-sequence-insert-commit (type hash face &optional abbrev msg)
+  (magit-insert-section (commit hash)
+    (magit-insert-heading
+      (magit--propertize-face type face) " "
+      (if abbrev
+          (concat (magit--propertize-face abbrev 'magit-hash) " " msg "\n")
+        (concat (magit-format-rev-summary hash) "\n")))))
+
+(defun magit-sequence-insert-step (type target)
+  (magit-insert-section (rebase-step (cons type target))
+    (magit-insert-heading
+      (propertize type 'font-lock-face 'magit-sequence-pick)
+      (and target
+           (concat "\s"
+                   (propertize target 'font-lock-face 'git-rebase-label))))))
+
+;;; _
+(provide 'magit-sequence)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-sequence.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sequence.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sequence.elc
new file mode 100644
index 0000000..d999f83
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sequence.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sparse-checkout.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sparse-checkout.el
new file mode 100644
index 0000000..861478b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sparse-checkout.el
@@ -0,0 +1,166 @@
+;;; magit-sparse-checkout.el --- Sparse checkout support for Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Kyle Meyer <kyle@kyleam.com>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library provides an interface to the "git sparse-checkout"
+;; command (operating in cone mode).
+
+;;; Code:
+
+(require 'magit)
+
+;;; Utilities
+
+(defun magit-sparse-checkout-enabled-p ()
+  "Return non-nil if working tree is a sparse checkout."
+  (magit-get-boolean "core.sparsecheckout"))
+
+(defun magit-sparse-checkout--auto-enable ()
+  (if (magit-sparse-checkout-enabled-p)
+      (unless (magit-get-boolean "core.sparsecheckoutcone")
+        (user-error
+         "Magit's sparse checkout functionality requires cone mode"))
+    ;; Note: Don't use `magit-sparse-checkout-enable' because it's
+    ;; asynchronous.
+    (magit-run-git "sparse-checkout" "init" "--cone")))
+
+(defun magit-sparse-checkout-directories ()
+  "Return directories that are recursively included in the sparse checkout.
+See the \"git sparse-checkout\" manpage for details about
+\"recursive\" versus \"parent\" directories in cone mode."
+  (and (magit-get-boolean "core.sparsecheckoutcone")
+       (mapcar #'file-name-as-directory
+               (magit-git-lines "sparse-checkout" "list"))))
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-sparse-checkout "magit-sparse-checkout" nil t)
+(transient-define-prefix magit-sparse-checkout ()
+  "Create and manage sparse checkouts."
+  :man-page "git-sparse-checkout"
+  ["Arguments for enabling"
+   :if-not magit-sparse-checkout-enabled-p
+   ("-i" "Use sparse index" "--sparse-index")]
+  ["Actions"
+   [:if-not magit-sparse-checkout-enabled-p
+    ("e" "Enable sparse checkout" magit-sparse-checkout-enable)]
+   [:if magit-sparse-checkout-enabled-p
+    ("d" "Disable sparse checkout" magit-sparse-checkout-disable)
+    ("r" "Reapply rules" magit-sparse-checkout-reapply)]
+   [("s" "Set directories" magit-sparse-checkout-set)
+    ("a" "Add directories" magit-sparse-checkout-add)]])
+
+;;;###autoload
+(defun magit-sparse-checkout-enable (&optional args)
+  "Convert the working tree to a sparse checkout."
+  (interactive (list (transient-args 'magit-sparse-checkout)))
+  (magit-run-git-async "sparse-checkout" "init" "--cone" args))
+
+;;;###autoload
+(defun magit-sparse-checkout-set (directories)
+  "Restrict working tree to DIRECTORIES.
+To extend rather than override the currently configured
+directories, call `magit-sparse-checkout-add' instead."
+  (interactive
+    (list (magit-completing-read-multiple
+           "Include these directories: "
+           ;; Note: Given that the appeal of sparse checkouts is
+           ;; dealing with very large trees, listing all subdirectories
+           ;; may need to be reconsidered.
+           (magit-revision-directories "HEAD"))))
+  (magit-sparse-checkout--auto-enable)
+  (magit-run-git-async "sparse-checkout" "set" directories))
+
+;;;###autoload
+(defun magit-sparse-checkout-add (directories)
+  "Add DIRECTORIES to the working tree.
+To override rather than extend the currently configured
+directories, call `magit-sparse-checkout-set' instead."
+  (interactive
+    (list (magit-completing-read-multiple
+           "Add these directories: "
+           ;; Same performance note as in `magit-sparse-checkout-set',
+           ;; but even more so given the additional processing.
+           (seq-remove
+            (let ((re (concat
+                       "\\`"
+                       (regexp-opt (magit-sparse-checkout-directories)))))
+              (##string-match-p re %))
+            (magit-revision-directories "HEAD")))))
+  (magit-sparse-checkout--auto-enable)
+  (magit-run-git-async "sparse-checkout" "add" directories))
+
+;;;###autoload
+(defun magit-sparse-checkout-reapply ()
+  "Reapply the sparse checkout rules to the working tree.
+Some operations such as merging or rebasing may need to check out
+files that aren't included in the sparse checkout.  Call this
+command to reset to the sparse checkout state."
+  (interactive)
+  (magit-run-git-async "sparse-checkout" "reapply"))
+
+;;;###autoload
+(defun magit-sparse-checkout-disable ()
+  "Convert sparse checkout to full checkout.
+Note that disabling the sparse checkout does not clear the
+configured directories.  Call `magit-sparse-checkout-enable' to
+restore the previous sparse checkout."
+  (interactive)
+  (magit-run-git-async "sparse-checkout" "disable"))
+
+;;; Miscellaneous
+
+(defun magit-sparse-checkout-insert-header ()
+  "Insert header line with sparse checkout information.
+This header is not inserted by default.  To enable it, add it to
+`magit-status-headers-hook'."
+  (when (magit-sparse-checkout-enabled-p)
+    (insert (propertize (format "%-10s" "Sparse! ")
+                        'font-lock-face 'magit-section-heading))
+    (insert
+     (let ((dirs (magit-sparse-checkout-directories)))
+       (pcase (length dirs)
+         (0 "top-level directory")
+         (1 (car dirs))
+         (n (format "%d directories" n)))))
+    (insert ?\n)))
+
+;;; _
+(provide 'magit-sparse-checkout)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-sparse-checkout.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sparse-checkout.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sparse-checkout.elc
new file mode 100644
index 0000000..0aa310d
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-sparse-checkout.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-stash.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-stash.el
new file mode 100644
index 0000000..f250e78
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-stash.el
@@ -0,0 +1,702 @@
+;;; magit-stash.el --- Stash support for Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Support for Git stashes.
+
+;;; Code:
+
+(require 'magit)
+(require 'magit-reflog)
+(require 'magit-sequence)
+
+;;; Options
+
+(defgroup magit-stash nil
+  "List stashes and show stash diffs."
+  :group 'magit-modes)
+
+;;;; Diff options
+
+(defcustom magit-stash-sections-hook
+  (list #'magit-insert-stash-notes
+        #'magit-insert-stash-worktree
+        #'magit-insert-stash-index
+        #'magit-insert-stash-untracked)
+  "Hook run to insert sections into stash diff buffers."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-stash
+  :type 'hook)
+
+;;;; Log options
+
+(defcustom magit-stashes-margin
+  (list (nth 0 magit-log-margin)
+        (nth 1 magit-log-margin)
+        'magit-log-margin-width nil
+        (nth 4 magit-log-margin))
+  "Format of the margin in `magit-stashes-mode' buffers.
+
+The value has the form (INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH).
+
+If INIT is non-nil, then the margin is shown initially.
+STYLE controls how to format the author or committer date.
+  It can be one of `age' (to show the age of the commit),
+  `age-abbreviated' (to abbreviate the time unit to a character),
+  or a string (suitable for `format-time-string') to show the
+  actual date.  Option `magit-log-margin-show-committer-date'
+  controls which date is being displayed.
+WIDTH controls the width of the margin.  This exists for forward
+  compatibility and currently the value should not be changed.
+AUTHOR controls whether the name of the author is also shown by
+  default.
+AUTHOR-WIDTH has to be an integer.  When the name of the author
+  is shown, then this specifies how much space is used to do so."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-stash
+  :group 'magit-margin
+  :type magit-log-margin--custom-type
+  :initialize #'magit-custom-initialize-reset
+  :set-after '(magit-log-margin)
+  :set (apply-partially #'magit-margin-set-variable 'magit-stashes-mode))
+
+;;;; Variables
+
+(defvar magit-stash-read-message-function #'magit-stash-read-message
+  "Function used to read the message when creating a stash.")
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-stash "magit-stash" nil t)
+(transient-define-prefix magit-stash ()
+  "Stash uncommitted changes."
+  :man-page "git-stash"
+  ["Arguments"
+   ("-u" "Also save untracked files" ("-u" "--include-untracked"))
+   ("-a" "Also save untracked and ignored files" ("-a" "--all"))]
+  [["Stash"
+    ("z" "both"          magit-stash-both)
+    ("i" "index"         magit-stash-index)
+    ("w" "worktree"      magit-stash-worktree)
+    ("x" "keeping index" magit-stash-keep-index)
+    ("P" "push"          magit-stash-push :level 5)]
+   ["Snapshot"
+    ("Z" "both"          magit-snapshot-both)
+    ("I" "index"         magit-snapshot-index)
+    ("W" "worktree"      magit-snapshot-worktree)
+    ("r" "to wip ref"    magit-wip-commit)]
+   ["Use"
+    ("a" "Apply"         magit-stash-apply)
+    ("p" "Pop"           magit-stash-pop)
+    ("k" "Drop"          magit-stash-drop)]
+   ["Inspect"
+    ("l" "List"          magit-stash-list)
+    ("v" "Show"          magit-stash-show)]
+   ["Transform"
+    ("b" "Branch"        magit-stash-branch)
+    ("B" "Branch here"   magit-stash-branch-here)
+    ("f" "Format patch"  magit-stash-format-patch)]])
+
+(defun magit-stash-arguments ()
+  (transient-args 'magit-stash))
+
+;;;###autoload
+(defun magit-stash-both (message &optional include-untracked)
+  "Create a stash of the index and working tree.
+Untracked files are included according to infix arguments.
+One prefix argument is equivalent to \"--include-untracked\"
+while two prefix arguments are equivalent to \"--all\"."
+  (interactive
+    (progn (when (and (magit-merge-in-progress-p)
+                      (not (magit-y-or-n-p "\
+Stashing and resetting during a merge conflict.  \
+Applying the resulting stash won't restore the merge state.  \
+Proceed anyway? ")))
+             (user-error "Abort"))
+           (magit-stash-read-args)))
+  (magit-stash-save message t t include-untracked t))
+
+;;;###autoload
+(defun magit-stash-index (message)
+  "Create a stash of the index only.
+Unstaged and untracked changes are not stashed.  The stashed
+changes are applied in reverse to both the index and the
+worktree.  This command can fail when the worktree is not clean.
+Applying the resulting stash has the inverse effect."
+  (interactive (list (funcall magit-stash-read-message-function)))
+  (magit-stash-save message t nil nil t 'worktree))
+
+;;;###autoload
+(defun magit-stash-worktree (message &optional include-untracked)
+  "Create a stash of unstaged changes in the working tree.
+Untracked files are included according to infix arguments.
+One prefix argument is equivalent to \"--include-untracked\"
+while two prefix arguments are equivalent to \"--all\"."
+  (interactive (magit-stash-read-args))
+  (magit-stash-save message nil t include-untracked t 'index))
+
+;;;###autoload
+(defun magit-stash-keep-index (message &optional include-untracked)
+  "Create a stash of the index and working tree, keeping index intact.
+Untracked files are included according to infix arguments.
+One prefix argument is equivalent to \"--include-untracked\"
+while two prefix arguments are equivalent to \"--all\"."
+  (interactive (magit-stash-read-args))
+  (magit-stash-save message t t include-untracked t 'index))
+
+(defun magit-stash-read-args ()
+  (list (funcall magit-stash-read-message-function)
+        (magit-stash-read-untracked)))
+
+(defun magit-stash-read-message ()
+  "Read a message from the minibuffer, to be used for a stash.
+
+The message that Git would have picked, is available as the
+default (used when the user enters the empty string) and as
+the first future history element.  The second future history
+element is just \"On BRANCH: \".  Future history elements can
+be accessed using \\<minibuffer-local-map>\\[next-history-element])."
+  (let ((branch (or (magit-get-current-branch) "(no branch)"))
+        (ellipsis (magit--ellipsis)))
+    (read-string (format "Stash message (default: On%s:%s): " ellipsis ellipsis)
+                 nil nil
+                 (list (format "On %s: %s" branch (magit-rev-format "%h %s"))
+                       (format "On %s: " branch)))))
+
+(defun magit-stash-read-message-traditional ()
+  "Read a message from the minibuffer, to be used for a stash.
+
+If the user confirms the initial-input unmodified, then the
+abbreviated commit hash and commit summary are appended.
+The resulting message is what Git would have used."
+  (let* ((default (format "On %s: "
+                          (or (magit-get-current-branch) "(no branch)")))
+         (input (magit-read-string "Stash message" default)))
+    (if (equal input default)
+        (concat default (magit-rev-format "%h %s"))
+      input)))
+
+(defun magit-stash-read-untracked ()
+  (let ((prefix (prefix-numeric-value current-prefix-arg))
+        (args   (magit-stash-arguments)))
+    (cond ((or (= prefix 16) (member "--all" args)) 'all)
+          ((or (= prefix  4) (member "--include-untracked" args)) t))))
+
+;;;###autoload
+(defun magit-snapshot-both (&optional include-untracked)
+  "Create a snapshot of the index and working tree.
+Untracked files are included according to infix arguments.
+One prefix argument is equivalent to \"--include-untracked\"
+while two prefix arguments are equivalent to \"--all\"."
+  (interactive (magit-snapshot-read-args))
+  (magit-snapshot-save t t include-untracked t))
+
+;;;###autoload
+(defun magit-snapshot-index ()
+  "Create a snapshot of the index only.
+Unstaged and untracked changes are not stashed."
+  (interactive)
+  (magit-snapshot-save t nil nil t))
+
+;;;###autoload
+(defun magit-snapshot-worktree (&optional include-untracked)
+  "Create a snapshot of unstaged changes in the working tree.
+Untracked files are included according to infix arguments.
+One prefix argument is equivalent to \"--include-untracked\"
+while two prefix arguments are equivalent to \"--all\"."
+  (interactive (magit-snapshot-read-args))
+  (magit-snapshot-save nil t include-untracked t))
+
+(defun magit-snapshot-read-args ()
+  (list (magit-stash-read-untracked)))
+
+(defun magit-snapshot-save (index worktree untracked &optional refresh)
+  (magit-stash-save (concat "WIP on " (magit-stash-summary))
+                    index worktree untracked refresh t))
+
+;;;###autoload(autoload 'magit-stash-push "magit-stash" nil t)
+(transient-define-prefix magit-stash-push (&optional transient args)
+  "Create stash using \"git stash push\".
+
+This differs from Magit's other stashing commands, which don't
+use \"git stash\" and are generally more flexible but don't allow
+specifying a list of files to be stashed."
+  :man-page "git-stash"
+  ["Arguments"
+   (magit:-- :reader (lambda (prompt initial-input history)
+                       (magit-read-files prompt initial-input history
+                                         #'magit-modified-files)))
+   ("-u" "Also save untracked files" ("-u" "--include-untracked"))
+   ("-a" "Also save untracked and ignored files" ("-a" "--all"))
+   ("-k" "Keep index" ("-k" "--keep-index"))
+   ("-K" "Don't keep index" "--no-keep-index")]
+  ["Actions"
+   ("P" "push" magit-stash-push)]
+  (interactive (if (eq transient-current-command 'magit-stash-push)
+                   (list nil (transient-args 'magit-stash-push))
+                 (list t)))
+  (if transient
+      (transient-setup 'magit-stash-push)
+    (magit-run-git "stash" "push"
+                   (seq-filter #'atom args)
+                   (assoc "--" args))))
+
+;;;###autoload
+(defun magit-stash-apply (stash)
+  "Apply a stash to the working tree.
+
+When using a Git release before v2.38.0, simply run \"git stash
+apply\" or with a prefix argument \"git stash apply --index\".
+
+When using Git v2.38.0 or later, behave more intelligently:
+
+First try \"git stash apply --index\", which tries to preserve the
+index stored in the stash, if any.  This may fail because applying
+the stash could result in conflicts and those have to be stored in
+the index, making it impossible to also store the stash's index
+there.
+
+If \"git stash\" fails, then potentially fall back to using \"git
+apply\".  If the stash does not touch any unstaged files, then pass
+\"--3way\" to that command.  Otherwise ask the user whether to use
+that argument or \"--reject\".  Customize `magit-no-confirm' if you
+want to fall back to using \"--3way\", without being prompted."
+  (interactive (list (magit-read-stash "Apply stash")))
+  (magit-stash--apply "apply" stash))
+
+;;;###autoload
+(defun magit-stash-pop (stash)
+  "Apply a stash to the working tree, on success remove it from stash list.
+
+When using a Git release before v2.38.0, simply run \"git stash
+pop\" or with a prefix argument \"git stash pop --index\".
+
+When using Git v2.38.0 or later, behave more intelligently:
+
+First try \"git stash apply --index\", which tries to preserve the
+index stored in the stash, if any.  This may fail because applying
+the stash could result in conflicts and those have to be stored in
+the index, making it impossible to also store the stash's index
+there.
+
+If \"git stash\" fails, then potentially fall back to using \"git
+apply\".  If the stash does not touch any unstaged files, then pass
+\"--3way\" to that command.  Otherwise ask the user whether to use
+that argument or \"--reject\".  Customize `magit-no-confirm' if you
+want to fall back to using \"--3way\", without being prompted."
+  (interactive (list (magit-read-stash "Pop stash")))
+  (magit-stash--apply "pop" stash))
+
+(defun magit-stash--apply (action stash)
+  (if (magit-git-version< "2.38.0")
+      (magit-run-git "stash" action stash (and current-prefix-arg "--index"))
+    (magit-stash--apply-1 action stash)
+    (magit-refresh)))
+
+(defun magit-stash--apply-1 (action stash)
+  (or
+   (magit--run-git-stash action "--index" stash)
+   ;; The stash's index could not be applied, so always keep the stash.
+   (magit--run-git-stash "apply" stash)
+   (let* ((range (format "%s^..%s" stash stash))
+          (stashed (magit-git-items "diff" "-z" "--name-only" range "--"))
+          (conflicts (compat-call
+                      sort (cl-union (magit-unstaged-files t stashed)
+                                     (magit-untracked-files t stashed)
+                                     :test #'equal)
+                      :lessp #'string<))
+          (arg (if (or (not conflicts)
+                       (memq 'stash-apply-3way magit-no-confirm))
+                   "--3way"
+                 (magit-read-char-case
+                     (concat
+                      "Could not apply stash because of unstaged changes.\n\n"
+                      "To do a three-way merge, these files have to be staged\n"
+                      (mapconcat (##format "  %s" %) conflicts "\n")
+                      "\n")
+                     nil
+                   (?s (format
+                        "\n[s] stage file%s and apply with \"git apply --3way\""
+                        (if (length> conflicts 1) "s" ""))
+                       "--3way")
+                   (?r "\n[r] apply with \"git apply --reject\"" "--reject")
+                   (?c "\n[c] cancel" nil)))))
+     (when arg
+       (when (and (equal arg "--3way") conflicts)
+         (magit-stage-1 nil conflicts))
+       (with-temp-buffer
+         (magit-git-insert "diff" range)
+         (magit-run-git-with-input "apply" arg "-"))))))
+
+(defun magit--run-git-stash (&rest args)
+  (magit--with-temp-process-buffer
+    (let ((exit (save-excursion
+                  (with-environment-variables (("LC_ALL" "en_US.utf8"))
+                    (magit-process-git t "stash" args))))
+          (buffer (current-buffer))
+          (failed (looking-at "\\`error: ")))
+      (with-current-buffer (magit-process-buffer t)
+        (magit-process-finish-section
+         (magit-process-insert-section default-directory magit-git-executable
+                                       (magit-process-git-arguments args)
+                                       exit buffer)
+         exit))
+      (pcase (list exit failed)
+        (`(0  ,_) t) ; no conflict
+        (`(1 nil) t) ; successfully installed conflict
+        (_ nil)))))  ; could not install conflict, or genuine error
+
+;;;###autoload
+(defun magit-stash-drop (stash)
+  "Remove a stash from the stash list.
+When the region is active offer to drop all contained stashes."
+  (interactive
+    (list (if-let ((values (magit-region-values 'stash)))
+              (magit-confirm 'drop-stashes nil "Drop %d stashes" nil values)
+            (magit-read-stash "Drop stash"))))
+  (dolist (stash (if (listp stash)
+                     (nreverse (prog1 stash (setq stash (car stash))))
+                   (list stash)))
+    (message "Deleted refs/%s (was %s)" stash
+             (magit-rev-parse "--short" stash))
+    (magit-call-git "rev-parse" stash)
+    (magit-call-git "stash" "drop" stash))
+  (magit-refresh))
+
+;;;###autoload
+(defun magit-stash-clear (ref)
+  "Remove all stashes saved in REF's reflog by deleting REF."
+  (interactive (let ((ref (or (magit-section-value-if 'stashes) "refs/stash")))
+                 (magit-confirm 'drop-stashes
+                   (list "Drop all stashes in %s" ref))
+                 (list ref)))
+  (magit-run-git "update-ref" "-d" ref))
+
+;;;###autoload
+(defun magit-stash-branch (stash branch)
+  "Create and checkout a new BRANCH from an existing STASH.
+The new branch starts at the commit that was current when the
+stash was created.  If the stash applies cleanly, then drop it."
+  (interactive (list (magit-read-stash "Branch stash")
+                     (magit-read-string-ns "Branch name")))
+  (magit-run-git "stash" "branch" branch stash))
+
+;;;###autoload
+(defun magit-stash-branch-here (stash branch)
+  "Create and checkout a new BRANCH from an existing STASH.
+Use the current branch or `HEAD' as the starting-point of BRANCH.
+Then apply STASH, dropping it if it applies cleanly."
+  (interactive (list (magit-read-stash "Branch stash")
+                     (magit-read-string-ns "Branch name")))
+  (let ((start-point (or (magit-get-current-branch) "HEAD")))
+    (magit-call-git "checkout" "-b" branch start-point)
+    (magit-branch-maybe-adjust-upstream branch start-point))
+  (magit-stash-apply stash))
+
+;;;###autoload
+(defun magit-stash-format-patch (stash)
+  "Create a patch from STASH."
+  (interactive (list (magit-read-stash "Create patch from stash")))
+  (with-temp-file (magit-rev-format "0001-%f.patch" stash)
+    (magit-git-insert "stash" "show" "-p" stash))
+  (magit-refresh))
+
+;;; Plumbing
+
+(defun magit-stash-save (message index worktree untracked
+                                 &optional refresh keep noerror ref)
+  (if (or (and index     (magit-staged-files t))
+          (and worktree  (magit-unstaged-files t))
+          (and untracked (magit-untracked-files (eq untracked 'all))))
+      (magit-with-toplevel
+        (magit-stash-store message (or ref "refs/stash")
+                           (magit-stash-create message index worktree untracked))
+        (if (eq keep 'worktree)
+            (with-temp-buffer
+              (magit-git-insert "diff" "--cached" "--no-ext-diff")
+              (magit-run-git-with-input
+               "apply" "--reverse" "--cached" "--ignore-space-change" "-")
+              (magit-run-git-with-input
+               "apply" "--reverse" "--ignore-space-change" "-"))
+          (unless (eq keep t)
+            (if (eq keep 'index)
+                (magit-call-git "checkout" "--" ".")
+              (magit-call-git "reset" "--hard" "HEAD" "--"))
+            (when untracked
+              (magit-call-git "clean" "--force" "-d"
+                              (and (eq untracked 'all) "-x")))))
+        (when refresh
+          (magit-refresh)))
+    (unless noerror
+      (user-error "No %s changes to save" (cond ((not index)  "unstaged")
+                                                ((not worktree) "staged")
+                                                ("local"))))))
+
+(defun magit-stash-store (message ref rev)
+  (magit-update-ref ref message rev))
+
+(defun magit-stash-create (message index worktree untracked)
+  (unless (magit-rev-parse "--verify" "HEAD")
+    (error "You do not have the initial commit yet"))
+  (let ((magit-git-global-arguments (nconc (list "-c" "commit.gpgsign=false")
+                                           magit-git-global-arguments))
+        (default-directory (magit-toplevel))
+        (summary (magit-stash-summary))
+        (head "HEAD"))
+    (when (and worktree (not index))
+      (setq head (or (magit-commit-tree "pre-stash index" nil "HEAD")
+                     (error "Cannot save the current index state"))))
+    (or (setq index (magit-commit-tree (concat "index on " summary) nil head))
+        (error "Cannot save the current index state"))
+    (and untracked
+         (setq untracked (magit-untracked-files (eq untracked 'all)))
+         (setq untracked (magit-with-temp-index nil nil
+                           (or (and (magit-update-files untracked)
+                                    (magit-commit-tree
+                                     (concat "untracked files on " summary)))
+                               (error "Cannot save the untracked files")))))
+    (magit-with-temp-index index "-m"
+      (when worktree
+        (or (magit-update-files (magit-git-items "diff" "-z" "--name-only" head))
+            (error "Cannot save the current worktree state")))
+      (or (magit-commit-tree message nil head index untracked)
+          (error "Cannot save the current worktree state")))))
+
+(defun magit-stash-summary ()
+  (concat (or (magit-get-current-branch) "(no branch)")
+          ": " (magit-rev-format "%h %s")))
+
+;;; Sections
+
+(defvar-keymap magit-stashes-section-map
+  :doc "Keymap for `stashes' section."
+  "<remap> <magit-delete-thing>" #'magit-stash-clear
+  "<remap> <magit-visit-thing>"  #'magit-stash-list
+  "<2>" (magit-menu-item "Clear %t" #'magit-stash-clear)
+  "<1>" (magit-menu-item "List %t"  #'magit-stash-list))
+
+(defvar-keymap magit-stash-section-map
+  :doc "Keymap for `stash' sections."
+  "<remap> <magit-cherry-pick>"  #'magit-stash-pop
+  "<remap> <magit-cherry-apply>" #'magit-stash-apply
+  "<remap> <magit-delete-thing>" #'magit-stash-drop
+  "<remap> <magit-visit-thing>"  #'magit-stash-show
+  "<4>" (magit-menu-item "Pop %M"    #'magit-stash-pop)
+  "<3>" (magit-menu-item "Apply %M"  #'magit-stash-apply)
+  "<2>" (magit-menu-item "Delete %M" #'magit-stash-drop)
+  "<1>" (magit-menu-item "Visit %v"  #'magit-stash-show))
+
+(magit-define-section-jumper magit-jump-to-stashes
+  "Stashes" stashes "refs/stash" magit-insert-stashes)
+
+(cl-defun magit-insert-stashes (&optional (ref   "refs/stash")
+                                          (heading "Stashes:"))
+  "Insert `stashes' section showing reflog for \"refs/stash\".
+If optional REF is non-nil, show reflog for that instead.
+If optional HEADING is non-nil, use that as section heading
+instead of \"Stashes:\"."
+  (let ((verified (magit-rev-verify ref))
+        (autostash (magit-rebase--get-state-lines "autostash")))
+    (when (or autostash verified)
+      (magit-insert-section (stashes ref)
+        (magit-insert-heading heading)
+        (when autostash
+          (pcase-let ((`(,author ,date ,msg)
+                       (split-string
+                        (car (magit-git-lines
+                              "show" "-q" "--format=%aN%x00%at%x00%s"
+                              autostash))
+                        "\0")))
+            (magit-insert-section (stash autostash)
+              (insert (propertize "AUTOSTASH" 'font-lock-face 'magit-hash))
+              (insert " " msg "\n")
+              (magit-log-format-margin autostash author date))))
+        (if verified
+            (magit-git-wash (apply-partially #'magit-log-wash-log 'stash)
+              "reflog" "--format=%gd%x00%aN%x00%at%x00%gs" ref)
+          (insert ?\n)
+          (magit-make-margin-overlay))))))
+
+;;; List Stashes
+
+;;;###autoload
+(defun magit-stash-list ()
+  "List all stashes in a buffer."
+  (interactive)
+  (magit-stashes-setup-buffer))
+
+(define-derived-mode magit-stashes-mode magit-reflog-mode "Magit Stashes"
+  "Mode for looking at lists of stashes."
+  :interactive nil
+  :group 'magit-log
+  (magit-hack-dir-local-variables))
+
+(defun magit-stashes-setup-buffer ()
+  (magit-setup-buffer #'magit-stashes-mode nil
+    (magit-buffer-refname "refs/stash")))
+
+(defun magit-stashes-refresh-buffer ()
+  (magit-insert-section (stashesbuf)
+    (magit-insert-heading t
+      (if (equal magit-buffer-refname "refs/stash")
+          "Stashes"
+        (format "Stashes [%s]" magit-buffer-refname)))
+    (magit-git-wash (apply-partially #'magit-log-wash-log 'stash)
+      "reflog" "--format=%gd%x00%aN%x00%at%x00%gs" magit-buffer-refname)))
+
+(cl-defmethod magit-buffer-value (&context (major-mode magit-stashes-mode))
+  magit-buffer-refname)
+
+(defvar magit--update-stash-buffer nil)
+
+(defun magit-stashes-maybe-update-stash-buffer (&optional _)
+  "When moving in the stashes buffer, update the stash buffer.
+If there is no stash buffer in the same frame, then do nothing.
+See also info node `(magit)Section Movement'."
+  (when (derived-mode-p 'magit-stashes-mode)
+    (magit--maybe-update-stash-buffer)))
+
+(defun magit--maybe-update-stash-buffer ()
+  (when-let* ((stash  (magit-section-value-if 'stash))
+              (buffer (magit-get-mode-buffer 'magit-stash-mode nil t)))
+    (if magit--update-stash-buffer
+        (setq magit--update-stash-buffer (list stash buffer))
+      (setq magit--update-stash-buffer (list stash buffer))
+      (run-with-idle-timer
+       magit-update-other-window-delay nil
+       (let ((args (with-current-buffer buffer
+                     (let ((magit-direct-use-buffer-arguments 'selected))
+                       (magit-show-commit--arguments)))))
+         (lambda ()
+           (pcase-let ((`(,stash ,buf) magit--update-stash-buffer))
+             (setq magit--update-stash-buffer nil)
+             (when (buffer-live-p buf)
+               (let ((magit-display-buffer-noselect t))
+                 (apply #'magit-stash-show stash args))))
+           (setq magit--update-stash-buffer nil)))))))
+
+;;; Show Stash
+
+;;;###autoload
+(defun magit-stash-show (stash &optional args files)
+  "Show all diffs of a stash in a buffer."
+  (interactive (cons (or (and (not current-prefix-arg)
+                              (magit-stash-at-point))
+                         (magit-read-stash "Show stash"))
+                     (pcase-let ((`(,args ,files)
+                                  (magit-diff-arguments 'magit-stash-mode)))
+                       (list (delete "--stat" args) files))))
+  (magit-stash-setup-buffer stash args files))
+
+(define-derived-mode magit-stash-mode magit-diff-mode "Magit Stash"
+  "Mode for looking at individual stashes."
+  :interactive nil
+  :group 'magit-diff
+  (magit-hack-dir-local-variables)
+  (setq magit--imenu-group-types '(commit)))
+
+(put 'magit-stash-mode 'magit-diff-default-arguments
+     '("--no-ext-diff"))
+
+(defun magit-stash-setup-buffer (stash args files)
+  (magit-setup-buffer #'magit-stash-mode nil
+    (magit-buffer-revision stash)
+    (magit-buffer-diff-range (format "%s^..%s" stash stash))
+    (magit-buffer-diff-args args)
+    (magit-buffer-diff-files files)))
+
+(defun magit-stash-refresh-buffer ()
+  (magit-set-header-line-format
+   (concat (capitalize magit-buffer-revision) " "
+           (propertize (magit-rev-format "%s" magit-buffer-revision)
+                       'font-lock-face
+                       (list :weight 'normal :foreground
+                             (face-attribute 'default :foreground)))))
+  (setq magit-buffer-revision-oid (magit-commit-oid magit-buffer-revision))
+  (magit-insert-section (stash)
+    (magit-run-section-hook 'magit-stash-sections-hook)))
+
+(cl-defmethod magit-buffer-value (&context (major-mode magit-stash-mode))
+  magit-buffer-revision)
+
+(defun magit-stash-insert-section (rev range message &optional files)
+  (magit-insert-section (commit rev)
+    (magit-insert-heading message)
+    (magit--insert-diff nil
+      "diff" range "-p" "--no-prefix" magit-buffer-diff-args
+      "--" (or files magit-buffer-diff-files))))
+
+(defun magit-insert-stash-notes ()
+  "Insert section showing notes for a stash.
+This shows the notes for stash@{N} but not for the other commits
+that make up the stash."
+  (magit-insert-section (note)
+    (magit-insert-heading t "Notes")
+    (magit-git-insert "notes" "show" magit-buffer-revision)
+    (magit-cancel-section 'if-empty)
+    (insert "\n")))
+
+(defun magit-insert-stash-index ()
+  "Insert section showing staged changes of the stash."
+  (magit-stash-insert-section
+   (format "%s^2" magit-buffer-revision)
+   (format "%s^..%s^2" magit-buffer-revision magit-buffer-revision)
+   "Staged"))
+
+(defun magit-insert-stash-worktree ()
+  "Insert section showing unstaged changes of the stash."
+  (magit-stash-insert-section
+   magit-buffer-revision
+   (format "%s^2..%s" magit-buffer-revision magit-buffer-revision)
+   "Unstaged"))
+
+(defun magit-insert-stash-untracked ()
+  "Insert section showing the untracked files commit of the stash."
+  (let ((stash magit-buffer-revision)
+        (rev (concat magit-buffer-revision "^3")))
+    (when (magit-rev-verify rev)
+      (magit-stash-insert-section (format "%s^3" stash)
+                                  (format "%s^..%s^3" stash stash)
+                                  "Untracked files"
+                                  (magit-git-items "ls-tree" "-z" "--name-only"
+                                                   "-r" "--full-tree" rev)))))
+
+;;; _
+(provide 'magit-stash)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-stash.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-stash.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-stash.elc
new file mode 100644
index 0000000..2867f5c
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-stash.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-status.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-status.el
new file mode 100644
index 0000000..781310e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-status.el
@@ -0,0 +1,886 @@
+;;; magit-status.el --- The grand overview  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements the status buffer.
+
+;;; Code:
+
+(require 'magit)
+
+(declare-function magit-dired-jump "magit-dired" (&optional other-window))
+
+;;; Options
+
+(defgroup magit-status nil
+  "Inspect and manipulate Git repositories."
+  :link '(info-link "(magit)Status Buffer")
+  :group 'magit-modes)
+
+(defcustom magit-status-mode-hook nil
+  "Hook run after entering Magit-Status mode."
+  :group 'magit-status
+  :type 'hook)
+
+(defcustom magit-status-headers-hook
+  (list #'magit-insert-error-header
+        #'magit-insert-diff-filter-header
+        #'magit-insert-head-branch-header
+        #'magit-insert-upstream-branch-header
+        #'magit-insert-push-branch-header
+        #'magit-insert-tags-header)
+  "Hook run to insert headers into the status buffer.
+
+This hook is run by `magit-insert-status-headers', which in turn
+has to be a member of `magit-status-sections-hook' to be used at
+all."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-status
+  :type 'hook
+  :options (list #'magit-insert-error-header
+                 #'magit-insert-diff-filter-header
+                 #'magit-insert-repo-header
+                 #'magit-insert-remote-header
+                 #'magit-insert-head-branch-header
+                 #'magit-insert-upstream-branch-header
+                 #'magit-insert-push-branch-header
+                 #'magit-insert-tags-header))
+
+(defcustom magit-status-sections-hook
+  (list #'magit-insert-status-headers
+        #'magit-insert-merge-log
+        #'magit-insert-rebase-sequence
+        #'magit-insert-am-sequence
+        #'magit-insert-sequencer-sequence
+        #'magit-insert-bisect-output
+        #'magit-insert-bisect-rest
+        #'magit-insert-bisect-log
+        #'magit-insert-untracked-files
+        #'magit-insert-unstaged-changes
+        #'magit-insert-staged-changes
+        #'magit-insert-stashes
+        #'magit-insert-unpushed-to-pushremote
+        #'magit-insert-unpushed-to-upstream-or-recent
+        #'magit-insert-unpulled-from-pushremote
+        #'magit-insert-unpulled-from-upstream)
+  "Hook run to insert sections into a status buffer."
+  :package-version '(magit . "2.12.0")
+  :group 'magit-status
+  :type 'hook)
+
+(defcustom magit-status-initial-section '(1)
+  "The section point is placed on when a status buffer is created.
+
+When such a buffer is merely being refreshed or being shown again
+after it was merely buried, then this option has no effect.
+
+If this is nil, then point remains on the very first section as
+usual.  Otherwise it has to be a list of integers and section
+identity lists.  The members of that list are tried in order
+until a matching section is found.
+
+An integer means to jump to the nth section, 1 for example
+jumps over the headings.  To get a section's \"identity list\"
+use \\[universal-argument] \\[magit-describe-section-briefly].
+
+If, for example, you want to jump to the commits that haven't
+been pulled from the upstream, or else the second section, then
+use: (((unpulled . \"..@{upstream}\") (status)) 1).
+
+See option `magit-section-initial-visibility-alist' for how to
+control the initial visibility of the jumped to section."
+  :package-version '(magit . "2.90.0")
+  :group 'magit-status
+  :type '(choice (const :tag "As usual" nil)
+                 (repeat (choice (number :tag "Nth top-level section")
+                                 (sexp   :tag "Section identity")))))
+
+(defcustom magit-status-goto-file-position nil
+  "Whether to go to position corresponding to file position.
+
+If this is non-nil and the current buffer is visiting a file,
+then `magit-status' tries to go to the position in the status
+buffer that corresponds to the position in the file-visiting
+buffer.  This jumps into either the diff of unstaged changes
+or the diff of staged changes.
+
+If the previously current buffer does not visit a file, or if
+the file has neither unstaged nor staged changes then this has
+no effect.
+
+The command `magit-status-here' tries to go to that position,
+regardless of the value of this option."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-status
+  :type 'boolean)
+
+(defcustom magit-status-show-hashes-in-headers nil
+  "Whether headers in the status buffer show hashes.
+The functions which respect this option are
+`magit-insert-head-branch-header',
+`magit-insert-upstream-branch-header', and
+`magit-insert-push-branch-header'."
+  :package-version '(magit . "2.4.0")
+  :group 'magit-status
+  :type 'boolean)
+
+(defcustom magit-status-show-untracked-files t
+  "Whether to list untracked files in the status buffer.
+
+- If nil, do not list any untracked files.
+- If t, list untracked files, but if a directory does not contain any
+  tracked files, then only list that directory, not the contained
+  untracked files.
+- If all, then list each individual untracked files.  This is can be
+  very slow and is discouraged.
+
+The corresponding values for the Git variable are \"no\", \"normal\"
+and \"all\".
+
+To disable listing untracked files in a specific repository only, add
+the following to \".dir-locals.el\":
+
+  ((magit-status-mode
+   (magit-status-show-untracked-files . \"no\")))
+
+Alternatively (and mostly for historic reasons), it is possible to use
+`git-config' to set the repository-local value:
+
+  git config set --local status.showUntrackedFiles no
+
+This does *not* override the (if any) local value of this Lisp variable,
+but it does override its global value.
+
+See the last section in the git-status(1) manpage, to speed up the part
+of the work Git is responsible for.  Turning that list into sections is
+also not free, so Magit only lists `magit-status-file-list-limit' files."
+  :package-version '(magit . "4.3.0")
+  :group 'magit-status
+  :type '(choice (const :tag "Do not list untracked files" nil)
+                 (const :tag "List mixture of files and directories" t)
+                 (const :tag "List individual files (slow)" all))
+  :safe (##memq % '(nil t all)))
+
+(defcustom magit-status-file-list-limit 100
+  "How many files to list in file list sections in the status buffer.
+For performance reasons, it is recommended that you do not
+increase this limit."
+  :package-version '(magit . "4.3.0")
+  :group 'magit-status
+  :type 'natnum)
+
+(defcustom magit-status-margin
+  (list nil
+        (nth 1 magit-log-margin)
+        'magit-log-margin-width nil
+        (nth 4 magit-log-margin))
+  "Format of the margin in `magit-status-mode' buffers.
+
+The value has the form (INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH).
+
+If INIT is non-nil, then the margin is shown initially.
+STYLE controls how to format the author or committer date.
+  It can be one of `age' (to show the age of the commit),
+  `age-abbreviated' (to abbreviate the time unit to a character),
+  or a string (suitable for `format-time-string') to show the
+  actual date.  Option `magit-log-margin-show-committer-date'
+  controls which date is being displayed.
+WIDTH controls the width of the margin.  This exists for forward
+  compatibility and currently the value should not be changed.
+AUTHOR controls whether the name of the author is also shown by
+  default.
+AUTHOR-WIDTH has to be an integer.  When the name of the author
+  is shown, then this specifies how much space is used to do so."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-status
+  :group 'magit-margin
+  :type magit-log-margin--custom-type
+  :initialize #'magit-custom-initialize-reset
+  :set-after '(magit-log-margin)
+  :set (apply-partially #'magit-margin-set-variable 'magit-status-mode))
+
+(defcustom magit-status-use-buffer-arguments 'selected
+  "Whether `magit-status' reuses arguments when the buffer already exists.
+
+This option has no effect when merely refreshing the status
+buffer using `magit-refresh'.
+
+Valid values are:
+
+`always': Always use the set of arguments that is currently
+  active in the status buffer, provided that buffer exists
+  of course.
+`selected': Use the set of arguments from the status
+  buffer, but only if it is displayed in a window of the
+  current frame.  This is the default.
+`current': Use the set of arguments from the status buffer,
+  but only if it is the current buffer.
+`never': Never use the set of arguments from the status
+  buffer."
+  :package-version '(magit . "3.0.0")
+  :group 'magit-buffers
+  :group 'magit-commands
+  :type '(choice
+          (const :tag "Always use args from buffer" always)
+          (const :tag "Use args from buffer if displayed in frame" selected)
+          (const :tag "Use args from buffer if it is current" current)
+          (const :tag "Never use args from buffer" never)))
+
+;;; Commands
+
+;;;###autoload
+(defun magit-init (directory)
+  "Initialize a Git repository, then show its status.
+
+If the directory is below an existing repository, then the user
+has to confirm that a new one should be created inside.  If the
+directory is the root of the existing repository, then the user
+has to confirm that it should be reinitialized.
+
+Non-interactively DIRECTORY is (re-)initialized unconditionally."
+  (interactive
+    (let ((directory (file-name-as-directory
+                      (expand-file-name
+                       (read-directory-name "Create repository in: ")))))
+      (when-let ((toplevel (magit-toplevel directory)))
+        (setq toplevel (expand-file-name toplevel))
+        (unless (y-or-n-p (if (file-equal-p toplevel directory)
+                              (format "Reinitialize existing repository %s? "
+                                      directory)
+                            (format "%s is a repository.  Create another in %s? "
+                                    toplevel directory)))
+          (user-error "Abort")))
+      (list directory)))
+  ;; "git init" does not understand the meaning of "~"!
+  (magit-call-git "init" (magit-convert-filename-for-git
+                          (expand-file-name directory)))
+  (magit-status-setup-buffer directory))
+
+;;;###autoload
+(defun magit-status (&optional directory cache)
+  "Show the status of the current Git repository in a buffer.
+
+If the current directory isn't located within a Git repository,
+then prompt for an existing repository or an arbitrary directory,
+depending on option `magit-repository-directories', and show the
+status of the selected repository instead.
+
+* If that option specifies any existing repositories, then offer
+  those for completion and show the status buffer for the
+  selected one.
+
+* Otherwise read an arbitrary directory using regular file-name
+  completion.  If the selected directory is the top-level of an
+  existing working tree, then show the status buffer for that.
+
+* Otherwise offer to initialize the selected directory as a new
+  repository.  After creating the repository show its status
+  buffer.
+
+These fallback behaviors can also be forced using one or more
+prefix arguments:
+
+* With two prefix arguments (or more precisely a numeric prefix
+  value of 16 or greater) read an arbitrary directory and act on
+  it as described above.  The same could be accomplished using
+  the command `magit-init'.
+
+* With a single prefix argument read an existing repository, or
+  if none can be found based on `magit-repository-directories',
+  then fall back to the same behavior as with two prefix
+  arguments."
+  (interactive
+    (let ((magit--refresh-cache (list (cons 0 0))))
+      (list (and (or current-prefix-arg (not (magit-toplevel)))
+                 (progn (magit--assert-usable-git)
+                        (magit-read-repository
+                         (>= (prefix-numeric-value current-prefix-arg) 16))))
+            magit--refresh-cache)))
+  (let ((magit--refresh-cache (or cache (list (cons 0 0)))))
+    (if directory
+        (let ((toplevel (magit-toplevel directory)))
+          (setq directory (file-name-as-directory
+                           (expand-file-name directory)))
+          (if (and toplevel (file-equal-p directory toplevel))
+              (magit-status-setup-buffer directory)
+            (when (y-or-n-p
+                   (if toplevel
+                       (format "%s is a repository.  Create another in %s? "
+                               toplevel directory)
+                     (format "Create repository in %s? " directory)))
+              ;; Creating a new repository invalidates cached values.
+              (setq magit--refresh-cache nil)
+              (magit-init directory))))
+      (magit-status-setup-buffer default-directory))))
+
+(put 'magit-status 'interactive-only 'magit-status-setup-buffer)
+
+;;;###autoload
+(defalias 'magit #'magit-status
+  "Begin using Magit.
+
+This alias for `magit-status' exists for better discoverability.
+
+Instead of invoking this alias for `magit-status' using
+\"M-x magit RET\", you should bind a key to `magit-status'
+and read the info node `(magit)Getting Started', which
+also contains other useful hints.")
+
+;;;###autoload
+(defun magit-status-here ()
+  "Like `magit-status' but with non-nil `magit-status-goto-file-position'.
+Before doing so, save all file-visiting buffers belonging to the current
+repository without prompting."
+  (interactive)
+  (let ((magit-inhibit-refresh t))
+    (magit-save-repository-buffers t))
+  (let ((magit-status-goto-file-position t))
+    (call-interactively #'magit-status)))
+
+(put 'magit-status-here 'interactive-only 'magit-status-setup-buffer)
+
+;;;###autoload
+(defun magit-status-quick (&optional directory)
+  "Show the status of the current Git repository, maybe without refreshing.
+
+If the status buffer of the current Git repository exists but
+isn't being displayed in the selected frame, then display it
+without refreshing it.
+
+If the status buffer is being displayed in the selected frame,
+then also refresh it.
+
+Prefix arguments have the same meaning as for `magit-status',
+and additionally cause the buffer to be refresh.
+
+To use this function instead of `magit-status', add this to your
+init file: (global-set-key (kbd \"C-x g\") \\='magit-status-quick).
+
+Non-interactively another repository can be specified using the
+optional DIRECTORY argument, which must then name the top-level
+directory of an existing repository."
+  (interactive)
+  (let ((default-directory default-directory))
+    (when-let*
+        ((_ directory)
+         (toplevel (magit-toplevel directory))
+         (directory (file-name-as-directory (expand-file-name directory)))
+         (_(file-equal-p directory toplevel)))
+      (setq default-directory directory))
+    (if-let ((buffer
+              (and (not current-prefix-arg)
+                   (not (magit-get-mode-buffer 'magit-status-mode nil 'selected))
+                   (magit-get-mode-buffer 'magit-status-mode))))
+        (magit-display-buffer buffer)
+      (call-interactively #'magit-status))))
+
+(defun magit-parent-status ()
+  "Show the status of the parent repository of the current Git repository.
+If the current repository is a submodule, show the status buffer
+of its super-repository.  Otherwise step outside the worktree of
+the current repository, and if that takes us to another repository,
+consider that the parent repository."
+  (interactive)
+  (cond-let*
+    [[topdir (magit-toplevel)]]
+    ((not topdir)
+     (user-error "Not inside a Git repository"))
+    [[gitdir (magit-gitdir)]
+     [parent (magit-toplevel (file-name-parent-directory gitdir))]]
+    ((and parent (not (file-equal-p parent topdir)))
+     (magit-status-setup-buffer parent))
+    [[default-directory (file-name-parent-directory topdir)]]
+    ([parent (magit-toplevel)]
+     (magit-status-setup-buffer parent))
+    ((user-error "No parent repository"))))
+
+;;; Mode
+
+(defvar-keymap magit-status-mode-map
+  :doc "Keymap for `magit-status-mode'."
+  :parent magit-mode-map
+  "j" #'magit-status-jump
+  "<remap> <dired-jump>" #'magit-dired-jump)
+
+(transient-define-prefix magit-status-jump ()
+  "In a Magit-Status buffer, jump to a section."
+  [["Jump to"
+    ("z " magit-jump-to-stashes)
+    ("t " magit-jump-to-tracked)
+    ("n " magit-jump-to-untracked)
+    ("i " magit-jump-to-ignored)
+    ("u " magit-jump-to-unstaged)
+    ("s " magit-jump-to-staged)]
+   [""
+    ("fu" magit-jump-to-unpulled-from-upstream)
+    ("fp" magit-jump-to-unpulled-from-pushremote)
+    ("pu" magit-jump-to-unpushed-to-upstream)
+    ("pp" magit-jump-to-unpushed-to-pushremote)
+    ("a " magit-jump-to-assume-unchanged)
+    ("w " magit-jump-to-skip-worktree)]
+   ["Jump using"
+    ("j"  "Imenu" imenu)]])
+
+(define-derived-mode magit-status-mode magit-mode "Magit"
+  "Mode for looking at Git status.
+
+This mode is documented in info node `(magit)Status Buffer'.
+
+\\<magit-mode-map>\
+Type \\[magit-refresh] to refresh the current buffer.
+Type \\[magit-section-toggle] to expand or hide the section at point.
+Type \\[magit-visit-thing] to visit the change or commit at point.
+
+Type \\[magit-dispatch] to invoke major commands.
+
+Staging and applying changes is documented in info node
+`(magit)Staging and Unstaging' and info node `(magit)Applying'.
+
+\\<magit-hunk-section-map>Type \
+\\[magit-apply] to apply the change at point, \
+\\[magit-stage] to stage,
+\\[magit-unstage] to unstage, \
+\\[magit-discard] to discard, or \
+\\[magit-reverse] to reverse it.
+
+\\<magit-status-mode-map>\
+Type \\[magit-commit] to create a commit.
+
+\\{magit-status-mode-map}"
+  :interactive nil
+  :group 'magit-status
+  (magit-hack-dir-local-variables)
+  (setq magit--imenu-group-types '(not branch commit)))
+
+(put 'magit-status-mode 'magit-diff-default-arguments
+     '("--no-ext-diff" "--ignore-submodules=none"))
+(put 'magit-status-mode 'magit-log-default-arguments
+     '("-n256" "--decorate"))
+
+;;;###autoload
+(defun magit-status-setup-buffer (&optional directory)
+  (let ((default-directory (or directory default-directory)))
+    (when (file-remote-p default-directory)
+      (magit-git-version-assert))
+    (pcase-let
+        ((`(,dargs ,dfiles) (magit-diff--get-value 'magit-status-mode 'status))
+         (`(,largs ,lfiles) (magit-log--get-value  'magit-status-mode 'status)))
+      (magit-setup-buffer #'magit-status-mode nil
+        :initial-section #'magit-status-goto-initial-section
+        :select-section (and$ (magit-status--get-file-position)
+                              (lambda () (apply #'magit-status--goto-file-position $)))
+        (magit-buffer-diff-args  dargs)
+        (magit-buffer-diff-files dfiles)
+        (magit-buffer-log-args   largs)
+        (magit-buffer-log-files  lfiles)))))
+
+(defun magit-status-refresh-buffer ()
+  (magit-git-exit-code "update-index" "--refresh")
+  (magit-insert-section (status)
+    (magit-run-section-hook 'magit-status-sections-hook)))
+
+(defun magit-status--get-file-position ()
+  (and-let* ((_ magit-status-goto-file-position)
+             (file (magit-file-relative-name)))
+    (save-excursion
+      (widen)
+      (list file (line-number-at-pos) (current-column)))))
+
+(defun magit-status--goto-file-position (file line column)
+  (pcase-let ((`(,upos ,uloc)
+               (magit-diff--locate-file-position file line column 'unstaged))
+              (`(,spos ,sloc)
+               (magit-diff--locate-file-position file line column 'staged)))
+    (cond ((eq uloc 'line) (goto-char upos))
+          ((eq sloc 'line) (goto-char spos))
+          ((eq uloc 'hunk) (goto-char upos))
+          ((eq sloc 'hunk) (goto-char spos))
+          (upos            (goto-char upos))
+          (spos            (goto-char spos)))
+    (when (or upos spos)
+      (magit-section-reveal (magit-current-section)))))
+
+(defun magit-status-goto-initial-section ()
+  "Jump to the section specified by `magit-status-initial-section'."
+  (when-let ((section
+              (seq-some (lambda (initial)
+                          (if (integerp initial)
+                              (nth (1- initial)
+                                   (magit-section-siblings
+                                    (magit-current-section) 'next))
+                            (magit-get-section initial)))
+                        magit-status-initial-section)))
+    (goto-char (oref section start))
+    (when-let ((vis (cdr (assq 'magit-status-initial-section
+                               magit-section-initial-visibility-alist))))
+      (if (eq vis 'hide)
+          (magit-section-hide section)
+        (magit-section-show section)))))
+
+(defun magit-status-maybe-update-revision-buffer (&optional _)
+  "When moving in the status buffer, update the revision buffer.
+If there is no revision buffer in the same frame, then do nothing.
+See also info node `(magit)Section Movement'."
+  (when (derived-mode-p 'magit-status-mode)
+    (magit--maybe-update-revision-buffer)))
+
+(defun magit-status-maybe-update-stash-buffer (&optional _)
+  "When moving in the status buffer, update the stash buffer.
+If there is no stash buffer in the same frame, then do nothing.
+See also info node `(magit)Section Movement'."
+  (when (derived-mode-p 'magit-status-mode)
+    (magit--maybe-update-stash-buffer)))
+
+(defun magit-status-maybe-update-blob-buffer (&optional _)
+  "When moving in the status buffer, update the blob buffer.
+If there is no blob buffer in the same frame, then do nothing.
+See also info node `(magit)Section Movement'."
+  (when (derived-mode-p 'magit-status-mode)
+    (magit--maybe-update-blob-buffer)))
+
+;;; Sections
+;;;; Special Headers
+
+(defun magit-insert-status-headers ()
+  "Insert header sections appropriate for `magit-status-mode' buffers.
+The sections are inserted by running the functions on the hook
+`magit-status-headers-hook'."
+  (if (magit-rev-verify "HEAD")
+      (magit-insert-headers 'magit-status-headers-hook)
+    (insert "In the beginning there was darkness\n\n")))
+
+(defvar-keymap magit-error-section-map
+  :doc "Keymap for `error' sections."
+  "<remap> <magit-visit-thing>" #'magit-process-buffer
+  "<1>" (magit-menu-item "Visit process output" #'magit-process-buffer))
+
+(defun magit-insert-error-header ()
+  "Insert the message about the Git error that just occurred.
+
+This function is only aware of the last error that occur when Git
+was run for side-effects.  If, for example, an error occurs while
+generating a diff, then that error won't be inserted.  Refreshing
+the status buffer causes this section to disappear again."
+  (when magit-this-error
+    (magit-insert-section (error 'git)
+      (insert (propertize (format "%-10s" "GitError! ")
+                          'font-lock-face 'magit-section-heading))
+      (insert (propertize magit-this-error 'font-lock-face 'error))
+      (when magit-show-process-buffer-hint
+        (insert (substitute-command-keys
+                 "  [Type \\[magit-process-buffer] for details]")))
+      (insert ?\n))
+    (setq magit-this-error nil)))
+
+(defun magit-insert-diff-filter-header ()
+  "Insert a header line showing the effective diff filters.
+
+If any diff filters are in effect in the status buffer, they are
+shown on a line beginning with \"Filter! ...\" as a reminder, so you
+won't end up wondering why certain changes, which you expect to be
+displayed, are not actually displayed.
+
+Filters either come from arguments, which can be changed using \
+\\<magit-status-mode-map>\\[magit-diff-refresh],
+or from Git variables, which are configured outside of Magit.
+
+If you do not want this reminder to be shown, remove it like so:
+
+  (remove-hook \\='magit-status-headers-hook
+               \\='magit-insert-diff-filter-header)"
+  (let ((ignore-modules (magit-ignore-submodules-p)))
+    (when (or ignore-modules
+              magit-buffer-diff-files)
+      (magit-insert-section (diff-filter)
+        (insert (propertize (format "%-10s" "Filter! ")
+                            'font-lock-face 'magit-section-heading))
+        (when ignore-modules
+          (insert ignore-modules)
+          (when magit-buffer-diff-files
+            (insert " -- ")))
+        (when magit-buffer-diff-files
+          (insert (string-join magit-buffer-diff-files " ")))
+        (insert (substitute-command-keys " \
+[\\[magit-diff-refresh] to change, \\[magit-describe-section] for help]\n"))))))
+
+;;;; Reference Headers
+
+(defun magit-insert-head-branch-header (&optional branch)
+  "Insert a header line about the current branch.
+If `HEAD' is detached, then insert information about that commit
+instead.  The optional BRANCH argument is for internal use only."
+  (let ((output (magit-rev-format "%h %s" (or branch "HEAD"))))
+    (string-match "^\\([^ ]+\\) \\(.*\\)" output)
+    (magit-bind-match-strings (commit summary) output
+      (when (equal summary "")
+        (setq summary "(no commit message)"))
+      (if-let ((branch (or branch (magit-get-current-branch))))
+          (magit-insert-section (branch branch)
+            (insert (format "%-10s" "Head: "))
+            (when magit-status-show-hashes-in-headers
+              (insert (propertize commit 'font-lock-face 'magit-hash) ?\s))
+            (insert (propertize branch 'font-lock-face 'magit-branch-local))
+            (insert ?\s)
+            (insert (magit-log--wash-summary summary))
+            (insert ?\n))
+        (magit-insert-section (commit commit)
+          (insert (format "%-10s" "Head: "))
+          (insert (propertize commit 'font-lock-face 'magit-hash))
+          (insert ?\s)
+          (insert (magit-log--wash-summary summary))
+          (insert ?\n))))))
+
+(defun magit-insert-upstream-branch-header (&optional branch upstream keyword)
+  "Insert a header line about the upstream of the current branch.
+If no branch is checked out, then insert nothing.  The optional
+arguments are for internal use only."
+  (when-let ((branch (or branch (magit-get-current-branch))))
+    (let ((remote (magit-get "branch" branch "remote"))
+          (merge  (magit-get "branch" branch "merge"))
+          (rebase (magit-get "branch" branch "rebase")))
+      (when (or remote merge)
+        (unless upstream
+          (setq upstream (magit-get-upstream-branch branch)))
+        (magit-insert-section (branch upstream)
+          (pcase rebase
+            ("true")
+            ("false" (setq rebase nil))
+            (_       (setq rebase (magit-get-boolean "pull.rebase"))))
+          (insert (format "%-10s" (or keyword (if rebase "Rebase: " "Merge: "))))
+          (insert
+           (cond
+             (upstream
+              (concat (and magit-status-show-hashes-in-headers
+                           (concat (propertize (magit-rev-format "%h" upstream)
+                                               'font-lock-face 'magit-hash)
+                                   " "))
+                      upstream " "
+                      (magit-log--wash-summary
+                       (or (magit-rev-format "%s" upstream)
+                           "(no commit message)"))))
+             ((magit--unnamed-upstream-p remote merge)
+              (concat (propertize merge  'font-lock-face 'magit-branch-remote)
+                      " from "
+                      (propertize remote 'font-lock-face 'bold)))
+             ((magit--valid-upstream-p remote merge)
+              (if (equal remote ".")
+                  (concat
+                   (propertize merge 'font-lock-face 'magit-branch-local) " "
+                   (propertize "does not exist"
+                               'font-lock-face 'magit-branch-warning))
+                (format
+                 "%s %s %s"
+                 (propertize merge 'font-lock-face 'magit-branch-remote)
+                 (propertize "does not exist on"
+                             'font-lock-face 'magit-branch-warning)
+                 (propertize remote 'font-lock-face 'magit-branch-remote))))
+             ((propertize "invalid upstream configuration"
+                          'font-lock-face 'magit-branch-warning))))
+          (insert ?\n))))))
+
+(defun magit-insert-push-branch-header ()
+  "Insert a header line about the branch the current branch is pushed to."
+  (when-let* ((branch (magit-get-current-branch))
+              (target (magit-get-push-branch branch)))
+    (magit-insert-section (branch target)
+      (insert (format "%-10s" "Push: "))
+      (insert
+       (cond-let
+         ((magit-rev-verify target)
+          (concat (and magit-status-show-hashes-in-headers
+                       (concat (propertize (magit-rev-format "%h" target)
+                                           'font-lock-face 'magit-hash)
+                               " "))
+                  target " "
+                  (magit-log--wash-summary
+                   (or (magit-rev-format "%s" target)
+                       "(no commit message)"))))
+         [[remote (magit-get-push-remote branch)]]
+         ((magit-remote-p remote)
+          (concat target " "
+                  (propertize "does not exist"
+                              'font-lock-face 'magit-branch-warning)))
+         ((concat remote " "
+                  (propertize "remote does not exist"
+                              'font-lock-face 'magit-branch-warning)))))
+      (insert ?\n))))
+
+(defun magit-insert-tags-header ()
+  "Insert a header line about the current and/or next tag."
+  (let* ((this-tag (magit-get-current-tag nil t))
+         (next-tag (magit-get-next-tag nil t))
+         (this-cnt (cadr this-tag))
+         (next-cnt (cadr next-tag))
+         (this-tag (car this-tag))
+         (next-tag (car next-tag))
+         (both-tags (and this-tag next-tag t)))
+    (when (or this-tag next-tag)
+      (magit-insert-section (tag (or this-tag next-tag))
+        (insert (format "%-10s" (if both-tags "Tags: " "Tag: ")))
+        (cl-flet ((insert-count (tag count face)
+                    (insert (concat (propertize tag 'font-lock-face 'magit-tag)
+                                    (and (> count 0)
+                                         (format " (%s)"
+                                                 (propertize
+                                                  (format "%s" count)
+                                                  'font-lock-face face)))))))
+          (when this-tag  (insert-count this-tag this-cnt 'magit-branch-local))
+          (when both-tags (insert ", "))
+          (when next-tag  (insert-count next-tag next-cnt 'magit-tag)))
+        (insert ?\n)))))
+
+;;;; Auxiliary Headers
+
+(defun magit-insert-user-header ()
+  "Insert a header line about the current user."
+  (let ((name  (magit-get "user.name"))
+        (email (magit-get "user.email")))
+    (when (and name email)
+      (magit-insert-section (user name)
+        (insert (format "%-10s" "User: "))
+        (insert (propertize name 'font-lock-face 'magit-log-author))
+        (insert " <" email ">\n")))))
+
+(defun magit-insert-repo-header ()
+  "Insert a header line showing the path to the repository top-level."
+  (let ((topdir (magit-toplevel)))
+    (magit-insert-section (repo topdir)
+      (insert (format "%-10s%s\n" "Repo: " (abbreviate-file-name topdir))))))
+
+(defun magit-insert-remote-header ()
+  "Insert a header line about the remote of the current branch.
+
+If no remote is configured for the current branch, then fall back
+showing the \"origin\" remote, or if that does not exist the first
+remote in alphabetic order."
+  (when-let* ((name (magit-get-some-remote))
+              ;; Under certain configurations it's possible for
+              ;; url to be nil, when name is not, see #2858.
+              (url (magit-get "remote" name "url")))
+    (magit-insert-section (remote name)
+      (insert (format "%-10s" "Remote: "))
+      (insert (propertize name 'font-lock-face 'magit-branch-remote) ?\s)
+      (insert url ?\n))))
+
+;;;; File Sections
+
+(defvar-keymap magit-untracked-section-map
+  :doc "Keymap for the `untracked' section."
+  "<remap> <magit-delete-thing>" #'magit-discard
+  "<remap> <magit-stage-files>"  #'magit-stage
+  "<2>" (magit-menu-item "Discard files" #'magit-discard)
+  "<1>" (magit-menu-item "Stage files"   #'magit-stage))
+
+(magit-define-section-jumper magit-jump-to-untracked
+  "Untracked files" untracked nil magit-insert-untracked-files)
+
+(magit-define-section-jumper magit-jump-to-tracked
+  "Tracked files" tracked nil magit-insert-tracked-files)
+
+(magit-define-section-jumper magit-jump-to-ignored
+  "Ignored files" ignored nil magit-insert-ignored-files)
+
+(magit-define-section-jumper magit-jump-to-skip-worktree
+  "Skip-worktree files" skip-worktree nil magit-insert-skip-worktree-files)
+
+(magit-define-section-jumper magit-jump-to-assume-unchanged
+  "Assume-unchanged files" assume-unchanged nil
+  magit-insert-assume-unchanged-files)
+
+(defun magit-insert-untracked-files ()
+  "Maybe insert a list of untracked files.
+
+List files if `magit-status-show-untracked-files' is non-nil, but also
+take the local value of Git variable `status.showUntrackedFiles' into
+account.  The local value of the Lisp variable takes precedence over the
+local value of the Git variable.  The global value of the Git variable
+is always ignored."
+  (magit-insert-files 'untracked #'magit-list-untracked-files))
+
+(defun magit-insert-tracked-files ()
+  "Insert a list of tracked files.
+Honor the buffer's file filter, which can be set using \"D - -\"."
+  (magit-insert-files 'tracked #'magit-list-files))
+
+(defun magit-insert-ignored-files ()
+  "Insert a list of ignored files.
+Honor the buffer's file filter, which can be set using \"D - -\"."
+  (magit-insert-files 'ignored (##magit-ignored-files "--directory" %)))
+
+(defun magit-insert-skip-worktree-files ()
+  "Insert a list of skip-worktree files.
+Honor the buffer's file filter, which can be set using \"D - -\"."
+  (magit-insert-files 'skip-worktree #'magit-skip-worktree-files))
+
+(defun magit-insert-assume-unchanged-files ()
+  "Insert a list of files that are assumed to be unchanged.
+Honor the buffer's file filter, which can be set using \"D - -\"."
+  (magit-insert-files 'assume-unchanged #'magit-assume-unchanged-files))
+
+(defun magit-insert-files (type fn)
+  (when-let ((files (funcall fn
+                             (and magit-buffer-diff-files
+                                  (cons "--" magit-buffer-diff-files)))))
+    (magit-insert-section section ((eval type) nil t)
+      (magit-insert-heading (length files)
+        (let ((title (symbol-name type)))
+          (format "%c%s files"
+                  (capitalize (aref title 0))
+                  (substring title 1))))
+      (magit-insert-section-body
+        (let ((magit-section-insert-in-reverse t)
+              (limit magit-status-file-list-limit))
+          (while (and files (> limit 0))
+            (decf limit)
+            (let ((file (pop files)))
+              (magit-insert-section (file file)
+                (insert (funcall magit-format-file-function
+                                 'list file 'magit-filename))
+                (insert ?\n))))
+          (when files
+            (magit-insert-section (info)
+              (insert (propertize
+                       (format "%s files not listed\n" (length files))
+                       'face 'warning)))))
+        (insert ?\n)
+        (oset section children (nreverse (oref section children)))))))
+
+;;; _
+(provide 'magit-status)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-status.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-status.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-status.elc
new file mode 100644
index 0000000..d89cea9
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-status.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-submodule.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-submodule.el
new file mode 100644
index 0000000..70253b9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-submodule.el
@@ -0,0 +1,754 @@
+;;; magit-submodule.el --- Submodule support for Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for "git submodule".
+
+;; See (info "(magit)Submodules").
+
+;;; Code:
+
+(require 'magit)
+
+;;; Options
+
+(defcustom magit-module-sections-hook
+  (list #'magit-insert-modules-overview
+        #'magit-insert-modules-unpulled-from-upstream
+        #'magit-insert-modules-unpulled-from-pushremote
+        #'magit-insert-modules-unpushed-to-upstream
+        #'magit-insert-modules-unpushed-to-pushremote)
+  "Hook run by `magit-insert-modules'.
+
+That function isn't part of `magit-status-sections-hook's default
+value, so you have to add it yourself for this hook to have any
+effect."
+  :package-version '(magit . "2.11.0")
+  :group 'magit-status
+  :type 'hook)
+
+(defcustom magit-module-sections-nested t
+  "Whether `magit-insert-modules' wraps inserted sections.
+
+If this is non-nil, then only a single top-level section
+is inserted.  If it is nil, then all sections listed in
+`magit-module-sections-hook' become top-level sections."
+  :package-version '(magit . "2.11.0")
+  :group 'magit-status
+  :type 'boolean)
+
+(defcustom magit-submodule-list-mode-hook (list #'hl-line-mode)
+  "Hook run after entering Magit-Submodule-List mode."
+  :package-version '(magit . "2.9.0")
+  :group 'magit-repolist
+  :type 'hook
+  :get 'magit-hook-custom-get
+  :options (list #'hl-line-mode))
+
+(defcustom magit-submodule-list-columns
+  `(("Path"     25 ,#'magit-modulelist-column-path
+     ())
+    ("Version"  25 ,#'magit-repolist-column-version
+     ((:sort magit-repolist-version<)))
+    ("Branch"   20 ,#'magit-repolist-column-branch
+     ())
+    ("B<P" 3 ,#'magit-repolist-column-unpulled-from-pushremote
+     ((:right-align t)
+      (:sort <)))
+    ("B<U" 3 ,#'magit-repolist-column-unpulled-from-upstream
+     ((:right-align t)
+      (:sort <)))
+    ("B>P" 3 ,#'magit-repolist-column-unpushed-to-pushremote
+     ((:right-align t)
+      (:sort <)))
+    ("B>U" 3 ,#'magit-repolist-column-unpushed-to-upstream
+     ((:right-align t)
+      (:sort <)))
+    ("S"   3 ,#'magit-repolist-column-stashes
+     ((:right-align t)
+      (:sort <)))
+    ("B"   3 ,#'magit-repolist-column-branches
+     ((:right-align t)
+      (:sort <))))
+  "List of columns displayed by `magit-list-submodules'.
+
+Each element has the form (HEADER WIDTH FORMAT PROPS).
+
+HEADER is the string displayed in the header.  WIDTH is the width
+of the column.  FORMAT is a function that is called with one
+argument, the repository identification (usually its basename),
+and with `default-directory' bound to the toplevel of its working
+tree.  It has to return a string to be inserted or nil.  PROPS is
+an alist that supports the keys `:right-align', `:pad-right' and
+`:sort'.
+
+The `:sort' function has a weird interface described in the
+docstring of `tabulated-list--get-sort'.  Alternatively `<' and
+`magit-repolist-version<' can be used as those functions are
+automatically replaced with functions that satisfy the interface.
+Set `:sort' to nil to inhibit sorting; if unspecified, then the
+column is sortable using the default sorter.
+
+You may wish to display a range of numeric columns using just one
+character per column and without any padding between columns, in
+which case you should use an appropriate HEADER, set WIDTH to 1,
+and set `:pad-right' to 0.  \"+\" is substituted for numbers higher
+than 9."
+  :package-version '(magit . "2.8.0")
+  :group 'magit-repolist
+  :type `(repeat (list :tag "Column"
+                       (string   :tag "Header Label")
+                       (integer  :tag "Column Width")
+                       (function :tag "Inserter Function")
+                       (repeat   :tag "Properties"
+                                 (list (choice :tag "Property"
+                                               (const :right-align)
+                                               (const :pad-right)
+                                               (const :sort)
+                                               (symbol))
+                                       (sexp   :tag "Value"))))))
+
+(defcustom magit-submodule-list-sort-key '("Path" . nil)
+  "Initial sort key for buffer created by `magit-list-submodules'.
+If nil, no additional sorting is performed.  Otherwise, this
+should be a cons cell (NAME . FLIP).  NAME is a string matching
+one of the column names in `magit-submodule-list-columns'.  FLIP,
+if non-nil, means to invert the resulting sort."
+  :package-version '(magit . "3.2.0")
+  :group 'magit-repolist
+  :type '(choice (const nil)
+                 (cons (string :tag "Column name")
+                       (boolean :tag "Flip order"))))
+
+(defcustom magit-submodule-list-predicate #'always
+  "Predicate used to determine whether to include a module in the list.
+Suitable values incluce `always' and `magit-submodule-list-module-populated-p'."
+  :package-version '(magit . "4.7.0")
+  :group 'magit-repolist
+  :type '(choice (function-item always)
+                 (function-item magit-submodule-list-module-populated-p)
+                 (function)))
+
+(defvar magit-submodule-list-format-path-functions nil)
+
+(defcustom magit-submodule-remove-trash-gitdirs nil
+  "Whether `magit-submodule-remove' offers to trash module gitdirs.
+
+If this is nil, then that command does not offer to do so unless
+a prefix argument is used.  When this is t, then it does offer to
+do so even without a prefix argument.
+
+In both cases the action still has to be confirmed unless that is
+disabled using the option `magit-no-confirm'.  Doing the latter
+and also setting this variable to t will lead to tears."
+  :package-version '(magit . "2.90.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+;;; Menu
+
+;;;###autoload(autoload 'magit-submodule "magit-submodule" nil t)
+(transient-define-prefix magit-submodule ()
+  "Act on a submodule."
+  :man-page "git-submodule"
+  ["Arguments"
+   ("-f" "Force"            ("-f" "--force"))
+   ("-r" "Recursive"        "--recursive")
+   ("-N" "Do not fetch"     ("-N" "--no-fetch"))
+   ("-C" "Checkout tip"     "--checkout")
+   ("-R" "Rebase onto tip"  "--rebase")
+   ("-M" "Merge tip"        "--merge")
+   ("-U" "Use upstream tip" "--remote")]
+  ["One module actions"
+   ("a" magit-submodule-add)
+   ("r" magit-submodule-register)
+   ("p" magit-submodule-populate)
+   ("u" magit-submodule-update)
+   ("s" magit-submodule-synchronize)
+   ("d" magit-submodule-unpopulate)
+   ("k" "Remove" magit-submodule-remove)]
+  ["Populated modules actions"
+   ("l" "List modules"  magit-list-submodules)
+   ("f" "Fetch modules" magit-fetch-modules)])
+
+(defun magit-submodule-arguments (&rest filters)
+  (seq-filter (##and (member % filters) %)
+              (transient-args 'magit-submodule)))
+
+(defclass magit--git-submodule-suffix (transient-suffix)
+  ())
+
+(cl-defmethod transient-format-description ((obj magit--git-submodule-suffix))
+  (let ((value (seq-filter #'transient-infix-value transient--suffixes)))
+    (replace-regexp-in-string
+     "\\[--[^]]+\\]"
+     (lambda (match)
+       (format (propertize "[%s]" 'face 'transient-inactive-argument)
+               (mapconcat (lambda (arg)
+                            (propertize arg 'face
+                                        (if (member arg value)
+                                            'transient-argument
+                                          'transient-inactive-argument)))
+                          (save-match-data
+                            (split-string (substring match 1 -1) "|"))
+                          (propertize "|" 'face 'transient-inactive-argument))))
+     (cl-call-next-method obj))))
+
+;;;###autoload(autoload 'magit-submodule-add "magit-submodule" nil t)
+(transient-define-suffix magit-submodule-add (url &optional path name args)
+  "Add the repository at URL as a module.
+
+Optional PATH is the path to the module relative to the root of
+the superproject.  If it is nil, then the path is determined
+based on the URL.  Optional NAME is the name of the module.  If
+it is nil, then PATH also becomes the name."
+  :class 'magit--git-submodule-suffix
+  :description "Add            git submodule add [--force]"
+  (interactive
+    (magit-with-toplevel
+      (let* ((url (magit-read-string-ns "Add submodule (remote url)"))
+             (path (magit-submodule-read-path "Add submodules at path: " url)))
+        (list url
+              (directory-file-name path)
+              (magit-submodule-read-name-for-path path)
+              (magit-submodule-arguments "--force")))))
+  (magit-submodule-add-1 url path name args))
+
+(defun magit-submodule-read-path (prompt url)
+  (directory-file-name
+   (file-relative-name
+    (read-directory-name prompt nil nil nil
+                         (and (string-match "\\([^./]+\\)\\(\\.git\\)?$" url)
+                              (match-str 1 url))))))
+
+(defun magit-submodule-add-1 (url &optional path name args)
+  (magit-with-toplevel
+    (magit-submodule--maybe-reuse-gitdir name path)
+    (magit-run-git-async "submodule" "add"
+                         (and name (list "--name" name))
+                         args "--" url path)
+    (set-process-sentinel
+     magit-this-process
+     (lambda (process event)
+       (when (memq (process-status process) '(exit signal))
+         (if (> (process-exit-status process) 0)
+             (magit-process-sentinel process event)
+           (process-put process 'inhibit-refresh t)
+           (magit-process-sentinel process event)
+           (magit-call-git "submodule" "absorbgitdirs" path)
+           (magit-refresh)))))))
+
+;;;###autoload
+(defun magit-submodule-read-name-for-path (path &optional prefer-short)
+  (let* ((path (directory-file-name (file-relative-name path)))
+         (name (file-name-nondirectory path)))
+    (push (if prefer-short path name) minibuffer-history)
+    (magit-read-string-ns
+     "Submodule name" nil (cons 'minibuffer-history 2)
+     (or (seq-keep (##pcase-let ((`(,var ,val) (split-string % "=")))
+                     (and (equal val path)
+                          (cadr (split-string var "\\."))))
+                   (magit-git-lines "config" "--list" "-f" ".gitmodules"))
+         (if prefer-short name path)))))
+
+;;;###autoload(autoload 'magit-submodule-register "magit-submodule" nil t)
+(transient-define-suffix magit-submodule-register (modules)
+  "Register MODULES.
+
+With a prefix argument act on all suitable modules.  Otherwise,
+if the region selects modules, then act on those.  Otherwise, if
+there is a module at point, then act on that.  Otherwise read a
+single module from the user."
+  ;; This command and the underlying "git submodule init" do NOT
+  ;; "initialize" modules.  They merely "register" modules in the
+  ;; super-projects $GIT_DIR/config file, the purpose of which is to
+  ;; allow users to change such values before actually initializing
+  ;; the modules.
+  :description "Register       git submodule init"
+  (interactive
+    (list (magit-module-confirm "Register" 'magit-module-no-worktree-p)))
+  (magit-with-toplevel
+    (magit-run-git-async "submodule" "init" "--" modules)))
+
+;;;###autoload(autoload 'magit-submodule-populate "magit-submodule" nil t)
+(transient-define-suffix magit-submodule-populate (modules args)
+  "Create MODULES working directories, checking out the recorded commits.
+
+With a prefix argument act on all suitable modules.  Otherwise,
+if the region selects modules, then act on those.  Otherwise, if
+there is a module at point, then act on that.  Otherwise read a
+single module from the user."
+  ;; This is the command that actually "initializes" modules.
+  ;; A module is initialized when it has a working directory,
+  ;; a gitlink, and a .gitmodules entry.
+  :class 'magit--git-submodule-suffix
+  :description "Populate       git submodule update --init [--recursive]"
+  (interactive
+    (list (magit-module-confirm "Populate" 'magit-module-no-worktree-p)
+          (magit-submodule-arguments "--recursive")))
+  (magit-with-toplevel
+    (magit-run-git-async "submodule" "update" "--init" args "--" modules)))
+
+;;;###autoload(autoload 'magit-submodule-update "magit-submodule" nil t)
+(transient-define-suffix magit-submodule-update (modules args)
+  "Update MODULES by checking out the recorded commits.
+
+With a prefix argument act on all suitable modules.  Otherwise,
+if the region selects modules, then act on those.  Otherwise, if
+there is a module at point, then act on that.  Otherwise read a
+single module from the user."
+  ;; Unlike `git-submodule's `update' command ours can only update
+  ;; "initialized" modules by checking out other commits but not
+  ;; "initialize" modules by creating the working directories.
+  ;; To do the latter we provide the "setup" command.
+  :class 'magit--git-submodule-suffix
+  :description "Update         git submodule update [--force] [--no-fetch]
+                     [--remote] [--recursive] [--checkout|--rebase|--merge]"
+  (interactive
+    (list (magit-module-confirm "Update" 'magit-module-worktree-p)
+          (magit-submodule-arguments
+           "--force" "--remote" "--recursive" "--checkout" "--rebase" "--merge"
+           "--no-fetch")))
+  (magit-with-toplevel
+    (magit-run-git-async "submodule" "update" args "--" modules)))
+
+;;;###autoload(autoload 'magit-submodule-synchronize "magit-submodule" nil t)
+(transient-define-suffix magit-submodule-synchronize (modules args)
+  "Synchronize url configuration of MODULES.
+
+With a prefix argument act on all suitable modules.  Otherwise,
+if the region selects modules, then act on those.  Otherwise, if
+there is a module at point, then act on that.  Otherwise read a
+single module from the user."
+  :class 'magit--git-submodule-suffix
+  :description "Synchronize    git submodule sync [--recursive]"
+  (interactive
+    (list (magit-module-confirm "Synchronize" 'magit-module-worktree-p)
+          (magit-submodule-arguments "--recursive")))
+  (magit-with-toplevel
+    (magit-run-git-async "submodule" "sync" args "--" modules)))
+
+;;;###autoload(autoload 'magit-submodule-unpopulate "magit-submodule" nil t)
+(transient-define-suffix magit-submodule-unpopulate (modules args)
+  "Remove working directories of MODULES.
+
+With a prefix argument act on all suitable modules.  Otherwise,
+if the region selects modules, then act on those.  Otherwise, if
+there is a module at point, then act on that.  Otherwise read a
+single module from the user."
+  ;; Even when a submodule is "uninitialized" (it has no worktree)
+  ;; the super-project's $GIT_DIR/config may never-the-less set the
+  ;; module's url.  This may happen if you `deinit' and then `init'
+  ;; to register (NOT initialize).  Because the purpose of `deinit'
+  ;; is to remove the working directory AND to remove the url, this
+  ;; command does not limit itself to modules that have no working
+  ;; directory.
+  :class 'magit--git-submodule-suffix
+  :description "Unpopulate     git submodule deinit [--force]"
+  (interactive
+    (list (magit-module-confirm "Unpopulate")
+          (magit-submodule-arguments "--force")))
+  (magit-with-toplevel
+    (magit-run-git-async "submodule" "deinit" args "--" modules)))
+
+;;;###autoload
+(defun magit-submodule-remove (modules args trash-gitdirs)
+  "Unregister MODULES and remove their working directories.
+
+For safety reasons, do not remove the gitdirs and if a module has
+uncommitted changes, then do not remove it at all.  If a module's
+gitdir is located inside the working directory, then move it into
+the gitdir of the superproject first.
+
+With the \"--force\" argument offer to remove dirty working
+directories and with a prefix argument offer to delete gitdirs.
+Both actions are very dangerous and have to be confirmed.  There
+are additional safety precautions in place, so you might be able
+to recover from making a mistake here, but don't count on it."
+  (interactive
+    (list (if-let ((modules (magit-region-values 'magit-module-section t)))
+              (magit-confirm 'remove-modules nil "Remove %d modules" nil modules)
+            (list (magit-read-module-path "Remove module")))
+          (magit-submodule-arguments "--force")
+          current-prefix-arg))
+  (when magit-submodule-remove-trash-gitdirs
+    (setq trash-gitdirs t))
+  (magit-with-toplevel
+    (when-let
+        ((modified
+          (seq-filter (lambda (module)
+                        (let ((default-directory (file-name-as-directory
+                                                  (expand-file-name module))))
+                          (and (cddr (directory-files default-directory))
+                               (magit-anything-modified-p))))
+                      modules)))
+      (if (member "--force" args)
+          (if (magit-confirm 'remove-dirty-modules
+                "Remove dirty module %s"
+                "Remove %d dirty modules"
+                t modified)
+              (dolist (module modified)
+                (let ((default-directory (file-name-as-directory
+                                          (expand-file-name module))))
+                  (magit-git "stash" "push"
+                             "-m" "backup before removal of this module")))
+            (setq modules (cl-set-difference modules modified :test #'equal)))
+        (if (cdr modified)
+            (message "Omitting %s modules with uncommitted changes: %s"
+                     (length modified)
+                     (string-join modified ", "))
+          (message "Omitting module %s, it has uncommitted changes"
+                   (car modified)))
+        (setq modules (cl-set-difference modules modified :test #'equal))))
+    (when modules
+      (let ((alist
+             (and trash-gitdirs
+                  (mapcar (##split-string % "\0")
+                          (magit-git-lines "submodule" "foreach" "-q"
+                                           "printf \"$sm_path\\0$name\n\"")))))
+        (magit-git "submodule" "absorbgitdirs" "--" modules)
+        (magit-git "submodule" "deinit" args "--" modules)
+        (magit-git "rm" args "--" modules)
+        (when (and trash-gitdirs
+                   (magit-confirm 'trash-module-gitdirs
+                     "Trash gitdir of module %s"
+                     "Trash gitdirs of %d modules"
+                     t modules))
+          (dolist (module modules)
+            (if-let ((name (cadr (assoc module alist))))
+                ;; Disregard if `magit-delete-by-moving-to-trash'
+                ;; is nil.  Not doing so would be too dangerous.
+                (delete-directory (convert-standard-filename
+                                   (expand-file-name
+                                    (concat "modules/" name)
+                                    (magit-gitdir)))
+                                  t t)
+              (error "BUG: Weird module name and/or path for %s" module)))))
+      (magit-refresh))))
+
+;;; Sections
+
+;;;###autoload
+(defun magit-insert-modules ()
+  "Insert submodule sections.
+Hook `magit-module-sections-hook' controls which module sections
+are inserted, and option `magit-module-sections-nested' controls
+whether they are wrapped in an additional section."
+  (when-let ((modules (magit-list-module-paths)))
+    (if magit-module-sections-nested
+        (magit-insert-section (modules nil t)
+          (magit-insert-heading
+            (format "%s (%s)"
+                    (propertize "Modules"
+                                'font-lock-face 'magit-section-heading)
+                    (length modules)))
+          (magit-insert-section-body
+            (magit--insert-modules)))
+      (magit--insert-modules))))
+
+(defun magit--insert-modules (&optional _section)
+  (magit-run-section-hook 'magit-module-sections-hook))
+
+;;;###autoload
+(defun magit-insert-modules-overview ()
+  "Insert sections for all modules.
+For each section insert the path and the output of \"git describe --tags\",
+or, failing that, the abbreviated HEAD commit hash."
+  (when-let ((modules (magit-list-module-paths)))
+    (magit-insert-section (modules nil t)
+      (magit-insert-heading
+        (format "%s (%s)"
+                (propertize "Modules overview"
+                            'font-lock-face 'magit-section-heading)
+                (length modules)))
+      (magit-insert-section-body
+        (magit--insert-modules-overview)))))
+
+(defvar magit-modules-overview-align-numbers t)
+
+(defun magit--insert-modules-overview (&optional _section repos)
+  (magit-with-toplevel
+    (let* ((modules (or repos (magit-list-module-paths)))
+           (path-format (format "%%-%ds "
+                                (min (apply #'max (mapcar #'length modules))
+                                     (/ (window-width) 2))))
+           (branch-format (format "%%-%ds " (min 25 (/ (window-width) 3)))))
+      (dolist (module modules)
+        (let ((default-directory
+               (expand-file-name (file-name-as-directory module))))
+          (magit-insert-section (module module t)
+            (insert (propertize (format path-format module)
+                                'font-lock-face 'magit-diff-file-heading))
+            (if (not (file-exists-p ".git"))
+                (insert "(unpopulated)")
+              (insert
+               (format
+                branch-format
+                (if-let ((branch (magit-get-current-branch)))
+                    (propertize branch 'font-lock-face 'magit-branch-local)
+                  (propertize "(detached)" 'font-lock-face 'warning))))
+              (cond-let
+                ([desc (magit-git-string "describe" "--tags")]
+                 (when (and magit-modules-overview-align-numbers
+                            (string-match-p "\\`[0-9]" desc))
+                   (insert ?\s))
+                 (insert (propertize desc 'font-lock-face 'magit-tag)))
+                ([abbrev (magit-rev-format "%h")]
+                 (insert (propertize abbrev 'font-lock-face 'magit-hash)))))
+            (insert ?\n))))))
+  (insert ?\n))
+
+(defvar-keymap magit-modules-section-map
+  :doc "Keymap for `modules' sections."
+  "<remap> <magit-visit-thing>" #'magit-list-submodules
+  "<1>" (magit-menu-item "List %t" #'magit-list-submodules))
+
+(defvar-keymap magit-module-section-map
+  :doc "Keymap for `module' sections."
+  "C-j"        #'magit-submodule-visit
+  "C-<return>" #'magit-submodule-visit
+  "<remap> <magit-unstage-files>" #'magit-unstage
+  "<remap> <magit-stage-files>"   #'magit-stage
+  "<remap> <magit-visit-thing>"   #'magit-submodule-visit
+  "<5>" (magit-menu-item "Module commands..." #'magit-submodule)
+  "<4>" '(menu-item "--")
+  "<3>" (magit-menu-item "Unstage %T" #'magit-unstage
+                         '(:visible (eq (magit-diff-type) 'staged)))
+  "<2>" (magit-menu-item "Stage %T" #'magit-stage
+                         '(:visible (eq (magit-diff-type) 'unstaged)))
+  "<1>" (magit-menu-item "Visit %s" #'magit-submodule-visit))
+
+(defun magit-submodule-visit (module &optional other-window)
+  "Visit MODULE by calling `magit-status' on it.
+Offer to initialize MODULE if it's not checked out yet.
+With a prefix argument, visit in another window."
+  (interactive (list (or (magit-section-value-if 'module)
+                         (magit-read-module-path "Visit module"))
+                     current-prefix-arg))
+  (magit-with-toplevel
+    (let ((path (expand-file-name module)))
+      (cond
+        ((file-exists-p (expand-file-name ".git" module))
+         (magit-diff-visit-directory path other-window))
+        ((y-or-n-p (format "Initialize submodule '%s' first?" module))
+         (magit-run-git-async "submodule" "update" "--init" "--" module)
+         (set-process-sentinel
+          magit-this-process
+          (lambda (process event)
+            (let ((magit-process-raise-error t))
+              (magit-process-sentinel process event))
+            (when (and (eq (process-status      process) 'exit)
+                       (=  (process-exit-status process) 0))
+              (magit-diff-visit-directory path other-window)))))
+        ((file-exists-p path)
+         (dired-jump other-window (concat path "/.")))))))
+
+;;;###autoload
+(defun magit-insert-modules-unpulled-from-upstream ()
+  "Insert sections for modules that haven't been pulled from the upstream.
+These sections can be expanded to show the respective commits."
+  (magit--insert-modules-logs "Modules unpulled from @{upstream}"
+                              'modules-unpulled-from-upstream
+                              "HEAD..@{upstream}"))
+
+;;;###autoload
+(defun magit-insert-modules-unpulled-from-pushremote ()
+  "Insert sections for modules that haven't been pulled from the push-remote.
+These sections can be expanded to show the respective commits."
+  (magit--insert-modules-logs "Modules unpulled from @{push}"
+                              'modules-unpulled-from-pushremote
+                              "HEAD..@{push}"))
+
+;;;###autoload
+(defun magit-insert-modules-unpushed-to-upstream ()
+  "Insert sections for modules that haven't been pushed to the upstream.
+These sections can be expanded to show the respective commits."
+  (magit--insert-modules-logs "Modules unmerged into @{upstream}"
+                              'modules-unpushed-to-upstream
+                              "@{upstream}..HEAD"))
+
+;;;###autoload
+(defun magit-insert-modules-unpushed-to-pushremote ()
+  "Insert sections for modules that haven't been pushed to the push-remote.
+These sections can be expanded to show the respective commits."
+  (magit--insert-modules-logs "Modules unpushed to @{push}"
+                              'modules-unpushed-to-pushremote
+                              "@{push}..HEAD"))
+
+(defun magit--insert-modules-logs (heading type range)
+  "For internal use, don't add to a hook."
+  (when-let ((_(not (magit-ignore-submodules-p)))
+             (modules (magit-list-module-paths)))
+    (magit-insert-section ((eval type) nil t)
+      (string-match "\\`\\(.+\\) \\([^ ]+\\)\\'" heading)
+      (magit-insert-heading
+        (propertize (match-str 1 heading)
+                    'font-lock-face 'magit-section-heading)
+        " "
+        (propertize (match-str 2 heading)
+                    'font-lock-face 'magit-branch-remote)
+        ":")
+      (dolist (module modules)
+        (when-let* ((default-directory (expand-file-name module))
+                    (_(file-exists-p (expand-file-name ".git")))
+                    (lines (magit-git-lines "-c" "push.default=current"
+                                            "log" "--oneline" range))
+                    (count (length lines))
+                    (_(> count 0)))
+          (magit-insert-section
+              ( module module t
+                :range range)
+            (magit-insert-heading count
+              (propertize module 'font-lock-face 'magit-diff-file-heading))
+            (dolist (line lines)
+              (string-match magit-log-module-re line)
+              (let ((rev (match-str 1 line))
+                    (msg (match-str 2 line)))
+                (magit-insert-section (module-commit rev t)
+                  (insert (propertize rev 'font-lock-face 'magit-hash) " "
+                          (magit-log--wash-summary msg) "\n")))))))
+      (magit-cancel-section 'if-empty)
+      (insert ?\n))))
+
+;;; List
+
+;;;###autoload
+(defun magit-list-submodules ()
+  "Display a list of the current repository's populated submodules."
+  (interactive)
+  (magit-submodule-list-setup magit-submodule-list-columns))
+
+(defvar-keymap magit-submodule-list-mode-map
+  :doc "Local keymap for Magit-Submodule-List mode buffers."
+  :parent magit-repolist-mode-map)
+
+(define-derived-mode magit-submodule-list-mode magit-repolist-mode "Modules"
+  "Major mode for browsing a list of Git submodules."
+  :interactive nil
+  :group 'magit-repolist
+  (setq-local tabulated-list-revert-hook
+              (list #'magit-submodule-list-refresh t)))
+
+(defun magit-submodule-list-setup (columns &optional predicate)
+  (magit-display-buffer
+   (or (magit-get-mode-buffer 'magit-submodule-list-mode)
+       (magit-generate-new-buffer 'magit-submodule-list-mode)))
+  (magit-submodule-list-mode)
+  (setq-local magit-repolist-columns columns)
+  (setq-local magit-repolist-sort-key magit-submodule-list-sort-key)
+  (when predicate
+    (setq-local magit-submodule-list-predicate predicate))
+  (magit-repolist-setup-1)
+  (magit-submodule-list-refresh))
+
+(defun magit-submodule-list-refresh ()
+  (setq tabulated-list-entries
+        (seq-keep #'magit-submodule--format-module (magit-list-module-paths)))
+  (message "Listing submodules...")
+  (tabulated-list-init-header)
+  (tabulated-list-print t)
+  (message "Listing submodules...done"))
+
+(defun magit-submodule--format-module (module)
+  (and (funcall magit-submodule-list-predicate module)
+       (let ((default-directory
+              (expand-file-name (file-name-as-directory module))))
+         (list default-directory
+               (vconcat
+                (mapcar
+                 (pcase-lambda (`(,title ,width ,fn ,props))
+                   (or (and (or (file-exists-p ".git")
+                                (and
+                                 (symbolp fn)
+                                 (get fn 'magit-submodule-support-unpopulated)))
+                            (funcall fn `((:path  ,module)
+                                          (:title ,title)
+                                          (:width ,width)
+                                          ,@props)))
+                       ""))
+                 magit-repolist-columns))))))
+
+(put 'magit-modulelist-column-path 'magit-submodule-support-unpopulated t)
+(put 'magit-repolist-column-path   'magit-submodule-support-unpopulated t)
+(put 'magit-repolist-column-branch 'magit-submodule-support-unpopulated t)
+
+(defun magit-submodule-list-module-populated-p (module)
+  "Return t if MODULE is populated, nil otherwise.
+This is only suitable as a value of `magit-submodule-list-predicate'."
+  (file-exists-p
+   (expand-file-name (concat (file-name-as-directory module) ".git"))))
+
+(defun magit-modulelist-column-path (spec)
+  "Insert the relative path of the submodule."
+  (let ((path (cadr (assq :path spec))))
+    (or (run-hook-with-args-until-success
+         'magit-submodule-list-format-path-functions path)
+        path)))
+
+;;; Utilities
+
+(defun magit-submodule--maybe-reuse-gitdir (name path)
+  (let ((gitdir (convert-standard-filename
+                 (expand-file-name (concat "modules/" name)
+                                   (magit-gitdir)))))
+    (when (and (file-exists-p gitdir)
+               (not (file-exists-p path)))
+      (pcase (read-char-choice
+              (concat
+               gitdir " already exists.\n"
+               "Type [u] to use the existing gitdir and create the working tree\n"
+               "     [r] to rename the existing gitdir and clone again\n"
+               "     [t] to trash the existing gitdir and clone again\n"
+               "   [C-g] to abort ")
+              '(?u ?r ?t))
+        (?u (magit-submodule--restore-worktree (expand-file-name path) gitdir))
+        (?r (rename-file gitdir (concat gitdir "-"
+                                        (format-time-string "%F-%T"))))
+        (?t (delete-directory gitdir t t))))))
+
+(defun magit-submodule--restore-worktree (worktree gitdir)
+  (make-directory worktree t)
+  (with-temp-file (expand-file-name ".git" worktree)
+    (insert "gitdir: " (file-relative-name gitdir worktree) "\n"))
+  (let ((default-directory worktree))
+    (magit-call-git "reset" "--hard" "HEAD" "--")))
+
+;;; _
+(provide 'magit-submodule)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-submodule.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-submodule.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-submodule.elc
new file mode 100644
index 0000000..fbe759e
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-submodule.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-subtree.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-subtree.el
new file mode 100644
index 0000000..e27a00a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-subtree.el
@@ -0,0 +1,203 @@
+;;; magit-subtree.el --- Subtree support for Magit  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for "git subtree".
+;; The entry point is the `magit-subtree' menu command.
+
+;; See (info "(magit)Subtree").
+
+;;; Code:
+
+(require 'magit)
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-subtree "magit-subtree" nil t)
+(transient-define-prefix magit-subtree ()
+  "Import or export subtrees."
+  :man-page "git-subtree"
+  ["Subtree actions"
+   ("i" "Import" magit-subtree-import)
+   ("e" "Export" magit-subtree-export)])
+
+;;;###autoload(autoload 'magit-subtree-import "magit-subtree" nil t)
+(transient-define-prefix magit-subtree-import ()
+  "Import subtrees."
+  :man-page "git-subtree"
+  ["Arguments"
+   (magit-subtree:--prefix)
+   (magit-subtree:--message)
+   ("-s" "Squash" "--squash")]
+  ["Subtree import actions"
+   [("a" "Add"        magit-subtree-add)
+    ("c" "Add commit" magit-subtree-add-commit)]
+   [("m" "Merge"      magit-subtree-merge)
+    ("f" "Pull"       magit-subtree-pull)]])
+
+;;;###autoload(autoload 'magit-subtree-export "magit-subtree" nil t)
+(transient-define-prefix magit-subtree-export ()
+  "Export subtrees."
+  :man-page "git-subtree"
+  ["Arguments"
+   (magit-subtree:--prefix)
+   (magit-subtree:--annotate)
+   (magit-subtree:--branch)
+   (magit-subtree:--onto)
+   ("-i" "Ignore joins" "--ignore-joins")
+   ("-j" "Rejoin"       "--rejoin")]
+  ["Subtree export actions"
+   ("p" "Push"          magit-subtree-push)
+   ("s" "Split"         magit-subtree-split)])
+
+(transient-define-argument magit-subtree:--prefix ()
+  :description "Prefix"
+  :class 'transient-option
+  :shortarg "-P"
+  :argument "--prefix="
+  :reader #'magit-subtree-read-prefix)
+
+(defun magit-subtree-read-prefix (prompt &optional default _history)
+  (let* ((insert-default-directory nil)
+         (topdir (magit-toplevel))
+         (prefix (read-directory-name (concat prompt ": ") topdir default)))
+    (if (file-name-absolute-p prefix)
+        (if (string-prefix-p topdir prefix)
+            (file-relative-name prefix topdir)
+          (user-error "%s isn't inside the repository at %s" prefix topdir))
+      prefix)))
+
+(transient-define-argument magit-subtree:--message ()
+  :description "Message"
+  :class 'transient-option
+  :shortarg "-m"
+  :argument "--message=")
+
+(transient-define-argument magit-subtree:--annotate ()
+  :description "Annotate"
+  :class 'transient-option
+  :key "-a"
+  :argument "--annotate=")
+
+(transient-define-argument magit-subtree:--branch ()
+  :description "Branch"
+  :class 'transient-option
+  :shortarg "-b"
+  :argument "--branch=")
+
+(transient-define-argument magit-subtree:--onto ()
+  :description "Onto"
+  :class 'transient-option
+  :key "-o"
+  :argument "--onto="
+  :reader #'magit-transient-read-revision)
+
+(defun magit-subtree-prefix (transient prompt)
+  (if-let ((arg (seq-find (##string-prefix-p "--prefix=" %)
+                          (transient-args transient))))
+      (substring arg 9)
+    (magit-subtree-read-prefix prompt)))
+
+(defun magit-subtree-arguments (transient)
+  (seq-remove (##string-prefix-p "--prefix=" %)
+              (transient-args transient)))
+
+(defun magit-git-subtree (subcmd prefix &rest args)
+  (magit-run-git-async "subtree" subcmd (concat "--prefix=" prefix) args))
+
+;;;###autoload
+(defun magit-subtree-add (prefix repository ref args)
+  "Add REF from REPOSITORY as a new subtree at PREFIX."
+  (interactive
+    (cons (magit-subtree-prefix 'magit-subtree-import "Add subtree")
+          (let ((remote (magit-read-remote-or-url "From repository")))
+            (list remote
+                  (magit-read-refspec "Ref" remote)
+                  (magit-subtree-arguments 'magit-subtree-import)))))
+  (magit-git-subtree "add" prefix args repository ref))
+
+;;;###autoload
+(defun magit-subtree-add-commit (prefix commit args)
+  "Add COMMIT as a new subtree at PREFIX."
+  (interactive
+    (list (magit-subtree-prefix 'magit-subtree-import "Add subtree")
+          (magit-read-string-ns "Commit")
+          (magit-subtree-arguments 'magit-subtree-import)))
+  (magit-git-subtree "add" prefix args commit))
+
+;;;###autoload
+(defun magit-subtree-merge (prefix commit args)
+  "Merge COMMIT into the PREFIX subtree."
+  (interactive
+    (list (magit-subtree-prefix 'magit-subtree-import "Merge into subtree")
+          (magit-read-string-ns "Commit")
+          (magit-subtree-arguments 'magit-subtree-import)))
+  (magit-git-subtree "merge" prefix args commit))
+
+;;;###autoload
+(defun magit-subtree-pull (prefix repository ref args)
+  "Pull REF from REPOSITORY into the PREFIX subtree."
+  (interactive
+    (cons (magit-subtree-prefix 'magit-subtree-import "Pull into subtree")
+          (let ((remote (magit-read-remote-or-url "From repository")))
+            (list remote
+                  (magit-read-refspec "Ref" remote)
+                  (magit-subtree-arguments 'magit-subtree-import)))))
+  (magit-git-subtree "pull" prefix args repository ref))
+
+;;;###autoload
+(defun magit-subtree-push (prefix repository ref args)
+  "Extract the history of the subtree PREFIX and push it to REF on REPOSITORY."
+  (interactive (list (magit-subtree-prefix 'magit-subtree-export "Push subtree")
+                     (magit-read-remote-or-url "To repository")
+                     (magit-read-string-ns "To reference")
+                     (magit-subtree-arguments 'magit-subtree-export)))
+  (magit-git-subtree "push" prefix args repository ref))
+
+;;;###autoload
+(defun magit-subtree-split (prefix commit args)
+  "Extract the history of the subtree PREFIX."
+  (interactive (list (magit-subtree-prefix 'magit-subtree-export "Split subtree")
+                     (magit-read-string-ns "Commit")
+                     (magit-subtree-arguments 'magit-subtree-export)))
+  (magit-git-subtree "split" prefix args commit))
+
+;;; _
+(provide 'magit-subtree)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-subtree.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-subtree.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-subtree.elc
new file mode 100644
index 0000000..649de17
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-subtree.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-tag.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-tag.el
new file mode 100644
index 0000000..48af73c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-tag.el
@@ -0,0 +1,261 @@
+;;; magit-tag.el --- Tag functionality  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements tag commands.
+
+;;; Code:
+
+(require 'magit)
+
+;; For `magit-tag-delete'.
+(defvar helm-comp-read-use-marked)
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-tag "magit" nil t)
+(transient-define-prefix magit-tag ()
+  "Create or delete a tag."
+  :man-page "git-tag"
+  ["Arguments"
+   ("-f" "Force"        ("-f" "--force"))
+   ("-e" "Edit message" ("-e" "--edit"))
+   ("-a" "Annotate"     ("-a" "--annotate"))
+   ("-s" "Sign"         ("-s" "--sign"))
+   (magit-tag:--local-user)]
+  [["Create"
+    ("t"  "tag"     magit-tag-create)
+    ("r"  "release" magit-tag-release)]
+   ["Do"
+    ("k"  "delete"  magit-tag-delete)
+    ("p"  "prune"   magit-tag-prune)]])
+
+(defun magit-tag-arguments ()
+  (transient-args 'magit-tag))
+
+(transient-define-argument magit-tag:--local-user ()
+  :description "Sign as"
+  :class 'transient-option
+  :shortarg "-u"
+  :argument "--local-user="
+  :reader #'magit-read-gpg-signing-key
+  :history-key 'magit:--gpg-sign)
+
+;;;###autoload
+(defun magit-tag-create (name commit &optional args)
+  "Create a new tag with the given NAME at COMMIT.
+With a prefix argument annotate the tag.
+\n(git tag [--annotate] NAME REV)"
+  (interactive (list (magit-completing-read "Create tag" (magit-list-tags))
+                     (magit-read-branch-or-commit "Place tag on")
+                     (let ((args (magit-tag-arguments)))
+                       (when current-prefix-arg
+                         (cl-pushnew "--annotate" args :test #'equal))
+                       args)))
+  (magit-run-git-with-editor "tag" args name commit))
+
+;;;###autoload
+(defun magit-tag-delete (tags)
+  "Delete one or more tags.
+If the region marks multiple tags (and nothing else), then offer
+to delete those, otherwise prompt for a single tag to be deleted,
+defaulting to the tag at point.
+\n(git tag -d TAGS)"
+  (interactive (list (if-let ((tags (magit-region-values 'tag)))
+                         (magit-confirm t nil "Delete %d tags" nil tags)
+                       (let ((helm-comp-read-use-marked t))
+                         (magit-read-tag "Delete tag")))))
+  (magit-run-git "tag" "-d" tags))
+
+;;;###autoload
+(defun magit-tag-prune (tags remote-tags remote)
+  "Offer to delete tags missing locally from REMOTE, and vice versa."
+  (interactive
+    (let* ((remote (magit-read-remote "Prune tags using remote"))
+           (tags   (magit-list-tags))
+           (rtags  (prog2 (message "Determining remote tags...")
+                       (magit-remote-list-tags remote)
+                     (message "Determining remote tags...done")))
+           (ltags  (cl-set-difference tags rtags :test #'equal))
+           (rtags  (cl-set-difference rtags tags :test #'equal)))
+      (unless (or ltags rtags)
+        (message "Same tags exist locally and remotely"))
+      (unless (magit-confirm t
+                "Delete %s locally"
+                "Delete %d tags locally"
+                'noabort ltags)
+        (setq ltags nil))
+      (unless (magit-confirm t
+                "Delete %s from remote"
+                "Delete %d tags from remote"
+                'noabort rtags)
+        (setq rtags nil))
+      (list ltags rtags remote)))
+  (when tags
+    (magit-call-git "tag" "-d" tags))
+  (when remote-tags
+    (magit-run-git-async "push" remote (mapcar (##concat ":" %) remote-tags))))
+
+(defvar magit-tag-version-regexp-alist
+  '(("^[-._+ ]?snapshot\\.?$" . -4)
+    ("^[-._+]$" . -4)
+    ("^[-._+ ]?\\(cvs\\|git\\|bzr\\|svn\\|hg\\|darcs\\)\\.?$" . -4)
+    ("^[-._+ ]?unknown\\.?$" . -4)
+    ("^[-._+ ]?alpha\\.?$" . -3)
+    ("^[-._+ ]?beta\\.?$" . -2)
+    ("^[-._+ ]?\\(pre\\|rc\\)\\.?$" . -1))
+  "Overrides `version-regexp-alist' for `magit-tag-release'.
+See also `magit-release-tag-regexp'.")
+
+(defvar magit-release-tag-regexp "\\`\
+\\(?1:\\(?:v\\(?:ersion\\)?\\|r\\(?:elease\\)?\\)[-_/]?\\)?\
+\\(?2:[0-9]+\\(?:\\.[0-9]+\\)*\
+\\(?:-[a-zA-Z0-9-]+\\(?:\\.[a-zA-Z0-9-]+\\)*\\)?\\)\\'"
+  "Regexp used by `magit-tag-release' to parse release tags.
+
+The first submatch must match the prefix, if any.  The second
+submatch must match the version string.
+
+If this matches versions that are not dot separated numbers,
+then `magit-tag-version-regexp-alist' has to contain entries
+for the separators allowed here.")
+
+(defvar magit-release-commit-regexp "\\`Release version \\(.+\\)\\'"
+  "Regexp used by `magit-tag-release' to parse release commit messages.
+The first submatch must match the version string.")
+
+;;;###autoload
+(defun magit-tag-release (tag msg &optional args)
+  "Create a release tag for `HEAD'.
+
+Assume that release tags match `magit-release-tag-regexp'.
+
+If `HEAD's message matches `magit-release-commit-regexp', then
+base the tag on the version string specified by that.  Otherwise
+prompt for the name of the new tag using the highest existing
+tag as initial input and leaving it to the user to increment the
+desired part of the version string.
+
+When creating an annotated tag, prepare a message based on the message
+of the highest existing tag, provided that contains the corresponding
+version string, and substituting the new version string for that.  If
+that is not the case, propose a message using a reasonable format."
+  (interactive
+    (save-match-data
+      (pcase-let*
+          ((args (magit-tag-arguments))
+           (`(,pver ,ptag ,pmsg) (car (magit--list-releases)))
+           (msg (magit-rev-format "%s"))
+           (ver (and (string-match magit-release-commit-regexp msg)
+                     (match-str 1 msg)))
+           (_   (and (not ver)
+                     (require (quote sisyphus) nil t)
+                     (string-match magit-release-commit-regexp
+                                   (magit-rev-format "%s" ptag))
+                     (user-error "Use `sisyphus-create-release' first")))
+           (tag (cond
+                  ((not ptag)
+                   ;; Force the user to review the message used for the
+                   ;; initial release tag, in case they do not like the
+                   ;; default format.
+                   (cl-pushnew "--edit" args :test #'equal)
+                   (read-string "Create first release tag: "
+                                (if (and ver (string-match-p "\\`[0-9]" ver))
+                                    (concat "v" ver)
+                                  ver)))
+                  (ver
+                   (concat (and (string-match magit-release-tag-regexp ptag)
+                                (match-str 1 ptag))
+                           ver))
+                  ((read-string (format "Create release tag (previous was %s): "
+                                        ptag)
+                                ptag))))
+           (ver (and (string-match magit-release-tag-regexp tag)
+                     (match-str 2 tag))))
+        (list tag
+              (and (seq-some (apply-partially
+                              #'string-match-p
+                              "\\`--\\(annotate\\|local-user\\|sign\\)")
+                             args)
+                   (cond ((and pver (string-match (regexp-quote pver) pmsg))
+                          (replace-match ver t t pmsg))
+                         ((and ptag (string-match (regexp-quote ptag) pmsg))
+                          (replace-match tag t t pmsg))
+                         ((format "%s %s"
+                                  (capitalize
+                                   (file-name-nondirectory
+                                    (directory-file-name (magit-toplevel))))
+                                  ver))))
+              args))))
+  (magit-run-git-with-editor "tag" args (and msg (list "-m" msg)) tag)
+  (set-process-sentinel
+   magit-this-process
+   (lambda (process event)
+     (when (memq (process-status process) '(exit signal))
+       (magit-process-sentinel process event)
+       (magit-refs-setup-buffer "HEAD" (magit-show-refs-arguments))))))
+
+(defun magit--list-releases ()
+  "Return a list of releases.
+The list is ordered, beginning with the highest release.
+Each release element has the form (VERSION TAG MESSAGE).
+`magit-release-tag-regexp' is used to determine whether
+a tag qualifies as a release tag."
+  (save-match-data
+    (mapcar
+     #'cdr
+     (compat-call
+      sort (seq-keep
+            (lambda (line)
+              (and-let*
+                  ((_(string-match " +" line))
+                   (tag (substring line 0 (match-beginning 0)))
+                   (msg (substring line (match-end 0)))
+                   (_(string-match magit-release-tag-regexp tag))
+                   (ver (match-str 2 tag))
+                   (version-regexp-alist magit-tag-version-regexp-alist))
+                (list (version-to-list ver) ver tag msg)))
+            ;; Cannot rely on "--sort=-version:refname" because
+            ;; that gets confused if the version prefix has changed.
+            (magit-git-lines "tag" "-n"))
+      :lessp #'version-list-< :reverse t :key #'car))))
+
+;;; _
+(provide 'magit-tag)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-tag.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-tag.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-tag.elc
new file mode 100644
index 0000000..142b244
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-tag.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-transient.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-transient.el
new file mode 100644
index 0000000..d89623b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-transient.el
@@ -0,0 +1,256 @@
+;;; magit-transient.el --- Support for transients  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements Magit-specific prefix and suffix classes,
+;; and their methods.
+
+;;; Code:
+
+(require 'magit-git)
+(require 'magit-mode)
+(require 'magit-process)
+
+(require 'transient)
+
+;;; Classes
+
+(defclass magit--git-variable (transient-variable)
+  ((scope       :initarg :scope)
+   (global      :initarg :global      :initform nil)
+   (default     :initarg :default     :initform nil)
+   (accessible-format                 :initform "%i%k %d is %v")))
+
+(defclass magit--git-variable:choices (magit--git-variable)
+  ((choices     :initarg :choices)
+   (fallback    :initarg :fallback    :initform nil)))
+
+(defclass magit--git-variable:boolean (magit--git-variable:choices)
+  ((choices     :initarg :choices     :initform '("true" "false"))))
+
+(defclass magit--git-variable:urls (magit--git-variable)
+  ((seturl-arg  :initarg :seturl-arg  :initform nil)))
+
+;;; Methods
+;;;; Init
+
+(cl-defmethod transient-init-scope ((obj magit--git-variable))
+  (oset obj scope
+        (cond (transient--prefix
+               (oref transient--prefix scope))
+              ((slot-boundp obj 'scope)
+               (funcall (oref obj scope) obj)))))
+
+(cl-defmethod transient-init-value ((obj magit--git-variable))
+  (let ((variable (format (oref obj variable)
+                          (oref obj scope)))
+        (arg (if (oref obj global) "--global" "--local")))
+    (oset obj variable variable)
+    (oset obj value
+          (cond ((oref obj multi-value)
+                 (magit-get-all arg variable))
+                ((magit-get arg variable))))))
+
+(cl-defmethod transient-init-value ((obj magit--git-variable:boolean))
+  (let ((variable (format (oref obj variable)
+                          (oref obj scope)))
+        (arg (if (oref obj global) "--global" "--local")))
+    (oset obj variable variable)
+    (oset obj value
+          (with-temp-buffer
+            (and (zerop (magit-process-git t "config" "--bool" arg variable))
+                 (buffer-substring (point-min) (1- (point-max))))))))
+
+;;;; Read
+
+(cl-defmethod transient-infix-read :around ((obj magit--git-variable:urls))
+  (transient--with-emergency-exit
+    (transient--with-suspended-override
+     (mapcar (lambda (url)
+               (if (string-prefix-p "~" url)
+                   (expand-file-name url)
+                 url))
+             (cl-call-next-method obj)))))
+
+(cl-defmethod transient-infix-read ((obj magit--git-variable:choices))
+  (let ((choices (oref obj choices)))
+    (when (functionp choices)
+      (setq choices (funcall choices)))
+    (cond-let
+      ((or transient-prefer-reading-value current-prefix-arg)
+       (pcase-let*
+           ((`(,unset . ,choices)
+             (magit--git-variable-list-choices obj))
+            (unset (or unset "(unset)"))
+            (choice (magit-completing-read
+                     (format "Set `%s' to" (oref obj variable))
+                     (nconc (mapcar #'magit--delete-text-properties choices)
+                            (list (propertize unset 'face
+                                              'transient-inactive-value)))
+                     nil t)))
+         (if (equal choice unset) nil choice)))
+      ([value (oref obj value)]
+       (cadr (member value choices)))
+      ((car choices)))))
+
+;;;; Readers
+
+(defun magit-transient-read-person (prompt initial-input history)
+  (magit-completing-read
+   prompt
+   (mapcar (##save-excursion
+             (and (string-match "\\`[\s\t]+[0-9]+\t" %)
+                  (list (substring % (match-end 0)))))
+           (magit-git-lines "shortlog" "-n" "-s" "-e" "HEAD"))
+   nil nil initial-input history))
+
+(defun magit-transient-read-revision (prompt initial-input history)
+  (magit-completing-read prompt (cons "HEAD" (magit-list-refnames))
+                         nil 'any initial-input history
+                         (or (magit-branch-or-commit-at-point)
+                             (magit-get-current-branch))))
+
+;;;; Set
+
+(cl-defmethod transient-infix-set ((obj magit--git-variable) value)
+  (let ((variable (oref obj variable))
+        (arg (if (oref obj global) "--global" "--local")))
+    (oset obj value value)
+    (if (oref obj multi-value)
+        (magit-set-all value arg variable)
+      (magit-set value arg variable))
+    (magit-refresh)
+    (unless (or value transient--prefix)
+      (message "Unset %s" variable))))
+
+(cl-defmethod transient-infix-set ((obj magit--git-variable:urls) values)
+  (let ((previous (oref obj value))
+        (seturl   (oref obj seturl-arg))
+        (remote   (oref transient--prefix scope)))
+    (oset obj value values)
+    (dolist (v (cl-set-difference values previous :test #'equal))
+      (magit-call-git "remote" "set-url" seturl "--add" remote v))
+    (dolist (v (cl-set-difference previous values :test #'equal))
+      (magit-call-git "remote" "set-url" seturl "--delete" remote
+                      (concat "^" (regexp-quote v) "$")))
+    (magit-refresh)))
+
+;;;; Draw
+
+(cl-defmethod transient-format-description ((obj magit--git-variable))
+  (or (oref obj description)
+      (oref obj variable)))
+
+(cl-defmethod transient-format-value ((obj magit--git-variable))
+  (cond-let*
+    ([value (oref obj value)]
+     (if (oref obj multi-value)
+         (if (cdr value)
+             (mapconcat (##concat "\n     "
+                                  (propertize % 'face 'transient-value))
+                        value "")
+           (propertize (car value) 'face 'transient-value))
+       (propertize (car (split-string value "\n"))
+                   'face 'transient-value)))
+    ([default (oref obj default)]
+     [default (if (functionp default) (funcall default) default)]
+     (if transient-prefer-reading-value
+         (format "unset, using default, which is %s"
+                 (propertize default 'face 'transient-value))
+       (concat (propertize "default:" 'face 'transient-inactive-value)
+               (propertize default 'face 'transient-value))))
+    ((propertize "unset" 'face 'transient-inactive-value))))
+
+(cl-defmethod transient-format-value ((obj magit--git-variable:choices))
+  (if transient-prefer-reading-value
+      (cl-call-next-method)
+    (pcase-let ((`(,fallback . ,choices) (magit--git-variable-list-choices obj)))
+      (concat
+       (propertize "[" 'face 'transient-inactive-value)
+       (string-join choices (propertize "|" 'face 'transient-inactive-value))
+       (and fallback (propertize "|" 'face 'transient-inactive-value))
+       fallback
+       (propertize "]" 'face 'transient-inactive-value)))))
+
+(defun magit--git-variable-list-choices (obj)
+  (let* ((variable (oref obj variable))
+         (choices  (oref obj choices))
+         (value    (oref obj value))
+         (global   (and (not (oref obj global))
+                        (magit-git-string "config" "--global" variable)))
+         (defaultp (oref obj default))
+         (default  (if (functionp defaultp) (funcall defaultp obj) defaultp))
+         (fallback (oref obj fallback))
+         (fallback (and fallback
+                        (and$ (magit-get fallback)
+                              (concat fallback ":" $)))))
+    (when (functionp choices)
+      (setq choices (funcall choices)))
+    (cons (cond (global
+                 (propertize (concat "global:" global)
+                             'face (cond (value
+                                          'transient-inactive-value)
+                                         ((member global choices)
+                                          'transient-value)
+                                         ('font-lock-warning-face))))
+                (fallback
+                 (propertize fallback
+                             'face (if value
+                                       'transient-inactive-value
+                                     'transient-value)))
+                (default
+                 (propertize (if (functionp defaultp)
+                                 (concat "dwim:" default)
+                               (concat "default:" default))
+                             'face (if value
+                                       'transient-inactive-value
+                                     'transient-value))))
+          (mapcar (lambda (choice)
+                    (propertize choice 'face (if (equal choice value)
+                                                 (if (member choice choices)
+                                                     'transient-value
+                                                   'font-lock-warning-face)
+                                               'transient-inactive-value)))
+                  (if (and value (not (member value choices)))
+                      (cons value choices)
+                    choices)))))
+
+;;; _
+(provide 'magit-transient)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-transient.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-transient.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-transient.elc
new file mode 100644
index 0000000..eb66013
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-transient.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-wip.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-wip.el
new file mode 100644
index 0000000..5053cff
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-wip.el
@@ -0,0 +1,389 @@
+;;; magit-wip.el --- Commit snapshots to work-in-progress refs  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library defines global modes which automatically commit
+;; snapshots to branch-specific work-in-progress refs before and after
+;; making changes, and two commands which can be used to do so on
+;; demand.
+
+;;; Code:
+
+(require 'magit-core)
+(require 'magit-log)
+
+;;; Options
+
+(defgroup magit-wip nil
+  "Automatically commit to work-in-progress refs."
+  :link '(info-link "(magit)Wip Modes")
+  :group 'magit-modes
+  :group 'magit-essentials)
+
+(defcustom magit-wip-mode-lighter " Wip"
+  "Lighter for Magit-Wip mode."
+  :package-version '(magit . "2.90.0")
+  :group 'magit-wip
+  :type 'string)
+
+(defcustom magit-wip-merge-branch nil
+  "Whether to merge the current branch into its wip ref.
+
+If nil and the current branch has new commits, then the wip ref
+is reset to the tip of the branch before creating a new wip
+commit.  With this setting wip commits are eventually garbage
+collected.  This is currently the default.
+
+If non-nil and the current branch has new commits, then it is
+merged into the wip ref before creating a new wip commit.  This
+makes it easier to inspect wip history and the wip commits are
+never garbage collected.
+
+When this and `magit-run-hooks-from-githooks' are both enabled,
+and the other conditions mention in the docstring of that option
+are also met, then the wip merge commit is created right after
+the user creates a regular commit.  Otherwise the wip merge
+commit is created right before the next regular commit."
+  :package-version '(magit . "2.90.0")
+  :group 'magit-wip
+  :type 'boolean)
+
+(defcustom magit-wip-namespace "refs/wip/"
+  "Namespace used for work-in-progress refs.
+The wip refs are named \"<namespace/>index/<branchref>\"
+and \"<namespace/>wtree/<branchref>\".  When snapshots
+are created while the `HEAD' is detached then \"HEAD\"
+is used as `branch-ref'."
+  :package-version '(magit . "2.1.0")
+  :group 'magit-wip
+  :type 'string)
+
+(defcustom magit-wip-debug nil
+  "Whether to record commands used to update wip refs.
+If non-nil, log the used commands and their output in the process
+buffer."
+  :package-version '(magit . "4.5.0")
+  :group 'magit-wip
+  :type 'boolean)
+
+;;; Mode
+
+(defvar magit--wip-inhibit-autosave nil)
+
+;;;###autoload
+(define-minor-mode magit-wip-mode
+  "Automatically save uncommitted changes to work-in-progress refs."
+  :package-version '(magit . "2.90.0")
+  :lighter magit-wip-mode-lighter
+  :global t
+  (cond
+    (magit-wip-mode
+     (add-hook 'after-save-hook #'magit-wip-commit-buffer-file)
+     (add-hook 'magit-after-apply-functions #'magit-wip-commit)
+     (add-hook 'magit-before-change-functions #'magit-wip-commit)
+     (add-hook 'before-save-hook #'magit-wip-commit-initial-backup)
+     (add-hook 'magit-common-git-post-commit-functions
+               #'magit-wip-post-commit))
+    (t
+     (remove-hook 'after-save-hook #'magit-wip-commit-buffer-file)
+     (remove-hook 'magit-after-apply-functions #'magit-wip-commit)
+     (remove-hook 'magit-before-change-functions #'magit-wip-commit)
+     (remove-hook 'before-save-hook #'magit-wip-commit-initial-backup)
+     (remove-hook 'magit-common-git-post-commit-functions
+                  #'magit-wip-post-commit))))
+
+(defun magit-wip-commit-buffer-file (&optional msg)
+  "Commit visited file to a worktree work-in-progress ref."
+  (interactive (list "save %s snapshot"))
+  (when (magit-wip--commitable-p)
+    (magit-wip-commit-worktree
+     (magit-wip-get-ref)
+     (list buffer-file-name)
+     (format (or msg "autosave %s after save")
+             (magit-file-relative-name buffer-file-name)))))
+
+(defun magit-run-after-apply-functions (files task)
+  (run-hook-with-args 'magit-after-apply-functions
+                      (ensure-list files)
+                      (format " after %s" task)))
+
+(defun magit-run-before-change-functions (files task)
+  (run-hook-with-args 'magit-before-change-functions
+                      (ensure-list files)
+                      (format " before %s" task)))
+
+(defvar-local magit-wip-buffer-backed-up nil)
+(put 'magit-wip-buffer-backed-up 'permanent-local t)
+
+(defun magit-wip-commit-initial-backup ()
+  (when (magit-wip--commitable-p)
+    (let ((magit-save-repository-buffers nil))
+      (magit-wip-commit-buffer-file "autosave %s before save"))
+    (setq magit-wip-buffer-backed-up t)))
+
+(defun magit-wip-post-commit (&rest _)
+  (magit-wip-commit))
+
+;;; Core
+
+(defun magit-wip-commit (&optional files msg)
+  "Commit all tracked files to the work-in-progress refs.
+
+Interactively, commit all changes to all tracked files using
+a generic commit message.  With a prefix-argument the commit
+message is read in the minibuffer.
+
+Non-interactively, only commit changes to FILES using MSG as
+commit message."
+  (interactive (list nil (if current-prefix-arg
+                             (magit-read-string "Wip commit message")
+                           "wip-save tracked files")))
+  (when-let ((ref (magit-wip-get-ref)))
+    (magit-wip-commit-index ref files msg)
+    (magit-wip-commit-worktree ref files msg)))
+
+(defun magit-wip-commit-index (ref files msg)
+  (let* ((wipref (magit--wip-index-ref ref))
+         (parent (magit-wip-get-parent ref wipref))
+         (tree   (magit-git-string "write-tree")))
+    (magit-wip-update-wipref ref wipref tree parent files msg "index")))
+
+(defun magit-wip-commit-worktree (ref files msg)
+  (when (or (not files)
+            ;; "git update-index" either ignores (before Git v2.32.0) or
+            ;; fails, when passed directories.  This is relevant for the
+            ;; untracked files code paths.
+            (setq files (seq-remove #'file-directory-p files)))
+    (let* ((wipref (magit--wip-wtree-ref ref))
+           (parent (magit-wip-get-parent ref wipref))
+           (tree (condition-case nil
+                     (magit-with-temp-index parent (list "--reset" "-i")
+                       (if files
+                           ;; Use "git update-index" instead of "git add"
+                           ;; because the latter fails if a file is already
+                           ;; deleted in the temporary index.
+                           (magit-wip--git "update-index" "--add" "--remove"
+                                           "--ignore-skip-worktree-entries"
+                                           "--" files)
+                         (magit-with-toplevel
+                           (magit-wip--git "add" "-u" ".")))
+                       (magit-git-string "write-tree"))
+                   (error
+                    (message "Index locked; no worktree wip commit created")))))
+      (when tree
+        (magit-wip-update-wipref ref wipref tree parent
+                                 files msg "worktree")))))
+
+(defun magit-wip--git (&rest args)
+  (if magit-wip-debug
+      (let ((default-process-coding-system (magit--process-coding-system)))
+        (apply #'magit-call-process
+               (magit-git-executable)
+               (magit-process-git-arguments args)))
+    (apply #'magit-process-file
+           (magit-git-executable) nil nil nil
+           (magit-process-git-arguments args))))
+
+(defun magit-wip-update-wipref (ref wipref tree parent files msg start-msg)
+  (cond
+    ((and (not (equal parent wipref))
+          (or (not magit-wip-merge-branch)
+              (not (magit-rev-verify wipref))))
+     (setq start-msg (concat "start autosaving " start-msg))
+     (magit-wip--update-ref wipref start-msg
+                            (magit-git-string "commit-tree" "--no-gpg-sign"
+                                              "-p" parent "-m" start-msg
+                                              (concat parent "^{tree}")))
+     (setq parent wipref))
+    ((and magit-wip-merge-branch
+          (or (not (magit-rev-ancestor-p ref wipref))
+              (not (magit-rev-ancestor-p
+                    (concat (magit-git-string "log" "--format=%H"
+                                              "-1" "--merges" wipref)
+                            "^2")
+                    ref))))
+     (setq start-msg (format "merge %s into %s" ref start-msg))
+     (magit-wip--update-ref wipref start-msg
+                            (magit-git-string "commit-tree" "--no-gpg-sign"
+                                              "-p" wipref "-p" ref
+                                              "-m" start-msg
+                                              (concat ref "^{tree}")))
+     (setq parent wipref)))
+  (when (magit-git-failure "diff-tree" "--quiet" parent tree "--" files)
+    (unless (and msg (not (= (aref msg 0) ?\s)))
+      (let ((len (length files)))
+        (setq msg (concat
+                   (cond ((= len 0) "autosave tracked files")
+                         ((> len 1) (format "autosave %s files" len))
+                         ((concat "autosave "
+                                  (file-relative-name (car files)
+                                                      (magit-toplevel)))))
+                   msg))))
+    (magit-wip--update-ref wipref msg
+                           (magit-git-string "commit-tree" "--no-gpg-sign"
+                                             "-p" parent "-m" msg tree))))
+
+(defun magit-wip--update-ref (ref message rev)
+  (let ((magit--refresh-cache nil))
+    (unless (zerop (magit-wip--git "update-ref" "--create-reflog"
+                                   "-m" message ref rev))
+      (error "Cannot update %s with %s" ref rev))))
+
+(defun magit-wip-get-ref ()
+  (let ((ref (or (magit-git-string "symbolic-ref" "HEAD") "HEAD")))
+    (and (magit-rev-verify ref)
+         ref)))
+
+(defun magit-wip-get-parent (ref wipref)
+  (if (and (magit-rev-verify wipref)
+           (equal (magit-merge-base wipref ref)
+                  (magit-rev-verify ref)))
+      wipref
+    ref))
+
+(defun magit--wip-index-ref (&optional ref)
+  (magit--wip-ref "index/" ref))
+
+(defun magit--wip-wtree-ref (&optional ref)
+  (magit--wip-ref "wtree/" ref))
+
+(defun magit--wip-ref (namespace &optional ref)
+  (concat magit-wip-namespace namespace
+          (or (and ref (string-prefix-p "refs/" ref) ref)
+              (and-let ((_(not (equal ref "HEAD")))
+                        (branch (or ref (magit-get-current-branch))))
+                (concat "refs/heads/" branch))
+              "HEAD")))
+
+(defun magit-wip--commitable-p ()
+  (and (not magit--wip-inhibit-autosave)
+       buffer-file-name
+       (magit-inside-worktree-p t)
+       (magit-file-tracked-p buffer-file-name)
+       (magit-wip-get-ref)))
+
+;;; Log
+
+(defun magit-wip-log-index (args files)
+  "Show log for the index wip ref of the current branch."
+  (interactive (magit-log-arguments))
+  (magit-log-setup-buffer (list (magit--wip-index-ref)) args files))
+
+(defun magit-wip-log-worktree (args files)
+  "Show log for the worktree wip ref of the current branch."
+  (interactive (magit-log-arguments))
+  (magit-log-setup-buffer (list (magit--wip-wtree-ref)) args files))
+
+(defun magit-wip-log-current (branch args files count)
+  "Show log for the current branch and its wip refs.
+With a negative prefix argument only show the worktree wip ref.
+The absolute numeric value of the prefix argument controls how
+many \"branches\" of each wip ref are shown."
+  (interactive
+    (nconc (list (or (magit-get-current-branch) "HEAD"))
+           (magit-log-arguments)
+           (list (prefix-numeric-value current-prefix-arg))))
+  (magit-wip-log branch args files count))
+
+(defun magit-wip-log (branch args files count)
+  "Show log for a branch and its wip refs.
+With a negative prefix argument only show the worktree wip ref.
+The absolute numeric value of the prefix argument controls how
+many \"branches\" of each wip ref are shown."
+  (interactive
+    (nconc (list (magit-completing-read
+                  "Log branch and its wip refs"
+                  (nconc (magit-list-local-branch-names)
+                         (list "HEAD"))
+                  nil t nil 'magit-revision-history
+                  (or (magit-branch-at-point)
+                      (magit-get-current-branch)
+                      "HEAD")))
+           (magit-log-arguments)
+           (list (prefix-numeric-value current-prefix-arg))))
+  (magit-log-setup-buffer (nconc (list branch)
+                                 (magit-wip-log-get-tips
+                                  (magit--wip-wtree-ref branch)
+                                  (abs count))
+                                 (and (>= count 0)
+                                      (magit-wip-log-get-tips
+                                       (magit--wip-index-ref branch)
+                                       (abs count))))
+                          args files))
+
+(defun magit-wip-log-get-tips (wipref count)
+  (and-let ((reflog (magit-git-lines "reflog" wipref)))
+    (let (tips)
+      (while (and reflog (> count 1))
+        ;; "start autosaving ..." is the current message, but it used
+        ;; to be "restart autosaving ...", and those messages may
+        ;; still be around (e.g., if gc.reflogExpire is set to "never").
+        (setq reflog (cl-member "^[^ ]+ [^:]+: \\(?:re\\)?start autosaving"
+                                reflog :test #'string-match-p))
+        (when (and (cadr reflog)
+                   (string-match "^[^ ]+ \\([^:]+\\)" (cadr reflog)))
+          (push (match-str 1 (cadr reflog)) tips))
+        (setq reflog (cddr reflog))
+        (decf count))
+      (cons wipref (nreverse tips)))))
+
+(defun magit-wip-purge ()
+  "Ask to delete all wip-refs that no longer have a corresponding ref."
+  (interactive)
+  (cond-let
+    ([wiprefs (thread-last
+                (cl-set-difference (magit-list-refs "refs/wip/")
+                                   (magit-list-refs)
+                                   :test (##equal (substring %1 15) %2))
+                (delete "refs/wip/index/HEAD")
+                (delete "refs/wip/wtree/HEAD"))]
+     (magit-confirm 'purge-dangling-wiprefs
+       "Delete wip-ref %s without corresponding ref"
+       "Delete %d wip-refs without corresponding ref"
+       nil wiprefs)
+     (message "Deleting wip-refs...")
+     (dolist (wipref wiprefs)
+       (magit-call-git "update-ref" "-d" wipref))
+     (message "Deleting wip-refs...done")
+     (magit-refresh))
+    ((message "All wip-refs have a corresponding ref"))))
+
+;;; _
+(provide 'magit-wip)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-wip.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-wip.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-wip.elc
new file mode 100644
index 0000000..571c30b
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-wip.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-worktree.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-worktree.el
new file mode 100644
index 0000000..3a76871
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-worktree.el
@@ -0,0 +1,333 @@
+;;; magit-worktree.el --- Worktree support  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful, but WITHOUT
+;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+;; or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+;; License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library implements support for `git-worktree'.
+
+;;; Code:
+
+(require 'magit)
+
+;;; Options
+
+(defcustom magit-read-worktree-directory-function
+  #'magit-read-worktree-directory-sibling
+  "Function used to read the directory to be used as a new worktree.
+This is called with two arguments, the prompt and the commit to be
+checked out."
+  :package-version '(magit . "4.4.0")
+  :group 'magit-commands
+  :type `(radio (function-item ,#'magit-read-worktree-directory)
+                (function-item ,#'magit-read-worktree-directory-nested)
+                (function-item ,#'magit-read-worktree-directory-sibling)
+                (function-item ,#'magit-read-worktree-directory-offsite)
+                function))
+
+(defcustom magit-read-worktree-offsite-directory
+  (expand-file-name "wtrees/" (or (getenv "XDG_DATA_HOME") "~/.local/share"))
+  "Base directory used by `magit-read-worktree-directory-offsite'.
+That function is suitable as `magit-read-worktree-directory-function',
+but is not used by default."
+  :package-version '(magit . "4.4.0")
+  :group 'magit-commands
+  :type 'directory)
+
+(defvar magit-worktree-read-directory-name-function nil
+  "Like `magit-read-worktree-directory-function' but takes only one argument.")
+(make-obsolete-variable 'magit-worktree-read-directory-name-function
+                        'magit-read-worktree-directory-function
+                        "Magit 4.4.0")
+
+;;; Functions
+
+(defun magit-read-worktree-directory (prompt _commit)
+  "Call `read-directory-name' with PROMPT, but ignoring _COMMIT."
+  (read-directory-name prompt))
+
+(defun magit-read-worktree-directory-nested (prompt commit)
+  "Call `read-directory-name' in current worktree.
+For `read-directory-name's INITIAL argument use a string based on
+COMMIT, replacing slashes with dashes.  If COMMIT is nil, use nil
+as INITIAL.  Always forward PROMPT as-is."
+  (read-directory-name prompt nil nil nil
+                       (and commit (string-replace "/" "-" commit))))
+
+(defun magit-read-worktree-directory-sibling (prompt commit)
+  "Call `read-directory-name' in parent directory of current worktree.
+For `read-directory-name's INITIAL argument use a string based on the
+name of the current worktree and BRANCH.  Use \"PREFIX_BRANCH\" where
+PREFIX is the name of the current worktree, up to the first underscore,
+and slashes in COMMIT are replaced with dashes.  If COMMIT is nil use
+just \"PREFIX_\".  Always forward PROMPT as-is."
+  (let* ((path (directory-file-name default-directory))
+         (name (file-name-nondirectory path)))
+    (read-directory-name
+     prompt (file-name-directory path) nil nil
+     (concat (if (string-match "_" name)
+                 (substring name 0 (match-beginning 0))
+               name)
+             "_"
+             (and commit (string-replace "/" "-" commit))))))
+
+(defun magit-read-worktree-directory-offsite (prompt commit)
+  "Call `read-directory-name' in a directory shared by all repositories.
+
+Option `magit-read-worktree-offsite-directory' specifies that shared
+base directory.
+
+For `read-directory-name's INITIAL argument use a string based on the
+name of the current worktree and BRANCH.  Use \"PREFIX_BRANCH\" where
+PREFIX is the name of the current worktree, up to the first underscore,
+and slashes in COMMIT are replaced with dashes.  If COMMIT is nil use
+just \"PREFIX_\".  Always forward PROMPT as-is."
+  (mkdir magit-read-worktree-offsite-directory t)
+  (read-directory-name
+   prompt magit-read-worktree-offsite-directory nil nil
+   (let* ((name (file-name-nondirectory (directory-file-name default-directory)))
+          (name (if (string-match "_" name)
+                    (substring name 0 (match-beginning 0))
+                  name))
+          (name (concat name "_")))
+     (if commit
+         (concat name (string-replace "/" "-" commit))
+       (file-name-nondirectory
+        (make-temp-name
+         (expand-file-name name magit-read-worktree-offsite-directory)))))))
+
+(defun magit--read-worktree-directory (rev)
+  (let ((default-directory (magit-toplevel))
+        (prompt (format "Checkout %s in new worktree: " rev)))
+    (if magit-worktree-read-directory-name-function
+        (funcall magit-worktree-read-directory-name-function prompt)
+      (funcall magit-read-worktree-directory-function
+               prompt rev))))
+
+;;; Commands
+
+;;;###autoload(autoload 'magit-worktree "magit-worktree" nil t)
+(transient-define-prefix magit-worktree ()
+  "Act on a worktree."
+  :man-page "git-worktree"
+  [["Create new"
+    ("b" "worktree"              magit-worktree-checkout)
+    ("c" "branch and worktree"   magit-worktree-branch)]
+   ["Commands"
+    ("m" "Move worktree"         magit-worktree-move)
+    ("k" "Delete worktree"       magit-worktree-delete)
+    ("g" "Visit worktree"        magit-worktree-status)]])
+
+;;;###autoload
+(defun magit-worktree-checkout (directory commit)
+  "Checkout COMMIT in a new worktree in DIRECTORY.
+COMMIT may, but does not have to be, a local branch.
+Interactively, use `magit-read-worktree-directory-function'."
+  (interactive
+    (let ((commit (magit-read-branch-or-commit
+                   "In new worktree; checkout" nil
+                   (mapcar #'caddr (magit-list-worktrees)))))
+      (list (magit--read-worktree-directory commit)
+            commit)))
+  (when (zerop (magit-run-git "worktree" "add"
+                              (magit--expand-worktree directory) commit))
+    (magit-diff-visit-directory directory)))
+
+;;;###autoload
+(defun magit-worktree-branch (directory branch start-point)
+  "Create a new BRANCH and check it out in a new worktree at DIRECTORY.
+Interactively, use `magit-read-worktree-directory-function'."
+  (interactive
+    (pcase-let
+        ((`(,branch ,start-point)
+          (magit-branch-read-args "In new worktree; checkout new branch")))
+      (list (magit--read-worktree-directory branch)
+            branch start-point)))
+  (when (zerop (magit-run-git "worktree" "add" "-b" branch
+                              (magit--expand-worktree directory) start-point))
+    (magit-diff-visit-directory directory)))
+
+;;;###autoload
+(defun magit-worktree-move (worktree directory)
+  "Move existing WORKTREE directory to DIRECTORY."
+  (interactive
+    (list (magit-completing-read "Move worktree"
+                                 (cdr (magit-list-worktrees))
+                                 nil t nil nil
+                                 (magit-section-value-if 'worktree))
+          (read-directory-name "Move worktree to: ")))
+  (if (file-directory-p (expand-file-name ".git" worktree))
+      (user-error "You may not move the main working tree")
+    (let ((preexisting-directory (file-directory-p directory)))
+      (when (and (zerop (magit-call-git "worktree" "move" worktree
+                                        (magit--expand-worktree directory)))
+                 (not (file-exists-p default-directory))
+                 (derived-mode-p 'magit-status-mode))
+        (kill-buffer)
+        (magit-diff-visit-directory
+         (if preexisting-directory
+             (file-name-concat directory (file-name-nondirectory worktree))
+           directory)))
+      (magit-refresh))))
+
+(defun magit-worktree-delete (worktree)
+  "Delete a worktree, defaulting to the worktree at point.
+The primary worktree cannot be deleted."
+  (interactive
+    (list (magit-completing-read "Delete worktree"
+                                 (mapcar #'car (cdr (magit-list-worktrees)))
+                                 nil t nil nil
+                                 (magit-section-value-if 'worktree))))
+  (if (file-directory-p (expand-file-name ".git" worktree))
+      (user-error "Deleting %s would delete the shared .git directory" worktree)
+    (let* ((wtrees (magit-list-worktrees))
+           (wtree (assoc worktree wtrees))
+           (locked (nth 5 wtree))
+           (primary (file-name-as-directory (caar wtrees))))
+      (when locked
+        (user-error "Cannot delete locked %s%s" worktree
+                    (if (stringp locked) (format " [reason: %s]" locked) "")))
+      (when (file-exists-p worktree)
+        (let (uncommitted)
+          (magit-confirm
+            (cond ((let ((default-directory worktree))
+                     (or (magit-anything-modified-p)
+                         (magit-untracked-files)))
+                   (setq uncommitted 'danger))
+                  (magit-delete-by-moving-to-trash 'trash)
+                  ('delete))
+            (format "%s worktree \"%s\"%s"
+                    (if magit-delete-by-moving-to-trash "Trash" "Delete")
+                    (file-name-nondirectory (directory-file-name worktree))
+                    (if uncommitted " despite uncommitted changes" ""))
+            nil nil (list worktree)))
+        (if magit-delete-by-moving-to-trash
+            (let ((delete-by-moving-to-trash t))
+              (delete-directory worktree t t))
+          (magit-call-git "worktree" "remove" "--force" worktree)))
+      (if (file-exists-p default-directory)
+          (magit-run-git "worktree" "prune")
+        (let ((default-directory primary))
+          (magit-run-git "worktree" "prune"))
+        (when (derived-mode-p 'magit-status-mode)
+          (kill-buffer)
+          (magit-status-setup-buffer primary))))))
+
+(defun magit-worktree-status (worktree)
+  "Show the status for the worktree at point.
+If there is no worktree at point, then read one in the
+minibuffer.  If the worktree at point is the one whose
+status is already being displayed in the current buffer,
+then show it in Dired instead."
+  (interactive
+    (list (or (magit-section-value-if 'worktree)
+              (magit-completing-read
+               "Show status for worktree"
+               (cl-delete (directory-file-name (magit-toplevel))
+                          (magit-list-worktrees)
+                          :test #'equal :key #'car)
+               nil t))))
+  (magit-diff-visit-directory worktree))
+
+(defun magit--expand-worktree (directory)
+  (magit-convert-filename-for-git (expand-file-name directory)))
+
+;;; Sections
+
+(defvar-keymap magit-worktree-section-map
+  :doc "Keymap for `worktree' sections."
+  "<remap> <magit-delete-thing>" #'magit-worktree-delete
+  "<remap> <magit-visit-thing>"  #'magit-worktree-status
+  "<4>" (magit-menu-item "Worktree commands..." #'magit-worktree)
+  "<3>" '(menu-item "--")
+  "<2>" (magit-menu-item "Delete %m" #'magit-worktree-delete)
+  "<1>" (magit-menu-item "Visit %s" #'magit-worktree-status))
+
+(defun magit-insert-worktrees ()
+  "Insert sections for all worktrees.
+If there is only one worktree, then insert nothing."
+  (let ((worktrees (magit-list-worktrees)))
+    (when (length> worktrees 1)
+      (magit-insert-section (worktrees)
+        (magit-insert-heading t "Worktrees")
+        (let* ((cols
+                (mapcar
+                 (lambda (config)
+                   (pcase-let ((`(,directory ,commit ,branch ,bare) config))
+                     (cons (cond
+                             (branch
+                              (propertize
+                               branch 'font-lock-face
+                               (if (equal branch (magit-get-current-branch))
+                                   'magit-branch-current
+                                 'magit-branch-local)))
+                             (commit
+                              (propertize
+                               (magit-rev-abbrev commit) 'font-lock-face
+                               (if (file-equal-p default-directory directory)
+                                   '(magit-hash magit-branch-current)
+                                 'magit-hash)))
+                             (bare "(bare)"))
+                           config)))
+                 worktrees))
+               (align (1+ (apply #'max (mapcar (##string-width (car %)) cols)))))
+          (pcase-dolist (`(,head . ,config) cols)
+            (magit--insert-worktree
+             config
+             (concat head (make-string (- align (length head)) ?\s)))))
+        (insert ?\n)))))
+
+(defun magit--insert-worktree (config head)
+  "Insert worktree section for CONFIG.
+See `magit-list-worktrees' for the format of CONFIG.  HEAD is
+a prettified reference or revision representing the worktree,
+with padding for alignment."
+  ;; #4926 Before changing the signature, inform @vermiculus.
+  (let ((path (car config)))
+    (magit-insert-section (worktree path)
+      (insert head)
+      (insert (let ((relative (file-relative-name path))
+                    (absolute (abbreviate-file-name path)))
+                (if (or (> (string-width relative) (string-width absolute))
+                        (equal relative "./"))
+                    absolute
+                  relative)))
+      (insert ?\n))))
+
+;;; _
+(provide 'magit-worktree)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-worktree.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit-worktree.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-worktree.elc
new file mode 100644
index 0000000..6f9da4c
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit-worktree.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit.el b/emacs/.emacs.d/elpa/magit-20260822.1158/magit.el
new file mode 100644
index 0000000..6803197
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit.el
@@ -0,0 +1,819 @@
+;;; magit.el --- A Git porcelain inside Emacs  -*- lexical-binding:t; coding:utf-8 -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Marius Vollmer <marius.vollmer@gmail.com>
+;;     Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;;     Kyle Meyer <kyle@kyleam.com>
+;; Former-Maintainers:
+;;     Nicolas Dudebout <nicolas.dudebout@gatech.edu>
+;;     Noam Postavsky <npostavs@users.sourceforge.net>
+;;     Peter J. Weisberg <pj@irregularexpressions.net>
+;;     Phil Jackson <phil@shellarchive.co.uk>
+;;     Rémi Vanicat <vanicat@debian.org>
+;;     Yann Hodique <yann.hodique@gmail.com>
+
+;; Homepage: https://github.com/magit/magit
+;; Keywords: git tools vc
+
+;; Package-Version: 20260822.1158
+;; Package-Revision: 137f137dccb3
+;; Package-Requires: (
+;;     (emacs        "28.1")
+;;     (compat       "31.0")
+;;     (cond-let      "1.1")
+;;     (llama         "1.0")
+;;     (magit-section "4.7")
+;;     (seq           "2.24")
+;;     (transient     "0.13")
+;;     (with-editor   "3.5"))
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;; You should have received a copy of the AUTHORS.md file, which
+;; lists all contributors.  If not, see https://magit.vc/authors.
+
+;;; Commentary:
+
+;; Magit is a text-based Git user interface that puts an unmatched focus
+;; on streamlining workflows.  Commands are invoked using short mnemonic
+;; key sequences that take the cursor’s position in the highly actionable
+;; interface into account to provide context-sensitive behavior.
+
+;; With Magit you can do nearly everything that you can do when using Git
+;; on the command-line, but at greater speed and while taking advantage
+;; of advanced features that previously seemed too daunting to use on a
+;; daily basis.  Many users will find that by using Magit they can become
+;; more effective Git user.
+
+;;; Code:
+
+(require 'magit-core)
+(require 'magit-diff)
+(require 'magit-log)
+(require 'magit-wip)
+(require 'magit-apply)
+(require 'magit-repos)
+(require 'git-commit)
+
+(require 'epa) ;used in magit-read-gpg-{secret,signing}-key
+(require 'format-spec)
+(require 'with-editor)
+
+;;; Options
+
+(defcustom magit-openpgp-default-signing-key nil
+  "Fingerprint of your default Openpgp key used for signing.
+If the specified primary key has signing capacity then it is used
+as the value of the \"--gpg-sign\" argument without prompting, even
+when other such keys exist.  To be able to select another key you
+must then use a prefix argument."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-commands
+  :type 'string)
+
+;;; Faces
+
+(defface magit-header-line
+  '((t :inherit magit-section-heading))
+  "Face for the `header-line' in some Magit modes.
+Note that some modes, such as `magit-log-select-mode', have their
+own faces for the `header-line', or for parts of the
+`header-line'."
+  :group 'magit-faces)
+
+(defface magit-header-line-key
+  '((t :inherit font-lock-builtin-face))
+  "Face for keys in the `header-line'."
+  :group 'magit-faces)
+
+(defface magit-dimmed
+  '((((class color) (background light)) :foreground "grey50")
+    (((class color) (background  dark)) :foreground "grey50"))
+  "Face for text that shouldn't stand out."
+  :group 'magit-faces)
+
+(defface magit-hash
+  '((((class color) (background light)) :foreground "grey60")
+    (((class color) (background  dark)) :foreground "grey40"))
+  "Face for the commit object name in the log output."
+  :group 'magit-faces)
+
+(defface magit-tag
+  '((((class color) (background light)) :foreground "Goldenrod4")
+    (((class color) (background  dark)) :foreground "LightGoldenrod2"))
+  "Face for tag labels shown in log buffer."
+  :group 'magit-faces)
+
+(defface magit-branch-remote
+  '((((class color) (background light)) :foreground "DarkOliveGreen4")
+    (((class color) (background  dark)) :foreground "DarkSeaGreen2"))
+  "Face for remote branch head labels shown in log buffer."
+  :group 'magit-faces)
+
+(defface magit-branch-remote-head
+  '((((supports (:box t))) :inherit magit-branch-remote :box t)
+    (t                     :inherit magit-branch-remote :inverse-video t))
+  "Face for current branch."
+  :group 'magit-faces)
+
+(defface magit-branch-local
+  '((((class color) (background light)) :foreground "SkyBlue4")
+    (((class color) (background  dark)) :foreground "LightSkyBlue1"))
+  "Face for local branches."
+  :group 'magit-faces)
+
+(defface magit-branch-current
+  '((((supports (:box t))) :inherit magit-branch-local :box t)
+    (t                     :inherit magit-branch-local :inverse-video t))
+  "Face for current branch."
+  :group 'magit-faces)
+
+(defface magit-branch-upstream
+  '((t :slant italic))
+  "Face for upstream branch.
+This face is only used in logs and it gets combined
+ with `magit-branch-local', `magit-branch-remote'
+and/or `magit-branch-remote-head'."
+  :group 'magit-faces)
+
+(defface magit-branch-warning
+  '((t :inherit warning))
+  "Face for warning about (missing) branch."
+  :group 'magit-faces)
+
+(defface magit-head
+  '((((class color) (background light)) :inherit magit-branch-local)
+    (((class color) (background  dark)) :inherit magit-branch-local))
+  "Face for the symbolic ref `HEAD'."
+  :group 'magit-faces)
+
+(defface magit-refname
+  '((((class color) (background light)) :foreground "grey30")
+    (((class color) (background  dark)) :foreground "grey80"))
+  "Face for refnames without a dedicated face."
+  :group 'magit-faces)
+
+(defface magit-refname-stash
+  '((t :inherit magit-refname))
+  "Face for stash refnames."
+  :group 'magit-faces)
+
+(defface magit-refname-wip
+  '((t :inherit magit-refname))
+  "Face for wip refnames."
+  :group 'magit-faces)
+
+(defface magit-refname-pullreq
+  '((t :inherit magit-refname))
+  "Face for pullreq refnames."
+  :group 'magit-faces)
+
+(defface magit-keyword
+  '((t :inherit font-lock-string-face))
+  "Face for parts of commit messages inside brackets."
+  :group 'magit-faces)
+
+(defface magit-keyword-squash
+  '((t :inherit font-lock-warning-face))
+  "Face for squash! and similar keywords in commit messages."
+  :group 'magit-faces)
+
+(defface magit-signature-good
+  '((t :foreground "green"))
+  "Face for good signatures."
+  :group 'magit-faces)
+
+(defface magit-signature-bad
+  '((t :foreground "red" :weight bold))
+  "Face for bad signatures."
+  :group 'magit-faces)
+
+(defface magit-signature-untrusted
+  '((t :foreground "medium aquamarine"))
+  "Face for good untrusted signatures."
+  :group 'magit-faces)
+
+(defface magit-signature-expired
+  '((t :foreground "orange"))
+  "Face for signatures that have expired."
+  :group 'magit-faces)
+
+(defface magit-signature-expired-key
+  '((t :inherit magit-signature-expired))
+  "Face for signatures made by an expired key."
+  :group 'magit-faces)
+
+(defface magit-signature-revoked
+  '((t :foreground "violet red"))
+  "Face for signatures made by a revoked key."
+  :group 'magit-faces)
+
+(defface magit-signature-error
+  '((t :foreground "light blue"))
+  "Face for signatures that cannot be checked (e.g., missing key)."
+  :group 'magit-faces)
+
+(defface magit-cherry-unmatched
+  '((t :foreground "cyan"))
+  "Face for unmatched cherry commits."
+  :group 'magit-faces)
+
+(defface magit-cherry-equivalent
+  '((t :foreground "magenta"))
+  "Face for equivalent cherry commits."
+  :group 'magit-faces)
+
+(defface magit-filename
+  '((t :weight normal))
+  "Face for filenames."
+  :group 'magit-faces)
+
+;;; Global Bindings
+
+;;;###autoload
+(defcustom magit-define-global-key-bindings 'default
+  "Which set of key bindings to add to the global keymap, if any.
+
+This option controls which set of Magit key bindings, if any, may
+be added to the global keymap, even before Magit is first used in
+the current Emacs session.
+
+If the value is nil, no bindings are added.
+
+If \\+`default', maybe add:
+
+    \\`C-x' \\`g'     `magit-status'
+    \\`C-x' \\`M-g'   `magit-dispatch'
+    \\`C-c' \\`M-g'   `magit-file-dispatch'
+
+If `recommended', maybe add:
+
+    \\`C-x' \\`g'     `magit-status'
+    \\`C-c' \\`g'     `magit-dispatch'
+    \\`C-c' \\`f'     `magit-file-dispatch'
+
+    These bindings are strongly recommended, but we cannot use
+    them by default, because the \\`C-c <LETTER>' namespace is
+    strictly reserved for bindings added by the user.
+
+The bindings in the chosen set may be added when
+`after-init-hook' is run.  Each binding is added if, and only
+if, at that time no other key is bound to the same command,
+and no other command is bound to the same key.  In other words
+we try to avoid adding bindings that are unnecessary, as well
+as bindings that conflict with other bindings.
+
+Adding these bindings is delayed until `after-init-hook' is
+run to allow users to set the variable anywhere in their init
+file (without having to make sure to do so before `magit' is
+loaded or autoloaded) and to increase the likelihood that all
+the potentially conflicting user bindings have already been
+added.
+
+To set this variable use either `setq' or the Custom interface.
+Do not use the function `customize-set-variable' because doing
+that would cause Magit to be loaded immediately, when that form
+is evaluated (this differs from `custom-set-variables', which
+doesn't load the libraries that define the customized variables).
+
+Setting this variable has no effect if `after-init-hook' has
+already been run."
+  :package-version '(magit . "4.0.0")
+  :group 'magit-essentials
+  :type '(choice (const :tag "Add no binding" nil)
+                 (const :tag "Use default bindings" default)
+                 (const :tag "Use recommended bindings" recommended)))
+
+;;;###autoload
+(progn
+  (defun magit-maybe-define-global-key-bindings (&optional force)
+    "See variable `magit-define-global-key-bindings'."
+    (when magit-define-global-key-bindings
+      (let ((map (current-global-map)))
+        (pcase-dolist (`(,key . ,def)
+                       (cond ((eq magit-define-global-key-bindings 'recommended)
+                              '(("C-x g"   . magit-status)
+                                ("C-c g"   . magit-dispatch)
+                                ("C-c f"   . magit-file-dispatch)))
+                             ('(("C-x g"   . magit-status)
+                                ("C-x M-g" . magit-dispatch)
+                                ("C-c M-g" . magit-file-dispatch)))))
+          ;; This is autoloaded and thus is used before `compat' is
+          ;; loaded, so we cannot use `keymap-lookup' and `keymap-set'.
+          (when (or force
+                    (not (or (lookup-key map (kbd key))
+                             (where-is-internal def (make-sparse-keymap) t))))
+            (define-key map (kbd key) def))))))
+  (if after-init-time
+      (magit-maybe-define-global-key-bindings)
+    (add-hook 'after-init-hook #'magit-maybe-define-global-key-bindings t)))
+
+;;; Dispatch Menu
+
+;;;###autoload(autoload 'magit-dispatch "magit" nil t)
+(transient-define-prefix magit-dispatch ()
+  "Invoke a Magit command from a list of available commands."
+  :info-manual "(magit)Top"
+  ["Transient and dwim commands"
+   ;; → bound in magit-mode-map or magit-section-mode-map
+   ;; ↓ bound below
+   [("A" "Apply"          magit-cherry-pick)
+    ;; a                  ↓
+    ("b" "Branch"         magit-branch)
+    ("B" "Bisect"         magit-bisect)
+    ("c" "Commit"         magit-commit)
+    ("C" "Clone"          magit-clone)
+    ("d" "Diff"           magit-diff)
+    ("D" "Diff (change)"  magit-diff-refresh)
+    ("e" "Ediff (dwim)"   magit-ediff-dwim)
+    ("E" "Ediff"          magit-ediff)
+    ("f" "Fetch"          magit-fetch)
+    ("F" "Pull"           magit-pull)
+    ;; g                  ↓
+    ;; G                → magit-refresh-all
+    ("h" "Help"           magit-info)
+    ("H" "Section info"   magit-describe-section :if-derived magit-mode)]
+   [("i" "Ignore"         magit-gitignore)
+    ("I" "Init"           magit-init)
+    ("j" "Jump to section"magit-status-jump  :if-mode     magit-status-mode)
+    ("j" "Display status" magit-status-quick :if-not-mode magit-status-mode)
+    ("J" "Display buffer" magit-display-repository-buffer)
+    ;; k                  ↓
+    ;; K                → magit-file-untrack
+    ("l" "Log"            magit-log)
+    ("L" "Log (change)"   magit-log-refresh)
+    ("m" "Merge"          magit-merge)
+    ("M" "Remote"         magit-remote)
+    ;; n                → magit-section-forward
+    ;; N       reserved → forge-dispatch
+    ("o" "Submodule"      magit-submodule)
+    ("O" "Subtree"        magit-subtree)
+    ;; p                → magit-section-backward
+    ("P" "Push"           magit-push)
+    ;; q                → magit-mode-bury-buffer
+    ("Q" "Command"        magit-git-command)]
+   [("r" "Rebase"         magit-rebase)
+    ;; R                → magit-file-rename
+    ;; s                  ↓
+    ;; S                  ↓
+    ("t" "Tag"            magit-tag)
+    ("T" "Note"           magit-notes)
+    ;; u                  ↓
+    ;; U                  ↓
+    ;; v                  ↓
+    ("V" "Revert"         magit-revert)
+    ("w" "Apply patches"  magit-am)
+    ("W" "Format patches" magit-patch)
+    ;; x                → magit-reset-quickly
+    ("X" "Reset"          magit-reset)
+    ("y" "Show Refs"      magit-show-refs)
+    ("Y" "Cherries"       magit-cherry)
+    ("z" "Stash"          magit-stash)
+    ("Z" "Worktree"       magit-worktree)
+    ("!" "Run"            magit-run)]]
+  ["Applying changes"
+   :if-derived magit-mode
+   [("a" "Apply"          magit-apply)
+    ("v" "Reverse"        magit-reverse)
+    ("k" "Discard"        magit-discard)]
+   [("s" "Stage"          magit-stage)
+    ("u" "Unstage"        magit-unstage)]
+   [("S" "Stage all"      magit-stage-modified)
+    ("U" "Unstage all"    magit-unstage-all)]]
+  ["Essential commands"
+   :if-derived magit-mode
+   [("g" "       Refresh current buffer"   magit-refresh)
+    ("q" "       Bury current buffer"      magit-mode-bury-buffer)
+    ("<tab>" "   Toggle section at point"  magit-section-toggle)
+    ("<return>" "Visit thing at point"     magit-visit-thing)]
+   [("C-x m"    "Show all key bindings"    describe-mode)
+    ("C-x i"    "Show Info manual"         magit-info)]])
+
+;;; Git Menu
+
+(defcustom magit-shell-command-verbose-prompt t
+  "Whether to show the working directory when reading a command.
+This affects `magit-git-command', `magit-git-command-topdir',
+`magit-shell-command', and `magit-shell-command-topdir'."
+  :package-version '(magit . "2.11.0")
+  :group 'magit-commands
+  :type 'boolean)
+
+(defvar magit-git-command-history nil)
+
+;;;###autoload(autoload 'magit-run "magit" nil t)
+(transient-define-prefix magit-run ()
+  "Run git or another command, or launch a graphical utility."
+  [["Run git subcommand"
+    ("!" "in repository root"   magit-git-command-topdir)
+    ("p" "in working directory" magit-git-command)]
+   ["Run shell command"
+    ("s" "in repository root"   magit-shell-command-topdir)
+    ("S" "in working directory" magit-shell-command)]
+   ["Launch"
+    ("k" "gitk"                 magit-run-gitk)
+    ("a" "gitk --all"           magit-run-gitk-all)
+    ("b" "gitk --branches"      magit-run-gitk-branches)
+    ("g" "git gui"              magit-run-git-gui)
+    ("m" "git mergetool --gui"  magit-git-mergetool)]])
+
+;;;###autoload
+(defun magit-git-command (command)
+  "Execute COMMAND asynchronously; display output.
+
+Interactively, prompt for COMMAND in the minibuffer.  \"git \" is
+used as initial input, but can be deleted to run another command.
+
+With a prefix argument COMMAND is run in the top-level directory
+of the current working tree, otherwise in `default-directory'."
+  (interactive (list (magit-read-shell-command nil "git ")))
+  (magit--shell-command command))
+
+;;;###autoload
+(defun magit-git-command-topdir (command)
+  "Execute COMMAND asynchronously; display output.
+
+Interactively, prompt for COMMAND in the minibuffer.  \"git \" is
+used as initial input, but can be deleted to run another command.
+
+COMMAND is run in the top-level directory of the current
+working tree."
+  (interactive (list (magit-read-shell-command t "git ")))
+  (magit--shell-command command (magit-toplevel)))
+
+;;;###autoload
+(defun magit-shell-command (command)
+  "Execute COMMAND asynchronously; display output.
+
+Interactively, prompt for COMMAND in the minibuffer.  With a
+prefix argument COMMAND is run in the top-level directory of
+the current working tree, otherwise in `default-directory'."
+  (interactive (list (magit-read-shell-command)))
+  (magit--shell-command command))
+
+;;;###autoload
+(defun magit-shell-command-topdir (command)
+  "Execute COMMAND asynchronously; display output.
+
+Interactively, prompt for COMMAND in the minibuffer.  COMMAND
+is run in the top-level directory of the current working tree."
+  (interactive (list (magit-read-shell-command t)))
+  (magit--shell-command command (magit-toplevel)))
+
+(defun magit--shell-command (command &optional directory)
+  (let ((default-directory (or directory default-directory)))
+    (with-environment-variables (("GIT_PAGER" "cat"))
+      (with-connection-local-variables
+        (magit-with-editor
+          (magit-start-process shell-file-name nil
+                               shell-command-switch command)))))
+  (magit-process-buffer))
+
+(defun magit-read-shell-command (&optional toplevel initial-input)
+  (let ((default-directory
+         (if (or toplevel current-prefix-arg)
+             (or (magit-toplevel)
+                 (magit--not-inside-repository-error))
+           default-directory)))
+    (read-shell-command (if magit-shell-command-verbose-prompt
+                            (format "Async shell command in %s: "
+                                    (abbreviate-file-name default-directory))
+                          "Async shell command: ")
+                        initial-input 'magit-git-command-history)))
+
+;;; Shared Infix Arguments
+
+(transient-define-argument magit:--signoff ()
+  :description "Add Signed-off-by trailer"
+  :class 'transient-switch
+  :key "+s"
+  :shortarg "-s"
+  :argument "--signoff"
+  :level 6)
+
+(transient-define-argument magit:--gpg-sign ()
+  :description (##concat "Sign using " (or (magit-get "gpg.format") "openpgp"))
+  :class 'transient-option
+  :shortarg "-S"
+  :argument "--gpg-sign="
+  :allow-empty t
+  :reader #'magit-read-gpg-signing-key
+  :level 5)
+
+(defvar magit-gpg-secret-key-hist nil)
+
+(defun magit-read-gpg-secret-key
+    (prompt &optional initial-input history predicate default)
+  (require 'epa)
+  (let* ((keys (seq-keep
+                (lambda (cert)
+                  (and (or (not predicate)
+                           (funcall predicate cert))
+                       (let* ((key (car (epg-key-sub-key-list cert)))
+                              (fpr (epg-sub-key-fingerprint key))
+                              (id  (epg-sub-key-id key))
+                              (author
+                               (and-let ((id-obj
+                                          (car (epg-key-user-id-list cert))))
+                                 (let ((id-str (epg-user-id-string id-obj)))
+                                   (if (stringp id-str)
+                                       id-str
+                                     (epg-decode-dn id-obj))))))
+                         (propertize fpr 'display
+                                     (concat (substring fpr 0 (- (length id)))
+                                             (propertize id 'face 'highlight)
+                                             " " author)))))
+                (epg-list-keys (epg-make-context epa-protocol) nil t)))
+         (choice (or (and (not current-prefix-arg)
+                          (or (and (length= keys 1) (car keys))
+                              (and default (car (member default keys)))))
+                     (completing-read prompt keys nil nil nil
+                                      history nil initial-input))))
+    (set-text-properties 0 (length choice) nil choice)
+    choice))
+
+(defun magit-read-gpg-signing-key (prompt &optional initial-input history)
+  (if (member (magit-get "gpg.format") '(nil "openpgp"))
+      (magit-read-gpg-secret-key
+       prompt initial-input history
+       (lambda (cert)
+         (seq-some (##memq 'sign (epg-sub-key-capability %))
+                   (epg-key-sub-key-list cert)))
+       magit-openpgp-default-signing-key)
+    ""))
+
+;;; Font-Lock Keywords
+
+(defconst magit-font-lock-keywords
+  (eval-when-compile
+    `((,(concat "(\\(magit-define-section-jumper\\)\\_>"
+                "[ \t'(]*"
+                "\\(\\(?:\\sw\\|\\s_\\)+\\)?")
+       (1 'font-lock-keyword-face)
+       (2 'font-lock-function-name-face nil t))
+      (,(concat "(" (regexp-opt '("magit-insert-section"
+                                  "magit-insert-heading"
+                                  "magit-section-case"
+                                  "magit-bind-match-strings"
+                                  "magit-with-temp-index"
+                                  "magit-with-blob"
+                                  "magit-with-toplevel")
+                                t)
+                "\\_>")
+       . 1))))
+
+(font-lock-add-keywords 'emacs-lisp-mode magit-font-lock-keywords)
+
+;;; Version
+
+(defvar magit-version #'undefined
+  "The version of Magit that you're using.
+Use the function by the same name instead of this variable.")
+
+;;;###autoload
+(defun magit-version (&optional print-dest interactive nowarn)
+  "Return the version of Magit currently in use.
+
+If optional argument PRINT-DEST is non-nil, also print the used
+versions of Magit, Transient, Git and Emacs to the output stream
+selected by that argument.  Interactively use the echo area, or
+with a prefix argument use the current buffer.  Additionally put
+the output in the kill ring.
+\n(fn &optional PRINT-DEST)"
+  (interactive (list (if current-prefix-arg (current-buffer) t) t))
+  (let ((magit-git-global-arguments nil)
+        (toplib (or load-file-name buffer-file-name))
+        debug)
+    (unless (and toplib
+                 (member (file-name-nondirectory toplib)
+                         '("magit.el" "magit.el.gz")))
+      (let ((load-suffixes (reverse load-suffixes))) ; prefer .el than .elc
+        (setq toplib (locate-library "magit"))))
+    (setq toplib (and toplib (magit--chase-links toplib)))
+    (push toplib debug)
+    (when toplib
+      (let* ((topdir (file-name-directory toplib))
+             (gitdir (expand-file-name
+                      ".git" (file-name-directory
+                              (directory-file-name topdir))))
+             (static (locate-library "magit-version.el" nil (list topdir)))
+             (static (and static (magit--chase-links static))))
+        (or (progn
+              (push 'repo debug)
+              (when (and (file-exists-p gitdir)
+                         ;; It is a repo, but is it the Magit repo?
+                         (file-exists-p
+                          (expand-file-name "../lisp/magit.el" gitdir)))
+                (push t debug)
+                ;; Inside the repo the version file should only exist
+                ;; while running make.
+                (when (and static (not noninteractive))
+                  (ignore-errors (delete-file static)))
+                (setq magit-version
+                      (let ((default-directory topdir))
+                        (magit-git-string "describe"
+                                          "--tags" "--dirty" "--always")))))
+            (progn
+              (push 'static debug)
+              (when (and static (file-exists-p static))
+                (push t debug)
+                (load-file static)
+                magit-version))
+            (when (and (featurep 'package)
+                       (boundp 'package-alist)
+                       (fboundp 'package-version-join))
+              (push 'elpa debug)
+              (ignore-errors
+                (when-let ((version (cadr (assq 'magit package-alist))))
+                  (push t debug)
+                  (setq magit-version
+                        (and (fboundp 'package-desc-version)
+                             (package-version-join
+                              (package-desc-version version)))))))
+            (progn
+              (push 'dirname debug)
+              (let ((dirname (file-name-nondirectory
+                              (directory-file-name topdir))))
+                (when (string-match "\\`magit-\\([0-9].*\\)" dirname)
+                  (setq magit-version (match-str 1 dirname)))))
+            ;; If all else fails, just report the commit hash. It's
+            ;; better than nothing and we cannot do better in the case
+            ;; of e.g., a shallow clone.
+            (progn
+              (push 'hash debug)
+              ;; Same check as above to see if it's really the Magit repo.
+              (when (and (file-exists-p gitdir)
+                         (file-exists-p
+                          (expand-file-name "../lisp/magit.el" gitdir)))
+                (setq magit-version
+                      (let ((default-directory topdir))
+                        (magit-git-string "rev-parse" "HEAD"))))))))
+    (if (stringp magit-version)
+        (when print-dest
+          (let* ((alt (or (and (ignore-errors
+                                 (magit--version>= magit-version "2008"))
+                               (ignore-errors
+                                 (require 'lisp-mnt)
+                                 (and (fboundp 'lm-header)
+                                      (with-temp-buffer
+                                        (insert-file-contents
+                                         (locate-library "magit.el" t))
+                                        (lm-header "Package-Version")))))))
+                 (str (format
+                       "Magit %s%s, Transient %s,%s Git %s, Emacs %s, %s"
+                       (or magit-version "(unknown)")
+                       (if (and alt (not (equal alt magit-version)))
+                           (format " [>= %s]" alt)
+                         "")
+                       (or (ignore-errors
+                             (require 'lisp-mnt)
+                             (and (fboundp 'lm-header)
+                                  (with-temp-buffer
+                                    (insert-file-contents
+                                     (locate-library "transient.el" t))
+                                    (lm-header "Package-Version"))))
+                           "(unknown)")
+                       (let ((lib (locate-library "forge.el" t)))
+                         (or (and lib
+                                  (format
+                                   " Forge %s,"
+                                   (or (ignore-errors
+                                         (require 'lisp-mnt)
+                                         (with-temp-buffer
+                                           (insert-file-contents lib)
+                                           (and (fboundp 'lm-header)
+                                                (lm-header "Package-Version"))))
+                                       "(unknown)")))
+                             ""))
+                       (magit--safe-git-version)
+                       emacs-version
+                       system-type)))
+            (when interactive
+              (kill-new str))
+            (princ str print-dest)))
+      (setq debug (reverse debug))
+      (setq magit-version 'error)
+      (when magit-version
+        (push magit-version debug))
+      (unless (or nowarn (equal (getenv "CI") "true"))
+        (message "Cannot determine Magit's version %S" debug)))
+    magit-version))
+
+;;; Startup Asserts
+
+(defun magit-startup-asserts ()
+  (when-let ((val (getenv "GIT_DIR")))
+    (setenv "GIT_DIR")
+    (message
+     "Magit unset $GIT_DIR (was %S).  See %s" val
+     ;; Note: Pass URL as argument rather than embedding in the format
+     ;; string to prevent the single quote from being rendered
+     ;; according to `text-quoting-style'.
+     "https://github.com/magit/magit/wiki/Don't-set-$GIT_DIR-and-alike"))
+  (when-let ((val (getenv "GIT_WORK_TREE")))
+    (setenv "GIT_WORK_TREE")
+    (message
+     "Magit unset $GIT_WORK_TREE (was %S).  See %s" val
+     ;; See comment above.
+     "https://github.com/magit/magit/wiki/Don't-set-$GIT_DIR-and-alike"))
+  ;; Git isn't required while building Magit.
+  (unless (bound-and-true-p byte-compile-current-file)
+    (magit-git-version-assert))
+  (when (version< emacs-version magit--minimal-emacs)
+    (display-warning 'magit (format "\
+Magit requires Emacs >= %s, you are using %s.
+
+If this comes as a surprise to you, because you do actually have
+a newer version installed, then that probably means that the
+older version happens to appear earlier on the `$PATH'.  If you
+always start Emacs from a shell, then that can be fixed in the
+shell's init file.  If you start Emacs by clicking on an icon,
+or using some sort of application launcher, then you probably
+have to adjust the environment as seen by graphical interface.
+For X11 something like ~/.xinitrc should work.\n"
+                                    magit--minimal-emacs emacs-version)
+                     :error)))
+
+;;; Loading Libraries
+
+(provide 'magit)
+
+(cl-eval-when (load eval)
+  (require 'magit-status)
+  (require 'magit-refs)
+  (require 'magit-files)
+  (require 'magit-reset)
+  (require 'magit-branch)
+  (require 'magit-merge)
+  (require 'magit-tag)
+  (require 'magit-worktree)
+  (require 'magit-notes)
+  (require 'magit-sequence)
+  (require 'magit-commit)
+  (require 'magit-remote)
+  (require 'magit-clone)
+  (require 'magit-fetch)
+  (require 'magit-pull)
+  (require 'magit-push)
+  (require 'magit-bisect)
+  (require 'magit-stash)
+  (require 'magit-blame)
+  (require 'magit-submodule)
+  (unless (or noninteractive
+              ;; The `provide' form may be missing, so we have to
+              ;; try harder to ensure this is loaded exactly once.
+              (featurep 'magit-autoloads)
+              (autoloadp (symbol-function 'magit-patch))
+              (load "magit-autoloads" t t))
+    (require 'magit-patch)
+    (require 'magit-subtree)
+    (require 'magit-ediff)
+    (require 'magit-gitignore)
+    (require 'magit-sparse-checkout)
+    (require 'magit-extras)
+    (require 'magit-dired)
+    (require 'git-rebase)
+    (require 'magit-bookmark)))
+
+(with-eval-after-load 'bookmark
+  (require 'magit-bookmark))
+
+(unless (bound-and-true-p byte-compile-current-file)
+  (if after-init-time
+      (progn (magit-startup-asserts)
+             (magit-version nil nil t))
+    (add-hook 'after-init-hook #'magit-startup-asserts t)
+    (add-hook 'after-init-hook #'magit-version t)))
+
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit.elc b/emacs/.emacs.d/elpa/magit-20260822.1158/magit.elc
new file mode 100644
index 0000000..61c133d
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-20260822.1158/magit.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-20260822.1158/magit.info b/emacs/.emacs.d/elpa/magit-20260822.1158/magit.info
new file mode 100644
index 0000000..cabd5fd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-20260822.1158/magit.info
@@ -0,0 +1,11339 @@
+This is magit.info, produced by makeinfo version 7.1.1 from magit.texi.
+
+     Copyright (C) 2015-2026 Jonas Bernoulli
+     <emacs.magit@jonas.bernoulli.dev>
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Magit: (magit).       Using Git from Emacs with Magit.
+END-INFO-DIR-ENTRY
+
+
+File: magit.info,  Node: Top,  Next: Introduction,  Up: (dir)
+
+Magit User Manual
+*****************
+
+Magit is an interface to the version control system Git, implemented as
+an Emacs package.  Magit aspires to be a complete Git porcelain.  While
+we cannot (yet) claim that Magit wraps and improves upon each and every
+Git command, it is complete enough to allow even experienced Git users
+to perform almost all of their daily version control tasks directly from
+within Emacs.  While many fine Git clients exist, only Magit and Git
+itself deserve to be called porcelains.
+
+This manual is for Magit version 4.7.0.
+
+     Copyright (C) 2015-2026 Jonas Bernoulli
+     <emacs.magit@jonas.bernoulli.dev>
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+* Menu:
+
+* Introduction::
+* Installation::
+* Getting Started::
+* Interface Concepts::
+* Inspecting::
+* Manipulating::
+* Transferring::
+* Miscellaneous::
+* Customizing::
+* Plumbing::
+* FAQ::
+* Debugging Tools::
+* Keystroke Index::
+* Function and Command Index::
+* Variable Index::
+
+-- The Detailed Node Listing --
+
+Installation
+
+* Installing from Melpa::
+* Installing from the Git Repository::
+* Post-Installation Tasks::
+
+Interface Concepts
+
+* Modes and Buffers::
+* Sections::
+* Transient Commands::
+* Transient Arguments and Buffer Variables::
+* Completion, Confirmation and the Selection: Completion Confirmation and the Selection.
+* Mouse Support::
+* Running Git::
+
+Inspecting
+
+* Status Buffer::
+* Repository List::
+* Logging::
+* Diffing::
+* Ediffing::
+* References Buffer::
+* Bisecting::
+* Visiting Files and Blobs::
+* Blaming::
+
+Manipulating
+
+* Creating Repository::
+* Cloning Repository::
+* Staging and Unstaging::
+* Applying::
+* Committing::
+* Branching::
+* Merging::
+* Resolving Conflicts::
+* Rebasing::
+* Cherry Picking::
+* Resetting::
+* Stashing::
+
+Transferring
+
+* Remotes::
+* Fetching::
+* Pulling::
+* Pushing::
+* Plain Patches::
+* Maildir Patches::
+
+Miscellaneous
+
+* Tagging::
+* Notes::
+* Submodules::
+* Subtree::
+* Worktree::
+* Sparse checkouts::
+* Bundle::
+* Common Commands::
+* Wip Modes::
+* Commands for Buffers Visiting Files::
+* Minor Mode for Buffers Visiting Blobs::
+
+Customizing
+
+* Per-Repository Configuration::
+* Essential Settings::
+
+Plumbing
+
+* Calling Git::
+* Section Plumbing::
+* Refreshing Buffers::
+* Conventions::
+
+FAQ
+
+* FAQ - How to ...?::
+* FAQ - Issues and Errors::
+
+
+
+File: magit.info,  Node: Introduction,  Next: Installation,  Prev: Top,  Up: Top
+
+1 Introduction
+**************
+
+Magit is an interface to the version control system Git, implemented as
+an Emacs package.  Magit aspires to be a complete Git porcelain.  While
+we cannot (yet) claim that Magit wraps and improves upon each and every
+Git command, it is complete enough to allow even experienced Git users
+to perform almost all of their daily version control tasks directly from
+within Emacs.  While many fine Git clients exist, only Magit and Git
+itself deserve to be called porcelains.
+
+   Staging and otherwise applying changes is one of the most important
+features in a Git porcelain and here Magit outshines anything else,
+including Git itself.  Git's own staging interface (‘git add --patch’)
+is so cumbersome that many users only use it in exceptional cases.  In
+Magit staging a hunk or even just part of a hunk is as trivial as
+staging all changes made to a file.
+
+   The most visible part of Magit's interface is the status buffer,
+which displays information about the current repository.  Its content is
+created by running several Git commands and making their output
+actionable.  Among other things, it displays information about the
+current branch, lists unpulled and unpushed changes and contains
+sections displaying the staged and unstaged changes.  That might sound
+noisy, but, since sections are collapsible, it's not.
+
+   To stage or unstage a change one places the cursor on the change and
+then types ‘s’ or ‘u’.  The change can be a file or a hunk, or when the
+region is active (i.e., when there is a selection) several files or
+hunks, or even just part of a hunk.  The change or changes that these
+commands - and many others - would act on are highlighted.
+
+   Magit also implements several other "apply variants" in addition to
+staging and unstaging.  One can discard or reverse a change, or apply it
+to the working tree.  Git's own porcelain only supports this for staging
+and unstaging and you would have to do something like ‘git diff ... |
+??? | git apply ...’ to discard, revert, or apply a single hunk on the
+command line.  In fact that's exactly what Magit does internally (which
+is what lead to the term "apply variants").
+
+   Magit isn't just for Git experts, but it does assume some prior
+experience with Git as well as Emacs.  That being said, many users have
+reported that using Magit was what finally taught them what Git is
+capable of and how to use it to its fullest.  Other users wished they
+had switched to Emacs sooner so that they would have gotten their hands
+on Magit earlier.
+
+   While one has to know the basic features of Emacs to be able to make
+full use of Magit, acquiring just enough Emacs skills doesn't take long
+and is worth it, even for users who prefer other editors.  Vim users are
+advised to give Evil (https://github.com/emacs-evil/evil), the
+"Extensible VI Layer for Emacs", and Spacemacs
+(https://github.com/syl20bnr/spacemacs), an "Emacs starter-kit focused
+on Evil" a try.
+
+   Magit provides a consistent and efficient Git porcelain.  After a
+short learning period, you will be able to perform most of your daily
+version control tasks faster than you would on the command line.  You
+will likely also start using features that seemed too daunting in the
+past.
+
+   Magit fully embraces Git.  It exposes many advanced features using a
+simple but flexible interface instead of only wrapping the trivial ones
+like many GUI clients do.  Of course Magit supports logging, cloning,
+pushing, and other commands that usually don't fail in spectacular ways;
+but it also supports tasks that often cannot be completed in a single
+step.  Magit fully supports tasks such as merging, rebasing,
+cherry-picking, reverting, and blaming by not only providing a command
+to initiate these tasks but also by displaying context sensitive
+information along the way and providing commands that are useful for
+resolving conflicts and resuming the sequence after doing so.
+
+   Magit wraps and in many cases improves upon at least the following
+Git porcelain commands: ‘add’, ‘am’, ‘bisect’, ‘blame’, ‘branch’,
+‘checkout’, ‘cherry’, ‘cherry-pick’, ‘clean’, ‘clone’, ‘commit’,
+‘config’, ‘describe’, ‘diff’, ‘fetch’, ‘format-patch’, ‘init’, ‘log’,
+‘merge’, ‘merge-tree’, ‘mv’, ‘notes’, ‘pull’, ‘rebase’, ‘reflog’,
+‘remote’, ‘request-pull’, ‘reset’, ‘revert’, ‘rm’, ‘show’, ‘stash’,
+‘submodule’, ‘subtree’, ‘tag’, and ‘worktree.’ Many more Magit porcelain
+commands are implemented on top of Git plumbing commands.
+
+
+File: magit.info,  Node: Installation,  Next: Getting Started,  Prev: Introduction,  Up: Top
+
+2 Installation
+**************
+
+Magit can be installed using Emacs' package manager or manually from its
+development repository.
+
+* Menu:
+
+* Installing from Melpa::
+* Installing from the Git Repository::
+* Post-Installation Tasks::
+
+
+File: magit.info,  Node: Installing from Melpa,  Next: Installing from the Git Repository,  Up: Installation
+
+2.1 Installing from Melpa
+=========================
+
+Magit is available from Melpa and Melpa-Stable.  If you haven't used
+Emacs' package manager before, then it is high time you familiarize
+yourself with it by reading the documentation in the Emacs manual, see
+*note (emacs)Packages::.  Then add one of the archives to
+‘package-archives’:
+
+   • To use Melpa:
+
+     (require 'package)
+     (add-to-list 'package-archives
+                  '("melpa" . "https://melpa.org/packages/") t)
+
+   • To use Melpa-Stable:
+
+     (require 'package)
+     (add-to-list 'package-archives
+                  '("melpa-stable" . "https://stable.melpa.org/packages/") t)
+
+   Once you have added your preferred archive, you need to update the
+local package list using:
+
+     M-x package-refresh-contents RET
+
+   Once you have done that, you can install Magit and its dependencies
+using:
+
+     M-x package-install RET magit RET
+
+   Now see *note Post-Installation Tasks::.
+
+
+File: magit.info,  Node: Installing from the Git Repository,  Next: Post-Installation Tasks,  Prev: Installing from Melpa,  Up: Installation
+
+2.2 Installing from the Git Repository
+======================================
+
+Magit depends on the ‘compat’, ‘cond-let’, ‘llama’, ‘seq’ (the built-in
+version is enough when using Emacs >= 29.1), ‘transient’ and
+‘with-editor’ libraries which are available from Melpa and Melpa-Stable.
+Install them using ‘M-x package-install RET <package> RET’.  Of course
+you may also install them manually from their repository.
+
+   Then clone the Magit repository:
+
+     $ git clone https://github.com/magit/magit.git ~/.emacs.d/site-lisp/magit
+     $ cd ~/.emacs.d/site-lisp/magit
+
+   Then compile the libraries and generate the info manuals:
+
+     $ make
+
+   If you haven't installed ‘compat’, ‘cond-let’, ‘llama’, ‘seq’ (only
+for Emacs 28), ‘transient’ and ‘with-editor’ from Melpa, or at
+‘/path/to/magit/../<package>’, then you have to tell ‘make’ where to
+find them.  To do so create the file ‘/path/to/magit/config.mk’ with the
+following content before running ‘make’:
+
+     LOAD_PATH  = -L ~/.emacs.d/site-lisp/magit/lisp
+     LOAD_PATH += -L ~/.emacs.d/site-lisp/compat
+     LOAD_PATH += -L ~/.emacs.d/site-lisp/cond-let
+     LOAD_PATH += -L ~/.emacs.d/site-lisp/llama
+     LOAD_PATH += -L ~/.emacs.d/site-lisp/seq
+     LOAD_PATH += -L ~/.emacs.d/site-lisp/transient/lisp
+     LOAD_PATH += -L ~/.emacs.d/site-lisp/with-editor/lisp
+
+   Finally add this to your init file:
+
+     (add-to-list 'load-path "~/.emacs.d/site-lisp/magit/lisp")
+     (require 'magit)
+
+     (with-eval-after-load 'info
+       (info-initialize)
+       (add-to-list 'Info-directory-list "~/.emacs.d/site-lisp/magit/docs/"))
+
+   Of course if you installed the dependencies manually as well, then
+you have to tell Emacs about them too, by prefixing the above with:
+
+     (add-to-list 'load-path "~/.emacs.d/site-lisp/compat")
+     (add-to-list 'load-path "~/.emacs.d/site-lisp/cond-let")
+     (add-to-list 'load-path "~/.emacs.d/site-lisp/llama")
+     (add-to-list 'load-path "~/.emacs.d/site-lisp/seq")
+     (add-to-list 'load-path "~/.emacs.d/site-lisp/transient/lisp")
+     (add-to-list 'load-path "~/.emacs.d/site-lisp/with-editor")
+
+   Note that you have to add the ‘lisp’ subdirectory to the ‘load-path’,
+not the top-level of the repository, and that elements of ‘load-path’
+should not end with a slash, while those of ‘Info-directory-list’
+should.
+
+   Instead of requiring the feature ‘magit’, you could load just the
+autoload definitions, by loading the file ‘magit-autoloads.el’.
+
+     (load "/path/to/magit/lisp/magit-autoloads")
+
+   Instead of running Magit directly from the repository by adding that
+to the ‘load-path’, you might want to instead install it in some other
+directory using ‘sudo make install’ and setting ‘load-path’ accordingly.
+
+   To update Magit use:
+
+     $ git pull
+     $ make
+
+   At times it might be necessary to run ‘make clean all’ instead.
+
+   To view all available targets use ‘make help’.
+
+   Now see *note Post-Installation Tasks::.
+
+
+File: magit.info,  Node: Post-Installation Tasks,  Prev: Installing from the Git Repository,  Up: Installation
+
+2.3 Post-Installation Tasks
+===========================
+
+After installing Magit you should verify that you are indeed using the
+Magit, Git, and Emacs releases you think you are using.  It's best to
+restart Emacs before doing so, to make sure you are not using an
+outdated value for ‘load-path’.
+
+     M-x magit-version RET
+
+   should display something like
+
+     Magit 2.8.0, Git 2.10.2, Emacs 25.1.1, gnu/linux
+
+   Then you might also want to read about options that many users likely
+want to customize.  See *note Essential Settings::.
+
+   To be able to follow cross references to Git manpages found in this
+manual, you might also have to manually install the ‘gitman’ info
+manual, or advice ‘Info-follow-nearest-node’ to instead open the actual
+manpage.  See *note How to install the gitman info manual?::.
+
+   If you are completely new to Magit then see *note Getting Started::.
+
+   If you run into problems, then please see the *note FAQ::.  Also see
+the *note Debugging Tools::.
+
+   And last but not least please consider making a donation, to ensure
+that I can keep working on Magit.  See <https://magit.vc/donate>.  for
+various donation options.
+
+
+File: magit.info,  Node: Getting Started,  Next: Interface Concepts,  Prev: Installation,  Up: Top
+
+3 Getting Started
+*****************
+
+This short tutorial describes the most essential features that many
+Magitians use on a daily basis.  It only scratches the surface but
+should be enough to get you started.
+
+   IMPORTANT: It is safest if you clone some repository just for this
+tutorial.  Alternatively you can use an existing local repository, but
+if you do that, then you should commit all uncommitted changes before
+proceeding.
+
+   Type ‘C-x g’ to display information about the current Git repository
+in a dedicated buffer, called the status buffer.
+
+   Most Magit commands are commonly invoked from the status buffer.  It
+can be considered the primary interface for interacting with Git using
+Magit.  Many other Magit buffers may exist at a given time, but they are
+often created from this buffer.
+
+   Depending on what state your repository is in, this buffer may
+contain sections titled "Staged changes", "Unstaged changes", "Unmerged
+into origin/master", "Unpushed to origin/master", and many others.
+
+   Since we are starting from a safe state, which you can easily return
+to (by doing a ‘git reset --hard PRE-MAGIT-STATE’), there currently are
+no staged or unstaged changes.  Edit some files and save the changes.
+Then go back to the status buffer, while at the same time refreshing it,
+by typing ‘C-x g’.  (When the status buffer, or any Magit buffer for
+that matter, is the current buffer, then you can also use just ‘g’ to
+refresh it).
+
+   Move between sections using ‘p’ and ‘n’.  Note that the bodies of
+some sections are hidden.  Type ‘TAB’ to expand or collapse the section
+at point.  You can also use ‘C-tab’ to cycle the visibility of the
+current section and its children.  Move to a file section inside the
+section named "Unstaged changes" and type ‘s’ to stage the changes you
+have made to that file.  That file now appears under "Staged changes".
+
+   Magit can stage and unstage individual hunks, not just complete
+files.  Move to the file you have just staged, expand it using ‘TAB’,
+move to one of the hunks using ‘n’, and unstage just that by typing ‘u’.
+Note how the staging (‘s’) and unstaging (‘u’) commands operate on the
+change at point.  Many other commands behave the same way.
+
+   You can also un-/stage just part of a hunk.  Inside the body of a
+hunk section (move there using ‘C-n’), set the mark using ‘C-SPC’ and
+move down until some added and/or removed lines fall inside the region
+but not all of them.  Again type ‘s’ to stage.
+
+   It is also possible to un-/stage multiple files at once.  Move to a
+file section, type ‘C-SPC’, move to the next file using ‘n’, and then
+‘s’ to stage both files.  Note that both the mark and point have to be
+on the headings of sibling sections for this to work.  If the region
+looks like it does in other buffers, then it doesn't select Magit
+sections that can be acted on as a unit.
+
+   And then of course you want to commit your changes.  Type ‘c’.  This
+shows the available commit commands and arguments in a buffer at the
+bottom of the frame.  Each command and argument is prefixed with the key
+that invokes/sets it.  Do not worry about this for now.  We want to
+create a "normal" commit, which is done by typing ‘c’ again.
+
+   Now two new buffers appear.  One is for writing the commit message,
+the other shows a diff with the changes that you are about to commit.
+Write a message and then type ‘C-c C-c’ to actually create the commit.
+
+   You probably don't want to push the commit you just created because
+you just committed some random changes, but if that is not the case you
+could push it by typing ‘P’ to show all the available push commands and
+arguments and then ‘p’ to push to a branch with the same name as the
+local branch onto the remote configured as the push-remote.  (If the
+push-remote is not configured yet, then you would first be prompted for
+the remote to push to.)
+
+   So far we have mentioned the commit and push menu commands.  These
+are probably among the menus you will be using the most, but many others
+exist.  To show a menu that lists all other menus (as well as the
+various apply commands and some other essential commands), type ‘h’.
+Try a few.  (Such menus are also called "transient prefix commands" or
+just "transients".)
+
+   The key bindings in that menu correspond to the bindings in Magit
+buffers, including but not limited to the status buffer.  So you could
+type ‘h d’ to bring up the diff menu, but once you remember that "d"
+stands for "diff", you would usually do so by just typing ‘d’.
+
+   This "prefix of prefixes" is useful even once you have memorized all
+the bindings, as it can provide easy access to Magit commands from
+non-Magit buffers.  So, by default, it is globally bound to ‘C-x M-g’.
+
+   A similar menu featuring (for the most part) commands that act on
+just the file being visited in the current buffer, is globally bound to
+‘C-c M-g’.  That binding can also be used in buffers, which do not visit
+a file, but then only a subset of the commands is available.
+
+   The global key bindings mentioned in the previous two paragraphs are
+quite inconvenient.  We recommend using ‘C-c g’ and ‘C-c f’ instead, but
+cannot use those key sequences by default because they are strictly
+reserved for bindings added by the user.  See *note Global Bindings::,
+if you want to explicitly opt-in to the recommended key bindings.
+
+   Magit also provides context menus and other mouse commands, see *note
+Mouse Support::.
+
+   It is not necessary that you do so now, but if you stick with Magit,
+then it is highly recommended that you read the next section too.
+
+
+File: magit.info,  Node: Interface Concepts,  Next: Inspecting,  Prev: Getting Started,  Up: Top
+
+4 Interface Concepts
+********************
+
+* Menu:
+
+* Modes and Buffers::
+* Sections::
+* Transient Commands::
+* Transient Arguments and Buffer Variables::
+* Completion, Confirmation and the Selection: Completion Confirmation and the Selection.
+* Mouse Support::
+* Running Git::
+
+
+File: magit.info,  Node: Modes and Buffers,  Next: Sections,  Up: Interface Concepts
+
+4.1 Modes and Buffers
+=====================
+
+Magit provides several major-modes.  For each of these modes there
+usually exists only one buffer per repository.  Separate modes and thus
+buffers exist for commits, diffs, logs, and some other things.
+
+   Besides these special purpose buffers, there also exists an overview
+buffer, called the *status buffer*.  It's usually from this buffer that
+the user invokes Git commands, or creates or visits other buffers.
+
+   In this manual we often speak about "Magit buffers".  By that we mean
+buffers whose major-modes derive from ‘magit-mode’.
+
+‘M-x magit-toggle-buffer-lock’
+     This command locks the current buffer to its value or if the buffer
+     is already locked, then it unlocks it.
+
+     Locking a buffer to its value prevents it from being reused to
+     display another value.  The name of a locked buffer contains its
+     value, which allows telling it apart from other locked buffers and
+     the unlocked buffer.
+
+     Not all Magit buffers can be locked to their values; for example,
+     it wouldn't make sense to lock a status buffer.
+
+     There can only be a single unlocked buffer using a certain
+     major-mode per repository.  So when a buffer is being unlocked and
+     another unlocked buffer already exists for that mode and
+     repository, then the former buffer is instead deleted and the
+     latter is displayed in its place.
+
+4.1.1 Switching Buffers
+-----------------------
+
+ -- Function: magit-display-buffer buffer &optional display-function
+     This function is a wrapper around ‘display-buffer’ and is used to
+     display any Magit buffer.  It displays BUFFER in some window and,
+     unlike ‘display-buffer’, also selects that window, provided
+     ‘magit-display-buffer-noselect’ is ‘nil’.  It also runs the hooks
+     mentioned below.
+
+     If optional DISPLAY-FUNCTION is non-‘nil’, then that is used to
+     display the buffer.  Usually that is ‘nil’ and the function
+     specified by ‘magit-display-buffer-function’ is used.
+
+ -- Variable: magit-display-buffer-noselect
+     When this is non-‘nil’, then ‘magit-display-buffer’ only displays
+     the buffer but forgoes also selecting the window.  This variable
+     should not be set globally, it is only intended to be let-bound, by
+     code that automatically updates "the other window".  This is used
+     for example when the revision buffer is updated when you move
+     inside the log buffer.
+
+ -- User Option: magit-display-buffer-function
+     The function specified here is called by ‘magit-display-buffer’
+     with one argument, a buffer, to actually display that buffer.  This
+     function should call ‘display-buffer’ with that buffer as first and
+     a list of display actions as second argument.
+
+     Magit provides several functions, listed below, that are suitable
+     values for this option.  If you want to use different rules, then a
+     good way of doing that is to start with a copy of one of these
+     functions and then adjust it to your needs.
+
+     Instead of using a wrapper around ‘display-buffer’, that function
+     itself can be used here, in which case the display actions have to
+     be specified by adding them to ‘display-buffer-alist’ instead.
+
+     To learn about display actions, see *note (elisp)Choosing Window::.
+
+ -- Function: magit-display-buffer-traditional buffer
+     This function is the current default value of the option
+     ‘magit-display-buffer-function’.  Before that option and this
+     function were added, the behavior was hard-coded in many places all
+     over the code base but now all the rules are contained in this one
+     function (except for the "noselect" special case mentioned above).
+
+ -- Function: magit-display-buffer-same-window-except-diff-v1
+     This function displays most buffers in the currently selected
+     window.  If a buffer's mode derives from ‘magit-diff-mode’ or
+     ‘magit-process-mode’, it is displayed in another window.
+
+ -- Function: magit-display-buffer-fullframe-status-v1
+     This function fills the entire frame when displaying a status
+     buffer.  Otherwise, it behaves like
+     ‘magit-display-buffer-traditional’.
+
+ -- Function: magit-display-buffer-fullframe-status-topleft-v1
+     This function fills the entire frame when displaying a status
+     buffer.  It behaves like ‘magit-display-buffer-fullframe-status-v1’
+     except that it displays buffers that derive from ‘magit-diff-mode’
+     or ‘magit-process-mode’ to the top or left of the current buffer
+     rather than to the bottom or right.  As a result, Magit buffers
+     tend to pop up on the same side as they would if
+     ‘magit-display-buffer-traditional’ were in use.
+
+ -- Function: magit-display-buffer-fullcolumn-most-v1
+     This function displays most buffers so that they fill the entire
+     height of the frame.  However, the buffer is displayed in another
+     window if (1) the buffer's mode derives from ‘magit-process-mode’,
+     or (2) the buffer's mode derives from ‘magit-diff-mode’, provided
+     that the mode of the current buffer derives from ‘magit-log-mode’
+     or ‘magit-cherry-mode’.
+
+ -- User Option: magit-pre-display-buffer-hook
+     This hook is run by ‘magit-display-buffer’ before displaying the
+     buffer.
+
+ -- Function: magit-save-window-configuration
+     This function saves the current window configuration.  Later when
+     the buffer is buried, it may be restored by
+     ‘magit-restore-window-configuration’.
+
+ -- User Option: magit-post-display-buffer-hook
+     This hook is run by ‘magit-display-buffer’ after displaying the
+     buffer.
+
+ -- Function: magit-maybe-set-dedicated
+     This function remembers if a new window had to be created to
+     display the buffer, or whether an existing window was reused.  This
+     information is later used by ‘magit-mode-quit-window’, to determine
+     whether the window should be deleted when its last Magit buffer is
+     buried.
+
+4.1.2 Naming Buffers
+--------------------
+
+ -- User Option: magit-generate-buffer-name-function
+     The function used to generate the names of Magit buffers.
+
+     Such a function should take the options
+     ‘magit-uniquify-buffer-names’ as well as ‘magit-buffer-name-format’
+     into account.  If it doesn't, then should be clearly stated in the
+     doc-string.  And if it supports %-sequences beyond those mentioned
+     in the doc-string of the option ‘magit-buffer-name-format’, then
+     its own doc-string should describe the additions.
+
+ -- Function: magit-generate-buffer-name-default-function mode
+     This function returns a buffer name suitable for a buffer whose
+     major-mode is MODE and which shows information about the repository
+     in which ‘default-directory’ is located.
+
+     This function uses ‘magit-buffer-name-format’ and supporting all of
+     the %-sequences mentioned the documentation of that option.  It
+     also respects the option ‘magit-uniquify-buffer-names’.
+
+ -- User Option: magit-buffer-name-format
+     The format string used to name Magit buffers.
+
+     At least the following %-sequences are supported:
+
+        • ‘%m’
+
+          The name of the major-mode, but with the ‘-mode’ suffix
+          removed.
+
+        • ‘%M’
+
+          Like ‘%m’ but abbreviate ‘magit-status-mode’ as ‘magit’.
+
+        • ‘%v’
+
+          The value the buffer is locked to, in parentheses, or an empty
+          string if the buffer is not locked to a value.
+
+        • ‘%V’
+
+          Like ‘%v’, but the string is prefixed with a space, unless it
+          is an empty string.
+
+        • ‘%t’
+
+          The top-level directory of the working tree of the repository,
+          or if ‘magit-uniquify-buffer-names’ is non-‘nil’ an
+          abbreviation of that.
+
+        • ‘%x’
+
+          If ‘magit-uniquify-buffer-names’ is ‘nil’ "*", otherwise the
+          empty string.  Due to limitations of the ‘uniquify’ package,
+          buffer names must end with the path.
+
+     The value should always contain ‘%m’ or ‘%M’, ‘%v’ or ‘%V’, and
+     ‘%t’.  If ‘magit-uniquify-buffer-names’ is non-‘nil’, then the
+     value must end with ‘%t’ or ‘%t%x’.  See issue #2841.
+
+ -- User Option: magit-uniquify-buffer-names
+     This option controls whether the names of Magit buffers are
+     uniquified.  If the names are not being uniquified, then they
+     contain the full path of the top-level of the working tree of the
+     corresponding repository.  If they are being uniquified, then they
+     end with the basename of the top-level, or if that would conflict
+     with the name used for other buffers, then the names of all these
+     buffers are adjusted until they no longer conflict.
+
+     This is done using the ‘uniquify’ package; customize its options to
+     control how buffer names are uniquified.
+
+4.1.3 Quitting Windows
+----------------------
+
+‘q’ (‘magit-mode-bury-buffer’)
+     This command buries or kills the current Magit buffer.  The
+     function specified by option ‘magit-bury-buffer-function’ is used
+     to bury the buffer when called without a prefix argument or to kill
+     it when called with a single prefix argument.
+
+     When called with two or more prefix arguments then it always kills
+     all Magit buffers, associated with the current project, including
+     the current buffer.
+
+ -- User Option: magit-bury-buffer-function
+     The function used to actually bury or kill the current buffer.
+
+     ‘magit-mode-bury-buffer’ calls this function with one argument.  If
+     the argument is non-‘nil’, then the function has to kill the
+     current buffer.  Otherwise it has to bury it alive.  The default
+     value currently is ‘magit-mode-quit-window’.
+
+ -- Function: magit-restore-window-configuration kill-buffer
+     Bury or kill the current buffer using ‘quit-window’, which is
+     called with KILL-BUFFER as first and the selected window as second
+     argument.
+
+     Then restore the window configuration that existed right before the
+     current buffer was displayed in the selected frame.  Unfortunately
+     that also means that point gets adjusted in all the buffers, which
+     are being displayed in the selected frame.
+
+ -- Function: magit-mode-quit-window kill-buffer
+     Bury or kill the current buffer using ‘quit-window’, which is
+     called with KILL-BUFFER as first and the selected window as second
+     argument.
+
+     Then, if the window was originally created to display a Magit
+     buffer and the buried buffer was the last remaining Magit buffer
+     that was ever displayed in the window, then that is deleted.
+
+4.1.4 Automatic Refreshing of Magit Buffers
+-------------------------------------------
+
+After running a command which may change the state of the current
+repository, the current Magit buffer and the corresponding status buffer
+are refreshed.  The status buffer can be automatically refreshed
+whenever a buffer is saved to a file inside the respective repository by
+adding a hook, like so:
+
+     (with-eval-after-load 'magit-mode
+       (add-hook 'after-save-hook 'magit-after-save-refresh-status t))
+
+   Automatically refreshing Magit buffers ensures that the displayed
+information is up-to-date most of the time but can lead to a noticeable
+delay in big repositories.  Other Magit buffers are not refreshed to
+keep the delay to a minimum and also because doing so can sometimes be
+undesirable.
+
+   Buffers can also be refreshed explicitly, which is useful in buffers
+that weren't current during the last refresh and after changes were made
+to the repository outside of Magit.
+
+‘g’ (‘magit-refresh’)
+     This command refreshes the current buffer if its major mode derives
+     from ‘magit-mode’ as well as the corresponding status buffer.
+
+     If the option ‘magit-revert-buffers’ calls for it, then it also
+     reverts all unmodified buffers that visit files being tracked in
+     the current repository.
+
+‘G’ (‘magit-refresh-all’)
+     This command refreshes all Magit buffers belonging to the current
+     repository and also reverts all unmodified buffers that visit files
+     being tracked in the current repository.
+
+     The file-visiting buffers are always reverted, even if
+     ‘magit-revert-buffers’ is ‘nil’.
+
+ -- User Option: magit-refresh-buffer-hook
+     This hook is run in each Magit buffer that was refreshed during the
+     current refresh - normally the current buffer and the status
+     buffer.
+
+ -- User Option: magit-refresh-status-buffer
+     When this option is non-‘nil’, then the status buffer is
+     automatically refreshed after running git for side-effects, in
+     addition to the current Magit buffer, which is always refreshed
+     automatically.
+
+     Only set this to ‘nil’ after exhausting all other options to
+     improve performance.
+
+ -- Function: magit-after-save-refresh-status
+     This function is intended to be added to ‘after-save-hook’.  After
+     doing that the corresponding status buffer is refreshed whenever a
+     buffer is saved to a file inside a repository.
+
+     Note that refreshing a Magit buffer is done by re-creating its
+     contents from scratch, which can be slow in large repositories.  If
+     you are not satisfied with Magit's performance, then you should
+     obviously not add this function to that hook.
+
+4.1.5 Automatic Saving of File-Visiting Buffers
+-----------------------------------------------
+
+File-visiting buffers are by default saved at certain points in time.
+This doesn't guarantee that Magit buffers are always up-to-date, but,
+provided one only edits files by editing them in Emacs and uses only
+Magit to interact with Git, one can be fairly confident.  When in doubt
+or after outside changes, type ‘g’ (‘magit-refresh’) to save and refresh
+explicitly.
+
+ -- User Option: magit-save-repository-buffers
+     This option controls whether file-visiting buffers are saved before
+     certain events.
+
+     If this is non-‘nil’ then all modified file-visiting buffers
+     belonging to the current repository may be saved before running
+     commands, before creating new Magit buffers, and before explicitly
+     refreshing such buffers.  If this is ‘dontask’ then this is done
+     without user intervention.  If it is ‘t’ then the user has to
+     confirm each save.
+
+4.1.6 Automatic Reverting of File-Visiting Buffers
+--------------------------------------------------
+
+By default Magit automatically reverts buffers that are visiting files
+that are being tracked in a Git repository, after they have changed on
+disk.  When using Magit one often changes files on disk by running Git,
+i.e., "outside Emacs", making this a rather important feature.
+
+   For example, if you discard a change in the status buffer, then that
+is done by running ‘git apply --reverse ...’, and Emacs considers the
+file to have "changed on disk".  If Magit did not automatically revert
+the buffer, then you would have to type ‘M-x revert-buffer RET RET’ in
+the visiting buffer before you could continue making changes.
+
+ -- User Option: magit-auto-revert-mode
+     When this mode is enabled, then buffers that visit tracked files
+     are automatically reverted after the visited files change on disk.
+
+ -- User Option: global-auto-revert-mode
+     When this mode is enabled, then any file-visiting buffer is
+     automatically reverted after the visited file changes on disk.
+
+     If you like buffers that visit tracked files to be automatically
+     reverted, then you might also like any buffer to be reverted, not
+     just those visiting tracked files.  If that is the case, then
+     enable this mode _instead of_ ‘magit-auto-revert-mode’.
+
+ -- User Option: magit-auto-revert-immediately
+     This option controls whether Magit reverts buffers immediately.
+
+     If this is non-‘nil’ and either ‘global-auto-revert-mode’ or
+     ‘magit-auto-revert-mode’ is enabled, then Magit immediately reverts
+     buffers by explicitly calling ‘auto-revert-buffers’ after running
+     Git for side-effects.
+
+     If ‘auto-revert-use-notify’ is non-‘nil’ (and file notifications
+     are actually supported), then ‘magit-auto-revert-immediately’ does
+     not have to be non-‘nil’, because the reverts happen immediately
+     anyway.
+
+     If ‘magit-auto-revert-immediately’ and ‘auto-revert-use-notify’ are
+     both ‘nil’, then reverts happen after ‘auto-revert-interval’
+     seconds of user inactivity.  That is not desirable.
+
+ -- User Option: auto-revert-use-notify
+     This option controls whether file notification functions should be
+     used.  Note that this variable unfortunately defaults to ‘t’ even
+     on systems on which file notifications cannot be used.
+
+ -- User Option: magit-auto-revert-tracked-only
+     This option controls whether ‘magit-auto-revert-mode’ only reverts
+     tracked files or all files that are located inside Git
+     repositories, including untracked files and files located inside
+     Git's control directory.
+
+ -- User Option: auto-revert-mode
+     The global mode ‘magit-auto-revert-mode’ works by turning on this
+     local mode in the appropriate buffers (but
+     ‘global-auto-revert-mode’ is implemented differently).  You can
+     also turn it on or off manually, which might be necessary if Magit
+     does not notice that a previously untracked file now is being
+     tracked or vice-versa.
+
+ -- User Option: auto-revert-stop-on-user-input
+     This option controls whether the arrival of user input suspends the
+     automatic reverts for ‘auto-revert-interval’ seconds.
+
+ -- User Option: auto-revert-interval
+     This option controls how many seconds Emacs waits for before
+     resuming suspended reverts.
+
+ -- User Option: auto-revert-buffer-list-filter
+     This option specifies an additional filter used by
+     ‘auto-revert-buffers’ to determine whether a buffer should be
+     reverted or not.
+
+     This option is provided by Magit, which also advises
+     ‘auto-revert-buffers’ to respect it.  Magit users who do not turn
+     on the local mode ‘auto-revert-mode’ themselves, are best served by
+     setting the value to ‘magit-auto-revert-repository-buffer-p’.
+
+     However the default is ‘nil’, so as not to disturb users who do use
+     the local mode directly.  If you experience delays when running
+     Magit commands, then you should consider using one of the
+     predicates provided by Magit - especially if you also use Tramp.
+
+     Users who do turn on ‘auto-revert-mode’ in buffers in which Magit
+     doesn't do that for them, should likely not use any filter.  Users
+     who turn on ‘global-auto-revert-mode’, do not have to worry about
+     this option, because it is disregarded if the global mode is
+     enabled.
+
+ -- User Option: auto-revert-verbose
+     This option controls whether Emacs reports when a buffer has been
+     reverted.
+
+   The options with the ‘auto-revert-’ prefix are located in the Custom
+group named ‘auto-revert’.  The other, Magit-specific, options are
+located in the ‘magit’ group.
+
+Risk of Reverting Automatically
+...............................
+
+For the vast majority of users, automatically reverting file-visiting
+buffers after they have changed on disk is harmless.
+
+   If a buffer is modified (i.e., it contains changes that haven't been
+saved yet), then Emacs will refuse to automatically revert it.  If you
+save a previously modified buffer, then that results in what is seen by
+Git as an uncommitted change.  Git will then refuse to carry out any
+commands that would cause these changes to be lost.  In other words, if
+there is anything that could be lost, then either Git or Emacs will
+refuse to discard the changes.
+
+   However, if you use file-visiting buffers as a sort of ad hoc
+"staging area", then the automatic reverts could potentially cause data
+loss.  So far I have heard from only one user who uses such a workflow.
+
+   An example: You visit some file in a buffer, edit it, and save the
+changes.  Then, outside of Emacs (or at least not using Magit or by
+saving the buffer) you change the file on disk again.  At this point the
+buffer is the only place where the intermediate version still exists.
+You have saved the changes to disk, but that has since been overwritten.
+Meanwhile Emacs considers the buffer to be unmodified (because you have
+not made any changes to it since you last saved it to the visited file)
+and therefore would not object to it being automatically reverted.  At
+this point an Auto-Revert mode would kick in.  It would check whether
+the buffer is modified and since that is not the case it would revert
+it.  The intermediate version would be lost.  (Actually you could still
+get it back using the ‘undo’ command.)
+
+   If your workflow depends on Emacs preserving the intermediate version
+in the buffer, then you have to disable all Auto-Revert modes.  But
+please consider that such a workflow would be dangerous even without
+using an Auto-Revert mode, and should therefore be avoided.  If Emacs
+crashes or if you quit Emacs by mistake, then you would also lose the
+buffer content.  There would be no autosave file still containing the
+intermediate version (because that was deleted when you saved the
+buffer) and you would not be asked whether you want to save the buffer
+(because it isn't modified).
+
+
+File: magit.info,  Node: Sections,  Next: Transient Commands,  Prev: Modes and Buffers,  Up: Interface Concepts
+
+4.2 Sections
+============
+
+Magit buffers are organized into nested sections, which can be collapsed
+and expanded, similar to how sections are handled in Org mode.  Each
+section also has a type, and some sections also have a value.  For each
+section type there can also be a local keymap, shared by all sections of
+that type.
+
+   Taking advantage of the section value and type, many commands operate
+on the current section, or when the region is active and selects
+sections of the same type, all of the selected sections.  Commands that
+only make sense for a particular section type (as opposed to just
+behaving differently depending on the type) are usually bound in section
+type keymaps.
+
+4.2.1 Section Movement
+----------------------
+
+To move within a section use the usual keys (‘C-p’, ‘C-n’, ‘C-b’, ‘C-f’
+etc), whose global bindings are not shadowed.  To move to another
+section use the following commands.
+
+   The section movement commands described here run the hook
+‘magit-section-movement-hook’.  Note that they explicitly run that hook
+and that arbitrary other movement, defined in Emacs and other packages,
+do not run that hook.  That hook, and hook functions that can be added
+to it, or are part of its default value, are described below.
+
+‘p’ (‘magit-section-backward’)
+     When not at the beginning of a section, then move to the beginning
+     of the current section.  At the beginning of a section, instead
+     move to the beginning of the previous visible section.
+
+‘n’ (‘magit-section-forward’)
+     Move to the beginning of the next visible section.
+
+‘M-p’ (‘magit-section-backward-siblings’)
+     Move to the beginning of the previous sibling section.  If there is
+     no previous sibling section, then move to the parent section
+     instead.
+
+‘M-n’ (‘magit-section-forward-siblings’)
+     Move to the beginning of the next sibling section.  If there is no
+     next sibling section, then move to the parent section instead.
+
+‘^’ (‘magit-section-up’)
+     Move to the beginning of the parent of the current section.
+
+   The above commands all call the hook ‘magit-section-movement-hook’.
+Any of the functions listed below can be used as members of this hook.
+
+   You might want to remove some of the functions that Magit adds using
+‘add-hook’.  In doing so you have to make sure you do not attempt to
+remove function that haven't even been added yet, for example:
+
+     (with-eval-after-load 'magit-diff
+       (remove-hook 'magit-section-movement-hook
+                    'magit-hunk-set-window-start))
+
+ -- Variable: magit-section-movement-hook
+     This hook is run by all of the above section movement commands,
+     after arriving at the destination.  It is *not* run by arbitrary
+     other movement commands (such as ‘next-line’), which are provided
+     by Emacs or third-party packages.
+
+ -- Function: magit-hunk-set-window-start
+     This hook function ensures that the beginning of the current
+     section is visible, provided it is a ‘hunk’ section.  Otherwise, it
+     does nothing.
+
+     Loading ‘magit-diff’ adds this function to the hook.
+
+ -- Function: magit-section-set-window-start
+     This hook function ensures that the beginning of the current
+     section is visible, regardless of the section's type.  If you add
+     this to ‘magit-section-movement-hook’, then you must remove the
+     hunk-only variant in turn.
+
+ -- Function: magit-log-maybe-show-more-commits
+     This hook function only has an effect in log buffers, and ‘point’
+     is on the "show more" section.  If that is the case, then it
+     doubles the number of commits that are being shown.
+
+     Loading ‘magit-log’ adds this function to the hook.
+
+ -- Function: magit-log-maybe-update-revision-buffer
+     When moving inside a log buffer, then this function updates the
+     revision buffer, provided it is already being displayed in another
+     window of the same frame.
+
+     Loading ‘magit-log’ adds this function to the hook.
+
+ -- Function: magit-log-maybe-update-blob-buffer
+     When moving inside a log buffer and another window of the same
+     frame displays a blob buffer, then this function instead displays
+     the blob buffer for the commit at point in that window.
+
+ -- Function: magit-status-maybe-update-revision-buffer
+     When moving inside a status buffer, then this function updates the
+     revision buffer, provided it is already being displayed in another
+     window of the same frame.
+
+ -- Function: magit-status-maybe-update-stash-buffer
+     When moving inside a status buffer, then this function updates the
+     stash buffer, provided it is already being displayed in another
+     window of the same frame.
+
+ -- Function: magit-status-maybe-update-blob-buffer
+     When moving inside a status buffer and another window of the same
+     frame displays a blob buffer, then this function instead displays
+     the blob buffer for the commit at point in that window.
+
+ -- Function: magit-stashes-maybe-update-stash-buffer
+     When moving inside a buffer listing stashes, then this function
+     updates the stash buffer, provided it is already being displayed in
+     another window of the same frame.
+
+ -- User Option: magit-update-other-window-delay
+     Delay before automatically updating the other window.
+
+     When moving around in certain buffers using Magit's own section
+     movement commands (but not other movement commands), then certain
+     other buffers, which are being displayed in another window, may
+     optionally be updated to display information about the section at
+     point.
+
+     When holding down a key to move by more than just one section, then
+     that would update that buffer for each section on the way.  To
+     prevent that, updating the revision buffer is delayed, and this
+     option controls for how long.  For optimal experience you might
+     have to adjust this delay and/or the keyboard repeat rate and delay
+     of your graphical environment or operating system.
+
+4.2.2 Section Visibility
+------------------------
+
+Magit provides many commands for changing the visibility of sections,
+but all you need to get started are the next two.
+
+‘<TAB>’ (‘magit-section-toggle’)
+     Toggle the visibility of the body of the current section.
+
+‘C-c <TAB>’ (‘magit-section-cycle’)
+‘C-<tab>’ (‘magit-section-cycle’)
+     Cycle the visibility of current section and its children.
+
+     If this command is invoked using ‘C-<tab>’ and that is globally
+     bound to ‘tab-next’, then this command pivots to behave like that
+     command, and you must instead use ‘C-c TAB’ to cycle section
+     visibility.
+
+     If you would like to keep using ‘C-<tab>’ to cycle section
+     visibility but also want to use ‘tab-bar-mode’, then you have to
+     prevent that mode from using this key and instead bind another key
+     to ‘tab-next’.  Because ‘tab-bar-mode’ does not use a mode map but
+     instead manipulates the global map, this involves advising
+     ‘tab-bar--define-keys’.
+
+‘M-<tab>’ (‘magit-section-cycle-diffs’)
+     Cycle the visibility of diff-related sections in the current
+     buffer.
+
+‘S-<tab>’ (‘magit-section-cycle-global’)
+     Cycle the visibility of all sections in the current buffer.
+
+‘1’ (‘magit-section-show-level-1’)
+‘2’ (‘magit-section-show-level-2’)
+‘3’ (‘magit-section-show-level-3’)
+‘4’ (‘magit-section-show-level-4’)
+     Show sections surrounding the current section up to level N.
+
+‘M-1’ (‘magit-section-show-level-1-all’)
+‘M-2’ (‘magit-section-show-level-2-all’)
+‘M-3’ (‘magit-section-show-level-3-all’)
+‘M-4’ (‘magit-section-show-level-4-all’)
+     Show all sections up to level N.
+
+   Some functions, which are used to implement the above commands, are
+also exposed as commands themselves.  By default no keys are bound to
+these commands, as they are generally perceived to be much less useful.
+But your mileage may vary.
+
+ -- Command: magit-section-show
+     Show the body of the current section.
+
+ -- Command: magit-section-hide
+     Hide the body of the current section.
+
+ -- Command: magit-section-show-headings
+     Recursively show headings of children of the current section.  Only
+     show the headings.  Previously shown text-only bodies are hidden.
+
+ -- Command: magit-section-show-children
+     Recursively show the bodies of children of the current section.
+     With a prefix argument show children down to the level of the
+     current section, and hide deeper children.
+
+ -- Command: magit-section-hide-children
+     Recursively hide the bodies of children of the current section.
+
+ -- Command: magit-section-toggle-children
+     Toggle visibility of bodies of children of the current section.
+
+   When a buffer is first created then some sections are shown expanded
+while others are not.  This is hard coded.  When a buffer is refreshed
+then the previous visibility is preserved.  The initial visibility of
+certain sections can also be overwritten using the hook
+‘magit-section-set-visibility-hook’.
+
+ -- User Option: magit-section-initial-visibility-alist
+     This options can be used to override the initial visibility of
+     sections.  In the future it will also be used to define the
+     defaults, but currently a section's default is still hardcoded.
+
+     The value is an alist.  Each element maps a section type or lineage
+     to the initial visibility state for such sections.  The state has
+     to be one of ‘show’ or ‘hide’, or a function that returns one of
+     these symbols.  A function is called with the section as the only
+     argument.
+
+     Use the command ‘magit-describe-section-briefly’ to determine a
+     section's lineage or type.  The vector in the output is the section
+     lineage and the type is the first element of that vector.
+     Wildcards can be used, see ‘magit-section-match’.
+
+ -- User Option: magit-section-cache-visibility
+     This option controls for which sections the previous visibility
+     state should be restored if a section disappears and later appears
+     again.  The value is a boolean or a list of section types.  If ‘t’,
+     then the visibility of all sections is cached.  Otherwise this is
+     only done for sections whose type matches one of the listed types.
+
+     This requires that the function ‘magit-section-cached-visibility’
+     is a member of ‘magit-section-set-visibility-hook’.
+
+ -- Variable: magit-section-set-visibility-hook
+     This hook is run when first creating a buffer and also when
+     refreshing an existing buffer, and is used to determine the
+     visibility of the section currently being inserted.
+
+     Each function is called with one argument, the section being
+     inserted.  It should return ‘hide’ or ‘show’, or to leave the
+     visibility undefined ‘nil’.  If no function decides on the
+     visibility and the buffer is being refreshed, then the visibility
+     is preserved; or if the buffer is being created, then the hard
+     coded default is used.
+
+     Usually this should only be used to set the initial visibility but
+     not during refreshes.  If ‘magit-insert-section--oldroot’ is
+     non-‘nil’, then the buffer is being refreshed and these functions
+     should immediately return ‘nil’.
+
+ -- User Option: magit-section-visibility-indicators
+     This option controls whether and how to indicate that a section can
+     be expanded/collapsed.
+
+     If ‘nil’, then don't show any indicators.  Otherwise the value has
+     to be a list with two elements.  The first controls the indicators
+     used in graphical frames, the second the indicators in terminal
+     frames.  For graphical frames all of the following forms are valid,
+     while terminal frames do not have fringes and thus do not support
+     the first form.
+
+        • ‘(EXPANDABLE-BITMAP . COLLAPSIBLE-BITMAP)’
+
+          Both values have to be variables whose values are fringe
+          bitmaps.  In this case every section that can be expanded or
+          collapsed gets an indicator in the left fringe.
+
+          To provide extra padding around the indicator, set
+          ‘left-fringe-width’ in ‘magit-mode-hook’, e.g.:
+
+               (add-hook 'magit-mode-hook
+                         (lambda () (setq left-fringe-width 20)))
+
+        • ‘(EXPANDABLE-CHAR . COLLAPSIBLE-CHAR)’
+
+          In this case every section that can be expanded or collapsed
+          gets an indicator in the left margin.
+
+        • ‘(STRING . BOOLEAN)’
+
+          In this case STRING (usually an ellipsis) is shown at the end
+          of the heading of every collapsed section.  Expanded sections
+          get no indicator.  The cdr controls whether the appearance of
+          these ellipsis take section highlighting into account.  Doing
+          so might potentially have an impact on performance, while not
+          doing so is kinda ugly.
+
+4.2.3 Section Hooks
+-------------------
+
+Which sections are inserted into certain buffers is controlled with
+hooks.  This includes the status and the refs buffers.  For other
+buffers, e.g., log and diff buffers, this is not possible.  The command
+‘magit-describe-section’ can be used to see which hook (if any) was
+responsible for inserting the section at point.
+
+   For buffers whose sections can be customized by the user, a hook
+variable called ‘magit-TYPE-sections-hook’ exists.  This hook should be
+changed using ‘magit-add-section-hook’.  Avoid using ‘add-hooks’ or the
+Custom interface.
+
+   The various available section hook variables are described later in
+this manual along with the appropriate "section inserter functions".
+
+ -- Function: magit-add-section-hook hook function &optional at append
+          local
+     Add the function FUNCTION to the value of section hook HOOK.
+
+     Add FUNCTION at the beginning of the hook list unless optional
+     APPEND is non-‘nil’, in which case FUNCTION is added at the end.
+     If FUNCTION already is a member then move it to the new location.
+
+     If optional AT is non-‘nil’ and a member of the hook list, then add
+     FUNCTION next to that instead.  Add before or after AT, or replace
+     AT with FUNCTION depending on APPEND.  If APPEND is the symbol
+     ‘replace’, then replace AT with FUNCTION.  For any other non-‘nil’
+     value place FUNCTION right after AT.  If ‘nil’, then place FUNCTION
+     right before AT.  If FUNCTION already is a member of the list but
+     AT is not, then leave FUNCTION where ever it already is.
+
+     If optional LOCAL is non-‘nil’, then modify the hook's buffer-local
+     value rather than its global value.  This makes the hook local by
+     copying the default value.  That copy is then modified.
+
+     HOOK should be a symbol.  If HOOK is void, it is first set to
+     ‘nil’.  HOOK's value must not be a single hook function.  FUNCTION
+     should be a function that takes no arguments and inserts one or
+     multiple sections at point, moving point forward.  FUNCTION may
+     choose not to insert its section(s), when doing so would not make
+     sense.  It should not be abused for other side-effects.
+
+   To remove a function from a section hook, use ‘remove-hook’.
+
+4.2.4 Section Types and Values
+------------------------------
+
+Each section has a type, for example ‘hunk’, ‘file’, and ‘commit’.
+Instances of certain section types also have a value.  The value of a
+section of type ‘file’, for example, is a file name.
+
+   Users usually do not have to worry about a section's type and value,
+but knowing them can be handy at times.
+
+‘H’ (‘magit-describe-section’)
+     This command shows information about the section at point in a
+     separate buffer.
+
+ -- Command: magit-describe-section-briefly
+     This command shows information about the section at point in the
+     echo area, as ‘#<magit-section VALUE [TYPE PARENT-TYPE...]
+     BEGINNING-END>’.
+
+   Many commands behave differently depending on the type of the section
+at point and/or somehow consume the value of that section.  But that is
+only one of the reasons why the same key may do something different,
+depending on what section is current.
+
+   Additionally for each section type a keymap *might* be defined, named
+‘magit-TYPE-section-map’.  That keymap is used as text property keymap
+of all text belonging to any section of the respective type.  If such a
+map does not exist for a certain type, then you can define it yourself,
+and it will automatically be used.
+
+4.2.5 Section Options
+---------------------
+
+This section describes options that have an effect on more than just a
+certain type of sections.  As you can see there are not many of those.
+
+ -- User Option: magit-section-show-child-count
+     Whether to append the number of children to section headings.  This
+     only affects sections that could benefit from this information.
+
+
+File: magit.info,  Node: Transient Commands,  Next: Transient Arguments and Buffer Variables,  Prev: Sections,  Up: Interface Concepts
+
+4.3 Transient Commands
+======================
+
+Many Magit commands are implemented as *transient* commands.  First the
+user invokes a *prefix* command, which causes its *infix* arguments and
+*suffix* commands to be displayed in the echo area.  The user then
+optionally sets some infix arguments and finally invokes one of the
+suffix commands.
+
+   This is implemented in the library ‘transient’.  Earlier Magit
+releases used the package ‘magit-popup’ and even earlier versions
+library ‘magit-key-mode’.
+
+   Transient is documented in *note (transient)Top::.
+
+‘C-x M-g’ (‘magit-dispatch’)
+‘C-c g’ (‘magit-dispatch’)
+     This transient prefix command binds most of Magit's other prefix
+     commands as suffix commands and displays them in a temporary buffer
+     until one of them is invoked.  Invoking such a sub-prefix causes
+     the suffixes of that command to be bound and displayed instead of
+     those of ‘magit-dispatch’.
+
+     This command is also, or especially, useful outside Magit buffers,
+     so Magit by default binds it to ‘C-c M-g’ in the global keymap.
+     ‘C-c g’ would be a better binding, but we cannot use that by
+     default, because that key sequence is reserved for the user.  See
+     *note Global Bindings:: to learn more default and recommended key
+     bindings.
+
+
+File: magit.info,  Node: Transient Arguments and Buffer Variables,  Next: Completion Confirmation and the Selection,  Prev: Transient Commands,  Up: Interface Concepts
+
+4.4 Transient Arguments and Buffer Variables
+============================================
+
+The infix arguments of many of Magit's transient prefix commands cease
+to have an effect once the ‘git’ command that is called with those
+arguments has returned.  Commands that create a commit are a good
+example for this.  If the user changes the arguments, then that only
+affects the next invocation of a suffix command.  If the same transient
+prefix command is later invoked again, then the arguments are initially
+reset to the default value.  This default value can be set for the
+current Emacs session or saved permanently, see *note (transient)Saving
+Values::.  It is also possible to cycle through previously used sets of
+arguments using ‘C-M-p’ and ‘C-M-n’, see *note (transient)Using
+History::.
+
+   However the infix arguments of many other transient commands continue
+to have an effect even after the ‘git’ command that was called with
+those arguments has returned.  The most important commands like this are
+those that display a diff or log in a dedicated buffer.  Their arguments
+obviously continue to have an effect for as long as the respective diff
+or log is being displayed.  Furthermore the used arguments are stored in
+buffer-local variables for future reference.
+
+   For commands in the second group it isn't always desirable to reset
+their arguments to the global value when the transient prefix command is
+invoked again.
+
+   As mentioned above, it is possible to cycle through previously used
+sets of arguments while a transient popup is visible.  That means that
+we could always reset the infix arguments to the default because the set
+of arguments that is active in the existing buffer is only a few ‘C-M-p’
+away.  Magit can be configured to behave like that, but because I expect
+that most users would not find that very convenient, it is not the
+default.
+
+   Also note that it is possible to change the diff and log arguments
+used in the current buffer (including the status buffer, which contains
+both diff and log sections) using the respective "refresh" transient
+prefix commands on ‘D’ and ‘L’.  (‘d’ and ‘l’ on the other hand are
+intended to change *what* diff or log is being displayed.  It is
+possible to also change *how* the diff or log is being displayed at the
+same time, but if you only want to do the latter, then you should use
+the refresh variants.)  Because these secondary diff and log transient
+prefixes are about *changing* the arguments used in the current buffer,
+they *always* start out with the set of arguments that are currently in
+effect in that buffer.
+
+   Some commands are usually invoked directly even though they can also
+be invoked as the suffix of a transient prefix command.  Most
+prominently ‘magit-show-commit’ is usually invoked by typing ‘RET’ while
+point is on a commit in a log, but it can also be invoked from the
+‘magit-diff’ transient prefix.
+
+   When such a command is invoked directly, then it is important to
+reuse the arguments as specified by the respective buffer-local values,
+instead of using the default arguments.  Imagine you press ‘RET’ in a
+log to display the commit at point in a different buffer and then use
+‘D’ to change how the diff is displayed in that buffer.  And then you
+press ‘RET’ on another commit to show that instead and the diff
+arguments are reset to the default.  Not cool; so Magit does not do that
+by default.
+
+ -- User Option: magit-prefix-use-buffer-arguments
+     This option controls whether the infix arguments initially shown in
+     certain transient prefix commands are based on the arguments that
+     are currently in effect in the buffer that their suffixes update.
+
+     The ‘magit-diff’ and ‘magit-log’ transient prefix commands are
+     affected by this option.
+
+ -- User Option: magit-direct-use-buffer-arguments
+     This option controls whether certain commands, when invoked
+     directly (i.e., not as the suffix of a transient prefix command),
+     use the arguments that are currently active in the buffer that they
+     are about to update.  The alternative is to use the default value
+     for these arguments, which might change the arguments that are used
+     in the buffer.
+
+Valid values for both of the above options are:
+
+   • ‘always’: Always use the set of arguments that is currently active
+     in the respective buffer, provided that buffer exists of course.
+   • ‘selected’ or ‘t’: Use the set of arguments from the respective
+     buffer, but only if it is displayed in a window of the current
+     frame.  This is the default for both variables.
+   • ‘current’: Use the set of arguments from the respective buffer, but
+     only if it is the current buffer.
+   • ‘never’: Never use the set of arguments from the respective buffer.
+
+I am afraid it gets more complicated still:
+
+   • The global diff and log arguments are set for each supported mode
+     individually.  The diff arguments for example have different values
+     in ‘magit-diff-mode’, ‘magit-revision-mode’,
+     ‘magit-merge-preview-mode’ and ‘magit-status-mode’ buffers.
+     Setting or saving the value for one mode does not change the value
+     for other modes.  The history however is shared.
+
+   • When ‘magit-show-commit’ is invoked directly from a log buffer,
+     then the file filter is picked up from that buffer, not from the
+     revision buffer or the mode's global diff arguments.
+
+   • Even though they are suffixes of the diff prefix
+     ‘magit-show-commit’ and ‘magit-stash-show’ do not use the diff
+     buffer used by the diff commands, instead they use the dedicated
+     revision and stash buffers.
+
+     At the time you invoke the diff prefix it is unknown to Magit which
+     of the suffix commands you are going to invoke.  While not certain,
+     more often than not users invoke one of the commands that use the
+     diff buffer, so the initial infix arguments are those used in that
+     buffer.  However if you invoke one of these commands directly, then
+     Magit knows that it should use the arguments from the revision
+     resp.  stash buffer.
+
+   • The log prefix also features reflog commands, but these commands do
+     not use the log arguments.
+
+   • If ‘magit-show-refs’ is invoked from a ‘magit-refs-mode’ buffer,
+     then it acts as a refresh prefix and therefore unconditionally uses
+     the buffer's arguments as initial arguments.  If it is invoked
+     elsewhere with a prefix argument, then it acts as regular prefix
+     and therefore respects ‘magit-prefix-use-buffer-arguments’.  If it
+     is invoked elsewhere without a prefix argument, then it acts as a
+     direct command and therefore respects
+     ‘magit-direct-use-buffer-arguments’.
+
+
+File: magit.info,  Node: Completion Confirmation and the Selection,  Next: Mouse Support,  Prev: Transient Arguments and Buffer Variables,  Up: Interface Concepts
+
+4.5 Completion, Confirmation and the Selection
+==============================================
+
+4.5.1 Action Confirmation
+-------------------------
+
+By default many actions that could potentially lead to data loss have to
+be confirmed.  This includes many very common actions, so this can
+quickly become annoying.  Many of these actions can be undone and if you
+have thought about how to undo certain mistakes, then it should be safe
+to disable confirmation for the respective actions.
+
+   The option ‘magit-no-confirm’ can be used to tell Magit to perform
+certain actions without the user having to confirm them.  Note that
+while this option can only be used to disable confirmation for a
+specific set of actions, the next section explains another way of
+telling Magit to ask fewer questions.
+
+ -- User Option: magit-no-confirm
+     The value of this option is a list of symbols, representing actions
+     that do not have to be confirmed by the user before being carried
+     out.
+
+     By default many potentially dangerous commands ask the user for
+     confirmation.  Each of the below symbols stands for an action
+     which, when invoked unintentionally or without being fully aware of
+     the consequences, could lead to tears.  In many cases there are
+     several commands that perform variations of a certain action, so we
+     don't use the command names but more generic symbols.
+
+        • Applying changes:
+
+             • ‘discard’ Discarding one or more changes (i.e., hunks or
+               the complete diff for a file) loses that change,
+               obviously.
+
+             • ‘reverse’ Reverting one or more changes can usually be
+               undone by reverting the reversion.
+
+             • ‘stage-all-changes’, ‘unstage-all-changes’ When there are
+               both staged and unstaged changes, then un-/staging
+               everything would destroy that distinction.  Of course
+               that also applies when un-/staging a single change, but
+               then less is lost and one does that so often that having
+               to confirm every time would be unacceptable.
+
+        • Files:
+
+             • ‘delete’ When a file that isn't yet tracked by Git is
+               deleted, then it is completely lost, not just the last
+               changes.  Very dangerous.
+
+             • ‘trash’ Instead of deleting a file it can also be move to
+               the system trash.  Obviously much less dangerous than
+               deleting it.
+
+               Also see option ‘magit-delete-by-moving-to-trash’.
+
+             • ‘resurrect’ A deleted file can easily be resurrected by
+               "deleting" the deletion, which is done using the same
+               command that was used to delete the same file in the
+               first place.
+
+             • ‘untrack’ Untracking a file can be undone by tracking it
+               again.
+
+             • ‘rename’ Renaming a file can easily be undone.
+
+        • Sequences:
+
+             • ‘reset-bisect’ Aborting (known to Git as "resetting") a
+               bisect operation loses all information collected so far.
+
+             • ‘abort-cherry-pick’ Aborting a cherry-pick throws away
+               all conflict resolutions which have already been carried
+               out by the user.
+
+             • ‘abort-revert’ Aborting a revert throws away all conflict
+               resolutions which have already been carried out by the
+               user.
+
+             • ‘abort-rebase’ Aborting a rebase throws away all already
+               modified commits, but it's possible to restore those from
+               the reflog.
+
+             • ‘abort-merge’ Aborting a merge throws away all conflict
+               resolutions which have already been carried out by the
+               user.
+
+             • ‘merge-dirty’ Merging with a dirty worktree can make it
+               hard to go back to the state before the merge was
+               initiated.
+
+        • References:
+
+             • ‘delete-unmerged-branch’ Once a branch has been deleted,
+               it can only be restored using low-level recovery tools
+               provided by Git.  And even then the reflog is gone.  The
+               user always has to confirm the deletion of a branch by
+               accepting the default choice (or selecting another
+               branch), but when a branch has not been merged yet, also
+               make sure the user is aware of that.
+
+             • ‘delete-pr-remote’ When deleting a branch that was
+               created from a pull-request and if no other branches
+               still exist on that remote, then ‘magit-branch-delete’
+               offers to delete the remote as well.  This should be safe
+               because it only happens if no other refs exist in the
+               remotes namespace, and you can recreate the remote if
+               necessary.
+
+             • ‘drop-stashes’ Dropping a stash is dangerous because Git
+               stores stashes in the reflog.  Once a stash is removed,
+               there is no going back without using low-level recovery
+               tools provided by Git.  When a single stash is dropped,
+               then the user always has to confirm by accepting the
+               default (or selecting another).  This action only
+               concerns the deletion of multiple stashes at once.
+
+        • Publishing:
+
+             • ‘set-and-push’ When pushing to the upstream or the
+               push-remote and that isn't actually configured yet, then
+               the user can first set the target.  If s/he confirms the
+               default too quickly, then s/he might end up pushing to
+               the wrong branch and if the remote repository is
+               configured to disallow fixing such mistakes, then that
+               can be quite embarrassing and annoying.
+
+        • Edit published history:
+
+          Without adding these symbols here, you will be warned before
+          editing commits that have already been pushed to one of the
+          branches listed in ‘magit-published-branches’.
+
+             • ‘amend-published’ Affects most commands that amend to
+               "HEAD".
+
+             • ‘rebase-published’ Affects commands that perform
+               interactive rebases.  This includes commands from the
+               commit transient that modify a commit other than "HEAD",
+               namely the various fixup and squash variants.
+
+             • ‘edit-published’ Affects the commands
+               ‘magit-edit-line-commit’ and
+               ‘magit-diff-edit-hunk-commit’.  These two commands make
+               it quite easy to accidentally edit a published commit, so
+               you should think twice before configuring them not to ask
+               for confirmation.
+
+          To disable confirmation completely, add all three symbols here
+          or set ‘magit-published-branches’ to ‘nil’.
+
+        • Various:
+
+             • ‘stash-apply-3way’ When a stash cannot be applied using
+               ‘git stash apply’, then Magit uses ‘git apply’ instead,
+               possibly using the ‘--3way’ argument, which isn't always
+               perfectly safe.  See also ‘magit-stash-apply’.
+
+             • ‘kill-process’ There seldom is a reason to kill a
+               process.
+
+        • Global settings:
+
+          Instead of adding all of the above symbols to the value of
+          this option, you can also set it to the atom 't', which has
+          the same effect as adding all of the above symbols.  Doing
+          that most certainly is a bad idea, especially because other
+          symbols might be added in the future.  So even if you don't
+          want to be asked for confirmation for any of these actions,
+          you are still better of adding all of the respective symbols
+          individually.
+
+          When ‘magit-wip-before-change-mode’ is enabled, then the
+          following actions can be undone fairly easily: ‘discard’,
+          ‘reverse’, ‘stage-all-changes’, and ‘unstage-all-changes’.  If
+          and only if this mode is enabled, then ‘safe-with-wip’ has the
+          same effect as adding all of these symbols individually.
+
+4.5.2 Completion and Confirmation
+---------------------------------
+
+Many Magit commands ask the user to select from a list of possible
+things to act on, while offering the most likely choice as the default.
+For many of these commands the default is the thing at point, provided
+that it actually is a valid thing to act on.  For many commands that act
+on a branch, the current branch serves as the default if there is no
+branch at point.
+
+   These commands combine asking for confirmation and asking for a
+target to act on into a single action.  The user can confirm the default
+target using ‘RET’ or abort using ‘C-g’.  This is similar to a
+‘y-or-n-p’ prompt, but the keys to confirm or abort differ.
+
+   At the same time the user is also given the opportunity to select
+another target, which is useful because for some commands and/or in some
+situations you might want to select the action before selecting the
+target by moving to it.
+
+   However you might find that for some commands you always want to use
+the default target, if any, or even that you want the command to act on
+the default without requiring any confirmation at all.  The option
+‘magit-dwim-selection’ can be used to configure certain commands to that
+effect.
+
+   Note that when the region is active then many commands act on the
+things that are selected using a mechanism based on the region, in many
+cases after asking for confirmation.  This region-based mechanism is
+called the "selection" and is described in detail in the next section.
+When a selection exists that is valid for the invoked command, then that
+command never offers to act on something else, and whether it asks for
+confirmation is not controlled by this option.
+
+   Also note that Magit asks for confirmation of certain actions that
+are not coupled with completion (or the selection).  Such dialogs are
+also not affected by this option and are described in the previous
+section.
+
+ -- User Option: magit-dwim-selection
+   This option can be used to tell certain commands to use the thing at
+point instead of asking the user to select a candidate to act on, with
+or without confirmation.
+
+   The value has the form ‘((COMMAND nil|PROMPT DEFAULT)...)’.
+
+   • COMMAND is the command that should not prompt for a choice.  To
+     have an effect, the command has to use the function
+     ‘magit-completing-read’ or a utility function which in turn uses
+     that function.
+
+   • If the command uses ‘magit-completing-read’ multiple times, then
+     PROMPT can be used to only affect one of these uses.  PROMPT, if
+     non-‘nil’, is a regular expression that is used to match against
+     the PROMPT argument passed to ‘magit-completing-read’.
+
+   • DEFAULT specifies how to use the default.  If it is ‘t’, then the
+     DEFAULT argument passed to ‘magit-completing-read’ is used without
+     confirmation.  If it is ‘ask’, then the user is given a chance to
+     abort.  DEFAULT can also be ‘nil’, in which case the entry has no
+     effect.
+
+4.5.3 The Selection
+-------------------
+
+If the region is active, then many Magit commands act on the things that
+are selected using a mechanism based on the region instead of one single
+thing.  When the region is not active, then these commands act on the
+thing at point or read a single thing to act on.  This is described in
+the previous section — this section only covers how multiple things are
+selected, how that is visualized, and how certain commands behave when
+that is the case.
+
+   Magit's mechanism for selecting multiple things, or rather sections
+that represent these things, is based on the Emacs region, but the area
+that Magit considers to be selected is typically larger than the region
+and additional restrictions apply.
+
+   Magit makes a distinction between a region that qualifies as forming
+a valid Magit selection and a region that does not.  If the region does
+not qualify, then it is displayed as it is in other Emacs buffers.  If
+the region does qualify as a Magit selection, then the selection is
+always visualized, while the region itself is only visualized if it
+begins and ends on the same line.
+
+   For a region to qualify as a Magit selection, it must begin in the
+heading of one section and end in the heading of a sibling section.
+Note that if the end of the region is at the very beginning of section
+heading (i.e., at the very beginning of a line) then that section is
+considered to be *inside* the selection.
+
+   This is not consistent with how the region is normally treated in
+Emacs — if the region ends at the beginning of a line, then that line is
+outside the region.  Due to how Magit visualizes the selection, it
+should be obvious that this difference exists.
+
+   Not every command acts on every valid selection.  Some commands do
+not even consider the location of point, others may act on the section
+at point but not support acting on the selection, and even commands that
+do support the selection of course only do so if it selects things that
+they can act on.
+
+   This is the main reason why the selection must include the section at
+point.  Even if a selection exists, the invoked command may disregard
+it, in which case it may act on the current section only.  It is much
+safer to only act on the current section but not the other selected
+sections than it is to act on the current section *instead* of the
+selected sections.  The latter would be much more surprising and if the
+current section always is part of the selection, then that cannot
+happen.
+
+ -- Variable: magit-keep-region-overlay
+     This variable controls whether the region is visualized as usual
+     even when a valid Magit selection or a hunk-internal region exists.
+     See the doc-string for more information.
+
+4.5.4 The hunk-internal region
+------------------------------
+
+Somewhat related to the Magit selection described in the previous
+section is the hunk-internal region.
+
+   Like the selection, the hunk-internal region is based on the Emacs
+region but causes that region to not be visualized as it would in other
+Emacs buffers, and includes the line on which the region ends even if it
+ends at the very beginning of that line.
+
+   Unlike the selection, which is based on a region that must begin in
+the heading of one section and ends in the section of a sibling section,
+the hunk-internal region must begin inside the *body* of a hunk section
+and end in the body of the *same* section.
+
+   The hunk-internal region is honored by "apply" commands, which can,
+among other targets, act on a hunk.  If the hunk-internal region is
+active, then such commands act only on the marked part of the hunk
+instead of on the complete hunk.
+
+4.5.5 Support for Completion Frameworks
+---------------------------------------
+
+The built-in option ‘completing-read-function’ specifies the low-level
+function used by ‘completing-read’ to ask a user to select from a list
+of choices.  Its default value is ‘completing-read-default’.
+Alternative completion frameworks typically activate themselves by
+substituting their own implementation.
+
+   Mostly for historic reasons Magit provides a similar option named
+‘magit-completing-read-function’, which only controls the low-level
+function used by ‘magit-completing-read’.  This option also makes it
+possible to use a different completing mechanism for Magit than for the
+rest of Emacs, but doing that is not recommend.
+
+   You most likely don't have to customize the magit-specific option to
+use an alternative completion framework.  For example, if you enable
+‘ivy-mode’, then Magit will respect that, and if you enable ‘helm-mode’,
+then you are done too.
+
+ -- User Option: magit-completing-read-function
+     The value of this variable is the low-level function used to
+     perform completion by code that uses ‘magit-completing-read’ (as
+     opposed to the built-in ‘completing-read’).
+
+     The default value, ‘magit-builtin-completing-read’, is suitable for
+     the standard completion mechanism, ‘ivy-mode’, and ‘helm-mode’ at
+     least.
+
+     The built-in ‘completing-read’ and ‘completing-read-default’ are
+     *not* suitable to be used here.  ‘magit-builtin-completing-read’
+     performs some additional work, and any function used in its place
+     has to do the same.
+
+ -- Function: magit-builtin-completing-read prompt choices &optional
+          predicate require-match initial-input hist def
+     This function performs completion using the built-in
+     ‘completing-read’ and does some additional magit-specific work.
+
+ -- Function: magit-completing-read prompt choices &optional predicate
+          require-match initial-input hist def fallback
+     This is the function that Magit commands use when they need the
+     user to select a single thing to act on.  The arguments have the
+     same meaning as for ‘completing-read’, except for FALLBACK, which
+     is unique to this function and is described below.
+
+     Instead of asking the user to choose from a list of possible
+     candidates, this function may just return the default specified by
+     DEF, with or without requiring user confirmation.  Whether that is
+     the case depends on PROMPT, ‘this-command’ and
+     ‘magit-dwim-selection’.  See the documentation of the latter for
+     more information.
+
+     If it does read a value in the minibuffer, then this function acts
+     similar to ‘completing-read’, except for the following:
+
+        • COLLECTION must be a list of choices.  A function is not
+          supported.
+
+        • If REQUIRE-MATCH is ‘nil’ and the user exits without a choice,
+          then ‘nil’ is returned instead of an empty string.
+
+        • If REQUIRE-MATCH is ‘any’, then do not require a match but do
+          require non-empty input (or non-‘nil’ DEFAULT, since that is
+          substituted for empty input).
+
+        • If REQUIRE-MATCH is non-‘nil’ and the users exits without a
+          choice, an user-error is raised.
+
+        • FALLBACK specifies a secondary default that is only used if
+          the primary default DEF is ‘nil’.  The secondary default is
+          not subject to ‘magit-dwim-selection’ — if DEF is ‘nil’ but
+          FALLBACK is not, then this function always asks the user to
+          choose a candidate, just as if both defaults were ‘nil’.
+
+        • ‘format-prompt’ is called on PROMPT and DEF (or FALLBACK if
+          DEF is ‘nil’).  This appends ": " to the prompt and may also
+          add the default to the prompt, using the format specified by
+          ‘minibuffer-default-prompt-format’ and depending on
+          ‘magit-completing-read-default-prompt-predicate’.
+
+4.5.6 Additional Completion Options
+-----------------------------------
+
+ -- User Option: magit-list-refs-sortby
+     For many commands that read a ref or refs from the user, the value
+     of this option can be used to control the order of the refs.  Valid
+     values include any key accepted by the ‘--sort’ flag of ‘git
+     for-each-ref’.  By default, refs are sorted alphabetically by their
+     full name (e.g., "refs/heads/master").
+
+
+File: magit.info,  Node: Mouse Support,  Next: Running Git,  Prev: Completion Confirmation and the Selection,  Up: Interface Concepts
+
+4.6 Mouse Support
+=================
+
+Double clicking on a section heading toggles the visibility of its body,
+if any.  Likewise clicking in the left fringe toggles the visibility of
+the appropriate section.
+
+   A context menu is provided but has to be enabled explicitly.  In
+Emacs 28 and greater, enable the global mode ‘context-menu-mode’.  If
+you use an older Emacs release, set
+‘magit-section-show-context-menu-for-emacs<28’.
+
+
+File: magit.info,  Node: Running Git,  Prev: Mouse Support,  Up: Interface Concepts
+
+4.7 Running Git
+===============
+
+4.7.1 Viewing Git Output
+------------------------
+
+Magit runs Git either for side-effects (e.g., when pushing) or to get
+some value (e.g., the name of the current branch).
+
+   When Git is run for side-effects, the process output is logged in a
+per-repository log buffer, which can be consulted using the
+‘magit-process-buffer’ command, when things don't go as expected.
+
+   The output/errors for up to ‘magit-process-log-max’ Git commands are
+retained.
+
+‘$’ (‘magit-process-buffer’)
+     This commands displays the process buffer for the current
+     repository.
+
+   Inside that buffer, the usual key bindings for navigating and showing
+sections are available.  There is one additional command.
+
+‘k’ (‘magit-process-kill’)
+     This command first tries to interrupt the process represented by
+     the section at point.  If that fails a second invocation instead
+     kills the process.
+
+‘M-x magit-toggle-git-debug’
+     This command toggles whether additional git errors are reported.
+
+     Magit basically calls git for one of these two reasons: for
+     side-effects or to do something with its standard output.
+
+     When git is run for side-effects then its output, including error
+     messages, go into the process buffer which is shown when using ‘$’.
+
+     When git's output is consumed in some way, then it would be too
+     expensive to also insert it into this buffer, but with this command
+     that can be enabled temporarily.  In that case, if git returns with
+     a non-zero exit status, then at least its standard error is
+     inserted into this buffer.
+
+     Also note that just because git exits with a non-zero status and
+     prints an error message, that usually doesn't mean that it is an
+     error as far as Magit is concerned, which is another reason we
+     usually hide these error messages.  Whether some error message is
+     relevant in the context of some unexpected behavior has to be
+     judged on a case by case basis.
+
+4.7.2 Git Process Status
+------------------------
+
+When a Git process is running for side-effects, Magit displays an
+indicator in the mode line, using the ‘magit-mode-line-process’ face.
+
+   If the Git process exits successfully, the process indicator is
+removed from the mode line immediately.
+
+   In the case of a Git error, the process indicator is not removed, but
+is instead highlighted with the ‘magit-mode-line-process-error’ face,
+and the error details from the process buffer are provided as a tooltip
+for mouse users.  This error indicator persists in the mode line until
+the next magit buffer refresh.
+
+   If you do not wish process errors to be indicated in the mode line,
+set ‘magit-process-display-mode-line-error’ to ‘nil’.
+
+   Process errors are displayed at the top of the status buffer and in
+the echo area.  In both places a hint is appended, which informs users
+that they can see the full output in the process buffer and how to
+display that buffer.  However, once you are aware of that, you might
+want to set ‘magit-show-process-buffer-hint’ to ‘nil’.
+
+4.7.3 Running Git Manually
+--------------------------
+
+While Magit provides many Emacs commands to interact with Git, it does
+not cover everything.  In those cases your existing Git knowledge will
+come in handy.  Magit provides some commands for running arbitrary Git
+commands by typing them into the minibuffer, instead of having to switch
+to a shell.
+
+‘!’ (‘magit-run’)
+     This transient prefix command binds the following suffix commands
+     and displays them in a temporary buffer until a suffix is invoked.
+
+‘! !’ (‘magit-git-command-topdir’)
+     This command reads a command from the user and executes it in the
+     top-level directory of the current working tree.
+
+     The string "git " is used as initial input when prompting the user
+     for the command.  It can be removed to run another command.
+
+‘:’ (‘magit-git-command’)
+‘! p’
+     This command reads a command from the user and executes it in
+     ‘default-directory’.  With a prefix argument the command is
+     executed in the top-level directory of the current working tree
+     instead.
+
+     The string "git " is used as initial input when prompting the user
+     for the command.  It can be removed to run another command.
+
+‘! s’ (‘magit-shell-command-topdir’)
+     This command reads a command from the user and executes it in the
+     top-level directory of the current working tree.
+
+‘! S’ (‘magit-shell-command’)
+     This command reads a command from the user and executes it in
+     ‘default-directory’.  With a prefix argument the command is
+     executed in the top-level directory of the current working tree
+     instead.
+
+ -- User Option: magit-shell-command-verbose-prompt
+     Whether the prompt, used by the above commands when reading a shell
+     command, shows the directory in which it will be run.
+
+   These suffix commands start external gui tools.
+
+‘! k’ (‘magit-run-gitk’)
+     This command runs ‘gitk’ in the current repository.
+
+‘! a’ (‘magit-run-gitk-all’)
+     This command runs ‘gitk --all’ in the current repository.
+
+‘! b’ (‘magit-run-gitk-branches’)
+     This command runs ‘gitk --branches’ in the current repository.
+
+‘! g’ (‘magit-run-git-gui’)
+     This command runs ‘git gui’ in the current repository.
+
+‘! m’ (‘magit-git-mergetool’)
+     This command runs ‘git mergetool --gui’ in the current repository.
+
+     With a prefix argument this acts as a transient prefix command,
+     allowing the user to select the mergetool and change some settings.
+
+4.7.4 Git Executable
+--------------------
+
+When Magit calls Git, then it may do so using the absolute path to the
+‘git’ executable, or using just its name.
+
+   When running ‘git’ locally and the ‘system-type’ is ‘windows-nt’ (any
+Windows version) or ‘darwin’ (macOS) then ‘magit-git-executable’ is set
+to an absolute path when Magit is loaded.
+
+   On Windows it is necessary to use an absolute path because Git comes
+with several wrapper scripts for the actual ‘git’ binary, which are also
+placed on ‘$PATH’, and using one of these wrappers instead of the binary
+would degrade performance horribly.  For some macOS users using just the
+name of the executable also performs horribly, so we avoid doing that on
+that platform as well.  On other platforms, using just the name seems to
+work just fine.
+
+   Using an absolute path when running ‘git’ on a remote machine over
+Tramp, would be problematic to use an absolute path that is suitable on
+the local machine, so a separate option is used to control the name or
+path that is used on remote machines.
+
+ -- User Option: magit-git-executable
+     The ‘git’ executable used by Magit on the local host.  This should
+     be either the absolute path to the executable, or the string "git"
+     to let Emacs find the executable itself, using the standard
+     mechanism for doing such things.
+
+ -- User Option: magit-remote-git-executable
+     The ‘git’ executable used by Magit on remote machines over Tramp.
+     Normally this should be just the string "git".  Consider
+     customizing ‘tramp-remote-path’ instead of this option.
+
+   If Emacs is unable to find the correct executable, then you can work
+around that by explicitly setting the value of one of these two options.
+Doing that should be considered a kludge; it is better to make sure that
+the order in ‘exec-path’ or ‘tramp-remote-path’ is correct.
+
+   Note that ‘exec-path’ is set based on the value of the ‘PATH’
+environment variable that is in effect when Emacs is started.  If you
+set ‘PATH’ in your shell's init files, then that only has an effect on
+Emacs if you start it from that shell (because the environment of a
+process is only passed to its child processes, not to arbitrary other
+processes).  If that is not how you start Emacs, then the
+‘exec-path-from-shell’ package can help; though honestly I consider that
+a kludge too.
+
+   The command ‘magit-debug-git-executable’ can be useful to find out
+where Emacs is searching for ‘git’.
+
+‘M-x magit-debug-git-executable’
+     This command displays a buffer with information about
+     ‘magit-git-executable’ and ‘magit-remote-git-executable’.
+
+‘M-x magit-version’
+     This command shows the currently used versions of Magit, Git, and
+     Emacs in the echo area.  Non-interactively this just returns the
+     Magit version.
+
+4.7.5 Global Git Arguments
+--------------------------
+
+ -- User Option: magit-git-global-arguments
+     The arguments set here are used every time the git executable is
+     run as a subprocess.  They are placed right after the executable
+     itself and before the git command - as in ‘git HERE... COMMAND
+     REST’.  For valid arguments see *note (gitman)git::.
+
+     Be careful what you add here, especially if you are using Tramp to
+     connect to servers with ancient Git versions.  Never remove
+     anything that is part of the default value, unless you really know
+     what you are doing.  And think very hard before adding something;
+     it will be used every time Magit runs Git for any purpose.
+
+4.7.6 Mapping Git Hooks to Lisp Hooks
+-------------------------------------
+
+Git hooks can be configured to call Lisp hooks, starting with Git
+v2.54.0.  The mechanism described here is only used when ‘git’ is
+invoked by Magit, and ‘git’ is run asynchronously and on the local
+machine.
+
+‘magit-run-hooks-from-githooks’
+     This option controls whether Git hooks may run Lisp hooks.
+
+     Magit only defines one such hook mapping, but users can add more.
+
+‘magit-user-githook-file’
+     This option controls the location of a user-editable file
+     containing additional hook mappings.
+
+ -- Variable: magit-githook-directory
+     The value of this variable is the directory containing files Magit
+     needs to map Git hooks to Lisp hooks.
+
+     This directory must contains two files; ‘config’, which maps Git
+     hooks to the Lisp hook ‘magit-common-git-post-commit-functions’,
+     and an executable ‘magit-run-git-hook’, which is used in that, and
+     potentially other, hook mappings.
+
+     The value of this variable is set by ‘magit-process-git-arguments’,
+     when it is first needed.  Users can set it to another directory,
+     but that should rarely be necessary.  Additional hook mappings
+     should instead be defined in ‘magit-user-githook-file’.
+
+ -- Function: magit-run-git-hook (hook &rest args)
+     This function runs the Lisp hook HOOK with the specified arguments
+     ARGS.  ARGS are the arguments (a possibly empty list of strings),
+     which the Git hook was called with.  HOOK is a string naming a
+     hook.
+
+     This function is only intended to be called via ‘emacsclient’, by
+     an executable by the same name, which in turn is only intended to
+     be called by Git hooks.
+
+ -- Variable: magit-common-git-post-commit-functions
+     This Lisp hook is run by the Git hooks ‘post-commit’, ‘post-merge’
+     and ‘post-rewrite’.  There is not a single Git hook, which is
+     called after a commit is created; to achieve that, all of these
+     hooks have to be used.
+
+   Git hooks are documented in *note (gitman)githooks::.  Also see *note
+(gitman)git-hook::.  Using ‘magit-common-git-post-commit-functions’ as
+an example, the following is how Magit gets Git to map Git hooks to Lisp
+hooks.
+
+   Iff Magit calls Git asynchronously and on the local machine, it
+injects the global arguments ‘-c include.path=/path/to/githooks/config’.
+That file contains:
+
+     [hook "magit-common-post-commit"]
+       event = post-commit
+       event = post-merge
+       event = post-rewrite
+       command = magit-run-git-hook magit-common-git-post-commit-functions
+
+   Consequently when one of the Git hooks ‘post-commit’, ‘post-merge’ or
+‘post-rewrite’ is triggered, that causes the ‘magit-run-git-hook’
+executable to be called with ‘magit-common-git-post-commit-functions’ as
+the first argument.
+
+   That executable used the ‘emacsclient’ to call a Lisp function by the
+same name, which takes the name of a Lisp hook as the first argument.
+The executable may receive additional arguments from the Git hook, which
+it passes on to the function.  All arguments are strings.
+
+   The function ‘magit-run-git-hook’ runs the Lisp hook using
+‘run-hook-with-args’, passing along all arguments, starting with the
+second.  It also arranges for ‘message’ to output to standard output, so
+that messages appear in Magit's process buffer.
+
+
+File: magit.info,  Node: Inspecting,  Next: Manipulating,  Prev: Interface Concepts,  Up: Top
+
+5 Inspecting
+************
+
+The functionality provided by Magit can be roughly divided into three
+groups: inspecting existing data, manipulating existing data or adding
+new data, and transferring data.  Of course that is a rather crude
+distinction that often falls short, but it's more useful than no
+distinction at all.  This section is concerned with inspecting data, the
+next two with manipulating and transferring it.  Then follows a section
+about miscellaneous functionality, which cannot easily be fit into this
+distinction.
+
+   Of course other distinctions make sense too, e.g., Git's distinction
+between porcelain and plumbing commands, which for the most part is
+equivalent to Emacs' distinction between interactive commands and
+non-interactive functions.  All of the sections mentioned before are
+mainly concerned with the porcelain - Magit's plumbing layer is
+described later.
+
+* Menu:
+
+* Status Buffer::
+* Repository List::
+* Logging::
+* Diffing::
+* Ediffing::
+* References Buffer::
+* Bisecting::
+* Visiting Files and Blobs::
+* Blaming::
+
+
+File: magit.info,  Node: Status Buffer,  Next: Repository List,  Up: Inspecting
+
+5.1 Status Buffer
+=================
+
+While other Magit buffers contain, e.g., one particular diff or one
+particular log, the status buffer contains the diffs for staged and
+unstaged changes, logs for unpushed and unpulled commits, lists of
+stashes and untracked files, and information related to the current
+branch.
+
+   During certain incomplete operations - for example when a merge
+resulted in a conflict - additional information is displayed that helps
+proceeding with or aborting the operation.
+
+   The command ‘magit-status’ displays the status buffer belonging to
+the current repository in another window.  This command is used so often
+that it should be bound globally.  We recommend using ‘C-x g’:
+
+     (global-set-key (kbd "C-x g") 'magit-status)
+
+‘C-x g’ (‘magit-status’)
+     When invoked from within an existing Git repository, then this
+     command shows the status of that repository in a buffer.
+
+     If the current directory isn't located within a Git repository,
+     then this command prompts for an existing repository or an
+     arbitrary directory, depending on the option
+     ‘magit-repository-directories’, and the status for the selected
+     repository is shown instead.
+
+        • If that option specifies any existing repositories, then the
+          user is asked to select one of them.
+
+        • Otherwise the user is asked to select an arbitrary directory
+          using regular file-name completion.  If the selected directory
+          is the top-level directory of an existing working tree, then
+          the status buffer for that is shown.
+
+        • Otherwise the user is offered to initialize the selected
+          directory as a new repository.  After creating the repository
+          its status buffer is shown.
+
+     These fallback behaviors can also be forced using one or more
+     prefix arguments:
+
+        • With two prefix arguments (or more precisely a numeric prefix
+          value of 16 or greater) an arbitrary directory is read, which
+          is then acted on as described above.  The same could be
+          accomplished using the command ‘magit-init’.
+
+        • With a single prefix argument an existing repository is read
+          from the user, or if no repository can be found based on the
+          value of ‘magit-repository-directories’, then the behavior is
+          the same as with two prefix arguments.
+
+ -- User Option: magit-repository-directories
+     List of directories that are Git repositories or contain Git
+     repositories.
+
+     Each element has the form ‘(DIRECTORY . DEPTH)’.  DIRECTORY has to
+     be a directory or a directory file-name, a string.  DEPTH, an
+     integer, specifies the maximum depth to look for Git repositories.
+     If it is 0, then only add DIRECTORY itself.
+
+     This option controls which repositories are being listed by
+     ‘magit-list-repositories’.  It also affects ‘magit-status’ (which
+     see) in potentially surprising ways (see above).
+
+ -- Command: magit-status-quick
+     This command is an alternative to ‘magit-status’ that usually
+     avoids refreshing the status buffer.
+
+     If the status buffer of the current Git repository exists but isn't
+     being displayed in the selected frame, then it is displayed without
+     being refreshed.
+
+     If the status buffer is being displayed in the selected frame, then
+     this command refreshes it.
+
+     Prefix arguments have the same meaning as for ‘magit-status’, and
+     additionally cause the buffer to be refresh.
+
+     To use this command add this to your init file:
+
+          (global-set-key (kbd "C-x g") 'magit-status-quick).
+
+     If you do that and then for once want to redisplay the buffer and
+     also immediately refresh it, then type ‘C-x g’ followed by ‘g’.
+
+     A possible alternative command is
+     ‘magit-display-repository-buffer’.  It supports displaying any
+     existing Magit buffer that belongs to the current repository; not
+     just the status buffer.
+
+ -- Command: magit-parent-status
+     This command shows the status of the parent repository of the
+     current Git repository.  If the current repository is a submodule,
+     it shows the status buffer of its super-repository.  Otherwise it
+     steps outside the worktree of the current repository, and if that
+     takes us to another repository, that is considered that the parent
+     repository.
+
+5.1.1 Status Sections
+---------------------
+
+The contents of status buffers is controlled using the hook
+‘magit-status-sections-hook’.  See *note Section Hooks:: to learn about
+such hooks and how to customize them.
+
+ -- User Option: magit-status-sections-hook
+     This hook is run to insert sections into a status buffer.
+
+     The functions described in this section, and the functions
+     ‘magit-insert-status-headers’ and ‘magit-insert-untracked-files’,
+     which are described in subsequent sections, are members of this
+     hook.
+
+     Some additional functions that can be added to this hook, but are
+     by default added to another hooks, are listed in *note References
+     Buffer::.
+
+ -- Function: magit-insert-status-headers
+     Insert header sections appropriate for ‘magit-status-mode’ buffers.
+     The sections are inserted by running the functions on the hook
+     ‘magit-status-headers-hook’.  See *note Status Header Sections::.
+
+ -- Function: magit-insert-merge-log
+     Insert section for the on-going merge.  Display the heads that are
+     being merged.  If no merge is in progress, do nothing.
+
+ -- Function: magit-insert-rebase-sequence
+     Insert section for the on-going rebase sequence.  If no such
+     sequence is in progress, do nothing.
+
+ -- Function: magit-insert-am-sequence
+     Insert section for the on-going patch applying sequence.  If no
+     such sequence is in progress, do nothing.
+
+ -- Function: magit-insert-sequencer-sequence
+     Insert section for the on-going cherry-pick or revert sequence.  If
+     no such sequence is in progress, do nothing.
+
+ -- Function: magit-insert-bisect-output
+     While bisecting, insert section with output from ‘git bisect’.
+
+ -- Function: magit-insert-bisect-rest
+     While bisecting, insert section visualizing the bisect state.
+
+ -- Function: magit-insert-bisect-log
+     While bisecting, insert section logging bisect progress.
+
+ -- Function: magit-insert-unstaged-changes
+     Insert section showing unstaged changes.
+
+ -- Function: magit-insert-staged-changes
+     Insert section showing staged changes.
+
+ -- Function: magit-insert-stashes &optional ref heading
+     Insert the ‘stashes’ section showing reflog for "refs/stash".  If
+     optional REF is non-‘nil’ show reflog for that instead.  If
+     optional HEADING is non-‘nil’ use that as section heading instead
+     of "Stashes:".
+
+ -- Function: magit-insert-unpulled-from-upstream
+     Insert section showing commits that haven't been pulled from the
+     upstream branch yet.
+
+ -- Function: magit-insert-unpulled-from-pushremote
+     Insert section showing commits that haven't been pulled from the
+     push-remote branch yet.
+
+ -- Function: magit-insert-unpushed-to-upstream-or-recent
+     Insert section showing unpushed or other recent commits.  If an
+     upstream is configured for the current branch and it is behind of
+     the current branch, then show the commits that have not yet been
+     pushed into the upstream branch.  If no upstream is configured or
+     if the upstream is not behind of the current branch, then show the
+     last ‘magit-log-section-commit-count’ commits.
+
+ -- Function: magit-insert-unpushed-to-upstream
+     Insert section showing commits that haven't been pushed to the
+     upstream yet.
+
+ -- Function: magit-insert-unpushed-to-pushremote
+     Insert section showing commits that haven't been pushed to the
+     push-remote yet.
+
+5.1.2 Status File List Sections
+-------------------------------
+
+These functions honor the buffer's file filter, which can be set using
+‘D - -’.
+
+ -- Function: magit-insert-untracked-files
+     This function may insert a list of untracked files.  Whether it
+     actually does so, depends on the option described next.
+
+ -- User Option: magit-status-show-untracked-files
+     This option controls whether the above function inserts a list of
+     untracked files in the status buffer.
+
+        • If ‘nil’, do not list any untracked files.
+        • If ‘t’, list untracked files, but if a directory does not
+          contain any tracked files, then only list that directory, not
+          the contained untracked files.
+        • If ‘all’, then list each individual untracked files.  This is
+          can be very slow and is discouraged.
+
+     The corresponding values for the Git variable are "no", "normal"
+     and "all".
+
+     To disable listing untracked files in a specific repository only,
+     add the following to ‘.dir-locals.el’:
+
+          ((magit-status-mode
+           (magit-status-show-untracked-files . "no")))
+
+     Alternatively (and mostly for historic reasons), it is possible to
+     use ‘git config’ to set the repository-local value:
+
+          git config set --local status.showUntrackedFiles no
+
+     This does *not* override the (if any) local value of this Lisp
+     variable, but it does override its global value.
+
+     See the last section in the git-status(1) manpage, to speed up the
+     part of the work Git is responsible for.  Turning that list into
+     sections is also not free, so Magit only lists
+     ‘magit-status-file-list-limit’ files.
+
+ -- User Option: magit-status-file-list-limit
+     This option controls many files are listed at most in each section
+     that lists files in the status buffer.  For performance reasons, it
+     is recommended that you do not increase this limit.
+
+   While the above function is a member of ‘magit-status-section-hook’
+by default, the following functions have to be explicitly added by the
+user.  Because that negatively affects performance, it is recommended
+that you don't do that.
+
+ -- Function: magit-insert-tracked-files
+     Insert a list of tracked files.
+
+ -- Function: magit-insert-ignored-files
+     Insert a list of ignored files.
+
+ -- Function: magit-insert-skip-worktree-files
+     Insert a list of skip-worktree files.
+
+ -- Function: magit-insert-assume-unchanged-files
+     Insert a list of files that are assumed to be unchanged.
+
+5.1.3 Status Log Sections
+-------------------------
+
+ -- Function: magit-insert-recent-commits
+     Insert section showing the last ‘magit-log-section-commit-count’
+     commits.
+
+ -- User Option: magit-log-section-commit-count
+     How many recent commits ‘magit-insert-recent-commits’ and
+     ‘magit-insert-unpulled-or-recent-commits’ (provided there are no
+     unpulled commits) show.
+
+ -- Function: magit-insert-unpulled-cherries
+     Insert section showing unpulled commits.  Like
+     ‘magit-insert-unpulled-commits’ but prefix each commit that has not
+     been applied yet (i.e., a commit with a patch-id not shared with
+     any local commit) with "+", and all others with "-".
+
+ -- Function: magit-insert-unpushed-cherries
+     Insert section showing unpushed commits.  Like
+     ‘magit-insert-unpushed-commits’ but prefix each commit which has
+     not been applied to upstream yet (i.e., a commit with a patch-id
+     not shared with any upstream commit) with "+" and all others with
+     "-".
+
+5.1.4 Status Header Sections
+----------------------------
+
+The contents of status buffers is controlled using the hook
+‘magit-status-sections-hook’ (see *note Status Sections::).
+
+   By default ‘magit-insert-status-headers’ is the first member of that
+hook variable.
+
+ -- Function: magit-insert-status-headers
+     Insert headers sections appropriate for ‘magit-status-mode’
+     buffers.  The sections are inserted by running the functions on the
+     hook ‘magit-status-headers-hook’.
+
+ -- User Option: magit-status-headers-hook
+     Hook run to insert headers sections into the status buffer.
+
+     This hook is run by ‘magit-insert-status-headers’, which in turn
+     has to be a member of ‘magit-status-sections-hook’ to be used at
+     all.
+
+   By default the following functions are members of the above hook:
+
+ -- Function: magit-insert-error-header
+     Insert a header line showing the message about the Git error that
+     just occurred.
+
+     This function is only aware of the last error that occur when Git
+     was run for side-effects.  If, for example, an error occurs while
+     generating a diff, then that error won't be inserted.  Refreshing
+     the status buffer causes this section to disappear again.
+
+ -- Function: magit-insert-diff-filter-header
+     Insert a header line showing the effective diff filters.
+
+ -- Function: magit-insert-head-branch-header
+     Insert a header line about the current branch or detached ‘HEAD’.
+
+ -- Function: magit-insert-upstream-branch-header
+     Insert a header line about the branch that is usually pulled into
+     the current branch.
+
+ -- Function: magit-insert-push-branch-header
+     Insert a header line about the branch that the current branch is
+     usually pushed to.
+
+ -- Function: magit-insert-tags-header
+     Insert a header line about the current and/or next tag, along with
+     the number of commits between the tag and ‘HEAD’.
+
+   The following functions can also be added to the above hook:
+
+ -- Function: magit-insert-repo-header
+     Insert a header line showing the path to the repository top-level.
+
+ -- Function: magit-insert-remote-header
+     Insert a header line about the remote of the current branch.
+
+     If no remote is configured for the current branch, then fall back
+     showing the "origin" remote, or if that does not exist the first
+     remote in alphabetic order.
+
+ -- Function: magit-insert-user-header
+     Insert a header line about the current user.
+
+5.1.5 Status Module Sections
+----------------------------
+
+The contents of status buffers is controlled using the hook
+‘magit-status-sections-hook’ (see *note Status Sections::).
+
+   By default ‘magit-insert-modules’ is _not_ a member of that hook
+variable.
+
+ -- Function: magit-insert-modules
+     Insert submodule sections.
+
+     Hook ‘magit-module-sections-hook’ controls which module sections
+     are inserted, and option ‘magit-module-sections-nested’ controls
+     whether they are wrapped in an additional section.
+
+ -- User Option: magit-module-sections-hook
+     Hook run by ‘magit-insert-modules’.
+
+ -- User Option: magit-module-sections-nested
+     This option controls whether ‘magit-insert-modules’ wraps inserted
+     sections in an additional section.
+
+     If this is non-‘nil’, then only a single top-level section is
+     inserted.  If it is ‘nil’, then all sections listed in
+     ‘magit-module-sections-hook’ become top-level sections.
+
+ -- Function: magit-insert-modules-overview
+     Insert sections for all submodules.  For each section insert the
+     path, the branch, and the output of ‘git describe --tags’, or,
+     failing that, the abbreviated HEAD commit hash.
+
+     Press ‘RET’ on such a submodule section to show its own status
+     buffer.  Press ‘RET’ on the "Modules" section to display a list of
+     submodules in a separate buffer.  This shows additional information
+     not displayed in the super-repository's status buffer.
+
+ -- Function: magit-insert-modules-unpulled-from-upstream
+     Insert sections for modules that haven't been pulled from the
+     upstream yet.  These sections can be expanded to show the
+     respective commits.
+
+ -- Function: magit-insert-modules-unpulled-from-pushremote
+     Insert sections for modules that haven't been pulled from the
+     push-remote yet.  These sections can be expanded to show the
+     respective commits.
+
+ -- Function: magit-insert-modules-unpushed-to-upstream
+     Insert sections for modules that haven't been pushed to the
+     upstream yet.  These sections can be expanded to show the
+     respective commits.
+
+ -- Function: magit-insert-modules-unpushed-to-pushremote
+     Insert sections for modules that haven't been pushed to the
+     push-remote yet.  These sections can be expanded to show the
+     respective commits.
+
+5.1.6 Status Options
+--------------------
+
+ -- User Option: magit-status-margin
+     This option specifies whether the margin is initially shown in
+     Magit-Status mode buffers and how it is formatted.
+
+     The value has the form ‘(INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH)’.
+
+        • If INIT is non-‘nil’, then the margin is shown initially.
+        • STYLE controls how to format the author or committer date.  It
+          can be one of ‘age’ (to show the age of the commit),
+          ‘age-abbreviated’ (to abbreviate the time unit to a
+          character), or a string (suitable for ‘format-time-string’) to
+          show the actual date.  Option
+          ‘magit-log-margin-show-committer-date’ controls which date is
+          being displayed.
+        • WIDTH controls the width of the margin.  This exists for
+          forward compatibility and currently the value should not be
+          changed.
+        • AUTHOR controls whether the name of the author is also shown
+          by default.
+        • AUTHOR-WIDTH has to be an integer.  When the name of the
+          author is shown, then this specifies how much space is used to
+          do so.
+
+   Also see the proceeding section for more options concerning status
+buffers.
+
+
+File: magit.info,  Node: Repository List,  Next: Logging,  Prev: Status Buffer,  Up: Inspecting
+
+5.2 Repository List
+===================
+
+ -- Command: magit-list-repositories
+     This command displays a list of repositories in a separate buffer.
+
+     The option ‘magit-repository-directories’ controls which
+     repositories are displayed.
+
+ -- User Option: magit-repolist-columns
+     This option controls what columns are displayed by the command
+     ‘magit-list-repositories’ and how they are displayed.
+
+     Each element has the form ‘(HEADER WIDTH FORMAT PROPS)’.
+
+     HEADER is the string displayed in the header.  WIDTH is the width
+     of the column.  FORMAT is a function that is called with one
+     argument, the repository identification (usually its basename), and
+     with ‘default-directory’ bound to the toplevel of its working tree.
+     It has to return a string to be inserted or ‘nil’.  PROPS is an
+     alist that supports the keys ‘:right-align’, ‘:pad-right’ and
+     ‘:sort’.
+
+     The ‘:sort’ function has a weird interface described in the
+     docstring of ‘tabulated-list--get-sort’.  Alternatively ‘<’ and
+     ‘magit-repolist-version<’ can be used as those functions are
+     automatically replaced with functions that satisfy the interface.
+     Set ‘:sort’ to ‘nil’ to inhibit sorting; if unspecified, then the
+     column is sortable using the default sorter.
+
+     You may wish to display a range of numeric columns using just one
+     character per column and without any padding between columns, in
+     which case you should use an appropriate HEADER, set WIDTH to 1,
+     and set ‘:pad-right’ to 9.  ‘+’ is substituted for numbers higher
+     than 9.
+
+The following functions can be added to the above option:
+
+ -- Function: magit-repolist-column-ident
+     This function inserts the identification of the repository.
+     Usually this is just its basename.
+
+ -- Function: magit-repolist-column-path
+     This function inserts the absolute path of the repository.
+
+ -- Function: magit-repolist-column-version
+     This function inserts a description of the repository's ‘HEAD’
+     revision.
+
+ -- Function: magit-repolist-column-branch
+     This function inserts the name of the current branch.
+
+ -- Function: magit-repolist-column-upstream
+     This function inserts the name of the upstream branch of the
+     current branch.
+
+ -- Function: magit-repolist-column-branches
+     This function inserts the number of branches.
+
+ -- Function: magit-repolist-column-stashes
+     This function inserts the number of stashes.
+
+ -- Function: magit-repolist-column-flag
+     This function inserts a flag as specified by
+     ‘magit-repolist-column-flag-alist’.
+
+     By default this indicates whether there are uncommitted changes.
+
+        • ‘N’ if there is at least one untracked file.
+        • ‘U’ if there is at least one unstaged file.
+        • ‘S’ if there is at least one staged file.
+
+     Only the first one of these that applies is shown.
+
+ -- Function: magit-repolist-column-flags
+     This functions insert all flags as specified by
+     ‘magit-repolist-column-flag-alist’.
+
+     This is an alternative to function ‘magit-repolist-column-flag’,
+     which only lists the first one found.
+
+ -- Function: magit-repolist-column-unpulled-from-upstream
+     This function inserts the number of upstream commits not in the
+     current branch.
+
+ -- Function: magit-repolist-column-unpulled-from-pushremote
+     This function inserts the number of commits in the push branch but
+     not the current branch.
+
+ -- Function: magit-repolist-column-unpushed-to-upstream
+     This function inserts the number of commits in the current branch
+     but not its upstream.
+
+ -- Function: magit-repolist-column-unpushed-to-pushremote
+     This function inserts the number of commits in the current branch
+     but not its push branch.
+
+The following commands are available in repolist buffers:
+
+‘<RET>’ (‘magit-repolist-status’)
+     This command shows the status for the repository at point.
+
+‘m’ (‘magit-repolist-mark’)
+     This command marks the repository at point.
+
+‘u’ (‘magit-repolist-unmark’)
+     This command unmarks the repository at point.
+
+‘f’ (‘magit-repolist-fetch’)
+     This command fetches all marked repositories.  If no repositories
+     are marked, then it offers to fetch all displayed repositories.
+
+‘5’ (‘magit-repolist-find-file-other-frame’)
+     This command reads a relative file-name (without completion) and
+     opens the respective file in each marked repository in a new frame.
+     If no repositories are marked, then it offers to do this for all
+     displayed repositories.
+
+
+File: magit.info,  Node: Logging,  Next: Diffing,  Prev: Repository List,  Up: Inspecting
+
+5.3 Logging
+===========
+
+The status buffer contains logs for the unpushed and unpulled commits,
+but that obviously isn't enough.  The transient prefix command
+‘magit-log’, on ‘l’, features several suffix commands, which show a
+specific log in a separate log buffer.
+
+   Like other transient prefix commands, ‘magit-log’ also features
+several infix arguments that can be changed before invoking one of the
+suffix commands.  However, in the case of the log transient, these
+arguments may be taken from those currently in use in the current
+repository's log buffer, depending on the value of
+‘magit-prefix-use-buffer-arguments’ (see *note Transient Arguments and
+Buffer Variables::).
+
+   For information about the various arguments, see *note
+(gitman)git-log::.  The switch ‘++order=VALUE’ is converted to one of
+‘--author-date-order’, ‘--date-order’, or ‘--topo-order’ before being
+passed to ‘git log’.
+
+   The log transient also features several reflog commands.  See *note
+Reflog::.
+
+‘l’ (‘magit-log’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+‘l l’ (‘magit-log-current’)
+     Show log for the current branch.  When ‘HEAD’ is detached or with a
+     prefix argument, show log for one or more revs read from the
+     minibuffer.
+
+‘l h’ (‘magit-log-head’)
+     Show log for ‘HEAD’.
+
+‘l u’ (‘magit-log-related’)
+     Show log for the current branch, its upstream and its push target.
+     When the upstream is a local branch, then also show its own
+     upstream.  When ‘HEAD’ is detached, then show log for that, the
+     previously checked out branch and its upstream and push-target.
+
+‘l o’ (‘magit-log-other’)
+     Show log for one or more revs read from the minibuffer.  The user
+     can input any revision or revisions separated by a space, or even
+     ranges, but only branches, tags, and a representation of the commit
+     at point are available as completion candidates.
+
+‘l L’ (‘magit-log-branches’)
+     Show log for all local branches and ‘HEAD’.
+
+‘l b’ (‘magit-log-all-branches’)
+     Show log for all local and remote branches and ‘HEAD’.
+
+‘l a’ (‘magit-log-all’)
+     Show log for all references and ‘HEAD’.
+
+   Two additional commands that show the log for the file or blob that
+is being visited in the current buffer exists, see *note Commands for
+Buffers Visiting Files::.  The command ‘magit-cherry’ also shows a log,
+see *note Cherries::.
+
+5.3.1 Refreshing Logs
+---------------------
+
+The transient prefix command ‘magit-log-refresh’, on ‘L’, can be used to
+change the log arguments used in the current buffer, without changing
+which log is shown.  This works in dedicated log buffers, but also in
+the status buffer.
+
+‘L’ (‘magit-log-refresh’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+‘L g’ (‘magit-log-refresh’)
+     This suffix command sets the local log arguments for the current
+     buffer.
+
+‘L s’ (‘magit-log-set-default-arguments’)
+     This suffix command sets the default log arguments for buffers of
+     the same type as that of the current buffer.  Other existing
+     buffers of the same type are not affected because their local
+     values have already been initialized.
+
+‘L w’ (‘magit-log-save-default-arguments’)
+     This suffix command sets the default log arguments for buffers of
+     the same type as that of the current buffer, and saves the value
+     for future sessions.  Other existing buffers of the same type are
+     not affected because their local values have already been
+     initialized.
+
+‘L L’ (‘magit-toggle-margin’)
+     Show or hide the margin.
+
+5.3.2 Log Buffer
+----------------
+
+‘L’ (‘magit-log-refresh’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+     See *note Refreshing Logs::.
+
+‘q’ (‘magit-log-bury-buffer’)
+     Bury the current buffer or the revision buffer in the same frame.
+     Like ‘magit-mode-bury-buffer’ (which see) but with a negative
+     prefix argument instead bury the revision buffer, provided it is
+     displayed in the current frame.
+
+‘C-c C-b’ (‘magit-go-backward’)
+     Move backward in current buffer's history.
+
+‘C-c C-f’ (‘magit-go-forward’)
+     Move forward in current buffer's history.
+
+‘C-c C-n’ (‘magit-log-move-to-parent’)
+     Move to a parent of the current commit.  By default, this is the
+     first parent, but a numeric prefix can be used to specify another
+     parent.
+
+‘j’ (‘magit-log-move-to-revision’)
+     Read a revision and move to it in current log buffer.
+
+     If the chosen reference or revision isn't being displayed in the
+     current log buffer, then inform the user about that and do nothing
+     else.
+
+     If invoked outside any log buffer, then display the log buffer of
+     the current repository first; creating it if necessary.
+
+‘<SPC>’ (‘magit-diff-show-or-scroll-up’)
+     Update the commit or diff buffer for the thing at point.
+
+     Either show the commit or stash at point in the appropriate buffer,
+     or if that buffer is already being displayed in the current frame
+     and contains information about that commit or stash, then instead
+     scroll the buffer up.  If there is no commit or stash at point,
+     then prompt for a commit.
+
+‘<DEL>’ (‘magit-diff-show-or-scroll-down’)
+     Update the commit or diff buffer for the thing at point.
+
+     Either show the commit or stash at point in the appropriate buffer,
+     or if that buffer is already being displayed in the current frame
+     and contains information about that commit or stash, then instead
+     scroll the buffer down.  If there is no commit or stash at point,
+     then prompt for a commit.
+
+‘=’ (‘magit-log-toggle-commit-limit’)
+     Toggle the number of commits the current log buffer is limited to.
+     If the number of commits is currently limited, then remove that
+     limit.  Otherwise set it to 256.
+
+‘+’ (‘magit-log-double-commit-limit’)
+     Double the number of commits the current log buffer is limited to.
+
+‘-’ (‘magit-log-half-commit-limit’)
+     Half the number of commits the current log buffer is limited to.
+
+ -- User Option: magit-log-auto-more
+     Insert more log entries automatically when moving past the last
+     entry.  Only considered when moving past the last entry with
+     ‘magit-goto-*-section’ commands.
+
+ -- User Option: magit-log-show-refname-after-summary
+     Whether to show the refnames after the commit summaries.  This is
+     useful if you use really long branch names.
+
+ -- User Option: magit-log-show-color-graph-limit
+     When showing more commits than specified by this option, then the
+     ‘--color’ argument, if specified, is silently dropped.  This is
+     necessary because the ‘ansi-color’ library, which is used to turn
+     control sequences into faces, is just too slow.
+
+ -- User Option: magit-log-show-signatures-limit
+     When showing more commits than specified by this option, then the
+     ‘--show-signature’ argument, if specified, is silently dropped.
+     This is necessary because checking the signature of a large number
+     of commits is just too slow.
+
+   Magit displays references in logs a bit differently from how Git does
+it.
+
+   Local branches are blue and remote branches are green.  Of course
+that depends on the used theme, as do the colors used for other types of
+references.  The current branch has a box around it, as do remote
+branches that are their respective remote's ‘HEAD’ branch.
+
+   If a local branch and its push-target point at the same commit, then
+their names are combined to preserve space and to make that relationship
+visible.  For example:
+
+     origin/feature
+     [green][blue-]
+
+     instead of
+
+     feature origin/feature
+     [blue-] [green-------]
+
+   Also note that while the transient features the ‘--show-signature’
+argument, that won't actually be used when enabled, because Magit
+defaults to use just one line per commit.  Instead the commit colorized
+to indicate the validity of the signed commit object, using the faces
+named ‘magit-signature-*’ (which see).
+
+   For a description of ‘magit-log-margin’ see *note Log Margin::.
+
+5.3.3 Log Margin
+----------------
+
+In buffers which show one or more logs, it is possible to show
+additional information about each commit in the margin.  The options
+used to configure the margin are named ‘magit-INFIX-margin’, where INFIX
+is the same as in the respective major-mode ‘magit-INFIX-mode’.  In
+regular log buffers that would be ‘magit-log-margin’.
+
+ -- User Option: magit-log-margin
+     This option specifies whether the margin is initially shown in
+     Magit-Log mode buffers and how it is formatted.
+
+     The value has the form ‘(INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH)’.
+
+        • If INIT is non-‘nil’, then the margin is shown initially.
+        • STYLE controls how to format the author or committer date.  It
+          can be one of ‘age’ (to show the age of the commit),
+          ‘age-abbreviated’ (to abbreviate the time unit to a
+          character), or a string (suitable for ‘format-time-string’) to
+          show the actual date.  Option
+          ‘magit-log-margin-show-committer-date’ controls which date is
+          being displayed.
+        • WIDTH controls the width of the margin.  This exists for
+          forward compatibility and currently the value should not be
+          changed.
+        • AUTHOR controls whether the name of the author is also shown
+          by default.
+        • AUTHOR-WIDTH has to be an integer.  When the name of the
+          author is shown, then this specifies how much space is used to
+          do so.
+
+   You can change the STYLE and AUTHOR-WIDTH of all ‘magit-INFIX-margin’
+options to the same values by customizing ‘magit-log-margin’ *before*
+‘magit’ is loaded.  If you do that, then the respective values for the
+other options will default to what you have set for that variable.
+Likewise if you set INIT in ‘magit-log-margin’ to ‘nil’, then that is
+used in the default of all other options.  But setting it to ‘t’, i.e.
+re-enforcing the default for that option, does not carry to other
+options.
+
+ -- User Option: magit-log-margin-show-committer-date
+     This option specifies whether to show the committer date in the
+     margin.  This option only controls whether the committer date is
+     displayed instead of the author date.  Whether some date is
+     displayed in the margin and whether the margin is displayed at all
+     is controlled by other options.
+
+‘L’ (‘magit-margin-settings’)
+     This transient prefix command binds the following suffix commands,
+     each of which changes the appearance of the margin in some way.
+
+   In some buffers that support the margin, ‘L’ is instead bound to
+‘magit-log-refresh’, but that transient features the same commands, and
+then some other unrelated commands.
+
+‘L L’ (‘magit-toggle-margin’)
+     This command shows or hides the margin.
+
+‘L l’ (‘magit-cycle-margin-style’)
+     This command cycles the style used for the margin.
+
+‘L d’ (‘magit-toggle-margin-details’)
+     This command shows or hides details in the margin.
+
+5.3.4 Select from Log
+---------------------
+
+When the user has to select a recent commit that is reachable from
+‘HEAD’, using regular completion would be inconvenient (because most
+humans cannot remember hashes or "HEAD~5", at least not without double
+checking).  Instead a log buffer is used to select the commit, which has
+the advantage that commits are presented in order and with the commit
+message.
+
+   Such selection logs are used when selecting the beginning of a rebase
+and when selecting the commit to be squashed into.
+
+   In addition to the key bindings available in all log buffers, the
+following additional key bindings are available in selection log
+buffers:
+
+‘C-c C-c’ (‘magit-log-select-pick’)
+     Select the commit at point and act on it.  Call
+     ‘magit-log-select-pick-function’ with the selected commit as
+     argument.
+
+‘C-c C-k’ (‘magit-log-select-quit’)
+     Abort selecting a commit, don't act on any commit.
+
+ -- User Option: magit-log-select-margin
+     This option specifies whether the margin is initially shown in
+     Magit-Log-Select mode buffers and how it is formatted.
+
+     The value has the form ‘(INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH)’.
+
+        • If INIT is non-‘nil’, then the margin is shown initially.
+        • STYLE controls how to format the author or committer date.  It
+          can be one of ‘age’ (to show the age of the commit),
+          ‘age-abbreviated’ (to abbreviate the time unit to a
+          character), or a string (suitable for ‘format-time-string’) to
+          show the actual date.  Option
+          ‘magit-log-margin-show-committer-date’ controls which date is
+          being displayed.
+        • WIDTH controls the width of the margin.  This exists for
+          forward compatibility and currently the value should not be
+          changed.
+        • AUTHOR controls whether the name of the author is also shown
+          by default.
+        • AUTHOR-WIDTH has to be an integer.  When the name of the
+          author is shown, then this specifies how much space is used to
+          do so.
+
+5.3.5 Reflog
+------------
+
+Also see *note (gitman)git-reflog::.
+
+   These reflog commands are available from the log transient.  See
+*note Logging::.
+
+‘l r’ (‘magit-reflog-current’)
+     Display the reflog of the current branch.
+
+‘l O’ (‘magit-reflog-other’)
+     Display the reflog of a branch or another ref.
+
+‘l H’ (‘magit-reflog-head’)
+     Display the ‘HEAD’ reflog.
+
+ -- User Option: magit-reflog-margin
+     This option specifies whether the margin is initially shown in
+     Magit-Reflog mode buffers and how it is formatted.
+
+     The value has the form ‘(INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH)’.
+
+        • If INIT is non-‘nil’, then the margin is shown initially.
+        • STYLE controls how to format the author or committer date.  It
+          can be one of ‘age’ (to show the age of the commit),
+          ‘age-abbreviated’ (to abbreviate the time unit to a
+          character), or a string (suitable for ‘format-time-string’) to
+          show the actual date.  Option
+          ‘magit-log-margin-show-committer-date’ controls which date is
+          being displayed.
+        • WIDTH controls the width of the margin.  This exists for
+          forward compatibility and currently the value should not be
+          changed.
+        • AUTHOR controls whether the name of the author is also shown
+          by default.
+        • AUTHOR-WIDTH has to be an integer.  When the name of the
+          author is shown, then this specifies how much space is used to
+          do so.
+
+5.3.6 Cherries
+--------------
+
+Cherries are commits that haven't been applied upstream (yet), and are
+usually visualized using a log.  Each commit is prefixed with ‘-’ if it
+has an equivalent in the upstream and ‘+’ if it does not, i.e., if it is
+a cherry.
+
+   The command ‘magit-cherry’ shows cherries for a single branch, but
+the references buffer (see *note References Buffer::) can show cherries
+for multiple "upstreams" at once.
+
+   Also see *note (gitman)git-reflog::.
+
+‘Y’ (‘magit-cherry’)
+     Show commits that are in a certain branch but that have not been
+     merged in the upstream branch.
+
+ -- User Option: magit-cherry-margin
+     This option specifies whether the margin is initially shown in
+     Magit-Cherry mode buffers and how it is formatted.
+
+     The value has the form ‘(INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH)’.
+
+        • If INIT is non-‘nil’, then the margin is shown initially.
+        • STYLE controls how to format the author or committer date.  It
+          can be one of ‘age’ (to show the age of the commit),
+          ‘age-abbreviated’ (to abbreviate the time unit to a
+          character), or a string (suitable for ‘format-time-string’) to
+          show the actual date.  Option
+          ‘magit-log-margin-show-committer-date’ controls which date is
+          being displayed.
+        • WIDTH controls the width of the margin.  This exists for
+          forward compatibility and currently the value should not be
+          changed.
+        • AUTHOR controls whether the name of the author is also shown
+          by default.
+        • AUTHOR-WIDTH has to be an integer.  When the name of the
+          author is shown, then this specifies how much space is used to
+          do so.
+
+
+File: magit.info,  Node: Diffing,  Next: Ediffing,  Prev: Logging,  Up: Inspecting
+
+5.4 Diffing
+===========
+
+The status buffer contains diffs for the staged and unstaged commits,
+but that obviously isn't enough.  The transient prefix command
+‘magit-diff’, on ‘d’, features several suffix commands, which show a
+specific diff in a separate diff buffer.
+
+   Like other transient prefix commands, ‘magit-diff’ also features
+several infix arguments that can be changed before invoking one of the
+suffix commands.  However, in the case of the diff transient, these
+arguments may be taken from those currently in use in the current
+repository's diff buffer, depending on the value of
+‘magit-prefix-use-buffer-arguments’ (see *note Transient Arguments and
+Buffer Variables::).
+
+   Also see *note (gitman)git-diff::.
+
+‘d’ (‘magit-diff’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+‘d d’ (‘magit-diff-dwim’)
+     Show changes for the thing at point.
+
+     For example, if point is on a commit, show the changes introduced
+     by that commit.  Likewise if point is on the section titled
+     "Unstaged changes", then show those changes in a separate buffer.
+     Generally speaking, compare the thing at point with the most
+     logical, trivial and (in *any* situation) at least potentially
+     useful other thing it could be compared to.
+
+     When the region selects commits, then compare the two commits at
+     either end.  There are different ways two commits can be compared.
+     In the buffer showing the diff, you can control how the comparison,
+     is done, using "D r" and "D f".
+
+     This function does not always show the changes that you might want
+     to view in any given situation.  You can think of the changes being
+     shown as the smallest common denominator.  There is no AI involved.
+     If this command never does what you want, then ignore it, and
+     instead use the commands that allow you to explicitly specify what
+     you need.
+
+‘d r’ (‘magit-diff-range’)
+     Show differences between two commits.
+
+     RANGE should be a range (A..B or A...B) but can also be a single
+     commit.  If one side of the range is omitted, then it defaults to
+     ‘HEAD’.  If just a commit is given, then changes in the working
+     tree relative to that commit are shown.
+
+     If the region is active, use the revisions on the first and last
+     line of the region.  With a prefix argument, instead of diffing the
+     revisions, choose a revision to view changes along, starting at the
+     common ancestor of both revisions (i.e., use a "..." range).
+
+‘d w’ (‘magit-diff-working-tree’)
+     Show changes between the current working tree and the ‘HEAD’
+     commit.  With a prefix argument show changes between the working
+     tree and a commit read from the minibuffer.
+
+‘d s’ (‘magit-diff-staged’)
+     Show changes between the index and the ‘HEAD’ commit.  With a
+     prefix argument show changes between the index and a commit read
+     from the minibuffer.
+
+‘d u’ (‘magit-diff-unstaged’)
+     Show changes between the working tree and the index.
+
+‘d p’ (‘magit-diff-paths’)
+     Show changes between any two files on disk.
+
+   All of the above suffix commands update the repository's diff buffer.
+The diff transient also features two commands which show differences in
+another buffer:
+
+‘d c’ (‘magit-show-commit’)
+     Show the commit at point.  If there is no commit at point or with a
+     prefix argument, prompt for a commit.
+
+‘d t’ (‘magit-stash-show’)
+     Show all diffs of a stash in a buffer.
+
+   Two additional commands that show the diff for the file or blob that
+is being visited in the current buffer exists, see *note Commands for
+Buffers Visiting Files::.
+
+5.4.1 Refreshing Diffs
+----------------------
+
+The transient prefix command ‘magit-diff-refresh’, on ‘D’, can be used
+to change the diff arguments used in the current buffer, without
+changing which diff is shown.  This works in dedicated diff buffers, but
+also in the status buffer.
+
+   (There is one exception; diff arguments cannot be changed in buffers
+created by ‘magit-merge-preview’ because the underlying Git command does
+not support these arguments.)
+
+‘D’ (‘magit-diff-refresh’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+‘D g’ (‘magit-diff-refresh’)
+     This suffix command sets the local diff arguments for the current
+     buffer.
+
+‘D s’ (‘magit-diff-set-default-arguments’)
+     This suffix command sets the default diff arguments for buffers of
+     the same type as that of the current buffer.  Other existing
+     buffers of the same type are not affected because their local
+     values have already been initialized.
+
+‘D w’ (‘magit-diff-save-default-arguments’)
+     This suffix command sets the default diff arguments for buffers of
+     the same type as that of the current buffer, and saves the value
+     for future sessions.  Other existing buffers of the same type are
+     not affected because their local values have already been
+     initialized.
+
+‘D t’ (‘magit-diff-toggle-refine-hunk’)
+     This command toggles hunk refinement on or off, or switches the
+     refinement method.
+
+     If hunk refinement is currently on, then turn off hunk refinement.
+     If hunk refinement is off, then turn on immediate hunk refinement.
+
+     With a prefix argument, an alternative refinement method comes into
+     play.  When using that method, mode hunks are not refined
+     immediately, instead each hunk is refined once it is selected, and
+     then stays refined until the next refresh of the buffer.  If hunk
+     refinement is currently on, then toggle between refining all hunks
+     up front or only once they are selected.  If hunk refinement is
+     off, then turn on hunk refinement, using the eventual refinement
+     method.
+
+     Customize option ‘magit-diff-refine-hunk’ to change the default
+     method.
+
+‘D T’ (‘magit-diff-toggle-fontify-hunk’)
+     This command toggles hunk fontification on or off, or switches the
+     fontification method.
+
+     If hunk fontification is currently on, then turn off hunk
+     fontification.  If hunk fontification is off, then turn on
+     immediate hunk fontification.
+
+     With a prefix argument, an alternative fontification method comes
+     into play.  When using that method, mode hunks are not refined
+     immediately, instead each hunk is refined once it is selected, and
+     then stays refined until the next refresh of the buffer.  If hunk
+     fontification is currently on, then toggle between refining all
+     hunks up front or only once they are selected.  If hunk
+     fontification is off, then turn on fontification, using the
+     eventual fontification method.
+
+     Customize option ‘magit-diff-fontify-hunk’ to change the default
+     method.
+
+‘D r’ (‘magit-diff-switch-range-type’)
+     This command converts the diff range type from "revA..revB" to
+     "revB...revA", or vice versa.
+
+‘D f’ (‘magit-diff-flip-revs’)
+     This command swaps revisions in the diff range from "revA..revB" to
+     "revB..revA", or vice versa.
+
+‘D F’ (‘magit-diff-toggle-file-filter’)
+     This command toggles the file restriction of the diffs in the
+     current buffer, allowing you to quickly switch between viewing all
+     the changes in the commit and the restricted subset.  As a special
+     case, when this command is called from a log buffer, it toggles the
+     file restriction in the repository's revision buffer, which is
+     useful when you display a revision from a log buffer that is
+     restricted to a file or files.
+
+   In addition to the above transient, which allows changing any of the
+supported arguments, there also exist some commands that change only a
+particular argument.
+
+‘-’ (‘magit-diff-less-context’)
+     This command decreases the context for diff hunks by COUNT lines.
+
+‘+’ (‘magit-diff-more-context’)
+     This command increases the context for diff hunks by COUNT lines.
+
+‘0’ (‘magit-diff-default-context’)
+     This command resets the context for diff hunks to the default
+     height.
+
+   The following commands quickly change what diff is being displayed
+without having to using one of the diff transient.
+
+‘C-c C-d’ (‘magit-diff-while-committing’)
+     While committing, this command shows the changes that are about to
+     be committed.  While amending, invoking the command again toggles
+     between showing just the new changes or all the changes that will
+     be committed.
+
+     This binding is available in the diff buffer as well as the commit
+     message buffer.
+
+‘C-c C-b’ (‘magit-go-backward’)
+     This command moves backward in current buffer's history.
+
+‘C-c C-f’ (‘magit-go-forward’)
+     This command moves forward in current buffer's history.
+
+5.4.2 Commands Available in Diffs
+---------------------------------
+
+Some commands are only available if point is inside a diff.
+
+   ‘magit-diff-visit-file’ and related commands visit the appropriate
+version of the file that the diff at point is about.  Likewise
+‘magit-diff-visit-worktree-file’ and related commands visit the worktree
+version of the file that the diff at point is about.  See *note Visiting
+Files and Blobs from a Diff:: for more information and the key bindings.
+
+‘C-c C-t’ (‘magit-diff-trace-definition’)
+     This command shows a log for the definition at point.
+
+ -- User Option: magit-log-trace-definition-function
+     The function specified by this option is used by
+     ‘magit-log-trace-definition’ to determine the function at point.
+     For major-modes that have special needs, you could set the local
+     value using the mode's hook.
+
+‘C-c C-e’ (‘magit-diff-edit-hunk-commit’)
+     From a hunk, this command edits the respective commit and visits
+     the file.
+
+     First it visits the file being modified by the hunk at the correct
+     location using ‘magit-diff-visit-file’.  This actually visits a
+     blob.  When point is on a diff header, not within an individual
+     hunk, then this visits the blob the first hunk is about.
+
+     Then it invokes ‘magit-edit-line-commit’, which uses an interactive
+     rebase to make the commit editable, or if that is not possible
+     because the commit is not reachable from ‘HEAD’ by checking out
+     that commit directly.  This also causes the actual worktree file to
+     be visited.
+
+     Neither the blob nor the file buffer are killed when finishing the
+     rebase.  If that is undesirable, then it might be better to use
+     ‘magit-rebase-edit-commit’ instead of this command.
+
+‘j’ (‘magit-jump-to-diffstat-or-diff’)
+     This command jumps to the diffstat or diff.  When point is on a
+     file inside the diffstat section, then jump to the respective diff
+     section.  Otherwise, jump to the diffstat section or a child
+     thereof.
+
+   The next two commands are not specific to Magit-Diff mode (or and
+Magit buffer for that matter), but it might be worth pointing out that
+they are available here too.
+
+‘<SPC>’ (‘scroll-up’)
+     This command scrolls text upward.
+
+‘<DEL>’ (‘scroll-down’)
+     This command scrolls text downward.
+
+5.4.3 Diff Options
+------------------
+
+ -- User Option: magit-diff-refine-hunk
+     Whether to show word-granularity differences within diff hunks.
+
+        • ‘nil’ Never show fine differences.
+        • ‘all’ Show fine differences for all displayed diff hunks.
+        • ‘t’ Refine each hunk once it becomes the current section.
+          Keep the refinement when another section is selected.
+          Refreshing the buffer removes all refinement.  This variant is
+          only provided for performance reasons.
+
+ -- User Option: magit-diff-refine-ignore-whitespace
+     Whether to ignore whitespace changes in word-granularity
+     differences.
+
+ -- User Option: magit-diff-fontify-hunk
+     Whether to apply syntax highlighting to diff hunks.
+
+        • ‘nil’ Never fontify diff hunks.
+        • ‘all’ Fontify all diff hunks.
+        • ‘t’ Fontify each hunk once it becomes the current section.
+          Keep the fontification when another section is selected.
+          Refreshing the buffer removes all fontification.  This variant
+          is only provided for performance reasons.
+
+     If this is enabled, then ‘magit-diff-specify-hunk-foreground’
+     should be disabled.  Also consider enabling
+     ‘magit-diff-use-indicator-faces’.  Emacs has to be restarted, after
+     changing the value of the former.
+
+     This is considered experimental and is disabled by default, because
+     the fontification is done synchronously, and that can lead to a
+     noticeable delay.  The plan is to make it asynchronous, probably
+     with the help of the new ‘futur’ package, which itself still under
+     heavy development.
+
+ -- User Option: magit-diff-specify-hunk-foreground
+     Whether to specify foreground colors for hunk faces.
+
+     Setting this only has an effect if done before Magit is loaded.
+
+ -- User Option: magit-diff-use-indicator-faces
+     Whether to use separate faces for diff side indicators.
+
+     If non-‘nil’, use, for example, ‘magit-diff-removed-indicator’ for
+     the plus sign at the beginning of a removed line.  If ‘nil’, use
+     the same face as for the rest of the line.
+
+ -- User Option: magit-diff-adjust-tab-width
+     Whether to adjust the width of tabs in diffs.
+
+     Determining the correct width can be expensive if it requires
+     opening large and/or many files, so the widths are cached in the
+     variable ‘magit-diff--tab-width-cache’.  Set that to ‘nil’ to
+     invalidate the cache.
+
+        • ‘nil’ Never adjust tab width.  Use 'tab-width's value from the
+          Magit buffer itself instead.
+
+        • ‘t’ If the corresponding file-visiting buffer exits, then use
+          ‘tab-width’'s value from that buffer.  Doing this is cheap, so
+          this value is used even if a corresponding cache entry exists.
+
+        • ‘always’ If there is no such buffer, then temporarily visit
+          the file to determine the value.
+
+        • NUMBER Like ‘always’, but don't visit files larger than NUMBER
+          bytes.
+
+ -- User Option: magit-diff-paint-whitespace
+     Specify where to highlight whitespace errors.
+
+     See ‘magit-diff-highlight-trailing’,
+     ‘magit-diff-highlight-indentation’.  The symbol ‘t’ means in all
+     diffs, ‘status’ means only in the status buffer, and ‘nil’ means
+     nowhere.
+
+        • ‘nil’ Never highlight whitespace errors.
+        • ‘t’ Highlight whitespace errors everywhere.
+        • ‘uncommitted’ Only highlight whitespace errors in diffs
+          showing uncommitted changes.  For backward compatibility
+          ‘status’ is treated as a synonym.
+
+ -- User Option: magit-diff-paint-whitespace-lines
+     Specify in what kind of lines to highlight whitespace errors.
+
+        • ‘t’ Highlight only in added lines.
+        • ‘both’ Highlight in added and removed lines.
+        • ‘all’ Highlight in added, removed and context lines.
+
+ -- User Option: magit-diff-highlight-trailing
+     Whether to highlight whitespace at the end of a line in diffs.
+     Used only when ‘magit-diff-paint-whitespace’ is non-‘nil’.
+
+ -- User Option: magit-diff-highlight-indentation
+     This option controls whether to highlight the indentation in case
+     it used the "wrong" indentation style.  Indentation is only
+     highlighted if ‘magit-diff-paint-whitespace’ is also non-‘nil’.
+
+     The value is an alist of the form ‘((REGEXP . INDENT)...)’.  The
+     path to the current repository is matched against each element in
+     reverse order.  Therefore if a REGEXP matches, then earlier
+     elements are not tried.
+
+     If the used INDENT is ‘tabs’, highlight indentation with tabs.  If
+     INDENT is an integer, highlight indentation with at least that many
+     spaces.  Otherwise, highlight neither.
+
+ -- User Option: magit-diff-hide-trailing-cr-characters
+     Whether to hide ^M characters at the end of a line in diffs.
+
+ -- User Option: magit-diff-highlight-hunk-region-functions
+     This option specifies the functions used to highlight the
+     hunk-internal region.
+
+     ‘magit-diff-highlight-hunk-region-dim-outside’ overlays the outside
+     of the hunk internal selection with a face that causes the added
+     and removed lines to have the same background color as context
+     lines.  This function should not be removed from the value of this
+     option.
+
+     ‘magit-diff-highlight-hunk-region-using-overlays’ and
+     ‘magit-diff-highlight-hunk-region-using-underline’ emphasize the
+     region by placing delimiting horizontal lines before and after it.
+     Both of these functions have glitches which cannot be fixed due to
+     limitations of Emacs' display engine.  For more information see
+     <https://github.com/magit/magit/issues/2758> ff.
+
+     Instead of, or in addition to, using delimiting horizontal lines,
+     to emphasize the boundaries, you may wish to emphasize the text
+     itself, using ‘magit-diff-highlight-hunk-region-using-face’.
+
+     In terminal frames it's not possible to draw lines as the overlay
+     and underline variants normally do, so there they fall back to
+     calling the face function instead.
+
+ -- User Option: magit-diff-unmarked-lines-keep-foreground
+     This option controls whether added and removed lines outside the
+     hunk-internal region only lose their distinct background color or
+     also the foreground color.  Whether the outside of the region is
+     dimmed at all depends on
+     ‘magit-diff-highlight-hunk-region-functions’.
+
+ -- User Option: magit-diff-extra-stat-arguments
+     This option specifies additional arguments to be used alongside
+     ‘--stat’.
+
+     The value is a list of zero or more arguments or a function that
+     takes no argument and returns such a list.  These arguments are
+     allowed here: ‘--stat-width’, ‘--stat-name-width’,
+     ‘--stat-graph-width’ and ‘--compact-summary’.  Also see *note
+     (gitman)git-diff::.
+
+ -- User Option: magit-format-file-function
+     This function is used to format lines representing a file.  It is
+     used for file headings in diffs, in diffstats and for lists of
+     files (such as the untracked files).  Depending on the caller, it
+     receives either three or five arguments; the signature has to be
+     ‘(kind file face &optional status orig)’.  KIND is one of ‘diff’,
+     ‘module’, ‘stat’ and ‘list’.
+
+5.4.4 Revision Buffer
+---------------------
+
+ -- User Option: magit-revision-insert-related-refs
+     Whether to show related branches in revision buffers.
+
+        • ‘nil’ Don't show any related branches.
+        • ‘t’ Show related local branches.
+        • ‘all’ Show related local and remote branches.
+        • ‘mixed’ Show all containing branches and local merged
+          branches.
+
+ -- User Option: magit-revision-show-gravatars
+     Whether to show gravatar images in revision buffers.
+
+     If ‘nil’, then don't insert any gravatar images.  If ‘t’, then
+     insert both images.  If ‘author’ or ‘committer’, then insert only
+     the respective image.
+
+     If you have customized the option ‘magit-revision-headers-format’
+     and want to insert the images then you might also have to specify
+     where to do so.  In that case the value has to be a cons-cell of
+     two regular expressions.  The car specifies where to insert the
+     author's image.  The top half of the image is inserted right after
+     the matched text, the bottom half on the next line in the same
+     column.  The cdr specifies where to insert the committer's image,
+     accordingly.  Either the car or the cdr may be ‘nil’."
+
+ -- User Option: magit-revision-use-hash-sections
+     Whether to turn hashes inside the commit message into sections.
+
+     If non-‘nil’, then hashes inside the commit message are turned into
+     ‘commit’ sections.  There is a trade off to be made between
+     performance and reliability:
+
+        • ‘slow’ calls git for every word to be absolutely sure.
+        • ‘quick’ skips words less than seven characters long.
+        • ‘quicker’ additionally skips words that don't contain a
+          number.
+        • ‘quickest’ uses all words that are at least seven characters
+          long and which contain at least one number as well as at least
+          one letter.
+
+     If ‘nil’, then no hashes are turned into sections, but you can
+     still visit the commit at point using "RET".
+
+   The diffs shown in the revision buffer may be automatically
+restricted to a subset of the changed files.  If the revision buffer is
+displayed from a log buffer, the revision buffer will share the same
+file restriction as that log buffer (also see the command
+‘magit-diff-toggle-file-filter’).
+
+ -- User Option: magit-revision-filter-files-on-follow
+     Whether showing a commit from a log buffer honors the log's file
+     filter when the log arguments include ‘--follow’.
+
+     When this option is ‘nil’, displaying a commit from a log ignores
+     the log's file filter if the log arguments include ‘--follow’.
+     Doing so avoids showing an empty diff in revision buffers for
+     commits before a rename event.  In such cases, the ‘--patch’
+     argument of the log transient can be used to show the
+     file-restricted diffs inline.
+
+     Set this option to non-‘nil’ to keep the log's file restriction
+     even if ‘--follow’ is present in the log arguments.
+
+   If the revision buffer is not displayed from a log buffer, the file
+restriction is determined as usual (see *note Transient Arguments and
+Buffer Variables::).
+
+ -- User Option: magit-revision-use-dedicated-buffers
+     Whether ‘magit-show-commit’ uses a dedicated buffer for each
+     revision.
+
+     If this is ‘nil’, then each revision is initially displayed in the
+     same per-repository buffer.  You can then lock that buffer to the
+     revision; if you later display another revision, the locked buffer
+     continues to display the same revision as before and the new
+     revision is displayed in another bufer.
+
+     If this is ‘t’, then each revision is displayed in a dedicated
+     buffer.  A revision buffer is only reused (i.e., raised), if it
+     already displays the requested revision.  If you enable this, you
+     will quickly accumulate revision buffers and will have to find a
+     way to keep that under control.
+     ‘magit-{blame,log,status}-maybe-update-revision-buffer’ also will
+     stop working, if this is enabled.  For these reasons it is
+     recommended, that you do not enable this."
+
+
+File: magit.info,  Node: Ediffing,  Next: References Buffer,  Prev: Diffing,  Up: Inspecting
+
+5.5 Ediffing
+============
+
+This section describes how to enter Ediff from Magit buffers.  For
+information on how to use Ediff itself, see *note (ediff)Top::.
+
+‘e’ (‘magit-ediff-dwim’)
+     Compare, stage, or resolve using Ediff.
+
+     This command tries to guess what file, and what commit or range the
+     user wants to compare, stage, or resolve using Ediff.  It might
+     only be able to guess either the file, or range/commit, in which
+     case the user is asked about the other.  It might not always guess
+     right, in which case the appropriate ‘magit-ediff-*’ command has to
+     be used explicitly.  If it cannot read the user's mind at all, then
+     it asks the user for a command to run.
+
+‘E’ (‘magit-ediff’)
+     This transient prefix command binds the following suffix commands
+     and displays them in a temporary buffer until a suffix is invoked.
+
+‘E r’ (‘magit-ediff-compare’)
+     Compare two revisions of a file using Ediff.
+
+     If the region is active, use the revisions on the first and last
+     line of the region.  With a prefix argument, instead of diffing the
+     revisions, choose a revision to view changes along, starting at the
+     common ancestor of both revisions (i.e., use a "..." range).
+
+‘E m’ (‘magit-ediff-resolve-rest’)
+     This command allows you to resolve outstanding conflicts in the
+     file at point using Ediff.  If there is no file at point or if it
+     doesn't have any unmerged changes, then this command prompts for a
+     file.
+
+     Provided that the value of ‘merge.conflictstyle’ is ‘diff3’, you
+     can view the file's merge-base revision using ‘/’ in the Ediff
+     control buffer.
+
+     The A, B and Ancestor buffers are constructed from the conflict
+     markers in the worktree file.  Because you and/or Git may have
+     already resolved some conflicts, that means that these buffers may
+     not contain the actual versions from the respective blobs.
+
+‘E M’ (‘magit-ediff-resolve-all’)
+     This command allows you to resolve all conflicts in the file at
+     point using Ediff.  If there is no file at point or if it doesn't
+     have any unmerged changes, then this command prompts for a file.
+
+     Provided that the value of ‘merge.conflictstyle’ is ‘diff3’, you
+     can view the file's merge-base revision using ‘/’ in the Ediff
+     control buffer.
+
+     First the file in the worktree is moved aside, appending the suffix
+     ‘.ORIG’, so that you could later go back to that version.  Then it
+     is reconstructed from the two sides of the conflict and the
+     merge-base, if available.
+
+     It would be nice if the worktree file were just used as-is, but
+     Ediff does not support that.  This means that all conflicts, that
+     Git has already resolved, are restored.  On the other hand Ediff
+     also tries to resolve conflicts, and in many cases Ediff and Git
+     should produce similar results.
+
+     However if you have already resolved some conflicts manually, then
+     those changes are discarded (though you can recover them from the
+     backup file).  In such cases ‘magit-ediff-resolve-rest’ might be
+     more suitable.
+
+     The advantage that this command has over ‘magit-ediff-resolve-rest’
+     is that the A, B and Ancestor buffers correspond to blobs from the
+     respective commits, allowing you to inspect a side in context and
+     to use Magit commands in these buffers to do so.  Blame and log
+     commands are particularly useful here.
+
+‘E t’ (‘magit-git-mergetool’)
+     This command does not actually use Ediff.  While it serves the same
+     purpose as ‘magit-ediff-resolve-rest’, it uses ‘git mergetool
+     --gui’ to resolve conflicts.
+
+     With a prefix argument this acts as a transient prefix command,
+     allowing the user to select the mergetool and change some settings.
+
+‘E s’ (‘magit-ediff-stage’)
+     Stage and unstage changes to a file using Ediff, defaulting to the
+     file at point.
+
+‘E u’ (‘magit-ediff-show-unstaged’)
+     Show unstaged changes to a file using Ediff.
+
+‘E i’ (‘magit-ediff-show-staged’)
+     Show staged changes to a file using Ediff.
+
+‘E w’ (‘magit-ediff-show-working-tree’)
+     Show changes in a file between ‘HEAD’ and working tree using Ediff.
+
+‘E c’ (‘magit-ediff-show-commit’)
+     Show changes to a file introduced by a commit using Ediff.
+
+‘E z’ (‘magit-ediff-show-stash’)
+     Show changes to a file introduced by a stash using Ediff.
+
+ -- User Option: magit-ediff-dwim-resolve-function
+     This option controls which function ‘magit-ediff-dwim’ uses to
+     resolve conflicts.  One of ‘magit-ediff-resolve-rest’,
+     ‘magit-ediff-resolve-all’ or ‘magit-git-mergetool’; which are all
+     discussed above.
+
+ -- User Option: magit-ediff-dwim-show-on-hunks
+     This option controls what command ‘magit-ediff-dwim’ calls when
+     point is on uncommitted hunks.  When ‘nil’, always run
+     ‘magit-ediff-stage’.  Otherwise, use ‘magit-ediff-show-staged’ and
+     ‘magit-ediff-show-unstaged’ to show staged and unstaged changes,
+     respectively.
+
+ -- User Option: magit-ediff-show-stash-with-index
+     This option controls whether ‘magit-ediff-show-stash’ includes a
+     buffer containing the file's state in the index at the time the
+     stash was created.  This makes it possible to tell which changes in
+     the stash were staged.
+
+ -- User Option: magit-ediff-quit-hook
+     This hook is run after quitting an Ediff session that was created
+     using a Magit command.  The hook functions are run inside the Ediff
+     control buffer, and should not change the current buffer.
+
+     This is similar to ‘ediff-quit-hook’ but takes the needs of Magit
+     into account.  The regular ‘ediff-quit-hook’ is ignored by Ediff
+     sessions that were created using a Magit command.
+
+
+File: magit.info,  Node: References Buffer,  Next: Bisecting,  Prev: Ediffing,  Up: Inspecting
+
+5.6 References Buffer
+=====================
+
+‘y’ (‘magit-show-refs’)
+     This command lists branches and tags in a dedicated buffer.
+
+     However if this command is invoked again from this buffer or if it
+     is invoked with a prefix argument, then it acts as a transient
+     prefix command, which binds the following suffix commands and some
+     infix arguments.
+
+   All of the following suffix commands list exactly the same branches
+and tags.  The only difference the optional feature that can be enabled
+by changing the value of ‘magit-refs-show-commit-count’ (see below).
+These commands specify a different branch or commit against which all
+the other references are compared.
+
+‘y y’ (‘magit-show-refs-head’)
+     This command lists branches and tags in a dedicated buffer.  Each
+     reference is being compared with ‘HEAD’.
+
+‘y c’ (‘magit-show-refs-current’)
+     This command lists branches and tags in a dedicated buffer.  Each
+     reference is being compared with the current branch or ‘HEAD’ if it
+     is detached.
+
+‘y o’ (‘magit-show-refs-other’)
+     This command lists branches and tags in a dedicated buffer.  Each
+     reference is being compared with a branch read from the user.
+
+‘y r’ (‘magit-refs-set-show-commit-count’)
+     This command changes for which refs the commit count is shown.
+
+ -- User Option: magit-refs-show-commit-count
+     Whether to show commit counts in Magit-Refs mode buffers.
+
+        • ‘all’ Show counts for branches and tags.
+        • ‘branch’ Show counts for branches only.
+        • ‘nil’ Never show counts.
+
+     The default is ‘nil’ because anything else can be very expensive.
+
+ -- User Option: magit-refs-pad-commit-counts
+     Whether to pad all commit counts on all sides in Magit-Refs mode
+     buffers.
+
+     If this is ‘nil’, then some commit counts are displayed right next
+     to one of the branches that appear next to the count, without any
+     space in between.  This might look bad if the branch name faces
+     look too similar to ‘magit-dimmed’.
+
+     If this is non-‘nil’, then spaces are placed on both sides of all
+     commit counts.
+
+ -- User Option: magit-refs-show-remote-prefix
+     Whether to show the remote prefix in lists of remote branches.
+
+     Showing the prefix is redundant because the name of the remote is
+     already shown in the heading preceding the list of its branches.
+
+ -- User Option: magit-refs-primary-column-width
+     Width of the primary column in 'magit-refs-mode' buffers.  The
+     primary column is the column that contains the name of the branch
+     that the current row is about.
+
+     If this is an integer, then the column is that many columns wide.
+     Otherwise it has to be a cons-cell of two integers.  The first
+     specifies the minimal width, the second the maximal width.  In that
+     case the actual width is determined using the length of the names
+     of the shown local branches.  (Remote branches and tags are not
+     taken into account when calculating to optimal width.)
+
+ -- User Option: magit-refs-focus-column-width
+     Width of the focus column in 'magit-refs-mode' buffers.
+
+     The focus column is the first column, which marks one branch
+     (usually the current branch) as the focused branch using ‘*’ or
+     ‘@’.  For each other reference, this column optionally shows how
+     many commits it is ahead of the focused branch and ‘<’, or if it
+     isn't ahead then the commits it is behind and ‘>’, or if it isn't
+     behind either, then a ‘=’.
+
+     This column may also display only ‘*’ or ‘@’ for the focused
+     branch, in which case this option is ignored.  Use ‘L v’ to change
+     the verbosity of this column.
+
+ -- User Option: magit-refs-margin
+     This option specifies whether the margin is initially shown in
+     Magit-Refs mode buffers and how it is formatted.
+
+     The value has the form ‘(INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH)’.
+
+        • If INIT is non-‘nil’, then the margin is shown initially.
+        • STYLE controls how to format the author or committer date.  It
+          can be one of ‘age’ (to show the age of the commit),
+          ‘age-abbreviated’ (to abbreviate the time unit to a
+          character), or a string (suitable for ‘format-time-string’) to
+          show the actual date.  Option
+          ‘magit-log-margin-show-committer-date’ controls which date is
+          being displayed.
+        • WIDTH controls the width of the margin.  This exists for
+          forward compatibility and currently the value should not be
+          changed.
+        • AUTHOR controls whether the name of the author is also shown
+          by default.
+        • AUTHOR-WIDTH has to be an integer.  When the name of the
+          author is shown, then this specifies how much space is used to
+          do so.
+
+ -- User Option: magit-refs-margin-for-tags
+     This option specifies whether to show information about tags in the
+     margin.  This is disabled by default because it is slow if there
+     are many tags.
+
+   The following variables control how individual refs are displayed.
+If you change one of these variables (especially the "%c" part), then
+you should also change the others to keep things aligned.  The following
+%-sequences are supported:
+
+   • ‘%a’ Number of commits this ref has over the one we compare to.
+   • ‘%b’ Number of commits the ref we compare to has over this one.
+   • ‘%c’ Number of commits this ref has over the one we compare to.
+     For the ref which all other refs are compared this is instead "@",
+     if it is the current branch, or "#" otherwise.
+   • ‘%C’ For the ref which all other refs are compared this is "@", if
+     it is the current branch, or "#" otherwise.  For all other refs "
+     ".
+   • ‘%h’ Hash of this ref's tip.
+   • ‘%m’ Commit summary of the tip of this ref.
+   • ‘%n’ Name of this ref.
+   • ‘%u’ Upstream of this local branch.
+   • ‘%U’ Upstream of this local branch and additional local vs.
+     upstream information.
+
+ -- User Option: magit-refs-filter-alist
+     The purpose of this option is to forgo displaying certain refs
+     based on their name.  If you want to not display any refs of a
+     certain type, then you should remove the appropriate function from
+     ‘magit-refs-sections-hook’ instead.
+
+     This alist controls which tags and branches are omitted from being
+     displayed in ‘magit-refs-mode’ buffers.  If it is ‘nil’, then all
+     refs are displayed (subject to ‘magit-refs-sections-hook’).
+
+     All keys are tried in order until one matches.  Then its value is
+     used and subsequent elements are ignored.  If the value is
+     non-‘nil’, then the reference is displayed, otherwise it is not.
+     If no element matches, then the reference is displayed.
+
+     A key can either be a regular expression that the refname has to
+     match, or a function that takes the refname as only argument and
+     returns a boolean.  A remote branch such as "origin/master" is
+     displayed as just "master", however for this comparison the former
+     is used.
+
+‘<RET>’ (‘magit-visit-ref’)
+     This command visits the reference or revision at point in another
+     buffer.  If there is no revision at point or with a prefix argument
+     then it prompts for a revision.
+
+     This command behaves just like ‘magit-show-commit’ as described
+     above, except if point is on a reference in a ‘magit-refs-mode’
+     buffer, in which case the behavior may be different, but only if
+     you have customized the option ‘magit-visit-ref-behavior’.
+
+ -- User Option: magit-visit-ref-behavior
+     This option controls how ‘magit-visit-ref’ behaves in
+     ‘magit-refs-mode’ buffers.
+
+     By default ‘magit-visit-ref’ behaves like ‘magit-show-commit’, in
+     all buffers, including ‘magit-refs-mode’ buffers.  When the type of
+     the section at point is ‘commit’ then "RET" is bound to
+     ‘magit-show-commit’, and when the type is either ‘branch’ or ‘tag’
+     then it is bound to ‘magit-visit-ref’.
+
+     "RET" is one of Magit's most essential keys and at least by default
+     it should behave consistently across all of Magit, especially
+     because users quickly learn that it does something very harmless;
+     it shows more information about the thing at point in another
+     buffer.
+
+     However "RET" used to behave differently in ‘magit-refs-mode’
+     buffers, doing surprising things, some of which cannot really be
+     described as "visit this thing".  If you've grown accustomed this
+     behavior, you can restore it by adding one or more of the below
+     symbols to the value of this option.  But keep in mind that by
+     doing so you don't only introduce inconsistencies, you also lose
+     some functionality and might have to resort to ‘M-x
+     magit-show-commit’ to get it back.
+
+     ‘magit-visit-ref’ looks for these symbols in the order in which
+     they are described here.  If the presence of a symbol applies to
+     the current situation, then the symbols that follow do not affect
+     the outcome.
+
+        • ‘focus-on-ref’
+
+          With a prefix argument update the buffer to show commit counts
+          and lists of cherry commits relative to the reference at point
+          instead of relative to the current buffer or ‘HEAD’.
+
+          Instead of adding this symbol, consider pressing "C-u y o
+          RET".
+
+        • ‘create-branch’
+
+          If point is on a remote branch, then create a new local branch
+          with the same name, use the remote branch as its upstream, and
+          then check out the local branch.
+
+          Instead of adding this symbol, consider pressing "b c RET
+          RET", like you would do in other buffers.
+
+        • ‘checkout-any’
+
+          Check out the reference at point.  If that reference is a tag
+          or a remote branch, then this results in a detached ‘HEAD’.
+
+          Instead of adding this symbol, consider pressing "b b RET",
+          like you would do in other buffers.
+
+        • ‘checkout-branch’
+
+          Check out the local branch at point.
+
+          Instead of adding this symbol, consider pressing "b b RET",
+          like you would do in other buffers.
+
+5.6.1 References Sections
+-------------------------
+
+The contents of references buffers is controlled using the hook
+‘magit-refs-sections-hook’.  See *note Section Hooks:: to learn about
+such hooks and how to customize them.  All of the below functions are
+members of the default value.  Note that it makes much less sense to
+customize this hook than it does for the respective hook used for the
+status buffer.
+
+ -- User Option: magit-refs-sections-hook
+     Hook run to insert sections into a references buffer.
+
+ -- Function: magit-insert-local-branches
+     Insert sections showing all local branches.
+
+ -- Function: magit-insert-remote-branches
+     Insert sections showing all remote-tracking branches.
+
+ -- Function: magit-insert-tags
+     Insert sections showing all tags.
+
+
+File: magit.info,  Node: Bisecting,  Next: Visiting Files and Blobs,  Prev: References Buffer,  Up: Inspecting
+
+5.7 Bisecting
+=============
+
+Also see *note (gitman)git-bisect::.
+
+‘B’ (‘magit-bisect’)
+     This transient prefix command binds the following suffix commands
+     and displays them in a temporary buffer until a suffix is invoked.
+
+   When bisecting is not in progress, then the transient features the
+following suffix commands.
+
+‘B B’ (‘magit-bisect-start’)
+     Start a bisect session.
+
+     Bisecting a bug means to find the commit that introduced it.
+
+     This command starts such a bisect session by asking for a known
+     good commit and a known bad commit.  If the region marks a range of
+     commit, where one is an ancestor of the other, then these commits
+     are used as the good and bad commits.  Otherwise these starting
+     points are read in the minibuffer.
+
+     If you're bisecting a change that isn't a regression, you can
+     select alternate terms that are conceptually more fitting than
+     "bad" and "good", but the infix arguments to do so are disabled by
+     default.
+
+‘B s’ (‘magit-bisect-run’)
+     Bisect automatically by running commands after each step.
+
+   When bisecting in progress, then the transient instead features the
+following suffix commands.
+
+‘B b’ (‘magit-bisect-bad’)
+     Mark the current commit as bad.  Use this after you have asserted
+     that the commit does contain the bug in question.
+
+‘B g’ (‘magit-bisect-good’)
+     Mark the current commit as good.  Use this after you have asserted
+     that the commit does not contain the bug in question.
+
+‘B m’ (‘magit-bisect-mark’)
+     Mark the current commit with one of the bisect terms.  This command
+     provides an alternative to ‘magit-bisect-bad’ and
+     ‘magit-bisect-good’ and is useful when using terms other than "bad"
+     and "good".  This suffix is disabled by default.
+
+‘B k’ (‘magit-bisect-skip’)
+     Skip the current commit.  Use this if for some reason the current
+     commit is not a good one to test.  This command lets Git choose a
+     different one.
+
+‘B r’ (‘magit-bisect-reset’)
+     After bisecting, cleanup bisection state and return to original
+     ‘HEAD’.
+
+   By default the status buffer shows information about the ongoing
+bisect session.
+
+ -- User Option: magit-bisect-show-graph
+     This option controls whether a graph is displayed for the log of
+     commits that still have to be bisected.
+
+
+File: magit.info,  Node: Visiting Files and Blobs,  Next: Blaming,  Prev: Bisecting,  Up: Inspecting
+
+5.8 Visiting Files and Blobs
+============================
+
+Magit provides several commands that visit a file or blob (the version
+of a file that is stored in a certain commit).  Actually it provides
+several *groups* of such commands and the several *variants* within each
+group.
+
+   Also see *note Commands for Buffers Visiting Files::.
+
+5.8.1 General-Purpose Visit Commands
+------------------------------------
+
+These commands can be used anywhere to open any blob.  Currently no keys
+are bound to these commands by default, but that is likely to change.
+
+ -- Command: magit-find-file
+     This command reads a filename and revision from the user and visits
+     the respective blob in a buffer.  The buffer is displayed in the
+     selected window.
+
+ -- Command: magit-find-file-other-window
+     This command reads a filename and revision from the user and visits
+     the respective blob in a buffer.  The buffer is displayed in
+     another window.
+
+ -- Command: magit-find-file-other-frame
+     This command reads a filename and revision from the user and visits
+     the respective blob in a buffer.  The buffer is displayed in
+     another frame.
+
+5.8.2 Visiting Files and Blobs from a Diff
+------------------------------------------
+
+These commands can only be used when point is inside a diff.  Elsewhere
+use ‘magit-find-file’.
+
+‘<RET>’ (‘magit-diff-visit-file’)
+     This command visits the appropriate version of the file at point.
+
+     Display the buffer in the selected window.  With a prefix argument,
+     OTHER-WINDOW, instead display the buffer in another window.
+
+     In the visited file or blob, go to the location corresponding to
+     the location in the diff.
+
+     If point is on an added or context line, visit the blob
+     corresponding to our side (i.e., the new/right side).  If point is
+     on a removed line, visit the blob corresponding to their side
+     (i.e., the old/left side).
+
+     This applies to diffs of staged and unstaged changes as well.  For
+     staged changes the two sides are blobs from the index and the
+     'HEAD' commit.  For unstaged changes the two sides are the actual
+     file in the worktree and the blob from the index.
+
+     To visit the file in the worktree, regardless of what the current
+     diff is about, use ‘magit-diff-visit-worktree-file’, described
+     next.
+
+‘C-<return>’ (‘magit-diff-visit-worktree-file’)
+     This command visits the worktree version of the appropriate file.
+     The location of point inside the diff determines which file is
+     being visited.  Unlike ‘magit-diff-visit-file’ it always visits the
+     "real" file in the working tree, i.e., the "current version" of the
+     file.
+
+     In the file-visiting buffer this command goes to the line that
+     corresponds to the line that point is on in the diff.  Lines that
+     were added or removed in the working tree, the index and other
+     commits in between are automatically accounted for.
+
+     The buffer is displayed in the selected window.  With a prefix
+     argument the buffer is displayed in another window instead.
+
+   Variants of the above two commands exist that instead visit the file
+in another window or in another frame.  If you prefer such behavior,
+then you may want to change the above key bindings, but note that the
+above commands also use another window when invoked with a prefix
+argument.
+
+ -- Command: magit-diff-visit-file-other-window
+ -- Command: magit-diff-visit-file-other-frame
+ -- Command: magit-diff-visit-worktree-file-other-window
+ -- Command: magit-diff-visit-worktree-file-other-frame
+     These commands behave like the respective commands described above,
+     except that they display the blob or file in another window or
+     frame.
+
+ -- User Option: magit-diff-visit-prefer-worktree
+     This option controls whether ‘magit-diff-visit-file’ always visits
+     the respective file in the worktree, when invoked anywhere from
+     within a hunk of staged or unstaged changes.
+
+     By default ‘magit-diff-visit-file’ does not do that.  Instead it
+     behaves for staged and unstaged changes as it does for committed
+     changes, by visiting a blob from the old/left or new/right side,
+     depending on whether point is on a removed line or not.
+
+     For staged changes the old side is the blob from HEAD and the right
+     side is the blog from the index.  For unstaged changes the left
+     side is the blob from the index (if there are any changes in the
+     index for that file, else the blob from HEAD), and the right side
+     is the file in the worktree.
+
+     Being able to jump to HEAD or the index from a removed line is very
+     useful, because it allows you to, e.g., use blame to investigate
+     why some line, which you have already removed, was added in the
+     first place.
+
+     But if you want to make further changes to already staged changes,
+     you of course instead need to go to the respective file in the
+     worktree.  The command ‘magit-diff-visit-worktree-file’ was created
+     for that purpose, and it is strongly recommend that you make use of
+     that command, even if you initially find it inconvenient having to
+     remember to use ‘C-<return>’ instead of ‘RET’ in this case.
+
+     While discouraged, you can alternatively set this option to ‘t’,
+     which causes ‘magit-diff-visit-file’ itself to go to the file in
+     the worktree, even when invoked from within a hunk of staged
+     changes.  If you do that, you lose the ability to instantly go to
+     lines you have already removed.
+
+ -- User Option: magit-diff-visit-previous-blob
+     This option controls whether ‘magit-diff-visit-file’ visits the
+     previous blob when invoked with point on a removed line.
+
+     When this is ‘t’ (the default) and point is on a removed line, then
+     ‘magit-diff-visit-file’ visits the blob from the old/left commit,
+     which still has that line, instead of going to the new/right blob,
+     which removes that line.
+
+     Setting this to ‘nil’, causes ‘magit-diff-visit-file’ to always go
+     to the new/right blob, even when point is on a removed line.  This
+     is very strongly discouraged.  Instead place the cursor anywhere
+     else within the hunk but on a removed line, if you want to visit
+     the new side.  That way you don't lose the ability to visit the old
+     side.
+
+
+File: magit.info,  Node: Blaming,  Prev: Visiting Files and Blobs,  Up: Inspecting
+
+5.9 Blaming
+===========
+
+Also see *note (gitman)git-blame::.
+
+   To start blaming, invoke the ‘magit-file-dispatch’ transient prefix
+command.  When using the default key bindings, that can be done by
+pressing ‘C-c M-g’.  When using the recommended bindings, this command
+is instead bound to ‘C-c f’.  Also see *note Global Bindings::.
+
+   The blaming suffix commands can be invoked directly from the file
+dispatch transient.  However if you want to set an infix argument, then
+you have to enter the blaming sub-prefix first.
+
+‘C-c f B’ (‘magit-blame’)
+‘C-c f b’ (‘magit-blame-addition’)
+‘C-c f B b’
+‘C-c f r’ (‘magit-blame-removal’)
+‘C-c f B r’
+‘C-c f f’ (‘magit-blame-reverse’)
+‘C-c f B f’
+‘C-c f e’ (‘magit-blame-echo’)
+‘C-c f B e’
+‘C-c f q’ (‘magit-blame-quit’)
+‘C-c f B q’
+     Each of these commands is documented individually right below,
+     alongside their default key bindings.  The bindings shown above are
+     the recommended bindings, which you can enable by following the
+     instructions in *note Global Bindings::.
+
+‘C-c M-g B’ (‘magit-blame’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+   Note that not all of the following suffixes are available at all
+times.  For example if ‘magit-blame-mode’ is not enabled, then the
+command whose purpose is to turn off that mode would not be of any use
+and therefore isn't available.
+
+‘C-c M-g b’ (‘magit-blame-addition’)
+‘C-c M-g B b’
+     This command augments each line or chunk of lines in the current
+     file-visiting or blob-visiting buffer with information about what
+     commits last touched these lines.
+
+     If the buffer visits a revision of that file, then history up to
+     that revision is considered.  Otherwise, the file's full history is
+     considered, including uncommitted changes.
+
+     If Magit-Blame mode is already turned on in the current buffer then
+     blaming is done recursively, by visiting REVISION:FILE (using
+     ‘magit-find-file’), where REVISION is a parent of the revision that
+     added the current line or chunk of lines.
+
+‘C-c M-g r’ (‘magit-blame-removal’)
+‘C-c M-g B r’
+     This command augments each line or chunk of lines in the current
+     blob-visiting buffer with information about the revision that
+     removes it.  It cannot be used in file-visiting buffers.
+
+     Like ‘magit-blame-addition’, this command can be used recursively.
+
+‘C-c M-g f’ (‘magit-blame-reverse’)
+‘C-c M-g B f’
+     This command augments each line or chunk of lines in the current
+     file-visiting or blob-visiting buffer with information about the
+     last revision in which a line still existed.
+
+     Like ‘magit-blame-addition’, this command can be used recursively.
+
+‘C-c M-g e’ (‘magit-blame-echo’)
+‘C-c M-g B e’
+     This command is like ‘magit-blame-addition’ except that it doesn't
+     turn on ‘read-only-mode’ and that it initially uses the
+     visualization style specified by option ‘magit-blame-echo-style’.
+
+   The following key bindings are available when Magit-Blame mode is
+enabled and Read-Only mode is not enabled.  These commands are also
+available in other buffers; here only the behavior is described that is
+relevant in file-visiting buffers that are being blamed.
+
+‘C-c M-g q’ (‘magit-blame-quit’)
+‘C-c M-g B q’
+     This command turns off Magit-Blame mode.  If the buffer was created
+     during a recursive blame, then it also kills the buffer.
+
+‘<RET>’ (‘magit-show-commit’)
+     This command shows the commit that last touched the line at point.
+
+‘<SPC>’ (‘magit-diff-show-or-scroll-up’)
+     This command updates the commit buffer.
+
+     This either shows the commit that last touched the line at point in
+     the appropriate buffer, or if that buffer is already being
+     displayed in the current frame and if that buffer contains
+     information about that commit, then the buffer is scrolled up
+     instead.
+
+‘<DEL>’ (‘magit-diff-show-or-scroll-down’)
+     This command updates the commit buffer.
+
+     This either shows the commit that last touched the line at point in
+     the appropriate buffer, or if that buffer is already being
+     displayed in the current frame and if that buffer contains
+     information about that commit, then the buffer is scrolled down
+     instead.
+
+   The following key bindings are available when both Magit-Blame mode
+and Read-Only mode are enabled.
+
+‘b’ (‘magit-blame’)
+     See above.
+
+‘n’ (‘magit-blame-next-chunk’)
+     This command moves to the next chunk.
+
+‘N’ (‘magit-blame-next-chunk-same-commit’)
+     This command moves to the next chunk from the same commit.
+
+‘p’ (‘magit-blame-previous-chunk’)
+     This command moves to the previous chunk.
+
+‘P’ (‘magit-blame-previous-chunk-same-commit’)
+     This command moves to the previous chunk from the same commit.
+
+‘q’ (‘magit-blame-quit’)
+     This command turns off Magit-Blame mode.  If the buffer was created
+     during a recursive blame, then it also kills the buffer.
+
+‘M-w’ (‘magit-blame-copy-hash’)
+     This command saves the hash of the current chunk's commit to the
+     kill ring.
+
+     When the region is active, the command saves the region's content
+     instead of the hash, like ‘kill-ring-save’ would.
+
+‘c’ (‘magit-blame-cycle-style’)
+     This command changes how blame information is visualized in the
+     current buffer by cycling through the styles specified using the
+     option ‘magit-blame-styles’.
+
+   Blaming is also controlled using the following options.
+
+ -- User Option: magit-blame-styles
+     This option defines a list of styles used to visualize blame
+     information.  For now see its doc-string to learn more.
+
+ -- User Option: magit-blame-echo-style
+     This option specifies the blame visualization style used by the
+     command ‘magit-blame-echo’.  This must be a symbol that is used as
+     the identifier for one of the styles defined in
+     ‘magit-blame-styles’.
+
+ -- User Option: magit-blame-time-format
+     This option specifies the format string used to display times when
+     showing blame information.
+
+ -- User Option: magit-blame-read-only
+     This option controls whether blaming a buffer also makes
+     temporarily read-only.
+
+ -- User Option: magit-blame-disable-modes
+     This option lists incompatible minor-modes that should be disabled
+     temporarily when a buffer contains blame information.  They are
+     enabled again when the buffer no longer shows blame information.
+
+ -- User Option: magit-blame-goto-chunk-hook
+     This hook is run when moving between chunks.
+
+
+File: magit.info,  Node: Manipulating,  Next: Transferring,  Prev: Inspecting,  Up: Top
+
+6 Manipulating
+**************
+
+* Menu:
+
+* Creating Repository::
+* Cloning Repository::
+* Staging and Unstaging::
+* Applying::
+* Committing::
+* Branching::
+* Merging::
+* Resolving Conflicts::
+* Rebasing::
+* Cherry Picking::
+* Resetting::
+* Stashing::
+
+
+File: magit.info,  Node: Creating Repository,  Next: Cloning Repository,  Up: Manipulating
+
+6.1 Creating Repository
+=======================
+
+‘I’ (‘magit-init’)
+     This command initializes a repository and then shows the status
+     buffer for the new repository.
+
+     If the directory is below an existing repository, then the user has
+     to confirm that a new one should be created inside.  If the
+     directory is the root of the existing repository, then the user has
+     to confirm that it should be reinitialized.
+
+
+File: magit.info,  Node: Cloning Repository,  Next: Staging and Unstaging,  Prev: Creating Repository,  Up: Manipulating
+
+6.2 Cloning Repository
+======================
+
+To clone a remote or local repository use ‘C’, which is bound to the
+command ‘magit-clone’.  This command either act as a transient prefix
+command, which binds several infix arguments and suffix commands, or it
+can invoke ‘git clone’ directly, depending on whether a prefix argument
+is used and on the value of ‘magit-clone-always-transient’.
+
+ -- User Option: magit-clone-always-transient
+     This option controls whether the command ‘magit-clone’ always acts
+     as a transient prefix command, regardless of whether a prefix
+     argument is used or not.  If ‘t’, then that command always acts as
+     a transient prefix.  If ‘nil’, then a prefix argument has to be
+     used for it to act as a transient.
+
+‘C’ (‘magit-clone’)
+     This command either acts as a transient prefix command as described
+     above or does the same thing as ‘transient-clone-regular’ as
+     described below.
+
+     If it acts as a transient prefix, then it binds the following
+     suffix commands and several infix arguments.
+
+‘C C’ (‘magit-clone-regular’)
+     This command creates a regular clone of an existing repository.
+     The repository and the target directory are read from the user.
+
+‘C s’ (‘magit-clone-shallow’)
+     This command creates a shallow clone of an existing repository.
+     The repository and the target directory are read from the user.  By
+     default the depth of the cloned history is a single commit, but
+     with a prefix argument the depth is read from the user.
+
+‘C >’ (‘magit-clone-sparse’)
+     This command creates a clone of an existing repository and
+     initializes a sparse checkout, avoiding a checkout of the full
+     working tree.  To add more directories, use the
+     ‘magit-sparse-checkout’ transient (see *note Sparse checkouts::).
+
+‘C b’ (‘magit-clone-bare’)
+     This command creates a bare clone of an existing repository.  The
+     repository and the target directory are read from the user.
+
+‘C m’ (‘magit-clone-mirror’)
+     This command creates a mirror of an existing repository.  The
+     repository and the target directory are read from the user.
+
+   The following suffixes are disabled by default.  See *note
+(transient)Enabling and Disabling Suffixes:: for how to enable them.
+
+‘C d’ (‘magit-clone-shallow-since’)
+     This command creates a shallow clone of an existing repository.
+     Only commits that were committed after a date are cloned, which is
+     read from the user.  The repository and the target directory are
+     also read from the user.
+
+‘C e’ (‘magit-clone-shallow-exclude’)
+     This command creates a shallow clone of an existing repository.
+     This reads a branch or tag from the user.  Commits that are
+     reachable from that are not cloned.  The repository and the target
+     directory are also read from the user.
+
+ -- User Option: magit-clone-set-remote-head
+     This option controls whether cloning causes the reference
+     ‘refs/remotes/<remote>/HEAD’ to be created in the clone.  The
+     default is to delete the reference after running ‘git clone’, which
+     insists on creating it.  This is because the reference has not been
+     found to be particularly useful as it is not automatically updated
+     when the ‘HEAD’ of the remote changes.  Setting this option to ‘t’
+     preserves Git's default behavior of creating the reference.
+
+ -- User Option: magit-clone-set-remote.pushDefault
+     This option controls whether the value of the Git variable
+     ‘remote.pushDefault’ is set after cloning.
+
+        • If ‘t’, then it is always set without asking.
+        • If ‘ask’, then the users are asked every time they clone a
+          repository.
+        • If ‘nil’, then it is never set.
+
+ -- User Option: magit-clone-default-directory
+     This option control the default directory name used when reading
+     the destination for a cloning operation.
+
+        • If ‘nil’ (the default), then the value of ‘default-directory’
+          is used.
+        • If a directory, then that is used.
+        • If a function, then that is called with the remote url as the
+          only argument and the returned value is used.
+
+ -- User Option: magit-clone-name-alist
+     This option maps regular expressions, which match repository names,
+     to repository urls, making it possible for users to enter short
+     names instead of urls when cloning repositories.
+
+     Each element has the form ‘(REGEXP HOSTNAME USER)’.  When the user
+     enters a name when a cloning command asks for a name or url, then
+     that is looked up in this list.  The first element whose REGEXP
+     matches is used.
+
+     The format specified by option ‘magit-clone-url-format’ is used to
+     turn the name into an url, using HOSTNAME and the repository name.
+     If the provided name contains a slash, then that is used.
+     Otherwise if the name omits the owner of the repository, then the
+     default user specified in the matched entry is used.
+
+     If USER contains a dot, then it is treated as a Git variable and
+     the value of that is used as the username.  Otherwise it is used as
+     the username itself.
+
+ -- User Option: magit-clone-url-format
+     The format specified by this option is used when turning repository
+     names into urls.  ‘%h’ is the hostname and ‘%n’ is the repository
+     name, including the name of the owner.  The value can be a string
+     (representing a single static format) or an alist with elements
+     ‘(HOSTNAME . FORMAT)’ mapping hostnames to formats.  When an alist
+     is used, the ‘t’ key represents the default format.
+
+     Example of a single format string:
+
+          (setq magit-clone-url-format
+                "git@%h:%n.git")
+
+     Example of by-hostname format strings:
+
+          (setq magit-clone-url-format
+                '(("git.example.com" . "git@%h:~%n")
+                  (nil . "git@%h:%n.git")))
+
+ -- User Option: magit-post-clone-hook
+     Hook run after the Git process has successfully finished cloning
+     the repository.  When the hook is called, ‘default-directory’ is
+     let-bound to the directory where the repository has been cloned.
+
+
+File: magit.info,  Node: Staging and Unstaging,  Next: Applying,  Prev: Cloning Repository,  Up: Manipulating
+
+6.3 Staging and Unstaging
+=========================
+
+Like Git, Magit can of course stage and unstage complete files.  Unlike
+Git, it also allows users to gracefully un-/stage individual hunks and
+even just part of a hunk.  To stage individual hunks and parts of hunks
+using Git directly, one has to use the very modal and rather clumsy
+interface of a ‘git add --interactive’ session.
+
+   With Magit, on the other hand, one can un-/stage individual hunks by
+just moving point into the respective section inside a diff displayed in
+the status buffer or a separate diff buffer and typing ‘s’ or ‘u’.  To
+operate on just parts of a hunk, mark the changes that should be
+un-/staged using the region and then press the same key that would be
+used to un-/stage.  To stage multiple files or hunks at once use a
+region that starts inside the heading of such a section and ends inside
+the heading of a sibling section of the same type.
+
+   Besides staging and unstaging, Magit also provides several other
+"apply variants" that can also operate on a file, multiple files at
+once, a hunk, multiple hunks at once, and on parts of a hunk.  These
+apply variants are described in the next section.
+
+   You can also use Ediff to stage and unstage.  See *note Ediffing::.
+
+‘s’ (‘magit-stage’)
+     Add the change at point to the staging area.
+
+     With a prefix argument and an untracked file (or files) at point,
+     stage the file but not its content.  This makes it possible to
+     stage only a subset of the new file's changes.
+
+‘S’ (‘magit-stage-modified’)
+     Stage all changes to files modified in the worktree.  Stage all new
+     content of tracked files and remove tracked files that no longer
+     exist in the working tree from the index also.  With a prefix
+     argument also stage previously untracked (but not ignored) files.
+
+‘u’ (‘magit-unstage’)
+     Remove the change at point from the staging area.
+
+     Only staged changes can be unstaged.  But by default this command
+     performs an action that is somewhat similar to unstaging, when it
+     is called on a committed change: it reverses the change in the
+     index but not in the working tree.
+
+‘U’ (‘magit-unstage-all’)
+     Remove all changes from the staging area.
+
+ -- User Option: magit-unstage-committed
+     This option controls whether ‘magit-unstage’ "unstages" committed
+     changes by reversing them in the index but not the working tree.
+     The alternative is to raise an error.
+
+‘M-x magit-reverse-in-index’
+     This command reverses the committed change at point in the index
+     but not the working tree.  By default no key is bound directly to
+     this command, but it is indirectly called when ‘u’
+     (‘magit-unstage’) is pressed on a committed change.
+
+     This allows extracting a change from ‘HEAD’, while leaving it in
+     the working tree, so that it can later be committed using a
+     separate commit.  A typical workflow would be:
+
+       1. Optionally make sure that there are no uncommitted changes.
+       2. Visit the ‘HEAD’ commit and navigate to the change that should
+          not have been included in that commit.
+       3. Type ‘u’ (‘magit-unstage’) to reverse it in the index.  This
+          assumes that ‘magit-unstage-committed’ is non-‘nil’.
+       4. Type ‘c e’ to extend ‘HEAD’ with the staged changes, including
+          those that were already staged before.
+       5. Optionally stage the remaining changes using ‘s’ or ‘S’ and
+          then type ‘c c’ to create a new commit.
+
+‘M-x magit-reset-index’
+     Reset the index to some commit.  The commit is read from the user
+     and defaults to the commit at point.  If there is no commit at
+     point, then it defaults to ‘HEAD’.
+
+6.3.1 Staging from File-Visiting Buffers
+----------------------------------------
+
+Fine-grained un-/staging has to be done from the status or a diff
+buffer, but it's also possible to un-/stage all changes made to the file
+visited in the current buffer right from inside that buffer.
+
+‘M-x magit-stage-files’
+     When invoked inside a file-visiting buffer, then stage all changes
+     to that file.  In a Magit buffer, stage the file at point if any.
+     Otherwise prompt for a file to be staged.  With a prefix argument
+     always prompt the user for a file, even in a file-visiting buffer
+     or when there is a file section at point.
+
+‘M-x magit-unstage-files’
+     When invoked inside a file-visiting buffer, then unstage all
+     changes to that file.  In a Magit buffer, unstage the file at point
+     if any.  Otherwise prompt for a file to be unstaged.  With a prefix
+     argument always prompt the user for a file, even in a file-visiting
+     buffer or when there is a file section at point.
+
+
+File: magit.info,  Node: Applying,  Next: Committing,  Prev: Staging and Unstaging,  Up: Manipulating
+
+6.4 Applying
+============
+
+Magit provides several "apply variants": stage, unstage, discard,
+reverse, and "regular apply".  At least when operating on a hunk they
+are all implemented using ‘git apply’, which is why they are called
+"apply variants".
+
+   • Stage.  Apply a change from the working tree to the index.  The
+     change also remains in the working tree.
+
+   • Unstage.  Remove a change from the index.  The change remains in
+     the working tree.
+
+   • Discard.  On a staged change, remove it from the working tree and
+     the index.  On an unstaged change, remove it from the working tree
+     only.
+
+   • Reverse.  Reverse a change in the working tree.  Both committed and
+     staged changes can be reversed.  Unstaged changes cannot be
+     reversed.  Discard them instead.
+
+   • Apply.  Apply a change to the working tree.  Both committed and
+     staged changes can be applied.  Unstaged changes cannot be applied
+     - as they already have been applied.
+
+   The previous section described the staging and unstaging commands.
+What follows are the commands which implement the remaining apply
+variants.
+
+‘a’ (‘magit-apply’)
+     Apply the change at point to the working tree.
+
+     With a prefix argument fallback to a 3-way merge.  Doing so causes
+     the change to be applied to the index as well.
+
+‘k’ (‘magit-discard’)
+     Remove the change at point from the working tree.
+
+     On a hunk or file with unresolved conflicts prompt which side to
+     keep (while discarding the other).  If point is within the text of
+     a side, then keep that side without prompting.
+
+‘v’ (‘magit-reverse’)
+     Reverse the change at point in the working tree.
+
+     With a prefix argument fallback to a 3-way merge.  Doing so causes
+     the change to be applied to the index as well.
+
+   With a prefix argument all apply variants attempt a 3-way merge when
+appropriate (i.e., when ‘git apply’ is used internally).
+
+ -- Command: magit-copy-diff-as-kill
+     This command saves the diff at point to the kill ring.
+
+     It can be used on staged and unstaged changes, and anywhere
+     ‘magit-apply’ can be used.  Additionally, if there is no diff at
+     point but ‘magit-buffer-revision’ is non-nil, or there is a commit
+     at point, the diff for that commit is saved.
+
+     This is useful if you need to copy some diff elsewhere, e.g., to a
+     mail client or browser text area.
+
+
+File: magit.info,  Node: Committing,  Next: Branching,  Prev: Applying,  Up: Manipulating
+
+6.5 Committing
+==============
+
+When the user initiates a commit, Magit calls ‘git commit’ without the
+‘--message’ argument, so Git has to get the message from the user.  To
+do so, it creates a file such as ‘.git/COMMIT_EDITMSG’ and then opens
+that file in the editor specified by ‘$EDITOR’ (or ‘$GIT_EDITOR’).
+
+   Magit arranges for that editor to be the Emacsclient.  Once the user
+finishes the editing session, the Emacsclient exits and Git creates the
+commit, using the file's content as the commit message.
+
+6.5.1 Initiating a Commit
+-------------------------
+
+Also see *note (gitman)git-commit::.
+
+‘c’ (‘magit-commit’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+Creating a new commit
+.....................
+
+‘c c’ (‘magit-commit-create’)
+     Create a new commit.
+
+Editing the last commit
+.......................
+
+These commands modify the last (a.k.a., "HEAD") commit.  The commit is
+modified (a.k.a., replaced) immediately.  Similar commands exist for
+modifying other (non-HEAD) commits.  Those commands are described in the
+following two sections.  For each command in this section, we mention
+the respective non-HEAD commands, to make the relation explicit.
+
+   The command descriptions below mention the specific arguments they
+use when calling ‘git commit’.  The arguments specified in the menu are
+appended to those arguments.
+
+‘c e’ (‘magit-commit-extend’)
+     This command amends the staged changes to the last commit, without
+     editing its commit message.
+
+     This command calls ‘git commit --amend --no-edit’.
+
+     With a prefix argument the committer date is not updated; without
+     an argument it is updated.
+
+     The option ‘magit-commit-extend-override-date’ can be used to
+     inverse the meaning of the prefix argument.  Non-interactively, the
+     optional OVERRIDE-DATE argument controls this behavior, and the
+     option is of no relevance.
+
+‘c a’ (‘magit-commit-amend’)
+     This command amends the staged changes to the last commit, and pops
+     up a buffer to let the user edit its commit message.
+
+     This command calls ‘git commit --amend --edit’.
+
+‘c w’ (‘magit-commit-reword’)
+     This command pops up a buffer to let the user edit the message of
+     the latest commit.  The commit tree remains unchanged and staged
+     changes remain staged.
+
+     This command calls ‘git commit --amend --only --edit’.
+
+     With a prefix argument the committer date is not updated; without
+     an argument it is updated.
+
+     The option ‘magit-commit-reword-override-date’ can be used to
+     inverse the meaning of the prefix argument.  Non-interactively, the
+     optional OVERRIDE-DATE argument controls this behavior, and the
+     option is of no relevance.
+
+Editing any reachable commit
+............................
+
+These commands create a new commit, which targets an existing commit,
+from the staged changes and/or using a new commit message.  Any commit
+that is reachable from HEAD, including HEAD itself, can be the target.
+
+   The new commit is intended to be eventually squashed into the
+targeted commit, but this is *not* done immediately.  The squashing is
+done at a later time, when you explicitly call
+‘magit-rebase-autosquash’, or use ‘--autosquash’ with another rebase
+command.
+
+   Some of these commands require that you immediately write a new
+commit message, or that you immediately edit an existing message.
+
+   The new commits are called "squash" and "fixup" commits.  The
+difference is that when a "squash" commit is squashed into its targeted
+commit, the user gets a chance to modify the message to be used for the
+final commit; while for "fixup" commits the existing message of the
+targeted commit is used as-is and the message of the "fixup" commit is
+discarded.
+
+   If point is on a reachable commit, then all of these commands target
+that commit, without requiring confirmation.  If point is on some
+reachable commit, but you want to target another commit, use a prefix
+argument, to select a commit in a log buffer dedicated to that task.
+The meaning of the prefix argument can be inverted by customizing
+‘magit-commit-squash-confirm’.
+
+   The command descriptions below mention the specific arguments they
+use when calling ‘git commit’.  The arguments specified in the menu are
+appended to those arguments.
+
+   The next two commands also exist in "instant" variants, which are
+described in the next section.  Those variants behave the same as the
+variants described here, except that they immediately initiate an
+‘--autosquash’ rebase.
+
+‘c f’ (‘magit-commit-fixup’)
+     This command creates a new fixup commit from the staged changes,
+     targeting the reachable commit at point, if any.  Otherwise the
+     user is prompted for a commit.
+
+     Use this variant if you want to correct some minor defect in the
+     targeted commit, which does not require changes to the existing
+     message of the targeted commit.
+
+     This command calls ‘git commit --fixup=COMMIT --no-edit’.
+
+‘c s’ (‘magit-commit-squash’)
+     This command creates a new squash commit from the staged changes,
+     targeting the reachable commit at point, if any.  Otherwise the
+     user is prompted for a commit.
+
+     Use this variant if you want a chance to make changes to the final
+     commit message, but not until the two commits are being squashed
+     into the final combined commit.
+
+     This command calls ‘git commit --squash=COMMIT --no-edit’.
+
+‘c A’ (‘magit-commit-alter’)
+     This command creates a new fixup commit from the staged changes,
+     targeting the reachable commit at point, if any.  Otherwise the
+     user is prompted for a commit.
+
+     Use this variant if you want to write the final commit message now,
+     but (as for all variants in this section) do not want to
+     immediately squash the fixup and targeted commits into a final
+     combined commit.
+
+     This command calls ‘git commit --fixup=amend:COMMIT --edit’.
+
+‘c n’ (‘magit-commit-augment’)
+     This command creates a new squash commit from the staged changes,
+     targeting the reachable commit at point, if any.  Otherwise the
+     user is prompted for a commit.
+
+     Use this variant if you want to describe the new changes now, but
+     want to delay writing the final message, which describes the
+     changes in the combined commit, until you actually combine the
+     squash and target commits into the final commit.  You can think of
+     the new message, which you write here, as a "note", to be
+     integrated once once you write the final commit message.
+
+     This command calls ‘git commit --squash=COMMIT --edit’.
+
+‘c W’ (‘magit-commit-revise’)
+     This command pops up a buffer containing the commit message of the
+     reachable commit at point, if any.  Otherwise the user is prompted
+     for a commit to target.
+
+     Use this variant if you want to correct the message of the targeted
+     commit, but want to delay performing the ‘--autosquash’ rebase,
+     which actually changes that commit.
+
+     This command calls ‘git commit --fixup=reword:COMMIT --edit’.
+
+Editing any reachable commit and rebasing immediately
+.....................................................
+
+These commands create a new commit, which targets an existing commit,
+from the staged changes.  Any commit that is reachable from HEAD,
+including HEAD itself, can be the target.
+
+   The new commit is immediately squashed into its target commit, using
+an ‘--autosquash’ rebase.
+
+   The command descriptions below mention the specific arguments they
+use when calling ‘git commit’.  The arguments specified in the menu are
+appended to those arguments when calling ‘git commit’.
+
+‘c F’ (‘magit-commit-instant-fixup’)
+     This command creates a fixup commit, targeting the reachable commit
+     at point, if any.  Otherwise the user is prompted for a commit.
+     Then it instantly performs a rebase, to squash the new commit into
+     the targeted commit.
+
+     The original commit message of the targeted commit is left
+     untouched.
+
+     This command calls ‘git commit --fixup=COMMIT --no-edit’ and then
+     ‘git rebase --autosquash MERGE-BASE’.
+
+‘c S’ (‘magit-commit-instant-squash’)
+     This command creates a squash commit, targeting the reachable
+     commit at point, if any.  Otherwise the user is prompted for a
+     commit.  Then it instantly performs a rebase, to squash the new
+     commit into the targeted commit.
+
+     During the rebase phase the user is asked to author the final
+     commit message, based on the original message of the targeted
+     commit.
+
+     This command calls ‘git commit --squash=COMMIT --no-edit’ and then
+     ‘git rebase --autosquash MERGE-BASE’.
+
+Options used by commit commands
+...............................
+
+   • Used by all or most commit commands
+
+      -- User Option: magit-commit-show-diff
+          Whether the relevant diff is automatically shown when
+          committing.
+
+      -- User Option: magit-commit-ask-to-stage
+          Whether to ask to stage all unstaged changes when committing
+          and nothing is staged.
+
+      -- User Option: magit-post-commit-hook
+          Hook run after creating a commit without the user editing a
+          message.
+
+          This hook is run by ‘magit-refresh’ if ‘this-command’ is a
+          member of ‘magit-post-commit-hook-commands’.  This only
+          includes commands named ‘magit-commit-*’ that do *not* require
+          that the user edits the commit message in a buffer.
+
+          Also see ‘git-commit-post-finish-hook’.
+
+      -- User Option: magit-commit-diff-inhibit-same-window
+          Whether to inhibit use of same window when showing diff while
+          committing.
+
+          When writing a commit, then a diff of the changes to be
+          committed is automatically shown.  The idea is that the diff
+          is shown in a different window of the same frame and for most
+          users that just works.  In other words most users can
+          completely ignore this option because its value doesn't make a
+          difference for them.
+
+          However for users who configured Emacs to never create a new
+          window even when the package explicitly tries to do so, then
+          displaying two new buffers necessarily means that the first is
+          immediately replaced by the second.  In our case the message
+          buffer is immediately replaced by the diff buffer, which is of
+          course highly undesirable.
+
+          A workaround is to suppress this user configuration in this
+          particular case.  Users have to explicitly opt-in by toggling
+          this option.  We cannot enable the workaround unconditionally
+          because that again causes issues for other users: if the frame
+          is too tiny or the relevant settings too aggressive, then the
+          diff buffer would end up being displayed in a new frame.
+
+          Also see <https://github.com/magit/magit/issues/4132>.
+
+   • Used by all squash and fixup commands
+
+      -- User Option: magit-commit-squash-confirm
+          Whether the commit targeted by squash and fixup has to be
+          confirmed.  When non-‘nil’ then the commit at point (if any)
+          is used as default choice.  Otherwise it has to be confirmed.
+          This option only affects ‘magit-commit-squash’ and
+          ‘magit-commit-fixup’.  The "instant" variants always require
+          confirmation because making an error while using those is
+          harder to recover from.
+
+   • Used by specific commit commands
+
+      -- User Option: magit-commit-extend-override-date
+          Whether using ‘magit-commit-extend’ changes the committer
+          date.
+
+      -- User Option: magit-commit-reword-override-date
+          Whether using ‘magit-commit-reword’ changes the committer
+          date.
+
+6.5.2 Editing Commit Messages
+-----------------------------
+
+After initiating a commit as described in the previous section, two new
+buffers appear.  One shows the changes that are about to be committed,
+while the other is used to write the message.
+
+   Commit messages are edited in an edit session - in the background
+‘git’ is waiting for the editor, in our case ‘emacsclient’, to save the
+commit message in a file (in most cases ‘.git/COMMIT_EDITMSG’) and then
+return.  If the editor returns with a non-zero exit status then ‘git’
+does not create the commit.  So the most important commands are those
+for finishing and aborting the commit.
+
+‘C-c C-c’ (‘with-editor-finish’)
+     Finish the current editing session by returning with exit code 0.
+     Git then creates the commit using the message it finds in the file.
+
+‘C-c C-k’ (‘with-editor-cancel’)
+     Cancel the current editing session by returning with exit code 1.
+     Git then cancels the commit, but leaves the file untouched.
+
+   In addition to being used by ‘git commit’, messages may also be
+stored in a ring that persists until Emacs is closed.  By default the
+message is stored at the beginning and the end of an edit session
+(regardless of whether the session is finished successfully or was
+canceled).  It is sometimes useful to bring back messages from that
+ring.
+
+‘C-c M-s’ (‘git-commit-save-message’)
+     Save the current buffer content to the commit message ring.
+
+‘M-p’ (‘git-commit-prev-message’)
+     Cycle backward through the commit message ring, after saving the
+     current message to the ring.  With a numeric prefix ARG, go back
+     ARG comments.
+
+‘M-n’ (‘git-commit-next-message’)
+     Cycle forward through the commit message ring, after saving the
+     current message to the ring.  With a numeric prefix ARG, go back
+     ARG comments.
+
+   By default the diff for the changes that are about to be committed
+are automatically shown when invoking the commit.  To prevent that,
+remove ‘magit-commit-diff’ from ‘server-switch-hook’.
+
+   When amending to an existing commit it may be useful to show either
+the changes that are about to be added to that commit or to show those
+changes alongside those that have already been committed.
+
+‘C-c C-d’ (‘magit-diff-while-committing’)
+     While committing, show the changes that are about to be committed.
+     While amending, invoking the command again toggles between showing
+     just the new changes or all the changes that will be committed.
+
+Using the Revision Stack
+........................
+
+‘C-c C-w’ (‘magit-pop-revision-stack’)
+     This command inserts a representation of a revision into the
+     current buffer.  It can be used inside buffers used to write commit
+     messages but also in other buffers such as buffers used to edit
+     emails or ChangeLog files.
+
+     By default this command pops the revision which was last added to
+     the ‘magit-revision-stack’ and inserts it into the current buffer
+     according to ‘magit-pop-revision-stack-format’.  Revisions can be
+     put on the stack using ‘magit-copy-section-value’ and
+     ‘magit-copy-buffer-revision’.
+
+     If the stack is empty or with a prefix argument it instead reads a
+     revision in the minibuffer.  By using the minibuffer history this
+     allows selecting an item which was popped earlier or to insert an
+     arbitrary reference or revision without first pushing it onto the
+     stack.
+
+     When reading the revision from the minibuffer, then it might not be
+     possible to guess the correct repository.  When this command is
+     called inside a repository (e.g., while composing a commit
+     message), then that repository is used.  Otherwise (e.g., while
+     composing an email) then the repository recorded for the top
+     element of the stack is used (even though we insert another
+     revision).  If not called inside a repository and with an empty
+     stack, or with two prefix arguments, then read the repository in
+     the minibuffer too.
+
+ -- User Option: magit-pop-revision-stack-format
+     This option controls how the command ‘magit-pop-revision-stack’
+     inserts a revision into the current buffer.
+
+     The entries on the stack have the format ‘(HASH TOPLEVEL)’ and this
+     option has the format ‘(POINT-FORMAT EOB-FORMAT INDEX-REGEXP)’, all
+     of which may be ‘nil’ or a string (though either one of EOB-FORMAT
+     or POINT-FORMAT should be a string, and if INDEX-REGEXP is
+     non-‘nil’, then the two formats should be too).
+
+     First INDEX-REGEXP is used to find the previously inserted entry,
+     by searching backward from point.  The first submatch must match
+     the index number.  That number is incremented by one, and becomes
+     the index number of the entry to be inserted.  If you don't want to
+     number the inserted revisions, then use ‘nil’ for INDEX-REGEXP.
+
+     If INDEX-REGEXP is non-‘nil’ then both POINT-FORMAT and EOB-FORMAT
+     should contain \"%N\", which is replaced with the number that was
+     determined in the previous step.
+
+     Both formats, if non-‘nil’ and after removing %N, are then expanded
+     using ‘git show --format=FORMAT ...’ inside TOPLEVEL.
+
+     The expansion of POINT-FORMAT is inserted at point, and the
+     expansion of EOB-FORMAT is inserted at the end of the buffer (if
+     the buffer ends with a comment, then it is inserted right before
+     that).
+
+Commit Pseudo Headers
+.....................
+
+Some projects use pseudo headers in commit messages.  Magit colorizes
+such headers and provides some commands to insert such headers.
+
+ -- User Option: git-commit-known-pseudo-headers
+     A list of Git pseudo headers to be highlighted.
+
+‘C-c C-i’ (‘git-commit-insert-pseudo-header’)
+     Insert a commit message pseudo header.
+
+‘C-c C-a’ (‘git-commit-ack’)
+     Insert a header acknowledging that you have looked at the commit.
+
+‘C-c C-r’ (‘git-commit-review’)
+     Insert a header acknowledging that you have reviewed the commit.
+
+‘C-c C-s’ (‘git-commit-signoff’)
+     Insert a header to sign off the commit.
+
+‘C-c C-t’ (‘git-commit-test’)
+     Insert a header acknowledging that you have tested the commit.
+
+‘C-c C-o’ (‘git-commit-cc’)
+     Insert a header mentioning someone who might be interested.
+
+‘C-c C-p’ (‘git-commit-reported’)
+     Insert a header mentioning the person who reported the issue being
+     fixed by the commit.
+
+‘C-c M-i’ (‘git-commit-suggested’)
+     Insert a header mentioning the person who suggested the change.
+
+Commit Mode and Hooks
+.....................
+
+‘git-commit-mode’ is a minor mode that is only used to establish certain
+key bindings.  This makes it possible to use an arbitrary major mode in
+buffers used to edit commit messages.  It is even possible to use
+different major modes in different repositories, which is useful when
+different projects impose different commit message conventions.
+
+ -- User Option: git-commit-major-mode
+     The value of this option is the major mode used to edit Git commit
+     messages.
+
+   Because ‘git-commit-mode’ is a minor mode, we don't use its mode hook
+to setup the buffer, except for the key bindings.  All other setup
+happens in the function ‘git-commit-setup’, which among other things
+runs the hook ‘git-commit-setup-hook’.
+
+ -- User Option: git-commit-setup-hook
+     Hook run at the end of ‘git-commit-setup’.
+
+The following functions are suitable for this hook:
+
+ -- Function: git-commit-save-message
+     Save the current buffer content to the commit message ring.
+
+ -- Function: git-commit-setup-changelog-support
+     After this function is called, ChangeLog entries are treated as
+     paragraphs.
+
+ -- Function: git-commit-turn-on-auto-fill
+     Turn on ‘auto-fill-mode’.
+
+ -- Function: git-commit-turn-on-flyspell
+     Turn on Flyspell mode.  Also prevent comments from being checked
+     and finally check current non-comment text.
+
+ -- Function: git-commit-propertize-diff
+     Propertize the diff shown inside the commit message buffer.  Git
+     inserts such diffs into the commit message template when the
+     ‘--verbose’ argument is used.  ‘magit-commit’ by default does not
+     offer that argument because the diff that is shown in a separate
+     buffer is more useful.  But some users disagree, which is why this
+     function exists.
+
+ -- Function: bug-reference-mode
+     Hyperlink bug references in the buffer.
+
+ -- Function: with-editor-usage-message
+     Show usage information in the echo area.
+
+ -- User Option: git-commit-post-finish-hook
+     Hook run after the user finished writing a commit message.
+
+     This hook is only run after pressing ‘C-c C-c’ in a buffer used to
+     edit a commit message.  If a commit is created without the user
+     typing a message into a buffer, then this hook is not run.
+
+     This hook is not run until the new commit has been created.  If
+     doing so takes Git longer than one second, then this hook isn't run
+     at all.  For certain commands such as ‘magit-rebase-continue’ this
+     hook is never run because doing so would lead to a race condition.
+
+     This hook is only run if ‘magit’ is available.
+
+     Also see ‘magit-post-commit-hook’.
+
+Commit Message Conventions
+..........................
+
+Git-Commit highlights certain violations of commonly accepted commit
+message conventions.  Certain violations even cause Git-Commit to ask
+you to confirm that you really want to do that.  This nagging can of
+course be turned off, but the result of doing that usually is that
+instead of some code it's now the human who is reviewing your commits
+who has to waste some time telling you to fix your commits.
+
+ -- User Option: git-commit-summary-max-length
+     The intended maximal length of the summary line of commit messages.
+     Characters beyond this column are colorized to indicate that this
+     preference has been violated.
+
+ -- User Option: git-commit-finish-query-functions
+     List of functions called to query before performing commit.
+
+     The commit message buffer is current while the functions are
+     called.  If any of them returns ‘nil’, then the commit is not
+     performed and the buffer is not killed.  The user should then fix
+     the issue and try again.
+
+     The functions are called with one argument.  If it is non-‘nil’
+     then that indicates that the user used a prefix argument to force
+     finishing the session despite issues.  Functions should usually
+     honor this wish and return non-‘nil’.
+
+     By default the only member is ‘git-commit-check-style-conventions’.
+
+ -- Function: git-commit-check-style-conventions
+     This function checks for violations of certain basic style
+     conventions.  For each violation it asks users if they want to
+     proceed anyway.
+
+ -- User Option: git-commit-style-convention-checks
+     This option controls what conventions the function by the same name
+     tries to enforce.  The value is a list of self-explanatory symbols
+     identifying certain conventions; ‘non-empty-second-line’ and
+     ‘overlong-summary-line’.
+
+
+File: magit.info,  Node: Branching,  Next: Merging,  Prev: Committing,  Up: Manipulating
+
+6.6 Branching
+=============
+
+6.6.1 The Two Remotes
+---------------------
+
+The upstream branch of some local branch is the branch into which the
+commits on that local branch should eventually be merged, usually
+something like ‘origin/master’.  For the ‘master’ branch itself the
+upstream branch and the branch it is being pushed to, are usually the
+same remote branch.  But for a feature branch the upstream branch and
+the branch it is being pushed to should differ.
+
+   The commits on feature branches too should _eventually_ end up in a
+remote branch such as ‘origin/master’ or ‘origin/maint’.  Such a branch
+should therefore be used as the upstream.  But feature branches
+shouldn't be pushed directly to such branches.  Instead a feature branch
+‘my-feature’ is usually pushed to ‘my-fork/my-feature’ or if you are a
+contributor ‘origin/my-feature’.  After the new feature has been
+reviewed, the maintainer merges the feature into ‘master’.  And finally
+‘master’ (not ‘my-feature’ itself) is pushed to ‘origin/master’.
+
+   But new features seldom are perfect on the first try, and so feature
+branches usually have to be reviewed, improved, and re-pushed several
+times.  Pushing should therefore be easy to do, and for that reason many
+Git users have concluded that it is best to use the remote branch to
+which the local feature branch is being pushed as its upstream.
+
+   But luckily Git has long ago gained support for a push-remote which
+can be configured separately from the upstream branch, using the
+variables ‘branch.<name>.pushRemote’ and ‘remote.pushDefault’.  So we no
+longer have to choose which of the two remotes should be used as "the
+remote".
+
+   Each of the fetching, pulling, and pushing transient commands
+features three suffix commands that act on the current branch and some
+other branch.  Of these, ‘p’ is bound to a command which acts on the
+push-remote, ‘u’ is bound to a command which acts on the upstream, and
+‘e’ is bound to a command which acts on any other branch.  The status
+buffer shows unpushed and unpulled commits for both the push-remote and
+the upstream.
+
+   It's fairly simple to configure these two remotes.  The values of all
+the variables that are related to fetching, pulling, and pushing (as
+well as some other branch-related variables) can be inspected and
+changed using the command ‘magit-branch-configure’, which is available
+from many transient prefix commands that deal with branches.  It is also
+possible to set the push-remote or upstream while pushing (see *note
+Pushing::).
+
+6.6.2 Branch Commands
+---------------------
+
+The transient prefix command ‘magit-branch’ is used to create and
+checkout branches, and to make changes to existing branches.  It is not
+used to fetch, pull, merge, rebase, or push branches, i.e., this command
+deals with branches themselves, not with the commits reachable from
+them.  Those features are available from separate transient commands.
+
+‘b’ (‘magit-branch’)
+     This transient prefix command binds the following suffix commands
+     and displays them in a temporary buffer until a suffix is invoked.
+
+     By default it also binds and displays the values of some
+     branch-related Git variables and allows changing their values.
+
+ -- User Option: magit-branch-direct-configure
+     This option controls whether the transient command ‘magit-branch’
+     can be used to directly change the values of Git variables.  This
+     defaults to ‘t’ (to avoid changing key bindings).  When set to
+     ‘nil’, then no variables are displayed by that transient command,
+     and its suffix command ‘magit-branch-configure’ has to be used
+     instead to view and change branch related variables.
+
+‘b C’ (‘magit-branch-configure’)
+‘f C’
+‘F C’
+‘P C’
+     This transient prefix command binds commands that set the value of
+     branch-related variables and displays them in a temporary buffer
+     until the transient is exited.
+
+     With a prefix argument, this command always prompts for a branch.
+
+     Without a prefix argument this depends on whether it was invoked as
+     a suffix of ‘magit-branch’ and on the
+     ‘magit-branch-direct-configure’ option.  If ‘magit-branch’ already
+     displays the variables for the current branch, then it isn't useful
+     to invoke another transient that displays them for the same branch.
+     In that case this command prompts for a branch.
+
+   The variables are described in *note Branch Git Variables::.
+
+‘b b’ (‘magit-checkout’)
+     Checkout a revision read in the minibuffer and defaulting to the
+     branch or arbitrary revision at point.  If the revision is a local
+     branch then that becomes the current branch.  If it is something
+     else then ‘HEAD’ becomes detached.  Checkout fails if the working
+     tree or the staging area contain changes.
+
+‘b n’ (‘magit-branch-create’)
+     Create a new branch.  The user is asked for a branch or arbitrary
+     revision to use as the starting point of the new branch.  When a
+     branch name is provided, then that becomes the upstream branch of
+     the new branch.  The name of the new branch is also read in the
+     minibuffer.
+
+     Also see option ‘magit-branch-prefer-remote-upstream’.
+
+‘b c’ (‘magit-branch-and-checkout’)
+     This command creates a new branch like ‘magit-branch-create’, but
+     then also checks it out.
+
+     Also see option ‘magit-branch-prefer-remote-upstream’.
+
+‘b l’ (‘magit-branch-checkout’)
+     This command checks out an existing or new local branch.  It reads
+     a branch name from the user offering all local branches and a
+     subset of remote branches as candidates.  Remote branches for which
+     a local branch by the same name exists are omitted from the list of
+     candidates.  The user can also enter a completely new branch name.
+
+        • If the user selects an existing local branch, then that is
+          checked out.
+
+        • If the user selects a remote branch, then it creates and
+          checks out a new local branch with the same name, and
+          configures the selected remote branch as the push target.
+
+        • If the user enters a new branch name, then it creates and
+          checks that out, after also reading the starting-point from
+          the user.
+
+     In the latter two cases the upstream is also set.  Whether it is
+     set to the chosen starting point or something else depends on the
+     value of ‘magit-branch-adjust-remote-upstream-alist’.
+
+‘b s’ (‘magit-branch-spinoff’)
+     This command creates and checks out a new branch starting at and
+     tracking the current branch.  That branch in turn is reset to the
+     last commit it shares with its upstream.  If the current branch has
+     no upstream or no unpushed commits, then the new branch is created
+     anyway and the previously current branch is not touched.
+
+     This is useful to create a feature branch after work has already
+     begun on the old branch (likely but not necessarily "master").
+
+     If the current branch is a member of the value of option
+     ‘magit-branch-prefer-remote-upstream’ (which see), then the current
+     branch will be used as the starting point as usual, but the
+     upstream of the starting-point may be used as the upstream of the
+     new branch, instead of the starting-point itself.
+
+     If optional FROM is non-‘nil’, then the source branch is reset to
+     ‘FROM~’, instead of to the last commit it shares with its upstream.
+     Interactively, FROM is only ever non-‘nil’, if the region selects
+     some commits, and among those commits, FROM is the commit that is
+     the fewest commits ahead of the source branch.
+
+     The commit at the other end of the selection actually does not
+     matter, all commits between FROM and ‘HEAD’ are moved to the new
+     branch.  If FROM is not reachable from ‘HEAD’ or is reachable from
+     the source branch's upstream, then an error is raised.
+
+‘b S’ (‘magit-branch-spinout’)
+     This command behaves like ‘magit-branch-spinoff’, except that it
+     does not change the current branch.  If there are any uncommitted
+     changes, then it behaves exactly like ‘magit-branch-spinoff’.
+
+‘b x’ (‘magit-branch-reset’)
+     This command resets a branch, defaulting to the branch at point, to
+     the tip of another branch or any other commit.
+
+     When the branch being reset is the current branch, then a hard
+     reset is performed.  If there are any uncommitted changes, then the
+     user has to confirm the reset because those changes would be lost.
+
+     This is useful when you have started work on a feature branch but
+     realize it's all crap and want to start over.
+
+     When resetting to another branch and a prefix argument is used,
+     then the target branch is set as the upstream of the branch that is
+     being reset.
+
+‘b k’ (‘magit-branch-delete’)
+     Delete one or multiple branches.  If the region marks multiple
+     branches, then offer to delete those.  Otherwise, prompt for a
+     single branch to be deleted, defaulting to the branch at point.
+
+     Require confirmation when deleting branches is dangerous in some
+     way.  Option ‘magit-no-confirm’ can be customized to not require
+     confirmation in certain cases.  See its docstring to learn why
+     confirmation is required by default in certain cases or if a prompt
+     is confusing.
+
+‘b m’ (‘magit-branch-rename’)
+     Rename a branch.  The branch and the new name are read in the
+     minibuffer.  With prefix argument the branch is renamed even if
+     that name conflicts with an existing branch.
+
+‘b r’ (‘magit-checkout-remote-ref’)
+     This commands first reads a remote from the user.  Then it queries
+     that remote for a list of its references and presents that to the
+     user.  After the user has selected one of them, it fetches just
+     that ref, and finally it checks out "FETCH_HEAD", which now refers
+     to the same commit as REF does on REMOTE.
+
+     This is only useful if you usually only fetch a subset of the refs
+     from REMOTE.  Otherwise it is better to use ‘magit-checkout’, as
+     that avoids a round-trip.
+
+     This command is not shown in the menu by default, see *note
+     transient#Enabling and Disabling Suffixes: (transient)Enabling and
+     Disabling Suffixes.
+
+ -- User Option: magit-branch-read-upstream-first
+     When creating a branch, whether to read the upstream branch before
+     the name of the branch that is to be created.  The default is ‘t’,
+     and I recommend you leave it at that.
+
+ -- User Option: magit-branch-name-suggestions
+     List of names and/or prefixes suggested when naming a new branch.
+
+ -- User Option: magit-branch-prefer-remote-upstream
+     This option specifies whether remote upstreams are favored over
+     local upstreams when creating new branches.
+
+     When a new branch is created, then the branch, commit, or stash at
+     point is suggested as the starting point of the new branch, or if
+     there is no such revision at point the current branch.  In either
+     case the user may choose another starting point.
+
+     If the chosen starting point is a branch, then it may also be set
+     as the upstream of the new branch, depending on the value of the
+     Git variable 'branch.autoSetupMerge'.  By default this is done for
+     remote branches, but not for local branches.
+
+     You might prefer to always use some remote branch as upstream.  If
+     the chosen starting point is (1) a local branch, (2) whose name
+     matches a member of the value of this option, (3) the upstream of
+     that local branch is a remote branch with the same name, and (4)
+     that remote branch can be fast-forwarded to the local branch, then
+     the chosen branch is used as starting point, but its own upstream
+     is used as the upstream of the new branch.
+
+     Members of this option's value are treated as branch names that
+     have to match exactly unless they contain a character that makes
+     them invalid as a branch name.  Recommended characters to use to
+     trigger interpretation as a regexp are "*" and "^".  Some other
+     characters which you might expect to be invalid, actually are not,
+     e.g., ".+$" are all perfectly valid.  More precisely, if ‘git
+     check-ref-format --branch STRING’ exits with a non-zero status,
+     then treat STRING as a regexp.
+
+     Assuming the chosen branch matches these conditions you would end
+     up with with e.g.:
+
+          feature --upstream--> origin/master
+
+     instead of
+
+          feature --upstream--> master --upstream--> origin/master
+
+     Which you prefer is a matter of personal preference.  If you do
+     prefer the former, then you should add branches such as ‘master’,
+     ‘next’, and ‘maint’ to the value of this options.
+
+ -- User Option: magit-branch-adjust-remote-upstream-alist
+     The value of this option is an alist of branches to be used as the
+     upstream when branching a remote branch.
+
+     When creating a local branch from an ephemeral branch located on a
+     remote, e.g., a feature or hotfix branch, then that remote branch
+     should usually not be used as the upstream branch, since the
+     push-remote already allows accessing it and having both the
+     upstream and the push-remote reference the same related branch
+     would be wasteful.  Instead a branch like "maint" or "master"
+     should be used as the upstream.
+
+     This option allows specifying the branch that should be used as the
+     upstream when branching certain remote branches.  The value is an
+     alist of the form ‘((UPSTREAM . RULE)...)’.  The first matching
+     element is used, the following elements are ignored.
+
+     UPSTREAM is the branch to be used as the upstream for branches
+     specified by RULE.  It can be a local or a remote branch.
+
+     RULE can either be a regular expression, matching branches whose
+     upstream should be the one specified by UPSTREAM.  Or it can be a
+     list of the only branches that should *not* use UPSTREAM; all other
+     branches will.  Matching is done after stripping the remote part of
+     the name of the branch that is being branched from.
+
+     If you use a finite set of non-ephemeral branches across all your
+     repositories, then you might use something like:
+
+          (("origin/master" . ("master" "next" "maint")))
+
+     Or if the names of all your ephemeral branches contain a slash, at
+     least in some repositories, then a good value could be:
+
+          (("origin/master" . "/"))
+
+     Of course you can also fine-tune:
+
+          (("origin/maint" . "\\`hotfix/")
+           ("origin/master" . "\\`feature/"))
+
+     UPSTREAM can be a local branch:
+
+          (("master" . ("master" "next" "maint")))
+
+   Because the main branch is no longer almost always named "master" you
+should also account for other common names:
+
+     (("main"  . ("main" "master" "next" "maint"))
+      ("master" . ("main" "master" "next" "maint")))
+
+ -- Command: magit-branch-orphan
+     This command creates and checks out a new orphan branch with
+     contents from a given revision.
+
+ -- Command: magit-branch-or-checkout
+     This command is a hybrid between ‘magit-checkout’ and
+     ‘magit-branch-and-checkout’ and is intended as a replacement for
+     the former in ‘magit-branch’.
+
+     It first asks the user for an existing branch or revision.  If the
+     user input actually can be resolved as a branch or revision, then
+     it checks that out, just like ‘magit-checkout’ would.
+
+     Otherwise it creates and checks out a new branch using the input as
+     its name.  Before doing so it reads the starting-point for the new
+     branch.  This is similar to what ‘magit-branch-and-checkout’ does.
+
+     To use this command instead of ‘magit-checkout’ add this to your
+     init file:
+
+          (transient-replace-suffix 'magit-branch 'magit-checkout
+            '("b" "dwim" magit-branch-or-checkout))
+
+6.6.3 Branch Git Variables
+--------------------------
+
+These variables can be set from the transient prefix command
+‘magit-branch-configure’.  By default they can also be set from
+‘magit-branch’.  See *note Branch Commands::.
+
+ -- Variable: branch.NAME.merge
+     Together with ‘branch.NAME.remote’ this variable defines the
+     upstream branch of the local branch named NAME.  The value of this
+     variable is the full reference of the upstream _branch_.
+
+ -- Variable: branch.NAME.remote
+     Together with ‘branch.NAME.merge’ this variable defines the
+     upstream branch of the local branch named NAME.  The value of this
+     variable is the name of the upstream _remote_.
+
+ -- Variable: branch.NAME.rebase
+     This variable controls whether pulling into the branch named NAME
+     is done by rebasing or by merging the fetched branch.
+
+        • When ‘true’ then pulling is done by rebasing.
+        • When ‘false’ then pulling is done by merging.
+        • When undefined then the value of ‘pull.rebase’ is used.  The
+          default of that variable is ‘false’.
+
+ -- Variable: branch.NAME.pushRemote
+     This variable specifies the remote that the branch named NAME is
+     usually pushed to.  The value has to be the name of an existing
+     remote.
+
+     It is not possible to specify the name of _branch_ to push the
+     local branch to.  The name of the remote branch is always the same
+     as the name of the local branch.
+
+     If this variable is undefined but ‘remote.pushDefault’ is defined,
+     then the value of the latter is used.  By default
+     ‘remote.pushDefault’ is undefined.
+
+ -- Variable: branch.NAME.description
+     This variable can be used to describe the branch named NAME.  That
+     description is used, e.g., when turning the branch into a series of
+     patches.
+
+   The following variables specify defaults which are used if the above
+branch-specific variables are not set.
+
+ -- Variable: pull.rebase
+     This variable specifies whether pulling is done by rebasing or by
+     merging.  It can be overwritten using ‘branch.NAME.rebase’.
+
+        • When ‘true’ then pulling is done by rebasing.
+        • When ‘false’ (the default) then pulling is done by merging.
+
+     Since it is never a good idea to merge the upstream branch into a
+     feature or hotfix branch and most branches are such branches, you
+     should consider setting this to ‘true’, and ‘branch.master.rebase’
+     to ‘false’.
+
+ -- Variable: remote.pushDefault
+     This variable specifies what remote the local branches are usually
+     pushed to.  This can be overwritten per branch using
+     ‘branch.NAME.pushRemote’.
+
+   The following variables are used during the creation of a branch and
+control whether the various branch-specific variables are automatically
+set at this time.
+
+ -- Variable: branch.autoSetupMerge
+     This variable specifies under what circumstances creating a branch
+     NAME should result in the variables ‘branch.NAME.merge’ and
+     ‘branch.NAME.remote’ being set according to the starting point used
+     to create the branch.  If the starting point isn't a branch, then
+     these variables are never set.
+
+        • When ‘always’ then the variables are set regardless of whether
+          the starting point is a local or a remote branch.
+        • When ‘true’ (the default) then the variables are set when the
+          starting point is a remote branch, but not when it is a local
+          branch.
+        • When ‘false’ then the variables are never set.
+
+ -- Variable: branch.autoSetupRebase
+     This variable specifies whether creating a branch NAME should
+     result in the variable ‘branch.NAME.rebase’ being set to ‘true’.
+
+        • When ‘always’ then the variable is set regardless of whether
+          the starting point is a local or a remote branch.
+        • When ‘local’ then the variable are set when the starting point
+          is a local branch, but not when it is a remote branch.
+        • When ‘remote’ then the variable are set when the starting
+          point is a remote branch, but not when it is a local branch.
+        • When ‘never’ (the default) then the variable is never set.
+
+   Note that the respective commands always change the repository-local
+values.  If you want to change the global value, which is used when the
+local value is undefined, then you have to do so on the command line,
+e.g.:
+
+     git config --global remote.autoSetupMerge always
+
+   For more information about these variables you should also see *note
+(gitman)git-config::.  Also see *note (gitman)git-branch::.  , *note
+(gitman)git-checkout::.  and *note Pushing::.
+
+ -- User Option: magit-prefer-remote-upstream
+     This option controls whether commands that read a branch from the
+     user and then set it as the upstream branch, offer a local or a
+     remote branch as default completion candidate, when they have the
+     choice.
+
+     This affects all commands that use ‘magit-read-upstream-branch’ or
+     ‘magit-read-starting-point’, which includes all commands that
+     change the upstream and many which create new branches.
+
+6.6.4 Auxiliary Branch Commands
+-------------------------------
+
+These commands are not available from the transient ‘magit-branch’ by
+default.
+
+ -- Command: magit-branch-shelve
+     This command shelves a branch.  This is done by deleting the
+     branch, and creating a new reference "refs/shelved/BRANCH-NAME"
+     pointing at the same commit as the branch pointed at.  If the
+     deleted branch had a reflog, then that is preserved as the reflog
+     of the new reference.
+
+     This is useful if you want to move a branch out of sight, but are
+     not ready to completely discard it yet.
+
+ -- Command: magit-branch-unshelve
+     This command unshelves a branch that was previously shelved using
+     ‘magit-branch-shelve’.  This is done by deleting the reference
+     "refs/shelved/BRANCH-NAME" and creating a branch "BRANCH-NAME"
+     pointing at the same commit as the deleted reference pointed at.
+     If the deleted reference had a reflog, then that is restored as the
+     reflog of the branch.
+
+
+File: magit.info,  Node: Merging,  Next: Resolving Conflicts,  Prev: Branching,  Up: Manipulating
+
+6.7 Merging
+===========
+
+Also see *note (gitman)git-merge::.  For information on how to resolve
+merge conflicts see the next section.
+
+‘m’ (‘magit-merge’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+   When no merge is in progress, then the transient features the
+following suffix commands.
+
+‘m m’ (‘magit-merge-plain’)
+     This command merges another branch or an arbitrary revision into
+     the current branch.  The branch or revision to be merged is read in
+     the minibuffer and defaults to the branch at point.
+
+     Unless there are conflicts or a prefix argument is used, then the
+     resulting merge commit uses a generic commit message, and the user
+     does not get a chance to inspect or change it before the commit is
+     created.  With a prefix argument this does not actually create the
+     merge commit, which makes it possible to inspect how conflicts were
+     resolved and to adjust the commit message.
+
+     To create an octopus-merge, separate branches with commas.
+
+‘m e’ (‘magit-merge-editmsg’)
+     This command merges another branch or an arbitrary revision into
+     the current branch and opens a commit message buffer, so that the
+     user can make adjustments.  The commit is not actually created
+     until the user finishes with ‘C-c C-c’.
+
+     To create an octopus-merge, separate branches with commas.
+
+‘m n’ (‘magit-merge-nocommit’)
+     This command merges another branch or an arbitrary revision into
+     the current branch, but does not actually create the merge commit.
+     The user can then further adjust the merge, even when automatic
+     conflict resolution succeeded and/or adjust the commit message.
+
+‘m a’ (‘magit-merge-absorb’)
+     This command merges another local branch into the current branch
+     and then removes the former.
+
+     Before the source branch is merged, it is first force pushed to its
+     push-remote, provided the respective remote branch already exists.
+     This ensures that the respective pull-request (if any) won't get
+     stuck on some obsolete version of the commits that are being
+     merged.  Finally, if ‘magit-branch-pull-request’ was used to create
+     the merged branch, then the respective remote branch is also
+     removed.
+
+     To create an octopus-merge, separate branches with commas.
+
+‘m d’ (‘magit-merge-dissolve’)
+     This command merges the current branch into another local branch
+     and then removes the former.  The latter becomes the new current
+     branch.
+
+     Before the source branch is merged, it is first force pushed to its
+     push-remote, provided the respective remote branch already exists.
+     This ensures that the respective pull-request (if any) won't get
+     stuck on some obsolete version of the commits that are being
+     merged.  Finally, if ‘magit-branch-pull-request’ was used to create
+     the merged branch, then the respective remote branch is also
+     removed.
+
+‘m s’ (‘magit-merge-squash’)
+     This command squashes the changes introduced by another branch or
+     an arbitrary revision into the current branch.  This only applies
+     the changes made by the squashed commits.  No information is
+     preserved that would allow creating an actual merge commit.
+     Instead of this command you should probably use a command from the
+     apply transient.
+
+‘m p’ (‘magit-merge-preview’)
+     This command shows a preview of merging another branch or an
+     arbitrary revision into the current branch.
+
+     Note that commands, that normally change how a diff is displayed,
+     do not work in buffers created by this command, because the
+     underlying Git command does not support diff arguments.
+
+   When a merge is in progress, then the transient instead features the
+following suffix commands.
+
+‘m m’ (‘magit-merge’)
+     After the user resolved conflicts, this command proceeds with the
+     merge.  If some conflicts weren't resolved, then this command
+     fails.
+
+‘m a’ (‘magit-merge-abort’)
+     This command aborts the current merge operation.
+
+
+File: magit.info,  Node: Resolving Conflicts,  Next: Rebasing,  Prev: Merging,  Up: Manipulating
+
+6.8 Resolving Conflicts
+=======================
+
+When merging branches (or otherwise combining or changing history)
+conflicts can occur.  If you edited two completely different parts of
+the same file in two branches and then merge one of these branches into
+the other, then Git can resolve that on its own, but if you edit the
+same area of a file, then a human is required to decide how the two
+versions, or "sides of the conflict", are to be combined into one.
+
+   Here we can only provide a brief introduction to the subject and
+point you toward some tools that can help.  If you are new to this, then
+please also consult Git's own documentation as well as other resources.
+
+   If a file has conflicts and Git cannot resolve them by itself, then
+it puts both versions into the affected file along with special markers
+whose purpose is to denote the boundaries of the unresolved part of the
+file and between the different versions.  These boundary lines begin
+with the strings consisting of seven times the same character, one of
+‘<’, ‘|’, ‘=’ and ‘>’, and are followed by information about the source
+of the respective versions, e.g.:
+
+     <<<<<<< HEAD
+     Take the blue pill.
+     =======
+     Take the red pill.
+     >>>>>>> feature
+
+   In this case you have chosen to take the red pill on one branch and
+on another you picked the blue pill.  Now that you are merging these two
+diverging branches, Git cannot possibly know which pill you want to
+take.
+
+   To resolve that conflict you have to create a version of the affected
+area of the file by keeping only one of the sides, possibly by editing
+it in order to bring in the changes from the other side, remove the
+other versions as well as the markers, and then stage the result.  A
+possible resolution might be:
+
+     Take both pills.
+
+   Often it is useful to see not only the two sides of the conflict but
+also the "original" version from before the same area of the file was
+modified twice on different branches.  Instruct Git to insert that
+version as well by running this command once:
+
+     git config --global merge.conflictStyle diff3
+
+   The above conflict might then have looked like this:
+
+     <<<<<<< HEAD
+     Take the blue pill.
+     ||||||| merged common ancestors
+     Take either the blue or the red pill, but not both.
+     =======
+     Take the red pill.
+     >>>>>>> feature
+
+   If that were the case, then the above conflict resolution would not
+have been correct, which demonstrates why seeing the original version
+alongside the conflicting versions can be useful.
+
+   You can perform the conflict resolution completely by hand, but Emacs
+also provides some packages that help in the process: Smerge, Ediff
+(*note (ediff)Top::), and Emerge (*note (emacs)Emerge::).  Magit does
+not provide its own tools for conflict resolution, but it does make
+using Smerge and Ediff more convenient.  (Ediff supersedes Emerge, so
+you probably don't want to use the latter anyway.)
+
+   In the Magit status buffer, files with unresolved conflicts are
+listed in the "Unstaged changes" and/or "Staged changes" sections.  They
+are prefixed with the word "unmerged", which in this context essentially
+is a synonym for "unresolved".
+
+   Pressing ‘RET’ while point is on such a file section shows a buffer
+visiting that file, turns on ‘smerge-mode’ in that buffer, and places
+point inside the first area with conflicts.  You should then resolve
+that conflict using regular edit commands and/or Smerge commands.
+
+   Unfortunately Smerge does not have a manual, but you can get a list
+of commands and binding ‘C-c ^ C-h’ and press ‘RET’ while point is on a
+command name to read its documentation.
+
+   Normally you would edit one version and then tell Smerge to keep only
+that version.  Use ‘C-c ^ m’ (‘smerge-keep-mine’) to keep the ‘HEAD’
+version or ‘C-c ^ o’ (‘smerge-keep-other’) to keep the version that
+follows "|||||||".  Then use ‘C-c ^ n’ to move to the next conflicting
+area in the same file.  Once you are done resolving conflicts, return to
+the Magit status buffer.  The file should now be shown as "modified", no
+longer as "unmerged", because Smerge automatically stages the file when
+you save the buffer after resolving the last conflict.
+
+   Magit now wraps the mentioned Smerge commands, allowing you to use
+these key bindings without having to go to the file-visiting buffer.
+Additionally ‘k’ (‘magit-discard’) on a hunk with unresolved conflicts
+asks which side to keep or, if point is on a side, then it keeps it
+without prompting.  Similarly ‘k’ on a unresolved file ask which side to
+keep.
+
+   Alternatively you could use Ediff, which uses separate buffers for
+the different versions of the file.  To resolve conflicts in a file
+using Ediff press ‘e’ while point is on such a file in the status
+buffer.
+
+   Ediff can be used for other purposes as well.  For more information
+on how to enter Ediff from Magit, see *note Ediffing::.  Explaining how
+to use Ediff is beyond the scope of this manual, instead see *note
+(ediff)Top::.
+
+   If you are unsure whether you should Smerge or Ediff, then use the
+former.  It is much easier to understand and use, and except for truly
+complex conflicts, the latter is usually overkill.
+
+
+File: magit.info,  Node: Rebasing,  Next: Cherry Picking,  Prev: Resolving Conflicts,  Up: Manipulating
+
+6.9 Rebasing
+============
+
+Also see *note (gitman)git-rebase::.  For information on how to resolve
+conflicts that occur during rebases see the preceding section.
+
+‘r’ (‘magit-rebase’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+   When no rebase is in progress, then the transient features the
+following suffix commands.
+
+   Using one of these commands _starts_ a rebase sequence.  Git might
+then stop somewhere along the way, either because you told it to do so,
+or because applying a commit failed due to a conflict.  When that
+happens, then the status buffer shows information about the rebase
+sequence which is in progress in a section similar to a log section.
+See *note Information About In-Progress Rebase::.
+
+   For information about the upstream and the push-remote, see *note The
+Two Remotes::.
+
+‘r p’ (‘magit-rebase-onto-pushremote’)
+     This command rebases the current branch onto its push-remote.
+
+     With a prefix argument or when the push-remote is either not
+     configured or unusable, then let the user first configure the
+     push-remote.
+
+‘r u’ (‘magit-rebase-onto-upstream’)
+     This command rebases the current branch onto its upstream branch.
+
+     With a prefix argument or when the upstream is either not
+     configured or unusable, then let the user first configure the
+     upstream.
+
+‘r e’ (‘magit-rebase-branch’)
+     This command rebases the current branch onto a branch read in the
+     minibuffer.  All commits that are reachable from head but not from
+     the selected branch TARGET are being rebased.
+
+‘r s’ (‘magit-rebase-subset’)
+     This command starts a non-interactive rebase sequence to transfer
+     commits from START to ‘HEAD’ onto NEWBASE.  START has to be
+     selected from a list of recent commits.
+
+     This command calls ‘git rebase --onto NEWBASE START HEAD’.  Because
+     the range always ends at ‘HEAD’, you must first check out the
+     branch or commit you want as the upper bound (a detached ‘HEAD’
+     works too).
+
+   By default Magit uses the ‘--autostash’ argument, which causes
+uncommitted changes to be stored in a stash before the rebase begins.
+These changes are restored after the rebase completes and if possible
+the stash is removed.  If the stash does not apply cleanly, then the
+stash is not removed.  In case something goes wrong when resolving the
+conflicts, this allows you to start over.
+
+   Even though one of the actions is dedicated to interactive rebases,
+the transient also features the infix argument ‘--interactive’.  This
+can be used to turn one of the other, non-interactive rebase variants
+into an interactive rebase.
+
+   For example if you want to clean up a feature branch and at the same
+time rebase it onto ‘master’, then you could use ‘r-iu’.  But we
+recommend that you instead do that in two steps.  First use ‘ri’ to
+cleanup the feature branch, and then in a second step ‘ru’ to rebase it
+onto ‘master’.  That way if things turn out to be more complicated than
+you thought and/or you make a mistake and have to start over, then you
+only have to redo half the work.
+
+   Explicitly enabling ‘--interactive’ won't have an effect on the
+following commands as they always use that argument anyway, even if it
+is not enabled in the transient.
+
+‘r i’ (‘magit-rebase-interactive’)
+     This command starts an interactive rebase sequence.
+
+‘r f’ (‘magit-rebase-autosquash’)
+     This command combines squash and fixup commits with their intended
+     targets.
+
+     By default only commits that are not reachable from the upstream
+     branch are potentially squashed into.  If no upstream is configured
+     or with a prefix argument, the user is prompted for the first
+     commit to potentially squash into.
+
+‘r m’ (‘magit-rebase-edit-commit’)
+     This command starts an interactive rebase sequence that lets the
+     user edit a single older commit.
+
+‘r w’ (‘magit-rebase-reword-commit’)
+     This command starts an interactive rebase sequence that lets the
+     user reword a single older commit.
+
+‘r k’ (‘magit-rebase-remove-commit’)
+     This command removes a single older commit using rebase.
+
+   When a rebase is in progress, then the transient instead features the
+following suffix commands.
+
+‘r r’ (‘magit-rebase-continue’)
+     This command restart the current rebasing operation.
+
+     In some cases this pops up a commit message buffer for you do edit.
+     With a prefix argument the old message is reused as-is.
+
+‘r s’ (‘magit-rebase-skip’)
+     This command skips the current commit and restarts the current
+     rebase operation.
+
+‘r e’ (‘magit-rebase-edit’)
+     This command lets the user edit the todo list of the current rebase
+     operation.
+
+‘r a’ (‘magit-rebase-abort’)
+     This command aborts the current rebase operation, restoring the
+     original branch.
+
+6.9.1 Editing Rebase Sequences
+------------------------------
+
+‘C-c C-c’ (‘with-editor-finish’)
+     Finish the current editing session by returning with exit code 0.
+     Git then uses the rebase instructions it finds in the file.
+
+‘C-c C-k’ (‘with-editor-cancel’)
+     Cancel the current editing session by returning with exit code 1.
+     Git then forgoes starting the rebase sequence.
+
+‘<RET>’ (‘git-rebase-show-commit’)
+     Show the commit on the current line in another buffer and select
+     that buffer.
+
+‘<SPC>’ (‘git-rebase-show-or-scroll-up’)
+     Show the commit on the current line in another buffer without
+     selecting that buffer.  If the revision buffer is already visible
+     in another window of the current frame, then instead scroll that
+     window up.
+
+‘<DEL>’ (‘git-rebase-show-or-scroll-down’)
+     Show the commit on the current line in another buffer without
+     selecting that buffer.  If the revision buffer is already visible
+     in another window of the current frame, then instead scroll that
+     window down.
+
+‘p’ (‘git-rebase-backward-line’)
+     Move to previous line.
+
+‘n’ (‘forward-line’)
+     Move to next line.
+
+‘M-p’ (‘git-rebase-move-line-up’)
+     Move the current commit (or command) up.
+
+‘M-n’ (‘git-rebase-move-line-down’)
+     Move the current commit (or command) down.
+
+‘r’ (‘git-rebase-reword’)
+     Edit message of commit on current line.
+
+‘e’ (‘git-rebase-edit’)
+     Stop at the commit on the current line.
+
+‘s’ (‘git-rebase-squash’)
+     This command folds the commit on the current line into the previous
+     commit, giving the user a change to manually merge the two
+     messages.
+
+‘S’ (‘git-rebase-squish’)
+     This command folds the commit on the current line into the previous
+     commit, discarding the message of the previous commit but giving
+     the user a change to edit the final message, based on the message
+     of the current commit.
+
+     This action's indicator, shown in the list of commits, is ‘fixup
+     -c’ (with a lower-case c).
+
+‘f’ (‘git-rebase-fixup’)
+     This command folds the commit on the current line into the previous
+     commit, using only the message of the previous commit as-is and
+     discarding the message of the current commit.
+
+‘F’ (‘git-rebase-alter’)
+     This command folds the commit on the current into the previous
+     commit, discarding the message of the previous commit and instead
+     using the message of the current commit as-is.
+
+     This is like ‘git-rebase-alter’, except that it uses the other
+     message.  This is also like ‘git-rebase-squish’, except that it
+     lets the user edit the message.
+
+     This action's indicator, shown in the list of commits, is ‘fixup
+     -C’ (with a upper-case C).
+
+‘k’ (‘git-rebase-kill-line’)
+     Comment the current action line, or if it is already commented,
+     then uncomment it.
+
+‘c’ (‘git-rebase-pick’)
+     Use commit on current line.
+
+‘x’ (‘git-rebase-exec’)
+     Insert a shell command to be run after the proceeding commit.
+
+     If there already is such a command on the current line, then edit
+     that instead.  With a prefix argument insert a new command even
+     when there already is one on the current line.  With empty input
+     remove the command on the current line, if any.
+
+‘b’ (‘git-rebase-break’)
+     Insert a break action before the current line, instructing Git to
+     return control to the user.
+
+‘y’ (‘git-rebase-insert’)
+     Read an arbitrary commit and insert it below current line.
+
+‘C-x u’ (‘git-rebase-undo’)
+     Undo some previous changes.  Like ‘undo’ but works in read-only
+     buffers.
+
+ -- User Option: git-rebase-auto-advance
+     Whether to move to next line after changing a line.
+
+ -- User Option: git-rebase-show-instructions
+     Whether to show usage instructions inside the rebase buffer.
+
+ -- User Option: git-rebase-confirm-cancel
+     Whether confirmation is required to cancel.
+
+   When a rebase is performed with the ‘--rebase-merges’ option, the
+sequence will include a few other types of actions and the following
+commands become relevant.
+
+‘l’ (‘git-rebase-label’)
+     This commands inserts a label action or edits the one at point.
+
+‘t’ (‘git-rebase-reset’)
+     This command inserts a reset action or edits the one at point.  The
+     prompt will offer the labels that are currently present in the
+     buffer.
+
+‘MM’ (‘git-rebase-merge’)
+     The command inserts a merge action or edits the one at point.  The
+     prompt will offer the labels that are currently present in the
+     buffer.  Specifying a message to reuse via ‘-c’ or ‘-C’ is not
+     supported; an editor will always be invoked for the merge.
+
+‘Mt’ (‘git-rebase-merge-toggle-editmsg’)
+     This command toggles between the ‘-C’ and ‘-c’ options of the merge
+     action at point.  These options both specify a commit whose message
+     should be reused.  The lower-case variant instructs Git to invoke
+     the editor when creating the merge, allowing the user to edit the
+     message.
+
+6.9.2 Information About In-Progress Rebase
+------------------------------------------
+
+While a rebase sequence is in progress, the status buffer features a
+section that lists the commits that have already been applied as well as
+the commits that still have to be applied.
+
+   The commits are split in two halves.  When rebase stops at a commit,
+either because the user has to deal with a conflict or because s/he
+explicitly requested that rebase stops at that commit, then point is
+placed on the commit that separates the two groups, i.e., on ‘HEAD’.
+The commits above it have not been applied yet, while the ‘HEAD’ and the
+commits below it have already been applied.  In between these two groups
+of applied and yet-to-be applied commits, there sometimes is a commit
+which has been dropped.
+
+   Each commit is prefixed with a word and these words are additionally
+shown in different colors to indicate the status of the commits.
+
+   The following colors are used:
+
+   • Commits that use the same foreground color as the ‘default’ face
+     have not been applied yet.
+
+   • Yellow commits have some special relationship to the commit rebase
+     stopped at.  This is used for the words "join", "goal", "same" and
+     "work" (see below).
+
+   • Gray commits have already been applied.
+
+   • The blue commit is the ‘HEAD’ commit.
+
+   • The green commit is the commit the rebase sequence stopped at.  If
+     this is the same commit as ‘HEAD’ (e.g., because you haven't done
+     anything yet after rebase stopped at the commit, then this commit
+     is shown in blue, not green).  There can only be a green *and* a
+     blue commit at the same time, if you create one or more new commits
+     after rebase stops at a commit.
+
+   • Red commits have been dropped.  They are shown for reference only,
+     e.g., to make it easier to diff.
+
+   Of course these colors are subject to the color-theme in use.
+
+   The following words are used:
+
+   • Commits prefixed with ‘pick’, ‘reword’, ‘edit’, ‘squash’, and
+     ‘fixup’ have not been applied yet.  These words have the same
+     meaning here as they do in the buffer used to edit the rebase
+     sequence.  See *note Editing Rebase Sequences::.  When the
+     ‘--rebase-merges’ option was specified, ‘reset’, ‘label’, and
+     ‘merge’ lines may also be present.
+
+   • Commits prefixed with ‘done’ and ‘onto’ have already been applied.
+     It is possible for such a commit to be the ‘HEAD’, in which case it
+     is blue.  Otherwise it is grey.
+
+        • The commit prefixed with ‘onto’ is the commit on top of which
+          all the other commits are being re-applied.  This commit
+          itself did not have to be re-applied, it is the commit rebase
+          did rewind to before starting to re-apply other commits.
+
+        • Commits prefixed with ‘done’ have already been re-applied.
+          This includes commits that have been re-applied but also new
+          commits that you have created during the rebase.
+
+   • All other commits, those not prefixed with any of the above words,
+     are in some way related to the commit at which rebase stopped.
+
+     To determine whether a commit is related to the stopped-at commit
+     their hashes, trees and patch-ids (1) are being compared.  The
+     commit message is not used for this purpose.
+
+     Generally speaking commits that are related to the stopped-at
+     commit can have any of the used colors, though not all color/word
+     combinations are possible.
+
+     Words used for stopped-at commits are:
+
+        • When a commit is prefixed with ‘void’, then that indicates
+          that Magit knows for sure that all the changes in that commit
+          have been applied using several new commits.  This commit is
+          no longer reachable from ‘HEAD’, and it also isn't one of the
+          commits that will be applied when resuming the session.
+
+        • When a commit is prefixed with ‘join’, then that indicates
+          that the rebase sequence stopped at that commit due to a
+          conflict - you now have to join (merge) the changes with what
+          has already been applied.  In a sense this is the commit
+          rebase stopped at, but while its effect is already in the
+          index and in the worktree (with conflict markers), the commit
+          itself has not actually been applied yet (it isn't the
+          ‘HEAD’).  So it is shown in yellow, like the other commits
+          that still have to be applied.
+
+        • When a commit is prefixed with ‘stop’ or a _blue_ or _green_
+          ‘same’, then that indicates that rebase stopped at this
+          commit, that it is still applied or has been applied again,
+          and that at least its patch-id is unchanged.
+
+             • When a commit is prefixed with ‘stop’, then that
+               indicates that rebase stopped at that commit because you
+               requested that earlier, and its patch-id is unchanged.
+               It might even still be the exact same commit.
+
+             • When a commit is prefixed with a _blue_ or _green_
+               ‘same’, then that indicates that while its tree or hash
+               changed, its patch-id did not.  If it is blue, then it is
+               the ‘HEAD’ commit (as always for blue).  When it is
+               green, then it no longer is ‘HEAD’ because other commit
+               have been created since (but before continuing the
+               rebase).
+
+        • When a commit is prefixed with ‘goal’, a _yellow_ ‘same,’ or
+          ‘work’, then that indicates that rebase applied that commit
+          but that you then reset ‘HEAD’ to an earlier commit (likely to
+          split it up into multiple commits), and that there are some
+          uncommitted changes remaining which likely (but not
+          necessarily) originate from that commit.
+
+             • When a commit is prefixed with ‘goal’, then that
+               indicates that it is still possible to create a new
+               commit with the exact same tree (the "goal") without
+               manually editing any files, by committing the index, or
+               by staging all changes and then committing that.  This is
+               the case when the original tree still exists in the index
+               or worktree in untainted form.
+
+             • When a commit is prefixed with a yellow ‘same’, then that
+               indicates that it is no longer possible to create a
+               commit with the exact same tree, but that it is still
+               possible to create a commit with the same patch-id.  This
+               would be the case if you created a new commit with other
+               changes, but the changes from the original commit still
+               exist in the index or working tree in untainted form.
+
+             • When a commit is prefixed with ‘work’, then that
+               indicates that you reset ‘HEAD’ to an earlier commit, and
+               that there are some staged and/or unstaged changes
+               (likely, but not necessarily) originating from that
+               commit.  However it is no longer possible to create a new
+               commit with the same tree or at least the same patch-id
+               because you have already made other changes.
+
+        • When a commit is prefixed with ‘poof’ or ‘gone’, then that
+          indicates that rebase applied that commit but that you then
+          reset ‘HEAD’ to an earlier commit (likely to split it up into
+          multiple commits), and that there are no uncommitted changes.
+
+             • When a commit is prefixed with ‘poof’, then that
+               indicates that it is no longer reachable from ‘HEAD’, but
+               that it has been replaced with one or more commits, which
+               together have the exact same effect.
+
+             • When a commit is prefixed with ‘gone’, then that
+               indicates that it is no longer reachable from ‘HEAD’ and
+               that we also cannot determine whether its changes are
+               still in effect in one or more new commits.  They might
+               be, but if so, then there must also be other changes
+               which makes it impossible to know for sure.
+
+   Do not worry if you do not fully understand the above.  That's okay,
+you will acquire a good enough understanding through practice.
+
+   For other sequence operations such as cherry-picking, a similar
+section is displayed, but they lack some of the features described
+above, due to limitations in the git commands used to implement them.
+Most importantly these sequences only support "picking" a commit but not
+other actions such as "rewording", and they do not keep track of the
+commits which have already been applied.
+
+   ---------- Footnotes ----------
+
+   (1) The patch-id is a hash of the _changes_ introduced by a commit.
+It differs from the hash of the commit itself, which is a hash of the
+result of applying that change (i.e., the resulting trees and blobs) as
+well as author and committer information, the commit message, and the
+hashes of the parents of the commit.  The patch-id hash on the other
+hand is created only from the added and removed lines, even line numbers
+and whitespace changes are ignored when calculating this hash.  The
+patch-ids of two commits can be used to answer the question "Do these
+commits make the same change?".
+
+
+File: magit.info,  Node: Cherry Picking,  Next: Resetting,  Prev: Rebasing,  Up: Manipulating
+
+6.10 Cherry Picking
+===================
+
+Also see *note (gitman)git-cherry-pick::.
+
+‘A’ (‘magit-cherry-pick’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+   When no cherry-pick or revert is in progress, then the transient
+features the following suffix commands.
+
+‘A A’ (‘magit-cherry-copy’)
+     This command copies COMMITS from another branch onto the current
+     branch.  If the region selects multiple commits, then those are
+     copied, without prompting.  Otherwise the user is prompted for a
+     commit or range, defaulting to the commit at point.
+
+‘A a’ (‘magit-cherry-apply’)
+     This command applies the changes in COMMITS from another branch
+     onto the current branch.  If the region selects multiple commits,
+     then those are used, without prompting.  Otherwise the user is
+     prompted for a commit or range, defaulting to the commit at point.
+
+     This command also has a top-level binding, which can be invoked
+     without using the transient by typing ‘a’ at the top-level.
+
+   The following commands not only apply some commits to some branch,
+but also remove them from some other branch.  The removal is performed
+using either ‘git-update-ref’ or if necessary ‘git-rebase’.  Both
+applying commits as well as removing them using ‘git-rebase’ can lead to
+conflicts.  If that happens, then these commands abort and you not only
+have to resolve the conflicts but also finish the process the same way
+you would have to if these commands didn't exist at all.
+
+‘A h’ (‘magit-cherry-harvest’)
+     This command moves the selected COMMITS that must be located on
+     another BRANCH onto the current branch instead, removing them from
+     the former.  When this command succeeds, then the same branch is
+     current as before.
+
+     Applying the commits on the current branch or removing them from
+     the other branch can lead to conflicts.  When that happens, then
+     this command stops and you have to resolve the conflicts and then
+     finish the process manually.
+
+‘A d’ (‘magit-cherry-donate’)
+     This command moves the selected COMMITS from the current branch
+     onto another existing BRANCH, removing them from the former.  When
+     this command succeeds, then the same branch is current as before.
+     ‘HEAD’ is allowed to be detached initially.
+
+     Applying the commits on the other branch or removing them from the
+     current branch can lead to conflicts.  When that happens, then this
+     command stops and you have to resolve the conflicts and then finish
+     the process manually.
+
+‘A n’ (‘magit-cherry-spinout’)
+     This command moves the selected COMMITS from the current branch
+     onto a new branch BRANCH, removing them from the former.  When this
+     command succeeds, then the same branch is current as before.
+
+     Applying the commits on the other branch or removing them from the
+     current branch can lead to conflicts.  When that happens, then this
+     command stops and you have to resolve the conflicts and then finish
+     the process manually.
+
+‘A s’ (‘magit-cherry-spinoff’)
+     This command moves the selected COMMITS from the current branch
+     onto a new branch BRANCH, removing them from the former.  When this
+     command succeeds, then the new branch is checked out.
+
+     Applying the commits on the other branch or removing them from the
+     current branch can lead to conflicts.  When that happens, then this
+     command stops and you have to resolve the conflicts and then finish
+     the process manually.
+
+   When a cherry-pick or revert is in progress, then the transient
+instead features the following suffix commands.
+
+‘A A’ (‘magit-sequence-continue’)
+     Resume the current cherry-pick or revert sequence.
+
+‘A s’ (‘magit-sequence-skip’)
+     Skip the stopped at commit during a cherry-pick or revert sequence.
+
+‘A a’ (‘magit-sequence-abort’)
+     Abort the current cherry-pick or revert sequence.  This discards
+     all changes made since the sequence started.
+
+6.10.1 Reverting
+----------------
+
+‘V’ (‘magit-revert’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+   When no cherry-pick or revert is in progress, then the transient
+features the following suffix commands.
+
+‘V V’ (‘magit-revert-and-commit’)
+     Revert a commit by creating a new commit.  Prompt for a commit,
+     defaulting to the commit at point.  If the region selects multiple
+     commits, then revert all of them, without prompting.
+
+‘V v’ (‘magit-revert-no-commit’)
+     Revert a commit by applying it in reverse to the working tree.
+     Prompt for a commit, defaulting to the commit at point.  If the
+     region selects multiple commits, then revert all of them, without
+     prompting.
+
+   When a cherry-pick or revert is in progress, then the transient
+instead features the following suffix commands.
+
+‘V V’ (‘magit-sequence-continue’)
+     Resume the current cherry-pick or revert sequence.
+
+‘V s’ (‘magit-sequence-skip’)
+     Skip the stopped at commit during a cherry-pick or revert sequence.
+
+‘V a’ (‘magit-sequence-abort’)
+     Abort the current cherry-pick or revert sequence.  This discards
+     all changes made since the sequence started.
+
+
+File: magit.info,  Node: Resetting,  Next: Stashing,  Prev: Cherry Picking,  Up: Manipulating
+
+6.11 Resetting
+==============
+
+Also see *note (gitman)git-reset::.
+
+‘x’ (‘magit-reset-quickly’)
+     Reset the ‘HEAD’ and index to some commit read from the user and
+     defaulting to the commit at point, and possibly also reset the
+     working tree.  With a prefix argument reset the working tree
+     otherwise don't.
+
+‘X m’ (‘magit-reset-mixed’)
+     Reset the ‘HEAD’ and index to some commit read from the user and
+     defaulting to the commit at point.  The working tree is kept as-is.
+
+‘X s’ (‘magit-reset-soft’)
+     Reset the ‘HEAD’ to some commit read from the user and defaulting
+     to the commit at point.  The index and the working tree are kept
+     as-is.
+
+‘X h’ (‘magit-reset-hard’)
+     Reset the ‘HEAD’, index, and working tree to some commit read from
+     the user and defaulting to the commit at point.
+
+‘X k’ (‘magit-reset-keep’)
+     Reset the ‘HEAD’, index, and working tree to some commit read from
+     the user and defaulting to the commit at point.  Uncommitted
+     changes are kept as-is.
+
+‘X i’ (‘magit-reset-index’)
+     Reset the index to some commit read from the user and defaulting to
+     the commit at point.  Keep the ‘HEAD’ and working tree as-is, so if
+     the commit refers to the ‘HEAD’, then this effectively unstages all
+     changes.
+
+‘X w’ (‘magit-reset-worktree’)
+     Reset the working tree to some commit read from the user and
+     defaulting to the commit at point.  Keep the ‘HEAD’ and index
+     as-is.
+
+‘X f’ (‘magit-file-checkout’)
+     Update file in the working tree and index to the contents from a
+     revision.  Both the revision and file are read from the user.
+
+
+File: magit.info,  Node: Stashing,  Prev: Resetting,  Up: Manipulating
+
+6.12 Stashing
+=============
+
+Also see *note (gitman)git-stash::.
+
+‘z’ (‘magit-stash’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+‘z z’ (‘magit-stash-both’)
+     Create a stash of the index and working tree.  Untracked files are
+     included according to infix arguments.  One prefix argument is
+     equivalent to ‘--include-untracked’ while two prefix arguments are
+     equivalent to ‘--all’.
+
+‘z i’ (‘magit-stash-index’)
+     Create a stash of the index only.  Unstaged and untracked changes
+     are not stashed.
+
+‘z w’ (‘magit-stash-worktree’)
+     Create a stash of unstaged changes in the working tree.  Untracked
+     files are included according to infix arguments.  One prefix
+     argument is equivalent to ‘--include-untracked’ while two prefix
+     arguments are equivalent to ‘--all’.
+
+‘z x’ (‘magit-stash-keep-index’)
+     Create a stash of the index and working tree, keeping index intact.
+     Untracked files are included according to infix arguments.  One
+     prefix argument is equivalent to ‘--include-untracked’ while two
+     prefix arguments are equivalent to ‘--all’.
+
+‘z Z’ (‘magit-snapshot-both’)
+     Create a snapshot of the index and working tree.  Untracked files
+     are included according to infix arguments.  One prefix argument is
+     equivalent to ‘--include-untracked’ while two prefix arguments are
+     equivalent to ‘--all’.
+
+‘z I’ (‘magit-snapshot-index’)
+     Create a snapshot of the index only.  Unstaged and untracked
+     changes are not stashed.
+
+‘z W’ (‘magit-snapshot-worktree’)
+     Create a snapshot of unstaged changes in the working tree.
+     Untracked files are included according to infix arguments.  One
+     prefix argument is equivalent to ‘--include-untracked’ while two
+     prefix arguments are equivalent to ‘--all’-.
+
+‘z a’ (‘magit-stash-apply’)
+     Apply a stash to the working tree.
+
+     When using a Git release before v2.38.0, simply run ‘git stash
+     apply’ or with a prefix argument ‘git stash apply --index’.
+
+     When using Git v2.38.0 or later, behave more intelligently:
+
+     First try ‘git stash apply --index’, which tries to preserve the
+     index stored in the stash, if any.  This may fail because applying
+     the stash could result in conflicts and those have to be stored in
+     the index, making it impossible to also store the stash's index
+     there.
+
+     If ‘git stash’ fails, then potentially fall back to using ‘git
+     apply’.  If the stash does not touch any unstaged files, then pass
+     ‘--3way’ to that command.  Otherwise ask the user whether to use
+     that argument or ‘--reject’.  Customize ‘magit-no-confirm’ if you
+     want to fall back to using ‘--3way’, without being prompted.
+
+‘z p’ (‘magit-stash-pop’)
+     Apply a stash to the working tree.  On complete success (if the
+     stash can be applied without any conflicts, and while preserving
+     the stash's index) then remove the stash from stash list.
+
+     When using a Git release before v2.38.0, simply run ‘git stash pop’
+     or with a prefix argument ‘git stash pop --index’.
+
+     When using Git v2.38.0 or later, behave more intelligently:
+
+     First try ‘git stash pop --index’, which tries to preserve the
+     index stored in the stash, if any.  This may fail because applying
+     the stash could result in conflicts and those have to be stored in
+     the index, making it impossible to also store the stash's index
+     there.
+
+     If ‘git stash’ fails, then potentially fall back to using ‘git
+     apply’.  If the stash does not touch any unstaged files, then pass
+     ‘--3way’ to that command.  Otherwise ask the user whether to use
+     that argument or ‘--reject’.  Customize ‘magit-no-confirm’ if you
+     want to fall back to using ‘--3way’, without being prompted.
+
+‘z k’ (‘magit-stash-drop’)
+     Remove a stash from the stash list.  When the region is active,
+     offer to drop all contained stashes.
+
+‘z v’ (‘magit-stash-show’)
+     Show all diffs of a stash in a buffer.
+
+‘z b’ (‘magit-stash-branch’)
+     Create and checkout a new branch from an existing stash.  The new
+     branch starts at the commit that was current when the stash was
+     created.
+
+‘z B’ (‘magit-stash-branch-here’)
+     Create and checkout a new branch from an existing stash.  Use the
+     current branch or ‘HEAD’ as the starting-point of the new branch.
+     Then apply the stash, dropping it if it applies cleanly.
+
+‘z f’ (‘magit-stash-format-patch’)
+     Create a patch from STASH.
+
+‘k’ (‘magit-stash-clear’)
+     Remove all stashes saved in REF's reflog by deleting REF.
+
+‘z l’ (‘magit-stash-list’)
+     List all stashes in a buffer.
+
+ -- User Option: magit-stashes-margin
+     This option specifies whether the margin is initially shown in
+     stashes buffers and how it is formatted.
+
+     The value has the form ‘(INIT STYLE WIDTH AUTHOR AUTHOR-WIDTH)’.
+
+        • If INIT is non-‘nil’, then the margin is shown initially.
+        • STYLE controls how to format the author or committer date.  It
+          can be one of ‘age’ (to show the age of the commit),
+          ‘age-abbreviated’ (to abbreviate the time unit to a
+          character), or a string (suitable for ‘format-time-string’) to
+          show the actual date.  Option
+          ‘magit-log-margin-show-committer-date’ controls which date is
+          being displayed.
+        • WIDTH controls the width of the margin.  This exists for
+          forward compatibility and currently the value should not be
+          changed.
+        • AUTHOR controls whether the name of the author is also shown
+          by default.
+        • AUTHOR-WIDTH has to be an integer.  When the name of the
+          author is shown, then this specifies how much space is used to
+          do so.
+
+
+File: magit.info,  Node: Transferring,  Next: Miscellaneous,  Prev: Manipulating,  Up: Top
+
+7 Transferring
+**************
+
+* Menu:
+
+* Remotes::
+* Fetching::
+* Pulling::
+* Pushing::
+* Plain Patches::
+* Maildir Patches::
+
+
+File: magit.info,  Node: Remotes,  Next: Fetching,  Up: Transferring
+
+7.1 Remotes
+===========
+
+7.1.1 Remote Commands
+---------------------
+
+The transient prefix command ‘magit-remote’ is used to add remotes and
+to make changes to existing remotes.  This command only deals with
+remotes themselves, not with branches or the transfer of commits.  Those
+features are available from separate transient commands.
+
+   Also see *note (gitman)git-remote::.
+
+‘M’ (‘magit-remote’)
+     This transient prefix command binds the following suffix commands
+     and displays them in a temporary buffer until a suffix is invoked.
+
+     By default it also binds and displays the values of some
+     remote-related Git variables and allows changing their values.
+
+ -- User Option: magit-remote-direct-configure
+     This option controls whether remote-related Git variables are
+     accessible directly from the transient ‘magit-remote’.
+
+     If ‘t’ (the default) and a local branch is checked out, then
+     ‘magit-remote’ features the variables for the upstream remote of
+     that branch, or if ‘HEAD’ is detached, for ‘origin’, provided that
+     exists.
+
+     If ‘nil’, then ‘magit-remote-configure’ has to be used to do so.
+
+‘M C’ (‘magit-remote-configure’)
+     This transient prefix command binds commands that set the value of
+     remote-related variables and displays them in a temporary buffer
+     until the transient is exited.
+
+     With a prefix argument, this command always prompts for a remote.
+
+     Without a prefix argument this depends on whether it was invoked as
+     a suffix of ‘magit-remote’ and on the
+     ‘magit-remote-direct-configure’ option.  If ‘magit-remote’ already
+     displays the variables for the upstream, then it does not make
+     sense to invoke another transient that displays them for the same
+     remote.  In that case this command prompts for a remote.
+
+   The variables are described in *note Remote Git Variables::.
+
+‘M a’ (‘magit-remote-add’)
+     This command add a remote and fetches it.  The remote name and url
+     are read in the minibuffer.
+
+‘M r’ (‘magit-remote-rename’)
+     This command renames a remote.  Both the old and the new names are
+     read in the minibuffer.
+
+‘M u’ (‘magit-remote-set-url’)
+     This command changes the url of a remote.  Both the remote and the
+     new url are read in the minibuffer.
+
+‘M k’ (‘magit-remote-remove’)
+     This command deletes a remote, read in the minibuffer.
+
+‘M p’ (‘magit-remote-prune’)
+     This command removes stale remote-tracking branches for a remote
+     read in the minibuffer.
+
+‘M P’ (‘magit-remote-prune-refspecs’)
+     This command removes stale refspecs for a remote read in the
+     minibuffer.
+
+     A refspec is stale if there no longer exists at least one branch on
+     the remote that would be fetched due to that refspec.  A stale
+     refspec is problematic because its existence causes Git to refuse
+     to fetch according to the remaining non-stale refspecs.
+
+     If only stale refspecs remain, then this command offers to either
+     delete the remote or to replace the stale refspecs with the default
+     refspec ("+refs/heads/*:refs/remotes/REMOTE/*").
+
+     This command also removes the remote-tracking branches that were
+     created due to the now stale refspecs.  Other stale branches are
+     not removed.
+
+ -- User Option: magit-remote-add-set-remote.pushDefault
+     This option controls whether the user is asked whether they want to
+     set ‘remote.pushDefault’ after adding a remote.
+
+     If ‘ask’, then users is always ask.  If ‘ask-if-unset’, then the
+     user is only if the variable isn't set already.  If ‘nil’, then the
+     user isn't asked and the variable isn't set.  If the value is a
+     string, then the variable is set without the user being asked,
+     provided that the name of the added remote is equal to that string
+     and the variable isn't already set.
+
+7.1.2 Remote Git Variables
+--------------------------
+
+These variables can be set from the transient prefix command
+‘magit-remote-configure’.  By default they can also be set from
+‘magit-remote’.  See *note Remote Commands::.
+
+ -- Variable: remote.NAME.url
+     This variable specifies the url of the remote named NAME.  It can
+     have multiple values.
+
+ -- Variable: remote.NAME.fetch
+     The refspec used when fetching from the remote named NAME.  It can
+     have multiple values.
+
+ -- Variable: remote.NAME.pushurl
+     This variable specifies the url used for pushing to the remote
+     named NAME.  If it is not specified, then ‘remote.NAME.url’ is used
+     instead.  It can have multiple values.
+
+ -- Variable: remote.NAME.push
+     The refspec used when pushing to the remote named NAME.  It can
+     have multiple values.
+
+ -- Variable: remote.NAME.tagOpts
+     This variable specifies what tags are fetched by default.  If the
+     value is ‘--no-tags’ then no tags are fetched.  If the value is
+     ‘--tags’, then all tags are fetched.  If this variable has no
+     value, then only tags are fetched that are reachable from fetched
+     branches.
+
+ -- Variable: remote.NAME.followRemoteHEAD
+     How "git fetch" handles updates to "remotes/<remote>/HEAD".
+
+     This command sets the local value of the Git variable
+     ‘remote.<remote>.followRemoteHEAD’, where <remote> is a stand-in
+     for the actual remote, as displayed in the menu, from which this
+     command is invoked.  This variable is documented in *note
+     (gitman)git-config::.
+
+     Unfortunately Git does not provide a variable to set a default for
+     all remotes of all repositories, but you can set the global value
+     for a remote name used in multiple repository, which will then be
+     used as the default for that remote in all repositories.  You
+     should consider using "always" for remotes named "origin".
+
+
+File: magit.info,  Node: Fetching,  Next: Pulling,  Prev: Remotes,  Up: Transferring
+
+7.2 Fetching
+============
+
+Also see *note (gitman)git-fetch::.  For information about the upstream
+and the push-remote, see *note The Two Remotes::.
+
+‘f’ (‘magit-fetch’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+‘f p’ (‘magit-fetch-from-pushremote’)
+     This command fetches from the current push-remote.
+
+     With a prefix argument or when the push-remote is either not
+     configured or unusable, then let the user first configure the
+     push-remote.
+
+‘f u’ (‘magit-fetch-from-upstream’)
+     This command fetch from the upstream of the current branch.
+
+     If the upstream is configured for the current branch and names an
+     existing remote, then use that.  Otherwise try to use another
+     remote: If only a single remote is configured, then use that.
+     Otherwise if a remote named "origin" exists, then use that.
+
+     If no remote can be determined, then this command is not available
+     from the ‘magit-fetch’ transient prefix and invoking it directly
+     results in an error.
+
+‘f e’ (‘magit-fetch-other’)
+     This command fetch from a repository read from the minibuffer.
+
+‘f o’ (‘magit-fetch-branch’)
+     This command fetches a branch from a remote, both of which are read
+     from the minibuffer.
+
+‘f r’ (‘magit-fetch-refspec’)
+     This command fetches from a remote using an explicit refspec, both
+     of which are read from the minibuffer.
+
+‘f a’ (‘magit-fetch-all’)
+     This command fetches from all remotes.
+
+‘f m’ (‘magit-fetch-modules’)
+     This command fetches all submodules.  With a prefix argument, it
+     acts as a transient prefix command, allowing the caller to set
+     options.
+
+ -- User Option: magit-pull-or-fetch
+     By default fetch and pull commands are available from separate
+     transient prefix command.  Setting this to ‘t’ adds some (but not
+     all) of the above suffix commands to the ‘magit-pull’ transient.
+
+     If you do that, then you might also want to change the key binding
+     for these prefix commands, e.g.:
+
+          (setq magit-pull-or-fetch t)
+          (define-key magit-mode-map "f" 'magit-pull) ; was magit-fetch
+          (define-key magit-mode-map "F" nil)         ; was magit-pull
+
+
+File: magit.info,  Node: Pulling,  Next: Pushing,  Prev: Fetching,  Up: Transferring
+
+7.3 Pulling
+===========
+
+Also see *note (gitman)git-pull::.  For information about the upstream
+and the push-remote, see *note The Two Remotes::.
+
+‘F’ (‘magit-pull’)
+     This transient prefix command binds the following suffix commands
+     and displays them in a temporary buffer until a suffix is invoked.
+
+‘F p’ (‘magit-pull-from-pushremote’)
+     This command pulls from the push-remote of the current branch.
+
+     With a prefix argument or when the push-remote is either not
+     configured or unusable, then let the user first configure the
+     push-remote.
+
+‘F u’ (‘magit-pull-from-upstream’)
+     This command pulls from the upstream of the current branch.
+
+     With a prefix argument or when the upstream is either not
+     configured or unusable, then let the user first configure the
+     upstream.
+
+‘F e’ (‘magit-pull-branch’)
+     This command pulls from a branch read in the minibuffer.
+
+   The following suffix is disabled by default.  See *note
+(transient)Enabling and Disabling Suffixes:: for how to enable it.
+
+‘F U’ (‘magit-pull-into-upstream’)
+     This command updates the upstream of the current branch from its
+     own upstream.
+
+     If the upstream of the current branch is a local branch, and the
+     upstream of that is a remote branch, then the local upstream is
+     updated.  This makes it possible to update the upstream branch,
+     without having to first check it out.
+
+
+File: magit.info,  Node: Pushing,  Next: Plain Patches,  Prev: Pulling,  Up: Transferring
+
+7.4 Pushing
+===========
+
+Also see *note (gitman)git-push::.  For information about the upstream
+and the push-remote, see *note The Two Remotes::.
+
+‘P’ (‘magit-push’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+‘P p’ (‘magit-push-current-to-pushremote’)
+     This command pushes the current branch to its push-remote.
+
+     With a prefix argument or when the push-remote is either not
+     configured or unusable, then let the user first configure the
+     push-remote.
+
+‘P u’ (‘magit-push-current-to-upstream’)
+     This command pushes the current branch to its upstream branch.
+
+     With a prefix argument or when the upstream is either not
+     configured or unusable, then let the user first configure the
+     upstream.
+
+‘P e’ (‘magit-push-current’)
+     This command pushes the current branch to a branch read in the
+     minibuffer.
+
+‘P o’ (‘magit-push-other’)
+     This command pushes an arbitrary branch or commit somewhere.  Both
+     the source and the target are read in the minibuffer.
+
+‘P r’ (‘magit-push-refspecs’)
+     This command pushes one or multiple refspecs to a remote, both of
+     which are read in the minibuffer.
+
+     To use multiple refspecs, separate them with commas.  Completion is
+     only available for the part before the colon, or when no colon is
+     used.
+
+‘P m’ (‘magit-push-matching’)
+     This command pushes all matching branches to another repository.
+
+     If only one remote exists, then push to that.  Otherwise prompt for
+     a remote, offering the remote configured for the current branch as
+     default.
+
+‘P t’ (‘magit-push-tags’)
+     This command pushes all tags to another repository.
+
+     If only one remote exists, then push to that.  Otherwise prompt for
+     a remote, offering the remote configured for the current branch as
+     default.
+
+‘P T’ (‘magit-push-tag’)
+     This command pushes a tag to another repository.
+
+   One of the infix arguments, ‘--force-with-lease’, deserves a word of
+caution.  It is passed without a value, which means "permit a force push
+as long as the remote-tracking branches match their counterparts on the
+remote end".  If you've set up a tool to do automatic fetches (Magit
+itself does not provide such functionality), using ‘--force-with-lease’
+can be dangerous because you don't actually control or know the state of
+the remote-tracking refs.  In that case, you should consider setting
+‘push.useForceIfIncludes’ to ‘true’ (available since Git 2.30).
+
+   Two more push commands exist, which by default are not available from
+the push transient.  See their doc-strings for instructions on how to
+add them to the transient.
+
+ -- Command: magit-push-implicitly args
+     This command pushes somewhere without using an explicit refspec.
+
+     This command simply runs ‘git push -v [ARGS]’.  ARGS are the infix
+     arguments.  No explicit refspec arguments are used.  Instead the
+     behavior depends on at least these Git variables: ‘push.default’,
+     ‘remote.pushDefault’, ‘branch.<branch>.pushRemote’,
+     ‘branch.<branch>.remote’, ‘branch.<branch>.merge’, and
+     ‘remote.<remote>.push’.
+
+     If you add this suffix to a transient prefix without explicitly
+     specifying the description, then an attempt is made to predict what
+     this command will do.  For example:
+
+          (transient-insert-suffix 'magit-push \"p\"
+            '(\"i\" magit-push-implicitly))
+
+ -- Command: magit-push-to-remote remote args
+     This command pushes to the remote REMOTE without using an explicit
+     refspec.  The remote is read in the minibuffer.
+
+     This command simply runs ‘git push -v [ARGS] REMOTE’.  ARGS are the
+     infix arguments.  No refspec arguments are used.  Instead the
+     behavior depends on at least these Git variables: ‘push.default’,
+     ‘remote.pushDefault’, ‘branch.<branch>.pushRemote’,
+     ‘branch.<branch>.remote’, ‘branch.<branch>.merge’, and
+     ‘remote.<remote>.push’.
+
+ -- User Option: magit-push-options
+     This option lists completion choices that are offered when setting
+     ‘--push-option’ in the ‘magit-push’ menu.
+
+     Note that ‘--push-option’ is disabled by default.  See *note
+     (transient)Enabling and Disabling Suffixes:: for how to enable it.
+
+     Different forges support different push options.  Links to upstream
+     documentation:
+
+        • <https://docs.gitlab.com/topics/git/commit/#push-options>
+
+     There should be similar documentation for other forges, but I could
+     not find the respective summary pages.  If you find them, please
+     let me know.
+
+
+File: magit.info,  Node: Plain Patches,  Next: Maildir Patches,  Prev: Pushing,  Up: Transferring
+
+7.5 Plain Patches
+=================
+
+‘W’ (‘magit-patch’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+‘W c’ (‘magit-patch-create’)
+     This command creates patches for a set commits.  If the region
+     marks several commits, then it creates patches for all of them.
+     Otherwise it functions as a transient prefix command, which
+     features several infix arguments and binds itself as a suffix
+     command.  When this command is invoked as a suffix of itself, then
+     it creates a patch using the specified infix arguments.
+
+‘w a’ (‘magit-patch-apply’)
+     This command applies a patch.  This is a transient prefix command,
+     which features several infix arguments and binds itself as a suffix
+     command.  When this command is invoked as a suffix of itself, then
+     it applies a patch using the specified infix arguments.
+
+‘W s’ (‘magit-patch-save’)
+     This command creates a patch from the current diff.
+
+     Inside ‘magit-diff-mode’ or ‘magit-revision-mode’ buffers, ‘C-x
+     C-w’ is also bound to this command.
+
+   It is also possible to save a plain patch file by using ‘C-x C-w’
+inside a ‘magit-diff-mode’ or ‘magit-revision-mode’ buffer.
+
+
+File: magit.info,  Node: Maildir Patches,  Prev: Plain Patches,  Up: Transferring
+
+7.6 Maildir Patches
+===================
+
+Also see *note (gitman)git-am::.  and *note (gitman)git-apply::.
+
+‘w’ (‘magit-am’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+‘w w’ (‘magit-am-apply-patches’)
+     This command applies one or more patches.  If the region marks
+     files, then those are applied as patches.  Otherwise this command
+     reads a file-name in the minibuffer, defaulting to the file at
+     point.
+
+‘w m’ (‘magit-am-apply-maildir’)
+     This command applies patches from a maildir.
+
+‘w a’ (‘magit-patch-apply’)
+     This command applies a plain patch.  For a longer description see
+     *note Plain Patches::.  This command is only available from the
+     ‘magit-am’ transient for historic reasons.
+
+   When an "am" operation is in progress, then the transient instead
+features the following suffix commands.
+
+‘w w’ (‘magit-am-continue’)
+     This command resumes the current patch applying sequence.
+
+‘w s’ (‘magit-am-skip’)
+     This command skips the stopped at patch during a patch applying
+     sequence.
+
+‘w a’ (‘magit-am-abort’)
+     This command aborts the current patch applying sequence.  This
+     discards all changes made since the sequence started.
+
+
+File: magit.info,  Node: Miscellaneous,  Next: Customizing,  Prev: Transferring,  Up: Top
+
+8 Miscellaneous
+***************
+
+* Menu:
+
+* Tagging::
+* Notes::
+* Submodules::
+* Subtree::
+* Worktree::
+* Sparse checkouts::
+* Bundle::
+* Common Commands::
+* Wip Modes::
+* Commands for Buffers Visiting Files::
+* Minor Mode for Buffers Visiting Blobs::
+
+
+File: magit.info,  Node: Tagging,  Next: Notes,  Up: Miscellaneous
+
+8.1 Tagging
+===========
+
+Also see *note (gitman)git-tag::.
+
+‘t’ (‘magit-tag’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+‘t t’ (‘magit-tag-create’)
+     This command creates a new tag with the given NAME at REV.  With a
+     prefix argument it creates an annotated tag.
+
+‘t r’ (‘magit-tag-release’)
+     This commands creates a release tag.  It assumes that release tags
+     match ‘magit-release-tag-regexp’.
+
+     First it prompts for the name of the new tag using the highest
+     existing tag as initial input and leaving it to the user to
+     increment the desired part of the version string.  If you use
+     unconventional release tags or version numbers (e.g.,
+     ‘v1.2.3-custom.1’), you can set the ‘magit-release-tag-regexp’ and
+     ‘magit-tag-version-regexp-alist’ variables.
+
+     If ‘--annotate’ is enabled then it prompts for the message of the
+     new tag.  The proposed tag message is based on the message of the
+     highest tag, provided that that contains the corresponding version
+     string and substituting the new version string for that.  Otherwise
+     it proposes something like "Foo-Bar 1.2.3", given, for example, a
+     TAG "v1.2.3" and a repository located at something like
+     "/path/to/foo-bar".
+
+‘t k’ (‘magit-tag-delete’)
+     This command deletes one or more tags.  If the region marks
+     multiple tags (and nothing else), then it offers to delete those.
+     Otherwise, it prompts for a single tag to be deleted, defaulting to
+     the tag at point.
+
+‘t p’ (‘magit-tag-prune’)
+     This command offers to delete tags missing locally from REMOTE, and
+     vice versa.
+
+
+File: magit.info,  Node: Notes,  Next: Submodules,  Prev: Tagging,  Up: Miscellaneous
+
+8.2 Notes
+=========
+
+Also see *note (gitman)git-notes::.
+
+‘T’ (‘magit-notes’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+‘T T’ (‘magit-notes-edit’)
+     Edit the note attached to a commit, defaulting to the commit at
+     point.
+
+     By default use the value of Git variable ‘core.notesRef’ or
+     "refs/notes/commits" if that is undefined.
+
+‘T r’ (‘magit-notes-remove’)
+     Remove the note attached to a commit, defaulting to the commit at
+     point.
+
+     By default use the value of Git variable ‘core.notesRef’ or
+     "refs/notes/commits" if that is undefined.
+
+‘T p’ (‘magit-notes-prune’)
+     Remove notes about unreachable commits.
+
+   It is possible to merge one note ref into another.  That may result
+in conflicts which have to resolved in the temporary worktree
+".git/NOTES_MERGE_WORKTREE".
+
+‘T m’ (‘magit-notes-merge’)
+     Merge the notes of a ref read from the user into the current notes
+     ref.  The current notes ref is the value of Git variable
+     ‘core.notesRef’ or "refs/notes/commits" if that is undefined.
+
+   When a notes merge is in progress then the transient features the
+following suffix commands, instead of those listed above.
+
+‘T c’ (‘magit-notes-merge-commit’)
+     Commit the current notes ref merge, after manually resolving
+     conflicts.
+
+‘T a’ (‘magit-notes-merge-abort’)
+     Abort the current notes ref merge.
+
+   The following variables control what notes reference ‘magit-notes-*’,
+‘git notes’ and ‘git show’ act on and display.  Both the local and
+global values are displayed and can be modified.
+
+ -- Variable: core.notesRef
+     This variable specifies the notes ref that is displayed by default
+     and which commands act on by default.
+
+ -- Variable: notes.displayRef
+     This variable specifies additional notes ref to be displayed in
+     addition to the ref specified by ‘core.notesRef’.  It can have
+     multiple values and may end with ‘*’ to display all refs in the
+     ‘refs/notes/’ namespace (or ‘**’ if some names contain slashes).
+
+
+File: magit.info,  Node: Submodules,  Next: Subtree,  Prev: Notes,  Up: Miscellaneous
+
+8.3 Submodules
+==============
+
+Also see *note (gitman)git-submodule::.
+
+8.3.1 Listing Submodules
+------------------------
+
+The command ‘magit-list-submodules’ displays a list of the current
+repository's submodules in a separate buffer.  It's also possible to
+display information about submodules directly in the status buffer of
+the super-repository by adding ‘magit-insert-modules’ to the hook
+‘magit-status-sections-hook’ as described in *note Status Module
+Sections::.
+
+ -- Command: magit-list-submodules
+     This command displays a list of the current repository's populated
+     submodules in a separate buffer.
+
+     It can be invoked by pressing ‘RET’ on the section titled
+     "Modules".
+
+ -- User Option: magit-submodule-list-columns
+     This option controls what columns are displayed by the command
+     ‘magit-list-submodules’ and how they are displayed.
+
+     Each element has the form ‘(HEADER WIDTH FORMAT PROPS)’.
+
+     HEADER is the string displayed in the header.  WIDTH is the width
+     of the column.  FORMAT is a function that is called with one
+     argument, the repository identification (usually its basename), and
+     with ‘default-directory’ bound to the toplevel of its working tree.
+     It has to return a string to be inserted or ‘nil’.  PROPS is an
+     alist that supports the keys ‘:right-align’, ‘:pad-right’ and
+     ‘:sort’.
+
+     The ‘:sort’ function has a weird interface described in the
+     docstring of ‘tabulated-list--get-sort’.  Alternatively ‘<’ and
+     ‘magit-repolist-version<’ can be used as those functions are
+     automatically replaced with functions that satisfy the interface.
+     Set ‘:sort’ to ‘nil’ to inhibit sorting; if unspecified, then the
+     column is sortable using the default sorter.
+
+     You may wish to display a range of numeric columns using just one
+     character per column and without any padding between columns, in
+     which case you should use an appropriate HEADER, set WIDTH to 1,
+     and set ‘:pad-right’ to 9.  ‘+’ is substituted for numbers higher
+     than 9.
+
+8.3.2 Submodule Transient
+-------------------------
+
+‘o’ (‘magit-submodule’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+   Some of the below commands default to act on the modules that are
+selected using the region.  For brevity their description talk about
+"the selected modules", but if no modules are selected, then they act on
+the current module instead, or if point isn't on a module, then the read
+a single module to act on.  With a prefix argument these commands ignore
+the selection and the current module and instead act on all suitable
+modules.
+
+‘o a’ (‘magit-submodule-add’)
+     This commands adds the repository at URL as a module.  Optional
+     PATH is the path to the module relative to the root of the
+     super-project.  If it is ‘nil’ then the path is determined based on
+     URL.
+
+‘o r’ (‘magit-submodule-register’)
+     This command registers the selected modules by copying their urls
+     from ".gitmodules" to "$GIT_DIR/config".  These values can then be
+     edited before running ‘magit-submodule-populate’.  If you don't
+     need to edit any urls, then use the latter directly.
+
+‘o p’ (‘magit-submodule-populate’)
+     This command creates the working directory or directories of the
+     selected modules, checking out the recorded commits.
+
+‘o u’ (‘magit-submodule-update’)
+     This command updates the selected modules checking out the recorded
+     commits.
+
+‘o s’ (‘magit-submodule-synchronize’)
+     This command synchronizes the urls of the selected modules, copying
+     the values from ".gitmodules" to the ".git/config" of the
+     super-project as well those of the modules.
+
+‘o d’ (‘magit-submodule-unpopulate’)
+     This command removes the working directory of the selected modules.
+
+‘o l’ (‘magit-list-submodules’)
+     This command displays a list of the current repository's modules.
+
+‘o f’ (‘magit-fetch-modules’)
+     This command fetches all populated modules.  With a prefix
+     argument, it acts as a transient prefix command, allowing the
+     caller to set options.
+
+     Also fetch the super-repository, because ‘git fetch’ does not
+     support not doing that.
+
+
+File: magit.info,  Node: Subtree,  Next: Worktree,  Prev: Submodules,  Up: Miscellaneous
+
+8.4 Subtree
+===========
+
+Also see *note (gitman)git-subtree::.
+
+‘O’ (‘magit-subtree’)
+     This transient prefix command binds the two sub-transients; one for
+     importing a subtree and one for exporting a subtree.
+
+‘O i’ (‘magit-subtree-import’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+     The suffixes of this command import subtrees.
+
+     If the ‘--prefix’ argument is set, then the suffix commands use
+     that prefix without prompting the user.  If it is unset, then they
+     read the prefix in the minibuffer.
+
+‘O i a’ (‘magit-subtree-add’)
+     This command adds COMMIT from REPOSITORY as a new subtree at
+     PREFIX.
+
+‘O i c’ (‘magit-subtree-add-commit’)
+     This command add COMMIT as a new subtree at PREFIX.
+
+‘O i m’ (‘magit-subtree-merge’)
+     This command merges COMMIT into the PREFIX subtree.
+
+‘O i f’ (‘magit-subtree-pull’)
+     This command pulls COMMIT from REPOSITORY into the PREFIX subtree.
+
+‘O e’ (‘magit-subtree-export’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+     The suffixes of this command export subtrees.
+
+     If the ‘--prefix’ argument is set, then the suffix commands use
+     that prefix without prompting the user.  If it is unset, then they
+     read the prefix in the minibuffer.
+
+‘O e p’ (‘magit-subtree-push’)
+     This command extract the history of the subtree PREFIX and pushes
+     it to REF on REPOSITORY.
+
+‘O e s’ (‘magit-subtree-split’)
+     This command extracts the history of the subtree PREFIX.
+
+
+File: magit.info,  Node: Worktree,  Next: Sparse checkouts,  Prev: Subtree,  Up: Miscellaneous
+
+8.5 Worktree
+============
+
+Also see *note (gitman)git-worktree::.
+
+‘Z’ (‘magit-worktree’)
+     This transient prefix command binds the following suffix commands
+     and displays them in a temporary buffer until a suffix is invoked.
+
+‘Z b’ (‘magit-worktree-checkout’)
+     Checkout BRANCH in a new worktree at PATH.
+
+‘Z c’ (‘magit-worktree-branch’)
+     Create a new BRANCH and check it out in a new worktree at PATH.
+
+‘Z m’ (‘magit-worktree-move’)
+     Move an existing worktree to a new PATH.
+
+‘Z k’ (‘magit-worktree-delete’)
+     Delete a worktree, defaulting to the worktree at point.  The
+     primary worktree cannot be deleted.
+
+‘Z g’ (‘magit-worktree-status’)
+     Show the status for the worktree at point.
+
+     If there is no worktree at point, then read one in the minibuffer.
+     If the worktree at point is the one whose status is already being
+     displayed in the current buffer, then show it in Dired instead.
+
+   If you want the status buffer to list worktrees, add the function
+‘magit-insert-worktrees’ to ‘magit-status-sections-hook’ as described in
+*note Status Sections::.  If there is only one worktree, this function
+inserts nothing.
+
+
+File: magit.info,  Node: Sparse checkouts,  Next: Bundle,  Prev: Worktree,  Up: Miscellaneous
+
+8.6 Sparse checkouts
+====================
+
+Sparse checkouts provide a way to restrict the working tree to a subset
+of directories.  See *note (gitman)git-sparse-checkout::.
+
+   *Warning*: Git introduced the ‘git sparse-checkout’ command in
+version 2.25 and still advertises it as experimental and subject to
+change.  Magit's interface should be considered the same.  In
+particular, if Git introduces a backward incompatible change, Magit's
+sparse checkout functionality may be updated in a way that requires a
+more recent Git version.
+
+‘>’ (‘magit-sparse-checkout’)
+     This transient prefix command binds the following suffix commands
+     and displays them in a temporary buffer until a suffix is invoked.
+
+‘> e’ (‘magit-sparse-checkout-enable’)
+     This command initializes a sparse checkout that includes only the
+     files in the top-level directory.
+
+     Note that ‘magit-sparse-checkout-set’ and
+     ‘magit-sparse-checkout-add’ automatically initialize a sparse
+     checkout if necessary.  However, you may want to call
+     ‘magit-sparse-checkout-enable’ explicitly to re-initialize a sparse
+     checkout after calling ‘magit-sparse-checkout-disable’, to pass
+     additional arguments to ‘git sparse-checkout init’, or to execute
+     the initialization asynchronously.
+
+‘> s’ (‘magit-sparse-checkout-set’)
+     This command takes a list of directories and configures the sparse
+     checkout to include only files in those subdirectories.  Any
+     previously included directories are excluded unless they are in the
+     provided list of directories.
+
+‘> a’ (‘magit-sparse-checkout-add’)
+     This command is like ‘magit-sparse-checkout-set’, but instead adds
+     the specified list of directories to the set of directories that is
+     already included in the sparse checkout.
+
+‘> r’ (‘magit-sparse-checkout-reapply’)
+     This command applies the currently configured sparse checkout
+     patterns to the working tree.  This is useful to call if excluded
+     files have been checked out after operations such as merging or
+     rebasing.
+
+‘> d’ (‘magit-sparse-checkout-disable’)
+     This command restores the full checkout.  To return to the previous
+     sparse checkout, call ‘magit-sparse-checkout-enable’.
+
+   A sparse checkout can also be initiated when cloning a repository by
+using the ‘magit-clone-sparse’ command in the ‘magit-clone’ transient
+(see *note Cloning Repository::).
+
+   If you want the status buffer to indicate when a sparse checkout is
+enabled, add the function ‘magit-sparse-checkout-insert-header’ to
+‘magit-status-headers-hook’.
+
+
+File: magit.info,  Node: Bundle,  Next: Common Commands,  Prev: Sparse checkouts,  Up: Miscellaneous
+
+8.7 Bundle
+==========
+
+Also see *note (gitman)git-bundle::.
+
+ -- Command: magit-bundle
+     This transient prefix command binds several suffix commands for
+     running ‘git bundle’ subcommands and displays them in a temporary
+     buffer until a suffix is invoked.
+
+
+File: magit.info,  Node: Common Commands,  Next: Wip Modes,  Prev: Bundle,  Up: Miscellaneous
+
+8.8 Common Commands
+===================
+
+ -- Command: magit-switch-to-repository-buffer
+ -- Command: magit-switch-to-repository-buffer-other-window
+ -- Command: magit-switch-to-repository-buffer-other-frame
+ -- Command: magit-display-repository-buffer
+     These commands read any existing Magit buffer that belongs to the
+     current repository from the user and then switch to the selected
+     buffer (without refreshing it).
+
+     The last variant uses ‘magit-display-buffer’ to do so and thus
+     respects ‘magit-display-buffer-function’.
+
+   These are some of the commands that can be used in all buffers whose
+major-modes derive from ‘magit-mode’.  There are other common commands
+beside the ones below, but these didn't fit well anywhere else.
+
+‘C-w’ (‘magit-copy-section-value’)
+     This command saves the value of the current section to the
+     ‘kill-ring’, and, provided that the current section is a commit,
+     branch, or tag section, it also pushes the (referenced) revision to
+     the ‘magit-revision-stack’.
+
+     When the current section is a branch or a tag, and a prefix
+     argument is used, then it saves the revision at its tip to the
+     ‘kill-ring’ instead of the reference name.
+
+     When the region is active, this command saves that to the
+     ‘kill-ring’, like ‘kill-ring-save’ would, instead of behaving as
+     described above.  If a prefix argument is used and the region is
+     within a hunk, then it strips the diff marker column and keeps only
+     either the added or removed lines, depending on the sign of the
+     prefix argument.
+
+‘M-w’ (‘magit-copy-buffer-revision’)
+     This command saves the revision being displayed in the current
+     buffer to the ‘kill-ring’ and also pushes it to the
+     ‘magit-revision-stack’.  It is mainly intended for use in
+     ‘magit-revision-mode’ buffers, the only buffers where it is always
+     unambiguous exactly which revision should be saved.
+
+     Most other Magit buffers usually show more than one revision, in
+     some way or another, so this command has to select one of them, and
+     that choice might not always be the one you think would have been
+     the best pick.
+
+   Outside of Magit ‘M-w’ and ‘C-w’ are usually bound to
+‘kill-ring-save’ and ‘kill-region’, and these commands would also be
+useful in Magit buffers.  Therefore when the region is active, then both
+of these commands behave like ‘kill-ring-save’ instead of as described
+above.
+
+
+File: magit.info,  Node: Wip Modes,  Next: Commands for Buffers Visiting Files,  Prev: Common Commands,  Up: Miscellaneous
+
+8.9 Wip Modes
+=============
+
+Git keeps *committed* changes around long enough for users to recover
+changes they have accidentally deleted.  It does so by not garbage
+collecting any committed but no longer referenced objects for a certain
+period of time, by default 30 days.
+
+   But Git does *not* keep track of *uncommitted* changes in the working
+tree and not even the index (the staging area).  Because Magit makes it
+so convenient to modify uncommitted changes, it also makes it easy to
+shoot yourself in the foot in the process.
+
+   For that reason Magit provides a global mode that saves *tracked*
+files to work-in-progress references after or before certain actions.
+(At present untracked files are never saved and for technical reasons
+nothing is saved before the first commit has been created).
+
+   Two separate work-in-progress references are used to track the state
+of the index and of the working tree: ‘refs/wip/index/<branchref>’ and
+‘refs/wip/wtree/<branchref>’, where ‘<branchref>’ is the full ref of the
+current branch, e.g., ‘refs/heads/master’.  When the ‘HEAD’ is detached
+then ‘HEAD’ is used in place of ‘<branchref>’.
+
+   Checking out another branch (or detaching ‘HEAD’) causes the use of
+different wip refs for subsequent changes.
+
+ -- User Option: magit-wip-mode
+     When this mode is enabled, then uncommitted changes are committed
+     to dedicated work-in-progress refs whenever appropriate (i.e., when
+     dataloss would be a possibility otherwise).
+
+     Setting this variable directly does not take effect; either use the
+     Custom interface to do so or call the respective mode function.
+
+   To view the log for a branch and its wip refs use the commands
+‘magit-wip-log’ and ‘magit-wip-log-current’.  You should use ‘--graph’
+when using these commands.
+
+ -- Command: magit-wip-log
+     This command shows the log for a branch and its wip refs.  With a
+     negative prefix argument only the worktree wip ref is shown.
+
+     The absolute numeric value of the prefix argument controls how many
+     "branches" of each wip ref are shown.  This is only relevant if the
+     value of ‘magit-wip-merge-branch’ is ‘nil’.
+
+ -- Command: magit-wip-log-current
+     This command shows the log for the current branch and its wip refs.
+     With a negative prefix argument only the worktree wip ref is shown.
+
+     The absolute numeric value of the prefix argument controls how many
+     "branches" of each wip ref are shown.  This is only relevant if the
+     value of ‘magit-wip-merge-branch’ is ‘nil’.
+
+‘X w’ (‘magit-reset-worktree’)
+     This command resets the working tree to some commit read from the
+     user and defaulting to the commit at point, while keeping the
+     ‘HEAD’ and index as-is.
+
+     This can be used to restore files to the state committed to a wip
+     ref.  Note that this will discard any unstaged changes that might
+     have existed before invoking this command (but of course only after
+     committing that to the working tree wip ref).
+
+   Note that even if you enable ‘magit-wip-mode’ this won't give you
+perfect protection.  The most likely scenario for losing changes despite
+the use of ‘magit-wip-mode’ is making a change outside Emacs and then
+destroying it also outside Emacs.  In some such a scenario, Magit, being
+an Emacs package, didn't get the opportunity to keep you from shooting
+yourself in the foot.
+
+   When you are unsure whether Magit did commit a change to the wip
+refs, then you can explicitly request that all changes to all tracked
+files are being committed.
+
+‘M-x magit-wip-commit’
+     This command commits all changes to all tracked files to the index
+     and working tree work-in-progress refs.  Like the modes described
+     above, it does not commit untracked files, but it does check all
+     tracked files for changes.  Use this command when you suspect that
+     the modes might have overlooked a change made outside Emacs/Magit.
+
+ -- User Option: magit-wip-namespace
+     The namespace used for work-in-progress refs.  It has to end with a
+     slash.  The wip refs are named ‘<namespace>index/<branchref>’ and
+     ‘<namespace>wtree/<branchref>’.  When snapshots are created while
+     the ‘HEAD’ is detached then ‘HEAD’ is used in place of
+     ‘<branchref>’.
+
+ -- User Option: magit-wip-mode-lighter
+     Mode-line lighter for ‘magit-wip--mode’.
+
+8.9.1 Wip Graph
+---------------
+
+ -- User Option: magit-wip-merge-branch
+     This option controls whether the current branch is merged into the
+     wip refs after a new commit was created on the branch.
+
+     If ‘nil’ and the current branch has new commits, then the wip ref
+     is reset to the tip of the branch before creating a new wip commit.
+     With this setting wip commits are eventually garbage collected.
+
+     If non-‘nil’ and the current branch has new commits, then it is
+     merged into the wip ref before creating a new wip commit.  This
+     makes it easier to inspect wip history and the wip commits are
+     never garbage collected.
+
+   When ‘magit-wip-merge-branch’ is ‘t’, then the history looks like
+this:
+
+       *--*--*--*--*--*       refs/wip/index/refs/heads/master
+      /     /     /
+     A-----B-----C            refs/heads/master
+
+   When ‘magit-wip-merge-branch’ is ‘nil’, then creating a commit on the
+real branch and then making a change causes the wip refs to be recreated
+to fork from the new commit.  But the old commits on the wip refs are
+not lost.  They are still available from the reflog.  To make it easier
+to see when the fork point of a wip ref was changed, an additional
+commit with the message "restart autosaving" is created on it (‘xxO’
+commits below are such boundary commits).
+
+   Starting with
+
+           BI0---BI1    refs/wip/index/refs/heads/master
+          /
+     A---B              refs/heads/master
+          \
+           BW0---BW1    refs/wip/wtree/refs/heads/master
+
+   and committing the staged changes and editing and saving a file would
+result in
+
+           BI0---BI1        refs/wip/index/refs/heads/master
+          /
+     A---B---C              refs/heads/master
+          \   \
+           \   CW0---CW1    refs/wip/wtree/refs/heads/master
+            \
+             BW0---BW1      refs/wip/wtree/refs/heads/master@{2}
+
+   The fork-point of the index wip ref is not changed until some change
+is being staged.  Likewise just checking out a branch or creating a
+commit does not change the fork-point of the working tree wip ref.  The
+fork-points are not adjusted until there actually is a change that
+should be committed to the respective wip ref.
+
+
+File: magit.info,  Node: Commands for Buffers Visiting Files,  Next: Minor Mode for Buffers Visiting Blobs,  Prev: Wip Modes,  Up: Miscellaneous
+
+8.10 Commands for Buffers Visiting Files
+========================================
+
+By default Magit defines a few global key bindings.  These bindings are
+a compromise between providing no bindings at all and providing the
+better bindings I would have liked to use instead.  Magit cannot provide
+the set of recommended bindings by default because those key sequences
+are strictly reserved for bindings added by the user.  Also see *note
+Global Bindings:: and *note (elisp)Key Binding Conventions::.
+
+   To use the recommended bindings, add this to your init file and
+restart Emacs.
+
+     (setq magit-define-global-key-bindings 'recommended)
+
+   If you don't want Magit to add any bindings to the global keymap at
+all, add this to your init file and restart Emacs.
+
+     (setq magit-define-global-key-bindings nil)
+
+‘C-c f’ (‘magit-file-dispatch’)
+‘C-c f s’ (‘magit-stage-files’)
+‘C-c f s’ (‘magit-file-stage’)
+‘C-c f u’ (‘magit-unstage-files’)
+‘C-c f u’ (‘magit-file-unstage’)
+‘C-c f , x’ (‘magit-file-untrack’)
+‘C-c f , r’ (‘magit-file-rename’)
+‘C-c f , k’ (‘magit-file-delete’)
+‘C-c f , c’ (‘magit-file-checkout’)
+‘C-c f D’ (‘magit-diff’)
+‘C-c f d’ (‘magit-diff-buffer-file’)
+‘C-c f L’ (‘magit-log’)
+‘C-c f l’ (‘magit-log-buffer-file’)
+‘C-c f t’ (‘magit-log-trace-definition’)
+‘C-c f M’ (‘magit-log-merged’)
+‘C-c f B’ (‘magit-blame’)
+‘C-c f b’ (‘magit-blame-additions’)
+‘C-c f r’ (‘magit-blame-removal’)
+‘C-c f f’ (‘magit-blame-reverse’)
+‘C-c f m’ (‘magit-blame-echo’)
+‘C-c f q’ (‘magit-blame-quit’)
+‘C-c f p’ (‘magit-blob-previous’)
+‘C-c f n’ (‘magit-blob-next’)
+‘C-c f v’ (‘magit-find-file’)
+‘C-c f V’ (‘magit-blob-visit-file’)
+‘C-c f g’ (‘magit-status-here’)
+‘C-c f G’ (‘magit-display-repository-buffer’)
+‘C-c f c’ (‘magit-commit’)
+‘C-c f e’ (‘magit-edit-line-commit’)
+     Each of these commands is documented individually right below,
+     alongside their default key bindings.  The bindings shown above are
+     the recommended bindings, which you can enable by following the
+     instructions further up.
+
+‘C-c M-g’ (‘magit-file-dispatch’)
+     This transient prefix command binds the following suffix commands
+     and displays them in a temporary buffer until a suffix is invoked.
+
+‘C-c M-g s’ (‘magit-stage-files’)
+‘C-c M-g s’ (‘magit-file-stage’)
+     Stage all changes to the file being visited in the current buffer.
+     When not visiting a file, then the first command is used, which
+     prompts for a file.
+
+‘C-c M-g u’ (‘magit-unstage-files’)
+‘C-c M-g u’ (‘magit-file-unstage’)
+     Unstage all changes to the file being visited in the current
+     buffer.  When not visiting a file, then the first command is used,
+     which prompts for a file.
+
+‘C-c M-g , x’ (‘magit-file-untrack’)
+     This command untracks a file read from the user, defaulting to the
+     visited file.
+
+‘C-c M-g , r’ (‘magit-file-rename’)
+     This command renames a file read from the user, defaulting to the
+     visited file.
+
+‘C-c M-g , k’ (‘magit-file-delete’)
+     This command deletes a file read from the user, defaulting to the
+     visited file.
+
+‘C-c M-g , c’ (‘magit-file-checkout’)
+     This command updates a file in the working tree and index to the
+     contents from a revision.  Both the revision and file are read from
+     the user.
+
+‘C-c M-g D’ (‘magit-diff’)
+     This transient prefix command binds several diff suffix commands
+     and infix arguments and displays them in a temporary buffer until a
+     suffix is invoked.  See *note Diffing::.
+
+     This is the same command that ‘d’ is bound to in Magit buffers.  If
+     this command is invoked from a file-visiting buffer, then the
+     initial value of the option (‘--’) that limits the diff to certain
+     file(s) is set to the visited file.
+
+‘C-c M-g d’ (‘magit-diff-buffer-file’)
+     This command shows the diff for the file of blob that the current
+     buffer visits.  The diff is limited to the file or blob.
+
+     When the buffer visits a blob, then show the respective commit.
+     When the buffer visits a file, then show the differences between
+     ‘HEAD’ and the working tree, or the index with a prefix argument.
+
+ -- Command: magit-show-commit-removing-file
+     This command shows the commit that removed FILE.
+
+ -- User Option: magit-diff-buffer-file-locked
+     This option controls whether ‘magit-diff-buffer-file’ uses a
+     dedicated buffer.  See *note Modes and Buffers::.
+
+‘C-c M-g L’ (‘magit-log’)
+     This transient prefix command binds several log suffix commands and
+     infix arguments and displays them in a temporary buffer until a
+     suffix is invoked.  See *note Logging::.
+
+     This is the same command that ‘l’ is bound to in Magit buffers.  If
+     this command is invoked from a file-visiting buffer, then the
+     initial value of the option (‘--’) that limits the log to certain
+     file(s) is set to the visited file.
+
+‘C-c M-g l’ (‘magit-log-buffer-file’)
+     This command shows the log for the file of blob that the current
+     buffer visits.  Renames are followed when a prefix argument is used
+     or when ‘--follow’ is an active log argument.  When the region is
+     active, the log is restricted to the selected line range.
+
+ -- User Option: magit-log-buffer-file-locked
+     This option controls whether ‘magit-log-buffer-file’ uses a
+     dedicated buffer.  See *note Modes and Buffers::.
+
+‘C-c M-g t’ (‘magit-log-trace-definition’)
+     This command shows the log for the definition at point.
+
+‘C-c M-g M’ (‘magit-log-merged’)
+     This command reads a commit and a branch in shows a log concerning
+     the merge of the former into the latter.  This shows multiple
+     commits even in case of a fast-forward merge.
+
+‘C-c M-g B’ (‘magit-blame’)
+     This transient prefix command binds all blaming suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.
+
+     For more information about this and the following commands also see
+     *note Blaming::.
+
+     In addition to the ‘magit-blame’ sub-transient, the dispatch
+     transient also binds several blaming suffix commands directly.  See
+     *note Blaming:: for information about those commands and bindings.
+
+‘C-c M-g p’ (‘magit-blob-previous’)
+     This command visits the previous blob which modified the current
+     file.
+
+‘C-c M-g n’ (‘magit-blob-next’)
+     This command visits the next blob which modified the current file.
+
+‘C-c M-g v’ (‘magit-find-file’)
+     This command reads a revision and file and visits the respective
+     blob.
+
+‘C-c M-g V’ (‘magit-blob-visit-file’)
+     This command visits the file from the working tree, corresponding
+     to the current blob.  When visiting a blob or the version from the
+     index, then it goes to the same location in the respective file in
+     the working tree.
+
+‘C-c M-g g’ (‘magit-status-here’)
+     This command displays the status of the current repository in a
+     buffer, like ‘magit-status’ does.  Additionally it tries to go to
+     the position in that buffer, which corresponds to the position in
+     the current file-visiting buffer (if any).
+
+     Before doing so, save all file-visiting buffers belonging to the
+     current repository without prompting.
+
+‘C-c M-g G’ (‘magit-display-repository-buffer’)
+     This command reads and displays a Magit buffer belonging to the
+     current repository, without refreshing it.
+
+‘C-c M-g c’ (‘magit-commit’)
+     This transient prefix command binds the following suffix commands
+     along with the appropriate infix arguments and displays them in a
+     temporary buffer until a suffix is invoked.  See *note Initiating a
+     Commit::.
+
+‘C-c M-g e’ (‘magit-edit-line-commit’)
+     This command makes the commit editable that added the current line.
+
+     With a prefix argument it makes the commit editable that removes
+     the line, if any.  The commit is determined using ‘git blame’ and
+     made editable using ‘git rebase --interactive’ if it is reachable
+     from ‘HEAD’, or by checking out the commit (or a branch that points
+     at it) otherwise.
+
+
+File: magit.info,  Node: Minor Mode for Buffers Visiting Blobs,  Prev: Commands for Buffers Visiting Files,  Up: Miscellaneous
+
+8.11 Minor Mode for Buffers Visiting Blobs
+==========================================
+
+The ‘magit-blob-mode’ enables certain Magit features in blob-visiting
+buffers.  Such buffers can be created using ‘magit-find-file’ and some
+of the commands mentioned below, which also take care of turning on this
+minor mode.  Currently this mode only establishes a few key bindings,
+but this might be extended.
+
+‘p’ (‘magit-blob-previous’)
+     This command visits the previous blob that modified the current
+     file.
+
+‘n’ (‘magit-blob-next’)
+     This command visit the next blob that modified the current file.
+
+‘q’ (‘magit-bury-or-kill-buffer’)
+     This command buries the current buffer, if that is being displayed
+     in multiple windows and/or when a prefix argument is used.  If
+     neither is the case, it instead kills the current buffer.
+
+   You might want to bind ‘u’ to another command.  Suitable commands
+include ‘bury-buffer’, ‘magit-bury-buffer’ and ‘magit-kill-this-buffer’.
+
+
+File: magit.info,  Node: Customizing,  Next: Plumbing,  Prev: Miscellaneous,  Up: Top
+
+9 Customizing
+*************
+
+Both Git and Emacs are highly customizable.  Magit is both a Git
+porcelain as well as an Emacs package, so it makes sense to customize it
+using both Git variables as well as Emacs options.  However this
+flexibility doesn't come without problems, including but not limited to
+the following.
+
+   • Some Git variables automatically have an effect in Magit without
+     requiring any explicit support.  Sometimes that is desirable - in
+     other cases, it breaks Magit.
+
+     When a certain Git setting breaks Magit but you want to keep using
+     that setting on the command line, then that can be accomplished by
+     overriding the value for Magit only by appending something like
+     ‘("-c" "some.variable=compatible-value")’ to
+     ‘magit-git-global-arguments’.
+
+   • Certain settings like ‘fetch.prune=true’ are respected by Magit
+     commands (because they simply call the respective Git command) but
+     their value is not reflected in the respective transient buffers.
+     In this case the ‘--prune’ argument in ‘magit-fetch’ might be
+     active or inactive, but that doesn't keep the Git variable from
+     being honored by the suffix commands anyway.  So pruning might
+     happen despite the ‘--prune’ arguments being displayed in a way
+     that seems to indicate that no pruning will happen.
+
+   I intend to address these and similar issues in a future release.
+
+* Menu:
+
+* Per-Repository Configuration::
+* Essential Settings::
+
+
+File: magit.info,  Node: Per-Repository Configuration,  Next: Essential Settings,  Up: Customizing
+
+9.1 Per-Repository Configuration
+================================
+
+Magit can be configured on a per-repository level using both Git
+variables as well as Emacs options.
+
+   To set a Git variable for one repository only, simply set it in
+‘/path/to/repo/.git/config’ instead of ‘$HOME/.gitconfig’ or
+‘/etc/gitconfig’.  See *note (gitman)git-config::.
+
+   Similarly, Emacs options can be set for one repository only by
+editing ‘/path/to/repo/.dir-locals.el’.  See *note (emacs)Directory
+Variables::.  For example to disable automatic refreshes of
+file-visiting buffers in just one huge repository use this:
+
+   • ‘/path/to/huge/repo/.dir-locals.el’
+
+          ((nil . ((magit-refresh-buffers . nil))))
+
+   It might only be costly to insert certain information into Magit
+buffers for repositories that are exceptionally large, in which case you
+can disable the respective section inserters just for that repository:
+
+   • ‘/path/to/tag/invested/repo/.dir-locals.el’
+
+          ((magit-status-mode
+            . ((eval . (magit-disable-section-inserter 'magit-insert-tags-header)))))
+
+ -- Function: magit-disable-section-inserter fn
+     This function disables the section inserter FN in the current
+     repository.  It is only intended for use in ‘.dir-locals.el’ and
+     ‘.dir-locals-2.el’.
+
+   If you want to apply the same settings to several, but not all,
+repositories then keeping the repository-local config files in sync
+would quickly become annoying.  To avoid that you can create config
+files for certain classes of repositories (e.g., "huge repositories")
+and then include those files in the per-repository config files.  For
+example:
+
+   • ‘/path/to/huge/repo/.git/config’
+
+          [include]
+                  path = /path/to/huge-gitconfig
+
+   • ‘/path/to/huge-gitconfig’
+
+          [status]
+                  showUntrackedFiles = no
+
+   • ‘$HOME/.emacs.d/init.el’
+
+          (dir-locals-set-class-variables 'huge-git-repository
+             '((nil . ((magit-refresh-buffers . nil)))))
+
+          (dir-locals-set-directory-class
+             "/path/to/huge/repo/" 'huge-git-repository)
+
+
+File: magit.info,  Node: Essential Settings,  Prev: Per-Repository Configuration,  Up: Customizing
+
+9.2 Essential Settings
+======================
+
+The next three sections list and discuss several variables that many
+users might want to customize, for safety and/or performance reasons.
+
+9.2.1 Safety
+------------
+
+This section discusses various variables that you might want to change
+(or *not* change) for safety reasons.
+
+   Git keeps *committed* changes around long enough for users to recover
+changes they have accidentally been deleted.  It does not do the same
+for *uncommitted* changes in the working tree and not even the index
+(the staging area).  Because Magit makes it so easy to modify
+uncommitted changes, it also makes it easy to shoot yourself in the foot
+in the process.  For that reason Magit provides three global modes that
+save *tracked* files to work-in-progress references after or before
+certain actions.  See *note Wip Modes::.
+
+   These modes are not enabled by default because of performance
+concerns.  Instead a lot of potentially destructive commands require
+confirmation every time they are used.  In many cases this can be
+disabled by adding a symbol to ‘magit-no-confirm’ (see *note Completion
+and Confirmation::).  If you enable the various wip modes then you
+should add ‘safe-with-wip’ to this list.
+
+   Similarly it isn't necessary to require confirmation before moving a
+file to the system trash - if you trashed a file by mistake then you can
+recover it from there.  Option ‘magit-delete-by-moving-to-trash’
+controls whether the system trash is used, which is the case by default.
+Nevertheless, ‘trash’ isn't a member of ‘magit-no-confirm’ - you might
+want to change that.
+
+   By default buffers visiting files are automatically reverted when the
+visited file changes on disk.  This isn't as risky as it might seem, but
+to make an informed decision you should see *note Risk of Reverting
+Automatically::.
+
+9.2.2 Performance
+-----------------
+
+After Magit has run ‘git’ for side-effects, it also refreshes the
+current Magit buffer and the respective status buffer.  This is
+necessary because otherwise outdated information might be displayed
+without the user noticing.  Magit buffers are updated by recreating
+their content from scratch, which makes updating simpler and less
+error-prone, but also more costly.  Keeping it simple and just
+re-creating everything from scratch is an old design decision and
+departing from that will require major refactoring.
+
+   Meanwhile you can tell Magit to only automatically refresh the
+current Magit buffer, but not the status buffer.  If you do that, then
+the status buffer is only refreshed automatically if it is the current
+buffer.
+
+     (setq magit-refresh-status-buffer nil)
+
+   You should also check whether any third-party packages have added
+anything to ‘magit-refresh-buffer-hook’, ‘magit-pre-refresh-hook’, and
+‘magit-post-refresh-hook’.  If so, then check whether those additions
+impact performance significantly.
+
+   Magit can be told to refresh buffers verbosely using ‘M-x
+magit-toggle-verbose-refresh’.  Enabling this helps figuring out which
+sections are bottlenecks.  Each line printed to the ‘*Messages*’ buffer
+contains a section name, the number of seconds it took to show this
+section, and from 0 to 2 exclamation marks: the more exclamation marks
+the slower the section is.
+
+   Magit also reverts buffers for visited files located inside the
+current repository when the visited file changes on disk.  That is
+implemented on top of ‘auto-revert-mode’ from the built-in library
+‘autorevert’.  To figure out whether that impacts performance, check
+whether performance is significantly worse, when many buffers exist
+and/or when some buffers visit files using TRAMP.  If so, then this
+should help.
+
+     (setq auto-revert-buffer-list-filter
+           'magit-auto-revert-repository-buffer-p)
+
+   For alternative approaches see *note Automatic Reverting of
+File-Visiting Buffers::.
+
+   If you have enabled any features that are disabled by default, then
+you should check whether they impact performance significantly.  It's
+likely that they were not enabled by default because it is known that
+they reduce performance at least in large repositories.
+
+   If performance is only slow inside certain unusually large
+repositories, then you might want to disable certain features on a
+per-repository or per-repository-class basis only.  See *note
+Per-Repository Configuration::.  For example it takes a long time to
+determine the next and current tag in repository with exceptional
+numbers of tags.  It would therefore be a good idea to disable
+‘magit-insert-tags-headers’, as explained at the mentioned node.
+
+Log Performance
+...............
+
+When showing logs, Magit limits the number of commits initially shown in
+the hope that this avoids unnecessary work.  When ‘--graph’ is used,
+then this unfortunately does not have the desired effect for large
+histories.  Junio, Git's maintainer, said on the Git mailing list
+(<https://www.spinics.net/lists/git/msg232230.html>): "‘--graph’ wants
+to compute the whole history and the max-count only affects the output
+phase after ‘--graph’ does its computation".
+
+   In other words, it's not that Git is slow at outputting the
+differences, or that Magit is slow at parsing the output - the problem
+is that Git first goes outside and has a smoke.
+
+   We actually work around this issue by limiting the number of commits
+not only by using ‘-<N>’ but by also using a range.  But unfortunately
+that's not always possible.
+
+   When more than a few thousand commits are shown, then the use of
+‘--graph’ can slow things down.
+
+   Using ‘--color --graph’ is even slower.  Magit uses code that is part
+of Emacs to turn control characters into faces.  That code is pretty
+slow and this is quite noticeable when showing a log with many branches
+and merges.  For that reason ‘--color’ is not enabled by default
+anymore.  Consider leaving it at that.
+
+Diff Performance
+................
+
+If diffs are slow, then consider turning off some optional diff features
+by setting all or some of the following variables to ‘nil’:
+‘magit-diff-highlight-indentation’, ‘magit-diff-highlight-trailing’,
+‘magit-diff-paint-whitespace’, ‘magit-diff-highlight-hunk-body’, and
+‘magit-diff-refine-hunk’.
+
+   When showing a commit instead of some arbitrary diff, then some
+additional information is displayed.  Calculating this information can
+be quite expensive given certain circumstances.  If looking at a commit
+using ‘magit-revision-mode’ takes considerably more time than looking at
+the same commit in ‘magit-diff-mode’, then consider setting
+‘magit-revision-insert-related-refs’ to ‘nil’.
+
+   When you are often confronted with diffs that contain deleted files,
+then you might want to enable the ‘--irreversible-delete’ argument.  If
+you do that then diffs still show that a file was deleted but without
+also showing the complete deleted content of the file.  This argument is
+not available by default, see *note (transient)Enabling and Disabling
+Suffixes::.  Once you have done that you should enable it and save that
+setting, see *note (transient)Saving Values::.  You should do this in
+both the diff (‘d’) and the diff refresh (‘D’) transient popups.
+
+Refs Buffer Performance
+.......................
+
+When refreshing the "references buffer" is slow, then that's usually
+because several hundred refs are being displayed.  The best way to
+address that is to display fewer refs, obviously.
+
+   If you are not, or only mildly, interested in seeing the list of
+tags, then start by not displaying them:
+
+     (remove-hook 'magit-refs-sections-hook 'magit-insert-tags)
+
+   Then you should also make sure that the listed remote branches
+actually all exist.  You can do so by pruning branches which no longer
+exist using ‘f-pa’.
+
+Committing Performance
+......................
+
+When you initiate a commit, then Magit by default automatically shows a
+diff of the changes you are about to commit.  For large commits this can
+take a long time, which is especially distracting when you are
+committing large amounts of generated data which you don't actually
+intend to inspect before committing.  This behavior can be turned off
+using:
+
+     (remove-hook 'server-switch-hook 'magit-commit-diff)
+     (remove-hook 'with-editor-filter-visit-hook 'magit-commit-diff)
+
+   Then you can type ‘C-c C-d’ to show the diff when you actually want
+to see it, but only then.  Alternatively you can leave the hook alone
+and just type ‘C-g’ in those cases when it takes too long to generate
+the diff.  If you do that, then you will end up with a broken diff
+buffer, but doing it this way has the advantage that you usually get to
+see the diff, which is useful because it increases the odds that you
+spot potential issues.
+
+Microsoft Windows Performance
+.............................
+
+In order to update the status buffer, ‘git’ has to be run a few dozen
+times.  That is problematic on Microsoft Windows, because that operating
+system is exceptionally slow at starting processes.  Sadly this is an
+issue that can only be fixed by Microsoft itself, and they don't appear
+to be particularly interested in doing so.
+
+   Beside the subprocess issue, there are also other Windows-specific
+performance issues.  Some of these have workarounds.  The maintainers of
+"Git for Windows" try to improve performance on Windows.  Always use the
+latest release in order to benefit from the latest performance tweaks.
+Magit too tries to work around some Windows-specific issues.
+
+   According to some sources, setting the following Git variables can
+also help.
+
+     git config --global core.preloadindex true   # default since v2.1
+     git config --global core.fscache true        # default since v2.8
+     git config --global gc.auto 256
+
+   You should also check whether an anti-virus program is affecting
+performance.
+
+MacOS Performance
+.................
+
+Before Emacs 26.1 child processes were created using ‘fork’ on macOS.
+That needlessly copied GUI resources, which is expensive.  The result
+was that forking took about 30 times as long on Darwin than on Linux,
+and because Magit starts many ‘git’ processes that made quite a
+difference.
+
+   So make sure that you are using at least Emacs 26.1, in which case
+the faster ‘vfork’ will be used.  (The creation of child processes still
+takes about twice as long on Darwin compared to Linux.)  See (1) for
+more information.
+
+   Additionally, ‘git’ installed from a package manager like ‘brew’ or
+‘nix’ seems to be slower than the native executable.  Profile the ‘git’
+executable you're running against the one at ‘/usr/bin/git’, and if you
+notice a notable difference try using the latter as
+‘magit-git-executable’.
+
+9.2.3 Global Bindings
+---------------------
+
+ -- User Option: magit-define-global-key-bindings
+     This option controls which set of Magit key bindings, if any, may
+     be added to the global keymap, even before Magit is first used in
+     the current Emacs session.
+
+        • If the value is ‘nil’, no bindings are added.
+
+        • If ‘default’, maybe add:
+
+          ‘C-x g’     ‘magit-status’
+          ‘C-x M-g’   ‘magit-dispatch’
+          ‘C-c M-g’   ‘magit-file-dispatch’
+
+        • If ‘recommended’, maybe add:
+
+          ‘C-x g’   ‘magit-status’
+          ‘C-c g’   ‘magit-dispatch’
+          ‘C-c f’   ‘magit-file-dispatch’
+
+          These bindings are strongly recommended, but we cannot use
+          them by default, because the ‘C-c <LETTER>’ namespace is
+          strictly reserved for bindings added by the user (see *note
+          (elisp)Key Binding Conventions::).
+
+     The bindings in the chosen set may be added when ‘after-init-hook’
+     is run.  Each binding is added if, and only if, at that time no
+     other key is bound to the same command, and no other command is
+     bound to the same key.  In other words we try to avoid adding
+     bindings that are unnecessary, as well as bindings that conflict
+     with other bindings.
+
+     Adding these bindings is delayed until ‘after-init-hook’ is run to
+     allow users to set the variable anywhere in their init file
+     (without having to make sure to do so before ‘magit’ is loaded or
+     autoloaded) and to increase the likelihood that all the potentially
+     conflicting user bindings have already been added.
+
+     To set this variable use either ‘setq’ or the Custom interface.  Do
+     not use the function ‘customize-set-variable’ because doing that
+     would cause Magit to be loaded immediately, when that form is
+     evaluated (this differs from ‘custom-set-variables’, which doesn't
+     load the libraries that define the customized variables).
+
+     Setting this variable has no effect if ‘after-init-hook’ has
+     already been run.
+
+   ---------- Footnotes ----------
+
+   (1) 
+<https://lists.gnu.org/archive/html/bug-gnu-emacs/2017-04/msg00201.html>
+
+
+File: magit.info,  Node: Plumbing,  Next: FAQ,  Prev: Customizing,  Up: Top
+
+10 Plumbing
+***********
+
+The following sections describe how to use several of Magit's core
+abstractions to extend Magit itself or implement a separate extension.
+
+   A few of the low-level features used by Magit have been factored out
+into separate libraries/packages, so that they can be used by other
+packages, without having to depend on Magit.  See *note
+(with-editor)Top:: for information about ‘with-editor’.  ‘transient’
+doesn't have a manual yet.
+
+   If you are trying to find an unused key that you can bind to a
+command provided by your own Magit extension, then checkout
+<https://github.com/magit/magit/wiki/Plugin-Dispatch-Key-Registry>.
+
+* Menu:
+
+* Calling Git::
+* Section Plumbing::
+* Refreshing Buffers::
+* Conventions::
+
+
+File: magit.info,  Node: Calling Git,  Next: Section Plumbing,  Up: Plumbing
+
+10.1 Calling Git
+================
+
+Magit provides many specialized functions for calling Git.  All of these
+functions are defined in either ‘magit-git.el’ or ‘magit-process.el’ and
+have one of the prefixes ‘magit-run-’, ‘magit-call-’, ‘magit-start-’, or
+‘magit-git-’ (which is also used for other things).
+
+   All of these functions accept an indefinite number of arguments,
+which are strings that specify command line arguments for Git (or in
+some cases an arbitrary executable).  These arguments are flattened
+before being passed on to the executable; so instead of strings they can
+also be lists of strings and arguments that are ‘nil’ are silently
+dropped.  Some of these functions also require a single mandatory
+argument before these command line arguments.
+
+   Roughly speaking, these functions run Git either to get some value or
+for side-effects.  The functions that return a value are useful to
+collect the information necessary to populate a Magit buffer, while the
+others are used to implement Magit commands.
+
+   The functions in the value-only group always run synchronously, and
+they never trigger a refresh.  The function in the side-effect group can
+be further divided into subgroups depending on whether they run Git
+synchronously or asynchronously, and depending on whether they trigger a
+refresh when the executable has finished.
+
+10.1.1 Getting a Value from Git
+-------------------------------
+
+These functions run Git in order to get a value, an exit status, or
+output.  Of course you could also use them to run Git commands that have
+side-effects, but that should be avoided.
+
+ -- Function: magit-git-exit-code &rest args
+     Executes git with ARGS and returns its exit code.
+
+ -- Function: magit-git-success &rest args
+     Executes git with ARGS and returns ‘t’ if the exit code is ‘0’,
+     ‘nil’ otherwise.
+
+ -- Function: magit-git-failure &rest args
+     Executes git with ARGS and returns ‘t’ if the exit code is ‘1’,
+     ‘nil’ otherwise.
+
+ -- Function: magit-git-true &rest args
+     Executes git with ARGS and returns ‘t’ if the first line printed by
+     git is the string "true", ‘nil’ otherwise.
+
+ -- Function: magit-git-false &rest args
+     Executes git with ARGS and returns ‘t’ if the first line printed by
+     git is the string "false", ‘nil’ otherwise.
+
+ -- Function: magit-git-insert &rest args
+     Executes git with ARGS and inserts its output at point.
+
+ -- Function: magit-git-string &rest args
+     Executes git with ARGS and returns the first line of its output.
+     If there is no output or if it begins with a newline character,
+     then this returns ‘nil’.
+
+ -- Function: magit-git-lines &rest args
+     Executes git with ARGS and returns its output as a list of lines.
+     Empty lines anywhere in the output are omitted.
+
+ -- Function: magit-git-items &rest args
+     Executes git with ARGS and returns its null-separated output as a
+     list.  Empty items anywhere in the output are omitted.
+
+     If the value of option ‘magit-git-debug’ is non-‘nil’ and git exits
+     with a non-zero exit status, then warn about that in the echo area
+     and add a section containing git's standard error in the current
+     repository's process buffer.
+
+ -- Function: magit-process-git destination &rest args
+     Calls Git synchronously in a separate process, returning its exit
+     code.  DESTINATION specifies how to handle the output, like for
+     ‘call-process’, except that file handlers are supported.  Enables
+     Cygwin's "noglob" option during the call and ensures unix eol
+     conversion.
+
+ -- Function: magit-process-file process &optional infile buffer display
+          &rest args
+     Processes files synchronously in a separate process.  Identical to
+     ‘process-file’ but temporarily enables Cygwin's "noglob" option
+     during the call and ensures unix eol conversion.
+
+   If an error occurs when using one of the above functions, then that
+is usually due to a bug, i.e., using an argument which is not actually
+supported.  Such errors are usually not reported, but when they occur we
+need to be able to debug them.
+
+ -- User Option: magit-git-debug
+     Whether to report errors that occur when using ‘magit-git-insert’,
+     ‘magit-git-string’, ‘magit-git-lines’, or ‘magit-git-items’.  This
+     does not actually raise an error.  Instead a message is shown in
+     the echo area, and git's standard error is insert into a new
+     section in the current repository's process buffer.
+
+ -- Function: magit-git-str &rest args
+     This is a variant of ‘magit-git-string’ that ignores the option
+     ‘magit-git-debug’.  It is mainly intended to be used while handling
+     errors in functions that do respect that option.  Using such a
+     function while handing an error could cause yet another error and
+     therefore lead to an infinite recursion.  You probably won't ever
+     need to use this function.
+
+10.1.2 Calling Git for Effect
+-----------------------------
+
+These functions are used to run git to produce some effect.  Most Magit
+commands that actually run git do so by using such a function.
+
+   Because we do not need to consume git's output when using these
+functions, their output is instead logged into a per-repository buffer,
+which can be shown using ‘$’ from a Magit buffer or ‘M-x magit-process’
+elsewhere.
+
+   These functions can have an effect in two distinct ways.  Firstly,
+running git may change something, i.e., create or push a new commit.
+Secondly, that change may require that Magit buffers are refreshed to
+reflect the changed state of the repository.  But refreshing isn't
+always desirable, so only some of these functions do perform such a
+refresh after git has returned.
+
+   Sometimes it is useful to run git asynchronously.  For example, when
+the user has just initiated a push, then there is no reason to make her
+wait until that has completed.  In other cases it makes sense to wait
+for git to complete before letting the user do something else.  For
+example after staging a change it is useful to wait until after the
+refresh because that also automatically moves to the next change.
+
+   The synchronous functions return the exit code, while the
+asynchronous functions return the process object.
+
+ -- Function: magit-call-git &rest args
+     Calls git synchronously with ARGS.
+
+ -- Function: magit-call-process program &rest args
+     Calls PROGRAM synchronously with ARGS.
+
+ -- Function: magit-run-git &rest args
+     Calls git synchronously with ARGS and then refreshes.
+
+ -- Function: magit-run-git-with-input &rest args
+     Calls git synchronously with ARGS and sends it the content of the
+     current buffer on standard input.
+
+     If the current buffer's ‘default-directory’ is on a remote
+     filesystem, this function actually runs git asynchronously.  But
+     then it waits for the process to return, so the function itself is
+     synchronous.
+
+ -- Function: magit-git &rest args
+     Calls git synchronously with ARGS for side-effects only.  This
+     function does not refresh the buffer.
+
+ -- Function: magit-git-wash washer &rest args
+     Execute Git with ARGS, inserting washed output at point.  Actually
+     first insert the raw output at point.  If there is no output call
+     ‘magit-cancel-section’.  Otherwise temporarily narrow the buffer to
+     the inserted text, move to its beginning, and then call function
+     WASHER with ARGS as its sole argument.
+
+   And now for the asynchronous variants.
+
+ -- Function: magit-run-git-async &rest args
+     Start Git, prepare for refresh, and return the process object.
+     ARGS is flattened and then used as arguments to Git.
+
+     Display the command line arguments in the echo area.
+
+     After Git returns some buffers are refreshed: the buffer that was
+     current when this function was called (if it is a Magit buffer and
+     still alive), as well as the respective Magit status buffer.
+     Unmodified buffers visiting files that are tracked in the current
+     repository are reverted if ‘magit-revert-buffers’ is non-‘nil’.
+
+ -- Function: magit-run-git-with-editor &rest args
+     Export GIT_EDITOR and start Git.  Also prepare for refresh and
+     return the process object.  ARGS is flattened and then used as
+     arguments to Git.
+
+     Display the command line arguments in the echo area.
+
+     After Git returns some buffers are refreshed: the buffer that was
+     current when this function was called (if it is a Magit buffer and
+     still alive), as well as the respective Magit status buffer.
+
+ -- Function: magit-start-git input &rest args
+     Start Git, prepare for refresh, and return the process object.
+
+     If INPUT is non-‘nil’, it has to be a buffer or the name of an
+     existing buffer.  The buffer content becomes the processes standard
+     input.
+
+     Option ‘magit-git-executable’ specifies the Git executable and
+     option ‘magit-git-global-arguments’ specifies constant arguments.
+     The remaining arguments ARGS specify arguments to Git.  They are
+     flattened before use.
+
+     After Git returns, some buffers are refreshed: the buffer that was
+     current when this function was called (if it is a Magit buffer and
+     still alive), as well as the respective Magit status buffer.
+     Unmodified buffers visiting files that are tracked in the current
+     repository are reverted if ‘magit-revert-buffers’ is non-‘nil’.
+
+ -- Function: magit-start-process &rest args
+     Start PROGRAM, prepare for refresh, and return the process object.
+
+     If optional argument INPUT is non-‘nil’, it has to be a buffer or
+     the name of an existing buffer.  The buffer content becomes the
+     processes standard input.
+
+     The process is started using ‘start-file-process’ and then setup to
+     use the sentinel ‘magit-process-sentinel’ and the filter
+     ‘magit-process-filter’.  Information required by these functions is
+     stored in the process object.  When this function returns the
+     process has not started to run yet so it is possible to override
+     the sentinel and filter.
+
+     After the process returns, ‘magit-process-sentinel’ refreshes the
+     buffer that was current when ‘magit-start-process’ was called (if
+     it is a Magit buffer and still alive), as well as the respective
+     Magit status buffer.  Unmodified buffers visiting files that are
+     tracked in the current repository are reverted if
+     ‘magit-revert-buffers’ is non-‘nil’.
+
+ -- Variable: magit-this-process
+     The child process which is about to start.  This can be used to
+     change the filter and sentinel.
+
+ -- Variable: magit-process-raise-error
+     When this is non-‘nil’, then ‘magit-process-sentinel’ raises an
+     error if git exits with a non-zero exit status.  For debugging
+     purposes.
+
+
+File: magit.info,  Node: Section Plumbing,  Next: Refreshing Buffers,  Prev: Calling Git,  Up: Plumbing
+
+10.2 Section Plumbing
+=====================
+
+10.2.1 Creating Sections
+------------------------
+
+ -- Macro: magit-insert-section &rest args
+     Insert a section at point.
+
+     TYPE is the section type, a symbol.  Many commands that act on the
+     current section behave differently depending on that type.  Also if
+     a variable ‘magit-TYPE-section-map’ exists, then use that as the
+     text-property ‘keymap’ of all text belonging to the section (but
+     this may be overwritten in subsections).  TYPE can also have the
+     form ‘(eval FORM)’ in which case FORM is evaluated at runtime.
+
+     Optional VALUE is the value of the section, usually a string that
+     is required when acting on the section.
+
+     When optional HIDE is non-‘nil’ collapse the section body by
+     default, i.e., when first creating the section, but not when
+     refreshing the buffer.  Otherwise, expand it by default.  This can
+     be overwritten using ‘magit-section-set-visibility-hook’.  When a
+     section is recreated during a refresh, then the visibility of
+     predecessor is inherited and HIDE is ignored (but the hook is still
+     honored).
+
+     BODY is any number of forms that actually insert the section's
+     heading and body.  Optional NAME, if specified, has to be a symbol,
+     which is then bound to the struct of the section being inserted.
+
+     Before BODY is evaluated the ‘start’ of the section object is set
+     to the value of ‘point’ and after BODY was evaluated its ‘end’ is
+     set to the new value of ‘point’; BODY is responsible for moving
+     ‘point’ forward.
+
+     If it turns out inside BODY that the section is empty, then
+     ‘magit-cancel-section’ can be used to abort and remove all traces
+     of the partially inserted section.  This can happen when creating a
+     section by washing Git's output and Git didn't actually output
+     anything this time around.
+
+ -- Function: magit-insert-heading &rest args
+     Insert the heading for the section currently being inserted.
+
+     This function should only be used inside ‘magit-insert-section’.
+
+     When called without any arguments, then just set the ‘content’ slot
+     of the object representing the section being inserted to a marker
+     at ‘point’.  The section should only contain a single line when
+     this function is used like this.
+
+     When called with arguments ARGS, which have to be strings, then
+     insert those strings at point.  The section should not contain any
+     text before this happens and afterwards it should again only
+     contain a single line.  If the ‘face’ property is set anywhere
+     inside any of these strings, then insert all of them unchanged.
+     Otherwise use the ‘magit-section-heading’ face for all inserted
+     text.
+
+     The ‘content’ property of the section struct is the end of the
+     heading (which lasts from ‘start’ to ‘content’) and the beginning
+     of the body (which lasts from ‘content’ to ‘end’).  If the value of
+     ‘content’ is ‘nil’, then the section has no heading and its body
+     cannot be collapsed.  If a section does have a heading then its
+     height must be exactly one line, including a trailing newline
+     character.  This isn't enforced; you are responsible for getting it
+     right.  The only exception is that this function does insert a
+     newline character if necessary.
+
+ -- Function: magit-cancel-section
+     Cancel the section currently being inserted.  This exits the
+     innermost call to ‘magit-insert-section’ and removes all traces of
+     what has already happened inside that call.
+
+ -- Function: magit-define-section-jumper sym title &optional value
+     Define an interactive function to go to section SYM.  TITLE is the
+     displayed title of the section.
+
+10.2.2 Section Selection
+------------------------
+
+ -- Function: magit-current-section
+     Return the section at point.
+
+ -- Function: magit-region-sections &optional condition multiple
+     Return a list of the selected sections.
+
+     When the region is active and constitutes a valid section
+     selection, then return a list of all selected sections.  This is
+     the case when the region begins in the heading of a section and
+     ends in the heading of the same section or in that of a sibling
+     section.  If optional MULTIPLE is non-‘nil’, then the region cannot
+     begin and end in the same section.
+
+     When the selection is not valid, then return ‘nil’.  In this case,
+     most commands that can act on the selected sections will instead
+     act on the section at point.
+
+     When the region looks like it would in any other buffer then the
+     selection is invalid.  When the selection is valid then the region
+     uses the ‘magit-section-highlight’ face.  This does not apply to
+     diffs where things get a bit more complicated, but even here if the
+     region looks like it usually does, then that's not a valid
+     selection as far as this function is concerned.
+
+     If optional CONDITION is non-‘nil’, then the selection not only has
+     to be valid; all selected sections additionally have to match
+     CONDITION, or ‘nil’ is returned.  See ‘magit-section-match’ for the
+     forms CONDITION can take.
+
+ -- Function: magit-region-values &optional condition multiple
+     Return a list of the values of the selected sections.
+
+     Return the values that themselves would be returned by
+     ‘magit-region-sections’ (which see).
+
+10.2.3 Matching Sections
+------------------------
+
+‘M-x magit-describe-section-briefly’
+     Show information about the section at point.  This command is
+     intended for debugging purposes.
+
+ -- Function: magit-section-ident section
+     Return an unique identifier for SECTION.  The return value has the
+     form ‘((TYPE . VALUE)...)’.
+
+ -- Function: magit-get-section ident &optional root
+     Return the section identified by IDENT.  IDENT has to be a list as
+     returned by ‘magit-section-ident’.
+
+ -- Function: magit-section-match condition &optional section
+     Return ‘t’ if SECTION matches CONDITION.  SECTION defaults to the
+     section at point.  If SECTION is not specified and there also is no
+     section at point, then return ‘nil’.
+
+     CONDITION can take the following forms:
+        • ‘(CONDITION...)’
+
+          matches if any of the CONDITIONs matches.
+
+        • ‘[CLASS...]’
+
+          matches if the section's class is the same as the first CLASS
+          or a subclass of that; the section's parent class matches the
+          second CLASS; and so on.
+
+        • ‘[* CLASS...]’
+
+          matches sections that match ‘[CLASS...]’ and also recursively
+          all their child sections.
+
+        • ‘CLASS’
+
+          matches if the section's class is the same as CLASS or a
+          subclass of that; regardless of the classes of the parent
+          sections.
+
+     Each CLASS should be a class symbol, identifying a class that
+     derives from ‘magit-section’.  For backward compatibility CLASS can
+     also be a "type symbol".  A section matches such a symbol if the
+     value of its ‘type’ slot is ‘eq’.  If a type symbol has an entry in
+     ‘magit--section-type-alist’, then a section also matches that type
+     if its class is a subclass of the class that corresponds to the
+     type as per that alist.
+
+     Note that it is not necessary to specify the complete section
+     lineage as printed by ‘magit-describe-section-briefly’, unless of
+     course you want to be that precise.
+
+ -- Function: magit-section-value-if condition &optional section
+     If the section at point matches CONDITION, then return its value.
+
+     If optional SECTION is non-‘nil’ then test whether that matches
+     instead.  If there is no section at point and SECTION is ‘nil’,
+     then return ‘nil’.  If the section does not match, then return
+     ‘nil’.
+
+     See ‘magit-section-match’ for the forms CONDITION can take.
+
+ -- Function: magit-section-case &rest clauses
+     Choose among clauses on the type of the section at point.
+
+     Each clause looks like (CONDITION BODY...).  The type of the
+     section is compared against each CONDITION; the BODY forms of the
+     first match are evaluated sequentially and the value of the last
+     form is returned.  Inside BODY the symbol ‘it’ is bound to the
+     section at point.  If no clause succeeds or if there is no section
+     at point return ‘nil’.
+
+     See ‘magit-section-match’ for the forms CONDITION can take.
+     Additionally a CONDITION of ‘t’ is allowed in the final clause and
+     matches if no other CONDITION match, even if there is no section at
+     point.
+
+ -- Variable: magit-root-section
+     The root section in the current buffer.  All other sections are
+     descendants of this section.  The value of this variable is set by
+     ‘magit-insert-section’ and you should never modify it.
+
+   For diff related sections a few additional tools exist.
+
+ -- Function: magit-diff-type &optional section
+     Return the diff type of SECTION.
+
+     The returned type is one of the symbols ‘staged’, ‘unstaged’,
+     ‘committed’, or ‘undefined’.  This type serves a similar purpose as
+     the general type common to all sections (which is stored in the
+     ‘type’ slot of the corresponding ‘magit-section’ struct) but takes
+     additional information into account.  When the SECTION isn't
+     related to diffs and the buffer containing it also isn't a
+     diff-only buffer, then return ‘nil’.
+
+     Currently the type can also be one of ‘tracked’ and ‘untracked’,
+     but these values are not handled explicitly in every place they
+     should be.  A possible fix could be to just return ‘nil’ here.
+
+     The section has to be a ‘diff’ or ‘hunk’ section, or a section
+     whose children are of type ‘diff’.  If optional SECTION is ‘nil’,
+     return the diff type for the current section.  In buffers whose
+     major mode is ‘magit-diff-mode’ SECTION is ignored and the type is
+     determined using other means.  In ‘magit-revision-mode’ buffers the
+     type is always ‘committed’.
+
+ -- Function: magit-diff-scope &optional section strict
+     Return the diff scope of SECTION or the selected section(s).
+
+     A diff's "scope" describes what part of a diff is selected, it is a
+     symbol, one of ‘region’, ‘hunk’, ‘hunks’, ‘file’, ‘files’, or
+     ‘list’.  Do not confuse this with the diff "type", as returned by
+     ‘magit-diff-type’.
+
+     If optional SECTION is non-‘nil’, then return the scope of that,
+     ignoring the sections selected by the region.  Otherwise return the
+     scope of the current section, or if the region is active and
+     selects a valid group of diff related sections, the type of these
+     sections, i.e., ‘hunks’ or ‘files’.  If SECTION (or if the current
+     section that is ‘nil’) is a ‘hunk’ section and the region starts
+     and ends inside the body of a that section, then the type is
+     ‘region’.
+
+     If optional STRICT is non-‘nil’ then return ‘nil’ if the diff type
+     of the section at point is ‘untracked’ or the section at point is
+     not actually a ‘diff’ but a ‘diffstat’ section.
+
+
+File: magit.info,  Node: Refreshing Buffers,  Next: Conventions,  Prev: Section Plumbing,  Up: Plumbing
+
+10.3 Refreshing Buffers
+=======================
+
+All commands that create a new Magit buffer or change what is being
+displayed in an existing buffer do so by calling ‘magit-mode-setup’.
+Among other things, that function sets the buffer local values of
+‘default-directory’ (to the top-level of the repository),
+‘magit-refresh-function’, and ‘magit-refresh-args’.
+
+   Buffers are refreshed by calling the function that is the local value
+of ‘magit-refresh-function’ (a function named ‘magit-*-refresh-buffer’,
+where ‘*’ may be something like ‘diff’) with the value of
+‘magit-refresh-args’ as arguments.
+
+ -- Macro: magit-mode-setup buffer switch-func mode refresh-func
+          &optional refresh-args
+     This function displays and selects BUFFER, turns on MODE, and
+     refreshes a first time.
+
+     This function displays and optionally selects BUFFER by calling
+     ‘magit-mode-display-buffer’ with BUFFER, MODE and SWITCH-FUNC as
+     arguments.  Then it sets the local value of
+     ‘magit-refresh-function’ to REFRESH-FUNC and that of
+     ‘magit-refresh-args’ to REFRESH-ARGS.  Finally it creates the
+     buffer content by calling REFRESH-FUNC with REFRESH-ARGS as
+     arguments.
+
+     All arguments are evaluated before switching to BUFFER.
+
+ -- Function: magit-mode-display-buffer buffer mode &optional
+          switch-function
+     This function display BUFFER in some window and select it.  BUFFER
+     may be a buffer or a string, the name of a buffer.  The buffer is
+     returned.
+
+     Unless BUFFER is already displayed in the selected frame, store the
+     previous window configuration as a buffer local value, so that it
+     can later be restored by ‘magit-mode-bury-buffer’.
+
+     The buffer is displayed and selected using SWITCH-FUNCTION.  If
+     that is ‘nil’ then ‘pop-to-buffer’ is used if the current buffer's
+     major mode derives from ‘magit-mode’.  Otherwise ‘switch-to-buffer’
+     is used.
+
+ -- Variable: magit-refresh-function
+     The value of this buffer-local variable is the function used to
+     refresh the current buffer.  It is called with ‘magit-refresh-args’
+     as arguments.
+
+ -- Variable: magit-refresh-args
+     The list of arguments used by ‘magit-refresh-function’ to refresh
+     the current buffer.  ‘magit-refresh-function’ is called with these
+     arguments.
+
+     The value is usually set using ‘magit-mode-setup’, but in some
+     cases it's also useful to provide commands that can change the
+     value.  For example, the ‘magit-diff-refresh’ transient can be used
+     to change any of the arguments used to display the diff, without
+     having to specify again which differences should be shown, but
+     ‘magit-diff-more-context’, ‘magit-diff-less-context’ and
+     ‘magit-diff-default-context’ change just the ‘-U<N>’ argument.  In
+     both case this is done by changing the value of this variable and
+     then calling this ‘magit-refresh-function’.
+
+
+File: magit.info,  Node: Conventions,  Prev: Refreshing Buffers,  Up: Plumbing
+
+10.4 Conventions
+================
+
+Also see *note Completion and Confirmation::.
+
+10.4.1 Theming Faces
+--------------------
+
+The default theme uses blue for local branches, green for remote
+branches, and goldenrod (brownish yellow) for tags.  When creating a new
+theme, you should probably follow that example.  If your theme already
+uses other colors, then stick to that.
+
+   In older releases these reference faces used to have a background
+color and a box around them.  The basic default faces no longer do so,
+to make Magit buffers much less noisy, and you should follow that
+example at least with regards to boxes.  (Boxes were used in the past to
+work around a conflict between the highlighting overlay and text
+property backgrounds.  That's no longer necessary because highlighting
+no longer causes other background colors to disappear.)  Alternatively
+you can keep the background color and/or box, but then have to take
+special care to adjust ‘magit-branch-current’ accordingly.  By default
+it looks mostly like ‘magit-branch-local’, but with a box (by default
+the former is the only face that uses a box, exactly so that it sticks
+out).  If the former also uses a box, then you have to make sure that it
+differs in some other way from the latter.
+
+   The most difficult faces to theme are those related to diffs,
+headings, highlighting, and the region.  There are faces that fall into
+all four groups - expect to spend some time getting this right.
+
+   The ‘region’ face in the default theme, in both the light and dark
+variants, as well as in many other themes, distributed with Emacs or by
+third-parties, is very ugly.  It is common to use a background color
+that really sticks out, which is ugly but if that were the only problem
+then it would be acceptable.  Unfortunately many themes also set the
+foreground color, which ensures that all text within the region is
+readable.  Without doing that there might be cases where some foreground
+color is too close to the region background color to still be readable.
+But it also means that text within the region loses all syntax
+highlighting.
+
+   I consider the work that went into getting the ‘region’ face right to
+be a good indicator for the general quality of a theme.  My
+recommendation for the ‘region’ face is this: use a background color
+slightly different from the background color of the ‘default’ face, and
+do not set the foreground color at all.  So for a light theme you might
+use a light (possibly tinted) gray as the background color of ‘default’
+and a somewhat darker gray for the background of ‘region’.  That should
+usually be enough to not collide with the foreground color of any other
+face.  But if some other faces also set a light gray as background
+color, then you should also make sure it doesn't collide with those (in
+some cases it might be acceptable though).
+
+   Magit only uses the ‘region’ face when the region is "invalid" by its
+own definition.  In a Magit buffer the region is used to either select
+multiple sibling sections, so that commands which support it act on all
+of these sections instead of just the current section, or to select
+lines within a single hunk section.  In all other cases, the section is
+considered invalid and Magit won't act on it.  But such invalid sections
+happen, either because the user has not moved point enough yet to make
+it valid or because she wants to use a non-magit command to act on the
+region, e.g., ‘kill-region’.
+
+   So using the regular ‘region’ face for invalid sections is a feature.
+It tells the user that Magit won't be able to act on it.  It's
+acceptable if that face looks a bit odd and even (but less so) if it
+collides with the background colors of section headings and other things
+that have a background color.
+
+   Magit highlights the current section.  If a section has subsections,
+then all of them are highlighted.  This is done using faces that have
+"highlight" in their names.  For most sections,
+‘magit-section-highlight’ is used for both the body and the heading.
+Like the ‘region’ face, it should only set the background color to
+something similar to that of ‘default’.  The highlight background color
+must be different from both the ‘region’ background color and the
+‘default’ background color.
+
+   For diff related sections Magit uses various faces to highlight
+different parts of the selected section(s).  Note that hunk headings,
+unlike all other section headings, by default have a background color,
+because it is useful to have very visible separators between hunks.
+That face ‘magit-diff-hunk-heading’, should be different from both
+‘magit-diff-hunk-heading-highlight’ and ‘magit-section-highlight’, as
+well as from ‘magit-diff-context’ and ‘magit-diff-context-highlight’.
+By default we do that by changing the foreground color.  Changing the
+background color would lead to complications, and there are already
+enough we cannot get around.  (Also note that it is generally a good
+idea for section headings to always be bold, but only for sections that
+have subsections).
+
+   When there is a valid region selecting diff-related sibling sections,
+i.e., multiple files or hunks, then the bodies of all these sections use
+the respective highlight faces, but additionally the headings instead
+use one of the faces ‘magit-diff-file-heading-selection’ or
+‘magit-diff-hunk-heading-selection’.  These faces have to be different
+from the regular highlight variants to provide explicit visual
+indication that the region is active.
+
+   When theming diff related faces, start by setting the option
+‘magit-diff-refine-hunk’ to ‘all’.  You might personally prefer to only
+refine the current hunk or not use hunk refinement at all, but some of
+the users of your theme want all hunks to be refined, so you have to
+cater to that.
+
+   (Also turn on ‘magit-diff-highlight-indentation’,
+‘magit-diff-highlight-trailing’, and ‘magit-diff-paint-whitespace’; and
+insert some whitespace errors into the code you use for testing.)
+
+   For added lines you have to adjust three faces: ‘magit-diff-added’,
+‘magit-diff-added-highlight’, and ‘diff-refined-added’.  Make sure that
+the latter works well with both of the former, as well as ‘smerge-other’
+and ‘diff-added’.  Then do the same for the removed lines, context
+lines, lines added by us, and lines added by them.  Also make sure the
+respective added, removed, and context faces use approximately the same
+saturation for both the highlighted and unhighlighted variants.  Also
+make sure the file and diff headings work nicely with context lines
+(e.g., make them look different).  Line faces should set both the
+foreground and the background color.  For example, for added lines use
+two different greens.
+
+   It's best if the foreground color of both the highlighted and the
+unhighlighted variants are the same, so you will need to have to find a
+color that works well on the highlight and unhighlighted background, the
+refine background, and the highlight context background.  When there is
+an hunk internal region, then the added- and removed-lines background
+color is used only within that region.  Outside the region the
+highlighted context background color is used.  This makes it easier to
+see what is being staged.  With an hunk internal region the hunk heading
+is shown using ‘magit-diff-hunk-heading-selection’, and so are the thin
+lines that are added around the lines that fall within the region.  The
+background color of that has to be distinct enough from the various
+other involved background colors.
+
+   Nobody said this would be easy.  If your theme restricts itself to a
+certain set of colors, then you should make an exception here.
+Otherwise it would be impossible to make the diffs look good in each and
+every variation.  Actually you might want to just stick to the default
+definitions for these faces.  You have been warned.  Also please note
+that if you do not get this right, this will in some cases look to users
+like bugs in Magit - so please do it right or not at all.
+
+
+File: magit.info,  Node: FAQ,  Next: Debugging Tools,  Prev: Plumbing,  Up: Top
+
+Appendix A FAQ
+**************
+
+The next two nodes lists frequently asked questions.  For a list of
+frequently *and recently* asked questions, i.e., questions that haven't
+made it into the manual yet, see
+<https://github.com/magit/magit/wiki/FAQ>.
+
+   Please also see *note Debugging Tools::.
+
+* Menu:
+
+* FAQ - How to ...?::
+* FAQ - Issues and Errors::
+
+
+File: magit.info,  Node: FAQ - How to ...?,  Next: FAQ - Issues and Errors,  Up: FAQ
+
+A.1 FAQ - How to ...?
+=====================
+
+A.1.1 How to pronounce Magit?
+-----------------------------
+
+Either ‘mu[m's] git’ or ‘magi{c => t}’ is fine.
+
+   The slogan is "It's Magit!  The magical Git client", so it makes
+sense to pronounce Magit like magic, while taking into account that C
+and T do not sound the same.
+
+   The German "Magie" is not pronounced the same as the English "magic",
+so if you speak German, then you can use the above rationale to justify
+using the former pronunciation; ‘Mag{ie => it}’.
+
+   You can also choose to use the former pronunciation just because you
+like it better.
+
+   Also see <https://magit.vc/assets/videos/magic.mp4>.  Also see
+<https://emacs.stackexchange.com/questions/13696>.
+
+A.1.2 How to show git's output?
+-------------------------------
+
+To show the output of recently run git commands, press ‘$’ (or, if that
+isn't available, use ‘M-x magit-process-buffer’).  This shows a buffer
+containing a section per git invocation; as always press ‘TAB’ to expand
+or collapse them.
+
+   By default, git's output is only inserted into the process buffer if
+it is run for side-effects.  When the output is consumed in some way,
+also inserting it into the process buffer would be too expensive.  For
+debugging purposes, it's possible to do so anyway, using ‘M-x
+magit-toggle-git-debug’.
+
+A.1.3 How to install the gitman info manual?
+--------------------------------------------
+
+Git's manpages can be exported as an info manual called ‘gitman’.
+Magit's own info manual links to nodes in that manual instead of the
+actual manpages, simply because Info doesn't support linking to
+manpages.
+
+   Unfortunately some distributions do not install the ‘gitman’ manual
+by default and you would have to install a separate documentation
+package to get it.
+
+   Magit patches info, adding the ability to visit links to the ‘gitman’
+info manual, by instead viewing the respective manpage.  If you prefer
+that approach, then set the value of ‘magit-view-git-manual-method’ to
+one of the supported Emacs packages ‘man’ or ‘woman’, e.g.:
+
+     (setq magit-view-git-manual-method 'man)
+
+A.1.4 How to show diffs for gpg-encrypted files?
+------------------------------------------------
+
+Git supports showing diffs for encrypted files, but has to be told to do
+so.  Since Magit just uses Git to get the diffs, configuring Git also
+affects the diffs displayed inside Magit.
+
+     git config --global diff.gpg.textconv "gpg --no-tty --decrypt"
+     echo "*.gpg filter=gpg diff=gpg" > .gitattributes
+
+A.1.5 How does branching and pushing work?
+------------------------------------------
+
+Please see *note Branching:: and
+<https://emacsair.me/2016/01/18/magit-2.4>
+
+A.1.6 Should I disable VC?
+--------------------------
+
+If you don't use VC (the built-in version control interface) then you
+might be tempted to disable it, not least because we used to recommend
+that you do that.
+
+   We no longer recommend that you disable VC.  Doing so would break
+useful third-party packages (such as ‘diff-hl’), which depend on VC
+being enabled.
+
+   If you choose to disable VC anyway, then you can do so by changing
+the value of ‘vc-handled-backends’.
+
+A.1.7 The diff/log is filtered to one file; how do I show all changes.
+----------------------------------------------------------------------
+
+The diff arguments used in the current buffer can be changed using the
+‘magit-diff-refresh’ menu on ‘D’.
+
+   The log arguments used in the current buffer can be changed using the
+‘magit-log-refresh’ menu on ‘L’.
+
+
+File: magit.info,  Node: FAQ - Issues and Errors,  Prev: FAQ - How to ...?,  Up: FAQ
+
+A.2 FAQ - Issues and Errors
+===========================
+
+A.2.1 Magit is slow
+-------------------
+
+See *note Performance:: and *note I changed several thousand files at
+once and now Magit is unusable::.
+
+A.2.2 I changed several thousand files at once and now Magit is unusable
+------------------------------------------------------------------------
+
+Magit is currently not expected to work well under such conditions.  It
+sure would be nice if it did.  Reaching satisfactory performance under
+such conditions will require some heavy refactoring.  This is no small
+task but I hope to eventually find the time to make it happen.
+
+   But for now we recommend you use the command line to complete this
+one commit.  Also see *note Performance::.
+
+A.2.3 I am having problems committing
+-------------------------------------
+
+That likely means that Magit is having problems finding an appropriate
+‘emacsclient’ executable.  See *note (with-editor)Configuring
+With-Editor:: and *note (with-editor)Debugging::.
+
+A.2.4 I am using MS Windows and cannot push with Magit
+------------------------------------------------------
+
+It's almost certain that Magit is only incidental to this issue.  It is
+much more likely that this is a configuration issue, even if you can
+push on the command line.
+
+   Detailed setup instructions can be found at
+<https://github.com/magit/magit/wiki/Pushing-with-Magit-from-Windows>.
+
+A.2.5 I am using macOS and SOMETHING works in shell, but not in Magit
+---------------------------------------------------------------------
+
+This usually occurs because Emacs doesn't have the same environment
+variables as your shell.  Try installing and configuring
+<https://github.com/purcell/exec-path-from-shell>.  By default it
+synchronizes ‘$PATH’, which helps Magit find the same ‘git’ as the one
+you are using on the shell.
+
+   If SOMETHING is "passphrase caching with gpg-agent for commit and/or
+tag signing", then you'll also need to synchronize ‘$GPG_AGENT_INFO’.
+
+A.2.6 Expanding a file to show the diff causes it to disappear
+--------------------------------------------------------------
+
+This is probably caused by a customization of a ‘diff.*’ Git variable.
+You probably set that variable for a reason, and should therefore only
+undo that setting in Magit by customizing ‘magit-git-global-arguments’.
+
+A.2.7 Point is wrong in the ‘COMMIT_EDITMSG’ buffer
+---------------------------------------------------
+
+Neither Magit nor ‘git-commit.el’ fiddle with point in the buffer used
+to write commit messages, so something else must be doing it.
+
+   You have probably globally enabled a mode, which restores point in
+file-visiting buffers.  It might be a bit surprising, but when you write
+a commit message, then you are actually editing a file.
+
+   So you have to figure out which package is doing it.  ‘saveplace’,
+‘pointback’, and ‘session’ are likely candidates.  These snippets might
+help:
+
+     (setq session-name-disable-regexp "\\(?:\\`'\\.git/[A-Z_]+\\'\\)")
+
+     (with-eval-after-load 'pointback
+       (lambda ()
+         (when (or git-commit-mode git-rebase-mode)
+           (pointback-mode -1))))
+
+A.2.8 The mode-line information isn't always up-to-date
+-------------------------------------------------------
+
+Magit is not responsible for the version control information that is
+being displayed in the mode-line and looks something like ‘Git-master’.
+The built-in "Version Control" package, also known as "VC", updates that
+information, and can be told to do so more often:
+
+     (setq auto-revert-check-vc-info t)
+
+   But doing so isn't good for performance.  For more (overly
+optimistic) information see *note (emacs)VC Mode Line::.
+
+   If you don't really care about seeing this information in the
+mode-line, but just don't want to see _incorrect_ information, then
+consider simply not displaying it in the mode-line:
+
+     (setq-default mode-line-format
+                   (delete '(vc-mode vc-mode) mode-line-format))
+
+A.2.9 A branch and tag sharing the same name breaks SOMETHING
+-------------------------------------------------------------
+
+Or more generally, ambiguous refnames break SOMETHING.
+
+   Magit assumes that refs are named non-ambiguously across the
+"refs/heads/", "refs/tags/", and "refs/remotes/" namespaces (i.e., all
+the names remain unique when those prefixes are stripped).  We consider
+ambiguous refnames unsupported and recommend that you use a
+non-ambiguous naming scheme.  However, if you do work with a repository
+that has ambiguous refnames, please report any issues you encounter, so
+that we can investigate whether there is a simple fix.
+
+A.2.10 My Git hooks work on the command-line but not inside Magit
+-----------------------------------------------------------------
+
+When Magit calls ‘git’ it adds a few global arguments including
+‘--literal-pathspecs’ and the ‘git’ process started by Magit then passes
+that setting on to other ‘git’ process it starts itself.  It does so by
+setting the environment variable ‘GIT_LITERAL_PATHSPECS’, not by calling
+subprocesses with the ‘--literal-pathspecs’ argument.  You can therefore
+override this setting in hook scripts using ‘unset
+GIT_LITERAL_PATHSPECS’.
+
+A.2.11 ‘git-commit-mode’ isn't used when committing from the command-line
+-------------------------------------------------------------------------
+
+The reason for this is that ‘git-commit.el’ has not been loaded yet
+and/or that the server has not been started yet.  These things have
+always already been taken care of when you commit from Magit because in
+order to do so, Magit has to be loaded and doing that involves loading
+‘git-commit’ and starting the server.
+
+   If you want to commit from the command-line, then you have to take
+care of these things yourself.  Your ‘init.el’ file should contain:
+
+     (require 'git-commit)
+     (server-mode)
+
+   Instead of '(require 'git-commit)' you may also use:
+
+     (load "/path/to/magit-autoloads.el")
+
+   You might want to do that because loading ‘git-commit’ causes large
+parts of Magit to be loaded.
+
+   There are also some variations of ‘(server-mode)’ that you might want
+to try.  Personally I use:
+
+     (use-package server
+       :config (or (server-running-p) (server-mode)))
+
+   Now you can use:
+
+     $ emacs&
+     $ EDITOR=emacsclient git commit
+
+   However you cannot use:
+
+     $ killall emacs
+     $ EDITOR="emacsclient --alternate-editor emacs" git commit
+
+   This will actually end up using ‘emacs’, not ‘emacsclient’.  If you
+do this, then you can still edit the commit message but
+‘git-commit-mode’ won't be used and you have to exit ‘emacs’ to finish
+the process.
+
+   Tautology ahead.  If you want to be able to use ‘emacsclient’ to
+connect to a running ‘emacs’ instance, even though no ‘emacs’ instance
+is running, then you cannot use ‘emacsclient’ directly.
+
+   Instead you have to create a script that does something like this:
+
+   Try to use ‘emacsclient’ (without using ‘--alternate-editor’).  If
+that succeeds, do nothing else.  Otherwise start ‘emacs &’ (and
+‘init.el’ must call ‘server-start’) and try to use ‘emacsclient’ again.
+
+A.2.12 Point ends up inside invisible text when jumping to a file-visiting buffer
+---------------------------------------------------------------------------------
+
+This can happen when you type ‘RET’ on a hunk to visit the respective
+file at the respective position.  One solution to this problem is to use
+‘global-reveal-mode’.  It makes sure that text around point is always
+visible.  If that is too drastic for your taste, then you may instead
+use ‘magit-diff-visit-file-hook’ to reveal the text, possibly using
+‘reveal-post-command’ or for Org buffers ‘org-reveal’.
+
+A.2.13 I am no longer able to save popup defaults
+-------------------------------------------------
+
+Magit used to use Magit-Popup to implement the transient popup menus.
+Now it used Transient instead, which is Magit-Popup's successor.
+
+   In the older Magit-Popup menus, it was possible to save user settings
+(e.g., setting the gpg signing key for commits) by using ‘C-c C-c’ in
+the popup buffer.  This would dismiss the popup, but save the settings
+as the defaults for future popups.
+
+   When switching to Transient menus, this functionality is now
+available via ‘C-x C-s’ instead; the ‘C-x’ prefix has other options as
+well when using Transient, which will be displayed when it is typed.
+See <https://docs.magit.vc/transient/Saving-Values.html#Saving-Values>
+for more details.
+
+
+File: magit.info,  Node: Debugging Tools,  Next: Keystroke Index,  Prev: FAQ,  Up: Top
+
+B Debugging Tools
+*****************
+
+Magit and its dependencies provide a few debugging tools, and we
+appreciate it very much if you use those tools before reporting an
+issue.  Please include all relevant output when reporting an issue.
+
+‘M-x magit-version’
+     This command shows the currently used versions of Magit, Git, and
+     Emacs in the echo area.  Non-interactively this just returns the
+     Magit version.
+
+‘M-x magit-emacs-Q-command’
+     This command shows a debugging shell command in the echo area and
+     adds it to the kill ring.  Paste that command into a shell and run
+     it.
+
+     This shell command starts ‘emacs’ with only ‘magit’ and its
+     dependencies loaded.  Neither your configuration nor other
+     installed packages are loaded.  This makes it easier to determine
+     whether some issue lays with Magit or something else.
+
+     If you run Magit from its Git repository, then you should be able
+     to use ‘make emacs-Q’ instead of the output of this command.
+
+‘M-x magit-toggle-git-debug’
+     This command toggles whether additional git errors are reported.
+
+     Magit basically calls git for one of these two reasons: for
+     side-effects or to do something with its standard output.
+
+     When git is run for side-effects then its output, including error
+     messages, go into the process buffer which is shown when using ‘$’.
+
+     When git's output is consumed in some way, then it would be too
+     expensive to also insert it into this buffer, but with this command
+     that can be enabled temporarily.  In that case, if git returns with
+     a non-zero exit status, then at least its standard error is
+     inserted into this buffer.
+
+     Also note that just because git exits with a non-zero status and
+     prints an error message, that usually doesn't mean that it is an
+     error as far as Magit is concerned, which is another reason we
+     usually hide these error messages.  Whether some error message is
+     relevant in the context of some unexpected behavior has to be
+     judged on a case by case basis.
+
+‘M-x magit-toggle-verbose-refresh’
+     This command toggles whether Magit refreshes buffers verbosely.
+     Enabling this helps figuring out which sections are bottlenecks.
+     The additional output can be found in the ‘*Messages*’ buffer.
+
+‘M-x magit-toggle-subprocess-record’
+     This command toggles whether subprocess invocations are recorded.
+
+     When enabled, all subprocesses started by ‘magit-process-file’ are
+     logged into the buffer specified by
+     ‘magit-process-record-buffer-name’ using the format
+     ‘magit-process-record-entry-format’.  This is for debugging
+     purposes.
+
+     This is in addition to and distinct from the default logging done
+     by default, and additional logging enabled with
+     ‘magit-toggle-git-debug’.
+
+‘M-x magit-debug-git-executable’
+     This command displays a buffer containing information about the
+     available and used ‘git’ executable(s), and can be useful when
+     investigating ‘exec-path’ issues.
+
+     Also see *note Git Executable::.
+
+‘M-x magit-profile-refresh-buffer’
+     This command profiles refreshing the current Magit buffer and then
+     displays the results.
+
+‘M-x magit-toggle-profiling’
+     This command starts profiling Magit and Forge, or if profiling is
+     already in progress, it instead stops that and displays the
+     results.
+
+‘M-x with-editor-debug’
+     This command displays a buffer containing information about the
+     available and used ‘emacsclient’ executable(s), and can be useful
+     when investigating why Magit (or rather ‘with-editor’) cannot find
+     an appropriate ‘emacsclient’ executable.
+
+     Also see *note (with-editor)Debugging::.
+
+Please also see *note FAQ::.
+
+
+File: magit.info,  Node: Keystroke Index,  Next: Function and Command Index,  Prev: Debugging Tools,  Up: Top
+
+Appendix C Keystroke Index
+**************************
+
+[index]
+* Menu:
+
+* -:                                     Logging.             (line 163)
+* - <1>:                                 Diffing.             (line 187)
+* ::                                     Running Git.         (line  99)
+* !:                                     Running Git.         (line  87)
+* ! !:                                   Running Git.         (line  91)
+* ! a:                                   Running Git.         (line 127)
+* ! b:                                   Running Git.         (line 130)
+* ! g:                                   Running Git.         (line 133)
+* ! k:                                   Running Git.         (line 124)
+* ! m:                                   Running Git.         (line 136)
+* ! p:                                   Running Git.         (line  99)
+* ! s:                                   Running Git.         (line 108)
+* ! S:                                   Running Git.         (line 112)
+* ^:                                     Sections.            (line  50)
+* +:                                     Logging.             (line 160)
+* + <1>:                                 Diffing.             (line 190)
+* =:                                     Logging.             (line 155)
+* >:                                     Sparse checkouts.    (line  17)
+* > a:                                   Sparse checkouts.    (line  39)
+* > d:                                   Sparse checkouts.    (line  50)
+* > e:                                   Sparse checkouts.    (line  21)
+* > r:                                   Sparse checkouts.    (line  44)
+* > s:                                   Sparse checkouts.    (line  33)
+* $:                                     Running Git.         (line  20)
+* 0:                                     Diffing.             (line 193)
+* 1:                                     Sections.            (line 173)
+* 2:                                     Sections.            (line 173)
+* 3:                                     Sections.            (line 173)
+* 4:                                     Sections.            (line 173)
+* 5:                                     Repository List.     (line 116)
+* a:                                     Applying.            (line  34)
+* A:                                     Cherry Picking.      (line   9)
+* A A:                                   Cherry Picking.      (line  17)
+* A a:                                   Cherry Picking.      (line  23)
+* A A <1>:                               Cherry Picking.      (line  85)
+* A a <1>:                               Cherry Picking.      (line  91)
+* A d:                                   Cherry Picking.      (line  51)
+* A h:                                   Cherry Picking.      (line  40)
+* A n:                                   Cherry Picking.      (line  62)
+* A s:                                   Cherry Picking.      (line  72)
+* A s <1>:                               Cherry Picking.      (line  88)
+* B:                                     Bisecting.           (line   9)
+* b:                                     Blaming.             (line 115)
+* b <1>:                                 Branching.           (line  63)
+* b <2>:                                 Rebasing.            (line 216)
+* B B:                                   Bisecting.           (line  16)
+* B b:                                   Bisecting.           (line  38)
+* b b:                                   Branching.           (line  97)
+* b C:                                   Branching.           (line  81)
+* b c:                                   Branching.           (line 113)
+* B g:                                   Bisecting.           (line  42)
+* B k:                                   Bisecting.           (line  52)
+* b k:                                   Branching.           (line 188)
+* b l:                                   Branching.           (line 119)
+* B m:                                   Bisecting.           (line  46)
+* b m:                                   Branching.           (line 199)
+* b n:                                   Branching.           (line 104)
+* B r:                                   Bisecting.           (line  57)
+* b r:                                   Branching.           (line 204)
+* B s:                                   Bisecting.           (line  32)
+* b s:                                   Branching.           (line 141)
+* b S:                                   Branching.           (line 168)
+* b x:                                   Branching.           (line 173)
+* c:                                     Blaming.             (line 141)
+* C:                                     Cloning Repository.  (line  20)
+* c <1>:                                 Committing.          (line  21)
+* c <2>:                                 Rebasing.            (line 205)
+* C >:                                   Cloning Repository.  (line  38)
+* c a:                                   Committing.          (line  59)
+* c A:                                   Committing.          (line 141)
+* C b:                                   Cloning Repository.  (line  44)
+* C C:                                   Cloning Repository.  (line  28)
+* c c:                                   Committing.          (line  29)
+* C d:                                   Cloning Repository.  (line  55)
+* C e:                                   Cloning Repository.  (line  61)
+* c e:                                   Committing.          (line  45)
+* c f:                                   Committing.          (line 119)
+* c F:                                   Committing.          (line 192)
+* C m:                                   Cloning Repository.  (line  48)
+* c n:                                   Committing.          (line 153)
+* C s:                                   Cloning Repository.  (line  32)
+* c s:                                   Committing.          (line 130)
+* c S:                                   Committing.          (line 204)
+* c w:                                   Committing.          (line  65)
+* c W:                                   Committing.          (line 167)
+* C-<return>:                            Visiting Files and Blobs.
+                                                              (line  64)
+* C-<tab>:                               Sections.            (line 148)
+* C-c C-a:                               Committing.          (line 415)
+* C-c C-b:                               Logging.             (line 116)
+* C-c C-b <1>:                           Diffing.             (line 209)
+* C-c C-c:                               Logging.             (line 297)
+* C-c C-c <1>:                           Committing.          (line 303)
+* C-c C-c <2>:                           Rebasing.            (line 128)
+* C-c C-d:                               Diffing.             (line 200)
+* C-c C-d <1>:                           Committing.          (line 339)
+* C-c C-e:                               Diffing.             (line 235)
+* C-c C-f:                               Logging.             (line 119)
+* C-c C-f <1>:                           Diffing.             (line 212)
+* C-c C-i:                               Committing.          (line 412)
+* C-c C-k:                               Logging.             (line 302)
+* C-c C-k <1>:                           Committing.          (line 307)
+* C-c C-k <2>:                           Rebasing.            (line 132)
+* C-c C-n:                               Logging.             (line 122)
+* C-c C-o:                               Committing.          (line 427)
+* C-c C-p:                               Committing.          (line 430)
+* C-c C-r:                               Committing.          (line 418)
+* C-c C-s:                               Committing.          (line 421)
+* C-c C-t:                               Diffing.             (line 226)
+* C-c C-t <1>:                           Committing.          (line 424)
+* C-c C-w:                               Committing.          (line 347)
+* C-c f:                                 Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f , c:                             Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f , k:                             Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f , r:                             Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f , x:                             Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f B:                               Blaming.             (line  28)
+* C-c f b:                               Blaming.             (line  28)
+* C-c f B <1>:                           Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f b <1>:                           Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f B b:                             Blaming.             (line  28)
+* C-c f B e:                             Blaming.             (line  28)
+* C-c f B f:                             Blaming.             (line  28)
+* C-c f B q:                             Blaming.             (line  28)
+* C-c f B r:                             Blaming.             (line  28)
+* C-c f c:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f D:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f d:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f e:                               Blaming.             (line  28)
+* C-c f e <1>:                           Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f f:                               Blaming.             (line  28)
+* C-c f f <1>:                           Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f g:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f G:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f L:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f l:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f M:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f m:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f n:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f p:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f q:                               Blaming.             (line  28)
+* C-c f q <1>:                           Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f r:                               Blaming.             (line  28)
+* C-c f r <1>:                           Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f s:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f s <1>:                           Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f t:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f u:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f u <1>:                           Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f v:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c f V:                               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* C-c g:                                 Transient Commands.  (line  20)
+* C-c M-g:                               Commands for Buffers Visiting Files.
+                                                              (line  58)
+* C-c M-g , c:                           Commands for Buffers Visiting Files.
+                                                              (line  86)
+* C-c M-g , k:                           Commands for Buffers Visiting Files.
+                                                              (line  82)
+* C-c M-g , r:                           Commands for Buffers Visiting Files.
+                                                              (line  78)
+* C-c M-g , x:                           Commands for Buffers Visiting Files.
+                                                              (line  74)
+* C-c M-g B:                             Blaming.             (line  34)
+* C-c M-g b:                             Blaming.             (line  45)
+* C-c M-g B <1>:                         Commands for Buffers Visiting Files.
+                                                              (line 144)
+* C-c M-g B b:                           Blaming.             (line  45)
+* C-c M-g B e:                           Blaming.             (line  76)
+* C-c M-g B f:                           Blaming.             (line  68)
+* C-c M-g B q:                           Blaming.             (line  87)
+* C-c M-g B r:                           Blaming.             (line  60)
+* C-c M-g c:                             Commands for Buffers Visiting Files.
+                                                              (line 186)
+* C-c M-g D:                             Commands for Buffers Visiting Files.
+                                                              (line  91)
+* C-c M-g d:                             Commands for Buffers Visiting Files.
+                                                              (line 101)
+* C-c M-g e:                             Blaming.             (line  76)
+* C-c M-g e <1>:                         Commands for Buffers Visiting Files.
+                                                              (line 192)
+* C-c M-g f:                             Blaming.             (line  68)
+* C-c M-g g:                             Commands for Buffers Visiting Files.
+                                                              (line 173)
+* C-c M-g G:                             Commands for Buffers Visiting Files.
+                                                              (line 182)
+* C-c M-g L:                             Commands for Buffers Visiting Files.
+                                                              (line 116)
+* C-c M-g l:                             Commands for Buffers Visiting Files.
+                                                              (line 126)
+* C-c M-g M:                             Commands for Buffers Visiting Files.
+                                                              (line 139)
+* C-c M-g n:                             Commands for Buffers Visiting Files.
+                                                              (line 160)
+* C-c M-g p:                             Commands for Buffers Visiting Files.
+                                                              (line 156)
+* C-c M-g q:                             Blaming.             (line  87)
+* C-c M-g r:                             Blaming.             (line  60)
+* C-c M-g s:                             Commands for Buffers Visiting Files.
+                                                              (line  63)
+* C-c M-g s <1>:                         Commands for Buffers Visiting Files.
+                                                              (line  63)
+* C-c M-g t:                             Commands for Buffers Visiting Files.
+                                                              (line 136)
+* C-c M-g u:                             Commands for Buffers Visiting Files.
+                                                              (line  69)
+* C-c M-g u <1>:                         Commands for Buffers Visiting Files.
+                                                              (line  69)
+* C-c M-g v:                             Commands for Buffers Visiting Files.
+                                                              (line 163)
+* C-c M-g V:                             Commands for Buffers Visiting Files.
+                                                              (line 167)
+* C-c M-i:                               Committing.          (line 434)
+* C-c M-s:                               Committing.          (line 318)
+* C-c TAB:                               Sections.            (line 148)
+* C-w:                                   Common Commands.     (line  22)
+* C-x g:                                 Status Buffer.       (line  23)
+* C-x M-g:                               Transient Commands.  (line  20)
+* C-x u:                                 Rebasing.            (line 223)
+* d:                                     Diffing.             (line  22)
+* D:                                     Diffing.             (line 105)
+* d c:                                   Diffing.             (line  82)
+* d d:                                   Diffing.             (line  27)
+* D f:                                   Diffing.             (line 170)
+* D F:                                   Diffing.             (line 174)
+* D g:                                   Diffing.             (line 110)
+* d p:                                   Diffing.             (line  75)
+* d r:                                   Diffing.             (line  49)
+* D r:                                   Diffing.             (line 166)
+* d s:                                   Diffing.             (line  67)
+* D s:                                   Diffing.             (line 114)
+* d t:                                   Diffing.             (line  86)
+* D t:                                   Diffing.             (line 127)
+* D T:                                   Diffing.             (line 146)
+* d u:                                   Diffing.             (line  72)
+* d w:                                   Diffing.             (line  62)
+* D w:                                   Diffing.             (line 120)
+* DEL:                                   Logging.             (line 146)
+* DEL <1>:                               Diffing.             (line 267)
+* DEL <2>:                               Blaming.             (line 103)
+* DEL <3>:                               Rebasing.            (line 146)
+* e:                                     Ediffing.            (line  10)
+* E:                                     Ediffing.            (line  21)
+* e <1>:                                 Rebasing.            (line 167)
+* E c:                                   Ediffing.            (line 100)
+* E i:                                   Ediffing.            (line  94)
+* E m:                                   Ediffing.            (line  33)
+* E M:                                   Ediffing.            (line  48)
+* E r:                                   Ediffing.            (line  25)
+* E s:                                   Ediffing.            (line  87)
+* E t:                                   Ediffing.            (line  79)
+* E u:                                   Ediffing.            (line  91)
+* E w:                                   Ediffing.            (line  97)
+* E z:                                   Ediffing.            (line 103)
+* f:                                     Repository List.     (line 112)
+* f <1>:                                 Rebasing.            (line 184)
+* F:                                     Rebasing.            (line 189)
+* f <2>:                                 Fetching.            (line  10)
+* F <1>:                                 Pulling.             (line  10)
+* f a:                                   Fetching.            (line  45)
+* f C:                                   Branching.           (line  81)
+* F C:                                   Branching.           (line  81)
+* f e:                                   Fetching.            (line  34)
+* F e:                                   Pulling.             (line  28)
+* f m:                                   Fetching.            (line  48)
+* f o:                                   Fetching.            (line  37)
+* f p:                                   Fetching.            (line  15)
+* F p:                                   Pulling.             (line  14)
+* f r:                                   Fetching.            (line  41)
+* f u:                                   Fetching.            (line  22)
+* F u:                                   Pulling.             (line  21)
+* F U:                                   Pulling.             (line  34)
+* g:                                     Modes and Buffers.   (line 265)
+* G:                                     Modes and Buffers.   (line 273)
+* H:                                     Sections.            (line 350)
+* I:                                     Creating Repository. (line   7)
+* j:                                     Logging.             (line 127)
+* j <1>:                                 Diffing.             (line 254)
+* k:                                     Running Git.         (line  27)
+* k <1>:                                 Applying.            (line  40)
+* k <2>:                                 Rebasing.            (line 201)
+* k <3>:                                 Stashing.            (line 114)
+* l:                                     Logging.             (line  28)
+* L:                                     Logging.             (line  75)
+* L <1>:                                 Logging.             (line 103)
+* L <2>:                                 Logging.             (line 263)
+* l <1>:                                 Rebasing.            (line 240)
+* l a:                                   Logging.             (line  59)
+* l b:                                   Logging.             (line  56)
+* L d:                                   Logging.             (line 277)
+* L g:                                   Logging.             (line  80)
+* l h:                                   Logging.             (line  38)
+* l H:                                   Logging.             (line 342)
+* l l:                                   Logging.             (line  33)
+* l L:                                   Logging.             (line  53)
+* L L:                                   Logging.             (line  97)
+* L L <1>:                               Logging.             (line 271)
+* L l:                                   Logging.             (line 274)
+* l o:                                   Logging.             (line  47)
+* l O:                                   Logging.             (line 339)
+* l r:                                   Logging.             (line 336)
+* L s:                                   Logging.             (line  84)
+* l u:                                   Logging.             (line  41)
+* L w:                                   Logging.             (line  90)
+* m:                                     Repository List.     (line 106)
+* m <1>:                                 Merging.             (line  10)
+* M:                                     Remotes.             (line  17)
+* m a:                                   Merging.             (line  46)
+* m a <1>:                               Merging.             (line  97)
+* M a:                                   Remotes.             (line  51)
+* M C:                                   Remotes.             (line  35)
+* m d:                                   Merging.             (line  60)
+* m e:                                   Merging.             (line  32)
+* M k:                                   Remotes.             (line  63)
+* m m:                                   Merging.             (line  18)
+* m m <1>:                               Merging.             (line  92)
+* m n:                                   Merging.             (line  40)
+* m p:                                   Merging.             (line  81)
+* M p:                                   Remotes.             (line  66)
+* M P:                                   Remotes.             (line  70)
+* M r:                                   Remotes.             (line  55)
+* m s:                                   Merging.             (line  73)
+* M u:                                   Remotes.             (line  59)
+* M-<tab>:                               Sections.            (line 163)
+* M-1:                                   Sections.            (line 179)
+* M-2:                                   Sections.            (line 179)
+* M-3:                                   Sections.            (line 179)
+* M-4:                                   Sections.            (line 179)
+* M-n:                                   Sections.            (line  46)
+* M-n <1>:                               Committing.          (line 326)
+* M-n <2>:                               Rebasing.            (line 161)
+* M-p:                                   Sections.            (line  41)
+* M-p <1>:                               Committing.          (line 321)
+* M-p <2>:                               Rebasing.            (line 158)
+* M-w:                                   Blaming.             (line 134)
+* M-w <1>:                               Common Commands.     (line  39)
+* magit-run-hooks-from-githooks:         Running Git.         (line 225)
+* magit-user-githook-file:               Running Git.         (line 230)
+* MM:                                    Rebasing.            (line 248)
+* Mt:                                    Rebasing.            (line 254)
+* n:                                     Sections.            (line  38)
+* n <1>:                                 Blaming.             (line 118)
+* N:                                     Blaming.             (line 121)
+* n <2>:                                 Rebasing.            (line 155)
+* n <3>:                                 Minor Mode for Buffers Visiting Blobs.
+                                                              (line  17)
+* o:                                     Submodules.          (line  56)
+* O:                                     Subtree.             (line   9)
+* o a:                                   Submodules.          (line  69)
+* o d:                                   Submodules.          (line  94)
+* O e:                                   Subtree.             (line  37)
+* O e p:                                 Subtree.             (line  48)
+* O e s:                                 Subtree.             (line  52)
+* o f:                                   Submodules.          (line 100)
+* O i:                                   Subtree.             (line  13)
+* O i a:                                 Subtree.             (line  24)
+* O i c:                                 Subtree.             (line  28)
+* O i f:                                 Subtree.             (line  34)
+* O i m:                                 Subtree.             (line  31)
+* o l:                                   Submodules.          (line  97)
+* o p:                                   Submodules.          (line  81)
+* o r:                                   Submodules.          (line  75)
+* o s:                                   Submodules.          (line  89)
+* o u:                                   Submodules.          (line  85)
+* p:                                     Sections.            (line  33)
+* p <1>:                                 Blaming.             (line 124)
+* P:                                     Blaming.             (line 127)
+* p <2>:                                 Rebasing.            (line 152)
+* P <1>:                                 Pushing.             (line  10)
+* p <3>:                                 Minor Mode for Buffers Visiting Blobs.
+                                                              (line  13)
+* P C:                                   Branching.           (line  81)
+* P e:                                   Pushing.             (line  29)
+* P m:                                   Pushing.             (line  45)
+* P o:                                   Pushing.             (line  33)
+* P p:                                   Pushing.             (line  15)
+* P r:                                   Pushing.             (line  37)
+* P t:                                   Pushing.             (line  52)
+* P T:                                   Pushing.             (line  59)
+* P u:                                   Pushing.             (line  22)
+* q:                                     Modes and Buffers.   (line 206)
+* q <1>:                                 Logging.             (line 110)
+* q <2>:                                 Blaming.             (line 130)
+* q <3>:                                 Minor Mode for Buffers Visiting Blobs.
+                                                              (line  20)
+* r:                                     Rebasing.            (line  10)
+* r <1>:                                 Rebasing.            (line 164)
+* r a:                                   Rebasing.            (line 121)
+* r e:                                   Rebasing.            (line  42)
+* r e <1>:                               Rebasing.            (line 117)
+* r f:                                   Rebasing.            (line  84)
+* r i:                                   Rebasing.            (line  81)
+* r k:                                   Rebasing.            (line 101)
+* r m:                                   Rebasing.            (line  93)
+* r p:                                   Rebasing.            (line  28)
+* r r:                                   Rebasing.            (line 107)
+* r s:                                   Rebasing.            (line  47)
+* r s <1>:                               Rebasing.            (line 113)
+* r u:                                   Rebasing.            (line  35)
+* r w:                                   Rebasing.            (line  97)
+* RET:                                   Repository List.     (line 103)
+* RET <1>:                               References Buffer.   (line 159)
+* RET <2>:                               Visiting Files and Blobs.
+                                                              (line  41)
+* RET <3>:                               Blaming.             (line  91)
+* RET <4>:                               Rebasing.            (line 136)
+* s:                                     Staging and Unstaging.
+                                                              (line  29)
+* S:                                     Staging and Unstaging.
+                                                              (line  36)
+* s <1>:                                 Rebasing.            (line 170)
+* S <1>:                                 Rebasing.            (line 175)
+* S-<tab>:                               Sections.            (line 167)
+* SPC:                                   Logging.             (line 137)
+* SPC <1>:                               Diffing.             (line 264)
+* SPC <2>:                               Blaming.             (line  94)
+* SPC <3>:                               Rebasing.            (line 140)
+* t:                                     Rebasing.            (line 243)
+* t <1>:                                 Tagging.             (line   9)
+* T:                                     Notes.               (line   9)
+* T a:                                   Notes.               (line  47)
+* T c:                                   Notes.               (line  43)
+* t k:                                   Tagging.             (line  37)
+* T m:                                   Notes.               (line  35)
+* t p:                                   Tagging.             (line  43)
+* T p:                                   Notes.               (line  28)
+* t r:                                   Tagging.             (line  18)
+* T r:                                   Notes.               (line  21)
+* t t:                                   Tagging.             (line  14)
+* T T:                                   Notes.               (line  14)
+* TAB:                                   Sections.            (line 144)
+* u:                                     Repository List.     (line 109)
+* u <1>:                                 Staging and Unstaging.
+                                                              (line  42)
+* U:                                     Staging and Unstaging.
+                                                              (line  50)
+* v:                                     Applying.            (line  47)
+* V:                                     Cherry Picking.      (line  98)
+* V a:                                   Cherry Picking.      (line 126)
+* V s:                                   Cherry Picking.      (line 123)
+* V V:                                   Cherry Picking.      (line 106)
+* V v:                                   Cherry Picking.      (line 111)
+* V V <1>:                               Cherry Picking.      (line 120)
+* W:                                     Plain Patches.       (line   7)
+* w:                                     Maildir Patches.     (line   9)
+* w a:                                   Plain Patches.       (line  20)
+* w a <1>:                               Maildir Patches.     (line  23)
+* w a <2>:                               Maildir Patches.     (line  38)
+* W c:                                   Plain Patches.       (line  12)
+* w m:                                   Maildir Patches.     (line  20)
+* W s:                                   Plain Patches.       (line  26)
+* w s:                                   Maildir Patches.     (line  34)
+* w w:                                   Maildir Patches.     (line  14)
+* w w <1>:                               Maildir Patches.     (line  31)
+* x:                                     Rebasing.            (line 208)
+* x <1>:                                 Resetting.           (line   9)
+* X f:                                   Resetting.           (line  44)
+* X h:                                   Resetting.           (line  24)
+* X i:                                   Resetting.           (line  33)
+* X k:                                   Resetting.           (line  28)
+* X m:                                   Resetting.           (line  15)
+* X s:                                   Resetting.           (line  19)
+* X w:                                   Resetting.           (line  39)
+* X w <1>:                               Wip Modes.           (line  59)
+* Y:                                     Logging.             (line 382)
+* y:                                     References Buffer.   (line   7)
+* y <1>:                                 Rebasing.            (line 220)
+* y c:                                   References Buffer.   (line  25)
+* y o:                                   References Buffer.   (line  30)
+* y r:                                   References Buffer.   (line  34)
+* y y:                                   References Buffer.   (line  21)
+* z:                                     Stashing.            (line   9)
+* Z:                                     Worktree.            (line   9)
+* z a:                                   Stashing.            (line  52)
+* z b:                                   Stashing.            (line 101)
+* z B:                                   Stashing.            (line 106)
+* Z b:                                   Worktree.            (line  13)
+* Z c:                                   Worktree.            (line  16)
+* z f:                                   Stashing.            (line 111)
+* Z g:                                   Worktree.            (line  26)
+* z i:                                   Stashing.            (line  20)
+* z I:                                   Stashing.            (line  42)
+* z k:                                   Stashing.            (line  94)
+* Z k:                                   Worktree.            (line  22)
+* z l:                                   Stashing.            (line 117)
+* Z m:                                   Worktree.            (line  19)
+* z p:                                   Stashing.            (line  72)
+* z v:                                   Stashing.            (line  98)
+* z w:                                   Stashing.            (line  24)
+* z W:                                   Stashing.            (line  46)
+* z x:                                   Stashing.            (line  30)
+* z z:                                   Stashing.            (line  14)
+* z Z:                                   Stashing.            (line  36)
+
+
+File: magit.info,  Node: Function and Command Index,  Next: Variable Index,  Prev: Keystroke Index,  Up: Top
+
+Appendix D Function and Command Index
+*************************************
+
+[index]
+* Menu:
+
+* bug-reference-mode:                    Committing.          (line 481)
+* forward-line:                          Rebasing.            (line 155)
+* git-commit-ack:                        Committing.          (line 415)
+* git-commit-cc:                         Committing.          (line 427)
+* git-commit-check-style-conventions:    Committing.          (line 533)
+* git-commit-insert-pseudo-header:       Committing.          (line 412)
+* git-commit-next-message:               Committing.          (line 326)
+* git-commit-prev-message:               Committing.          (line 321)
+* git-commit-propertize-diff:            Committing.          (line 473)
+* git-commit-reported:                   Committing.          (line 430)
+* git-commit-review:                     Committing.          (line 418)
+* git-commit-save-message:               Committing.          (line 318)
+* git-commit-save-message <1>:           Committing.          (line 459)
+* git-commit-setup-changelog-support:    Committing.          (line 462)
+* git-commit-signoff:                    Committing.          (line 421)
+* git-commit-suggested:                  Committing.          (line 434)
+* git-commit-test:                       Committing.          (line 424)
+* git-commit-turn-on-auto-fill:          Committing.          (line 466)
+* git-commit-turn-on-flyspell:           Committing.          (line 469)
+* git-rebase-alter:                      Rebasing.            (line 189)
+* git-rebase-backward-line:              Rebasing.            (line 152)
+* git-rebase-break:                      Rebasing.            (line 216)
+* git-rebase-edit:                       Rebasing.            (line 167)
+* git-rebase-exec:                       Rebasing.            (line 208)
+* git-rebase-fixup:                      Rebasing.            (line 184)
+* git-rebase-insert:                     Rebasing.            (line 220)
+* git-rebase-kill-line:                  Rebasing.            (line 201)
+* git-rebase-label:                      Rebasing.            (line 240)
+* git-rebase-merge:                      Rebasing.            (line 248)
+* git-rebase-merge-toggle-editmsg:       Rebasing.            (line 254)
+* git-rebase-move-line-down:             Rebasing.            (line 161)
+* git-rebase-move-line-up:               Rebasing.            (line 158)
+* git-rebase-pick:                       Rebasing.            (line 205)
+* git-rebase-reset:                      Rebasing.            (line 243)
+* git-rebase-reword:                     Rebasing.            (line 164)
+* git-rebase-show-commit:                Rebasing.            (line 136)
+* git-rebase-show-or-scroll-down:        Rebasing.            (line 146)
+* git-rebase-show-or-scroll-up:          Rebasing.            (line 140)
+* git-rebase-squash:                     Rebasing.            (line 170)
+* git-rebase-squish:                     Rebasing.            (line 175)
+* git-rebase-undo:                       Rebasing.            (line 223)
+* magit-add-section-hook:                Sections.            (line 310)
+* magit-after-save-refresh-status:       Modes and Buffers.   (line 294)
+* magit-am:                              Maildir Patches.     (line   9)
+* magit-am-abort:                        Maildir Patches.     (line  38)
+* magit-am-apply-maildir:                Maildir Patches.     (line  20)
+* magit-am-apply-patches:                Maildir Patches.     (line  14)
+* magit-am-continue:                     Maildir Patches.     (line  31)
+* magit-am-skip:                         Maildir Patches.     (line  34)
+* magit-apply:                           Applying.            (line  34)
+* magit-bisect:                          Bisecting.           (line   9)
+* magit-bisect-bad:                      Bisecting.           (line  38)
+* magit-bisect-good:                     Bisecting.           (line  42)
+* magit-bisect-mark:                     Bisecting.           (line  46)
+* magit-bisect-reset:                    Bisecting.           (line  57)
+* magit-bisect-run:                      Bisecting.           (line  32)
+* magit-bisect-skip:                     Bisecting.           (line  52)
+* magit-bisect-start:                    Bisecting.           (line  16)
+* magit-blame:                           Blaming.             (line  28)
+* magit-blame <1>:                       Blaming.             (line  34)
+* magit-blame <2>:                       Blaming.             (line 115)
+* magit-blame <3>:                       Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-blame <4>:                       Commands for Buffers Visiting Files.
+                                                              (line 144)
+* magit-blame-addition:                  Blaming.             (line  28)
+* magit-blame-addition <1>:              Blaming.             (line  45)
+* magit-blame-additions:                 Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-blame-copy-hash:                 Blaming.             (line 134)
+* magit-blame-cycle-style:               Blaming.             (line 141)
+* magit-blame-echo:                      Blaming.             (line  28)
+* magit-blame-echo <1>:                  Blaming.             (line  76)
+* magit-blame-echo <2>:                  Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-blame-next-chunk:                Blaming.             (line 118)
+* magit-blame-next-chunk-same-commit:    Blaming.             (line 121)
+* magit-blame-previous-chunk:            Blaming.             (line 124)
+* magit-blame-previous-chunk-same-commit: Blaming.            (line 127)
+* magit-blame-quit:                      Blaming.             (line  28)
+* magit-blame-quit <1>:                  Blaming.             (line  87)
+* magit-blame-quit <2>:                  Blaming.             (line 130)
+* magit-blame-quit <3>:                  Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-blame-removal:                   Blaming.             (line  28)
+* magit-blame-removal <1>:               Blaming.             (line  60)
+* magit-blame-removal <2>:               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-blame-reverse:                   Blaming.             (line  28)
+* magit-blame-reverse <1>:               Blaming.             (line  68)
+* magit-blame-reverse <2>:               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-blob-next:                       Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-blob-next <1>:                   Commands for Buffers Visiting Files.
+                                                              (line 160)
+* magit-blob-next <2>:                   Minor Mode for Buffers Visiting Blobs.
+                                                              (line  17)
+* magit-blob-previous:                   Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-blob-previous <1>:               Commands for Buffers Visiting Files.
+                                                              (line 156)
+* magit-blob-previous <2>:               Minor Mode for Buffers Visiting Blobs.
+                                                              (line  13)
+* magit-blob-visit-file:                 Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-blob-visit-file <1>:             Commands for Buffers Visiting Files.
+                                                              (line 167)
+* magit-branch:                          Branching.           (line  63)
+* magit-branch-and-checkout:             Branching.           (line 113)
+* magit-branch-checkout:                 Branching.           (line 119)
+* magit-branch-configure:                Branching.           (line  81)
+* magit-branch-create:                   Branching.           (line 104)
+* magit-branch-delete:                   Branching.           (line 188)
+* magit-branch-or-checkout:              Branching.           (line 325)
+* magit-branch-orphan:                   Branching.           (line 321)
+* magit-branch-rename:                   Branching.           (line 199)
+* magit-branch-reset:                    Branching.           (line 173)
+* magit-branch-shelve:                   Branching.           (line 465)
+* magit-branch-spinoff:                  Branching.           (line 141)
+* magit-branch-spinout:                  Branching.           (line 168)
+* magit-branch-unshelve:                 Branching.           (line 475)
+* magit-builtin-completing-read:         Completion Confirmation and the Selection.
+                                                              (line 354)
+* magit-bundle:                          Bundle.              (line   8)
+* magit-bury-or-kill-buffer:             Minor Mode for Buffers Visiting Blobs.
+                                                              (line  20)
+* magit-call-git:                        Calling Git.         (line 138)
+* magit-call-process:                    Calling Git.         (line 141)
+* magit-cancel-section:                  Section Plumbing.    (line  73)
+* magit-checkout:                        Branching.           (line  97)
+* magit-checkout-remote-ref:             Branching.           (line 204)
+* magit-cherry:                          Logging.             (line 382)
+* magit-cherry-apply:                    Cherry Picking.      (line  23)
+* magit-cherry-copy:                     Cherry Picking.      (line  17)
+* magit-cherry-donate:                   Cherry Picking.      (line  51)
+* magit-cherry-harvest:                  Cherry Picking.      (line  40)
+* magit-cherry-pick:                     Cherry Picking.      (line   9)
+* magit-cherry-spinoff:                  Cherry Picking.      (line  72)
+* magit-cherry-spinout:                  Cherry Picking.      (line  62)
+* magit-clone:                           Cloning Repository.  (line  20)
+* magit-clone-bare:                      Cloning Repository.  (line  44)
+* magit-clone-mirror:                    Cloning Repository.  (line  48)
+* magit-clone-regular:                   Cloning Repository.  (line  28)
+* magit-clone-shallow:                   Cloning Repository.  (line  32)
+* magit-clone-shallow-exclude:           Cloning Repository.  (line  61)
+* magit-clone-shallow-since:             Cloning Repository.  (line  55)
+* magit-clone-sparse:                    Cloning Repository.  (line  38)
+* magit-commit:                          Committing.          (line  21)
+* magit-commit <1>:                      Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-commit <2>:                      Commands for Buffers Visiting Files.
+                                                              (line 186)
+* magit-commit-alter:                    Committing.          (line 141)
+* magit-commit-amend:                    Committing.          (line  59)
+* magit-commit-augment:                  Committing.          (line 153)
+* magit-commit-create:                   Committing.          (line  29)
+* magit-commit-extend:                   Committing.          (line  45)
+* magit-commit-fixup:                    Committing.          (line 119)
+* magit-commit-instant-fixup:            Committing.          (line 192)
+* magit-commit-instant-squash:           Committing.          (line 204)
+* magit-commit-revise:                   Committing.          (line 167)
+* magit-commit-reword:                   Committing.          (line  65)
+* magit-commit-squash:                   Committing.          (line 130)
+* magit-completing-read:                 Completion Confirmation and the Selection.
+                                                              (line 359)
+* magit-copy-buffer-revision:            Common Commands.     (line  39)
+* magit-copy-diff-as-kill:               Applying.            (line  55)
+* magit-copy-section-value:              Common Commands.     (line  22)
+* magit-current-section:                 Section Plumbing.    (line  85)
+* magit-cycle-margin-style:              Logging.             (line 274)
+* magit-debug-git-executable:            Running Git.         (line 193)
+* magit-debug-git-executable <1>:        Debugging Tools.     (line  69)
+* magit-define-section-jumper:           Section Plumbing.    (line  78)
+* magit-describe-section:                Sections.            (line 350)
+* magit-describe-section-briefly:        Sections.            (line 353)
+* magit-describe-section-briefly <1>:    Section Plumbing.    (line 124)
+* magit-diff:                            Diffing.             (line  22)
+* magit-diff <1>:                        Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-diff <2>:                        Commands for Buffers Visiting Files.
+                                                              (line  91)
+* magit-diff-buffer-file:                Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-diff-buffer-file <1>:            Commands for Buffers Visiting Files.
+                                                              (line 101)
+* magit-diff-default-context:            Diffing.             (line 193)
+* magit-diff-dwim:                       Diffing.             (line  27)
+* magit-diff-edit-hunk-commit:           Diffing.             (line 235)
+* magit-diff-flip-revs:                  Diffing.             (line 170)
+* magit-diff-less-context:               Diffing.             (line 187)
+* magit-diff-more-context:               Diffing.             (line 190)
+* magit-diff-paths:                      Diffing.             (line  75)
+* magit-diff-range:                      Diffing.             (line  49)
+* magit-diff-refresh:                    Diffing.             (line 105)
+* magit-diff-refresh <1>:                Diffing.             (line 110)
+* magit-diff-save-default-arguments:     Diffing.             (line 120)
+* magit-diff-scope:                      Section Plumbing.    (line 228)
+* magit-diff-set-default-arguments:      Diffing.             (line 114)
+* magit-diff-show-or-scroll-down:        Logging.             (line 146)
+* magit-diff-show-or-scroll-down <1>:    Blaming.             (line 103)
+* magit-diff-show-or-scroll-up:          Logging.             (line 137)
+* magit-diff-show-or-scroll-up <1>:      Blaming.             (line  94)
+* magit-diff-staged:                     Diffing.             (line  67)
+* magit-diff-switch-range-type:          Diffing.             (line 166)
+* magit-diff-toggle-file-filter:         Diffing.             (line 174)
+* magit-diff-toggle-fontify-hunk:        Diffing.             (line 146)
+* magit-diff-toggle-refine-hunk:         Diffing.             (line 127)
+* magit-diff-trace-definition:           Diffing.             (line 226)
+* magit-diff-type:                       Section Plumbing.    (line 206)
+* magit-diff-unstaged:                   Diffing.             (line  72)
+* magit-diff-visit-file:                 Visiting Files and Blobs.
+                                                              (line  41)
+* magit-diff-visit-file-other-frame:     Visiting Files and Blobs.
+                                                              (line  85)
+* magit-diff-visit-file-other-window:    Visiting Files and Blobs.
+                                                              (line  84)
+* magit-diff-visit-worktree-file:        Visiting Files and Blobs.
+                                                              (line  64)
+* magit-diff-visit-worktree-file-other-frame: Visiting Files and Blobs.
+                                                              (line  87)
+* magit-diff-visit-worktree-file-other-window: Visiting Files and Blobs.
+                                                              (line  86)
+* magit-diff-while-committing:           Diffing.             (line 200)
+* magit-diff-while-committing <1>:       Committing.          (line 339)
+* magit-diff-working-tree:               Diffing.             (line  62)
+* magit-disable-section-inserter:        Per-Repository Configuration.
+                                                              (line  31)
+* magit-discard:                         Applying.            (line  40)
+* magit-dispatch:                        Transient Commands.  (line  20)
+* magit-display-buffer:                  Modes and Buffers.   (line  38)
+* magit-display-buffer-fullcolumn-most-v1: Modes and Buffers. (line 100)
+* magit-display-buffer-fullframe-status-topleft-v1: Modes and Buffers.
+                                                              (line  91)
+* magit-display-buffer-fullframe-status-v1: Modes and Buffers.
+                                                              (line  86)
+* magit-display-buffer-same-window-except-diff-v1: Modes and Buffers.
+                                                              (line  81)
+* magit-display-buffer-traditional:      Modes and Buffers.   (line  74)
+* magit-display-repository-buffer:       Common Commands.     (line   9)
+* magit-display-repository-buffer <1>:   Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-display-repository-buffer <2>:   Commands for Buffers Visiting Files.
+                                                              (line 182)
+* magit-ediff:                           Ediffing.            (line  21)
+* magit-ediff-compare:                   Ediffing.            (line  25)
+* magit-ediff-dwim:                      Ediffing.            (line  10)
+* magit-ediff-resolve-all:               Ediffing.            (line  48)
+* magit-ediff-resolve-rest:              Ediffing.            (line  33)
+* magit-ediff-show-commit:               Ediffing.            (line 100)
+* magit-ediff-show-staged:               Ediffing.            (line  94)
+* magit-ediff-show-stash:                Ediffing.            (line 103)
+* magit-ediff-show-unstaged:             Ediffing.            (line  91)
+* magit-ediff-show-working-tree:         Ediffing.            (line  97)
+* magit-ediff-stage:                     Ediffing.            (line  87)
+* magit-edit-line-commit:                Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-edit-line-commit <1>:            Commands for Buffers Visiting Files.
+                                                              (line 192)
+* magit-emacs-Q-command:                 Debugging Tools.     (line  16)
+* magit-fetch:                           Fetching.            (line  10)
+* magit-fetch-all:                       Fetching.            (line  45)
+* magit-fetch-branch:                    Fetching.            (line  37)
+* magit-fetch-from-pushremote:           Fetching.            (line  15)
+* magit-fetch-from-upstream:             Fetching.            (line  22)
+* magit-fetch-modules:                   Fetching.            (line  48)
+* magit-fetch-modules <1>:               Submodules.          (line 100)
+* magit-fetch-other:                     Fetching.            (line  34)
+* magit-fetch-refspec:                   Fetching.            (line  41)
+* magit-file-checkout:                   Resetting.           (line  44)
+* magit-file-checkout <1>:               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-file-checkout <2>:               Commands for Buffers Visiting Files.
+                                                              (line  86)
+* magit-file-delete:                     Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-file-delete <1>:                 Commands for Buffers Visiting Files.
+                                                              (line  82)
+* magit-file-dispatch:                   Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-file-dispatch <1>:               Commands for Buffers Visiting Files.
+                                                              (line  58)
+* magit-file-rename:                     Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-file-rename <1>:                 Commands for Buffers Visiting Files.
+                                                              (line  78)
+* magit-file-stage:                      Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-file-stage <1>:                  Commands for Buffers Visiting Files.
+                                                              (line  63)
+* magit-file-unstage:                    Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-file-unstage <1>:                Commands for Buffers Visiting Files.
+                                                              (line  69)
+* magit-file-untrack:                    Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-file-untrack <1>:                Commands for Buffers Visiting Files.
+                                                              (line  74)
+* magit-find-file:                       Visiting Files and Blobs.
+                                                              (line  19)
+* magit-find-file <1>:                   Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-find-file <2>:                   Commands for Buffers Visiting Files.
+                                                              (line 163)
+* magit-find-file-other-frame:           Visiting Files and Blobs.
+                                                              (line  29)
+* magit-find-file-other-window:          Visiting Files and Blobs.
+                                                              (line  24)
+* magit-generate-buffer-name-default-function: Modes and Buffers.
+                                                              (line 141)
+* magit-get-section:                     Section Plumbing.    (line 131)
+* magit-git:                             Calling Git.         (line 156)
+* magit-git-command:                     Running Git.         (line  99)
+* magit-git-command-topdir:              Running Git.         (line  91)
+* magit-git-exit-code:                   Calling Git.         (line  37)
+* magit-git-failure:                     Calling Git.         (line  44)
+* magit-git-false:                       Calling Git.         (line  52)
+* magit-git-insert:                      Calling Git.         (line  56)
+* magit-git-items:                       Calling Git.         (line  68)
+* magit-git-lines:                       Calling Git.         (line  64)
+* magit-git-mergetool:                   Running Git.         (line 136)
+* magit-git-mergetool <1>:               Ediffing.            (line  79)
+* magit-git-str:                         Calling Git.         (line 102)
+* magit-git-string:                      Calling Git.         (line  59)
+* magit-git-success:                     Calling Git.         (line  40)
+* magit-git-true:                        Calling Git.         (line  48)
+* magit-git-wash:                        Calling Git.         (line 160)
+* magit-go-backward:                     Logging.             (line 116)
+* magit-go-backward <1>:                 Diffing.             (line 209)
+* magit-go-forward:                      Logging.             (line 119)
+* magit-go-forward <1>:                  Diffing.             (line 212)
+* magit-hunk-set-window-start:           Sections.            (line  69)
+* magit-init:                            Creating Repository. (line   7)
+* magit-insert-am-sequence:              Status Buffer.       (line 136)
+* magit-insert-assume-unchanged-files:   Status Buffer.       (line 251)
+* magit-insert-bisect-log:               Status Buffer.       (line 150)
+* magit-insert-bisect-output:            Status Buffer.       (line 144)
+* magit-insert-bisect-rest:              Status Buffer.       (line 147)
+* magit-insert-diff-filter-header:       Status Buffer.       (line 311)
+* magit-insert-error-header:             Status Buffer.       (line 302)
+* magit-insert-head-branch-header:       Status Buffer.       (line 314)
+* magit-insert-heading:                  Section Plumbing.    (line  45)
+* magit-insert-ignored-files:            Status Buffer.       (line 245)
+* magit-insert-local-branches:           References Buffer.   (line 244)
+* magit-insert-merge-log:                Status Buffer.       (line 128)
+* magit-insert-modules:                  Status Buffer.       (line 353)
+* magit-insert-modules-overview:         Status Buffer.       (line 371)
+* magit-insert-modules-unpulled-from-pushremote: Status Buffer.
+                                                              (line 386)
+* magit-insert-modules-unpulled-from-upstream: Status Buffer. (line 381)
+* magit-insert-modules-unpushed-to-pushremote: Status Buffer. (line 396)
+* magit-insert-modules-unpushed-to-upstream: Status Buffer.   (line 391)
+* magit-insert-push-branch-header:       Status Buffer.       (line 321)
+* magit-insert-rebase-sequence:          Status Buffer.       (line 132)
+* magit-insert-recent-commits:           Status Buffer.       (line 257)
+* magit-insert-remote-branches:          References Buffer.   (line 247)
+* magit-insert-remote-header:            Status Buffer.       (line 334)
+* magit-insert-repo-header:              Status Buffer.       (line 331)
+* magit-insert-section:                  Section Plumbing.    (line   9)
+* magit-insert-sequencer-sequence:       Status Buffer.       (line 140)
+* magit-insert-skip-worktree-files:      Status Buffer.       (line 248)
+* magit-insert-staged-changes:           Status Buffer.       (line 156)
+* magit-insert-stashes:                  Status Buffer.       (line 159)
+* magit-insert-status-headers:           Status Buffer.       (line 123)
+* magit-insert-status-headers <1>:       Status Buffer.       (line 288)
+* magit-insert-tags:                     References Buffer.   (line 250)
+* magit-insert-tags-header:              Status Buffer.       (line 325)
+* magit-insert-tracked-files:            Status Buffer.       (line 242)
+* magit-insert-unpulled-cherries:        Status Buffer.       (line 266)
+* magit-insert-unpulled-from-pushremote: Status Buffer.       (line 169)
+* magit-insert-unpulled-from-upstream:   Status Buffer.       (line 165)
+* magit-insert-unpushed-cherries:        Status Buffer.       (line 272)
+* magit-insert-unpushed-to-pushremote:   Status Buffer.       (line 185)
+* magit-insert-unpushed-to-upstream:     Status Buffer.       (line 181)
+* magit-insert-unpushed-to-upstream-or-recent: Status Buffer. (line 173)
+* magit-insert-unstaged-changes:         Status Buffer.       (line 153)
+* magit-insert-untracked-files:          Status Buffer.       (line 195)
+* magit-insert-upstream-branch-header:   Status Buffer.       (line 317)
+* magit-insert-user-header:              Status Buffer.       (line 341)
+* magit-jump-to-diffstat-or-diff:        Diffing.             (line 254)
+* magit-list-repositories:               Repository List.     (line   6)
+* magit-list-submodules:                 Submodules.          (line  18)
+* magit-list-submodules <1>:             Submodules.          (line  97)
+* magit-log:                             Logging.             (line  28)
+* magit-log <1>:                         Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-log <2>:                         Commands for Buffers Visiting Files.
+                                                              (line 116)
+* magit-log-all:                         Logging.             (line  59)
+* magit-log-all-branches:                Logging.             (line  56)
+* magit-log-branches:                    Logging.             (line  53)
+* magit-log-buffer-file:                 Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-log-buffer-file <1>:             Commands for Buffers Visiting Files.
+                                                              (line 126)
+* magit-log-bury-buffer:                 Logging.             (line 110)
+* magit-log-current:                     Logging.             (line  33)
+* magit-log-double-commit-limit:         Logging.             (line 160)
+* magit-log-half-commit-limit:           Logging.             (line 163)
+* magit-log-head:                        Logging.             (line  38)
+* magit-log-maybe-show-more-commits:     Sections.            (line  82)
+* magit-log-maybe-update-blob-buffer:    Sections.            (line  96)
+* magit-log-maybe-update-revision-buffer: Sections.           (line  89)
+* magit-log-merged:                      Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-log-merged <1>:                  Commands for Buffers Visiting Files.
+                                                              (line 139)
+* magit-log-move-to-parent:              Logging.             (line 122)
+* magit-log-move-to-revision:            Logging.             (line 127)
+* magit-log-other:                       Logging.             (line  47)
+* magit-log-refresh:                     Logging.             (line  75)
+* magit-log-refresh <1>:                 Logging.             (line  80)
+* magit-log-refresh <2>:                 Logging.             (line 103)
+* magit-log-related:                     Logging.             (line  41)
+* magit-log-save-default-arguments:      Logging.             (line  90)
+* magit-log-select-pick:                 Logging.             (line 297)
+* magit-log-select-quit:                 Logging.             (line 302)
+* magit-log-set-default-arguments:       Logging.             (line  84)
+* magit-log-toggle-commit-limit:         Logging.             (line 155)
+* magit-log-trace-definition:            Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-log-trace-definition <1>:        Commands for Buffers Visiting Files.
+                                                              (line 136)
+* magit-margin-settings:                 Logging.             (line 263)
+* magit-maybe-set-dedicated:             Modes and Buffers.   (line 121)
+* magit-merge:                           Merging.             (line  10)
+* magit-merge <1>:                       Merging.             (line  92)
+* magit-merge-abort:                     Merging.             (line  97)
+* magit-merge-absorb:                    Merging.             (line  46)
+* magit-merge-dissolve:                  Merging.             (line  60)
+* magit-merge-editmsg:                   Merging.             (line  32)
+* magit-merge-nocommit:                  Merging.             (line  40)
+* magit-merge-plain:                     Merging.             (line  18)
+* magit-merge-preview:                   Merging.             (line  81)
+* magit-merge-squash:                    Merging.             (line  73)
+* magit-mode-bury-buffer:                Modes and Buffers.   (line 206)
+* magit-mode-display-buffer:             Refreshing Buffers.  (line  32)
+* magit-mode-quit-window:                Modes and Buffers.   (line 233)
+* magit-mode-setup:                      Refreshing Buffers.  (line  17)
+* magit-notes:                           Notes.               (line   9)
+* magit-notes-edit:                      Notes.               (line  14)
+* magit-notes-merge:                     Notes.               (line  35)
+* magit-notes-merge-abort:               Notes.               (line  47)
+* magit-notes-merge-commit:              Notes.               (line  43)
+* magit-notes-prune:                     Notes.               (line  28)
+* magit-notes-remove:                    Notes.               (line  21)
+* magit-parent-status:                   Status Buffer.       (line  96)
+* magit-patch:                           Plain Patches.       (line   7)
+* magit-patch-apply:                     Plain Patches.       (line  20)
+* magit-patch-apply <1>:                 Maildir Patches.     (line  23)
+* magit-patch-create:                    Plain Patches.       (line  12)
+* magit-patch-save:                      Plain Patches.       (line  26)
+* magit-pop-revision-stack:              Committing.          (line 347)
+* magit-process-buffer:                  Running Git.         (line  20)
+* magit-process-file:                    Calling Git.         (line  84)
+* magit-process-git:                     Calling Git.         (line  77)
+* magit-process-kill:                    Running Git.         (line  27)
+* magit-profile-refresh-buffer:          Debugging Tools.     (line  76)
+* magit-pull:                            Pulling.             (line  10)
+* magit-pull-branch:                     Pulling.             (line  28)
+* magit-pull-from-pushremote:            Pulling.             (line  14)
+* magit-pull-from-upstream:              Pulling.             (line  21)
+* magit-pull-into-upstream:              Pulling.             (line  34)
+* magit-push:                            Pushing.             (line  10)
+* magit-push-current:                    Pushing.             (line  29)
+* magit-push-current-to-pushremote:      Pushing.             (line  15)
+* magit-push-current-to-upstream:        Pushing.             (line  22)
+* magit-push-implicitly:                 Pushing.             (line  74)
+* magit-push-matching:                   Pushing.             (line  45)
+* magit-push-other:                      Pushing.             (line  33)
+* magit-push-refspecs:                   Pushing.             (line  37)
+* magit-push-tag:                        Pushing.             (line  59)
+* magit-push-tags:                       Pushing.             (line  52)
+* magit-push-to-remote:                  Pushing.             (line  91)
+* magit-rebase:                          Rebasing.            (line  10)
+* magit-rebase-abort:                    Rebasing.            (line 121)
+* magit-rebase-autosquash:               Rebasing.            (line  84)
+* magit-rebase-branch:                   Rebasing.            (line  42)
+* magit-rebase-continue:                 Rebasing.            (line 107)
+* magit-rebase-edit:                     Rebasing.            (line 117)
+* magit-rebase-edit-commit:              Rebasing.            (line  93)
+* magit-rebase-interactive:              Rebasing.            (line  81)
+* magit-rebase-onto-pushremote:          Rebasing.            (line  28)
+* magit-rebase-onto-upstream:            Rebasing.            (line  35)
+* magit-rebase-remove-commit:            Rebasing.            (line 101)
+* magit-rebase-reword-commit:            Rebasing.            (line  97)
+* magit-rebase-skip:                     Rebasing.            (line 113)
+* magit-rebase-subset:                   Rebasing.            (line  47)
+* magit-reflog-current:                  Logging.             (line 336)
+* magit-reflog-head:                     Logging.             (line 342)
+* magit-reflog-other:                    Logging.             (line 339)
+* magit-refresh:                         Modes and Buffers.   (line 265)
+* magit-refresh-all:                     Modes and Buffers.   (line 273)
+* magit-refs-set-show-commit-count:      References Buffer.   (line  34)
+* magit-region-sections:                 Section Plumbing.    (line  88)
+* magit-region-values:                   Section Plumbing.    (line 114)
+* magit-remote:                          Remotes.             (line  17)
+* magit-remote-add:                      Remotes.             (line  51)
+* magit-remote-configure:                Remotes.             (line  35)
+* magit-remote-prune:                    Remotes.             (line  66)
+* magit-remote-prune-refspecs:           Remotes.             (line  70)
+* magit-remote-remove:                   Remotes.             (line  63)
+* magit-remote-rename:                   Remotes.             (line  55)
+* magit-remote-set-url:                  Remotes.             (line  59)
+* magit-repolist-column-branch:          Repository List.     (line  52)
+* magit-repolist-column-branches:        Repository List.     (line  59)
+* magit-repolist-column-flag:            Repository List.     (line  65)
+* magit-repolist-column-flags:           Repository List.     (line  77)
+* magit-repolist-column-ident:           Repository List.     (line  41)
+* magit-repolist-column-path:            Repository List.     (line  45)
+* magit-repolist-column-stashes:         Repository List.     (line  62)
+* magit-repolist-column-unpulled-from-pushremote: Repository List.
+                                                              (line  88)
+* magit-repolist-column-unpulled-from-upstream: Repository List.
+                                                              (line  84)
+* magit-repolist-column-unpushed-to-pushremote: Repository List.
+                                                              (line  96)
+* magit-repolist-column-unpushed-to-upstream: Repository List.
+                                                              (line  92)
+* magit-repolist-column-upstream:        Repository List.     (line  55)
+* magit-repolist-column-version:         Repository List.     (line  48)
+* magit-repolist-fetch:                  Repository List.     (line 112)
+* magit-repolist-find-file-other-frame:  Repository List.     (line 116)
+* magit-repolist-mark:                   Repository List.     (line 106)
+* magit-repolist-status:                 Repository List.     (line 103)
+* magit-repolist-unmark:                 Repository List.     (line 109)
+* magit-reset-hard:                      Resetting.           (line  24)
+* magit-reset-index:                     Staging and Unstaging.
+                                                              (line  78)
+* magit-reset-index <1>:                 Resetting.           (line  33)
+* magit-reset-keep:                      Resetting.           (line  28)
+* magit-reset-mixed:                     Resetting.           (line  15)
+* magit-reset-quickly:                   Resetting.           (line   9)
+* magit-reset-soft:                      Resetting.           (line  19)
+* magit-reset-worktree:                  Resetting.           (line  39)
+* magit-reset-worktree <1>:              Wip Modes.           (line  59)
+* magit-restore-window-configuration:    Modes and Buffers.   (line 223)
+* magit-reverse:                         Applying.            (line  47)
+* magit-reverse-in-index:                Staging and Unstaging.
+                                                              (line  58)
+* magit-revert:                          Cherry Picking.      (line  98)
+* magit-revert-and-commit:               Cherry Picking.      (line 106)
+* magit-revert-no-commit:                Cherry Picking.      (line 111)
+* magit-run:                             Running Git.         (line  87)
+* magit-run-git:                         Calling Git.         (line 144)
+* magit-run-git-async:                   Calling Git.         (line 169)
+* magit-run-git-gui:                     Running Git.         (line 133)
+* magit-run-git-hook:                    Running Git.         (line 247)
+* magit-run-git-with-editor:             Calling Git.         (line 181)
+* magit-run-git-with-input:              Calling Git.         (line 147)
+* magit-run-gitk:                        Running Git.         (line 124)
+* magit-run-gitk-all:                    Running Git.         (line 127)
+* magit-run-gitk-branches:               Running Git.         (line 130)
+* magit-save-window-configuration:       Modes and Buffers.   (line 112)
+* magit-section-backward:                Sections.            (line  33)
+* magit-section-backward-siblings:       Sections.            (line  41)
+* magit-section-case:                    Section Plumbing.    (line 184)
+* magit-section-cycle:                   Sections.            (line 148)
+* magit-section-cycle-diffs:             Sections.            (line 163)
+* magit-section-cycle-global:            Sections.            (line 167)
+* magit-section-forward:                 Sections.            (line  38)
+* magit-section-forward-siblings:        Sections.            (line  46)
+* magit-section-hide:                    Sections.            (line 189)
+* magit-section-hide-children:           Sections.            (line 201)
+* magit-section-ident:                   Section Plumbing.    (line 127)
+* magit-section-match:                   Section Plumbing.    (line 135)
+* magit-section-set-window-start:        Sections.            (line  76)
+* magit-section-show:                    Sections.            (line 186)
+* magit-section-show-children:           Sections.            (line 196)
+* magit-section-show-headings:           Sections.            (line 192)
+* magit-section-show-level-1:            Sections.            (line 173)
+* magit-section-show-level-1-all:        Sections.            (line 179)
+* magit-section-show-level-2:            Sections.            (line 173)
+* magit-section-show-level-2-all:        Sections.            (line 179)
+* magit-section-show-level-3:            Sections.            (line 173)
+* magit-section-show-level-3-all:        Sections.            (line 179)
+* magit-section-show-level-4:            Sections.            (line 173)
+* magit-section-show-level-4-all:        Sections.            (line 179)
+* magit-section-toggle:                  Sections.            (line 144)
+* magit-section-toggle-children:         Sections.            (line 204)
+* magit-section-up:                      Sections.            (line  50)
+* magit-section-value-if:                Section Plumbing.    (line 174)
+* magit-sequence-abort:                  Cherry Picking.      (line  91)
+* magit-sequence-abort <1>:              Cherry Picking.      (line 126)
+* magit-sequence-continue:               Cherry Picking.      (line  85)
+* magit-sequence-continue <1>:           Cherry Picking.      (line 120)
+* magit-sequence-skip:                   Cherry Picking.      (line  88)
+* magit-sequence-skip <1>:               Cherry Picking.      (line 123)
+* magit-shell-command:                   Running Git.         (line 112)
+* magit-shell-command-topdir:            Running Git.         (line 108)
+* magit-show-commit:                     Diffing.             (line  82)
+* magit-show-commit <1>:                 Blaming.             (line  91)
+* magit-show-commit-removing-file:       Commands for Buffers Visiting Files.
+                                                              (line 108)
+* magit-show-refs:                       References Buffer.   (line   7)
+* magit-show-refs-current:               References Buffer.   (line  25)
+* magit-show-refs-head:                  References Buffer.   (line  21)
+* magit-show-refs-other:                 References Buffer.   (line  30)
+* magit-snapshot-both:                   Stashing.            (line  36)
+* magit-snapshot-index:                  Stashing.            (line  42)
+* magit-snapshot-worktree:               Stashing.            (line  46)
+* magit-sparse-checkout:                 Sparse checkouts.    (line  17)
+* magit-sparse-checkout-add:             Sparse checkouts.    (line  39)
+* magit-sparse-checkout-disable:         Sparse checkouts.    (line  50)
+* magit-sparse-checkout-enable:          Sparse checkouts.    (line  21)
+* magit-sparse-checkout-reapply:         Sparse checkouts.    (line  44)
+* magit-sparse-checkout-set:             Sparse checkouts.    (line  33)
+* magit-stage:                           Staging and Unstaging.
+                                                              (line  29)
+* magit-stage-files:                     Staging and Unstaging.
+                                                              (line  90)
+* magit-stage-files <1>:                 Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-stage-files <2>:                 Commands for Buffers Visiting Files.
+                                                              (line  63)
+* magit-stage-modified:                  Staging and Unstaging.
+                                                              (line  36)
+* magit-start-git:                       Calling Git.         (line 192)
+* magit-start-process:                   Calling Git.         (line 210)
+* magit-stash:                           Stashing.            (line   9)
+* magit-stash-apply:                     Stashing.            (line  52)
+* magit-stash-both:                      Stashing.            (line  14)
+* magit-stash-branch:                    Stashing.            (line 101)
+* magit-stash-branch-here:               Stashing.            (line 106)
+* magit-stash-clear:                     Stashing.            (line 114)
+* magit-stash-drop:                      Stashing.            (line  94)
+* magit-stash-format-patch:              Stashing.            (line 111)
+* magit-stash-index:                     Stashing.            (line  20)
+* magit-stash-keep-index:                Stashing.            (line  30)
+* magit-stash-list:                      Stashing.            (line 117)
+* magit-stash-pop:                       Stashing.            (line  72)
+* magit-stash-show:                      Diffing.             (line  86)
+* magit-stash-show <1>:                  Stashing.            (line  98)
+* magit-stash-worktree:                  Stashing.            (line  24)
+* magit-stashes-maybe-update-stash-buffer: Sections.          (line 116)
+* magit-status:                          Status Buffer.       (line  23)
+* magit-status-here:                     Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-status-here <1>:                 Commands for Buffers Visiting Files.
+                                                              (line 173)
+* magit-status-maybe-update-blob-buffer: Sections.            (line 111)
+* magit-status-maybe-update-revision-buffer: Sections.        (line 101)
+* magit-status-maybe-update-stash-buffer: Sections.           (line 106)
+* magit-status-quick:                    Status Buffer.       (line  70)
+* magit-submodule:                       Submodules.          (line  56)
+* magit-submodule-add:                   Submodules.          (line  69)
+* magit-submodule-populate:              Submodules.          (line  81)
+* magit-submodule-register:              Submodules.          (line  75)
+* magit-submodule-synchronize:           Submodules.          (line  89)
+* magit-submodule-unpopulate:            Submodules.          (line  94)
+* magit-submodule-update:                Submodules.          (line  85)
+* magit-subtree:                         Subtree.             (line   9)
+* magit-subtree-add:                     Subtree.             (line  24)
+* magit-subtree-add-commit:              Subtree.             (line  28)
+* magit-subtree-export:                  Subtree.             (line  37)
+* magit-subtree-import:                  Subtree.             (line  13)
+* magit-subtree-merge:                   Subtree.             (line  31)
+* magit-subtree-pull:                    Subtree.             (line  34)
+* magit-subtree-push:                    Subtree.             (line  48)
+* magit-subtree-split:                   Subtree.             (line  52)
+* magit-switch-to-repository-buffer:     Common Commands.     (line   6)
+* magit-switch-to-repository-buffer-other-frame: Common Commands.
+                                                              (line   8)
+* magit-switch-to-repository-buffer-other-window: Common Commands.
+                                                              (line   7)
+* magit-tag:                             Tagging.             (line   9)
+* magit-tag-create:                      Tagging.             (line  14)
+* magit-tag-delete:                      Tagging.             (line  37)
+* magit-tag-prune:                       Tagging.             (line  43)
+* magit-tag-release:                     Tagging.             (line  18)
+* magit-toggle-buffer-lock:              Modes and Buffers.   (line  18)
+* magit-toggle-git-debug:                Running Git.         (line  32)
+* magit-toggle-git-debug <1>:            Debugging Tools.     (line  29)
+* magit-toggle-margin:                   Logging.             (line  97)
+* magit-toggle-margin <1>:               Logging.             (line 271)
+* magit-toggle-margin-details:           Logging.             (line 277)
+* magit-toggle-profiling:                Debugging Tools.     (line  80)
+* magit-toggle-subprocess-record:        Debugging Tools.     (line  56)
+* magit-toggle-verbose-refresh:          Debugging Tools.     (line  51)
+* magit-unstage:                         Staging and Unstaging.
+                                                              (line  42)
+* magit-unstage-all:                     Staging and Unstaging.
+                                                              (line  50)
+* magit-unstage-files:                   Staging and Unstaging.
+                                                              (line  97)
+* magit-unstage-files <1>:               Commands for Buffers Visiting Files.
+                                                              (line  52)
+* magit-unstage-files <2>:               Commands for Buffers Visiting Files.
+                                                              (line  69)
+* magit-version:                         Running Git.         (line 197)
+* magit-version <1>:                     Debugging Tools.     (line  11)
+* magit-visit-ref:                       References Buffer.   (line 159)
+* magit-wip-commit:                      Wip Modes.           (line  80)
+* magit-wip-log:                         Wip Modes.           (line  42)
+* magit-wip-log-current:                 Wip Modes.           (line  50)
+* magit-worktree:                        Worktree.            (line   9)
+* magit-worktree-branch:                 Worktree.            (line  16)
+* magit-worktree-checkout:               Worktree.            (line  13)
+* magit-worktree-delete:                 Worktree.            (line  22)
+* magit-worktree-move:                   Worktree.            (line  19)
+* magit-worktree-status:                 Worktree.            (line  26)
+* scroll-down:                           Diffing.             (line 267)
+* scroll-up:                             Diffing.             (line 264)
+* with-editor-cancel:                    Committing.          (line 307)
+* with-editor-cancel <1>:                Rebasing.            (line 132)
+* with-editor-debug:                     Debugging Tools.     (line  85)
+* with-editor-finish:                    Committing.          (line 303)
+* with-editor-finish <1>:                Rebasing.            (line 128)
+* with-editor-usage-message:             Committing.          (line 484)
+
+
+File: magit.info,  Node: Variable Index,  Prev: Function and Command Index,  Up: Top
+
+Appendix E Variable Index
+*************************
+
+[index]
+* Menu:
+
+* auto-revert-buffer-list-filter:        Modes and Buffers.   (line 396)
+* auto-revert-interval:                  Modes and Buffers.   (line 392)
+* auto-revert-mode:                      Modes and Buffers.   (line 380)
+* auto-revert-stop-on-user-input:        Modes and Buffers.   (line 388)
+* auto-revert-use-notify:                Modes and Buffers.   (line 369)
+* auto-revert-verbose:                   Modes and Buffers.   (line 417)
+* branch.autoSetupMerge:                 Branching.           (line 412)
+* branch.autoSetupRebase:                Branching.           (line 426)
+* branch.NAME.description:               Branching.           (line 383)
+* branch.NAME.merge:                     Branching.           (line 351)
+* branch.NAME.pushRemote:                Branching.           (line 370)
+* branch.NAME.rebase:                    Branching.           (line 361)
+* branch.NAME.remote:                    Branching.           (line 356)
+* core.notesRef:                         Notes.               (line  53)
+* git-commit-finish-query-functions:     Committing.          (line 518)
+* git-commit-known-pseudo-headers:       Committing.          (line 408)
+* git-commit-major-mode:                 Committing.          (line 445)
+* git-commit-post-finish-hook:           Committing.          (line 487)
+* git-commit-setup-hook:                 Committing.          (line 454)
+* git-commit-style-convention-checks:    Committing.          (line 538)
+* git-commit-summary-max-length:         Committing.          (line 513)
+* git-rebase-auto-advance:               Rebasing.            (line 226)
+* git-rebase-confirm-cancel:             Rebasing.            (line 232)
+* git-rebase-show-instructions:          Rebasing.            (line 229)
+* global-auto-revert-mode:               Modes and Buffers.   (line 343)
+* magit-auto-revert-immediately:         Modes and Buffers.   (line 352)
+* magit-auto-revert-mode:                Modes and Buffers.   (line 339)
+* magit-auto-revert-tracked-only:        Modes and Buffers.   (line 374)
+* magit-bisect-show-graph:               Bisecting.           (line  63)
+* magit-blame-disable-modes:             Blaming.             (line 165)
+* magit-blame-echo-style:                Blaming.             (line 151)
+* magit-blame-goto-chunk-hook:           Blaming.             (line 170)
+* magit-blame-read-only:                 Blaming.             (line 161)
+* magit-blame-styles:                    Blaming.             (line 147)
+* magit-blame-time-format:               Blaming.             (line 157)
+* magit-branch-adjust-remote-upstream-alist: Branching.       (line 270)
+* magit-branch-direct-configure:         Branching.           (line  69)
+* magit-branch-name-suggestions:         Branching.           (line 223)
+* magit-branch-prefer-remote-upstream:   Branching.           (line 226)
+* magit-branch-read-upstream-first:      Branching.           (line 218)
+* magit-buffer-name-format:              Modes and Buffers.   (line 150)
+* magit-bury-buffer-function:            Modes and Buffers.   (line 215)
+* magit-cherry-margin:                   Logging.             (line 385)
+* magit-clone-always-transient:          Cloning Repository.  (line  12)
+* magit-clone-default-directory:         Cloning Repository.  (line  84)
+* magit-clone-name-alist:                Cloning Repository.  (line  94)
+* magit-clone-set-remote-head:           Cloning Repository.  (line  66)
+* magit-clone-set-remote.pushDefault:    Cloning Repository.  (line  75)
+* magit-clone-url-format:                Cloning Repository.  (line 114)
+* magit-commit-ask-to-stage:             Committing.          (line 225)
+* magit-commit-diff-inhibit-same-window: Committing.          (line 240)
+* magit-commit-extend-override-date:     Committing.          (line 280)
+* magit-commit-reword-override-date:     Committing.          (line 284)
+* magit-commit-show-diff:                Committing.          (line 221)
+* magit-commit-squash-confirm:           Committing.          (line 269)
+* magit-common-git-post-commit-functions: Running Git.        (line 257)
+* magit-completing-read-function:        Completion Confirmation and the Selection.
+                                                              (line 340)
+* magit-define-global-key-bindings:      Essential Settings.  (line 239)
+* magit-diff-adjust-tab-width:           Diffing.             (line 319)
+* magit-diff-buffer-file-locked:         Commands for Buffers Visiting Files.
+                                                              (line 111)
+* magit-diff-extra-stat-arguments:       Diffing.             (line 414)
+* magit-diff-fontify-hunk:               Diffing.             (line 286)
+* magit-diff-hide-trailing-cr-characters: Diffing.            (line 379)
+* magit-diff-highlight-hunk-region-functions: Diffing.        (line 382)
+* magit-diff-highlight-indentation:      Diffing.             (line 365)
+* magit-diff-highlight-trailing:         Diffing.             (line 361)
+* magit-diff-paint-whitespace:           Diffing.             (line 340)
+* magit-diff-paint-whitespace-lines:     Diffing.             (line 354)
+* magit-diff-refine-hunk:                Diffing.             (line 272)
+* magit-diff-refine-ignore-whitespace:   Diffing.             (line 282)
+* magit-diff-specify-hunk-foreground:    Diffing.             (line 307)
+* magit-diff-unmarked-lines-keep-foreground: Diffing.         (line 407)
+* magit-diff-use-indicator-faces:        Diffing.             (line 312)
+* magit-diff-visit-prefer-worktree:      Visiting Files and Blobs.
+                                                              (line  92)
+* magit-diff-visit-previous-blob:        Visiting Files and Blobs.
+                                                              (line 126)
+* magit-direct-use-buffer-arguments:     Transient Arguments and Buffer Variables.
+                                                              (line  73)
+* magit-display-buffer-function:         Modes and Buffers.   (line  57)
+* magit-display-buffer-noselect:         Modes and Buffers.   (line  49)
+* magit-dwim-selection:                  Completion Confirmation and the Selection.
+                                                              (line 222)
+* magit-ediff-dwim-resolve-function:     Ediffing.            (line 105)
+* magit-ediff-dwim-show-on-hunks:        Ediffing.            (line 111)
+* magit-ediff-quit-hook:                 Ediffing.            (line 124)
+* magit-ediff-show-stash-with-index:     Ediffing.            (line 118)
+* magit-format-file-function:            Diffing.             (line 424)
+* magit-generate-buffer-name-function:   Modes and Buffers.   (line 131)
+* magit-git-debug:                       Calling Git.         (line  95)
+* magit-git-executable:                  Running Git.         (line 164)
+* magit-git-global-arguments:            Running Git.         (line 204)
+* magit-githook-directory:               Running Git.         (line 233)
+* magit-keep-region-overlay:             Completion Confirmation and the Selection.
+                                                              (line 294)
+* magit-list-refs-sortby:                Completion Confirmation and the Selection.
+                                                              (line 404)
+* magit-log-auto-more:                   Logging.             (line 165)
+* magit-log-buffer-file-locked:          Commands for Buffers Visiting Files.
+                                                              (line 131)
+* magit-log-margin:                      Logging.             (line 223)
+* magit-log-margin-show-committer-date:  Logging.             (line 255)
+* magit-log-section-commit-count:        Status Buffer.       (line 261)
+* magit-log-select-margin:               Logging.             (line 304)
+* magit-log-show-color-graph-limit:      Logging.             (line 174)
+* magit-log-show-refname-after-summary:  Logging.             (line 170)
+* magit-log-show-signatures-limit:       Logging.             (line 180)
+* magit-log-trace-definition-function:   Diffing.             (line 228)
+* magit-module-sections-hook:            Status Buffer.       (line 360)
+* magit-module-sections-nested:          Status Buffer.       (line 363)
+* magit-no-confirm:                      Completion Confirmation and the Selection.
+                                                              (line  21)
+* magit-pop-revision-stack-format:       Committing.          (line 374)
+* magit-post-clone-hook:                 Cloning Repository.  (line 133)
+* magit-post-commit-hook:                Committing.          (line 229)
+* magit-post-display-buffer-hook:        Modes and Buffers.   (line 117)
+* magit-pre-display-buffer-hook:         Modes and Buffers.   (line 108)
+* magit-prefer-remote-upstream:          Branching.           (line 449)
+* magit-prefix-use-buffer-arguments:     Transient Arguments and Buffer Variables.
+                                                              (line  65)
+* magit-process-raise-error:             Calling Git.         (line 235)
+* magit-pull-or-fetch:                   Fetching.            (line  52)
+* magit-push-options:                    Pushing.             (line 102)
+* magit-reflog-margin:                   Logging.             (line 344)
+* magit-refresh-args:                    Refreshing Buffers.  (line  52)
+* magit-refresh-buffer-hook:             Modes and Buffers.   (line 280)
+* magit-refresh-function:                Refreshing Buffers.  (line  47)
+* magit-refresh-status-buffer:           Modes and Buffers.   (line 285)
+* magit-refs-filter-alist:               References Buffer.   (line 137)
+* magit-refs-focus-column-width:         References Buffer.   (line  75)
+* magit-refs-margin:                     References Buffer.   (line  89)
+* magit-refs-margin-for-tags:            References Buffer.   (line 112)
+* magit-refs-pad-commit-counts:          References Buffer.   (line  45)
+* magit-refs-primary-column-width:       References Buffer.   (line  63)
+* magit-refs-sections-hook:              References Buffer.   (line 241)
+* magit-refs-show-commit-count:          References Buffer.   (line  36)
+* magit-refs-show-remote-prefix:         References Buffer.   (line  57)
+* magit-remote-add-set-remote.pushDefault: Remotes.           (line  86)
+* magit-remote-direct-configure:         Remotes.             (line  23)
+* magit-remote-git-executable:           Running Git.         (line 170)
+* magit-repolist-columns:                Repository List.     (line  12)
+* magit-repository-directories:          Status Buffer.       (line  57)
+* magit-revision-filter-files-on-follow: Diffing.             (line 484)
+* magit-revision-insert-related-refs:    Diffing.             (line 435)
+* magit-revision-show-gravatars:         Diffing.             (line 444)
+* magit-revision-use-dedicated-buffers:  Diffing.             (line 502)
+* magit-revision-use-hash-sections:      Diffing.             (line 460)
+* magit-root-section:                    Section Plumbing.    (line 199)
+* magit-save-repository-buffers:         Modes and Buffers.   (line 314)
+* magit-section-cache-visibility:        Sections.            (line 229)
+* magit-section-initial-visibility-alist: Sections.           (line 213)
+* magit-section-movement-hook:           Sections.            (line  63)
+* magit-section-set-visibility-hook:     Sections.            (line 239)
+* magit-section-show-child-count:        Sections.            (line 375)
+* magit-section-visibility-indicators:   Sections.            (line 256)
+* magit-shell-command-verbose-prompt:    Running Git.         (line 117)
+* magit-stashes-margin:                  Stashing.            (line 119)
+* magit-status-file-list-limit:          Status Buffer.       (line 232)
+* magit-status-headers-hook:             Status Buffer.       (line 293)
+* magit-status-margin:                   Status Buffer.       (line 404)
+* magit-status-sections-hook:            Status Buffer.       (line 111)
+* magit-status-show-untracked-files:     Status Buffer.       (line 199)
+* magit-submodule-list-columns:          Submodules.          (line  25)
+* magit-this-process:                    Calling Git.         (line 231)
+* magit-uniquify-buffer-names:           Modes and Buffers.   (line 190)
+* magit-unstage-committed:               Staging and Unstaging.
+                                                              (line  52)
+* magit-update-other-window-delay:       Sections.            (line 121)
+* magit-visit-ref-behavior:              References Buffer.   (line 168)
+* magit-wip-merge-branch:                Wip Modes.           (line  99)
+* magit-wip-mode:                        Wip Modes.           (line  30)
+* magit-wip-mode-lighter:                Wip Modes.           (line  93)
+* magit-wip-namespace:                   Wip Modes.           (line  86)
+* notes.displayRef:                      Notes.               (line  57)
+* pull.rebase:                           Branching.           (line 391)
+* remote.NAME.fetch:                     Remotes.             (line 108)
+* remote.NAME.followRemoteHEAD:          Remotes.             (line 128)
+* remote.NAME.push:                      Remotes.             (line 117)
+* remote.NAME.pushurl:                   Remotes.             (line 112)
+* remote.NAME.tagOpts:                   Remotes.             (line 121)
+* remote.NAME.url:                       Remotes.             (line 104)
+* remote.pushDefault:                    Branching.           (line 403)
+
+
+
+Tag Table:
+Node: Top776
+Node: Introduction3572
+Node: Installation8272
+Node: Installing from Melpa8600
+Node: Installing from the Git Repository9671
+Node: Post-Installation Tasks12866
+Node: Getting Started14147
+Node: Interface Concepts19954
+Node: Modes and Buffers20333
+Ref: Switching Buffers21831
+Ref: Naming Buffers26483
+Ref: Quitting Windows29456
+Ref: Automatic Refreshing of Magit Buffers31259
+Ref: Automatic Saving of File-Visiting Buffers33989
+Ref: Automatic Reverting of File-Visiting Buffers34984
+Ref: Risk of Reverting Automatically39801
+Node: Sections42068
+Ref: Section Movement42873
+Ref: Section Visibility48239
+Ref: Section Hooks55249
+Ref: Section Types and Values57570
+Ref: Section Options58869
+Node: Transient Commands59248
+Node: Transient Arguments and Buffer Variables60722
+Node: Completion Confirmation and the Selection67731
+Ref: Action Confirmation67992
+Ref: Completion and Confirmation76349
+Ref: The Selection79386
+Ref: The hunk-internal region82123
+Ref: Support for Completion Frameworks83047
+Ref: Additional Completion Options87120
+Node: Mouse Support87570
+Node: Running Git88146
+Ref: Viewing Git Output88266
+Ref: Git Process Status90257
+Ref: Running Git Manually91355
+Ref: Git Executable93928
+Ref: Global Git Arguments96815
+Ref: Mapping Git Hooks to Lisp Hooks97530
+Node: Inspecting100971
+Node: Status Buffer102118
+Ref: Status Sections106646
+Ref: Status File List Sections110108
+Ref: Status Log Sections112678
+Ref: Status Header Sections113707
+Ref: Status Module Sections116198
+Ref: Status Options118572
+Node: Repository List119847
+Node: Logging124634
+Ref: Refreshing Logs127365
+Ref: Log Buffer128709
+Ref: Log Margin133426
+Ref: Select from Log136489
+Ref: Reflog138611
+Ref: Cherries140164
+Node: Diffing141940
+Ref: Refreshing Diffs145885
+Ref: Commands Available in Diffs151163
+Ref: Diff Options153558
+Ref: Revision Buffer161059
+Node: Ediffing165291
+Node: References Buffer171335
+Ref: References Sections181898
+Node: Bisecting182683
+Node: Visiting Files and Blobs185207
+Ref: General-Purpose Visit Commands185649
+Ref: Visiting Files and Blobs from a Diff186467
+Node: Blaming191715
+Node: Manipulating198693
+Node: Creating Repository199035
+Node: Cloning Repository199572
+Node: Staging and Unstaging206011
+Ref: Staging from File-Visiting Buffers209939
+Node: Applying210954
+Node: Committing213503
+Ref: Initiating a Commit214128
+Ref: Creating a new commit214440
+Ref: Editing the last commit214550
+Ref: Editing any reachable commit216529
+Ref: Editing any reachable commit and rebasing immediately220942
+Ref: Options used by commit commands222590
+Ref: Used by all or most commit commands222662
+Ref: Used by all squash and fixup commands224891
+Ref: Used by specific commit commands225445
+Ref: Editing Commit Messages225769
+Ref: Using the Revision Stack228323
+Ref: Commit Pseudo Headers231283
+Ref: Commit Mode and Hooks232435
+Ref: Commit Message Conventions235144
+Node: Branching237032
+Ref: The Two Remotes237153
+Ref: Branch Commands239718
+Ref: Branch Git Variables253292
+Ref: Auxiliary Branch Commands258537
+Node: Merging259554
+Node: Resolving Conflicts263903
+Node: Rebasing269273
+Ref: Editing Rebase Sequences274470
+Ref: Information About In-Progress Rebase279699
+Ref: Rebasing-Footnote-1288691
+Node: Cherry Picking289287
+Ref: Reverting293595
+Node: Resetting294955
+Node: Stashing296779
+Node: Transferring303018
+Node: Remotes303240
+Ref: Remote Commands303337
+Ref: Remote Git Variables307281
+Node: Fetching309214
+Node: Pulling311697
+Node: Pushing313235
+Node: Plain Patches318155
+Node: Maildir Patches319626
+Node: Miscellaneous321105
+Node: Tagging321451
+Node: Notes323344
+Node: Submodules325679
+Ref: Listing Submodules325840
+Ref: Submodule Transient327901
+Node: Subtree330254
+Node: Worktree332185
+Node: Sparse checkouts333500
+Node: Bundle336272
+Node: Common Commands336647
+Node: Wip Modes339273
+Ref: Wip Graph343847
+Node: Commands for Buffers Visiting Files346093
+Node: Minor Mode for Buffers Visiting Blobs354765
+Node: Customizing355928
+Node: Per-Repository Configuration357520
+Node: Essential Settings359774
+Ref: Safety360063
+Ref: Performance361738
+Ref: Log Performance364529
+Ref: Diff Performance365828
+Ref: Refs Buffer Performance367169
+Ref: Committing Performance367742
+Ref: Microsoft Windows Performance368722
+Ref: MacOS Performance369809
+Ref: Global Bindings370692
+Ref: Essential Settings-Footnote-1372865
+Node: Plumbing372947
+Node: Calling Git373772
+Ref: Getting a Value from Git375231
+Ref: Calling Git for Effect378849
+Node: Section Plumbing384788
+Ref: Creating Sections384940
+Ref: Section Selection388750
+Ref: Matching Sections390447
+Node: Refreshing Buffers396349
+Node: Conventions399489
+Ref: Theming Faces399653
+Node: FAQ407686
+Node: FAQ - How to ...?408122
+Ref: How to pronounce Magit?408255
+Ref: How to show git's output?408947
+Ref: How to install the gitman info manual?409564
+Ref: How to show diffs for gpg-encrypted files?410369
+Ref: How does branching and pushing work?410778
+Ref: Should I disable VC?410942
+Ref: The diff/log is filtered to one file; how do I show all changes411425
+Node: FAQ - Issues and Errors411797
+Ref: Magit is slow411942
+Ref: I changed several thousand files at once and now Magit is unusable412088
+Ref: I am having problems committing412627
+Ref: I am using MS Windows and cannot push with Magit412892
+Ref: I am using macOS and SOMETHING works in shell but not in Magit413290
+Ref: Expanding a file to show the diff causes it to disappear413877
+Ref: Point is wrong in the COMMIT_EDITMSG buffer414227
+Ref: The mode-line information isn't always up-to-date415051
+Ref: A branch and tag sharing the same name breaks SOMETHING415882
+Ref: My Git hooks work on the command-line but not inside Magit416530
+Ref: git-commit-mode isn't used when committing from the command-line417122
+Ref: Point ends up inside invisible text when jumping to a file-visiting buffer419110
+Ref: I am no longer able to save popup defaults419702
+Node: Debugging Tools420495
+Node: Keystroke Index424430
+Node: Function and Command Index462891
+Node: Variable Index514979
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/magit-section-20260731.2248/dir b/emacs/.emacs.d/elpa/magit-section-20260731.2248/dir
new file mode 100644
index 0000000..6e44681
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-section-20260731.2248/dir
@@ -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
+* Magit-Section: (magit-section).
+                                Use Magit sections in your own packages.
diff --git a/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section-autoloads.el b/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section-autoloads.el
new file mode 100644
index 0000000..aa1f445
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section-autoloads.el
@@ -0,0 +1,67 @@
+;;; magit-section-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from magit-section.el
+
+(autoload 'magit-add-section-hook "magit-section" "\
+Add to the value of section hook HOOK the function FUNCTION.
+
+Add FUNCTION at the beginning of the hook list unless optional
+APPEND is non-nil, in which case FUNCTION is added at the end.
+If FUNCTION already is a member, then move it to the new location.
+
+If optional AT is non-nil and a member of the hook list, then
+add FUNCTION next to that instead.  Add before or after AT, or
+replace AT with FUNCTION depending on APPEND.  If APPEND is the
+symbol `replace', then replace AT with FUNCTION.  For any other
+non-nil value place FUNCTION right after AT.  If nil, then place
+FUNCTION right before AT.  If FUNCTION already is a member of the
+list but AT is not, then leave FUNCTION where ever it already is.
+
+If optional LOCAL is non-nil, then modify the hook's buffer-local
+value rather than its global value.  This makes the hook local by
+copying the default value.  That copy is then modified.
+
+HOOK should be a symbol.  If HOOK is void, it is first set to nil.
+HOOK's value must not be a single hook function.  FUNCTION should
+be a function that takes no arguments and inserts one or multiple
+sections at point, moving point forward.  FUNCTION may choose not
+to insert its section(s), when doing so would not make sense.  It
+should not be abused for other side-effects.  To remove FUNCTION
+again use `remove-hook'.
+
+(fn HOOK FUNCTION &optional AT APPEND LOCAL)")
+(autoload 'magit--handle-bookmark "magit-section" "\
+Open a bookmark created by `magit--make-bookmark'.
+
+Call the generic function `magit-bookmark-get-buffer-create' to get
+the appropriate buffer without displaying it.
+
+Then call the `magit-*-setup-buffer' function of the the major-mode
+with the variables' values as arguments, which were recorded by
+`magit--make-bookmark'.
+
+(fn BOOKMARK)")
+(register-definition-prefixes "magit-section" '("context-menu-region" "isearch-clean-overlays" "magit-"))
+
+;;; End of scraped data
+
+(provide 'magit-section-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; magit-section-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section-pkg.el b/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section-pkg.el
new file mode 100644
index 0000000..8366be3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section-pkg.el
@@ -0,0 +1,14 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "magit-section" "20260731.2248"
+  "Sections for read-only buffers."
+  '((emacs    "28.1")
+    (compat   "31.0")
+    (cond-let "1.1")
+    (llama    "1.0")
+    (seq      "2.24"))
+  :url "https://github.com/magit/magit"
+  :commit "67f203853e74e926e2c99f60ed508840714f7ced"
+  :revdesc "67f203853e74"
+  :keywords '("tools")
+  :authors '(("Jonas Bernoulli" . "emacs.magit@jonas.bernoulli.dev"))
+  :maintainers '(("Jonas Bernoulli" . "emacs.magit@jonas.bernoulli.dev")))
diff --git a/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section.el b/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section.el
new file mode 100644
index 0000000..7c05354
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section.el
@@ -0,0 +1,2711 @@
+;;; magit-section.el --- Sections for read-only buffers  -*- lexical-binding:t; coding:utf-8 -*-
+
+;; Copyright (C) 2008-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+;; Maintainer: Jonas Bernoulli <emacs.magit@jonas.bernoulli.dev>
+
+;; Homepage: https://github.com/magit/magit
+;; Keywords: tools
+
+;; Package-Version: 20260731.2248
+;; Package-Revision: 67f203853e74
+;; Package-Requires: (
+;;     (emacs   "28.1")
+;;     (compat  "31.0")
+;;     (cond-let "1.1")
+;;     (llama    "1.0")
+;;     (seq      "2.24"))
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; Magit is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; Magit is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with Magit.  If not, see <https://www.gnu.org/licenses/>.
+
+;; You should have received a copy of the AUTHORS.md file, which
+;; lists all contributors.  If not, see https://magit.vc/authors.
+
+;;; Commentary:
+
+;; This package implements the main user interface of Magit — the
+;; collapsible sections that make up its buffers.  This package used
+;; to be distributed as part of Magit but now it can also be used by
+;; other packages that have nothing to do with Magit or Git.
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'compat)
+(require 'cond-let)
+(require 'eieio)
+(require 'llama) ; For (##these ...) see M-x describe-function RET # # RET.
+(require 'subr-x)
+
+(defun magit--display-core-upgrade-instructions (package version)
+  (display-warning 'magit
+                   (substitute-command-keys
+                    (format "\
+Magit requires `%s' >= %s,
+but due to bad defaults, Emacs' package manager, refuses to
+upgrade this and other built-in packages to higher releases
+from GNU Elpa.
+
+To fix this, you have to add this to your init file:
+
+  (setq package-install-upgrade-built-in t)
+
+Then evaluate that expression by placing the cursor after it
+and typing \\[eval-last-sexp].
+
+Once you have done that, you have to explicitly upgrade `%s':
+
+  \\[package-install] %s \\`RET'
+
+Then you also must make sure the updated version is loaded,
+by evaluating this form:
+
+  (progn (unload-feature \\='%s t) (require \\='%s))
+
+If this does not work, then try uninstalling Magit and all of its
+dependencies.  After that exit and restart Emacs, and only then
+reinstalling Magit.
+
+If you don't use the `package' package manager but still get
+this warning, then your chosen package manager likely has a
+similar defect."
+                            package version package package package package))
+                   :emergency))
+
+;; For older Emacs releases we depend on an updated `seq' release from GNU
+;; ELPA, for `seq-keep'.  Unfortunately something else may require `seq'
+;; before `package' had a chance to put this version on the `load-path'.
+(when (and (featurep 'seq)
+           (not (fboundp 'seq-keep)))
+  (unload-feature 'seq 'force))
+(require 'seq)
+;; Furthermore, by default `package' just silently refuses to upgrade.
+(unless (fboundp 'seq-keep)
+  (magit--display-core-upgrade-instructions 'seq "2.24"))
+
+;; Likewise, we require a recent `transient'.
+(when (and (featurep 'transient)
+           (not (fboundp 'transient--advise-this-command)))
+  (unload-feature 'transient 'force))
+(require 'transient)
+(unless (fboundp 'transient--advise-this-command)
+  (magit--display-core-upgrade-instructions 'transient "0.13"))
+
+(require 'cursor-sensor)
+(require 'format-spec)
+
+(eval-when-compile (require 'benchmark))
+
+;; For `magit-section-get-relative-position'
+(declare-function magit-hunk-section-p "magit-diff" (section) t)
+
+(define-obsolete-variable-alias 'magit-keep-region-overlay
+  'magit-section-keep-region-overlay "Magit-Section 4.0.0")
+
+(make-obsolete-variable 'magit-section-visibility-indicator
+                        'magit-section-visibility-indicators
+                        "Magit-Section 4.5.0")
+
+;;; Hooks
+
+(defvar magit-section-movement-hook nil
+  "Hook run by `magit-section-goto'.
+That function in turn is used by all section movement commands.
+See also info node `(magit)Section Movement'.")
+
+(defvar magit-mouse-set-point-hook nil
+  "Hook run by `magit-mouse-set-point-hook'.")
+
+(defvar magit-section-set-visibility-hook
+  (list #'magit-section-cached-visibility)
+  "Hook used to set the initial visibility of a section.
+Stop at the first function that returns non-nil.  The returned
+value should be `show', `hide' or nil.  If no function returns
+non-nil, determine the visibility as usual, i.e., use the
+hardcoded section specific default (see `magit-insert-section').")
+
+;;; Options
+
+(defgroup magit-section nil
+  "Expandable sections."
+  :link '(info-link "(magit)Sections")
+  :group 'extensions)
+
+(defcustom magit-section-highlight-current t
+  "Whether to highlight the current section."
+  :package-version '(magit-section . "4.3.6")
+  :group 'magit-section
+  :type 'boolean)
+
+(defcustom magit-section-highlight-selection t
+  "Whether to highlight the selected sections.
+If you disable this, you probably also want to disable
+`magit-section-highlight-current' to get the region to
+always look as it would be in non-magit buffers."
+  :package-version '(magit-section . "4.3.6")
+  :group 'magit-section
+  :type 'boolean)
+
+(defcustom magit-section-show-child-count t
+  "Whether to append the number of children to section headings.
+This only applies to sections for which doing so makes sense."
+  :package-version '(magit-section . "2.1.0")
+  :group 'magit-section
+  :type 'boolean)
+
+(defcustom magit-section-cache-visibility t
+  "Whether to cache visibility of sections.
+
+Sections always retain their visibility state when they are being
+recreated during a refresh.  But if a section disappears and then
+later reappears again, then this option controls whether this is
+the case.
+
+If t, then cache the visibility of all sections.  If a list of
+section types, then only do so for matching sections.  If nil,
+then don't do so for any sections."
+  :package-version '(magit-section . "2.12.0")
+  :group 'magit-section
+  :type '(choice (const  :tag "Don't cache visibility" nil)
+                 (const  :tag "Cache visibility of all sections" t)
+                 (repeat :tag "Cache visibility for section types" symbol)))
+
+(defcustom magit-section-initial-visibility-alist
+  '((stashes . hide))
+  "Alist controlling the initial visibility of sections.
+
+Each element maps a section type or lineage to the initial
+visibility state for such sections.  The state has to be one of
+`show' or `hide', or a function that returns one of these symbols.
+A function is called with the section as the only argument.
+
+Use the command `magit-describe-section' to determine a section's
+lineage or type.  The vector in the output is the section lineage
+and the type is the first element of that vector.  Wildcards can
+be used, see `magit-section-match'.
+
+Currently this option is only used to override hardcoded defaults,
+but in the future it will also be used set the defaults.
+
+An entry whose key is `magit-status-initial-section' specifies
+the visibility of the section `magit-status-goto-initial-section'
+jumps to.  This does not only override defaults, but also other
+entries of this alist."
+  :package-version '(magit-section . "2.12.0")
+  :group 'magit-section
+  :type '(alist :key-type (sexp :tag "Section type/lineage")
+                :value-type (choice (const hide)
+                                    (const show)
+                                    function)))
+
+(defcustom magit-section-visibility-indicators
+  `((magit-fringe-bitmap> . magit-fringe-bitmapv)
+    (,(if (char-displayable-p ?…) "…" "...") . t))
+  "Whether and how to indicate that a section can be expanded/collapsed.
+
+If nil, then don't show any indicators.  Otherwise the value has to
+be a list with two elements.  The first controls the indicators used
+in graphical frames, the second the indicators in terminal frames.
+For graphical frames all of the following forms are valid, while
+terminal frames do not have fringes and thus do not support the first
+form.
+
+\(EXPANDABLE-BITMAP . COLLAPSIBLE-BITMAP)
+
+  Both values have to be variables whose values are fringe
+  bitmaps.  In this case every section that can be expanded or
+  collapsed gets an indicator in the left fringe.
+
+  To provide extra padding around the indicator, set
+  `left-fringe-width' in `magit-mode-hook'.
+
+\(EXPANDABLE-CHAR . COLLAPSIBLE-CHAR)
+
+  In this case every section that can be expanded or collapsed
+  gets an indicator in the left margin.
+
+\(STRING . BOOLEAN)
+
+  In this case STRING (usually an ellipsis) is shown at the end
+  of the heading of every collapsed section.  Expanded sections
+  get no indicator.  The cdr controls whether the appearance of
+  these ellipsis take section highlighting into account.  Doing
+  so might potentially have an impact on performance, while not
+  doing so is kinda ugly."
+  :package-version '(magit-section . "3.0.0")
+  :group 'magit-section
+  :type '(choice
+          (const :tag "No indicators" nil)
+          (list (choice :tag "In graphical frames"
+                 (cons  :tag "Use +- fringe indicators"
+                        :format "%{%t%}%v\n"
+                        (const :format " " magit-fringe-bitmap+)
+                        (const :format " " magit-fringe-bitmap-))
+                 (cons  :tag "Use >v fringe indicators"
+                        :format "%{%t%}%v\n"
+                        (const :format " " magit-fringe-bitmap>)
+                        (const :format " " magit-fringe-bitmapv))
+                 (cons  :tag "Use bold >v fringe indicators"
+                        :format "%{%t%}%v\n"
+                        (const :format " " magit-fringe-bitmap-bold>)
+                        (const :format " " magit-fringe-bitmap-boldv))
+                 (cons  :tag "Use custom fringe indicators"
+                        (variable :tag "Expandable bitmap variable")
+                        (variable :tag "Collapsible bitmap variable"))
+                 (cons  :tag "Use margin indicators"
+                        (character :tag "Expandable char" ?+)
+                        (character :tag "Collapsible char" ?-))
+                 (cons  :tag "Use ellipses at end of headings"
+                        (string :tag "Ellipsis" "…")
+                        (choice :tag "Use face kludge"
+                                (const :tag "Yes (potentially slow)" t)
+                                (const :tag "No (kinda ugly)" nil))))
+                (choice :tag "In terminal frames"
+                 (cons  :tag "Use margin indicators"
+                        (character :tag "Expandable char" ?+)
+                        (character :tag "Collapsible char" ?-))
+                 (cons  :tag "Use ellipses at end of headings"
+                        (string :tag "Ellipsis" "…")
+                        (choice :tag "Use face kludge"
+                                (const :tag "Yes (potentially slow)" t)
+                                (const :tag "No (kinda ugly)" nil)))))))
+
+(defcustom magit-section-keep-region-overlay nil
+  "Whether to keep the region overlay when there is a valid selection.
+
+We strongly suggest that you keep the default value, nil.
+
+By default Magit removes the regular region overlay if, and only
+if, that region constitutes a valid selection as understood by
+Magit commands.  Otherwise it does not remove that overlay, and
+the region looks like it would in other buffers.
+
+There are two types of such valid selections: hunk-internal
+regions and regions that select two or more sibling sections.
+In such cases Magit removes the region overlay and instead
+highlights a slightly larger range.  All text (for hunk-internal
+regions) or the headings of all sections (for sibling selections)
+that are inside that range (not just inside the region) are acted
+on by commands such as the staging command.  This buffer range
+begins at the beginning of the line on which the region begins
+and ends at the end of the line on which the region ends.
+
+Because Magit acts on this larger range and not the region, it is
+actually quite important to visualize that larger range.  If we
+don't do that, then one might think that these commands act on
+the region instead.  If you want to *also* visualize the region,
+then set this option to t.  But please note that when the region
+does *not* constitute a valid selection, then the region is
+*always* visualized as usual, and that it is usually under such
+circumstances that you want to use a non-magit command to act on
+the region.
+
+Depending on the used theme, the `magit-*-highlight-selection'
+faces might conflict with the `region' face.  If that happens and
+it bothers you, then you have to customize these faces to address
+the conflicts."
+  :package-version '(magit-section . "2.3.0")
+  :group 'magit-section
+  :type 'boolean)
+
+(defcustom magit-section-disable-line-numbers t
+  "In Magit buffers, whether to disable modes that display line numbers.
+
+Some users who turn on `global-display-line-numbers-mode' (or
+`global-nlinum-mode' or `global-linum-mode') expect line numbers
+to be displayed everywhere except in Magit buffers.  Other users
+do not expect Magit buffers to be treated differently.  At least
+in theory users in the first group should not use the global mode,
+but that ship has sailed, thus this option."
+  :package-version '(magit-section . "3.0.0")
+  :group 'magit-section
+  :type 'boolean)
+
+;;; Variables
+
+(defvar-local magit-section-preserve-visibility t)
+
+(defvar-local magit-section-pre-command-region-p nil)
+(defvar-local magit-section-pre-command-section nil)
+
+(defvar-local magit-section-highlight-force-update nil)
+(defvar-local magit-section-highlight-overlays nil)
+(defvar-local magit-section-selection-overlays nil)
+(defvar-local magit-section-highlighted-sections nil
+  "List of highlighted sections that may have to be repainted on focus change.")
+(defvar-local magit-section-focused-sections nil)
+
+(defvar-local magit-section-inhibit-markers nil)
+(defvar-local magit-section-insert-in-reverse nil)
+
+(defvar-local magit--refreshing-buffer-p nil
+  "Whether the current buffer is presently being refreshed.")
+
+;;; Faces
+
+(defgroup magit-section-faces nil
+  "Faces used by Magit-Section."
+  :group 'magit-section
+  :group 'faces)
+
+(defface magit-section-highlight
+  '((((class color) (background light))
+     :extend t
+     :background "grey95")
+    (((class color) (background  dark))
+     :extend t
+     :background "grey20"))
+  "Face for highlighting the current section."
+  :group 'magit-section-faces)
+
+(defface magit-section-heading
+  '((((class color) (background light))
+     :extend t
+     :foreground "DarkGoldenrod4"
+     :weight bold)
+    (((class color) (background  dark))
+     :extend t
+     :foreground "LightGoldenrod2"
+     :weight bold))
+  "Face for section headings."
+  :group 'magit-section-faces)
+
+(defface magit-section-secondary-heading
+  '((t :extend t :weight bold))
+  "Face for section headings of some secondary headings."
+  :group 'magit-section-faces)
+
+(defface magit-section-heading-selection
+  '((((class color) (background light))
+     :extend t
+     :foreground "salmon4")
+    (((class color) (background  dark))
+     :extend t
+     :foreground "LightSalmon3"))
+  "Face for selected section headings."
+  :group 'magit-section-faces)
+
+(defface magit-section-child-count '((t nil))
+  "Face used for child counts at the end of some section headings."
+  :group 'magit-section-faces)
+
+(defface magit-left-margin '((t :inherit default))
+  "Face used for the left margin.
+
+Currently this is only used for section visibility indicators, and only
+when `magit-section-visibility-indicators' is configured to show them in
+the margin.
+
+Due to limitations of how the margin works in Emacs, this is only used
+for those parts of the margin that actually display an indicator.  For
+that reason you should probably avoid setting the background color.
+
+Reasonable values include ((t)), which causes the indicator to inherit
+the look of the heading (including section highlighting, if any), and
+\((t :inherit default), which prevents that and causes the margin to
+look like regular un-styled text in the buffer.  Building on that, you
+can make it look different, e.g., ((t :inherit default :weight bold)."
+  :group 'magit-section-faces)
+
+;;; Classes
+
+(defvar magit--current-section-hook nil
+  "Internal variable used for `magit-describe-section'.")
+
+(defvar magit--section-type-alist nil)
+
+(defclass magit-section ()
+  ((type     :initform nil :initarg :type)
+   (keymap   :initform nil)
+   (value    :initform nil)
+   (start    :initform nil)
+   (content  :initform nil)
+   (end      :initform nil)
+   (hidden)
+   (painted)
+   (washer   :initform nil :initarg :washer)
+   (inserter :initform (symbol-value 'magit--current-section-hook))
+   (selective-highlight    :initform nil :initarg :selective-highlight)
+   (heading-highlight-face :initform nil :initarg :heading-highlight-face)
+   (heading-selection-face :initform nil :initarg :heading-selection-face)
+   (parent   :initform nil)
+   (children :initform nil)))
+
+;;; Mode
+
+(defvar symbol-overlay-inhibit-map)
+
+(defvar-keymap magit-section-heading-map
+  :doc "Keymap used in the heading line of all expandable sections.
+This keymap is used in addition to the section-specific keymap, if any."
+  "<double-down-mouse-1>"   #'ignore
+  "<double-mouse-1>"        #'magit-mouse-toggle-section
+  "<double-mouse-2>"        #'magit-mouse-toggle-section
+  "<left-margin> <mouse-1>" #'magit-mouse-toggle-section)
+
+(defvar-keymap magit-section-mode-map
+  :doc "Parent keymap for keymaps of modes derived from `magit-section-mode'."
+  :full t
+  :suppress t
+  "<left-fringe> <mouse-1>" #'magit-mouse-toggle-section
+  "<left-fringe> <mouse-2>" #'magit-mouse-toggle-section
+  "TAB"       #'magit-section-toggle
+  "C-c TAB"   #'magit-section-cycle
+  "C-<tab>"   #'magit-section-cycle
+  "M-<tab>"   #'magit-section-cycle
+  ;; <backtab> is the most portable binding for Shift+Tab.
+  "<backtab>" #'magit-section-cycle-global
+  "^"   #'magit-section-up
+  "p"   #'magit-section-backward
+  "n"   #'magit-section-forward
+  "M-p" #'magit-section-backward-sibling
+  "M-n" #'magit-section-forward-sibling
+  "1"   #'magit-section-show-level-1
+  "2"   #'magit-section-show-level-2
+  "3"   #'magit-section-show-level-3
+  "4"   #'magit-section-show-level-4
+  "M-1" #'magit-section-show-level-1-all
+  "M-2" #'magit-section-show-level-2-all
+  "M-3" #'magit-section-show-level-3-all
+  "M-4" #'magit-section-show-level-4-all)
+
+(define-derived-mode magit-section-mode special-mode "Magit-Sections"
+  "Parent major mode from which major modes with Magit-like sections inherit.
+
+Magit-Section is documented in info node `(magit-section)'."
+  :interactive nil
+  :group 'magit-section
+  (buffer-disable-undo)
+  (setq truncate-lines t)
+  (setq buffer-read-only t)
+  (setq-local line-move-visual t) ; See #1771.
+  ;; Turn off syntactic font locking.  See #5420.
+  (setq-local font-lock-defaults '(nil t))
+  (setq show-trailing-whitespace nil)
+  (setq-local symbol-overlay-inhibit-map t)
+  (setq list-buffers-directory (abbreviate-file-name default-directory))
+  (make-local-variable 'text-property-default-nonsticky)
+  (push (cons 'keymap t) text-property-default-nonsticky)
+  (add-hook 'pre-command-hook #'magit-section-pre-command-hook nil t)
+  (add-hook 'post-command-hook #'magit-section-post-command-hook t t)
+  (add-hook 'deactivate-mark-hook #'magit-section-deactivate-mark t t)
+  (setq-local redisplay-highlight-region-function
+              #'magit-section--highlight-region)
+  (setq-local redisplay-unhighlight-region-function
+              #'magit-section--unhighlight-region)
+  (add-function :filter-return (local 'filter-buffer-substring-function)
+                #'magit-section--remove-text-properties)
+  (when (fboundp 'magit-section-context-menu)
+    (add-hook 'context-menu-functions #'magit-section-context-menu 10 t))
+  (when magit-section-disable-line-numbers
+    (when (and (fboundp 'linum-mode)
+               (bound-and-true-p global-linum-mode))
+      (linum-mode -1))
+    (when (and (fboundp 'nlinum-mode)
+               (bound-and-true-p global-nlinum-mode))
+      (nlinum-mode -1))
+    (when (and (fboundp 'display-line-numbers-mode)
+               (bound-and-true-p global-display-line-numbers-mode))
+      (display-line-numbers-mode -1)))
+  (when (fboundp 'magit-preserve-section-visibility-cache)
+    (add-hook 'kill-buffer-hook #'magit-preserve-section-visibility-cache)))
+
+(defun magit-section--remove-text-properties (string)
+  "Remove all text-properties from STRING.
+Most importantly `magit-section'."
+  (set-text-properties 0 (length string) nil string)
+  string)
+
+;;; Core
+
+(defvar-local magit-root-section nil
+  "The root section in the current buffer.
+All other sections are descendants of this section.  The value
+of this variable is set by `magit-insert-section' and you should
+never modify it.")
+(put 'magit-root-section 'permanent-local t)
+
+(defvar-local magit--context-menu-section nil "For internal use only.")
+
+(defvar magit--context-menu-buffer nil "For internal use only.")
+
+(defun magit-point ()
+  "Return point or the position where the context menu was invoked.
+When using the context menu, return the position the user clicked
+on, provided the current buffer is the buffer in which the click
+occurred.  Otherwise return the same value as `point'."
+  (if magit--context-menu-section
+      (magit-menu-position)
+    (point)))
+
+(defun magit-thing-at-point (thing &optional no-properties)
+  "Return the THING at point or where the context menu was invoked.
+When using the context menu, return the thing the user clicked
+on, provided the current buffer is the buffer in which the click
+occurred.  Otherwise return the same value as `thing-at-point'.
+For the meaning of THING and NO-PROPERTIES see that function."
+  (if-let ((pos (magit-menu-position)))
+      (save-excursion
+        (goto-char pos)
+        (thing-at-point thing no-properties))
+    (thing-at-point thing no-properties)))
+
+(defun magit-current-section ()
+  "Return the section at point or where the context menu was invoked.
+When using the context menu, return the section that the user
+clicked on, provided the current buffer is the buffer in which
+the click occurred.  Otherwise return the section at point."
+  (or magit--context-menu-section
+      (magit-section-at)
+      magit-root-section))
+
+(defun magit-section-at (&optional position)
+  "Return the section at POSITION, defaulting to point."
+  (get-text-property (or position (point)) 'magit-section))
+
+(defun magit-section-ident (section)
+  "Return an unique identifier for SECTION.
+The return value has the form ((TYPE . VALUE)...)."
+  (cons (cons (oref section type)
+              (magit-section-ident-value section))
+        (and$ (oref section parent)
+              (magit-section-ident $))))
+
+(defun magit-section-equal (a b)
+  "Return t if A an B are the same section."
+  (and a b (equal (magit-section-ident a)
+                  (magit-section-ident b))))
+
+(cl-defgeneric magit-section-ident-value (object)
+  "Return OBJECT's value, making it constant and unique if necessary.
+
+This is used to correlate different incarnations of the same
+section, see `magit-section-ident' and `magit-get-section'.
+
+Sections whose values are not constant and/or unique should
+implement a method that return a value that can be used for
+thispurpose.")
+
+(cl-defmethod magit-section-ident-value ((section magit-section))
+  "Return the value unless it is an object.
+
+Different object incarnations representing the same value tend to
+not be equal, so call this generic function on the object itself
+to determine a constant value."
+  (let ((value (oref section value)))
+    (if (eieio-object-p value)
+        (magit-section-ident-value value)
+      value)))
+
+(cl-defmethod magit-section-ident-value ((object eieio-default-superclass))
+  "For values that are objects, simply return the object itself.
+Two objects that represent the same entity are not `equal'.  So if
+the values of the objects of a certain section class are themselves
+objects, then a method has to be defined for objects of one of the
+involved classes."
+  object)
+
+(defun magit-get-section (ident &optional root)
+  "Return the section identified by IDENT.
+IDENT has to be a list as returned by `magit-section-ident'.
+If optional ROOT is non-nil, then search in that section tree
+instead of in the one whose root `magit-root-section' is."
+  (setq ident (reverse ident))
+  (let ((section (or root magit-root-section)))
+    (when (eq (car (pop ident))
+              (oref section type))
+      (while (and ident
+                  (pcase-let ((`(,type . ,value) (car ident)))
+                    (setq section
+                          (cl-find-if
+                           (##and (eq (oref % type) type)
+                                  (equal (magit-section-ident-value %) value))
+                           (oref section children)))))
+        (pop ident))
+      section)))
+
+(defun magit-section-lineage (section &optional raw)
+  "Return the lineage of SECTION.
+If optional RAW is non-nil, return a list of section objects, beginning
+with SECTION, otherwise return a list of section types."
+  (cons (if raw section (oref section type))
+        (and$ (oref section parent)
+              (magit-section-lineage $ raw))))
+
+(defvar-local magit-insert-section--current nil "For internal use only.")
+(defvar-local magit-insert-section--parent  nil "For internal use only.")
+(defvar-local magit-insert-section--oldroot nil "For internal use only.")
+
+;;; Menu
+
+(defvar magit-menu-common-value nil "See function `magit-menu-common-value'.")
+(defvar magit-menu--desc-values nil "For internal use only.")
+
+(defun magit-section-context-menu (menu click)
+  "Populate MENU with Magit-Section commands at CLICK."
+  (when-let ((section (save-excursion
+                        (unless (region-active-p)
+                          (mouse-set-point click))
+                        (magit-section-at))))
+    (unless (region-active-p)
+      (setq magit--context-menu-buffer (current-buffer))
+      (if-let ((alt (save-excursion
+                      (mouse-set-point click)
+                      (run-hook-with-args-until-success
+                       'magit-menu-alternative-section-hook section))))
+          (setq magit--context-menu-section (setq section alt))
+        (setq magit--context-menu-section section)
+        (magit-section-update-highlight t)))
+    (when (magit-section-content-p section)
+      (keymap-set-after menu "<magit-section-toggle>"
+        `(menu-item
+          ,(if (oref section hidden) "Expand section" "Collapse section")
+          magit-section-toggle))
+      (when-let* ((_(not (oref section hidden)))
+                  (children (oref section children))
+                  (_(seq-some #'magit-section-content-p children)))
+        (when (seq-some (##oref % hidden) children)
+          (keymap-set-after menu "<magit-section-show-children>"
+            `(menu-item "Expand children"
+                        magit-section-show-children)))
+        (when (seq-some (##not (oref % hidden)) children)
+          (keymap-set-after menu "<magit-section-hide-children>"
+            `(menu-item "Collapse children"
+                        magit-section-hide-children))))
+      (keymap-set-after menu "<separator-magit-1>" menu-bar-separator))
+    (keymap-set-after menu "<magit-describe-section>"
+      `(menu-item "Describe section" magit-describe-section))
+    (when-let ((map (oref section keymap)))
+      (keymap-set-after menu "<separator-magit-2>" menu-bar-separator)
+      (when (symbolp map)
+        (setq map (symbol-value map)))
+      (setq magit-menu-common-value (magit-menu-common-value section))
+      (setq magit-menu--desc-values (magit-menu--desc-values section))
+      (map-keymap (lambda (key binding)
+                    (when (consp binding)
+                      (define-key-after menu (vector key)
+                        (copy-sequence binding))))
+                  (menu-bar-keymap map))))
+  menu)
+
+(defun magit-menu-item (desc def &optional props)
+  "Return a menu item named DESC binding DEF and using PROPS.
+
+If DESC contains a supported %-spec, substitute the
+expression (magit-menu-format-desc DESC) for that.
+See `magit-menu-format-desc'."
+  `(menu-item
+    ,(if (and (stringp desc) (string-match-p "%[tTvsmMx]" desc))
+         (list 'magit-menu-format-desc desc)
+       desc)
+    ,def
+    ;; Without this, the keys for point would be shown instead
+    ;; of the relevant ones from where the click occurred.
+    :keys ,(##magit--menu-position-keys def)
+    ,@props))
+
+(defun magit--menu-position-keys (def)
+  (or (ignore-errors
+        (save-excursion
+          (goto-char (magit-menu-position))
+          (and-let ((key (cl-find-if-not
+                          (lambda (key)
+                            (string-match-p "\\`<[0-9]+>\\'"
+                                            (key-description key)))
+                          (where-is-internal def))))
+            (key-description key))))
+      ""))
+
+(defun magit-menu-position ()
+  "Return the position where the context-menu was invoked.
+If the current command wasn't invoked using the context-menu,
+then return nil."
+  (and magit--context-menu-section
+       (ignore-errors
+         (posn-point (event-start (aref (this-command-keys-vector) 0))))))
+
+(defun magit-menu-highlight-point-section ()
+  (setq magit-section-highlight-force-update t)
+  (cond-let
+    ((eq (current-buffer) magit--context-menu-buffer)
+     (setq magit--context-menu-section nil))
+    ([window (get-buffer-window magit--context-menu-buffer)]
+     (with-selected-window window
+       (setq magit--context-menu-section nil)
+       (magit-section-update-highlight)))
+    ((with-current-buffer magit--context-menu-buffer
+       (setq magit--context-menu-section nil))))
+  (setq magit--context-menu-buffer nil))
+
+(defvar magit--plural-append-es '(branch))
+
+(cl-defgeneric magit-menu-common-value (_section)
+  "Return some value to be used by multiple menu items.
+This function is called by `magit-section-context-menu', which
+stores the value in `magit-menu-common-value'.  Individual menu
+items can use it, e.g., in the expression used to set their
+description."
+  nil)
+
+(defun magit-menu--desc-values (section)
+  (let ((type (oref section type))
+        (value (oref section value))
+        (multiple (magit-region-sections nil t)))
+    (list type
+          value
+          (format "%s %s" type value)
+          (and multiple (length multiple))
+          (if (memq type magit--plural-append-es) "es" "s"))))
+
+(defun magit-menu-format-desc (format)
+  "Format a string based on FORMAT and menu section or selection.
+The following %-specs are allowed:
+%t means \"TYPE\".
+%T means \"TYPE\", or \"TYPEs\" if multiple sections are selected.
+%v means \"VALUE\".
+%s means \"TYPE VALUE\".
+%m means \"TYPE VALUE\", or \"COUNT TYPEs\" if multiple sections
+   are selected.
+%M means \"VALUE\", or \"COUNT TYPEs\" if multiple sections are
+   selected.
+%x means the value of `magit-menu-common-value'."
+  (pcase-let* ((`(,type ,value ,single ,count ,suffix) magit-menu--desc-values)
+               (multiple (and count (format "%s %s%s" count type suffix))))
+    (format-spec format
+                 `((?t . ,type)
+                   (?T . ,(format "%s%s" type (if count suffix "")))
+                   (?v . ,value)
+                   (?s . ,single)
+                   (?m . ,(or multiple single))
+                   (?M . ,(or multiple value))
+                   (?x . ,(format "%s" magit-menu-common-value))))))
+
+(define-advice context-menu-region (:around (fn menu click) magit-section-mode)
+  "Disable in `magit-section-mode' buffers."
+  (if (derived-mode-p 'magit-section-mode)
+      menu
+    (funcall fn menu click)))
+
+;;; Commands
+;;;; Movement
+
+(defun magit-section-forward ()
+  "Move to the beginning of the next visible section."
+  (interactive)
+  (if (eobp)
+      (user-error "No next section")
+    (let ((section (magit-current-section)))
+      (if (oref section parent)
+          (let ((next (and (not (oref section hidden))
+                           (not (= (oref section end)
+                                   (1+ (point))))
+                           (car (oref section children)))))
+            (while (and section (not next))
+              (unless (setq next (car (magit-section-siblings section 'next)))
+                (setq section (oref section parent))))
+            (if next
+                (magit-section-goto next)
+              (user-error "No next section")))
+        (magit-section-goto 1)))))
+
+(defun magit-section-backward ()
+  "Move to the beginning of the current or the previous visible section.
+When point is at the beginning of a section then move to the
+beginning of the previous visible section.  Otherwise move to
+the beginning of the current section."
+  (interactive)
+  (if (bobp)
+      (user-error "No previous section")
+    (let ((section (magit-current-section)) children)
+      (cond
+        ((and (= (point)
+                 (1- (oref section end)))
+              (setq children (oref section children)))
+         (magit-section-goto (car (last children))))
+        ((and (oref section parent)
+              (not (= (point)
+                      (oref section start))))
+         (magit-section-goto section))
+        (t
+         (let ((prev (car (magit-section-siblings section 'prev))))
+           (if prev
+               (while (and (not (oref prev hidden))
+                           (setq children (oref prev children)))
+                 (setq prev (car (last children))))
+             (setq prev (oref section parent)))
+           (cond (prev
+                  (magit-section-goto prev))
+                 ((oref section parent)
+                  (user-error "No previous section"))
+                 ;; Eob special cases.
+                 ((not (get-text-property (1- (point)) 'invisible))
+                  (magit-section-goto -1))
+                 (t
+                  (goto-char (previous-single-property-change
+                              (1- (point)) 'invisible))
+                  (forward-line -1)
+                  (magit-section-goto (magit-current-section))))))))))
+
+(defun magit-section-up ()
+  "Move to the beginning of the parent section."
+  (interactive)
+  (if-let ((parent (oref (magit-current-section) parent)))
+      (magit-section-goto parent)
+    (user-error "No parent section")))
+
+(defun magit-section-forward-sibling ()
+  "Move to the beginning of the next sibling section.
+If there is no next sibling section, then move to the parent."
+  (interactive)
+  (cond-let
+    [[current (magit-current-section)]]
+    ((not (oref current parent))
+     (magit-section-goto 1))
+    ([next (car (magit-section-siblings current 'next))]
+     (magit-section-goto next))
+    ((magit-section-forward))))
+
+(defun magit-section-backward-sibling ()
+  "Move to the beginning of the previous sibling section.
+If there is no previous sibling section, then move to the parent."
+  (interactive)
+  (cond-let
+    [[current (magit-current-section)]]
+    ((not (oref current parent))
+     (magit-section-goto -1))
+    ([previous (car (magit-section-siblings current 'prev))]
+     (magit-section-goto previous))
+    ((magit-section-backward))))
+
+(defun magit-mouse-set-point (event &optional promote-to-region)
+  "Like `mouse-set-point' but also call `magit-mouse-set-point-hook'."
+  (interactive "e\np")
+  (mouse-set-point event promote-to-region)
+  (run-hook-with-args 'magit-mouse-set-point-hook (magit-current-section)))
+
+(defun magit-section-goto (arg)
+  "Run `magit-section-movement-hook'.
+See info node `(magit)Section Movement'."
+  (cond ((integerp arg)
+         (forward-line arg)
+         (setq arg (magit-current-section)))
+        ((goto-char (oref arg start))))
+  (run-hook-with-args 'magit-section-movement-hook arg))
+
+(defun magit-section-set-window-start (section)
+  "Ensure the beginning of SECTION is visible."
+  (unless (pos-visible-in-window-p (oref section end))
+    (set-window-start (selected-window) (oref section start))))
+
+(defmacro magit-define-section-jumper
+    (name heading type &optional value inserter &rest properties)
+  "Define an interactive function to go to some section.
+Together TYPE and VALUE identify the section.
+HEADING is the displayed heading of the section."
+  (declare (indent defun))
+  `(transient-define-suffix ,name (&optional expand)
+     ,(format "Jump to the section \"%s\".
+With a prefix argument also expand it." heading)
+     ,@properties
+     ,@(and (not (plist-member properties :description))
+            (list :description heading))
+     ,@(and inserter
+            `(:if (##memq ',inserter
+                          (symbol-value
+                           (intern (format "%s-sections-hook"
+                                           (substring (symbol-name major-mode)
+                                                      0 -5)))))))
+     :inapt-if-not (##magit-get-section
+                    (cons (cons ',type ,value)
+                          (magit-section-ident magit-root-section)))
+     (interactive "P")
+     (cond-let
+       ([section (magit-get-section
+                  (cons (cons ',type ,value)
+                        (magit-section-ident magit-root-section)))]
+        (goto-char (oref section start))
+        (when expand
+          (with-local-quit (magit-section-show section))
+          (recenter 0)))
+       ((message ,(format "Section \"%s\" wasn't found" heading))))))
+
+;;;; Visibility
+
+(defun magit-section-show (section)
+  "Show the body of the current section."
+  (interactive (list (magit-current-section)))
+  (oset section hidden nil)
+  (magit-section--opportunistic-wash section)
+  (magit-section--opportunistic-paint section)
+  (when$ (oref section content)
+    (remove-overlays $ (oref section end) 'invisible t))
+  (magit-section-maybe-update-visibility-indicator section)
+  (magit-section-maybe-cache-visibility section)
+  (dolist (child (oref section children))
+    (if (oref child hidden)
+        (magit-section-hide child)
+      (magit-section-show child))))
+
+(defun magit-section-hide (section)
+  "Hide the body of the current section."
+  (interactive (list (magit-current-section)))
+  (if (eq section magit-root-section)
+      (user-error "Cannot hide root section")
+    (oset section hidden t)
+    (when-let ((beg (oref section content)))
+      (let ((end (oref section end)))
+        (when (< beg (point) end)
+          (goto-char (oref section start)))
+        (remove-overlays beg end 'invisible t)
+        (let ((o (make-overlay beg end)))
+          (overlay-put o 'evaporate t)
+          (overlay-put o 'invisible t)
+          (overlay-put o 'cursor-intangible t))))
+    (magit-section-maybe-update-visibility-indicator section)
+    (magit-section-maybe-cache-visibility section)))
+
+(defun magit-section-toggle (section)
+  "Toggle visibility of the body of the current section."
+  (interactive (list (magit-current-section)))
+  (cond ((eq section magit-root-section)
+         (user-error "Cannot hide root section"))
+        ((oref section hidden)
+         (magit-section-show section))
+        ((magit-section-hide section))))
+
+(defun magit-section-toggle-children (section)
+  "Toggle visibility of bodies of children of the current section."
+  (interactive (list (magit-current-section)))
+  (let* ((children (oref section children))
+         (show (seq-some (##oref % hidden) children)))
+    (dolist (c children)
+      (oset c hidden show)))
+  (magit-section-show section))
+
+(defun magit-section-show-children (section &optional depth)
+  "Recursively show the bodies of children of the current section.
+With a prefix argument show children that deep and hide deeper
+children."
+  (interactive (list (magit-current-section)))
+  (magit-section-show-children-1 section depth)
+  (magit-section-show section))
+
+(defun magit-section-show-children-1 (section &optional depth)
+  (dolist (child (oref section children))
+    (oset child hidden nil)
+    (if depth
+        (if (> depth 0)
+            (magit-section-show-children-1 child (1- depth))
+          (magit-section-hide child))
+      (magit-section-show-children-1 child))))
+
+(defun magit-section-hide-children (section)
+  "Recursively hide the bodies of children of the current section."
+  (interactive (list (magit-current-section)))
+  (mapc #'magit-section-hide (oref section children)))
+
+(defun magit-section-show-headings (section)
+  "Recursively show headings of children of the current section.
+Only show the headings, previously shown text-only bodies are
+hidden."
+  (interactive (list (magit-current-section)))
+  (magit-section-show-headings-1 section)
+  (magit-section-show section))
+
+(defun magit-section-show-headings-1 (section)
+  (dolist (child (oref section children))
+    (oset child hidden nil)
+    (when (or (oref child children)
+              (not (oref child content)))
+      (magit-section-show-headings-1 child))))
+
+(defun magit-section-cycle (section)
+  "Cycle visibility of current section and its children.
+
+If this command is invoked using \\`C-<tab>' and that is globally bound
+to `tab-next', then this command pivots to behave like that command, and
+you must instead use \\`C-c TAB' to cycle section visibility.
+
+If you would like to keep using \\`C-<tab>' to cycle section visibility
+but also want to use `tab-bar-mode', then you have to prevent that mode
+from using this key and instead bind another key to `tab-next'.  Because
+`tab-bar-mode' does not use a mode map but instead manipulates the
+global map, this involves advising `tab-bar--define-keys'."
+  (interactive (list (magit-current-section)))
+  (cond-let
+    ((and (equal (this-command-keys) [C-tab])
+          (eq (global-key-binding [C-tab]) 'tab-next)
+          (fboundp 'tab-bar-switch-to-next-tab))
+     (tab-bar-switch-to-next-tab current-prefix-arg))
+    ((eq section magit-root-section)
+     (magit-section-cycle-global))
+    ((oref section hidden)
+     (magit-section-show section)
+     (magit-section-hide-children section))
+    [[children (oref section children)]]
+    ((and (seq-some (##oref % hidden)   children)
+          (seq-some (##oref % children) children))
+     (magit-section-show-headings section))
+    ((seq-some #'magit-section-hidden-body children)
+     (magit-section-show-children section))
+    ((magit-section-hide section))))
+
+(defun magit-section-cycle-global ()
+  "Cycle visibility of all sections in the current buffer."
+  (interactive)
+  (cond-let
+    [[children (oref magit-root-section children)]]
+    ((and (seq-some (##oref % hidden)   children)
+          (seq-some (##oref % children) children))
+     (magit-section-show-headings magit-root-section))
+    ((seq-some #'magit-section-hidden-body children)
+     (magit-section-show-children magit-root-section))
+    ((mapc #'magit-section-hide children))))
+
+(defun magit-section-hidden (section)
+  "Return t if the content of SECTION or of any ancestor is hidden.
+Ignore whether the body of any of SECTION's descendants is hidden.
+When the status of descendants is irrelevant but that of ancestors
+matters, instead use `magit-section-hidden-body'."
+  (or (oref section hidden)
+      (and$ (oref section parent)
+            (magit-section-hidden $))))
+
+(defun magit-section-hidden-body (section &optional pred)
+  "Return t if the content of SECTION or of any descendant is hidden.
+Ignore whether the body of any of SECTION's ancestors is hidden;
+if you need that use `magit-section-hidden'."
+  (if-let ((children (oref section children)))
+      (funcall (or pred #'seq-some) #'magit-section-hidden-body children)
+    (and (oref section content)
+         (oref section hidden))))
+
+(defalias 'magit-section-invisible-p #'magit-section-hidden)
+
+(defun magit-section-content-p (section)
+  "Return non-nil if SECTION has content or an unused washer function."
+  (with-slots (content end washer) section
+    (and content (or (not (= content end)) washer))))
+
+(defun magit-section-show-level (level)
+  "Show surrounding sections up to LEVEL.
+Likewise hide sections at higher levels.  If the region selects multiple
+sibling sections, act on all marked trees.  If LEVEL is negative, show
+all sections up to the absolute value of that, not just surrounding
+sections."
+  (if (< level 0)
+      (let ((s (magit-current-section)))
+        (setq level (- level))
+        (while (> (1- (length (magit-section-ident s))) level)
+          (setq s (oref s parent))
+          (goto-char (oref s start)))
+        (magit-section-show-children magit-root-section (1- level)))
+    (dolist (section (or (magit-region-sections)
+                         (list (magit-current-section))))
+      (cl-do* ((s section
+                  (oref s parent))
+               (i (1- (length (magit-section-ident s)))
+                  (decf i)))
+          ((cond ((< i level) (magit-section-show-children s (- level i 1)) t)
+                 ((= i level) (magit-section-hide s) t))
+           (magit-section-goto s))))))
+
+(defun magit-section-show-level-1 ()
+  "Show surrounding sections on first level."
+  (interactive)
+  (magit-section-show-level 1))
+
+(defun magit-section-show-level-1-all ()
+  "Show all sections on first level."
+  (interactive)
+  (magit-section-show-level -1))
+
+(defun magit-section-show-level-2 ()
+  "Show surrounding sections up to second level."
+  (interactive)
+  (magit-section-show-level 2))
+
+(defun magit-section-show-level-2-all ()
+  "Show all sections up to second level."
+  (interactive)
+  (magit-section-show-level -2))
+
+(defun magit-section-show-level-3 ()
+  "Show surrounding sections up to third level."
+  (interactive)
+  (magit-section-show-level 3))
+
+(defun magit-section-show-level-3-all ()
+  "Show all sections up to third level."
+  (interactive)
+  (magit-section-show-level -3))
+
+(defun magit-section-show-level-4 ()
+  "Show surrounding sections up to fourth level."
+  (interactive)
+  (magit-section-show-level 4))
+
+(defun magit-section-show-level-4-all ()
+  "Show all sections up to fourth level."
+  (interactive)
+  (magit-section-show-level -4))
+
+(defun magit-mouse-toggle-section (event)
+  "Toggle visibility of the clicked section.
+Clicks outside either the section heading or the left fringe are
+silently ignored."
+  (interactive "e")
+  (let* ((pos (event-start event))
+         (section (magit-section-at (posn-point pos))))
+    (if (eq (posn-area pos) 'left-fringe)
+        (when section
+          (while (not (magit-section-content-p section))
+            (setq section (oref section parent)))
+          (unless (eq section magit-root-section)
+            (goto-char (oref section start))
+            (magit-section-toggle section)))
+      (magit-section-toggle section))))
+
+;;;; Auxiliary
+
+(defun magit-describe-section-briefly (&optional section ident interactive)
+  "Show information about SECTION or the section at point.
+With a prefix argument show the section identity instead of the
+section lineage.  This command is intended for debugging purposes.
+Non-interactively, just return the information.  Interactively,
+or when INTERACTIVE is non-nil, show the section in the echo area."
+  (interactive (list (magit-current-section) current-prefix-arg t))
+  (unless section
+    (setq section (magit-current-section)))
+  (let ((str (format "#<%s %S %S %s-%s%s>"
+                     (eieio-object-class section)
+                     (let ((val (oref section value)))
+                       (cond ((stringp val)
+                              (substring-no-properties val))
+                             ((and (eieio-object-p val)
+                                   (fboundp 'cl-prin1-to-string))
+                              (cl-prin1-to-string val))
+                             (val)))
+                     (if ident
+                         (magit-section-ident section)
+                       (apply #'vector (magit-section-lineage section)))
+                     (and$ (oref section start)
+                           (if (markerp $) (marker-position $) $))
+                     (if-let ((m (oref section content)))
+                         (format "[%s-]"
+                                 (if (markerp m) (marker-position m) m))
+                       "")
+                     (and$ (oref section end)
+                           (if (markerp $) (marker-position $) $)))))
+    (when interactive
+      (message "%s" str))
+    str))
+
+(cl-defmethod cl-print-object ((section magit-section) stream)
+  "Print `magit-describe-section' result of SECTION."
+  (princ (magit-describe-section-briefly section) stream))
+
+(defun magit-describe-section (section &optional interactive-p)
+  "Show information about the section at point."
+  (interactive (list (magit-current-section) t))
+  (let ((inserter-section section))
+    (while (and inserter-section (not (oref inserter-section inserter)))
+      (setq inserter-section (oref inserter-section parent)))
+    (when (and inserter-section (oref inserter-section inserter))
+      (setq section inserter-section)))
+  (pcase (oref section inserter)
+    (`((,hook ,fun) . ,src-src)
+     (help-setup-xref `(magit-describe-section ,section) interactive-p)
+     (with-help-window (help-buffer)
+       (with-current-buffer standard-output
+         (insert (format-message
+                  "%s\n  is inserted by `%s'\n  from `%s'"
+                  (magit-describe-section-briefly section)
+                  (make-text-button (symbol-name fun) nil
+                                    :type 'help-function
+                                    'help-args (list fun))
+                  (make-text-button (symbol-name hook) nil
+                                    :type 'help-variable
+                                    'help-args (list hook))))
+         (pcase-dolist (`(,hook ,fun) src-src)
+           (insert (format-message
+                    ",\n  called by `%s'\n  from `%s'"
+                    (make-text-button (symbol-name fun) nil
+                                      :type 'help-function
+                                      'help-args (list fun))
+                    (make-text-button (symbol-name hook) nil
+                                      :type 'help-variable
+                                      'help-args (list hook)))))
+         (insert ".\n\n")
+         (insert
+          (format-message
+           "`%s' is "
+           (make-text-button (symbol-name fun) nil
+                             :type 'help-function 'help-args (list fun))))
+         (describe-function-1 fun))))
+    (_ (message "%s, inserter unknown"
+                (magit-describe-section-briefly section)))))
+
+;;; Match
+
+(cl-defun magit-section-match
+    (condition &optional (section (magit-current-section)))
+  "Return t if SECTION matches CONDITION.
+
+SECTION defaults to the section at point.  If SECTION is not
+specified and there also is no section at point, then return
+nil.
+
+CONDITION can take the following forms:
+  (CONDITION...)  matches if any of the CONDITIONs matches.
+  [CLASS...]      matches if the section's class is the same
+                  as the first CLASS or a subclass of that;
+                  the section's parent class matches the
+                  second CLASS; and so on.
+  [* CLASS...]    matches sections that match [CLASS...] and
+                  also recursively all their child sections.
+  CLASS           matches if the section's class is the same
+                  as CLASS or a subclass of that; regardless
+                  of the classes of the parent sections.
+
+Each CLASS should be a class symbol, identifying a class that
+derives from `magit-section'.  For backward compatibility CLASS
+can also be a \"type symbol\".  A section matches such a symbol
+if the value of its `type' slot is `eq'.  If a type symbol has
+an entry in `magit--section-type-alist', then a section also
+matches that type if its class is a subclass of the class that
+corresponds to the type as per that alist.
+
+Note that it is not necessary to specify the complete section
+lineage as printed by `magit-describe-section-briefly', unless
+of course you want to be that precise."
+  (and section (magit-section-match-1 condition section)))
+
+(defun magit-section-match-1 (condition section)
+  (cl-assert condition)
+  (and section
+       (if (listp condition)
+           (seq-find (##magit-section-match-1 % section) condition)
+         (magit-section-match-2 (if (symbolp condition)
+                                    (list condition)
+                                  (cl-coerce condition 'list))
+                                section))))
+
+(defun magit-section-match-2 (condition section)
+  (if (eq (car condition) '*)
+      (or (magit-section-match-2 (cdr condition) section)
+          (and$ (oref section parent)
+                (magit-section-match-2 condition $)))
+    (and (cond-let
+           [[c (car condition)]]
+           ((class-p c)
+            (cl-typep section c))
+           ([class (cdr (assq c magit--section-type-alist))]
+            (cl-typep section class))
+           ((eq (oref section type) c)))
+         (or (not (setq condition (cdr condition)))
+             (and$ (oref section parent)
+                   (magit-section-match-2 condition $))))))
+
+(defun magit-section-value-if (condition &optional section)
+  "If the section at point matches CONDITION, then return its value.
+
+If optional SECTION is non-nil then test whether that matches
+instead.  If there is no section at point and SECTION is nil,
+then return nil.  If the section does not match, then return
+nil.
+
+See `magit-section-match' for the forms CONDITION can take."
+  (and$ (or section (magit-current-section))
+        (and (magit-section-match condition $)
+             (oref $ value))))
+
+(defmacro magit-section-case (&rest clauses)
+  "Choose among clauses on the type of the section at point.
+
+Each clause looks like (CONDITION BODY...).  The type of the
+section is compared against each CONDITION; the BODY forms of the
+first match are evaluated sequentially and the value of the last
+form is returned.  Inside BODY the symbol `it' is bound to the
+section at point.  If no clause succeeds or if there is no
+section at point, return nil.
+
+See `magit-section-match' for the forms CONDITION can take.
+Additionally a CONDITION of t is allowed in the final clause, and
+matches if no other CONDITION match, even if there is no section
+at point."
+  (declare (indent 0)
+           (debug (&rest (sexp body))))
+  `(let ((it (magit-current-section)))
+     (cond ,@(mapcar (lambda (clause)
+                       `(,(or (eq (car clause) t)
+                              `(and it
+                                    (magit-section-match-1 ',(car clause) it)))
+                         ,@(cdr clause)))
+                     clauses))))
+
+(defun magit-section-match-assoc (section alist)
+  "Return the value associated with SECTION's type or lineage in ALIST."
+  (seq-some (pcase-lambda (`(,key . ,val))
+              (and (magit-section-match-1 key section) val))
+            alist))
+
+;;; Create
+
+(defvar magit-insert-section-hook nil
+  "Hook run after `magit-insert-section's BODY.
+Avoid using this hook and only ever do so if you know
+what you are doing and are sure there is no other way.")
+
+(defmacro magit-insert-section (&rest args)
+  "Insert a section at point.
+
+Create a section object of type CLASS, storing VALUE in its
+`value' slot, and insert the section at point.  CLASS is a
+subclass of `magit-section' or has the form `(eval FORM)', in
+which case FORM is evaluated at runtime and should return a
+subclass.  In other places a sections class is often referred
+to as its \"type\".
+
+Many commands behave differently depending on the class of the
+current section and sections of a certain class can have their
+own keymap, which is specified using the `keymap' class slot.
+The value of that slot should be a variable whose value is a
+keymap.
+
+For historic reasons Magit and Forge in most cases use symbols
+as CLASS that don't actually identify a class and that lack the
+appropriate package prefix.  This works due to some undocumented
+kludges, which are not available to other packages.
+
+When optional HIDE is non-nil collapse the section body by
+default, i.e., when first creating the section, but not when
+refreshing the buffer.  Else expand it by default.  This can be
+overwritten using `magit-section-set-visibility-hook'.  When a
+section is recreated during a refresh, then the visibility of
+predecessor is inherited and HIDE is ignored (but the hook is
+still honored).
+
+BODY is any number of forms that actually insert the section's
+heading and body.  Optional NAME, if specified, has to be a
+symbol, which is then bound to the object of the section being
+inserted.
+
+Before BODY is evaluated the `start' of the section object is set
+to the value of `point' and after BODY was evaluated its `end' is
+set to the new value of `point'; BODY is responsible for moving
+`point' forward.
+
+If it turns out inside BODY that the section is empty, then
+`magit-cancel-section' can be used to abort and remove all traces
+of the partially inserted section.  This can happen when creating
+a section by washing Git's output and Git didn't actually output
+anything this time around.
+
+\(fn [NAME] (CLASS &optional VALUE HIDE) &rest BODY)"
+  (declare (indent 1) ;sic
+           (debug ([&optional symbolp]
+                   (&or [("eval" form) &optional form form &rest form]
+                        [symbolp &optional form form &rest form])
+                   body)))
+  (pcase-let* ((bind (and (symbolp (car args))
+                          (pop args)))
+               (`((,class ,value ,hide . ,args) . ,body) args)
+               (obj (gensym "section")))
+    `(let* ((,obj (magit-insert-section--create
+                   ,(if (eq (car-safe class) 'eval) (cadr class) `',class)
+                   ,value ,hide ,@args))
+            (magit-insert-section--current ,obj)
+            (magit-insert-section--oldroot
+             (or magit-insert-section--oldroot
+                 (and (not magit-insert-section--parent)
+                      (prog1 magit-root-section
+                        (setq magit-root-section ,obj)))))
+            (magit-insert-section--parent ,obj))
+       (catch 'cancel-section
+         ,@(if bind `((let ((,bind ,obj)) ,@body)) body)
+         (magit-insert-section--finish ,obj))
+       ,obj)))
+
+(defun magit-insert-section--create (class value hide &rest args)
+  (let (type)
+    (if (class-p class)
+        (setq type (or (car (rassq class magit--section-type-alist))
+                       class))
+      (setq type class)
+      (setq class (or (cdr (assq class magit--section-type-alist))
+                      'magit-section)))
+    (let ((obj (apply class :type type args)))
+      (oset obj value value)
+      (oset obj parent magit-insert-section--parent)
+      (oset obj start (if magit-section-inhibit-markers (point) (point-marker)))
+      (unless (slot-boundp obj 'hidden)
+        (oset obj hidden
+              (let (set old)
+                (cond
+                  ((setq set (run-hook-with-args-until-success
+                              'magit-section-set-visibility-hook obj))
+                   (eq set 'hide))
+                  ((setq old (and (not magit-section-preserve-visibility)
+                                  magit-insert-section--oldroot
+                                  (magit-get-section
+                                   (magit-section-ident obj)
+                                   magit-insert-section--oldroot)))
+                   (oref old hidden))
+                  ((setq set (magit-section-match-assoc
+                              obj magit-section-initial-visibility-alist))
+                   (eq (if (functionp set) (funcall set obj) set) 'hide))
+                  (hide)))))
+      (unless (oref obj keymap)
+        (let ((type (oref obj type)))
+          (oset obj keymap
+                (or (let ((sym (intern (format "magit-%s-section-map" type))))
+                      (and (boundp sym) sym))
+                    (let ((sym (intern (format "forge-%s-section-map" type))))
+                      (and (boundp sym) sym))))))
+      obj)))
+
+(defun magit-insert-section--finish (obj)
+  (run-hooks 'magit-insert-section-hook)
+  (if magit-section-inhibit-markers
+      (oset obj end (point))
+    (oset obj end (point-marker))
+    (set-marker-insertion-type (oref obj start) t))
+  (cond
+    ((eq obj magit-root-section)
+     (when (eq magit-section-inhibit-markers 'delay)
+       (setq magit-section-inhibit-markers nil)
+       (magit-map-sections
+        (lambda (section)
+          (oset section start (copy-marker (oref section start) t))
+          (oset section end   (copy-marker (oref section end)   t))))))
+    (t
+     (magit-section--set-section-properties obj)
+     (magit-section-maybe-add-heading-map obj)
+     (when (oref obj children)
+       (magit-insert-child-count obj))
+     (if magit-section-insert-in-reverse
+         (push obj (oref (oref obj parent) children))
+       (let ((parent (oref obj parent)))
+         (oset parent children
+               (nconc (oref parent children)
+                      (list obj)))))))
+  (when magit-section-insert-in-reverse
+    (oset obj children (nreverse (oref obj children)))))
+
+(defun magit-cancel-section (&optional if-empty)
+  "Cancel inserting the section that is currently being inserted.
+
+Canceling returns from the inner most use of `magit-insert-section' and
+removes all text that was inserted by that.
+
+If optional IF-EMPTY is non-nil, then only cancel the section, if it is
+empty.  If a section is split into a heading and a body (i.e., when its
+`content' slot is non-nil), then only check if the body is empty."
+  (when (and magit-insert-section--current
+             (or (not if-empty)
+                 (= (point) (or (oref magit-insert-section--current content)
+                                (oref magit-insert-section--current start)))))
+    (if (eq magit-insert-section--current magit-root-section)
+        (insert "(empty)\n")
+      (delete-region (oref magit-insert-section--current start)
+                     (point))
+      (setq magit-insert-section--current nil)
+      (throw 'cancel-section nil))))
+
+(defun magit-insert-heading (&rest args)
+  "Insert the heading for the section currently being inserted.
+
+This function should only be used inside `magit-insert-section'.
+
+When called without any arguments, then just set the `content'
+slot of the object representing the section being inserted to
+a marker at `point'.  The section should only contain a single
+line when this function is used like this.
+
+When called with arguments ARGS, which have to be strings, or
+nil, then insert those strings at point.  The section should not
+contain any text before this happens and afterwards it should
+again only contain a single line.  If the `face' property is set
+anywhere inside any of these strings, then insert all of them
+unchanged.  Otherwise use the `magit-section-heading' face for
+all inserted text.
+
+The `content' property of the section object is the end of the
+heading (which lasts from `start' to `content') and the beginning
+of the the body (which lasts from `content' to `end').  If the
+value of `content' is nil, then the section has no heading and
+its body cannot be collapsed.  If a section does have a heading,
+then its height must be exactly one line, including a trailing
+newline character.  This isn't enforced, you are responsible for
+getting it right.  The only exception is that this function does
+insert a newline character if necessary
+
+If provided, optional CHILD-COUNT must evaluate to an integer or
+boolean.  If t, then the count is determined once the children have been
+inserted, using `magit-insert-child-count' (which see).  For historic
+reasons, if the heading ends with \":\", the count is substituted for
+that, at this time as well.  If `magit-section-show-child-count' is nil,
+no counts are inserted
+
+\n(fn [CHILD-COUNT] &rest STRINGS)"
+  (declare (indent defun))
+  (when args
+    (let ((count (and (or (integerp (car args))
+                          (booleanp (car args)))
+                      (pop args)))
+          (heading (apply #'concat args)))
+      (insert (if (or (text-property-not-all 0 (length heading)
+                                             'font-lock-face nil heading)
+                      (text-property-not-all 0 (length heading)
+                                             'face nil heading))
+                  heading
+                (propertize heading 'font-lock-face 'magit-section-heading)))
+      (when (and count magit-section-show-child-count)
+        (insert (propertize (format " (%s)" count)
+                            'font-lock-face 'magit-section-child-count)))))
+  (unless (bolp)
+    (insert ?\n))
+  (when (fboundp 'magit-maybe-make-margin-overlay)
+    (magit-maybe-make-margin-overlay))
+  (oset magit-insert-section--current content
+        (if magit-section-inhibit-markers (point) (point-marker))))
+
+(defmacro magit-insert-section-body (&rest body)
+  "Use BODY to insert the section body, once the section is expanded.
+If the section is expanded when it is created, then this is
+like `progn'.  Otherwise BODY isn't evaluated until the section
+is explicitly expanded."
+  (declare (indent 0))
+  (let ((f (gensym))
+        (s (gensym))
+        (l (gensym)))
+    `(let ((,f (lambda () ,@body)))
+       (if (oref magit-insert-section--current hidden)
+           (oset magit-insert-section--current washer
+                 (let ((,s magit-insert-section--current))
+                   (lambda ()
+                     (let ((,l (magit-section-lineage ,s t)))
+                       (dolist (s ,l)
+                         (set-marker-insertion-type (oref s end) t))
+                       (funcall ,f)
+                       (dolist (s ,l)
+                         (set-marker-insertion-type (oref s end) nil))
+                       (magit-section--set-section-properties ,s)
+                       (magit-section-maybe-remove-heading-map ,s)
+                       (magit-section-maybe-remove-visibility-indicator ,s)))))
+         (funcall ,f)))))
+
+(defun magit-insert-headers (hook)
+  (let* ((header-sections nil)
+         (fn (##push magit-insert-section--current header-sections)))
+    (unwind-protect
+        (progn
+          (add-hook 'magit-insert-section-hook fn -90 t)
+          (magit-run-section-hook hook)
+          (when header-sections
+            (insert "\n")
+            ;; Make the first header into the parent of the rest.
+            (when (cdr header-sections)
+              (setq header-sections (nreverse header-sections))
+              (let* ((1st-header (pop header-sections))
+                     (header-parent (oref 1st-header parent)))
+                (oset header-parent children (list 1st-header))
+                (oset 1st-header children header-sections)
+                (oset 1st-header content (oref (car header-sections) start))
+                (oset 1st-header end (oref (car (last header-sections)) end))
+                (dolist (sub-header header-sections)
+                  (oset sub-header parent 1st-header))
+                (magit-section-maybe-add-heading-map 1st-header)))))
+      (remove-hook 'magit-insert-section-hook fn t))))
+
+(defun magit-section--set-section-properties (section)
+  (pcase-let* (((eieio start end children keymap) section)
+               (props `( magit-section ,section
+                         ,@(and$ (symbol-value keymap)
+                                 (list 'keymap $)))))
+    (if children
+        (save-excursion
+          (goto-char start)
+          (while (< (point) end)
+            (let ((next (or (next-single-property-change (point) 'magit-section)
+                            end)))
+              (unless (magit-section-at)
+                (add-text-properties (point) next props))
+              (goto-char next))))
+      (add-text-properties start end props))))
+
+(defun magit-section-maybe-add-heading-map (section)
+  (when (magit-section-content-p section)
+    (let ((start (oref section start))
+          (map (oref section keymap)))
+      (when (symbolp map)
+        (setq map (symbol-value map)))
+      (put-text-property
+       start
+       (magit--eol-position start)
+       'keymap (if map
+                   (make-composed-keymap
+                    (list map magit-section-heading-map))
+                 magit-section-heading-map)))))
+
+(defun magit-section-maybe-remove-heading-map (section)
+  (with-slots (start content end keymap) section
+    (when (= content end)
+      (put-text-property start end 'keymap
+                         (if (symbolp keymap) (symbol-value keymap) keymap)))))
+
+(defun magit-insert-child-count (section)
+  "Modify SECTION's heading to contain number of child sections.
+
+If `magit-section-show-child-count' is non-nil and the SECTION
+has children and its heading ends with \":\", then replace that
+with \" (N)\", where N is the number of child sections.
+
+This function is called by `magit-insert-section' after that has
+evaluated its BODY.  Admittedly that's a bit of a hack."
+  (let (content count)
+    (cond
+      ((not (and magit-section-show-child-count
+                 (setq content (oref section content))
+                 (setq count (length (oref section children)))
+                 (> count 0))))
+      ((eq (char-before (- content 1)) ?:)
+       (save-excursion
+         (goto-char (- content 2))
+         (insert (magit--propertize-face (format " (%s)" count)
+                                         'magit-section-child-count))
+         (delete-char 1)))
+      ((and (eq (char-before (- content 4)) ?\s)
+            (eq (char-before (- content 3)) ?\()
+            (eq (char-before (- content 2)) ?t )
+            (eq (char-before (- content 1)) ?\)))
+       (save-excursion
+         (goto-char (- content 3))
+         (delete-char 1)
+         (insert (format "%s" count)))))))
+
+(defun magit-section--opportunistic-wash (section)
+  (when-let ((washer (oref section washer)))
+    (oset section washer nil)
+    (let ((inhibit-read-only t)
+          (magit-insert-section--parent section)
+          (magit-insert-section--current section))
+      (save-excursion
+        (goto-char (oref section end))
+        (oset section content (point-marker))
+        (funcall washer)
+        (oset section end (point-marker))))
+    (setq magit-section-highlight-force-update t)))
+
+;;; Highlight
+
+(defvar magit-section--refreshed-buffers nil)
+
+(defun magit-section-pre-command-hook ()
+  (when (and (or magit--context-menu-buffer
+                 magit--context-menu-section)
+             (not (eq (ignore-errors
+                        (event-basic-type (aref (this-command-keys) 0)))
+                      'mouse-3)))
+    ;; This is the earliest opportunity to clean up after an aborted
+    ;; context-menu because that neither causes the command that created
+    ;; the menu to abort nor some abortion hook to be run.  It is not
+    ;; possible to update highlighting before the first command invoked
+    ;; after the menu is aborted.  Here we can only make sure it is
+    ;; updated afterwards.
+    (magit-menu-highlight-point-section))
+  (setq magit-section--refreshed-buffers nil)
+  (setq magit-section-pre-command-region-p (region-active-p))
+  (setq magit-section-pre-command-section (magit-current-section))
+  (setq magit-section-focused-sections nil))
+
+(defun magit-section-post-command-hook ()
+  (let ((window (selected-window)))
+    ;; The command may have used `set-window-buffer' to change
+    ;; the window's buffer without changing the current buffer.
+    (when (eq (current-buffer) (window-buffer window))
+      (cursor-sensor-move-to-tangible window)
+      (when (or magit--context-menu-buffer
+                magit--context-menu-section)
+        (magit-menu-highlight-point-section))))
+  (unless (memq (current-buffer) magit-section--refreshed-buffers)
+    (magit-section-update-highlight))
+  (setq magit-section--refreshed-buffers nil))
+
+(defun magit-section-deactivate-mark ()
+  (setq magit-section-highlight-force-update t))
+
+(defun magit-section-update-highlight (&optional force)
+  (let ((section (magit-current-section))
+        (focused (magit-focused-sections)))
+    (cond
+      ((or force
+           magit-section-highlight-force-update
+           (xor magit-section-pre-command-region-p (region-active-p))
+           (not (eq magit-section-pre-command-section section)))
+       (let ((inhibit-read-only t)
+             (deactivate-mark nil)
+             (selection (magit-region-sections)))
+         (mapc #'delete-overlay magit-section-highlight-overlays)
+         (mapc #'delete-overlay magit-section-selection-overlays)
+         (setq magit-section-highlight-overlays nil)
+         (setq magit-section-selection-overlays nil)
+         (cond ((magit-section--maybe-enable-long-lines-shortcuts))
+               ((eq section magit-root-section))
+               ((not magit-section-highlight-current)
+                (when selection
+                  (magit-section-highlight-selection selection)))
+               ((not selection)
+                (magit-section-highlight section))
+               (t
+                (mapc #'magit-section-highlight selection)
+                (magit-section-highlight-selection selection)))
+         (dolist (section (cl-union magit-section-highlighted-sections focused))
+           (when (slot-boundp section 'painted)
+             (magit-section-update-paint section focused)))
+         (restore-buffer-modified-p nil)))
+      ((and (eq magit-section-pre-command-section section)
+            magit-section-selection-overlays
+            (region-active-p)
+            (not (magit-region-sections)))
+       (mapc #'delete-overlay magit-section-selection-overlays)
+       (setq magit-section-selection-overlays nil)))
+    (setq magit-section-highlight-force-update nil)
+    (magit-section-maybe-paint-visibility-ellipses)))
+
+(cl-defmethod magit-section-highlight ((section magit-section))
+  (pcase-let*
+      (((eieio start content end children heading-highlight-face) section)
+       (headlight heading-highlight-face)
+       (selective (magit-section-selective-highlight-p section)))
+    (cond
+      (selective
+       (magit-section-highlight-range start (or content end) headlight)
+       (cond (children
+              (let ((child-start (oref (car children) start)))
+                (when (and content (< content child-start))
+                  (magit-section-highlight-range content child-start)))
+              (mapc #'magit-section-highlight children))
+             ((and content (not (slot-boundp section 'painted)))
+              (magit-section-highlight-range content end))
+             ;; Unfortunate kludge for delayed hunk refinement.
+             ((magit-section--refine section))))
+      (headlight
+       (magit-section-highlight-range start (or content end) headlight)
+       (when content
+         (magit-section-highlight-range (if headlight content start) end)))
+      ((magit-section-highlight-range start end)))))
+
+(defun magit-section-highlight-selection (selection)
+  (when magit-section-highlight-selection
+    (dolist (sibling selection)
+      (with-slots (start content end heading-selection-face) sibling
+        (let ((ov (make-overlay start (or content end) nil t)))
+          (overlay-put ov 'font-lock-face
+                       (or heading-selection-face
+                           'magit-section-heading-selection))
+          (overlay-put ov 'evaporate t)
+          (overlay-put ov 'priority '(nil . 9))
+          (push ov magit-section-selection-overlays)
+          ov)))))
+
+(defun magit-section-highlight-range (start end &optional face)
+  (let ((ov (make-overlay start end nil t)))
+    (overlay-put ov 'font-lock-face (or face 'magit-section-highlight))
+    (overlay-put ov 'evaporate t)
+    (push ov magit-section-highlight-overlays)
+    ov))
+
+(defun magit-section-selective-highlight-p (section &optional as-child)
+  (or (oref section selective-highlight)
+      (and as-child
+           (oref section heading-highlight-face))
+      (slot-boundp section 'painted)
+      (and$ (oref section children)
+            (magit-section-selective-highlight-p (car $) t))))
+
+;;; Paint
+
+(defun magit-section-update-paint (section focused-sections)
+  (cl-flet ((paint (highlight)
+              (let ((inhibit-read-only t))
+                (save-excursion
+                  (goto-char (oref section start))
+                  (magit-section-paint section highlight))))
+            (unregister ()
+              (setq magit-section-highlighted-sections
+                    (delq section magit-section-highlighted-sections))))
+    (if (magit-section-hidden section)
+        ;; If the section is highlighted but unfocused, it remains
+        ;; highlighted, but `magit-section--opportunistic-paint' via
+        ;; `magit-section-show' will unhighlight on expansion, and
+        ;; before then (or if a refresh occurs first) it doesn't matter.
+        (unregister)
+      (pcase (list (if (memq section focused-sections) 'focus 'unfocus)
+                   (oref section painted))
+        (`(focus ,(or 'nil 'plain))
+         (paint t)
+         (cl-pushnew section magit-section-highlighted-sections))
+        (`(focus highlight)
+         (cl-pushnew section magit-section-highlighted-sections))
+        (`(unfocus ,(or 'nil 'highlight))
+         (paint nil)
+         (unregister))
+        ('(unfocus plain)
+         (unregister))))))
+
+(cl-defmethod magit-section-paint ((section magit-section) _highlight)
+  (error "Slot `paint' bound but `magit-section-paint' not implemented for `%s'"
+         (eieio-object-class-name section)))
+
+(defun magit-section--opportunistic-paint (section)
+  (when (and (not (oref section hidden))
+             (slot-boundp section 'painted))
+    (if magit--refreshing-buffer-p
+        ;; Defer to `magit-section-update-highlight'.
+        (unless (oref section painted)
+          (cl-pushnew section magit-section-highlighted-sections))
+      (magit-section-update-paint section (magit-focused-sections)))))
+
+(cl-defmethod magit-section--refine ((_section magit-section)))
+
+;;; Long Lines
+
+(defvar magit-show-long-lines-warning t)
+
+(defun magit-section--maybe-enable-long-lines-shortcuts ()
+  (and (fboundp 'long-line-optimizations-p)
+       (long-line-optimizations-p)
+       (prog1 t
+         (message "Enabling long lines shortcuts in %S" (current-buffer))
+         (kill-local-variable 'redisplay-highlight-region-function)
+         (kill-local-variable 'redisplay-unhighlight-region-function)
+         (when magit-show-long-lines-warning
+           (setq magit-show-long-lines-warning nil)
+           (display-warning 'magit (format "\
+Emacs has enabled redisplay shortcuts
+in this buffer because there are lines whose length go beyond
+`long-line-threshold' (%s characters).  As a result, section
+highlighting and the special appearance of the region has been
+disabled.
+
+These shortcuts remain enabled, even once there no longer are
+any long lines in this buffer.  To disable them again, kill
+and recreate the buffer.
+
+This message won't be shown for this session again.  To disable
+it for all future sessions, set `magit-show-long-lines-warning'
+to nil." (bound-and-true-p long-line-threshold)) :warning)))))
+
+;;; Successor
+
+(cl-defgeneric magit-section-get-relative-position (section))
+
+(cl-defmethod magit-section-get-relative-position ((section magit-section))
+  (let ((start (oref section start))
+        (point (magit-point)))
+    (list (- (line-number-at-pos point)
+             (line-number-at-pos start))
+          (- point (line-beginning-position)))))
+
+(cl-defgeneric magit-section-goto-successor ())
+
+(cl-defmethod magit-section-goto-successor ((section magit-section)
+                                            line char &optional _arg)
+  (or (magit-section-goto-successor--same section line char)
+      (magit-section-goto-successor--related section)))
+
+(defun magit-section-goto-successor--same (section line char)
+  (let ((ident (magit-section-ident section)))
+    (and-let ((found (magit-get-section ident)))
+      (let ((start (oref found start)))
+        (goto-char start)
+        (unless (eq found magit-root-section)
+          (ignore-errors
+            (forward-line line)
+            (forward-char char))
+          (unless (eq (magit-current-section) found)
+            (goto-char start)))
+        t))))
+
+(defun magit-section-goto-successor--related (section)
+  (and-let ((found (magit-section-goto-successor--related-1 section)))
+    (goto-char (if (eq (oref found type) 'button)
+                   (point-min)
+                 (oref found start)))))
+
+(defun magit-section-goto-successor--related-1 (section)
+  (or (and$ (pcase (oref section type)
+              ('staged 'unstaged)
+              ('unstaged 'staged)
+              ('unpushed 'unpulled)
+              ('unpulled 'unpushed))
+            (magit-get-section `((,$) (status))))
+      (and$ (magit-section-siblings section 'next)
+            (magit-get-section (magit-section-ident (car $))))
+      (and$ (magit-section-siblings section 'prev)
+            (magit-get-section (magit-section-ident (car $))))
+      (and$ (oref section parent)
+            (or (magit-get-section (magit-section-ident $))
+                (magit-section-goto-successor--related-1 $)))))
+
+;;; Region
+
+(defvar-local magit-section--region-overlays nil)
+
+(defun magit-section--delete-region-overlays ()
+  (mapc #'delete-overlay magit-section--region-overlays)
+  (setq magit-section--region-overlays nil))
+
+(defun magit-section--highlight-region (start end window rol)
+  (magit-section--delete-region-overlays)
+  (if (and magit-section-highlight-selection
+           (not magit-section-keep-region-overlay)
+           (or (magit-region-sections)
+               (run-hook-with-args-until-success 'magit-region-highlight-hook
+                                                 (magit-current-section)))
+           (not (= (line-number-at-pos start)
+                   (line-number-at-pos end)))
+           ;; (not (eq (car-safe last-command-event) 'mouse-movement))
+           )
+      (funcall (default-value 'redisplay-unhighlight-region-function) rol)
+    (funcall (default-value 'redisplay-highlight-region-function)
+             start end window rol)))
+
+(defun magit-section--unhighlight-region (rol)
+  (magit-section--delete-region-overlays)
+  (funcall (default-value 'redisplay-unhighlight-region-function) rol))
+
+;;; Visibility
+
+(defvar-local magit-section-visibility-cache nil)
+(put 'magit-section-visibility-cache 'permanent-local t)
+
+(defun magit-section-cached-visibility (section)
+  "Return the visibility cached for SECTION.
+When `magit-section-preserve-visibility' is nil, return nil."
+  (and magit-section-preserve-visibility
+       (cdr (assoc (magit-section-ident section)
+                   magit-section-visibility-cache))))
+
+(cl-defun magit-section-cache-visibility
+    (&optional (section magit-insert-section--current))
+  "Cache SECTION's current visibility."
+  (setf (alist-get (magit-section-ident section)
+                   magit-section-visibility-cache
+                   nil nil #'equal)
+        (if (oref section hidden) 'hide 'show)))
+
+(cl-defun magit-section-maybe-cache-visibility
+    (&optional (section magit-insert-section--current))
+  (when (or (eq magit-section-cache-visibility t)
+            (memq (oref section type)
+                  magit-section-cache-visibility))
+    (magit-section-cache-visibility section)))
+
+(defun magit-section-visibility-indicator ()
+  (if (window-system)
+      (car magit-section-visibility-indicators)
+    (cadr magit-section-visibility-indicators)))
+
+(defun magit-section-maybe-update-visibility-indicator (section)
+  (when-let* ((indicator (magit-section-visibility-indicator))
+              (_(magit-section-content-p section)))
+    (let* ((beg (oref section start))
+           (eoh (magit--eol-position beg))
+           (kind (cl-typecase (car indicator)
+                   (symbol    'fringe)
+                   (character 'margin)
+                   (string    'ellipsis)))
+           (indicator (if (or (oref section hidden)
+                              (eq kind 'ellipsis))
+                          (car indicator)
+                        (cdr indicator))))
+      (pcase kind
+        ((or 'fringe 'margin)
+         (let ((ov (magit--overlay-at beg 'magit-vis-indicator kind)))
+           (unless ov
+             (setq ov (make-overlay beg eoh nil t))
+             (overlay-put ov 'evaporate t)
+             (overlay-put ov 'magit-vis-indicator kind))
+           (overlay-put
+            ov 'before-string
+            (pcase kind
+              ('fringe
+               (propertize "fringe" 'display
+                           `(left-fringe ,indicator fringe)))
+              ('margin
+               (propertize "margin" 'display
+                           `((margin left-margin)
+                             ,(propertize (string indicator)
+                                          'face 'magit-left-margin))))))))
+        ('ellipsis
+         (let ((ov (magit--overlay-at (1- eoh) 'magit-vis-indicator 'eoh)))
+           (cond ((oref section hidden)
+                  (unless ov
+                    (setq ov (make-overlay (1- eoh) eoh))
+                    (overlay-put ov 'evaporate t)
+                    (overlay-put ov 'magit-vis-indicator 'eoh))
+                  (overlay-put ov 'after-string indicator))
+                 (ov
+                  (delete-overlay ov)))))))))
+
+(defvar-local magit--ellipses-sections nil)
+
+(defun magit-section-maybe-paint-visibility-ellipses ()
+  ;; This is needed because we hide the body instead of "the body
+  ;; except the final newline and additionally the newline before
+  ;; the body"; otherwise we could use `buffer-invisibility-spec'.
+  (when-let* ((indicator (car (magit-section-visibility-indicator)))
+              (_(stringp indicator)))
+    (let* ((sections (append magit--ellipses-sections
+                             (setq magit--ellipses-sections
+                                   (or (magit-region-sections)
+                                       (list (magit-current-section))))))
+           (beg (mapcar (##oref % start) sections))
+           (end (mapcar (##oref % end)   sections)))
+      (when (region-active-p)
+        ;; This ensures that the region face is removed from ellipses
+        ;; when the region becomes inactive, but fails to ensure that
+        ;; all ellipses within the active region use the region face,
+        ;; because the respective overlay has not yet been updated at
+        ;; this time.  The magit-selection face is always applied.
+        (push (region-beginning) beg)
+        (push (region-end)       end))
+      (setq beg (apply #'min beg))
+      (setq end (apply #'max end))
+      (dolist (ov (overlays-in beg end))
+        (when (eq (overlay-get ov 'magit-vis-indicator) 'eoh)
+          (overlay-put
+           ov 'after-string
+           (propertize
+            indicator 'font-lock-face
+            (let ((pos (overlay-start ov)))
+              (delq nil (nconc (mapcar (##overlay-get % 'font-lock-face)
+                                       (overlays-at pos))
+                               (list (get-char-property
+                                      pos 'font-lock-face))))))))))))
+
+(defun magit-section-maybe-remove-visibility-indicator (section)
+  (when (and (magit-section-visibility-indicator)
+             (= (oref section content)
+                (oref section end)))
+    (dolist (o (overlays-in (oref section start)
+                            (1+ (magit--eol-position (oref section start)))))
+      (when (overlay-get o 'magit-vis-indicator)
+        (delete-overlay o)))))
+
+(defvar-local magit-section--opened-sections nil)
+
+(defun magit-section--open-temporarily (beg end)
+  (save-excursion
+    (goto-char beg)
+    (let ((section (magit-current-section)))
+      (while section
+        (let ((content (oref section content)))
+          (cond ((and (magit-section-hidden section)
+                      (<= (or content (oref section start))
+                          beg
+                          (oref section end)))
+                 (when content
+                   (magit-section-show section)
+                   (push section magit-section--opened-sections))
+                 (setq section (oref section parent)))
+                ((setq section nil)))))))
+  (or (eq search-invisible t)
+      (not (isearch-range-invisible beg end))))
+
+(define-advice isearch-clean-overlays (:around (fn) magit-mode)
+  (if (derived-mode-p 'magit-mode)
+      (let ((pos (point)))
+        (dolist (section magit-section--opened-sections)
+          (unless (<= (oref section content) pos (oref section end))
+            (magit-section-hide section)))
+        (setq magit-section--opened-sections nil))
+    (funcall fn)))
+
+(defun magit-section-reveal (section)
+  (while section
+    (when (oref section hidden)
+      (magit-section-show section))
+    (setq section (oref section parent))))
+
+;;; Utilities
+
+(cl-defun magit-section-selected-p (section &optional (selection nil sselection))
+  (and (not (eq section magit-root-section))
+       (or  (eq section (magit-current-section))
+            (memq section (if sselection
+                              selection
+                            (setq selection (magit-region-sections))))
+            (and$ (oref section parent)
+                  (magit-section-selected-p $ selection)))))
+
+(defun magit-section-parent-value (section)
+  (and$ (oref section parent)
+        (oref $ value)))
+
+(defun magit-section-siblings (section &optional direction)
+  "Return a list of the sibling sections of SECTION.
+
+If optional DIRECTION is `prev', then return siblings that come
+before SECTION.  If it is `next', then return siblings that come
+after SECTION.  For all other values, return all siblings
+excluding SECTION itself."
+  (and-let* ((parent (oref section parent))
+             (siblings (oref parent children)))
+    (pcase direction
+      ('prev  (cdr (member section (reverse siblings))))
+      ('next  (cdr (member section siblings)))
+      (_      (remq section siblings)))))
+
+(defun magit-focused-sections ()
+  "Return a list of the selected sections and all their descendants.
+If no sections are selected return a list of the current section and
+its descendants, except if that is the root section, in which case
+return nil."
+  (or magit-section-focused-sections
+      (setq magit-section-focused-sections
+            (let ((current (magit-current-section)))
+              (and (not (eq current magit-root-section))
+                   (let (sections)
+                     (letrec ((collect (lambda (section)
+                                         (mapc collect (oref section children))
+                                         (push section sections))))
+                       (mapc collect
+                             (or (magit-region-sections) (list current))))
+                     sections))))))
+
+(defun magit-region-values (&optional condition multiple)
+  "Return a list of the values of the selected sections.
+
+Return the values that themselves would be returned by
+`magit-region-sections' (which see)."
+  (mapcar (##oref % value)
+          (magit-region-sections condition multiple)))
+
+(defun magit-region-sections (&optional condition multiple)
+  "Return a list of the selected sections.
+
+When the region is active and constitutes a valid section
+selection, then return a list of all selected sections.  This is
+the case when the region begins in the heading of a section and
+ends in the heading of the same section or in that of a sibling
+section.  If optional MULTIPLE is non-nil, then the region cannot
+begin and end in the same section.
+
+When the selection is not valid, then return nil.  In this case,
+most commands that can act on the selected sections will instead
+act on the section at point.
+
+When the region looks like it would in any other buffer then
+the selection is invalid.  When the selection is valid then the
+region uses the `magit-section-highlight' face.  This does not
+apply to diffs where things get a bit more complicated, but even
+here if the region looks like it usually does, then that's not
+a valid selection as far as this function is concerned.
+
+If optional CONDITION is non-nil, then the selection not only
+has to be valid; all selected sections additionally have to match
+CONDITION, or nil is returned.  See `magit-section-match' for the
+forms CONDITION can take."
+  (and (region-active-p)
+       (let* ((rbeg (region-beginning))
+              (rend (region-end))
+              (sbeg (magit-section-at rbeg))
+              (send (magit-section-at rend)))
+         ;; It should be possible to select a single section using
+         ;; `set-mark-command', so don't use `use-region-p' above.
+         ;; We still have to prevent the selection overlay from
+         ;; being flashed when clicking inside a section, which
+         ;; the first condition accomplishes:
+         (and (or (not (eq this-command #'mouse-drag-region))
+                  (> rend rbeg))
+              send
+              (not (eq send magit-root-section))
+              (not (and (eq send sbeg)
+                        (or multiple
+                            (> rend rbeg))))
+              (let ((siblings (cons sbeg (magit-section-siblings sbeg 'next)))
+                    (sections ()))
+                (and (memq send siblings)
+                     (magit-section-position-in-heading-p sbeg rbeg)
+                     (magit-section-position-in-heading-p send rend)
+                     (progn
+                       (while siblings
+                         (push (car siblings) sections)
+                         (when (eq (pop siblings) send)
+                           (setq siblings nil)))
+                       (setq sections (nreverse sections))
+                       (and (or (not condition)
+                                (all (##magit-section-match condition %)
+                                     sections))
+                            sections))))))))
+
+(defun magit-map-sections (function &optional section)
+  "Apply FUNCTION to all sections for side effects only, depth first.
+If optional SECTION is non-nil, only map over that section and
+its descendants, otherwise map over all sections in the current
+buffer, ending with `magit-root-section'."
+  (let ((section (or section magit-root-section)))
+    (mapc (##magit-map-sections function %)
+          (oref section children))
+    (funcall function section)))
+
+(defun magit-section-position-in-heading-p (&optional section pos)
+  "Return t if POSITION is inside the heading of SECTION.
+POSITION defaults to point and SECTION defaults to the
+current section."
+  (unless section
+    (setq section (magit-current-section)))
+  (unless pos
+    (setq pos (point)))
+  (ignore-errors ; Allow navigating broken sections.
+    (and section
+         (>= pos (oref section start))
+         (<  pos (or (oref section content)
+                     (oref section end)))
+         t)))
+
+(defun magit-section-internal-region-p (&optional section)
+  "Return t if the region is active and inside SECTION's body.
+If optional SECTION is nil, use the current section."
+  (and (region-active-p)
+       (or section (setq section (magit-current-section)))
+       (let ((beg (magit-section-at (region-beginning))))
+         (and (eq beg (magit-section-at (region-end)))
+              (eq beg section)))
+       (not (or (magit-section-position-in-heading-p section (region-beginning))
+                (magit-section-position-in-heading-p section (region-end))))
+       t))
+
+(defun magit-wash-sequence (function)
+  "Repeatedly call FUNCTION until it returns nil or eob is reached.
+FUNCTION has to move point forward or return nil."
+  (while (and (not (eobp)) (funcall function))))
+
+;;;###autoload
+(defun magit-add-section-hook (hook function &optional at append local)
+  "Add to the value of section hook HOOK the function FUNCTION.
+
+Add FUNCTION at the beginning of the hook list unless optional
+APPEND is non-nil, in which case FUNCTION is added at the end.
+If FUNCTION already is a member, then move it to the new location.
+
+If optional AT is non-nil and a member of the hook list, then
+add FUNCTION next to that instead.  Add before or after AT, or
+replace AT with FUNCTION depending on APPEND.  If APPEND is the
+symbol `replace', then replace AT with FUNCTION.  For any other
+non-nil value place FUNCTION right after AT.  If nil, then place
+FUNCTION right before AT.  If FUNCTION already is a member of the
+list but AT is not, then leave FUNCTION where ever it already is.
+
+If optional LOCAL is non-nil, then modify the hook's buffer-local
+value rather than its global value.  This makes the hook local by
+copying the default value.  That copy is then modified.
+
+HOOK should be a symbol.  If HOOK is void, it is first set to nil.
+HOOK's value must not be a single hook function.  FUNCTION should
+be a function that takes no arguments and inserts one or multiple
+sections at point, moving point forward.  FUNCTION may choose not
+to insert its section(s), when doing so would not make sense.  It
+should not be abused for other side-effects.  To remove FUNCTION
+again use `remove-hook'."
+  (unless (boundp hook)
+    (error "Cannot add function to undefined hook variable %s" hook))
+  (unless (default-boundp hook)
+    (set-default hook nil))
+  (let ((value (if local
+                   (if (local-variable-p hook)
+                       (symbol-value hook)
+                     (unless (local-variable-if-set-p hook)
+                       (make-local-variable hook))
+                     (copy-sequence (default-value hook)))
+                 (default-value hook))))
+    (if at
+        (when (setq at (member at value))
+          (setq value (delq function value))
+          (cond ((eq append 'replace)
+                 (setcar at function))
+                (append
+                 (push function (cdr at)))
+                (t
+                 (push (car at) (cdr at))
+                 (setcar at function))))
+      (setq value (delq function value)))
+    (unless (member function value)
+      (setq value (if append
+                      (append value (list function))
+                    (cons function value))))
+    (when (eq append 'replace)
+      (setq value (delq at value)))
+    (if local
+        (set hook value)
+      (set-default hook value))))
+
+(defvar-local magit-disabled-section-inserters nil)
+
+(defun magit-disable-section-inserter (fn)
+  "Disable the section inserter FN in the current repository.
+It is only intended for use in \".dir-locals.el\" and
+\".dir-locals-2.el\".  Also see info node `(magit)Per-Repository
+Configuration'."
+  (cl-pushnew fn magit-disabled-section-inserters))
+
+(put 'magit-disable-section-inserter 'safe-local-eval-function t)
+
+(defun magit-run-section-hook (hook &rest args)
+  "Run HOOK with ARGS, warning about invalid entries."
+  (let ((entries (symbol-value hook)))
+    (unless (listp entries)
+      (setq entries (list entries)))
+    (when-let ((invalid (seq-remove #'functionp entries)))
+      (message "`%s' contains entries that are no longer valid.
+%s\nUsing standard value instead.  Please re-configure hook variable."
+               hook
+               (mapconcat (##format "  `%s'" %) invalid "\n"))
+      (sit-for 5)
+      (setq entries (eval (car (get hook 'standard-value)))))
+    (dolist (entry entries)
+      (let ((magit--current-section-hook (cons (list hook entry)
+                                               magit--current-section-hook)))
+        (unless (memq entry magit-disabled-section-inserters)
+          (if (bound-and-true-p magit-refresh-verbose)
+              (let ((time (benchmark-elapse (apply entry args))))
+                (message "  %-50s %f %s" entry time
+                         (cond ((> time 0.03) "!!")
+                               ((> time 0.01) "!")
+                               (""))))
+            (apply entry args)))))))
+
+(cl-defun magit--overlay-at (pos prop &optional (val nil sval) testfn)
+  (cl-find-if (lambda (o)
+                (let ((p (overlay-properties o)))
+                  (and (plist-member p prop)
+                       (or (not sval)
+                           (funcall (or testfn #'eql)
+                                    (plist-get p prop)
+                                    val)))))
+              (overlays-at pos t)))
+
+(defun magit-face-property-all (face string)
+  "Return non-nil if FACE is present in all of STRING."
+  (catch 'missing
+    (let ((pos 0))
+      (while (setq pos (next-single-property-change pos 'font-lock-face string))
+        (let ((val (get-text-property pos 'font-lock-face string)))
+          (unless (if (consp val)
+                      (memq face val)
+                    (eq face val))
+            (throw 'missing nil))))
+      (not pos))))
+
+(defun magit--add-face-text-property ( beg end face
+                                       &optional append object adopt-face)
+  "Like `add-face-text-property' but for `font-lock-face'.
+If optional ADOPT-FACE, then replace `face' with `font-lock-face'
+first.  The latter is a hack, which is likely to be removed again."
+  (when (stringp object)
+    (unless beg (setq beg 0))
+    (unless end (setq end (length object))))
+  (when adopt-face
+    (let ((beg beg)
+          (end end))
+      (while (< beg end)
+        (let ((pos (next-single-property-change beg 'face object end))
+              (val (get-text-property beg 'face object)))
+          ;; We simply assume font-lock-face is not also set.
+          (put-text-property beg pos 'font-lock-face val object)
+          (remove-list-of-text-properties beg pos '(face) object)
+          (setq beg pos)))))
+  (while (< beg end)
+    (let* ((pos (next-single-property-change beg 'font-lock-face object end))
+           (val (get-text-property beg 'font-lock-face object))
+           (val (ensure-list val)))
+      (put-text-property beg pos 'font-lock-face
+                         (if append
+                             (append val (list face))
+                           (cons face val))
+                         object)
+      (setq beg pos)))
+  object)
+
+(defun magit--propertize-face (string face)
+  (propertize string 'face face 'font-lock-face face))
+
+(defun magit--put-face (beg end face string)
+  (put-text-property beg end 'face face string)
+  (put-text-property beg end 'font-lock-face face string))
+
+(defun magit--bolp (pos)
+  "Return t if POS is at the beginning of a line.
+This is like moving to POS and then calling `bolp'."
+  (save-excursion (goto-char pos) (bolp)))
+
+(defun magit--eolp (pos)
+  "Return t if POS is at the end of a line.
+This is like moving to POS and then calling `eolp'."
+  (save-excursion (goto-char pos) (bolp)))
+
+(defun magit--bol-position (pos)
+  "Return the position at the beginning of the line containing POS.
+This is like moving to POS and then calling `pos-bol'."
+  (save-excursion (goto-char pos) (pos-bol)))
+
+(defun magit--eol-position (pos)
+  "Return the position at the end of the line containing POS.
+This is like moving to POS and then calling `pos-eol'."
+  (save-excursion (goto-char pos) (pos-eol)))
+
+;;; Imenu Support
+
+(defvar-local magit--imenu-group-types nil)
+(defvar-local magit--imenu-item-types nil)
+
+(defun magit--imenu-create-index ()
+  ;; If `which-function-mode' is active, then the create-index
+  ;; function is called at the time the major-mode is being enabled.
+  ;; Modes that derive from `magit-mode' have not populated the buffer
+  ;; at that time yet, so we have to abort.
+  (and magit-root-section
+       (or magit--imenu-group-types
+           magit--imenu-item-types)
+       (let ((index
+              (mapcan
+               (lambda (section)
+                 (cond
+                   (magit--imenu-group-types
+                    (and (if (eq (car-safe magit--imenu-group-types) 'not)
+                             (not (magit-section-match
+                                   (cdr magit--imenu-group-types)
+                                   section))
+                           (magit-section-match magit--imenu-group-types section))
+                         (and-let ((children (oref section children)))
+                           `((,(magit--imenu-index-name section)
+                              ,@(mapcar (##cons (magit--imenu-index-name %)
+                                                (oref % start))
+                                        children))))))
+                   (magit--imenu-item-types
+                    (and (magit-section-match magit--imenu-item-types section)
+                         `((,(magit--imenu-index-name section)
+                            . ,(oref section start)))))))
+               (oref magit-root-section children))))
+         (if (and magit--imenu-group-types (symbolp magit--imenu-group-types))
+             (cdar index)
+           index))))
+
+(defun magit--imenu-index-name (section)
+  (let ((heading (buffer-substring-no-properties
+                  (oref section start)
+                  (1- (or (oref section content)
+                          (oref section end))))))
+    (save-match-data
+      (cond
+        ((and (magit-section-match [commit logbuf] section)
+              (string-match "[^ ]+\\([ *|]*\\).+" heading))
+         (replace-match " " t t heading 1))
+        ((magit-section-match
+          '([branch local branchbuf] [tag tags branchbuf]) section)
+         (oref section value))
+        ((magit-section-match [branch remote branchbuf] section)
+         (concat (oref (oref section parent) value) "/"
+                 (oref section value)))
+        ((string-match " ([0-9]+)\\'" heading)
+         (substring heading 0 (match-beginning 0)))
+        (heading)))))
+
+(defun magit--imenu-goto-function (_name position &rest _rest)
+  "Go to the section at POSITION.
+Make sure it is visible, by showing its ancestors where
+necessary.  For use as `imenu-default-goto-function' in
+`magit-mode' buffers."
+  (goto-char position)
+  (let ((section (magit-current-section)))
+    (while (setq section (oref section parent))
+      (when (oref section hidden)
+        (magit-section-show section)))))
+
+;;; Bookmark support
+
+(declare-function bookmark-get-filename "bookmark" (bookmark-name-or-record))
+(declare-function bookmark-make-record-default "bookmark"
+                  (&optional no-file no-context posn))
+(declare-function bookmark-prop-get "bookmark" (bookmark-name-or-record prop))
+(declare-function bookmark-prop-set "bookmark" (bookmark-name-or-record prop val))
+
+(cl-defgeneric magit-bookmark-get-filename ()
+  (or (buffer-file-name) (buffer-name)))
+
+(cl-defgeneric magit-bookmark--store-buffer-values (bookmark mode)
+  "Set MODE-specific properties in BOOKMARK.
+For each variable specified by MODE's `magit-bookmark-variables' property,
+store its buffer-local value in BOOKMARK, using the variable symbol as the
+property name.")
+
+(cl-defgeneric magit-bookmark--get-child-value (section)
+  (oref section value))
+
+(cl-defgeneric magit-bookmark-get-buffer-create (bookmark mode))
+
+(defun magit--make-bookmark ()
+  "Create a bookmark for the current Magit buffer.
+Input values are the major-mode's `magit-bookmark-name' method,
+and the buffer-local values of the variables referenced in its
+`magit-bookmark-variables' property."
+  (require 'bookmark)
+  (if (plist-member (symbol-plist major-mode) 'magit-bookmark-variables)
+      ;; `bookmark-make-record-default's return value does not match
+      ;; (NAME . ALIST), even though it is used as the default value
+      ;; of `bookmark-make-record-function', which states that such
+      ;; functions must do that.  See #4356.
+      (let ((bookmark (cons nil (bookmark-make-record-default 'no-file))))
+        (bookmark-prop-set bookmark 'handler  #'magit--handle-bookmark)
+        (bookmark-prop-set bookmark 'mode     major-mode)
+        (bookmark-prop-set bookmark 'filename (magit-bookmark-get-filename))
+        ;; Default(s) suggested to the user when naming the bookmark.
+        ;; See comment in `bookmark-set-internal'.
+        (bookmark-prop-set bookmark 'defaults (list (magit-bookmark-name)))
+        (magit-bookmark--store-buffer-values bookmark)
+        (bookmark-prop-set
+         bookmark 'magit-hidden-sections
+         (seq-keep (##and (oref % hidden)
+                          (cons (oref % type)
+                                (magit-bookmark--get-child-value %)))
+                   (oref magit-root-section children)))
+        bookmark)
+    (user-error "Bookmarking is not implemented for %s buffers" major-mode)))
+
+;;;###autoload
+(defun magit--handle-bookmark (bookmark)
+  "Open a bookmark created by `magit--make-bookmark'.
+
+Call the generic function `magit-bookmark-get-buffer-create' to get
+the appropriate buffer without displaying it.
+
+Then call the `magit-*-setup-buffer' function of the the major-mode
+with the variables' values as arguments, which were recorded by
+`magit--make-bookmark'."
+  (require (quote magit-bookmark) nil t)
+  (let ((buffer (magit-bookmark-get-buffer-create
+                 bookmark
+                 (bookmark-prop-get bookmark 'mode))))
+    (set-buffer buffer) ; That is the interface we have to adhere to.
+    (when-let ((hidden (bookmark-prop-get bookmark 'magit-hidden-sections)))
+      (with-current-buffer buffer
+        (dolist (child (oref magit-root-section children))
+          (if (member (cons (oref child type)
+                            (oref child value))
+                      hidden)
+              (magit-section-hide child)
+            (magit-section-show child)))))
+    ;; Compatibility with `bookmark+' package.  See #4356.
+    (when (bound-and-true-p bmkp-jump-display-function)
+      (funcall bmkp-jump-display-function (current-buffer)))
+    nil))
+
+(put 'magit--handle-bookmark 'bookmark-handler-type "Magit")
+
+(cl-defgeneric magit-bookmark-name ()
+  "Return name for bookmark to current buffer."
+  (format "%s%s"
+          (substring (symbol-name major-mode) 0 -5)
+          (if-let ((vars (get major-mode 'magit-bookmark-variables)))
+              (mapcan (##ensure-list (symbol-value %)) vars)
+            "")))
+
+;;; Bitmaps
+
+(define-fringe-bitmap 'magit-fringe-bitmap+
+  [#b00000000
+   #b00011000
+   #b00011000
+   #b01111110
+   #b01111110
+   #b00011000
+   #b00011000
+   #b00000000])
+
+(define-fringe-bitmap 'magit-fringe-bitmap-
+  [#b00000000
+   #b00000000
+   #b00000000
+   #b01111110
+   #b01111110
+   #b00000000
+   #b00000000
+   #b00000000])
+
+(define-fringe-bitmap 'magit-fringe-bitmap>
+  [#b01100000
+   #b00110000
+   #b00011000
+   #b00001100
+   #b00011000
+   #b00110000
+   #b01100000
+   #b00000000])
+
+(define-fringe-bitmap 'magit-fringe-bitmapv
+  [#b00000000
+   #b10000010
+   #b11000110
+   #b01101100
+   #b00111000
+   #b00010000
+   #b00000000
+   #b00000000])
+
+(define-fringe-bitmap 'magit-fringe-bitmap-bold>
+  [#b11100000
+   #b01110000
+   #b00111000
+   #b00011100
+   #b00011100
+   #b00111000
+   #b01110000
+   #b11100000])
+
+(define-fringe-bitmap 'magit-fringe-bitmap-boldv
+  [#b10000001
+   #b11000011
+   #b11100111
+   #b01111110
+   #b00111100
+   #b00011000
+   #b00000000
+   #b00000000])
+
+;;; _
+(provide 'magit-section)
+;; Local Variables:
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; magit-section.el ends here
diff --git a/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section.elc b/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section.elc
new file mode 100644
index 0000000..c4d8b99
Binary files /dev/null and b/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section.elc differ
diff --git a/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section.info b/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section.info
new file mode 100644
index 0000000..3b32168
--- /dev/null
+++ b/emacs/.emacs.d/elpa/magit-section-20260731.2248/magit-section.info
@@ -0,0 +1,337 @@
+This is magit-section.info, produced by makeinfo version 7.1.1 from
+magit-section.texi.
+
+     Copyright (C) 2015-2026 Jonas Bernoulli
+     <emacs.magit@jonas.bernoulli.dev>
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Magit-Section: (magit-section). Use Magit sections in your own packages.
+END-INFO-DIR-ENTRY
+
+
+File: magit-section.info,  Node: Top,  Next: Introduction,  Up: (dir)
+
+Magit-Section Developer Manual
+******************************
+
+This package implements the main user interface of Magit — the
+collapsible sections that make up its buffers.  This package used to be
+distributed as part of Magit but how it can also be used by other
+packages that have nothing to do with Magit or Git.
+
+   To learn more about the section abstraction and available commands
+and user options see *note (magit)Sections::.  This manual documents how
+you can use sections in your own packages.
+
+This manual is for Magit-Section version 4.7.0.
+
+     Copyright (C) 2015-2026 Jonas Bernoulli
+     <emacs.magit@jonas.bernoulli.dev>
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+* Menu:
+
+* Introduction::
+* Creating Sections::
+* Core Functions::
+* Matching Functions::
+
+
+File: magit-section.info,  Node: Introduction,  Next: Creating Sections,  Prev: Top,  Up: Top
+
+1 Introduction
+**************
+
+This package implements the main user interface of Magit — the
+collapsible sections that make up its buffers.  This package used to be
+distributed as part of Magit but how it can also be used by other
+packages that have nothing to do with Magit or Git.
+
+   To learn more about the section abstraction and available commands
+and user options see *note (magit)Sections::.  This manual documents how
+you can use sections in your own packages.
+
+   When the documentation leaves something unaddressed, then please
+consider that Magit uses this library extensively and search its source
+for suitable examples before asking me for help.  Thanks!
+
+
+File: magit-section.info,  Node: Creating Sections,  Next: Core Functions,  Prev: Introduction,  Up: Top
+
+2 Creating Sections
+*******************
+
+ -- Macro: magit-insert-section [name] (type &optional value hide) &rest
+          body
+     Create a section object of type CLASS, storing VALUE in its ‘value’
+     slot, and insert the section at point.  CLASS is a subclass of
+     'magit-section' or has the form ‘(eval FORM)’, in which case FORM
+     is evaluated at runtime and should return a subclass.  In other
+     places a sections class is often referred to as its "type".
+
+     Many commands behave differently depending on the class of the
+     current section and sections of a certain class can have their own
+     keymap, which is specified using the 'keymap' class slot.  The
+     value of that slot should be a variable whose value is a keymap.
+
+     For historic reasons Magit and Forge in most cases use symbols as
+     CLASS that don't actually identify a class and that lack the
+     appropriate package prefix.  This works due to some undocumented
+     kludges, which are not available to other packages.
+
+     When optional HIDE is non-‘nil’ collapse the section body by
+     default, i.e., when first creating the section, but not when
+     refreshing the buffer.  Else expand it by default.  This can be
+     overwritten using ‘magit-section-set-visibility-hook’.  When a
+     section is recreated during a refresh, then the visibility of
+     predecessor is inherited and HIDE is ignored (but the hook is still
+     honored).
+
+     BODY is any number of forms that actually insert the section's
+     heading and body.  Optional NAME, if specified, has to be a symbol,
+     which is then bound to the object of the section being inserted.
+
+     Before BODY is evaluated the ‘start’ of the section object is set
+     to the value of 'point' and after BODY was evaluated its ‘end’ is
+     set to the new value of ‘point’; BODY is responsible for moving
+     ‘point’ forward.
+
+     If it turns out inside BODY that the section is empty, then
+     ‘magit-cancel-section’ can be used to abort and remove all traces
+     of the partially inserted section.  This can happen when creating a
+     section by washing Git's output and Git didn't actually output
+     anything this time around.
+
+ -- Function: magit-insert-heading [child-count] &rest args
+     Insert the heading for the section currently being inserted.
+
+     This function should only be used inside ‘magit-insert-section’.
+
+     When called without any arguments, then just set the ‘content’ slot
+     of the object representing the section being inserted to a marker
+     at ‘point’.  The section should only contain a single line when
+     this function is used like this.
+
+     When called with arguments ARGS, which have to be strings, or
+     ‘nil’, then insert those strings at point.  The section should not
+     contain any text before this happens and afterwards it should again
+     only contain a single line.  If the ‘face’ property is set anywhere
+     inside any of these strings, then insert all of them unchanged.
+     Otherwise use the 'magit-section-heading' face for all inserted
+     text.
+
+     The ‘content’ property of the section object is the end of the
+     heading (which lasts from ‘start’ to ‘content’) and the beginning
+     of the the body (which lasts from ‘content’ to ‘end’).  If the
+     value of ‘content’ is ‘nil’, then the section has no heading and
+     its body cannot be collapsed.  If a section does have a heading,
+     then its height must be exactly one line, including a trailing
+     newline character.  This isn't enforced, you are responsible for
+     getting it right.  The only exception is that this function does
+     insert a newline character if necessary.
+
+     If provided, optional CHILD-COUNT must evaluate to an integer or
+     boolean.  If ‘t’, then the count is determined once the children
+     have been inserted, using ‘magit-insert-child-count’ (which see).
+     For historic reasons, if the heading ends with ":", the count is
+     substituted for that, at this time as well.  If
+     ‘magit-section-show-child-count’ is ‘nil’, no counts are inserted
+
+ -- Macro: magit-insert-section-body &rest body
+     Use BODY to insert the section body, once the section is expanded.
+     If the section is expanded when it is created, then this is like
+     ‘progn’.  Otherwise BODY isn't evaluated until the section is
+     explicitly expanded.
+
+ -- Function: magit-cancel-section
+     Cancel inserting the section that is currently being inserted.
+     Remove all traces of that section.
+
+ -- Function: magit-wash-sequence function
+     Repeatedly call FUNCTION until it returns ‘nil’ or the end of the
+     buffer is reached.  FUNCTION has to move point forward or return
+     ‘nil’.
+
+   You have to define some function that calls ‘magit-insert-section’ to
+populate a buffer with sections.  After doing so, that function also has
+to call a few other functions, to put the sections in a good initial
+state.  You will likely need these lines:
+
+     (let ((magit-section-cache-visibility nil))
+       (magit-section-show magit-root-section))
+     (magit-section-update-highlight)
+     (set-buffer-modified-p nil)
+
+   Magit does that in ‘magit-refresh-buffer’.  Look at that function for
+inspiration, and also check out how that function is being used in in
+‘magit-mode.el’.  The code in that library is to specialized to Magit's
+needs to be made part of the ‘magit-section’ package, but a magit-like
+package will likely have to perform mode and buffer setup in a similar
+fashion.
+
+
+File: magit-section.info,  Node: Core Functions,  Next: Matching Functions,  Prev: Creating Sections,  Up: Top
+
+3 Core Functions
+****************
+
+ -- Function: magit-current-section
+     Return the section at point or where the context menu was invoked.
+     When using the context menu, return the section that the user
+     clicked on, provided the current buffer is the buffer in which the
+     click occurred.  Otherwise return the section at point.
+
+Function magit-section-at &optional position
+     Return the section at POSITION, defaulting to point.  Default to
+     point even when the context menu is used.
+
+ -- Function: magit-section-ident section
+     Return an unique identifier for SECTION.  The return value has the
+     form ‘((TYPE . VALUE)...)’.
+
+ -- Function: magit-section-ident-value value
+     Return a constant representation of VALUE.
+
+     VALUE is the value of a ‘magit-section’ object.  If that is an
+     object itself, then that is not suitable to be used to identify the
+     section because two objects may represent the same thing but not be
+     equal.  If possible a method should be added for such objects,
+     which returns a value that is equal.  Otherwise the catch-all
+     method is used, which just returns the argument itself.
+
+ -- Function: magit-get-section ident &optional root
+     Return the section identified by IDENT.  IDENT has to be a list as
+     returned by ‘magit-section-ident’.  If optional ROOT is non-‘nil’,
+     then search in that section tree instead of in the one whose root
+     ‘magit-root-section’ is.
+
+ -- Function: magit-section-lineage section &optional raw
+     Return the lineage of SECTION.  If optional RAW is non-‘nil’,
+     return a list of section objects, beginning with SECTION, otherwise
+     return a list of section types.
+
+ -- Function: magit-section-content-p section
+     Return non-‘nil’ if SECTION has content or an unused washer
+     function.
+
+   The next two functions are replacements for the Emacs functions that
+have the same name except for the ‘magit-’ prefix.  Like
+‘magit-current-section’ they do not act on point, the cursors position,
+but on the position where the user clicked to invoke the context menu.
+
+   If your package provides a context menu and some of its commands act
+on the "thing at point", even if just as a default, then use the
+prefixed functions to teach them to instead use the click location when
+appropriate.
+
+Function magit-point
+     Return point or the position where the context menu was invoked.
+     When using the context menu, return the position the user clicked
+     on, provided the current buffer is the buffer in which the click
+     occurred.  Otherwise return the same value as ‘point’.
+
+Function magit-thing-at-point thing &optional no-properties
+     Return the THING at point or where the context menu was invoked.
+     When using the context menu, return the thing the user clicked on,
+     provided the current buffer is the buffer in which the click
+     occurred.  Otherwise return the same value as ‘thing-at-point’.
+     For the meaning of THING and NO-PROPERTIES see that function.
+
+
+File: magit-section.info,  Node: Matching Functions,  Prev: Core Functions,  Up: Top
+
+4 Matching Functions
+********************
+
+ -- Function: magit-section-match condition &optional (section
+          (magit-current-section))
+     Return ‘t’ if SECTION matches CONDITION.
+
+     SECTION defaults to the section at point.  If SECTION is not
+     specified and there also is no section at point, then return ‘nil’.
+
+     CONDITION can take the following forms:
+
+        • ‘(CONDITION...)’ matches if any of the CONDITIONs matches.
+        • ‘[CLASS...]’ matches if the section's class is the same as the
+          first CLASS or a subclass of that; the section's parent class
+          matches the second CLASS; and so on.
+
+        • ‘[* CLASS...]’ matches sections that match [CLASS...] and also
+          recursively all their child sections.
+        • ‘CLASS’ matches if the section's class is the same as CLASS or
+          a subclass of that; regardless of the classes of the parent
+          sections.
+
+     Each CLASS should be a class symbol, identifying a class that
+     derives from ‘magit-section’.  For backward compatibility CLASS can
+     also be a "type symbol".  A section matches such a symbol if the
+     value of its ‘type’ slot is ‘eq’.  If a type symbol has an entry in
+     ‘magit--section-type-alist’, then a section also matches that type
+     if its class is a subclass of the class that corresponds to the
+     type as per that alist.
+
+     Note that it is not necessary to specify the complete section
+     lineage as printed by ‘magit-describe-section-briefly’, unless of
+     course you want to be that precise.
+
+ -- Function: magit-section-value-if condition &optional section
+     If the section at point matches CONDITION, then return its value.
+
+     If optional SECTION is non-‘nil’ then test whether that matches
+     instead.  If there is no section at point and SECTION is ‘nil’,
+     then return ‘nil’.  If the section does not match, then return
+     ‘nil’.
+
+     See ‘magit-section-match’ for the forms CONDITION can take.
+
+ -- Macro: magit-section-case &rest clauses
+     Choose among clauses on the type of the section at point.
+
+     Each clause looks like ‘(CONDITION BODY...)’.  The type of the
+     section is compared against each CONDITION; the BODY forms of the
+     first match are evaluated sequentially and the value of the last
+     form is returned.  Inside BODY the symbol ‘it’ is bound to the
+     section at point.  If no clause succeeds or if there is no section
+     at point, return ‘nil’.
+
+     See ‘magit-section-match’ for the forms CONDITION can take.
+     Additionally a CONDITION of ‘t’ is allowed in the final clause, and
+     matches if no other CONDITION match, even if there is no section at
+     point.
+
+
+
+Tag Table:
+Node: Top810
+Node: Introduction2111
+Node: Creating Sections2881
+Node: Core Functions8630
+Node: Matching Functions11805
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode-autoloads.el b/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode-autoloads.el
new file mode 100644
index 0000000..4d6d7fe
--- /dev/null
+++ b/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode-autoloads.el
@@ -0,0 +1,64 @@
+;;; markdown-mode-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from markdown-mode.el
+
+(autoload 'markdown-mode "markdown-mode" "\
+Major mode for editing Markdown files.
+
+(fn)" t)
+(add-to-list 'auto-mode-alist '("\\.\\(?:md\\|markdown\\|mkd\\|mdown\\|mkdn\\|mdwn\\|mdx\\)\\'" . markdown-mode))
+(autoload 'gfm-mode "markdown-mode" "\
+Major mode for editing GitHub Flavored Markdown files.
+
+(fn)" t)
+(autoload 'markdown-view-mode "markdown-mode" "\
+Major mode for viewing Markdown content.
+
+(fn)" t)
+(autoload 'gfm-view-mode "markdown-mode" "\
+Major mode for viewing GitHub Flavored Markdown content.
+
+(fn)" t)
+(autoload 'markdown-live-preview-mode "markdown-mode" "\
+Toggle native previewing on save for a specific markdown file.
+
+This is a minor mode.  If called interactively, toggle the
+`Markdown-Live-Preview mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `markdown-live-preview-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "markdown-mode" '("defun-markdown-" "gfm-" "markdown"))
+
+;;; End of scraped data
+
+(provide 'markdown-mode-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; markdown-mode-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode-pkg.el b/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode-pkg.el
new file mode 100644
index 0000000..07cd54f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "markdown-mode" "20260821.11"
+  "Major mode for Markdown-formatted text."
+  '((emacs "28.1"))
+  :url "https://jblevins.org/projects/markdown-mode/"
+  :commit "6995b8d095eceace0b947c1217646781ab021c10"
+  :revdesc "6995b8d095ec"
+  :keywords '("markdown" "github flavored markdown" "itex")
+  :authors '(("Jason R. Blevins" . "jblevins@xbeta.org"))
+  :maintainers '(("Jason R. Blevins" . "jblevins@xbeta.org")))
diff --git a/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode.el b/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode.el
new file mode 100644
index 0000000..3414847
--- /dev/null
+++ b/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode.el
@@ -0,0 +1,10700 @@
+;;; markdown-mode.el --- Major mode for Markdown-formatted text -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2007-2026 Jason R. Blevins and markdown-mode
+;; contributors (see the commit log for details).
+
+;; Author: Jason R. Blevins <jblevins@xbeta.org>
+;; Maintainer: Jason R. Blevins <jblevins@xbeta.org>
+;; Created: May 24, 2007
+;; Package-Version: 20260821.11
+;; Package-Revision: 6995b8d095ec
+;; Package-Requires: ((emacs "28.1"))
+;; Keywords: Markdown, GitHub Flavored Markdown, itex
+;; URL: https://jblevins.org/projects/markdown-mode/
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; See the README.md file for details.
+
+
+;;; Code:
+
+(require 'easymenu)
+(require 'outline)
+(require 'thingatpt)
+(require 'cl-lib)
+(require 'url-parse)
+(require 'url-util)
+(require 'button)
+(require 'color)
+(require 'rx)
+(require 'subr-x)
+
+(defvar jit-lock-start)
+(defvar jit-lock-end)
+(defvar flyspell-generic-check-word-predicate)
+(defvar electric-pair-pairs)
+(defvar sh-ancestor-alist)
+
+(declare-function project-roots "project")
+(declare-function sh-set-shell "sh-script")
+(declare-function mailcap-file-name-to-mime-type "mailcap")
+(declare-function dnd-get-local-file-name "dnd")
+(declare-function dnd-open-local-file "dnd")
+
+;; for older emacs<29
+(declare-function mailcap-mime-type-to-extension "mailcap")
+(declare-function file-name-with-extension "files")
+(declare-function yank-media-handler "yank-media")
+
+
+;;; Constants =================================================================
+
+(defconst markdown-mode-version "2.8-alpha"
+  "Markdown mode version number.")
+
+(defconst markdown-output-buffer-name "*markdown-output*"
+  "Name of temporary buffer for markdown command output.")
+
+
+;;; Global Variables ==========================================================
+
+(defvar markdown-reference-label-history nil
+  "History of used reference labels.")
+
+(defvar markdown-live-preview-mode nil
+  "Sentinel variable for command `markdown-live-preview-mode'.")
+
+(defvar markdown-gfm-language-history nil
+  "History list of languages used in the current buffer in GFM code blocks.")
+
+(defvar markdown-follow-link-functions nil
+  "Functions used to follow a link.
+Each function is called with one argument, the link's URL. It
+should return non-nil if it followed the link, or nil if not.
+Functions are called in order until one of them returns non-nil;
+otherwise the default link-following function is used.")
+
+
+;;; Customizable Variables ====================================================
+
+(defvar markdown-mode-hook nil
+  "Hook run when entering Markdown mode.")
+
+(defvar markdown-before-export-hook nil
+  "Hook run before running Markdown to export XHTML output.
+The hook may modify the buffer, which will be restored to it's
+original state after exporting is complete.")
+
+(defvar markdown-after-export-hook nil
+  "Hook run after XHTML output has been saved.
+Any changes to the output buffer made by this hook will be saved.")
+
+(defgroup markdown nil
+  "Major mode for editing text files in Markdown format."
+  :prefix "markdown-"
+  :group 'text
+  :link '(url-link "https://jblevins.org/projects/markdown-mode/"))
+
+(defcustom markdown-command (let ((command (cl-loop for cmd in '("markdown" "pandoc" "markdown_py" "cmark" "cmark-gfm")
+                                                    when (executable-find cmd)
+                                                    return (file-name-nondirectory it))))
+                              (or command "markdown"))
+  "Command to run markdown."
+  :group 'markdown
+  :type '(choice (string :tag "Shell command") (repeat (string)) function))
+
+(defcustom markdown-command-needs-filename nil
+  "Set to non-nil if `markdown-command' does not accept input from stdin.
+Instead, it will be passed a filename as the final command line
+option.  As a result, you will only be able to run Markdown from
+buffers which are visiting a file."
+  :group 'markdown
+  :type 'boolean)
+
+(defcustom markdown-open-command nil
+  "Command used for opening Markdown files directly.
+For example, a standalone Markdown previewer.  This command will
+be called with a single argument: the filename of the current
+buffer.  It can also be a function, which will be called without
+arguments."
+  :group 'markdown
+  :type '(choice file function (const :tag "None" nil)))
+
+(defcustom markdown-open-image-command nil
+  "Command used for opening image files directly.
+This is used at `markdown-follow-link-at-point'."
+  :group 'markdown
+  :type '(choice file function (const :tag "None" nil)))
+
+(defcustom markdown-hr-strings
+  '("-------------------------------------------------------------------------------"
+    "* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *"
+    "---------------------------------------"
+    "* * * * * * * * * * * * * * * * * * * *"
+    "---------"
+    "* * * * *")
+  "Strings to use when inserting horizontal rules.
+The first string in the list will be the default when inserting a
+horizontal rule.  Strings should be listed in decreasing order of
+prominence (as in headings from level one to six) for use with
+promotion and demotion functions."
+  :group 'markdown
+  :type '(repeat string))
+
+(defcustom markdown-bold-underscore nil
+  "Use two underscores when inserting bold text instead of two asterisks."
+  :group 'markdown
+  :type 'boolean)
+
+(defcustom markdown-italic-underscore nil
+  "Use underscores when inserting italic text instead of asterisks."
+  :group 'markdown
+  :type 'boolean)
+
+(defcustom markdown-marginalize-headers nil
+  "When non-nil, put opening atx header markup in a left margin.
+
+This setting goes well with `markdown-asymmetric-header'.  But
+sadly it conflicts with `linum-mode' since they both use the
+same margin."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.4"))
+
+(defcustom markdown-marginalize-headers-margin-width 6
+  "Character width of margin used for marginalized headers.
+The default value is based on there being six heading levels
+defined by Markdown and HTML.  Increasing this produces extra
+whitespace on the left.  Decreasing it may be preferred when
+fewer than six nested heading levels are used."
+  :group 'markdown
+  :type 'integer
+  :safe 'natnump
+  :package-version '(markdown-mode . "2.4"))
+
+(defcustom markdown-asymmetric-header t
+  "Determines if atx header style will be asymmetric.
+Set to a non-nil value to use asymmetric header styling, placing
+header markup only at the beginning of the line."
+  :group 'markdown
+  :type 'boolean)
+
+(defcustom markdown-indent-function 'markdown-indent-line
+  "Function to use to indent."
+  :group 'markdown
+  :type 'function)
+
+(defcustom markdown-indent-on-enter t
+  "Determines indentation behavior when pressing \\[newline].
+Possible settings are nil, t, and \\='indent-and-new-item.
+
+When non-nil, pressing \\[newline] will call `newline-and-indent'
+to indent the following line according to the context using
+`markdown-indent-function'.  In this case, note that
+\\[electric-newline-and-maybe-indent] can still be used to insert
+a newline without indentation.
+
+When set to \\='indent-and-new-item and the point is in a list item
+when \\[newline] is pressed, the list will be continued on the next
+line, where a new item will be inserted.
+
+When set to nil, simply call `newline' as usual.  In this case,
+you can still indent lines using \\[markdown-cycle] and continue
+lists with \\[markdown-insert-list-item].
+
+Note that this assumes the variable `electric-indent-mode' is
+non-nil (enabled).  When it is *disabled*, the behavior of
+\\[newline] and `\\[electric-newline-and-maybe-indent]' are
+reversed."
+  :group 'markdown
+  :type '(choice (const :tag "Don't automatically indent" nil)
+                 (const :tag "Automatically indent" t)
+                 (const :tag "Automatically indent and insert new list items" indent-and-new-item)))
+
+(defcustom markdown-enable-wiki-links nil
+  "Syntax highlighting for wiki links.
+Set this to a non-nil value to turn on wiki link support by default.
+Support can be toggled later using the `markdown-toggle-wiki-links'
+function or \\[markdown-toggle-wiki-links]."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.2"))
+
+(defcustom markdown-wiki-link-alias-first t
+  "When non-nil, treat aliased wiki links like [[alias text|PageName]].
+Otherwise, they will be treated as [[PageName|alias text]]."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp)
+
+(defcustom markdown-wiki-link-search-subdirectories nil
+  "When non-nil, search for wiki link targets in subdirectories.
+This is the default search behavior for GitHub and is
+automatically set to t in `gfm-mode'."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.2"))
+
+(defcustom markdown-wiki-link-search-parent-directories nil
+  "When non-nil, search for wiki link targets in parent directories.
+This is the default search behavior of Ikiwiki."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.2"))
+
+(defcustom markdown-wiki-link-search-type nil
+  "A list of options for searching for markdown wiki links.
+
+`sub-directories': search for wiki link targets in sub directories
+`parent-directories': search for wiki link targets in parent directories
+`project': search for wiki link targets under project root"
+  :group 'markdown
+  :type '(set
+          (const :tag "search wiki link from subdirectories" sub-directories)
+          (const :tag "search wiki link from parent directories" parent-directories)
+          (const :tag "search wiki link under project root" project))
+  :package-version '(markdown-mode . "2.5"))
+
+(make-obsolete-variable 'markdown-wiki-link-search-subdirectories 'markdown-wiki-link-search-type "2.5")
+(make-obsolete-variable 'markdown-wiki-link-search-parent-directories 'markdown-wiki-link-search-type "2.5")
+
+(make-obsolete 'markdown-match-wiki-link nil "2.8")
+(make-obsolete 'markdown-highlight-wiki-link nil "2.8")
+(make-obsolete 'markdown-unfontify-region-wiki-links nil "2.8")
+(make-obsolete 'markdown-fontify-region-wiki-links nil "2.8")
+(make-obsolete 'markdown-extend-changed-region nil "2.8")
+(make-obsolete 'markdown-check-change-for-wiki-link nil "2.8")
+(make-obsolete 'markdown-check-change-for-wiki-link-after-change nil "2.8")
+(make-obsolete 'markdown-fontify-buffer-wiki-links nil "2.8")
+(make-obsolete 'markdown-setup-wiki-link-hooks nil "2.8")
+
+(defcustom markdown-wiki-link-fontify-missing nil
+  "When non-nil, change wiki link face according to existence of target files.
+This is expensive because it requires checking for the file each time the buffer
+changes or the user switches windows.  It is disabled by default because it may
+cause lag when typing on slower machines."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.2"))
+
+(defcustom markdown-wiki-link-retain-case nil
+  "When non-nil, wiki link file names do not have their case changed."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.7"))
+
+(defcustom markdown-uri-types
+  '("acap" "cid" "data" "dav" "fax" "file" "ftp"
+    "geo" "gopher" "http" "https" "imap" "ldap" "mailto"
+    "mid" "message" "modem" "news" "nfs" "nntp"
+    "pop" "prospero" "rtsp" "service" "sip" "tel"
+    "telnet" "tip" "urn" "vemmi" "wais")
+  "Link types for syntax highlighting of URIs."
+  :group 'markdown
+  :type '(repeat (string :tag "URI scheme")))
+
+(defcustom markdown-url-compose-char
+  '(?∞ ?… ?⋯ ?# ?★ ?⚓)
+  "Placeholder character for hidden URLs.
+This may be a single character or a list of characters. In case
+of a list, the first one that satisfies `char-displayable-p' will
+be used."
+  :type '(choice
+          (character :tag "Single URL replacement character")
+          (repeat :tag "List of possible URL replacement characters"
+                  character))
+  :package-version '(markdown-mode . "2.3"))
+
+(defcustom markdown-blockquote-display-char
+  '("▌" "┃" ">")
+  "String to display when hiding blockquote markup.
+This may be a single string or a list of string. In case of a
+list, the first one that satisfies `char-displayable-p' will be
+used."
+  :type '(choice
+          (string :tag "Single blockquote display string")
+          (repeat :tag "List of possible blockquote display strings" string))
+  :package-version '(markdown-mode . "2.3"))
+
+(defcustom markdown-hr-display-char
+  '(?─ ?━ ?-)
+  "Character for hiding horizontal rule markup.
+This may be a single character or a list of characters.  In case
+of a list, the first one that satisfies `char-displayable-p' will
+be used."
+  :group 'markdown
+  :type '(choice
+          (character :tag "Single HR display character")
+          (repeat :tag "List of possible HR display characters" character))
+  :package-version '(markdown-mode . "2.3"))
+
+(defcustom markdown-definition-display-char
+  '(?⁘ ?⁙ ?≡ ?⌑ ?◊ ?:)
+  "Character for replacing definition list markup.
+This may be a single character or a list of characters.  In case
+of a list, the first one that satisfies `char-displayable-p' will
+be used."
+  :type '(choice
+          (character :tag "Single definition list character")
+          (repeat :tag "List of possible definition list characters" character))
+  :package-version '(markdown-mode . "2.3"))
+
+(defcustom markdown-enable-math nil
+  "Syntax highlighting for inline LaTeX and itex expressions.
+Set this to a non-nil value to turn on math support by default.
+Math support can be enabled, disabled, or toggled later using
+`markdown-toggle-math' or \\[markdown-toggle-math]."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp)
+(make-variable-buffer-local 'markdown-enable-math)
+
+(defcustom markdown-enable-html t
+  "Enable font-lock support for HTML tags and attributes."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.4"))
+
+(defcustom markdown-enable-highlighting-syntax nil
+  "Enable highlighting syntax."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.5"))
+
+(defcustom markdown-css-paths nil
+  "List of URLs of CSS files to link to in the output XHTML."
+  :group 'markdown
+  :safe (lambda (x) (and (listp x) (cl-every #'stringp x)))
+  :type '(repeat (string :tag "CSS File Path")))
+
+(defcustom markdown-content-type "text/html"
+  "Content type string for the http-equiv header in XHTML output.
+When set to an empty string, this attribute is omitted.  Defaults to
+`text/html'."
+  :group 'markdown
+  :type 'string)
+
+(defcustom markdown-coding-system nil
+  "Character set string for the http-equiv header in XHTML output.
+Defaults to `buffer-file-coding-system' (and falling back to
+`utf-8' when not available).  Common settings are `iso-8859-1'
+and `iso-latin-1'.  Use `list-coding-systems' for more choices."
+  :group 'markdown
+  :type 'coding-system)
+
+(defcustom markdown-export-kill-buffer t
+  "Kill output buffer after HTML export.
+When non-nil, kill the HTML output buffer after
+exporting with `markdown-export'."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.4"))
+
+(defcustom markdown-xhtml-header-content ""
+  "Additional content to include in the XHTML <head> block."
+  :group 'markdown
+  :type 'string)
+
+(defcustom markdown-xhtml-body-preamble ""
+  "Content to include in the XHTML <body> block, before the output."
+  :group 'markdown
+  :type 'string
+  :safe 'stringp
+  :package-version '(markdown-mode . "2.4"))
+
+(defcustom markdown-xhtml-body-epilogue ""
+  "Content to include in the XHTML <body> block, after the output."
+  :group 'markdown
+  :type 'string
+  :safe 'stringp
+  :package-version '(markdown-mode . "2.4"))
+
+(defcustom markdown-xhtml-standalone-regexp
+  "^\\(<\\?xml\\|<!DOCTYPE\\|<html\\)"
+  "Regexp indicating whether `markdown-command' output is standalone XHTML."
+  :group 'markdown
+  :type 'regexp)
+
+(defcustom markdown-link-space-sub-char "_"
+  "Character to use instead of spaces when mapping wiki links to filenames."
+  :group 'markdown
+  :type 'string)
+
+(defcustom markdown-reference-location 'header
+  "Position where new reference definitions are inserted in the document."
+  :group 'markdown
+  :type '(choice (const :tag "At the end of the document" end)
+                 (const :tag "Immediately after the current block" immediately)
+                 (const :tag "At the end of the subtree" subtree)
+                 (const :tag "Before next header" header)))
+
+(defcustom markdown-footnote-location 'end
+  "Position where new footnotes are inserted in the document."
+  :group 'markdown
+  :type '(choice (const :tag "At the end of the document" end)
+                 (const :tag "Immediately after the current block" immediately)
+                 (const :tag "At the end of the subtree" subtree)
+                 (const :tag "Before next header" header)))
+
+(defcustom markdown-footnote-display '((raise 0.2) (height 0.8))
+  "Display specification for footnote markers and inline footnotes.
+By default, footnote text is reduced in size and raised.  Set to
+nil to disable this."
+  :group 'markdown
+  :type '(choice (sexp :tag "Display specification")
+                 (const :tag "Don't set display property" nil))
+  :package-version '(markdown-mode . "2.4"))
+
+(defcustom markdown-sub-superscript-display
+  '(((raise -0.3) (height 0.7)) . ((raise 0.3) (height 0.7)))
+  "Display specification for subscript and superscripts.
+The car is used for subscript, the cdr is used for superscripts."
+  :group 'markdown
+  :type '(cons (choice (sexp :tag "Subscript form")
+                       (const :tag "No lowering" nil))
+               (choice (sexp :tag "Superscript form")
+                       (const :tag "No raising" nil)))
+  :package-version '(markdown-mode . "2.4"))
+
+(defcustom markdown-unordered-list-item-prefix "  * "
+  "String inserted before unordered list items."
+  :group 'markdown
+  :type 'string)
+
+(defcustom markdown-ordered-list-enumeration t
+  "When non-nil, use enumerated numbers(1. 2. 3. etc.) for ordered list marker.
+While nil, always uses '1.' for the marker"
+  :group 'markdown
+  :type 'boolean
+  :package-version '(markdown-mode . "2.5"))
+
+(defcustom markdown-nested-imenu-heading-index t
+  "Use nested or flat imenu heading index.
+A nested index may provide more natural browsing from the menu,
+but a flat list may allow for faster keyboard navigation via tab
+completion."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.2"))
+
+(defcustom markdown-add-footnotes-to-imenu t
+  "Add footnotes to end of imenu heading index."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.4"))
+
+(defcustom markdown-make-gfm-checkboxes-buttons t
+  "When non-nil, make GFM checkboxes into buttons."
+  :group 'markdown
+  :type 'boolean)
+
+(defcustom markdown-use-pandoc-style-yaml-metadata nil
+  "When non-nil, allow YAML metadata anywhere in the document."
+  :group 'markdown
+  :type 'boolean)
+
+(defcustom markdown-split-window-direction 'any
+  "Preference for splitting windows for static and live preview.
+The default value is \\='any, which instructs Emacs to use
+`split-window-sensibly' to automatically choose how to split
+windows based on the values of `split-width-threshold' and
+`split-height-threshold' and the available windows.  To force
+vertically split (left and right) windows, set this to \\='vertical
+or \\='right.  To force horizontally split (top and bottom) windows,
+set this to \\='horizontal or \\='below.
+
+If this value is \\='any and `display-buffer-alist' is set then
+`display-buffer' is used for open buffer function"
+  :group 'markdown
+  :type '(choice (const :tag "Automatic" any)
+                 (const :tag "Right (vertical)" right)
+                 (const :tag "Below (horizontal)" below))
+  :package-version '(markdown-mode . "2.2"))
+
+(defcustom markdown-live-preview-window-function
+  #'markdown-live-preview-window-eww
+  "Function to display preview of Markdown output within Emacs.
+Function must update the buffer containing the preview and return
+the buffer."
+  :group 'markdown
+  :type 'function)
+
+(defcustom markdown-live-preview-delete-export 'delete-on-destroy
+  "Delete exported HTML file when using `markdown-live-preview-export'.
+If set to \\='delete-on-export, delete on every export. When set to
+\\='delete-on-destroy delete when quitting from command
+`markdown-live-preview-mode'. Never delete if set to nil."
+  :group 'markdown
+  :type '(choice
+          (const :tag "Delete on every export" delete-on-export)
+          (const :tag "Delete when quitting live preview" delete-on-destroy)
+          (const :tag "Never delete" nil)))
+
+(defcustom markdown-list-indent-width 4
+  "Depth of indentation for markdown lists.
+Used in `markdown-demote-list-item' and
+`markdown-promote-list-item'."
+  :group 'markdown
+  :type 'integer)
+
+(defcustom markdown-enable-prefix-prompts t
+  "Display prompts for certain prefix commands.
+Set to nil to disable these prompts."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.3"))
+
+(defcustom markdown-gfm-additional-languages nil
+  "Extra languages made available when inserting GFM code blocks.
+Language strings must have be trimmed of whitespace and not
+contain any curly braces. They may be of arbitrary
+capitalization, though."
+  :group 'markdown
+  :type '(repeat (string :validate markdown-validate-language-string)))
+
+(defcustom markdown-gfm-use-electric-backquote t
+  "Use `markdown-electric-backquote' when backquote is hit three times."
+  :group 'markdown
+  :type 'boolean)
+
+(defcustom markdown-gfm-downcase-languages t
+  "If non-nil, downcase suggested languages.
+This applies to insertions done with
+`markdown-electric-backquote'."
+  :group 'markdown
+  :type 'boolean)
+
+(defcustom markdown-edit-code-block-default-mode 'normal-mode
+  "Default mode to use for editing code blocks.
+This mode is used when automatic detection fails, such as for GFM
+code blocks with no language specified."
+  :group 'markdown
+  :type '(choice function (const :tag "None" nil))
+  :package-version '(markdown-mode . "2.4"))
+
+(defcustom markdown-gfm-uppercase-checkbox nil
+  "If non-nil, use [X] for completed checkboxes, [x] otherwise."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp)
+
+(defcustom markdown-hide-urls nil
+  "Hide URLs of inline links and reference tags of reference links.
+Such URLs will be replaced by a single customizable
+character, defined by `markdown-url-compose-char', but are still part
+of the buffer.  Links can be edited interactively with
+\\[markdown-insert-link] or, for example, by deleting the final
+parenthesis to remove the invisibility property. You can also
+hover your mouse pointer over the link text to see the URL.
+Set this to a non-nil value to turn this feature on by default.
+You can interactively set the value of this variable by calling
+`markdown-toggle-url-hiding', pressing \\[markdown-toggle-url-hiding],
+or from the menu Markdown > Links & Images menu."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.3"))
+(make-variable-buffer-local 'markdown-hide-urls)
+
+(defcustom markdown-translate-filename-function #'identity
+  "Function to use to translate filenames when following links.
+\\<markdown-mode-map>\\[markdown-follow-thing-at-point] and \\[markdown-follow-link-at-point]
+call this function with the filename as only argument whenever
+they encounter a filename (instead of a URL) to be visited and
+use its return value instead of the filename in the link.  For
+example, if absolute filenames are actually relative to a server
+root directory, you can set
+`markdown-translate-filename-function' to a function that
+prepends the root directory to the given filename."
+  :group 'markdown
+  :type 'function
+  :risky t
+  :package-version '(markdown-mode . "2.4"))
+
+(defcustom markdown-max-image-size nil
+  "Maximum width and height for displayed inline images.
+This variable may be nil or a cons cell (MAX-WIDTH . MAX-HEIGHT).
+When nil, use the actual size.  Otherwise, use ImageMagick to
+resize larger images to be of the given maximum dimensions.  This
+requires Emacs to be built with ImageMagick support."
+  :group 'markdown
+  :package-version '(markdown-mode . "2.4")
+  :type '(choice
+          (const :tag "Use actual image width" nil)
+          (cons (choice (sexp :tag "Maximum width in pixels")
+                        (const :tag "No maximum width" nil))
+                (choice (sexp :tag "Maximum height in pixels")
+                        (const :tag "No maximum height" nil)))))
+
+(defcustom markdown-mouse-follow-link t
+  "Non-nil means mouse on a link will follow the link.
+This variable must be set before loading markdown-mode."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.5"))
+
+(defcustom markdown-table-align-p t
+  "Non-nil means that table is aligned after table operation."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.5"))
+
+(defcustom markdown-fontify-whole-heading-line nil
+  "Non-nil means fontify the whole line for headings.
+This is useful when setting a background color for the
+markdown-header-face-* faces."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.5"))
+
+(defcustom markdown-special-ctrl-a/e nil
+  "Non-nil means `C-a' and `C-e' behave specially in headlines and items.
+
+When t, `C-a' will bring back the cursor to the beginning of the
+headline text. In an item, this will be the position after bullet
+and check-box, if any. When the cursor is already at that
+position, another `C-a' will bring it to the beginning of the
+line.
+
+`C-e' will jump to the end of the headline, ignoring the presence
+of closing tags in the headline. A second `C-e' will then jump to
+the true end of the line, after closing tags. This also means
+that, when this variable is non-nil, `C-e' also will never jump
+beyond the end of the heading of a folded section, i.e. not after
+the ellipses.
+
+When set to the symbol `reversed', the first `C-a' or `C-e' works
+normally, going to the true line boundary first.  Only a directly
+following, identical keypress will bring the cursor to the
+special positions.
+
+This may also be a cons cell where the behavior for `C-a' and
+`C-e' is set separately."
+  :group 'markdown
+  :type '(choice
+          (const :tag "off" nil)
+          (const :tag "on: after hashes/bullet and before closing tags first" t)
+          (const :tag "reversed: true line boundary first" reversed)
+          (cons :tag "Set C-a and C-e separately"
+                (choice :tag "Special C-a"
+                        (const :tag "off" nil)
+                        (const :tag "on: after hashes/bullet first" t)
+                        (const :tag "reversed: before hashes/bullet first" reversed))
+                (choice :tag "Special C-e"
+                        (const :tag "off" nil)
+                        (const :tag "on: before closing tags first" t)
+                        (const :tag "reversed: after closing tags first" reversed))))
+  :package-version '(markdown-mode . "2.7"))
+
+(defcustom markdown-yank-dnd-method 'file-link
+  "Action to perform on the dropped files.
+When the value is the symbol,
+  - `copy-and-insert' -- copy file in current directory and insert its link
+  - `open' -- open dropped file in Emacs
+  - `insert-link' -- insert link of dropped/pasted file
+  - `ask' -- ask what to do out of the above."
+  :group 'markdown
+  :package-version '(markdown-mode "2.8")
+  :type '(choice (const :tag "Copy and insert" copy-and-insert)
+                 (const :tag "Open file" open)
+                 (const :tag "Insert file link" file-link)
+                 (const :tag "Ask what to do" ask)))
+
+;;; Markdown-Specific `rx' Macro ==============================================
+
+;; Based on python-rx from python.el.
+(defmacro markdown-rx (&rest regexps)
+  "Markdown mode specialized rx macro.
+This variant of `rx' supports common Markdown named REGEXPS."
+  `(rx-let ((newline "\n")
+            ;; Note: #405 not consider markdown-list-indent-width however this is never used
+            (indent (or (repeat 4 " ") "\t"))
+            (block-end (and (or (one-or-more (zero-or-more blank) "\n") line-end)))
+            (numeral (and (one-or-more (any "0-9#")) "."))
+            (bullet (any "*+:-"))
+            (list-marker (or (and (one-or-more (any "0-9#")) ".")
+                             (any "*+:-")))
+            (checkbox (seq "[" (any " xX") "]")))
+     (rx ,@regexps)))
+
+
+;;; Regular Expressions =======================================================
+
+(defconst markdown-regex-comment-start
+  "<!--"
+  "Regular expression matches HTML comment opening.")
+
+(defconst markdown-regex-comment-end
+  "--[ \t]*>"
+  "Regular expression matches HTML comment closing.")
+
+(defconst markdown-regex-link-inline
+  "\\(?1:!\\)?\\(?2:\\[\\)\\(?3:\\^?\\(?:\\\\\\]\\|[^]]\\)*\\|\\)\\(?4:\\]\\)\\(?5:(\\)\\s-*\\(?6:[^)]*?\\)\\(?:\\s-+\\(?7:\"[^\"]*\"\\)\\)?\\s-*\\(?8:)\\)"
+  "Regular expression for a [text](file) or an image link ![text](file).
+Group 1 matches the leading exclamation point (optional).
+Group 2 matches the opening square bracket.
+Group 3 matches the text inside the square brackets.
+Group 4 matches the closing square bracket.
+Group 5 matches the opening parenthesis.
+Group 6 matches the URL.
+Group 7 matches the title (optional).
+Group 8 matches the closing parenthesis.")
+
+(defconst markdown-regex-link-reference
+  "\\(?1:!\\)?\\(?2:\\[\\)\\(?3:[^]^][^]]*\\|\\)\\(?4:\\]\\)\\(?5:\\[\\)\\(?6:[^]]*?\\)\\(?7:\\]\\)"
+  "Regular expression for a reference link [text][id].
+Group 1 matches the leading exclamation point (optional).
+Group 2 matches the opening square bracket for the link text.
+Group 3 matches the text inside the square brackets.
+Group 4 matches the closing square bracket for the link text.
+Group 5 matches the opening square bracket for the reference label.
+Group 6 matches the reference label.
+Group 7 matches the closing square bracket for the reference label.")
+
+(defconst markdown-regex-reference-definition
+  "^ \\{0,3\\}\\(?1:\\[\\)\\(?2:[^]\n]+?\\)\\(?3:\\]\\)\\(?4::\\)\\s *\\(?5:.*?\\)\\s *\\(?6: \"[^\"]*\"$\\|$\\)"
+  "Regular expression for a reference definition.
+Group 1 matches the opening square bracket.
+Group 2 matches the reference label.
+Group 3 matches the closing square bracket.
+Group 4 matches the colon.
+Group 5 matches the URL.
+Group 6 matches the title attribute (optional).")
+
+(defconst markdown-regex-footnote
+  "\\(?1:\\[\\^\\)\\(?2:.+?\\)\\(?3:\\]\\)"
+  "Regular expression for a footnote marker [^fn].
+Group 1 matches the opening square bracket and carat.
+Group 2 matches only the label, without the surrounding markup.
+Group 3 matches the closing square bracket.")
+
+(defconst markdown-regex-header
+  "^\\(?:\\(?1:[^\r\n\t -].*\\)\n\\(?:\\(?2:=+\\)\\|\\(?3:-+\\)\\)\\|\\(?4:#+[ \t]+\\)\\(?5:.*?\\)\\(?6:[ \t]+#+\\)?\\)$"
+  "Regexp identifying Markdown headings.
+Group 1 matches the text of a setext heading.
+Group 2 matches the underline of a level-1 setext heading.
+Group 3 matches the underline of a level-2 setext heading.
+Group 4 matches the opening hash marks of an atx heading and whitespace.
+Group 5 matches the text, without surrounding whitespace, of an atx heading.
+Group 6 matches the closing whitespace and hash marks of an atx heading.")
+
+(defconst markdown-regex-header-setext
+  "^\\([^\r\n\t -].*\\)\n\\(=+\\|-+\\)$"
+  "Regular expression for generic setext-style (underline) headers.")
+
+(defconst markdown-regex-header-atx
+  "^\\(#+\\)[ \t]+\\(.*?\\)[ \t]*\\(#*\\)$"
+  "Regular expression for generic atx-style (hash mark) headers.")
+
+(defconst markdown-regex-hr
+  (rx line-start
+      (group (or (and (repeat 3 (and "*" (? " "))) (* (any "* ")))
+                 (and (repeat 3 (and "-" (? " "))) (* (any "- ")))
+                 (and (repeat 3 (and "_" (? " "))) (* (any "_ ")))))
+      line-end)
+  "Regular expression for matching Markdown horizontal rules.")
+
+(defconst markdown-regex-code
+  "\\(?:\\`\\|[^\\]\\)\\(?1:\\(?2:`+\\)\\(?3:\\(?:.\\|\n[^\n]\\)*?[^`]\\)\\(?4:\\2\\)\\)\\(?:[^`]\\|\\'\\)"
+  "Regular expression for matching inline code fragments.
+
+Group 1 matches the entire code fragment including the backquotes.
+Group 2 matches the opening backquotes.
+Group 3 matches the code fragment itself, without backquotes.
+Group 4 matches the closing backquotes.
+
+The leading, unnumbered group ensures that the leading backquote
+character is not escaped.
+The last group, also unnumbered, requires that the character
+following the code fragment is not a backquote.
+Note that \\(?:.\\|\n[^\n]\\) matches any character, including newlines,
+but not two newlines in a row.")
+
+(defconst markdown-regex-kbd
+  "\\(?1:<kbd>\\)\\(?2:\\(?:.\\|\n[^\n]\\)*?\\)\\(?3:</kbd>\\)"
+  "Regular expression for matching <kbd> tags.
+Groups 1 and 3 match the opening and closing tags.
+Group 2 matches the key sequence.")
+
+(defconst markdown-regex-gfm-code-block-open
+  "^[[:blank:]]*\\(?1:`\\{3,\\}\\)\\(?2:[[:blank:]]*{?[[:blank:]]*\\)\\(?3:[^`[:space:]]+?\\)?\\(?:[[:blank:]]+\\(?4:.+?\\)\\)?\\(?5:[[:blank:]]*}?[[:blank:]]*\\)$"
+  "Regular expression matching opening of GFM code blocks.
+Group 1 matches the opening three or more backquotes.
+Group 2 matches the opening brace (optional) and surrounding whitespace.
+Group 3 matches the language identifier (optional).
+Group 4 matches the info string (optional).
+Group 5 matches the closing brace (optional), whitespace, and newline.
+Groups need to agree with `markdown-regex-tilde-fence-begin'.")
+
+(defconst markdown-regex-gfm-code-block-close
+  "^[[:blank:]]*\\(?1:`\\{3,\\}\\)\\(?2:\\s *?\\)$"
+  "Regular expression matching closing of GFM code blocks.
+Group 1 matches the closing three or more backquotes.
+Group 2 matches any whitespace and the final newline.")
+
+(defconst markdown-regex-pre
+  "^\\(    \\|\t\\).*$"
+  "Regular expression for matching preformatted text sections.")
+
+(defconst markdown-regex-list
+  (markdown-rx line-start
+               ;; 1. Leading whitespace
+               (group (* blank))
+               ;; 2. List marker: a numeral, bullet, or colon
+               (group list-marker)
+               ;; 3. Trailing whitespace
+               (group (+ blank))
+               ;; 4. Optional checkbox for GFM task list items
+               (opt (group (and checkbox (* blank)))))
+  "Regular expression for matching list items.")
+
+(defconst markdown-regex-bold
+  "\\(?1:^\\|[^\\]\\)\\(?2:\\(?3:\\*\\*\\|__\\)\\(?4:[^ \n\t\\]\\|[^ \n\t]\\(?:.\\|\n[^\n]\\)*?[^\\ ]\\)\\(?5:\\3\\)\\)"
+  "Regular expression for matching bold text.
+Group 1 matches the character before the opening asterisk or
+underscore, if any, ensuring that it is not a backslash escape.
+Group 2 matches the entire expression, including delimiters.
+Groups 3 and 5 matches the opening and closing delimiters.
+Group 4 matches the text inside the delimiters.")
+
+(defconst markdown-regex-italic
+  "\\(?:^\\|[^\\]\\)\\(?1:\\(?2:[*_]\\)\\(?3:[^ \n\t\\]\\|[^ \n\t*]\\(?:.\\|\n[^\n]\\)*?[^\\ ]\\)\\(?4:\\2\\)\\)"
+  "Regular expression for matching italic text.
+The leading unnumbered matches the character before the opening
+asterisk or underscore, if any, ensuring that it is not a
+backslash escape.
+Group 1 matches the entire expression, including delimiters.
+Groups 2 and 4 matches the opening and closing delimiters.
+Group 3 matches the text inside the delimiters.")
+
+(defconst markdown-regex-strike-through
+  "\\(?1:^\\|[^\\]\\)\\(?2:\\(?3:~~\\)\\(?4:[^ \n\t\\]\\|[^ \n\t]\\(?:.\\|\n[^\n]\\)*?[^\\ ]\\)\\(?5:~~\\)\\)"
+  "Regular expression for matching strike-through text.
+Group 1 matches the character before the opening tilde, if any,
+ensuring that it is not a backslash escape.
+Group 2 matches the entire expression, including delimiters.
+Groups 3 and 5 matches the opening and closing delimiters.
+Group 4 matches the text inside the delimiters.")
+
+(defconst markdown-regex-gfm-italic
+  "\\(?:^\\|[^\\]\\)\\(?1:\\(?2:[*_]\\)\\(?3:[^ \\]\\2\\|[^ ]\\(?:.\\|\n[^\n]\\)*?\\)\\(?4:\\2\\)\\)"
+  "Regular expression for matching italic text in GitHub Flavored Markdown.
+Underscores in words are not treated as special.
+Group 1 matches the entire expression, including delimiters.
+Groups 2 and 4 matches the opening and closing delimiters.
+Group 3 matches the text inside the delimiters.")
+
+(defconst markdown-regex-blockquote
+  "^[ \t]*\\(?1:[A-Z]?>\\)\\(?2:[ \t]*\\)\\(?3:.*\\)$"
+  "Regular expression for matching blockquote lines.
+Also accounts for a potential capital letter preceding the angle
+bracket, for use with Leanpub blocks (asides, warnings, info
+blocks, etc.).
+Group 1 matches the leading angle bracket.
+Group 2 matches the separating whitespace.
+Group 3 matches the text.")
+
+(defconst markdown-regex-line-break
+  "[^ \n\t][ \t]*\\(  \\)\n"
+  "Regular expression for matching line breaks.")
+
+(defconst markdown-regex-escape
+  "\\(\\\\\\)."
+  "Regular expression for matching escape sequences.")
+
+(defconst markdown-regex-wiki-link
+  "\\(?:^\\|[^\\]\\)\\(?1:\\(?2:\\[\\[\\)\\(?3:[^]|]+\\)\\(?:\\(?4:|\\)\\(?5:[^]]+\\)\\)?\\(?6:\\]\\]\\)\\)"
+  "Regular expression for matching wiki links.
+This matches typical bracketed [[WikiLinks]] as well as \\='aliased
+wiki links of the form [[PageName|link text]].
+The meanings of the first and second components depend
+on the value of `markdown-wiki-link-alias-first'.
+Group 1 matches the entire link.
+Group 2 matches the opening square brackets.
+Group 3 matches the first component of the wiki link.
+Group 4 matches the pipe separator, when present.
+Group 5 matches the second component of the wiki link, when present.
+Group 6 matches the closing square brackets.")
+
+(defconst markdown-regex-uri
+  (concat "\\(" (regexp-opt markdown-uri-types) ":[^]\t\n\r<>; ]+\\)")
+  "Regular expression for matching inline URIs.")
+
+;; CommanMark specification says scheme length is 2-32 characters
+(defconst markdown-regex-angle-uri
+  (concat "\\(<\\)\\([a-z][a-z0-9.+-]\\{1,31\\}:[^]\t\n\r<>,;()]+\\)\\(>\\)")
+  "Regular expression for matching inline URIs in angle brackets.")
+
+(defconst markdown-regex-email
+  "<\\(\\(?:\\sw\\|\\s_\\|\\s.\\)+@\\(?:\\sw\\|\\s_\\|\\s.\\)+\\)>"
+  "Regular expression for matching inline email addresses.")
+
+(defsubst markdown-make-regex-link-generic ()
+  "Make regular expression for matching any recognized link."
+  (concat "\\(?:" markdown-regex-link-inline
+          (when markdown-enable-wiki-links
+            (concat "\\|" markdown-regex-wiki-link))
+          "\\|" markdown-regex-link-reference
+          "\\|" markdown-regex-angle-uri "\\)"))
+
+(defconst markdown-regex-gfm-checkbox
+  " \\(\\[[ xX]\\]\\) "
+  "Regular expression for matching GFM checkboxes.
+Group 1 matches the text to become a button.")
+
+(defconst markdown-regex-blank-line
+  "^[[:blank:]]*$"
+  "Regular expression that matches a blank line.")
+
+(defconst markdown-regex-block-separator
+  "\n[\n\t\f ]*\n"
+  "Regular expression for matching block boundaries.")
+
+(defconst markdown-regex-block-separator-noindent
+  (concat "\\(\\`\\|\\(" markdown-regex-block-separator "\\)[^\n\t\f ]\\)")
+  "Regexp for block separators before lines with no indentation.")
+
+(defconst markdown-regex-math-inline-single
+  "\\(?:^\\|[^\\]\\)\\(?1:\\$\\)\\(?2:\\(?:[^\\$]\\|\\\\.\\)*\\)\\(?3:\\$\\)"
+  "Regular expression for itex $..$ math mode expressions.
+Groups 1 and 3 match the opening and closing dollar signs.
+Group 2 matches the mathematical expression contained within.")
+
+(defconst markdown-regex-math-inline-double
+  "\\(?:^\\|[^\\]\\)\\(?1:\\$\\$\\)\\(?2:\\(?:[^\\$]\\|\\\\.\\)*\\)\\(?3:\\$\\$\\)"
+  "Regular expression for itex $$..$$ math mode expressions.
+Groups 1 and 3 match opening and closing dollar signs.
+Group 2 matches the mathematical expression contained within.")
+
+(defconst markdown-regex-math-display
+  (rx line-start (* blank)
+      (group (group (repeat 1 2 "\\")) "[")
+      (group (*? anything))
+      (group (backref 2) "]")
+      line-end)
+  "Regular expression for \[..\] or \\[..\\] display math.
+Groups 1 and 4 match the opening and closing markup.
+Group 3 matches the mathematical expression contained within.
+Group 2 matches the opening slashes, and is used internally to
+match the closing slashes.")
+
+(defsubst markdown-make-gfm-fence-regex (num-backticks &optional end-of-line)
+  "Return regexp matching a GFM code fence at least NUM-BACKTICKS long.
+END-OF-LINE is the regexp construct to indicate end of line; $ if
+missing."
+  (format "%s%d%s%s" "^[[:blank:]]*\\([`]\\{" num-backticks ",\\}\\)"
+          (or end-of-line "$")))
+
+(defsubst markdown-make-tilde-fence-regex (num-tildes &optional end-of-line)
+  "Return regexp matching a tilde code fence at least NUM-TILDES long.
+END-OF-LINE is the regexp construct to indicate end of line; $ if
+missing."
+  (format "%s%d%s%s" "^[[:blank:]]*\\([~]\\{" num-tildes ",\\}\\)"
+          (or end-of-line "$")))
+
+(defconst markdown-regex-tilde-fence-begin
+  (markdown-make-tilde-fence-regex
+   3 "\\([[:blank:]]*{?\\)[[:blank:]]*\\([^[:space:]]+?\\)?\\(?:[[:blank:]]+\\(.+?\\)\\)?\\([[:blank:]]*}?[[:blank:]]*\\)$")
+  "Regular expression for matching tilde-fenced code blocks.
+Group 1 matches the opening tildes.
+Group 2 matches (optional) opening brace and surrounding whitespace.
+Group 3 matches the language identifier (optional).
+Group 4 matches the info string (optional).
+Group 5 matches the closing brace (optional) and any surrounding whitespace.
+Groups need to agree with `markdown-regex-gfm-code-block-open'.")
+
+(defconst markdown-regex-declarative-metadata
+  "^[ \t]*\\(?:-[ \t]*\\)?\\([[:alpha:]][[:alpha:] _-]*?\\)\\([:=][ \t]*\\)\\(.*\\)$"
+  "Regular expression for matching declarative metadata statements.
+This matches MultiMarkdown metadata as well as YAML and TOML
+assignments such as the following:
+
+    variable: value
+
+or
+
+    variable = value")
+
+(defconst markdown-regex-pandoc-metadata
+  "^\\(%\\)\\([ \t]*\\)\\(.*\\(?:\n[ \t]+.*\\)*\\)"
+  "Regular expression for matching Pandoc metadata.")
+
+(defconst markdown-regex-yaml-metadata-border
+  "\\(-\\{3\\}\\)$"
+  "Regular expression for matching YAML metadata.")
+
+(defconst markdown-regex-yaml-pandoc-metadata-end-border
+  "^\\(\\.\\{3\\}\\|\\-\\{3\\}\\)$"
+  "Regular expression for matching YAML metadata end borders.")
+
+(defsubst markdown-get-yaml-metadata-start-border ()
+  "Return YAML metadata start border depending upon whether Pandoc is used."
+  (concat
+   (if markdown-use-pandoc-style-yaml-metadata "^" "\\`")
+   markdown-regex-yaml-metadata-border))
+
+(defsubst markdown-get-yaml-metadata-end-border (_)
+  "Return YAML metadata end border depending upon whether Pandoc is used."
+  (if markdown-use-pandoc-style-yaml-metadata
+      markdown-regex-yaml-pandoc-metadata-end-border
+    markdown-regex-yaml-metadata-border))
+
+(defconst markdown-regex-inline-attributes
+  "[ \t]*\\(?:{:?\\)[ \t]*\\(?:\\(?:#[[:alpha:]_.:-]+\\|\\.[[:alpha:]_.:-]+\\|\\w+=['\"]?[^\n'\"}]*['\"]?\\),?[ \t]*\\)+\\(?:}\\)[ \t]*$"
+  "Regular expression for matching inline identifiers or attribute lists.
+Compatible with Pandoc, Python Markdown, PHP Markdown Extra, and Leanpub.")
+
+(defconst markdown-regex-leanpub-sections
+  (concat
+   "^\\({\\)\\("
+   (regexp-opt '("frontmatter" "mainmatter" "backmatter" "appendix" "pagebreak"))
+   "\\)\\(}\\)[ \t]*\n")
+  "Regular expression for Leanpub section markers and related syntax.")
+
+(defconst markdown-regex-sub-superscript
+  "\\(?:^\\|[^\\~^]\\)\\(?1:\\(?2:[~^]\\)\\(?3:[+-\u2212]?[[:alnum:]]+\\)\\(?4:\\2\\)\\)"
+  "The regular expression matching a sub- or superscript.
+The leading un-numbered group matches the character before the
+opening tilde or carat, if any, ensuring that it is not a
+backslash escape, carat, or tilde.
+Group 1 matches the entire expression, including markup.
+Group 2 matches the opening markup--a tilde or carat.
+Group 3 matches the text inside the delimiters.
+Group 4 matches the closing markup--a tilde or carat.")
+
+(defconst markdown-regex-include
+  "^\\(?1:<<\\)\\(?:\\(?2:\\[\\)\\(?3:.*\\)\\(?4:\\]\\)\\)?\\(?:\\(?5:(\\)\\(?6:.*\\)\\(?7:)\\)\\)?\\(?:\\(?8:{\\)\\(?9:.*\\)\\(?10:}\\)\\)?$"
+  "Regular expression matching common forms of include syntax.
+Marked 2, Leanpub, and other processors support some of these forms:
+
+<<[sections/section1.md]
+<<(folder/filename)
+<<[Code title](folder/filename)
+<<{folder/raw_file.html}
+
+Group 1 matches the opening two angle brackets.
+Groups 2-4 match the opening square bracket, the text inside,
+and the closing square bracket, respectively.
+Groups 5-7 match the opening parenthesis, the text inside, and
+the closing parenthesis.
+Groups 8-10 match the opening brace, the text inside, and the brace.")
+
+(defconst markdown-regex-pandoc-inline-footnote
+  "\\(?1:\\^\\)\\(?2:\\[\\)\\(?3:\\(?:.\\|\n[^\n]\\)*?\\)\\(?4:\\]\\)"
+  "Regular expression for Pandoc inline footnote^[footnote text].
+Group 1 matches the opening caret.
+Group 2 matches the opening square bracket.
+Group 3 matches the footnote text, without the surrounding markup.
+Group 4 matches the closing square bracket.")
+
+(defconst markdown-regex-html-attr
+  "\\(\\<[[:alpha:]:-]+\\>\\)\\(\\s-*\\(=\\)\\s-*\\(\".*?\"\\|'.*?'\\|[^'\">[:space:]]+\\)?\\)?"
+  "Regular expression for matching HTML attributes and values.
+Group 1 matches the attribute name.
+Group 2 matches the following whitespace, equals sign, and value, if any.
+Group 3 matches the equals sign, if any.
+Group 4 matches single-, double-, or un-quoted attribute values.")
+
+(defconst markdown-regex-html-tag
+  (concat "\\(</?\\)\\(\\w+\\)\\(\\(\\s-+" markdown-regex-html-attr
+          "\\)+\\s-*\\|\\s-*\\)\\(/?>\\)")
+  "Regular expression for matching HTML tags.
+Groups 1 and 9 match the beginning and ending angle brackets and slashes.
+Group 2 matches the tag name.
+Group 3 matches all attributes and whitespace following the tag name.")
+
+(defconst markdown-regex-html-entity
+  "\\(&#?[[:alnum:]]+;\\)"
+  "Regular expression for matching HTML entities.")
+
+(defconst markdown-regex-highlighting
+  "\\(?1:^\\|[^\\]\\)\\(?2:\\(?3:==\\)\\(?4:[^ \n\t\\]\\|[^ \n\t]\\(?:.\\|\n[^\n]\\)*?[^\\ ]\\)\\(?5:==\\)\\)"
+"Regular expression for matching highlighting text.
+Group 1 matches the character before the opening equal, if any,
+ensuring that it is not a backslash escape.
+Group 2 matches the entire expression, including delimiters.
+Groups 3 and 5 matches the opening and closing delimiters.
+Group 4 matches the text inside the delimiters.")
+
+
+;;; Syntax ====================================================================
+
+(defvar markdown--syntax-properties
+  (list 'markdown-tilde-fence-begin nil
+        'markdown-tilde-fence-end nil
+        'markdown-fenced-code nil
+        'markdown-yaml-metadata-begin nil
+        'markdown-yaml-metadata-end nil
+        'markdown-yaml-metadata-section nil
+        'markdown-gfm-block-begin nil
+        'markdown-gfm-block-end nil
+        'markdown-gfm-code nil
+        'markdown-list-item nil
+        'markdown-pre nil
+        'markdown-blockquote nil
+        'markdown-hr nil
+        'markdown-comment nil
+        'markdown-heading nil
+        'markdown-heading-1-setext nil
+        'markdown-heading-2-setext nil
+        'markdown-heading-1-atx nil
+        'markdown-heading-2-atx nil
+        'markdown-heading-3-atx nil
+        'markdown-heading-4-atx nil
+        'markdown-heading-5-atx nil
+        'markdown-heading-6-atx nil
+        'markdown-metadata-key nil
+        'markdown-metadata-value nil
+        'markdown-metadata-markup nil)
+  "Property list of all Markdown syntactic properties.")
+
+(defvar markdown-literal-faces
+  '(markdown-code-face
+    markdown-inline-code-face
+    markdown-pre-face
+    markdown-math-face
+    markdown-url-face
+    markdown-plain-url-face
+    markdown-language-keyword-face
+    markdown-language-info-face
+    markdown-metadata-key-face
+    markdown-metadata-value-face
+    markdown-html-entity-face
+    markdown-html-tag-name-face
+    markdown-html-tag-delimiter-face
+    markdown-html-attr-name-face
+    markdown-html-attr-value-face
+    markdown-reference-face
+    markdown-footnote-marker-face
+    markdown-line-break-face
+    markdown-comment-face)
+  "A list of markdown-mode faces that contain literal text.
+Literal text treats backslashes literally, rather than as an
+escape character (see `markdown-match-escape').")
+
+(defsubst markdown-in-comment-p (&optional pos)
+  "Return non-nil if POS is in a comment.
+If POS is not given, use point instead."
+  (get-text-property (or pos (point)) 'markdown-comment))
+
+(defsubst markdown-in-inline-code-p (pos)
+  "Return non-nil if POS is in inline code."
+  (equal (get-text-property pos 'face) '(markdown-inline-code-face)))
+
+(defun markdown--face-p (pos faces)
+  "Return non-nil if face of POS contain FACES."
+  (let ((face-prop (get-text-property pos 'face)))
+    (if (listp face-prop)
+        (cl-loop for face in face-prop
+                 thereis (memq face faces))
+      (memq face-prop faces))))
+
+(defsubst markdown--math-block-p (&optional pos)
+  (when markdown-enable-math
+    (markdown--face-p (or pos (point)) '(markdown-math-face))))
+
+(defun markdown-syntax-propertize-extend-region (start end)
+  "Extend START to END region to include an entire block of text.
+This helps improve syntax analysis for block constructs.
+Returns a cons (NEW-START . NEW-END) or nil if no adjustment should be made.
+Function is called repeatedly until it returns nil. For details, see
+`syntax-propertize-extend-region-functions'."
+  (save-match-data
+    (save-excursion
+      (let* ((new-start (progn (goto-char start)
+                               (skip-chars-forward "\n")
+                               (if (re-search-backward "\n\n" nil t)
+                                   (min start (match-end 0))
+                                 (point-min))))
+             (new-end (progn (goto-char end)
+                             (skip-chars-backward "\n")
+                             (if (re-search-forward "\n\n" nil t)
+                                 (max end (match-beginning 0))
+                               (point-max))))
+             (code-match (markdown-code-block-at-pos new-start))
+             ;; FIXME: The `code-match' can return bogus values
+             ;; when text has been inserted/deleted!
+             (new-start (min (or (and code-match (cl-first code-match))
+                                 (point-max))
+                             new-start))
+             (code-match (and (< end (point-max))
+                              (markdown-code-block-at-pos end)))
+             (new-end (max (or (and code-match (cl-second code-match)) 0)
+                           new-end)))
+
+        (unless (and (eq new-start start) (eq new-end end))
+          (cons new-start (min new-end (point-max))))))))
+
+(defun markdown-font-lock-extend-region-function (start end _)
+  "Used in `jit-lock-after-change-extend-region-functions'.
+Delegates to `markdown-syntax-propertize-extend-region'. START
+and END are the previous region to refontify."
+  (let ((res (markdown-syntax-propertize-extend-region start end)))
+    (when res
+      ;; syntax-propertize-function is not called when character at
+      ;; (point-max) is deleted, but font-lock-extend-region-functions
+      ;; are called.  Force a syntax property update in that case.
+      (when (= end (point-max))
+        ;; This function is called in a buffer modification hook.
+        ;; `markdown-syntax-propertize' doesn't save the match data,
+        ;; so we have to do it here.
+        (save-match-data
+          (markdown-syntax-propertize (car res) (cdr res))))
+      (setq jit-lock-start (car res)
+            jit-lock-end (cdr res)))))
+
+(defun markdown--cur-list-item-bounds ()
+  "Return a list describing the list item at point.
+Assumes that match data is set for `markdown-regex-list'.  See the
+documentation for `markdown-cur-list-item-bounds' for the format of
+the returned list."
+  (save-excursion
+    (let* ((begin (match-beginning 0))
+           (indent (length (match-string-no-properties 1)))
+           (nonlist-indent (- (match-end 3) (match-beginning 0)))
+           (marker (buffer-substring-no-properties
+                    (match-beginning 2) (match-end 3)))
+           (checkbox (match-string-no-properties 4))
+           (match (butlast (match-data t)))
+           (end (markdown-cur-list-item-end nonlist-indent)))
+      (list begin end indent nonlist-indent marker checkbox match))))
+
+(defun markdown--append-list-item-bounds (marker indent cur-bounds bounds)
+  "Update list item BOUNDS given list MARKER, block INDENT, and CUR-BOUNDS.
+Here, MARKER is a string representing the type of list and INDENT
+is an integer giving the indentation, in spaces, of the current
+block.  CUR-BOUNDS is a list of the form returned by
+`markdown-cur-list-item-bounds' and BOUNDS is a list of bounds
+values for parent list items.  When BOUNDS is nil, it means we are
+at baseline (not inside of a nested list)."
+  (let ((prev-indent (or (cl-third (car bounds)) 0)))
+    (cond
+     ;; New list item at baseline.
+     ((and marker (null bounds))
+      (list cur-bounds))
+     ;; List item with greater indentation (four or more spaces).
+     ;; Increase list level by consing CUR-BOUNDS onto BOUNDS.
+     ((and marker (>= indent (+ prev-indent markdown-list-indent-width)))
+      (cons cur-bounds bounds))
+     ;; List item with greater or equal indentation (less than four spaces).
+     ;; Keep list level the same by replacing the car of BOUNDS.
+     ((and marker (>= indent prev-indent))
+      (cons cur-bounds (cdr bounds)))
+     ;; Lesser indentation level.
+     ;; Pop appropriate number of elements off BOUNDS list (e.g., lesser
+     ;; indentation could move back more than one list level).  Note
+     ;; that this block need not be the beginning of list item.
+     ((< indent prev-indent)
+      (while (and (> (length bounds) 1)
+                  (setq prev-indent (cl-third (cadr bounds)))
+                  (< indent (+ prev-indent markdown-list-indent-width)))
+        (setq bounds (cdr bounds)))
+      (cons cur-bounds bounds))
+     ;; Otherwise, do nothing.
+     (t bounds))))
+
+(defun markdown-syntax-propertize-list-items (start end)
+  "Propertize list items from START to END.
+Stores nested list item information in the `markdown-list-item'
+text property to make later syntax analysis easier.  The value of
+this property is a list with elements of the form (begin . end)
+giving the bounds of the current and parent list items."
+  (save-excursion
+    (goto-char start)
+    (let ((prev-list-line -100)
+          bounds level pre-regexp)
+      ;; Find a baseline point with zero list indentation
+      (markdown-search-backward-baseline)
+      ;; Search for all list items between baseline and END
+      (while (and (< (point) end)
+                  (re-search-forward markdown-regex-list end 'limit))
+        ;; Level of list nesting
+        (setq level (length bounds))
+        ;; Pre blocks need to be indented one level past the list level
+        (setq pre-regexp (format "^\\(    \\|\t\\)\\{%d\\}" (1+ level)))
+        (beginning-of-line)
+        (cond
+         ;; Reset at headings, horizontal rules, and top-level blank lines.
+         ;; Propertize baseline when in range.
+         ((markdown-new-baseline)
+          (setq bounds nil))
+         ;; Make sure this is not a line from a pre block
+         ((and (looking-at-p pre-regexp)
+               ;; too indented line is also treated as list if previous line is list
+               (>= (- (line-number-at-pos) prev-list-line) 2)))
+         ;; If not, then update levels and propertize list item when in range.
+         (t
+          (let* ((indent (current-indentation))
+                 (cur-bounds (markdown--cur-list-item-bounds))
+                 (first (cl-first cur-bounds))
+                 (last (cl-second cur-bounds))
+                 (marker (cl-fifth cur-bounds)))
+            (setq bounds (markdown--append-list-item-bounds
+                          marker indent cur-bounds bounds))
+            (when (and (<= start (point)) (<= (point) end))
+              (setq prev-list-line (line-number-at-pos first))
+              (put-text-property first last 'markdown-list-item bounds)))))
+        (end-of-line)))))
+
+(defun markdown-syntax-propertize-pre-blocks (start end)
+  "Match preformatted text blocks from START to END."
+  (save-excursion
+    (goto-char start)
+    (let (finish)
+      ;; Use loop for avoiding too many recursive calls
+      ;; https://github.com/jrblevin/markdown-mode/issues/512
+      (while (not finish)
+        (let ((levels (markdown-calculate-list-levels))
+              indent pre-regexp close-regexp open close)
+          (while (and (< (point) end) (not close))
+            ;; Search for a region with sufficient indentation
+            (if (null levels)
+                (setq indent 1)
+              (setq indent (1+ (length levels))))
+            (setq pre-regexp (format "^\\(    \\|\t\\)\\{%d\\}" indent))
+            (setq close-regexp (format "^\\(    \\|\t\\)\\{0,%d\\}\\([^ \t]\\)" (1- indent)))
+
+            (cond
+             ;; If not at the beginning of a line, move forward
+             ((not (bolp)) (forward-line))
+             ;; Move past blank lines
+             ((markdown-cur-line-blank-p) (forward-line))
+             ;; At headers and horizontal rules, reset levels
+             ((markdown-new-baseline) (forward-line) (setq levels nil))
+             ;; If the current line has sufficient indentation, mark out pre block
+             ;; The opening should be preceded by a blank line.
+             ((and (markdown-prev-line-blank) (looking-at pre-regexp))
+              (setq open (match-beginning 0))
+              (while (and (or (looking-at-p pre-regexp) (markdown-cur-line-blank-p))
+                          (not (eobp)))
+                (forward-line))
+              (skip-syntax-backward "-")
+              (forward-line)
+              (setq close (point)))
+             ;; If current line has a list marker, update levels, move to end of block
+             ((looking-at markdown-regex-list)
+              (setq levels (markdown-update-list-levels
+                            (match-string 2) (current-indentation) levels))
+              (markdown-end-of-text-block))
+             ;; If this is the end of the indentation level, adjust levels accordingly.
+             ;; Only match end of indentation level if levels is not the empty list.
+             ((and (car levels) (looking-at-p close-regexp))
+              (setq levels (markdown-update-list-levels
+                            nil (current-indentation) levels))
+              (markdown-end-of-text-block))
+             (t (markdown-end-of-text-block))))
+
+          (if (and open close)
+              ;; Set text property data and continue to search
+              (put-text-property open close 'markdown-pre (list open close))
+            (setq finish t))))
+      nil)))
+
+(defconst markdown-fenced-block-pairs
+  `(((,markdown-regex-tilde-fence-begin markdown-tilde-fence-begin)
+     (markdown-make-tilde-fence-regex markdown-tilde-fence-end)
+     markdown-fenced-code)
+    ((markdown-get-yaml-metadata-start-border markdown-yaml-metadata-begin)
+     (markdown-get-yaml-metadata-end-border markdown-yaml-metadata-end)
+     markdown-yaml-metadata-section)
+    ((,markdown-regex-gfm-code-block-open markdown-gfm-block-begin)
+     (markdown-make-gfm-fence-regex markdown-gfm-block-end)
+     markdown-gfm-code))
+  "Mapping of regular expressions to \"fenced-block\" constructs.
+These constructs are distinguished by having a distinctive start
+and end pattern, both of which take up an entire line of text,
+but no special pattern to identify text within the fenced
+blocks (unlike blockquotes and indented-code sections).
+
+Each element within this list takes the form:
+
+  ((START-REGEX-OR-FUN START-PROPERTY)
+   (END-REGEX-OR-FUN END-PROPERTY)
+   MIDDLE-PROPERTY)
+
+Each *-REGEX-OR-FUN element can be a regular expression as a string, or a
+function which evaluates to same. Functions for START-REGEX-OR-FUN accept no
+arguments, but functions for END-REGEX-OR-FUN accept a single numerical argument
+which is the length of the first group of the START-REGEX-OR-FUN match, which
+can be ignored if unnecessary. `markdown-maybe-funcall-regexp' is used to
+evaluate these into \"real\" regexps.
+
+The *-PROPERTY elements are the text properties applied to each part of the
+block construct when it is matched using
+`markdown-syntax-propertize-fenced-block-constructs'. START-PROPERTY is applied
+to the text matching START-REGEX-OR-FUN, END-PROPERTY to END-REGEX-OR-FUN, and
+MIDDLE-PROPERTY to the text in between the two. The value of *-PROPERTY is the
+`match-data' when the regexp was matched to the text. In the case of
+MIDDLE-PROPERTY, the value is a false match data of the form \\='(begin end), with
+begin and end set to the edges of the \"middle\" text. This makes fontification
+easier.")
+
+(defun markdown-text-property-at-point (prop)
+  (get-text-property (point) prop))
+
+(defsubst markdown-maybe-funcall-regexp (object &optional arg)
+  (cond ((functionp object)
+         (if arg (funcall object arg) (funcall object)))
+        ((stringp object) object)
+        (t (error "Object cannot be turned into regex"))))
+
+(defsubst markdown-get-start-fence-regexp ()
+  "Return regexp to find all \"start\" sections of fenced block constructs.
+Which construct is actually contained in the match must be found separately."
+  (mapconcat
+   #'identity
+   (mapcar (lambda (entry) (markdown-maybe-funcall-regexp (caar entry)))
+           markdown-fenced-block-pairs)
+   "\\|"))
+
+(defun markdown-get-fenced-block-begin-properties ()
+  (cl-mapcar (lambda (entry) (cl-cadar entry)) markdown-fenced-block-pairs))
+
+(defun markdown-get-fenced-block-end-properties ()
+  (cl-mapcar (lambda (entry) (cl-cadadr entry)) markdown-fenced-block-pairs))
+
+(defun markdown-get-fenced-block-middle-properties ()
+  (cl-mapcar #'cl-third markdown-fenced-block-pairs))
+
+(defun markdown-find-previous-prop (prop &optional lim)
+  "Find previous place where property PROP is non-nil, up to LIM.
+Return a cons of (pos . property). pos is point if point contains
+non-nil PROP."
+  (let ((res
+         (if (get-text-property (point) prop) (point)
+           (previous-single-property-change
+            (point) prop nil (or lim (point-min))))))
+    (when (and (not (get-text-property res prop))
+               (> res (point-min))
+               (get-text-property (1- res) prop))
+      (cl-decf res))
+    (when (and res (get-text-property res prop)) (cons res prop))))
+
+(defun markdown-find-next-prop (prop &optional lim)
+  "Find next place where property PROP is non-nil, up to LIM.
+Return a cons of (POS . PROPERTY) where POS is point if point
+contains non-nil PROP."
+  (let ((res
+         (if (get-text-property (point) prop) (point)
+           (next-single-property-change
+            (point) prop nil (or lim (point-max))))))
+    (when (and res (get-text-property res prop)) (cons res prop))))
+
+(defun markdown-min-of-seq (map-fn seq)
+  "Apply MAP-FN to SEQ and return element of SEQ with minimum value of MAP-FN."
+  (cl-loop for el in seq
+           with min = 1.0e+INF          ; infinity
+           with min-el = nil
+           do (let ((res (funcall map-fn el)))
+                (when (< res min)
+                  (setq min res)
+                  (setq min-el el)))
+           finally return min-el))
+
+(defun markdown-max-of-seq (map-fn seq)
+  "Apply MAP-FN to SEQ and return element of SEQ with maximum value of MAP-FN."
+  (cl-loop for el in seq
+           with max = -1.0e+INF          ; negative infinity
+           with max-el = nil
+           do (let ((res (funcall map-fn el)))
+                (when (and res (> res max))
+                  (setq max res)
+                  (setq max-el el)))
+           finally return max-el))
+
+(defun markdown-find-previous-block ()
+  "Find previous block.
+Detect whether `markdown-syntax-propertize-fenced-block-constructs' was
+unable to propertize the entire block, but was able to propertize the beginning
+of the block. If so, return a cons of (pos . property) where the beginning of
+the block was propertized."
+  (let ((start-pt (point))
+        (closest-open
+         (markdown-max-of-seq
+          #'car
+          (cl-remove-if
+           #'null
+           (cl-mapcar
+            #'markdown-find-previous-prop
+            (markdown-get-fenced-block-begin-properties))))))
+    (when closest-open
+      (let* ((length-of-open-match
+              (let ((match-d
+                     (get-text-property (car closest-open) (cdr closest-open))))
+                (- (cl-fourth match-d) (cl-third match-d))))
+             (end-regexp
+              (markdown-maybe-funcall-regexp
+               (cl-caadr
+                (cl-find-if
+                 (lambda (entry) (eq (cl-cadar entry) (cdr closest-open)))
+                 markdown-fenced-block-pairs))
+               length-of-open-match))
+             (end-prop-loc
+              (save-excursion
+                (save-match-data
+                  (goto-char (car closest-open))
+                  (and (re-search-forward end-regexp start-pt t)
+                       (match-beginning 0))))))
+        (and (not end-prop-loc) closest-open)))))
+
+(defun markdown-get-fenced-block-from-start (prop)
+  "Return limits of an enclosing fenced block from its start, using PROP.
+Return value is a list usable as `match-data'."
+  (catch 'no-rest-of-block
+    (let* ((correct-entry
+            (cl-find-if
+             (lambda (entry) (eq (cl-cadar entry) prop))
+             markdown-fenced-block-pairs))
+           (begin-of-begin (cl-first (markdown-text-property-at-point prop)))
+           (middle-prop (cl-third correct-entry))
+           (end-prop (cl-cadadr correct-entry))
+           (end-of-end
+            (save-excursion
+              (goto-char (match-end 0))   ; end of begin
+              (unless (eobp) (forward-char))
+              (let ((mid-prop-v (markdown-text-property-at-point middle-prop)))
+                (if (not mid-prop-v)    ; no middle
+                    (progn
+                      ;; try to find end by advancing one
+                      (let ((end-prop-v
+                             (markdown-text-property-at-point end-prop)))
+                        (if end-prop-v (cl-second end-prop-v)
+                          (throw 'no-rest-of-block nil))))
+                  (set-match-data mid-prop-v)
+                  (goto-char (match-end 0))   ; end of middle
+                  (beginning-of-line)         ; into end
+                  (cl-second (markdown-text-property-at-point end-prop)))))))
+      (list begin-of-begin end-of-end))))
+
+(defun markdown-get-fenced-block-from-middle (prop)
+  "Return limits of an enclosing fenced block from its middle, using PROP.
+Return value is a list usable as `match-data'."
+  (let* ((correct-entry
+          (cl-find-if
+           (lambda (entry) (eq (cl-third entry) prop))
+           markdown-fenced-block-pairs))
+         (begin-prop (cl-cadar correct-entry))
+         (begin-of-begin
+          (save-excursion
+            (goto-char (match-beginning 0))
+            (unless (bobp) (forward-line -1))
+            (beginning-of-line)
+            (cl-first (markdown-text-property-at-point begin-prop))))
+         (end-prop (cl-cadadr correct-entry))
+         (end-of-end
+          (save-excursion
+            (goto-char (match-end 0))
+            (beginning-of-line)
+            (cl-second (markdown-text-property-at-point end-prop)))))
+    (list begin-of-begin end-of-end)))
+
+(defun markdown-get-fenced-block-from-end (prop)
+  "Return limits of an enclosing fenced block from its end, using PROP.
+Return value is a list usable as `match-data'."
+  (let* ((correct-entry
+          (cl-find-if
+           (lambda (entry) (eq (cl-cadadr entry) prop))
+           markdown-fenced-block-pairs))
+         (end-of-end (cl-second (markdown-text-property-at-point prop)))
+         (middle-prop (cl-third correct-entry))
+         (begin-prop (cl-cadar correct-entry))
+         (begin-of-begin
+          (save-excursion
+            (goto-char (match-beginning 0)) ; beginning of end
+            (unless (bobp) (backward-char)) ; into middle
+            (let ((mid-prop-v (markdown-text-property-at-point middle-prop)))
+              (if (not mid-prop-v)
+                  (progn
+                    (beginning-of-line)
+                    (cl-first (markdown-text-property-at-point begin-prop)))
+                (set-match-data mid-prop-v)
+                (goto-char (match-beginning 0))   ; beginning of middle
+                (unless (bobp) (forward-line -1)) ; into beginning
+                (beginning-of-line)
+                (cl-first (markdown-text-property-at-point begin-prop)))))))
+    (list begin-of-begin end-of-end)))
+
+(defun markdown-get-enclosing-fenced-block-construct (&optional pos)
+  "Get \"fake\" match data for block enclosing POS.
+Returns fake match data which encloses the start, middle, and end
+of the block construct enclosing POS, if it exists. Used in
+`markdown-code-block-at-pos'."
+  (save-excursion
+    (when pos (goto-char pos))
+    (beginning-of-line)
+    (car
+     (cl-remove-if
+      #'null
+      (cl-mapcar
+       (lambda (fun-and-prop)
+         (cl-destructuring-bind (fun prop) fun-and-prop
+           (when prop
+             (save-match-data
+               (set-match-data (markdown-text-property-at-point prop))
+               (funcall fun prop)))))
+       `((markdown-get-fenced-block-from-start
+          ,(cl-find-if
+            #'markdown-text-property-at-point
+            (markdown-get-fenced-block-begin-properties)))
+         (markdown-get-fenced-block-from-middle
+          ,(cl-find-if
+            #'markdown-text-property-at-point
+            (markdown-get-fenced-block-middle-properties)))
+         (markdown-get-fenced-block-from-end
+          ,(cl-find-if
+            #'markdown-text-property-at-point
+            (markdown-get-fenced-block-end-properties)))))))))
+
+(defun markdown-propertize-end-match (reg end fence-spec middle-begin)
+  "Get match for REG up to END, if exists, and propertize appropriately.
+FENCE-SPEC is an entry in `markdown-fenced-block-pairs' and
+MIDDLE-BEGIN is the start of the \"middle\" section of the block."
+  (when (re-search-forward reg end t)
+    (let ((close-begin (match-beginning 0)) ; Start of closing line.
+          (close-end (match-end 0))         ; End of closing line.
+          (close-data (match-data t)))      ; Match data for closing line.
+      ;; Propertize middle section of fenced block.
+      (put-text-property middle-begin close-begin
+                         (cl-third fence-spec)
+                         (list middle-begin close-begin))
+      ;; If the block is a YAML block, propertize the declarations inside
+      (when (< middle-begin close-begin) ;; workaround #634
+        (markdown-syntax-propertize-yaml-metadata middle-begin close-begin))
+      ;; Propertize closing line of fenced block.
+      (put-text-property close-begin close-end
+                         (cl-cadadr fence-spec) close-data))))
+
+(defun markdown--code-fence-single-line-p (begin)
+  (save-excursion
+    (goto-char begin)
+    (save-match-data
+      (and (re-search-forward "`\\{3,\\}" nil t)
+           (re-search-forward "`\\{3,\\}" (line-end-position) t)))))
+
+(defun markdown-syntax-propertize-fenced-block-constructs (start end)
+  "Propertize according to `markdown-fenced-block-pairs' from START to END.
+If unable to propertize an entire block (if the start of a block is within START
+and END, but the end of the block is not), propertize the start section of a
+block, then in a subsequent call propertize both middle and end by finding the
+start which was previously propertized."
+  (let ((start-reg (markdown-get-start-fence-regexp)))
+    (save-excursion
+      (goto-char start)
+      ;; start from previous unclosed block, if exists
+      (let ((prev-begin-block (markdown-find-previous-block)))
+        (when prev-begin-block
+          (let* ((correct-entry
+                  (cl-find-if (lambda (entry)
+                                (eq (cdr prev-begin-block) (cl-cadar entry)))
+                              markdown-fenced-block-pairs))
+                 (enclosed-text-start (1+ (car prev-begin-block)))
+                 (start-length
+                  (save-excursion
+                    (goto-char (car prev-begin-block))
+                    (string-match
+                     (markdown-maybe-funcall-regexp
+                      (caar correct-entry))
+                     (buffer-substring
+                      (line-beginning-position) (line-end-position)))
+                    (- (match-end 1) (match-beginning 1))))
+                 (end-reg (markdown-maybe-funcall-regexp
+                           (cl-caadr correct-entry) start-length)))
+            (markdown-propertize-end-match
+             end-reg end correct-entry enclosed-text-start))))
+      ;; find all new blocks within region
+      (while (re-search-forward start-reg end t)
+        ;; we assume the opening constructs take up (only) an entire line,
+        ;; so we re-check the current line
+        (let* ((block-start (match-beginning 0))
+               (cur-line (buffer-substring (line-beginning-position) (line-end-position)))
+               ;; find entry in `markdown-fenced-block-pairs' corresponding
+               ;; to regex which was matched
+               (correct-entry
+                (cl-find-if
+                 (lambda (fenced-pair)
+                   (string-match-p
+                    (markdown-maybe-funcall-regexp (caar fenced-pair))
+                    cur-line))
+                 markdown-fenced-block-pairs))
+               (enclosed-text-start
+                (save-excursion (1+ (line-end-position))))
+               (end-reg
+                (markdown-maybe-funcall-regexp
+                 (cl-caadr correct-entry)
+                 (if (and (match-beginning 1) (match-end 1))
+                     (- (match-end 1) (match-beginning 1))
+                   0)))
+               (prop (cl-cadar correct-entry)))
+          (when (or (not (eq prop 'markdown-gfm-block-begin))
+                    (not (markdown--code-fence-single-line-p block-start)))
+            ;; get correct match data
+            (save-excursion
+              (beginning-of-line)
+              (re-search-forward
+               (markdown-maybe-funcall-regexp (caar correct-entry))
+               (line-end-position)))
+            ;; mark starting, even if ending is outside of region
+            (put-text-property (match-beginning 0) (match-end 0) prop (match-data t))
+            (markdown-propertize-end-match
+             end-reg end correct-entry enclosed-text-start)))))))
+
+(defun markdown-syntax-propertize-blockquotes (start end)
+  "Match blockquotes from START to END."
+  (save-excursion
+    (goto-char start)
+    (while (and (re-search-forward markdown-regex-blockquote end t)
+                (not (markdown-code-block-at-pos (match-beginning 0))))
+      (put-text-property (match-beginning 0) (match-end 0)
+                         'markdown-blockquote
+                         (match-data t)))))
+
+(defun markdown-syntax-propertize-hrs (start end)
+  "Match horizontal rules from START to END."
+  (save-excursion
+    (goto-char start)
+    (while (re-search-forward markdown-regex-hr end t)
+      (let ((beg (match-beginning 0))
+            (end (match-end 0)))
+        (goto-char beg)
+        (unless (or (markdown-on-heading-p)
+                    (markdown-code-block-at-point-p))
+          (put-text-property beg end 'markdown-hr (match-data t)))
+        (goto-char end)))))
+
+(defun markdown-syntax-propertize-yaml-metadata (start end)
+  "Propertize elements inside YAML metadata blocks from START to END.
+Assumes region from START and END is already known to be the interior
+region of a YAML metadata block as propertized by
+`markdown-syntax-propertize-fenced-block-constructs'."
+  (save-excursion
+    (goto-char start)
+    (cl-loop
+     while (re-search-forward markdown-regex-declarative-metadata end t)
+     do (progn
+          (put-text-property (match-beginning 1) (match-end 1)
+                             'markdown-metadata-key (match-data t))
+          (put-text-property (match-beginning 2) (match-end 2)
+                             'markdown-metadata-markup (match-data t))
+          (put-text-property (match-beginning 3) (match-end 3)
+                             'markdown-metadata-value (match-data t))))))
+
+(defun markdown-syntax-propertize-headings (start end)
+  "Match headings of type SYMBOL with REGEX from START to END."
+  (goto-char start)
+  (while (re-search-forward markdown-regex-header end t)
+    (unless (markdown-code-block-at-pos (match-beginning 0))
+      (put-text-property
+       (match-beginning 0) (match-end 0) 'markdown-heading
+       (match-data t))
+      (put-text-property
+       (match-beginning 0) (match-end 0)
+       (cond ((match-string-no-properties 2) 'markdown-heading-1-setext)
+             ((match-string-no-properties 3) 'markdown-heading-2-setext)
+             (t (let ((atx-level (length (markdown-trim-whitespace
+                                          (match-string-no-properties 4)))))
+                  (intern (format "markdown-heading-%d-atx" atx-level)))))
+       (match-data t)))))
+
+(defun markdown-syntax-propertize-comments (start end)
+  "Match HTML comments from the START to END."
+  ;; Implement by loop instead of recursive call for avoiding
+  ;; exceed max-lisp-eval-depth issue
+  ;; https://github.com/jrblevin/markdown-mode/issues/536
+  (let (finish)
+    (goto-char start)
+    (while (not finish)
+      (let* ((in-comment (nth 4 (syntax-ppss)))
+             (comment-begin (nth 8 (syntax-ppss))))
+        (cond
+         ;; Comment start
+         ((and (not in-comment)
+               (re-search-forward markdown-regex-comment-start end t)
+               (not (markdown-inline-code-at-point-p))
+               (not (markdown-code-block-at-point-p)))
+          (let ((open-beg (match-beginning 0)))
+            (put-text-property open-beg (1+ open-beg)
+                               'syntax-table (string-to-syntax "<"))
+            (goto-char (min (1+ (match-end 0)) end (point-max)))))
+         ;; Comment end
+         ((and in-comment comment-begin
+               (re-search-forward markdown-regex-comment-end end t))
+          (let ((comment-end (match-end 0)))
+            (put-text-property (1- comment-end) comment-end
+                               'syntax-table (string-to-syntax ">"))
+            ;; Remove any other text properties inside the comment
+            (remove-text-properties comment-begin comment-end
+                                    markdown--syntax-properties)
+            (put-text-property comment-begin comment-end
+                               'markdown-comment (list comment-begin comment-end))
+            (goto-char (min comment-end end (point-max)))))
+         ;; Nothing found
+         (t (setq finish t)))))
+    nil))
+
+(defun markdown-syntax-propertize (start end)
+  "Function used as `syntax-propertize-function'.
+START and END delimit region to propertize."
+  (with-silent-modifications
+    (save-excursion
+      (remove-text-properties start end markdown--syntax-properties)
+      (markdown-syntax-propertize-fenced-block-constructs start end)
+      (markdown-syntax-propertize-list-items start end)
+      (markdown-syntax-propertize-pre-blocks start end)
+      (markdown-syntax-propertize-blockquotes start end)
+      (markdown-syntax-propertize-headings start end)
+      (markdown-syntax-propertize-hrs start end)
+      (markdown-syntax-propertize-comments start end))))
+
+
+;;; Markup Hiding =============================================================
+
+(defconst markdown-markup-properties
+  '(face markdown-markup-face invisible markdown-markup)
+  "List of properties and values to apply to markup.")
+
+(defconst markdown-line-break-properties
+  '(face markdown-line-break-face invisible markdown-markup)
+  "List of properties and values to apply to line break markup.")
+
+(defconst markdown-language-keyword-properties
+  '(face markdown-language-keyword-face invisible markdown-markup)
+  "List of properties and values to apply to code block language names.")
+
+(defconst markdown-language-info-properties
+  '(face markdown-language-info-face invisible markdown-markup)
+  "List of properties and values to apply to code block language info strings.")
+
+(defconst markdown-include-title-properties
+  '(face markdown-link-title-face invisible markdown-markup)
+  "List of properties and values to apply to included code titles.")
+
+(defcustom markdown-hide-markup nil
+  "Determines whether markup in the buffer will be hidden.
+When set to nil, all markup is displayed in the buffer as it
+appears in the file.  An exception is when `markdown-hide-urls'
+is non-nil.
+Set this to a non-nil value to turn this feature on by default.
+You can interactively toggle the value of this variable with
+`markdown-toggle-markup-hiding', \\[markdown-toggle-markup-hiding],
+or from the Markdown > Show & Hide menu.
+
+Markup hiding works by adding text properties to positions in the
+buffer---either the `invisible' property or the `display' property
+in cases where alternative glyphs are used (e.g., list bullets).
+This does not, however, affect printing or other output.
+Functions such as `htmlfontify-buffer' and `ps-print-buffer' will
+not honor these text properties.  For printing, it would be better
+to first convert to HTML or PDF (e.g,. using Pandoc)."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.3"))
+(make-variable-buffer-local 'markdown-hide-markup)
+
+(defun markdown-toggle-markup-hiding (&optional arg)
+  "Toggle the display or hiding of markup.
+With a prefix argument ARG, enable markup hiding if ARG is positive,
+and disable it otherwise.
+See `markdown-hide-markup' for additional details."
+  (interactive (list (or current-prefix-arg 'toggle)))
+  (setq markdown-hide-markup
+        (if (eq arg 'toggle)
+            (not markdown-hide-markup)
+          (> (prefix-numeric-value arg) 0)))
+  (if markdown-hide-markup
+      (add-to-invisibility-spec 'markdown-markup)
+    (remove-from-invisibility-spec 'markdown-markup))
+  (when (called-interactively-p 'interactive)
+    (message "markdown-mode markup hiding %s" (if markdown-hide-markup "enabled" "disabled")))
+  (markdown-reload-extensions))
+
+
+;;; Font Lock =================================================================
+
+(require 'font-lock)
+
+(defgroup markdown-faces nil
+  "Faces used in Markdown Mode."
+  :group 'markdown
+  :group 'faces)
+
+(defface markdown-italic-face
+  '((t (:inherit italic)))
+  "Face for italic text."
+  :group 'markdown-faces)
+
+(defface markdown-bold-face
+  '((t (:inherit bold)))
+  "Face for bold text."
+  :group 'markdown-faces)
+
+(defface markdown-strike-through-face
+  '((t (:strike-through t)))
+  "Face for strike-through text."
+  :group 'markdown-faces)
+
+(defface markdown-markup-face
+  '((t (:inherit shadow :slant normal :weight normal)))
+  "Face for markup elements."
+  :group 'markdown-faces)
+
+(defface markdown-header-rule-face
+  '((t (:inherit markdown-markup-face)))
+  "Base face for headers rules."
+  :group 'markdown-faces)
+
+(defface markdown-header-delimiter-face
+  '((t (:inherit markdown-markup-face)))
+  "Base face for headers hash delimiter."
+  :group 'markdown-faces)
+
+(defface markdown-list-face
+  '((t (:inherit markdown-markup-face)))
+  "Face for list item markers."
+  :group 'markdown-faces)
+
+(defface markdown-blockquote-face
+  '((t (:inherit font-lock-doc-face)))
+  "Face for blockquote sections."
+  :group 'markdown-faces)
+
+(defface markdown-code-face
+  '((t (:inherit fixed-pitch)))
+  "Face for inline code, pre blocks, and fenced code blocks.
+This may be used, for example, to add a contrasting background to
+inline code fragments and code blocks."
+  :group 'markdown-faces)
+
+(defface markdown-inline-code-face
+  '((t (:inherit (markdown-code-face font-lock-constant-face))))
+  "Face for inline code."
+  :group 'markdown-faces)
+
+(defface markdown-pre-face
+  '((t (:inherit (markdown-code-face font-lock-constant-face))))
+  "Face for preformatted text."
+  :group 'markdown-faces)
+
+(defface markdown-table-face
+  '((t (:inherit (markdown-code-face))))
+  "Face for tables."
+  :group 'markdown-faces)
+
+(defface markdown-language-keyword-face
+  '((t (:inherit font-lock-type-face)))
+  "Face for programming language identifiers."
+  :group 'markdown-faces)
+
+(defface markdown-language-info-face
+  '((t (:inherit font-lock-string-face)))
+  "Face for programming language info strings."
+  :group 'markdown-faces)
+
+(defface markdown-link-face
+  '((t (:inherit link)))
+  "Face for link text, ie the alias portion of a link.
+If a wiki link does not have an alias portion, use this face
+for the entire link."
+  :group 'markdown-faces)
+
+(defface markdown-missing-link-face
+  '((t (:inherit font-lock-warning-face)))
+  "Face for the link text if the link points to a missing file."
+  :group 'markdown-faces)
+
+(defface markdown-reference-face
+  '((t (:inherit markdown-markup-face)))
+  "Face for link references."
+  :group 'markdown-faces)
+
+(defface markdown-footnote-marker-face
+  '((t (:inherit markdown-markup-face)))
+  "Face for footnote markers."
+  :group 'markdown-faces)
+
+(defface markdown-footnote-text-face
+  '((t (:inherit font-lock-comment-face)))
+  "Face for footnote text."
+  :group 'markdown-faces)
+
+(defface markdown-url-face
+  '((t (:inherit font-lock-string-face)))
+  "Face for URLs that are part of markup.
+For example, this applies to URLs in inline links:
+[link text](http://example.com/)."
+  :group 'markdown-faces)
+
+(defface markdown-plain-url-face
+  '((t (:inherit markdown-link-face)))
+  "Face for URLs that are also links.
+For example, this applies to plain angle bracket URLs:
+<http://example.com/>."
+  :group 'markdown-faces)
+
+(defface markdown-link-title-face
+  '((t (:inherit font-lock-comment-face)))
+  "Face for reference link titles."
+  :group 'markdown-faces)
+
+(defface markdown-line-break-face
+  '((t (:inherit font-lock-constant-face :underline t)))
+  "Face for hard line breaks."
+  :group 'markdown-faces)
+
+(defface markdown-comment-face
+  '((t (:inherit font-lock-comment-face)))
+  "Face for HTML comments."
+  :group 'markdown-faces)
+
+(defface markdown-math-face
+  '((t (:inherit font-lock-string-face)))
+  "Face for LaTeX expressions."
+  :group 'markdown-faces)
+
+(defface markdown-metadata-key-face
+  '((t (:inherit font-lock-variable-name-face)))
+  "Face for metadata keys."
+  :group 'markdown-faces)
+
+(defface markdown-metadata-value-face
+  '((t (:inherit font-lock-string-face)))
+  "Face for metadata values."
+  :group 'markdown-faces)
+
+(defface markdown-gfm-checkbox-face
+  '((t (:inherit font-lock-builtin-face)))
+  "Face for GFM checkboxes."
+  :group 'markdown-faces)
+
+(defface markdown-highlight-face
+  '((t (:inherit highlight)))
+  "Face for mouse highlighting."
+  :group 'markdown-faces)
+
+(defface markdown-hr-face
+  '((t (:inherit markdown-markup-face)))
+  "Face for horizontal rules."
+  :group 'markdown-faces)
+
+(defface markdown-html-tag-name-face
+  '((t (:inherit font-lock-type-face)))
+  "Face for HTML tag names."
+  :group 'markdown-faces)
+
+(defface markdown-html-tag-delimiter-face
+  '((t (:inherit markdown-markup-face)))
+  "Face for HTML tag delimiters."
+  :group 'markdown-faces)
+
+(defface markdown-html-attr-name-face
+  '((t (:inherit font-lock-variable-name-face)))
+  "Face for HTML attribute names."
+  :group 'markdown-faces)
+
+(defface markdown-html-attr-value-face
+  '((t (:inherit font-lock-string-face)))
+  "Face for HTML attribute values."
+  :group 'markdown-faces)
+
+(defface markdown-html-entity-face
+  '((t (:inherit font-lock-variable-name-face)))
+  "Face for HTML entities."
+  :group 'markdown-faces)
+
+(defface markdown-highlighting-face
+  '((t (:background "yellow" :foreground "black")))
+  "Face for highlighting."
+  :group 'markdown-faces)
+
+(defcustom markdown-header-scaling nil
+  "Whether to use variable-height faces for headers.
+When non-nil, `markdown-header-face' will inherit from
+`variable-pitch' and the scaling values in
+`markdown-header-scaling-values' will be applied to
+headers of levels one through six respectively."
+  :type 'boolean
+  :initialize #'custom-initialize-default
+  :set (lambda (symbol value)
+         (set-default symbol value)
+         (markdown-update-header-faces value))
+  :group 'markdown-faces
+  :package-version '(markdown-mode . "2.2"))
+
+(defcustom markdown-header-scaling-values
+  '(2.0 1.7 1.4 1.1 1.0 1.0)
+  "List of scaling values for headers of level one through six.
+Used when `markdown-header-scaling' is non-nil."
+  :type '(repeat float)
+  :initialize #'custom-initialize-default
+  :set (lambda (symbol value)
+         (set-default symbol value)
+         (markdown-update-header-faces markdown-header-scaling value)))
+
+(defmacro markdown--dotimes-when-compile (i-n body)
+  (declare (indent 1) (debug ((symbolp form) form)))
+  (let ((var (car i-n))
+        (n (cadr i-n))
+        (code ()))
+    (dotimes (i (eval n t))
+      (push (eval body `((,var . ,i))) code))
+    `(progn ,@(nreverse code))))
+
+(defface markdown-header-face
+  `((t (:inherit (,@(when markdown-header-scaling '(variable-pitch))
+                  font-lock-function-name-face)
+        :weight bold)))
+  "Base face for headers.")
+
+(markdown--dotimes-when-compile (num 6)
+  (let* ((num1 (1+ num))
+         (face-name (intern (format "markdown-header-face-%s" num1))))
+    `(defface ,face-name
+       (,'\` ((t (:inherit markdown-header-face
+                  :height
+                  (,'\, (if markdown-header-scaling
+                            (float (nth ,num markdown-header-scaling-values))
+                          1.0))))))
+       (format "Face for level %s headers.
+You probably don't want to customize this face directly. Instead
+you can customize the base face `markdown-header-face' or the
+variable-height variable `markdown-header-scaling'." ,num1))))
+
+(defun markdown-update-header-faces (&optional scaling scaling-values)
+  "Update header faces, depending on if header SCALING is desired.
+If so, use given list of SCALING-VALUES relative to the baseline
+size of `markdown-header-face'."
+  (dotimes (num 6)
+    (let* ((face-name (intern (format "markdown-header-face-%s" (1+ num))))
+           (scale (cond ((not scaling) 1.0)
+                        (scaling-values (float (nth num scaling-values)))
+                        (t (float (nth num markdown-header-scaling-values))))))
+      (unless (get face-name 'saved-face) ; Don't update customized faces
+        (set-face-attribute face-name nil :height scale)))))
+
+(defun markdown-syntactic-face (state)
+  "Return font-lock face for characters with given STATE.
+See `font-lock-syntactic-face-function' for details."
+  (let ((in-comment (nth 4 state)))
+    (cond
+     (in-comment 'markdown-comment-face)
+     (t nil))))
+
+(defcustom markdown-list-item-bullets
+  '("●" "◎" "○" "◆" "◇" "►" "•")
+  "List of bullets to use for unordered lists.
+It can contain any number of symbols, which will be repeated.
+Depending on your font, some reasonable choices are:
+♥ ● ◇ ✚ ✜ ☯ ◆ ♠ ♣ ♦ ❀ ◆ ◖ ▶ ► • ★ ▸."
+  :group 'markdown
+  :type '(repeat (string :tag "Bullet character"))
+  :package-version '(markdown-mode . "2.3"))
+
+(defun markdown--footnote-marker-properties ()
+  "Return a font-lock facespec expression for footnote marker text."
+  `(face markdown-footnote-marker-face
+         ,@(when markdown-hide-markup
+             `(display ,markdown-footnote-display))))
+
+(defun markdown--pandoc-inline-footnote-properties ()
+  "Return a font-lock facespec expression for Pandoc inline footnote text."
+  `(face markdown-footnote-text-face
+         ,@(when markdown-hide-markup
+             `(display ,markdown-footnote-display))))
+
+(defvar markdown-mode-font-lock-keywords
+  `((markdown-match-yaml-metadata-begin . ((1 'markdown-markup-face)))
+    (markdown-match-yaml-metadata-end . ((1 'markdown-markup-face)))
+    (markdown-match-yaml-metadata-key . ((1 'markdown-metadata-key-face)
+                                         (2 'markdown-markup-face)
+                                         (3 'markdown-metadata-value-face)))
+    (markdown-match-gfm-open-code-blocks . ((1 markdown-markup-properties)
+                                            (2 markdown-markup-properties nil t)
+                                            (3 markdown-language-keyword-properties nil t)
+                                            (4 markdown-language-info-properties nil t)
+                                            (5 markdown-markup-properties nil t)))
+    (markdown-match-gfm-close-code-blocks . ((0 markdown-markup-properties)))
+    (markdown-fontify-gfm-code-blocks)
+    (markdown-fontify-tables)
+    (markdown-match-fenced-start-code-block . ((1 markdown-markup-properties)
+                                               (2 markdown-markup-properties nil t)
+                                               (3 markdown-language-keyword-properties nil t)
+                                               (4 markdown-language-info-properties nil t)
+                                               (5 markdown-markup-properties nil t)))
+    (markdown-match-fenced-end-code-block . ((0 markdown-markup-properties)))
+    (markdown-fontify-fenced-code-blocks)
+    (markdown-match-pre-blocks . ((0 'markdown-pre-face)))
+    (markdown-fontify-headings)
+    (markdown-match-declarative-metadata . ((1 'markdown-metadata-key-face)
+                                            (2 'markdown-markup-face)
+                                            (3 'markdown-metadata-value-face)))
+    (markdown-match-pandoc-metadata . ((1 'markdown-markup-face)
+                                       (2 'markdown-markup-face)
+                                       (3 'markdown-metadata-value-face)))
+    (markdown-fontify-hrs)
+    (,markdown-regex-strike-through . ((3 markdown-markup-properties)
+                                       (4 'markdown-strike-through-face)
+                                       (5 markdown-markup-properties)))
+    (markdown-match-code . ((1 markdown-markup-properties prepend)
+                            (2 'markdown-inline-code-face prepend)
+                            (3 markdown-markup-properties prepend)))
+    (,markdown-regex-kbd . ((1 markdown-markup-properties)
+                            (2 'markdown-inline-code-face)
+                            (3 markdown-markup-properties)))
+    (markdown-fontify-angle-uris)
+    (,markdown-regex-email . 'markdown-plain-url-face)
+    (markdown-match-html-tag . ((1 'markdown-html-tag-delimiter-face t)
+                                (2 'markdown-html-tag-name-face t)
+                                (3 'markdown-html-tag-delimiter-face t)
+                                ;; Anchored matcher for HTML tag attributes
+                                (,markdown-regex-html-attr
+                                 ;; Before searching, move past tag
+                                 ;; name; set limit at tag close.
+                                 (progn
+                                   (goto-char (match-end 2)) (match-end 3))
+                                 nil
+                                 . ((1 'markdown-html-attr-name-face)
+                                    (3 'markdown-html-tag-delimiter-face nil t)
+                                    (4 'markdown-html-attr-value-face nil t)))))
+    (,markdown-regex-html-entity . 'markdown-html-entity-face)
+    (markdown-fontify-list-items)
+    (,markdown-regex-footnote . ((1 markdown-markup-properties)    ; [^
+                                 (2 (markdown--footnote-marker-properties)) ; label
+                                 (3 markdown-markup-properties)))  ; ]
+    (,markdown-regex-pandoc-inline-footnote . ((1 markdown-markup-properties)   ; ^
+                                               (2 markdown-markup-properties)   ; [
+                                               (3 (markdown--pandoc-inline-footnote-properties)) ; text
+                                               (4 markdown-markup-properties))) ; ]
+    (markdown-match-includes . ((1 markdown-markup-properties)
+                                (2 markdown-markup-properties nil t)
+                                (3 markdown-include-title-properties nil t)
+                                (4 markdown-markup-properties nil t)
+                                (5 markdown-markup-properties)
+                                (6 'markdown-url-face)
+                                (7 markdown-markup-properties)))
+    (markdown-fontify-inline-links)
+    (markdown-fontify-reference-links)
+    (markdown-fontify-wiki-links)
+    (,markdown-regex-reference-definition . ((1 'markdown-markup-face) ; [
+                                             (2 'markdown-reference-face) ; label
+                                             (3 'markdown-markup-face)    ; ]
+                                             (4 'markdown-markup-face)    ; :
+                                             (5 'markdown-url-face)       ; url
+                                             (6 'markdown-link-title-face))) ; "title" (optional)
+    (markdown-fontify-plain-uris)
+    ;; Math mode $..$
+    (markdown-match-math-single . ((1 'markdown-markup-face prepend)
+                                   (2 'markdown-math-face append)
+                                   (3 'markdown-markup-face prepend)))
+    ;; Math mode $$..$$
+    (markdown-match-math-double . ((1 'markdown-markup-face prepend)
+                                   (2 'markdown-math-face append)
+                                   (3 'markdown-markup-face prepend)))
+    ;; Math mode \[..\] and \\[..\\]
+    (markdown-match-math-display . ((1 'markdown-markup-face prepend)
+                                    (3 'markdown-math-face append)
+                                    (4 'markdown-markup-face prepend)))
+    (markdown-match-bold . ((1 markdown-markup-properties prepend)
+                            (2 'markdown-bold-face append)
+                            (3 markdown-markup-properties prepend)))
+    (markdown-match-italic . ((1 markdown-markup-properties prepend)
+                              (2 'markdown-italic-face append)
+                              (3 markdown-markup-properties prepend)))
+    (markdown--match-highlighting . ((3 markdown-markup-properties)
+                                     (4 'markdown-highlighting-face)
+                                     (5 markdown-markup-properties)))
+    (,markdown-regex-line-break . (1 markdown-line-break-properties prepend))
+    (markdown-match-escape . ((1 markdown-markup-properties prepend)))
+    (markdown-fontify-sub-superscripts)
+    (markdown-match-inline-attributes . ((0 markdown-markup-properties prepend)))
+    (markdown-match-leanpub-sections . ((0 markdown-markup-properties)))
+    (markdown-fontify-blockquotes))
+  "Syntax highlighting for Markdown files.")
+
+;; Footnotes
+(defvar-local markdown-footnote-counter 0
+  "Counter for footnote numbers.")
+
+(defconst markdown-footnote-chars
+  "[[:alnum:]-]"
+  "Regular expression matching any character for a footnote identifier.")
+
+(defconst markdown-regex-footnote-definition
+  (concat "^ \\{0,3\\}\\[\\(\\^" markdown-footnote-chars "*?\\)\\]:\\(?:[ \t]+\\|$\\)")
+  "Regular expression matching a footnote definition, capturing the label.")
+
+
+;;; Compatibility =============================================================
+
+(defun markdown--pandoc-reference-p ()
+  (let ((bounds (bounds-of-thing-at-point 'word)))
+    (when (and bounds (char-before (car bounds)))
+      (= (char-before (car bounds)) ?@))))
+
+(defun markdown-flyspell-check-word-p ()
+  "Return t if `flyspell' should check word just before point.
+Used for `flyspell-generic-check-word-predicate'."
+  (save-excursion
+    (goto-char (1- (point)))
+    ;; https://github.com/jrblevin/markdown-mode/issues/560
+    ;; enable spell check YAML meta data
+    (if (or (and (markdown-code-block-at-point-p)
+                 (not (markdown-text-property-at-point 'markdown-yaml-metadata-section)))
+            (markdown-inline-code-at-point-p)
+            (markdown-in-comment-p)
+            (markdown--face-p (point) '(markdown-reference-face
+                                        markdown-markup-face
+                                        markdown-plain-url-face
+                                        markdown-inline-code-face
+                                        markdown-url-face))
+            (markdown--pandoc-reference-p))
+        (prog1 nil
+          ;; If flyspell overlay is put, then remove it
+          (let ((bounds (bounds-of-thing-at-point 'word)))
+            (when bounds
+              (cl-loop for ov in (overlays-in (car bounds) (cdr bounds))
+                       when (overlay-get ov 'flyspell-overlay)
+                       do
+                       (delete-overlay ov)))))
+      t)))
+
+
+;;; Markdown Parsing Functions ================================================
+
+(defun markdown-cur-line-blank-p ()
+  "Return t if the current line is blank and nil otherwise."
+  (save-excursion
+    (beginning-of-line)
+    (looking-at-p markdown-regex-blank-line)))
+
+(defun markdown-prev-line-blank ()
+  "Return t if the previous line is blank and nil otherwise.
+If we are at the first line, then consider the previous line to be blank."
+  (or (= (line-beginning-position) (point-min))
+      (save-excursion
+        (forward-line -1)
+        (looking-at markdown-regex-blank-line))))
+
+(defun markdown-prev-line-blank-p ()
+  "Like `markdown-prev-line-blank', but preserve `match-data'."
+  (save-match-data (markdown-prev-line-blank)))
+
+(defun markdown-next-line-blank-p ()
+  "Return t if the next line is blank and nil otherwise.
+If we are at the last line, then consider the next line to be blank."
+  (or (= (line-end-position) (point-max))
+      (save-excursion
+        (forward-line 1)
+        (markdown-cur-line-blank-p))))
+
+(defun markdown-prev-line-indent ()
+  "Return the number of leading whitespace characters in the previous line.
+Return 0 if the current line is the first line in the buffer."
+  (save-excursion
+    (if (= (line-beginning-position) (point-min))
+        0
+      (forward-line -1)
+      (current-indentation))))
+
+(defun markdown-next-line-indent ()
+  "Return the number of leading whitespace characters in the next line.
+Return 0 if line is the last line in the buffer."
+  (save-excursion
+    (if (= (line-end-position) (point-max))
+        0
+      (forward-line 1)
+      (current-indentation))))
+
+(defun markdown-new-baseline ()
+  "Determine if the current line begins a new baseline level.
+Assume point is positioned at beginning of line."
+  (or (looking-at markdown-regex-header)
+      (looking-at markdown-regex-hr)
+      (and (= (current-indentation) 0)
+           (not (looking-at markdown-regex-list))
+           (markdown-prev-line-blank))))
+
+(defun markdown-search-backward-baseline ()
+  "Search backward baseline point with no indentation and not a list item."
+  (end-of-line)
+  (let (stop)
+    (while (not (or stop (bobp)))
+      (re-search-backward markdown-regex-block-separator-noindent nil t)
+      (when (match-end 2)
+        (goto-char (match-end 2))
+        (cond
+         ((markdown-new-baseline)
+          (setq stop t))
+         ((looking-at-p markdown-regex-list)
+          (setq stop nil))
+         (t (setq stop t)))))))
+
+(defun markdown-update-list-levels (marker indent levels)
+  "Update list levels given list MARKER, block INDENT, and current LEVELS.
+Here, MARKER is a string representing the type of list, INDENT is an integer
+giving the indentation, in spaces, of the current block, and LEVELS is a
+list of the indentation levels of parent list items.  When LEVELS is nil,
+it means we are at baseline (not inside of a nested list)."
+  (cond
+   ;; New list item at baseline.
+   ((and marker (null levels))
+    (setq levels (list indent)))
+   ;; List item with greater indentation (four or more spaces).
+   ;; Increase list level.
+   ((and marker (>= indent (+ (car levels) markdown-list-indent-width)))
+    (setq levels (cons indent levels)))
+   ;; List item with greater or equal indentation (less than four spaces).
+   ;; Do not increase list level.
+   ((and marker (>= indent (car levels)))
+    levels)
+   ;; Lesser indentation level.
+   ;; Pop appropriate number of elements off LEVELS list (e.g., lesser
+   ;; indentation could move back more than one list level).  Note
+   ;; that this block need not be the beginning of list item.
+   ((< indent (car levels))
+    (while (and (> (length levels) 1)
+                (< indent (+ (cadr levels) markdown-list-indent-width)))
+      (setq levels (cdr levels)))
+    levels)
+   ;; Otherwise, do nothing.
+   (t levels)))
+
+(defun markdown-calculate-list-levels ()
+  "Calculate list levels at point.
+Return a list of the form (n1 n2 n3 ...) where n1 is the
+indentation of the deepest nested list item in the branch of
+the list at the point, n2 is the indentation of the parent
+list item, and so on.  The depth of the list item is therefore
+the length of the returned list.  If the point is not at or
+immediately  after a list item, return nil."
+  (save-excursion
+    (let ((first (point)) levels indent pre-regexp)
+      ;; Find a baseline point with zero list indentation
+      (markdown-search-backward-baseline)
+      ;; Search for all list items between baseline and LOC
+      (while (and (< (point) first)
+                  (re-search-forward markdown-regex-list first t))
+        (setq pre-regexp (format "^\\(    \\|\t\\)\\{%d\\}" (1+ (length levels))))
+        (beginning-of-line)
+        (cond
+         ;; Make sure this is not a header or hr
+         ((markdown-new-baseline) (setq levels nil))
+         ;; Make sure this is not a line from a pre block
+         ((looking-at-p pre-regexp))
+         ;; If not, then update levels
+         (t
+          (setq indent (current-indentation))
+          (setq levels (markdown-update-list-levels (match-string 2)
+                                                    indent levels))))
+        (end-of-line))
+      levels)))
+
+(defun markdown-prev-list-item (level)
+  "Search backward from point for a list item with indentation LEVEL.
+Set point to the beginning of the item, and return point, or nil
+upon failure."
+  (let (bounds indent prev)
+    (setq prev (point))
+    (forward-line -1)
+    (setq indent (current-indentation))
+    (while
+        (cond
+         ;; List item
+         ((and (looking-at-p markdown-regex-list)
+               (setq bounds (markdown-cur-list-item-bounds)))
+          (cond
+           ;; Stop and return point at item of equal indentation
+           ((= (nth 3 bounds) level)
+            (setq prev (point))
+            nil)
+           ;; Stop and return nil at item with lesser indentation
+           ((< (nth 3 bounds) level)
+            (setq prev nil)
+            nil)
+           ;; Stop at beginning of buffer
+           ((bobp) (setq prev nil))
+           ;; Continue at item with greater indentation
+           ((> (nth 3 bounds) level) t)))
+         ;; Stop at beginning of buffer
+         ((bobp) (setq prev nil))
+         ;; Continue if current line is blank
+         ((markdown-cur-line-blank-p) t)
+         ;; Continue while indentation is the same or greater
+         ((>= indent level) t)
+         ;; Stop if current indentation is less than list item
+         ;; and the next is blank
+         ((and (< indent level)
+               (markdown-next-line-blank-p))
+          (setq prev nil))
+         ;; Stop at a header
+         ((looking-at-p markdown-regex-header) (setq prev nil))
+         ;; Stop at a horizontal rule
+         ((looking-at-p markdown-regex-hr) (setq prev nil))
+         ;; Otherwise, continue.
+         (t t))
+      (forward-line -1)
+      (setq indent (current-indentation)))
+    prev))
+
+(defun markdown-next-list-item (level)
+  "Search forward from point for the next list item with indentation LEVEL.
+Set point to the beginning of the item, and return point, or nil
+upon failure."
+  (let (bounds indent next)
+    (setq next (point))
+    (if (looking-at markdown-regex-header-setext)
+        (goto-char (match-end 0)))
+    (forward-line)
+    (setq indent (current-indentation))
+    (while
+        (cond
+         ;; Stop at end of the buffer.
+         ((eobp) nil)
+         ;; Continue if the current line is blank
+         ((markdown-cur-line-blank-p) t)
+         ;; List item
+         ((and (looking-at-p markdown-regex-list)
+               (setq bounds (markdown-cur-list-item-bounds)))
+          (cond
+           ;; Continue at item with greater indentation
+           ((> (nth 3 bounds) level) t)
+           ;; Stop and return point at item of equal indentation
+           ((= (nth 3 bounds) level)
+            (setq next (point))
+            nil)
+           ;; Stop and return nil at item with lesser indentation
+           ((< (nth 3 bounds) level)
+            (setq next nil)
+            nil)))
+         ;; Continue while indentation is the same or greater
+         ((>= indent level) t)
+         ;; Stop if current indentation is less than list item
+         ;; and the previous line was blank.
+         ((and (< indent level)
+               (markdown-prev-line-blank-p))
+          (setq next nil))
+         ;; Stop at a header
+         ((looking-at-p markdown-regex-header) (setq next nil))
+         ;; Stop at a horizontal rule
+         ((looking-at-p markdown-regex-hr) (setq next nil))
+         ;; Otherwise, continue.
+         (t t))
+      (forward-line)
+      (setq indent (current-indentation)))
+    next))
+
+(defun markdown-cur-list-item-end (level)
+  "Move to end of list item with pre-marker indentation LEVEL.
+Return the point at the end when a list item was found at the
+original point.  If the point is not in a list item, do nothing."
+  (let (indent)
+    (forward-line)
+    ;; #904 consider a space indentation and tab indentation case
+    (save-excursion
+      (let ((pos (point)))
+        (back-to-indentation)
+        (setq indent (- (point) pos))))
+    (while
+        (cond
+         ;; Stop at end of the buffer.
+         ((eobp) nil)
+         ;; Continue while indentation is the same or greater
+         ((>= indent level) t)
+         ;; Continue if the current line is blank
+         ((looking-at markdown-regex-blank-line) t)
+         ;; Stop if current indentation is less than list item
+         ;; and the previous line was blank.
+         ((and (< indent level)
+               (markdown-prev-line-blank))
+          nil)
+         ;; Stop at a new list items of the same or lesser
+         ;; indentation, headings, and horizontal rules.
+         ((looking-at (concat "\\(?:" markdown-regex-list
+                              "\\|" markdown-regex-header
+                              "\\|" markdown-regex-hr "\\)"))
+          nil)
+         ;; Otherwise, continue.
+         (t t))
+      (forward-line)
+      (setq indent (current-indentation)))
+    ;; Don't skip over whitespace for empty list items (marker and
+    ;; whitespace only), just move to end of whitespace.
+    (if (save-excursion
+          (beginning-of-line)
+          (looking-at (concat markdown-regex-list "[ \t]*$")))
+        (goto-char (match-end 3))
+      (skip-chars-backward " \t\n"))
+    (end-of-line)
+    (point)))
+
+(defun markdown-cur-list-item-bounds ()
+  "Return bounds for list item at point.
+Return a list of the following form:
+
+    (begin end indent nonlist-indent marker checkbox match)
+
+The named components are:
+
+  - begin: Position of beginning of list item, including leading indentation.
+  - end: Position of the end of the list item, including list item text.
+  - indent: Number of characters of indentation before list marker (an integer).
+  - nonlist-indent: Number characters of indentation, list
+    marker, and whitespace following list marker (an integer).
+  - marker: String containing the list marker and following whitespace
+            (e.g., \"- \" or \"* \").
+  - checkbox: String containing the GFM checkbox portion, if any,
+    including any trailing whitespace before the text
+    begins (e.g., \"[x] \").
+  - match: match data for markdown-regex-list
+
+As an example, for the following unordered list item
+
+   - item
+
+the returned list would be
+
+    (1 14 3 5 \"- \" nil (1 6 1 4 4 5 5 6))
+
+If the point is not inside a list item, return nil."
+  (car (get-text-property (line-beginning-position) 'markdown-list-item)))
+
+(defun markdown-list-item-at-point-p ()
+  "Return t if there is a list item at the point and nil otherwise."
+  (save-match-data (markdown-cur-list-item-bounds)))
+
+(defun markdown-prev-list-item-bounds ()
+  "Return bounds of previous item in the same list of any level.
+The return value has the same form as that of
+`markdown-cur-list-item-bounds'."
+  (save-excursion
+    (let ((cur-bounds (markdown-cur-list-item-bounds))
+          (beginning-of-list (save-excursion (markdown-beginning-of-list)))
+          stop)
+      (when cur-bounds
+        (goto-char (nth 0 cur-bounds))
+        (while (and (not stop) (not (bobp))
+                    (re-search-backward markdown-regex-list
+                                        beginning-of-list t))
+          (unless (or (looking-at markdown-regex-hr)
+                      (markdown-code-block-at-point-p))
+            (setq stop (point))))
+        (markdown-cur-list-item-bounds)))))
+
+(defun markdown-next-list-item-bounds ()
+  "Return bounds of next item in the same list of any level.
+The return value has the same form as that of
+`markdown-cur-list-item-bounds'."
+  (save-excursion
+    (let ((cur-bounds (markdown-cur-list-item-bounds))
+          (end-of-list (save-excursion (markdown-end-of-list)))
+          stop)
+      (when cur-bounds
+        (goto-char (nth 0 cur-bounds))
+        (end-of-line)
+        (while (and (not stop) (not (eobp))
+                    (re-search-forward markdown-regex-list
+                                       end-of-list t))
+          (unless (or (looking-at markdown-regex-hr)
+                      (markdown-code-block-at-point-p))
+            (setq stop (point))))
+        (when stop
+          (markdown-cur-list-item-bounds))))))
+
+(defun markdown-beginning-of-list ()
+  "Move point to beginning of list at point, if any."
+  (interactive)
+  (let ((orig-point (point))
+        (list-begin (save-excursion
+                      (markdown-search-backward-baseline)
+                      ;; Stop at next list item, regardless of the indentation.
+                      (markdown-next-list-item (point-max))
+                      (when (looking-at markdown-regex-list)
+                        (point)))))
+    (when (and list-begin (<= list-begin orig-point))
+      (goto-char list-begin))))
+
+(defun markdown-end-of-list ()
+  "Move point to end of list at point, if any."
+  (interactive)
+  (let ((start (point))
+        (end (save-excursion
+               (when (markdown-beginning-of-list)
+                 ;; Items can't have nonlist-indent <= 1, so this
+                 ;; moves past all list items.
+                 (markdown-next-list-item 1)
+                 (skip-syntax-backward "-")
+                 (unless (eobp) (forward-char 1))
+                 (point)))))
+    (when (and end (>= end start))
+      (goto-char end))))
+
+(defun markdown-up-list ()
+  "Move point to beginning of parent list item."
+  (interactive)
+  (let ((cur-bounds (markdown-cur-list-item-bounds)))
+    (when cur-bounds
+      (markdown-prev-list-item (1- (nth 3 cur-bounds)))
+      (let ((up-bounds (markdown-cur-list-item-bounds)))
+        (when (and up-bounds (< (nth 3 up-bounds) (nth 3 cur-bounds)))
+          (point))))))
+
+(defun markdown-bounds-of-thing-at-point (thing)
+  "Call `bounds-of-thing-at-point' for THING with slight modifications.
+Does not include trailing newlines when THING is \\='line.  Handles the
+end of buffer case by setting both endpoints equal to the value of
+`point-max', since an empty region will trigger empty markup insertion.
+Return bounds of form (beg . end) if THING is found, or nil otherwise."
+  (let* ((bounds (bounds-of-thing-at-point thing))
+         (a (car bounds))
+         (b (cdr bounds)))
+    (when bounds
+      (when (eq thing 'line)
+        (cond ((and (eobp) (markdown-cur-line-blank-p))
+               (setq a b))
+              ((char-equal (char-before b) ?\^J)
+               (setq b (1- b)))))
+      (cons a b))))
+
+(defun markdown-reference-definition (reference)
+  "Find out whether Markdown REFERENCE is defined.
+REFERENCE should not include the square brackets.
+When REFERENCE is defined, return a list of the form (text start end)
+containing the definition text itself followed by the start and end
+locations of the text.  Otherwise, return nil.
+Leave match data for `markdown-regex-reference-definition'
+intact additional processing."
+  (let ((reference (downcase reference)))
+    (save-excursion
+      (goto-char (point-min))
+      (catch 'found
+        (while (re-search-forward markdown-regex-reference-definition nil t)
+          (when (string= reference (downcase (match-string-no-properties 2)))
+            (throw 'found
+                   (list (match-string-no-properties 5)
+                         (match-beginning 5) (match-end 5)))))))))
+
+(defun markdown-get-defined-references ()
+  "Return all defined reference labels and their line numbers.
+They does not include square brackets)."
+  (save-excursion
+    (goto-char (point-min))
+    (let (refs)
+      (while (re-search-forward markdown-regex-reference-definition nil t)
+        (let ((target (match-string-no-properties 2)))
+          (cl-pushnew
+           (cons (downcase target)
+                 (markdown-line-number-at-pos (match-beginning 2)))
+           refs :test #'equal :key #'car)))
+      (reverse refs))))
+
+(defun markdown-get-used-uris ()
+  "Return a list of all used URIs in the buffer."
+  (save-excursion
+    (goto-char (point-min))
+    (let (uris)
+      (while (re-search-forward
+              (concat "\\(?:" markdown-regex-link-inline
+                      "\\|" markdown-regex-angle-uri
+                      "\\|" markdown-regex-uri
+                      "\\|" markdown-regex-email
+                      "\\)")
+              nil t)
+        (unless (or (markdown-inline-code-at-point-p)
+                    (markdown-code-block-at-point-p))
+          (cl-pushnew (or (match-string-no-properties 6)
+                          (match-string-no-properties 10)
+                          (match-string-no-properties 12)
+                          (match-string-no-properties 13))
+                      uris :test #'equal)))
+      (reverse uris))))
+
+(defun markdown-inline-code-at-pos (pos &optional from)
+  "Return non-nil if there is an inline code fragment at POS starting at FROM.
+Uses the beginning of the block if FROM is nil.
+Return nil otherwise.  Set match data according to
+`markdown-match-code' upon success.
+This function searches the block for a code fragment that
+contains the point using `markdown-match-code'.  We do this
+because `thing-at-point-looking-at' does not work reliably with
+`markdown-regex-code'.
+
+The match data is set as follows:
+Group 1 matches the opening backquotes.
+Group 2 matches the code fragment itself, without backquotes.
+Group 3 matches the closing backquotes."
+  (save-excursion
+    (goto-char pos)
+    (let ((old-point (point))
+          (end-of-block (progn (markdown-end-of-text-block) (point)))
+          found)
+      (if from
+          (goto-char from)
+        (markdown-beginning-of-text-block))
+      (while (and (markdown-match-code end-of-block)
+                  (setq found t)
+                  (< (match-end 0) old-point)))
+      (let ((match-group (if (eq (char-after (match-beginning 0)) ?`) 0 1)))
+        (and found                                        ; matched something
+             (<= (match-beginning match-group) old-point) ; match contains old-point
+             (> (match-end 0) old-point))))))
+
+(defun markdown-inline-code-at-pos-p (pos)
+  "Return non-nil if there is an inline code fragment at POS.
+Like `markdown-inline-code-at-pos`, but preserves match data."
+  (save-match-data (markdown-inline-code-at-pos pos)))
+
+(defun markdown-inline-code-at-point ()
+  "Return non-nil if the point is at an inline code fragment.
+See `markdown-inline-code-at-pos' for details."
+  (markdown-inline-code-at-pos (point)))
+
+(defun markdown-inline-code-at-point-p (&optional pos)
+  "Return non-nil if there is inline code at the POS.
+This is a predicate function counterpart to
+`markdown-inline-code-at-point' which does not modify the match
+data.  See `markdown-code-block-at-point-p' for code blocks."
+  (save-match-data (markdown-inline-code-at-pos (or pos (point)))))
+
+(defun markdown-code-block-at-pos (pos)
+  "Return match data list if there is a code block at POS.
+Uses text properties at the beginning of the line position.
+This includes pre blocks, tilde-fenced code blocks, and GFM
+quoted code blocks.  Return nil otherwise."
+  (let ((bol (save-excursion (goto-char pos) (line-beginning-position))))
+    (or (get-text-property bol 'markdown-pre)
+        (let* ((bounds (markdown-get-enclosing-fenced-block-construct pos))
+               (second (cl-second bounds)))
+          (if second
+              ;; chunks are right open
+              (when (< pos second)
+                bounds)
+            bounds)))))
+
+;; Function was renamed to emphasize that it does not modify match-data.
+(defalias 'markdown-code-block-at-point 'markdown-code-block-at-point-p)
+
+(defun markdown-code-block-at-point-p (&optional pos)
+  "Return non-nil if there is a code block at the POS.
+This includes pre blocks, tilde-fenced code blocks, and GFM
+quoted code blocks.  This function does not modify the match
+data.  See `markdown-inline-code-at-point-p' for inline code."
+  (save-match-data (markdown-code-block-at-pos (or pos (point)))))
+
+(defun markdown-heading-at-point (&optional pos)
+  "Return non-nil if there is a heading at the POS.
+Set match data for `markdown-regex-header'."
+  (let* ((p (or pos (if (and (eolp) (>= (point) 2)) (1- (point)) (point))))
+         (match-data (get-text-property p 'markdown-heading)))
+    (when match-data
+      (set-match-data match-data)
+      t)))
+
+(defun markdown-pipe-at-bol-p ()
+  "Return non-nil if the line begins with a pipe symbol.
+This may be useful for tables and Pandoc's line_blocks extension."
+  (char-equal (char-after (line-beginning-position)) ?|))
+
+
+;;; Markdown Font Lock Matching Functions =====================================
+
+(defun markdown-range-property-any (begin end prop prop-values)
+  "Return t if PROP from BEGIN to END is equal to one of the given PROP-VALUES.
+Also returns t if PROP is a list containing one of the PROP-VALUES.
+Return nil otherwise."
+  (catch 'found
+    (let ((loc begin))
+      (while (<= loc end)
+        (when-let* ((props (get-text-property loc prop)))
+          (if (listp props)
+              ;; props is a list, check for membership
+              (dolist (val prop-values)
+                (when (memq val props) (throw 'found loc)))
+            (dolist (val prop-values)
+              (when (eq val props) (throw 'found loc)))))
+        (setq loc (next-single-property-change loc prop nil (1+ end)))))))
+
+(defun markdown-range-properties-exist (begin end props)
+  (cl-loop
+   for loc from begin to end
+   with result = nil
+   while (not
+          (setq result
+                (cl-some (lambda (prop) (get-text-property loc prop)) props)))
+   finally return result))
+
+(defun markdown-match-inline-generic (regex last &optional faceless)
+  "Match inline REGEX from the point to LAST.
+When FACELESS is non-nil, do not return matches where faces have been applied."
+  (when (re-search-forward regex last t)
+    (let ((bounds (markdown-code-block-at-pos (match-beginning 1)))
+          (face (and faceless (text-property-not-all
+                               (match-beginning 0) (match-end 0) 'face nil))))
+      (cond
+       ;; In code block: move past it and recursively search again
+       (bounds
+        (when (< (goto-char (cl-second bounds)) last)
+          (markdown-match-inline-generic regex last faceless)))
+       ;; When faces are found in the match range, skip over the match and
+       ;; recursively search again.
+       (face
+        (when (< (goto-char (match-end 0)) last)
+          (markdown-match-inline-generic regex last faceless)))
+       ;; Keep match data and return t when in bounds.
+       (t
+        (<= (match-end 0) last))))))
+
+(defun markdown-match-code (last)
+  "Match inline code fragments from point to LAST."
+  (unless (bobp)
+    (backward-char 1))
+  (when (markdown-search-until-condition
+         (lambda ()
+           (and
+            ;; Advance point in case of failure, but without exceeding last.
+            (goto-char (min (1+ (match-beginning 1)) last))
+            (not (markdown-in-comment-p (match-beginning 1)))
+            (not (markdown-in-comment-p (match-end 1)))
+            (not (markdown-code-block-at-pos (match-beginning 1)))))
+         markdown-regex-code last t)
+    (set-match-data (list (match-beginning 1) (match-end 1)
+                          (match-beginning 2) (match-end 2)
+                          (match-beginning 3) (match-end 3)
+                          (match-beginning 4) (match-end 4)))
+    (goto-char (min (1+ (match-end 0)) last (point-max)))
+    t))
+
+(defun markdown--gfm-markup-underscore-p (begin end)
+  (let ((is-underscore (eql (char-after begin) ?_)))
+    (if (not is-underscore)
+        t
+      (save-excursion
+        (save-match-data
+          (goto-char begin)
+          (and (looking-back "\\(?:^\\|[[:blank:][:punct:]]\\)" (1- begin))
+               (progn
+                 (goto-char end)
+                 (looking-at-p "\\(?:[[:blank:][:punct:]]\\|$\\)"))))))))
+
+(defun markdown-match-bold (last)
+  "Match inline bold from the point to LAST."
+  (let (done
+        retval
+        last-inline-code)
+    (while (not done)
+      (if (markdown-match-inline-generic markdown-regex-bold last)
+          (let ((is-gfm (derived-mode-p 'gfm-mode))
+                (begin (match-beginning 2))
+                (end (match-end 2)))
+            (if (or
+                 (and last-inline-code
+                      (>= begin (car last-inline-code))
+                      (< begin (cdr last-inline-code)))
+                 (save-match-data
+                   (when (markdown-inline-code-at-pos begin (cdr last-inline-code))
+                     (setq last-inline-code `(,(match-beginning 0) . ,(match-end 0)))))
+                 (markdown-inline-code-at-pos-p end)
+                 (markdown-in-comment-p)
+                 (markdown-range-property-any
+                  begin begin 'face '(markdown-url-face
+                                      markdown-plain-url-face))
+                 (markdown-range-property-any
+                  begin end 'face '(markdown-hr-face
+                                    markdown-math-face))
+                 (and is-gfm (not (markdown--gfm-markup-underscore-p begin end))))
+                (progn (goto-char (min (1+ begin) last))
+                       (unless (< (point) last)
+                         (setq
+                          done t)))
+              (set-match-data (list (match-beginning 2) (match-end 2)
+                                    (match-beginning 3) (match-end 3)
+                                    (match-beginning 4) (match-end 4)
+                                    (match-beginning 5) (match-end 5)))
+              (setq done t
+                    retval t)))
+        (setq done t)))
+    retval))
+
+(defun markdown-match-italic (last)
+  "Match inline italics from the point to LAST."
+  (let* ((is-gfm (derived-mode-p 'gfm-mode))
+         (regex (if is-gfm
+                    markdown-regex-gfm-italic
+                  markdown-regex-italic)))
+    (let (done
+          retval
+          last-inline-code)
+      (while (not done)
+        (if (and (markdown-match-inline-generic regex last)
+                   (not (markdown--face-p
+                         (match-beginning 1)
+                         '(markdown-html-attr-name-face markdown-html-attr-value-face))))
+            (let ((begin (match-beginning 1))
+                  (end (match-end 1))
+                  (close-end (match-end 4)))
+              (if (or (eql (char-before begin) (char-after begin))
+                      (and last-inline-code
+                           (>= begin (car last-inline-code))
+                           (< begin (cdr last-inline-code)))
+                      (save-match-data
+                        (when (markdown-inline-code-at-pos begin (cdr last-inline-code))
+                          (setq last-inline-code `(,(match-beginning 0) . ,(match-end 0)))))
+
+                      (markdown-inline-code-at-pos-p (1- end))
+                      (markdown-in-comment-p)
+                      (markdown-range-property-any
+                       begin begin 'face '(markdown-url-face
+                                           markdown-plain-url-face
+                                           markdown-markup-face))
+                      (markdown-range-property-any
+                       begin end 'face '(markdown-bold-face
+                                         markdown-list-face
+                                         markdown-hr-face
+                                         markdown-math-face))
+                      (and is-gfm
+                           (or (char-equal (char-after begin) (char-after (1+ begin))) ;; check bold case
+                               (not (markdown--gfm-markup-underscore-p begin close-end)))))
+                  (progn (goto-char (min (1+ begin) last))
+                         (unless (< (point) last)
+                           (setq
+                            done t)))
+                (set-match-data (list (match-beginning 1) (match-end 1)
+                                      (match-beginning 2) (match-end 2)
+                                      (match-beginning 3) (match-end 3)
+                                      (match-beginning 4) (match-end 4)))
+                (setq done t
+                      retval t)))
+          (setq done t)))
+      retval)))
+
+(defun markdown--match-highlighting (last)
+  (when markdown-enable-highlighting-syntax
+    (re-search-forward markdown-regex-highlighting last t)))
+
+(defun markdown-match-escape (last)
+  "Match escape characters (backslashes) from point to LAST.
+Backlashes only count as escape characters outside of literal
+regions (e.g. code blocks). See `markdown-literal-faces'."
+  (catch 'found
+    (while (search-forward-regexp markdown-regex-escape last t)
+      (let* ((face (get-text-property (match-beginning 1) 'face))
+             (face-list (if (listp face) face (list face))))
+        ;; Ignore any backslashes with a literal face.
+        (unless (cl-intersection face-list markdown-literal-faces)
+          (throw 'found t))))))
+
+(defun markdown-match-math-generic (regex last)
+  "Match REGEX from point to LAST.
+REGEX is either `markdown-regex-math-inline-single' for matching
+$..$ or `markdown-regex-math-inline-double' for matching $$..$$."
+  (when (markdown-match-inline-generic regex last)
+    (let ((begin (match-beginning 1)) (end (match-end 1)))
+      (prog1
+          (if (or (markdown-range-property-any
+                   begin end 'face
+                   '(markdown-inline-code-face markdown-bold-face))
+                  (markdown-range-properties-exist
+                   begin end
+                   (markdown-get-fenced-block-middle-properties)))
+              (markdown-match-math-generic regex last)
+            t)
+        (goto-char (1+ (match-end 0)))))))
+
+(defun markdown-match-list-items (last)
+  "Match list items from point to LAST."
+  (let* ((first (point))
+         (pos first)
+         (prop 'markdown-list-item)
+         (bounds (car (get-text-property pos prop))))
+    (while
+        (and (or (null (setq bounds (car (get-text-property pos prop))))
+                 (< (cl-first bounds) pos))
+             (< (point) last)
+             (setq pos (next-single-property-change pos prop nil last))
+             (goto-char pos)))
+    (when bounds
+      (set-match-data (cl-seventh bounds))
+      ;; Step at least one character beyond point. Otherwise
+      ;; `font-lock-fontify-keywords-region' infloops.
+      (goto-char (min (1+ (max (line-end-position) first))
+                      (point-max)))
+      t)))
+
+(defun markdown-match-math-single (last)
+  "Match single quoted $..$ math from point to LAST."
+  (when markdown-enable-math
+    (when (and (char-equal (char-after) ?$)
+               (not (bolp))
+               (not (char-equal (char-before) ?\\))
+               (not (char-equal (char-before) ?$)))
+      (forward-char -1))
+    (markdown-match-math-generic markdown-regex-math-inline-single last)))
+
+(defun markdown-match-math-double (last)
+  "Match double quoted $$..$$ math from point to LAST."
+  (when markdown-enable-math
+    (when (and (< (1+ (point)) (point-max))
+               (char-equal (char-after) ?$)
+               (char-equal (char-after (1+ (point))) ?$)
+               (not (bolp))
+               (not (char-equal (char-before) ?\\))
+               (not (char-equal (char-before) ?$)))
+      (forward-char -1))
+    (markdown-match-math-generic markdown-regex-math-inline-double last)))
+
+(defun markdown-match-math-display (last)
+  "Match bracketed display math \[..\] and \\[..\\] from point to LAST."
+  (when markdown-enable-math
+    (markdown-match-math-generic markdown-regex-math-display last)))
+
+(defun markdown-match-propertized-text (property last)
+  "Match text with PROPERTY from point to LAST.
+Restore match data previously stored in PROPERTY."
+  (let ((saved (get-text-property (point) property))
+        pos)
+    (unless saved
+      (setq pos (next-single-property-change (point) property nil last))
+      (unless (= pos last)
+        (setq saved (get-text-property pos property))))
+    (when saved
+      (set-match-data saved)
+      ;; Step at least one character beyond point. Otherwise
+      ;; `font-lock-fontify-keywords-region' infloops.
+      (goto-char (min (1+ (max (match-end 0) (point)))
+                      (point-max)))
+      saved)))
+
+(defun markdown-match-pre-blocks (last)
+  "Match preformatted blocks from point to LAST.
+Use data stored in \\='markdown-pre text property during syntax
+analysis."
+  (markdown-match-propertized-text 'markdown-pre last))
+
+(defun markdown-match-gfm-code-blocks (last)
+  "Match GFM quoted code blocks from point to LAST.
+Use data stored in \\='markdown-gfm-code text property during syntax
+analysis."
+  (markdown-match-propertized-text 'markdown-gfm-code last))
+
+(defun markdown-match-gfm-open-code-blocks (last)
+  (markdown-match-propertized-text 'markdown-gfm-block-begin last))
+
+(defun markdown-match-gfm-close-code-blocks (last)
+  (markdown-match-propertized-text 'markdown-gfm-block-end last))
+
+(defun markdown-match-fenced-code-blocks (last)
+  "Match fenced code blocks from the point to LAST."
+  (markdown-match-propertized-text 'markdown-fenced-code last))
+
+(defun markdown-match-fenced-start-code-block (last)
+  (markdown-match-propertized-text 'markdown-tilde-fence-begin last))
+
+(defun markdown-match-fenced-end-code-block (last)
+  (markdown-match-propertized-text 'markdown-tilde-fence-end last))
+
+(defun markdown-match-blockquotes (last)
+  "Match blockquotes from point to LAST.
+Use data stored in \\='markdown-blockquote text property during syntax
+analysis."
+  (markdown-match-propertized-text 'markdown-blockquote last))
+
+(defun markdown-match-hr (last)
+  "Match horizontal rules comments from the point to LAST."
+  (markdown-match-propertized-text 'markdown-hr last))
+
+(defun markdown-match-comments (last)
+  "Match HTML comments from the point to LAST."
+  (when (and (skip-syntax-forward "^<" last))
+    (let ((beg (point)))
+      (when (and (skip-syntax-forward "^>" last) (< (point) last))
+        (forward-char)
+        (set-match-data (list beg (point)))
+        t))))
+
+(defun markdown-match-generic-links (last ref)
+  "Match inline links from point to LAST.
+When REF is non-nil, match reference links instead of standard
+links with URLs.
+This function should only be used during font-lock, as it
+determines syntax based on the presence of faces for previously
+processed elements."
+  ;; Search for the next potential link (not in a code block).
+  (let ((prohibited-faces '(markdown-pre-face
+                            markdown-code-face
+                            markdown-inline-code-face
+                            markdown-comment-face))
+        found)
+    (while
+        (and (not found) (< (point) last)
+             (progn
+               ;; Clear match data to test for a match after functions returns.
+               (set-match-data nil)
+               ;; Preliminary regular expression search so we can return
+               ;; quickly upon failure.  This doesn't handle malformed links
+               ;; or nested square brackets well, so if it passes we back up
+               ;; continue with a more precise search.
+               (re-search-forward
+                (if ref
+                    markdown-regex-link-reference
+                  markdown-regex-link-inline)
+                last 'limit)))
+      ;; Keep searching if this is in a code block, inline code, or a
+      ;; comment, or if it is include syntax. The link text portion
+      ;; (group 3) may contain inline code or comments, but the
+      ;; markup, URL, and title should not be part of such elements.
+      (if (or (markdown-range-property-any
+               (match-beginning 0) (match-end 2) 'face prohibited-faces)
+              (markdown-range-property-any
+               (match-beginning 4) (match-end 0) 'face prohibited-faces)
+              (and (char-equal (char-after (line-beginning-position)) ?<)
+                   (char-equal (char-after (1+ (line-beginning-position))) ?<)))
+          (set-match-data nil)
+        (setq found t))))
+  ;; Match opening exclamation point (optional) and left bracket.
+  (when (match-beginning 2)
+    (let* ((bang (match-beginning 1))
+           (first-begin (match-beginning 2))
+           ;; Find end of block to prevent matching across blocks.
+           (end-of-block (save-excursion
+                           (progn
+                             (goto-char (match-beginning 2))
+                             (markdown-end-of-text-block)
+                             (point))))
+           ;; Move over balanced expressions to closing right bracket.
+           ;; Catch unbalanced expression errors, then try to search right bracket manually.
+           (first-end (condition-case nil
+                          (and (goto-char first-begin)
+                               (scan-sexps (point) 1))
+                        (error
+                         (save-match-data
+                           (let ((last (match-end 4))
+                                 ok end-pos)
+                             (while (and (not ok) (search-forward "]" last t))
+                               (unless (= (char-before (1- (point))) ?\\)
+                                 (setq ok t end-pos (point))))
+                             end-pos)))))
+           ;; Continue with point at CONT-POINT upon failure.
+           (cont-point (min (1+ first-begin) last))
+           second-begin second-end url-begin url-end
+           title-begin title-end)
+      ;; When bracket found, in range, and followed by a left paren/bracket...
+      (when (and first-end (< first-end end-of-block) (goto-char first-end)
+                 (char-equal (char-after (point)) (if ref ?\[ ?\()))
+        ;; Scan across balanced expressions for closing parenthesis/bracket.
+        (setq second-begin (point)
+              second-end (condition-case nil
+                             (scan-sexps (point) 1)
+                           (error nil)))
+        ;; Check that closing parenthesis/bracket is in range.
+        (if (and second-end (<= second-end end-of-block) (<= second-end last))
+            (progn
+              ;; Search for (optional) title inside closing parenthesis
+              (when (and (not ref) (search-forward "\"" second-end t))
+                (setq title-begin (1- (point))
+                      title-end (and (goto-char second-end)
+                                     (search-backward "\"" (1+ title-begin) t))
+                      title-end (and title-end (1+ title-end))))
+              ;; Store URL/reference range
+              (setq url-begin (1+ second-begin)
+                    url-end (1- (or title-begin second-end)))
+              ;; Set match data, move point beyond link, and return
+              (set-match-data
+               (list (or bang first-begin) second-end  ; 0 - all
+                     bang (and bang (1+ bang))         ; 1 - bang
+                     first-begin (1+ first-begin)      ; 2 - markup
+                     (1+ first-begin) (1- first-end)   ; 3 - link text
+                     (1- first-end) first-end          ; 4 - markup
+                     second-begin (1+ second-begin)    ; 5 - markup
+                     url-begin url-end                 ; 6 - url/reference
+                     title-begin title-end             ; 7 - title
+                     (1- second-end) second-end))      ; 8 - markup
+              ;; Nullify cont-point and leave point at end and
+              (setq cont-point nil)
+              (goto-char second-end))
+          ;; If no closing parenthesis in range, update continuation point
+          (setq cont-point (min end-of-block second-begin))))
+      (cond
+       ;; On failure, continue searching at cont-point
+       ((and cont-point (< cont-point last))
+        (goto-char cont-point)
+        (markdown-match-generic-links last ref))
+       ;; No more text, return nil
+       ((and cont-point (= cont-point last))
+        nil)
+       ;; Return t if a match occurred
+       (t t)))))
+
+(defun markdown-match-angle-uris (last)
+  "Match angle bracket URIs from point to LAST."
+  (when (markdown-match-inline-generic markdown-regex-angle-uri last)
+    (goto-char (1+ (match-end 0)))))
+
+(defun markdown-match-plain-uris (last)
+  "Match plain URIs from point to LAST."
+  (when (markdown-match-inline-generic markdown-regex-uri last t)
+    (goto-char (1+ (match-end 0)))))
+
+(defvar markdown-conditional-search-function #'re-search-forward
+  "Conditional search function used in `markdown-search-until-condition'.
+Made into a variable to allow for dynamic let-binding.")
+
+(defun markdown-search-until-condition (condition &rest args)
+  (let (ret)
+    (while (and (not ret) (apply markdown-conditional-search-function args))
+      (setq ret (funcall condition)))
+    ret))
+
+(defun markdown-metadata-line-p (pos regexp)
+  (save-excursion
+    (or (= (line-number-at-pos pos) 1)
+        (progn
+          (forward-line -1)
+          ;; skip multi-line metadata
+          (while (and (looking-at-p "^\\s-+[[:alpha:]]")
+                      (> (line-number-at-pos (point)) 1))
+            (forward-line -1))
+          (looking-at-p regexp)))))
+
+(defun markdown-match-generic-metadata (regexp last)
+  "Match metadata declarations specified by REGEXP from point to LAST.
+These declarations must appear inside a metadata block that begins at
+the beginning of the buffer and ends with a blank line (or the end of
+the buffer)."
+  (let* ((first (point))
+         (end-re "\n[ \t]*\n\\|\n\\'\\|\\'")
+         (block-begin (goto-char 1))
+         (block-end (re-search-forward end-re nil t)))
+    (if (and block-end (> first block-end))
+        ;; Don't match declarations if there is no metadata block or if
+        ;; the point is beyond the block.  Move point to point-max to
+        ;; prevent additional searches and return return nil since nothing
+        ;; was found.
+        (progn (goto-char (point-max)) nil)
+      ;; If a block was found that begins before LAST and ends after
+      ;; point, search for declarations inside it.  If the starting is
+      ;; before the beginning of the block, start there. Otherwise,
+      ;; move back to FIRST.
+      (goto-char (if (< first block-begin) block-begin first))
+      (if (and (re-search-forward regexp (min last block-end) t)
+               (markdown-metadata-line-p (point) regexp))
+          ;; If a metadata declaration is found, set match-data and return t.
+          (let ((key-beginning (match-beginning 1))
+                (key-end (match-end 1))
+                (markup-begin (match-beginning 2))
+                (markup-end (match-end 2))
+                (value-beginning (match-beginning 3)))
+            (set-match-data (list key-beginning (point) ; complete metadata
+                                  key-beginning key-end ; key
+                                  markup-begin markup-end ; markup
+                                  value-beginning (point))) ; value
+            t)
+        ;; Otherwise, move the point to last and return nil
+        (goto-char last)
+        nil))))
+
+(defun markdown-match-declarative-metadata (last)
+  "Match declarative metadata from the point to LAST."
+  (markdown-match-generic-metadata markdown-regex-declarative-metadata last))
+
+(defun markdown-match-pandoc-metadata (last)
+  "Match Pandoc metadata from the point to LAST."
+  (markdown-match-generic-metadata markdown-regex-pandoc-metadata last))
+
+(defun markdown-match-yaml-metadata-begin (last)
+  (markdown-match-propertized-text 'markdown-yaml-metadata-begin last))
+
+(defun markdown-match-yaml-metadata-end (last)
+  (markdown-match-propertized-text 'markdown-yaml-metadata-end last))
+
+(defun markdown-match-yaml-metadata-key (last)
+  (markdown-match-propertized-text 'markdown-metadata-key last))
+
+(defun markdown-match-wiki-link (last)
+  "Match wiki links from point to LAST."
+  (when (and markdown-enable-wiki-links
+             (not markdown-wiki-link-fontify-missing)
+             (markdown-match-inline-generic markdown-regex-wiki-link last))
+    (let ((begin (match-beginning 1)) (end (match-end 1)))
+      (if (or (markdown-in-comment-p begin)
+              (markdown-in-comment-p end)
+              (markdown-inline-code-at-pos-p begin)
+              (markdown-inline-code-at-pos-p end)
+              (markdown-code-block-at-pos begin))
+          (progn (goto-char (min (1+ begin) last))
+                 (when (< (point) last)
+                   (with-no-warnings
+                     (markdown-match-wiki-link last))))
+        (set-match-data (list begin end))
+        t))))
+
+(defun markdown-match-inline-attributes (last)
+  "Match inline attributes from point to LAST."
+  ;; #428 re-search-forward markdown-regex-inline-attributes is very slow.
+  ;; So use simple regex for re-search-forward and use markdown-regex-inline-attributes
+  ;; against matched string.
+  (when (markdown-match-inline-generic "[ \t]*\\({\\)\\([^\n]*\\)}[ \t]*$" last)
+    (if (not (string-match-p markdown-regex-inline-attributes (match-string 0)))
+        (markdown-match-inline-attributes last)
+      (unless (or (markdown-inline-code-at-pos-p (match-beginning 0))
+                  (markdown-inline-code-at-pos-p (match-end 0))
+                  (markdown-in-comment-p))
+        t))))
+
+(defun markdown-match-leanpub-sections (last)
+  "Match Leanpub section markers from point to LAST."
+  (when (markdown-match-inline-generic markdown-regex-leanpub-sections last)
+    (unless (or (markdown-inline-code-at-pos-p (match-beginning 0))
+                (markdown-inline-code-at-pos-p (match-end 0))
+                (markdown-in-comment-p))
+      t)))
+
+(defun markdown-match-includes (last)
+  "Match include statements from point to LAST.
+Sets match data for the following seven groups:
+Group 1: opening two angle brackets
+Group 2: opening title delimiter (optional)
+Group 3: title text (optional)
+Group 4: closing title delimiter (optional)
+Group 5: opening filename delimiter
+Group 6: filename
+Group 7: closing filename delimiter"
+  (when (markdown-match-inline-generic markdown-regex-include last)
+    (let ((valid (not (or (markdown-in-comment-p (match-beginning 0))
+                          (markdown-in-comment-p (match-end 0))
+                          (markdown-code-block-at-pos (match-beginning 0))))))
+      (cond
+       ;; Parentheses and maybe square brackets, but no curly braces:
+       ;; match optional title in square brackets and file in parentheses.
+       ((and valid (match-beginning 5)
+             (not (match-beginning 8)))
+        (set-match-data (list (match-beginning 1) (match-end 7)
+                              (match-beginning 1) (match-end 1)
+                              (match-beginning 2) (match-end 2)
+                              (match-beginning 3) (match-end 3)
+                              (match-beginning 4) (match-end 4)
+                              (match-beginning 5) (match-end 5)
+                              (match-beginning 6) (match-end 6)
+                              (match-beginning 7) (match-end 7))))
+       ;; Only square brackets present: match file in square brackets.
+       ((and valid (match-beginning 2)
+             (not (match-beginning 5))
+             (not (match-beginning 7)))
+        (set-match-data (list (match-beginning 1) (match-end 4)
+                              (match-beginning 1) (match-end 1)
+                              nil nil
+                              nil nil
+                              nil nil
+                              (match-beginning 2) (match-end 2)
+                              (match-beginning 3) (match-end 3)
+                              (match-beginning 4) (match-end 4))))
+       ;; Only curly braces present: match file in curly braces.
+       ((and valid (match-beginning 8)
+             (not (match-beginning 2))
+             (not (match-beginning 5)))
+        (set-match-data (list (match-beginning 1) (match-end 10)
+                              (match-beginning 1) (match-end 1)
+                              nil nil
+                              nil nil
+                              nil nil
+                              (match-beginning 8) (match-end 8)
+                              (match-beginning 9) (match-end 9)
+                              (match-beginning 10) (match-end 10))))
+       (t
+        ;; Not a valid match, move to next line and search again.
+        (forward-line)
+        (when (< (point) last)
+          (setq valid (markdown-match-includes last)))))
+      valid)))
+
+(defun markdown-match-html-tag (last)
+  "Match HTML tags from point to LAST."
+  (when (and markdown-enable-html
+             (markdown-match-inline-generic markdown-regex-html-tag last t))
+    (set-match-data (list (match-beginning 0) (match-end 0)
+                          (match-beginning 1) (match-end 1)
+                          (match-beginning 2) (match-end 2)
+                          (match-beginning 9) (match-end 9)))
+    t))
+
+
+;;; Markdown Font Fontification Functions =====================================
+
+(defvar markdown--first-displayable-cache (make-hash-table :test #'equal))
+
+(defun markdown--first-displayable (seq)
+  "Return the first displayable character or string in SEQ.
+SEQ may be an atom or a sequence."
+  (let ((c (gethash seq markdown--first-displayable-cache t)))
+    (if (not (eq c t))
+        c
+      (puthash seq
+               (let ((seq (if (listp seq) seq (list seq))))
+                 (cond ((stringp (car seq))
+                        (cl-find-if
+                         (lambda (str)
+                           (and (mapcar #'char-displayable-p (string-to-list str))))
+                         seq))
+                       ((characterp (car seq))
+                        (cl-find-if #'char-displayable-p seq))))
+               markdown--first-displayable-cache))))
+
+(defun markdown--marginalize-string (level)
+  "Generate atx markup string of given LEVEL for left margin."
+  (let ((margin-left-space-count
+         (- markdown-marginalize-headers-margin-width level)))
+    (concat (make-string margin-left-space-count ? )
+            (make-string level ?#))))
+
+(defun markdown-marginalize-update-current ()
+  "Update the window configuration to create a left margin."
+  (if window-system
+      (let* ((header-delimiter-font-width
+              (window-font-width nil 'markdown-header-delimiter-face))
+             (margin-pixel-width (* markdown-marginalize-headers-margin-width
+                                    header-delimiter-font-width))
+             (margin-char-width (/ margin-pixel-width (default-font-width))))
+        (set-window-margins nil margin-char-width))
+    ;; As a fallback, simply set margin based on character count.
+    (set-window-margins nil (1+ markdown-marginalize-headers-margin-width))))
+
+(defun markdown-fontify-headings (last)
+  "Add text properties to headings from point to LAST."
+  (when (markdown-match-propertized-text 'markdown-heading last)
+    (let* ((level (markdown-outline-level))
+           (heading-face
+            (intern (format "markdown-header-face-%d" level)))
+           (heading-props `(face ,heading-face))
+           (left-markup-props
+            `(face markdown-header-delimiter-face
+                   ,@(cond
+                      (markdown-hide-markup
+                       `(display ""))
+                      (markdown-marginalize-headers
+                       `(display ((margin left-margin)
+                                  ,(markdown--marginalize-string level)))))))
+           (right-markup-props
+            `(face markdown-header-delimiter-face
+                   ,@(when markdown-hide-markup `(display ""))))
+           (rule-props `(face markdown-header-rule-face
+                              ,@(when markdown-hide-markup `(display "")))))
+      (if (match-end 1)
+          ;; Setext heading
+          (progn (add-text-properties
+                  (match-beginning 1) (match-end 1) heading-props)
+                 (if (= level 1)
+                     (add-text-properties
+                      (match-beginning 2) (match-end 2) rule-props)
+                   (add-text-properties
+                    (match-beginning 3) (match-end 3) rule-props)))
+        ;; atx heading
+        (let ((fontified-start
+               (if (or markdown-hide-markup (not markdown-fontify-whole-heading-line))
+                   (match-beginning 5)
+                 (match-beginning 0)))
+              (fontified-end
+               (if markdown-fontify-whole-heading-line
+                   (min (point-max) (1+ (match-end 0)))
+                 (match-end 5))))
+          (add-text-properties
+           (match-beginning 4) (match-end 4) left-markup-props)
+
+          ;; If closing tag is present
+          (if (match-end 6)
+              (progn
+                (add-text-properties fontified-start fontified-end heading-props)
+                (when (or markdown-hide-markup (not markdown-fontify-whole-heading-line))
+                  (add-text-properties (match-beginning 6) (match-end 6) right-markup-props)))
+            ;; If closing tag is not present
+            (add-text-properties fontified-start fontified-end heading-props)))))
+    t))
+
+(defun markdown--fontify-table-alignment ()
+  "Visually align cell separators of the table line at point.
+Hiding markup makes the displayed content of a table cell
+narrower than the buffer text, which breaks the column alignment
+of tables that are aligned in the source.  Give the whitespace
+before each cell separator a space display specification
+stretching it to the separator's buffer column, so that
+separators are displayed at the same column as in the source
+regardless of what is hidden before them."
+  (beginning-of-line)
+  (while (re-search-forward "[ \t]+|" (line-end-position) t)
+    (let ((separator (1- (match-end 0))))
+      (unless (markdown-inline-code-at-pos-p separator)
+        (put-text-property
+         (match-beginning 0) separator
+         'display `(space :align-to ,(1- (current-column))))))))
+
+(defun markdown-fontify-tables (last)
+  (when (re-search-forward "|" last t)
+    (when (markdown-table-at-point-p)
+      (font-lock-append-text-property
+       (line-beginning-position) (min (1+ (line-end-position)) (point-max))
+       'face 'markdown-table-face)
+      (when (or markdown-hide-markup markdown-hide-urls)
+        (markdown--fontify-table-alignment)))
+    (forward-line 1)
+    t))
+
+(defun markdown-fontify-blockquotes (last)
+  "Apply font-lock properties to blockquotes from point to LAST."
+  (when (markdown-match-blockquotes last)
+    (let ((display-string
+           (markdown--first-displayable markdown-blockquote-display-char)))
+      (add-text-properties
+       (match-beginning 1) (match-end 1)
+       (if markdown-hide-markup
+           `(face markdown-blockquote-face display ,display-string)
+         `(face markdown-markup-face)))
+      (font-lock-append-text-property
+       (match-beginning 0) (match-end 0) 'face 'markdown-blockquote-face)
+      t)))
+
+(defun markdown-fontify-list-items (last)
+  "Apply font-lock properties to list markers from point to LAST."
+  (when (markdown-match-list-items last)
+    (when (not (markdown-code-block-at-point-p (match-beginning 2)))
+      (let* ((indent (length (match-string-no-properties 1)))
+             (level (/ indent markdown-list-indent-width)) ;; level = 0, 1, 2, ...
+             (bullet (nth (mod level (length markdown-list-item-bullets))
+                          markdown-list-item-bullets)))
+        (add-text-properties
+         (match-beginning 2) (match-end 2) '(face markdown-list-face))
+        (when markdown-hide-markup
+          (cond
+           ;; Unordered lists
+           ((string-match-p "[\\*\\+-]" (match-string 2))
+            (add-text-properties
+             (match-beginning 2) (match-end 2) `(display ,bullet)))
+           ;; Definition lists
+           ((string-equal ":" (match-string 2))
+            (let ((display-string
+                   (char-to-string (markdown--first-displayable
+                                    markdown-definition-display-char))))
+              (add-text-properties (match-beginning 2) (match-end 2)
+                                   `(display ,display-string))))))))
+    t))
+
+(defun markdown--fontify-hrs-view-mode (hr-char)
+  (if (and hr-char (display-supports-face-attributes-p '(:extend t)))
+      (add-text-properties
+       (match-beginning 0) (match-end 0)
+       `(face
+         (:inherit markdown-hr-face :underline t :extend t)
+         font-lock-multiline t
+         display "\n"))
+    (let ((hr-len (and hr-char (/ (1- (window-body-width)) (char-width hr-char)))))
+      (add-text-properties
+       (match-beginning 0) (match-end 0)
+       `(face
+         markdown-hr-face font-lock-multiline t
+         display ,(make-string hr-len hr-char))))))
+
+(defun markdown-fontify-hrs (last)
+  "Add text properties to horizontal rules from point to LAST."
+  (when (markdown-match-hr last)
+    (let ((hr-char (markdown--first-displayable markdown-hr-display-char)))
+      (if (and markdown-hide-markup hr-char)
+          (markdown--fontify-hrs-view-mode hr-char)
+        (add-text-properties
+         (match-beginning 0) (match-end 0)
+         `(face markdown-hr-face font-lock-multiline t)))
+      t)))
+
+(defun markdown-fontify-sub-superscripts (last)
+  "Apply text properties to sub- and superscripts from point to LAST."
+  (when (markdown-search-until-condition
+         (lambda () (and (not (markdown-code-block-at-point-p))
+                         (not (markdown-inline-code-at-point-p))
+                         (not (markdown-in-comment-p))
+                         (not (markdown--math-block-p))))
+         markdown-regex-sub-superscript last t)
+    (let* ((subscript-p (string= (match-string 2) "~"))
+           (props
+            (if subscript-p
+                (car markdown-sub-superscript-display)
+              (cdr markdown-sub-superscript-display)))
+           (mp (list 'face 'markdown-markup-face
+                     'invisible 'markdown-markup)))
+      (when markdown-hide-markup
+        (put-text-property (match-beginning 3) (match-end 3)
+                           'display props))
+      (add-text-properties (match-beginning 2) (match-end 2) mp)
+      (add-text-properties (match-beginning 4) (match-end 4) mp)
+      t)))
+
+
+;;; Syntax Table ==============================================================
+
+(defvar markdown-mode-syntax-table
+  (let ((tab (make-syntax-table text-mode-syntax-table)))
+    (modify-syntax-entry ?\" "." tab)
+    (modify-syntax-entry ?$ "." tab)  ; Might appear in inline content
+    (modify-syntax-entry ?% "." tab)  ; Could appear in URLs
+    (modify-syntax-entry ?* "." tab)  ; Emphasis (bold/italic)
+    (modify-syntax-entry ?+ "." tab)  ; Used in lists
+    (modify-syntax-entry ?/ "." tab)  ; Might appear in inline content or URLs
+    (modify-syntax-entry ?< "." tab)  ; For autolinks and embedded HTML
+    (modify-syntax-entry ?= "." tab)  ; Underlining in setext headers
+    (modify-syntax-entry ?> "." tab)  ; Blockquotes and HTML
+    (modify-syntax-entry ?_ "." tab)  ; Used for emphasis/bold
+    (modify-syntax-entry ?| "." tab)  ; Used in tables
+    (modify-syntax-entry ?& "." tab)  ; HTML entities
+    (modify-syntax-entry ?' "." tab)  ; Apostrophe as punctuation
+    tab)
+  "Syntax table for `markdown-mode'.")
+
+
+;;; Element Insertion =========================================================
+
+(defun markdown-ensure-blank-line-before ()
+  "If previous line is not already blank, insert a blank line before point."
+  (unless (bolp) (insert "\n"))
+  (unless (or (bobp) (looking-back "\n\\s-*\n" nil)) (insert "\n")))
+
+(defun markdown-ensure-blank-line-after ()
+  "If following line is not already blank, insert a blank line after point.
+Return the point where it was originally."
+  (save-excursion
+    (unless (eolp) (insert "\n"))
+    (unless (or (eobp) (looking-at-p "\n\\s-*\n")) (insert "\n"))))
+
+(defun markdown-wrap-or-insert (s1 s2 &optional thing beg end)
+  "Insert the strings S1 and S2, wrapping around region or THING.
+If a region is specified by the optional BEG and END arguments,
+wrap the strings S1 and S2 around that region.
+If there is an active region, wrap the strings S1 and S2 around
+the region.  If there is not an active region but the point is at
+THING, wrap that thing (which defaults to word).  Otherwise, just
+insert S1 and S2 and place the point in between.  Return the
+bounds of the entire wrapped string, or nil if nothing was wrapped
+and S1 and S2 were only inserted."
+  (let (a b bounds new-point)
+    (cond
+     ;; Given region
+     ((and beg end)
+      (setq a beg
+            b end
+            new-point (+ (point) (length s1))))
+     ;; Active region
+     ((use-region-p)
+      (setq a (region-beginning)
+            b (region-end)
+            new-point (+ (point) (length s1))))
+     ;; Thing (word) at point
+     ((setq bounds (markdown-bounds-of-thing-at-point (or thing 'word)))
+      (setq a (car bounds)
+            b (cdr bounds)
+            new-point (+ (point) (length s1))))
+     ;; No active region and no word
+     (t
+      (setq a (point)
+            b (point))))
+    (goto-char b)
+    (insert s2)
+    (goto-char a)
+    (insert s1)
+    (when new-point (goto-char new-point))
+    (if (= a b)
+        nil
+      (setq b (+ b (length s1) (length s2)))
+      (cons a b))))
+
+(defun markdown-point-after-unwrap (cur prefix suffix)
+  "Return desired position of point after an unwrapping operation.
+CUR gives the position of the point before the operation.
+Additionally, two cons cells must be provided.  PREFIX gives the
+bounds of the prefix string and SUFFIX gives the bounds of the
+suffix string."
+  (cond ((< cur (cdr prefix)) (car prefix))
+        ((< cur (car suffix)) (- cur (- (cdr prefix) (car prefix))))
+        ((<= cur (cdr suffix))
+         (- cur (+ (- (cdr prefix) (car prefix))
+                   (- cur (car suffix)))))
+        (t cur)))
+
+(defun markdown-unwrap-thing-at-point (regexp all text)
+  "Remove prefix and suffix of thing at point and reposition the point.
+When the thing at point matches REGEXP, replace the subexpression
+ALL with the string in subexpression TEXT.  Reposition the point
+in an appropriate location accounting for the removal of prefix
+and suffix strings.  Return new bounds of string from group TEXT.
+When REGEXP is nil, assumes match data is already set."
+  (when (or (null regexp)
+            (thing-at-point-looking-at regexp))
+    (let ((cur (point))
+          (prefix (cons (match-beginning all) (match-beginning text)))
+          (suffix (cons (match-end text) (match-end all)))
+          (bounds (cons (match-beginning text) (match-end text))))
+      ;; Replace the thing at point
+      (replace-match (match-string text) t t nil all)
+      ;; Reposition the point
+      (goto-char (markdown-point-after-unwrap cur prefix suffix))
+      ;; Adjust bounds
+      (setq bounds (cons (car prefix)
+                         (- (cdr bounds) (- (cdr prefix) (car prefix))))))))
+
+(defun markdown-unwrap-things-in-region (beg end regexp all text)
+  "Remove prefix and suffix of all things in region from BEG to END.
+When a thing in the region matches REGEXP, replace the
+subexpression ALL with the string in subexpression TEXT.
+Return a cons cell containing updated bounds for the region."
+  (save-excursion
+    (goto-char beg)
+    (let ((removed 0) len-all len-text)
+      (while (re-search-forward regexp (- end removed) t)
+        (setq len-all (length (match-string-no-properties all)))
+        (setq len-text (length (match-string-no-properties text)))
+        (setq removed (+ removed (- len-all len-text)))
+        (replace-match (match-string text) t t nil all))
+      (cons beg (- end removed)))))
+
+(defun markdown-insert-hr (arg)
+  "Insert or replace a horizontal rule.
+By default, use the first element of `markdown-hr-strings'.  When
+ARG is non-nil, as when given a prefix, select a different
+element as follows.  When prefixed with \\[universal-argument],
+use the last element of `markdown-hr-strings' instead.  When
+prefixed with an integer from 1 to the length of
+`markdown-hr-strings', use the element in that position instead."
+  (interactive "*P")
+  (when (thing-at-point-looking-at markdown-regex-hr)
+    (delete-region (match-beginning 0) (match-end 0)))
+  (markdown-ensure-blank-line-before)
+  (cond ((equal arg '(4))
+         (insert (car (reverse markdown-hr-strings))))
+        ((and (integerp arg) (> arg 0)
+              (<= arg (length markdown-hr-strings)))
+         (insert (nth (1- arg) markdown-hr-strings)))
+        (t
+         (insert (car markdown-hr-strings))))
+  (markdown-ensure-blank-line-after))
+
+(defun markdown--insert-common (start-delim end-delim regex start-group end-group face
+                                            &optional skip-space)
+  (if (use-region-p)
+      ;; Active region
+      (let* ((bounds (markdown-unwrap-things-in-region
+                      (region-beginning) (region-end)
+                      regex start-group end-group))
+             (beg (car bounds))
+             (end (cdr bounds)))
+        (when (and beg skip-space)
+          (save-excursion
+            (goto-char beg)
+            (skip-chars-forward " \t")
+            (setq beg (point))))
+        (when (and end skip-space)
+          (save-excursion
+            (goto-char end)
+            (skip-chars-backward " \t")
+            (setq end (point))))
+        (markdown-wrap-or-insert start-delim end-delim nil beg end))
+    (if (markdown--face-p (point) (list face))
+        (save-excursion
+          (while (and (markdown--face-p (point) (list face)) (not (bobp)))
+            (forward-char -1))
+          (forward-char (- (1- (length start-delim)))) ;; for delimiter
+          (unless (bolp)
+            (forward-char -1))
+          (when (looking-at regex)
+            (markdown-unwrap-thing-at-point nil start-group end-group)))
+      (if (thing-at-point-looking-at regex)
+          (markdown-unwrap-thing-at-point nil start-group end-group)
+        (markdown-wrap-or-insert start-delim end-delim 'word nil nil)))))
+
+(defun markdown-insert-bold ()
+  "Insert markup to make a region or word bold.
+If there is an active region, make the region bold.  If the point
+is at a non-bold word, make the word bold.  If the point is at a
+bold word or phrase, remove the bold markup.  Otherwise, simply
+insert bold delimiters and place the point in between them."
+  (interactive)
+  (let ((delim (if markdown-bold-underscore "__" "**")))
+    (markdown--insert-common delim delim markdown-regex-bold 2 4 'markdown-bold-face t)))
+
+(defun markdown-insert-italic ()
+  "Insert markup to make a region or word italic.
+If there is an active region, make the region italic.  If the point
+is at a non-italic word, make the word italic.  If the point is at an
+italic word or phrase, remove the italic markup.  Otherwise, simply
+insert italic delimiters and place the point in between them."
+  (interactive)
+  (let ((delim (if markdown-italic-underscore "_" "*")))
+    (markdown--insert-common delim delim markdown-regex-italic 1 3 'markdown-italic-face t)))
+
+(defun markdown-insert-strike-through ()
+  "Insert markup to make a region or word strikethrough.
+If there is an active region, make the region strikethrough.  If the point
+is at a non-bold word, make the word strikethrough.  If the point is at a
+strikethrough word or phrase, remove the strikethrough markup.  Otherwise,
+simply insert bold delimiters and place the point in between them."
+  (interactive)
+  (markdown--insert-common
+   "~~" "~~" markdown-regex-strike-through 2 4 'markdown-strike-through-face t))
+
+(defun markdown-insert-code ()
+  "Insert markup to make a region or word an inline code fragment.
+If there is an active region, make the region an inline code
+fragment.  If the point is at a word, make the word an inline
+code fragment.  Otherwise, simply insert code delimiters and
+place the point in between them."
+  (interactive)
+  (if (use-region-p)
+      ;; Active region
+      (let ((bounds (markdown-unwrap-things-in-region
+                     (region-beginning) (region-end)
+                     markdown-regex-code 1 3)))
+        (markdown-wrap-or-insert "`" "`" nil (car bounds) (cdr bounds)))
+    ;; Code markup removal, code markup for word, or empty markup insertion
+    (if (markdown-inline-code-at-point)
+        (markdown-unwrap-thing-at-point nil 0 2)
+      (markdown-wrap-or-insert "`" "`" 'word nil nil))))
+
+(defun markdown-insert-kbd ()
+  "Insert markup to wrap region or word in <kbd> tags.
+If there is an active region, use the region.  If the point is at
+a word, use the word.  Otherwise, simply insert <kbd> tags and
+place the point in between them."
+  (interactive)
+  (if (use-region-p)
+      ;; Active region
+      (let ((bounds (markdown-unwrap-things-in-region
+                     (region-beginning) (region-end)
+                     markdown-regex-kbd 0 2)))
+        (markdown-wrap-or-insert "<kbd>" "</kbd>" nil (car bounds) (cdr bounds)))
+    ;; Markup removal, markup for word, or empty markup insertion
+    (if (thing-at-point-looking-at markdown-regex-kbd)
+        (markdown-unwrap-thing-at-point nil 0 2)
+      (markdown-wrap-or-insert "<kbd>" "</kbd>" 'word nil nil))))
+
+(defun markdown-insert-inline-link (text url &optional title)
+  "Insert an inline link with TEXT pointing to URL.
+Optionally, the user can provide a TITLE."
+  (let ((cur (point)))
+    (setq title (and title (concat " \"" title "\"")))
+    (insert (concat "[" text "](" url title ")"))
+    (cond ((not text) (goto-char (+ 1 cur)))
+          ((not url) (goto-char (+ 3 (length text) cur))))))
+
+(defun markdown-insert-inline-image (text url &optional title)
+  "Insert an inline link with alt TEXT pointing to URL.
+Optionally, also provide a TITLE."
+  (let ((cur (point)))
+    (setq title (and title (concat " \"" title "\"")))
+    (insert (concat "![" text "](" url title ")"))
+    (cond ((not text) (goto-char (+ 2 cur)))
+          ((not url) (goto-char (+ 4 (length text) cur))))))
+
+(defun markdown-insert-reference-link (text label &optional url title)
+  "Insert a reference link and, optionally, a reference definition.
+The link TEXT will be inserted followed by the optional LABEL.
+If a URL is given, also insert a definition for the reference
+LABEL according to `markdown-reference-location'.  If a TITLE is
+given, it will be added to the end of the reference definition
+and will be used to populate the title attribute when converted
+to XHTML.  If URL is nil, insert only the link portion (for
+example, when a reference label is already defined)."
+  (insert (concat "[" text "][" label "]"))
+  (when url
+    (markdown-insert-reference-definition
+     (if (string-equal label "") text label)
+     url title)))
+
+(defun markdown-insert-reference-image (text label &optional url title)
+  "Insert a reference image and, optionally, a reference definition.
+The alt TEXT will be inserted followed by the optional LABEL.
+If a URL is given, also insert a definition for the reference
+LABEL according to `markdown-reference-location'.  If a TITLE is
+given, it will be added to the end of the reference definition
+and will be used to populate the title attribute when converted
+to XHTML.  If URL is nil, insert only the link portion (for
+example, when a reference label is already defined)."
+  (insert (concat "![" text "][" label "]"))
+  (when url
+    (markdown-insert-reference-definition
+     (if (string-equal label "") text label)
+     url title)))
+
+(defun markdown-insert-reference-definition (label &optional url title)
+  "Add definition for reference LABEL with URL and TITLE.
+LABEL is a Markdown reference label without square brackets.
+URL and TITLE are optional.  When given, the TITLE will
+be used to populate the title attribute when converted to XHTML."
+  ;; END specifies where to leave the point upon return
+  (let ((end (point)))
+    (cl-case markdown-reference-location
+      (end         (goto-char (point-max)))
+      (immediately (markdown-end-of-text-block))
+      (subtree     (markdown-end-of-subtree))
+      (header      (markdown-end-of-defun)))
+    ;; Skip backwards over local variables.  This logic is similar to the one
+    ;; used in ‘hack-local-variables’.
+    (when (and enable-local-variables (eobp))
+      (search-backward "\n\f" (max (- (point) 3000) (point-min)) :move)
+      (when (let ((case-fold-search t))
+              (search-forward "Local Variables:" nil :move))
+        (beginning-of-line 0)
+        (when (eq (char-before) ?\n) (backward-char))))
+    (unless (or (markdown-cur-line-blank-p)
+                (thing-at-point-looking-at markdown-regex-reference-definition))
+      (insert "\n"))
+    (insert "\n[" label "]: ")
+    (if url
+        (insert url)
+      ;; When no URL is given, leave point at END following the colon
+      (setq end (point)))
+    (when (> (length title) 0)
+      (insert " \"" title "\""))
+    (unless (looking-at-p "\n")
+      (insert "\n"))
+    (goto-char end)
+    (when url
+      (message
+       (markdown--substitute-command-keys
+        "Reference [%s] was defined, press \\[markdown-do] to jump there")
+       label))))
+
+(defcustom markdown-link-make-text-function nil
+  "Function that automatically generates a link text for a URL.
+
+If non-nil, this function will be called by
+`markdown--insert-link-or-image' and the result will be the
+default link text. The function should receive exactly one
+argument that corresponds to the link URL."
+  :group 'markdown
+  :type 'function
+  :package-version '(markdown-mode . "2.5"))
+
+(defcustom markdown-disable-tooltip-prompt nil
+  "Disable prompt for tooltip when inserting a link or image.
+
+If non-nil, `markdown-insert-link' and `markdown-insert-link'
+will not prompt the user to insert a tooltip text for the given
+link or image."
+  :group 'markdown
+  :type 'boolean
+  :safe 'booleanp
+  :package-version '(markdown-mode . "2.5"))
+
+(defun markdown--insert-link-or-image (image)
+  "Interactively insert new or update an existing link or image.
+When IMAGE is non-nil, insert an image.  Otherwise, insert a link.
+This is an internal function called by
+`markdown-insert-link' and `markdown-insert-image'."
+  (cl-multiple-value-bind (begin end text uri ref title)
+      (if (use-region-p)
+          ;; Use region as either link text or URL as appropriate.
+          (let ((region (buffer-substring-no-properties
+                         (region-beginning) (region-end))))
+            (if (string-match markdown-regex-uri region)
+                ;; Region contains a URL; use it as such.
+                (list (region-beginning) (region-end)
+                      nil (match-string 0 region) nil nil)
+              ;; Region doesn't contain a URL, so use it as text.
+              (list (region-beginning) (region-end)
+                    region nil nil nil)))
+        ;; Extract and use properties of existing link, if any.
+        (markdown-link-at-pos (point)))
+    (let* ((ref (when ref (concat "[" ref "]")))
+           (defined-refs (mapcar #'car (markdown-get-defined-references)))
+           (defined-ref-cands (mapcar (lambda (ref) (concat "[" ref "]")) defined-refs))
+           (used-uris (markdown-get-used-uris))
+           (uri-or-ref (completing-read
+                        "URL or [reference]: "
+                        (append defined-ref-cands used-uris)
+                        nil nil (or uri ref)))
+           (ref (cond ((string-match "\\`\\[\\(.*\\)\\]\\'" uri-or-ref)
+                       (match-string 1 uri-or-ref))
+                      ((string-equal "" uri-or-ref)
+                       "")))
+           (uri (unless ref uri-or-ref))
+           (text-prompt (if image
+                            "Alt text: "
+                          (if ref
+                              "Link text: "
+                            "Link text (blank for plain URL): ")))
+           (text (or text (and markdown-link-make-text-function uri
+                               (funcall markdown-link-make-text-function uri))))
+           (text (completing-read text-prompt defined-refs nil nil text))
+           (text (if (= (length text) 0) nil text))
+           (plainp (and uri (not text)))
+           (implicitp (string-equal ref ""))
+           (ref (if implicitp text ref))
+           (definedp (and ref (markdown-reference-definition ref)))
+           (ref-url (unless (or uri definedp)
+                      (completing-read "Reference URL: " used-uris)))
+           (title (unless (or plainp definedp markdown-disable-tooltip-prompt)
+                    (read-string "Title (tooltip text, optional): " title)))
+           (title (if (= (length title) 0) nil title)))
+      (when (and image implicitp)
+        (user-error "Reference required: implicit image references are invalid"))
+      (when (and begin end)
+        (delete-region begin end))
+      (cond
+       ((and (not image) uri text)
+        (markdown-insert-inline-link text uri title))
+       ((and image uri text)
+        (markdown-insert-inline-image text uri title))
+       ((and ref text)
+        (if image
+            (markdown-insert-reference-image text (unless implicitp ref) nil title)
+          (markdown-insert-reference-link text (unless implicitp ref) nil title))
+        (unless definedp
+          (markdown-insert-reference-definition ref ref-url title)))
+       ((and (not image) uri)
+        (markdown-insert-uri uri))))))
+
+(defun markdown-insert-link ()
+  "Insert new or update an existing link, with interactive prompt.
+If the point is at an existing link or URL, update the link text,
+URL, reference label, and/or title.  Otherwise, insert a new link.
+The type of link inserted (inline, reference, or plain URL)
+depends on which values are provided:
+
+*   If a URL and TEXT are given, insert an inline link: [TEXT](URL).
+*   If [REF] and TEXT are given, insert a reference link: [TEXT][REF].
+*   If only TEXT is given, insert an implicit reference link: [TEXT][].
+*   If only a URL is given, insert a plain link: <URL>.
+
+In other words, to create an implicit reference link, leave the
+URL prompt empty and to create a plain URL link, leave the link
+text empty.
+
+If there is an active region, use the text as the default URL, if
+it seems to be a URL, or link text value otherwise.
+
+If a given reference is not defined, this function will
+additionally prompt for the URL and optional title.  In this case,
+the reference definition is placed at the location determined by
+`markdown-reference-location'.  In addition, it is possible to
+have the `markdown-link-make-text-function' function, if non-nil,
+define the default link text before prompting the user for it.
+
+If `markdown-disable-tooltip-prompt' is non-nil, the user will
+not be prompted to add or modify a tooltip text.
+
+Through updating the link, this function can be used to convert a
+link of one type (inline, reference, or plain) to another type by
+selectively adding or removing information via the prompts."
+  (interactive)
+  (markdown--insert-link-or-image nil))
+
+(defun markdown-insert-image ()
+  "Insert new or update an existing image, with interactive prompt.
+If the point is at an existing image, update the alt text, URL,
+reference label, and/or title. Otherwise, insert a new image.
+The type of image inserted (inline or reference) depends on which
+values are provided:
+
+*   If a URL and ALT-TEXT are given, insert an inline image:
+    ![ALT-TEXT](URL).
+*   If [REF] and ALT-TEXT are given, insert a reference image:
+    ![ALT-TEXT][REF].
+
+If there is an active region, use the text as the default URL, if
+it seems to be a URL, or alt text value otherwise.
+
+If a given reference is not defined, this function will
+additionally prompt for the URL and optional title.  In this case,
+the reference definition is placed at the location determined by
+`markdown-reference-location'.
+
+Through updating the image, this function can be used to convert an
+image of one type (inline or reference) to another type by
+selectively adding or removing information via the prompts."
+  (interactive)
+  (markdown--insert-link-or-image t))
+
+(defun markdown-insert-uri (&optional uri)
+  "Insert markup for an inline URI.
+If there is an active region, use it as the URI.  If the point is
+at a URI, wrap it with angle brackets.  If the point is at an
+inline URI, remove the angle brackets.  Otherwise, simply insert
+angle brackets place the point between them."
+  (interactive)
+  (if (use-region-p)
+      ;; Active region
+      (let ((bounds (markdown-unwrap-things-in-region
+                     (region-beginning) (region-end)
+                     markdown-regex-angle-uri 0 2)))
+        (markdown-wrap-or-insert "<" ">" nil (car bounds) (cdr bounds)))
+    ;; Markup removal, URI at point, new URI, or empty markup insertion
+    (if (thing-at-point-looking-at markdown-regex-angle-uri)
+        (markdown-unwrap-thing-at-point nil 0 2)
+      (if uri
+          (insert "<" uri ">")
+        (markdown-wrap-or-insert "<" ">" 'url nil nil)))))
+
+(defun markdown-insert-wiki-link ()
+  "Insert a wiki link of the form [[WikiLink]].
+If there is an active region, use the region as the link text.
+If the point is at a word, use the word as the link text.  If
+there is no active region and the point is not at word, simply
+insert link markup."
+  (interactive)
+  (if (use-region-p)
+      ;; Active region
+      (markdown-wrap-or-insert "[[" "]]" nil (region-beginning) (region-end))
+    ;; Markup removal, wiki link at at point, or empty markup insertion
+    (if (thing-at-point-looking-at markdown-regex-wiki-link)
+        (if (or markdown-wiki-link-alias-first
+                (null (match-string 5)))
+            (markdown-unwrap-thing-at-point nil 1 3)
+          (markdown-unwrap-thing-at-point nil 1 5))
+      (markdown-wrap-or-insert "[[" "]]"))))
+
+(defun markdown-remove-header ()
+  "Remove header markup if point is at a header.
+Return bounds of remaining header text if a header was removed
+and nil otherwise."
+  (interactive "*")
+  (or (markdown-unwrap-thing-at-point markdown-regex-header-atx 0 2)
+      (markdown-unwrap-thing-at-point markdown-regex-header-setext 0 1)))
+
+(defun markdown-insert-header (&optional level text setext)
+  "Insert or replace header markup.
+The level of the header is specified by LEVEL and header text is
+given by TEXT.  LEVEL must be an integer from 1 and 6, and the
+default value is 1.
+When TEXT is nil, the header text is obtained as follows.
+If there is an active region, it is used as the header text.
+Otherwise, the current line will be used as the header text.
+If there is not an active region and the point is at a header,
+remove the header markup and replace with level N header.
+Otherwise, insert empty header markup and place the point in
+between.
+The style of the header will be atx (hash marks) unless
+SETEXT is non-nil, in which case a setext-style (underlined)
+header will be inserted."
+  (interactive "p\nsHeader text: ")
+  (setq level (min (max (or level 1) 1) (if setext 2 6)))
+  ;; Determine header text if not given
+  (when (null text)
+    (if (use-region-p)
+        ;; Active region
+        (setq text (delete-and-extract-region (region-beginning) (region-end)))
+      ;; No active region
+      (markdown-remove-header)
+      (setq text (delete-and-extract-region
+                  (line-beginning-position) (line-end-position)))
+      (when (and setext (string-match-p "^[ \t]*$" text))
+        (setq text (read-string "Header text: "))))
+    (setq text (markdown-compress-whitespace-string text)))
+  ;; Insertion with given text
+  (markdown-ensure-blank-line-before)
+  (let (hdr)
+    (cond (setext
+           (setq hdr (make-string (string-width text) (if (= level 2) ?- ?=)))
+           (insert text "\n" hdr))
+          (t
+           (setq hdr (make-string level ?#))
+           (insert hdr " " text)
+           (when (null markdown-asymmetric-header) (insert " " hdr)))))
+  (markdown-ensure-blank-line-after)
+  ;; Leave point at end of text
+  (cond (setext
+         (backward-char (1+ (string-width text))))
+        ((null markdown-asymmetric-header)
+         (backward-char (1+ level)))))
+
+(defun markdown-insert-header-dwim (&optional arg setext)
+  "Insert or replace header markup.
+The level and type of the header are determined automatically by
+the type and level of the previous header, unless a prefix
+argument is given via ARG.
+With a numeric prefix valued 1 to 6, insert a header of the given
+level, with the type being determined automatically (note that
+only level 1 or 2 setext headers are possible).
+
+With a \\[universal-argument] prefix (i.e., when ARG is (4)),
+promote the heading by one level.
+With two \\[universal-argument] prefixes (i.e., when ARG is (16)),
+demote the heading by one level.
+When SETEXT is non-nil, prefer setext-style headers when
+possible (levels one and two).
+
+When there is an active region, use it for the header text.  When
+the point is at an existing header, change the type and level
+according to the rules above.
+Otherwise, if the line is not empty, create a header using the
+text on the current line as the header text.
+Finally, if the point is on a blank line, insert empty header
+markup (atx) or prompt for text (setext).
+See `markdown-insert-header' for more details about how the
+header text is determined."
+  (interactive "*P")
+  (let (level)
+    (save-excursion
+      (when (or (thing-at-point-looking-at markdown-regex-header)
+                (re-search-backward markdown-regex-header nil t))
+        ;; level of current or previous header
+        (setq level (markdown-outline-level))
+        ;; match group 1 indicates a setext header
+        (setq setext (match-end 1))))
+    ;; check prefix argument
+    (cond
+     ((and (equal arg '(4)) level (> level 1)) ;; C-u
+      (cl-decf level))
+     ((and (equal arg '(16)) level (< level 6)) ;; C-u C-u
+      (cl-incf level))
+     (arg ;; numeric prefix
+      (setq level (prefix-numeric-value arg))))
+    ;; setext headers must be level one or two
+    (and level (setq setext (and setext (<= level 2))))
+    ;; insert the heading
+    (markdown-insert-header level nil setext)))
+
+(defun markdown-insert-header-setext-dwim (&optional arg)
+  "Insert or replace header markup, with preference for setext.
+See `markdown-insert-header-dwim' for details, including how ARG is handled."
+  (interactive "*P")
+  (markdown-insert-header-dwim arg t))
+
+(defun markdown-insert-header-atx-1 ()
+  "Insert a first level atx-style (hash mark) header.
+See `markdown-insert-header'."
+  (interactive "*")
+  (markdown-insert-header 1 nil nil))
+
+(defun markdown-insert-header-atx-2 ()
+  "Insert a level two atx-style (hash mark) header.
+See `markdown-insert-header'."
+  (interactive "*")
+  (markdown-insert-header 2 nil nil))
+
+(defun markdown-insert-header-atx-3 ()
+  "Insert a level three atx-style (hash mark) header.
+See `markdown-insert-header'."
+  (interactive "*")
+  (markdown-insert-header 3 nil nil))
+
+(defun markdown-insert-header-atx-4 ()
+  "Insert a level four atx-style (hash mark) header.
+See `markdown-insert-header'."
+  (interactive "*")
+  (markdown-insert-header 4 nil nil))
+
+(defun markdown-insert-header-atx-5 ()
+  "Insert a level five atx-style (hash mark) header.
+See `markdown-insert-header'."
+  (interactive "*")
+  (markdown-insert-header 5 nil nil))
+
+(defun markdown-insert-header-atx-6 ()
+  "Insert a sixth level atx-style (hash mark) header.
+See `markdown-insert-header'."
+  (interactive "*")
+  (markdown-insert-header 6 nil nil))
+
+(defun markdown-insert-header-setext-1 ()
+  "Insert a setext-style (underlined) first-level header.
+See `markdown-insert-header'."
+  (interactive "*")
+  (markdown-insert-header 1 nil t))
+
+(defun markdown-insert-header-setext-2 ()
+  "Insert a setext-style (underlined) second-level header.
+See `markdown-insert-header'."
+  (interactive "*")
+  (markdown-insert-header 2 nil t))
+
+(defun markdown-blockquote-indentation (loc)
+  "Return string containing necessary indentation for a blockquote at LOC.
+Also see `markdown-pre-indentation'."
+  (save-excursion
+    (goto-char loc)
+    (let* ((list-level (length (markdown-calculate-list-levels)))
+           (indent ""))
+      (dotimes (_ list-level indent)
+        (setq indent (concat indent "    "))))))
+
+(defun markdown-insert-blockquote ()
+  "Start a blockquote section (or blockquote the region).
+If Transient Mark mode is on and a region is active, it is used as
+the blockquote text."
+  (interactive)
+  (if (use-region-p)
+      (markdown-blockquote-region (region-beginning) (region-end))
+    (markdown-ensure-blank-line-before)
+    (insert (markdown-blockquote-indentation (point)) "> ")
+    (markdown-ensure-blank-line-after)))
+
+(defun markdown-block-region (beg end prefix)
+  "Format the region using a block prefix.
+Arguments BEG and END specify the beginning and end of the
+region.  The characters PREFIX will appear at the beginning
+of each line."
+  (save-excursion
+    (let* ((end-marker (make-marker))
+           (beg-marker (make-marker))
+           (prefix-without-trailing-whitespace
+            (replace-regexp-in-string (rx (+ blank) eos) "" prefix)))
+      ;; Ensure blank line after and remove extra whitespace
+      (goto-char end)
+      (skip-syntax-backward "-")
+      (set-marker end-marker (point))
+      (delete-horizontal-space)
+      (markdown-ensure-blank-line-after)
+      ;; Ensure blank line before and remove extra whitespace
+      (goto-char beg)
+      (skip-syntax-forward "-")
+      (delete-horizontal-space)
+      (markdown-ensure-blank-line-before)
+      (set-marker beg-marker (point))
+      ;; Insert PREFIX before each line
+      (goto-char beg-marker)
+      (while (and (< (line-beginning-position) end-marker)
+                  (not (eobp)))
+        ;; Don’t insert trailing whitespace.
+        (insert (if (eolp) prefix-without-trailing-whitespace prefix))
+        (forward-line)))))
+
+(defun markdown-blockquote-region (beg end)
+  "Blockquote the region.
+Arguments BEG and END specify the beginning and end of the region."
+  (interactive "*r")
+  (markdown-block-region
+   beg end (concat (markdown-blockquote-indentation
+                    (max (point-min) (1- beg))) "> ")))
+
+(defun markdown-pre-indentation (loc)
+  "Return string containing necessary whitespace for a pre block at LOC.
+Also see `markdown-blockquote-indentation'."
+  (save-excursion
+    (goto-char loc)
+    (let* ((list-level (length (markdown-calculate-list-levels)))
+           indent)
+      (dotimes (_ (1+ list-level) indent)
+        (setq indent (concat indent "    "))))))
+
+(defun markdown-insert-pre ()
+  "Start a preformatted section (or apply to the region).
+If Transient Mark mode is on and a region is active, it is marked
+as preformatted text."
+  (interactive)
+  (if (use-region-p)
+      (markdown-pre-region (region-beginning) (region-end))
+    (markdown-ensure-blank-line-before)
+    (insert (markdown-pre-indentation (point)))
+    (markdown-ensure-blank-line-after)))
+
+(defun markdown-pre-region (beg end)
+  "Format the region as preformatted text.
+Arguments BEG and END specify the beginning and end of the region."
+  (interactive "*r")
+  (let ((indent (markdown-pre-indentation (max (point-min) (1- beg)))))
+    (markdown-block-region beg end indent)))
+
+(defun markdown-electric-backquote (arg)
+  "Insert a backquote.
+The numeric prefix argument ARG says how many times to repeat the insertion.
+Call `markdown-insert-gfm-code-block' interactively
+if three backquotes inserted at the beginning of line."
+  (interactive "*P")
+  (self-insert-command (prefix-numeric-value arg))
+  (when (and markdown-gfm-use-electric-backquote (looking-back "^```" nil))
+    (replace-match "")
+    (call-interactively #'markdown-insert-gfm-code-block)))
+
+(defconst markdown-gfm-recognized-languages
+  ;; To reproduce/update, evaluate the let-form in
+  ;; scripts/get-recognized-gfm-languages.el. that produces a single long sexp,
+  ;; but with appropriate use of a keyboard macro, indenting and filling it
+  ;; properly is pretty fast.
+  '("1C-Enterprise" "2-Dimensional-Array" "4D" "ABAP" "ABAP-CDS" "ABNF"
+    "AGS-Script" "AIDL" "AL" "AMPL" "ANTLR" "API-Blueprint" "APL" "ASL"
+    "ASN.1" "ASP.NET" "ATS" "ActionScript" "Ada" "Adblock-Filter-List"
+    "Adobe-Font-Metrics" "Agda" "Alloy" "Alpine-Abuild" "Altium-Designer"
+    "AngelScript" "Ant-Build-System" "Antlers" "ApacheConf" "Apex"
+    "Apollo-Guidance-Computer" "AppleScript" "Arc" "AsciiDoc" "AspectJ"
+    "Assembly" "Astro" "Asymptote" "Augeas" "AutoHotkey" "AutoIt"
+    "Avro-IDL" "Awk" "BASIC" "Ballerina" "Batchfile" "Beef" "Befunge"
+    "Berry" "BibTeX" "Bicep" "Bikeshed" "Bison" "BitBake" "Blade"
+    "BlitzBasic" "BlitzMax" "Bluespec" "Bluespec-BH" "Boo" "Boogie"
+    "Brainfuck" "BrighterScript" "Brightscript" "Browserslist" "C" "C#"
+    "C++" "C-ObjDump" "C2hs-Haskell" "CAP-CDS" "CIL" "CLIPS" "CMake"
+    "COBOL" "CODEOWNERS" "COLLADA" "CSON" "CSS" "CSV" "CUE" "CWeb"
+    "Cabal-Config" "Cadence" "Cairo" "CameLIGO" "Cap'n-Proto" "CartoCSS"
+    "Ceylon" "Chapel" "Charity" "Checksums" "ChucK" "Circom" "Cirru"
+    "Clarion" "Clarity" "Classic-ASP" "Clean" "Click" "Clojure"
+    "Closure-Templates" "Cloud-Firestore-Security-Rules" "CoNLL-U"
+    "CodeQL" "CoffeeScript" "ColdFusion" "ColdFusion-CFC" "Common-Lisp"
+    "Common-Workflow-Language" "Component-Pascal" "Cool" "Coq"
+    "Cpp-ObjDump" "Creole" "Crystal" "Csound" "Csound-Document"
+    "Csound-Score" "Cuda" "Cue-Sheet" "Curry" "Cycript" "Cypher" "Cython"
+    "D" "D-ObjDump" "D2" "DIGITAL-Command-Language" "DM" "DNS-Zone"
+    "DTrace" "Dafny" "Darcs-Patch" "Dart" "DataWeave"
+    "Debian-Package-Control-File" "DenizenScript" "Dhall" "Diff"
+    "DirectX-3D-File" "Dockerfile" "Dogescript" "Dotenv" "Dylan" "E"
+    "E-mail" "EBNF" "ECL" "ECLiPSe" "EJS" "EQ" "Eagle" "Earthly"
+    "Easybuild" "Ecere-Projects" "Ecmarkup" "Edge" "EdgeQL"
+    "EditorConfig" "Edje-Data-Collection" "Eiffel" "Elixir" "Elm"
+    "Elvish" "Elvish-Transcript" "Emacs-Lisp" "EmberScript" "Erlang"
+    "Euphoria" "F#" "F*" "FIGlet-Font" "FLUX" "Factor" "Fancy" "Fantom"
+    "Faust" "Fennel" "Filebench-WML" "Filterscript" "Fluent" "Formatted"
+    "Forth" "Fortran" "Fortran-Free-Form" "FreeBasic" "FreeMarker"
+    "Frege" "Futhark" "G-code" "GAML" "GAMS" "GAP"
+    "GCC-Machine-Description" "GDB" "GDScript" "GEDCOM" "GLSL" "GN" "GSC"
+    "Game-Maker-Language" "Gemfile.lock" "Gemini" "Genero-4gl"
+    "Genero-per" "Genie" "Genshi" "Gentoo-Ebuild" "Gentoo-Eclass"
+    "Gerber-Image" "Gettext-Catalog" "Gherkin" "Git-Attributes"
+    "Git-Config" "Git-Revision-List" "Gleam" "Glimmer-JS" "Glimmer-TS"
+    "Glyph" "Glyph-Bitmap-Distribution-Format" "Gnuplot" "Go"
+    "Go-Checksums" "Go-Module" "Go-Workspace" "Godot-Resource" "Golo"
+    "Gosu" "Grace" "Gradle" "Gradle-Kotlin-DSL" "Grammatical-Framework"
+    "Graph-Modeling-Language" "GraphQL" "Graphviz-(DOT)" "Groovy"
+    "Groovy-Server-Pages" "HAProxy" "HCL" "HLSL" "HOCON" "HTML"
+    "HTML+ECR" "HTML+EEX" "HTML+ERB" "HTML+PHP" "HTML+Razor" "HTTP"
+    "HXML" "Hack" "Haml" "Handlebars" "Harbour" "Haskell" "Haxe" "HiveQL"
+    "HolyC" "Hosts-File" "Hy" "HyPhy" "IDL" "IGOR-Pro" "INI" "IRC-log"
+    "Idris" "Ignore-List" "ImageJ-Macro" "Imba" "Inform-7" "Ink"
+    "Inno-Setup" "Io" "Ioke" "Isabelle" "Isabelle-ROOT" "J"
+    "JAR-Manifest" "JCL" "JFlex" "JSON" "JSON-with-Comments" "JSON5"
+    "JSONLD" "JSONiq" "Janet" "Jasmin" "Java" "Java-Properties"
+    "Java-Server-Pages" "JavaScript" "JavaScript+ERB" "Jest-Snapshot"
+    "JetBrains-MPS" "Jinja" "Jison" "Jison-Lex" "Jolie" "Jsonnet" "Julia"
+    "Jupyter-Notebook" "Just" "KRL" "Kaitai-Struct" "KakouneScript"
+    "KerboScript" "KiCad-Layout" "KiCad-Legacy-Layout" "KiCad-Schematic"
+    "Kickstart" "Kit" "Kotlin" "Kusto" "LFE" "LLVM" "LOLCODE" "LSL"
+    "LTspice-Symbol" "LabVIEW" "Lark" "Lasso" "Latte" "Lean" "Lean-4"
+    "Less" "Lex" "LigoLANG" "LilyPond" "Limbo" "Linker-Script"
+    "Linux-Kernel-Module" "Liquid" "Literate-Agda"
+    "Literate-CoffeeScript" "Literate-Haskell" "LiveScript" "Logos"
+    "Logtalk" "LookML" "LoomScript" "Lua" "M" "M4" "M4Sugar" "MATLAB"
+    "MAXScript" "MDX" "MLIR" "MQL4" "MQL5" "MTML" "MUF" "Macaulay2"
+    "Makefile" "Mako" "Markdown" "Marko" "Mask" "Mathematica" "Maven-POM"
+    "Max" "Mercury" "Mermaid" "Meson" "Metal"
+    "Microsoft-Developer-Studio-Project"
+    "Microsoft-Visual-Studio-Solution" "MiniD" "MiniYAML" "Mint" "Mirah"
+    "Modelica" "Modula-2" "Modula-3" "Module-Management-System" "Mojo"
+    "Monkey" "Monkey-C" "Moocode" "MoonScript" "Motoko"
+    "Motorola-68K-Assembly" "Move" "Muse" "Mustache" "Myghty" "NASL"
+    "NCL" "NEON" "NL" "NPM-Config" "NSIS" "NWScript" "Nasal" "Nearley"
+    "Nemerle" "NetLinx" "NetLinx+ERB" "NetLogo" "NewLisp" "Nextflow"
+    "Nginx" "Nim" "Ninja" "Nit" "Nix" "Nu" "NumPy" "Nunjucks" "Nushell"
+    "OASv2-json" "OASv2-yaml" "OASv3-json" "OASv3-yaml" "OCaml" "Oberon"
+    "ObjDump" "Object-Data-Instance-Notation" "ObjectScript"
+    "Objective-C" "Objective-C++" "Objective-J" "Odin" "Omgrofl" "Opa"
+    "Opal" "Open-Policy-Agent" "OpenAPI-Specification-v2"
+    "OpenAPI-Specification-v3" "OpenCL" "OpenEdge-ABL" "OpenQASM"
+    "OpenRC-runscript" "OpenSCAD" "OpenStep-Property-List"
+    "OpenType-Feature-File" "Option-List" "Org" "Ox" "Oxygene" "Oz" "P4"
+    "PDDL" "PEG.js" "PHP" "PLSQL" "PLpgSQL" "POV-Ray-SDL" "Pact" "Pan"
+    "Papyrus" "Parrot" "Parrot-Assembly" "Parrot-Internal-Representation"
+    "Pascal" "Pawn" "Pep8" "Perl" "Pic" "Pickle" "PicoLisp" "PigLatin"
+    "Pike" "Pip-Requirements" "PlantUML" "Pod" "Pod-6" "PogoScript"
+    "Polar" "Pony" "Portugol" "PostCSS" "PostScript" "PowerBuilder"
+    "PowerShell" "Praat" "Prisma" "Processing" "Procfile" "Proguard"
+    "Prolog" "Promela" "Propeller-Spin" "Protocol-Buffer"
+    "Protocol-Buffer-Text-Format" "Public-Key" "Pug" "Puppet" "Pure-Data"
+    "PureBasic" "PureScript" "Pyret" "Python" "Python-console"
+    "Python-traceback" "Q#" "QML" "QMake" "Qt-Script" "Quake" "R" "RAML"
+    "RBS" "RDoc" "REALbasic" "REXX" "RMarkdown" "RPC" "RPGLE" "RPM-Spec"
+    "RUNOFF" "Racket" "Ragel" "Raku" "Rascal" "Raw-token-data" "ReScript"
+    "Readline-Config" "Reason" "ReasonLIGO" "Rebol" "Record-Jar" "Red"
+    "Redcode" "Redirect-Rules" "Regular-Expression" "Ren'Py"
+    "RenderScript" "Rez" "Rich-Text-Format" "Ring" "Riot"
+    "RobotFramework" "Roc" "Roff" "Roff-Manpage" "Rouge"
+    "RouterOS-Script" "Ruby" "Rust" "SAS" "SCSS" "SELinux-Policy" "SMT"
+    "SPARQL" "SQF" "SQL" "SQLPL" "SRecode-Template" "SSH-Config" "STAR"
+    "STL" "STON" "SVG" "SWIG" "Sage" "SaltStack" "Sass" "Scala" "Scaml"
+    "Scenic" "Scheme" "Scilab" "Self" "ShaderLab" "Shell"
+    "ShellCheck-Config" "ShellSession" "Shen" "Sieve"
+    "Simple-File-Verification" "Singularity" "Slash" "Slice" "Slim"
+    "Slint" "SmPL" "Smali" "Smalltalk" "Smarty" "Smithy" "Snakemake"
+    "Solidity" "Soong" "SourcePawn" "Spline-Font-Database" "Squirrel"
+    "Stan" "Standard-ML" "Starlark" "Stata" "StringTemplate" "Stylus"
+    "SubRip-Text" "SugarSS" "SuperCollider" "Svelte" "Sway" "Sweave"
+    "Swift" "SystemVerilog" "TI-Program" "TL-Verilog" "TLA" "TOML" "TSQL"
+    "TSV" "TSX" "TXL" "Talon" "Tcl" "Tcsh" "TeX" "Tea" "Terra"
+    "Terraform-Template" "Texinfo" "Text" "TextGrid"
+    "TextMate-Properties" "Textile" "Thrift" "Toit" "Turing" "Turtle"
+    "Twig" "Type-Language" "TypeScript" "Typst" "Unified-Parallel-C"
+    "Unity3D-Asset" "Unix-Assembly" "Uno" "UnrealScript" "UrWeb" "V"
+    "VBA" "VBScript" "VCL" "VHDL" "Vala" "Valve-Data-Format"
+    "Velocity-Template-Language" "Verilog" "Vim-Help-File" "Vim-Script"
+    "Vim-Snippet" "Visual-Basic-.NET" "Visual-Basic-6.0" "Volt" "Vue"
+    "Vyper" "WDL" "WGSL" "Wavefront-Material" "Wavefront-Object"
+    "Web-Ontology-Language" "WebAssembly" "WebAssembly-Interface-Type"
+    "WebIDL" "WebVTT" "Wget-Config" "Whiley" "Wikitext"
+    "Win32-Message-File" "Windows-Registry-Entries" "Witcher-Script"
+    "Wollok" "World-of-Warcraft-Addon-Data" "Wren" "X-BitMap"
+    "X-Font-Directory-Index" "X-PixMap" "X10" "XC" "XCompose" "XML"
+    "XML-Property-List" "XPages" "XProc" "XQuery" "XS" "XSLT" "Xojo"
+    "Xonsh" "Xtend" "YAML" "YANG" "YARA" "YASnippet" "Yacc" "Yul" "ZAP"
+    "ZIL" "Zeek" "ZenScript" "Zephir" "Zig" "Zimpl" "cURL-Config"
+    "desktop" "dircolors" "eC" "edn" "fish" "hoon" "jq" "kvlang"
+    "mIRC-Script" "mcfunction" "mupad" "nanorc" "nesC" "ooc" "q"
+    "reStructuredText" "robots.txt" "sed" "wisp" "xBase")
+  "Language specifiers recognized by GitHub's syntax highlighting features.")
+
+(defvar-local markdown-gfm-used-languages nil
+  "Language names used in GFM code blocks.")
+
+(defun markdown-trim-whitespace (str)
+  (replace-regexp-in-string
+   "\\(?:[[:space:]\r\n]+\\'\\|\\`[[:space:]\r\n]+\\)" "" str))
+
+(defun markdown-clean-language-string (str)
+  (replace-regexp-in-string
+   "{\\.?\\|}" "" (markdown-trim-whitespace str)))
+
+(defun markdown-validate-language-string (widget)
+  (let ((str (widget-value widget)))
+    (unless (string= str (markdown-clean-language-string str))
+      (widget-put widget :error (format "Invalid language spec: '%s'" str))
+      widget)))
+
+(defun markdown-gfm-get-corpus ()
+  "Create corpus of recognized GFM code block languages for the given buffer."
+  (let ((given-corpus (append markdown-gfm-additional-languages
+                              markdown-gfm-recognized-languages)))
+    (append
+     markdown-gfm-used-languages
+     (if markdown-gfm-downcase-languages (cl-mapcar #'downcase given-corpus)
+       given-corpus))))
+
+(defun markdown-gfm-add-used-language (lang)
+  "Clean LANG and add to list of used languages."
+  (setq markdown-gfm-used-languages
+        (cons lang (remove lang markdown-gfm-used-languages))))
+
+(defcustom markdown-spaces-after-code-fence 1
+  "Number of space characters to insert after a code fence.
+\\<gfm-mode-map>\\[markdown-insert-gfm-code-block] inserts this many spaces between an
+opening code fence and an info string."
+  :group 'markdown
+  :type 'integer
+  :safe #'natnump
+  :package-version '(markdown-mode . "2.3"))
+
+(defcustom markdown-code-block-braces nil
+  "When non-nil, automatically insert braces for GFM code blocks."
+  :group 'markdown
+  :type 'boolean)
+
+(defun markdown-insert-gfm-code-block (&optional lang edit)
+  "Insert GFM code block for language LANG.
+If LANG is nil, the language will be queried from user.  If a
+region is active, wrap this region with the markup instead.  If
+the region boundaries are not on empty lines, these are added
+automatically in order to have the correct markup.  When EDIT is
+non-nil (e.g., when \\[universal-argument] is given), edit the
+code block in an indirect buffer after insertion."
+  (interactive
+   (list (let ((completion-ignore-case nil))
+           (condition-case nil
+               (markdown-clean-language-string
+                (completing-read
+                 "Programming language: "
+                 (markdown-gfm-get-corpus)
+                 nil 'confirm (car markdown-gfm-used-languages)
+                 'markdown-gfm-language-history))
+             (quit "")))
+         current-prefix-arg))
+  (unless (string= lang "") (markdown-gfm-add-used-language lang))
+  (when (and (> (length lang) 0)
+             (not markdown-code-block-braces))
+    (setq lang (concat (make-string markdown-spaces-after-code-fence ?\s)
+                       lang)))
+  (let ((gfm-open-brace (if markdown-code-block-braces "{" ""))
+        (gfm-close-brace (if markdown-code-block-braces "}" "")))
+    (if (use-region-p)
+        (let* ((b (region-beginning)) (e (region-end)) end
+               (indent (progn (goto-char b) (current-indentation))))
+          (goto-char e)
+          ;; if we're on a blank line, don't newline, otherwise the ```
+          ;; should go on its own line
+          (unless (looking-back "\n" nil)
+            (newline))
+          (indent-to indent)
+          (insert "```")
+          (markdown-ensure-blank-line-after)
+          (setq end (point))
+          (goto-char b)
+          ;; if we're on a blank line, insert the quotes here, otherwise
+          ;; add a new line first
+          (unless (looking-at-p "\n")
+            (newline)
+            (forward-line -1))
+          (markdown-ensure-blank-line-before)
+          (indent-to indent)
+          (insert "```" gfm-open-brace lang gfm-close-brace)
+          (markdown-syntax-propertize-fenced-block-constructs (line-beginning-position) end))
+      (let ((indent (current-indentation))
+            start-bol)
+        (delete-horizontal-space :backward-only)
+        (markdown-ensure-blank-line-before)
+        (indent-to indent)
+        (setq start-bol (line-beginning-position))
+        (insert "```" gfm-open-brace lang gfm-close-brace "\n")
+        (indent-to indent)
+        (unless edit (insert ?\n))
+        (indent-to indent)
+        (insert "```")
+        (markdown-ensure-blank-line-after)
+        (markdown-syntax-propertize-fenced-block-constructs start-bol (point)))
+      (end-of-line 0)
+      (when edit (markdown-edit-code-block)))))
+
+(defun markdown-code-block-lang (&optional pos-prop)
+  "Return the language name for a GFM or tilde fenced code block.
+The beginning of the block may be described by POS-PROP,
+a cons of (pos . prop) giving the position and property
+at the beginning of the block."
+  (or pos-prop
+      (setq pos-prop
+            (markdown-max-of-seq
+             #'car
+             (cl-remove-if
+              #'null
+              (cl-mapcar
+               #'markdown-find-previous-prop
+               (markdown-get-fenced-block-begin-properties))))))
+  (when pos-prop
+    (goto-char (car pos-prop))
+    (set-match-data (get-text-property (point) (cdr pos-prop)))
+    ;; Note: Hard-coded group number assumes tilde
+    ;; and GFM fenced code regexp groups agree.
+    (let ((begin (match-beginning 3))
+          (end (match-end 3)))
+      (when (and begin end)
+        ;; Fix language strings beginning with periods, like ".ruby".
+        (when (eq (char-after begin) ?.)
+          (setq begin (1+ begin)))
+        (buffer-substring-no-properties begin end)))))
+
+(defun markdown-gfm-parse-buffer-for-languages (&optional buffer)
+  (with-current-buffer (or buffer (current-buffer))
+    (save-excursion
+      (goto-char (point-min))
+      (cl-loop
+       with prop = 'markdown-gfm-block-begin
+       for pos-prop = (markdown-find-next-prop prop)
+       while pos-prop
+       for lang = (markdown-code-block-lang pos-prop)
+       do (progn (when lang (markdown-gfm-add-used-language lang))
+                 (goto-char (or (next-single-property-change (point) prop)
+                                (point-max))))))))
+
+(defun markdown-insert-foldable-block ()
+  "Insert details disclosure element to make content foldable.
+If a region is active, wrap this region with the disclosure
+element. More details here https://developer.mozilla.org/en-US/docs/Web/HTML/Element/details."
+  (interactive)
+  (let ((details-open-tag "<details>")
+        (details-close-tag "</details>")
+        (summary-open-tag "<summary>")
+        (summary-close-tag " </summary>"))
+    (if (use-region-p)
+        (let* ((b (region-beginning))
+               (e (region-end))
+               (indent (progn (goto-char b) (current-indentation))))
+          (goto-char e)
+          ;; if we're on a blank line, don't newline, otherwise the tags
+          ;; should go on its own line
+          (unless (looking-back "\n" nil)
+            (newline))
+          (indent-to indent)
+          (insert details-close-tag)
+          (markdown-ensure-blank-line-after)
+          (goto-char b)
+          ;; if we're on a blank line, insert the quotes here, otherwise
+          ;; add a new line first
+          (unless (looking-at-p "\n")
+            (newline)
+            (forward-line -1))
+          (markdown-ensure-blank-line-before)
+          (indent-to indent)
+          (insert details-open-tag "\n")
+          (insert summary-open-tag summary-close-tag)
+          (search-backward summary-close-tag))
+      (let ((indent (current-indentation)))
+        (delete-horizontal-space :backward-only)
+        (markdown-ensure-blank-line-before)
+        (indent-to indent)
+        (insert details-open-tag "\n")
+        (insert summary-open-tag summary-close-tag "\n")
+        (insert details-close-tag)
+        (indent-to indent)
+        (markdown-ensure-blank-line-after)
+        (search-backward summary-close-tag)))))
+
+
+;;; Footnotes =================================================================
+
+(defun markdown-footnote-counter-inc ()
+  "Increment `markdown-footnote-counter' and return the new value."
+  (when (= markdown-footnote-counter 0) ; hasn't been updated in this buffer yet.
+    (save-excursion
+      (goto-char (point-min))
+      (while (re-search-forward (concat "^\\[\\^\\(" markdown-footnote-chars "*?\\)\\]:")
+                                (point-max) t)
+        (let ((fn (string-to-number (match-string 1))))
+          (when (> fn markdown-footnote-counter)
+            (setq markdown-footnote-counter fn))))))
+  (cl-incf markdown-footnote-counter))
+
+(defun markdown-insert-footnote ()
+  "Insert footnote with a new number and move point to footnote definition."
+  (interactive)
+  (let ((fn (markdown-footnote-counter-inc)))
+    (insert (format "[^%d]" fn))
+    (push-mark (point) t)
+    (markdown-footnote-text-find-new-location)
+    (markdown-ensure-blank-line-before)
+    (unless (markdown-cur-line-blank-p)
+      (insert "\n"))
+    (insert (format "[^%d]: " fn))
+    (markdown-ensure-blank-line-after)))
+
+(defun markdown-footnote-text-find-new-location ()
+  "Position the point at the proper location for a new footnote text."
+  (cond
+   ((eq markdown-footnote-location 'end) (goto-char (point-max)))
+   ((eq markdown-footnote-location 'immediately) (markdown-end-of-text-block))
+   ((eq markdown-footnote-location 'subtree) (markdown-end-of-subtree))
+   ((eq markdown-footnote-location 'header) (markdown-end-of-defun))))
+
+(defun markdown-footnote-kill ()
+  "Kill the footnote at point.
+The footnote text is killed (and added to the kill ring), the
+footnote marker is deleted.  Point has to be either at the
+footnote marker or in the footnote text."
+  (interactive)
+  (let ((marker-pos nil)
+        (skip-deleting-marker nil)
+        (starting-footnote-text-positions
+         (markdown-footnote-text-positions)))
+    (when starting-footnote-text-positions
+      ;; We're starting in footnote text, so mark our return position and jump
+      ;; to the marker if possible.
+      (let ((marker-pos (markdown-footnote-find-marker
+                         (cl-first starting-footnote-text-positions))))
+        (if marker-pos
+            (goto-char (1- marker-pos))
+          ;; If there isn't a marker, we still want to kill the text.
+          (setq skip-deleting-marker t))))
+    ;; Either we didn't start in the text, or we started in the text and jumped
+    ;; to the marker. We want to assume we're at the marker now and error if
+    ;; we're not.
+    (unless skip-deleting-marker
+      (let ((marker (markdown-footnote-delete-marker)))
+        (unless marker
+          (error "Not at a footnote"))
+        ;; Even if we knew the text position before, it changed when we deleted
+        ;; the label.
+        (setq marker-pos (cl-second marker))
+        (let ((new-text-pos (markdown-footnote-find-text (cl-first marker))))
+          (unless new-text-pos
+            (error "No text for footnote `%s'" (cl-first marker)))
+          (goto-char new-text-pos))))
+    (let ((pos (markdown-footnote-kill-text)))
+      (goto-char (if starting-footnote-text-positions
+                     pos
+                   marker-pos)))))
+
+(defun markdown-footnote-delete-marker ()
+  "Delete a footnote marker at point.
+Returns a list (ID START) containing the footnote ID and the
+start position of the marker before deletion.  If no footnote
+marker was deleted, this function returns NIL."
+  (let ((marker (markdown-footnote-marker-positions)))
+    (when marker
+      (delete-region (cl-second marker) (cl-third marker))
+      (butlast marker))))
+
+(defun markdown-footnote-kill-text ()
+  "Kill footnote text at point.
+Returns the start position of the footnote text before deletion,
+or NIL if point was not inside a footnote text.
+
+The killed text is placed in the kill ring (without the footnote
+number)."
+  (let ((fn (markdown-footnote-text-positions)))
+    (when fn
+      (let ((text (delete-and-extract-region (cl-second fn) (cl-third fn))))
+        (string-match (concat "\\[\\" (cl-first fn) "\\]:[[:space:]]*\\(\\(.*\n?\\)*\\)") text)
+        (kill-new (match-string 1 text))
+        (when (and (markdown-cur-line-blank-p)
+                   (markdown-prev-line-blank-p)
+                   (not (bobp)))
+          (delete-region (1- (point)) (point)))
+        (cl-second fn)))))
+
+(defun markdown-footnote-goto-text ()
+  "Jump to the text of the footnote at point."
+  (interactive)
+  (let ((fn (car (markdown-footnote-marker-positions))))
+    (unless fn
+      (user-error "Not at a footnote marker"))
+    (let ((new-pos (markdown-footnote-find-text fn)))
+      (unless new-pos
+        (error "No definition found for footnote `%s'" fn))
+      (goto-char new-pos))))
+
+(defun markdown-footnote-return ()
+  "Return from a footnote to its footnote number in the main text."
+  (interactive)
+  (let ((fn (save-excursion
+              (car (markdown-footnote-text-positions)))))
+    (unless fn
+      (user-error "Not in a footnote"))
+    (let ((new-pos (markdown-footnote-find-marker fn)))
+      (unless new-pos
+        (error "Footnote marker `%s' not found" fn))
+      (goto-char new-pos))))
+
+(defun markdown-footnote-find-marker (id)
+  "Find the location of the footnote marker with ID.
+The actual buffer position returned is the position directly
+following the marker's closing bracket.  If no marker is found,
+NIL is returned."
+  (save-excursion
+    (goto-char (point-min))
+    (when (re-search-forward (concat "\\[" id "\\]\\([^:]\\|\\'\\)") nil t)
+      (skip-chars-backward "^]")
+      (point))))
+
+(defun markdown-footnote-find-text (id)
+  "Find the location of the text of footnote ID.
+The actual buffer position returned is the position of the first
+character of the text, after the footnote's identifier.  If no
+footnote text is found, NIL is returned."
+  (save-excursion
+    (goto-char (point-min))
+    (when (re-search-forward (concat "^ \\{0,3\\}\\[" id "\\]:") nil t)
+      (skip-chars-forward " \t")
+      (point))))
+
+(defun markdown-footnote-marker-positions ()
+  "Return the position and ID of the footnote marker point is on.
+The return value is a list (ID START END).  If point is not on a
+footnote, NIL is returned."
+  ;; first make sure we're at a footnote marker
+  (if (or (looking-back (concat "\\[\\^" markdown-footnote-chars "*\\]?") (line-beginning-position))
+          (looking-at-p (concat "\\[?\\^" markdown-footnote-chars "*?\\]")))
+      (save-excursion
+        ;; move point between [ and ^:
+        (if (looking-at-p "\\[")
+            (forward-char 1)
+          (skip-chars-backward "^["))
+        (looking-at (concat "\\(\\^" markdown-footnote-chars "*?\\)\\]"))
+        (list (match-string 1) (1- (match-beginning 1)) (1+ (match-end 1))))))
+
+(defun markdown-footnote-text-positions ()
+  "Return the start and end positions of the footnote text point is in.
+The exact return value is a list of three elements: (ID START END).
+The start position is the position of the opening bracket
+of the footnote id.  The end position is directly after the
+newline that ends the footnote.  If point is not in a footnote,
+NIL is returned instead."
+  (save-excursion
+    (let (result)
+      (move-beginning-of-line 1)
+      ;; Try to find the label. If we haven't found the label and we're at a blank
+      ;; or indented line, back up if possible.
+      (while (and
+              (not (and (looking-at markdown-regex-footnote-definition)
+                        (setq result (list (match-string 1) (point)))))
+              (and (not (bobp))
+                   (or (markdown-cur-line-blank-p)
+                       (>= (current-indentation) 4))))
+        (forward-line -1))
+      (when result
+        ;; Advance if there is a next line that is either blank or indented.
+        ;; (Need to check if we're on the last line, because
+        ;; markdown-next-line-blank-p returns true for last line in buffer.)
+        (while (and (/= (line-end-position) (point-max))
+                    (or (markdown-next-line-blank-p)
+                        (>= (markdown-next-line-indent) 4)))
+          (forward-line))
+        ;; Move back while the current line is blank.
+        (while (markdown-cur-line-blank-p)
+          (forward-line -1))
+        ;; Advance to capture this line and a single trailing newline (if there
+        ;; is one).
+        (forward-line)
+        (append result (list (point)))))))
+
+(defun markdown-get-defined-footnotes ()
+  "Return a list of all defined footnotes.
+Result is an alist of pairs (MARKER . LINE), where MARKER is the
+footnote marker, a string, and LINE is the line number containing
+the footnote definition.
+
+For example, suppose the following footnotes are defined at positions
+448 and 475:
+
+\[^1]: First footnote here.
+\[^marker]: Second footnote.
+
+Then the returned list is: ((\"^1\" . 478) (\"^marker\" . 475))"
+  (save-excursion
+    (goto-char (point-min))
+    (let (footnotes)
+      (while (markdown-search-until-condition
+              (lambda () (and (not (markdown-code-block-at-point-p))
+                              (not (markdown-inline-code-at-point-p))
+                              (not (markdown-in-comment-p))))
+              markdown-regex-footnote-definition nil t)
+        (let ((marker (match-string-no-properties 1))
+              (pos (match-beginning 0)))
+          (unless (zerop (length marker))
+            (cl-pushnew (cons marker pos) footnotes :test #'equal))))
+      (reverse footnotes))))
+
+
+;;; Element Removal ===========================================================
+
+(defun markdown-kill-thing-at-point ()
+  "Kill thing at point and add important text, without markup, to kill ring.
+Possible things to kill include (roughly in order of precedence):
+inline code, headers, horizontal rules, links (add link text to
+kill ring), images (add alt text to kill ring), angle uri, email
+addresses, bold, italics, reference definition (add URI to kill
+ring), footnote markers and text (kill both marker and text, add
+text to kill ring), and list items."
+  (interactive "*")
+  (let (val)
+    (cond
+     ;; Inline code
+     ((markdown-inline-code-at-point)
+      (kill-new (match-string 2))
+      (delete-region (match-beginning 0) (match-end 0)))
+     ;; ATX header
+     ((thing-at-point-looking-at markdown-regex-header-atx)
+      (kill-new (match-string 2))
+      (delete-region (match-beginning 0) (match-end 0)))
+     ;; Setext header
+     ((thing-at-point-looking-at markdown-regex-header-setext)
+      (kill-new (match-string 1))
+      (delete-region (match-beginning 0) (match-end 0)))
+     ;; Horizontal rule
+     ((thing-at-point-looking-at markdown-regex-hr)
+      (kill-new (match-string 0))
+      (delete-region (match-beginning 0) (match-end 0)))
+     ;; Inline link or image (add link or alt text to kill ring)
+     ((thing-at-point-looking-at markdown-regex-link-inline)
+      (kill-new (match-string 3))
+      (delete-region (match-beginning 0) (match-end 0)))
+     ;; Reference link or image (add link or alt text to kill ring)
+     ((thing-at-point-looking-at markdown-regex-link-reference)
+      (kill-new (match-string 3))
+      (delete-region (match-beginning 0) (match-end 0)))
+     ;; Angle URI (add URL to kill ring)
+     ((thing-at-point-looking-at markdown-regex-angle-uri)
+      (kill-new (match-string 2))
+      (delete-region (match-beginning 0) (match-end 0)))
+     ;; Email address in angle brackets (add email address to kill ring)
+     ((thing-at-point-looking-at markdown-regex-email)
+      (kill-new (match-string 1))
+      (delete-region (match-beginning 0) (match-end 0)))
+     ;; Wiki link (add alias text to kill ring)
+     ((and markdown-enable-wiki-links
+           (thing-at-point-looking-at markdown-regex-wiki-link))
+      (kill-new (markdown-wiki-link-alias))
+      (delete-region (match-beginning 1) (match-end 1)))
+     ;; Bold
+     ((thing-at-point-looking-at markdown-regex-bold)
+      (kill-new (match-string 4))
+      (delete-region (match-beginning 2) (match-end 2)))
+     ;; Italics
+     ((thing-at-point-looking-at markdown-regex-italic)
+      (kill-new (match-string 3))
+      (delete-region (match-beginning 1) (match-end 1)))
+     ;; Strikethrough
+     ((thing-at-point-looking-at markdown-regex-strike-through)
+      (kill-new (match-string 4))
+      (delete-region (match-beginning 2) (match-end 2)))
+     ;; Footnote marker (add footnote text to kill ring)
+     ((thing-at-point-looking-at markdown-regex-footnote)
+      (markdown-footnote-kill))
+     ;; Footnote text (add footnote text to kill ring)
+     ((setq val (markdown-footnote-text-positions))
+      (markdown-footnote-kill))
+     ;; Reference definition (add URL to kill ring)
+     ((thing-at-point-looking-at markdown-regex-reference-definition)
+      (kill-new (match-string 5))
+      (delete-region (match-beginning 0) (match-end 0)))
+     ;; List item
+     ((setq val (markdown-cur-list-item-bounds))
+      (kill-new (delete-and-extract-region (cl-first val) (cl-second val))))
+     (t
+      (user-error "Nothing found at point to kill")))))
+
+(defun markdown-kill-outline ()
+  "Kill visible heading and add it to `kill-ring'."
+  (interactive)
+  (save-excursion
+    (markdown-outline-previous)
+    (kill-region (point) (progn (markdown-outline-next) (point)))))
+
+(defun markdown-kill-block ()
+  "Kill visible code block, list item, or blockquote and add it to `kill-ring'."
+  (interactive)
+  (save-excursion
+    (markdown-backward-block)
+    (kill-region (point) (progn (markdown-forward-block) (point)))))
+
+
+;;; Indentation ===============================================================
+
+(defun markdown-indent-find-next-position (cur-pos positions)
+  "Return the position after the index of CUR-POS in POSITIONS.
+Positions are calculated by `markdown-calc-indents'."
+  (while (and positions
+              (not (equal cur-pos (car positions))))
+    (setq positions (cdr positions)))
+  (or (cadr positions) 0))
+
+(defun markdown-outdent-find-next-position (cur-pos positions)
+  "Return the maximal element that precedes CUR-POS from POSITIONS.
+Positions are calculated by `markdown-calc-indents'."
+  (let ((result 0))
+    (dolist (i positions)
+      (when (< i cur-pos)
+        (setq result (max result i))))
+    result))
+
+(defun markdown-indent-line ()
+  "Indent the current line using some heuristics.
+If the _previous_ command was either `markdown-enter-key' or
+`markdown-cycle', then we should cycle to the next
+reasonable indentation position.  Otherwise, we could have been
+called directly by `markdown-enter-key', by an initial call of
+`markdown-cycle', or indirectly by `auto-fill-mode'.  In
+these cases, indent to the default position.
+Positions are calculated by `markdown-calc-indents'."
+  (interactive)
+  (let ((positions (markdown-calc-indents))
+        (point-pos (current-column))
+        (_ (back-to-indentation))
+        (cur-pos (current-column)))
+    (if (not (equal this-command 'markdown-cycle))
+        (indent-line-to (car positions))
+      (setq positions (sort (delete-dups positions) '<))
+      (let* ((next-pos (markdown-indent-find-next-position cur-pos positions))
+             (new-point-pos (max (+ point-pos (- next-pos cur-pos)) 0)))
+        (indent-line-to next-pos)
+        (move-to-column new-point-pos)))))
+
+(defun markdown-calc-indents ()
+  "Return a list of indentation columns to cycle through.
+The first element in the returned list should be considered the
+default indentation level.  This function does not worry about
+duplicate positions, which are handled up by calling functions."
+  (let (pos prev-line-pos positions)
+
+    ;; Indentation of previous line
+    (setq prev-line-pos (markdown-prev-line-indent))
+    (setq positions (cons prev-line-pos positions))
+
+    ;; Indentation of previous non-list-marker text
+    (when (setq pos (save-excursion
+                      (forward-line -1)
+                      (when (looking-at markdown-regex-list)
+                        (- (match-end 3) (match-beginning 0)))))
+      (setq positions (cons pos positions)))
+
+    ;; Indentation required for a pre block in current context
+    (setq pos (length (markdown-pre-indentation (point))))
+    (setq positions (cons pos positions))
+
+    ;; Indentation of the previous line + tab-width
+    (if prev-line-pos
+        (setq positions (cons (+ prev-line-pos tab-width) positions))
+      (setq positions (cons tab-width positions)))
+
+    ;; Indentation of the previous line - tab-width
+    (if (and prev-line-pos (> prev-line-pos tab-width))
+        (setq positions (cons (- prev-line-pos tab-width) positions)))
+
+    ;; Indentation of all preceding list markers (when in a list)
+    (when (setq pos (markdown-calculate-list-levels))
+      (setq positions (append pos positions)))
+
+    ;; First column
+    (setq positions (cons 0 positions))
+
+    ;; Return reversed list
+    (reverse positions)))
+
+(defun markdown-enter-key ()        ;FIXME: Partly obsoleted by electric-indent
+  "Handle RET depending on the context.
+If the point is at a table, move to the next row.  Otherwise,
+indent according to value of `markdown-indent-on-enter'.
+When it is nil, simply call `newline'.  Otherwise, indent the next line
+following RET using `markdown-indent-line'.  Furthermore, when it
+is set to \\='indent-and-new-item and the point is in a list item,
+start a new item with the same indentation. If the point is in an
+empty list item, remove it (so that pressing RET twice when in a
+list simply adds a blank line)."
+  (interactive)
+  (cond
+   ;; Table
+   ((markdown-table-at-point-p)
+    (call-interactively #'markdown-table-next-row))
+   ;; Indent non-table text
+   (markdown-indent-on-enter
+    (let (bounds)
+      (if (and (memq markdown-indent-on-enter '(indent-and-new-item))
+               (not (markdown-code-block-at-point-p))
+               (setq bounds (markdown-cur-list-item-bounds)))
+          (let ((beg (cl-first bounds))
+                (end (cl-second bounds))
+                (nonlist-indent (cl-fourth bounds))
+                (checkbox (cl-sixth bounds)))
+            ;; Point is in a list item
+            (if (= (- end beg) (+ nonlist-indent (length checkbox)))
+                ;; Delete blank list
+                (progn
+                  (delete-region beg end)
+                  (newline)
+                  (markdown-indent-line))
+              (call-interactively #'markdown-insert-list-item)))
+        ;; Point is not in a list
+        (newline)
+        (markdown-indent-line))))
+   ;; Insert a raw newline
+   (t (newline))))
+
+(defun markdown-outdent-or-delete (arg)
+  "Handle BACKSPACE by cycling through indentation points.
+When BACKSPACE is pressed, if there is only whitespace
+before the current point, then outdent the line one level.
+Otherwise, do normal delete by repeating
+`backward-delete-char-untabify' ARG times."
+  (interactive "*p")
+  (if (use-region-p)
+      (backward-delete-char-untabify arg)
+    (let ((cur-pos (current-column))
+          (start-of-indention (save-excursion
+                                (back-to-indentation)
+                                (current-column)))
+          (positions (markdown-calc-indents)))
+      (if (and (> cur-pos 0) (= cur-pos start-of-indention))
+          (indent-line-to (markdown-outdent-find-next-position cur-pos positions))
+        (backward-delete-char-untabify arg)))))
+
+(defun markdown-find-leftmost-column (beg end)
+  "Find the leftmost column in the region from BEG to END."
+  (let ((mincol 1000))
+    (save-excursion
+      (goto-char beg)
+      (while (< (point) end)
+        (back-to-indentation)
+        (unless (looking-at-p "[ \t]*$")
+          (setq mincol (min mincol (current-column))))
+        (forward-line 1)))
+    mincol))
+
+(defun markdown-indent-region (beg end arg)
+  "Indent the region from BEG to END using some heuristics.
+When ARG is non-nil, outdent the region instead.
+See `markdown-indent-line' and `markdown-indent-line'."
+  (interactive "*r\nP")
+  (let* ((positions (sort (delete-dups (markdown-calc-indents)) '<))
+         (leftmostcol (markdown-find-leftmost-column beg end))
+         (next-pos (if arg
+                       (markdown-outdent-find-next-position leftmostcol positions)
+                     (markdown-indent-find-next-position leftmostcol positions))))
+    (indent-rigidly beg end (- next-pos leftmostcol))
+    (setq deactivate-mark nil)))
+
+(defun markdown-outdent-region (beg end)
+  "Call `markdown-indent-region' on region from BEG to END with prefix."
+  (interactive "*r")
+  (markdown-indent-region beg end t))
+
+(defun markdown--indent-region (start end)
+  (let ((deactivate-mark nil))
+    (save-excursion
+      (goto-char end)
+      (setq end (point-marker))
+      (goto-char start)
+      (when (bolp)
+        (forward-line 1))
+      (while (< (point) end)
+        (unless (or (markdown-code-block-at-point-p) (and (bolp) (eolp)))
+          (indent-according-to-mode))
+        (forward-line 1))
+      (move-marker end nil))))
+
+
+;;; Markup Completion =========================================================
+
+(defconst markdown-complete-alist
+  '((markdown-regex-header-atx . markdown-complete-atx)
+    (markdown-regex-header-setext . markdown-complete-setext)
+    (markdown-regex-hr . markdown-complete-hr))
+  "Association list of form (regexp . function) for markup completion.")
+
+(defun markdown-incomplete-atx-p ()
+  "Return t if ATX header markup is incomplete and nil otherwise.
+Assumes match data is available for `markdown-regex-header-atx'.
+Checks that the number of trailing hash marks equals the number of leading
+hash marks, that there is only a single space before and after the text,
+and that there is no extraneous whitespace in the text."
+  (or
+   ;; Number of starting and ending hash marks differs
+   (not (= (length (match-string 1)) (length (match-string 3))))
+   ;; When the header text is not empty...
+   (and (> (length (match-string 2)) 0)
+        ;; ...if there are extra leading, trailing, or interior spaces
+        (or (not (= (match-beginning 2) (1+ (match-end 1))))
+            (not (= (match-beginning 3) (1+ (match-end 2))))
+            (string-match-p "[ \t\n]\\{2\\}" (match-string 2))))
+   ;; When the header text is empty...
+   (and (= (length (match-string 2)) 0)
+        ;; ...if there are too many or too few spaces
+        (not (= (match-beginning 3) (+ (match-end 1) 2))))))
+
+(defun markdown-complete-atx ()
+  "Complete and normalize ATX headers.
+Add or remove hash marks to the end of the header to match the
+beginning.  Ensure that there is only a single space between hash
+marks and header text.  Removes extraneous whitespace from header text.
+Assumes match data is available for `markdown-regex-header-atx'.
+Return nil if markup was complete and non-nil if markup was completed."
+  (when (markdown-incomplete-atx-p)
+    (let* ((new-marker (make-marker))
+           (new-marker (set-marker new-marker (match-end 2))))
+      ;; Hash marks and spacing at end
+      (goto-char (match-end 2))
+      (delete-region (match-end 2) (match-end 3))
+      (insert " " (match-string 1))
+      ;; Remove extraneous whitespace from title
+      (replace-match (markdown-compress-whitespace-string (match-string 2))
+                     t t nil 2)
+      ;; Spacing at beginning
+      (goto-char (match-end 1))
+      (delete-region (match-end 1) (match-beginning 2))
+      (insert " ")
+      ;; Leave point at end of text
+      (goto-char new-marker))))
+
+(defun markdown-incomplete-setext-p ()
+  "Return t if setext header markup is incomplete and nil otherwise.
+Assumes match data is available for `markdown-regex-header-setext'.
+Checks that length of underline matches text and that there is no
+extraneous whitespace in the text."
+  (or (not (= (length (match-string 1)) (length (match-string 2))))
+      (string-match-p "[ \t\n]\\{2\\}" (match-string 1))))
+
+(defun markdown-complete-setext ()
+  "Complete and normalize setext headers.
+Add or remove underline characters to match length of header
+text.  Removes extraneous whitespace from header text.  Assumes
+match data is available for `markdown-regex-header-setext'.
+Return nil if markup was complete and non-nil if markup was completed."
+  (when (markdown-incomplete-setext-p)
+    (let* ((text (markdown-compress-whitespace-string (match-string 1)))
+           (char (char-after (match-beginning 2)))
+           (level (if (char-equal char ?-) 2 1)))
+      (goto-char (match-beginning 0))
+      (delete-region (match-beginning 0) (match-end 0))
+      (markdown-insert-header level text t)
+      t)))
+
+(defun markdown-incomplete-hr-p ()
+  "Return non-nil if hr is not in `markdown-hr-strings' and nil otherwise.
+Assumes match data is available for `markdown-regex-hr'."
+  (not (member (match-string 0) markdown-hr-strings)))
+
+(defun markdown-complete-hr ()
+  "Complete horizontal rules.
+If horizontal rule string is a member of `markdown-hr-strings',
+do nothing.  Otherwise, replace with the car of
+`markdown-hr-strings'.
+Assumes match data is available for `markdown-regex-hr'.
+Return nil if markup was complete and non-nil if markup was completed."
+  (when (markdown-incomplete-hr-p)
+    (replace-match (car markdown-hr-strings))
+    t))
+
+(defun markdown-complete ()
+  "Complete markup of object near point or in region when active.
+Handle all objects in `markdown-complete-alist', in order.
+See `markdown-complete-at-point' and `markdown-complete-region'."
+  (interactive "*")
+  (if (use-region-p)
+      (markdown-complete-region (region-beginning) (region-end))
+    (markdown-complete-at-point)))
+
+(defun markdown-complete-at-point ()
+  "Complete markup of object near point.
+Handle all elements of `markdown-complete-alist' in order."
+  (interactive "*")
+  (let ((list markdown-complete-alist) found changed)
+    (while list
+      (let ((regexp (eval (caar list) t)) ;FIXME: Why `eval'?
+            (function (cdar list)))
+        (setq list (cdr list))
+        (when (thing-at-point-looking-at regexp)
+          (setq found t)
+          (setq changed (funcall function))
+          (setq list nil))))
+    (if found
+        (or changed (user-error "Markup at point is complete"))
+      (user-error "Nothing to complete at point"))))
+
+(defun markdown-complete-region (beg end)
+  "Complete markup of objects in region from BEG to END.
+Handle all objects in `markdown-complete-alist', in order.  Each
+match is checked to ensure that a previous regexp does not also
+match."
+  (interactive "*r")
+  (let ((end-marker (set-marker (make-marker) end))
+        previous)
+    (dolist (element markdown-complete-alist)
+      (let ((regexp (eval (car element) t)) ;FIXME: Why `eval'?
+            (function (cdr element)))
+        (goto-char beg)
+        (while (re-search-forward regexp end-marker 'limit)
+          (when (match-string 0)
+            ;; Make sure this is not a match for any of the preceding regexps.
+            ;; This prevents mistaking an HR for a Setext subheading.
+            (let (match)
+              (save-match-data
+                (dolist (prev-regexp previous)
+                  (or match (setq match (looking-back prev-regexp nil)))))
+              (unless match
+                (save-excursion (funcall function))))))
+        (cl-pushnew regexp previous :test #'equal)))
+    previous))
+
+(defun markdown-complete-buffer ()
+  "Complete markup for all objects in the current buffer."
+  (interactive "*")
+  (markdown-complete-region (point-min) (point-max)))
+
+
+;;; Markup Cycling ============================================================
+
+(defun markdown-cycle-atx (arg &optional remove)
+  "Cycle ATX header markup.
+Promote header (decrease level) when ARG is 1 and demote
+header (increase level) if arg is -1.  When REMOVE is non-nil,
+remove the header when the level reaches zero and stop cycling
+when it reaches six.  Otherwise, perform a proper cycling through
+levels one through six.  Assumes match data is available for
+`markdown-regex-header-atx'."
+  (let* ((old-level (length (match-string 1)))
+         (new-level (+ old-level arg))
+         (text (match-string 2)))
+    (when (not remove)
+      (setq new-level (% new-level 6))
+      (setq new-level (cond ((= new-level 0) 6)
+                            ((< new-level 0) (+ new-level 6))
+                            (t new-level))))
+    (cond
+     ((= new-level 0)
+      (markdown-unwrap-thing-at-point nil 0 2))
+     ((<= new-level 6)
+      (goto-char (match-beginning 0))
+      (delete-region (match-beginning 0) (match-end 0))
+      (markdown-insert-header new-level text nil)))))
+
+(defun markdown-cycle-setext (arg &optional remove)
+  "Cycle setext header markup.
+Promote header (increase level) when ARG is 1 and demote
+header (decrease level or remove) if arg is -1.  When demoting a
+level-two setext header, replace with a level-three atx header.
+When REMOVE is non-nil, remove the header when the level reaches
+zero.  Otherwise, cycle back to a level six atx header.  Assumes
+match data is available for `markdown-regex-header-setext'."
+  (let* ((char (char-after (match-beginning 2)))
+         (old-level (if (char-equal char ?=) 1 2))
+         (new-level (+ old-level arg)))
+    (when (and (not remove) (= new-level 0))
+      (setq new-level 6))
+    (cond
+     ((= new-level 0)
+      (markdown-unwrap-thing-at-point nil 0 1))
+     ((<= new-level 2)
+      (markdown-insert-header new-level nil t))
+     ((<= new-level 6)
+      (markdown-insert-header new-level nil nil)))))
+
+(defun markdown-cycle-hr (arg &optional remove)
+  "Cycle string used for horizontal rule from `markdown-hr-strings'.
+When ARG is 1, cycle forward (demote), and when ARG is -1, cycle
+backwards (promote).  When REMOVE is non-nil, remove the hr instead
+of cycling when the end of the list is reached.
+Assumes match data is available for `markdown-regex-hr'."
+  (let* ((strings (if (= arg -1)
+                      (reverse markdown-hr-strings)
+                    markdown-hr-strings))
+         (tail (member (match-string 0) strings))
+         (new (or (cadr tail)
+                  (if remove
+                      (if (= arg 1)
+                          ""
+                        (car tail))
+                    (car strings)))))
+    (replace-match new)))
+
+(defun markdown-cycle-bold ()
+  "Cycle bold markup between underscores and asterisks.
+Assumes match data is available for `markdown-regex-bold'."
+  (save-excursion
+    (let* ((old-delim (match-string 3))
+           (new-delim (if (string-equal old-delim "**") "__" "**")))
+      (replace-match new-delim t t nil 3)
+      (replace-match new-delim t t nil 5))))
+
+(defun markdown-cycle-italic ()
+  "Cycle italic markup between underscores and asterisks.
+Assumes match data is available for `markdown-regex-italic'."
+  (save-excursion
+    (let* ((old-delim (match-string 2))
+           (new-delim (if (string-equal old-delim "*") "_" "*")))
+      (replace-match new-delim t t nil 2)
+      (replace-match new-delim t t nil 4))))
+
+
+;;; Keymap ====================================================================
+
+(defun markdown--style-map-prompt ()
+  "Return a formatted prompt for Markdown markup insertion."
+  (when markdown-enable-prefix-prompts
+    (concat
+     "Markdown: "
+     (propertize "bold" 'face 'markdown-bold-face) ", "
+     (propertize "italic" 'face 'markdown-italic-face) ", "
+     (propertize "code" 'face 'markdown-inline-code-face) ", "
+     (propertize "C = GFM code" 'face 'markdown-code-face) ", "
+     (propertize "pre" 'face 'markdown-pre-face) ", "
+     (propertize "footnote" 'face 'markdown-footnote-text-face) ", "
+     (propertize "F = foldable" 'face 'markdown-bold-face) ", "
+     (propertize "q = blockquote" 'face 'markdown-blockquote-face) ", "
+     (propertize "h & 1-6 = heading" 'face 'markdown-header-face) ", "
+     (propertize "- = hr" 'face 'markdown-hr-face) ", "
+     "C-h = more")))
+
+(defun markdown--command-map-prompt ()
+  "Return prompt for Markdown buffer-wide commands."
+  (when markdown-enable-prefix-prompts
+    (concat
+     "Command: "
+     (propertize "m" 'face 'markdown-bold-face) "arkdown, "
+     (propertize "p" 'face 'markdown-bold-face) "review, "
+     (propertize "o" 'face 'markdown-bold-face) "pen, "
+     (propertize "e" 'face 'markdown-bold-face) "xport, "
+     "export & pre" (propertize "v" 'face 'markdown-bold-face) "iew, "
+     (propertize "c" 'face 'markdown-bold-face) "heck refs, "
+     (propertize "u" 'face 'markdown-bold-face) "nused refs, "
+     "C-h = more")))
+
+(defvar markdown-mode-style-map
+  (let ((map (make-keymap (markdown--style-map-prompt))))
+    (define-key map (kbd "1") 'markdown-insert-header-atx-1)
+    (define-key map (kbd "2") 'markdown-insert-header-atx-2)
+    (define-key map (kbd "3") 'markdown-insert-header-atx-3)
+    (define-key map (kbd "4") 'markdown-insert-header-atx-4)
+    (define-key map (kbd "5") 'markdown-insert-header-atx-5)
+    (define-key map (kbd "6") 'markdown-insert-header-atx-6)
+    (define-key map (kbd "!") 'markdown-insert-header-setext-1)
+    (define-key map (kbd "@") 'markdown-insert-header-setext-2)
+    (define-key map (kbd "b") 'markdown-insert-bold)
+    (define-key map (kbd "c") 'markdown-insert-code)
+    (define-key map (kbd "C") 'markdown-insert-gfm-code-block)
+    (define-key map (kbd "f") 'markdown-insert-footnote)
+    (define-key map (kbd "F") 'markdown-insert-foldable-block)
+    (define-key map (kbd "h") 'markdown-insert-header-dwim)
+    (define-key map (kbd "H") 'markdown-insert-header-setext-dwim)
+    (define-key map (kbd "i") 'markdown-insert-italic)
+    (define-key map (kbd "k") 'markdown-insert-kbd)
+    (define-key map (kbd "l") 'markdown-insert-link)
+    (define-key map (kbd "p") 'markdown-insert-pre)
+    (define-key map (kbd "P") 'markdown-pre-region)
+    (define-key map (kbd "q") 'markdown-insert-blockquote)
+    (define-key map (kbd "s") 'markdown-insert-strike-through)
+    (define-key map (kbd "t") 'markdown-insert-table)
+    (define-key map (kbd "Q") 'markdown-blockquote-region)
+    (define-key map (kbd "w") 'markdown-insert-wiki-link)
+    (define-key map (kbd "-") 'markdown-insert-hr)
+    (define-key map (kbd "[") 'markdown-insert-gfm-checkbox)
+    ;; Deprecated keys that may be removed in a future version
+    (define-key map (kbd "e") 'markdown-insert-italic)
+    map)
+  "Keymap for Markdown text styling commands.")
+
+(defvar markdown-mode-command-map
+  (let ((map (make-keymap (markdown--command-map-prompt))))
+    (define-key map (kbd "m") 'markdown-other-window)
+    (define-key map (kbd "p") 'markdown-preview)
+    (define-key map (kbd "e") 'markdown-export)
+    (define-key map (kbd "v") 'markdown-export-and-preview)
+    (define-key map (kbd "o") 'markdown-open)
+    (define-key map (kbd "l") 'markdown-live-preview-mode)
+    (define-key map (kbd "w") 'markdown-kill-ring-save)
+    (define-key map (kbd "c") 'markdown-check-refs)
+    (define-key map (kbd "u") 'markdown-unused-refs)
+    (define-key map (kbd "n") 'markdown-cleanup-list-numbers)
+    (define-key map (kbd "]") 'markdown-complete-buffer)
+    (define-key map (kbd "^") 'markdown-table-sort-lines)
+    (define-key map (kbd "|") 'markdown-table-convert-region)
+    (define-key map (kbd "t") 'markdown-table-transpose)
+    map)
+  "Keymap for Markdown buffer-wide commands.")
+
+(defvar markdown-mode-map
+  (let ((map (make-keymap)))
+    ;; Markup insertion & removal
+    (define-key map (kbd "C-c C-s") markdown-mode-style-map)
+    (define-key map (kbd "C-c C-l") 'markdown-insert-link)
+    (define-key map (kbd "C-c C-k") 'markdown-kill-thing-at-point)
+    ;; Promotion, demotion, and cycling
+    (define-key map (kbd "C-c C--") 'markdown-promote)
+    (define-key map (kbd "C-c C-=") 'markdown-demote)
+    (define-key map (kbd "C-c C-]") 'markdown-complete)
+    ;; Following and doing things
+    (define-key map (kbd "C-c C-o") 'markdown-follow-thing-at-point)
+    (define-key map (kbd "C-c C-d") 'markdown-do)
+    (define-key map (kbd "C-c '") 'markdown-edit-code-block)
+    ;; Indentation
+    (define-key map (kbd "RET") 'markdown-enter-key)
+    (define-key map (kbd "DEL") 'markdown-outdent-or-delete)
+    (define-key map (kbd "C-c >") 'markdown-indent-region)
+    (define-key map (kbd "C-c <") 'markdown-outdent-region)
+    ;; Visibility cycling
+    (define-key map (kbd "TAB") 'markdown-cycle)
+    ;; S-iso-lefttab and S-tab should both be mapped to `backtab' by
+    ;; (local-)function-key-map.
+    ;;(define-key map (kbd "<S-iso-lefttab>") 'markdown-shifttab)
+    ;;(define-key map (kbd "<S-tab>")  'markdown-shifttab)
+    (define-key map (kbd "<backtab>") 'markdown-shifttab)
+    ;; Heading and list navigation
+    (define-key map (kbd "C-c C-n") 'markdown-outline-next)
+    (define-key map (kbd "C-c C-p") 'markdown-outline-previous)
+    (define-key map (kbd "C-c C-f") 'markdown-outline-next-same-level)
+    (define-key map (kbd "C-c C-b") 'markdown-outline-previous-same-level)
+    (define-key map (kbd "C-c C-u") 'markdown-outline-up)
+    ;; Buffer-wide commands
+    (define-key map (kbd "C-c C-c") markdown-mode-command-map)
+    ;; Subtree, list, and table editing
+    (define-key map (kbd "C-c <up>") 'markdown-move-up)
+    (define-key map (kbd "C-c <down>") 'markdown-move-down)
+    (define-key map (kbd "C-c <left>") 'markdown-promote)
+    (define-key map (kbd "C-c <right>") 'markdown-demote)
+    (define-key map (kbd "C-c S-<up>") 'markdown-table-delete-row)
+    (define-key map (kbd "C-c S-<down>") 'markdown-table-insert-row)
+    (define-key map (kbd "C-c S-<left>") 'markdown-table-delete-column)
+    (define-key map (kbd "C-c S-<right>") 'markdown-table-insert-column)
+    (define-key map (kbd "C-c C-M-h") 'markdown-mark-subtree)
+    (define-key map (kbd "C-x n s") 'markdown-narrow-to-subtree)
+    (define-key map (kbd "M-RET") 'markdown-insert-list-item)
+    (define-key map (kbd "C-c C-j") 'markdown-insert-list-item)
+    ;; Lines
+    (define-key map [remap move-beginning-of-line] 'markdown-beginning-of-line)
+    (define-key map [remap move-end-of-line] 'markdown-end-of-line)
+    ;; Paragraphs (Markdown context aware)
+    (define-key map [remap backward-paragraph] 'markdown-backward-paragraph)
+    (define-key map [remap forward-paragraph] 'markdown-forward-paragraph)
+    (define-key map [remap mark-paragraph] 'markdown-mark-paragraph)
+    ;; Blocks (one or more paragraphs)
+    (define-key map (kbd "C-M-{") 'markdown-backward-block)
+    (define-key map (kbd "C-M-}") 'markdown-forward-block)
+    (define-key map (kbd "C-c M-h") 'markdown-mark-block)
+    (define-key map (kbd "C-x n b") 'markdown-narrow-to-block)
+    ;; Pages (top-level sections)
+    (define-key map [remap backward-page] 'markdown-backward-page)
+    (define-key map [remap forward-page] 'markdown-forward-page)
+    (define-key map [remap mark-page] 'markdown-mark-page)
+    (define-key map [remap narrow-to-page] 'markdown-narrow-to-page)
+    ;; Link Movement
+    (define-key map (kbd "M-n") 'markdown-next-link)
+    (define-key map (kbd "M-p") 'markdown-previous-link)
+    ;; Toggling functionality
+    (define-key map (kbd "C-c C-x C-e") 'markdown-toggle-math)
+    (define-key map (kbd "C-c C-x C-f") 'markdown-toggle-fontify-code-blocks-natively)
+    (define-key map (kbd "C-c C-x C-i") 'markdown-toggle-inline-images)
+    (define-key map (kbd "C-c C-x C-l") 'markdown-toggle-url-hiding)
+    (define-key map (kbd "C-c C-x C-m") 'markdown-toggle-markup-hiding)
+    ;; Alternative keys (in case of problems with the arrow keys)
+    (define-key map (kbd "C-c C-x u") 'markdown-move-up)
+    (define-key map (kbd "C-c C-x d") 'markdown-move-down)
+    (define-key map (kbd "C-c C-x l") 'markdown-promote)
+    (define-key map (kbd "C-c C-x r") 'markdown-demote)
+    ;; Deprecated keys that may be removed in a future version
+    (define-key map (kbd "C-c C-a L") 'markdown-insert-link) ;; C-c C-l
+    (define-key map (kbd "C-c C-a l") 'markdown-insert-link) ;; C-c C-l
+    (define-key map (kbd "C-c C-a r") 'markdown-insert-link) ;; C-c C-l
+    (define-key map (kbd "C-c C-a u") 'markdown-insert-uri) ;; C-c C-l
+    (define-key map (kbd "C-c C-a f") 'markdown-insert-footnote)
+    (define-key map (kbd "C-c C-a w") 'markdown-insert-wiki-link)
+    (define-key map (kbd "C-c C-t 1") 'markdown-insert-header-atx-1)
+    (define-key map (kbd "C-c C-t 2") 'markdown-insert-header-atx-2)
+    (define-key map (kbd "C-c C-t 3") 'markdown-insert-header-atx-3)
+    (define-key map (kbd "C-c C-t 4") 'markdown-insert-header-atx-4)
+    (define-key map (kbd "C-c C-t 5") 'markdown-insert-header-atx-5)
+    (define-key map (kbd "C-c C-t 6") 'markdown-insert-header-atx-6)
+    (define-key map (kbd "C-c C-t !") 'markdown-insert-header-setext-1)
+    (define-key map (kbd "C-c C-t @") 'markdown-insert-header-setext-2)
+    (define-key map (kbd "C-c C-t h") 'markdown-insert-header-dwim)
+    (define-key map (kbd "C-c C-t H") 'markdown-insert-header-setext-dwim)
+    (define-key map (kbd "C-c C-t s") 'markdown-insert-header-setext-2)
+    (define-key map (kbd "C-c C-t t") 'markdown-insert-header-setext-1)
+    (define-key map (kbd "C-c C-i") 'markdown-insert-image)
+    (define-key map (kbd "C-c C-x m") 'markdown-insert-list-item) ;; C-c C-j
+    (define-key map (kbd "C-c C-x C-x") 'markdown-toggle-gfm-checkbox) ;; C-c C-d
+    (define-key map (kbd "C-c -") 'markdown-insert-hr)
+    map)
+  "Keymap for Markdown major mode.")
+
+(defvar markdown-mode-mouse-map
+  (when markdown-mouse-follow-link
+    (let ((map (make-sparse-keymap)))
+      (define-key map [follow-link] 'mouse-face)
+      (define-key map [mouse-2] #'markdown-follow-thing-at-point)
+      map))
+  "Keymap for following links with mouse.")
+
+(defvar gfm-mode-map
+  (let ((map (make-sparse-keymap)))
+    (set-keymap-parent map markdown-mode-map)
+    (define-key map (kbd "C-c C-s d") 'markdown-insert-strike-through)
+    (define-key map "`" 'markdown-electric-backquote)
+    map)
+  "Keymap for `gfm-mode'.
+See also `markdown-mode-map'.")
+
+
+;;; Text Properties ===========================================================
+
+(defconst markdown--markup-props (list 'invisible 'markdown-markup
+                                       'rear-nonsticky t
+                                       'font-lock-multiline t))
+
+(defconst markdown--title-props (list 'invisible 'markdown-markup
+                                      'font-lock-multiline t))
+
+(defun markdown--url-props ()
+  (if markdown-mouse-follow-link
+      (list 'invisible 'markdown-markup
+            'keymap markdown-mode-mouse-map
+            'mouse-face 'markdown-highlight-face
+            'font-lock-multiline t)
+    (list 'invisible 'markdown-markup
+          'keymap markdown-mode-mouse-map
+          'font-lock-multiline t)))
+
+(defun markdown--link-props (url &optional title)
+  "Return a property list for URL with optional TITLE."
+  (let ((echo-text (if title (concat title "\n" url) url)))
+    (if markdown-mouse-follow-link
+        (list 'keymap markdown-mode-mouse-map
+              'mouse-face 'markdown-highlight-face
+              'font-lock-multiline t
+              'help-echo echo-text)
+      (list 'keymap markdown-mode-mouse-map
+            'font-lock-multiline t
+            'help-echo echo-text))))
+
+
+;;; Menu ======================================================================
+
+(easy-menu-define markdown-mode-menu markdown-mode-map
+  "Menu for Markdown mode."
+  '("Markdown"
+    "---"
+    ("Movement"
+     ["Jump" markdown-do]
+     ["Follow Link" markdown-follow-thing-at-point]
+     ["Next Link" markdown-next-link]
+     ["Previous Link" markdown-previous-link]
+     "---"
+     ["Next Heading or List Item" markdown-outline-next]
+     ["Previous Heading or List Item" markdown-outline-previous]
+     ["Next at Same Level" markdown-outline-next-same-level]
+     ["Previous at Same Level" markdown-outline-previous-same-level]
+     ["Up to Parent" markdown-outline-up]
+     "---"
+     ["Forward Paragraph" markdown-forward-paragraph]
+     ["Backward Paragraph" markdown-backward-paragraph]
+     ["Forward Block" markdown-forward-block]
+     ["Backward Block" markdown-backward-block])
+    ("Show & Hide"
+     ["Cycle Heading Visibility" markdown-cycle
+      :enable (markdown-on-heading-p)]
+     ["Cycle Heading Visibility (Global)" markdown-shifttab]
+     "---"
+     ["Narrow to Region" narrow-to-region]
+     ["Narrow to Block" markdown-narrow-to-block]
+     ["Narrow to Section" narrow-to-defun]
+     ["Narrow to Subtree" markdown-narrow-to-subtree]
+     ["Widen" widen (buffer-narrowed-p)]
+     "---"
+     ["Toggle Markup Hiding" markdown-toggle-markup-hiding
+      :keys "C-c C-x C-m"
+      :style radio
+      :selected markdown-hide-markup])
+    "---"
+    ("Headings & Structure"
+     ["Automatic Heading" markdown-insert-header-dwim
+      :keys "C-c C-s h"]
+     ["Automatic Heading (Setext)" markdown-insert-header-setext-dwim
+      :keys "C-c C-s H"]
+     ("Specific Heading (atx)"
+      ["First Level atx" markdown-insert-header-atx-1
+       :keys "C-c C-s 1"]
+      ["Second Level atx" markdown-insert-header-atx-2
+       :keys "C-c C-s 2"]
+      ["Third Level atx" markdown-insert-header-atx-3
+       :keys "C-c C-s 3"]
+      ["Fourth Level atx" markdown-insert-header-atx-4
+       :keys "C-c C-s 4"]
+      ["Fifth Level atx" markdown-insert-header-atx-5
+       :keys "C-c C-s 5"]
+      ["Sixth Level atx" markdown-insert-header-atx-6
+       :keys "C-c C-s 6"])
+     ("Specific Heading (Setext)"
+      ["First Level Setext" markdown-insert-header-setext-1
+       :keys "C-c C-s !"]
+      ["Second Level Setext" markdown-insert-header-setext-2
+       :keys "C-c C-s @"])
+     ["Horizontal Rule" markdown-insert-hr
+      :keys "C-c C-s -"]
+     "---"
+     ["Move Subtree Up" markdown-move-up
+      :keys "C-c <up>"]
+     ["Move Subtree Down" markdown-move-down
+      :keys "C-c <down>"]
+     ["Promote Subtree" markdown-promote
+      :keys "C-c <left>"]
+     ["Demote Subtree" markdown-demote
+      :keys "C-c <right>"])
+    ("Region & Mark"
+     ["Indent Region" markdown-indent-region]
+     ["Outdent Region" markdown-outdent-region]
+     "--"
+     ["Mark Paragraph" mark-paragraph]
+     ["Mark Block" markdown-mark-block]
+     ["Mark Section" mark-defun]
+     ["Mark Subtree" markdown-mark-subtree])
+    ("Tables"
+     ["Move Row Up" markdown-move-up
+      :enable (markdown-table-at-point-p)
+      :keys "C-c <up>"]
+     ["Move Row Down" markdown-move-down
+      :enable (markdown-table-at-point-p)
+      :keys "C-c <down>"]
+     ["Move Column Left" markdown-promote
+      :enable (markdown-table-at-point-p)
+      :keys "C-c <left>"]
+     ["Move Column Right" markdown-demote
+      :enable (markdown-table-at-point-p)
+      :keys "C-c <right>"]
+     ["Delete Row" markdown-table-delete-row
+      :enable (markdown-table-at-point-p)]
+     ["Insert Row" markdown-table-insert-row
+      :enable (markdown-table-at-point-p)]
+     ["Delete Column" markdown-table-delete-column
+      :enable (markdown-table-at-point-p)]
+     ["Insert Column" markdown-table-insert-column
+      :enable (markdown-table-at-point-p)]
+     ["Insert Table" markdown-insert-table]
+     "--"
+     ["Convert Region to Table" markdown-table-convert-region]
+     ["Sort Table Lines" markdown-table-sort-lines
+      :enable (markdown-table-at-point-p)]
+     ["Transpose Table" markdown-table-transpose
+      :enable (markdown-table-at-point-p)])
+    ("Lists"
+     ["Insert List Item" markdown-insert-list-item]
+     ["Move Subtree Up" markdown-move-up
+      :keys "C-c <up>"]
+     ["Move Subtree Down" markdown-move-down
+      :keys "C-c <down>"]
+     ["Indent Subtree" markdown-demote
+      :keys "C-c <right>"]
+     ["Outdent Subtree" markdown-promote
+      :keys "C-c <left>"]
+     ["Renumber List" markdown-cleanup-list-numbers]
+     ["Insert Task List Item" markdown-insert-gfm-checkbox
+      :keys "C-c C-x ["]
+     ["Toggle Task List Item" markdown-toggle-gfm-checkbox
+      :enable (markdown-gfm-task-list-item-at-point)
+      :keys "C-c C-d"])
+    ("Links & Images"
+     ["Insert Link" markdown-insert-link]
+     ["Insert Image" markdown-insert-image]
+     ["Insert Footnote" markdown-insert-footnote
+      :keys "C-c C-s f"]
+     ["Insert Wiki Link" markdown-insert-wiki-link
+      :keys "C-c C-s w"]
+     "---"
+     ["Check References" markdown-check-refs]
+     ["Find Unused References" markdown-unused-refs]
+     ["Toggle URL Hiding" markdown-toggle-url-hiding
+      :style radio
+      :selected markdown-hide-urls]
+     ["Toggle Inline Images" markdown-toggle-inline-images
+      :keys "C-c C-x C-i"
+      :style radio
+      :selected markdown-inline-image-overlays]
+     ["Toggle Wiki Links" markdown-toggle-wiki-links
+      :style radio
+      :selected markdown-enable-wiki-links])
+    ("Styles"
+     ["Bold" markdown-insert-bold]
+     ["Italic" markdown-insert-italic]
+     ["Code" markdown-insert-code]
+     ["Strikethrough" markdown-insert-strike-through]
+     ["Keyboard" markdown-insert-kbd]
+     "---"
+     ["Blockquote" markdown-insert-blockquote]
+     ["Preformatted" markdown-insert-pre]
+     ["GFM Code Block" markdown-insert-gfm-code-block]
+     ["Edit Code Block" markdown-edit-code-block
+      :enable (markdown-code-block-at-point-p)]
+     ["Foldable Block" markdown-insert-foldable-block]
+     "---"
+     ["Blockquote Region" markdown-blockquote-region]
+     ["Preformatted Region" markdown-pre-region]
+     "---"
+     ["Fontify Code Blocks Natively"
+      markdown-toggle-fontify-code-blocks-natively
+      :style radio
+      :selected markdown-fontify-code-blocks-natively]
+     ["LaTeX Math Support" markdown-toggle-math
+      :style radio
+      :selected markdown-enable-math])
+    "---"
+    ("Preview & Export"
+     ["Compile" markdown-other-window]
+     ["Preview" markdown-preview]
+     ["Export" markdown-export]
+     ["Export & View" markdown-export-and-preview]
+     ["Open" markdown-open]
+     ["Live Export" markdown-live-preview-mode
+      :style radio
+      :selected markdown-live-preview-mode]
+     ["Kill ring save" markdown-kill-ring-save])
+    ("Markup Completion and Cycling"
+     ["Complete Markup" markdown-complete]
+     ["Promote Element" markdown-promote
+      :keys "C-c C--"]
+     ["Demote Element" markdown-demote
+      :keys "C-c C-="])
+    "---"
+    ["Kill Element" markdown-kill-thing-at-point]
+    "---"
+    ("Documentation"
+     ["Version" markdown-show-version]
+     ["Homepage" markdown-mode-info]
+     ["Describe Mode" (describe-function 'markdown-mode)]
+     ["Guide" (browse-url "https://leanpub.com/markdown-mode")])))
+
+
+;;; imenu =====================================================================
+
+(defun markdown-imenu-create-nested-index ()
+  "Create and return a nested imenu index alist for the current buffer.
+See `imenu-create-index-function' and `imenu--index-alist' for details."
+  (let* ((root (list nil))
+         (min-level 9999)
+         hashes headers)
+    (save-excursion
+      ;; Headings
+      (goto-char (point-min))
+      (while (re-search-forward markdown-regex-header (point-max) t)
+        (unless (or (markdown-code-block-at-point-p)
+                    (and (match-beginning 3)
+                         (get-text-property (match-beginning 3) 'markdown-yaml-metadata-end)))
+          (cond
+           ((match-string-no-properties 2) ;; level 1 setext
+            (setq min-level 1)
+            (push (list :heading (match-string-no-properties 1)
+                        :point (match-beginning 1)
+                        :level 1) headers))
+           ((match-string-no-properties 3) ;; level 2 setext
+            (setq min-level (min min-level 2))
+            (push (list :heading (match-string-no-properties 1)
+                        :point (match-beginning 1)
+                        :level (- 2 (1- min-level))) headers))
+           ((setq hashes (markdown-trim-whitespace
+                          (match-string-no-properties 4)))
+            (setq min-level (min min-level (length hashes)))
+            (push (list :heading (match-string-no-properties 5)
+                        :point (match-beginning 4)
+                        :level (- (length hashes) (1- min-level))) headers)))))
+      (cl-loop with cur-level = 0
+               with cur-alist = nil
+               with empty-heading = "-"
+               with self-heading = "."
+               for header in (reverse headers)
+               for level = (plist-get header :level)
+               do
+               (let ((alist (list (cons (plist-get header :heading) (plist-get header :point)))))
+                 (cond
+                  ((= cur-level level)  ; new sibling
+                   (setcdr cur-alist alist)
+                   (setq cur-alist alist))
+                  ((< cur-level level)  ; first child
+                   (dotimes (_ (- level cur-level 1))
+                     (setq alist (list (cons empty-heading alist))))
+                   (if cur-alist
+                       (let* ((parent (car cur-alist))
+                              (self-pos (cdr parent)))
+                         (setcdr parent (cons (cons self-heading self-pos) alist)))
+                     (setcdr root alist)) ; primogenitor
+                   (setq cur-alist alist)
+                   (setq cur-level level))
+                  (t                    ; new sibling of an ancestor
+                   (let ((sibling-alist (last (cdr root))))
+                     (dotimes (_ (1- level))
+                       (setq sibling-alist (last (cdar sibling-alist))))
+                     (setcdr sibling-alist alist)
+                     (setq cur-alist alist))
+                   (setq cur-level level)))))
+      (setq root (copy-tree root))
+      ;; Footnotes
+      (let ((fn (markdown-get-defined-footnotes)))
+        (if (or (zerop (length fn))
+                (null markdown-add-footnotes-to-imenu))
+            (cdr root)
+          (nconc (cdr root) (list (cons "Footnotes" fn))))))))
+
+(defun markdown-imenu-create-flat-index ()
+  "Create and return a flat imenu index alist for the current buffer.
+See `imenu-create-index-function' and `imenu--index-alist' for details."
+  (let* ((empty-heading "-") index heading pos)
+    (save-excursion
+      ;; Headings
+      (goto-char (point-min))
+      (while (re-search-forward markdown-regex-header (point-max) t)
+        (when (and (not (markdown-code-block-at-point-p (line-beginning-position)))
+                   (not (markdown-text-property-at-point 'markdown-yaml-metadata-begin)))
+          (cond
+           ((setq heading (match-string-no-properties 1))
+            (setq pos (match-beginning 1)))
+           ((setq heading (match-string-no-properties 5))
+            (setq pos (match-beginning 4))))
+          (or (> (length heading) 0)
+              (setq heading empty-heading))
+          (setq index (append index (list (cons heading pos))))))
+      ;; Footnotes
+      (when markdown-add-footnotes-to-imenu
+        (nconc index (markdown-get-defined-footnotes)))
+      index)))
+
+
+;;; References ================================================================
+
+(defun markdown-reference-goto-definition ()
+  "Jump to the definition of the reference at point or create it."
+  (interactive)
+  (when (thing-at-point-looking-at markdown-regex-link-reference)
+    (let* ((text (match-string-no-properties 3))
+           (reference (match-string-no-properties 6))
+           (target (downcase (if (string= reference "") text reference)))
+           (loc (cadr (save-match-data (markdown-reference-definition target)))))
+      (if loc
+          (goto-char loc)
+        (goto-char (match-beginning 0))
+        (markdown-insert-reference-definition target)))))
+
+(defun markdown-reference-find-links (reference)
+  "Return a list of all links for REFERENCE.
+REFERENCE should not include the surrounding square brackets.
+Elements of the list have the form (text start line), where
+text is the link text, start is the location at the beginning of
+the link, and line is the line number on which the link appears."
+  (let* ((ref-quote (regexp-quote reference))
+         (regexp (format "!?\\(?:\\[\\(%s\\)\\][ ]?\\[\\]\\|\\[\\([^]]+?\\)\\][ ]?\\[%s\\]\\)"
+                         ref-quote ref-quote))
+         links)
+    (save-excursion
+      (goto-char (point-min))
+      (while (re-search-forward regexp nil t)
+        (let* ((text (or (match-string-no-properties 1)
+                         (match-string-no-properties 2)))
+               (start (match-beginning 0))
+               (line (markdown-line-number-at-pos)))
+          (cl-pushnew (list text start line) links :test #'equal))))
+    links))
+
+(defmacro markdown-for-all-refs (f)
+  `(let ((result))
+     (save-excursion
+       (goto-char (point-min))
+       (while
+           (re-search-forward markdown-regex-link-reference nil t)
+         (let* ((text (match-string-no-properties 3))
+                (reference (match-string-no-properties 6))
+                (target (downcase (if (string= reference "") text reference))))
+           (,f text target result))))
+     (reverse result)))
+
+(defmacro markdown-collect-always (_ target result)
+  `(cl-pushnew ,target ,result :test #'equal))
+
+(defmacro markdown-collect-undefined (text target result)
+  `(unless (markdown-reference-definition target)
+     (let ((entry (assoc ,target ,result)))
+       (if (not entry)
+           (cl-pushnew
+            (cons ,target (list (cons ,text (markdown-line-number-at-pos))))
+            ,result :test #'equal)
+         (setcdr entry
+                 (append (cdr entry) (list (cons ,text (markdown-line-number-at-pos)))))))))
+
+(defun markdown-get-all-refs ()
+  "Return a list of all Markdown references."
+  (markdown-for-all-refs markdown-collect-always))
+
+(defun markdown-get-undefined-refs ()
+  "Return a list of undefined Markdown references.
+Result is an alist of pairs (reference . occurrences), where
+occurrences is itself another alist of pairs (label . line-number).
+For example, an alist corresponding to [Nice editor][Emacs] at line 12,
+\[GNU Emacs][Emacs] at line 45 and [manual][elisp] at line 127 is
+\((\"emacs\" (\"Nice editor\" . 12) (\"GNU Emacs\" . 45)) (\"elisp\" (\"manual\" . 127)))."
+  (markdown-for-all-refs markdown-collect-undefined))
+
+(defun markdown-get-unused-refs ()
+  (cl-sort
+   (cl-set-difference
+    (markdown-get-defined-references) (markdown-get-all-refs)
+    :test (lambda (e1 e2) (equal (car e1) e2)))
+   #'< :key #'cdr))
+
+(defmacro defun-markdown-buffer (name docstring)
+  "Define a function to name and return a buffer.
+
+By convention, NAME must be a name of a string constant with
+%buffer% placeholder used to name the buffer, and will also be
+used as a name of the function defined.
+
+DOCSTRING will be used as the first part of the docstring."
+  `(defun ,name (&optional buffer-name)
+     ,(concat docstring "\n\nBUFFER-NAME is the name of the main buffer being visited.")
+     (or buffer-name (setq buffer-name (buffer-name)))
+     (let ((refbuf (get-buffer-create (replace-regexp-in-string
+                                       "%buffer%" buffer-name
+                                       ,name))))
+       (with-current-buffer refbuf
+         (when view-mode
+           (View-exit-and-edit))
+         (use-local-map button-buffer-map)
+         (erase-buffer))
+       refbuf)))
+
+(defconst markdown-reference-check-buffer
+  "*Undefined references for %buffer%*"
+  "Pattern for name of buffer for listing undefined references.
+The string %buffer% will be replaced by the corresponding
+`markdown-mode' buffer name.")
+
+(defun-markdown-buffer
+  markdown-reference-check-buffer
+  "Name and return buffer for reference checking.")
+
+(defconst markdown-unused-references-buffer
+  "*Unused references for %buffer%*"
+  "Pattern for name of buffer for listing unused references.
+The string %buffer% will be replaced by the corresponding
+`markdown-mode' buffer name.")
+
+(defun-markdown-buffer
+  markdown-unused-references-buffer
+  "Name and return buffer for unused reference checking.")
+
+(defconst markdown-reference-links-buffer
+  "*Reference links for %buffer%*"
+  "Pattern for name of buffer for listing references.
+The string %buffer% will be replaced by the corresponding buffer name.")
+
+(defun-markdown-buffer
+  markdown-reference-links-buffer
+  "Name, setup, and return a buffer for listing links.")
+
+;; Add an empty Markdown reference definition to buffer
+;; specified in the 'target-buffer property.  The reference name is
+;; the button's label.
+(define-button-type 'markdown-undefined-reference-button
+  'help-echo "mouse-1, RET: create definition for undefined reference"
+  'follow-link t
+  'face 'bold
+  'action (lambda (b)
+            (let ((buffer (button-get b 'target-buffer))
+                  (line (button-get b 'target-line))
+                  (label (button-label b)))
+              (switch-to-buffer-other-window buffer)
+              (goto-char (point-min))
+              (forward-line line)
+              (markdown-insert-reference-definition label)
+              (markdown-check-refs t))))
+
+;; Jump to line in buffer specified by 'target-buffer property.
+;; Line number is button's 'target-line property.
+(define-button-type 'markdown-goto-line-button
+  'help-echo "mouse-1, RET: go to line"
+  'follow-link t
+  'face 'italic
+  'action (lambda (b)
+            (switch-to-buffer-other-window (button-get b 'target-buffer))
+            ;; use call-interactively to silence compiler
+            (let ((current-prefix-arg (button-get b 'target-line)))
+              (call-interactively 'goto-line))))
+
+;; Kill a line in buffer specified by 'target-buffer property.
+;; Line number is button's 'target-line property.
+(define-button-type 'markdown-kill-line-button
+  'help-echo "mouse-1, RET: kill line"
+  'follow-link t
+  'face 'italic
+  'action (lambda (b)
+            (switch-to-buffer-other-window (button-get b 'target-buffer))
+            ;; use call-interactively to silence compiler
+            (let ((current-prefix-arg (button-get b 'target-line)))
+              (call-interactively 'goto-line))
+            (kill-line 1)
+            (markdown-unused-refs t)))
+
+;; Jumps to a particular link at location given by 'target-char
+;; property in buffer given by 'target-buffer property.
+(define-button-type 'markdown-location-button
+  'help-echo "mouse-1, RET: jump to location of link"
+  'follow-link t
+  'face 'bold
+  'action (lambda (b)
+            (let ((target (button-get b 'target-buffer))
+                  (loc (button-get b 'target-char)))
+              (kill-buffer-and-window)
+              (switch-to-buffer target)
+              (goto-char loc))))
+
+(defun markdown-insert-undefined-reference-button (reference oldbuf)
+  "Insert a button for creating REFERENCE in buffer OLDBUF.
+REFERENCE should be a list of the form (reference . occurrences),
+as returned by `markdown-get-undefined-refs'."
+  (let ((label (car reference)))
+    ;; Create a reference button
+    (insert-button label
+                   :type 'markdown-undefined-reference-button
+                   'target-buffer oldbuf
+                   'target-line (cdr (car (cdr reference))))
+    (insert " (")
+    (dolist (occurrence (cdr reference))
+      (let ((line (cdr occurrence)))
+        ;; Create a line number button
+        (insert-button (number-to-string line)
+                       :type 'markdown-goto-line-button
+                       'target-buffer oldbuf
+                       'target-line line)
+        (insert " ")))
+    (delete-char -1)
+    (insert ")")
+    (newline)))
+
+(defun markdown-insert-unused-reference-button (reference oldbuf)
+  "Insert a button for creating REFERENCE in buffer OLDBUF.
+REFERENCE must be a pair of (ref . line-number)."
+  (let ((label (car reference))
+        (line (cdr reference)))
+    ;; Create a reference button
+    (insert-button label
+                   :type 'markdown-goto-line-button
+                   'face 'bold
+                   'target-buffer oldbuf
+                   'target-line line)
+    (insert (format " (%d) [" line))
+    (insert-button "X"
+                   :type 'markdown-kill-line-button
+                   'face 'bold
+                   'target-buffer oldbuf
+                   'target-line line)
+    (insert "]")
+    (newline)))
+
+(defun markdown-insert-link-button (link oldbuf)
+  "Insert a button for jumping to LINK in buffer OLDBUF.
+LINK should be a list of the form (text char line) containing
+the link text, location, and line number."
+  (let ((label (cl-first link))
+        (char (cl-second link))
+        (line (cl-third link)))
+    ;; Create a reference button
+    (insert-button label
+                   :type 'markdown-location-button
+                   'target-buffer oldbuf
+                   'target-char char)
+    (insert (format " (line %d)\n" line))))
+
+(defun markdown-reference-goto-link (&optional reference)
+  "Jump to the location of the first use of REFERENCE."
+  (interactive)
+  (unless reference
+    (if (thing-at-point-looking-at markdown-regex-reference-definition)
+        (setq reference (match-string-no-properties 2))
+      (user-error "No reference definition at point")))
+  (let ((links (markdown-reference-find-links reference)))
+    (cond ((= (length links) 1)
+           (goto-char (cadr (car links))))
+          ((> (length links) 1)
+           (let ((oldbuf (current-buffer))
+                 (linkbuf (markdown-reference-links-buffer)))
+             (with-current-buffer linkbuf
+               (insert "Links using reference " reference ":\n\n")
+               (dolist (link (reverse links))
+                 (markdown-insert-link-button link oldbuf)))
+             (view-buffer-other-window linkbuf)
+             (goto-char (point-min))
+             (forward-line 2)))
+          (t
+           (error "No links for reference %s" reference)))))
+
+(defmacro defun-markdown-ref-checker
+    (name docstring checker-function buffer-function none-message buffer-header insert-reference)
+  "Define a function NAME acting on result of CHECKER-FUNCTION.
+
+DOCSTRING is used as a docstring for the defined function.
+
+BUFFER-FUNCTION should name and return an auxiliary buffer to put
+results in.
+
+NONE-MESSAGE is used when CHECKER-FUNCTION returns no results.
+
+BUFFER-HEADER is put into the auxiliary buffer first, followed by
+calling INSERT-REFERENCE for each element in the list returned by
+CHECKER-FUNCTION."
+  `(defun ,name (&optional silent)
+     ,(concat
+       docstring
+       "\n\nIf SILENT is non-nil, do not message anything when no
+such references found.")
+     (interactive "P")
+     (unless (derived-mode-p 'markdown-mode)
+       (user-error "Not available in current mode"))
+     (let ((oldbuf (current-buffer))
+           (refs (,checker-function))
+           (refbuf (,buffer-function)))
+       (if (null refs)
+           (progn
+             (when (not silent)
+               (message ,none-message))
+             (kill-buffer refbuf))
+         (with-current-buffer refbuf
+           (insert ,buffer-header)
+           (dolist (ref refs)
+             (,insert-reference ref oldbuf))
+           (view-buffer-other-window refbuf)
+           (goto-char (point-min))
+           (forward-line 2))))))
+
+(defun-markdown-ref-checker
+  markdown-check-refs
+  "Show all undefined Markdown references in current `markdown-mode' buffer.
+
+Links which have empty reference definitions are considered to be
+defined."
+  markdown-get-undefined-refs
+  markdown-reference-check-buffer
+  "No undefined references found"
+  "The following references are undefined:\n\n"
+  markdown-insert-undefined-reference-button)
+
+
+(defun-markdown-ref-checker
+  markdown-unused-refs
+  "Show all unused Markdown references in current `markdown-mode' buffer."
+  markdown-get-unused-refs
+  markdown-unused-references-buffer
+  "No unused references found"
+  "The following references are unused:\n\n"
+  markdown-insert-unused-reference-button)
+
+
+
+;;; Lists =====================================================================
+
+(defun markdown-insert-list-item (&optional arg)
+  "Insert a new list item.
+If the point is inside unordered list, insert a bullet mark.  If
+the point is inside ordered list, insert the next number followed
+by a period.  Use the previous list item to determine the amount
+of whitespace to place before and after list markers.
+
+With a \\[universal-argument] prefix (i.e., when ARG is (4)),
+decrease the indentation by one level.
+
+With two \\[universal-argument] prefixes (i.e., when ARG is (16)),
+increase the indentation by one level."
+  (interactive "p")
+  (let (bounds cur-indent marker indent new-indent new-loc)
+    (save-match-data
+      ;; Look for a list item on current or previous non-blank line
+      (save-excursion
+        (while (and (not (setq bounds (markdown-cur-list-item-bounds)))
+                    (not (bobp))
+                    (markdown-cur-line-blank-p))
+          (forward-line -1)))
+      (when bounds
+        (cond ((save-excursion
+                 (skip-chars-backward " \t")
+                 (looking-at-p markdown-regex-list))
+               (beginning-of-line)
+               (insert "\n")
+               (forward-line -1))
+              ((not (markdown-cur-line-blank-p))
+               (newline)))
+        (setq new-loc (point)))
+      ;; Look ahead for a list item on next non-blank line
+      (unless bounds
+        (save-excursion
+          (while (and (null bounds)
+                      (not (eobp))
+                      (markdown-cur-line-blank-p))
+            (forward-line)
+            (setq bounds (markdown-cur-list-item-bounds))))
+        (when bounds
+          (setq new-loc (point))
+          (unless (markdown-cur-line-blank-p)
+            (newline))))
+      (if (not bounds)
+          ;; When not in a list, start a new unordered one
+          (progn
+            (unless (markdown-cur-line-blank-p)
+              (insert "\n"))
+            (insert markdown-unordered-list-item-prefix))
+        ;; Compute indentation and marker for new list item
+        (setq cur-indent (nth 2 bounds))
+        (setq marker (nth 4 bounds))
+        ;; If current item is a GFM checkbox, insert new unchecked checkbox.
+        (when (nth 5 bounds)
+          (setq marker
+                (concat marker
+                        (replace-regexp-in-string "[Xx]" " " (nth 5 bounds)))))
+        (cond
+         ;; Dedent: decrement indentation, find previous marker.
+         ((= arg 4)
+          (setq indent (max (- cur-indent markdown-list-indent-width) 0))
+          (let ((prev-bounds
+                 (save-excursion
+                   (goto-char (nth 0 bounds))
+                   (when (markdown-up-list)
+                     (markdown-cur-list-item-bounds)))))
+            (when prev-bounds
+              (setq marker (nth 4 prev-bounds)))))
+         ;; Indent: increment indentation by 4, use same marker.
+         ((= arg 16) (setq indent (+ cur-indent markdown-list-indent-width)))
+         ;; Same level: keep current indentation and marker.
+         (t (setq indent cur-indent)))
+        (setq new-indent (make-string indent 32))
+        (goto-char new-loc)
+        (cond
+         ;; Ordered list
+         ((string-match-p "[0-9]" marker)
+          (if (= arg 16) ;; starting a new column indented one more level
+              (insert (concat new-indent "1. "))
+            ;; Don't use previous match-data
+            (set-match-data nil)
+            ;; travel up to the last item and pick the correct number.  If
+            ;; the argument was nil, "new-indent = cur-indent" is the same,
+            ;; so we don't need special treatment. Neat.
+            (save-excursion
+              (while (and (not (looking-at (concat new-indent "\\([0-9]+\\)\\(\\.[ \t]*\\)")))
+                          (>= (forward-line -1) 0))))
+            (let* ((old-prefix (match-string 1))
+                   (old-spacing (match-string 2))
+                   (new-prefix (if (and old-prefix markdown-ordered-list-enumeration)
+                                   (int-to-string (1+ (string-to-number old-prefix)))
+                                 "1"))
+                   (space-adjust (- (length old-prefix) (length new-prefix)))
+                   (new-spacing (if (and (match-string 2)
+                                         (not (string-match-p "\t" old-spacing))
+                                         (< space-adjust 0)
+                                         (> space-adjust (- 1 (length (match-string 2)))))
+                                    (substring (match-string 2) 0 space-adjust)
+                                  (or old-spacing ". "))))
+              (insert (concat new-indent new-prefix new-spacing)))))
+         ;; Unordered list, GFM task list, or ordered list with hash mark
+         ((string-match-p "[\\*\\+-]\\|#\\." marker)
+          (insert new-indent marker))))
+      ;; Propertize the newly inserted list item now
+      (markdown-syntax-propertize-list-items (line-beginning-position) (line-end-position)))))
+
+(defun markdown-move-list-item-up ()
+  "Move the current list item up in the list when possible.
+In nested lists, move child items with the parent item."
+  (interactive)
+  (let (cur prev old)
+    (when (setq cur (markdown-cur-list-item-bounds))
+      (setq old (point))
+      (goto-char (nth 0 cur))
+      (if (markdown-prev-list-item (nth 3 cur))
+          (progn
+            (setq prev (markdown-cur-list-item-bounds))
+            (condition-case nil
+                (progn
+                  (transpose-regions (nth 0 prev) (nth 1 prev)
+                                     (nth 0 cur) (nth 1 cur) t)
+                  (goto-char (+ (nth 0 prev) (- old (nth 0 cur)))))
+              ;; Catch error in case regions overlap.
+              (error (goto-char old))))
+        (goto-char old)))))
+
+(defun markdown-move-list-item-down ()
+  "Move the current list item down in the list when possible.
+In nested lists, move child items with the parent item."
+  (interactive)
+  (let (cur next old)
+    (when (setq cur (markdown-cur-list-item-bounds))
+      (setq old (point))
+      (if (markdown-next-list-item (nth 3 cur))
+          (progn
+            (setq next (markdown-cur-list-item-bounds))
+            (condition-case nil
+                (progn
+                  (transpose-regions (nth 0 cur) (nth 1 cur)
+                                     (nth 0 next) (nth 1 next) nil)
+                  (goto-char (+ old (- (nth 1 next) (nth 1 cur)))))
+              ;; Catch error in case regions overlap.
+              (error (goto-char old))))
+        (goto-char old)))))
+
+(defun markdown-demote-list-item (&optional bounds)
+  "Indent (or demote) the current list item.
+Optionally, BOUNDS of the current list item may be provided if available.
+In nested lists, demote child items as well."
+  (interactive)
+  (when (or bounds (setq bounds (markdown-cur-list-item-bounds)))
+    (save-excursion
+      (let* ((item-start (set-marker (make-marker) (nth 0 bounds)))
+             (item-end (set-marker (make-marker) (nth 1 bounds)))
+             (list-start (progn (markdown-beginning-of-list)
+                                (set-marker (make-marker) (point))))
+             (list-end (progn (markdown-end-of-list)
+                              (set-marker (make-marker) (point)))))
+        (goto-char item-start)
+        (while (< (point) item-end)
+          (unless (markdown-cur-line-blank-p)
+            (insert (make-string markdown-list-indent-width ? )))
+          (forward-line))
+        (markdown-syntax-propertize-list-items list-start list-end)))))
+
+(defun markdown-promote-list-item (&optional bounds)
+  "Unindent (or promote) the current list item.
+Optionally, BOUNDS of the current list item may be provided if available.
+In nested lists, demote child items as well."
+  (interactive)
+  (when (or bounds (setq bounds (markdown-cur-list-item-bounds)))
+    (save-excursion
+      (save-match-data
+        (let ((item-start (set-marker (make-marker) (nth 0 bounds)))
+              (item-end (set-marker (make-marker) (nth 1 bounds)))
+              (list-start (progn (markdown-beginning-of-list)
+                                 (set-marker (make-marker) (point))))
+              (list-end (progn (markdown-end-of-list)
+                               (set-marker (make-marker) (point))))
+              num regexp)
+          (goto-char item-start)
+          (when (looking-at (format "^[ ]\\{1,%d\\}"
+                                    markdown-list-indent-width))
+            (setq num (- (match-end 0) (match-beginning 0)))
+            (setq regexp (format "^[ ]\\{1,%d\\}" num))
+            (while (and (< (point) item-end)
+                        (re-search-forward regexp item-end t))
+              (replace-match "" nil nil)
+              (forward-line))
+            (markdown-syntax-propertize-list-items list-start list-end)))))))
+
+(defun markdown-cleanup-list-numbers-level (&optional pfx prev-item)
+  "Update the numbering for level PFX (as a string of spaces) and PREV-ITEM.
+PREV-ITEM is width of previous-indentation and list number
+
+Assume that the previously found match was for a numbered item in
+a list."
+  (let ((cpfx pfx)
+        (cur-item nil)
+        (idx 0)
+        (continue t)
+        (step t)
+        (sep nil))
+    (while (and continue (not (eobp)))
+      (setq step t)
+      (cond
+       ((looking-at "^\\(\\([\s-]*\\)[0-9]+\\)\\. ")
+        (setq cpfx (match-string-no-properties 2))
+        (setq cur-item (match-string-no-properties 1)) ;; indentation and list marker
+        (cond
+         ((or (= (length cpfx) (length pfx))
+              (= (length cur-item) (length prev-item)))
+          (save-excursion
+            (replace-match
+             (if (not markdown-ordered-list-enumeration)
+                 (concat pfx "1. ")
+               (cl-incf idx)
+               (concat pfx (number-to-string idx) ". "))))
+          (setq sep nil))
+         ;; indented a level
+         ((< (length pfx) (length cpfx))
+          (setq sep (markdown-cleanup-list-numbers-level cpfx cur-item))
+          (setq step nil))
+         ;; exit the loop
+         (t
+          (setq step nil)
+          (setq continue nil))))
+
+       ((looking-at "^\\([\s-]*\\)[^ \t\n\r].*$")
+        (setq cpfx (match-string-no-properties 1))
+        (cond
+         ;; reset if separated before
+         ((string= cpfx pfx) (when sep (setq idx 0)))
+         ((string< cpfx pfx)
+          (setq step nil)
+          (setq continue nil))))
+       (t (setq sep t)))
+
+      (when step
+        (beginning-of-line)
+        (setq continue (= (forward-line) 0))))
+    sep))
+
+(defun markdown-cleanup-list-numbers ()
+  "Update the numbering of ordered lists."
+  (interactive)
+  (save-excursion
+    (goto-char (point-min))
+    (markdown-cleanup-list-numbers-level "")))
+
+
+;;; Movement ==================================================================
+
+;; This function was originally derived from `org-beginning-of-line' from org.el.
+(defun markdown-beginning-of-line (&optional n)
+  "Go to the beginning of the current visible line.
+
+If this is a headline, and `markdown-special-ctrl-a/e' is not nil
+or symbol `reversed', on the first attempt move to where the
+headline text hashes, and only move to beginning of line when the
+cursor is already before the hashes of the text of the headline.
+
+If `markdown-special-ctrl-a/e' is symbol `reversed' then go to
+the hashes of the text on the second attempt.
+
+With argument N not nil or 1, move forward N - 1 lines first."
+  (interactive "^p")
+  (let ((origin (point))
+        (special (pcase markdown-special-ctrl-a/e
+                   (`(,C-a . ,_) C-a) (_ markdown-special-ctrl-a/e)))
+        deactivate-mark)
+    ;; First move to a visible line.
+    (if visual-line-mode
+        (beginning-of-visual-line n)
+      (move-beginning-of-line n)
+      ;; `move-beginning-of-line' may leave point after invisible
+      ;; characters if line starts with such of these (e.g., with
+      ;; a link at column 0).  Really move to the beginning of the
+      ;; current visible line.
+      (forward-line 0))
+    (cond
+     ;; No special behavior.  Point is already at the beginning of
+     ;; a line, logical or visual.
+     ((not special))
+     ;; `beginning-of-visual-line' left point before logical beginning
+     ;; of line: point is at the beginning of a visual line.  Bail
+     ;; out.
+     ((and visual-line-mode (not (bolp))))
+     ((looking-at markdown-regex-header-atx)
+      ;; At a header, special position is before the title.
+      (let ((refpos (match-beginning 2))
+            (bol (point)))
+        (if (eq special 'reversed)
+            (when (and (= origin bol) (eq last-command this-command))
+              (goto-char refpos))
+          (when (or (> origin refpos) (<= origin bol))
+            (goto-char refpos)))
+        ;; Prevent automatic cursor movement caused by the command loop.
+        ;; Enable disable-point-adjustment to avoid unintended cursor repositioning.
+        (when (and markdown-hide-markup
+                   (equal (get-char-property (point) 'display) ""))
+          (setq disable-point-adjustment t))))
+     ((looking-at markdown-regex-list)
+      ;; At a list item, special position is after the list marker or checkbox.
+      (let ((refpos (or (match-end 4) (match-end 3))))
+        (if (eq special 'reversed)
+            (when (and (= (point) origin) (eq last-command this-command))
+              (goto-char refpos))
+          (when (or (> origin refpos) (<= origin (line-beginning-position)))
+          (goto-char refpos)))))
+     ;; No special case, already at beginning of line.
+     (t nil))))
+
+;; This function was originally derived from `org-end-of-line' from org.el.
+(defun markdown-end-of-line (&optional n)
+  "Go to the end of the line, but before ellipsis, if any.
+
+If this is a headline, and `markdown-special-ctrl-a/e' is not nil
+or symbol `reversed', ignore closing tags on the first attempt,
+and only move to after the closing tags when the cursor is
+already beyond the end of the headline.
+
+If `markdown-special-ctrl-a/e' is symbol `reversed' then ignore
+closing tags on the second attempt.
+
+With argument N not nil or 1, move forward N - 1 lines first."
+  (interactive "^p")
+  (let ((origin (point))
+        (special (pcase markdown-special-ctrl-a/e
+                   (`(,_ . ,C-e) C-e) (_ markdown-special-ctrl-a/e)))
+        deactivate-mark)
+    ;; First move to a visible line.
+    (if visual-line-mode
+        (beginning-of-visual-line n)
+      (move-beginning-of-line n))
+    (cond
+     ;; At a headline, with closing tags.
+     ((save-excursion
+        (forward-line 0)
+        (and (looking-at markdown-regex-header-atx) (match-end 3)))
+      (let ((refpos (match-end 2))
+            (visual-end (and visual-line-mode
+                             (save-excursion
+                               (end-of-visual-line)
+                               (point)))))
+        ;; If `end-of-visual-line' brings us before end of line or even closing
+        ;; tags, i.e., the headline spans over multiple visual lines, move
+        ;; there.
+        (cond ((and visual-end
+                    (< visual-end refpos)
+                    (<= origin visual-end))
+               (goto-char visual-end))
+              ((not special) (end-of-line))
+              ((eq special 'reversed)
+               (if (and (= origin (line-end-position))
+                        (eq this-command last-command))
+                   (goto-char refpos)
+                 (end-of-line)))
+              (t
+               (if (or (< origin refpos) (>= origin (line-end-position)))
+                   (goto-char refpos)
+                 (end-of-line))))
+        ;; Prevent automatic cursor movement caused by the command loop.
+        ;; Enable disable-point-adjustment to avoid unintended cursor repositioning.
+        (when (and markdown-hide-markup
+                   (equal (get-char-property (point) 'display) ""))
+          (setq disable-point-adjustment t))))
+     (visual-line-mode
+      (let ((bol (line-beginning-position)))
+        (end-of-visual-line)
+        ;; If `end-of-visual-line' gets us past the ellipsis at the
+        ;; end of a line, backtrack and use `end-of-line' instead.
+        (when (/= bol (line-beginning-position))
+          (goto-char bol)
+          (end-of-line))))
+     (t (end-of-line)))))
+
+(defun markdown-beginning-of-defun (&optional arg)
+  "`beginning-of-defun-function' for Markdown.
+This is used to find the beginning of the defun and should behave
+like ‘beginning-of-defun’, returning non-nil if it found the
+beginning of a defun.  It moves the point backward, right before a
+heading which defines a defun.  When ARG is non-nil, repeat that
+many times.  When ARG is negative, move forward to the ARG-th
+following section."
+  (or arg (setq arg 1))
+  (when (< arg 0) (end-of-line))
+  ;; Adjust position for setext headings.
+  (when (and (thing-at-point-looking-at markdown-regex-header-setext)
+             (not (= (point) (match-beginning 0)))
+             (not (markdown-code-block-at-point-p)))
+    (goto-char (match-end 0)))
+  (let (found)
+    ;; Move backward with positive argument.
+    (while (and (not (bobp)) (> arg 0))
+      (setq found nil)
+      (while (and (not found)
+                  (not (bobp))
+                  (re-search-backward markdown-regex-header nil 'move))
+        (markdown-code-block-at-pos (match-beginning 0))
+        (setq found (match-beginning 0)))
+      (setq arg (1- arg)))
+    ;; Move forward with negative argument.
+    (while (and (not (eobp)) (< arg 0))
+      (setq found nil)
+      (while (and (not found)
+                  (not (eobp))
+                  (re-search-forward markdown-regex-header nil 'move))
+        (markdown-code-block-at-pos (match-beginning 0))
+        (setq found (match-beginning 0)))
+      (setq arg (1+ arg)))
+    (when found
+      (beginning-of-line)
+      t)))
+
+(defun markdown-end-of-defun ()
+  "`end-of-defun-function’ for Markdown.
+This is used to find the end of the defun at point.
+It is called with no argument, right after calling ‘beginning-of-defun-raw’,
+so it can assume that point is at the beginning of the defun body.
+It should move point to the first position after the defun."
+  (or (eobp) (forward-char 1))
+  (let (found)
+    (while (and (not found)
+                (not (eobp))
+                (re-search-forward markdown-regex-header nil 'move))
+      (when (not (markdown-code-block-at-pos (match-beginning 0)))
+        (setq found (match-beginning 0))))
+    (when found
+      (goto-char found)
+      (skip-syntax-backward "-"))))
+
+(defun markdown-beginning-of-text-block ()
+  "Move backward to previous beginning of a plain text block.
+This function simply looks for blank lines without considering
+the surrounding context in light of Markdown syntax.  For that, see
+`markdown-backward-block'."
+  (interactive)
+  (let ((start (point)))
+    (if (re-search-backward markdown-regex-block-separator nil t)
+        (goto-char (match-end 0))
+      (goto-char (point-min)))
+    (when (and (= start (point)) (not (bobp)))
+      (forward-line -1)
+      (if (re-search-backward markdown-regex-block-separator nil t)
+          (goto-char (match-end 0))
+        (goto-char (point-min))))))
+
+(defun markdown-end-of-text-block ()
+  "Move forward to next beginning of a plain text block.
+This function simply looks for blank lines without considering
+the surrounding context in light of Markdown syntax.  For that, see
+`markdown-forward-block'."
+  (interactive)
+  (beginning-of-line)
+  (skip-chars-forward " \t\n")
+  (when (= (point) (point-min))
+    (forward-char))
+  (if (re-search-forward markdown-regex-block-separator nil t)
+      (goto-char (match-end 0))
+    (goto-char (point-max)))
+  (skip-chars-backward " \t\n")
+  (forward-line))
+
+(defun markdown-backward-paragraph (&optional arg)
+  "Move the point to the start of the current paragraph.
+With argument ARG, do it ARG times; a negative argument ARG = -N
+means move forward N blocks."
+  (interactive "^p")
+  (or arg (setq arg 1))
+  (if (< arg 0)
+      (markdown-forward-paragraph (- arg))
+    (dotimes (_ arg)
+      ;; Skip over whitespace in between paragraphs when moving backward.
+      (skip-chars-backward " \t\n")
+      (beginning-of-line)
+      ;; Skip over code block endings.
+      (when (markdown-range-properties-exist
+             (line-beginning-position) (line-end-position)
+             '(markdown-gfm-block-end
+               markdown-tilde-fence-end))
+        (forward-line -1))
+      ;; Skip over blank lines inside blockquotes.
+      (while (and (not (eobp))
+                  (looking-at markdown-regex-blockquote)
+                  (= (length (match-string 3)) 0))
+        (forward-line -1))
+      ;; Proceed forward based on the type of block of paragraph.
+      (let (bounds skip)
+        (cond
+         ;; Blockquotes
+         ((looking-at markdown-regex-blockquote)
+          (while (and (not (bobp))
+                      (looking-at markdown-regex-blockquote)
+                      (> (length (match-string 3)) 0)) ;; not blank
+            (forward-line -1))
+          (forward-line))
+         ;; List items
+         ((setq bounds (markdown-cur-list-item-bounds))
+          (goto-char (nth 0 bounds)))
+         ;; Other
+         (t
+          (while (and (not (bobp))
+                      (not skip)
+                      (not (markdown-cur-line-blank-p))
+                      (not (looking-at markdown-regex-blockquote))
+                      (not (markdown-range-properties-exist
+                            (line-beginning-position) (line-end-position)
+                            '(markdown-gfm-block-end
+                              markdown-tilde-fence-end))))
+            (setq skip (markdown-range-properties-exist
+                        (line-beginning-position) (line-end-position)
+                        '(markdown-gfm-block-begin
+                          markdown-tilde-fence-begin)))
+            (forward-line -1))
+          (unless (bobp)
+            (forward-line 1))))))))
+
+(defun markdown-forward-paragraph (&optional arg)
+  "Move forward to the next end of a paragraph.
+With argument ARG, do it ARG times; a negative argument ARG = -N
+means move backward N blocks."
+  (interactive "^p")
+  (or arg (setq arg 1))
+  (if (< arg 0)
+      (markdown-backward-paragraph (- arg))
+    (dotimes (_ arg)
+      ;; Skip whitespace in between paragraphs.
+      (when (markdown-cur-line-blank-p)
+        (skip-syntax-forward "-")
+        (beginning-of-line))
+      ;; Proceed forward based on the type of block.
+      (let (bounds skip)
+        (cond
+         ;; Blockquotes
+         ((looking-at markdown-regex-blockquote)
+          ;; Skip over blank lines inside blockquotes.
+          (while (and (not (eobp))
+                      (looking-at markdown-regex-blockquote)
+                      (= (length (match-string 3)) 0))
+            (forward-line))
+          ;; Move to end of quoted text block
+          (while (and (not (eobp))
+                      (looking-at markdown-regex-blockquote)
+                      (> (length (match-string 3)) 0)) ;; not blank
+            (forward-line)))
+         ;; List items
+         ((and (markdown-cur-list-item-bounds)
+               (setq bounds (markdown-next-list-item-bounds)))
+          (goto-char (nth 0 bounds)))
+         ;; Other
+         (t
+          (forward-line)
+          (while (and (not (eobp))
+                      (not skip)
+                      (not (markdown-cur-line-blank-p))
+                      (not (looking-at markdown-regex-blockquote))
+                      (not (markdown-range-properties-exist
+                            (line-beginning-position) (line-end-position)
+                            '(markdown-gfm-block-begin
+                              markdown-tilde-fence-begin))))
+            (setq skip (markdown-range-properties-exist
+                        (line-beginning-position) (line-end-position)
+                        '(markdown-gfm-block-end
+                          markdown-tilde-fence-end)))
+            (forward-line))))))))
+
+(defun markdown-backward-block (&optional arg)
+  "Move the point to the start of the current Markdown block.
+Moves across complete code blocks, list items, and blockquotes,
+but otherwise stops at blank lines, headers, and horizontal
+rules.  With argument ARG, do it ARG times; a negative argument
+ARG = -N means move forward N blocks."
+  (interactive "^p")
+  (or arg (setq arg 1))
+  (if (< arg 0)
+      (markdown-forward-block (- arg))
+    (dotimes (_ arg)
+      ;; Skip over whitespace in between blocks when moving backward,
+      ;; unless at a block boundary with no whitespace.
+      (skip-syntax-backward "-")
+      (beginning-of-line)
+      ;; Proceed forward based on the type of block.
+      (cond
+       ;; Code blocks
+       ((and (markdown-code-block-at-pos (point)) ;; this line
+             (markdown-code-block-at-pos (line-beginning-position 0))) ;; previous line
+        (forward-line -1)
+        (while (and (markdown-code-block-at-point-p) (not (bobp)))
+          (forward-line -1))
+        (forward-line))
+       ;; Headings
+       ((markdown-heading-at-point)
+        (goto-char (match-beginning 0)))
+       ;; Horizontal rules
+       ((looking-at markdown-regex-hr))
+       ;; Blockquotes
+       ((looking-at markdown-regex-blockquote)
+        (forward-line -1)
+        (while (and (looking-at markdown-regex-blockquote)
+                    (not (bobp)))
+          (forward-line -1))
+        (forward-line))
+       ;; List items
+       ((markdown-cur-list-item-bounds)
+        (markdown-beginning-of-list))
+       ;; Other
+       (t
+        ;; Move forward in case it is a one line regular paragraph.
+        (unless (markdown-next-line-blank-p)
+          (forward-line))
+        (unless (markdown-prev-line-blank-p)
+          (markdown-backward-paragraph)))))))
+
+(defun markdown-forward-block (&optional arg)
+  "Move forward to the next end of a Markdown block.
+Moves across complete code blocks, list items, and blockquotes,
+but otherwise stops at blank lines, headers, and horizontal
+rules.  With argument ARG, do it ARG times; a negative argument
+ARG = -N means move backward N blocks."
+  (interactive "^p")
+  (or arg (setq arg 1))
+  (if (< arg 0)
+      (markdown-backward-block (- arg))
+    (dotimes (_ arg)
+      ;; Skip over whitespace in between blocks when moving forward.
+      (if (markdown-cur-line-blank-p)
+          (skip-syntax-forward "-")
+        (beginning-of-line))
+      ;; Proceed forward based on the type of block.
+      (cond
+       ;; Code blocks
+       ((markdown-code-block-at-point-p)
+        (forward-line)
+        (while (and (markdown-code-block-at-point-p) (not (eobp)))
+          (forward-line)))
+       ;; Headings
+       ((looking-at markdown-regex-header)
+        (goto-char (or (match-end 4) (match-end 2) (match-end 3)))
+        (forward-line))
+       ;; Horizontal rules
+       ((looking-at markdown-regex-hr)
+        (forward-line))
+       ;; Blockquotes
+       ((looking-at markdown-regex-blockquote)
+        (forward-line)
+        (while (and (looking-at markdown-regex-blockquote) (not (eobp)))
+          (forward-line)))
+       ;; List items
+       ((markdown-cur-list-item-bounds)
+        (markdown-end-of-list)
+        (forward-line))
+       ;; Other
+       (t (markdown-forward-paragraph))))
+    (skip-syntax-backward "-")
+    (unless (eobp)
+      (forward-char 1))))
+
+(defun markdown-backward-page (&optional count)
+  "Move backward to boundary of the current toplevel section.
+With COUNT, repeat, or go forward if negative."
+  (interactive "p")
+  (or count (setq count 1))
+  (if (< count 0)
+      (markdown-forward-page (- count))
+    (skip-syntax-backward "-")
+    (or (markdown-back-to-heading-over-code-block t t)
+        (goto-char (point-min)))
+    (when (looking-at markdown-regex-header)
+      (let ((level (markdown-outline-level)))
+        (when (> level 1) (markdown-up-heading level))
+        (when (> count 1)
+          (condition-case nil
+              (markdown-backward-same-level (1- count))
+            (error (goto-char (point-min)))))))))
+
+(defun markdown-forward-page (&optional count)
+  "Move forward to boundary of the current toplevel section.
+With COUNT, repeat, or go backward if negative."
+  (interactive "p")
+  (or count (setq count 1))
+  (if (< count 0)
+      (markdown-backward-page (- count))
+    (if (markdown-back-to-heading-over-code-block t t)
+        (let ((level (markdown-outline-level)))
+          (when (> level 1) (markdown-up-heading level))
+          (condition-case nil
+              (markdown-forward-same-level count)
+            (error (goto-char (point-max)))))
+      (markdown-next-visible-heading 1))))
+
+(defun markdown-next-link ()
+  "Jump to next inline, reference, or wiki link.
+If successful, return point.  Otherwise, return nil.
+See `markdown-wiki-link-p' and `markdown-previous-wiki-link'."
+  (interactive)
+  (let ((opoint (point)))
+    (when (or (markdown-link-p) (markdown-wiki-link-p))
+      ;; At a link already, move past it.
+      (goto-char (+ (match-end 0) 1)))
+    ;; Search for the next wiki link and move to the beginning.
+    (while (and (re-search-forward (markdown-make-regex-link-generic) nil t)
+                (markdown-code-block-at-point-p)
+                (< (point) (point-max))))
+    (if (and (not (eq (point) opoint))
+             (or (markdown-link-p) (markdown-wiki-link-p)))
+        ;; Group 1 will move past non-escape character in wiki link regexp.
+        ;; Go to beginning of group zero for all other link types.
+        (goto-char (or (match-beginning 1) (match-beginning 0)))
+      (goto-char opoint)
+      nil)))
+
+(defun markdown-previous-link ()
+  "Jump to previous wiki link.
+If successful, return point.  Otherwise, return nil.
+See `markdown-wiki-link-p' and `markdown-next-wiki-link'."
+  (interactive)
+  (let ((opoint (point)))
+    (while (and (re-search-backward (markdown-make-regex-link-generic) nil t)
+                (markdown-code-block-at-point-p)
+                (> (point) (point-min))))
+    (if (and (not (eq (point) opoint))
+             (or (markdown-link-p) (markdown-wiki-link-p)))
+        (goto-char (or (match-beginning 1) (match-beginning 0)))
+      (goto-char opoint)
+      nil)))
+
+
+;;; Outline ===================================================================
+
+(defun markdown-move-heading-common (move-fn &optional arg adjust)
+  "Wrapper for `outline-mode' functions to skip false positives.
+MOVE-FN is a function and ARG is its argument. For example,
+headings inside preformatted code blocks may match
+`outline-regexp' but should not be considered as headings.
+When ADJUST is non-nil, adjust the point for interactive calls
+to avoid leaving the point at invisible markup.  This adjustment
+generally should only be done for interactive calls, since other
+functions may expect the point to be at the beginning of the
+regular expression."
+  (let ((prev -1) (start (point)))
+    (if arg (funcall move-fn arg) (funcall move-fn))
+    (while (and (/= prev (point)) (markdown-code-block-at-point-p))
+      (setq prev (point))
+      (if arg (funcall move-fn arg) (funcall move-fn)))
+    ;; Adjust point for setext headings and invisible text.
+    (save-match-data
+      (when (and adjust (thing-at-point-looking-at markdown-regex-header))
+        (if markdown-hide-markup
+            ;; Move to beginning of heading text if markup is hidden.
+            (goto-char (or (match-beginning 1) (match-beginning 5)))
+          ;; Move to beginning of markup otherwise.
+          (goto-char (or (match-beginning 1) (match-beginning 4))))))
+    (if (= (point) start) nil (point))))
+
+(defun markdown-next-visible-heading (arg)
+  "Move to the next visible heading line of any level.
+With argument, repeats or can move backward if negative. ARG is
+passed to `outline-next-visible-heading'."
+  (interactive "p")
+  (markdown-move-heading-common #'outline-next-visible-heading arg 'adjust))
+
+(defun markdown-previous-visible-heading (arg)
+  "Move to the previous visible heading line of any level.
+With argument, repeats or can move backward if negative. ARG is
+passed to `outline-previous-visible-heading'."
+  (interactive "p")
+  (markdown-move-heading-common #'outline-previous-visible-heading arg 'adjust))
+
+(defun markdown-next-heading ()
+  "Move to the next heading line of any level."
+  (markdown-move-heading-common #'outline-next-heading))
+
+(defun markdown-previous-heading ()
+  "Move to the previous heading line of any level."
+  (markdown-move-heading-common #'outline-previous-heading))
+
+(defun markdown-back-to-heading-over-code-block (&optional invisible-ok no-error)
+  "Move back to the beginning of the previous heading.
+Returns t if the point is at a heading, the location if a heading
+was found, and nil otherwise.
+Only visible heading lines are considered, unless INVISIBLE-OK is
+non-nil.  Throw an error if there is no previous heading unless
+NO-ERROR is non-nil.
+Leaves match data intact for `markdown-regex-header'."
+  (beginning-of-line)
+  (or (and (markdown-heading-at-point)
+           (not (markdown-code-block-at-point-p)))
+      (let (found)
+        (save-excursion
+          (while (and (not found)
+                      (re-search-backward markdown-regex-header nil t))
+            (when (and (or invisible-ok (not (outline-invisible-p)))
+                       (not (markdown-code-block-at-point-p)))
+              (setq found (point))))
+          (if (not found)
+              (unless no-error (user-error "Before first heading"))
+            (setq found (point))))
+        (when found (goto-char found)))))
+
+(defun markdown-forward-same-level (arg)
+  "Move forward to the ARG'th heading at same level as this one.
+Stop at the first and last headings of a superior heading."
+  (interactive "p")
+  (markdown-back-to-heading-over-code-block)
+  (markdown-move-heading-common #'outline-forward-same-level arg 'adjust))
+
+(defun markdown-backward-same-level (arg)
+  "Move backward to the ARG'th heading at same level as this one.
+Stop at the first and last headings of a superior heading."
+  (interactive "p")
+  (markdown-back-to-heading-over-code-block)
+  (while (> arg 0)
+    (let ((point-to-move-to
+           (save-excursion
+             (markdown-move-heading-common #'outline-get-last-sibling nil 'adjust))))
+      (if point-to-move-to
+          (progn
+            (goto-char point-to-move-to)
+            (setq arg (1- arg)))
+        (user-error "No previous same-level heading")))))
+
+(defun markdown-up-heading (arg &optional interactive)
+  "Move to the visible heading line of which the present line is a subheading.
+With argument, move up ARG levels.  When called interactively (or
+INTERACTIVE is non-nil), also push the mark."
+  (interactive "p\np")
+  (and interactive (not (eq last-command 'markdown-up-heading))
+       (push-mark))
+  (markdown-move-heading-common #'outline-up-heading arg 'adjust))
+
+(defun markdown-back-to-heading (&optional invisible-ok)
+  "Move to previous heading line, or beg of this line if it's a heading.
+Only visible heading lines are considered, unless INVISIBLE-OK is non-nil."
+  (interactive)
+  (markdown-move-heading-common #'outline-back-to-heading invisible-ok))
+
+(defalias 'markdown-end-of-heading 'outline-end-of-heading)
+
+(defun markdown-on-heading-p ()
+  "Return non-nil if point is on a heading line."
+  (get-text-property (line-beginning-position) 'markdown-heading))
+
+(defun markdown-end-of-subtree (&optional invisible-OK)
+  "Move to the end of the current subtree.
+Only visible heading lines are considered, unless INVISIBLE-OK is
+non-nil.
+Derived from `org-end-of-subtree'."
+  (markdown-back-to-heading invisible-OK)
+  (let ((first t)
+        (level (markdown-outline-level)))
+    (while (and (not (eobp))
+                (or first (> (markdown-outline-level) level)))
+      (setq first nil)
+      (markdown-next-heading))
+    (if (memq (preceding-char) '(?\n ?\^M))
+        (progn
+          ;; Go to end of line before heading
+          (forward-char -1)
+          (if (memq (preceding-char) '(?\n ?\^M))
+              ;; leave blank line before heading
+              (forward-char -1)))))
+  (point))
+
+(defun markdown-outline-fix-visibility ()
+  "Hide any false positive headings that should not be shown.
+For example, headings inside preformatted code blocks may match
+`outline-regexp' but should not be shown as headings when cycling.
+Also, the ending --- line in metadata blocks appears to be a
+setext header, but should not be folded."
+  (save-excursion
+    (goto-char (point-min))
+    ;; Unhide any false positives in metadata blocks
+    (when (markdown-text-property-at-point 'markdown-yaml-metadata-begin)
+      (let ((body (progn (forward-line)
+                         (markdown-text-property-at-point
+                          'markdown-yaml-metadata-section))))
+        (when body
+          (let ((end (progn (goto-char (cl-second body))
+                            (markdown-text-property-at-point
+                             'markdown-yaml-metadata-end))))
+            (outline-flag-region (point-min) (1+ (cl-second end)) nil)))))
+    ;; Hide any false positives in code blocks
+    (unless (outline-on-heading-p)
+      (outline-next-visible-heading 1))
+    (while (< (point) (point-max))
+      (when (markdown-code-block-at-point-p)
+        (outline-flag-region (1- (line-beginning-position)) (line-end-position) t))
+      (outline-next-visible-heading 1))))
+
+(defvar markdown-cycle-global-status 1)
+(defvar markdown-cycle-subtree-status nil)
+
+(defun markdown-next-preface ()
+  (let (finish)
+    (while (and (not finish) (re-search-forward (concat "\n\\(?:" outline-regexp "\\)")
+                                                nil 'move))
+      (unless (markdown-code-block-at-point-p)
+        (goto-char (match-beginning 0))
+        (setq finish t))))
+  (when (and (bolp) (or outline-blank-line (eobp)) (not (bobp)))
+    (forward-char -1)))
+
+(defun markdown-show-entry ()
+  (save-excursion
+    (outline-back-to-heading t)
+    (outline-flag-region (1- (point))
+                         (progn
+                           (markdown-next-preface)
+                           (if (= 1 (- (point-max) (point)))
+                               (point-max)
+                             (point)))
+                         nil)))
+
+;; This function was originally derived from `org-cycle' from org.el.
+(defun markdown-cycle (&optional arg)
+  "Visibility cycling for Markdown mode.
+This function is called with a `\\[universal-argument]' or if ARG is t, perform
+global visibility cycling.  If the point is at an atx-style header, cycle
+visibility of the corresponding subtree.  Otherwise, indent the current line
+ or insert a tab, as appropriate, by calling `indent-for-tab-command'."
+  (interactive "P")
+  (cond
+
+   ;; Global cycling
+   (arg
+    (cond
+     ;; Move from overview to contents
+     ((and (eq last-command this-command)
+           (eq markdown-cycle-global-status 2))
+      (outline-hide-sublevels 1)
+      (message "CONTENTS")
+      (setq markdown-cycle-global-status 3)
+      (markdown-outline-fix-visibility))
+     ;; Move from contents to all
+     ((and (eq last-command this-command)
+           (eq markdown-cycle-global-status 3))
+      (outline-show-all)
+      (message "SHOW ALL")
+      (setq markdown-cycle-global-status 1))
+     ;; Defaults to overview
+     (t
+      (outline-hide-body)
+      (message "OVERVIEW")
+      (setq markdown-cycle-global-status 2)
+      (markdown-outline-fix-visibility))))
+
+   ;; At a heading: rotate between three different views
+   ((save-excursion (beginning-of-line 1) (markdown-on-heading-p))
+    (markdown-back-to-heading)
+    (let ((goal-column 0) eoh eol eos)
+      ;; Determine boundaries
+      (save-excursion
+        (markdown-back-to-heading)
+        (save-excursion
+          (beginning-of-line 2)
+          (while (and (not (eobp)) ;; this is like `next-line'
+                      (get-char-property (1- (point)) 'invisible))
+            (beginning-of-line 2)) (setq eol (point)))
+        (markdown-end-of-heading)   (setq eoh (point))
+        (markdown-end-of-subtree t)
+        (skip-chars-forward " \t\n")
+        (beginning-of-line 1) ; in case this is an item
+        (setq eos (1- (point))))
+      ;; Find out what to do next and set `this-command'
+      (cond
+       ;; Nothing is hidden behind this heading
+       ((= eos eoh)
+        (message "EMPTY ENTRY")
+        (setq markdown-cycle-subtree-status nil))
+       ;; Entire subtree is hidden in one line: open it
+       ((>= eol eos)
+        (markdown-show-entry)
+        (outline-show-children)
+        (message "CHILDREN")
+        (setq markdown-cycle-subtree-status 'children))
+       ;; We just showed the children, now show everything.
+       ((and (eq last-command this-command)
+             (eq markdown-cycle-subtree-status 'children))
+        (outline-show-subtree)
+        (message "SUBTREE")
+        (setq markdown-cycle-subtree-status 'subtree))
+       ;; Default action: hide the subtree.
+       (t
+        (outline-hide-subtree)
+        (message "FOLDED")
+        (setq markdown-cycle-subtree-status 'folded)))))
+
+   ;; In a table, move forward by one cell
+   ((markdown-table-at-point-p)
+    (call-interactively #'markdown-table-forward-cell))
+
+   ;; Otherwise, indent as appropriate
+   (t
+    (indent-for-tab-command))))
+
+(defun markdown-shifttab ()
+  "Handle S-TAB keybinding based on context.
+When in a table, move backward one cell.
+Otherwise, cycle global heading visibility by calling
+`markdown-cycle' with argument t."
+  (interactive)
+  (cond ((markdown-table-at-point-p)
+         (call-interactively #'markdown-table-backward-cell))
+        (t (markdown-cycle t))))
+
+(defun markdown-outline-level ()
+  "Return the depth to which a statement is nested in the outline."
+  (cond
+   ((and (match-beginning 0)
+         (markdown-code-block-at-pos (match-beginning 0)))
+    7) ;; Only 6 header levels are defined.
+   ((match-end 2) 1)
+   ((match-end 3) 2)
+   ((match-end 4)
+    (length (markdown-trim-whitespace (match-string-no-properties 4))))))
+
+(defun markdown-promote-subtree (&optional arg)
+  "Promote the current subtree of ATX headings.
+Note that Markdown does not support heading levels higher than
+six and therefore level-six headings will not be promoted
+further. If ARG is non-nil promote the heading, otherwise
+demote."
+  (interactive "*P")
+  (save-excursion
+    (when (and (or (thing-at-point-looking-at markdown-regex-header-atx)
+                   (re-search-backward markdown-regex-header-atx nil t))
+               (not (markdown-code-block-at-point-p)))
+      (let ((level (length (match-string 1)))
+            (promote-or-demote (if arg 1 -1))
+            (remove 't))
+        (markdown-cycle-atx promote-or-demote remove)
+        (catch 'end-of-subtree
+          (while (and (markdown-next-heading)
+                      (looking-at markdown-regex-header-atx))
+            ;; Exit if this not a higher level heading; promote otherwise.
+            (if (and (looking-at markdown-regex-header-atx)
+                     (<= (length (match-string-no-properties 1)) level))
+                (throw 'end-of-subtree nil)
+              (markdown-cycle-atx promote-or-demote remove))))))))
+
+(defun markdown-demote-subtree ()
+  "Demote the current subtree of ATX headings."
+  (interactive)
+  (markdown-promote-subtree t))
+
+(defun markdown-move-subtree-up ()
+  "Move the current subtree of ATX headings up."
+  (interactive)
+  (outline-move-subtree-up 1))
+
+(defun markdown-move-subtree-down ()
+  "Move the current subtree of ATX headings down."
+  (interactive)
+  (outline-move-subtree-down 1))
+
+(defun markdown-outline-next ()
+  "Move to next list item, when in a list, or next visible heading."
+  (interactive)
+  (let ((bounds (markdown-next-list-item-bounds)))
+    (if bounds
+        (goto-char (nth 0 bounds))
+      (markdown-next-visible-heading 1))))
+
+(defun markdown-outline-previous ()
+  "Move to previous list item, when in a list, or previous visible heading."
+  (interactive)
+  (let ((bounds (markdown-prev-list-item-bounds)))
+    (if bounds
+        (goto-char (nth 0 bounds))
+      (markdown-previous-visible-heading 1))))
+
+(defun markdown-outline-next-same-level ()
+  "Move to next list item or heading of same level."
+  (interactive)
+  (let ((bounds (markdown-cur-list-item-bounds)))
+    (if bounds
+        (markdown-next-list-item (nth 3 bounds))
+      (markdown-forward-same-level 1))))
+
+(defun markdown-outline-previous-same-level ()
+  "Move to previous list item or heading of same level."
+  (interactive)
+  (let ((bounds (markdown-cur-list-item-bounds)))
+    (if bounds
+        (markdown-prev-list-item (nth 3 bounds))
+      (markdown-backward-same-level 1))))
+
+(defun markdown-outline-up ()
+  "Move to previous list item, when in a list, or previous heading."
+  (interactive)
+  (unless (markdown-up-list)
+    (markdown-up-heading 1)))
+
+
+;;; Marking and Narrowing =====================================================
+
+(defun markdown-mark-paragraph ()
+  "Put mark at end of this block, point at beginning.
+The block marked is the one that contains point or follows point.
+
+Interactively, if this command is repeated or (in Transient Mark
+mode) if the mark is active, it marks the next block after the
+ones already marked."
+  (interactive)
+  (if (or (and (eq last-command this-command) (mark t))
+          (and transient-mark-mode mark-active))
+      (set-mark
+       (save-excursion
+         (goto-char (mark))
+         (markdown-forward-paragraph)
+         (point)))
+    (let ((beginning-of-defun-function #'markdown-backward-paragraph)
+          (end-of-defun-function #'markdown-forward-paragraph))
+      (mark-defun))))
+
+(defun markdown-mark-block ()
+  "Put mark at end of this block, point at beginning.
+The block marked is the one that contains point or follows point.
+
+Interactively, if this command is repeated or (in Transient Mark
+mode) if the mark is active, it marks the next block after the
+ones already marked."
+  (interactive)
+  (if (or (and (eq last-command this-command) (mark t))
+          (and transient-mark-mode mark-active))
+      (set-mark
+       (save-excursion
+         (goto-char (mark))
+         (markdown-forward-block)
+         (point)))
+    (let ((beginning-of-defun-function #'markdown-backward-block)
+          (end-of-defun-function #'markdown-forward-block))
+      (mark-defun))))
+
+(defun markdown-narrow-to-block ()
+  "Make text outside current block invisible.
+The current block is the one that contains point or follows point."
+  (interactive)
+  (let ((beginning-of-defun-function #'markdown-backward-block)
+        (end-of-defun-function #'markdown-forward-block))
+    (narrow-to-defun)))
+
+(defun markdown-mark-text-block ()
+  "Put mark at end of this plain text block, point at beginning.
+The block marked is the one that contains point or follows point.
+
+Interactively, if this command is repeated or (in Transient Mark
+mode) if the mark is active, it marks the next block after the
+ones already marked."
+  (interactive)
+  (if (or (and (eq last-command this-command) (mark t))
+          (and transient-mark-mode mark-active))
+      (set-mark
+       (save-excursion
+         (goto-char (mark))
+         (markdown-end-of-text-block)
+         (point)))
+    (let ((beginning-of-defun-function #'markdown-beginning-of-text-block)
+          (end-of-defun-function #'markdown-end-of-text-block))
+      (mark-defun))))
+
+(defun markdown-mark-page ()
+  "Put mark at end of this top level section, point at beginning.
+The top level section marked is the one that contains point or
+follows point.
+
+Interactively, if this command is repeated or (in Transient Mark
+mode) if the mark is active, it marks the next page after the
+ones already marked."
+  (interactive)
+  (if (or (and (eq last-command this-command) (mark t))
+          (and transient-mark-mode mark-active))
+      (set-mark
+       (save-excursion
+         (goto-char (mark))
+         (markdown-forward-page)
+         (point)))
+    (let ((beginning-of-defun-function #'markdown-backward-page)
+          (end-of-defun-function #'markdown-forward-page))
+      (mark-defun))))
+
+(defun markdown-narrow-to-page ()
+  "Make text outside current top level section invisible.
+The current section is the one that contains point or follows point."
+  (interactive)
+  (let ((beginning-of-defun-function #'markdown-backward-page)
+        (end-of-defun-function #'markdown-forward-page))
+    (narrow-to-defun)))
+
+(defun markdown-mark-subtree ()
+  "Mark the current subtree.
+This puts point at the start of the current subtree, and mark at the end."
+  (interactive)
+  (let ((beg))
+    (if (markdown-heading-at-point)
+        (beginning-of-line)
+      (markdown-previous-visible-heading 1))
+    (setq beg (point))
+    (markdown-end-of-subtree)
+    (push-mark (point) nil t)
+    (goto-char beg)))
+
+(defun markdown-narrow-to-subtree ()
+  "Narrow buffer to the current subtree."
+  (interactive)
+  (save-excursion
+    (save-match-data
+      (narrow-to-region
+       (progn (markdown-back-to-heading-over-code-block t) (point))
+       (progn (markdown-end-of-subtree)
+              (if (and (markdown-heading-at-point) (not (eobp)))
+                  (backward-char 1))
+              (point))))))
+
+
+;;; Generic Structure Editing, Completion, and Cycling Commands ===============
+
+(defun markdown-move-up ()
+  "Move thing at point up.
+When in a list item, call `markdown-move-list-item-up'.
+When in a table, call `markdown-table-move-row-up'.
+Otherwise, move the current heading subtree up with
+`markdown-move-subtree-up'."
+  (interactive)
+  (cond
+   ((markdown-list-item-at-point-p)
+    (call-interactively #'markdown-move-list-item-up))
+   ((markdown-table-at-point-p)
+    (call-interactively #'markdown-table-move-row-up))
+   (t
+    (call-interactively #'markdown-move-subtree-up))))
+
+(defun markdown-move-down ()
+  "Move thing at point down.
+When in a list item, call `markdown-move-list-item-down'.
+Otherwise, move the current heading subtree up with
+`markdown-move-subtree-down'."
+  (interactive)
+  (cond
+   ((markdown-list-item-at-point-p)
+    (call-interactively #'markdown-move-list-item-down))
+   ((markdown-table-at-point-p)
+    (call-interactively #'markdown-table-move-row-down))
+   (t
+    (call-interactively #'markdown-move-subtree-down))))
+
+(defun markdown-promote ()
+  "Promote or move element at point to the left.
+Depending on the context, this function will promote a heading or
+list item at the point, move a table column to the left, or cycle
+markup."
+  (interactive)
+  (let (bounds)
+    (cond
+     ;; Promote atx heading subtree
+     ((thing-at-point-looking-at markdown-regex-header-atx)
+      (markdown-promote-subtree))
+     ;; Promote setext heading
+     ((thing-at-point-looking-at markdown-regex-header-setext)
+      (markdown-cycle-setext -1))
+     ;; Promote horizontal rule
+     ((thing-at-point-looking-at markdown-regex-hr)
+      (markdown-cycle-hr -1))
+     ;; Promote list item
+     ((setq bounds (markdown-cur-list-item-bounds))
+      (markdown-promote-list-item bounds))
+     ;; Move table column to the left
+     ((markdown-table-at-point-p)
+      (call-interactively #'markdown-table-move-column-left))
+     ;; Promote bold
+     ((thing-at-point-looking-at markdown-regex-bold)
+      (markdown-cycle-bold))
+     ;; Promote italic
+     ((thing-at-point-looking-at markdown-regex-italic)
+      (markdown-cycle-italic))
+     (t
+      (user-error "Nothing to promote at point")))))
+
+(defun markdown-demote ()
+  "Demote or move element at point to the right.
+Depending on the context, this function will demote a heading or
+list item at the point, move a table column to the right, or cycle
+or remove markup."
+  (interactive)
+  (let (bounds)
+    (cond
+     ;; Demote atx heading subtree
+     ((thing-at-point-looking-at markdown-regex-header-atx)
+      (markdown-demote-subtree))
+     ;; Demote setext heading
+     ((thing-at-point-looking-at markdown-regex-header-setext)
+      (markdown-cycle-setext 1))
+     ;; Demote horizontal rule
+     ((thing-at-point-looking-at markdown-regex-hr)
+      (markdown-cycle-hr 1))
+     ;; Demote list item
+     ((setq bounds (markdown-cur-list-item-bounds))
+      (markdown-demote-list-item bounds))
+     ;; Move table column to the right
+     ((markdown-table-at-point-p)
+      (call-interactively #'markdown-table-move-column-right))
+     ;; Demote bold
+     ((thing-at-point-looking-at markdown-regex-bold)
+      (markdown-cycle-bold))
+     ;; Demote italic
+     ((thing-at-point-looking-at markdown-regex-italic)
+      (markdown-cycle-italic))
+     (t
+      (user-error "Nothing to demote at point")))))
+
+
+;;; Commands ==================================================================
+
+(defun markdown (&optional output-buffer-name)
+  "Run `markdown-command' on buffer, sending output to OUTPUT-BUFFER-NAME.
+The output buffer name defaults to `markdown-output-buffer-name'.
+Return the name of the output buffer used."
+  (interactive)
+  (save-window-excursion
+    (let* ((commands (cond ((stringp markdown-command) (split-string markdown-command))
+                           ((listp markdown-command) markdown-command)))
+           (command (car-safe commands))
+           (command-args (cdr-safe commands))
+           begin-region end-region)
+      (if (use-region-p)
+          (setq begin-region (region-beginning)
+                end-region (region-end))
+        (setq begin-region (point-min)
+              end-region (point-max)))
+
+      (unless output-buffer-name
+        (setq output-buffer-name markdown-output-buffer-name))
+      (when (and (stringp command) (not (executable-find command)))
+        (user-error "Markdown command %s is not found" command))
+      (let ((exit-code
+             (cond
+              ;; Handle case when `markdown-command' does not read from stdin
+              ((and (stringp command) markdown-command-needs-filename)
+               (if (not buffer-file-name)
+                   (user-error "Must be visiting a file")
+                 ;; Don’t use ‘shell-command’ because it’s not guaranteed to
+                 ;; return the exit code of the process.
+                 (let ((command (if (listp markdown-command)
+                                    (string-join markdown-command " ")
+                                  markdown-command)))
+                   (shell-command-on-region
+                    ;; Pass an empty region so that stdin is empty.
+                    (point) (point)
+                    (concat command " "
+                            (shell-quote-argument buffer-file-name))
+                    output-buffer-name))))
+              ;; Pass region to `markdown-command' via stdin
+              (t
+               (let ((buf (get-buffer-create output-buffer-name)))
+                 (with-current-buffer buf
+                   (setq buffer-read-only nil)
+                   (erase-buffer))
+                 (if (stringp command)
+                     (if (not (null command-args))
+                         (apply #'call-process-region begin-region end-region command nil (list buf nil) nil command-args)
+                       (call-process-region begin-region end-region command nil (list buf nil)))
+                   (if markdown-command-needs-filename
+                       (if (not buffer-file-name)
+                           (user-error "Must be visiting a file")
+                         (funcall markdown-command begin-region end-region buf buffer-file-name))
+                     (funcall markdown-command begin-region end-region buf))
+                   ;; If the ‘markdown-command’ function didn’t signal an
+                   ;; error, assume it succeeded by binding ‘exit-code’ to 0.
+                   0))))))
+        ;; The exit code can be a signal description string, so don’t use ‘=’
+        ;; or ‘zerop’.
+        (unless (eq exit-code 0)
+          (user-error "%s failed with exit code %s"
+                      markdown-command exit-code))))
+    output-buffer-name))
+
+(defun markdown-standalone (&optional output-buffer-name title)
+  "Special function to provide standalone HTML output.
+Insert the output in the buffer named OUTPUT-BUFFER-NAME.
+Set the HTML title to TITLE if provided, otherwise the name of the
+output buffer."
+  (interactive)
+  (setq output-buffer-name (markdown output-buffer-name))
+  (let ((css-path markdown-css-paths))
+    (with-current-buffer output-buffer-name
+      (set-buffer output-buffer-name)
+      (setq-local markdown-css-paths css-path)
+      (unless (markdown-output-standalone-p)
+        (markdown-add-xhtml-header-and-footer (or title output-buffer-name)))
+      (goto-char (point-min))
+      (html-mode)))
+  output-buffer-name)
+
+(defun markdown-other-window (&optional output-buffer-name)
+  "Run `markdown-command' on current buffer and display in other window.
+When OUTPUT-BUFFER-NAME is given, insert the output in the buffer with
+that name."
+  (interactive)
+  (markdown-display-buffer-other-window
+   (markdown-standalone output-buffer-name)))
+
+(defun markdown-output-standalone-p ()
+  "Determine whether `markdown-command' output is standalone XHTML.
+Standalone XHTML output is identified by an occurrence of
+`markdown-xhtml-standalone-regexp' in the first five lines of output."
+  (save-excursion
+    (goto-char (point-min))
+    (save-match-data
+      (re-search-forward
+       markdown-xhtml-standalone-regexp
+       (save-excursion (goto-char (point-min)) (forward-line 4) (point))
+       t))))
+
+(defun markdown-stylesheet-link-string (stylesheet-path)
+  (concat "<link rel=\"stylesheet\" type=\"text/css\" media=\"all\" href=\""
+          (or (and (string-match-p (rx (or "~" "./" "../")) stylesheet-path)
+                   (expand-file-name stylesheet-path))
+              stylesheet-path)
+          "\"  />"))
+
+(defun markdown-escape-title (title)
+  "Escape a minimum set of characters in TITLE so they don't clash with html."
+  (replace-regexp-in-string ">" "&gt;"
+    (replace-regexp-in-string "<" "&lt;"
+      (replace-regexp-in-string "&" "&amp;" title))))
+
+(defun markdown-add-xhtml-header-and-footer (title)
+  "Wrap XHTML header and footer with given TITLE around current buffer."
+  (goto-char (point-min))
+  (insert "<?xml version=\"1.0\" encoding=\"UTF-8\" ?>\n"
+          "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n"
+          "\t\"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n\n"
+          "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n\n"
+          "<head>\n<title>")
+  (insert (markdown-escape-title title))
+  (insert "</title>\n")
+  (unless (= (length markdown-content-type) 0)
+    (insert
+     (format
+      "<meta http-equiv=\"Content-Type\" content=\"%s;charset=%s\"/>\n"
+      markdown-content-type
+      (or (and markdown-coding-system
+               (coding-system-get markdown-coding-system
+                                  'mime-charset))
+          (coding-system-get buffer-file-coding-system
+                             'mime-charset)
+          "utf-8"))))
+  (if (> (length markdown-css-paths) 0)
+      (insert (mapconcat #'markdown-stylesheet-link-string
+                         markdown-css-paths "\n")))
+  (when (> (length markdown-xhtml-header-content) 0)
+    (insert markdown-xhtml-header-content))
+  (insert "\n</head>\n\n"
+          "<body>\n\n")
+  (when (> (length markdown-xhtml-body-preamble) 0)
+    (insert markdown-xhtml-body-preamble "\n"))
+  (goto-char (point-max))
+  (when (> (length markdown-xhtml-body-epilogue) 0)
+    (insert "\n" markdown-xhtml-body-epilogue))
+  (insert "\n"
+          "</body>\n"
+          "</html>\n"))
+
+(defun markdown-preview (&optional output-buffer-name)
+  "Run `markdown-command' on the current buffer and view output in browser.
+When OUTPUT-BUFFER-NAME is given, insert the output in the buffer with
+that name."
+  (interactive)
+  (browse-url-of-buffer
+   (markdown-standalone (or output-buffer-name markdown-output-buffer-name)
+                        (buffer-name))))
+
+(defun markdown-export-file-name (&optional extension)
+  "Attempt to generate a filename for Markdown output.
+The file extension will be EXTENSION if given, or .html by default.
+If the current buffer is visiting a file, we construct a new
+output filename based on that filename.  Otherwise, return nil."
+  (when (buffer-file-name)
+    (unless extension
+      (setq extension ".html"))
+    (let ((candidate
+           (concat
+            (cond
+             ((buffer-file-name)
+              (file-name-sans-extension (buffer-file-name)))
+             (t (buffer-name)))
+            extension)))
+      (cond
+       ((equal candidate (buffer-file-name))
+        (concat candidate extension))
+       (t
+        candidate)))))
+
+(defun markdown-export (&optional output-file)
+  "Run Markdown on the current buffer, save to file, and return the filename.
+If OUTPUT-FILE is given, use that as the filename.  Otherwise, use the filename
+generated by `markdown-export-file-name', which will be constructed using the
+current filename, but with the extension removed and replaced with .html."
+  (interactive)
+  (unless output-file
+    (setq output-file (markdown-export-file-name ".html")))
+  (when output-file
+    (let* ((init-buf (current-buffer))
+           (init-point (point))
+           (init-buf-string (buffer-string))
+           (output-buffer (find-file-noselect output-file))
+           (output-buffer-name (buffer-name output-buffer)))
+      (run-hooks 'markdown-before-export-hook)
+      (markdown-standalone output-buffer-name)
+      (with-current-buffer output-buffer
+        (run-hooks 'markdown-after-export-hook)
+        (save-buffer)
+        (when markdown-export-kill-buffer (kill-buffer)))
+      ;; if modified, restore initial buffer
+      (when (buffer-modified-p init-buf)
+        (erase-buffer)
+        (insert init-buf-string)
+        (save-buffer)
+        (goto-char init-point))
+      output-file)))
+
+(defun markdown-export-and-preview ()
+  "Export to XHTML using `markdown-export' and browse the resulting file."
+  (interactive)
+  (browse-url-of-file (markdown-export)))
+
+(defvar-local markdown-live-preview-buffer nil
+  "Buffer used to preview markdown output in `markdown-live-preview-export'.")
+
+(defvar-local markdown-live-preview-source-buffer nil
+  "Source buffer from which current buffer was generated.
+This is the inverse of `markdown-live-preview-buffer'.")
+
+(defvar markdown-live-preview-currently-exporting nil)
+
+(defun markdown-live-preview-get-filename ()
+  "Standardize the filename exported by `markdown-live-preview-export'."
+  (markdown-export-file-name ".html"))
+
+(defun markdown-live-preview-window-eww (file)
+  "Preview FILE with eww.
+To be used with `markdown-live-preview-window-function'."
+  (when (and (bound-and-true-p eww-auto-rename-buffer)
+             markdown-live-preview-buffer)
+    (kill-buffer markdown-live-preview-buffer))
+  (eww-open-file file)
+  ;; #737 if `eww-auto-rename-buffer' is non-nil, the buffer name is not  "*eww*"
+  ;; Try to find the buffer whose name ends with "eww*"
+  (if (bound-and-true-p eww-auto-rename-buffer)
+      (cl-loop for buf in (buffer-list)
+               when (string-match-p "eww\\*\\'" (buffer-name buf))
+               return buf)
+    (get-buffer "*eww*")))
+
+(defun markdown-visual-lines-between-points (beg end)
+  (save-excursion
+    (goto-char beg)
+    (cl-loop with count = 0
+             while (progn (end-of-visual-line)
+                          (and (< (point) end) (line-move-visual 1 t)))
+             do (cl-incf count)
+             finally return count)))
+
+(defun markdown-live-preview-window-serialize (buf)
+  "Get window point and scroll data for all windows displaying BUF."
+  (when (buffer-live-p buf)
+    (with-current-buffer buf
+      (mapcar
+       (lambda (win)
+         (with-selected-window win
+           (let* ((start (window-start))
+                  (pt (window-point))
+                  (pt-or-sym (cond ((= pt (point-min)) 'min)
+                                   ((= pt (point-max)) 'max)
+                                   (t pt)))
+                  (diff (markdown-visual-lines-between-points
+                         start pt)))
+             (list win pt-or-sym diff))))
+       (get-buffer-window-list buf)))))
+
+(defun markdown-get-point-back-lines (pt num-lines)
+  (save-excursion
+    (goto-char pt)
+    (line-move-visual (- num-lines) t)
+    ;; in testing, can occasionally overshoot the number of lines to traverse
+    (let ((actual-num-lines (markdown-visual-lines-between-points (point) pt)))
+      (when (> actual-num-lines num-lines)
+        (line-move-visual (- actual-num-lines num-lines) t)))
+    (point)))
+
+(defun markdown-live-preview-window-deserialize (window-posns)
+  "Apply window point and scroll data from WINDOW-POSNS.
+WINDOW-POSNS is provided by `markdown-live-preview-window-serialize'."
+  (cl-destructuring-bind (win pt-or-sym diff) window-posns
+    (when (window-live-p win)
+      (with-current-buffer markdown-live-preview-buffer
+        (set-window-buffer win (current-buffer))
+        (cl-destructuring-bind (actual-pt actual-diff)
+            (cl-case pt-or-sym
+              (min (list (point-min) 0))
+              (max (list (point-max) diff))
+              (t   (list pt-or-sym diff)))
+          (set-window-start
+           win (markdown-get-point-back-lines actual-pt actual-diff))
+          (set-window-point win actual-pt))))))
+
+(defun markdown-live-preview-export ()
+  "Export to XHTML using `markdown-export'.
+Browse the resulting file within Emacs using
+`markdown-live-preview-window-function' Return the buffer
+displaying the rendered output."
+  (interactive)
+  (let ((filename (markdown-live-preview-get-filename)))
+    (when filename
+      (let* ((markdown-live-preview-currently-exporting t)
+             (cur-buf (current-buffer))
+             (export-file (markdown-export filename))
+             ;; get positions in all windows currently displaying output buffer
+             (window-data
+              (markdown-live-preview-window-serialize
+               markdown-live-preview-buffer)))
+        (save-window-excursion
+          (let ((output-buffer
+                 (funcall markdown-live-preview-window-function export-file)))
+            (with-current-buffer output-buffer
+              (setq markdown-live-preview-source-buffer cur-buf)
+              (add-hook 'kill-buffer-hook
+                        #'markdown-live-preview-remove-on-kill t t))
+            (with-current-buffer cur-buf
+              (setq markdown-live-preview-buffer output-buffer))))
+        (with-current-buffer cur-buf
+          ;; reset all windows displaying output buffer to where they were,
+          ;; now with the new output
+          (mapc #'markdown-live-preview-window-deserialize window-data)
+          ;; delete html editing buffer
+          (let ((buf (get-file-buffer export-file))) (when buf (kill-buffer buf)))
+          (when (and export-file (file-exists-p export-file)
+                     (eq markdown-live-preview-delete-export
+                         'delete-on-export))
+            (delete-file export-file))
+          markdown-live-preview-buffer)))))
+
+(defun markdown-live-preview-remove ()
+  (when (buffer-live-p markdown-live-preview-buffer)
+    (kill-buffer markdown-live-preview-buffer))
+  (setq markdown-live-preview-buffer nil)
+  ;; if set to 'delete-on-export, the output has already been deleted
+  (when (eq markdown-live-preview-delete-export 'delete-on-destroy)
+    (let ((outfile-name (markdown-live-preview-get-filename)))
+      (when (and outfile-name (file-exists-p outfile-name))
+        (delete-file outfile-name)))))
+
+(defun markdown-get-other-window ()
+  "Find another window to display preview or output content."
+  (cond
+   ((memq markdown-split-window-direction '(vertical below))
+    (or (window-in-direction 'below) (split-window-vertically)))
+   ((memq markdown-split-window-direction '(horizontal right))
+    (or (window-in-direction 'right) (split-window-horizontally)))
+   (t (split-window-sensibly (get-buffer-window)))))
+
+(defun markdown-display-buffer-other-window (buf)
+  "Display preview or output buffer BUF in another window."
+  (if (and display-buffer-alist (eq markdown-split-window-direction 'any))
+      (display-buffer buf)
+    (let ((cur-buf (current-buffer))
+          (window (markdown-get-other-window)))
+      (set-window-buffer window buf)
+      (set-buffer cur-buf))))
+
+(defun markdown-live-preview-if-markdown ()
+  (when (and (derived-mode-p 'markdown-mode)
+             markdown-live-preview-mode)
+    (unless markdown-live-preview-currently-exporting
+      (if (buffer-live-p markdown-live-preview-buffer)
+          (markdown-live-preview-export)
+        (markdown-display-buffer-other-window
+         (markdown-live-preview-export))))))
+
+(defun markdown-live-preview-remove-on-kill ()
+  (cond ((and (derived-mode-p 'markdown-mode)
+              markdown-live-preview-mode)
+         (markdown-live-preview-remove))
+        (markdown-live-preview-source-buffer
+         (with-current-buffer markdown-live-preview-source-buffer
+           (setq markdown-live-preview-buffer nil))
+         (setq markdown-live-preview-source-buffer nil))))
+
+(defun markdown-live-preview-switch-to-output ()
+  "Turn on `markdown-live-preview-mode' and switch to output buffer.
+The output buffer is opened in another window."
+  (interactive)
+  (if markdown-live-preview-mode
+      (markdown-display-buffer-other-window (markdown-live-preview-export)))
+  (markdown-live-preview-mode))
+
+(defun markdown-live-preview-re-export ()
+  "Re-export the current live previewed content.
+If the current buffer is a buffer displaying the exported version of a
+`markdown-live-preview-mode' buffer, call `markdown-live-preview-export' and
+update this buffer's contents."
+  (interactive)
+  (when markdown-live-preview-source-buffer
+    (with-current-buffer markdown-live-preview-source-buffer
+      (markdown-live-preview-export))))
+
+(defun markdown-open ()
+  "Open file for the current buffer with `markdown-open-command'."
+  (interactive)
+  (unless markdown-open-command
+    (user-error "Variable `markdown-open-command' must be set"))
+  (if (stringp markdown-open-command)
+      (if (not buffer-file-name)
+          (user-error "Must be visiting a file")
+        (save-buffer)
+        (let ((exit-code (call-process markdown-open-command nil nil nil
+                                       buffer-file-name)))
+          ;; The exit code can be a signal description string, so don’t use ‘=’
+          ;; or ‘zerop’.
+          (unless (eq exit-code 0)
+            (user-error "%s failed with exit code %s"
+                        markdown-open-command exit-code))))
+    (funcall markdown-open-command))
+  nil)
+
+(defun markdown-kill-ring-save ()
+  "Run Markdown on file and store output in the kill ring."
+  (interactive)
+  (save-window-excursion
+    (markdown)
+    (with-current-buffer markdown-output-buffer-name
+      (kill-ring-save (point-min) (point-max)))))
+
+
+;;; Links =====================================================================
+
+(defun markdown-backward-to-link-start ()
+  "Backward link start position if current position is in link title."
+  ;; Issue #305
+  (when (eq (get-text-property (point) 'face) 'markdown-link-face)
+    (skip-chars-backward "^[")
+    (forward-char -1)))
+
+(defun markdown-link-p ()
+  "Return non-nil when `point' is at a non-wiki link.
+See `markdown-wiki-link-p' for more information."
+  (save-excursion
+    (let ((case-fold-search nil))
+      (when (and (not (markdown-wiki-link-p)) (not (markdown-code-block-at-point-p)))
+        (markdown-backward-to-link-start)
+        (or (thing-at-point-looking-at markdown-regex-link-inline)
+            (thing-at-point-looking-at markdown-regex-link-reference)
+            (thing-at-point-looking-at markdown-regex-uri)
+            (thing-at-point-looking-at markdown-regex-angle-uri))))))
+
+(defun markdown--unhex-url-string (url)
+  "Unhex control characters and spaces in URL.
+This is similar to `url-unhex-string' but this doesn't unhex all percent-encoded
+characters."
+  (let ((str (or url ""))
+        (tmp "")
+        (case-fold-search t))
+    (while (string-match "%\\([01][0-9a-f]\\|20\\)" str)
+      (let* ((start (match-beginning 0))
+             (ch1 (url-unhex (elt str (+ start 1))))
+             (code (+ (* 16 ch1)
+                      (url-unhex (elt str (+ start 2))))))
+        (setq tmp (concat
+                   tmp (substring str 0 start)
+                   (cond
+                    ((or (= code ?\n) (= code ?\r))
+                     " ")
+                    (t (byte-to-string code))))
+              str (substring str (match-end 0)))))
+    (concat tmp str)))
+
+(defun markdown-link-at-pos (pos)
+  "Return properties of link or image at position POS.
+Value is a list of elements describing the link:
+ 0. beginning position
+ 1. end position
+ 2. link text
+ 3. URL
+ 4. reference label
+ 5. title text
+ 6. bang (nil or \"!\")"
+  (save-excursion
+    (goto-char pos)
+    (markdown-backward-to-link-start)
+    (let (begin end text url reference title bang)
+      (cond
+       ;; Inline image or link at point.
+       ((thing-at-point-looking-at markdown-regex-link-inline)
+        (setq bang (match-string-no-properties 1)
+              begin (match-beginning 0)
+              text (match-string-no-properties 3)
+              url (match-string-no-properties 6))
+        ;; consider nested parentheses
+        ;; if link target contains parentheses, (match-end 0) isn't correct end position of the link
+        (let* ((close-pos (condition-case nil
+                              (scan-sexps (match-beginning 5) 1)
+                            (error (match-end 0))))
+               (destination-part (string-trim (buffer-substring-no-properties (1+ (match-beginning 5)) (1- close-pos)))))
+          (setq end close-pos)
+          ;; A link can contain spaces if it is wrapped with angle brackets
+          (cond ((string-match "\\`<\\(.+\\)>\\'" destination-part)
+                 (setq url (match-string-no-properties 1 destination-part)))
+                ((string-match "\\([^ ]+\\)\\s-+\\(.+\\)" destination-part)
+                 (setq url (match-string-no-properties 1 destination-part)
+                       title (substring (match-string-no-properties 2 destination-part) 1 -1)))
+                (t (setq url destination-part)))
+          (setq url (markdown--unhex-url-string url))))
+       ;; Reference link at point.
+       ((thing-at-point-looking-at markdown-regex-link-reference)
+        (setq bang (match-string-no-properties 1)
+              begin (match-beginning 0)
+              end (match-end 0)
+              text (match-string-no-properties 3))
+        (when (char-equal (char-after (match-beginning 5)) ?\[)
+          (setq reference (match-string-no-properties 6))))
+       ;; Angle bracket URI at point.
+       ((thing-at-point-looking-at markdown-regex-angle-uri)
+        (setq begin (match-beginning 0)
+              end (match-end 0)
+              url (match-string-no-properties 2)))
+       ;; Plain URI at point.
+       ((thing-at-point-looking-at markdown-regex-uri)
+        (setq begin (match-beginning 0)
+              end (match-end 0)
+              url (match-string-no-properties 1))))
+      (list begin end text url reference title bang))))
+
+(defun markdown-link-url ()
+  "Return the URL part of the regular (non-wiki) link at point.
+Works with both inline and reference style links, and with images.
+If point is not at a link or the link reference is not defined
+returns nil."
+  (let* ((values (markdown-link-at-pos (point)))
+         (text (nth 2 values))
+         (url (nth 3 values))
+         (ref (nth 4 values)))
+    (or url (and ref (car (markdown-reference-definition
+                           (downcase (if (string= ref "") text ref))))))))
+
+(defun markdown--browse-url (url)
+  (let* ((struct (url-generic-parse-url url))
+         (full (url-fullness struct))
+         (file url))
+    ;; Parse URL, determine fullness, strip query string
+    (setq file (car (url-path-and-query struct)))
+    ;; Open full URLs in browser, files in Emacs
+    (if full
+        (browse-url url)
+      (when (and file (> (length file) 0))
+        (let ((link-file (funcall markdown-translate-filename-function file)))
+          (if (and markdown-open-image-command (string-match-p (image-file-name-regexp) link-file))
+              (if (functionp markdown-open-image-command)
+                  (funcall markdown-open-image-command link-file)
+                (process-file markdown-open-image-command nil nil nil link-file))
+            (find-file link-file)))))))
+
+(defun markdown-follow-link-at-point (&optional event)
+  "Open the non-wiki link at point or EVENT.
+If the link is a complete URL, open in browser with `browse-url'.
+Otherwise, open with `find-file' after stripping anchor and/or query string.
+Translate filenames using `markdown-filename-translate-function'."
+  (interactive (list last-command-event))
+  (if event (posn-set-point (event-start event)))
+  (if (markdown-link-p)
+      (or (run-hook-with-args-until-success 'markdown-follow-link-functions (markdown-link-url))
+          (markdown--browse-url (markdown-link-url)))
+    (user-error "Point is not at a Markdown link or URL")))
+
+(defun markdown-fontify-inline-links (last)
+  "Add text properties to next inline link from point to LAST."
+  (when (markdown-match-generic-links last nil)
+    (let* ((link-start (match-beginning 3))
+           (link-end (match-end 3))
+           (url-start (match-beginning 6))
+           (url-end (match-end 6))
+           (url (match-string-no-properties 6))
+           (title-start (match-beginning 7))
+           (title-end (match-end 7))
+           (title (match-string-no-properties 7))
+           (url-char (markdown--first-displayable markdown-url-compose-char)))
+      (dolist (g '(1 2 4 5 8))
+        (when (match-end g)
+          (add-text-properties (match-beginning g) (match-end g) markdown--markup-props)
+          (add-face-text-property (match-beginning g) (match-end g) 'markdown-markup-face)))
+      ;; Preserve existing faces applied to link part (e.g., inline code)
+      (when link-start
+        (add-text-properties link-start link-end (markdown--link-props url title))
+        (add-face-text-property link-start link-end 'markdown-link-face))
+      (when url-start
+        (add-text-properties url-start url-end (markdown--url-props))
+        (add-face-text-property url-start url-end 'markdown-url-face))
+      (when title-start
+        (add-text-properties url-end title-end markdown--title-props)
+        (add-face-text-property url-end title-end 'markdown-link-title-face))
+      (when (and markdown-hide-urls url-start)
+        (compose-region url-start (or title-end url-end) url-char))
+      t)))
+
+(defun markdown-fontify-reference-links (last)
+  "Add text properties to next reference link from point to LAST."
+  (when (markdown-match-generic-links last t)
+    (let* ((link-start (match-beginning 3))
+           (link-end (match-end 3))
+           (ref-start (match-beginning 6))
+           (ref-end (match-end 6))
+           ;; Link properties
+           (lp (list 'keymap markdown-mode-mouse-map
+                     'font-lock-multiline t
+                     'help-echo (lambda (_ __ pos)
+                                  (save-match-data
+                                    (save-excursion
+                                      (goto-char pos)
+                                      (or (markdown-link-url)
+                                          "Undefined reference"))))))
+           ;; URL composition character
+           (url-char (markdown--first-displayable markdown-url-compose-char))
+           ;; Reference properties
+           (rp (list 'invisible 'markdown-markup
+                     'font-lock-multiline t)))
+      (when markdown-mouse-follow-link
+        (setq lp (append lp '(mouse-face markdown-highlight-face))))
+      (dolist (g '(1 2 4 5 8))
+        (when (match-end g)
+          (add-text-properties (match-beginning g) (match-end g) markdown--markup-props)
+          (add-face-text-property (match-beginning g) (match-end g) 'markdown-markup-face)))
+      (when link-start
+        (add-text-properties link-start link-end lp)
+        (add-face-text-property link-start link-end 'markdown-link-face))
+      (when ref-start
+        (add-text-properties ref-start ref-end rp)
+        (add-face-text-property ref-start ref-end 'markdown-reference-face)
+        (when (and markdown-hide-urls (> (- ref-end ref-start) 2))
+          (compose-region ref-start ref-end url-char)))
+      t)))
+
+(defun markdown-fontify-wiki-links (last)
+  "Add text properties to next wiki link from point to LAST."
+  (when (and markdown-enable-wiki-links
+             (markdown-match-inline-generic markdown-regex-wiki-link last))
+    (let* ((begin (match-beginning 1))
+           (end (match-end 1))
+           (beg2 (match-beginning 2))
+           (end2 (match-end 2))
+           (beg3 (match-beginning 3))
+           (end3 (match-end 3))
+           (beg4 (match-beginning 4))
+           (end4 (match-end 4))
+           (beg5 (match-beginning 5))
+           (end5 (match-end 5))
+           (beg6 (match-beginning 6))
+           (end6 (match-end 6))
+           (part1 (match-string-no-properties 3))
+           (part2 (match-string-no-properties 5))
+           (aliasp (string-equal (match-string-no-properties 4) "|"))
+           (file-name (markdown-convert-wiki-link-to-filename (markdown-wiki-link-link)))
+           (file-missing-p (not (file-exists-p file-name))))
+      (if (or (markdown-in-comment-p begin)
+              (markdown-in-comment-p end)
+              (markdown-inline-code-at-pos-p begin)
+              (markdown-inline-code-at-pos-p end)
+              (markdown-code-block-at-pos begin))
+          (progn (goto-char (min (1+ begin) last))
+                 (when (< (point) last)
+                   (markdown-fontify-wiki-links last)))
+        ;; Add text properties for hiding markup
+        (progn
+          ;; Propertize opening and closing brackets
+          (add-text-properties    beg2 end2 markdown--markup-props)
+          (add-face-text-property beg2 end2 'markdown-markup-face)
+          (add-text-properties    beg6 end6 markdown--markup-props)
+          (add-face-text-property beg6 end6 'markdown-markup-face)
+          (if aliasp
+              (progn
+                ;; Propertize pipe separating URL from link text
+                (add-text-properties    beg4 end4 markdown--markup-props)
+                (add-face-text-property beg4 end4 'markdown-markup-face)
+                (if markdown-wiki-link-alias-first
+                    (progn
+                      ;; Properties alias portion of link
+                      (add-text-properties    beg3 end3 (markdown--link-props part2))
+                      (add-face-text-property beg3 end3 'markdown-link-face)
+                      (add-text-properties    beg5 end5 (markdown--url-props))
+                      (add-text-properties    beg5 end5 '(invisible markdown-markup))
+                      (add-face-text-property beg5 end5 'markdown-url-face)
+                      (when (and file-missing-p markdown-wiki-link-fontify-missing)
+                        (put-text-property beg3 end3 'face 'markdown-missing-link-face)))
+                  (progn
+                    ;; Properties URL portion of link
+                    (add-text-properties    beg3 end3 (markdown--url-props))
+                    (add-text-properties    beg3 end3 '(invisible markdown-markup))
+                    (add-face-text-property beg3 end3 'markdown-url-face)
+                    (add-text-properties    beg5 end5 (markdown--link-props part1))
+                    (add-face-text-property beg5 end5 'markdown-link-face)
+                    (when (and file-missing-p markdown-wiki-link-fontify-missing)
+                      (put-text-property beg5 end5 'face 'markdown-missing-link-face)))))
+            (progn
+              ;; Properties link as link text
+              (add-text-properties    beg3 end3 (markdown--link-props part1))
+              (add-face-text-property beg3 end3 'markdown-link-face)
+              (when (and file-missing-p markdown-wiki-link-fontify-missing)
+                (put-text-property beg3 end3 'face 'markdown-missing-link-face)))))
+        (set-match-data (list begin end))
+        t))))
+
+(defun markdown-fontify-angle-uris (last)
+  "Add text properties to angle URIs from point to LAST."
+  (when (markdown-match-angle-uris last)
+    (let ((url-start (match-beginning 2))
+          (url-end (match-end 2)))
+      (unless (or (markdown-in-inline-code-p url-start)
+                  (markdown-in-inline-code-p url-end))
+        (let ((mp (append '(face markdown-markup-face) (cl-copy-list markdown--markup-props)))
+              ;; URI part
+              (up (list 'keymap markdown-mode-mouse-map
+                        'face 'markdown-plain-url-face
+                        'font-lock-multiline t)))
+          (when markdown-mouse-follow-link
+            (setq up (append up '(mouse-face markdown-highlight-face))))
+          (dolist (g '(1 3))
+            (add-text-properties (match-beginning g) (match-end g) mp))
+          (add-text-properties url-start url-end up)
+          t)))))
+
+(defun markdown-fontify-plain-uris (last)
+  "Add text properties to plain URLs from point to LAST."
+  (when (markdown-match-plain-uris last)
+    (let* ((start (match-beginning 0))
+           (end (match-end 0))
+           (props (list 'keymap markdown-mode-mouse-map
+                        'face 'markdown-plain-url-face
+                        'rear-nonsticky t
+                        'font-lock-multiline t)))
+      (when markdown-mouse-follow-link
+        (setq props (append props '(mouse-face markdown-highlight-face))))
+      (add-text-properties start end props)
+      t)))
+
+(defun markdown-toggle-url-hiding (&optional arg)
+  "Toggle the display or hiding of URLs.
+With a prefix argument ARG, enable URL hiding if ARG is positive,
+and disable it otherwise."
+  (interactive (list (or current-prefix-arg 'toggle)))
+  (setq markdown-hide-urls
+        (if (eq arg 'toggle)
+            (not markdown-hide-urls)
+          (> (prefix-numeric-value arg) 0)))
+  (when (called-interactively-p 'interactive)
+    (message "markdown-mode URL hiding %s" (if markdown-hide-urls "enabled" "disabled")))
+  (markdown-reload-extensions))
+
+
+;;; Wiki Links ================================================================
+
+(defun markdown-wiki-link-p ()
+  "Return non-nil if wiki links are enabled and `point' is at a true wiki link.
+A true wiki link name matches `markdown-regex-wiki-link' but does
+not match the current file name after conversion.  This modifies
+the data returned by `match-data'.  Note that the potential wiki
+link name must be available via `match-string'."
+  (when markdown-enable-wiki-links
+    (let ((case-fold-search nil))
+      (and (thing-at-point-looking-at markdown-regex-wiki-link)
+           (not (markdown-code-block-at-point-p))
+           (or (not buffer-file-name)
+               (not (string-equal (buffer-file-name)
+                                  (markdown-convert-wiki-link-to-filename
+                                   (markdown-wiki-link-link)))))))))
+
+(defun markdown-wiki-link-link ()
+  "Return the link part of the wiki link using current match data.
+The location of the link component depends on the value of
+`markdown-wiki-link-alias-first'."
+  (if markdown-wiki-link-alias-first
+      (or (match-string-no-properties 5) (match-string-no-properties 3))
+    (match-string-no-properties 3)))
+
+(defun markdown-wiki-link-alias ()
+  "Return the alias or text part of the wiki link using current match data.
+The location of the alias component depends on the value of
+`markdown-wiki-link-alias-first'."
+  (if markdown-wiki-link-alias-first
+      (match-string-no-properties 3)
+    (or (match-string-no-properties 5) (match-string-no-properties 3))))
+
+(defun markdown--wiki-link-search-types ()
+  "Return a list of the currently selected search types.
+
+Due to deprecated variables, as of markdown-mode version 2.5, the return value
+of this function is the same as the value of the variable
+`markdown-wiki-link-search-type'."
+  (let ((ret (and markdown-wiki-link-search-type
+                  (cl-copy-list markdown-wiki-link-search-type))))
+    (when (and markdown-wiki-link-search-subdirectories
+               (not (memq 'sub-directories markdown-wiki-link-search-type)))
+      (push 'sub-directories ret))
+    (when (and markdown-wiki-link-search-parent-directories
+               (not (memq 'parent-directories markdown-wiki-link-search-type)))
+      (push 'parent-directories ret))
+    ret))
+
+(defun markdown--project-root ()
+  "Try various approaches to find the project root."
+  (or (cl-loop for dir in '(".git" ".hg" ".svn")
+               when (locate-dominating-file default-directory dir)
+               return it)
+      (progn
+        (require 'project)
+        (let ((project (project-current t)))
+          (with-no-warnings
+            (if (fboundp 'project-root)
+                (project-root project)
+              (car (project-roots project))))))))
+
+(defun markdown-convert-wiki-link-to-filename (name)
+  "Generate a filename from the wiki link NAME.
+Spaces in NAME are replaced with `markdown-link-space-sub-char'.
+Search depth is determined by `markdown-wiki-link-search-type'.
+When in `gfm-mode', follow GitHub's conventions where [[Test Test]]
+and [[test test]] both map to Test-test.ext."
+  (save-match-data
+    ;; This function must not overwrite match data(PR #590)
+    (let* ((basename (replace-regexp-in-string
+                      "[[:space:]\n]" markdown-link-space-sub-char name))
+           (basename (if (and (derived-mode-p 'gfm-mode) (not markdown-wiki-link-retain-case))
+                         (concat (upcase (substring basename 0 1))
+                                 (downcase (substring basename 1 nil)))
+                       basename))
+           (search-types (markdown--wiki-link-search-types))
+           directory extension default candidates dir)
+      (when buffer-file-name
+        (setq directory (file-name-directory buffer-file-name)
+              extension (file-name-extension buffer-file-name)))
+      (setq default (concat basename
+                            (when extension (concat "." extension))))
+      (cond
+       ;; Look in current directory first.
+       ((or (null buffer-file-name)
+            (file-exists-p default))
+        default)
+       ;; Possibly search in subdirectories, next.
+       ((and (memq 'sub-directories search-types)
+             (setq candidates
+                   (directory-files-recursively
+                    directory (concat "^" default "$"))))
+        (car candidates))
+       ;; Possibly search in parent directories as a last resort.
+       ((and (memq 'parent-directories search-types)
+             (setq dir (locate-dominating-file directory default)))
+        (concat dir default))
+       ((and (memq 'project search-types)
+             (setq candidates
+                   (directory-files-recursively
+                    (markdown--project-root) (concat "^" default "$"))))
+        (car candidates))
+       ;; If nothing is found, return default in current directory.
+       (t default)))))
+
+(defun markdown-follow-wiki-link (name &optional other)
+  "Follow the wiki link NAME.
+Convert the name to a file name and call `find-file'.  Ensure that
+the new buffer remains in `markdown-mode'.  Open the link in another
+window when OTHER is non-nil."
+  (let ((filename (markdown-convert-wiki-link-to-filename name))
+        (wp (when buffer-file-name
+              (file-name-directory buffer-file-name))))
+    (if (not wp)
+        (user-error "Must be visiting a file")
+      (when other (other-window 1))
+      (let ((default-directory wp))
+        (find-file filename)))
+    (unless (derived-mode-p 'markdown-mode)
+      (markdown-mode))))
+
+(defun markdown-follow-wiki-link-at-point (&optional arg)
+  "Find Wiki Link at point.
+With prefix argument ARG, open the file in other window.
+See `markdown-wiki-link-p' and `markdown-follow-wiki-link'."
+  (interactive "P")
+  (if (markdown-wiki-link-p)
+      (markdown-follow-wiki-link (markdown-wiki-link-link) arg)
+    (user-error "Point is not at a Wiki Link")))
+
+(defun markdown-highlight-wiki-link (from to face)
+  "Highlight the wiki link in the region between FROM and TO using FACE."
+  (put-text-property from to 'font-lock-face face))
+
+(defun markdown-unfontify-region-wiki-links (from to)
+  "Remove wiki link faces from the region specified by FROM and TO."
+  (interactive "*r")
+  (let ((modified (buffer-modified-p)))
+    (remove-text-properties from to '(font-lock-face markdown-link-face))
+    (remove-text-properties from to '(font-lock-face markdown-missing-link-face))
+    ;; remove-text-properties marks the buffer modified in emacs 24.3,
+    ;; undo that if it wasn't originally marked modified
+    (set-buffer-modified-p modified)))
+
+(defun markdown-fontify-region-wiki-links (from to)
+  "Search region given by FROM and TO for wiki links and fontify them.
+If a wiki link is found check to see if the backing file exists
+and highlight accordingly."
+  (goto-char from)
+  (save-match-data
+    (while (re-search-forward markdown-regex-wiki-link to t)
+      (when (not (markdown-code-block-at-point-p))
+        (let ((highlight-beginning (match-beginning 1))
+              (highlight-end (match-end 1))
+              (file-name
+               (markdown-convert-wiki-link-to-filename
+                (markdown-wiki-link-link))))
+          (with-no-warnings
+            (if (condition-case nil (file-exists-p file-name) (error nil))
+                (markdown-highlight-wiki-link
+                 highlight-beginning highlight-end 'markdown-link-face)
+              (markdown-highlight-wiki-link
+               highlight-beginning highlight-end 'markdown-missing-link-face))))))))
+
+(defun markdown-extend-changed-region (from to)
+  "Extend region given by FROM and TO so that we can fontify all links.
+The region is extended to the first newline before and the first
+newline after."
+  ;; start looking for the first new line before 'from
+  (goto-char from)
+  (re-search-backward "\n" nil t)
+  (let ((new-from (point-min))
+        (new-to (point-max)))
+    (if (not (= (point) from))
+        (setq new-from (point)))
+    ;; do the same thing for the first new line after 'to
+    (goto-char to)
+    (re-search-forward "\n" nil t)
+    (if (not (= (point) to))
+        (setq new-to (point)))
+    (cl-values new-from new-to)))
+
+(defun markdown-check-change-for-wiki-link (from to)
+  "Check region between FROM and TO for wiki links and re-fontify as needed."
+  (interactive "*r")
+  (let* ((modified (buffer-modified-p))
+         (buffer-undo-list t)
+         (inhibit-read-only t)
+         deactivate-mark
+         buffer-file-truename)
+    (unwind-protect
+        (save-excursion
+          (save-match-data
+            (save-restriction
+              (cursor-intangible-mode +1) ;; inhibit-point-motion-hooks is obsoleted since Emacs 29
+              ;; Extend the region to fontify so that it starts
+              ;; and ends at safe places.
+              (cl-multiple-value-bind (new-from new-to)
+                  (with-no-warnings
+                    (markdown-extend-changed-region from to))
+                (goto-char new-from)
+                ;; Only refontify when the range contains text with a
+                ;; wiki link face or if the wiki link regexp matches.
+                (when (or (markdown-range-property-any
+                           new-from new-to 'font-lock-face
+                           '(markdown-link-face markdown-missing-link-face))
+                          (re-search-forward
+                           markdown-regex-wiki-link new-to t))
+                  (with-no-warnings
+                   ;; Unfontify existing fontification (start from scratch)
+                   (markdown-unfontify-region-wiki-links new-from new-to)
+                   ;; Now do the fontification.
+                   (markdown-fontify-region-wiki-links new-from new-to)))))))
+      (cursor-intangible-mode -1)
+      (and (not modified)
+           (buffer-modified-p)
+           (set-buffer-modified-p nil)))))
+
+(defun markdown-check-change-for-wiki-link-after-change (from to _)
+  "Check region between FROM and TO for wiki links and re-fontify as needed.
+Designed to be used with the `after-change-functions' hook."
+  (with-no-warnings
+    (markdown-check-change-for-wiki-link from to)))
+
+(defun markdown-fontify-buffer-wiki-links ()
+  "Refontify all wiki links in the buffer."
+  (interactive)
+  (with-no-warnings
+    (markdown-check-change-for-wiki-link (point-min) (point-max))))
+
+(defun markdown-toggle-wiki-links (&optional arg)
+  "Toggle support for wiki links.
+With a prefix argument ARG, enable wiki link support if ARG is positive,
+and disable it otherwise."
+  (interactive (list (or current-prefix-arg 'toggle)))
+  (setq markdown-enable-wiki-links
+        (if (eq arg 'toggle)
+            (not markdown-enable-wiki-links)
+          (> (prefix-numeric-value arg) 0)))
+  (when (called-interactively-p 'interactive)
+    (message "markdown-mode wiki link support %s"
+             (if markdown-enable-wiki-links "enabled" "disabled")))
+  (markdown-reload-extensions))
+
+(defun markdown-setup-wiki-link-hooks ()
+  "Add or remove hooks for fontifying wiki links.
+These are only enabled when `markdown-wiki-link-fontify-missing' is non-nil."
+  ;; Anytime text changes make sure it gets fontified correctly
+  (with-no-warnings
+    (if (and markdown-enable-wiki-links
+             markdown-wiki-link-fontify-missing)
+        (add-hook 'after-change-functions
+                  #'markdown-check-change-for-wiki-link-after-change t t)
+      (remove-hook 'after-change-functions
+                   #'markdown-check-change-for-wiki-link-after-change t))
+    ;; If we left the buffer there is a really good chance we were
+    ;; creating one of the wiki link documents. Make sure we get
+    ;; refontified when we come back.
+    (if (and markdown-enable-wiki-links
+             markdown-wiki-link-fontify-missing)
+        (progn
+          (add-hook 'window-configuration-change-hook
+                    #'markdown-fontify-buffer-wiki-links t t)
+          (markdown-fontify-buffer-wiki-links))
+      (remove-hook 'window-configuration-change-hook
+                   #'markdown-fontify-buffer-wiki-links t)
+      (with-no-warnings
+        (markdown-unfontify-region-wiki-links (point-min) (point-max)))))  )
+
+
+;;; Following & Doing =========================================================
+
+(defun markdown-follow-thing-at-point (arg)
+  "Follow thing at point if possible, such as a reference link or wiki link.
+Opens inline and reference links in a browser.  Opens wiki links
+to other files in the current window, or the another window if
+ARG is non-nil.
+See `markdown-follow-link-at-point' and
+`markdown-follow-wiki-link-at-point'."
+  (interactive "P")
+  (cond ((markdown-link-p)
+         (markdown-follow-link-at-point))
+        ((markdown-wiki-link-p)
+         (markdown-follow-wiki-link-at-point arg))
+        (t
+         (let* ((values (markdown-link-at-pos (point)))
+                (url (nth 3 values)))
+           (unless url
+             (user-error "Nothing to follow at point"))
+           (markdown--browse-url url)))))
+
+(defun markdown-do ()
+  "Do something sensible based on context at point.
+Jumps between reference links and definitions; between footnote
+markers and footnote text."
+  (interactive)
+  (cond
+   ;; Footnote definition
+   ((markdown-footnote-text-positions)
+    (markdown-footnote-return))
+   ;; Footnote marker
+   ((markdown-footnote-marker-positions)
+    (markdown-footnote-goto-text))
+   ;; Reference link
+   ((thing-at-point-looking-at markdown-regex-link-reference)
+    (markdown-reference-goto-definition))
+   ;; Reference definition
+   ((thing-at-point-looking-at markdown-regex-reference-definition)
+    (markdown-reference-goto-link (match-string-no-properties 2)))
+   ;; Link
+   ((or (markdown-link-p) (markdown-wiki-link-p))
+    (markdown-follow-thing-at-point nil))
+   ;; GFM task list item
+   ((markdown-gfm-task-list-item-at-point)
+    (markdown-toggle-gfm-checkbox))
+   ;; Align table
+   ((markdown-table-at-point-p)
+    (call-interactively #'markdown-table-align))
+   ;; Otherwise
+   (t
+    (markdown-insert-gfm-checkbox))))
+
+
+;;; Miscellaneous =============================================================
+
+(defun markdown-compress-whitespace-string (str)
+  "Compress whitespace in STR and return result.
+Leading and trailing whitespace is removed.  Sequences of multiple
+spaces, tabs, and newlines are replaced with single spaces."
+  (replace-regexp-in-string "\\(^[ \t\n]+\\|[ \t\n]+$\\)" ""
+                            (replace-regexp-in-string "[ \t\n]+" " " str)))
+
+(defun markdown--substitute-command-keys (string)
+  "Like `substitute-command-keys' but, but prefers control characters.
+First pass STRING to `substitute-command-keys' and then
+substitute `C-i` for `TAB` and `C-m` for `RET`."
+  (replace-regexp-in-string
+   "\\<TAB\\>" "C-i"
+   (replace-regexp-in-string
+    "\\<RET\\>" "C-m" (substitute-command-keys string) t) t))
+
+(defun markdown-line-number-at-pos (&optional pos)
+  "Return (narrowed) buffer line number at position POS.
+If POS is nil, use current buffer location.
+This is an exact copy of `line-number-at-pos' for use in emacs21."
+  (let ((opoint (or pos (point))) start)
+    (save-excursion
+      (goto-char (point-min))
+      (setq start (point))
+      (goto-char opoint)
+      (forward-line 0)
+      (1+ (count-lines start (point))))))
+
+(defun markdown-inside-link-p ()
+  "Return t if point is within a link."
+  (save-match-data
+    (thing-at-point-looking-at (markdown-make-regex-link-generic))))
+
+(defun markdown-line-is-reference-definition-p ()
+  "Return whether the current line is a (non-footnote) reference definition."
+  (save-excursion
+    (move-beginning-of-line 1)
+    (and (looking-at-p markdown-regex-reference-definition)
+         (not (looking-at-p "[ \t]*\\[^")))))
+
+(defun markdown-adaptive-fill-function ()
+  "Return prefix for filling paragraph or nil if not determined."
+  (cond
+   ;; List item inside blockquote
+   ((looking-at "^[ \t]*>[ \t]*\\(\\(?:[0-9]+\\|#\\)\\.\\|[*+:-]\\)[ \t]+")
+    (replace-regexp-in-string
+     "[0-9\\.*+-]" " " (match-string-no-properties 0)))
+   ;; Blockquote
+   ((looking-at markdown-regex-blockquote)
+    (buffer-substring-no-properties (match-beginning 0) (match-end 2)))
+   ;; List items
+   ((looking-at markdown-regex-list)
+    (match-string-no-properties 0))
+   ;; Footnote definition
+   ((looking-at-p markdown-regex-footnote-definition)
+    "    ") ; four spaces
+   ;; No match
+   (t nil)))
+
+(defun markdown-fill-paragraph (&optional justify)
+  "Fill paragraph at or after point.
+This function is like \\[fill-paragraph], but it skips Markdown
+code blocks.  If the point is in a code block, or just before one,
+do not fill.  Otherwise, call `fill-paragraph' as usual. If
+JUSTIFY is non-nil, justify text as well.  Since this function
+handles filling itself, it always returns t so that
+`fill-paragraph' doesn't run."
+  (interactive "P")
+  (unless (or (markdown-code-block-at-point-p)
+              (save-excursion
+                (back-to-indentation)
+                (skip-syntax-forward "-")
+                (markdown-code-block-at-point-p)))
+    (let ((fill-prefix (save-excursion
+                         (goto-char (line-beginning-position))
+                         (when (looking-at "\\([ \t]*>[ \t]*\\(?:>[ \t]*\\)+\\)")
+                           (match-string-no-properties 1)))))
+      (fill-paragraph justify)))
+  t)
+
+(defun markdown-fill-forward-paragraph (&optional arg)
+  "Function used by `fill-paragraph' to move over ARG paragraphs.
+This is a `fill-forward-paragraph-function' for `markdown-mode'.
+It is called with a single argument specifying the number of
+paragraphs to move.  Just like `forward-paragraph', it should
+return the number of paragraphs left to move."
+  (or arg (setq arg 1))
+  (if (> arg 0)
+      ;; With positive ARG, move across ARG non-code-block paragraphs,
+      ;; one at a time.  When passing a code block, don't decrement ARG.
+      (while (and (not (eobp))
+                  (> arg 0)
+                  (= (forward-paragraph 1) 0)
+                  (or (markdown-code-block-at-pos (line-beginning-position 0))
+                      (setq arg (1- arg)))))
+    ;; Move backward by one paragraph with negative ARG (always -1).
+    (let ((start (point)))
+      (setq arg (forward-paragraph arg))
+      (while (and (not (eobp))
+                  (progn (move-to-left-margin) (not (eobp)))
+                  (looking-at-p paragraph-separate))
+        (forward-line 1))
+      (cond
+       ;; Move point past whitespace following list marker.
+       ((looking-at markdown-regex-list)
+        (goto-char (match-end 0)))
+       ;; Move point past whitespace following pipe at beginning of line
+       ;; to handle Pandoc line blocks.
+       ((looking-at "^|\\s-*")
+        (goto-char (match-end 0)))
+       ;; Return point if the paragraph passed was a code block.
+       ((markdown-code-block-at-pos (line-beginning-position 2))
+        (goto-char start)))))
+  arg)
+
+(defun markdown--inhibit-electric-quote ()
+  "Function added to `electric-quote-inhibit-functions'.
+Return non-nil if the quote has been inserted inside a code block
+or span."
+  (let ((pos (1- (point))))
+    (or (markdown-inline-code-at-pos pos)
+        (markdown-code-block-at-pos pos))))
+
+
+;;; Extension Framework =======================================================
+
+(defun markdown-reload-extensions ()
+  "Check settings, update font-lock keywords and hooks, and re-fontify buffer."
+  (interactive)
+  (when (derived-mode-p 'markdown-mode)
+    ;; Refontify buffer
+    (font-lock-flush)))
+
+(defun markdown-handle-local-variables ()
+  "Run in `hack-local-variables-hook' to update font lock rules.
+Checks to see if there is actually a ‘markdown-mode’ file local variable
+before regenerating font-lock rules for extensions."
+  (when (or (assoc 'markdown-enable-wiki-links file-local-variables-alist)
+            (assoc 'markdown-enable-math file-local-variables-alist))
+    (when (assoc 'markdown-enable-math file-local-variables-alist)
+      (markdown-toggle-math markdown-enable-math))
+    (markdown-reload-extensions)))
+
+
+;;; Math Support ==============================================================
+
+(defconst markdown-mode-font-lock-keywords-math
+  (list
+   ;; Equation reference (eq:foo)
+   '("\\((eq:\\)\\([[:alnum:]:_]+\\)\\()\\)" . ((1 markdown-markup-face)
+                                                (2 markdown-reference-face)
+                                                (3 markdown-markup-face)))
+   ;; Equation reference \eqref{foo}
+   '("\\(\\\\eqref{\\)\\([[:alnum:]:_]+\\)\\(}\\)" . ((1 markdown-markup-face)
+                                                      (2 markdown-reference-face)
+                                                      (3 markdown-markup-face))))
+  "Font lock keywords to add and remove when toggling math support.")
+
+(defun markdown-toggle-math (&optional arg)
+  "Toggle support for inline and display LaTeX math expressions.
+With a prefix argument ARG, enable math mode if ARG is positive,
+and disable it otherwise.  If called from Lisp, enable the mode
+if ARG is omitted or nil."
+  (interactive (list (or current-prefix-arg 'toggle)))
+  (setq markdown-enable-math
+        (if (eq arg 'toggle)
+            (not markdown-enable-math)
+          (> (prefix-numeric-value arg) 0)))
+  (if markdown-enable-math
+      (font-lock-add-keywords
+       'markdown-mode markdown-mode-font-lock-keywords-math)
+    (font-lock-remove-keywords
+     'markdown-mode markdown-mode-font-lock-keywords-math))
+  (when (called-interactively-p 'interactive)
+    (message "markdown-mode math support %s" (if markdown-enable-math "enabled" "disabled")))
+  (markdown-reload-extensions))
+
+
+;;; GFM Checkboxes ============================================================
+
+(define-button-type 'markdown-gfm-checkbox-button
+  'follow-link t
+  'face 'markdown-gfm-checkbox-face
+  'mouse-face 'markdown-highlight-face
+  'action #'markdown-toggle-gfm-checkbox-button)
+
+(defun markdown-gfm-task-list-item-at-point (&optional bounds)
+  "Return non-nil if there is a GFM task list item at the point.
+Optionally, the list item BOUNDS may be given if available, as
+returned by `markdown-cur-list-item-bounds'.  When a task list item
+is found, the return value is the same value returned by
+`markdown-cur-list-item-bounds'."
+  (unless bounds
+    (setq bounds (markdown-cur-list-item-bounds)))
+  (> (length (nth 5 bounds)) 0))
+
+(defun markdown-insert-gfm-checkbox ()
+  "Add GFM checkbox at point.
+Returns t if added.
+Returns nil if non-applicable."
+  (interactive)
+  (let ((bounds (markdown-cur-list-item-bounds)))
+    (if bounds
+        (unless (cl-sixth bounds)
+          (let ((pos (+ (cl-first bounds) (cl-fourth bounds)))
+                (markup "[ ] "))
+            (if (< pos (point))
+                (save-excursion
+                  (goto-char pos)
+                  (insert markup))
+              (goto-char pos)
+              (insert markup))
+            (syntax-propertize (+ (cl-second bounds) 4))
+            t))
+      (unless (save-excursion
+                (back-to-indentation)
+                (or (markdown-list-item-at-point-p)
+                    (markdown-heading-at-point)
+                    (markdown-in-comment-p)
+                    (markdown-code-block-at-point-p)))
+        (let ((pos (save-excursion
+                     (back-to-indentation)
+                     (point)))
+              (markup (concat (or (save-excursion
+                                    (beginning-of-line 0)
+                                    (cl-fifth (markdown-cur-list-item-bounds)))
+                                  markdown-unordered-list-item-prefix)
+                              "[ ] ")))
+          (if (< pos (point))
+              (save-excursion
+                (goto-char pos)
+                (insert markup))
+            (goto-char pos)
+            (insert markup))
+          (syntax-propertize (line-end-position))
+          t)))))
+
+(defun markdown-toggle-gfm-checkbox ()
+  "Toggle GFM checkbox at point.
+Returns the resulting status as a string, either \"[x]\" or \"[ ]\".
+Returns nil if there is no task list item at the point."
+  (interactive)
+  (save-match-data
+    (save-excursion
+      (let ((bounds (markdown-cur-list-item-bounds)))
+        (when bounds
+          ;; Move to beginning of task list item
+          (goto-char (cl-first bounds))
+          ;; Advance to column of first non-whitespace after marker
+          (forward-char (cl-fourth bounds))
+          (cond ((looking-at "\\[ \\]")
+                 (replace-match
+                  (if markdown-gfm-uppercase-checkbox "[X]" "[x]")
+                  nil t)
+                 (match-string-no-properties 0))
+                ((looking-at "\\[[xX]\\]")
+                 (replace-match "[ ]" nil t)
+                 (match-string-no-properties 0))))))))
+
+(defun markdown-toggle-gfm-checkbox-button (button)
+  "Toggle GFM checkbox BUTTON on click."
+  (save-match-data
+    (save-excursion
+      (goto-char (button-start button))
+      (markdown-toggle-gfm-checkbox))))
+
+(defun markdown-make-gfm-checkboxes-buttons (start end)
+  "Make GFM checkboxes buttons in region between START and END."
+  (save-excursion
+    (goto-char start)
+    (let ((case-fold-search t))
+      (save-excursion
+        (while (re-search-forward markdown-regex-gfm-checkbox end t)
+          (make-button (match-beginning 1) (match-end 1)
+                       :type 'markdown-gfm-checkbox-button))))))
+
+;; Called when any modification is made to buffer text.
+(defun markdown-gfm-checkbox-after-change-function (beg end _)
+  "Add to `after-change-functions' to setup GFM checkboxes as buttons.
+BEG and END are the limits of scanned region."
+  (save-excursion
+    (save-match-data
+      ;; Rescan between start of line from `beg' and start of line after `end'.
+      (markdown-make-gfm-checkboxes-buttons
+       (progn (goto-char beg) (beginning-of-line) (point))
+       (progn (goto-char end) (forward-line 1) (point))))))
+
+(defun markdown-remove-gfm-checkbox-overlays ()
+  "Remove all GFM checkbox overlays in buffer."
+  (save-excursion
+    (save-restriction
+      (widen)
+      (remove-overlays nil nil 'face 'markdown-gfm-checkbox-face))))
+
+
+;;; Display inline image ======================================================
+
+(defvar-local markdown-inline-image-overlays nil)
+
+(defun markdown-remove-inline-images ()
+  "Remove inline image overlays from image links in the buffer.
+This can be toggled with `markdown-toggle-inline-images'
+or \\[markdown-toggle-inline-images]."
+  (interactive)
+  (mapc #'delete-overlay markdown-inline-image-overlays)
+  (setq markdown-inline-image-overlays nil)
+  (when (fboundp 'clear-image-cache) (clear-image-cache)))
+
+(defcustom markdown-display-remote-images nil
+  "If non-nil, download and display remote images.
+See also `markdown-inline-image-overlays'.
+
+Only image URLs specified with a protocol listed in
+`markdown-remote-image-protocols' are displayed."
+  :group 'markdown
+  :type 'boolean)
+
+(defcustom markdown-remote-image-protocols '("https")
+  "List of protocols to use to download remote images.
+See also `markdown-display-remote-images'."
+  :group 'markdown
+  :type '(repeat string))
+
+(defvar markdown--remote-image-cache
+  (make-hash-table :test 'equal)
+  "A map from URLs to image paths.")
+
+(defun markdown--get-remote-image (url)
+  "Retrieve the image path for a given URL."
+  (or (gethash url markdown--remote-image-cache)
+      (let ((dl-path (make-temp-file "markdown-mode--image")))
+        (require 'url)
+        (url-copy-file url dl-path t)
+        (puthash url dl-path markdown--remote-image-cache))))
+
+(defun markdown-display-inline-images ()
+  "Add inline image overlays to image links in the buffer.
+This can be toggled with `markdown-toggle-inline-images'
+or \\[markdown-toggle-inline-images]."
+  (interactive)
+  (unless (display-images-p)
+    (error "Cannot show images"))
+  (save-excursion
+    (save-restriction
+      (widen)
+      (goto-char (point-min))
+      (while (re-search-forward markdown-regex-link-inline nil t)
+        (let* ((start (match-beginning 0))
+               (imagep (match-beginning 1))
+               (end (match-end 0))
+               (file (match-string-no-properties 6)))
+          (when (and imagep
+                     (not (zerop (length file))))
+            (unless (file-exists-p file)
+              (let* ((download-file (funcall markdown-translate-filename-function file))
+                     (valid-url (ignore-errors
+                                  (member (downcase (url-type (url-generic-parse-url download-file)))
+                                          markdown-remote-image-protocols))))
+                (if (and markdown-display-remote-images valid-url)
+                    (setq file (markdown--get-remote-image download-file))
+                  (when (not valid-url)
+                    ;; strip query parameter
+                    (setq file (replace-regexp-in-string "?.+\\'" "" file))
+                    (unless (file-exists-p file)
+                      (setq file (url-unhex-string file)))))))
+            (when (file-exists-p file)
+              (let* ((abspath (if (file-name-absolute-p file)
+                                  file
+                                (concat default-directory file)))
+                     (image
+                      (cond ((and markdown-max-image-size
+                                  (image-type-available-p 'imagemagick))
+                             (create-image
+                              abspath 'imagemagick nil
+                              :max-width (car markdown-max-image-size)
+                              :max-height (cdr markdown-max-image-size)))
+                            (markdown-max-image-size
+                             (create-image abspath nil nil
+                                           :max-width (car markdown-max-image-size)
+                                           :max-height (cdr markdown-max-image-size)))
+                            (t (create-image abspath)))))
+                (when image
+                  (let ((ov (make-overlay start end)))
+                    (overlay-put ov 'display image)
+                    (overlay-put ov 'face 'default)
+                    (push ov markdown-inline-image-overlays)))))))))))
+
+(defun markdown-toggle-inline-images ()
+  "Toggle inline image overlays in the buffer."
+  (interactive)
+  (if markdown-inline-image-overlays
+      (markdown-remove-inline-images)
+    (markdown-display-inline-images)))
+
+
+;;; GFM Code Block Fontification ==============================================
+
+(defcustom markdown-fontify-code-blocks-natively nil
+  "When non-nil, fontify code in code blocks using the native major mode.
+This only works for fenced code blocks where the language is
+specified where we can automatically determine the appropriate
+mode to use.  The language to mode mapping may be customized by
+setting the variable `markdown-code-lang-modes'."
+  :group 'markdown
+  :type 'boolean
+  :safe #'booleanp
+  :package-version '(markdown-mode . "2.3"))
+
+(defcustom markdown-fontify-code-block-default-mode nil
+  "Default mode to use to fontify code blocks.
+This mode is used when automatic detection fails, such as for GFM
+code blocks with no language specified."
+  :group 'markdown
+  :type '(choice function (const :tag "None" nil))
+  :package-version '(markdown-mode . "2.4"))
+
+(defun markdown-toggle-fontify-code-blocks-natively (&optional arg)
+  "Toggle the native fontification of code blocks.
+With a prefix argument ARG, enable if ARG is positive,
+and disable otherwise."
+  (interactive (list (or current-prefix-arg 'toggle)))
+  (setq markdown-fontify-code-blocks-natively
+        (if (eq arg 'toggle)
+            (not markdown-fontify-code-blocks-natively)
+          (> (prefix-numeric-value arg) 0)))
+  (when (called-interactively-p 'interactive)
+    (message "markdown-mode native code block fontification %s"
+             (if markdown-fontify-code-blocks-natively "enabled" "disabled")))
+  (markdown-reload-extensions))
+
+;; This is based on `org-src-lang-modes' from org-src.el
+(defcustom markdown-code-lang-modes
+  '(("ocaml" . tuareg-mode) ("elisp" . emacs-lisp-mode) ("ditaa" . artist-mode)
+    ("asymptote" . asy-mode) ("dot" . fundamental-mode) ("sqlite" . sql-mode)
+    ("calc" . fundamental-mode) ("C" . c-mode) ("cpp" . c++-mode)
+    ("C++" . c++-mode) ("screen" . shell-script-mode) ("shell" . sh-mode)
+    ("bash" . sh-mode))
+  "Alist mapping languages to their major mode.
+The key is the language name, the value is the major mode.  For
+many languages this is simple, but for language where this is not
+the case, this variable provides a way to simplify things on the
+user side.  For example, there is no ocaml-mode in Emacs, but the
+mode to use is `tuareg-mode'."
+  :group 'markdown
+  :type '(repeat
+          (cons
+           (string "Language name")
+           (symbol "Major mode")))
+  :package-version '(markdown-mode . "2.3"))
+
+(defun markdown-get-lang-mode (lang)
+  "Return major mode that should be used for LANG.
+LANG is a string, and the returned major mode is a symbol."
+  (cl-find-if
+   #'markdown--lang-mode-predicate
+   (nconc (list (cdr (assoc lang markdown-code-lang-modes))
+                (cdr (assoc (downcase lang) markdown-code-lang-modes)))
+          (and (fboundp 'treesit-language-available-p)
+               (list (and (treesit-language-available-p (intern lang))
+                          (intern (concat lang "-ts-mode")))
+                     (and (treesit-language-available-p (intern (downcase lang)))
+                          (intern (concat (downcase lang) "-ts-mode")))))
+          (list
+           (intern (concat lang "-mode"))
+           (intern (concat (downcase lang) "-mode"))))))
+
+(defun markdown--lang-mode-predicate (mode)
+  (and mode
+       (fboundp mode)
+       (or
+        (not (string-match-p "ts-mode\\'" (symbol-name mode)))
+        ;; Don't load tree-sitter mode if the mode is in neither auto-mode-alist nor major-mode-remap-alist
+        ;; Because some ts-mode overwrites auto-mode-alist and it might break user configurations
+
+        ;; https://github.com/jrblevin/markdown-mode/issues/787
+        ;; major-mode-remap-alist was introduced at Emacs 29.1
+        (cl-loop for pair in (bound-and-true-p major-mode-remap-alist)
+                 for func = (cdr pair)
+                 thereis (and (atom func) (eq mode func)))
+        ;; https://github.com/jrblevin/markdown-mode/issues/761
+        (cl-loop for pair in auto-mode-alist
+                 for func = (cdr pair)
+                 thereis (and (atom func) (eq mode func))))))
+
+(defun markdown-fontify-code-blocks-generic (matcher last)
+  "Add text properties to next code block from point to LAST.
+Use matching function MATCHER."
+  (when (funcall matcher last)
+    (save-excursion
+      (save-match-data
+        (let* ((start (match-beginning 0))
+               (end (match-end 0))
+               ;; Find positions outside opening and closing backquotes.
+               (bol-prev (progn (goto-char start)
+                                (if (bolp) (line-beginning-position 0) (line-beginning-position))))
+               (eol-next (progn (goto-char end)
+                                (if (bolp) (line-beginning-position 2) (line-beginning-position 3))))
+               lang)
+          (if (and markdown-fontify-code-blocks-natively
+                   (or (setq lang (markdown-code-block-lang))
+                       markdown-fontify-code-block-default-mode))
+              (markdown-fontify-code-block-natively lang start end)
+            (add-text-properties start end '(face markdown-pre-face)))
+          ;; Set background for block as well as opening and closing lines.
+          (font-lock-append-text-property
+           bol-prev eol-next 'face 'markdown-code-face)
+          ;; Set invisible property for lines before and after, including newline.
+          (add-text-properties bol-prev start '(invisible markdown-markup))
+          (add-text-properties end eol-next '(invisible markdown-markup)))))
+    t))
+
+(defun markdown-fontify-gfm-code-blocks (last)
+  "Add text properties to next GFM code block from point to LAST."
+  (markdown-fontify-code-blocks-generic 'markdown-match-gfm-code-blocks last))
+
+(defun markdown-fontify-fenced-code-blocks (last)
+  "Add text properties to next tilde fenced code block from point to LAST."
+  (markdown-fontify-code-blocks-generic 'markdown-match-fenced-code-blocks last))
+
+;; Based on `org-src-font-lock-fontify-block' from org-src.el.
+(defun markdown-fontify-code-block-natively (lang start end)
+  "Fontify given GFM or fenced code block.
+This function is called by Emacs for automatic fontification when
+`markdown-fontify-code-blocks-natively' is non-nil.  LANG is the
+language used in the block. START and END specify the block
+position."
+  (let ((lang-mode (if lang (markdown-get-lang-mode lang)
+                     markdown-fontify-code-block-default-mode)))
+    (when (fboundp lang-mode)
+      (let ((string (buffer-substring-no-properties start end))
+            (modified (buffer-modified-p))
+            (markdown-buffer (current-buffer)) pos next)
+        (remove-text-properties start end '(face nil))
+        (with-current-buffer
+            (get-buffer-create
+             (format " *markdown-code-fontification:%s*" (symbol-name lang-mode)))
+          ;; Make sure that modification hooks are not inhibited in
+          ;; the org-src-fontification buffer in case we're called
+          ;; from `jit-lock-function' (Bug#25132).
+          (let ((inhibit-modification-hooks nil))
+            (delete-region (point-min) (point-max))
+            (insert string " ")) ;; so there's a final property change
+          (unless (eq major-mode lang-mode) (funcall lang-mode))
+          (font-lock-ensure)
+          (setq pos (point-min))
+          (while (setq next (next-single-property-change pos 'face))
+            (let ((val (get-text-property pos 'face)))
+              (when val
+                (put-text-property
+                 (+ start (1- pos)) (1- (+ start next)) 'face
+                 val markdown-buffer)))
+            (setq pos next)))
+        (add-text-properties
+         start end
+         '(font-lock-fontified t fontified t font-lock-multiline t))
+        (set-buffer-modified-p modified)))))
+
+(require 'edit-indirect nil t)
+(defvar edit-indirect-guess-mode-function)
+(defvar edit-indirect-after-commit-functions)
+(defvar edit-indirect--overlay)
+(declare-function edit-indirect-commit "edit-indirect")
+(declare-function edit-indirect--commit "edit-indirect")
+
+(defvar-local markdown--edit-indirect-committed-position nil)
+
+(defun markdown--edit-indirect-save-committed-position ()
+  "Save where editing is committed in a local variable in the parent buffer."
+  (if-let* ((parent-buffer (overlay-buffer edit-indirect--overlay))
+            ((with-current-buffer parent-buffer
+               (derived-mode-p 'markdown-mode)))
+            (pos (cons (line-number-at-pos) (current-column))))
+    (with-current-buffer parent-buffer
+      (setq markdown--edit-indirect-committed-position pos))))
+
+(with-eval-after-load 'edit-indirect
+  (advice-add #'edit-indirect--commit :after #'markdown--edit-indirect-save-committed-position))
+
+(defun markdown--edit-indirect-move-to-committed-position ()
+  "Move the point in the code block corresponding to the saved committed position."
+  (when-let* ((pos markdown--edit-indirect-committed-position)
+              (bounds (markdown-get-enclosing-fenced-block-construct))
+              (fence-begin (nth 0 bounds)))
+    (goto-char fence-begin)
+    (let ((block-indentation (current-indentation)))
+      (forward-line (car pos))
+      (move-to-column (+ block-indentation (cdr pos)))))
+  (setq markdown--edit-indirect-committed-position nil))
+
+(with-eval-after-load 'edit-indirect
+  (advice-add #'edit-indirect-commit :after #'markdown--edit-indirect-move-to-committed-position))
+
+(defun markdown--edit-indirect-after-commit-function (beg end)
+  "Corrective logic run on code block content from lines BEG to END.
+Restores code block indentation from BEG to END, and ensures trailing newlines
+at the END of code blocks."
+  ;; ensure trailing newlines
+  (goto-char end)
+  (unless (eq (char-before) ?\n)
+    (insert "\n"))
+  ;; restore code block indentation
+  (goto-char (- beg 1))
+  (let ((block-indentation (current-indentation)))
+    (when (> block-indentation 0)
+      (indent-rigidly beg end block-indentation)))
+  (font-lock-ensure))
+
+(defun markdown-edit-code-block ()
+  "Edit Markdown code block in an indirect buffer."
+  (interactive)
+  (save-excursion
+    (if (fboundp 'edit-indirect-region)
+        (if-let* ((bounds (markdown-get-enclosing-fenced-block-construct))
+                  (fence-begin (nth 0 bounds))
+                  (fence-end (nth 1 bounds)))
+            (let* ((original-line (line-number-at-pos))
+                   (original-column (current-column))
+                   (begin (progn (goto-char fence-begin) (line-beginning-position 2)))
+                   (line (max 0 (- original-line (line-number-at-pos) 1)))
+                   (indentation (current-indentation))
+                   (column (max 0 (- original-column indentation)))
+                   (end (progn (goto-char fence-end) (line-beginning-position 1)))
+                   (lang (markdown-code-block-lang))
+                   (mode (or (and lang (markdown-get-lang-mode lang))
+                             markdown-edit-code-block-default-mode))
+                   (edit-indirect-guess-mode-function
+                    (lambda (_parent-buffer _beg _end)
+                      (funcall mode)))
+                   (indirect-buf (edit-indirect-region begin end 'display-buffer)))
+              (with-current-buffer indirect-buf
+                ;; reset `sh-shell' when indirect buffer
+                (when (and (not (member system-type '(ms-dos windows-nt)))
+                           (member mode '(shell-script-mode sh-mode))
+                           (member lang (append
+                                         (mapcar (lambda (e) (symbol-name (car e)))
+                                                 sh-ancestor-alist)
+                                         '("csh" "rc" "sh"))))
+                  (sh-set-shell lang))
+                (when (> indentation 0) ;; un-indent in edit-indirect buffer
+                  (indent-rigidly (point-min) (point-max) (- indentation)))
+                (goto-char (point-min))
+                (forward-line line)
+                (move-to-column column)))
+          (user-error "Not inside a GFM or tilde fenced code block"))
+      (when (y-or-n-p "Package edit-indirect needed to edit code blocks. Install it now? ")
+        (package-refresh-contents)
+        (package-install 'edit-indirect)
+        (markdown-edit-code-block)))))
+
+
+;;; Table Editing =============================================================
+
+;; These functions were originally adapted from `org-table.el'.
+
+;; General helper functions
+
+(defmacro markdown--with-gensyms (symbols &rest body)
+  (declare (debug (sexp body)) (indent 1))
+  `(let ,(mapcar (lambda (s)
+                   `(,s (make-symbol (concat "--" (symbol-name ',s)))))
+                 symbols)
+     ,@body))
+
+(defun markdown--split-string (string &optional separators)
+  "Splits STRING into substrings at SEPARATORS.
+SEPARATORS is a regular expression. If nil it defaults to
+`split-string-default-separators'. This version returns no empty
+strings if there are matches at the beginning and end of string."
+  (let ((start 0) notfirst list)
+    (while (and (string-match
+                 (or separators split-string-default-separators)
+                 string
+                 (if (and notfirst
+                          (= start (match-beginning 0))
+                          (< start (length string)))
+                     (1+ start) start))
+                (< (match-beginning 0) (length string)))
+      (setq notfirst t)
+      (or (eq (match-beginning 0) 0)
+          (and (eq (match-beginning 0) (match-end 0))
+               (eq (match-beginning 0) start))
+          (push (substring string start (match-beginning 0)) list))
+      (setq start (match-end 0)))
+    (or (eq start (length string))
+        (push (substring string start) list))
+    (nreverse list)))
+
+(defun markdown--string-width (s)
+  "Return width of string S.
+This version ignores characters with invisibility property
+`markdown-markup'."
+  (let (b)
+    (when (or (eq t buffer-invisibility-spec)
+              (member 'markdown-markup buffer-invisibility-spec))
+      (while (setq b (text-property-any
+                      0 (length s)
+                      'invisible 'markdown-markup s))
+        (setq s (concat
+                 (substring s 0 b)
+                 (substring s (or (next-single-property-change
+                                   b 'invisible s)
+                                  (length s))))))))
+  (string-width s))
+
+(defun markdown--remove-invisible-markup (s)
+  "Remove Markdown markup from string S.
+This version removes characters with invisibility property
+`markdown-markup'."
+  (let (b)
+    (while (setq b (text-property-any
+                    0 (length s)
+                    'invisible 'markdown-markup s))
+      (setq s (concat
+               (substring s 0 b)
+               (substring s (or (next-single-property-change
+                                 b 'invisible s)
+                                (length s)))))))
+  s)
+
+;; Functions for maintaining tables
+
+(defvar markdown-table-at-point-p-function #'markdown--table-at-point-p
+  "Function to decide if point is inside a table.
+
+The indirection serves to differentiate between standard markdown
+tables and gfm tables which are less strict about the markup.")
+
+(defconst markdown-table-line-regexp "^[ \t]*|"
+  "Regexp matching any line inside a table.")
+
+(defconst markdown-table-hline-regexp "^[ \t]*|[-:]"
+  "Regexp matching hline inside a table.")
+
+(defconst markdown-table-dline-regexp "^[ \t]*|[^-:]"
+  "Regexp matching dline inside a table.")
+
+(defun markdown-table-at-point-p ()
+  "Return non-nil when point is inside a table."
+  (funcall markdown-table-at-point-p-function))
+
+(defun markdown--table-at-point-p ()
+  "Return non-nil when point is inside a table."
+  (save-excursion
+    (beginning-of-line)
+    (and (looking-at-p markdown-table-line-regexp)
+         (not (markdown-code-block-at-point-p)))))
+
+(defconst gfm-table-line-regexp "^.?*|"
+  "Regexp matching any line inside a table.")
+
+(defconst gfm-table-hline-regexp "^-+\\(|-\\)+"
+  "Regexp matching hline inside a table.")
+
+;; GFM simplified tables syntax is as follows:
+;; - A header line for the column names, this is any text
+;;   separated by `|'.
+;; - Followed by a string -|-|- ..., the number of dashes is optional
+;;   but must be higher than 1. The number of separators should match
+;;   the number of columns.
+;; - Followed by the rows of data, which has the same format as the
+;;   header line.
+;; Example:
+;;
+;; foo | bar
+;; ------|---------
+;; bar | baz
+;; bar | baz
+(defun gfm--table-at-point-p ()
+  "Return non-nil when point is inside a gfm-compatible table."
+  (or (markdown--table-at-point-p)
+      (save-excursion
+        (beginning-of-line)
+        (when (looking-at-p gfm-table-line-regexp)
+          ;; we might be at the first line of the table, check if the
+          ;; line below is the hline
+          (or (save-excursion
+                (forward-line 1)
+                (looking-at-p gfm-table-hline-regexp))
+              ;; go up to find the header
+              (catch 'done
+                (while (looking-at-p gfm-table-line-regexp)
+                  (cond
+                   ((looking-at-p gfm-table-hline-regexp)
+                    (throw 'done t))
+                   ((bobp)
+                    (throw 'done nil)))
+                  (forward-line -1))
+                nil))))))
+
+(defun markdown-table-hline-at-point-p ()
+  "Return non-nil when point is on a hline in a table.
+This function assumes point is on a table."
+  (save-excursion
+    (beginning-of-line)
+    (looking-at-p markdown-table-hline-regexp)))
+
+(defun markdown-table-begin ()
+  "Find the beginning of the table and return its position.
+This function assumes point is on a table."
+  (save-excursion
+    (while (and (not (bobp))
+                (markdown-table-at-point-p))
+      (forward-line -1))
+    (unless (or (eobp)
+                (markdown-table-at-point-p))
+      (forward-line 1))
+    (point)))
+
+(defun markdown-table-end ()
+  "Find the end of the table and return its position.
+This function assumes point is on a table."
+  (save-excursion
+    (while (and (not (eobp))
+                (markdown-table-at-point-p))
+      (forward-line 1))
+    (point)))
+
+(defun markdown-table-get-dline ()
+  "Return index of the table data line at point.
+This function assumes point is on a table."
+  (let ((pos (point)) (end (markdown-table-end)) (cnt 0))
+    (save-excursion
+      (goto-char (markdown-table-begin))
+      (while (and (re-search-forward
+                   markdown-table-dline-regexp end t)
+                  (setq cnt (1+ cnt))
+                  (< (line-end-position) pos))))
+    cnt))
+
+(defun markdown--thing-at-wiki-link (pos)
+  (when markdown-enable-wiki-links
+    (save-excursion
+      (save-match-data
+        (goto-char pos)
+        (thing-at-point-looking-at markdown-regex-wiki-link)))))
+
+(defun markdown-table-get-column ()
+  "Return table column at point.
+This function assumes point is on a table."
+  (let ((pos (point)) (cnt 0))
+    (save-excursion
+      (beginning-of-line)
+      (while (search-forward "|" pos t)
+        (when (and (not (looking-back "\\\\|" (line-beginning-position)))
+                   (not (markdown--thing-at-wiki-link (match-beginning 0))))
+          (setq cnt (1+ cnt)))))
+    cnt))
+
+(defun markdown-table-get-cell (&optional n)
+  "Return the content of the cell in column N of current row.
+N defaults to column at point. This function assumes point is on
+a table."
+  (and n (markdown-table-goto-column n))
+  (skip-chars-backward "^|\n") (backward-char 1)
+  (if (looking-at "|[^|\r\n]*")
+      (let* ((pos (match-beginning 0))
+             (val (buffer-substring (1+ pos) (match-end 0))))
+        (goto-char (min (line-end-position) (+ 2 pos)))
+        ;; Trim whitespaces
+        (setq val (replace-regexp-in-string "\\`[ \t]+" "" val)
+              val (replace-regexp-in-string "[ \t]+\\'" "" val)))
+    (forward-char 1) ""))
+
+(defun markdown-table-goto-dline (n)
+  "Go to the Nth data line in the table at point.
+Return t when the line exists, nil otherwise. This function
+assumes point is on a table."
+  (goto-char (markdown-table-begin))
+  (let ((end (markdown-table-end)) (cnt 0))
+    (while (and (re-search-forward
+                 markdown-table-dline-regexp end t)
+                (< (setq cnt (1+ cnt)) n)))
+    (= cnt n)))
+
+(defun markdown-table-goto-column (n &optional on-delim)
+  "Go to the Nth column in the table line at point.
+With optional argument ON-DELIM, stop with point before the left
+delimiter of the cell. If there are less than N cells, just go
+beyond the last delimiter. This function assumes point is on a
+table."
+  (beginning-of-line 1)
+  (when (> n 0)
+    (while (and (> n 0) (search-forward "|" (line-end-position) t))
+      (when (and (not (looking-back "\\\\|" (line-beginning-position)))
+                 (not (markdown--thing-at-wiki-link (match-beginning 0))))
+        (cl-decf n)))
+    (if on-delim
+        (backward-char 1)
+      (when (looking-at " ") (forward-char 1)))))
+
+(defmacro markdown-table-save-cell (&rest body)
+  "Save cell at point, execute BODY and restore cell.
+This function assumes point is on a table."
+  (declare (debug (body)))
+  (markdown--with-gensyms (line column)
+    `(let ((,line (copy-marker (line-beginning-position)))
+           (,column (markdown-table-get-column)))
+       (unwind-protect
+           (progn ,@body)
+         (goto-char ,line)
+         (markdown-table-goto-column ,column)
+         (set-marker ,line nil)))))
+
+(defun markdown-table-blank-line (s)
+  "Convert a table line S into a line with blank cells."
+  (if (string-match "^[ \t]*|-" s)
+      (setq s (mapconcat
+               (lambda (x) (if (member x '(?| ?+)) "|" " "))
+               s ""))
+    (with-temp-buffer
+      (insert s)
+      (goto-char (point-min))
+      (when (re-search-forward "|" nil t)
+        (let ((cur (point))
+              ret)
+          (while (re-search-forward "|" nil t)
+            (when (and (not (eql (char-before (match-beginning 0)) ?\\))
+                       (not (markdown--thing-at-wiki-link (match-beginning 0))))
+              (push (make-string (- (match-beginning 0) cur) ? ) ret)
+              (setq cur (match-end 0))))
+          (format "|%s|" (string-join (nreverse ret) "|")))))))
+
+(defun markdown-table-colfmt (fmtspec)
+  "Process column alignment specifier FMTSPEC for tables."
+  (when (stringp fmtspec)
+    (mapcar (lambda (x)
+              (cond ((string-match-p "^:.*:$" x) 'c)
+                    ((string-match-p "^:"     x) 'l)
+                    ((string-match-p ":$"     x) 'r)
+                    (t 'd)))
+            (markdown--split-string fmtspec "\\s-*|\\s-*"))))
+
+(defun markdown--first-column-p (bar-pos)
+  (save-excursion
+    (save-match-data
+      (goto-char bar-pos)
+      (looking-back "^\\s-*" (line-beginning-position)))))
+
+(defun markdown--table-line-to-columns (line)
+  (with-temp-buffer
+    (insert line)
+    (goto-char (point-min))
+    (let ((cur (point))
+          ret)
+      (while (and (re-search-forward "\\s-*\\(|\\)\\s-*" nil t))
+        (when (not (markdown--face-p (match-beginning 1) '(markdown-inline-code-face)))
+          (if (markdown--first-column-p (match-beginning 1))
+              (setq cur (match-end 0))
+            (cond ((eql (char-before (match-beginning 1)) ?\\)
+                   ;; keep spaces
+                   (goto-char (match-end 1)))
+                  ((markdown--thing-at-wiki-link (match-beginning 1))) ;; do nothing
+                  (t
+                   (push (buffer-substring-no-properties cur (match-beginning 0)) ret)
+                   (setq cur (match-end 0)))))))
+      (when (< cur (length line))
+        (push (buffer-substring-no-properties cur (point-max)) ret))
+      (nreverse ret))))
+
+(defsubst markdown--is-delimiter-row (line)
+  (and (string-match-p "\\`[ \t]*|[ \t]*[-:]" line)
+       (cl-loop for c across line
+                always (member c '(?| ?- ?: ?\t ? )))))
+
+(defun markdown-table-align-raw (cells fmtspec widths)
+  (let (fmt width)
+    (mapconcat
+     (lambda (cell)
+       (setq fmt (car fmtspec) fmtspec (cdr fmtspec))
+       (setq width (car widths) widths (cdr widths))
+       (if (equal fmt 'c)
+           (setq cell (concat (make-string (/ (- width (markdown--string-width cell)) 2) ?\s) cell)))
+       (unless (equal fmt 'r) (setq width (- width)))
+       (format (format " %%%ds " width) cell))
+     cells "|")))
+
+(defun markdown-table-align ()
+  "Align table at point.
+This function assumes point is on a table."
+  (interactive)
+  (let ((begin (markdown-table-begin))
+        (end (copy-marker (markdown-table-end))))
+    (markdown-table-save-cell
+     (goto-char begin)
+     (let* (fmtspec
+            ;; Store table indent
+            (indent (progn (looking-at "[ \t]*") (match-string 0)))
+            ;; Split table in lines and save column format specifier
+            (lines (mapcar (lambda (line)
+                             (if (markdown--is-delimiter-row line)
+                                 (progn (setq fmtspec (or fmtspec line)) nil)
+                               line))
+                           (markdown--split-string (buffer-substring begin end) "\n")))
+            ;; Split lines in cells
+            (cells (mapcar (lambda (l) (markdown--table-line-to-columns l))
+                           (remq nil lines)))
+            ;; Calculate maximum number of cells in a line
+            (maxcells (if cells
+                          (apply #'max (mapcar #'length cells))
+                        (user-error "Empty table")))
+            maxwidths)
+       ;; Calculate maximum width for each column
+       (dotimes (i maxcells)
+         (let ((column (mapcar (lambda (x) (or (nth i x) "")) cells)))
+           (push (apply #'max 1 (mapcar #'markdown--string-width column))
+                 maxwidths)))
+       (setq maxwidths (nreverse maxwidths))
+       ;; Process column format specifier
+       (setq fmtspec (markdown-table-colfmt fmtspec))
+       ;; Compute formats needed for output of table lines
+       (let ((hfmt (concat indent "|"))
+             hfmt1 fmt (fmts fmtspec))
+         (dolist (width maxwidths)
+           (setq fmt (car fmts) fmts (cdr fmts))
+           (cond ((equal fmt 'l) (setq hfmt1 ":%s-|"))
+                 ((equal fmt 'r) (setq hfmt1 "-%s:|"))
+                 ((equal fmt 'c) (setq hfmt1 ":%s:|"))
+                 (t              (setq hfmt1 "-%s-|")))
+           (setq hfmt (concat hfmt (format hfmt1 (make-string width ?-)))))
+         ;; Replace modified lines only
+         (dolist (line lines)
+           (let ((line (if line
+                           (concat indent "|"
+                                   (markdown-table-align-raw (pop cells) fmtspec maxwidths)
+                                   "|")
+                         hfmt))
+                 (previous (buffer-substring (point) (line-end-position))))
+             (if (equal previous line)
+                 (forward-line)
+               (insert line "\n")
+               (delete-region (point) (line-beginning-position 2))))))
+       (set-marker end nil)))))
+
+(defun markdown-table-insert-row (&optional arg)
+  "Insert a new row above the row at point into the table.
+With optional argument ARG, insert below the current row."
+  (interactive "P")
+  (unless (markdown-table-at-point-p)
+    (user-error "Not at a table"))
+  (let* ((line (buffer-substring
+                (line-beginning-position) (line-end-position)))
+         (new (markdown-table-blank-line line)))
+    (beginning-of-line (if arg 2 1))
+    (unless (bolp) (insert "\n"))
+    (insert-before-markers new "\n")
+    (beginning-of-line 0)
+    (re-search-forward "| ?" (line-end-position) t)))
+
+(defun markdown-table-delete-row ()
+  "Delete row or horizontal line at point from the table."
+  (interactive)
+  (unless (markdown-table-at-point-p)
+    (user-error "Not at a table"))
+  (let ((col (current-column)))
+    (kill-region (line-beginning-position)
+                 (min (1+ (line-end-position)) (point-max)))
+    (unless (markdown-table-at-point-p) (beginning-of-line 0))
+    (move-to-column col)))
+
+(defun markdown-table-move-row (&optional up)
+  "Move table line at point down.
+With optional argument UP, move it up."
+  (interactive "P")
+  (unless (markdown-table-at-point-p)
+    (user-error "Not at a table"))
+  (let* ((col (current-column)) (pos (point))
+         (tonew (if up 0 2)) txt)
+    (beginning-of-line tonew)
+    (unless (markdown-table-at-point-p)
+      (goto-char pos) (user-error "Cannot move row further"))
+    (goto-char pos) (beginning-of-line 1) (setq pos (point))
+    (setq txt (buffer-substring (point) (1+ (line-end-position))))
+    (delete-region (point) (1+ (line-end-position)))
+    (beginning-of-line tonew)
+    (insert txt) (beginning-of-line 0)
+    (move-to-column col)))
+
+(defun markdown-table-move-row-up ()
+  "Move table row at point up."
+  (interactive)
+  (markdown-table-move-row 'up))
+
+(defun markdown-table-move-row-down ()
+  "Move table row at point down."
+  (interactive)
+  (markdown-table-move-row nil))
+
+(defun markdown-table-insert-column ()
+  "Insert a new table column."
+  (interactive)
+  (unless (markdown-table-at-point-p)
+    (user-error "Not at a table"))
+  (let* ((col (max 1 (markdown-table-get-column)))
+         (begin (markdown-table-begin))
+         (end (copy-marker (markdown-table-end))))
+    (markdown-table-save-cell
+     (goto-char begin)
+     (while (< (point) end)
+       (markdown-table-goto-column col t)
+       (if (markdown-table-hline-at-point-p)
+           (insert "|---")
+         (insert "|   "))
+       (forward-line)))
+    (set-marker end nil)
+    (when markdown-table-align-p
+      (markdown-table-align))))
+
+(defun markdown-table-delete-column ()
+  "Delete column at point from table."
+  (interactive)
+  (unless (markdown-table-at-point-p)
+    (user-error "Not at a table"))
+  (let ((col (markdown-table-get-column))
+        (begin (markdown-table-begin))
+        (end (copy-marker (markdown-table-end))))
+    (markdown-table-save-cell
+     (goto-char begin)
+     (while (< (point) end)
+       (markdown-table-goto-column col t)
+       (and (looking-at "|\\(?:\\\\|\\|[^|\n]\\)+|")
+            (replace-match "|"))
+       (forward-line)))
+    (set-marker end nil)
+    (markdown-table-goto-column (max 1 (1- col)))
+    (when markdown-table-align-p
+      (markdown-table-align))))
+
+(defun markdown-table-move-column (&optional left)
+  "Move table column at point to the right.
+With optional argument LEFT, move it to the left."
+  (interactive "P")
+  (unless (markdown-table-at-point-p)
+    (user-error "Not at a table"))
+  (let* ((col (markdown-table-get-column))
+         (col1 (if left (1- col) col))
+         (colpos (if left (1- col) (1+ col)))
+         (begin (markdown-table-begin))
+         (end (copy-marker (markdown-table-end))))
+    (when (and left (= col 1))
+      (user-error "Cannot move column further left"))
+    (when (and (not left) (looking-at "[^|\n]*|[^|\n]*$"))
+      (user-error "Cannot move column further right"))
+    (markdown-table-save-cell
+     (goto-char begin)
+     (while (< (point) end)
+       (markdown-table-goto-column col1 t)
+       (when (looking-at "|\\(\\(?:\\\\|\\|[^|\n]\\|\\)+\\)|\\(\\(?:\\\\|\\|[^|\n]\\|\\)+\\)|")
+         (replace-match "|\\2|\\1|"))
+       (forward-line)))
+    (set-marker end nil)
+    (markdown-table-goto-column colpos)
+    (when markdown-table-align-p
+      (markdown-table-align))))
+
+(defun markdown-table-move-column-left ()
+  "Move table column at point to the left."
+  (interactive)
+  (markdown-table-move-column 'left))
+
+(defun markdown-table-move-column-right ()
+  "Move table column at point to the right."
+  (interactive)
+  (markdown-table-move-column nil))
+
+(defun markdown-table-next-row ()
+  "Go to the next row (same column) in the table.
+Create new table lines if required."
+  (interactive)
+  (unless (markdown-table-at-point-p)
+    (user-error "Not at a table"))
+  (if (or (looking-at "[ \t]*$")
+          (save-excursion (skip-chars-backward " \t") (bolp)))
+      (newline)
+    (when markdown-table-align-p
+      (markdown-table-align))
+    (let ((col (markdown-table-get-column)))
+      (beginning-of-line 2)
+      (if (or (not (markdown-table-at-point-p))
+              (markdown-table-hline-at-point-p))
+          (progn
+            (beginning-of-line 0)
+            (markdown-table-insert-row 'below)))
+      (markdown-table-goto-column col)
+      (skip-chars-backward "^|\n\r")
+      (when (looking-at " ") (forward-char 1)))))
+
+(defun markdown-table-forward-cell ()
+  "Go to the next cell in the table.
+Create new table lines if required."
+  (interactive)
+  (unless (markdown-table-at-point-p)
+    (user-error "Not at a table"))
+  (when markdown-table-align-p
+    (markdown-table-align))
+  (let ((end (markdown-table-end)))
+    (when (markdown-table-hline-at-point-p) (end-of-line 1))
+    (condition-case nil
+        (progn
+          (re-search-forward "\\(?:^\\|[^\\]\\)|" end)
+          (when (looking-at "[ \t]*$")
+            (re-search-forward "\\(?:^\\|[^\\]:\\)|" end))
+          (when (and (looking-at "[-:]")
+                     (re-search-forward "^\\(?:[ \t]*\\|[^\\]\\)|\\([^-:]\\)" end t))
+            (goto-char (match-beginning 1)))
+          (if (looking-at "[-:]")
+              (progn
+                (beginning-of-line 0)
+                (markdown-table-insert-row 'below))
+            (when (looking-at " ") (forward-char 1))))
+      (error (markdown-table-insert-row 'below)))))
+
+(defun markdown-table-backward-cell ()
+  "Go to the previous cell in the table."
+  (interactive)
+  (unless (markdown-table-at-point-p)
+    (user-error "Not at a table"))
+  (when markdown-table-align-p
+    (markdown-table-align))
+  (when (markdown-table-hline-at-point-p) (beginning-of-line 1))
+  (condition-case nil
+      (progn
+        (re-search-backward "\\(?:^\\|[^\\]\\)|" (markdown-table-begin))
+        ;; When this function is called while in the first cell in a
+        ;; table, the point will now be at the beginning of a line. In
+        ;; this case, we need to move past one additional table
+        ;; boundary, the end of the table on the previous line.
+        (when (= (point) (line-beginning-position))
+          (re-search-backward "\\(?:^\\|[^\\]\\)|" (markdown-table-begin)))
+        (re-search-backward "\\(?:^\\|[^\\]\\)|" (markdown-table-begin)))
+    (error (user-error "Cannot move to previous table cell")))
+  (when (looking-at "\\(?:^\\|[^\\]\\)| ?") (goto-char (match-end 0)))
+
+  ;; This may have dropped point on the hline.
+  (when (markdown-table-hline-at-point-p)
+    (markdown-table-backward-cell)))
+
+(defun markdown-table-transpose ()
+  "Transpose table at point.
+Horizontal separator lines will be eliminated."
+  (interactive)
+  (unless (markdown-table-at-point-p)
+    (user-error "Not at a table"))
+  (let* ((table (buffer-substring-no-properties
+                 (markdown-table-begin) (markdown-table-end)))
+         ;; Convert table to Lisp structure
+         (table (delq nil
+                      (mapcar
+                       (lambda (x)
+                         (unless (string-match-p
+                                  markdown-table-hline-regexp x)
+                           (markdown--table-line-to-columns x)))
+                       (markdown--split-string table "[ \t]*\n[ \t]*"))))
+         (dline_old (markdown-table-get-dline))
+         (col_old (markdown-table-get-column))
+         (contents (mapcar (lambda (_)
+                             (let ((tp table))
+                               (mapcar
+                                (lambda (_)
+                                  (prog1
+                                      (pop (car tp))
+                                    (setq tp (cdr tp))))
+                                table)))
+                           (car table))))
+    (goto-char (markdown-table-begin))
+    (save-excursion
+      (re-search-forward "|") (backward-char)
+      (delete-region (point) (markdown-table-end))
+      (insert (mapconcat
+               (lambda(x)
+                 (concat "| " (mapconcat 'identity x " | " ) " |\n"))
+               contents "")))
+    (markdown-table-goto-dline col_old)
+    (markdown-table-goto-column dline_old))
+  (when markdown-table-align-p
+    (markdown-table-align)))
+
+(defun markdown-table-sort-lines (&optional sorting-type)
+  "Sort table lines according to the column at point.
+
+The position of point indicates the column to be used for
+sorting, and the range of lines is the range between the nearest
+horizontal separator lines, or the entire table of no such lines
+exist. If point is before the first column, user will be prompted
+for the sorting column. If there is an active region, the mark
+specifies the first line and the sorting column, while point
+should be in the last line to be included into the sorting.
+
+The command then prompts for the sorting type which can be
+alphabetically or numerically. Sorting in reverse order is also
+possible.
+
+If SORTING-TYPE is specified when this function is called from a
+Lisp program, no prompting will take place. SORTING-TYPE must be
+a character, any of (?a ?A ?n ?N) where the capital letters
+indicate that sorting should be done in reverse order."
+  (interactive)
+  (unless (markdown-table-at-point-p)
+    (user-error "Not at a table"))
+  ;; Set sorting type and column used for sorting
+  (let ((column (let ((c (markdown-table-get-column)))
+                  (cond ((> c 0) c)
+                        ((called-interactively-p 'any)
+                         (read-number "Use column N for sorting: "))
+                        (t 1))))
+        (sorting-type
+         (or sorting-type
+             (read-char-exclusive
+              "Sort type: [a]lpha [n]umeric (A/N means reversed): "))))
+    (save-restriction
+      ;; Narrow buffer to appropriate sorting area
+      (if (region-active-p)
+          (narrow-to-region
+           (save-excursion
+             (progn
+               (goto-char (region-beginning)) (line-beginning-position)))
+           (save-excursion
+             (progn
+               (goto-char (region-end)) (line-end-position))))
+        (let ((start (markdown-table-begin))
+              (end (markdown-table-end)))
+          (narrow-to-region
+           (save-excursion
+             (if (re-search-backward
+                  markdown-table-hline-regexp start t)
+                 (line-beginning-position 2)
+               start))
+           (if (save-excursion (re-search-forward
+                                markdown-table-hline-regexp end t))
+               (match-beginning 0)
+             end))))
+      ;; Determine arguments for `sort-subr'
+      (let* ((extract-key-from-cell
+              (cl-case sorting-type
+                ((?a ?A) #'markdown--remove-invisible-markup) ;; #'identity)
+                ((?n ?N) #'string-to-number)
+                (t (user-error "Invalid sorting type: %c" sorting-type))))
+             (predicate
+              (cl-case sorting-type
+                ((?n ?N) #'<)
+                ((?a ?A) #'string<))))
+        ;; Sort selected area
+        (goto-char (point-min))
+        (sort-subr (memq sorting-type '(?A ?N))
+                   (lambda ()
+                     (forward-line)
+                     (while (and (not (eobp))
+                                 (not (looking-at
+                                       markdown-table-dline-regexp)))
+                       (forward-line)))
+                   #'end-of-line
+                   (lambda ()
+                     (funcall extract-key-from-cell
+                              (markdown-table-get-cell column)))
+                   nil
+                   predicate)
+        (goto-char (point-min))))))
+
+(defun markdown-table-convert-region (begin end &optional separator)
+  "Convert region from BEGIN to END to table with SEPARATOR.
+
+If every line contains at least one TAB character, the function
+assumes that the material is tab separated (TSV). If every line
+contains a comma, comma-separated values (CSV) are assumed. If
+not, lines are split at whitespace into cells.
+
+You can use a prefix argument to force a specific separator:
+\\[universal-argument] once forces CSV, \\[universal-argument]
+twice forces TAB, and \\[universal-argument] three times will
+prompt for a regular expression to match the separator, and a
+numeric argument N indicates that at least N consecutive
+spaces, or alternatively a TAB should be used as the separator."
+
+  (interactive "r\nP")
+  (let* ((begin (min begin end)) (end (max begin end)) re)
+    (goto-char begin) (beginning-of-line 1)
+    (setq begin (point-marker))
+    (goto-char end)
+    (if (bolp) (backward-char 1) (end-of-line 1))
+    (setq end (point-marker))
+    (when (equal separator '(64))
+      (setq separator (read-regexp "Regexp for cell separator: ")))
+    (unless separator
+      ;; Get the right cell separator
+      (goto-char begin)
+      (setq separator
+            (cond
+             ((not (re-search-forward "^[^\n\t]+$" end t)) '(16))
+             ((not (re-search-forward "^[^\n,]+$" end t)) '(4))
+             (t 1))))
+    (goto-char begin)
+    (if (equal separator '(4))
+        ;; Parse CSV
+        (while (< (point) end)
+          (cond
+           ((looking-at "^") (insert "| "))
+           ((looking-at "[ \t]*$") (replace-match " |") (beginning-of-line 2))
+           ((looking-at "[ \t]*\"\\([^\"\n]*\\)\"")
+            (replace-match "\\1") (if (looking-at "\"") (insert "\"")))
+           ((looking-at "[^,\n]+") (goto-char (match-end 0)))
+           ((looking-at "[ \t]*,") (replace-match " | "))
+           (t (beginning-of-line 2))))
+      (setq re
+            (cond
+             ((equal separator '(4))  "^\\|\"?[ \t]*,[ \t]*\"?")
+             ((equal separator '(16)) "^\\|\t")
+             ((integerp separator)
+              (if (< separator 1)
+                  (user-error "Cell separator must contain one or more spaces")
+                (format "^ *\\| *\t *\\| \\{%d,\\}\\|$" separator)))
+             ((stringp separator) (format "^ *\\|%s" separator))
+             (t (error "Invalid cell separator"))))
+      (let (finish)
+        (while (and (not finish) (re-search-forward re end t))
+          (if (eolp)
+              (progn
+                (replace-match "|" t t)
+                (forward-line 1)
+                (when (eobp)
+                  (setq finish t)))
+            (replace-match "| " t t)))))
+    (goto-char begin)
+    (when markdown-table-align-p
+      (markdown-table-align))))
+
+(defun markdown-insert-table (&optional rows columns align)
+  "Insert an empty pipe table.
+Optional arguments ROWS, COLUMNS, and ALIGN specify number of
+rows and columns and the column alignment."
+  (interactive)
+  (let* ((rows (or rows (read-number "Number of Rows: ")))
+         (columns (or columns (read-number "Number of Columns: ")))
+         (align (or align (read-string "Alignment ([l]eft, [r]ight, [c]enter, or RET for default): ")))
+         (align (cond ((equal align "l") ":--")
+                      ((equal align "r") "--:")
+                      ((equal align "c") ":-:")
+                      (t "---")))
+         (pos (point))
+         (indent (make-string (current-column) ?\ ))
+         (line (concat
+                (apply 'concat indent "|"
+                       (make-list columns "   |")) "\n"))
+         (hline (apply 'concat indent "|"
+                       (make-list columns (concat align "|")))))
+    (if (string-match
+         "^[ \t]*$" (buffer-substring-no-properties
+                     (line-beginning-position) (point)))
+        (beginning-of-line 1)
+      (newline))
+    (dotimes (_ rows) (insert line))
+    (goto-char pos)
+    (if (> rows 1)
+        (progn
+          (end-of-line 1) (insert (concat "\n" hline)) (goto-char pos)))
+    (markdown-table-forward-cell)))
+
+
+;;; ElDoc Support =============================================================
+
+(defun markdown-eldoc-function (&rest _ignored)
+  "Return a helpful string when appropriate based on context.
+* Report URL when point is at a hidden URL.
+* Report language name when point is a code block with hidden markup."
+  (cond
+   ;; Hidden URL or reference for inline link
+   ((and (or (thing-at-point-looking-at markdown-regex-link-inline)
+             (thing-at-point-looking-at markdown-regex-link-reference))
+         (or markdown-hide-urls markdown-hide-markup))
+    (let* ((imagep (string-equal (match-string 1) "!"))
+           (referencep (string-equal (match-string 5) "["))
+           (link (match-string-no-properties 6))
+           (edit-keys (markdown--substitute-command-keys
+                       (if imagep
+                           "\\[markdown-insert-image]"
+                         "\\[markdown-insert-link]")))
+           (edit-str (propertize edit-keys 'face 'font-lock-constant-face))
+           (object (if referencep "reference" "URL")))
+      (format "Hidden %s (%s to edit): %s" object edit-str
+              (if referencep
+                  (concat
+                   (propertize "[" 'face 'markdown-markup-face)
+                   (propertize link 'face 'markdown-reference-face)
+                   (propertize "]" 'face 'markdown-markup-face))
+                (propertize link 'face 'markdown-url-face)))))
+   ;; Hidden URL for wiki links
+   ((and (and markdown-enable-wiki-links
+              (thing-at-point-looking-at markdown-regex-wiki-link))
+         (or markdown-hide-urls markdown-hide-markup))
+    (let* ((aliasp (string-equal (match-string-no-properties 4) "|"))
+           (part1 (match-string-no-properties 3))
+           (part2 (match-string-no-properties 5))
+           (link (if (and aliasp markdown-wiki-link-alias-first) part2 part1))
+           (edit-keys (markdown--substitute-command-keys
+                       "\\[markdown-insert-wiki-link]"))
+           (edit-str (propertize edit-keys 'face 'font-lock-constant-face)))
+      (format "Hidden URL (%s to edit): %s"
+              edit-str (propertize link 'face 'markdown-reference-face))))
+   ;; Hidden language name for fenced code blocks
+   ((and (markdown-code-block-at-point-p)
+         (not (get-text-property (point) 'markdown-pre))
+         markdown-hide-markup)
+    (let ((lang (save-excursion (markdown-code-block-lang))))
+      (unless lang (setq lang "[unspecified]"))
+      (format "Hidden code block language: %s (%s to toggle markup)"
+              (propertize lang 'face 'markdown-language-keyword-face)
+              (markdown--substitute-command-keys
+               "\\[markdown-toggle-markup-hiding]"))))))
+
+(defun markdown--image-media-handler (mimetype data)
+  (let* ((ext (symbol-name (mailcap-mime-type-to-extension mimetype)))
+         (filename (read-string "Insert filename for image: "))
+         (link-text (read-string "Link text: "))
+         (filepath (file-name-with-extension filename ext))
+         (dir (file-name-directory filepath)))
+    (when (and dir (not (file-directory-p dir)))
+      (make-directory dir t))
+    (with-temp-file filepath
+      (insert data))
+    (when (string-match-p "\\s-" filepath)
+      (setq filepath (concat "<" filepath ">")))
+    (markdown-insert-inline-image link-text filepath)))
+
+(defun markdown--file-media-handler (_mimetype data)
+  (let* ((data (split-string data "[\0\r\n]" t "^file://"))
+         (files (cdr data)))
+    (while (not (null files))
+      (let* ((file (url-unhex-string (car files)))
+             (file (file-relative-name file))
+             (prompt (format "Link text(%s): " (file-name-nondirectory file)))
+             (link-text (read-string prompt)))
+        (when (string-match-p "\\s-" file)
+          (setq file (concat "<" file ">")))
+        (markdown-insert-inline-image link-text file)
+        (when (not (null (cdr files)))
+          (insert " "))
+        (setq files (cdr files))))))
+
+(defun markdown--dnd-read-method ()
+  (let ((choice (read-multiple-choice "What to do with file?"
+                                      '((?c "copy and insert")
+                                        (?o "open")
+                                        (?i "insert link")))))
+    (cl-case (car choice)
+      (?c 'copy-and-insert)
+      (?o 'open)
+      (?i 'insert)
+      (otherwise (markdown--dnd-read-method)))))
+
+(defun markdown--dnd-insert-path (filename)
+  (let ((mimetype (mailcap-file-name-to-mime-type filename))
+        (link-text "link text"))
+    (when (string-match-p "\\s-" filename)
+      (setq filename (concat "<" filename ">")))
+    (if (string-prefix-p "image/" mimetype)
+        (markdown-insert-inline-image link-text filename)
+      (markdown-insert-inline-link link-text filename))))
+
+(defun markdown--dnd-local-file-handler (url action)
+  (require 'mailcap)
+  (require 'dnd)
+  (let* ((filename (dnd-get-local-file-name url))
+         (method (if (eq markdown-yank-dnd-method 'ask)
+                     (markdown--dnd-read-method)
+                   markdown-yank-dnd-method)))
+    (cl-case method
+      (copy-and-insert
+       (let ((copied (expand-file-name (file-name-nondirectory filename))))
+         (copy-file filename copied)
+         (markdown--dnd-insert-path (file-relative-name copied))))
+      (open
+       (dnd-open-local-file url action))
+      (insert (markdown--dnd-insert-path (file-relative-name filename))))))
+
+(defun markdown--dnd-multi-local-file-handler (urls action)
+  (let ((multile-urls-p (> (length urls) 1)))
+    (dolist (url urls)
+      (markdown--dnd-local-file-handler url action)
+      (when multile-urls-p
+        (insert " ")))))
+
+(put 'markdown--dnd-multi-local-file-handler 'dnd-multiple-handler t)
+
+
+;;; Mode Definition  ==========================================================
+
+(defun markdown-show-version ()
+  "Show the version number in the minibuffer."
+  (interactive)
+  (message "markdown-mode, version %s" markdown-mode-version))
+
+(defun markdown-mode-info ()
+  "Open the `markdown-mode' homepage."
+  (interactive)
+  (browse-url "https://jblevins.org/projects/markdown-mode/"))
+
+;;;###autoload
+(define-derived-mode markdown-mode text-mode "Markdown"
+  "Major mode for editing Markdown files."
+  (when buffer-read-only
+    (when (or (not (buffer-file-name)) (file-writable-p (buffer-file-name)))
+      (setq-local buffer-read-only nil)))
+  ;; Natural Markdown tab width
+  (setq tab-width 4)
+  ;; Comments
+  (setq-local comment-start "<!-- ")
+  (setq-local comment-end " -->")
+  (setq-local comment-start-skip "<!--[ \t]*")
+  (setq-local comment-column 0)
+  (setq-local comment-auto-fill-only-comments nil)
+  (setq-local comment-use-syntax t)
+  ;; Sentence
+  (setq-local sentence-end-base "[.?!…‽][]\"'”’)}»›*_`~]*")
+  ;; Syntax
+  (add-hook 'syntax-propertize-extend-region-functions
+            #'markdown-syntax-propertize-extend-region nil t)
+  (add-hook 'jit-lock-after-change-extend-region-functions
+            #'markdown-font-lock-extend-region-function t t)
+  (setq-local syntax-propertize-function #'markdown-syntax-propertize)
+  (syntax-propertize (point-max)) ;; Propertize before hooks run, etc.
+  ;; Font lock.
+  (setq font-lock-defaults
+        '(markdown-mode-font-lock-keywords
+          nil nil nil nil
+          (font-lock-multiline . t)
+          (font-lock-syntactic-face-function . markdown-syntactic-face)
+          (font-lock-extra-managed-props
+           . (composition display invisible rear-nonsticky
+                          keymap help-echo mouse-face))))
+  (if markdown-hide-markup
+      (add-to-invisibility-spec 'markdown-markup)
+    (remove-from-invisibility-spec 'markdown-markup))
+  ;; Math mode
+  (when markdown-enable-math (markdown-toggle-math t))
+  ;; Add a buffer-local hook to reload after file-local variables are read
+  (add-hook 'hack-local-variables-hook #'markdown-handle-local-variables nil t)
+  ;; For imenu support
+  (setq-local imenu-create-index-function (if markdown-nested-imenu-heading-index
+                                              #'markdown-imenu-create-nested-index
+                                            #'markdown-imenu-create-flat-index)
+              imenu-submenus-on-top nil)
+
+  ;; Defun movement
+  (setq-local beginning-of-defun-function #'markdown-beginning-of-defun)
+  (setq-local end-of-defun-function #'markdown-end-of-defun)
+  ;; Paragraph filling
+  (setq-local fill-paragraph-function #'markdown-fill-paragraph)
+  (setq-local paragraph-start
+              ;; Should match start of lines that start or separate paragraphs
+              (mapconcat #'identity
+                         '(
+                           "\f" ; starts with a literal line-feed
+                           "[ \t\f]*$" ; space-only line
+                           "\\(?:[ \t]*>\\)+[ \t\f]*$"; empty line in blockquote
+                           "[ \t]*[*+-][ \t]+" ; unordered list item
+                           "[ \t]*\\(?:[0-9]+\\|#\\)\\.[ \t]+" ; ordered list item
+                           "[ \t]*\\[\\S-*\\]:[ \t]+" ; link ref def
+                           "[ \t]*:[ \t]+" ; definition
+                           "^|" ; table or Pandoc line block
+                           )
+                         "\\|"))
+  (setq-local paragraph-separate
+              ;; Should match lines that separate paragraphs without being
+              ;; part of any paragraph:
+              (mapconcat #'identity
+                         '("[ \t\f]*$" ; space-only line
+                           "\\(?:[ \t]*>\\)+[ \t\f]*$"; empty line in blockquote
+                           ;; The following is not ideal, but the Fill customization
+                           ;; options really only handle paragraph-starting prefixes,
+                           ;; not paragraph-ending suffixes:
+                           ".*  $" ; line ending in two spaces
+                           "^#+"
+                           "^\\(?:   \\)?[-=]+[ \t]*$" ;; setext
+                           "[ \t]*\\[\\^\\S-*\\]:[ \t]*$") ; just the start of a footnote def
+                         "\\|"))
+  (setq-local adaptive-fill-first-line-regexp "\\`[ \t]*[A-Z]?>[ \t]*?\\'")
+  (setq-local adaptive-fill-regexp "\\s-*")
+  (setq-local adaptive-fill-function #'markdown-adaptive-fill-function)
+  (setq-local fill-forward-paragraph-function #'markdown-fill-forward-paragraph)
+  ;; Outline mode
+  (setq-local outline-regexp markdown-regex-header)
+  (setq-local outline-level #'markdown-outline-level)
+  ;; Cause use of ellipses for invisible text.
+  (add-to-invisibility-spec '(outline . t))
+  ;; ElDoc support
+  (if (boundp 'eldoc-documentation-functions)
+      (add-hook 'eldoc-documentation-functions #'markdown-eldoc-function nil t)
+    (add-function :before-until (local 'eldoc-documentation-function)
+                  #'markdown-eldoc-function))
+  ;; Inhibiting line-breaking:
+  ;; Separating out each condition into a separate function so that users can
+  ;; override if desired (with remove-hook)
+  (add-hook 'fill-nobreak-predicate
+            #'markdown-line-is-reference-definition-p nil t)
+  (add-hook 'fill-nobreak-predicate
+            #'markdown-pipe-at-bol-p nil t)
+
+  ;; Indentation
+  (setq-local indent-line-function markdown-indent-function)
+  (setq-local indent-region-function #'markdown--indent-region)
+
+  ;; Flyspell
+  (setq-local flyspell-generic-check-word-predicate
+              #'markdown-flyspell-check-word-p)
+
+  ;; Electric quoting
+  (add-hook 'electric-quote-inhibit-functions
+            #'markdown--inhibit-electric-quote nil :local)
+
+  ;; drag and drop handler
+  (let ((dnd-handler (if (>= emacs-major-version 30)
+                         #'markdown--dnd-multi-local-file-handler
+                       #'markdown--dnd-local-file-handler)))
+    (setq-local dnd-protocol-alist (append
+                                    (list (cons "^file:///" dnd-handler)
+                                          (cons "^file:/[^/]" dnd-handler)
+                                          (cons "^file:[^/]" dnd-handler))
+                                    dnd-protocol-alist)))
+
+  ;; media handler
+  (when (version< "29" emacs-version)
+    (yank-media-handler "image/.*" #'markdown--image-media-handler)
+    ;; TODO support other than GNOME, like KDE etc
+    (yank-media-handler "x-special/gnome-copied-files" #'markdown--file-media-handler))
+
+  ;; Make checkboxes buttons
+  (when markdown-make-gfm-checkboxes-buttons
+    (markdown-make-gfm-checkboxes-buttons (point-min) (point-max))
+    (add-hook 'after-change-functions #'markdown-gfm-checkbox-after-change-function t t)
+    (add-hook 'change-major-mode-hook #'markdown-remove-gfm-checkbox-overlays t t))
+
+  ;; edit-indirect
+  (add-hook 'edit-indirect-after-commit-functions
+            #'markdown--edit-indirect-after-commit-function
+            nil 'local)
+
+  ;; Marginalized headings
+  (when markdown-marginalize-headers
+    (add-hook 'window-configuration-change-hook
+              #'markdown-marginalize-update-current nil t))
+
+  ;; add live preview export hook
+  (add-hook 'after-save-hook #'markdown-live-preview-if-markdown t t)
+  (add-hook 'kill-buffer-hook #'markdown-live-preview-remove-on-kill t t)
+
+  ;; Add a custom keymap for `visual-line-mode' so that activating
+  ;; this minor mode does not override markdown-mode's keybindings.
+  ;; FIXME: Probably `visual-line-mode' should take care of this.
+  (let ((oldmap (cdr (assoc 'visual-line-mode minor-mode-map-alist)))
+        (newmap (make-sparse-keymap)))
+    (set-keymap-parent newmap oldmap)
+    (define-key newmap [remap move-beginning-of-line] nil)
+    (define-key newmap [remap move-end-of-line] nil)
+    (make-local-variable 'minor-mode-overriding-map-alist)
+    (push `(visual-line-mode . ,newmap) minor-mode-overriding-map-alist)))
+
+;;;###autoload
+(add-to-list 'auto-mode-alist
+             '("\\.\\(?:md\\|markdown\\|mkd\\|mdown\\|mkdn\\|mdwn\\|mdx\\)\\'" . markdown-mode))
+
+
+;;; GitHub Flavored Markdown Mode  ============================================
+
+(defun gfm--electric-pair-fence-code-block ()
+  (when (and electric-pair-mode
+             (not markdown-gfm-use-electric-backquote)
+             (eql last-command-event ?`)
+             (let ((count 0))
+               (while (eql (char-before (- (point) count)) ?`)
+                 (cl-incf count))
+               (= count 3))
+             (eql (char-after) ?`))
+    (save-excursion (insert (make-string 2 ?`)))))
+
+(defvar gfm-mode-hook nil
+  "Hook run when entering GFM mode.")
+
+;;;###autoload
+(define-derived-mode gfm-mode markdown-mode "GFM"
+  "Major mode for editing GitHub Flavored Markdown files."
+  (setq markdown-link-space-sub-char "-")
+  (setq markdown-wiki-link-search-subdirectories t)
+  (setq-local markdown-table-at-point-p-function #'gfm--table-at-point-p)
+  (setq-local paragraph-separate
+              (concat paragraph-separate
+                      "\\|"
+                      ;; GFM alert syntax
+                      "^>\s-*\\[!\\(?:NOTE\\|TIP\\|IMPORTANT\\|WARNING\\|CAUTION\\)\\]"))
+  (add-hook 'post-self-insert-hook #'gfm--electric-pair-fence-code-block 'append t)
+  (markdown-gfm-parse-buffer-for-languages))
+
+
+;;; Viewing modes =============================================================
+
+(defcustom markdown-hide-markup-in-view-modes t
+  "Enable hidden markup mode in `markdown-view-mode' and `gfm-view-mode'."
+  :group 'markdown
+  :type 'boolean
+  :safe #'booleanp)
+
+(defvar markdown-view-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "p") #'markdown-outline-previous)
+    (define-key map (kbd "n") #'markdown-outline-next)
+    (define-key map (kbd "f") #'markdown-outline-next-same-level)
+    (define-key map (kbd "b") #'markdown-outline-previous-same-level)
+    (define-key map (kbd "u") #'markdown-outline-up)
+    (define-key map (kbd "DEL") #'scroll-down-command)
+    (define-key map (kbd "SPC") #'scroll-up-command)
+    (define-key map (kbd ">") #'end-of-buffer)
+    (define-key map (kbd "<") #'beginning-of-buffer)
+    (define-key map (kbd "q") #'kill-current-buffer)
+    (define-key map (kbd "?") #'describe-mode)
+    map)
+  "Keymap for `markdown-view-mode'.")
+
+(defun markdown--filter-visible (beg end &optional delete)
+  (let ((result "")
+        (invisible-faces '(markdown-header-delimiter-face markdown-header-rule-face)))
+    (while (< beg end)
+      (when (markdown--face-p beg invisible-faces)
+        (cl-incf beg)
+        (while (and (markdown--face-p beg invisible-faces) (< beg end))
+          (cl-incf beg)))
+      (let ((next (next-single-char-property-change beg 'invisible)))
+        (unless (get-char-property beg 'invisible)
+          (setq result (concat result (buffer-substring beg (min end next)))))
+        (setq beg next)))
+    (prog1 result
+      (when delete
+        (let ((inhibit-read-only t))
+          (delete-region beg end))))))
+
+;;;###autoload
+(define-derived-mode markdown-view-mode markdown-mode "Markdown-View"
+  "Major mode for viewing Markdown content."
+  (setq-local markdown-hide-markup markdown-hide-markup-in-view-modes)
+  (add-to-invisibility-spec 'markdown-markup)
+  (setq-local filter-buffer-substring-function #'markdown--filter-visible)
+  (read-only-mode 1))
+
+(defvar gfm-view-mode-map
+  markdown-view-mode-map
+  "Keymap for `gfm-view-mode'.")
+
+;;;###autoload
+(define-derived-mode gfm-view-mode gfm-mode "GFM-View"
+  "Major mode for viewing GitHub Flavored Markdown content."
+  (setq-local markdown-hide-markup markdown-hide-markup-in-view-modes)
+  (setq-local markdown-fontify-code-blocks-natively t)
+  (setq-local filter-buffer-substring-function #'markdown--filter-visible)
+  (add-to-invisibility-spec 'markdown-markup)
+  (read-only-mode 1))
+
+
+;;; Live Preview Mode  ========================================================
+;;;###autoload
+(define-minor-mode markdown-live-preview-mode
+  "Toggle native previewing on save for a specific markdown file."
+  :lighter " MD-Preview"
+  (if markdown-live-preview-mode
+      (if (markdown-live-preview-get-filename)
+          (markdown-display-buffer-other-window (markdown-live-preview-export))
+        (markdown-live-preview-mode -1)
+        (user-error "Buffer %s does not visit a file" (current-buffer)))
+    (markdown-live-preview-remove)))
+
+
+(provide 'markdown-mode)
+
+;; Local Variables:
+;; indent-tabs-mode: nil
+;; coding: utf-8
+;; End:
+;;; markdown-mode.el ends here
diff --git a/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode.elc b/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode.elc
new file mode 100644
index 0000000..33794e1
Binary files /dev/null and b/emacs/.emacs.d/elpa/markdown-mode-20260821.11/markdown-mode.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-codicon.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-codicon.el
new file mode 100644
index 0000000..587d035
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-codicon.el
@@ -0,0 +1,573 @@
+;;; nerd-icons-data-codicon.el --- glyphset codicon -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; codicon
+;; from Nerd Font Version: 3.5.1
+
+;;; Code:
+
+(defvar nerd-icons/codicon-alist
+  '(
+    ("nf-cod-account" . "\xeb99")
+    ("nf-cod-activate_breakpoints" . "\xea97")
+    ("nf-cod-add" . "\xea60")
+    ("nf-cod-add_small" . "\xec7b")
+    ("nf-cod-agent" . "\xec67")
+    ("nf-cod-archive" . "\xea98")
+    ("nf-cod-arrow_both" . "\xea99")
+    ("nf-cod-arrow_circle_down" . "\xebfc")
+    ("nf-cod-arrow_circle_left" . "\xebfd")
+    ("nf-cod-arrow_circle_right" . "\xebfe")
+    ("nf-cod-arrow_circle_up" . "\xebff")
+    ("nf-cod-arrow_down" . "\xea9a")
+    ("nf-cod-arrow_left" . "\xea9b")
+    ("nf-cod-arrow_right" . "\xea9c")
+    ("nf-cod-arrow_small_down" . "\xea9d")
+    ("nf-cod-arrow_small_left" . "\xea9e")
+    ("nf-cod-arrow_small_right" . "\xea9f")
+    ("nf-cod-arrow_small_up" . "\xeaa0")
+    ("nf-cod-arrow_swap" . "\xebcb")
+    ("nf-cod-arrow_up" . "\xeaa1")
+    ("nf-cod-ask" . "\xec80")
+    ("nf-cod-attach" . "\xec34")
+    ("nf-cod-azure" . "\xebd8")
+    ("nf-cod-azure_devops" . "\xebe8")
+    ("nf-cod-beaker" . "\xea79")
+    ("nf-cod-beaker_stop" . "\xebe1")
+    ("nf-cod-bell" . "\xeaa2")
+    ("nf-cod-bell_dot" . "\xeb9a")
+    ("nf-cod-bell_slash" . "\xec08")
+    ("nf-cod-bell_slash_dot" . "\xec09")
+    ("nf-cod-blank" . "\xec03")
+    ("nf-cod-bold" . "\xeaa3")
+    ("nf-cod-book" . "\xeaa4")
+    ("nf-cod-bookmark" . "\xeaa5")
+    ("nf-cod-bracket_dot" . "\xebe5")
+    ("nf-cod-bracket_error" . "\xebe6")
+    ("nf-cod-briefcase" . "\xeaac")
+    ("nf-cod-broadcast" . "\xeaad")
+    ("nf-cod-browser" . "\xeaae")
+    ("nf-cod-bug" . "\xeaaf")
+    ("nf-cod-build" . "\xec5a")
+    ("nf-cod-calendar" . "\xeab0")
+    ("nf-cod-call_incoming" . "\xeb92")
+    ("nf-cod-call_outgoing" . "\xeb93")
+    ("nf-cod-case_sensitive" . "\xeab1")
+    ("nf-cod-chat_sparkle" . "\xec4f")
+    ("nf-cod-chat_sparkle_error" . "\xec56")
+    ("nf-cod-chat_sparkle_warning" . "\xec55")
+    ("nf-cod-check" . "\xeab2")
+    ("nf-cod-check_all" . "\xebb1")
+    ("nf-cod-checklist" . "\xeab3")
+    ("nf-cod-chevron_down" . "\xeab4")
+    ("nf-cod-chevron_left" . "\xeab5")
+    ("nf-cod-chevron_right" . "\xeab6")
+    ("nf-cod-chevron_up" . "\xeab7")
+    ("nf-cod-chip" . "\xec19")
+    ("nf-cod-chrome_close" . "\xeab8")
+    ("nf-cod-chrome_maximize" . "\xeab9")
+    ("nf-cod-chrome_minimize" . "\xeaba")
+    ("nf-cod-chrome_restore" . "\xeabb")
+    ("nf-cod-circle" . "\xeabc")
+    ("nf-cod-circle_filled" . "\xea71")
+    ("nf-cod-circle_large" . "\xebb5")
+    ("nf-cod-circle_large_filled" . "\xebb4")
+    ("nf-cod-circle_slash" . "\xeabd")
+    ("nf-cod-circle_small" . "\xec07")
+    ("nf-cod-circle_small_filled" . "\xeb8a")
+    ("nf-cod-circuit_board" . "\xeabe")
+    ("nf-cod-claude" . "\xec82")
+    ("nf-cod-clear_all" . "\xeabf")
+    ("nf-cod-clippy" . "\xeac0")
+    ("nf-cod-clockface" . "\xec75")
+    ("nf-cod-close" . "\xea76")
+    ("nf-cod-close_all" . "\xeac1")
+    ("nf-cod-cloud" . "\xebaa")
+    ("nf-cod-cloud_download" . "\xeac2")
+    ("nf-cod-cloud_small" . "\xec7a")
+    ("nf-cod-cloud_upload" . "\xeac3")
+    ("nf-cod-code" . "\xeac4")
+    ("nf-cod-code_oss" . "\xec2b")
+    ("nf-cod-code_review" . "\xec37")
+    ("nf-cod-coffee" . "\xec15")
+    ("nf-cod-collapse_all" . "\xeac5")
+    ("nf-cod-collection" . "\xec57")
+    ("nf-cod-collection_small" . "\xec78")
+    ("nf-cod-color_mode" . "\xeac6")
+    ("nf-cod-combine" . "\xebb6")
+    ("nf-cod-comment" . "\xea6b")
+    ("nf-cod-comment_discussion" . "\xeac7")
+    ("nf-cod-comment_discussion_quote" . "\xec5b")
+    ("nf-cod-comment_discussion_sparkle" . "\xec54")
+    ("nf-cod-comment_draft" . "\xec0e")
+    ("nf-cod-comment_unresolved" . "\xec0a")
+    ("nf-cod-compass" . "\xebd5")
+    ("nf-cod-compass_active" . "\xebd7")
+    ("nf-cod-compass_dot" . "\xebd6")
+    ("nf-cod-copilot" . "\xec1e")
+    ("nf-cod-copilot_blocked" . "\xec3d")
+    ("nf-cod-copilot_error" . "\xec4d")
+    ("nf-cod-copilot_in_progress" . "\xec4c")
+    ("nf-cod-copilot_large" . "\xec3a")
+    ("nf-cod-copilot_not_connected" . "\xec3e")
+    ("nf-cod-copilot_snooze" . "\xec52")
+    ("nf-cod-copilot_success" . "\xec4e")
+    ("nf-cod-copilot_unavailable" . "\xec42")
+    ("nf-cod-copilot_warning" . "\xec38")
+    ("nf-cod-copilot_warning_large" . "\xec3b")
+    ("nf-cod-copy" . "\xebcc")
+    ("nf-cod-coverage" . "\xec2e")
+    ("nf-cod-credit_card" . "\xeac9")
+    ("nf-cod-cursor" . "\xec5c")
+    ("nf-cod-dash" . "\xeacc")
+    ("nf-cod-dashboard" . "\xeacd")
+    ("nf-cod-database" . "\xeace")
+    ("nf-cod-debug" . "\xead8")
+    ("nf-cod-debug_all" . "\xebdc")
+    ("nf-cod-debug_alt" . "\xeb91")
+    ("nf-cod-debug_alt_small" . "\xeba8")
+    ("nf-cod-debug_breakpoint_conditional" . "\xeaa7")
+    ("nf-cod-debug_breakpoint_conditional_unverified" . "\xeaa6")
+    ("nf-cod-debug_breakpoint_data" . "\xeaa9")
+    ("nf-cod-debug_breakpoint_data_unverified" . "\xeaa8")
+    ("nf-cod-debug_breakpoint_function" . "\xeb88")
+    ("nf-cod-debug_breakpoint_function_unverified" . "\xeb87")
+    ("nf-cod-debug_breakpoint_log" . "\xeaab")
+    ("nf-cod-debug_breakpoint_log_unverified" . "\xeaaa")
+    ("nf-cod-debug_breakpoint_unsupported" . "\xeb8c")
+    ("nf-cod-debug_connected" . "\xec63")
+    ("nf-cod-debug_console" . "\xeb9b")
+    ("nf-cod-debug_continue" . "\xeacf")
+    ("nf-cod-debug_continue_small" . "\xebe0")
+    ("nf-cod-debug_coverage" . "\xebdd")
+    ("nf-cod-debug_disconnect" . "\xead0")
+    ("nf-cod-debug_line_by_line" . "\xebd0")
+    ("nf-cod-debug_pause" . "\xead1")
+    ("nf-cod-debug_rerun" . "\xebc0")
+    ("nf-cod-debug_restart" . "\xead2")
+    ("nf-cod-debug_restart_frame" . "\xeb90")
+    ("nf-cod-debug_reverse_continue" . "\xeb8e")
+    ("nf-cod-debug_stackframe" . "\xeb8b")
+    ("nf-cod-debug_stackframe_active" . "\xeb89")
+    ("nf-cod-debug_start" . "\xead3")
+    ("nf-cod-debug_step_back" . "\xeb8f")
+    ("nf-cod-debug_step_into" . "\xead4")
+    ("nf-cod-debug_step_out" . "\xead5")
+    ("nf-cod-debug_step_over" . "\xead6")
+    ("nf-cod-debug_stop" . "\xead7")
+    ("nf-cod-desktop_download" . "\xea78")
+    ("nf-cod-device_camera" . "\xeada")
+    ("nf-cod-device_camera_video" . "\xead9")
+    ("nf-cod-device_mobile" . "\xeadb")
+    ("nf-cod-diff" . "\xeae1")
+    ("nf-cod-diff_added" . "\xeadc")
+    ("nf-cod-diff_ignored" . "\xeadd")
+    ("nf-cod-diff_modified" . "\xeade")
+    ("nf-cod-diff_multiple" . "\xec23")
+    ("nf-cod-diff_removed" . "\xeadf")
+    ("nf-cod-diff_renamed" . "\xeae0")
+    ("nf-cod-diff_single" . "\xec22")
+    ("nf-cod-discard" . "\xeae2")
+    ("nf-cod-download" . "\xec74")
+    ("nf-cod-edit" . "\xea73")
+    ("nf-cod-edit_code" . "\xec68")
+    ("nf-cod-edit_session" . "\xec36")
+    ("nf-cod-edit_sparkle" . "\xec51")
+    ("nf-cod-editor_layout" . "\xeae3")
+    ("nf-cod-ellipsis" . "\xea7c")
+    ("nf-cod-empty_window" . "\xeae4")
+    ("nf-cod-eraser" . "\xec5d")
+    ("nf-cod-error" . "\xea87")
+    ("nf-cod-error_small" . "\xebfb")
+    ("nf-cod-exclude" . "\xeae5")
+    ("nf-cod-expand_all" . "\xeb95")
+    ("nf-cod-export" . "\xebac")
+    ("nf-cod-extensions" . "\xeae6")
+    ("nf-cod-extensions_large" . "\xec48")
+    ("nf-cod-eye" . "\xea70")
+    ("nf-cod-eye_closed" . "\xeae7")
+    ("nf-cod-feedback" . "\xeb96")
+    ("nf-cod-file" . "\xea7b")
+    ("nf-cod-file_binary" . "\xeae8")
+    ("nf-cod-file_code" . "\xeae9")
+    ("nf-cod-file_media" . "\xeaea")
+    ("nf-cod-file_pdf" . "\xeaeb")
+    ("nf-cod-file_submodule" . "\xeaec")
+    ("nf-cod-file_symlink_directory" . "\xeaed")
+    ("nf-cod-file_symlink_file" . "\xeaee")
+    ("nf-cod-file_text" . "\xec5e")
+    ("nf-cod-file_zip" . "\xeaef")
+    ("nf-cod-files" . "\xeaf0")
+    ("nf-cod-filter" . "\xeaf1")
+    ("nf-cod-filter_filled" . "\xebce")
+    ("nf-cod-flag" . "\xec3f")
+    ("nf-cod-flame" . "\xeaf2")
+    ("nf-cod-fold" . "\xeaf5")
+    ("nf-cod-fold_down" . "\xeaf3")
+    ("nf-cod-fold_up" . "\xeaf4")
+    ("nf-cod-folder" . "\xea83")
+    ("nf-cod-folder_active" . "\xeaf6")
+    ("nf-cod-folder_library" . "\xebdf")
+    ("nf-cod-folder_opened" . "\xeaf7")
+    ("nf-cod-forward" . "\xec73")
+    ("nf-cod-game" . "\xec17")
+    ("nf-cod-gear" . "\xeaf8")
+    ("nf-cod-gift" . "\xeaf9")
+    ("nf-cod-gist" . "\xeafb")
+    ("nf-cod-gist_secret" . "\xeafa")
+    ("nf-cod-git_branch" . "\xec6f")
+    ("nf-cod-git_branch_changes" . "\xec6c")
+    ("nf-cod-git_branch_conflicts" . "\xec6e")
+    ("nf-cod-git_branch_staged_changes" . "\xec6d")
+    ("nf-cod-git_commit" . "\xeafc")
+    ("nf-cod-git_compare" . "\xeafd")
+    ("nf-cod-git_fetch" . "\xec1d")
+    ("nf-cod-git_merge" . "\xeafe")
+    ("nf-cod-git_pull_request" . "\xea64")
+    ("nf-cod-git_pull_request_closed" . "\xebda")
+    ("nf-cod-git_pull_request_create" . "\xebbc")
+    ("nf-cod-git_pull_request_done" . "\xec46")
+    ("nf-cod-git_pull_request_draft" . "\xebdb")
+    ("nf-cod-git_pull_request_go_to_changes" . "\xec0b")
+    ("nf-cod-git_pull_request_new_changes" . "\xec0c")
+    ("nf-cod-git_stash" . "\xec26")
+    ("nf-cod-git_stash_apply" . "\xec27")
+    ("nf-cod-git_stash_pop" . "\xec28")
+    ("nf-cod-github" . "\xea84")
+    ("nf-cod-github_action" . "\xeaff")
+    ("nf-cod-github_alt" . "\xeb00")
+    ("nf-cod-github_inverted" . "\xeba1")
+    ("nf-cod-github_project" . "\xec2f")
+    ("nf-cod-globe" . "\xeb01")
+    ("nf-cod-go_to_editing_session" . "\xec35")
+    ("nf-cod-go_to_file" . "\xea94")
+    ("nf-cod-go_to_search" . "\xec32")
+    ("nf-cod-grabber" . "\xeb02")
+    ("nf-cod-graph" . "\xeb03")
+    ("nf-cod-graph_left" . "\xebad")
+    ("nf-cod-graph_line" . "\xebe2")
+    ("nf-cod-graph_scatter" . "\xebe3")
+    ("nf-cod-gripper" . "\xeb04")
+    ("nf-cod-group_by_ref_type" . "\xeb97")
+    ("nf-cod-heart" . "\xeb05")
+    ("nf-cod-heart_filled" . "\xec04")
+    ("nf-cod-history" . "\xea82")
+    ("nf-cod-home" . "\xeb06")
+    ("nf-cod-horizontal_rule" . "\xeb07")
+    ("nf-cod-hubot" . "\xeb08")
+    ("nf-cod-inbox" . "\xeb09")
+    ("nf-cod-indent" . "\xebf9")
+    ("nf-cod-index_zero" . "\xec66")
+    ("nf-cod-info" . "\xea74")
+    ("nf-cod-insert" . "\xec11")
+    ("nf-cod-inspect" . "\xebd1")
+    ("nf-cod-issue_draft" . "\xebd9")
+    ("nf-cod-issue_reopened" . "\xeb0b")
+    ("nf-cod-issues" . "\xeb0c")
+    ("nf-cod-italic" . "\xeb0d")
+    ("nf-cod-jersey" . "\xeb0e")
+    ("nf-cod-json" . "\xeb0f")
+    ("nf-cod-kebab_vertical" . "\xeb10")
+    ("nf-cod-key" . "\xeb11")
+    ("nf-cod-keyboard_tab" . "\xec3c")
+    ("nf-cod-keyboard_tab_above" . "\xec44")
+    ("nf-cod-keyboard_tab_below" . "\xec45")
+    ("nf-cod-law" . "\xeb12")
+    ("nf-cod-layers" . "\xebd2")
+    ("nf-cod-layers_active" . "\xebd4")
+    ("nf-cod-layers_dot" . "\xebd3")
+    ("nf-cod-layout" . "\xebeb")
+    ("nf-cod-layout_activitybar_left" . "\xebec")
+    ("nf-cod-layout_activitybar_right" . "\xebed")
+    ("nf-cod-layout_centered" . "\xebf7")
+    ("nf-cod-layout_menubar" . "\xebf6")
+    ("nf-cod-layout_panel" . "\xebf2")
+    ("nf-cod-layout_panel_center" . "\xebef")
+    ("nf-cod-layout_panel_dock" . "\xec49")
+    ("nf-cod-layout_panel_justify" . "\xebf0")
+    ("nf-cod-layout_panel_left" . "\xebee")
+    ("nf-cod-layout_panel_off" . "\xec01")
+    ("nf-cod-layout_panel_right" . "\xebf1")
+    ("nf-cod-layout_sidebar_left" . "\xebf3")
+    ("nf-cod-layout_sidebar_left_dock" . "\xec4a")
+    ("nf-cod-layout_sidebar_left_off" . "\xec02")
+    ("nf-cod-layout_sidebar_right" . "\xebf4")
+    ("nf-cod-layout_sidebar_right_dock" . "\xec4b")
+    ("nf-cod-layout_sidebar_right_off" . "\xec00")
+    ("nf-cod-layout_statusbar" . "\xebf5")
+    ("nf-cod-library" . "\xeb9c")
+    ("nf-cod-lightbulb" . "\xea61")
+    ("nf-cod-lightbulb_autofix" . "\xeb13")
+    ("nf-cod-lightbulb_empty" . "\xec40")
+    ("nf-cod-lightbulb_sparkle" . "\xec1f")
+    ("nf-cod-link" . "\xeb15")
+    ("nf-cod-link_external" . "\xeb14")
+    ("nf-cod-list_filter" . "\xeb83")
+    ("nf-cod-list_flat" . "\xeb84")
+    ("nf-cod-list_ordered" . "\xeb16")
+    ("nf-cod-list_selection" . "\xeb85")
+    ("nf-cod-list_tree" . "\xeb86")
+    ("nf-cod-list_unordered" . "\xeb17")
+    ("nf-cod-live_share" . "\xeb18")
+    ("nf-cod-loading" . "\xeb19")
+    ("nf-cod-location" . "\xeb1a")
+    ("nf-cod-lock" . "\xea75")
+    ("nf-cod-lock_small" . "\xebe7")
+    ("nf-cod-magnet" . "\xebae")
+    ("nf-cod-mail" . "\xeb1c")
+    ("nf-cod-mail_read" . "\xeb1b")
+    ("nf-cod-map" . "\xec05")
+    ("nf-cod-map_filled" . "\xec06")
+    ("nf-cod-map_vertical" . "\xec30")
+    ("nf-cod-map_vertical_filled" . "\xec31")
+    ("nf-cod-markdown" . "\xeb1d")
+    ("nf-cod-mcp" . "\xec47")
+    ("nf-cod-megaphone" . "\xeb1e")
+    ("nf-cod-mention" . "\xeb1f")
+    ("nf-cod-menu" . "\xeb94")
+    ("nf-cod-merge" . "\xebab")
+    ("nf-cod-merge_into" . "\xec6b")
+    ("nf-cod-mic" . "\xec12")
+    ("nf-cod-mic_filled" . "\xec1c")
+    ("nf-cod-milestone" . "\xeb20")
+    ("nf-cod-mirror" . "\xea69")
+    ("nf-cod-mortar_board" . "\xeb21")
+    ("nf-cod-move" . "\xeb22")
+    ("nf-cod-multiple_windows" . "\xeb23")
+    ("nf-cod-music" . "\xec1b")
+    ("nf-cod-mute" . "\xeb24")
+    ("nf-cod-new_collection" . "\xec58")
+    ("nf-cod-new_file" . "\xea7f")
+    ("nf-cod-new_folder" . "\xea80")
+    ("nf-cod-new_session" . "\xec84")
+    ("nf-cod-newline" . "\xebea")
+    ("nf-cod-no_newline" . "\xeb25")
+    ("nf-cod-note" . "\xeb26")
+    ("nf-cod-notebook" . "\xebaf")
+    ("nf-cod-notebook_template" . "\xebbf")
+    ("nf-cod-octoface" . "\xeb27")
+    ("nf-cod-open_in_product" . "\xec65")
+    ("nf-cod-open_in_window" . "\xec83")
+    ("nf-cod-open_preview" . "\xeb28")
+    ("nf-cod-openai" . "\xec81")
+    ("nf-cod-organization" . "\xea7e")
+    ("nf-cod-output" . "\xeb9d")
+    ("nf-cod-package" . "\xeb29")
+    ("nf-cod-paintcan" . "\xeb2a")
+    ("nf-cod-pass" . "\xeba4")
+    ("nf-cod-pass_filled" . "\xebb3")
+    ("nf-cod-percentage" . "\xec33")
+    ("nf-cod-person" . "\xea67")
+    ("nf-cod-person_add" . "\xebcd")
+    ("nf-cod-piano" . "\xec1a")
+    ("nf-cod-pie_chart" . "\xebe4")
+    ("nf-cod-pin" . "\xeb2b")
+    ("nf-cod-pinned" . "\xeba0")
+    ("nf-cod-pinned_dirty" . "\xebb2")
+    ("nf-cod-play" . "\xeb2c")
+    ("nf-cod-play_circle" . "\xeba6")
+    ("nf-cod-plug" . "\xeb2d")
+    ("nf-cod-preserve_case" . "\xeb2e")
+    ("nf-cod-preview" . "\xeb2f")
+    ("nf-cod-primitive_square" . "\xea72")
+    ("nf-cod-project" . "\xeb30")
+    ("nf-cod-pulse" . "\xeb31")
+    ("nf-cod-python" . "\xec39")
+    ("nf-cod-question" . "\xeb32")
+    ("nf-cod-quote" . "\xeb33")
+    ("nf-cod-quotes" . "\xec60")
+    ("nf-cod-radio_tower" . "\xeb34")
+    ("nf-cod-reactions" . "\xeb35")
+    ("nf-cod-record" . "\xeba7")
+    ("nf-cod-record_keys" . "\xea65")
+    ("nf-cod-record_small" . "\xebfa")
+    ("nf-cod-redo" . "\xebb0")
+    ("nf-cod-references" . "\xeb36")
+    ("nf-cod-refresh" . "\xeb37")
+    ("nf-cod-regex" . "\xeb38")
+    ("nf-cod-remote" . "\xeb3a")
+    ("nf-cod-remote_explorer" . "\xeb39")
+    ("nf-cod-remove" . "\xeb3b")
+    ("nf-cod-remove_small" . "\xec7c")
+    ("nf-cod-rename" . "\xec61")
+    ("nf-cod-replace" . "\xeb3d")
+    ("nf-cod-replace_all" . "\xeb3c")
+    ("nf-cod-reply" . "\xea7d")
+    ("nf-cod-repo" . "\xea62")
+    ("nf-cod-repo_clone" . "\xeb3e")
+    ("nf-cod-repo_force_push" . "\xeb3f")
+    ("nf-cod-repo_forked" . "\xea63")
+    ("nf-cod-repo_pinned" . "\xec43")
+    ("nf-cod-repo_pull" . "\xeb40")
+    ("nf-cod-repo_push" . "\xeb41")
+    ("nf-cod-repo_selected" . "\xec69")
+    ("nf-cod-report" . "\xeb42")
+    ("nf-cod-request_changes" . "\xeb43")
+    ("nf-cod-robot" . "\xec20")
+    ("nf-cod-rocket" . "\xeb44")
+    ("nf-cod-root_folder" . "\xeb46")
+    ("nf-cod-root_folder_opened" . "\xeb45")
+    ("nf-cod-rss" . "\xeb47")
+    ("nf-cod-ruby" . "\xeb48")
+    ("nf-cod-run_above" . "\xebbd")
+    ("nf-cod-run_all" . "\xeb9e")
+    ("nf-cod-run_all_coverage" . "\xec2d")
+    ("nf-cod-run_below" . "\xebbe")
+    ("nf-cod-run_coverage" . "\xec2c")
+    ("nf-cod-run_errors" . "\xebde")
+    ("nf-cod-run_with_deps" . "\xec62")
+    ("nf-cod-save" . "\xeb4b")
+    ("nf-cod-save_all" . "\xeb49")
+    ("nf-cod-save_as" . "\xeb4a")
+    ("nf-cod-screen_cut" . "\xec7f")
+    ("nf-cod-screen_full" . "\xeb4c")
+    ("nf-cod-screen_normal" . "\xeb4d")
+    ("nf-cod-search" . "\xea6d")
+    ("nf-cod-search_fuzzy" . "\xec0d")
+    ("nf-cod-search_large" . "\xec70")
+    ("nf-cod-search_sparkle" . "\xec50")
+    ("nf-cod-search_stop" . "\xeb4e")
+    ("nf-cod-send" . "\xec0f")
+    ("nf-cod-send_to_remote_agent" . "\xec53")
+    ("nf-cod-server" . "\xeb50")
+    ("nf-cod-server_environment" . "\xeba3")
+    ("nf-cod-server_process" . "\xeba2")
+    ("nf-cod-session_in_progress" . "\xec77")
+    ("nf-cod-settings" . "\xeb52")
+    ("nf-cod-settings_gear" . "\xeb51")
+    ("nf-cod-share" . "\xec25")
+    ("nf-cod-shield" . "\xeb53")
+    ("nf-cod-sign_in" . "\xea6f")
+    ("nf-cod-sign_out" . "\xea6e")
+    ("nf-cod-skip" . "\xec6a")
+    ("nf-cod-smiley" . "\xeb54")
+    ("nf-cod-snake" . "\xec16")
+    ("nf-cod-sort_precedence" . "\xeb55")
+    ("nf-cod-source_control" . "\xea68")
+    ("nf-cod-sparkle" . "\xec10")
+    ("nf-cod-sparkle_filled" . "\xec21")
+    ("nf-cod-split_horizontal" . "\xeb56")
+    ("nf-cod-split_vertical" . "\xeb57")
+    ("nf-cod-squirrel" . "\xeb58")
+    ("nf-cod-star_empty" . "\xea6a")
+    ("nf-cod-star_full" . "\xeb59")
+    ("nf-cod-star_half" . "\xeb5a")
+    ("nf-cod-stop_circle" . "\xeba5")
+    ("nf-cod-strikethrough" . "\xec64")
+    ("nf-cod-surround_with" . "\xec24")
+    ("nf-cod-symbol_array" . "\xea8a")
+    ("nf-cod-symbol_boolean" . "\xea8f")
+    ("nf-cod-symbol_class" . "\xeb5b")
+    ("nf-cod-symbol_color" . "\xeb5c")
+    ("nf-cod-symbol_constant" . "\xeb5d")
+    ("nf-cod-symbol_enum" . "\xea95")
+    ("nf-cod-symbol_enum_member" . "\xeb5e")
+    ("nf-cod-symbol_event" . "\xea86")
+    ("nf-cod-symbol_field" . "\xeb5f")
+    ("nf-cod-symbol_file" . "\xeb60")
+    ("nf-cod-symbol_interface" . "\xeb61")
+    ("nf-cod-symbol_key" . "\xea93")
+    ("nf-cod-symbol_keyword" . "\xeb62")
+    ("nf-cod-symbol_method" . "\xea8c")
+    ("nf-cod-symbol_method_arrow" . "\xec41")
+    ("nf-cod-symbol_misc" . "\xeb63")
+    ("nf-cod-symbol_namespace" . "\xea8b")
+    ("nf-cod-symbol_numeric" . "\xea90")
+    ("nf-cod-symbol_operator" . "\xeb64")
+    ("nf-cod-symbol_parameter" . "\xea92")
+    ("nf-cod-symbol_property" . "\xeb65")
+    ("nf-cod-symbol_ruler" . "\xea96")
+    ("nf-cod-symbol_snippet" . "\xeb66")
+    ("nf-cod-symbol_string" . "\xeb8d")
+    ("nf-cod-symbol_structure" . "\xea91")
+    ("nf-cod-symbol_variable" . "\xea88")
+    ("nf-cod-sync" . "\xea77")
+    ("nf-cod-sync_ignored" . "\xeb9f")
+    ("nf-cod-table" . "\xebb7")
+    ("nf-cod-tag" . "\xea66")
+    ("nf-cod-target" . "\xebf8")
+    ("nf-cod-tasklist" . "\xeb67")
+    ("nf-cod-telescope" . "\xeb68")
+    ("nf-cod-terminal" . "\xea85")
+    ("nf-cod-terminal_bash" . "\xebca")
+    ("nf-cod-terminal_cmd" . "\xebc4")
+    ("nf-cod-terminal_debian" . "\xebc5")
+    ("nf-cod-terminal_git_bash" . "\xec71")
+    ("nf-cod-terminal_linux" . "\xebc6")
+    ("nf-cod-terminal_powershell" . "\xebc7")
+    ("nf-cod-terminal_tmux" . "\xebc8")
+    ("nf-cod-terminal_ubuntu" . "\xebc9")
+    ("nf-cod-text_size" . "\xeb69")
+    ("nf-cod-thinking" . "\xec59")
+    ("nf-cod-three_bars" . "\xeb6a")
+    ("nf-cod-thumbsdown" . "\xeb6b")
+    ("nf-cod-thumbsdown_filled" . "\xec13")
+    ("nf-cod-thumbsup" . "\xeb6c")
+    ("nf-cod-thumbsup_filled" . "\xec14")
+    ("nf-cod-tools" . "\xeb6d")
+    ("nf-cod-trash" . "\xea81")
+    ("nf-cod-triangle_down" . "\xeb6e")
+    ("nf-cod-triangle_left" . "\xeb6f")
+    ("nf-cod-triangle_right" . "\xeb70")
+    ("nf-cod-triangle_up" . "\xeb71")
+    ("nf-cod-twitter" . "\xeb72")
+    ("nf-cod-type_hierarchy" . "\xebb9")
+    ("nf-cod-type_hierarchy_sub" . "\xebba")
+    ("nf-cod-type_hierarchy_super" . "\xebbb")
+    ("nf-cod-unarchive" . "\xec76")
+    ("nf-cod-unfold" . "\xeb73")
+    ("nf-cod-ungroup_by_ref_type" . "\xeb98")
+    ("nf-cod-unlock" . "\xeb74")
+    ("nf-cod-unmute" . "\xeb75")
+    ("nf-cod-unverified" . "\xeb76")
+    ("nf-cod-variable_group" . "\xebb8")
+    ("nf-cod-verified" . "\xeb77")
+    ("nf-cod-verified_filled" . "\xebe9")
+    ("nf-cod-versions" . "\xeb78")
+    ("nf-cod-vm" . "\xea7a")
+    ("nf-cod-vm_active" . "\xeb79")
+    ("nf-cod-vm_connect" . "\xeba9")
+    ("nf-cod-vm_outline" . "\xeb7a")
+    ("nf-cod-vm_running" . "\xeb7b")
+    ("nf-cod-vm_small" . "\xec79")
+    ("nf-cod-vr" . "\xec18")
+    ("nf-cod-vscode" . "\xec29")
+    ("nf-cod-vscode_insiders" . "\xec2a")
+    ("nf-cod-wand" . "\xebcf")
+    ("nf-cod-warning" . "\xea6c")
+    ("nf-cod-watch" . "\xeb7c")
+    ("nf-cod-whitespace" . "\xeb7d")
+    ("nf-cod-whole_word" . "\xeb7e")
+    ("nf-cod-window" . "\xeb7f")
+    ("nf-cod-window_active" . "\xec72")
+    ("nf-cod-word_wrap" . "\xeb80")
+    ("nf-cod-workspace_trusted" . "\xebc1")
+    ("nf-cod-workspace_unknown" . "\xebc3")
+    ("nf-cod-workspace_untrusted" . "\xebc2")
+    ("nf-cod-worktree" . "\xec7e")
+    ("nf-cod-worktree_small" . "\xec7d")
+    ("nf-cod-zoom_in" . "\xeb81")
+    ("nf-cod-zoom_out" . "\xeb82")
+    ))
+
+(provide 'nerd-icons-data-codicon)
+;;; nerd-icons-data-codicon.el ends here
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-codicon.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-codicon.elc
new file mode 100644
index 0000000..4273e7b
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-codicon.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-devicon.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-devicon.el
new file mode 100644
index 0000000..41cb7ee
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-devicon.el
@@ -0,0 +1,646 @@
+;;; nerd-icons-data-devicon.el --- glyphset devicon -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; devicon
+;; from Nerd Font Version: 3.5.1
+
+;;; Code:
+
+(defvar nerd-icons/devicon-alist
+  '(
+    ("nf-dev-aarch64" . "\xe700")
+    ("nf-dev-adonisjs" . "\xe701")
+    ("nf-dev-aerospike" . "\xe8f1")
+    ("nf-dev-aframe" . "\xe8f2")
+    ("nf-dev-aftereffects" . "\xe705")
+    ("nf-dev-akka" . "\xe708")
+    ("nf-dev-algolia" . "\xe70a")
+    ("nf-dev-almalinux" . "\xe8f3")
+    ("nf-dev-alpinejs" . "\xe713")
+    ("nf-dev-amazonwebservices" . "\xe7ad")
+    ("nf-dev-anaconda" . "\xe715")
+    ("nf-dev-android" . "\xe70e")
+    ("nf-dev-androidstudio" . "\xe71a")
+    ("nf-dev-angular" . "\xe753")
+    ("nf-dev-angularjs" . "\xe71c")
+    ("nf-dev-angularmaterial" . "\xe720")
+    ("nf-dev-ansible" . "\xe723")
+    ("nf-dev-ansys" . "\xe8f4")
+    ("nf-dev-antdesign" . "\xe72a")
+    ("nf-dev-apache" . "\xe72b")
+    ("nf-dev-apacheairflow" . "\xe72c")
+    ("nf-dev-apachekafka" . "\xe72e")
+    ("nf-dev-apachespark" . "\xe72f")
+    ("nf-dev-apex" . "\xe8f5")
+    ("nf-dev-apl" . "\xe730")
+    ("nf-dev-apollographql" . "\xe8f6")
+    ("nf-dev-appcelerator" . "\xe7ab")
+    ("nf-dev-apple" . "\xe711")
+    ("nf-dev-appwrite" . "\xe731")
+    ("nf-dev-archlinux" . "\xe732")
+    ("nf-dev-arduino" . "\xe733")
+    ("nf-dev-argocd" . "\xe734")
+    ("nf-dev-artixlinux" . "\xe8f7")
+    ("nf-dev-astro" . "\xe735")
+    ("nf-dev-atom" . "\xe764")
+    ("nf-dev-awk" . "\xe741")
+    ("nf-dev-aws" . "\xe7ad")
+    ("nf-dev-axios" . "\xe74f")
+    ("nf-dev-azure" . "\xe754")
+    ("nf-dev-azuredevops" . "\xe756")
+    ("nf-dev-azuresqldatabase" . "\xe75b")
+    ("nf-dev-babel" . "\xe75d")
+    ("nf-dev-babylonjs" . "\xe8f8")
+    ("nf-dev-backbone" . "\xe752")
+    ("nf-dev-backbonejs" . "\xe752")
+    ("nf-dev-ballerina" . "\xe75e")
+    ("nf-dev-bamboo" . "\xe75f")
+    ("nf-dev-bash" . "\xe760")
+    ("nf-dev-bazel" . "\xe8f9")
+    ("nf-dev-beats" . "\xe761")
+    ("nf-dev-behance" . "\xe762")
+    ("nf-dev-bevyengine" . "\xe8fa")
+    ("nf-dev-biome" . "\xe8fb")
+    ("nf-dev-bitbucket" . "\xe703")
+    ("nf-dev-blazor" . "\xe765")
+    ("nf-dev-blender" . "\xe766")
+    ("nf-dev-bootstrap" . "\xe747")
+    ("nf-dev-bower" . "\xe74d")
+    ("nf-dev-browserstack" . "\xe76b")
+    ("nf-dev-bulma" . "\xe76c")
+    ("nf-dev-bun" . "\xe76f")
+    ("nf-dev-c" . "\xe771")
+    ("nf-dev-c_lang" . "\xe771")
+    ("nf-dev-cairo" . "\xe773")
+    ("nf-dev-cakephp" . "\xe77a")
+    ("nf-dev-canva" . "\xe77c")
+    ("nf-dev-capacitor" . "\xe785")
+    ("nf-dev-carbon" . "\xe788")
+    ("nf-dev-cassandra" . "\xe789")
+    ("nf-dev-centos" . "\xe78a")
+    ("nf-dev-ceylon" . "\xe78b")
+    ("nf-dev-chakraui" . "\xe8fc")
+    ("nf-dev-chartjs" . "\xe8fd")
+    ("nf-dev-chrome" . "\xe743")
+    ("nf-dev-circleci" . "\xe78c")
+    ("nf-dev-clarity" . "\xe78d")
+    ("nf-dev-clickhouse" . "\xe8fe")
+    ("nf-dev-clion" . "\xe78e")
+    ("nf-dev-clojure" . "\xe768")
+    ("nf-dev-clojure_alt" . "\xe76a")
+    ("nf-dev-clojurescript" . "\xe790")
+    ("nf-dev-cloudflare" . "\xe792")
+    ("nf-dev-cloudflareworkers" . "\xe793")
+    ("nf-dev-cloudrun" . "\xe8ff")
+    ("nf-dev-cmake" . "\xe794")
+    ("nf-dev-cobol" . "\xe900")
+    ("nf-dev-codeac" . "\xe796")
+    ("nf-dev-codecov" . "\xe797")
+    ("nf-dev-codeigniter" . "\xe780")
+    ("nf-dev-codepen" . "\xe716")
+    ("nf-dev-coffeescript" . "\xe751")
+    ("nf-dev-composer" . "\xe783")
+    ("nf-dev-confluence" . "\xe799")
+    ("nf-dev-consul" . "\xe79a")
+    ("nf-dev-contao" . "\xe79b")
+    ("nf-dev-corejs" . "\xe79d")
+    ("nf-dev-cosmosdb" . "\xe79f")
+    ("nf-dev-couchbase" . "\xe7a0")
+    ("nf-dev-couchdb" . "\xe7a2")
+    ("nf-dev-cpanel" . "\xe901")
+    ("nf-dev-cplusplus" . "\xe7a3")
+    ("nf-dev-crystal" . "\xe7ac")
+    ("nf-dev-csharp" . "\xe7b2")
+    ("nf-dev-css3" . "\xe749")
+    ("nf-dev-css3_full" . "\xe74a")
+    ("nf-dev-cucumber" . "\xe7b7")
+    ("nf-dev-cypressio" . "\xe7b9")
+    ("nf-dev-d3js" . "\xe7bc")
+    ("nf-dev-dart" . "\xe798")
+    ("nf-dev-database" . "\xe706")
+    ("nf-dev-datadog" . "\xe902")
+    ("nf-dev-datagrip" . "\xe7bd")
+    ("nf-dev-dataspell" . "\xe7be")
+    ("nf-dev-datatables" . "\xe903")
+    ("nf-dev-dbeaver" . "\xe7bf")
+    ("nf-dev-debian" . "\xe77d")
+    ("nf-dev-delphi" . "\xe904")
+    ("nf-dev-denojs" . "\xe7c0")
+    ("nf-dev-detaspace" . "\xe905")
+    ("nf-dev-devicon" . "\xe7c1")
+    ("nf-dev-digital_ocean" . "\xe7ae")
+    ("nf-dev-digitalocean" . "\xe7ae")
+    ("nf-dev-discloud" . "\xe906")
+    ("nf-dev-discordjs" . "\xe7c2")
+    ("nf-dev-django" . "\xe71d")
+    ("nf-dev-djangorest" . "\xe7c3")
+    ("nf-dev-dlang" . "\xe7af")
+    ("nf-dev-docker" . "\xe7b0")
+    ("nf-dev-doctrine" . "\xe774")
+    ("nf-dev-dotnet" . "\xe77f")
+    ("nf-dev-dotnetcore" . "\xe7c6")
+    ("nf-dev-dovecot" . "\xe907")
+    ("nf-dev-dreamweaver" . "\xe79c")
+    ("nf-dev-dropbox" . "\xe707")
+    ("nf-dev-dropwizard" . "\xe7c7")
+    ("nf-dev-drupal" . "\xe742")
+    ("nf-dev-duckdb" . "\xe908")
+    ("nf-dev-dyalog" . "\xe909")
+    ("nf-dev-dynamodb" . "\xe7c8")
+    ("nf-dev-dynatrace" . "\xe90a")
+    ("nf-dev-eclipse" . "\xe79e")
+    ("nf-dev-ecto" . "\xe7c9")
+    ("nf-dev-elasticsearch" . "\xe7ca")
+    ("nf-dev-electron" . "\xe7cb")
+    ("nf-dev-eleventy" . "\xe7cc")
+    ("nf-dev-elixir" . "\xe7cd")
+    ("nf-dev-elm" . "\xe7ce")
+    ("nf-dev-emacs" . "\xe7cf")
+    ("nf-dev-embeddedc" . "\xe7d0")
+    ("nf-dev-ember" . "\xe71b")
+    ("nf-dev-entityframeworkcore" . "\xe90b")
+    ("nf-dev-envoy" . "\xe7d1")
+    ("nf-dev-erlang" . "\xe7b1")
+    ("nf-dev-eslint" . "\xe7d2")
+    ("nf-dev-expo" . "\xe90c")
+    ("nf-dev-express" . "\xe7d3")
+    ("nf-dev-facebook" . "\xe7d4")
+    ("nf-dev-fastapi" . "\xe7d5")
+    ("nf-dev-fastify" . "\xe7d6")
+    ("nf-dev-faunadb" . "\xe7d7")
+    ("nf-dev-feathersjs" . "\xe7d8")
+    ("nf-dev-fedora" . "\xe7d9")
+    ("nf-dev-fiber" . "\xe90d")
+    ("nf-dev-figma" . "\xe7da")
+    ("nf-dev-filamentphp" . "\xe90e")
+    ("nf-dev-filezilla" . "\xe7db")
+    ("nf-dev-firebase" . "\xe787")
+    ("nf-dev-firebird" . "\xe90f")
+    ("nf-dev-firefox" . "\xe745")
+    ("nf-dev-flask" . "\xe7dc")
+    ("nf-dev-flutter" . "\xe7dd")
+    ("nf-dev-forgejo" . "\xe910")
+    ("nf-dev-fortran" . "\xe7de")
+    ("nf-dev-foundation" . "\xe7df")
+    ("nf-dev-framermotion" . "\xe7e0")
+    ("nf-dev-framework7" . "\xe7e1")
+    ("nf-dev-fsharp" . "\xe7a7")
+    ("nf-dev-fusion" . "\xe911")
+    ("nf-dev-gardener" . "\xe912")
+    ("nf-dev-gatling" . "\xe7e2")
+    ("nf-dev-gatsby" . "\xe7e3")
+    ("nf-dev-gazebo" . "\xe7e4")
+    ("nf-dev-gcc" . "\xe7e5")
+    ("nf-dev-gentoo" . "\xe7e6")
+    ("nf-dev-ghost" . "\xe71f")
+    ("nf-dev-ghost_small" . "\xe714")
+    ("nf-dev-gimp" . "\xe7e7")
+    ("nf-dev-git" . "\xe702")
+    ("nf-dev-git_branch" . "\xe725")
+    ("nf-dev-git_commit" . "\xe729")
+    ("nf-dev-git_compare" . "\xe728")
+    ("nf-dev-git_merge" . "\xe727")
+    ("nf-dev-git_pull_request" . "\xe726")
+    ("nf-dev-gitbook" . "\xe7e8")
+    ("nf-dev-github" . "\xe709")
+    ("nf-dev-github_badge" . "\xe709")
+    ("nf-dev-github_full" . "\xe717")
+    ("nf-dev-githubactions" . "\xe7e9")
+    ("nf-dev-githubcodespaces" . "\xe7ea")
+    ("nf-dev-gitkraken" . "\xe913")
+    ("nf-dev-gitlab" . "\xe7eb")
+    ("nf-dev-gitpod" . "\xe7ec")
+    ("nf-dev-gitter" . "\xe7ed")
+    ("nf-dev-gleam" . "\xe914")
+    ("nf-dev-glitch" . "\xe915")
+    ("nf-dev-gnu" . "\xe779")
+    ("nf-dev-go" . "\xe724")
+    ("nf-dev-godot" . "\xe7ee")
+    ("nf-dev-goland" . "\xe7ef")
+    ("nf-dev-google" . "\xe7f0")
+    ("nf-dev-googlecloud" . "\xe7f1")
+    ("nf-dev-googlecolab" . "\xe916")
+    ("nf-dev-gradle" . "\xe7f2")
+    ("nf-dev-grafana" . "\xe7f3")
+    ("nf-dev-grails" . "\xe7b3")
+    ("nf-dev-graphql" . "\xe7f4")
+    ("nf-dev-groovy" . "\xe775")
+    ("nf-dev-grpc" . "\xe7f5")
+    ("nf-dev-grunt" . "\xe74c")
+    ("nf-dev-gulp" . "\xe763")
+    ("nf-dev-hadoop" . "\xe7f6")
+    ("nf-dev-handlebars" . "\xe7f7")
+    ("nf-dev-harbor" . "\xe917")
+    ("nf-dev-hardhat" . "\xe7f8")
+    ("nf-dev-harvester" . "\xe7f9")
+    ("nf-dev-haskell" . "\xe777")
+    ("nf-dev-haxe" . "\xe7fa")
+    ("nf-dev-helm" . "\xe7fb")
+    ("nf-dev-heroku" . "\xe77b")
+    ("nf-dev-hibernate" . "\xe7fc")
+    ("nf-dev-homebrew" . "\xe7fd")
+    ("nf-dev-hoppscotch" . "\xe918")
+    ("nf-dev-html5" . "\xe736")
+    ("nf-dev-htmx" . "\xe919")
+    ("nf-dev-hugo" . "\xe7fe")
+    ("nf-dev-hyperv" . "\xe91a")
+    ("nf-dev-ie" . "\xe744")
+    ("nf-dev-ifttt" . "\xe7ff")
+    ("nf-dev-illustrator" . "\xe7b4")
+    ("nf-dev-inertiajs" . "\xe91b")
+    ("nf-dev-influxdb" . "\xe800")
+    ("nf-dev-inkscape" . "\xe801")
+    ("nf-dev-insomnia" . "\xe802")
+    ("nf-dev-intellij" . "\xe7b5")
+    ("nf-dev-ionic" . "\xe7a9")
+    ("nf-dev-jaegertracing" . "\xe803")
+    ("nf-dev-jamstack" . "\xe804")
+    ("nf-dev-jasmine" . "\xe805")
+    ("nf-dev-java" . "\xe738")
+    ("nf-dev-javascript" . "\xe781")
+    ("nf-dev-javascript_alt" . "\xe74e")
+    ("nf-dev-javascript_badge" . "\xe781")
+    ("nf-dev-jeet" . "\xe806")
+    ("nf-dev-jekyll" . "\xe70d")
+    ("nf-dev-jekyll_small" . "\xe70d")
+    ("nf-dev-jenkins" . "\xe767")
+    ("nf-dev-jest" . "\xe807")
+    ("nf-dev-jetbrains" . "\xe808")
+    ("nf-dev-jetpackcompose" . "\xe809")
+    ("nf-dev-jhipster" . "\xe91c")
+    ("nf-dev-jira" . "\xe75c")
+    ("nf-dev-jiraalign" . "\xe80a")
+    ("nf-dev-jquery" . "\xe750")
+    ("nf-dev-json" . "\xe80b")
+    ("nf-dev-jule" . "\xe80c")
+    ("nf-dev-julia" . "\xe80d")
+    ("nf-dev-junit" . "\xe80e")
+    ("nf-dev-jupyter" . "\xe80f")
+    ("nf-dev-k3os" . "\xe810")
+    ("nf-dev-k3s" . "\xe811")
+    ("nf-dev-k6" . "\xe812")
+    ("nf-dev-kaggle" . "\xe813")
+    ("nf-dev-kaldi" . "\xe91d")
+    ("nf-dev-kalilinux" . "\xe91e")
+    ("nf-dev-karatelabs" . "\xe814")
+    ("nf-dev-karma" . "\xe815")
+    ("nf-dev-kdeneon" . "\xe816")
+    ("nf-dev-keras" . "\xe817")
+    ("nf-dev-kibana" . "\xe818")
+    ("nf-dev-knexjs" . "\xe819")
+    ("nf-dev-knockout" . "\xe81a")
+    ("nf-dev-kotlin" . "\xe81b")
+    ("nf-dev-krakenjs" . "\xe784")
+    ("nf-dev-krakenjs_badge" . "\xe784")
+    ("nf-dev-ktor" . "\xe81c")
+    ("nf-dev-kubeflow" . "\xe91f")
+    ("nf-dev-kubernetes" . "\xe81d")
+    ("nf-dev-labview" . "\xe81e")
+    ("nf-dev-laminas" . "\xe920")
+    ("nf-dev-laravel" . "\xe73f")
+    ("nf-dev-laraveljetstream" . "\xe921")
+    ("nf-dev-latex" . "\xe81f")
+    ("nf-dev-leetcode" . "\xe922")
+    ("nf-dev-less" . "\xe758")
+    ("nf-dev-libgdx" . "\xe923")
+    ("nf-dev-linkedin" . "\xe820")
+    ("nf-dev-linux" . "\xe712")
+    ("nf-dev-linuxmint" . "\xe924")
+    ("nf-dev-liquibase" . "\xe821")
+    ("nf-dev-livewire" . "\xe822")
+    ("nf-dev-llvm" . "\xe823")
+    ("nf-dev-lodash" . "\xe824")
+    ("nf-dev-logstash" . "\xe825")
+    ("nf-dev-love2d" . "\xe925")
+    ("nf-dev-lua" . "\xe826")
+    ("nf-dev-lumen" . "\xe827")
+    ("nf-dev-magento" . "\xe740")
+    ("nf-dev-mapbox" . "\xe926")
+    ("nf-dev-mariadb" . "\xe828")
+    ("nf-dev-markdown" . "\xe73e")
+    ("nf-dev-materializecss" . "\xe7b6")
+    ("nf-dev-materialui" . "\xe829")
+    ("nf-dev-matlab" . "\xe82a")
+    ("nf-dev-matplotlib" . "\xe82b")
+    ("nf-dev-mattermost" . "\xe927")
+    ("nf-dev-maven" . "\xe82c")
+    ("nf-dev-maya" . "\xe82d")
+    ("nf-dev-memcached" . "\xe928")
+    ("nf-dev-mercurial" . "\xe929")
+    ("nf-dev-meteor" . "\xe7a5")
+    ("nf-dev-meteorfull" . "\xe7a6")
+    ("nf-dev-microsoftsqlserver" . "\xe82e")
+    ("nf-dev-minitab" . "\xe82f")
+    ("nf-dev-mithril" . "\xe830")
+    ("nf-dev-mobx" . "\xe831")
+    ("nf-dev-mocha" . "\xe832")
+    ("nf-dev-modx" . "\xe833")
+    ("nf-dev-moleculer" . "\xe834")
+    ("nf-dev-mongodb" . "\xe7a4")
+    ("nf-dev-mongoose" . "\xe835")
+    ("nf-dev-monogame" . "\xe92a")
+    ("nf-dev-moodle" . "\xe836")
+    ("nf-dev-mootools_badge" . "\xe78f")
+    ("nf-dev-mozilla" . "\xe786")
+    ("nf-dev-msdos" . "\xe837")
+    ("nf-dev-mysql" . "\xe704")
+    ("nf-dev-nano" . "\xe838")
+    ("nf-dev-nats" . "\xe8f0")
+    ("nf-dev-neo4j" . "\xe839")
+    ("nf-dev-neovim" . "\xe83a")
+    ("nf-dev-nestjs" . "\xe83b")
+    ("nf-dev-netbeans" . "\xe92b")
+    ("nf-dev-netbox" . "\xe92c")
+    ("nf-dev-netlify" . "\xe83c")
+    ("nf-dev-networkx" . "\xe83d")
+    ("nf-dev-newrelic" . "\xe92d")
+    ("nf-dev-nextjs" . "\xe83e")
+    ("nf-dev-nginx" . "\xe776")
+    ("nf-dev-ngrok" . "\xe92e")
+    ("nf-dev-ngrx" . "\xe83f")
+    ("nf-dev-nhibernate" . "\xe840")
+    ("nf-dev-nim" . "\xe841")
+    ("nf-dev-nimble" . "\xe842")
+    ("nf-dev-nixos" . "\xe843")
+    ("nf-dev-nodejs" . "\xe719")
+    ("nf-dev-nodejs_small" . "\xe718")
+    ("nf-dev-nodemon" . "\xe844")
+    ("nf-dev-nodered" . "\xe92f")
+    ("nf-dev-nodewebkit" . "\xe845")
+    ("nf-dev-nomad" . "\xe846")
+    ("nf-dev-norg" . "\xe847")
+    ("nf-dev-notion" . "\xe848")
+    ("nf-dev-npm" . "\xe71e")
+    ("nf-dev-npss" . "\xe930")
+    ("nf-dev-nuget" . "\xe849")
+    ("nf-dev-numpy" . "\xe84a")
+    ("nf-dev-nuxt" . "\xe931")
+    ("nf-dev-nuxtjs" . "\xe84b")
+    ("nf-dev-oauth" . "\xe84c")
+    ("nf-dev-objectivec" . "\xe84d")
+    ("nf-dev-ocaml" . "\xe84e")
+    ("nf-dev-ohmyzsh" . "\xe84f")
+    ("nf-dev-okta" . "\xe850")
+    ("nf-dev-openal" . "\xe851")
+    ("nf-dev-openapi" . "\xe852")
+    ("nf-dev-opencl" . "\xe853")
+    ("nf-dev-opencv" . "\xe854")
+    ("nf-dev-opengl" . "\xe855")
+    ("nf-dev-openstack" . "\xe856")
+    ("nf-dev-opensuse" . "\xe857")
+    ("nf-dev-opentelemetry" . "\xe858")
+    ("nf-dev-opera" . "\xe746")
+    ("nf-dev-oracle" . "\xe859")
+    ("nf-dev-ory" . "\xe85a")
+    ("nf-dev-p5js" . "\xe85b")
+    ("nf-dev-packer" . "\xe85c")
+    ("nf-dev-pandas" . "\xe85d")
+    ("nf-dev-passport" . "\xe932")
+    ("nf-dev-perl" . "\xe769")
+    ("nf-dev-pfsense" . "\xe85e")
+    ("nf-dev-phalcon" . "\xe85f")
+    ("nf-dev-phoenix" . "\xe860")
+    ("nf-dev-photonengine" . "\xe861")
+    ("nf-dev-photoshop" . "\xe7b8")
+    ("nf-dev-php" . "\xe73d")
+    ("nf-dev-phpstorm" . "\xe862")
+    ("nf-dev-pixijs" . "\xe933")
+    ("nf-dev-playwright" . "\xe863")
+    ("nf-dev-plotly" . "\xe864")
+    ("nf-dev-pm2" . "\xe934")
+    ("nf-dev-pnpm" . "\xe865")
+    ("nf-dev-podman" . "\xe866")
+    ("nf-dev-poetry" . "\xe867")
+    ("nf-dev-polygon" . "\xe868")
+    ("nf-dev-portainer" . "\xe869")
+    ("nf-dev-postcss" . "\xe86a")
+    ("nf-dev-postgresql" . "\xe76e")
+    ("nf-dev-postman" . "\xe86b")
+    ("nf-dev-powershell" . "\xe86c")
+    ("nf-dev-premierepro" . "\xe86d")
+    ("nf-dev-primeng" . "\xe935")
+    ("nf-dev-prisma" . "\xe86e")
+    ("nf-dev-processing" . "\xe86f")
+    ("nf-dev-processwire" . "\xe936")
+    ("nf-dev-prolog" . "\xe7a1")
+    ("nf-dev-prometheus" . "\xe870")
+    ("nf-dev-protractor" . "\xe871")
+    ("nf-dev-proxmox" . "\xe937")
+    ("nf-dev-pug" . "\xe938")
+    ("nf-dev-pulsar" . "\xe872")
+    ("nf-dev-pulumi" . "\xe873")
+    ("nf-dev-puppeteer" . "\xe874")
+    ("nf-dev-purescript" . "\xe875")
+    ("nf-dev-putty" . "\xe876")
+    ("nf-dev-pycharm" . "\xe877")
+    ("nf-dev-pypi" . "\xe878")
+    ("nf-dev-pyscript" . "\xe879")
+    ("nf-dev-pytest" . "\xe87a")
+    ("nf-dev-python" . "\xe73c")
+    ("nf-dev-pytorch" . "\xe87b")
+    ("nf-dev-qodana" . "\xe87c")
+    ("nf-dev-qt" . "\xe87d")
+    ("nf-dev-qtest" . "\xe939")
+    ("nf-dev-quarkus" . "\xe87e")
+    ("nf-dev-quasar" . "\xe87f")
+    ("nf-dev-qwik" . "\xe880")
+    ("nf-dev-r" . "\xe881")
+    ("nf-dev-rabbitmq" . "\xe882")
+    ("nf-dev-racket" . "\xe93a")
+    ("nf-dev-radstudio" . "\xe93b")
+    ("nf-dev-rails" . "\xe73b")
+    ("nf-dev-railway" . "\xe883")
+    ("nf-dev-rancher" . "\xe884")
+    ("nf-dev-raspberry_pi" . "\xe722")
+    ("nf-dev-reach" . "\xe885")
+    ("nf-dev-react" . "\xe7ba")
+    ("nf-dev-reactbootstrap" . "\xe886")
+    ("nf-dev-reactnative" . "\xe93c")
+    ("nf-dev-reactnavigation" . "\xe887")
+    ("nf-dev-reactrouter" . "\xe888")
+    ("nf-dev-readthedocs" . "\xe889")
+    ("nf-dev-realm" . "\xe88a")
+    ("nf-dev-rect" . "\xe88b")
+    ("nf-dev-redhat" . "\xe7bb")
+    ("nf-dev-redis" . "\xe76d")
+    ("nf-dev-redux" . "\xe88c")
+    ("nf-dev-reflex" . "\xe93d")
+    ("nf-dev-remix" . "\xe93e")
+    ("nf-dev-renpy" . "\xe88d")
+    ("nf-dev-replit" . "\xe88e")
+    ("nf-dev-requirejs" . "\xe770")
+    ("nf-dev-rexx" . "\xe93f")
+    ("nf-dev-rider" . "\xe88f")
+    ("nf-dev-rocksdb" . "\xe890")
+    ("nf-dev-rockylinux" . "\xe891")
+    ("nf-dev-rollup" . "\xe892")
+    ("nf-dev-ros" . "\xe893")
+    ("nf-dev-rspec" . "\xe894")
+    ("nf-dev-rstudio" . "\xe895")
+    ("nf-dev-ruby" . "\xe739")
+    ("nf-dev-ruby_on_rails" . "\xe73b")
+    ("nf-dev-ruby_rough" . "\xe791")
+    ("nf-dev-rubymine" . "\xe896")
+    ("nf-dev-rust" . "\xe7a8")
+    ("nf-dev-rxjs" . "\xe897")
+    ("nf-dev-safari" . "\xe748")
+    ("nf-dev-salesforce" . "\xe898")
+    ("nf-dev-sanity" . "\xe899")
+    ("nf-dev-sass" . "\xe74b")
+    ("nf-dev-scala" . "\xe737")
+    ("nf-dev-scalingo" . "\xe89a")
+    ("nf-dev-scikitlearn" . "\xe89b")
+    ("nf-dev-sdl" . "\xe89c")
+    ("nf-dev-selenium" . "\xe89d")
+    ("nf-dev-sema" . "\xe89e")
+    ("nf-dev-sentry" . "\xe89f")
+    ("nf-dev-sequelize" . "\xe8a0")
+    ("nf-dev-shopware" . "\xe8a1")
+    ("nf-dev-shotgrid" . "\xe8a2")
+    ("nf-dev-sketch" . "\xe8a3")
+    ("nf-dev-slack" . "\xe8a4")
+    ("nf-dev-smashing_magazine" . "\xe72d")
+    ("nf-dev-socketio" . "\xe8a5")
+    ("nf-dev-solidity" . "\xe8a6")
+    ("nf-dev-solidjs" . "\xe8a7")
+    ("nf-dev-sonarqube" . "\xe8a8")
+    ("nf-dev-sourceengine" . "\xe940")
+    ("nf-dev-sourcetree" . "\xe8a9")
+    ("nf-dev-spack" . "\xe8aa")
+    ("nf-dev-spicedb" . "\xe941")
+    ("nf-dev-splunk" . "\xe8ab")
+    ("nf-dev-spring" . "\xe8ac")
+    ("nf-dev-spss" . "\xe8ad")
+    ("nf-dev-spyder" . "\xe8ae")
+    ("nf-dev-sqlalchemy" . "\xe8af")
+    ("nf-dev-sqldeveloper" . "\xe8b0")
+    ("nf-dev-sqlite" . "\xe7c4")
+    ("nf-dev-ssh" . "\xe8b1")
+    ("nf-dev-stackblitz" . "\xe942")
+    ("nf-dev-stackoverflow" . "\xe710")
+    ("nf-dev-stata" . "\xe8b2")
+    ("nf-dev-stenciljs" . "\xe943")
+    ("nf-dev-storybook" . "\xe8b3")
+    ("nf-dev-streamlit" . "\xe8b4")
+    ("nf-dev-styledcomponents" . "\xe944")
+    ("nf-dev-stylus" . "\xe759")
+    ("nf-dev-sublime" . "\xe7aa")
+    ("nf-dev-subversion" . "\xe8b5")
+    ("nf-dev-sulu" . "\xe945")
+    ("nf-dev-supabase" . "\xe8b6")
+    ("nf-dev-surrealdb" . "\xe946")
+    ("nf-dev-svelte" . "\xe8b7")
+    ("nf-dev-svgo" . "\xe947")
+    ("nf-dev-swagger" . "\xe8b8")
+    ("nf-dev-swift" . "\xe755")
+    ("nf-dev-swiper" . "\xe8b9")
+    ("nf-dev-symfony" . "\xe757")
+    ("nf-dev-symfony_badge" . "\xe757")
+    ("nf-dev-tailwindcss" . "\xe8ba")
+    ("nf-dev-talos" . "\xe948")
+    ("nf-dev-tauri" . "\xe8bb")
+    ("nf-dev-teleport" . "\xe949")
+    ("nf-dev-tensorflow" . "\xe8bc")
+    ("nf-dev-terminal" . "\xe795")
+    ("nf-dev-terraform" . "\xe8bd")
+    ("nf-dev-terramate" . "\xe94a")
+    ("nf-dev-tex" . "\xe8be")
+    ("nf-dev-thealgorithms" . "\xe8bf")
+    ("nf-dev-threedsmax" . "\xe8c0")
+    ("nf-dev-threejs" . "\xe8c1")
+    ("nf-dev-thymeleaf" . "\xe94b")
+    ("nf-dev-titaniumsdk" . "\xe8c2")
+    ("nf-dev-tmux" . "\xe94c")
+    ("nf-dev-tomcat" . "\xe8c3")
+    ("nf-dev-tortoisegit" . "\xe8c4")
+    ("nf-dev-towergit" . "\xe8c5")
+    ("nf-dev-traefikmesh" . "\xe8c6")
+    ("nf-dev-traefikproxy" . "\xe8c7")
+    ("nf-dev-travis" . "\xe77e")
+    ("nf-dev-trello" . "\xe75a")
+    ("nf-dev-trpc" . "\xe8c8")
+    ("nf-dev-turbo" . "\xe94d")
+    ("nf-dev-twilio" . "\xe94e")
+    ("nf-dev-twitter" . "\xe8c9")
+    ("nf-dev-typescript" . "\xe8ca")
+    ("nf-dev-typo3" . "\xe772")
+    ("nf-dev-ubuntu" . "\xe73a")
+    ("nf-dev-uml" . "\xe8cb")
+    ("nf-dev-unifiedmodelinglanguage" . "\xe8cb")
+    ("nf-dev-unity" . "\xe721")
+    ("nf-dev-unity_small" . "\xe721")
+    ("nf-dev-unix" . "\xe8cc")
+    ("nf-dev-unrealengine" . "\xe8cd")
+    ("nf-dev-uwsgi" . "\xe8ce")
+    ("nf-dev-v8" . "\xe8cf")
+    ("nf-dev-vaadin" . "\xe94f")
+    ("nf-dev-vagrant" . "\xe8d0")
+    ("nf-dev-vala" . "\xe8d1")
+    ("nf-dev-vault" . "\xe8d2")
+    ("nf-dev-veevalidate" . "\xe950")
+    ("nf-dev-vercel" . "\xe8d3")
+    ("nf-dev-vertx" . "\xe8d4")
+    ("nf-dev-vim" . "\xe7c5")
+    ("nf-dev-visualbasic" . "\xe8d5")
+    ("nf-dev-visualstudio" . "\xe70c")
+    ("nf-dev-vite" . "\xe8d6")
+    ("nf-dev-vitejs" . "\xe8d7")
+    ("nf-dev-vitess" . "\xe8d8")
+    ("nf-dev-vitest" . "\xe8d9")
+    ("nf-dev-vscode" . "\xe8da")
+    ("nf-dev-vscodium" . "\xe951")
+    ("nf-dev-vsphere" . "\xe8db")
+    ("nf-dev-vuejs" . "\xe8dc")
+    ("nf-dev-vuestorefront" . "\xe8dd")
+    ("nf-dev-vuetify" . "\xe8de")
+    ("nf-dev-vulkan" . "\xe952")
+    ("nf-dev-vyper" . "\xe8df")
+    ("nf-dev-waku" . "\xe953")
+    ("nf-dev-wasm" . "\xe8e0")
+    ("nf-dev-web3js" . "\xe954")
+    ("nf-dev-webflow" . "\xe8e1")
+    ("nf-dev-webgpu" . "\xe955")
+    ("nf-dev-weblate" . "\xe8e2")
+    ("nf-dev-webpack" . "\xe8e3")
+    ("nf-dev-webstorm" . "\xe8e4")
+    ("nf-dev-windows" . "\xe70f")
+    ("nf-dev-windows11" . "\xe8e5")
+    ("nf-dev-wolfram" . "\xe956")
+    ("nf-dev-woocommerce" . "\xe8e6")
+    ("nf-dev-wordpress" . "\xe70b")
+    ("nf-dev-xamarin" . "\xe8e7")
+    ("nf-dev-xcode" . "\xe8e8")
+    ("nf-dev-xd" . "\xe8e9")
+    ("nf-dev-xml" . "\xe8ea")
+    ("nf-dev-yaml" . "\xe8eb")
+    ("nf-dev-yarn" . "\xe8ec")
+    ("nf-dev-yii" . "\xe782")
+    ("nf-dev-yugabytedb" . "\xe8ed")
+    ("nf-dev-yunohost" . "\xe8ee")
+    ("nf-dev-zend" . "\xe778")
+    ("nf-dev-zig" . "\xe8ef")
+    ("nf-dev-zsh" . "\xe957")
+    ("nf-dev-zustand" . "\xe958")
+    ))
+
+(provide 'nerd-icons-data-devicon)
+;;; nerd-icons-data-devicon.el ends here
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-devicon.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-devicon.elc
new file mode 100644
index 0000000..1c53bc1
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-devicon.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-faicon.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-faicon.el
new file mode 100644
index 0000000..b4b5eac
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-faicon.el
@@ -0,0 +1,2021 @@
+;;; nerd-icons-data-faicon.el --- glyphset faicon -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; faicon
+;; from Nerd Font Version: 3.5.1
+
+;;; Code:
+
+(defvar nerd-icons/faicon-alist
+  '(
+    ("nf-fa-500px" . "\xf26e")
+    ("nf-fa-accessible_icon" . "\xf29b")
+    ("nf-fa-accusoft" . "\xf0b7")
+    ("nf-fa-address_book" . "\xf2b9")
+    ("nf-fa-address_book_o" . "\xf2ba")
+    ("nf-fa-address_card" . "\xf2bb")
+    ("nf-fa-address_card_o" . "\xf2bc")
+    ("nf-fa-adjust" . "\xf042")
+    ("nf-fa-adn" . "\xf170")
+    ("nf-fa-adversal" . "\xf0b8")
+    ("nf-fa-affiliatetheme" . "\xf0b9")
+    ("nf-fa-airbnb" . "\xef93")
+    ("nf-fa-algolia" . "\xf0ba")
+    ("nf-fa-align_center" . "\xf037")
+    ("nf-fa-align_justify" . "\xf039")
+    ("nf-fa-align_left" . "\xf036")
+    ("nf-fa-align_right" . "\xf038")
+    ("nf-fa-alipay" . "\xeebc")
+    ("nf-fa-amazon" . "\xf270")
+    ("nf-fa-amazon_pay" . "\xed56")
+    ("nf-fa-ambulance" . "\xf0f9")
+    ("nf-fa-american_sign_language_interpreting" . "\xf2a3")
+    ("nf-fa-amilia" . "\xf0bb")
+    ("nf-fa-anchor" . "\xf13d")
+    ("nf-fa-android" . "\xf17b")
+    ("nf-fa-angellist" . "\xf209")
+    ("nf-fa-angle_double_down" . "\xf103")
+    ("nf-fa-angle_double_left" . "\xf100")
+    ("nf-fa-angle_double_right" . "\xf101")
+    ("nf-fa-angle_double_up" . "\xf102")
+    ("nf-fa-angle_down" . "\xf107")
+    ("nf-fa-angle_left" . "\xf104")
+    ("nf-fa-angle_right" . "\xf105")
+    ("nf-fa-angle_up" . "\xf106")
+    ("nf-fa-angles_down" . "\xf103")
+    ("nf-fa-angles_left" . "\xf100")
+    ("nf-fa-angles_right" . "\xf101")
+    ("nf-fa-angles_up" . "\xf102")
+    ("nf-fa-angrycreative" . "\xf0bc")
+    ("nf-fa-angular" . "\xed4b")
+    ("nf-fa-ankh" . "\xeebd")
+    ("nf-fa-app_store" . "\xf0bd")
+    ("nf-fa-app_store_ios" . "\xf0be")
+    ("nf-fa-apper" . "\xf0bf")
+    ("nf-fa-apple" . "\xf179")
+    ("nf-fa-apple_pay" . "\xed41")
+    ("nf-fa-apple_whole" . "\xee98")
+    ("nf-fa-archive" . "\xf187")
+    ("nf-fa-archway" . "\xee20")
+    ("nf-fa-area_chart" . "\xf1fe")
+    ("nf-fa-arrow_circle_down" . "\xf0ab")
+    ("nf-fa-arrow_circle_left" . "\xf0a8")
+    ("nf-fa-arrow_circle_o_down" . "\xf01a")
+    ("nf-fa-arrow_circle_o_left" . "\xf190")
+    ("nf-fa-arrow_circle_o_right" . "\xf18e")
+    ("nf-fa-arrow_circle_o_up" . "\xf01b")
+    ("nf-fa-arrow_circle_right" . "\xf0a9")
+    ("nf-fa-arrow_circle_up" . "\xf0aa")
+    ("nf-fa-arrow_down" . "\xf063")
+    ("nf-fa-arrow_down_1_9" . "\xf162")
+    ("nf-fa-arrow_down_9_1" . "\xefb1")
+    ("nf-fa-arrow_down_a_z" . "\xf15d")
+    ("nf-fa-arrow_down_long" . "\xf175")
+    ("nf-fa-arrow_down_short_wide" . "\xefaf")
+    ("nf-fa-arrow_down_wide_short" . "\xf160")
+    ("nf-fa-arrow_down_z_a" . "\xefad")
+    ("nf-fa-arrow_left" . "\xf060")
+    ("nf-fa-arrow_left_long" . "\xf177")
+    ("nf-fa-arrow_pointer" . "\xf245")
+    ("nf-fa-arrow_right" . "\xf061")
+    ("nf-fa-arrow_right_arrow_left" . "\xf0ec")
+    ("nf-fa-arrow_right_from_bracket" . "\xf08b")
+    ("nf-fa-arrow_right_long" . "\xf178")
+    ("nf-fa-arrow_right_to_bracket" . "\xf090")
+    ("nf-fa-arrow_rotate_left" . "\xf0e2")
+    ("nf-fa-arrow_rotate_right" . "\xf01e")
+    ("nf-fa-arrow_turn_down" . "\xf149")
+    ("nf-fa-arrow_turn_up" . "\xf148")
+    ("nf-fa-arrow_up" . "\xf062")
+    ("nf-fa-arrow_up_1_9" . "\xf163")
+    ("nf-fa-arrow_up_9_1" . "\xefb2")
+    ("nf-fa-arrow_up_a_z" . "\xf15e")
+    ("nf-fa-arrow_up_long" . "\xf176")
+    ("nf-fa-arrow_up_right_from_square" . "\xf08e")
+    ("nf-fa-arrow_up_short_wide" . "\xefb0")
+    ("nf-fa-arrow_up_wide_short" . "\xf161")
+    ("nf-fa-arrow_up_z_a" . "\xefae")
+    ("nf-fa-arrows" . "\xf047")
+    ("nf-fa-arrows_alt" . "\xf0b2")
+    ("nf-fa-arrows_h" . "\xf07e")
+    ("nf-fa-arrows_left_right" . "\xf07e")
+    ("nf-fa-arrows_rotate" . "\xf021")
+    ("nf-fa-arrows_up_down" . "\xf07d")
+    ("nf-fa-arrows_up_down_left_right" . "\xf047")
+    ("nf-fa-arrows_v" . "\xf07d")
+    ("nf-fa-artstation" . "\xef31")
+    ("nf-fa-asl_interpreting" . "\xf2a3")
+    ("nf-fa-assistive_listening_systems" . "\xf2a2")
+    ("nf-fa-asterisk" . "\xf069")
+    ("nf-fa-asymmetrik" . "\xf0cf")
+    ("nf-fa-at" . "\xf1fa")
+    ("nf-fa-atlassian" . "\xef32")
+    ("nf-fa-atom" . "\xee99")
+    ("nf-fa-audible" . "\xf0df")
+    ("nf-fa-audio_description" . "\xf29e")
+    ("nf-fa-automobile" . "\xf1b9")
+    ("nf-fa-autoprefixer" . "\xed47")
+    ("nf-fa-avianex" . "\xefc2")
+    ("nf-fa-aviato" . "\xed4c")
+    ("nf-fa-award" . "\xee22")
+    ("nf-fa-aws" . "\xf0ef")
+    ("nf-fa-baby" . "\xef33")
+    ("nf-fa-baby_carriage" . "\xef34")
+    ("nf-fa-backward" . "\xf04a")
+    ("nf-fa-backward_fast" . "\xf049")
+    ("nf-fa-backward_step" . "\xf048")
+    ("nf-fa-bacon" . "\xef77")
+    ("nf-fa-bag_shopping" . "\xf290")
+    ("nf-fa-bahai" . "\xeecb")
+    ("nf-fa-balance_scale" . "\xf24e")
+    ("nf-fa-ban" . "\xf05e")
+    ("nf-fa-ban_smoking" . "\xee16")
+    ("nf-fa-bandage" . "\xed74")
+    ("nf-fa-bandcamp" . "\xf2d5")
+    ("nf-fa-bank" . "\xf19c")
+    ("nf-fa-bar_chart" . "\xf080")
+    ("nf-fa-bar_chart_o" . "\xf080")
+    ("nf-fa-barcode" . "\xf02a")
+    ("nf-fa-bars" . "\xf0c9")
+    ("nf-fa-bars_progress" . "\xef8f")
+    ("nf-fa-bars_staggered" . "\xee19")
+    ("nf-fa-baseball" . "\xed5c")
+    ("nf-fa-baseball_bat_ball" . "\xed5b")
+    ("nf-fa-basket_shopping" . "\xf291")
+    ("nf-fa-basketball" . "\xed5d")
+    ("nf-fa-bath" . "\xf2cd")
+    ("nf-fa-bathtub" . "\xf2cd")
+    ("nf-fa-battery" . "\xf240")
+    ("nf-fa-battery_0" . "\xf244")
+    ("nf-fa-battery_1" . "\xf243")
+    ("nf-fa-battery_2" . "\xf242")
+    ("nf-fa-battery_3" . "\xf241")
+    ("nf-fa-battery_4" . "\xf240")
+    ("nf-fa-battery_empty" . "\xf244")
+    ("nf-fa-battery_full" . "\xf240")
+    ("nf-fa-battery_half" . "\xf242")
+    ("nf-fa-battery_quarter" . "\xf243")
+    ("nf-fa-battery_three_quarters" . "\xf241")
+    ("nf-fa-battle_net" . "\xef94")
+    ("nf-fa-bed" . "\xf236")
+    ("nf-fa-bed_pulse" . "\xed8a")
+    ("nf-fa-beer" . "\xf0fc")
+    ("nf-fa-beer_mug_empty" . "\xf0fc")
+    ("nf-fa-behance" . "\xf1b4")
+    ("nf-fa-behance_square" . "\xf1b5")
+    ("nf-fa-bell" . "\xf0f3")
+    ("nf-fa-bell_concierge" . "\xee2b")
+    ("nf-fa-bell_o" . "\xf0a2")
+    ("nf-fa-bell_slash" . "\xf1f6")
+    ("nf-fa-bell_slash_o" . "\xf1f7")
+    ("nf-fa-bezier_curve" . "\xee24")
+    ("nf-fa-bicycle" . "\xf206")
+    ("nf-fa-bimobject" . "\xf0ff")
+    ("nf-fa-binoculars" . "\xf1e5")
+    ("nf-fa-biohazard" . "\xef35")
+    ("nf-fa-birthday_cake" . "\xf1fd")
+    ("nf-fa-bitbucket" . "\xf171")
+    ("nf-fa-bitbucket_square" . "\xf172")
+    ("nf-fa-bitcoin" . "\xf10f")
+    ("nf-fa-bity" . "\xf116")
+    ("nf-fa-black_tie" . "\xf27e")
+    ("nf-fa-blackberry" . "\xf117")
+    ("nf-fa-blender" . "\xede1")
+    ("nf-fa-blender_phone" . "\xeeea")
+    ("nf-fa-blind" . "\xf29d")
+    ("nf-fa-blog" . "\xef36")
+    ("nf-fa-blogger" . "\xf11f")
+    ("nf-fa-blogger_b" . "\xf12f")
+    ("nf-fa-bluetooth" . "\xf293")
+    ("nf-fa-bluetooth_b" . "\xf294")
+    ("nf-fa-bold" . "\xf032")
+    ("nf-fa-bolt" . "\xf0e7")
+    ("nf-fa-bomb" . "\xf1e2")
+    ("nf-fa-bone" . "\xee9a")
+    ("nf-fa-bong" . "\xee25")
+    ("nf-fa-book" . "\xf02d")
+    ("nf-fa-book_atlas" . "\xee21")
+    ("nf-fa-book_bible" . "\xeebe")
+    ("nf-fa-book_journal_whills" . "\xeecd")
+    ("nf-fa-book_medical" . "\xef78")
+    ("nf-fa-book_open" . "\xede2")
+    ("nf-fa-book_open_reader" . "\xee9b")
+    ("nf-fa-book_quran" . "\xeedc")
+    ("nf-fa-book_skull" . "\xeeeb")
+    ("nf-fa-book_tanakh" . "\xef8e")
+    ("nf-fa-bookmark" . "\xf02e")
+    ("nf-fa-bookmark_o" . "\xf097")
+    ("nf-fa-bootstrap" . "\xef95")
+    ("nf-fa-border_all" . "\xefa3")
+    ("nf-fa-border_none" . "\xefa4")
+    ("nf-fa-border_top_left" . "\xefa5")
+    ("nf-fa-bowling_ball" . "\xed5e")
+    ("nf-fa-box" . "\xed75")
+    ("nf-fa-box_archive" . "\xf187")
+    ("nf-fa-box_open" . "\xed95")
+    ("nf-fa-boxes_stacked" . "\xed76")
+    ("nf-fa-braille" . "\xf2a1")
+    ("nf-fa-brain" . "\xee9c")
+    ("nf-fa-bread_slice" . "\xef79")
+    ("nf-fa-briefcase" . "\xf0b1")
+    ("nf-fa-briefcase_medical" . "\xed77")
+    ("nf-fa-broom" . "\xede4")
+    ("nf-fa-broom_ball" . "\xed6e")
+    ("nf-fa-brush" . "\xee26")
+    ("nf-fa-btc" . "\xf15a")
+    ("nf-fa-buffer" . "\xef96")
+    ("nf-fa-bug" . "\xf188")
+    ("nf-fa-building" . "\xf1ad")
+    ("nf-fa-building_columns" . "\xf19c")
+    ("nf-fa-building_o" . "\xf0f7")
+    ("nf-fa-bullhorn" . "\xf0a1")
+    ("nf-fa-bullseye" . "\xf140")
+    ("nf-fa-burger" . "\xef82")
+    ("nf-fa-buromobelexperte" . "\xf13f")
+    ("nf-fa-bus" . "\xf207")
+    ("nf-fa-bus_simple" . "\xee27")
+    ("nf-fa-business_time" . "\xeebf")
+    ("nf-fa-buy_n_large" . "\xefb6")
+    ("nf-fa-buysellads" . "\xf20d")
+    ("nf-fa-cab" . "\xf1ba")
+    ("nf-fa-cable_car" . "\xef71")
+    ("nf-fa-cake_candles" . "\xf1fd")
+    ("nf-fa-calculator" . "\xf1ec")
+    ("nf-fa-calendar" . "\xf073")
+    ("nf-fa-calendar_check" . "\xf274")
+    ("nf-fa-calendar_check_o" . "\xf274")
+    ("nf-fa-calendar_day" . "\xef37")
+    ("nf-fa-calendar_days" . "\xf073")
+    ("nf-fa-calendar_minus" . "\xf272")
+    ("nf-fa-calendar_minus_o" . "\xf272")
+    ("nf-fa-calendar_o" . "\xf133")
+    ("nf-fa-calendar_plus" . "\xf271")
+    ("nf-fa-calendar_plus_o" . "\xf271")
+    ("nf-fa-calendar_times_o" . "\xf273")
+    ("nf-fa-calendar_week" . "\xef38")
+    ("nf-fa-calendar_xmark" . "\xf273")
+    ("nf-fa-camera" . "\xf030")
+    ("nf-fa-camera_retro" . "\xf083")
+    ("nf-fa-campground" . "\xeeec")
+    ("nf-fa-canadian_maple_leaf" . "\xef39")
+    ("nf-fa-candy_cane" . "\xef3a")
+    ("nf-fa-cannabis" . "\xee28")
+    ("nf-fa-capsules" . "\xed79")
+    ("nf-fa-car" . "\xf1b9")
+    ("nf-fa-car_battery" . "\xee9e")
+    ("nf-fa-car_burst" . "\xee9f")
+    ("nf-fa-car_rear" . "\xee9d")
+    ("nf-fa-car_side" . "\xeea0")
+    ("nf-fa-caravan" . "\xefc1")
+    ("nf-fa-caret_down" . "\xf0d7")
+    ("nf-fa-caret_left" . "\xf0d9")
+    ("nf-fa-caret_right" . "\xf0da")
+    ("nf-fa-caret_square_o_down" . "\xf150")
+    ("nf-fa-caret_square_o_left" . "\xf191")
+    ("nf-fa-caret_square_o_right" . "\xf152")
+    ("nf-fa-caret_square_o_up" . "\xf151")
+    ("nf-fa-caret_up" . "\xf0d8")
+    ("nf-fa-carrot" . "\xef3b")
+    ("nf-fa-cart_arrow_down" . "\xf218")
+    ("nf-fa-cart_flatbed" . "\xed7f")
+    ("nf-fa-cart_flatbed_suitcase" . "\xee66")
+    ("nf-fa-cart_plus" . "\xf217")
+    ("nf-fa-cart_shopping" . "\xf07a")
+    ("nf-fa-cash_register" . "\xef3c")
+    ("nf-fa-cat" . "\xeeed")
+    ("nf-fa-cc" . "\xf20a")
+    ("nf-fa-cc_amazon_pay" . "\xed57")
+    ("nf-fa-cc_amex" . "\xf1f3")
+    ("nf-fa-cc_apple_pay" . "\xed42")
+    ("nf-fa-cc_diners_club" . "\xf24c")
+    ("nf-fa-cc_discover" . "\xf1f2")
+    ("nf-fa-cc_jcb" . "\xf24b")
+    ("nf-fa-cc_mastercard" . "\xf1f1")
+    ("nf-fa-cc_paypal" . "\xf1f4")
+    ("nf-fa-cc_stripe" . "\xf1f5")
+    ("nf-fa-cc_visa" . "\xf1f0")
+    ("nf-fa-centercode" . "\xf14f")
+    ("nf-fa-centos" . "\xef3d")
+    ("nf-fa-certificate" . "\xf0a3")
+    ("nf-fa-chain" . "\xf0c1")
+    ("nf-fa-chain_broken" . "\xf127")
+    ("nf-fa-chair" . "\xeeee")
+    ("nf-fa-chalkboard" . "\xede5")
+    ("nf-fa-chalkboard_user" . "\xede6")
+    ("nf-fa-champagne_glasses" . "\xef49")
+    ("nf-fa-charging_station" . "\xeea1")
+    ("nf-fa-chart_area" . "\xf1fe")
+    ("nf-fa-chart_bar" . "\xf080")
+    ("nf-fa-chart_line" . "\xf201")
+    ("nf-fa-chart_pie" . "\xf200")
+    ("nf-fa-check" . "\xf00c")
+    ("nf-fa-check_circle" . "\xf058")
+    ("nf-fa-check_circle_o" . "\xf05d")
+    ("nf-fa-check_double" . "\xee29")
+    ("nf-fa-check_square" . "\xf14a")
+    ("nf-fa-check_square_o" . "\xf046")
+    ("nf-fa-check_to_slot" . "\xef2f")
+    ("nf-fa-cheese" . "\xef7a")
+    ("nf-fa-chess" . "\xed5f")
+    ("nf-fa-chess_bishop" . "\xed60")
+    ("nf-fa-chess_board" . "\xed61")
+    ("nf-fa-chess_king" . "\xed62")
+    ("nf-fa-chess_knight" . "\xed63")
+    ("nf-fa-chess_pawn" . "\xed64")
+    ("nf-fa-chess_queen" . "\xed65")
+    ("nf-fa-chess_rook" . "\xed66")
+    ("nf-fa-chevron_circle_down" . "\xf13a")
+    ("nf-fa-chevron_circle_left" . "\xf137")
+    ("nf-fa-chevron_circle_right" . "\xf138")
+    ("nf-fa-chevron_circle_up" . "\xf139")
+    ("nf-fa-chevron_down" . "\xf078")
+    ("nf-fa-chevron_left" . "\xf053")
+    ("nf-fa-chevron_right" . "\xf054")
+    ("nf-fa-chevron_up" . "\xf077")
+    ("nf-fa-child" . "\xf1ae")
+    ("nf-fa-chrome" . "\xf268")
+    ("nf-fa-chromecast" . "\xef97")
+    ("nf-fa-church" . "\xede7")
+    ("nf-fa-circle" . "\xf111")
+    ("nf-fa-circle_arrow_down" . "\xf0ab")
+    ("nf-fa-circle_arrow_left" . "\xf0a8")
+    ("nf-fa-circle_arrow_right" . "\xf0a9")
+    ("nf-fa-circle_arrow_up" . "\xf0aa")
+    ("nf-fa-circle_check" . "\xf05d")
+    ("nf-fa-circle_chevron_down" . "\xf13a")
+    ("nf-fa-circle_chevron_left" . "\xf137")
+    ("nf-fa-circle_chevron_right" . "\xf138")
+    ("nf-fa-circle_chevron_up" . "\xf139")
+    ("nf-fa-circle_dollar_to_slot" . "\xed98")
+    ("nf-fa-circle_dot" . "\xf192")
+    ("nf-fa-circle_down" . "\xf01a")
+    ("nf-fa-circle_exclamation" . "\xf06a")
+    ("nf-fa-circle_h" . "\xed83")
+    ("nf-fa-circle_half_stroke" . "\xf042")
+    ("nf-fa-circle_info" . "\xf05a")
+    ("nf-fa-circle_left" . "\xf190")
+    ("nf-fa-circle_minus" . "\xf056")
+    ("nf-fa-circle_notch" . "\xf1ce")
+    ("nf-fa-circle_o" . "\xf10c")
+    ("nf-fa-circle_o_notch" . "\xf1ce")
+    ("nf-fa-circle_pause" . "\xf28b")
+    ("nf-fa-circle_play" . "\xf144")
+    ("nf-fa-circle_plus" . "\xf055")
+    ("nf-fa-circle_question" . "\xf059")
+    ("nf-fa-circle_radiation" . "\xef5b")
+    ("nf-fa-circle_right" . "\xf18e")
+    ("nf-fa-circle_stop" . "\xf28d")
+    ("nf-fa-circle_thin" . "\xf1db")
+    ("nf-fa-circle_up" . "\xf01b")
+    ("nf-fa-circle_user" . "\xf2bd")
+    ("nf-fa-circle_xmark" . "\xf05c")
+    ("nf-fa-city" . "\xeec0")
+    ("nf-fa-clipboard" . "\xf0ea")
+    ("nf-fa-clipboard_alt" . "\xf07f")
+    ("nf-fa-clipboard_check" . "\xed7a")
+    ("nf-fa-clipboard_list" . "\xed7b")
+    ("nf-fa-clipboard_user" . "\xef7c")
+    ("nf-fa-clock" . "\xf017")
+    ("nf-fa-clock_o" . "\xf017")
+    ("nf-fa-clock_rotate_left" . "\xf1da")
+    ("nf-fa-clone" . "\xf24d")
+    ("nf-fa-close" . "\xf00d")
+    ("nf-fa-closed_captioning" . "\xf20a")
+    ("nf-fa-cloud" . "\xf0c2")
+    ("nf-fa-cloud_arrow_down" . "\xf0ed")
+    ("nf-fa-cloud_arrow_up" . "\xf0ee")
+    ("nf-fa-cloud_bolt" . "\xef2c")
+    ("nf-fa-cloud_download" . "\xf0ed")
+    ("nf-fa-cloud_meatball" . "\xef1a")
+    ("nf-fa-cloud_moon" . "\xeeef")
+    ("nf-fa-cloud_moon_rain" . "\xef1b")
+    ("nf-fa-cloud_rain" . "\xef1c")
+    ("nf-fa-cloud_showers_heavy" . "\xef1d")
+    ("nf-fa-cloud_sun" . "\xeef0")
+    ("nf-fa-cloud_sun_rain" . "\xef1e")
+    ("nf-fa-cloud_upload" . "\xf0ee")
+    ("nf-fa-cloudscale" . "\xf15f")
+    ("nf-fa-cloudsmith" . "\xf167")
+    ("nf-fa-cloudversify" . "\xf16f")
+    ("nf-fa-cny" . "\xf157")
+    ("nf-fa-code" . "\xf121")
+    ("nf-fa-code_branch" . "\xf126")
+    ("nf-fa-code_commit" . "\xf172")
+    ("nf-fa-code_fork" . "\xf126")
+    ("nf-fa-code_merge" . "\xf17f")
+    ("nf-fa-codepen" . "\xf1cb")
+    ("nf-fa-codiepie" . "\xf284")
+    ("nf-fa-coffee" . "\xf0f4")
+    ("nf-fa-cog" . "\xf013")
+    ("nf-fa-cogs" . "\xf085")
+    ("nf-fa-coins" . "\xede8")
+    ("nf-fa-columns" . "\xf0db")
+    ("nf-fa-comment" . "\xf075")
+    ("nf-fa-comment_dollar" . "\xeec1")
+    ("nf-fa-comment_dots" . "\xf27b")
+    ("nf-fa-comment_medical" . "\xef7d")
+    ("nf-fa-comment_o" . "\xf0e5")
+    ("nf-fa-comment_slash" . "\xed96")
+    ("nf-fa-comment_sms" . "\xef68")
+    ("nf-fa-commenting" . "\xf27a")
+    ("nf-fa-commenting_o" . "\xf27b")
+    ("nf-fa-comments" . "\xf086")
+    ("nf-fa-comments_dollar" . "\xeec2")
+    ("nf-fa-comments_o" . "\xf0e6")
+    ("nf-fa-compact_disc" . "\xede9")
+    ("nf-fa-compass" . "\xf14e")
+    ("nf-fa-compass_drafting" . "\xee31")
+    ("nf-fa-compress" . "\xf066")
+    ("nf-fa-computer_mouse" . "\xefba")
+    ("nf-fa-confluence" . "\xef3f")
+    ("nf-fa-connectdevelop" . "\xf20e")
+    ("nf-fa-contao" . "\xf26d")
+    ("nf-fa-cookie" . "\xee2c")
+    ("nf-fa-cookie_bite" . "\xee2d")
+    ("nf-fa-copy" . "\xf0c5")
+    ("nf-fa-copyright" . "\xf1f9")
+    ("nf-fa-cotton_bureau" . "\xefb5")
+    ("nf-fa-couch" . "\xed97")
+    ("nf-fa-cow" . "\xeef1")
+    ("nf-fa-cpanel" . "\xf18f")
+    ("nf-fa-creative_commons" . "\xf25e")
+    ("nf-fa-creative_commons_by" . "\xedb1")
+    ("nf-fa-creative_commons_nc" . "\xedb2")
+    ("nf-fa-creative_commons_nc_eu" . "\xedb3")
+    ("nf-fa-creative_commons_nc_jp" . "\xedb4")
+    ("nf-fa-creative_commons_nd" . "\xedb5")
+    ("nf-fa-creative_commons_pd" . "\xedb6")
+    ("nf-fa-creative_commons_pd_alt" . "\xedb7")
+    ("nf-fa-creative_commons_remix" . "\xedb8")
+    ("nf-fa-creative_commons_sa" . "\xedb9")
+    ("nf-fa-creative_commons_sampling" . "\xedba")
+    ("nf-fa-creative_commons_sampling_plus" . "\xedbb")
+    ("nf-fa-creative_commons_share" . "\xedbc")
+    ("nf-fa-creative_commons_zero" . "\xedbd")
+    ("nf-fa-credit_card" . "\xf09d")
+    ("nf-fa-credit_card_alt" . "\xf283")
+    ("nf-fa-critical_role" . "\xeef2")
+    ("nf-fa-crop" . "\xf125")
+    ("nf-fa-crop_simple" . "\xee2e")
+    ("nf-fa-cross" . "\xeec3")
+    ("nf-fa-crosshairs" . "\xf05b")
+    ("nf-fa-crow" . "\xedea")
+    ("nf-fa-crown" . "\xedeb")
+    ("nf-fa-crutch" . "\xef7e")
+    ("nf-fa-css3" . "\xf13c")
+    ("nf-fa-css3_alt" . "\xf19f")
+    ("nf-fa-cube" . "\xf1b2")
+    ("nf-fa-cubes" . "\xf1b3")
+    ("nf-fa-cut" . "\xf0c4")
+    ("nf-fa-cutlery" . "\xf0f5")
+    ("nf-fa-cuttlefish" . "\xf1af")
+    ("nf-fa-d_and_d" . "\xf1bf")
+    ("nf-fa-d_and_d_beyond" . "\xeef3")
+    ("nf-fa-dashboard" . "\xf0e4")
+    ("nf-fa-dashcube" . "\xf210")
+    ("nf-fa-database" . "\xf1c0")
+    ("nf-fa-deaf" . "\xf2a4")
+    ("nf-fa-deafness" . "\xf2a4")
+    ("nf-fa-dedent" . "\xf03b")
+    ("nf-fa-delete_left" . "\xee23")
+    ("nf-fa-delicious" . "\xf1a5")
+    ("nf-fa-democrat" . "\xef1f")
+    ("nf-fa-deploydog" . "\xf1cf")
+    ("nf-fa-deskpro" . "\xf1df")
+    ("nf-fa-desktop" . "\xf108")
+    ("nf-fa-dev" . "\xeef4")
+    ("nf-fa-deviantart" . "\xf1bd")
+    ("nf-fa-dharmachakra" . "\xeec4")
+    ("nf-fa-dhl" . "\xef40")
+    ("nf-fa-diagram_project" . "\xefce")
+    ("nf-fa-diamond" . "\xf29f")
+    ("nf-fa-diamond_turn_right" . "\xeea2")
+    ("nf-fa-diaspora" . "\xef41")
+    ("nf-fa-dice" . "\xedec")
+    ("nf-fa-dice_d20" . "\xeef5")
+    ("nf-fa-dice_d6" . "\xeef6")
+    ("nf-fa-dice_five" . "\xeded")
+    ("nf-fa-dice_four" . "\xedee")
+    ("nf-fa-dice_one" . "\xedef")
+    ("nf-fa-dice_six" . "\xedf0")
+    ("nf-fa-dice_three" . "\xedf1")
+    ("nf-fa-dice_two" . "\xedf2")
+    ("nf-fa-digg" . "\xf1a6")
+    ("nf-fa-digital_ocean" . "\xf1ef")
+    ("nf-fa-discord" . "\xf1ff")
+    ("nf-fa-discourse" . "\xf20c")
+    ("nf-fa-disease" . "\xef7f")
+    ("nf-fa-divide" . "\xedf3")
+    ("nf-fa-dna" . "\xed7d")
+    ("nf-fa-dochub" . "\xf20f")
+    ("nf-fa-docker" . "\xf21f")
+    ("nf-fa-dog" . "\xeef7")
+    ("nf-fa-dollar" . "\xf155")
+    ("nf-fa-dollar_sign" . "\xf155")
+    ("nf-fa-dolly" . "\xed7e")
+    ("nf-fa-door_closed" . "\xedf4")
+    ("nf-fa-door_open" . "\xedf5")
+    ("nf-fa-dot_circle_o" . "\xf192")
+    ("nf-fa-dove" . "\xed99")
+    ("nf-fa-down_left_and_up_right_to_center" . "\xed4d")
+    ("nf-fa-down_long" . "\xf03f")
+    ("nf-fa-download" . "\xf019")
+    ("nf-fa-draft2digital" . "\xf220")
+    ("nf-fa-dragon" . "\xeef8")
+    ("nf-fa-draw_polygon" . "\xeea3")
+    ("nf-fa-dribbble" . "\xf17d")
+    ("nf-fa-drivers_license" . "\xf2c2")
+    ("nf-fa-drivers_license_o" . "\xf2c3")
+    ("nf-fa-dropbox" . "\xf16b")
+    ("nf-fa-droplet" . "\xf043")
+    ("nf-fa-droplet_slash" . "\xee8e")
+    ("nf-fa-drum" . "\xee32")
+    ("nf-fa-drum_steelpan" . "\xee33")
+    ("nf-fa-drumstick_bite" . "\xeef9")
+    ("nf-fa-drupal" . "\xf1a9")
+    ("nf-fa-dumbbell" . "\xed67")
+    ("nf-fa-dumpster" . "\xef42")
+    ("nf-fa-dumpster_fire" . "\xef43")
+    ("nf-fa-dungeon" . "\xeefa")
+    ("nf-fa-dyalog" . "\xf22f")
+    ("nf-fa-ear_deaf" . "\xf2a4")
+    ("nf-fa-ear_listen" . "\xf2a2")
+    ("nf-fa-earlybirds" . "\xf230")
+    ("nf-fa-earth_africa" . "\xee45")
+    ("nf-fa-earth_americas" . "\xee46")
+    ("nf-fa-earth_asia" . "\xee47")
+    ("nf-fa-earth_europe" . "\xef4b")
+    ("nf-fa-ebay" . "\xedbe")
+    ("nf-fa-edge" . "\xf282")
+    ("nf-fa-edit" . "\xf044")
+    ("nf-fa-eercast" . "\xf2da")
+    ("nf-fa-egg" . "\xef80")
+    ("nf-fa-eject" . "\xf052")
+    ("nf-fa-elementor" . "\xed5a")
+    ("nf-fa-ellipsis" . "\xf141")
+    ("nf-fa-ellipsis_h" . "\xf141")
+    ("nf-fa-ellipsis_v" . "\xf142")
+    ("nf-fa-ellipsis_vertical" . "\xf142")
+    ("nf-fa-ello" . "\xeea4")
+    ("nf-fa-ember" . "\xed4e")
+    ("nf-fa-empire" . "\xf1d1")
+    ("nf-fa-envelope" . "\xf0e0")
+    ("nf-fa-envelope_o" . "\xf003")
+    ("nf-fa-envelope_open" . "\xf2b6")
+    ("nf-fa-envelope_open_o" . "\xf2b7")
+    ("nf-fa-envelope_open_text" . "\xeec5")
+    ("nf-fa-envelope_square" . "\xf199")
+    ("nf-fa-envelopes_bulk" . "\xeed1")
+    ("nf-fa-envira" . "\xf299")
+    ("nf-fa-equals" . "\xedf6")
+    ("nf-fa-eraser" . "\xf12d")
+    ("nf-fa-erlang" . "\xf23f")
+    ("nf-fa-ethereum" . "\xed58")
+    ("nf-fa-ethernet" . "\xef44")
+    ("nf-fa-etsy" . "\xf2d7")
+    ("nf-fa-eur" . "\xf153")
+    ("nf-fa-euro" . "\xf153")
+    ("nf-fa-euro_sign" . "\xf153")
+    ("nf-fa-evernote" . "\xef98")
+    ("nf-fa-exchange" . "\xf0ec")
+    ("nf-fa-exclamation" . "\xf12a")
+    ("nf-fa-exclamation_circle" . "\xf06a")
+    ("nf-fa-exclamation_triangle" . "\xf071")
+    ("nf-fa-expand" . "\xf065")
+    ("nf-fa-expeditedssl" . "\xf23e")
+    ("nf-fa-external_link" . "\xf08e")
+    ("nf-fa-external_link_square" . "\xf14c")
+    ("nf-fa-eye" . "\xf06e")
+    ("nf-fa-eye_dropper" . "\xf1fb")
+    ("nf-fa-eye_low_vision" . "\xf2a8")
+    ("nf-fa-eye_slash" . "\xf070")
+    ("nf-fa-eyedropper" . "\xf1fb")
+    ("nf-fa-fa" . "\xf2b4")
+    ("nf-fa-face_angry" . "\xee1f")
+    ("nf-fa-face_dizzy" . "\xee30")
+    ("nf-fa-face_flushed" . "\xee42")
+    ("nf-fa-face_frown" . "\xf119")
+    ("nf-fa-face_frown_open" . "\xee43")
+    ("nf-fa-face_grimace" . "\xee48")
+    ("nf-fa-face_grin" . "\xee49")
+    ("nf-fa-face_grin_beam" . "\xee4b")
+    ("nf-fa-face_grin_beam_sweat" . "\xee4c")
+    ("nf-fa-face_grin_hearts" . "\xee4d")
+    ("nf-fa-face_grin_squint" . "\xee4e")
+    ("nf-fa-face_grin_squint_tears" . "\xee4f")
+    ("nf-fa-face_grin_stars" . "\xee50")
+    ("nf-fa-face_grin_tears" . "\xee51")
+    ("nf-fa-face_grin_tongue" . "\xee52")
+    ("nf-fa-face_grin_tongue_squint" . "\xee53")
+    ("nf-fa-face_grin_tongue_wink" . "\xee54")
+    ("nf-fa-face_grin_wide" . "\xee4a")
+    ("nf-fa-face_grin_wink" . "\xee55")
+    ("nf-fa-face_kiss" . "\xee5f")
+    ("nf-fa-face_kiss_beam" . "\xee60")
+    ("nf-fa-face_kiss_wink_heart" . "\xee61")
+    ("nf-fa-face_laugh" . "\xee62")
+    ("nf-fa-face_laugh_beam" . "\xee63")
+    ("nf-fa-face_laugh_squint" . "\xee64")
+    ("nf-fa-face_laugh_wink" . "\xee65")
+    ("nf-fa-face_meh" . "\xf11a")
+    ("nf-fa-face_meh_blank" . "\xee6d")
+    ("nf-fa-face_rolling_eyes" . "\xee6e")
+    ("nf-fa-face_sad_cry" . "\xee7b")
+    ("nf-fa-face_sad_tear" . "\xee7c")
+    ("nf-fa-face_smile" . "\xf118")
+    ("nf-fa-face_smile_beam" . "\xee80")
+    ("nf-fa-face_smile_wink" . "\xeda9")
+    ("nf-fa-face_surprise" . "\xee89")
+    ("nf-fa-face_tired" . "\xee8f")
+    ("nf-fa-facebook" . "\xf09a")
+    ("nf-fa-facebook_f" . "\xf24f")
+    ("nf-fa-facebook_messenger" . "\xf25f")
+    ("nf-fa-facebook_official" . "\xf230")
+    ("nf-fa-facebook_square" . "\xf082")
+    ("nf-fa-fan" . "\xefa7")
+    ("nf-fa-fantasy_flight_games" . "\xeefb")
+    ("nf-fa-fast_backward" . "\xf049")
+    ("nf-fa-fast_forward" . "\xf050")
+    ("nf-fa-fax" . "\xf1ac")
+    ("nf-fa-feather" . "\xedf7")
+    ("nf-fa-feather_pointed" . "\xee34")
+    ("nf-fa-fedex" . "\xef45")
+    ("nf-fa-fedora" . "\xef46")
+    ("nf-fa-feed" . "\xf09e")
+    ("nf-fa-female" . "\xf182")
+    ("nf-fa-fighter_jet" . "\xf0fb")
+    ("nf-fa-figma" . "\xef47")
+    ("nf-fa-file" . "\xf15b")
+    ("nf-fa-file_archive_o" . "\xf1c6")
+    ("nf-fa-file_arrow_down" . "\xee36")
+    ("nf-fa-file_arrow_up" . "\xee3d")
+    ("nf-fa-file_audio" . "\xf1c7")
+    ("nf-fa-file_audio_o" . "\xf1c7")
+    ("nf-fa-file_code" . "\xf1c9")
+    ("nf-fa-file_code_o" . "\xf1c9")
+    ("nf-fa-file_contract" . "\xee35")
+    ("nf-fa-file_csv" . "\xeefc")
+    ("nf-fa-file_excel" . "\xf1c3")
+    ("nf-fa-file_excel_o" . "\xf1c3")
+    ("nf-fa-file_export" . "\xee37")
+    ("nf-fa-file_image" . "\xf1c5")
+    ("nf-fa-file_image_o" . "\xf1c5")
+    ("nf-fa-file_import" . "\xee38")
+    ("nf-fa-file_invoice" . "\xee39")
+    ("nf-fa-file_invoice_dollar" . "\xee3a")
+    ("nf-fa-file_lines" . "\xf15c")
+    ("nf-fa-file_medical" . "\xed80")
+    ("nf-fa-file_movie_o" . "\xf1c8")
+    ("nf-fa-file_o" . "\xf016")
+    ("nf-fa-file_pdf" . "\xf1c1")
+    ("nf-fa-file_pdf_o" . "\xf1c1")
+    ("nf-fa-file_pen" . "\xf05f")
+    ("nf-fa-file_photo_o" . "\xf1c5")
+    ("nf-fa-file_picture_o" . "\xf1c5")
+    ("nf-fa-file_powerpoint" . "\xf1c4")
+    ("nf-fa-file_powerpoint_o" . "\xf1c4")
+    ("nf-fa-file_prescription" . "\xee3b")
+    ("nf-fa-file_signature" . "\xee3c")
+    ("nf-fa-file_sound_o" . "\xf1c7")
+    ("nf-fa-file_text" . "\xf15c")
+    ("nf-fa-file_text_o" . "\xf0f6")
+    ("nf-fa-file_video" . "\xf1c8")
+    ("nf-fa-file_video_o" . "\xf1c8")
+    ("nf-fa-file_waveform" . "\xed81")
+    ("nf-fa-file_word" . "\xf1c2")
+    ("nf-fa-file_word_o" . "\xf1c2")
+    ("nf-fa-file_zip_o" . "\xf1c6")
+    ("nf-fa-file_zipper" . "\xf1c6")
+    ("nf-fa-files_o" . "\xf0c5")
+    ("nf-fa-fill" . "\xee3e")
+    ("nf-fa-fill_drip" . "\xee3f")
+    ("nf-fa-film" . "\xf008")
+    ("nf-fa-filter" . "\xf0b0")
+    ("nf-fa-filter_circle_dollar" . "\xeec8")
+    ("nf-fa-fingerprint" . "\xee40")
+    ("nf-fa-fire" . "\xf06d")
+    ("nf-fa-fire_extinguisher" . "\xf134")
+    ("nf-fa-fire_flame_curved" . "\xef76")
+    ("nf-fa-fire_flame_simple" . "\xed78")
+    ("nf-fa-firefox" . "\xf269")
+    ("nf-fa-first_order" . "\xf2b0")
+    ("nf-fa-first_order_alt" . "\xedd4")
+    ("nf-fa-firstdraft" . "\xf262")
+    ("nf-fa-fish" . "\xee41")
+    ("nf-fa-flag" . "\xf024")
+    ("nf-fa-flag_checkered" . "\xf11e")
+    ("nf-fa-flag_o" . "\xf11d")
+    ("nf-fa-flag_usa" . "\xef20")
+    ("nf-fa-flash" . "\xf0e7")
+    ("nf-fa-flask" . "\xf0c3")
+    ("nf-fa-flickr" . "\xf16e")
+    ("nf-fa-flipboard" . "\xed68")
+    ("nf-fa-floppy_disk" . "\xf0c7")
+    ("nf-fa-floppy_o" . "\xf0c7")
+    ("nf-fa-fly" . "\xed43")
+    ("nf-fa-folder" . "\xf07b")
+    ("nf-fa-folder_minus" . "\xeec6")
+    ("nf-fa-folder_o" . "\xf114")
+    ("nf-fa-folder_open" . "\xf07c")
+    ("nf-fa-folder_open_o" . "\xf115")
+    ("nf-fa-folder_plus" . "\xeec7")
+    ("nf-fa-folder_tree" . "\xef81")
+    ("nf-fa-font" . "\xf031")
+    ("nf-fa-font_awesome" . "\xf2b4")
+    ("nf-fa-fonticons" . "\xf280")
+    ("nf-fa-fonticons_fi" . "\xf26f")
+    ("nf-fa-football" . "\xed69")
+    ("nf-fa-fort_awesome" . "\xf286")
+    ("nf-fa-fort_awesome_alt" . "\xf27f")
+    ("nf-fa-forumbee" . "\xf211")
+    ("nf-fa-forward" . "\xf04e")
+    ("nf-fa-forward_fast" . "\xf050")
+    ("nf-fa-forward_step" . "\xf051")
+    ("nf-fa-foursquare" . "\xf180")
+    ("nf-fa-free_code_camp" . "\xf2c5")
+    ("nf-fa-freebsd" . "\xf28f")
+    ("nf-fa-frog" . "\xedf8")
+    ("nf-fa-frown_o" . "\xf119")
+    ("nf-fa-fulcrum" . "\xedd5")
+    ("nf-fa-futbol" . "\xf1e3")
+    ("nf-fa-futbol_o" . "\xf1e3")
+    ("nf-fa-galactic_republic" . "\xedd6")
+    ("nf-fa-galactic_senate" . "\xedd7")
+    ("nf-fa-gamepad" . "\xf11b")
+    ("nf-fa-gas_pump" . "\xedf9")
+    ("nf-fa-gauge" . "\xeeb2")
+    ("nf-fa-gauge_high" . "\xed2f")
+    ("nf-fa-gauge_simple" . "\xeeb3")
+    ("nf-fa-gauge_simple_high" . "\xf0e4")
+    ("nf-fa-gavel" . "\xf0e3")
+    ("nf-fa-gbp" . "\xf154")
+    ("nf-fa-ge" . "\xf1d1")
+    ("nf-fa-gear" . "\xf013")
+    ("nf-fa-gears" . "\xf085")
+    ("nf-fa-gem" . "\xf219")
+    ("nf-fa-genderless" . "\xf22d")
+    ("nf-fa-get_pocket" . "\xf265")
+    ("nf-fa-gg" . "\xf260")
+    ("nf-fa-gg_circle" . "\xf261")
+    ("nf-fa-ghost" . "\xeefe")
+    ("nf-fa-gift" . "\xf06b")
+    ("nf-fa-gifts" . "\xef48")
+    ("nf-fa-git" . "\xf1d3")
+    ("nf-fa-git_alt" . "\xefa0")
+    ("nf-fa-git_square" . "\xf1d2")
+    ("nf-fa-github" . "\xf09b")
+    ("nf-fa-github_alt" . "\xf113")
+    ("nf-fa-github_square" . "\xf092")
+    ("nf-fa-gitkraken" . "\xf2ac")
+    ("nf-fa-gitlab" . "\xf296")
+    ("nf-fa-gitter" . "\xed50")
+    ("nf-fa-gittip" . "\xf184")
+    ("nf-fa-glass" . "\xf000")
+    ("nf-fa-glasses" . "\xedfa")
+    ("nf-fa-glide" . "\xf2a5")
+    ("nf-fa-glide_g" . "\xf2a6")
+    ("nf-fa-globe" . "\xf0ac")
+    ("nf-fa-gofore" . "\xf2af")
+    ("nf-fa-golf_ball_tee" . "\xed6a")
+    ("nf-fa-goodreads" . "\xf2bf")
+    ("nf-fa-goodreads_g" . "\xf2cf")
+    ("nf-fa-google" . "\xf1a0")
+    ("nf-fa-google_drive" . "\xf2df")
+    ("nf-fa-google_play" . "\xf2e1")
+    ("nf-fa-google_plus" . "\xf0d5")
+    ("nf-fa-google_plus_circle" . "\xf2b3")
+    ("nf-fa-google_plus_official" . "\xf2b3")
+    ("nf-fa-google_plus_square" . "\xf0d4")
+    ("nf-fa-google_wallet" . "\xf1ee")
+    ("nf-fa-gopuram" . "\xeec9")
+    ("nf-fa-graduation_cap" . "\xf19d")
+    ("nf-fa-gratipay" . "\xf184")
+    ("nf-fa-grav" . "\xf2d6")
+    ("nf-fa-greater_than" . "\xedfb")
+    ("nf-fa-greater_than_equal" . "\xedfc")
+    ("nf-fa-grip" . "\xee56")
+    ("nf-fa-grip_lines" . "\xef4c")
+    ("nf-fa-grip_lines_vertical" . "\xef4d")
+    ("nf-fa-grip_vertical" . "\xee57")
+    ("nf-fa-gripfire" . "\xf2e2")
+    ("nf-fa-group" . "\xf0c0")
+    ("nf-fa-grunt" . "\xf2e3")
+    ("nf-fa-guitar" . "\xef4e")
+    ("nf-fa-gulp" . "\xf2e4")
+    ("nf-fa-h_square" . "\xf0fd")
+    ("nf-fa-hacker_news" . "\xf1d4")
+    ("nf-fa-hackerrank" . "\xeea5")
+    ("nf-fa-hammer" . "\xeeff")
+    ("nf-fa-hamsa" . "\xeeca")
+    ("nf-fa-hand" . "\xf256")
+    ("nf-fa-hand_back_fist" . "\xf255")
+    ("nf-fa-hand_dots" . "\xed73")
+    ("nf-fa-hand_fist" . "\xeefd")
+    ("nf-fa-hand_grab_o" . "\xf255")
+    ("nf-fa-hand_holding" . "\xed9a")
+    ("nf-fa-hand_holding_dollar" . "\xed9c")
+    ("nf-fa-hand_holding_droplet" . "\xed9d")
+    ("nf-fa-hand_holding_heart" . "\xed9b")
+    ("nf-fa-hand_lizard" . "\xf258")
+    ("nf-fa-hand_lizard_o" . "\xf258")
+    ("nf-fa-hand_middle_finger" . "\xef83")
+    ("nf-fa-hand_o_down" . "\xf0a7")
+    ("nf-fa-hand_o_left" . "\xf0a5")
+    ("nf-fa-hand_o_right" . "\xf0a4")
+    ("nf-fa-hand_o_up" . "\xf0a6")
+    ("nf-fa-hand_paper_o" . "\xf256")
+    ("nf-fa-hand_peace" . "\xf25b")
+    ("nf-fa-hand_peace_o" . "\xf25b")
+    ("nf-fa-hand_point_down" . "\xf0a7")
+    ("nf-fa-hand_point_left" . "\xf0a5")
+    ("nf-fa-hand_point_right" . "\xf0a4")
+    ("nf-fa-hand_point_up" . "\xf0a6")
+    ("nf-fa-hand_pointer" . "\xf25a")
+    ("nf-fa-hand_pointer_o" . "\xf25a")
+    ("nf-fa-hand_rock_o" . "\xf255")
+    ("nf-fa-hand_scissors" . "\xf257")
+    ("nf-fa-hand_scissors_o" . "\xf257")
+    ("nf-fa-hand_spock" . "\xf259")
+    ("nf-fa-hand_spock_o" . "\xf259")
+    ("nf-fa-hand_stop_o" . "\xf256")
+    ("nf-fa-hands" . "\xf2a7")
+    ("nf-fa-hands_asl_interpreting" . "\xf2a3")
+    ("nf-fa-hands_holding" . "\xed9e")
+    ("nf-fa-hands_praying" . "\xeedb")
+    ("nf-fa-handshake" . "\xf2b5")
+    ("nf-fa-handshake_angle" . "\xed9f")
+    ("nf-fa-handshake_o" . "\xf2b5")
+    ("nf-fa-handshake_simple" . "\xeda0")
+    ("nf-fa-hanukiah" . "\xef00")
+    ("nf-fa-hard_drive" . "\xf0a0")
+    ("nf-fa-hard_of_hearing" . "\xf2a4")
+    ("nf-fa-hashtag" . "\xf292")
+    ("nf-fa-hat_cowboy" . "\xefb7")
+    ("nf-fa-hat_cowboy_side" . "\xefb8")
+    ("nf-fa-hat_wizard" . "\xef01")
+    ("nf-fa-hdd_o" . "\xf0a0")
+    ("nf-fa-header" . "\xf1dc")
+    ("nf-fa-heading" . "\xf1dc")
+    ("nf-fa-headphones" . "\xf025")
+    ("nf-fa-headphones_simple" . "\xee58")
+    ("nf-fa-headset" . "\xee59")
+    ("nf-fa-heard_o" . "\xf08a")
+    ("nf-fa-heart" . "\xf004")
+    ("nf-fa-heart_crack" . "\xef4f")
+    ("nf-fa-heart_o" . "\xf08a")
+    ("nf-fa-heart_pulse" . "\xf21e")
+    ("nf-fa-heartbeat" . "\xf21e")
+    ("nf-fa-helicopter" . "\xedfd")
+    ("nf-fa-helmet_safety" . "\xef84")
+    ("nf-fa-highlighter" . "\xee5a")
+    ("nf-fa-hippo" . "\xef03")
+    ("nf-fa-hips" . "\xed6b")
+    ("nf-fa-hire_a_helper" . "\xf2e6")
+    ("nf-fa-history" . "\xf1da")
+    ("nf-fa-hockey_puck" . "\xed6c")
+    ("nf-fa-holly_berry" . "\xef50")
+    ("nf-fa-home" . "\xf015")
+    ("nf-fa-hooli" . "\xed51")
+    ("nf-fa-hornbill" . "\xee5b")
+    ("nf-fa-horse" . "\xef04")
+    ("nf-fa-horse_head" . "\xef51")
+    ("nf-fa-hospital" . "\xf0f8")
+    ("nf-fa-hospital_o" . "\xf0f8")
+    ("nf-fa-hospital_user" . "\xef86")
+    ("nf-fa-hot_tub_person" . "\xee5c")
+    ("nf-fa-hotdog" . "\xef87")
+    ("nf-fa-hotel" . "\xf236")
+    ("nf-fa-hotel_building" . "\xee5d")
+    ("nf-fa-hotjar" . "\xf2e7")
+    ("nf-fa-hourglass" . "\xf254")
+    ("nf-fa-hourglass_1" . "\xf251")
+    ("nf-fa-hourglass_2" . "\xf252")
+    ("nf-fa-hourglass_3" . "\xf253")
+    ("nf-fa-hourglass_end" . "\xf253")
+    ("nf-fa-hourglass_half" . "\xf252")
+    ("nf-fa-hourglass_o" . "\xf250")
+    ("nf-fa-hourglass_start" . "\xf251")
+    ("nf-fa-house" . "\xf015")
+    ("nf-fa-house_chimney" . "\xef85")
+    ("nf-fa-house_chimney_crack" . "\xef05")
+    ("nf-fa-house_chimney_medical" . "\xef7b")
+    ("nf-fa-houzz" . "\xf27c")
+    ("nf-fa-hryvnia_sign" . "\xef06")
+    ("nf-fa-html5" . "\xf13b")
+    ("nf-fa-hubspot" . "\xf2e8")
+    ("nf-fa-hurricane" . "\xef21")
+    ("nf-fa-i_cursor" . "\xf246")
+    ("nf-fa-ice_cream" . "\xef88")
+    ("nf-fa-icicles" . "\xef52")
+    ("nf-fa-icons" . "\xefa8")
+    ("nf-fa-id_badge" . "\xf2c1")
+    ("nf-fa-id_card" . "\xf2c2")
+    ("nf-fa-id_card_clip" . "\xed84")
+    ("nf-fa-id_card_o" . "\xf2c3")
+    ("nf-fa-igloo" . "\xef53")
+    ("nf-fa-ils" . "\xf20b")
+    ("nf-fa-image" . "\xf03e")
+    ("nf-fa-image_portrait" . "\xed19")
+    ("nf-fa-images" . "\xf00f")
+    ("nf-fa-imdb" . "\xf2d8")
+    ("nf-fa-inbox" . "\xf01c")
+    ("nf-fa-indent" . "\xf03c")
+    ("nf-fa-industry" . "\xf275")
+    ("nf-fa-infinity" . "\xedfe")
+    ("nf-fa-info" . "\xf129")
+    ("nf-fa-info_circle" . "\xf05a")
+    ("nf-fa-inr" . "\xf156")
+    ("nf-fa-instagram" . "\xf16d")
+    ("nf-fa-institution" . "\xf19c")
+    ("nf-fa-intercom" . "\xef54")
+    ("nf-fa-internet_explorer" . "\xf26b")
+    ("nf-fa-intersex" . "\xf224")
+    ("nf-fa-invision" . "\xef55")
+    ("nf-fa-ioxhost" . "\xf208")
+    ("nf-fa-italic" . "\xf033")
+    ("nf-fa-itch_io" . "\xef99")
+    ("nf-fa-itunes" . "\xf2e9")
+    ("nf-fa-itunes_note" . "\xf2eb")
+    ("nf-fa-java" . "\xedaf")
+    ("nf-fa-jedi" . "\xeecc")
+    ("nf-fa-jedi_order" . "\xedd8")
+    ("nf-fa-jenkins" . "\xf2ec")
+    ("nf-fa-jet_fighter" . "\xf0fb")
+    ("nf-fa-jira" . "\xef56")
+    ("nf-fa-joget" . "\xf2ed")
+    ("nf-fa-joint" . "\xee5e")
+    ("nf-fa-joomla" . "\xf1aa")
+    ("nf-fa-jpy" . "\xf157")
+    ("nf-fa-js" . "\xf2ee")
+    ("nf-fa-jsfiddle" . "\xf1cc")
+    ("nf-fa-kaaba" . "\xeece")
+    ("nf-fa-kaggle" . "\xeea6")
+    ("nf-fa-key" . "\xf084")
+    ("nf-fa-keybase" . "\xedbf")
+    ("nf-fa-keyboard" . "\xf11c")
+    ("nf-fa-keyboard_o" . "\xf11c")
+    ("nf-fa-keycdn" . "\xf2f0")
+    ("nf-fa-khanda" . "\xeecf")
+    ("nf-fa-kickstarter" . "\xf2f3")
+    ("nf-fa-kickstarter_k" . "\xf2f4")
+    ("nf-fa-kit_medical" . "\xed82")
+    ("nf-fa-kiwi_bird" . "\xedff")
+    ("nf-fa-korvue" . "\xed59")
+    ("nf-fa-krw" . "\xf159")
+    ("nf-fa-landmark" . "\xeed0")
+    ("nf-fa-landmark_dome" . "\xef22")
+    ("nf-fa-language" . "\xf1ab")
+    ("nf-fa-laptop" . "\xf109")
+    ("nf-fa-laptop_code" . "\xeea7")
+    ("nf-fa-laptop_medical" . "\xef89")
+    ("nf-fa-laravel" . "\xf2f7")
+    ("nf-fa-lastfm" . "\xf202")
+    ("nf-fa-lastfm_square" . "\xf203")
+    ("nf-fa-layer_group" . "\xeea8")
+    ("nf-fa-leaf" . "\xf06c")
+    ("nf-fa-leanpub" . "\xf212")
+    ("nf-fa-left_long" . "\xf04f")
+    ("nf-fa-left_right" . "\xf08f")
+    ("nf-fa-legal" . "\xf0e3")
+    ("nf-fa-lemon" . "\xf094")
+    ("nf-fa-lemon_o" . "\xf094")
+    ("nf-fa-less" . "\xed48")
+    ("nf-fa-less_than" . "\xefc3")
+    ("nf-fa-less_than_equal" . "\xefc4")
+    ("nf-fa-level_down" . "\xf149")
+    ("nf-fa-level_up" . "\xf148")
+    ("nf-fa-life_bouy" . "\xf1cd")
+    ("nf-fa-life_buoy" . "\xf1cd")
+    ("nf-fa-life_ring" . "\xf1cd")
+    ("nf-fa-life_saver" . "\xf1cd")
+    ("nf-fa-lightbulb" . "\xf0eb")
+    ("nf-fa-lightbulb_o" . "\xf0eb")
+    ("nf-fa-line" . "\xf2fb")
+    ("nf-fa-line_chart" . "\xf201")
+    ("nf-fa-link" . "\xf0c1")
+    ("nf-fa-link_slash" . "\xf127")
+    ("nf-fa-linkedin" . "\xf0e1")
+    ("nf-fa-linkedin_in" . "\xf0e1")
+    ("nf-fa-linkedin_square" . "\xf08c")
+    ("nf-fa-linode" . "\xf2b8")
+    ("nf-fa-linux" . "\xf17c")
+    ("nf-fa-lira_sign" . "\xf195")
+    ("nf-fa-list" . "\xf03a")
+    ("nf-fa-list_alt" . "\xf022")
+    ("nf-fa-list_check" . "\xf0ae")
+    ("nf-fa-list_ol" . "\xf0cb")
+    ("nf-fa-list_ul" . "\xf0ca")
+    ("nf-fa-location_arrow" . "\xf124")
+    ("nf-fa-location_crosshairs" . "\xeea9")
+    ("nf-fa-location_dot" . "\xed00")
+    ("nf-fa-location_pin" . "\xf041")
+    ("nf-fa-lock" . "\xf023")
+    ("nf-fa-lock_open" . "\xf2fc")
+    ("nf-fa-long_arrow_down" . "\xf175")
+    ("nf-fa-long_arrow_left" . "\xf177")
+    ("nf-fa-long_arrow_right" . "\xf178")
+    ("nf-fa-long_arrow_up" . "\xf176")
+    ("nf-fa-low_vision" . "\xf2a8")
+    ("nf-fa-lungs" . "\xeeaa")
+    ("nf-fa-lyft" . "\xf2fd")
+    ("nf-fa-magento" . "\xf2ff")
+    ("nf-fa-magic" . "\xf0d0")
+    ("nf-fa-magnet" . "\xf076")
+    ("nf-fa-magnifying_glass" . "\xf002")
+    ("nf-fa-magnifying_glass_dollar" . "\xeedd")
+    ("nf-fa-magnifying_glass_location" . "\xeede")
+    ("nf-fa-magnifying_glass_minus" . "\xf010")
+    ("nf-fa-magnifying_glass_plus" . "\xf00e")
+    ("nf-fa-mail_forward" . "\xf064")
+    ("nf-fa-mail_reply" . "\xf112")
+    ("nf-fa-mail_reply_all" . "\xf122")
+    ("nf-fa-mailchimp" . "\xee67")
+    ("nf-fa-male" . "\xf183")
+    ("nf-fa-mandalorian" . "\xedd9")
+    ("nf-fa-map" . "\xf279")
+    ("nf-fa-map_location" . "\xee68")
+    ("nf-fa-map_location_dot" . "\xee69")
+    ("nf-fa-map_marker" . "\xf041")
+    ("nf-fa-map_o" . "\xf278")
+    ("nf-fa-map_pin" . "\xf276")
+    ("nf-fa-map_signs" . "\xf277")
+    ("nf-fa-markdown" . "\xeeab")
+    ("nf-fa-marker" . "\xee6a")
+    ("nf-fa-mars" . "\xf222")
+    ("nf-fa-mars_double" . "\xf227")
+    ("nf-fa-mars_stroke" . "\xf229")
+    ("nf-fa-mars_stroke_h" . "\xf22b")
+    ("nf-fa-mars_stroke_right" . "\xf22b")
+    ("nf-fa-mars_stroke_up" . "\xf22a")
+    ("nf-fa-mars_stroke_v" . "\xf22a")
+    ("nf-fa-martini_glass" . "\xee44")
+    ("nf-fa-martini_glass_citrus" . "\xee2a")
+    ("nf-fa-martini_glass_empty" . "\xf000")
+    ("nf-fa-mask" . "\xef07")
+    ("nf-fa-masks_theater" . "\xeeb6")
+    ("nf-fa-mastodon" . "\xedc0")
+    ("nf-fa-maxcdn" . "\xf136")
+    ("nf-fa-maximize" . "\xf06f")
+    ("nf-fa-mdb" . "\xefb9")
+    ("nf-fa-meanpath" . "\xf20c")
+    ("nf-fa-medal" . "\xee6b")
+    ("nf-fa-medapps" . "\xed01")
+    ("nf-fa-medium" . "\xf23a")
+    ("nf-fa-medkit" . "\xf0fa")
+    ("nf-fa-medrt" . "\xed02")
+    ("nf-fa-meetup" . "\xf2e0")
+    ("nf-fa-megaport" . "\xee6c")
+    ("nf-fa-meh_o" . "\xf11a")
+    ("nf-fa-memory" . "\xefc5")
+    ("nf-fa-mendeley" . "\xef57")
+    ("nf-fa-menorah" . "\xeed2")
+    ("nf-fa-mercury" . "\xf223")
+    ("nf-fa-message" . "\xf27a")
+    ("nf-fa-meteor" . "\xef23")
+    ("nf-fa-microchip" . "\xf2db")
+    ("nf-fa-microphone" . "\xf130")
+    ("nf-fa-microphone_lines" . "\xed03")
+    ("nf-fa-microphone_lines_slash" . "\xefc6")
+    ("nf-fa-microphone_slash" . "\xf131")
+    ("nf-fa-microscope" . "\xeeac")
+    ("nf-fa-microsoft" . "\xed04")
+    ("nf-fa-minimize" . "\xef3e")
+    ("nf-fa-minus" . "\xf068")
+    ("nf-fa-minus_circle" . "\xf056")
+    ("nf-fa-minus_square" . "\xf146")
+    ("nf-fa-minus_square_o" . "\xf147")
+    ("nf-fa-mitten" . "\xef58")
+    ("nf-fa-mix" . "\xed05")
+    ("nf-fa-mixcloud" . "\xf289")
+    ("nf-fa-mizuni" . "\xed06")
+    ("nf-fa-mobile" . "\xed08")
+    ("nf-fa-mobile_button" . "\xed07")
+    ("nf-fa-mobile_phone" . "\xf10b")
+    ("nf-fa-mobile_screen" . "\xed09")
+    ("nf-fa-mobile_screen_button" . "\xf10b")
+    ("nf-fa-modx" . "\xf285")
+    ("nf-fa-monero" . "\xed0a")
+    ("nf-fa-money" . "\xf0d6")
+    ("nf-fa-money_bill" . "\xf0d6")
+    ("nf-fa-money_bill_1" . "\xed0b")
+    ("nf-fa-money_bill_1_wave" . "\xefc8")
+    ("nf-fa-money_bill_wave" . "\xefc7")
+    ("nf-fa-money_check" . "\xefc9")
+    ("nf-fa-money_check_dollar" . "\xefca")
+    ("nf-fa-monument" . "\xee6f")
+    ("nf-fa-moon" . "\xf186")
+    ("nf-fa-moon_o" . "\xf186")
+    ("nf-fa-mortar_board" . "\xf19d")
+    ("nf-fa-mortar_pestle" . "\xee70")
+    ("nf-fa-mosque" . "\xeed3")
+    ("nf-fa-motorcycle" . "\xf21c")
+    ("nf-fa-mountain" . "\xef08")
+    ("nf-fa-mouse_pointer" . "\xf245")
+    ("nf-fa-mug_hot" . "\xef59")
+    ("nf-fa-mug_saucer" . "\xf0f4")
+    ("nf-fa-music" . "\xf001")
+    ("nf-fa-napster" . "\xed0c")
+    ("nf-fa-navicon" . "\xf0c9")
+    ("nf-fa-neos" . "\xeead")
+    ("nf-fa-network_wired" . "\xef09")
+    ("nf-fa-neuter" . "\xf22c")
+    ("nf-fa-newspaper" . "\xf1ea")
+    ("nf-fa-newspaper_o" . "\xf1ea")
+    ("nf-fa-nimblr" . "\xee71")
+    ("nf-fa-node" . "\xed44")
+    ("nf-fa-node_js" . "\xed0d")
+    ("nf-fa-not_equal" . "\xefcb")
+    ("nf-fa-note_sticky" . "\xf249")
+    ("nf-fa-notes_medical" . "\xed85")
+    ("nf-fa-npm" . "\xed0e")
+    ("nf-fa-ns8" . "\xed0f")
+    ("nf-fa-nutritionix" . "\xed10")
+    ("nf-fa-object_group" . "\xf247")
+    ("nf-fa-object_ungroup" . "\xf248")
+    ("nf-fa-odnoklassniki" . "\xf263")
+    ("nf-fa-odnoklassniki_square" . "\xf264")
+    ("nf-fa-oil_can" . "\xeeae")
+    ("nf-fa-ok_sign" . "\xf058")
+    ("nf-fa-old_republic" . "\xedda")
+    ("nf-fa-om" . "\xeed4")
+    ("nf-fa-opencart" . "\xf23d")
+    ("nf-fa-openid" . "\xf19b")
+    ("nf-fa-opera" . "\xf26a")
+    ("nf-fa-optin_monster" . "\xf23c")
+    ("nf-fa-orcid" . "\xefbb")
+    ("nf-fa-osi" . "\xed45")
+    ("nf-fa-otter" . "\xef0a")
+    ("nf-fa-outdent" . "\xf03b")
+    ("nf-fa-page4" . "\xed11")
+    ("nf-fa-pagelines" . "\xf18c")
+    ("nf-fa-pager" . "\xef8a")
+    ("nf-fa-paint_brush" . "\xf1fc")
+    ("nf-fa-paint_roller" . "\xee72")
+    ("nf-fa-paintbrush" . "\xf1fc")
+    ("nf-fa-palette" . "\xefcc")
+    ("nf-fa-palfed" . "\xed12")
+    ("nf-fa-pallet" . "\xed86")
+    ("nf-fa-paper_plane" . "\xf1d8")
+    ("nf-fa-paper_plane_o" . "\xf1d9")
+    ("nf-fa-paperclip" . "\xf0c6")
+    ("nf-fa-parachute_box" . "\xeda1")
+    ("nf-fa-paragraph" . "\xf1dd")
+    ("nf-fa-passport" . "\xee73")
+    ("nf-fa-paste" . "\xf0ea")
+    ("nf-fa-patreon" . "\xed13")
+    ("nf-fa-pause" . "\xf04c")
+    ("nf-fa-pause_circle" . "\xf28b")
+    ("nf-fa-pause_circle_o" . "\xf28c")
+    ("nf-fa-paw" . "\xf1b0")
+    ("nf-fa-paypal" . "\xf1ed")
+    ("nf-fa-peace" . "\xeed6")
+    ("nf-fa-pen" . "\xf01f")
+    ("nf-fa-pen_clip" . "\xf020")
+    ("nf-fa-pen_fancy" . "\xee74")
+    ("nf-fa-pen_nib" . "\xee75")
+    ("nf-fa-pen_ruler" . "\xee76")
+    ("nf-fa-pen_to_square" . "\xf044")
+    ("nf-fa-pencil" . "\xf040")
+    ("nf-fa-pencil_square" . "\xf14b")
+    ("nf-fa-pencil_square_o" . "\xf044")
+    ("nf-fa-people_carry_box" . "\xeda2")
+    ("nf-fa-pepper_hot" . "\xef8b")
+    ("nf-fa-percent" . "\xf295")
+    ("nf-fa-periscope" . "\xed14")
+    ("nf-fa-person" . "\xf183")
+    ("nf-fa-person_biking" . "\xefa2")
+    ("nf-fa-person_booth" . "\xef24")
+    ("nf-fa-person_digging" . "\xefa6")
+    ("nf-fa-person_dots_from_line" . "\xed7c")
+    ("nf-fa-person_dress" . "\xf182")
+    ("nf-fa-person_hiking" . "\xef02")
+    ("nf-fa-person_praying" . "\xeeda")
+    ("nf-fa-person_running" . "\xef0c")
+    ("nf-fa-person_skating" . "\xef63")
+    ("nf-fa-person_skiing" . "\xef65")
+    ("nf-fa-person_skiing_nordic" . "\xef66")
+    ("nf-fa-person_snowboarding" . "\xef69")
+    ("nf-fa-person_swimming" . "\xee8b")
+    ("nf-fa-person_walking" . "\xee1d")
+    ("nf-fa-person_walking_with_cane" . "\xf29d")
+    ("nf-fa-phabricator" . "\xed15")
+    ("nf-fa-phoenix_framework" . "\xed16")
+    ("nf-fa-phoenix_squadron" . "\xeddb")
+    ("nf-fa-phone" . "\xf095")
+    ("nf-fa-phone_flip" . "\xefa9")
+    ("nf-fa-phone_slash" . "\xed17")
+    ("nf-fa-phone_square" . "\xf098")
+    ("nf-fa-phone_volume" . "\xf2a0")
+    ("nf-fa-photo" . "\xf03e")
+    ("nf-fa-photo_film" . "\xefab")
+    ("nf-fa-php" . "\xed6d")
+    ("nf-fa-picture_o" . "\xf03e")
+    ("nf-fa-pie_chart" . "\xf200")
+    ("nf-fa-pied_piper" . "\xf2ae")
+    ("nf-fa-pied_piper_alt" . "\xf1a8")
+    ("nf-fa-pied_piper_hat" . "\xedb0")
+    ("nf-fa-pied_piper_pp" . "\xf1a7")
+    ("nf-fa-piggy_bank" . "\xeda3")
+    ("nf-fa-pills" . "\xed87")
+    ("nf-fa-pinterest" . "\xf0d2")
+    ("nf-fa-pinterest_p" . "\xf231")
+    ("nf-fa-pinterest_square" . "\xf0d3")
+    ("nf-fa-pizza_slice" . "\xef8c")
+    ("nf-fa-place_of_worship" . "\xeed7")
+    ("nf-fa-plane" . "\xf072")
+    ("nf-fa-plane_arrival" . "\xee77")
+    ("nf-fa-plane_departure" . "\xee78")
+    ("nf-fa-play" . "\xf04b")
+    ("nf-fa-play_circle" . "\xf144")
+    ("nf-fa-play_circle_o" . "\xf01d")
+    ("nf-fa-playstation" . "\xed18")
+    ("nf-fa-plug" . "\xf1e6")
+    ("nf-fa-plus" . "\xf067")
+    ("nf-fa-plus_circle" . "\xf055")
+    ("nf-fa-plus_square" . "\xf0fe")
+    ("nf-fa-plus_square_o" . "\xf196")
+    ("nf-fa-podcast" . "\xf2ce")
+    ("nf-fa-poo" . "\xf2fe")
+    ("nf-fa-poo_storm" . "\xef25")
+    ("nf-fa-poop" . "\xeeaf")
+    ("nf-fa-power_off" . "\xf011")
+    ("nf-fa-prescription" . "\xee79")
+    ("nf-fa-prescription_bottle" . "\xed88")
+    ("nf-fa-prescription_bottle_medical" . "\xed89")
+    ("nf-fa-print" . "\xf02f")
+    ("nf-fa-product_hunt" . "\xf288")
+    ("nf-fa-pushed" . "\xed1a")
+    ("nf-fa-puzzle_piece" . "\xf12e")
+    ("nf-fa-python" . "\xed1b")
+    ("nf-fa-qq" . "\xf1d6")
+    ("nf-fa-qrcode" . "\xf029")
+    ("nf-fa-question" . "\xf128")
+    ("nf-fa-question_circle" . "\xf059")
+    ("nf-fa-question_circle_o" . "\xf29c")
+    ("nf-fa-quinscape" . "\xed6f")
+    ("nf-fa-quora" . "\xf2c4")
+    ("nf-fa-quote_left" . "\xf10d")
+    ("nf-fa-quote_right" . "\xf10e")
+    ("nf-fa-r_project" . "\xedc1")
+    ("nf-fa-ra" . "\xf1d0")
+    ("nf-fa-radiation" . "\xef5a")
+    ("nf-fa-radio" . "\xefbc")
+    ("nf-fa-rainbow" . "\xef26")
+    ("nf-fa-random" . "\xf074")
+    ("nf-fa-raspberry_pi" . "\xef5c")
+    ("nf-fa-ravelry" . "\xf2d9")
+    ("nf-fa-react" . "\xed46")
+    ("nf-fa-reacteurope" . "\xef27")
+    ("nf-fa-readme" . "\xeda4")
+    ("nf-fa-rebel" . "\xf1d0")
+    ("nf-fa-receipt" . "\xee0c")
+    ("nf-fa-record_vinyl" . "\xefbd")
+    ("nf-fa-rectangle_ad" . "\xeebb")
+    ("nf-fa-rectangle_list" . "\xf022")
+    ("nf-fa-rectangle_xmark" . "\xf2d4")
+    ("nf-fa-recycle" . "\xf1b8")
+    ("nf-fa-red_river" . "\xed1c")
+    ("nf-fa-reddit" . "\xf1a1")
+    ("nf-fa-reddit_alien" . "\xf281")
+    ("nf-fa-reddit_square" . "\xf1a2")
+    ("nf-fa-redhat" . "\xef5d")
+    ("nf-fa-refresh" . "\xf021")
+    ("nf-fa-registered" . "\xf25d")
+    ("nf-fa-remove" . "\xf00d")
+    ("nf-fa-remove_sign" . "\xf057")
+    ("nf-fa-renren" . "\xf18b")
+    ("nf-fa-reorder" . "\xf0c9")
+    ("nf-fa-repeat" . "\xf01e")
+    ("nf-fa-repeat_alt" . "\xf0b6")
+    ("nf-fa-reply" . "\xf112")
+    ("nf-fa-reply_all" . "\xf122")
+    ("nf-fa-replyd" . "\xed1e")
+    ("nf-fa-republican" . "\xef28")
+    ("nf-fa-researchgate" . "\xedc2")
+    ("nf-fa-resistance" . "\xf1d0")
+    ("nf-fa-resolving" . "\xed1f")
+    ("nf-fa-restroom" . "\xef5e")
+    ("nf-fa-retweet" . "\xf079")
+    ("nf-fa-rev" . "\xee7a")
+    ("nf-fa-ribbon" . "\xeda5")
+    ("nf-fa-right_from_bracket" . "\xf2f5")
+    ("nf-fa-right_left" . "\xf0b5")
+    ("nf-fa-right_to_bracket" . "\xf2f6")
+    ("nf-fa-ring" . "\xef0b")
+    ("nf-fa-rmb" . "\xf157")
+    ("nf-fa-road" . "\xf018")
+    ("nf-fa-robot" . "\xee0d")
+    ("nf-fa-rocket" . "\xf135")
+    ("nf-fa-rocketchat" . "\xed20")
+    ("nf-fa-rockrms" . "\xed21")
+    ("nf-fa-rotate" . "\xf2f1")
+    ("nf-fa-rotate_left" . "\xf2ea")
+    ("nf-fa-rotate_right" . "\xf2f9")
+    ("nf-fa-rouble" . "\xf158")
+    ("nf-fa-route" . "\xeda6")
+    ("nf-fa-rss" . "\xf09e")
+    ("nf-fa-rss_square" . "\xf143")
+    ("nf-fa-rub" . "\xf158")
+    ("nf-fa-ruble" . "\xf158")
+    ("nf-fa-ruble_sign" . "\xf158")
+    ("nf-fa-ruler" . "\xee0e")
+    ("nf-fa-ruler_combined" . "\xee0f")
+    ("nf-fa-ruler_horizontal" . "\xee10")
+    ("nf-fa-ruler_vertical" . "\xee11")
+    ("nf-fa-rupee" . "\xf156")
+    ("nf-fa-rupee_sign" . "\xf156")
+    ("nf-fa-s15" . "\xf2cd")
+    ("nf-fa-sack_dollar" . "\xef8d")
+    ("nf-fa-safari" . "\xf267")
+    ("nf-fa-salesforce" . "\xef9a")
+    ("nf-fa-sass" . "\xed49")
+    ("nf-fa-satellite" . "\xef5f")
+    ("nf-fa-satellite_dish" . "\xef60")
+    ("nf-fa-save" . "\xf0c7")
+    ("nf-fa-scale_balanced" . "\xf24e")
+    ("nf-fa-scale_unbalanced" . "\xeddf")
+    ("nf-fa-scale_unbalanced_flip" . "\xede0")
+    ("nf-fa-schlix" . "\xed22")
+    ("nf-fa-school" . "\xee12")
+    ("nf-fa-scissors" . "\xf0c4")
+    ("nf-fa-screwdriver" . "\xee13")
+    ("nf-fa-screwdriver_wrench" . "\xef70")
+    ("nf-fa-scribd" . "\xf28a")
+    ("nf-fa-scroll" . "\xef0d")
+    ("nf-fa-scroll_torah" . "\xeee5")
+    ("nf-fa-sd_card" . "\xef61")
+    ("nf-fa-search" . "\xf002")
+    ("nf-fa-search_minus" . "\xf010")
+    ("nf-fa-search_plus" . "\xf00e")
+    ("nf-fa-searchengin" . "\xed23")
+    ("nf-fa-seedling" . "\xeda7")
+    ("nf-fa-sellcast" . "\xf2da")
+    ("nf-fa-sellsy" . "\xf213")
+    ("nf-fa-send" . "\xf1d8")
+    ("nf-fa-send_o" . "\xf1d9")
+    ("nf-fa-server" . "\xf233")
+    ("nf-fa-servicestack" . "\xed24")
+    ("nf-fa-shapes" . "\xeeb0")
+    ("nf-fa-share" . "\xf064")
+    ("nf-fa-share_alt" . "\xf1e0")
+    ("nf-fa-share_alt_square" . "\xf1e1")
+    ("nf-fa-share_from_square" . "\xf14d")
+    ("nf-fa-share_nodes" . "\xf1e0")
+    ("nf-fa-share_square" . "\xf14d")
+    ("nf-fa-share_square_o" . "\xf045")
+    ("nf-fa-shekel" . "\xf20b")
+    ("nf-fa-shekel_sign" . "\xf20b")
+    ("nf-fa-sheqel" . "\xf20b")
+    ("nf-fa-shield" . "\xf132")
+    ("nf-fa-shield_halved" . "\xed25")
+    ("nf-fa-ship" . "\xf21a")
+    ("nf-fa-shirt" . "\xee1c")
+    ("nf-fa-shirtsinbulk" . "\xf214")
+    ("nf-fa-shoe_prints" . "\xee14")
+    ("nf-fa-shop" . "\xee18")
+    ("nf-fa-shopping_bag" . "\xf290")
+    ("nf-fa-shopping_basket" . "\xf291")
+    ("nf-fa-shopping_cart" . "\xf07a")
+    ("nf-fa-shopware" . "\xee7d")
+    ("nf-fa-shower" . "\xf2cc")
+    ("nf-fa-shuffle" . "\xf074")
+    ("nf-fa-shuttle_space" . "\xf197")
+    ("nf-fa-sign_hanging" . "\xeda8")
+    ("nf-fa-sign_in" . "\xf090")
+    ("nf-fa-sign_language" . "\xf2a7")
+    ("nf-fa-sign_out" . "\xf08b")
+    ("nf-fa-signal" . "\xf012")
+    ("nf-fa-signature" . "\xee7f")
+    ("nf-fa-signing" . "\xf2a7")
+    ("nf-fa-signs_post" . "\xf277")
+    ("nf-fa-sim_card" . "\xef62")
+    ("nf-fa-simplybuilt" . "\xf215")
+    ("nf-fa-sistrix" . "\xed26")
+    ("nf-fa-sitemap" . "\xf0e8")
+    ("nf-fa-sith" . "\xeddc")
+    ("nf-fa-sketch" . "\xef64")
+    ("nf-fa-skull" . "\xee15")
+    ("nf-fa-skull_crossbones" . "\xef0e")
+    ("nf-fa-skyatlas" . "\xf216")
+    ("nf-fa-skype" . "\xf17e")
+    ("nf-fa-slack" . "\xf198")
+    ("nf-fa-slash" . "\xef0f")
+    ("nf-fa-sleigh" . "\xef67")
+    ("nf-fa-sliders" . "\xf1de")
+    ("nf-fa-slideshare" . "\xf1e7")
+    ("nf-fa-smile_o" . "\xf118")
+    ("nf-fa-smog" . "\xef29")
+    ("nf-fa-smoking" . "\xed8c")
+    ("nf-fa-snapchat" . "\xf2ab")
+    ("nf-fa-snapchat_ghost" . "\xf2ac")
+    ("nf-fa-snapchat_square" . "\xf2ad")
+    ("nf-fa-snowflake" . "\xf2dc")
+    ("nf-fa-snowflake_o" . "\xf2dc")
+    ("nf-fa-snowman" . "\xef6a")
+    ("nf-fa-snowplow" . "\xef6b")
+    ("nf-fa-soccer_ball_o" . "\xf1e3")
+    ("nf-fa-socks" . "\xeedf")
+    ("nf-fa-solar_panel" . "\xee81")
+    ("nf-fa-sort" . "\xf0dc")
+    ("nf-fa-sort_alpha_asc" . "\xf15d")
+    ("nf-fa-sort_alpha_desc" . "\xf15e")
+    ("nf-fa-sort_amount_asc" . "\xf160")
+    ("nf-fa-sort_amount_desc" . "\xf161")
+    ("nf-fa-sort_asc" . "\xf0de")
+    ("nf-fa-sort_desc" . "\xf0dd")
+    ("nf-fa-sort_down" . "\xf0dd")
+    ("nf-fa-sort_numeric_asc" . "\xf162")
+    ("nf-fa-sort_numeric_desc" . "\xf163")
+    ("nf-fa-sort_up" . "\xf0de")
+    ("nf-fa-soundcloud" . "\xf1be")
+    ("nf-fa-sourcetree" . "\xef6c")
+    ("nf-fa-spa" . "\xee82")
+    ("nf-fa-space_shuttle" . "\xf197")
+    ("nf-fa-spaghetti_monster_flying" . "\xeed5")
+    ("nf-fa-speakap" . "\xed27")
+    ("nf-fa-speaker_deck" . "\xef9b")
+    ("nf-fa-spell_check" . "\xefb3")
+    ("nf-fa-spider" . "\xef10")
+    ("nf-fa-spinner" . "\xf110")
+    ("nf-fa-splotch" . "\xee83")
+    ("nf-fa-spoon" . "\xf1b1")
+    ("nf-fa-spotify" . "\xf1bc")
+    ("nf-fa-spray_can" . "\xee84")
+    ("nf-fa-spray_can_sparkles" . "\xee97")
+    ("nf-fa-square" . "\xf0c8")
+    ("nf-fa-square_arrow_up_right" . "\xf14c")
+    ("nf-fa-square_behance" . "\xf1b5")
+    ("nf-fa-square_caret_down" . "\xf150")
+    ("nf-fa-square_caret_left" . "\xf191")
+    ("nf-fa-square_caret_right" . "\xf152")
+    ("nf-fa-square_caret_up" . "\xf151")
+    ("nf-fa-square_check" . "\xf14a")
+    ("nf-fa-square_dribbble" . "\xf22e")
+    ("nf-fa-square_envelope" . "\xf199")
+    ("nf-fa-square_facebook" . "\xf082")
+    ("nf-fa-square_font_awesome_stroke" . "\xf0af")
+    ("nf-fa-square_full" . "\xed70")
+    ("nf-fa-square_git" . "\xf1d2")
+    ("nf-fa-square_github" . "\xf092")
+    ("nf-fa-square_google_plus" . "\xf0d4")
+    ("nf-fa-square_h" . "\xf0fd")
+    ("nf-fa-square_hacker_news" . "\xf2e5")
+    ("nf-fa-square_js" . "\xf2ef")
+    ("nf-fa-square_lastfm" . "\xf203")
+    ("nf-fa-square_minus" . "\xf146")
+    ("nf-fa-square_o" . "\xf096")
+    ("nf-fa-square_odnoklassniki" . "\xf264")
+    ("nf-fa-square_parking" . "\xefcd")
+    ("nf-fa-square_pen" . "\xf14b")
+    ("nf-fa-square_phone" . "\xf098")
+    ("nf-fa-square_phone_flip" . "\xefaa")
+    ("nf-fa-square_pinterest" . "\xf0d3")
+    ("nf-fa-square_plus" . "\xf0fe")
+    ("nf-fa-square_poll_horizontal" . "\xeed9")
+    ("nf-fa-square_poll_vertical" . "\xeed8")
+    ("nf-fa-square_reddit" . "\xf1a2")
+    ("nf-fa-square_root_variable" . "\xeee0")
+    ("nf-fa-square_rss" . "\xf143")
+    ("nf-fa-square_share_nodes" . "\xf1e1")
+    ("nf-fa-square_snapchat" . "\xf2ad")
+    ("nf-fa-square_steam" . "\xf1b7")
+    ("nf-fa-square_tumblr" . "\xf174")
+    ("nf-fa-square_twitter" . "\xf081")
+    ("nf-fa-square_up_right" . "\xf0b4")
+    ("nf-fa-square_viadeo" . "\xf2aa")
+    ("nf-fa-square_vimeo" . "\xf194")
+    ("nf-fa-square_whatsapp" . "\xed3b")
+    ("nf-fa-square_xing" . "\xf169")
+    ("nf-fa-square_xmark" . "\xf2d3")
+    ("nf-fa-square_youtube" . "\xf166")
+    ("nf-fa-squarespace" . "\xee85")
+    ("nf-fa-stack_exchange" . "\xf18d")
+    ("nf-fa-stack_overflow" . "\xf16c")
+    ("nf-fa-stackpath" . "\xefa1")
+    ("nf-fa-stamp" . "\xee86")
+    ("nf-fa-star" . "\xf005")
+    ("nf-fa-star_and_crescent" . "\xeee1")
+    ("nf-fa-star_half" . "\xf089")
+    ("nf-fa-star_half_empty" . "\xf123")
+    ("nf-fa-star_half_full" . "\xf123")
+    ("nf-fa-star_half_o" . "\xf123")
+    ("nf-fa-star_half_stroke" . "\xee87")
+    ("nf-fa-star_o" . "\xf006")
+    ("nf-fa-star_of_david" . "\xeee2")
+    ("nf-fa-star_of_life" . "\xeeb1")
+    ("nf-fa-staylinked" . "\xed28")
+    ("nf-fa-steam" . "\xf1b6")
+    ("nf-fa-steam_square" . "\xf1b7")
+    ("nf-fa-steam_symbol" . "\xed29")
+    ("nf-fa-step_backward" . "\xf048")
+    ("nf-fa-step_forward" . "\xf051")
+    ("nf-fa-sterling_sign" . "\xf154")
+    ("nf-fa-stethoscope" . "\xf0f1")
+    ("nf-fa-sticker_mule" . "\xed2a")
+    ("nf-fa-sticky_note" . "\xf249")
+    ("nf-fa-sticky_note_o" . "\xf24a")
+    ("nf-fa-stop" . "\xf04d")
+    ("nf-fa-stop_circle" . "\xf28d")
+    ("nf-fa-stop_circle_o" . "\xf28e")
+    ("nf-fa-stopwatch" . "\xf2f2")
+    ("nf-fa-store" . "\xee17")
+    ("nf-fa-strava" . "\xed52")
+    ("nf-fa-street_view" . "\xf21d")
+    ("nf-fa-strikethrough" . "\xf0cc")
+    ("nf-fa-stripe" . "\xed53")
+    ("nf-fa-stripe_s" . "\xed54")
+    ("nf-fa-stroopwafel" . "\xee1a")
+    ("nf-fa-studiovinari" . "\xed2b")
+    ("nf-fa-stumbleupon" . "\xf1a4")
+    ("nf-fa-stumbleupon_circle" . "\xf1a3")
+    ("nf-fa-subscript" . "\xf12c")
+    ("nf-fa-subway" . "\xf239")
+    ("nf-fa-suitcase" . "\xf0f2")
+    ("nf-fa-suitcase_medical" . "\xf0fa")
+    ("nf-fa-suitcase_rolling" . "\xee88")
+    ("nf-fa-sun" . "\xf185")
+    ("nf-fa-sun_o" . "\xf185")
+    ("nf-fa-superpowers" . "\xf2dd")
+    ("nf-fa-superscript" . "\xf12b")
+    ("nf-fa-supple" . "\xed2c")
+    ("nf-fa-support" . "\xf1cd")
+    ("nf-fa-suse" . "\xef6d")
+    ("nf-fa-swatchbook" . "\xee8a")
+    ("nf-fa-swift" . "\xefbe")
+    ("nf-fa-symfony" . "\xef9c")
+    ("nf-fa-synagogue" . "\xeee3")
+    ("nf-fa-syringe" . "\xed8d")
+    ("nf-fa-table" . "\xf0ce")
+    ("nf-fa-table_cells" . "\xf00a")
+    ("nf-fa-table_cells_large" . "\xf009")
+    ("nf-fa-table_columns" . "\xf0db")
+    ("nf-fa-table_list" . "\xf00b")
+    ("nf-fa-table_tennis_paddle_ball" . "\xed71")
+    ("nf-fa-tablet" . "\xed2e")
+    ("nf-fa-tablet_button" . "\xed2d")
+    ("nf-fa-tablet_screen_button" . "\xf10a")
+    ("nf-fa-tablets" . "\xed8e")
+    ("nf-fa-tachograph_digital" . "\xee2f")
+    ("nf-fa-tachometer" . "\xf0e4")
+    ("nf-fa-tag" . "\xf02b")
+    ("nf-fa-tags" . "\xf02c")
+    ("nf-fa-tape" . "\xedaa")
+    ("nf-fa-tasks" . "\xf0ae")
+    ("nf-fa-taxi" . "\xf1ba")
+    ("nf-fa-teamspeak" . "\xedc3")
+    ("nf-fa-teeth" . "\xeeb4")
+    ("nf-fa-teeth_open" . "\xeeb5")
+    ("nf-fa-telegram" . "\xf2c6")
+    ("nf-fa-television" . "\xf26c")
+    ("nf-fa-temperature_empty" . "\xf2cb")
+    ("nf-fa-temperature_full" . "\xf2c7")
+    ("nf-fa-temperature_half" . "\xf2c9")
+    ("nf-fa-temperature_high" . "\xef2a")
+    ("nf-fa-temperature_low" . "\xef2b")
+    ("nf-fa-temperature_quarter" . "\xf2ca")
+    ("nf-fa-temperature_three_quarters" . "\xf2c8")
+    ("nf-fa-tencent_weibo" . "\xf1d5")
+    ("nf-fa-tenge_sign" . "\xef6e")
+    ("nf-fa-terminal" . "\xf120")
+    ("nf-fa-text_height" . "\xf034")
+    ("nf-fa-text_slash" . "\xefac")
+    ("nf-fa-text_width" . "\xf035")
+    ("nf-fa-th" . "\xf00a")
+    ("nf-fa-th_large" . "\xf009")
+    ("nf-fa-th_list" . "\xf00b")
+    ("nf-fa-the_red_yeti" . "\xeee4")
+    ("nf-fa-themeco" . "\xee8d")
+    ("nf-fa-themeisle" . "\xf2b2")
+    ("nf-fa-thermometer" . "\xf2c7")
+    ("nf-fa-thermometer_0" . "\xf2cb")
+    ("nf-fa-thermometer_1" . "\xf2ca")
+    ("nf-fa-thermometer_2" . "\xf2c9")
+    ("nf-fa-thermometer_3" . "\xf2c8")
+    ("nf-fa-thermometer_4" . "\xf2c7")
+    ("nf-fa-thermometer_alt" . "\xed8f")
+    ("nf-fa-thermometer_empty" . "\xf2cb")
+    ("nf-fa-thermometer_full" . "\xf2c7")
+    ("nf-fa-thermometer_half" . "\xf2c9")
+    ("nf-fa-thermometer_quarter" . "\xf2ca")
+    ("nf-fa-thermometer_three_quarters" . "\xf2c8")
+    ("nf-fa-think_peaks" . "\xef19")
+    ("nf-fa-thumb_tack" . "\xf08d")
+    ("nf-fa-thumbs_down" . "\xf165")
+    ("nf-fa-thumbs_o_down" . "\xf088")
+    ("nf-fa-thumbs_o_up" . "\xf087")
+    ("nf-fa-thumbs_up" . "\xf164")
+    ("nf-fa-thumbtack" . "\xf08d")
+    ("nf-fa-ticket" . "\xf145")
+    ("nf-fa-ticket_simple" . "\xed30")
+    ("nf-fa-times" . "\xf00d")
+    ("nf-fa-times_circle" . "\xf057")
+    ("nf-fa-times_circle_o" . "\xf05c")
+    ("nf-fa-times_rectangle" . "\xf2d3")
+    ("nf-fa-times_rectangle_o" . "\xf2d4")
+    ("nf-fa-tint" . "\xf043")
+    ("nf-fa-toggle_down" . "\xf150")
+    ("nf-fa-toggle_left" . "\xf191")
+    ("nf-fa-toggle_off" . "\xf204")
+    ("nf-fa-toggle_on" . "\xf205")
+    ("nf-fa-toggle_right" . "\xf152")
+    ("nf-fa-toggle_up" . "\xf151")
+    ("nf-fa-toilet" . "\xef6f")
+    ("nf-fa-toilet_paper" . "\xef11")
+    ("nf-fa-toolbox" . "\xee1b")
+    ("nf-fa-tooth" . "\xee90")
+    ("nf-fa-torii_gate" . "\xeee6")
+    ("nf-fa-tornado" . "\xef2d")
+    ("nf-fa-tower_broadcast" . "\xede3")
+    ("nf-fa-tractor" . "\xef12")
+    ("nf-fa-trade_federation" . "\xeddd")
+    ("nf-fa-trademark" . "\xf25c")
+    ("nf-fa-traffic_light" . "\xeeb7")
+    ("nf-fa-train" . "\xf238")
+    ("nf-fa-train_subway" . "\xf239")
+    ("nf-fa-transgender" . "\xf224")
+    ("nf-fa-transgender_alt" . "\xf225")
+    ("nf-fa-trash" . "\xf1f8")
+    ("nf-fa-trash_arrow_up" . "\xef90")
+    ("nf-fa-trash_can" . "\xf014")
+    ("nf-fa-trash_can_arrow_up" . "\xef91")
+    ("nf-fa-trash_o" . "\xf014")
+    ("nf-fa-tree" . "\xf1bb")
+    ("nf-fa-trello" . "\xf181")
+    ("nf-fa-triangle_exclamation" . "\xf071")
+    ("nf-fa-tripadvisor" . "\xf262")
+    ("nf-fa-trophy" . "\xf091")
+    ("nf-fa-truck" . "\xf0d1")
+    ("nf-fa-truck_fast" . "\xed8b")
+    ("nf-fa-truck_medical" . "\xf0f9")
+    ("nf-fa-truck_monster" . "\xeeb8")
+    ("nf-fa-truck_moving" . "\xedac")
+    ("nf-fa-truck_pickup" . "\xeeb9")
+    ("nf-fa-truck_ramp_box" . "\xedab")
+    ("nf-fa-try" . "\xf195")
+    ("nf-fa-tty" . "\xf1e4")
+    ("nf-fa-tumblr" . "\xf173")
+    ("nf-fa-tumblr_square" . "\xf174")
+    ("nf-fa-turkish_lira" . "\xf195")
+    ("nf-fa-turn_down" . "\xf2f8")
+    ("nf-fa-turn_up" . "\xf2fa")
+    ("nf-fa-tv" . "\xf26c")
+    ("nf-fa-twitch" . "\xf1e8")
+    ("nf-fa-twitter" . "\xf099")
+    ("nf-fa-twitter_square" . "\xf081")
+    ("nf-fa-typo3" . "\xed55")
+    ("nf-fa-uber" . "\xed31")
+    ("nf-fa-ubuntu" . "\xef72")
+    ("nf-fa-uikit" . "\xed32")
+    ("nf-fa-umbraco" . "\xefbf")
+    ("nf-fa-umbrella" . "\xf0e9")
+    ("nf-fa-umbrella_beach" . "\xee91")
+    ("nf-fa-underline" . "\xf0cd")
+    ("nf-fa-undo" . "\xf0e2")
+    ("nf-fa-uniregistry" . "\xed33")
+    ("nf-fa-universal_access" . "\xf29a")
+    ("nf-fa-university" . "\xf19c")
+    ("nf-fa-unlink" . "\xf127")
+    ("nf-fa-unlock" . "\xf09c")
+    ("nf-fa-unlock_alt" . "\xf13e")
+    ("nf-fa-unlock_keyhole" . "\xf13e")
+    ("nf-fa-unsorted" . "\xf0dc")
+    ("nf-fa-untappd" . "\xed34")
+    ("nf-fa-up_down" . "\xf09f")
+    ("nf-fa-up_down_left_right" . "\xf0b2")
+    ("nf-fa-up_right_and_down_left_from_center" . "\xed4f")
+    ("nf-fa-up_right_from_square" . "\xf0b3")
+    ("nf-fa-upload" . "\xf093")
+    ("nf-fa-ups" . "\xef73")
+    ("nf-fa-usb" . "\xf287")
+    ("nf-fa-usd" . "\xf155")
+    ("nf-fa-user" . "\xf007")
+    ("nf-fa-user_astronaut" . "\xedc5")
+    ("nf-fa-user_check" . "\xedc6")
+    ("nf-fa-user_circle" . "\xf2bd")
+    ("nf-fa-user_circle_o" . "\xf2be")
+    ("nf-fa-user_clock" . "\xedc7")
+    ("nf-fa-user_doctor" . "\xf0f0")
+    ("nf-fa-user_gear" . "\xedc8")
+    ("nf-fa-user_graduate" . "\xedcb")
+    ("nf-fa-user_group" . "\xedca")
+    ("nf-fa-user_injured" . "\xef13")
+    ("nf-fa-user_large" . "\xed35")
+    ("nf-fa-user_large_slash" . "\xedc4")
+    ("nf-fa-user_lock" . "\xedcc")
+    ("nf-fa-user_md" . "\xf0f0")
+    ("nf-fa-user_minus" . "\xedcd")
+    ("nf-fa-user_ninja" . "\xedce")
+    ("nf-fa-user_nurse" . "\xef92")
+    ("nf-fa-user_o" . "\xf2c0")
+    ("nf-fa-user_pen" . "\xedc9")
+    ("nf-fa-user_plus" . "\xf234")
+    ("nf-fa-user_secret" . "\xf21b")
+    ("nf-fa-user_shield" . "\xedcf")
+    ("nf-fa-user_slash" . "\xedd0")
+    ("nf-fa-user_tag" . "\xedd1")
+    ("nf-fa-user_tie" . "\xedd2")
+    ("nf-fa-user_times" . "\xf235")
+    ("nf-fa-user_xmark" . "\xf235")
+    ("nf-fa-users" . "\xf0c0")
+    ("nf-fa-users_gear" . "\xedd3")
+    ("nf-fa-usps" . "\xef74")
+    ("nf-fa-ussunnah" . "\xed36")
+    ("nf-fa-utensils" . "\xf0f5")
+    ("nf-fa-vaadin" . "\xed37")
+    ("nf-fa-van_shuttle" . "\xee7e")
+    ("nf-fa-vcard" . "\xf2bb")
+    ("nf-fa-vcard_o" . "\xf2bc")
+    ("nf-fa-vector_square" . "\xee92")
+    ("nf-fa-venus" . "\xf221")
+    ("nf-fa-venus_double" . "\xf226")
+    ("nf-fa-venus_mars" . "\xf228")
+    ("nf-fa-viacoin" . "\xf237")
+    ("nf-fa-viadeo" . "\xf2a9")
+    ("nf-fa-viadeo_square" . "\xf2aa")
+    ("nf-fa-vial" . "\xed90")
+    ("nf-fa-vials" . "\xed91")
+    ("nf-fa-viber" . "\xed38")
+    ("nf-fa-video" . "\xf03d")
+    ("nf-fa-video_camera" . "\xf03d")
+    ("nf-fa-video_slash" . "\xedad")
+    ("nf-fa-vihara" . "\xeee7")
+    ("nf-fa-vimeo" . "\xed39")
+    ("nf-fa-vimeo_square" . "\xf194")
+    ("nf-fa-vimeo_v" . "\xf27d")
+    ("nf-fa-vine" . "\xf1ca")
+    ("nf-fa-vk" . "\xf189")
+    ("nf-fa-vnv" . "\xed3a")
+    ("nf-fa-voicemail" . "\xefb4")
+    ("nf-fa-volcano" . "\xef2e")
+    ("nf-fa-volleyball" . "\xed72")
+    ("nf-fa-volume" . "\xefcf")
+    ("nf-fa-volume_control_phone" . "\xf2a0")
+    ("nf-fa-volume_down" . "\xf027")
+    ("nf-fa-volume_high" . "\xf028")
+    ("nf-fa-volume_low" . "\xf027")
+    ("nf-fa-volume_off" . "\xf026")
+    ("nf-fa-volume_up" . "\xf028")
+    ("nf-fa-volume_xmark" . "\xeee8")
+    ("nf-fa-vr_cardboard" . "\xef14")
+    ("nf-fa-vuejs" . "\xed4a")
+    ("nf-fa-walkie_talkie" . "\xefc0")
+    ("nf-fa-wallet" . "\xee1e")
+    ("nf-fa-wand_magic" . "\xf0d0")
+    ("nf-fa-wand_sparkles" . "\xef15")
+    ("nf-fa-warehouse" . "\xed92")
+    ("nf-fa-warning" . "\xf071")
+    ("nf-fa-water" . "\xef30")
+    ("nf-fa-water_ladder" . "\xee8c")
+    ("nf-fa-wave_square" . "\xef9d")
+    ("nf-fa-waze" . "\xef9e")
+    ("nf-fa-wechat" . "\xf1d7")
+    ("nf-fa-weebly" . "\xee93")
+    ("nf-fa-weibo" . "\xf18a")
+    ("nf-fa-weight_hanging" . "\xee94")
+    ("nf-fa-weight_scale" . "\xed93")
+    ("nf-fa-weixin" . "\xf1d7")
+    ("nf-fa-whatsapp" . "\xf232")
+    ("nf-fa-wheelchair" . "\xf193")
+    ("nf-fa-wheelchair_alt" . "\xf29b")
+    ("nf-fa-whiskey_glass" . "\xef4a")
+    ("nf-fa-whmcs" . "\xed3c")
+    ("nf-fa-wifi" . "\xf1eb")
+    ("nf-fa-wikipedia_w" . "\xf266")
+    ("nf-fa-wind" . "\xef16")
+    ("nf-fa-window_close" . "\xf2d3")
+    ("nf-fa-window_close_o" . "\xf2d4")
+    ("nf-fa-window_maximize" . "\xf2d0")
+    ("nf-fa-window_minimize" . "\xf2d1")
+    ("nf-fa-window_restore" . "\xf2d2")
+    ("nf-fa-windows" . "\xf17a")
+    ("nf-fa-wine_bottle" . "\xef17")
+    ("nf-fa-wine_glass" . "\xedae")
+    ("nf-fa-wine_glass_empty" . "\xee95")
+    ("nf-fa-wix" . "\xee96")
+    ("nf-fa-wizards_of_the_coast" . "\xef18")
+    ("nf-fa-wolf_pack_battalion" . "\xedde")
+    ("nf-fa-won" . "\xf159")
+    ("nf-fa-won_sign" . "\xf159")
+    ("nf-fa-wordpress" . "\xf19a")
+    ("nf-fa-wordpress_simple" . "\xed3d")
+    ("nf-fa-wpbeginner" . "\xf297")
+    ("nf-fa-wpexplorer" . "\xf2de")
+    ("nf-fa-wpforms" . "\xf298")
+    ("nf-fa-wpressr" . "\xed1d")
+    ("nf-fa-wrench" . "\xf0ad")
+    ("nf-fa-x_ray" . "\xed94")
+    ("nf-fa-xbox" . "\xed3e")
+    ("nf-fa-xing" . "\xf168")
+    ("nf-fa-xing_square" . "\xf169")
+    ("nf-fa-xmark" . "\xf00d")
+    ("nf-fa-y_combinator" . "\xf23b")
+    ("nf-fa-y_combinator_square" . "\xf1d4")
+    ("nf-fa-yahoo" . "\xf19e")
+    ("nf-fa-yammer" . "\xef9f")
+    ("nf-fa-yandex" . "\xed3f")
+    ("nf-fa-yandex_international" . "\xed40")
+    ("nf-fa-yarn" . "\xef75")
+    ("nf-fa-yc" . "\xf23b")
+    ("nf-fa-yc_square" . "\xf1d4")
+    ("nf-fa-yelp" . "\xf1e9")
+    ("nf-fa-yen" . "\xf157")
+    ("nf-fa-yen_sign" . "\xf157")
+    ("nf-fa-yin_yang" . "\xeee9")
+    ("nf-fa-yoast" . "\xf2b1")
+    ("nf-fa-youtube" . "\xf16a")
+    ("nf-fa-youtube_play" . "\xf16a")
+    ("nf-fa-youtube_square" . "\xf166")
+    ("nf-fa-zhihu" . "\xeeba")
+    ("nf-fae-apple_fruit" . "\xe29e")
+    ("nf-fae-atom" . "\xe27f")
+    ("nf-fae-bacteria" . "\xe280")
+    ("nf-fae-banana" . "\xe281")
+    ("nf-fae-bath" . "\xe282")
+    ("nf-fae-bed" . "\xe283")
+    ("nf-fae-benzene" . "\xe284")
+    ("nf-fae-bigger" . "\xe285")
+    ("nf-fae-biohazard" . "\xe286")
+    ("nf-fae-blogger_circle" . "\xe287")
+    ("nf-fae-blogger_square" . "\xe288")
+    ("nf-fae-bones" . "\xe289")
+    ("nf-fae-book_open" . "\xe28a")
+    ("nf-fae-book_open_o" . "\xe28b")
+    ("nf-fae-brain" . "\xe28c")
+    ("nf-fae-bread" . "\xe28d")
+    ("nf-fae-butterfly" . "\xe28e")
+    ("nf-fae-carot" . "\xe28f")
+    ("nf-fae-cc_by" . "\xe290")
+    ("nf-fae-cc_cc" . "\xe291")
+    ("nf-fae-cc_nc" . "\xe292")
+    ("nf-fae-cc_nc_eu" . "\xe293")
+    ("nf-fae-cc_nc_jp" . "\xe294")
+    ("nf-fae-cc_nd" . "\xe295")
+    ("nf-fae-cc_remix" . "\xe296")
+    ("nf-fae-cc_sa" . "\xe297")
+    ("nf-fae-cc_share" . "\xe298")
+    ("nf-fae-cc_zero" . "\xe299")
+    ("nf-fae-checklist_o" . "\xe29a")
+    ("nf-fae-cheese" . "\xe264")
+    ("nf-fae-cherry" . "\xe29b")
+    ("nf-fae-chess_bishop" . "\xe29c")
+    ("nf-fae-chess_horse" . "\xe25f")
+    ("nf-fae-chess_king" . "\xe260")
+    ("nf-fae-chess_pawn" . "\xe261")
+    ("nf-fae-chess_queen" . "\xe262")
+    ("nf-fae-chess_tower" . "\xe263")
+    ("nf-fae-chicken_thigh" . "\xe29f")
+    ("nf-fae-chilli" . "\xe265")
+    ("nf-fae-chip" . "\xe266")
+    ("nf-fae-cicling" . "\xe267")
+    ("nf-fae-cloud" . "\xe268")
+    ("nf-fae-cockroach" . "\xe269")
+    ("nf-fae-coffe_beans" . "\xe26a")
+    ("nf-fae-coins" . "\xe26b")
+    ("nf-fae-comb" . "\xe26c")
+    ("nf-fae-comet" . "\xe26d")
+    ("nf-fae-crown" . "\xe26e")
+    ("nf-fae-cup_coffe" . "\xe26f")
+    ("nf-fae-dice" . "\xe270")
+    ("nf-fae-disco" . "\xe271")
+    ("nf-fae-dna" . "\xe272")
+    ("nf-fae-donut" . "\xe273")
+    ("nf-fae-dress" . "\xe274")
+    ("nf-fae-drop" . "\xe275")
+    ("nf-fae-ello" . "\xe276")
+    ("nf-fae-envelope_open" . "\xe277")
+    ("nf-fae-envelope_open_o" . "\xe278")
+    ("nf-fae-equal" . "\xe279")
+    ("nf-fae-equal_bigger" . "\xe27a")
+    ("nf-fae-feedly" . "\xe27b")
+    ("nf-fae-file_export" . "\xe27c")
+    ("nf-fae-file_import" . "\xe27d")
+    ("nf-fae-fingerprint" . "\xe23f")
+    ("nf-fae-floppy" . "\xe240")
+    ("nf-fae-footprint" . "\xe241")
+    ("nf-fae-freecodecamp" . "\xe242")
+    ("nf-fae-galaxy" . "\xe243")
+    ("nf-fae-galery" . "\xe244")
+    ("nf-fae-gift_card" . "\xe2a0")
+    ("nf-fae-glass" . "\xe245")
+    ("nf-fae-google_drive" . "\xe246")
+    ("nf-fae-google_play" . "\xe247")
+    ("nf-fae-gps" . "\xe248")
+    ("nf-fae-grav" . "\xe249")
+    ("nf-fae-guitar" . "\xe24a")
+    ("nf-fae-gut" . "\xe24b")
+    ("nf-fae-halter" . "\xe24c")
+    ("nf-fae-hamburger" . "\xe24d")
+    ("nf-fae-hat" . "\xe24e")
+    ("nf-fae-hexagon" . "\xe24f")
+    ("nf-fae-high_heel" . "\xe250")
+    ("nf-fae-hotdog" . "\xe251")
+    ("nf-fae-ice_cream" . "\xe252")
+    ("nf-fae-id_card" . "\xe253")
+    ("nf-fae-imdb" . "\xe254")
+    ("nf-fae-infinity" . "\xe255")
+    ("nf-fae-injection" . "\xe2a1")
+    ("nf-fae-isle" . "\xe2a2")
+    ("nf-fae-java" . "\xe256")
+    ("nf-fae-layers" . "\xe257")
+    ("nf-fae-lips" . "\xe258")
+    ("nf-fae-lipstick" . "\xe259")
+    ("nf-fae-liver" . "\xe25a")
+    ("nf-fae-lollipop" . "\xe2a3")
+    ("nf-fae-loyalty_card" . "\xe2a4")
+    ("nf-fae-lung" . "\xe25b")
+    ("nf-fae-makeup_brushes" . "\xe25c")
+    ("nf-fae-maximize" . "\xe25d")
+    ("nf-fae-meat" . "\xe2a5")
+    ("nf-fae-medicine" . "\xe221")
+    ("nf-fae-microscope" . "\xe222")
+    ("nf-fae-milk_bottle" . "\xe223")
+    ("nf-fae-minimize" . "\xe224")
+    ("nf-fae-molecule" . "\xe225")
+    ("nf-fae-moon_cloud" . "\xe226")
+    ("nf-fae-mountains" . "\xe2a6")
+    ("nf-fae-mushroom" . "\xe227")
+    ("nf-fae-mustache" . "\xe228")
+    ("nf-fae-mysql" . "\xe229")
+    ("nf-fae-nintendo" . "\xe22a")
+    ("nf-fae-orange" . "\xe2a7")
+    ("nf-fae-palette_color" . "\xe22b")
+    ("nf-fae-peach" . "\xe2a8")
+    ("nf-fae-pear" . "\xe2a9")
+    ("nf-fae-pi" . "\xe22c")
+    ("nf-fae-pizza" . "\xe22d")
+    ("nf-fae-planet" . "\xe22e")
+    ("nf-fae-plant" . "\xe22f")
+    ("nf-fae-playstation" . "\xe230")
+    ("nf-fae-poison" . "\xe231")
+    ("nf-fae-popcorn" . "\xe232")
+    ("nf-fae-popsicle" . "\xe233")
+    ("nf-fae-pulse" . "\xe234")
+    ("nf-fae-python" . "\xe235")
+    ("nf-fae-quora_circle" . "\xe236")
+    ("nf-fae-quora_square" . "\xe237")
+    ("nf-fae-radioactive" . "\xe238")
+    ("nf-fae-raining" . "\xe239")
+    ("nf-fae-real_heart" . "\xe23a")
+    ("nf-fae-refrigerator" . "\xe23b")
+    ("nf-fae-restore" . "\xe23c")
+    ("nf-fae-ring" . "\xe23d")
+    ("nf-fae-ruby" . "\xe23e")
+    ("nf-fae-ruby_o" . "\xe21e")
+    ("nf-fae-ruler" . "\xe21f")
+    ("nf-fae-shirt" . "\xe218")
+    ("nf-fae-slash" . "\xe216")
+    ("nf-fae-smaller" . "\xe200")
+    ("nf-fae-snowing" . "\xe201")
+    ("nf-fae-soda" . "\xe202")
+    ("nf-fae-sofa" . "\xe203")
+    ("nf-fae-soup" . "\xe204")
+    ("nf-fae-spermatozoon" . "\xe205")
+    ("nf-fae-spin_double" . "\xe206")
+    ("nf-fae-stomach" . "\xe207")
+    ("nf-fae-storm" . "\xe208")
+    ("nf-fae-sun_cloud" . "\xe21d")
+    ("nf-fae-sushi" . "\xe21a")
+    ("nf-fae-tacos" . "\xe219")
+    ("nf-fae-telegram" . "\xe217")
+    ("nf-fae-telegram_circle" . "\xe215")
+    ("nf-fae-telescope" . "\xe209")
+    ("nf-fae-thermometer" . "\xe20a")
+    ("nf-fae-thermometer_high" . "\xe20b")
+    ("nf-fae-thermometer_low" . "\xe20c")
+    ("nf-fae-thin_close" . "\xe20d")
+    ("nf-fae-toilet" . "\xe20e")
+    ("nf-fae-tools" . "\xe20f")
+    ("nf-fae-tooth" . "\xe210")
+    ("nf-fae-tree" . "\xe21c")
+    ("nf-fae-triangle_ruler" . "\xe21b")
+    ("nf-fae-umbrella" . "\xe220")
+    ("nf-fae-uterus" . "\xe211")
+    ("nf-fae-virus" . "\xe214")
+    ("nf-fae-w3c" . "\xe212")
+    ("nf-fae-walking" . "\xe213")
+    ("nf-fae-wallet" . "\xe25e")
+    ("nf-fae-wind" . "\xe27e")
+    ("nf-fae-xbox" . "\xe29d")
+    ))
+
+(provide 'nerd-icons-data-faicon)
+;;; nerd-icons-data-faicon.el ends here
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-faicon.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-faicon.elc
new file mode 100644
index 0000000..400d18c
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-faicon.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-flicon.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-flicon.el
new file mode 100644
index 0000000..7f47891
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-flicon.el
@@ -0,0 +1,167 @@
+;;; nerd-icons-data-flicon.el --- glyphset flicon -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; flicon
+;; from Nerd Font Version: 3.5.1
+
+;;; Code:
+
+(defvar nerd-icons/flicon-alist
+  '(
+    ("nf-linux-almalinux" . "\xf31d")
+    ("nf-linux-alpine" . "\xf300")
+    ("nf-linux-aosc" . "\xf301")
+    ("nf-linux-apple" . "\xf302")
+    ("nf-linux-archcraft" . "\xf345")
+    ("nf-linux-archlabs" . "\xf31e")
+    ("nf-linux-archlinux" . "\xf303")
+    ("nf-linux-arcolinux" . "\xf346")
+    ("nf-linux-arduino" . "\xf34b")
+    ("nf-linux-artix" . "\xf31f")
+    ("nf-linux-awesome" . "\xf354")
+    ("nf-linux-biglinux" . "\xf347")
+    ("nf-linux-bspwm" . "\xf355")
+    ("nf-linux-budgie" . "\xf320")
+    ("nf-linux-cachyos" . "\xf385")
+    ("nf-linux-centos" . "\xf304")
+    ("nf-linux-cinnamon" . "\xf35f")
+    ("nf-linux-codeberg" . "\xf330")
+    ("nf-linux-coreos" . "\xf305")
+    ("nf-linux-crystal" . "\xf348")
+    ("nf-linux-debian" . "\xf306")
+    ("nf-linux-deepin" . "\xf321")
+    ("nf-linux-devuan" . "\xf307")
+    ("nf-linux-docker" . "\xf308")
+    ("nf-linux-dwm" . "\xf356")
+    ("nf-linux-elementary" . "\xf309")
+    ("nf-linux-endeavour" . "\xf322")
+    ("nf-linux-enlightenment" . "\xf357")
+    ("nf-linux-fdroid" . "\xf36a")
+    ("nf-linux-fedora" . "\xf30a")
+    ("nf-linux-fedora_inverse" . "\xf30b")
+    ("nf-linux-ferris" . "\xf323")
+    ("nf-linux-ffmpeg" . "\xf384")
+    ("nf-linux-flathub" . "\xf324")
+    ("nf-linux-fluxbox" . "\xf358")
+    ("nf-linux-forgejo" . "\xf335")
+    ("nf-linux-fosdem" . "\xf36b")
+    ("nf-linux-freebsd" . "\xf30c")
+    ("nf-linux-freecad" . "\xf336")
+    ("nf-linux-freedesktop" . "\xf360")
+    ("nf-linux-garuda" . "\xf337")
+    ("nf-linux-gentoo" . "\xf30d")
+    ("nf-linux-gimp" . "\xf338")
+    ("nf-linux-gitea" . "\xf339")
+    ("nf-linux-gnome" . "\xf361")
+    ("nf-linux-gnu_guix" . "\xf325")
+    ("nf-linux-gtk" . "\xf362")
+    ("nf-linux-hyperbola" . "\xf33a")
+    ("nf-linux-hyprland" . "\xf359")
+    ("nf-linux-i3" . "\xf35a")
+    ("nf-linux-illumos" . "\xf326")
+    ("nf-linux-inkscape" . "\xf33b")
+    ("nf-linux-jwm" . "\xf35b")
+    ("nf-linux-kali_linux" . "\xf327")
+    ("nf-linux-kde" . "\xf373")
+    ("nf-linux-kde_neon" . "\xf331")
+    ("nf-linux-kde_plasma" . "\xf332")
+    ("nf-linux-kdenlive" . "\xf33c")
+    ("nf-linux-kicad" . "\xf34c")
+    ("nf-linux-krita" . "\xf33d")
+    ("nf-linux-kubuntu" . "\xf333")
+    ("nf-linux-kubuntu_inverse" . "\xf334")
+    ("nf-linux-leap" . "\xf37e")
+    ("nf-linux-libreoffice" . "\xf376")
+    ("nf-linux-libreofficebase" . "\xf377")
+    ("nf-linux-libreofficecalc" . "\xf378")
+    ("nf-linux-libreofficedraw" . "\xf379")
+    ("nf-linux-libreofficeimpress" . "\xf37a")
+    ("nf-linux-libreofficemath" . "\xf37b")
+    ("nf-linux-libreofficewriter" . "\xf37c")
+    ("nf-linux-linuxmint" . "\xf30e")
+    ("nf-linux-linuxmint_inverse" . "\xf30f")
+    ("nf-linux-locos" . "\xf349")
+    ("nf-linux-lxde" . "\xf363")
+    ("nf-linux-lxle" . "\xf33e")
+    ("nf-linux-lxqt" . "\xf364")
+    ("nf-linux-mageia" . "\xf310")
+    ("nf-linux-mandriva" . "\xf311")
+    ("nf-linux-manjaro" . "\xf312")
+    ("nf-linux-mate" . "\xf365")
+    ("nf-linux-mpv" . "\xf36e")
+    ("nf-linux-mxlinux" . "\xf33f")
+    ("nf-linux-neovim" . "\xf36f")
+    ("nf-linux-nixos" . "\xf313")
+    ("nf-linux-nobara" . "\xf380")
+    ("nf-linux-octoprint" . "\xf34d")
+    ("nf-linux-openbsd" . "\xf328")
+    ("nf-linux-openscad" . "\xf34e")
+    ("nf-linux-opensuse" . "\xf314")
+    ("nf-linux-openwrt" . "\xf382")
+    ("nf-linux-osh" . "\xf34f")
+    ("nf-linux-oshwa" . "\xf350")
+    ("nf-linux-osi" . "\xf36c")
+    ("nf-linux-parabola" . "\xf340")
+    ("nf-linux-parrot" . "\xf329")
+    ("nf-linux-pop_os" . "\xf32a")
+    ("nf-linux-postmarketos" . "\xf374")
+    ("nf-linux-prusaslicer" . "\xf351")
+    ("nf-linux-puppy" . "\xf341")
+    ("nf-linux-qt" . "\xf375")
+    ("nf-linux-qtile" . "\xf35c")
+    ("nf-linux-qubesos" . "\xf342")
+    ("nf-linux-raspberry_pi" . "\xf315")
+    ("nf-linux-redhat" . "\xf316")
+    ("nf-linux-reprap" . "\xf352")
+    ("nf-linux-riscv" . "\xf353")
+    ("nf-linux-river" . "\xf381")
+    ("nf-linux-rocky_linux" . "\xf32b")
+    ("nf-linux-sabayon" . "\xf317")
+    ("nf-linux-slackware" . "\xf318")
+    ("nf-linux-slackware_inverse" . "\xf319")
+    ("nf-linux-snappy" . "\xf32c")
+    ("nf-linux-solus" . "\xf32d")
+    ("nf-linux-sway" . "\xf35d")
+    ("nf-linux-tails" . "\xf343")
+    ("nf-linux-thunderbird" . "\xf370")
+    ("nf-linux-tor" . "\xf371")
+    ("nf-linux-trisquel" . "\xf344")
+    ("nf-linux-tumbleweed" . "\xf37d")
+    ("nf-linux-tux" . "\xf31a")
+    ("nf-linux-typst" . "\xf37f")
+    ("nf-linux-ubuntu" . "\xf31b")
+    ("nf-linux-ubuntu_inverse" . "\xf31c")
+    ("nf-linux-vanilla" . "\xf366")
+    ("nf-linux-void" . "\xf32e")
+    ("nf-linux-vscodium" . "\xf372")
+    ("nf-linux-wayland" . "\xf367")
+    ("nf-linux-wikimedia" . "\xf36d")
+    ("nf-linux-wireguard" . "\xf383")
+    ("nf-linux-xerolinux" . "\xf34a")
+    ("nf-linux-xfce" . "\xf368")
+    ("nf-linux-xmonad" . "\xf35e")
+    ("nf-linux-xorg" . "\xf369")
+    ("nf-linux-zorin" . "\xf32f")
+    ))
+
+(provide 'nerd-icons-data-flicon)
+;;; nerd-icons-data-flicon.el ends here
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-flicon.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-flicon.elc
new file mode 100644
index 0000000..f0312b3
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-flicon.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-ipsicon.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-ipsicon.el
new file mode 100644
index 0000000..a10f50b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-ipsicon.el
@@ -0,0 +1,38 @@
+;;; nerd-icons-data-ipsicon.el --- glyphset ipsicon -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; ipsicon
+;; from Nerd Font Version: 3.5.1
+
+;;; Code:
+
+(defvar nerd-icons/ipsicon-alist
+  '(
+    ("nf-iec-power" . "\x23fb")
+    ("nf-iec-power_off" . "\x2b58")
+    ("nf-iec-power_on" . "\x23fd")
+    ("nf-iec-sleep_mode" . "\x23fe")
+    ("nf-iec-toggle_power" . "\x23fc")
+    ))
+
+(provide 'nerd-icons-data-ipsicon)
+;;; nerd-icons-data-ipsicon.el ends here
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-ipsicon.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-ipsicon.elc
new file mode 100644
index 0000000..a82fcdd
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-ipsicon.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-mdicon.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-mdicon.el
new file mode 100644
index 0000000..2cbf3a1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-mdicon.el
@@ -0,0 +1,6929 @@
+;;; nerd-icons-data-mdicon.el --- glyphset mdicon -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; mdicon
+;; from Nerd Font Version: 3.5.1
+
+;;; Code:
+
+(defvar nerd-icons/mdicon-alist
+  '(
+    ("nf-md-ab_testing" . "\xf01c9")
+    ("nf-md-abacus" . "\xf16e0")
+    ("nf-md-abjad_arabic" . "\xf1328")
+    ("nf-md-abjad_hebrew" . "\xf1329")
+    ("nf-md-abugida_devanagari" . "\xf132a")
+    ("nf-md-abugida_thai" . "\xf132b")
+    ("nf-md-access_point" . "\xf0003")
+    ("nf-md-access_point_check" . "\xf1538")
+    ("nf-md-access_point_minus" . "\xf1539")
+    ("nf-md-access_point_network" . "\xf0002")
+    ("nf-md-access_point_network_off" . "\xf0be1")
+    ("nf-md-access_point_off" . "\xf1511")
+    ("nf-md-access_point_plus" . "\xf153a")
+    ("nf-md-access_point_remove" . "\xf153b")
+    ("nf-md-account" . "\xf0004")
+    ("nf-md-account_alert" . "\xf0005")
+    ("nf-md-account_alert_outline" . "\xf0b50")
+    ("nf-md-account_arrow_down" . "\xf1868")
+    ("nf-md-account_arrow_down_outline" . "\xf1869")
+    ("nf-md-account_arrow_left" . "\xf0b51")
+    ("nf-md-account_arrow_left_outline" . "\xf0b52")
+    ("nf-md-account_arrow_right" . "\xf0b53")
+    ("nf-md-account_arrow_right_outline" . "\xf0b54")
+    ("nf-md-account_arrow_up" . "\xf1867")
+    ("nf-md-account_arrow_up_outline" . "\xf186a")
+    ("nf-md-account_box" . "\xf0006")
+    ("nf-md-account_box_multiple" . "\xf0934")
+    ("nf-md-account_box_multiple_outline" . "\xf100a")
+    ("nf-md-account_box_outline" . "\xf0007")
+    ("nf-md-account_cancel" . "\xf12df")
+    ("nf-md-account_cancel_outline" . "\xf12e0")
+    ("nf-md-account_cash" . "\xf1097")
+    ("nf-md-account_cash_outline" . "\xf1098")
+    ("nf-md-account_check" . "\xf0008")
+    ("nf-md-account_check_outline" . "\xf0be2")
+    ("nf-md-account_child" . "\xf0a89")
+    ("nf-md-account_child_circle" . "\xf0a8a")
+    ("nf-md-account_child_outline" . "\xf10c8")
+    ("nf-md-account_circle" . "\xf0009")
+    ("nf-md-account_circle_outline" . "\xf0b55")
+    ("nf-md-account_clock" . "\xf0b56")
+    ("nf-md-account_clock_outline" . "\xf0b57")
+    ("nf-md-account_cog" . "\xf1370")
+    ("nf-md-account_cog_outline" . "\xf1371")
+    ("nf-md-account_convert" . "\xf000a")
+    ("nf-md-account_convert_outline" . "\xf1301")
+    ("nf-md-account_cowboy_hat" . "\xf0e9b")
+    ("nf-md-account_cowboy_hat_outline" . "\xf17f3")
+    ("nf-md-account_details" . "\xf0631")
+    ("nf-md-account_details_outline" . "\xf1372")
+    ("nf-md-account_edit" . "\xf06bc")
+    ("nf-md-account_edit_outline" . "\xf0ffb")
+    ("nf-md-account_eye" . "\xf0420")
+    ("nf-md-account_eye_outline" . "\xf127b")
+    ("nf-md-account_filter" . "\xf0936")
+    ("nf-md-account_filter_outline" . "\xf0f9d")
+    ("nf-md-account_group" . "\xf0849")
+    ("nf-md-account_group_outline" . "\xf0b58")
+    ("nf-md-account_hard_hat" . "\xf05b5")
+    ("nf-md-account_hard_hat_outline" . "\xf1a1f")
+    ("nf-md-account_heart" . "\xf0899")
+    ("nf-md-account_heart_outline" . "\xf0be3")
+    ("nf-md-account_injury" . "\xf1815")
+    ("nf-md-account_injury_outline" . "\xf1816")
+    ("nf-md-account_key" . "\xf000b")
+    ("nf-md-account_key_outline" . "\xf0be4")
+    ("nf-md-account_lock" . "\xf115e")
+    ("nf-md-account_lock_open" . "\xf1960")
+    ("nf-md-account_lock_open_outline" . "\xf1961")
+    ("nf-md-account_lock_outline" . "\xf115f")
+    ("nf-md-account_minus" . "\xf000d")
+    ("nf-md-account_minus_outline" . "\xf0aec")
+    ("nf-md-account_multiple" . "\xf000e")
+    ("nf-md-account_multiple_check" . "\xf08c5")
+    ("nf-md-account_multiple_check_outline" . "\xf11fe")
+    ("nf-md-account_multiple_minus" . "\xf05d3")
+    ("nf-md-account_multiple_minus_outline" . "\xf0be5")
+    ("nf-md-account_multiple_outline" . "\xf000f")
+    ("nf-md-account_multiple_plus" . "\xf0010")
+    ("nf-md-account_multiple_plus_outline" . "\xf0800")
+    ("nf-md-account_multiple_remove" . "\xf120a")
+    ("nf-md-account_multiple_remove_outline" . "\xf120b")
+    ("nf-md-account_music" . "\xf0803")
+    ("nf-md-account_music_outline" . "\xf0ce9")
+    ("nf-md-account_network" . "\xf0011")
+    ("nf-md-account_network_outline" . "\xf0be6")
+    ("nf-md-account_off" . "\xf0012")
+    ("nf-md-account_off_outline" . "\xf0be7")
+    ("nf-md-account_outline" . "\xf0013")
+    ("nf-md-account_plus" . "\xf0014")
+    ("nf-md-account_plus_outline" . "\xf0801")
+    ("nf-md-account_question" . "\xf0b59")
+    ("nf-md-account_question_outline" . "\xf0b5a")
+    ("nf-md-account_reactivate" . "\xf152b")
+    ("nf-md-account_reactivate_outline" . "\xf152c")
+    ("nf-md-account_remove" . "\xf0015")
+    ("nf-md-account_remove_outline" . "\xf0aed")
+    ("nf-md-account_school" . "\xf1a20")
+    ("nf-md-account_school_outline" . "\xf1a21")
+    ("nf-md-account_search" . "\xf0016")
+    ("nf-md-account_search_outline" . "\xf0935")
+    ("nf-md-account_settings" . "\xf0630")
+    ("nf-md-account_settings_outline" . "\xf10c9")
+    ("nf-md-account_star" . "\xf0017")
+    ("nf-md-account_star_outline" . "\xf0be8")
+    ("nf-md-account_supervisor" . "\xf0a8b")
+    ("nf-md-account_supervisor_circle" . "\xf0a8c")
+    ("nf-md-account_supervisor_circle_outline" . "\xf14ec")
+    ("nf-md-account_supervisor_outline" . "\xf112d")
+    ("nf-md-account_switch" . "\xf0019")
+    ("nf-md-account_switch_outline" . "\xf04cb")
+    ("nf-md-account_sync" . "\xf191b")
+    ("nf-md-account_sync_outline" . "\xf191c")
+    ("nf-md-account_tie" . "\xf0ce3")
+    ("nf-md-account_tie_hat" . "\xf1898")
+    ("nf-md-account_tie_hat_outline" . "\xf1899")
+    ("nf-md-account_tie_outline" . "\xf10ca")
+    ("nf-md-account_tie_voice" . "\xf1308")
+    ("nf-md-account_tie_voice_off" . "\xf130a")
+    ("nf-md-account_tie_voice_off_outline" . "\xf130b")
+    ("nf-md-account_tie_voice_outline" . "\xf1309")
+    ("nf-md-account_tie_woman" . "\xf1a8c")
+    ("nf-md-account_voice" . "\xf05cb")
+    ("nf-md-account_voice_off" . "\xf0ed4")
+    ("nf-md-account_wrench" . "\xf189a")
+    ("nf-md-account_wrench_outline" . "\xf189b")
+    ("nf-md-adjust" . "\xf001a")
+    ("nf-md-advertisements" . "\xf192a")
+    ("nf-md-advertisements_off" . "\xf192b")
+    ("nf-md-air_conditioner" . "\xf001b")
+    ("nf-md-air_filter" . "\xf0d43")
+    ("nf-md-air_horn" . "\xf0dac")
+    ("nf-md-air_humidifier" . "\xf1099")
+    ("nf-md-air_humidifier_off" . "\xf1466")
+    ("nf-md-air_purifier" . "\xf0d44")
+    ("nf-md-airbag" . "\xf0be9")
+    ("nf-md-airballoon" . "\xf001c")
+    ("nf-md-airballoon_outline" . "\xf100b")
+    ("nf-md-airplane" . "\xf001d")
+    ("nf-md-airplane_alert" . "\xf187a")
+    ("nf-md-airplane_check" . "\xf187b")
+    ("nf-md-airplane_clock" . "\xf187c")
+    ("nf-md-airplane_cog" . "\xf187d")
+    ("nf-md-airplane_edit" . "\xf187e")
+    ("nf-md-airplane_landing" . "\xf05d4")
+    ("nf-md-airplane_marker" . "\xf187f")
+    ("nf-md-airplane_minus" . "\xf1880")
+    ("nf-md-airplane_off" . "\xf001e")
+    ("nf-md-airplane_plus" . "\xf1881")
+    ("nf-md-airplane_remove" . "\xf1882")
+    ("nf-md-airplane_search" . "\xf1883")
+    ("nf-md-airplane_settings" . "\xf1884")
+    ("nf-md-airplane_takeoff" . "\xf05d5")
+    ("nf-md-airport" . "\xf084b")
+    ("nf-md-alarm" . "\xf0020")
+    ("nf-md-alarm_bell" . "\xf078e")
+    ("nf-md-alarm_check" . "\xf0021")
+    ("nf-md-alarm_light" . "\xf078f")
+    ("nf-md-alarm_light_off" . "\xf171e")
+    ("nf-md-alarm_light_off_outline" . "\xf171f")
+    ("nf-md-alarm_light_outline" . "\xf0bea")
+    ("nf-md-alarm_multiple" . "\xf0022")
+    ("nf-md-alarm_note" . "\xf0e71")
+    ("nf-md-alarm_note_off" . "\xf0e72")
+    ("nf-md-alarm_off" . "\xf0023")
+    ("nf-md-alarm_panel" . "\xf15c4")
+    ("nf-md-alarm_panel_outline" . "\xf15c5")
+    ("nf-md-alarm_plus" . "\xf0024")
+    ("nf-md-alarm_snooze" . "\xf068e")
+    ("nf-md-album" . "\xf0025")
+    ("nf-md-alert" . "\xf0026")
+    ("nf-md-alert_box" . "\xf0027")
+    ("nf-md-alert_box_outline" . "\xf0ce4")
+    ("nf-md-alert_circle" . "\xf0028")
+    ("nf-md-alert_circle_check" . "\xf11ed")
+    ("nf-md-alert_circle_check_outline" . "\xf11ee")
+    ("nf-md-alert_circle_outline" . "\xf05d6")
+    ("nf-md-alert_decagram" . "\xf06bd")
+    ("nf-md-alert_decagram_outline" . "\xf0ce5")
+    ("nf-md-alert_minus" . "\xf14bb")
+    ("nf-md-alert_minus_outline" . "\xf14be")
+    ("nf-md-alert_octagon" . "\xf0029")
+    ("nf-md-alert_octagon_outline" . "\xf0ce6")
+    ("nf-md-alert_octagram" . "\xf0767")
+    ("nf-md-alert_octagram_outline" . "\xf0ce7")
+    ("nf-md-alert_outline" . "\xf002a")
+    ("nf-md-alert_plus" . "\xf14ba")
+    ("nf-md-alert_plus_outline" . "\xf14bd")
+    ("nf-md-alert_remove" . "\xf14bc")
+    ("nf-md-alert_remove_outline" . "\xf14bf")
+    ("nf-md-alert_rhombus" . "\xf11ce")
+    ("nf-md-alert_rhombus_outline" . "\xf11cf")
+    ("nf-md-alien" . "\xf089a")
+    ("nf-md-alien_outline" . "\xf10cb")
+    ("nf-md-align_horizontal_center" . "\xf11c3")
+    ("nf-md-align_horizontal_distribute" . "\xf1962")
+    ("nf-md-align_horizontal_left" . "\xf11c2")
+    ("nf-md-align_horizontal_right" . "\xf11c4")
+    ("nf-md-align_vertical_bottom" . "\xf11c5")
+    ("nf-md-align_vertical_center" . "\xf11c6")
+    ("nf-md-align_vertical_distribute" . "\xf1963")
+    ("nf-md-align_vertical_top" . "\xf11c7")
+    ("nf-md-all_inclusive" . "\xf06be")
+    ("nf-md-all_inclusive_box" . "\xf188d")
+    ("nf-md-all_inclusive_box_outline" . "\xf188e")
+    ("nf-md-allergy" . "\xf1258")
+    ("nf-md-alpha" . "\xf002b")
+    ("nf-md-alpha_a" . "\xf0aee")
+    ("nf-md-alpha_a_box" . "\xf0b08")
+    ("nf-md-alpha_a_box_outline" . "\xf0beb")
+    ("nf-md-alpha_a_circle" . "\xf0bec")
+    ("nf-md-alpha_a_circle_outline" . "\xf0bed")
+    ("nf-md-alpha_b" . "\xf0aef")
+    ("nf-md-alpha_b_box" . "\xf0b09")
+    ("nf-md-alpha_b_box_outline" . "\xf0bee")
+    ("nf-md-alpha_b_circle" . "\xf0bef")
+    ("nf-md-alpha_b_circle_outline" . "\xf0bf0")
+    ("nf-md-alpha_c" . "\xf0af0")
+    ("nf-md-alpha_c_box" . "\xf0b0a")
+    ("nf-md-alpha_c_box_outline" . "\xf0bf1")
+    ("nf-md-alpha_c_circle" . "\xf0bf2")
+    ("nf-md-alpha_c_circle_outline" . "\xf0bf3")
+    ("nf-md-alpha_d" . "\xf0af1")
+    ("nf-md-alpha_d_box" . "\xf0b0b")
+    ("nf-md-alpha_d_box_outline" . "\xf0bf4")
+    ("nf-md-alpha_d_circle" . "\xf0bf5")
+    ("nf-md-alpha_d_circle_outline" . "\xf0bf6")
+    ("nf-md-alpha_e" . "\xf0af2")
+    ("nf-md-alpha_e_box" . "\xf0b0c")
+    ("nf-md-alpha_e_box_outline" . "\xf0bf7")
+    ("nf-md-alpha_e_circle" . "\xf0bf8")
+    ("nf-md-alpha_e_circle_outline" . "\xf0bf9")
+    ("nf-md-alpha_f" . "\xf0af3")
+    ("nf-md-alpha_f_box" . "\xf0b0d")
+    ("nf-md-alpha_f_box_outline" . "\xf0bfa")
+    ("nf-md-alpha_f_circle" . "\xf0bfb")
+    ("nf-md-alpha_f_circle_outline" . "\xf0bfc")
+    ("nf-md-alpha_g" . "\xf0af4")
+    ("nf-md-alpha_g_box" . "\xf0b0e")
+    ("nf-md-alpha_g_box_outline" . "\xf0bfd")
+    ("nf-md-alpha_g_circle" . "\xf0bfe")
+    ("nf-md-alpha_g_circle_outline" . "\xf0bff")
+    ("nf-md-alpha_h" . "\xf0af5")
+    ("nf-md-alpha_h_box" . "\xf0b0f")
+    ("nf-md-alpha_h_box_outline" . "\xf0c00")
+    ("nf-md-alpha_h_circle" . "\xf0c01")
+    ("nf-md-alpha_h_circle_outline" . "\xf0c02")
+    ("nf-md-alpha_i" . "\xf0af6")
+    ("nf-md-alpha_i_box" . "\xf0b10")
+    ("nf-md-alpha_i_box_outline" . "\xf0c03")
+    ("nf-md-alpha_i_circle" . "\xf0c04")
+    ("nf-md-alpha_i_circle_outline" . "\xf0c05")
+    ("nf-md-alpha_j" . "\xf0af7")
+    ("nf-md-alpha_j_box" . "\xf0b11")
+    ("nf-md-alpha_j_box_outline" . "\xf0c06")
+    ("nf-md-alpha_j_circle" . "\xf0c07")
+    ("nf-md-alpha_j_circle_outline" . "\xf0c08")
+    ("nf-md-alpha_k" . "\xf0af8")
+    ("nf-md-alpha_k_box" . "\xf0b12")
+    ("nf-md-alpha_k_box_outline" . "\xf0c09")
+    ("nf-md-alpha_k_circle" . "\xf0c0a")
+    ("nf-md-alpha_k_circle_outline" . "\xf0c0b")
+    ("nf-md-alpha_l" . "\xf0af9")
+    ("nf-md-alpha_l_box" . "\xf0b13")
+    ("nf-md-alpha_l_box_outline" . "\xf0c0c")
+    ("nf-md-alpha_l_circle" . "\xf0c0d")
+    ("nf-md-alpha_l_circle_outline" . "\xf0c0e")
+    ("nf-md-alpha_m" . "\xf0afa")
+    ("nf-md-alpha_m_box" . "\xf0b14")
+    ("nf-md-alpha_m_box_outline" . "\xf0c0f")
+    ("nf-md-alpha_m_circle" . "\xf0c10")
+    ("nf-md-alpha_m_circle_outline" . "\xf0c11")
+    ("nf-md-alpha_n" . "\xf0afb")
+    ("nf-md-alpha_n_box" . "\xf0b15")
+    ("nf-md-alpha_n_box_outline" . "\xf0c12")
+    ("nf-md-alpha_n_circle" . "\xf0c13")
+    ("nf-md-alpha_n_circle_outline" . "\xf0c14")
+    ("nf-md-alpha_o" . "\xf0afc")
+    ("nf-md-alpha_o_box" . "\xf0b16")
+    ("nf-md-alpha_o_box_outline" . "\xf0c15")
+    ("nf-md-alpha_o_circle" . "\xf0c16")
+    ("nf-md-alpha_o_circle_outline" . "\xf0c17")
+    ("nf-md-alpha_p" . "\xf0afd")
+    ("nf-md-alpha_p_box" . "\xf0b17")
+    ("nf-md-alpha_p_box_outline" . "\xf0c18")
+    ("nf-md-alpha_p_circle" . "\xf0c19")
+    ("nf-md-alpha_p_circle_outline" . "\xf0c1a")
+    ("nf-md-alpha_q" . "\xf0afe")
+    ("nf-md-alpha_q_box" . "\xf0b18")
+    ("nf-md-alpha_q_box_outline" . "\xf0c1b")
+    ("nf-md-alpha_q_circle" . "\xf0c1c")
+    ("nf-md-alpha_q_circle_outline" . "\xf0c1d")
+    ("nf-md-alpha_r" . "\xf0aff")
+    ("nf-md-alpha_r_box" . "\xf0b19")
+    ("nf-md-alpha_r_box_outline" . "\xf0c1e")
+    ("nf-md-alpha_r_circle" . "\xf0c1f")
+    ("nf-md-alpha_r_circle_outline" . "\xf0c20")
+    ("nf-md-alpha_s" . "\xf0b00")
+    ("nf-md-alpha_s_box" . "\xf0b1a")
+    ("nf-md-alpha_s_box_outline" . "\xf0c21")
+    ("nf-md-alpha_s_circle" . "\xf0c22")
+    ("nf-md-alpha_s_circle_outline" . "\xf0c23")
+    ("nf-md-alpha_t" . "\xf0b01")
+    ("nf-md-alpha_t_box" . "\xf0b1b")
+    ("nf-md-alpha_t_box_outline" . "\xf0c24")
+    ("nf-md-alpha_t_circle" . "\xf0c25")
+    ("nf-md-alpha_t_circle_outline" . "\xf0c26")
+    ("nf-md-alpha_u" . "\xf0b02")
+    ("nf-md-alpha_u_box" . "\xf0b1c")
+    ("nf-md-alpha_u_box_outline" . "\xf0c27")
+    ("nf-md-alpha_u_circle" . "\xf0c28")
+    ("nf-md-alpha_u_circle_outline" . "\xf0c29")
+    ("nf-md-alpha_v" . "\xf0b03")
+    ("nf-md-alpha_v_box" . "\xf0b1d")
+    ("nf-md-alpha_v_box_outline" . "\xf0c2a")
+    ("nf-md-alpha_v_circle" . "\xf0c2b")
+    ("nf-md-alpha_v_circle_outline" . "\xf0c2c")
+    ("nf-md-alpha_w" . "\xf0b04")
+    ("nf-md-alpha_w_box" . "\xf0b1e")
+    ("nf-md-alpha_w_box_outline" . "\xf0c2d")
+    ("nf-md-alpha_w_circle" . "\xf0c2e")
+    ("nf-md-alpha_w_circle_outline" . "\xf0c2f")
+    ("nf-md-alpha_x" . "\xf0b05")
+    ("nf-md-alpha_x_box" . "\xf0b1f")
+    ("nf-md-alpha_x_box_outline" . "\xf0c30")
+    ("nf-md-alpha_x_circle" . "\xf0c31")
+    ("nf-md-alpha_x_circle_outline" . "\xf0c32")
+    ("nf-md-alpha_y" . "\xf0b06")
+    ("nf-md-alpha_y_box" . "\xf0b20")
+    ("nf-md-alpha_y_box_outline" . "\xf0c33")
+    ("nf-md-alpha_y_circle" . "\xf0c34")
+    ("nf-md-alpha_y_circle_outline" . "\xf0c35")
+    ("nf-md-alpha_z" . "\xf0b07")
+    ("nf-md-alpha_z_box" . "\xf0b21")
+    ("nf-md-alpha_z_box_outline" . "\xf0c36")
+    ("nf-md-alpha_z_circle" . "\xf0c37")
+    ("nf-md-alpha_z_circle_outline" . "\xf0c38")
+    ("nf-md-alphabet_aurebesh" . "\xf132c")
+    ("nf-md-alphabet_cyrillic" . "\xf132d")
+    ("nf-md-alphabet_greek" . "\xf132e")
+    ("nf-md-alphabet_latin" . "\xf132f")
+    ("nf-md-alphabet_piqad" . "\xf1330")
+    ("nf-md-alphabet_tengwar" . "\xf1337")
+    ("nf-md-alphabetical" . "\xf002c")
+    ("nf-md-alphabetical_off" . "\xf100c")
+    ("nf-md-alphabetical_variant" . "\xf100d")
+    ("nf-md-alphabetical_variant_off" . "\xf100e")
+    ("nf-md-altimeter" . "\xf05d7")
+    ("nf-md-ambulance" . "\xf002f")
+    ("nf-md-ammunition" . "\xf0ce8")
+    ("nf-md-ampersand" . "\xf0a8d")
+    ("nf-md-amplifier" . "\xf0030")
+    ("nf-md-amplifier_off" . "\xf11b5")
+    ("nf-md-anchor" . "\xf0031")
+    ("nf-md-android" . "\xf0032")
+    ("nf-md-android_messages" . "\xf0d45")
+    ("nf-md-android_studio" . "\xf0034")
+    ("nf-md-angle_acute" . "\xf0937")
+    ("nf-md-angle_obtuse" . "\xf0938")
+    ("nf-md-angle_right" . "\xf0939")
+    ("nf-md-angular" . "\xf06b2")
+    ("nf-md-angularjs" . "\xf06bf")
+    ("nf-md-animation" . "\xf05d8")
+    ("nf-md-animation_outline" . "\xf0a8f")
+    ("nf-md-animation_play" . "\xf093a")
+    ("nf-md-animation_play_outline" . "\xf0a90")
+    ("nf-md-ansible" . "\xf109a")
+    ("nf-md-antenna" . "\xf1119")
+    ("nf-md-anvil" . "\xf089b")
+    ("nf-md-apache_kafka" . "\xf100f")
+    ("nf-md-api" . "\xf109b")
+    ("nf-md-api_off" . "\xf1257")
+    ("nf-md-apple" . "\xf0035")
+    ("nf-md-apple_finder" . "\xf0036")
+    ("nf-md-apple_icloud" . "\xf0038")
+    ("nf-md-apple_ios" . "\xf0037")
+    ("nf-md-apple_keyboard_caps" . "\xf0632")
+    ("nf-md-apple_keyboard_command" . "\xf0633")
+    ("nf-md-apple_keyboard_control" . "\xf0634")
+    ("nf-md-apple_keyboard_option" . "\xf0635")
+    ("nf-md-apple_keyboard_shift" . "\xf0636")
+    ("nf-md-apple_safari" . "\xf0039")
+    ("nf-md-application" . "\xf08c6")
+    ("nf-md-application_array" . "\xf10f5")
+    ("nf-md-application_array_outline" . "\xf10f6")
+    ("nf-md-application_braces" . "\xf10f7")
+    ("nf-md-application_braces_outline" . "\xf10f8")
+    ("nf-md-application_brackets" . "\xf0c8b")
+    ("nf-md-application_brackets_outline" . "\xf0c8c")
+    ("nf-md-application_cog" . "\xf0675")
+    ("nf-md-application_cog_outline" . "\xf1577")
+    ("nf-md-application_edit" . "\xf00ae")
+    ("nf-md-application_edit_outline" . "\xf0619")
+    ("nf-md-application_export" . "\xf0dad")
+    ("nf-md-application_import" . "\xf0dae")
+    ("nf-md-application_outline" . "\xf0614")
+    ("nf-md-application_parentheses" . "\xf10f9")
+    ("nf-md-application_parentheses_outline" . "\xf10fa")
+    ("nf-md-application_settings" . "\xf0b60")
+    ("nf-md-application_settings_outline" . "\xf1555")
+    ("nf-md-application_variable" . "\xf10fb")
+    ("nf-md-application_variable_outline" . "\xf10fc")
+    ("nf-md-approximately_equal" . "\xf0f9e")
+    ("nf-md-approximately_equal_box" . "\xf0f9f")
+    ("nf-md-apps" . "\xf003b")
+    ("nf-md-apps_box" . "\xf0d46")
+    ("nf-md-arch" . "\xf08c7")
+    ("nf-md-archive" . "\xf003c")
+    ("nf-md-archive_alert" . "\xf14fd")
+    ("nf-md-archive_alert_outline" . "\xf14fe")
+    ("nf-md-archive_arrow_down" . "\xf1259")
+    ("nf-md-archive_arrow_down_outline" . "\xf125a")
+    ("nf-md-archive_arrow_up" . "\xf125b")
+    ("nf-md-archive_arrow_up_outline" . "\xf125c")
+    ("nf-md-archive_cancel" . "\xf174b")
+    ("nf-md-archive_cancel_outline" . "\xf174c")
+    ("nf-md-archive_check" . "\xf174d")
+    ("nf-md-archive_check_outline" . "\xf174e")
+    ("nf-md-archive_clock" . "\xf174f")
+    ("nf-md-archive_clock_outline" . "\xf1750")
+    ("nf-md-archive_cog" . "\xf1751")
+    ("nf-md-archive_cog_outline" . "\xf1752")
+    ("nf-md-archive_edit" . "\xf1753")
+    ("nf-md-archive_edit_outline" . "\xf1754")
+    ("nf-md-archive_eye" . "\xf1755")
+    ("nf-md-archive_eye_outline" . "\xf1756")
+    ("nf-md-archive_lock" . "\xf1757")
+    ("nf-md-archive_lock_open" . "\xf1758")
+    ("nf-md-archive_lock_open_outline" . "\xf1759")
+    ("nf-md-archive_lock_outline" . "\xf175a")
+    ("nf-md-archive_marker" . "\xf175b")
+    ("nf-md-archive_marker_outline" . "\xf175c")
+    ("nf-md-archive_minus" . "\xf175d")
+    ("nf-md-archive_minus_outline" . "\xf175e")
+    ("nf-md-archive_music" . "\xf175f")
+    ("nf-md-archive_music_outline" . "\xf1760")
+    ("nf-md-archive_off" . "\xf1761")
+    ("nf-md-archive_off_outline" . "\xf1762")
+    ("nf-md-archive_outline" . "\xf120e")
+    ("nf-md-archive_plus" . "\xf1763")
+    ("nf-md-archive_plus_outline" . "\xf1764")
+    ("nf-md-archive_refresh" . "\xf1765")
+    ("nf-md-archive_refresh_outline" . "\xf1766")
+    ("nf-md-archive_remove" . "\xf1767")
+    ("nf-md-archive_remove_outline" . "\xf1768")
+    ("nf-md-archive_search" . "\xf1769")
+    ("nf-md-archive_search_outline" . "\xf176a")
+    ("nf-md-archive_settings" . "\xf176b")
+    ("nf-md-archive_settings_outline" . "\xf176c")
+    ("nf-md-archive_star" . "\xf176d")
+    ("nf-md-archive_star_outline" . "\xf176e")
+    ("nf-md-archive_sync" . "\xf176f")
+    ("nf-md-archive_sync_outline" . "\xf1770")
+    ("nf-md-arm_flex" . "\xf0fd7")
+    ("nf-md-arm_flex_outline" . "\xf0fd6")
+    ("nf-md-arrange_bring_forward" . "\xf003d")
+    ("nf-md-arrange_bring_to_front" . "\xf003e")
+    ("nf-md-arrange_send_backward" . "\xf003f")
+    ("nf-md-arrange_send_to_back" . "\xf0040")
+    ("nf-md-arrow_all" . "\xf0041")
+    ("nf-md-arrow_bottom_left" . "\xf0042")
+    ("nf-md-arrow_bottom_left_bold_box" . "\xf1964")
+    ("nf-md-arrow_bottom_left_bold_box_outline" . "\xf1965")
+    ("nf-md-arrow_bottom_left_bold_outline" . "\xf09b7")
+    ("nf-md-arrow_bottom_left_thick" . "\xf09b8")
+    ("nf-md-arrow_bottom_left_thin" . "\xf19b6")
+    ("nf-md-arrow_bottom_left_thin_circle_outline" . "\xf1596")
+    ("nf-md-arrow_bottom_right" . "\xf0043")
+    ("nf-md-arrow_bottom_right_bold_box" . "\xf1966")
+    ("nf-md-arrow_bottom_right_bold_box_outline" . "\xf1967")
+    ("nf-md-arrow_bottom_right_bold_outline" . "\xf09b9")
+    ("nf-md-arrow_bottom_right_thick" . "\xf09ba")
+    ("nf-md-arrow_bottom_right_thin" . "\xf19b7")
+    ("nf-md-arrow_bottom_right_thin_circle_outline" . "\xf1595")
+    ("nf-md-arrow_collapse" . "\xf0615")
+    ("nf-md-arrow_collapse_all" . "\xf0044")
+    ("nf-md-arrow_collapse_down" . "\xf0792")
+    ("nf-md-arrow_collapse_horizontal" . "\xf084c")
+    ("nf-md-arrow_collapse_left" . "\xf0793")
+    ("nf-md-arrow_collapse_right" . "\xf0794")
+    ("nf-md-arrow_collapse_up" . "\xf0795")
+    ("nf-md-arrow_collapse_vertical" . "\xf084d")
+    ("nf-md-arrow_decision" . "\xf09bb")
+    ("nf-md-arrow_decision_auto" . "\xf09bc")
+    ("nf-md-arrow_decision_auto_outline" . "\xf09bd")
+    ("nf-md-arrow_decision_outline" . "\xf09be")
+    ("nf-md-arrow_down" . "\xf0045")
+    ("nf-md-arrow_down_bold" . "\xf072e")
+    ("nf-md-arrow_down_bold_box" . "\xf072f")
+    ("nf-md-arrow_down_bold_box_outline" . "\xf0730")
+    ("nf-md-arrow_down_bold_circle" . "\xf0047")
+    ("nf-md-arrow_down_bold_circle_outline" . "\xf0048")
+    ("nf-md-arrow_down_bold_hexagon_outline" . "\xf0049")
+    ("nf-md-arrow_down_bold_outline" . "\xf09bf")
+    ("nf-md-arrow_down_box" . "\xf06c0")
+    ("nf-md-arrow_down_circle" . "\xf0cdb")
+    ("nf-md-arrow_down_circle_outline" . "\xf0cdc")
+    ("nf-md-arrow_down_drop_circle" . "\xf004a")
+    ("nf-md-arrow_down_drop_circle_outline" . "\xf004b")
+    ("nf-md-arrow_down_left" . "\xf17a1")
+    ("nf-md-arrow_down_left_bold" . "\xf17a2")
+    ("nf-md-arrow_down_right" . "\xf17a3")
+    ("nf-md-arrow_down_right_bold" . "\xf17a4")
+    ("nf-md-arrow_down_thick" . "\xf0046")
+    ("nf-md-arrow_down_thin" . "\xf19b3")
+    ("nf-md-arrow_down_thin_circle_outline" . "\xf1599")
+    ("nf-md-arrow_expand" . "\xf0616")
+    ("nf-md-arrow_expand_all" . "\xf004c")
+    ("nf-md-arrow_expand_down" . "\xf0796")
+    ("nf-md-arrow_expand_horizontal" . "\xf084e")
+    ("nf-md-arrow_expand_left" . "\xf0797")
+    ("nf-md-arrow_expand_right" . "\xf0798")
+    ("nf-md-arrow_expand_up" . "\xf0799")
+    ("nf-md-arrow_expand_vertical" . "\xf084f")
+    ("nf-md-arrow_horizontal_lock" . "\xf115b")
+    ("nf-md-arrow_left" . "\xf004d")
+    ("nf-md-arrow_left_bold" . "\xf0731")
+    ("nf-md-arrow_left_bold_box" . "\xf0732")
+    ("nf-md-arrow_left_bold_box_outline" . "\xf0733")
+    ("nf-md-arrow_left_bold_circle" . "\xf004f")
+    ("nf-md-arrow_left_bold_circle_outline" . "\xf0050")
+    ("nf-md-arrow_left_bold_hexagon_outline" . "\xf0051")
+    ("nf-md-arrow_left_bold_outline" . "\xf09c0")
+    ("nf-md-arrow_left_bottom" . "\xf17a5")
+    ("nf-md-arrow_left_bottom_bold" . "\xf17a6")
+    ("nf-md-arrow_left_box" . "\xf06c1")
+    ("nf-md-arrow_left_circle" . "\xf0cdd")
+    ("nf-md-arrow_left_circle_outline" . "\xf0cde")
+    ("nf-md-arrow_left_drop_circle" . "\xf0052")
+    ("nf-md-arrow_left_drop_circle_outline" . "\xf0053")
+    ("nf-md-arrow_left_right" . "\xf0e73")
+    ("nf-md-arrow_left_right_bold" . "\xf0e74")
+    ("nf-md-arrow_left_right_bold_outline" . "\xf09c1")
+    ("nf-md-arrow_left_thick" . "\xf004e")
+    ("nf-md-arrow_left_thin" . "\xf19b1")
+    ("nf-md-arrow_left_thin_circle_outline" . "\xf159a")
+    ("nf-md-arrow_left_top" . "\xf17a7")
+    ("nf-md-arrow_left_top_bold" . "\xf17a8")
+    ("nf-md-arrow_projectile" . "\xf1840")
+    ("nf-md-arrow_projectile_multiple" . "\xf183f")
+    ("nf-md-arrow_right" . "\xf0054")
+    ("nf-md-arrow_right_bold" . "\xf0734")
+    ("nf-md-arrow_right_bold_box" . "\xf0735")
+    ("nf-md-arrow_right_bold_box_outline" . "\xf0736")
+    ("nf-md-arrow_right_bold_circle" . "\xf0056")
+    ("nf-md-arrow_right_bold_circle_outline" . "\xf0057")
+    ("nf-md-arrow_right_bold_hexagon_outline" . "\xf0058")
+    ("nf-md-arrow_right_bold_outline" . "\xf09c2")
+    ("nf-md-arrow_right_bottom" . "\xf17a9")
+    ("nf-md-arrow_right_bottom_bold" . "\xf17aa")
+    ("nf-md-arrow_right_box" . "\xf06c2")
+    ("nf-md-arrow_right_circle" . "\xf0cdf")
+    ("nf-md-arrow_right_circle_outline" . "\xf0ce0")
+    ("nf-md-arrow_right_drop_circle" . "\xf0059")
+    ("nf-md-arrow_right_drop_circle_outline" . "\xf005a")
+    ("nf-md-arrow_right_thick" . "\xf0055")
+    ("nf-md-arrow_right_thin" . "\xf19b0")
+    ("nf-md-arrow_right_thin_circle_outline" . "\xf1598")
+    ("nf-md-arrow_right_top" . "\xf17ab")
+    ("nf-md-arrow_right_top_bold" . "\xf17ac")
+    ("nf-md-arrow_split_horizontal" . "\xf093b")
+    ("nf-md-arrow_split_vertical" . "\xf093c")
+    ("nf-md-arrow_top_left" . "\xf005b")
+    ("nf-md-arrow_top_left_bold_box" . "\xf1968")
+    ("nf-md-arrow_top_left_bold_box_outline" . "\xf1969")
+    ("nf-md-arrow_top_left_bold_outline" . "\xf09c3")
+    ("nf-md-arrow_top_left_bottom_right" . "\xf0e75")
+    ("nf-md-arrow_top_left_bottom_right_bold" . "\xf0e76")
+    ("nf-md-arrow_top_left_thick" . "\xf09c4")
+    ("nf-md-arrow_top_left_thin" . "\xf19b5")
+    ("nf-md-arrow_top_left_thin_circle_outline" . "\xf1593")
+    ("nf-md-arrow_top_right" . "\xf005c")
+    ("nf-md-arrow_top_right_bold_box" . "\xf196a")
+    ("nf-md-arrow_top_right_bold_box_outline" . "\xf196b")
+    ("nf-md-arrow_top_right_bold_outline" . "\xf09c5")
+    ("nf-md-arrow_top_right_bottom_left" . "\xf0e77")
+    ("nf-md-arrow_top_right_bottom_left_bold" . "\xf0e78")
+    ("nf-md-arrow_top_right_thick" . "\xf09c6")
+    ("nf-md-arrow_top_right_thin" . "\xf19b4")
+    ("nf-md-arrow_top_right_thin_circle_outline" . "\xf1594")
+    ("nf-md-arrow_u_down_left" . "\xf17ad")
+    ("nf-md-arrow_u_down_left_bold" . "\xf17ae")
+    ("nf-md-arrow_u_down_right" . "\xf17af")
+    ("nf-md-arrow_u_down_right_bold" . "\xf17b0")
+    ("nf-md-arrow_u_left_bottom" . "\xf17b1")
+    ("nf-md-arrow_u_left_bottom_bold" . "\xf17b2")
+    ("nf-md-arrow_u_left_top" . "\xf17b3")
+    ("nf-md-arrow_u_left_top_bold" . "\xf17b4")
+    ("nf-md-arrow_u_right_bottom" . "\xf17b5")
+    ("nf-md-arrow_u_right_bottom_bold" . "\xf17b6")
+    ("nf-md-arrow_u_right_top" . "\xf17b7")
+    ("nf-md-arrow_u_right_top_bold" . "\xf17b8")
+    ("nf-md-arrow_u_up_left" . "\xf17b9")
+    ("nf-md-arrow_u_up_left_bold" . "\xf17ba")
+    ("nf-md-arrow_u_up_right" . "\xf17bb")
+    ("nf-md-arrow_u_up_right_bold" . "\xf17bc")
+    ("nf-md-arrow_up" . "\xf005d")
+    ("nf-md-arrow_up_bold" . "\xf0737")
+    ("nf-md-arrow_up_bold_box" . "\xf0738")
+    ("nf-md-arrow_up_bold_box_outline" . "\xf0739")
+    ("nf-md-arrow_up_bold_circle" . "\xf005f")
+    ("nf-md-arrow_up_bold_circle_outline" . "\xf0060")
+    ("nf-md-arrow_up_bold_hexagon_outline" . "\xf0061")
+    ("nf-md-arrow_up_bold_outline" . "\xf09c7")
+    ("nf-md-arrow_up_box" . "\xf06c3")
+    ("nf-md-arrow_up_circle" . "\xf0ce1")
+    ("nf-md-arrow_up_circle_outline" . "\xf0ce2")
+    ("nf-md-arrow_up_down" . "\xf0e79")
+    ("nf-md-arrow_up_down_bold" . "\xf0e7a")
+    ("nf-md-arrow_up_down_bold_outline" . "\xf09c8")
+    ("nf-md-arrow_up_drop_circle" . "\xf0062")
+    ("nf-md-arrow_up_drop_circle_outline" . "\xf0063")
+    ("nf-md-arrow_up_left" . "\xf17bd")
+    ("nf-md-arrow_up_left_bold" . "\xf17be")
+    ("nf-md-arrow_up_right" . "\xf17bf")
+    ("nf-md-arrow_up_right_bold" . "\xf17c0")
+    ("nf-md-arrow_up_thick" . "\xf005e")
+    ("nf-md-arrow_up_thin" . "\xf19b2")
+    ("nf-md-arrow_up_thin_circle_outline" . "\xf1597")
+    ("nf-md-arrow_vertical_lock" . "\xf115c")
+    ("nf-md-artstation" . "\xf0b5b")
+    ("nf-md-aspect_ratio" . "\xf0a24")
+    ("nf-md-assistant" . "\xf0064")
+    ("nf-md-asterisk" . "\xf06c4")
+    ("nf-md-asterisk_circle_outline" . "\xf1a27")
+    ("nf-md-at" . "\xf0065")
+    ("nf-md-atlassian" . "\xf0804")
+    ("nf-md-atm" . "\xf0d47")
+    ("nf-md-atom" . "\xf0768")
+    ("nf-md-atom_variant" . "\xf0e7b")
+    ("nf-md-attachment" . "\xf0066")
+    ("nf-md-attachment_check" . "\xf1ac1")
+    ("nf-md-attachment_lock" . "\xf19c4")
+    ("nf-md-attachment_minus" . "\xf1ac2")
+    ("nf-md-attachment_off" . "\xf1ac3")
+    ("nf-md-attachment_plus" . "\xf1ac4")
+    ("nf-md-attachment_remove" . "\xf1ac5")
+    ("nf-md-audio_input_rca" . "\xf186b")
+    ("nf-md-audio_input_stereo_minijack" . "\xf186c")
+    ("nf-md-audio_input_xlr" . "\xf186d")
+    ("nf-md-audio_video" . "\xf093d")
+    ("nf-md-audio_video_off" . "\xf11b6")
+    ("nf-md-augmented_reality" . "\xf0850")
+    ("nf-md-auto_download" . "\xf137e")
+    ("nf-md-auto_fix" . "\xf0068")
+    ("nf-md-auto_upload" . "\xf0069")
+    ("nf-md-autorenew" . "\xf006a")
+    ("nf-md-autorenew_off" . "\xf19e7")
+    ("nf-md-av_timer" . "\xf006b")
+    ("nf-md-aws" . "\xf0e0f")
+    ("nf-md-axe" . "\xf08c8")
+    ("nf-md-axe_battle" . "\xf1842")
+    ("nf-md-axis" . "\xf0d48")
+    ("nf-md-axis_arrow" . "\xf0d49")
+    ("nf-md-axis_arrow_info" . "\xf140e")
+    ("nf-md-axis_arrow_lock" . "\xf0d4a")
+    ("nf-md-axis_lock" . "\xf0d4b")
+    ("nf-md-axis_x_arrow" . "\xf0d4c")
+    ("nf-md-axis_x_arrow_lock" . "\xf0d4d")
+    ("nf-md-axis_x_rotate_clockwise" . "\xf0d4e")
+    ("nf-md-axis_x_rotate_counterclockwise" . "\xf0d4f")
+    ("nf-md-axis_x_y_arrow_lock" . "\xf0d50")
+    ("nf-md-axis_y_arrow" . "\xf0d51")
+    ("nf-md-axis_y_arrow_lock" . "\xf0d52")
+    ("nf-md-axis_y_rotate_clockwise" . "\xf0d53")
+    ("nf-md-axis_y_rotate_counterclockwise" . "\xf0d54")
+    ("nf-md-axis_z_arrow" . "\xf0d55")
+    ("nf-md-axis_z_arrow_lock" . "\xf0d56")
+    ("nf-md-axis_z_rotate_clockwise" . "\xf0d57")
+    ("nf-md-axis_z_rotate_counterclockwise" . "\xf0d58")
+    ("nf-md-babel" . "\xf0a25")
+    ("nf-md-baby" . "\xf006c")
+    ("nf-md-baby_bottle" . "\xf0f39")
+    ("nf-md-baby_bottle_outline" . "\xf0f3a")
+    ("nf-md-baby_buggy" . "\xf13e0")
+    ("nf-md-baby_carriage" . "\xf068f")
+    ("nf-md-baby_carriage_off" . "\xf0fa0")
+    ("nf-md-baby_face" . "\xf0e7c")
+    ("nf-md-baby_face_outline" . "\xf0e7d")
+    ("nf-md-backburger" . "\xf006d")
+    ("nf-md-backspace" . "\xf006e")
+    ("nf-md-backspace_outline" . "\xf0b5c")
+    ("nf-md-backspace_reverse" . "\xf0e7e")
+    ("nf-md-backspace_reverse_outline" . "\xf0e7f")
+    ("nf-md-backup_restore" . "\xf006f")
+    ("nf-md-bacteria" . "\xf0ed5")
+    ("nf-md-bacteria_outline" . "\xf0ed6")
+    ("nf-md-badge_account" . "\xf0da7")
+    ("nf-md-badge_account_alert" . "\xf0da8")
+    ("nf-md-badge_account_alert_outline" . "\xf0da9")
+    ("nf-md-badge_account_horizontal" . "\xf0e0d")
+    ("nf-md-badge_account_horizontal_outline" . "\xf0e0e")
+    ("nf-md-badge_account_outline" . "\xf0daa")
+    ("nf-md-badminton" . "\xf0851")
+    ("nf-md-bag_carry_on" . "\xf0f3b")
+    ("nf-md-bag_carry_on_check" . "\xf0d65")
+    ("nf-md-bag_carry_on_off" . "\xf0f3c")
+    ("nf-md-bag_checked" . "\xf0f3d")
+    ("nf-md-bag_personal" . "\xf0e10")
+    ("nf-md-bag_personal_off" . "\xf0e11")
+    ("nf-md-bag_personal_off_outline" . "\xf0e12")
+    ("nf-md-bag_personal_outline" . "\xf0e13")
+    ("nf-md-bag_suitcase" . "\xf158b")
+    ("nf-md-bag_suitcase_off" . "\xf158d")
+    ("nf-md-bag_suitcase_off_outline" . "\xf158e")
+    ("nf-md-bag_suitcase_outline" . "\xf158c")
+    ("nf-md-baguette" . "\xf0f3e")
+    ("nf-md-balcony" . "\xf1817")
+    ("nf-md-balloon" . "\xf0a26")
+    ("nf-md-ballot" . "\xf09c9")
+    ("nf-md-ballot_outline" . "\xf09ca")
+    ("nf-md-ballot_recount" . "\xf0c39")
+    ("nf-md-ballot_recount_outline" . "\xf0c3a")
+    ("nf-md-bandage" . "\xf0daf")
+    ("nf-md-bank" . "\xf0070")
+    ("nf-md-bank_check" . "\xf1655")
+    ("nf-md-bank_minus" . "\xf0db0")
+    ("nf-md-bank_off" . "\xf1656")
+    ("nf-md-bank_off_outline" . "\xf1657")
+    ("nf-md-bank_outline" . "\xf0e80")
+    ("nf-md-bank_plus" . "\xf0db1")
+    ("nf-md-bank_remove" . "\xf0db2")
+    ("nf-md-bank_transfer" . "\xf0a27")
+    ("nf-md-bank_transfer_in" . "\xf0a28")
+    ("nf-md-bank_transfer_out" . "\xf0a29")
+    ("nf-md-barcode" . "\xf0071")
+    ("nf-md-barcode_off" . "\xf1236")
+    ("nf-md-barcode_scan" . "\xf0072")
+    ("nf-md-barley" . "\xf0073")
+    ("nf-md-barley_off" . "\xf0b5d")
+    ("nf-md-barn" . "\xf0b5e")
+    ("nf-md-barrel" . "\xf0074")
+    ("nf-md-barrel_outline" . "\xf1a28")
+    ("nf-md-baseball" . "\xf0852")
+    ("nf-md-baseball_bat" . "\xf0853")
+    ("nf-md-baseball_diamond" . "\xf15ec")
+    ("nf-md-baseball_diamond_outline" . "\xf15ed")
+    ("nf-md-bash" . "\xf1183")
+    ("nf-md-basket" . "\xf0076")
+    ("nf-md-basket_check" . "\xf18e5")
+    ("nf-md-basket_check_outline" . "\xf18e6")
+    ("nf-md-basket_fill" . "\xf0077")
+    ("nf-md-basket_minus" . "\xf1523")
+    ("nf-md-basket_minus_outline" . "\xf1524")
+    ("nf-md-basket_off" . "\xf1525")
+    ("nf-md-basket_off_outline" . "\xf1526")
+    ("nf-md-basket_outline" . "\xf1181")
+    ("nf-md-basket_plus" . "\xf1527")
+    ("nf-md-basket_plus_outline" . "\xf1528")
+    ("nf-md-basket_remove" . "\xf1529")
+    ("nf-md-basket_remove_outline" . "\xf152a")
+    ("nf-md-basket_unfill" . "\xf0078")
+    ("nf-md-basketball" . "\xf0806")
+    ("nf-md-basketball_hoop" . "\xf0c3b")
+    ("nf-md-basketball_hoop_outline" . "\xf0c3c")
+    ("nf-md-bat" . "\xf0b5f")
+    ("nf-md-bathtub" . "\xf1818")
+    ("nf-md-bathtub_outline" . "\xf1819")
+    ("nf-md-battery" . "\xf0079")
+    ("nf-md-battery_10" . "\xf007a")
+    ("nf-md-battery_10_bluetooth" . "\xf093e")
+    ("nf-md-battery_20" . "\xf007b")
+    ("nf-md-battery_20_bluetooth" . "\xf093f")
+    ("nf-md-battery_30" . "\xf007c")
+    ("nf-md-battery_30_bluetooth" . "\xf0940")
+    ("nf-md-battery_40" . "\xf007d")
+    ("nf-md-battery_40_bluetooth" . "\xf0941")
+    ("nf-md-battery_50" . "\xf007e")
+    ("nf-md-battery_50_bluetooth" . "\xf0942")
+    ("nf-md-battery_60" . "\xf007f")
+    ("nf-md-battery_60_bluetooth" . "\xf0943")
+    ("nf-md-battery_70" . "\xf0080")
+    ("nf-md-battery_70_bluetooth" . "\xf0944")
+    ("nf-md-battery_80" . "\xf0081")
+    ("nf-md-battery_80_bluetooth" . "\xf0945")
+    ("nf-md-battery_90" . "\xf0082")
+    ("nf-md-battery_90_bluetooth" . "\xf0946")
+    ("nf-md-battery_alert" . "\xf0083")
+    ("nf-md-battery_alert_bluetooth" . "\xf0947")
+    ("nf-md-battery_alert_variant" . "\xf10cc")
+    ("nf-md-battery_alert_variant_outline" . "\xf10cd")
+    ("nf-md-battery_arrow_down" . "\xf17de")
+    ("nf-md-battery_arrow_down_outline" . "\xf17df")
+    ("nf-md-battery_arrow_up" . "\xf17e0")
+    ("nf-md-battery_arrow_up_outline" . "\xf17e1")
+    ("nf-md-battery_bluetooth" . "\xf0948")
+    ("nf-md-battery_bluetooth_variant" . "\xf0949")
+    ("nf-md-battery_charging" . "\xf0084")
+    ("nf-md-battery_charging_10" . "\xf089c")
+    ("nf-md-battery_charging_100" . "\xf0085")
+    ("nf-md-battery_charging_20" . "\xf0086")
+    ("nf-md-battery_charging_30" . "\xf0087")
+    ("nf-md-battery_charging_40" . "\xf0088")
+    ("nf-md-battery_charging_50" . "\xf089d")
+    ("nf-md-battery_charging_60" . "\xf0089")
+    ("nf-md-battery_charging_70" . "\xf089e")
+    ("nf-md-battery_charging_80" . "\xf008a")
+    ("nf-md-battery_charging_90" . "\xf008b")
+    ("nf-md-battery_charging_high" . "\xf12a6")
+    ("nf-md-battery_charging_low" . "\xf12a4")
+    ("nf-md-battery_charging_medium" . "\xf12a5")
+    ("nf-md-battery_charging_outline" . "\xf089f")
+    ("nf-md-battery_charging_wireless" . "\xf0807")
+    ("nf-md-battery_charging_wireless_10" . "\xf0808")
+    ("nf-md-battery_charging_wireless_20" . "\xf0809")
+    ("nf-md-battery_charging_wireless_30" . "\xf080a")
+    ("nf-md-battery_charging_wireless_40" . "\xf080b")
+    ("nf-md-battery_charging_wireless_50" . "\xf080c")
+    ("nf-md-battery_charging_wireless_60" . "\xf080d")
+    ("nf-md-battery_charging_wireless_70" . "\xf080e")
+    ("nf-md-battery_charging_wireless_80" . "\xf080f")
+    ("nf-md-battery_charging_wireless_90" . "\xf0810")
+    ("nf-md-battery_charging_wireless_alert" . "\xf0811")
+    ("nf-md-battery_charging_wireless_outline" . "\xf0812")
+    ("nf-md-battery_check" . "\xf17e2")
+    ("nf-md-battery_check_outline" . "\xf17e3")
+    ("nf-md-battery_clock" . "\xf19e5")
+    ("nf-md-battery_clock_outline" . "\xf19e6")
+    ("nf-md-battery_heart" . "\xf120f")
+    ("nf-md-battery_heart_outline" . "\xf1210")
+    ("nf-md-battery_heart_variant" . "\xf1211")
+    ("nf-md-battery_high" . "\xf12a3")
+    ("nf-md-battery_lock" . "\xf179c")
+    ("nf-md-battery_lock_open" . "\xf179d")
+    ("nf-md-battery_low" . "\xf12a1")
+    ("nf-md-battery_medium" . "\xf12a2")
+    ("nf-md-battery_minus" . "\xf17e4")
+    ("nf-md-battery_minus_outline" . "\xf17e5")
+    ("nf-md-battery_minus_variant" . "\xf008c")
+    ("nf-md-battery_negative" . "\xf008d")
+    ("nf-md-battery_off" . "\xf125d")
+    ("nf-md-battery_off_outline" . "\xf125e")
+    ("nf-md-battery_outline" . "\xf008e")
+    ("nf-md-battery_plus" . "\xf17e6")
+    ("nf-md-battery_plus_outline" . "\xf17e7")
+    ("nf-md-battery_plus_variant" . "\xf008f")
+    ("nf-md-battery_positive" . "\xf0090")
+    ("nf-md-battery_remove" . "\xf17e8")
+    ("nf-md-battery_remove_outline" . "\xf17e9")
+    ("nf-md-battery_sync" . "\xf1834")
+    ("nf-md-battery_sync_outline" . "\xf1835")
+    ("nf-md-battery_unknown" . "\xf0091")
+    ("nf-md-battery_unknown_bluetooth" . "\xf094a")
+    ("nf-md-beach" . "\xf0092")
+    ("nf-md-beaker" . "\xf0cea")
+    ("nf-md-beaker_alert" . "\xf1229")
+    ("nf-md-beaker_alert_outline" . "\xf122a")
+    ("nf-md-beaker_check" . "\xf122b")
+    ("nf-md-beaker_check_outline" . "\xf122c")
+    ("nf-md-beaker_minus" . "\xf122d")
+    ("nf-md-beaker_minus_outline" . "\xf122e")
+    ("nf-md-beaker_outline" . "\xf0690")
+    ("nf-md-beaker_plus" . "\xf122f")
+    ("nf-md-beaker_plus_outline" . "\xf1230")
+    ("nf-md-beaker_question" . "\xf1231")
+    ("nf-md-beaker_question_outline" . "\xf1232")
+    ("nf-md-beaker_remove" . "\xf1233")
+    ("nf-md-beaker_remove_outline" . "\xf1234")
+    ("nf-md-bed" . "\xf02e3")
+    ("nf-md-bed_double" . "\xf0fd4")
+    ("nf-md-bed_double_outline" . "\xf0fd3")
+    ("nf-md-bed_empty" . "\xf08a0")
+    ("nf-md-bed_king" . "\xf0fd2")
+    ("nf-md-bed_king_outline" . "\xf0fd1")
+    ("nf-md-bed_outline" . "\xf0099")
+    ("nf-md-bed_queen" . "\xf0fd0")
+    ("nf-md-bed_queen_outline" . "\xf0fdb")
+    ("nf-md-bed_single" . "\xf106d")
+    ("nf-md-bed_single_outline" . "\xf106e")
+    ("nf-md-bee" . "\xf0fa1")
+    ("nf-md-bee_flower" . "\xf0fa2")
+    ("nf-md-beehive_off_outline" . "\xf13ed")
+    ("nf-md-beehive_outline" . "\xf10ce")
+    ("nf-md-beekeeper" . "\xf14e2")
+    ("nf-md-beer" . "\xf0098")
+    ("nf-md-beer_outline" . "\xf130c")
+    ("nf-md-bell" . "\xf009a")
+    ("nf-md-bell_alert" . "\xf0d59")
+    ("nf-md-bell_alert_outline" . "\xf0e81")
+    ("nf-md-bell_badge" . "\xf116b")
+    ("nf-md-bell_badge_outline" . "\xf0178")
+    ("nf-md-bell_cancel" . "\xf13e7")
+    ("nf-md-bell_cancel_outline" . "\xf13e8")
+    ("nf-md-bell_check" . "\xf11e5")
+    ("nf-md-bell_check_outline" . "\xf11e6")
+    ("nf-md-bell_circle" . "\xf0d5a")
+    ("nf-md-bell_circle_outline" . "\xf0d5b")
+    ("nf-md-bell_cog" . "\xf1a29")
+    ("nf-md-bell_cog_outline" . "\xf1a2a")
+    ("nf-md-bell_minus" . "\xf13e9")
+    ("nf-md-bell_minus_outline" . "\xf13ea")
+    ("nf-md-bell_off" . "\xf009b")
+    ("nf-md-bell_off_outline" . "\xf0a91")
+    ("nf-md-bell_outline" . "\xf009c")
+    ("nf-md-bell_plus" . "\xf009d")
+    ("nf-md-bell_plus_outline" . "\xf0a92")
+    ("nf-md-bell_remove" . "\xf13eb")
+    ("nf-md-bell_remove_outline" . "\xf13ec")
+    ("nf-md-bell_ring" . "\xf009e")
+    ("nf-md-bell_ring_outline" . "\xf009f")
+    ("nf-md-bell_sleep" . "\xf00a0")
+    ("nf-md-bell_sleep_outline" . "\xf0a93")
+    ("nf-md-beta" . "\xf00a1")
+    ("nf-md-betamax" . "\xf09cb")
+    ("nf-md-biathlon" . "\xf0e14")
+    ("nf-md-bicycle" . "\xf109c")
+    ("nf-md-bicycle_basket" . "\xf1235")
+    ("nf-md-bicycle_cargo" . "\xf189c")
+    ("nf-md-bicycle_electric" . "\xf15b4")
+    ("nf-md-bicycle_penny_farthing" . "\xf15e9")
+    ("nf-md-bike" . "\xf00a3")
+    ("nf-md-bike_fast" . "\xf111f")
+    ("nf-md-billboard" . "\xf1010")
+    ("nf-md-billiards" . "\xf0b61")
+    ("nf-md-billiards_rack" . "\xf0b62")
+    ("nf-md-binoculars" . "\xf00a5")
+    ("nf-md-bio" . "\xf00a6")
+    ("nf-md-biohazard" . "\xf00a7")
+    ("nf-md-bird" . "\xf15c6")
+    ("nf-md-bitbucket" . "\xf00a8")
+    ("nf-md-bitcoin" . "\xf0813")
+    ("nf-md-black_mesa" . "\xf00a9")
+    ("nf-md-blender" . "\xf0ceb")
+    ("nf-md-blender_outline" . "\xf181a")
+    ("nf-md-blender_software" . "\xf00ab")
+    ("nf-md-blinds" . "\xf00ac")
+    ("nf-md-blinds_horizontal" . "\xf1a2b")
+    ("nf-md-blinds_horizontal_closed" . "\xf1a2c")
+    ("nf-md-blinds_open" . "\xf1011")
+    ("nf-md-blinds_vertical" . "\xf1a2d")
+    ("nf-md-blinds_vertical_closed" . "\xf1a2e")
+    ("nf-md-block_helper" . "\xf00ad")
+    ("nf-md-blood_bag" . "\xf0cec")
+    ("nf-md-bluetooth" . "\xf00af")
+    ("nf-md-bluetooth_audio" . "\xf00b0")
+    ("nf-md-bluetooth_connect" . "\xf00b1")
+    ("nf-md-bluetooth_off" . "\xf00b2")
+    ("nf-md-bluetooth_settings" . "\xf00b3")
+    ("nf-md-bluetooth_transfer" . "\xf00b4")
+    ("nf-md-blur" . "\xf00b5")
+    ("nf-md-blur_linear" . "\xf00b6")
+    ("nf-md-blur_off" . "\xf00b7")
+    ("nf-md-blur_radial" . "\xf00b8")
+    ("nf-md-bolt" . "\xf0db3")
+    ("nf-md-bomb" . "\xf0691")
+    ("nf-md-bomb_off" . "\xf06c5")
+    ("nf-md-bone" . "\xf00b9")
+    ("nf-md-bone_off" . "\xf19e0")
+    ("nf-md-book" . "\xf00ba")
+    ("nf-md-book_account" . "\xf13ad")
+    ("nf-md-book_account_outline" . "\xf13ae")
+    ("nf-md-book_alert" . "\xf167c")
+    ("nf-md-book_alert_outline" . "\xf167d")
+    ("nf-md-book_alphabet" . "\xf061d")
+    ("nf-md-book_arrow_down" . "\xf167e")
+    ("nf-md-book_arrow_down_outline" . "\xf167f")
+    ("nf-md-book_arrow_left" . "\xf1680")
+    ("nf-md-book_arrow_left_outline" . "\xf1681")
+    ("nf-md-book_arrow_right" . "\xf1682")
+    ("nf-md-book_arrow_right_outline" . "\xf1683")
+    ("nf-md-book_arrow_up" . "\xf1684")
+    ("nf-md-book_arrow_up_outline" . "\xf1685")
+    ("nf-md-book_cancel" . "\xf1686")
+    ("nf-md-book_cancel_outline" . "\xf1687")
+    ("nf-md-book_check" . "\xf14f3")
+    ("nf-md-book_check_outline" . "\xf14f4")
+    ("nf-md-book_clock" . "\xf1688")
+    ("nf-md-book_clock_outline" . "\xf1689")
+    ("nf-md-book_cog" . "\xf168a")
+    ("nf-md-book_cog_outline" . "\xf168b")
+    ("nf-md-book_cross" . "\xf00a2")
+    ("nf-md-book_edit" . "\xf168c")
+    ("nf-md-book_edit_outline" . "\xf168d")
+    ("nf-md-book_education" . "\xf16c9")
+    ("nf-md-book_education_outline" . "\xf16ca")
+    ("nf-md-book_heart" . "\xf1a1d")
+    ("nf-md-book_heart_outline" . "\xf1a1e")
+    ("nf-md-book_information_variant" . "\xf106f")
+    ("nf-md-book_lock" . "\xf079a")
+    ("nf-md-book_lock_open" . "\xf079b")
+    ("nf-md-book_lock_open_outline" . "\xf168e")
+    ("nf-md-book_lock_outline" . "\xf168f")
+    ("nf-md-book_marker" . "\xf1690")
+    ("nf-md-book_marker_outline" . "\xf1691")
+    ("nf-md-book_minus" . "\xf05d9")
+    ("nf-md-book_minus_multiple" . "\xf0a94")
+    ("nf-md-book_minus_multiple_outline" . "\xf090b")
+    ("nf-md-book_minus_outline" . "\xf1692")
+    ("nf-md-book_multiple" . "\xf00bb")
+    ("nf-md-book_multiple_outline" . "\xf0436")
+    ("nf-md-book_music" . "\xf0067")
+    ("nf-md-book_music_outline" . "\xf1693")
+    ("nf-md-book_off" . "\xf1694")
+    ("nf-md-book_off_outline" . "\xf1695")
+    ("nf-md-book_open" . "\xf00bd")
+    ("nf-md-book_open_blank_variant" . "\xf00be")
+    ("nf-md-book_open_outline" . "\xf0b63")
+    ("nf-md-book_open_page_variant" . "\xf05da")
+    ("nf-md-book_open_page_variant_outline" . "\xf15d6")
+    ("nf-md-book_open_variant" . "\xf14f7")
+    ("nf-md-book_outline" . "\xf0b64")
+    ("nf-md-book_play" . "\xf0e82")
+    ("nf-md-book_play_outline" . "\xf0e83")
+    ("nf-md-book_plus" . "\xf05db")
+    ("nf-md-book_plus_multiple" . "\xf0a95")
+    ("nf-md-book_plus_multiple_outline" . "\xf0ade")
+    ("nf-md-book_plus_outline" . "\xf1696")
+    ("nf-md-book_refresh" . "\xf1697")
+    ("nf-md-book_refresh_outline" . "\xf1698")
+    ("nf-md-book_remove" . "\xf0a97")
+    ("nf-md-book_remove_multiple" . "\xf0a96")
+    ("nf-md-book_remove_multiple_outline" . "\xf04ca")
+    ("nf-md-book_remove_outline" . "\xf1699")
+    ("nf-md-book_search" . "\xf0e84")
+    ("nf-md-book_search_outline" . "\xf0e85")
+    ("nf-md-book_settings" . "\xf169a")
+    ("nf-md-book_settings_outline" . "\xf169b")
+    ("nf-md-book_sync" . "\xf169c")
+    ("nf-md-book_sync_outline" . "\xf16c8")
+    ("nf-md-book_variant" . "\xf00bf")
+    ("nf-md-book_variant_multiple" . "\xf00bc")
+    ("nf-md-bookmark" . "\xf00c0")
+    ("nf-md-bookmark_box_multiple" . "\xf196c")
+    ("nf-md-bookmark_box_multiple_outline" . "\xf196d")
+    ("nf-md-bookmark_check" . "\xf00c1")
+    ("nf-md-bookmark_check_outline" . "\xf137b")
+    ("nf-md-bookmark_minus" . "\xf09cc")
+    ("nf-md-bookmark_minus_outline" . "\xf09cd")
+    ("nf-md-bookmark_multiple" . "\xf0e15")
+    ("nf-md-bookmark_multiple_outline" . "\xf0e16")
+    ("nf-md-bookmark_music" . "\xf00c2")
+    ("nf-md-bookmark_music_outline" . "\xf1379")
+    ("nf-md-bookmark_off" . "\xf09ce")
+    ("nf-md-bookmark_off_outline" . "\xf09cf")
+    ("nf-md-bookmark_outline" . "\xf00c3")
+    ("nf-md-bookmark_plus" . "\xf00c5")
+    ("nf-md-bookmark_plus_outline" . "\xf00c4")
+    ("nf-md-bookmark_remove" . "\xf00c6")
+    ("nf-md-bookmark_remove_outline" . "\xf137a")
+    ("nf-md-bookshelf" . "\xf125f")
+    ("nf-md-boom_gate" . "\xf0e86")
+    ("nf-md-boom_gate_alert" . "\xf0e87")
+    ("nf-md-boom_gate_alert_outline" . "\xf0e88")
+    ("nf-md-boom_gate_arrow_down" . "\xf0e89")
+    ("nf-md-boom_gate_arrow_down_outline" . "\xf0e8a")
+    ("nf-md-boom_gate_arrow_up" . "\xf0e8c")
+    ("nf-md-boom_gate_arrow_up_outline" . "\xf0e8d")
+    ("nf-md-boom_gate_outline" . "\xf0e8b")
+    ("nf-md-boom_gate_up" . "\xf17f9")
+    ("nf-md-boom_gate_up_outline" . "\xf17fa")
+    ("nf-md-boombox" . "\xf05dc")
+    ("nf-md-boomerang" . "\xf10cf")
+    ("nf-md-bootstrap" . "\xf06c6")
+    ("nf-md-border_all" . "\xf00c7")
+    ("nf-md-border_all_variant" . "\xf08a1")
+    ("nf-md-border_bottom" . "\xf00c8")
+    ("nf-md-border_bottom_variant" . "\xf08a2")
+    ("nf-md-border_color" . "\xf00c9")
+    ("nf-md-border_horizontal" . "\xf00ca")
+    ("nf-md-border_inside" . "\xf00cb")
+    ("nf-md-border_left" . "\xf00cc")
+    ("nf-md-border_left_variant" . "\xf08a3")
+    ("nf-md-border_none" . "\xf00cd")
+    ("nf-md-border_none_variant" . "\xf08a4")
+    ("nf-md-border_outside" . "\xf00ce")
+    ("nf-md-border_right" . "\xf00cf")
+    ("nf-md-border_right_variant" . "\xf08a5")
+    ("nf-md-border_style" . "\xf00d0")
+    ("nf-md-border_top" . "\xf00d1")
+    ("nf-md-border_top_variant" . "\xf08a6")
+    ("nf-md-border_vertical" . "\xf00d2")
+    ("nf-md-bottle_soda" . "\xf1070")
+    ("nf-md-bottle_soda_classic" . "\xf1071")
+    ("nf-md-bottle_soda_classic_outline" . "\xf1363")
+    ("nf-md-bottle_soda_outline" . "\xf1072")
+    ("nf-md-bottle_tonic" . "\xf112e")
+    ("nf-md-bottle_tonic_outline" . "\xf112f")
+    ("nf-md-bottle_tonic_plus" . "\xf1130")
+    ("nf-md-bottle_tonic_plus_outline" . "\xf1131")
+    ("nf-md-bottle_tonic_skull" . "\xf1132")
+    ("nf-md-bottle_tonic_skull_outline" . "\xf1133")
+    ("nf-md-bottle_wine" . "\xf0854")
+    ("nf-md-bottle_wine_outline" . "\xf1310")
+    ("nf-md-bow_arrow" . "\xf1841")
+    ("nf-md-bow_tie" . "\xf0678")
+    ("nf-md-bowl" . "\xf028e")
+    ("nf-md-bowl_mix" . "\xf0617")
+    ("nf-md-bowl_mix_outline" . "\xf02e4")
+    ("nf-md-bowl_outline" . "\xf02a9")
+    ("nf-md-bowling" . "\xf00d3")
+    ("nf-md-box" . "\xf00d4")
+    ("nf-md-box_cutter" . "\xf00d5")
+    ("nf-md-box_cutter_off" . "\xf0b4a")
+    ("nf-md-box_shadow" . "\xf0637")
+    ("nf-md-boxing_glove" . "\xf0b65")
+    ("nf-md-braille" . "\xf09d0")
+    ("nf-md-brain" . "\xf09d1")
+    ("nf-md-bread_slice" . "\xf0cee")
+    ("nf-md-bread_slice_outline" . "\xf0cef")
+    ("nf-md-bridge" . "\xf0618")
+    ("nf-md-briefcase" . "\xf00d6")
+    ("nf-md-briefcase_account" . "\xf0cf0")
+    ("nf-md-briefcase_account_outline" . "\xf0cf1")
+    ("nf-md-briefcase_arrow_left_right" . "\xf1a8d")
+    ("nf-md-briefcase_arrow_left_right_outline" . "\xf1a8e")
+    ("nf-md-briefcase_arrow_up_down" . "\xf1a8f")
+    ("nf-md-briefcase_arrow_up_down_outline" . "\xf1a90")
+    ("nf-md-briefcase_check" . "\xf00d7")
+    ("nf-md-briefcase_check_outline" . "\xf131e")
+    ("nf-md-briefcase_clock" . "\xf10d0")
+    ("nf-md-briefcase_clock_outline" . "\xf10d1")
+    ("nf-md-briefcase_download" . "\xf00d8")
+    ("nf-md-briefcase_download_outline" . "\xf0c3d")
+    ("nf-md-briefcase_edit" . "\xf0a98")
+    ("nf-md-briefcase_edit_outline" . "\xf0c3e")
+    ("nf-md-briefcase_eye" . "\xf17d9")
+    ("nf-md-briefcase_eye_outline" . "\xf17da")
+    ("nf-md-briefcase_minus" . "\xf0a2a")
+    ("nf-md-briefcase_minus_outline" . "\xf0c3f")
+    ("nf-md-briefcase_off" . "\xf1658")
+    ("nf-md-briefcase_off_outline" . "\xf1659")
+    ("nf-md-briefcase_outline" . "\xf0814")
+    ("nf-md-briefcase_plus" . "\xf0a2b")
+    ("nf-md-briefcase_plus_outline" . "\xf0c40")
+    ("nf-md-briefcase_remove" . "\xf0a2c")
+    ("nf-md-briefcase_remove_outline" . "\xf0c41")
+    ("nf-md-briefcase_search" . "\xf0a2d")
+    ("nf-md-briefcase_search_outline" . "\xf0c42")
+    ("nf-md-briefcase_upload" . "\xf00d9")
+    ("nf-md-briefcase_upload_outline" . "\xf0c43")
+    ("nf-md-briefcase_variant" . "\xf1494")
+    ("nf-md-briefcase_variant_off" . "\xf165a")
+    ("nf-md-briefcase_variant_off_outline" . "\xf165b")
+    ("nf-md-briefcase_variant_outline" . "\xf1495")
+    ("nf-md-brightness_1" . "\xf00da")
+    ("nf-md-brightness_2" . "\xf00db")
+    ("nf-md-brightness_3" . "\xf00dc")
+    ("nf-md-brightness_4" . "\xf00dd")
+    ("nf-md-brightness_5" . "\xf00de")
+    ("nf-md-brightness_6" . "\xf00df")
+    ("nf-md-brightness_7" . "\xf00e0")
+    ("nf-md-brightness_auto" . "\xf00e1")
+    ("nf-md-brightness_percent" . "\xf0cf2")
+    ("nf-md-broadcast" . "\xf1720")
+    ("nf-md-broadcast_off" . "\xf1721")
+    ("nf-md-broom" . "\xf00e2")
+    ("nf-md-brush" . "\xf00e3")
+    ("nf-md-brush_off" . "\xf1771")
+    ("nf-md-brush_outline" . "\xf1a0d")
+    ("nf-md-brush_variant" . "\xf1813")
+    ("nf-md-bucket" . "\xf1415")
+    ("nf-md-bucket_outline" . "\xf1416")
+    ("nf-md-buffet" . "\xf0578")
+    ("nf-md-bug" . "\xf00e4")
+    ("nf-md-bug_check" . "\xf0a2e")
+    ("nf-md-bug_check_outline" . "\xf0a2f")
+    ("nf-md-bug_outline" . "\xf0a30")
+    ("nf-md-bugle" . "\xf0db4")
+    ("nf-md-bulkhead_light" . "\xf1a2f")
+    ("nf-md-bulldozer" . "\xf0b22")
+    ("nf-md-bullet" . "\xf0cf3")
+    ("nf-md-bulletin_board" . "\xf00e5")
+    ("nf-md-bullhorn" . "\xf00e6")
+    ("nf-md-bullhorn_outline" . "\xf0b23")
+    ("nf-md-bullhorn_variant" . "\xf196e")
+    ("nf-md-bullhorn_variant_outline" . "\xf196f")
+    ("nf-md-bullseye" . "\xf05dd")
+    ("nf-md-bullseye_arrow" . "\xf08c9")
+    ("nf-md-bulma" . "\xf12e7")
+    ("nf-md-bunk_bed" . "\xf1302")
+    ("nf-md-bunk_bed_outline" . "\xf0097")
+    ("nf-md-bus" . "\xf00e7")
+    ("nf-md-bus_alert" . "\xf0a99")
+    ("nf-md-bus_articulated_end" . "\xf079c")
+    ("nf-md-bus_articulated_front" . "\xf079d")
+    ("nf-md-bus_clock" . "\xf08ca")
+    ("nf-md-bus_double_decker" . "\xf079e")
+    ("nf-md-bus_electric" . "\xf191d")
+    ("nf-md-bus_marker" . "\xf1212")
+    ("nf-md-bus_multiple" . "\xf0f3f")
+    ("nf-md-bus_school" . "\xf079f")
+    ("nf-md-bus_side" . "\xf07a0")
+    ("nf-md-bus_stop" . "\xf1012")
+    ("nf-md-bus_stop_covered" . "\xf1013")
+    ("nf-md-bus_stop_uncovered" . "\xf1014")
+    ("nf-md-butterfly" . "\xf1589")
+    ("nf-md-butterfly_outline" . "\xf158a")
+    ("nf-md-cabin_a_frame" . "\xf188c")
+    ("nf-md-cable_data" . "\xf1394")
+    ("nf-md-cached" . "\xf00e8")
+    ("nf-md-cactus" . "\xf0db5")
+    ("nf-md-cake" . "\xf00e9")
+    ("nf-md-cake_layered" . "\xf00ea")
+    ("nf-md-cake_variant" . "\xf00eb")
+    ("nf-md-cake_variant_outline" . "\xf17f0")
+    ("nf-md-calculator" . "\xf00ec")
+    ("nf-md-calculator_variant" . "\xf0a9a")
+    ("nf-md-calculator_variant_outline" . "\xf15a6")
+    ("nf-md-calendar" . "\xf00ed")
+    ("nf-md-calendar_account" . "\xf0ed7")
+    ("nf-md-calendar_account_outline" . "\xf0ed8")
+    ("nf-md-calendar_alert" . "\xf0a31")
+    ("nf-md-calendar_arrow_left" . "\xf1134")
+    ("nf-md-calendar_arrow_right" . "\xf1135")
+    ("nf-md-calendar_blank" . "\xf00ee")
+    ("nf-md-calendar_blank_multiple" . "\xf1073")
+    ("nf-md-calendar_blank_outline" . "\xf0b66")
+    ("nf-md-calendar_check" . "\xf00ef")
+    ("nf-md-calendar_check_outline" . "\xf0c44")
+    ("nf-md-calendar_clock" . "\xf00f0")
+    ("nf-md-calendar_clock_outline" . "\xf16e1")
+    ("nf-md-calendar_collapse_horizontal" . "\xf189d")
+    ("nf-md-calendar_cursor" . "\xf157b")
+    ("nf-md-calendar_edit" . "\xf08a7")
+    ("nf-md-calendar_end" . "\xf166c")
+    ("nf-md-calendar_expand_horizontal" . "\xf189e")
+    ("nf-md-calendar_export" . "\xf0b24")
+    ("nf-md-calendar_heart" . "\xf09d2")
+    ("nf-md-calendar_import" . "\xf0b25")
+    ("nf-md-calendar_lock" . "\xf1641")
+    ("nf-md-calendar_lock_outline" . "\xf1642")
+    ("nf-md-calendar_minus" . "\xf0d5c")
+    ("nf-md-calendar_month" . "\xf0e17")
+    ("nf-md-calendar_month_outline" . "\xf0e18")
+    ("nf-md-calendar_multiple" . "\xf00f1")
+    ("nf-md-calendar_multiple_check" . "\xf00f2")
+    ("nf-md-calendar_multiselect" . "\xf0a32")
+    ("nf-md-calendar_outline" . "\xf0b67")
+    ("nf-md-calendar_plus" . "\xf00f3")
+    ("nf-md-calendar_question" . "\xf0692")
+    ("nf-md-calendar_range" . "\xf0679")
+    ("nf-md-calendar_range_outline" . "\xf0b68")
+    ("nf-md-calendar_refresh" . "\xf01e1")
+    ("nf-md-calendar_refresh_outline" . "\xf0203")
+    ("nf-md-calendar_remove" . "\xf00f4")
+    ("nf-md-calendar_remove_outline" . "\xf0c45")
+    ("nf-md-calendar_search" . "\xf094c")
+    ("nf-md-calendar_star" . "\xf09d3")
+    ("nf-md-calendar_start" . "\xf166d")
+    ("nf-md-calendar_sync" . "\xf0e8e")
+    ("nf-md-calendar_sync_outline" . "\xf0e8f")
+    ("nf-md-calendar_text" . "\xf00f5")
+    ("nf-md-calendar_text_outline" . "\xf0c46")
+    ("nf-md-calendar_today" . "\xf00f6")
+    ("nf-md-calendar_today_outline" . "\xf1a30")
+    ("nf-md-calendar_week" . "\xf0a33")
+    ("nf-md-calendar_week_begin" . "\xf0a34")
+    ("nf-md-calendar_week_begin_outline" . "\xf1a31")
+    ("nf-md-calendar_week_end" . "\xf1a32")
+    ("nf-md-calendar_week_end_outline" . "\xf1a33")
+    ("nf-md-calendar_week_outline" . "\xf1a34")
+    ("nf-md-calendar_weekend" . "\xf0ed9")
+    ("nf-md-calendar_weekend_outline" . "\xf0eda")
+    ("nf-md-call_made" . "\xf00f7")
+    ("nf-md-call_merge" . "\xf00f8")
+    ("nf-md-call_missed" . "\xf00f9")
+    ("nf-md-call_received" . "\xf00fa")
+    ("nf-md-call_split" . "\xf00fb")
+    ("nf-md-camcorder" . "\xf00fc")
+    ("nf-md-camcorder_off" . "\xf00ff")
+    ("nf-md-camera" . "\xf0100")
+    ("nf-md-camera_account" . "\xf08cb")
+    ("nf-md-camera_burst" . "\xf0693")
+    ("nf-md-camera_control" . "\xf0b69")
+    ("nf-md-camera_document" . "\xf1871")
+    ("nf-md-camera_document_off" . "\xf1872")
+    ("nf-md-camera_enhance" . "\xf0101")
+    ("nf-md-camera_enhance_outline" . "\xf0b6a")
+    ("nf-md-camera_flip" . "\xf15d9")
+    ("nf-md-camera_flip_outline" . "\xf15da")
+    ("nf-md-camera_front" . "\xf0102")
+    ("nf-md-camera_front_variant" . "\xf0103")
+    ("nf-md-camera_gopro" . "\xf07a1")
+    ("nf-md-camera_image" . "\xf08cc")
+    ("nf-md-camera_iris" . "\xf0104")
+    ("nf-md-camera_lock" . "\xf1a14")
+    ("nf-md-camera_lock_outline" . "\xf1a15")
+    ("nf-md-camera_marker" . "\xf19a7")
+    ("nf-md-camera_marker_outline" . "\xf19a8")
+    ("nf-md-camera_metering_center" . "\xf07a2")
+    ("nf-md-camera_metering_matrix" . "\xf07a3")
+    ("nf-md-camera_metering_partial" . "\xf07a4")
+    ("nf-md-camera_metering_spot" . "\xf07a5")
+    ("nf-md-camera_off" . "\xf05df")
+    ("nf-md-camera_off_outline" . "\xf19bf")
+    ("nf-md-camera_outline" . "\xf0d5d")
+    ("nf-md-camera_party_mode" . "\xf0105")
+    ("nf-md-camera_plus" . "\xf0edb")
+    ("nf-md-camera_plus_outline" . "\xf0edc")
+    ("nf-md-camera_rear" . "\xf0106")
+    ("nf-md-camera_rear_variant" . "\xf0107")
+    ("nf-md-camera_retake" . "\xf0e19")
+    ("nf-md-camera_retake_outline" . "\xf0e1a")
+    ("nf-md-camera_switch" . "\xf0108")
+    ("nf-md-camera_switch_outline" . "\xf084a")
+    ("nf-md-camera_timer" . "\xf0109")
+    ("nf-md-camera_wireless" . "\xf0db6")
+    ("nf-md-camera_wireless_outline" . "\xf0db7")
+    ("nf-md-campfire" . "\xf0edd")
+    ("nf-md-cancel" . "\xf073a")
+    ("nf-md-candelabra" . "\xf17d2")
+    ("nf-md-candelabra_fire" . "\xf17d3")
+    ("nf-md-candle" . "\xf05e2")
+    ("nf-md-candy" . "\xf1970")
+    ("nf-md-candy_off" . "\xf1971")
+    ("nf-md-candy_off_outline" . "\xf1972")
+    ("nf-md-candy_outline" . "\xf1973")
+    ("nf-md-candycane" . "\xf010a")
+    ("nf-md-cannabis" . "\xf07a6")
+    ("nf-md-cannabis_off" . "\xf166e")
+    ("nf-md-caps_lock" . "\xf0a9b")
+    ("nf-md-car" . "\xf010b")
+    ("nf-md-car_2_plus" . "\xf1015")
+    ("nf-md-car_3_plus" . "\xf1016")
+    ("nf-md-car_arrow_left" . "\xf13b2")
+    ("nf-md-car_arrow_right" . "\xf13b3")
+    ("nf-md-car_back" . "\xf0e1b")
+    ("nf-md-car_battery" . "\xf010c")
+    ("nf-md-car_brake_abs" . "\xf0c47")
+    ("nf-md-car_brake_alert" . "\xf0c48")
+    ("nf-md-car_brake_fluid_level" . "\xf1909")
+    ("nf-md-car_brake_hold" . "\xf0d5e")
+    ("nf-md-car_brake_low_pressure" . "\xf190a")
+    ("nf-md-car_brake_parking" . "\xf0d5f")
+    ("nf-md-car_brake_retarder" . "\xf1017")
+    ("nf-md-car_brake_temperature" . "\xf190b")
+    ("nf-md-car_brake_worn_linings" . "\xf190c")
+    ("nf-md-car_child_seat" . "\xf0fa3")
+    ("nf-md-car_clock" . "\xf1974")
+    ("nf-md-car_clutch" . "\xf1018")
+    ("nf-md-car_cog" . "\xf13cc")
+    ("nf-md-car_connected" . "\xf010d")
+    ("nf-md-car_convertible" . "\xf07a7")
+    ("nf-md-car_coolant_level" . "\xf1019")
+    ("nf-md-car_cruise_control" . "\xf0d60")
+    ("nf-md-car_defrost_front" . "\xf0d61")
+    ("nf-md-car_defrost_rear" . "\xf0d62")
+    ("nf-md-car_door" . "\xf0b6b")
+    ("nf-md-car_door_lock" . "\xf109d")
+    ("nf-md-car_electric" . "\xf0b6c")
+    ("nf-md-car_electric_outline" . "\xf15b5")
+    ("nf-md-car_emergency" . "\xf160f")
+    ("nf-md-car_esp" . "\xf0c49")
+    ("nf-md-car_estate" . "\xf07a8")
+    ("nf-md-car_hatchback" . "\xf07a9")
+    ("nf-md-car_info" . "\xf11be")
+    ("nf-md-car_key" . "\xf0b6d")
+    ("nf-md-car_lifted_pickup" . "\xf152d")
+    ("nf-md-car_light_alert" . "\xf190d")
+    ("nf-md-car_light_dimmed" . "\xf0c4a")
+    ("nf-md-car_light_fog" . "\xf0c4b")
+    ("nf-md-car_light_high" . "\xf0c4c")
+    ("nf-md-car_limousine" . "\xf08cd")
+    ("nf-md-car_multiple" . "\xf0b6e")
+    ("nf-md-car_off" . "\xf0e1c")
+    ("nf-md-car_outline" . "\xf14ed")
+    ("nf-md-car_parking_lights" . "\xf0d63")
+    ("nf-md-car_pickup" . "\xf07aa")
+    ("nf-md-car_seat" . "\xf0fa4")
+    ("nf-md-car_seat_cooler" . "\xf0fa5")
+    ("nf-md-car_seat_heater" . "\xf0fa6")
+    ("nf-md-car_select" . "\xf1879")
+    ("nf-md-car_settings" . "\xf13cd")
+    ("nf-md-car_shift_pattern" . "\xf0f40")
+    ("nf-md-car_side" . "\xf07ab")
+    ("nf-md-car_speed_limiter" . "\xf190e")
+    ("nf-md-car_sports" . "\xf07ac")
+    ("nf-md-car_tire_alert" . "\xf0c4d")
+    ("nf-md-car_traction_control" . "\xf0d64")
+    ("nf-md-car_turbocharger" . "\xf101a")
+    ("nf-md-car_wash" . "\xf010e")
+    ("nf-md-car_windshield" . "\xf101b")
+    ("nf-md-car_windshield_outline" . "\xf101c")
+    ("nf-md-car_wireless" . "\xf1878")
+    ("nf-md-car_wrench" . "\xf1814")
+    ("nf-md-carabiner" . "\xf14c0")
+    ("nf-md-caravan" . "\xf07ad")
+    ("nf-md-card" . "\xf0b6f")
+    ("nf-md-card_account_details" . "\xf05d2")
+    ("nf-md-card_account_details_outline" . "\xf0dab")
+    ("nf-md-card_account_details_star" . "\xf02a3")
+    ("nf-md-card_account_details_star_outline" . "\xf06db")
+    ("nf-md-card_account_mail" . "\xf018e")
+    ("nf-md-card_account_mail_outline" . "\xf0e98")
+    ("nf-md-card_account_phone" . "\xf0e99")
+    ("nf-md-card_account_phone_outline" . "\xf0e9a")
+    ("nf-md-card_bulleted" . "\xf0b70")
+    ("nf-md-card_bulleted_off" . "\xf0b71")
+    ("nf-md-card_bulleted_off_outline" . "\xf0b72")
+    ("nf-md-card_bulleted_outline" . "\xf0b73")
+    ("nf-md-card_bulleted_settings" . "\xf0b74")
+    ("nf-md-card_bulleted_settings_outline" . "\xf0b75")
+    ("nf-md-card_minus" . "\xf1600")
+    ("nf-md-card_minus_outline" . "\xf1601")
+    ("nf-md-card_multiple" . "\xf17f1")
+    ("nf-md-card_multiple_outline" . "\xf17f2")
+    ("nf-md-card_off" . "\xf1602")
+    ("nf-md-card_off_outline" . "\xf1603")
+    ("nf-md-card_outline" . "\xf0b76")
+    ("nf-md-card_plus" . "\xf11ff")
+    ("nf-md-card_plus_outline" . "\xf1200")
+    ("nf-md-card_remove" . "\xf1604")
+    ("nf-md-card_remove_outline" . "\xf1605")
+    ("nf-md-card_search" . "\xf1074")
+    ("nf-md-card_search_outline" . "\xf1075")
+    ("nf-md-card_text" . "\xf0b77")
+    ("nf-md-card_text_outline" . "\xf0b78")
+    ("nf-md-cards" . "\xf0638")
+    ("nf-md-cards_club" . "\xf08ce")
+    ("nf-md-cards_club_outline" . "\xf189f")
+    ("nf-md-cards_diamond" . "\xf08cf")
+    ("nf-md-cards_diamond_outline" . "\xf101d")
+    ("nf-md-cards_heart" . "\xf08d0")
+    ("nf-md-cards_heart_outline" . "\xf18a0")
+    ("nf-md-cards_outline" . "\xf0639")
+    ("nf-md-cards_playing" . "\xf18a1")
+    ("nf-md-cards_playing_club" . "\xf18a2")
+    ("nf-md-cards_playing_club_multiple" . "\xf18a3")
+    ("nf-md-cards_playing_club_multiple_outline" . "\xf18a4")
+    ("nf-md-cards_playing_club_outline" . "\xf18a5")
+    ("nf-md-cards_playing_diamond" . "\xf18a6")
+    ("nf-md-cards_playing_diamond_multiple" . "\xf18a7")
+    ("nf-md-cards_playing_diamond_multiple_outline" . "\xf18a8")
+    ("nf-md-cards_playing_diamond_outline" . "\xf18a9")
+    ("nf-md-cards_playing_heart" . "\xf18aa")
+    ("nf-md-cards_playing_heart_multiple" . "\xf18ab")
+    ("nf-md-cards_playing_heart_multiple_outline" . "\xf18ac")
+    ("nf-md-cards_playing_heart_outline" . "\xf18ad")
+    ("nf-md-cards_playing_outline" . "\xf063a")
+    ("nf-md-cards_playing_spade" . "\xf18ae")
+    ("nf-md-cards_playing_spade_multiple" . "\xf18af")
+    ("nf-md-cards_playing_spade_multiple_outline" . "\xf18b0")
+    ("nf-md-cards_playing_spade_outline" . "\xf18b1")
+    ("nf-md-cards_spade" . "\xf08d1")
+    ("nf-md-cards_spade_outline" . "\xf18b2")
+    ("nf-md-cards_variant" . "\xf06c7")
+    ("nf-md-carrot" . "\xf010f")
+    ("nf-md-cart" . "\xf0110")
+    ("nf-md-cart_arrow_down" . "\xf0d66")
+    ("nf-md-cart_arrow_right" . "\xf0c4e")
+    ("nf-md-cart_arrow_up" . "\xf0d67")
+    ("nf-md-cart_check" . "\xf15ea")
+    ("nf-md-cart_heart" . "\xf18e0")
+    ("nf-md-cart_minus" . "\xf0d68")
+    ("nf-md-cart_off" . "\xf066b")
+    ("nf-md-cart_outline" . "\xf0111")
+    ("nf-md-cart_plus" . "\xf0112")
+    ("nf-md-cart_remove" . "\xf0d69")
+    ("nf-md-cart_variant" . "\xf15eb")
+    ("nf-md-case_sensitive_alt" . "\xf0113")
+    ("nf-md-cash" . "\xf0114")
+    ("nf-md-cash_100" . "\xf0115")
+    ("nf-md-cash_check" . "\xf14ee")
+    ("nf-md-cash_clock" . "\xf1a91")
+    ("nf-md-cash_fast" . "\xf185c")
+    ("nf-md-cash_lock" . "\xf14ea")
+    ("nf-md-cash_lock_open" . "\xf14eb")
+    ("nf-md-cash_marker" . "\xf0db8")
+    ("nf-md-cash_minus" . "\xf1260")
+    ("nf-md-cash_multiple" . "\xf0116")
+    ("nf-md-cash_plus" . "\xf1261")
+    ("nf-md-cash_refund" . "\xf0a9c")
+    ("nf-md-cash_register" . "\xf0cf4")
+    ("nf-md-cash_remove" . "\xf1262")
+    ("nf-md-cash_sync" . "\xf1a92")
+    ("nf-md-cassette" . "\xf09d4")
+    ("nf-md-cast" . "\xf0118")
+    ("nf-md-cast_audio" . "\xf101e")
+    ("nf-md-cast_audio_variant" . "\xf1749")
+    ("nf-md-cast_connected" . "\xf0119")
+    ("nf-md-cast_education" . "\xf0e1d")
+    ("nf-md-cast_off" . "\xf078a")
+    ("nf-md-cast_variant" . "\xf001f")
+    ("nf-md-castle" . "\xf011a")
+    ("nf-md-cat" . "\xf011b")
+    ("nf-md-cctv" . "\xf07ae")
+    ("nf-md-cctv_off" . "\xf185f")
+    ("nf-md-ceiling_fan" . "\xf1797")
+    ("nf-md-ceiling_fan_light" . "\xf1798")
+    ("nf-md-ceiling_light" . "\xf0769")
+    ("nf-md-ceiling_light_multiple" . "\xf18dd")
+    ("nf-md-ceiling_light_multiple_outline" . "\xf18de")
+    ("nf-md-ceiling_light_outline" . "\xf17c7")
+    ("nf-md-cellphone" . "\xf011c")
+    ("nf-md-cellphone_arrow_down" . "\xf09d5")
+    ("nf-md-cellphone_arrow_down_variant" . "\xf19c5")
+    ("nf-md-cellphone_basic" . "\xf011e")
+    ("nf-md-cellphone_charging" . "\xf1397")
+    ("nf-md-cellphone_check" . "\xf17fd")
+    ("nf-md-cellphone_cog" . "\xf0951")
+    ("nf-md-cellphone_dock" . "\xf011f")
+    ("nf-md-cellphone_information" . "\xf0f41")
+    ("nf-md-cellphone_key" . "\xf094e")
+    ("nf-md-cellphone_link" . "\xf0121")
+    ("nf-md-cellphone_link_off" . "\xf0122")
+    ("nf-md-cellphone_lock" . "\xf094f")
+    ("nf-md-cellphone_marker" . "\xf183a")
+    ("nf-md-cellphone_message" . "\xf08d3")
+    ("nf-md-cellphone_message_off" . "\xf10d2")
+    ("nf-md-cellphone_nfc" . "\xf0e90")
+    ("nf-md-cellphone_nfc_off" . "\xf12d8")
+    ("nf-md-cellphone_off" . "\xf0950")
+    ("nf-md-cellphone_play" . "\xf101f")
+    ("nf-md-cellphone_remove" . "\xf094d")
+    ("nf-md-cellphone_screenshot" . "\xf0a35")
+    ("nf-md-cellphone_settings" . "\xf0123")
+    ("nf-md-cellphone_sound" . "\xf0952")
+    ("nf-md-cellphone_text" . "\xf08d2")
+    ("nf-md-cellphone_wireless" . "\xf0815")
+    ("nf-md-centos" . "\xf111a")
+    ("nf-md-certificate" . "\xf0124")
+    ("nf-md-certificate_outline" . "\xf1188")
+    ("nf-md-chair_rolling" . "\xf0f48")
+    ("nf-md-chair_school" . "\xf0125")
+    ("nf-md-chandelier" . "\xf1793")
+    ("nf-md-charity" . "\xf0c4f")
+    ("nf-md-chart_arc" . "\xf0126")
+    ("nf-md-chart_areaspline" . "\xf0127")
+    ("nf-md-chart_areaspline_variant" . "\xf0e91")
+    ("nf-md-chart_bar" . "\xf0128")
+    ("nf-md-chart_bar_stacked" . "\xf076a")
+    ("nf-md-chart_bell_curve" . "\xf0c50")
+    ("nf-md-chart_bell_curve_cumulative" . "\xf0fa7")
+    ("nf-md-chart_box" . "\xf154d")
+    ("nf-md-chart_box_outline" . "\xf154e")
+    ("nf-md-chart_box_plus_outline" . "\xf154f")
+    ("nf-md-chart_bubble" . "\xf05e3")
+    ("nf-md-chart_donut" . "\xf07af")
+    ("nf-md-chart_donut_variant" . "\xf07b0")
+    ("nf-md-chart_gantt" . "\xf066c")
+    ("nf-md-chart_histogram" . "\xf0129")
+    ("nf-md-chart_line" . "\xf012a")
+    ("nf-md-chart_line_stacked" . "\xf076b")
+    ("nf-md-chart_line_variant" . "\xf07b1")
+    ("nf-md-chart_multiline" . "\xf08d4")
+    ("nf-md-chart_multiple" . "\xf1213")
+    ("nf-md-chart_pie" . "\xf012b")
+    ("nf-md-chart_ppf" . "\xf1380")
+    ("nf-md-chart_sankey" . "\xf11df")
+    ("nf-md-chart_sankey_variant" . "\xf11e0")
+    ("nf-md-chart_scatter_plot" . "\xf0e92")
+    ("nf-md-chart_scatter_plot_hexbin" . "\xf066d")
+    ("nf-md-chart_timeline" . "\xf066e")
+    ("nf-md-chart_timeline_variant" . "\xf0e93")
+    ("nf-md-chart_timeline_variant_shimmer" . "\xf15b6")
+    ("nf-md-chart_tree" . "\xf0e94")
+    ("nf-md-chart_waterfall" . "\xf1918")
+    ("nf-md-chat" . "\xf0b79")
+    ("nf-md-chat_alert" . "\xf0b7a")
+    ("nf-md-chat_alert_outline" . "\xf12c9")
+    ("nf-md-chat_minus" . "\xf1410")
+    ("nf-md-chat_minus_outline" . "\xf1413")
+    ("nf-md-chat_outline" . "\xf0ede")
+    ("nf-md-chat_plus" . "\xf140f")
+    ("nf-md-chat_plus_outline" . "\xf1412")
+    ("nf-md-chat_processing" . "\xf0b7b")
+    ("nf-md-chat_processing_outline" . "\xf12ca")
+    ("nf-md-chat_question" . "\xf1738")
+    ("nf-md-chat_question_outline" . "\xf1739")
+    ("nf-md-chat_remove" . "\xf1411")
+    ("nf-md-chat_remove_outline" . "\xf1414")
+    ("nf-md-chat_sleep" . "\xf12d1")
+    ("nf-md-chat_sleep_outline" . "\xf12d2")
+    ("nf-md-check" . "\xf012c")
+    ("nf-md-check_all" . "\xf012d")
+    ("nf-md-check_bold" . "\xf0e1e")
+    ("nf-md-check_circle" . "\xf05e0")
+    ("nf-md-check_circle_outline" . "\xf05e1")
+    ("nf-md-check_decagram" . "\xf0791")
+    ("nf-md-check_decagram_outline" . "\xf1740")
+    ("nf-md-check_network" . "\xf0c53")
+    ("nf-md-check_network_outline" . "\xf0c54")
+    ("nf-md-check_outline" . "\xf0855")
+    ("nf-md-check_underline" . "\xf0e1f")
+    ("nf-md-check_underline_circle" . "\xf0e20")
+    ("nf-md-check_underline_circle_outline" . "\xf0e21")
+    ("nf-md-checkbook" . "\xf0a9d")
+    ("nf-md-checkbox_blank" . "\xf012e")
+    ("nf-md-checkbox_blank_badge" . "\xf1176")
+    ("nf-md-checkbox_blank_badge_outline" . "\xf0117")
+    ("nf-md-checkbox_blank_circle" . "\xf012f")
+    ("nf-md-checkbox_blank_circle_outline" . "\xf0130")
+    ("nf-md-checkbox_blank_off" . "\xf12ec")
+    ("nf-md-checkbox_blank_off_outline" . "\xf12ed")
+    ("nf-md-checkbox_blank_outline" . "\xf0131")
+    ("nf-md-checkbox_intermediate" . "\xf0856")
+    ("nf-md-checkbox_marked" . "\xf0132")
+    ("nf-md-checkbox_marked_circle" . "\xf0133")
+    ("nf-md-checkbox_marked_circle_outline" . "\xf0134")
+    ("nf-md-checkbox_marked_circle_plus_outline" . "\xf1927")
+    ("nf-md-checkbox_marked_outline" . "\xf0135")
+    ("nf-md-checkbox_multiple_blank" . "\xf0136")
+    ("nf-md-checkbox_multiple_blank_circle" . "\xf063b")
+    ("nf-md-checkbox_multiple_blank_circle_outline" . "\xf063c")
+    ("nf-md-checkbox_multiple_blank_outline" . "\xf0137")
+    ("nf-md-checkbox_multiple_marked" . "\xf0138")
+    ("nf-md-checkbox_multiple_marked_circle" . "\xf063d")
+    ("nf-md-checkbox_multiple_marked_circle_outline" . "\xf063e")
+    ("nf-md-checkbox_multiple_marked_outline" . "\xf0139")
+    ("nf-md-checkbox_multiple_outline" . "\xf0c51")
+    ("nf-md-checkbox_outline" . "\xf0c52")
+    ("nf-md-checkerboard" . "\xf013a")
+    ("nf-md-checkerboard_minus" . "\xf1202")
+    ("nf-md-checkerboard_plus" . "\xf1201")
+    ("nf-md-checkerboard_remove" . "\xf1203")
+    ("nf-md-cheese" . "\xf12b9")
+    ("nf-md-cheese_off" . "\xf13ee")
+    ("nf-md-chef_hat" . "\xf0b7c")
+    ("nf-md-chemical_weapon" . "\xf013b")
+    ("nf-md-chess_bishop" . "\xf085c")
+    ("nf-md-chess_king" . "\xf0857")
+    ("nf-md-chess_knight" . "\xf0858")
+    ("nf-md-chess_pawn" . "\xf0859")
+    ("nf-md-chess_queen" . "\xf085a")
+    ("nf-md-chess_rook" . "\xf085b")
+    ("nf-md-chevron_double_down" . "\xf013c")
+    ("nf-md-chevron_double_left" . "\xf013d")
+    ("nf-md-chevron_double_right" . "\xf013e")
+    ("nf-md-chevron_double_up" . "\xf013f")
+    ("nf-md-chevron_down" . "\xf0140")
+    ("nf-md-chevron_down_box" . "\xf09d6")
+    ("nf-md-chevron_down_box_outline" . "\xf09d7")
+    ("nf-md-chevron_down_circle" . "\xf0b26")
+    ("nf-md-chevron_down_circle_outline" . "\xf0b27")
+    ("nf-md-chevron_left" . "\xf0141")
+    ("nf-md-chevron_left_box" . "\xf09d8")
+    ("nf-md-chevron_left_box_outline" . "\xf09d9")
+    ("nf-md-chevron_left_circle" . "\xf0b28")
+    ("nf-md-chevron_left_circle_outline" . "\xf0b29")
+    ("nf-md-chevron_right" . "\xf0142")
+    ("nf-md-chevron_right_box" . "\xf09da")
+    ("nf-md-chevron_right_box_outline" . "\xf09db")
+    ("nf-md-chevron_right_circle" . "\xf0b2a")
+    ("nf-md-chevron_right_circle_outline" . "\xf0b2b")
+    ("nf-md-chevron_triple_down" . "\xf0db9")
+    ("nf-md-chevron_triple_left" . "\xf0dba")
+    ("nf-md-chevron_triple_right" . "\xf0dbb")
+    ("nf-md-chevron_triple_up" . "\xf0dbc")
+    ("nf-md-chevron_up" . "\xf0143")
+    ("nf-md-chevron_up_box" . "\xf09dc")
+    ("nf-md-chevron_up_box_outline" . "\xf09dd")
+    ("nf-md-chevron_up_circle" . "\xf0b2c")
+    ("nf-md-chevron_up_circle_outline" . "\xf0b2d")
+    ("nf-md-chili_alert" . "\xf17ea")
+    ("nf-md-chili_alert_outline" . "\xf17eb")
+    ("nf-md-chili_hot" . "\xf07b2")
+    ("nf-md-chili_hot_outline" . "\xf17ec")
+    ("nf-md-chili_medium" . "\xf07b3")
+    ("nf-md-chili_medium_outline" . "\xf17ed")
+    ("nf-md-chili_mild" . "\xf07b4")
+    ("nf-md-chili_mild_outline" . "\xf17ee")
+    ("nf-md-chili_off" . "\xf1467")
+    ("nf-md-chili_off_outline" . "\xf17ef")
+    ("nf-md-chip" . "\xf061a")
+    ("nf-md-church" . "\xf0144")
+    ("nf-md-cigar" . "\xf1189")
+    ("nf-md-cigar_off" . "\xf141b")
+    ("nf-md-circle" . "\xf0765")
+    ("nf-md-circle_box" . "\xf15dc")
+    ("nf-md-circle_box_outline" . "\xf15dd")
+    ("nf-md-circle_double" . "\xf0e95")
+    ("nf-md-circle_edit_outline" . "\xf08d5")
+    ("nf-md-circle_expand" . "\xf0e96")
+    ("nf-md-circle_half" . "\xf1395")
+    ("nf-md-circle_half_full" . "\xf1396")
+    ("nf-md-circle_medium" . "\xf09de")
+    ("nf-md-circle_multiple" . "\xf0b38")
+    ("nf-md-circle_multiple_outline" . "\xf0695")
+    ("nf-md-circle_off_outline" . "\xf10d3")
+    ("nf-md-circle_opacity" . "\xf1853")
+    ("nf-md-circle_outline" . "\xf0766")
+    ("nf-md-circle_slice_1" . "\xf0a9e")
+    ("nf-md-circle_slice_2" . "\xf0a9f")
+    ("nf-md-circle_slice_3" . "\xf0aa0")
+    ("nf-md-circle_slice_4" . "\xf0aa1")
+    ("nf-md-circle_slice_5" . "\xf0aa2")
+    ("nf-md-circle_slice_6" . "\xf0aa3")
+    ("nf-md-circle_slice_7" . "\xf0aa4")
+    ("nf-md-circle_slice_8" . "\xf0aa5")
+    ("nf-md-circle_small" . "\xf09df")
+    ("nf-md-circular_saw" . "\xf0e22")
+    ("nf-md-city" . "\xf0146")
+    ("nf-md-city_variant" . "\xf0a36")
+    ("nf-md-city_variant_outline" . "\xf0a37")
+    ("nf-md-clipboard" . "\xf0147")
+    ("nf-md-clipboard_account" . "\xf0148")
+    ("nf-md-clipboard_account_outline" . "\xf0c55")
+    ("nf-md-clipboard_alert" . "\xf0149")
+    ("nf-md-clipboard_alert_outline" . "\xf0cf7")
+    ("nf-md-clipboard_arrow_down" . "\xf014a")
+    ("nf-md-clipboard_arrow_down_outline" . "\xf0c56")
+    ("nf-md-clipboard_arrow_left" . "\xf014b")
+    ("nf-md-clipboard_arrow_left_outline" . "\xf0cf8")
+    ("nf-md-clipboard_arrow_right" . "\xf0cf9")
+    ("nf-md-clipboard_arrow_right_outline" . "\xf0cfa")
+    ("nf-md-clipboard_arrow_up" . "\xf0c57")
+    ("nf-md-clipboard_arrow_up_outline" . "\xf0c58")
+    ("nf-md-clipboard_check" . "\xf014e")
+    ("nf-md-clipboard_check_multiple" . "\xf1263")
+    ("nf-md-clipboard_check_multiple_outline" . "\xf1264")
+    ("nf-md-clipboard_check_outline" . "\xf08a8")
+    ("nf-md-clipboard_clock" . "\xf16e2")
+    ("nf-md-clipboard_clock_outline" . "\xf16e3")
+    ("nf-md-clipboard_edit" . "\xf14e5")
+    ("nf-md-clipboard_edit_outline" . "\xf14e6")
+    ("nf-md-clipboard_file" . "\xf1265")
+    ("nf-md-clipboard_file_outline" . "\xf1266")
+    ("nf-md-clipboard_flow" . "\xf06c8")
+    ("nf-md-clipboard_flow_outline" . "\xf1117")
+    ("nf-md-clipboard_list" . "\xf10d4")
+    ("nf-md-clipboard_list_outline" . "\xf10d5")
+    ("nf-md-clipboard_minus" . "\xf1618")
+    ("nf-md-clipboard_minus_outline" . "\xf1619")
+    ("nf-md-clipboard_multiple" . "\xf1267")
+    ("nf-md-clipboard_multiple_outline" . "\xf1268")
+    ("nf-md-clipboard_off" . "\xf161a")
+    ("nf-md-clipboard_off_outline" . "\xf161b")
+    ("nf-md-clipboard_outline" . "\xf014c")
+    ("nf-md-clipboard_play" . "\xf0c59")
+    ("nf-md-clipboard_play_multiple" . "\xf1269")
+    ("nf-md-clipboard_play_multiple_outline" . "\xf126a")
+    ("nf-md-clipboard_play_outline" . "\xf0c5a")
+    ("nf-md-clipboard_plus" . "\xf0751")
+    ("nf-md-clipboard_plus_outline" . "\xf131f")
+    ("nf-md-clipboard_pulse" . "\xf085d")
+    ("nf-md-clipboard_pulse_outline" . "\xf085e")
+    ("nf-md-clipboard_remove" . "\xf161c")
+    ("nf-md-clipboard_remove_outline" . "\xf161d")
+    ("nf-md-clipboard_search" . "\xf161e")
+    ("nf-md-clipboard_search_outline" . "\xf161f")
+    ("nf-md-clipboard_text" . "\xf014d")
+    ("nf-md-clipboard_text_clock" . "\xf18f9")
+    ("nf-md-clipboard_text_clock_outline" . "\xf18fa")
+    ("nf-md-clipboard_text_multiple" . "\xf126b")
+    ("nf-md-clipboard_text_multiple_outline" . "\xf126c")
+    ("nf-md-clipboard_text_off" . "\xf1620")
+    ("nf-md-clipboard_text_off_outline" . "\xf1621")
+    ("nf-md-clipboard_text_outline" . "\xf0a38")
+    ("nf-md-clipboard_text_play" . "\xf0c5b")
+    ("nf-md-clipboard_text_play_outline" . "\xf0c5c")
+    ("nf-md-clipboard_text_search" . "\xf1622")
+    ("nf-md-clipboard_text_search_outline" . "\xf1623")
+    ("nf-md-clippy" . "\xf014f")
+    ("nf-md-clock" . "\xf0954")
+    ("nf-md-clock_alert" . "\xf0955")
+    ("nf-md-clock_alert_outline" . "\xf05ce")
+    ("nf-md-clock_check" . "\xf0fa8")
+    ("nf-md-clock_check_outline" . "\xf0fa9")
+    ("nf-md-clock_digital" . "\xf0e97")
+    ("nf-md-clock_edit" . "\xf19ba")
+    ("nf-md-clock_edit_outline" . "\xf19bb")
+    ("nf-md-clock_end" . "\xf0151")
+    ("nf-md-clock_fast" . "\xf0152")
+    ("nf-md-clock_in" . "\xf0153")
+    ("nf-md-clock_minus" . "\xf1863")
+    ("nf-md-clock_minus_outline" . "\xf1864")
+    ("nf-md-clock_out" . "\xf0154")
+    ("nf-md-clock_outline" . "\xf0150")
+    ("nf-md-clock_plus" . "\xf1861")
+    ("nf-md-clock_plus_outline" . "\xf1862")
+    ("nf-md-clock_remove" . "\xf1865")
+    ("nf-md-clock_remove_outline" . "\xf1866")
+    ("nf-md-clock_start" . "\xf0155")
+    ("nf-md-clock_time_eight" . "\xf1446")
+    ("nf-md-clock_time_eight_outline" . "\xf1452")
+    ("nf-md-clock_time_eleven" . "\xf1449")
+    ("nf-md-clock_time_eleven_outline" . "\xf1455")
+    ("nf-md-clock_time_five" . "\xf1443")
+    ("nf-md-clock_time_five_outline" . "\xf144f")
+    ("nf-md-clock_time_four" . "\xf1442")
+    ("nf-md-clock_time_four_outline" . "\xf144e")
+    ("nf-md-clock_time_nine" . "\xf1447")
+    ("nf-md-clock_time_nine_outline" . "\xf1453")
+    ("nf-md-clock_time_one" . "\xf143f")
+    ("nf-md-clock_time_one_outline" . "\xf144b")
+    ("nf-md-clock_time_seven" . "\xf1445")
+    ("nf-md-clock_time_seven_outline" . "\xf1451")
+    ("nf-md-clock_time_six" . "\xf1444")
+    ("nf-md-clock_time_six_outline" . "\xf1450")
+    ("nf-md-clock_time_ten" . "\xf1448")
+    ("nf-md-clock_time_ten_outline" . "\xf1454")
+    ("nf-md-clock_time_three" . "\xf1441")
+    ("nf-md-clock_time_three_outline" . "\xf144d")
+    ("nf-md-clock_time_twelve" . "\xf144a")
+    ("nf-md-clock_time_twelve_outline" . "\xf1456")
+    ("nf-md-clock_time_two" . "\xf1440")
+    ("nf-md-clock_time_two_outline" . "\xf144c")
+    ("nf-md-close" . "\xf0156")
+    ("nf-md-close_box" . "\xf0157")
+    ("nf-md-close_box_multiple" . "\xf0c5d")
+    ("nf-md-close_box_multiple_outline" . "\xf0c5e")
+    ("nf-md-close_box_outline" . "\xf0158")
+    ("nf-md-close_circle" . "\xf0159")
+    ("nf-md-close_circle_multiple" . "\xf062a")
+    ("nf-md-close_circle_multiple_outline" . "\xf0883")
+    ("nf-md-close_circle_outline" . "\xf015a")
+    ("nf-md-close_network" . "\xf015b")
+    ("nf-md-close_network_outline" . "\xf0c5f")
+    ("nf-md-close_octagon" . "\xf015c")
+    ("nf-md-close_octagon_outline" . "\xf015d")
+    ("nf-md-close_outline" . "\xf06c9")
+    ("nf-md-close_thick" . "\xf1398")
+    ("nf-md-closed_caption" . "\xf015e")
+    ("nf-md-closed_caption_outline" . "\xf0dbd")
+    ("nf-md-cloud" . "\xf015f")
+    ("nf-md-cloud_alert" . "\xf09e0")
+    ("nf-md-cloud_braces" . "\xf07b5")
+    ("nf-md-cloud_check" . "\xf0160")
+    ("nf-md-cloud_check_outline" . "\xf12cc")
+    ("nf-md-cloud_circle" . "\xf0161")
+    ("nf-md-cloud_download" . "\xf0162")
+    ("nf-md-cloud_download_outline" . "\xf0b7d")
+    ("nf-md-cloud_lock" . "\xf11f1")
+    ("nf-md-cloud_lock_outline" . "\xf11f2")
+    ("nf-md-cloud_off_outline" . "\xf0164")
+    ("nf-md-cloud_outline" . "\xf0163")
+    ("nf-md-cloud_percent" . "\xf1a35")
+    ("nf-md-cloud_percent_outline" . "\xf1a36")
+    ("nf-md-cloud_print" . "\xf0165")
+    ("nf-md-cloud_print_outline" . "\xf0166")
+    ("nf-md-cloud_question" . "\xf0a39")
+    ("nf-md-cloud_refresh" . "\xf052a")
+    ("nf-md-cloud_search" . "\xf0956")
+    ("nf-md-cloud_search_outline" . "\xf0957")
+    ("nf-md-cloud_sync" . "\xf063f")
+    ("nf-md-cloud_sync_outline" . "\xf12d6")
+    ("nf-md-cloud_tags" . "\xf07b6")
+    ("nf-md-cloud_upload" . "\xf0167")
+    ("nf-md-cloud_upload_outline" . "\xf0b7e")
+    ("nf-md-clover" . "\xf0816")
+    ("nf-md-coach_lamp" . "\xf1020")
+    ("nf-md-coach_lamp_variant" . "\xf1a37")
+    ("nf-md-coat_rack" . "\xf109e")
+    ("nf-md-code_array" . "\xf0168")
+    ("nf-md-code_braces" . "\xf0169")
+    ("nf-md-code_braces_box" . "\xf10d6")
+    ("nf-md-code_brackets" . "\xf016a")
+    ("nf-md-code_equal" . "\xf016b")
+    ("nf-md-code_greater_than" . "\xf016c")
+    ("nf-md-code_greater_than_or_equal" . "\xf016d")
+    ("nf-md-code_json" . "\xf0626")
+    ("nf-md-code_less_than" . "\xf016e")
+    ("nf-md-code_less_than_or_equal" . "\xf016f")
+    ("nf-md-code_not_equal" . "\xf0170")
+    ("nf-md-code_not_equal_variant" . "\xf0171")
+    ("nf-md-code_parentheses" . "\xf0172")
+    ("nf-md-code_parentheses_box" . "\xf10d7")
+    ("nf-md-code_string" . "\xf0173")
+    ("nf-md-code_tags" . "\xf0174")
+    ("nf-md-code_tags_check" . "\xf0694")
+    ("nf-md-codepen" . "\xf0175")
+    ("nf-md-coffee" . "\xf0176")
+    ("nf-md-coffee_maker" . "\xf109f")
+    ("nf-md-coffee_maker_check" . "\xf1931")
+    ("nf-md-coffee_maker_check_outline" . "\xf1932")
+    ("nf-md-coffee_maker_outline" . "\xf181b")
+    ("nf-md-coffee_off" . "\xf0faa")
+    ("nf-md-coffee_off_outline" . "\xf0fab")
+    ("nf-md-coffee_outline" . "\xf06ca")
+    ("nf-md-coffee_to_go" . "\xf0177")
+    ("nf-md-coffee_to_go_outline" . "\xf130e")
+    ("nf-md-coffin" . "\xf0b7f")
+    ("nf-md-cog" . "\xf0493")
+    ("nf-md-cog_box" . "\xf0494")
+    ("nf-md-cog_clockwise" . "\xf11dd")
+    ("nf-md-cog_counterclockwise" . "\xf11de")
+    ("nf-md-cog_off" . "\xf13ce")
+    ("nf-md-cog_off_outline" . "\xf13cf")
+    ("nf-md-cog_outline" . "\xf08bb")
+    ("nf-md-cog_pause" . "\xf1933")
+    ("nf-md-cog_pause_outline" . "\xf1934")
+    ("nf-md-cog_play" . "\xf1935")
+    ("nf-md-cog_play_outline" . "\xf1936")
+    ("nf-md-cog_refresh" . "\xf145e")
+    ("nf-md-cog_refresh_outline" . "\xf145f")
+    ("nf-md-cog_stop" . "\xf1937")
+    ("nf-md-cog_stop_outline" . "\xf1938")
+    ("nf-md-cog_sync" . "\xf1460")
+    ("nf-md-cog_sync_outline" . "\xf1461")
+    ("nf-md-cog_transfer" . "\xf105b")
+    ("nf-md-cog_transfer_outline" . "\xf105c")
+    ("nf-md-cogs" . "\xf08d6")
+    ("nf-md-collage" . "\xf0640")
+    ("nf-md-collapse_all" . "\xf0aa6")
+    ("nf-md-collapse_all_outline" . "\xf0aa7")
+    ("nf-md-color_helper" . "\xf0179")
+    ("nf-md-comma" . "\xf0e23")
+    ("nf-md-comma_box" . "\xf0e2b")
+    ("nf-md-comma_box_outline" . "\xf0e24")
+    ("nf-md-comma_circle" . "\xf0e25")
+    ("nf-md-comma_circle_outline" . "\xf0e26")
+    ("nf-md-comment" . "\xf017a")
+    ("nf-md-comment_account" . "\xf017b")
+    ("nf-md-comment_account_outline" . "\xf017c")
+    ("nf-md-comment_alert" . "\xf017d")
+    ("nf-md-comment_alert_outline" . "\xf017e")
+    ("nf-md-comment_arrow_left" . "\xf09e1")
+    ("nf-md-comment_arrow_left_outline" . "\xf09e2")
+    ("nf-md-comment_arrow_right" . "\xf09e3")
+    ("nf-md-comment_arrow_right_outline" . "\xf09e4")
+    ("nf-md-comment_bookmark" . "\xf15ae")
+    ("nf-md-comment_bookmark_outline" . "\xf15af")
+    ("nf-md-comment_check" . "\xf017f")
+    ("nf-md-comment_check_outline" . "\xf0180")
+    ("nf-md-comment_edit" . "\xf11bf")
+    ("nf-md-comment_edit_outline" . "\xf12c4")
+    ("nf-md-comment_eye" . "\xf0a3a")
+    ("nf-md-comment_eye_outline" . "\xf0a3b")
+    ("nf-md-comment_flash" . "\xf15b0")
+    ("nf-md-comment_flash_outline" . "\xf15b1")
+    ("nf-md-comment_minus" . "\xf15df")
+    ("nf-md-comment_minus_outline" . "\xf15e0")
+    ("nf-md-comment_multiple" . "\xf085f")
+    ("nf-md-comment_multiple_outline" . "\xf0181")
+    ("nf-md-comment_off" . "\xf15e1")
+    ("nf-md-comment_off_outline" . "\xf15e2")
+    ("nf-md-comment_outline" . "\xf0182")
+    ("nf-md-comment_plus" . "\xf09e5")
+    ("nf-md-comment_plus_outline" . "\xf0183")
+    ("nf-md-comment_processing" . "\xf0184")
+    ("nf-md-comment_processing_outline" . "\xf0185")
+    ("nf-md-comment_question" . "\xf0817")
+    ("nf-md-comment_question_outline" . "\xf0186")
+    ("nf-md-comment_quote" . "\xf1021")
+    ("nf-md-comment_quote_outline" . "\xf1022")
+    ("nf-md-comment_remove" . "\xf05de")
+    ("nf-md-comment_remove_outline" . "\xf0187")
+    ("nf-md-comment_search" . "\xf0a3c")
+    ("nf-md-comment_search_outline" . "\xf0a3d")
+    ("nf-md-comment_text" . "\xf0188")
+    ("nf-md-comment_text_multiple" . "\xf0860")
+    ("nf-md-comment_text_multiple_outline" . "\xf0861")
+    ("nf-md-comment_text_outline" . "\xf0189")
+    ("nf-md-compare" . "\xf018a")
+    ("nf-md-compare_horizontal" . "\xf1492")
+    ("nf-md-compare_remove" . "\xf18b3")
+    ("nf-md-compare_vertical" . "\xf1493")
+    ("nf-md-compass" . "\xf018b")
+    ("nf-md-compass_off" . "\xf0b80")
+    ("nf-md-compass_off_outline" . "\xf0b81")
+    ("nf-md-compass_outline" . "\xf018c")
+    ("nf-md-compass_rose" . "\xf1382")
+    ("nf-md-compost" . "\xf1a38")
+    ("nf-md-cone" . "\xf194c")
+    ("nf-md-cone_off" . "\xf194d")
+    ("nf-md-connection" . "\xf1616")
+    ("nf-md-console" . "\xf018d")
+    ("nf-md-console_line" . "\xf07b7")
+    ("nf-md-console_network" . "\xf08a9")
+    ("nf-md-console_network_outline" . "\xf0c60")
+    ("nf-md-consolidate" . "\xf10d8")
+    ("nf-md-contactless_payment" . "\xf0d6a")
+    ("nf-md-contactless_payment_circle" . "\xf0321")
+    ("nf-md-contactless_payment_circle_outline" . "\xf0408")
+    ("nf-md-contacts" . "\xf06cb")
+    ("nf-md-contacts_outline" . "\xf05b8")
+    ("nf-md-contain" . "\xf0a3e")
+    ("nf-md-contain_end" . "\xf0a3f")
+    ("nf-md-contain_start" . "\xf0a40")
+    ("nf-md-content_copy" . "\xf018f")
+    ("nf-md-content_cut" . "\xf0190")
+    ("nf-md-content_duplicate" . "\xf0191")
+    ("nf-md-content_paste" . "\xf0192")
+    ("nf-md-content_save" . "\xf0193")
+    ("nf-md-content_save_alert" . "\xf0f42")
+    ("nf-md-content_save_alert_outline" . "\xf0f43")
+    ("nf-md-content_save_all" . "\xf0194")
+    ("nf-md-content_save_all_outline" . "\xf0f44")
+    ("nf-md-content_save_check" . "\xf18ea")
+    ("nf-md-content_save_check_outline" . "\xf18eb")
+    ("nf-md-content_save_cog" . "\xf145b")
+    ("nf-md-content_save_cog_outline" . "\xf145c")
+    ("nf-md-content_save_edit" . "\xf0cfb")
+    ("nf-md-content_save_edit_outline" . "\xf0cfc")
+    ("nf-md-content_save_move" . "\xf0e27")
+    ("nf-md-content_save_move_outline" . "\xf0e28")
+    ("nf-md-content_save_off" . "\xf1643")
+    ("nf-md-content_save_off_outline" . "\xf1644")
+    ("nf-md-content_save_outline" . "\xf0818")
+    ("nf-md-content_save_settings" . "\xf061b")
+    ("nf-md-content_save_settings_outline" . "\xf0b2e")
+    ("nf-md-contrast" . "\xf0195")
+    ("nf-md-contrast_box" . "\xf0196")
+    ("nf-md-contrast_circle" . "\xf0197")
+    ("nf-md-controller_classic" . "\xf0b82")
+    ("nf-md-controller_classic_outline" . "\xf0b83")
+    ("nf-md-cookie" . "\xf0198")
+    ("nf-md-cookie_alert" . "\xf16d0")
+    ("nf-md-cookie_alert_outline" . "\xf16d1")
+    ("nf-md-cookie_check" . "\xf16d2")
+    ("nf-md-cookie_check_outline" . "\xf16d3")
+    ("nf-md-cookie_clock" . "\xf16e4")
+    ("nf-md-cookie_clock_outline" . "\xf16e5")
+    ("nf-md-cookie_cog" . "\xf16d4")
+    ("nf-md-cookie_cog_outline" . "\xf16d5")
+    ("nf-md-cookie_edit" . "\xf16e6")
+    ("nf-md-cookie_edit_outline" . "\xf16e7")
+    ("nf-md-cookie_lock" . "\xf16e8")
+    ("nf-md-cookie_lock_outline" . "\xf16e9")
+    ("nf-md-cookie_minus" . "\xf16da")
+    ("nf-md-cookie_minus_outline" . "\xf16db")
+    ("nf-md-cookie_off" . "\xf16ea")
+    ("nf-md-cookie_off_outline" . "\xf16eb")
+    ("nf-md-cookie_outline" . "\xf16de")
+    ("nf-md-cookie_plus" . "\xf16d6")
+    ("nf-md-cookie_plus_outline" . "\xf16d7")
+    ("nf-md-cookie_refresh" . "\xf16ec")
+    ("nf-md-cookie_refresh_outline" . "\xf16ed")
+    ("nf-md-cookie_remove" . "\xf16d8")
+    ("nf-md-cookie_remove_outline" . "\xf16d9")
+    ("nf-md-cookie_settings" . "\xf16dc")
+    ("nf-md-cookie_settings_outline" . "\xf16dd")
+    ("nf-md-coolant_temperature" . "\xf03c8")
+    ("nf-md-copyleft" . "\xf1939")
+    ("nf-md-copyright" . "\xf05e6")
+    ("nf-md-cordova" . "\xf0958")
+    ("nf-md-corn" . "\xf07b8")
+    ("nf-md-corn_off" . "\xf13ef")
+    ("nf-md-cosine_wave" . "\xf1479")
+    ("nf-md-counter" . "\xf0199")
+    ("nf-md-countertop" . "\xf181c")
+    ("nf-md-countertop_outline" . "\xf181d")
+    ("nf-md-cow" . "\xf019a")
+    ("nf-md-cow_off" . "\xf18fc")
+    ("nf-md-cpu_32_bit" . "\xf0edf")
+    ("nf-md-cpu_64_bit" . "\xf0ee0")
+    ("nf-md-cradle" . "\xf198b")
+    ("nf-md-cradle_outline" . "\xf1991")
+    ("nf-md-crane" . "\xf0862")
+    ("nf-md-creation" . "\xf0674")
+    ("nf-md-creative_commons" . "\xf0d6b")
+    ("nf-md-credit_card" . "\xf0fef")
+    ("nf-md-credit_card_check" . "\xf13d0")
+    ("nf-md-credit_card_check_outline" . "\xf13d1")
+    ("nf-md-credit_card_chip" . "\xf190f")
+    ("nf-md-credit_card_chip_outline" . "\xf1910")
+    ("nf-md-credit_card_clock" . "\xf0ee1")
+    ("nf-md-credit_card_clock_outline" . "\xf0ee2")
+    ("nf-md-credit_card_edit" . "\xf17d7")
+    ("nf-md-credit_card_edit_outline" . "\xf17d8")
+    ("nf-md-credit_card_fast" . "\xf1911")
+    ("nf-md-credit_card_fast_outline" . "\xf1912")
+    ("nf-md-credit_card_lock" . "\xf18e7")
+    ("nf-md-credit_card_lock_outline" . "\xf18e8")
+    ("nf-md-credit_card_marker" . "\xf06a8")
+    ("nf-md-credit_card_marker_outline" . "\xf0dbe")
+    ("nf-md-credit_card_minus" . "\xf0fac")
+    ("nf-md-credit_card_minus_outline" . "\xf0fad")
+    ("nf-md-credit_card_multiple" . "\xf0ff0")
+    ("nf-md-credit_card_multiple_outline" . "\xf019c")
+    ("nf-md-credit_card_off" . "\xf0ff1")
+    ("nf-md-credit_card_off_outline" . "\xf05e4")
+    ("nf-md-credit_card_outline" . "\xf019b")
+    ("nf-md-credit_card_plus" . "\xf0ff2")
+    ("nf-md-credit_card_plus_outline" . "\xf0676")
+    ("nf-md-credit_card_refresh" . "\xf1645")
+    ("nf-md-credit_card_refresh_outline" . "\xf1646")
+    ("nf-md-credit_card_refund" . "\xf0ff3")
+    ("nf-md-credit_card_refund_outline" . "\xf0aa8")
+    ("nf-md-credit_card_remove" . "\xf0fae")
+    ("nf-md-credit_card_remove_outline" . "\xf0faf")
+    ("nf-md-credit_card_scan" . "\xf0ff4")
+    ("nf-md-credit_card_scan_outline" . "\xf019d")
+    ("nf-md-credit_card_search" . "\xf1647")
+    ("nf-md-credit_card_search_outline" . "\xf1648")
+    ("nf-md-credit_card_settings" . "\xf0ff5")
+    ("nf-md-credit_card_settings_outline" . "\xf08d7")
+    ("nf-md-credit_card_sync" . "\xf1649")
+    ("nf-md-credit_card_sync_outline" . "\xf164a")
+    ("nf-md-credit_card_wireless" . "\xf0802")
+    ("nf-md-credit_card_wireless_off" . "\xf057a")
+    ("nf-md-credit_card_wireless_off_outline" . "\xf057b")
+    ("nf-md-credit_card_wireless_outline" . "\xf0d6c")
+    ("nf-md-cricket" . "\xf0d6d")
+    ("nf-md-crop" . "\xf019e")
+    ("nf-md-crop_free" . "\xf019f")
+    ("nf-md-crop_landscape" . "\xf01a0")
+    ("nf-md-crop_portrait" . "\xf01a1")
+    ("nf-md-crop_rotate" . "\xf0696")
+    ("nf-md-crop_square" . "\xf01a2")
+    ("nf-md-cross" . "\xf0953")
+    ("nf-md-cross_bolnisi" . "\xf0ced")
+    ("nf-md-cross_celtic" . "\xf0cf5")
+    ("nf-md-cross_outline" . "\xf0cf6")
+    ("nf-md-crosshairs" . "\xf01a3")
+    ("nf-md-crosshairs_gps" . "\xf01a4")
+    ("nf-md-crosshairs_off" . "\xf0f45")
+    ("nf-md-crosshairs_question" . "\xf1136")
+    ("nf-md-crowd" . "\xf1975")
+    ("nf-md-crown" . "\xf01a5")
+    ("nf-md-crown_circle" . "\xf17dc")
+    ("nf-md-crown_circle_outline" . "\xf17dd")
+    ("nf-md-crown_outline" . "\xf11d0")
+    ("nf-md-cryengine" . "\xf0959")
+    ("nf-md-crystal_ball" . "\xf0b2f")
+    ("nf-md-cube" . "\xf01a6")
+    ("nf-md-cube_off" . "\xf141c")
+    ("nf-md-cube_off_outline" . "\xf141d")
+    ("nf-md-cube_outline" . "\xf01a7")
+    ("nf-md-cube_scan" . "\xf0b84")
+    ("nf-md-cube_send" . "\xf01a8")
+    ("nf-md-cube_unfolded" . "\xf01a9")
+    ("nf-md-cup" . "\xf01aa")
+    ("nf-md-cup_off" . "\xf05e5")
+    ("nf-md-cup_off_outline" . "\xf137d")
+    ("nf-md-cup_outline" . "\xf130f")
+    ("nf-md-cup_water" . "\xf01ab")
+    ("nf-md-cupboard" . "\xf0f46")
+    ("nf-md-cupboard_outline" . "\xf0f47")
+    ("nf-md-cupcake" . "\xf095a")
+    ("nf-md-curling" . "\xf0863")
+    ("nf-md-currency_bdt" . "\xf0864")
+    ("nf-md-currency_brl" . "\xf0b85")
+    ("nf-md-currency_btc" . "\xf01ac")
+    ("nf-md-currency_cny" . "\xf07ba")
+    ("nf-md-currency_eth" . "\xf07bb")
+    ("nf-md-currency_eur" . "\xf01ad")
+    ("nf-md-currency_eur_off" . "\xf1315")
+    ("nf-md-currency_fra" . "\xf1a39")
+    ("nf-md-currency_gbp" . "\xf01ae")
+    ("nf-md-currency_ils" . "\xf0c61")
+    ("nf-md-currency_inr" . "\xf01af")
+    ("nf-md-currency_jpy" . "\xf07bc")
+    ("nf-md-currency_krw" . "\xf07bd")
+    ("nf-md-currency_kzt" . "\xf0865")
+    ("nf-md-currency_mnt" . "\xf1512")
+    ("nf-md-currency_ngn" . "\xf01b0")
+    ("nf-md-currency_php" . "\xf09e6")
+    ("nf-md-currency_rial" . "\xf0e9c")
+    ("nf-md-currency_rub" . "\xf01b1")
+    ("nf-md-currency_rupee" . "\xf1976")
+    ("nf-md-currency_sign" . "\xf07be")
+    ("nf-md-currency_try" . "\xf01b2")
+    ("nf-md-currency_twd" . "\xf07bf")
+    ("nf-md-currency_usd" . "\xf01c1")
+    ("nf-md-currency_usd_off" . "\xf067a")
+    ("nf-md-current_ac" . "\xf1480")
+    ("nf-md-current_dc" . "\xf095c")
+    ("nf-md-cursor_default" . "\xf01c0")
+    ("nf-md-cursor_default_click" . "\xf0cfd")
+    ("nf-md-cursor_default_click_outline" . "\xf0cfe")
+    ("nf-md-cursor_default_gesture" . "\xf1127")
+    ("nf-md-cursor_default_gesture_outline" . "\xf1128")
+    ("nf-md-cursor_default_outline" . "\xf01bf")
+    ("nf-md-cursor_move" . "\xf01be")
+    ("nf-md-cursor_pointer" . "\xf01bd")
+    ("nf-md-cursor_text" . "\xf05e7")
+    ("nf-md-curtains" . "\xf1846")
+    ("nf-md-curtains_closed" . "\xf1847")
+    ("nf-md-cylinder" . "\xf194e")
+    ("nf-md-cylinder_off" . "\xf194f")
+    ("nf-md-dance_ballroom" . "\xf15fb")
+    ("nf-md-dance_pole" . "\xf1578")
+    ("nf-md-data_matrix" . "\xf153c")
+    ("nf-md-data_matrix_edit" . "\xf153d")
+    ("nf-md-data_matrix_minus" . "\xf153e")
+    ("nf-md-data_matrix_plus" . "\xf153f")
+    ("nf-md-data_matrix_remove" . "\xf1540")
+    ("nf-md-data_matrix_scan" . "\xf1541")
+    ("nf-md-database" . "\xf01bc")
+    ("nf-md-database_alert" . "\xf163a")
+    ("nf-md-database_alert_outline" . "\xf1624")
+    ("nf-md-database_arrow_down" . "\xf163b")
+    ("nf-md-database_arrow_down_outline" . "\xf1625")
+    ("nf-md-database_arrow_left" . "\xf163c")
+    ("nf-md-database_arrow_left_outline" . "\xf1626")
+    ("nf-md-database_arrow_right" . "\xf163d")
+    ("nf-md-database_arrow_right_outline" . "\xf1627")
+    ("nf-md-database_arrow_up" . "\xf163e")
+    ("nf-md-database_arrow_up_outline" . "\xf1628")
+    ("nf-md-database_check" . "\xf0aa9")
+    ("nf-md-database_check_outline" . "\xf1629")
+    ("nf-md-database_clock" . "\xf163f")
+    ("nf-md-database_clock_outline" . "\xf162a")
+    ("nf-md-database_cog" . "\xf164b")
+    ("nf-md-database_cog_outline" . "\xf164c")
+    ("nf-md-database_edit" . "\xf0b86")
+    ("nf-md-database_edit_outline" . "\xf162b")
+    ("nf-md-database_export" . "\xf095e")
+    ("nf-md-database_export_outline" . "\xf162c")
+    ("nf-md-database_eye" . "\xf191f")
+    ("nf-md-database_eye_off" . "\xf1920")
+    ("nf-md-database_eye_off_outline" . "\xf1921")
+    ("nf-md-database_eye_outline" . "\xf1922")
+    ("nf-md-database_import" . "\xf095d")
+    ("nf-md-database_import_outline" . "\xf162d")
+    ("nf-md-database_lock" . "\xf0aaa")
+    ("nf-md-database_lock_outline" . "\xf162e")
+    ("nf-md-database_marker" . "\xf12f6")
+    ("nf-md-database_marker_outline" . "\xf162f")
+    ("nf-md-database_minus" . "\xf01bb")
+    ("nf-md-database_minus_outline" . "\xf1630")
+    ("nf-md-database_off" . "\xf1640")
+    ("nf-md-database_off_outline" . "\xf1631")
+    ("nf-md-database_outline" . "\xf1632")
+    ("nf-md-database_plus" . "\xf01ba")
+    ("nf-md-database_plus_outline" . "\xf1633")
+    ("nf-md-database_refresh" . "\xf05c2")
+    ("nf-md-database_refresh_outline" . "\xf1634")
+    ("nf-md-database_remove" . "\xf0d00")
+    ("nf-md-database_remove_outline" . "\xf1635")
+    ("nf-md-database_search" . "\xf0866")
+    ("nf-md-database_search_outline" . "\xf1636")
+    ("nf-md-database_settings" . "\xf0d01")
+    ("nf-md-database_settings_outline" . "\xf1637")
+    ("nf-md-database_sync" . "\xf0cff")
+    ("nf-md-database_sync_outline" . "\xf1638")
+    ("nf-md-death_star" . "\xf08d8")
+    ("nf-md-death_star_variant" . "\xf08d9")
+    ("nf-md-deathly_hallows" . "\xf0b87")
+    ("nf-md-debian" . "\xf08da")
+    ("nf-md-debug_step_into" . "\xf01b9")
+    ("nf-md-debug_step_out" . "\xf01b8")
+    ("nf-md-debug_step_over" . "\xf01b7")
+    ("nf-md-decagram" . "\xf076c")
+    ("nf-md-decagram_outline" . "\xf076d")
+    ("nf-md-decimal" . "\xf10a1")
+    ("nf-md-decimal_comma" . "\xf10a2")
+    ("nf-md-decimal_comma_decrease" . "\xf10a3")
+    ("nf-md-decimal_comma_increase" . "\xf10a4")
+    ("nf-md-decimal_decrease" . "\xf01b6")
+    ("nf-md-decimal_increase" . "\xf01b5")
+    ("nf-md-delete" . "\xf01b4")
+    ("nf-md-delete_alert" . "\xf10a5")
+    ("nf-md-delete_alert_outline" . "\xf10a6")
+    ("nf-md-delete_circle" . "\xf0683")
+    ("nf-md-delete_circle_outline" . "\xf0b88")
+    ("nf-md-delete_clock" . "\xf1556")
+    ("nf-md-delete_clock_outline" . "\xf1557")
+    ("nf-md-delete_empty" . "\xf06cc")
+    ("nf-md-delete_empty_outline" . "\xf0e9d")
+    ("nf-md-delete_forever" . "\xf05e8")
+    ("nf-md-delete_forever_outline" . "\xf0b89")
+    ("nf-md-delete_off" . "\xf10a7")
+    ("nf-md-delete_off_outline" . "\xf10a8")
+    ("nf-md-delete_outline" . "\xf09e7")
+    ("nf-md-delete_restore" . "\xf0819")
+    ("nf-md-delete_sweep" . "\xf05e9")
+    ("nf-md-delete_sweep_outline" . "\xf0c62")
+    ("nf-md-delete_variant" . "\xf01b3")
+    ("nf-md-delta" . "\xf01c2")
+    ("nf-md-desk" . "\xf1239")
+    ("nf-md-desk_lamp" . "\xf095f")
+    ("nf-md-deskphone" . "\xf01c3")
+    ("nf-md-desktop_classic" . "\xf07c0")
+    ("nf-md-desktop_mac" . "\xf01c4")
+    ("nf-md-desktop_mac_dashboard" . "\xf09e8")
+    ("nf-md-desktop_tower" . "\xf01c5")
+    ("nf-md-desktop_tower_monitor" . "\xf0aab")
+    ("nf-md-details" . "\xf01c6")
+    ("nf-md-dev_to" . "\xf0d6e")
+    ("nf-md-developer_board" . "\xf0697")
+    ("nf-md-deviantart" . "\xf01c7")
+    ("nf-md-devices" . "\xf0fb0")
+    ("nf-md-dharmachakra" . "\xf094b")
+    ("nf-md-diabetes" . "\xf1126")
+    ("nf-md-dialpad" . "\xf061c")
+    ("nf-md-diameter" . "\xf0c63")
+    ("nf-md-diameter_outline" . "\xf0c64")
+    ("nf-md-diameter_variant" . "\xf0c65")
+    ("nf-md-diamond" . "\xf0b8a")
+    ("nf-md-diamond_outline" . "\xf0b8b")
+    ("nf-md-diamond_stone" . "\xf01c8")
+    ("nf-md-dice_1" . "\xf01ca")
+    ("nf-md-dice_1_outline" . "\xf114a")
+    ("nf-md-dice_2" . "\xf01cb")
+    ("nf-md-dice_2_outline" . "\xf114b")
+    ("nf-md-dice_3" . "\xf01cc")
+    ("nf-md-dice_3_outline" . "\xf114c")
+    ("nf-md-dice_4" . "\xf01cd")
+    ("nf-md-dice_4_outline" . "\xf114d")
+    ("nf-md-dice_5" . "\xf01ce")
+    ("nf-md-dice_5_outline" . "\xf114e")
+    ("nf-md-dice_6" . "\xf01cf")
+    ("nf-md-dice_6_outline" . "\xf114f")
+    ("nf-md-dice_d10" . "\xf1153")
+    ("nf-md-dice_d10_outline" . "\xf076f")
+    ("nf-md-dice_d12" . "\xf1154")
+    ("nf-md-dice_d12_outline" . "\xf0867")
+    ("nf-md-dice_d20" . "\xf1155")
+    ("nf-md-dice_d20_outline" . "\xf05ea")
+    ("nf-md-dice_d4" . "\xf1150")
+    ("nf-md-dice_d4_outline" . "\xf05eb")
+    ("nf-md-dice_d6" . "\xf1151")
+    ("nf-md-dice_d6_outline" . "\xf05ed")
+    ("nf-md-dice_d8" . "\xf1152")
+    ("nf-md-dice_d8_outline" . "\xf05ec")
+    ("nf-md-dice_multiple" . "\xf076e")
+    ("nf-md-dice_multiple_outline" . "\xf1156")
+    ("nf-md-digital_ocean" . "\xf1237")
+    ("nf-md-dip_switch" . "\xf07c1")
+    ("nf-md-directions" . "\xf01d0")
+    ("nf-md-directions_fork" . "\xf0641")
+    ("nf-md-disc" . "\xf05ee")
+    ("nf-md-disc_alert" . "\xf01d1")
+    ("nf-md-disc_player" . "\xf0960")
+    ("nf-md-discord" . "\xf066f")
+    ("nf-md-dishwasher" . "\xf0aac")
+    ("nf-md-dishwasher_alert" . "\xf11b8")
+    ("nf-md-dishwasher_off" . "\xf11b9")
+    ("nf-md-disqus" . "\xf01d2")
+    ("nf-md-distribute_horizontal_center" . "\xf11c9")
+    ("nf-md-distribute_horizontal_left" . "\xf11c8")
+    ("nf-md-distribute_horizontal_right" . "\xf11ca")
+    ("nf-md-distribute_vertical_bottom" . "\xf11cb")
+    ("nf-md-distribute_vertical_center" . "\xf11cc")
+    ("nf-md-distribute_vertical_top" . "\xf11cd")
+    ("nf-md-diversify" . "\xf1877")
+    ("nf-md-diving" . "\xf1977")
+    ("nf-md-diving_flippers" . "\xf0dbf")
+    ("nf-md-diving_helmet" . "\xf0dc0")
+    ("nf-md-diving_scuba" . "\xf0dc1")
+    ("nf-md-diving_scuba_flag" . "\xf0dc2")
+    ("nf-md-diving_scuba_tank" . "\xf0dc3")
+    ("nf-md-diving_scuba_tank_multiple" . "\xf0dc4")
+    ("nf-md-diving_snorkel" . "\xf0dc5")
+    ("nf-md-division" . "\xf01d4")
+    ("nf-md-division_box" . "\xf01d5")
+    ("nf-md-dlna" . "\xf0a41")
+    ("nf-md-dna" . "\xf0684")
+    ("nf-md-dns" . "\xf01d6")
+    ("nf-md-dns_outline" . "\xf0b8c")
+    ("nf-md-dock_bottom" . "\xf10a9")
+    ("nf-md-dock_left" . "\xf10aa")
+    ("nf-md-dock_right" . "\xf10ab")
+    ("nf-md-dock_top" . "\xf1513")
+    ("nf-md-dock_window" . "\xf10ac")
+    ("nf-md-docker" . "\xf0868")
+    ("nf-md-doctor" . "\xf0a42")
+    ("nf-md-dog" . "\xf0a43")
+    ("nf-md-dog_service" . "\xf0aad")
+    ("nf-md-dog_side" . "\xf0a44")
+    ("nf-md-dog_side_off" . "\xf16ee")
+    ("nf-md-dolby" . "\xf06b3")
+    ("nf-md-dolly" . "\xf0e9e")
+    ("nf-md-dolphin" . "\xf18b4")
+    ("nf-md-domain" . "\xf01d7")
+    ("nf-md-domain_off" . "\xf0d6f")
+    ("nf-md-domain_plus" . "\xf10ad")
+    ("nf-md-domain_remove" . "\xf10ae")
+    ("nf-md-dome_light" . "\xf141e")
+    ("nf-md-domino_mask" . "\xf1023")
+    ("nf-md-donkey" . "\xf07c2")
+    ("nf-md-door" . "\xf081a")
+    ("nf-md-door_closed" . "\xf081b")
+    ("nf-md-door_closed_lock" . "\xf10af")
+    ("nf-md-door_open" . "\xf081c")
+    ("nf-md-door_sliding" . "\xf181e")
+    ("nf-md-door_sliding_lock" . "\xf181f")
+    ("nf-md-door_sliding_open" . "\xf1820")
+    ("nf-md-doorbell" . "\xf12e6")
+    ("nf-md-doorbell_video" . "\xf0869")
+    ("nf-md-dot_net" . "\xf0aae")
+    ("nf-md-dots_circle" . "\xf1978")
+    ("nf-md-dots_grid" . "\xf15fc")
+    ("nf-md-dots_hexagon" . "\xf15ff")
+    ("nf-md-dots_horizontal" . "\xf01d8")
+    ("nf-md-dots_horizontal_circle" . "\xf07c3")
+    ("nf-md-dots_horizontal_circle_outline" . "\xf0b8d")
+    ("nf-md-dots_square" . "\xf15fd")
+    ("nf-md-dots_triangle" . "\xf15fe")
+    ("nf-md-dots_vertical" . "\xf01d9")
+    ("nf-md-dots_vertical_circle" . "\xf07c4")
+    ("nf-md-dots_vertical_circle_outline" . "\xf0b8e")
+    ("nf-md-download" . "\xf01da")
+    ("nf-md-download_box" . "\xf1462")
+    ("nf-md-download_box_outline" . "\xf1463")
+    ("nf-md-download_circle" . "\xf1464")
+    ("nf-md-download_circle_outline" . "\xf1465")
+    ("nf-md-download_lock" . "\xf1320")
+    ("nf-md-download_lock_outline" . "\xf1321")
+    ("nf-md-download_multiple" . "\xf09e9")
+    ("nf-md-download_network" . "\xf06f4")
+    ("nf-md-download_network_outline" . "\xf0c66")
+    ("nf-md-download_off" . "\xf10b0")
+    ("nf-md-download_off_outline" . "\xf10b1")
+    ("nf-md-download_outline" . "\xf0b8f")
+    ("nf-md-drag" . "\xf01db")
+    ("nf-md-drag_horizontal" . "\xf01dc")
+    ("nf-md-drag_horizontal_variant" . "\xf12f0")
+    ("nf-md-drag_variant" . "\xf0b90")
+    ("nf-md-drag_vertical" . "\xf01dd")
+    ("nf-md-drag_vertical_variant" . "\xf12f1")
+    ("nf-md-drama_masks" . "\xf0d02")
+    ("nf-md-draw" . "\xf0f49")
+    ("nf-md-draw_pen" . "\xf19b9")
+    ("nf-md-drawing" . "\xf01de")
+    ("nf-md-drawing_box" . "\xf01df")
+    ("nf-md-dresser" . "\xf0f4a")
+    ("nf-md-dresser_outline" . "\xf0f4b")
+    ("nf-md-drone" . "\xf01e2")
+    ("nf-md-dropbox" . "\xf01e3")
+    ("nf-md-drupal" . "\xf01e4")
+    ("nf-md-duck" . "\xf01e5")
+    ("nf-md-dumbbell" . "\xf01e6")
+    ("nf-md-dump_truck" . "\xf0c67")
+    ("nf-md-ear_hearing" . "\xf07c5")
+    ("nf-md-ear_hearing_loop" . "\xf1aee")
+    ("nf-md-ear_hearing_off" . "\xf0a45")
+    ("nf-md-earbuds" . "\xf184f")
+    ("nf-md-earbuds_off" . "\xf1850")
+    ("nf-md-earbuds_off_outline" . "\xf1851")
+    ("nf-md-earbuds_outline" . "\xf1852")
+    ("nf-md-earth" . "\xf01e7")
+    ("nf-md-earth_arrow_right" . "\xf1311")
+    ("nf-md-earth_box" . "\xf06cd")
+    ("nf-md-earth_box_minus" . "\xf1407")
+    ("nf-md-earth_box_off" . "\xf06ce")
+    ("nf-md-earth_box_plus" . "\xf1406")
+    ("nf-md-earth_box_remove" . "\xf1408")
+    ("nf-md-earth_minus" . "\xf1404")
+    ("nf-md-earth_off" . "\xf01e8")
+    ("nf-md-earth_plus" . "\xf1403")
+    ("nf-md-earth_remove" . "\xf1405")
+    ("nf-md-egg" . "\xf0aaf")
+    ("nf-md-egg_easter" . "\xf0ab0")
+    ("nf-md-egg_fried" . "\xf184a")
+    ("nf-md-egg_off" . "\xf13f0")
+    ("nf-md-egg_off_outline" . "\xf13f1")
+    ("nf-md-egg_outline" . "\xf13f2")
+    ("nf-md-eiffel_tower" . "\xf156b")
+    ("nf-md-eight_track" . "\xf09ea")
+    ("nf-md-eject" . "\xf01ea")
+    ("nf-md-eject_outline" . "\xf0b91")
+    ("nf-md-electric_switch" . "\xf0e9f")
+    ("nf-md-electric_switch_closed" . "\xf10d9")
+    ("nf-md-electron_framework" . "\xf1024")
+    ("nf-md-elephant" . "\xf07c6")
+    ("nf-md-elevation_decline" . "\xf01eb")
+    ("nf-md-elevation_rise" . "\xf01ec")
+    ("nf-md-elevator" . "\xf01ed")
+    ("nf-md-elevator_down" . "\xf12c2")
+    ("nf-md-elevator_passenger" . "\xf1381")
+    ("nf-md-elevator_passenger_off" . "\xf1979")
+    ("nf-md-elevator_passenger_off_outline" . "\xf197a")
+    ("nf-md-elevator_passenger_outline" . "\xf197b")
+    ("nf-md-elevator_up" . "\xf12c1")
+    ("nf-md-ellipse" . "\xf0ea0")
+    ("nf-md-ellipse_outline" . "\xf0ea1")
+    ("nf-md-email" . "\xf01ee")
+    ("nf-md-email_alert" . "\xf06cf")
+    ("nf-md-email_alert_outline" . "\xf0d42")
+    ("nf-md-email_box" . "\xf0d03")
+    ("nf-md-email_check" . "\xf0ab1")
+    ("nf-md-email_check_outline" . "\xf0ab2")
+    ("nf-md-email_edit" . "\xf0ee3")
+    ("nf-md-email_edit_outline" . "\xf0ee4")
+    ("nf-md-email_fast" . "\xf186f")
+    ("nf-md-email_fast_outline" . "\xf1870")
+    ("nf-md-email_lock" . "\xf01f1")
+    ("nf-md-email_mark_as_unread" . "\xf0b92")
+    ("nf-md-email_minus" . "\xf0ee5")
+    ("nf-md-email_minus_outline" . "\xf0ee6")
+    ("nf-md-email_multiple" . "\xf0ee7")
+    ("nf-md-email_multiple_outline" . "\xf0ee8")
+    ("nf-md-email_newsletter" . "\xf0fb1")
+    ("nf-md-email_off" . "\xf13e3")
+    ("nf-md-email_off_outline" . "\xf13e4")
+    ("nf-md-email_open" . "\xf01ef")
+    ("nf-md-email_open_multiple" . "\xf0ee9")
+    ("nf-md-email_open_multiple_outline" . "\xf0eea")
+    ("nf-md-email_open_outline" . "\xf05ef")
+    ("nf-md-email_outline" . "\xf01f0")
+    ("nf-md-email_plus" . "\xf09eb")
+    ("nf-md-email_plus_outline" . "\xf09ec")
+    ("nf-md-email_receive" . "\xf10da")
+    ("nf-md-email_receive_outline" . "\xf10db")
+    ("nf-md-email_remove" . "\xf1661")
+    ("nf-md-email_remove_outline" . "\xf1662")
+    ("nf-md-email_seal" . "\xf195b")
+    ("nf-md-email_seal_outline" . "\xf195c")
+    ("nf-md-email_search" . "\xf0961")
+    ("nf-md-email_search_outline" . "\xf0962")
+    ("nf-md-email_send" . "\xf10dc")
+    ("nf-md-email_send_outline" . "\xf10dd")
+    ("nf-md-email_sync" . "\xf12c7")
+    ("nf-md-email_sync_outline" . "\xf12c8")
+    ("nf-md-email_variant" . "\xf05f0")
+    ("nf-md-ember" . "\xf0b30")
+    ("nf-md-emby" . "\xf06b4")
+    ("nf-md-emoticon" . "\xf0c68")
+    ("nf-md-emoticon_angry" . "\xf0c69")
+    ("nf-md-emoticon_angry_outline" . "\xf0c6a")
+    ("nf-md-emoticon_confused" . "\xf10de")
+    ("nf-md-emoticon_confused_outline" . "\xf10df")
+    ("nf-md-emoticon_cool" . "\xf0c6b")
+    ("nf-md-emoticon_cool_outline" . "\xf01f3")
+    ("nf-md-emoticon_cry" . "\xf0c6c")
+    ("nf-md-emoticon_cry_outline" . "\xf0c6d")
+    ("nf-md-emoticon_dead" . "\xf0c6e")
+    ("nf-md-emoticon_dead_outline" . "\xf069b")
+    ("nf-md-emoticon_devil" . "\xf0c6f")
+    ("nf-md-emoticon_devil_outline" . "\xf01f4")
+    ("nf-md-emoticon_excited" . "\xf0c70")
+    ("nf-md-emoticon_excited_outline" . "\xf069c")
+    ("nf-md-emoticon_frown" . "\xf0f4c")
+    ("nf-md-emoticon_frown_outline" . "\xf0f4d")
+    ("nf-md-emoticon_happy" . "\xf0c71")
+    ("nf-md-emoticon_happy_outline" . "\xf01f5")
+    ("nf-md-emoticon_kiss" . "\xf0c72")
+    ("nf-md-emoticon_kiss_outline" . "\xf0c73")
+    ("nf-md-emoticon_lol" . "\xf1214")
+    ("nf-md-emoticon_lol_outline" . "\xf1215")
+    ("nf-md-emoticon_neutral" . "\xf0c74")
+    ("nf-md-emoticon_neutral_outline" . "\xf01f6")
+    ("nf-md-emoticon_outline" . "\xf01f2")
+    ("nf-md-emoticon_poop" . "\xf01f7")
+    ("nf-md-emoticon_poop_outline" . "\xf0c75")
+    ("nf-md-emoticon_sad" . "\xf0c76")
+    ("nf-md-emoticon_sad_outline" . "\xf01f8")
+    ("nf-md-emoticon_sick" . "\xf157c")
+    ("nf-md-emoticon_sick_outline" . "\xf157d")
+    ("nf-md-emoticon_tongue" . "\xf01f9")
+    ("nf-md-emoticon_tongue_outline" . "\xf0c77")
+    ("nf-md-emoticon_wink" . "\xf0c78")
+    ("nf-md-emoticon_wink_outline" . "\xf0c79")
+    ("nf-md-engine" . "\xf01fa")
+    ("nf-md-engine_off" . "\xf0a46")
+    ("nf-md-engine_off_outline" . "\xf0a47")
+    ("nf-md-engine_outline" . "\xf01fb")
+    ("nf-md-epsilon" . "\xf10e0")
+    ("nf-md-equal" . "\xf01fc")
+    ("nf-md-equal_box" . "\xf01fd")
+    ("nf-md-equalizer" . "\xf0ea2")
+    ("nf-md-equalizer_outline" . "\xf0ea3")
+    ("nf-md-eraser" . "\xf01fe")
+    ("nf-md-eraser_variant" . "\xf0642")
+    ("nf-md-escalator" . "\xf01ff")
+    ("nf-md-escalator_box" . "\xf1399")
+    ("nf-md-escalator_down" . "\xf12c0")
+    ("nf-md-escalator_up" . "\xf12bf")
+    ("nf-md-eslint" . "\xf0c7a")
+    ("nf-md-et" . "\xf0ab3")
+    ("nf-md-ethereum" . "\xf086a")
+    ("nf-md-ethernet" . "\xf0200")
+    ("nf-md-ethernet_cable" . "\xf0201")
+    ("nf-md-ethernet_cable_off" . "\xf0202")
+    ("nf-md-ev_plug_ccs1" . "\xf1519")
+    ("nf-md-ev_plug_ccs2" . "\xf151a")
+    ("nf-md-ev_plug_chademo" . "\xf151b")
+    ("nf-md-ev_plug_tesla" . "\xf151c")
+    ("nf-md-ev_plug_type1" . "\xf151d")
+    ("nf-md-ev_plug_type2" . "\xf151e")
+    ("nf-md-ev_station" . "\xf05f1")
+    ("nf-md-evernote" . "\xf0204")
+    ("nf-md-excavator" . "\xf1025")
+    ("nf-md-exclamation" . "\xf0205")
+    ("nf-md-exclamation_thick" . "\xf1238")
+    ("nf-md-exit_run" . "\xf0a48")
+    ("nf-md-exit_to_app" . "\xf0206")
+    ("nf-md-expand_all" . "\xf0ab4")
+    ("nf-md-expand_all_outline" . "\xf0ab5")
+    ("nf-md-expansion_card" . "\xf08ae")
+    ("nf-md-expansion_card_variant" . "\xf0fb2")
+    ("nf-md-exponent" . "\xf0963")
+    ("nf-md-exponent_box" . "\xf0964")
+    ("nf-md-export" . "\xf0207")
+    ("nf-md-export_variant" . "\xf0b93")
+    ("nf-md-eye" . "\xf0208")
+    ("nf-md-eye_arrow_left" . "\xf18fd")
+    ("nf-md-eye_arrow_left_outline" . "\xf18fe")
+    ("nf-md-eye_arrow_right" . "\xf18ff")
+    ("nf-md-eye_arrow_right_outline" . "\xf1900")
+    ("nf-md-eye_check" . "\xf0d04")
+    ("nf-md-eye_check_outline" . "\xf0d05")
+    ("nf-md-eye_circle" . "\xf0b94")
+    ("nf-md-eye_circle_outline" . "\xf0b95")
+    ("nf-md-eye_minus" . "\xf1026")
+    ("nf-md-eye_minus_outline" . "\xf1027")
+    ("nf-md-eye_off" . "\xf0209")
+    ("nf-md-eye_off_outline" . "\xf06d1")
+    ("nf-md-eye_outline" . "\xf06d0")
+    ("nf-md-eye_plus" . "\xf086b")
+    ("nf-md-eye_plus_outline" . "\xf086c")
+    ("nf-md-eye_refresh" . "\xf197c")
+    ("nf-md-eye_refresh_outline" . "\xf197d")
+    ("nf-md-eye_remove" . "\xf15e3")
+    ("nf-md-eye_remove_outline" . "\xf15e4")
+    ("nf-md-eye_settings" . "\xf086d")
+    ("nf-md-eye_settings_outline" . "\xf086e")
+    ("nf-md-eyedropper" . "\xf020a")
+    ("nf-md-eyedropper_minus" . "\xf13dd")
+    ("nf-md-eyedropper_off" . "\xf13df")
+    ("nf-md-eyedropper_plus" . "\xf13dc")
+    ("nf-md-eyedropper_remove" . "\xf13de")
+    ("nf-md-eyedropper_variant" . "\xf020b")
+    ("nf-md-face_agent" . "\xf0d70")
+    ("nf-md-face_man" . "\xf0643")
+    ("nf-md-face_man_outline" . "\xf0b96")
+    ("nf-md-face_man_profile" . "\xf0644")
+    ("nf-md-face_man_shimmer" . "\xf15cc")
+    ("nf-md-face_man_shimmer_outline" . "\xf15cd")
+    ("nf-md-face_mask" . "\xf1586")
+    ("nf-md-face_mask_outline" . "\xf1587")
+    ("nf-md-face_recognition" . "\xf0c7b")
+    ("nf-md-face_woman" . "\xf1077")
+    ("nf-md-face_woman_outline" . "\xf1078")
+    ("nf-md-face_woman_profile" . "\xf1076")
+    ("nf-md-face_woman_shimmer" . "\xf15ce")
+    ("nf-md-face_woman_shimmer_outline" . "\xf15cf")
+    ("nf-md-facebook" . "\xf020c")
+    ("nf-md-facebook_gaming" . "\xf07dd")
+    ("nf-md-facebook_messenger" . "\xf020e")
+    ("nf-md-facebook_workplace" . "\xf0b31")
+    ("nf-md-factory" . "\xf020f")
+    ("nf-md-family_tree" . "\xf160e")
+    ("nf-md-fan" . "\xf0210")
+    ("nf-md-fan_alert" . "\xf146c")
+    ("nf-md-fan_auto" . "\xf171d")
+    ("nf-md-fan_chevron_down" . "\xf146d")
+    ("nf-md-fan_chevron_up" . "\xf146e")
+    ("nf-md-fan_clock" . "\xf1a3a")
+    ("nf-md-fan_minus" . "\xf1470")
+    ("nf-md-fan_off" . "\xf081d")
+    ("nf-md-fan_plus" . "\xf146f")
+    ("nf-md-fan_remove" . "\xf1471")
+    ("nf-md-fan_speed_1" . "\xf1472")
+    ("nf-md-fan_speed_2" . "\xf1473")
+    ("nf-md-fan_speed_3" . "\xf1474")
+    ("nf-md-fast_forward" . "\xf0211")
+    ("nf-md-fast_forward_10" . "\xf0d71")
+    ("nf-md-fast_forward_15" . "\xf193a")
+    ("nf-md-fast_forward_30" . "\xf0d06")
+    ("nf-md-fast_forward_5" . "\xf11f8")
+    ("nf-md-fast_forward_60" . "\xf160b")
+    ("nf-md-fast_forward_outline" . "\xf06d2")
+    ("nf-md-fax" . "\xf0212")
+    ("nf-md-feather" . "\xf06d3")
+    ("nf-md-feature_search" . "\xf0a49")
+    ("nf-md-feature_search_outline" . "\xf0a4a")
+    ("nf-md-fedora" . "\xf08db")
+    ("nf-md-fence" . "\xf179a")
+    ("nf-md-fence_electric" . "\xf17f6")
+    ("nf-md-fencing" . "\xf14c1")
+    ("nf-md-ferris_wheel" . "\xf0ea4")
+    ("nf-md-ferry" . "\xf0213")
+    ("nf-md-file" . "\xf0214")
+    ("nf-md-file_account" . "\xf073b")
+    ("nf-md-file_account_outline" . "\xf1028")
+    ("nf-md-file_alert" . "\xf0a4b")
+    ("nf-md-file_alert_outline" . "\xf0a4c")
+    ("nf-md-file_arrow_left_right" . "\xf1a93")
+    ("nf-md-file_arrow_left_right_outline" . "\xf1a94")
+    ("nf-md-file_arrow_up_down" . "\xf1a95")
+    ("nf-md-file_arrow_up_down_outline" . "\xf1a96")
+    ("nf-md-file_cabinet" . "\xf0ab6")
+    ("nf-md-file_cad" . "\xf0eeb")
+    ("nf-md-file_cad_box" . "\xf0eec")
+    ("nf-md-file_cancel" . "\xf0dc6")
+    ("nf-md-file_cancel_outline" . "\xf0dc7")
+    ("nf-md-file_certificate" . "\xf1186")
+    ("nf-md-file_certificate_outline" . "\xf1187")
+    ("nf-md-file_chart" . "\xf0215")
+    ("nf-md-file_chart_check" . "\xf19c6")
+    ("nf-md-file_chart_check_outline" . "\xf19c7")
+    ("nf-md-file_chart_outline" . "\xf1029")
+    ("nf-md-file_check" . "\xf0216")
+    ("nf-md-file_check_outline" . "\xf0e29")
+    ("nf-md-file_clock" . "\xf12e1")
+    ("nf-md-file_clock_outline" . "\xf12e2")
+    ("nf-md-file_cloud" . "\xf0217")
+    ("nf-md-file_cloud_outline" . "\xf102a")
+    ("nf-md-file_code" . "\xf022e")
+    ("nf-md-file_code_outline" . "\xf102b")
+    ("nf-md-file_cog" . "\xf107b")
+    ("nf-md-file_cog_outline" . "\xf107c")
+    ("nf-md-file_compare" . "\xf08aa")
+    ("nf-md-file_delimited" . "\xf0218")
+    ("nf-md-file_delimited_outline" . "\xf0ea5")
+    ("nf-md-file_document" . "\xf0219")
+    ("nf-md-file_document_alert" . "\xf1a97")
+    ("nf-md-file_document_alert_outline" . "\xf1a98")
+    ("nf-md-file_document_check" . "\xf1a99")
+    ("nf-md-file_document_check_outline" . "\xf1a9a")
+    ("nf-md-file_document_edit" . "\xf0dc8")
+    ("nf-md-file_document_edit_outline" . "\xf0dc9")
+    ("nf-md-file_document_minus" . "\xf1a9b")
+    ("nf-md-file_document_minus_outline" . "\xf1a9c")
+    ("nf-md-file_document_multiple" . "\xf1517")
+    ("nf-md-file_document_multiple_outline" . "\xf1518")
+    ("nf-md-file_document_outline" . "\xf09ee")
+    ("nf-md-file_document_plus" . "\xf1a9d")
+    ("nf-md-file_document_plus_outline" . "\xf1a9e")
+    ("nf-md-file_document_remove" . "\xf1a9f")
+    ("nf-md-file_document_remove_outline" . "\xf1aa0")
+    ("nf-md-file_download" . "\xf0965")
+    ("nf-md-file_download_outline" . "\xf0966")
+    ("nf-md-file_edit" . "\xf11e7")
+    ("nf-md-file_edit_outline" . "\xf11e8")
+    ("nf-md-file_excel" . "\xf021b")
+    ("nf-md-file_excel_box" . "\xf021c")
+    ("nf-md-file_excel_box_outline" . "\xf102c")
+    ("nf-md-file_excel_outline" . "\xf102d")
+    ("nf-md-file_export" . "\xf021d")
+    ("nf-md-file_export_outline" . "\xf102e")
+    ("nf-md-file_eye" . "\xf0dca")
+    ("nf-md-file_eye_outline" . "\xf0dcb")
+    ("nf-md-file_find" . "\xf021e")
+    ("nf-md-file_find_outline" . "\xf0b97")
+    ("nf-md-file_gif_box" . "\xf0d78")
+    ("nf-md-file_hidden" . "\xf0613")
+    ("nf-md-file_image" . "\xf021f")
+    ("nf-md-file_image_marker" . "\xf1772")
+    ("nf-md-file_image_marker_outline" . "\xf1773")
+    ("nf-md-file_image_minus" . "\xf193b")
+    ("nf-md-file_image_minus_outline" . "\xf193c")
+    ("nf-md-file_image_outline" . "\xf0eb0")
+    ("nf-md-file_image_plus" . "\xf193d")
+    ("nf-md-file_image_plus_outline" . "\xf193e")
+    ("nf-md-file_image_remove" . "\xf193f")
+    ("nf-md-file_image_remove_outline" . "\xf1940")
+    ("nf-md-file_import" . "\xf0220")
+    ("nf-md-file_import_outline" . "\xf102f")
+    ("nf-md-file_jpg_box" . "\xf0225")
+    ("nf-md-file_key" . "\xf1184")
+    ("nf-md-file_key_outline" . "\xf1185")
+    ("nf-md-file_link" . "\xf1177")
+    ("nf-md-file_link_outline" . "\xf1178")
+    ("nf-md-file_lock" . "\xf0221")
+    ("nf-md-file_lock_open" . "\xf19c8")
+    ("nf-md-file_lock_open_outline" . "\xf19c9")
+    ("nf-md-file_lock_outline" . "\xf1030")
+    ("nf-md-file_marker" . "\xf1774")
+    ("nf-md-file_marker_outline" . "\xf1775")
+    ("nf-md-file_minus" . "\xf1aa1")
+    ("nf-md-file_minus_outline" . "\xf1aa2")
+    ("nf-md-file_move" . "\xf0ab9")
+    ("nf-md-file_move_outline" . "\xf1031")
+    ("nf-md-file_multiple" . "\xf0222")
+    ("nf-md-file_multiple_outline" . "\xf1032")
+    ("nf-md-file_music" . "\xf0223")
+    ("nf-md-file_music_outline" . "\xf0e2a")
+    ("nf-md-file_outline" . "\xf0224")
+    ("nf-md-file_pdf_box" . "\xf0226")
+    ("nf-md-file_percent" . "\xf081e")
+    ("nf-md-file_percent_outline" . "\xf1033")
+    ("nf-md-file_phone" . "\xf1179")
+    ("nf-md-file_phone_outline" . "\xf117a")
+    ("nf-md-file_plus" . "\xf0752")
+    ("nf-md-file_plus_outline" . "\xf0eed")
+    ("nf-md-file_png_box" . "\xf0e2d")
+    ("nf-md-file_powerpoint" . "\xf0227")
+    ("nf-md-file_powerpoint_box" . "\xf0228")
+    ("nf-md-file_powerpoint_box_outline" . "\xf1034")
+    ("nf-md-file_powerpoint_outline" . "\xf1035")
+    ("nf-md-file_presentation_box" . "\xf0229")
+    ("nf-md-file_question" . "\xf086f")
+    ("nf-md-file_question_outline" . "\xf1036")
+    ("nf-md-file_refresh" . "\xf0918")
+    ("nf-md-file_refresh_outline" . "\xf0541")
+    ("nf-md-file_remove" . "\xf0b98")
+    ("nf-md-file_remove_outline" . "\xf1037")
+    ("nf-md-file_replace" . "\xf0b32")
+    ("nf-md-file_replace_outline" . "\xf0b33")
+    ("nf-md-file_restore" . "\xf0670")
+    ("nf-md-file_restore_outline" . "\xf1038")
+    ("nf-md-file_rotate_left" . "\xf1a3b")
+    ("nf-md-file_rotate_left_outline" . "\xf1a3c")
+    ("nf-md-file_rotate_right" . "\xf1a3d")
+    ("nf-md-file_rotate_right_outline" . "\xf1a3e")
+    ("nf-md-file_search" . "\xf0c7c")
+    ("nf-md-file_search_outline" . "\xf0c7d")
+    ("nf-md-file_send" . "\xf022a")
+    ("nf-md-file_send_outline" . "\xf1039")
+    ("nf-md-file_settings" . "\xf1079")
+    ("nf-md-file_settings_outline" . "\xf107a")
+    ("nf-md-file_sign" . "\xf19c3")
+    ("nf-md-file_star" . "\xf103a")
+    ("nf-md-file_star_outline" . "\xf103b")
+    ("nf-md-file_swap" . "\xf0fb4")
+    ("nf-md-file_swap_outline" . "\xf0fb5")
+    ("nf-md-file_sync" . "\xf1216")
+    ("nf-md-file_sync_outline" . "\xf1217")
+    ("nf-md-file_table" . "\xf0c7e")
+    ("nf-md-file_table_box" . "\xf10e1")
+    ("nf-md-file_table_box_multiple" . "\xf10e2")
+    ("nf-md-file_table_box_multiple_outline" . "\xf10e3")
+    ("nf-md-file_table_box_outline" . "\xf10e4")
+    ("nf-md-file_table_outline" . "\xf0c7f")
+    ("nf-md-file_tree" . "\xf0645")
+    ("nf-md-file_tree_outline" . "\xf13d2")
+    ("nf-md-file_undo" . "\xf08dc")
+    ("nf-md-file_undo_outline" . "\xf103c")
+    ("nf-md-file_upload" . "\xf0a4d")
+    ("nf-md-file_upload_outline" . "\xf0a4e")
+    ("nf-md-file_video" . "\xf022b")
+    ("nf-md-file_video_outline" . "\xf0e2c")
+    ("nf-md-file_word" . "\xf022c")
+    ("nf-md-file_word_box" . "\xf022d")
+    ("nf-md-file_word_box_outline" . "\xf103d")
+    ("nf-md-file_word_outline" . "\xf103e")
+    ("nf-md-film" . "\xf022f")
+    ("nf-md-filmstrip" . "\xf0230")
+    ("nf-md-filmstrip_box" . "\xf0332")
+    ("nf-md-filmstrip_box_multiple" . "\xf0d18")
+    ("nf-md-filmstrip_off" . "\xf0231")
+    ("nf-md-filter" . "\xf0232")
+    ("nf-md-filter_check" . "\xf18ec")
+    ("nf-md-filter_check_outline" . "\xf18ed")
+    ("nf-md-filter_cog" . "\xf1aa3")
+    ("nf-md-filter_cog_outline" . "\xf1aa4")
+    ("nf-md-filter_menu" . "\xf10e5")
+    ("nf-md-filter_menu_outline" . "\xf10e6")
+    ("nf-md-filter_minus" . "\xf0eee")
+    ("nf-md-filter_minus_outline" . "\xf0eef")
+    ("nf-md-filter_multiple" . "\xf1a3f")
+    ("nf-md-filter_multiple_outline" . "\xf1a40")
+    ("nf-md-filter_off" . "\xf14ef")
+    ("nf-md-filter_off_outline" . "\xf14f0")
+    ("nf-md-filter_outline" . "\xf0233")
+    ("nf-md-filter_plus" . "\xf0ef0")
+    ("nf-md-filter_plus_outline" . "\xf0ef1")
+    ("nf-md-filter_remove" . "\xf0234")
+    ("nf-md-filter_remove_outline" . "\xf0235")
+    ("nf-md-filter_settings" . "\xf1aa5")
+    ("nf-md-filter_settings_outline" . "\xf1aa6")
+    ("nf-md-filter_variant" . "\xf0236")
+    ("nf-md-filter_variant_minus" . "\xf1112")
+    ("nf-md-filter_variant_plus" . "\xf1113")
+    ("nf-md-filter_variant_remove" . "\xf103f")
+    ("nf-md-finance" . "\xf081f")
+    ("nf-md-find_replace" . "\xf06d4")
+    ("nf-md-fingerprint" . "\xf0237")
+    ("nf-md-fingerprint_off" . "\xf0eb1")
+    ("nf-md-fire" . "\xf0238")
+    ("nf-md-fire_alert" . "\xf15d7")
+    ("nf-md-fire_circle" . "\xf1807")
+    ("nf-md-fire_extinguisher" . "\xf0ef2")
+    ("nf-md-fire_hydrant" . "\xf1137")
+    ("nf-md-fire_hydrant_alert" . "\xf1138")
+    ("nf-md-fire_hydrant_off" . "\xf1139")
+    ("nf-md-fire_off" . "\xf1722")
+    ("nf-md-fire_truck" . "\xf08ab")
+    ("nf-md-firebase" . "\xf0967")
+    ("nf-md-firefox" . "\xf0239")
+    ("nf-md-fireplace" . "\xf0e2e")
+    ("nf-md-fireplace_off" . "\xf0e2f")
+    ("nf-md-firewire" . "\xf05be")
+    ("nf-md-firework" . "\xf0e30")
+    ("nf-md-firework_off" . "\xf1723")
+    ("nf-md-fish" . "\xf023a")
+    ("nf-md-fish_off" . "\xf13f3")
+    ("nf-md-fishbowl" . "\xf0ef3")
+    ("nf-md-fishbowl_outline" . "\xf0ef4")
+    ("nf-md-fit_to_page" . "\xf0ef5")
+    ("nf-md-fit_to_page_outline" . "\xf0ef6")
+    ("nf-md-fit_to_screen" . "\xf18f4")
+    ("nf-md-fit_to_screen_outline" . "\xf18f5")
+    ("nf-md-flag" . "\xf023b")
+    ("nf-md-flag_checkered" . "\xf023c")
+    ("nf-md-flag_minus" . "\xf0b99")
+    ("nf-md-flag_minus_outline" . "\xf10b2")
+    ("nf-md-flag_off" . "\xf18ee")
+    ("nf-md-flag_off_outline" . "\xf18ef")
+    ("nf-md-flag_outline" . "\xf023d")
+    ("nf-md-flag_plus" . "\xf0b9a")
+    ("nf-md-flag_plus_outline" . "\xf10b3")
+    ("nf-md-flag_remove" . "\xf0b9b")
+    ("nf-md-flag_remove_outline" . "\xf10b4")
+    ("nf-md-flag_triangle" . "\xf023f")
+    ("nf-md-flag_variant" . "\xf0240")
+    ("nf-md-flag_variant_outline" . "\xf023e")
+    ("nf-md-flare" . "\xf0d72")
+    ("nf-md-flash" . "\xf0241")
+    ("nf-md-flash_alert" . "\xf0ef7")
+    ("nf-md-flash_alert_outline" . "\xf0ef8")
+    ("nf-md-flash_auto" . "\xf0242")
+    ("nf-md-flash_off" . "\xf0243")
+    ("nf-md-flash_outline" . "\xf06d5")
+    ("nf-md-flash_red_eye" . "\xf067b")
+    ("nf-md-flashlight" . "\xf0244")
+    ("nf-md-flashlight_off" . "\xf0245")
+    ("nf-md-flask" . "\xf0093")
+    ("nf-md-flask_empty" . "\xf0094")
+    ("nf-md-flask_empty_minus" . "\xf123a")
+    ("nf-md-flask_empty_minus_outline" . "\xf123b")
+    ("nf-md-flask_empty_off" . "\xf13f4")
+    ("nf-md-flask_empty_off_outline" . "\xf13f5")
+    ("nf-md-flask_empty_outline" . "\xf0095")
+    ("nf-md-flask_empty_plus" . "\xf123c")
+    ("nf-md-flask_empty_plus_outline" . "\xf123d")
+    ("nf-md-flask_empty_remove" . "\xf123e")
+    ("nf-md-flask_empty_remove_outline" . "\xf123f")
+    ("nf-md-flask_minus" . "\xf1240")
+    ("nf-md-flask_minus_outline" . "\xf1241")
+    ("nf-md-flask_off" . "\xf13f6")
+    ("nf-md-flask_off_outline" . "\xf13f7")
+    ("nf-md-flask_outline" . "\xf0096")
+    ("nf-md-flask_plus" . "\xf1242")
+    ("nf-md-flask_plus_outline" . "\xf1243")
+    ("nf-md-flask_remove" . "\xf1244")
+    ("nf-md-flask_remove_outline" . "\xf1245")
+    ("nf-md-flask_round_bottom" . "\xf124b")
+    ("nf-md-flask_round_bottom_empty" . "\xf124c")
+    ("nf-md-flask_round_bottom_empty_outline" . "\xf124d")
+    ("nf-md-flask_round_bottom_outline" . "\xf124e")
+    ("nf-md-fleur_de_lis" . "\xf1303")
+    ("nf-md-flip_horizontal" . "\xf10e7")
+    ("nf-md-flip_to_back" . "\xf0247")
+    ("nf-md-flip_to_front" . "\xf0248")
+    ("nf-md-flip_vertical" . "\xf10e8")
+    ("nf-md-floor_lamp" . "\xf08dd")
+    ("nf-md-floor_lamp_dual" . "\xf1040")
+    ("nf-md-floor_lamp_dual_outline" . "\xf17ce")
+    ("nf-md-floor_lamp_outline" . "\xf17c8")
+    ("nf-md-floor_lamp_torchiere" . "\xf1747")
+    ("nf-md-floor_lamp_torchiere_outline" . "\xf17d6")
+    ("nf-md-floor_lamp_torchiere_variant" . "\xf1041")
+    ("nf-md-floor_lamp_torchiere_variant_outline" . "\xf17cf")
+    ("nf-md-floor_plan" . "\xf0821")
+    ("nf-md-floppy" . "\xf0249")
+    ("nf-md-floppy_variant" . "\xf09ef")
+    ("nf-md-flower" . "\xf024a")
+    ("nf-md-flower_outline" . "\xf09f0")
+    ("nf-md-flower_pollen" . "\xf1885")
+    ("nf-md-flower_pollen_outline" . "\xf1886")
+    ("nf-md-flower_poppy" . "\xf0d08")
+    ("nf-md-flower_tulip" . "\xf09f1")
+    ("nf-md-flower_tulip_outline" . "\xf09f2")
+    ("nf-md-focus_auto" . "\xf0f4e")
+    ("nf-md-focus_field" . "\xf0f4f")
+    ("nf-md-focus_field_horizontal" . "\xf0f50")
+    ("nf-md-focus_field_vertical" . "\xf0f51")
+    ("nf-md-folder" . "\xf024b")
+    ("nf-md-folder_account" . "\xf024c")
+    ("nf-md-folder_account_outline" . "\xf0b9c")
+    ("nf-md-folder_alert" . "\xf0dcc")
+    ("nf-md-folder_alert_outline" . "\xf0dcd")
+    ("nf-md-folder_arrow_down" . "\xf19e8")
+    ("nf-md-folder_arrow_down_outline" . "\xf19e9")
+    ("nf-md-folder_arrow_left" . "\xf19ea")
+    ("nf-md-folder_arrow_left_outline" . "\xf19eb")
+    ("nf-md-folder_arrow_left_right" . "\xf19ec")
+    ("nf-md-folder_arrow_left_right_outline" . "\xf19ed")
+    ("nf-md-folder_arrow_right" . "\xf19ee")
+    ("nf-md-folder_arrow_right_outline" . "\xf19ef")
+    ("nf-md-folder_arrow_up" . "\xf19f0")
+    ("nf-md-folder_arrow_up_down" . "\xf19f1")
+    ("nf-md-folder_arrow_up_down_outline" . "\xf19f2")
+    ("nf-md-folder_arrow_up_outline" . "\xf19f3")
+    ("nf-md-folder_cancel" . "\xf19f4")
+    ("nf-md-folder_cancel_outline" . "\xf19f5")
+    ("nf-md-folder_check" . "\xf197e")
+    ("nf-md-folder_check_outline" . "\xf197f")
+    ("nf-md-folder_clock" . "\xf0aba")
+    ("nf-md-folder_clock_outline" . "\xf0abb")
+    ("nf-md-folder_cog" . "\xf107f")
+    ("nf-md-folder_cog_outline" . "\xf1080")
+    ("nf-md-folder_download" . "\xf024d")
+    ("nf-md-folder_download_outline" . "\xf10e9")
+    ("nf-md-folder_edit" . "\xf08de")
+    ("nf-md-folder_edit_outline" . "\xf0dce")
+    ("nf-md-folder_eye" . "\xf178a")
+    ("nf-md-folder_eye_outline" . "\xf178b")
+    ("nf-md-folder_file" . "\xf19f6")
+    ("nf-md-folder_file_outline" . "\xf19f7")
+    ("nf-md-folder_google_drive" . "\xf024e")
+    ("nf-md-folder_heart" . "\xf10ea")
+    ("nf-md-folder_heart_outline" . "\xf10eb")
+    ("nf-md-folder_hidden" . "\xf179e")
+    ("nf-md-folder_home" . "\xf10b5")
+    ("nf-md-folder_home_outline" . "\xf10b6")
+    ("nf-md-folder_image" . "\xf024f")
+    ("nf-md-folder_information" . "\xf10b7")
+    ("nf-md-folder_information_outline" . "\xf10b8")
+    ("nf-md-folder_key" . "\xf08ac")
+    ("nf-md-folder_key_network" . "\xf08ad")
+    ("nf-md-folder_key_network_outline" . "\xf0c80")
+    ("nf-md-folder_key_outline" . "\xf10ec")
+    ("nf-md-folder_lock" . "\xf0250")
+    ("nf-md-folder_lock_open" . "\xf0251")
+    ("nf-md-folder_lock_open_outline" . "\xf1aa7")
+    ("nf-md-folder_lock_outline" . "\xf1aa8")
+    ("nf-md-folder_marker" . "\xf126d")
+    ("nf-md-folder_marker_outline" . "\xf126e")
+    ("nf-md-folder_move" . "\xf0252")
+    ("nf-md-folder_move_outline" . "\xf1246")
+    ("nf-md-folder_multiple" . "\xf0253")
+    ("nf-md-folder_multiple_image" . "\xf0254")
+    ("nf-md-folder_multiple_outline" . "\xf0255")
+    ("nf-md-folder_multiple_plus" . "\xf147e")
+    ("nf-md-folder_multiple_plus_outline" . "\xf147f")
+    ("nf-md-folder_music" . "\xf1359")
+    ("nf-md-folder_music_outline" . "\xf135a")
+    ("nf-md-folder_network" . "\xf0870")
+    ("nf-md-folder_network_outline" . "\xf0c81")
+    ("nf-md-folder_off" . "\xf19f8")
+    ("nf-md-folder_off_outline" . "\xf19f9")
+    ("nf-md-folder_open" . "\xf0770")
+    ("nf-md-folder_open_outline" . "\xf0dcf")
+    ("nf-md-folder_outline" . "\xf0256")
+    ("nf-md-folder_play" . "\xf19fa")
+    ("nf-md-folder_play_outline" . "\xf19fb")
+    ("nf-md-folder_plus" . "\xf0257")
+    ("nf-md-folder_plus_outline" . "\xf0b9d")
+    ("nf-md-folder_pound" . "\xf0d09")
+    ("nf-md-folder_pound_outline" . "\xf0d0a")
+    ("nf-md-folder_question" . "\xf19ca")
+    ("nf-md-folder_question_outline" . "\xf19cb")
+    ("nf-md-folder_refresh" . "\xf0749")
+    ("nf-md-folder_refresh_outline" . "\xf0542")
+    ("nf-md-folder_remove" . "\xf0258")
+    ("nf-md-folder_remove_outline" . "\xf0b9e")
+    ("nf-md-folder_search" . "\xf0968")
+    ("nf-md-folder_search_outline" . "\xf0969")
+    ("nf-md-folder_settings" . "\xf107d")
+    ("nf-md-folder_settings_outline" . "\xf107e")
+    ("nf-md-folder_star" . "\xf069d")
+    ("nf-md-folder_star_multiple" . "\xf13d3")
+    ("nf-md-folder_star_multiple_outline" . "\xf13d4")
+    ("nf-md-folder_star_outline" . "\xf0b9f")
+    ("nf-md-folder_swap" . "\xf0fb6")
+    ("nf-md-folder_swap_outline" . "\xf0fb7")
+    ("nf-md-folder_sync" . "\xf0d0b")
+    ("nf-md-folder_sync_outline" . "\xf0d0c")
+    ("nf-md-folder_table" . "\xf12e3")
+    ("nf-md-folder_table_outline" . "\xf12e4")
+    ("nf-md-folder_text" . "\xf0c82")
+    ("nf-md-folder_text_outline" . "\xf0c83")
+    ("nf-md-folder_upload" . "\xf0259")
+    ("nf-md-folder_upload_outline" . "\xf10ed")
+    ("nf-md-folder_wrench" . "\xf19fc")
+    ("nf-md-folder_wrench_outline" . "\xf19fd")
+    ("nf-md-folder_zip" . "\xf06eb")
+    ("nf-md-folder_zip_outline" . "\xf07b9")
+    ("nf-md-font_awesome" . "\xf003a")
+    ("nf-md-food" . "\xf025a")
+    ("nf-md-food_apple" . "\xf025b")
+    ("nf-md-food_apple_outline" . "\xf0c84")
+    ("nf-md-food_croissant" . "\xf07c8")
+    ("nf-md-food_drumstick" . "\xf141f")
+    ("nf-md-food_drumstick_off" . "\xf1468")
+    ("nf-md-food_drumstick_off_outline" . "\xf1469")
+    ("nf-md-food_drumstick_outline" . "\xf1420")
+    ("nf-md-food_fork_drink" . "\xf05f2")
+    ("nf-md-food_halal" . "\xf1572")
+    ("nf-md-food_hot_dog" . "\xf184b")
+    ("nf-md-food_kosher" . "\xf1573")
+    ("nf-md-food_off" . "\xf05f3")
+    ("nf-md-food_off_outline" . "\xf1915")
+    ("nf-md-food_outline" . "\xf1916")
+    ("nf-md-food_steak" . "\xf146a")
+    ("nf-md-food_steak_off" . "\xf146b")
+    ("nf-md-food_takeout_box" . "\xf1836")
+    ("nf-md-food_takeout_box_outline" . "\xf1837")
+    ("nf-md-food_turkey" . "\xf171c")
+    ("nf-md-food_variant" . "\xf025c")
+    ("nf-md-food_variant_off" . "\xf13e5")
+    ("nf-md-foot_print" . "\xf0f52")
+    ("nf-md-football" . "\xf025d")
+    ("nf-md-football_australian" . "\xf025e")
+    ("nf-md-football_helmet" . "\xf025f")
+    ("nf-md-forest" . "\xf1897")
+    ("nf-md-forklift" . "\xf07c9")
+    ("nf-md-form_dropdown" . "\xf1400")
+    ("nf-md-form_select" . "\xf1401")
+    ("nf-md-form_textarea" . "\xf1095")
+    ("nf-md-form_textbox" . "\xf060e")
+    ("nf-md-form_textbox_lock" . "\xf135d")
+    ("nf-md-form_textbox_password" . "\xf07f5")
+    ("nf-md-format_align_bottom" . "\xf0753")
+    ("nf-md-format_align_center" . "\xf0260")
+    ("nf-md-format_align_justify" . "\xf0261")
+    ("nf-md-format_align_left" . "\xf0262")
+    ("nf-md-format_align_middle" . "\xf0754")
+    ("nf-md-format_align_right" . "\xf0263")
+    ("nf-md-format_align_top" . "\xf0755")
+    ("nf-md-format_annotation_minus" . "\xf0abc")
+    ("nf-md-format_annotation_plus" . "\xf0646")
+    ("nf-md-format_bold" . "\xf0264")
+    ("nf-md-format_clear" . "\xf0265")
+    ("nf-md-format_color_fill" . "\xf0266")
+    ("nf-md-format_color_highlight" . "\xf0e31")
+    ("nf-md-format_color_marker_cancel" . "\xf1313")
+    ("nf-md-format_color_text" . "\xf069e")
+    ("nf-md-format_columns" . "\xf08df")
+    ("nf-md-format_float_center" . "\xf0267")
+    ("nf-md-format_float_left" . "\xf0268")
+    ("nf-md-format_float_none" . "\xf0269")
+    ("nf-md-format_float_right" . "\xf026a")
+    ("nf-md-format_font" . "\xf06d6")
+    ("nf-md-format_font_size_decrease" . "\xf09f3")
+    ("nf-md-format_font_size_increase" . "\xf09f4")
+    ("nf-md-format_header_1" . "\xf026b")
+    ("nf-md-format_header_2" . "\xf026c")
+    ("nf-md-format_header_3" . "\xf026d")
+    ("nf-md-format_header_4" . "\xf026e")
+    ("nf-md-format_header_5" . "\xf026f")
+    ("nf-md-format_header_6" . "\xf0270")
+    ("nf-md-format_header_decrease" . "\xf0271")
+    ("nf-md-format_header_equal" . "\xf0272")
+    ("nf-md-format_header_increase" . "\xf0273")
+    ("nf-md-format_header_pound" . "\xf0274")
+    ("nf-md-format_horizontal_align_center" . "\xf061e")
+    ("nf-md-format_horizontal_align_left" . "\xf061f")
+    ("nf-md-format_horizontal_align_right" . "\xf0620")
+    ("nf-md-format_indent_decrease" . "\xf0275")
+    ("nf-md-format_indent_increase" . "\xf0276")
+    ("nf-md-format_italic" . "\xf0277")
+    ("nf-md-format_letter_case" . "\xf0b34")
+    ("nf-md-format_letter_case_lower" . "\xf0b35")
+    ("nf-md-format_letter_case_upper" . "\xf0b36")
+    ("nf-md-format_letter_ends_with" . "\xf0fb8")
+    ("nf-md-format_letter_matches" . "\xf0fb9")
+    ("nf-md-format_letter_spacing" . "\xf1956")
+    ("nf-md-format_letter_starts_with" . "\xf0fba")
+    ("nf-md-format_line_spacing" . "\xf0278")
+    ("nf-md-format_line_style" . "\xf05c8")
+    ("nf-md-format_line_weight" . "\xf05c9")
+    ("nf-md-format_list_bulleted" . "\xf0279")
+    ("nf-md-format_list_bulleted_square" . "\xf0dd0")
+    ("nf-md-format_list_bulleted_triangle" . "\xf0eb2")
+    ("nf-md-format_list_bulleted_type" . "\xf027a")
+    ("nf-md-format_list_checkbox" . "\xf096a")
+    ("nf-md-format_list_checks" . "\xf0756")
+    ("nf-md-format_list_group" . "\xf1860")
+    ("nf-md-format_list_numbered" . "\xf027b")
+    ("nf-md-format_list_numbered_rtl" . "\xf0d0d")
+    ("nf-md-format_list_text" . "\xf126f")
+    ("nf-md-format_overline" . "\xf0eb3")
+    ("nf-md-format_page_break" . "\xf06d7")
+    ("nf-md-format_page_split" . "\xf1917")
+    ("nf-md-format_paint" . "\xf027c")
+    ("nf-md-format_paragraph" . "\xf027d")
+    ("nf-md-format_pilcrow" . "\xf06d8")
+    ("nf-md-format_quote_close" . "\xf027e")
+    ("nf-md-format_quote_close_outline" . "\xf11a8")
+    ("nf-md-format_quote_open" . "\xf0757")
+    ("nf-md-format_quote_open_outline" . "\xf11a7")
+    ("nf-md-format_rotate_90" . "\xf06aa")
+    ("nf-md-format_section" . "\xf069f")
+    ("nf-md-format_size" . "\xf027f")
+    ("nf-md-format_strikethrough" . "\xf0280")
+    ("nf-md-format_strikethrough_variant" . "\xf0281")
+    ("nf-md-format_subscript" . "\xf0282")
+    ("nf-md-format_superscript" . "\xf0283")
+    ("nf-md-format_text" . "\xf0284")
+    ("nf-md-format_text_rotation_angle_down" . "\xf0fbb")
+    ("nf-md-format_text_rotation_angle_up" . "\xf0fbc")
+    ("nf-md-format_text_rotation_down" . "\xf0d73")
+    ("nf-md-format_text_rotation_down_vertical" . "\xf0fbd")
+    ("nf-md-format_text_rotation_none" . "\xf0d74")
+    ("nf-md-format_text_rotation_up" . "\xf0fbe")
+    ("nf-md-format_text_rotation_vertical" . "\xf0fbf")
+    ("nf-md-format_text_variant" . "\xf0e32")
+    ("nf-md-format_text_variant_outline" . "\xf150f")
+    ("nf-md-format_text_wrapping_clip" . "\xf0d0e")
+    ("nf-md-format_text_wrapping_overflow" . "\xf0d0f")
+    ("nf-md-format_text_wrapping_wrap" . "\xf0d10")
+    ("nf-md-format_textbox" . "\xf0d11")
+    ("nf-md-format_textdirection_l_to_r" . "\xf0285")
+    ("nf-md-format_textdirection_r_to_l" . "\xf0286")
+    ("nf-md-format_title" . "\xf05f4")
+    ("nf-md-format_underline" . "\xf0287")
+    ("nf-md-format_underline_wavy" . "\xf18e9")
+    ("nf-md-format_vertical_align_bottom" . "\xf0621")
+    ("nf-md-format_vertical_align_center" . "\xf0622")
+    ("nf-md-format_vertical_align_top" . "\xf0623")
+    ("nf-md-format_wrap_inline" . "\xf0288")
+    ("nf-md-format_wrap_square" . "\xf0289")
+    ("nf-md-format_wrap_tight" . "\xf028a")
+    ("nf-md-format_wrap_top_bottom" . "\xf028b")
+    ("nf-md-forum" . "\xf028c")
+    ("nf-md-forum_minus" . "\xf1aa9")
+    ("nf-md-forum_minus_outline" . "\xf1aaa")
+    ("nf-md-forum_outline" . "\xf0822")
+    ("nf-md-forum_plus" . "\xf1aab")
+    ("nf-md-forum_plus_outline" . "\xf1aac")
+    ("nf-md-forum_remove" . "\xf1aad")
+    ("nf-md-forum_remove_outline" . "\xf1aae")
+    ("nf-md-forward" . "\xf028d")
+    ("nf-md-forwardburger" . "\xf0d75")
+    ("nf-md-fountain" . "\xf096b")
+    ("nf-md-fountain_pen" . "\xf0d12")
+    ("nf-md-fountain_pen_tip" . "\xf0d13")
+    ("nf-md-fraction_one_half" . "\xf1992")
+    ("nf-md-freebsd" . "\xf08e0")
+    ("nf-md-french_fries" . "\xf1957")
+    ("nf-md-frequently_asked_questions" . "\xf0eb4")
+    ("nf-md-fridge" . "\xf0290")
+    ("nf-md-fridge_alert" . "\xf11b1")
+    ("nf-md-fridge_alert_outline" . "\xf11b2")
+    ("nf-md-fridge_bottom" . "\xf0292")
+    ("nf-md-fridge_industrial" . "\xf15ee")
+    ("nf-md-fridge_industrial_alert" . "\xf15ef")
+    ("nf-md-fridge_industrial_alert_outline" . "\xf15f0")
+    ("nf-md-fridge_industrial_off" . "\xf15f1")
+    ("nf-md-fridge_industrial_off_outline" . "\xf15f2")
+    ("nf-md-fridge_industrial_outline" . "\xf15f3")
+    ("nf-md-fridge_off" . "\xf11af")
+    ("nf-md-fridge_off_outline" . "\xf11b0")
+    ("nf-md-fridge_outline" . "\xf028f")
+    ("nf-md-fridge_top" . "\xf0291")
+    ("nf-md-fridge_variant" . "\xf15f4")
+    ("nf-md-fridge_variant_alert" . "\xf15f5")
+    ("nf-md-fridge_variant_alert_outline" . "\xf15f6")
+    ("nf-md-fridge_variant_off" . "\xf15f7")
+    ("nf-md-fridge_variant_off_outline" . "\xf15f8")
+    ("nf-md-fridge_variant_outline" . "\xf15f9")
+    ("nf-md-fruit_cherries" . "\xf1042")
+    ("nf-md-fruit_cherries_off" . "\xf13f8")
+    ("nf-md-fruit_citrus" . "\xf1043")
+    ("nf-md-fruit_citrus_off" . "\xf13f9")
+    ("nf-md-fruit_grapes" . "\xf1044")
+    ("nf-md-fruit_grapes_outline" . "\xf1045")
+    ("nf-md-fruit_pear" . "\xf1a0e")
+    ("nf-md-fruit_pineapple" . "\xf1046")
+    ("nf-md-fruit_watermelon" . "\xf1047")
+    ("nf-md-fuel" . "\xf07ca")
+    ("nf-md-fuel_cell" . "\xf18b5")
+    ("nf-md-fullscreen" . "\xf0293")
+    ("nf-md-fullscreen_exit" . "\xf0294")
+    ("nf-md-function" . "\xf0295")
+    ("nf-md-function_variant" . "\xf0871")
+    ("nf-md-furigana_horizontal" . "\xf1081")
+    ("nf-md-furigana_vertical" . "\xf1082")
+    ("nf-md-fuse" . "\xf0c85")
+    ("nf-md-fuse_alert" . "\xf142d")
+    ("nf-md-fuse_blade" . "\xf0c86")
+    ("nf-md-fuse_off" . "\xf142c")
+    ("nf-md-gamepad" . "\xf0296")
+    ("nf-md-gamepad_circle" . "\xf0e33")
+    ("nf-md-gamepad_circle_down" . "\xf0e34")
+    ("nf-md-gamepad_circle_left" . "\xf0e35")
+    ("nf-md-gamepad_circle_outline" . "\xf0e36")
+    ("nf-md-gamepad_circle_right" . "\xf0e37")
+    ("nf-md-gamepad_circle_up" . "\xf0e38")
+    ("nf-md-gamepad_down" . "\xf0e39")
+    ("nf-md-gamepad_left" . "\xf0e3a")
+    ("nf-md-gamepad_outline" . "\xf1919")
+    ("nf-md-gamepad_right" . "\xf0e3b")
+    ("nf-md-gamepad_round" . "\xf0e3c")
+    ("nf-md-gamepad_round_down" . "\xf0e3d")
+    ("nf-md-gamepad_round_left" . "\xf0e3e")
+    ("nf-md-gamepad_round_outline" . "\xf0e3f")
+    ("nf-md-gamepad_round_right" . "\xf0e40")
+    ("nf-md-gamepad_round_up" . "\xf0e41")
+    ("nf-md-gamepad_square" . "\xf0eb5")
+    ("nf-md-gamepad_square_outline" . "\xf0eb6")
+    ("nf-md-gamepad_up" . "\xf0e42")
+    ("nf-md-gamepad_variant" . "\xf0297")
+    ("nf-md-gamepad_variant_outline" . "\xf0eb7")
+    ("nf-md-gamma" . "\xf10ee")
+    ("nf-md-gantry_crane" . "\xf0dd1")
+    ("nf-md-garage" . "\xf06d9")
+    ("nf-md-garage_alert" . "\xf0872")
+    ("nf-md-garage_alert_variant" . "\xf12d5")
+    ("nf-md-garage_lock" . "\xf17fb")
+    ("nf-md-garage_open" . "\xf06da")
+    ("nf-md-garage_open_variant" . "\xf12d4")
+    ("nf-md-garage_variant" . "\xf12d3")
+    ("nf-md-garage_variant_lock" . "\xf17fc")
+    ("nf-md-gas_burner" . "\xf1a1b")
+    ("nf-md-gas_cylinder" . "\xf0647")
+    ("nf-md-gas_station" . "\xf0298")
+    ("nf-md-gas_station_off" . "\xf1409")
+    ("nf-md-gas_station_off_outline" . "\xf140a")
+    ("nf-md-gas_station_outline" . "\xf0eb8")
+    ("nf-md-gate" . "\xf0299")
+    ("nf-md-gate_alert" . "\xf17f8")
+    ("nf-md-gate_and" . "\xf08e1")
+    ("nf-md-gate_arrow_left" . "\xf17f7")
+    ("nf-md-gate_arrow_right" . "\xf1169")
+    ("nf-md-gate_nand" . "\xf08e2")
+    ("nf-md-gate_nor" . "\xf08e3")
+    ("nf-md-gate_not" . "\xf08e4")
+    ("nf-md-gate_open" . "\xf116a")
+    ("nf-md-gate_or" . "\xf08e5")
+    ("nf-md-gate_xnor" . "\xf08e6")
+    ("nf-md-gate_xor" . "\xf08e7")
+    ("nf-md-gatsby" . "\xf0e43")
+    ("nf-md-gauge" . "\xf029a")
+    ("nf-md-gauge_empty" . "\xf0873")
+    ("nf-md-gauge_full" . "\xf0874")
+    ("nf-md-gauge_low" . "\xf0875")
+    ("nf-md-gavel" . "\xf029b")
+    ("nf-md-gender_female" . "\xf029c")
+    ("nf-md-gender_male" . "\xf029d")
+    ("nf-md-gender_male_female" . "\xf029e")
+    ("nf-md-gender_male_female_variant" . "\xf113f")
+    ("nf-md-gender_non_binary" . "\xf1140")
+    ("nf-md-gender_transgender" . "\xf029f")
+    ("nf-md-gentoo" . "\xf08e8")
+    ("nf-md-gesture" . "\xf07cb")
+    ("nf-md-gesture_double_tap" . "\xf073c")
+    ("nf-md-gesture_pinch" . "\xf0abd")
+    ("nf-md-gesture_spread" . "\xf0abe")
+    ("nf-md-gesture_swipe" . "\xf0d76")
+    ("nf-md-gesture_swipe_down" . "\xf073d")
+    ("nf-md-gesture_swipe_horizontal" . "\xf0abf")
+    ("nf-md-gesture_swipe_left" . "\xf073e")
+    ("nf-md-gesture_swipe_right" . "\xf073f")
+    ("nf-md-gesture_swipe_up" . "\xf0740")
+    ("nf-md-gesture_swipe_vertical" . "\xf0ac0")
+    ("nf-md-gesture_tap" . "\xf0741")
+    ("nf-md-gesture_tap_box" . "\xf12a9")
+    ("nf-md-gesture_tap_button" . "\xf12a8")
+    ("nf-md-gesture_tap_hold" . "\xf0d77")
+    ("nf-md-gesture_two_double_tap" . "\xf0742")
+    ("nf-md-gesture_two_tap" . "\xf0743")
+    ("nf-md-ghost" . "\xf02a0")
+    ("nf-md-ghost_off" . "\xf09f5")
+    ("nf-md-ghost_off_outline" . "\xf165c")
+    ("nf-md-ghost_outline" . "\xf165d")
+    ("nf-md-gift" . "\xf0e44")
+    ("nf-md-gift_off" . "\xf16ef")
+    ("nf-md-gift_off_outline" . "\xf16f0")
+    ("nf-md-gift_open" . "\xf16f1")
+    ("nf-md-gift_open_outline" . "\xf16f2")
+    ("nf-md-gift_outline" . "\xf02a1")
+    ("nf-md-git" . "\xf02a2")
+    ("nf-md-github" . "\xf02a4")
+    ("nf-md-gitlab" . "\xf0ba0")
+    ("nf-md-glass_cocktail" . "\xf0356")
+    ("nf-md-glass_cocktail_off" . "\xf15e6")
+    ("nf-md-glass_flute" . "\xf02a5")
+    ("nf-md-glass_fragile" . "\xf1873")
+    ("nf-md-glass_mug" . "\xf02a6")
+    ("nf-md-glass_mug_off" . "\xf15e7")
+    ("nf-md-glass_mug_variant" . "\xf1116")
+    ("nf-md-glass_mug_variant_off" . "\xf15e8")
+    ("nf-md-glass_pint_outline" . "\xf130d")
+    ("nf-md-glass_stange" . "\xf02a7")
+    ("nf-md-glass_tulip" . "\xf02a8")
+    ("nf-md-glass_wine" . "\xf0876")
+    ("nf-md-glasses" . "\xf02aa")
+    ("nf-md-globe_light" . "\xf12d7")
+    ("nf-md-globe_model" . "\xf08e9")
+    ("nf-md-gmail" . "\xf02ab")
+    ("nf-md-gnome" . "\xf02ac")
+    ("nf-md-go_kart" . "\xf0d79")
+    ("nf-md-go_kart_track" . "\xf0d7a")
+    ("nf-md-gog" . "\xf0ba1")
+    ("nf-md-gold" . "\xf124f")
+    ("nf-md-golf" . "\xf0823")
+    ("nf-md-golf_cart" . "\xf11a4")
+    ("nf-md-golf_tee" . "\xf1083")
+    ("nf-md-gondola" . "\xf0686")
+    ("nf-md-goodreads" . "\xf0d7b")
+    ("nf-md-google" . "\xf02ad")
+    ("nf-md-google_ads" . "\xf0c87")
+    ("nf-md-google_analytics" . "\xf07cc")
+    ("nf-md-google_assistant" . "\xf07cd")
+    ("nf-md-google_cardboard" . "\xf02ae")
+    ("nf-md-google_chrome" . "\xf02af")
+    ("nf-md-google_circles" . "\xf02b0")
+    ("nf-md-google_circles_communities" . "\xf02b1")
+    ("nf-md-google_circles_extended" . "\xf02b2")
+    ("nf-md-google_circles_group" . "\xf02b3")
+    ("nf-md-google_classroom" . "\xf02c0")
+    ("nf-md-google_cloud" . "\xf11f6")
+    ("nf-md-google_controller" . "\xf02b4")
+    ("nf-md-google_controller_off" . "\xf02b5")
+    ("nf-md-google_downasaur" . "\xf1362")
+    ("nf-md-google_drive" . "\xf02b6")
+    ("nf-md-google_earth" . "\xf02b7")
+    ("nf-md-google_fit" . "\xf096c")
+    ("nf-md-google_glass" . "\xf02b8")
+    ("nf-md-google_hangouts" . "\xf02c9")
+    ("nf-md-google_home" . "\xf0824")
+    ("nf-md-google_keep" . "\xf06dc")
+    ("nf-md-google_lens" . "\xf09f6")
+    ("nf-md-google_maps" . "\xf05f5")
+    ("nf-md-google_my_business" . "\xf1048")
+    ("nf-md-google_nearby" . "\xf02b9")
+    ("nf-md-google_play" . "\xf02bc")
+    ("nf-md-google_plus" . "\xf02bd")
+    ("nf-md-google_podcast" . "\xf0eb9")
+    ("nf-md-google_spreadsheet" . "\xf09f7")
+    ("nf-md-google_street_view" . "\xf0c88")
+    ("nf-md-google_translate" . "\xf02bf")
+    ("nf-md-gradient_horizontal" . "\xf174a")
+    ("nf-md-gradient_vertical" . "\xf06a0")
+    ("nf-md-grain" . "\xf0d7c")
+    ("nf-md-graph" . "\xf1049")
+    ("nf-md-graph_outline" . "\xf104a")
+    ("nf-md-graphql" . "\xf0877")
+    ("nf-md-grass" . "\xf1510")
+    ("nf-md-grave_stone" . "\xf0ba2")
+    ("nf-md-grease_pencil" . "\xf0648")
+    ("nf-md-greater_than" . "\xf096d")
+    ("nf-md-greater_than_or_equal" . "\xf096e")
+    ("nf-md-greenhouse" . "\xf002d")
+    ("nf-md-grid" . "\xf02c1")
+    ("nf-md-grid_large" . "\xf0758")
+    ("nf-md-grid_off" . "\xf02c2")
+    ("nf-md-grill" . "\xf0e45")
+    ("nf-md-grill_outline" . "\xf118a")
+    ("nf-md-group" . "\xf02c3")
+    ("nf-md-guitar_acoustic" . "\xf0771")
+    ("nf-md-guitar_electric" . "\xf02c4")
+    ("nf-md-guitar_pick" . "\xf02c5")
+    ("nf-md-guitar_pick_outline" . "\xf02c6")
+    ("nf-md-guy_fawkes_mask" . "\xf0825")
+    ("nf-md-gymnastics" . "\xf1a41")
+    ("nf-md-hail" . "\xf0ac1")
+    ("nf-md-hair_dryer" . "\xf10ef")
+    ("nf-md-hair_dryer_outline" . "\xf10f0")
+    ("nf-md-halloween" . "\xf0ba3")
+    ("nf-md-hamburger" . "\xf0685")
+    ("nf-md-hamburger_check" . "\xf1776")
+    ("nf-md-hamburger_minus" . "\xf1777")
+    ("nf-md-hamburger_off" . "\xf1778")
+    ("nf-md-hamburger_plus" . "\xf1779")
+    ("nf-md-hamburger_remove" . "\xf177a")
+    ("nf-md-hammer" . "\xf08ea")
+    ("nf-md-hammer_screwdriver" . "\xf1322")
+    ("nf-md-hammer_sickle" . "\xf1887")
+    ("nf-md-hammer_wrench" . "\xf1323")
+    ("nf-md-hand_back_left" . "\xf0e46")
+    ("nf-md-hand_back_left_off" . "\xf1830")
+    ("nf-md-hand_back_left_off_outline" . "\xf1832")
+    ("nf-md-hand_back_left_outline" . "\xf182c")
+    ("nf-md-hand_back_right" . "\xf0e47")
+    ("nf-md-hand_back_right_off" . "\xf1831")
+    ("nf-md-hand_back_right_off_outline" . "\xf1833")
+    ("nf-md-hand_back_right_outline" . "\xf182d")
+    ("nf-md-hand_clap" . "\xf194b")
+    ("nf-md-hand_clap_off" . "\xf1a42")
+    ("nf-md-hand_coin" . "\xf188f")
+    ("nf-md-hand_coin_outline" . "\xf1890")
+    ("nf-md-hand_extended" . "\xf18b6")
+    ("nf-md-hand_extended_outline" . "\xf18b7")
+    ("nf-md-hand_front_left" . "\xf182b")
+    ("nf-md-hand_front_left_outline" . "\xf182e")
+    ("nf-md-hand_front_right" . "\xf0a4f")
+    ("nf-md-hand_front_right_outline" . "\xf182f")
+    ("nf-md-hand_heart" . "\xf10f1")
+    ("nf-md-hand_heart_outline" . "\xf157e")
+    ("nf-md-hand_okay" . "\xf0a50")
+    ("nf-md-hand_peace" . "\xf0a51")
+    ("nf-md-hand_peace_variant" . "\xf0a52")
+    ("nf-md-hand_pointing_down" . "\xf0a53")
+    ("nf-md-hand_pointing_left" . "\xf0a54")
+    ("nf-md-hand_pointing_right" . "\xf02c7")
+    ("nf-md-hand_pointing_up" . "\xf0a55")
+    ("nf-md-hand_saw" . "\xf0e48")
+    ("nf-md-hand_wash" . "\xf157f")
+    ("nf-md-hand_wash_outline" . "\xf1580")
+    ("nf-md-hand_water" . "\xf139f")
+    ("nf-md-hand_wave" . "\xf1821")
+    ("nf-md-hand_wave_outline" . "\xf1822")
+    ("nf-md-handball" . "\xf0f53")
+    ("nf-md-handcuffs" . "\xf113e")
+    ("nf-md-hands_pray" . "\xf0579")
+    ("nf-md-handshake" . "\xf1218")
+    ("nf-md-handshake_outline" . "\xf15a1")
+    ("nf-md-hanger" . "\xf02c8")
+    ("nf-md-hard_hat" . "\xf096f")
+    ("nf-md-harddisk" . "\xf02ca")
+    ("nf-md-harddisk_plus" . "\xf104b")
+    ("nf-md-harddisk_remove" . "\xf104c")
+    ("nf-md-hat_fedora" . "\xf0ba4")
+    ("nf-md-hazard_lights" . "\xf0c89")
+    ("nf-md-hdr" . "\xf0d7d")
+    ("nf-md-hdr_off" . "\xf0d7e")
+    ("nf-md-head" . "\xf135e")
+    ("nf-md-head_alert" . "\xf1338")
+    ("nf-md-head_alert_outline" . "\xf1339")
+    ("nf-md-head_check" . "\xf133a")
+    ("nf-md-head_check_outline" . "\xf133b")
+    ("nf-md-head_cog" . "\xf133c")
+    ("nf-md-head_cog_outline" . "\xf133d")
+    ("nf-md-head_dots_horizontal" . "\xf133e")
+    ("nf-md-head_dots_horizontal_outline" . "\xf133f")
+    ("nf-md-head_flash" . "\xf1340")
+    ("nf-md-head_flash_outline" . "\xf1341")
+    ("nf-md-head_heart" . "\xf1342")
+    ("nf-md-head_heart_outline" . "\xf1343")
+    ("nf-md-head_lightbulb" . "\xf1344")
+    ("nf-md-head_lightbulb_outline" . "\xf1345")
+    ("nf-md-head_minus" . "\xf1346")
+    ("nf-md-head_minus_outline" . "\xf1347")
+    ("nf-md-head_outline" . "\xf135f")
+    ("nf-md-head_plus" . "\xf1348")
+    ("nf-md-head_plus_outline" . "\xf1349")
+    ("nf-md-head_question" . "\xf134a")
+    ("nf-md-head_question_outline" . "\xf134b")
+    ("nf-md-head_remove" . "\xf134c")
+    ("nf-md-head_remove_outline" . "\xf134d")
+    ("nf-md-head_snowflake" . "\xf134e")
+    ("nf-md-head_snowflake_outline" . "\xf134f")
+    ("nf-md-head_sync" . "\xf1350")
+    ("nf-md-head_sync_outline" . "\xf1351")
+    ("nf-md-headphones" . "\xf02cb")
+    ("nf-md-headphones_bluetooth" . "\xf0970")
+    ("nf-md-headphones_box" . "\xf02cc")
+    ("nf-md-headphones_off" . "\xf07ce")
+    ("nf-md-headphones_settings" . "\xf02cd")
+    ("nf-md-headset" . "\xf02ce")
+    ("nf-md-headset_dock" . "\xf02cf")
+    ("nf-md-headset_off" . "\xf02d0")
+    ("nf-md-heart" . "\xf02d1")
+    ("nf-md-heart_box" . "\xf02d2")
+    ("nf-md-heart_box_outline" . "\xf02d3")
+    ("nf-md-heart_broken" . "\xf02d4")
+    ("nf-md-heart_broken_outline" . "\xf0d14")
+    ("nf-md-heart_circle" . "\xf0971")
+    ("nf-md-heart_circle_outline" . "\xf0972")
+    ("nf-md-heart_cog" . "\xf1663")
+    ("nf-md-heart_cog_outline" . "\xf1664")
+    ("nf-md-heart_flash" . "\xf0ef9")
+    ("nf-md-heart_half" . "\xf06df")
+    ("nf-md-heart_half_full" . "\xf06de")
+    ("nf-md-heart_half_outline" . "\xf06e0")
+    ("nf-md-heart_minus" . "\xf142f")
+    ("nf-md-heart_minus_outline" . "\xf1432")
+    ("nf-md-heart_multiple" . "\xf0a56")
+    ("nf-md-heart_multiple_outline" . "\xf0a57")
+    ("nf-md-heart_off" . "\xf0759")
+    ("nf-md-heart_off_outline" . "\xf1434")
+    ("nf-md-heart_outline" . "\xf02d5")
+    ("nf-md-heart_plus" . "\xf142e")
+    ("nf-md-heart_plus_outline" . "\xf1431")
+    ("nf-md-heart_pulse" . "\xf05f6")
+    ("nf-md-heart_remove" . "\xf1430")
+    ("nf-md-heart_remove_outline" . "\xf1433")
+    ("nf-md-heart_settings" . "\xf1665")
+    ("nf-md-heart_settings_outline" . "\xf1666")
+    ("nf-md-heat_pump" . "\xf1a43")
+    ("nf-md-heat_pump_outline" . "\xf1a44")
+    ("nf-md-heat_wave" . "\xf1a45")
+    ("nf-md-heating_coil" . "\xf1aaf")
+    ("nf-md-helicopter" . "\xf0ac2")
+    ("nf-md-help" . "\xf02d6")
+    ("nf-md-help_box" . "\xf078b")
+    ("nf-md-help_circle" . "\xf02d7")
+    ("nf-md-help_circle_outline" . "\xf0625")
+    ("nf-md-help_network" . "\xf06f5")
+    ("nf-md-help_network_outline" . "\xf0c8a")
+    ("nf-md-help_rhombus" . "\xf0ba5")
+    ("nf-md-help_rhombus_outline" . "\xf0ba6")
+    ("nf-md-hexadecimal" . "\xf12a7")
+    ("nf-md-hexagon" . "\xf02d8")
+    ("nf-md-hexagon_multiple" . "\xf06e1")
+    ("nf-md-hexagon_multiple_outline" . "\xf10f2")
+    ("nf-md-hexagon_outline" . "\xf02d9")
+    ("nf-md-hexagon_slice_1" . "\xf0ac3")
+    ("nf-md-hexagon_slice_2" . "\xf0ac4")
+    ("nf-md-hexagon_slice_3" . "\xf0ac5")
+    ("nf-md-hexagon_slice_4" . "\xf0ac6")
+    ("nf-md-hexagon_slice_5" . "\xf0ac7")
+    ("nf-md-hexagon_slice_6" . "\xf0ac8")
+    ("nf-md-hexagram" . "\xf0ac9")
+    ("nf-md-hexagram_outline" . "\xf0aca")
+    ("nf-md-high_definition" . "\xf07cf")
+    ("nf-md-high_definition_box" . "\xf0878")
+    ("nf-md-highway" . "\xf05f7")
+    ("nf-md-hiking" . "\xf0d7f")
+    ("nf-md-history" . "\xf02da")
+    ("nf-md-hockey_puck" . "\xf0879")
+    ("nf-md-hockey_sticks" . "\xf087a")
+    ("nf-md-hololens" . "\xf02db")
+    ("nf-md-home" . "\xf02dc")
+    ("nf-md-home_account" . "\xf0826")
+    ("nf-md-home_alert" . "\xf087b")
+    ("nf-md-home_alert_outline" . "\xf15d0")
+    ("nf-md-home_analytics" . "\xf0eba")
+    ("nf-md-home_assistant" . "\xf07d0")
+    ("nf-md-home_automation" . "\xf07d1")
+    ("nf-md-home_battery" . "\xf1901")
+    ("nf-md-home_battery_outline" . "\xf1902")
+    ("nf-md-home_circle" . "\xf07d2")
+    ("nf-md-home_circle_outline" . "\xf104d")
+    ("nf-md-home_city" . "\xf0d15")
+    ("nf-md-home_city_outline" . "\xf0d16")
+    ("nf-md-home_clock" . "\xf1a12")
+    ("nf-md-home_clock_outline" . "\xf1a13")
+    ("nf-md-home_edit" . "\xf1159")
+    ("nf-md-home_edit_outline" . "\xf115a")
+    ("nf-md-home_export_outline" . "\xf0f9b")
+    ("nf-md-home_flood" . "\xf0efa")
+    ("nf-md-home_floor_0" . "\xf0dd2")
+    ("nf-md-home_floor_1" . "\xf0d80")
+    ("nf-md-home_floor_2" . "\xf0d81")
+    ("nf-md-home_floor_3" . "\xf0d82")
+    ("nf-md-home_floor_a" . "\xf0d83")
+    ("nf-md-home_floor_b" . "\xf0d84")
+    ("nf-md-home_floor_g" . "\xf0d85")
+    ("nf-md-home_floor_l" . "\xf0d86")
+    ("nf-md-home_floor_negative_1" . "\xf0dd3")
+    ("nf-md-home_group" . "\xf0dd4")
+    ("nf-md-home_group_minus" . "\xf19c1")
+    ("nf-md-home_group_plus" . "\xf19c0")
+    ("nf-md-home_group_remove" . "\xf19c2")
+    ("nf-md-home_heart" . "\xf0827")
+    ("nf-md-home_import_outline" . "\xf0f9c")
+    ("nf-md-home_lightbulb" . "\xf1251")
+    ("nf-md-home_lightbulb_outline" . "\xf1252")
+    ("nf-md-home_lightning_bolt" . "\xf1903")
+    ("nf-md-home_lightning_bolt_outline" . "\xf1904")
+    ("nf-md-home_lock" . "\xf08eb")
+    ("nf-md-home_lock_open" . "\xf08ec")
+    ("nf-md-home_map_marker" . "\xf05f8")
+    ("nf-md-home_minus" . "\xf0974")
+    ("nf-md-home_minus_outline" . "\xf13d5")
+    ("nf-md-home_modern" . "\xf02dd")
+    ("nf-md-home_off" . "\xf1a46")
+    ("nf-md-home_off_outline" . "\xf1a47")
+    ("nf-md-home_outline" . "\xf06a1")
+    ("nf-md-home_plus" . "\xf0975")
+    ("nf-md-home_plus_outline" . "\xf13d6")
+    ("nf-md-home_remove" . "\xf1247")
+    ("nf-md-home_remove_outline" . "\xf13d7")
+    ("nf-md-home_roof" . "\xf112b")
+    ("nf-md-home_search" . "\xf13b0")
+    ("nf-md-home_search_outline" . "\xf13b1")
+    ("nf-md-home_switch" . "\xf1794")
+    ("nf-md-home_switch_outline" . "\xf1795")
+    ("nf-md-home_thermometer" . "\xf0f54")
+    ("nf-md-home_thermometer_outline" . "\xf0f55")
+    ("nf-md-home_variant" . "\xf02de")
+    ("nf-md-home_variant_outline" . "\xf0ba7")
+    ("nf-md-hook" . "\xf06e2")
+    ("nf-md-hook_off" . "\xf06e3")
+    ("nf-md-hoop_house" . "\xf0e56")
+    ("nf-md-hops" . "\xf02df")
+    ("nf-md-horizontal_rotate_clockwise" . "\xf10f3")
+    ("nf-md-horizontal_rotate_counterclockwise" . "\xf10f4")
+    ("nf-md-horse" . "\xf15bf")
+    ("nf-md-horse_human" . "\xf15c0")
+    ("nf-md-horse_variant" . "\xf15c1")
+    ("nf-md-horse_variant_fast" . "\xf186e")
+    ("nf-md-horseshoe" . "\xf0a58")
+    ("nf-md-hospital" . "\xf0ff6")
+    ("nf-md-hospital_box" . "\xf02e0")
+    ("nf-md-hospital_box_outline" . "\xf0ff7")
+    ("nf-md-hospital_building" . "\xf02e1")
+    ("nf-md-hospital_marker" . "\xf02e2")
+    ("nf-md-hot_tub" . "\xf0828")
+    ("nf-md-hours_24" . "\xf1478")
+    ("nf-md-hubspot" . "\xf0d17")
+    ("nf-md-hulu" . "\xf0829")
+    ("nf-md-human" . "\xf02e6")
+    ("nf-md-human_baby_changing_table" . "\xf138b")
+    ("nf-md-human_cane" . "\xf1581")
+    ("nf-md-human_capacity_decrease" . "\xf159b")
+    ("nf-md-human_capacity_increase" . "\xf159c")
+    ("nf-md-human_child" . "\xf02e7")
+    ("nf-md-human_dolly" . "\xf1980")
+    ("nf-md-human_edit" . "\xf14e8")
+    ("nf-md-human_female" . "\xf0649")
+    ("nf-md-human_female_boy" . "\xf0a59")
+    ("nf-md-human_female_dance" . "\xf15c9")
+    ("nf-md-human_female_female" . "\xf0a5a")
+    ("nf-md-human_female_girl" . "\xf0a5b")
+    ("nf-md-human_greeting" . "\xf17c4")
+    ("nf-md-human_greeting_proximity" . "\xf159d")
+    ("nf-md-human_greeting_variant" . "\xf064a")
+    ("nf-md-human_handsdown" . "\xf064b")
+    ("nf-md-human_handsup" . "\xf064c")
+    ("nf-md-human_male" . "\xf064d")
+    ("nf-md-human_male_board" . "\xf0890")
+    ("nf-md-human_male_board_poll" . "\xf0846")
+    ("nf-md-human_male_boy" . "\xf0a5c")
+    ("nf-md-human_male_child" . "\xf138c")
+    ("nf-md-human_male_female" . "\xf02e8")
+    ("nf-md-human_male_female_child" . "\xf1823")
+    ("nf-md-human_male_girl" . "\xf0a5d")
+    ("nf-md-human_male_height" . "\xf0efb")
+    ("nf-md-human_male_height_variant" . "\xf0efc")
+    ("nf-md-human_male_male" . "\xf0a5e")
+    ("nf-md-human_non_binary" . "\xf1848")
+    ("nf-md-human_pregnant" . "\xf05cf")
+    ("nf-md-human_queue" . "\xf1571")
+    ("nf-md-human_scooter" . "\xf11e9")
+    ("nf-md-human_wheelchair" . "\xf138d")
+    ("nf-md-human_white_cane" . "\xf1981")
+    ("nf-md-humble_bundle" . "\xf0744")
+    ("nf-md-hvac" . "\xf1352")
+    ("nf-md-hvac_off" . "\xf159e")
+    ("nf-md-hydraulic_oil_level" . "\xf1324")
+    ("nf-md-hydraulic_oil_temperature" . "\xf1325")
+    ("nf-md-hydro_power" . "\xf12e5")
+    ("nf-md-hydrogen_station" . "\xf1894")
+    ("nf-md-ice_cream" . "\xf082a")
+    ("nf-md-ice_cream_off" . "\xf0e52")
+    ("nf-md-ice_pop" . "\xf0efd")
+    ("nf-md-id_card" . "\xf0fc0")
+    ("nf-md-identifier" . "\xf0efe")
+    ("nf-md-ideogram_cjk" . "\xf1331")
+    ("nf-md-ideogram_cjk_variant" . "\xf1332")
+    ("nf-md-image" . "\xf02e9")
+    ("nf-md-image_album" . "\xf02ea")
+    ("nf-md-image_area" . "\xf02eb")
+    ("nf-md-image_area_close" . "\xf02ec")
+    ("nf-md-image_auto_adjust" . "\xf0fc1")
+    ("nf-md-image_broken" . "\xf02ed")
+    ("nf-md-image_broken_variant" . "\xf02ee")
+    ("nf-md-image_edit" . "\xf11e3")
+    ("nf-md-image_edit_outline" . "\xf11e4")
+    ("nf-md-image_filter_black_white" . "\xf02f0")
+    ("nf-md-image_filter_center_focus" . "\xf02f1")
+    ("nf-md-image_filter_center_focus_strong" . "\xf0eff")
+    ("nf-md-image_filter_center_focus_strong_outline" . "\xf0f00")
+    ("nf-md-image_filter_center_focus_weak" . "\xf02f2")
+    ("nf-md-image_filter_drama" . "\xf02f3")
+    ("nf-md-image_filter_frames" . "\xf02f4")
+    ("nf-md-image_filter_hdr" . "\xf02f5")
+    ("nf-md-image_filter_none" . "\xf02f6")
+    ("nf-md-image_filter_tilt_shift" . "\xf02f7")
+    ("nf-md-image_filter_vintage" . "\xf02f8")
+    ("nf-md-image_frame" . "\xf0e49")
+    ("nf-md-image_lock" . "\xf1ab0")
+    ("nf-md-image_lock_outline" . "\xf1ab1")
+    ("nf-md-image_marker" . "\xf177b")
+    ("nf-md-image_marker_outline" . "\xf177c")
+    ("nf-md-image_minus" . "\xf1419")
+    ("nf-md-image_move" . "\xf09f8")
+    ("nf-md-image_multiple" . "\xf02f9")
+    ("nf-md-image_multiple_outline" . "\xf02ef")
+    ("nf-md-image_off" . "\xf082b")
+    ("nf-md-image_off_outline" . "\xf11d1")
+    ("nf-md-image_outline" . "\xf0976")
+    ("nf-md-image_plus" . "\xf087c")
+    ("nf-md-image_refresh" . "\xf19fe")
+    ("nf-md-image_refresh_outline" . "\xf19ff")
+    ("nf-md-image_remove" . "\xf1418")
+    ("nf-md-image_search" . "\xf0977")
+    ("nf-md-image_search_outline" . "\xf0978")
+    ("nf-md-image_size_select_actual" . "\xf0c8d")
+    ("nf-md-image_size_select_large" . "\xf0c8e")
+    ("nf-md-image_size_select_small" . "\xf0c8f")
+    ("nf-md-image_sync" . "\xf1a00")
+    ("nf-md-image_sync_outline" . "\xf1a01")
+    ("nf-md-image_text" . "\xf160d")
+    ("nf-md-import" . "\xf02fa")
+    ("nf-md-inbox" . "\xf0687")
+    ("nf-md-inbox_arrow_down" . "\xf02fb")
+    ("nf-md-inbox_arrow_down_outline" . "\xf1270")
+    ("nf-md-inbox_arrow_up" . "\xf03d1")
+    ("nf-md-inbox_arrow_up_outline" . "\xf1271")
+    ("nf-md-inbox_full" . "\xf1272")
+    ("nf-md-inbox_full_outline" . "\xf1273")
+    ("nf-md-inbox_multiple" . "\xf08b0")
+    ("nf-md-inbox_multiple_outline" . "\xf0ba8")
+    ("nf-md-inbox_outline" . "\xf1274")
+    ("nf-md-inbox_remove" . "\xf159f")
+    ("nf-md-inbox_remove_outline" . "\xf15a0")
+    ("nf-md-incognito" . "\xf05f9")
+    ("nf-md-incognito_circle" . "\xf1421")
+    ("nf-md-incognito_circle_off" . "\xf1422")
+    ("nf-md-incognito_off" . "\xf0075")
+    ("nf-md-induction" . "\xf184c")
+    ("nf-md-infinity" . "\xf06e4")
+    ("nf-md-information" . "\xf02fc")
+    ("nf-md-information_off" . "\xf178c")
+    ("nf-md-information_off_outline" . "\xf178d")
+    ("nf-md-information_outline" . "\xf02fd")
+    ("nf-md-information_variant" . "\xf064e")
+    ("nf-md-instagram" . "\xf02fe")
+    ("nf-md-instrument_triangle" . "\xf104e")
+    ("nf-md-integrated_circuit_chip" . "\xf1913")
+    ("nf-md-invert_colors" . "\xf0301")
+    ("nf-md-invert_colors_off" . "\xf0e4a")
+    ("nf-md-iobroker" . "\xf12e8")
+    ("nf-md-ip" . "\xf0a5f")
+    ("nf-md-ip_network" . "\xf0a60")
+    ("nf-md-ip_network_outline" . "\xf0c90")
+    ("nf-md-ip_outline" . "\xf1982")
+    ("nf-md-ipod" . "\xf0c91")
+    ("nf-md-iron" . "\xf1824")
+    ("nf-md-iron_board" . "\xf1838")
+    ("nf-md-iron_outline" . "\xf1825")
+    ("nf-md-island" . "\xf104f")
+    ("nf-md-iv_bag" . "\xf10b9")
+    ("nf-md-jabber" . "\xf0dd5")
+    ("nf-md-jeepney" . "\xf0302")
+    ("nf-md-jellyfish" . "\xf0f01")
+    ("nf-md-jellyfish_outline" . "\xf0f02")
+    ("nf-md-jira" . "\xf0303")
+    ("nf-md-jquery" . "\xf087d")
+    ("nf-md-jsfiddle" . "\xf0304")
+    ("nf-md-jump_rope" . "\xf12ff")
+    ("nf-md-kabaddi" . "\xf0d87")
+    ("nf-md-kangaroo" . "\xf1558")
+    ("nf-md-karate" . "\xf082c")
+    ("nf-md-kayaking" . "\xf08af")
+    ("nf-md-keg" . "\xf0305")
+    ("nf-md-kettle" . "\xf05fa")
+    ("nf-md-kettle_alert" . "\xf1317")
+    ("nf-md-kettle_alert_outline" . "\xf1318")
+    ("nf-md-kettle_off" . "\xf131b")
+    ("nf-md-kettle_off_outline" . "\xf131c")
+    ("nf-md-kettle_outline" . "\xf0f56")
+    ("nf-md-kettle_pour_over" . "\xf173c")
+    ("nf-md-kettle_steam" . "\xf1319")
+    ("nf-md-kettle_steam_outline" . "\xf131a")
+    ("nf-md-kettlebell" . "\xf1300")
+    ("nf-md-key" . "\xf0306")
+    ("nf-md-key_alert" . "\xf1983")
+    ("nf-md-key_alert_outline" . "\xf1984")
+    ("nf-md-key_arrow_right" . "\xf1312")
+    ("nf-md-key_chain" . "\xf1574")
+    ("nf-md-key_chain_variant" . "\xf1575")
+    ("nf-md-key_change" . "\xf0307")
+    ("nf-md-key_link" . "\xf119f")
+    ("nf-md-key_minus" . "\xf0308")
+    ("nf-md-key_outline" . "\xf0dd6")
+    ("nf-md-key_plus" . "\xf0309")
+    ("nf-md-key_remove" . "\xf030a")
+    ("nf-md-key_star" . "\xf119e")
+    ("nf-md-key_variant" . "\xf030b")
+    ("nf-md-key_wireless" . "\xf0fc2")
+    ("nf-md-keyboard" . "\xf030c")
+    ("nf-md-keyboard_backspace" . "\xf030d")
+    ("nf-md-keyboard_caps" . "\xf030e")
+    ("nf-md-keyboard_close" . "\xf030f")
+    ("nf-md-keyboard_esc" . "\xf12b7")
+    ("nf-md-keyboard_f1" . "\xf12ab")
+    ("nf-md-keyboard_f10" . "\xf12b4")
+    ("nf-md-keyboard_f11" . "\xf12b5")
+    ("nf-md-keyboard_f12" . "\xf12b6")
+    ("nf-md-keyboard_f2" . "\xf12ac")
+    ("nf-md-keyboard_f3" . "\xf12ad")
+    ("nf-md-keyboard_f4" . "\xf12ae")
+    ("nf-md-keyboard_f5" . "\xf12af")
+    ("nf-md-keyboard_f6" . "\xf12b0")
+    ("nf-md-keyboard_f7" . "\xf12b1")
+    ("nf-md-keyboard_f8" . "\xf12b2")
+    ("nf-md-keyboard_f9" . "\xf12b3")
+    ("nf-md-keyboard_off" . "\xf0310")
+    ("nf-md-keyboard_off_outline" . "\xf0e4b")
+    ("nf-md-keyboard_outline" . "\xf097b")
+    ("nf-md-keyboard_return" . "\xf0311")
+    ("nf-md-keyboard_settings" . "\xf09f9")
+    ("nf-md-keyboard_settings_outline" . "\xf09fa")
+    ("nf-md-keyboard_space" . "\xf1050")
+    ("nf-md-keyboard_tab" . "\xf0312")
+    ("nf-md-keyboard_tab_reverse" . "\xf0325")
+    ("nf-md-keyboard_variant" . "\xf0313")
+    ("nf-md-khanda" . "\xf10fd")
+    ("nf-md-kickstarter" . "\xf0745")
+    ("nf-md-kite" . "\xf1985")
+    ("nf-md-kite_outline" . "\xf1986")
+    ("nf-md-kitesurfing" . "\xf1744")
+    ("nf-md-klingon" . "\xf135b")
+    ("nf-md-knife" . "\xf09fb")
+    ("nf-md-knife_military" . "\xf09fc")
+    ("nf-md-koala" . "\xf173f")
+    ("nf-md-kodi" . "\xf0314")
+    ("nf-md-kubernetes" . "\xf10fe")
+    ("nf-md-label" . "\xf0315")
+    ("nf-md-label_multiple" . "\xf1375")
+    ("nf-md-label_multiple_outline" . "\xf1376")
+    ("nf-md-label_off" . "\xf0acb")
+    ("nf-md-label_off_outline" . "\xf0acc")
+    ("nf-md-label_outline" . "\xf0316")
+    ("nf-md-label_percent" . "\xf12ea")
+    ("nf-md-label_percent_outline" . "\xf12eb")
+    ("nf-md-label_variant" . "\xf0acd")
+    ("nf-md-label_variant_outline" . "\xf0ace")
+    ("nf-md-ladder" . "\xf15a2")
+    ("nf-md-ladybug" . "\xf082d")
+    ("nf-md-lambda" . "\xf0627")
+    ("nf-md-lamp" . "\xf06b5")
+    ("nf-md-lamp_outline" . "\xf17d0")
+    ("nf-md-lamps" . "\xf1576")
+    ("nf-md-lamps_outline" . "\xf17d1")
+    ("nf-md-lan" . "\xf0317")
+    ("nf-md-lan_check" . "\xf12aa")
+    ("nf-md-lan_connect" . "\xf0318")
+    ("nf-md-lan_disconnect" . "\xf0319")
+    ("nf-md-lan_pending" . "\xf031a")
+    ("nf-md-land_fields" . "\xf1ab2")
+    ("nf-md-land_plots" . "\xf1ab3")
+    ("nf-md-land_plots_circle" . "\xf1ab4")
+    ("nf-md-land_plots_circle_variant" . "\xf1ab5")
+    ("nf-md-land_rows_horizontal" . "\xf1ab6")
+    ("nf-md-land_rows_vertical" . "\xf1ab7")
+    ("nf-md-landslide" . "\xf1a48")
+    ("nf-md-landslide_outline" . "\xf1a49")
+    ("nf-md-language_c" . "\xf0671")
+    ("nf-md-language_cpp" . "\xf0672")
+    ("nf-md-language_csharp" . "\xf031b")
+    ("nf-md-language_css3" . "\xf031c")
+    ("nf-md-language_fortran" . "\xf121a")
+    ("nf-md-language_go" . "\xf07d3")
+    ("nf-md-language_haskell" . "\xf0c92")
+    ("nf-md-language_html5" . "\xf031d")
+    ("nf-md-language_java" . "\xf0b37")
+    ("nf-md-language_javascript" . "\xf031e")
+    ("nf-md-language_kotlin" . "\xf1219")
+    ("nf-md-language_lua" . "\xf08b1")
+    ("nf-md-language_markdown" . "\xf0354")
+    ("nf-md-language_markdown_outline" . "\xf0f5b")
+    ("nf-md-language_php" . "\xf031f")
+    ("nf-md-language_python" . "\xf0320")
+    ("nf-md-language_r" . "\xf07d4")
+    ("nf-md-language_ruby" . "\xf0d2d")
+    ("nf-md-language_ruby_on_rails" . "\xf0acf")
+    ("nf-md-language_rust" . "\xf1617")
+    ("nf-md-language_swift" . "\xf06e5")
+    ("nf-md-language_typescript" . "\xf06e6")
+    ("nf-md-language_xaml" . "\xf0673")
+    ("nf-md-laptop" . "\xf0322")
+    ("nf-md-laptop_account" . "\xf1a4a")
+    ("nf-md-laptop_off" . "\xf06e7")
+    ("nf-md-laravel" . "\xf0ad0")
+    ("nf-md-laser_pointer" . "\xf1484")
+    ("nf-md-lasso" . "\xf0f03")
+    ("nf-md-lastpass" . "\xf0446")
+    ("nf-md-latitude" . "\xf0f57")
+    ("nf-md-launch" . "\xf0327")
+    ("nf-md-lava_lamp" . "\xf07d5")
+    ("nf-md-layers" . "\xf0328")
+    ("nf-md-layers_edit" . "\xf1892")
+    ("nf-md-layers_minus" . "\xf0e4c")
+    ("nf-md-layers_off" . "\xf0329")
+    ("nf-md-layers_off_outline" . "\xf09fd")
+    ("nf-md-layers_outline" . "\xf09fe")
+    ("nf-md-layers_plus" . "\xf0e4d")
+    ("nf-md-layers_remove" . "\xf0e4e")
+    ("nf-md-layers_search" . "\xf1206")
+    ("nf-md-layers_search_outline" . "\xf1207")
+    ("nf-md-layers_triple" . "\xf0f58")
+    ("nf-md-layers_triple_outline" . "\xf0f59")
+    ("nf-md-lead_pencil" . "\xf064f")
+    ("nf-md-leaf" . "\xf032a")
+    ("nf-md-leaf_circle" . "\xf1905")
+    ("nf-md-leaf_circle_outline" . "\xf1906")
+    ("nf-md-leaf_maple" . "\xf0c93")
+    ("nf-md-leaf_maple_off" . "\xf12da")
+    ("nf-md-leaf_off" . "\xf12d9")
+    ("nf-md-leak" . "\xf0dd7")
+    ("nf-md-leak_off" . "\xf0dd8")
+    ("nf-md-lecturn" . "\xf1af0")
+    ("nf-md-led_off" . "\xf032b")
+    ("nf-md-led_on" . "\xf032c")
+    ("nf-md-led_outline" . "\xf032d")
+    ("nf-md-led_strip" . "\xf07d6")
+    ("nf-md-led_strip_variant" . "\xf1051")
+    ("nf-md-led_strip_variant_off" . "\xf1a4b")
+    ("nf-md-led_variant_off" . "\xf032e")
+    ("nf-md-led_variant_on" . "\xf032f")
+    ("nf-md-led_variant_outline" . "\xf0330")
+    ("nf-md-leek" . "\xf117d")
+    ("nf-md-less_than" . "\xf097c")
+    ("nf-md-less_than_or_equal" . "\xf097d")
+    ("nf-md-library" . "\xf0331")
+    ("nf-md-library_outline" . "\xf1a22")
+    ("nf-md-library_shelves" . "\xf0ba9")
+    ("nf-md-license" . "\xf0fc3")
+    ("nf-md-lifebuoy" . "\xf087e")
+    ("nf-md-light_flood_down" . "\xf1987")
+    ("nf-md-light_flood_up" . "\xf1988")
+    ("nf-md-light_recessed" . "\xf179b")
+    ("nf-md-light_switch" . "\xf097e")
+    ("nf-md-light_switch_off" . "\xf1a24")
+    ("nf-md-lightbulb" . "\xf0335")
+    ("nf-md-lightbulb_alert" . "\xf19e1")
+    ("nf-md-lightbulb_alert_outline" . "\xf19e2")
+    ("nf-md-lightbulb_auto" . "\xf1800")
+    ("nf-md-lightbulb_auto_outline" . "\xf1801")
+    ("nf-md-lightbulb_cfl" . "\xf1208")
+    ("nf-md-lightbulb_cfl_off" . "\xf1209")
+    ("nf-md-lightbulb_cfl_spiral" . "\xf1275")
+    ("nf-md-lightbulb_cfl_spiral_off" . "\xf12c3")
+    ("nf-md-lightbulb_fluorescent_tube" . "\xf1804")
+    ("nf-md-lightbulb_fluorescent_tube_outline" . "\xf1805")
+    ("nf-md-lightbulb_group" . "\xf1253")
+    ("nf-md-lightbulb_group_off" . "\xf12cd")
+    ("nf-md-lightbulb_group_off_outline" . "\xf12ce")
+    ("nf-md-lightbulb_group_outline" . "\xf1254")
+    ("nf-md-lightbulb_multiple" . "\xf1255")
+    ("nf-md-lightbulb_multiple_off" . "\xf12cf")
+    ("nf-md-lightbulb_multiple_off_outline" . "\xf12d0")
+    ("nf-md-lightbulb_multiple_outline" . "\xf1256")
+    ("nf-md-lightbulb_night" . "\xf1a4c")
+    ("nf-md-lightbulb_night_outline" . "\xf1a4d")
+    ("nf-md-lightbulb_off" . "\xf0e4f")
+    ("nf-md-lightbulb_off_outline" . "\xf0e50")
+    ("nf-md-lightbulb_on" . "\xf06e8")
+    ("nf-md-lightbulb_on_10" . "\xf1a4e")
+    ("nf-md-lightbulb_on_20" . "\xf1a4f")
+    ("nf-md-lightbulb_on_30" . "\xf1a50")
+    ("nf-md-lightbulb_on_40" . "\xf1a51")
+    ("nf-md-lightbulb_on_50" . "\xf1a52")
+    ("nf-md-lightbulb_on_60" . "\xf1a53")
+    ("nf-md-lightbulb_on_70" . "\xf1a54")
+    ("nf-md-lightbulb_on_80" . "\xf1a55")
+    ("nf-md-lightbulb_on_90" . "\xf1a56")
+    ("nf-md-lightbulb_on_outline" . "\xf06e9")
+    ("nf-md-lightbulb_outline" . "\xf0336")
+    ("nf-md-lightbulb_question" . "\xf19e3")
+    ("nf-md-lightbulb_question_outline" . "\xf19e4")
+    ("nf-md-lightbulb_spot" . "\xf17f4")
+    ("nf-md-lightbulb_spot_off" . "\xf17f5")
+    ("nf-md-lightbulb_variant" . "\xf1802")
+    ("nf-md-lightbulb_variant_outline" . "\xf1803")
+    ("nf-md-lighthouse" . "\xf09ff")
+    ("nf-md-lighthouse_on" . "\xf0a00")
+    ("nf-md-lightning_bolt" . "\xf140b")
+    ("nf-md-lightning_bolt_circle" . "\xf0820")
+    ("nf-md-lightning_bolt_outline" . "\xf140c")
+    ("nf-md-line_scan" . "\xf0624")
+    ("nf-md-lingerie" . "\xf1476")
+    ("nf-md-link" . "\xf0337")
+    ("nf-md-link_box" . "\xf0d1a")
+    ("nf-md-link_box_outline" . "\xf0d1b")
+    ("nf-md-link_box_variant" . "\xf0d1c")
+    ("nf-md-link_box_variant_outline" . "\xf0d1d")
+    ("nf-md-link_lock" . "\xf10ba")
+    ("nf-md-link_off" . "\xf0338")
+    ("nf-md-link_plus" . "\xf0c94")
+    ("nf-md-link_variant" . "\xf0339")
+    ("nf-md-link_variant_minus" . "\xf10ff")
+    ("nf-md-link_variant_off" . "\xf033a")
+    ("nf-md-link_variant_plus" . "\xf1100")
+    ("nf-md-link_variant_remove" . "\xf1101")
+    ("nf-md-linkedin" . "\xf033b")
+    ("nf-md-linux" . "\xf033d")
+    ("nf-md-linux_mint" . "\xf08ed")
+    ("nf-md-lipstick" . "\xf13b5")
+    ("nf-md-liquid_spot" . "\xf1826")
+    ("nf-md-liquor" . "\xf191e")
+    ("nf-md-list_status" . "\xf15ab")
+    ("nf-md-litecoin" . "\xf0a61")
+    ("nf-md-loading" . "\xf0772")
+    ("nf-md-location_enter" . "\xf0fc4")
+    ("nf-md-location_exit" . "\xf0fc5")
+    ("nf-md-lock" . "\xf033e")
+    ("nf-md-lock_alert" . "\xf08ee")
+    ("nf-md-lock_alert_outline" . "\xf15d1")
+    ("nf-md-lock_check" . "\xf139a")
+    ("nf-md-lock_check_outline" . "\xf16a8")
+    ("nf-md-lock_clock" . "\xf097f")
+    ("nf-md-lock_minus" . "\xf16a9")
+    ("nf-md-lock_minus_outline" . "\xf16aa")
+    ("nf-md-lock_off" . "\xf1671")
+    ("nf-md-lock_off_outline" . "\xf1672")
+    ("nf-md-lock_open" . "\xf033f")
+    ("nf-md-lock_open_alert" . "\xf139b")
+    ("nf-md-lock_open_alert_outline" . "\xf15d2")
+    ("nf-md-lock_open_check" . "\xf139c")
+    ("nf-md-lock_open_check_outline" . "\xf16ab")
+    ("nf-md-lock_open_minus" . "\xf16ac")
+    ("nf-md-lock_open_minus_outline" . "\xf16ad")
+    ("nf-md-lock_open_outline" . "\xf0340")
+    ("nf-md-lock_open_plus" . "\xf16ae")
+    ("nf-md-lock_open_plus_outline" . "\xf16af")
+    ("nf-md-lock_open_remove" . "\xf16b0")
+    ("nf-md-lock_open_remove_outline" . "\xf16b1")
+    ("nf-md-lock_open_variant" . "\xf0fc6")
+    ("nf-md-lock_open_variant_outline" . "\xf0fc7")
+    ("nf-md-lock_outline" . "\xf0341")
+    ("nf-md-lock_pattern" . "\xf06ea")
+    ("nf-md-lock_plus" . "\xf05fb")
+    ("nf-md-lock_plus_outline" . "\xf16b2")
+    ("nf-md-lock_question" . "\xf08ef")
+    ("nf-md-lock_remove" . "\xf16b3")
+    ("nf-md-lock_remove_outline" . "\xf16b4")
+    ("nf-md-lock_reset" . "\xf0773")
+    ("nf-md-lock_smart" . "\xf08b2")
+    ("nf-md-locker" . "\xf07d7")
+    ("nf-md-locker_multiple" . "\xf07d8")
+    ("nf-md-login" . "\xf0342")
+    ("nf-md-logout" . "\xf0343")
+    ("nf-md-logout_variant" . "\xf05fd")
+    ("nf-md-logout_variant_2" . "\xf05fc")
+    ("nf-md-longitude" . "\xf0f5a")
+    ("nf-md-looks" . "\xf0344")
+    ("nf-md-lotion" . "\xf1582")
+    ("nf-md-lotion_outline" . "\xf1583")
+    ("nf-md-lotion_plus" . "\xf1584")
+    ("nf-md-lotion_plus_outline" . "\xf1585")
+    ("nf-md-loupe" . "\xf0345")
+    ("nf-md-lumx" . "\xf0346")
+    ("nf-md-lungs" . "\xf1084")
+    ("nf-md-mace" . "\xf1843")
+    ("nf-md-magazine_pistol" . "\xf0324")
+    ("nf-md-magazine_rifle" . "\xf0323")
+    ("nf-md-magic_staff" . "\xf1844")
+    ("nf-md-magnet" . "\xf0347")
+    ("nf-md-magnet_on" . "\xf0348")
+    ("nf-md-magnify" . "\xf0349")
+    ("nf-md-magnify_close" . "\xf0980")
+    ("nf-md-magnify_expand" . "\xf1874")
+    ("nf-md-magnify_minus" . "\xf034a")
+    ("nf-md-magnify_minus_cursor" . "\xf0a62")
+    ("nf-md-magnify_minus_outline" . "\xf06ec")
+    ("nf-md-magnify_plus" . "\xf034b")
+    ("nf-md-magnify_plus_cursor" . "\xf0a63")
+    ("nf-md-magnify_plus_outline" . "\xf06ed")
+    ("nf-md-magnify_remove_cursor" . "\xf120c")
+    ("nf-md-magnify_remove_outline" . "\xf120d")
+    ("nf-md-magnify_scan" . "\xf1276")
+    ("nf-md-mail" . "\xf0ebb")
+    ("nf-md-mailbox" . "\xf06ee")
+    ("nf-md-mailbox_open" . "\xf0d88")
+    ("nf-md-mailbox_open_outline" . "\xf0d89")
+    ("nf-md-mailbox_open_up" . "\xf0d8a")
+    ("nf-md-mailbox_open_up_outline" . "\xf0d8b")
+    ("nf-md-mailbox_outline" . "\xf0d8c")
+    ("nf-md-mailbox_up" . "\xf0d8d")
+    ("nf-md-mailbox_up_outline" . "\xf0d8e")
+    ("nf-md-manjaro" . "\xf160a")
+    ("nf-md-map" . "\xf034d")
+    ("nf-md-map_check" . "\xf0ebc")
+    ("nf-md-map_check_outline" . "\xf0ebd")
+    ("nf-md-map_clock" . "\xf0d1e")
+    ("nf-md-map_clock_outline" . "\xf0d1f")
+    ("nf-md-map_legend" . "\xf0a01")
+    ("nf-md-map_marker" . "\xf034e")
+    ("nf-md-map_marker_account" . "\xf18e3")
+    ("nf-md-map_marker_account_outline" . "\xf18e4")
+    ("nf-md-map_marker_alert" . "\xf0f05")
+    ("nf-md-map_marker_alert_outline" . "\xf0f06")
+    ("nf-md-map_marker_check" . "\xf0c95")
+    ("nf-md-map_marker_check_outline" . "\xf12fb")
+    ("nf-md-map_marker_circle" . "\xf034f")
+    ("nf-md-map_marker_distance" . "\xf08f0")
+    ("nf-md-map_marker_down" . "\xf1102")
+    ("nf-md-map_marker_left" . "\xf12db")
+    ("nf-md-map_marker_left_outline" . "\xf12dd")
+    ("nf-md-map_marker_minus" . "\xf0650")
+    ("nf-md-map_marker_minus_outline" . "\xf12f9")
+    ("nf-md-map_marker_multiple" . "\xf0350")
+    ("nf-md-map_marker_multiple_outline" . "\xf1277")
+    ("nf-md-map_marker_off" . "\xf0351")
+    ("nf-md-map_marker_off_outline" . "\xf12fd")
+    ("nf-md-map_marker_outline" . "\xf07d9")
+    ("nf-md-map_marker_path" . "\xf0d20")
+    ("nf-md-map_marker_plus" . "\xf0651")
+    ("nf-md-map_marker_plus_outline" . "\xf12f8")
+    ("nf-md-map_marker_question" . "\xf0f07")
+    ("nf-md-map_marker_question_outline" . "\xf0f08")
+    ("nf-md-map_marker_radius" . "\xf0352")
+    ("nf-md-map_marker_radius_outline" . "\xf12fc")
+    ("nf-md-map_marker_remove" . "\xf0f09")
+    ("nf-md-map_marker_remove_outline" . "\xf12fa")
+    ("nf-md-map_marker_remove_variant" . "\xf0f0a")
+    ("nf-md-map_marker_right" . "\xf12dc")
+    ("nf-md-map_marker_right_outline" . "\xf12de")
+    ("nf-md-map_marker_star" . "\xf1608")
+    ("nf-md-map_marker_star_outline" . "\xf1609")
+    ("nf-md-map_marker_up" . "\xf1103")
+    ("nf-md-map_minus" . "\xf0981")
+    ("nf-md-map_outline" . "\xf0982")
+    ("nf-md-map_plus" . "\xf0983")
+    ("nf-md-map_search" . "\xf0984")
+    ("nf-md-map_search_outline" . "\xf0985")
+    ("nf-md-mapbox" . "\xf0baa")
+    ("nf-md-margin" . "\xf0353")
+    ("nf-md-marker" . "\xf0652")
+    ("nf-md-marker_cancel" . "\xf0dd9")
+    ("nf-md-marker_check" . "\xf0355")
+    ("nf-md-mastodon" . "\xf0ad1")
+    ("nf-md-material_design" . "\xf0986")
+    ("nf-md-material_ui" . "\xf0357")
+    ("nf-md-math_compass" . "\xf0358")
+    ("nf-md-math_cos" . "\xf0c96")
+    ("nf-md-math_integral" . "\xf0fc8")
+    ("nf-md-math_integral_box" . "\xf0fc9")
+    ("nf-md-math_log" . "\xf1085")
+    ("nf-md-math_norm" . "\xf0fca")
+    ("nf-md-math_norm_box" . "\xf0fcb")
+    ("nf-md-math_sin" . "\xf0c97")
+    ("nf-md-math_tan" . "\xf0c98")
+    ("nf-md-matrix" . "\xf0628")
+    ("nf-md-medal" . "\xf0987")
+    ("nf-md-medal_outline" . "\xf1326")
+    ("nf-md-medical_bag" . "\xf06ef")
+    ("nf-md-medical_cotton_swab" . "\xf1ab8")
+    ("nf-md-meditation" . "\xf117b")
+    ("nf-md-memory" . "\xf035b")
+    ("nf-md-menorah" . "\xf17d4")
+    ("nf-md-menorah_fire" . "\xf17d5")
+    ("nf-md-menu" . "\xf035c")
+    ("nf-md-menu_down" . "\xf035d")
+    ("nf-md-menu_down_outline" . "\xf06b6")
+    ("nf-md-menu_left" . "\xf035e")
+    ("nf-md-menu_left_outline" . "\xf0a02")
+    ("nf-md-menu_open" . "\xf0bab")
+    ("nf-md-menu_right" . "\xf035f")
+    ("nf-md-menu_right_outline" . "\xf0a03")
+    ("nf-md-menu_swap" . "\xf0a64")
+    ("nf-md-menu_swap_outline" . "\xf0a65")
+    ("nf-md-menu_up" . "\xf0360")
+    ("nf-md-menu_up_outline" . "\xf06b7")
+    ("nf-md-merge" . "\xf0f5c")
+    ("nf-md-message" . "\xf0361")
+    ("nf-md-message_alert" . "\xf0362")
+    ("nf-md-message_alert_outline" . "\xf0a04")
+    ("nf-md-message_arrow_left" . "\xf12f2")
+    ("nf-md-message_arrow_left_outline" . "\xf12f3")
+    ("nf-md-message_arrow_right" . "\xf12f4")
+    ("nf-md-message_arrow_right_outline" . "\xf12f5")
+    ("nf-md-message_badge" . "\xf1941")
+    ("nf-md-message_badge_outline" . "\xf1942")
+    ("nf-md-message_bookmark" . "\xf15ac")
+    ("nf-md-message_bookmark_outline" . "\xf15ad")
+    ("nf-md-message_bulleted" . "\xf06a2")
+    ("nf-md-message_bulleted_off" . "\xf06a3")
+    ("nf-md-message_cog" . "\xf06f1")
+    ("nf-md-message_cog_outline" . "\xf1172")
+    ("nf-md-message_draw" . "\xf0363")
+    ("nf-md-message_fast" . "\xf19cc")
+    ("nf-md-message_fast_outline" . "\xf19cd")
+    ("nf-md-message_flash" . "\xf15a9")
+    ("nf-md-message_flash_outline" . "\xf15aa")
+    ("nf-md-message_image" . "\xf0364")
+    ("nf-md-message_image_outline" . "\xf116c")
+    ("nf-md-message_lock" . "\xf0fcc")
+    ("nf-md-message_lock_outline" . "\xf116d")
+    ("nf-md-message_minus" . "\xf116e")
+    ("nf-md-message_minus_outline" . "\xf116f")
+    ("nf-md-message_off" . "\xf164d")
+    ("nf-md-message_off_outline" . "\xf164e")
+    ("nf-md-message_outline" . "\xf0365")
+    ("nf-md-message_plus" . "\xf0653")
+    ("nf-md-message_plus_outline" . "\xf10bb")
+    ("nf-md-message_processing" . "\xf0366")
+    ("nf-md-message_processing_outline" . "\xf1170")
+    ("nf-md-message_question" . "\xf173a")
+    ("nf-md-message_question_outline" . "\xf173b")
+    ("nf-md-message_reply" . "\xf0367")
+    ("nf-md-message_reply_outline" . "\xf173d")
+    ("nf-md-message_reply_text" . "\xf0368")
+    ("nf-md-message_reply_text_outline" . "\xf173e")
+    ("nf-md-message_settings" . "\xf06f0")
+    ("nf-md-message_settings_outline" . "\xf1171")
+    ("nf-md-message_star" . "\xf069a")
+    ("nf-md-message_star_outline" . "\xf1250")
+    ("nf-md-message_text" . "\xf0369")
+    ("nf-md-message_text_clock" . "\xf1173")
+    ("nf-md-message_text_clock_outline" . "\xf1174")
+    ("nf-md-message_text_fast" . "\xf19ce")
+    ("nf-md-message_text_fast_outline" . "\xf19cf")
+    ("nf-md-message_text_lock" . "\xf0fcd")
+    ("nf-md-message_text_lock_outline" . "\xf1175")
+    ("nf-md-message_text_outline" . "\xf036a")
+    ("nf-md-message_video" . "\xf036b")
+    ("nf-md-meteor" . "\xf0629")
+    ("nf-md-meter_electric" . "\xf1a57")
+    ("nf-md-meter_electric_outline" . "\xf1a58")
+    ("nf-md-meter_gas" . "\xf1a59")
+    ("nf-md-meter_gas_outline" . "\xf1a5a")
+    ("nf-md-metronome" . "\xf07da")
+    ("nf-md-metronome_tick" . "\xf07db")
+    ("nf-md-micro_sd" . "\xf07dc")
+    ("nf-md-microphone" . "\xf036c")
+    ("nf-md-microphone_minus" . "\xf08b3")
+    ("nf-md-microphone_off" . "\xf036d")
+    ("nf-md-microphone_outline" . "\xf036e")
+    ("nf-md-microphone_plus" . "\xf08b4")
+    ("nf-md-microphone_question" . "\xf1989")
+    ("nf-md-microphone_question_outline" . "\xf198a")
+    ("nf-md-microphone_settings" . "\xf036f")
+    ("nf-md-microphone_variant" . "\xf0370")
+    ("nf-md-microphone_variant_off" . "\xf0371")
+    ("nf-md-microscope" . "\xf0654")
+    ("nf-md-microsoft" . "\xf0372")
+    ("nf-md-microsoft_access" . "\xf138e")
+    ("nf-md-microsoft_azure" . "\xf0805")
+    ("nf-md-microsoft_azure_devops" . "\xf0fd5")
+    ("nf-md-microsoft_bing" . "\xf00a4")
+    ("nf-md-microsoft_dynamics_365" . "\xf0988")
+    ("nf-md-microsoft_edge" . "\xf01e9")
+    ("nf-md-microsoft_excel" . "\xf138f")
+    ("nf-md-microsoft_internet_explorer" . "\xf0300")
+    ("nf-md-microsoft_office" . "\xf03c6")
+    ("nf-md-microsoft_onedrive" . "\xf03ca")
+    ("nf-md-microsoft_onenote" . "\xf0747")
+    ("nf-md-microsoft_outlook" . "\xf0d22")
+    ("nf-md-microsoft_powerpoint" . "\xf1390")
+    ("nf-md-microsoft_sharepoint" . "\xf1391")
+    ("nf-md-microsoft_teams" . "\xf02bb")
+    ("nf-md-microsoft_visual_studio" . "\xf0610")
+    ("nf-md-microsoft_visual_studio_code" . "\xf0a1e")
+    ("nf-md-microsoft_windows" . "\xf05b3")
+    ("nf-md-microsoft_windows_classic" . "\xf0a21")
+    ("nf-md-microsoft_word" . "\xf1392")
+    ("nf-md-microsoft_xbox" . "\xf05b9")
+    ("nf-md-microsoft_xbox_controller" . "\xf05ba")
+    ("nf-md-microsoft_xbox_controller_battery_alert" . "\xf074b")
+    ("nf-md-microsoft_xbox_controller_battery_charging" . "\xf0a22")
+    ("nf-md-microsoft_xbox_controller_battery_empty" . "\xf074c")
+    ("nf-md-microsoft_xbox_controller_battery_full" . "\xf074d")
+    ("nf-md-microsoft_xbox_controller_battery_low" . "\xf074e")
+    ("nf-md-microsoft_xbox_controller_battery_medium" . "\xf074f")
+    ("nf-md-microsoft_xbox_controller_battery_unknown" . "\xf0750")
+    ("nf-md-microsoft_xbox_controller_menu" . "\xf0e6f")
+    ("nf-md-microsoft_xbox_controller_off" . "\xf05bb")
+    ("nf-md-microsoft_xbox_controller_view" . "\xf0e70")
+    ("nf-md-microwave" . "\xf0c99")
+    ("nf-md-microwave_off" . "\xf1423")
+    ("nf-md-middleware" . "\xf0f5d")
+    ("nf-md-middleware_outline" . "\xf0f5e")
+    ("nf-md-midi" . "\xf08f1")
+    ("nf-md-midi_port" . "\xf08f2")
+    ("nf-md-mine" . "\xf0dda")
+    ("nf-md-minecraft" . "\xf0373")
+    ("nf-md-mini_sd" . "\xf0a05")
+    ("nf-md-minidisc" . "\xf0a06")
+    ("nf-md-minus" . "\xf0374")
+    ("nf-md-minus_box" . "\xf0375")
+    ("nf-md-minus_box_multiple" . "\xf1141")
+    ("nf-md-minus_box_multiple_outline" . "\xf1142")
+    ("nf-md-minus_box_outline" . "\xf06f2")
+    ("nf-md-minus_circle" . "\xf0376")
+    ("nf-md-minus_circle_multiple" . "\xf035a")
+    ("nf-md-minus_circle_multiple_outline" . "\xf0ad3")
+    ("nf-md-minus_circle_off" . "\xf1459")
+    ("nf-md-minus_circle_off_outline" . "\xf145a")
+    ("nf-md-minus_circle_outline" . "\xf0377")
+    ("nf-md-minus_network" . "\xf0378")
+    ("nf-md-minus_network_outline" . "\xf0c9a")
+    ("nf-md-minus_thick" . "\xf1639")
+    ("nf-md-mirror" . "\xf11fd")
+    ("nf-md-mirror_rectangle" . "\xf179f")
+    ("nf-md-mirror_variant" . "\xf17a0")
+    ("nf-md-mixed_martial_arts" . "\xf0d8f")
+    ("nf-md-mixed_reality" . "\xf087f")
+    ("nf-md-molecule" . "\xf0bac")
+    ("nf-md-molecule_co" . "\xf12fe")
+    ("nf-md-molecule_co2" . "\xf07e4")
+    ("nf-md-monitor" . "\xf0379")
+    ("nf-md-monitor_account" . "\xf1a5b")
+    ("nf-md-monitor_arrow_down" . "\xf19d0")
+    ("nf-md-monitor_arrow_down_variant" . "\xf19d1")
+    ("nf-md-monitor_cellphone" . "\xf0989")
+    ("nf-md-monitor_cellphone_star" . "\xf098a")
+    ("nf-md-monitor_dashboard" . "\xf0a07")
+    ("nf-md-monitor_edit" . "\xf12c6")
+    ("nf-md-monitor_eye" . "\xf13b4")
+    ("nf-md-monitor_lock" . "\xf0ddb")
+    ("nf-md-monitor_multiple" . "\xf037a")
+    ("nf-md-monitor_off" . "\xf0d90")
+    ("nf-md-monitor_screenshot" . "\xf0e51")
+    ("nf-md-monitor_share" . "\xf1483")
+    ("nf-md-monitor_shimmer" . "\xf1104")
+    ("nf-md-monitor_small" . "\xf1876")
+    ("nf-md-monitor_speaker" . "\xf0f5f")
+    ("nf-md-monitor_speaker_off" . "\xf0f60")
+    ("nf-md-monitor_star" . "\xf0ddc")
+    ("nf-md-moon_first_quarter" . "\xf0f61")
+    ("nf-md-moon_full" . "\xf0f62")
+    ("nf-md-moon_last_quarter" . "\xf0f63")
+    ("nf-md-moon_new" . "\xf0f64")
+    ("nf-md-moon_waning_crescent" . "\xf0f65")
+    ("nf-md-moon_waning_gibbous" . "\xf0f66")
+    ("nf-md-moon_waxing_crescent" . "\xf0f67")
+    ("nf-md-moon_waxing_gibbous" . "\xf0f68")
+    ("nf-md-moped" . "\xf1086")
+    ("nf-md-moped_electric" . "\xf15b7")
+    ("nf-md-moped_electric_outline" . "\xf15b8")
+    ("nf-md-moped_outline" . "\xf15b9")
+    ("nf-md-more" . "\xf037b")
+    ("nf-md-mortar_pestle" . "\xf1748")
+    ("nf-md-mortar_pestle_plus" . "\xf03f1")
+    ("nf-md-mosque" . "\xf1827")
+    ("nf-md-mother_heart" . "\xf1314")
+    ("nf-md-mother_nurse" . "\xf0d21")
+    ("nf-md-motion" . "\xf15b2")
+    ("nf-md-motion_outline" . "\xf15b3")
+    ("nf-md-motion_pause" . "\xf1590")
+    ("nf-md-motion_pause_outline" . "\xf1592")
+    ("nf-md-motion_play" . "\xf158f")
+    ("nf-md-motion_play_outline" . "\xf1591")
+    ("nf-md-motion_sensor" . "\xf0d91")
+    ("nf-md-motion_sensor_off" . "\xf1435")
+    ("nf-md-motorbike" . "\xf037c")
+    ("nf-md-motorbike_electric" . "\xf15ba")
+    ("nf-md-mountains" . "\xf0509")
+    ("nf-md-mouse" . "\xf037d")
+    ("nf-md-mouse_bluetooth" . "\xf098b")
+    ("nf-md-mouse_move_down" . "\xf1550")
+    ("nf-md-mouse_move_up" . "\xf1551")
+    ("nf-md-mouse_move_vertical" . "\xf1552")
+    ("nf-md-mouse_off" . "\xf037e")
+    ("nf-md-mouse_variant" . "\xf037f")
+    ("nf-md-mouse_variant_off" . "\xf0380")
+    ("nf-md-move_resize" . "\xf0655")
+    ("nf-md-move_resize_variant" . "\xf0656")
+    ("nf-md-movie" . "\xf0381")
+    ("nf-md-movie_check" . "\xf16f3")
+    ("nf-md-movie_check_outline" . "\xf16f4")
+    ("nf-md-movie_cog" . "\xf16f5")
+    ("nf-md-movie_cog_outline" . "\xf16f6")
+    ("nf-md-movie_edit" . "\xf1122")
+    ("nf-md-movie_edit_outline" . "\xf1123")
+    ("nf-md-movie_filter" . "\xf1124")
+    ("nf-md-movie_filter_outline" . "\xf1125")
+    ("nf-md-movie_minus" . "\xf16f7")
+    ("nf-md-movie_minus_outline" . "\xf16f8")
+    ("nf-md-movie_off" . "\xf16f9")
+    ("nf-md-movie_off_outline" . "\xf16fa")
+    ("nf-md-movie_open" . "\xf0fce")
+    ("nf-md-movie_open_check" . "\xf16fb")
+    ("nf-md-movie_open_check_outline" . "\xf16fc")
+    ("nf-md-movie_open_cog" . "\xf16fd")
+    ("nf-md-movie_open_cog_outline" . "\xf16fe")
+    ("nf-md-movie_open_edit" . "\xf16ff")
+    ("nf-md-movie_open_edit_outline" . "\xf1700")
+    ("nf-md-movie_open_minus" . "\xf1701")
+    ("nf-md-movie_open_minus_outline" . "\xf1702")
+    ("nf-md-movie_open_off" . "\xf1703")
+    ("nf-md-movie_open_off_outline" . "\xf1704")
+    ("nf-md-movie_open_outline" . "\xf0fcf")
+    ("nf-md-movie_open_play" . "\xf1705")
+    ("nf-md-movie_open_play_outline" . "\xf1706")
+    ("nf-md-movie_open_plus" . "\xf1707")
+    ("nf-md-movie_open_plus_outline" . "\xf1708")
+    ("nf-md-movie_open_remove" . "\xf1709")
+    ("nf-md-movie_open_remove_outline" . "\xf170a")
+    ("nf-md-movie_open_settings" . "\xf170b")
+    ("nf-md-movie_open_settings_outline" . "\xf170c")
+    ("nf-md-movie_open_star" . "\xf170d")
+    ("nf-md-movie_open_star_outline" . "\xf170e")
+    ("nf-md-movie_outline" . "\xf0ddd")
+    ("nf-md-movie_play" . "\xf170f")
+    ("nf-md-movie_play_outline" . "\xf1710")
+    ("nf-md-movie_plus" . "\xf1711")
+    ("nf-md-movie_plus_outline" . "\xf1712")
+    ("nf-md-movie_remove" . "\xf1713")
+    ("nf-md-movie_remove_outline" . "\xf1714")
+    ("nf-md-movie_roll" . "\xf07de")
+    ("nf-md-movie_search" . "\xf11d2")
+    ("nf-md-movie_search_outline" . "\xf11d3")
+    ("nf-md-movie_settings" . "\xf1715")
+    ("nf-md-movie_settings_outline" . "\xf1716")
+    ("nf-md-movie_star" . "\xf1717")
+    ("nf-md-movie_star_outline" . "\xf1718")
+    ("nf-md-mower" . "\xf166f")
+    ("nf-md-mower_bag" . "\xf1670")
+    ("nf-md-muffin" . "\xf098c")
+    ("nf-md-multicast" . "\xf1893")
+    ("nf-md-multiplication" . "\xf0382")
+    ("nf-md-multiplication_box" . "\xf0383")
+    ("nf-md-mushroom" . "\xf07df")
+    ("nf-md-mushroom_off" . "\xf13fa")
+    ("nf-md-mushroom_off_outline" . "\xf13fb")
+    ("nf-md-mushroom_outline" . "\xf07e0")
+    ("nf-md-music" . "\xf075a")
+    ("nf-md-music_accidental_double_flat" . "\xf0f69")
+    ("nf-md-music_accidental_double_sharp" . "\xf0f6a")
+    ("nf-md-music_accidental_flat" . "\xf0f6b")
+    ("nf-md-music_accidental_natural" . "\xf0f6c")
+    ("nf-md-music_accidental_sharp" . "\xf0f6d")
+    ("nf-md-music_box" . "\xf0384")
+    ("nf-md-music_box_multiple" . "\xf0333")
+    ("nf-md-music_box_multiple_outline" . "\xf0f04")
+    ("nf-md-music_box_outline" . "\xf0385")
+    ("nf-md-music_circle" . "\xf0386")
+    ("nf-md-music_circle_outline" . "\xf0ad4")
+    ("nf-md-music_clef_alto" . "\xf0f6e")
+    ("nf-md-music_clef_bass" . "\xf0f6f")
+    ("nf-md-music_clef_treble" . "\xf0f70")
+    ("nf-md-music_note" . "\xf0387")
+    ("nf-md-music_note_2" . "\xf0388")
+    ("nf-md-music_note_bluetooth" . "\xf05fe")
+    ("nf-md-music_note_bluetooth_off" . "\xf05ff")
+    ("nf-md-music_note_eighth_dotted" . "\xf0f71")
+    ("nf-md-music_note_half" . "\xf0389")
+    ("nf-md-music_note_half_dotted" . "\xf0f72")
+    ("nf-md-music_note_off" . "\xf038a")
+    ("nf-md-music_note_off_outline" . "\xf0f73")
+    ("nf-md-music_note_outline" . "\xf0f74")
+    ("nf-md-music_note_plus" . "\xf0dde")
+    ("nf-md-music_note_quarter" . "\xf038b")
+    ("nf-md-music_note_quarter_dotted" . "\xf0f75")
+    ("nf-md-music_note_sixteenth" . "\xf038c")
+    ("nf-md-music_note_sixteenth_dotted" . "\xf0f76")
+    ("nf-md-music_note_whole" . "\xf038d")
+    ("nf-md-music_note_whole_dotted" . "\xf0f77")
+    ("nf-md-music_off" . "\xf075b")
+    ("nf-md-music_rest_eighth" . "\xf0f78")
+    ("nf-md-music_rest_half" . "\xf0f79")
+    ("nf-md-music_rest_quarter" . "\xf0f7a")
+    ("nf-md-music_rest_sixteenth" . "\xf0f7b")
+    ("nf-md-music_rest_whole" . "\xf0f7c")
+    ("nf-md-mustache" . "\xf15de")
+    ("nf-md-nail" . "\xf0ddf")
+    ("nf-md-nas" . "\xf08f3")
+    ("nf-md-nativescript" . "\xf0880")
+    ("nf-md-nature" . "\xf038e")
+    ("nf-md-nature_people" . "\xf038f")
+    ("nf-md-navigation" . "\xf0390")
+    ("nf-md-navigation_outline" . "\xf1607")
+    ("nf-md-navigation_variant" . "\xf18f0")
+    ("nf-md-navigation_variant_outline" . "\xf18f1")
+    ("nf-md-near_me" . "\xf05cd")
+    ("nf-md-necklace" . "\xf0f0b")
+    ("nf-md-needle" . "\xf0391")
+    ("nf-md-needle_off" . "\xf19d2")
+    ("nf-md-netflix" . "\xf0746")
+    ("nf-md-network" . "\xf06f3")
+    ("nf-md-network_off" . "\xf0c9b")
+    ("nf-md-network_off_outline" . "\xf0c9c")
+    ("nf-md-network_outline" . "\xf0c9d")
+    ("nf-md-network_pos" . "\xf1acb")
+    ("nf-md-network_strength_1" . "\xf08f4")
+    ("nf-md-network_strength_1_alert" . "\xf08f5")
+    ("nf-md-network_strength_2" . "\xf08f6")
+    ("nf-md-network_strength_2_alert" . "\xf08f7")
+    ("nf-md-network_strength_3" . "\xf08f8")
+    ("nf-md-network_strength_3_alert" . "\xf08f9")
+    ("nf-md-network_strength_4" . "\xf08fa")
+    ("nf-md-network_strength_4_alert" . "\xf08fb")
+    ("nf-md-network_strength_4_cog" . "\xf191a")
+    ("nf-md-network_strength_off" . "\xf08fc")
+    ("nf-md-network_strength_off_outline" . "\xf08fd")
+    ("nf-md-network_strength_outline" . "\xf08fe")
+    ("nf-md-new_box" . "\xf0394")
+    ("nf-md-newspaper" . "\xf0395")
+    ("nf-md-newspaper_check" . "\xf1943")
+    ("nf-md-newspaper_minus" . "\xf0f0c")
+    ("nf-md-newspaper_plus" . "\xf0f0d")
+    ("nf-md-newspaper_remove" . "\xf1944")
+    ("nf-md-newspaper_variant" . "\xf1001")
+    ("nf-md-newspaper_variant_multiple" . "\xf1002")
+    ("nf-md-newspaper_variant_multiple_outline" . "\xf1003")
+    ("nf-md-newspaper_variant_outline" . "\xf1004")
+    ("nf-md-nfc" . "\xf0396")
+    ("nf-md-nfc_search_variant" . "\xf0e53")
+    ("nf-md-nfc_tap" . "\xf0397")
+    ("nf-md-nfc_variant" . "\xf0398")
+    ("nf-md-nfc_variant_off" . "\xf0e54")
+    ("nf-md-ninja" . "\xf0774")
+    ("nf-md-nintendo_game_boy" . "\xf1393")
+    ("nf-md-nintendo_switch" . "\xf07e1")
+    ("nf-md-nintendo_wii" . "\xf05ab")
+    ("nf-md-nintendo_wiiu" . "\xf072d")
+    ("nf-md-nix" . "\xf1105")
+    ("nf-md-nodejs" . "\xf0399")
+    ("nf-md-noodles" . "\xf117e")
+    ("nf-md-not_equal" . "\xf098d")
+    ("nf-md-not_equal_variant" . "\xf098e")
+    ("nf-md-note" . "\xf039a")
+    ("nf-md-note_alert" . "\xf177d")
+    ("nf-md-note_alert_outline" . "\xf177e")
+    ("nf-md-note_check" . "\xf177f")
+    ("nf-md-note_check_outline" . "\xf1780")
+    ("nf-md-note_edit" . "\xf1781")
+    ("nf-md-note_edit_outline" . "\xf1782")
+    ("nf-md-note_minus" . "\xf164f")
+    ("nf-md-note_minus_outline" . "\xf1650")
+    ("nf-md-note_multiple" . "\xf06b8")
+    ("nf-md-note_multiple_outline" . "\xf06b9")
+    ("nf-md-note_off" . "\xf1783")
+    ("nf-md-note_off_outline" . "\xf1784")
+    ("nf-md-note_outline" . "\xf039b")
+    ("nf-md-note_plus" . "\xf039c")
+    ("nf-md-note_plus_outline" . "\xf039d")
+    ("nf-md-note_remove" . "\xf1651")
+    ("nf-md-note_remove_outline" . "\xf1652")
+    ("nf-md-note_search" . "\xf1653")
+    ("nf-md-note_search_outline" . "\xf1654")
+    ("nf-md-note_text" . "\xf039e")
+    ("nf-md-note_text_outline" . "\xf11d7")
+    ("nf-md-notebook" . "\xf082e")
+    ("nf-md-notebook_check" . "\xf14f5")
+    ("nf-md-notebook_check_outline" . "\xf14f6")
+    ("nf-md-notebook_edit" . "\xf14e7")
+    ("nf-md-notebook_edit_outline" . "\xf14e9")
+    ("nf-md-notebook_heart" . "\xf1a0b")
+    ("nf-md-notebook_heart_outline" . "\xf1a0c")
+    ("nf-md-notebook_minus" . "\xf1610")
+    ("nf-md-notebook_minus_outline" . "\xf1611")
+    ("nf-md-notebook_multiple" . "\xf0e55")
+    ("nf-md-notebook_outline" . "\xf0ebf")
+    ("nf-md-notebook_plus" . "\xf1612")
+    ("nf-md-notebook_plus_outline" . "\xf1613")
+    ("nf-md-notebook_remove" . "\xf1614")
+    ("nf-md-notebook_remove_outline" . "\xf1615")
+    ("nf-md-notification_clear_all" . "\xf039f")
+    ("nf-md-npm" . "\xf06f7")
+    ("nf-md-nuke" . "\xf06a4")
+    ("nf-md-null" . "\xf07e2")
+    ("nf-md-numeric" . "\xf03a0")
+    ("nf-md-numeric_0" . "\xf0b39")
+    ("nf-md-numeric_0_box" . "\xf03a1")
+    ("nf-md-numeric_0_box_multiple" . "\xf0f0e")
+    ("nf-md-numeric_0_box_multiple_outline" . "\xf03a2")
+    ("nf-md-numeric_0_box_outline" . "\xf03a3")
+    ("nf-md-numeric_0_circle" . "\xf0c9e")
+    ("nf-md-numeric_0_circle_outline" . "\xf0c9f")
+    ("nf-md-numeric_1" . "\xf0b3a")
+    ("nf-md-numeric_10" . "\xf0fe9")
+    ("nf-md-numeric_10_box" . "\xf0f7d")
+    ("nf-md-numeric_10_box_multiple" . "\xf0fea")
+    ("nf-md-numeric_10_box_multiple_outline" . "\xf0feb")
+    ("nf-md-numeric_10_box_outline" . "\xf0f7e")
+    ("nf-md-numeric_10_circle" . "\xf0fec")
+    ("nf-md-numeric_10_circle_outline" . "\xf0fed")
+    ("nf-md-numeric_1_box" . "\xf03a4")
+    ("nf-md-numeric_1_box_multiple" . "\xf0f0f")
+    ("nf-md-numeric_1_box_multiple_outline" . "\xf03a5")
+    ("nf-md-numeric_1_box_outline" . "\xf03a6")
+    ("nf-md-numeric_1_circle" . "\xf0ca0")
+    ("nf-md-numeric_1_circle_outline" . "\xf0ca1")
+    ("nf-md-numeric_2" . "\xf0b3b")
+    ("nf-md-numeric_2_box" . "\xf03a7")
+    ("nf-md-numeric_2_box_multiple" . "\xf0f10")
+    ("nf-md-numeric_2_box_multiple_outline" . "\xf03a8")
+    ("nf-md-numeric_2_box_outline" . "\xf03a9")
+    ("nf-md-numeric_2_circle" . "\xf0ca2")
+    ("nf-md-numeric_2_circle_outline" . "\xf0ca3")
+    ("nf-md-numeric_3" . "\xf0b3c")
+    ("nf-md-numeric_3_box" . "\xf03aa")
+    ("nf-md-numeric_3_box_multiple" . "\xf0f11")
+    ("nf-md-numeric_3_box_multiple_outline" . "\xf03ab")
+    ("nf-md-numeric_3_box_outline" . "\xf03ac")
+    ("nf-md-numeric_3_circle" . "\xf0ca4")
+    ("nf-md-numeric_3_circle_outline" . "\xf0ca5")
+    ("nf-md-numeric_4" . "\xf0b3d")
+    ("nf-md-numeric_4_box" . "\xf03ad")
+    ("nf-md-numeric_4_box_multiple" . "\xf0f12")
+    ("nf-md-numeric_4_box_multiple_outline" . "\xf03b2")
+    ("nf-md-numeric_4_box_outline" . "\xf03ae")
+    ("nf-md-numeric_4_circle" . "\xf0ca6")
+    ("nf-md-numeric_4_circle_outline" . "\xf0ca7")
+    ("nf-md-numeric_5" . "\xf0b3e")
+    ("nf-md-numeric_5_box" . "\xf03b1")
+    ("nf-md-numeric_5_box_multiple" . "\xf0f13")
+    ("nf-md-numeric_5_box_multiple_outline" . "\xf03af")
+    ("nf-md-numeric_5_box_outline" . "\xf03b0")
+    ("nf-md-numeric_5_circle" . "\xf0ca8")
+    ("nf-md-numeric_5_circle_outline" . "\xf0ca9")
+    ("nf-md-numeric_6" . "\xf0b3f")
+    ("nf-md-numeric_6_box" . "\xf03b3")
+    ("nf-md-numeric_6_box_multiple" . "\xf0f14")
+    ("nf-md-numeric_6_box_multiple_outline" . "\xf03b4")
+    ("nf-md-numeric_6_box_outline" . "\xf03b5")
+    ("nf-md-numeric_6_circle" . "\xf0caa")
+    ("nf-md-numeric_6_circle_outline" . "\xf0cab")
+    ("nf-md-numeric_7" . "\xf0b40")
+    ("nf-md-numeric_7_box" . "\xf03b6")
+    ("nf-md-numeric_7_box_multiple" . "\xf0f15")
+    ("nf-md-numeric_7_box_multiple_outline" . "\xf03b7")
+    ("nf-md-numeric_7_box_outline" . "\xf03b8")
+    ("nf-md-numeric_7_circle" . "\xf0cac")
+    ("nf-md-numeric_7_circle_outline" . "\xf0cad")
+    ("nf-md-numeric_8" . "\xf0b41")
+    ("nf-md-numeric_8_box" . "\xf03b9")
+    ("nf-md-numeric_8_box_multiple" . "\xf0f16")
+    ("nf-md-numeric_8_box_multiple_outline" . "\xf03ba")
+    ("nf-md-numeric_8_box_outline" . "\xf03bb")
+    ("nf-md-numeric_8_circle" . "\xf0cae")
+    ("nf-md-numeric_8_circle_outline" . "\xf0caf")
+    ("nf-md-numeric_9" . "\xf0b42")
+    ("nf-md-numeric_9_box" . "\xf03bc")
+    ("nf-md-numeric_9_box_multiple" . "\xf0f17")
+    ("nf-md-numeric_9_box_multiple_outline" . "\xf03bd")
+    ("nf-md-numeric_9_box_outline" . "\xf03be")
+    ("nf-md-numeric_9_circle" . "\xf0cb0")
+    ("nf-md-numeric_9_circle_outline" . "\xf0cb1")
+    ("nf-md-numeric_9_plus" . "\xf0fee")
+    ("nf-md-numeric_9_plus_box" . "\xf03bf")
+    ("nf-md-numeric_9_plus_box_multiple" . "\xf0f18")
+    ("nf-md-numeric_9_plus_box_multiple_outline" . "\xf03c0")
+    ("nf-md-numeric_9_plus_box_outline" . "\xf03c1")
+    ("nf-md-numeric_9_plus_circle" . "\xf0cb2")
+    ("nf-md-numeric_9_plus_circle_outline" . "\xf0cb3")
+    ("nf-md-numeric_negative_1" . "\xf1052")
+    ("nf-md-numeric_off" . "\xf19d3")
+    ("nf-md-numeric_positive_1" . "\xf15cb")
+    ("nf-md-nut" . "\xf06f8")
+    ("nf-md-nutrition" . "\xf03c2")
+    ("nf-md-nuxt" . "\xf1106")
+    ("nf-md-oar" . "\xf067c")
+    ("nf-md-ocarina" . "\xf0de0")
+    ("nf-md-oci" . "\xf12e9")
+    ("nf-md-ocr" . "\xf113a")
+    ("nf-md-octagon" . "\xf03c3")
+    ("nf-md-octagon_outline" . "\xf03c4")
+    ("nf-md-octagram" . "\xf06f9")
+    ("nf-md-octagram_outline" . "\xf0775")
+    ("nf-md-octahedron" . "\xf1950")
+    ("nf-md-octahedron_off" . "\xf1951")
+    ("nf-md-odnoklassniki" . "\xf03c5")
+    ("nf-md-offer" . "\xf121b")
+    ("nf-md-office_building" . "\xf0991")
+    ("nf-md-office_building_cog" . "\xf1949")
+    ("nf-md-office_building_cog_outline" . "\xf194a")
+    ("nf-md-office_building_marker" . "\xf1520")
+    ("nf-md-office_building_marker_outline" . "\xf1521")
+    ("nf-md-office_building_outline" . "\xf151f")
+    ("nf-md-oil" . "\xf03c7")
+    ("nf-md-oil_lamp" . "\xf0f19")
+    ("nf-md-oil_level" . "\xf1053")
+    ("nf-md-oil_temperature" . "\xf0ff8")
+    ("nf-md-om" . "\xf0973")
+    ("nf-md-omega" . "\xf03c9")
+    ("nf-md-one_up" . "\xf0bad")
+    ("nf-md-onepassword" . "\xf0881")
+    ("nf-md-opacity" . "\xf05cc")
+    ("nf-md-open_in_app" . "\xf03cb")
+    ("nf-md-open_in_new" . "\xf03cc")
+    ("nf-md-open_source_initiative" . "\xf0bae")
+    ("nf-md-openid" . "\xf03cd")
+    ("nf-md-opera" . "\xf03ce")
+    ("nf-md-orbit" . "\xf0018")
+    ("nf-md-orbit_variant" . "\xf15db")
+    ("nf-md-order_alphabetical_ascending" . "\xf020d")
+    ("nf-md-order_alphabetical_descending" . "\xf0d07")
+    ("nf-md-order_bool_ascending" . "\xf02be")
+    ("nf-md-order_bool_ascending_variant" . "\xf098f")
+    ("nf-md-order_bool_descending" . "\xf1384")
+    ("nf-md-order_bool_descending_variant" . "\xf0990")
+    ("nf-md-order_numeric_ascending" . "\xf0545")
+    ("nf-md-order_numeric_descending" . "\xf0546")
+    ("nf-md-origin" . "\xf0b43")
+    ("nf-md-ornament" . "\xf03cf")
+    ("nf-md-ornament_variant" . "\xf03d0")
+    ("nf-md-outdoor_lamp" . "\xf1054")
+    ("nf-md-overscan" . "\xf1005")
+    ("nf-md-owl" . "\xf03d2")
+    ("nf-md-pac_man" . "\xf0baf")
+    ("nf-md-package" . "\xf03d3")
+    ("nf-md-package_down" . "\xf03d4")
+    ("nf-md-package_up" . "\xf03d5")
+    ("nf-md-package_variant" . "\xf03d6")
+    ("nf-md-package_variant_closed" . "\xf03d7")
+    ("nf-md-package_variant_closed_minus" . "\xf19d4")
+    ("nf-md-package_variant_closed_plus" . "\xf19d5")
+    ("nf-md-package_variant_closed_remove" . "\xf19d6")
+    ("nf-md-package_variant_minus" . "\xf19d7")
+    ("nf-md-package_variant_plus" . "\xf19d8")
+    ("nf-md-package_variant_remove" . "\xf19d9")
+    ("nf-md-page_first" . "\xf0600")
+    ("nf-md-page_last" . "\xf0601")
+    ("nf-md-page_layout_body" . "\xf06fa")
+    ("nf-md-page_layout_footer" . "\xf06fb")
+    ("nf-md-page_layout_header" . "\xf06fc")
+    ("nf-md-page_layout_header_footer" . "\xf0f7f")
+    ("nf-md-page_layout_sidebar_left" . "\xf06fd")
+    ("nf-md-page_layout_sidebar_right" . "\xf06fe")
+    ("nf-md-page_next" . "\xf0bb0")
+    ("nf-md-page_next_outline" . "\xf0bb1")
+    ("nf-md-page_previous" . "\xf0bb2")
+    ("nf-md-page_previous_outline" . "\xf0bb3")
+    ("nf-md-pail" . "\xf1417")
+    ("nf-md-pail_minus" . "\xf1437")
+    ("nf-md-pail_minus_outline" . "\xf143c")
+    ("nf-md-pail_off" . "\xf1439")
+    ("nf-md-pail_off_outline" . "\xf143e")
+    ("nf-md-pail_outline" . "\xf143a")
+    ("nf-md-pail_plus" . "\xf1436")
+    ("nf-md-pail_plus_outline" . "\xf143b")
+    ("nf-md-pail_remove" . "\xf1438")
+    ("nf-md-pail_remove_outline" . "\xf143d")
+    ("nf-md-palette" . "\xf03d8")
+    ("nf-md-palette_advanced" . "\xf03d9")
+    ("nf-md-palette_outline" . "\xf0e0c")
+    ("nf-md-palette_swatch" . "\xf08b5")
+    ("nf-md-palette_swatch_outline" . "\xf135c")
+    ("nf-md-palette_swatch_variant" . "\xf195a")
+    ("nf-md-palm_tree" . "\xf1055")
+    ("nf-md-pan" . "\xf0bb4")
+    ("nf-md-pan_bottom_left" . "\xf0bb5")
+    ("nf-md-pan_bottom_right" . "\xf0bb6")
+    ("nf-md-pan_down" . "\xf0bb7")
+    ("nf-md-pan_horizontal" . "\xf0bb8")
+    ("nf-md-pan_left" . "\xf0bb9")
+    ("nf-md-pan_right" . "\xf0bba")
+    ("nf-md-pan_top_left" . "\xf0bbb")
+    ("nf-md-pan_top_right" . "\xf0bbc")
+    ("nf-md-pan_up" . "\xf0bbd")
+    ("nf-md-pan_vertical" . "\xf0bbe")
+    ("nf-md-panda" . "\xf03da")
+    ("nf-md-pandora" . "\xf03db")
+    ("nf-md-panorama" . "\xf03dc")
+    ("nf-md-panorama_fisheye" . "\xf03dd")
+    ("nf-md-panorama_horizontal" . "\xf1928")
+    ("nf-md-panorama_horizontal_outline" . "\xf03de")
+    ("nf-md-panorama_outline" . "\xf198c")
+    ("nf-md-panorama_sphere" . "\xf198d")
+    ("nf-md-panorama_sphere_outline" . "\xf198e")
+    ("nf-md-panorama_variant" . "\xf198f")
+    ("nf-md-panorama_variant_outline" . "\xf1990")
+    ("nf-md-panorama_vertical" . "\xf1929")
+    ("nf-md-panorama_vertical_outline" . "\xf03df")
+    ("nf-md-panorama_wide_angle" . "\xf195f")
+    ("nf-md-panorama_wide_angle_outline" . "\xf03e0")
+    ("nf-md-paper_cut_vertical" . "\xf03e1")
+    ("nf-md-paper_roll" . "\xf1157")
+    ("nf-md-paper_roll_outline" . "\xf1158")
+    ("nf-md-paperclip" . "\xf03e2")
+    ("nf-md-paperclip_check" . "\xf1ac6")
+    ("nf-md-paperclip_lock" . "\xf19da")
+    ("nf-md-paperclip_minus" . "\xf1ac7")
+    ("nf-md-paperclip_off" . "\xf1ac8")
+    ("nf-md-paperclip_plus" . "\xf1ac9")
+    ("nf-md-paperclip_remove" . "\xf1aca")
+    ("nf-md-parachute" . "\xf0cb4")
+    ("nf-md-parachute_outline" . "\xf0cb5")
+    ("nf-md-paragliding" . "\xf1745")
+    ("nf-md-parking" . "\xf03e3")
+    ("nf-md-party_popper" . "\xf1056")
+    ("nf-md-passport" . "\xf07e3")
+    ("nf-md-passport_biometric" . "\xf0de1")
+    ("nf-md-pasta" . "\xf1160")
+    ("nf-md-patio_heater" . "\xf0f80")
+    ("nf-md-patreon" . "\xf0882")
+    ("nf-md-pause" . "\xf03e4")
+    ("nf-md-pause_circle" . "\xf03e5")
+    ("nf-md-pause_circle_outline" . "\xf03e6")
+    ("nf-md-pause_octagon" . "\xf03e7")
+    ("nf-md-pause_octagon_outline" . "\xf03e8")
+    ("nf-md-paw" . "\xf03e9")
+    ("nf-md-paw_off" . "\xf0657")
+    ("nf-md-paw_off_outline" . "\xf1676")
+    ("nf-md-paw_outline" . "\xf1675")
+    ("nf-md-peace" . "\xf0884")
+    ("nf-md-peanut" . "\xf0ffc")
+    ("nf-md-peanut_off" . "\xf0ffd")
+    ("nf-md-peanut_off_outline" . "\xf0fff")
+    ("nf-md-peanut_outline" . "\xf0ffe")
+    ("nf-md-pen" . "\xf03ea")
+    ("nf-md-pen_lock" . "\xf0de2")
+    ("nf-md-pen_minus" . "\xf0de3")
+    ("nf-md-pen_off" . "\xf0de4")
+    ("nf-md-pen_plus" . "\xf0de5")
+    ("nf-md-pen_remove" . "\xf0de6")
+    ("nf-md-pencil" . "\xf03eb")
+    ("nf-md-pencil_box" . "\xf03ec")
+    ("nf-md-pencil_box_multiple" . "\xf1144")
+    ("nf-md-pencil_box_multiple_outline" . "\xf1145")
+    ("nf-md-pencil_box_outline" . "\xf03ed")
+    ("nf-md-pencil_circle" . "\xf06ff")
+    ("nf-md-pencil_circle_outline" . "\xf0776")
+    ("nf-md-pencil_lock" . "\xf03ee")
+    ("nf-md-pencil_lock_outline" . "\xf0de7")
+    ("nf-md-pencil_minus" . "\xf0de8")
+    ("nf-md-pencil_minus_outline" . "\xf0de9")
+    ("nf-md-pencil_off" . "\xf03ef")
+    ("nf-md-pencil_off_outline" . "\xf0dea")
+    ("nf-md-pencil_outline" . "\xf0cb6")
+    ("nf-md-pencil_plus" . "\xf0deb")
+    ("nf-md-pencil_plus_outline" . "\xf0dec")
+    ("nf-md-pencil_remove" . "\xf0ded")
+    ("nf-md-pencil_remove_outline" . "\xf0dee")
+    ("nf-md-pencil_ruler" . "\xf1353")
+    ("nf-md-penguin" . "\xf0ec0")
+    ("nf-md-pentagon" . "\xf0701")
+    ("nf-md-pentagon_outline" . "\xf0700")
+    ("nf-md-pentagram" . "\xf1667")
+    ("nf-md-percent" . "\xf03f0")
+    ("nf-md-percent_box" . "\xf1a02")
+    ("nf-md-percent_box_outline" . "\xf1a03")
+    ("nf-md-percent_circle" . "\xf1a04")
+    ("nf-md-percent_circle_outline" . "\xf1a05")
+    ("nf-md-percent_outline" . "\xf1278")
+    ("nf-md-periodic_table" . "\xf08b6")
+    ("nf-md-perspective_less" . "\xf0d23")
+    ("nf-md-perspective_more" . "\xf0d24")
+    ("nf-md-ph" . "\xf17c5")
+    ("nf-md-phone" . "\xf03f2")
+    ("nf-md-phone_alert" . "\xf0f1a")
+    ("nf-md-phone_alert_outline" . "\xf118e")
+    ("nf-md-phone_bluetooth" . "\xf03f3")
+    ("nf-md-phone_bluetooth_outline" . "\xf118f")
+    ("nf-md-phone_cancel" . "\xf10bc")
+    ("nf-md-phone_cancel_outline" . "\xf1190")
+    ("nf-md-phone_check" . "\xf11a9")
+    ("nf-md-phone_check_outline" . "\xf11aa")
+    ("nf-md-phone_classic" . "\xf0602")
+    ("nf-md-phone_classic_off" . "\xf1279")
+    ("nf-md-phone_clock" . "\xf19db")
+    ("nf-md-phone_dial" . "\xf1559")
+    ("nf-md-phone_dial_outline" . "\xf155a")
+    ("nf-md-phone_forward" . "\xf03f4")
+    ("nf-md-phone_forward_outline" . "\xf1191")
+    ("nf-md-phone_hangup" . "\xf03f5")
+    ("nf-md-phone_hangup_outline" . "\xf1192")
+    ("nf-md-phone_in_talk" . "\xf03f6")
+    ("nf-md-phone_in_talk_outline" . "\xf1182")
+    ("nf-md-phone_incoming" . "\xf03f7")
+    ("nf-md-phone_incoming_outline" . "\xf1193")
+    ("nf-md-phone_lock" . "\xf03f8")
+    ("nf-md-phone_lock_outline" . "\xf1194")
+    ("nf-md-phone_log" . "\xf03f9")
+    ("nf-md-phone_log_outline" . "\xf1195")
+    ("nf-md-phone_message" . "\xf1196")
+    ("nf-md-phone_message_outline" . "\xf1197")
+    ("nf-md-phone_minus" . "\xf0658")
+    ("nf-md-phone_minus_outline" . "\xf1198")
+    ("nf-md-phone_missed" . "\xf03fa")
+    ("nf-md-phone_missed_outline" . "\xf11a5")
+    ("nf-md-phone_off" . "\xf0def")
+    ("nf-md-phone_off_outline" . "\xf11a6")
+    ("nf-md-phone_outgoing" . "\xf03fb")
+    ("nf-md-phone_outgoing_outline" . "\xf1199")
+    ("nf-md-phone_outline" . "\xf0df0")
+    ("nf-md-phone_paused" . "\xf03fc")
+    ("nf-md-phone_paused_outline" . "\xf119a")
+    ("nf-md-phone_plus" . "\xf0659")
+    ("nf-md-phone_plus_outline" . "\xf119b")
+    ("nf-md-phone_refresh" . "\xf1993")
+    ("nf-md-phone_refresh_outline" . "\xf1994")
+    ("nf-md-phone_remove" . "\xf152f")
+    ("nf-md-phone_remove_outline" . "\xf1530")
+    ("nf-md-phone_return" . "\xf082f")
+    ("nf-md-phone_return_outline" . "\xf119c")
+    ("nf-md-phone_ring" . "\xf11ab")
+    ("nf-md-phone_ring_outline" . "\xf11ac")
+    ("nf-md-phone_rotate_landscape" . "\xf0885")
+    ("nf-md-phone_rotate_portrait" . "\xf0886")
+    ("nf-md-phone_settings" . "\xf03fd")
+    ("nf-md-phone_settings_outline" . "\xf119d")
+    ("nf-md-phone_sync" . "\xf1995")
+    ("nf-md-phone_sync_outline" . "\xf1996")
+    ("nf-md-phone_voip" . "\xf03fe")
+    ("nf-md-pi" . "\xf03ff")
+    ("nf-md-pi_box" . "\xf0400")
+    ("nf-md-pi_hole" . "\xf0df1")
+    ("nf-md-piano" . "\xf067d")
+    ("nf-md-piano_off" . "\xf0698")
+    ("nf-md-pickaxe" . "\xf08b7")
+    ("nf-md-picture_in_picture_bottom_right" . "\xf0e57")
+    ("nf-md-picture_in_picture_bottom_right_outline" . "\xf0e58")
+    ("nf-md-picture_in_picture_top_right" . "\xf0e59")
+    ("nf-md-picture_in_picture_top_right_outline" . "\xf0e5a")
+    ("nf-md-pier" . "\xf0887")
+    ("nf-md-pier_crane" . "\xf0888")
+    ("nf-md-pig" . "\xf0401")
+    ("nf-md-pig_variant" . "\xf1006")
+    ("nf-md-pig_variant_outline" . "\xf1678")
+    ("nf-md-piggy_bank" . "\xf1007")
+    ("nf-md-piggy_bank_outline" . "\xf1679")
+    ("nf-md-pill" . "\xf0402")
+    ("nf-md-pill_off" . "\xf1a5c")
+    ("nf-md-pillar" . "\xf0702")
+    ("nf-md-pin" . "\xf0403")
+    ("nf-md-pin_off" . "\xf0404")
+    ("nf-md-pin_off_outline" . "\xf0930")
+    ("nf-md-pin_outline" . "\xf0931")
+    ("nf-md-pine_tree" . "\xf0405")
+    ("nf-md-pine_tree_box" . "\xf0406")
+    ("nf-md-pine_tree_fire" . "\xf141a")
+    ("nf-md-pinterest" . "\xf0407")
+    ("nf-md-pinwheel" . "\xf0ad5")
+    ("nf-md-pinwheel_outline" . "\xf0ad6")
+    ("nf-md-pipe" . "\xf07e5")
+    ("nf-md-pipe_disconnected" . "\xf07e6")
+    ("nf-md-pipe_leak" . "\xf0889")
+    ("nf-md-pipe_valve" . "\xf184d")
+    ("nf-md-pipe_wrench" . "\xf1354")
+    ("nf-md-pirate" . "\xf0a08")
+    ("nf-md-pistol" . "\xf0703")
+    ("nf-md-piston" . "\xf088a")
+    ("nf-md-pitchfork" . "\xf1553")
+    ("nf-md-pizza" . "\xf0409")
+    ("nf-md-play" . "\xf040a")
+    ("nf-md-play_box" . "\xf127a")
+    ("nf-md-play_box_lock" . "\xf1a16")
+    ("nf-md-play_box_lock_open" . "\xf1a17")
+    ("nf-md-play_box_lock_open_outline" . "\xf1a18")
+    ("nf-md-play_box_lock_outline" . "\xf1a19")
+    ("nf-md-play_box_multiple" . "\xf0d19")
+    ("nf-md-play_box_multiple_outline" . "\xf13e6")
+    ("nf-md-play_box_outline" . "\xf040b")
+    ("nf-md-play_circle" . "\xf040c")
+    ("nf-md-play_circle_outline" . "\xf040d")
+    ("nf-md-play_network" . "\xf088b")
+    ("nf-md-play_network_outline" . "\xf0cb7")
+    ("nf-md-play_outline" . "\xf0f1b")
+    ("nf-md-play_pause" . "\xf040e")
+    ("nf-md-play_protected_content" . "\xf040f")
+    ("nf-md-play_speed" . "\xf08ff")
+    ("nf-md-playlist_check" . "\xf05c7")
+    ("nf-md-playlist_edit" . "\xf0900")
+    ("nf-md-playlist_minus" . "\xf0410")
+    ("nf-md-playlist_music" . "\xf0cb8")
+    ("nf-md-playlist_music_outline" . "\xf0cb9")
+    ("nf-md-playlist_play" . "\xf0411")
+    ("nf-md-playlist_plus" . "\xf0412")
+    ("nf-md-playlist_remove" . "\xf0413")
+    ("nf-md-playlist_star" . "\xf0df2")
+    ("nf-md-plex" . "\xf06ba")
+    ("nf-md-pliers" . "\xf19a4")
+    ("nf-md-plus" . "\xf0415")
+    ("nf-md-plus_box" . "\xf0416")
+    ("nf-md-plus_box_multiple" . "\xf0334")
+    ("nf-md-plus_box_multiple_outline" . "\xf1143")
+    ("nf-md-plus_box_outline" . "\xf0704")
+    ("nf-md-plus_circle" . "\xf0417")
+    ("nf-md-plus_circle_multiple" . "\xf034c")
+    ("nf-md-plus_circle_multiple_outline" . "\xf0418")
+    ("nf-md-plus_circle_outline" . "\xf0419")
+    ("nf-md-plus_lock" . "\xf1a5d")
+    ("nf-md-plus_lock_open" . "\xf1a5e")
+    ("nf-md-plus_minus" . "\xf0992")
+    ("nf-md-plus_minus_box" . "\xf0993")
+    ("nf-md-plus_minus_variant" . "\xf14c9")
+    ("nf-md-plus_network" . "\xf041a")
+    ("nf-md-plus_network_outline" . "\xf0cba")
+    ("nf-md-plus_outline" . "\xf0705")
+    ("nf-md-plus_thick" . "\xf11ec")
+    ("nf-md-podcast" . "\xf0994")
+    ("nf-md-podium" . "\xf0d25")
+    ("nf-md-podium_bronze" . "\xf0d26")
+    ("nf-md-podium_gold" . "\xf0d27")
+    ("nf-md-podium_silver" . "\xf0d28")
+    ("nf-md-point_of_sale" . "\xf0d92")
+    ("nf-md-pokeball" . "\xf041d")
+    ("nf-md-pokemon_go" . "\xf0a09")
+    ("nf-md-poker_chip" . "\xf0830")
+    ("nf-md-polaroid" . "\xf041e")
+    ("nf-md-police_badge" . "\xf1167")
+    ("nf-md-police_badge_outline" . "\xf1168")
+    ("nf-md-police_station" . "\xf1839")
+    ("nf-md-poll" . "\xf041f")
+    ("nf-md-polo" . "\xf14c3")
+    ("nf-md-polymer" . "\xf0421")
+    ("nf-md-pool" . "\xf0606")
+    ("nf-md-pool_thermometer" . "\xf1a5f")
+    ("nf-md-popcorn" . "\xf0422")
+    ("nf-md-post" . "\xf1008")
+    ("nf-md-post_lamp" . "\xf1a60")
+    ("nf-md-post_outline" . "\xf1009")
+    ("nf-md-postage_stamp" . "\xf0cbb")
+    ("nf-md-pot" . "\xf02e5")
+    ("nf-md-pot_mix" . "\xf065b")
+    ("nf-md-pot_mix_outline" . "\xf0677")
+    ("nf-md-pot_outline" . "\xf02ff")
+    ("nf-md-pot_steam" . "\xf065a")
+    ("nf-md-pot_steam_outline" . "\xf0326")
+    ("nf-md-pound" . "\xf0423")
+    ("nf-md-pound_box" . "\xf0424")
+    ("nf-md-pound_box_outline" . "\xf117f")
+    ("nf-md-power" . "\xf0425")
+    ("nf-md-power_cycle" . "\xf0901")
+    ("nf-md-power_off" . "\xf0902")
+    ("nf-md-power_on" . "\xf0903")
+    ("nf-md-power_plug" . "\xf06a5")
+    ("nf-md-power_plug_off" . "\xf06a6")
+    ("nf-md-power_plug_off_outline" . "\xf1424")
+    ("nf-md-power_plug_outline" . "\xf1425")
+    ("nf-md-power_settings" . "\xf0426")
+    ("nf-md-power_sleep" . "\xf0904")
+    ("nf-md-power_socket" . "\xf0427")
+    ("nf-md-power_socket_au" . "\xf0905")
+    ("nf-md-power_socket_ch" . "\xf0fb3")
+    ("nf-md-power_socket_de" . "\xf1107")
+    ("nf-md-power_socket_eu" . "\xf07e7")
+    ("nf-md-power_socket_fr" . "\xf1108")
+    ("nf-md-power_socket_it" . "\xf14ff")
+    ("nf-md-power_socket_jp" . "\xf1109")
+    ("nf-md-power_socket_uk" . "\xf07e8")
+    ("nf-md-power_socket_us" . "\xf07e9")
+    ("nf-md-power_standby" . "\xf0906")
+    ("nf-md-powershell" . "\xf0a0a")
+    ("nf-md-prescription" . "\xf0706")
+    ("nf-md-presentation" . "\xf0428")
+    ("nf-md-presentation_play" . "\xf0429")
+    ("nf-md-pretzel" . "\xf1562")
+    ("nf-md-printer" . "\xf042a")
+    ("nf-md-printer_3d" . "\xf042b")
+    ("nf-md-printer_3d_nozzle" . "\xf0e5b")
+    ("nf-md-printer_3d_nozzle_alert" . "\xf11c0")
+    ("nf-md-printer_3d_nozzle_alert_outline" . "\xf11c1")
+    ("nf-md-printer_3d_nozzle_heat" . "\xf18b8")
+    ("nf-md-printer_3d_nozzle_heat_outline" . "\xf18b9")
+    ("nf-md-printer_3d_nozzle_outline" . "\xf0e5c")
+    ("nf-md-printer_alert" . "\xf042c")
+    ("nf-md-printer_check" . "\xf1146")
+    ("nf-md-printer_eye" . "\xf1458")
+    ("nf-md-printer_off" . "\xf0e5d")
+    ("nf-md-printer_off_outline" . "\xf1785")
+    ("nf-md-printer_outline" . "\xf1786")
+    ("nf-md-printer_pos" . "\xf1057")
+    ("nf-md-printer_search" . "\xf1457")
+    ("nf-md-printer_settings" . "\xf0707")
+    ("nf-md-printer_wireless" . "\xf0a0b")
+    ("nf-md-priority_high" . "\xf0603")
+    ("nf-md-priority_low" . "\xf0604")
+    ("nf-md-professional_hexagon" . "\xf042d")
+    ("nf-md-progress_alert" . "\xf0cbc")
+    ("nf-md-progress_check" . "\xf0995")
+    ("nf-md-progress_clock" . "\xf0996")
+    ("nf-md-progress_close" . "\xf110a")
+    ("nf-md-progress_download" . "\xf0997")
+    ("nf-md-progress_pencil" . "\xf1787")
+    ("nf-md-progress_question" . "\xf1522")
+    ("nf-md-progress_star" . "\xf1788")
+    ("nf-md-progress_upload" . "\xf0998")
+    ("nf-md-progress_wrench" . "\xf0cbd")
+    ("nf-md-projector" . "\xf042e")
+    ("nf-md-projector_off" . "\xf1a23")
+    ("nf-md-projector_screen" . "\xf042f")
+    ("nf-md-projector_screen_off" . "\xf180d")
+    ("nf-md-projector_screen_off_outline" . "\xf180e")
+    ("nf-md-projector_screen_outline" . "\xf1724")
+    ("nf-md-projector_screen_variant" . "\xf180f")
+    ("nf-md-projector_screen_variant_off" . "\xf1810")
+    ("nf-md-projector_screen_variant_off_outline" . "\xf1811")
+    ("nf-md-projector_screen_variant_outline" . "\xf1812")
+    ("nf-md-propane_tank" . "\xf1357")
+    ("nf-md-propane_tank_outline" . "\xf1358")
+    ("nf-md-protocol" . "\xf0fd8")
+    ("nf-md-publish" . "\xf06a7")
+    ("nf-md-publish_off" . "\xf1945")
+    ("nf-md-pulse" . "\xf0430")
+    ("nf-md-pump" . "\xf1402")
+    ("nf-md-pumpkin" . "\xf0bbf")
+    ("nf-md-purse" . "\xf0f1c")
+    ("nf-md-purse_outline" . "\xf0f1d")
+    ("nf-md-puzzle" . "\xf0431")
+    ("nf-md-puzzle_check" . "\xf1426")
+    ("nf-md-puzzle_check_outline" . "\xf1427")
+    ("nf-md-puzzle_edit" . "\xf14d3")
+    ("nf-md-puzzle_edit_outline" . "\xf14d9")
+    ("nf-md-puzzle_heart" . "\xf14d4")
+    ("nf-md-puzzle_heart_outline" . "\xf14da")
+    ("nf-md-puzzle_minus" . "\xf14d1")
+    ("nf-md-puzzle_minus_outline" . "\xf14d7")
+    ("nf-md-puzzle_outline" . "\xf0a66")
+    ("nf-md-puzzle_plus" . "\xf14d0")
+    ("nf-md-puzzle_plus_outline" . "\xf14d6")
+    ("nf-md-puzzle_remove" . "\xf14d2")
+    ("nf-md-puzzle_remove_outline" . "\xf14d8")
+    ("nf-md-puzzle_star" . "\xf14d5")
+    ("nf-md-puzzle_star_outline" . "\xf14db")
+    ("nf-md-pyramid" . "\xf1952")
+    ("nf-md-pyramid_off" . "\xf1953")
+    ("nf-md-qi" . "\xf0999")
+    ("nf-md-qqchat" . "\xf0605")
+    ("nf-md-qrcode" . "\xf0432")
+    ("nf-md-qrcode_edit" . "\xf08b8")
+    ("nf-md-qrcode_minus" . "\xf118c")
+    ("nf-md-qrcode_plus" . "\xf118b")
+    ("nf-md-qrcode_remove" . "\xf118d")
+    ("nf-md-qrcode_scan" . "\xf0433")
+    ("nf-md-quadcopter" . "\xf0434")
+    ("nf-md-quality_high" . "\xf0435")
+    ("nf-md-quality_low" . "\xf0a0c")
+    ("nf-md-quality_medium" . "\xf0a0d")
+    ("nf-md-quora" . "\xf0d29")
+    ("nf-md-rabbit" . "\xf0907")
+    ("nf-md-rabbit_variant" . "\xf1a61")
+    ("nf-md-rabbit_variant_outline" . "\xf1a62")
+    ("nf-md-racing_helmet" . "\xf0d93")
+    ("nf-md-racquetball" . "\xf0d94")
+    ("nf-md-radar" . "\xf0437")
+    ("nf-md-radiator" . "\xf0438")
+    ("nf-md-radiator_disabled" . "\xf0ad7")
+    ("nf-md-radiator_off" . "\xf0ad8")
+    ("nf-md-radio" . "\xf0439")
+    ("nf-md-radio_am" . "\xf0cbe")
+    ("nf-md-radio_fm" . "\xf0cbf")
+    ("nf-md-radio_handheld" . "\xf043a")
+    ("nf-md-radio_off" . "\xf121c")
+    ("nf-md-radio_tower" . "\xf043b")
+    ("nf-md-radioactive" . "\xf043c")
+    ("nf-md-radioactive_circle" . "\xf185d")
+    ("nf-md-radioactive_circle_outline" . "\xf185e")
+    ("nf-md-radioactive_off" . "\xf0ec1")
+    ("nf-md-radiobox_blank" . "\xf043d")
+    ("nf-md-radiobox_marked" . "\xf043e")
+    ("nf-md-radiology_box" . "\xf14c5")
+    ("nf-md-radiology_box_outline" . "\xf14c6")
+    ("nf-md-radius" . "\xf0cc0")
+    ("nf-md-radius_outline" . "\xf0cc1")
+    ("nf-md-railroad_light" . "\xf0f1e")
+    ("nf-md-rake" . "\xf1544")
+    ("nf-md-raspberry_pi" . "\xf043f")
+    ("nf-md-raw" . "\xf1a0f")
+    ("nf-md-raw_off" . "\xf1a10")
+    ("nf-md-ray_end" . "\xf0440")
+    ("nf-md-ray_end_arrow" . "\xf0441")
+    ("nf-md-ray_start" . "\xf0442")
+    ("nf-md-ray_start_arrow" . "\xf0443")
+    ("nf-md-ray_start_end" . "\xf0444")
+    ("nf-md-ray_start_vertex_end" . "\xf15d8")
+    ("nf-md-ray_vertex" . "\xf0445")
+    ("nf-md-razor_double_edge" . "\xf1997")
+    ("nf-md-razor_single_edge" . "\xf1998")
+    ("nf-md-react" . "\xf0708")
+    ("nf-md-read" . "\xf0447")
+    ("nf-md-receipt" . "\xf0449")
+    ("nf-md-receipt_outline" . "\xf19dc")
+    ("nf-md-receipt_text_check" . "\xf1a63")
+    ("nf-md-receipt_text_check_outline" . "\xf1a64")
+    ("nf-md-receipt_text_minus" . "\xf1a65")
+    ("nf-md-receipt_text_minus_outline" . "\xf1a66")
+    ("nf-md-receipt_text_plus" . "\xf1a67")
+    ("nf-md-receipt_text_plus_outline" . "\xf1a68")
+    ("nf-md-receipt_text_remove" . "\xf1a69")
+    ("nf-md-receipt_text_remove_outline" . "\xf1a6a")
+    ("nf-md-record" . "\xf044a")
+    ("nf-md-record_circle" . "\xf0ec2")
+    ("nf-md-record_circle_outline" . "\xf0ec3")
+    ("nf-md-record_player" . "\xf099a")
+    ("nf-md-record_rec" . "\xf044b")
+    ("nf-md-rectangle" . "\xf0e5e")
+    ("nf-md-rectangle_outline" . "\xf0e5f")
+    ("nf-md-recycle" . "\xf044c")
+    ("nf-md-recycle_variant" . "\xf139d")
+    ("nf-md-reddit" . "\xf044d")
+    ("nf-md-redhat" . "\xf111b")
+    ("nf-md-redo" . "\xf044e")
+    ("nf-md-redo_variant" . "\xf044f")
+    ("nf-md-reflect_horizontal" . "\xf0a0e")
+    ("nf-md-reflect_vertical" . "\xf0a0f")
+    ("nf-md-refresh" . "\xf0450")
+    ("nf-md-refresh_auto" . "\xf18f2")
+    ("nf-md-refresh_circle" . "\xf1377")
+    ("nf-md-regex" . "\xf0451")
+    ("nf-md-registered_trademark" . "\xf0a67")
+    ("nf-md-reiterate" . "\xf1588")
+    ("nf-md-relation_many_to_many" . "\xf1496")
+    ("nf-md-relation_many_to_one" . "\xf1497")
+    ("nf-md-relation_many_to_one_or_many" . "\xf1498")
+    ("nf-md-relation_many_to_only_one" . "\xf1499")
+    ("nf-md-relation_many_to_zero_or_many" . "\xf149a")
+    ("nf-md-relation_many_to_zero_or_one" . "\xf149b")
+    ("nf-md-relation_one_or_many_to_many" . "\xf149c")
+    ("nf-md-relation_one_or_many_to_one" . "\xf149d")
+    ("nf-md-relation_one_or_many_to_one_or_many" . "\xf149e")
+    ("nf-md-relation_one_or_many_to_only_one" . "\xf149f")
+    ("nf-md-relation_one_or_many_to_zero_or_many" . "\xf14a0")
+    ("nf-md-relation_one_or_many_to_zero_or_one" . "\xf14a1")
+    ("nf-md-relation_one_to_many" . "\xf14a2")
+    ("nf-md-relation_one_to_one" . "\xf14a3")
+    ("nf-md-relation_one_to_one_or_many" . "\xf14a4")
+    ("nf-md-relation_one_to_only_one" . "\xf14a5")
+    ("nf-md-relation_one_to_zero_or_many" . "\xf14a6")
+    ("nf-md-relation_one_to_zero_or_one" . "\xf14a7")
+    ("nf-md-relation_only_one_to_many" . "\xf14a8")
+    ("nf-md-relation_only_one_to_one" . "\xf14a9")
+    ("nf-md-relation_only_one_to_one_or_many" . "\xf14aa")
+    ("nf-md-relation_only_one_to_only_one" . "\xf14ab")
+    ("nf-md-relation_only_one_to_zero_or_many" . "\xf14ac")
+    ("nf-md-relation_only_one_to_zero_or_one" . "\xf14ad")
+    ("nf-md-relation_zero_or_many_to_many" . "\xf14ae")
+    ("nf-md-relation_zero_or_many_to_one" . "\xf14af")
+    ("nf-md-relation_zero_or_many_to_one_or_many" . "\xf14b0")
+    ("nf-md-relation_zero_or_many_to_only_one" . "\xf14b1")
+    ("nf-md-relation_zero_or_many_to_zero_or_many" . "\xf14b2")
+    ("nf-md-relation_zero_or_many_to_zero_or_one" . "\xf14b3")
+    ("nf-md-relation_zero_or_one_to_many" . "\xf14b4")
+    ("nf-md-relation_zero_or_one_to_one" . "\xf14b5")
+    ("nf-md-relation_zero_or_one_to_one_or_many" . "\xf14b6")
+    ("nf-md-relation_zero_or_one_to_only_one" . "\xf14b7")
+    ("nf-md-relation_zero_or_one_to_zero_or_many" . "\xf14b8")
+    ("nf-md-relation_zero_or_one_to_zero_or_one" . "\xf14b9")
+    ("nf-md-relative_scale" . "\xf0452")
+    ("nf-md-reload" . "\xf0453")
+    ("nf-md-reload_alert" . "\xf110b")
+    ("nf-md-reminder" . "\xf088c")
+    ("nf-md-remote" . "\xf0454")
+    ("nf-md-remote_desktop" . "\xf08b9")
+    ("nf-md-remote_off" . "\xf0ec4")
+    ("nf-md-remote_tv" . "\xf0ec5")
+    ("nf-md-remote_tv_off" . "\xf0ec6")
+    ("nf-md-rename_box" . "\xf0455")
+    ("nf-md-reorder_horizontal" . "\xf0688")
+    ("nf-md-reorder_vertical" . "\xf0689")
+    ("nf-md-repeat" . "\xf0456")
+    ("nf-md-repeat_off" . "\xf0457")
+    ("nf-md-repeat_once" . "\xf0458")
+    ("nf-md-repeat_variant" . "\xf0547")
+    ("nf-md-replay" . "\xf0459")
+    ("nf-md-reply" . "\xf045a")
+    ("nf-md-reply_all" . "\xf045b")
+    ("nf-md-reply_all_outline" . "\xf0f1f")
+    ("nf-md-reply_circle" . "\xf11ae")
+    ("nf-md-reply_outline" . "\xf0f20")
+    ("nf-md-reproduction" . "\xf045c")
+    ("nf-md-resistor" . "\xf0b44")
+    ("nf-md-resistor_nodes" . "\xf0b45")
+    ("nf-md-resize" . "\xf0a68")
+    ("nf-md-resize_bottom_right" . "\xf045d")
+    ("nf-md-responsive" . "\xf045e")
+    ("nf-md-restart" . "\xf0709")
+    ("nf-md-restart_alert" . "\xf110c")
+    ("nf-md-restart_off" . "\xf0d95")
+    ("nf-md-restore" . "\xf099b")
+    ("nf-md-restore_alert" . "\xf110d")
+    ("nf-md-rewind" . "\xf045f")
+    ("nf-md-rewind_10" . "\xf0d2a")
+    ("nf-md-rewind_15" . "\xf1946")
+    ("nf-md-rewind_30" . "\xf0d96")
+    ("nf-md-rewind_5" . "\xf11f9")
+    ("nf-md-rewind_60" . "\xf160c")
+    ("nf-md-rewind_outline" . "\xf070a")
+    ("nf-md-rhombus" . "\xf070b")
+    ("nf-md-rhombus_medium" . "\xf0a10")
+    ("nf-md-rhombus_medium_outline" . "\xf14dc")
+    ("nf-md-rhombus_outline" . "\xf070c")
+    ("nf-md-rhombus_split" . "\xf0a11")
+    ("nf-md-rhombus_split_outline" . "\xf14dd")
+    ("nf-md-ribbon" . "\xf0460")
+    ("nf-md-rice" . "\xf07ea")
+    ("nf-md-rickshaw" . "\xf15bb")
+    ("nf-md-rickshaw_electric" . "\xf15bc")
+    ("nf-md-ring" . "\xf07eb")
+    ("nf-md-rivet" . "\xf0e60")
+    ("nf-md-road" . "\xf0461")
+    ("nf-md-road_variant" . "\xf0462")
+    ("nf-md-robber" . "\xf1058")
+    ("nf-md-robot" . "\xf06a9")
+    ("nf-md-robot_angry" . "\xf169d")
+    ("nf-md-robot_angry_outline" . "\xf169e")
+    ("nf-md-robot_confused" . "\xf169f")
+    ("nf-md-robot_confused_outline" . "\xf16a0")
+    ("nf-md-robot_dead" . "\xf16a1")
+    ("nf-md-robot_dead_outline" . "\xf16a2")
+    ("nf-md-robot_excited" . "\xf16a3")
+    ("nf-md-robot_excited_outline" . "\xf16a4")
+    ("nf-md-robot_happy" . "\xf1719")
+    ("nf-md-robot_happy_outline" . "\xf171a")
+    ("nf-md-robot_industrial" . "\xf0b46")
+    ("nf-md-robot_industrial_outline" . "\xf1a1a")
+    ("nf-md-robot_love" . "\xf16a5")
+    ("nf-md-robot_love_outline" . "\xf16a6")
+    ("nf-md-robot_mower" . "\xf11f7")
+    ("nf-md-robot_mower_outline" . "\xf11f3")
+    ("nf-md-robot_off" . "\xf16a7")
+    ("nf-md-robot_off_outline" . "\xf167b")
+    ("nf-md-robot_outline" . "\xf167a")
+    ("nf-md-robot_vacuum" . "\xf070d")
+    ("nf-md-robot_vacuum_variant" . "\xf0908")
+    ("nf-md-rocket" . "\xf0463")
+    ("nf-md-rocket_launch" . "\xf14de")
+    ("nf-md-rocket_launch_outline" . "\xf14df")
+    ("nf-md-rocket_outline" . "\xf13af")
+    ("nf-md-rodent" . "\xf1327")
+    ("nf-md-roller_shade" . "\xf1a6b")
+    ("nf-md-roller_shade_closed" . "\xf1a6c")
+    ("nf-md-roller_skate" . "\xf0d2b")
+    ("nf-md-roller_skate_off" . "\xf0145")
+    ("nf-md-rollerblade" . "\xf0d2c")
+    ("nf-md-rollerblade_off" . "\xf002e")
+    ("nf-md-rollupjs" . "\xf0bc0")
+    ("nf-md-rolodex" . "\xf1ab9")
+    ("nf-md-rolodex_outline" . "\xf1aba")
+    ("nf-md-roman_numeral_1" . "\xf1088")
+    ("nf-md-roman_numeral_10" . "\xf1091")
+    ("nf-md-roman_numeral_2" . "\xf1089")
+    ("nf-md-roman_numeral_3" . "\xf108a")
+    ("nf-md-roman_numeral_4" . "\xf108b")
+    ("nf-md-roman_numeral_5" . "\xf108c")
+    ("nf-md-roman_numeral_6" . "\xf108d")
+    ("nf-md-roman_numeral_7" . "\xf108e")
+    ("nf-md-roman_numeral_8" . "\xf108f")
+    ("nf-md-roman_numeral_9" . "\xf1090")
+    ("nf-md-room_service" . "\xf088d")
+    ("nf-md-room_service_outline" . "\xf0d97")
+    ("nf-md-rotate_360" . "\xf1999")
+    ("nf-md-rotate_3d" . "\xf0ec7")
+    ("nf-md-rotate_3d_variant" . "\xf0464")
+    ("nf-md-rotate_left" . "\xf0465")
+    ("nf-md-rotate_left_variant" . "\xf0466")
+    ("nf-md-rotate_orbit" . "\xf0d98")
+    ("nf-md-rotate_right" . "\xf0467")
+    ("nf-md-rotate_right_variant" . "\xf0468")
+    ("nf-md-rounded_corner" . "\xf0607")
+    ("nf-md-router" . "\xf11e2")
+    ("nf-md-router_network" . "\xf1087")
+    ("nf-md-router_wireless" . "\xf0469")
+    ("nf-md-router_wireless_off" . "\xf15a3")
+    ("nf-md-router_wireless_settings" . "\xf0a69")
+    ("nf-md-routes" . "\xf046a")
+    ("nf-md-routes_clock" . "\xf1059")
+    ("nf-md-rowing" . "\xf0608")
+    ("nf-md-rss" . "\xf046b")
+    ("nf-md-rss_box" . "\xf046c")
+    ("nf-md-rss_off" . "\xf0f21")
+    ("nf-md-rug" . "\xf1475")
+    ("nf-md-rugby" . "\xf0d99")
+    ("nf-md-ruler" . "\xf046d")
+    ("nf-md-ruler_square" . "\xf0cc2")
+    ("nf-md-ruler_square_compass" . "\xf0ebe")
+    ("nf-md-run" . "\xf070e")
+    ("nf-md-run_fast" . "\xf046e")
+    ("nf-md-rv_truck" . "\xf11d4")
+    ("nf-md-sack" . "\xf0d2e")
+    ("nf-md-sack_percent" . "\xf0d2f")
+    ("nf-md-safe" . "\xf0a6a")
+    ("nf-md-safe_square" . "\xf127c")
+    ("nf-md-safe_square_outline" . "\xf127d")
+    ("nf-md-safety_goggles" . "\xf0d30")
+    ("nf-md-sail_boat" . "\xf0ec8")
+    ("nf-md-sail_boat_sink" . "\xf1aef")
+    ("nf-md-sale" . "\xf046f")
+    ("nf-md-sale_outline" . "\xf1a06")
+    ("nf-md-salesforce" . "\xf088e")
+    ("nf-md-sass" . "\xf07ec")
+    ("nf-md-satellite" . "\xf0470")
+    ("nf-md-satellite_uplink" . "\xf0909")
+    ("nf-md-satellite_variant" . "\xf0471")
+    ("nf-md-sausage" . "\xf08ba")
+    ("nf-md-sausage_off" . "\xf1789")
+    ("nf-md-saw_blade" . "\xf0e61")
+    ("nf-md-sawtooth_wave" . "\xf147a")
+    ("nf-md-saxophone" . "\xf0609")
+    ("nf-md-scale" . "\xf0472")
+    ("nf-md-scale_balance" . "\xf05d1")
+    ("nf-md-scale_bathroom" . "\xf0473")
+    ("nf-md-scale_off" . "\xf105a")
+    ("nf-md-scale_unbalanced" . "\xf19b8")
+    ("nf-md-scan_helper" . "\xf13d8")
+    ("nf-md-scanner" . "\xf06ab")
+    ("nf-md-scanner_off" . "\xf090a")
+    ("nf-md-scatter_plot" . "\xf0ec9")
+    ("nf-md-scatter_plot_outline" . "\xf0eca")
+    ("nf-md-scent" . "\xf1958")
+    ("nf-md-scent_off" . "\xf1959")
+    ("nf-md-school" . "\xf0474")
+    ("nf-md-school_outline" . "\xf1180")
+    ("nf-md-scissors_cutting" . "\xf0a6b")
+    ("nf-md-scooter" . "\xf15bd")
+    ("nf-md-scooter_electric" . "\xf15be")
+    ("nf-md-scoreboard" . "\xf127e")
+    ("nf-md-scoreboard_outline" . "\xf127f")
+    ("nf-md-screen_rotation" . "\xf0475")
+    ("nf-md-screen_rotation_lock" . "\xf0478")
+    ("nf-md-screw_flat_top" . "\xf0df3")
+    ("nf-md-screw_lag" . "\xf0df4")
+    ("nf-md-screw_machine_flat_top" . "\xf0df5")
+    ("nf-md-screw_machine_round_top" . "\xf0df6")
+    ("nf-md-screw_round_top" . "\xf0df7")
+    ("nf-md-screwdriver" . "\xf0476")
+    ("nf-md-script" . "\xf0bc1")
+    ("nf-md-script_outline" . "\xf0477")
+    ("nf-md-script_text" . "\xf0bc2")
+    ("nf-md-script_text_key" . "\xf1725")
+    ("nf-md-script_text_key_outline" . "\xf1726")
+    ("nf-md-script_text_outline" . "\xf0bc3")
+    ("nf-md-script_text_play" . "\xf1727")
+    ("nf-md-script_text_play_outline" . "\xf1728")
+    ("nf-md-sd" . "\xf0479")
+    ("nf-md-seal" . "\xf047a")
+    ("nf-md-seal_variant" . "\xf0fd9")
+    ("nf-md-search_web" . "\xf070f")
+    ("nf-md-seat" . "\xf0cc3")
+    ("nf-md-seat_flat" . "\xf047b")
+    ("nf-md-seat_flat_angled" . "\xf047c")
+    ("nf-md-seat_individual_suite" . "\xf047d")
+    ("nf-md-seat_legroom_extra" . "\xf047e")
+    ("nf-md-seat_legroom_normal" . "\xf047f")
+    ("nf-md-seat_legroom_reduced" . "\xf0480")
+    ("nf-md-seat_outline" . "\xf0cc4")
+    ("nf-md-seat_passenger" . "\xf1249")
+    ("nf-md-seat_recline_extra" . "\xf0481")
+    ("nf-md-seat_recline_normal" . "\xf0482")
+    ("nf-md-seatbelt" . "\xf0cc5")
+    ("nf-md-security" . "\xf0483")
+    ("nf-md-security_network" . "\xf0484")
+    ("nf-md-seed" . "\xf0e62")
+    ("nf-md-seed_off" . "\xf13fd")
+    ("nf-md-seed_off_outline" . "\xf13fe")
+    ("nf-md-seed_outline" . "\xf0e63")
+    ("nf-md-seed_plus" . "\xf1a6d")
+    ("nf-md-seed_plus_outline" . "\xf1a6e")
+    ("nf-md-seesaw" . "\xf15a4")
+    ("nf-md-segment" . "\xf0ecb")
+    ("nf-md-select" . "\xf0485")
+    ("nf-md-select_all" . "\xf0486")
+    ("nf-md-select_color" . "\xf0d31")
+    ("nf-md-select_compare" . "\xf0ad9")
+    ("nf-md-select_drag" . "\xf0a6c")
+    ("nf-md-select_group" . "\xf0f82")
+    ("nf-md-select_inverse" . "\xf0487")
+    ("nf-md-select_marker" . "\xf1280")
+    ("nf-md-select_multiple" . "\xf1281")
+    ("nf-md-select_multiple_marker" . "\xf1282")
+    ("nf-md-select_off" . "\xf0488")
+    ("nf-md-select_place" . "\xf0fda")
+    ("nf-md-select_remove" . "\xf17c1")
+    ("nf-md-select_search" . "\xf1204")
+    ("nf-md-selection" . "\xf0489")
+    ("nf-md-selection_drag" . "\xf0a6d")
+    ("nf-md-selection_ellipse" . "\xf0d32")
+    ("nf-md-selection_ellipse_arrow_inside" . "\xf0f22")
+    ("nf-md-selection_ellipse_remove" . "\xf17c2")
+    ("nf-md-selection_marker" . "\xf1283")
+    ("nf-md-selection_multiple" . "\xf1285")
+    ("nf-md-selection_multiple_marker" . "\xf1284")
+    ("nf-md-selection_off" . "\xf0777")
+    ("nf-md-selection_remove" . "\xf17c3")
+    ("nf-md-selection_search" . "\xf1205")
+    ("nf-md-semantic_web" . "\xf1316")
+    ("nf-md-send" . "\xf048a")
+    ("nf-md-send_check" . "\xf1161")
+    ("nf-md-send_check_outline" . "\xf1162")
+    ("nf-md-send_circle" . "\xf0df8")
+    ("nf-md-send_circle_outline" . "\xf0df9")
+    ("nf-md-send_clock" . "\xf1163")
+    ("nf-md-send_clock_outline" . "\xf1164")
+    ("nf-md-send_lock" . "\xf07ed")
+    ("nf-md-send_lock_outline" . "\xf1166")
+    ("nf-md-send_outline" . "\xf1165")
+    ("nf-md-serial_port" . "\xf065c")
+    ("nf-md-server" . "\xf048b")
+    ("nf-md-server_minus" . "\xf048c")
+    ("nf-md-server_network" . "\xf048d")
+    ("nf-md-server_network_off" . "\xf048e")
+    ("nf-md-server_off" . "\xf048f")
+    ("nf-md-server_plus" . "\xf0490")
+    ("nf-md-server_remove" . "\xf0491")
+    ("nf-md-server_security" . "\xf0492")
+    ("nf-md-set_all" . "\xf0778")
+    ("nf-md-set_center" . "\xf0779")
+    ("nf-md-set_center_right" . "\xf077a")
+    ("nf-md-set_left" . "\xf077b")
+    ("nf-md-set_left_center" . "\xf077c")
+    ("nf-md-set_left_right" . "\xf077d")
+    ("nf-md-set_merge" . "\xf14e0")
+    ("nf-md-set_none" . "\xf077e")
+    ("nf-md-set_right" . "\xf077f")
+    ("nf-md-set_split" . "\xf14e1")
+    ("nf-md-set_square" . "\xf145d")
+    ("nf-md-set_top_box" . "\xf099f")
+    ("nf-md-settings_helper" . "\xf0a6e")
+    ("nf-md-shaker" . "\xf110e")
+    ("nf-md-shaker_outline" . "\xf110f")
+    ("nf-md-shape" . "\xf0831")
+    ("nf-md-shape_circle_plus" . "\xf065d")
+    ("nf-md-shape_outline" . "\xf0832")
+    ("nf-md-shape_oval_plus" . "\xf11fa")
+    ("nf-md-shape_plus" . "\xf0495")
+    ("nf-md-shape_polygon_plus" . "\xf065e")
+    ("nf-md-shape_rectangle_plus" . "\xf065f")
+    ("nf-md-shape_square_plus" . "\xf0660")
+    ("nf-md-shape_square_rounded_plus" . "\xf14fa")
+    ("nf-md-share" . "\xf0496")
+    ("nf-md-share_all" . "\xf11f4")
+    ("nf-md-share_all_outline" . "\xf11f5")
+    ("nf-md-share_circle" . "\xf11ad")
+    ("nf-md-share_off" . "\xf0f23")
+    ("nf-md-share_off_outline" . "\xf0f24")
+    ("nf-md-share_outline" . "\xf0932")
+    ("nf-md-share_variant" . "\xf0497")
+    ("nf-md-share_variant_outline" . "\xf1514")
+    ("nf-md-shark" . "\xf18ba")
+    ("nf-md-shark_fin" . "\xf1673")
+    ("nf-md-shark_fin_outline" . "\xf1674")
+    ("nf-md-shark_off" . "\xf18bb")
+    ("nf-md-sheep" . "\xf0cc6")
+    ("nf-md-shield" . "\xf0498")
+    ("nf-md-shield_account" . "\xf088f")
+    ("nf-md-shield_account_outline" . "\xf0a12")
+    ("nf-md-shield_account_variant" . "\xf15a7")
+    ("nf-md-shield_account_variant_outline" . "\xf15a8")
+    ("nf-md-shield_airplane" . "\xf06bb")
+    ("nf-md-shield_airplane_outline" . "\xf0cc7")
+    ("nf-md-shield_alert" . "\xf0ecc")
+    ("nf-md-shield_alert_outline" . "\xf0ecd")
+    ("nf-md-shield_bug" . "\xf13da")
+    ("nf-md-shield_bug_outline" . "\xf13db")
+    ("nf-md-shield_car" . "\xf0f83")
+    ("nf-md-shield_check" . "\xf0565")
+    ("nf-md-shield_check_outline" . "\xf0cc8")
+    ("nf-md-shield_cross" . "\xf0cc9")
+    ("nf-md-shield_cross_outline" . "\xf0cca")
+    ("nf-md-shield_crown" . "\xf18bc")
+    ("nf-md-shield_crown_outline" . "\xf18bd")
+    ("nf-md-shield_edit" . "\xf11a0")
+    ("nf-md-shield_edit_outline" . "\xf11a1")
+    ("nf-md-shield_half" . "\xf1360")
+    ("nf-md-shield_half_full" . "\xf0780")
+    ("nf-md-shield_home" . "\xf068a")
+    ("nf-md-shield_home_outline" . "\xf0ccb")
+    ("nf-md-shield_key" . "\xf0bc4")
+    ("nf-md-shield_key_outline" . "\xf0bc5")
+    ("nf-md-shield_link_variant" . "\xf0d33")
+    ("nf-md-shield_link_variant_outline" . "\xf0d34")
+    ("nf-md-shield_lock" . "\xf099d")
+    ("nf-md-shield_lock_open" . "\xf199a")
+    ("nf-md-shield_lock_open_outline" . "\xf199b")
+    ("nf-md-shield_lock_outline" . "\xf0ccc")
+    ("nf-md-shield_moon" . "\xf1828")
+    ("nf-md-shield_moon_outline" . "\xf1829")
+    ("nf-md-shield_off" . "\xf099e")
+    ("nf-md-shield_off_outline" . "\xf099c")
+    ("nf-md-shield_outline" . "\xf0499")
+    ("nf-md-shield_plus" . "\xf0ada")
+    ("nf-md-shield_plus_outline" . "\xf0adb")
+    ("nf-md-shield_refresh" . "\xf00aa")
+    ("nf-md-shield_refresh_outline" . "\xf01e0")
+    ("nf-md-shield_remove" . "\xf0adc")
+    ("nf-md-shield_remove_outline" . "\xf0add")
+    ("nf-md-shield_search" . "\xf0d9a")
+    ("nf-md-shield_star" . "\xf113b")
+    ("nf-md-shield_star_outline" . "\xf113c")
+    ("nf-md-shield_sun" . "\xf105d")
+    ("nf-md-shield_sun_outline" . "\xf105e")
+    ("nf-md-shield_sword" . "\xf18be")
+    ("nf-md-shield_sword_outline" . "\xf18bf")
+    ("nf-md-shield_sync" . "\xf11a2")
+    ("nf-md-shield_sync_outline" . "\xf11a3")
+    ("nf-md-shimmer" . "\xf1545")
+    ("nf-md-ship_wheel" . "\xf0833")
+    ("nf-md-shipping_pallet" . "\xf184e")
+    ("nf-md-shoe_ballet" . "\xf15ca")
+    ("nf-md-shoe_cleat" . "\xf15c7")
+    ("nf-md-shoe_formal" . "\xf0b47")
+    ("nf-md-shoe_heel" . "\xf0b48")
+    ("nf-md-shoe_print" . "\xf0dfa")
+    ("nf-md-shoe_sneaker" . "\xf15c8")
+    ("nf-md-shopping" . "\xf049a")
+    ("nf-md-shopping_music" . "\xf049b")
+    ("nf-md-shopping_outline" . "\xf11d5")
+    ("nf-md-shopping_search" . "\xf0f84")
+    ("nf-md-shopping_search_outline" . "\xf1a6f")
+    ("nf-md-shore" . "\xf14f9")
+    ("nf-md-shovel" . "\xf0710")
+    ("nf-md-shovel_off" . "\xf0711")
+    ("nf-md-shower" . "\xf09a0")
+    ("nf-md-shower_head" . "\xf09a1")
+    ("nf-md-shredder" . "\xf049c")
+    ("nf-md-shuffle" . "\xf049d")
+    ("nf-md-shuffle_disabled" . "\xf049e")
+    ("nf-md-shuffle_variant" . "\xf049f")
+    ("nf-md-shuriken" . "\xf137f")
+    ("nf-md-sickle" . "\xf18c0")
+    ("nf-md-sigma" . "\xf04a0")
+    ("nf-md-sigma_lower" . "\xf062b")
+    ("nf-md-sign_caution" . "\xf04a1")
+    ("nf-md-sign_direction" . "\xf0781")
+    ("nf-md-sign_direction_minus" . "\xf1000")
+    ("nf-md-sign_direction_plus" . "\xf0fdc")
+    ("nf-md-sign_direction_remove" . "\xf0fdd")
+    ("nf-md-sign_pole" . "\xf14f8")
+    ("nf-md-sign_real_estate" . "\xf1118")
+    ("nf-md-sign_text" . "\xf0782")
+    ("nf-md-signal" . "\xf04a2")
+    ("nf-md-signal_2g" . "\xf0712")
+    ("nf-md-signal_3g" . "\xf0713")
+    ("nf-md-signal_4g" . "\xf0714")
+    ("nf-md-signal_5g" . "\xf0a6f")
+    ("nf-md-signal_cellular_1" . "\xf08bc")
+    ("nf-md-signal_cellular_2" . "\xf08bd")
+    ("nf-md-signal_cellular_3" . "\xf08be")
+    ("nf-md-signal_cellular_outline" . "\xf08bf")
+    ("nf-md-signal_distance_variant" . "\xf0e64")
+    ("nf-md-signal_hspa" . "\xf0715")
+    ("nf-md-signal_hspa_plus" . "\xf0716")
+    ("nf-md-signal_off" . "\xf0783")
+    ("nf-md-signal_variant" . "\xf060a")
+    ("nf-md-signature" . "\xf0dfb")
+    ("nf-md-signature_freehand" . "\xf0dfc")
+    ("nf-md-signature_image" . "\xf0dfd")
+    ("nf-md-signature_text" . "\xf0dfe")
+    ("nf-md-silo" . "\xf0b49")
+    ("nf-md-silverware" . "\xf04a3")
+    ("nf-md-silverware_clean" . "\xf0fde")
+    ("nf-md-silverware_fork" . "\xf04a4")
+    ("nf-md-silverware_fork_knife" . "\xf0a70")
+    ("nf-md-silverware_spoon" . "\xf04a5")
+    ("nf-md-silverware_variant" . "\xf04a6")
+    ("nf-md-sim" . "\xf04a7")
+    ("nf-md-sim_alert" . "\xf04a8")
+    ("nf-md-sim_alert_outline" . "\xf15d3")
+    ("nf-md-sim_off" . "\xf04a9")
+    ("nf-md-sim_off_outline" . "\xf15d4")
+    ("nf-md-sim_outline" . "\xf15d5")
+    ("nf-md-simple_icons" . "\xf131d")
+    ("nf-md-sina_weibo" . "\xf0adf")
+    ("nf-md-sine_wave" . "\xf095b")
+    ("nf-md-sitemap" . "\xf04aa")
+    ("nf-md-sitemap_outline" . "\xf199c")
+    ("nf-md-size_l" . "\xf13a6")
+    ("nf-md-size_m" . "\xf13a5")
+    ("nf-md-size_s" . "\xf13a4")
+    ("nf-md-size_xl" . "\xf13a7")
+    ("nf-md-size_xs" . "\xf13a3")
+    ("nf-md-size_xxl" . "\xf13a8")
+    ("nf-md-size_xxs" . "\xf13a2")
+    ("nf-md-size_xxxl" . "\xf13a9")
+    ("nf-md-skate" . "\xf0d35")
+    ("nf-md-skate_off" . "\xf0699")
+    ("nf-md-skateboard" . "\xf14c2")
+    ("nf-md-skateboarding" . "\xf0501")
+    ("nf-md-skew_less" . "\xf0d36")
+    ("nf-md-skew_more" . "\xf0d37")
+    ("nf-md-ski" . "\xf1304")
+    ("nf-md-ski_cross_country" . "\xf1305")
+    ("nf-md-ski_water" . "\xf1306")
+    ("nf-md-skip_backward" . "\xf04ab")
+    ("nf-md-skip_backward_outline" . "\xf0f25")
+    ("nf-md-skip_forward" . "\xf04ac")
+    ("nf-md-skip_forward_outline" . "\xf0f26")
+    ("nf-md-skip_next" . "\xf04ad")
+    ("nf-md-skip_next_circle" . "\xf0661")
+    ("nf-md-skip_next_circle_outline" . "\xf0662")
+    ("nf-md-skip_next_outline" . "\xf0f27")
+    ("nf-md-skip_previous" . "\xf04ae")
+    ("nf-md-skip_previous_circle" . "\xf0663")
+    ("nf-md-skip_previous_circle_outline" . "\xf0664")
+    ("nf-md-skip_previous_outline" . "\xf0f28")
+    ("nf-md-skull" . "\xf068c")
+    ("nf-md-skull_crossbones" . "\xf0bc6")
+    ("nf-md-skull_crossbones_outline" . "\xf0bc7")
+    ("nf-md-skull_outline" . "\xf0bc8")
+    ("nf-md-skull_scan" . "\xf14c7")
+    ("nf-md-skull_scan_outline" . "\xf14c8")
+    ("nf-md-skype" . "\xf04af")
+    ("nf-md-skype_business" . "\xf04b0")
+    ("nf-md-slack" . "\xf04b1")
+    ("nf-md-slash_forward" . "\xf0fdf")
+    ("nf-md-slash_forward_box" . "\xf0fe0")
+    ("nf-md-sledding" . "\xf041b")
+    ("nf-md-sleep" . "\xf04b2")
+    ("nf-md-sleep_off" . "\xf04b3")
+    ("nf-md-slide" . "\xf15a5")
+    ("nf-md-slope_downhill" . "\xf0dff")
+    ("nf-md-slope_uphill" . "\xf0e00")
+    ("nf-md-slot_machine" . "\xf1114")
+    ("nf-md-slot_machine_outline" . "\xf1115")
+    ("nf-md-smart_card" . "\xf10bd")
+    ("nf-md-smart_card_off" . "\xf18f7")
+    ("nf-md-smart_card_off_outline" . "\xf18f8")
+    ("nf-md-smart_card_outline" . "\xf10be")
+    ("nf-md-smart_card_reader" . "\xf10bf")
+    ("nf-md-smart_card_reader_outline" . "\xf10c0")
+    ("nf-md-smog" . "\xf0a71")
+    ("nf-md-smoke" . "\xf1799")
+    ("nf-md-smoke_detector" . "\xf0392")
+    ("nf-md-smoke_detector_alert" . "\xf192e")
+    ("nf-md-smoke_detector_alert_outline" . "\xf192f")
+    ("nf-md-smoke_detector_off" . "\xf1809")
+    ("nf-md-smoke_detector_off_outline" . "\xf180a")
+    ("nf-md-smoke_detector_outline" . "\xf1808")
+    ("nf-md-smoke_detector_variant" . "\xf180b")
+    ("nf-md-smoke_detector_variant_alert" . "\xf1930")
+    ("nf-md-smoke_detector_variant_off" . "\xf180c")
+    ("nf-md-smoking" . "\xf04b4")
+    ("nf-md-smoking_off" . "\xf04b5")
+    ("nf-md-smoking_pipe" . "\xf140d")
+    ("nf-md-smoking_pipe_off" . "\xf1428")
+    ("nf-md-snail" . "\xf1677")
+    ("nf-md-snake" . "\xf150e")
+    ("nf-md-snapchat" . "\xf04b6")
+    ("nf-md-snowboard" . "\xf1307")
+    ("nf-md-snowflake" . "\xf0717")
+    ("nf-md-snowflake_alert" . "\xf0f29")
+    ("nf-md-snowflake_check" . "\xf1a70")
+    ("nf-md-snowflake_melt" . "\xf12cb")
+    ("nf-md-snowflake_off" . "\xf14e3")
+    ("nf-md-snowflake_thermometer" . "\xf1a71")
+    ("nf-md-snowflake_variant" . "\xf0f2a")
+    ("nf-md-snowman" . "\xf04b7")
+    ("nf-md-snowmobile" . "\xf06dd")
+    ("nf-md-snowshoeing" . "\xf1a72")
+    ("nf-md-soccer" . "\xf04b8")
+    ("nf-md-soccer_field" . "\xf0834")
+    ("nf-md-social_distance_2_meters" . "\xf1579")
+    ("nf-md-social_distance_6_feet" . "\xf157a")
+    ("nf-md-sofa" . "\xf04b9")
+    ("nf-md-sofa_outline" . "\xf156d")
+    ("nf-md-sofa_single" . "\xf156e")
+    ("nf-md-sofa_single_outline" . "\xf156f")
+    ("nf-md-solar_panel" . "\xf0d9b")
+    ("nf-md-solar_panel_large" . "\xf0d9c")
+    ("nf-md-solar_power" . "\xf0a72")
+    ("nf-md-solar_power_variant" . "\xf1a73")
+    ("nf-md-solar_power_variant_outline" . "\xf1a74")
+    ("nf-md-soldering_iron" . "\xf1092")
+    ("nf-md-solid" . "\xf068d")
+    ("nf-md-sony_playstation" . "\xf0414")
+    ("nf-md-sort" . "\xf04ba")
+    ("nf-md-sort_alphabetical_ascending" . "\xf05bd")
+    ("nf-md-sort_alphabetical_ascending_variant" . "\xf1148")
+    ("nf-md-sort_alphabetical_descending" . "\xf05bf")
+    ("nf-md-sort_alphabetical_descending_variant" . "\xf1149")
+    ("nf-md-sort_alphabetical_variant" . "\xf04bb")
+    ("nf-md-sort_ascending" . "\xf04bc")
+    ("nf-md-sort_bool_ascending" . "\xf1385")
+    ("nf-md-sort_bool_ascending_variant" . "\xf1386")
+    ("nf-md-sort_bool_descending" . "\xf1387")
+    ("nf-md-sort_bool_descending_variant" . "\xf1388")
+    ("nf-md-sort_calendar_ascending" . "\xf1547")
+    ("nf-md-sort_calendar_descending" . "\xf1548")
+    ("nf-md-sort_clock_ascending" . "\xf1549")
+    ("nf-md-sort_clock_ascending_outline" . "\xf154a")
+    ("nf-md-sort_clock_descending" . "\xf154b")
+    ("nf-md-sort_clock_descending_outline" . "\xf154c")
+    ("nf-md-sort_descending" . "\xf04bd")
+    ("nf-md-sort_numeric_ascending" . "\xf1389")
+    ("nf-md-sort_numeric_ascending_variant" . "\xf090d")
+    ("nf-md-sort_numeric_descending" . "\xf138a")
+    ("nf-md-sort_numeric_descending_variant" . "\xf0ad2")
+    ("nf-md-sort_numeric_variant" . "\xf04be")
+    ("nf-md-sort_reverse_variant" . "\xf033c")
+    ("nf-md-sort_variant" . "\xf04bf")
+    ("nf-md-sort_variant_lock" . "\xf0ccd")
+    ("nf-md-sort_variant_lock_open" . "\xf0cce")
+    ("nf-md-sort_variant_off" . "\xf1abb")
+    ("nf-md-sort_variant_remove" . "\xf1147")
+    ("nf-md-soundbar" . "\xf17db")
+    ("nf-md-soundcloud" . "\xf04c0")
+    ("nf-md-source_branch" . "\xf062c")
+    ("nf-md-source_branch_check" . "\xf14cf")
+    ("nf-md-source_branch_minus" . "\xf14cb")
+    ("nf-md-source_branch_plus" . "\xf14ca")
+    ("nf-md-source_branch_refresh" . "\xf14cd")
+    ("nf-md-source_branch_remove" . "\xf14cc")
+    ("nf-md-source_branch_sync" . "\xf14ce")
+    ("nf-md-source_commit" . "\xf0718")
+    ("nf-md-source_commit_end" . "\xf0719")
+    ("nf-md-source_commit_end_local" . "\xf071a")
+    ("nf-md-source_commit_local" . "\xf071b")
+    ("nf-md-source_commit_next_local" . "\xf071c")
+    ("nf-md-source_commit_start" . "\xf071d")
+    ("nf-md-source_commit_start_next_local" . "\xf071e")
+    ("nf-md-source_fork" . "\xf04c1")
+    ("nf-md-source_merge" . "\xf062d")
+    ("nf-md-source_pull" . "\xf04c2")
+    ("nf-md-source_repository" . "\xf0ccf")
+    ("nf-md-source_repository_multiple" . "\xf0cd0")
+    ("nf-md-soy_sauce" . "\xf07ee")
+    ("nf-md-soy_sauce_off" . "\xf13fc")
+    ("nf-md-spa" . "\xf0cd1")
+    ("nf-md-spa_outline" . "\xf0cd2")
+    ("nf-md-space_invaders" . "\xf0bc9")
+    ("nf-md-space_station" . "\xf1383")
+    ("nf-md-spade" . "\xf0e65")
+    ("nf-md-speaker" . "\xf04c3")
+    ("nf-md-speaker_bluetooth" . "\xf09a2")
+    ("nf-md-speaker_multiple" . "\xf0d38")
+    ("nf-md-speaker_off" . "\xf04c4")
+    ("nf-md-speaker_wireless" . "\xf071f")
+    ("nf-md-spear" . "\xf1845")
+    ("nf-md-speedometer" . "\xf04c5")
+    ("nf-md-speedometer_medium" . "\xf0f85")
+    ("nf-md-speedometer_slow" . "\xf0f86")
+    ("nf-md-spellcheck" . "\xf04c6")
+    ("nf-md-sphere" . "\xf1954")
+    ("nf-md-sphere_off" . "\xf1955")
+    ("nf-md-spider" . "\xf11ea")
+    ("nf-md-spider_thread" . "\xf11eb")
+    ("nf-md-spider_web" . "\xf0bca")
+    ("nf-md-spirit_level" . "\xf14f1")
+    ("nf-md-spoon_sugar" . "\xf1429")
+    ("nf-md-spotify" . "\xf04c7")
+    ("nf-md-spotlight" . "\xf04c8")
+    ("nf-md-spotlight_beam" . "\xf04c9")
+    ("nf-md-spray" . "\xf0665")
+    ("nf-md-spray_bottle" . "\xf0ae0")
+    ("nf-md-sprinkler" . "\xf105f")
+    ("nf-md-sprinkler_fire" . "\xf199d")
+    ("nf-md-sprinkler_variant" . "\xf1060")
+    ("nf-md-sprout" . "\xf0e66")
+    ("nf-md-sprout_outline" . "\xf0e67")
+    ("nf-md-square" . "\xf0764")
+    ("nf-md-square_circle" . "\xf1500")
+    ("nf-md-square_edit_outline" . "\xf090c")
+    ("nf-md-square_medium" . "\xf0a13")
+    ("nf-md-square_medium_outline" . "\xf0a14")
+    ("nf-md-square_off" . "\xf12ee")
+    ("nf-md-square_off_outline" . "\xf12ef")
+    ("nf-md-square_opacity" . "\xf1854")
+    ("nf-md-square_outline" . "\xf0763")
+    ("nf-md-square_root" . "\xf0784")
+    ("nf-md-square_root_box" . "\xf09a3")
+    ("nf-md-square_rounded" . "\xf14fb")
+    ("nf-md-square_rounded_badge" . "\xf1a07")
+    ("nf-md-square_rounded_badge_outline" . "\xf1a08")
+    ("nf-md-square_rounded_outline" . "\xf14fc")
+    ("nf-md-square_small" . "\xf0a15")
+    ("nf-md-square_wave" . "\xf147b")
+    ("nf-md-squeegee" . "\xf0ae1")
+    ("nf-md-ssh" . "\xf08c0")
+    ("nf-md-stack_exchange" . "\xf060b")
+    ("nf-md-stack_overflow" . "\xf04cc")
+    ("nf-md-stackpath" . "\xf0359")
+    ("nf-md-stadium" . "\xf0ff9")
+    ("nf-md-stadium_variant" . "\xf0720")
+    ("nf-md-stairs" . "\xf04cd")
+    ("nf-md-stairs_box" . "\xf139e")
+    ("nf-md-stairs_down" . "\xf12be")
+    ("nf-md-stairs_up" . "\xf12bd")
+    ("nf-md-stamper" . "\xf0d39")
+    ("nf-md-standard_definition" . "\xf07ef")
+    ("nf-md-star" . "\xf04ce")
+    ("nf-md-star_box" . "\xf0a73")
+    ("nf-md-star_box_multiple" . "\xf1286")
+    ("nf-md-star_box_multiple_outline" . "\xf1287")
+    ("nf-md-star_box_outline" . "\xf0a74")
+    ("nf-md-star_check" . "\xf1566")
+    ("nf-md-star_check_outline" . "\xf156a")
+    ("nf-md-star_circle" . "\xf04cf")
+    ("nf-md-star_circle_outline" . "\xf09a4")
+    ("nf-md-star_cog" . "\xf1668")
+    ("nf-md-star_cog_outline" . "\xf1669")
+    ("nf-md-star_crescent" . "\xf0979")
+    ("nf-md-star_david" . "\xf097a")
+    ("nf-md-star_face" . "\xf09a5")
+    ("nf-md-star_four_points" . "\xf0ae2")
+    ("nf-md-star_four_points_outline" . "\xf0ae3")
+    ("nf-md-star_half" . "\xf0246")
+    ("nf-md-star_half_full" . "\xf04d0")
+    ("nf-md-star_minus" . "\xf1564")
+    ("nf-md-star_minus_outline" . "\xf1568")
+    ("nf-md-star_off" . "\xf04d1")
+    ("nf-md-star_off_outline" . "\xf155b")
+    ("nf-md-star_outline" . "\xf04d2")
+    ("nf-md-star_plus" . "\xf1563")
+    ("nf-md-star_plus_outline" . "\xf1567")
+    ("nf-md-star_remove" . "\xf1565")
+    ("nf-md-star_remove_outline" . "\xf1569")
+    ("nf-md-star_settings" . "\xf166a")
+    ("nf-md-star_settings_outline" . "\xf166b")
+    ("nf-md-star_shooting" . "\xf1741")
+    ("nf-md-star_shooting_outline" . "\xf1742")
+    ("nf-md-star_three_points" . "\xf0ae4")
+    ("nf-md-star_three_points_outline" . "\xf0ae5")
+    ("nf-md-state_machine" . "\xf11ef")
+    ("nf-md-steam" . "\xf04d3")
+    ("nf-md-steering" . "\xf04d4")
+    ("nf-md-steering_off" . "\xf090e")
+    ("nf-md-step_backward" . "\xf04d5")
+    ("nf-md-step_backward_2" . "\xf04d6")
+    ("nf-md-step_forward" . "\xf04d7")
+    ("nf-md-step_forward_2" . "\xf04d8")
+    ("nf-md-stethoscope" . "\xf04d9")
+    ("nf-md-sticker" . "\xf1364")
+    ("nf-md-sticker_alert" . "\xf1365")
+    ("nf-md-sticker_alert_outline" . "\xf1366")
+    ("nf-md-sticker_check" . "\xf1367")
+    ("nf-md-sticker_check_outline" . "\xf1368")
+    ("nf-md-sticker_circle_outline" . "\xf05d0")
+    ("nf-md-sticker_emoji" . "\xf0785")
+    ("nf-md-sticker_minus" . "\xf1369")
+    ("nf-md-sticker_minus_outline" . "\xf136a")
+    ("nf-md-sticker_outline" . "\xf136b")
+    ("nf-md-sticker_plus" . "\xf136c")
+    ("nf-md-sticker_plus_outline" . "\xf136d")
+    ("nf-md-sticker_remove" . "\xf136e")
+    ("nf-md-sticker_remove_outline" . "\xf136f")
+    ("nf-md-sticker_text" . "\xf178e")
+    ("nf-md-sticker_text_outline" . "\xf178f")
+    ("nf-md-stocking" . "\xf04da")
+    ("nf-md-stomach" . "\xf1093")
+    ("nf-md-stool" . "\xf195d")
+    ("nf-md-stool_outline" . "\xf195e")
+    ("nf-md-stop" . "\xf04db")
+    ("nf-md-stop_circle" . "\xf0666")
+    ("nf-md-stop_circle_outline" . "\xf0667")
+    ("nf-md-storage_tank" . "\xf1a75")
+    ("nf-md-storage_tank_outline" . "\xf1a76")
+    ("nf-md-store" . "\xf04dc")
+    ("nf-md-store_24_hour" . "\xf04dd")
+    ("nf-md-store_alert" . "\xf18c1")
+    ("nf-md-store_alert_outline" . "\xf18c2")
+    ("nf-md-store_check" . "\xf18c3")
+    ("nf-md-store_check_outline" . "\xf18c4")
+    ("nf-md-store_clock" . "\xf18c5")
+    ("nf-md-store_clock_outline" . "\xf18c6")
+    ("nf-md-store_cog" . "\xf18c7")
+    ("nf-md-store_cog_outline" . "\xf18c8")
+    ("nf-md-store_edit" . "\xf18c9")
+    ("nf-md-store_edit_outline" . "\xf18ca")
+    ("nf-md-store_marker" . "\xf18cb")
+    ("nf-md-store_marker_outline" . "\xf18cc")
+    ("nf-md-store_minus" . "\xf165e")
+    ("nf-md-store_minus_outline" . "\xf18cd")
+    ("nf-md-store_off" . "\xf18ce")
+    ("nf-md-store_off_outline" . "\xf18cf")
+    ("nf-md-store_outline" . "\xf1361")
+    ("nf-md-store_plus" . "\xf165f")
+    ("nf-md-store_plus_outline" . "\xf18d0")
+    ("nf-md-store_remove" . "\xf1660")
+    ("nf-md-store_remove_outline" . "\xf18d1")
+    ("nf-md-store_search" . "\xf18d2")
+    ("nf-md-store_search_outline" . "\xf18d3")
+    ("nf-md-store_settings" . "\xf18d4")
+    ("nf-md-store_settings_outline" . "\xf18d5")
+    ("nf-md-storefront" . "\xf07c7")
+    ("nf-md-storefront_outline" . "\xf10c1")
+    ("nf-md-stove" . "\xf04de")
+    ("nf-md-strategy" . "\xf11d6")
+    ("nf-md-stretch_to_page" . "\xf0f2b")
+    ("nf-md-stretch_to_page_outline" . "\xf0f2c")
+    ("nf-md-string_lights" . "\xf12ba")
+    ("nf-md-string_lights_off" . "\xf12bb")
+    ("nf-md-subdirectory_arrow_left" . "\xf060c")
+    ("nf-md-subdirectory_arrow_right" . "\xf060d")
+    ("nf-md-submarine" . "\xf156c")
+    ("nf-md-subtitles" . "\xf0a16")
+    ("nf-md-subtitles_outline" . "\xf0a17")
+    ("nf-md-subway" . "\xf06ac")
+    ("nf-md-subway_alert_variant" . "\xf0d9d")
+    ("nf-md-subway_variant" . "\xf04df")
+    ("nf-md-summit" . "\xf0786")
+    ("nf-md-sun_clock" . "\xf1a77")
+    ("nf-md-sun_clock_outline" . "\xf1a78")
+    ("nf-md-sun_compass" . "\xf19a5")
+    ("nf-md-sun_snowflake" . "\xf1796")
+    ("nf-md-sun_snowflake_variant" . "\xf1a79")
+    ("nf-md-sun_thermometer" . "\xf18d6")
+    ("nf-md-sun_thermometer_outline" . "\xf18d7")
+    ("nf-md-sun_wireless" . "\xf17fe")
+    ("nf-md-sun_wireless_outline" . "\xf17ff")
+    ("nf-md-sunglasses" . "\xf04e0")
+    ("nf-md-surfing" . "\xf1746")
+    ("nf-md-surround_sound" . "\xf05c5")
+    ("nf-md-surround_sound_2_0" . "\xf07f0")
+    ("nf-md-surround_sound_2_1" . "\xf1729")
+    ("nf-md-surround_sound_3_1" . "\xf07f1")
+    ("nf-md-surround_sound_5_1" . "\xf07f2")
+    ("nf-md-surround_sound_5_1_2" . "\xf172a")
+    ("nf-md-surround_sound_7_1" . "\xf07f3")
+    ("nf-md-svg" . "\xf0721")
+    ("nf-md-swap_horizontal" . "\xf04e1")
+    ("nf-md-swap_horizontal_bold" . "\xf0bcd")
+    ("nf-md-swap_horizontal_circle" . "\xf0fe1")
+    ("nf-md-swap_horizontal_circle_outline" . "\xf0fe2")
+    ("nf-md-swap_horizontal_variant" . "\xf08c1")
+    ("nf-md-swap_vertical" . "\xf04e2")
+    ("nf-md-swap_vertical_bold" . "\xf0bce")
+    ("nf-md-swap_vertical_circle" . "\xf0fe3")
+    ("nf-md-swap_vertical_circle_outline" . "\xf0fe4")
+    ("nf-md-swap_vertical_variant" . "\xf08c2")
+    ("nf-md-swim" . "\xf04e3")
+    ("nf-md-switch" . "\xf04e4")
+    ("nf-md-sword" . "\xf04e5")
+    ("nf-md-sword_cross" . "\xf0787")
+    ("nf-md-syllabary_hangul" . "\xf1333")
+    ("nf-md-syllabary_hiragana" . "\xf1334")
+    ("nf-md-syllabary_katakana" . "\xf1335")
+    ("nf-md-syllabary_katakana_halfwidth" . "\xf1336")
+    ("nf-md-symbol" . "\xf1501")
+    ("nf-md-symfony" . "\xf0ae6")
+    ("nf-md-sync" . "\xf04e6")
+    ("nf-md-sync_alert" . "\xf04e7")
+    ("nf-md-sync_circle" . "\xf1378")
+    ("nf-md-sync_off" . "\xf04e8")
+    ("nf-md-tab" . "\xf04e9")
+    ("nf-md-tab_minus" . "\xf0b4b")
+    ("nf-md-tab_plus" . "\xf075c")
+    ("nf-md-tab_remove" . "\xf0b4c")
+    ("nf-md-tab_search" . "\xf199e")
+    ("nf-md-tab_unselected" . "\xf04ea")
+    ("nf-md-table" . "\xf04eb")
+    ("nf-md-table_account" . "\xf13b9")
+    ("nf-md-table_alert" . "\xf13ba")
+    ("nf-md-table_arrow_down" . "\xf13bb")
+    ("nf-md-table_arrow_left" . "\xf13bc")
+    ("nf-md-table_arrow_right" . "\xf13bd")
+    ("nf-md-table_arrow_up" . "\xf13be")
+    ("nf-md-table_border" . "\xf0a18")
+    ("nf-md-table_cancel" . "\xf13bf")
+    ("nf-md-table_chair" . "\xf1061")
+    ("nf-md-table_check" . "\xf13c0")
+    ("nf-md-table_clock" . "\xf13c1")
+    ("nf-md-table_cog" . "\xf13c2")
+    ("nf-md-table_column" . "\xf0835")
+    ("nf-md-table_column_plus_after" . "\xf04ec")
+    ("nf-md-table_column_plus_before" . "\xf04ed")
+    ("nf-md-table_column_remove" . "\xf04ee")
+    ("nf-md-table_column_width" . "\xf04ef")
+    ("nf-md-table_edit" . "\xf04f0")
+    ("nf-md-table_eye" . "\xf1094")
+    ("nf-md-table_eye_off" . "\xf13c3")
+    ("nf-md-table_furniture" . "\xf05bc")
+    ("nf-md-table_headers_eye" . "\xf121d")
+    ("nf-md-table_headers_eye_off" . "\xf121e")
+    ("nf-md-table_heart" . "\xf13c4")
+    ("nf-md-table_key" . "\xf13c5")
+    ("nf-md-table_large" . "\xf04f1")
+    ("nf-md-table_large_plus" . "\xf0f87")
+    ("nf-md-table_large_remove" . "\xf0f88")
+    ("nf-md-table_lock" . "\xf13c6")
+    ("nf-md-table_merge_cells" . "\xf09a6")
+    ("nf-md-table_minus" . "\xf13c7")
+    ("nf-md-table_multiple" . "\xf13c8")
+    ("nf-md-table_network" . "\xf13c9")
+    ("nf-md-table_of_contents" . "\xf0836")
+    ("nf-md-table_off" . "\xf13ca")
+    ("nf-md-table_picnic" . "\xf1743")
+    ("nf-md-table_pivot" . "\xf183c")
+    ("nf-md-table_plus" . "\xf0a75")
+    ("nf-md-table_refresh" . "\xf13a0")
+    ("nf-md-table_remove" . "\xf0a76")
+    ("nf-md-table_row" . "\xf0837")
+    ("nf-md-table_row_height" . "\xf04f2")
+    ("nf-md-table_row_plus_after" . "\xf04f3")
+    ("nf-md-table_row_plus_before" . "\xf04f4")
+    ("nf-md-table_row_remove" . "\xf04f5")
+    ("nf-md-table_search" . "\xf090f")
+    ("nf-md-table_settings" . "\xf0838")
+    ("nf-md-table_split_cell" . "\xf142a")
+    ("nf-md-table_star" . "\xf13cb")
+    ("nf-md-table_sync" . "\xf13a1")
+    ("nf-md-table_tennis" . "\xf0e68")
+    ("nf-md-tablet" . "\xf04f6")
+    ("nf-md-tablet_android" . "\xf04f7")
+    ("nf-md-tablet_cellphone" . "\xf09a7")
+    ("nf-md-tablet_dashboard" . "\xf0ece")
+    ("nf-md-taco" . "\xf0762")
+    ("nf-md-tag" . "\xf04f9")
+    ("nf-md-tag_arrow_down" . "\xf172b")
+    ("nf-md-tag_arrow_down_outline" . "\xf172c")
+    ("nf-md-tag_arrow_left" . "\xf172d")
+    ("nf-md-tag_arrow_left_outline" . "\xf172e")
+    ("nf-md-tag_arrow_right" . "\xf172f")
+    ("nf-md-tag_arrow_right_outline" . "\xf1730")
+    ("nf-md-tag_arrow_up" . "\xf1731")
+    ("nf-md-tag_arrow_up_outline" . "\xf1732")
+    ("nf-md-tag_check" . "\xf1a7a")
+    ("nf-md-tag_check_outline" . "\xf1a7b")
+    ("nf-md-tag_faces" . "\xf04fa")
+    ("nf-md-tag_heart" . "\xf068b")
+    ("nf-md-tag_heart_outline" . "\xf0bcf")
+    ("nf-md-tag_minus" . "\xf0910")
+    ("nf-md-tag_minus_outline" . "\xf121f")
+    ("nf-md-tag_multiple" . "\xf04fb")
+    ("nf-md-tag_multiple_outline" . "\xf12f7")
+    ("nf-md-tag_off" . "\xf1220")
+    ("nf-md-tag_off_outline" . "\xf1221")
+    ("nf-md-tag_outline" . "\xf04fc")
+    ("nf-md-tag_plus" . "\xf0722")
+    ("nf-md-tag_plus_outline" . "\xf1222")
+    ("nf-md-tag_remove" . "\xf0723")
+    ("nf-md-tag_remove_outline" . "\xf1223")
+    ("nf-md-tag_search" . "\xf1907")
+    ("nf-md-tag_search_outline" . "\xf1908")
+    ("nf-md-tag_text" . "\xf1224")
+    ("nf-md-tag_text_outline" . "\xf04fd")
+    ("nf-md-tailwind" . "\xf13ff")
+    ("nf-md-tally_mark_1" . "\xf1abc")
+    ("nf-md-tally_mark_2" . "\xf1abd")
+    ("nf-md-tally_mark_3" . "\xf1abe")
+    ("nf-md-tally_mark_4" . "\xf1abf")
+    ("nf-md-tally_mark_5" . "\xf1ac0")
+    ("nf-md-tangram" . "\xf04f8")
+    ("nf-md-tank" . "\xf0d3a")
+    ("nf-md-tanker_truck" . "\xf0fe5")
+    ("nf-md-tape_drive" . "\xf16df")
+    ("nf-md-tape_measure" . "\xf0b4d")
+    ("nf-md-target" . "\xf04fe")
+    ("nf-md-target_account" . "\xf0bd0")
+    ("nf-md-target_variant" . "\xf0a77")
+    ("nf-md-taxi" . "\xf04ff")
+    ("nf-md-tea" . "\xf0d9e")
+    ("nf-md-tea_outline" . "\xf0d9f")
+    ("nf-md-teamviewer" . "\xf0500")
+    ("nf-md-teddy_bear" . "\xf18fb")
+    ("nf-md-telescope" . "\xf0b4e")
+    ("nf-md-television" . "\xf0502")
+    ("nf-md-television_ambient_light" . "\xf1356")
+    ("nf-md-television_box" . "\xf0839")
+    ("nf-md-television_classic" . "\xf07f4")
+    ("nf-md-television_classic_off" . "\xf083a")
+    ("nf-md-television_guide" . "\xf0503")
+    ("nf-md-television_off" . "\xf083b")
+    ("nf-md-television_pause" . "\xf0f89")
+    ("nf-md-television_play" . "\xf0ecf")
+    ("nf-md-television_shimmer" . "\xf1110")
+    ("nf-md-television_stop" . "\xf0f8a")
+    ("nf-md-temperature_celsius" . "\xf0504")
+    ("nf-md-temperature_fahrenheit" . "\xf0505")
+    ("nf-md-temperature_kelvin" . "\xf0506")
+    ("nf-md-tennis" . "\xf0da0")
+    ("nf-md-tennis_ball" . "\xf0507")
+    ("nf-md-tent" . "\xf0508")
+    ("nf-md-terraform" . "\xf1062")
+    ("nf-md-test_tube" . "\xf0668")
+    ("nf-md-test_tube_empty" . "\xf0911")
+    ("nf-md-test_tube_off" . "\xf0912")
+    ("nf-md-text" . "\xf09a8")
+    ("nf-md-text_account" . "\xf1570")
+    ("nf-md-text_box" . "\xf021a")
+    ("nf-md-text_box_check" . "\xf0ea6")
+    ("nf-md-text_box_check_outline" . "\xf0ea7")
+    ("nf-md-text_box_edit" . "\xf1a7c")
+    ("nf-md-text_box_edit_outline" . "\xf1a7d")
+    ("nf-md-text_box_minus" . "\xf0ea8")
+    ("nf-md-text_box_minus_outline" . "\xf0ea9")
+    ("nf-md-text_box_multiple" . "\xf0ab7")
+    ("nf-md-text_box_multiple_outline" . "\xf0ab8")
+    ("nf-md-text_box_outline" . "\xf09ed")
+    ("nf-md-text_box_plus" . "\xf0eaa")
+    ("nf-md-text_box_plus_outline" . "\xf0eab")
+    ("nf-md-text_box_remove" . "\xf0eac")
+    ("nf-md-text_box_remove_outline" . "\xf0ead")
+    ("nf-md-text_box_search" . "\xf0eae")
+    ("nf-md-text_box_search_outline" . "\xf0eaf")
+    ("nf-md-text_long" . "\xf09aa")
+    ("nf-md-text_recognition" . "\xf113d")
+    ("nf-md-text_search" . "\xf13b8")
+    ("nf-md-text_search_variant" . "\xf1a7e")
+    ("nf-md-text_shadow" . "\xf0669")
+    ("nf-md-text_short" . "\xf09a9")
+    ("nf-md-text_to_speech" . "\xf050a")
+    ("nf-md-text_to_speech_off" . "\xf050b")
+    ("nf-md-texture" . "\xf050c")
+    ("nf-md-texture_box" . "\xf0fe6")
+    ("nf-md-theater" . "\xf050d")
+    ("nf-md-theme_light_dark" . "\xf050e")
+    ("nf-md-thermometer" . "\xf050f")
+    ("nf-md-thermometer_alert" . "\xf0e01")
+    ("nf-md-thermometer_bluetooth" . "\xf1895")
+    ("nf-md-thermometer_check" . "\xf1a7f")
+    ("nf-md-thermometer_chevron_down" . "\xf0e02")
+    ("nf-md-thermometer_chevron_up" . "\xf0e03")
+    ("nf-md-thermometer_high" . "\xf10c2")
+    ("nf-md-thermometer_lines" . "\xf0510")
+    ("nf-md-thermometer_low" . "\xf10c3")
+    ("nf-md-thermometer_minus" . "\xf0e04")
+    ("nf-md-thermometer_off" . "\xf1531")
+    ("nf-md-thermometer_plus" . "\xf0e05")
+    ("nf-md-thermometer_water" . "\xf1a80")
+    ("nf-md-thermostat" . "\xf0393")
+    ("nf-md-thermostat_box" . "\xf0891")
+    ("nf-md-thought_bubble" . "\xf07f6")
+    ("nf-md-thought_bubble_outline" . "\xf07f7")
+    ("nf-md-thumb_down" . "\xf0511")
+    ("nf-md-thumb_down_outline" . "\xf0512")
+    ("nf-md-thumb_up" . "\xf0513")
+    ("nf-md-thumb_up_outline" . "\xf0514")
+    ("nf-md-thumbs_up_down" . "\xf0515")
+    ("nf-md-thumbs_up_down_outline" . "\xf1914")
+    ("nf-md-ticket" . "\xf0516")
+    ("nf-md-ticket_account" . "\xf0517")
+    ("nf-md-ticket_confirmation" . "\xf0518")
+    ("nf-md-ticket_confirmation_outline" . "\xf13aa")
+    ("nf-md-ticket_outline" . "\xf0913")
+    ("nf-md-ticket_percent" . "\xf0724")
+    ("nf-md-ticket_percent_outline" . "\xf142b")
+    ("nf-md-tie" . "\xf0519")
+    ("nf-md-tilde" . "\xf0725")
+    ("nf-md-tilde_off" . "\xf18f3")
+    ("nf-md-timelapse" . "\xf051a")
+    ("nf-md-timeline" . "\xf0bd1")
+    ("nf-md-timeline_alert" . "\xf0f95")
+    ("nf-md-timeline_alert_outline" . "\xf0f98")
+    ("nf-md-timeline_check" . "\xf1532")
+    ("nf-md-timeline_check_outline" . "\xf1533")
+    ("nf-md-timeline_clock" . "\xf11fb")
+    ("nf-md-timeline_clock_outline" . "\xf11fc")
+    ("nf-md-timeline_help" . "\xf0f99")
+    ("nf-md-timeline_help_outline" . "\xf0f9a")
+    ("nf-md-timeline_minus" . "\xf1534")
+    ("nf-md-timeline_minus_outline" . "\xf1535")
+    ("nf-md-timeline_outline" . "\xf0bd2")
+    ("nf-md-timeline_plus" . "\xf0f96")
+    ("nf-md-timeline_plus_outline" . "\xf0f97")
+    ("nf-md-timeline_remove" . "\xf1536")
+    ("nf-md-timeline_remove_outline" . "\xf1537")
+    ("nf-md-timeline_text" . "\xf0bd3")
+    ("nf-md-timeline_text_outline" . "\xf0bd4")
+    ("nf-md-timer" . "\xf13ab")
+    ("nf-md-timer_10" . "\xf051c")
+    ("nf-md-timer_3" . "\xf051d")
+    ("nf-md-timer_alert" . "\xf1acc")
+    ("nf-md-timer_alert_outline" . "\xf1acd")
+    ("nf-md-timer_cancel" . "\xf1ace")
+    ("nf-md-timer_cancel_outline" . "\xf1acf")
+    ("nf-md-timer_check" . "\xf1ad0")
+    ("nf-md-timer_check_outline" . "\xf1ad1")
+    ("nf-md-timer_cog" . "\xf1925")
+    ("nf-md-timer_cog_outline" . "\xf1926")
+    ("nf-md-timer_edit" . "\xf1ad2")
+    ("nf-md-timer_edit_outline" . "\xf1ad3")
+    ("nf-md-timer_lock" . "\xf1ad4")
+    ("nf-md-timer_lock_open" . "\xf1ad5")
+    ("nf-md-timer_lock_open_outline" . "\xf1ad6")
+    ("nf-md-timer_lock_outline" . "\xf1ad7")
+    ("nf-md-timer_marker" . "\xf1ad8")
+    ("nf-md-timer_marker_outline" . "\xf1ad9")
+    ("nf-md-timer_minus" . "\xf1ada")
+    ("nf-md-timer_minus_outline" . "\xf1adb")
+    ("nf-md-timer_music" . "\xf1adc")
+    ("nf-md-timer_music_outline" . "\xf1add")
+    ("nf-md-timer_off" . "\xf13ac")
+    ("nf-md-timer_off_outline" . "\xf051e")
+    ("nf-md-timer_outline" . "\xf051b")
+    ("nf-md-timer_pause" . "\xf1ade")
+    ("nf-md-timer_pause_outline" . "\xf1adf")
+    ("nf-md-timer_play" . "\xf1ae0")
+    ("nf-md-timer_play_outline" . "\xf1ae1")
+    ("nf-md-timer_plus" . "\xf1ae2")
+    ("nf-md-timer_plus_outline" . "\xf1ae3")
+    ("nf-md-timer_refresh" . "\xf1ae4")
+    ("nf-md-timer_refresh_outline" . "\xf1ae5")
+    ("nf-md-timer_remove" . "\xf1ae6")
+    ("nf-md-timer_remove_outline" . "\xf1ae7")
+    ("nf-md-timer_sand" . "\xf051f")
+    ("nf-md-timer_sand_complete" . "\xf199f")
+    ("nf-md-timer_sand_empty" . "\xf06ad")
+    ("nf-md-timer_sand_full" . "\xf078c")
+    ("nf-md-timer_sand_paused" . "\xf19a0")
+    ("nf-md-timer_settings" . "\xf1923")
+    ("nf-md-timer_settings_outline" . "\xf1924")
+    ("nf-md-timer_star" . "\xf1ae8")
+    ("nf-md-timer_star_outline" . "\xf1ae9")
+    ("nf-md-timer_stop" . "\xf1aea")
+    ("nf-md-timer_stop_outline" . "\xf1aeb")
+    ("nf-md-timer_sync" . "\xf1aec")
+    ("nf-md-timer_sync_outline" . "\xf1aed")
+    ("nf-md-timetable" . "\xf0520")
+    ("nf-md-tire" . "\xf1896")
+    ("nf-md-toaster" . "\xf1063")
+    ("nf-md-toaster_off" . "\xf11b7")
+    ("nf-md-toaster_oven" . "\xf0cd3")
+    ("nf-md-toggle_switch" . "\xf0521")
+    ("nf-md-toggle_switch_off" . "\xf0522")
+    ("nf-md-toggle_switch_off_outline" . "\xf0a19")
+    ("nf-md-toggle_switch_outline" . "\xf0a1a")
+    ("nf-md-toggle_switch_variant" . "\xf1a25")
+    ("nf-md-toggle_switch_variant_off" . "\xf1a26")
+    ("nf-md-toilet" . "\xf09ab")
+    ("nf-md-toolbox" . "\xf09ac")
+    ("nf-md-toolbox_outline" . "\xf09ad")
+    ("nf-md-tools" . "\xf1064")
+    ("nf-md-tooltip" . "\xf0523")
+    ("nf-md-tooltip_account" . "\xf000c")
+    ("nf-md-tooltip_cellphone" . "\xf183b")
+    ("nf-md-tooltip_check" . "\xf155c")
+    ("nf-md-tooltip_check_outline" . "\xf155d")
+    ("nf-md-tooltip_edit" . "\xf0524")
+    ("nf-md-tooltip_edit_outline" . "\xf12c5")
+    ("nf-md-tooltip_image" . "\xf0525")
+    ("nf-md-tooltip_image_outline" . "\xf0bd5")
+    ("nf-md-tooltip_minus" . "\xf155e")
+    ("nf-md-tooltip_minus_outline" . "\xf155f")
+    ("nf-md-tooltip_outline" . "\xf0526")
+    ("nf-md-tooltip_plus" . "\xf0bd6")
+    ("nf-md-tooltip_plus_outline" . "\xf0527")
+    ("nf-md-tooltip_remove" . "\xf1560")
+    ("nf-md-tooltip_remove_outline" . "\xf1561")
+    ("nf-md-tooltip_text" . "\xf0528")
+    ("nf-md-tooltip_text_outline" . "\xf0bd7")
+    ("nf-md-tooth" . "\xf08c3")
+    ("nf-md-tooth_outline" . "\xf0529")
+    ("nf-md-toothbrush" . "\xf1129")
+    ("nf-md-toothbrush_electric" . "\xf112c")
+    ("nf-md-toothbrush_paste" . "\xf112a")
+    ("nf-md-torch" . "\xf1606")
+    ("nf-md-tortoise" . "\xf0d3b")
+    ("nf-md-toslink" . "\xf12b8")
+    ("nf-md-tournament" . "\xf09ae")
+    ("nf-md-tow_truck" . "\xf083c")
+    ("nf-md-tower_beach" . "\xf0681")
+    ("nf-md-tower_fire" . "\xf0682")
+    ("nf-md-town_hall" . "\xf1875")
+    ("nf-md-toy_brick" . "\xf1288")
+    ("nf-md-toy_brick_marker" . "\xf1289")
+    ("nf-md-toy_brick_marker_outline" . "\xf128a")
+    ("nf-md-toy_brick_minus" . "\xf128b")
+    ("nf-md-toy_brick_minus_outline" . "\xf128c")
+    ("nf-md-toy_brick_outline" . "\xf128d")
+    ("nf-md-toy_brick_plus" . "\xf128e")
+    ("nf-md-toy_brick_plus_outline" . "\xf128f")
+    ("nf-md-toy_brick_remove" . "\xf1290")
+    ("nf-md-toy_brick_remove_outline" . "\xf1291")
+    ("nf-md-toy_brick_search" . "\xf1292")
+    ("nf-md-toy_brick_search_outline" . "\xf1293")
+    ("nf-md-track_light" . "\xf0914")
+    ("nf-md-trackpad" . "\xf07f8")
+    ("nf-md-trackpad_lock" . "\xf0933")
+    ("nf-md-tractor" . "\xf0892")
+    ("nf-md-tractor_variant" . "\xf14c4")
+    ("nf-md-trademark" . "\xf0a78")
+    ("nf-md-traffic_cone" . "\xf137c")
+    ("nf-md-traffic_light" . "\xf052b")
+    ("nf-md-traffic_light_outline" . "\xf182a")
+    ("nf-md-train" . "\xf052c")
+    ("nf-md-train_car" . "\xf0bd8")
+    ("nf-md-train_car_passenger" . "\xf1733")
+    ("nf-md-train_car_passenger_door" . "\xf1734")
+    ("nf-md-train_car_passenger_door_open" . "\xf1735")
+    ("nf-md-train_car_passenger_variant" . "\xf1736")
+    ("nf-md-train_variant" . "\xf08c4")
+    ("nf-md-tram" . "\xf052d")
+    ("nf-md-tram_side" . "\xf0fe7")
+    ("nf-md-transcribe" . "\xf052e")
+    ("nf-md-transcribe_close" . "\xf052f")
+    ("nf-md-transfer" . "\xf1065")
+    ("nf-md-transfer_down" . "\xf0da1")
+    ("nf-md-transfer_left" . "\xf0da2")
+    ("nf-md-transfer_right" . "\xf0530")
+    ("nf-md-transfer_up" . "\xf0da3")
+    ("nf-md-transit_connection" . "\xf0d3c")
+    ("nf-md-transit_connection_horizontal" . "\xf1546")
+    ("nf-md-transit_connection_variant" . "\xf0d3d")
+    ("nf-md-transit_detour" . "\xf0f8b")
+    ("nf-md-transit_skip" . "\xf1515")
+    ("nf-md-transit_transfer" . "\xf06ae")
+    ("nf-md-transition" . "\xf0915")
+    ("nf-md-transition_masked" . "\xf0916")
+    ("nf-md-translate" . "\xf05ca")
+    ("nf-md-translate_off" . "\xf0e06")
+    ("nf-md-transmission_tower" . "\xf0d3e")
+    ("nf-md-transmission_tower_export" . "\xf192c")
+    ("nf-md-transmission_tower_import" . "\xf192d")
+    ("nf-md-transmission_tower_off" . "\xf19dd")
+    ("nf-md-trash_can" . "\xf0a79")
+    ("nf-md-trash_can_outline" . "\xf0a7a")
+    ("nf-md-tray" . "\xf1294")
+    ("nf-md-tray_alert" . "\xf1295")
+    ("nf-md-tray_arrow_down" . "\xf0120")
+    ("nf-md-tray_arrow_up" . "\xf011d")
+    ("nf-md-tray_full" . "\xf1296")
+    ("nf-md-tray_minus" . "\xf1297")
+    ("nf-md-tray_plus" . "\xf1298")
+    ("nf-md-tray_remove" . "\xf1299")
+    ("nf-md-treasure_chest" . "\xf0726")
+    ("nf-md-tree" . "\xf0531")
+    ("nf-md-tree_outline" . "\xf0e69")
+    ("nf-md-trello" . "\xf0532")
+    ("nf-md-trending_down" . "\xf0533")
+    ("nf-md-trending_neutral" . "\xf0534")
+    ("nf-md-trending_up" . "\xf0535")
+    ("nf-md-triangle" . "\xf0536")
+    ("nf-md-triangle_outline" . "\xf0537")
+    ("nf-md-triangle_small_down" . "\xf1a09")
+    ("nf-md-triangle_small_up" . "\xf1a0a")
+    ("nf-md-triangle_wave" . "\xf147c")
+    ("nf-md-triforce" . "\xf0bd9")
+    ("nf-md-trophy" . "\xf0538")
+    ("nf-md-trophy_award" . "\xf0539")
+    ("nf-md-trophy_broken" . "\xf0da4")
+    ("nf-md-trophy_outline" . "\xf053a")
+    ("nf-md-trophy_variant" . "\xf053b")
+    ("nf-md-trophy_variant_outline" . "\xf053c")
+    ("nf-md-truck" . "\xf053d")
+    ("nf-md-truck_alert" . "\xf19de")
+    ("nf-md-truck_alert_outline" . "\xf19df")
+    ("nf-md-truck_cargo_container" . "\xf18d8")
+    ("nf-md-truck_check" . "\xf0cd4")
+    ("nf-md-truck_check_outline" . "\xf129a")
+    ("nf-md-truck_delivery" . "\xf053e")
+    ("nf-md-truck_delivery_outline" . "\xf129b")
+    ("nf-md-truck_fast" . "\xf0788")
+    ("nf-md-truck_fast_outline" . "\xf129c")
+    ("nf-md-truck_flatbed" . "\xf1891")
+    ("nf-md-truck_minus" . "\xf19ae")
+    ("nf-md-truck_minus_outline" . "\xf19bd")
+    ("nf-md-truck_outline" . "\xf129d")
+    ("nf-md-truck_plus" . "\xf19ad")
+    ("nf-md-truck_plus_outline" . "\xf19bc")
+    ("nf-md-truck_remove" . "\xf19af")
+    ("nf-md-truck_remove_outline" . "\xf19be")
+    ("nf-md-truck_snowflake" . "\xf19a6")
+    ("nf-md-truck_trailer" . "\xf0727")
+    ("nf-md-trumpet" . "\xf1096")
+    ("nf-md-tshirt_crew" . "\xf0a7b")
+    ("nf-md-tshirt_crew_outline" . "\xf053f")
+    ("nf-md-tshirt_v" . "\xf0a7c")
+    ("nf-md-tshirt_v_outline" . "\xf0540")
+    ("nf-md-tsunami" . "\xf1a81")
+    ("nf-md-tumble_dryer" . "\xf0917")
+    ("nf-md-tumble_dryer_alert" . "\xf11ba")
+    ("nf-md-tumble_dryer_off" . "\xf11bb")
+    ("nf-md-tune" . "\xf062e")
+    ("nf-md-tune_variant" . "\xf1542")
+    ("nf-md-tune_vertical" . "\xf066a")
+    ("nf-md-tune_vertical_variant" . "\xf1543")
+    ("nf-md-tunnel" . "\xf183d")
+    ("nf-md-tunnel_outline" . "\xf183e")
+    ("nf-md-turbine" . "\xf1a82")
+    ("nf-md-turkey" . "\xf171b")
+    ("nf-md-turnstile" . "\xf0cd5")
+    ("nf-md-turnstile_outline" . "\xf0cd6")
+    ("nf-md-turtle" . "\xf0cd7")
+    ("nf-md-twitch" . "\xf0543")
+    ("nf-md-twitter" . "\xf0544")
+    ("nf-md-two_factor_authentication" . "\xf09af")
+    ("nf-md-typewriter" . "\xf0f2d")
+    ("nf-md-ubisoft" . "\xf0bda")
+    ("nf-md-ubuntu" . "\xf0548")
+    ("nf-md-ufo" . "\xf10c4")
+    ("nf-md-ufo_outline" . "\xf10c5")
+    ("nf-md-ultra_high_definition" . "\xf07f9")
+    ("nf-md-umbraco" . "\xf0549")
+    ("nf-md-umbrella" . "\xf054a")
+    ("nf-md-umbrella_beach" . "\xf188a")
+    ("nf-md-umbrella_beach_outline" . "\xf188b")
+    ("nf-md-umbrella_closed" . "\xf09b0")
+    ("nf-md-umbrella_closed_outline" . "\xf13e2")
+    ("nf-md-umbrella_closed_variant" . "\xf13e1")
+    ("nf-md-umbrella_outline" . "\xf054b")
+    ("nf-md-undo" . "\xf054c")
+    ("nf-md-undo_variant" . "\xf054d")
+    ("nf-md-unfold_less_horizontal" . "\xf054e")
+    ("nf-md-unfold_less_vertical" . "\xf0760")
+    ("nf-md-unfold_more_horizontal" . "\xf054f")
+    ("nf-md-unfold_more_vertical" . "\xf0761")
+    ("nf-md-ungroup" . "\xf0550")
+    ("nf-md-unicode" . "\xf0ed0")
+    ("nf-md-unicorn" . "\xf15c2")
+    ("nf-md-unicorn_variant" . "\xf15c3")
+    ("nf-md-unicycle" . "\xf15e5")
+    ("nf-md-unity" . "\xf06af")
+    ("nf-md-unreal" . "\xf09b1")
+    ("nf-md-update" . "\xf06b0")
+    ("nf-md-upload" . "\xf0552")
+    ("nf-md-upload_lock" . "\xf1373")
+    ("nf-md-upload_lock_outline" . "\xf1374")
+    ("nf-md-upload_multiple" . "\xf083d")
+    ("nf-md-upload_network" . "\xf06f6")
+    ("nf-md-upload_network_outline" . "\xf0cd8")
+    ("nf-md-upload_off" . "\xf10c6")
+    ("nf-md-upload_off_outline" . "\xf10c7")
+    ("nf-md-upload_outline" . "\xf0e07")
+    ("nf-md-usb" . "\xf0553")
+    ("nf-md-usb_flash_drive" . "\xf129e")
+    ("nf-md-usb_flash_drive_outline" . "\xf129f")
+    ("nf-md-usb_port" . "\xf11f0")
+    ("nf-md-vacuum" . "\xf19a1")
+    ("nf-md-vacuum_outline" . "\xf19a2")
+    ("nf-md-valve" . "\xf1066")
+    ("nf-md-valve_closed" . "\xf1067")
+    ("nf-md-valve_open" . "\xf1068")
+    ("nf-md-van_passenger" . "\xf07fa")
+    ("nf-md-van_utility" . "\xf07fb")
+    ("nf-md-vanish" . "\xf07fc")
+    ("nf-md-vanish_quarter" . "\xf1554")
+    ("nf-md-vanity_light" . "\xf11e1")
+    ("nf-md-variable" . "\xf0ae7")
+    ("nf-md-variable_box" . "\xf1111")
+    ("nf-md-vector_arrange_above" . "\xf0554")
+    ("nf-md-vector_arrange_below" . "\xf0555")
+    ("nf-md-vector_bezier" . "\xf0ae8")
+    ("nf-md-vector_circle" . "\xf0556")
+    ("nf-md-vector_circle_variant" . "\xf0557")
+    ("nf-md-vector_combine" . "\xf0558")
+    ("nf-md-vector_curve" . "\xf0559")
+    ("nf-md-vector_difference" . "\xf055a")
+    ("nf-md-vector_difference_ab" . "\xf055b")
+    ("nf-md-vector_difference_ba" . "\xf055c")
+    ("nf-md-vector_ellipse" . "\xf0893")
+    ("nf-md-vector_intersection" . "\xf055d")
+    ("nf-md-vector_line" . "\xf055e")
+    ("nf-md-vector_link" . "\xf0fe8")
+    ("nf-md-vector_point" . "\xf055f")
+    ("nf-md-vector_polygon" . "\xf0560")
+    ("nf-md-vector_polygon_variant" . "\xf1856")
+    ("nf-md-vector_polyline" . "\xf0561")
+    ("nf-md-vector_polyline_edit" . "\xf1225")
+    ("nf-md-vector_polyline_minus" . "\xf1226")
+    ("nf-md-vector_polyline_plus" . "\xf1227")
+    ("nf-md-vector_polyline_remove" . "\xf1228")
+    ("nf-md-vector_radius" . "\xf074a")
+    ("nf-md-vector_rectangle" . "\xf05c6")
+    ("nf-md-vector_selection" . "\xf0562")
+    ("nf-md-vector_square" . "\xf0001")
+    ("nf-md-vector_square_close" . "\xf1857")
+    ("nf-md-vector_square_edit" . "\xf18d9")
+    ("nf-md-vector_square_minus" . "\xf18da")
+    ("nf-md-vector_square_open" . "\xf1858")
+    ("nf-md-vector_square_plus" . "\xf18db")
+    ("nf-md-vector_square_remove" . "\xf18dc")
+    ("nf-md-vector_triangle" . "\xf0563")
+    ("nf-md-vector_union" . "\xf0564")
+    ("nf-md-vhs" . "\xf0a1b")
+    ("nf-md-vibrate" . "\xf0566")
+    ("nf-md-vibrate_off" . "\xf0cd9")
+    ("nf-md-video" . "\xf0567")
+    ("nf-md-video_2d" . "\xf1a1c")
+    ("nf-md-video_3d" . "\xf07fd")
+    ("nf-md-video_3d_off" . "\xf13d9")
+    ("nf-md-video_3d_variant" . "\xf0ed1")
+    ("nf-md-video_4k_box" . "\xf083e")
+    ("nf-md-video_account" . "\xf0919")
+    ("nf-md-video_box" . "\xf00fd")
+    ("nf-md-video_box_off" . "\xf00fe")
+    ("nf-md-video_check" . "\xf1069")
+    ("nf-md-video_check_outline" . "\xf106a")
+    ("nf-md-video_high_definition" . "\xf152e")
+    ("nf-md-video_image" . "\xf091a")
+    ("nf-md-video_input_antenna" . "\xf083f")
+    ("nf-md-video_input_component" . "\xf0840")
+    ("nf-md-video_input_hdmi" . "\xf0841")
+    ("nf-md-video_input_scart" . "\xf0f8c")
+    ("nf-md-video_input_svideo" . "\xf0842")
+    ("nf-md-video_marker" . "\xf19a9")
+    ("nf-md-video_marker_outline" . "\xf19aa")
+    ("nf-md-video_minus" . "\xf09b2")
+    ("nf-md-video_minus_outline" . "\xf02ba")
+    ("nf-md-video_off" . "\xf0568")
+    ("nf-md-video_off_outline" . "\xf0bdb")
+    ("nf-md-video_outline" . "\xf0bdc")
+    ("nf-md-video_plus" . "\xf09b3")
+    ("nf-md-video_plus_outline" . "\xf01d3")
+    ("nf-md-video_stabilization" . "\xf091b")
+    ("nf-md-video_switch" . "\xf0569")
+    ("nf-md-video_switch_outline" . "\xf0790")
+    ("nf-md-video_vintage" . "\xf0a1c")
+    ("nf-md-video_wireless" . "\xf0ed2")
+    ("nf-md-video_wireless_outline" . "\xf0ed3")
+    ("nf-md-view_agenda" . "\xf056a")
+    ("nf-md-view_agenda_outline" . "\xf11d8")
+    ("nf-md-view_array" . "\xf056b")
+    ("nf-md-view_array_outline" . "\xf1485")
+    ("nf-md-view_carousel" . "\xf056c")
+    ("nf-md-view_carousel_outline" . "\xf1486")
+    ("nf-md-view_column" . "\xf056d")
+    ("nf-md-view_column_outline" . "\xf1487")
+    ("nf-md-view_comfy" . "\xf0e6a")
+    ("nf-md-view_comfy_outline" . "\xf1488")
+    ("nf-md-view_compact" . "\xf0e6b")
+    ("nf-md-view_compact_outline" . "\xf0e6c")
+    ("nf-md-view_dashboard" . "\xf056e")
+    ("nf-md-view_dashboard_edit" . "\xf1947")
+    ("nf-md-view_dashboard_edit_outline" . "\xf1948")
+    ("nf-md-view_dashboard_outline" . "\xf0a1d")
+    ("nf-md-view_dashboard_variant" . "\xf0843")
+    ("nf-md-view_dashboard_variant_outline" . "\xf1489")
+    ("nf-md-view_day" . "\xf056f")
+    ("nf-md-view_day_outline" . "\xf148a")
+    ("nf-md-view_gallery" . "\xf1888")
+    ("nf-md-view_gallery_outline" . "\xf1889")
+    ("nf-md-view_grid" . "\xf0570")
+    ("nf-md-view_grid_outline" . "\xf11d9")
+    ("nf-md-view_grid_plus" . "\xf0f8d")
+    ("nf-md-view_grid_plus_outline" . "\xf11da")
+    ("nf-md-view_headline" . "\xf0571")
+    ("nf-md-view_list" . "\xf0572")
+    ("nf-md-view_list_outline" . "\xf148b")
+    ("nf-md-view_module" . "\xf0573")
+    ("nf-md-view_module_outline" . "\xf148c")
+    ("nf-md-view_parallel" . "\xf0728")
+    ("nf-md-view_parallel_outline" . "\xf148d")
+    ("nf-md-view_quilt" . "\xf0574")
+    ("nf-md-view_quilt_outline" . "\xf148e")
+    ("nf-md-view_sequential" . "\xf0729")
+    ("nf-md-view_sequential_outline" . "\xf148f")
+    ("nf-md-view_split_horizontal" . "\xf0bcb")
+    ("nf-md-view_split_vertical" . "\xf0bcc")
+    ("nf-md-view_stream" . "\xf0575")
+    ("nf-md-view_stream_outline" . "\xf1490")
+    ("nf-md-view_week" . "\xf0576")
+    ("nf-md-view_week_outline" . "\xf1491")
+    ("nf-md-vimeo" . "\xf0577")
+    ("nf-md-violin" . "\xf060f")
+    ("nf-md-virtual_reality" . "\xf0894")
+    ("nf-md-virus" . "\xf13b6")
+    ("nf-md-virus_off" . "\xf18e1")
+    ("nf-md-virus_off_outline" . "\xf18e2")
+    ("nf-md-virus_outline" . "\xf13b7")
+    ("nf-md-vlc" . "\xf057c")
+    ("nf-md-voicemail" . "\xf057d")
+    ("nf-md-volcano" . "\xf1a83")
+    ("nf-md-volcano_outline" . "\xf1a84")
+    ("nf-md-volleyball" . "\xf09b4")
+    ("nf-md-volume_high" . "\xf057e")
+    ("nf-md-volume_low" . "\xf057f")
+    ("nf-md-volume_medium" . "\xf0580")
+    ("nf-md-volume_minus" . "\xf075e")
+    ("nf-md-volume_mute" . "\xf075f")
+    ("nf-md-volume_off" . "\xf0581")
+    ("nf-md-volume_plus" . "\xf075d")
+    ("nf-md-volume_source" . "\xf1120")
+    ("nf-md-volume_variant_off" . "\xf0e08")
+    ("nf-md-volume_vibrate" . "\xf1121")
+    ("nf-md-vote" . "\xf0a1f")
+    ("nf-md-vote_outline" . "\xf0a20")
+    ("nf-md-vpn" . "\xf0582")
+    ("nf-md-vuejs" . "\xf0844")
+    ("nf-md-vuetify" . "\xf0e6d")
+    ("nf-md-walk" . "\xf0583")
+    ("nf-md-wall" . "\xf07fe")
+    ("nf-md-wall_fire" . "\xf1a11")
+    ("nf-md-wall_sconce" . "\xf091c")
+    ("nf-md-wall_sconce_flat" . "\xf091d")
+    ("nf-md-wall_sconce_flat_outline" . "\xf17c9")
+    ("nf-md-wall_sconce_flat_variant" . "\xf041c")
+    ("nf-md-wall_sconce_flat_variant_outline" . "\xf17ca")
+    ("nf-md-wall_sconce_outline" . "\xf17cb")
+    ("nf-md-wall_sconce_round" . "\xf0748")
+    ("nf-md-wall_sconce_round_outline" . "\xf17cc")
+    ("nf-md-wall_sconce_round_variant" . "\xf091e")
+    ("nf-md-wall_sconce_round_variant_outline" . "\xf17cd")
+    ("nf-md-wallet" . "\xf0584")
+    ("nf-md-wallet_giftcard" . "\xf0585")
+    ("nf-md-wallet_membership" . "\xf0586")
+    ("nf-md-wallet_outline" . "\xf0bdd")
+    ("nf-md-wallet_plus" . "\xf0f8e")
+    ("nf-md-wallet_plus_outline" . "\xf0f8f")
+    ("nf-md-wallet_travel" . "\xf0587")
+    ("nf-md-wallpaper" . "\xf0e09")
+    ("nf-md-wan" . "\xf0588")
+    ("nf-md-wardrobe" . "\xf0f90")
+    ("nf-md-wardrobe_outline" . "\xf0f91")
+    ("nf-md-warehouse" . "\xf0f81")
+    ("nf-md-washing_machine" . "\xf072a")
+    ("nf-md-washing_machine_alert" . "\xf11bc")
+    ("nf-md-washing_machine_off" . "\xf11bd")
+    ("nf-md-watch" . "\xf0589")
+    ("nf-md-watch_export" . "\xf058a")
+    ("nf-md-watch_export_variant" . "\xf0895")
+    ("nf-md-watch_import" . "\xf058b")
+    ("nf-md-watch_import_variant" . "\xf0896")
+    ("nf-md-watch_variant" . "\xf0897")
+    ("nf-md-watch_vibrate" . "\xf06b1")
+    ("nf-md-watch_vibrate_off" . "\xf0cda")
+    ("nf-md-water" . "\xf058c")
+    ("nf-md-water_alert" . "\xf1502")
+    ("nf-md-water_alert_outline" . "\xf1503")
+    ("nf-md-water_boiler" . "\xf0f92")
+    ("nf-md-water_boiler_alert" . "\xf11b3")
+    ("nf-md-water_boiler_off" . "\xf11b4")
+    ("nf-md-water_check" . "\xf1504")
+    ("nf-md-water_check_outline" . "\xf1505")
+    ("nf-md-water_circle" . "\xf1806")
+    ("nf-md-water_minus" . "\xf1506")
+    ("nf-md-water_minus_outline" . "\xf1507")
+    ("nf-md-water_off" . "\xf058d")
+    ("nf-md-water_off_outline" . "\xf1508")
+    ("nf-md-water_opacity" . "\xf1855")
+    ("nf-md-water_outline" . "\xf0e0a")
+    ("nf-md-water_percent" . "\xf058e")
+    ("nf-md-water_percent_alert" . "\xf1509")
+    ("nf-md-water_plus" . "\xf150a")
+    ("nf-md-water_plus_outline" . "\xf150b")
+    ("nf-md-water_polo" . "\xf12a0")
+    ("nf-md-water_pump" . "\xf058f")
+    ("nf-md-water_pump_off" . "\xf0f93")
+    ("nf-md-water_remove" . "\xf150c")
+    ("nf-md-water_remove_outline" . "\xf150d")
+    ("nf-md-water_sync" . "\xf17c6")
+    ("nf-md-water_thermometer" . "\xf1a85")
+    ("nf-md-water_thermometer_outline" . "\xf1a86")
+    ("nf-md-water_well" . "\xf106b")
+    ("nf-md-water_well_outline" . "\xf106c")
+    ("nf-md-waterfall" . "\xf1849")
+    ("nf-md-watering_can" . "\xf1481")
+    ("nf-md-watering_can_outline" . "\xf1482")
+    ("nf-md-watermark" . "\xf0612")
+    ("nf-md-wave" . "\xf0f2e")
+    ("nf-md-waveform" . "\xf147d")
+    ("nf-md-waves" . "\xf078d")
+    ("nf-md-waves_arrow_left" . "\xf1859")
+    ("nf-md-waves_arrow_right" . "\xf185a")
+    ("nf-md-waves_arrow_up" . "\xf185b")
+    ("nf-md-waze" . "\xf0bde")
+    ("nf-md-weather_cloudy" . "\xf0590")
+    ("nf-md-weather_cloudy_alert" . "\xf0f2f")
+    ("nf-md-weather_cloudy_arrow_right" . "\xf0e6e")
+    ("nf-md-weather_cloudy_clock" . "\xf18f6")
+    ("nf-md-weather_fog" . "\xf0591")
+    ("nf-md-weather_hail" . "\xf0592")
+    ("nf-md-weather_hazy" . "\xf0f30")
+    ("nf-md-weather_hurricane" . "\xf0898")
+    ("nf-md-weather_lightning" . "\xf0593")
+    ("nf-md-weather_lightning_rainy" . "\xf067e")
+    ("nf-md-weather_night" . "\xf0594")
+    ("nf-md-weather_night_partly_cloudy" . "\xf0f31")
+    ("nf-md-weather_partly_cloudy" . "\xf0595")
+    ("nf-md-weather_partly_lightning" . "\xf0f32")
+    ("nf-md-weather_partly_rainy" . "\xf0f33")
+    ("nf-md-weather_partly_snowy" . "\xf0f34")
+    ("nf-md-weather_partly_snowy_rainy" . "\xf0f35")
+    ("nf-md-weather_pouring" . "\xf0596")
+    ("nf-md-weather_rainy" . "\xf0597")
+    ("nf-md-weather_snowy" . "\xf0598")
+    ("nf-md-weather_snowy_heavy" . "\xf0f36")
+    ("nf-md-weather_snowy_rainy" . "\xf067f")
+    ("nf-md-weather_sunny" . "\xf0599")
+    ("nf-md-weather_sunny_alert" . "\xf0f37")
+    ("nf-md-weather_sunny_off" . "\xf14e4")
+    ("nf-md-weather_sunset" . "\xf059a")
+    ("nf-md-weather_sunset_down" . "\xf059b")
+    ("nf-md-weather_sunset_up" . "\xf059c")
+    ("nf-md-weather_tornado" . "\xf0f38")
+    ("nf-md-weather_windy" . "\xf059d")
+    ("nf-md-weather_windy_variant" . "\xf059e")
+    ("nf-md-web" . "\xf059f")
+    ("nf-md-web_box" . "\xf0f94")
+    ("nf-md-web_cancel" . "\xf1790")
+    ("nf-md-web_check" . "\xf0789")
+    ("nf-md-web_clock" . "\xf124a")
+    ("nf-md-web_minus" . "\xf10a0")
+    ("nf-md-web_off" . "\xf0a8e")
+    ("nf-md-web_plus" . "\xf0033")
+    ("nf-md-web_refresh" . "\xf1791")
+    ("nf-md-web_remove" . "\xf0551")
+    ("nf-md-web_sync" . "\xf1792")
+    ("nf-md-webcam" . "\xf05a0")
+    ("nf-md-webcam_off" . "\xf1737")
+    ("nf-md-webhook" . "\xf062f")
+    ("nf-md-webpack" . "\xf072b")
+    ("nf-md-webrtc" . "\xf1248")
+    ("nf-md-wechat" . "\xf0611")
+    ("nf-md-weight" . "\xf05a1")
+    ("nf-md-weight_gram" . "\xf0d3f")
+    ("nf-md-weight_kilogram" . "\xf05a2")
+    ("nf-md-weight_lifter" . "\xf115d")
+    ("nf-md-weight_pound" . "\xf09b5")
+    ("nf-md-whatsapp" . "\xf05a3")
+    ("nf-md-wheel_barrow" . "\xf14f2")
+    ("nf-md-wheelchair" . "\xf1a87")
+    ("nf-md-wheelchair_accessibility" . "\xf05a4")
+    ("nf-md-whistle" . "\xf09b6")
+    ("nf-md-whistle_outline" . "\xf12bc")
+    ("nf-md-white_balance_auto" . "\xf05a5")
+    ("nf-md-white_balance_incandescent" . "\xf05a6")
+    ("nf-md-white_balance_iridescent" . "\xf05a7")
+    ("nf-md-white_balance_sunny" . "\xf05a8")
+    ("nf-md-widgets" . "\xf072c")
+    ("nf-md-widgets_outline" . "\xf1355")
+    ("nf-md-wifi" . "\xf05a9")
+    ("nf-md-wifi_alert" . "\xf16b5")
+    ("nf-md-wifi_arrow_down" . "\xf16b6")
+    ("nf-md-wifi_arrow_left" . "\xf16b7")
+    ("nf-md-wifi_arrow_left_right" . "\xf16b8")
+    ("nf-md-wifi_arrow_right" . "\xf16b9")
+    ("nf-md-wifi_arrow_up" . "\xf16ba")
+    ("nf-md-wifi_arrow_up_down" . "\xf16bb")
+    ("nf-md-wifi_cancel" . "\xf16bc")
+    ("nf-md-wifi_check" . "\xf16bd")
+    ("nf-md-wifi_cog" . "\xf16be")
+    ("nf-md-wifi_lock" . "\xf16bf")
+    ("nf-md-wifi_lock_open" . "\xf16c0")
+    ("nf-md-wifi_marker" . "\xf16c1")
+    ("nf-md-wifi_minus" . "\xf16c2")
+    ("nf-md-wifi_off" . "\xf05aa")
+    ("nf-md-wifi_plus" . "\xf16c3")
+    ("nf-md-wifi_refresh" . "\xf16c4")
+    ("nf-md-wifi_remove" . "\xf16c5")
+    ("nf-md-wifi_settings" . "\xf16c6")
+    ("nf-md-wifi_star" . "\xf0e0b")
+    ("nf-md-wifi_strength_1" . "\xf091f")
+    ("nf-md-wifi_strength_1_alert" . "\xf0920")
+    ("nf-md-wifi_strength_1_lock" . "\xf0921")
+    ("nf-md-wifi_strength_1_lock_open" . "\xf16cb")
+    ("nf-md-wifi_strength_2" . "\xf0922")
+    ("nf-md-wifi_strength_2_alert" . "\xf0923")
+    ("nf-md-wifi_strength_2_lock" . "\xf0924")
+    ("nf-md-wifi_strength_2_lock_open" . "\xf16cc")
+    ("nf-md-wifi_strength_3" . "\xf0925")
+    ("nf-md-wifi_strength_3_alert" . "\xf0926")
+    ("nf-md-wifi_strength_3_lock" . "\xf0927")
+    ("nf-md-wifi_strength_3_lock_open" . "\xf16cd")
+    ("nf-md-wifi_strength_4" . "\xf0928")
+    ("nf-md-wifi_strength_4_alert" . "\xf0929")
+    ("nf-md-wifi_strength_4_lock" . "\xf092a")
+    ("nf-md-wifi_strength_4_lock_open" . "\xf16ce")
+    ("nf-md-wifi_strength_alert_outline" . "\xf092b")
+    ("nf-md-wifi_strength_lock_open_outline" . "\xf16cf")
+    ("nf-md-wifi_strength_lock_outline" . "\xf092c")
+    ("nf-md-wifi_strength_off" . "\xf092d")
+    ("nf-md-wifi_strength_off_outline" . "\xf092e")
+    ("nf-md-wifi_strength_outline" . "\xf092f")
+    ("nf-md-wifi_sync" . "\xf16c7")
+    ("nf-md-wikipedia" . "\xf05ac")
+    ("nf-md-wind_power" . "\xf1a88")
+    ("nf-md-wind_power_outline" . "\xf1a89")
+    ("nf-md-wind_turbine" . "\xf0da5")
+    ("nf-md-wind_turbine_alert" . "\xf19ab")
+    ("nf-md-wind_turbine_check" . "\xf19ac")
+    ("nf-md-window_close" . "\xf05ad")
+    ("nf-md-window_closed" . "\xf05ae")
+    ("nf-md-window_closed_variant" . "\xf11db")
+    ("nf-md-window_maximize" . "\xf05af")
+    ("nf-md-window_minimize" . "\xf05b0")
+    ("nf-md-window_open" . "\xf05b1")
+    ("nf-md-window_open_variant" . "\xf11dc")
+    ("nf-md-window_restore" . "\xf05b2")
+    ("nf-md-window_shutter" . "\xf111c")
+    ("nf-md-window_shutter_alert" . "\xf111d")
+    ("nf-md-window_shutter_cog" . "\xf1a8a")
+    ("nf-md-window_shutter_open" . "\xf111e")
+    ("nf-md-window_shutter_settings" . "\xf1a8b")
+    ("nf-md-windsock" . "\xf15fa")
+    ("nf-md-wiper" . "\xf0ae9")
+    ("nf-md-wiper_wash" . "\xf0da6")
+    ("nf-md-wiper_wash_alert" . "\xf18df")
+    ("nf-md-wizard_hat" . "\xf1477")
+    ("nf-md-wordpress" . "\xf05b4")
+    ("nf-md-wrap" . "\xf05b6")
+    ("nf-md-wrap_disabled" . "\xf0bdf")
+    ("nf-md-wrench" . "\xf05b7")
+    ("nf-md-wrench_clock" . "\xf19a3")
+    ("nf-md-wrench_outline" . "\xf0be0")
+    ("nf-md-xamarin" . "\xf0845")
+    ("nf-md-xml" . "\xf05c0")
+    ("nf-md-xmpp" . "\xf07ff")
+    ("nf-md-yahoo" . "\xf0b4f")
+    ("nf-md-yeast" . "\xf05c1")
+    ("nf-md-yin_yang" . "\xf0680")
+    ("nf-md-yoga" . "\xf117c")
+    ("nf-md-youtube" . "\xf05c3")
+    ("nf-md-youtube_gaming" . "\xf0848")
+    ("nf-md-youtube_studio" . "\xf0847")
+    ("nf-md-youtube_subscription" . "\xf0d40")
+    ("nf-md-youtube_tv" . "\xf0448")
+    ("nf-md-yurt" . "\xf1516")
+    ("nf-md-z_wave" . "\xf0aea")
+    ("nf-md-zend" . "\xf0aeb")
+    ("nf-md-zigbee" . "\xf0d41")
+    ("nf-md-zip_box" . "\xf05c4")
+    ("nf-md-zip_box_outline" . "\xf0ffa")
+    ("nf-md-zip_disk" . "\xf0a23")
+    ("nf-md-zodiac_aquarius" . "\xf0a7d")
+    ("nf-md-zodiac_aries" . "\xf0a7e")
+    ("nf-md-zodiac_cancer" . "\xf0a7f")
+    ("nf-md-zodiac_capricorn" . "\xf0a80")
+    ("nf-md-zodiac_gemini" . "\xf0a81")
+    ("nf-md-zodiac_leo" . "\xf0a82")
+    ("nf-md-zodiac_libra" . "\xf0a83")
+    ("nf-md-zodiac_pisces" . "\xf0a84")
+    ("nf-md-zodiac_sagittarius" . "\xf0a85")
+    ("nf-md-zodiac_scorpio" . "\xf0a86")
+    ("nf-md-zodiac_taurus" . "\xf0a87")
+    ("nf-md-zodiac_virgo" . "\xf0a88")
+    ))
+
+(provide 'nerd-icons-data-mdicon)
+;;; nerd-icons-data-mdicon.el ends here
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-mdicon.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-mdicon.elc
new file mode 100644
index 0000000..d93c914
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-mdicon.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-octicon.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-octicon.el
new file mode 100644
index 0000000..ce8aa4f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-octicon.el
@@ -0,0 +1,343 @@
+;;; nerd-icons-data-octicon.el --- glyphset octicon -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; octicon
+;; from Nerd Font Version: 3.5.1
+
+;;; Code:
+
+(defvar nerd-icons/octicon-alist
+  '(
+    ("nf-oct-accessibility" . "\xf406")
+    ("nf-oct-accessibility_inset" . "\xf40b")
+    ("nf-oct-alert" . "\xf421")
+    ("nf-oct-alert_fill" . "\xf40c")
+    ("nf-oct-apps" . "\xf40e")
+    ("nf-oct-archive" . "\xf411")
+    ("nf-oct-arrow_both" . "\xf416")
+    ("nf-oct-arrow_down" . "\xf433")
+    ("nf-oct-arrow_down_left" . "\xf424")
+    ("nf-oct-arrow_down_right" . "\xf43e")
+    ("nf-oct-arrow_left" . "\xf434")
+    ("nf-oct-arrow_right" . "\xf432")
+    ("nf-oct-arrow_switch" . "\xf443")
+    ("nf-oct-arrow_up" . "\xf431")
+    ("nf-oct-arrow_up_left" . "\xf45c")
+    ("nf-oct-arrow_up_right" . "\xf46c")
+    ("nf-oct-beaker" . "\xf499")
+    ("nf-oct-bell" . "\xf49a")
+    ("nf-oct-bell_fill" . "\xf476")
+    ("nf-oct-bell_slash" . "\xf478")
+    ("nf-oct-blocked" . "\xf479")
+    ("nf-oct-bold" . "\xf49d")
+    ("nf-oct-book" . "\xf405")
+    ("nf-oct-bookmark" . "\xf461")
+    ("nf-oct-bookmark_fill" . "\xf47a")
+    ("nf-oct-bookmark_slash" . "\xf533")
+    ("nf-oct-bookmark_slash_fill" . "\xf493")
+    ("nf-oct-briefcase" . "\xf491")
+    ("nf-oct-broadcast" . "\xf43c")
+    ("nf-oct-browser" . "\xf488")
+    ("nf-oct-bug" . "\xf46f")
+    ("nf-oct-cache" . "\xf49b")
+    ("nf-oct-calendar" . "\xf455")
+    ("nf-oct-check" . "\xf42e")
+    ("nf-oct-check_circle" . "\xf49e")
+    ("nf-oct-check_circle_fill" . "\xf4a4")
+    ("nf-oct-checkbox" . "\xf4a7")
+    ("nf-oct-checklist" . "\xf45e")
+    ("nf-oct-chevron_down" . "\xf47c")
+    ("nf-oct-chevron_left" . "\xf47d")
+    ("nf-oct-chevron_right" . "\xf460")
+    ("nf-oct-chevron_up" . "\xf47b")
+    ("nf-oct-circle" . "\xf4aa")
+    ("nf-oct-circle_slash" . "\xf468")
+    ("nf-oct-clock" . "\xf43a")
+    ("nf-oct-clock_fill" . "\xf4ab")
+    ("nf-oct-cloud" . "\xf4ac")
+    ("nf-oct-cloud_offline" . "\xf4ad")
+    ("nf-oct-code" . "\xf44f")
+    ("nf-oct-code_of_conduct" . "\xf4ae")
+    ("nf-oct-code_review" . "\xf4af")
+    ("nf-oct-code_square" . "\xf4b0")
+    ("nf-oct-codescan" . "\xf4b1")
+    ("nf-oct-codescan_checkmark" . "\xf4b2")
+    ("nf-oct-codespaces" . "\xf4b3")
+    ("nf-oct-columns" . "\xf4b4")
+    ("nf-oct-command_palette" . "\xf4b5")
+    ("nf-oct-comment" . "\xf41f")
+    ("nf-oct-comment_discussion" . "\xf442")
+    ("nf-oct-commit" . "\xf4b6")
+    ("nf-oct-container" . "\xf4b7")
+    ("nf-oct-copilot" . "\xf4b8")
+    ("nf-oct-copilot_error" . "\xf4b9")
+    ("nf-oct-copilot_warning" . "\xf4ba")
+    ("nf-oct-copy" . "\xf4bb")
+    ("nf-oct-cpu" . "\xf4bc")
+    ("nf-oct-credit_card" . "\xf439")
+    ("nf-oct-cross_reference" . "\xf4bd")
+    ("nf-oct-dash" . "\xf48b")
+    ("nf-oct-database" . "\xf472")
+    ("nf-oct-dependabot" . "\xf4be")
+    ("nf-oct-desktop_download" . "\xf498")
+    ("nf-oct-device_camera" . "\xf446")
+    ("nf-oct-device_camera_video" . "\xf447")
+    ("nf-oct-device_desktop" . "\xf4a9")
+    ("nf-oct-device_mobile" . "\xf42c")
+    ("nf-oct-diamond" . "\xf4bf")
+    ("nf-oct-diff" . "\xf440")
+    ("nf-oct-diff_added" . "\xf457")
+    ("nf-oct-diff_ignored" . "\xf474")
+    ("nf-oct-diff_modified" . "\xf459")
+    ("nf-oct-diff_removed" . "\xf458")
+    ("nf-oct-diff_renamed" . "\xf45a")
+    ("nf-oct-discussion_closed" . "\xf4c0")
+    ("nf-oct-discussion_duplicate" . "\xf4c1")
+    ("nf-oct-discussion_outdated" . "\xf4c2")
+    ("nf-oct-dot" . "\xf4c3")
+    ("nf-oct-dot_fill" . "\xf444")
+    ("nf-oct-download" . "\xf409")
+    ("nf-oct-duplicate" . "\xf4c4")
+    ("nf-oct-ellipsis" . "\xf475")
+    ("nf-oct-eye" . "\xf441")
+    ("nf-oct-eye_closed" . "\xf4c5")
+    ("nf-oct-feed_discussion" . "\xf4c6")
+    ("nf-oct-feed_forked" . "\xf4c7")
+    ("nf-oct-feed_heart" . "\xf4c8")
+    ("nf-oct-feed_merged" . "\xf4c9")
+    ("nf-oct-feed_person" . "\xf4ca")
+    ("nf-oct-feed_repo" . "\xf4cb")
+    ("nf-oct-feed_rocket" . "\xf4cc")
+    ("nf-oct-feed_star" . "\xf4cd")
+    ("nf-oct-feed_tag" . "\xf4ce")
+    ("nf-oct-feed_trophy" . "\xf4cf")
+    ("nf-oct-file" . "\xf4a5")
+    ("nf-oct-file_added" . "\xf4d0")
+    ("nf-oct-file_badge" . "\xf4d1")
+    ("nf-oct-file_binary" . "\xf471")
+    ("nf-oct-file_code" . "\xf40d")
+    ("nf-oct-file_diff" . "\xf4d2")
+    ("nf-oct-file_directory" . "\xf413")
+    ("nf-oct-file_directory_fill" . "\xf4d3")
+    ("nf-oct-file_directory_open_fill" . "\xf4d4")
+    ("nf-oct-file_media" . "\xf40f")
+    ("nf-oct-file_moved" . "\xf4d5")
+    ("nf-oct-file_removed" . "\xf4d6")
+    ("nf-oct-file_submodule" . "\xf414")
+    ("nf-oct-file_symlink_directory" . "\xf482")
+    ("nf-oct-file_symlink_file" . "\xf481")
+    ("nf-oct-file_zip" . "\xf410")
+    ("nf-oct-filter" . "\xf4d7")
+    ("nf-oct-fiscal_host" . "\xf4d8")
+    ("nf-oct-flame" . "\xf490")
+    ("nf-oct-fold" . "\xf48c")
+    ("nf-oct-fold_down" . "\xf4d9")
+    ("nf-oct-fold_up" . "\xf4da")
+    ("nf-oct-gear" . "\xf423")
+    ("nf-oct-gift" . "\xf436")
+    ("nf-oct-git_branch" . "\xf418")
+    ("nf-oct-git_commit" . "\xf417")
+    ("nf-oct-git_compare" . "\xf47f")
+    ("nf-oct-git_merge" . "\xf419")
+    ("nf-oct-git_merge_queue" . "\xf4db")
+    ("nf-oct-git_pull_request" . "\xf407")
+    ("nf-oct-git_pull_request_closed" . "\xf4dc")
+    ("nf-oct-git_pull_request_draft" . "\xf4dd")
+    ("nf-oct-globe" . "\xf484")
+    ("nf-oct-goal" . "\xf4de")
+    ("nf-oct-grabber" . "\xf4a6")
+    ("nf-oct-graph" . "\xf437")
+    ("nf-oct-hash" . "\xf4df")
+    ("nf-oct-heading" . "\xf4e0")
+    ("nf-oct-heart" . "\x2665")
+    ("nf-oct-heart_fill" . "\xf4e1")
+    ("nf-oct-history" . "\xf464")
+    ("nf-oct-home" . "\xf46d")
+    ("nf-oct-home_fill" . "\xf4e2")
+    ("nf-oct-horizontal_rule" . "\xf45b")
+    ("nf-oct-hourglass" . "\xf4e3")
+    ("nf-oct-hubot" . "\xf477")
+    ("nf-oct-id_badge" . "\xf4e4")
+    ("nf-oct-image" . "\xf4e5")
+    ("nf-oct-inbox" . "\xf48d")
+    ("nf-oct-infinity" . "\xf4e6")
+    ("nf-oct-info" . "\xf449")
+    ("nf-oct-issue_closed" . "\xf41d")
+    ("nf-oct-issue_draft" . "\xf4e7")
+    ("nf-oct-issue_opened" . "\xf41b")
+    ("nf-oct-issue_reopened" . "\xf41c")
+    ("nf-oct-issue_tracked_by" . "\xf4e8")
+    ("nf-oct-issue_tracks" . "\xf4e9")
+    ("nf-oct-italic" . "\xf49f")
+    ("nf-oct-iterations" . "\xf4ea")
+    ("nf-oct-kebab_horizontal" . "\xf4eb")
+    ("nf-oct-key" . "\xf43d")
+    ("nf-oct-key_asterisk" . "\xf4ec")
+    ("nf-oct-law" . "\xf495")
+    ("nf-oct-light_bulb" . "\xf400")
+    ("nf-oct-link" . "\xf44c")
+    ("nf-oct-link_external" . "\xf465")
+    ("nf-oct-list_ordered" . "\xf452")
+    ("nf-oct-list_unordered" . "\xf451")
+    ("nf-oct-location" . "\xf450")
+    ("nf-oct-lock" . "\xf456")
+    ("nf-oct-log" . "\xf4ed")
+    ("nf-oct-logo_gist" . "\xf480")
+    ("nf-oct-logo_github" . "\xf470")
+    ("nf-oct-mail" . "\xf42f")
+    ("nf-oct-mark_github" . "\xf408")
+    ("nf-oct-markdown" . "\xf48a")
+    ("nf-oct-megaphone" . "\xf45f")
+    ("nf-oct-mention" . "\xf486")
+    ("nf-oct-meter" . "\xf463")
+    ("nf-oct-milestone" . "\xf45d")
+    ("nf-oct-mirror" . "\xf41a")
+    ("nf-oct-moon" . "\xf4ee")
+    ("nf-oct-mortar_board" . "\xf494")
+    ("nf-oct-move_to_bottom" . "\xf4ef")
+    ("nf-oct-move_to_end" . "\xf4f0")
+    ("nf-oct-move_to_start" . "\xf4f1")
+    ("nf-oct-move_to_top" . "\xf4f2")
+    ("nf-oct-multi_select" . "\xf4f3")
+    ("nf-oct-mute" . "\xf466")
+    ("nf-oct-no_entry" . "\xf4f4")
+    ("nf-oct-north_star" . "\xf4f5")
+    ("nf-oct-note" . "\xf4f6")
+    ("nf-oct-number" . "\xf4f7")
+    ("nf-oct-organization" . "\xf42b")
+    ("nf-oct-package" . "\xf487")
+    ("nf-oct-package_dependencies" . "\xf4f8")
+    ("nf-oct-package_dependents" . "\xf4f9")
+    ("nf-oct-paintbrush" . "\xf48f")
+    ("nf-oct-paper_airplane" . "\xf4fa")
+    ("nf-oct-paperclip" . "\xf4fb")
+    ("nf-oct-passkey_fill" . "\xf4fc")
+    ("nf-oct-paste" . "\xf429")
+    ("nf-oct-pencil" . "\xf448")
+    ("nf-oct-people" . "\xf4fd")
+    ("nf-oct-person" . "\xf415")
+    ("nf-oct-person_add" . "\xf4fe")
+    ("nf-oct-person_fill" . "\xf4ff")
+    ("nf-oct-pin" . "\xf435")
+    ("nf-oct-play" . "\xf500")
+    ("nf-oct-plug" . "\xf492")
+    ("nf-oct-plus" . "\xf44d")
+    ("nf-oct-plus_circle" . "\xf501")
+    ("nf-oct-project" . "\xf502")
+    ("nf-oct-project_roadmap" . "\xf503")
+    ("nf-oct-project_symlink" . "\xf504")
+    ("nf-oct-project_template" . "\xf505")
+    ("nf-oct-pulse" . "\xf469")
+    ("nf-oct-question" . "\xf420")
+    ("nf-oct-quote" . "\xf453")
+    ("nf-oct-read" . "\xf430")
+    ("nf-oct-rel_file_path" . "\xf506")
+    ("nf-oct-reply" . "\xf4a8")
+    ("nf-oct-repo" . "\xf401")
+    ("nf-oct-repo_clone" . "\xf43f")
+    ("nf-oct-repo_deleted" . "\xf507")
+    ("nf-oct-repo_forked" . "\xf402")
+    ("nf-oct-repo_locked" . "\xf508")
+    ("nf-oct-repo_pull" . "\xf404")
+    ("nf-oct-repo_push" . "\xf403")
+    ("nf-oct-repo_template" . "\xf509")
+    ("nf-oct-report" . "\xf50a")
+    ("nf-oct-rocket" . "\xf427")
+    ("nf-oct-rows" . "\xf50b")
+    ("nf-oct-rss" . "\xf428")
+    ("nf-oct-ruby" . "\xf43b")
+    ("nf-oct-screen_full" . "\xf50c")
+    ("nf-oct-screen_normal" . "\xf50d")
+    ("nf-oct-search" . "\xf422")
+    ("nf-oct-server" . "\xf473")
+    ("nf-oct-share" . "\xf50e")
+    ("nf-oct-share_android" . "\xf50f")
+    ("nf-oct-shield" . "\xf49c")
+    ("nf-oct-shield_check" . "\xf510")
+    ("nf-oct-shield_lock" . "\xf511")
+    ("nf-oct-shield_slash" . "\xf512")
+    ("nf-oct-shield_x" . "\xf513")
+    ("nf-oct-sidebar_collapse" . "\xf514")
+    ("nf-oct-sidebar_expand" . "\xf515")
+    ("nf-oct-sign_in" . "\xf42a")
+    ("nf-oct-sign_out" . "\xf426")
+    ("nf-oct-single_select" . "\xf516")
+    ("nf-oct-skip" . "\xf517")
+    ("nf-oct-skip_fill" . "\xf518")
+    ("nf-oct-sliders" . "\xf462")
+    ("nf-oct-smiley" . "\xf4a2")
+    ("nf-oct-sort_asc" . "\xf519")
+    ("nf-oct-sort_desc" . "\xf51a")
+    ("nf-oct-sparkle_fill" . "\xf51b")
+    ("nf-oct-sponsor_tiers" . "\xf51c")
+    ("nf-oct-square" . "\xf51d")
+    ("nf-oct-square_fill" . "\xf445")
+    ("nf-oct-squirrel" . "\xf483")
+    ("nf-oct-stack" . "\xf51e")
+    ("nf-oct-star" . "\xf41e")
+    ("nf-oct-star_fill" . "\xf51f")
+    ("nf-oct-stop" . "\xf46e")
+    ("nf-oct-stopwatch" . "\xf520")
+    ("nf-oct-strikethrough" . "\xf521")
+    ("nf-oct-sun" . "\xf522")
+    ("nf-oct-sync" . "\xf46a")
+    ("nf-oct-tab" . "\xf523")
+    ("nf-oct-tab_external" . "\xf524")
+    ("nf-oct-table" . "\xf525")
+    ("nf-oct-tag" . "\xf412")
+    ("nf-oct-tasklist" . "\xf4a0")
+    ("nf-oct-telescope" . "\xf46b")
+    ("nf-oct-telescope_fill" . "\xf526")
+    ("nf-oct-terminal" . "\xf489")
+    ("nf-oct-three_bars" . "\xf44e")
+    ("nf-oct-thumbsdown" . "\xf497")
+    ("nf-oct-thumbsup" . "\xf496")
+    ("nf-oct-tools" . "\xf425")
+    ("nf-oct-trash" . "\xf48e")
+    ("nf-oct-triangle_down" . "\xf44b")
+    ("nf-oct-triangle_left" . "\xf438")
+    ("nf-oct-triangle_right" . "\xf44a")
+    ("nf-oct-triangle_up" . "\xf47e")
+    ("nf-oct-trophy" . "\xf527")
+    ("nf-oct-typography" . "\xf528")
+    ("nf-oct-unfold" . "\xf42d")
+    ("nf-oct-unlink" . "\xf529")
+    ("nf-oct-unlock" . "\xf52a")
+    ("nf-oct-unmute" . "\xf485")
+    ("nf-oct-unread" . "\xf52b")
+    ("nf-oct-unverified" . "\xf4a3")
+    ("nf-oct-upload" . "\xf40a")
+    ("nf-oct-verified" . "\xf4a1")
+    ("nf-oct-versions" . "\xf454")
+    ("nf-oct-video" . "\xf52c")
+    ("nf-oct-webhook" . "\xf52d")
+    ("nf-oct-workflow" . "\xf52e")
+    ("nf-oct-x" . "\xf467")
+    ("nf-oct-x_circle" . "\xf52f")
+    ("nf-oct-x_circle_fill" . "\xf530")
+    ("nf-oct-zap" . "\x26a1")
+    ("nf-oct-zoom_in" . "\xf531")
+    ("nf-oct-zoom_out" . "\xf532")
+    ))
+
+(provide 'nerd-icons-data-octicon)
+;;; nerd-icons-data-octicon.el ends here
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-octicon.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-octicon.elc
new file mode 100644
index 0000000..948ebbc
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-octicon.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-pomicon.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-pomicon.el
new file mode 100644
index 0000000..7aebeb5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-pomicon.el
@@ -0,0 +1,44 @@
+;;; nerd-icons-data-pomicon.el --- glyphset pomicon -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; pomicon
+;; from Nerd Font Version: 3.5.1
+
+;;; Code:
+
+(defvar nerd-icons/pomicon-alist
+  '(
+    ("nf-pom-away" . "\xe007")
+    ("nf-pom-clean_code" . "\xe000")
+    ("nf-pom-external_interruption" . "\xe00a")
+    ("nf-pom-internal_interruption" . "\xe009")
+    ("nf-pom-long_pause" . "\xe006")
+    ("nf-pom-pair_programming" . "\xe008")
+    ("nf-pom-pomodoro_done" . "\xe001")
+    ("nf-pom-pomodoro_estimated" . "\xe002")
+    ("nf-pom-pomodoro_squashed" . "\xe004")
+    ("nf-pom-pomodoro_ticking" . "\xe003")
+    ("nf-pom-short_pause" . "\xe005")
+    ))
+
+(provide 'nerd-icons-data-pomicon)
+;;; nerd-icons-data-pomicon.el ends here
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-pomicon.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-pomicon.elc
new file mode 100644
index 0000000..d4aef45
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-pomicon.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-powerline.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-powerline.el
new file mode 100644
index 0000000..918efd8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-powerline.el
@@ -0,0 +1,76 @@
+;;; nerd-icons-data-powerline.el --- glyphset powerline -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; powerline
+;; from Nerd Font Version: 3.5.1
+
+;;; Code:
+
+(defvar nerd-icons/powerline-alist
+  '(
+    ("nf-pl-branch" . "\xe0a0")
+    ("nf-pl-current_line" . "\xe0a1")
+    ("nf-pl-hostname" . "\xe0a2")
+    ("nf-pl-left_hard_divider" . "\xe0b0")
+    ("nf-pl-left_soft_divider" . "\xe0b1")
+    ("nf-pl-line_number" . "\xe0a1")
+    ("nf-pl-readonly" . "\xe0a2")
+    ("nf-pl-right_hard_divider" . "\xe0b2")
+    ("nf-pl-right_soft_divider" . "\xe0b3")
+    ("nf-ple-backslash_separator" . "\xe0b9")
+    ("nf-ple-backslash_separator_redundant" . "\xe0bf")
+    ("nf-ple-column_number" . "\xe0a3")
+    ("nf-ple-current_column" . "\xe0a3")
+    ("nf-ple-flame_thick" . "\xe0c0")
+    ("nf-ple-flame_thick_mirrored" . "\xe0c2")
+    ("nf-ple-flame_thin" . "\xe0c1")
+    ("nf-ple-flame_thin_mirrored" . "\xe0c3")
+    ("nf-ple-forwardslash_separator" . "\xe0bb")
+    ("nf-ple-forwardslash_separator_redundant" . "\xe0bd")
+    ("nf-ple-honeycomb" . "\xe0cc")
+    ("nf-ple-honeycomb_outline" . "\xe0cd")
+    ("nf-ple-ice_waveform" . "\xe0c8")
+    ("nf-ple-ice_waveform_mirrored" . "\xe0ca")
+    ("nf-ple-left_half_circle_thick" . "\xe0b6")
+    ("nf-ple-left_half_circle_thin" . "\xe0b7")
+    ("nf-ple-left_hard_divider_inverse" . "\xe0d7")
+    ("nf-ple-lego_block_facing" . "\xe0d0")
+    ("nf-ple-lego_block_sideways" . "\xe0d1")
+    ("nf-ple-lego_separator" . "\xe0ce")
+    ("nf-ple-lego_separator_thin" . "\xe0cf")
+    ("nf-ple-lower_left_triangle" . "\xe0b8")
+    ("nf-ple-lower_right_triangle" . "\xe0ba")
+    ("nf-ple-pixelated_squares_big" . "\xe0c6")
+    ("nf-ple-pixelated_squares_big_mirrored" . "\xe0c7")
+    ("nf-ple-pixelated_squares_small" . "\xe0c4")
+    ("nf-ple-pixelated_squares_small_mirrored" . "\xe0c5")
+    ("nf-ple-right_half_circle_thick" . "\xe0b4")
+    ("nf-ple-right_half_circle_thin" . "\xe0b5")
+    ("nf-ple-right_hard_divider_inverse" . "\xe0d6")
+    ("nf-ple-trapezoid_top_bottom" . "\xe0d2")
+    ("nf-ple-trapezoid_top_bottom_mirrored" . "\xe0d4")
+    ("nf-ple-upper_left_triangle" . "\xe0bc")
+    ("nf-ple-upper_right_triangle" . "\xe0be")
+    ))
+
+(provide 'nerd-icons-data-powerline)
+;;; nerd-icons-data-powerline.el ends here
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-powerline.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-powerline.elc
new file mode 100644
index 0000000..5d7793c
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-powerline.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-sucicon.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-sucicon.el
new file mode 100644
index 0000000..b70f877
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-sucicon.el
@@ -0,0 +1,245 @@
+;;; nerd-icons-data-sucicon.el --- glyphset sucicon -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; sucicon
+;; from Nerd Font Version: 3.5.1
+
+;;; Code:
+
+(defvar nerd-icons/sucicon-alist
+  '(
+    ("nf-custom-ada" . "\xe6b5")
+    ("nf-custom-asm" . "\xe6ab")
+    ("nf-custom-astro" . "\xe6b3")
+    ("nf-custom-bazel" . "\xe63a")
+    ("nf-custom-c" . "\xe61e")
+    ("nf-custom-chuck" . "\xe6b6")
+    ("nf-custom-common_lisp" . "\xe6b0")
+    ("nf-custom-cpp" . "\xe61d")
+    ("nf-custom-crystal" . "\xe62f")
+    ("nf-custom-css" . "\xe6b8")
+    ("nf-custom-default" . "\xe612")
+    ("nf-custom-electron" . "\xe62e")
+    ("nf-custom-elixir" . "\xe62d")
+    ("nf-custom-elm" . "\xe62c")
+    ("nf-custom-emacs" . "\xe632")
+    ("nf-custom-fennel" . "\xe6af")
+    ("nf-custom-firebase" . "\xe657")
+    ("nf-custom-folder" . "\xe5ff")
+    ("nf-custom-folder_config" . "\xe5fc")
+    ("nf-custom-folder_git" . "\xe5fb")
+    ("nf-custom-folder_git_branch" . "\xe5fb")
+    ("nf-custom-folder_github" . "\xe5fd")
+    ("nf-custom-folder_npm" . "\xe5fa")
+    ("nf-custom-folder_oct" . "\xe6ad")
+    ("nf-custom-folder_open" . "\xe5fe")
+    ("nf-custom-go" . "\xe626")
+    ("nf-custom-home" . "\xe617")
+    ("nf-custom-kotlin" . "\xe634")
+    ("nf-custom-msdos" . "\xe629")
+    ("nf-custom-neovim" . "\xe6ae")
+    ("nf-custom-obsidian" . "\xe6bb")
+    ("nf-custom-orgmode" . "\xe633")
+    ("nf-custom-play_arrow" . "\xe602")
+    ("nf-custom-prettier" . "\xe6b4")
+    ("nf-custom-puppet" . "\xe631")
+    ("nf-custom-purescript" . "\xe630")
+    ("nf-custom-ruby" . "\xe605")
+    ("nf-custom-scheme" . "\xe6b1")
+    ("nf-custom-toml" . "\xe6b2")
+    ("nf-custom-v_lang" . "\xe6ac")
+    ("nf-custom-vim" . "\xe62b")
+    ("nf-custom-vitruvian" . "\xe6b7")
+    ("nf-custom-windows" . "\xe62a")
+    ("nf-custom-wireshark" . "\xe6ba")
+    ("nf-custom-zsh" . "\xe6b9")
+    ("nf-seti-apple" . "\xe635")
+    ("nf-seti-argdown" . "\xe636")
+    ("nf-seti-asm" . "\xe637")
+    ("nf-seti-audio" . "\xe638")
+    ("nf-seti-babel" . "\xe639")
+    ("nf-seti-bazel" . "\xe63a")
+    ("nf-seti-bicep" . "\xe63b")
+    ("nf-seti-bower" . "\xe61a")
+    ("nf-seti-bsl" . "\xe63c")
+    ("nf-seti-c" . "\xe649")
+    ("nf-seti-c_sharp" . "\xe648")
+    ("nf-seti-cake" . "\xe63e")
+    ("nf-seti-cake_php" . "\xe63d")
+    ("nf-seti-checkbox" . "\xe63f")
+    ("nf-seti-checkbox_unchecked" . "\xe640")
+    ("nf-seti-cjsx" . "\xe61b")
+    ("nf-seti-clock" . "\xe641")
+    ("nf-seti-clojure" . "\xe642")
+    ("nf-seti-code_climate" . "\xe643")
+    ("nf-seti-code_search" . "\xe644")
+    ("nf-seti-coffee" . "\xe61b")
+    ("nf-seti-coldfusion" . "\xe645")
+    ("nf-seti-config" . "\xe615")
+    ("nf-seti-cpp" . "\xe646")
+    ("nf-seti-crystal" . "\xe62f")
+    ("nf-seti-crystal_embedded" . "\xe647")
+    ("nf-seti-css" . "\xe614")
+    ("nf-seti-csv" . "\xe64a")
+    ("nf-seti-cu" . "\xe64b")
+    ("nf-seti-d" . "\xe651")
+    ("nf-seti-dart" . "\xe64c")
+    ("nf-seti-db" . "\xe64d")
+    ("nf-seti-default" . "\xe64e")
+    ("nf-seti-deprecation_cop" . "\xe64f")
+    ("nf-seti-docker" . "\xe650")
+    ("nf-seti-editorconfig" . "\xe652")
+    ("nf-seti-ejs" . "\xe618")
+    ("nf-seti-elixir" . "\xe62d")
+    ("nf-seti-elixir_script" . "\xe653")
+    ("nf-seti-elm" . "\xe62c")
+    ("nf-seti-error" . "\xe654")
+    ("nf-seti-eslint" . "\xe655")
+    ("nf-seti-ethereum" . "\xe656")
+    ("nf-seti-f_sharp" . "\xe65a")
+    ("nf-seti-favicon" . "\xe623")
+    ("nf-seti-firebase" . "\xe657")
+    ("nf-seti-firefox" . "\xe658")
+    ("nf-seti-folder" . "\xe613")
+    ("nf-seti-font" . "\xe659")
+    ("nf-seti-git" . "\xe65d")
+    ("nf-seti-git_folder" . "\xe65d")
+    ("nf-seti-git_ignore" . "\xe65d")
+    ("nf-seti-github" . "\xe65b")
+    ("nf-seti-gitlab" . "\xe65c")
+    ("nf-seti-go" . "\xe627")
+    ("nf-seti-go2" . "\xe65e")
+    ("nf-seti-godot" . "\xe65f")
+    ("nf-seti-gradle" . "\xe660")
+    ("nf-seti-grails" . "\xe661")
+    ("nf-seti-graphql" . "\xe662")
+    ("nf-seti-grunt" . "\xe611")
+    ("nf-seti-gulp" . "\xe610")
+    ("nf-seti-hacklang" . "\xe663")
+    ("nf-seti-haml" . "\xe664")
+    ("nf-seti-happenings" . "\xe665")
+    ("nf-seti-haskell" . "\xe61f")
+    ("nf-seti-haxe" . "\xe666")
+    ("nf-seti-heroku" . "\xe607")
+    ("nf-seti-hex" . "\xe667")
+    ("nf-seti-home" . "\xe617")
+    ("nf-seti-html" . "\xe60e")
+    ("nf-seti-ignored" . "\xe668")
+    ("nf-seti-illustrator" . "\xe669")
+    ("nf-seti-image" . "\xe60d")
+    ("nf-seti-info" . "\xe66a")
+    ("nf-seti-ionic" . "\xe66b")
+    ("nf-seti-jade" . "\xe66c")
+    ("nf-seti-java" . "\xe66d")
+    ("nf-seti-javascript" . "\xe60c")
+    ("nf-seti-jenkins" . "\xe66e")
+    ("nf-seti-jinja" . "\xe66f")
+    ("nf-seti-json" . "\xe60b")
+    ("nf-seti-julia" . "\xe624")
+    ("nf-seti-karma" . "\xe622")
+    ("nf-seti-kotlin" . "\xe634")
+    ("nf-seti-less" . "\xe60b")
+    ("nf-seti-license" . "\xe60a")
+    ("nf-seti-liquid" . "\xe670")
+    ("nf-seti-livescript" . "\xe671")
+    ("nf-seti-lock" . "\xe672")
+    ("nf-seti-lua" . "\xe620")
+    ("nf-seti-makefile" . "\xe673")
+    ("nf-seti-markdown" . "\xe609")
+    ("nf-seti-maven" . "\xe674")
+    ("nf-seti-mdo" . "\xe675")
+    ("nf-seti-mustache" . "\xe60f")
+    ("nf-seti-new_file" . "\xe676")
+    ("nf-seti-nim" . "\xe677")
+    ("nf-seti-notebook" . "\xe678")
+    ("nf-seti-npm" . "\xe616")
+    ("nf-seti-npm_ignored" . "\xe616")
+    ("nf-seti-nunjucks" . "\xe679")
+    ("nf-seti-ocaml" . "\xe67a")
+    ("nf-seti-odata" . "\xe67b")
+    ("nf-seti-pddl" . "\xe67c")
+    ("nf-seti-pdf" . "\xe67d")
+    ("nf-seti-perl" . "\xe67e")
+    ("nf-seti-photoshop" . "\xe67f")
+    ("nf-seti-php" . "\xe608")
+    ("nf-seti-pipeline" . "\xe680")
+    ("nf-seti-plan" . "\xe681")
+    ("nf-seti-platformio" . "\xe682")
+    ("nf-seti-play_arrow" . "\xe602")
+    ("nf-seti-powershell" . "\xe683")
+    ("nf-seti-prisma" . "\xe684")
+    ("nf-seti-project" . "\xe601")
+    ("nf-seti-prolog" . "\xe685")
+    ("nf-seti-pug" . "\xe686")
+    ("nf-seti-puppet" . "\xe631")
+    ("nf-seti-purescript" . "\xe630")
+    ("nf-seti-python" . "\xe606")
+    ("nf-seti-r" . "\xe68a")
+    ("nf-seti-rails" . "\xe604")
+    ("nf-seti-react" . "\xe625")
+    ("nf-seti-reasonml" . "\xe687")
+    ("nf-seti-rescript" . "\xe688")
+    ("nf-seti-rollup" . "\xe689")
+    ("nf-seti-ruby" . "\xe605")
+    ("nf-seti-rust" . "\xe68b")
+    ("nf-seti-salesforce" . "\xe68c")
+    ("nf-seti-sass" . "\xe603")
+    ("nf-seti-sbt" . "\xe68d")
+    ("nf-seti-scala" . "\xe68e")
+    ("nf-seti-search" . "\xe68f")
+    ("nf-seti-settings" . "\xe690")
+    ("nf-seti-shell" . "\xe691")
+    ("nf-seti-slim" . "\xe692")
+    ("nf-seti-smarty" . "\xe693")
+    ("nf-seti-spring" . "\xe694")
+    ("nf-seti-stylelint" . "\xe695")
+    ("nf-seti-stylus" . "\xe600")
+    ("nf-seti-sublime" . "\xe696")
+    ("nf-seti-svelte" . "\xe697")
+    ("nf-seti-svg" . "\xe698")
+    ("nf-seti-swift" . "\xe699")
+    ("nf-seti-terraform" . "\xe69a")
+    ("nf-seti-tex" . "\xe69b")
+    ("nf-seti-text" . "\xe64e")
+    ("nf-seti-time_cop" . "\xe641")
+    ("nf-seti-todo" . "\xe69c")
+    ("nf-seti-tsconfig" . "\xe69d")
+    ("nf-seti-twig" . "\xe61c")
+    ("nf-seti-typescript" . "\xe628")
+    ("nf-seti-vala" . "\xe69e")
+    ("nf-seti-video" . "\xe69f")
+    ("nf-seti-vue" . "\xe6a0")
+    ("nf-seti-wasm" . "\xe6a1")
+    ("nf-seti-wat" . "\xe6a2")
+    ("nf-seti-webpack" . "\xe6a3")
+    ("nf-seti-wgt" . "\xe6a4")
+    ("nf-seti-word" . "\xe6a5")
+    ("nf-seti-xls" . "\xe6a6")
+    ("nf-seti-xml" . "\xe619")
+    ("nf-seti-yarn" . "\xe6a7")
+    ("nf-seti-yml" . "\xe6a8")
+    ("nf-seti-zig" . "\xe6a9")
+    ("nf-seti-zip" . "\xe6aa")
+    ))
+
+(provide 'nerd-icons-data-sucicon)
+;;; nerd-icons-data-sucicon.el ends here
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-sucicon.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-sucicon.elc
new file mode 100644
index 0000000..5b830c5
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-sucicon.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-wicon.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-wicon.el
new file mode 100644
index 0000000..dae61c0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-wicon.el
@@ -0,0 +1,261 @@
+;;; nerd-icons-data-wicon.el --- glyphset wicon -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; wicon
+;; from Nerd Font Version: 3.5.1
+
+;;; Code:
+
+(defvar nerd-icons/wicon-alist
+  '(
+    ("nf-weather-alien" . "\xe36e")
+    ("nf-weather-aliens" . "\xe345")
+    ("nf-weather-barometer" . "\xe372")
+    ("nf-weather-celsius" . "\xe339")
+    ("nf-weather-cloud" . "\xe33d")
+    ("nf-weather-cloud_down" . "\xe33a")
+    ("nf-weather-cloud_refresh" . "\xe33b")
+    ("nf-weather-cloud_up" . "\xe33c")
+    ("nf-weather-cloudy" . "\xe312")
+    ("nf-weather-cloudy_gusts" . "\xe310")
+    ("nf-weather-cloudy_windy" . "\xe311")
+    ("nf-weather-day_cloudy" . "\xe302")
+    ("nf-weather-day_cloudy_gusts" . "\xe300")
+    ("nf-weather-day_cloudy_high" . "\xe376")
+    ("nf-weather-day_cloudy_windy" . "\xe301")
+    ("nf-weather-day_fog" . "\xe303")
+    ("nf-weather-day_hail" . "\xe304")
+    ("nf-weather-day_haze" . "\xe3ae")
+    ("nf-weather-day_light_wind" . "\xe3bc")
+    ("nf-weather-day_lightning" . "\xe305")
+    ("nf-weather-day_rain" . "\xe308")
+    ("nf-weather-day_rain_mix" . "\xe306")
+    ("nf-weather-day_rain_wind" . "\xe307")
+    ("nf-weather-day_showers" . "\xe309")
+    ("nf-weather-day_sleet" . "\xe3aa")
+    ("nf-weather-day_sleet_storm" . "\xe362")
+    ("nf-weather-day_snow" . "\xe30a")
+    ("nf-weather-day_snow_thunderstorm" . "\xe365")
+    ("nf-weather-day_snow_wind" . "\xe35f")
+    ("nf-weather-day_sprinkle" . "\xe30b")
+    ("nf-weather-day_storm_showers" . "\xe30e")
+    ("nf-weather-day_sunny" . "\xe30d")
+    ("nf-weather-day_sunny_overcast" . "\xe30c")
+    ("nf-weather-day_thunderstorm" . "\xe30f")
+    ("nf-weather-day_windy" . "\xe37d")
+    ("nf-weather-degrees" . "\xe33e")
+    ("nf-weather-direction_down" . "\xe340")
+    ("nf-weather-direction_down_left" . "\xe33f")
+    ("nf-weather-direction_down_right" . "\xe380")
+    ("nf-weather-direction_left" . "\xe344")
+    ("nf-weather-direction_right" . "\xe349")
+    ("nf-weather-direction_up" . "\xe353")
+    ("nf-weather-direction_up_left" . "\xe37f")
+    ("nf-weather-direction_up_right" . "\xe352")
+    ("nf-weather-dust" . "\xe35d")
+    ("nf-weather-earthquake" . "\xe3be")
+    ("nf-weather-fahrenheit" . "\xe341")
+    ("nf-weather-fire" . "\xe3bf")
+    ("nf-weather-flood" . "\xe375")
+    ("nf-weather-fog" . "\xe313")
+    ("nf-weather-gale_warning" . "\xe3c5")
+    ("nf-weather-hail" . "\xe314")
+    ("nf-weather-horizon" . "\xe343")
+    ("nf-weather-horizon_alt" . "\xe342")
+    ("nf-weather-hot" . "\xe36b")
+    ("nf-weather-humidity" . "\xe373")
+    ("nf-weather-hurricane" . "\xe36c")
+    ("nf-weather-hurricane_warning" . "\xe3c7")
+    ("nf-weather-lightning" . "\xe315")
+    ("nf-weather-lunar_eclipse" . "\xe369")
+    ("nf-weather-meteor" . "\xe36a")
+    ("nf-weather-moon_alt_first_quarter" . "\xe3ce")
+    ("nf-weather-moon_alt_full" . "\xe3d5")
+    ("nf-weather-moon_alt_new" . "\xe3e3")
+    ("nf-weather-moon_alt_third_quarter" . "\xe3dc")
+    ("nf-weather-moon_alt_waning_crescent_1" . "\xe3dd")
+    ("nf-weather-moon_alt_waning_crescent_2" . "\xe3de")
+    ("nf-weather-moon_alt_waning_crescent_3" . "\xe3df")
+    ("nf-weather-moon_alt_waning_crescent_4" . "\xe3e0")
+    ("nf-weather-moon_alt_waning_crescent_5" . "\xe3e1")
+    ("nf-weather-moon_alt_waning_crescent_6" . "\xe3e2")
+    ("nf-weather-moon_alt_waning_gibbous_1" . "\xe3d6")
+    ("nf-weather-moon_alt_waning_gibbous_2" . "\xe3d7")
+    ("nf-weather-moon_alt_waning_gibbous_3" . "\xe3d8")
+    ("nf-weather-moon_alt_waning_gibbous_4" . "\xe3d9")
+    ("nf-weather-moon_alt_waning_gibbous_5" . "\xe3da")
+    ("nf-weather-moon_alt_waning_gibbous_6" . "\xe3db")
+    ("nf-weather-moon_alt_waxing_crescent_1" . "\xe3c8")
+    ("nf-weather-moon_alt_waxing_crescent_2" . "\xe3c9")
+    ("nf-weather-moon_alt_waxing_crescent_3" . "\xe3ca")
+    ("nf-weather-moon_alt_waxing_crescent_4" . "\xe3cb")
+    ("nf-weather-moon_alt_waxing_crescent_5" . "\xe3cc")
+    ("nf-weather-moon_alt_waxing_crescent_6" . "\xe3cd")
+    ("nf-weather-moon_alt_waxing_gibbous_1" . "\xe3cf")
+    ("nf-weather-moon_alt_waxing_gibbous_2" . "\xe3d0")
+    ("nf-weather-moon_alt_waxing_gibbous_3" . "\xe3d1")
+    ("nf-weather-moon_alt_waxing_gibbous_4" . "\xe3d2")
+    ("nf-weather-moon_alt_waxing_gibbous_5" . "\xe3d3")
+    ("nf-weather-moon_alt_waxing_gibbous_6" . "\xe3d4")
+    ("nf-weather-moon_first_quarter" . "\xe394")
+    ("nf-weather-moon_full" . "\xe39b")
+    ("nf-weather-moon_new" . "\xe38d")
+    ("nf-weather-moon_third_quarter" . "\xe3a2")
+    ("nf-weather-moon_waning_crescent_1" . "\xe3a3")
+    ("nf-weather-moon_waning_crescent_2" . "\xe3a4")
+    ("nf-weather-moon_waning_crescent_3" . "\xe3a5")
+    ("nf-weather-moon_waning_crescent_4" . "\xe3a6")
+    ("nf-weather-moon_waning_crescent_5" . "\xe3a7")
+    ("nf-weather-moon_waning_crescent_6" . "\xe3a8")
+    ("nf-weather-moon_waning_gibbous_1" . "\xe39c")
+    ("nf-weather-moon_waning_gibbous_2" . "\xe39d")
+    ("nf-weather-moon_waning_gibbous_3" . "\xe39e")
+    ("nf-weather-moon_waning_gibbous_4" . "\xe39f")
+    ("nf-weather-moon_waning_gibbous_5" . "\xe3a0")
+    ("nf-weather-moon_waning_gibbous_6" . "\xe3a1")
+    ("nf-weather-moon_waxing_crescent_1" . "\xe38e")
+    ("nf-weather-moon_waxing_crescent_2" . "\xe38f")
+    ("nf-weather-moon_waxing_crescent_3" . "\xe390")
+    ("nf-weather-moon_waxing_crescent_4" . "\xe391")
+    ("nf-weather-moon_waxing_crescent_5" . "\xe392")
+    ("nf-weather-moon_waxing_crescent_6" . "\xe393")
+    ("nf-weather-moon_waxing_gibbous_1" . "\xe395")
+    ("nf-weather-moon_waxing_gibbous_2" . "\xe396")
+    ("nf-weather-moon_waxing_gibbous_3" . "\xe397")
+    ("nf-weather-moon_waxing_gibbous_4" . "\xe398")
+    ("nf-weather-moon_waxing_gibbous_5" . "\xe399")
+    ("nf-weather-moon_waxing_gibbous_6" . "\xe39a")
+    ("nf-weather-moonrise" . "\xe3c1")
+    ("nf-weather-moonset" . "\xe3c2")
+    ("nf-weather-na" . "\xe374")
+    ("nf-weather-night_alt_cloudy" . "\xe37e")
+    ("nf-weather-night_alt_cloudy_gusts" . "\xe31f")
+    ("nf-weather-night_alt_cloudy_high" . "\xe377")
+    ("nf-weather-night_alt_cloudy_windy" . "\xe320")
+    ("nf-weather-night_alt_hail" . "\xe321")
+    ("nf-weather-night_alt_lightning" . "\xe322")
+    ("nf-weather-night_alt_partly_cloudy" . "\xe379")
+    ("nf-weather-night_alt_rain" . "\xe325")
+    ("nf-weather-night_alt_rain_mix" . "\xe323")
+    ("nf-weather-night_alt_rain_wind" . "\xe324")
+    ("nf-weather-night_alt_showers" . "\xe326")
+    ("nf-weather-night_alt_sleet" . "\xe3ac")
+    ("nf-weather-night_alt_sleet_storm" . "\xe364")
+    ("nf-weather-night_alt_snow" . "\xe327")
+    ("nf-weather-night_alt_snow_thunderstorm" . "\xe367")
+    ("nf-weather-night_alt_snow_wind" . "\xe361")
+    ("nf-weather-night_alt_sprinkle" . "\xe328")
+    ("nf-weather-night_alt_storm_showers" . "\xe329")
+    ("nf-weather-night_alt_thunderstorm" . "\xe32a")
+    ("nf-weather-night_clear" . "\xe32b")
+    ("nf-weather-night_cloudy" . "\xe32e")
+    ("nf-weather-night_cloudy_gusts" . "\xe32c")
+    ("nf-weather-night_cloudy_high" . "\xe378")
+    ("nf-weather-night_cloudy_windy" . "\xe32d")
+    ("nf-weather-night_fog" . "\xe346")
+    ("nf-weather-night_hail" . "\xe32f")
+    ("nf-weather-night_lightning" . "\xe330")
+    ("nf-weather-night_partly_cloudy" . "\xe37b")
+    ("nf-weather-night_rain" . "\xe333")
+    ("nf-weather-night_rain_mix" . "\xe331")
+    ("nf-weather-night_rain_wind" . "\xe332")
+    ("nf-weather-night_showers" . "\xe334")
+    ("nf-weather-night_sleet" . "\xe3ab")
+    ("nf-weather-night_sleet_storm" . "\xe363")
+    ("nf-weather-night_snow" . "\xe335")
+    ("nf-weather-night_snow_thunderstorm" . "\xe366")
+    ("nf-weather-night_snow_wind" . "\xe360")
+    ("nf-weather-night_sprinkle" . "\xe336")
+    ("nf-weather-night_storm_showers" . "\xe337")
+    ("nf-weather-night_thunderstorm" . "\xe338")
+    ("nf-weather-rain" . "\xe318")
+    ("nf-weather-rain_mix" . "\xe316")
+    ("nf-weather-rain_wind" . "\xe317")
+    ("nf-weather-raindrop" . "\xe371")
+    ("nf-weather-raindrops" . "\xe34a")
+    ("nf-weather-refresh" . "\xe348")
+    ("nf-weather-refresh_alt" . "\xe347")
+    ("nf-weather-sandstorm" . "\xe37a")
+    ("nf-weather-showers" . "\xe319")
+    ("nf-weather-sleet" . "\xe3ad")
+    ("nf-weather-small_craft_advisory" . "\xe3c4")
+    ("nf-weather-smog" . "\xe36d")
+    ("nf-weather-smoke" . "\xe35c")
+    ("nf-weather-snow" . "\xe31a")
+    ("nf-weather-snow_wind" . "\xe35e")
+    ("nf-weather-snowflake_cold" . "\xe36f")
+    ("nf-weather-solar_eclipse" . "\xe368")
+    ("nf-weather-sprinkle" . "\xe31b")
+    ("nf-weather-stars" . "\xe370")
+    ("nf-weather-storm_showers" . "\xe31c")
+    ("nf-weather-storm_warning" . "\xe3c6")
+    ("nf-weather-strong_wind" . "\xe34b")
+    ("nf-weather-sunrise" . "\xe34c")
+    ("nf-weather-sunset" . "\xe34d")
+    ("nf-weather-thermometer" . "\xe350")
+    ("nf-weather-thermometer_exterior" . "\xe34e")
+    ("nf-weather-thermometer_internal" . "\xe34f")
+    ("nf-weather-thunderstorm" . "\xe31d")
+    ("nf-weather-time_1" . "\xe382")
+    ("nf-weather-time_10" . "\xe38b")
+    ("nf-weather-time_11" . "\xe38c")
+    ("nf-weather-time_12" . "\xe381")
+    ("nf-weather-time_2" . "\xe383")
+    ("nf-weather-time_3" . "\xe384")
+    ("nf-weather-time_4" . "\xe385")
+    ("nf-weather-time_5" . "\xe386")
+    ("nf-weather-time_6" . "\xe387")
+    ("nf-weather-time_7" . "\xe388")
+    ("nf-weather-time_8" . "\xe389")
+    ("nf-weather-time_9" . "\xe38a")
+    ("nf-weather-tornado" . "\xe351")
+    ("nf-weather-train" . "\xe3c3")
+    ("nf-weather-tsunami" . "\xe3bd")
+    ("nf-weather-umbrella" . "\xe37c")
+    ("nf-weather-volcano" . "\xe3c0")
+    ("nf-weather-wind_beaufort_0" . "\xe3af")
+    ("nf-weather-wind_beaufort_1" . "\xe3b0")
+    ("nf-weather-wind_beaufort_10" . "\xe3b9")
+    ("nf-weather-wind_beaufort_11" . "\xe3ba")
+    ("nf-weather-wind_beaufort_12" . "\xe3bb")
+    ("nf-weather-wind_beaufort_2" . "\xe3b1")
+    ("nf-weather-wind_beaufort_3" . "\xe3b2")
+    ("nf-weather-wind_beaufort_4" . "\xe3b3")
+    ("nf-weather-wind_beaufort_5" . "\xe3b4")
+    ("nf-weather-wind_beaufort_6" . "\xe3b5")
+    ("nf-weather-wind_beaufort_7" . "\xe3b6")
+    ("nf-weather-wind_beaufort_8" . "\xe3b7")
+    ("nf-weather-wind_beaufort_9" . "\xe3b8")
+    ("nf-weather-wind_direction" . "\xe3a9")
+    ("nf-weather-wind_east" . "\xe35b")
+    ("nf-weather-wind_north" . "\xe35a")
+    ("nf-weather-wind_north_east" . "\xe359")
+    ("nf-weather-wind_north_west" . "\xe358")
+    ("nf-weather-wind_south" . "\xe357")
+    ("nf-weather-wind_south_east" . "\xe356")
+    ("nf-weather-wind_south_west" . "\xe355")
+    ("nf-weather-wind_west" . "\xe354")
+    ("nf-weather-windy" . "\xe31e")
+    ))
+
+(provide 'nerd-icons-data-wicon)
+;;; nerd-icons-data-wicon.el ends here
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-wicon.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-wicon.elc
new file mode 100644
index 0000000..57ca2b6
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/data/nerd-icons-data-wicon.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-autoloads.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-autoloads.el
new file mode 100644
index 0000000..8d8fba7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-autoloads.el
@@ -0,0 +1,90 @@
+;;; nerd-icons-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from nerd-icons.el
+
+(autoload 'nerd-icons-install-fonts "nerd-icons" "\
+Helper function to download and install the latests fonts based on OS.
+The provided Nerd Font is Symbols Nerd Font Mono.
+When PFX is non-nil, ignore the prompt and just install.
+On Windows only, when PFX is a path, ignore the prompt and download there.
+
+(fn &optional PFX)" t)
+(autoload 'nerd-icons-insert "nerd-icons" "\
+Interactive icon insertion function.
+When Prefix ARG is non-nil, insert the propertized icon.
+When GLYPH-SET is non-nil, limit the candidates to the icon set matching it.
+
+(fn &optional ARG GLYPH-SET)" t)
+(autoload 'nerd-icons-icon-for-dir "nerd-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.
+
+(fn DIR &rest ARG-OVERRIDES)")
+(autoload 'nerd-icons-icon-for-file "nerd-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)")
+(autoload 'nerd-icons-icon-for-extension "nerd-icons" "\
+Get the formatted icon for EXT.
+ARG-OVERRIDES should be a plist containining `:height',
+`:v-adjust' or `:face' properties like in the normal icon
+inserting functions.
+
+(fn EXT &rest ARG-OVERRIDES)")
+(autoload 'nerd-icons-icon-for-mode "nerd-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)")
+(autoload 'nerd-icons-icon-for-url "nerd-icons" "\
+Get the formatted icon for URL.
+If an icon for URL isn't found in `nerd-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)")
+(autoload 'nerd-icons-icon-for-buffer "nerd-icons" "\
+Get the formatted icon for the current buffer.
+
+ARG-OVERRIDES should be a plist containing `:height',
+`:v-adjust' or `:face' properties like in the normal icon
+inserting functions.
+
+This function prioritises the use of the buffers file extension to
+discern the icon when its `major-mode' matches its auto mode,
+otherwise it will use the buffers `major-mode' to decide its
+icon.
+
+(fn &rest ARG-OVERRIDES)")
+(register-definition-prefixes "nerd-icons" '("nerd-icons-"))
+
+;;; End of scraped data
+
+(provide 'nerd-icons-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; nerd-icons-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-data.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-data.el
new file mode 100644
index 0000000..aadf4ba
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-data.el
@@ -0,0 +1,37 @@
+;;; nerd-icons-data.el --- Nerd Icons data -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; nerd icons data
+
+;;; Code:
+
+(require 'nerd-icons-data-ipsicon   "./data/nerd-icons-data-ipsicon")
+(require 'nerd-icons-data-pomicon   "./data/nerd-icons-data-pomicon")
+(require 'nerd-icons-data-octicon   "./data/nerd-icons-data-octicon")
+(require 'nerd-icons-data-powerline "./data/nerd-icons-data-powerline")
+(require 'nerd-icons-data-faicon    "./data/nerd-icons-data-faicon")
+(require 'nerd-icons-data-wicon     "./data/nerd-icons-data-wicon")
+(require 'nerd-icons-data-sucicon   "./data/nerd-icons-data-sucicon")
+(require 'nerd-icons-data-devicon   "./data/nerd-icons-data-devicon")
+(require 'nerd-icons-data-codicon   "./data/nerd-icons-data-codicon")
+(require 'nerd-icons-data-flicon    "./data/nerd-icons-data-flicon")
+(require 'nerd-icons-data-mdicon    "./data/nerd-icons-data-mdicon")
+
+(provide 'nerd-icons-data)
+;;; nerd-icons-data.el ends here
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-data.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-data.elc
new file mode 100644
index 0000000..8981eb8
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-data.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-faces.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-faces.el
new file mode 100644
index 0000000..815ff47
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-faces.el
@@ -0,0 +1,222 @@
+;;; nerd-icons-faces.el --- A module of faces for nerd-icons -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This file contains all of the faces used by the package for
+;; colouring icons
+
+;;; Code:
+
+(defgroup nerd-icons-faces nil
+  "Manage how Nerd Font icons are coloured and themed."
+  :prefix "nerd-icons-"
+  :group 'tools
+  :group 'nerd-icons)
+
+;; red
+(defface nerd-icons-red
+  '((((background dark)) :foreground "#AC4142")
+    (((background light)) :foreground "#AC4142"))
+  "Face for red icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-lred
+  '((((background dark)) :foreground "#EB595A")
+    (((background light)) :foreground "#EB595A"))
+  "Face for lred icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-dred
+  '((((background dark)) :foreground "#843031")
+    (((background light)) :foreground "#843031"))
+  "Face for dred icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-red-alt
+  '((((background dark)) :foreground "#ce5643")
+    (((background light)) :foreground "#843031"))
+  "Face for dred icons."
+  :group 'nerd-icons-faces)
+
+;; green
+(defface nerd-icons-green
+  '((((background dark)) :foreground "#90A959")
+    (((background light)) :foreground "#90A959"))
+  "Face for green icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-lgreen
+  '((((background dark)) :foreground "#C6E87A")
+    (((background light)) :foreground "#3D6837"))
+  "Face for lgreen icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-dgreen
+  '((((background dark)) :foreground "#6D8143")
+    (((background light)) :foreground "#6D8143"))
+  "Face for dgreen icons."
+  :group 'nerd-icons-faces)
+
+;; yellow
+(defface nerd-icons-yellow
+  '((((background dark)) :foreground "#FFD446")
+    (((background light)) :foreground "#FFCC0E"))
+  "Face for yellow icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-lyellow
+  '((((background dark)) :foreground "#FFC16D")
+    (((background light)) :foreground "#FF9300"))
+  "Face for lyellow icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-dyellow
+  '((((background dark)) :foreground "#B48D56")
+    (((background light)) :foreground "#B48D56"))
+  "Face for dyellow icons."
+  :group 'nerd-icons-faces)
+
+;; blue
+(defface nerd-icons-blue
+  '((((background dark)) :foreground "#6A9FB5")
+    (((background light)) :foreground "#6A9FB5"))
+  "Face for blue icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-blue-alt
+  '((((background dark)) :foreground "#2188b6")
+    (((background light)) :foreground "#2188b6"))
+  "Face for blue icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-lblue
+  '((((background dark)) :foreground "#8FD7F4")
+    (((background light)) :foreground "#677174"))
+  "Face for lblue icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-dblue
+  '((((background dark)) :foreground "#446674")
+    (((background light)) :foreground "#446674"))
+  "Face for dblue icons."
+  :group 'nerd-icons-faces)
+
+;; maroon
+(defface nerd-icons-maroon
+  '((((background dark)) :foreground "#8F5536")
+    (((background light)) :foreground "#8F5536"))
+  "Face for maroon icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-lmaroon
+  '((((background dark)) :foreground "#CE7A4E")
+    (((background light)) :foreground "#CE7A4E"))
+  "Face for lmaroon icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-dmaroon
+  '((((background dark)) :foreground "#72584B")
+    (((background light)) :foreground "#72584B"))
+  "Face for dmaroon icons."
+  :group 'nerd-icons-faces)
+
+;; purple
+(defface nerd-icons-purple
+  '((((background dark)) :foreground "#AA759F")
+    (((background light)) :foreground "#68295B"))
+  "Face for purple icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-purple-alt
+  '((((background dark)) :foreground "#5D54E1")
+    (((background light)) :foreground "#5D54E1"))
+  "Face for purple icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-lpurple
+  '((((background dark)) :foreground "#E69DD6")
+    (((background light)) :foreground "#E69DD6"))
+  "Face for lpurple icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-dpurple
+  '((((background dark)) :foreground "#694863")
+    (((background light)) :foreground "#694863"))
+  "Face for dpurple icons."
+  :group 'nerd-icons-faces)
+
+;; orange
+(defface nerd-icons-orange
+  '((((background dark)) :foreground "#D4843E")
+    (((background light)) :foreground "#D4843E"))
+  "Face for orange icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-lorange
+  '((((background dark)) :foreground "#FFA500")
+    (((background light)) :foreground "#FFA500"))
+  "Face for lorange icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-dorange
+  '((((background dark)) :foreground "#915B2D")
+    (((background light)) :foreground "#915B2D"))
+  "Face for dorange icons."
+  :group 'nerd-icons-faces)
+
+;; cyan
+(defface nerd-icons-cyan
+  '((((background dark)) :foreground "#75B5AA")
+    (((background light)) :foreground "#75B5AA"))
+  "Face for cyan icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-cyan-alt
+  '((((background dark)) :foreground "#61dafb")
+    (((background light)) :foreground "#0595bd"))
+  "Face for cyan icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-lcyan
+  '((((background dark)) :foreground "#A5FDEC")
+    (((background light)) :foreground "#2C7D6E"))
+  "Face for lcyan icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-dcyan
+  '((((background dark)) :foreground "#48746D")
+    (((background light)) :foreground "#48746D"))
+  "Face for dcyan icons."
+  :group 'nerd-icons-faces)
+
+;; pink
+(defface nerd-icons-pink
+  '((((background dark)) :foreground "#F2B4B8")
+    (((background light)) :foreground "#FC505B"))
+  "Face for pink icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-lpink
+  '((((background dark)) :foreground "#FFBDC1")
+    (((background light)) :foreground "#FF505B"))
+  "Face for lpink icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-dpink
+  '((((background dark)) :foreground "#B18286")
+    (((background light)) :foreground "#7E5D5F"))
+  "Face for dpink icons."
+  :group 'nerd-icons-faces)
+
+;; silver
+(defface nerd-icons-silver
+  '((((background dark)) :foreground "#716E68")
+    (((background light)) :foreground "#716E68"))
+  "Face for silver icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-lsilver
+  '((((background dark)) :foreground "#B9B6AA")
+    (((background light)) :foreground "#7F7869"))
+  "Face for lsilver icons."
+  :group 'nerd-icons-faces)
+(defface nerd-icons-dsilver
+  '((((background dark)) :foreground "#838484")
+    (((background light)) :foreground "#838484"))
+  "Face for dsilver icons."
+  :group 'nerd-icons-faces)
+
+(provide 'nerd-icons-faces)
+;;; nerd-icons-faces.el ends here
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-faces.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-faces.elc
new file mode 100644
index 0000000..e73d592
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-faces.elc differ
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-pkg.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-pkg.el
new file mode 100644
index 0000000..3c9839b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons-pkg.el
@@ -0,0 +1,12 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "nerd-icons" "20260823.17"
+  "Emacs Nerd Font Icons Library."
+  '((emacs "25.1"))
+  :url "https://github.com/rainstormstudio/nerd-icons.el"
+  :commit "17faac7977242b470732efd417d3bcc8eb5a830e"
+  :revdesc "17faac797724"
+  :keywords '("lisp")
+  :authors '(("Hongyu Ding" . "rainstormstudio@yahoo.com")
+             ("Vincent Zhang" . "seagle0128@gmail.com"))
+  :maintainers '(("Hongyu Ding" . "rainstormstudio@yahoo.com")
+                 ("Vincent Zhang" . "seagle0128@gmail.com")))
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons.el b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons.el
new file mode 100644
index 0000000..9a6cb78
--- /dev/null
+++ b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons.el
@@ -0,0 +1,1525 @@
+;;; nerd-icons.el --- Emacs Nerd Font Icons Library -*- lexical-binding: t -*-
+
+;; Copyright (C) 2023 Hongyu Ding <rainstormstudio@yahoo.com>
+
+;; Author: Hongyu Ding <rainstormstudio@yahoo.com>, Vincent Zhang <seagle0128@gmail.com>
+;; Keywords: lisp
+;; Package-Version: 20260823.17
+;; Package-Revision: 17faac797724
+;; Package-Requires: ((emacs "25.1"))
+;; URL: https://github.com/rainstormstudio/nerd-icons.el
+;; Keywords: convenient, lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This package was inspired by
+
+;; - `all-the-icons', found at https://github.com/Alexander-Miller/treemacs/blob/master/src/extra/treemacs-all-the-icons.el
+;; - `vim-devicons' for Vim, found at https://github.com/ryanoasis/vim-devicons
+;; - `nvim-web-devicons' for NeoVim, found at https://github.com/nvim-tree/nvim-web-devicons
+
+;; This package provides an interface to the Nerd Fonts
+
+;; - `nerd-fonts', found at https://github.com/ryanoasis/nerd-fonts
+
+;;; Code:
+
+(require 'cl-lib)
+
+(require 'nerd-icons-data)
+(require 'nerd-icons-faces)
+
+(declare-function set-fontset-font "src/fontset.c")
+
+(defgroup nerd-icons nil
+  "Manage how Nerd Fonts formats icons."
+  :prefix "nerd-icons-"
+  :group 'appearance
+  :group 'convenience)
+
+(defcustom nerd-icons-color-icons t
+  "Whether or not to include a foreground color when formatting the icon."
+  :group 'nerd-icons
+  :type 'boolean)
+
+(defcustom nerd-icons-scale-factor 1.0
+  "The base Scale Factor for the `height' face property of an icon."
+  :group 'nerd-icons
+  :type 'number)
+
+(defcustom nerd-icons-default-adjust 0.0
+  "The default adjustment to be made to the `raise' display property of an icon."
+  :group 'nerd-icons
+  :type 'number)
+
+(defcustom nerd-icons--cache-limit 2048
+  "Maximum cache size for functions cached by `nerd-icons-cache'."
+  :group 'nerd-icons
+  :type 'integer)
+
+(defcustom nerd-icons-font-family "Symbols Nerd Font Mono"
+  "The Nerd Font for display icons."
+  :group 'nerd-icons
+  :type 'string)
+
+(defcustom nerd-icons-fonts-subdirectory nil
+  "The subdirectory within the system fonts folder where the icons are installed."
+  :group 'nerd-icons
+  :type 'directory)
+
+(defvar nerd-icons-font-names '("NFM.ttf")
+  "List of defined font file names.")
+
+(defvar nerd-icons-glyph-sets '() "List of defined icon glyph sets.")
+
+(defvar nerd-icons-extension-icon-alist
+  '(
+    ;; Shell
+    ("fish"           nerd-icons-devicon "nf-dev-terminal"       :face nerd-icons-lpink)
+    ("zsh"            nerd-icons-devicon "nf-dev-terminal"       :face nerd-icons-lcyan)
+    ("bash"           nerd-icons-devicon "nf-dev-terminal"       :face nerd-icons-purple)
+    ("sh"             nerd-icons-devicon "nf-dev-terminal"       :face nerd-icons-purple)
+    ("nu"             nerd-icons-devicon "nf-dev-terminal"       :face nerd-icons-green)
+    ("bat"            nerd-icons-codicon "nf-cod-terminal_cmd"   :face nerd-icons-lsilver)
+    ("cmd"            nerd-icons-codicon "nf-cod-terminal_cmd"   :face nerd-icons-lsilver)
+    ;; Meta
+    ("tags"           nerd-icons-octicon "nf-oct-tag"            :face nerd-icons-blue)
+    ("log"            nerd-icons-octicon "nf-oct-log"            :face nerd-icons-maroon)
+    ("changes"        nerd-icons-mdicon  "nf-md-script_text"     :face nerd-icons-cyan)
+    ("diff"           nerd-icons-octicon "nf-oct-file_diff"      :face nerd-icons-dgreen)
+    ("patch"          nerd-icons-octicon "nf-oct-file_diff"      :face nerd-icons-lgreen)
+    ;; Config
+    ("node"           nerd-icons-devicon "nf-dev-nodejs_small"   :face nerd-icons-green)
+    ("babelrc"        nerd-icons-mdicon "nf-md-babel"            :face nerd-icons-yellow)
+    ("bashrc"         nerd-icons-mdicon "nf-md-bash"             :face nerd-icons-dpink)
+    ("bowerrc"        nerd-icons-devicon "nf-dev-bower"          :face nerd-icons-silver)
+    ("cr"             nerd-icons-sucicon "nf-seti-crystal"       :face nerd-icons-yellow)
+    ("ecr"            nerd-icons-sucicon "nf-seti-crystal"       :face nerd-icons-yellow)
+    ("ini"            nerd-icons-codicon "nf-cod-settings"       :face nerd-icons-yellow)
+    ("properties"     nerd-icons-codicon "nf-cod-settings"       :face nerd-icons-yellow)
+    ("eslintignore"   nerd-icons-mdicon "nf-md-eslint"           :face nerd-icons-purple)
+    ("eslint"         nerd-icons-mdicon "nf-md-eslint"           :face nerd-icons-lpurple)
+    ("git"            nerd-icons-sucicon "nf-seti-git"           :face nerd-icons-lred)
+    ("gitattributes"  nerd-icons-sucicon "nf-seti-git"           :face nerd-icons-lred)
+    ("gitignore"      nerd-icons-sucicon "nf-seti-git"           :face nerd-icons-lred)
+    ("gitmodules"     nerd-icons-sucicon "nf-seti-git"           :face nerd-icons-lred)
+    ("mk"             nerd-icons-devicon "nf-dev-gnu"            :face nerd-icons-dorange)
+    ("cmake"          nerd-icons-devicon "nf-dev-cmake"          :face nerd-icons-lgreen)
+    ("dockerignore"   nerd-icons-devicon "nf-dev-docker"         :face nerd-icons-dblue)
+    ("plist"          nerd-icons-faicon "nf-fa-file_code"        :face nerd-icons-dsilver)
+    ("xml"            nerd-icons-faicon "nf-fa-file_code_o"      :face nerd-icons-lorange)
+    ("json"           nerd-icons-mdicon "nf-md-code_json"        :face nerd-icons-yellow)
+    ("jsonc"          nerd-icons-mdicon "nf-md-code_json"        :face nerd-icons-yellow)
+    ("jsonl"          nerd-icons-mdicon "nf-md-code_json"        :face nerd-icons-yellow)
+    ("cson"           nerd-icons-codicon "nf-cod-settings"       :face nerd-icons-yellow)
+    ("yml"            nerd-icons-codicon "nf-cod-settings"       :face nerd-icons-dyellow)
+    ("yaml"           nerd-icons-codicon "nf-cod-settings"       :face nerd-icons-dyellow)
+    ("toml"           nerd-icons-sucicon "nf-custom-toml"        :face nerd-icons-orange)
+    ("conf"           nerd-icons-codicon "nf-cod-settings"       :face nerd-icons-dorange)
+    ("editorconfig"   nerd-icons-sucicon "nf-seti-editorconfig"  :face nerd-icons-silver)
+    ("idekeybindings" nerd-icons-faicon "nf-fa-file_code_o"      :face nerd-icons-lblue)
+    ("cfg"            nerd-icons-codicon "nf-cod-settings"       :face nerd-icons-dorange)
+    ("env"            nerd-icons-codicon "nf-cod-settings"       :face nerd-icons-yellow)
+    ;; ?
+    ("pkg"            nerd-icons-octicon "nf-oct-package"        :face nerd-icons-dsilver)
+    ("rpm"            nerd-icons-octicon "nf-oct-package"        :face nerd-icons-dsilver)
+    ("spec"           nerd-icons-mdicon "nf-md-file_document_plus"  :face nerd-icons-red)
+    ("pkgbuild"       nerd-icons-octicon "nf-oct-package"        :face nerd-icons-dsilver)
+    ("elc"            nerd-icons-octicon "nf-oct-file_binary"    :face nerd-icons-dsilver)
+    ("eln"            nerd-icons-octicon "nf-oct-file_binary"    :face nerd-icons-dsilver)
+    ("gz"             nerd-icons-octicon "nf-oct-file_binary"    :face nerd-icons-lmaroon)
+    ("zip"            nerd-icons-octicon "nf-oct-file_zip"       :face nerd-icons-lmaroon)
+    ("7z"             nerd-icons-octicon "nf-oct-file_zip"       :face nerd-icons-lmaroon)
+    ("zst"            nerd-icons-octicon "nf-oct-file_zip"       :face nerd-icons-lmaroon)
+    ("dat"            nerd-icons-faicon "nf-fa-bar_chart"        :face nerd-icons-cyan)
+    ("dmg"            nerd-icons-octicon "nf-oct-tools"          :face nerd-icons-lsilver)
+    ("dll"            nerd-icons-faicon "nf-fa-cogs"             :face nerd-icons-silver)
+    ("ds_store"       nerd-icons-faicon "nf-fa-cogs"             :face nerd-icons-silver)
+    ("exe"            nerd-icons-octicon "nf-oct-file_binary"    :face nerd-icons-dsilver)
+    ("msg"            nerd-icons-octicon "nf-oct-mail"           :face nerd-icons-dsilver)
+    ;; Diff
+    ("diff"           nerd-icons-octicon "nf-oct-file_diff"      :face nerd-icons-lred)
+    ("patch"          nerd-icons-octicon "nf-oct-file_diff"      :face nerd-icons-lred)
+    ;; Interface Builder
+    ("nib"            nerd-icons-mdicon "nf-md-fountain_pen_tip" :face nerd-icons-lsilver)
+    ("xib"            nerd-icons-mdicon "nf-md-fountain_pen_tip" :face nerd-icons-lsilver)
+    ;; Source Codes
+    ("ada"            nerd-icons-sucicon "nf-custom-ada"         :face nerd-icons-blue)
+    ("adb"            nerd-icons-sucicon "nf-custom-ada"         :face nerd-icons-blue)
+    ("adc"            nerd-icons-sucicon "nf-custom-ada"         :face nerd-icons-blue)
+    ("ads"            nerd-icons-sucicon "nf-custom-ada"         :face nerd-icons-blue)
+    ("gpr"            nerd-icons-sucicon "nf-custom-ada"         :face nerd-icons-green)
+    ("cgpr"           nerd-icons-sucicon "nf-custom-ada"         :face nerd-icons-green)
+    ("scpt"           nerd-icons-devicon "nf-dev-apple"          :face nerd-icons-pink)
+    ("awk"            nerd-icons-devicon "nf-dev-awk"            :face nerd-icons-yellow)
+    ;; ("aup"         nerd-icons-fileicon "audacity") TODO: audacity
+    ("elm"            nerd-icons-sucicon "nf-seti-elm"           :face nerd-icons-blue)
+    ("erl"            nerd-icons-devicon "nf-dev-erlang"         :face nerd-icons-red)
+    ("hrl"            nerd-icons-devicon "nf-dev-erlang"         :face nerd-icons-dred)
+    ("eex"            nerd-icons-sucicon "nf-seti-elixir"        :face nerd-icons-lorange)
+    ("leex"           nerd-icons-sucicon "nf-seti-elixir"        :face nerd-icons-lorange)
+    ("heex"           nerd-icons-sucicon "nf-seti-elixir"        :face nerd-icons-lorange)
+    ("ex"             nerd-icons-sucicon "nf-seti-elixir"        :face nerd-icons-lpurple)
+    ("exs"            nerd-icons-sucicon "nf-seti-elixir"        :face nerd-icons-lred)
+    ("livemd"         nerd-icons-sucicon "nf-seti-elixir"        :face nerd-icons-lblue)
+    ("java"           nerd-icons-devicon "nf-dev-java"           :face nerd-icons-purple)
+    ("groovy"         nerd-icons-devicon "nf-dev-groovy"         :face nerd-icons-cyan)
+    ("gradle"         nerd-icons-sucicon "nf-seti-gradle"        :face nerd-icons-silver)
+    ("ebuild"         nerd-icons-mdicon "nf-md-gentoo"           :face nerd-icons-cyan)
+    ("eclass"         nerd-icons-mdicon "nf-md-gentoo"           :face nerd-icons-blue)
+    ("go"             nerd-icons-sucicon "nf-seti-go2"           :face nerd-icons-blue)
+    ("jl"             nerd-icons-sucicon "nf-seti-julia"         :face nerd-icons-purple)
+    ("magik"          nerd-icons-faicon "nf-fa-magic"            :face nerd-icons-blue)
+    ("matlab"         nerd-icons-devicon "nf-dev-matlab"         :face nerd-icons-orange)
+    ("nix"            nerd-icons-mdicon "nf-md-nix"              :face nerd-icons-blue)
+    ("pl"             nerd-icons-sucicon "nf-seti-perl"          :face nerd-icons-lorange)
+    ("pm"             nerd-icons-sucicon "nf-seti-perl"          :face nerd-icons-lorange)
+    ;; ("pl6"         nerd-icons-devicon"raku") TODO: raku
+    ;; ("pm6"         nerd-icons-devicon "raku") TODO: raku
+    ("pod"            nerd-icons-devicon "nf-dev-perl"           :face nerd-icons-lgreen)
+    ("php"            nerd-icons-devicon "nf-dev-php"            :face nerd-icons-lsilver)
+    ;; ("pony"        nerd-icons-devicon "pony") TODO: pony
+    ("ps1"            nerd-icons-mdicon "nf-md-powershell"       :face nerd-icons-blue)
+    ("pro"            nerd-icons-sucicon "nf-seti-prolog"        :face nerd-icons-lmaroon)
+    ("proog"          nerd-icons-sucicon "nf-seti-prolog"        :face nerd-icons-lmaroon)
+    ("py"             nerd-icons-devicon "nf-dev-python"         :face nerd-icons-dblue)
+    ("pyc"            nerd-icons-devicon "nf-dev-python"         :face nerd-icons-dsilver)
+    ;; ("idr"         nerd-icons-devicon "idris") TODO: idris
+    ("ipynb"          nerd-icons-devicon "nf-dev-jupyter"        :face nerd-icons-orange)
+    ("gem"            nerd-icons-codicon "nf-cod-ruby"           :face nerd-icons-red)
+    ;; ("raku"        nerd-icons-devicon "raku") TODO: raku
+    ;; ("rakumod"     nerd-icons-devicon "raku") TODO: raku
+    ("qml"            nerd-icons-devicon "nf-dev-qt"             :face nerd-icons-yellow)
+    ("rb"             nerd-icons-codicon "nf-cod-ruby"           :face nerd-icons-lred)
+    ("rs"             nerd-icons-devicon "nf-dev-rust"           :face nerd-icons-maroon)
+    ("rlib"           nerd-icons-devicon "nf-dev-rust"           :face nerd-icons-dmaroon)
+    ("ron"            nerd-icons-devicon "nf-dev-rust"           :face nerd-icons-dorange)
+    ("r"              nerd-icons-sucicon "nf-seti-r"             :face nerd-icons-lblue)
+    ("rd"             nerd-icons-sucicon "nf-seti-r"             :face nerd-icons-lblue)
+    ("rdx"            nerd-icons-sucicon "nf-seti-r"             :face nerd-icons-lblue)
+    ("rsx"            nerd-icons-sucicon "nf-seti-r"             :face nerd-icons-lblue)
+    ("svelte"         nerd-icons-sucicon "nf-seti-svelte"        :face nerd-icons-red)
+    ("gql"            nerd-icons-mdicon "nf-md-graphql"          :face nerd-icons-dpink)
+    ("graphql"        nerd-icons-mdicon "nf-md-graphql"          :face nerd-icons-dpink)
+    ;; There seems to be a a bug with this font icon which does not
+    ;; let you propertise it without it reverting to being a lower
+    ;; case phi
+    ("c"              nerd-icons-sucicon "nf-custom-c"           :face nerd-icons-blue)
+    ("h"              nerd-icons-faicon "nf-fa-h_square"         :face nerd-icons-purple)
+    ("m"              nerd-icons-devicon "nf-dev-apple" )
+    ("mm"             nerd-icons-devicon "nf-dev-apple" )
+    ;;
+    ("cc"             nerd-icons-sucicon "nf-custom-cpp"         :face nerd-icons-blue)
+    ("cpp"            nerd-icons-sucicon "nf-custom-cpp"         :face nerd-icons-blue)
+    ("cxx"            nerd-icons-sucicon "nf-custom-cpp"         :face nerd-icons-blue)
+    ("hh"             nerd-icons-sucicon "nf-custom-cpp"         :face nerd-icons-purple)
+    ("hpp"            nerd-icons-sucicon "nf-custom-cpp"         :face nerd-icons-purple)
+    ("hxx"            nerd-icons-sucicon "nf-custom-cpp"         :face nerd-icons-purple)
+    ("o"              nerd-icons-codicon "nf-cod-file_binary"    :face nerd-icons-dsilver)
+    ;; Lisps
+    ("cl"             nerd-icons-sucicon "nf-custom-common_lisp" :face nerd-icons-lorange)
+    ("l"              nerd-icons-sucicon "nf-custom-scheme"      :face nerd-icons-orange)
+    ("lisp"           nerd-icons-sucicon "nf-custom-scheme"      :face nerd-icons-orange)
+    ;; ("hy"             nerd-icons-sucicon "nf-custom-hy"          :face nerd-icons-blue)
+    ("el"             nerd-icons-sucicon "nf-custom-emacs"       :face nerd-icons-purple)
+    ("eld"            nerd-icons-sucicon "nf-custom-emacs"       :face nerd-icons-purple)
+    ("fnl"            nerd-icons-sucicon "nf-custom-fennel"      :face nerd-icons-green)
+    ("clj"            nerd-icons-devicon "nf-dev-clojure"        :face nerd-icons-blue)
+    ("cljc"           nerd-icons-devicon "nf-dev-clojure"        :face nerd-icons-blue)
+    ("cljd"           nerd-icons-devicon "nf-dev-clojure"        :face nerd-icons-green)
+    ("cljs"           nerd-icons-devicon "nf-dev-clojure"        :face nerd-icons-lyellow)
+    ;; autotools and related
+    ("m4"             nerd-icons-mdicon "nf-md-file_cog"         :face nerd-icons-lsilver)
+    ("am"             nerd-icons-sucicon "nf-seti-makefile"      :face nerd-icons-lsilver)
+    ;;
+    ("coffee"         nerd-icons-devicon "nf-dev-coffeescript"   :face nerd-icons-maroon)
+    ("iced"           nerd-icons-devicon "nf-dev-coffeescript"   :face nerd-icons-lmaroon)
+    ("dart"           nerd-icons-devicon "nf-dev-dart"           :face nerd-icons-blue)
+    ("ledger"         nerd-icons-mdicon  "nf-md-file_table_box_multiple" :face nerd-icons-green)
+    ("rkt"            nerd-icons-sucicon "nf-custom-scheme"      :face nerd-icons-red)
+    ("scrbl"          nerd-icons-sucicon "nf-custom-scheme"      :face nerd-icons-blue)
+    ;; Vim
+    ("vim"            nerd-icons-sucicon "nf-custom-vim"         :face nerd-icons-dgreen)
+    ;; Stylesheeting
+    ("css"            nerd-icons-devicon "nf-dev-css3"           :face nerd-icons-yellow)
+    ("scss"           nerd-icons-mdicon "nf-md-sass"             :face nerd-icons-pink)
+    ("sass"           nerd-icons-mdicon "nf-md-sass"             :face nerd-icons-dpink)
+    ("less"           nerd-icons-devicon "nf-dev-less"           :face nerd-icons-dyellow)
+    ;; ("postcss"     nerd-icons-devicon "postcss") TODO: postcss
+    ;; ("sss"         nerd-icons-devicon "postcss") TODO: postcss
+    ("styl"           nerd-icons-devicon "nf-dev-stylus"         :face nerd-icons-lgreen)
+    ("csv"            nerd-icons-octicon "nf-oct-graph"          :face nerd-icons-dblue)
+    ("tsv"            nerd-icons-octicon "nf-oct-graph"          :face nerd-icons-dblue)
+    ;; haskell
+    ("hs"             nerd-icons-devicon "nf-dev-haskell"        :face nerd-icons-red)
+    ("hx"             nerd-icons-sucicon "nf-seti-haxe"          :face nerd-icons-orange)
+    ("chs"            nerd-icons-devicon "nf-dev-haskell"        :face nerd-icons-red)
+    ("lhs"            nerd-icons-devicon "nf-dev-haskell"        :face nerd-icons-red)
+    ("hsc"            nerd-icons-devicon "nf-dev-haskell"        :face nerd-icons-red)
+    ;; Web modes
+    ("inky-haml"      nerd-icons-sucicon "nf-seti-haml"          :face nerd-icons-lyellow)
+    ("haml"           nerd-icons-sucicon "nf-seti-haml"          :face nerd-icons-lyellow)
+    ("htm"            nerd-icons-devicon "nf-dev-html5"          :face nerd-icons-orange)
+    ("html"           nerd-icons-devicon "nf-dev-html5"          :face nerd-icons-orange)
+    ("inky-er"        nerd-icons-devicon "nf-dev-html5"          :face nerd-icons-lred)
+    ("inky-erb"       nerd-icons-devicon "nf-dev-html5"          :face nerd-icons-lred)
+    ("erb"            nerd-icons-devicon "nf-dev-html5"          :face nerd-icons-lred)
+    ;; ("hbs"         nerd-icons-fileicon "moustache") TODO: moustache
+    ("inky-slim"      nerd-icons-codicon "nf-cod-dashboard"      :face nerd-icons-yellow)
+    ("slim"           nerd-icons-codicon "nf-cod-dashboard"      :face nerd-icons-yellow)
+    ("jade"           nerd-icons-sucicon "nf-seti-jade"          :face nerd-icons-red)
+    ("pug"            nerd-icons-sucicon "nf-seti-pug"           :face nerd-icons-red)
+    ;; WASM
+    ("wasm"           nerd-icons-sucicon "nf-seti-wasm"          :face nerd-icons-purple-alt)
+    ("wat"            nerd-icons-devicon "nf-dev-wasm"           :face nerd-icons-purple-alt)
+    ;; Javascript
+    ("d3js"           nerd-icons-devicon "nf-dev-d3js"           :face nerd-icons-orange)
+    ("re"             nerd-icons-sucicon "nf-seti-reasonml"      :face nerd-icons-red-alt)
+    ("rei"            nerd-icons-sucicon "nf-seti-reasonml"      :face nerd-icons-dred)
+    ("ml"             nerd-icons-sucicon "nf-seti-ocaml"         :face nerd-icons-lpink)
+    ("mli"            nerd-icons-sucicon "nf-seti-ocaml"         :face nerd-icons-dpink)
+    ("react"          nerd-icons-devicon "nf-dev-react"          :face nerd-icons-lblue)
+    ("ts"             nerd-icons-mdicon "nf-md-language_typescript"  :face nerd-icons-blue-alt)
+    ("js"             nerd-icons-devicon "nf-dev-javascript"     :face nerd-icons-yellow)
+    ("es"             nerd-icons-devicon "nf-dev-javascript"     :face nerd-icons-yellow)
+    ("jsx"            nerd-icons-devicon "nf-dev-react"          :face nerd-icons-lblue)
+    ("tsx"            nerd-icons-devicon "nf-dev-react"          :face nerd-icons-lblue)
+    ("njs"            nerd-icons-mdicon "nf-md-nodejs"           :face nerd-icons-lgreen)
+    ("vue"            nerd-icons-sucicon "nf-seti-vue"           :face nerd-icons-lgreen)
+    ("mjs"            nerd-icons-devicon "nf-dev-javascript"     :face nerd-icons-yellow)
+    ("cjs"            nerd-icons-devicon "nf-dev-javascript"     :face nerd-icons-yellow)
+
+    ("sbt"            nerd-icons-sucicon "nf-seti-sbt"           :face nerd-icons-red)
+    ("scala"          nerd-icons-devicon "nf-dev-scala"          :face nerd-icons-red)
+    ("scm"            nerd-icons-sucicon "nf-custom-scheme"      :face nerd-icons-red)
+    ("swift"          nerd-icons-devicon "nf-dev-swift"          :face nerd-icons-lred)
+
+    ("tcl"            nerd-icons-mdicon "nf-md-feather"          :face nerd-icons-dred)
+    ("exp"            nerd-icons-mdicon "nf-md-feather"          :face nerd-icons-dred)
+
+    ("tf"             nerd-icons-mdicon "nf-md-terraform"        :face nerd-icons-purple-alt)
+    ("tfvars"         nerd-icons-mdicon "nf-md-terraform"        :face nerd-icons-purple-alt)
+    ("tfstate"        nerd-icons-mdicon "nf-md-terraform"        :face nerd-icons-purple-alt)
+    ("tfbackend"      nerd-icons-mdicon "nf-md-terraform"        :face nerd-icons-purple-alt)
+
+    ("asm"            nerd-icons-sucicon "nf-seti-asm"           :face nerd-icons-blue)
+    ;; Verilog(-AMS) and SystemVerilog(-AMS     ;; Verilog(-AMS) and SystemVerilog(-AMS)
+    ("v"              nerd-icons-mdicon "nf-md-chip"             :face nerd-icons-red)
+    ("vams"           nerd-icons-mdicon "nf-md-chip"             :face nerd-icons-red)
+    ("sv"             nerd-icons-mdicon "nf-md-chip"             :face nerd-icons-red)
+    ("sva"            nerd-icons-mdicon "nf-md-chip"             :face nerd-icons-red)
+    ("svh"            nerd-icons-mdicon "nf-md-chip"             :face nerd-icons-red)
+    ("svams"          nerd-icons-mdicon "nf-md-chip"             :face nerd-icons-red)
+    ;; VHDL(-AMS     ;; VHDL(-AMS)
+    ("vhd"            nerd-icons-octicon "nf-oct-cpu"            :face nerd-icons-blue)
+    ("vhdl"           nerd-icons-octicon "nf-oct-cpu"            :face nerd-icons-blue)
+    ("vhms"           nerd-icons-octicon "nf-oct-cpu"            :face nerd-icons-blue)
+    ;; Cabal
+    ;; ("cabal"       nerd-icons-devicon "cabal") TODO: cabal
+    ;; Kotlin
+    ("kt"             nerd-icons-sucicon "nf-seti-kotlin"        :face nerd-icons-orange)
+    ("kts"            nerd-icons-sucicon "nf-seti-kotlin"        :face nerd-icons-orange)
+    ;; Nimrod
+    ("nim"            nerd-icons-sucicon "nf-seti-nim"           :face nerd-icons-yellow)
+    ("nims"           nerd-icons-sucicon "nf-seti-nim"           :face nerd-icons-yellow)
+    ;; SQL
+    ("sql"            nerd-icons-octicon "nf-oct-database"       :face nerd-icons-silver)
+    ;; Styles
+    ;; ("styles"      nerd-icons-devicon "style") TODO: style
+    ;; Lua
+    ("lua"            nerd-icons-sucicon "nf-seti-lua"           :face nerd-icons-dblue)
+    ;; ASCII doc
+    ;; ("adoc"        nerd-icons-devicon "asciidoc") TODO: asciidoc
+    ;; ("asciidoc"    nerd-icons-devicon "asciidoc") TODO: asciidoc
+    ;; Puppet
+    ("pp"             nerd-icons-sucicon "nf-seti-puppet"        :face nerd-icons-yellow)
+    ;; Jinja
+    ("j2"             nerd-icons-sucicon "nf-seti-jinja"         :face nerd-icons-silver)
+    ("jinja2"         nerd-icons-sucicon "nf-seti-jinja"         :face nerd-icons-silver)
+    ;; Docker
+    ("dockerfile"     nerd-icons-sucicon "nf-seti-docker"        :face nerd-icons-cyan)
+    ;; Vagrant
+    ;; ("vagrantfile" nerd-icons-fileicon "vagrant") TODO: vagrant
+    ;; HLSL
+    ("hlsl"           nerd-icons-faicon "nf-fa-paint_brush"      :face nerd-icons-blue)
+    ;; GLSL
+    ("glsl"           nerd-icons-faicon "nf-fa-paint_brush"      :face nerd-icons-blue)
+    ("vert"           nerd-icons-faicon "nf-fa-paint_brush"      :face nerd-icons-blue)
+    ("tesc"           nerd-icons-faicon "nf-fa-paint_brush"      :face nerd-icons-purple)
+    ("tese"           nerd-icons-faicon "nf-fa-paint_brush"      :face nerd-icons-dpurple)
+    ("geom"           nerd-icons-faicon "nf-fa-paint_brush"      :face nerd-icons-green)
+    ("frag"           nerd-icons-faicon "nf-fa-paint_brush"      :face nerd-icons-red)
+    ("comp"           nerd-icons-faicon "nf-fa-paint_brush"      :face nerd-icons-dblue)
+    ;; WGSL
+    ("wgsl"           nerd-icons-faicon "nf-fa-paint_brush"      :face nerd-icons-blue)
+    ;; CUDA
+    ("cu"             nerd-icons-sucicon "nf-custom-c"           :face nerd-icons-green)
+    ("cuh"            nerd-icons-faicon "nf-fa-h_square"         :face nerd-icons-green)
+    ;; Fortran
+    ("f90"            nerd-icons-mdicon "nf-md-language_fortran" :face nerd-icons-purple)
+    ;; C#
+    ("cs"             nerd-icons-mdicon "nf-md-language_csharp"  :face nerd-icons-dblue)
+    ("csx"            nerd-icons-mdicon "nf-md-language_csharp"  :face nerd-icons-dblue)
+    ;; F#
+    ("fs"             nerd-icons-devicon "nf-dev-fsharp"         :face nerd-icons-blue-alt)
+    ("fsi"            nerd-icons-devicon "nf-dev-fsharp"         :face nerd-icons-blue-alt)
+    ("fsx"            nerd-icons-devicon "nf-dev-fsharp"         :face nerd-icons-blue-alt)
+    ("fsscript"       nerd-icons-devicon "nf-dev-fsharp"         :face nerd-icons-blue-alt)
+    ;; Godot / GDScript
+    ("gd"             nerd-icons-sucicon "nf-seti-godot"         :face nerd-icons-blue)
+    ("tscn"           nerd-icons-codicon "nf-cod-settings"       :face nerd-icons-orange)
+    ("tres"           nerd-icons-codicon "nf-cod-settings"       :face nerd-icons-orange)
+    ;; zig
+    ("zig"            nerd-icons-sucicon "nf-seti-zig"           :face nerd-icons-orange)
+    ;; odin
+    ;; ("odin"        nerd-icons-fileicon "odin") TODO: odin
+    ;; File Types
+    ("avci"           nerd-icons-mdicon "nf-md-image"            :face nerd-icons-dred)
+    ("avcs"           nerd-icons-mdicon "nf-md-image_album"      :face nerd-icons-lmaroon)
+    ("avif"           nerd-icons-mdicon "nf-md-image"            :face nerd-icons-dred)
+    ("ico"            nerd-icons-octicon "nf-oct-file_media"     :face nerd-icons-blue)
+    ("png"            nerd-icons-mdicon "nf-md-file_png_box"     :face nerd-icons-orange)
+    ("gif"            nerd-icons-mdicon "nf-md-file_gif_box"     :face nerd-icons-green)
+    ("heic"           nerd-icons-mdicon "nf-md-image"            :face nerd-icons-dred)
+    ("heics"          nerd-icons-mdicon "nf-md-image_album"      :face nerd-icons-lmaroon)
+    ("heif"           nerd-icons-mdicon "nf-md-image"            :face nerd-icons-dred)
+    ("heifs"          nerd-icons-mdicon "nf-md-image_album"      :face nerd-icons-lmaroon)
+    ("jpeg"           nerd-icons-mdicon "nf-md-file_jpg_box"     :face nerd-icons-dblue)
+    ("jpg"            nerd-icons-mdicon "nf-md-file_jpg_box"     :face nerd-icons-dblue)
+    ("webp"           nerd-icons-octicon "nf-oct-file_media"     :face nerd-icons-dblue)
+    ("xpm"            nerd-icons-octicon "nf-oct-file_media"     :face nerd-icons-dgreen)
+    ("cb7"            nerd-icons-mdicon "nf-md-image_album"      :face nerd-icons-lmaroon)
+    ("cba"            nerd-icons-mdicon "nf-md-image_album"      :face nerd-icons-lmaroon)
+    ("cbr"            nerd-icons-mdicon "nf-md-image_album"      :face nerd-icons-lmaroon)
+    ("cbt"            nerd-icons-mdicon "nf-md-image_album"      :face nerd-icons-lmaroon)
+    ("cbz"            nerd-icons-mdicon "nf-md-image_album"      :face nerd-icons-lmaroon)
+    ;; Audio
+    ("mp3"            nerd-icons-faicon "nf-fa-music"                  :face nerd-icons-dred)
+    ("wav"            nerd-icons-faicon "nf-fa-music"                  :face nerd-icons-dred)
+    ("m4a"            nerd-icons-faicon "nf-fa-music"                  :face nerd-icons-dred)
+    ("m4b"            nerd-icons-faicon "nf-fa-music"                  :face nerd-icons-green)
+    ("ogg"            nerd-icons-faicon "nf-fa-music"                  :face nerd-icons-dred)
+    ("flac"           nerd-icons-faicon "nf-fa-music"                  :face nerd-icons-dred)
+    ("opus"           nerd-icons-faicon "nf-fa-music"                  :face nerd-icons-dred)
+    ("au"             nerd-icons-faicon "nf-fa-music"                  :face nerd-icons-dred)
+    ("aif"            nerd-icons-faicon "nf-fa-music"                  :face nerd-icons-dred)
+    ("aifc"           nerd-icons-faicon "nf-fa-music"                  :face nerd-icons-dred)
+    ("aiff"           nerd-icons-faicon "nf-fa-music"                  :face nerd-icons-dred)
+    ("svg"            nerd-icons-sucicon "nf-seti-svg"                 :face nerd-icons-lgreen)
+    ("m3u"            nerd-icons-mdicon "nf-md-playlist_music_outline" :face nerd-icons-lred)
+    ("m3u8"           nerd-icons-mdicon "nf-md-playlist_music_outline" :face nerd-icons-lred)
+    ("cue"            nerd-icons-mdicon "nf-md-playlist_music_outline" :face nerd-icons-lblue)
+
+    ;; Video
+    ("mov"            nerd-icons-faicon "nf-fa-film"             :face nerd-icons-blue)
+    ("mp4"            nerd-icons-faicon "nf-fa-film"             :face nerd-icons-blue)
+    ("ogv"            nerd-icons-faicon "nf-fa-film"             :face nerd-icons-dblue)
+    ("mpg"            nerd-icons-faicon "nf-fa-film"             :face nerd-icons-blue)
+    ("mpeg"           nerd-icons-faicon "nf-fa-film"             :face nerd-icons-blue)
+    ("flv"            nerd-icons-faicon "nf-fa-film"             :face nerd-icons-blue)
+    ("ogv"            nerd-icons-faicon "nf-fa-film"             :face nerd-icons-dblue)
+    ("mkv"            nerd-icons-faicon "nf-fa-film"             :face nerd-icons-blue)
+    ("webm"           nerd-icons-faicon "nf-fa-film"             :face nerd-icons-blue)
+    ;; Fonts
+    ("ttf"            nerd-icons-faicon "nf-fa-font"             :face nerd-icons-dcyan)
+    ("otf"            nerd-icons-faicon "nf-fa-font"             :face nerd-icons-dcyan)
+    ("woff"           nerd-icons-faicon "nf-fa-font"             :face nerd-icons-cyan)
+    ("woff2"          nerd-icons-faicon "nf-fa-font"             :face nerd-icons-cyan)
+    ;; Archives
+    ("iso"            nerd-icons-mdicon "nf-md-disc"            :face nerd-icons-orange)
+    ("tar"            nerd-icons-mdicon "nf-md-zip_box"          :face nerd-icons-orange)
+    ("rar"            nerd-icons-mdicon "nf-md-zip_box"          :face nerd-icons-orange)
+    ("tgz"            nerd-icons-mdicon "nf-md-zip_box"          :face nerd-icons-orange)
+    ("jar"            nerd-icons-devicon "nf-dev-java"           :face nerd-icons-dpurple)
+    ("cpio"           nerd-icons-sucicon "nf-seti-zip"           :face nerd-icons-orange)
+    ("obscpio"        nerd-icons-sucicon "nf-seti-zip"           :face nerd-icons-orange)
+    ;; Doc
+    ("pdf"            nerd-icons-codicon "nf-cod-file_pdf"       :face nerd-icons-dred)
+    ("text"           nerd-icons-faicon "nf-fa-file_text"        :face nerd-icons-cyan)
+    ("txt"            nerd-icons-faicon "nf-fa-file_text"        :face nerd-icons-cyan)
+    ("doc"            nerd-icons-mdicon "nf-md-file_word"        :face nerd-icons-blue)
+    ("docx"           nerd-icons-mdicon "nf-md-file_word"        :face nerd-icons-blue)
+    ("docm"           nerd-icons-mdicon "nf-md-file_word"        :face nerd-icons-blue)
+    ("texi"           nerd-icons-sucicon "nf-seti-tex"           :face nerd-icons-lred)
+    ("tex"            nerd-icons-sucicon "nf-seti-tex"           :face nerd-icons-lred)
+    ("ltx"            nerd-icons-sucicon "nf-seti-tex"           :face nerd-icons-lred)
+    ("dtx"            nerd-icons-sucicon "nf-seti-tex"           :face nerd-icons-lred)
+    ("sty"            nerd-icons-sucicon "nf-seti-tex"           :face nerd-icons-lred)
+    ("md"             nerd-icons-octicon "nf-oct-markdown"       :face nerd-icons-lblue)
+    ("bib"            nerd-icons-mdicon "nf-md-book"             :face nerd-icons-lblue)
+    ("org"            nerd-icons-sucicon "nf-custom-orgmode"     :face nerd-icons-lgreen)
+    ("org_archive"    nerd-icons-sucicon "nf-custom-orgmode"     :face nerd-icons-lgreen)
+    ("pps"            nerd-icons-mdicon "nf-md-file_powerpoint"  :face nerd-icons-orange)
+    ("ppt"            nerd-icons-mdicon "nf-md-file_powerpoint"  :face nerd-icons-orange)
+    ("pptx"           nerd-icons-mdicon "nf-md-file_powerpoint"  :face nerd-icons-orange)
+    ("pptsx"          nerd-icons-mdicon "nf-md-file_powerpoint"  :face nerd-icons-orange)
+    ("ppttx"          nerd-icons-mdicon "nf-md-file_powerpoint"  :face nerd-icons-orange)
+    ("knt"            nerd-icons-mdicon "nf-md-file_powerpoint"  :face nerd-icons-cyan)
+    ("xlsx"           nerd-icons-mdicon "nf-md-file_excel"       :face nerd-icons-dgreen)
+    ("xlsm"           nerd-icons-mdicon "nf-md-file_excel"       :face nerd-icons-dgreen)
+    ("xlsb"           nerd-icons-mdicon "nf-md-file_excel"       :face nerd-icons-dgreen)
+    ("xltx"           nerd-icons-mdicon "nf-md-file_excel"       :face nerd-icons-dgreen)
+    ("xltm"           nerd-icons-mdicon "nf-md-file_excel"       :face nerd-icons-dgreen)
+    ("epub"           nerd-icons-mdicon "nf-md-book_open"        :face nerd-icons-green)
+    ("ly"             nerd-icons-faicon "nf-fa-music"            :face nerd-icons-green)
+    ;;
+    ("key"            nerd-icons-octicon "nf-oct-key"            :face nerd-icons-lblue)
+    ("pem"            nerd-icons-octicon "nf-oct-key"            :face nerd-icons-orange)
+    ("p12"            nerd-icons-octicon "nf-oct-key"            :face nerd-icons-dorange)
+    ("crt"            nerd-icons-octicon "nf-oct-key"            :face nerd-icons-lblue)
+    ("pub"            nerd-icons-octicon "nf-oct-key"            :face nerd-icons-blue)
+    ("gpg"            nerd-icons-octicon "nf-oct-key"            :face nerd-icons-lblue)
+    ("kdb"            nerd-icons-octicon "nf-oct-key"            :face nerd-icons-green)
+    ("kdbx"           nerd-icons-octicon "nf-oct-key"            :face nerd-icons-green)
+    ("cache"          nerd-icons-octicon "nf-oct-database"       :face nerd-icons-green)
+    ("db"             nerd-icons-octicon "nf-oct-database"       :face nerd-icons-dblue)
+    ;; backup
+    ("backup"         nerd-icons-mdicon "nf-md-file_restore"     :face nerd-icons-lblue)
+    ("old"            nerd-icons-mdicon "nf-md-file_restore"     :face nerd-icons-lblue)
+    ("bak"            nerd-icons-mdicon "nf-md-file_restore"     :face nerd-icons-lblue)
+    ;; Lock
+    ("lock"           nerd-icons-octicon "nf-oct-lock"           :face nerd-icons-red)
+    ;; Visual Studio
+    ("sln"            nerd-icons-mdicon "nf-md-microsoft_visual_studio" :face nerd-icons-purple)
+    ("slnx"           nerd-icons-mdicon "nf-md-microsoft_visual_studio" :face nerd-icons-purple)
+    ("csproj"         nerd-icons-mdicon "nf-md-language_csharp"         :face nerd-icons-green)))
+
+(defvar                        nerd-icons-regexp-icon-alist
+  '(
+    ;;
+    ("^TAGS$"                  nerd-icons-octicon "nf-oct-tag"               :face nerd-icons-blue)
+    ("^TODO$"                  nerd-icons-octicon "nf-oct-checklist"         :face nerd-icons-lyellow)
+    ("^LICENSE.*$"             nerd-icons-octicon "nf-oct-file_badge"        :face nerd-icons-blue)
+    ;; (info "(standards) Releases")
+    ("^COPYING.*$"             nerd-icons-mdicon  "nf-md-copyright"          :face nerd-icons-blue)
+    ("^readme.*"               nerd-icons-octicon "nf-oct-book"              :face nerd-icons-lcyan)
+    ;; misc GNU documentation files
+    ("^\\(MAINTAINERS\\|CONTRIBUTE\\|BUGS\\).*$"  nerd-icons-mdicon
+     "nf-md-book" :face nerd-icons-blue)
+    ("^code-of-conduct$"       nerd-icons-octicon "nf-oct-code_of_conduct"   :face nerd-icons-pink)
+
+    ;; (info "(standards) NEWS File")
+    ("^NEWS.*$"                nerd-icons-faicon "nf-fa-newspaper"           :face nerd-icons-green)
+    ("^ONEWS.*$"               nerd-icons-faicon "nf-fa-newspaper"           :face nerd-icons-lgreen)
+    ;; (info "(standards) Change Logs")
+    ("^ChangeLog.*$"           nerd-icons-mdicon "nf-md-file_document_multiple" :face nerd-icons-cyan)
+    ;; (info "(standards) Releases")
+    ("^INSTALL.*$"             nerd-icons-faicon "nf-fa-file_arrow_down"     :face nerd-icons-green)
+
+    ;; autotools related
+    ("^Makefile.\\(am\\|in\\)$" nerd-icons-sucicon "nf-seti-makefile"         :face nerd-icons-lsilver)
+    ("^configure.\\(in\\|ac\\)" nerd-icons-mdicon  "nf-md-file_cog"           :face nerd-icons-lsilver)
+    ("^configure$"              nerd-icons-devicon "nf-dev-terminal"          :face nerd-icons-lsilver)
+    ("^config.\\(guess\\|rpath\\|status\\|sub\\)$" nerd-icons-devicon "nf-dev-terminal"
+     :face nerd-icons-lsilver)
+    ("^\\(ar-lib\\|depmond\\|install-sh\\|missing\\|mkdep\\|mkinstalldirs\\|move-if-change\\|symlink-tree\\|test-driver\\|ylwrap\\)$"
+     nerd-icons-devicon "nf-dev-terminal" :face nerd-icons-lsilver)
+    ("^\\.editorconfig$"        nerd-icons-sucicon "nf-seti-editorconfig"     :face nerd-icons-silver)
+
+    ;; Env
+    ("^\\.env$"                       nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.defaults$"            nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.example$"             nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.sample$"              nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.template$"            nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.schema$"              nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.local$"               nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.dev$"                 nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.development$"         nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.alpha$"               nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.e2e$"                 nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.qa$"                  nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.dist$"                nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.prod$"                nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.production$"          nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.stage$"               nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.staging$"             nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.preview$"             nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.test$"                nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.testing$"             nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.dev\\.local$"         nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.development\\.local$" nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.qa\\.local$"          nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.prod\\.local$"        nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.production\\.local$"  nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.staging\\.local$"     nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.test\\.local$"        nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.uat$"                 nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.env\\.cat$"                 nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+    ("^\\.envrc$"                     nerd-icons-codicon "nf-cod-settings"          :face nerd-icons-yellow)
+
+    ;; Config
+    ("nginx$"                  nerd-icons-devicon "nf-dev-nginx"             :face nerd-icons-dgreen)
+    ("apache$"                 nerd-icons-devicon "nf-dev-apache"            :face nerd-icons-dgreen)
+
+    ;; C
+    ("^\\(GNU\\|\\)Makefile.*" nerd-icons-sucicon "nf-seti-makefile"         :face nerd-icons-dorange)
+    ("^CMakeLists.txt$"        nerd-icons-devicon "nf-dev-cmake"             :face nerd-icons-red)
+    ("^CMakeCache.txt$"        nerd-icons-devicon "nf-dev-cmake"             :face nerd-icons-blue)
+    ("^meson.build$"           nerd-icons-sucicon "nf-seti-makefile"         :face nerd-icons-purple) ;; TODO: meson
+    ("^meson_options.txt$"     nerd-icons-sucicon "nf-seti-makefile"         :face nerd-icons-purple) ;; TODO: meson
+
+    ;; Docker
+    ("^\\.dockerignore$"                  nerd-icons-devicon "nf-dev-docker"  :face nerd-icons-dblue)
+    ("^\\.?\\(Container\\|Docker\\)file"  nerd-icons-sucicon "nf-seti-docker" :face nerd-icons-blue)
+    ("^\\(docker-\\)?compose\\.ya?ml$"    nerd-icons-sucicon "nf-seti-docker" :face nerd-icons-cyan)
+    ("^\\docker-compose\\.gitlab\\.ya?ml" nerd-icons-sucicon "nf-seti-docker" :face nerd-icons-cyan)
+
+    ;; Homebrew
+    ("^Brewfile$"              nerd-icons-faicon "nf-fa-beer"                :face nerd-icons-lsilver)
+
+    ;; Arch
+    ("^PKGBUILD$"              nerd-icons-flicon "nf-linux-archlinux"        :face nerd-icons-cyan)
+    ("^\\.SRCINFO$"            nerd-icons-flicon "nf-linux-archlinux"        :face nerd-icons-red)
+
+    ;; ;; AWS
+    ("^stack.*.json$"          nerd-icons-devicon "nf-dev-aws"               :face nerd-icons-orange)
+    ("^serverless\\.yml$"      nerd-icons-faicon "nf-fa-bolt"                :face nerd-icons-yellow)
+
+    ;; lock files
+    ("~$"                      nerd-icons-octicon "nf-oct-lock"              :face nerd-icons-maroon)
+
+    ;; Source Codes
+    ("^mix.lock$"              nerd-icons-sucicon "nf-seti-elixir"           :face nerd-icons-lyellow)
+
+    ;; Ruby
+    ("^Gemfile\\(\\.lock\\)?$" nerd-icons-codicon "nf-cod-ruby"              :face nerd-icons-red)
+    ("_?test\\.rb$"            nerd-icons-codicon "nf-cod-ruby"              :face nerd-icons-red)
+    ("_?test_helper\\.rb$"     nerd-icons-codicon "nf-cod-ruby"              :face nerd-icons-dred)
+    ("_?spec\\.rb$"            nerd-icons-codicon "nf-cod-ruby"              :face nerd-icons-red)
+    ("_?spec_helper\\.rb$"     nerd-icons-codicon "nf-cod-ruby"              :face nerd-icons-dred)
+    ;;; Cocoapods
+    ("^Podfile\\(\\.lock\\)?$" nerd-icons-codicon "nf-cod-ruby"              :face nerd-icons-red)
+    ;;; Danger
+    ("^Dangerfile\\(\\.lock\\)?$" nerd-icons-codicon "nf-cod-ruby"            :face nerd-icons-red)
+    ;;; Fastlane
+    ("^Appfile\\(\\.lock\\)?$" nerd-icons-codicon "nf-cod-ruby"              :face nerd-icons-red)
+    ("^Matchfile\\(\\.lock\\)?$" nerd-icons-codicon "nf-cod-ruby"            :face nerd-icons-red)
+
+    ("-?spec\\.ts$"            nerd-icons-mdicon "nf-md-language_typescript" :face nerd-icons-blue)
+    ("-?test\\.ts$"            nerd-icons-mdicon "nf-md-language_typescript" :face nerd-icons-blue)
+    ("-?spec\\.js$"            nerd-icons-mdicon "nf-md-language_javascript" :face nerd-icons-lpurple)
+    ("-?test\\.js$"            nerd-icons-mdicon "nf-md-language_javascript" :face nerd-icons-lpurple)
+    ("-?spec\\.jsx$"           nerd-icons-mdicon "nf-md-react"               :face nerd-icons-blue-alt)
+    ("-?test\\.jsx$"           nerd-icons-mdicon "nf-md-react"               :face nerd-icons-blue-alt)
+
+    ;; Git
+    ("^\\.git$"                nerd-icons-sucicon "nf-seti-git"              :face nerd-icons-lred)
+    ("^\\.gitattributes$"      nerd-icons-sucicon "nf-seti-git"              :face nerd-icons-lred)
+    ("^\\.gitignore$"          nerd-icons-sucicon "nf-seti-git"              :face nerd-icons-lred)
+    ("^\\.gitmodules$"         nerd-icons-sucicon "nf-seti-git"              :face nerd-icons-lred)
+    ("^MERGE_"                 nerd-icons-octicon "nf-oct-git_merge"         :face nerd-icons-red)
+    ("^COMMIT_EDITMSG"         nerd-icons-octicon "nf-oct-git_commit"        :face nerd-icons-red)
+
+    ;; Gitlab
+    ("^\\.gitlab-ci\\.ya?ml$"  nerd-icons-devicon "nf-dev-gitlab"            :face nerd-icons-orange)
+
+    ;; Stylesheeting
+    ("^stylelint"              nerd-icons-sucicon "nf-seti-stylelint"        :face nerd-icons-lyellow)
+
+    ;; JavaScript
+    ("^package.json$"          nerd-icons-devicon "nf-dev-npm"               :face nerd-icons-red)
+    ("^package.lock.json$"     nerd-icons-devicon "nf-dev-npm"               :face nerd-icons-dred)
+    ("^yarn\\.lock"            nerd-icons-sucicon "nf-seti-yarn"             :face nerd-icons-blue-alt)
+    ("\\.npmignore$"           nerd-icons-devicon "nf-dev-npm"               :face nerd-icons-dred)
+    ("^bower.json$"            nerd-icons-devicon "nf-dev-bower"             :face nerd-icons-lorange)
+    ("^gulpfile"               nerd-icons-devicon "nf-dev-gulp"              :face nerd-icons-lred)
+    ("^gruntfile"              nerd-icons-devicon "nf-dev-grunt"             :face nerd-icons-lyellow)
+    ("^webpack"                nerd-icons-devicon "nf-dev-webpack"           :face nerd-icons-lblue)
+    ("^\\.?eslint"             nerd-icons-devicon "nf-dev-eslint"            :face nerd-icons-lblue)
+    ("^\\.?prettier"           nerd-icons-sucicon "nf-custom-prettier"       :face nerd-icons-silver)
+    ("\\`babel\\.config.*"     nerd-icons-sucicon "nf-seti-babel"            :face nerd-icons-yellow)
+    ("^vite.config"            nerd-icons-devicon "nf-dev-vitest"            :face nerd-icons-yellow)
+    ("^vitest"                 nerd-icons-devicon "nf-dev-vitest"            :face nerd-icons-yellow)
+    ("^\\.?jest"               nerd-icons-devicon "nf-dev-jest"              :face nerd-icons-lred)
+
+    ;; Go
+    ("^go.mod$"                nerd-icons-sucicon "nf-seti-config"           :face nerd-icons-blue-alt)
+    ("^go.work$"               nerd-icons-sucicon "nf-seti-config"           :face nerd-icons-blue-alt)
+
+    ;; Groovy
+    ("Jenkinsfile\\'"          nerd-icons-devicon "nf-dev-groovy"            :face nerd-icons-cyan-alt)
+
+    ;; Emacs
+    ("^bookmark"                nerd-icons-octicon "nf-oct-bookmark"         :face nerd-icons-lpink)
+
+    ("^\\*scratch\\*$"         nerd-icons-faicon "nf-fa-sticky_note"         :face nerd-icons-lyellow)
+    ("^\\*scratch.*"           nerd-icons-faicon "nf-fa-sticky_note"         :face nerd-icons-yellow)
+    ("^\\*new-tab\\*$"         nerd-icons-mdicon "nf-md-star"                :face nerd-icons-cyan)
+    ("Cask\\'"                 nerd-icons-sucicon "nf-custom-emacs"          :face nerd-icons-blue)
+    ("Eask\\'"                 nerd-icons-sucicon "nf-custom-emacs"          :face nerd-icons-blue)
+
+    ;; Rust
+    ("^Cargo.toml$"            nerd-icons-devicon "nf-dev-rust"              :face nerd-icons-yellow)
+    ("^Cargo.lock$"            nerd-icons-devicon "nf-dev-rust"              :face nerd-icons-dyellow)
+
+    ;; Nix
+    ("^flake\\.lock$"          nerd-icons-mdicon "nf-md-nix"                 :face nerd-icons-blue)
+
+    ("^\\."                    nerd-icons-octicon "nf-oct-gear")))
+
+(defvar nerd-icons-default-file-icon
+  '(nerd-icons-faicon "nf-fa-file_o"))
+
+(defvar nerd-icons-dir-icon-alist
+  '(
+    ("[Tt]rash"         nerd-icons-faicon "nf-fa-trash_o")
+    ("[Dd]ropbox"       nerd-icons-faicon "nf-fa-dropbox")
+    ("google[ _-]drive" nerd-icons-mdicon "nf-md-folder_google_drive")
+    ("github"           nerd-icons-sucicon "nf-custom-folder_github")
+    ("^atom$"           nerd-icons-devicon "nf-dev-atom")
+    ("^src$"            nerd-icons-octicon "nf-oct-code")
+    ("^tests?$"         nerd-icons-octicon "nf-oct-beaker")
+    ("Applications"     nerd-icons-mdicon "nf-md-application")
+    ("[Dd]ocuments"     nerd-icons-mdicon "nf-md-folder_file")
+    ("[Dd]ownload"      nerd-icons-mdicon "nf-md-folder_download")
+    ("[Dd]esktop"       nerd-icons-octicon "nf-oct-device_desktop")
+    ("[Pp]ictures"      nerd-icons-mdicon "nf-md-folder_image")
+    ("[Pp]hotos"        nerd-icons-faicon "nf-fa-camera_retro")
+    ("[Pp]rojects"      nerd-icons-octicon "nf-oct-project_roadmap")
+    ("[Mm]usic"         nerd-icons-mdicon "nf-md-folder_music")
+    ("[Mm]ovies"        nerd-icons-faicon "nf-fa-film")
+    ("[Cc]ode"          nerd-icons-octicon "nf-oct-code")
+    ("[Ww]orkspace"     nerd-icons-octicon "nf-oct-code")
+    ("\\.?cache"        nerd-icons-octicon "nf-oct-cache")
+    ("\\.?config"       nerd-icons-sucicon "nf-custom-folder_config")
+    ("\\.git"           nerd-icons-sucicon "nf-custom-folder_git")
+    ("\\.npm"           nerd-icons-sucicon "nf-custom-folder_npm")
+    ("\\.gem"           nerd-icons-faicon "nf-fa-gem")
+    ("\\.ssh"           nerd-icons-mdicon "nf-md-folder_key")
+    ("hypr"             nerd-icons-flicon "nf-linux-hyprland")
+    ("kitty"            nerd-icons-devicon "nf-dev-terminal")
+    ("^gtk-.*"          nerd-icons-flicon "nf-linux-gtk")
+    ("inkscape"         nerd-icons-devicon "nf-dev-inkscape")
+    ("vlc"              nerd-icons-mdicon "nf-md-vlc")
+    ("discord"          nerd-icons-faicon "nf-fa-discord")
+    ("[Jj]et[Bb]rains"  nerd-icons-devicon "nf-dev-jetbrains")
+    ("^go$"             nerd-icons-devicon "nf-dev-go")
+    ("mpv"              nerd-icons-flicon "nf-linux-mpv")
+    ("electron"         nerd-icons-devicon "nf-dev-electron")
+    (".?"               nerd-icons-sucicon "nf-custom-folder_oct")))
+
+(defvar nerd-icons-weather-icon-alist
+  '(
+    ("tornado"               nerd-icons-wicon "nf-weather-tornado")
+    ("hurricane"             nerd-icons-wicon "nf-weather-hurricane")
+    ("thunderstorms"         nerd-icons-wicon "nf-weather-thunderstorm")
+    ("sunny"                 nerd-icons-wicon "nf-weather-day_sunny")
+    ("rain.*snow"            nerd-icons-wicon "nf-weather-rain_mix")
+    ("rain.*hail"            nerd-icons-wicon "nf-weather-rain_mix")
+    ("sleet"                 nerd-icons-wicon "nf-weather-sleet")
+    ("hail"                  nerd-icons-wicon "nf-weather-hail")
+    ("drizzle"               nerd-icons-wicon "nf-weather-sprinkle")
+    ("rain"                  nerd-icons-wicon "nf-weather-showers")
+    ("showers"               nerd-icons-wicon "nf-weather-showers")
+    ("blowing.*snow"         nerd-icons-wicon "nf-weather-snow_wind")
+    ("snow"                  nerd-icons-wicon "nf-weather-snow")
+    ("dust"                  nerd-icons-wicon "nf-weather-dust")
+    ("fog"                   nerd-icons-wicon "nf-weather-fog")
+    ("haze"                  nerd-icons-wicon "nf-weather-day_haze")
+    ("smoky"                 nerd-icons-wicon "nf-weather-smoke")
+    ("blustery"              nerd-icons-wicon "nf-weather-cloudy_windy")
+    ("windy"                 nerd-icons-wicon "nf-weather-cloudy_gusts")
+    ("cold"                  nerd-icons-wicon "nf-weather-snowflake_cold")
+    ("partly.*cloudy.*night" nerd-icons-wicon "nf-weather-night_alt_partly_cloudy")
+    ("partly.*cloudy"        nerd-icons-wicon "nf-weather-day_cloudy_high")
+    ("cloudy.*night"         nerd-icons-wicon "nf-weather-night_alt_cloudy")
+    ("cxloudy.*day"          nerd-icons-wicon "nf-weather-day_cloudy")
+    ("cloudy"                nerd-icons-wicon "nf-weather-cloudy")
+    ("clear.*night"          nerd-icons-wicon "nf-weather-night_clear")
+    ("fair.*night"           nerd-icons-wicon "nf-weather-stars")
+    ("fair.*day"             nerd-icons-wicon "nf-weather-horizon")
+    ("hot"                   nerd-icons-wicon "nf-weather-hot")
+    ("not.*available"        nerd-icons-wicon "nf-weather-na")))
+
+(defvar nerd-icons-mode-icon-alist
+  '(
+    (emacs-lisp-mode                   nerd-icons-sucicon "nf-custom-emacs"              :face nerd-icons-purple)
+    (lisp-data-mode                    nerd-icons-sucicon "nf-custom-emacs"              :face nerd-icons-purple)
+    (m4-mode                           nerd-icons-faicon "nf-fa-cog"                     :face nerd-icons-lsilver)
+    (autoconf-mode                     nerd-icons-faicon "nf-fa-cog"                     :face nerd-icons-lsilver)
+    (circe-server-mode                 nerd-icons-faicon "nf-fa-commenting_o")
+    (circe-channel-mode                nerd-icons-faicon "nf-fa-commenting_o")
+    (circe-query-mode                  nerd-icons-faicon "nf-fa-commenting_o")
+    (crystal-mode                      nerd-icons-sucicon "nf-custom-crystal"            :face nerd-icons-yellow)
+    (erc-mode                          nerd-icons-faicon "nf-fa-commenting_o")
+    (inferior-emacs-lisp-mode          nerd-icons-sucicon "nf-custom-emacs"              :face nerd-icons-lblue)
+    (dired-mode                        nerd-icons-octicon "nf-oct-file_directory")
+    (lisp-interaction-mode             nerd-icons-sucicon "nf-custom-emacs"              :face nerd-icons-orange)
+    (sly-mrepl-mode                    nerd-icons-sucicon "nf-custom-common_lisp"        :face nerd-icons-orange)
+    (slime-repl-mode                   nerd-icons-sucicon "nf-custom-common_lisp"        :face nerd-icons-orange)
+    (org-mode                          nerd-icons-sucicon "nf-custom-orgmode"            :face nerd-icons-lgreen)
+    (ledger-mode                       nerd-icons-mdicon "nf-md-file_table_box_multiple" :face nerd-icons-green)
+    (typescript-mode                   nerd-icons-mdicon "nf-md-language_typescript"     :face nerd-icons-blue-alt)
+    (typescript-ts-mode                nerd-icons-mdicon "nf-md-language_typescript"     :face nerd-icons-blue-alt)
+    (typescript-tsx-mode               nerd-icons-devicon "nf-dev-react"                 :face nerd-icons-lblue)
+    (tsx-ts-mode                       nerd-icons-devicon "nf-dev-react"                 :face nerd-icons-lblue)
+    (js-mode                           nerd-icons-devicon "nf-dev-javascript"            :face nerd-icons-yellow)
+    (js-ts-mode                        nerd-icons-devicon "nf-dev-javascript"            :face nerd-icons-yellow)
+    (js-jsx-mode                       nerd-icons-devicon "nf-dev-react"                 :face nerd-icons-lblue)
+    (js2-mode                          nerd-icons-devicon "nf-dev-javascript"            :face nerd-icons-yellow)
+    (js3-mode                          nerd-icons-devicon "nf-dev-javascript"            :face nerd-icons-yellow)
+    (rjsx-mode                         nerd-icons-devicon "nf-dev-react"                 :face nerd-icons-lblue)
+    (vue-mode                          nerd-icons-sucicon "nf-seti-vue"                  :face nerd-icons-lgreen)
+    (term-mode                         nerd-icons-devicon "nf-dev-terminal")
+    (vterm-mode                        nerd-icons-devicon "nf-dev-terminal")
+    (eat-mode                          nerd-icons-devicon "nf-dev-terminal")
+    (mistty-mode                       nerd-icons-devicon "nf-dev-terminal")
+    (eshell-mode                       nerd-icons-devicon "nf-dev-terminal"              :face nerd-icons-purple)
+    (magit-refs-mode                   nerd-icons-devicon "nf-dev-git_branch"            :face nerd-icons-red)
+    (magit-process-mode                nerd-icons-octicon "nf-oct-mark_github")
+    (magit-diff-mode                   nerd-icons-devicon "nf-dev-git_compare"           :face nerd-icons-lblue)
+    (ediff-mode                        nerd-icons-devicon "nf-dev-git_compare"           :face nerd-icons-red)
+    (diff-mode                         nerd-icons-octicon "nf-oct-file_diff"             :face nerd-icons-lred)
+    (pr-review-mode                    nerd-icons-octicon "nf-oct-code_review")
+    (comint-mode                       nerd-icons-faicon "nf-fa-terminal"                :face nerd-icons-lblue)
+    (eww-mode                          nerd-icons-faicon "nf-fa-firefox"                 :face nerd-icons-red)
+    (xwidget-webkit-mode               nerd-icons-faicon "nf-fa-chrome"                  :face nerd-icons-blue)
+    (org-agenda-mode                   nerd-icons-octicon "nf-oct-checklist"             :face nerd-icons-lgreen)
+    (cfw:calendar-mode                 nerd-icons-octicon "nf-oct-calendar")
+    (ibuffer-mode                      nerd-icons-faicon "nf-fa-files_o"                 :face nerd-icons-dsilver)
+    (messages-buffer-mode              nerd-icons-octicon "nf-oct-log"                   :face nerd-icons-yellow)
+    (help-mode                         nerd-icons-faicon "nf-fa-info"                    :face nerd-icons-purple)
+    (helpful-mode                      nerd-icons-faicon "nf-fa-info"                    :face nerd-icons-purple)
+    (Info-mode                         nerd-icons-faicon "nf-fa-info"                    :face nerd-icons-blue)
+    (benchmark-init/tree-mode          nerd-icons-faicon "nf-fa-dashboard")
+    (jenkins-mode                      nerd-icons-devicon "nf-dev-jenkins"               :face nerd-icons-blue)
+    (magit-popup-mode                  nerd-icons-sucicon "nf-seti-git"                  :face nerd-icons-red)
+    (magit-status-mode                 nerd-icons-sucicon "nf-seti-git"                  :face nerd-icons-lred)
+    (magit-log-mode                    nerd-icons-sucicon "nf-seti-git"                  :face nerd-icons-green)
+    (mu4e-compose-mode                 nerd-icons-octicon "nf-oct-pencil")
+    (mu4e-headers-mode                 nerd-icons-octicon "nf-oct-mail")
+    (mu4e-main-mode                    nerd-icons-octicon "nf-oct-mail")
+    (mu4e-view-mode                    nerd-icons-codicon "nf-cod-mail_read")
+    (notmuch-hello-mode                nerd-icons-octicon "nf-oct-mail")
+    (notmuch-search-mode               nerd-icons-octicon "nf-oct-mail")
+    (notmuch-tree-mode                 nerd-icons-octicon "nf-oct-mail")
+    (notmuch-show-mode                 nerd-icons-codicon "nf-cod-mail_read")
+    (sieve-mode                        nerd-icons-octicon "nf-oct-mail")
+    (gnus-group-mode                   nerd-icons-octicon "nf-oct-mail")
+    (gnus-summary-mode                 nerd-icons-octicon "nf-oct-mail")
+    (gnus-article-mode                 nerd-icons-codicon "nf-cod-mail_read")
+    (message-mode                      nerd-icons-octicon "nf-oct-pencil")
+    (package-menu-mode                 nerd-icons-faicon "nf-fa-archive"                 :face nerd-icons-silver)
+    (paradox-menu-mode                 nerd-icons-faicon "nf-fa-archive"                 :face nerd-icons-silver)
+    (Custom-mode                       nerd-icons-codicon "nf-cod-settings")
+
+    (web-mode                          nerd-icons-devicon "nf-dev-html5")
+
+    (fundamental-mode                  nerd-icons-sucicon "nf-custom-emacs"              :face nerd-icons-dsilver)
+    (special-mode                      nerd-icons-sucicon "nf-custom-emacs"              :face nerd-icons-yellow)
+    (cask-mode                         nerd-icons-sucicon "nf-custom-emacs"              :face nerd-icons-blue)
+    (eask-mode                         nerd-icons-sucicon "nf-custom-emacs"              :face nerd-icons-blue)
+    (text-mode                         nerd-icons-faicon "nf-fa-file_text"               :face nerd-icons-cyan)
+    (enh-ruby-mode                     nerd-icons-codicon "nf-cod-ruby"                  :face nerd-icons-lred)
+    (ruby-mode                         nerd-icons-codicon "nf-cod-ruby"                  :face nerd-icons-lred)
+    (ruby-ts-mode                      nerd-icons-codicon "nf-cod-ruby"                  :face nerd-icons-lred)
+    (inf-ruby-mode                     nerd-icons-codicon "nf-cod-ruby"                  :face nerd-icons-red)
+    (projectile-rails-compilation-mode nerd-icons-codicon "nf-cod-ruby"                  :face nerd-icons-red)
+    (rspec-compilation-mode            nerd-icons-codicon "nf-cod-ruby"                  :face nerd-icons-red)
+    (rake-compilation-mode             nerd-icons-codicon "nf-cod-ruby"                  :face nerd-icons-red)
+    (sh-mode                           nerd-icons-devicon "nf-dev-terminal"              :face nerd-icons-purple)
+    (bash-ts-mode                      nerd-icons-devicon "nf-dev-terminal"              :face nerd-icons-purple)
+    (shell-mode                        nerd-icons-devicon "nf-dev-terminal"              :face nerd-icons-purple)
+    (fish-mode                         nerd-icons-devicon "nf-dev-terminal"              :face nerd-icons-lpink)
+    (nushell-mode                      nerd-icons-devicon "nf-dev-terminal"              :face nerd-icons-green)
+    (nushell-ts-mode                   nerd-icons-devicon "nf-dev-terminal"              :face nerd-icons-green)
+    (bat-mode                          nerd-icons-codicon "nf-cod-terminal_cmd"          :face nerd-icons-lsilver)
+    (nginx-mode                        nerd-icons-devicon "nf-dev-nginx"                 :face nerd-icons-dgreen)
+    (apache-mode                       nerd-icons-devicon "nf-dev-apache"                :face nerd-icons-dgreen)
+    (makefile-mode                     nerd-icons-sucicon "nf-seti-makefile"             :face nerd-icons-dorange)
+    (makefile-ts-mode                  nerd-icons-sucicon "nf-seti-makefile"             :face nerd-icons-dorange)
+    (cmake-mode                        nerd-icons-devicon "nf-dev-cmake"                 :face nerd-icons-red)
+    (cmake-ts-mode                     nerd-icons-devicon "nf-dev-cmake"                 :face nerd-icons-red)
+    (dockerfile-mode                   nerd-icons-sucicon "nf-seti-docker"               :face nerd-icons-blue)
+    (dockerfile-ts-mode                nerd-icons-sucicon "nf-seti-docker"               :face nerd-icons-blue)
+    (docker-compose-mode               nerd-icons-sucicon "nf-seti-docker"               :face nerd-icons-lblue)
+    (nxml-mode                         nerd-icons-faicon "nf-fa-file_code_o"             :face nerd-icons-lorange)
+    (conf-mode                         nerd-icons-codicon "nf-cod-settings"              :face nerd-icons-lyellow)
+    (json-mode                         nerd-icons-mdicon "nf-md-code_json"               :face nerd-icons-yellow)
+    (json-ts-mode                      nerd-icons-mdicon "nf-md-code_json"               :face nerd-icons-yellow)
+    (jsonc-mode                        nerd-icons-mdicon "nf-md-code_json"               :face nerd-icons-yellow)
+    (jsonian-mode                      nerd-icons-codicon "nf-cod-settings"              :face nerd-icons-yellow)
+    (yaml-mode                         nerd-icons-codicon "nf-cod-settings"              :face nerd-icons-dyellow)
+    (yaml-ts-mode                      nerd-icons-codicon "nf-cod-settings"              :face nerd-icons-dyellow)
+    (toml-mode                         nerd-icons-sucicon "nf-custom-toml"               :face nerd-icons-orange)
+    (toml-ts-mode                      nerd-icons-sucicon "nf-custom-toml"               :face nerd-icons-orange)
+    (elisp-byte-code-mode              nerd-icons-octicon "nf-oct-file_binary"           :face nerd-icons-dsilver)
+    (archive-mode                      nerd-icons-octicon "nf-oct-file_zip"              :face nerd-icons-lmaroon)
+    (elm-mode                          nerd-icons-sucicon "nf-custom-elm"                :face nerd-icons-blue)
+    (erlang-mode                       nerd-icons-devicon "nf-dev-erlang"                :face nerd-icons-red)
+    (elixir-mode                       nerd-icons-sucicon "nf-custom-elixir"             :face nerd-icons-lorange)
+    (elixir-ts-mode                    nerd-icons-sucicon "nf-custom-elixir"             :face nerd-icons-lorange)
+    (java-mode                         nerd-icons-devicon "nf-dev-java"                  :face nerd-icons-purple)
+    (groovy-mode                       nerd-icons-devicon "nf-dev-groovy"                :face nerd-icons-cyan)
+    (java-ts-mode                      nerd-icons-devicon "nf-dev-java"                  :face nerd-icons-purple)
+    (go-mode                           nerd-icons-sucicon "nf-seti-go2"                  :face nerd-icons-blue)
+    (go-ts-mode                        nerd-icons-sucicon "nf-seti-go2"                  :face nerd-icons-blue)
+    (go-dot-mod-mode                   nerd-icons-sucicon "nf-seti-config"               :face nerd-icons-blue-alt)
+    (go-mod-ts-mode                    nerd-icons-sucicon "nf-seti-config"               :face nerd-icons-blue-alt)
+    (go-dot-work-mode                  nerd-icons-sucicon "nf-seti-config"               :face nerd-icons-blue-alt)
+    (go-work-ts-mode                   nerd-icons-sucicon "nf-seti-config"               :face nerd-icons-blue-alt)
+    (graphql-mode                      nerd-icons-sucicon "nf-seti-graphql"              :face nerd-icons-dpink)
+    (matlab-mode                       nerd-icons-devicon "nf-dev-matlab"                :face nerd-icons-orange)
+    (nix-mode                          nerd-icons-mdicon  "nf-md-nix"                    :face nerd-icons-blue)
+    (nix-ts-mode                       nerd-icons-mdicon  "nf-md-nix"                    :face nerd-icons-blue)
+    (perl-mode                         nerd-icons-sucicon "nf-seti-perl"                 :face nerd-icons-lorange)
+    (cperl-mode                        nerd-icons-sucicon "nf-seti-perl"                 :face nerd-icons-lorange)
+    (perl-ts-mode                      nerd-icons-sucicon "nf-seti-perl"                 :face nerd-icons-lorange)
+    (php-mode                          nerd-icons-devicon "nf-dev-php"                   :face nerd-icons-lsilver)
+    (php-ts-mode                       nerd-icons-devicon "nf-dev-php"                   :face nerd-icons-lsilver)
+    (prolog-mode                       nerd-icons-devicon "nf-dev-prolog"                :face nerd-icons-lmaroon)
+    (python-mode                       nerd-icons-devicon "nf-dev-python"                :face nerd-icons-dblue)
+    (python-ts-mode                    nerd-icons-devicon "nf-dev-python"                :face nerd-icons-dblue)
+    (inferior-python-mode              nerd-icons-devicon "nf-dev-python"                :face nerd-icons-dblue)
+    ;; (racket-mode                    nerd-icons-fileicon "racket"                      :face nerd-icons-red)
+    (rust-mode                         nerd-icons-devicon "nf-dev-rust"                  :face nerd-icons-maroon)
+    (rustic-mode                       nerd-icons-devicon "nf-dev-rust"                  :face nerd-icons-maroon)
+    (rust-ts-mode                      nerd-icons-devicon "nf-dev-rust"                  :face nerd-icons-maroon)
+    (ron-mode                          nerd-icons-devicon "nf-dev-rust"                  :face nerd-icons-dorange)
+    (scala-mode                        nerd-icons-devicon "nf-dev-scala"                 :face nerd-icons-red)
+    (scheme-mode                       nerd-icons-sucicon "nf-custom-scheme"             :face nerd-icons-red)
+    (swift-mode                        nerd-icons-devicon "nf-dev-swift"                 :face nerd-icons-lred)
+    (swift-ts-mode                     nerd-icons-devicon "nf-dev-swift"                 :face nerd-icons-lred)
+    (svelte-mode                       nerd-icons-sucicon "nf-seti-svelte"               :face nerd-icons-red)
+    (ada-mode                          nerd-icons-sucicon "nf-custom-ada"                :face nerd-icons-blue)
+    (ada-ts-mode                       nerd-icons-sucicon "nf-custom-ada"                :face nerd-icons-blue)
+    (gpr-mode                          nerd-icons-sucicon "nf-custom-ada"                :face nerd-icons-green)
+    (gpr-ts-mode                       nerd-icons-sucicon "nf-custom-ada"                :face nerd-icons-green)
+    (c-mode                            nerd-icons-sucicon "nf-custom-c"                  :face nerd-icons-blue)
+    (c-ts-mode                         nerd-icons-sucicon "nf-custom-c"                  :face nerd-icons-blue)
+    (c++-mode                          nerd-icons-sucicon "nf-custom-cpp"                :face nerd-icons-blue)
+    (c++-ts-mode                       nerd-icons-sucicon "nf-custom-cpp"                :face nerd-icons-blue)
+    (csharp-mode                       nerd-icons-mdicon "nf-md-language_csharp"         :face nerd-icons-dblue)
+    (csharp-ts-mode                    nerd-icons-mdicon "nf-md-language_csharp"         :face nerd-icons-dblue)
+    (csproj-mode                       nerd-icons-mdicon "nf-md-language_csharp"         :face nerd-icons-green)
+    (clojure-mode                      nerd-icons-devicon "nf-dev-clojure_alt"           :face nerd-icons-blue)
+    (clojure-ts-mode                   nerd-icons-devicon "nf-dev-clojure_alt"           :face nerd-icons-blue)
+    (cider-repl-mode                   nerd-icons-devicon "nf-dev-clojure_alt"           :face nerd-icons-green)
+    (clojurec-mode                     nerd-icons-sucicon "nf-seti-clojure"              :face nerd-icons-blue)
+    (clojurec-ts-mode                  nerd-icons-sucicon "nf-seti-clojure"              :face nerd-icons-blue)
+    (clojurescript-mode                nerd-icons-devicon "nf-dev-clojure_alt"           :face nerd-icons-lyellow)
+    (clojurescript-ts-mode             nerd-icons-devicon "nf-dev-clojure_alt"           :face nerd-icons-lyellow)
+    (coffee-mode                       nerd-icons-devicon "nf-dev-coffeescript"          :face nerd-icons-maroon)
+    (lisp-mode                         nerd-icons-sucicon "nf-custom-scheme"             :face nerd-icons-orange)
+    (css-mode                          nerd-icons-devicon "nf-dev-css3"                  :face nerd-icons-yellow)
+    (css-ts-mode                       nerd-icons-devicon "nf-dev-css3"                  :face nerd-icons-yellow)
+    (scss-mode                         nerd-icons-mdicon "nf-md-sass"                    :face nerd-icons-pink)
+    (sass-mode                         nerd-icons-mdicon "nf-md-sass"                    :face nerd-icons-dpink)
+    (less-css-mode                     nerd-icons-devicon "nf-dev-less"                  :face nerd-icons-dyellow)
+    (stylus-mode                       nerd-icons-devicon "nf-dev-stylus"                :face nerd-icons-lgreen)
+    (csv-mode                          nerd-icons-octicon "nf-oct-graph"                 :face nerd-icons-dblue)
+    (gdscript-mode                     nerd-icons-sucicon "nf-seti-godot"                :face nerd-icons-blue)
+    (gdscript-ts-mode                  nerd-icons-sucicon "nf-seti-godot"                :face nerd-icons-blue)
+    (haskell-mode                      nerd-icons-devicon "nf-dev-haskell"               :face nerd-icons-red)
+    (haskell-c2hs-mode                 nerd-icons-devicon "nf-dev-haskell"               :face nerd-icons-red)
+    (literate-haskell-mode             nerd-icons-devicon "nf-dev-haskell"               :face nerd-icons-red)
+    (haml-mode                         nerd-icons-sucicon "nf-seti-haml"                 :face nerd-icons-lyellow)
+    (html-mode                         nerd-icons-devicon "nf-dev-html5"                 :face nerd-icons-orange)
+    (html-ts-mode                      nerd-icons-devicon "nf-dev-html5"                 :face nerd-icons-orange)
+    (rhtml-mode                        nerd-icons-devicon "nf-dev-html5"                 :face nerd-icons-lred)
+    ;; (mustache-mode                  nerd-icons-fileicon "moustache"                   :face nerd-icons-green)
+    (slim-mode                         nerd-icons-codicon "nf-cod-dashboard"             :face nerd-icons-yellow)
+    (jade-mode                         nerd-icons-sucicon "nf-seti-jade"                 :face nerd-icons-red)
+    (pug-mode                          nerd-icons-sucicon "nf-seti-pug"                  :face nerd-icons-red)
+    (react-mode                        nerd-icons-devicon "nf-dev-react"                 :face nerd-icons-lblue)
+    (image-mode                        nerd-icons-octicon "nf-oct-file_media"            :face nerd-icons-blue)
+    (texinfo-mode                      nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (markdown-mode                     nerd-icons-octicon "nf-oct-markdown"              :face nerd-icons-lblue)
+    (markdown-ts-mode                  nerd-icons-octicon "nf-oct-markdown"              :face nerd-icons-lblue)
+    ;; (bibtex-mode                    nerd-icons-fileicon "bib"                         :face nerd-icons-maroon)
+    (compilation-mode                  nerd-icons-faicon "nf-fa-cogs")
+    (objc-mode                         nerd-icons-faicon "nf-fa-apple")
+    (tuareg-mode                       nerd-icons-sucicon "nf-seti-ocaml")
+    (purescript-mode                   nerd-icons-sucicon "nf-seti-purescript")
+    (verilog-mode                      nerd-icons-mdicon "nf-md-chip"                    :face nerd-icons-red)
+    (verilog-ts-mode                   nerd-icons-mdicon "nf-md-chip"                    :face nerd-icons-red)
+    (vhdl-mode                         nerd-icons-octicon "nf-oct-cpu"                   :face nerd-icons-blue)
+    (vhdl-ts-mode                      nerd-icons-octicon "nf-oct-cpu"                   :face nerd-icons-blue)
+    ;; (haskell-cabal-mode             nerd-icons-fileicon "cabal"                       :face nerd-icons-lblue)
+    (kotlin-mode                       nerd-icons-sucicon "nf-custom-kotlin"             :face nerd-icons-orange)
+    (kotlin-ts-mode                    nerd-icons-sucicon "nf-custom-kotlin"             :face nerd-icons-orange)
+    (nim-mode                          nerd-icons-sucicon "nf-seti-nim"                  :face nerd-icons-yellow)
+    (sql-mode                          nerd-icons-devicon  "nf-dev-database"             :face nerd-icons-silver)
+    (lua-mode                          nerd-icons-sucicon "nf-seti-lua"                  :face nerd-icons-dblue)
+    (lua-ts-mode                       nerd-icons-sucicon "nf-seti-lua"                  :face nerd-icons-dblue)
+    ;; (adoc-mode                      nerd-icons-fileicon "asciidoc"                    :face nerd-icons-lblue)
+    (puppet-mode                       nerd-icons-sucicon "nf-seti-puppet"               :face nerd-icons-yellow)
+    (puppet-ts-mode                    nerd-icons-sucicon "nf-seti-puppet"               :face nerd-icons-yellow)
+    (jinja2-mode                       nerd-icons-sucicon "nf-seti-jinja"                :face nerd-icons-silver)
+    (powershell-mode                   nerd-icons-mdicon "nf-md-powershell"              :face nerd-icons-blue)
+    (tex-mode                          nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (latex-mode                        nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (latex-ts-mode                     nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (doctex-mode                       nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    ;; Modes provided by AUCTeX 14.1 and higher
+    (TeX-mode                          nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (LaTeX-mode                        nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (docTeX-mode                       nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (ConTeXt-mode                      nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (AmSTeX-mode                       nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (plain-TeX-mode                    nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (Texinfo-mode                      nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (japanese-plain-TeX-mode           nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (japanese-LaTeX-mode               nerd-icons-sucicon "nf-seti-tex"                  :face nerd-icons-lred)
+    (dart-mode                         nerd-icons-devicon "nf-dev-dart"                  :face nerd-icons-blue)
+    (dart-ts-mode                      nerd-icons-devicon "nf-dev-dart"                  :face nerd-icons-blue)
+    (fsharp-mode                       nerd-icons-devicon "nf-dev-fsharp"                :face nerd-icons-blue)
+    (asm-mode                          nerd-icons-sucicon "nf-seti-asm"                  :face nerd-icons-blue)
+    (fasm-mode                         nerd-icons-sucicon "nf-seti-asm"                  :face nerd-icons-blue)
+    (masm-mode                         nerd-icons-sucicon "nf-seti-asm"                  :face nerd-icons-blue)
+    (nasm-mode                         nerd-icons-sucicon "nf-seti-asm"                  :face nerd-icons-blue)
+    (gas-mode                          nerd-icons-sucicon "nf-seti-asm"                  :face nerd-icons-blue)
+    ;; (tcl-mode                       nerd-icons-fileicon "tcl"                         :face nerd-icons-dred)
+    ;; (cuda-mode                      nerd-icons-fileicon "nvidia"                      :face nerd-icons-green)
+    (f90-mode                          nerd-icons-mdicon "nf-md-language_fortran"        :face nerd-icons-purple)
+    ;; (hy-mode                        nerd-icons-fileicon "hy"                          :face nerd-icons-blue)
+    (glsl-mode                         nerd-icons-faicon "nf-fa-paint_brush"             :face nerd-icons-green)
+    (zig-mode                          nerd-icons-sucicon "nf-seti-zig"                  :face nerd-icons-orange)
+    ;; (odin-mode                      nerd-icons-fileicon "odin"                        :face nerd-icons-lblue)
+    (pdf-view-mode                     nerd-icons-codicon  "nf-cod-file_pdf"             :face nerd-icons-dred)
+    (doc-view-mode                     nerd-icons-mdicon   "nf-md-file_document"         :face nerd-icons-lred)
+    (calibre-library-mode              nerd-icons-codicon  "nf-cod-library"              :face nerd-icons-dblue)
+    (calibre-edit-mode                 nerd-icons-codicon  "nf-cod-library"              :face nerd-icons-lred)
+    (calibredb-search-mode             nerd-icons-codicon  "nf-cod-library"              :face nerd-icons-dblue)
+    (calibredb-show-mode               nerd-icons-codicon  "nf-cod-library"              :face nerd-icons-lblue)
+    (osm-mode                          nerd-icons-mdicon   "nf-md-map_search"            :face nerd-icons-lgreen)
+    (spacemacs-buffer-mode             nerd-icons-sucicon  "nf-custom-emacs"             :face nerd-icons-purple)
+
+    (elfeed-search-mode                nerd-icons-faicon   "nf-fa-rss_square"            :face nerd-icons-orange)
+    (elfeed-summary-mode               nerd-icons-faicon   "nf-fa-rss_square"            :face nerd-icons-orange)
+    (elfeed-show-mode                  nerd-icons-faicon   "nf-fa-rss_square"            :face nerd-icons-yellow)
+    (newsticker-treeview-mode          nerd-icons-faicon   "nf-fa-rss_square"            :face nerd-icons-orange)
+    (newsticker-treeview-list-mode     nerd-icons-faicon   "nf-fa-rss_square"            :face nerd-icons-lorange)
+    (newsticker-treeview-item-mode     nerd-icons-faicon   "nf-fa-rss_square"            :face nerd-icons-yellow)
+
+    (emms-browser-mode                 nerd-icons-faicon   "nf-fa-music"                 :face nerd-icons-silver)
+    (emms-lyrics-mode                  nerd-icons-faicon   "nf-fa-music"                 :face nerd-icons-silver)
+    (emms-show-all-mode                nerd-icons-faicon   "nf-fa-music"                 :face nerd-icons-silver)
+    (emms-metaplaylist-mode            nerd-icons-faicon   "nf-fa-music"                 :face nerd-icons-silver)
+    (emms-tag-editor-mode              nerd-icons-faicon   "nf-fa-music"                 :face nerd-icons-silver)
+    (emms-playlist-mode                nerd-icons-faicon   "nf-fa-music"                 :face nerd-icons-silver)
+    (lilypond-mode                     nerd-icons-faicon   "nf-fa-music"                 :face nerd-icons-green)
+    (bongo-playlist-mode               nerd-icons-faicon "nf-fa-music"                   :face nerd-icons-silver)
+    (bongo-library-mode                nerd-icons-faicon "nf-fa-music"                   :face nerd-icons-silver)
+    (mingus-playlist-mode              nerd-icons-faicon "nf-fa-music"                   :face nerd-icons-silver)
+    (mingus-help-mode                  nerd-icons-faicon "nf-fa-music"                   :face nerd-icons-silver)
+    (mingus-browse-mode                nerd-icons-faicon "nf-fa-music"                   :face nerd-icons-silver)
+    (mingus-burn-mode                  nerd-icons-faicon "nf-fa-music"                   :face nerd-icons-silver)
+    (simple-mpc-mode                   nerd-icons-faicon "nf-fa-music"                   :face nerd-icons-silver)
+    (telega-root-mode                  nerd-icons-faicon "nf-fae-telegram"               :face nerd-icons-purple)
+    (telega-chat-mode                  nerd-icons-faicon "nf-fae-telegram"               :face nerd-icons-blue)
+    (mastodon-mode                     nerd-icons-mdicon "nf-md-mastodon"                :face nerd-icons-blue)
+
+    (fanyi-mode                        nerd-icons-codicon "nf-cod-library"               :face nerd-icons-lcyan)
+    (osx-dictionary-mode               nerd-icons-codicon "nf-cod-library"               :face nerd-icons-lcyan)
+    (youdao-dictionary-mode            nerd-icons-codicon "nf-cod-library"               :face nerd-icons-lcyan)
+
+    (magik-mode                        nerd-icons-faicon "nf-fa-magic"                   :face nerd-icons-blue)
+    (magik-ts-mode                     nerd-icons-faicon "nf-fa-magic"                   :face nerd-icons-blue)
+    (magik-session-mode                nerd-icons-devicon "nf-dev-terminal"              :face nerd-icons-blue)
+    (magik-cb-mode                     nerd-icons-faicon "nf-fa-book"                    :face nerd-icons-blue)
+    ;; (meson-mode                     nerd-icons-fileicon "meson"                       :face nerd-icons-purple)
+    ;; (man-common                     nerd-icons-fileicon "man-page"                    :face nerd-icons-blue)
+    (heex-mode                         nerd-icons-sucicon "nf-seti-elixir"               :face nerd-icons-lorange)
+    (heex-ts-mode                      nerd-icons-sucicon "nf-seti-elixir"               :face nerd-icons-lorange)
+    (julia-mode                        nerd-icons-sucicon "nf-seti-julia"                :face nerd-icons-purple)
+    (julia-ts-mode                     nerd-icons-sucicon "nf-seti-julia"                :face nerd-icons-purple)
+    (flycheck-error-list               nerd-icons-faicon "nf-fa-list_alt"                :face nerd-icons-lred)
+    (exwm-mode                         nerd-icons-flicon "nf-linux-xorg"                 :face nerd-icons-dsilver)
+    (ewm-surface-mode                  nerd-icons-flicon "nf-linux-wayland"              :face nerd-icons-purple)
+    (proced-mode                       nerd-icons-codicon "nf-cod-dashboard"             :face nerd-icons-green)
+    (bluetooth-mode                    nerd-icons-faicon "nf-fa-bluetooth"               :face nerd-icons-blue)
+    (disk-usage                        nerd-icons-faicon "nf-fa-pie_chart"               :face nerd-icons-lred)
+    (awk-mode                          nerd-icons-devicon "nf-dev-awk"                   :face nerd-icons-yellow)
+    (ement-directory-mode              nerd-icons-faicon "nf-fa-search"                  :face nerd-icons-dpurple)
+    (ement-describe-room-mode          nerd-icons-faicon "nf-fa-info"                    :face nerd-icons-dpurple)
+    (ement-room-list-mode              nerd-icons-faicon "nf-fa-list"                    :face nerd-icons-dpurple)
+    (ement-tabulated-room-list-mode    nerd-icons-faicon "nf-fa-table"                   :face nerd-icons-dpurple)
+    (ement-room-mode                   nerd-icons-faicon "nf-fa-comments_o"              :face nerd-icons-dpurple)
+    (ement-notifications-mode          nerd-icons-faicon "nf-fa-inbox"                   :face nerd-icons-dpurple)
+    (authinfo-mode                     nerd-icons-octicon "nf-oct-key"                   :face nerd-icons-lblue)
+    (show-font-mode                    nerd-icons-faicon "nf-fa-font"                    :face nerd-icons-dred)
+    (show-font-tabulated-mode          nerd-icons-faicon "nf-fa-font"                    :face nerd-icons-dred)
+    (journalctl-mode                   nerd-icons-octicon "nf-oct-log"                   :face nerd-icons-dgreen)
+    (pinentry-prompt-mode              nerd-icons-mdicon "nf-md-form_textbox_password"   :face nerd-icons-dred)))
+
+(defvar nerd-icons-url-alist
+  '(
+    ;; Social media and communities
+    ("^\\(https?://\\)?\\(www\\.\\)?del\\.icio\\.us"          nerd-icons-faicon "nf-fa-delicious")
+    ("^\\(https?://\\)?\\(www\\.\\)?behance\\.net"            nerd-icons-faicon "nf-fa-behance")
+    ("^\\(https?://\\)?\\(www\\.\\)?dribbble\\.com"           nerd-icons-faicon "nf-fa-dribbble")
+    ("^\\(https?://\\)?\\(www\\.\\)?facebook\\.com"           nerd-icons-faicon "nf-fa-facebook_official")
+    ("^\\(https?://\\)?\\(www\\.\\)?glide\\.me"               nerd-icons-faicon "nf-fa-glide_g")
+    ("^\\(https?://\\)?\\(www\\.\\)?plus\\.google\\.com"      nerd-icons-faicon "nf-fa-google_plus")
+    ("linkedin\\.com"                                         nerd-icons-faicon "nf-fa-linkedin")
+    ("^\\(https?://\\)?\\(www\\.\\)?ok\\.ru"                  nerd-icons-faicon "nf-fa-odnoklassniki")
+    ("^\\(https?://\\)?\\(www\\.\\)?reddit\\.com"             nerd-icons-faicon "nf-fa-reddit_alien")
+    ("^\\(https?://\\)?\\(www\\.\\)?slack\\.com"              nerd-icons-faicon "nf-fa-slack")
+    ("^\\(https?://\\)?\\(www\\.\\)?snapchat\\.com"           nerd-icons-faicon "nf-fa-snapchat_ghost")
+    ("^\\(https?://\\)?\\(www\\.\\)?weibo\\.com"              nerd-icons-faicon "nf-fa-weibo")
+    ("^\\(https?://\\)?\\(www\\.\\)?twitter\\.com"            nerd-icons-faicon "nf-fa-twitter")
+    ;; Blogging
+    ("joomla\\.org"                                           nerd-icons-faicon "nf-fa-joomla")
+    ("^\\(https?://\\)?\\(www\\.\\)?medium\\.com"             nerd-icons-faicon "nf-fa-medium")
+    ("tumblr\\.com"                                           nerd-icons-faicon "nf-fa-tumblr")
+    ("^wordpress\\.com"                                       nerd-icons-faicon "nf-fa-wordpress")
+    ;; Programming
+    ("^\\(https?://\\)?\\(www\\.\\)?bitbucket\\.org"          nerd-icons-faicon "nf-fa-bitbucket")
+    ("^\\(https?://\\)?\\(www\\.\\)?codepen\\.io"             nerd-icons-faicon "nf-fa-codepen")
+    ("^\\(https?://\\)?\\(www\\.\\)?codiepie\\.com"           nerd-icons-faicon "nf-fa-codiepie")
+    ("^\\(https?://\\)?\\(www\\.\\)?gist\\.github\\.com"      nerd-icons-octicon "nf-oct-logo_gist")
+    ("^\\(https?://\\)?\\(www\\.\\)?github\\.com"             nerd-icons-octicon "nf-oct-mark_github")
+    ("^\\(https?://\\)?\\(www\\.\\)?gitlab\\.com"             nerd-icons-faicon "nf-fa-gitlab")
+    ("^\\(https?://\\)?\\(www\\.\\)?news\\.ycombinator\\.com" nerd-icons-faicon "nf-fa-hacker_news")
+    ("^\\(https?://\\)?\\(www\\.\\)?jsfiddle\\.net"           nerd-icons-faicon "nf-fa-jsfiddle")
+    ("^\\(https?://\\)?\\(www\\.\\)?maxcdn\\.com"             nerd-icons-faicon "nf-fa-maxcdn")
+    ("^\\(https?://\\)?\\(www\\.\\)?stackoverflow\\.com"      nerd-icons-faicon "nf-fa-stack_overflow")
+    ("^\\(https?://\\)?\\(www\\.\\)?codeberg\\.org"           nerd-icons-flicon "nf-linux-codeberg")
+    ;; Video
+    ("^\\(https?://\\)?\\(www\\.\\)?twitch\\.tv"              nerd-icons-faicon "nf-fa-twitch")
+    ("^\\(https?://\\)?\\(www\\.\\)?vimeo\\.com"              nerd-icons-faicon "nf-fa-vimeo")
+    ("^\\(https?://\\)?\\(www\\.\\)?youtube\\.com"            nerd-icons-faicon "nf-fa-youtube")
+    ("^\\(https?://\\)?\\(www\\.\\)?youtu\\.be"               nerd-icons-faicon "nf-fa-youtube")
+    ("^\\(https?://\\)?\\(www\\.\\)?vine\\.co"                nerd-icons-faicon "nf-fa-vine")
+    ;; Sound
+    ("^\\(https?://\\)?\\(www\\.\\)?last\\.fm"                nerd-icons-faicon "nf-fa-lastfm")
+    ("^\\(https?://\\)?\\(www\\.\\)?mixcloud\\.com"           nerd-icons-faicon "nf-fa-mixcloud")
+    ("^\\(https?://\\)?\\(www\\.\\)?soundcloud\\.com"         nerd-icons-faicon "nf-fa-soundcloud")
+    ("spotify\\.com"                                          nerd-icons-faicon "nf-fa-spotify")
+    ;; Shopping
+    ("^\\(https?://\\)?\\(www\\.\\)?amazon\\."                nerd-icons-faicon "nf-fa-amazon")
+    ("^\\(https?://\\)?\\(www\\.\\)?opencart\\.com"           nerd-icons-faicon "nf-fa-opencart")
+    ("^\\(https?://\\)?\\(www\\.\\)?paypal\\.com"             nerd-icons-faicon "nf-fa-paypal")
+    ("^\\(https?://\\)?\\(www\\.\\)?shirtsinbulk\\.com"       nerd-icons-faicon "nf-fa-shitsinbulk")
+    ;; Images
+    ("^\\(https?://\\)?\\(www\\.\\)?500px\\.com"              nerd-icons-faicon "nf-fa-500px")
+    ("^\\(https?://\\)?\\(www\\.\\)?deviantart\\.com"         nerd-icons-faicon "nf-fa-deviantart")
+    ("^\\(https?://\\)?\\(www\\.\\)?flickr\\.com"             nerd-icons-faicon "nf-fa-flickr")
+    ("^\\(https?://\\)?\\(www\\.\\)?instagram\\.com"          nerd-icons-faicon "nf-fa-instagram")
+    ("^\\(https?://\\)?\\(www\\.\\)?pinterest\\."             nerd-icons-faicon "nf-fa-pinterest")
+    ;; Information and books
+    ("^\\(https?://\\)?\\(www\\.\\)?digg\\.com"               nerd-icons-faicon "nf-fa-digg")
+    ("^\\(https?://\\)?\\(www\\.\\)?foursquare\\.com"         nerd-icons-faicon "nf-fa-foursquare")
+    ("^\\(https?://\\)?\\(www\\.\\)?getpocket\\.com"          nerd-icons-faicon "nf-fa-get_pocket")
+    ("^\\(https?://\\)?\\(www\\.\\)?scribd\\.com"             nerd-icons-faicon "nf-fa-scribd")
+    ("^\\(https?://\\)?\\(www\\.\\)?slideshare\\.net"         nerd-icons-faicon "nf-fa-slideshare")
+    ("stackexchange\\.com"                                    nerd-icons-faicon "nf-fa-stack_exchange")
+    ("^\\(https?://\\)?\\(www\\.\\)?stumbleupon\\.com"        nerd-icons-faicon "nf-fa-stumbleupon")
+    ("^\\(https?://\\)?\\(www\\.\\)?tripadvisor\\."           nerd-icons-faicon "nf-fa-tripadvisor")
+    ("^\\(https?://\\)?\\(www\\.\\)?yelp\\."                  nerd-icons-faicon "nf-fa-yelp")
+
+    ("wikipedia\\.org"                                        nerd-icons-faicon "nf-fa-wikipedia_w")
+    ;; Various companies and tools
+    ("^\\(https?://\\)?\\(www\\.\\)?angel\\.co"               nerd-icons-faicon "nf-fa-angellist")
+    ("^\\(https?://\\)?\\(www\\.\\)?apple\\.com"              nerd-icons-faicon "nf-fa-apple")
+    ("^\\(https?://\\)?\\(www\\.\\)?buysellads\\.com"         nerd-icons-faicon "nf-fa-buysellads")
+    ("^\\(https?://\\)?\\(www\\.\\)?connectdevelop\\.com"     nerd-icons-faicon "nf-fa-connectdevelop")
+    ("^\\(https?://\\)?\\(www\\.\\)?dashcube\\.com"           nerd-icons-faicon "nf-fa-dashcube")
+    ("^\\(https?://\\)?\\(www\\.\\)?dropbox\\.com"            nerd-icons-faicon "nf-fa-dropbox")
+    ("^\\(https?://\\)?\\(www\\.\\)?enviragallery\\.com"      nerd-icons-faicon "nf-fa-envira")
+    ("^\\(https?://\\)?\\(www\\.\\)?fortawesome\\.com"        nerd-icons-faicon "nf-fa-fort_awesome")
+    ("^\\(https?://\\)?\\(www\\.\\)?forumbee\\.com"           nerd-icons-faicon "nf-fa-forumbee")
+    ("^\\(https?://\\)?\\(www\\.\\)?gratipay\\.com"           nerd-icons-faicon "nf-fa-gratipay")
+    ("^\\(https?://\\)?\\(www\\.\\)?modx\\.com"               nerd-icons-faicon "nf-fa-modx")
+    ("^\\(https?://\\)?\\(www\\.\\)?pagelines\\.com"          nerd-icons-faicon "nf-fa-pagelines")
+    ("^\\(https?://\\)?\\(www\\.\\)?producthunt\\.com"        nerd-icons-faicon "nf-fa-product_hunt")
+    ("sellsy\\.com"                                           nerd-icons-faicon "nf-fa-sellsy")
+    ("^\\(https?://\\)?\\(www\\.\\)?simplybuilt\\.com"        nerd-icons-faicon "nf-fa-simplybuilt")
+    ("^\\(https?://\\)?\\(www\\.\\)?skyatlas\\.com"           nerd-icons-faicon "nf-fa-skyatlas")
+    ("^\\(https?://\\)?\\(www\\.\\)?skype\\.com"              nerd-icons-faicon "nf-fa-skype")
+    ("steampowered\\.com"                                     nerd-icons-faicon "nf-fa-steam")
+    ("^\\(https?://\\)?\\(www\\.\\)?themeisle\\.com"          nerd-icons-faicon "nf-fa-themeisle")
+    ("^\\(https?://\\)?\\(www\\.\\)?trello\\.com"             nerd-icons-faicon "nf-fa-trello")
+    ("^\\(https?://\\)?\\(www\\.\\)?whatsapp\\.com"           nerd-icons-faicon "nf-fa-whatsapp")
+    ("^\\(https?://\\)?\\(www\\.\\)?ycombinator\\.com"        nerd-icons-faicon "nf-fa-y_combinator")
+    ("yahoo\\.com"                                            nerd-icons-faicon "nf-fa-yahoo")
+    ("^\\(https?://\\)?\\(www\\.\\)?yoast\\.com"              nerd-icons-faicon "nf-fa-yoast")
+    ;; Catch all
+    ("android"                                                nerd-icons-faicon "nf-fa-android")
+    ("creativecommons"                                        nerd-icons-faicon "nf-fa-creative_commons")
+    ("forums?"                                                nerd-icons-codicon "nf-cod-comment_discussion")
+    ("\\.pdf$"                                                nerd-icons-codicon "nf-cod-file_pdf" :face nerd-icons-dred)
+    ("google"                                                 nerd-icons-faicon "nf-fa-google")
+    ("\\.rss"                                                 nerd-icons-faicon "nf-fa-rss")))
+
+(defun nerd-icons-auto-mode-match? (&optional file)
+  "Whether or not FILE's `major-mode' match against its `auto-mode-alist'."
+  (let* ((file (or file (buffer-file-name) (buffer-name)))
+         (auto-mode (nerd-icons--auto-mode-lookup (file-name-nondirectory file))))
+    (eq major-mode auto-mode)))
+
+(defun nerd-icons--auto-mode-lookup (file)
+  "Return the mode-setting function associated with FILE via `auto-mode-alist'.
+NOTE: The mode-setting function may not be the same as the mode itself."
+  (nerd-icons-match-to-alist file auto-mode-alist))
+
+(defun nerd-icons-match-to-alist (string alist)
+  "Match STRING against an entry in ALIST using `string-match'."
+  (let ((case-fold-search nil))
+    (cdr (assoc string alist #'string-match))))
+
+(defun nerd-icons-dir-is-submodule (dir)
+  "Checker whether or not DIR is a git submodule."
+  (let* ((gitmodule-dir (locate-dominating-file dir ".gitmodules"))
+         (modules-file  (expand-file-name (format "%s.gitmodules" gitmodule-dir)))
+         (module-search (format "submodule \".*?%s\"" (file-name-base dir))))
+
+    (when (and gitmodule-dir (file-exists-p (format "%s/.git" dir)))
+      (with-temp-buffer
+        (insert-file-contents modules-file)
+        (search-forward-regexp module-search (point-max) t)))))
+
+(defun nerd-icons--read-candidates ()
+  "Helper to build a list of candidates for all glyph sets."
+  (cl-reduce 'append (mapcar (lambda (it) (nerd-icons--read-candidates-for-glyph-set it t)) nerd-icons-glyph-sets)))
+
+(defun nerd-icons--read-candidates-for-glyph-set (glyph-set &optional show-glyph-set)
+  "Helper to build read candidates for GLYPH-SET.
+
+If SHOW-GLYPH-SET is non-nil, displays the icons glyph set in the candidate
+string."
+  (let ((data   (funcall (nerd-icons--data-name glyph-set)))
+        (icon-f (nerd-icons--function-name glyph-set)))
+    (mapcar
+     (lambda (it)
+       (let* ((icon-name (car it))
+
+              (icon-display (funcall icon-f icon-name))
+              (icon-glyph-set (if show-glyph-set (format "\t[%s]" glyph-set) ""))
+
+              (candidate-name (format "%s\t%s%s" icon-display icon-name icon-glyph-set))
+              (candidate-icon (funcall (nerd-icons--function-name glyph-set) icon-name)))
+         (cons candidate-name candidate-icon)))
+     data)))
+
+;;;###autoload
+(defun nerd-icons-install-fonts (&optional pfx)
+  "Helper function to download and install the latests fonts based on OS.
+The provided Nerd Font is Symbols Nerd Font Mono.
+When PFX is non-nil, ignore the prompt and just install.
+On Windows only, when PFX is a path, ignore the prompt and download there."
+  (interactive "P")
+  (when (or pfx (yes-or-no-p "This will download and install fonts, are you sure you want to do this?"))
+    (let* ((url-format "https://raw.githubusercontent.com/rainstormstudio/nerd-icons.el/main/fonts/%s")
+           (font-dest (cond
+                       ;; Default Linux install directories
+                       ((member system-type '(gnu gnu/linux gnu/kfreebsd))
+                        (concat (or (getenv "XDG_DATA_HOME")
+                                    (concat (getenv "HOME") "/.local/share"))
+                                "/fonts/"
+                                nerd-icons-fonts-subdirectory))
+                       ;; Default MacOS install directory
+                       ((eq system-type 'darwin)
+                        (concat (getenv "HOME")
+                                "/Library/Fonts/"
+                                nerd-icons-fonts-subdirectory))))
+           (known-dest? (stringp font-dest))
+           (font-dest (or font-dest
+                          (and (stringp pfx) pfx)
+                          (read-directory-name "Font installation directory: " "~/"))))
+
+      (unless (file-directory-p font-dest) (mkdir font-dest t))
+
+      (mapc (lambda (font)
+              (url-copy-file (format url-format font) (expand-file-name font font-dest) t))
+            nerd-icons-font-names)
+      (when known-dest?
+        (message "Fonts downloaded, updating font cache... <fc-cache -f -v> ")
+        (shell-command-to-string (format "fc-cache -f -v")))
+      (message "%s Successfully %s `nerd-icons' fonts to `%s'!"
+               (nerd-icons-wicon "nf-weather-stars" :v-adjust 0.0)
+               (if known-dest? "installed" "downloaded")
+               font-dest))))
+
+;;;###autoload
+(defun nerd-icons-insert (&optional arg glyph-set)
+  "Interactive icon insertion function.
+When Prefix ARG is non-nil, insert the propertized icon.
+When GLYPH-SET is non-nil, limit the candidates to the icon set matching it."
+  (interactive "P")
+  (let* ((standard-output (current-buffer))
+         (candidates (if glyph-set
+                         (nerd-icons--read-candidates-for-glyph-set glyph-set)
+                       (nerd-icons--read-candidates)))
+         (prompt     (if glyph-set
+                         (format "%s Icon: " (funcall (nerd-icons--glyph-set-name glyph-set)))
+                       "Icon : "))
+         (selection (completing-read prompt candidates nil t))
+         (result    (cdr (assoc selection candidates))))
+
+    (if arg (prin1 result) (insert result))))
+
+;;;###autoload
+(defun nerd-icons-icon-for-dir (dir &rest arg-overrides)
+  "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."
+  (let* ((dir (or dir default-directory "/"))
+         (dirname (file-name-base (directory-file-name dir)))
+         (path (if (file-name-absolute-p dir) dir (expand-file-name dir)))
+         (icon (nerd-icons-match-to-alist dirname nerd-icons-dir-icon-alist))
+         (args (cdr icon)))
+    (when arg-overrides (setq args (append `(,(car args)) arg-overrides (cdr args))))
+    (cond
+     ((file-remote-p path)
+      (apply #'nerd-icons-codicon "nf-cod-remote" (cdr args)))
+     ((file-symlink-p path)
+      (apply #'nerd-icons-codicon "nf-cod-file_symlink_directory" (cdr args)))
+     ((nerd-icons-dir-is-submodule path)
+      (apply #'nerd-icons-codicon "nf-cod-file_submodule" (cdr args)))
+     ((file-exists-p (format "%s/.git" path))
+      (apply #'nerd-icons-octicon "nf-oct-repo" (cdr args)))
+     (t (apply (car icon) args)))))
+
+;;;###autoload
+(defun nerd-icons-icon-for-file (file &rest arg-overrides)
+  "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."
+  (let* ((name (file-name-nondirectory file))
+         (ext (file-name-extension name))
+         (icon (or (nerd-icons-match-to-alist name nerd-icons-regexp-icon-alist)
+                   (and ext
+                        (cdr (assoc (downcase ext)
+                                    nerd-icons-extension-icon-alist)))
+                   nerd-icons-default-file-icon))
+         (args (cdr icon)))
+    (when arg-overrides (setq args (append `(,(car args)) arg-overrides (cdr args))))
+    (apply (car icon) args)))
+
+;;;###autoload
+(defun nerd-icons-icon-for-extension (ext &rest arg-overrides)
+  "Get the formatted icon for EXT.
+ARG-OVERRIDES should be a plist containining `:height',
+`:v-adjust' or `:face' properties like in the normal icon
+inserting functions."
+  (let* ((icon (or
+                (and ext
+                     (cdr (assoc (downcase ext)
+                                 nerd-icons-extension-icon-alist)))
+                nerd-icons-default-file-icon))
+         (args (cdr icon)))
+    (when arg-overrides (setq args (append `(,(car args)) arg-overrides (cdr args))))
+    (apply (car icon) args)))
+
+(defalias 'nerd-icons--mode-parents
+  (if (< emacs-major-version 30)
+      (lambda (mode)
+        "Return all parents for the given MODE, starting with MODE."
+        (when mode
+          (cons mode (nerd-icons--mode-parents
+                      (get mode 'derived-mode-parent)))))
+    'derived-mode-all-parents))
+
+;;;###autoload
+(defun nerd-icons-icon-for-mode (mode &rest arg-overrides)
+  "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."
+  (let* ((modes (nerd-icons--mode-parents mode))
+         (icon (cdr (or (cl-some (lambda (m) (assq m nerd-icons-mode-icon-alist)) modes)
+                        (assq 'fundamental-mode nerd-icons-mode-icon-alist)))))
+    (when icon
+      (if arg-overrides
+          (apply (car icon) (cadr icon) (append arg-overrides (cddr icon)))
+        (apply (car icon) (cdr icon))))))
+
+;;;###autoload
+(defun nerd-icons-icon-for-url (url &rest arg-overrides)
+  "Get the formatted icon for URL.
+If an icon for URL isn't found in `nerd-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."
+  (let* ((icon (nerd-icons-match-to-alist url nerd-icons-url-alist))
+         (args (cdr icon)))
+    (unless icon
+      (setq icon '(nerd-icons-faicon "nf-fa-globe"))
+      (setq args (cdr icon)))
+    (when arg-overrides (setq args (append `(,(car args)) arg-overrides (cdr args))))
+    (apply (car icon) args)))
+
+;;;###autoload
+(cl-defgeneric nerd-icons-icon-for-buffer (&rest arg-overrides)
+  "Get the formatted icon for the current buffer.
+
+ARG-OVERRIDES should be a plist containing `:height',
+`:v-adjust' or `:face' properties like in the normal icon
+inserting functions.
+
+This function prioritises the use of the buffers file extension to
+discern the icon when its `major-mode' matches its auto mode,
+otherwise it will use the buffers `major-mode' to decide its
+icon."
+  (if (and (buffer-file-name)
+           (nerd-icons-auto-mode-match?))
+      (apply #'nerd-icons-icon-for-file (file-name-nondirectory (buffer-file-name)) arg-overrides)
+    (apply #'nerd-icons-icon-for-mode major-mode arg-overrides)))
+
+(defun nerd-icons-cache (func)
+  "Set a cache for FUNC.  Does not work on interactive functions."
+  (unless (get func 'nerd-icons--cached)
+    (let ((cache (make-hash-table :test #'equal
+                                  :size nerd-icons--cache-limit))
+          (orig-fn (symbol-function func))
+          (unset (make-symbol "unset")))
+      (fset func
+            (lambda (&rest args)
+              (let ((value (gethash args cache unset)))
+                (when (eq value unset)
+                  (when (> (hash-table-count cache)
+                           nerd-icons--cache-limit)
+                    (clrhash cache))
+                  (setq value (puthash args (apply orig-fn args) cache)))
+                value))))
+    (put func 'nerd-icons--cached t)))
+
+(nerd-icons-cache #'nerd-icons-icon-for-dir)
+(nerd-icons-cache #'nerd-icons-icon-for-file)
+(nerd-icons-cache #'nerd-icons-icon-for-extension)
+(nerd-icons-cache #'nerd-icons-icon-for-mode)
+(nerd-icons-cache #'nerd-icons-icon-for-url)
+(nerd-icons-cache #'nerd-icons--auto-mode-lookup)
+
+;; Weather icons
+(defun nerd-icons-icon-for-weather (weather)
+  "Get an icon for a WEATHER status."
+  (let ((icon (nerd-icons-match-to-alist weather nerd-icons-weather-icon-alist)))
+    (when icon
+      (apply (car icon) (cdr icon)))))
+
+(nerd-icons-cache #'nerd-icons-icon-for-weather)
+
+(eval-and-compile
+  (defun nerd-icons--function-name (name)
+    "Get the symbol for an icon function name for icon set NAME."
+    (intern (concat "nerd-icons-" (downcase (symbol-name name)))))
+
+  (defun nerd-icons--family-name (name)
+    "Get the symbol for an icon family function for icon set NAME."
+    (intern (concat "nerd-icons-" (downcase (symbol-name name)) "-family")))
+
+  (defun nerd-icons--glyph-set-name (name)
+    "Get the symbol for an icon glyph set function for icon set NAME."
+    (intern (concat "nerd-icons-" (downcase (symbol-name name)) "-glyph-set")))
+
+  (defun nerd-icons--data-name (name)
+    "Get the symbol for an icon family function for icon set NAME."
+    (intern (concat "nerd-icons-" (downcase (symbol-name name)) "-data")))
+
+  (defun nerd-icons--insert-function-name (name)
+    "Get the symbol for an icon insert function for icon set NAME."
+    (intern (concat "nerd-icons-insert-" (downcase (symbol-name name))))))
+
+(defun nerd-icons-insert-icons-for (family &optional height duration)
+  "Insert all of the available icons associated with FAMILY.
+If a HEIGHT is provided it will render the icons at this height.
+This is useful both to see the icons more clearly and to test
+different height rendering.  If DURATION is provided, it will
+pause for DURATION seconds between printing each character."
+  (let* ((data-f    (nerd-icons--data-name family))
+         (insert-f  (nerd-icons--function-name family))
+
+         (height (or height 1.0))
+         (data (funcall data-f)))
+    (mapc
+     (lambda (it)
+       (insert (format "%s - %s\n" (funcall insert-f (car it) :height height) (car it)))
+       (when duration (sit-for duration)))
+     data)))
+
+(defun nerd-icons-set-font (&optional font-family frame)
+  "Modify nerd font charsets to use FONT-FAMILY for FRAME."
+  (let ((font-f (or font-family nerd-icons-font-family))
+        (charsets '((#xe5fa . #xe6bb)  ;; Seti-UI + Custom
+                    (#xe700 . #xe958)  ;; Devicons
+                    (#xed00 . #xf2ff)  ;; Font Awesome
+                    (#xe200 . #xe2a9)  ;; Font Awesome Extension
+                    (#xf500 . #xfd46) (#xf0001 . #xf1af0) ;; Material Design Icons
+                    (#xe300 . #xe3e3)  ;; Weather
+                    (#xf400 . #xf533) #x2665 #x26a1  ;; Octicons
+                    (#xe0a0 . #xe0a3) (#xe0b0 . #xe0d7)  ;; Powerline Symbols + Extra
+                    (#x23fb . #x23fe) #x2b58  ;; IEC Power Symbols
+                    (#xf300 . #xf385)  ;; Font Logos
+                    (#xe000 . #xe00a)  ;; Pomicons
+                    (#xea60 . #xec84))))  ;; Codicons
+    (cl-loop for charset in charsets do
+             (set-fontset-font
+              (frame-parameter nil 'font)
+              charset
+              (font-spec :family font-f
+                         :weight nil
+                         :size   nil)
+              frame
+              'prepend))))
+
+(defmacro nerd-icons-define-icon (name alist family glyph-set)
+  "Macro to generate functions for inserting icons for icon set NAME.
+
+NAME defines is the name of the iconset and will produce a
+function of the for `nerd-icon-NAME'.
+
+ALIST is the alist containing maps between icon names and the
+UniCode for the character.  All of these can be found in the data
+directory of this package.
+
+FAMILY is the font family to use for the icons.
+GLYPH-SET is the glyph set of the icon."
+  `(progn
+     (add-to-list 'nerd-icons-glyph-sets (quote ,name))
+     (defun ,(nerd-icons--family-name name) () ,family)
+     (defun ,(nerd-icons--glyph-set-name name) () ,glyph-set)
+     (defun ,(nerd-icons--data-name name) () ,alist)
+     (defun ,(nerd-icons--function-name name) (icon-name &rest args)
+       (let ((icon (cdr (assoc icon-name ,alist)))
+             (other-face (when nerd-icons-color-icons (plist-get args :face)))
+             (height (* nerd-icons-scale-factor (or (plist-get args :height) 1.0)))
+             (v-adjust (* nerd-icons-scale-factor (or (plist-get args :v-adjust) nerd-icons-default-adjust)))
+             (family ,family))
+         (unless icon
+           (error "Unable to find icon with name `%s' in icon set `%s'" icon-name (quote ,name)))
+         (let ((face (if other-face
+                         `(:family ,family :height ,height :inherit ,other-face)
+                       `(:family ,family :height ,height))))
+           (propertize icon
+                       'face face
+                       'font-lock-face face
+                       'display `(raise ,v-adjust)
+                       'rear-nonsticky t))))
+     (defun ,(nerd-icons--insert-function-name name) (&optional arg)
+       ,(format "Insert a %s icon at point." glyph-set)
+       (interactive "P")
+       (nerd-icons-insert arg (quote ,name)))))
+
+(nerd-icons-define-icon ipsicon nerd-icons/ipsicon-alist nerd-icons-font-family "IEC Power Symbols")
+(nerd-icons-define-icon octicon nerd-icons/octicon-alist nerd-icons-font-family "Octicons")
+(nerd-icons-define-icon pomicon nerd-icons/pomicon-alist nerd-icons-font-family "Pomicons")
+(nerd-icons-define-icon powerline nerd-icons/powerline-alist nerd-icons-font-family "Powerline Symbols")
+(nerd-icons-define-icon faicon nerd-icons/faicon-alist nerd-icons-font-family "Font Awesome")
+(nerd-icons-define-icon wicon nerd-icons/wicon-alist nerd-icons-font-family "Weather")
+(nerd-icons-define-icon sucicon nerd-icons/sucicon-alist nerd-icons-font-family "Seti-UI + Custom")
+(nerd-icons-define-icon devicon nerd-icons/devicon-alist nerd-icons-font-family "Devicons")
+(nerd-icons-define-icon codicon nerd-icons/codicon-alist nerd-icons-font-family "Codicons")
+(nerd-icons-define-icon flicon nerd-icons/flicon-alist nerd-icons-font-family "Font Logos")
+(nerd-icons-define-icon mdicon nerd-icons/mdicon-alist nerd-icons-font-family "Material Design Icons")
+
+(provide 'nerd-icons)
+;;; nerd-icons.el ends here
diff --git a/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons.elc b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons.elc
new file mode 100644
index 0000000..b2b8839
Binary files /dev/null and b/emacs/.emacs.d/elpa/nerd-icons-20260823.17/nerd-icons.elc differ
diff --git a/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets-autoloads.el b/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets-autoloads.el
new file mode 100644
index 0000000..412e84c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets-autoloads.el
@@ -0,0 +1,46 @@
+;;; org-bullets-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from org-bullets.el
+
+(autoload 'org-bullets-mode "org-bullets" "\
+Use UTF8 bullets in Org mode headings.
+
+This is a minor mode.  If called interactively, toggle the
+`Org-Bullets mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `org-bullets-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "org-bullets" '("org-bullets-"))
+
+;;; End of scraped data
+
+(provide 'org-bullets-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; org-bullets-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets-pkg.el b/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets-pkg.el
new file mode 100644
index 0000000..7d0703c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets-pkg.el
@@ -0,0 +1,8 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "org-bullets" "20200317.1740"
+  "Show bullets in org-mode as UTF-8 characters."
+  ()
+  :url "https://github.com/integral-dw/org-bullets"
+  :commit "9ec0dbd30be7c6310804141ee952ac8c5f753557"
+  :revdesc "9ec0dbd30be7"
+  :maintainers '(("D. Williams" . "d.williams@posteo.net")))
diff --git a/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets.el b/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets.el
new file mode 100644
index 0000000..2843d4d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets.el
@@ -0,0 +1,137 @@
+;;; org-bullets.el --- Show bullets in org-mode as UTF-8 characters
+
+;; Package-Version: 20200317.1740
+;; Package-Revision: 9ec0dbd30be7
+;; Author: sabof
+;; Maintainer: D. Williams <d.williams@posteo.net>
+;; Homepage: https://github.com/integral-dw/org-bullets
+
+;; This file is NOT part of GNU Emacs.
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Show org-mode bullets as UTF-8 characters.
+
+;; This is a legacy package maintained with a focus on preservation.
+;; It has an unofficial successor package (org-superstar).  This means
+;; that new features will no longer be added, and backwards
+;; compatibility will be preserved.
+
+;; It's unofficial successor package is available on MELPA.  You can
+;; also find it on GitHub:
+;; https://github.com/integral-dw/org-superstar-mode
+
+;;; Code:
+
+(require 'org)
+
+(defgroup org-bullets nil
+  "Display bullets as UTF-8 characters."
+  :group 'org-appearance)
+
+;; A nice collection of unicode bullets:
+;; http://nadeausoftware.com/articles/2007/11/latency_friendly_customized_bullets_using_unicode_characters
+(defcustom org-bullets-bullet-list
+  '(;;; Large
+    "◉"
+    "○"
+    "✸"
+    "✿"
+    ;; ♥ ● ◇ ✚ ✜ ☯ ◆ ♠ ♣ ♦ ☢ ❀ ◆ ◖ ▶
+    ;;; Small
+    ;; ► • ★ ▸
+    )
+  "List of bullets used in Org headings.
+It can contain any number of symbols, which will be repeated."
+  :group 'org-bullets
+  :type '(repeat (string :tag "Bullet character")))
+
+(defcustom org-bullets-face-name nil
+  "Face used for bullets in Org mode headings.
+If set to the name of a face, that face is used.
+Otherwise the face of the heading level is used."
+  :group 'org-bullets
+  :type 'symbol)
+
+(defvar org-bullets-bullet-map (make-sparse-keymap))
+
+(defun org-bullets-level-char (level)
+  "Return the desired bullet for the given heading LEVEL."
+  (string-to-char
+   (nth (mod (/ (1- level) (if org-odd-levels-only 2 1))
+             (length org-bullets-bullet-list))
+        org-bullets-bullet-list)))
+
+(defvar org-bullets--keywords
+  `(("^\\*+ "
+     (0 (let* ((level (- (match-end 0) (match-beginning 0) 1))
+               (is-inline-task
+                (and (boundp 'org-inlinetask-min-level)
+                     (>= level org-inlinetask-min-level))))
+          (compose-region (- (match-end 0) 2)
+                          (- (match-end 0) 1)
+                          (org-bullets-level-char level))
+          (when is-inline-task
+            (compose-region (- (match-end 0) 3)
+                            (- (match-end 0) 2)
+                            (org-bullets-level-char level)))
+          (when (facep org-bullets-face-name)
+            (put-text-property (- (match-end 0)
+                                  (if is-inline-task 3 2))
+                               (- (match-end 0) 1)
+                               'face
+                               org-bullets-face-name))
+          (put-text-property (match-beginning 0)
+                             (- (match-end 0) 2)
+                             'face 'org-hide)
+          (put-text-property (match-beginning 0)
+                             (match-end 0)
+                             'keymap
+                             org-bullets-bullet-map)
+          nil)))))
+
+;;;###autoload
+(define-minor-mode org-bullets-mode
+  "Use UTF8 bullets in Org mode headings."
+  nil nil nil
+  (if org-bullets-mode
+      (progn
+        (font-lock-add-keywords nil org-bullets--keywords)
+        (org-bullets--fontify-buffer))
+    (save-excursion
+      (goto-char (point-min))
+      (font-lock-remove-keywords nil org-bullets--keywords)
+      (while (re-search-forward "^\\*+ " nil t)
+        (decompose-region (match-beginning 0) (match-end 0)))
+      (org-bullets--fontify-buffer))))
+
+(defun org-bullets--fontify-buffer ()
+  "Fontify the current buffer."
+  (when font-lock-mode
+    (if (and (fboundp 'font-lock-flush)
+             (fboundp 'font-lock-ensure))
+        (save-restriction
+          (widen)
+          (font-lock-flush)
+          (font-lock-ensure))
+      (with-no-warnings
+        (font-lock-fontify-buffer)))))
+
+(provide 'org-bullets)
+;; Local Variables:
+;; indent-tabs-mode: nil
+;; End:
+;;; org-bullets.el ends here
diff --git a/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets.elc b/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets.elc
new file mode 100644
index 0000000..cbf683a
Binary files /dev/null and b/emacs/.emacs.d/elpa/org-bullets-20200317.1740/org-bullets.elc differ
diff --git a/emacs/.emacs.d/elpa/persist-0.8.signed b/emacs/.emacs.d/elpa/persist-0.8.signed
new file mode 100644
index 0000000..3a19da2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/persist-0.8.signed
@@ -0,0 +1 @@
+Good signature from 645357D2883A0966 GNU ELPA Signing Agent (2023) <elpasign@elpa.gnu.org> (trust undefined) created at 2025-10-12T05:05:03+0800 using EDDSA
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/persist-0.8/.elpaignore b/emacs/.emacs.d/elpa/persist-0.8/.elpaignore
new file mode 100644
index 0000000..dfdac46
--- /dev/null
+++ b/emacs/.emacs.d/elpa/persist-0.8/.elpaignore
@@ -0,0 +1,3 @@
+Makefile
+Cask
+.gitignore
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/persist-0.8/persist-autoloads.el b/emacs/.emacs.d/elpa/persist-0.8/persist-autoloads.el
new file mode 100644
index 0000000..e621172
--- /dev/null
+++ b/emacs/.emacs.d/elpa/persist-0.8/persist-autoloads.el
@@ -0,0 +1,28 @@
+;;; persist-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from persist.el
+
+(register-definition-prefixes "persist" '("persist-"))
+
+;;; End of scraped data
+
+(provide 'persist-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; persist-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/persist-0.8/persist-pkg.el b/emacs/.emacs.d/elpa/persist-0.8/persist-pkg.el
new file mode 100644
index 0000000..cb4ba4e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/persist-0.8/persist-pkg.el
@@ -0,0 +1,2 @@
+;; Generated package description from persist.el  -*- no-byte-compile: t -*-
+(define-package "persist" "0.8" "Persist Variables between Emacs Sessions" '((emacs "26.1") (compat "30.0.2.0")) :commit "3b4b421d5185f2c33bae478aa057dff13701cc25" :url "https://elpa.gnu.org/packages/persist.html" :authors '(("Phillip Lord" . "phillip.lord@russet.org.uk")) :maintainer '("Joseph Turner" . "persist-el@breatheoutbreathe.in"))
diff --git a/emacs/.emacs.d/elpa/persist-0.8/persist.el b/emacs/.emacs.d/elpa/persist-0.8/persist.el
new file mode 100644
index 0000000..bc0d5be
--- /dev/null
+++ b/emacs/.emacs.d/elpa/persist-0.8/persist.el
@@ -0,0 +1,224 @@
+;;; persist.el --- Persist Variables between Emacs Sessions -*- lexical-binding: t -*-
+
+;; Copyright (C) 2019, 2024, 2025 Free Software Foundation, Inc.
+
+;; Author: Phillip Lord <phillip.lord@russet.org.uk>
+;; Maintainer: Joseph Turner <persist-el@breatheoutbreathe.in>
+;; Package-Type: multi
+;; Package-Requires: ((emacs "26.1") (compat "30.0.2.0"))
+;; Version: 0.8
+
+;; The contents of this file are subject to the GPL License, Version 3.0.
+
+;; This file is not part of Emacs
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This package provides variables which persist across sessions.
+
+;; The main entry point is `persist-defvar' which behaves like
+;; `defvar' but which persists the variables between session.  Variables
+;; are automatically saved when Emacs exits.
+
+;; Other useful functions are `persist-save' which saves the variable
+;; immediately, `persist-load' which loads the saved value,
+;; `persist-reset' which resets to the default value.
+
+;; Values are stored in a directory in `user-emacs-directory', using
+;; one file per value.  This makes it easy to delete or remove unused
+;; variables.
+
+;;; Code:
+
+(require 'compat)
+
+(defvar persist--directory-location
+  (locate-user-emacs-file "persist")
+  "The location of persist directory.")
+
+(defvar persist--symbols nil
+  "List of symbols to persist.")
+
+(defvar persist-load-hook nil
+  "Special hook run on loading a variable.
+
+Hook functions are called with two values: the symbol and the
+value it will be set to.  If any function returns nil, the
+variable is not set to the value.")
+
+(defun persist--file-location (symbol)
+  "Return the file name at which SYMBOL does or will persist."
+  (expand-file-name
+   (symbol-name symbol)
+   (or (get symbol 'persist-location)
+       persist--directory-location)))
+
+(defun persist--defvar-1 (symbol location initvalue)
+  "Set symbol up for persistence."
+  (when location
+    (persist-location symbol location))
+  (persist-symbol symbol initvalue)
+  (persist-load symbol))
+
+(defmacro persist-defvar (symbol initvalue docstring &optional location)
+  "Define SYMBOL as a persistent variable and return SYMBOL.
+
+This form is nearly equivalent to `defvar', except that the
+variable persists between Emacs sessions.  When this form is
+evaluated, the variable's default value is always set to
+INITVALUE.
+
+It does not support the optional parameters.  Both INITVALUE and
+DOCSTRING need to be given."
+  ;; We cannot distinguish between calls with initvalue of nil and a
+  ;; single parameter call. Unfortunately, these two calls have
+  ;; different semantics -- the single arity shuts up the byte
+  ;; compiler, but does not define the symbol. So, don't support a
+  ;; single arity persist-defvar.
+
+  ;; Don't support 2-arity calls either because we are lazy and
+  ;; because if you want to persist it, you want to doc it.
+  (declare (debug (symbolp form stringp &optional form))
+           (doc-string 3)
+           (indent defun))
+  ;; Define inside progn so the byte compiler sees defvar
+  `(progn
+     (defvar ,symbol ,initvalue ,docstring)
+     ;; `defvar' must stay at top level within `progn'.  Pass init
+     ;; value to `persist--defvar-1' since the `defvar' form may not
+     ;; set the symbol's value and we don't want to set the
+     ;; persist-default property to the current value of the symbol.
+     ;; See bug#75779 for details.
+     (persist--defvar-1 ',symbol ,location ,initvalue)
+     ',symbol))
+
+(defun persist-location (symbol directory)
+  "Set the directory for persisting the value of symbol.
+
+This does not force the loading of value from this directory, so
+to persist a variable, you will normally need to call
+`persist-load' to load a previously saved location."
+  (put symbol 'persist-location (expand-file-name directory)))
+
+(defun persist-symbol (symbol initvalue)
+  "Make SYMBOL a persistent variable.
+
+INITVALUE is the value to which SYMBOL will be set if `persist-reset' is
+called.  INITVALUE is set for the session and will itself not persist
+across sessions.
+
+This does force the loading of value from this directory, so to
+persist a variable, you will normally need to call `persist-load'
+to load a previously saved location."
+  (add-to-list 'persist--symbols symbol)
+  (put symbol 'persist t)
+  (put symbol 'persist-default (persist-copy initvalue)))
+
+(defun persist--persistant-p (symbol)
+  "Return non-nil if SYMBOL is a persistent variable."
+  (get symbol 'persist))
+
+(defun persist-save (symbol)
+  "Save SYMBOL now.
+
+Normally, it should not be necessary to call this explicitly, as
+variables persist automatically when Emacs exits."
+  (unless (persist--persistant-p symbol)
+    (error (format
+            "Symbol %s is not persistent" symbol)))
+  (let ((symbol-file-loc (persist--file-location symbol)))
+    (if (persist-equal (symbol-value symbol)
+                       (persist-default symbol))
+        (when (file-exists-p symbol-file-loc)
+          (delete-file symbol-file-loc))
+      (let ((dir-loc
+             (file-name-directory symbol-file-loc)))
+        (unless (file-exists-p dir-loc)
+          (mkdir dir-loc))
+        (with-temp-buffer
+          (let (print-level
+                print-length
+                print-quoted
+                (print-escape-control-characters t)
+                (print-escape-nonascii t)
+                (print-circle t))
+            (print (symbol-value symbol) (current-buffer)))
+          (write-region (point-min) (point-max)
+                        symbol-file-loc
+                        nil 'quiet))))))
+
+(defun persist-default (symbol)
+  "Return the default value for SYMBOL."
+  (get symbol 'persist-default))
+
+(defun persist-reset (symbol)
+  "Set the value of SYMBOL to a copy of the default."
+  (set symbol (persist-copy (persist-default symbol))))
+
+(defun persist-load (symbol)
+  "Load the saved value of SYMBOL."
+  (when (file-exists-p (persist--file-location symbol))
+    (with-temp-buffer
+      (insert-file-contents (persist--file-location symbol))
+      (let ((val (read (current-buffer))))
+        (when (run-hook-with-args-until-failure 'persist-load-hook
+                                                symbol val)
+          (set symbol val))))))
+
+(defun persist-unpersist (symbol)
+  "Stop the value in SYMBOL from persisting.
+
+This does not remove any saved value of SYMBOL."
+  (put symbol 'persist nil)
+  (setq persist--symbols
+        (remove symbol persist--symbols)))
+
+(defun persist--save-all ()
+  "Save all persistent symbols."
+  (mapc 'persist-save persist--symbols))
+
+;; Save on kill-emacs-hook anyway
+(add-hook 'kill-emacs-hook
+          'persist--save-all)
+
+(defun persist-equal (a b)
+  "Return non-nil when the values of A and B are equal.
+A and B are compared using `equal' unless they are both hash
+tables.  In that case, the following are compared:
+
+- hash table count
+- hash table predicate
+- values, using `persist-equal'"
+  (if (and (hash-table-p a) (hash-table-p b))
+      (and (= (hash-table-count a) (hash-table-count b))
+           (eq (hash-table-test a) (hash-table-test b))
+           (catch 'done
+             (maphash
+              (lambda (key a-value)
+                (unless (persist-equal a-value (gethash key b (not a-value)))
+                  (throw 'done nil)))
+              a)
+             t))
+    (equal a b)))
+
+(defun persist-copy (obj)
+  "Return copy of OBJ."
+  (if (hash-table-p obj)
+      (copy-hash-table obj)
+    (compat-call copy-tree obj t)))
+
+(provide 'persist)
+;;; persist.el ends here
diff --git a/emacs/.emacs.d/elpa/persist-0.8/persist.elc b/emacs/.emacs.d/elpa/persist-0.8/persist.elc
new file mode 100644
index 0000000..65a4f0f
Binary files /dev/null and b/emacs/.emacs.d/elpa/persist-0.8/persist.elc differ
diff --git a/emacs/.emacs.d/elpa/persist-0.8/persist.texi b/emacs/.emacs.d/elpa/persist-0.8/persist.texi
new file mode 100644
index 0000000..99f61a2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/persist-0.8/persist.texi
@@ -0,0 +1,153 @@
+\input texinfo
+@setfilename persist.info
+@settitle persist persistent variables
+
+@dircategory Emacs
+@direntry
+* Persist: (persist).  Persistent variables for Emacs.
+@end direntry
+
+@copying
+Copyright @copyright{} 2019 Phillip Lord
+
+@quotation
+Permission is granted to copy, distribute and/or modify this document
+under the terms of the GNU Free Documentation License, Version 1.2 or
+any later version published by the Free Software Foundation; with no
+Invariant Sections, with the Front-Cover, or Back-Cover Texts.  A copy of
+the license is included in the section entitled ``GNU Free Documentation
+License'' in the Emacs manual.
+
+This document is part of a collection distributed under the GNU Free
+Documentation License.  If you want to distribute this document
+separately from the collection, you can do so by adding a copy of the
+license to the document, as described in section 6 of the license.
+
+All Emacs Lisp code contained in this document may be used, distributed,
+and modified without restriction.
+@end quotation
+@end copying
+
+@titlepage
+@title Persist -- Persistent Variables for Emacs
+@author by Phillip Lord
+@page
+@insertcopying
+@end titlepage
+
+@contents
+
+@node Top
+@top Persist -- Persistent Variables for Emacs
+
+Persist is a library for making variables persistent; that it, their
+state can be changed from the default and the new value will remain even
+after Emacs has been closed and restarted.
+
+@menu
+* Persist::                     Simple Usage
+* The details::        All functions for interacting with Persist
+* Comparison::                  How this relates to other, similar techniques
+* Implementation::              How variables are saved
+@end menu
+
+@node Persist
+@section Persist
+
+This section describes simple usage of persist.
+
+@defmac persist-defvar (var initvalue docstring) body@dots{}
+This macro is equivalent in form to @code{defvar}, except any changes to
+the value of @code{var} will persist between sessions.  This macro does
+not support the lower arity versions of @code{defvar}. Both an
+@code{initvalue} and @code{docstring} needs to be provided.
+@end defmac
+
+@example
+@group
+(persist-defvar my-persistant-variable 10
+   "A variable of no purpose.
+   
+This variable is persistent between sessions")
+@end group
+@end example
+
+
+@node The details
+@section The details
+
+
+@defmac persist-defvar (var initvalue docstring) body@dots{}
+This macro is equivalent to @code{defvar} and can be used to make a
+variable persistent.
+@end defmac
+
+@defun persist-symbol (symbol &optional initvalue)
+This function takes @code{symbol} for an existing, non-persistent variable
+and makes it persistent. If @code{initvalue} is not given, then the
+current value is used. For package developers, @code{persist-defvar}
+would generally be preferred; this function might be useful for making
+third-party variables persistent.
+@end defun
+
+@example
+@group
+(defvar my-persistant-variable 10
+    "A variable of no purpose")
+
+(persist-symbol 'my-persistant-variable 10)
+@end group
+@end example
+
+@defun persist-save (symbol)
+This function saves @code{symbol} immediately rather than waiting till
+the normal time
+@end defun
+
+@defun persist-default (symbol)
+Return the default value for @code{symbol}. The default value is
+actually set for each session and does not persist from session to
+session, although if the value is set by either @code{persist-defvar} or
+@code{persist-symbol} saved it in a file, it will be set to the same
+value across sessions.
+@end defun
+
+@defun persist-reset (symbol)
+Change the value of @code{symbol} to the last saved value if it exists.
+@end defun
+
+@defun persist-location (symbol directory)
+Values are usually persisted to a standard location; it is possible to
+change this for individual symbol using this function. Be aware that
+this does not call @code{persist-load}, so this will not restore a
+previously saved value.
+@end defun
+
+@node Comparison
+@section Comparison
+
+There are several other packages which also persist aspects of Emacs
+across sessions, however, these fulfil a different purpose.
+
+Custom persists values of variables across sessions. However, it does
+this for user options, and is associated with a user interface for
+editing the value.
+
+desktop.el is also user-centric and is aimed at persisting the session
+in terms of buffers, modes and minor modes. It can be used to persist
+individual variables, but this will also save the session which the user
+may or may not want.
+
+savehist.el can save individual variables but, as with desktop.el, is a
+a global setting and has other implications such as saving mini-buffer
+history.
+
+@node Implementation
+@section Implementation
+
+persist is implemented by saving values for each symbol into an
+different. This makes it relatively easy to update or delete the stored
+value for a variable by hand if necessary. It should scale to 10 or 100
+variables, but may get a bit slow after this.
+
+@bye
diff --git a/emacs/.emacs.d/elpa/persist-0.8/test/persist-tests.el b/emacs/.emacs.d/elpa/persist-0.8/test/persist-tests.el
new file mode 100644
index 0000000..ccaef28
--- /dev/null
+++ b/emacs/.emacs.d/elpa/persist-0.8/test/persist-tests.el
@@ -0,0 +1,167 @@
+(require 'persist)
+(require 'seq)
+
+
+(defmacro with-local-temp-persist (&rest body)
+  (declare (debug body))
+  `(unwind-protect
+       (let ((persist--directory-location "./persist/")
+             (persist--symbols nil))
+         ,@body)
+     (delete-directory "./persist" t)))
+
+(ert-deftest test-persist-symbol ()
+  (should
+   (let ((persist--symbols nil)
+         (sym (cl-gensym)))
+     (persist-symbol sym 10)
+     (seq-contains-p persist--symbols sym))))
+
+(ert-deftest test-persist-save-only-persistant ()
+  ;; do not save not persist variables
+  (should-error
+   (with-local-temp-persist
+    (persist-save (cl-gensym)))
+   :type 'error
+   :exclude-subtypes t))
+
+(defmacro persist-test-persist-save (init default change printed-changed)
+  "Test persisting symbols.
+- symbol is not persisted when value is set to INIT and default
+  value is set to DEFAULT.
+- symbol is persisted when value is changed according to CHANGE.
+- persisted file contents match PRINTED-CHANGED.
+- symbol is not persisted after value is set back to DEFAULT."
+  `(with-local-temp-persist
+    (let ((sym (cl-gensym)))
+      (should-not (file-exists-p (persist--file-location sym)))
+      (set sym ,init)
+      (persist-symbol sym ,default)
+      (persist-save sym)
+      (should t)
+      (should-not (file-exists-p (persist--file-location sym)))
+      ,change
+      (persist-save sym)
+      (should (file-exists-p (persist--file-location sym)))
+      (should
+       (string-match-p
+        ,printed-changed
+        (with-temp-buffer
+          (insert-file-contents (persist--file-location sym))
+          (buffer-string))))
+      (set sym ,default)
+      (persist-save sym)
+      (should-not (file-exists-p (persist--file-location sym))))))
+
+(ert-deftest test-persist-save-number ()
+  "Test saving number."
+  (persist-test-persist-save 1 1 (set sym 2) "2"))
+
+(ert-deftest test-persist-save-string ()
+  "Test saving string."
+  (persist-test-persist-save "foo" "foo" (set sym "bar") "bar"))
+
+(ert-deftest test-persist-save-hash ()
+  "Test saving hash table."
+  (let* ((hash (make-hash-table))
+         (default (copy-hash-table hash)))
+    (persist-test-persist-save hash default
+                               (puthash 'foo "bar" (symbol-value sym))
+                               (if (<= 30 emacs-major-version)
+                                   "#s(hash-table data (foo \"bar\"))\n"
+                                 "#s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8125 data (foo \"bar\"))"))))
+
+(ert-deftest test-persist-save-record ()
+  "Test saving record."
+  (let* ((rec (record 'foo 'a 'b))
+         (default (copy-sequence rec)))
+    (persist-test-persist-save rec default
+                               (setf (aref (symbol-value sym) 2) 'quux)
+                               "#s(foo a quux)")))
+
+(ert-deftest test-persist-load ()
+  (with-local-temp-persist
+   (let ((sym (cl-gensym)))
+     (set sym 10)
+     ;; set this different to force save
+     (persist-symbol sym 1)
+     (persist-save sym)
+     (should (equal 10 (symbol-value sym)))
+     (set sym 30)
+     (should (equal 30 (symbol-value sym)))
+     (persist-load sym)
+     (should (equal 10 (symbol-value sym))))))
+
+(ert-deftest test-persist-remove ()
+  (with-local-temp-persist
+   (let ((sym (cl-gensym)))
+     (should-not (persist--persistant-p sym))
+     (persist-symbol sym 10)
+     (should (persist--persistant-p sym))
+     (persist-unpersist sym)
+     (should-not (persist--persistant-p sym)))))
+
+(ert-deftest test-persist-defvar ()
+  (with-local-temp-persist
+   (defvar test-no-persist-variable 10 "docstring")
+   (persist-defvar test-persist-variable 20 "docstring")
+   (should-not (persist--persistant-p 'test-no-persist-variable))
+   (should (persist--persistant-p 'test-persist-variable))
+   (should (= 20
+              (persist-default 'test-persist-variable)))))
+
+(ert-deftest test-persist-default-set-to-initvalue ()
+  (persist-defvar test-persist-variable-default 'INIT "Docstring.")
+  (setq test-persist-variable-default 'CHANGED)
+  (persist-defvar test-persist-variable-default 'INIT "Docstring.")
+  (should (equal 'INIT (persist-default 'test-persist-variable-default))))
+
+(ert-deftest test-persist-default-nil-initvalue ()
+  (persist-defvar test-persist-variable-default nil "Docstring.")
+  (setq test-persist-variable-default 'CHANGED)
+  (persist-defvar test-persist-variable-default nil "Docstring.")
+  (should (null (persist-default 'test-persist-variable-default))))
+
+(ert-deftest test-persist-location ()
+  (unwind-protect
+      (let ((sym (cl-gensym)))
+        (delete-directory "./persist-defined-location" t)
+        (set sym 10)
+        (persist-symbol sym 10)
+        (persist-location sym "./persist-defined-location")
+        (should
+         (equal (expand-file-name
+                 (symbol-name sym)
+                 "./persist-defined-location/")
+                (persist--file-location sym)))
+        (persist-save sym)
+        (should-not (file-exists-p (persist--file-location sym)))
+        (set sym 20)
+        (persist-save sym)
+        (should (file-exists-p (persist--file-location sym)))
+        (should
+         (string-match-p
+          "20"
+          (with-temp-buffer
+            (insert-file-contents (persist--file-location sym))
+            (buffer-string))))
+        (should-error
+         (persist-save 'fred)))
+    (delete-directory "./persist-defined-location" t)))
+
+(ert-deftest test-persist-reset ()
+  "Symbol should be reset to a copy of the default."
+  (let ((initial-value (make-hash-table)))
+    (with-local-temp-persist
+     (persist-defvar persist--test-reset-variable initial-value "docstring")
+     (should-not (eq persist--test-reset-variable
+                     (persist-default 'persist--test-reset-variable)))
+     (should-not (eq persist--test-reset-variable initial-value))
+     (should-not (eq initial-value
+                     (persist-default 'persist--test-reset-variable)))
+     (persist-reset 'persist--test-reset-variable)
+     (should-not (eq persist--test-reset-variable
+                     (persist-default 'persist--test-reset-variable)))
+     (should-not (eq persist--test-reset-variable initial-value))
+     (should-not (eq initial-value
+                     (persist-default 'persist--test-reset-variable))))))
diff --git a/emacs/.emacs.d/elpa/persist-0.8/test/persist-tests.elc b/emacs/.emacs.d/elpa/persist-0.8/test/persist-tests.elc
new file mode 100644
index 0000000..da69c54
Binary files /dev/null and b/emacs/.emacs.d/elpa/persist-0.8/test/persist-tests.elc differ
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1.signed b/emacs/.emacs.d/elpa/plz-0.9.1.signed
new file mode 100644
index 0000000..96024fe
--- /dev/null
+++ b/emacs/.emacs.d/elpa/plz-0.9.1.signed
@@ -0,0 +1 @@
+Good signature from 645357D2883A0966 GNU ELPA Signing Agent (2023) <elpasign@elpa.gnu.org> (trust undefined) created at 2024-08-17T17:05:01+0800 using EDDSA
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/.github/workflows/test.yml b/emacs/.emacs.d/elpa/plz-0.9.1/.github/workflows/test.yml
new file mode 100644
index 0000000..0aa1184
--- /dev/null
+++ b/emacs/.emacs.d/elpa/plz-0.9.1/.github/workflows/test.yml
@@ -0,0 +1,90 @@
+# * test.yml --- Test Emacs packages using makem.sh on GitHub Actions
+
+# URL: https://github.com/alphapapa/makem.sh
+# Version: 0.6-pre
+
+# * Commentary:
+
+# Based on Steve Purcell's examples at
+# <https://github.com/purcell/setup-emacs/blob/master/.github/workflows/test.yml>,
+# <https://github.com/purcell/package-lint/blob/master/.github/workflows/test.yml>.
+
+# * License:
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+# * Code:
+
+name: "CI"
+on:
+  pull_request:
+  push:
+    # Comment out this section to enable testing of all branches.
+    # branches:
+    #   - master
+
+jobs:
+  build:
+    runs-on: ubuntu-latest
+    strategy:
+      fail-fast: false
+      matrix:
+        emacs_version:
+          - 27.1
+          - 27.2
+          - 28.1
+          - 28.2
+          - 29.1
+          - 29.2
+          - 29.3
+          - snapshot
+    steps:
+    - uses: purcell/setup-emacs@master
+      with:
+        version: ${{ matrix.emacs_version }}
+
+    - uses: actions/checkout@v2
+
+    - name: Install Ispell
+      run: |
+        sudo apt-get install ispell
+
+    - name: Initialize sandbox
+      run: |
+        SANDBOX_DIR=$(mktemp -d) || exit 1
+        echo "SANDBOX_DIR=$SANDBOX_DIR" >> $GITHUB_ENV
+        ./makem.sh -vv --sandbox=$SANDBOX_DIR --install-deps --install-linters
+
+    - name: Run httpbin with Docker
+      run: docker run -d -p 80:80 -P kennethreitz/httpbin
+
+    # The "all" rule is not used, because it treats compilation warnings
+    # as failures, so linting and testing are run as separate steps.
+
+    - name: Lint
+      # NOTE: Uncomment this line to treat lint failures as passing so
+      #       the job doesn't show failure.  (Enabled for now because
+      #       Emacs 29 indents some cl- forms differently, which
+      #       causes lint-indent to fail, and what matters most is
+      #       that the tests pass.)
+      continue-on-error: true
+      run: ./makem.sh -vv --sandbox=$SANDBOX_DIR lint
+
+    - name: Test
+      if: always()  # Run test even if linting fails.
+      run: ./makem.sh -vv --sandbox=$SANDBOX_DIR test
+
+# Local Variables:
+# eval: (outline-minor-mode)
+# End:
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/README-elpa b/emacs/.emacs.d/elpa/plz-0.9.1/README-elpa
new file mode 100644
index 0000000..697f324
--- /dev/null
+++ b/emacs/.emacs.d/elpa/plz-0.9.1/README-elpa
@@ -0,0 +1,600 @@
+                                ━━━━━━━━
+                                 PLZ.EL
+                                ━━━━━━━━
+
+
+[file:http://elpa.gnu.org/packages/plz.svg]
+
+`plz' is an HTTP library for Emacs.  It uses `curl' as a backend, which
+avoids some of the issues with using Emacs's built-in `url' library.  It
+supports both synchronous and asynchronous requests.  Its API is
+intended to be simple, natural, and expressive.  Its code is intended to
+be simple and well-organized.  Every feature is tested against
+[httpbin].
+
+
+[file:http://elpa.gnu.org/packages/plz.svg]
+<http://elpa.gnu.org/packages/plz.html>
+
+[httpbin] <https://httpbin.org/>
+
+
+1 Installation
+══════════════
+
+1.1 GNU ELPA
+────────────
+
+  `plz' is available in [GNU ELPA].  It may be installed in Emacs using
+  the `package-install' command.
+
+
+[GNU ELPA] <http://elpa.gnu.org/packages/plz.html>
+
+
+1.2 Manual
+──────────
+
+  `plz' has no dependencies other than Emacs and `curl'.  It's known to
+  work on Emacs 26.3 or later.  To install it manually, simply place
+  `plz.el' in your `load-path' and `(require 'plz)'.
+
+
+2 Usage
+═══════
+
+  The main public function is `plz', which sends an HTTP request and
+  returns either the result of the specified type (for a synchronous
+  request), or the `curl' process object (for asynchronous requests).
+  For asynchronous requests, callback, error-handling, and finalizer
+  functions may be specified, as well as various other options.
+
+
+2.1 Examples
+────────────
+
+  Synchronously `GET' a URL and return the response body as a decoded
+  string (here, raw JSON):
+
+  ┌────
+  │ (plz 'get "https://httpbin.org/user-agent")
+  └────
+
+  ┌────
+  │ "{\n \"user-agent\": \"curl/7.35.0\"\n}\n"
+  └────
+
+  Synchronously `GET' a URL that returns a JSON object, and parse and
+  return it as an alist:
+
+  ┌────
+  │ (plz 'get "https://httpbin.org/get" :as #'json-read)
+  └────
+
+  ┌────
+  │ ((args)
+  │  (headers
+  │   (Accept . "*/*")
+  │   (Accept-Encoding . "deflate, gzip")
+  │   (Host . "httpbin.org")
+  │   (User-Agent . "curl/7.35.0"))
+  │  (url . "https://httpbin.org/get"))
+  └────
+
+  Asynchronously `POST' a JSON object in the request body, then parse a
+  JSON object from the response body, and call a function with the
+  result:
+
+  ┌────
+  │ (plz 'post "https://httpbin.org/post"
+  │   :headers '(("Content-Type" . "application/json"))
+  │   :body (json-encode '(("key" . "value")))
+  │   :as #'json-read
+  │   :then (lambda (alist)
+  │ 	  (message "Result: %s" (alist-get 'data alist))))
+  └────
+
+  ┌────
+  │ Result: {"key":"value"}
+  └────
+
+
+  Synchronously download a JPEG file, then create an Emacs image object
+  from the data:
+
+  ┌────
+  │ (let ((jpeg-data (plz 'get "https://httpbin.org/image/jpeg" :as 'binary)))
+  │   (create-image jpeg-data nil 'data))
+  └────
+
+  ┌────
+  │ (image :type jpeg :data ""ÿØÿà^@^PJFIF...")
+  └────
+
+
+2.2 Functions
+─────────────
+
+  `plz'
+        /(method url &key headers body else finally noquery (as 'string)
+        (then 'sync) (body-type 'text) (decode t decode-s)
+        (connect-timeout plz-connect-timeout) (timeout plz-timeout))/
+
+        Request `METHOD' from `URL' with curl.  Return the curl process
+        object or, for a synchronous request, the selected result.
+
+        `HEADERS' may be an alist of extra headers to send with the
+        request.
+
+        `BODY' may be a string, a buffer, or a list like `(file
+        FILENAME)' to upload a file from disk.
+
+        `BODY-TYPE' may be `text' to send `BODY' as text, or `binary' to
+        send it as binary.
+
+        `AS' selects the kind of result to pass to the callback function
+        `THEN', or the kind of result to return for synchronous
+        requests.  It may be:
+
+        • `buffer' to pass the response buffer, which will be narrowed
+          to the response body and decoded according to `DECODE'.
+        • `binary' to pass the response body as an un-decoded string.
+        • `string' to pass the response body as a decoded string.
+        • `response' to pass a `plz-response' structure.
+        • `file' to pass a temporary filename to which the response body
+          has been saved without decoding.
+        • `(file ~FILENAME)' to pass `FILENAME' after having saved the
+          response body to it without decoding.  `FILENAME' must be a
+          non-existent file; if it exists, it will not be overwritten,
+          and an error will be signaled.  `FILENAME' is passed through
+          `expand-file-name', which see.
+        • A function, which is called in the response buffer with it
+          narrowed to the response body (suitable for,
+          e.g. `json-read').
+
+        If `DECODE' is non-nil, the response body is decoded
+        automatically.  For binary content, it should be nil.  When `AS'
+        is `binary', `DECODE' is automatically set to nil.
+
+        `THEN' is a callback function, whose sole argument is selected
+        above with `AS'; if the request fails and no `ELSE' function is
+        given (see below), the argument will be a `plz-error' structure
+        describing the error.  Or `THEN' may be `sync' to make a
+        synchronous request, in which case the result is returned
+        directly from this function.
+
+        `ELSE' is an optional callback function called when the request
+        fails (i.e. if curl fails, or if the `HTTP' response has a
+        non-2xx status code).  It is called with one argument, a
+        `plz-error' structure.  If `ELSE' is nil, a `plz-curl-error' or
+        `plz-http-error' is signaled when the request fails, with a
+        `plz-error' structure as the error data.  For synchronous
+        requests, this argument is ignored.
+
+        `NOTE': In v0.8 of `plz', only one error will be signaled:
+        `plz-error'.  The existing errors, `plz-curl-error' and
+        `plz-http-error', inherit from `plz-error' to allow applications
+        to update their code while using v0.7 (i.e. any `condition-case'
+        forms should now handle only `plz-error', not the other two).
+
+        `FINALLY' is an optional function called without argument after
+        `THEN' or `ELSE', as appropriate.  For synchronous requests,
+        this argument is ignored.
+
+        `CONNECT-TIMEOUT' and `TIMEOUT' are a number of seconds that
+        limit how long it takes to connect to a host and to receive a
+        response from a host, respectively.
+
+        `NOQUERY' is passed to `make-process', which see.
+
+        `FILTER' is an optional function to be used as the process
+        filter for the curl process.  It can be used to handle HTTP
+        responses in a streaming way.  The function must accept 2
+        arguments, the process object running curl, and a string which
+        is output received from the process.  The default process filter
+        inserts the output of the process into the process buffer.  The
+        provided `FILTER' function should at least insert output up to
+        the HTTP body into the process buffer.
+
+
+2.3 Queueing
+────────────
+
+  `plz' provides a simple system for queueing HTTP requests.  First,
+  make a `plz-queue' struct by calling `make-plz-queue'.  Then call
+  `plz-queue' with the struct as the first argument, and the rest of the
+  arguments being the same as those passed to `plz'.  Then call
+  `plz-run' to run the queued requests.
+
+  All of the queue-related functions return the queue as their value,
+  making them easy to use.  For example:
+
+  ┌────
+  │ (defvar my-queue (make-plz-queue :limit 2))
+  │ 
+  │ (plz-run
+  │  (plz-queue my-queue
+  │    'get "https://httpbin.org/get?foo=0"
+  │    :then (lambda (body) (message "%s" body))))
+  └────
+
+  Or:
+
+  ┌────
+  │ (let ((queue (make-plz-queue :limit 2
+  │ 			     :finally (lambda ()
+  │ 					(message "Queue empty."))))
+  │       (urls '("https://httpbin.org/get?foo=0"
+  │ 	      "https://httpbin.org/get?foo=1")))
+  │   (plz-run
+  │    (dolist (url urls queue)
+  │      (plz-queue queue 'get url
+  │        :then (lambda (body) (message "%s" body))))))
+  └────
+
+  You may also clear a queue with `plz-clear', which cancels any active
+  or queued requests and calls their `:else' functions.  And
+  `plz-length' returns the number of a queue's active and queued
+  requests.
+
+
+2.4 Tips
+────────
+
+  ⁃ You can customize settings in the `plz' group, but this can only be
+    used to adjust a few defaults.  It's not intended that changing or
+    binding global variables be necessary for normal operation.
+
+
+3 Changelog
+═══════════
+
+3.1 0.9.1
+─────────
+
+  *Fixes*
+
+  ⁃ Expand filenames when downloading to files (which was already
+    applied to filenames passed for uploading).  (Thanks to [Joseph
+    Turner].)
+
+
+[Joseph Turner] <https://github.com/josephmturner>
+
+
+3.2 0.9
+───────
+
+  *Compatibility*
+
+  ⁃ The minimum supported Emacs version is now 27.1.  (It is no longer
+    practical to test `plz' with Emacs versions older than 27.1.  For
+    Emacs 26.3, an earlier version of `plz' may be used, or this version
+    might be compatible, with or without minor changes, which the
+    maintainer cannot offer support for.)
+
+  *Changes*
+
+  ⁃ Option `plz-timeout' is removed.  (It was the default value for
+    `plz''s `:timeout' argument, which is passed to Curl as its
+    `--max-time' argument, limiting the total duration of a request
+    operation.  This argument should be unset by default, because larger
+    or slower downloads might not finish within a certain duration, and
+    it is surprising to the user to have this option set by default,
+    potentially causing requests to timeout unnecessarily.)
+  ⁃ Using arguments `:as 'file' or `:as '(file FILENAME)' now passes the
+    filename to Curl, allowing it to write the data to the file itself
+    (rather than receiving the data into an Emacs buffer and then
+    writing it to a file.  This improves performance when downloading
+    large files, significantly reducing Emacs's CPU and memory usage).
+
+  *Fixes*
+
+  ⁃ Improve workaround for Emacs's process sentinel-related issues.
+    (Don't try to process response a second time if Emacs calls the
+    sentinel after `plz' has returned for a synchronous request.  See
+    [#53].  Thanks to [Joseph Turner] for extensive help debugging, and
+    to [USHIN] for sponsoring some of this work.)
+  ⁃ Inhibit buffer hooks when calling `generate-new-buffer' (as extra
+    protection against "kill buffer?" prompts in case of errors).  (See
+    [#52].  Thanks to [Michał Krzywkowski].)
+    • Avoid "kill buffer?" prompts in case of errors on Emacs versions
+      before 28.  (See [#52] and [#57].  Thanks to [Michał
+      Krzywkowski].)
+
+  *Development*
+
+  ⁃ `plz' is now automatically tested against Emacs versions 27.1, 27.2,
+    28.1, 28.2, 29.1, 29.2, 29.3, and a recent snapshot of the `master'
+    branch (adding 29.2 and 29.3).
+
+
+[#53] <https://github.com/alphapapa/plz.el/issues/53>
+
+[Joseph Turner] <https://github.com/josephmturner>
+
+[USHIN] <https://ushin.org/>
+
+[#52] <https://github.com/alphapapa/plz.el/pull/52>
+
+[Michał Krzywkowski] <https://github.com/mkcms>
+
+[#57] <https://github.com/alphapapa/plz.el/issues/57>
+
+
+3.3 0.8
+───────
+
+  *Additions*
+
+  ⁃ Function `plz' now accepts a `:filter' argument which can be used to
+    override the default process filter (e.g. for streaming responses).
+    ([#43], [#50].  Thanks to [Roman Scherer].)
+
+
+[#43] <https://github.com/alphapapa/plz.el/pull/43>
+
+[#50] <https://github.com/alphapapa/plz.el/pull/50>
+
+[Roman Scherer] <https://github.com/r0man>
+
+
+3.4 0.7.3
+─────────
+
+  *Fixes*
+  ⁃ Info manual generation on GNU ELPA.  (Also, the Info manual is no
+    longer committed to Git.)
+
+
+3.5 0.7.2
+─────────
+
+  *Fixes*
+  ⁃ Don't delete preexisting files when downloading to a file.
+    ([#41]. Thanks to [Joseph Turner].)
+
+
+[#41] <https://github.com/alphapapa/plz.el/pull/41>
+
+[Joseph Turner] <https://github.com/josephmturner>
+
+
+3.6 0.7.1
+─────────
+
+  *Fixes*
+  ⁃ Handle HTTP 303 redirects.  (Thanks to [Daniel Hubmann] for
+    reporting.)
+
+
+[Daniel Hubmann] <https://github.com/hubisan>
+
+
+3.7 0.7
+───────
+
+  *Changes*
+  ⁃ A new error signal, `plz-error', is defined.  The existing signals,
+    `plz-curl-error' and `plz-http-error', inherit from it, so handling
+    `plz-error' catches both.
+
+    *NOTE:* The existing signals, `plz-curl-error' and `plz-http-error',
+     are hereby deprecated, and they will be removed in v0.8.
+     Applications should be updated while using v0.7 to only expect
+     `plz-error'.
+
+  *Fixes*
+  ⁃ Significant improvement in reliability by implementing failsafes and
+    workarounds for Emacs's process-handling code.  (See [#3].)
+  ⁃ STDERR output from curl processes is not included in response bodies
+    (which sometimes happened, depending on Emacs's internal race
+    conditions).  (Fixes [#23].)
+  ⁃ Use `with-local-quit' for synchronous requests (preventing Emacs
+    from complaining sometimes).  (Fixes [#26].)
+  ⁃ Various fixes for `:as 'buffer' result type: decode body when
+    appropriate; unset multibyte for binary; narrow to body; don't kill
+    buffer prematurely.
+  ⁃ When clearing a queue, don't try to kill finished processes.
+
+  *Internal*
+  ⁃ Response processing now happens outside the process sentinel, so any
+    errors (e.g. in user callbacks) are not signaled from inside the
+    sentinel.  (This avoids the 2-second pause Emacs imposes in such
+    cases.)
+  ⁃ Tests run against a local instance of [httpbin] (since the
+    `httpbin.org' server is often overloaded).
+  ⁃ No buffer-local variables are defined anymore; process properties
+    are used instead.
+
+
+[#3] <https://github.com/alphapapa/plz.el/issues/3>
+
+[#23] <https://github.com/alphapapa/plz.el/issues/23>
+
+[#26] <https://github.com/alphapapa/plz.el/issues/26>
+
+[httpbin] <https://github.com/postmanlabs/httpbin>
+
+
+3.8 0.6
+───────
+
+  *Additions*
+  ⁃ Function `plz''s `:body' argument now accepts a list like `(file
+    FILENAME)' to upload a file from disk (by passing the filename to
+    curl, rather than reading its content into Emacs and sending it to
+    curl through the pipe).
+
+  *Fixes*
+  ⁃ Function `plz''s docstring now mentions that the `:body' argument
+    may also be a buffer (an intentional feature that was accidentally
+    undocumented).
+  ⁃ Handle HTTP 3xx redirects when using `:as 'response'.
+
+
+3.9 0.5.4
+─────────
+
+  *Fixes*
+  ⁃ Only run queue's `finally' function after queue is empty.  (New
+    features should not be designed and released on a Friday.)
+
+
+3.10 0.5.3
+──────────
+
+  *Fixes*
+  ⁃ Move new slot in `plz-queue' struct to end to prevent invalid
+    byte-compiler expansions for already-compiled applications (which
+    would require them to be recompiled after upgrading `plz').
+
+
+3.11 0.5.2
+──────────
+
+  *Fixes*
+  ⁃ When clearing a queue, only call `plz-queue''s `finally' function
+    when specified.
+
+
+3.12 0.5.1
+──────────
+
+  *Fixes*
+  ⁃ Only call `plz-queue''s `finally' function when specified.  (Thanks
+    to [Dan Oriani] for reporting.)
+
+
+[Dan Oriani] <https://github.com/redchops>
+
+
+3.13 0.5
+────────
+
+  *Additions*
+  ⁃ Struct `plz-queue''s `finally' slot, a function called when the
+    queue is finished.
+
+
+3.14 0.4
+────────
+
+  *Additions*
+  ⁃ Support for HTTP `HEAD' requests.  (Thanks to [USHIN] for
+    sponsoring.)
+
+  *Changes*
+  ⁃ Allow sending `POST' and `PUT' requests without bodies.  ([#16].
+    Thanks to [Joseph Turner] for reporting.  Thanks to [USHIN] for
+    sponsoring.)
+
+  *Fixes*
+  ⁃ All 2xx HTTP status codes are considered successful.  ([#17].
+    Thanks to [Joseph Turner] for reporting.  Thanks to [USHIN] for
+    sponsoring.)
+  ⁃ Errors are signaled with error data correctly.
+
+  *Internal*
+  ⁃ Test suite explicitly tests with both HTTP/1.1 and HTTP/2.
+  ⁃ Test suite also tests with Emacs versions 27.2, 28.1, and 28.2.
+
+
+[USHIN] <https://ushin.org/>
+
+[#16] <https://github.com/alphapapa/plz.el/issues/16>
+
+[Joseph Turner] <https://github.com/josephmturner>
+
+[#17] <https://github.com/alphapapa/plz.el/issues/17>
+
+
+3.15 0.3
+────────
+
+  *Additions*
+  ⁃ Handle HTTP proxy headers from Curl. ([#2].  Thanks to [Alan Third]
+    and [Sawyer Zheng] for reporting.)
+
+  *Fixes*
+  ⁃ Replaced words not in Ispell's default dictionaries (so `checkdoc'
+    linting succeeds).
+
+
+[#2] <https://github.com/alphapapa/plz.el/issues/2>
+
+[Alan Third] <https://github.com/alanthird>
+
+[Sawyer Zheng] <https://github.com/sawyerzheng>
+
+
+3.16 0.2.1
+──────────
+
+  *Fixes*
+  ⁃ Handle when Curl process is interrupted.
+
+
+3.17 0.2
+────────
+
+  *Added*
+  ⁃ Simple request queueing.
+
+
+3.18 0.1
+────────
+
+  Initial release.
+
+
+4 Credits
+═════════
+
+  ⁃ Thanks to [Chris Wellons], author of the [Elfeed] feed reader and
+    the popular blog [null program], for his invaluable advice, review,
+    and encouragement.
+
+
+[Chris Wellons] <https://github.com/skeeto>
+
+[Elfeed] <https://github.com/skeeto/elfeed>
+
+[null program] <https://nullprogram.com/>
+
+
+5 Development
+═════════════
+
+  Bug reports, feature requests, suggestions — /oh my/!
+
+  Note that `plz' is a young library, and its only client so far is
+  [Ement.el].  There are a variety of HTTP and `curl' features it does
+  not yet support, since they have not been needed by the author.
+  Patches are welcome, as long as they include passing tests.
+
+
+[Ement.el] <https://github.com/alphapapa/ement.el>
+
+5.1 Copyright assignment
+────────────────────────
+
+  This package is part of [GNU Emacs], being distributed in [GNU ELPA].
+  Contributions to this project must follow GNU guidelines, which means
+  that, as with other parts of Emacs, patches of more than a few lines
+  must be accompanied by having assigned copyright for the contribution
+  to the FSF.  Contributors who wish to do so may contact
+  [emacs-devel@gnu.org] to request the assignment form.
+
+
+[GNU Emacs] <https://www.gnu.org/software/emacs/>
+
+[GNU ELPA] <https://elpa.gnu.org/>
+
+[emacs-devel@gnu.org] <mailto:emacs-devel@gnu.org>
+
+
+6 License
+═════════
+
+  GPLv3
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/README.org b/emacs/.emacs.d/elpa/plz-0.9.1/README.org
new file mode 100644
index 0000000..8132ccc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/plz-0.9.1/README.org
@@ -0,0 +1,375 @@
+#+TITLE: plz.el
+
+#+PROPERTY: LOGGING nil
+
+# NOTE: It would be preferable to put these at the bottom of the file under the export options heading, but it seems that "TEXINFO_DIR_CATEGORY" only works at the top of the file.
+#+EXPORT_FILE_NAME: plz.texi
+#+TEXINFO_DIR_CATEGORY: Emacs
+#+TEXINFO_DIR_TITLE: Plz: (plz)
+#+TEXINFO_DIR_DESC: HTTP library using Curl as a backend
+
+# Note: This readme works with the org-make-toc <https://github.com/alphapapa/org-make-toc> package, which automatically updates the table of contents.
+
+[[http://elpa.gnu.org/packages/plz.html][file:http://elpa.gnu.org/packages/plz.svg]]
+
+#+HTML: <img src="images/mascot.png" align="right">
+
+~plz~ is an HTTP library for Emacs.  It uses ~curl~ as a backend, which avoids some of the issues with using Emacs's built-in ~url~ library.  It supports both synchronous and asynchronous requests.  Its API is intended to be simple, natural, and expressive.  Its code is intended to be simple and well-organized.  Every feature is tested against [[https://httpbin.org/][httpbin]].
+
+* Contents                                                         :noexport:
+:PROPERTIES:
+:TOC:      :include siblings
+:END:
+:CONTENTS:
+- [[#installation][Installation]]
+- [[#usage][Usage]]
+  - [[#examples][Examples]]
+  - [[#functions][Functions]]
+  - [[#queueing][Queueing]]
+- [[#changelog][Changelog]]
+- [[#credits][Credits]]
+- [[#development][Development]]
+  - [[#copyright-assignment][Copyright assignment]]
+:END:
+
+* Installation
+:PROPERTIES:
+:TOC:      :depth 0
+:END:
+
+** GNU ELPA
+
+~plz~ is available in [[http://elpa.gnu.org/packages/plz.html][GNU ELPA]].  It may be installed in Emacs using the ~package-install~ command.
+
+** Manual
+
+ ~plz~ has no dependencies other than Emacs and ~curl~.  It's known to work on Emacs 26.3 or later.  To install it manually, simply place =plz.el= in your ~load-path~ and ~(require 'plz)~.
+
+* Usage
+:PROPERTIES:
+:TOC:      :depth 1
+:END:
+
+The main public function is ~plz~, which sends an HTTP request and returns either the result of the specified type (for a synchronous request), or the ~curl~ process object (for asynchronous requests).  For asynchronous requests, callback, error-handling, and finalizer functions may be specified, as well as various other options.
+
+** Examples
+
+Synchronously =GET= a URL and return the response body as a decoded string (here, raw JSON):
+
+#+BEGIN_SRC elisp :exports both :results value code :cache yes
+  (plz 'get "https://httpbin.org/user-agent")
+#+END_SRC
+
+#+RESULTS[47fef7e4780e9fac6c99d7661c29de580bf0fa14]:
+#+begin_src elisp
+  "{\n \"user-agent\": \"curl/7.35.0\"\n}\n"
+#+end_src
+
+Synchronously =GET= a URL that returns a JSON object, and parse and return it as an alist:
+
+#+BEGIN_SRC elisp :exports both :results value code :cache yes
+  (plz 'get "https://httpbin.org/get" :as #'json-read)
+#+END_SRC
+
+#+RESULTS[a117174ba62b2be3ea3f23e5c43662047b81bccf]:
+#+begin_src elisp
+  ((args)
+   (headers
+    (Accept . "*/*")
+    (Accept-Encoding . "deflate, gzip")
+    (Host . "httpbin.org")
+    (User-Agent . "curl/7.35.0"))
+   (url . "https://httpbin.org/get"))
+#+end_src
+
+Asynchronously =POST= a JSON object in the request body, then parse a JSON object from the response body, and call a function with the result:
+
+#+BEGIN_SRC elisp :exports both :cache yes
+  (plz 'post "https://httpbin.org/post"
+    :headers '(("Content-Type" . "application/json"))
+    :body (json-encode '(("key" . "value")))
+    :as #'json-read
+    :then (lambda (alist)
+            (message "Result: %s" (alist-get 'data alist))))
+#+END_SRC
+
+#+RESULTS[3f4fdd16c4980bf36c3930e91f69cc379cca4a35]:
+: Result: {"key":"value"}
+
+Synchronously download a JPEG file, then create an Emacs image object from the data:
+
+#+BEGIN_SRC elisp :exports both :cache yes
+  (let ((jpeg-data (plz 'get "https://httpbin.org/image/jpeg" :as 'binary)))
+    (create-image jpeg-data nil 'data))
+#+END_SRC
+
+#+RESULTS[fbe8a6c8cb097ac08e992ea90bdbd50e7337a385]:
+: (image :type jpeg :data ""ÿØÿà^@^PJFIF...")
+
+** Functions
+
++  ~plz~ :: /(method url &key headers body else finally noquery (as 'string) (then 'sync) (body-type 'text) (decode t decode-s) (connect-timeout plz-connect-timeout) (timeout plz-timeout))/
+
+   Request ~METHOD~ from ~URL~ with curl.  Return the curl process object or, for a synchronous request, the selected result.
+
+   ~HEADERS~ may be an alist of extra headers to send with the request.
+
+   ~BODY~ may be a string, a buffer, or a list like ~(file FILENAME)~ to upload a file from disk.
+
+   ~BODY-TYPE~ may be ~text~ to send ~BODY~ as text, or ~binary~ to send it as binary.
+
+   ~AS~ selects the kind of result to pass to the callback function ~THEN~, or the kind of result to return for synchronous requests.  It may be:
+
+   - ~buffer~ to pass the response buffer, which will be narrowed to the response body and decoded according to ~DECODE~.
+   - ~binary~ to pass the response body as an un-decoded string.
+   - ~string~ to pass the response body as a decoded string.
+   - ~response~ to pass a ~plz-response~ structure.
+   - ~file~ to pass a temporary filename to which the response body has been saved without decoding.
+   - ~(file ~FILENAME)~ to pass ~FILENAME~ after having saved the response body to it without decoding.  ~FILENAME~ must be a non-existent file; if it exists, it will not be overwritten, and an error will be signaled.  ~FILENAME~ is passed through ~expand-file-name~, which see.
+   - A function, which is called in the response buffer with it narrowed to the response body (suitable for, e.g. ~json-read~).
+
+   If ~DECODE~ is non-nil, the response body is decoded automatically.  For binary content, it should be nil.  When ~AS~ is ~binary~, ~DECODE~ is automatically set to nil.
+
+   ~THEN~ is a callback function, whose sole argument is selected above with ~AS~; if the request fails and no ~ELSE~ function is given (see below), the argument will be a ~plz-error~ structure describing the error.  Or ~THEN~ may be ~sync~ to make a synchronous request, in which case the result is returned directly from this function.
+
+   ~ELSE~ is an optional callback function called when the request fails (i.e. if curl fails, or if the ~HTTP~ response has a non-2xx status code).  It is called with one argument, a ~plz-error~ structure.  If ~ELSE~ is nil, a ~plz-curl-error~ or ~plz-http-error~ is signaled when the request fails, with a ~plz-error~ structure as the error data.  For synchronous requests, this argument is ignored.
+
+   ~NOTE~: In v0.8 of ~plz~, only one error will be signaled: ~plz-error~.  The existing errors, ~plz-curl-error~ and ~plz-http-error~, inherit from ~plz-error~ to allow applications to update their code while using v0.7 (i.e. any ~condition-case~ forms should now handle only ~plz-error~, not the other two).
+
+   ~FINALLY~ is an optional function called without argument after ~THEN~ or ~ELSE~, as appropriate.  For synchronous requests, this argument is ignored.
+
+   ~CONNECT-TIMEOUT~ and ~TIMEOUT~ are a number of seconds that limit how long it takes to connect to a host and to receive a response from a host, respectively.
+
+   ~NOQUERY~ is passed to ~make-process~, which see.
+
+   ~FILTER~ is an optional function to be used as the process filter for the curl process.  It can be used to handle HTTP responses in a streaming way.  The function must accept 2 arguments, the process object running curl, and a string which is output received from the process.  The default process filter inserts the output of the process into the process buffer.  The provided ~FILTER~ function should at least insert output up to the HTTP body into the process buffer.
+
+
+** Queueing
+
+~plz~ provides a simple system for queueing HTTP requests.  First, make a ~plz-queue~ struct by calling ~make-plz-queue~.  Then call ~plz-queue~ with the struct as the first argument, and the rest of the arguments being the same as those passed to ~plz~.  Then call ~plz-run~ to run the queued requests.
+
+All of the queue-related functions return the queue as their value, making them easy to use.  For example:
+
+#+begin_src elisp :exports code
+  (defvar my-queue (make-plz-queue :limit 2))
+
+  (plz-run
+   (plz-queue my-queue
+     'get "https://httpbin.org/get?foo=0"
+     :then (lambda (body) (message "%s" body))))
+#+end_src
+
+Or:
+
+#+begin_src elisp :exports code
+  (let ((queue (make-plz-queue :limit 2
+                               :finally (lambda ()
+                                          (message "Queue empty."))))
+        (urls '("https://httpbin.org/get?foo=0"
+                "https://httpbin.org/get?foo=1")))
+    (plz-run
+     (dolist (url urls queue)
+       (plz-queue queue 'get url
+         :then (lambda (body) (message "%s" body))))))
+#+end_src
+
+You may also clear a queue with ~plz-clear~, which cancels any active or queued requests and calls their ~:else~ functions.  And ~plz-length~ returns the number of a queue's active and queued requests.
+
+** Tips
+:PROPERTIES:
+:TOC:      :ignore (this)
+:END:
+
++ You can customize settings in the =plz= group, but this can only be used to adjust a few defaults.  It's not intended that changing or binding global variables be necessary for normal operation.
+
+* Changelog
+:PROPERTIES:
+:TOC:      :depth 0
+:END:
+
+** 0.9.1
+
+*Fixes*
+
++ Expand filenames when downloading to files (which was already applied to filenames passed for uploading).  (Thanks to [[https://github.com/josephmturner][Joseph Turner]].)  
+
+** 0.9
+
+*Compatibility*
+
++ The minimum supported Emacs version is now 27.1.  (It is no longer practical to test ~plz~ with Emacs versions older than 27.1.  For Emacs 26.3, an earlier version of ~plz~ may be used, or this version might be compatible, with or without minor changes, which the maintainer cannot offer support for.)
+
+*Changes*
+
++ Option ~plz-timeout~ is removed.  (It was the default value for ~plz~'s ~:timeout~ argument, which is passed to Curl as its ~--max-time~ argument, limiting the total duration of a request operation.  This argument should be unset by default, because larger or slower downloads might not finish within a certain duration, and it is surprising to the user to have this option set by default, potentially causing requests to timeout unnecessarily.)
++ Using arguments ~:as 'file~ or ~:as '(file FILENAME)~ now passes the filename to Curl, allowing it to write the data to the file itself (rather than receiving the data into an Emacs buffer and then writing it to a file.  This improves performance when downloading large files, significantly reducing Emacs's CPU and memory usage).
+
+*Fixes*
+
++ Improve workaround for Emacs's process sentinel-related issues.  (Don't try to process response a second time if Emacs calls the sentinel after ~plz~ has returned for a synchronous request.  See [[https://github.com/alphapapa/plz.el/issues/53][#53]].  Thanks to [[https://github.com/josephmturner][Joseph Turner]] for extensive help debugging, and to [[https://ushin.org/][USHIN]] for sponsoring some of this work.)
++ Inhibit buffer hooks when calling ~generate-new-buffer~ (as extra protection against "kill buffer?" prompts in case of errors).  (See [[https://github.com/alphapapa/plz.el/pull/52][#52]].  Thanks to [[https://github.com/mkcms][Michał Krzywkowski]].)
+  - Avoid "kill buffer?" prompts in case of errors on Emacs versions before 28.  (See [[https://github.com/alphapapa/plz.el/pull/52][#52]] and [[https://github.com/alphapapa/plz.el/issues/57][#57]].  Thanks to [[https://github.com/mkcms][Michał Krzywkowski]].)  
+
+*Development*
+
++ ~plz~ is now automatically tested against Emacs versions 27.1, 27.2, 28.1, 28.2, 29.1, 29.2, 29.3, and a recent snapshot of the ~master~ branch (adding 29.2 and 29.3).
+
+** 0.8
+
+*Additions*
+
++ Function ~plz~ now accepts a ~:filter~ argument which can be used to override the default process filter (e.g. for streaming responses).  ([[https://github.com/alphapapa/plz.el/pull/43][#43]], [[https://github.com/alphapapa/plz.el/pull/50][#50]].  Thanks to [[https://github.com/r0man][Roman Scherer]].)
+
+** 0.7.3
+
+*Fixes*
++ Info manual generation on GNU ELPA.  (Also, the Info manual is no longer committed to Git.)
+
+** 0.7.2
+
+*Fixes*
++ Don't delete preexisting files when downloading to a file.  ([[https://github.com/alphapapa/plz.el/pull/41][#41]]. Thanks to [[https://github.com/josephmturner][Joseph Turner]].)
+
+** 0.7.1
+
+*Fixes*
++ Handle HTTP 303 redirects.  (Thanks to [[https://github.com/hubisan][Daniel Hubmann]] for reporting.)
+
+** 0.7
+
+*Changes*
++ A new error signal, ~plz-error~, is defined.  The existing signals, ~plz-curl-error~ and ~plz-http-error~, inherit from it, so handling ~plz-error~ catches both.
+
+  *NOTE:* The existing signals, ~plz-curl-error~ and ~plz-http-error~, are hereby deprecated, and they will be removed in v0.8.  Applications should be updated while using v0.7 to only expect ~plz-error~.
+
+*Fixes*
++ Significant improvement in reliability by implementing failsafes and workarounds for Emacs's process-handling code.  (See [[https://github.com/alphapapa/plz.el/issues/3][#3]].)
++ STDERR output from curl processes is not included in response bodies (which sometimes happened, depending on Emacs's internal race conditions).  (Fixes [[https://github.com/alphapapa/plz.el/issues/23][#23]].)
++ Use ~with-local-quit~ for synchronous requests (preventing Emacs from complaining sometimes).  (Fixes [[https://github.com/alphapapa/plz.el/issues/26][#26]].)
++ Various fixes for ~:as 'buffer~ result type: decode body when appropriate; unset multibyte for binary; narrow to body; don't kill buffer prematurely.
++ When clearing a queue, don't try to kill finished processes.
+
+*Internal*
++ Response processing now happens outside the process sentinel, so any errors (e.g. in user callbacks) are not signaled from inside the sentinel.  (This avoids the 2-second pause Emacs imposes in such cases.)
++ Tests run against a local instance of [[https://github.com/postmanlabs/httpbin][httpbin]] (since the ~httpbin.org~ server is often overloaded).
++ No buffer-local variables are defined anymore; process properties are used instead.
+
+** 0.6
+
+*Additions*
++ Function ~plz~'s ~:body~ argument now accepts a list like ~(file FILENAME)~ to upload a file from disk (by passing the filename to curl, rather than reading its content into Emacs and sending it to curl through the pipe).
+
+*Fixes*
++ Function ~plz~'s docstring now mentions that the ~:body~ argument may also be a buffer (an intentional feature that was accidentally undocumented).
++ Handle HTTP 3xx redirects when using ~:as 'response~.
+
+** 0.5.4
+
+*Fixes*
++ Only run queue's ~finally~ function after queue is empty.  (New features should not be designed and released on a Friday.)
+
+** 0.5.3
+
+*Fixes*
++ Move new slot in ~plz-queue~ struct to end to prevent invalid byte-compiler expansions for already-compiled applications (which would require them to be recompiled after upgrading ~plz~).
+
+** 0.5.2
+
+*Fixes*
++ When clearing a queue, only call ~plz-queue~'s ~finally~ function when specified.
+
+** 0.5.1
+
+*Fixes*
++ Only call ~plz-queue~'s ~finally~ function when specified.  (Thanks to [[https://github.com/redchops][Dan Oriani]] for reporting.)
+
+** 0.5
+
+*Additions*
++ Struct ~plz-queue~'s ~finally~ slot, a function called when the queue is finished.
+
+** 0.4
+
+*Additions*
++ Support for HTTP ~HEAD~ requests.  (Thanks to [[https://ushin.org/][USHIN]] for sponsoring.)
+
+*Changes*
++ Allow sending ~POST~ and ~PUT~ requests without bodies.  ([[https://github.com/alphapapa/plz.el/issues/16][#16]].  Thanks to [[https://github.com/josephmturner][Joseph Turner]] for reporting.  Thanks to [[https://ushin.org/][USHIN]] for sponsoring.)
+
+*Fixes*
++ All 2xx HTTP status codes are considered successful.  ([[https://github.com/alphapapa/plz.el/issues/17][#17]].  Thanks to [[https://github.com/josephmturner][Joseph Turner]] for reporting.  Thanks to [[https://ushin.org/][USHIN]] for sponsoring.)
++ Errors are signaled with error data correctly.
+
+*Internal*
++ Test suite explicitly tests with both HTTP/1.1 and HTTP/2.
++ Test suite also tests with Emacs versions 27.2, 28.1, and 28.2.
+
+** 0.3
+
+*Additions*
++ Handle HTTP proxy headers from Curl. ([[https://github.com/alphapapa/plz.el/issues/2][#2]].  Thanks to [[https://github.com/alanthird][Alan Third]] and [[https://github.com/sawyerzheng][Sawyer Zheng]] for reporting.)
+
+*Fixes*
++ Replaced words not in Ispell's default dictionaries (so ~checkdoc~ linting succeeds).
+
+** 0.2.1
+
+*Fixes*
++ Handle when Curl process is interrupted.
+
+** 0.2
+
+*Added*
++ Simple request queueing.
+
+** 0.1
+
+Initial release.
+
+* Credits
+
++  Thanks to [[https://github.com/skeeto][Chris Wellons]], author of the [[https://github.com/skeeto/elfeed][Elfeed]] feed reader and the popular blog [[https://nullprogram.com/][null program]], for his invaluable advice, review, and encouragement.
+
+* Development
+
+Bug reports, feature requests, suggestions — /oh my/!
+
+Note that ~plz~ is a young library, and its only client so far is [[https://github.com/alphapapa/ement.el][Ement.el]].  There are a variety of HTTP and ~curl~ features it does not yet support, since they have not been needed by the author.  Patches are welcome, as long as they include passing tests.
+
+** Copyright assignment
+
+This package is part of [[https://www.gnu.org/software/emacs/][GNU Emacs]], being distributed in [[https://elpa.gnu.org/][GNU ELPA]].  Contributions to this project must follow GNU guidelines, which means that, as with other parts of Emacs, patches of more than a few lines must be accompanied by having assigned copyright for the contribution to the FSF.  Contributors who wish to do so may contact [[mailto:emacs-devel@gnu.org][emacs-devel@gnu.org]] to request the assignment form.
+
+* License
+:PROPERTIES:
+:TOC:      :ignore (this)
+:END:
+
+GPLv3
+
+* COMMENT Export setup                                             :noexport:
+:PROPERTIES:
+:TOC:      :ignore (this descendants)
+:END:
+
+# Copied from org-super-agenda's readme, in which much was borrowed from Org's =org-manual.org=.
+
+#+OPTIONS: broken-links:t *:t
+
+** Info export options
+
+# NOTE: These are moved to the top of the file.
+
+** File-local variables
+
+# NOTE: Setting org-comment-string buffer-locally is a nasty hack to work around GitHub's org-ruby's HTML rendering, which does not respect noexport tags.  The only way to hide this tree from its output is to use the COMMENT keyword, but that prevents Org from processing the export options declared in it.  So since these file-local variables don't affect org-ruby, wet set org-comment-string to an unused keyword, which prevents Org from deleting this tree from the export buffer, which allows it to find the export options in it.  And since org-export does respect the noexport tag, the tree is excluded from the info page.
+
+# Local Variables:
+# eval: (require 'org-make-toc)
+# before-save-hook: org-make-toc
+# org-export-with-properties: ()
+# org-export-with-title: t
+# org-export-initial-scope: buffer
+# org-comment-string: "NOTCOMMENT"
+# End:
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/dir b/emacs/.emacs.d/elpa/plz-0.9.1/dir
new file mode 100644
index 0000000..244fbd5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/plz-0.9.1/dir
@@ -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
+* Plz: (plz).                   HTTP library using Curl as a backend.
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/images/mascot.png b/emacs/.emacs.d/elpa/plz-0.9.1/images/mascot.png
new file mode 100644
index 0000000..e1cf529
Binary files /dev/null and b/emacs/.emacs.d/elpa/plz-0.9.1/images/mascot.png differ
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/plz-autoloads.el b/emacs/.emacs.d/elpa/plz-0.9.1/plz-autoloads.el
new file mode 100644
index 0000000..13c333b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/plz-0.9.1/plz-autoloads.el
@@ -0,0 +1,28 @@
+;;; plz-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from plz.el
+
+(register-definition-prefixes "plz" '("plz-"))
+
+;;; End of scraped data
+
+(provide 'plz-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; plz-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/plz-pkg.el b/emacs/.emacs.d/elpa/plz-0.9.1/plz-pkg.el
new file mode 100644
index 0000000..bd213a5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/plz-0.9.1/plz-pkg.el
@@ -0,0 +1,2 @@
+;; Generated package description from plz.el  -*- no-byte-compile: t -*-
+(define-package "plz" "0.9.1" "HTTP library" '((emacs "27.1")) :commit "c579f039ffdb52ff61775ff25510a9c26e25d0c5" :authors '(("Adam Porter" . "adam@alphapapa.net")) :maintainer '("Adam Porter" . "adam@alphapapa.net") :keywords '("comm" "network" "http") :url "https://github.com/alphapapa/plz.el")
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/plz.el b/emacs/.emacs.d/elpa/plz-0.9.1/plz.el
new file mode 100644
index 0000000..6da2251
--- /dev/null
+++ b/emacs/.emacs.d/elpa/plz-0.9.1/plz.el
@@ -0,0 +1,1035 @@
+;;; plz.el --- HTTP library                         -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+;; URL: https://github.com/alphapapa/plz.el
+;; Version: 0.9.1
+;; Package-Requires: ((emacs "27.1"))
+;; Keywords: comm, network, http
+
+;; This file is part of GNU Emacs.
+
+;;; License:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; An HTTP library that uses curl as a backend.  Inspired by, and some
+;; code copied from, Christopher Wellons's library, elfeed-curl.el.
+;;
+;; Why this package?
+;;
+;; 1.  `url' works well for many things, but it has some issues.
+;; 2.  `request' works well for many things, but it has some issues.
+;; 3.  Chris Wellons doesn't have time to factor his excellent
+;;     elfeed-curl.el library out of Elfeed.  This will have to do.
+;;
+;; Why is it called `plz'?
+;;
+;; 1.  There's already a package called `http'.
+;; 2.  There's already a package called `request'.
+;; 3.  Naming things is hard.
+
+;;;; Usage:
+
+;; FIXME(v0.10): Remove the following note.
+
+;; NOTE: In a future version of plz, only one error will be signaled:
+;; `plz-error'.  The existing errors, `plz-curl-error' and
+;; `plz-http-error', inherit from `plz-error' to allow applications to
+;; update their code while using earlier versions (i.e. any
+;; `condition-case' forms should now handle only `plz-error', not the
+;; other two).
+
+;; Call function `plz' to make an HTTP request.  Its docstring
+;; explains its arguments.  `plz' also supports other HTTP methods,
+;; uploading and downloading binary files, sending URL parameters and
+;; HTTP headers, configurable timeouts, error-handling "else" and
+;; always-called "finally" functions, and more.
+
+;; Basic usage is simple.  For example, to make a synchronous request
+;; and return the HTTP response body as a string:
+;;
+;;   (plz 'get "https://httpbin.org/get")
+;;
+;; Which returns the JSON object as a string:
+;;
+;;   "{
+;;     \"args\": {},
+;;     \"headers\": {
+;;       \"Accept\": \"*/*\",
+;;       \"Accept-Encoding\": \"deflate, gzip\",
+;;       \"Host\": \"httpbin.org\",
+;;       \"User-Agent\": \"curl/7.35.0\"
+;;     },
+;;     \"origin\": \"xxx.xxx.xxx.xxx\",
+;;     \"url\": \"https://httpbin.org/get\"
+;;   }"
+;;
+;; To make the same request asynchronously, decoding the JSON and
+;; printing a message with a value from it:
+;;
+;;   (plz 'get "https://httpbin.org/get" :as #'json-read
+;;     :then (lambda (alist) (message "URL: %s" (alist-get 'url alist))))
+;;
+;; Which, after the request returns, prints:
+;;
+;;   URL: https://httpbin.org/get
+
+;;;; Credits:
+
+;; Thanks to Chris Wellons for inspiration, encouragement, and advice.
+
+;;; Code:
+
+;;;; Requirements
+
+(require 'cl-lib)
+(require 'map)
+(require 'rx)
+(require 'subr-x)
+
+;;;; Errors
+
+(define-error 'plz-error "plz error")
+(define-error 'plz-curl-error "plz: Curl error" 'plz-error)
+(define-error 'plz-http-error "plz: HTTP error" 'plz-error)
+
+;;;; Structs
+
+(cl-defstruct plz-response
+  version status headers body)
+
+(cl-defstruct plz-error
+  curl-error response message)
+
+;;;; Constants
+
+(defconst plz-http-response-status-line-regexp
+  (rx "HTTP/" (group (or "1.0" "1.1" "2")) " "
+      ;; Status code
+      (group (1+ digit)) " "
+      ;; Reason phrase
+      (optional (group (1+ (not (any "\r\n")))))
+      (or
+       ;; HTTP 1
+       "\r\n"
+       ;; HTTP 2
+       "\n"))
+  "Regular expression matching HTTP response status line.")
+
+(defconst plz-http-end-of-headers-regexp
+  (rx (or "\r\n\r\n" "\n\n"))
+  "Regular expression matching the end of HTTP headers.
+This must work with both HTTP/1 (using CRLF) and HTTP/2 (using
+only LF).")
+
+(defconst plz-curl-errors
+  ;; Copied from elfeed-curl.el.
+  '((1 . "Unsupported protocol.")
+    (2 . "Failed to initialize.")
+    (3 . "URL malformed. The syntax was not correct.")
+    (4 . "A feature or option that was needed to perform the desired request was not enabled or was explicitly disabled at build-time.")
+    (5 . "Couldn't resolve proxy. The given proxy host could not be resolved.")
+    (6 . "Couldn't resolve host. The given remote host was not resolved.")
+    (7 . "Failed to connect to host.")
+    (8 . "FTP weird server reply. The server sent data curl couldn't parse.")
+    (9 . "FTP access denied.")
+    (11 . "FTP weird PASS reply.")
+    (13 . "FTP weird PASV reply.")
+    (14 . "FTP weird 227 format.")
+    (15 . "FTP can't get host.")
+    (17 . "FTP couldn't set binary.")
+    (18 . "Partial file. Only a part of the file was transferred.")
+    (19 . "FTP couldn't download/access the given file, the RETR (or similar) command failed.")
+    (21 . "FTP quote error. A quote command returned error from the server.")
+    (22 . "HTTP page not retrieved.")
+    (23 . "Write error.")
+    (25 . "FTP couldn't STOR file.")
+    (26 . "Read error. Various reading problems.")
+    (27 . "Out of memory. A memory allocation request failed.")
+    (28 . "Operation timeout.")
+    (30 . "FTP PORT failed.")
+    (31 . "FTP couldn't use REST.")
+    (33 . "HTTP range error. The range \"command\" didn't work.")
+    (34 . "HTTP post error. Internal post-request generation error.")
+    (35 . "SSL connect error. The SSL handshaking failed.")
+    (36 . "FTP bad download resume.")
+    (37 . "FILE couldn't read file.")
+    (38 . "LDAP bind operation failed.")
+    (39 . "LDAP search failed.")
+    (41 . "Function not found. A required LDAP function was not found.")
+    (42 . "Aborted by callback.")
+    (43 . "Internal error. A function was called with a bad parameter.")
+    (45 . "Interface error. A specified outgoing interface could not be used.")
+    (47 . "Too many redirects.")
+    (48 . "Unknown option specified to libcurl.")
+    (49 . "Malformed telnet option.")
+    (51 . "The peer's SSL certificate or SSH MD5 fingerprint was not OK.")
+    (52 . "The server didn't reply anything, which here is considered an error.")
+    (53 . "SSL crypto engine not found.")
+    (54 . "Cannot set SSL crypto engine as default.")
+    (55 . "Failed sending network data.")
+    (56 . "Failure in receiving network data.")
+    (58 . "Problem with the local certificate.")
+    (59 . "Couldn't use specified SSL cipher.")
+    (60 . "Peer certificate cannot be authenticated with known CA certificates.")
+    (61 . "Unrecognized transfer encoding.")
+    (62 . "Invalid LDAP URL.")
+    (63 . "Maximum file size exceeded.")
+    (64 . "Requested FTP SSL level failed.")
+    (65 . "Sending the data requires a rewind that failed.")
+    (66 . "Failed to initialise SSL Engine.")
+    (67 . "The user name, password, or similar was not accepted and curl failed to log in.")
+    (68 . "File not found on TFTP server.")
+    (69 . "Permission problem on TFTP server.")
+    (70 . "Out of disk space on TFTP server.")
+    (71 . "Illegal TFTP operation.")
+    (72 . "Unknown TFTP transfer ID.")
+    (73 . "File already exists (TFTP).")
+    (74 . "No such user (TFTP).")
+    (75 . "Character conversion failed.")
+    (76 . "Character conversion functions required.")
+    (77 . "Problem with reading the SSL CA cert (path? access rights?).")
+    (78 . "The resource referenced in the URL does not exist.")
+    (79 . "An unspecified error occurred during the SSH session.")
+    (80 . "Failed to shut down the SSL connection.")
+    (82 . "Could not load CRL file, missing or wrong format (added in 7.19.0).")
+    (83 . "Issuer check failed (added in 7.19.0).")
+    (84 . "The FTP PRET command failed")
+    (85 . "RTSP: mismatch of CSeq numbers")
+    (86 . "RTSP: mismatch of Session Identifiers")
+    (87 . "unable to parse FTP file list")
+    (88 . "FTP chunk callback reported error")
+    (89 . "No connection available, the session will be queued")
+    (90 . "SSL public key does not matched pinned public key"))
+  "Alist mapping curl error code integers to helpful error messages.")
+
+;;;; Customization
+
+(defgroup plz nil
+  "Options for `plz'."
+  :group 'network
+  :link '(url-link "https://github.com/alphapapa/plz.el"))
+
+(defcustom plz-curl-program "curl"
+  "Name of curl program to call."
+  :type 'string)
+
+(defcustom plz-curl-default-args
+  '("--silent"
+    "--compressed"
+    "--location")
+  "Default arguments to curl.
+Note that these arguments are passed on the command line, which
+may be visible to other users on the local system."
+  :type '(repeat string))
+
+(defcustom plz-connect-timeout 5
+  "Default connection timeout in seconds.
+This limits how long the connection phase may last (the
+\"--connect-timeout\" argument to curl)."
+  :type 'number)
+
+;;;; Macros
+
+(require 'warnings)
+
+(cl-defmacro plz-debug (&rest args)
+  ;; Copied from `ement-debug' in Ement.el, which see.
+  "Display a debug warning showing the run-time value of ARGS.
+The warning automatically includes the name of the containing
+function, and it is only displayed if `warning-minimum-log-level'
+is `:debug' at expansion time (otherwise the macro expands to a
+call to `ignore' with ARGS and is eliminated by the
+byte-compiler).  When debugging, the form also returns nil so,
+e.g. it may be used in a conditional in place of nil.
+
+Each of ARGS may be a string, which is displayed as-is, or a
+symbol, the value of which is displayed prefixed by its name, or
+a Lisp form, which is displayed prefixed by its first symbol.
+
+Before the actual ARGS arguments, you can write keyword
+arguments, i.e. alternating keywords and values.  The following
+keywords are supported:
+
+  :buffer BUFFER   Name of buffer to pass to `display-warning'.
+  :level  LEVEL    Level passed to `display-warning', which see.
+                   Default is :debug."
+  ;; TODO: Can we use a compiler macro to handle this more elegantly?
+  (pcase-let* ((fn-name (when byte-compile-current-buffer
+                          (with-current-buffer byte-compile-current-buffer
+                            ;; This is a hack, but a nifty one.
+                            (save-excursion
+                              (beginning-of-defun)
+                              (cl-second (read (current-buffer)))))))
+               (plist-args (cl-loop while (keywordp (car args))
+                                    collect (pop args)
+                                    collect (pop args)))
+               ((map (:buffer buffer) (:level level)) plist-args)
+               (level (or level :debug))
+               (string (cl-loop for arg in args
+                                concat (pcase arg
+                                         ((pred stringp) "%S ")
+                                         ((pred symbolp)
+                                          (concat (upcase (symbol-name arg)) ":%S "))
+                                         ((pred listp)
+                                          (concat "(" (upcase (symbol-name (car arg)))
+                                                  (pcase (length arg)
+                                                    (1 ")")
+                                                    (_ "...)"))
+                                                  ":%S "))))))
+    (if (eq :debug warning-minimum-log-level)
+        `(let ((fn-name ,(if fn-name
+                             `',fn-name
+                           ;; In an interpreted function: use `backtrace-frame' to get the
+                           ;; function name (we have to use a little hackery to figure out
+                           ;; how far up the frame to look, but this seems to work).
+                           `(cl-loop for frame in (backtrace-frames)
+                                     for fn = (cl-second frame)
+                                     when (not (or (subrp fn)
+                                                   (special-form-p fn)
+                                                   (eq 'backtrace-frames fn)))
+                                     return (make-symbol (format "%s [interpreted]" fn))))))
+           (display-warning fn-name (format ,string ,@args) ,level ,buffer)
+           nil)
+      `(ignore ,@args))))
+
+;;;; Compatibility
+
+(defalias 'plz--generate-new-buffer
+  (if (version< emacs-version "28.1")
+      (lambda (name &optional _inhibit-buffer-hooks)
+        "Call `generate-new-buffer' with NAME.
+Compatibility function for Emacs versions <28.1."
+        (generate-new-buffer name))
+    #'generate-new-buffer))
+
+;;;; Functions
+
+;;;;; Public
+
+(cl-defun plz (method url &rest rest &key headers body else filter finally noquery timeout
+                      (as 'string) (then 'sync)
+                      (body-type 'text) (decode t decode-s)
+                      (connect-timeout plz-connect-timeout))
+  "Request METHOD from URL with curl.
+Return the curl process object or, for a synchronous request, the
+selected result.
+
+HEADERS may be an alist of extra headers to send with the
+request.
+
+BODY may be a string, a buffer, or a list like `(file FILENAME)'
+to upload a file from disk.
+
+BODY-TYPE may be `text' to send BODY as text, or `binary' to send
+it as binary.
+
+AS selects the kind of result to pass to the callback function
+THEN, or the kind of result to return for synchronous requests.
+It may be:
+
+- `buffer' to pass the response buffer, which will be narrowed to
+  the response body and decoded according to DECODE.
+
+- `binary' to pass the response body as an un-decoded string.
+
+- `string' to pass the response body as a decoded string.
+
+- `response' to pass a `plz-response' structure.
+
+- `file' to pass a temporary filename to which the response body
+  has been saved without decoding.
+
+- `(file FILENAME)' to pass FILENAME after having saved the
+  response body to it without decoding.  FILENAME must be a
+  non-existent file; if it exists, it will not be overwritten,
+  and an error will be signaled.  FILENAME is passed through
+  `expand-file-name', which see.
+
+- A function, which is called in the response buffer with it
+  narrowed to the response body (suitable for, e.g. `json-read').
+
+If DECODE is non-nil, the response body is decoded automatically.
+For binary content, it should be nil.  When AS is `binary',
+DECODE is automatically set to nil.
+
+THEN is a callback function, whose sole argument is selected
+above with AS; if the request fails and no ELSE function is
+given (see below), the argument will be a `plz-error' structure
+describing the error.  Or THEN may be `sync' to make a
+synchronous request, in which case the result is returned
+directly from this function.
+
+ELSE is an optional callback function called when the request
+fails (i.e. if curl fails, or if the HTTP response has a non-2xx
+status code).  It is called with one argument, a `plz-error'
+structure.  If ELSE is nil, a `plz-curl-error' or
+`plz-http-error' is signaled when the request fails, with a
+`plz-error' structure as the error data.  For synchronous
+requests, this argument is ignored.
+
+NOTE: In a future version of `plz', only one error will be
+signaled: `plz-error'.  The existing errors, `plz-curl-error' and
+`plz-http-error', inherit from `plz-error' to allow applications
+to update their code while using earlier versions (i.e. any
+`condition-case' forms should now handle only `plz-error', not
+the other two).
+
+FINALLY is an optional function called without argument after
+THEN or ELSE, as appropriate.  For synchronous requests, this
+argument is ignored.
+
+CONNECT-TIMEOUT and TIMEOUT are a number of seconds that limit
+how long it takes to connect to a host and to receive a complete
+response from a host, respectively.
+
+NOQUERY is passed to `make-process', which see.
+
+FILTER is an optional function to be used as the process filter
+for the curl process.  It can be used to handle HTTP responses in
+a streaming way.  The function must accept 2 arguments, the
+process object running curl, and a string which is output
+received from the process.  The default process filter inserts
+the output of the process into the process buffer.  The provided
+FILTER function should at least insert output up to the HTTP body
+into the process buffer.
+
+\(To silence checkdoc, we mention the internal argument REST.)"
+  ;; FIXME(v0.10): Remove the note about error changes from the docstring.
+  ;; FIXME(v0.10): Update error signals in docstring.
+  (declare (indent defun))
+  (setf decode (if (and decode-s (not decode))
+                   nil decode))
+  ;; NOTE: By default, for PUT requests and POST requests >1KB, curl sends an
+  ;; "Expect:" header, which causes servers to send a "100 Continue" response, which
+  ;; we don't want to have to deal with, so we disable it by setting the header to
+  ;; the empty string.  See <https://gms.tf/when-curl-sends-100-continue.html>.
+  ;; TODO: Handle "100 Continue" responses and remove this workaround.
+  (push (cons "Expect" "") headers)
+  (let* (filename
+         (data-arg (pcase-exhaustive body-type
+                     ('binary "--data-binary")
+                     ('text "--data")))
+         (curl-command-line-args (append plz-curl-default-args
+                                         (list "--config" "-")))
+         (curl-config-header-args (cl-loop for (key . value) in headers
+                                           collect (cons "--header" (format "%s: %s" key value))))
+         (curl-config-args (append curl-config-header-args
+                                   (list (cons "--url" url))
+                                   (when connect-timeout
+                                     (list (cons "--connect-timeout"
+                                                 (number-to-string connect-timeout))))
+                                   (when timeout
+                                     (list (cons "--max-time" (number-to-string timeout))))
+                                   ;; NOTE: To make a HEAD request
+                                   ;; requires using the "--head"
+                                   ;; option rather than "--request
+                                   ;; HEAD", and doing so with
+                                   ;; "--dump-header" duplicates the
+                                   ;; headers, so we must instead
+                                   ;; specify that for each other
+                                   ;; method.
+                                   (pcase method
+                                     ('get
+                                      (append (list (cons "--dump-header" "-"))
+                                              (pcase as
+                                                ('file
+                                                 (setf filename (make-temp-file "plz-"))
+                                                 (list (cons "--output" filename)))
+                                                (`(file ,(and (pred stringp) as-filename))
+                                                 (when (file-exists-p as-filename)
+                                                   (error "File exists, will not overwrite: %S" as-filename))
+                                                 ;; Use `expand-file-name' because curl doesn't
+                                                 ;; expand, e.g. "~" into "/home/...".
+                                                 (setf filename (expand-file-name as-filename))
+                                                 (list (cons "--output" filename))))))
+                                     ((or 'put 'post)
+                                      (append (list (cons "--dump-header" "-")
+                                                    (cons "--request" (upcase (symbol-name method))))
+                                              (pcase as
+                                                ('file
+                                                 (setf filename (make-temp-file "plz-"))
+                                                 (list (cons "--output" filename)))
+                                                (`(file ,(and (pred stringp) as-filename))
+                                                 (when (file-exists-p as-filename)
+                                                   (error "File exists, will not overwrite: %S" as-filename))
+                                                 ;; Use `expand-file-name' because curl doesn't
+                                                 ;; expand, e.g. "~" into "/home/...".
+                                                 (setf filename (expand-file-name as-filename))
+                                                 (list (cons "--output" filename))))
+                                              (list
+                                               ;; It appears that this must be the last argument
+                                               ;; in order to pass data on the rest of STDIN.
+                                               (pcase body
+                                                 (`(file ,filename)
+                                                  ;; Use `expand-file-name' because curl doesn't
+                                                  ;; expand, e.g. "~" into "/home/...".
+                                                  (cons "--upload-file" (expand-file-name filename)))
+                                                 (_ (cons data-arg "@-"))))))
+                                     ('delete
+                                      (append (list (cons "--dump-header" "-")
+                                                    (cons "--request" (upcase (symbol-name method))))
+                                              (pcase as
+                                                ('file
+                                                 (setf filename (make-temp-file "plz-"))
+                                                 (list (cons "--output" filename)))
+                                                (`(file ,(and (pred stringp) as-filename))
+                                                 (when (file-exists-p as-filename)
+                                                   (error "File exists, will not overwrite: %S" as-filename))
+                                                 ;; Use `expand-file-name' because curl doesn't
+                                                 ;; expand, e.g. "~" into "/home/...".
+                                                 (setf filename (expand-file-name as-filename))
+                                                 (list (cons "--output" filename))))))
+                                     ('head
+                                      (list (cons "--head" "")
+                                            (cons "--request" "HEAD"))))))
+         (curl-config (cl-loop for (key . value) in curl-config-args
+                               concat (format "%s \"%s\"\n" key value)))
+         (decode (pcase as
+                   ('binary nil)
+                   (_ decode)))
+         (default-directory
+          ;; Avoid making process in a nonexistent directory (in case the current
+          ;; default-directory has since been removed).  It's unclear what the best
+          ;; directory is, but this seems to make sense, and it should still exist.
+          temporary-file-directory)
+         (process-buffer (plz--generate-new-buffer " *plz-request-curl*" t))
+         (stderr-process (make-pipe-process :name "plz-request-curl-stderr"
+                                            :buffer (plz--generate-new-buffer " *plz-request-curl-stderr*" t)
+                                            :noquery t
+                                            :sentinel #'plz--stderr-sentinel))
+         (process (make-process :name "plz-request-curl"
+                                :buffer process-buffer
+                                :coding 'binary
+                                :command (append (list plz-curl-program) curl-command-line-args)
+                                :connection-type 'pipe
+                                :filter filter
+                                :sentinel #'plz--sentinel
+                                :stderr stderr-process
+                                :noquery noquery))
+         sync-p)
+    (when (eq 'sync then)
+      (setf sync-p t
+            then (lambda (result)
+                   (process-put process :plz-result result))
+            else nil))
+    (setf
+     ;; Set the callbacks, etc. as process properties.
+     (process-get process :plz-then)
+     (pcase-exhaustive as
+       ((or 'binary 'string)
+        (lambda ()
+          (let ((coding-system (or (plz--coding-system) 'utf-8)))
+            (pcase as
+              ('binary (set-buffer-multibyte nil)))
+            (plz--narrow-to-body)
+            (when decode
+              (decode-coding-region (point) (point-max) coding-system))
+            (funcall then (or (buffer-string)
+                              (make-plz-error :message (format "buffer-string is nil in buffer:%S" process-buffer)))))))
+       ('buffer (progn
+                  (setf (process-get process :plz-as) 'buffer)
+                  (lambda ()
+                    (let ((coding-system (or (plz--coding-system) 'utf-8)))
+                      (pcase as
+                        ('binary (set-buffer-multibyte nil)))
+                      (plz--narrow-to-body)
+                      (when decode
+                        (decode-coding-region (point) (point-max) coding-system)))
+                    (funcall then (current-buffer)))))
+       ('response (lambda ()
+                    (funcall then (or (plz--response :decode-p decode)
+                                      (make-plz-error :message (format "response is nil for buffer:%S  buffer-string:%S"
+                                                                       process-buffer (buffer-string)))))))
+       ('file (lambda ()
+                (funcall then filename)))
+       (`(file ,(and (pred stringp) filename))
+        ;; This requires a separate clause due to the FILENAME binding.
+        (lambda ()
+          (funcall then filename)))
+       ((pred functionp) (lambda ()
+                           (let ((coding-system (or (plz--coding-system) 'utf-8)))
+                             (plz--narrow-to-body)
+                             (when decode
+                               (decode-coding-region (point) (point-max) coding-system))
+                             (funcall then (funcall as))))))
+     (process-get process :plz-else) else
+     (process-get process :plz-finally) finally
+     (process-get process :plz-sync) sync-p
+     ;; Record list of arguments for debugging purposes (e.g. when
+     ;; using Edebug in a process buffer, this allows determining
+     ;; which request the buffer is for).
+     (process-get process :plz-args) (apply #'list method url rest)
+     ;; HACK: We set the result to a sentinel value so that any other
+     ;; value, even nil, means that the response was processed, and
+     ;; the sentinel does not need to be called again (see below).
+     (process-get process :plz-result) :plz-result)
+    ;; Send --config arguments.
+    (process-send-string process curl-config)
+    (when body
+      (cl-typecase body
+        (string (process-send-string process body))
+        (buffer (with-current-buffer body
+                  (process-send-region process (point-min) (point-max))))))
+    (process-send-eof process)
+    (if sync-p
+        (unwind-protect
+            (with-local-quit
+              ;; See Info node `(elisp)Accepting Output'.
+              (unless (and process stderr-process)
+                (error "Process unexpectedly nil"))
+              (while (accept-process-output process))
+              (while (accept-process-output stderr-process))
+              (plz-debug (float-time) "BEFORE HACK" (process-buffer process))
+              (when (eq :plz-result (process-get process :plz-result))
+                (plz-debug (float-time) "INSIDE HACK" (process-buffer process))
+                ;; HACK: Sentinel seems to not have been called: call it again.  (Although
+                ;; this is a hack, it seems to be a necessary one due to Emacs's process
+                ;; handling.)  See <https://github.com/alphapapa/plz.el/issues/3> and
+                ;; <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=50166>.
+                (plz--sentinel process "workaround")
+                (plz-debug (float-time) "INSIDE HACK, AFTER CALLING SENTINEL" (process-buffer process))
+                (when (eq :plz-result (process-get process :plz-result))
+                  (error "Plz: NO RESULT FROM PROCESS:%S  ARGS:%S"
+                         process rest)))
+              (plz-debug (float-time) "AFTER HACK" (process-buffer process))
+              ;; Sentinel seems to have been called: check the result.
+              (pcase (process-get process :plz-result)
+                ((and (pred plz-error-p) data)
+                 ;; The AS function signaled an error, which was collected
+                 ;; into a `plz-error' struct: re-signal the error here,
+                 ;; outside of the sentinel.
+                 (if (plz-error-response data)
+                     ;; FIXME(v0.10): Signal only plz-error.
+                     (signal 'plz-http-error (list "HTTP error" data))
+                   (signal 'plz-curl-error (list "Curl error" data))))
+                (else
+                 ;; The AS function returned a value: return it.
+                 else)))
+          (unless (eq as 'buffer)
+            (plz--kill-buffer process-buffer))
+          (plz--kill-buffer (process-buffer stderr-process)))
+      ;; Async request: return the process object.
+      process)))
+
+;;;;; Queue
+
+;; A simple queue system.
+
+(cl-defstruct plz-queued-request
+  "Structure representing a queued `plz' HTTP request.
+For more details on these slots, see arguments to the function
+`plz'."
+  method url headers body else finally noquery
+  as then body-type decode
+  connect-timeout timeout
+  next previous process)
+
+(cl-defstruct plz-queue
+  "Structure forming a queue for `plz' requests.
+The queue may be appended to (the default) and pre-pended to, and
+items may be removed from the front of the queue (i.e. by
+default, it's FIFO).  Use functions `plz-queue', `plz-run', and
+`plz-clear' to queue, run, and clear requests, respectively."
+  (limit 1
+         :documentation "Number of simultaneous requests.")
+  (active nil
+          :documentation "Active requests.")
+  (requests nil
+            :documentation "Queued requests.")
+  (canceled-p nil
+              :documentation "Non-nil when queue has been canceled.")
+  first-active last-active
+  first-request last-request
+  (finally nil
+           :documentation "Function called with no arguments after queue has been emptied or canceled."))
+
+(defun plz-queue (queue &rest args)
+  "Queue request for ARGS on QUEUE and return QUEUE.
+To pre-pend to QUEUE rather than append, it may be a list of the
+form (`prepend' QUEUE).  QUEUE is a `plz-request' queue.  ARGS
+are those passed to `plz', which see.  Use `plz-run' to start
+making QUEUE's requests."
+  (declare (indent defun))
+  (cl-assert (not (equal 'sync (plist-get (cddr args) :then))) nil
+             "Only async requests may be queued")
+  (pcase-let* ((`(,method ,url . ,rest) args)
+               (args `(:method ,method :url ,url ,@rest))
+               (request (apply #'make-plz-queued-request args)))
+    (pcase queue
+      (`(prepend ,queue) (plz--queue-prepend request queue))
+      (_ (plz--queue-append request queue))))
+  queue)
+
+(defun plz--queue-append (request queue)
+  "Add REQUEST to end of QUEUE and return QUEUE."
+  (cl-check-type request plz-queued-request
+                 "REQUEST must be a `plz-queued-request' structure.")
+  (cl-check-type queue plz-queue
+                 "QUEUE must be a `plz-queue' structure.")
+  (when (plz-queue-last-request queue)
+    (setf (plz-queued-request-next (plz-queue-last-request queue)) request))
+  (setf (plz-queued-request-previous request) (plz-queue-last-request queue)
+        (plz-queue-last-request queue) request)
+  (unless (plz-queue-first-request queue)
+    (setf (plz-queue-first-request queue) request))
+  (unless (plz-queue-last-request queue)
+    (setf (plz-queue-last-request queue) request))
+  (push request (plz-queue-requests queue))
+  queue)
+
+(defun plz--queue-prepend (request queue)
+  "Add REQUEST to front of QUEUE and return QUEUE."
+  (cl-check-type request plz-queued-request
+                 "REQUEST must be a `plz-queued-request' structure.")
+  (cl-check-type queue plz-queue
+                 "QUEUE must be a `plz-queue' structure.")
+  (when (plz-queue-requests queue)
+    (setf (plz-queued-request-next request) (car (plz-queue-requests queue))
+          (plz-queued-request-previous (plz-queued-request-next request)) request))
+  (setf (plz-queue-first-request queue) request)
+  (unless (plz-queue-first-request queue)
+    (setf (plz-queue-first-request queue) request))
+  (unless (plz-queue-last-request queue)
+    (setf (plz-queue-last-request queue) request))
+  (push request (plz-queue-requests queue))
+  queue)
+
+(defun plz--queue-pop (queue)
+  "Return the first queued request on QUEUE and remove it from QUEUE."
+  (let* ((request (plz-queue-first-request queue))
+         (next (plz-queued-request-next request)))
+    (when next
+      (setf (plz-queued-request-previous next) nil))
+    (setf (plz-queue-first-request queue) next
+          (plz-queue-requests queue) (delq request (plz-queue-requests queue)))
+    (when (eq request (plz-queue-last-request queue))
+      (setf (plz-queue-last-request queue) nil))
+    request))
+
+(defun plz-run (queue)
+  "Process requests in QUEUE and return QUEUE.
+Return when QUEUE is at limit or has no more queued requests.
+
+QUEUE should be a `plz-queue' structure."
+  (cl-labels ((readyp (queue)
+                (and (not (plz-queue-canceled-p queue))
+                     (plz-queue-requests queue)
+                     ;; With apologies to skeeto...
+                     (< (length (plz-queue-active queue)) (plz-queue-limit queue)))))
+    (while (readyp queue)
+      (pcase-let* ((request (plz--queue-pop queue))
+                   ((cl-struct plz-queued-request method url
+                               headers body finally noquery as body-type decode connect-timeout timeout
+                               (else orig-else) (then orig-then))
+                    request)
+                   (then (lambda (response)
+                           (unwind-protect
+                               ;; Ensure any errors in the THEN function don't abort the queue.
+                               (funcall orig-then response)
+                             (setf (plz-queue-active queue) (delq request (plz-queue-active queue)))
+                             (plz-run queue))))
+                   (else (lambda (arg)
+                           ;; FIXME(v0.10): This should be done in `plz-queue' because
+                           ;; `plz-clear' will call the second queued-request's ELSE
+                           ;; before it can be set by `plz-run'.
+                           (unwind-protect
+                               ;; Ensure any errors in the THEN function don't abort the queue.
+                               (when orig-else
+                                 (funcall orig-else arg))
+                             (setf (plz-queue-active queue) (delq request (plz-queue-active queue)))
+                             (plz-run queue))))
+                   (args (list method url
+                               ;; Omit arguments for which `plz' has defaults so as not to nil them.
+                               :headers headers :body body :finally finally :noquery noquery
+                               :connect-timeout connect-timeout :timeout timeout)))
+        ;; Add arguments which override defaults.
+        (when as
+          (setf args (plist-put args :as as)))
+        (when else
+          (setf args (plist-put args :else else)))
+        (when then
+          (setf args (plist-put args :then then)))
+        (when decode
+          (setf args (plist-put args :decode decode)))
+        (when body-type
+          (setf args (plist-put args :body-type body-type)))
+        (when connect-timeout
+          (setf args (plist-put args :connect-timeout connect-timeout)))
+        (when timeout
+          (setf args (plist-put args :timeout timeout)))
+        (setf (plz-queued-request-process request) (apply #'plz args))
+        (push request (plz-queue-active queue))))
+    (when (and (plz-queue-finally queue)
+               (zerop (length (plz-queue-active queue)))
+               (zerop (length (plz-queue-requests queue))))
+      (funcall (plz-queue-finally queue)))
+    queue))
+
+(defun plz-clear (queue)
+  "Clear QUEUE and return it.
+Cancels any active or pending requests and calls the queue's
+FINALLY function.  For pending requests, their ELSE functions
+will be called with a `plz-error' structure with the message,
+\"`plz' queue cleared; request canceled.\"; active requests will
+have their curl processes killed and their ELSE functions called
+with the corresponding data."
+  (setf (plz-queue-canceled-p queue) t)
+  (dolist (request (plz-queue-active queue))
+    (when (process-live-p (plz-queued-request-process request))
+      (kill-process (plz-queued-request-process request)))
+    (setf (plz-queue-active queue) (delq request (plz-queue-active queue))))
+  (dolist (request (plz-queue-requests queue))
+    (funcall (plz-queued-request-else request)
+             (make-plz-error :message "`plz' queue cleared; request canceled."))
+    (setf (plz-queue-requests queue) (delq request (plz-queue-requests queue))))
+  (when (plz-queue-finally queue)
+    (funcall (plz-queue-finally queue)))
+  (setf (plz-queue-first-active queue) nil
+        (plz-queue-last-active queue) nil
+        (plz-queue-first-request queue) nil
+        (plz-queue-last-request queue) nil
+        (plz-queue-canceled-p queue) nil)
+  queue)
+
+(defun plz-length (queue)
+  "Return number of of QUEUE's outstanding requests.
+Includes active and queued requests."
+  (+ (length (plz-queue-active queue))
+     (length (plz-queue-requests queue))))
+
+;;;;; Private
+
+(defun plz--sentinel (process status)
+  "Sentinel for curl PROCESS.
+STATUS should be the process's event string (see info
+node `(elisp) Sentinels').  Calls `plz--respond' to process the
+HTTP response (directly for synchronous requests, or from a timer
+for asynchronous ones)."
+  (plz-debug (float-time) "BEFORE CONDITION"
+             process status (process-get process :plz-result))
+  (if (eq :plz-result (process-get process :plz-result))
+      ;; Result not yet set: check process status (we call
+      ;; `process-status' because the STATUS argument might not be
+      ;; accurate--see "hack" in `plz').
+      (if (member (process-status process) '(run stop))
+          ;; Process still alive: do nothing.
+          (plz-debug "Doing nothing because:" (process-status process))
+        ;; Process appears to be dead: check STATUS argument.
+        (pcase status
+          ((or "finished\n" "killed\n" "interrupt\n" "workaround"
+               (pred numberp)
+               (rx "exited abnormally with code " (group (1+ digit))))
+           ;; STATUS seems okay: call `plz--respond'.
+           (let ((buffer (process-buffer process)))
+             (if (process-get process :plz-sync)
+                 (plz--respond process buffer status)
+               (run-at-time 0 nil #'plz--respond process buffer status))))))
+    ;; Result already set (likely indicating that Emacs did not call
+    ;; the sentinel when `accept-process-output' was called, so we are
+    ;; either being called from our "hack", or being called a second
+    ;; time, after `plz' returned): do nothing.
+    (plz-debug (float-time) ":PLZ-RESULT ALREADY CHANGED"
+               process status (process-get process :plz-result))))
+
+(defun plz--respond (process buffer status)
+  "Respond to HTTP response from PROCESS in BUFFER.
+Parses the response and calls the THEN/ELSE callbacks
+accordingly.  To be called from `plz--sentinel'.  STATUS is the
+argument passed to `plz--sentinel', which see."
+  ;; Is it silly to call this function "please respond"?  Perhaps, but
+  ;; naming things is hard.  The term "process" has another meaning in
+  ;; this context, and the old standby, "handle," is much overused.
+  ;; "Respond" also means "to react to something," which is what this
+  ;; does--react to receiving the HTTP response--and it's an internal
+  ;; name, so why not.
+  (plz-debug (float-time) process status (process-status process) buffer)
+  (unwind-protect
+      (pcase-exhaustive (process-exit-status process)
+        (0
+         ;; Curl exited normally: check HTTP status code.
+         (with-current-buffer buffer
+           ;; NOTE: We only switch to the process's buffer if curl
+           ;; exited successfully.
+           (goto-char (point-min))
+           (plz--skip-proxy-headers)
+           (while (plz--skip-redirect-headers))
+           (pcase (plz--http-status)
+             ((and status (guard (<= 200 status 299)))
+              ;; Any 2xx response is considered successful.
+              (ignore status) ; Byte-compiling in Emacs <28 complains without this.
+              (funcall (process-get process :plz-then)))
+             (_
+              ;; TODO: If using ":as 'response", the HTTP response
+              ;; should be passed to the THEN function, regardless
+              ;; of the status code.  Only for curl errors should
+              ;; the ELSE function be called.  (Maybe in v0.10.)
+
+              ;; Any other status code is considered unsuccessful
+              ;; (for now, anyway).
+              (let ((err (make-plz-error :response (plz--response))))
+                (pcase-exhaustive (process-get process :plz-else)
+                  (`nil (process-put process :plz-result err))
+                  ((and (pred functionp) fn) (funcall fn err))))))))
+        ((and code (guard (<= 1 code 90)))
+         ;; Curl exited non-zero.
+         (let* ((curl-exit-code (cl-typecase code
+                                  (string (string-to-number code))
+                                  (number code)))
+                (curl-error-message (alist-get curl-exit-code plz-curl-errors))
+                (err (make-plz-error :curl-error (cons curl-exit-code curl-error-message))))
+           (pcase-exhaustive (process-get process :plz-else)
+             (`nil (process-put process :plz-result err))
+             ((and (pred functionp) fn) (funcall fn err)))))
+        ((and code (guard (not (<= 1 code 90))))
+         ;; If we are here, it should mean that the curl process was
+         ;; killed or interrupted, and the code should be something
+         ;; not (<= 1 code 90).
+         (let* ((message (pcase status
+                           ("killed\n" "curl process killed")
+                           ("interrupt\n" "curl process interrupted")
+                           (_ (format "Unexpected curl process status:%S code:%S.  Please report this bug to the `plz' maintainer." status code))))
+                (err (make-plz-error :message message)))
+           (pcase-exhaustive (process-get process :plz-else)
+             (`nil (process-put process :plz-result err))
+             ((and (pred functionp) fn) (funcall fn err)))))
+        (code
+         ;; If we are here, something is really wrong.
+         (let* ((message (format "Unexpected curl process status:%S code:%S.  Please report this bug to the `plz' maintainer." status code))
+                (err (make-plz-error :message message)))
+           (pcase-exhaustive (process-get process :plz-else)
+             (`nil (process-put process :plz-result err))
+             ((and (pred functionp) fn) (funcall fn err))))))
+    (when-let ((finally (process-get process :plz-finally)))
+      (funcall finally))
+    (unless (or (process-get process :plz-sync)
+                (eq 'buffer (process-get process :plz-as)))
+      (plz--kill-buffer buffer))))
+
+(defun plz--stderr-sentinel (process status)
+  "Sentinel for STDERR buffer.
+Arguments are PROCESS and STATUS (ok, checkdoc?)."
+  (pcase status
+    ((or "finished\n" "killed\n" "interrupt\n"
+         (pred numberp)
+         (rx "exited abnormally with code " (1+ digit)))
+     (plz--kill-buffer (process-buffer process)))))
+
+(defun plz--kill-buffer (&optional buffer)
+  "Kill BUFFER unconditionally, without asking for confirmation.
+Binds `kill-buffer-query-functions' to nil."
+  ;; TODO(emacs-28): Remove this workaround when requiring Emacs 28+.
+  (let (kill-buffer-query-functions)
+    (kill-buffer buffer)))
+
+;;;;;; HTTP Responses
+
+;; Functions for parsing HTTP responses.
+
+(defun plz--skip-proxy-headers ()
+  "Skip proxy headers in current buffer."
+  (when (looking-at plz-http-response-status-line-regexp)
+    (let* ((status-code (string-to-number (match-string 2)))
+           (reason-phrase (match-string 3)))
+      (when (and (equal 200 status-code)
+                 (equal "Connection established" reason-phrase))
+        ;; Skip proxy headers (curl apparently offers no way to omit
+        ;; them).
+        (unless (re-search-forward "\r\n\r\n" nil t)
+          (signal 'plz-http-error '("plz--response: End of proxy headers not found")))))))
+
+(defun plz--skip-redirect-headers ()
+  "Skip HTTP redirect headers in current buffer."
+  (when (and (looking-at plz-http-response-status-line-regexp)
+             (member (string-to-number (match-string 2)) '(301 302 303 307 308)))
+    ;; Skip redirect headers ("--dump-header" forces redirect headers to be included
+    ;; even when used with "--location").
+    (or (re-search-forward "\r\n\r\n" nil t)
+        (signal 'plz-http-error '("plz--response: End of redirect headers not found")))))
+
+(cl-defun plz--response (&key (decode-p t))
+  "Return response structure for HTTP response in current buffer.
+When DECODE-P is non-nil, decode the response body automatically
+according to the apparent coding system.
+
+Assumes that point is at beginning of HTTP response."
+  (save-excursion
+    ;; Parse HTTP version and status code.
+    (unless (looking-at plz-http-response-status-line-regexp)
+      (signal 'plz-http-error
+              (list "plz--response: Unable to parse HTTP response status line"
+                    (buffer-substring (point) (line-end-position)))))
+    (let* ((http-version (string-to-number (match-string 1)))
+           (status-code (string-to-number (match-string 2)))
+           (headers (plz--headers))
+           (coding-system (or (plz--coding-system headers) 'utf-8)))
+      (plz--narrow-to-body)
+      (when decode-p
+        (decode-coding-region (point) (point-max) coding-system))
+      (make-plz-response
+       :version http-version
+       :status status-code
+       :headers headers
+       :body (buffer-string)))))
+
+(defun plz--coding-system (&optional headers)
+  "Return coding system for HTTP response in current buffer.
+HEADERS may optionally be an alist of parsed HTTP headers to
+refer to rather than the current buffer's un-parsed headers."
+  (let* ((headers (or headers (plz--headers)))
+         (content-type (alist-get 'content-type headers)))
+    (when content-type
+      (coding-system-from-name content-type))))
+
+(defun plz--http-status ()
+  "Return HTTP status code for HTTP response in current buffer.
+Assumes point is at start of HTTP response."
+  (when (looking-at plz-http-response-status-line-regexp)
+    (string-to-number (match-string 2))))
+
+(defun plz--headers ()
+  "Return headers alist for HTTP response in current buffer.
+Assumes point is at start of HTTP response."
+  (save-excursion
+    (forward-line 1)
+    (let ((limit (save-excursion
+                   (re-search-forward plz-http-end-of-headers-regexp nil)
+                   (point))))
+      (cl-loop while (re-search-forward (rx bol (group (1+ (not (in ":")))) ":" (1+ blank)
+                                            (group (1+ (not (in "\r\n")))))
+                                        limit t)
+               ;; NOTE: Some HTTP servers send all-lowercase header keys, which means an alist
+               ;; lookup with `equal' or `string=' fails when the case differs.  We don't want
+               ;; users to have to worry about this, so for consistency, we downcase the
+               ;; header name.  And while we're at it, we might as well intern it so we can
+               ;; use `alist-get' without having to add "nil nil #'equal" every time.
+               collect (cons (intern (downcase (match-string 1))) (match-string 2))))))
+
+(defun plz--narrow-to-body ()
+  "Narrow to body of HTTP response in current buffer.
+Assumes point is at start of HTTP response."
+  (unless (re-search-forward plz-http-end-of-headers-regexp nil t)
+    (signal 'plz-http-error '("plz--narrow-to-body: Unable to find end of headers")))
+  (narrow-to-region (point) (point-max)))
+
+;;;; Footer
+
+(provide 'plz)
+
+;;; plz.el ends here
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/plz.elc b/emacs/.emacs.d/elpa/plz-0.9.1/plz.elc
new file mode 100644
index 0000000..9146fb5
Binary files /dev/null and b/emacs/.emacs.d/elpa/plz-0.9.1/plz.elc differ
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/plz.info b/emacs/.emacs.d/elpa/plz-0.9.1/plz.info
new file mode 100644
index 0000000..7d0e7e2
--- /dev/null
+++ b/emacs/.emacs.d/elpa/plz-0.9.1/plz.info
@@ -0,0 +1,715 @@
+This is docj5aN1E.info, produced by makeinfo version 6.8 from plz.texi.
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Plz: (plz).           HTTP library using Curl as a backend.
+END-INFO-DIR-ENTRY
+
+
+File: docj5aN1E.info,  Node: Top,  Next: Installation,  Up: (dir)
+
+plz.el
+******
+
+file:http://elpa.gnu.org/packages/plz.svg
+(http://elpa.gnu.org/packages/plz.html)
+
+   ‘plz’ is an HTTP library for Emacs.  It uses ‘curl’ as a backend,
+which avoids some of the issues with using Emacs’s built-in ‘url’
+library.  It supports both synchronous and asynchronous requests.  Its
+API is intended to be simple, natural, and expressive.  Its code is
+intended to be simple and well-organized.  Every feature is tested
+against httpbin (https://httpbin.org/).
+
+* Menu:
+
+* Installation::
+* Usage::
+* Changelog::
+* Credits::
+* Development::
+* License::
+
+— The Detailed Node Listing —
+
+Installation
+
+* GNU ELPA::
+* Manual::
+
+Usage
+
+* Examples::
+* Functions::
+* Queueing::
+* Tips::
+
+Changelog
+
+* 0.9.1: 091.
+* 0.9: 09.
+* 0.8: 08.
+* 0.7.3: 073.
+* 0.7.2: 072.
+* 0.7.1: 071.
+* 0.7: 07.
+* 0.6: 06.
+* 0.5.4: 054.
+* 0.5.3: 053.
+* 0.5.2: 052.
+* 0.5.1: 051.
+* 0.5: 05.
+* 0.4: 04.
+* 0.3: 03.
+* 0.2.1: 021.
+* 0.2: 02.
+* 0.1: 01.
+
+Development
+
+* Copyright assignment::
+
+
+
+File: docj5aN1E.info,  Node: Installation,  Next: Usage,  Prev: Top,  Up: Top
+
+1 Installation
+**************
+
+* Menu:
+
+* GNU ELPA::
+* Manual::
+
+
+File: docj5aN1E.info,  Node: GNU ELPA,  Next: Manual,  Up: Installation
+
+1.1 GNU ELPA
+============
+
+‘plz’ is available in GNU ELPA (http://elpa.gnu.org/packages/plz.html).
+It may be installed in Emacs using the ‘package-install’ command.
+
+
+File: docj5aN1E.info,  Node: Manual,  Prev: GNU ELPA,  Up: Installation
+
+1.2 Manual
+==========
+
+‘plz’ has no dependencies other than Emacs and ‘curl’.  It’s known to
+work on Emacs 26.3 or later.  To install it manually, simply place
+‘plz.el’ in your ‘load-path’ and ‘(require 'plz)’.
+
+
+File: docj5aN1E.info,  Node: Usage,  Next: Changelog,  Prev: Installation,  Up: Top
+
+2 Usage
+*******
+
+The main public function is ‘plz’, which sends an HTTP request and
+returns either the result of the specified type (for a synchronous
+request), or the ‘curl’ process object (for asynchronous requests).  For
+asynchronous requests, callback, error-handling, and finalizer functions
+may be specified, as well as various other options.
+
+* Menu:
+
+* Examples::
+* Functions::
+* Queueing::
+* Tips::
+
+
+File: docj5aN1E.info,  Node: Examples,  Next: Functions,  Up: Usage
+
+2.1 Examples
+============
+
+Synchronously ‘GET’ a URL and return the response body as a decoded
+string (here, raw JSON):
+
+     (plz 'get "https://httpbin.org/user-agent")
+
+     "{\n \"user-agent\": \"curl/7.35.0\"\n}\n"
+
+   Synchronously ‘GET’ a URL that returns a JSON object, and parse and
+return it as an alist:
+
+     (plz 'get "https://httpbin.org/get" :as #'json-read)
+
+     ((args)
+      (headers
+       (Accept . "*/*")
+       (Accept-Encoding . "deflate, gzip")
+       (Host . "httpbin.org")
+       (User-Agent . "curl/7.35.0"))
+      (url . "https://httpbin.org/get"))
+
+   Asynchronously ‘POST’ a JSON object in the request body, then parse a
+JSON object from the response body, and call a function with the result:
+
+     (plz 'post "https://httpbin.org/post"
+       :headers '(("Content-Type" . "application/json"))
+       :body (json-encode '(("key" . "value")))
+       :as #'json-read
+       :then (lambda (alist)
+               (message "Result: %s" (alist-get 'data alist))))
+
+     Result: {"key":"value"}
+
+   Synchronously download a JPEG file, then create an Emacs image object
+from the data:
+
+     (let ((jpeg-data (plz 'get "https://httpbin.org/image/jpeg" :as 'binary)))
+       (create-image jpeg-data nil 'data))
+
+     (image :type jpeg :data ""ÿØÿà^@^PJFIF...")
+
+
+File: docj5aN1E.info,  Node: Functions,  Next: Queueing,  Prev: Examples,  Up: Usage
+
+2.2 Functions
+=============
+
+‘plz’
+     _(method url &key headers body else finally noquery (as ’string)
+     (then ’sync) (body-type ’text) (decode t decode-s) (connect-timeout
+     plz-connect-timeout) (timeout plz-timeout))_
+
+     Request ‘METHOD’ from ‘URL’ with curl.  Return the curl process
+     object or, for a synchronous request, the selected result.
+
+     ‘HEADERS’ may be an alist of extra headers to send with the
+     request.
+
+     ‘BODY’ may be a string, a buffer, or a list like ‘(file FILENAME)’
+     to upload a file from disk.
+
+     ‘BODY-TYPE’ may be ‘text’ to send ‘BODY’ as text, or ‘binary’ to
+     send it as binary.
+
+     ‘AS’ selects the kind of result to pass to the callback function
+     ‘THEN’, or the kind of result to return for synchronous requests.
+     It may be:
+
+        • ‘buffer’ to pass the response buffer, which will be narrowed
+          to the response body and decoded according to ‘DECODE’.
+        • ‘binary’ to pass the response body as an un-decoded string.
+        • ‘string’ to pass the response body as a decoded string.
+        • ‘response’ to pass a ‘plz-response’ structure.
+        • ‘file’ to pass a temporary filename to which the response body
+          has been saved without decoding.
+        • ‘(file ~FILENAME)’ to pass ‘FILENAME’ after having saved the
+          response body to it without decoding.  ‘FILENAME’ must be a
+          non-existent file; if it exists, it will not be overwritten,
+          and an error will be signaled.  ‘FILENAME’ is passed through
+          ‘expand-file-name’, which see.
+        • A function, which is called in the response buffer with it
+          narrowed to the response body (suitable for, e.g.
+          ‘json-read’).
+
+     If ‘DECODE’ is non-nil, the response body is decoded automatically.
+     For binary content, it should be nil.  When ‘AS’ is ‘binary’,
+     ‘DECODE’ is automatically set to nil.
+
+     ‘THEN’ is a callback function, whose sole argument is selected
+     above with ‘AS’; if the request fails and no ‘ELSE’ function is
+     given (see below), the argument will be a ‘plz-error’ structure
+     describing the error.  Or ‘THEN’ may be ‘sync’ to make a
+     synchronous request, in which case the result is returned directly
+     from this function.
+
+     ‘ELSE’ is an optional callback function called when the request
+     fails (i.e.  if curl fails, or if the ‘HTTP’ response has a non-2xx
+     status code).  It is called with one argument, a ‘plz-error’
+     structure.  If ‘ELSE’ is nil, a ‘plz-curl-error’ or
+     ‘plz-http-error’ is signaled when the request fails, with a
+     ‘plz-error’ structure as the error data.  For synchronous requests,
+     this argument is ignored.
+
+     ‘NOTE’: In v0.8 of ‘plz’, only one error will be signaled:
+     ‘plz-error’.  The existing errors, ‘plz-curl-error’ and
+     ‘plz-http-error’, inherit from ‘plz-error’ to allow applications to
+     update their code while using v0.7 (i.e.  any ‘condition-case’
+     forms should now handle only ‘plz-error’, not the other two).
+
+     ‘FINALLY’ is an optional function called without argument after
+     ‘THEN’ or ‘ELSE’, as appropriate.  For synchronous requests, this
+     argument is ignored.
+
+     ‘CONNECT-TIMEOUT’ and ‘TIMEOUT’ are a number of seconds that limit
+     how long it takes to connect to a host and to receive a response
+     from a host, respectively.
+
+     ‘NOQUERY’ is passed to ‘make-process’, which see.
+
+     ‘FILTER’ is an optional function to be used as the process filter
+     for the curl process.  It can be used to handle HTTP responses in a
+     streaming way.  The function must accept 2 arguments, the process
+     object running curl, and a string which is output received from the
+     process.  The default process filter inserts the output of the
+     process into the process buffer.  The provided ‘FILTER’ function
+     should at least insert output up to the HTTP body into the process
+     buffer.
+
+
+File: docj5aN1E.info,  Node: Queueing,  Next: Tips,  Prev: Functions,  Up: Usage
+
+2.3 Queueing
+============
+
+‘plz’ provides a simple system for queueing HTTP requests.  First, make
+a ‘plz-queue’ struct by calling ‘make-plz-queue’.  Then call ‘plz-queue’
+with the struct as the first argument, and the rest of the arguments
+being the same as those passed to ‘plz’.  Then call ‘plz-run’ to run the
+queued requests.
+
+   All of the queue-related functions return the queue as their value,
+making them easy to use.  For example:
+
+     (defvar my-queue (make-plz-queue :limit 2))
+
+     (plz-run
+      (plz-queue my-queue
+        'get "https://httpbin.org/get?foo=0"
+        :then (lambda (body) (message "%s" body))))
+
+   Or:
+
+     (let ((queue (make-plz-queue :limit 2
+                                  :finally (lambda ()
+                                             (message "Queue empty."))))
+           (urls '("https://httpbin.org/get?foo=0"
+                   "https://httpbin.org/get?foo=1")))
+       (plz-run
+        (dolist (url urls queue)
+          (plz-queue queue 'get url
+            :then (lambda (body) (message "%s" body))))))
+
+   You may also clear a queue with ‘plz-clear’, which cancels any active
+or queued requests and calls their ‘:else’ functions.  And ‘plz-length’
+returns the number of a queue’s active and queued requests.
+
+
+File: docj5aN1E.info,  Node: Tips,  Prev: Queueing,  Up: Usage
+
+2.4 Tips
+========
+
+   • You can customize settings in the ‘plz’ group, but this can only be
+     used to adjust a few defaults.  It’s not intended that changing or
+     binding global variables be necessary for normal operation.
+
+
+File: docj5aN1E.info,  Node: Changelog,  Next: Credits,  Prev: Usage,  Up: Top
+
+3 Changelog
+***********
+
+* Menu:
+
+* 0.9.1: 091.
+* 0.9: 09.
+* 0.8: 08.
+* 0.7.3: 073.
+* 0.7.2: 072.
+* 0.7.1: 071.
+* 0.7: 07.
+* 0.6: 06.
+* 0.5.4: 054.
+* 0.5.3: 053.
+* 0.5.2: 052.
+* 0.5.1: 051.
+* 0.5: 05.
+* 0.4: 04.
+* 0.3: 03.
+* 0.2.1: 021.
+* 0.2: 02.
+* 0.1: 01.
+
+
+File: docj5aN1E.info,  Node: 091,  Next: 09,  Up: Changelog
+
+3.1 0.9.1
+=========
+
+*Fixes*
+
+   • Expand filenames when downloading to files (which was already
+     applied to filenames passed for uploading).  (Thanks to Joseph
+     Turner (https://github.com/josephmturner).)
+
+
+File: docj5aN1E.info,  Node: 09,  Next: 08,  Prev: 091,  Up: Changelog
+
+3.2 0.9
+=======
+
+*Compatibility*
+
+   • The minimum supported Emacs version is now 27.1.  (It is no longer
+     practical to test ‘plz’ with Emacs versions older than 27.1.  For
+     Emacs 26.3, an earlier version of ‘plz’ may be used, or this
+     version might be compatible, with or without minor changes, which
+     the maintainer cannot offer support for.)
+
+   *Changes*
+
+   • Option ‘plz-timeout’ is removed.  (It was the default value for
+     ‘plz’’s ‘:timeout’ argument, which is passed to Curl as its
+     ‘--max-time’ argument, limiting the total duration of a request
+     operation.  This argument should be unset by default, because
+     larger or slower downloads might not finish within a certain
+     duration, and it is surprising to the user to have this option set
+     by default, potentially causing requests to timeout unnecessarily.)
+   • Using arguments ‘:as 'file’ or ‘:as '(file FILENAME)’ now passes
+     the filename to Curl, allowing it to write the data to the file
+     itself (rather than receiving the data into an Emacs buffer and
+     then writing it to a file.  This improves performance when
+     downloading large files, significantly reducing Emacs’s CPU and
+     memory usage).
+
+   *Fixes*
+
+   • Improve workaround for Emacs’s process sentinel-related issues.
+     (Don’t try to process response a second time if Emacs calls the
+     sentinel after ‘plz’ has returned for a synchronous request.  See
+     #53 (https://github.com/alphapapa/plz.el/issues/53).  Thanks to
+     Joseph Turner (https://github.com/josephmturner) for extensive help
+     debugging, and to USHIN (https://ushin.org/) for sponsoring some of
+     this work.)
+   • Inhibit buffer hooks when calling ‘generate-new-buffer’ (as extra
+     protection against "kill buffer?"  prompts in case of errors).
+     (See #52 (https://github.com/alphapapa/plz.el/pull/52).  Thanks to
+     Michał Krzywkowski (https://github.com/mkcms).)
+        • Avoid "kill buffer?"  prompts in case of errors on Emacs
+          versions before 28.  (See #52
+          (https://github.com/alphapapa/plz.el/pull/52) and #57
+          (https://github.com/alphapapa/plz.el/issues/57).  Thanks to
+          Michał Krzywkowski (https://github.com/mkcms).)
+
+   *Development*
+
+   • ‘plz’ is now automatically tested against Emacs versions 27.1,
+     27.2, 28.1, 28.2, 29.1, 29.2, 29.3, and a recent snapshot of the
+     ‘master’ branch (adding 29.2 and 29.3).
+
+
+File: docj5aN1E.info,  Node: 08,  Next: 073,  Prev: 09,  Up: Changelog
+
+3.3 0.8
+=======
+
+*Additions*
+
+   • Function ‘plz’ now accepts a ‘:filter’ argument which can be used
+     to override the default process filter (e.g.  for streaming
+     responses).  (#43 (https://github.com/alphapapa/plz.el/pull/43),
+     #50 (https://github.com/alphapapa/plz.el/pull/50).  Thanks to Roman
+     Scherer (https://github.com/r0man).)
+
+
+File: docj5aN1E.info,  Node: 073,  Next: 072,  Prev: 08,  Up: Changelog
+
+3.4 0.7.3
+=========
+
+*Fixes*
+   • Info manual generation on GNU ELPA.  (Also, the Info manual is no
+     longer committed to Git.)
+
+
+File: docj5aN1E.info,  Node: 072,  Next: 071,  Prev: 073,  Up: Changelog
+
+3.5 0.7.2
+=========
+
+*Fixes*
+   • Don’t delete preexisting files when downloading to a file.  (#41
+     (https://github.com/alphapapa/plz.el/pull/41).  Thanks to Joseph
+     Turner (https://github.com/josephmturner).)
+
+
+File: docj5aN1E.info,  Node: 071,  Next: 07,  Prev: 072,  Up: Changelog
+
+3.6 0.7.1
+=========
+
+*Fixes*
+   • Handle HTTP 303 redirects.  (Thanks to Daniel Hubmann
+     (https://github.com/hubisan) for reporting.)
+
+
+File: docj5aN1E.info,  Node: 07,  Next: 06,  Prev: 071,  Up: Changelog
+
+3.7 0.7
+=======
+
+*Changes*
+   • A new error signal, ‘plz-error’, is defined.  The existing signals,
+     ‘plz-curl-error’ and ‘plz-http-error’, inherit from it, so handling
+     ‘plz-error’ catches both.
+
+     *NOTE:* The existing signals, ‘plz-curl-error’ and
+     ‘plz-http-error’, are hereby deprecated, and they will be removed
+     in v0.8.  Applications should be updated while using v0.7 to only
+     expect ‘plz-error’.
+
+   *Fixes*
+   • Significant improvement in reliability by implementing failsafes
+     and workarounds for Emacs’s process-handling code.  (See #3
+     (https://github.com/alphapapa/plz.el/issues/3).)
+   • STDERR output from curl processes is not included in response
+     bodies (which sometimes happened, depending on Emacs’s internal
+     race conditions).  (Fixes #23
+     (https://github.com/alphapapa/plz.el/issues/23).)
+   • Use ‘with-local-quit’ for synchronous requests (preventing Emacs
+     from complaining sometimes).  (Fixes #26
+     (https://github.com/alphapapa/plz.el/issues/26).)
+   • Various fixes for ‘:as 'buffer’ result type: decode body when
+     appropriate; unset multibyte for binary; narrow to body; don’t kill
+     buffer prematurely.
+   • When clearing a queue, don’t try to kill finished processes.
+
+   *Internal*
+   • Response processing now happens outside the process sentinel, so
+     any errors (e.g.  in user callbacks) are not signaled from inside
+     the sentinel.  (This avoids the 2-second pause Emacs imposes in
+     such cases.)
+   • Tests run against a local instance of httpbin
+     (https://github.com/postmanlabs/httpbin) (since the ‘httpbin.org’
+     server is often overloaded).
+   • No buffer-local variables are defined anymore; process properties
+     are used instead.
+
+
+File: docj5aN1E.info,  Node: 06,  Next: 054,  Prev: 07,  Up: Changelog
+
+3.8 0.6
+=======
+
+*Additions*
+   • Function ‘plz’’s ‘:body’ argument now accepts a list like ‘(file
+     FILENAME)’ to upload a file from disk (by passing the filename to
+     curl, rather than reading its content into Emacs and sending it to
+     curl through the pipe).
+
+   *Fixes*
+   • Function ‘plz’’s docstring now mentions that the ‘:body’ argument
+     may also be a buffer (an intentional feature that was accidentally
+     undocumented).
+   • Handle HTTP 3xx redirects when using ‘:as 'response’.
+
+
+File: docj5aN1E.info,  Node: 054,  Next: 053,  Prev: 06,  Up: Changelog
+
+3.9 0.5.4
+=========
+
+*Fixes*
+   • Only run queue’s ‘finally’ function after queue is empty.  (New
+     features should not be designed and released on a Friday.)
+
+
+File: docj5aN1E.info,  Node: 053,  Next: 052,  Prev: 054,  Up: Changelog
+
+3.10 0.5.3
+==========
+
+*Fixes*
+   • Move new slot in ‘plz-queue’ struct to end to prevent invalid
+     byte-compiler expansions for already-compiled applications (which
+     would require them to be recompiled after upgrading ‘plz’).
+
+
+File: docj5aN1E.info,  Node: 052,  Next: 051,  Prev: 053,  Up: Changelog
+
+3.11 0.5.2
+==========
+
+*Fixes*
+   • When clearing a queue, only call ‘plz-queue’’s ‘finally’ function
+     when specified.
+
+
+File: docj5aN1E.info,  Node: 051,  Next: 05,  Prev: 052,  Up: Changelog
+
+3.12 0.5.1
+==========
+
+*Fixes*
+   • Only call ‘plz-queue’’s ‘finally’ function when specified.  (Thanks
+     to Dan Oriani (https://github.com/redchops) for reporting.)
+
+
+File: docj5aN1E.info,  Node: 05,  Next: 04,  Prev: 051,  Up: Changelog
+
+3.13 0.5
+========
+
+*Additions*
+   • Struct ‘plz-queue’’s ‘finally’ slot, a function called when the
+     queue is finished.
+
+
+File: docj5aN1E.info,  Node: 04,  Next: 03,  Prev: 05,  Up: Changelog
+
+3.14 0.4
+========
+
+*Additions*
+   • Support for HTTP ‘HEAD’ requests.  (Thanks to USHIN
+     (https://ushin.org/) for sponsoring.)
+
+   *Changes*
+   • Allow sending ‘POST’ and ‘PUT’ requests without bodies.  (#16
+     (https://github.com/alphapapa/plz.el/issues/16).  Thanks to Joseph
+     Turner (https://github.com/josephmturner) for reporting.  Thanks to
+     USHIN (https://ushin.org/) for sponsoring.)
+
+   *Fixes*
+   • All 2xx HTTP status codes are considered successful.  (#17
+     (https://github.com/alphapapa/plz.el/issues/17).  Thanks to Joseph
+     Turner (https://github.com/josephmturner) for reporting.  Thanks to
+     USHIN (https://ushin.org/) for sponsoring.)
+   • Errors are signaled with error data correctly.
+
+   *Internal*
+   • Test suite explicitly tests with both HTTP/1.1 and HTTP/2.
+   • Test suite also tests with Emacs versions 27.2, 28.1, and 28.2.
+
+
+File: docj5aN1E.info,  Node: 03,  Next: 021,  Prev: 04,  Up: Changelog
+
+3.15 0.3
+========
+
+*Additions*
+   • Handle HTTP proxy headers from Curl.  (#2
+     (https://github.com/alphapapa/plz.el/issues/2).  Thanks to Alan
+     Third (https://github.com/alanthird) and Sawyer Zheng
+     (https://github.com/sawyerzheng) for reporting.)
+
+   *Fixes*
+   • Replaced words not in Ispell’s default dictionaries (so ‘checkdoc’
+     linting succeeds).
+
+
+File: docj5aN1E.info,  Node: 021,  Next: 02,  Prev: 03,  Up: Changelog
+
+3.16 0.2.1
+==========
+
+*Fixes*
+   • Handle when Curl process is interrupted.
+
+
+File: docj5aN1E.info,  Node: 02,  Next: 01,  Prev: 021,  Up: Changelog
+
+3.17 0.2
+========
+
+*Added*
+   • Simple request queueing.
+
+
+File: docj5aN1E.info,  Node: 01,  Prev: 02,  Up: Changelog
+
+3.18 0.1
+========
+
+Initial release.
+
+
+File: docj5aN1E.info,  Node: Credits,  Next: Development,  Prev: Changelog,  Up: Top
+
+4 Credits
+*********
+
+   • Thanks to Chris Wellons (https://github.com/skeeto), author of the
+     Elfeed (https://github.com/skeeto/elfeed) feed reader and the
+     popular blog null program (https://nullprogram.com/), for his
+     invaluable advice, review, and encouragement.
+
+
+File: docj5aN1E.info,  Node: Development,  Next: License,  Prev: Credits,  Up: Top
+
+5 Development
+*************
+
+Bug reports, feature requests, suggestions — _oh my_!
+
+   Note that ‘plz’ is a young library, and its only client so far is
+Ement.el (https://github.com/alphapapa/ement.el).  There are a variety
+of HTTP and ‘curl’ features it does not yet support, since they have not
+been needed by the author.  Patches are welcome, as long as they include
+passing tests.
+
+* Menu:
+
+* Copyright assignment::
+
+
+File: docj5aN1E.info,  Node: Copyright assignment,  Up: Development
+
+5.1 Copyright assignment
+========================
+
+This package is part of GNU Emacs (https://www.gnu.org/software/emacs/),
+being distributed in GNU ELPA (https://elpa.gnu.org/).  Contributions to
+this project must follow GNU guidelines, which means that, as with other
+parts of Emacs, patches of more than a few lines must be accompanied by
+having assigned copyright for the contribution to the FSF.  Contributors
+who wish to do so may contact emacs-devel@gnu.org <emacs-devel@gnu.org>
+to request the assignment form.
+
+
+File: docj5aN1E.info,  Node: License,  Prev: Development,  Up: Top
+
+6 License
+*********
+
+GPLv3
+
+
+
+Tag Table:
+Node: Top199
+Node: Installation1261
+Node: GNU ELPA1407
+Node: Manual1656
+Node: Usage1965
+Node: Examples2469
+Node: Functions3839
+Node: Queueing8138
+Node: Tips9524
+Node: Changelog9828
+Node: 09110170
+Node: 0910450
+Node: 0813034
+Node: 07313470
+Node: 07213679
+Node: 07113978
+Node: 0714194
+Node: 0616085
+Node: 05416699
+Node: 05316945
+Node: 05217266
+Node: 05117478
+Node: 0517735
+Node: 0417946
+Node: 0318920
+Node: 02119373
+Node: 0219527
+Node: 0119661
+Node: Credits19760
+Node: Development20129
+Node: Copyright assignment20646
+Node: License21237
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/tests/test-plz.el b/emacs/.emacs.d/elpa/plz-0.9.1/tests/test-plz.el
new file mode 100644
index 0000000..8725b9e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/plz-0.9.1/tests/test-plz.el
@@ -0,0 +1,610 @@
+;;; test-plz.el --- Tests for plz          -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019-2023  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+
+;; This file is part of GNU Emacs.
+
+;;; License:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This file implements tests for `plz'.  By default, the requests are
+;; made to "localhost", expecting an instance of httpbin
+;; <https://github.com/postmanlabs/httpbin> running on port 80; it's
+;; convenient to use the Docker image "kennethreitz/httpbin".  By
+;; changing the variable `plz-test-uri-prefix', the tests can be run
+;; against other URLs, such as <https://httpbin.org> (but that server
+;; is often overloaded, making for unreliable tests, so a local
+;; instance is preferred).
+
+;;; Code:
+
+;;;; Requirements
+
+(require 'ert)
+(require 'json)
+(require 'let-alist)
+(require 'map)
+
+(require 'plz)
+
+;;;; Variables
+
+(defvar plz-test-uri-prefix
+  ;; "https://httpbin.org"
+  "http://localhost"
+  "URI prefix for HTTP requests, without trailing slash.
+If running httpbin locally, set to \"http://localhost\".")
+
+;;;; Customization
+
+
+;;;; Commands
+
+
+;;;; Macros
+
+(cl-defun plz-test-wait (process &optional (seconds 0.1) (times 100))
+  "Wait for SECONDS seconds TIMES times for PROCESS to finish."
+  (when process
+    ;; Sometimes it seems that the process is killed, the THEN
+    ;; function called by its sentinel, and its buffer killed, all
+    ;; before this function gets called with the process argument;
+    ;; when that happens, tests that use this can fail.  Testing
+    ;; whether PROCESS is non-nil seems to fix it, but it's possible
+    ;; that something funny is going on...
+    (cl-loop for i upto times ;; 10 seconds
+             while (equal 'run (process-status process))
+             do (sleep-for seconds))))
+
+(cl-defmacro plz-deftest (name () &body docstring-keys-and-body)
+  "Like `ert-deftest', but defines tests for both HTTP/1.1 and HTTP/2.
+Also defines local function `url' which returns its argument
+appended to `plz-test-uri-prefix' (and any instance of
+\"URI-PREFIX\" in URL-PART is replaced with `plz-test-uri-prefix'
+in URL-encoded form)."
+  (declare (debug (&define [&name "test@" symbolp]
+			   sexp [&optional stringp]
+			   [&rest keywordp sexp] def-body))
+           (doc-string 3)
+           (indent 2))
+  `(progn
+     ,@(cl-loop for http-version in '("1.1" "2")
+                collect (let ((name (intern (format "%s-http%s" name http-version))))
+                          `(ert-deftest ,name ()
+                             (let ((plz-curl-default-args
+                                    ',(append plz-curl-default-args (list (format "--http%s" http-version)))))
+                               (cl-labels ((url (part)
+                                             (setf part (replace-regexp-in-string
+                                                         "URI-PREFIX" (url-hexify-string plz-test-uri-prefix)
+                                                         part t t))
+                                             (concat plz-test-uri-prefix part)))
+                                 ,@docstring-keys-and-body)))))))
+
+;;;; Functions
+
+(defmacro plz-test-get-response (response)
+  "Test parts of RESPONSE with `should'."
+  `(progn
+     (should (plz-response-p ,response))
+     (should (numberp (plz-response-version ,response)))
+     (should (eq 200 (plz-response-status ,response)))
+     (should (equal "application/json" (alist-get 'content-type (plz-response-headers ,response))))
+     (should (string-match "curl"
+                           (map-nested-elt (json-read-from-string (plz-response-body ,response))
+                                           '(headers User-Agent))))))
+
+;;;; Tests
+
+;;;;; Async
+
+(plz-deftest plz-get-string nil
+  (let* ((test-string)
+         (process (plz 'get (url "/get")
+                    :as 'string
+                    :then (lambda (string)
+                            (setf test-string string)))))
+    (plz-test-wait process)
+    (should (string-match "curl" test-string))))
+
+(plz-deftest plz-get-buffer nil
+  (let* ((result-buffer)
+         (process (plz 'get (url "/get")
+                    :as 'buffer :then (lambda (buffer)
+                                        (setf result-buffer buffer)))))
+    (unwind-protect
+        (progn
+          (plz-test-wait process)
+          (should (buffer-live-p result-buffer))
+          (with-current-buffer result-buffer
+            (should-not (looking-at-p plz-http-response-status-line-regexp))
+            (should (string-match "curl" (buffer-string)))))
+      (kill-buffer result-buffer)
+      (should-not (buffer-live-p result-buffer)))))
+
+(plz-deftest plz-get-response nil
+  (let* ((test-response)
+         (process (plz 'get (url "/get")
+                    :as 'response
+                    :then (lambda (response)
+                            (setf test-response response)))))
+    (plz-test-wait process)
+    (plz-test-get-response test-response)))
+
+(plz-deftest plz-get-json nil
+  (let* ((test-json)
+         (process (plz 'get (url "/get")
+                    :as #'json-read
+                    :then (lambda (json)
+                            (setf test-json json)))))
+    (plz-test-wait process)
+    (let-alist test-json
+      (should (string-match "curl" .headers.User-Agent)))))
+
+(plz-deftest plz-post-json-string nil
+  (let* ((json-string (json-encode (list (cons "key" "value"))))
+         (response-json)
+         (process (plz 'post (url "/post")
+                    :headers '(("Content-Type" . "application/json"))
+                    :body json-string
+                    :as #'json-read
+                    :then (lambda (json)
+                            (setf response-json json)))))
+    (plz-test-wait process)
+    (let-alist response-json
+      (should (string-match "curl" .headers.User-Agent))
+      (should (string= "value" (alist-get 'key (json-read-from-string .data)))))))
+
+(plz-deftest plz-post-jpeg-string nil
+  (let* ((jpeg-to-upload (plz 'get (url "/image/jpeg")
+                           :as 'binary :then 'sync))
+         (_ (unless jpeg-to-upload
+              (error "jpeg-to-upload is nil")))
+         (response-json)
+         (response-jpeg)
+         (process (plz 'post (url "/post")
+                    :headers '(("Content-Type" . "image/jpeg"))
+                    :body jpeg-to-upload :body-type 'binary
+                    :as #'json-read
+                    :then (lambda (json)
+                            (setf response-json json
+                                  response-jpeg
+                                  (base64-decode-string
+                                   (string-remove-prefix "data:application/octet-stream;base64,"
+                                                         (alist-get 'data json))))))))
+    (should (equal 'jpeg (image-type-from-data jpeg-to-upload)))
+    (plz-test-wait process)
+    (should response-json)
+    (should (equal 'jpeg (image-type-from-data response-jpeg)))
+    (should (equal (length jpeg-to-upload) (length response-jpeg)))
+    (should (equal jpeg-to-upload response-jpeg))))
+
+;; TODO: POST JSON buffer.
+
+(plz-deftest plz-put-json-string nil
+  (let* ((json-string (json-encode (list (cons "key" "value"))))
+         (response-json)
+         (process (plz 'put (url "/put")
+                    :headers '(("Content-Type" . "application/json"))
+                    :body json-string
+                    :as #'json-read
+                    :then (lambda (json)
+                            (setf response-json json)))))
+    (plz-test-wait process)
+    (let-alist response-json
+      (should (string-match "curl" .headers.User-Agent))
+      (should (string= "value" (alist-get 'key (json-read-from-string .data)))))))
+
+;; TODO: Put JSON buffer.
+
+;;;;; Sync
+
+(plz-deftest plz-get-string-sync nil
+  (let-alist (json-read-from-string (plz 'get (url "/get")
+                                      :as 'string :then 'sync))
+    (should (equal (url "/get") .url))))
+
+(plz-deftest plz-get-response-sync nil
+  (plz-test-get-response (plz 'get (url "/get")
+                           :as 'response :then 'sync)))
+
+(plz-deftest plz-get-json-sync nil
+  (let-alist (plz 'get (url "/get")
+               :as #'json-read :then 'sync)
+    (should (string-match "curl" .headers.User-Agent))))
+
+(plz-deftest plz-get-buffer-sync nil
+  (let ((buffer (plz 'get (url "/get")
+                  :as 'buffer :then 'sync)))
+    (unwind-protect
+        (should (buffer-live-p buffer))
+      (kill-buffer buffer))))
+
+;;;;; Headers
+
+;; These tests were added when plz--curl was changed to send headers
+;; with "--config" rather than on the command line.
+
+(plz-deftest plz-get-with-headers ()
+  (let* ((response-json)
+         (process (plz 'get (url "/get")
+                    :headers '(("X-Plz-Test-Header" . "plz-test-header-value"))
+                    :as #'json-read
+                    :then (lambda (json)
+                            (setf response-json json)))))
+    (plz-test-wait process)
+    (let-alist response-json
+      (should (equal "plz-test-header-value" .headers.X-Plz-Test-Header)))))
+
+(plz-deftest plz-post-with-headers ()
+  (let* ((alist (list (cons "key" "value")))
+         (response-json)
+         (process (plz 'post (url "/post")
+                    :headers '(("Content-Type" . "application/json")
+                               ("X-Plz-Test-Header" . "plz-test-header-value"))
+                    :body (json-encode alist)
+                    :as #'json-read
+                    :then (lambda (json)
+                            (setf response-json json)))))
+    (plz-test-wait process)
+    (let-alist response-json
+      (should (equal "plz-test-header-value" .headers.X-Plz-Test-Header))
+      (should (equal "value" (alist-get 'key (json-read-from-string .data)))))))
+
+(plz-deftest plz-get-json-with-headers-sync ()
+  (let-alist (plz 'get (url "/get")
+               :headers '(("X-Plz-Test-Header" . "plz-test-header-value"))
+               :as #'json-read :then 'sync)
+    (should (string-match "curl" .headers.User-Agent))
+    (should (equal "plz-test-header-value" .headers.X-Plz-Test-Header))))
+
+;;;;; HEAD requests
+
+;; NOTE: httpbin.org doesn't appear to support a "/head" endpoint,
+;; so we'll use "/get".
+
+(plz-deftest plz-head-without-headers ()
+  ;; I'm not sure how useful it may be to make a HEAD request without
+  ;; caring about the headers, but perhaps it could be useful as a
+  ;; lightweight way to test a server's presence, so we should
+  ;; probably support it.  This merely tests that no error is
+  ;; signaled, which should mean that the HEAD request succeeded.
+  (should (plz 'head (url "/get"))))
+
+(plz-deftest plz-head-as-response ()
+  (let ((response (plz 'head (url "/get")
+                    :as 'response)))
+    (should (equal "application/json"
+                   (alist-get 'content-type
+                              (plz-response-headers response))))))
+
+;;;;; POST requests
+
+(plz-deftest plz-post-empty-body ()
+  (should (equal ""
+                 (alist-get 'data
+                            (json-read-from-string
+                             (plz 'post (url "/post"))))))
+  (should (equal "application/json"
+                 (alist-get 'content-type
+                            (plz-response-headers
+                             (plz 'post (url "/post") :as 'response))))))
+
+;;;;; Status codes
+
+(plz-deftest plz-201-succeeds ()
+  ;; This merely tests that a 201 response does not signal an error.
+  (should (plz 'get (url "/status/201"))))
+
+(plz-deftest plz-400-errors ()
+  (should-error (plz 'get (url "/status/400"))))
+
+(plz-deftest plz-500-errors ()
+  (should-error (plz 'get (url "/status/500"))))
+
+;;;;; Redirects
+
+(plz-deftest plz-301-redirects ()
+  (plz-test-get-response
+   (plz 'get (url "/redirect-to?url=URI-PREFIX%2Fget&status_code=301")
+     :as 'response :then 'sync)))
+
+(plz-deftest plz-302-redirects ()
+  (plz-test-get-response
+   (plz 'get (url "/redirect-to?url=URI-PREFIX%2Fget&status_code=302")
+     :as 'response :then 'sync)))
+
+(plz-deftest plz-307-redirects ()
+  (plz-test-get-response
+   (plz 'get (url "/redirect-to?url=URI-PREFIX%2Fget&status_code=307")
+     :as 'response :then 'sync)))
+
+(plz-deftest plz-308-redirects ()
+  (plz-test-get-response
+   (plz 'get (url "/redirect-to?url=URI-PREFIX%2Fget&status_code=308")
+     :as 'response :then 'sync)))
+
+;;;;; Errors
+
+;; TODO: Sync requests with ":as 'response" should return response for errors rather than signaling.
+
+(plz-deftest plz-get-curl-error-async nil
+  ;; Async.
+  (let* ((err)
+         (process (plz 'get "https://httpbinnnnnn.org/get/status/404"
+                    :as 'string :then #'ignore
+                    :else (lambda (e)
+                            (setf err e)))))
+    (plz-test-wait process)
+    (should (plz-error-p err))
+    (should (equal '(6 . "Couldn't resolve host. The given remote host was not resolved.")
+                   (plz-error-curl-error err)))))
+
+;; FIXME: This test works interactively but not in batch mode: it
+;; stalls the Emacs process indefinitely, using either sleep-for or
+;; sit-for.
+
+;; (plz-deftest plz-get-killed-error nil
+;;   ;; Async.
+;;   (let* ((err)
+;;          (process (plz 'get "https://httpbinnnnnn.org/get/status/404"
+;;                     :as 'string
+;;                     :else (lambda (e)
+;;                             (setf err e)))))
+;;     (sit-for 0.01)
+;;     (delete-process process)
+;;     (should (not (process-live-p process)))
+;;     (should (plz-error-p err))
+;;     (should (equal "curl process killed"
+;;                    (plz-error-message err)))))
+
+(plz-deftest plz-get-curl-error-sync nil
+  ;; Sync.
+  (pcase-let ((`(,_signal . (,_message ,data))
+	       (should-error (plz 'get "https://httpbinnnnnn.org/get/status/404"
+                               :as 'string :then 'sync)
+                             :type 'plz-error)))
+    (should (plz-error-p data))
+    (should (equal '(6 . "Couldn't resolve host. The given remote host was not resolved.")
+                   (plz-error-curl-error data)))))
+
+(plz-deftest plz-get-404-error-sync  nil
+  (pcase-let ((`(,_signal . (,_message ,data))
+	       (should-error (plz 'get (url "/get/status/404")
+			       :as 'string :then 'sync)
+                             :type 'plz-error)))
+    (should (plz-error-p data))
+    (should (plz-response-p (plz-error-response data)))
+    (should (eq 404 (plz-response-status (plz-error-response data))))))
+
+(plz-deftest plz-get-404-error-async nil
+  (let* ((err)
+         (process (plz 'get (url "/get/status/404")
+                    :as 'string :then #'ignore
+                    :else (lambda (e)
+                            (setf err e)))))
+    (plz-test-wait process)
+    (should (plz-error-p err))
+    (should (plz-response-p (plz-error-response err)))
+    (should (eq 404 (plz-response-status (plz-error-response err))))))
+
+(plz-deftest plz-get-timeout-error-sync nil
+  (pcase-let* ((start-time (current-time))
+               (`(,_signal . (,_message ,(cl-struct plz-error (curl-error `(,code . ,message)))))
+		(should-error (plz 'get (url "/delay/5")
+				:as 'string :then 'sync :timeout 1)
+			      :type 'plz-error))
+               (end-time (current-time)))
+    (should (eq 28 code))
+    (should (equal "Operation timeout." message))
+    (should (< (time-to-seconds (time-subtract end-time start-time)) 1.1))))
+
+(plz-deftest plz-get-timeout-error-async nil
+  (let* ((start-time (current-time))
+         (end-time)
+         (plz-error)
+         (process (plz 'get (url "/delay/5")
+                    :as 'response :timeout 1 :then #'ignore
+                    :else (lambda (e)
+                            (setf end-time (current-time)
+                                  plz-error e)))))
+    (plz-test-wait process)
+    (should (eq 28 (car (plz-error-curl-error plz-error))))
+    (should (equal "Operation timeout." (cdr (plz-error-curl-error plz-error))))
+    (should (< (time-to-seconds (time-subtract end-time start-time)) 1.1))))
+
+;;;;; Finally
+
+(plz-deftest plz-get-finally nil
+  (let* ((finally-null t)
+         (process (plz 'get (url "/get")
+                    :as 'string
+                    :then #'ignore
+                    :finally (lambda ()
+                               (setf finally-null nil)))))
+    (plz-test-wait process)
+    (should-not finally-null)))
+
+;;;;; Binary
+
+(plz-deftest plz-get-jpeg ()
+  (let* ((test-jpeg)
+         (process (plz 'get (url "/image/jpeg")
+                    :as 'binary
+                    :then (lambda (string)
+                            (setf test-jpeg string)))))
+    (plz-test-wait process)
+    (should (equal 'jpeg (image-type-from-data test-jpeg)))))
+
+(plz-deftest plz-get-jpeg-sync ()
+  (let ((jpeg (plz 'get (url "/image/jpeg")
+                :as 'binary :then 'sync)))
+    (should (equal 'jpeg (image-type-from-data jpeg)))))
+
+;;;;; Downloading to files
+
+(plz-deftest plz-get-temp-file ()
+  (let ((filename (plz 'get (url "/image/jpeg")
+                    :as 'file :then 'sync)))
+    (unwind-protect
+        (let ((jpeg-data (with-temp-buffer
+                           (insert-file-contents filename)
+                           (buffer-string))))
+          (should (equal 'jpeg (image-type-from-data jpeg-data))))
+      ;; It's a temp file, so it should always be deleted.
+      (delete-file filename))))
+
+(plz-deftest plz-get-named-file ()
+  (let ((filename (make-temp-file "plz-")))
+    ;; HACK: Delete the temp file and reuse its name, because
+    ;; `make-temp-name' is less convenient to use.
+    (delete-file filename)
+    (unwind-protect
+        (progn
+          (plz 'get (url "/image/jpeg")
+            :as `(file ,filename) :then 'sync)
+          (let ((jpeg-data (with-temp-buffer
+                             (insert-file-contents filename)
+                             (buffer-string))))
+            (should (equal 'jpeg (image-type-from-data jpeg-data)))))
+      ;; It's a temp file, so it should always be deleted.
+      (when (file-exists-p filename)
+        (delete-file filename)))))
+
+(plz-deftest plz-upload-file-by-name ()
+  (let ((filename (make-temp-file "plz-"))
+        response-json process)
+    (unwind-protect
+        (progn
+          (with-temp-file filename
+            (insert "deadbeef"))
+          (setf process
+                (plz 'put (url "/put")
+                  :body `(file ,filename)
+                  :as #'json-read
+                  :then (lambda (json)
+                          (setf response-json json))))
+          (plz-test-wait process)
+          (should (equal "deadbeef" (alist-get 'data response-json)))
+          (should-not (alist-get 'files response-json)))
+      (delete-file filename))))
+
+;;;;; Queue
+
+;; TODO: Test that limit is enforced (though it seems to work fine).
+
+(plz-deftest plz-queue-with-finally ()
+  "Ensure that a queue with a FINALLY function calls it correctly.
+That is, that the function is called after the queue is emptied,
+and only called once."
+  (let* ((finally-called-at nil)
+         (finally-called-times 0)
+         (queue (make-plz-queue :limit 2
+                                :finally (lambda ()
+                                           (setf finally-called-at (current-time))
+                                           (cl-incf finally-called-times))))
+         (urls (list (url "/delay/2")))
+         completed-urls queue-started-at)
+    (dolist (url urls)
+      (plz-queue queue
+        'get url :then (lambda (_)
+                         (push url completed-urls))))
+    (setf queue-started-at (current-time))
+    (plz-run queue)
+    (cl-loop with waits = 0
+             while (and (plz-queue-active queue) (< waits 60))
+             do (progn
+                  (sleep-for 0.1)
+                  (cl-incf waits)))
+    (should (seq-set-equal-p urls completed-urls))
+    (should (zerop (plz-length queue)))
+    (should (= 1 finally-called-times))
+    (should (>= (float-time (time-subtract finally-called-at queue-started-at))
+                2))))
+
+(plz-deftest plz-queue-without-finally ()
+  "Ensure that a queue without a FINALLY function doesn't signal an error."
+  (let* ((queue (make-plz-queue :limit 2))
+         (urls (list (url "/get?foo=0")
+                     (url "/get?foo=1")))
+         completed-urls)
+    (dolist (url urls)
+      (plz-queue queue
+        'get url :then (lambda (_)
+                         (push url completed-urls))))
+    (plz-run queue)
+    (cl-loop with waits = 0
+             while (and (plz-queue-active queue) (< waits 20))
+             do (progn
+                  (sleep-for 0.1)
+                  (cl-incf waits)))
+    (should (seq-set-equal-p urls completed-urls))
+    (should (zerop (plz-length queue)))))
+
+;; TODO: Add test for canceling queue.
+
+;; Process filter
+
+(defun test-plz-process-filter (process output)
+  "Write OUTPUT to the PROCESS buffer."
+  (when (buffer-live-p (process-buffer process))
+    (with-current-buffer (process-buffer process)
+      (let ((movingp (= (point) (process-mark process))))
+        (save-excursion
+          (goto-char (process-mark process))
+          (insert output)
+          (set-marker (process-mark process) (point)))
+        (when movingp
+          (goto-char (process-mark process)))))))
+
+(plz-deftest plz-get-json-process-filter-async ()
+  (let* ((test-json) (outputs)
+         (process (plz 'get (url "/get")
+                    :as #'json-read
+                    :then (lambda (json)
+                            (setf test-json json))
+                    :filter (lambda (process output)
+                              (test-plz-process-filter process output)
+                              (push output outputs)))))
+    (plz-test-wait process)
+    (let-alist test-json
+      (should (string-match-p "curl" .headers.User-Agent)))
+    (let ((output (string-join (reverse outputs))))
+      (should (string-match-p "HTTP.*\s+200" output))
+      (should (string-match-p "Server: gunicorn" output))
+      (should (string-match-p "\"args\":\s*{}" output)))))
+
+(plz-deftest plz-get-json-process-filter-sync ()
+  (let* ((outputs)
+         (response (plz 'get (url "/get")
+                     :as 'response
+                     :filter (lambda (process output)
+                               (test-plz-process-filter process output)
+                               (push output outputs)))))
+    (plz-test-get-response response)
+    (let ((output (string-join (reverse outputs))))
+      (should (string-match-p "HTTP.*\s+200" output))
+      (should (string-match-p "Server: gunicorn" output))
+      (should (string-match-p "\"args\":\s*{}" output)))))
+
+;;;; Footer
+
+(provide 'test-plz)
+
+;;; test-plz.el ends here
diff --git a/emacs/.emacs.d/elpa/plz-0.9.1/tests/test-plz.elc b/emacs/.emacs.d/elpa/plz-0.9.1/tests/test-plz.elc
new file mode 100644
index 0000000..7546237
Binary files /dev/null and b/emacs/.emacs.d/elpa/plz-0.9.1/tests/test-plz.elc differ
diff --git a/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-autoloads.el b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-autoloads.el
new file mode 100644
index 0000000..a98d807
--- /dev/null
+++ b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-autoloads.el
@@ -0,0 +1,251 @@
+;;; posframe-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from posframe.el
+
+(autoload 'posframe-workable-p "posframe" "\
+Test posframe workable status.")
+(autoload 'posframe-show "posframe" "\
+Pop up a posframe to show STRING at POSITION.
+
+ (1) POSITION
+
+POSITION can be:
+1. An integer, meaning point position.
+2. A cons of two integers, meaning absolute X and Y coordinates.
+3. Other type, in which case the corresponding POSHANDLER should be
+   provided.
+
+ (2) POSHANDLER
+
+POSHANDLER is a function of one argument returning an actual
+position.  Its argument is a plist of the following form:
+
+  (:position xxx
+   :poshandler xxx
+   :font-height xxx
+   :font-width xxx
+   :posframe xxx
+   :posframe-width xxx
+   :posframe-height xxx
+   :posframe-buffer xxx
+   :parent-frame xxx
+   :parent-window-start xxx
+   :parent-window-end xxx
+   :parent-window-left xxx
+   :parent-window-top xxx
+   :parent-frame-width xxx
+   :parent-frame-height xxx
+   :parent-window xxx
+   :parent-window-width  xxx
+   :parent-window-height xxx
+   :mouse-x xxx
+   :mouse-y xxx
+   :minibuffer-height xxx
+   :mode-line-height  xxx
+   :header-line-height xxx
+   :tab-line-height xxx
+   :x-pixel-offset xxx
+   :y-pixel-offset xxx
+   :parent-text-scale-mode-amount xxx)
+
+By default, poshandler is auto-selected based on the type of POSITION,
+but the selection can be overridden using the POSHANDLER argument.
+
+The builtin poshandler functions are listed below:
+
+1.  `posframe-poshandler-frame-center'
+2.  `posframe-poshandler-frame-top-center'
+3.  `posframe-poshandler-frame-top-left-corner'
+4.  `posframe-poshandler-frame-top-right-corner'
+5.  `posframe-poshandler-frame-top-left-or-right-other-corner'
+6.  `posframe-poshandler-frame-bottom-center'
+7.  `posframe-poshandler-frame-bottom-left-corner'
+8.  `posframe-poshandler-frame-bottom-right-corner'
+9.  `posframe-poshandler-window-center'
+10. `posframe-poshandler-window-top-center'
+11. `posframe-poshandler-window-top-left-corner'
+12. `posframe-poshandler-window-top-right-corner'
+13. `posframe-poshandler-window-bottom-center'
+14. `posframe-poshandler-window-bottom-left-corner'
+15. `posframe-poshandler-window-bottom-right-corner'
+16. `posframe-poshandler-point-top-left-corner'
+17. `posframe-poshandler-point-bottom-left-corner'
+18. `posframe-poshandler-point-bottom-left-corner-upward'
+19. `posframe-poshandler-point-window-center'
+20. `posframe-poshandler-point-frame-center'
+
+ (3) POSHANDLER-EXTRA-INFO
+
+POSHANDLER-EXTRA-INFO is a plist, which will prepend to the
+argument of poshandler function: `info', it will *OVERRIDE* the
+exist key in `info'.
+
+ (4) BUFFER-OR-NAME
+
+This posframe's buffer is BUFFER-OR-NAME, which can be a buffer
+or a name of a (possibly nonexistent) buffer.
+
+buffer name can prefix with space, for example \" *mybuffer*\", so
+the buffer name will hide for ibuffer and `list-buffers'.
+
+ (5) NO-PROPERTIES
+
+If NO-PROPERTIES is non-nil, The STRING's properties will
+be removed before being shown in posframe.
+
+ (6) HEIGHT, MAX-HEIGHT, MIN-HEIGHT, WIDTH, MAX-WIDTH and MIN-WIDTH
+
+These arguments are specified in the canonical character width
+and height of posframe, more details can be found in docstring of
+function `fit-frame-to-buffer',
+
+ (7) LEFT-FRINGE and RIGHT-FRINGE
+
+If LEFT-FRINGE or RIGHT-FRINGE is a number, left fringe or
+right fringe with be shown with the specified width.
+
+ (8) BORDER-WIDTH, BORDER-COLOR, INTERNAL-BORDER-WIDTH and INTERNAL-BORDER-COLOR
+
+By default, posframe shows no borders, but users can specify
+borders by setting BORDER-WIDTH to a positive number.  Border
+color can be specified by BORDER-COLOR.
+
+INTERNAL-BORDER-WIDTH and INTERNAL-BORDER-COLOR are same as
+BORDER-WIDTH and BORDER-COLOR, but do not suggest to use for the
+reason:
+
+   Add distinct controls for child frames' borders (Bug#45620)
+   http://git.savannah.gnu.org/cgit/emacs.git/commit/?id=ff7b1a133bfa7f2614650f8551824ffaef13fadc
+
+ (9) FONT, FOREGROUND-COLOR and BACKGROUND-COLOR
+
+Posframe's font as well as foreground and background colors are
+derived from the current frame by default, but can be overridden
+using the FONT, FOREGROUND-COLOR and BACKGROUND-COLOR arguments,
+respectively.
+
+ (10) CURSOR, TTY-NON-SELECTED-CURSOR and WINDOW-POINT
+
+By default, cursor is not showed in posframe, user can let cursor
+showed with this argument help by set its value to a `cursor-type'.
+
+TTY-NON-SELECTED-CURSOR will let redisplay put the terminal
+cursor in a non-selected frame, which is useful when use
+vertico-posframe like package in tty.
+
+When cursor need to be showed in posframe, user may need to set
+WINDOW-POINT to the point of BUFFER, which can let cursor showed
+at this point.
+
+ (11) RESPECT-HEADER-LINE and RESPECT-MODE-LINE
+
+By default, posframe will display no header-line, mode-line and
+tab-line.  In case a header-line, mode-line or tab-line is
+desired, users can set RESPECT-HEADER-LINE and RESPECT-MODE-LINE
+to t.
+
+ (12) INITIALIZE
+
+INITIALIZE is a function with no argument.  It will run when
+posframe buffer is first selected with `with-current-buffer'
+in `posframe-show', and only run once (for performance reasons).
+
+ (13) LINES-TRUNCATE
+
+If LINES-TRUNCATE is non-nil, then lines will truncate in the
+posframe instead of wrap.
+
+ (14) OVERRIDE-PARAMETERS
+
+OVERRIDE-PARAMETERS is very powful, *all* the valid frame parameters
+used by posframe's frame can be overridden by it.
+
+NOTE: some `posframe-show' arguments are not frame parameters, so they
+can not be overrided by this argument.
+
+ (15) TIMEOUT
+
+TIMEOUT can specify the number of seconds after which the posframe
+will auto-hide.
+
+ (15) REFRESH
+
+If REFRESH is a number, posframe's frame-size will be re-adjusted
+every REFRESH seconds.
+
+ (17) ACCEPT-FOCUS
+
+When ACCEPT-FOCUS is non-nil, posframe will accept focus.
+be careful, you may face some bugs when set it to non-nil.
+
+ (18) HIDEHANDLER
+
+HIDEHANDLER is a function, when it return t, posframe will be
+hide, this function has a plist argument:
+
+  (:posframe-buffer xxx
+   :posframe-parent-buffer xxx)
+
+The builtin hidehandler functions are listed below:
+
+1. `posframe-hidehandler-when-buffer-switch'
+
+ (19) REFPOSHANDLER
+
+REFPOSHANDLER is a function, a reference position (most is
+top-left of current frame) will be returned when call this
+function.
+
+when it is nil or it return nil, child-frame feature will be used
+and reference position will be deal with in Emacs.
+
+The user case I know at the moment is let ivy-posframe work well
+in EXWM environment (let posframe show on the other application
+window).
+
+         DO NOT USE UNLESS NECESSARY!!!
+
+An example parent frame poshandler function is:
+
+1. `posframe-refposhandler-xwininfo'
+
+ (19) Others
+
+You can use `posframe-delete-all' to delete all posframes.
+
+(fn BUFFER-OR-NAME &key STRING POSITION POSHANDLER POSHANDLER-EXTRA-INFO WIDTH HEIGHT MAX-WIDTH MAX-HEIGHT MIN-WIDTH MIN-HEIGHT X-PIXEL-OFFSET Y-PIXEL-OFFSET LEFT-FRINGE RIGHT-FRINGE BORDER-WIDTH BORDER-COLOR INTERNAL-BORDER-WIDTH INTERNAL-BORDER-COLOR FONT CURSOR TTY-NON-SELECTED-CURSOR WINDOW-POINT FOREGROUND-COLOR BACKGROUND-COLOR RESPECT-HEADER-LINE RESPECT-MODE-LINE INITIALIZE NO-PROPERTIES KEEP-RATIO LINES-TRUNCATE OVERRIDE-PARAMETERS TIMEOUT REFRESH ACCEPT-FOCUS HIDEHANDLER REFPOSHANDLER &allow-other-keys)")
+(autoload 'posframe-hide-all "posframe" "\
+Hide all posframe frames." t)
+(autoload 'posframe-delete-all "posframe" "\
+Delete all posframe frames and buffers." t)
+(register-definition-prefixes "posframe" '("posframe-"))
+
+
+;;; Generated autoloads from posframe-benchmark.el
+
+(autoload 'posframe-benchmark "posframe-benchmark" "\
+Benchmark tool for posframe." t)
+(register-definition-prefixes "posframe-benchmark" '("posframe-benchmark-alist"))
+
+;;; End of scraped data
+
+(provide 'posframe-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; posframe-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-benchmark.el b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-benchmark.el
new file mode 100644
index 0000000..58b8676
--- /dev/null
+++ b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-benchmark.el
@@ -0,0 +1,82 @@
+;;; posframe-benchmark.el --- Benchmark tool for posframe    -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2020 Free Software Foundation, Inc.
+
+;; Author: Feng Shu <tumashu@163.com>
+;; Maintainer: Feng Shu <tumashu@163.com>
+;; URL: https://github.com/tumashu/posframe
+;; Keywords: convenience, tooltip
+;; Package-Requires: ((emacs "26"))
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;;; Code:
+(require 'cl-lib)
+(require 'posframe)
+
+(defvar posframe-benchmark-alist
+  (let ((str (with-temp-buffer
+               (insert-file-contents (locate-library "posframe.el"))
+               (buffer-string))))
+    `((font-at
+       (font-at (point-min)))
+      (redraw-display
+       (redraw-display))
+      (redraw-frame
+       (redraw-frame (window-frame)))
+      (remove-text-properties
+       (let ((string ,str))
+         (remove-text-properties
+          0 (length string) '(read-only t)
+          string)))
+      (mouse-position
+       (mouse-position))
+      (default-font-width
+       (default-font-width))
+      (posframe--get-font-height
+       (posframe--get-font-height (point-min)))
+      (frame-parameter
+       (frame-parameter (window-frame) 'no-accept-focus))
+      (set-mouse-position
+       (set-mouse-position (window-frame) 0 0))
+      (posn-at-point
+       (posn-at-point))
+      (posn-x-y
+       (posn-x-y (posn-at-point)))
+      (posn-object-x-y
+       (posn-object-x-y (posn-at-point)))
+      (set-frame-parameter
+       (set-frame-parameter (window-frame) 'test 1))
+      (raise-frame
+       (raise-frame (window-frame))))))
+
+;;;###autoload
+(defun posframe-benchmark ()
+  "Benchmark tool for posframe."
+  (interactive)
+  (let ((n 1000))
+    (message "\n* Posframe Benchmark")
+    (dolist (x posframe-benchmark-alist)
+      (message "\n** Benchmark `%S' %s times ..." (car x) n)
+      (benchmark n (car (cdr x))))
+    (message "\n* Finished.")))
+
+
+(provide 'posframe-benchmark)
+
+;;; posframe.el ends here
diff --git a/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-benchmark.elc b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-benchmark.elc
new file mode 100644
index 0000000..b67a7b5
Binary files /dev/null and b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-benchmark.elc differ
diff --git a/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-pkg.el b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-pkg.el
new file mode 100644
index 0000000..c17cd62
--- /dev/null
+++ b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "posframe" "20260816.2356"
+  "Pop a posframe (just a frame) at point."
+  '((emacs "26.1"))
+  :url "https://github.com/tumashu/posframe"
+  :commit "ec0ec37c0d6397422a07def499e87591ca037af7"
+  :revdesc "ec0ec37c0d63"
+  :keywords '("convenience" "tooltip")
+  :authors '(("Feng Shu" . "tumashu@163.com"))
+  :maintainers '(("Feng Shu" . "tumashu@163.com")))
diff --git a/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe.el b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe.el
new file mode 100644
index 0000000..2053a9f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe.el
@@ -0,0 +1,1595 @@
+;;; posframe.el --- Pop a posframe (just a frame) at point    -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2020 Free Software Foundation, Inc.
+
+;; Author: Feng Shu <tumashu@163.com>
+;; Maintainer: Feng Shu <tumashu@163.com>
+;; URL: https://github.com/tumashu/posframe
+;; Package-Version: 20260816.2356
+;; Package-Revision: ec0ec37c0d63
+;; Keywords: convenience, tooltip
+;; Package-Requires: ((emacs "26.1"))
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; * Posframe README                                :README:
+
+;; Posframe can pop up a frame at point, this *posframe* is a
+;; child-frame connected to its root window's buffer.
+
+;; The main advantages are:
+;; 1. It is fast enough for daily usage :-)
+;; 2. It works well with CJK languages.
+
+;; More info please see: README.org
+
+;;; Code:
+;; * posframe's code                         :CODE:
+(require 'cl-lib)
+
+(defgroup posframe nil
+  "Pop a posframe (just a frame) at point."
+  :group 'lisp
+  :prefix "posframe-")
+
+(defcustom posframe-inhibit-double-buffering nil
+  "Set the posframe's frame-parameter: inhibit-double-buffering."
+  :group 'posframe
+  :type 'boolean)
+
+(defcustom posframe-mouse-banish-function #'posframe-mouse-banish-default
+  "The function used to banish mouse.
+
+Function `posframe-mouse-banish-default' will work well in most
+case, but suggest use function `posframe-mouse-banish-simple' or
+custom function for EXWM users."
+  :type 'function)
+
+(defcustom posframe-text-scale-factor-function #'posframe-text-scale-factor-default
+  "The function to adjust value of text-scale of posframe buffer.
+
+Accepts single argument which is the value of parent buffer
+`text-scale-mode-amount' or nil if the `text-scale-mode' is disabled in
+the parent buffer."
+  :group 'posframe
+  :type 'function)
+
+(defvar-local posframe--frame nil
+  "Record posframe's frame.")
+
+(defvar-local posframe--last-posframe-pixel-position nil
+  "Record the last pixel position of posframe's frame.")
+
+(defvar-local posframe--last-posframe-size nil
+  "Record the last size of posframe's frame.")
+
+(defvar-local posframe--last-posframe-displayed-size nil
+  "Record the last displayed size of posframe's frame.")
+
+(defvar-local posframe--last-parent-frame-size nil
+  "Record the last size of posframe's parent-frame.")
+
+(defvar-local posframe--last-poshandler-info nil
+  "Record the last poshandler info.")
+
+(defvar-local posframe--last-font-height-info nil
+  "Record the last font height info.")
+
+(defvar-local posframe--last-args nil
+  "Record the last arguments of `posframe--create-posframe'.
+
+If these args have changed, posframe will recreate its
+frame.")
+
+(defvar-local posframe--timeout-timer nil
+  "Record the timer to deal with timeout argument of `posframe-show'.")
+
+(defvar-local posframe--refresh-timer nil
+  "Record the timer to deal with refresh argument of `posframe-show'.")
+
+(defvar-local posframe--initialized-p nil
+  "Record initialize status of `posframe-show'.")
+
+(defvar-local posframe--accept-focus nil
+  "Record accept focus status of `posframe-show'.")
+
+(defvar posframe-hidehandler-timer nil
+  "Timer used by hidehandler function.")
+
+;; Avoid compilation warnings on Emacs < 27.
+(defvar x-gtk-resize-child-frames)
+
+(defvar posframe-gtk-resize-child-frames
+  (when (and
+         (< emacs-major-version 29)
+         (string-match-p "GTK3" system-configuration-features)
+         (let ((value (or (getenv "XDG_CURRENT_DESKTOP") (getenv "DESKTOP_SESSION"))))
+           (and (stringp value)
+                ;; It can be "ubuntu:GNOME".
+                (string-match-p "GNOME" value))))
+    ;; Not future-proof, but we can use it now.
+    'resize-mode)
+  "Value to bind `x-gtk-resize-child-frames' to.
+
+The value `resize-mode' only has effect on new child frames, so
+if you change it, call `posframe-delete-all' for it to take
+effect.")
+
+;;;###autoload
+(defun posframe-workable-p ()
+  "Test posframe workable status."
+  (and (>= emacs-major-version 26)
+       (not noninteractive)
+       (not emacs-basic-display)
+       (or (display-graphic-p)
+           (featurep 'tty-child-frames))
+       (not (eq (frame-parameter (selected-frame) 'minibuffer) 'only))))
+
+;;;###autoload
+(cl-defun posframe-show (buffer-or-name
+                         &key
+                         string
+                         position
+                         poshandler
+                         poshandler-extra-info
+                         width
+                         height
+                         max-width
+                         max-height
+                         min-width
+                         min-height
+                         x-pixel-offset
+                         y-pixel-offset
+                         left-fringe
+                         right-fringe
+                         border-width
+                         border-color
+                         internal-border-width
+                         internal-border-color
+                         font
+                         cursor
+                         tty-non-selected-cursor
+                         window-point
+                         foreground-color
+                         background-color
+                         respect-header-line
+                         respect-mode-line
+                         initialize
+                         no-properties
+                         keep-ratio
+                         lines-truncate
+                         override-parameters
+                         timeout
+                         refresh
+                         accept-focus
+                         hidehandler
+                         refposhandler
+                         &allow-other-keys)
+  "Pop up a posframe to show STRING at POSITION.
+
+ (1) POSITION
+
+POSITION can be:
+1. An integer, meaning point position.
+2. A cons of two integers, meaning absolute X and Y coordinates.
+3. Other type, in which case the corresponding POSHANDLER should be
+   provided.
+
+ (2) POSHANDLER
+
+POSHANDLER is a function of one argument returning an actual
+position.  Its argument is a plist of the following form:
+
+  (:position xxx
+   :poshandler xxx
+   :font-height xxx
+   :font-width xxx
+   :posframe xxx
+   :posframe-width xxx
+   :posframe-height xxx
+   :posframe-buffer xxx
+   :parent-frame xxx
+   :parent-window-start xxx
+   :parent-window-end xxx
+   :parent-window-left xxx
+   :parent-window-top xxx
+   :parent-frame-width xxx
+   :parent-frame-height xxx
+   :parent-window xxx
+   :parent-window-width  xxx
+   :parent-window-height xxx
+   :mouse-x xxx
+   :mouse-y xxx
+   :minibuffer-height xxx
+   :mode-line-height  xxx
+   :header-line-height xxx
+   :tab-line-height xxx
+   :x-pixel-offset xxx
+   :y-pixel-offset xxx
+   :parent-text-scale-mode-amount xxx)
+
+By default, poshandler is auto-selected based on the type of POSITION,
+but the selection can be overridden using the POSHANDLER argument.
+
+The builtin poshandler functions are listed below:
+
+1.  `posframe-poshandler-frame-center'
+2.  `posframe-poshandler-frame-top-center'
+3.  `posframe-poshandler-frame-top-left-corner'
+4.  `posframe-poshandler-frame-top-right-corner'
+5.  `posframe-poshandler-frame-top-left-or-right-other-corner'
+6.  `posframe-poshandler-frame-bottom-center'
+7.  `posframe-poshandler-frame-bottom-left-corner'
+8.  `posframe-poshandler-frame-bottom-right-corner'
+9.  `posframe-poshandler-window-center'
+10. `posframe-poshandler-window-top-center'
+11. `posframe-poshandler-window-top-left-corner'
+12. `posframe-poshandler-window-top-right-corner'
+13. `posframe-poshandler-window-bottom-center'
+14. `posframe-poshandler-window-bottom-left-corner'
+15. `posframe-poshandler-window-bottom-right-corner'
+16. `posframe-poshandler-point-top-left-corner'
+17. `posframe-poshandler-point-bottom-left-corner'
+18. `posframe-poshandler-point-bottom-left-corner-upward'
+19. `posframe-poshandler-point-window-center'
+20. `posframe-poshandler-point-frame-center'
+
+ (3) POSHANDLER-EXTRA-INFO
+
+POSHANDLER-EXTRA-INFO is a plist, which will prepend to the
+argument of poshandler function: `info', it will *OVERRIDE* the
+exist key in `info'.
+
+ (4) BUFFER-OR-NAME
+
+This posframe's buffer is BUFFER-OR-NAME, which can be a buffer
+or a name of a (possibly nonexistent) buffer.
+
+buffer name can prefix with space, for example \" *mybuffer*\", so
+the buffer name will hide for ibuffer and `list-buffers'.
+
+ (5) NO-PROPERTIES
+
+If NO-PROPERTIES is non-nil, The STRING's properties will
+be removed before being shown in posframe.
+
+ (6) HEIGHT, MAX-HEIGHT, MIN-HEIGHT, WIDTH, MAX-WIDTH and MIN-WIDTH
+
+These arguments are specified in the canonical character width
+and height of posframe, more details can be found in docstring of
+function `fit-frame-to-buffer',
+
+ (7) LEFT-FRINGE and RIGHT-FRINGE
+
+If LEFT-FRINGE or RIGHT-FRINGE is a number, left fringe or
+right fringe with be shown with the specified width.
+
+ (8) BORDER-WIDTH, BORDER-COLOR, INTERNAL-BORDER-WIDTH and INTERNAL-BORDER-COLOR
+
+By default, posframe shows no borders, but users can specify
+borders by setting BORDER-WIDTH to a positive number.  Border
+color can be specified by BORDER-COLOR.
+
+INTERNAL-BORDER-WIDTH and INTERNAL-BORDER-COLOR are same as
+BORDER-WIDTH and BORDER-COLOR, but do not suggest to use for the
+reason:
+
+   Add distinct controls for child frames' borders (Bug#45620)
+   http://git.savannah.gnu.org/cgit/emacs.git/commit/?id=ff7b1a133bfa7f2614650f8551824ffaef13fadc
+
+ (9) FONT, FOREGROUND-COLOR and BACKGROUND-COLOR
+
+Posframe's font as well as foreground and background colors are
+derived from the current frame by default, but can be overridden
+using the FONT, FOREGROUND-COLOR and BACKGROUND-COLOR arguments,
+respectively.
+
+ (10) CURSOR, TTY-NON-SELECTED-CURSOR and WINDOW-POINT
+
+By default, cursor is not showed in posframe, user can let cursor
+showed with this argument help by set its value to a `cursor-type'.
+
+TTY-NON-SELECTED-CURSOR will let redisplay put the terminal
+cursor in a non-selected frame, which is useful when use
+vertico-posframe like package in tty.
+
+When cursor need to be showed in posframe, user may need to set
+WINDOW-POINT to the point of BUFFER, which can let cursor showed
+at this point.
+
+ (11) RESPECT-HEADER-LINE and RESPECT-MODE-LINE
+
+By default, posframe will display no header-line, mode-line and
+tab-line.  In case a header-line, mode-line or tab-line is
+desired, users can set RESPECT-HEADER-LINE and RESPECT-MODE-LINE
+to t.
+
+ (12) INITIALIZE
+
+INITIALIZE is a function with no argument.  It will run when
+posframe buffer is first selected with `with-current-buffer'
+in `posframe-show', and only run once (for performance reasons).
+
+ (13) LINES-TRUNCATE
+
+If LINES-TRUNCATE is non-nil, then lines will truncate in the
+posframe instead of wrap.
+
+ (14) OVERRIDE-PARAMETERS
+
+OVERRIDE-PARAMETERS is very powful, *all* the valid frame parameters
+used by posframe's frame can be overridden by it.
+
+NOTE: some `posframe-show' arguments are not frame parameters, so they
+can not be overrided by this argument.
+
+ (15) TIMEOUT
+
+TIMEOUT can specify the number of seconds after which the posframe
+will auto-hide.
+
+ (15) REFRESH
+
+If REFRESH is a number, posframe's frame-size will be re-adjusted
+every REFRESH seconds.
+
+ (17) ACCEPT-FOCUS
+
+When ACCEPT-FOCUS is non-nil, posframe will accept focus.
+be careful, you may face some bugs when set it to non-nil.
+
+ (18) HIDEHANDLER
+
+HIDEHANDLER is a function, when it return t, posframe will be
+hide, this function has a plist argument:
+
+  (:posframe-buffer xxx
+   :posframe-parent-buffer xxx)
+
+The builtin hidehandler functions are listed below:
+
+1. `posframe-hidehandler-when-buffer-switch'
+
+ (19) REFPOSHANDLER
+
+REFPOSHANDLER is a function, a reference position (most is
+top-left of current frame) will be returned when call this
+function.
+
+when it is nil or it return nil, child-frame feature will be used
+and reference position will be deal with in Emacs.
+
+The user case I know at the moment is let ivy-posframe work well
+in EXWM environment (let posframe show on the other application
+window).
+
+         DO NOT USE UNLESS NECESSARY!!!
+
+An example parent frame poshandler function is:
+
+1. `posframe-refposhandler-xwininfo'
+
+ (19) Others
+
+You can use `posframe-delete-all' to delete all posframes."
+  (let* ((position (or position (point)))
+         (max-width (if (numberp max-width)
+                        (min max-width (frame-width))
+                      (frame-width)))
+         (max-height (if (numberp max-height)
+                         (min max-height (frame-height))
+                       (frame-height)))
+         (min-width (min (or min-width 1) max-width))
+         (min-height (min (or min-height 1) max-height))
+         (width (when width
+                  (min (max width min-width) max-width)))
+         (height (when height
+                   (min (max height min-height) max-height)))
+         (x-pixel-offset (or x-pixel-offset 0))
+         (y-pixel-offset (or y-pixel-offset 0))
+         (window-point (or window-point 0))
+         ;;-----------------------------------------------------
+         (buffer (get-buffer-create buffer-or-name))
+         (parent-window (selected-window))
+         (parent-window-start (window-start parent-window))
+         (parent-window-end (window-end parent-window))
+         (parent-window-top (window-pixel-top parent-window))
+         (parent-window-left (window-pixel-left parent-window))
+         (parent-window-width (window-pixel-width parent-window))
+         (parent-window-height (window-pixel-height parent-window))
+         (parent-frame (window-frame parent-window))
+         (parent-frame-width (frame-pixel-width parent-frame))
+         (parent-frame-height (frame-pixel-height parent-frame))
+         (ref-position
+          (when (functionp refposhandler)
+            (ignore-errors
+              (funcall refposhandler parent-frame))))
+         (font-width (default-font-width))
+         (font-height (with-current-buffer (window-buffer parent-window)
+                        (posframe--get-font-height position)))
+         (parent-text-scale-mode-amount (with-current-buffer (window-buffer parent-window)
+                                          (and (bound-and-true-p text-scale-mode)
+                                               (bound-and-true-p text-scale-mode-amount))))
+         (mode-line-height (window-mode-line-height
+                            (and (window-minibuffer-p)
+                                 (ignore-errors (window-in-direction 'above)))))
+         (minibuffer-height (window-pixel-height (minibuffer-window)))
+         (header-line-height (window-header-line-height parent-window))
+         (tab-line-height (if (functionp 'window-tab-line-height)
+                              (window-tab-line-height)
+                            0))
+         (mouse-position (cdr (mouse-pixel-position)))
+         (frame-resize-pixelwise t)
+         pixel-position
+         posframe)
+
+    (with-current-buffer buffer
+
+      ;; Initialize
+      (unless posframe--initialized-p
+        (let ((func initialize))
+          (when (functionp func)
+            (funcall func)
+            (setq posframe--initialized-p t))))
+
+      ;; Create posframe
+      (setq posframe
+            (posframe--create-posframe
+             buffer
+             :position position
+             :font font
+             :cursor cursor
+             :tty-non-selected-cursor tty-non-selected-cursor
+             :parent-frame
+             (unless ref-position
+               parent-frame)
+             :left-fringe left-fringe
+             :right-fringe right-fringe
+             :border-width border-width
+             :border-color border-color
+             :internal-border-width internal-border-width
+             :internal-border-color internal-border-color
+             :foreground-color foreground-color
+             :background-color background-color
+             :keep-ratio keep-ratio
+             :lines-truncate lines-truncate
+             :respect-header-line respect-header-line
+             :respect-mode-line respect-mode-line
+             :override-parameters override-parameters
+             :accept-focus accept-focus
+             :parent-text-scale-mode-amount parent-text-scale-mode-amount))
+
+      ;; Insert string into the posframe buffer
+      (posframe--insert-string string no-properties)
+
+      (let* ((size-info
+              (list :posframe posframe
+                    :width width
+                    :height height
+                    :max-width max-width
+                    :max-height max-height
+                    :min-width min-width
+                    :min-height min-height))
+             (position-info
+              (list :position position
+                    :poshandler poshandler
+                    :font-height font-height
+                    :font-width font-width
+                    :posframe posframe
+                    :posframe-buffer buffer
+                    :parent-frame parent-frame
+                    :parent-frame-width parent-frame-width
+                    :parent-frame-height parent-frame-height
+                    :ref-position ref-position
+                    :parent-window parent-window
+                    :parent-window-start parent-window-start
+                    :parent-window-end parent-window-end
+                    :parent-window-top parent-window-top
+                    :parent-window-left parent-window-left
+                    :parent-window-width parent-window-width
+                    :parent-window-height parent-window-height
+                    :mouse-x (car mouse-position)
+                    :mouse-y (cdr mouse-position)
+                    :mode-line-height mode-line-height
+                    :minibuffer-height minibuffer-height
+                    :header-line-height header-line-height
+                    :tab-line-height tab-line-height
+                    :x-pixel-offset x-pixel-offset
+                    :y-pixel-offset y-pixel-offset
+                    :parent-text-scale-mode-amount parent-text-scale-mode-amount)))
+        (setq pixel-position (and
+                              width
+                              height
+                              (posframe-run-poshandler
+                               `(,@poshandler-extra-info
+                                 ,@position-info
+                                 :posframe-width ,(* (default-font-width) width)
+                                 :posframe-height ,(* (default-line-height) height)))))
+        (if (and width height
+                 (fboundp 'set-frame-size-and-position-pixelwise)
+                 (frame-visible-p posframe)
+                 (not (equal
+                       pixel-position
+                       posframe--last-posframe-pixel-position)))
+            (posframe--set-frame-size-and-position
+             size-info
+             pixel-position
+             parent-frame-width parent-frame-height)
+          ;; Set posframe's size
+          (posframe--set-frame-size size-info)
+          ;; Get new position of posframe.
+          (unless pixel-position
+            (setq pixel-position
+                  (posframe-run-poshandler
+                   ;; All poshandlers will get info from this plist.
+                   `(,@poshandler-extra-info
+                     ,@position-info
+                     :posframe-width ,(frame-pixel-width posframe)
+                     :posframe-height ,(frame-pixel-height posframe)))))
+          ;; Move posframe
+          (posframe--set-frame-position
+           posframe pixel-position parent-frame-width parent-frame-height))
+        ;; Re-adjust posframe's size when buffer's content has changed.
+        (posframe--run-refresh-timer refresh size-info))
+
+      ;; Delay hide posframe when timeout is a number.
+      (posframe--run-timeout-timer posframe timeout)
+
+      ;; Make sure not hide buffer's content for scroll down.
+      (let ((window (frame-root-window posframe--frame)))
+        (when (window-live-p window)
+          (set-window-point window window-point)))
+
+      ;; Hide posframe when switch buffer
+      (let* ((parent-buffer (window-buffer parent-window))
+             (parent-buffer-name (buffer-name parent-buffer)))
+        (set-frame-parameter posframe--frame 'posframe-hidehandler hidehandler)
+        (set-frame-parameter posframe--frame 'posframe-parent-buffer
+                             (cons parent-buffer-name parent-buffer)))
+
+      ;; Mouse banish
+      (funcall
+       posframe-mouse-banish-function
+       (list :parent-frame parent-frame
+             :mouse-x (when (car mouse-position)
+                        (+ (or (car ref-position) 0)
+                           (car mouse-position)))
+             :mouse-y (when (cdr mouse-position)
+                        (+ (or (cdr ref-position) 0)
+                           (cdr mouse-position)))
+             :posframe-x
+             (if (>= (car pixel-position) 0)
+                 (car pixel-position)
+               (- (frame-pixel-width parent-frame)
+                  (frame-pixel-width posframe)))
+             :posframe-y
+             (if (>= (cdr pixel-position) 0)
+                 (cdr pixel-position)
+               (- (frame-pixel-height parent-frame)
+                  (frame-pixel-height posframe)))
+             :posframe-width (frame-pixel-width posframe)
+             :posframe-height (frame-pixel-height posframe)
+             :parent-frame-width parent-frame-width
+             :parent-frame-height parent-frame-height))
+
+      ;; Return posframe
+      posframe)))
+
+(defun posframe--get-font-height (position)
+  "Get the font's height at POSITION."
+  (if (eq position (car posframe--last-font-height-info))
+      (cdr posframe--last-font-height-info)
+    (let* ((font (when (and (integerp position)
+                            (not (= position 1)))
+                   (font-at (if (>= position (point-max))
+                                (- (point-max) 1)
+                              position))))
+           (height (when (integerp position)
+                     (if (or (= position 1) (not (fontp font)))
+                         (default-line-height)
+                       (aref (font-info font) 3)))))
+      (setq posframe--last-font-height-info
+            (cons position height))
+      height)))
+
+(cl-defun posframe--create-posframe (buffer-or-name
+                                     &key
+                                     position
+                                     parent-frame
+                                     foreground-color
+                                     background-color
+                                     left-fringe
+                                     right-fringe
+                                     border-width
+                                     border-color
+                                     internal-border-width
+                                     internal-border-color
+                                     font
+                                     cursor
+                                     tty-non-selected-cursor
+                                     keep-ratio
+                                     lines-truncate
+                                     override-parameters
+                                     respect-header-line
+                                     respect-mode-line
+                                     accept-focus
+                                     parent-text-scale-mode-amount)
+  "Create and return a posframe child frame.
+This posframe's buffer is BUFFER-OR-NAME.
+
+The below optional arguments are similar to `posframe-show''s:
+PARENT-FRAME, FOREGROUND-COLOR, BACKGROUND-COLOR, LEFT-FRINGE,
+RIGHT-FRINGE, BORDER-WIDTH, BORDER-COLOR, INTERNAL-BORDER-WIDTH,
+INTERNAL-BORDER-COLOR, FONT, KEEP-RATIO, LINES-TRUNCATE,
+OVERRIDE-PARAMETERS, RESPECT-HEADER-LINE, RESPECT-MODE-LINE,
+ACCEPT-FOCUS."
+  (let ((left-fringe (or left-fringe 0))
+        (right-fringe (or right-fringe 0))
+        ;; See emacs.git:  Add distinct controls for child frames' borders (Bug#45620)
+        ;; http://git.savannah.gnu.org/cgit/emacs.git/commit/?id=ff7b1a133bfa7f2614650f8551824ffaef13fadc
+        (border-width (or border-width internal-border-width 0))
+        (border-color (or border-color internal-border-color))
+        (border-face
+         ;; NOTE: when use refposhander feature, parent-frame will be
+         ;; nil, we should use internal-border instead.
+         (if (and (facep 'child-frame-border)
+                  parent-frame)
+             'child-frame-border
+           'internal-border))
+        (buffer (get-buffer-create buffer-or-name))
+        (after-make-frame-functions nil)
+        (x-gtk-resize-child-frames posframe-gtk-resize-child-frames)
+        (args (list "args"
+                    (display-graphic-p)
+                    foreground-color
+                    background-color
+                    right-fringe
+                    left-fringe
+                    border-width
+                    border-color
+                    internal-border-width
+                    internal-border-color
+                    font
+                    keep-ratio
+                    override-parameters
+                    respect-header-line
+                    respect-mode-line
+                    accept-focus)))
+    (with-current-buffer buffer
+      ;; Many variables take effect after call `set-window-buffer'
+      (setq-local display-line-numbers nil)
+      (setq-local frame-title-format "")
+      (setq-local left-margin-width nil)
+      (setq-local right-margin-width nil)
+      (setq-local left-fringe-width nil)
+      (setq-local right-fringe-width nil)
+      (setq-local fringes-outside-margins 0)
+      (setq-local fringe-indicator-alist nil)
+      ;; Need to use `lines-truncate' as our keyword variable instead
+      ;; of `truncate-lines' so we don't shadow the variable that we
+      ;; are trying to set.
+      (setq-local truncate-lines lines-truncate)
+      (setq-local show-trailing-whitespace nil)
+      (setq-local posframe--accept-focus accept-focus)
+      (unless respect-mode-line
+        (setq-local mode-line-format nil))
+      (unless respect-header-line
+        (setq-local header-line-format nil))
+
+      (if cursor
+          (progn
+            (setq-local cursor-type cursor)
+            (setq-local cursor-in-non-selected-windows cursor))
+        (setq-local cursor-type nil)
+        (setq-local cursor-in-non-selected-windows nil))
+
+      ;; Find existing posframe: buffer-local variables used by
+      ;; posframe can be cleaned by other packages, so we should find
+      ;; existing posframe first if possible.
+      (unless (or posframe--frame posframe--last-args)
+        (setq-local posframe--frame
+                    (posframe--find-existing-posframe buffer args))
+        (setq-local posframe--last-args args))
+
+      ;; Create child-frame
+      (unless (and posframe--frame
+                   (frame-live-p posframe--frame)
+                   ;; For speed reason, posframe will reuse
+                   ;; existing frame at possible, but when
+                   ;; user change args, recreating frame
+                   ;; is needed.
+                   (equal posframe--last-args args))
+        (posframe-delete-frame buffer)
+        (setq-local posframe--last-args args)
+        (setq-local posframe--last-posframe-pixel-position nil)
+        (setq-local posframe--last-posframe-size nil)
+        (setq-local posframe--frame
+                    (make-frame
+                     `(,@override-parameters
+                       ,(when foreground-color
+                          (cons 'foreground-color foreground-color))
+                       ,(when background-color
+                          (cons 'background-color background-color))
+                       (title . "posframe")
+                       (parent-frame . ,parent-frame)
+                       (keep-ratio ,keep-ratio)
+                       (posframe-buffer . ,(cons (buffer-name buffer)
+                                                 buffer))
+                       (fullscreen . nil)
+                       (no-accept-focus . ,(not accept-focus))
+                       (min-width  . 0)
+                       (min-height . 0)
+                       (border-width . 0)
+                       (internal-border-width . ,border-width)
+                       (child-frame-border-width . ,border-width)
+                       (vertical-scroll-bars . nil)
+                       (horizontal-scroll-bars . nil)
+                       (left-fringe . ,left-fringe)
+                       (right-fringe . ,right-fringe)
+                       (menu-bar-lines . 0)
+                       (tool-bar-lines . 0)
+                       (tab-bar-lines . 0)
+                       (line-spacing . 0)
+                       (unsplittable . t)
+                       (no-other-frame . t)
+                       ;; NOTE: TTY child frame use undecorated to control border.
+                       (undecorated . ,(or (display-graphic-p)
+                                           (not (and (> border-width 0)
+                                                     (featurep 'tty-child-frames)))))
+                       (visibility . nil)
+                       (cursor-type . ,cursor)
+                       (tty-non-selected-cursor . ,tty-non-selected-cursor)
+                       (minibuffer . ,(minibuffer-window parent-frame))
+                       (left . ,(if (consp position) (car position) 0))
+                       (top . ,(if (consp position) (cdr position) 0))
+                       (width . 1)
+                       (height . 1)
+                       (no-special-glyphs . t)
+                       (skip-taskbar . t)
+                       (inhibit-double-buffering . ,posframe-inhibit-double-buffering)
+                       ;; Do not save child-frame when use desktop.el
+                       (desktop-dont-save . t))))
+        (set-frame-parameter posframe--frame 'last-args args)
+        (set-frame-parameter
+         posframe--frame 'font
+         (or font (face-attribute 'default :font parent-frame)))
+        (let ((posframe-window (frame-root-window posframe--frame)))
+          ;; This method is more stable than 'setq mode/header-line-format nil'
+          (unless respect-mode-line
+            (set-window-parameter posframe-window 'mode-line-format 'none))
+          (unless respect-header-line
+            (set-window-parameter posframe-window 'header-line-format 'none))
+          (set-window-buffer posframe-window buffer)
+          ;; When the buffer of posframe is killed, the child-frame of
+          ;; this posframe will be deleted too.
+          (set-window-dedicated-p posframe-window t)))
+
+      (when (and border-color
+                 ;; Work around https://debbugs.gnu.org/80871
+                 (not (equal (face-background border-face posframe--frame)
+                             border-color)))
+        (set-face-background border-face border-color posframe--frame)
+        ;; HACK: Set face background after border color, otherwise the
+        ;; border is not updated (BUG!).
+        (when (version< emacs-version "28.0")
+          (set-frame-parameter
+           posframe--frame 'background-color
+           (or background-color (face-attribute 'default :background)))))
+
+      ;; Remove tab-bar always.
+      ;; NOTE: if we do not test the value of frame parameter
+      ;; 'tab-bar-lines before set it, posframe will flicker when
+      ;; scroll.
+      (unless (equal (frame-parameter posframe--frame 'tab-bar-lines) 0)
+        (set-frame-parameter posframe--frame 'tab-bar-lines 0))
+      (when (version< "27.0" emacs-version)
+        (setq-local tab-line-format nil))
+
+      ;; If user set 'parent-frame to nil after run posframe-show.
+      ;; for cache reason, next call to posframe-show will be affected.
+      ;; so we should force set parent-frame again in this place.
+      (set-frame-parameter posframe--frame 'parent-frame parent-frame)
+
+      ;; Set text scale based on the parent frame text scale.
+      (text-scale-set
+       (funcall posframe-text-scale-factor-function parent-text-scale-mode-amount))
+
+      posframe--frame)))
+
+(defun posframe--find-existing-posframe (buffer &optional last-args)
+  "Find existing posframe with BUFFER and LAST-ARGS."
+  (let ((posframe
+         (cl-find-if
+          (lambda (frame)
+            (let* ((buffer-info (frame-parameter frame 'posframe-buffer))
+                   (buffer-equal-p
+                    (or (equal (buffer-name buffer) (car buffer-info))
+                        (equal buffer (cdr buffer-info)))))
+              (if last-args
+                  (and buffer-equal-p
+                       (equal last-args (frame-parameter frame 'last-args)))
+                buffer-equal-p)))
+          (frame-list))))
+    (when posframe
+      (set-frame-parameter posframe 'existing-posframe t))
+    posframe))
+
+(defun posframe-delete-frame (buffer-or-name)
+  "Delete posframe pertaining to BUFFER-OR-NAME.
+BUFFER-OR-NAME can be a buffer or a buffer name."
+  (let* ((buffer (get-buffer buffer-or-name))
+         (posframe (when buffer
+                     (posframe--find-existing-posframe buffer)))
+         ;; NOTE: `delete-frame' runs ‘delete-frame-functions’ before
+         ;; actually deleting the frame, unless the frame is a
+         ;; tooltip, posframe is a child-frame, but its function like
+         ;; a tooltip.
+         (delete-frame-functions nil))
+    (when posframe
+      (when (buffer-live-p buffer)
+        (with-current-buffer buffer
+          (dolist (timer '(posframe--refresh-timer
+                           posframe--timeout-timer))
+            (when (timerp timer)
+              (cancel-timer timer)))))
+      (delete-frame posframe))))
+
+(defun posframe--insert-string (string no-properties)
+  "Insert STRING to current buffer.
+If NO-PROPERTIES is non-nil, all properties of STRING
+will be removed."
+  (when (and string (stringp string))
+    (remove-text-properties
+     0 (length string) '(read-only t) string)
+    (let ((str (if no-properties
+                   (substring-no-properties string)
+                 string)))
+      (erase-buffer)
+      (insert str))))
+
+(defun posframe--set-frame-size (size-info)
+  "Set POSFRAME's size based on SIZE-INFO."
+  (let ((posframe (plist-get size-info :posframe))
+        (width (plist-get size-info :width))
+        (height (plist-get size-info :height))
+        (max-width (plist-get size-info :max-width))
+        (max-height (plist-get size-info :max-height))
+        (min-width (plist-get size-info :min-width))
+        (min-height (plist-get size-info :min-height)))
+    (cond
+     ((and width height)
+      (set-frame-size posframe
+                      (* (default-font-width) width)
+                      (* (default-line-height) height)
+                      t))
+     (height (set-frame-height posframe height))
+     (width (set-frame-width posframe width)))
+    (unless (and height width)
+      (posframe--fit-frame-to-buffer
+       posframe max-height min-height max-width min-width
+       (cond (width 'vertically)
+             (height 'horizontally))))
+    (setq-local posframe--last-posframe-size size-info)))
+
+(defun posframe--set-frame-size-and-position (size-info position parent-frame-width parent-frame-height)
+  (let ((posframe (plist-get size-info :posframe))
+        (width (plist-get size-info :width))
+        (height (plist-get size-info :height)))
+    (unless (and width height)
+      (user-error "Width and height must be specified together"))
+    (set-frame-size-and-position-pixelwise
+     posframe
+     (* (default-font-width) width)
+     (* (default-line-height) height)
+     (car position) (cdr position))
+    (posframe--save-new-posframe-position posframe position
+                                          parent-frame-width
+                                          parent-frame-height)
+    (posframe--make-frame-visible posframe)))
+
+(defun posframe--fit-frame-to-buffer (posframe max-height min-height max-width min-width only)
+  "POSFRAME version of function `fit-frame-to-buffer'.
+Arguments HEIGHT, MAX-HEIGHT, MIN-HEIGHT, WIDTH, MAX-WIDTH,
+MIN-WIDTH and ONLY are similar function `fit-frame-to-buffer''s."
+  ;; This only has effect if the user set the latter var to `hide'.
+  (let ((x-gtk-resize-child-frames posframe-gtk-resize-child-frames))
+    ;; More info: Don't skip empty lines when fitting mini frame to buffer (Bug#44080)
+    ;; http://git.savannah.gnu.org/cgit/emacs.git/commit/?id=e0de9f3295b4c46cb7198ec0b9634809d7b7a36d
+    (if (functionp 'fit-frame-to-buffer-1)
+        (fit-frame-to-buffer-1
+         posframe max-height min-height max-width min-width only nil nil)
+      (fit-frame-to-buffer
+       posframe max-height min-height max-width min-width only))))
+
+(defun posframe--run-refresh-timer (repeat size-info)
+  "Refresh POSFRAME every REPEAT seconds.
+
+It will set POSFRAME's size by SIZE-INFO."
+  (let ((posframe (plist-get size-info :posframe))
+        (width (plist-get size-info :width))
+        (height (plist-get size-info :height)))
+    (when (and (numberp repeat) (> repeat 0))
+      (unless (and width height)
+        (when (timerp posframe--refresh-timer)
+          (cancel-timer posframe--refresh-timer))
+        (setq-local posframe--refresh-timer
+                    (run-with-timer
+                     nil repeat
+                     (lambda (size-info)
+                       (let ((frame-resize-pixelwise t))
+                         (when (and posframe (frame-live-p posframe))
+                           (posframe--set-frame-size size-info))))
+                     size-info))))))
+
+;; Posframe's position handler
+(defun posframe-run-poshandler (info)
+  "Run posframe's position handler.
+
+the structure of INFO can be found in docstring
+of `posframe-show'."
+  (if (equal info posframe--last-poshandler-info)
+      posframe--last-posframe-pixel-position
+    (setq posframe--last-poshandler-info info)
+    (let* ((ref-position (plist-get info :ref-position))
+           (poshandler (posframe--get-valid-poshandler info))
+           (position (funcall poshandler info)))
+      (if (not ref-position)
+          position
+        (posframe--calculate-new-position
+         info position ref-position)))))
+
+(defun posframe--get-valid-poshandler (info)
+  "Get valid poshandler function with the help of INFO."
+  (or (plist-get info :poshandler)
+      (let ((position (plist-get info :position)))
+        (cond ((integerp position)
+               #'posframe-poshandler-point-bottom-left-corner)
+              ((and (consp position)
+                    (integerp (car position))
+                    (integerp (cdr position)))
+               #'posframe-poshandler-absolute-x-y)
+              (t (error "Posframe: have no valid poshandler"))))))
+
+(defun posframe--calculate-new-position (info position ref-position)
+  "Calculate new position according to INFO, POSITION and REF-POSITION."
+  (let* ((parent-frame-width (plist-get info :parent-frame-width))
+         (parent-frame-height (plist-get info :parent-frame-height))
+         (posframe-width (plist-get info :posframe-width))
+         (posframe-height (plist-get info :posframe-height))
+         (ref-x (or (car ref-position) 0))
+         (ref-y (or (cdr ref-position) 0))
+         (x (car position))
+         (y (cdr position)))
+    (when (< x 0)
+      (setq x (- (+ x parent-frame-width) posframe-width)))
+    (when (< y 0)
+      (setq y (- (+ y parent-frame-height) posframe-height)))
+    (cons (+ ref-x x)
+          (+ ref-y y))))
+
+(defun posframe--set-frame-position (posframe position
+                                              parent-frame-width
+                                              parent-frame-height)
+  "Move POSFRAME to POSITION.
+This need PARENT-FRAME-WIDTH and PARENT-FRAME-HEIGHT"
+  (unless (and (equal position posframe--last-posframe-pixel-position)
+               ;; When working frame's size change, re-posit
+               ;; the posframe.
+               (equal posframe--last-parent-frame-size
+                      (cons parent-frame-width parent-frame-height))
+               (or (and (>= (car position) 0)
+                        (>= (cdr position) 0))
+                   (equal posframe--last-posframe-displayed-size
+                          (cons (frame-pixel-width posframe)
+                                (frame-pixel-height posframe)))))
+    (set-frame-position posframe (car position) (cdr position))
+    (posframe--save-new-posframe-position posframe position
+                                          parent-frame-width
+                                          parent-frame-height))
+  (posframe--make-frame-visible posframe))
+
+(defun posframe--save-new-posframe-position (posframe
+                                             position
+                                             parent-frame-width
+                                             parent-frame-height)
+  (setq-local posframe--last-posframe-pixel-position position)
+  (setq-local posframe--last-parent-frame-size
+              (cons parent-frame-width parent-frame-height))
+  (setq-local posframe--last-posframe-displayed-size
+              (cons (frame-pixel-width posframe)
+                    (frame-pixel-height posframe))))
+
+(defun posframe--make-frame-visible (posframe)
+  "Let POSFRAME visible and redraw it when needed."
+  (unless (frame-visible-p posframe)
+    (make-frame-visible posframe)
+    (when (posframe--posframe-need-redraw-p posframe)
+      (redraw-frame posframe))))
+
+(defun posframe--posframe-need-redraw-p (posframe)
+  "Test POSFRAME need to redraw or not."
+  ;; When posframe is found by `posframe--find-existing-posframe',
+  ;; it need to redraw, more info:
+  ;; 1. https://github.com/tumashu/ivy-posframe/pull/30
+  ;; 2. https://github.com/tumashu/posframe/pull/118
+  (frame-parameter posframe 'existing-posframe))
+
+(defun posframe--run-timeout-timer (posframe secs)
+  "Hide POSFRAME after a delay of SECS seconds."
+  (when (and (numberp secs) (> secs 0))
+    (when (timerp posframe--timeout-timer)
+      (cancel-timer posframe--timeout-timer))
+    (setq-local posframe--timeout-timer
+                (run-with-timer
+                 secs nil #'posframe--make-frame-invisible posframe))))
+
+(defun posframe--make-frame-invisible (frame)
+  "`make-frame-invisible' replacement to hide FRAME safely."
+  (when (and (frame-live-p frame)
+             (frame-visible-p frame))
+    (make-frame-invisible frame)))
+
+(defun posframe-mouse-banish-simple (info)
+  "Banish mouse to (0, 0) of posframe base on INFO."
+  (let ((parent-frame (plist-get info :parent-frame))
+        (x (plist-get info :posframe-x))
+        (y (plist-get info :posframe-y))
+        (w (plist-get info :posframe-width))
+        (h (plist-get info :posframe-height))
+        (p-w (plist-get info :parent-frame-width))
+        (p-h (plist-get info :parent-frame-height)))
+    (set-mouse-pixel-position
+     parent-frame
+     (if (= x 0)
+         (min p-w (+ w 5))
+       (max 0 (- x 5)))
+     (if (= y 0)
+         (min p-h (+ h 10))
+       (max 0 (- y 10))))))
+
+(defun posframe-mouse-banish-default (info)
+  "Banish mouse base on INFO.
+
+FIXME: This is a hacky fix for the mouse focus problem, which like:
+https://github.com/tumashu/posframe/issues/4#issuecomment-357514918"
+  (let* ((parent-frame (plist-get info :parent-frame))
+         (m-x (plist-get info :mouse-x))
+         (m-y (plist-get info :mouse-y))
+         (x (plist-get info :posframe-x))
+         (y (plist-get info :posframe-y))
+         (w (plist-get info :posframe-width))
+         (h (plist-get info :posframe-height))
+         (p-w (plist-get info :parent-frame-width))
+         (p-h (plist-get info :parent-frame-height)))
+    (when (and m-x m-y
+               (>= m-x x)
+               (<= m-x (+ x w))
+               (>= m-y y)
+               (<= m-y (+ y h)))
+      (set-mouse-pixel-position
+       parent-frame
+       (if (= x 0)
+           (min p-w (+ w 5))
+         (max 0 (- x 5)))
+       (if (= y 0)
+           (min p-h (+ h 10))
+         (max 0 (- y 10)))))))
+
+(defun posframe-refresh (buffer-or-name)
+  "Refresh posframe pertaining to BUFFER-OR-NAME.
+
+For example:
+
+   (defvar buf \" *test*\")
+   (posframe-show buf)
+
+   (with-current-buffer buf
+     (erase-buffer)
+     (insert \"ffffffffffffff\")
+     (posframe-refresh buf))
+
+User can use posframe-show's :refresh argument,
+to do similar job:
+
+   (defvar buf \" *test*\")
+   (posframe-show buf :refresh 0.25)
+
+   (with-current-buffer buf
+     (erase-buffer)
+     (insert \"ffffffffffffff\"))"
+  (dolist (frame (frame-list))
+    (let ((buffer-info (frame-parameter frame 'posframe-buffer))
+          (frame-resize-pixelwise t))
+      (when (or (equal buffer-or-name (car buffer-info))
+                (equal buffer-or-name (cdr buffer-info)))
+        (with-current-buffer buffer-or-name
+          (posframe--set-frame-size posframe--last-posframe-size))))))
+
+;;;###autoload
+(defun posframe-hide-all ()
+  "Hide all posframe frames."
+  (interactive)
+  (dolist (frame (frame-list))
+    (when (frame-parameter frame 'posframe-buffer)
+      (posframe--make-frame-invisible frame))))
+
+(defun posframe-hide (buffer-or-name)
+  "Hide posframe pertaining to BUFFER-OR-NAME.
+BUFFER-OR-NAME can be a buffer or a buffer name."
+  ;; Make sure buffer-list-update-hook is nil when posframe-hide is
+  ;; called, otherwise:
+  ;;   (add-hook 'buffer-list-update-hook  #'posframe-hide)
+  ;; will lead to infinite recursion.
+  (when buffer-or-name
+    (let ((buffer-list-update-hook nil))
+      (dolist (frame (frame-list))
+        (let ((buffer-info (frame-parameter frame 'posframe-buffer)))
+          (when (or (equal buffer-or-name (car buffer-info))
+                    (equal buffer-or-name (cdr buffer-info)))
+            (posframe--make-frame-invisible frame)))))))
+
+(defun posframe-hidehandler-daemon ()
+  "Run posframe hidehandler daemon."
+  (when (timerp posframe-hidehandler-timer)
+    (cancel-timer posframe-hidehandler-timer))
+  (setq posframe-hidehandler-timer
+        (run-with-idle-timer 0.5 t #'posframe-hidehandler-daemon-function)))
+
+(defun posframe-hidehandler-daemon-function ()
+  "Posframe hidehandler daemon function."
+  (ignore-errors
+    (dolist (frame (frame-list))
+      (let ((hidehandler (frame-parameter frame 'posframe-hidehandler))
+            (buffer (frame-parameter frame 'posframe-buffer))
+            (parent-buffer (frame-parameter frame 'posframe-parent-buffer)))
+        (when (and hidehandler
+                   (funcall hidehandler
+                            (list
+                             :posframe-buffer buffer
+                             :posframe-parent-buffer parent-buffer)))
+          (posframe--make-frame-invisible frame))))))
+
+(posframe-hidehandler-daemon)
+
+(defun posframe-hidehandler-when-buffer-switch (info)
+  "Posframe hidehandler function.
+
+This function let posframe hide when user switch buffer.
+Note: This function is called in `post-command-hook'.
+Argument INFO ."
+  (let ((parent-buffer (cdr (plist-get info :posframe-parent-buffer))))
+    (and (buffer-live-p parent-buffer)
+         (not (equal parent-buffer (current-buffer))))))
+
+;;;###autoload
+(defun posframe-delete-all ()
+  "Delete all posframe frames and buffers."
+  (interactive)
+  (dolist (frame (frame-list))
+    (when (frame-parameter frame 'posframe-buffer)
+      (let ((delete-frame-functions nil))
+        (delete-frame frame))))
+  (dolist (buffer (buffer-list))
+    (with-current-buffer buffer
+      (when posframe--frame
+        (posframe--kill-buffer buffer)))))
+
+(defun posframe--kill-buffer (buffer-or-name)
+  "Kill posframe's buffer: BUFFER-OR-NAME.
+BUFFER-OR-NAME can be a buffer or a buffer name."
+  (when (buffer-live-p (get-buffer buffer-or-name))
+    (kill-buffer buffer-or-name)))
+
+(defun posframe-delete (buffer-or-name)
+  "Delete posframe pertaining to BUFFER-OR-NAME and kill the buffer.
+BUFFER-OR-NAME can be a buffer or a buffer name.
+
+This function is not commonly used, for delete and recreate
+posframe is very very slowly, `posframe-hide' is more useful."
+  (posframe-delete-frame buffer-or-name)
+  (posframe--kill-buffer buffer-or-name))
+
+(defun posframe-funcall (buffer-or-name function &rest arguments)
+  "Select posframe of BUFFER-OR-NAME and call FUNCTION with ARGUMENTS.
+BUFFER-OR-NAME can be a buffer or a buffer name."
+  (when (functionp function)
+    (when (get-buffer buffer-or-name)
+      (with-current-buffer buffer-or-name
+        (when (framep posframe--frame)
+          (with-selected-frame posframe--frame
+            (apply function arguments)))))))
+
+(defun posframe-poshandler-absolute-x-y (info)
+  "Posframe's position handler.
+
+This poshandler function deal with (integer . integer) style
+position.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (let ((position (plist-get info :position))
+        (x-pixel-offset (plist-get info :x-pixel-offset))
+        (y-pixel-offset (plist-get info :y-pixel-offset)))
+    (cons (+ (car position) x-pixel-offset)
+          (+ (cdr position) y-pixel-offset))))
+
+(defun posframe-poshandler-point-1 (info &optional font-height upward)
+  "The internal function used to deal with point-poshandler.
+Argument INFO .
+
+Optional arguments: FONT-HEIGHT and UPWARD."
+  (let* ((x-pixel-offset (plist-get info :x-pixel-offset))
+         (y-pixel-offset (plist-get info :y-pixel-offset))
+         (posframe-width (plist-get info :posframe-width))
+         (posframe-height (plist-get info :posframe-height))
+         (window (plist-get info :parent-window))
+         (xmax (plist-get info :parent-frame-width))
+         (ymax (plist-get info :parent-frame-height))
+         (position-info (plist-get info :position))
+         (position-info
+          (if (integerp position-info)
+              (posn-at-point position-info window)
+            position-info))
+         (header-line-height (plist-get info :header-line-height))
+         (tab-line-height (plist-get info :tab-line-height))
+         (x (+ (car (window-inside-pixel-edges window))
+               (- (or (car (posn-x-y position-info)) 0)
+                  (or (car (posn-object-x-y position-info)) 0))
+               x-pixel-offset))
+         (y-top (+ (cadr (window-pixel-edges window))
+                   tab-line-height
+                   header-line-height
+                   (- (or (cdr (posn-x-y position-info)) 0)
+                      ;; Fix the conflict with flycheck
+                      ;; http://lists.gnu.org/archive/html/emacs-devel/2018-01/msg00537.html
+                      (or (cdr (posn-object-x-y position-info)) 0))
+                   y-pixel-offset))
+         (font-height (or font-height (plist-get info :font-height)))
+         (y-bottom (+ y-top font-height)))
+    (cons (max 0 (min x (- xmax (or posframe-width 0))))
+          (max 0 (if (if upward
+                         (> (- y-bottom (or posframe-height 0)) 0)
+                       (> (+ y-bottom (or posframe-height 0)) ymax))
+                     (- y-top (or posframe-height 0))
+                   y-bottom)))))
+
+(defun posframe-poshandler-point-bottom-left-corner (info)
+  "Posframe's position handler.
+
+This poshandler function let top left corner of posframe align to
+bottom left corner of point.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (posframe-poshandler-point-1 info))
+
+(defun posframe-poshandler-point-window-center (info)
+  "Posframe's position handler.
+
+This poshandler function let center of posframe vertical align to
+center of window and top edge of posframe horizontal align to
+buttom edge of current point.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (let ((x (car (posframe-poshandler-window-top-center info)))
+        (y (cdr (posframe-poshandler-point-bottom-left-corner info))))
+    (cons x y)))
+
+(defun posframe-poshandler-point-frame-center (info)
+  "Posframe's position handler.
+
+This poshandler function let center of posframe vertical align to
+center of frame and top edge of posframe horizontal align to
+buttom edge of current point.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (let ((x (car (posframe-poshandler-frame-top-center info)))
+        (y (cdr (posframe-poshandler-point-bottom-left-corner info))))
+    (cons x y)))
+
+(defun posframe-poshandler-point-bottom-left-corner-upward (info)
+  "Posframe's position handler.
+
+This poshandler function let bottom left corner of posframe align
+to bottom left corner of point.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (posframe-poshandler-point-1 info nil t))
+
+(defun posframe-poshandler-point-top-left-corner (info)
+  "Posframe's position handler.
+
+This poshandler function let top left corner of posframe align to
+top left corner of point.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (let ((font-height 0))
+    (posframe-poshandler-point-1 info font-height)))
+
+(defun posframe-poshandler-frame-center (info)
+  "Posframe's position handler.
+
+This poshandler function let center of posframe align to center
+of frame.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (cons (/ (- (plist-get info :parent-frame-width)
+              (plist-get info :posframe-width))
+           2)
+        (/ (- (plist-get info :parent-frame-height)
+              (plist-get info :posframe-height))
+           2)))
+
+(defun posframe-poshandler-frame-top-center (info)
+  "Posframe's position handler.
+
+This poshandler function let top edge center of posframe align
+to top edge center of frame.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (cons (/ (- (plist-get info :parent-frame-width)
+              (plist-get info :posframe-width))
+           2)
+        0))
+
+(defun posframe-poshandler-frame-top-left-corner (_info)
+  "Posframe's position handler.
+
+This poshandler function let top left corner of posframe align to
+top left corner of frame.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  '(0 . 0))
+
+(defun posframe-poshandler-frame-top-right-corner (_info)
+  "Posframe's position handler.
+
+This poshandler function let top right corner of posframe align to
+top right corner of frame.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  '(-1 . 0))
+
+(defun posframe-poshandler-frame-top-left-or-right-other-corner (info)
+  "Posframe's position handler.
+
+This poshandler function let posframe align to top left or top right
+corner of frame, based on whether current window is relatively at left
+or right in the current frame.  If window is at left, place posframe on
+right, and vice versa.  (This is calculated by whether current window
+center is left or right to frame center.)
+
+The structure of INFO can be found in docstring of `posframe-show'."
+  (let ((window-left (plist-get info :parent-window-left))
+        (window-width (plist-get info :parent-window-width))
+        (frame-width (plist-get info :parent-frame-width)))
+    ;; when equal, put posframe on right because content in window tend to be on left
+    (if (<= (+ window-left (/ window-width 2))
+            (/ frame-width 2))
+        '(-1 . 0)
+      '(0 . 0))))
+
+(defun posframe-poshandler-frame-bottom-left-corner (info)
+  "Posframe's position handler.
+
+This poshandler function let bottom left corner of posframe align
+to buttom left corner of frame.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (cons 0 (- 0
+             (plist-get info :mode-line-height)
+             (plist-get info :minibuffer-height))))
+
+(defun posframe-poshandler-frame-bottom-right-corner (info)
+  "Posframe's position handler.
+
+This poshandler function let bottom right corner of posframe
+align to buttom right corner of frame.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (cons -1 (- 0
+              (plist-get info :mode-line-height)
+              (plist-get info :minibuffer-height))))
+
+(defun posframe-poshandler-frame-bottom-center (info)
+  "Posframe's position handler.
+
+This poshandler function let bottom edge center of posframe align
+to buttom edge center of frame.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (cons (/ (- (plist-get info :parent-frame-width)
+              (plist-get info :posframe-width))
+           2)
+        (- (plist-get info :parent-frame-height)
+           (plist-get info :posframe-height)
+           (plist-get info :mode-line-height)
+           (plist-get info :minibuffer-height))))
+
+(defun posframe-poshandler-window-center (info)
+  "Posframe's position handler.
+
+This poshandler function let center of posframe align to center
+of window.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (let* ((window-left (plist-get info :parent-window-left))
+         (window-top (plist-get info :parent-window-top))
+         (window-width (plist-get info :parent-window-width))
+         (window-height (plist-get info :parent-window-height))
+         (posframe-width (plist-get info :posframe-width))
+         (posframe-height (plist-get info :posframe-height)))
+    (cons (max 0 (+ window-left (/ (- window-width posframe-width) 2)))
+          (max 0 (+ window-top (/ (- window-height posframe-height) 2))))))
+
+(defun posframe-poshandler-window-top-left-corner (info)
+  "Posframe's position handler.
+
+This poshandler function let top left corner of posframe align to
+top left corner of window.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (let* ((window-left (plist-get info :parent-window-left))
+         (window-top (plist-get info :parent-window-top)))
+    (cons window-left
+          window-top)))
+
+(defun posframe-poshandler-window-top-right-corner (info)
+  "Posframe's position handler.
+
+This poshandler function let top right corner of posframe align to
+top left right of window.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (let* ((window-left (plist-get info :parent-window-left))
+         (window-top (plist-get info :parent-window-top))
+         (window-width (plist-get info :parent-window-width))
+         (posframe-width (plist-get info :posframe-width)))
+    (cons (+ window-left window-width
+             (- 0 posframe-width))
+          window-top)))
+
+(defun posframe-poshandler-window-top-center (info)
+  "Posframe's position handler.
+
+This poshandler function let top edge center of posframe align to
+top edge center of window.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (let* ((window-left (plist-get info :parent-window-left))
+         (window-top (plist-get info :parent-window-top))
+         (window-width (plist-get info :parent-window-width))
+         (posframe-width (plist-get info :posframe-width)))
+    (cons (max 0 (+ window-left (/ (- window-width posframe-width) 2)))
+          window-top)))
+
+(defun posframe-poshandler-window-bottom-left-corner (info)
+  "Posframe's position handler.
+
+This poshandler function let bottom left corner of posframe align to
+bottom left corner of window.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (let* ((window-left (plist-get info :parent-window-left))
+         (window-top (plist-get info :parent-window-top))
+         (window-height (plist-get info :parent-window-height))
+         (posframe-height (plist-get info :posframe-height))
+         (mode-line-height (plist-get info :mode-line-height)))
+    (cons window-left
+          (+ window-top window-height
+             (- 0 mode-line-height posframe-height)))))
+
+(defun posframe-poshandler-window-bottom-right-corner (info)
+  "Posframe's position handler.
+
+This poshandler function let bottom right corner of posframe
+align to bottom right corner of window.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (let* ((window-left (plist-get info :parent-window-left))
+         (window-top (plist-get info :parent-window-top))
+         (window-width (plist-get info :parent-window-width))
+         (window-height (plist-get info :parent-window-height))
+         (posframe-width (plist-get info :posframe-width))
+         (posframe-height (plist-get info :posframe-height))
+         (mode-line-height (plist-get info :mode-line-height)))
+    (cons (+ window-left window-width
+             (- 0 posframe-width))
+          (+ window-top window-height
+             (- 0 mode-line-height posframe-height)))))
+
+(defun posframe-poshandler-window-bottom-center (info)
+  "Posframe's position handler.
+
+This poshandler function let bottom edge center of posframe align
+to bottom edge center of window.
+
+The structure of INFO can be found in docstring of
+`posframe-show'."
+  (let* ((window-left (plist-get info :parent-window-left))
+         (window-top (plist-get info :parent-window-top))
+         (window-width (plist-get info :parent-window-width))
+         (window-height (plist-get info :parent-window-height))
+         (posframe-width (plist-get info :posframe-width))
+         (posframe-height (plist-get info :posframe-height))
+         (mode-line-height (plist-get info :mode-line-height)))
+    (cons (max 0 (+ window-left (/ (- window-width posframe-width) 2)))
+          (+ window-top window-height
+             (- 0 mode-line-height posframe-height)))))
+
+(defun posframe-refposhandler-xwininfo (&optional frame)
+  "Parent FRAME poshander function.
+Get the position of parent frame (current frame) with the help of
+xwininfo."
+  (when (executable-find "xwininfo")
+    (with-temp-buffer
+      (let ((case-fold-search nil))
+        (call-process "xwininfo" nil t nil
+                      "-display" (frame-parameter frame 'display)
+                      "-id"  (frame-parameter frame 'window-id))
+        (goto-char (point-min))
+        (search-forward "Absolute upper-left")
+        (let ((x (string-to-number
+                  (buffer-substring-no-properties
+                   (search-forward "X: ")
+                   (line-end-position))))
+              (y (string-to-number
+                  (buffer-substring-no-properties
+                   (search-forward "Y: ")
+                   (line-end-position)))))
+          (cons x y))))))
+
+(if (version< emacs-version "27.1")
+    (with-no-warnings
+      (add-hook 'focus-in-hook #'posframe--redirect-posframe-focus))
+  (add-function :after after-focus-change-function #'posframe--redirect-posframe-focus))
+
+(defun posframe--redirect-posframe-focus ()
+  "Redirect focus from the posframe to the parent frame.
+This prevents the posframe from catching keyboard input if the
+window manager selects it."
+  (when (and (eq (selected-frame) posframe--frame)
+             ;; Do not redirect focus when posframe can accept focus.
+             ;; See posframe-show's accept-focus argument.
+             (not posframe--accept-focus))
+    (redirect-frame-focus posframe--frame (frame-parent))))
+
+(defun posframe-text-scale-factor-default (parent-text-scale-mode-amount)
+  "Return PARENT-TEXT-SCALE-MODE-AMOUNT or 0 if it is nil.
+This ensures text scale factor is always a number for posframe display."
+  (or parent-text-scale-mode-amount 0))
+
+(provide 'posframe)
+
+;;; posframe.el ends here
diff --git a/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe.elc b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe.elc
new file mode 100644
index 0000000..f9abbae
Binary files /dev/null and b/emacs/.emacs.d/elpa/posframe-20260816.2356/posframe.elc differ
diff --git a/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-autoloads.el b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-autoloads.el
new file mode 100644
index 0000000..f37fb21
--- /dev/null
+++ b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-autoloads.el
@@ -0,0 +1,988 @@
+;;; projectile-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from projectile.el
+
+(autoload 'projectile-version "projectile" "\
+Get the Projectile version as string.
+
+If called interactively or if SHOW-VERSION is non-nil, show the
+version in the echo area and the messages buffer.
+
+The returned string includes both, the version from package.el
+and the library version, if both are present and different.
+
+If the version number could not be determined, signal an error,
+if called interactively, or if SHOW-VERSION is non-nil, otherwise
+just return nil.
+
+(fn &optional SHOW-VERSION)" t)
+(autoload 'projectile-invalidate-cache "projectile" "\
+Remove the current project's files from `projectile-projects-cache'.
+
+With a prefix argument PROMPT prompts for the name of the project whose cache
+to invalidate.
+
+The global (project-independent) cache for checking which project a file
+belongs to, is also cleared. Therefore this function is still useful even
+when not operating on a specific project, and as such only the global cache
+is cleared when there is no current project (unless you give a prefix
+argument).
+
+(fn PROMPT)" t)
+(autoload 'projectile-invalidate-cache-all "projectile" "\
+Invalidate the caches of every known project.
+
+Runs the same per-project invalidation as `projectile-invalidate-cache'
+over all projects in `projectile-known-projects' (plus any project that
+only has an entry in `projectile-projects-cache'), and also clears the
+global project root and file-existence caches.  When persistent caching
+is enabled the projects' on-disk cache files are deleted too.
+
+Remote (TRAMP) projects are skipped, as touching each one could mean a
+slow connection round-trip per project; invalidate those individually
+with `projectile-invalidate-cache'." t)
+(autoload 'projectile-discard-root-cache "projectile" "\
+Clear `projectile-project-root-cache' without touching other caches.
+Useful after creating, removing, or moving a project marker (e.g.
+`.projectile' or `.git') - Projectile would otherwise keep returning
+its previously cached answer for that directory.
+
+See also `projectile-invalidate-cache', which does this and also drops
+the per-project file list and project-type caches." t)
+(autoload 'projectile-purge-file-from-cache "projectile" "\
+Purge FILE from the cache of the current project.
+
+(fn FILE)" t)
+(autoload 'projectile-purge-dir-from-cache "projectile" "\
+Purge DIR from the cache of the current project.
+
+(fn DIR)" t)
+(autoload 'projectile-cache-current-file "projectile" "\
+Add the currently visited file to the cache.
+PROJECT-ROOT defaults to the current project.
+
+(fn &optional PROJECT-ROOT)" t)
+(autoload 'projectile-discover-projects-in-directory "projectile" "\
+Discover any projects in DIRECTORY and add them to the projectile cache.
+
+If DEPTH is non-nil recursively descend exactly DEPTH levels below DIRECTORY and
+discover projects there.
+
+(fn DIRECTORY &optional DEPTH)" t)
+(autoload 'projectile-index-project-async "projectile" "\
+Index PROJECT-ROOT in the background and populate the files cache.
+
+This warms `projectile-projects-cache' without blocking Emacs, so a
+later `projectile-find-file' (or any command that lists project files)
+finds the cache already populated instead of indexing synchronously.
+
+Only the external-command indexing methods (`alien' and `hybrid') can be
+warmed this way; under `native' indexing this is a no-op with a message,
+since the Elisp directory walk cannot run off the main thread.  Warming
+also requires caching to be enabled.
+
+When PROJECT-ROOT is omitted the current project is used.  Returns the
+indexing process, or nil when nothing was started.
+
+(fn &optional PROJECT-ROOT)" t)
+(autoload 'projectile-switch-to-buffer "projectile" "\
+Switch to a project buffer." t)
+ (autoload 'projectile-switch-to-buffer-other-window "projectile" nil t)
+ (autoload 'projectile-switch-to-buffer-other-frame "projectile" nil t)
+(autoload 'projectile-display-buffer "projectile" "\
+Display a project buffer in another window without selecting it." t)
+(autoload 'projectile-project-buffers-other-buffer "projectile" "\
+Switch to the most recently selected buffer project buffer.
+Only buffers not visible in windows are returned." t)
+(autoload 'projectile-multi-occur "projectile" "\
+Do a `multi-occur' in the project's buffers.
+With a prefix argument, show NLINES of context.
+
+(fn &optional NLINES)" t)
+(autoload 'projectile-find-other-file "projectile" "\
+Switch between files with the same name but different extensions.
+With FLEX-MATCHING, match any file that contains the base name of current file.
+Other file extensions can be customized with the variable
+`projectile-other-file-alist'.
+
+(fn &optional FLEX-MATCHING)" t)
+ (autoload 'projectile-find-other-file-other-window "projectile" nil t)
+ (autoload 'projectile-find-other-file-other-frame "projectile" nil t)
+(autoload 'projectile-find-file-dwim "projectile" "\
+Jump to a project's files using completion based on context.
+
+With a prefix arg INVALIDATE-CACHE invalidates the cache first.
+
+If point is on a filename, Projectile first tries to search for that
+file in project:
+
+- If it finds just a file, it switches to that file instantly.  This works
+even if the filename is incomplete, but there's only a single file in the
+current project that matches the filename at point.  For example, if
+there's only a single file named \"projectile/projectile.el\" but the
+current filename is \"projectile/proj\" (incomplete),
+`projectile-find-file-dwim' still switches to \"projectile/projectile.el\"
+immediately because this is the only filename that matches.
+
+- If it finds a list of files, the list is displayed for selecting.  A list
+of files is displayed when a filename appears more than one in the project
+or the filename at point is a prefix of more than two files in a project.
+For example, if `projectile-find-file-dwim' is executed on a filepath like
+\"projectile/\", it lists the content of that directory.  If it is executed
+on a partial filename like \"projectile/a\", a list of files with character
+\"a\" in that directory is presented.
+
+- If it finds nothing, display a list of all files in project for selecting.
+
+(fn &optional INVALIDATE-CACHE)" t)
+ (autoload 'projectile-find-file-dwim-other-window "projectile" nil t)
+ (autoload 'projectile-find-file-dwim-other-frame "projectile" nil t)
+(autoload 'projectile-find-file "projectile" "\
+Jump to a project's file using completion.
+With a prefix arg INVALIDATE-CACHE invalidates the cache first.
+
+(fn &optional INVALIDATE-CACHE)" t)
+ (autoload 'projectile-find-file-other-window "projectile" nil t)
+ (autoload 'projectile-find-file-other-frame "projectile" nil t)
+(autoload 'projectile-find-file-all "projectile" "\
+Jump to any file in the project, ignoring VCS and projectile ignore rules.
+This lists all files under the project root using a generic file listing
+command (fd or find), bypassing `.gitignore', `.projectile', and other
+ignore mechanisms." t)
+(autoload 'projectile-toggle-project-read-only "projectile" "\
+Toggle project read only." t)
+(autoload 'projectile-add-dir-local-variable "projectile" "\
+Run `add-dir-local-variable' with .dir-locals.el in root of project.
+
+Parameters MODE VARIABLE VALUE are passed directly to `add-dir-local-variable'.
+
+(fn MODE VARIABLE VALUE)")
+(autoload 'projectile-delete-dir-local-variable "projectile" "\
+Run `delete-dir-local-variable' with .dir-locals.el in root of project.
+
+Parameters MODE VARIABLE VALUE are passed directly to
+`delete-dir-local-variable'.
+
+(fn MODE VARIABLE)")
+(autoload 'projectile-find-dir "projectile" "\
+Jump to a project's directory using completion.
+
+With a prefix arg INVALIDATE-CACHE invalidates the cache first.
+
+(fn &optional INVALIDATE-CACHE)" t)
+ (autoload 'projectile-find-dir-other-window "projectile" nil t)
+ (autoload 'projectile-find-dir-other-frame "projectile" nil t)
+(autoload 'projectile-find-test-file "projectile" "\
+Jump to a project's test file using completion.
+
+With a prefix arg INVALIDATE-CACHE invalidates the cache first.
+
+(fn &optional INVALIDATE-CACHE)" t)
+ (autoload 'projectile-find-related-file-other-window "projectile" nil t)
+ (autoload 'projectile-find-related-file-other-frame "projectile" nil t)
+(autoload 'projectile-find-related-file "projectile" "\
+Open related file." t)
+(autoload 'projectile-related-files-fn-groups "projectile" "\
+Generate a related-files-fn which relates as KIND for files in each of GROUPS.
+
+(fn KIND GROUPS)")
+(autoload 'projectile-related-files-fn-extensions "projectile" "\
+Generate a related-files-fn which relates as KIND for files having EXTENSIONS.
+
+(fn KIND EXTENSIONS)")
+(autoload 'projectile-related-files-fn-test-with-prefix "projectile" "\
+Generate a related-files-fn which relates tests and impl.
+Use files with EXTENSION based on TEST-PREFIX.
+
+(fn EXTENSION TEST-PREFIX)")
+(autoload 'projectile-related-files-fn-test-with-suffix "projectile" "\
+Generate a related-files-fn which relates tests and impl.
+Use files with EXTENSION based on TEST-SUFFIX.
+
+(fn EXTENSION TEST-SUFFIX)")
+(autoload 'projectile-find-file-of-kind "projectile" "\
+Jump to a project file of a chosen file kind using completion.
+
+Prompt for one of the current project type's file kinds (see the
+`:file-kinds' keyword of `projectile-register-project-type') and then
+complete over all project files belonging to that kind.  With a prefix
+arg INVALIDATE-CACHE invalidates the cache first.
+
+(fn &optional INVALIDATE-CACHE)" t)
+ (autoload 'projectile-find-file-of-kind-other-window "projectile" nil t)
+ (autoload 'projectile-find-file-of-kind-other-frame "projectile" nil t)
+(autoload 'projectile-toggle-related-file "projectile" "\
+Jump between the current file and its related files of other kinds.
+
+This is the file-kinds generalization of
+`projectile-toggle-between-implementation-and-test'.  The current file's
+kind and resource key are detected from the project type's `:file-kinds'
+declaration and its related files (files of other kinds sharing the same
+key) are collected in table order.  When exactly one related kind exists
+it is opened immediately; when several exist the first invocation prompts
+for the kind, and repeated invocations cycle through them in table order." t)
+(autoload 'projectile-project-info "projectile" "\
+Display info for current project." t)
+(autoload 'projectile-find-changed-file "projectile" "\
+Jump to a file changed in the current project.
+
+That is everything git reports as staged, unstaged or untracked.  With a
+prefix ARG you are asked for a revision to compare against instead - a
+branch, say - and the candidates become everything that differs from it,
+which is the \"what did this branch touch\" list.
+
+Only git projects are supported.
+
+(fn &optional ARG)" t)
+ (autoload 'projectile-find-implementation-or-test-other-window "projectile" nil t)
+ (autoload 'projectile-find-implementation-or-test-other-frame "projectile" nil t)
+(autoload 'projectile-toggle-between-implementation-and-test "projectile" "\
+Toggle between an implementation file and its test file.
+
+
+See the documentation of `projectile--find-matching-file' and
+`projectile--find-matching-test' for how implementation and test files
+are determined." t)
+(autoload 'projectile-search "projectile" "\
+Search the project for SEARCH-TERM using `projectile-search-backend'.
+
+With a prefix argument treat SEARCH-TERM as a regular expression (for the
+backends that distinguish literal from regexp searches).
+
+The backend is chosen from `projectile-search-backends' according to
+`projectile-search-backend'; register new ones with
+`projectile-register-search-backend'.
+
+(fn &optional SEARCH-TERM REGEXP)" t)
+(autoload 'projectile-grep "projectile" "\
+Perform rgrep in the project (the grep `projectile-search' backend).
+
+With a prefix ARG asks for files (globbing-aware) which to grep in.
+With prefix ARG of `-' (such as `M--'), default the files (without prompt),
+to `projectile-grep-default-files'.
+
+With REGEXP given, don't query the user for a regexp.
+
+(fn &optional REGEXP ARG)" t)
+(autoload 'projectile-ag "projectile" "\
+Run an ag search with SEARCH-TERM in the project.
+This is `projectile-search' with the ag backend.
+
+With an optional prefix argument ARG SEARCH-TERM is interpreted as a
+regular expression.
+
+(fn SEARCH-TERM &optional ARG)" t)
+(autoload 'projectile-ripgrep "projectile" "\
+Run a ripgrep (rg) search with SEARCH-TERM in the project.
+This is `projectile-search' with the ripgrep backend.
+
+With an optional prefix argument ARG SEARCH-TERM is interpreted as a
+regular expression.
+
+This command depends on the Emacs packages ripgrep or rg being
+installed to work.
+
+(fn SEARCH-TERM &optional ARG)" t)
+(autoload 'projectile-run-command-in-root "projectile" "\
+Invoke `execute-extended-command' in the project's root." t)
+(autoload 'projectile-run-shell-command-in-root "projectile" "\
+Invoke `shell-command' in the project's root.
+
+(fn COMMAND &optional OUTPUT-BUFFER ERROR-BUFFER)" t)
+(autoload 'projectile-run-async-shell-command-in-root "projectile" "\
+Invoke `async-shell-command' in the project's root.
+
+(fn COMMAND &optional OUTPUT-BUFFER ERROR-BUFFER)" t)
+(autoload 'projectile-run-gdb "projectile" "\
+Invoke `gdb' in the project's root." t)
+(autoload 'projectile-run "projectile" "\
+Run a shell, REPL or terminal in the project root.
+
+The backend is chosen from `projectile-shell-backends' according to
+`projectile-shell-backend'; register new ones with
+`projectile-register-shell-backend'.
+
+With a prefix ARG, start a fresh process instead of reusing an existing
+one.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-run-shell "projectile" "\
+Invoke `shell' in the project's root (the shell `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-run-eshell "projectile" "\
+Invoke `eshell' in the project's root (the eshell `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-run-ielm "projectile" "\
+Invoke `ielm' in the project's root (the ielm `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-run-term "projectile" "\
+Invoke `term' in the project's root (the term `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-run-vterm "projectile" "\
+Invoke `vterm' in the project's root (the vterm `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead.
+
+(fn &optional ARG)" t)
+ (autoload 'projectile-run-vterm-other-window "projectile" nil t)
+(autoload 'projectile-run-eat "projectile" "\
+Invoke `eat' in the project's root (the eat `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead.
+
+(fn &optional ARG)" t)
+ (autoload 'projectile-run-eat-other-window "projectile" nil t)
+(autoload 'projectile-run-ghostel "projectile" "\
+Invoke `ghostel' in the project's root (the ghostel `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead.
+
+(fn &optional ARG)" t)
+ (autoload 'projectile-run-ghostel-other-window "projectile" nil t)
+(autoload 'projectile-replace "projectile" "\
+Replace a literal string in the project's files.
+
+With a prefix argument ARG prompts you for a directory and file name patterns
+on which to run the replacement.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-replace-regexp "projectile" "\
+Replace a regexp in the project's files.
+
+With a prefix argument ARG prompts you for a directory on which
+to run the replacement.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-replace-undo "projectile" "\
+Revert the last project-wide replace applied from the replace reviewer.
+
+Only replaces applied with \\<projectile-replace-mode-map>\\[projectile-replace--apply] in a
+`*projectile-replace*' buffer are recorded, and only the most recent one:
+this is a safety net for the single most destructive thing Projectile
+does, not an edit history.  The record lives in memory, so it is gone
+after restarting Emacs.
+
+Each file is reverted only when the text the replace wrote is still
+exactly there; a file edited, reverted, deleted or rewritten by a branch
+switch in the meantime is reported and left alone rather than corrupted.
+Files that were reverted are dropped from the record, so undoing twice
+can never apply anything twice, while files that were skipped stay
+undoable once you have sorted them out." t)
+(autoload 'projectile-replace-review "projectile" "\
+Review and apply a literal project-wide replacement.
+
+Prompts for a literal search string and a replacement, gathers every
+match across the project into a `*projectile-replace*' buffer, and lets
+you toggle which matches to apply before committing them.  This is a
+non-blocking, previewable alternative to `projectile-replace'." t)
+(autoload 'projectile-replace-regexp-review "projectile" "\
+Review and apply a project-wide regexp replacement.
+
+Like `projectile-replace-review', but the search term is an Emacs
+regexp and the replacement may reference capture groups (\\1, \\&).
+This is a non-blocking, previewable alternative to
+`projectile-replace-regexp'." t)
+(autoload 'projectile-search-review "projectile" "\
+Search the project for a literal string and review the matches read-only.
+
+Prompts for a literal search string (defaulting to the symbol or region
+at point), gathers every match across the project into a read-only
+`*projectile-search*' buffer grouped by file, and lets you navigate,
+filter and reshape the search.  Use \\<projectile-search-mode-map>\\[projectile-search--to-replace] to turn it into a
+reviewable replacement.  This is the read-only sibling of
+`projectile-replace-review'." t)
+(autoload 'projectile-search-regexp-review "projectile" "\
+Search the project for an Emacs regexp and review the matches read-only.
+
+Like `projectile-search-review', but the search term is an Emacs regexp,
+so full Emacs regexp syntax (e.g. symbol boundaries like `\\_<foo\\_>')
+is honored." t)
+(autoload 'projectile-todos "projectile" "\
+Collect the project's TODO-style annotations and review them read-only.
+
+Searches every project file for the annotation keywords in
+`projectile-todo-keywords' (`TODO', `FIXME', `HACK', ... - customize the
+list to match your own conventions) and gathers the hits into the same
+read-only `*projectile-search*' buffer `projectile-search-review' uses,
+grouped by file, so all of its navigation, filtering, re-search, export
+and hand-off commands apply.
+
+A keyword only counts when it stands as a whole word followed by a colon,
+by whitespace or by the end of the line, so `TODO:' and `FIXME ' are
+found while `TODOS' and `MASTODON' are not.  Matching is case-sensitive
+(annotation keywords are uppercase by convention); toggle that with `c'
+in the results buffer.  The keyword does not have to sit in a comment.
+
+With a prefix argument ARG, prompt for which keywords to search for
+instead of using all of them.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-kill-buffers "projectile" "\
+Kill project buffers.
+
+The buffers are killed according to the value of
+`projectile-kill-buffers-filter'." t)
+(autoload 'projectile-save-project-buffers "projectile" "\
+Save all project buffers." t)
+(autoload 'projectile-dired "projectile" "\
+Open `dired' at the root of the project.
+With a prefix argument ARG, prompt for a known project to open in dired.
+
+(fn &optional ARG)" t)
+ (autoload 'projectile-dired-other-window "projectile" nil t)
+ (autoload 'projectile-dired-other-frame "projectile" nil t)
+(autoload 'projectile-vc "projectile" "\
+Open `vc-dir' at the root of the project.
+
+For git projects `magit-status-internal' is used if available.
+For hg projects `monky-status' is used if available.
+
+If PROJECT-ROOT is given, it is opened instead of the project
+root directory of the current buffer file.  If interactively
+called with a prefix argument, the user is prompted for a project
+directory to open.
+
+(fn &optional PROJECT-ROOT)" t)
+(autoload 'projectile-recentf "projectile" "\
+Show a list of recently visited files in a project." t)
+(autoload 'projectile-discard-command-cache "projectile" "\
+Discard the cached lifecycle commands for the current project.
+
+Projectile caches the last command used for each of the configure,
+compile, test, install, package, and run actions and prefers it over the
+value from `.dir-locals.el' or the project type's default.  After
+editing those, run this command so the next invocation re-reads them.
+Handy on `after-save-hook' for `.dir-locals.el' buffers.
+
+This only clears the cached commands, not the command history offered at
+the prompt.  See also `projectile-discard-root-cache'." t)
+(autoload 'projectile-find-file-in-subproject "projectile" "\
+Jump to a file in one of the current project's subprojects.
+Prompts for the subproject first, so the file completion only covers
+that part of the repository." t)
+(autoload 'projectile-configure-project "projectile" "\
+Run project configure command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG.
+
+(fn ARG)" t)
+(autoload 'projectile-compile-project "projectile" "\
+Run project compilation command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG.  Per project default command can be set through
+`projectile-project-compilation-cmd'.
+
+(fn ARG)" t)
+(autoload 'projectile-test-project "projectile" "\
+Run project test command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG.
+
+(fn ARG)" t)
+(autoload 'projectile-install-project "projectile" "\
+Run project install command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG.
+
+(fn ARG)" t)
+(autoload 'projectile-package-project "projectile" "\
+Run project package command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG.
+
+(fn ARG)" t)
+(autoload 'projectile-run-project "projectile" "\
+Run project run command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG.
+
+(fn ARG)" t)
+ (autoload 'projectile-configure-subproject "projectile" nil t)
+ (autoload 'projectile-compile-subproject "projectile" nil t)
+ (autoload 'projectile-test-subproject "projectile" nil t)
+ (autoload 'projectile-install-subproject "projectile" nil t)
+ (autoload 'projectile-package-subproject "projectile" nil t)
+ (autoload 'projectile-run-subproject "projectile" nil t)
+(autoload 'projectile-run-test-at-point "projectile" "\
+Run the test around point, if any.
+
+The test is located by walking up the buffer's tree-sitter parse
+tree according to the rule for the buffer's major mode in
+`projectile-test-at-point-rules', which also determines the command
+used to run it.  Requires Emacs 29+ built with tree-sitter support
+and a tree-sitter major mode (e.g. `python-ts-mode').
+
+The command runs like `projectile-test-project' does (same working
+directory and buffer-saving behavior), but it is not recorded as the
+project's test command and doesn't touch the command history.  With
+a prefix ARG you can edit the command before it's run.
+
+(fn ARG)" t)
+(autoload 'projectile-repeat-last-command "projectile" "\
+Run last projectile external command.
+
+External commands are: `projectile-configure-project',
+`projectile-compile-project', `projectile-test-project',
+`projectile-install-project', `projectile-package-project',
+`projectile-run-project' and the named tasks run via
+`projectile-run-task' (which also feed the combined history this
+command reads).
+
+If the prefix argument SHOW-PROMPT is non nil, the command can be edited.
+
+(fn SHOW-PROMPT)" t)
+(autoload 'projectile-run-task "projectile" "\
+Run one of the current project's named tasks.
+
+The task is picked with completion among the tasks of the project's
+type, those in `projectile-tasks' (which win for same-named tasks) and
+the ones discovered in the project's own tooling - npm scripts, Makefile
+targets and the like, named after the tool that defines them (see
+`projectile-project-tasks' and `projectile-task-providers').  With a
+prefix ARG the task's command can be edited before it's run, e.g. to
+pass it ad-hoc arguments.
+
+The command runs through the same machinery as
+`projectile-compile-project' - in `projectile-compilation-dir', with
+`%p' expanded to the project name - but its output goes to a per-task
+compilation buffer named after the task.
+
+(fn ARG)" t)
+(autoload 'projectile-repeat-last-task "projectile" "\
+Re-run the last task executed in the current project.
+
+This re-runs the exact command the task ran last time, including any
+ad-hoc edits made then.  With a prefix ARG the command can be edited
+again before it's run.
+
+(fn ARG)" t)
+(autoload 'projectile-switch-project "projectile" "\
+Switch to a project we have visited before.
+Invokes the command referenced by `projectile-switch-project-action' on switch.
+With a prefix ARG invokes `projectile-dispatch' instead
+of `projectile-switch-project-action'.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-switch-open-project "projectile" "\
+Switch to a project we have currently opened.
+Invokes the command referenced by `projectile-switch-project-action' on switch.
+With a prefix ARG invokes `projectile-dispatch' instead
+of `projectile-switch-project-action'.
+
+(fn &optional ARG)" t)
+ (autoload 'projectile-switch-project-other-window "projectile" nil t)
+ (autoload 'projectile-switch-project-other-frame "projectile" nil t)
+(autoload 'projectile-switch-to-most-recent-project "projectile" "\
+Switch to the project recorded in `projectile-most-recent-project'.
+That's the project that was current before the most recent project
+switch, so calling this from a buffer in the switched-to project takes
+you back where you came from.  With a prefix ARG invokes
+`projectile-dispatch' instead of
+`projectile-switch-project-action'.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-find-file-in-directory "projectile" "\
+Jump to a file in a (maybe regular) DIRECTORY.
+
+This command will first prompt for the directory the file is in.
+
+(fn &optional DIRECTORY)" t)
+(autoload 'projectile-find-file-in-known-projects "projectile" "\
+Jump to a file in any of the known projects.
+This is `projectile-find-file-in-projects' over every project you have
+ever visited." t)
+(autoload 'projectile-cleanup-known-projects "projectile" "\
+Remove known projects that don't exist anymore." t)
+(defalias 'projectile-forget-zombie-projects #'projectile-cleanup-known-projects "\
+Forget known projects that don't exist any more.
+An alias for `projectile-cleanup-known-projects', provided for
+discoverability and parity with project.el's
+`project-forget-zombie-projects'.")
+(autoload 'projectile-forget-projects-under "projectile" "\
+Remove known projects located under DIRECTORY.
+
+Interactively, prompt for DIRECTORY.  With optional argument
+RECURSIVE non-nil (interactively, the prefix argument), remove
+projects nested at any depth under DIRECTORY; otherwise only remove
+projects that are immediate children of DIRECTORY.
+
+Matching is lexical (after `file-truename' expansion for local paths,
+which is skipped for remote ones to avoid a round-trip), so projects
+are removed even when DIRECTORY has already been deleted.  Mirrors
+project.el's `project-forget-projects-under'.  Return the number of
+projects removed.
+
+(fn DIRECTORY &optional RECURSIVE)" t)
+(autoload 'projectile-clear-known-projects "projectile" "\
+Clear both `projectile-known-projects' and `projectile-known-projects-file'." t)
+(autoload 'projectile-reset-known-projects "projectile" "\
+Clear known projects and rediscover." t)
+(autoload 'projectile-remove-known-project "projectile" "\
+Remove PROJECT from the list of known projects.
+
+(fn &optional PROJECT)" t)
+(autoload 'projectile-remove-current-project-from-known-projects "projectile" "\
+Remove the current project from the list of known projects." t)
+(autoload 'projectile-add-known-project "projectile" "\
+Add PROJECT-ROOT to the list of known projects.
+
+(fn PROJECT-ROOT)" t)
+(autoload 'projectile-add-and-switch-project "projectile" "\
+Add PROJECT-ROOT to the list of known projects and switch to it.
+This combines `projectile-add-known-project' and
+`projectile-switch-project-by-name' into a single command.
+
+(fn PROJECT-ROOT)" t)
+(autoload 'projectile-switch-worktree "projectile" "\
+Switch to another checkout of the current project\\='s repository.
+
+That's the project\\='s git worktrees, plus any other clone of the same
+upstream that Projectile already knows about - both are the same thing in
+practice, the place this project is checked out on another branch.
+
+Invokes the command referenced by `projectile-switch-project-action' on
+switch.  With a prefix ARG invokes `projectile-dispatch' instead.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-switch-sibling-project "projectile" "\
+Switch to a project related to the current one.
+
+Related means grouped with it in `projectile-project-groups', or sharing
+the owner of its upstream remote, or - failing both - starting with the
+same word.  See `projectile-sibling-project-functions'.
+
+Invokes the command referenced by `projectile-switch-project-action' on
+switch.  With a prefix ARG invokes `projectile-dispatch' instead.
+
+(fn &optional ARG)" t)
+(autoload 'projectile-find-file-in-projects "projectile" "\
+Jump to a file in any of PROJECTS.
+PROMPT overrides the completion prompt.
+
+(fn PROJECTS &optional PROMPT)")
+(autoload 'projectile-search-in-projects "projectile" "\
+Search PROJECTS for a term and review the matches read-only.
+LITERAL non-nil searches for a literal string, otherwise the term is an
+Emacs regexp.  PROMPT overrides the label the term is read with.
+
+This is `projectile-search-review' widened to a group, and that command
+is the single-project case of it: matches from every project land in one
+`*projectile-search*' buffer, grouped by file and named relative to the
+innermost directory containing the group, so each one is labelled with
+the project it came from.  Everything that buffer does - filtering,
+re-search, the hand-off to the replace reviewer - then covers the whole
+group.
+
+Each member of the group is filtered by its own ignore rules, wherever
+you happen to be sitting, and a literal search runs `rg' over each of
+them in turn when ripgrep is available.
+
+(fn PROJECTS &optional LITERAL PROMPT)")
+(autoload 'projectile-switch-to-buffer-in-projects "projectile" "\
+Switch to a buffer belonging to any of PROJECTS.
+PROMPT overrides the completion prompt.  The current buffer is left out
+of the choices, as `projectile-switch-to-buffer' does.
+
+(fn PROJECTS &optional PROMPT)")
+(autoload 'projectile-find-file-in-sibling-projects "projectile" "\
+Jump to a file in the current project or any related to it.
+Related is what `projectile-switch-sibling-project' means by it." t)
+(autoload 'projectile-search-in-sibling-projects "projectile" "\
+Search the current project and the ones related to it, reviewing the matches.
+
+Related is what `projectile-switch-sibling-project' means by it.  With a
+prefix argument REGEXP the search term is an Emacs regexp rather than a
+literal string.
+
+(fn &optional REGEXP)" t)
+(autoload 'projectile-switch-to-buffer-in-sibling-projects "projectile" "\
+Switch to a buffer of the current project or of one related to it.
+Related is what `projectile-switch-sibling-project' means by it." t)
+(autoload 'projectile-multi-occur-in-sibling-projects "projectile" "\
+Do a `multi-occur' in the buffers of the current project and related ones.
+Related is what `projectile-switch-sibling-project' means by it.  With a
+prefix argument, show NLINES of context.
+
+Note this searches the buffers you have open, not the projects on disk -
+`projectile-search-in-sibling-projects' is the one that reads files.
+
+(fn &optional NLINES)" t)
+(autoload 'projectile-todos-in-sibling-projects "projectile" "\
+Collect TODO-style annotations across the current project and related ones.
+Related is what `projectile-switch-sibling-project' means by it.  See
+`projectile-todos' for what counts as an annotation." t)
+(autoload 'projectile-bookmark-set "projectile" "\
+Set a bookmark named NAME at point, scoped to the current project.
+
+The bookmark is a regular Emacs bookmark - it lands in `bookmark-alist',
+shows up in `list-bookmarks' and is persisted by `bookmark.el' itself.
+The only Projectile touch is the suggested NAME: the name `bookmark-set'
+would suggest, prefixed with the project's name (e.g. \"projectile:
+projectile.el\"), so the project's bookmarks are easy to spot in the
+global list.  You're free to edit the name - a bookmark on a file inside
+the project is recognised as the project's even without the prefix (see
+`projectile-bookmark-scope').
+
+(fn NAME)" t)
+(autoload 'projectile-bookmark-jump "projectile" "\
+Jump to the project bookmark named NAME.
+Only the current project's bookmarks are offered for completion - see
+`projectile-bookmark-scope' for how that's decided.
+
+When the bookmark's file has been deleted in the meantime this refuses
+with a friendly error instead of dragging you through the relocation
+prompt of `bookmark.el'.  Use `projectile-bookmark-delete' to get rid of
+such a stale bookmark.
+
+(fn NAME)" t)
+(autoload 'projectile-bookmark-delete "projectile" "\
+Delete the project bookmark named NAME.
+Only the current project's bookmarks are offered for completion - see
+`projectile-bookmark-scope' for how that's decided.
+
+(fn NAME)" t)
+(autoload 'projectile-ibuffer "projectile" "\
+Open an IBuffer window showing all buffers in the current project.
+
+Let user choose another project when PROMPT-FOR-PROJECT is supplied.
+
+(fn PROMPT-FOR-PROJECT)" t)
+(autoload 'projectile-edit-dir-locals "projectile" "\
+Edit or create a .dir-locals.el file of the project." t)
+(autoload 'projectile-report-copy "projectile" "\
+Copy the current report buffer to the kill ring as plain text.
+
+Strips the faces and buttons, so what lands in the clipboard is exactly
+the text of the report - ready to paste into an issue, an email or a
+chat window without dragging Emacs\\='s text properties along." t)
+(autoload 'projectile-doctor "projectile" "\
+Diagnose Projectile's view of the current project.
+
+Open a read-only report describing the project Projectile sees around
+`default-directory': its root and which of
+`projectile-project-root-functions' found it, the detected project type
+and the marker that matched, the indexing method and the very command
+that will be run, which external tools are available, the file count and
+the cache state, the ignore rules in effect, and a list of findings -
+things that look fine and things worth changing.  Outside a project the
+report says so and explains how to mark the directory as one.
+
+The report is plain text, meant to be pasted into a bug report.
+
+The doctor doesn't change what it measures: it never populates and never
+invalidates the file cache.  A project that isn't cached yet is indexed
+with caching switched off and that run is reported as a fresh index.  On
+remote projects indexing and program lookups are skipped rather than
+risking a hang, and the report says so." t)
+(autoload 'projectile-dashboard "projectile" "\
+Show a dashboard summarising the project around `default-directory'.
+
+The dashboard covers the project's name, root, type and file count, the
+version control system with the current branch and how many files are
+modified or untracked, the project files you visit most (ranked by
+frecency, the same ranking `projectile-find-file' uses), the project's
+tasks and its configured lifecycle commands.
+
+Everything worth acting on is a button, so the buffer doubles as a
+launcher: RET on a file visits it, on a task or a lifecycle command runs
+it, on the branch opens the project's VC interface, and on the root
+opens it in Dired.  TAB moves to the next button, `g' refreshes the
+dashboard and `q' buries it.
+
+The command is cheap on purpose, so that it can serve as a
+`projectile-switch-project-action'.  It never indexes the project and
+never touches the file cache - an uncached project is reported as not
+indexed rather than indexed on the spot.  The branch and status come
+from two short git commands, run only on a local git project; on a
+remote project, or under any other VCS, that section says so instead.
+
+`projectile-dashboard-sections' controls which sections are shown." t)
+(autoload 'projectile-other-window-command "projectile" "\
+Show the buffer of the next Projectile command in another window.
+
+Set up the next command's buffer to be displayed in a new window (via
+`other-window-prefix') and keep `projectile-command-map' active for the
+next key sequence, so any Projectile key typed right after this command
+gets the other-window treatment without re-typing the Projectile
+prefix.  Any non-Projectile command works as well; commands that use
+`switch-to-buffer' are covered too, by temporarily enabling
+`switch-to-buffer-obey-display-actions'." t)
+(autoload 'projectile-other-frame-command "projectile" "\
+Show the buffer of the next Projectile command in another frame.
+
+Set up the next command's buffer to be displayed in a new frame (via
+`other-frame-prefix') and keep `projectile-command-map' active for the
+next key sequence, so any Projectile key typed right after this command
+gets the other-frame treatment without re-typing the Projectile
+prefix.  Any non-Projectile command works as well; commands that use
+`switch-to-buffer' are covered too, by temporarily enabling
+`switch-to-buffer-obey-display-actions'." t)
+(autoload 'project-projectile "projectile" "\
+Return Projectile project of form ('projectile . root-dir) for DIR.
+
+(fn DIR)")
+(defvar projectile-mode nil "\
+Non-nil if Projectile mode is enabled.
+See the `projectile-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 `projectile-mode'.")
+(custom-autoload 'projectile-mode "projectile" nil)
+(autoload 'projectile-mode "projectile" "\
+Minor mode to assist project management and navigation.
+
+When called interactively, toggle `projectile-mode'.  With prefix
+ARG, enable `projectile-mode' if ARG is positive, otherwise disable
+it.
+
+When called from Lisp, enable `projectile-mode' if ARG is omitted,
+nil or positive.  If ARG is `toggle', toggle `projectile-mode'.
+Otherwise behave as if called interactively.
+
+\\{projectile-mode-map}
+
+(fn &optional ARG)" t)
+(autoload 'projectile-session-switch-to-buffer "projectile" "\
+Switch to a buffer belonging to the current tab's project.
+Complete over just the buffers of the project bound to the current tab.
+When the current tab holds no project, fall back to the plain
+`switch-to-buffer'." t)
+(autoload 'projectile-session-save "projectile" "\
+Save the current window layout and buffers as PROJECT's session.
+PROJECT defaults to the current project's root.  The layout is captured
+from the selected frame, so this saves whichever project's tab is
+current.  Buffers are recorded via `projectile-session-buffer-serializers';
+a layout with no serializable buffer is not saved.  Return non-nil on a
+successful save.
+
+(fn &optional PROJECT)" t)
+(autoload 'projectile-session-restore "projectile" "\
+Restore PROJECT's saved session into the selected frame.
+PROJECT defaults to the current project's root.  Buffers are recreated
+first, then the saved window layout is put back; windows whose buffer
+can't be recreated fall back to a placeholder.  Return non-nil when a
+session was restored.
+
+(fn &optional PROJECT)" t)
+(autoload 'projectile-session-forget "projectile" "\
+Delete PROJECT's saved session file.
+PROJECT defaults to the current project's root.
+
+(fn &optional PROJECT)" t)
+(autoload 'projectile-session-save-all "projectile" "\
+Save the session of every open project in one go.
+Every open project tab's window layout and buffers are saved (see
+`projectile-session-save'); a tab whose layout has no serializable buffer
+is skipped.  Unlike autosave, this runs regardless of
+`projectile-session-autosave'.  When called interactively, report how many
+sessions were saved." t)
+(autoload 'projectile-session-restore-all "projectile" "\
+Reopen every saved project's session into its own tab.
+For each project with a session saved on disk (see
+`projectile-session--saved-roots'): when a tab for it is already open,
+leave it be rather than duplicating it; otherwise create a fresh project
+tab and restore the saved session into it.  A session whose files are all
+gone recreates nothing, so its just-created empty tab is closed again and
+it is not counted, keeping restore-all from littering the frame with empty
+tabs.  Tabs are re-resolved by root, never by a cons captured before a
+selection, since `tab-bar-select-tab' rebuilds cons cells as it switches.
+End on the first successfully restored project's tab (falling back to the
+starting tab when nothing was restored) rather than wherever the iteration
+left off.  When called interactively, report how many sessions were
+restored.  Return that count." t)
+(defvar projectile-session-mode nil "\
+Non-nil if Projectile-Session mode is enabled.
+See the `projectile-session-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 `projectile-session-mode'.")
+(custom-autoload 'projectile-session-mode "projectile" nil)
+(autoload 'projectile-session-mode "projectile" "\
+Global minor mode giving each project its own `tab-bar' tab.
+
+When enabled, `tab-bar-mode' is turned on and project switching becomes
+tab-aware: switching to a project selects its existing tab, restoring
+that project's live window layout, when one is open; otherwise it opens
+a fresh tab dedicated to the project and populates it via
+`projectile-session-default-action'.  Each project tab is stamped with
+its root and named after the project (see
+`projectile-session-tab-name-function').
+
+If the mode is enabled from inside a project, the tab you're already on
+is adopted so it isn't left unowned.
+
+Disabling the mode restores `projectile-switch-project-action' to the
+value it had when the mode was enabled; it leaves `tab-bar-mode' and any
+existing tabs untouched.
+
+This is a global minor mode.  If called interactively, toggle the
+`Projectile-Session mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='projectile-session-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(register-definition-prefixes "projectile" '("compilation-find-file-projectile-find-compilation-buffer" "delete-file-projectile-remove-from-cache" "projectile-" "savehist-additional-variables"))
+
+
+;;; Generated autoloads from projectile-consult.el
+
+(autoload 'projectile-consult-find-file "projectile-consult" "\
+Find a file in the current project with a streaming Consult UI.
+
+The candidate list is produced by Projectile's own indexing command (see
+`projectile-project-files-producer'), so it honours the project's VCS and
+indexing configuration, and it streams into the minibuffer as the command
+runs instead of blocking until the whole project is indexed." t)
+(register-definition-prefixes "projectile-consult" '("projectile-consult-"))
+
+;;; End of scraped data
+
+(provide 'projectile-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; projectile-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-consult.el b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-consult.el
new file mode 100644
index 0000000..1e78b09
--- /dev/null
+++ b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-consult.el
@@ -0,0 +1,124 @@
+;;; projectile-consult.el --- Consult integration for Projectile -*- lexical-binding: t -*-
+
+;; Copyright © 2011-2026 Bozhidar Batsov
+
+;; Author: Bozhidar Batsov <bozhidar@batsov.dev>
+;; URL: https://github.com/bbatsov/projectile
+;; Keywords: project, convenience, matching
+
+;; This file is an optional module shipped inside the Projectile package; it
+;; carries no `Package-Requires' header of its own so it isn't mistaken for a
+;; standalone package.  At runtime it needs `consult' 2.0+, which in turn
+;; requires Emacs 29.1+, but Projectile core never loads it, so those are not
+;; Projectile dependencies (see the Commentary).
+
+;; This file is NOT part of GNU Emacs.
+
+;; This program is free software: you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License as
+;; published by the Free Software Foundation, either version 3 of the
+;; License, or (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see `http://www.gnu.org/licenses/'.
+
+;;; Commentary:
+
+;; An optional layer that drives a streaming Consult finder from
+;; Projectile's own project indexing command (via
+;; `projectile-project-files-producer').
+;;
+;; Unlike `consult-find' / `consult-fd', which run their own find/fd, this
+;; reuses whatever indexing Projectile is configured to use - `git ls-files',
+;; `fd', the `find' fallback, other VCS commands - so it stays VCS-aware and
+;; honours the project's setup.  Candidates stream into the minibuffer as the
+;; command runs and are narrowed client-side by your completion style (e.g.
+;; orderless), so there's no wait for the whole project to be indexed before
+;; you can start typing.
+;;
+;; Projectile core does NOT load this file; require it yourself (it pulls in
+;; `consult', which needs Emacs 29.1+):
+;;
+;;   (require 'projectile-consult)
+;;   (define-key projectile-command-map (kbd "f") #'projectile-consult-find-file)
+
+;;; Code:
+
+(require 'projectile)
+
+;; `consult' is a hard runtime dependency (see Package-Requires), but
+;; Projectile core deliberately does not load this file, and external build
+;; systems byte-compile it as part of the Projectile package without `consult'
+;; on the load path.  Load it softly here (the real `require' happens in the
+;; command below) and forward-declare the functions we use, so the file still
+;; byte-compiles cleanly when `consult' is absent.  See
+;; https://github.com/bbatsov/projectile/issues/2037.
+(require 'consult nil t)
+
+(declare-function consult--read "consult")
+(declare-function consult--process-collection "consult")
+(declare-function consult--async-map "consult")
+
+(defvar projectile-consult-find-file-history nil
+  "Minibuffer history for `projectile-consult-find-file'.")
+
+(defun projectile-consult--file-command (command)
+  "Wrap a Projectile indexing COMMAND for Consult's process collection.
+COMMAND emits NUL-separated paths (Projectile uses -z/-0/-print0), but
+Consult's process pipeline splits its input on newlines, so translate
+NUL to newline with `tr'.  Returns a command list (PROGRAM ARGS...)
+suitable as the return value of a Consult process builder."
+  ;; Octal \\000 rather than \\0 so the escape is understood by both GNU and
+  ;; BSD `tr'.
+  (list shell-file-name shell-command-switch
+        (concat command " | tr '\\000' '\\n'")))
+
+(defun projectile-consult--builder (command)
+  "Return a Consult process builder that lists the project's files via COMMAND.
+The builder ignores its input: Projectile's indexing command lists the
+whole project once (Consult does not restart it while the command stays
+the same) and Consult narrows the streamed candidates client-side."
+  (lambda (_input)
+    (projectile-consult--file-command command)))
+
+;;;###autoload
+(defun projectile-consult-find-file ()
+  "Find a file in the current project with a streaming Consult UI.
+
+The candidate list is produced by Projectile's own indexing command (see
+`projectile-project-files-producer'), so it honours the project's VCS and
+indexing configuration, and it streams into the minibuffer as the command
+runs instead of blocking until the whole project is indexed."
+  (interactive)
+  (require 'consult)
+  (let* ((producer (projectile-project-files-producer))
+         (root (plist-get producer :directory))
+         (command (plist-get producer :command)))
+    (unless command
+      (user-error "External-command indexing is disabled for this project"))
+    (let* ((default-directory root)
+           (selected
+            (consult--read
+             (consult--process-collection (projectile-consult--builder command)
+               ;; List immediately, with no input required.
+               :min-input 0
+               ;; Match Projectile's own `./'-stripping.
+               :transform (consult--async-map
+                           (lambda (path) (string-remove-prefix "./" path)))
+               ;; Route the process through TRAMP for remote projects.
+               :file-handler t)
+             :prompt (format "Find file in %s: " (projectile-project-name))
+             :sort nil
+             :require-match t
+             :category 'file
+             :history '(:input projectile-consult-find-file-history))))
+      (find-file (expand-file-name selected root)))))
+
+(provide 'projectile-consult)
+
+;;; projectile-consult.el ends here
diff --git a/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-consult.elc b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-consult.elc
new file mode 100644
index 0000000..3eef6a2
Binary files /dev/null and b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-consult.elc differ
diff --git a/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-pkg.el b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-pkg.el
new file mode 100644
index 0000000..33ca04c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile-pkg.el
@@ -0,0 +1,11 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "projectile" "20260824.913"
+  "Manage and navigate projects in Emacs easily."
+  '((emacs  "28.1")
+    (compat "30"))
+  :url "https://github.com/bbatsov/projectile"
+  :commit "f60f47f2f72d60201679e8c3b50ad00bae3889dd"
+  :revdesc "f60f47f2f72d"
+  :keywords '("project" "convenience")
+  :authors '(("Bozhidar Batsov" . "bozhidar@batsov.dev"))
+  :maintainers '(("Bozhidar Batsov" . "bozhidar@batsov.dev")))
diff --git a/emacs/.emacs.d/elpa/projectile-20260824.913/projectile.el b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile.el
new file mode 100644
index 0000000..205b173
--- /dev/null
+++ b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile.el
@@ -0,0 +1,18640 @@
+;;; projectile.el --- Manage and navigate projects in Emacs easily -*- lexical-binding: t -*-
+
+;; Copyright © 2011-2026 Bozhidar Batsov <bozhidar@batsov.dev>
+
+;; Author: Bozhidar Batsov <bozhidar@batsov.dev>
+;; URL: https://github.com/bbatsov/projectile
+;; Keywords: project, convenience
+;; Package-Version: 20260824.913
+;; Package-Revision: f60f47f2f72d
+;; Package-Requires: ((emacs "28.1") (compat "30"))
+
+;; This file is NOT part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
+
+;;; Commentary:
+;;
+;; Projectile is a project interaction library for Emacs.
+;; It provides a powerful set of features operating at the project
+;; level, as well as simple heuristics to identify projects.
+;;
+;; See the README and https://docs.projectile.mx for more details.
+;;
+;;; Code:
+
+(require 'cl-lib)
+(require 'compat)
+(require 'seq)
+(require 'thingatpt)
+(require 'ibuffer)
+(require 'ibuf-ext)
+(require 'compile)
+(require 'grep)
+(require 'fileloop)
+(require 'filenotify)
+(require 'outline)
+(eval-when-compile
+  ;; `transient' is bundled with Emacs 28.1+ (Projectile's minimum), but
+  ;; it's only needed once `projectile-dispatch' is invoked, so it's
+  ;; loaded lazily at run time (see `projectile-dispatch') and required
+  ;; here only for macro expansion during byte-compilation.
+  (require 'transient)
+  (require 'find-dired)
+  (require 'subr-x))
+
+;; All calls run after the lazy `(require 'transient)' in
+;; `projectile-dispatch' (or are otherwise guarded).
+(declare-function transient-args "transient" (prefix))
+(declare-function transient-setup "transient" (&optional name layout edit &rest params))
+(declare-function transient-prefix "transient")
+(declare-function transient--default-infix-command "transient")
+(declare-function transient--suffix-only "transient")
+;; Newer transient versions emit different internals from the
+;; `transient-define-prefix' expansion; declare them as they appear so
+;; byte-compiling against Emacs snapshots stays warning-free.
+(declare-function transient--set-layout "transient")
+
+;;; Declarations
+;;
+;; A bunch of variable and function declarations
+;; needed to appease the byte-compiler.
+(defvar ag-ignore-list)
+(defvar eshell-buffer-name)
+(defvar explicit-shell-file-name)
+(defvar grep-files-aliases)
+(defvar grep-find-ignored-directories)
+(defvar grep-find-ignored-files)
+(defvar eat-buffer-name)
+(defvar ghostel-buffer-name)
+
+(declare-function make-term "term")
+(declare-function term-mode "term")
+(declare-function term-char-mode "term")
+(declare-function term-ansi-make-term "term")
+(declare-function eshell-search-path "esh-ext")
+(declare-function vc-dir "vc-dir")
+(declare-function vc-dir-busy "vc-dir")
+(declare-function vc-git-grep "vc-git")
+(declare-function tramp-archive-file-name-p "tramp-archive")
+(declare-function tramp-archive-file-name-archive "tramp-archive")
+(declare-function helm-grep-get-file-extensions "helm-grep")
+
+(declare-function ripgrep-regexp "ext:ripgrep")
+(declare-function rg-run "ext:rg")
+(declare-function vterm "ext:vterm")
+(declare-function vterm-other-window "ext:vterm")
+(declare-function vterm-send-return "ext:vterm")
+(declare-function vterm-send-string "ext:vterm")
+(declare-function eat "ext:eat")
+(declare-function eat-other-window "ext:eat")
+(declare-function ghostel "ext:ghostel")
+(declare-function xref-show-xrefs "xref")
+(declare-function xref-matches-in-directory "xref")
+
+;; Only available on Emacs 29+ built with tree-sitter support; every call
+;; site is guarded at runtime (see `projectile-run-test-at-point').
+(declare-function treesit-available-p "treesit.c")
+(declare-function treesit-parser-list "treesit.c")
+(declare-function treesit-node-at "treesit")
+(declare-function treesit-node-parent "treesit.c")
+(declare-function treesit-node-type "treesit.c")
+(declare-function treesit-node-child "treesit.c")
+(declare-function treesit-node-child-by-field-name "treesit.c")
+(declare-function treesit-node-prev-sibling "treesit.c")
+(declare-function treesit-node-children "treesit")
+(declare-function treesit-node-text "treesit")
+
+
+;;; Customization
+(defgroup projectile nil
+  "Manage and navigate projects easily."
+  :group 'tools
+  :group 'convenience
+  :link '(url-link :tag "GitHub" "https://github.com/bbatsov/projectile")
+  :link '(url-link :tag "Online Manual" "https://docs.projectile.mx/")
+  :link '(emacs-commentary-link :tag "Commentary" "projectile"))
+
+(defcustom projectile-indexing-method
+  (if (eq system-type 'windows-nt) 'native 'alien)
+  "Specifies the indexing method used by Projectile.
+
+There are three indexing methods - native, hybrid and alien.
+
+The native method is implemented in Emacs Lisp (therefore it is
+native to Emacs).  Its advantage is that it is portable and will
+work everywhere that Emacs does.  Its disadvantage is that it is a
+bit slow (especially for large projects).  Generally it's a good
+idea to pair the native indexing method with caching.
+
+The hybrid indexing method uses external tools (e.g. git, find,
+etc) to speed up the indexing process.  Still, the files will be
+post-processed by Projectile for sorting/filtering purposes.
+In this sense that approach is a hybrid between native indexing
+and alien indexing.
+
+The alien indexing method optimizes to the limit the speed
+of the hybrid indexing method.  This means that Projectile will
+not post-process the files returned by the external commands and
+you're going to get the maximum performance possible.  Projectile's
+ignore rules are still respected - they are handed to the external
+tool as exclusion arguments where it understands them, and applied
+in Emacs Lisp only for the few tools that can't express them (see
+`projectile-alien-honors-ignores').  Sorting is never applied.
+
+The disadvantage of the hybrid and alien methods is that they are not well
+supported on Windows systems.  That's why by default alien indexing is the
+default on all operating systems, except Windows."
+  :group 'projectile
+  :type '(choice
+          (const :tag "Native" native)
+          (const :tag "Hybrid" hybrid)
+          (const :tag "Alien" alien))
+  :safe (lambda (x) (memq x '(native hybrid alien)))
+  :package-version '(projectile . "2.0.0"))
+
+(defcustom projectile-alien-honors-ignores t
+  "Whether `alien' indexing applies Projectile's own ignore rules.
+
+The `alien' indexing method delegates the directory walk to an external
+tool (`git ls-files', `fd', `find', ...), which knows nothing about
+Projectile's ignore configuration: `projectile-globally-ignored-files',
+`projectile-globally-ignored-directories',
+`projectile-globally-ignored-file-suffixes' and the `-' entries of a
+project's dirconfig file (see `projectile-dirconfig-file').
+
+When this is non-nil those rules are honored.  Tools that can express
+exclusions themselves (`git ls-files' via pathspecs, `fd' via
+`--exclude') are handed the rules as arguments, so the filtering still
+happens outside Emacs and alien indexing stays fast.  For the few tools
+that can't (svn, fossil, bzr, darcs, pijul, and the plain `find'
+fallback) the rules are applied to the tool's output in Emacs Lisp
+instead.
+
+Set this to nil to get the raw listing back and defer entirely to the
+external tool's own ignore rules (`.gitignore' and friends), which is
+how alien indexing behaved before Projectile 3.3.
+
+Note that dirconfig `+' keep entries and `!' unignore entries are a
+separate mechanism and remain `hybrid'/`native' only."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.3.0"))
+
+(defcustom projectile-enable-caching (eq projectile-indexing-method 'native)
+  "When t enables project files caching.
+
+Normally the cache lasts for the duration of your Emacs session.
+If you want the cache to persist between Emacs sessions you
+should set this option to `persistent'.
+
+Project caching is automatically enabled by default if you're
+using the native indexing method."
+  :group 'projectile
+  :type '(choice
+          (const :tag "Disabled" nil)
+          (const :tag "Transient" t)
+          (const :tag "Persistent" persistent))
+  :package-version '(projectile . "2.9.0"))
+
+(defcustom projectile-async-index-sentinel-timeout 1.0
+  "Seconds to wait for a finished index's result before collecting it.
+
+The asynchronous indexer hands its result over from the indexing
+process's sentinel.  Once that process has exited, Emacs is expected to
+run the sentinel promptly - but it isn't guaranteed to while a command is
+waiting for it, and Projectile then used to wait forever (issue #2118).
+
+After this many seconds Projectile parses the finished command's output
+itself instead.  There's no correctness difference; the timeout only
+decides how long to let Emacs do it first."
+  :group 'projectile
+  :type 'number
+  :package-version '(projectile . "3.3.0"))
+
+(defcustom projectile-async-indexing t
+  "Whether to index projects without freezing Emacs.
+
+When non-nil, the external-command indexing methods (`alien' and
+`hybrid') run their indexing command asynchronously and wait for it in a
+way that keeps Emacs responsive to redisplay and `keyboard-quit' (\\[keyboard-quit]),
+instead of blocking until the command finishes.  This matters most on
+large projects and on remote (TRAMP) hosts, where a cold
+`projectile-find-file' could otherwise freeze Emacs for seconds.
+
+The resulting file list is identical to the synchronous path; only the
+responsiveness during indexing differs.  Has no effect under `native'
+indexing (the Emacs Lisp directory walk cannot run off the main thread),
+in batch mode, or while a keyboard macro is executing - those fall back
+to synchronous indexing."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.0.0"))
+
+(defcustom projectile-kill-buffers-filter 'kill-all
+  "Determine which buffers are killed by `projectile-kill-buffers'.
+
+When the kill-all option is selected, kills each buffer.
+
+When the kill-only-files option is selected, kill only the buffer
+associated to a file.
+
+It can also be a list of conditions, in which case a buffer is killed
+when it satisfies any of them.  This is a composable DSL modeled on
+project.el's `project-kill-buffer-conditions'.  Each condition is either:
+- a regular expression, matched against the buffer name,
+- a predicate function that takes the buffer as its argument and returns
+  non-nil if it should be killed,
+- a cons cell whose car says how to interpret the cdr:
+  * `major-mode' - kill if the buffer's major mode is `eq' to the cdr,
+  * `derived-mode' - kill if the buffer's major mode is derived from it,
+  * `not' - the cdr is a single negated condition,
+  * `and' - the cdr is a list of conditions that must all match,
+  * `or' - the cdr is a list of conditions, any of which match.
+
+An empty list (or nil) matches no buffers, so nothing is killed.
+
+For example, to kill only file-visiting buffers and dired buffers:
+
+  (setq projectile-kill-buffers-filter
+        \\='(buffer-file-name (derived-mode . dired-mode)))
+
+Otherwise, it should be a predicate that takes one argument: the buffer to
+be killed."
+  :group 'projectile
+  :type '(choice
+          (const :tag "All project buffers" kill-all)
+          (const :tag "Project file buffers" kill-only-files)
+          (function :tag "Predicate")
+          (repeat :tag "Conditions"
+                  (choice regexp function symbol
+                          (cons :tag "Major mode" (const major-mode) symbol)
+                          (cons :tag "Derived mode" (const derived-mode) symbol)
+                          (cons :tag "Negation" (const not) sexp)
+                          (cons :tag "Conjunction" (const and) sexp)
+                          (cons :tag "Disjunction" (const or) sexp))))
+  :package-version '(projectile . "2.0.0"))
+
+(defcustom projectile-file-exists-local-cache-expire nil
+  "Number of seconds before the local file existence cache expires.
+Local refers to a file on a local file system.
+
+A value of nil disables this cache.
+See `projectile-file-exists-p' for details."
+  :group 'projectile
+  :type '(choice (const :tag "Disabled" nil)
+                 (natnum :tag "Seconds"))
+  :package-version '(projectile . "0.11.0"))
+
+(defcustom projectile-file-exists-remote-cache-expire (* 5 60)
+  "Number of seconds before the remote file existence cache expires.
+Remote refers to a file on a remote file system such as tramp.
+
+A value of nil disables this cache.
+See `projectile-file-exists-p' for details."
+  :group 'projectile
+  :type '(choice (const :tag "Disabled" nil)
+                 (natnum :tag "Seconds"))
+  :package-version '(projectile . "0.11.0"))
+
+(defcustom projectile-files-cache-expire nil
+  "Number of seconds before project files list cache expires.
+
+A value of nil means the cache never expires."
+  :group 'projectile
+  :type '(choice (const :tag "Never expires" nil)
+                 (natnum :tag "Seconds"))
+  :package-version '(projectile . "1.0.0"))
+
+(define-obsolete-variable-alias 'projectile-auto-discover
+  'projectile-auto-discover-projects "3.4.0")
+
+(defcustom projectile-auto-discover-projects t
+  "Whether to discover projects under `projectile-project-search-path'.
+When non-nil, the projects under the search path are discovered and
+remembered the first time a project-switching command runs in an Emacs
+session (see `projectile-discover-projects-in-search-path').
+
+This has no effect unless `projectile-project-search-path' is set, so
+the default is harmless out of the box; point the search path at your
+projects directory and they'll be picked up automatically.
+
+See also `projectile-project-search-path'."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.1.0"))
+
+(defcustom projectile-auto-cleanup-known-projects nil
+  "Whether to cleanup projects when project switching commands are invoked.
+
+See also `projectile-cleanup-known-projects'."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "2.9.0"))
+
+(defcustom projectile-auto-update-cache t
+  "Whether cache is automatically updated when files are opened or deleted."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "2.0.0"))
+
+(defcustom projectile-auto-update-cache-with-watches nil
+  "When non-nil, watch project directories to keep the files cache fresh.
+
+Experimental.  When enabled (and `projectile-enable-caching' is
+non-nil), Projectile registers filesystem notification watches (via
+`file-notify-add-watch') for the directories of a project whenever the
+project's file list is cached.  Files created, deleted or renamed
+outside Emacs then update the cached file list automatically, largely
+removing the need for manual `projectile-invalidate-cache' calls.
+
+Emacs file notifications are not recursive, so this costs one watch per
+directory; projects spanning more directories than
+`projectile-watch-directory-limit' are not watched.  Remote (TRAMP)
+projects are never watched.  When an event cannot be applied
+incrementally the project's cache is invalidated instead and rebuilt
+lazily on the next file listing, which also re-arms the watches.
+
+Change this via Customize (or `setopt'): disabling it then drops all
+active watches immediately, and enabling it arms watches for the
+projects that are already cached.  With plain `setq' the new value only
+takes effect the next time a project's file list is cached."
+  :group 'projectile
+  :type 'boolean
+  :set (lambda (symbol value)
+         (set-default symbol value)
+         ;; The watch machinery is defined further down in this file, so
+         ;; guard against the initial `defcustom' evaluation at load time.
+         (if value
+             ;; Only arm watches when the mode is on; otherwise they'd have no
+             ;; mode-disable teardown to fire and would linger until Emacs exits.
+             (when (and (bound-and-true-p projectile-mode)
+                        (fboundp 'projectile--watch-all-cached-projects))
+               (projectile--watch-all-cached-projects))
+           (when (fboundp 'projectile--teardown-all-watches)
+             (projectile--teardown-all-watches))))
+  :package-version '(projectile . "3.1.0"))
+
+(defcustom projectile-watch-directory-limit 512
+  "Maximum number of file-notify watches to register per project.
+
+File notifications are not recursive, so watching a project costs one
+watch (and, on most backends, one file descriptor) per directory.
+Projects whose cached file list spans more directories than this are
+not watched at all; when `projectile-verbose' is non-nil a message is
+emitted once per project.  Directories created inside a watched project
+count against the same limit.
+
+Only relevant when `projectile-auto-update-cache-with-watches' is
+enabled."
+  :group 'projectile
+  :type 'natnum
+  :package-version '(projectile . "3.1.0"))
+
+(defcustom projectile-require-project-root 'prompt
+  "Require the presence of a project root to operate when true.
+When set to `prompt' Projectile will ask you to select a project
+directory if you're not in a project.
+
+When nil Projectile will consider the current directory the project root."
+  :group 'projectile
+  :type '(choice (const :tag "No" nil)
+                 (const :tag "Yes" t)
+                 (const :tag "Prompt for project" prompt))
+  :package-version '(projectile . "2.0.0"))
+
+(defcustom projectile-completion-system 'default
+  "The completion system to be used by Projectile.
+Either `default' (Emacs's built-in `completing-read', which works with
+Vertico, Consult, Fido, `ido-completing-read+', etc.) or a custom
+function accepting a prompt and a list of choices.
+
+Note: the dedicated `ido', `helm' and `ivy' options were removed - those
+frameworks are used through `completing-read' (or their own Projectile
+integration packages, `helm-projectile' / `counsel-projectile'), so any
+of those legacy values now behaves like `default'."
+  :group 'projectile
+  :type '(choice (const :tag "Default (completing-read)" default)
+                 (function :tag "Custom function"))
+  :package-version '(projectile . "3.0.0"))
+
+(defcustom projectile-keymap-prefix nil
+  "The key sequence `projectile-command-map' is bound to, if any.
+
+A key sequence in the form `kbd' returns, e.g. (kbd \"C-c p\").  There
+is no prefix by default - Projectile binds none of its commands until
+you ask for it.
+
+The value is read once, when `projectile-mode-map' is built as
+Projectile loads, so it has to be set before that - which rules out
+Customize and `setopt'.  Binding the map directly works whenever:
+
+  (define-key projectile-mode-map (kbd \"C-c p\") \\='projectile-command-map)"
+  :group 'projectile
+  :type '(choice (const :tag "None" nil)
+                 (key-sequence :tag "Prefix"))
+  :package-version '(projectile . "0.7"))
+
+(defcustom projectile-cache-file  ".projectile-cache.eld"
+  "The name of Projectile's cache.
+It's relative to the project root."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "2.9.0"))
+
+;; Remove in 4.0.  This was only ever read to seed the default of
+;; `projectile-globally-ignored-files' as this file loaded, so setting it
+;; from an init file never did anything; that list now names TAGS itself.
+(defvar projectile-tags-file-name "TAGS"
+  "The name of the tags file Projectile excludes from indexing.")
+(make-obsolete-variable 'projectile-tags-file-name
+                        "add the file name to `projectile-globally-ignored-files' instead."
+                        "3.4.0")
+
+(defcustom projectile-sort-order 'default
+  "The sort order used for a project's files.
+
+It can also be set to a function that takes the list of project
+files (as relative paths) and returns them in the desired order.
+
+Note that files aren't sorted if `projectile-indexing-method'
+is set to `alien'."
+  :group 'projectile
+  :type '(choice
+          (const :tag "Default (no sorting)" default)
+          (const :tag "Recently opened files" recentf)
+          (const :tag "Recently active buffers, then recently opened files" recently-active)
+          (const :tag "Access time (atime)" access-time)
+          (const :tag "Modification time (mtime)" modification-time)
+          (function :tag "Custom sort function"))
+  :package-version '(projectile . "3.1.0"))
+
+(defcustom projectile-verbose t
+  "Whether to echo the messages Projectile emits without being asked.
+
+This covers what Projectile says as a side effect of something else -
+caching a file you just opened, a background index that had something to
+report, a session file it had to skip.  Commands you invoke still say
+what they did whatever this is set to: turning it off makes Projectile
+quieter, not mute."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "0.12.0"))
+
+(defconst projectile--message-prefix "[Projectile] "
+  "What Projectile puts in front of the messages it emits unprompted.
+
+Bracketed rather than `Projectile: \\=', which is the form eglot uses and
+which stays legible when the message itself contains a colon - several
+do.  Direct answers to a command you just invoked go unprefixed: you
+know who is talking, and the echo area is narrow.")
+
+(defun projectile--message (format-string &rest args)
+  "Report FORMAT-STRING with ARGS as coming from Projectile, if permitted.
+
+For what Projectile says off its own bat - a background index, a watch
+that gave up, a file cached behind a `find-file\\='.  Such a message is
+prefixed, so it is clear where it came from when nothing was asked of
+Projectile, and suppressed entirely when `projectile-verbose\\=' is nil.
+See `projectile--message-always\\=' for the messages that must not be
+suppressed."
+  (when projectile-verbose
+    (apply #'projectile--message-always format-string args)))
+
+(defun projectile--message-always (format-string &rest args)
+  "Report FORMAT-STRING with ARGS as coming from Projectile.
+
+The prefix without the `projectile-verbose\\=' gate, for the messages that
+answer for something you did ask for but arrive later, out of a process
+sentinel or a timer - by then the prefix is the only thing saying which
+package is talking."
+  (message "%s%s" projectile--message-prefix
+           (apply #'format format-string args)))
+
+(defcustom projectile-buffers-filter-function nil
+  "A function used to filter the buffers in `projectile-project-buffers'.
+
+The function should accept and return a list of Emacs buffers.
+Two example filter functions are shipped by default -
+`projectile-buffers-with-file' and
+`projectile-buffers-with-file-or-process'."
+  :group 'projectile
+  :type '(choice (const :tag "No filtering" nil)
+                 (function :tag "Filter function"))
+  :package-version '(projectile . "0.11.0"))
+
+(defcustom projectile-project-name nil
+  "If this value is non-nil, it will be used as project name.
+
+It has precedence over function `projectile-project-name-function'."
+  :group 'projectile
+  :type '(choice (const :tag "Derive from the project root" nil)
+                 (string :tag "Name"))
+  :safe (lambda (v) (or (null v)
+                        (and (stringp v)
+                             (not (string-blank-p v)))))
+  :package-version '(projectile . "0.14.0"))
+
+(defcustom projectile-project-name-function 'projectile-default-project-name
+  "A function that receives the project-root and returns the project name.
+
+If variable `projectile-project-name' is non-nil, this function will not be
+used."
+  :group 'projectile
+  :type 'function
+  :package-version '(projectile . "0.14.0"))
+
+(defcustom projectile-project-root-files
+  '(
+    "GTAGS"              ; GNU Global tags
+    "TAGS"               ; etags/ctags are usually in the root of project
+    "configure.ac"       ; autoconf new style
+    "configure.in"       ; autoconf old style
+    "cscope.out"         ; cscope
+    )
+  "A list of files considered to mark the root of a project.
+The topmost match has precedence.
+See `projectile-register-project-type'."
+  :group 'projectile
+  :type '(repeat string)
+  :package-version '(projectile . "0.10.0"))
+
+(defcustom projectile-project-root-files-bottom-up
+  '(".git"        ; Git VCS root dir
+    ".hg"         ; Mercurial VCS root dir
+    ".fslckout"   ; Fossil VCS root dir
+    "_FOSSIL_"    ; Fossil VCS root DB on Windows
+    ".bzr"        ; Bazaar VCS root dir
+    "_darcs"      ; Darcs VCS root dir
+    ".pijul"      ; Pijul VCS root dir
+    ".sl"         ; Sapling VCS root dir
+    ".jj"         ; Jujutsu VCS root dir
+    )
+  "A list of files considered to mark the root of a project.
+The bottommost (parentmost) match has precedence.
+
+This list holds only VCS markers (plus whatever you add yourself).
+Per-language project manifests are deliberately *not* included, so an
+enclosing VC root wins over a manifest sitting in a subdirectory - the
+behavior most users and IDEs expect (the git repository is the
+project).  In a polyglot or monorepo layout where you want a deeper
+subproject to win instead, drop a `.projectile' file in it;
+`projectile-root-marked' runs before `projectile-root-bottom-up', so
+the marked subproject takes precedence over the outer VC root."
+  :group 'projectile
+  :type '(repeat string)
+  :package-version '(projectile . "0.11.0"))
+
+(defcustom projectile-project-root-files-top-down-recurring
+  '(".svn" ; Svn VCS root dir
+    "CVS"  ; CVS VCS root dir
+    ".osc" ; osc (openSUSE Build Service) checkout dir
+    "Makefile")
+  "A list of files considered to mark the root of a project.
+The search starts at the top and descends down till a directory
+that contains a match file but its parent does not.  Thus, it's a
+bottommost match in the topmost sequence of directories
+containing a root file."
+  :group 'projectile
+  :type '(repeat string)
+  :package-version '(projectile . "3.1.0"))
+
+(defcustom projectile-project-root-functions
+  '(projectile-root-local
+    projectile-root-marked
+    projectile-root-bottom-up
+    projectile-root-top-down
+    projectile-root-top-down-recurring)
+  "A list of functions for finding project root folders.
+The functions will be run until one of them returns a project folder.
+Reordering the default functions will alter the project discovery
+algorithm."
+  :group 'projectile
+  :type '(repeat function)
+  :package-version '(projectile . "2.4.0"))
+
+(defcustom projectile-dirconfig-file
+  ".projectile"
+  "The file which serves both as a project marker and configuration file.
+
+The mere presence of this file in a directory marks that directory
+as a Projectile project root, even when the file is empty.  When
+the file has content, it is parsed by `projectile-parse-dirconfig-file'
+to drive `+' keep / `-' ignore / `!' ensure rules; see the manual
+for the full format.
+
+This should _not_ be set via .dir-locals.el."
+  :group 'projectile
+  :type 'file
+  :package-version '(projectile . "2.7.0"))
+
+(defcustom projectile-dirconfig-comment-prefix
+  nil
+  "`projectile-dirconfig-file' comment start marker.
+If specified, starting a line in a project's .projectile file with this
+character marks that line as a comment instead of a pattern.
+Similar to '#' in .gitignore files."
+  :group 'projectile
+  :type '(choice (const :tag "No comment syntax" nil)
+                 (character :tag "Comment character"))
+  :package-version '(projectile . "2.2.0"))
+
+(defcustom projectile-warn-on-prefixless-dirconfig-lines t
+  "Whether to warn about deprecated prefix-less ignore entries.
+Lines in `.projectile' that start with no `+'/`-'/`!' prefix are
+still accepted as ignore patterns for backward compatibility, but
+the implicit form is being phased out.  When this option is
+non-nil, a one-time warning is shown per project that uses any
+such line, listing the offending entries."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.0.0"))
+
+;; The options below hold nothing but a list of names, patterns or regexps,
+;; and none of them can do more than widen or narrow a listing - so a project
+;; is free to set any of them from its .dir-locals.el.
+
+(defcustom projectile-globally-ignored-files
+  (list "TAGS" projectile-cache-file)
+  "A list of files globally ignored by projectile.
+
+Entries are gitignore patterns: a plain name matches a file with that
+name at any depth, a name containing a slash is anchored at the project
+root, and `*', `**', `?' and `[...]' are the usual wildcards.  See
+`projectile-globally-ignored-directories' for the full pattern language."
+  :group 'projectile
+  :type '(repeat string)
+  :safe #'list-of-strings-p
+  :package-version '(projectile . "3.0.0"))
+
+(defcustom projectile-globally-unignored-files nil
+  "A list of files globally unignored by projectile.
+
+Entries cancel out the matching `projectile-globally-ignored-files'
+entries."
+  :group 'projectile
+  :type '(repeat string)
+  :safe #'list-of-strings-p
+  :package-version '(projectile . "0.14.0"))
+
+(defcustom projectile-globally-ignored-file-suffixes
+  nil
+  "A list of file suffixes globally ignored by projectile.
+Each suffix is matched at the end of a file name at any depth, as if it
+were the gitignore pattern `*SUFFIX' (e.g. \".elc\" ignores every
+`.elc' file in the project)."
+  :group 'projectile
+  :type '(repeat string)
+  :safe #'list-of-strings-p
+  :package-version '(projectile . "0.12.0"))
+
+(defcustom projectile-globally-ignored-directories
+  '(;; editors
+    ".idea"
+    ".vscode"
+    ".ccls-cache"
+    ".cache"
+    ".clangd"
+    ;; version control
+    ".git"
+    ".hg"
+    ".fslckout"
+    "_FOSSIL_"
+    ".bzr"
+    "_darcs"
+    ".pijul"
+    ".svn"
+    ".sl"
+    ".jj"
+    ".osc"
+    ;; dependencies and build output
+    ;;
+    ;; These are all directories a tool generates and a project doesn't
+    ;; commit.  Under `alien' they're usually excluded by the VCS anyway;
+    ;; the point of listing them is `native' and `hybrid' indexing, and
+    ;; projects that aren't under version control at all.  Names that some
+    ;; projects do commit - `vendor', `build', `dist', `public' - are
+    ;; deliberately not here.
+    "node_modules"
+    "target"
+    "_build"
+    ".gradle"
+    ".stack-work"
+    ".build"
+    "elm-stuff"
+    ".dart_tool"
+    ".zig-cache"
+    "zig-out"
+    "__pycache__"
+    "*.egg-info"
+    ".venv"
+    ".tox"
+    ".mypy_cache"
+    ".pytest_cache"
+    ".ruff_cache"
+    ".next"
+    ".nuxt"
+    ".svelte-kit"
+    ".astro"
+    ".turbo"
+    ".parcel-cache"
+    "_site"
+    ".terraform"
+    ".direnv")
+  "A list of directories globally ignored by projectile.
+
+Entries are gitignore patterns, matched against paths relative to the
+project root and applied by every indexing method alike:
+
+- a pattern without a slash matches a directory with that name at any
+  depth, so \"tmp\" ignores both ./tmp and ./src/tmp
+- a pattern containing a slash is anchored at the project root, so
+  \"/tmp\" and \"doc/frotz\" only match there
+- `*' is a wildcard within a path segment, `**' spans segments, `?'
+  matches a single non-slash character and `[...]'/`[!...]' are
+  character classes
+
+Matching is case-sensitive.  Note that a leading `*' is a plain
+wildcard - it used to be a marker meaning \"at any depth\", which is
+now the default for every slashless pattern.
+
+Besides the editor and version control directories, the default value
+covers the dependency and build output directories of the common
+ecosystems - `node_modules', `target', `__pycache__' and so on.  Add
+an entry to `projectile-globally-unignored-directories' to get one of
+them back, or a `!' line to a project's `.projectile' to get it back
+for that project only.
+
+See also `projectile-globally-ignored-file-regexps'."
+  :group 'projectile
+  :type '(repeat string)
+  :safe #'list-of-strings-p
+  :package-version '(projectile . "3.3.0"))
+
+(defcustom projectile-globally-unignored-directories nil
+  "A list of directories globally unignored by projectile.
+
+Entries cancel out the matching `projectile-globally-ignored-directories'
+entries."
+  :group 'projectile
+  :type '(repeat string)
+  :safe #'list-of-strings-p
+  :package-version '(projectile . "0.14.0"))
+
+(define-obsolete-variable-alias 'projectile-global-ignore-file-patterns
+  'projectile-globally-ignored-file-regexps "3.4.0")
+
+(defcustom projectile-globally-ignored-file-regexps
+  nil
+  "A list of regexps matching files ignored by Projectile.
+
+Unlike `projectile-globally-ignored-files' and
+`projectile-globally-ignored-directories', which speak gitignore
+patterns, the entries here are Emacs regexps, matched against absolute
+file names.  They complement the pattern-based options; because they
+can't be handed to an external tool, nor expressed as globs, they are
+only applied by `native' indexing.
+
+See also `projectile-ignored-file-p' and
+`projectile-ignored-directory-p'."
+  :group 'projectile
+  :type '(repeat string)
+  :safe #'list-of-strings-p
+  :package-version '(projectile . "2.9.0"))
+
+(defcustom projectile-globally-ignored-modes
+  '("erc-mode"
+    "help-mode"
+    "completion-list-mode"
+    "Buffer-menu-mode"
+    "gnus-.*-mode"
+    "occur-mode")
+  "A list of regular expressions for major modes ignored by projectile.
+
+If a buffer is using a given major mode, projectile will ignore
+it for functions working with buffers.
+
+Each entry is matched against the whole mode name, so \"occur-mode\"
+ignores that mode and nothing else, while \"gnus-.*-mode\" ignores a
+family of them."
+  :group 'projectile
+  :type '(repeat regexp)
+  :safe #'list-of-strings-p
+  :package-version '(projectile . "0.10.0"))
+
+(defcustom projectile-globally-ignored-buffers
+  '("\\*scratch\\*"
+    "\\*lsp-log\\*")
+  "A list of buffer names ignored by projectile.
+
+If a buffer matches one of these, projectile will ignore it for
+functions working with buffers.
+
+Each entry is a regular expression, matched anywhere in the buffer
+name - unlike `projectile-globally-ignored-modes', which matches whole
+mode names.  Anchor an entry yourself when you mean an exact name.
+
+Note that the `*' of a buffer name like `*scratch*' has to be escaped
+to be matched literally, as in the default value; unescaped it is a
+repetition operator."
+  :group 'projectile
+  :type '(repeat regexp)
+  :safe #'list-of-strings-p
+  :package-version '(projectile . "0.12.0"))
+
+(defcustom projectile-find-file-hook nil
+  "Hooks run when a file is opened with `projectile-find-file'."
+  :group 'projectile
+  :type 'hook
+  :package-version '(projectile . "0.10.0"))
+
+(defcustom projectile-find-dir-hook nil
+  "Hooks run when a directory is opened with `projectile-find-dir'."
+  :group 'projectile
+  :type 'hook
+  :package-version '(projectile . "0.10.0"))
+
+(defcustom projectile-switch-project-action 'projectile-find-file
+  "Action invoked after switching projects with `projectile-switch-project'.
+
+Any function that does not take arguments will do."
+  :group 'projectile
+  :type 'function
+  :package-version '(projectile . "0.10.0"))
+
+(defcustom projectile-switch-project-other-window-action 'projectile-find-file-other-window
+  "Action run by `projectile-switch-project-other-window' after switching.
+Like `projectile-switch-project-action', but for the other-window variant.
+
+Any function that does not take arguments will do."
+  :group 'projectile
+  :type 'function
+  :package-version '(projectile . "3.0.0"))
+
+(defcustom projectile-switch-project-other-frame-action 'projectile-find-file-other-frame
+  "Action run by `projectile-switch-project-other-frame' after switching.
+Like `projectile-switch-project-action', but for the other-frame variant.
+
+Any function that does not take arguments will do."
+  :group 'projectile
+  :type 'function
+  :package-version '(projectile . "3.0.0"))
+
+(defcustom projectile-find-dir-includes-top-level nil
+  "If true, add top-level dir to options offered by `projectile-find-dir'."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "0.10.0"))
+
+(defcustom projectile-use-git-grep nil
+  "Whether `projectile-grep' delegates to `vc-git-grep' in git projects.
+
+Only affects `projectile-grep'; the other search commands and the
+backends of `projectile-search' ignore this."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "0.11.0"))
+
+(defcustom projectile-search-backend 'auto
+  "The backend `projectile-search' uses to search the project.
+Either a backend name registered in `projectile-search-backends'
+\(`grep', `ripgrep', `ag', or one you registered yourself with
+`projectile-register-search-backend'), `auto' to pick the first
+available backend (favouring ripgrep, then grep), or `prompt' to be
+asked which backend to use each time."
+  :group 'projectile
+  :type '(choice (const :tag "Automatic" auto)
+                 (const :tag "Prompt each time" prompt)
+                 (const :tag "grep" grep)
+                 (const :tag "ripgrep" ripgrep)
+                 (const :tag "ag" ag)
+                 (symbol :tag "Other registered backend"))
+  :package-version '(projectile . "3.0.0"))
+
+(defcustom projectile-shell-backend 'eshell
+  "The backend `projectile-run' uses to open a shell/REPL/terminal.
+Either a backend name registered in `projectile-shell-backends'
+\(`shell', `eshell', `ielm', `term', `vterm', `eat', `ghostel', or one
+you registered yourself with `projectile-register-shell-backend'), `auto'
+to pick the first available backend, or `prompt' to be asked each time."
+  :group 'projectile
+  :type '(choice (const :tag "Automatic" auto)
+                 (const :tag "Prompt each time" prompt)
+                 (const :tag "shell" shell)
+                 (const :tag "eshell" eshell)
+                 (const :tag "ielm" ielm)
+                 (const :tag "term" term)
+                 (const :tag "vterm" vterm)
+                 (const :tag "eat" eat)
+                 (const :tag "ghostel" ghostel)
+                 (symbol :tag "Other registered backend"))
+  :package-version '(projectile . "3.0.0"))
+
+(defcustom projectile-grep-finished-hook nil
+  "Hooks run when `projectile-grep' finishes."
+  :group 'projectile
+  :type 'hook
+  :package-version '(projectile . "0.14.0"))
+
+(defcustom projectile-test-prefix-function 'projectile-test-prefix
+  "Function to find test files prefix based on PROJECT-TYPE."
+  :group 'projectile
+  :type 'function
+  :package-version '(projectile . "0.11.0"))
+
+(defcustom projectile-test-suffix-function 'projectile-test-suffix
+  "Function to find test files suffix based on PROJECT-TYPE."
+  :group 'projectile
+  :type 'function
+  :package-version '(projectile . "0.11.0"))
+
+(define-obsolete-variable-alias 'projectile-related-files-fn-function
+  'projectile-related-files-function "3.4.0")
+
+(defcustom projectile-related-files-function 'projectile-related-files-fn
+  "Function to find related files based on PROJECT-TYPE."
+  :group 'projectile
+  :type 'function
+  :package-version '(projectile . "2.1.0"))
+
+(defcustom projectile-dynamic-mode-line t
+  "If true, update the mode-line dynamically.
+The mode-line is updated when files are opened via `find-file-hook'
+and when the window configuration changes.
+
+Change the value via Customize or `setopt' so it takes effect
+immediately; a plain `setq' only takes effect before
+`projectile-mode' is enabled.
+
+See also `projectile-mode-line-function' and `projectile-update-mode-line'."
+  :group 'projectile
+  :type 'boolean
+  :set (lambda (symbol value)
+         (set-default symbol value)
+         (when (bound-and-true-p projectile-mode)
+           (if value
+               (add-hook 'window-configuration-change-hook #'projectile-update-mode-line-on-window-change)
+             (remove-hook 'window-configuration-change-hook #'projectile-update-mode-line-on-window-change))))
+  :package-version '(projectile . "2.0.0"))
+
+(defcustom projectile-mode-line-function 'projectile-default-mode-line
+  "The function to use to generate project-specific mode-line.
+The default function adds the project name and type to the mode-line.
+See also `projectile-update-mode-line'."
+  :group 'projectile
+  :type 'function
+  :package-version '(projectile . "2.0.0"))
+
+(defcustom projectile-default-src-directory "src/"
+  "The default value of a project's src-dir property.
+
+It's used as a fallback in the case the property is not set for a project
+type when `projectile-toggle-between-implementation-and-test' is used."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "2.6.0"))
+
+(defcustom projectile-default-test-directory "test/"
+  "The default value of a project's test-dir property.
+
+It's used as a fallback in the case the property is not set for a project
+type when `projectile-toggle-between-implementation-and-test' is used."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "2.6.0"))
+
+;;; Per-project cache registry
+;;
+;; Projectile keeps a growing set of per-project caches.  Every one of
+;; them has to be dropped when a project is invalidated and isolated in
+;; the test sandbox; forgetting either wiring is a silent bug.  Caches
+;; defined through `projectile-define-project-cache' get both for free,
+;; and cleanups that aren't a simple table entry (killing a process,
+;; deleting a file) can be attached with
+;; `projectile--register-project-cache-cleanup'.
+
+(defvar projectile--project-cache-vars nil
+  "Hash-table variables holding per-project caches.
+Collected by `projectile-define-project-cache'.  The test sandbox
+rebinds each of these to a fresh table for isolation.")
+
+(defvar projectile--project-cache-cleanups nil
+  "Alist of NAME to cleanup function, run when a project is invalidated.
+Each function is called with the project root being invalidated.
+Keyed by name so that reloading projectile doesn't accumulate
+duplicate cleanups.")
+
+(defun projectile--register-project-cache-cleanup (name function)
+  "Register FUNCTION under NAME to run when a project is invalidated.
+FUNCTION is called with the project root.  Registering under an
+existing NAME replaces the previous cleanup."
+  (setf (alist-get name projectile--project-cache-cleanups) function))
+
+(defmacro projectile-define-project-cache (name docstring &rest props)
+  "Define NAME as a per-project cache table documented by DOCSTRING.
+The table is keyed by project root (with test `equal') and is wired
+into `projectile--invalidate-project-cache' and the test sandbox
+automatically.  PROPS may contain `:prefix-keyed t' for tables whose
+keys are directories under a project rather than the root itself;
+invalidation then drops every entry under the invalidated root."
+  (declare (indent 1) (doc-string 2))
+  `(progn
+     (defvar ,name (make-hash-table :test 'equal) ,docstring)
+     (add-to-list 'projectile--project-cache-vars ',name)
+     (projectile--register-project-cache-cleanup
+      ',name
+      ,(if (plist-get props :prefix-keyed)
+           `(lambda (project-root)
+              (dolist (key (hash-table-keys ,name))
+                (when (string-prefix-p project-root key)
+                  (remhash key ,name))))
+         `(lambda (project-root) (remhash project-root ,name))))
+     ',name))
+
+(projectile-define-project-cache projectile-projects-cache
+  "A hashmap used to cache project file names to speed up related operations.")
+
+(projectile-define-project-cache projectile-projects-cache-time
+  "A hashmap used to record when we populated `projectile-projects-cache'.")
+
+(defvar projectile--async-index-processes (make-hash-table :test 'equal)
+  "Map of project root -> in-flight async indexing process.
+Used to avoid running more than one background index for the same
+project at a time, and to discard a stale background result whose
+project cache was invalidated while it was still running.")
+
+;; Cancel any in-flight background index for an invalidated project so
+;; its now-stale result can't repopulate the cache we just cleared.
+(projectile--register-project-cache-cleanup
+ 'projectile--async-index-processes
+ (lambda (project-root)
+   (when-let* ((proc (gethash project-root projectile--async-index-processes)))
+     (when (process-live-p proc)
+       (delete-process proc))
+     (remhash project-root projectile--async-index-processes))))
+
+(defvar projectile-project-root-cache (make-hash-table :test 'equal)
+  "Cached value of function `projectile-project-root'.")
+
+;;; Project path spelling helpers
+;;
+;; A "project root" string is spelled in exactly two canonical ways across
+;; the code base, and mixing them up is a recurring source of subtle cache
+;; bugs (a root looked up in one spelling never matching a key stored in the
+;; other).  The two spellings are:
+;;
+;; - The *cache-key* spelling: what `projectile-project-root' returns, i.e.
+;;   an absolute, symlink-resolved (its search starts from `file-truename'),
+;;   directory name ending in a slash.  This is what every per-project cache
+;;   table (`projectile-projects-cache', the frecency table, the watch
+;;   registry, ...) is keyed by.  Never re-abbreviate or re-expand such a
+;;   value before using it as a key - it is already canonical.
+;;
+;; - The *known-projects* spelling: the abbreviated form persisted in
+;;   `projectile-known-projects' and shown to the user.  Produce it only via
+;;   `projectile--known-project-root' so every entry is spelled identically
+;;   (abbreviated, trailing slash), which is what removal and membership
+;;   checks rely on.
+;;
+;; `projectile--project-relative-name' owns the third boundary: turning an
+;; absolute path into a root-relative one.
+
+(defun projectile--project-relative-name (path root)
+  "Return PATH spelled relative to project ROOT.
+ROOT must be spelled as `projectile-project-root' returns it (absolute,
+symlink-resolved, trailing slash) and PATH must share that spelling
+\(e.g. already run through `file-truename' / `expand-file-name' the same
+way).  When the two spellings diverge - PATH reached through a symlink
+or abbreviation the root wasn't - the result gains leading `../'
+segments; callers that cache the result should reject a value starting
+with \"..\" rather than store a bogus entry.
+
+This is a thin wrapper around `file-relative-name' whose sole purpose is
+to give that boundary a single, documented owner."
+  (file-relative-name path root))
+
+(defun projectile--known-project-root (root)
+  "Return ROOT in the canonical spelling used inside `projectile-known-projects'.
+Entries are stored abbreviated (via `abbreviate-file-name') and with a
+trailing slash so that membership and removal checks compare equal
+regardless of how the root was originally obtained."
+  (file-name-as-directory (abbreviate-file-name root)))
+
+(defun projectile--directory-key (path)
+  "Return PATH in a spelling two references to one directory always share.
+Symlink-resolved and slash-terminated, so it can be compared with `equal'
+or used as a hash key regardless of how each reference was spelled."
+  (file-truename (file-name-as-directory path)))
+
+(projectile-define-project-cache projectile-project-type-cache
+  "A hashmap used to cache project type to speed up related operations.
+Keyed by project root, and also by subproject root for the types
+`projectile-subproject-type' detects - hence `:prefix-keyed', so
+invalidating a repository drops its members' entries along with its own."
+  :prefix-keyed t)
+
+(projectile-define-project-cache projectile-project-vcs-cache
+  "Cache of `projectile-project-vcs' results keyed by directory.
+Cleared by `projectile-invalidate-cache' and
+`projectile-discard-root-cache'.  Entries are VCS symbols (or `none'
+for projects with no detected VCS).")
+
+(projectile-define-project-cache projectile--dirconfig-cache
+  "Cache for parsed dirconfig files, keyed by project root.
+Each value is a list of (DIRCONFIG-PATH MTIME PARSED-RESULT); a
+cache hit requires both DIRCONFIG-PATH and MTIME to match the
+current file, so changing `projectile-dirconfig-file' mid-session
+naturally invalidates the entry.")
+
+(projectile-define-project-cache projectile--git-submodules-cache
+  "Cache of raw git submodule listings, keyed by directory.
+Each value is a list of (GITMODULES-PATH MTIME COMMAND SUBMODULES); a
+cache hit requires the `.gitmodules' path, its modification time and
+`projectile-git-submodule-command' to all match, so editing
+`.gitmodules' (or changing the command mid-session) naturally
+invalidates the entry.  Alien/hybrid indexing lists submodules on
+every file listing and the `git submodule foreach' shell-out dominates
+its runtime (see issue #1953); a stat of `.gitmodules' is practically
+free in comparison."
+  :prefix-keyed t)
+
+(defvar projectile--pending-cache-flush-timers (make-hash-table :test 'equal)
+  "Map of project root to a pending idle-timer that will serialize its cache.
+Used by `projectile-cache-current-file' to coalesce rapid file additions
+into a single delayed disk write per project.")
+
+;; Cancel a pending flush for an invalidated project - if it fired
+;; after invalidation it would serialize the now-empty in-memory state,
+;; recreating the cache file we just deleted with nil contents.
+(projectile--register-project-cache-cleanup
+ 'projectile--pending-cache-flush-timers
+ (lambda (project-root)
+   (when-let* ((timer (gethash project-root
+                               projectile--pending-cache-flush-timers)))
+     (cancel-timer timer)
+     (remhash project-root projectile--pending-cache-flush-timers))))
+
+;; Deliberately a plain defvar rather than a `projectile-define-project-cache':
+;; the descriptors in this table are live OS resources, so the test sandbox
+;; must not rebind it to a fresh table (that would orphan active watches).
+;; Invalidation goes through `projectile--unwatch-project' instead, which
+;; removes the watches before dropping the registry entries.
+(defvar projectile--project-watches (make-hash-table :test 'equal)
+  "Map of project root to its registered file-notify watches.
+Each value is a list of (DESCRIPTOR . DIRECTORY) conses, DIRECTORY
+being the watched directory as an absolute name with a trailing slash.
+Only populated when `projectile-auto-update-cache-with-watches' is
+enabled; see `projectile--watch-project'.")
+
+;; Drop an invalidated project's file-notify watches along with their
+;; queued events; they re-arm the next time the cache is filled (see
+;; `projectile-cache-project').
+(projectile--register-project-cache-cleanup
+ 'projectile--project-watches
+ (lambda (project-root)
+   (projectile--unwatch-project project-root)))
+
+(defvar projectile--watch-pending-events (make-hash-table :test 'equal)
+  "Map of project root to its queued (not yet processed) file-notify events.
+Events are pushed by `projectile--handle-watch-event' (so the list is in
+reverse arrival order) and drained by `projectile--process-watch-events'
+once the debounce timer fires.")
+
+(defvar projectile--watch-debounce-timers (make-hash-table :test 'equal)
+  "Map of project root to the pending debounce timer for its watch events.")
+
+(defvar projectile--watch-debounce-delay 0.5
+  "Seconds to wait after a file-notify event before processing the batch.
+Coalesces event bursts (e.g. a `git checkout' touching many files) into
+a single pass over the project's cached file list.")
+
+(defvar projectile--watch-skipped-projects (make-hash-table :test 'equal)
+  "Set of project roots already reported as too big (or unable) to watch.
+Used to emit the `projectile-watch-directory-limit' message only once
+per project and session.")
+
+(defvar projectile--prefixless-dirconfig-warned-projects (make-hash-table :test 'equal)
+  "Set of project roots already warned about prefix-less dirconfig entries.")
+
+(defvar projectile--glob-keep-warned-projects (make-hash-table :test 'equal)
+  "Set of project roots already warned about glob patterns in + keep entries.")
+
+(defvar projectile-known-projects nil
+  "List of locations where we have previously seen projects.
+The list of projects is ordered by the time they have been accessed.
+
+See also `projectile-remove-known-project',
+`projectile-cleanup-known-projects' and `projectile-clear-known-projects'.")
+
+(defvar projectile-known-projects-on-file nil
+  "List of known projects reference point.
+
+Contains a copy of `projectile-known-projects' when it was last
+synchronized with `projectile-known-projects-file'.")
+
+(defcustom projectile-known-projects-file
+  (locate-user-emacs-file "projectile-bookmarks.eld")
+  "Name and location of the Projectile's known projects file.
+
+Resolved with `locate-user-emacs-file\\=', so it lands beside the rest of
+your Emacs state wherever that is - including `~/.config/emacs\\=' for a
+configuration kept there, which a hand-rolled `user-emacs-directory\\='
+path would have missed."
+  :group 'projectile
+  :type 'file
+  :package-version '(projectile . "3.4.0"))
+
+(defcustom projectile-ignored-projects nil
+  "A list of projects not to be added to `projectile-known-projects'."
+  :group 'projectile
+  :type '(repeat :tag "Project list" directory)
+  :package-version '(projectile . "0.11.0"))
+
+(defcustom projectile-ignored-project-patterns nil
+  "Regexps matching projects not to be added to `projectile-known-projects'.
+
+The pattern-matching sibling of `projectile-ignored-projects', which
+takes exact paths, and `projectile-ignored-project-function', which takes
+a predicate.  Each entry is matched against the project root with
+`string-match-p', so keeping the scratch areas of a machine out of the
+known projects is a line of configuration rather than a lambda:
+
+    (setq projectile-ignored-project-patterns
+          \\='(\"\\\\`/tmp/\" \"/Downloads/\"))"
+  :group 'projectile
+  :type '(repeat :tag "Regexps" regexp)
+  :package-version '(projectile . "3.4.0"))
+
+(defcustom projectile-ignored-project-function nil
+  "Function to decide if a project is added to `projectile-known-projects'.
+
+Can be either nil, or a function that takes the truename of the
+project root as argument and returns non-nil if the project is to
+be ignored or nil otherwise.
+
+This function is only called if the project is not listed in
+the variable `projectile-ignored-projects' and matches none of
+`projectile-ignored-project-patterns'.
+
+A suitable candidate would be `file-remote-p' to ignore remote
+projects."
+  :group 'projectile
+  :type '(choice
+          (const :tag "Nothing" nil)
+          (const :tag "Remote files" file-remote-p)
+          function)
+  :package-version '(projectile . "0.13.0"))
+
+(defcustom projectile-track-known-projects-automatically t
+  "Controls whether Projectile will automatically register known projects.
+
+When set to nil you'll always have to add projects explicitly with
+`projectile-add-known-project'."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "1.0.0"))
+
+(defcustom projectile-project-search-path nil
+  "List of folders where projectile is automatically going to look for projects.
+You can think of something like $PATH, but for projects instead of executables.
+Examples of such paths might be ~/projects, ~/work, (~/github . 1) etc.
+
+For elements of form (DIRECTORY . DEPTH), DIRECTORY has to be a
+directory and DEPTH an integer that specifies the depth at which to
+look for projects.  A DEPTH of 0 means check DIRECTORY.  A depth of 1
+means check all the subdirectories of DIRECTORY.  Etc."
+  :group 'projectile
+  :type '(repeat (choice directory (cons directory (integer :tag "Depth"))))
+  :package-version '(projectile . "1.0.0"))
+
+(defcustom projectile-fd-executable
+  (cond
+   ((executable-find "fdfind") "fdfind")
+   ((executable-find "fd") "fd"))
+  "Path or name of fd executable used by Projectile if enabled.
+Nil means fd is not installed or should not be used.
+
+Note: this variable holds the locally-detected executable.  For
+projects on a TRAMP host fd is detected separately on the remote (and
+cached per host), since whatever is on the local box may not exist on
+the remote.  See `projectile-fd-executable-for'."
+  :group 'projectile
+  :type '(choice (const :tag "Don't use fd" nil)
+                 (string :tag "Path or name"))
+  :package-version '(projectile . "2.8.0"))
+
+(defvar projectile--remote-fd-executable-cache (make-hash-table :test 'equal)
+  "Per-host cache of fd availability on remote (TRAMP) hosts.
+Keys are the prefixes returned by `file-remote-p' (e.g.
+`/ssh:user@host:'); values are either the executable name (a string)
+or nil for hosts where neither `fd' nor `fdfind' is available.  The
+sentinel `unset' distinguishes \"never looked up\" from \"looked up
+and unavailable\".")
+
+(defun projectile--remote-fd-executable (remote)
+  "Return the fd executable available on REMOTE, or nil.
+REMOTE is a TRAMP file name prefix as returned by `file-remote-p'.
+The lookup is performed once per host and cached in
+`projectile--remote-fd-executable-cache' to avoid the round-trip on
+every indexing call."
+  (let ((cached (gethash remote projectile--remote-fd-executable-cache 'unset)))
+    (if (not (eq cached 'unset))
+        cached
+      (let* ((default-directory remote)
+             (found (or (executable-find "fdfind" t)
+                        (executable-find "fd" t)))
+             (program (and found (file-name-nondirectory found))))
+        (puthash remote program projectile--remote-fd-executable-cache)
+        program))))
+
+(defun projectile-fd-executable-for (directory)
+  "Return the fd executable to use for DIRECTORY.
+For local directories returns `projectile-fd-executable'.  For remote
+directories looks up `fd'/`fdfind' on the remote (cached per host) and
+returns the bare program name, or nil when fd is not available there."
+  (if-let* ((remote (file-remote-p directory)))
+      (projectile--remote-fd-executable remote)
+    projectile-fd-executable))
+
+(defcustom projectile-git-use-fd (when projectile-fd-executable t)
+  "Non-nil means use fd to implement git ls-files.
+This may change Projectile's performance in large Git repositories
+depending on your system, but it will also work around the Git behavior
+that causes deleted files to still be shown in Projectile listings until
+their deletions are staged."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "2.8.0"))
+
+(defcustom projectile-git-command "git ls-files -zco --exclude-standard"
+  "Command used by projectile to get the files in a git project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "0.9.0"))
+
+(defcustom projectile-git-fd-args "-H -0 -E .git -tf --strip-cwd-prefix -c never"
+  "Arguments to fd used to re-implement `git ls-files'.
+This is used with `projectile-fd-executable' when `projectile-git-use-fd'
+is non-nil."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "2.8.0"))
+
+(defconst projectile--default-git-submodule-command
+  "git submodule --quiet foreach 'echo $displaypath' | tr '\\n' '\\0'"
+  "Default value of `projectile-git-submodule-command'.
+When the variable still has this value the command is never actually
+run; the submodules are listed by invoking git directly instead (see
+`projectile--git-submodule-paths').")
+
+(defcustom projectile-git-submodule-command projectile--default-git-submodule-command
+  "Command used by projectile to list submodules of a given git repository.
+Set to nil to disable listing submodules contents.
+
+The default listing no longer shells out: when this variable has its
+default value the submodules are listed by running git directly, with
+no shell involved (see issue #1600).  Customizing the variable switches
+back to running it as a shell command."
+  :group 'projectile
+  :type '(choice (const :tag "Don't list submodules" nil)
+                 (string :tag "Command"))
+  :package-version '(projectile . "0.12.0"))
+
+(defcustom projectile-git-ignored-command "git ls-files -zcoi --exclude-standard"
+  "Command used by projectile to get the ignored files in a git project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "0.14.0"))
+
+(defcustom projectile-hg-command "hg locate -f -0 -I ."
+  "Command used by projectile to get the files in a hg project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "0.9.0"))
+
+(defcustom projectile-hg-ignored-command "hg status -in0 ."
+  "Command used by projectile to get the ignored files in a hg project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "3.0.0"))
+
+(defcustom projectile-jj-command "jj file list -T 'path ++ \"\\0\"' --no-pager ."
+  "Command used by projectile to get the files in a Jujutsu project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "2.9.0"))
+
+(defcustom projectile-sapling-command "sl locate -0 -I ."
+  "Command used by projectile to get the files in a Sapling project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "2.9.0"))
+
+(defcustom projectile-fossil-command (concat "fossil ls | "
+                                             (when (eq system-type 'windows-nt)
+                                               "dos2unix | ")
+                                             "tr '\\n' '\\0'")
+  "Command used by projectile to get the files in a fossil project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "0.9.2"))
+
+(defcustom projectile-bzr-command "bzr ls -R --versioned -0"
+  "Command used by projectile to get the files in a bazaar project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "0.9.0"))
+
+(defcustom projectile-darcs-command "darcs show files -0 ."
+  "Command used by projectile to get the files in a darcs project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "0.9.0"))
+
+(defcustom projectile-pijul-command "pijul list | tr '\\n' '\\0'"
+  "Command used by projectile to get the files in a pijul project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "2.6.0"))
+
+(defcustom projectile-svn-command "svn list -R . | grep -v '/$' | tr '\\n' '\\0'"
+  "Command used by projectile to get the files in a svn project.
+
+`svn list -R' reports directories too, with a trailing slash, so they
+are filtered out - the project files are what Projectile is after.
+
+The command runs non-interactively (its output is piped), so `svn'
+can't prompt for credentials.  For projects on an authenticated remote
+you need to have your credentials cached first (e.g. by running `svn'
+once interactively and letting it store them), otherwise the command
+fails with an authentication error.  See URL
+`https://github.com/bbatsov/projectile/issues/1638'."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "0.9.0"))
+
+(defcustom projectile-svn-ignored-command "svn status --no-ignore | grep '^I' | cut -c9- | tr '\\n' '\\0'"
+  "Command used by projectile to get the ignored files in a svn project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "3.0.0"))
+
+(defcustom projectile-generic-command
+  (cond
+   ;; we prefer fd over find
+   ;; note that --strip-cwd-prefix is only available in version 8.3.0+
+   (projectile-fd-executable
+    (format "%s . -0 --type f --color=never --strip-cwd-prefix" projectile-fd-executable))
+   ;; with find we have to be careful to strip the ./ from the paths
+   ;; see https://stackoverflow.com/questions/2596462/how-to-strip-leading-in-unix-find
+   (t "find . -type f | cut -c3- | tr '\\n' '\\0'"))
+  "Command used by projectile to get the files in a generic project."
+  :group 'projectile
+  :type 'string
+  :package-version '(projectile . "2.8.0"))
+
+(defcustom projectile-other-file-alist
+  '( ;; handle C/C++ extensions
+    ("cpp" . ("h" "hpp" "ipp"))
+    ("ipp" . ("h" "hpp" "cpp"))
+    ("hpp" . ("h" "ipp" "cpp" "cc"))
+    ("cxx" . ("h" "hxx" "ixx"))
+    ("ixx" . ("h" "hxx" "cxx"))
+    ("hxx" . ("h" "ixx" "cxx"))
+    ("c"   . ("h"))
+    ("m"   . ("h"))
+    ("mm"  . ("h"))
+    ("h"   . ("c" "cc" "cpp" "ipp" "hpp" "cxx" "ixx" "hxx" "m" "mm"))
+    ("cc"  . ("h" "hh" "hpp"))
+    ("hh"  . ("cc"))
+
+    ;; OCaml extensions
+    ("ml" . ("mli"))
+    ("mli" . ("ml" "mll" "mly"))
+    ("mll" . ("mli"))
+    ("mly" . ("mli"))
+    ("eliomi" . ("eliom"))
+    ("eliom" . ("eliomi"))
+
+    ;; vertex shader and fragment shader extensions in glsl
+    ("vert" . ("frag"))
+    ("frag" . ("vert"))
+
+    ;; handle files with no extension
+    (nil    . ("lock" "gpg"))
+    ("lock" . (""))
+    ("gpg"  . (""))
+    )
+  "Alist of extensions to try when switching to a file's counterpart.
+
+Keys and values are extensions without the leading dot; the key nil
+stands for a file with no extension at all.  Each value lists the
+extensions `projectile-find-other-file' offers for a file with that
+key's extension, in the order they are tried."
+  :group 'projectile
+  :type '(alist :key-type (choice (string :tag "Extension")
+                                  (const :tag "No extension" nil))
+                :value-type (repeat (string :tag "Extension")))
+  :package-version '(projectile . "0.12.0"))
+
+(defcustom projectile-create-missing-test-files nil
+  "During toggling, if non-nil enables creating test files if not found.
+
+When not-nil, every call to projectile-find-implementation-or-test-*
+creates test files if not found on the file system.  Defaults to nil.
+It assumes the test/ folder is at the same level as src/."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "0.13.0"))
+
+(defcustom projectile-compilation-buffer-scope nil
+  "What a lifecycle command's compilation buffer is named after.
+
+Compiling, testing and running a project all use `compilation-mode' and
+therefore share one buffer, so running the tests discards the build
+output and vice versa - across projects as well as within one.
+Qualifying the buffer name keeps them apart.  The value is a list of:
+
+- `project' - the project name (`*compilation*<my-project>'), so two
+  projects don't overwrite each other's output.  This also narrows the
+  buffers offered for saving before a command runs to the project's own.
+- `command' - the lifecycle command (`*compilation*<test>'), so a build
+  and a test run don't overwrite each other.
+
+The two compose: with both, the buffer is `*compilation*<my-project:test>'.
+Setting this to t is the same as naming both.  With nil there's a single
+shared compilation buffer, as in plain Emacs."
+  :group 'projectile
+  :type '(choice (const :tag "One shared buffer" nil)
+                 (const :tag "Project and command" t)
+                 (set :tag "Selected aspects"
+                      (const :tag "Project" project)
+                      (const :tag "Lifecycle command" command)))
+  :package-version '(projectile . "3.4.0"))
+
+;; Remove in 4.0.  Superseded by `projectile-compilation-buffer-scope', which
+;; folds them in - setting both booleans is what its two-element list means.
+(defvar projectile-per-project-compilation-buffer nil
+  "When non-nil, each project gets its own compilation buffer.")
+(defvar projectile-per-command-compilation-buffer nil
+  "When non-nil, each lifecycle command gets its own compilation buffer.")
+
+(dolist (var '(projectile-per-project-compilation-buffer
+               projectile-per-command-compilation-buffer))
+  (make-obsolete-variable var "use `projectile-compilation-buffer-scope' instead."
+                          "3.4.0"))
+
+(defcustom projectile-after-switch-project-hook nil
+  "Hooks run right after project is switched."
+  :group 'projectile
+  :type 'hook
+  :package-version '(projectile . "0.13.0"))
+
+(defcustom projectile-before-switch-project-hook nil
+  "Hooks run right before project is switched."
+  :group 'projectile
+  :type 'hook
+  :package-version '(projectile . "0.13.0"))
+
+(defcustom projectile-project-changed-functions nil
+  "Functions to run when the current project changes.
+
+Each function is called with two arguments - the new project root and
+the project root it changed from (nil when there was none).  Unlike
+`projectile-after-switch-project-hook', which only runs on
+`projectile-switch-project', these functions also run when the project
+changes implicitly, e.g. by visiting a file or directory of another
+project.  Moving to a buffer outside any project is not a change;
+the functions run again only when another project is entered."
+  :group 'projectile
+  :type 'hook
+  :package-version '(projectile . "3.1.0"))
+
+(defcustom projectile-current-project-on-switch 'remove
+  "Determines whether to display current project when switching projects.
+
+When set to `remove' current project is not included, `move-to-end'
+will display current project and the end of the list of known
+projects, `keep' will leave the current project at the default
+position."
+  :group 'projectile
+  :type '(choice
+          (const :tag "Remove" remove)
+          (const :tag "Move to end" move-to-end)
+          (const :tag "Keep" keep))
+  :package-version '(projectile . "2.0.0"))
+
+(defcustom projectile-max-file-buffer-count nil
+  "Maximum number of file buffers per project that are kept open.
+
+If the value is nil, there is no limit to the opened buffers count."
+  :group 'projectile
+  :type '(choice (const :tag "No limit" nil)
+                 (natnum :tag "Buffers"))
+  :package-version '(projectile . "2.2.0"))
+
+(define-obsolete-variable-alias 'projectile-cmd-hist-ignoredups
+  'projectile-command-history-ignore-duplicates "3.4.0")
+
+(defcustom projectile-command-history-ignore-duplicates t
+  "Controls when inputs are added to projectile's command history.
+
+A value of t means consecutive duplicates are ignored.
+A value of `erase' means only the last duplicate is kept.
+A value of nil means nothing is ignored."
+  :group 'projectile
+  :type '(choice (const :tag "Don't ignore anything" nil)
+                 (const :tag "Ignore consecutive duplicates" t)
+                 (const :tag "Only keep last duplicate" erase))
+  :package-version '(projectile . "2.9.0"))
+
+(defcustom projectile-command-history-scope 'repository
+  "How widely a project's command history is shared.
+
+- `repository' - every checkout of one repository shares a history.  Two
+  git worktrees, or two clones of the same upstream, are the same project
+  on two branches: the commands you build and test it with are the same
+  ones, so a worktree made this morning already knows them (issue #1786).
+
+- `project' - each project root keeps its own history, so checkouts of one
+  repository start empty and learn separately.
+
+This is a single choice, not a list of aspects like the other options
+whose names end in `-scope': one value replaces the other.
+
+What gets shared is the history you browse - the list behind \\[previous-history-element]
+at a command prompt.  Two things stay this checkout's own, because both
+act without asking and a remembered command can carry absolute paths back
+into the checkout it was typed in: what a prompt is pre-filled with, and
+what `projectile-repeat-last-command' replays.
+
+Sharing needs the repository to be identifiable (see
+`projectile-repo-identity'); a project Projectile can say nothing about
+keeps its own history whatever this is set to."
+  :group 'projectile
+  :type '(choice (const :tag "Share across checkouts of one repository" repository)
+                 (const :tag "Keep a history per project root" project))
+  :safe (lambda (value) (memq value '(repository project)))
+  :package-version '(projectile . "3.4.0"))
+
+(defvar projectile-project-test-suffix nil
+  "Use this variable to override the current project's test-suffix property.
+It takes precedence over the test-suffix for the project type when set.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-test-suffix 'safe-local-variable #'stringp)
+
+(defvar projectile-project-test-prefix nil
+  "Use this variable to override the current project's test-prefix property.
+It takes precedence over the test-prefix for the project type when set.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-test-prefix 'safe-local-variable #'stringp)
+
+(defvar projectile-project-related-files-fn nil
+  "Use this variable to override the current project's related-files-fn property.
+It takes precedence over the related-files-fn attribute for the project type
+when set.  Should be set via .dir-locals.el.")
+
+(defvar projectile-project-src-dir nil
+  "Use this variable to override the current project's src-dir property.
+It takes precedence over the src-dir for the project type when set.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-src-dir 'safe-local-variable #'stringp)
+
+(defvar projectile-project-test-dir nil
+  "Use this variable to override the current project's test-dir property.
+It takes precedence over the test-dir for the project type when set.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-test-dir 'safe-local-variable #'stringp)
+
+
+;;; Version information
+
+(defconst projectile-version "3.5.0-snapshot"
+  "The current version of Projectile.")
+
+(defun projectile--pkg-version ()
+  "Extract Projectile's package version from its package metadata."
+  ;; Use `cond' below to avoid a compiler unused return value warning
+  ;; when `package-get-version' returns nil. See #3181.
+  (cond ((package-get-version))))
+
+;;;###autoload
+(defun projectile-version (&optional show-version)
+  "Get the Projectile version as string.
+
+If called interactively or if SHOW-VERSION is non-nil, show the
+version in the echo area and the messages buffer.
+
+The returned string includes both, the version from package.el
+and the library version, if both are present and different.
+
+If the version number could not be determined, signal an error,
+if called interactively, or if SHOW-VERSION is non-nil, otherwise
+just return nil."
+  (interactive (list t))
+  (let ((version (or (projectile--pkg-version) projectile-version)))
+   (if show-version
+       (message "Projectile %s" version)
+     version)))
+
+;;; Misc utility functions
+
+(defun projectile--collect-from-functions (functions root key-function what)
+  "Call each of FUNCTIONS with ROOT and collect their results.
+
+The lists come back concatenated in the order FUNCTIONS were given,
+de-duplicated by KEY-FUNCTION, so the first function to report an item
+is the one whose version of it survives and the earlier functions'
+findings are offered first.  Items KEY-FUNCTION returns nil for are
+dropped.
+
+A function that signals is reported and skipped rather than taking the
+whole lookup down with it; WHAT names the kind of function in that
+message."
+  (let ((seen (make-hash-table :test 'equal))
+        results)
+    (dolist (fn functions)
+      (dolist (item (condition-case err
+                        (funcall fn root)
+                      (error
+                       (projectile--message "%s function %s failed: %s"
+                                            what fn (error-message-string err))
+                       nil)))
+        (when-let* ((key (funcall key-function item))
+                    ((not (gethash key seen))))
+          (puthash key t seen)
+          (push item results))))
+    (nreverse results)))
+
+(defun projectile-unixy-system-p ()
+  "Check to see if unixy text utilities are installed."
+  (seq-every-p
+   (lambda (x) (executable-find x))
+   '("grep" "cut" "uniq")))
+
+(defun projectile-symbol-or-selection-at-point ()
+  "Get the symbol or selected text at point."
+  (if (use-region-p)
+      (buffer-substring-no-properties (region-beginning) (region-end))
+    (projectile-symbol-at-point)))
+
+(defun projectile-symbol-at-point ()
+  "Get the symbol at point and strip its properties."
+  (substring-no-properties (or (thing-at-point 'symbol) "")))
+
+(defun projectile-generate-process-name (process make-new &optional project)
+  "Infer the buffer name for PROCESS or generate a new one if MAKE-NEW is true.
+The function operates on the current project by default, but you can also
+specify a project explicitly via the optional PROJECT param."
+  (let* ((project (or project (projectile-acquire-root)))
+         (name (projectile-project-name project))
+         (base-name (format "*%s %s*" process name))
+         ;; When a buffer with the same name already exists but belongs to a
+         ;; different project root, disambiguate using the project path.
+         (base-name (if (and (not make-new)
+                             (let ((buf (get-buffer base-name)))
+                               (and buf
+                                    (not (string= (with-current-buffer buf default-directory)
+                                                  project)))))
+                        (format "*%s %s*" process (abbreviate-file-name project))
+                      base-name)))
+    (if make-new
+        (generate-new-buffer-name base-name)
+      base-name)))
+
+
+;;; Serialization
+(defun projectile-serialize (data filename)
+  "Serialize DATA to FILENAME.
+
+The saved data can be restored with `projectile-unserialize'."
+  (if (file-writable-p filename)
+    (with-temp-file filename
+      (insert (let (print-length) (prin1-to-string data))))
+    (display-warning 'projectile (format "Cache file '%s' is not writable" filename) :warning)))
+
+(defun projectile-unserialize (filename)
+  "Read data serialized by `projectile-serialize' from FILENAME."
+  (with-demoted-errors
+      "Error during file deserialization: %S"
+    (when (file-exists-p filename)
+      (with-temp-buffer
+        (insert-file-contents filename)
+        ;; this will blow up if the contents of the file aren't
+        ;; lisp data structures
+        (read (buffer-string))))))
+
+
+;;; Caching
+(defvar projectile-file-exists-cache
+  (make-hash-table :test 'equal)
+  "Cached `projectile-file-exists-p' results.")
+
+(defvar projectile-file-exists-cache-timer nil
+  "Timer for scheduling `projectile-file-exists-cache-cleanup'.")
+
+(defun projectile-file-exists-cache-cleanup ()
+  "Remove timed out cache entries.
+Also reschedule or remove the timer if no more items are in the cache."
+  (let ((now (current-time)))
+    (maphash (lambda (key value)
+               (if (time-less-p (cdr value) now)
+                   (remhash key projectile-file-exists-cache)))
+             projectile-file-exists-cache)
+    (setq projectile-file-exists-cache-timer
+          (if (> (hash-table-count projectile-file-exists-cache) 0)
+              (run-with-timer 10 nil 'projectile-file-exists-cache-cleanup)))))
+
+(defun projectile-file-exists-p (filename)
+  "Return t if file FILENAME exists.
+A wrapper around `file-exists-p' with additional caching support."
+  (let* ((file-remote (file-remote-p filename))
+         (expire-seconds
+          (if file-remote
+              (and projectile-file-exists-remote-cache-expire
+                   (> projectile-file-exists-remote-cache-expire 0)
+                   projectile-file-exists-remote-cache-expire)
+            (and projectile-file-exists-local-cache-expire
+                 (> projectile-file-exists-local-cache-expire 0)
+                 projectile-file-exists-local-cache-expire)))
+         (remote-file-name-inhibit-cache (if expire-seconds
+                                             expire-seconds
+                                           remote-file-name-inhibit-cache)))
+    (if (not expire-seconds)
+        (file-exists-p filename)
+      (let* ((current-time (current-time))
+             (cached (gethash filename projectile-file-exists-cache))
+             (cached-value (if cached (car cached)))
+             (cached-expire (if cached (cdr cached)))
+             (cached-expired (if cached (time-less-p cached-expire current-time) t))
+             (value (or (and (not cached-expired) cached-value)
+                        (if (file-exists-p filename) 'found 'notfound))))
+        (when (or (not cached) cached-expired)
+          (puthash filename
+                   (cons value (time-add current-time (seconds-to-time expire-seconds)))
+                   projectile-file-exists-cache))
+        (unless projectile-file-exists-cache-timer
+          (setq projectile-file-exists-cache-timer
+                (run-with-timer 10 nil 'projectile-file-exists-cache-cleanup)))
+        (equal value 'found)))))
+
+(defsubst projectile-persistent-cache-p ()
+  (eq projectile-enable-caching 'persistent))
+
+;; Delete the invalidated project's on-disk cache file, when
+;; persistent caching is enabled.
+(projectile--register-project-cache-cleanup
+ 'projectile-project-cache-file
+ (lambda (project-root)
+   (when (projectile-persistent-cache-p)
+     (let ((cache-file (projectile-project-cache-file project-root)))
+       (when (file-exists-p cache-file)
+         (delete-file cache-file))))))
+
+(defun projectile--invalidate-project-cache (project-root)
+  "Drop all of Projectile's per-project caches for PROJECT-ROOT.
+
+Runs every cleanup in `projectile--project-cache-cleanups': the
+tables defined via `projectile-define-project-cache' plus the ad-hoc
+cleanups (cancelling in-flight background indexing and pending cache
+flushes, removing file-notify watches, deleting the on-disk cache
+file)."
+  (dolist (entry projectile--project-cache-cleanups)
+    (funcall (cdr entry) project-root)))
+
+;;;###autoload
+(defun projectile-invalidate-cache (prompt)
+  "Remove the current project's files from `projectile-projects-cache'.
+
+With a prefix argument PROMPT prompts for the name of the project whose cache
+to invalidate.
+
+The global (project-independent) cache for checking which project a file
+belongs to, is also cleared. Therefore this function is still useful even
+when not operating on a specific project, and as such only the global cache
+is cleared when there is no current project (unless you give a prefix
+argument)."
+  (interactive "P")
+  (setq projectile-project-root-cache (make-hash-table :test 'equal))
+  ;; Drop the file-existence cache too - otherwise, after the user
+  ;; creates a project marker (`.projectile', `.git', etc.) over TRAMP,
+  ;; the negative entries cached during earlier root-walks would keep
+  ;; reporting "not found" for up to `projectile-file-exists-remote-cache-expire'
+  ;; seconds even though the project root walk has been invalidated.
+  (clrhash projectile-file-exists-cache)
+  (when-let* ((project-root
+              (if prompt
+                  (completing-read "Remove cache for: "
+                                   (hash-table-keys projectile-projects-cache))
+                (projectile-project-root))))
+    (projectile--invalidate-project-cache project-root)
+    (projectile--message "Invalidated cache for %s"
+                         (propertize project-root 'face 'font-lock-keyword-face)))
+  (when (fboundp 'recentf-cleanup)
+    (recentf-cleanup)))
+
+;;;###autoload
+(defun projectile-invalidate-cache-all ()
+  "Invalidate the caches of every known project.
+
+Runs the same per-project invalidation as `projectile-invalidate-cache'
+over all projects in `projectile-known-projects' (plus any project that
+only has an entry in `projectile-projects-cache'), and also clears the
+global project root and file-existence caches.  When persistent caching
+is enabled the projects' on-disk cache files are deleted too.
+
+Remote (TRAMP) projects are skipped, as touching each one could mean a
+slow connection round-trip per project; invalidate those individually
+with `projectile-invalidate-cache'."
+  (interactive)
+  (setq projectile-project-root-cache (make-hash-table :test 'equal))
+  (clrhash projectile-file-exists-cache)
+  (let ((roots (seq-remove #'file-remote-p
+                           (delete-dups
+                            (append (projectile-known-projects)
+                                    (hash-table-keys projectile-projects-cache))))))
+    (dolist (project-root roots)
+      (projectile--invalidate-project-cache project-root))
+    (projectile--message "Invalidated the caches of %d project(s)" (length roots)))
+  (when (fboundp 'recentf-cleanup)
+    (recentf-cleanup)))
+
+;;;###autoload
+(defun projectile-discard-root-cache ()
+  "Clear `projectile-project-root-cache' without touching other caches.
+Useful after creating, removing, or moving a project marker (e.g.
+`.projectile' or `.git') - Projectile would otherwise keep returning
+its previously cached answer for that directory.
+
+See also `projectile-invalidate-cache', which does this and also drops
+the per-project file list and project-type caches."
+  (interactive)
+  (setq projectile-project-root-cache (make-hash-table :test 'equal))
+  ;; The file-existence cache holds the negative answers gathered
+  ;; while walking up looking for project markers; without clearing it
+  ;; here, a freshly-created `.projectile' over TRAMP wouldn't be
+  ;; visible until the entries time out (see
+  ;; `projectile-file-exists-remote-cache-expire').
+  (clrhash projectile-file-exists-cache)
+  (projectile--message "Cleared the project root cache"))
+
+(defun projectile-time-seconds ()
+  "Return the number of seconds since the unix epoch."
+  (time-convert nil 'integer))
+
+(defun projectile-cache-project (project files)
+  "Cache PROJECTs FILES.
+The cache is created both in memory and on the hard drive."
+  (puthash project files projectile-projects-cache)
+  (puthash project (projectile-time-seconds) projectile-projects-cache-time)
+  (when (projectile-persistent-cache-p)
+    (projectile-serialize files (projectile-project-cache-file project)))
+  (projectile--maybe-watch-project project files))
+
+(defun projectile-load-project-cache (project-root)
+  "Load the cache file for PROJECT-ROOT in memory."
+  (when-let* ((cache-file (projectile-project-cache-file project-root)))
+    (when (file-exists-p cache-file)
+      (when-let* ((data (projectile-unserialize cache-file)))
+        (puthash project-root data projectile-projects-cache)
+        ;; Seed the cache time from the file's mtime so the TTL check in
+        ;; `projectile-project-files' can decide whether the loaded data is
+        ;; already stale, and so the in-memory entry isn't evicted on the
+        ;; next call just because no time was recorded.
+        (puthash project-root
+                 (time-convert
+                  (file-attribute-modification-time
+                   (file-attributes cache-file))
+                  'integer)
+                 projectile-projects-cache-time)
+        ;; Loading the persistent cache fills the in-memory file list just
+        ;; like a fresh index does, so arm the watches here too.
+        (projectile--maybe-watch-project project-root data)
+        data))))
+
+;;;###autoload
+(defun projectile-purge-file-from-cache (file)
+  "Purge FILE from the cache of the current project."
+  (interactive
+   (list (projectile-completing-read
+          "Remove file from cache: "
+          (projectile-current-project-files)
+          :caller 'projectile-read-file)))
+  (let* ((project-root (projectile-project-root))
+         (project-cache (gethash project-root projectile-projects-cache)))
+    (if (projectile-file-cached-p file project-root)
+        (let ((new-cache (remove file project-cache)))
+          (puthash project-root new-cache projectile-projects-cache)
+          (when (projectile-persistent-cache-p)
+            (projectile-serialize new-cache (projectile-project-cache-file project-root)))
+          ;; Re-derive watches from the shrunken cache, otherwise the purged
+          ;; file's directory keeps being watched and a later create-event
+          ;; there re-adds the entries we just removed.
+          (projectile--maybe-watch-project project-root new-cache)
+          (projectile--message "%s removed from cache" file))
+      (user-error "%s is not in the cache" file))))
+
+;;;###autoload
+(defun projectile-purge-dir-from-cache (dir)
+  "Purge DIR from the cache of the current project."
+  (interactive
+   (list (projectile-completing-read
+          "Remove directory from cache: "
+          (projectile-current-project-dirs)
+          :caller 'projectile-read-directory)))
+  (let* ((project-root (projectile-project-root))
+         (project-cache (gethash project-root projectile-projects-cache))
+         (new-cache (seq-remove (lambda (str) (string-prefix-p dir str))
+                                project-cache)))
+    (puthash project-root new-cache projectile-projects-cache)
+    (when (projectile-persistent-cache-p)
+      (projectile-serialize new-cache (projectile-project-cache-file project-root)))
+    ;; Re-derive watches so the purged directory is no longer watched (and its
+    ;; files don't get re-added by a later create-event).
+    (projectile--maybe-watch-project project-root new-cache)))
+
+(defun projectile-file-cached-p (file project)
+  "Check if FILE is already in PROJECT cache."
+  (member file (gethash project projectile-projects-cache)))
+
+(defun projectile--schedule-cache-flush (project)
+  "Arrange for PROJECT's in-memory cache to be serialized after Emacs is idle.
+A pending flush for the same PROJECT is cancelled and rescheduled, so that
+adding several files in quick succession only results in a single disk write,
+and the write always uses the latest in-memory contents."
+  (when-let* ((existing (gethash project projectile--pending-cache-flush-timers)))
+    (cancel-timer existing))
+  (puthash project
+           (run-with-idle-timer
+            30 nil
+            (lambda ()
+              (remhash project projectile--pending-cache-flush-timers)
+              (projectile-serialize
+               (gethash project projectile-projects-cache)
+               (projectile-project-cache-file project))))
+           projectile--pending-cache-flush-timers))
+
+
+;;; Automatic cache updates via file-notify watches
+;;
+;; Opt-in machinery (see `projectile-auto-update-cache-with-watches') that
+;; keeps `projectile-projects-cache' in sync with the filesystem.  Emacs
+;; file notifications are not recursive, so a watched project gets one
+;; watch per directory, derived from the cached file list and bounded by
+;; `projectile-watch-directory-limit'.  Events are debounced per project
+;; and applied incrementally; anything that can't be applied safely falls
+;; back to invalidating the project's cache, which rebuilds lazily and
+;; re-arms the watches on the next cache fill.
+
+(defun projectile--maybe-watch-project (project files)
+  "Arm file-notify watches for PROJECT, whose cached file list is FILES.
+No-op unless both `projectile-auto-update-cache-with-watches' and
+`projectile-enable-caching' are non-nil.  Remote (TRAMP) projects are
+never watched: registering one watch per directory would mean a remote
+round-trip each, and most remote handlers don't support file
+notifications anyway."
+  (when (and projectile-auto-update-cache-with-watches
+             projectile-enable-caching
+             (not (file-remote-p project)))
+    (projectile--watch-project project files)))
+
+(defun projectile--watch-directories (project files)
+  "Return the directories of PROJECT to watch, derived from cached FILES.
+The result contains the project root and the directory chain of every
+cached file, as absolute names with trailing slashes.  Directories with
+no cached files below them (e.g. empty directories) are not included,
+so files that later appear in them go unnoticed until the next full
+re-index."
+  (let ((dirs (make-hash-table :test 'equal)))
+    (puthash (file-name-as-directory (expand-file-name project)) t dirs)
+    (dolist (file files)
+      (dolist (dir (projectile--directory-ancestors file))
+        (puthash (expand-file-name dir project) t dirs)))
+    (hash-table-keys dirs)))
+
+(defun projectile--watch-make-callback (project)
+  "Return a file-notify callback that queues events for PROJECT."
+  (lambda (event) (projectile--handle-watch-event project event)))
+
+(defun projectile--watch-skipped-once (project format-string &rest args)
+  "Report (via FORMAT-STRING and ARGS) that PROJECT won't be watched.
+The message is only emitted when `projectile-verbose' is non-nil, and
+only once per project and session."
+  (unless (gethash project projectile--watch-skipped-projects)
+    (puthash project t projectile--watch-skipped-projects)
+    (apply #'projectile--message format-string args)))
+
+(defun projectile--watch-project (project files)
+  "Register file-notify watches for PROJECT, whose cached files are FILES.
+One watch per directory, into `projectile--project-watches'.  Any
+watches already registered for PROJECT are replaced.  Does nothing
+beyond a one-time message when the project spans more directories than
+`projectile-watch-directory-limit' or when the platform provides no
+usable file notification backend."
+  (projectile--unwatch-project project)
+  (let ((dirs (projectile--watch-directories project files)))
+    (if (> (length dirs) projectile-watch-directory-limit)
+        (projectile--watch-skipped-once
+         project
+         "Not watching %s: %d directories exceed `projectile-watch-directory-limit' (%d)"
+         project (length dirs) projectile-watch-directory-limit)
+      (let ((callback (projectile--watch-make-callback project))
+            (failed nil)
+            watches)
+        (dolist (dir dirs)
+          (unless failed
+            (condition-case nil
+                (when (file-directory-p dir)
+                  (push (cons (file-notify-add-watch dir '(change) callback)
+                              dir)
+                        watches))
+              (error (setq failed t)))))
+        (if (not failed)
+            (puthash project watches projectile--project-watches)
+          ;; No usable backend, or the OS ran out of watches: roll back the
+          ;; partial registration and don't retry noisily on every cache fill.
+          (dolist (entry watches)
+            (ignore-errors (file-notify-rm-watch (car entry))))
+          (projectile--watch-skipped-once
+           project
+           "Cannot watch %s (no file notification backend, or watch registration failed)"
+           project))))))
+
+(defun projectile--unwatch-project (project)
+  "Remove all file-notify watches registered for PROJECT.
+Queued events and the pending debounce timer are discarded too."
+  (dolist (entry (gethash project projectile--project-watches))
+    (ignore-errors (file-notify-rm-watch (car entry))))
+  ;; Unconditional: a nil registry value (no watches left) must still be
+  ;; removed, or it would survive `projectile--teardown-all-watches'.
+  (remhash project projectile--project-watches)
+  (when-let* ((timer (gethash project projectile--watch-debounce-timers)))
+    (cancel-timer timer)
+    (remhash project projectile--watch-debounce-timers))
+  (remhash project projectile--watch-pending-events))
+
+(defun projectile--teardown-all-watches ()
+  "Drop the file-notify watches of every watched project.
+Runs when `projectile-mode' is disabled, when
+`projectile-auto-update-cache-with-watches' is customized to nil, and
+on `kill-emacs'."
+  (dolist (project (hash-table-keys projectile--project-watches))
+    (projectile--unwatch-project project)))
+
+(defun projectile--watch-all-cached-projects ()
+  "Arm watches for every project that already has a cached file list.
+Used when `projectile-auto-update-cache-with-watches' is enabled
+mid-session, so already-cached projects don't have to wait for their
+next cache fill."
+  (maphash #'projectile--maybe-watch-project projectile-projects-cache))
+
+(defun projectile--handle-watch-event (project event)
+  "Queue file-notify EVENT for PROJECT and start the debounce timer.
+Events from descriptors no longer in `projectile--project-watches' are
+dropped; in particular the `stopped' event that `file-notify-rm-watch'
+itself generates on some backends can't re-trigger processing after the
+project was unwatched."
+  (when (assoc (car event) (gethash project projectile--project-watches))
+    (push event (gethash project projectile--watch-pending-events))
+    (unless (gethash project projectile--watch-debounce-timers)
+      (puthash project
+               (run-with-timer projectile--watch-debounce-delay nil
+                               #'projectile--process-watch-events project)
+               projectile--watch-debounce-timers))))
+
+(defvar projectile--watch-added-files nil
+  "Paths the watch batch in progress has added to the cache.
+Bound by `projectile--process-watch-events\\=' so the whole batch can be
+put to the VCS in one go; nil outside one.")
+
+(defun projectile--vcs-ignored-subset (root relatives)
+  "Return the members of RELATIVES that the VCS at ROOT ignores.
+
+One `git check-ignore\\=' answers for the whole list, which is what makes
+this usable from the watch path - a process per file would not be.
+Returns nil for anything but git, and for a git that fails; treating the
+answer as \"nothing is ignored\" is conservative, since the only cost is
+the drift this exists to remove.
+
+`call-process-region\\=' rather than a TRAMP-aware call because watches are
+never armed for a remote project in the first place."
+  (when (and relatives (eq (projectile-project-vcs root) 'git))
+    (let ((default-directory root))
+      (with-temp-buffer
+        ;; Exit status 1 means "none of them are ignored", which is an
+        ;; answer rather than a failure; only 0 produces output.
+        (when (eq 0 (ignore-errors
+                      (call-process-region
+                       (mapconcat #'identity relatives "\0") nil
+                       "git" nil t nil
+                       "check-ignore" "-z" "--stdin")))
+          (split-string (buffer-string) "\0" t))))))
+
+(defun projectile--watch-drop-vcs-ignored (project added)
+  "Remove from PROJECT\\='s cache the ADDED paths its VCS ignores.
+
+The watch path applies Projectile\\='s own ignore rules, which know nothing
+about a `.gitignore\\='; under `alien\\=' and `hybrid\\=' indexing the VCS is
+what produced the file list, so without this a watched project slowly
+gains files a re-index would never have listed (see issue #1075, which
+fixed the same hole for files opened by hand).
+
+Returns non-nil when the cache was changed."
+  (when (memq projectile-indexing-method '(alien hybrid))
+    (when-let* ((ignored (projectile--vcs-ignored-subset project added)))
+      (let ((set (make-hash-table :test 'equal :size (length ignored))))
+        (dolist (file ignored) (puthash file t set))
+        (puthash project
+                 (seq-remove (lambda (file) (gethash file set))
+                             (gethash project projectile-projects-cache))
+                 projectile-projects-cache)
+        t))))
+
+(defun projectile--process-watch-events (project)
+  "Apply PROJECT's queued file-notify events to its cached file list.
+Runs from the debounce timer.  If any event can't be applied
+incrementally the whole batch falls back to
+`projectile--invalidate-project-cache' - correctness beats cleverness;
+the cache rebuilds lazily on the next file listing, re-arming the
+watches.  After successful mutations the persistent cache flush is
+scheduled via `projectile--schedule-cache-flush'."
+  (remhash project projectile--watch-debounce-timers)
+  (let ((events (nreverse (gethash project projectile--watch-pending-events))))
+    (remhash project projectile--watch-pending-events)
+    (when (and events (gethash project projectile--project-watches))
+      ;; The cache entry can vanish without an invalidation (e.g. the
+      ;; `projectile-files-cache-expire' TTL drops it directly), leaving the
+      ;; watches orphaned.  Mutating an absent cache would fabricate a bogus
+      ;; one-file project, so just drop the watches; they re-arm when the
+      ;; cache is next filled.  A present-but-empty file list is different:
+      ;; that project is still watched and its events still apply.
+      (if (eq (gethash project projectile-projects-cache 'projectile--none)
+              'projectile--none)
+          (projectile--unwatch-project project)
+        (let* ((mutated nil)
+               (projectile--watch-added-files nil)
+               (fallback
+                (catch 'projectile--watch-fallback
+                  (dolist (event events)
+                    (when (projectile--watch-apply-event project event)
+                      (setq mutated t)))
+                  nil)))
+          ;; One question to the VCS for everything the batch added, rather
+          ;; than one per file as the opened-file path can afford.
+          (when (and (not fallback)
+                     (projectile--watch-drop-vcs-ignored
+                      project projectile--watch-added-files))
+            (setq mutated t))
+          (cond
+           (fallback
+            (projectile--message "Invalidating the cache of %s (%s)"
+                                 project fallback)
+            ;; Also drops the watches (and any events queued meanwhile).
+            (projectile--invalidate-project-cache project))
+           ((and mutated (projectile-persistent-cache-p))
+            (projectile--schedule-cache-flush project))))))))
+
+(defun projectile--watch-apply-event (project event)
+  "Apply one file-notify EVENT to PROJECT's cached file list.
+Returns non-nil when the cached list was mutated.  Throws
+`projectile--watch-fallback' (with a reason string) when the event
+cannot be applied incrementally."
+  (pcase-let ((`(,descriptor ,action ,file . ,rest) event))
+    (pcase action
+      ('created (projectile--watch-handle-created project file))
+      ('deleted (projectile--watch-handle-deleted project file))
+      ;; A rename is a deletion at the old name plus a creation at the new
+      ;; one.  `or' would short-circuit the second handler, so evaluate both.
+      ('renamed
+       (let ((removed (projectile--watch-handle-deleted project file))
+             (added (and (car rest)
+                         (projectile--watch-handle-created project (car rest)))))
+         (or removed added)))
+      ('stopped (projectile--watch-handle-stopped project descriptor))
+      ;; `changed' / `attribute-changed' don't affect the file list.
+      (_ nil))))
+
+(defun projectile--watch-transient-file-p (file)
+  "Return non-nil when FILE is an editor artifact that shouldn't be cached.
+Matches lockfiles (.#foo), auto-save files (#foo#), backup files (foo~)
+and the project's own persistent cache file - all of them appear and
+vanish as a side effect of editing and would otherwise churn the cache
+(the cache file would even schedule a flush that touches itself)."
+  (let ((name (file-name-nondirectory (directory-file-name file))))
+    (or (string-prefix-p ".#" name)
+        (and (string-prefix-p "#" name) (string-suffix-p "#" name))
+        (string-suffix-p "~" name)
+        (string= name projectile-cache-file))))
+
+(defun projectile--watch-keep-file-p (project file)
+  "Return non-nil when FILE (relative to PROJECT) belongs in the file list.
+Runs FILE through the same dirconfig and globally-ignored filtering the
+native and hybrid indexers use, and respects dirconfig `+' keep
+entries.  VCS-level ignores (e.g. `.gitignore') are not consulted, so
+under alien indexing a watched project can temporarily gain entries the
+VCS would have excluded, until the next full re-index."
+  (let ((default-directory project))
+    (and (projectile-remove-ignored (list file))
+         (let ((dirs (projectile-get-project-directories project)))
+           (or (member project dirs)
+               (let ((absolute (expand-file-name file project)))
+                 (seq-some (lambda (dir) (string-prefix-p dir absolute))
+                           dirs)))))))
+
+(defun projectile--watch-handle-created (project file)
+  "Handle the creation of FILE (absolute) inside PROJECT.
+Regular files go through the ignore filter into the cached file list;
+directories are adopted via `projectile--watch-adopt-directory'.
+Returns non-nil when the cached list was mutated."
+  (cond
+   ;; A `renamed' event can carry a destination outside the project (the
+   ;; file was moved away, not renamed in place); caching it would insert
+   ;; a bogus ../ entry into the file list.
+   ((not (string-prefix-p (file-name-as-directory (expand-file-name project))
+                          (expand-file-name file)))
+    nil)
+   ((projectile--watch-transient-file-p file) nil)
+   ((file-directory-p file)
+    (projectile--watch-adopt-directory project file))
+   ((file-regular-p file)
+    (let ((relative (file-relative-name file project)))
+      (when (and (not (member relative
+                              (gethash project projectile-projects-cache)))
+                 (projectile--watch-keep-file-p project relative))
+        (push relative projectile--watch-added-files)
+        (puthash project
+                 (cons relative (gethash project projectile-projects-cache))
+                 projectile-projects-cache)
+        t)))
+   ;; The path is already gone (created and deleted within one debounce
+   ;; window), or something exotic like a socket: nothing to cache.
+   (t nil)))
+
+(defun projectile--watch-adopt-directory (project dir)
+  "Watch DIR, a directory newly created inside PROJECT, and cache its files.
+DIR may already have contents - e.g. a populated directory moved into
+the project generates a single `created' event - so its entries are
+enumerated: regular files are handed to
+`projectile--watch-handle-created' and subdirectories are adopted
+recursively.  Ignored directories are skipped entirely.  Returns
+non-nil when the cached file list was mutated.  Throws
+`projectile--watch-fallback' when DIR can't be watched (the watch limit
+was reached, or the backend refused)."
+  (let* ((dir (file-name-as-directory (expand-file-name dir)))
+         (relative (file-relative-name dir project))
+         (watches (gethash project projectile--project-watches)))
+    (cond
+     ;; Already watched (duplicate or overlapping events): nothing to do.
+     ((rassoc dir watches) nil)
+     ;; Don't descend into ignored directories.
+     ((let ((default-directory project))
+        (null (projectile-remove-ignored (list relative))))
+      nil)
+     ((>= (length watches) projectile-watch-directory-limit)
+      (throw 'projectile--watch-fallback
+             (format "new directory %s would exceed `projectile-watch-directory-limit'"
+                     relative)))
+     (t
+      (let ((descriptor
+             (condition-case err
+                 (file-notify-add-watch
+                  dir '(change) (projectile--watch-make-callback project))
+               (error (throw 'projectile--watch-fallback
+                             (error-message-string err))))))
+        (puthash project (cons (cons descriptor dir) watches)
+                 projectile--project-watches))
+      (let ((mutated nil))
+        ;; Enumerating the new directory races against whatever is still
+        ;; populating (or already removing) it; an IO error here must not
+        ;; leave the batch half-applied, so convert it into the fallback.
+        ;; A nested `projectile--watch-fallback' throw is not an error
+        ;; condition and passes through untouched.
+        (condition-case err
+            (dolist (entry (directory-files
+                            dir t directory-files-no-dot-files-regexp t))
+              (when (projectile--watch-handle-created project entry)
+                (setq mutated t)))
+          (error (throw 'projectile--watch-fallback
+                        (error-message-string err))))
+        mutated)))))
+
+(defun projectile--watch-handle-deleted (project file)
+  "Handle the deletion of FILE (absolute) inside PROJECT.
+FILE no longer exists, so whether it was a file or a directory can't be
+queried; cached entries at the path and below it are removed, and so
+are the watches of any directories below it.  Returns non-nil when the
+cached list was mutated.  Throws `projectile--watch-fallback' when FILE
+is the project root itself - there is nothing left to watch, so the
+whole cache is invalidated instead."
+  (let* ((relative (file-relative-name file project))
+         (dir-absolute (file-name-as-directory (expand-file-name file)))
+         (dir-relative (file-name-as-directory relative))
+         (files (gethash project projectile-projects-cache)))
+    (when (string= dir-absolute
+                   (file-name-as-directory (expand-file-name project)))
+      (throw 'projectile--watch-fallback "the project root itself was deleted"))
+    ;; Drop the watches under the deleted path.  Their backends may emit a
+    ;; `stopped' event on removal; by then the descriptors are no longer
+    ;; registered, so `projectile--handle-watch-event' discards it.
+    (let ((watches (gethash project projectile--project-watches))
+          (remaining nil))
+      (dolist (entry watches)
+        (if (string-prefix-p dir-absolute (cdr entry))
+            (ignore-errors (file-notify-rm-watch (car entry)))
+          (push entry remaining)))
+      ;; `remaining' always contains at least the root watch here (only a
+      ;; root deletion prunes everything, and that threw above), but never
+      ;; store nil: a nil registry value would read as "not watched".
+      (if remaining
+          (puthash project (nreverse remaining) projectile--project-watches)
+        (remhash project projectile--project-watches)))
+    (let ((new-files (seq-remove
+                      (lambda (f)
+                        (or (string= f relative)
+                            (string-prefix-p dir-relative f)))
+                      files)))
+      (unless (= (length new-files) (length files))
+        (puthash project new-files projectile-projects-cache)
+        t))))
+
+(defun projectile--watch-handle-stopped (project descriptor)
+  "Handle DESCRIPTOR's watch stopping in PROJECT.
+When the watched directory is gone this is just the tail end of a
+deletion that the parent directory's watch already reported, so only
+the bookkeeping entry is dropped.  When the directory still exists the
+watch died under us (backend hiccup, event queue overflow) and the
+cache can no longer be trusted, so throw to trigger invalidation.
+Always returns nil - the cached file list itself is not touched."
+  (let* ((watches (gethash project projectile--project-watches))
+         (entry (assoc descriptor watches)))
+    (when entry
+      (let ((remaining (delq entry watches)))
+        (if remaining
+            (puthash project remaining projectile--project-watches)
+          ;; Never store nil - it would read as "not watched".
+          (remhash project projectile--project-watches)))
+      ;; The root has no watched parent to report its deletion, so a stopped
+      ;; root watch always invalidates, whether the directory survived or not.
+      (when (or (file-directory-p (cdr entry))
+                (string= (cdr entry)
+                         (file-name-as-directory (expand-file-name project))))
+        (throw 'projectile--watch-fallback
+               (format "the watch on %s stopped unexpectedly" (cdr entry))))))
+  nil)
+
+;;;###autoload
+(defun projectile-cache-current-file (&optional project-root)
+  "Add the currently visited file to the cache.
+PROJECT-ROOT defaults to the current project."
+  (interactive)
+  (let ((current-project (or project-root (projectile-project-root))))
+    (when (and (buffer-file-name)
+               (file-exists-p (buffer-file-name))
+               (gethash current-project projectile-projects-cache))
+      (let* ((abs-current-file (file-truename (buffer-file-name)))
+             (current-file (file-relative-name abs-current-file current-project)))
+        (unless (or (projectile-file-cached-p current-file current-project)
+                    ;; A file under an ignored directory is ignored too, so
+                    ;; the single file check covers its parents as well.
+                    (projectile-ignored-file-p abs-current-file current-project)
+                    ;; Projectile's own rules don't know what the VCS
+                    ;; ignores, and under `alien'/`hybrid' the VCS is what
+                    ;; produced the file list - so caching an opened file it
+                    ;; ignores would put something in the cache that indexing
+                    ;; never would (issue #1075).  `native' walks the tree
+                    ;; itself and lists such files anyway, so it's left alone.
+                    (and (memq projectile-indexing-method '(alien hybrid))
+                         (projectile-vcs-ignored-file-p abs-current-file current-project)))
+          (let ((project-files (cons current-file (gethash current-project projectile-projects-cache))))
+            (puthash current-project project-files projectile-projects-cache)
+            ;; Defer the disk write until Emacs is idle to avoid freezing the
+            ;; UI immediately after the new file was created.
+            (when (projectile-persistent-cache-p)
+              (projectile--schedule-cache-flush current-project)))
+          (if (called-interactively-p 'interactive)
+              (message "Added %s to the cache of %s"
+                       (propertize current-file 'face 'font-lock-keyword-face)
+                       (propertize current-project 'face 'font-lock-keyword-face))
+            (projectile--message
+             "Added %s to the cache of %s"
+             (propertize current-file 'face 'font-lock-keyword-face)
+             (propertize current-project 'face 'font-lock-keyword-face))))))))
+
+;; cache opened files automatically to reduce the need for cache invalidation
+(defun projectile-cache-files-find-file-hook (&optional project-root)
+  "Function for caching files with `find-file-hook'.
+PROJECT-ROOT defaults to the current project."
+  (let ((project-root (or project-root (projectile-project-p))))
+    (when (and projectile-enable-caching
+               project-root
+               (not (projectile-ignored-project-p project-root)))
+      (projectile-cache-current-file project-root))))
+
+(defun projectile-track-known-projects-find-file-hook (&optional project-root)
+  "Function for caching projects with `find-file-hook'.
+PROJECT-ROOT defaults to the current project."
+  (when projectile-track-known-projects-automatically
+    (when-let* ((project-root (or project-root (projectile-project-p))))
+      (projectile-add-known-project project-root))))
+
+(defvar projectile--current-project nil
+  "The project root `projectile-project-changed-functions' last saw.")
+
+(defun projectile--maybe-run-project-changed-functions (&optional project-root)
+  "Run `projectile-project-changed-functions' when the project changed.
+PROJECT-ROOT defaults to the current project.  The last seen project
+is tracked in `projectile--current-project'."
+  (when projectile-project-changed-functions
+    (when-let* ((project-root (or project-root (projectile-project-p))))
+      (unless (equal project-root projectile--current-project)
+        (let ((previous projectile--current-project))
+          (setq projectile--current-project project-root)
+          (run-hook-with-args 'projectile-project-changed-functions
+                              project-root previous))))))
+
+(defun projectile-maybe-invalidate-cache (force)
+  "Invalidate if FORCE or project's dirconfig newer than cache."
+  (when (or force (file-newer-than-file-p (projectile-dirconfig-file)
+                                          (projectile-project-cache-file)))
+    (projectile-invalidate-cache nil)))
+
+
+;;; File frecency
+;;
+;; Tracks which project files are visited and how often, so that
+;; `projectile-find-file' (and friends) can rank the files you actually
+;; work with first.  The ranking is applied through completion metadata
+;; (`display-sort-function'), so it works with any completion UI that
+;; honors it (the default completion UI, Vertico, Icomplete, ...) and
+;; under every indexing method, including `alien'.
+
+(defcustom projectile-enable-frecency t
+  "When non-nil, rank project files by frecency in completion.
+Projectile records file visits per project and sorts completion
+candidates by a combination of visit frequency and recency, so the
+files you work with the most show up first in `projectile-find-file'
+and related commands.
+
+The history is persisted in `projectile-frecency-file'."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.1.0"))
+
+(defcustom projectile-frecency-file
+  (locate-user-emacs-file "projectile-frecency.eld")
+  "File where Projectile persists the per-project file visit history."
+  :group 'projectile
+  :type 'file
+  :package-version '(projectile . "3.4.0"))
+
+(defcustom projectile-frecency-max-files 200
+  "Maximum number of files tracked per project.
+When the limit is exceeded, the lowest-ranking entries are dropped."
+  :group 'projectile
+  :type 'natnum
+  :package-version '(projectile . "3.1.0"))
+
+(defcustom projectile-frecency-max-projects 100
+  "Maximum number of projects whose frecency history is kept.
+When the store holds more roots than this, the least recently active
+ones are dropped on save, so the history can't grow without bound as
+projects come and go."
+  :group 'projectile
+  :type 'natnum
+  :package-version '(projectile . "3.2.0"))
+
+(defvar projectile--frecency-table nil
+  "Hash of project root to a hash of relative file name to (COUNT . TIME).
+TIME is the last visit in seconds since the epoch.  nil until loaded
+from `projectile-frecency-file' by `projectile--frecency-data'.")
+
+(defvar projectile--frecency-dirty nil
+  "Non-nil when the frecency data changed since it was last saved.")
+
+(defun projectile--frecency-data ()
+  "Return the frecency table, loading it from disk on first use.
+A malformed history file yields an empty table with a warning; it
+must never break `find-file' (the recording hook would re-signal on
+every file visit otherwise)."
+  (or projectile--frecency-table
+      (setq projectile--frecency-table
+            (condition-case err
+                (let ((table (make-hash-table :test 'equal)))
+                  (dolist (project (projectile-unserialize
+                                    projectile-frecency-file))
+                    (let ((files (make-hash-table :test 'equal)))
+                      (dolist (entry (cdr project))
+                        (pcase-let ((`(,file ,count ,time) entry))
+                          (puthash file (cons count time) files)))
+                      (puthash (car project) files table)))
+                  table)
+              (error
+               (display-warning
+                'projectile
+                (format "Malformed frecency file '%s' ignored (%s)"
+                        projectile-frecency-file (error-message-string err))
+                :warning)
+               (make-hash-table :test 'equal))))))
+
+(defun projectile--frecency-score (entry now)
+  "Compute the frecency score of ENTRY (COUNT . TIME) at time NOW.
+The visit count decays with a half-life of two weeks, so a file
+visited often long ago eventually ranks below one visited recently."
+  (let ((age-days (/ (max 0 (- now (cdr entry))) 86400.0)))
+    (* (car entry) (expt 0.5 (/ age-days 14.0)))))
+
+(defun projectile--frecency-prune (files)
+  "Drop the lowest-scoring entries of FILES down to the configured limit."
+  (let ((now (projectile-time-seconds))
+        (entries nil))
+    (maphash (lambda (file entry)
+               (push (cons file (projectile--frecency-score entry now)) entries))
+             files)
+    (dolist (victim (nthcdr projectile-frecency-max-files
+                            (seq-sort-by #'cdr #'> entries)))
+      (remhash (car victim) files))))
+
+(defun projectile--frecency-record (project-root)
+  "Record a visit to the current buffer's file under PROJECT-ROOT.
+Remote projects are not tracked, to keep the visit hook free of
+TRAMP round-trips."
+  (when (and projectile-enable-frecency
+             project-root
+             buffer-file-name
+             (not (file-remote-p project-root)))
+    ;; `projectile-project-root' is symlink-resolved, so resolve the
+    ;; visited file the same way; otherwise a project reached through a
+    ;; symlink produces a `../'-relative name and tracking is dropped for
+    ;; the whole project.  The recorded name then also matches the
+    ;; completion candidates, which are relative to the resolved root.
+    (let ((file (projectile--project-relative-name
+                 (file-truename buffer-file-name) project-root)))
+      ;; Still skip anything genuinely outside the project.
+      (unless (string-prefix-p ".." file)
+        (let* ((table (projectile--frecency-data))
+               (files (or (gethash project-root table)
+                          (puthash project-root
+                                   (make-hash-table :test 'equal) table)))
+               (entry (gethash file files)))
+          (puthash file (cons (1+ (or (car entry) 0))
+                              (projectile-time-seconds))
+                   files)
+          (setq projectile--frecency-dirty t)
+          (when (> (hash-table-count files) (* 2 projectile-frecency-max-files))
+            (projectile--frecency-prune files)))))))
+
+(defun projectile--frecency-sort-function (project-root)
+  "Return a completion sort function ranking PROJECT-ROOT's files, or nil.
+The returned function puts tracked files first, ordered by
+`projectile--frecency-score', and preserves the order of the rest.
+Return nil when frecency is disabled or nothing is tracked yet."
+  (when (and projectile-enable-frecency project-root)
+    (when-let* ((files (gethash project-root (projectile--frecency-data))))
+      (when (> (hash-table-count files) 0)
+        (let ((scores (make-hash-table :test 'equal
+                                       :size (hash-table-count files)))
+              (now (projectile-time-seconds)))
+          (maphash (lambda (file entry)
+                     (puthash file (projectile--frecency-score entry now)
+                              scores))
+                   files)
+          (lambda (candidates)
+            (let (frecent rest)
+              (dolist (cand candidates)
+                (if (gethash cand scores)
+                    (push cand frecent)
+                  (push cand rest)))
+              (nconc (sort (nreverse frecent)
+                           (lambda (a b)
+                             (> (gethash a scores) (gethash b scores))))
+                     (nreverse rest)))))))))
+
+(defun projectile--frecency-merge-from-disk ()
+  "Merge newer on-disk frecency entries into the in-memory table.
+Another Emacs session may have saved since we loaded, so a plain
+overwrite would discard its data (the same reason
+`projectile-merge-known-projects' exists).  For each file present in
+both, the higher visit count and the later timestamp win."
+  (let ((disk-table (let ((projectile--frecency-table nil))
+                      (projectile--frecency-data)))
+        (table projectile--frecency-table))
+    (maphash
+     (lambda (root disk-files)
+       (let ((files (or (gethash root table)
+                        (puthash root (make-hash-table :test 'equal) table))))
+         (maphash
+          (lambda (file disk-entry)
+            (let ((entry (gethash file files)))
+              (puthash file
+                       (if entry
+                           (cons (max (car entry) (car disk-entry))
+                                 (max (cdr entry) (cdr disk-entry)))
+                         disk-entry)
+                       files)))
+          disk-files)))
+     disk-table)))
+
+(defun projectile--frecency-cap-projects (data)
+  "Return DATA capped at `projectile-frecency-max-projects' roots.
+DATA is an alist of (ROOT . FILE-ENTRIES), each FILE-ENTRY a
+\(FILE COUNT TIME) list.  The most recently active roots (highest file
+timestamp) are kept and the rest dropped, so the store can't accumulate
+dead roots without bound."
+  (if (<= (length data) projectile-frecency-max-projects)
+      data
+    (let ((ranked
+           (sort (copy-sequence data)
+                 (lambda (a b)
+                   (> (apply #'max 0 (mapcar (lambda (fe) (or (nth 2 fe) 0)) (cdr a)))
+                      (apply #'max 0 (mapcar (lambda (fe) (or (nth 2 fe) 0)) (cdr b))))))))
+      (seq-take ranked projectile-frecency-max-projects))))
+
+(defun projectile--frecency-save ()
+  "Persist the frecency data to `projectile-frecency-file'.
+Merges with the data on disk first, so concurrent Emacs sessions
+don't wipe out each other's history.  The dirty flag is kept when
+the file isn't writable, so a later save can retry."
+  (when (and projectile--frecency-dirty projectile--frecency-table)
+    (if (not (file-writable-p projectile-frecency-file))
+        (display-warning
+         'projectile
+         (format "Frecency file '%s' is not writable" projectile-frecency-file)
+         :warning)
+      (projectile--frecency-merge-from-disk)
+      (let (data)
+        (maphash
+         (lambda (root files)
+           (projectile--frecency-prune files)
+           (when (> (hash-table-count files) 0)
+             (let (file-entries)
+               (maphash (lambda (file entry)
+                          (push (list file (car entry) (cdr entry))
+                                file-entries))
+                        files)
+               (push (cons root file-entries) data))))
+         projectile--frecency-table)
+        (projectile-serialize (projectile--frecency-cap-projects data)
+                              projectile-frecency-file))
+      (setq projectile--frecency-dirty nil))))
+
+;;;###autoload
+(defun projectile-discover-projects-in-directory (directory &optional depth)
+  "Discover any projects in DIRECTORY and add them to the projectile cache.
+
+If DEPTH is non-nil recursively descend exactly DEPTH levels below DIRECTORY and
+discover projects there."
+  (interactive
+   (list (read-directory-name "Starting directory: ")))
+
+  ;; set a default value for depth
+  (setq depth (or depth 1))
+
+  (if (file-directory-p directory)
+      (if (and (numberp depth) (> depth 0))
+          ;; Ignore errors when listing files in the directory, because
+          ;; sometimes that directory is an unreadable one at the root of a
+          ;; volume. This is the case, for example, on macOS with the
+          ;; .Spotlight-V100 directory.
+          (let ((progress-reporter
+                 (make-progress-reporter
+                  (format "Projectile is discovering projects in %s..."
+                          (propertize directory 'face 'font-lock-keyword-face)))))
+            (progress-reporter-update progress-reporter)
+            (dolist (dir (ignore-errors
+                           (directory-files directory t
+                                            directory-files-no-dot-files-regexp)))
+              (when (and (file-directory-p dir)
+                         ;; Don't walk into remote trees during discovery -
+                         ;; that would issue a TRAMP round-trip per directory.
+                         (not (file-remote-p dir)))
+                (projectile-discover-projects-in-directory dir (1- depth))))
+            (progress-reporter-done progress-reporter))
+        (when (projectile-project-p directory)
+          (let ((dir (projectile--known-project-root (projectile-project-root directory))))
+            (unless (member dir projectile-known-projects)
+              (projectile-add-known-project dir)))))
+    (if (called-interactively-p 'interactive)
+        (message "Search path directory %s doesn't exist" directory)
+      (projectile--message "Search path directory %s doesn't exist" directory))))
+
+(defvar projectile--search-path-discovered nil
+  "Non-nil once `projectile-project-search-path' has been auto-discovered.
+Used to run automatic discovery once per session instead of on every
+project-switch command.")
+
+(defun projectile-discover-projects-in-search-path ()
+  "Discover projects in `projectile-project-search-path'.
+When called interactively, always re-scans; the automatic scan (see
+`projectile-auto-discover-projects') runs this once per session."
+  (interactive)
+  (setq projectile--search-path-discovered t)
+  (dolist (path projectile-project-search-path)
+    ;; Skip remote entries: discovery would walk them over TRAMP.
+    (unless (file-remote-p (if (consp path) (car path) path))
+      (if (consp path)
+          (projectile-discover-projects-in-directory (car path) (cdr path))
+        (projectile-discover-projects-in-directory path 1)))))
+
+
+(defun delete-file-projectile-remove-from-cache (filename &optional _trash)
+  (if (and projectile-enable-caching projectile-auto-update-cache (projectile-project-p))
+      (let* ((project-root (projectile-project-root))
+             (true-filename (file-truename filename))
+             (relative-filename (file-relative-name true-filename project-root)))
+        (if (projectile-file-cached-p relative-filename project-root)
+            (projectile-purge-file-from-cache relative-filename)))))
+
+
+;;; Project root related utilities
+(defun projectile-parent (path)
+  "Return the parent directory of PATH.
+PATH may be a file or directory and directory paths may end with a slash."
+  (directory-file-name (file-name-directory (directory-file-name (expand-file-name path)))))
+
+(defun projectile--directory-entry-set (directory)
+  "Return a hash set of the immediate entry names of DIRECTORY, or nil.
+A single `directory-files' call replaces one `file-exists-p' per
+candidate name - over TRAMP that turns N sequential remote round-trips
+into one.  Returns nil when DIRECTORY can't be listed (missing or
+permission denied) or contains no entries.
+
+Note: membership is by directory entry, not `file-exists-p', so a broken
+symlink named like a marker counts as present here (the old per-candidate
+`file-exists-p' followed the link and returned nil).  This is harmless in
+practice - a project marker that is a dangling symlink is a pathological
+setup."
+  (when-let* ((entries (ignore-errors
+                         (directory-files
+                          directory nil directory-files-no-dot-files-regexp t))))
+    (let ((set (make-hash-table :test 'equal :size (length entries))))
+      (dolist (entry entries) (puthash entry t set))
+      set)))
+
+(defun projectile--wildcard-p (name)
+  "Return non-nil if NAME has a shell wildcard character in it."
+  (string-match-p "[][*?]" name))
+
+(defun projectile--read-json-file (file &rest args)
+  "Read FILE as JSON, passing ARGS to `json-parse-buffer'.
+Returns nil when FILE doesn't exist, or when this Emacs was built
+without native JSON support."
+  (when (and (functionp 'json-parse-buffer) (file-exists-p file))
+    (with-temp-buffer
+      (insert-file-contents file)
+      (goto-char (point-min))
+      (apply #'json-parse-buffer args))))
+
+(defun projectile--directory-marker (directory markers &optional files-only)
+  "Return the first of MARKERS present in DIRECTORY, or nil.
+
+DIRECTORY is listed once with `projectile--directory-entry-set' and the
+plain-name markers are answered from that listing, so probing N
+candidates costs one round-trip instead of N - which matters both for
+long marker lists and for remote projects.  A marker carrying a path
+separator or a wildcard can't be answered from a basename listing and is
+probed directly.  With FILES-ONLY non-nil a marker naming a directory
+doesn't count as present."
+  (let ((entries nil) (listed nil))
+    (seq-find
+     (lambda (marker)
+       (cond
+        ((not (stringp marker)) nil)
+        ((or (string-search "/" marker) (projectile--wildcard-p marker))
+         (let ((expanded (projectile-expand-file-name-wildcard marker directory)))
+           (and (projectile-file-exists-p expanded)
+                (or (not files-only) (not (file-directory-p expanded))))))
+        (t (unless listed
+             (setq entries (projectile--directory-entry-set directory)
+                   listed t))
+           (and entries
+                (gethash marker entries)
+                (or (not files-only)
+                    (not (file-directory-p (expand-file-name marker directory))))))))
+     markers)))
+
+(defun projectile--locate-dominating-file (file name first-match-only)
+  "Walk up from FILE looking for NAME and return the matching directory.
+NAME is either a filename (matched via `projectile-file-exists-p' in
+each candidate directory) or a predicate of one argument (the candidate
+directory).
+
+When FIRST-MATCH-ONLY is non-nil, return the bottommost (closest to
+FILE) match; otherwise keep walking and return the topmost match.
+Returns nil when no match is found."
+  ;; The walk skeleton was originally copied from files.el; the bottom-up
+  ;; / top-down split was previously two near-identical functions.
+  (setq file (abbreviate-file-name file))
+  (let ((root nil)
+        try)
+    (while (and file
+                (not (string-match locate-dominating-stop-dir-regexp file))
+                (not (and first-match-only root)))
+      (setq try (if (stringp name)
+                    (projectile-file-exists-p
+                     (projectile-expand-file-name-wildcard name file))
+                  (funcall name file)))
+      (when try (setq root file))
+      (let ((parent (file-name-directory (directory-file-name file))))
+        (setq file (and (not (equal file parent)) parent))))
+    (and root (expand-file-name (file-name-as-directory root)))))
+
+(defun projectile-locate-dominating-file (file name)
+  "Look up the directory hierarchy from FILE for a directory containing NAME.
+Stop at the first parent directory containing a file NAME,
+and return the directory.  Return nil if not found.
+Instead of a string, NAME can also be a predicate taking one argument
+\(a directory) and returning a non-nil value if that directory is the one for
+which we're looking."
+  (projectile--locate-dominating-file file name t))
+
+(defun projectile-locate-dominating-file-top-down (file name)
+  "Look up the directory hierarchy from FILE for a directory containing NAME.
+Unlike `projectile-locate-dominating-file' which returns the first (bottommost)
+match, this returns the topmost match.  Return nil if not found.
+Instead of a string, NAME can also be a predicate taking one argument
+\(a directory) and returning a non-nil value if that directory is the one for
+which we're looking."
+  (projectile--locate-dominating-file file name nil))
+
+(defvar-local projectile-project-root nil
+  "Defines a custom Projectile project root.
+This is intended to be used as a file local variable.")
+
+(defun projectile-root-local (_dir)
+  "A simple wrapper around the variable `projectile-project-root'."
+  projectile-project-root)
+
+(defun projectile-root-top-down (dir &optional list)
+  "Identify a project root in DIR by top-down search for files in LIST.
+If LIST is nil, use `projectile-project-root-files' instead.
+Return the first (topmost) matched directory or nil if not found."
+  (let ((markers (or list projectile-project-root-files)))
+    (projectile-locate-dominating-file-top-down
+     dir
+     ;; A root file has to be a file, not a directory - `src' being a
+     ;; marker of some project type mustn't make every `src' a root.
+     (lambda (dir) (projectile--directory-marker dir markers 'files-only)))))
+
+(defun projectile-root-marked (dir)
+  "Identify a project root in DIR by search for `projectile-dirconfig-file'."
+  (projectile-root-bottom-up dir (list projectile-dirconfig-file)))
+
+(defun projectile-root-bottom-up (dir &optional list)
+  "Identify a project root in DIR by bottom-up search for files in LIST.
+If LIST is nil, use `projectile-project-root-files-bottom-up' instead.
+Return the first (bottommost) matched directory or nil if not found."
+  (let ((markers (or list projectile-project-root-files-bottom-up)))
+    (projectile-locate-dominating-file
+     dir
+     (if (and (null (cdr markers))
+              (stringp (car markers))
+              (not (string-match-p "/" (car markers))))
+         ;; With a single marker a directory listing can't beat one stat
+         ;; per level, so probe it directly.  `projectile-root-marked'
+         ;; (which runs on every root resolution) is this case.
+         (lambda (directory)
+           (projectile-file-exists-p (expand-file-name (car markers) directory)))
+       ;; Probe each level with a single `directory-files' listing rather
+       ;; than one `file-exists-p' per marker.  A VCS marker is a directory,
+       ;; so unlike the top-down search this one doesn't filter those out.
+       (lambda (directory) (projectile--directory-marker directory markers))))))
+
+(defun projectile-root-top-down-recurring (dir &optional list)
+  "Identify a project root in DIR by recurring top-down search for files in LIST.
+If LIST is nil, use `projectile-project-root-files-top-down-recurring'
+instead.  Return the last (bottommost) matched directory in the
+topmost sequence of matched directories.  Nil otherwise."
+  (seq-some
+   (lambda (f)
+     (projectile-locate-dominating-file
+      dir
+      (lambda (dir)
+        (and (projectile-file-exists-p (projectile-expand-file-name-wildcard f dir))
+             (or (string-match locate-dominating-stop-dir-regexp (projectile-parent dir))
+                 (not (projectile-file-exists-p (projectile-expand-file-name-wildcard f (projectile-parent dir)))))))))
+   (or list projectile-project-root-files-top-down-recurring)))
+
+(defvar projectile--root-override nil
+  "Directory `projectile-project-root' answers with while this is non-nil.
+
+Bound while detecting a subproject's type (see
+`projectile-subproject-type').  Eleven of the registered project types -
+`go', `make', `terraform', `xcode' and the rest - identify themselves
+with a predicate rather than a list of marker file names, and those
+predicates resolve their paths through `projectile-expand-root', which
+walks up to the enclosing project.  Inside a monorepo that walk lands on
+the repository, so a Go module in a subdirectory would be asked whether
+the *repository* has a `go.mod'.  Pinning the root for the duration of
+the detection asks the question about the member instead.")
+
+(defun projectile-project-root (&optional dir)
+  "Return the root directory of the project containing DIR, or nil.
+If DIR is not supplied it defaults to `default-directory'.
+
+While `projectile--root-override' is non-nil that directory is returned
+instead, whatever DIR is.
+
+Each function in `projectile-project-root-functions' is tried in order;
+the first non-nil result wins.  Results - including failures - are
+memoized in `projectile-project-root-cache' (see the Project root cache
+section in the manual).  Use `projectile-invalidate-cache' to reset.
+
+Special cases:
+
+- Tramp archive paths (e.g. inside a `.zip') are unwrapped to the
+  directory that contains the archive before searching.
+- Remote files reached via TRAMP whose host is not currently connected
+  return nil without caching, so reconnecting works without manual cache
+  invalidation."
+  ;; `default-directory' can be nil in some buffers; short-circuit to nil so
+  ;; callers get "no project" instead of a `(wrong-type-argument stringp nil)'
+  ;; from `file-remote-p' and friends below (#1829).
+  (or projectile--root-override
+      (when-let* ((dir (or dir default-directory)))
+    ;; Back out of any archives, the project will live on the outside and
+    ;; searching them is slow.
+    (when (and (fboundp 'tramp-archive-file-name-p)
+               (tramp-archive-file-name-p dir))
+      (setq dir (file-name-directory (tramp-archive-file-name-archive dir))))
+    ;; The cached value is 'none when no project root was found (so we don't
+    ;; reevaluate every time when not inside a project); we map that back to
+    ;; nil for callers.  Cache keys are conses: (FUNC . DIR) for per-function
+    ;; results, ('none . DIR) for the overall failure marker.
+    (let ((result (or
+       ;; if we've already failed to find a project dir for this
+       ;; dir, and cached that failure, don't recompute
+       (gethash (cons 'none dir) projectile-project-root-cache)
+       ;; if the file isn't local, and we're not connected, don't try to
+       ;; find a root now, but don't cache failure, as we might
+       ;; re-connect.  The `is-local' and `is-connected' variables are
+       ;; used to fix the behavior where Emacs hangs because of
+       ;; Projectile when you open a file over TRAMP. It basically
+       ;; prevents Projectile from trying to find information about
+       ;; files for which it's not possible to get that information
+       ;; right now.
+       (let ((is-local (not (file-remote-p dir)))      ;; `true' if the file is local
+             (is-connected (file-remote-p dir nil t))) ;; `true' if the file is remote AND we are connected to the remote
+         (unless (or is-local is-connected)
+           'none))
+       ;; if the file is local or we're connected to it via TRAMP, run
+       ;; through the project root functions until we find a project dir.
+       ;; `projectile-root-local' reads a buffer-local variable rather
+       ;; than inspecting DIR, so its result must not be cached - two
+       ;; buffers in the same directory can legitimately disagree.
+       ;; For other functions, both successes and per-function failures
+       ;; (stored as the 'none sentinel) are memoized, so functions
+       ;; earlier in the list that returned nil aren't re-walked on
+       ;; every call.
+       ;;
+       ;; `true-dir-cell' lazily memoizes `(file-truename dir)' across
+       ;; the loop so we pay the (potentially remote) symlink resolution
+       ;; at most once per `projectile-project-root' call instead of
+       ;; once per project-root-function on cache miss.
+       (let ((true-dir-cell (list nil)))
+         (seq-some
+          (lambda (func)
+            (if (eq func 'projectile-root-local)
+                (funcall func dir)
+              (let* ((cache-key (cons func dir))
+                     (cache-value (gethash cache-key projectile-project-root-cache)))
+                (cond
+                 ((eq cache-value 'none) nil)
+                 ;; Use `projectile-file-exists-p' so the remote
+                 ;; stat is cached (per `projectile-file-exists-remote-cache-expire')
+                 ;; instead of round-tripping on every call.
+                 ((and cache-value (projectile-file-exists-p cache-value)) cache-value)
+                 (t (let ((value (funcall
+                                  func
+                                  (or (car true-dir-cell)
+                                      (setcar true-dir-cell (file-truename dir))))))
+                      (puthash cache-key (or value 'none) projectile-project-root-cache)
+                      value))))))
+          projectile-project-root-functions))
+       ;; if we get here, we have failed to find a root by all
+       ;; conventional means, and we assume the failure isn't transient
+       ;; / network related, so cache the failure
+       (puthash (cons 'none dir) 'none projectile-project-root-cache))))
+      (unless (eq result 'none) result)))))
+
+(defun projectile-ensure-project (dir)
+  "Ensure that DIR is non-nil.
+Useful for commands that expect the presence of a project.
+Controlled by `projectile-require-project-root'.
+
+See also `projectile-acquire-root'."
+  (if dir
+      dir
+    (cond
+     ((eq projectile-require-project-root 'prompt) (projectile-completing-read
+                                                    "Switch to project: " (projectile-known-projects)
+                                                    :category 'projectile-project
+                                                    :caller 'projectile-read-project))
+     (projectile-require-project-root (user-error "Projectile cannot find a project definition in %s" default-directory))
+     (t default-directory))))
+
+(defun projectile-acquire-root (&optional dir)
+  "Find the current project root, and prompts the user for it if that fails.
+Provides the common idiom (projectile-ensure-project (projectile-project-root)).
+Starts the search for the project with DIR."
+  (projectile-ensure-project (projectile-project-root dir)))
+
+(defun projectile-project-p (&optional dir)
+  "Check if DIR is a project.
+Defaults to the current directory if not provided
+explicitly."
+  (projectile-project-root (or dir default-directory)))
+
+(defun projectile-default-project-name (project-root)
+  "Default function used to create the project name.
+The project name is based on the value of PROJECT-ROOT."
+  (file-name-nondirectory (directory-file-name project-root)))
+
+(defun projectile-project-name (&optional project)
+  "Return project name.
+If PROJECT is not specified acts on the current project."
+  (or projectile-project-name
+      (let ((project-root (or project (projectile-project-root))))
+        (if project-root
+            (funcall projectile-project-name-function project-root)
+          "-"))))
+
+
+(defun projectile-uniquify-dirname-transform (dirname)
+  "Project-aware transform for `uniquify-dirname-transform'.
+When DIRNAME is inside a project, return a path with the project name
+spliced in, so buffers visiting same-named files in different projects
+get distinct, project-qualified names.  Outside a project DIRNAME is
+returned unchanged.
+
+To enable, set `uniquify-dirname-transform' to this function:
+
+    (setq uniquify-dirname-transform #\\='projectile-uniquify-dirname-transform)"
+  (if-let* ((root (projectile-project-root dirname)))
+      (expand-file-name
+       (file-name-concat
+        (file-name-directory root)
+        (projectile-project-name root)
+        (file-relative-name dirname root)))
+    dirname))
+
+
+;;; Project indexing
+(defun projectile-get-project-directories (project-dir)
+  "Get the list of PROJECT-DIR directories that are of interest to the user.
+When the dirconfig file has no `+' keep entries, return a single-
+element list with PROJECT-DIR itself."
+  (let* ((cfg (projectile-parse-dirconfig-file (expand-file-name project-dir)))
+         (keep (and cfg (projectile-dirconfig-keep cfg))))
+    (if keep
+        (mapcar (lambda (subdir) (concat project-dir subdir)) keep)
+      (list project-dir))))
+
+(defun projectile--directory-p (directory)
+  "Checks if DIRECTORY is a string designating a valid directory."
+  (and (stringp directory) (file-directory-p directory)))
+
+(defun projectile-dir-files (directory &optional root)
+  "List the files in DIRECTORY and in its sub-directories.
+Files are returned as relative paths to DIRECTORY.
+ROOT names the project whose ignore rules apply, defaulting to
+DIRECTORY itself - pass it when DIRECTORY is a subdirectory of the
+project being listed."
+  (unless (projectile--directory-p directory)
+    (user-error "Directory %S does not exist" directory))
+  ;; check for a cache hit first if caching is enabled
+  (let ((files-list (and projectile-enable-caching
+                         (gethash directory projectile-projects-cache))))
+    ;; cache disabled or cache miss
+    (or files-list
+        (pcase projectile-indexing-method
+          ('native (projectile-dir-files-native directory root))
+          ;; use external tools to get the project files
+          ('hybrid (let ((vcs (projectile-project-vcs directory)))
+                     (projectile-adjust-files (or root directory) vcs
+                                              (projectile-dir-files-alien directory vcs))))
+          ('alien (projectile-dir-files-alien directory))
+          (_ (user-error "Unsupported indexing method `%S'" projectile-indexing-method))))))
+
+;;; Native Project Indexing
+;;
+;; This corresponds to `projectile-indexing-method' being set to native.
+(defun projectile-dir-files-native (directory &optional root)
+  "Get the files under DIRECTORY using just Emacs Lisp.
+ROOT names the project whose ignore rules apply, defaulting to
+DIRECTORY itself."
+  (let ((progress-reporter
+         (make-progress-reporter
+          (format "Projectile is indexing %s"
+                  (propertize directory 'face 'font-lock-keyword-face))))
+        ;; The walker returns absolute paths that all share DIRECTORY as a
+        ;; literal prefix - `directory-files-and-attributes' expands each
+        ;; entry against the expanded directory.  Stripping that prefix with
+        ;; a single `substring' is equivalent to `file-relative-name' here
+        ;; but avoids its per-file `expand-file-name'/`abbreviate-file-name'
+        ;; cost, which otherwise dominates the post-walk step on large trees.
+        (prefix-len (length (file-name-as-directory (expand-file-name directory)))))
+    ;; we need the files with paths relative to the project root
+    (mapcar (lambda (file) (substring file prefix-len))
+            (projectile-index-directory directory
+                                        (projectile-filtering-patterns
+                                         (expand-file-name (or root directory)))
+                                        progress-reporter))))
+
+(defun projectile--global-ignore-regexp-p (path)
+  "Return non-nil when PATH matches `projectile-globally-ignored-file-regexps'.
+PATH is an absolute file name.  Those patterns are Emacs regexps rather
+than globs, which is why they are a separate mechanism from the ignore
+patterns proper; matching is case-sensitive."
+  (seq-some (lambda (re) (let ((case-fold-search nil))
+                           (string-match-p re path)))
+            projectile-globally-ignored-file-regexps))
+
+(defun projectile--glob-to-regexp (glob)
+  "Translate the dirconfig GLOB into a regexp fragment.
+`*' matches within a path segment, `**' spans segments, `?' matches
+a single non-slash character and `[...]'/`[!...]' character classes
+pass through (with `!' translated to `^')."
+  (let ((i 0) (n (length glob)) (fragments nil))
+    (while (< i n)
+      (let ((c (aref glob i)))
+        (cond
+         ((eq c ?*)
+          (if (and (< (1+ i) n) (eq (aref glob (1+ i)) ?*))
+              (progn (push ".*" fragments) (setq i (1+ i)))
+            (push "[^/]*" fragments)))
+         ((eq c ??) (push "[^/]" fragments))
+         ((eq c ?\[)
+          ;; Copy a character class through, translating glob's [!...]
+          ;; negation; an unterminated class is treated literally.
+          (if-let* ((end (string-search "]" glob (+ i 2))))
+              (progn
+                (push (if (and (< (1+ i) n) (eq (aref glob (1+ i)) ?!))
+                          (concat "[^" (substring glob (+ i 2) (1+ end)))
+                        (substring glob i (1+ end)))
+                      fragments)
+                (setq i end))
+            (push "\\[" fragments)))
+         (t (push (regexp-quote (char-to-string c)) fragments))))
+      (setq i (1+ i)))
+    (apply #'concat (nreverse fragments))))
+
+(defun projectile--ignore-pattern-to-regexp (pattern)
+  "Translate an ignore/ensure PATTERN into a regexp.
+The regexp matches root-relative paths using gitignore rules: a
+pattern without a slash matches the file name or any directory
+segment anywhere in the tree, while a pattern containing a slash is
+anchored at the project root (a leading `/' anchors without naming a
+directory of its own).  A trailing slash restricts the match to
+directories (and thus everything below them).  Directories must be
+matched with a trailing slash appended."
+  (let* ((dir-only (string-suffix-p "/" pattern))
+         (pattern (string-remove-suffix "/" pattern))
+         (floating (string-prefix-p "**/" pattern))
+         (pattern (if floating (substring pattern 3) pattern))
+         (rooted (string-prefix-p "/" pattern))
+         (pattern (if rooted (substring pattern 1) pattern))
+         (anchored (or rooted (string-search "/" pattern))))
+    (concat (cond (floating "\\`\\(?:.*/\\)?")
+                  (anchored "\\`")
+                  (t "\\(?:\\`\\|/\\)"))
+            (projectile--glob-to-regexp pattern)
+            (if dir-only "/" "\\(?:/\\|\\'\\)"))))
+
+(defun projectile--compile-ignore-patterns (patterns)
+  "Compile the gitignore-style PATTERNS into a single regexp.
+Return nil when PATTERNS is empty.  The regexp matches a
+root-relative path when any of PATTERNS does; pass directory paths
+with a trailing slash so directory-only patterns can match them."
+  (when patterns
+    (mapconcat #'projectile--ignore-pattern-to-regexp patterns "\\|")))
+
+(defun projectile-index-directory (directory patterns progress-reporter)
+  "Index DIRECTORY taking into account PATTERNS.
+
+PATTERNS is a cons of the ignore and the ensure patterns, as returned by
+`projectile-filtering-patterns'; both are compiled into a single regexp
+each, so the per-entry check is one regexp match regardless of how many
+rules there are.  The PROGRESS-REPORTER is updated while the function is
+executing."
+  (let* (;; Ignore patterns match root-relative paths, so when DIRECTORY
+         ;; is a subdirectory of the project (a dirconfig `+' keep entry)
+         ;; the paths matched must stay relative to the project root, not
+         ;; to the walked directory.  Fall back to DIRECTORY when it isn't
+         ;; under the current project.
+         (walk-base (file-name-as-directory (expand-file-name directory)))
+         (project-root (projectile-project-p directory))
+         (match-base (if (and project-root
+                              (string-prefix-p (file-name-as-directory
+                                                (expand-file-name project-root))
+                                               walk-base))
+                         (file-name-as-directory (expand-file-name project-root))
+                       walk-base))
+         (rules (list :ignore-re (projectile--compile-ignore-patterns (car patterns))
+                      :ensure-re (projectile--compile-ignore-patterns (cdr patterns))
+                      :match-base-len (length match-base)))
+         ;; A 1-element list whose car is the accumulator.  Using a
+         ;; mutable cell lets the recursive walker push results onto a
+         ;; single shared list (O(N) total) instead of `apply append'-ing
+         ;; per-level results (O(N*depth)).
+         (acc-cell (list nil)))
+    (projectile--index-directory-walk directory progress-reporter rules acc-cell)
+    (nreverse (car acc-cell))))
+
+(defun projectile--index-directory-walk (directory progress-reporter rules acc-cell)
+  "Recursive walker for `projectile-index-directory'.
+DIRECTORY, PROGRESS-REPORTER and RULES carry the same state as the
+public entry point.  ACC-CELL is a 1-element list whose car
+accumulates discovered file paths in reverse order.
+
+Ignore matching is case-sensitive, so `case-fold-search' is pinned off
+for the regexps matched below."
+  ;; Use ignore-errors to skip unreadable directories (e.g.
+  ;; .Spotlight-V100 on macOS) instead of aborting the entire indexing
+  ;; operation.
+  ;; `directory-files-no-dot-files-regexp' filters out . and .. at the
+  ;; C level so we don't have to do it again in the loop.
+  ;; `directory-files-and-attributes' (rather than plain `directory-files')
+  ;; gives us each entry's type in the same listing call, so we can tell
+  ;; files from directories without a `file-directory-p' stat per entry -
+  ;; that stat is a separate filesystem round-trip each, which dominates the
+  ;; walk on large or remote (TRAMP) trees.
+  (let* ((case-fold-search nil)
+         (entries (ignore-errors
+                    (directory-files-and-attributes
+                     directory t directory-files-no-dot-files-regexp nil 'integer)))
+         (ignore-re (plist-get rules :ignore-re))
+         (ensure-re (plist-get rules :ensure-re))
+         (match-base-len (plist-get rules :match-base-len)))
+    (dolist (entry entries)
+      (let* ((f (car entry))
+             ;; The type field is t for a directory, a string (the link
+             ;; target) for a symlink, and nil for a regular file.  For a
+             ;; symlink we still defer to `file-directory-p' so that a link
+             ;; pointing at a directory is traversed, matching the previous
+             ;; follow-symlink behaviour; that extra stat only happens for
+             ;; the rare symlink entry, not for every file.
+             (type (file-attribute-type (cdr entry)))
+             (directory-p (if (stringp type) (file-directory-p f) (eq type t)))
+             ;; Ignore patterns match against the root-relative path, with
+             ;; a trailing slash appended for directories so that
+             ;; directory-only patterns (trailing `/') can match.
+             (match-name (and ignore-re
+                              (concat (substring f match-base-len)
+                                      (and directory-p "/")))))
+        (unless (or (and match-name
+                         (string-match-p ignore-re match-name)
+                         (not (and ensure-re (string-match-p ensure-re match-name))))
+                    (projectile--global-ignore-regexp-p f))
+          (progress-reporter-update progress-reporter)
+          (if directory-p
+              (projectile--index-directory-walk f progress-reporter
+                                                rules acc-cell)
+            (setcar acc-cell (cons f (car acc-cell)))))))))
+
+;;; Alien Project Indexing
+;;
+;; This corresponds to `projectile-indexing-method' being set to hybrid or alien.
+;; The only difference between the two methods is that alien doesn't do
+;; any post-processing of the files obtained via the external command.
+;;
+;; Projectile's own ignore rules are still honored under alien (see
+;; `projectile-alien-honors-ignores'), but they are pushed down into the
+;; external tool as exclusion arguments rather than applied to its output, so
+;; alien keeps doing no Lisp-side filtering.  Only the tools that can't express
+;; exclusions fall back to filtering in Emacs.
+
+(defun projectile--fd-command-p (command)
+  "Return non-nil when COMMAND is one of Projectile's `fd' recipes.
+Recognised by the `--strip-cwd-prefix' flag Projectile puts in them, the
+same way `projectile--ext-command-line' does.  COMMAND may be nil, which
+is how Projectile spells \"external-command indexing is disabled\"."
+  (and command (string-match-p "--strip-cwd-prefix\\b" command)))
+
+(defun projectile--alien-exclude-glob (glob style)
+  "Translate GLOB into an exclusion pattern of the given STYLE.
+
+GLOB is an entry as produced by `projectile--project-ignore-globs', i.e.
+a gitignore pattern: any slash other than a trailing one anchors it at
+the project root, a trailing `/' means it names a directory (so its
+whole subtree is excluded), and a pattern without a slash matches at any
+depth.
+
+STYLE is `git' for a `git ls-files' pathspec body (wildmatch semantics,
+where `**' crosses directory separators) or `fd' for an `fd --exclude'
+pattern (gitignore semantics, where a leading `/' anchors to the search
+root)."
+  (let* ((dirp (string-suffix-p "/" glob))
+         (body (if dirp (substring glob 0 -1) glob))
+         (rooted (string-search "/" body))
+         (body (string-remove-prefix "/" body)))
+    (pcase style
+      ;; A pathspec is anchored at the pathspec root already, so an
+      ;; any-depth pattern is the one that needs the `**/' prefix.
+      ('git (concat (unless rooted "**/") body (when dirp "/**")))
+      ('fd (concat (when rooted "/") body (when dirp "/")))
+      (_ (error "Unknown exclusion style `%S'" style)))))
+
+(defun projectile--alien-exclude-args (vcs command globs)
+  "Return exclusion arguments appending GLOBS to COMMAND, or nil.
+
+Returns nil when GLOBS is empty, or when COMMAND's tool has no way to
+express exclusions - the caller then has to filter the output in Emacs
+Lisp instead (see `projectile--maybe-remove-ignored').
+
+VCS is the project's version-control system as returned by
+`projectile-project-vcs'."
+  (when globs
+    (cond
+     ;; `fd' takes repeated `--exclude' globs.  Checked before VCS because
+     ;; git projects use fd too when `projectile-git-use-fd' is on.
+     ((projectile--fd-command-p command)
+      (mapconcat (lambda (glob)
+                   (concat "-E " (shell-quote-argument
+                                  (projectile--alien-exclude-glob glob 'fd))))
+                 globs " "))
+     ;; `git ls-files' takes exclude pathspecs.  A pathspec list made up
+     ;; entirely of exclusions still lists everything else, so there's no
+     ;; need to add a positive pathspec alongside them.
+     ((eq vcs 'git)
+      (concat "-- "
+              (mapconcat (lambda (glob)
+                           (shell-quote-argument
+                            (concat ":(exclude,glob)"
+                                    (projectile--alien-exclude-glob glob 'git))))
+                         globs " ")))
+     (t nil))))
+
+(defun projectile--alien-ext-command (vcs directory)
+  "Return the external listing command for DIRECTORY, honoring ignore rules.
+Like `projectile-get-ext-command', but with Projectile's ignore rules
+folded in as exclusion arguments when the tool understands them and
+`projectile-alien-honors-ignores' is non-nil."
+  (let ((command (projectile-get-ext-command vcs directory)))
+    (if-let* ((command)
+              (projectile-alien-honors-ignores)
+              ;; Only alien pushes the rules down; hybrid applies them to
+              ;; the output itself.  Both speak the same rules now, so
+              ;; doing both would just be wasted work.
+              ((eq projectile-indexing-method 'alien))
+              ((projectile--alien-command-excludes-p vcs command directory))
+              (globs (projectile--project-ignore-globs directory))
+              (args (projectile--alien-exclude-args vcs command globs)))
+        (concat command " " args)
+      command)))
+
+(defun projectile--alien-command-excludes-p (vcs command &optional directory)
+  "Return non-nil when COMMAND for VCS can carry the ignore rules itself.
+When it can't, the ignore rules have to be applied to the command's
+output instead.
+
+Besides the tools that have no way to express exclusions at all, that's
+also the case for a project whose dirconfig has `!' ensure entries: an
+exclusion argument can't be taken back (neither a git exclude pathspec
+nor `fd --exclude' has a way to un-exclude a path), so such a project is
+filtered in Lisp, where the ensure patterns can rescue the files the
+ignore patterns matched.  DIRECTORY is the project root the ensure
+entries are read from; it defaults to `default-directory'."
+  (and (or (projectile--fd-command-p command) (eq vcs 'git))
+       (null (projectile--ensure-patterns directory))
+       t))
+
+(defun projectile--maybe-remove-ignored (project-root files)
+  "Remove PROJECT-ROOT's ignored entries from FILES, honoring the option.
+A no-op when `projectile-alien-honors-ignores' is nil.  FILES are paths
+relative to PROJECT-ROOT, which is bound as `default-directory' so the
+ignore configuration is read for the right project."
+  (if (not projectile-alien-honors-ignores)
+      files
+    (let ((default-directory project-root))
+      (projectile-remove-ignored files))))
+
+(defun projectile--alien-apply-ignores (project-root vcs files)
+  "Apply PROJECT-ROOT's ignore rules to the alien listing FILES.
+Does nothing when the external command for VCS already excluded them
+itself, which is the fast path (see `projectile--alien-exclude-args')."
+  (if (projectile--alien-command-excludes-p
+       vcs (projectile-get-ext-command vcs project-root) project-root)
+      files
+    (projectile--maybe-remove-ignored project-root files)))
+
+(defun projectile-dir-files-alien (directory &optional vcs subdirs)
+  "Get the files for DIRECTORY using external tools.
+VCS, when supplied, must be the project's VCS as returned by
+`projectile-project-vcs'.  It is computed from DIRECTORY when
+omitted; callers that already resolved the VCS can pass it in to
+avoid the redundant work.
+
+SUBDIRS, when non-nil, is a list of subdirectory paths (relative
+to DIRECTORY) restricting the listing.  The external command
+receives them as positional arguments and submodule files are
+filtered to those falling under one of the subdirectories.  This
+is how dirconfig `+' keep entries are honoured by hybrid indexing
+without shelling out per kept directory."
+  (let ((vcs (or vcs (projectile-project-vcs directory))))
+    (cond
+     ((eq vcs 'git)
+      (let* ((fd (and projectile-git-use-fd
+                      (projectile-fd-executable-for directory)))
+             (files (nconc (projectile-files-via-ext-command
+                            directory (projectile--alien-ext-command vcs directory)
+                            subdirs)
+                           ;; Submodules are listed by their own `git ls-files'
+                           ;; runs, which never saw our exclusions, so those
+                           ;; files have to be filtered here.
+                           (projectile--maybe-remove-ignored
+                            directory
+                            (projectile--restricted-sub-projects-files directory vcs subdirs))))
+             ;; When using git ls-files (not fd), deleted but unstaged
+             ;; files are still reported.  Remove them.  Note that the
+             ;; fd-availability check is per-DIRECTORY: a project may be
+             ;; on a remote host where fd isn't installed even though it
+             ;; is locally.
+             (deleted (unless fd
+                        (projectile-git-deleted-files directory))))
+        (if deleted
+            (let ((deleted-set (make-hash-table :test 'equal :size (length deleted))))
+              (dolist (f deleted) (puthash f t deleted-set))
+              (seq-remove (lambda (f) (gethash f deleted-set)) files))
+          files)))
+     (t (projectile-files-via-ext-command
+         directory (projectile--alien-ext-command vcs directory) subdirs)))))
+
+(defun projectile-vcs-ignored-file-p (file &optional project-root vcs)
+  "Return non-nil if FILE is ignored by the project's version control system.
+
+This is what Projectile's own ignore rules can't answer: under `alien'
+and `hybrid' indexing the file list comes from the version control
+system, so a file that VCS ignores is not part of the project even
+though nothing in `projectile-globally-ignored-directories' or the
+project's `.projectile' mentions it (issue #1075).
+
+PROJECT-ROOT and VCS default to the current project's.  Only git is
+consulted - for any other system the answer is nil, i.e. the file is
+treated as part of the project, which is what Projectile did for every
+system before."
+  (let* ((root (or project-root (projectile-project-root)))
+         (vcs (or vcs (and root (projectile-project-vcs root)))))
+    (when (and root (eq vcs 'git))
+      (let ((default-directory root))
+        ;; `git check-ignore' answers for one path without listing the
+        ;; repository: exit code 0 means ignored, 1 means not.
+        (equal 0 (process-file "git" nil nil nil "check-ignore" "-q" "--"
+                               (file-relative-name file root)))))))
+
+(defun projectile--restrict-to-subdirs (files subdirs)
+  "Keep only the FILES that live under one of SUBDIRS.
+FILES and SUBDIRS are both relative to the project root.  Returns FILES
+unchanged when SUBDIRS is nil."
+  (if (null subdirs)
+      files
+    (let ((normalized (mapcar #'file-name-as-directory subdirs)))
+      (seq-filter
+       (lambda (f)
+         (seq-some (lambda (sd) (string-prefix-p sd f)) normalized))
+       files))))
+
+(defun projectile--restricted-sub-projects-files (project-root vcs subdirs)
+  "Return git submodule files under PROJECT-ROOT, optionally restricted to SUBDIRS.
+SUBDIRS is a list of paths relative to PROJECT-ROOT; when non-nil
+only files whose project-relative path starts with one of those
+subdirectories are returned.  When nil, behaves exactly like
+`projectile-get-sub-projects-files'."
+  (projectile--restrict-to-subdirs
+   (projectile-get-sub-projects-files project-root vcs) subdirs))
+
+(defun projectile-git-deleted-files (directory)
+  "Get a list of deleted but unstaged files in DIRECTORY."
+  (projectile-files-via-ext-command directory "git ls-files -zd"))
+
+(defun projectile-get-ext-command (vcs &optional directory)
+  "Determine which external command to invoke based on the project's VCS.
+Fallback to a generic command when not in a VCS-controlled project.
+
+DIRECTORY, when supplied, is used to pick the right fd executable for
+the git case: for remote projects the local `projectile-fd-executable'
+may not exist on the remote host, so fd is detected per-host (see
+`projectile-fd-executable-for').  When DIRECTORY is omitted the
+current `default-directory' is used, preserving backward compatibility
+for callers that don't yet thread it through."
+  (let* ((directory (or directory default-directory))
+         (fd (and projectile-git-use-fd
+                  (projectile-fd-executable-for directory))))
+    (pcase vcs
+      ('git (if fd
+                (concat fd " " projectile-git-fd-args)
+              projectile-git-command))
+      ('hg projectile-hg-command)
+      ('fossil projectile-fossil-command)
+      ('bzr projectile-bzr-command)
+      ('darcs projectile-darcs-command)
+      ('pijul projectile-pijul-command)
+      ('svn projectile-svn-command)
+      ('sapling projectile-sapling-command)
+      ('jj projectile-jj-command)
+      (_ projectile-generic-command))))
+
+(defun projectile-get-sub-projects-command (vcs)
+  "Get the sub-projects command for VCS.
+Currently that's supported just for Git (sub-projects being Git
+sub-modules there)."
+  (pcase vcs
+    ('git projectile-git-submodule-command)
+    (_ nil)))
+
+(defun projectile-get-ext-ignored-command (vcs)
+  "Determine which external command to invoke based on the project's VCS."
+  (pcase vcs
+    ('git projectile-git-ignored-command)
+    ('hg projectile-hg-ignored-command)
+    ('svn projectile-svn-ignored-command)
+    (_ nil)))
+
+
+(defun projectile-get-all-sub-projects (project)
+  "Get all sub-projects for a given project.
+
+PROJECT is base directory to start search recursively."
+  (let ((submodules (projectile-get-immediate-sub-projects project)))
+    (cond
+     ((null submodules)
+      nil)
+     (t
+      (append submodules (flatten-tree
+                          ;; recursively get sub-projects of each sub-project
+                          (mapcar (lambda (s)
+                                    (projectile-get-all-sub-projects s)) submodules)))))))
+
+(defun projectile-get-immediate-sub-projects (path)
+  "Get immediate sub-projects for a given project without recursing.
+
+PATH is the vcs root or project root from which to start
+searching, and should end with an appropriate path delimiter, such as
+'/' or a '\\'.
+
+If the vcs get-sub-projects query returns results outside of path,
+they are excluded from the results of this function."
+  (let* ((vcs (projectile-project-vcs path))
+         (listing (if (eq vcs 'git)
+                      (projectile--git-submodules path)
+                    (projectile-files-via-ext-command
+                     path (projectile-get-sub-projects-command vcs))))
+         (submodules (mapcar
+                      (lambda (s)
+                        (file-name-as-directory (expand-file-name s path)))
+                      listing))
+         (project-child-folder-regex
+          (concat "\\`" (regexp-quote path))))
+    ;; If project root is inside of an VCS folder, but not
+    ;; actually an VCS root itself, submodules external to the
+    ;; project will be included in the VCS get sub-projects
+    ;; result.  Let's remove them.
+    (seq-filter
+     (lambda (submodule)
+       (string-match-p project-child-folder-regex submodule))
+     submodules)))
+
+(defun projectile--git-submodule-paths (gitmodules-dir)
+  "List the populated submodule paths of the Git repo at GITMODULES-DIR.
+Reads `.gitmodules' with `git config' run via `process-file' - no shell
+is involved, so the listing works regardless of the local shell (the
+old shell-out relied on Unix single quotes and `tr', which broke on
+Windows - see issue #1600) and still goes through TRAMP for remote
+projects.  Submodules that are registered but not checked out (no
+`.git' in their directory) are omitted, matching what `git submodule
+foreach' used to report.  The returned paths are relative to
+GITMODULES-DIR."
+  (let ((default-directory gitmodules-dir)
+        paths)
+    (with-temp-buffer
+      (process-file "git" nil '(t nil) nil
+                    "config" "-z" "--file" ".gitmodules"
+                    "--get-regexp" "\\.path$")
+      ;; Each NUL-separated record is "submodule.<name>.path\n<value>";
+      ;; git has already unquoted the value for us.
+      (dolist (record (split-string (buffer-string) "\0" t))
+        (when-let* ((separator (string-search "\n" record)))
+          (let ((path (substring record (1+ separator))))
+            (when (file-exists-p
+                   (expand-file-name ".git"
+                                     (expand-file-name path gitmodules-dir)))
+              (push path paths))))))
+    (nreverse paths)))
+
+(defun projectile--git-submodules (path)
+  "Return the raw submodule listing for the Git repo containing PATH.
+The result is a list of submodule paths relative to PATH.
+
+With `projectile-git-submodule-command' at its default value the
+listing is produced without a shell by `projectile--git-submodule-paths'
+\(see issue #1600); when the variable is customized it is honored as a
+shell command, and when nil submodules are disabled.
+
+For Git projects without a `.gitmodules' file there are no submodules
+to find, so the listing is skipped altogether.  PATH may be inside a
+Git repo without being its toplevel \(e.g. a subproject of an outer
+repo) so `.gitmodules' is looked up at the toplevel of the repo
+containing PATH - the nearest parent with a `.git' entry - which is
+where git itself resolves it.  Stopping at the repo boundary also
+means a populated submodule doesn't pick up its superproject's
+`.gitmodules'.
+
+Alien/hybrid indexing calls this on every file listing, so the result
+is cached in `projectile--git-submodules-cache' and recomputed only
+when `.gitmodules' changes on disk - a stat is far cheaper than the
+listing (see issue #1953).  `projectile-invalidate-cache' also
+drops the cached listing."
+  (when-let* ((gitmodules-dir (locate-dominating-file path ".git"))
+              (gitmodules (expand-file-name ".gitmodules" gitmodules-dir))
+              ;; A plain `_' binding trips "variable `_' not left unused"
+              ;; in the Emacs 28/29 byte-compilers.
+              (gitmodules-exists (file-exists-p gitmodules)))
+    (let* ((mtime (file-attribute-modification-time
+                   (file-attributes gitmodules)))
+           (command (projectile-get-sub-projects-command 'git))
+           (cached (gethash path projectile--git-submodules-cache)))
+      (pcase-let ((`(,cached-gitmodules ,cached-mtime ,cached-command ,cached-result)
+                   cached))
+        (if (and cached
+                 (equal cached-gitmodules gitmodules)
+                 (equal cached-mtime mtime)
+                 (equal cached-command command))
+            cached-result
+          (let ((submodules
+                 (cond
+                  ;; nil disables submodule listing altogether.
+                  ((null command) nil)
+                  ;; The stock command is never actually run: list the
+                  ;; submodules shell-free instead (issue #1600).
+                  ((equal command projectile--default-git-submodule-command)
+                   (let ((dir (file-name-as-directory
+                               (expand-file-name gitmodules-dir)))
+                         (paths (projectile--git-submodule-paths gitmodules-dir)))
+                     (if (equal dir (file-name-as-directory (expand-file-name path)))
+                         paths
+                       ;; PATH is below the `.gitmodules' dir: rebase the
+                       ;; listing so it stays relative to PATH.
+                       (mapcar (lambda (submodule)
+                                 (file-relative-name
+                                  (expand-file-name submodule dir) path))
+                               paths))))
+                  ;; A customized command is still run through the shell.
+                  (t (projectile-files-via-ext-command path command)))))
+            (puthash path (list gitmodules mtime command submodules)
+                     projectile--git-submodules-cache)
+            submodules))))))
+
+(defun projectile-get-sub-projects-files (project-root vcs)
+  "Get files from sub-projects for PROJECT-ROOT recursively.
+VCS is the version control system of the project."
+  (flatten-tree
+   (mapcar (lambda (sub-project)
+             (let ((project-relative-path
+                    (file-name-as-directory (file-relative-name
+                                             sub-project project-root))))
+               (mapcar (lambda (file)
+                         (concat project-relative-path file))
+                       (projectile-files-via-ext-command
+                        sub-project
+                        (projectile-get-ext-command vcs sub-project)))))
+           (projectile-get-all-sub-projects project-root))))
+
+(defun projectile-get-repo-ignored-files (project vcs)
+  "Get a list of the files ignored in the PROJECT using VCS."
+  (let ((cmd (projectile-get-ext-ignored-command vcs)))
+    (when cmd
+      (projectile-files-via-ext-command project cmd))))
+
+(defun projectile-get-repo-ignored-directory (project dir vcs)
+  "Get a list of the files ignored in the PROJECT in the directory DIR.
+VCS is the VCS of the project."
+  (let ((cmd (projectile-get-ext-ignored-command vcs)))
+    (when cmd
+      (projectile-files-via-ext-command project (concat cmd " " dir)))))
+
+(defun projectile--command-accepts-pathspecs-p (command)
+  "Return non-nil when COMMAND can take trailing path arguments.
+
+Several of the indexing commands Projectile ships are shell pipelines:
+the svn, fossil and pijul recipes, and the plain find fallback, all end
+in a `tr' stage.  Appending a path to one of those hands it to that last
+stage rather than to the lister, which fails outright instead of
+restricting the listing, so the caller has to filter the command output
+itself (see `projectile--restrict-to-subdirs')."
+  (and command (not (string-match-p "|" command))))
+
+(defun projectile--ext-command-line (command pathspecs)
+  "Return COMMAND with PATHSPECS appended as shell-quoted positional arguments.
+PATHSPECS may be nil, in which case COMMAND is returned unchanged.
+Shared by the synchronous and asynchronous indexing-command runners.
+
+Most indexing tools (`git ls-files', `find', `hg locate', ...) accept
+trailing path arguments to restrict the listing.  `fd' is the exception:
+its positional grammar is `[pattern] [path...]', so a trailing path
+would be taken as the search pattern, and `fd' 9+ additionally rejects
+`--strip-cwd-prefix' whenever an explicit path is given (see #2005).  So
+for `fd' commands we drop `--strip-cwd-prefix' (Projectile strips the
+`./' prefix from the output anyway) and pass the directories via
+`--search-path', which is unambiguous regardless of whether the command
+already carries a search pattern.  `fd' commands are recognised by the
+`--strip-cwd-prefix' flag Projectile puts in its default `fd' recipes."
+  (if (not pathspecs)
+      command
+    (if (string-match-p "--strip-cwd-prefix\\b" command)
+        (concat (projectile--strip-fd-cwd-prefix-flag command) " "
+                (mapconcat (lambda (path)
+                             (concat "--search-path " (shell-quote-argument path)))
+                           pathspecs " "))
+      (concat command " "
+              (mapconcat #'shell-quote-argument pathspecs " ")))))
+
+(defun projectile--strip-fd-cwd-prefix-flag (command)
+  "Remove fd's `--strip-cwd-prefix' flag (with any `=<when>' value) from COMMAND.
+Also drops the space that preceded it, so the remaining command stays
+tidy."
+  (replace-regexp-in-string
+   " ?--strip-cwd-prefix\\(=[^ ]*\\)?"
+   ""
+   command t t))
+
+(defun projectile--ext-command-output-files ()
+  "Parse an indexing command's stdout in the current buffer into a file list.
+Splits the output on NUL, drops empty records, and strips a leading
+\"./\" from each path.  Shared by `projectile-files-via-ext-command' and
+its asynchronous counterpart so both produce identical results."
+  (let ((shell-output (buffer-substring (point-min) (point-max))))
+    (mapcar (lambda (f)
+              (string-remove-prefix "./" f))
+            (split-string (string-trim shell-output) "\0" t))))
+
+(defun projectile--surface-ext-command-errors (errors-file)
+  "Copy ERRORS-FILE's contents into the `*projectile-files-errors*' buffer.
+Return non-nil when ERRORS-FILE held any text.  Shared by the synchronous
+and asynchronous indexing-command runners so a failing command's stderr is
+available for inspection."
+  (with-current-buffer (get-buffer-create "*projectile-files-errors*")
+    (let ((inhibit-read-only t))
+      (erase-buffer)
+      (ignore-errors (insert-file-contents errors-file))
+      (> (buffer-size) 0))))
+
+(defun projectile-files-via-ext-command (root command &optional pathspecs)
+  "Get a list of relative file names in the project ROOT by executing COMMAND.
+
+PATHSPECS, when non-nil, is a list of subdirectories (relative to
+ROOT) appended to COMMAND as positional arguments.  Each entry is
+shell-quoted before being appended.  All of the indexing commands
+shipped with Projectile (`git ls-files', `fd', `find', `hg locate'
+etc.) accept additional path arguments at the end of the command
+line; users with heavily customised commands that don't should
+either not rely on `+' keep entries in `.projectile' or arrange
+their command to accept positional paths.
+
+If `command' is nil or an empty string, return nil.
+This allows commands to be disabled.
+
+When COMMAND exits non-zero but still produced output, that output is
+used: external listers such as `fd' routinely exit non-zero on benign
+conditions (e.g. an unreadable directory encountered mid-traversal)
+while having listed everything else.  A `user-error' is signalled only
+when a non-zero exit produced no output at all, so a genuinely broken
+command (most commonly a binary like `fd' or `git' missing on a remote
+host) surfaces immediately instead of being mistaken for an empty
+project.  Either way COMMAND's stderr is captured into the
+`*projectile-files-errors*' buffer.
+
+Only text sent to standard output is taken into account."
+  (when (and (stringp command) (not (string-empty-p command)))
+    (let* ((default-directory root)
+           ;; A pipeline can't take the pathspecs; run it unrestricted and
+           ;; filter its output below instead.
+           (pathspecs-on-command (and (projectile--command-accepts-pathspecs-p command)
+                                      pathspecs))
+           (full-command (projectile--ext-command-line command pathspecs-on-command))
+           (errors-file (make-temp-file "projectile-files-errors")))
+      (unwind-protect
+          (with-temp-buffer
+            ;; `process-file-shell-command' goes through TRAMP for remote
+            ;; roots and returns a reliable exit code.  Stderr is collected
+            ;; into a temp file and copied into `*projectile-files-errors*'
+            ;; only when the command fails, so we don't pollute the buffer
+            ;; on the happy path.
+            (let ((exit-code
+                   (process-file-shell-command full-command nil
+                                               (list t errors-file)))
+                  (files (projectile--ext-command-output-files)))
+              (when (and (numberp exit-code) (not (zerop exit-code)))
+                (let ((had-stderr (projectile--surface-ext-command-errors errors-file)))
+                  (cond
+                   ;; Non-zero exit but we still got a listing: trust it.  Only
+                   ;; mention it (quietly) when there was stderr worth seeing.
+                   (files
+                    (when had-stderr
+                      (projectile--message
+                       "`%s' exited with code %d but produced output; using it (see *projectile-files-errors*)"
+                       full-command exit-code)))
+                   ;; Non-zero exit and nothing on stdout: a real failure.
+                   (t
+                    (user-error
+                     "Projectile indexing command failed with exit code %d: %s\n\
+See the *projectile-files-errors* buffer for details"
+                     exit-code full-command)))))
+              (if pathspecs-on-command
+                  files
+                (projectile--restrict-to-subdirs files pathspecs))))
+        (when (file-exists-p errors-file)
+          (delete-file errors-file))))))
+
+(defun projectile--posix-shell ()
+  "Return the POSIX shell the asynchronous indexer should run under, or nil.
+The async runner wraps the command in POSIX-sh syntax (the `{ ...; }
+2>file' grouping in `projectile-files-via-ext-command-async'), so it needs
+a POSIX shell rather than the user's interactive `shell-file-name', which
+may be csh/tcsh/fish (see #2042).  On Unix that is always `/bin/sh'.  On
+Windows there is no guaranteed one, so we look for `sh' on the executable
+search path (e.g. the `sh.exe' shipped with Git for Windows or MSYS) and
+return nil when none is found - the caller then falls back to the
+synchronous runner, which drives cmd.exe without any POSIX syntax
+\(see #2116)."
+  (if (memq system-type '(windows-nt ms-dos))
+      (executable-find "sh")
+    "/bin/sh"))
+
+(defun projectile-files-via-ext-command-async (root command callback &optional pathspecs)
+  "Asynchronously list relative file names in project ROOT by running COMMAND.
+
+Like `projectile-files-via-ext-command', but spawns COMMAND with
+`make-process' so Emacs is not blocked while it runs.  The output is
+parsed with the very same logic, so the result is identical to the
+synchronous command.
+
+CALLBACK is funcalled with two arguments when COMMAND finishes: the list
+of files (nil on failure) and an error description string (nil on
+success).  As in `projectile-files-via-ext-command', a non-zero exit
+that still produced output is treated as success (the output is passed
+to CALLBACK); only a non-zero exit with no output is reported as an
+error.  Either way the command's stderr is copied into the
+`*projectile-files-errors*' buffer.
+
+PATHSPECS is handled exactly as in `projectile-files-via-ext-command'.
+
+Returns the process object, or nil when COMMAND is nil or empty (CALLBACK
+is then invoked with an empty list and no error, so callers don't have to
+special-case disabled commands) or when a remote file-name handler
+declines to start the process (CALLBACK is invoked with an error).
+
+Remote ROOTs are handled via TRAMP (`make-process' is given a non-nil
+`:file-handler')."
+  (if (not (and (stringp command) (not (string-empty-p command))))
+      (progn (funcall callback nil nil) nil)
+    (let* ((default-directory root)
+           ;; Capture stderr in a temp file on the *same host* as the
+           ;; command (local file locally, remote file over TRAMP) and
+           ;; redirect the whole command group into it, mirroring the
+           ;; synchronous runner's stderr handling without relying on
+           ;; `make-process' :stderr support over TRAMP.
+           (errors-file (make-nearby-temp-file "projectile-files-errors"))
+           (errors-localname (or (file-remote-p errors-file 'localname) errors-file))
+           ;; See the synchronous runner: a pipeline can't take the pathspecs,
+           ;; so it runs unrestricted and its output is filtered instead.
+           (pathspecs-on-command (and (projectile--command-accepts-pathspecs-p command)
+                                      pathspecs))
+           (restrict (unless pathspecs-on-command pathspecs))
+           (full-command (concat "{ " (projectile--ext-command-line command pathspecs-on-command)
+                                 "; } 2>" (shell-quote-argument errors-localname)))
+           (stdout-buffer (generate-new-buffer " *projectile-async-index*"))
+           ;; A POSIX shell to run the wrapper under (see
+           ;; `projectile--posix-shell' for why we don't use `shell-file-name');
+           ;; nil on Windows without `sh', in which case we decline below and
+           ;; the caller falls back to the synchronous runner (see #2116).
+           (shell (projectile--posix-shell))
+           ;; The result is delivered by this function rather than
+           ;; straight from the sentinel, so a caller waiting on the
+           ;; process can also deliver it (see
+           ;; `projectile--dir-files-alien-await' and issue #2118).  It
+           ;; runs at most once, whoever gets there first.
+           (finished nil)
+           (finish
+            (lambda (proc)
+              (unless finished
+                (setq finished t)
+                (unwind-protect
+                    ;; A consumer that gives up on the wait (e.g. a C-g during
+                    ;; `projectile--dir-files-alien-await') marks the process
+                    ;; aborted and kills it.  Killing fires the sentinel with a
+                    ;; `signal' status, but we must not then report a bogus
+                    ;; failure or clobber the errors buffer - just clean up.
+                    (unless (process-get proc 'projectile-aborted)
+                      (let ((exit-code (process-exit-status proc))
+                            (files (projectile--restrict-to-subdirs
+                                    (with-current-buffer stdout-buffer
+                                      (projectile--ext-command-output-files))
+                                    restrict)))
+                        (cond
+                         ;; Clean exit: pass the listing through.
+                         ((and (numberp exit-code) (zerop exit-code))
+                          (funcall callback files nil))
+                         ;; Non-zero exit but we still got a listing: trust it,
+                         ;; mirroring the synchronous runner.  Surface stderr
+                         ;; and mention it quietly when there's anything to see.
+                         (files
+                          (when (projectile--surface-ext-command-errors errors-file)
+                            (projectile--message
+                             "`%s' exited with code %s but produced output; using it (see *projectile-files-errors*)"
+                             command exit-code))
+                          (funcall callback files nil))
+                         ;; Non-zero exit and nothing on stdout: a real failure.
+                         (t
+                          (projectile--surface-ext-command-errors errors-file)
+                          (funcall callback
+                                   nil
+                                   (format "exit code %s: %s"
+                                           exit-code command))))))
+                  (when (buffer-live-p stdout-buffer) (kill-buffer stdout-buffer))
+                  (when (file-exists-p errors-file)
+                    (ignore-errors (delete-file errors-file)))))))
+           (proc
+            (when shell
+              (condition-case nil
+                  (make-process
+                   :name "projectile-index"
+                   :buffer stdout-buffer
+                   :command (list shell "-c" full-command)
+                   :connection-type 'pipe
+                   :noquery t
+                   :file-handler t
+                   :sentinel
+                   (lambda (proc _event)
+                     (when (memq (process-status proc) '(exit signal))
+                       (funcall finish proc))))
+                ;; A failed spawn (e.g. Windows can't exec the shell, #2116)
+                ;; signals `file-error'; trap it and decline so the caller
+                ;; falls back to the synchronous runner, rather than letting
+                ;; it escape from indexing.
+                (file-error nil)))))
+      ;; Hand the delivery function to whoever waits on the process, so a
+      ;; sentinel that doesn't get run can't strand them (see #2118).
+      (when (processp proc)
+        (process-put proc 'projectile-finish finish))
+      ;; No process: either no POSIX shell was found (Windows without `sh',
+      ;; see #2116), a spawn error was trapped above, or a file-name handler
+      ;; declined (e.g. a remote host that doesn't support `make-process').
+      ;; In every case the sentinel never fires, so honour the callback
+      ;; contract and clean up; the caller then falls back to the synchronous
+      ;; runner.
+      (unless proc
+        (when (buffer-live-p stdout-buffer) (kill-buffer stdout-buffer))
+        (when (file-exists-p errors-file) (ignore-errors (delete-file errors-file)))
+        (funcall callback nil "could not start the indexing process"))
+      proc)))
+
+(defun projectile-dir-files-alien-async (directory callback &optional vcs subdirs)
+  "Asynchronous counterpart of `projectile-dir-files-alien'.
+Runs the project's main indexing command for DIRECTORY without blocking
+and funcalls CALLBACK with (FILES ERROR) - the same convention as
+`projectile-files-via-ext-command-async'.
+
+VCS and SUBDIRS are interpreted exactly as in
+`projectile-dir-files-alien'.  For git projects the cheap auxiliary
+steps (collecting submodule files and removing deleted-but-unstaged
+files) run synchronously once the main command finishes, inside the
+sentinel - off the caller's critical path - so the assembled result
+matches the synchronous function.  Returns the main command's process."
+  (let* ((vcs (or vcs (projectile-project-vcs directory)))
+         (command (projectile--alien-ext-command vcs directory)))
+    (if (eq vcs 'git)
+        (let ((fd (and projectile-git-use-fd
+                       (projectile-fd-executable-for directory))))
+          (projectile-files-via-ext-command-async
+           directory command
+           (lambda (files err)
+             (if err
+                 (funcall callback nil err)
+               (let* ((all (nconc files
+                                  ;; Submodules run their own `git ls-files',
+                                  ;; which never saw our exclusions.
+                                  (projectile--maybe-remove-ignored
+                                   directory
+                                   (projectile--restricted-sub-projects-files
+                                    directory vcs subdirs))))
+                      (deleted (unless fd (projectile-git-deleted-files directory))))
+                 (funcall callback
+                          (if deleted
+                              (let ((deleted-set (make-hash-table :test 'equal :size (length deleted))))
+                                (dolist (f deleted) (puthash f t deleted-set))
+                                (seq-remove (lambda (f) (gethash f deleted-set)) all))
+                            all)
+                          nil))))
+           subdirs))
+      (projectile-files-via-ext-command-async directory command callback subdirs))))
+
+;;;###autoload
+(defun projectile-index-project-async (&optional project-root)
+  "Index PROJECT-ROOT in the background and populate the files cache.
+
+This warms `projectile-projects-cache' without blocking Emacs, so a
+later `projectile-find-file' (or any command that lists project files)
+finds the cache already populated instead of indexing synchronously.
+
+Only the external-command indexing methods (`alien' and `hybrid') can be
+warmed this way; under `native' indexing this is a no-op with a message,
+since the Elisp directory walk cannot run off the main thread.  Warming
+also requires caching to be enabled.
+
+When PROJECT-ROOT is omitted the current project is used.  Returns the
+indexing process, or nil when nothing was started."
+  (interactive)
+  (let ((root (or project-root (projectile-acquire-root))))
+    (cond
+     ((eq projectile-indexing-method 'native)
+      (projectile--message-always
+       "Async indexing needs the `alien'/`hybrid' method; `native' cannot be warmed")
+      nil)
+     ((not projectile-enable-caching)
+      (projectile--message-always
+       "Async indexing has no effect while caching is disabled")
+      nil)
+     ((let ((proc (gethash root projectile--async-index-processes)))
+        (and proc (process-live-p proc)))
+      (projectile--message-always "Already indexing %s" root)
+      nil)
+     (t
+      (projectile--message-always "Indexing %s in the background..." root)
+      ;; The callback needs to know which process it belongs to so it can
+      ;; tell whether it is still the active index for ROOT when it
+      ;; finishes (a re-trigger or `projectile-invalidate-cache' replaces
+      ;; or clears the registry entry).  But the process object is the
+      ;; return value of the very call the callback is passed to, so we
+      ;; thread it through a mutable cell that is filled in below, before
+      ;; the (asynchronous) sentinel can ever run.
+      (let* ((proc-cell (list nil))
+             (proc
+              (projectile-dir-files-alien-async
+               root
+               (lambda (files err)
+                 ;; Ignore a stale result whose registry entry was
+                 ;; replaced (re-trigger) or removed (invalidation) while
+                 ;; we were running, so it can't resurrect a cache that
+                 ;; has since moved on.
+                 (when (eq (gethash root projectile--async-index-processes)
+                           (car proc-cell))
+                   (remhash root projectile--async-index-processes)
+                   (if err
+                       (projectile--message-always
+                        "Background indexing of %s failed: %s" root err)
+                     (projectile-cache-project root files)
+                     (projectile--message-always "Finished indexing %s (%d files)"
+                                                 root (length files))))))))
+        (setcar proc-cell proc)
+        (when (processp proc)
+          (puthash root proc projectile--async-index-processes))
+        proc)))))
+
+(defun projectile--dir-files-alien-await (directory &optional vcs subdirs)
+  "Like `projectile-dir-files-alien' for DIRECTORY but without freezing Emacs.
+Runs the asynchronous indexer and waits for it with `accept-process-output'
+so redisplay keeps happening and `keyboard-quit' (\\[keyboard-quit]) stays live; on a
+quit the indexing process is killed and the quit is re-signalled.  The
+returned list is the same one `projectile-dir-files-alien' would produce.
+
+VCS and SUBDIRS are interpreted exactly as in `projectile-dir-files-alien'.
+Falls back to the synchronous function when the asynchronous process
+can't be started (e.g. a remote host whose handler doesn't support
+`make-process').
+
+Note that waiting pumps the event loop, so process filters, sentinels
+and timers (but not interactive commands) may run while we wait."
+  (let* (done files err
+         (proc (projectile-dir-files-alien-async
+                directory
+                (lambda (fs e) (setq done t files fs err e))
+                vcs subdirs)))
+    (cond
+     ;; The async indexer didn't spawn a process.  Either the command was
+     ;; empty - in which case the callback already ran synchronously and we
+     ;; just return its (empty) result - or a remote handler declined
+     ;; make-process, in which case we fall back to the synchronous,
+     ;; TRAMP-safe path.
+     ((null proc)
+      (if (and done (null err))
+          files
+        (projectile-dir-files-alien directory vcs subdirs)))
+     ;; A genuine process is running: wait for it without freezing.
+     (t
+      (let ((reporter (make-progress-reporter
+                       (format "Projectile is indexing %s"
+                               (propertize (abbreviate-file-name directory)
+                                           'face 'font-lock-keyword-face)))))
+        (unwind-protect
+            (progn
+              (while (and (not done) (process-live-p proc))
+                (accept-process-output proc 0.1)
+                (progress-reporter-update reporter))
+              ;; The command is done, but the result reaches us from the
+              ;; process sentinel, and that isn't guaranteed to have run:
+              ;; `accept-process-output' on a process that has already
+              ;; exited returns without running it, and the status change
+              ;; may not be noticed until Emacs is back in its command
+              ;; loop.  That used to leave this loop spinning forever with
+              ;; the progress reporter turning (issue #2118).  Pump the
+              ;; event loop briefly - `sit-for', unlike
+              ;; `accept-process-output', does run pending sentinels - and
+              ;; if the result still hasn't arrived, deliver it here.
+              (unless done
+                (let ((deadline (+ (projectile-time-seconds)
+                                   projectile-async-index-sentinel-timeout)))
+                  (while (and (not done) (< (projectile-time-seconds) deadline))
+                    (sit-for 0.02)
+                    (progress-reporter-update reporter)))
+                (unless done
+                  (when-let* ((finish (process-get proc 'projectile-finish)))
+                    (funcall finish proc)))))
+          ;; Runs on normal completion and on `keyboard-quit': make sure we
+          ;; never leave the indexing process running behind us.  Mark it
+          ;; aborted first so its sentinel skips the failure path (killing
+          ;; it fires the sentinel with a `signal' status) and just cleans
+          ;; up - a quit must stay a clean quit.
+          (when (process-live-p proc)
+            (process-put proc 'projectile-aborted t)
+            (delete-process proc)))
+        (progress-reporter-done reporter))
+      (cond
+       (err
+        (user-error "Projectile indexing failed: %s.  \
+See the *projectile-files-errors* buffer for details" err))
+       (done files)
+       ;; Neither the sentinel nor we could deliver a result - rather than
+       ;; report an empty project, index the old (blocking) way.
+       (t (projectile-dir-files-alien directory vcs subdirs)))))))
+
+(defun projectile--dir-files-alien-maybe-async (directory &optional vcs subdirs)
+  "Return alien-indexed files for DIRECTORY, without freezing when possible.
+Dispatches to the responsive asynchronous indexer
+\(`projectile--dir-files-alien-await') when `projectile-async-indexing' is
+enabled and we're in an interactive context, and to the synchronous
+`projectile-dir-files-alien' otherwise (batch mode, keyboard macros, or
+when the option is disabled).  Both return the same list."
+  (if (and projectile-async-indexing
+           (not noninteractive)
+           (not executing-kbd-macro))
+      (projectile--dir-files-alien-await directory vcs subdirs)
+    (projectile-dir-files-alien directory vcs subdirs)))
+
+(defun projectile-project-files-producer (&optional project-root)
+  "Describe how to list PROJECT-ROOT's files with an external command.
+
+Return a plist exposing the pieces an external file finder (for example
+an asynchronous, streaming one built on `consult' or `affe') needs to
+run Projectile's own indexing command itself:
+
+  :directory  the directory the command should run in (the project root)
+  :vcs        the detected version-control system, a symbol (or `none')
+  :command    the shell command that lists the files, NUL-separated, or
+              nil when external-command indexing is disabled.  Carries
+              Projectile's ignore rules as exclusion arguments when the
+              tool understands them (see `projectile-alien-honors-ignores');
+              for the tools that don't, the caller has to apply
+              `projectile-remove-ignored' to the output itself
+  :separator  the string that separates records in the command's output
+
+The command's output is exactly what `projectile-files-via-ext-command'
+parses.  Note that for git projects Projectile additionally folds in
+submodule files and drops deleted-but-unstaged ones (see
+`projectile-dir-files-alien'); a finder that wants byte-for-byte the same
+set as `projectile-find-file' should drive `projectile-dir-files-alien-async'
+rather than running :command directly.
+
+PROJECT-ROOT defaults to the current project."
+  (let* ((root (or project-root (projectile-acquire-root)))
+         (vcs (projectile-project-vcs root)))
+    (list :directory root
+          :vcs vcs
+          :command (projectile--alien-ext-command vcs root)
+          :separator "\0")))
+
+(defun projectile-adjust-files (project vcs files)
+  "First remove ignored files from FILES, then add back unignored files."
+  (projectile-add-unignored project vcs (projectile-remove-ignored files project)))
+
+(defun projectile-remove-ignored (files &optional root)
+  "Remove ignored files and folders from FILES.
+
+FILES are paths relative to the project root.  They are matched against
+the project's ignore patterns (see `projectile--ignore-patterns'), the
+same gitignore-style rules the native indexer and the alien push-down
+apply; `!' ensure patterns rescue files from them.
+
+ROOT names the project whose rules apply, defaulting to the current one.
+Pass it whenever the files being filtered belong to a project other than
+the one you are visiting - listing another project's files otherwise
+filters them by the rules of the project you happen to be in, and with
+caching on stores that wrong answer under the other project's key."
+  (let* (;; Ignore matching is case-sensitive; `string-match-p' would
+         ;; otherwise fold case, since `case-fold-search' defaults to t.
+         (case-fold-search nil)
+         (filtering-patterns (projectile-filtering-patterns root))
+         (ignore-re (projectile--compile-ignore-patterns
+                     (car filtering-patterns)))
+         (ensure-re (projectile--compile-ignore-patterns
+                     (cdr filtering-patterns))))
+    (if (null ignore-re)
+        files
+      (seq-remove
+       (lambda (file)
+         (and (string-match-p ignore-re file)
+              (not (and ensure-re (string-match-p ensure-re file)))))
+       files))))
+
+(defun projectile-keep-ignored-files (project vcs files)
+  "Filter FILES to retain only those that are ignored."
+  (when files
+    (seq-filter
+     (lambda (file)
+       (seq-some (lambda (f) (string-prefix-p f file)) files))
+     (projectile-get-repo-ignored-files project vcs))))
+
+(defun projectile-keep-ignored-directories (project vcs directories)
+  "Get ignored files within each of DIRECTORIES."
+  (when directories
+    (let (result)
+      (dolist (dir directories result)
+        (setq result (append result
+                             (projectile-get-repo-ignored-directory project dir vcs))))
+      result)))
+
+(defun projectile-add-unignored (project vcs files)
+  "This adds unignored files to FILES.
+
+Useful because the VCS may not return ignored files at all.  In
+this case unignored files will be absent from FILES."
+  (let ((unignored-files (projectile-keep-ignored-files
+                          project
+                          vcs
+                          (projectile-unignored-files-rel)))
+        (unignored-paths (projectile-remove-ignored
+                          (projectile-keep-ignored-directories
+                           project
+                           vcs
+                           (projectile-unignored-directories-rel))
+                          project)))
+    (append files unignored-files unignored-paths)))
+
+(defun projectile-buffers-with-file (buffers)
+  "Return only those BUFFERS backed by files."
+  (seq-filter (lambda (b) (buffer-file-name b)) buffers))
+
+(defun projectile-buffers-with-file-or-process (buffers)
+  "Return only those BUFFERS backed by files or processes."
+  (seq-filter (lambda (b) (or (buffer-file-name b)
+                                    (get-buffer-process b))) buffers))
+
+;;; Project buffers
+;;
+;; Which of Emacs's buffers belong to the project, and the filtering that
+;; decides it.  Consumed by the buffer-switching, killing and saving
+;; commands, and by the ibuffer integration.
+
+
+(defun projectile-project-buffers (&optional project)
+  "Get a list of a project's buffers.
+If PROJECT is not specified the command acts on the current project."
+  (let* ((project-root (or project (projectile-acquire-root)))
+         (truename-cache (make-hash-table :test 'equal))
+         (all-buffers (seq-filter
+                       (lambda (buffer)
+                         (projectile-project-buffer-p buffer project-root truename-cache))
+                       (buffer-list))))
+    (if projectile-buffers-filter-function
+        (funcall projectile-buffers-filter-function all-buffers)
+      all-buffers)))
+
+(defun projectile-process-current-project-buffers (action)
+  "Process the current project's buffers using ACTION."
+  (let ((project-buffers (projectile-project-buffers)))
+    (dolist (buffer project-buffers)
+      (funcall action buffer))))
+
+(defun projectile-process-current-project-buffers-current (action)
+  "Invoke ACTION on every project buffer with that buffer current.
+ACTION is called without arguments."
+  (let ((project-buffers (projectile-project-buffers)))
+    (dolist (buffer project-buffers)
+      (with-current-buffer buffer
+        (funcall action)))))
+
+(defun projectile-project-buffer-files (&optional project)
+  "Get a list of a project's buffer files.
+If PROJECT is not specified the command acts on the current project."
+  (let ((project-root (or project (projectile-project-root))))
+    (mapcar
+     (lambda (buffer)
+       (file-relative-name
+        (buffer-file-name buffer)
+        project-root))
+     (projectile-buffers-with-file
+      (projectile-project-buffers project)))))
+
+(defun projectile-project-buffer-p (buffer project-root &optional truename-cache)
+  "Check if BUFFER is under PROJECT-ROOT.
+Optional TRUENAME-CACHE is a hash table used to memoize `file-truename'
+calls when checking multiple buffers against the same project root.
+
+For buffers visiting remote (TRAMP) files we skip the `file-truename'
+call: each such call is a remote round-trip, and resolving symlinks
+across a TRAMP boundary is rarely what users want.  The downside is
+that a remote project reached via two different symlinked paths won't
+be matched - we trade that edge case for not stalling
+`projectile-project-buffers' on networks with high latency."
+  (with-current-buffer buffer
+    (let ((directory (if buffer-file-name
+                         (file-name-directory buffer-file-name)
+                       default-directory)))
+      (and (not (string-prefix-p " " (buffer-name buffer)))
+           (not (projectile-ignored-buffer-p buffer))
+           directory
+           (string-equal (file-remote-p directory)
+                         (file-remote-p project-root))
+           (not (string-match-p "^http\\(s\\)?://" directory))
+           (let ((compare-dir
+                  (cond
+                   ((file-remote-p directory) directory)
+                   (truename-cache
+                    (or (gethash directory truename-cache)
+                        (puthash directory (file-truename directory) truename-cache)))
+                   (t (file-truename directory)))))
+             (string-prefix-p project-root compare-dir (eq system-type 'windows-nt)))))))
+
+(defun projectile-ignored-buffer-p (buffer)
+  "Check if BUFFER should be ignored."
+  (or
+   (with-current-buffer buffer
+     (seq-some
+      (lambda (name)
+        (string-match-p name (buffer-name)))
+      projectile-globally-ignored-buffers))
+   (with-current-buffer buffer
+     (seq-some
+      (lambda (mode)
+        (string-match-p (concat "^" mode "$")
+                        (symbol-name major-mode)))
+      projectile-globally-ignored-modes))))
+
+(defun projectile-recently-active-files ()
+  "Get list of recently active files.
+
+Files are ordered by recently active buffers, and then recently
+opened through use of recentf."
+  (let ((project-buffer-files (projectile-project-buffer-files)))
+    (append project-buffer-files
+            (seq-difference
+             (projectile-recentf-files)
+             project-buffer-files))))
+
+(defun projectile-project-buffer-names ()
+  "Get a list of project buffer names."
+  (mapcar #'buffer-name (projectile-project-buffers)))
+
+(defun projectile-prepend-project-name (string)
+  "Prepend the current project's name to STRING."
+  (format "[%s] %s" (projectile-project-name) string))
+
+(defun projectile-read-buffer-to-switch (prompt)
+  "Read the name of a buffer to switch to, prompting with PROMPT.
+
+This function excludes the current buffer from the offered
+choices."
+  (projectile-completing-read
+   prompt
+   (delete (buffer-name (current-buffer))
+           (projectile-project-buffer-names))
+   :category 'buffer
+   :caller 'projectile-read-buffer))
+
+;;; Other window/frame display variants
+;;
+;; Most Projectile commands that display a buffer come with -other-window
+;; and -other-frame variants (bound under the `4' and `5' prefixes in
+;; `projectile-command-map').  They are all generated by the macro below;
+;; the bodies only differ in the display function they hand to the shared
+;; subroutine.  See also `projectile-other-window-command' and
+;; `projectile-other-frame-command', which provide the same functionality
+;; for *any* command without needing a dedicated wrapper.
+
+(eval-and-compile
+  (defun projectile--substitute-in-symbols (form from to)
+    "Return a copy of FORM with FROM replaced by TO in every symbol name."
+    (cond
+     ((consp form)
+      (cons (projectile--substitute-in-symbols (car form) from to)
+            (projectile--substitute-in-symbols (cdr form) from to)))
+     ((and form (symbolp form)
+           (string-match-p (regexp-quote from) (symbol-name form)))
+      (intern (string-replace from to (symbol-name form))))
+     (t form))))
+
+(defmacro projectile--define-display-variants (base arglist docstring &rest body)
+  "Define other-window/other-frame variants of the Projectile command BASE.
+
+Defines the commands `BASE-other-window' and `BASE-other-frame'.  Each
+takes ARGLIST as its argument list; when ARGLIST is non-empty the
+commands read the raw prefix argument (all such variants mirror a base
+command with an (interactive \"P\") spec).  DOCSTRING is a format
+string; every `%s' in it is filled in with \"window\" or \"frame\".
+
+BODY is the body of the other-window variant.  The other-frame variant
+is derived from it by replacing \"other-window\" with \"other-frame\"
+inside every symbol, so bodies reference display functions like
+`find-file-other-window' and get the frame flavor for free.
+
+If BODY starts with the keyword :places followed by a list, only the
+variants for the listed places are defined, e.g. (window) for commands
+that have no other-frame counterpart."
+  (declare (indent 2) (doc-string 3))
+  (let ((places '(window frame)))
+    (when (eq (car body) :places)
+      (setq places (cadr body)
+            body (cddr body)))
+    `(progn
+       ,@(mapcar
+          (lambda (place)
+            (let ((name (intern (format "%s-other-%s" base place)))
+                  (body (if (eq place 'window)
+                            body
+                          (projectile--substitute-in-symbols
+                           body "other-window" "other-frame")))
+                  (%-count (1- (length (split-string docstring "%s")))))
+              `(defun ,name ,arglist
+                 ,(apply #'format docstring (make-list %-count place))
+                 (interactive ,@(when arglist '("P")))
+                 ,@body)))
+          places))))
+
+(defun projectile--switch-to-buffer (switch-fn)
+  "Read a project buffer and display it with SWITCH-FN.
+SWITCH-FN is a `switch-to-buffer'-like command; passing
+`switch-to-buffer-other-window' or `switch-to-buffer-other-frame'
+yields the other-window/-frame variants."
+  (funcall switch-fn (projectile-read-buffer-to-switch "Switch to buffer: ")))
+
+;;;###autoload
+(defun projectile-switch-to-buffer ()
+  "Switch to a project buffer."
+  (interactive)
+  (projectile--switch-to-buffer #'switch-to-buffer))
+
+;;;###autoload (autoload 'projectile-switch-to-buffer-other-window "projectile" nil t)
+;;;###autoload (autoload 'projectile-switch-to-buffer-other-frame "projectile" nil t)
+(projectile--define-display-variants projectile-switch-to-buffer ()
+  "Switch to a project buffer and show it in another %s."
+  (projectile--switch-to-buffer #'switch-to-buffer-other-window))
+
+;;;###autoload
+(defun projectile-display-buffer ()
+  "Display a project buffer in another window without selecting it."
+  (interactive)
+  (display-buffer
+   (projectile-completing-read
+    "Display buffer: "
+    (projectile-project-buffer-names)
+    :category 'buffer
+    :caller 'projectile-read-buffer)))
+
+;;;###autoload
+(defun projectile-project-buffers-other-buffer ()
+  "Switch to the most recently selected buffer project buffer.
+Only buffers not visible in windows are returned."
+  (interactive)
+  (switch-to-buffer (car (projectile-project-buffers-non-visible)) nil t))
+
+(defun projectile-project-buffers-non-visible ()
+  "Get a list of non visible project buffers."
+  (seq-filter
+   (lambda (buffer)
+     (not (get-buffer-window buffer 'visible)))
+   (projectile-project-buffers)))
+
+;;;###autoload
+(defun projectile-multi-occur (&optional nlines)
+  "Do a `multi-occur' in the project's buffers.
+With a prefix argument, show NLINES of context."
+  (interactive "P")
+  (let ((project (projectile-acquire-root)))
+    (multi-occur (projectile-project-buffers project)
+                 (car (occur-read-primary-args))
+                 nlines)))
+
+;;; Ignore and ensure rules
+;;
+;; Which paths a project's commands may touch.  The rules come from the
+;; globally ignored lists and from the `-'/`!' entries of the dirconfig, and
+;; are normalised here into the gitignore-style patterns every indexing
+;; method and every external tool Projectile drives is configured from.
+
+(defun projectile-normalise-paths (patterns)
+  "Remove leading `/' from the elements of PATTERNS."
+  ;; TODO: Replace delq+mapcar with seq-keep when Emacs 29.1 is the minimum version
+  (delq nil (mapcar (lambda (pat) (and (string-prefix-p "/" pat)
+                                       ;; remove the leading /
+                                       (substring pat 1)))
+                    patterns)))
+
+(defun projectile-expand-paths (paths)
+  "Expand the elements of PATHS.
+
+Elements containing wildcards are expanded and spliced into the
+resulting paths.  The returned PATHS are absolute, based on the
+projectile project root."
+  (let ((default-directory (projectile-project-root)))
+    (flatten-tree (mapcar
+                         (lambda (pattern)
+                           (or (file-expand-wildcards pattern t)
+                               (projectile-expand-root pattern)))
+                         paths))))
+
+(defun projectile-normalise-patterns (patterns)
+  "Remove paths from PATTERNS."
+  (seq-remove (lambda (pat) (string-prefix-p "/" pat)) patterns))
+
+(defun projectile-make-relative-to-root (files)
+  "Make FILES relative to the project root."
+  (let ((project-root (projectile-project-root)))
+    (mapcar (lambda (f) (projectile--project-relative-name f project-root)) files)))
+
+(defun projectile--ignored-path-p (path root directory-p)
+  "Return non-nil when PATH is ignored in the project at ROOT.
+
+PATH is an absolute file name and DIRECTORY-P says whether it names a
+directory, in which case directory-only patterns (those with a trailing
+slash) can match it.  ROOT defaults to the current project's root.
+
+The check is the one indexing performs: PATH's root-relative name is
+matched against `projectile--ignore-patterns', `!' ensure patterns
+rescue it, and `projectile-globally-ignored-file-regexps' is applied to
+the absolute name.  Because an ignored directory covers its whole
+subtree, a path inside one is reported as ignored too."
+  (let* ((path (expand-file-name path))
+         (root (file-name-as-directory
+                (expand-file-name (or root (projectile-project-root)))))
+         (relative-name (projectile--project-relative-name path root))
+         (relative-name (if directory-p
+                            (file-name-as-directory relative-name)
+                          relative-name))
+         (patterns (projectile-filtering-patterns root))
+         (ignore-re (projectile--compile-ignore-patterns (car patterns)))
+         (ensure-re (projectile--compile-ignore-patterns (cdr patterns)))
+         ;; Ignore matching is case-sensitive.
+         (case-fold-search nil))
+    (or (projectile--global-ignore-regexp-p path)
+        (and ignore-re
+             (string-match-p ignore-re relative-name)
+             (not (and ensure-re (string-match-p ensure-re relative-name)))
+             t))))
+
+(defun projectile-ignored-directory-p (directory &optional root)
+  "Check if DIRECTORY should be ignored.
+
+DIRECTORY is an absolute directory name and ROOT is the project root it
+belongs to, defaulting to the current project's.  The answer is the one
+indexing gives - see `projectile--ignored-path-p'."
+  (projectile--ignored-path-p directory root t))
+
+(defun projectile-ignored-file-p (file &optional root)
+  "Check if FILE should be ignored.
+
+FILE is an absolute file name and ROOT is the project root it belongs
+to, defaulting to the current project's.  The answer is the one indexing
+gives - see `projectile--ignored-path-p'.  A file inside an ignored
+directory counts as ignored."
+  (projectile--ignored-path-p file root nil))
+
+(defun projectile-globally-ignored-directory-names ()
+  "Return list of ignored directory names."
+  (seq-difference
+   projectile-globally-ignored-directories
+   projectile-globally-unignored-directories))
+
+(defun projectile--dirconfig-ignore (&optional root)
+  "Return the IGNORE entries from ROOT's dirconfig, or nil."
+  (when-let* ((cfg (projectile-parse-dirconfig-file root)))
+    (projectile-dirconfig-ignore cfg)))
+
+(defun projectile--dirconfig-ensure (&optional root)
+  "Return the ENSURE entries from ROOT's dirconfig, or nil."
+  (when-let* ((cfg (projectile-parse-dirconfig-file root)))
+    (projectile-dirconfig-ensure cfg)))
+
+(defun projectile-unignored-files ()
+  "Return list of unignored files."
+  (mapcar
+   #'projectile-expand-root
+   (append
+    projectile-globally-unignored-files
+    (projectile-project-unignored-files))))
+
+(defun projectile-unignored-directories ()
+  "Return list of unignored directories."
+  (mapcar
+   #'file-name-as-directory
+   (mapcar
+    #'projectile-expand-root
+    (append
+     projectile-globally-unignored-directories
+     (projectile-project-unignored-directories)))))
+
+(defun projectile-unignored-directories-rel ()
+  "Return list of unignored directories, relative to the root."
+  (projectile-make-relative-to-root (projectile-unignored-directories)))
+
+(defun projectile-unignored-files-rel ()
+  "Return list of unignored files, relative to the root."
+  (projectile-make-relative-to-root (projectile-unignored-files)))
+
+(defun projectile-project-unignored-files ()
+  "Return list of project unignored files."
+  (seq-remove 'file-directory-p (projectile-project-unignored)))
+
+(defun projectile-project-unignored-directories ()
+  "Return list of project unignored directories."
+  (seq-filter 'file-directory-p (projectile-project-unignored)))
+
+(defun projectile-paths-to-ensure ()
+  "Return a list of unignored project paths."
+  (projectile-normalise-paths (projectile--dirconfig-ensure)))
+
+(defun projectile-files-to-ensure ()
+  (let ((default-directory (projectile-project-root)))
+    (flatten-tree (mapcar #'file-expand-wildcards
+                          (projectile-patterns-to-ensure)))))
+
+(defun projectile-patterns-to-ensure ()
+  "Return a list of relative file patterns."
+  (projectile-normalise-patterns (projectile--dirconfig-ensure)))
+
+(defun projectile--ignore-patterns (&optional root)
+  "Return ROOT's ignore rules as a list of gitignore-style patterns.
+
+This is Projectile's single source of ignore patterns: every indexing
+method and every external tool Projectile drives is configured from this
+list, so they all apply the same rules the same way.  It merges
+
+- `projectile-globally-ignored-directories', as directory-only patterns
+  \(a trailing `/' is appended)
+- `projectile-globally-ignored-files', as-is
+- `projectile-globally-ignored-file-suffixes', as `*SUFFIX' globs
+- the `-' (ignore) entries of the project's dirconfig, which are already
+  written in this language
+
+The `projectile-globally-unignored-*' options cancel out the matching
+entries.  `projectile-globally-ignored-file-regexps' is deliberately not
+part of this: those are Emacs regexps, not patterns, and can't be handed
+to an external tool.
+
+ROOT defaults to the current project's root and only matters for the
+dirconfig entries; outside a project the global patterns are returned on
+their own.  See `projectile--ignore-pattern-to-regexp' for the matching
+rules."
+  (append
+   (mapcar (lambda (name) (concat (directory-file-name name) "/"))
+           (projectile-globally-ignored-directory-names))
+   (seq-difference projectile-globally-ignored-files
+                   projectile-globally-unignored-files)
+   (projectile--globally-ignored-file-suffixes-glob)
+   (projectile--dirconfig-ignore root)))
+
+(defun projectile--ensure-patterns (&optional root)
+  "Return ROOT's ensure rules as a list of gitignore-style patterns.
+These are the `!' entries of the project's dirconfig; a path they match
+is kept even when `projectile--ignore-patterns' also matches it."
+  (projectile--dirconfig-ensure root))
+
+(defun projectile-filtering-patterns (&optional root)
+  "Return ROOT's ignore and ensure patterns as a cons cell."
+  (cons (projectile--ignore-patterns root)
+        (projectile--ensure-patterns root)))
+
+(defun projectile-project-unignored ()
+  "Return list of project ignored files/directories."
+  (seq-uniq (append (projectile-expand-paths (projectile-paths-to-ensure))
+                    (projectile-expand-paths (projectile-files-to-ensure)))))
+
+
+;;; The dirconfig file
+;;
+;; Reading and parsing a project's `.projectile': classifying its lines into
+;; keep/ignore/ensure entries, caching the parse against the file's mtime,
+;; and warning about the entry forms that no longer mean what they look like.
+
+(defun projectile-dirconfig-file (&optional root)
+  "Return the absolute path to ROOT's dirconfig file.
+ROOT defaults to the current project's root."
+  (expand-file-name projectile-dirconfig-file
+                    (or root (projectile-project-root))))
+
+(cl-defstruct projectile-dirconfig
+  "Parsed contents of a project's dirconfig file.
+KEEP is the list of subdirectories to restrict the project to (as
+returned with a trailing slash).  IGNORE and ENSURE are the lists
+of files or directories to ignore and to forcibly include,
+respectively.  PREFIXLESS-IGNORE is the subset of IGNORE entries
+that arrived without a leading `+'/`-'/`!'/comment marker; they
+are accepted for backward compatibility but recorded separately so
+callers can flag the deprecated syntax.  All slots default to nil."
+  (keep nil) (ignore nil) (ensure nil) (prefixless-ignore nil))
+
+(defun projectile--maybe-warn-glob-keep-entries (project-root cfg)
+  "Warn once per session about glob patterns in + keep entries.
+PROJECT-ROOT identifies the warned-projects set; CFG is the parsed
+`projectile-dirconfig' struct.  The `+' prefix is for subdirectories
+only; the parser silently coerces each entry to a directory, so a
+glob pattern would never match."
+  (when (and cfg
+             (not (gethash project-root projectile--glob-keep-warned-projects)))
+    (when-let* ((globbed (seq-filter
+                          (lambda (entry) (string-match-p "[][*?]" entry))
+                          (projectile-dirconfig-keep cfg))))
+      (puthash project-root t projectile--glob-keep-warned-projects)
+      (display-warning
+       'projectile
+       (format "%s contains `+' entries with glob metacharacters: %s.  \
+The `+' prefix is for subdirectory paths only; globs are not expanded \
+and the entries are silently coerced to directory names.  Use a plain \
+directory or move the pattern to a `-'/`!' rule."
+               (expand-file-name projectile-dirconfig-file project-root)
+               (mapconcat (lambda (s) (format "`%s'" s)) globbed ", "))
+       :warning))))
+
+(defun projectile--dirconfig-classify-line (line)
+  "Classify LINE from a dirconfig file.
+Return a cons (BUCKET . VALUE) where BUCKET is one of `:keep',
+`:ignore', `:ensure', `:legacy-ignore', or `:comment'.  Return nil
+for a blank line.  Leading whitespace is skipped before dispatch
+so an accidental space or tab before the prefix does not change
+classification.  `:legacy-ignore' is reserved for prefix-less
+lines, which are still treated as ignore patterns for backward
+compatibility but are tracked separately so callers can warn."
+  (let* ((trimmed (string-trim-left line))
+         (first-char (and (> (length trimmed) 0) (aref trimmed 0))))
+    (cond
+     ((null first-char) nil)
+     ((and projectile-dirconfig-comment-prefix
+           (eql first-char projectile-dirconfig-comment-prefix))
+      (cons :comment nil))
+     ((eql first-char ?+) (cons :keep          (string-trim (substring trimmed 1))))
+     ((eql first-char ?-) (cons :ignore        (string-trim (substring trimmed 1))))
+     ((eql first-char ?!) (cons :ensure        (string-trim (substring trimmed 1))))
+     (t                   (cons :legacy-ignore (string-trim trimmed))))))
+
+(defun projectile--parse-dirconfig-string (text)
+  "Parse TEXT (a dirconfig file's contents) into a `projectile-dirconfig'."
+  (let (keep ignore ensure prefixless)
+    (dolist (line (split-string text "\n"))
+      (pcase (projectile--dirconfig-classify-line line)
+        (`(:keep . ,v)          (unless (string-empty-p v) (push v keep)))
+        (`(:ignore . ,v)        (unless (string-empty-p v) (push v ignore)))
+        (`(:ensure . ,v)        (unless (string-empty-p v) (push v ensure)))
+        (`(:legacy-ignore . ,v) (unless (string-empty-p v)
+                                  (push v ignore)
+                                  (push v prefixless)))))
+    (make-projectile-dirconfig
+     :keep              (mapcar #'file-name-as-directory (nreverse keep))
+     :ignore            (nreverse ignore)
+     :ensure            (nreverse ensure)
+     :prefixless-ignore (nreverse prefixless))))
+
+(defun projectile--parse-dirconfig-file-uncached (&optional root)
+  "Parse ROOT's dirconfig file without caching.
+Return a `projectile-dirconfig' or nil if the file doesn't exist.
+ROOT defaults to the current project."
+  (let ((dirconfig (projectile-dirconfig-file root)))
+    (when (projectile-file-exists-p dirconfig)
+      (projectile--parse-dirconfig-string
+       (with-temp-buffer
+         (insert-file-contents dirconfig)
+         (buffer-string))))))
+
+(defun projectile--maybe-warn-prefixless-entries (project-root cfg)
+  "Warn once per session about prefix-less ignore entries in CFG for PROJECT-ROOT.
+CFG is a `projectile-dirconfig' struct."
+  (when (and projectile-warn-on-prefixless-dirconfig-lines
+             cfg
+             (projectile-dirconfig-prefixless-ignore cfg)
+             (not (gethash project-root
+                           projectile--prefixless-dirconfig-warned-projects)))
+    (puthash project-root t projectile--prefixless-dirconfig-warned-projects)
+    (display-warning
+     'projectile
+     (format "%s contains entries without a `+'/`-'/`!' prefix: %s.  \
+The implicit form is treated as an ignore rule for backward \
+compatibility but is being phased out — please prefix the lines \
+explicitly.  Set `projectile-warn-on-prefixless-dirconfig-lines' \
+to nil to silence this warning."
+             (expand-file-name projectile-dirconfig-file project-root)
+             (mapconcat (lambda (s) (format "`%s'" s))
+                        (projectile-dirconfig-prefixless-ignore cfg)
+                        ", "))
+     :warning)))
+
+(defun projectile-parse-dirconfig-file (&optional root)
+  "Parse ROOT's ignore file and return its rules.
+ROOT defaults to the current project; pass it to read the rules of a
+project you are not visiting, which is what listing the files of several
+projects at once needs.
+
+The return value is a `projectile-dirconfig' struct with three
+slots: KEEP (subdirectories to restrict the project to), IGNORE
+(files or directories to skip), and ENSURE (files or directories
+to forcibly include even when otherwise ignored).  When the file
+does not exist, the return value is nil.
+
+Lines are dispatched on their first non-whitespace character:
+
+  +  add to the keep list
+  -  add to the ignore list
+  !  add to the ensure list
+
+Without a prefix, the line is assumed to be an ignore pattern, for
+backward compatibility.  When `projectile-dirconfig-comment-prefix'
+is non-nil, lines whose first non-whitespace character matches it
+are treated as comments.
+
+Results are cached per project root and invalidated when the
+dirconfig file's modification time changes."
+  (let* ((project-root (or root (projectile-project-root)))
+         (dirconfig (projectile-dirconfig-file project-root))
+         (cached (gethash project-root projectile--dirconfig-cache))
+         (attrs (file-attributes dirconfig))
+         (mtime (when attrs (file-attribute-modification-time attrs)))
+         (result (pcase-let ((`(,cached-dirconfig ,cached-mtime ,cached-result) cached))
+                   (if (and cached mtime
+                            (equal cached-dirconfig dirconfig)
+                            (equal cached-mtime mtime))
+                       cached-result
+                     (let ((parsed (projectile--parse-dirconfig-file-uncached project-root)))
+                       (when mtime
+                         (puthash project-root
+                                  (list dirconfig mtime parsed)
+                                  projectile--dirconfig-cache))
+                       parsed)))))
+    (projectile--maybe-warn-prefixless-entries project-root result)
+    (projectile--maybe-warn-glob-keep-entries project-root result)
+    result))
+
+;;; Path expansion and completion
+
+(defun projectile-expand-root (name &optional dir)
+  "Expand NAME to project root.
+When DIR is specified it uses DIR's project, otherwise it acts
+on the current project.
+
+Never use on many files since it's going to recalculate the
+project-root for every file."
+  (expand-file-name name (projectile-project-root dir)))
+
+(cl-defun projectile-completing-read (prompt choices &key initial-input action caller sort-function annotation-function (category 'project-file))
+  "Present a project tailored PROMPT with CHOICES.
+
+Reads with `completing-read', unless `projectile-completion-system' is a
+function, in which case that function is called with PROMPT and CHOICES.
+
+INITIAL-INPUT is passed to `completing-read'.  ACTION, when non-nil, is
+called on the selected candidate and its result returned.  SORT-FUNCTION,
+when non-nil, is exposed as the completion metadata's
+`display-sort-function' and `cycle-sort-function', so completion UIs
+that honor metadata present the candidates in that order.
+
+ANNOTATION-FUNCTION, when non-nil, is exposed as the metadata's
+`annotation-function', so UIs that honor metadata show a suffix next to
+each candidate.  Use it when the candidate string alone doesn't identify
+what's being picked - a worktree's path doesn't say which branch it has
+checked out, for instance.
+
+CATEGORY is the completion metadata category advertised to UIs like
+marginalia and embark so they annotate and act on the candidates
+appropriately; it defaults to `project-file' (the candidates are project
+files) and should be overridden when they are not - e.g. `buffer' for a
+buffer switch or `file' for a directory.  A nil CATEGORY omits it.
+
+CALLER is accepted for backward compatibility but no longer used."
+  (ignore caller)
+  (let* ((prompt (projectile-prepend-project-name prompt))
+         (res (if (functionp projectile-completion-system)
+                  (funcall projectile-completion-system prompt choices)
+                (completing-read
+                 prompt
+                 (lambda (string pred action)
+                   ;; The completion category lets packages like marginalia
+                   ;; and embark enhance how candidates are presented.
+                   (if (eq action 'metadata)
+                       `(metadata ,@(when category `((category . ,category)))
+                                  ,@(when annotation-function
+                                      `((annotation-function . ,annotation-function)))
+                                  ,@(when sort-function
+                                      `((display-sort-function . ,sort-function)
+                                        (cycle-sort-function . ,sort-function))))
+                     (complete-with-action action choices string pred)))
+                 nil nil initial-input))))
+    (if action (funcall action res) res)))
+
+;;; Listing a project's files and directories
+
+(defun projectile-project-files (project-root)
+  "Return a list of files for the PROJECT-ROOT."
+  (let (files)
+    ;; If the cache is too stale, don't use it.
+    (when projectile-files-cache-expire
+      (let ((cache-time
+             (gethash project-root projectile-projects-cache-time)))
+        (when (or (null cache-time)
+                  (< (+ cache-time projectile-files-cache-expire)
+                     (projectile-time-seconds)))
+          (remhash project-root projectile-projects-cache)
+          (remhash project-root projectile-projects-cache-time))))
+
+    ;; Use the cache, if requested and available.
+    (when projectile-enable-caching
+      (setq files (or (gethash project-root projectile-projects-cache)
+                      ;; load the cache from disk only if persistent cache is
+                      ;; enabled
+                      (and (eq projectile-enable-caching 'persistent)
+                           (projectile-load-project-cache project-root)))))
+
+    ;; Calculate the list of files.
+    (when (null files)
+      (when projectile-enable-caching
+        (message "Indexing %s..." project-root))
+      (setq files
+            (if (eq projectile-indexing-method 'alien)
+                ;; In alien mode the external tool does the walking.  The
+                ;; ignore rules ride along as exclusion arguments on the
+                ;; command; dirconfig `+' keep entries ride along as
+                ;; pathspecs (or, for a tool that can't take them, as a
+                ;; filter over its output).  Only the tools that can't
+                ;; express the ignores need a further pass here.
+                (let* ((vcs (projectile-project-vcs project-root))
+                       (dirs (projectile-get-project-directories project-root))
+                       (subdirs (unless (equal dirs (list project-root))
+                                  (mapcar (lambda (d)
+                                            (file-relative-name d project-root))
+                                          dirs))))
+                  (projectile--alien-apply-ignores
+                   project-root vcs
+                   (projectile--dir-files-alien-maybe-async project-root vcs subdirs)))
+              (let ((dirs (projectile-get-project-directories project-root)))
+                (cond
+                 ((and (eq projectile-indexing-method 'hybrid) (cdr dirs))
+                  ;; Hybrid + dirconfig `+' keep entries: batch the
+                  ;; external command into a single invocation with
+                  ;; the kept subdirectories as pathspecs, then run
+                  ;; projectile-adjust-files once over the combined
+                  ;; result.  Avoids one shell-out per kept directory.
+                  (let* ((vcs (projectile-project-vcs project-root))
+                         (subdirs (mapcar
+                                   (lambda (d) (file-relative-name d project-root))
+                                   dirs)))
+                    (projectile-adjust-files
+                     project-root vcs
+                     (projectile--dir-files-alien-maybe-async project-root vcs subdirs))))
+                 (t
+                  ;; Native, or hybrid without keep entries: walk each
+                  ;; project directory.  For native this is the only
+                  ;; implementation; for hybrid+single-dir it's
+                  ;; equivalent to the batched call above.
+                  (mapcan
+                   (lambda (dir)
+                     (let ((files (projectile-dir-files dir project-root)))
+                       ;; `projectile-dir-files' already returns paths
+                       ;; relative to DIR, so when DIR is the project root
+                       ;; itself (the single-directory case - native, or
+                       ;; hybrid without keep entries) re-relativising every
+                       ;; path against PROJECT-ROOT is a no-op.  Skip it
+                       ;; rather than pay a `file-relative-name' per file.
+                       (if (string= dir project-root)
+                           files
+                         (mapcar (lambda (f)
+                                   (file-relative-name (concat dir f)
+                                                       project-root))
+                                 files))))
+                   dirs))))))
+
+      ;; Save the cached list.
+      (when projectile-enable-caching
+        (projectile-cache-project project-root files)
+        ;; Close the `Indexing...' notice opened above.  The manual asks
+        ;; for this pairing, and without it a long index leaves the echo
+        ;; area claiming to still be working.
+        (message "Indexing %s...done" project-root)))
+
+    ;;; Sorting
+    ;;
+    ;; Files can't be cached in sorted order as some sorting schemes
+    ;; require dynamic data.  Sorting is ignored completely when in
+    ;; alien mode.
+    (if (eq projectile-indexing-method 'alien)
+        files
+      (projectile-sort-files files))))
+
+(defun projectile-current-project-files ()
+  "Return a list of the files in the current project."
+  (projectile-project-files (projectile-acquire-root)))
+
+(defun projectile-process-current-project-files (action)
+  "Process the current project's files using ACTION."
+  (let ((project-files (projectile-current-project-files))
+        (default-directory (projectile-project-root)))
+    (dolist (filename project-files)
+      (funcall action filename))))
+
+(defun projectile-project-dirs (project)
+  "Return a list of dirs for PROJECT."
+  (seq-uniq
+   (delq nil
+         (mapcan #'projectile--directory-ancestors
+                    (projectile-project-files project)))))
+
+(defun projectile--directory-ancestors (path)
+  "Return a list of the directory of PATH and all its ancestor directories.
+For example, \"src/foo/bar.el\" returns (\"src/\" \"src/foo/\")."
+  (let ((dir (file-name-directory path))
+        result)
+    (while (and dir (not (equal dir "")))
+      (push dir result)
+      (let ((parent (file-name-directory (directory-file-name dir))))
+        (setq dir (unless (equal parent dir) parent))))
+    result))
+
+(defun projectile-current-project-dirs ()
+  "Return a list of dirs for the current project."
+  (projectile-project-dirs (projectile-acquire-root)))
+
+(defun projectile-get-other-files (file-name &optional flex-matching)
+  "Return a list of other files for FILE-NAME.
+The list depends on `:related-files-fn' project option and
+`projectile-other-file-alist'.  For the latter, FLEX-MATCHING can be used
+to match any basename."
+  (if-let* ((plist (projectile--related-files-plist-by-kind  file-name :other)))
+      (projectile--related-files-from-plist plist)
+    (projectile--other-extension-files file-name
+                                       (projectile-current-project-files)
+                                       flex-matching)))
+
+(defun projectile--find-other-file (&optional flex-matching ff-variant)
+  "Switch between files with the same name but different extensions.
+With FLEX-MATCHING, match any file that contains the base name of current file.
+Other file extensions can be customized with the variable
+`projectile-other-file-alist'.  With FF-VARIANT set to a defun, use that
+instead of `find-file'.   A typical example of such a defun would be
+`find-file-other-window' or `find-file-other-frame'"
+  (let ((ff (or ff-variant #'find-file))
+        (other-files (projectile-get-other-files (buffer-file-name) flex-matching)))
+    (if other-files
+        (let ((file-name (projectile--choose-from-candidates other-files :caller 'projectile-read-file)))
+          (funcall ff (expand-file-name file-name
+                                        (projectile-project-root))))
+      (user-error "No other file found"))))
+
+
+;;; Interactive commands
+;;;###autoload
+(defun projectile-find-other-file (&optional flex-matching)
+  "Switch between files with the same name but different extensions.
+With FLEX-MATCHING, match any file that contains the base name of current file.
+Other file extensions can be customized with the variable
+`projectile-other-file-alist'."
+  (interactive "P")
+  (projectile--find-other-file flex-matching))
+
+;;;###autoload (autoload 'projectile-find-other-file-other-window "projectile" nil t)
+;;;###autoload (autoload 'projectile-find-other-file-other-frame "projectile" nil t)
+(projectile--define-display-variants projectile-find-other-file (&optional flex-matching)
+  "Switch between files with different extensions in other %s.
+Switch between files with the same name but different extensions in
+another %s.  With FLEX-MATCHING, match any file that contains the base
+name of current file.  Other file extensions can be customized with the
+variable `projectile-other-file-alist'."
+  (projectile--find-other-file flex-matching #'find-file-other-window))
+
+(defun projectile--file-name-sans-extensions (file-name)
+  "Return FILE-NAME sans any extensions.
+The extensions, in a filename, are what follows the first '.', with the
+exception of a leading '.'"
+  (setq file-name (file-name-nondirectory file-name))
+  (substring file-name 0 (string-match "\\..*" file-name 1)))
+
+(defun projectile--file-name-extensions (file-name)
+  "Return FILE-NAME's extensions.
+The extensions, in a filename, are what follows the first '.', with the
+exception of a leading '.'"
+  ;;would it make sense to return nil instead of an empty string if no extensions are found?
+  (setq file-name (file-name-nondirectory file-name))
+  (let (extensions-start)
+    (substring file-name
+               (if (setq extensions-start (string-match "\\..*" file-name 1))
+                   (1+ extensions-start)
+                 (length file-name)))))
+
+(defun projectile-associated-file-name-extensions (file-name)
+  "Return projectile-other-file-extensions associated to FILE-NAME's extensions.
+If no associated other-file-extensions for the complete (nested) extension
+are found, remove subextensions from FILENAME's extensions until a match is
+found."
+  (let ((current-extensions (projectile--file-name-extensions (file-name-nondirectory file-name)))
+        associated-extensions)
+    (catch 'break
+      (while (not (string= "" current-extensions))
+        (if (setq associated-extensions (alist-get current-extensions projectile-other-file-alist nil nil #'equal))
+            (throw 'break associated-extensions))
+        (setq current-extensions (projectile--file-name-extensions current-extensions))))))
+
+(defun projectile--other-extension-files (current-file project-file-list &optional flex-matching)
+  "Narrow to files with the same names but different extensions.
+Returns a list of possible files for users to choose.
+
+With FLEX-MATCHING, match any file that contains the base name of current file"
+  (let* ((file-ext-list (projectile-associated-file-name-extensions current-file))
+         (fulldirname (if (file-name-directory current-file)
+                          (file-name-directory current-file) "./"))
+         (dirname (file-name-nondirectory (directory-file-name fulldirname)))
+         (filename (regexp-quote (projectile--file-name-sans-extensions current-file)))
+         (file-list (mapcar (lambda (ext)
+                              (if flex-matching
+                                  (concat ".*" filename ".*" "\\." ext "\\'")
+                                (concat "^" filename
+                                        (unless (equal ext "")
+                                          (concat "\\." ext))
+                                        "\\'")))
+                            file-ext-list))
+         (candidates (seq-filter
+                      (lambda (project-file)
+                        (string-match filename project-file))
+                      project-file-list))
+         (candidates
+          (flatten-tree (mapcar
+                               (lambda (file)
+                                 (seq-filter
+                                  (lambda (project-file)
+                                    (string-match file
+                                                  (concat (file-name-base project-file)
+                                                          (when (file-name-extension project-file)
+                                                            (concat "." (file-name-extension project-file))))))
+                                  candidates))
+                               file-list)))
+         (candidates
+          (seq-filter (lambda (file) (not (backup-file-name-p file))) candidates))
+         (sibling-dir-p (lambda (file)
+                          (let ((candidate-dirname (file-name-nondirectory
+                                                    (directory-file-name
+                                                     (or (file-name-directory file) "./")))))
+                            (and (not (equal fulldirname (file-name-directory file)))
+                                 (equal dirname candidate-dirname)))))
+         (candidates (append (seq-filter sibling-dir-p candidates)
+                             (seq-remove sibling-dir-p candidates))))
+    candidates))
+
+(defun projectile-select-files (project-files &optional invalidate-cache)
+  "Select a list of files based on filename at point.
+
+With a prefix arg INVALIDATE-CACHE invalidates the cache first."
+  (projectile-maybe-invalidate-cache invalidate-cache)
+  (let* ((file (if (region-active-p)
+                   (buffer-substring (region-beginning) (region-end))
+                 (or (thing-at-point 'filename) "")))
+         (file (if (string-match "\\.?\\./" file)
+                   (file-relative-name (file-truename file) (projectile-project-root))
+                 file))
+         (files (if file
+                    (seq-filter
+                     (lambda (project-file)
+                       (string-search file project-file))
+                     project-files)
+                  nil)))
+    files))
+
+(defun projectile--find-file-dwim (invalidate-cache &optional ff-variant)
+  "Jump to a project's files using completion based on context.
+
+With a INVALIDATE-CACHE invalidates the cache first.
+
+With FF-VARIANT set to a defun, use that instead of `find-file'.
+A typical example of such a defun would be `find-file-other-window' or
+`find-file-other-frame'
+
+Subroutine for `projectile-find-file-dwim' and
+`projectile-find-file-dwim-other-window'"
+  (let* ((project-root (projectile-acquire-root))
+         (project-files (projectile-project-files project-root))
+         (files (projectile-select-files project-files invalidate-cache))
+         (sort-function (projectile--frecency-sort-function project-root))
+         (file (cond ((= (length files) 1)
+                      (car files))
+                     ((length> files 1)
+                      (projectile-completing-read "Switch to: " files
+                                                  :caller 'projectile-read-file
+                                                  :sort-function sort-function))
+                     (t
+                      (projectile-completing-read "Switch to: " project-files
+                                                  :caller 'projectile-read-file
+                                                  :sort-function sort-function))))
+         (ff (or ff-variant #'find-file)))
+    (funcall ff (expand-file-name file project-root))
+    (run-hooks 'projectile-find-file-hook)))
+
+;;;###autoload
+(defun projectile-find-file-dwim (&optional invalidate-cache)
+  "Jump to a project's files using completion based on context.
+
+With a prefix arg INVALIDATE-CACHE invalidates the cache first.
+
+If point is on a filename, Projectile first tries to search for that
+file in project:
+
+- If it finds just a file, it switches to that file instantly.  This works
+even if the filename is incomplete, but there's only a single file in the
+current project that matches the filename at point.  For example, if
+there's only a single file named \"projectile/projectile.el\" but the
+current filename is \"projectile/proj\" (incomplete),
+`projectile-find-file-dwim' still switches to \"projectile/projectile.el\"
+immediately because this is the only filename that matches.
+
+- If it finds a list of files, the list is displayed for selecting.  A list
+of files is displayed when a filename appears more than one in the project
+or the filename at point is a prefix of more than two files in a project.
+For example, if `projectile-find-file-dwim' is executed on a filepath like
+\"projectile/\", it lists the content of that directory.  If it is executed
+on a partial filename like \"projectile/a\", a list of files with character
+\"a\" in that directory is presented.
+
+- If it finds nothing, display a list of all files in project for selecting."
+  (interactive "P")
+  (projectile--find-file-dwim invalidate-cache))
+
+;;;###autoload (autoload 'projectile-find-file-dwim-other-window "projectile" nil t)
+;;;###autoload (autoload 'projectile-find-file-dwim-other-frame "projectile" nil t)
+(projectile--define-display-variants projectile-find-file-dwim (&optional invalidate-cache)
+  "Jump to a project's files based on context, opening them in another %s.
+
+With a prefix arg INVALIDATE-CACHE invalidates the cache first.
+
+See `projectile-find-file-dwim' for the details of how the file at
+point is used to narrow down the candidates."
+  (projectile--find-file-dwim invalidate-cache #'find-file-other-window))
+
+(defun projectile--find-file (invalidate-cache &optional ff-variant)
+  "Jump to a project's file using completion.
+With INVALIDATE-CACHE invalidates the cache first.  With FF-VARIANT set to a
+defun, use that instead of `find-file'.   A typical example of such a defun
+would be `find-file-other-window' or `find-file-other-frame'"
+  (interactive "P")
+  (projectile-maybe-invalidate-cache invalidate-cache)
+  (let* ((project-root (projectile-acquire-root))
+         (file (projectile-completing-read "Find file: "
+                                           (projectile-project-files project-root)
+                                           :caller 'projectile-read-file
+                                           :sort-function
+                                           (projectile--frecency-sort-function project-root)))
+         (ff (or ff-variant #'find-file)))
+    (when file
+      (funcall ff (expand-file-name file project-root))
+      (run-hooks 'projectile-find-file-hook))))
+
+;;;###autoload
+(defun projectile-find-file (&optional invalidate-cache)
+  "Jump to a project's file using completion.
+With a prefix arg INVALIDATE-CACHE invalidates the cache first."
+  (interactive "P")
+  (projectile--find-file invalidate-cache))
+
+;;;###autoload (autoload 'projectile-find-file-other-window "projectile" nil t)
+;;;###autoload (autoload 'projectile-find-file-other-frame "projectile" nil t)
+(projectile--define-display-variants projectile-find-file (&optional invalidate-cache)
+  "Jump to a project's file using completion and show it in another %s.
+
+With a prefix arg INVALIDATE-CACHE invalidates the cache first."
+  (projectile--find-file invalidate-cache #'find-file-other-window))
+
+;;;###autoload
+(defun projectile-find-file-all ()
+  "Jump to any file in the project, ignoring VCS and projectile ignore rules.
+This lists all files under the project root using a generic file listing
+command (fd or find), bypassing `.gitignore', `.projectile', and other
+ignore mechanisms."
+  (interactive)
+  (let* ((project-root (projectile-acquire-root))
+         (all-files (projectile-files-via-ext-command project-root projectile-generic-command))
+         (file (projectile-completing-read "Find file (all): " all-files
+                                           :caller 'projectile-read-file)))
+    (when file
+      (find-file (expand-file-name file project-root))
+      (run-hooks 'projectile-find-file-hook))))
+
+;;;###autoload
+(defun projectile-toggle-project-read-only ()
+  "Toggle project read only."
+  (interactive)
+  (let ((inhibit-read-only t)
+        (val (not buffer-read-only))
+        (default-directory (projectile-acquire-root)))
+    (save-selected-window
+      (add-dir-local-variable nil 'buffer-read-only val)
+      (save-buffer)
+      (kill-buffer))
+    (when buffer-file-name
+      (read-only-mode (if val +1 -1))
+      (message "[%s] read-only-mode is %s" (projectile-project-name) (if val "on" "off")))))
+
+;;;###autoload
+(defun projectile-add-dir-local-variable (mode variable value)
+  "Run `add-dir-local-variable' with .dir-locals.el in root of project.
+
+Parameters MODE VARIABLE VALUE are passed directly to `add-dir-local-variable'."
+  (let ((inhibit-read-only t)
+        (default-directory (projectile-acquire-root)))
+    (save-selected-window
+      (add-dir-local-variable mode variable value)
+      (save-buffer)
+      (kill-buffer))))
+
+;;;###autoload
+(defun projectile-delete-dir-local-variable (mode variable)
+  "Run `delete-dir-local-variable' with .dir-locals.el in root of project.
+
+Parameters MODE VARIABLE VALUE are passed directly to
+`delete-dir-local-variable'."
+  (let ((inhibit-read-only t)
+        (default-directory (projectile-acquire-root)))
+    (save-selected-window
+      (delete-dir-local-variable mode variable)
+      (save-buffer)
+      (kill-buffer))))
+
+
+;;;; Sorting project files
+(defun projectile-sort-files (files)
+  "Sort FILES according to `projectile-sort-order'."
+  (pcase projectile-sort-order
+    ('default files)
+    ('recentf (projectile-sort-by-recentf-first files))
+    ('recently-active (projectile-sort-by-recently-active-first files))
+    ('modification-time (projectile-sort-by-modification-time files))
+    ('access-time (projectile-sort-by-access-time files))
+    ((pred functionp) (funcall projectile-sort-order files))
+    ;; An unrecognized value must not return nil - that would present
+    ;; the project as empty.
+    (_ files)))
+
+(defun projectile--sort-prioritized-first (prioritized files)
+  "Return FILES with the members of PRIORITIZED first, in order.
+Membership is tracked in a hash set, so the cost stays linear in
+the length of FILES."
+  (let ((seen (make-hash-table :test 'equal :size (length prioritized))))
+    (dolist (file prioritized)
+      (puthash file t seen))
+    (append prioritized
+            (seq-remove (lambda (file) (gethash file seen)) files))))
+
+(defun projectile-sort-by-recentf-first (files)
+  "Sort FILES by a recent first scheme."
+  (projectile--sort-prioritized-first (projectile-recentf-files) files))
+
+(defun projectile-sort-by-recently-active-first (files)
+  "Sort FILES by most recently active buffers or opened files."
+  (projectile--sort-prioritized-first (projectile-recently-active-files) files))
+
+(defun projectile-sort-by-modification-time (files)
+  "Sort FILES by modification time."
+  (let ((default-directory (projectile-project-root))
+        (mtimes (make-hash-table :test 'equal :size (length files))))
+    (dolist (file files)
+      (let ((attrs (file-attributes file)))
+        (puthash file (if attrs (file-attribute-modification-time attrs) 0) mtimes)))
+    (seq-sort (lambda (file1 file2)
+                (not (time-less-p (gethash file1 mtimes)
+                                  (gethash file2 mtimes))))
+              files)))
+
+(defun projectile-sort-by-access-time (files)
+  "Sort FILES by access time."
+  (let ((default-directory (projectile-project-root))
+        (atimes (make-hash-table :test 'equal :size (length files))))
+    (dolist (file files)
+      (let ((attrs (file-attributes file)))
+        (puthash file (if attrs (file-attribute-access-time attrs) 0) atimes)))
+    (seq-sort (lambda (file1 file2)
+                (not (time-less-p (gethash file1 atimes)
+                                  (gethash file2 atimes))))
+              files)))
+
+
+;;;; Find directory in project functionality
+(defun projectile--find-dir (invalidate-cache &optional dired-variant)
+  "Jump to a project's directory using completion.
+
+With INVALIDATE-CACHE invalidates the cache first.  With DIRED-VARIANT set to a
+defun, use that instead of `dired'.  A typical example of such a defun would be
+`dired-other-window' or `dired-other-frame'"
+  (projectile-maybe-invalidate-cache invalidate-cache)
+  (let* ((project (projectile-acquire-root))
+         (dir (projectile-complete-dir project))
+         (dired-v (or dired-variant #'dired)))
+    (funcall dired-v (expand-file-name dir project))
+    (run-hooks 'projectile-find-dir-hook)))
+
+;;;###autoload
+(defun projectile-find-dir (&optional invalidate-cache)
+  "Jump to a project's directory using completion.
+
+With a prefix arg INVALIDATE-CACHE invalidates the cache first."
+  (interactive "P")
+  (projectile--find-dir invalidate-cache))
+
+;;;###autoload (autoload 'projectile-find-dir-other-window "projectile" nil t)
+;;;###autoload (autoload 'projectile-find-dir-other-frame "projectile" nil t)
+(projectile--define-display-variants projectile-find-dir (&optional invalidate-cache)
+  "Jump to a project's directory in other %s using completion.
+
+With a prefix arg INVALIDATE-CACHE invalidates the cache first."
+  (projectile--find-dir invalidate-cache #'dired-other-window))
+
+(defun projectile-complete-dir (project)
+  (let ((project-dirs (projectile-project-dirs project)))
+    (projectile-completing-read
+     "Find dir: "
+     (if projectile-find-dir-includes-top-level
+         (append '("./") project-dirs)
+       project-dirs)
+     :caller 'projectile-read-directory)))
+
+;;;###autoload
+(defun projectile-find-test-file (&optional invalidate-cache)
+  "Jump to a project's test file using completion.
+
+With a prefix arg INVALIDATE-CACHE invalidates the cache first."
+  (interactive "P")
+  (projectile-maybe-invalidate-cache invalidate-cache)
+  (let ((file (projectile-completing-read "Find test file: "
+                                          (projectile-current-project-test-files)
+                                          :caller 'projectile-read-file)))
+    (find-file (expand-file-name file (projectile-project-root)))))
+
+(defun projectile-test-files (files)
+  "Return only the test FILES."
+  (seq-filter 'projectile-test-file-p files))
+
+(defun projectile--merge-related-files-fns (related-files-fns)
+  "Merge multiple RELATED-FILES-FNS into one function."
+  (lambda (path)
+    (let (merged-plist)
+      (dolist (fn related-files-fns merged-plist)
+        (let ((plist (funcall fn path)))
+          (cl-loop for (key value) on plist by #'cddr
+                   do (let ((values (if (consp value) value (list value))))
+                        (setq merged-plist
+                              (plist-put merged-plist key
+                                         (append (plist-get merged-plist key) values))))))))))
+
+(defun projectile--related-files-plist (project-root file)
+  "Return a plist containing all related files information for FILE.
+PROJECT-ROOT is the project root."
+  (if-let* ((rel-path (if (file-name-absolute-p file)
+                         (file-relative-name file project-root)
+                       file))
+           (custom-function (funcall projectile-related-files-function (projectile-project-type))))
+      (funcall (cond ((functionp custom-function)
+                      custom-function)
+                     ((consp custom-function)
+                      (projectile--merge-related-files-fns custom-function))
+                     (t
+                      (error "Unsupported value type of :related-files-fn")))
+               rel-path)))
+
+(defun projectile--related-files-plist-by-kind (file kind)
+  "Return a plist containing :paths and/or :predicate of KIND for FILE."
+  (if-let* ((project-root (projectile-project-root))
+           (plist (projectile--related-files-plist project-root file))
+           (has-kind? (plist-member plist kind)))
+      (let* ((kind-value (plist-get plist kind))
+             (values (if (or (stringp kind-value) (functionp kind-value))
+                         (list kind-value)
+                       kind-value))
+             (paths (seq-uniq (seq-filter 'stringp values)))
+             (predicates (seq-uniq (seq-filter 'functionp values))))
+        (append
+         ;; Make sure that :paths exists even with nil if there is no predicates
+         (when (or paths (null predicates))
+           (list :paths (seq-filter
+                         (lambda (f)
+                           (projectile-file-exists-p (projectile-expand-file-name-wildcard f project-root)))
+                         paths)))
+         (when predicates
+           (list :predicate (if (= 1 (length predicates))
+                                (car predicates)
+                              (lambda (other-file)
+                                (seq-some (lambda (predicate)
+                                           (funcall predicate other-file))
+                                         predicates)))))))))
+
+(defun projectile--related-files-from-plist (plist)
+  "Return a list of files matching to PLIST from current project files."
+  (let* ((predicate (plist-get plist :predicate))
+         (paths (plist-get plist :paths)))
+    (seq-uniq (append
+               paths
+               (when predicate
+                 (seq-filter predicate (projectile-current-project-files)))))))
+
+(defun projectile--related-files-kinds(file)
+  "Return a list of keywords meaning available related kinds for FILE."
+  (if-let* ((project-root (projectile-project-root))
+           (plist (projectile--related-files-plist project-root file)))
+      (cl-loop for key in plist by #'cddr
+               collect key)))
+
+(defun projectile--related-files (file kind)
+  "Return a list of related files of KIND for FILE."
+  (projectile--related-files-from-plist (projectile--related-files-plist-by-kind file kind)))
+
+(defun projectile--find-related-file (file &optional kind)
+  "Choose a file from files related to FILE as KIND.
+If KIND is not provided, a list of possible kinds can be chosen."
+  (unless kind
+    (if-let* ((available-kinds (projectile--related-files-kinds file)))
+        (setq kind (if (= (length available-kinds) 1)
+                       (car available-kinds)
+                     (intern (projectile-completing-read "Kind :" available-kinds
+                                                         :caller 'projectile-read-file))))
+      (user-error "No related files found")))
+
+  (if-let* ((candidates (projectile--related-files file kind)))
+      (projectile-expand-root (projectile--choose-from-candidates candidates :caller 'projectile-read-file))
+    (error
+     "No matching related file as `%s' found for project type `%s'"
+     kind (projectile-project-type))))
+
+;;;###autoload (autoload 'projectile-find-related-file-other-window "projectile" nil t)
+;;;###autoload (autoload 'projectile-find-related-file-other-frame "projectile" nil t)
+(projectile--define-display-variants projectile-find-related-file ()
+  "Open related file in other %s."
+  (find-file-other-window
+   (projectile--find-related-file (buffer-file-name))))
+
+;;;###autoload
+(defun projectile-find-related-file()
+  "Open related file."
+  (interactive)
+  (find-file
+   (projectile--find-related-file (buffer-file-name))))
+
+;;;###autoload
+(defun projectile-related-files-fn-groups(kind groups)
+  "Generate a related-files-fn which relates as KIND for files in each of GROUPS."
+  (lambda (path)
+    (if-let* ((group-found (seq-find (lambda (group)
+                                        (member path group))
+                                      groups)))
+        (list kind (remove path group-found)))))
+
+;;;###autoload
+(defun projectile-related-files-fn-extensions(kind extensions)
+  "Generate a related-files-fn which relates as KIND for files having EXTENSIONS."
+  (lambda (path)
+    (let* ((ext (file-name-extension path))
+           (basename (file-name-base path))
+           (basename-regexp (regexp-quote basename)))
+      (when (member ext extensions)
+        (list kind (lambda (other-path)
+                     (and (string-match-p basename-regexp other-path)
+                          (equal basename (file-name-base other-path))
+                          (let ((other-ext (file-name-extension other-path)))
+                            (and (member other-ext extensions)
+                                 (not (equal other-ext ext)))))))))))
+
+;;;###autoload
+(defun projectile-related-files-fn-test-with-prefix(extension test-prefix)
+  "Generate a related-files-fn which relates tests and impl.
+Use files with EXTENSION based on TEST-PREFIX."
+  (lambda (path)
+    (when (equal (file-name-extension path) extension)
+      (let* ((file-name (file-name-nondirectory path))
+             (find-impl? (string-prefix-p test-prefix file-name))
+             (file-name-to-find (if find-impl?
+                                    (substring file-name (length test-prefix))
+                                  (concat test-prefix file-name))))
+        (list (if find-impl? :impl :test)
+              (lambda (other-path)
+                (and (string-suffix-p file-name-to-find other-path)
+                     (equal (file-name-nondirectory other-path) file-name-to-find))))))))
+
+;;;###autoload
+(defun projectile-related-files-fn-test-with-suffix(extension test-suffix)
+  "Generate a related-files-fn which relates tests and impl.
+Use files with EXTENSION based on TEST-SUFFIX."
+  (lambda (path)
+    (when (equal (file-name-extension path) extension)
+      (let* ((file-name (file-name-nondirectory path))
+             (dot-ext (concat "." extension))
+             (suffix-ext (concat test-suffix dot-ext))
+             (find-impl? (string-suffix-p suffix-ext file-name))
+             (file-name-to-find (if find-impl?
+                                    (concat (substring file-name 0 (- (length suffix-ext)))
+                                            dot-ext)
+                                  (concat (substring file-name 0 (- (length dot-ext)))
+                                          suffix-ext))))
+        (list (if find-impl? :impl :test)
+              (lambda (other-path)
+                (and (string-suffix-p file-name-to-find other-path)
+                     (equal (file-name-nondirectory other-path) file-name-to-find))))))))
+
+
+;;; File kinds
+;;
+;; A "file kind" is a declarative description of one category of files a
+;; project type has - Rails models, controllers and views; Django models,
+;; views and urls; and so on.  Kinds are declared with the `:file-kinds'
+;; keyword of `projectile-register-project-type' as an alist of (KIND-NAME
+;; . SPEC), where KIND-NAME is a keyword (e.g. `:model') and SPEC is a plist
+;; describing which files belong to the kind and how to derive a shared
+;; "resource key" from a file's path.  Two files of different kinds are
+;; *related* when their keys are equal, which is what powers
+;; `projectile-toggle-related-file'; `projectile-find-file-of-kind' uses just
+;; the membership test.  The whole thing compiles down to an ordinary
+;; related-files-fn (see `projectile--file-kinds-related-files-fn'), so it
+;; rides on the existing kind-agnostic related-files machinery.
+
+(defun projectile--singularize (word)
+  "Naively singularize the English noun WORD.
+
+Only the regular cases are handled: a trailing -ies becomes -y, a
+trailing -ses/-xes/-zes/-ches/-shes drops the -es, and any other
+trailing -s (but not -ss) is dropped.  Irregular nouns (person/people,
+child/children, ...) and uncountables are returned unchanged, so this is
+adequate for deriving resource keys from Rails-style file names but is
+not a general-purpose inflector."
+  (cond
+   ((string-suffix-p "ies" word)
+    (concat (substring word 0 -3) "y"))
+   ((string-match-p "\\(s\\|x\\|z\\|ch\\|sh\\)es\\'" word)
+    (substring word 0 -2))
+   ((and (string-suffix-p "s" word)
+         (not (string-suffix-p "ss" word)))
+    (substring word 0 -1))
+   (t word)))
+
+(defun projectile--pluralize (word)
+  "Naively pluralize the English noun WORD.
+
+The mirror of `projectile--singularize', handling only the regular
+cases: a consonant followed by -y becomes -ies, an -s/-x/-z/-ch/-sh
+ending gains -es, and everything else gains -s.  Irregular nouns are not
+handled."
+  (cond
+   ((string-match-p "[^aeiou]y\\'" word)
+    (concat (substring word 0 -1) "ies"))
+   ((string-match-p "\\(s\\|x\\|z\\|ch\\|sh\\)\\'" word)
+    (concat word "es"))
+   (t (concat word "s"))))
+
+;;;; Reference file-kinds tables (Rails, Django)
+
+(defun projectile--rails-resource-key (rel-path prefix suffix)
+  "Return the namespaced singular Rails resource key of REL-PATH.
+PREFIX is the resource root (e.g. \"app/controllers/\") and SUFFIX the
+file suffix (e.g. \"_controller.rb\").  Rails names controllers, helpers
+and views after the *plural* resource (e.g. \"users_controller.rb\"),
+while models use the singular (\"user.rb\"); singularizing the stripped
+name makes them share the model's key.  Any namespace directories under
+PREFIX are preserved, so \"app/controllers/admin/users_controller.rb\"
+keys as \"admin/user\" and does not collide with a top-level
+\"users_controller.rb\".  The singularizer is naive (see
+`projectile--singularize'), so irregular resource names will not relate
+correctly."
+  (when (and (string-prefix-p prefix rel-path)
+             (string-suffix-p suffix (file-name-nondirectory rel-path)))
+    (let* ((subpath (substring rel-path (length prefix)))
+           (dir (or (file-name-directory subpath) ""))
+           (base (file-name-nondirectory subpath))
+           (resource (substring base 0 (- (length suffix)))))
+      (concat dir (projectile--singularize resource)))))
+
+(defun projectile--rails-controller-key (rel-path)
+  "Return the namespaced singular Rails resource key of the controller REL-PATH."
+  (projectile--rails-resource-key rel-path "app/controllers/" "_controller.rb"))
+
+(defun projectile--rails-helper-key (rel-path)
+  "Return the namespaced singular Rails resource key of the helper REL-PATH."
+  (projectile--rails-resource-key rel-path "app/helpers/" "_helper.rb"))
+
+(defun projectile--rails-view-key (rel-path)
+  "Return the namespaced singular Rails resource key of the view file REL-PATH.
+Rails views live in a per-resource directory (e.g. \"app/views/users/\"),
+so the key is that directory's path with its final segment singularized;
+\"app/views/admin/users/index.html.erb\" keys as \"admin/user\"."
+  (when (string-prefix-p "app/views/" rel-path)
+    (let ((rest (substring rel-path (length "app/views/"))))
+      (when-let* (((string-match-p "/" rest))
+                  (resource-dir (directory-file-name (file-name-directory rest))))
+        (concat (or (file-name-directory resource-dir) "")
+                (projectile--singularize
+                 (file-name-nondirectory resource-dir)))))))
+
+(defun projectile--django-app-key (rel-path)
+  "Return the Django app directory of REL-PATH.
+This is REL-PATH's parent directory (without a trailing slash), so
+\"polls/models.py\" keys as \"polls\" and a nested \"apps/polls/models.py\"
+keys as \"apps/polls\" without colliding with a different \"polls\" app."
+  (when-let* ((dir (file-name-directory rel-path)))
+    (directory-file-name dir)))
+
+(defun projectile--parent-directory-key (rel-path)
+  "Return REL-PATH\\='s parent directory, without a trailing slash.
+A key for the frameworks that group a resource\\='s files in a directory
+rather than naming them after it, so \"polls/models.py\" keys as
+\"polls\" and a nested \"apps/polls/models.py\" as \"apps/polls\", without
+the two colliding."
+  (when-let* ((dir (file-name-directory rel-path)))
+    (directory-file-name dir)))
+
+(defalias 'projectile--django-app-key #'projectile--parent-directory-key
+  "Return the Django app directory of a path.
+An alias for `projectile--parent-directory-key\\=', kept because the
+Django reference table named it.")
+
+(defun projectile--basename-key (rel-path suffix)
+  "Return REL-PATH\\='s basename with SUFFIX removed, ignoring its directory.
+For the frameworks that name a resource\\='s files after it but scatter
+them across directories, so the directory can\\='t be part of the key."
+  (let ((name (file-name-nondirectory rel-path)))
+    (when (string-suffix-p suffix name)
+      (substring name 0 (- (length suffix))))))
+
+(defun projectile--phoenix-controller-key (rel-path)
+  "Return the Phoenix resource key of the controller REL-PATH."
+  (projectile--basename-key rel-path "_controller.ex"))
+
+(defun projectile--phoenix-html-key (rel-path)
+  "Return the Phoenix resource key of the HTML module REL-PATH."
+  (projectile--basename-key rel-path "_html.ex"))
+
+(defun projectile--phoenix-json-key (rel-path)
+  "Return the Phoenix resource key of the JSON module REL-PATH."
+  (projectile--basename-key rel-path "_json.ex"))
+
+(defun projectile--phoenix-view-key (rel-path)
+  "Return the Phoenix resource key of the view REL-PATH (Phoenix 1.6)."
+  (projectile--basename-key rel-path "_view.ex"))
+
+(defun projectile--phoenix-live-key (rel-path)
+  "Return the Phoenix resource key of the LiveView REL-PATH."
+  (projectile--basename-key rel-path "_live.ex"))
+
+(defvar projectile--phoenix-file-kinds
+  '((:controller . (:suffix "_controller.ex"
+                    :key-fn projectile--phoenix-controller-key))
+    (:html       . (:suffix "_html.ex"
+                    :key-fn projectile--phoenix-html-key))
+    (:json       . (:suffix "_json.ex"
+                    :key-fn projectile--phoenix-json-key))
+    (:view       . (:suffix "_view.ex"
+                    :key-fn projectile--phoenix-view-key))
+    (:live       . (:suffix "_live.ex"
+                    :key-fn projectile--phoenix-live-key)))
+  "Reference `:file-kinds\\=' table for Phoenix applications.
+Relates the modules of a resource by the name they share - user_controller.ex,
+user_html.ex, user_json.ex, user_live.ex - wherever under `lib/\\=' they
+live, since the web directory is named after the application.  `:view\\='
+is the Phoenix 1.6 spelling that `:html\\=' replaced in 1.7; a project
+will have one or the other.")
+
+(defun projectile--laravel-model-key (rel-path)
+  "Return the Laravel resource key of the model REL-PATH."
+  (projectile--basename-key rel-path ".php"))
+
+(defun projectile--laravel-controller-key (rel-path)
+  "Return the Laravel resource key of the controller REL-PATH."
+  (projectile--basename-key rel-path "Controller.php"))
+
+(defun projectile--laravel-factory-key (rel-path)
+  "Return the Laravel resource key of the factory REL-PATH."
+  (projectile--basename-key rel-path "Factory.php"))
+
+(defun projectile--laravel-seeder-key (rel-path)
+  "Return the Laravel resource key of the seeder REL-PATH."
+  (projectile--basename-key rel-path "Seeder.php"))
+
+(defun projectile--laravel-policy-key (rel-path)
+  "Return the Laravel resource key of the policy REL-PATH."
+  (projectile--basename-key rel-path "Policy.php"))
+
+(defvar projectile--laravel-file-kinds
+  '((:model      . (:path "app/Models/" :suffix ".php"
+                    :key-fn projectile--laravel-model-key))
+    (:controller . (:path "app/Http/Controllers/" :suffix "Controller.php"
+                    :key-fn projectile--laravel-controller-key))
+    (:factory    . (:path "database/factories/" :suffix "Factory.php"
+                    :key-fn projectile--laravel-factory-key))
+    (:seeder     . (:path "database/seeders/" :suffix "Seeder.php"
+                    :key-fn projectile--laravel-seeder-key))
+    (:policy     . (:path "app/Policies/" :suffix "Policy.php"
+                    :key-fn projectile--laravel-policy-key)))
+  "Reference `:file-kinds\\=' table for the Laravel project type.
+Relates the files named after an Eloquent model - User.php,
+UserController.php, UserFactory.php, UserSeeder.php, UserPolicy.php -
+by that class name.  Blade views are deliberately left out: they live in
+snake_case plural directories while the classes are StudlyCase singular,
+so relating them would need inflection and case conversion, and would
+guess wrong often enough not to be worth it.")
+
+(defvar projectile--nextjs-file-kinds
+  '((:page    . (:prefix "page." :key-fn projectile--parent-directory-key))
+    (:layout  . (:prefix "layout." :key-fn projectile--parent-directory-key))
+    (:loading . (:prefix "loading." :key-fn projectile--parent-directory-key))
+    (:error   . (:prefix "error." :key-fn projectile--parent-directory-key))
+    (:route   . (:prefix "route." :key-fn projectile--parent-directory-key)))
+  "Reference `:file-kinds\\=' table for Next.js applications.
+The app router gives a route\\='s files fixed names in a shared directory -
+page, layout, loading, error, route - so the directory is the key.  Each
+kind matches on the name plus its dot rather than a whole file name, so
+it covers whichever of .js, .jsx, .ts or .tsx the project uses without
+also matching something like `pageant.tsx\\='.")
+
+(defvar projectile--rails-file-kinds
+  '((:model      . (:path "app/models/"))
+    (:controller . (:path "app/controllers/"
+                    :suffix "_controller.rb"
+                    :key-fn projectile--rails-controller-key))
+    (:view       . (:path "app/views/"
+                    :key-fn projectile--rails-view-key))
+    (:helper     . (:path "app/helpers/"
+                    :suffix "_helper.rb"
+                    :key-fn projectile--rails-helper-key)))
+  "Reference `:file-kinds' table for Rails project types.
+Relates a resource's model, controller, views and helper by a shared
+singular key (e.g. app/models/user.rb, app/controllers/users_controller.rb,
+app/views/users/*, app/helpers/users_helper.rb).  Plural-to-singular
+mapping is naive; see `projectile--singularize'.")
+
+(defvar projectile--django-file-kinds
+  '((:model . (:suffix "models.py" :key-fn projectile--django-app-key))
+    (:view  . (:suffix "views.py"  :key-fn projectile--django-app-key))
+    (:urls  . (:suffix "urls.py"   :key-fn projectile--django-app-key))
+    (:admin . (:suffix "admin.py"  :key-fn projectile--django-app-key))
+    (:tests . (:suffix "tests.py"  :key-fn projectile--django-app-key)))
+  "Reference `:file-kinds' table for the Django project type.
+Relates the per-app files of a Django application by the app directory
+name (e.g. polls/models.py, polls/views.py, polls/urls.py); no
+inflection is needed.")
+
+(defun projectile--file-kind-member-p (rel-path spec)
+  "Return non-nil when REL-PATH belongs to the file kind described by SPEC.
+
+REL-PATH is a path relative to the project root.  Membership holds when
+REL-PATH lives under SPEC's `:path' prefix (if any) and its basename
+matches SPEC's `:prefix' and `:suffix' (if any)."
+  (let ((path (plist-get spec :path))
+        (prefix (plist-get spec :prefix))
+        (suffix (plist-get spec :suffix))
+        (name (file-name-nondirectory rel-path)))
+    ;; `:path' is matched as a directory prefix, so \"app/models/\" does
+    ;; not also match \"app/models_archive/x.rb\".
+    (and (or (null path)
+             (string-prefix-p (file-name-as-directory path) rel-path))
+         (or (null prefix) (string-prefix-p prefix name))
+         (or (null suffix) (string-suffix-p suffix name)))))
+
+(defun projectile--file-kind-default-key (rel-path spec)
+  "Derive the default resource key of REL-PATH for the kind SPEC.
+
+The key is REL-PATH taken relative to SPEC's `:path', with the final
+component's `:suffix' (or, lacking that, its file extension) and
+`:prefix' stripped.  Any namespace directories under `:path' are kept,
+so files that differ only by subdirectory get distinct keys.  Return nil
+for an empty result."
+  (let* ((path (plist-get spec :path))
+         (subpath (if (and path
+                           (string-prefix-p (file-name-as-directory path)
+                                            rel-path))
+                      (substring rel-path (length (file-name-as-directory path)))
+                    rel-path))
+         (dir (or (file-name-directory subpath) ""))
+         (name (file-name-nondirectory subpath))
+         (prefix (plist-get spec :prefix))
+         (suffix (plist-get spec :suffix)))
+    (when (and suffix (string-suffix-p suffix name))
+      (setq name (substring name 0 (- (length suffix)))))
+    (unless suffix
+      (setq name (file-name-sans-extension name)))
+    (when (and prefix (string-prefix-p prefix name))
+      (setq name (substring name (length prefix))))
+    (unless (string-empty-p name)
+      (concat dir name))))
+
+(defun projectile--file-kind-key (rel-path spec)
+  "Return REL-PATH's resource key for the kind SPEC, or nil.
+
+Uses SPEC's `:key-fn' when set, otherwise
+`projectile--file-kind-default-key'.  A `:key-fn' that signals an error
+is treated as no match (nil), so one misbehaving user-supplied key-fn
+can't break related-file navigation for the whole project type."
+  (if-let* ((key-fn (plist-get spec :key-fn)))
+      (condition-case nil
+          (funcall key-fn rel-path)
+        (error nil))
+    (projectile--file-kind-default-key rel-path spec)))
+
+(defun projectile--file-kind-match (rel-path spec)
+  "Return REL-PATH's resource key for the kind SPEC, or nil.
+
+REL-PATH matches the kind only when it is a member (see
+`projectile--file-kind-member-p') and its derived key is a non-empty
+string (so a `:key-fn' returning nil, an empty string or a non-string
+value simply doesn't match, rather than relating unrelated files)."
+  (when (projectile--file-kind-member-p rel-path spec)
+    (let ((key (projectile--file-kind-key rel-path spec)))
+      (and (stringp key) (not (string-empty-p key)) key))))
+
+(defun projectile--file-kinds-related-files-fn (file-kinds)
+  "Compile FILE-KINDS into a related-files-fn.
+
+FILE-KINDS is an alist of (KIND . SPEC).  KIND is a keyword and SPEC is
+a plist with the following optional properties:
+
+  :path    a root-relative directory prefix (e.g. \"app/models/\").
+  :prefix  a basename prefix the file must have.
+  :suffix  a basename suffix the file must have (e.g. \"_controller.rb\").
+  :key-fn  a function of the file's relative path returning its resource
+           key string, or nil when the file is not of this kind.  When
+           omitted the key is derived by `projectile--file-kind-default-key'.
+
+The returned function, given a relative path, finds the first kind the
+path belongs to and emits, for every *other* kind, an entry
+\(:KIND PREDICATE) whose PREDICATE matches files of that kind sharing the
+same resource key."
+  (lambda (rel-path)
+    (let (this-kind this-key)
+      (cl-dolist (entry file-kinds)
+        (when-let* ((key (projectile--file-kind-match rel-path (cdr entry))))
+          (setq this-kind (car entry)
+                this-key key)
+          (cl-return)))
+      (when this-kind
+        (let (result)
+          (dolist (entry file-kinds)
+            (let ((kind (car entry))
+                  (spec (cdr entry)))
+              (unless (eq kind this-kind)
+                (setq result
+                      (plist-put result kind
+                                 (lambda (other-path)
+                                   (equal this-key
+                                          (projectile--file-kind-match other-path spec))))))))
+          result)))))
+
+(defun projectile--file-kinds ()
+  "Return the current project type's `:file-kinds' alist."
+  (projectile-project-type-attribute (projectile-project-type) 'file-kinds))
+
+(defun projectile--related-file-candidates (rel-path &optional file-kinds project-files)
+  "Return an ordered alist of (KIND . FILE) related to REL-PATH.
+
+Each entry is a project file of a *different* kind than REL-PATH's own
+whose resource key equals REL-PATH's, listed in FILE-KINDS table order.
+FILE-KINDS defaults to the current project type's kinds and PROJECT-FILES
+to `projectile-current-project-files'.  Return nil when REL-PATH is not
+of any known kind or has no related files."
+  (let* ((file-kinds (or file-kinds (projectile--file-kinds)))
+         (project-files (or project-files (projectile-current-project-files)))
+         this-kind this-key candidates)
+    (cl-dolist (entry file-kinds)
+      (when-let* ((key (projectile--file-kind-match rel-path (cdr entry))))
+        (setq this-kind (car entry)
+              this-key key)
+        (cl-return)))
+    (when this-kind
+      (dolist (entry file-kinds (nreverse candidates))
+        (let ((kind (car entry))
+              (spec (cdr entry)))
+          (unless (eq kind this-kind)
+            (when-let* ((match (seq-find
+                                (lambda (f)
+                                  (and (not (equal f rel-path))
+                                       (equal this-key
+                                              (projectile--file-kind-match f spec))))
+                                project-files)))
+              (push (cons kind match) candidates))))))))
+
+(defun projectile--related-file-ring (rel-path &optional file-kinds project-files)
+  "Return the stable ring of files sharing REL-PATH's resource key.
+
+The ring holds one file per kind that has a match, in FILE-KINDS table
+order, with REL-PATH itself standing in for its own kind.  Its order does
+not depend on which file in the ring REL-PATH is, so advancing from
+REL-PATH's position cycles through the related kinds deterministically.
+FILE-KINDS defaults to the current project type's kinds and PROJECT-FILES
+to `projectile-current-project-files'.  Return nil when REL-PATH is not of
+any known kind."
+  (let* ((file-kinds (or file-kinds (projectile--file-kinds)))
+         (project-files (or project-files (projectile-current-project-files)))
+         this-kind this-key ring)
+    (cl-dolist (entry file-kinds)
+      (when-let* ((key (projectile--file-kind-match rel-path (cdr entry))))
+        (setq this-kind (car entry)
+              this-key key)
+        (cl-return)))
+    (when this-kind
+      (dolist (entry file-kinds (nreverse ring))
+        (let ((kind (car entry))
+              (spec (cdr entry)))
+          (if (eq kind this-kind)
+              (push rel-path ring)
+            (when-let* ((match (seq-find
+                                (lambda (f)
+                                  (and (not (equal f rel-path))
+                                       (equal this-key
+                                              (projectile--file-kind-match f spec))))
+                                project-files)))
+              (push match ring))))))))
+
+(defun projectile--file-kind-name (kind)
+  "Return the human-readable name of the file KIND keyword."
+  (substring (symbol-name kind) 1))
+
+(defun projectile--read-file-kind (prompt)
+  "Read one of the current project type's file kinds using PROMPT.
+Return the chosen (KIND . SPEC) entry."
+  (let ((file-kinds (projectile--file-kinds)))
+    (unless file-kinds
+      (user-error "Project type `%s' defines no file kinds"
+                  (projectile-project-type)))
+    (let* ((names (mapcar (lambda (entry)
+                            (projectile--file-kind-name (car entry)))
+                          file-kinds))
+           (choice (projectile-completing-read prompt names
+                                               :caller 'projectile-find-file-of-kind)))
+      (assq (intern (concat ":" choice)) file-kinds))))
+
+(defun projectile--find-file-of-kind (kind-entry &optional ff-variant)
+  "Complete over project files of KIND-ENTRY and open the chosen one.
+KIND-ENTRY is a (KIND . SPEC) pair.  With FF-VARIANT set to a defun, use
+that instead of `find-file' (e.g. `find-file-other-window')."
+  (let* ((project-root (projectile-acquire-root))
+         (spec (cdr kind-entry))
+         (files (seq-filter (lambda (f)
+                              (projectile--file-kind-member-p f spec))
+                            (projectile-project-files project-root)))
+         (file (projectile-completing-read
+                (format "Find %s: " (projectile--file-kind-name (car kind-entry)))
+                files
+                :caller 'projectile-find-file-of-kind
+                :sort-function (projectile--frecency-sort-function project-root)))
+         (ff (or ff-variant #'find-file)))
+    (when file
+      (funcall ff (expand-file-name file project-root))
+      (run-hooks 'projectile-find-file-hook))))
+
+;;;###autoload
+(defun projectile-find-file-of-kind (&optional invalidate-cache)
+  "Jump to a project file of a chosen file kind using completion.
+
+Prompt for one of the current project type's file kinds (see the
+`:file-kinds' keyword of `projectile-register-project-type') and then
+complete over all project files belonging to that kind.  With a prefix
+arg INVALIDATE-CACHE invalidates the cache first."
+  (interactive "P")
+  (projectile-maybe-invalidate-cache invalidate-cache)
+  (projectile--find-file-of-kind
+   (projectile--read-file-kind "Find file of kind: ")))
+
+;;;###autoload (autoload 'projectile-find-file-of-kind-other-window "projectile" nil t)
+;;;###autoload (autoload 'projectile-find-file-of-kind-other-frame "projectile" nil t)
+(projectile--define-display-variants projectile-find-file-of-kind ()
+  "Jump to a project file of a chosen file kind and show it in another %s."
+  (projectile--find-file-of-kind
+   (projectile--read-file-kind "Find file of kind: ")
+   #'find-file-other-window))
+
+(defun projectile--read-related-file-target (rel-path)
+  "Prompt for one of REL-PATH's related file kinds and return its file."
+  (let* ((candidates (projectile--related-file-candidates rel-path))
+         (names (mapcar (lambda (c) (projectile--file-kind-name (car c)))
+                        candidates))
+         (choice (projectile-completing-read
+                  "Related file kind: " names
+                  :caller 'projectile-toggle-related-file)))
+    (alist-get (intern (concat ":" choice)) candidates)))
+
+;;;###autoload
+(defun projectile-toggle-related-file ()
+  "Jump between the current file and its related files of other kinds.
+
+This is the file-kinds generalization of
+`projectile-toggle-between-implementation-and-test'.  The current file's
+kind and resource key are detected from the project type's `:file-kinds'
+declaration and its related files (files of other kinds sharing the same
+key) are collected in table order.  When exactly one related kind exists
+it is opened immediately; when several exist the first invocation prompts
+for the kind, and repeated invocations cycle through them in table order."
+  (interactive)
+  (let ((file (buffer-file-name)))
+    (unless file
+      (user-error "The current buffer is not visiting a file"))
+    (let* ((project-root (projectile-acquire-root))
+           ;; Spell the file the same way as the root (symlink-resolved), so a
+           ;; project reached through a symlinked root doesn't yield a bogus
+           ;; `../'-prefixed relative name and a spurious "no related files".
+           (rel-path (projectile--project-relative-name (file-truename file) project-root))
+           (ring (projectile--related-file-ring rel-path))
+           (others (remove rel-path ring)))
+      (unless others
+        (user-error "No related files found for `%s'"
+                    (file-name-nondirectory file)))
+      (let ((target
+             (cond
+              ;; A single related kind: jump straight to it.
+              ((= (length others) 1) (car others))
+              ;; Repeated invocation: cycle to the next kind in table order.
+              ((eq last-command this-command)
+               (let ((pos (or (seq-position ring rel-path) 0)))
+                 (nth (mod (1+ pos) (length ring)) ring)))
+              ;; Several kinds, first invocation: let the user choose.
+              (t (projectile--read-related-file-target rel-path)))))
+        (find-file (expand-file-name target project-root))))))
+
+(defun projectile-test-file-p (file)
+  "Check if FILE is a test file."
+  (let ((kinds (projectile--related-files-kinds file)))
+    (cond ((member :impl kinds) t)
+          ((member :test kinds) nil)
+          (t (or (seq-some (lambda (pat) (string-prefix-p pat (file-name-nondirectory file)))
+                          (delq nil (list (funcall projectile-test-prefix-function (projectile-project-type)))))
+                 (seq-some (lambda (pat) (string-suffix-p pat (file-name-sans-extension (file-name-nondirectory file))))
+                          (delq nil (list (funcall projectile-test-suffix-function (projectile-project-type))))))))))
+
+(defun projectile-current-project-test-files ()
+  "Return a list of test files for the current project."
+  (projectile-test-files (projectile-current-project-files)))
+
+;;; Project types
+;;
+;; What a project type is - a set of markers that recognise it plus the
+;; commands and conventions that follow - and the machinery for declaring
+;; one.  The types Projectile ships with are registered further down, in
+;; their own section.
+
+
+(defvar projectile-project-types nil
+  "An alist holding all project types that are known to Projectile.
+The project types are symbols and they are linked to plists holding
+the properties of the various project types.")
+
+(defun projectile--combine-plists (&rest plists)
+  "Create a single property list from all plists in PLISTS.
+The process starts by copying the first list, and then setting properties
+from the other lists.  Settings in the last list are the most significant
+ones and overrule settings in the other lists."
+  (let ((rtn (copy-sequence (pop plists)))
+        p v ls)
+    (while plists
+      (setq ls (pop plists))
+      (while ls
+        (setq p (pop ls) v (pop ls))
+        (setq rtn (plist-put rtn p v))))
+    rtn))
+
+(defun projectile--any-marker-p (marker)
+  "Return non-nil when MARKER is an alternatives clause.
+Such a clause has the form (:any FILE...) and is satisfied by any one
+of its FILEs; see `projectile-register-project-type'."
+  (and (consp marker) (eq (car marker) :any)))
+
+(defun projectile--marker-clauses (marker-files)
+  "Return MARKER-FILES as a plain list of alternative-lists.
+
+A marker specification mixes two shapes - a bare file name and an
+\\(:any FILE...) clause - and every consumer used to take that apart for
+itself, which is how the project-file derivation came to understand a
+clause only in the first position.  This is the one place that knows the
+shapes: it answers with a list whose every element is a list of names,
+any one of which satisfies that position.
+
+Returns nil for a predicate marker, which has no file names to give."
+  (unless (functionp marker-files)
+    (mapcar (lambda (clause)
+              (if (projectile--any-marker-p clause)
+                  (cdr clause)
+                (list clause)))
+            (ensure-list marker-files))))
+
+(cl-defun projectile--build-project-plist
+    (marker-files &key project-file compilation-dir configure compile install package test run test-suffix test-prefix src-dir test-dir src-extension test-extension related-files-fn file-kinds tasks)
+  "Return a project type plist built from MARKER-FILES and the keyword arguments.
+
+This is the shape a registered project type takes; the arguments, and what
+each of them means, are documented on `projectile-register-project-type',
+which is the entry point users call and where the description belongs.
+Both take the same keywords, so keeping a second copy here only bought two
+descriptions that could disagree - and by the time this was written, they
+already did."
+  ;; When PROJECT-FILE isn't given explicitly, derive it from the first
+  ;; marker file - that's the project's primary manifest in every
+  ;; file-based registration, so callers needn't repeat it.  Function
+  ;; markers (a symbol or lambda) have no list to derive from.  Passing
+  ;; the symbol `none' opts out of both the derivation and the root-file
+  ;; seeding below, for types (e.g. bloop) whose only marker also shows
+  ;; up outside real projects and so must not anchor a project root.
+  (let* ((project-file
+          (cond ((eq project-file 'none) nil)
+                ;; An alternatives clause is a marker shape, so accept it
+                ;; here too and keep the plain list of names the rest of
+                ;; the code expects.
+                ((projectile--any-marker-p project-file) (cdr project-file))
+                (project-file project-file)
+                ;; Otherwise the first marker position is the project file -
+                ;; all of its alternatives, so each can anchor a root.
+                (t (let ((first (car (projectile--marker-clauses marker-files))))
+                     (cond ((null first) nil)
+                           ((cdr first) first)
+                           ((stringp (car first)) (car first)))))))
+         (project-plist (list 'marker-files marker-files
+                              'project-file project-file
+                              'compilation-dir compilation-dir
+                              'configure-command configure
+                              'compile-command compile
+                              'test-command test
+                              'install-command install
+                              'package-command package
+                              'run-command run))
+         (project-files (if (listp project-file)
+                            project-file
+                          (list project-file))))
+    (dolist (project-file project-files)
+      (when (and project-file (not (member project-file projectile-project-root-files)))
+        (add-to-list 'projectile-project-root-files project-file)))
+    (when test-suffix
+      (plist-put project-plist 'test-suffix test-suffix))
+    (when test-prefix
+      (plist-put project-plist 'test-prefix test-prefix))
+    (when src-dir
+      (plist-put project-plist 'src-dir src-dir))
+    (when test-dir
+      (plist-put project-plist 'test-dir test-dir))
+    (when src-extension
+      (plist-put project-plist 'src-extension src-extension))
+    (when test-extension
+      (plist-put project-plist 'test-extension test-extension))
+    (when related-files-fn
+      (plist-put project-plist 'related-files-fn related-files-fn))
+    (when file-kinds
+      (plist-put project-plist 'file-kinds file-kinds))
+    (when tasks
+      (plist-put project-plist 'tasks tasks))
+    project-plist))
+
+(cl-defun projectile-register-project-type
+    (project-type marker-files &key project-file compilation-dir configure compile install package test run test-suffix test-prefix src-dir test-dir src-extension test-extension related-files-fn file-kinds tasks)
+  "Register a project type with projectile.
+
+A project type is defined by PROJECT-TYPE, a set of MARKER-FILES,
+and optional keyword arguments.
+
+MARKER-FILES is either a list of files or a predicate function.  When it
+is a list, ALL of the listed files must be present in the project root for
+the type to match (logical AND) - so a single-file marker like `(\"Foo\")'
+is the common case.  A list element may itself be an alternatives clause
+of the form (:any FILE...), which is satisfied when any one of its FILEs
+is present, so `((:any \"build.gradle\" \"build.gradle.kts\"))' matches a
+project with either of them.  For anything more involved, don't pass a
+list; use a predicate function instead.  The predicate is called with the
+project root as its single argument and should return non-nil when the
+project is of this type.
+
+The optional keyword arguments are:
+PROJECT-FILE the main project file in the root project directory.  It may be a
+             single file or a list of possible files.  When omitted it
+             defaults to the first marker file, or to all the alternatives
+             of the first marker clause.  Pass the symbol `none'
+             to opt out, so the type is detected but contributes no
+             project-root marker (e.g. when its marker also appears
+             outside real projects).
+COMPILATION-DIR the directory to run the tests- and compilations in,
+CONFIGURE which specifies a command that configures the project
+          `%s' in the command will be substituted with (projectile-project-root)
+          before the command is run,
+COMPILE which specifies a command that builds the project,
+INSTALL which specifies a command to install the project.
+PACKAGE which specifies a command to package the project.
+TEST which specifies a command that tests the project,
+RUN which specifies a command that runs the project,
+TEST-SUFFIX which specifies test file suffix, and
+TEST-PREFIX which specifies test file prefix.
+SRC-DIR which specifies the path to the source relative to the project root.
+TEST-DIR which specifies the path to the tests relative to the project root.
+SRC-EXTENSION which specifies the file extension implementation files use,
+    when it differs from the one their tests use.
+TEST-EXTENSION which specifies the file extension test files use, when it
+    differs from the implementation's (Elixir tests are scripts: `foo.ex\\='
+    is tested by `foo_test.exs\\=').
+RELATED-FILES-FN which specifies a custom function to find the related
+files such as test/impl/other files as below:
+    CUSTOM-FUNCTION accepts FILE as relative path from the project root and
+    returns a plist containing :test, :impl or :other as key and the
+    relative path/paths or predicate as value.  PREDICATE accepts a
+    relative path as the input.
+FILE-KINDS an alist of (KIND . SPEC) declaratively describing the kinds of
+    files the project type has (e.g. Rails models, controllers and views),
+    used by `projectile-find-file-of-kind' and
+    `projectile-toggle-related-file'.  KIND is a keyword and SPEC is a plist;
+    see `projectile--file-kinds-related-files-fn' for the supported
+    properties.  When both FILE-KINDS and RELATED-FILES-FN are set they are
+    combined, so declarative and hand-written relations coexist.
+TASKS an alist of named tasks of the form (TASK-NAME . COMMAND) run via
+    `projectile-run-task'; see `projectile-tasks' for the exact shape.
+
+All command strings (CONFIGURE, COMPILE, INSTALL, PACKAGE, TEST, RUN,
+and TASKS commands) support `%p' as a placeholder that will be replaced
+with the project name at execution time."
+  (setq projectile-project-types
+        (cons `(,project-type .
+                              ,(projectile--build-project-plist
+                                marker-files
+                                :project-file project-file
+                                :compilation-dir compilation-dir
+                                :configure configure
+                                :compile compile
+                                :install install
+                                :package package
+                                :test test
+                                :run run
+                                :test-suffix test-suffix
+                                :test-prefix test-prefix
+                                :src-dir src-dir
+                                :test-dir test-dir
+                                :src-extension src-extension
+                                :test-extension test-extension
+                                :related-files-fn related-files-fn
+                                :file-kinds file-kinds
+                                :tasks tasks))
+              projectile-project-types)))
+
+(cl-defun projectile-update-project-type
+    (project-type
+     &key precedence
+     (marker-files nil marker-files-specified)
+     (project-file nil project-file-specified)
+     (compilation-dir nil compilation-dir-specified)
+     (configure nil configure-specified)
+     (compile nil compile-specified)
+     (install nil install-specified)
+     (package nil package-specified)
+     (test nil test-specified)
+     (run nil run-specified)
+     (test-suffix nil test-suffix-specified)
+     (test-prefix nil test-prefix-specified)
+     (src-dir nil src-dir-specified)
+     (test-dir nil test-dir-specified)
+     (src-extension nil src-extension-specified)
+     (test-extension nil test-extension-specified)
+     (related-files-fn nil related-files-fn-specified)
+     (file-kinds nil file-kinds-specified)
+     (tasks nil tasks-specified))
+    "Update an existing projectile project type.
+
+Passed items will override existing values for the project type given
+by PROJECT-TYPE.  nil can be used to remove a project type attribute.
+Raise an error if PROJECT-TYPE is not already registered with
+projectile.  This function may also take the keyword argument
+PRECEDENCE which when set to `high' will make projectile prioritise
+this project type over other clashing project types, and a value of
+`low' will make projectile prefer (all) other project types by
+default.
+
+The remaining arguments - MARKER-FILES and the optional keyword
+arguments - have the same meaning as for
+`projectile-register-project-type', which see."
+    (let* ((existing-project-plist
+            (or (seq-find
+                 (lambda (p) (eq project-type (car p))) projectile-project-types)
+                (error "No existing project found for: %s" project-type)))
+           (new-plist
+            (append
+             (when marker-files-specified `(marker-files ,marker-files))
+             (when project-file-specified `(project-file ,project-file))
+             (when compilation-dir-specified `(compilation-dir ,compilation-dir))
+             (when configure-specified `(configure-command ,configure))
+             (when compile-specified `(compile-command ,compile))
+             (when test-specified `(test-command ,test))
+             (when install-specified `(install-command ,install))
+             (when package-specified `(package-command ,package))
+             (when run-specified `(run-command ,run))
+             (when test-suffix-specified `(test-suffix ,test-suffix))
+             (when test-prefix-specified `(test-prefix ,test-prefix))
+             (when src-dir-specified `(src-dir ,src-dir))
+             (when test-dir-specified `(test-dir ,test-dir))
+             (when src-extension-specified `(src-extension ,src-extension))
+             (when test-extension-specified `(test-extension ,test-extension))
+             (when related-files-fn-specified
+               `(related-files-fn ,related-files-fn))
+             (when file-kinds-specified `(file-kinds ,file-kinds))
+             (when tasks-specified `(tasks ,tasks))))
+           (merged-plist
+            (projectile--combine-plists
+             (cdr existing-project-plist) new-plist))
+           (project-type-elt (cons project-type merged-plist)))
+      (cl-flet* ((project-filter (p) (eq project-type (car p)))
+                 (project-map (p) (if (project-filter p) project-type-elt p)))
+        (setq projectile-project-types
+              (if precedence
+                  (let ((filtered-types
+                       (seq-remove #'project-filter projectile-project-types)))
+                    (setq projectile-project-type-cache (make-hash-table :test 'equal))
+                    (cond ((eq precedence 'high)
+                           (cons project-type-elt filtered-types))
+                          ((eq precedence 'low)
+                           (append filtered-types (list project-type-elt)))
+                          (t (error "Precedence must be one of '(high low)"))))
+                (mapcar #'project-map projectile-project-types))))))
+
+(defun projectile-remove-project-type (project-type)
+  "Remove PROJECT-TYPE from the list of registered project types.
+
+This is the supported way to stop Projectile from auto-detecting a
+project type.  Clearing the type's marker files instead does not work:
+an empty marker set is vacuously satisfied, so the type would match
+every project rather than none.
+
+Raise an error if PROJECT-TYPE is not currently registered.  The project
+type cache is reset so the change takes effect immediately."
+  (unless (seq-find (lambda (p) (eq project-type (car p)))
+                    projectile-project-types)
+    (error "No existing project found for: %s" project-type))
+  (setq projectile-project-types
+        (seq-remove (lambda (p) (eq project-type (car p)))
+                    projectile-project-types))
+  (setq projectile-project-type-cache (make-hash-table :test 'equal)))
+
+(defun projectile-eldev-project-p (&optional dir)
+  "Check if a project contains eldev files.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project."
+  (or (projectile-verify-file "Eldev" dir)
+      (projectile-verify-file "Eldev-local" dir)))
+
+(defun projectile-expand-file-name-wildcard (name-pattern dir)
+  "Expand the maybe-wildcard-containing NAME-PATTERN in DIR.
+If there are results expanding a wildcard, get the first result,
+otherwise expand NAME-PATTERN in DIR ignoring wildcards."
+  (let ((expanded (expand-file-name name-pattern dir)))
+    (or (if (string-match-p "[[*?]" name-pattern)
+            (car
+             (ignore-errors (file-expand-wildcards expanded))))
+        expanded)))
+
+(defun projectile-cabal-project-p (&optional dir)
+  "Check if a project contains *.cabal files but no stack.yaml file.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project."
+  (and (projectile-verify-file-wildcard "?*.cabal" dir)
+       (not (projectile-verify-file "stack.yaml" dir))))
+
+(defun projectile-dotnet-project-p (&optional dir)
+  "Check if a project contains a .NET project marker.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project."
+  (or (projectile-verify-file-wildcard "?*.csproj" dir)
+      (projectile-verify-file-wildcard "?*.fsproj" dir)))
+
+(defun projectile-dotnet-sln-project-p (&optional dir)
+  "Check if a project contains a .NET solution project marker.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project."
+  (or (projectile-verify-file-wildcard "?*.sln" dir)
+      (projectile-verify-file-wildcard "?*.slnx" dir)))
+
+(defun projectile-go-project-p (&optional dir)
+  "Check if a project contains Go source files.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project."
+  (or (projectile-verify-file "go.mod" dir)
+      (projectile-verify-file-wildcard "*.go" dir)))
+
+(defun projectile-make-project-p (&optional dir)
+  "Check if a project contains a Makefile.
+Both `Makefile' and the lowercase `makefile' GNU make also reads are
+recognized.  When DIR is specified it checks DIR's project, otherwise
+it acts on the current project."
+  (or (projectile-verify-file "Makefile" dir)
+      (projectile-verify-file "makefile" dir)))
+
+(defun projectile-mill-project-p (&optional dir)
+  "Check if a project contains a mill build file.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project."
+  (or (projectile-verify-file "build.mill" dir)
+      (projectile-verify-file "build.sc" dir)))
+
+;; Remove in 4.0.  The only project type with a detection hook of its own,
+;; and only read when the `go' type was registered as this file loaded.
+;; Re-registering the type is how every other type is customized.
+(defvar projectile-go-project-test-function #'projectile-go-project-p
+  "Function to determine if project's type is go.")
+(make-obsolete-variable 'projectile-go-project-test-function
+                        "re-register the `go' project type with your own predicate instead."
+                        "3.4.0")
+
+(defun projectile-terraform-project-p (&optional dir)
+  "Check if a project contains Terraform configuration files.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project."
+  (projectile-verify-file-wildcard "?*.tf" dir))
+
+(defun projectile-xcode-project-p (&optional dir)
+  "Check if a project contains an Xcode project or workspace.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project."
+  (or (projectile-verify-file-wildcard "?*.xcworkspace" dir)
+      (projectile-verify-file-wildcard "?*.xcodeproj" dir)))
+
+(defun projectile-flutter-project-p (&optional dir)
+  "Check if a project is a Flutter project.
+That's a Dart project whose `pubspec.yaml' depends on the Flutter SDK.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project."
+  (let ((pubspec (projectile-expand-root "pubspec.yaml" dir)))
+    (and (projectile-file-exists-p pubspec)
+         (with-temp-buffer
+           (insert-file-contents pubspec)
+           (and (re-search-forward "^[ \t]*sdk:[ \t]*flutter[ \t]*$" nil t) t)))))
+
+(defun projectile-nimble-project-p (&optional dir)
+  "Check if a project contains a Nimble project marker.
+Nim projects that use Nimble contain a <projectname>.nimble file.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project."
+  (projectile-verify-file-wildcard "?*.nimble" dir))
+
+;;;; Constant signifying opting out of CMake preset commands.
+(defconst projectile--cmake-no-preset "*no preset*")
+
+(defun projectile--cmake-version ()
+  "Compute CMake version."
+  (let* ((string (shell-command-to-string "cmake --version"))
+         (match (string-match "^cmake version \\([0-9]+\\.[0-9]+\\.[0-9]+\\).*$" string)))
+    (when match
+      (version-to-list (match-string 1 string)))))
+
+(defun projectile--cmake-check-version (version)
+  "Check if CMake version is at least VERSION."
+  (and
+   (version-list-<= version (projectile--cmake-version))))
+
+(defconst projectile--cmake-command-presets-minimum-version-alist
+  '((:configure-command . (3 19))
+    (:compile-command . (3 20))
+    (:test-command . (3 20))
+    (:package-command . (3 19))
+    (:install-command . (3 20))))
+
+(defun projectile--cmake-command-presets-supported (command-type)
+  "Check if CMake supports presets for COMMAND-TYPE."
+  (let ((minimum-version
+         (alist-get command-type projectile--cmake-command-presets-minimum-version-alist)))
+    (projectile--cmake-check-version minimum-version)))
+
+(defun projectile--cmake-read-preset (filename)
+  "Read CMake preset from FILENAME."
+  (projectile--read-json-file filename :array-type 'list))
+
+(defconst projectile--cmake-command-preset-array-id-alist
+  '((:configure-command . "configurePresets")
+    (:compile-command . "buildPresets")
+    (:test-command . "testPresets")
+    (:package-command . "packagePresets")
+    (:install-command . "buildPresets")))
+
+(defun projectile--cmake-command-preset-array-id (command-type)
+  "Map from COMMAND-TYPE to id of command preset array in CMake preset."
+  (alist-get command-type projectile--cmake-command-preset-array-id-alist))
+
+(defun projectile--cmake-command-presets-shallow (filename command-type)
+  "Get CMake COMMAND-TYPE presets from FILENAME."
+  (when-let* ((preset (projectile--cmake-read-preset (projectile-expand-root filename))))
+    (seq-remove
+     (lambda (preset) (equal (gethash "hidden" preset) t))
+     (gethash (projectile--cmake-command-preset-array-id command-type) preset))))
+
+(defun projectile--cmake-command-presets (filename command-type)
+  "Get CMake COMMAND-TYPE presets from FILENAME.  Follows included files."
+  ;; Anchor FILENAME to the project root before taking its directory:
+  ;; the top-level call passes a relative name, whose `file-name-directory'
+  ;; is nil, and included files must resolve relative to the file that
+  ;; includes them - not to `default-directory'.
+  (let ((filename (projectile-expand-root filename)))
+    (when-let* ((preset (projectile--cmake-read-preset filename)))
+      (append
+       (projectile--cmake-command-presets-shallow filename command-type)
+       (mapcan
+        (lambda (included-file) (projectile--cmake-command-presets
+                                 (expand-file-name included-file (file-name-directory filename))
+                                 command-type))
+        (gethash "include" preset))))))
+
+(defun projectile--cmake-all-command-presets (command-type)
+  "Get CMake user and system COMMAND-TYPE presets."
+  (flatten-tree
+   (mapcar (lambda (filename) (projectile--cmake-command-presets filename command-type))
+           '("CMakeUserPresets.json" "CMakePresets.json"))))
+
+(defun projectile--cmake-command-preset-names (command-type)
+  "Get names of CMake user and system COMMAND-TYPE presets."
+  (mapcar (lambda (preset)
+            (gethash "name" preset))
+          (projectile--cmake-all-command-presets command-type)))
+
+(defcustom projectile-enable-cmake-presets nil
+  "Whether CMake projects use presets for their lifecycle commands.
+
+When non-nil, CMake projects are configured, built and tested through
+the presets their `CMakePresets.json' and `CMakeUserPresets.json'
+declare, rather than through Projectile's own default commands."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "2.4.0"))
+
+(defun projectile--cmake-use-command-presets (command-type)
+  "Test whether or not to use command presets for COMMAND-TYPE.
+
+Presets are used if `projectile-enable-cmake-presets' is non-nil, and CMake
+supports presets for COMMAND-TYPE, and `json-parse-buffer' is available."
+  (and projectile-enable-cmake-presets
+       (projectile--cmake-command-presets-supported command-type)
+       (functionp 'json-parse-buffer)))
+
+(defun projectile--cmake-select-command (command-type)
+  "Select a CMake command preset or a manual CMake command.
+
+The selection is done like this:
+
+- If `projectile--cmake-use-commands-presets' for COMMAND-TYPE returns true, and
+there is at least one preset available for COMMAND-TYPE, the user is prompted to
+select a name of a command preset, or opt a manual command by selecting
+`projectile--cmake-no-preset'.
+
+- Else `projectile--cmake-no-preset' is used."
+  (if-let* ((use-presets (projectile--cmake-use-command-presets command-type))
+           (preset-names (projectile--cmake-command-preset-names command-type)))
+      (projectile-completing-read
+       "Use preset: "
+       (append preset-names `(,projectile--cmake-no-preset))
+       :caller nil)
+    projectile--cmake-no-preset))
+
+(defconst projectile--cmake-manual-command-alist
+  '((:configure-command . "cmake -S . -B build")
+    (:compile-command . "cmake --build build")
+    (:test-command . "cmake --build build --target test")
+    (:package-command . "cmake --build build --target package")
+    (:install-command . "cmake --build build --target install")))
+
+(defun projectile--cmake-manual-command (command-type)
+  "Create manual CMake COMMAND-TYPE command."
+  (alist-get command-type projectile--cmake-manual-command-alist))
+
+(defconst projectile--cmake-preset-command-alist
+  '((:configure-command . "cmake . --preset %s")
+    (:compile-command . "cmake --build --preset %s")
+    (:test-command . "ctest --preset %s")
+    (:package-command . "cpack --preset %s")
+    (:install-command . "cmake --build --preset %s --target install")))
+
+(defun projectile--cmake-preset-command (command-type preset)
+  "Create CMake COMMAND-TYPE command using PRESET."
+  (format (alist-get command-type projectile--cmake-preset-command-alist) preset))
+
+(defun projectile--cmake-command (command-type)
+  "Create a CMake COMMAND-TYPE command.
+
+The command is created like this:
+
+- If `projectile--cmake-select-command' returns `projectile--cmake-no-preset'
+a manual COMMAND-TYPE command is created with
+`projectile--cmake-manual-command'.
+
+- Else a preset COMMAND-TYPE command using the selected preset is created with
+`projectile--cmake-preset-command'."
+  (let ((maybe-preset (projectile--cmake-select-command command-type)))
+    (if (equal maybe-preset projectile--cmake-no-preset)
+        (projectile--cmake-manual-command command-type)
+      (projectile--cmake-preset-command command-type maybe-preset))))
+
+(defun projectile--cmake-configure-command ()
+  "CMake configure command."
+  (projectile--cmake-command :configure-command))
+
+(defun projectile--cmake-compile-command ()
+  "CMake compile command."
+  (projectile--cmake-command :compile-command))
+
+(defun projectile--cmake-test-command ()
+  "CMake test command."
+  (projectile--cmake-command :test-command))
+
+(defun projectile--cmake-install-command ()
+  "CMake install command."
+  (projectile--cmake-command :install-command))
+
+(defun projectile--cmake-package-command ()
+  "CMake package command."
+  (projectile--cmake-command :package-command))
+
+(defconst projectile--justfile-names '("justfile" ".justfile" "Justfile")
+  "The file names `just' reads its recipes from.")
+
+(defconst projectile--taskfile-names
+  '("Taskfile.yml" "Taskfile.yaml" "Taskfile.dist.yml" "Taskfile.dist.yaml")
+  "The file names go-task reads its tasks from.")
+
+(defconst projectile--makefile-names '("Makefile" "makefile" "GNUmakefile")
+  "The file names GNU make reads its targets from.")
+
+(defconst projectile--rakefile-names
+  '("Rakefile" "rakefile" "Rakefile.rb" "rakefile.rb")
+  "The file names rake accepts as a project's main task file.")
+
+(defconst projectile--rake-task-directories '("rakelib" "tasks" "lib/tasks")
+  "Directories a project keeps its extra `.rake' files in.
+`rakelib' is rake's own convention, `lib/tasks' is Rails\\='s, and
+`tasks' is what a lot of gems use.")
+
+(defconst projectile--deno-config-names '("deno.json" "deno.jsonc")
+  "The file names Deno reads its configuration from.")
+
+(defconst projectile--bun-lock-names '("bun.lock" "bun.lockb")
+  "The lock file names Bun writes - the text one and the older binary one.")
+
+;;; The project types Projectile ships with
+;;
+;; Project type detection happens in a reverse order with respect to
+;; project type registration (invocations of `projectile-register-project-type').
+;;
+;; As function-based project type detection is pretty slow, it
+;; should be tried at the end if everything else failed (meaning here
+;; it should be listed first).
+;;
+;; Ideally common project types should be checked earlier than exotic ones.
+
+;; Function-based detection project type
+(projectile-register-project-type 'haskell-cabal #'projectile-cabal-project-p
+                                  :compile "cabal build"
+                                  :test "cabal test"
+                                  :run "cabal run"
+                                  :test-suffix "Spec")
+(projectile-register-project-type 'dotnet #'projectile-dotnet-project-p
+                                  :project-file '("?*.csproj" "?*.fsproj")
+                                  :compile "dotnet build"
+                                  :run "dotnet run"
+                                  :test "dotnet test")
+(projectile-register-project-type 'dotnet-sln #'projectile-dotnet-sln-project-p
+                                  :project-file '("?*.sln" "?*.slnx")
+                                  :compile "dotnet build"
+                                  :run "dotnet run"
+                                  :test "dotnet test")
+(projectile-register-project-type 'terraform #'projectile-terraform-project-p
+                                  :project-file "?*.tf"
+                                  :configure "terraform init"
+                                  :compile "terraform plan"
+                                  :run "terraform apply"
+                                  :test "terraform validate")
+(projectile-register-project-type 'xcode #'projectile-xcode-project-p
+                                  :project-file '("?*.xcworkspace" "?*.xcodeproj")
+                                  :compile "xcodebuild build"
+                                  :test "xcodebuild test")
+(projectile-register-project-type 'nim-nimble #'projectile-nimble-project-p
+                                  :project-file "?*.nimble"
+                                  :compile "nimble --noColor build --colors:off"
+                                  :install "nimble --noColor install --colors:off"
+                                  :test "nimble --noColor test -d:nimUnittestColor:off --colors:off"
+                                  :run "nimble --noColor run --colors:off"
+                                  :src-dir "src"
+                                  :test-dir "tests")
+;; File-based detection project types
+
+;; Infrastructure as code
+;;
+;; These are registered first, and so checked last: a repository that
+;; deploys itself with Helm or Compose is usually some other kind of
+;; project first, and only falls back to these when nothing else matched.
+(projectile-register-project-type 'docker-compose
+                                  '((:any "compose.yaml" "compose.yml"
+                                          "docker-compose.yaml" "docker-compose.yml"))
+                                  :compile "docker compose build"
+                                  :run "docker compose up")
+(projectile-register-project-type 'ansible '("ansible.cfg")
+                                  :test "ansible-lint")
+(projectile-register-project-type 'helm '("Chart.yaml")
+                                  :compile "helm template ."
+                                  :install "helm install"
+                                  :test "helm lint")
+(projectile-register-project-type 'pulumi '("Pulumi.yaml")
+                                  :compile "pulumi preview"
+                                  :run "pulumi up")
+
+;; Generic task runners
+;;
+;; Like the infrastructure types these are a fallback: a justfile or a
+;; mise config usually sits next to a project's real build tool, which
+;; should win.
+(projectile-register-project-type 'mise '((:any "mise.toml" ".mise.toml"))
+                                  :compile "mise run build"
+                                  :test "mise run test")
+(projectile-register-project-type 'just `((:any ,@projectile--justfile-names))
+                                  :compile "just build"
+                                  :test "just test")
+
+;; Universal
+(projectile-register-project-type 'xmake '("xmake.lua")
+                                  :compile "xmake build"
+                                  :test "xmake test"
+                                  :run "xmake run"
+                                  :install "xmake install")
+(projectile-register-project-type 'scons '("SConstruct")
+                                  :compile "scons"
+                                  :test "scons test"
+                                  :test-suffix "test")
+(projectile-register-project-type 'meson '("meson.build")
+                                  :compilation-dir "build"
+                                  :configure "meson %s"
+                                  :compile "ninja"
+                                  :test "ninja test")
+(projectile-register-project-type 'nix '("default.nix")
+                                  :compile "nix-build"
+                                  :test "nix-build")
+(projectile-register-project-type 'nix-flake '("flake.nix")
+                                  :compile "nix build"
+                                  :test "nix flake check"
+                                  :run "nix run")
+;; `MODULE.bazel' is what Bazel 8+ uses by default (bzlmod); `WORKSPACE'
+;; and `WORKSPACE.bazel' are the older, now removed, dependency model.
+(projectile-register-project-type 'bazel '((:any "MODULE.bazel" "WORKSPACE" "WORKSPACE.bazel"))
+                                  :compile "bazel build //..."
+                                  :test "bazel test //..."
+                                  :run "bazel run")
+(projectile-register-project-type 'buck2 '(".buckconfig")
+                                  :compile "buck2 build //..."
+                                  :test "buck2 test //...")
+(projectile-register-project-type 'pants '("pants.toml")
+                                  :compile "pants package ::"
+                                  :test "pants test ::")
+(projectile-register-project-type 'debian '("debian/control")
+                                  :compile "debuild -uc -us")
+
+;; Make & CMake
+;; The Makefile/makefile alternatives predate the `(:any ...)' marker
+;; clause and still go through a predicate, since that predicate is part
+;; of the public API.  The explicit :project-file keeps "Makefile"
+;; registered as a root file, as the marker list used to do.
+(projectile-register-project-type 'make #'projectile-make-project-p
+                                  :project-file "Makefile"
+                                  :compile "make"
+                                  :test "make test"
+                                  :install "make install")
+(projectile-register-project-type 'gnumake '("GNUmakefile")
+                                  :compile "make"
+                                  :test "make test"
+                                  :install "make install")
+(projectile-register-project-type 'cmake '("CMakeLists.txt")
+                                  :configure #'projectile--cmake-configure-command
+                                  :compile #'projectile--cmake-compile-command
+                                  :test #'projectile--cmake-test-command
+                                  :install #'projectile--cmake-install-command
+                                  :package #'projectile--cmake-package-command)
+;; go-task/task
+(projectile-register-project-type 'go-task `((:any ,@projectile--taskfile-names))
+                                  :compile "task build"
+                                  :test "task test"
+                                  :install "task install")
+;; Go should take higher precedence than Make because Go projects often have a Makefile.
+(projectile-register-project-type 'go #'projectile-go-project-p
+                                  ;; The type is detected by predicate (a
+                                  ;; project can be Go without a go.mod), but
+                                  ;; the module file is still what marks a Go
+                                  ;; project's root - and its subprojects.
+                                  :project-file "go.mod"
+                                  :compile "go build"
+                                  :test "go test ./..."
+                                  :test-suffix "_test")
+;; Erlang & Elixir
+(projectile-register-project-type 'rebar '("rebar.config")
+                                  :compile "rebar3 compile"
+                                  :test "rebar3 do eunit,ct"
+                                  :run "rebar3 shell"
+                                  :install "rebar3 release"
+                                  :package "rebar3 tar"
+                                  :src-dir "src/"
+                                  :test-dir "test/"
+                                  :test-suffix "_SUITE")
+;; erlang.mk is the other common Erlang build tool; it drives everything
+;; through make, so the commands are make targets.
+(projectile-register-project-type 'erlang-mk '("erlang.mk")
+                                  :compile "make"
+                                  :test "make tests"
+                                  :run "make run"
+                                  :src-dir "src/"
+                                  :test-dir "test/"
+                                  :test-suffix "_SUITE")
+(projectile-register-project-type 'elixir '("mix.exs")
+                                  :file-kinds projectile--phoenix-file-kinds
+                                  :compile "mix compile"
+                                  :src-dir "lib/"
+                                  :test "mix test"
+                                  :test-suffix "_test"
+                                  ;; ExUnit tests are scripts, so `lib/foo.ex'
+                                  ;; is tested by `test/foo_test.exs'.
+                                  :src-extension "ex"
+                                  :test-extension "exs")
+;; Gleam
+(projectile-register-project-type 'gleam '("gleam.toml")
+                                  :compile "gleam build"
+                                  :test "gleam test"
+                                  :run "gleam run"
+                                  :src-dir "src/"
+                                  :test-dir "test/"
+                                  :test-suffix "_test")
+;; JavaScript
+;; A bare `package.json' with no lock file next to it is still a Node
+;; project - this is the fallback for all the more specific types below.
+(projectile-register-project-type 'node '("package.json")
+                                  :compile "npm install"
+                                  :test "npm test"
+                                  :run "npm start"
+                                  :test-suffix ".test")
+(projectile-register-project-type 'grunt '("Gruntfile.js")
+                                  :compile "grunt"
+                                  :test "grunt test")
+(projectile-register-project-type 'gulp '("gulpfile.js")
+                                  :compile "gulp"
+                                  :test "gulp test")
+(projectile-register-project-type 'npm '("package.json" "package-lock.json")
+                                  :compile "npm install && npm run build"
+                                  :test "npm test"
+                                  :test-suffix ".test")
+(projectile-register-project-type 'yarn '("package.json" "yarn.lock")
+                                  :compile "yarn && yarn build"
+                                  :test "yarn test"
+                                  :test-suffix ".test")
+(projectile-register-project-type 'pnpm '("package.json" "pnpm-lock.yaml")
+                                  :compile "pnpm install && pnpm build"
+                                  :test "pnpm test"
+                                  :test-suffix ".test")
+;; `bun.lockb' is the binary lock file Bun used before 1.2, `bun.lock' the
+;; text one it writes now.
+(projectile-register-project-type 'bun `("package.json" (:any ,@projectile--bun-lock-names))
+                                  :compile "bun install"
+                                  :test "bun test"
+                                  :run "bun run start"
+                                  :test-suffix ".test")
+(projectile-register-project-type 'deno `((:any ,@projectile--deno-config-names))
+                                  :compile "deno check ."
+                                  :test "deno test"
+                                  :run "deno task start"
+                                  :test-suffix "_test")
+;; Angular
+;; `angular.json' is Angular 6+, `.angular-cli.json' the older spelling -
+;; a project has one or the other, never both.
+(projectile-register-project-type 'angular '((:any "angular.json" ".angular-cli.json"))
+                                  :compile "ng build"
+                                  :run "ng serve"
+                                  :test "ng test"
+                                  :test-suffix ".spec")
+;; JavaScript monorepo tools, which sit on top of one of the package
+;; managers above and are what you actually build and test through.
+(projectile-register-project-type 'nextjs
+                                  '((:any "next.config.js" "next.config.mjs"
+                                          "next.config.ts"))
+                                  :compile "next build"
+                                  :test "npm test"
+                                  :run "next dev"
+                                  :test-suffix ".test"
+                                  :file-kinds projectile--nextjs-file-kinds)
+(projectile-register-project-type 'nx '("nx.json")
+                                  :compile "npx nx run-many -t build"
+                                  :test "npx nx run-many -t test"
+                                  :test-suffix ".spec")
+(projectile-register-project-type 'turborepo '("turbo.json")
+                                  :compile "turbo build"
+                                  :test "turbo test"
+                                  :test-suffix ".test")
+
+;; PHP
+;; Like Rails, these have to be registered after the JavaScript types -
+;; a PHP application ships a package.json for its front-end assets, which
+;; would otherwise make it a Node project.
+(projectile-register-project-type 'php-composer '("composer.json")
+                                  :compile "composer install"
+                                  :test "vendor/bin/phpunit"
+                                  :src-dir "src/"
+                                  :test-dir "tests/"
+                                  :test-suffix "Test")
+;; Symfony 3 dropped the `app' directory and moved the console to `bin',
+;; and `vendor' is only there once someone has run composer, so neither
+;; can be required.  The console is what tells a Symfony project apart
+;; from any other composer one.
+(projectile-register-project-type 'php-symfony '("composer.json" (:any "bin/console" "app/console"))
+                                  :compile "composer install"
+                                  :run "symfony serve"
+                                  :test "vendor/bin/phpunit"
+                                  :src-dir "src/"
+                                  :test-dir "tests/"
+                                  :test-suffix "Test")
+(projectile-register-project-type 'php-laravel '("composer.json" "artisan")
+                                  :file-kinds projectile--laravel-file-kinds
+                                  :compile "composer install"
+                                  :run "php artisan serve"
+                                  :test "php artisan test"
+                                  :src-dir "app/"
+                                  :test-dir "tests/"
+                                  :test-suffix "Test")
+
+;; Static site and documentation generators
+;; These come after the JavaScript types, as a site's asset pipeline
+;; often brings a package.json along.
+(projectile-register-project-type 'jekyll '("_config.yml")
+                                  :compile "bundle exec jekyll build"
+                                  :run "bundle exec jekyll serve")
+;; Zola's marker is a plain `config.toml', which is far too common a file
+;; name to let it anchor a project root on its own.
+(projectile-register-project-type 'zola '("config.toml" "content")
+                                  :project-file 'none
+                                  :compile "zola build"
+                                  :run "zola serve")
+(projectile-register-project-type 'hugo '((:any "hugo.toml" "hugo.yaml" "hugo.json"))
+                                  :compile "hugo"
+                                  :run "hugo server")
+(projectile-register-project-type 'mkdocs '("mkdocs.yml")
+                                  :compile "mkdocs build"
+                                  :run "mkdocs serve")
+(projectile-register-project-type 'quarto '("_quarto.yml")
+                                  :compile "quarto render"
+                                  :run "quarto preview")
+
+;; Python
+;;
+;; Nearly every Python project carries a `pyproject.toml' these days, and
+;; most carry a `requirements.txt' or a `setup.py' too, so the generic
+;; manifests are registered first (and thus checked last).  What tells
+;; the projects apart is the tool-specific lock file on top, and the
+;; framework beats the packaging tool.
+(projectile-register-project-type 'python-pip '("requirements.txt")
+                                  :compile "pip install -r requirements.txt"
+                                  :test "python -m unittest discover"
+                                  :test-prefix "test_"
+                                  :test-suffix "_test")
+(projectile-register-project-type 'python-pkg '("setup.py")
+                                  :compile "python -m build"
+                                  :test "python -m unittest discover"
+                                  :test-prefix "test_"
+                                  :test-suffix "_test")
+(projectile-register-project-type 'python-toml '("pyproject.toml")
+                                  :compile "python -m build"
+                                  :test "python -m unittest discover"
+                                  :test-prefix "test_"
+                                  :test-suffix "_test")
+(projectile-register-project-type 'python-tox '("tox.ini")
+                                  :compile "tox -r --notest"
+                                  :test "tox"
+                                  :test-prefix "test_"
+                                  :test-suffix "_test")
+(projectile-register-project-type 'python-pipenv '("Pipfile")
+                                  :compile "pipenv run build"
+                                  :test "pipenv run test"
+                                  :test-prefix "test_"
+                                  :test-suffix "_test")
+(projectile-register-project-type 'python-poetry '("poetry.lock")
+                                  :compile "poetry build"
+                                  :test "poetry run pytest"
+                                  :test-prefix "test_"
+                                  :test-suffix "_test")
+(projectile-register-project-type 'python-pdm '("pdm.lock")
+                                  :compile "pdm build"
+                                  :install "pdm install"
+                                  :test "pdm run pytest"
+                                  :test-prefix "test_"
+                                  :test-suffix "_test")
+(projectile-register-project-type 'python-uv '("uv.lock")
+                                  :compile "uv build"
+                                  :install "uv sync"
+                                  :test "uv run pytest"
+                                  :test-prefix "test_"
+                                  :test-suffix "_test")
+(projectile-register-project-type 'django '("manage.py")
+                                  :compile "python manage.py collectstatic"
+                                  :run "python manage.py runserver"
+                                  :test "python manage.py test"
+                                  :test-prefix "test_"
+                                  :test-suffix "_test"
+                                  :file-kinds projectile--django-file-kinds)
+;; Java & friends
+(projectile-register-project-type 'maven '("pom.xml")
+                                  :compile "mvn -B clean install"
+                                  :test "mvn -B test"
+                                  :test-suffix "Test"
+                                  :src-dir "src/main/"
+                                  :test-dir "src/test/")
+;; The Kotlin DSL (`.kts') is what new Gradle builds use, and the root of
+;; a multi-project build may carry only a settings file.
+(projectile-register-project-type 'gradle '((:any "build.gradle" "build.gradle.kts"
+                                                  "settings.gradle" "settings.gradle.kts"))
+                                  :compile "gradle build"
+                                  :test "gradle test"
+                                  :test-suffix "Spec")
+(projectile-register-project-type 'gradlew '("gradlew")
+                                  :compile "./gradlew build"
+                                  :test "./gradlew test"
+                                  :test-suffix "Spec")
+(projectile-register-project-type 'grails '("application.yml" "grails-app")
+                                  :compile "grails package"
+                                  :test "grails test-app"
+                                  :test-suffix "Spec")
+;; Scala
+(projectile-register-project-type 'sbt '("build.sbt")
+                                  :src-dir "main"
+                                  :test-dir "test"
+                                  :compile "sbt compile"
+                                  :test "sbt test"
+                                  :test-suffix "Spec")
+
+(projectile-register-project-type 'mill #'projectile-mill-project-p
+                                  :project-file '("build.sc" "build.mill")
+                                  :src-dir "src/"
+                                  :test-dir "test/src/"
+                                  :compile "mill __.compile"
+                                  :test "mill __.test"
+                                  :test-suffix "Test")
+
+;; Bloop drops a `.bloop/bloop.settings.json' in the project, but its
+;; server also keeps one in `$HOME', so the marker must not anchor a
+;; project root (see #1901) - only drive type detection.
+(projectile-register-project-type 'bloop '(".bloop/bloop.settings.json")
+                                  :project-file 'none
+                                  :compile "bloop compile root"
+                                  :test "bloop test --propagate --reporter scalac root"
+                                  :src-dir "src/main/"
+                                  :test-dir "src/test/"
+                                  :test-suffix "Spec")
+
+(projectile-register-project-type 'scala-cli '("project.scala")
+                                  :compile "scala-cli compile ."
+                                  :test "scala-cli test ."
+                                  :run "scala-cli run ."
+                                  :test-suffix "Test")
+
+;; Clojure
+(projectile-register-project-type 'lein-test '("project.clj")
+                                  :compile "lein compile"
+                                  :test "lein test"
+                                  :test-suffix "_test")
+(projectile-register-project-type 'lein-midje '("project.clj" ".midje.clj")
+                                  :compile "lein compile"
+                                  :test "lein midje"
+                                  :test-prefix "t_")
+(projectile-register-project-type 'boot-clj '("build.boot")
+                                  :compile "boot aot"
+                                  :test "boot test"
+                                  :test-suffix "_test")
+(projectile-register-project-type 'clojure-cli '("deps.edn")
+                                  :test-suffix "_test")
+;; Babashka's tasks are project-specific, so there are no commands to
+;; default to - `bb tasks' lists whatever a project defines.
+(projectile-register-project-type 'babashka '("bb.edn")
+                                  :src-dir "src/"
+                                  :test-dir "test/"
+                                  :test-suffix "_test")
+
+;; Ruby
+(projectile-register-project-type 'ruby-rspec '("Gemfile" "lib" "spec")
+                                  :compile "bundle exec rake"
+                                  :src-dir "lib/"
+                                  :test "bundle exec rspec"
+                                  :test-dir "spec/"
+                                  :test-suffix "_spec")
+(projectile-register-project-type 'ruby-test '("Gemfile" "lib" "test")
+                                  :compile "bundle exec rake"
+                                  :src-dir "lib/"
+                                  :test "bundle exec rake test"
+                                  :test-suffix "_test")
+;; Rails needs to be registered after npm, otherwise `package.json` makes it `npm`.
+;; https://github.com/bbatsov/projectile/pull/1191
+(projectile-register-project-type 'rails-test '("Gemfile" "app" "lib" "db" "config" "test")
+                                  :compile "bundle exec rake"
+                                  :run "bundle exec rails server"
+                                  :src-dir "app/"
+                                  :test "bundle exec rake test"
+                                  :test-suffix "_test"
+                                  :file-kinds projectile--rails-file-kinds)
+(projectile-register-project-type 'rails-rspec '("Gemfile" "app" "lib" "db" "config" "spec")
+                                  :compile "bundle exec rake"
+                                  :run "bundle exec rails server"
+                                  :src-dir "app/"
+                                  :test "bundle exec rspec"
+                                  :test-dir "spec/"
+                                  :test-suffix "_spec"
+                                  :file-kinds projectile--rails-file-kinds)
+;; Crystal
+(projectile-register-project-type 'crystal-spec '("shard.yml")
+                                  :src-dir "src/"
+                                  :test "crystal spec"
+                                  :test-dir "spec/"
+                                  :test-suffix "_spec")
+
+;; Emacs
+(projectile-register-project-type 'emacs-cask '("Cask")
+                                  :compile "cask install"
+                                  :test-prefix "test-"
+                                  :test-suffix "-test")
+
+(projectile-register-project-type 'emacs-eask '("Eask")
+                                  :compile "eask install"
+                                  :test "eask test"
+                                  :test-prefix "test-"
+                                  :test-suffix "-test")
+
+(projectile-register-project-type 'emacs-eldev #'projectile-eldev-project-p
+                                  :project-file "Eldev"
+                                  :compile "eldev compile"
+                                  :test "eldev test"
+                                  :run "eldev emacs"
+                                  :package "eldev package")
+
+;; R
+(projectile-register-project-type 'r '("DESCRIPTION")
+                                  :compile "R CMD INSTALL --with-keep.source ."
+                                  :test (concat "R CMD check -o " temporary-file-directory " ."))
+
+;; Haskell
+(projectile-register-project-type 'haskell-stack '("stack.yaml")
+                                  :compile "stack build"
+                                  :test "stack build --test"
+                                  :test-suffix "Spec")
+
+;; Rust
+(projectile-register-project-type 'rust-cargo '("Cargo.toml")
+                                  :compile "cargo build"
+                                  :test "cargo test"
+                                  :run "cargo run")
+
+;; Racket
+(projectile-register-project-type 'racket '("info.rkt")
+                                  :test "raco test ."
+                                  :install "raco pkg install"
+                                  :package "raco pkg create --source $(pwd)")
+
+;; Dart
+(projectile-register-project-type 'dart '("pubspec.yaml")
+                                  :compile "dart pub get"
+                                  :test "dart test"
+                                  :run "dart run"
+                                  :src-dir "lib/"
+                                  :test-dir "test/"
+                                  :test-suffix "_test.dart")
+
+;; Flutter projects are Dart projects, so this has to come after `dart'.
+(projectile-register-project-type 'flutter #'projectile-flutter-project-p
+                                  :project-file "pubspec.yaml"
+                                  :compile "flutter build"
+                                  :test "flutter test"
+                                  :run "flutter run"
+                                  :src-dir "lib/"
+                                  :test-dir "test/"
+                                  :test-suffix "_test")
+
+;; Elm
+(projectile-register-project-type 'elm '("elm.json")
+                                  :compile "elm make")
+
+;; Julia
+(projectile-register-project-type 'julia '("Project.toml")
+                                  :compile "julia --project=@. -e 'import Pkg; Pkg.precompile(); Pkg.build()'"
+                                  :test "julia --project=@. -e 'import Pkg; Pkg.test()' --check-bounds=yes"
+                                  :src-dir "src"
+                                  :test-dir "test")
+
+;; OCaml
+(projectile-register-project-type 'ocaml-dune '("dune-project")
+                                  :compile "dune build"
+                                  :test "dune runtest"
+                                  :run "dune exec"
+                                  :install "dune install"
+                                  :package "dune build @install"
+                                  :src-dir "lib/"
+                                  :test-dir "test/")
+
+;; Zig
+;; `build.zig' is the build script; `build.zig.zon' only shows up once a
+;; project declares dependencies or a package name.
+(projectile-register-project-type 'zig '((:any "build.zig" "build.zig.zon"))
+                                  :compile "zig build"
+                                  :test "zig build test"
+                                  :run "zig build run")
+
+;; Swift
+(projectile-register-project-type 'swift-spm '("Package.swift")
+                                  :compile "swift build"
+                                  :test "swift test"
+                                  :run "swift run")
+
+;; D
+(projectile-register-project-type 'dub '((:any "dub.json" "dub.sdl"))
+                                  :compile "dub build"
+                                  :test "dub test"
+                                  :run "dub run"
+                                  :src-dir "source/")
+
+;; Fortran
+(projectile-register-project-type 'fpm '("fpm.toml")
+                                  :compile "fpm build"
+                                  :test "fpm test"
+                                  :run "fpm run"
+                                  :src-dir "src/"
+                                  :test-dir "test/")
+
+;; Ada
+(projectile-register-project-type 'alire '("alire.toml")
+                                  :compile "alr build"
+                                  :test "alr test"
+                                  :run "alr run"
+                                  :src-dir "src/"
+                                  :test-dir "tests/")
+
+;; Solidity
+(projectile-register-project-type 'foundry '("foundry.toml")
+                                  :compile "forge build"
+                                  :test "forge test"
+                                  :src-dir "src/"
+                                  :test-dir "test/"
+                                  :test-suffix ".t")
+
+;; Godot
+(projectile-register-project-type 'godot '("project.godot")
+                                  :run "godot --path .")
+
+;; Embedded
+(projectile-register-project-type 'platformio '("platformio.ini")
+                                  :compile "pio run"
+                                  :install "pio run -t upload"
+                                  :test "pio test"
+                                  :src-dir "src/"
+                                  :test-dir "test/")
+
+(defvar-local projectile-project-type nil
+  "Buffer local var for overriding the auto-detected project type.
+Normally you'd set this from .dir-locals.el.")
+(put 'projectile-project-type 'safe-local-variable #'symbolp)
+
+(defun projectile-detect-project-type (&optional dir project-root)
+  "Detect the type of the project.
+When DIR is specified it detects its project type, otherwise it acts
+on the current project.  PROJECT-ROOT, if provided, is used for caching
+instead of re-resolving via `projectile-project-root'.
+
+Fallback to a generic project type when the type can't be determined."
+  ;; Resolve the root up front so function markers receive it (they used to
+  ;; get DIR, which is nil when detecting the current project's type - see
+  ;; #1909) and so the cache key below reuses the same value.
+  (let* ((project-root (or project-root (projectile-project-root dir)))
+         ;; List the root once and answer plain-name markers from the
+         ;; listing.  Detection walks every registered type (50+), and the
+         ;; vast majority use plain-name markers in the root, so this turns
+         ;; "one stat per marker per type" into a single `directory-files'
+         ;; call - a big win on the first detection of a remote project.
+         (entry-set (and project-root
+                         (projectile--directory-entry-set project-root)))
+         (project-type
+          (or (car (seq-find
+                    (lambda (project-type-record)
+                      (let ((project-type (car project-type-record))
+                            (marker (plist-get (cdr project-type-record) 'marker-files)))
+                        (if (functionp marker)
+                            (and (funcall marker project-root) project-type)
+                          ;; An empty marker set is vacuously satisfied by
+                          ;; `projectile-verify-files' (`seq-every-p' over nil
+                          ;; is t), which would make the type match every
+                          ;; project.  Guard against it so clearing a type's
+                          ;; markers disables detection instead of inverting it.
+                          (and marker (projectile-verify-files marker dir entry-set) project-type))))
+                    projectile-project-types))
+              'generic)))
+    (puthash project-root project-type projectile-project-type-cache)
+    project-type))
+
+(defun projectile-project-type (&optional dir)
+  "Determine a project's type based on its structure.
+When DIR is specified it checks it, otherwise it acts
+on the current project.
+
+The project type is cached for improved performance."
+  (or (and (not dir) projectile-project-type)
+      (if-let* ((project-root (projectile-project-root dir)))
+          (or (gethash project-root projectile-project-type-cache)
+              (projectile-detect-project-type dir project-root)))))
+
+;;;###autoload
+(defun projectile-project-info ()
+  "Display info for current project."
+  (interactive)
+  (message "Project: %s (%s, %s)"
+           (projectile-acquire-root)
+           (projectile-project-type)
+           (projectile-project-vcs)))
+
+(defun projectile-verify-files (files &optional dir entry-set)
+  "Check whether all FILES exist in the project.
+An element of FILES may also be an alternatives clause of the form
+\(:any FILE...), which is satisfied when any one of its FILEs exists.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project.  ENTRY-SET, when non-nil, is a hash set
+of the project root's immediate entries (see
+`projectile--directory-entry-set') used to answer plain-name FILES
+without a filesystem round-trip each."
+  (seq-every-p (lambda (alternatives)
+                 (seq-some (lambda (file)
+                             (projectile-verify-file file dir entry-set))
+                           alternatives))
+               (projectile--marker-clauses files)))
+
+(defun projectile-verify-file (file &optional dir entry-set)
+  "Check whether FILE exists in the current project.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project.
+
+ENTRY-SET, when non-nil, is a hash set of the project root's immediate
+entries.  A plain-name FILE (one sitting directly in the root) is then
+answered by membership in ENTRY-SET instead of a filesystem stat; a FILE
+carrying a path separator can't be and falls back to
+`projectile-file-exists-p'."
+  (if (and entry-set (not (string-match-p "/" file)))
+      (and (gethash file entry-set) t)
+    (projectile-file-exists-p (projectile-expand-root file dir))))
+
+(defun projectile-verify-file-wildcard (file &optional dir)
+  "Check whether FILE exists in the current project.
+When DIR is specified it checks DIR's project, otherwise
+it acts on the current project.
+Expands wildcards using `file-expand-wildcards' before checking."
+  (file-expand-wildcards (projectile-expand-root file dir)))
+
+(define-obsolete-variable-alias 'projectile--vcs-markers
+  'projectile-vcs-markers "3.1.0")
+
+(defcustom projectile-vcs-markers
+  '((".git" . git)
+    (".hg" . hg)
+    (".fslckout" . fossil)
+    ("_FOSSIL_" . fossil)
+    (".bzr" . bzr)
+    ("_darcs" . darcs)
+    (".pijul" . pijul)
+    (".svn" . svn)
+    (".sl" . sapling)
+    (".jj" . jj)
+    (".osc" . osc))
+  "Alist of (MARKER . VCS) pairs probed by `projectile-project-vcs'.
+
+The order only breaks ties between markers in the same directory -
+during the upward walk the nearest marker directory always wins.
+The main reason to customize this is colocated repositories: a
+repository created with `jj git init' contains both `.jj' and
+`.git', and moving `.jj' first makes such projects detect as `jj'.
+
+Unknown VCS symbols are fine - file listing falls back to the
+generic command and `projectile-vc' to `vc-dir' - so new markers
+can be added here without any other configuration.
+
+VCS detection is cached per project; run `projectile-invalidate-cache'
+after changing this for it to affect already-visited projects."
+  :group 'projectile
+  :type '(alist :key-type (string :tag "Marker") :value-type (symbol :tag "VCS"))
+  :package-version '(projectile . "3.1.0"))
+
+(defun projectile--vcs-from-directory-listing (directory)
+  "Return the VCS symbol matching a marker directly inside DIRECTORY.
+Issues a single `directory-files' call rather than one
+`file-exists-p' per marker - over TRAMP that turns 10 sequential
+remote round-trips into one."
+  (when-let* ((entry-set (projectile--directory-entry-set directory)))
+    (cl-some (lambda (cell)
+               (and (gethash (car cell) entry-set) (cdr cell)))
+             projectile-vcs-markers)))
+
+(defun projectile-project-vcs (&optional project-root)
+  "Determine the VCS used by the project if any.
+PROJECT-ROOT is the targeted directory.  If nil, use
+the variable `projectile-project-root'.
+
+Results are cached in `projectile-project-vcs-cache' (cleared by
+`projectile-invalidate-cache')."
+  (or project-root (setq project-root (projectile-acquire-root)))
+  (let ((cached (gethash project-root projectile-project-vcs-cache 'unset)))
+    (if (not (eq cached 'unset))
+        cached
+      (let ((vcs (or
+                  ;; first we check for a VCS marker in the project root itself
+                  (projectile--vcs-from-directory-listing project-root)
+                  ;; then we check if there's a VCS marker up the directory tree
+                  ;; that covers the case when a project is part of a
+                  ;; multi-project repository - in those cases you can still
+                  ;; use the VCS to get a list of files for the project in
+                  ;; question.  All markers are checked together via a single
+                  ;; predicate so each ancestor directory is listed at most
+                  ;; once instead of up to 10 times.
+                  (let ((found nil))
+                    (projectile-locate-dominating-file
+                     project-root
+                     (lambda (dir)
+                       (setq found (projectile--vcs-from-directory-listing dir))))
+                    found)
+                  'none)))
+        (puthash project-root vcs projectile-project-vcs-cache)
+        vcs))))
+
+
+;;; Git helpers
+;;
+;; Reading git for things other than the file listing: which files differ,
+;; which branch a checkout is on, where the repository's shared directory
+;; is.  These are consumed by the repository identity, the worktree lookup,
+;; the dashboard and `projectile-find-changed-file' alike, which is why they
+;; live next to the VCS detection rather than inside any one of them.
+
+(defun projectile--git (root &rest args)
+  "Run git with ARGS in ROOT and return its output, or nil when it fails.
+No shell is involved, and the call would go through TRAMP for a remote
+ROOT - which is why the callers make sure never to reach here with one.
+
+`--no-optional-locks' keeps a dashboard opened on project switch from
+taking the index lock and rewriting the index behind the user's back."
+  (let ((default-directory root))
+    (with-temp-buffer
+      (when (eql 0 (ignore-errors
+                     (apply #'process-file "git" nil '(t nil) nil
+                            "--no-optional-locks" args)))
+        (buffer-string)))))
+
+(defun projectile--git-toplevel (root)
+  "Return the toplevel of the git repository containing ROOT, or nil."
+  (when-let* ((top (projectile--git root "rev-parse" "--show-toplevel")))
+    (file-name-as-directory (file-truename (string-trim top)))))
+
+(defun projectile--git-relativize (paths root toplevel)
+  "Return PATHS, given relative to TOPLEVEL, relative to ROOT instead.
+Git reports porcelain and diff paths relative to the repository root
+regardless of where it was run, so a project sitting below that root
+needs them translated - and anything outside the project dropped."
+  (if (equal (file-truename root) toplevel)
+      paths
+    (delq nil
+          (mapcar (lambda (path)
+                    (let ((absolute (expand-file-name path toplevel))
+                          (root (file-truename root)))
+                      (when (string-prefix-p root absolute)
+                        (file-relative-name absolute root))))
+                  paths))))
+
+(defun projectile--git-status-changed-files (root)
+  "Return the paths git reports as changed in ROOT\\='s working tree.
+Covers staged, unstaged and untracked files, as repository-relative
+paths.  A rename occupies two NUL-separated fields - the new name and
+then the old one - so those are consumed in step rather than the old
+name being mistaken for another changed file."
+  (when-let* ((output (projectile--git root "status" "--porcelain" "-z"
+                                       "--untracked-files=all")))
+    (let ((records (split-string output "\0" t))
+          files)
+      (while records
+        (let ((record (pop records)))
+          ;; "XY PATH", with X and Y the index and worktree status codes.
+          (when (> (length record) 3)
+            (let ((status (substring record 0 2))
+                  (path (substring record 3)))
+              (push path files)
+              ;; A rename or copy carries the source path in the next field.
+              (when (string-match-p "[RC]" status)
+                (pop records))))))
+      (nreverse files))))
+
+(defun projectile-git-changed-files (root &optional base)
+  "Return the files changed in the project at ROOT, relative to it.
+
+Without BASE that is the working tree: everything staged, unstaged or
+untracked.  With BASE - a branch, tag or any other revision - it is
+everything that differs from it, plus the files not yet tracked at all,
+which is what \"show me what this branch changed\" usually means.
+
+Only git is supported; any other version control system returns nil."
+  (when (eq (projectile-project-vcs root) 'git)
+    (when-let* ((toplevel (projectile--git-toplevel root)))
+      (let ((paths
+             (if base
+                 (append
+                  (when-let* ((diff (projectile--git root "diff" "--name-only"
+                                                     "-z" base)))
+                    (split-string diff "\0" t))
+                  (when-let* ((new (projectile--git root "ls-files" "-z"
+                                                    "--others" "--exclude-standard")))
+                    (split-string new "\0" t)))
+               (projectile--git-status-changed-files root))))
+        (seq-uniq (projectile--git-relativize paths root toplevel))))))
+
+(defun projectile--read-git-ref (root)
+  "Read a git revision to compare against, completing over ROOT\\='s branches."
+  (let ((branches (when-let* ((output (projectile--git
+                                       root "for-each-ref" "--format=%(refname:short)"
+                                       "refs/heads" "refs/remotes")))
+                    (split-string output "\n" t))))
+    (completing-read "Compare against: " branches nil nil nil nil
+                     (car (member "main" branches)))))
+
+;;;###autoload
+(defun projectile-find-changed-file (&optional arg)
+  "Jump to a file changed in the current project.
+
+That is everything git reports as staged, unstaged or untracked.  With a
+prefix ARG you are asked for a revision to compare against instead - a
+branch, say - and the candidates become everything that differs from it,
+which is the \"what did this branch touch\" list.
+
+Only git projects are supported."
+  (interactive "P")
+  (let* ((root (projectile-acquire-root))
+         (base (when arg (projectile--read-git-ref root))))
+    (unless (eq (projectile-project-vcs root) 'git)
+      (user-error "`projectile-find-changed-file' needs a git project"))
+    (let ((files (projectile-git-changed-files root base)))
+      (unless files
+        (user-error "No changed files in %s%s" root
+                    (if base (format " compared to %s" base) "")))
+      (find-file (expand-file-name
+                  (projectile-completing-read
+                   (if base (format "Changed vs %s: " base) "Changed file: ")
+                   files :caller 'projectile-find-changed-file)
+                  root))
+      (run-hooks 'projectile-find-file-hook))))
+
+
+;;; Implementation and test counterparts
+;;
+;; Finding the test that goes with a source file and back again.  A project
+;; type can describe the correspondence by prefix/suffix, by source and test
+;; directories, or with a `:related-files-fn' of its own; the fallbacks below
+;; are what runs when it describes nothing.
+
+(defun projectile--test-name-for-impl-name (impl-file-path)
+  "Determine the name of the test file for IMPL-FILE-PATH.
+
+IMPL-FILE-PATH may be an absolute path, relative path or a file name."
+  (let* ((project-type (projectile-project-type))
+         (impl-file-name (file-name-sans-extension (file-name-nondirectory impl-file-path)))
+         (impl-file-ext (file-name-extension impl-file-path))
+         (test-prefix (funcall projectile-test-prefix-function project-type))
+         (test-suffix (funcall projectile-test-suffix-function project-type))
+         ;; A test usually carries the implementation's extension; a type
+         ;; that says otherwise (Elixir's scripts) is taken at its word.
+         (test-file-ext (or (projectile-test-extension project-type)
+                            impl-file-ext)))
+    (cond
+     (test-prefix (concat test-prefix impl-file-name "." test-file-ext))
+     (test-suffix (concat impl-file-name test-suffix "." test-file-ext))
+     (t (user-error "Cannot determine a test file name, one of \"test-suffix\" or \"test-prefix\" must be set for project type `%s'" project-type)))))
+
+(defun projectile--impl-name-for-test-name (test-file-path)
+  "Determine the name of the implementation file for TEST-FILE-PATH.
+
+TEST-FILE-PATH may be an absolute path, relative path or a file name."
+  (let* ((project-type (projectile-project-type))
+         (test-file-name (file-name-sans-extension (file-name-nondirectory test-file-path)))
+         (test-file-ext (file-name-extension test-file-path))
+         (test-prefix (funcall projectile-test-prefix-function project-type))
+         (test-suffix (funcall projectile-test-suffix-function project-type))
+         (impl-file-ext (or (projectile-src-extension project-type)
+                            test-file-ext)))
+    (cond
+     (test-prefix
+      (concat (string-remove-prefix test-prefix test-file-name) "." impl-file-ext))
+     (test-suffix
+      (concat (string-remove-suffix test-suffix test-file-name) "." impl-file-ext))
+     (t (user-error "Cannot determine an implementation file name, one of \"test-suffix\" or \"test-prefix\" must be set for project type `%s'" project-type)))))
+
+(defun projectile--test-to-impl-dir (test-dir-path)
+  "Return the directory path of an impl file with test file in TEST-DIR-PATH.
+
+Occurrences of the current project type's test-dir property (which should be a
+string) are replaced with the current project type's src-dir property
+ (which should be a string) to obtain the new directory.
+
+Nil is returned if either the src-dir or test-dir properties are not strings."
+  (let* ((project-type (projectile-project-type))
+         (test-dir (projectile-test-directory project-type))
+         (impl-dir (projectile-src-directory project-type)))
+    (when (and (stringp test-dir) (stringp impl-dir))
+      (if (not (string-match-p test-dir (file-name-directory test-dir-path)))
+          (user-error "Attempted to find a implementation file by switching this project type's (%s) test-dir property \"%s\" with this project type's src-dir property \"%s\", but %s does not contain \"%s\""
+                 project-type test-dir impl-dir test-dir-path test-dir)
+        (projectile-complementary-dir test-dir-path test-dir impl-dir)))))
+
+(defun projectile--impl-to-test-dir-fallback (impl-dir-path)
+  "Return the test file for IMPL-DIR-PATH by guessing a test directory.
+
+Occurrences of the `projectile-default-src-directory' in the directory of
+IMPL-DIR-PATH are replaced with `projectile-default-test-directory'.  Nil is
+returned if `projectile-default-src-directory' is not a substring of
+IMPL-DIR-PATH."
+  (when-let* ((file (projectile--complementary-file
+                    impl-dir-path
+                    (lambda (f)
+                      (when (string-match-p projectile-default-src-directory f)
+                        (projectile-complementary-dir
+                         impl-dir-path
+                         projectile-default-src-directory
+                         projectile-default-test-directory)))
+                    #'projectile--test-name-for-impl-name)))
+    (projectile--project-relative-name file (projectile-project-root))))
+
+(defun projectile--test-to-impl-dir-fallback (test-dir-path)
+  "Return the impl file for TEST-DIR-PATH by guessing a source directory.
+
+Occurrences of `projectile-default-test-directory' in the directory of
+TEST-DIR-PATH are replaced with `projectile-default-src-directory'.  Nil is
+returned if `projectile-default-test-directory' is not a substring of
+TEST-DIR-PATH."
+  (when-let* ((file (projectile--complementary-file
+                    test-dir-path
+                    (lambda (f)
+                      (when (string-match-p projectile-default-test-directory f)
+                        (projectile-complementary-dir
+                         test-dir-path
+                         projectile-default-test-directory
+                         projectile-default-src-directory)))
+                    #'projectile--impl-name-for-test-name)))
+    (projectile--project-relative-name file (projectile-project-root))))
+
+(defun projectile--impl-to-test-dir (impl-dir-path)
+  "Return the directory path of a test whose impl file resides in IMPL-DIR-PATH.
+
+Occurrences of the current project type's src-dir property (which should be a
+string) are replaced with the current project type's test-dir property
+ (which should be a string) to obtain the new directory.
+
+If the src-dir property is set and IMPL-DIR-PATH does not contain (as a
+substring) the src-dir property of the current project type, an error is
+signalled.
+
+Nil is returned if either the src-dir or test-dir properties are not strings."
+  (let* ((project-type (projectile-project-type))
+         (test-dir (projectile-test-directory project-type))
+         (impl-dir (projectile-src-directory project-type)))
+    (when (and (stringp test-dir) (stringp impl-dir))
+      (if (not (string-match-p impl-dir (file-name-directory impl-dir-path)))
+          (user-error "Attempted to find a test file by switching this project type's (%s) src-dir property \"%s\" with this project type's test-dir property \"%s\", but %s does not contain \"%s\""
+                 project-type impl-dir test-dir impl-dir-path impl-dir)
+        (projectile-complementary-dir impl-dir-path impl-dir test-dir)))))
+
+(defun projectile-complementary-dir (dir-path string replacement)
+  "Return the \"complementary\" directory of DIR-PATH.
+Replace STRING in DIR-PATH with REPLACEMENT."
+  (let* ((project-root (projectile-project-root))
+         (relative-dir (file-name-directory (projectile--project-relative-name dir-path project-root))))
+    (projectile-expand-root
+     (string-replace string replacement relative-dir))))
+
+(defun projectile--create-directories-for (path)
+  "Create directories necessary for PATH."
+  (unless (file-exists-p path)
+    (make-directory (if (file-directory-p path)
+                        path
+                      (file-name-directory path))
+                    :create-parents)))
+
+(defun projectile-find-implementation-or-test (file-name)
+  "Given a FILE-NAME return the matching implementation or test filename.
+
+If `projectile-create-missing-test-files' is non-nil, create the missing
+test file."
+  (unless file-name (user-error "The current buffer is not visiting a file"))
+  (unless (projectile-project-type) (projectile-ensure-project nil))
+  (if (projectile-test-file-p file-name)
+      ;; find the matching impl file
+      (let ((impl-file (projectile-find-matching-file file-name)))
+        (if impl-file
+            (projectile-expand-root impl-file)
+          (error
+           "No matching source file found for project type `%s'"
+           (projectile-project-type))))
+    ;; find the matching test file
+    (let* ((error-msg (format
+                       "No matching test file found for project type `%s'"
+                       (projectile-project-type)))
+           (test-file (or (projectile-find-matching-test file-name)
+                          (error error-msg)))
+           (expanded-test-file (projectile-expand-root test-file)))
+      (cond ((file-exists-p expanded-test-file) expanded-test-file)
+            (projectile-create-missing-test-files
+             (projectile--create-directories-for expanded-test-file)
+             expanded-test-file)
+            (t (user-error "Determined test file to be \"%s\", which does not exist.  Set `projectile-create-missing-test-files' to allow `projectile-find-implementation-or-test' to create new files" test-file))))))
+
+(defun projectile--find-implementation-or-test-in (ff-variant)
+  "Open the matching implementation or test file using FF-VARIANT.
+FF-VARIANT is a `find-file'-like command; passing
+`find-file-other-window' or `find-file-other-frame' yields the
+corresponding display variants."
+  (funcall ff-variant (projectile-find-implementation-or-test (buffer-file-name))))
+
+;;;###autoload (autoload 'projectile-find-implementation-or-test-other-window "projectile" nil t)
+;;;###autoload (autoload 'projectile-find-implementation-or-test-other-frame "projectile" nil t)
+(projectile--define-display-variants projectile-find-implementation-or-test ()
+  "Open matching implementation or test file in other %s.
+
+See the documentation of `projectile--find-matching-file' and
+`projectile--find-matching-test' for how implementation and test files
+are determined."
+  (projectile--find-implementation-or-test-in #'find-file-other-window))
+
+;;;###autoload
+(defun projectile-toggle-between-implementation-and-test ()
+  "Toggle between an implementation file and its test file.
+
+
+See the documentation of `projectile--find-matching-file' and
+`projectile--find-matching-test' for how implementation and test files
+are determined."
+  (interactive)
+  (find-file
+   (projectile-find-implementation-or-test (buffer-file-name))))
+
+
+(defun projectile-project-type-attribute (project-type key &optional default-value)
+  "Return the value of some PROJECT-TYPE attribute identified by KEY.
+Fallback to DEFAULT-VALUE for missing attributes."
+  (let ((project (alist-get project-type projectile-project-types)))
+    (if (and project (plist-member project key))
+        (plist-get project key)
+      default-value)))
+
+(defun projectile-test-prefix (project-type)
+  "Find default test files prefix based on PROJECT-TYPE."
+  (or projectile-project-test-prefix
+      (projectile-project-type-attribute project-type 'test-prefix)))
+
+(defun projectile-test-suffix (project-type)
+  "Find default test files suffix based on PROJECT-TYPE."
+  (or projectile-project-test-suffix
+      (projectile-project-type-attribute project-type 'test-suffix)))
+
+(defun projectile-test-extension (project-type)
+  "Find the extension test files use in PROJECT-TYPE, or nil.
+Nil means a test file carries the same extension as the implementation
+it belongs to, which is true of most languages - Elixir, whose tests are
+scripts (`.exs\\=') beside sources (`.ex\\='), is why this exists."
+  (projectile-project-type-attribute project-type 'test-extension))
+
+(defun projectile-src-extension (project-type)
+  "Find the extension implementation files use in PROJECT-TYPE, or nil.
+The counterpart of `projectile-test-extension\\=', for naming the
+implementation belonging to a test."
+  (projectile-project-type-attribute project-type 'src-extension))
+
+(defun projectile-related-files-fn (project-type)
+  "Find relative file based on PROJECT-TYPE.
+
+Combines the type's hand-written `related-files-fn' (or the
+`projectile-project-related-files-fn' override) with a related-files-fn
+compiled from its `file-kinds' declaration, if any.  When both are
+present they are merged into a list of functions so declarative and
+hand-written relations coexist."
+  (let ((custom (or projectile-project-related-files-fn
+                    (projectile-project-type-attribute project-type 'related-files-fn)))
+        (file-kinds (projectile-project-type-attribute project-type 'file-kinds)))
+    (if (null file-kinds)
+        custom
+      (let ((kinds-fn (projectile--file-kinds-related-files-fn file-kinds)))
+        (cond
+         ((null custom) kinds-fn)
+         ((functionp custom) (list custom kinds-fn))
+         ((consp custom) (append custom (list kinds-fn)))
+         (t (error "Unsupported value type of :related-files-fn")))))))
+
+(defun projectile-src-directory (project-type)
+  "Find default src directory based on PROJECT-TYPE."
+  (or projectile-project-src-dir
+      (projectile-project-type-attribute project-type 'src-dir)))
+
+(defun projectile-test-directory (project-type)
+  "Find default test directory based on PROJECT-TYPE."
+  (or projectile-project-test-dir
+      (projectile-project-type-attribute project-type 'test-dir)))
+
+(defun projectile-dirname-matching-count (a b)
+  "Count matching dirnames ascending file paths in A and B."
+  (setq a (reverse (split-string (or (file-name-directory a) "") "/" t))
+        b (reverse (split-string (or (file-name-directory b) "") "/" t)))
+  (let ((common 0))
+    (while (and a b (string-equal (pop a) (pop b)))
+      (setq common (1+ common)))
+    common))
+
+(defun projectile-group-file-candidates (file candidates)
+  "Group file candidates by dirname matching count."
+  (seq-sort (lambda (a b) (> (car a) (car b)))
+            (let (value result)
+              (while (setq value (pop candidates))
+                (let* ((key (projectile-dirname-matching-count file value))
+                       (kv (assoc key result)))
+                  (if kv
+                      (setcdr kv (cons value (cdr kv)))
+                    (push (list key value) result))))
+              (mapcar (lambda (x)
+                        (cons (car x) (nreverse (cdr x))))
+                      (nreverse result)))))
+
+(defun projectile--best-or-all-candidates-based-on-parents-dirs (file candidates)
+  "Return a list of the best one for FILE from CANDIDATES or all CANDIDATES."
+  (let ((grouped-candidates (projectile-group-file-candidates file candidates)))
+    (if (= (length (car grouped-candidates)) 2)
+        (list (car (last (car grouped-candidates))))
+      (apply #'append (mapcar #'cdr grouped-candidates)))))
+
+(defun projectile--impl-to-test-predicate (impl-file)
+  "Return a predicate, which returns t for any test files for IMPL-FILE."
+  (let* ((basename (file-name-sans-extension (file-name-nondirectory impl-file)))
+         (test-prefix (funcall projectile-test-prefix-function (projectile-project-type)))
+         (test-suffix (funcall projectile-test-suffix-function (projectile-project-type)))
+         (prefix-name (when test-prefix (concat test-prefix basename)))
+         (suffix-name (when test-suffix (concat basename test-suffix))))
+    (lambda (current-file)
+      (let ((name (file-name-sans-extension (file-name-nondirectory current-file))))
+        (or (string-equal prefix-name name)
+            (string-equal suffix-name name))))))
+
+(defun projectile--complementary-file (file-path dir-fn filename-fn)
+  "Apply DIR-FN and FILENAME-FN to the directory and name of FILE-PATH.
+
+More specifically, return DIR-FN applied to the directory of FILE-PATH
+concatenated with FILENAME-FN applied to the file name of FILE-PATH.
+
+If either function returns nil, return nil."
+  (let ((filename (file-name-nondirectory file-path)))
+    (when-let* ((complementary-filename (funcall filename-fn filename))
+               (dir (funcall dir-fn (file-name-directory file-path))))
+     (concat (file-name-as-directory dir) complementary-filename))))
+
+(defun projectile--impl-file-from-src-dir-str (file-name)
+  "Get the relative path of the implementation file FILE-NAME.
+Return a path relative to the project root for the impl file of FILE-NAME
+using the src-dir and test-dir properties of the current project type which
+should be strings, nil returned if this is not the case."
+  (when-let* ((complementary-file (projectile--complementary-file
+                                  file-name
+                                  #'projectile--test-to-impl-dir
+                                  #'projectile--impl-name-for-test-name)))
+    (projectile--project-relative-name complementary-file (projectile-project-root))))
+
+(defun projectile--test-file-from-test-dir-str (file-name)
+  "Get the relative path of the test file FILE-NAME.
+Return a path relative to the project root for the test file of FILE-NAME
+using the src-dir and test-dir properties of the current project type which
+should be strings, nil returned if this is not the case."
+  (when-let* ((complementary-file (projectile--complementary-file
+                                   file-name
+                                   #'projectile--impl-to-test-dir
+                                   #'projectile--test-name-for-impl-name)))
+    (projectile--project-relative-name complementary-file (projectile-project-root))))
+
+(defun projectile--impl-file-from-src-dir-fn (test-file)
+  "Get the relative path to the implementation file corresponding to TEST-FILE.
+Return the implementation file path for the absolute path TEST-FILE
+relative to the project root in the case the current project type's src-dir
+has been set to a custom function, return nil if this is not the case or
+the path points to a file that does not exist."
+  (when-let* ((src-dir (projectile-src-directory (projectile-project-type))))
+    (when (functionp src-dir)
+      (let ((impl-file (projectile--complementary-file
+                        test-file
+                        src-dir
+                        #'projectile--impl-name-for-test-name)))
+        (when (file-exists-p impl-file)
+          (file-relative-name impl-file (projectile-project-root)))))))
+
+(defun projectile--test-file-from-test-dir-fn (impl-file)
+  "Get the relative path to the test file corresponding to IMPL-FILE.
+Return the test file path for the absolute path IMPL-FILE relative to the
+project root, in the case the current project type's test-dir has been set
+to a custom function, else return nil."
+  (when-let* ((test-dir (projectile-test-directory (projectile-project-type))))
+    (when (functionp test-dir)
+      (file-relative-name
+       (projectile--complementary-file
+        impl-file
+        test-dir
+        #'projectile--test-name-for-impl-name)
+       (projectile-project-root)))))
+
+(defmacro projectile--acond (&rest clauses)
+  "Like `cond', but the result of each condition is bound to `it'.
+
+The variable `it' is available within the remainder of each of CLAUSES.
+
+CLAUSES are otherwise as documented for `cond'.  This is copied from
+anaphora.el."
+  (declare (debug cond))
+  (if (null clauses)
+      nil
+    (let ((cl1 (car clauses))
+          (sym (gensym)))
+      `(let ((,sym ,(car cl1)))
+         (if ,sym
+             (if (null ',(cdr cl1))
+                 ,sym
+               (let ((it ,sym)) ,@(cdr cl1)))
+           (projectile--acond ,@(cdr clauses)))))))
+
+(defun projectile--find-matching-test (impl-file)
+  "Return a list of test files for IMPL-FILE.
+
+The precedence for determining test files to return is:
+
+1. Use the project type's test-dir property if it's set to a function
+2. Use the project type's related-files-fn property if set
+3. Use the project type's test-dir property if it's set to a string
+4. Attempt to find a file by matching all project files against
+   `projectile--impl-to-test-predicate'
+5. Fallback to swapping \"src\" for \"test\" in IMPL-FILE if \"src\"
+   is a substring of IMPL-FILE."
+  (projectile--acond
+   ((projectile--test-file-from-test-dir-fn impl-file) (list it))
+   ((projectile--related-files-plist-by-kind impl-file :test)
+    (projectile--related-files-from-plist it))
+   ((projectile--test-file-from-test-dir-str impl-file) (list it))
+   ((projectile--best-or-all-candidates-based-on-parents-dirs
+     impl-file (seq-filter
+                (projectile--impl-to-test-predicate impl-file)
+                (projectile-current-project-files))) it)
+   ((projectile--impl-to-test-dir-fallback impl-file)
+    (list it))))
+
+(defun projectile--test-to-impl-predicate (test-file)
+  "Return a predicate, which returns t for any impl files for TEST-FILE."
+  (let* ((basename (file-name-sans-extension (file-name-nondirectory test-file)))
+         (test-prefix (funcall projectile-test-prefix-function (projectile-project-type)))
+         (test-suffix (funcall projectile-test-suffix-function (projectile-project-type))))
+    (lambda (current-file)
+      (let ((name (file-name-nondirectory (file-name-sans-extension current-file))))
+        (or (when test-prefix (string-equal (concat test-prefix name) basename))
+            (when test-suffix (string-equal (concat name test-suffix) basename)))))))
+
+(defun projectile--find-matching-file (test-file)
+  "Return a list of impl files tested by TEST-FILE.
+
+The precedence for determining implementation files to return is:
+
+1. Use the project type's src-dir property if it's set to a function
+2. Use the project type's related-files-fn property if set
+3. Use the project type's src-dir property if it's set to a string
+4. Default to a fallback which matches all project files against
+   `projectile--test-to-impl-predicate'
+5. Fallback to swapping \"test\" for \"src\" in TEST-FILE if \"test\"
+   is a substring of TEST-FILE."
+  (projectile--acond
+   ((projectile--impl-file-from-src-dir-fn test-file) (list it))
+   ((projectile--related-files-plist-by-kind test-file :impl)
+    (projectile--related-files-from-plist it))
+   ((projectile--impl-file-from-src-dir-str test-file) (list it))
+   ((projectile--best-or-all-candidates-based-on-parents-dirs
+     test-file (seq-filter
+                (projectile--test-to-impl-predicate test-file)
+                (projectile-current-project-files))) it)
+   ((projectile--test-to-impl-dir-fallback test-file) (list it))))
+
+(defun projectile--choose-from-candidates (candidates &key caller)
+  "Choose one item from CANDIDATES."
+  (if (= (length candidates) 1)
+      (car candidates)
+    (projectile-completing-read "Switch to: " candidates :caller caller)))
+
+(defun projectile-find-matching-test (impl-file)
+  "Compute the name of the test matching IMPL-FILE."
+  (when-let* ((candidates (projectile--find-matching-test impl-file)))
+    (projectile--choose-from-candidates candidates :caller 'projectile-read-file)))
+
+(defun projectile-find-matching-file (test-file)
+  "Compute the name of a file matching TEST-FILE."
+  (when-let* ((candidates (projectile--find-matching-file test-file)))
+    (projectile--choose-from-candidates candidates :caller 'projectile-read-file)))
+
+;;; Search prompt and file-spec helpers
+;;
+;; Odds and ends the search and grep commands need: the default file
+;; specification `projectile-grep' offers, the ignored-suffix globs, and the
+;; faces and reader behind the search prompt.
+
+(defun projectile-grep-default-files ()
+  "Try to find a default pattern for `projectile-grep'.
+This is a subset of `grep-read-files', where either a matching entry from
+`grep-files-aliases' or file name extension pattern is returned."
+  (when buffer-file-name
+    (let* ((fn (file-name-nondirectory buffer-file-name))
+           (default-alias
+             (let ((aliases (remove (assoc "all" grep-files-aliases)
+                                    grep-files-aliases))
+                   alias)
+               (while aliases
+                 (setq alias (car aliases)
+                       aliases (cdr aliases))
+                 (if (string-match (mapconcat
+                                    #'wildcard-to-regexp
+                                    (split-string (cdr alias) nil t)
+                                    "\\|")
+                                   fn)
+                     (setq aliases nil)
+                   (setq alias nil)))
+               (cdr alias)))
+           (default-extension
+             (let ((ext (file-name-extension fn)))
+               (and ext (concat "*." ext)))))
+      (or default-alias default-extension))))
+
+(defun projectile--globally-ignored-file-suffixes-glob ()
+  "Return ignored file suffixes as a list of glob patterns."
+  (mapcar (lambda (pat) (concat "*" pat)) projectile-globally-ignored-file-suffixes))
+
+(defface projectile-search-prompt-tool
+  '((t :inherit font-lock-function-name-face :weight bold))
+  "Face for the tool/backend highlighted in Projectile's search prompts."
+  :group 'projectile
+  :package-version '(projectile . "3.2.0"))
+
+(defface projectile-search-prompt-default
+  '((t :inherit font-lock-constant-face))
+  "Face for the default value highlighted in Projectile's search prompts."
+  :group 'projectile
+  :package-version '(projectile . "3.2.0"))
+
+(defun projectile--search-tool-tag (tool)
+  "Return a faced `[TOOL]' tag for a search prompt.
+TOOL is the backend, given as a symbol or a string: `projectile-search'
+passes the backend name symbol while the reviewable search passes a
+\"ripgrep\"/\"elisp\" string.  Used where the backend varies so the
+prompt makes clear which tool will run."
+  (format "[%s]" (propertize (format "%s" tool)
+                             'face 'projectile-search-prompt-tool)))
+
+(defun projectile--read-search-string-with-default (prompt-label)
+  "Read a search string, defaulting to the symbol or region at point.
+PROMPT-LABEL is the action shown in the prompt (already carrying any
+faced tool tag its caller wants).  The default value, when there is one,
+is appended and faced as `(default VALUE)'."
+  (let* ((prompt-label (projectile-prepend-project-name prompt-label))
+         (default-value (projectile-symbol-or-selection-at-point))
+         (default-label (if (or (not default-value)
+                                (string= default-value ""))
+                            ""
+                          (format " (default: %s)"
+                                  (propertize default-value
+                                              'face 'projectile-search-prompt-default)))))
+    (read-string (format "%s%s: " prompt-label default-label) nil nil default-value)))
+
+;;; Grep command construction
+;;
+;; Turning Projectile's ignore rules into the arguments `rgrep' and friends
+;; expect, which is fiddly enough to be worth keeping in one place.
+
+
+(defvar projectile-grep-find-ignored-paths)
+(defvar projectile-grep-find-unignored-paths)
+(defvar projectile-grep-find-ignored-patterns)
+(defvar projectile-grep-find-unignored-patterns)
+
+(defun projectile--grep-find-specs (patterns)
+  "Split gitignore-style PATTERNS into specs for the `find'-based grep.
+Return a cons of the root-anchored patterns, spelled relative to the
+project root, and the floating ones, which match at any depth.  Trailing
+slashes are dropped: `find' sees directory entries without one, and
+pruning a directory takes its whole subtree with it anyway."
+  (let (anchored floating)
+    (dolist (pattern patterns)
+      (let ((body (string-remove-suffix "/" pattern)))
+        (cond ((string-empty-p body))
+              ((string-prefix-p "**/" body) (push (substring body 3) floating))
+              ((string-prefix-p "/" body) (push (substring body 1) anchored))
+              ((string-search "/" body) (push body anchored))
+              (t (push body floating)))))
+    (cons (nreverse anchored) (nreverse floating))))
+
+(defun projectile--grep-rebase-paths (paths project-root root-dir)
+  "Respell root-anchored PATHS relative to ROOT-DIR.
+PATHS are relative to PROJECT-ROOT, while `find' is started in ROOT-DIR -
+either the project root itself or one of the dirconfig `+' keep
+subdirectories.  A path that doesn't live under ROOT-DIR can't match
+anything the search will see, so it is dropped."
+  (let ((prefix (file-relative-name
+                 (file-name-as-directory (expand-file-name root-dir))
+                 (file-name-as-directory (expand-file-name project-root)))))
+    (if (member prefix '("./" "" "."))
+        paths
+      (delq nil (mapcar (lambda (path)
+                          (and (string-prefix-p prefix path)
+                               (substring path (length prefix))))
+                        paths)))))
+
+(defun projectile--grep-find-path-tests (anchored floating)
+  "Return `find' -path tests matching the ANCHORED and FLOATING patterns.
+An anchored pattern is spelled `./PATH', so it only matches from the
+directory `find' was started in; a floating one gets a `*/' prefix, so it
+matches at any depth.  Return nil when both lists are empty.
+
+The one place this can't be exact is that `*' in a `find' -path glob
+crosses `/', where a gitignore `*' stays within a path segment, so an
+anchored pattern like `/*.txt' also prunes deeper matches here."
+  (when-let* ((globs (append
+                      (mapcar (lambda (pattern) (concat "./" pattern)) anchored)
+                      (mapcar (lambda (pattern)
+                                (if (string-prefix-p "*" pattern)
+                                    pattern
+                                  (concat "*/" pattern)))
+                              floating))))
+    (concat " -path " (mapconcat #'shell-quote-argument globs " -o -path "))))
+
+(defun projectile--grep-find-prune-clause ()
+  "Return the `find' prune expression for Projectile's ignore configuration.
+Built from the four `projectile-grep-find-*' variables `projectile--grep'
+binds around the `rgrep' call.  The `!' ensure entries are subtracted
+from the whole ignore expression, so they rescue an anchored path just
+like they rescue a floating pattern - and just like they do when
+indexing."
+  (when-let* ((ignore-tests (projectile--grep-find-path-tests
+                             projectile-grep-find-ignored-paths
+                             projectile-grep-find-ignored-patterns)))
+    (let ((unignore-tests (projectile--grep-find-path-tests
+                           projectile-grep-find-unignored-paths
+                           projectile-grep-find-unignored-patterns)))
+      (concat (shell-quote-argument "(")
+              (if unignore-tests
+                  (concat " " (shell-quote-argument "(")
+                          ignore-tests
+                          " " (shell-quote-argument ")")
+                          " -a " (shell-quote-argument "!")
+                          " " (shell-quote-argument "(")
+                          unignore-tests
+                          " " (shell-quote-argument ")"))
+                ignore-tests)
+              " " (shell-quote-argument ")")
+              " -prune -o "))))
+
+(defun projectile-rgrep-default-command (regexp files dir)
+  "Compute the command for \\[rgrep] to use by default.
+
+Extension of the Emacs 25.1 implementation of `rgrep-default-command', with
+which it shares its arglist."
+  (require 'find-dired)      ; for `find-name-arg'
+  (grep-expand-template
+   grep-find-template
+   regexp
+   (concat (shell-quote-argument "(")
+           " " find-name-arg " "
+           (mapconcat
+            #'shell-quote-argument
+            (split-string files)
+            (concat " -o " find-name-arg " "))
+           " "
+           (shell-quote-argument ")"))
+   dir
+   (concat
+    (and grep-find-ignored-directories
+         (concat "-type d "
+                 (shell-quote-argument "(")
+                 ;; we should use shell-quote-argument here
+                 " -path "
+                 (mapconcat
+                  #'identity
+                  ;; TODO: Replace delq+mapcar with seq-keep when Emacs 29.1 is the minimum version
+                  (delq nil (mapcar (lambda (ignore)
+                                      (cond ((stringp ignore)
+                                             (shell-quote-argument
+                                              (concat "*/" ignore)))
+                                            ((consp ignore)
+                                             (and (funcall (car ignore) dir)
+                                                  (shell-quote-argument
+                                                   (concat "*/"
+                                                           (cdr ignore)))))))
+                                    grep-find-ignored-directories))
+                  " -o -path ")
+                 " "
+                 (shell-quote-argument ")")
+                 " -prune -o "))
+    (and grep-find-ignored-files
+         (concat (shell-quote-argument "!") " -type d "
+                 (shell-quote-argument "(")
+                 ;; we should use shell-quote-argument here
+                 " -name "
+                 (mapconcat
+                  #'(lambda (ignore)
+                      (cond ((stringp ignore)
+                             (shell-quote-argument ignore))
+                            ((consp ignore)
+                             (and (funcall (car ignore) dir)
+                                  (shell-quote-argument
+                                   (cdr ignore))))))
+                  grep-find-ignored-files
+                  " -o -name ")
+                 " "
+                 (shell-quote-argument ")")
+                 " -prune -o "))
+    (projectile--grep-find-prune-clause))))
+
+;;; Project search
+;;
+;; `projectile-search' runs a text search over the project using a pluggable
+;; backend.  Backends live in `projectile-search-backends' and are selected via
+;; `projectile-search-backend'; register your own (deadgrep, consult-ripgrep,
+;; ...) with `projectile-register-search-backend'.  The registry helpers below
+;; are deliberately family-agnostic so the same mechanism can drive other
+;; command families later on.
+
+;;;; Generic backend registry
+
+(defun projectile-register-backend (registry-symbol name &rest plist)
+  "Register backend NAME (a symbol) into REGISTRY-SYMBOL's alist.
+REGISTRY-SYMBOL names a variable holding an alist of (NAME . PLIST)
+descriptors; an existing entry for NAME is replaced.  PLIST properties
+are family-specific, but `:description' (a string) and `:available' (a
+zero-argument predicate, or nil for \"always available\") are understood
+by the resolution helpers below."
+  (set registry-symbol
+       (cons (cons name plist)
+             (assq-delete-all name (symbol-value registry-symbol)))))
+
+(defun projectile--backend-available-p (backend)
+  "Return non-nil when BACKEND, a (NAME . PLIST) descriptor, is usable."
+  (let ((predicate (plist-get (cdr backend) :available)))
+    (or (null predicate) (funcall predicate))))
+
+(defun projectile--resolve-backend (backends preference family)
+  "Return a usable backend from BACKENDS, honouring PREFERENCE.
+BACKENDS is an alist of (NAME . PLIST).  PREFERENCE is a backend name, or
+`auto' to pick the first available backend, or `prompt' to ask.  FAMILY
+is a noun used in prompts and errors, e.g. \"search\".  Signals a
+`user-error' when no suitable backend is available."
+  (let ((available (seq-filter #'projectile--backend-available-p backends)))
+    (cond
+     ((null available)
+      (user-error "No %s backend is available" family))
+     ((eq preference 'auto)
+      (car available))
+     ((eq preference 'prompt)
+      (assq (intern (completing-read
+                     (format "%s backend: " (capitalize family))
+                     (mapcar (lambda (b) (symbol-name (car b))) available)
+                     nil t))
+            backends))
+     (t
+      (let ((backend (assq preference backends)))
+        (cond
+         ((null backend)
+          (user-error "Unknown %s backend: %s" family preference))
+         ((projectile--backend-available-p backend)
+          backend)
+         (t
+          (user-error "The %s backend `%s' is not available" family preference))))))))
+
+;;;; Search engines
+
+(defun projectile--grep (search-regexp &optional files)
+  "Run rgrep (or `vc-git-grep') for SEARCH-REGEXP across the project.
+FILES, when non-nil, is an rgrep files specification restricting the
+search.  Honours Projectile's ignore configuration and runs
+`projectile-grep-finished-hook' when done."
+  (require 'grep) ;; for `rgrep'
+  (let* ((project-root (projectile-acquire-root))
+         (roots (projectile-get-project-directories project-root))
+         ;; The ignore and ensure rules are the project's, so they're read
+         ;; once and respelled per root below.
+         (ignore-specs (projectile--grep-find-specs
+                        (projectile--ignore-patterns project-root)))
+         (ensure-specs (projectile--grep-find-specs
+                        (projectile--ensure-patterns project-root))))
+    (dolist (root-dir roots)
+      (require 'vc-git) ;; for `vc-git-grep'
+      ;; in git projects users have the option to use `vc-git-grep' instead of `rgrep'
+      (if (and (eq (projectile-project-vcs) 'git)
+               projectile-use-git-grep)
+          (vc-git-grep search-regexp (or files "") root-dir)
+        (let ((projectile-grep-find-ignored-paths
+               (projectile--grep-rebase-paths (car ignore-specs)
+                                              project-root root-dir))
+              (projectile-grep-find-ignored-patterns (cdr ignore-specs))
+              (projectile-grep-find-unignored-paths
+               (projectile--grep-rebase-paths (car ensure-specs)
+                                              project-root root-dir))
+              (projectile-grep-find-unignored-patterns (cdr ensure-specs)))
+          (grep-compute-defaults)
+          (cl-letf (((symbol-function 'rgrep-default-command) #'projectile-rgrep-default-command))
+            (rgrep search-regexp (or files "* .*") root-dir)
+            (when (get-buffer "*grep*")
+              ;; When grep is using a global *grep* buffer rename it to be
+              ;; scoped to the current root to allow multiple concurrent grep
+              ;; operations, one per root
+              (with-current-buffer "*grep*"
+                (rename-buffer (concat "*grep <" root-dir ">*") t)))))))
+    (run-hooks 'projectile-grep-finished-hook)))
+
+(defun projectile--ag-ignore-patterns ()
+  "Return `ag-ignore-list' entries for the project's ignore patterns.
+
+They come from `projectile--ignore-patterns'.  `ag' takes plain globs
+with no notion of anchoring, so the gitignore markers it wouldn't make
+sense of - a leading `/' or `**/', a trailing `/' - are stripped; what's
+left matches at any depth, which is as close as `ag' gets."
+  (seq-remove
+   #'string-empty-p
+   (mapcar (lambda (pattern)
+             (let ((body (string-remove-suffix "/" pattern)))
+               (cond ((string-prefix-p "**/" body) (substring body 3))
+                     ((string-prefix-p "/" body) (substring body 1))
+                     (t body))))
+           (projectile--ignore-patterns))))
+
+(defun projectile--ag (search-term &optional regexp)
+  "Run an `ag' search for SEARCH-TERM in the project.
+When REGEXP is non-nil, SEARCH-TERM is treated as a regular expression.
+Requires the `ag' Emacs package."
+  (unless (require 'ag nil 'noerror)
+    (user-error "Package `ag' is not available"))
+  (let ((ag-command (if regexp 'ag-regexp 'ag))
+        (ag-ignore-list (delq nil
+                              (seq-uniq
+                               (append
+                                ag-ignore-list
+                                (projectile--ag-ignore-patterns)
+                                ;; ag supports git ignore files directly
+                                (unless (eq (projectile-project-vcs) 'git)
+                                  (append grep-find-ignored-files
+                                          grep-find-ignored-directories
+                                          '()))))))
+        ;; reset the prefix arg, otherwise it will affect the ag-command
+        (current-prefix-arg nil))
+    (funcall ag-command search-term (projectile-acquire-root))))
+
+(defun projectile--ripgrep-ignore-globs ()
+  "Return ripgrep `--glob' exclusions for the project's ignore patterns.
+
+The patterns come from `projectile--ignore-patterns' and are passed to
+ripgrep as they are - ripgrep's globs follow gitignore rules too.
+
+Uses the `--glob=!PATTERN' form rather than `--glob \\='!PATTERN\\='', whose
+surrounding single quotes are only stripped by POSIX shells - on Windows
+`cmd' they become part of the pattern and the exclusion silently fails
+\(see #1946)."
+  (mapcar (lambda (val) (concat "--glob=!" val))
+          (projectile--ignore-patterns)))
+
+(defun projectile--ripgrep (search-term &optional regexp)
+  "Run a ripgrep (rg) search for SEARCH-TERM in the project.
+When REGEXP is non-nil, SEARCH-TERM is treated as a regular expression.
+Requires the `ripgrep' or `rg' Emacs package."
+  (let ((args (projectile--ripgrep-ignore-globs)))
+    ;; we rely on the external packages ripgrep and rg for the actual search
+    (cond ((require 'ripgrep nil 'noerror)
+           (ripgrep-regexp search-term
+                           (projectile-acquire-root)
+                           (if regexp
+                               args
+                             (cons "--fixed-strings --hidden" args))))
+          ((require 'rg nil 'noerror)
+           (rg-run search-term
+                   "*"                       ;; all files
+                   (projectile-acquire-root)
+                   (not regexp)              ;; literal search?
+                   nil                       ;; no need to confirm
+                   args))
+          (t (user-error "Packages `ripgrep' and `rg' are not available")))))
+
+;;;; Search backends registry
+
+(defvar projectile-search-backends nil
+  "Alist of registered `projectile-search' backends.
+Each entry is (NAME . PLIST); see `projectile-register-search-backend'.")
+
+(defun projectile-register-search-backend (name &rest plist)
+  "Register NAME as a `projectile-search' backend with PLIST properties.
+Recognised PLIST keys:
+  :description  a human-readable string shown in prompts;
+  :available    a zero-argument predicate returning non-nil when the
+                backend can be used (omit for an always-available one);
+  :search       a function called as (SEARCH-TERM REGEXP) to run the
+                search, REGEXP being non-nil when the term is a regular
+                expression.
+Use this to plug in your own search tool, e.g.:
+
+  (projectile-register-search-backend \\='deadgrep
+    :description \"deadgrep\"
+    :available (lambda () (require \\='deadgrep nil t))
+    :search (lambda (term _regexp) (deadgrep term (projectile-acquire-root))))"
+  (apply #'projectile-register-backend 'projectile-search-backends name plist))
+
+;; Built-ins.  Registered so the `auto' preference favours ripgrep, then grep
+;; (which is always available); ag is only used when explicitly selected.
+(projectile-register-search-backend 'ag
+  :description "the Silver Searcher (ag)"
+  :available (lambda () (require 'ag nil 'noerror))
+  :search #'projectile--ag)
+(projectile-register-search-backend 'grep
+  :description "grep (rgrep / git-grep)"
+  :search (lambda (term _regexp) (projectile--grep term)))
+(projectile-register-search-backend 'ripgrep
+  :description "ripgrep (rg)"
+  :available (lambda () (or (require 'ripgrep nil 'noerror)
+                            (require 'rg nil 'noerror)))
+  :search #'projectile--ripgrep)
+
+;;;###autoload
+(defun projectile-search (&optional search-term regexp)
+  "Search the project for SEARCH-TERM using `projectile-search-backend'.
+
+With a prefix argument treat SEARCH-TERM as a regular expression (for the
+backends that distinguish literal from regexp searches).
+
+The backend is chosen from `projectile-search-backends' according to
+`projectile-search-backend'; register new ones with
+`projectile-register-search-backend'."
+  (interactive (list nil current-prefix-arg))
+  ;; Fail fast (with a friendly error) before prompting when not in a project.
+  (projectile-acquire-root)
+  (let* ((backend (projectile--resolve-backend projectile-search-backends
+                                                projectile-search-backend
+                                                "search"))
+         (term (or search-term
+                   (projectile--read-search-string-with-default
+                    (format "Search %s%s for"
+                            (projectile--search-tool-tag (car backend))
+                            (if regexp " regexp" ""))))))
+    (funcall (plist-get (cdr backend) :search) term regexp)))
+
+;;;###autoload
+(defun projectile-grep (&optional regexp arg)
+  "Perform rgrep in the project (the grep `projectile-search' backend).
+
+With a prefix ARG asks for files (globbing-aware) which to grep in.
+With prefix ARG of `-' (such as `M--'), default the files (without prompt),
+to `projectile-grep-default-files'.
+
+With REGEXP given, don't query the user for a regexp."
+  (interactive "i\nP")
+  ;; Fail fast (with a friendly error) before prompting when not in a project.
+  (projectile-acquire-root)
+  (let ((search-regexp (or regexp
+                           (projectile--read-search-string-with-default
+                            (format "Search %s for"
+                                    (projectile--search-tool-tag "grep")))))
+        (files (and arg (or (and (equal current-prefix-arg '-)
+                                 (projectile-grep-default-files))
+                            (read-string (projectile-prepend-project-name "Grep in: ")
+                                         (projectile-grep-default-files))))))
+    (projectile--grep search-regexp files)))
+
+;;;###autoload
+(defun projectile-ag (search-term &optional arg)
+  "Run an ag search with SEARCH-TERM in the project.
+This is `projectile-search' with the ag backend.
+
+With an optional prefix argument ARG SEARCH-TERM is interpreted as a
+regular expression."
+  (interactive
+   (list (projectile--read-search-string-with-default
+          (format "Search %s%s for"
+                  (projectile--search-tool-tag "ag")
+                  (if current-prefix-arg " regexp" "")))
+         current-prefix-arg))
+  (let ((projectile-search-backend 'ag))
+    (projectile-search search-term arg)))
+
+;;;###autoload
+(defun projectile-ripgrep (search-term &optional arg)
+  "Run a ripgrep (rg) search with SEARCH-TERM in the project.
+This is `projectile-search' with the ripgrep backend.
+
+With an optional prefix argument ARG SEARCH-TERM is interpreted as a
+regular expression.
+
+This command depends on the Emacs packages ripgrep or rg being
+installed to work."
+  (interactive
+   (list (projectile--read-search-string-with-default
+          (format "Search %s%s for"
+                  (projectile--search-tool-tag "ripgrep")
+                  (if current-prefix-arg " regexp" "")))
+         current-prefix-arg))
+  (let ((projectile-search-backend 'ripgrep))
+    (projectile-search search-term arg)))
+
+(defun projectile--project-ignore-globs (root)
+  "Return ROOT's ignore patterns as gitignore globs.
+That's `projectile--ignore-patterns' verbatim: gitignore syntax is
+exactly what the tools Projectile hands these to speak (`fd --exclude',
+`git ls-files' exclude pathspecs, `rg --glob')."
+  (projectile--ignore-patterns root))
+
+(defun projectile--project-el-ignore-glob (glob)
+  "Translate the gitignore GLOB into project.el's `project-ignores' format.
+There a root-anchored pattern is spelled with a leading `./' instead of
+gitignore's leading `/' (or an interior slash), and everything else
+matches at any depth."
+  (let ((body (string-remove-suffix "/" glob)))
+    (if (string-search "/" body)
+        (concat "./" (string-remove-prefix "/" glob))
+      glob)))
+
+(defun projectile-find-references (&optional symbol)
+  "Find textual references to SYMBOL across the current project.
+
+SYMBOL defaults to the active region or the symbol at point.  The search
+is scoped to the project root and honours Projectile's ignore
+configuration (`.projectile' and the globally-ignored files and
+directories), like Projectile's other search commands.
+
+This is a backend-agnostic textual search (it greps the project for
+SYMBOL).  For semantic references from a language server or tags table,
+use the built-in `xref-find-references', which is scoped to the
+Projectile project too when `projectile-mode' is enabled."
+  (interactive)
+  (require 'xref)
+  (let* ((project-root (projectile-acquire-root))
+         (symbol (or symbol
+                     (read-string
+                      (projectile-prepend-project-name "Find references to: ")
+                      (projectile-symbol-or-selection-at-point))))
+         ;; `xref-matches-in-directory' reads its IGNORES in project.el's
+         ;; format, not gitignore's.
+         (ignores (mapcar #'projectile--project-el-ignore-glob
+                          (projectile--project-ignore-globs project-root)))
+         ;; `xref-matches-in-directory' greps for the pattern (honouring
+         ;; IGNORES) and re-matches it in-buffer to pin down columns, so a
+         ;; plain quoted symbol is the portable choice: symbol/word-boundary
+         ;; constructs (`\\_<', `\\b') don't survive the translation to the
+         ;; platform grep.
+         (regexp (regexp-quote symbol))
+         (fetcher (lambda ()
+                    (xref-matches-in-directory regexp "*" project-root ignores))))
+    (xref-show-xrefs fetcher nil)))
+
+(defmacro projectile-with-default-dir (dir &rest body)
+  "Invoke in DIR the BODY."
+  (declare (debug t) (indent 1))
+  `(let ((default-directory ,dir))
+     ,@body))
+
+;;;###autoload
+(defun projectile-run-command-in-root ()
+  "Invoke `execute-extended-command' in the project's root."
+  (interactive)
+  (projectile-with-default-dir (projectile-acquire-root)
+    (call-interactively #'execute-extended-command)))
+
+;;;###autoload
+(defun projectile-run-shell-command-in-root (command &optional output-buffer error-buffer)
+  "Invoke `shell-command' in the project's root."
+  (interactive (list (read-shell-command "Shell command: ")))
+  (projectile-with-default-dir (projectile-acquire-root)
+    (shell-command command output-buffer error-buffer)))
+
+;;;###autoload
+(defun projectile-run-async-shell-command-in-root (command &optional output-buffer error-buffer)
+  "Invoke `async-shell-command' in the project's root."
+  (interactive (list (read-shell-command "Async shell command: ")))
+  (projectile-with-default-dir (projectile-acquire-root)
+    (async-shell-command command output-buffer error-buffer)))
+
+;;;###autoload
+(defun projectile-run-gdb ()
+  "Invoke `gdb' in the project's root."
+  (interactive)
+  (projectile-with-default-dir (projectile-acquire-root)
+    (call-interactively 'gdb)))
+
+;;; Shells, REPLs and terminals
+;;
+;; `projectile-run' launches a shell, REPL or terminal in the project root
+;; using a pluggable backend (built on the generic registry defined for
+;; `projectile-search').  Register your own with
+;; `projectile-register-shell-backend'.
+
+;;;; Engines for the built-in shells (always available)
+
+(defun projectile--run-shell (new-process &optional _other-window)
+  "Invoke `shell' in the project's root.
+NEW-PROCESS forces creation of a new process instead of reusing an
+existing buffer."
+  (let ((project (projectile-acquire-root)))
+    (projectile-with-default-dir project
+      (shell (projectile-generate-process-name "shell" new-process project)))))
+
+(defun projectile--run-eshell (new-process &optional _other-window)
+  "Invoke `eshell' in the project's root.
+NEW-PROCESS forces creation of a new process instead of reusing an
+existing buffer."
+  (let ((project (projectile-acquire-root)))
+    (projectile-with-default-dir project
+      (let ((eshell-buffer-name (projectile-generate-process-name "eshell" new-process project)))
+        (eshell)))))
+
+(defun projectile--run-ielm (new-process &optional _other-window)
+  "Invoke `ielm' in the project's root.
+NEW-PROCESS forces creation of a new process instead of reusing an
+existing buffer."
+  (let* ((project (projectile-acquire-root))
+         (ielm-buffer-name (projectile-generate-process-name "ielm" new-process project)))
+    (if (get-buffer ielm-buffer-name)
+        (switch-to-buffer ielm-buffer-name)
+      (projectile-with-default-dir project
+        (ielm))
+      ;; ielm's buffer name is hardcoded, so we have to rename it after creation
+      (rename-buffer ielm-buffer-name))))
+
+(defun projectile--run-term (new-process &optional _other-window)
+  "Invoke `term' in the project's root.
+NEW-PROCESS forces creation of a new process instead of reusing an
+existing buffer."
+  (let* ((project (projectile-acquire-root))
+         (buffer-name (projectile-generate-process-name "term" new-process project))
+         (default-program (or explicit-shell-file-name
+                              (getenv "ESHELL")
+                              (getenv "SHELL")
+                              "/bin/sh")))
+    (unless (get-buffer buffer-name)
+      (require 'term)
+      (let ((program (read-from-minibuffer "Run program: " default-program)))
+        (projectile-with-default-dir project
+          (set-buffer (term-ansi-make-term buffer-name program))
+          (term-mode)
+          (term-char-mode))))
+    (switch-to-buffer buffer-name)))
+
+;;;; Engines for the package-backed terminals
+
+(defun projectile--vterm (&optional new-process other-window)
+  "Invoke `vterm' in the project's root.
+
+Use argument NEW-PROCESS to indicate creation of a new process instead.
+Use argument OTHER-WINDOW to indicate whether the buffer should
+be displayed in a different window.
+
+Switch to the project specific term buffer if it already exists."
+  (let* ((project (projectile-acquire-root))
+         (buffer (projectile-generate-process-name "vterm" new-process project)))
+    (unless (require 'vterm nil 'noerror)
+      (user-error "Package 'vterm' is not available"))
+    (if (buffer-live-p (get-buffer buffer))
+        (if other-window
+            (switch-to-buffer-other-window buffer)
+          (switch-to-buffer buffer))
+      (projectile-with-default-dir project
+        (if other-window
+            (vterm-other-window buffer)
+          (vterm buffer))))))
+
+(defun projectile--eat (&optional new-process other-window)
+  "Invoke `eat' in the project's root.
+
+Use argument NEW-PROCESS to indicate creation of a new process instead.
+Use argument OTHER-WINDOW to indicate whether the buffer should
+be displayed in a different window.
+
+Switch to the project specific eat buffer if it already exists."
+  (let* ((project (projectile-acquire-root))
+         (eat-buffer-name (projectile-generate-process-name "eat" new-process project)))
+    (unless (require 'eat nil 'noerror)
+      (user-error "Package 'eat' is not available"))
+    (projectile-with-default-dir project
+      (if other-window
+          (eat-other-window nil new-process)
+        (eat nil new-process)))))
+
+(defun projectile--ghostel (&optional new-process other-window)
+  "Invoke `ghostel' in the project's root.
+
+Use argument NEW-PROCESS to indicate creation of a new process instead.
+Use argument OTHER-WINDOW to indicate whether the buffer should
+be displayed in a different window.
+
+Switch to the project specific ghostel buffer if it already exists."
+  (unless (require 'ghostel nil 'noerror)
+    (user-error "Package 'ghostel' is not available"))
+  (let* ((project (projectile-acquire-root))
+         (ghostel-buffer-name
+          (projectile-generate-process-name "ghostel" new-process project))
+         (display-buffer-overriding-action
+          (and other-window '((display-buffer-pop-up-window)))))
+    (projectile-with-default-dir project
+      (ghostel))))
+
+;;;; Shell backend registry
+
+(defvar projectile-shell-backends nil
+  "Alist of registered `projectile-run' shell/REPL/terminal backends.
+Each entry is (NAME . PLIST); see `projectile-register-shell-backend'.")
+
+(defun projectile-register-shell-backend (name &rest plist)
+  "Register NAME as a `projectile-run' backend with PLIST properties.
+Recognised PLIST keys:
+  :description  a human-readable string shown in prompts;
+  :available    a zero-argument predicate returning non-nil when the
+                backend can be used (omit for an always-available one);
+  :run          a function called as (NEW-PROCESS OTHER-WINDOW) that
+                launches the shell/REPL/terminal in the project root.
+NEW-PROCESS is the command's prefix argument (start a fresh process);
+OTHER-WINDOW requests display in another window (honoured by the
+terminals that support it).
+
+Use this to plug in your own terminal, e.g.:
+
+  (projectile-register-shell-backend \\='mistty
+    :description \"mistty\"
+    :available (lambda () (require \\='mistty nil t))
+    :run (lambda (_new-process _other-window)
+           (mistty-in-project)))"
+  (apply #'projectile-register-backend 'projectile-shell-backends name plist))
+
+(projectile-register-shell-backend 'shell
+  :description "shell" :run #'projectile--run-shell)
+(projectile-register-shell-backend 'eshell
+  :description "eshell" :run #'projectile--run-eshell)
+(projectile-register-shell-backend 'ielm
+  :description "ielm (Emacs Lisp REPL)" :run #'projectile--run-ielm)
+(projectile-register-shell-backend 'term
+  :description "term" :run #'projectile--run-term)
+(projectile-register-shell-backend 'vterm
+  :description "vterm"
+  :available (lambda () (require 'vterm nil 'noerror))
+  :run #'projectile--vterm)
+(projectile-register-shell-backend 'eat
+  :description "eat"
+  :available (lambda () (require 'eat nil 'noerror))
+  :run #'projectile--eat)
+(projectile-register-shell-backend 'ghostel
+  :description "ghostel"
+  :available (lambda () (require 'ghostel nil 'noerror))
+  :run #'projectile--ghostel)
+
+(defun projectile--run (preference new-process other-window)
+  "Launch the shell backend PREFERENCE, passing NEW-PROCESS and OTHER-WINDOW.
+PREFERENCE is resolved against `projectile-shell-backends' the same way
+`projectile-search-backend' is (a name, `auto', or `prompt')."
+  (funcall (plist-get (cdr (projectile--resolve-backend
+                            projectile-shell-backends preference "shell"))
+                      :run)
+           new-process other-window))
+
+;;;###autoload
+(defun projectile-run (&optional arg)
+  "Run a shell, REPL or terminal in the project root.
+
+The backend is chosen from `projectile-shell-backends' according to
+`projectile-shell-backend'; register new ones with
+`projectile-register-shell-backend'.
+
+With a prefix ARG, start a fresh process instead of reusing an existing
+one."
+  (interactive "P")
+  (projectile--run projectile-shell-backend arg nil))
+
+;;;###autoload
+(defun projectile-run-shell (&optional arg)
+  "Invoke `shell' in the project's root (the shell `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead."
+  (interactive "P")
+  (projectile--run 'shell arg nil))
+
+;;;###autoload
+(defun projectile-run-eshell (&optional arg)
+  "Invoke `eshell' in the project's root (the eshell `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead."
+  (interactive "P")
+  (projectile--run 'eshell arg nil))
+
+;;;###autoload
+(defun projectile-run-ielm (&optional arg)
+  "Invoke `ielm' in the project's root (the ielm `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead."
+  (interactive "P")
+  (projectile--run 'ielm arg nil))
+
+;;;###autoload
+(defun projectile-run-term (&optional arg)
+  "Invoke `term' in the project's root (the term `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead."
+  (interactive "P")
+  (projectile--run 'term arg nil))
+
+;;;###autoload
+(defun projectile-run-vterm (&optional arg)
+  "Invoke `vterm' in the project's root (the vterm `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead."
+  (interactive "P")
+  (projectile--run 'vterm arg nil))
+
+;;;###autoload (autoload 'projectile-run-vterm-other-window "projectile" nil t)
+(projectile--define-display-variants projectile-run-vterm (&optional arg)
+  "Invoke `vterm' in the project's root, displayed in another %s.
+Use a prefix argument ARG to indicate creation of a new process instead."
+  :places (window)
+  (projectile--run 'vterm arg t))
+
+;;;###autoload
+(defun projectile-run-eat (&optional arg)
+  "Invoke `eat' in the project's root (the eat `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead."
+  (interactive "P")
+  (projectile--run 'eat arg nil))
+
+;;;###autoload (autoload 'projectile-run-eat-other-window "projectile" nil t)
+(projectile--define-display-variants projectile-run-eat (&optional arg)
+  "Invoke `eat' in the project's root, displayed in another %s.
+Use a prefix argument ARG to indicate creation of a new process instead."
+  :places (window)
+  (projectile--run 'eat arg t))
+
+;;;###autoload
+(defun projectile-run-ghostel (&optional arg)
+  "Invoke `ghostel' in the project's root (the ghostel `projectile-run' backend).
+Use a prefix argument ARG to indicate creation of a new process instead."
+  (interactive "P")
+  (projectile--run 'ghostel arg nil))
+
+;;;###autoload (autoload 'projectile-run-ghostel-other-window "projectile" nil t)
+(projectile--define-display-variants projectile-run-ghostel (&optional arg)
+  "Invoke `ghostel' in the project's root, displayed in another %s.
+Use a prefix argument ARG to indicate creation of a new process instead."
+  :places (window)
+  (projectile--run 'ghostel arg t))
+
+(defun projectile-files-from-cmd (cmd directory)
+  "Use a grep-like CMD to search for files within DIRECTORY.
+
+CMD should include the necessary search params and should output
+equivalently to grep -HlI (only unique matching filenames).
+Returns a list of expanded filenames."
+  (let ((default-directory directory))
+    (mapcar (lambda (str)
+              ;; `expand-file-name' (rather than `concat') so the results
+              ;; are in canonical form even when DIRECTORY is abbreviated
+              ;; (e.g. "~/project/"), and thus comparable with other
+              ;; expanded file names (#1115).
+              (expand-file-name str directory))
+            (split-string
+             (string-trim (shell-command-to-string cmd))
+             "\n+"
+             t))))
+
+;; The listing is case-insensitive on purpose: it's only used to narrow
+;; down the files to visit, and the actual (case-sensitive or smart-case)
+;; matching happens in Emacs afterwards.  A case-sensitive listing would
+;; silently drop files that a case-insensitive replacement should have
+;; touched (#1115).
+;;
+;; This alist is the customizable source of each tool's *base* command.
+;; How the optional file-extension filter is layered on top lives in
+;; `projectile--search-tool-descriptors', and both are combined by
+;; `projectile--construct-files-with-string-command'.
+(defvar projectile-files-with-string-commands
+  '((rg . "rg -liF --no-heading --color never ")
+    (ag . "ag --literal --ignore-case --nocolor --noheading -l ")
+    (ack . "ack --literal --ignore-case --nocolor -l ")
+    (git . "git grep -HlIiF ")
+    ;; -r: recursive
+    ;; -H: show filename for each match
+    ;; -l: show only file names with matches
+    ;; -I: no binary files
+    ;; -i: ignore case
+    ;; -F: interpret pattern as fixed string, not regexp
+    (grep . "grep -rHlIiF %s .")))
+
+;; One descriptor per search tool, capturing how the (optional) file
+;; extension filter is expressed.  Combined with the tool's base command
+;; from `projectile-files-with-string-commands', this drives
+;; `projectile--construct-files-with-string-command' so the five
+;; per-tool constructors need not repeat the same skeleton.  Keys:
+;;
+;;   :kind        how the filter attaches to the base command --
+;;                `prefix' inserts it between the base and the search term
+;;                (rg, ag); `suffix' appends it after the whole command
+;;                (git, grep); `pipe' feeds a separate file listing into
+;;                the base command (ack).
+;;   :ext-regexp  when non-nil, the extension glob is turned into an
+;;                anchored regexp via `projectile--search-glob-to-regexp'
+;;                (ag, ack) rather than passed through verbatim.
+;;   :ext-open    text emitted just before the extension.
+;;   :ext-close   text emitted just after the extension.
+;;   :term-format when non-nil, the base command is a format string whose
+;;                %s is the search term (grep) rather than a prefix the
+;;                term is concatenated onto.
+(defvar projectile--search-tool-descriptors
+  '((rg   . (:kind prefix :ext-open "-g '" :ext-close "' "))
+    (ag   . (:kind prefix :ext-regexp t :ext-open "-G " :ext-close "$ "))
+    (ack  . (:kind pipe :ext-regexp t))
+    (git  . (:kind suffix :ext-open "  -- '" :ext-close "'"))
+    (grep . (:kind suffix :term-format t :ext-open " --include '" :ext-close "'"))))
+
+(defun projectile--search-glob-to-regexp (file-ext)
+  "Turn extension glob FILE-EXT into the regexp body used by ag/ack.
+Dots are escaped and \"*\" wildcards dropped, e.g. \"*.el\" becomes
+\"\\.el\"; the caller anchors it with a trailing \"$\"."
+  (replace-regexp-in-string
+   "\\*" ""
+   (replace-regexp-in-string "\\." "\\\\." file-ext)))
+
+(defun projectile--construct-files-with-string-command (tool search-term &optional file-ext)
+  "Build TOOL's files-with-string command for SEARCH-TERM.
+The base command comes from `projectile-files-with-string-commands'
+and, when FILE-EXT is a string, the extension filter described by
+`projectile--search-tool-descriptors' is layered on top."
+  (let* ((base (alist-get tool projectile-files-with-string-commands))
+         (desc (alist-get tool projectile--search-tool-descriptors))
+         (term-format (plist-get desc :term-format))
+         ;; the plain, no-extension command, shared by every :kind
+         (core (if term-format (format base search-term)
+                 (concat base search-term))))
+    (if (not (stringp file-ext))
+        core
+      (let ((ext (if (plist-get desc :ext-regexp)
+                     (projectile--search-glob-to-regexp file-ext)
+                   file-ext))
+            (open (plist-get desc :ext-open))
+            (close (plist-get desc :ext-close)))
+        (pcase (plist-get desc :kind)
+          ('prefix (concat base open ext close search-term))
+          ('suffix (concat core open ext close))
+          ('pipe (concat "ack -g '" ext "$' | " base "-x " search-term)))))))
+
+(defun projectile--rg-construct-command (search-term &optional file-ext)
+  "Construct Rg option to search files by the extension FILE-EXT."
+  (projectile--construct-files-with-string-command 'rg search-term file-ext))
+
+(defun projectile--ag-construct-command (search-term &optional file-ext)
+  "Construct Ag option to search files by the extension FILE-EXT."
+  (projectile--construct-files-with-string-command 'ag search-term file-ext))
+
+(defun projectile--ack-construct-command (search-term &optional file-ext)
+  "Construct Ack option to search files by the extension FILE-EXT."
+  (projectile--construct-files-with-string-command 'ack search-term file-ext))
+
+(defun projectile--git-grep-construct-command (search-term &optional file-ext)
+  "Construct Grep option to search files by the extension FILE-EXT."
+  (projectile--construct-files-with-string-command 'git search-term file-ext))
+
+(defun projectile--grep-construct-command (search-term &optional file-ext)
+  "Construct Grep option to search files by the extension FILE-EXT."
+  (projectile--construct-files-with-string-command 'grep search-term file-ext))
+
+(defun projectile-files-with-string (string directory &optional file-ext)
+  "Return a list of all files containing STRING in DIRECTORY.
+
+Tries to use rg, ag, ack, git-grep, and grep in that order.  If those
+are impossible (for instance on Windows), returns a list of all
+files in the project."
+  (if (projectile-unixy-system-p)
+      (let* ((search-term (shell-quote-argument string))
+             (cmd (cond ((executable-find "rg")
+                         (projectile--rg-construct-command search-term file-ext))
+                        ((executable-find "ag")
+                         (projectile--ag-construct-command search-term file-ext))
+                        ((executable-find "ack")
+                         (projectile--ack-construct-command search-term file-ext))
+                        ((and (executable-find "git")
+                              ;; DIRECTORY's VCS, not the current project's -
+                              ;; a group search asks about each member in turn
+                              (eq (projectile-project-vcs directory) 'git))
+                         (projectile--git-grep-construct-command search-term file-ext))
+                        (t
+                         (projectile--grep-construct-command search-term file-ext)))))
+        (projectile-files-from-cmd cmd directory))
+    ;; we have to reject directories as a workaround to work with git submodules
+    (seq-remove
+     #'file-directory-p
+     (mapcar #'(lambda (file) (expand-file-name file directory))
+             (projectile-dir-files directory)))))
+
+(defun projectile--replace-in-files (from to files)
+  "Query-replace matches of the regexp FROM with TO in FILES.
+
+Buffers that are already visiting one of FILES are scanned from the
+beginning of the buffer; older Emacsen (< 28.1) would otherwise resume
+the scan from point in such buffers and silently skip any matches
+before it (#1677)."
+  (dolist (file files)
+    (when-let* ((buffer (get-file-buffer file)))
+      (with-current-buffer buffer
+        (goto-char (point-min)))))
+  (fileloop-initialize-replace from to files 'default)
+  (fileloop-continue))
+
+;;;###autoload
+(defun projectile-replace (&optional arg)
+  "Replace a literal string in the project's files.
+
+With a prefix argument ARG prompts you for a directory and file name patterns
+on which to run the replacement."
+  (interactive "P")
+  (let* ((directory (if arg
+                        (file-name-as-directory
+                         (read-directory-name "Replace in directory: "))
+                      (projectile-acquire-root)))
+         (file-ext (if arg
+                       (if (fboundp #'helm-grep-get-file-extensions)
+                           (car (helm-grep-get-file-extensions (list directory)))
+                         (read-string
+                          (projectile-prepend-project-name
+                           "With file extension (empty string means all files): ")))
+                     nil))
+         (old-text (read-string
+                    (projectile-prepend-project-name "Replace: ")
+                    (projectile-symbol-or-selection-at-point)))
+         (new-text (read-string
+                    (projectile-prepend-project-name
+                     (format "Replace %s with: " old-text))))
+         (files (projectile-files-with-string old-text directory file-ext))
+         ;; Filter results through the project's file list so that files
+         ;; ignored via .projectile or other ignore rules are excluded.
+         (project-files (mapcar (lambda (file) (expand-file-name file directory))
+                                (projectile-dir-files directory)))
+         (filtered-files (seq-filter (lambda (f) (member f project-files)) files)))
+    (projectile--replace-in-files (regexp-quote old-text) new-text filtered-files)))
+
+;;;###autoload
+(defun projectile-replace-regexp (&optional arg)
+  "Replace a regexp in the project's files.
+
+With a prefix argument ARG prompts you for a directory on which
+to run the replacement."
+  (interactive "P")
+  (let* ((directory (if arg
+                        (file-name-as-directory
+                         (read-directory-name "Replace regexp in directory: "))
+                      (projectile-acquire-root)))
+         (old-text (read-string
+                    (projectile-prepend-project-name "Replace regexp: ")
+                    (projectile-symbol-or-selection-at-point)))
+         (new-text (read-string
+                    (projectile-prepend-project-name
+                     (format "Replace regexp %s with: " old-text))))
+         (files
+          ;; We have to reject directories as a workaround to work with git submodules.
+          ;; We also reject nonexistent files to avoid errors during replacement.
+          ;;
+          ;; We can't narrow the list of files with
+          ;; `projectile-files-with-string' because those regexp tools
+          ;; don't support Emacs regular expressions.
+          (seq-remove
+           (lambda (f) (or (file-directory-p f) (not (file-exists-p f))))
+           (mapcar #'(lambda (file) (expand-file-name file directory))
+                   (projectile-dir-files directory)))))
+    (projectile--replace-in-files old-text new-text files)))
+
+;;; Reviewable project-wide find-and-replace
+;;
+;; `projectile-replace' and `projectile-replace-regexp' above drive a
+;; blocking, sequential query-replace walk with no preview.  The commands
+;; below add a results-buffer flow instead: gather every match up front,
+;; render them in a read-only buffer where each match can be toggled on or
+;; off, and apply only the enabled ones (in any order).  Answers #1924.
+;;
+;; Matches are gathered in pure Emacs Lisp (not via grep) so that Emacs
+;; regexp semantics are preserved for the regexp command and so the preview
+;; reflects the exact text that will be edited, including unsaved changes in
+;; already-open buffers.
+;;
+;; The write-back and buffer-refresh structure borrows from the GPL-3
+;; packages wgrep (`wgrep-commit-file') and color-rg (`color-rg-apply-changed'):
+;; edits are applied from the highest buffer position downwards so earlier
+;; edits don't invalidate later match offsets, live buffers are edited in
+;; place under a single `atomic-change-group', and buffers modified since the
+;; scan are skipped rather than corrupted.
+
+(define-obsolete-variable-alias 'projectile-replace-max-matches
+  'projectile-search-max-matches "3.4.0")
+
+(defcustom projectile-search-max-matches 5000
+  "Upper bound on how many matches a review buffer collects.
+Applies to `projectile-search-review' and `projectile-replace-review'
+alike.  When a search would exceed this, only the first that many
+matches are shown and a note is displayed."
+  :group 'projectile
+  :type 'natnum
+  :package-version '(projectile . "3.2.0"))
+
+(defcustom projectile-search-whole-word nil
+  "Whether the reviewable search/replace start in whole-word mode.
+Seeds `projectile-replace--word' for a fresh `projectile-search-review'
+or `projectile-replace-review'; you can still toggle it per search with
+`w' in the results buffer, and the `projectile-dispatch' `--word' switch
+binds it for a single invocation."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.2.0"))
+
+(define-obsolete-variable-alias 'projectile-replace-async
+  'projectile-search-async "3.4.0")
+
+(defcustom projectile-search-async t
+  "Whether the reviewable search/replace commands scan asynchronously.
+When non-nil (the default) `projectile-replace-review',
+`projectile-search-review' and their in-buffer re-scan commands (`g',
+`c', `x') scan candidate files in timer-yielded chunks: the results
+buffer is shown right away, matches stream in as they are found, Emacs
+stays responsive, and the scan can be canceled (`q', \\`C-g', or by
+killing the buffer).  While a scan is still running, applying (`!') and
+exporting (`e') refuse until it finishes so the write-back never runs
+against a partial match set.  When nil the scan runs synchronously in one
+blocking pass instead.
+
+Regardless of this setting, in batch mode (`noninteractive') the scan is
+always synchronous so scripted runs stay deterministic.  The final match
+set is identical whether scanning runs asynchronously or synchronously;
+async only changes when and how matches are delivered."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.2.0"))
+
+(defcustom projectile-search-use-ripgrep t
+  "Whether `projectile-search-review' accelerates literal search with ripgrep.
+When non-nil (the default) a literal `projectile-search-review' scan
+uses ripgrep (`rg') to find matches when the `rg' executable is
+available, which returns near-instantly even on a large project;
+otherwise, and always for the regexp search command and for every part
+of the replace reviewer, the portable pure-Emacs-Lisp scan is used.
+
+The ripgrep fast-path's result set follows ripgrep's own ignore rules
+\(`.gitignore', `.ignore', hidden-file handling, and so on) plus
+Projectile's ignore globs (`.projectile' and the globally-ignored files
+and directories, passed to `rg' via `--glob'), and skips matches in files
+that aren't valid UTF-8, so it can differ slightly from the pure-elisp
+path's `projectile-dir-files' set (for example in how
+hidden files or symlinks are treated).  This is an accepted trade-off for
+speed; set this to nil to force the elisp scan, whose result set matches
+Projectile's ignore configuration exactly.
+
+The regexp search command always uses the elisp scan (ripgrep's regex
+syntax is not Emacs regexp syntax), and the whole replace reviewer always
+uses the elisp scan (its write-back needs the exact buffer positions the
+elisp scan records).  A command that knows a ripgrep-syntax equivalent of
+its Emacs regexp can opt into the fast-path anyway, which is what
+`projectile-todos' does.  In batch mode (`noninteractive') the elisp scan
+is used so scripted runs stay deterministic."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.2.0"))
+
+(defcustom projectile-todo-keywords
+  '("TODO" "FIXME" "HACK" "XXX" "BUG" "NOTE")
+  "Annotation keywords `projectile-todos' collects across the project.
+Each keyword is matched as a whole word, case-sensitively, and must be
+followed by a colon, by whitespace or by the end of the line - so `TODO:'
+and `FIXME ' are hits while `TODOS' and `MASTODON' are not.  Add your own
+project's conventions here (`REVIEW', `OPTIMIZE', `DEPRECATED', ...);
+`projectile-todos' with a prefix argument prompts for which of these to
+search for.
+
+The keywords are not required to sit in a comment: neither the pure-elisp
+scan nor the ripgrep fast-path parses the language, so an annotation in a
+string or in prose is reported too."
+  :group 'projectile
+  :type '(repeat string)
+  :package-version '(projectile . "3.3.0"))
+
+(define-obsolete-variable-alias 'projectile-replace-scan-chunk-size
+  'projectile-search-scan-chunk-size "3.4.0")
+
+(defcustom projectile-search-scan-chunk-size 24
+  "Number of candidate files scanned per async chunk before yielding.
+Each chunk scans this many files, delivers the matches into the results
+buffer and re-renders, then yields to redisplay via a zero-delay timer
+before the next chunk.  Larger values scan faster but redisplay less
+often; smaller values keep Emacs more responsive."
+  :group 'projectile
+  :type 'natnum
+  :package-version '(projectile . "3.2.0"))
+
+(defface projectile-replace-file
+  '((t :inherit font-lock-function-name-face :weight bold))
+  "Face for the per-file header lines in the replace results buffer."
+  :group 'projectile
+  :package-version '(projectile . "3.2.0"))
+
+(defface projectile-replace-match
+  '((t :inherit match))
+  "Face for a matched span shown without a pending replacement."
+  :group 'projectile
+  :package-version '(projectile . "3.2.0"))
+
+(defface projectile-replace-old
+  '((t :inherit diff-removed :strike-through t))
+  "Face for the old text of a match with a pending replacement."
+  :group 'projectile
+  :package-version '(projectile . "3.2.0"))
+
+(defface projectile-replace-new
+  '((t :inherit diff-added))
+  "Face for the new text of a match with a pending replacement."
+  :group 'projectile
+  :package-version '(projectile . "3.2.0"))
+
+(defface projectile-replace-line-number
+  '((t :inherit shadow))
+  "Face for the LINE:COL locator of each match."
+  :group 'projectile
+  :package-version '(projectile . "3.2.0"))
+
+(defface projectile-replace-header
+  '((t :inherit font-lock-keyword-face :weight bold))
+  "Face for the status header line of the replace results buffer."
+  :group 'projectile
+  :package-version '(projectile . "3.2.0"))
+
+(defvar projectile-replace-buffer-name "*projectile-replace*"
+  "Name of the buffer used by `projectile-replace-review'.")
+
+(cl-defstruct (projectile-replace--match
+               (:constructor projectile-replace--match-create)
+               (:copier nil))
+  "A single match collected for the reviewable replace UI."
+  file        ; absolute file name
+  buffer      ; live buffer visiting FILE, or nil when scanned from disk
+  tick        ; `buffer-chars-modified-tick' of BUFFER at scan time (or nil)
+  line        ; 1-based line number of the match
+  column      ; 0-based character offset of the match within its line
+  beg         ; buffer position of the match start (in BUFFER or a disk re-read)
+  end         ; buffer position of the match end
+  string      ; the matched text
+  match-data  ; copy of `(match-data t)' for the match (positions only)
+  groups      ; list of matched-group strings, index 0 = whole match
+  context     ; the whole line the match sits on
+  enabled)    ; non-nil when the match will be applied
+
+;; Buffer-local state of a `*projectile-replace*' buffer.
+(defcustom projectile-search-render-interval 0.1
+  "Seconds to leave between redraws while search results stream in.
+
+The results buffer is redrawn from scratch, so a redraw costs time
+proportional to the matches found so far - about 1 ms at a hundred
+matches and 70 ms at five thousand.  Redrawing on every chunk therefore
+costs roughly the number of chunks times the number of matches, which on
+a large search is most of the run rather than a detail of it.
+
+The redraw at the end of a scan is unconditional, so this only delays
+intermediate states.  Set it to nil to redraw on every chunk."
+  :group 'projectile
+  :type '(choice (const :tag "Redraw on every chunk" nil)
+                 (number :tag "Seconds between redraws"))
+  :package-version '(projectile . "3.5.0"))
+
+(defvar-local projectile-replace--last-render 0.0
+  "When this results buffer was last redrawn, as a `float-time'.
+Zero in a freshly seeded buffer, so the first chunk always draws.")
+
+(defvar-local projectile-replace--root nil
+  "Directory the current results buffer's file names are shown relative to.
+For an ordinary search that is the project root; for a search over a
+group of projects it is the innermost directory containing all of them,
+so each match is labelled with the project it came from.")
+(defvar-local projectile-replace--projects nil
+  "Project roots the current results buffer was gathered from.
+Always a list - a one-element one for an ordinary single-project search.
+This, not `projectile-replace--root', is what a re-scan re-reads, so
+re-searching a group of projects covers the same group again.")
+(defvar-local projectile-replace--term nil
+  "Raw search term the current results buffer was gathered with.")
+(defvar-local projectile-replace--search nil
+  "Emacs regexp actually searched for (the term, `regexp-quote'd if literal).")
+(defvar-local projectile-replace--replacement nil
+  "Pending replacement string for the current results buffer.")
+(defvar-local projectile-replace--literal nil
+  "Non-nil when the current results buffer is a literal (not regexp) replace.")
+(defvar-local projectile-replace--case-fold nil
+  "Non-nil when the current search ignores case.
+Initialized from `case-fold-search' at the first search and bound
+around every (re-)gather so it drives which matches are collected.")
+(defvar-local projectile-replace--word nil
+  "Non-nil when the current search only matches whole words.
+Initialized from `projectile-search-whole-word' at the first search; the
+scan regexp is fenced with word boundaries (and ripgrep gets
+`--word-regexp') while it holds.")
+(defvar-local projectile-replace--rg-pattern nil
+  "A ripgrep-syntax equivalent of this buffer's search, or nil.
+Set by commands that build a non-literal search from a pattern they can
+also express in ripgrep's regex syntax (`projectile-todos'), so the
+read-only search reviewer's ripgrep fast-path can run for them too.  Nil
+means the fast-path is only available to a literal search.  Cleared when
+the search changes shape (the literal/regexp toggle), since the new
+search has no known ripgrep equivalent.")
+(defvar-local projectile-replace--matches nil
+  "List of `projectile-replace--match' structs shown in the results buffer.")
+(defvar-local projectile-replace--truncated nil
+  "Non-nil when the match list was capped at `projectile-search-max-matches'.")
+(defvar-local projectile-replace--filtered nil
+  "Non-nil when the shown match list was pruned by a filter command.
+Re-searching (\\<projectile-replace-mode-map>\\[projectile-replace--refresh]) gathers from scratch and clears this.")
+(defvar-local projectile-replace--scanning nil
+  "Non-nil while an asynchronous scan is still filling this results buffer.
+While set, matches are streaming in, the header shows a progress note,
+and applying and exporting refuse (the write-back must never run against
+a partial match set).  Cleared when the scan finishes or is canceled.")
+(defvar-local projectile-replace--scan-timer nil
+  "The in-flight async scan timer for this results buffer, or nil.
+Held so a re-scan, a quit, or killing the buffer can cancel a scan that
+is still running.")
+(defvar-local projectile-replace--scan-process nil
+  "The in-flight ripgrep subprocess filling this results buffer, or nil.
+Only the read-only search reviewer's ripgrep fast-path uses this; the
+pure-elisp async scan uses `projectile-replace--scan-timer' instead.
+Held so a re-scan, a quit, or killing the buffer can kill a scan that is
+still running, leaving no orphaned process.")
+(defvar-local projectile-replace--scan-generation 0
+  "Monotonic token identifying the current async scan of this buffer.
+Every (re-)scan and every cancel bumps it; a chunk timer carries the
+generation it was scheduled under and no-ops when it no longer matches.
+This way a timer that already fired and is waiting to run can't append
+to a newer scan's match list if it is superseded in the meantime.")
+(defvar-local projectile-replace--render-function #'projectile-replace--render
+  "Function that redraws the current results buffer from its state.
+The scanning, navigation, filter and toggle machinery is shared
+between the replace reviewer and the read-only search reviewer
+(`projectile-search-mode'); this buffer-local seam lets those shared
+commands redraw with the current mode's renderer.  It defaults to the
+replace renderer and search mode rebinds it to its own.")
+
+(defun projectile-replace--expand (replacement groups literal)
+  "Expand REPLACEMENT for a match whose group strings are GROUPS.
+GROUPS is a list of matched substrings, index 0 being the whole match.
+When LITERAL is non-nil REPLACEMENT is returned verbatim; otherwise
+\\N and \\& references are expanded from GROUPS (\\\\ yields a
+backslash).  The same expansion drives both the preview and the actual
+write-back so the two can never diverge."
+  (if literal
+      replacement
+    (let ((result "")
+          (i 0)
+          (len (length replacement)))
+      (while (< i len)
+        (let ((ch (aref replacement i)))
+          (if (and (eq ch ?\\) (< (1+ i) len))
+              (let ((next (aref replacement (1+ i))))
+                (cond
+                 ((eq next ?&)
+                  (setq result (concat result (or (nth 0 groups) ""))))
+                 ((and (>= next ?0) (<= next ?9))
+                  (setq result (concat result (or (nth (- next ?0) groups) ""))))
+                 ((eq next ?\\)
+                  (setq result (concat result "\\")))
+                 (t (setq result (concat result (char-to-string next)))))
+                (setq i (+ i 2)))
+            (setq result (concat result (char-to-string ch)))
+            (setq i (1+ i)))))
+      result)))
+
+(defun projectile-replace--capture-groups ()
+  "Return the matched-group strings for the last search in this buffer.
+Index 0 is the whole match; unmatched optional groups are nil."
+  (let ((n (/ (length (match-data)) 2))
+        (groups nil))
+    (dotimes (i n)
+      (push (match-string i) groups))
+    (nreverse groups)))
+
+(defun projectile-replace--binary-p ()
+  "Return non-nil when the current buffer looks like binary content.
+Only the leading portion is inspected, which is enough to skip files
+whose NUL bytes would make an in-buffer replacement meaningless."
+  (save-excursion
+    (goto-char (point-min))
+    (search-forward "\0" (min (point-max) (+ (point-min) 8000)) t)))
+
+(defun projectile-replace--scan-region (file buffer regexp budget)
+  "Collect up to BUDGET matches of REGEXP in the current buffer.
+Each match is recorded as a `projectile-replace--match' tagged with
+FILE and BUFFER (nil when scanning a disk re-read)."
+  (let ((matches nil)
+        (count 0)
+        (done nil)
+        (tick (and buffer (buffer-chars-modified-tick buffer))))
+    (save-excursion
+      (goto-char (point-min))
+      (while (and (not done)
+                  (< count budget)
+                  (re-search-forward regexp nil t))
+        (if (= (match-beginning 0) (match-end 0))
+            ;; A regexp that can match the empty string (e.g. `^', `a*')
+            ;; leaves point put; advance past it, but at end-of-buffer there
+            ;; is nowhere to advance, so stop rather than spin forever.
+            (if (eobp)
+                (setq done t)
+              (forward-char 1))
+          (let ((beg (match-beginning 0))
+                (end (match-end 0))
+                (md (match-data t))
+                (groups (projectile-replace--capture-groups))
+                line lstart col context)
+            (save-excursion
+              (goto-char beg)
+              (setq line (line-number-at-pos)
+                    lstart (line-beginning-position)
+                    col (- beg lstart)
+                    context (buffer-substring-no-properties
+                             lstart (line-end-position))))
+            (push (projectile-replace--match-create
+                   :file file :buffer buffer :tick tick
+                   :line line :column col :beg beg :end end
+                   :string (buffer-substring-no-properties beg end)
+                   :match-data md :groups groups
+                   :context context :enabled t)
+                  matches)
+            (cl-incf count)))))
+    (nreverse matches)))
+
+(defun projectile-replace--scan-file (file regexp budget)
+  "Return up to BUDGET matches of REGEXP in FILE.
+A file visited in a live buffer is scanned from that buffer's current
+text (so the preview matches what will be edited, even when the buffer
+has unsaved changes); otherwise it is read from disk into a temp buffer.
+Binary-looking and unreadable files are skipped."
+  ;; Capture the intended `case-fold-search' (bound dynamically around the
+  ;; gather) before entering a live buffer, then re-establish it there: some
+  ;; major modes make `case-fold-search' buffer-local, which would otherwise
+  ;; shadow the dynamic binding and make the case toggle a no-op for that file.
+  (let ((buffer (get-file-buffer file))
+        (fold case-fold-search))
+    (if buffer
+        (with-current-buffer buffer
+          (let ((case-fold-search fold))
+            (projectile-replace--scan-region file buffer regexp budget)))
+      (condition-case nil
+          (with-temp-buffer
+            ;; Read what is on disk.  `insert-file-contents' dispatches
+            ;; through `file-name-handler-alist', so jka-compr decompresses
+            ;; every archive in the candidate set and EPA decrypts every
+            ;; `.gpg' - work thrown away a line later when the result is
+            ;; classified as binary, and which on an encrypted file can stop
+            ;; the whole search on a passphrase prompt.  Only those two
+            ;; handlers are inhibited, so a remote project still reads
+            ;; through TRAMP.
+            (let ((inhibit-file-name-handlers
+                   (append '(jka-compr-handler epa-file-handler)
+                           inhibit-file-name-handlers))
+                  (inhibit-file-name-operation 'insert-file-contents))
+              (insert-file-contents file))
+            (unless (projectile-replace--binary-p)
+              (let ((case-fold-search fold))
+                (projectile-replace--scan-region file nil regexp budget))))
+        (error nil)))))
+
+(defun projectile-replace--gather (candidates regexp)
+  "Scan CANDIDATES for REGEXP, capped at `projectile-search-max-matches'.
+Return a plist with `:matches' (the collected structs, in file order)
+and `:truncated' (non-nil when the cap was hit)."
+  (let ((all nil)
+        (budget projectile-search-max-matches)
+        (truncated nil))
+    (dolist (file candidates)
+      (if (> budget 0)
+          (let ((ms (projectile-replace--scan-file file regexp budget)))
+            (setq all (append all ms)
+                  budget (- budget (length ms))))
+        ;; a candidate was left unscanned because the cap was already hit
+        (setq truncated t)))
+    (list :matches all :truncated truncated)))
+
+;;; Asynchronous, cancelable scanning
+;;
+;; The synchronous `projectile-replace--gather' above stays the primitive that
+;; batch runs and the tests drive.  The async driver below reuses the very same
+;; per-file `projectile-replace--scan-file', so the structs it produces are
+;; identical to what `--gather' would produce over the same candidate list and
+;; regexp - only the DELIVERY changes: files are scanned in timer-yielded
+;; chunks, matches stream into the results buffer as they are found, and the
+;; scan can be canceled.  The `case-fold-search' that `--scan-file' reads is
+;; re-established from the buffer's `projectile-replace--case-fold' inside each
+;; chunk (the dynamic binding used by the sync path is gone once we run from a
+;; timer).
+
+(defun projectile-replace--async-p ()
+  "Return non-nil when scanning should run asynchronously.
+True when `projectile-search-async' is set and we are interactive;
+batch (`noninteractive') always scans synchronously so scripted runs stay
+deterministic."
+  (and projectile-search-async (not noninteractive)))
+
+(defun projectile-replace--cancel-scan ()
+  "Cancel any in-flight async scan in the current results buffer.
+Kills the pending chunk timer (if any) and clears the scanning flag, so
+no timer is left dangling.  Safe to call when nothing is scanning; used
+on re-scan, on quit, and from `kill-buffer-hook'."
+  (when projectile-replace--scan-timer
+    (cancel-timer projectile-replace--scan-timer))
+  (when (process-live-p projectile-replace--scan-process)
+    ;; drop our sentinel first so killing it doesn't run the finish handler
+    (set-process-sentinel projectile-replace--scan-process #'ignore)
+    (delete-process projectile-replace--scan-process))
+  ;; Bump the generation so a chunk timer that already fired and is queued
+  ;; behind us no-ops rather than resurrecting this scan.
+  (cl-incf projectile-replace--scan-generation)
+  (setq projectile-replace--scan-timer nil
+        projectile-replace--scan-process nil
+        projectile-replace--scanning nil))
+
+(defun projectile-replace--gather-async (candidates regexp buffer on-done)
+  "Scan CANDIDATES for REGEXP into BUFFER incrementally, then call ON-DONE.
+Resets BUFFER's match list and scanning state, then processes CANDIDATES
+in `projectile-search-scan-chunk-size' batches, each batch delivering
+its matches and re-rendering before yielding to redisplay via a
+zero-delay timer.  Matches accumulate in file order, so the final list is
+identical to `projectile-replace--gather' over the same CANDIDATES and
+REGEXP; `projectile-search-max-matches' and the `:truncated' note are
+honored the same way.  ON-DONE (or nil) is called in BUFFER once the scan
+finishes.  A scan already running in BUFFER should be canceled first (see
+`projectile-replace--cancel-scan')."
+  (let ((generation
+         (with-current-buffer buffer
+           (setq projectile-replace--matches nil
+                 projectile-replace--truncated nil
+                 projectile-replace--filtered nil
+                 projectile-replace--scanning t
+                 projectile-replace--scan-timer nil)
+           (cl-incf projectile-replace--scan-generation))))
+    (projectile-replace--scan-step
+     buffer candidates regexp projectile-search-max-matches on-done generation)))
+
+(defun projectile-replace--scan-step (buffer remaining regexp budget on-done generation)
+  "Scan one chunk of REMAINING candidates for REGEXP into BUFFER.
+BUDGET is the remaining match allowance.  GENERATION is the scan token
+this chunk belongs to; the step no-ops when it no longer matches BUFFER's
+current `projectile-replace--scan-generation' (i.e. the scan was
+superseded or canceled).  Delivers this chunk's matches into BUFFER and
+re-renders; while candidates and budget remain it schedules itself for
+the next chunk via a zero-delay timer, otherwise it finishes: clears the
+scanning state, does a final render and calls ON-DONE.  Guarded against a
+killed BUFFER (leaving no work behind) and against \\`C-g' during a chunk
+\(which cancels the scan cleanly)."
+  (when (and (buffer-live-p buffer)
+             (= generation
+                (buffer-local-value 'projectile-replace--scan-generation buffer)))
+    (condition-case nil
+        (let ((fold (buffer-local-value 'projectile-replace--case-fold buffer))
+              (count 0)
+              (new nil)
+              (truncated nil)
+              (stop nil))
+          ;; scan up to a chunk of files, mirroring the sync `--gather' loop:
+          ;; a file is scanned while budget remains; the first file reached
+          ;; with the budget exhausted marks the list truncated and stops.
+          (while (and remaining (not stop)
+                      (< count projectile-search-scan-chunk-size))
+            (if (> budget 0)
+                (let ((ms (let ((case-fold-search fold))
+                            (projectile-replace--scan-file
+                             (car remaining) regexp budget))))
+                  (setq new (append new ms)
+                        budget (- budget (length ms))
+                        remaining (cdr remaining)))
+              (setq truncated t stop t))
+            (cl-incf count))
+          (with-current-buffer buffer
+            (when new
+              (setq projectile-replace--matches
+                    (append projectile-replace--matches new)))
+            (when truncated
+              (setq projectile-replace--truncated t)))
+          (if (and remaining (not stop))
+              ;; more to do: show progress and yield to redisplay
+              (with-current-buffer buffer
+                ;; schedule the next chunk BEFORE rendering, so a render error
+                ;; can't strand the scan with the flag set and no pending timer
+                (setq projectile-replace--scan-timer
+                      (run-with-timer 0 nil
+                                      #'projectile-replace--scan-step
+                                      buffer remaining regexp budget on-done generation))
+                (projectile-replace--render-progress))
+            ;; finished (or budget-truncated): settle and hand off
+            (with-current-buffer buffer
+              (setq projectile-replace--scanning nil
+                    projectile-replace--scan-timer nil)
+              (projectile-replace--render-preserve)
+              (when on-done (funcall on-done buffer)))))
+      (quit
+       (when (buffer-live-p buffer)
+         (with-current-buffer buffer
+           (projectile-replace--cancel-scan)
+           (funcall projectile-replace--render-function)))))))
+
+(defun projectile-replace--ensure-not-scanning ()
+  "Refuse with a `user-error' when the results buffer is still scanning.
+The write-back and export must never run against a partial match set."
+  (when projectile-replace--scanning
+    (user-error "Still searching; wait for the scan to finish")))
+
+(defun projectile-replace--candidates (term literal case-fold directories)
+  "Return the files under DIRECTORIES worth scanning for TERM.
+DIRECTORIES is a project root, or a list of them for a search spanning a
+group of projects, in which case each contributes its own file list and
+the result is de-duplicated - two members of a group can nest (a
+monorepo and a project inside it), and a file scanned twice would be
+replaced twice, corrupting it.
+
+For a case-sensitive LITERAL search this narrows to files that contain
+TERM, via `projectile-files-with-string' - which matches
+case-insensitively, so the narrowed set is a safe superset that the scan
+then filters exactly - intersected with the project's ignore-aware file
+list.  For a regexp search, or a case-insensitive literal search, it
+returns the whole ignore-aware file list, since those can't be narrowed
+by an external grep this way."
+  (delete-dups
+   (mapcan
+    (lambda (directory)
+      (let ((project-files (mapcar (lambda (f) (expand-file-name f directory))
+                                   (projectile-dir-files directory))))
+        (if (and literal (not case-fold))
+            (seq-filter (lambda (f) (member f project-files))
+                        (projectile-files-with-string term directory))
+          (seq-remove (lambda (f) (or (file-directory-p f) (not (file-exists-p f))))
+                      project-files))))
+    ;; a recorded group can name a directory that has since been moved away
+    (seq-filter #'projectile--directory-p (ensure-list directories)))))
+
+;;; Results buffer rendering
+
+(defun projectile-replace--file-header (file root count)
+  "Return a propertized header line for FILE relative to ROOT with COUNT matches."
+  (propertize
+   (concat (propertize (file-relative-name file root)
+                       'face 'projectile-replace-file)
+           (format " (%d)\n" count))
+   'projectile-replace-file file))
+
+(defun projectile-replace--render-line (m replacement literal)
+  "Return the propertized results line for match M.
+When REPLACEMENT is non-empty and M is enabled the matched text is
+shown struck out followed by the expanded replacement; LITERAL selects
+verbatim vs. capture-group expansion.  The whole line carries the match
+struct under the `projectile-replace-match' text property."
+  (let* ((enabled (projectile-replace--match-enabled m))
+         (col (projectile-replace--match-column m))
+         (ctx (projectile-replace--match-context m))
+         (mstr (projectile-replace--match-string m))
+         (before (substring ctx 0 (min col (length ctx))))
+         (after (if (<= (+ col (length mstr)) (length ctx))
+                    (substring ctx (+ col (length mstr)))
+                  ""))
+         (has-repl (and replacement (not (string-empty-p replacement))))
+         (highlight
+          (if (and enabled has-repl)
+              (concat (propertize mstr 'face 'projectile-replace-old)
+                      (propertize (projectile-replace--expand
+                                   replacement
+                                   (projectile-replace--match-groups m)
+                                   literal)
+                                  'face 'projectile-replace-new))
+            (propertize mstr 'face 'projectile-replace-match)))
+         (indicator (if enabled "  [X] " "  [ ] "))
+         (locator (propertize (format "%d:%d: "
+                                      (projectile-replace--match-line m)
+                                      (1+ col))
+                              'face 'projectile-replace-line-number))
+         (line (concat indicator locator before highlight after "\n")))
+    (propertize line 'projectile-replace-match m)))
+
+(defun projectile-replace--header-string ()
+  "Return the propertized status header for the results buffer.
+Shows the term, the replacement (or \"(none)\"), the match and file
+counts, the mode flags (regexp/literal and case), and a note when the
+list has been filtered.  The header carries no `projectile-replace-match'
+property, so match navigation skips it."
+  (let* ((matches projectile-replace--matches)
+         (nmatches (length matches))
+         (seen (make-hash-table :test 'equal))
+         (repl (if (and projectile-replace--replacement
+                        (not (string-empty-p projectile-replace--replacement)))
+                   (format "%S" projectile-replace--replacement)
+                 "(none)"))
+         nfiles flags)
+    (dolist (m matches)
+      (puthash (projectile-replace--match-file m) t seen))
+    (setq nfiles (hash-table-count seen)
+          flags (concat
+                 (if projectile-replace--literal "[literal]" "[regexp]")
+                 " "
+                 (if projectile-replace--case-fold
+                     "[ignore-case]" "[case-sensitive]")
+                 (if projectile-replace--word " [word]" "")
+                 (if projectile-replace--filtered "  filtered" "")
+                 (projectile-replace--scanning-note nmatches)))
+    (propertize
+     (format "Replace %S with %s\n%d match%s in %d file%s  %s\n"
+             projectile-replace--term repl
+             nmatches (if (= nmatches 1) "" "es")
+             nfiles (if (= nfiles 1) "" "s")
+             flags)
+     'face 'projectile-replace-header)))
+
+(defun projectile-replace--scanning-note (nmatches)
+  "Return a progress note for a results buffer still scanning, else \"\".
+NMATCHES is the count found so far.  Shown in the status header while an
+async scan streams matches in."
+  (if projectile-replace--scanning
+      (format "  Searching... %d match%s so far"
+              nmatches (if (= nmatches 1) "" "es"))
+    ""))
+
+(defun projectile-replace--render ()
+  "Redraw the current results buffer from its buffer-local state."
+  (let ((inhibit-read-only t)
+        (root projectile-replace--root)
+        (replacement projectile-replace--replacement)
+        (literal projectile-replace--literal)
+        (matches projectile-replace--matches)
+        (counts (make-hash-table :test 'equal))
+        (prev-file nil))
+    (dolist (m matches)
+      (cl-incf (gethash (projectile-replace--match-file m) counts 0)))
+    (erase-buffer)
+    (insert (projectile-replace--header-string))
+    (insert (substitute-command-keys
+             (concat "\\<projectile-replace-mode-map>"
+                     "\\[projectile-replace--toggle] toggle  "
+                     "\\[projectile-replace--toggle-file] toggle file  "
+                     "\\[projectile-replace--set-replacement] set replacement  "
+                     "\\[projectile-replace--apply] apply  "
+                     "\\[projectile-replace--export] export  "
+                     "\\[projectile-replace--refresh] re-search  "
+                     "\\[projectile-replace--visit] visit  "
+                     "\\[projectile-replace--quit] quit\n"
+                     "\\[projectile-replace--toggle-case] case  "
+                     "\\[projectile-replace--toggle-regexp] regexp/literal  "
+                     "\\[projectile-replace--toggle-word] word  "
+                     "\\[projectile-replace--keep-matches]/\\[projectile-replace--flush-matches] keep/flush line  "
+                     "\\[projectile-replace--keep-files]/\\[projectile-replace--flush-files] keep/flush file\n\n")))
+    (if (null matches)
+        (insert "No matches.\n")
+      (dolist (m matches)
+        (let ((file (projectile-replace--match-file m)))
+          (unless (equal prev-file file)
+            (when prev-file (insert "\n"))
+            (setq prev-file file)
+            (insert (projectile-replace--file-header
+                     file root (gethash file counts))))
+          (insert (projectile-replace--render-line m replacement literal)))))
+    (when projectile-replace--truncated
+      (insert (format "\n(showing the first %d matches)\n"
+                      projectile-search-max-matches)))
+    (goto-char (point-min))))
+
+(defun projectile-replace--render-preserve ()
+  "Redraw the results buffer, keeping point on the same line.
+
+Restoring by line rather than by position is what makes this safe while a
+scan is streaming: matches are appended and a file header keeps its line
+count when its tally grows, so the lines already on screen do not move."
+  (let ((line (line-number-at-pos)))
+    (funcall projectile-replace--render-function)
+    (goto-char (point-min))
+    (forward-line (1- line))))
+
+;;; Results buffer commands
+
+(defun projectile-replace--match-at-point ()
+  "Return the match struct on the current line, or nil."
+  (get-text-property (line-beginning-position) 'projectile-replace-match))
+
+(defun projectile-replace--goto-next-match ()
+  "Move point to the next match line."
+  (interactive)
+  (let ((start (point)))
+    (forward-line 1)
+    (while (and (not (eobp)) (not (projectile-replace--match-at-point)))
+      (forward-line 1))
+    (if (projectile-replace--match-at-point)
+        (beginning-of-line)
+      (goto-char start)
+      (message "No more matches"))))
+
+(defun projectile-replace--goto-prev-match ()
+  "Move point to the previous match line."
+  (interactive)
+  (let ((start (point)))
+    (forward-line -1)
+    (while (and (not (bobp)) (not (projectile-replace--match-at-point)))
+      (forward-line -1))
+    (if (projectile-replace--match-at-point)
+        (beginning-of-line)
+      (goto-char start)
+      (message "No previous matches"))))
+
+(defun projectile-replace--goto-next-file ()
+  "Move point to the next file header."
+  (interactive)
+  (let ((start (point)))
+    (forward-line 1)
+    (while (and (not (eobp))
+                (not (get-text-property (line-beginning-position)
+                                        'projectile-replace-file)))
+      (forward-line 1))
+    (if (get-text-property (line-beginning-position) 'projectile-replace-file)
+        (beginning-of-line)
+      (goto-char start)
+      (message "No more files"))))
+
+(defun projectile-replace--goto-prev-file ()
+  "Move point to the previous file header."
+  (interactive)
+  (let ((start (point)))
+    (forward-line -1)
+    (while (and (not (bobp))
+                (not (get-text-property (line-beginning-position)
+                                        'projectile-replace-file)))
+      (forward-line -1))
+    (if (get-text-property (line-beginning-position) 'projectile-replace-file)
+        (beginning-of-line)
+      (goto-char start)
+      (message "No previous files"))))
+
+(defun projectile-replace--visit ()
+  "Visit the match on the current line in another window."
+  (interactive)
+  (let ((m (projectile-replace--match-at-point)))
+    (unless m (user-error "No match on this line"))
+    (let ((buf (or (projectile-replace--match-buffer m)
+                   (find-file-noselect (projectile-replace--match-file m))))
+          (line (projectile-replace--match-line m))
+          (col (projectile-replace--match-column m)))
+      (switch-to-buffer-other-window buf)
+      (goto-char (point-min))
+      (forward-line (1- line))
+      (forward-char (min col (- (line-end-position) (point)))))))
+
+(defun projectile-replace--toggle ()
+  "Toggle whether the match on the current line will be applied."
+  (interactive)
+  (let ((m (projectile-replace--match-at-point)))
+    (unless m (user-error "No match on this line"))
+    (setf (projectile-replace--match-enabled m)
+          (not (projectile-replace--match-enabled m)))
+    (projectile-replace--render-preserve)))
+
+(defun projectile-replace--toggle-file ()
+  "Toggle all matches in the file of the match on the current line.
+If any of the file's matches are enabled they are all disabled;
+otherwise they are all enabled."
+  (interactive)
+  (let ((m (projectile-replace--match-at-point)))
+    (unless m (user-error "No match on this line"))
+    (let* ((file (projectile-replace--match-file m))
+           (fmatches (cl-remove-if-not
+                      (lambda (x) (equal (projectile-replace--match-file x) file))
+                      projectile-replace--matches))
+           (target (not (cl-every #'projectile-replace--match-enabled fmatches))))
+      (dolist (x fmatches)
+        (setf (projectile-replace--match-enabled x) target)))
+    (projectile-replace--render-preserve)))
+
+(defun projectile-replace--set-replacement ()
+  "Re-read the replacement string and re-render the previews."
+  (interactive)
+  (setq projectile-replace--replacement
+        (read-string (format "Replace %s with: " projectile-replace--term)
+                     projectile-replace--replacement))
+  (projectile-replace--render-preserve))
+
+(defun projectile-replace--regather ()
+  "Re-run the search from scratch into the buffer-local match list.
+Cancels any in-flight scan first, then re-scans (asynchronously when
+`projectile-replace--async-p' holds, else synchronously) with
+`case-fold-search' honoring `projectile-replace--case-fold', clearing any
+active filter because the list is rebuilt from every match in the
+project.  Because the match list is rebuilt, every match comes back
+enabled: re-scanning (via `g', the case toggle, or the regexp toggle)
+resets any per-match include or exclude toggles you had set.  Use the
+filter commands instead to prune the list while preserving the survivors'
+state.  The re-render happens from the (streaming) scan, so callers need
+not render again."
+  (let* ((term projectile-replace--term)
+         (literal projectile-replace--literal)
+         (case-fold projectile-replace--case-fold)
+         (projects projectile-replace--projects)
+         (candidates (lambda ()
+                       (projectile-replace--candidates
+                        term literal case-fold projects))))
+    (setq projectile-replace--filtered nil)
+    (projectile-replace--start (current-buffer) candidates
+                               projectile-replace--search nil)))
+
+(defun projectile-replace--refresh ()
+  "Re-run the search and redraw the results buffer.
+This gathers from scratch, so any filtering is undone and matches
+removed by a filter command reappear."
+  (interactive)
+  (projectile-replace--regather))
+
+(defun projectile-replace--toggle-case ()
+  "Toggle case sensitivity of the search, re-scan, and re-render."
+  (interactive)
+  (setq projectile-replace--case-fold (not projectile-replace--case-fold))
+  (projectile-replace--regather)
+  (message "%s"
+           (projectile-prepend-project-name
+            (if projectile-replace--case-fold
+                "search now ignores case" "search now case-sensitive"))))
+
+(defun projectile-replace--valid-regexp-p (regexp)
+  "Return non-nil when REGEXP is a valid Emacs regexp."
+  (condition-case nil
+      (progn (string-match-p regexp "") t)
+    (error nil)))
+
+(defun projectile-replace--toggle-regexp ()
+  "Toggle between literal and regexp search, re-scan, and re-render.
+Switching to regexp mode with a term that is not a valid regexp is
+refused with a message so the buffer stays usable rather than erroring."
+  (interactive)
+  (let ((new-literal (not projectile-replace--literal)))
+    (if (and (not new-literal)
+             (not (projectile-replace--valid-regexp-p projectile-replace--term)))
+        (message "%s"
+                 (projectile-prepend-project-name
+                  (format "%S is not a valid regexp; staying literal"
+                          projectile-replace--term)))
+      (setq projectile-replace--literal new-literal
+            projectile-replace--search (if new-literal
+                                           (regexp-quote projectile-replace--term)
+                                         projectile-replace--term)
+            ;; the ripgrep equivalent (if any) described the old search
+            projectile-replace--rg-pattern nil)
+      (projectile-replace--regather)
+      (message "%s"
+               (projectile-prepend-project-name
+                (if new-literal "literal search" "regexp search"))))))
+
+(defun projectile-replace--toggle-word ()
+  "Toggle whole-word matching of the search, re-scan, and re-render."
+  (interactive)
+  (setq projectile-replace--word (not projectile-replace--word))
+  (projectile-replace--regather)
+  (message "%s"
+           (projectile-prepend-project-name
+            (if projectile-replace--word
+                "search now matches whole words only"
+              "search now matches anywhere"))))
+
+(defun projectile-replace--filter-by (predicate)
+  "Keep only matches satisfying PREDICATE, mark the list filtered, re-render.
+The removed matches are recoverable by re-searching (\\<projectile-replace-mode-map>\\[projectile-replace--refresh]), which
+gathers from scratch.  Refused while a scan is still streaming in, since a
+later chunk would append past the filter and leave an incoherent list."
+  (projectile-replace--ensure-not-scanning)
+  (setq projectile-replace--matches
+        (cl-remove-if-not predicate projectile-replace--matches)
+        projectile-replace--filtered t)
+  (funcall projectile-replace--render-function))
+
+(defun projectile-replace--line-matches-p (m regexp)
+  "Return non-nil when match M's context line matches REGEXP.
+Honors the buffer's case setting."
+  (let ((case-fold-search projectile-replace--case-fold))
+    (string-match-p regexp (projectile-replace--match-context m))))
+
+(defun projectile-replace--file-matches-p (m regexp)
+  "Return non-nil when match M's project-relative file matches REGEXP.
+Honors the buffer's case setting."
+  (let ((case-fold-search projectile-replace--case-fold))
+    (string-match-p regexp
+                    (file-relative-name (projectile-replace--match-file m)
+                                        projectile-replace--root))))
+
+(defun projectile-replace--keep-matches (regexp)
+  "Keep only matches whose context line matches REGEXP."
+  (interactive (list (read-regexp "Keep matches whose line matches regexp")))
+  (projectile-replace--filter-by
+   (lambda (m) (projectile-replace--line-matches-p m regexp))))
+
+(defun projectile-replace--flush-matches (regexp)
+  "Remove matches whose context line matches REGEXP."
+  (interactive (list (read-regexp "Flush matches whose line matches regexp")))
+  (projectile-replace--filter-by
+   (lambda (m) (not (projectile-replace--line-matches-p m regexp)))))
+
+(defun projectile-replace--keep-files (regexp)
+  "Keep only matches whose project-relative file matches REGEXP."
+  (interactive (list (read-regexp "Keep matches whose file matches regexp")))
+  (projectile-replace--filter-by
+   (lambda (m) (projectile-replace--file-matches-p m regexp))))
+
+(defun projectile-replace--flush-files (regexp)
+  "Remove matches whose project-relative file matches REGEXP."
+  (interactive (list (read-regexp "Flush matches whose file matches regexp")))
+  (projectile-replace--filter-by
+   (lambda (m) (not (projectile-replace--file-matches-p m regexp)))))
+
+;;; Applying the enabled matches
+
+(defun projectile-replace--do-one (m replacement literal)
+  "Replace match M in the current buffer with the expansion of REPLACEMENT.
+LITERAL selects verbatim vs. capture-group expansion.  M's stored
+`match-data' must still be valid for the current buffer."
+  (set-match-data (projectile-replace--match-match-data m))
+  (replace-match (projectile-replace--expand
+                  replacement (projectile-replace--match-groups m) literal)
+                 t t))
+
+(defun projectile-replace--positions-valid-p (matches)
+  "Return non-nil when every match in MATCHES still spans its recorded text.
+Checked against the current buffer.  This is the authoritative guard
+against stale positions: if the file changed on disk, or the live buffer
+was edited, since the scan, the recorded spans no longer hold the matched
+text and applying them would corrupt unrelated bytes."
+  (cl-every (lambda (m)
+              (let ((beg (projectile-replace--match-beg m))
+                    (end (projectile-replace--match-end m)))
+                (and (integerp beg) (integerp end)
+                     (<= (point-min) beg end (point-max))
+                     (string= (buffer-substring-no-properties beg end)
+                              (projectile-replace--match-string m)))))
+            matches))
+
+(defun projectile-replace--skip (name reason)
+  "Warn that NAME is skipped for REASON and return the symbol `skipped'."
+  (message "%s"
+           (projectile-prepend-project-name
+            (format "skipping %s (%s)" name reason)))
+  'skipped)
+
+(cl-defstruct (projectile-replace--undo-edit
+               (:constructor projectile-replace--undo-edit-create)
+               (:copier nil))
+  "One replacement that was actually written, recorded so it can be reverted."
+  beg   ; position of the written text, with every earlier edit in the file in
+  old   ; the text that was there before
+  new)  ; the text the replace wrote
+
+(cl-defstruct (projectile-replace--undo-record
+               (:constructor projectile-replace--undo-record-create)
+               (:copier nil))
+  "Everything needed to revert one applied project-wide replace."
+  root         ; project root the replace ran in
+  term         ; the search term it ran with
+  replacement  ; the replacement it wrote
+  files)       ; alist of (FILE . list of `projectile-replace--undo-edit')
+
+(defvar projectile-replace--last-apply nil
+  "Record of the most recent applied replace, or nil when there is none.
+Holds a `projectile-replace--undo-record' describing exactly what
+`projectile-replace--apply' wrote - files it skipped contribute nothing -
+which is what `projectile-replace-undo' reverts.
+
+Deliberately one global record rather than a per-project stack: this is
+insurance against the last replace going wrong, not a history.  Every
+apply that writes something supersedes it, a fully successful undo clears
+it, and it lives only for the current Emacs session.")
+
+(defun projectile-replace--undo-edits (matches replacement literal)
+  "Return the undo edits produced by applying MATCHES with REPLACEMENT.
+MATCHES all belong to one file or buffer.  Each edit records where its
+written text ends up once every edit before it in the same file has been
+made, so reverting them from the bottom up needs no rescan.  LITERAL
+selects verbatim vs. capture-group expansion, so the recorded text is
+exactly what `projectile-replace--do-one' writes."
+  (let ((ascending (sort (copy-sequence matches)
+                         (lambda (a b)
+                           (< (projectile-replace--match-beg a)
+                              (projectile-replace--match-beg b)))))
+        (offset 0)
+        (edits nil))
+    (dolist (m ascending)
+      (let ((old (projectile-replace--match-string m))
+            (new (projectile-replace--expand
+                  replacement (projectile-replace--match-groups m) literal)))
+        (push (projectile-replace--undo-edit-create
+               :beg (+ (projectile-replace--match-beg m) offset)
+               :old old
+               :new new)
+              edits)
+        (setq offset (+ offset (- (length new) (length old))))))
+    (nreverse edits)))
+
+(defun projectile-replace--apply-file (file matches replacement literal)
+  "Apply MATCHES in FILE and return its undo edits, or the symbol `skipped'.
+Edits run from the highest buffer position downwards so earlier edits
+don't shift later matches.  The live buffer visiting FILE (if any) is
+re-resolved now rather than trusted from scan time, so a file opened
+since the scan is edited in its buffer instead of being clobbered on
+disk, and a scan-time buffer that has since been killed is handled.  In
+either case the recorded positions are verified to still span the matched
+text; if not (the file or buffer changed since the scan) the file is
+skipped rather than corrupted.  A clean buffer is saved; a buffer with
+unsaved changes is edited but left for the user to save.  The returned
+edits describe what was really written, and feed `projectile-replace-undo'."
+  (let* ((descending (sort (copy-sequence matches)
+                           (lambda (a b)
+                             (> (projectile-replace--match-beg a)
+                                (projectile-replace--match-beg b)))))
+         (buffer (get-file-buffer file)))
+    (if (buffer-live-p buffer)
+        (with-current-buffer buffer
+          (if (not (projectile-replace--positions-valid-p descending))
+              (projectile-replace--skip (buffer-name buffer) "changed since scan")
+            (let ((was-modified (buffer-modified-p)))
+              (save-excursion
+                (save-restriction
+                  (widen)
+                  (atomic-change-group
+                    (dolist (m descending)
+                      (projectile-replace--do-one m replacement literal)))))
+              ;; don't silently save a buffer that already had unsaved edits
+              (unless was-modified
+                (let ((require-final-newline nil))
+                  (save-buffer)))
+              (projectile-replace--undo-edits matches replacement literal))))
+      (with-temp-buffer
+        (insert-file-contents file)
+        (let ((coding last-coding-system-used))
+          (if (not (projectile-replace--positions-valid-p descending))
+              (projectile-replace--skip (file-name-nondirectory file)
+                                        "changed on disk since scan")
+            (dolist (m descending)
+              (projectile-replace--do-one m replacement literal))
+            (let ((coding-system-for-write coding))
+              (write-region (point-min) (point-max) file nil 'no-message))
+            (projectile-replace--undo-edits matches replacement literal)))))))
+
+(defun projectile-replace--apply ()
+  "Apply every enabled match, grouped by file, then re-run the search.
+What actually got written is recorded in `projectile-replace--last-apply'
+so `projectile-replace-undo' can revert it."
+  (interactive)
+  (projectile-replace--ensure-not-scanning)
+  (let ((enabled (cl-remove-if-not #'projectile-replace--match-enabled
+                                   projectile-replace--matches))
+        (replacement projectile-replace--replacement)
+        (literal projectile-replace--literal)
+        (root projectile-replace--root)
+        (term projectile-replace--term)
+        (groups (make-hash-table :test 'equal))
+        (order nil)
+        (applied nil)
+        (nfiles 0)
+        (nrepl 0)
+        (skipped 0))
+    (when (null enabled)
+      (user-error "No matches are enabled"))
+    ;; group the enabled matches by file, preserving first-seen order
+    (dolist (m enabled)
+      (let ((file (projectile-replace--match-file m)))
+        (unless (gethash file groups)
+          (push file order))
+        (push m (gethash file groups))))
+    (dolist (file (nreverse order))
+      ;; isolate each file: a read-only file or a write error must not abort
+      ;; the batch (leaving earlier files edited and no summary shown)
+      (let ((result (condition-case err
+                        (projectile-replace--apply-file
+                         file (gethash file groups) replacement literal)
+                      (error
+                       (projectile-replace--skip
+                        (file-name-nondirectory file)
+                        (error-message-string err))))))
+        (if (eq result 'skipped)
+            (cl-incf skipped)
+          (push (cons file result) applied)
+          (cl-incf nfiles)
+          (cl-incf nrepl (length result)))))
+    ;; an apply that wrote nothing leaves the previous record alone - there's
+    ;; nothing new to undo, and dropping it would lose a still-valid undo
+    (when applied
+      (setq projectile-replace--last-apply
+            (projectile-replace--undo-record-create
+             :root root :term term :replacement replacement
+             :files (nreverse applied))))
+    (message "%s"
+             (projectile-prepend-project-name
+              (format "Replaced %d occurrence%s in %d file%s%s"
+                      nrepl (if (= nrepl 1) "" "s")
+                      nfiles (if (= nfiles 1) "" "s")
+                      (if (> skipped 0)
+                          (format " (skipped %d file%s)"
+                                  skipped (if (= skipped 1) "" "s"))
+                        ""))))
+    (projectile-replace--refresh)))
+
+;;; Undoing the last applied replace
+
+(defun projectile-replace--undo-valid-p (edits)
+  "Return non-nil when EDITS still span exactly the text the replace wrote.
+Checked against the current buffer.  This is the guard that keeps an undo
+from corrupting a file that moved on since the replace: unless every
+recorded span still holds the written text, verbatim, the file is left
+alone."
+  (cl-every (lambda (e)
+              (let* ((beg (projectile-replace--undo-edit-beg e))
+                     (new (projectile-replace--undo-edit-new e))
+                     (end (+ beg (length new))))
+                (and (<= (point-min) beg end (point-max))
+                     (string= (buffer-substring-no-properties beg end) new))))
+            edits))
+
+(defun projectile-replace--undo-one (e)
+  "Put back the text edit E replaced, in the current buffer."
+  (let ((beg (projectile-replace--undo-edit-beg e)))
+    (goto-char beg)
+    (delete-region beg (+ beg (length (projectile-replace--undo-edit-new e))))
+    (insert (projectile-replace--undo-edit-old e))))
+
+(defun projectile-replace--undo-file (file edits)
+  "Revert EDITS in FILE and return the count, or the symbol `skipped'.
+Mirrors `projectile-replace--apply-file' in every respect: edits are
+reverted from the highest position downwards, the live buffer visiting
+FILE is re-resolved now (so an undo never writes a file behind the back
+of a buffer visiting it), a clean buffer is saved and a modified one is
+left for the user, and closed files are rewritten with their own coding
+system.  A file is reverted only if all of its edits still verify, so it
+comes back whole or not at all."
+  (let ((descending (sort (copy-sequence edits)
+                          (lambda (a b)
+                            (> (projectile-replace--undo-edit-beg a)
+                               (projectile-replace--undo-edit-beg b)))))
+        (buffer (get-file-buffer file)))
+    (if (buffer-live-p buffer)
+        (with-current-buffer buffer
+          (if (not (projectile-replace--undo-valid-p descending))
+              (projectile-replace--skip (buffer-name buffer)
+                                        "changed since the replace")
+            (let ((was-modified (buffer-modified-p)))
+              (save-excursion
+                (save-restriction
+                  (widen)
+                  (atomic-change-group
+                    (mapc #'projectile-replace--undo-one descending))))
+              ;; same rule as applying: a buffer that had unsaved changes of
+              ;; its own is edited but not saved on the user's behalf
+              (unless was-modified
+                (let ((require-final-newline nil))
+                  (save-buffer)))
+              (length edits))))
+      (with-temp-buffer
+        (insert-file-contents file)
+        (let ((coding last-coding-system-used))
+          (if (not (projectile-replace--undo-valid-p descending))
+              (projectile-replace--skip (file-name-nondirectory file)
+                                        "changed on disk since the replace")
+            (mapc #'projectile-replace--undo-one descending)
+            (let ((coding-system-for-write coding))
+              (write-region (point-min) (point-max) file nil 'no-message))
+            (length edits)))))))
+
+;;;###autoload
+(defun projectile-replace-undo ()
+  "Revert the last project-wide replace applied from the replace reviewer.
+
+Only replaces applied with \\<projectile-replace-mode-map>\\[projectile-replace--apply] in a
+`*projectile-replace*' buffer are recorded, and only the most recent one:
+this is a safety net for the single most destructive thing Projectile
+does, not an edit history.  The record lives in memory, so it is gone
+after restarting Emacs.
+
+Each file is reverted only when the text the replace wrote is still
+exactly there; a file edited, reverted, deleted or rewritten by a branch
+switch in the meantime is reported and left alone rather than corrupted.
+Files that were reverted are dropped from the record, so undoing twice
+can never apply anything twice, while files that were skipped stay
+undoable once you have sorted them out."
+  (interactive)
+  (let ((record projectile-replace--last-apply))
+    (unless record
+      (user-error "No applied project-wide replace to undo"))
+    (let ((nedits 0)
+          (nfiles 0)
+          (remaining nil))
+      (dolist (entry (projectile-replace--undo-record-files record))
+        (let* ((file (car entry))
+               (result (condition-case err
+                           (projectile-replace--undo-file file (cdr entry))
+                         (error
+                          (projectile-replace--skip
+                           (file-name-nondirectory file)
+                           (error-message-string err))))))
+          (if (eq result 'skipped)
+              (push entry remaining)
+            (cl-incf nfiles)
+            (cl-incf nedits result))))
+      (setq remaining (nreverse remaining))
+      (setf (projectile-replace--undo-record-files record) remaining)
+      (unless remaining
+        (setq projectile-replace--last-apply nil))
+      (message "%s"
+               (format "[%s] Reverted %d replacement%s of %s in %d file%s%s"
+                       (projectile-project-name
+                        (projectile-replace--undo-record-root record))
+                       nedits (if (= nedits 1) "" "s")
+                       (projectile-replace--undo-record-term record)
+                       nfiles (if (= nfiles 1) "" "s")
+                       (if remaining
+                           (format " (skipped %d changed file%s)"
+                                   (length remaining)
+                                   (if (= (length remaining) 1) "" "s"))
+                         ""))))))
+
+;;; Exporting to a grep-mode buffer for wgrep / grep-edit-mode
+
+(defvar projectile--grep-export-buffer-name "*projectile-grep*"
+  "Name of the `grep-mode' buffer produced by `projectile-replace--export'.
+Shared by the replace and search reviewers, hence the neutral name.")
+
+(defun projectile-replace--grep-line (m root)
+  "Format match M as a RELPATH:LINE:CONTEXT grep hit relative to ROOT."
+  (format "%s:%d:%s"
+          (file-relative-name (projectile-replace--match-file m) root)
+          (projectile-replace--match-line m)
+          (projectile-replace--match-context m)))
+
+(defun projectile-replace--export-guidance ()
+  "Message how to make the exported grep buffer editable.
+The wording adapts to what's installed: wgrep, Emacs 31's
+`grep-edit-mode', or neither.  Returns the message string."
+  (let ((msg (projectile-prepend-project-name
+              (cond
+               ((fboundp 'wgrep-change-to-wgrep-mode)
+                "exported to grep buffer; press C-c C-p to edit with wgrep, then C-c C-c to write back")
+               ((fboundp 'grep-edit-mode)
+                "exported to grep buffer; run M-x grep-edit-mode to edit, then C-c C-c to write back")
+               (t
+                "exported to a read-only grep buffer for navigation; install wgrep from MELPA to edit and write back")))))
+    (message "%s" msg)
+    msg))
+
+(defun projectile-replace--export ()
+  "Export the enabled matches to a `grep-mode' buffer for editing with wgrep.
+Renders the matches Projectile's own apply command would act on (the
+enabled matches from the reviewed and filtered list; ones toggled off are
+excluded, just as they are by apply) as standard RELPATH:LINE:CONTEXT grep
+hits in a `*projectile-grep*' buffer whose `default-directory' is
+the project root, so the relative paths resolve.  The buffer is a real
+`grep-mode' buffer navigable with `next-error' and RET, so wgrep
+(`wgrep-change-to-wgrep-mode', bound to \\`C-c C-p') or Emacs 31's
+`grep-edit-mode' can turn it editable and write your edits back to the
+files.  This is the bridge for people who prefer the grep/wgrep workflow;
+Projectile's own apply command
+(\\<projectile-replace-mode-map>\\[projectile-replace--apply]) is the no-dependency path and needs no external package."
+  (interactive)
+  (projectile-replace--ensure-not-scanning)
+  (require 'grep)
+  (let ((matches (cl-remove-if-not #'projectile-replace--match-enabled
+                                   projectile-replace--matches))
+        (root projectile-replace--root)
+        ;; label the export by which reviewer it came from (read here, before
+        ;; switching to the grep buffer, so `major-mode' is the source buffer's)
+        (kind (if (derived-mode-p 'projectile-search-mode) "search" "replace"))
+        (buf (get-buffer-create projectile--grep-export-buffer-name)))
+    (when (null matches)
+      (user-error "No enabled matches to export"))
+    (with-current-buffer buf
+      (let ((inhibit-read-only t))
+        (erase-buffer)
+        (setq default-directory root)
+        (insert (format "-*- mode: grep; default-directory: %S -*-\n\n" root))
+        ;; No colon before a value here: the search term could be `10:30' and
+        ;; would otherwise parse as a phantom `file:line:' grep hit.
+        (insert (format "Projectile %s  (%d match%s)\n\n"
+                        kind (length matches)
+                        (if (= (length matches) 1) "" "es")))
+        (dolist (m matches)
+          (insert (projectile-replace--grep-line m root) "\n"))
+        (insert (format "\nProjectile %s export finished\n" kind)))
+      (grep-mode)
+      ;; keep the root as default-directory so the relative hits resolve
+      (setq default-directory root)
+      ;; let wgrep hook up its keys if the user has it; strictly optional
+      (when (fboundp 'wgrep-setup) (wgrep-setup))
+      (goto-char (point-min)))
+    (pop-to-buffer buf)
+    (projectile-replace--export-guidance)
+    buf))
+
+(defvar projectile-replace-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "RET") #'projectile-replace--visit)
+    (define-key map (kbd "n") #'projectile-replace--goto-next-match)
+    (define-key map (kbd "p") #'projectile-replace--goto-prev-match)
+    (define-key map (kbd "M-n") #'projectile-replace--goto-next-file)
+    (define-key map (kbd "M-p") #'projectile-replace--goto-prev-file)
+    (define-key map (kbd "t") #'projectile-replace--toggle)
+    (define-key map (kbd "SPC") #'projectile-replace--toggle)
+    (define-key map (kbd "f") #'projectile-replace--toggle-file)
+    (define-key map (kbd "r") #'projectile-replace--set-replacement)
+    (define-key map (kbd "c") #'projectile-replace--toggle-case)
+    (define-key map (kbd "x") #'projectile-replace--toggle-regexp)
+    (define-key map (kbd "w") #'projectile-replace--toggle-word)
+    (define-key map (kbd "k") #'projectile-replace--keep-matches)
+    (define-key map (kbd "d") #'projectile-replace--flush-matches)
+    (define-key map (kbd "K") #'projectile-replace--keep-files)
+    (define-key map (kbd "D") #'projectile-replace--flush-files)
+    (define-key map (kbd "e") #'projectile-replace--export)
+    (define-key map (kbd "!") #'projectile-replace--apply)
+    (define-key map (kbd "C-c C-c") #'projectile-replace--apply)
+    (define-key map (kbd "g") #'projectile-replace--refresh)
+    (define-key map (kbd "q") #'projectile-replace--quit)
+    map)
+  "Keymap for `projectile-replace-mode'.")
+
+(define-derived-mode projectile-replace-mode special-mode "Projectile-Replace"
+  "Major mode for reviewing and applying a project-wide replacement.
+
+Each match starts enabled and can be toggled on or off; only the
+enabled matches are applied.  Besides toggling and applying, the search
+itself can be reshaped without leaving the buffer: toggle case
+sensitivity (\\<projectile-replace-mode-map>\\[projectile-replace--toggle-case]),
+literal/regexp matching (\\[projectile-replace--toggle-regexp]) or whole-word
+matching (\\[projectile-replace--toggle-word]) to re-scan, and
+narrow the shown matches by keeping or flushing them against a regexp
+matched on the context line (\\[projectile-replace--keep-matches] / \\[projectile-replace--flush-matches]) or the file name
+(\\[projectile-replace--keep-files] / \\[projectile-replace--flush-files]).  Re-searching (\\[projectile-replace--refresh]) rebuilds the list from scratch,
+undoing any filtering.
+
+Applying with \\[projectile-replace--apply] needs no external package.  If you prefer the
+grep/wgrep workflow, \\[projectile-replace--export] exports the shown matches to a `grep-mode'
+buffer that wgrep or Emacs 31's `grep-edit-mode' can turn editable and
+write back to the files.
+
+\\{projectile-replace-mode-map}"
+  (setq-local truncate-lines t)
+  ;; killing the buffer mid-scan must not leave a dangling chunk timer
+  (add-hook 'kill-buffer-hook #'projectile-replace--cancel-scan nil t)
+  (buffer-disable-undo))
+
+(defun projectile-replace--seed (buf mode root term regexp replacement
+                                     literal case-fold &optional word
+                                     rg-pattern projects)
+  "Put BUF in MODE and seed its results-buffer state, with no matches yet.
+ROOT, TERM, REGEXP, REPLACEMENT, LITERAL, CASE-FOLD, WORD and RG-PATTERN
+seed the search parameters; the match list starts empty, ready for a
+\(sync or async) scan to fill it.  PROJECTS is the list of project roots
+searched, defaulting to just ROOT."
+  (with-current-buffer buf
+    (funcall mode)
+    (setq projectile-replace--projects (or projects (list root))
+          projectile-replace--root root
+          projectile-replace--term term
+          projectile-replace--search regexp
+          projectile-replace--replacement replacement
+          projectile-replace--literal literal
+          projectile-replace--case-fold case-fold
+          projectile-replace--word word
+          projectile-replace--rg-pattern rg-pattern
+          projectile-replace--matches nil
+          projectile-replace--truncated nil
+          projectile-replace--filtered nil
+          projectile-replace--scanning nil
+          projectile-replace--scan-timer nil
+          projectile-replace--scan-process nil)))
+
+;;; Ripgrep fast-path for the read-only literal search reviewer
+;;
+;; An optional accelerator for `projectile-search-review': when the search is
+;; literal, `rg' is installed and `projectile-search-use-ripgrep' is on, the
+;; candidate scan runs `rg --json' as a subprocess and parses its NDJSON match
+;; stream into the very same `projectile-replace--match' structs the elisp scan
+;; produces, streaming them into the results buffer.  Only the fields the
+;; search reviewer renders are filled (file, line, character column, matched
+;; string, context line); the write-back-only fields (`beg'/`end'/`match-data'/
+;; `groups') stay nil because the search->replace bridge re-gathers via elisp.
+;; This path is deliberately narrow: the interactive regexp search command
+;; keeps the elisp scan (rg's Rust regex is not Emacs regexp) and the whole
+;; replace reviewer keeps the elisp scan (its apply needs exact buffer
+;; positions).  A command that builds its own pattern and can also spell it in
+;; rg's syntax may pass that spelling as `projectile-replace--rg-pattern' and
+;; get the fast-path for a non-literal search too - `projectile-todos' does.
+;; The elisp scan stays the default and the fallback; rg is purely additive.
+
+(defun projectile-search--rg-executable ()
+  "Return the ripgrep executable name if available, else nil."
+  (and (executable-find "rg") "rg"))
+
+(defun projectile-search--rg-fastpath-p (literal &optional rg-pattern)
+  "Return non-nil when the search reviewer should use the ripgrep fast-path.
+True for a LITERAL search, or for a non-literal one that supplied
+RG-PATTERN (a ripgrep-syntax equivalent of its Emacs regexp), when
+`projectile-search-use-ripgrep' is set, `rg' is available, and we are
+interactive; batch (`noninteractive') keeps the deterministic elisp scan."
+  (and projectile-search-use-ripgrep
+       (or literal rg-pattern)
+       (not noninteractive)
+       (projectile-search--rg-executable)
+       t))
+
+(defun projectile-search--rg-command (term case-fold word globs &optional pattern)
+  "Build the `rg --json' command line searching for literal TERM.
+When PATTERN is non-nil it is searched for as a ripgrep-syntax regexp
+instead, and TERM is ignored.  CASE-FOLD selects case-insensitive
+matching; WORD restricts matches to whole words (`--word-regexp'); GLOBS
+is a list of ignore patterns (from `projectile--project-ignore-globs')
+passed as `--glob' exclusions so Projectile's ignores narrow ripgrep's
+own ignore rules.  They are gitignore patterns, which is what ripgrep's
+globs are, so they need no translation - but a root-anchored one only
+resolves against the project root when the searched path is relative,
+which is why the search path below is `./' and the caller must run the
+process with `default-directory' bound to the project root."
+  (append
+   (list (projectile-search--rg-executable)
+         "--json" "--line-number" "--column"
+         "--color" "never"
+         (if case-fold "--ignore-case" "--case-sensitive"))
+   (unless pattern (list "--fixed-strings"))
+   (when word (list "--word-regexp"))
+   (mapcan (lambda (g) (list "--glob" (concat "!" g))) globs)
+   ;; `--' terminates options so a TERM starting with `-' is not misread.
+   (list "--" (or pattern term) "./")))
+
+(defun projectile-search--rg-json-get (obj &rest keys)
+  "Walk KEYS through nested hash-table OBJ, returning the leaf or nil.
+OBJ is a `json-parse-string' object (a hash-table with string keys)."
+  (dolist (k keys obj)
+    (setq obj (and (hash-table-p obj) (gethash k obj)))))
+
+(defun projectile-search--rg-byte->char-column (line byte)
+  "Return the 0-based character column for BYTE offset into LINE.
+BYTE is a UTF-8 byte offset into the line text (as ripgrep reports
+submatch offsets); LINE is the already-decoded line string.  The prefix
+is re-encoded to UTF-8 and its BYTE-long head decoded back, so multibyte
+characters before the match count as one column each, not one per byte."
+  (if (or (null byte) (<= byte 0))
+      0
+    (let* ((bytes (encode-coding-string line 'utf-8))
+           (n (min byte (length bytes))))
+      (length (decode-coding-string (substring bytes 0 n) 'utf-8)))))
+
+(defun projectile-search--rg-parse-line (line root)
+  "Parse one ripgrep NDJSON LINE into a list of match structs under ROOT.
+Returns nil for non-\"match\" records (begin/end/summary/context) and for
+records without decodable path or line text.  A line with several
+submatches yields one struct per submatch, in order."
+  (condition-case nil
+      (let ((obj (json-parse-string line)))
+        (when (equal (gethash "type" obj) "match")
+          (let* ((data (gethash "data" obj))
+                 (path (projectile-search--rg-json-get data "path" "text"))
+                 (line-no (projectile-search--rg-json-get data "line_number"))
+                 (text (projectile-search--rg-json-get data "lines" "text"))
+                 (subs (gethash "submatches" data))
+                 (context (and (stringp text)
+                               (replace-regexp-in-string "\r?\n\\'" "" text)))
+                 (result nil))
+            (when (and (stringp path) (integerp line-no) (stringp text) subs)
+              (let ((file (expand-file-name path root)))
+                (dotimes (i (length subs))
+                  (let* ((sub (aref subs i))
+                         (start (gethash "start" sub))
+                         (mstr (projectile-search--rg-json-get
+                                sub "match" "text")))
+                    (when (stringp mstr)
+                      (push (projectile-replace--match-create
+                             :file file :buffer nil :tick nil
+                             :line line-no
+                             :column (projectile-search--rg-byte->char-column
+                                      text start)
+                             :beg nil :end nil
+                             :string mstr :match-data nil :groups nil
+                             :context context :enabled t)
+                            result))))))
+            (nreverse result))))
+    (error nil)))
+
+(defun projectile-search--rg-ingest (buffer lines root)
+  "Parse rg NDJSON LINES into BUFFER's match list, render, honor the cap.
+Appends up to `projectile-search-max-matches' matches in arrival order;
+when the cap is reached the surplus is dropped and the truncated flag is
+set.  Returns non-nil when the cap has been reached, so the caller can
+finish the scan."
+  (with-current-buffer buffer
+    (if projectile-replace--truncated
+        t
+      (let ((new nil))
+        (dolist (l lines)
+          (unless (string-empty-p l)
+            (setq new (nconc new (projectile-search--rg-parse-line l root)))))
+        (let ((room (- projectile-search-max-matches
+                       (length projectile-replace--matches))))
+          (when (> (length new) room)
+            (setq new (take (max 0 room) new)
+                  projectile-replace--truncated t))
+          (when new
+            (setq projectile-replace--matches
+                  (append projectile-replace--matches new)))
+          (projectile-replace--render-progress)
+          projectile-replace--truncated)))))
+
+(defun projectile-search--rg-finish (buffer on-done)
+  "Settle BUFFER after its ripgrep scan ends and call ON-DONE.
+Kills the scan process if still live (dropping its sentinel first),
+clears the scanning state, does a final render and calls ON-DONE.  Safe
+against a killed BUFFER."
+  (when (buffer-live-p buffer)
+    (with-current-buffer buffer
+      (when (process-live-p projectile-replace--scan-process)
+        (set-process-sentinel projectile-replace--scan-process #'ignore)
+        (delete-process projectile-replace--scan-process))
+      (setq projectile-replace--scanning nil
+            projectile-replace--scan-process nil
+            projectile-replace--scan-timer nil)
+      (projectile-replace--render-preserve)
+      (when on-done (funcall on-done buffer)))))
+
+(defun projectile-search--gather-rg (buffer term on-done)
+  "Scan for literal TERM into BUFFER via `rg --json', then call ON-DONE.
+When BUFFER carries a `projectile-replace--rg-pattern', that
+ripgrep-syntax regexp is searched for instead of the literal TERM.
+Resets BUFFER's match list and scanning state, then walks
+`projectile-replace--projects' one project at a time, streaming parsed
+matches into the buffer as ripgrep emits them and re-rendering per output
+chunk.
+
+One `rg' per project rather than one `rg' over the group, because the
+ignore globs are root-anchored: they only mean what they say when ripgrep
+runs inside the project that wrote them.  The runs are sequential, so a
+single process is live at a time and cancellation stays as simple as it
+was for one project.
+
+`projectile-search-max-matches' is honored across the whole group (the
+run stops when the cap is hit) and the scan is cancelable and kill-safe
+exactly like the elisp async engine: the live process is registered in
+`projectile-replace--scan-process' so `projectile-replace--cancel-scan'
+\(re-search, quit, kill-buffer) can kill it, leaving no orphan.  ON-DONE
+\(or nil) is called in BUFFER when the last project has been scanned."
+  (with-current-buffer buffer
+    (setq projectile-replace--matches nil
+          projectile-replace--truncated nil
+          projectile-replace--filtered nil
+          projectile-replace--scanning t
+          projectile-replace--scan-timer nil
+          projectile-replace--scan-process nil))
+  (projectile-search--rg-scan-roots
+   buffer term
+   (buffer-local-value 'projectile-replace--projects buffer)
+   (buffer-local-value 'projectile-replace--scan-generation buffer)
+   on-done))
+
+(defun projectile-search--rg-scan-roots (buffer term roots generation on-done)
+  "Run `rg' for TERM over the first of ROOTS, chaining to the rest on exit.
+Matches accumulate in BUFFER across the whole of ROOTS.  GENERATION is
+`projectile-replace--scan-generation' as it stood when the scan began, so
+a process outliving a cancelled scan cannot resume the chain.  Calls
+`projectile-search--rg-finish' with ON-DONE once ROOTS is exhausted or
+the match cap is hit."
+  (if (or (null roots) (not (buffer-live-p buffer)))
+      (projectile-search--rg-finish buffer on-done)
+    (let* (;; a group may be spelled with `~'; ripgrep needs a real working
+           ;; directory, and the parsed paths have to carry the absolute
+           ;; spelling the results buffer relativises against
+           (root (file-name-as-directory (expand-file-name (car roots))))
+           (case-fold (buffer-local-value 'projectile-replace--case-fold buffer))
+           (word (buffer-local-value 'projectile-replace--word buffer))
+           (pattern (buffer-local-value 'projectile-replace--rg-pattern buffer))
+           (globs (projectile--project-ignore-globs root))
+           (command (projectile-search--rg-command term case-fold word globs
+                                                   pattern))
+           (pending "")
+           (continue
+            (lambda ()
+              (projectile-search--rg-scan-roots buffer term (cdr roots)
+                                                generation on-done))))
+      (let* (;; run rg IN the project root so the relative `./' search path and
+             ;; the `/'-anchored ignore globs resolve against it
+             (default-directory root)
+             ;; keep rg's stderr out of the JSON stream, so a diagnostic line
+             ;; (e.g. an unreadable directory) can't split a match across filter
+             ;; chunks and get silently dropped
+             (stderr-buffer (get-buffer-create " *projectile-search-rg-stderr*"))
+             (_ (with-current-buffer stderr-buffer (erase-buffer)))
+             (proc
+              (make-process
+               :name "projectile-search-rg"
+               :buffer nil
+               :command command
+               :connection-type 'pipe
+               :noquery t
+               :stderr stderr-buffer
+               :coding 'utf-8-unix
+               :filter
+               (lambda (_proc output)
+                 (when (buffer-live-p buffer)
+                   (with-current-buffer buffer
+                     (unless projectile-replace--truncated
+                       (setq pending (concat pending output))
+                       (let ((parts (split-string pending "\n")))
+                         ;; the last element is the (possibly empty) partial line
+                         (setq pending (car (last parts)))
+                         (when (projectile-search--rg-ingest
+                                buffer (butlast parts) root)
+                           (projectile-search--rg-finish buffer on-done)))))))
+               :sentinel
+               (lambda (proc _event)
+                 (when (and (buffer-live-p buffer)
+                            (memq (process-status proc) '(exit signal)))
+                   (with-current-buffer buffer
+                     (when (and (eq proc projectile-replace--scan-process)
+                                (= generation projectile-replace--scan-generation))
+                       (if (or projectile-replace--truncated
+                               (projectile-search--rg-ingest
+                                buffer (list pending) root))
+                           (projectile-search--rg-finish buffer on-done)
+                         (funcall continue)))))))))
+        (with-current-buffer buffer
+          (setq projectile-replace--scan-process proc))
+        proc))))
+
+(defun projectile-replace--word-boundary-regexp (regexp)
+  "Fence REGEXP with word boundaries so it only matches whole words.
+The pattern is shy-grouped and wrapped in `\\<'/`\\>', mirroring what
+ripgrep's `--word-regexp' does, so the elisp scan and the ripgrep
+fast-path agree on what counts as a whole-word match."
+  (concat "\\<\\(?:" regexp "\\)\\>"))
+
+(defun projectile-replace--effective-regexp (regexp)
+  "Return REGEXP as the current results buffer will actually match it.
+Fences it with word boundaries when `projectile-replace--word' is set,
+otherwise returns REGEXP unchanged."
+  (if projectile-replace--word
+      (projectile-replace--word-boundary-regexp regexp)
+    regexp))
+
+(defun projectile-replace--resolve-candidates (candidates)
+  "Return CANDIDATES as a list, calling it first when it is a function.
+Only the elisp scanner reads the candidate list; the ripgrep fast-path
+asks ripgrep to walk the tree itself and never looks at it.  Callers that
+might take either path therefore pass a function, so the walk - which
+shells out per project - is paid for only when something is going to scan
+its result."
+  (if (functionp candidates) (funcall candidates) candidates))
+
+(defun projectile-replace--render-progress ()
+  "Redraw the current results buffer, subject to throttling.
+Redraws no more often than `projectile-search-render-interval'.  For use
+while a scan is streaming; the redraw that settles a finished scan is
+unconditional, so a skipped intermediate draw is never the last word."
+  (let ((now (float-time)))
+    (when (or (null projectile-search-render-interval)
+              (>= (- now projectile-replace--last-render)
+                  projectile-search-render-interval))
+      (setq projectile-replace--last-render now)
+      (projectile-replace--render-preserve))))
+
+(defun projectile-replace--start (buffer candidates regexp on-done)
+  "Fill BUFFER's match list by scanning CANDIDATES for REGEXP.
+Cancels any in-flight scan in BUFFER first, then scans with the async
+chunked driver when `projectile-replace--async-p' holds and otherwise
+synchronously (always in batch), so the final match list is identical
+either way - only delivery differs.  BUFFER is re-rendered when done and
+ON-DONE (or nil) is called in it.
+
+As an optional accelerator, a read-only search-reviewer BUFFER doing a
+literal search (or one carrying a `projectile-replace--rg-pattern') takes
+the ripgrep fast-path (`projectile-search--gather-rg') when
+`projectile-search--rg-fastpath-p' holds; the replace reviewer and the
+plain regexp search always take the elisp path below.  A search spanning
+several projects takes it too - `projectile-search--gather-rg' runs one
+`rg' per project in turn."
+  (with-current-buffer buffer
+    (projectile-replace--cancel-scan))
+  (cond
+   ((with-current-buffer buffer
+      (and (derived-mode-p 'projectile-search-mode)
+           (projectile-search--rg-fastpath-p projectile-replace--literal
+                                             projectile-replace--rg-pattern)))
+    (projectile-search--gather-rg
+     buffer (buffer-local-value 'projectile-replace--term buffer) on-done))
+   ((projectile-replace--async-p)
+    (projectile-replace--gather-async
+     (projectile-replace--resolve-candidates candidates)
+     (with-current-buffer buffer (projectile-replace--effective-regexp regexp))
+     buffer on-done))
+   (t
+    (with-current-buffer buffer
+      (let* ((case-fold-search projectile-replace--case-fold)
+             (result (projectile-replace--gather
+                      (projectile-replace--resolve-candidates candidates)
+                      (projectile-replace--effective-regexp regexp))))
+        (setq projectile-replace--matches (plist-get result :matches)
+              projectile-replace--truncated (plist-get result :truncated)
+              projectile-replace--scanning nil
+              projectile-replace--scan-timer nil))
+      (funcall projectile-replace--render-function)
+      (when on-done (funcall on-done buffer))))))
+
+(defun projectile-replace--open-finish (buffer)
+  "Announce truncation once the scan filling BUFFER has finished."
+  (with-current-buffer buffer
+    (when projectile-replace--truncated
+      (message "%s"
+               (projectile-prepend-project-name
+                (format "showing the first %d matches"
+                        projectile-search-max-matches))))))
+
+(defun projectile-replace--open (mode buf-name root term regexp replacement
+                                      literal case-fold candidates no-match-msg
+                                      &optional word rg-pattern projects)
+  "Open BUF-NAME in MODE and scan CANDIDATES for REGEXP into it.
+When scanning is asynchronous the buffer is shown immediately and matches
+stream in; when synchronous (always in batch) the scan completes first
+and, to preserve the pre-async behavior, no buffer is shown when nothing
+matched - NO-MATCH-MSG is issued instead.  Returns the results buffer,
+or nil on the synchronous no-match path.  ROOT, TERM, REGEXP,
+REPLACEMENT, LITERAL, CASE-FOLD, WORD, RG-PATTERN and PROJECTS seed the
+buffer state."
+  ;; re-running the command must not orphan a scan still filling an earlier
+  ;; instance of the buffer (re-seeding resets its buffer-locals)
+  (when-let* ((existing (get-buffer buf-name)))
+    (with-current-buffer existing (projectile-replace--cancel-scan)))
+  (if (or (projectile-replace--async-p)
+          ;; the read-only search reviewer's ripgrep fast-path is inherently
+          ;; async, so it opens the streaming buffer even when the elisp async
+          ;; engine is off (`projectile-search-async' nil); `--start' then
+          ;; dispatches it to ripgrep
+          (and (eq mode #'projectile-search-mode)
+               (projectile-search--rg-fastpath-p literal rg-pattern)))
+      (let ((buf (get-buffer-create buf-name)))
+        (projectile-replace--seed buf mode root term regexp replacement
+                                  literal case-fold word rg-pattern projects)
+        (with-current-buffer buf
+          (setq projectile-replace--scanning t)
+          (funcall projectile-replace--render-function))
+        (pop-to-buffer buf)
+        (projectile-replace--start buf candidates regexp
+                                   #'projectile-replace--open-finish)
+        buf)
+    (let* ((case-fold-search case-fold)
+           (scan-regexp (if word
+                            (projectile-replace--word-boundary-regexp regexp)
+                          regexp))
+           (result (projectile-replace--gather
+                    (projectile-replace--resolve-candidates candidates) scan-regexp))
+           (matches (plist-get result :matches))
+           (truncated (plist-get result :truncated)))
+      (if (null matches)
+          (progn (when no-match-msg (message "%s" no-match-msg)) nil)
+        (let ((buf (get-buffer-create buf-name)))
+          (projectile-replace--seed buf mode root term regexp replacement
+                                    literal case-fold word rg-pattern projects)
+          (with-current-buffer buf
+            (setq projectile-replace--matches matches
+                  projectile-replace--truncated truncated)
+            (funcall projectile-replace--render-function))
+          (when truncated
+            (message "%s"
+                     (projectile-prepend-project-name
+                      (format "showing the first %d matches"
+                              projectile-search-max-matches))))
+          (pop-to-buffer buf)
+          buf)))))
+
+(defun projectile-replace--quit ()
+  "Cancel any in-flight scan and quit the results window."
+  (interactive)
+  (projectile-replace--cancel-scan)
+  (quit-window))
+
+(defun projectile-replace--review (literal)
+  "Gather matches for a project-wide replacement and pop the results buffer.
+LITERAL non-nil runs a literal replace; otherwise the search term is an
+Emacs regexp and the replacement may reference capture groups."
+  (let* ((root (projectile-acquire-root))
+         (term (read-string
+                (projectile-prepend-project-name
+                 (if literal "Replace: " "Replace regexp: "))
+                (projectile-symbol-or-selection-at-point)))
+         (replacement (read-string
+                       (projectile-prepend-project-name
+                        (format "Replace %s with: " term))))
+         (regexp (if literal (regexp-quote term) term))
+         (case-fold case-fold-search)
+         (word projectile-search-whole-word)
+         (candidates (projectile-replace--candidates term literal case-fold root)))
+    (projectile-replace--open
+     #'projectile-replace-mode projectile-replace-buffer-name
+     root term regexp replacement literal case-fold candidates
+     (projectile-prepend-project-name (format "No matches for %s" term))
+     word)))
+
+;;;###autoload
+(defun projectile-replace-review ()
+  "Review and apply a literal project-wide replacement.
+
+Prompts for a literal search string and a replacement, gathers every
+match across the project into a `*projectile-replace*' buffer, and lets
+you toggle which matches to apply before committing them.  This is a
+non-blocking, previewable alternative to `projectile-replace'."
+  (interactive)
+  (projectile-replace--review t))
+
+;;;###autoload
+(defun projectile-replace-regexp-review ()
+  "Review and apply a project-wide regexp replacement.
+
+Like `projectile-replace-review', but the search term is an Emacs
+regexp and the replacement may reference capture groups (\\1, \\&).
+This is a non-blocking, previewable alternative to
+`projectile-replace-regexp'."
+  (interactive)
+  (projectile-replace--review nil))
+
+;;; Reviewable read-only project-content search
+;;
+;; A search-only sibling of the reviewable replace UI above.  It reuses the
+;; same pure "find matches" machinery (`projectile-replace--candidates',
+;; `--gather', `--scan-file', the match struct and its accessors) and the
+;; same navigation, filter, case/regexp-toggle, visit and grep-export
+;; commands, but renders the matches into a read-only `*projectile-search*'
+;; buffer with no before->after preview, no per-match enable/disable toggle,
+;; and no apply.  It is a distinct major mode (`projectile-search-mode', a
+;; sibling of `projectile-replace-mode', not a shared base) so its keymap can
+;; simply omit every write-back key rather than disable it; the shared code
+;; lives under the `projectile-replace--' prefix (where it already was) and
+;; the two modes share the results-buffer buffer-locals.  A `replace these'
+;; bridge hands the current search off to the replace reviewer.
+
+(defvar projectile-search-buffer-name "*projectile-search*"
+  "Name of the buffer used by `projectile-search-review'.")
+
+(defun projectile-search--header-string ()
+  "Return the propertized status header for the search results buffer.
+Shows the term, the match and file counts, the mode flags
+\(regexp/literal and case), and a note when the list has been filtered.
+Carries no `projectile-replace-match' property, so match navigation
+skips it."
+  (let* ((matches projectile-replace--matches)
+         (nmatches (length matches))
+         (seen (make-hash-table :test 'equal))
+         nfiles flags)
+    (dolist (m matches)
+      (puthash (projectile-replace--match-file m) t seen))
+    (setq nfiles (hash-table-count seen)
+          flags (concat
+                 (if projectile-replace--literal "[literal]" "[regexp]")
+                 " "
+                 (if projectile-replace--case-fold
+                     "[ignore-case]" "[case-sensitive]")
+                 (if projectile-replace--word " [word]" "")
+                 (if projectile-replace--filtered "  filtered" "")
+                 (projectile-replace--scanning-note nmatches)))
+    (propertize
+     (format "Search %S\n%d match%s in %d file%s  %s\n"
+             projectile-replace--term
+             nmatches (if (= nmatches 1) "" "es")
+             nfiles (if (= nfiles 1) "" "s")
+             flags)
+     'face 'projectile-replace-header)))
+
+(defun projectile-search--render-line (m)
+  "Return the propertized results line for match M.
+The line is `LINE:COL: CONTEXT' with the matched span highlighted; there
+is no replacement preview and no enable/disable indicator.  The whole
+line carries the match struct under the `projectile-replace-match' text
+property so the shared navigation, visit and filter commands find it."
+  (let* ((col (projectile-replace--match-column m))
+         (ctx (projectile-replace--match-context m))
+         (mstr (projectile-replace--match-string m))
+         (before (substring ctx 0 (min col (length ctx))))
+         (after (if (<= (+ col (length mstr)) (length ctx))
+                    (substring ctx (+ col (length mstr)))
+                  ""))
+         (highlight (propertize mstr 'face 'projectile-replace-match))
+         (locator (propertize (format "%d:%d: "
+                                      (projectile-replace--match-line m)
+                                      (1+ col))
+                              'face 'projectile-replace-line-number))
+         (line (concat locator before highlight after "\n")))
+    (propertize line 'projectile-replace-match m)))
+
+(defun projectile-search--render ()
+  "Redraw the current search results buffer from its buffer-local state."
+  (let ((inhibit-read-only t)
+        (root projectile-replace--root)
+        (matches projectile-replace--matches)
+        (counts (make-hash-table :test 'equal))
+        (prev-file nil))
+    (dolist (m matches)
+      (cl-incf (gethash (projectile-replace--match-file m) counts 0)))
+    (erase-buffer)
+    (insert (projectile-search--header-string))
+    (insert (substitute-command-keys
+             (concat "\\<projectile-search-mode-map>"
+                     "\\[projectile-replace--visit] visit  "
+                     "\\[projectile-replace--refresh] re-search  "
+                     "\\[projectile-search--to-replace] replace these  "
+                     "\\[projectile-replace--export] export  "
+                     "\\[projectile-replace--quit] quit\n"
+                     "\\[projectile-replace--toggle-case] case  "
+                     "\\[projectile-replace--toggle-regexp] regexp/literal  "
+                     "\\[projectile-replace--toggle-word] word  "
+                     "\\[projectile-replace--keep-matches]/\\[projectile-replace--flush-matches] keep/flush line  "
+                     "\\[projectile-replace--keep-files]/\\[projectile-replace--flush-files] keep/flush file\n\n")))
+    (if (null matches)
+        (insert "No matches.\n")
+      (dolist (m matches)
+        (let ((file (projectile-replace--match-file m)))
+          (unless (equal prev-file file)
+            (when prev-file (insert "\n"))
+            (setq prev-file file)
+            (insert (projectile-replace--file-header
+                     file root (gethash file counts))))
+          (insert (projectile-search--render-line m)))))
+    (when projectile-replace--truncated
+      (insert (format "\n(showing the first %d matches)\n"
+                      projectile-search-max-matches)))
+    (goto-char (point-min))))
+
+(defun projectile-search--to-replace ()
+  "Hand the current search to the reviewable replace UI.
+Carries over the same term, literal-ness and case setting and prompts
+only for the replacement.  The project is re-scanned from scratch (so
+any filtering is undone and every match comes back enabled), mirroring
+`projectile-replace-review'."
+  (interactive)
+  (let* ((root projectile-replace--root)
+         (projects projectile-replace--projects)
+         (term projectile-replace--term)
+         (literal projectile-replace--literal)
+         (case-fold projectile-replace--case-fold)
+         (word projectile-replace--word)
+         (regexp projectile-replace--search)
+         (replacement (read-string
+                       (projectile-prepend-project-name
+                        (format "Replace %s with: " term))))
+         (candidates (projectile-replace--candidates term literal case-fold projects)))
+    (projectile-replace--open
+     #'projectile-replace-mode projectile-replace-buffer-name
+     root term regexp replacement literal case-fold candidates
+     (projectile-prepend-project-name (format "No matches for %s" term))
+     word nil projects)))
+
+(defvar projectile-search-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "RET") #'projectile-replace--visit)
+    (define-key map (kbd "n") #'projectile-replace--goto-next-match)
+    (define-key map (kbd "p") #'projectile-replace--goto-prev-match)
+    (define-key map (kbd "M-n") #'projectile-replace--goto-next-file)
+    (define-key map (kbd "M-p") #'projectile-replace--goto-prev-file)
+    (define-key map (kbd "c") #'projectile-replace--toggle-case)
+    (define-key map (kbd "x") #'projectile-replace--toggle-regexp)
+    (define-key map (kbd "w") #'projectile-replace--toggle-word)
+    (define-key map (kbd "k") #'projectile-replace--keep-matches)
+    (define-key map (kbd "d") #'projectile-replace--flush-matches)
+    (define-key map (kbd "K") #'projectile-replace--keep-files)
+    (define-key map (kbd "D") #'projectile-replace--flush-files)
+    (define-key map (kbd "e") #'projectile-replace--export)
+    (define-key map (kbd "r") #'projectile-search--to-replace)
+    (define-key map (kbd "g") #'projectile-replace--refresh)
+    (define-key map (kbd "q") #'projectile-replace--quit)
+    map)
+  "Keymap for `projectile-search-mode'.")
+
+(define-derived-mode projectile-search-mode special-mode "Projectile-Search"
+  "Major mode for reviewing project-wide search matches, read-only.
+
+A search-only sibling of `projectile-replace-mode': the buffer is a
+read-only listing of every match, grouped by file, with no replacement
+preview and no way to edit the files from here.  Navigate with
+\\<projectile-search-mode-map>\\[projectile-replace--goto-next-match] / \\[projectile-replace--goto-prev-match] (match) and \\[projectile-replace--goto-next-file] / \\[projectile-replace--goto-prev-file] (file), and \\[projectile-replace--visit]
+visits the match under point.  The search can be reshaped in place:
+\\[projectile-replace--toggle-case] toggles case sensitivity,
+\\[projectile-replace--toggle-regexp] toggles literal/regexp matching and
+\\[projectile-replace--toggle-word] toggles whole-word matching,
+each re-scanning; \\[projectile-replace--keep-matches] / \\[projectile-replace--flush-matches] keep or flush matches by line and
+\\[projectile-replace--keep-files] / \\[projectile-replace--flush-files] by file; \\[projectile-replace--refresh] re-runs the search, undoing any filtering.
+
+\\[projectile-search--to-replace] hands the current search off to the reviewable replace UI
+\(prompting only for the replacement), and \\[projectile-replace--export] exports the shown
+matches to a `grep-mode' buffer for wgrep or Emacs 31's `grep-edit-mode'.
+
+\\{projectile-search-mode-map}"
+  (setq-local truncate-lines t)
+  (setq-local projectile-replace--render-function #'projectile-search--render)
+  ;; killing the buffer mid-scan must not leave a dangling chunk timer
+  (add-hook 'kill-buffer-hook #'projectile-replace--cancel-scan nil t)
+  (buffer-disable-undo))
+
+(defun projectile-search--review (literal)
+  "Gather matches for a project-wide search and pop the read-only results buffer.
+LITERAL non-nil searches for a literal string; otherwise the term is an
+Emacs regexp.  There is no replacement prompt.
+
+This is `projectile-search-in-projects' over the one project you are in;
+the prompt is built here because only the single-project case can name
+the tool that will do the scanning."
+  (projectile-search-in-projects
+   (list (projectile-acquire-root)) literal
+   (format "Search %s%s for"
+           (projectile--search-tool-tag
+            (if (and literal (projectile-search--rg-fastpath-p t))
+                "ripgrep" "elisp"))
+           (if literal "" " regexp"))))
+
+;;;###autoload
+(defun projectile-search-review ()
+  "Search the project for a literal string and review the matches read-only.
+
+Prompts for a literal search string (defaulting to the symbol or region
+at point), gathers every match across the project into a read-only
+`*projectile-search*' buffer grouped by file, and lets you navigate,
+filter and reshape the search.  Use \\<projectile-search-mode-map>\\[projectile-search--to-replace] to turn it into a
+reviewable replacement.  This is the read-only sibling of
+`projectile-replace-review'."
+  (interactive)
+  (projectile-search--review t))
+
+;;;###autoload
+(defun projectile-search-regexp-review ()
+  "Search the project for an Emacs regexp and review the matches read-only.
+
+Like `projectile-search-review', but the search term is an Emacs regexp,
+so full Emacs regexp syntax (e.g. symbol boundaries like `\\_<foo\\_>')
+is honored."
+  (interactive)
+  (projectile-search--review nil))
+
+;;; Project-wide TODO/FIXME annotations
+;;
+;; `projectile-todos' is a thin command on top of the read-only search
+;; reviewer above: it builds one regexp out of `projectile-todo-keywords' and
+;; opens the very same `*projectile-search*' buffer, so grouping by file,
+;; navigation, the keep/flush filters, re-search, the grep-mode export and the
+;; hand-off to the replace reviewer all come for free.
+;;
+;; The keyword regexp is fenced the way hl-todo and magit-todos fence theirs:
+;; the keyword must start at a word boundary and be followed by a colon,
+;; whitespace or the end of the line, so `TODO:' and `FIXME ' are hits while
+;; `TODOS' and `MASTODON' are not.  Requiring a comment character in front is
+;; deliberately NOT done: neither scan parses the language, and the comment
+;; syntax would have to be guessed per file type, so an annotation in a string
+;; or in prose is reported too (cheap to filter out with `d' in the buffer).
+;;
+;; Because a big repo is exactly where a pure-elisp scan hurts, the command
+;; also hands the reviewer a ripgrep-syntax spelling of the same pattern
+;; (`projectile-replace--rg-pattern'), which lets the otherwise literal-only
+;; ripgrep fast-path run for this non-literal search.  The two spellings agree
+;; except at underscores (rg's `\b' counts `_' as a word character, Emacs'
+;; word boundaries do not), which only shows up for identifiers like
+;; `TODO_LIST'.
+
+(defun projectile-todos--rg-quote (keyword)
+  "Quote KEYWORD for ripgrep's regex syntax.
+Every character that is not alphanumeric or an underscore is escaped, so
+a keyword carrying punctuation (`@TODO', `TODO?') stays literal in Rust
+regex syntax, where more characters are special than in Emacs'."
+  (replace-regexp-in-string "[^[:alnum:]_]" "\\\\\\&" keyword t))
+
+(defun projectile-todos--regexp (keywords)
+  "Return the Emacs regexp matching any annotation keyword in KEYWORDS.
+The keyword must begin at a word boundary and be followed by a colon, by
+whitespace or by the end of the line."
+  (concat "\\<" (regexp-opt keywords) "\\>\\(?::\\|[[:blank:]]\\|$\\)"))
+
+(defun projectile-todos--rg-pattern (keywords)
+  "Return the ripgrep-syntax equivalent of `projectile-todos--regexp'.
+KEYWORDS is the list of annotation keywords to match."
+  (concat "\\b(?:"
+          (mapconcat #'projectile-todos--rg-quote keywords "|")
+          ")\\b(?::|[[:blank:]]|$)"))
+
+(defun projectile-todos--read-keywords ()
+  "Read which of `projectile-todo-keywords' to search for.
+Several keywords can be given, comma separated, and a keyword that is not
+in the list can be typed in for a one-off search."
+  (let ((keywords (delete "" (completing-read-multiple
+                              (projectile-prepend-project-name
+                               "TODO keywords: ")
+                              projectile-todo-keywords))))
+    (or keywords (user-error "No annotation keywords given"))))
+
+;;;###autoload
+(defun projectile-todos (&optional arg)
+  "Collect the project's TODO-style annotations and review them read-only.
+
+Searches every project file for the annotation keywords in
+`projectile-todo-keywords' (`TODO', `FIXME', `HACK', ... - customize the
+list to match your own conventions) and gathers the hits into the same
+read-only `*projectile-search*' buffer `projectile-search-review' uses,
+grouped by file, so all of its navigation, filtering, re-search, export
+and hand-off commands apply.
+
+A keyword only counts when it stands as a whole word followed by a colon,
+by whitespace or by the end of the line, so `TODO:' and `FIXME ' are
+found while `TODOS' and `MASTODON' are not.  Matching is case-sensitive
+\(annotation keywords are uppercase by convention); toggle that with `c'
+in the results buffer.  The keyword does not have to sit in a comment.
+
+With a prefix argument ARG, prompt for which keywords to search for
+instead of using all of them."
+  (interactive "P")
+  (projectile--todos (list (projectile-acquire-root)) arg))
+
+(defun projectile--todos (projects &optional arg)
+  "Collect the TODO-style annotations of PROJECTS into the search reviewer.
+With ARG non-nil, prompt for which keywords to search for.  PROJECTS is a
+list of project roots, so one project and a whole group take the same
+path; see `projectile-search-in-projects' for what changes when there is
+more than one."
+  (let* ((projects (projectile--project-group projects "projects"))
+         (keywords (or (if arg
+                           (projectile-todos--read-keywords)
+                         projectile-todo-keywords)
+                       (user-error "`projectile-todo-keywords' is empty")))
+         (regexp (projectile-todos--regexp keywords))
+         (rg-pattern (projectile-todos--rg-pattern keywords))
+         ;; the term IS the regexp, so the in-buffer toggles keep working
+         (case-fold nil)
+         (candidates (lambda ()
+                       (projectile-replace--candidates regexp nil case-fold projects))))
+    (projectile-replace--open
+     #'projectile-search-mode projectile-search-buffer-name
+     (or (projectile--common-parent projects) "/")
+     regexp regexp nil nil case-fold candidates
+     (projectile-prepend-project-name
+      (format "No %s annotations found" (string-join keywords "/")))
+     ;; The pattern is already word-fenced and ends in a delimiter, so the
+     ;; whole-word fence could never match; whole-word mode is not seeded here.
+     nil rg-pattern projects)))
+
+;;; Project buffer commands
+;;
+;; Acting on the buffers that belong to the project - killing them, saving
+;; them - and the condition language `projectile-kill-buffers-filter' uses to
+;; decide which ones are in scope.
+
+(defun projectile--buffer-matches-conditions (buffer conditions)
+  "Return non-nil if BUFFER satisfies any condition in CONDITIONS.
+
+CONDITIONS is a list using the DSL documented in
+`projectile-kill-buffers-filter'.  Modeled on project.el's
+`project--buffer-check'."
+  (catch 'match
+    (dolist (c conditions)
+      (when (cond
+             ((stringp c)
+              (string-match-p c (buffer-name buffer)))
+             ((functionp c)
+              (funcall c buffer))
+             ((eq (car-safe c) 'major-mode)
+              (eq (buffer-local-value 'major-mode buffer) (cdr c)))
+             ((eq (car-safe c) 'derived-mode)
+              (provided-mode-derived-p
+               (buffer-local-value 'major-mode buffer) (cdr c)))
+             ((eq (car-safe c) 'not)
+              (not (projectile--buffer-matches-conditions buffer (cdr c))))
+             ((eq (car-safe c) 'or)
+              (projectile--buffer-matches-conditions buffer (cdr c)))
+             ((eq (car-safe c) 'and)
+              (seq-every-p
+               (apply-partially #'projectile--buffer-matches-conditions buffer)
+               (mapcar #'list (cdr c)))))
+        (throw 'match t)))))
+
+(defun projectile-buffer-killed-p (buffer)
+  "Return non-nil if BUFFER should be killed by `projectile-kill-buffers'.
+The decision follows `projectile-kill-buffers-filter'."
+  (cond
+   ((functionp projectile-kill-buffers-filter)
+    (funcall projectile-kill-buffers-filter buffer))
+   ((eq projectile-kill-buffers-filter 'kill-all) t)
+   ((eq projectile-kill-buffers-filter 'kill-only-files)
+    (buffer-file-name buffer))
+   ((listp projectile-kill-buffers-filter)
+    (projectile--buffer-matches-conditions buffer projectile-kill-buffers-filter))
+   (t (user-error "Invalid projectile-kill-buffers-filter value: %S"
+                  projectile-kill-buffers-filter))))
+
+;;;###autoload
+(defun projectile-kill-buffers ()
+  "Kill project buffers.
+
+The buffers are killed according to the value of
+`projectile-kill-buffers-filter'."
+  (interactive)
+  (let* ((project (projectile-acquire-root))
+         (project-name (projectile-project-name project))
+         (buffers (projectile-project-buffers project)))
+    (when (yes-or-no-p
+           (format "Are you sure you want to kill %s buffers for '%s'? "
+                   (length buffers) project-name))
+      (dolist (buffer buffers)
+        (when (and
+               ;; we take care not to kill indirect buffers directly
+               ;; as we might encounter them after their base buffers are killed
+               (not (buffer-base-buffer buffer))
+               (projectile-buffer-killed-p buffer))
+          (kill-buffer buffer))))))
+
+;;;###autoload
+(defun projectile-save-project-buffers ()
+  "Save all project buffers."
+  (interactive)
+  (let* ((project (projectile-acquire-root))
+         (project-name (projectile-project-name project))
+         (modified-buffers (seq-filter (lambda (buf)
+                                               (and (buffer-file-name buf)
+                                                    (buffer-modified-p buf)))
+                                             (projectile-project-buffers project))))
+    (if (null modified-buffers)
+        (message "[%s] No buffers need saving" project-name)
+      (dolist (buf modified-buffers)
+        (with-current-buffer buf
+          (save-buffer)))
+      (message "[%s] Saved %d buffers" project-name (length modified-buffers)))))
+
+;;; Dired, version control and recent files
+;;
+;; Commands that hand the project root to something else: Dired, the VC
+;; interface, and `recentf' filtered down to the project.  The path of a
+;; project's on-disk cache file is worked out at the end of it, having
+;; nowhere better to live.
+
+(defun projectile--dired (dired-fn &optional arg)
+  "Open the project root in dired using DIRED-FN.
+DIRED-FN is a `dired'-like command; passing `dired-other-window' or
+`dired-other-frame' yields the other-window/-frame variants.  With ARG,
+prompt for a known project to open instead of the current one."
+  (funcall dired-fn
+           (if arg
+               (projectile-completing-read
+                "Dired in project: " (projectile-relevant-known-projects)
+                :category 'projectile-project
+                :caller 'projectile-read-project)
+             (projectile-acquire-root))))
+
+;;;###autoload
+(defun projectile-dired (&optional arg)
+  "Open `dired' at the root of the project.
+With a prefix argument ARG, prompt for a known project to open in dired."
+  (interactive "P")
+  (projectile--dired #'dired arg))
+
+;;;###autoload (autoload 'projectile-dired-other-window "projectile" nil t)
+;;;###autoload (autoload 'projectile-dired-other-frame "projectile" nil t)
+(projectile--define-display-variants projectile-dired (&optional arg)
+  "Open `dired' at the root of the project in another %s.
+With a prefix argument ARG, prompt for a known project to open in dired."
+  (projectile--dired #'dired-other-window arg))
+
+;;;###autoload
+(defun projectile-vc (&optional project-root)
+  "Open `vc-dir' at the root of the project.
+
+For git projects `magit-status-internal' is used if available.
+For hg projects `monky-status' is used if available.
+
+If PROJECT-ROOT is given, it is opened instead of the project
+root directory of the current buffer file.  If interactively
+called with a prefix argument, the user is prompted for a project
+directory to open."
+  (interactive (and current-prefix-arg
+                    (list
+                     (projectile-completing-read
+                      "Open project VC in: "
+                      (projectile-known-projects)
+                      :category 'projectile-project
+                      :caller 'projectile-read-project))))
+  (unless project-root
+    (setq project-root (projectile-acquire-root)))
+  (let ((vcs (projectile-project-vcs project-root)))
+    (pcase vcs
+      ('git
+       (cond ((fboundp 'magit-status-internal)
+              (magit-status-internal project-root))
+             ((fboundp 'magit-status)
+              (with-no-warnings (magit-status project-root)))
+             (t
+              (vc-dir project-root))))
+      ('hg
+       (if (fboundp 'monky-status)
+           (monky-status project-root)
+         (vc-dir project-root)))
+      (_ (vc-dir project-root)))))
+
+;;;###autoload
+(defun projectile-recentf ()
+  "Show a list of recently visited files in a project."
+  (interactive)
+  (if (boundp 'recentf-list)
+      (find-file (projectile-expand-root
+                  (projectile-completing-read
+                   "Recently visited files: "
+                   (projectile-recentf-files)
+                   :caller 'projectile-read-file)))
+    (message "recentf is not enabled")))
+
+(defun projectile-recentf-files ()
+  "Return a list of recently visited files in a project."
+  (and (boundp 'recentf-list)
+       (let ((project-root (file-truename (projectile-acquire-root))))
+         (mapcar
+          (lambda (f) (file-relative-name f project-root))
+          (seq-filter
+           (lambda (f) (string-prefix-p project-root (expand-file-name f)))
+           recentf-list)))))
+
+(defun projectile-project-cache-file (&optional project-root)
+  "The path to a project's cache file for PROJECT-ROOT.
+Acts on the current project if not specified explicitly."
+  (if project-root
+      (expand-file-name projectile-cache-file project-root)
+    (projectile-expand-root projectile-cache-file)))
+
+;;; Lifecycle command plumbing
+;;
+;; What the configure/compile/test/install/package/run commands are made of,
+;; as opposed to the commands themselves (see `;;; Lifecycle commands'): the
+;; per-project caches of the last command used, the dirconfig overrides, and
+;; the phase descriptors that tie the two together.
+
+(defvar projectile-configure-cmd-map
+  (make-hash-table :test 'equal)
+  "A mapping between projects and the last configure command used on them.")
+
+(defvar projectile-compilation-cmd-map
+  (make-hash-table :test 'equal)
+  "A mapping between projects and the last compilation command used on them.")
+
+(defvar projectile-install-cmd-map
+  (make-hash-table :test 'equal)
+  "A mapping between projects and the last install command used on them.")
+
+(defvar projectile-package-cmd-map
+  (make-hash-table :test 'equal)
+  "A mapping between projects and the last package command used on them.")
+
+(defvar projectile-test-cmd-map
+  (make-hash-table :test 'equal)
+  "A mapping between projects and the last test command used on them.")
+
+(defvar projectile-run-cmd-map
+  (make-hash-table :test 'equal)
+  "A mapping between projects and the last run command used on them.")
+
+(defconst projectile--lifecycle-phases
+  '((:name configure :prompt "Configure command: " :save-buffers t
+     :cmd-map projectile-configure-cmd-map
+     :dir-local-var projectile-project-configure-cmd
+     :default-fn projectile--expand-configure-command
+     :command-fn projectile-configure-command)
+    (:name compile :prompt "Compile command: " :save-buffers t
+     :cmd-map projectile-compilation-cmd-map
+     :dir-local-var projectile-project-compilation-cmd
+     :default-fn projectile-default-compilation-command
+     :command-fn projectile-compilation-command)
+    (:name test :prompt "Test command: " :save-buffers t
+     :cmd-map projectile-test-cmd-map
+     :dir-local-var projectile-project-test-cmd
+     :default-fn projectile-default-test-command
+     :command-fn projectile-test-command)
+    (:name install :prompt "Install command: " :save-buffers t
+     :cmd-map projectile-install-cmd-map
+     :dir-local-var projectile-project-install-cmd
+     :default-fn projectile-default-install-command
+     :command-fn projectile-install-command)
+    (:name package :prompt "Package command: " :save-buffers t
+     :cmd-map projectile-package-cmd-map
+     :dir-local-var projectile-project-package-cmd
+     :default-fn projectile-default-package-command
+     :command-fn projectile-package-command)
+    (:name run :prompt "Run command: " :save-buffers nil
+     :cmd-map projectile-run-cmd-map
+     :dir-local-var projectile-project-run-cmd
+     :default-fn projectile-default-run-command
+     :command-fn projectile-run-command))
+  "Descriptors for the project lifecycle phases.
+
+Each entry is a plist with the phase symbol (`:name', also used as the
+command type for the per-type command history), the variable caching
+the last command per project (`:cmd-map'), the .dir-locals.el override
+variable (`:dir-local-var'), a function of the project type returning
+the default command (`:default-fn'), the public command resolver
+\(`:command-fn'), the prompt prefix (`:prompt') and whether to save the
+project's buffers before running the command (`:save-buffers').")
+
+(defun projectile--phase-descriptor (phase)
+  "Return the lifecycle descriptor for PHASE (a symbol like `compile')."
+  (or (seq-find (lambda (descriptor) (eq (plist-get descriptor :name) phase))
+                projectile--lifecycle-phases)
+      (error "Unknown project lifecycle phase `%s'" phase)))
+
+;;;###autoload
+(defun projectile-discard-command-cache ()
+  "Discard the cached lifecycle commands for the current project.
+
+Projectile caches the last command used for each of the configure,
+compile, test, install, package, and run actions and prefers it over the
+value from `.dir-locals.el' or the project type's default.  After
+editing those, run this command so the next invocation re-reads them.
+Handy on `after-save-hook' for `.dir-locals.el' buffers.
+
+This only clears the cached commands, not the command history offered at
+the prompt.  See also `projectile-discard-root-cache'."
+  (interactive)
+  (let ((root (projectile-acquire-root)))
+    (dolist (descriptor projectile--lifecycle-phases)
+      (let ((command-map (symbol-value (plist-get descriptor :cmd-map))))
+        (dolist (dir (hash-table-keys command-map))
+          (when (string-prefix-p root dir)
+            (remhash dir command-map)))))
+    ;; Give feedback when invoked interactively; stay quiet when used
+    ;; programmatically (e.g. from `after-save-hook') unless verbose.
+    (if (called-interactively-p 'interactive)
+        (message "Discarded the command cache for %s" root)
+      (projectile--message "Discarded the command cache for %s" root))))
+
+(defvar projectile-project-enable-cmd-caching t
+  "Enables command caching for the project.  Set to nil to disable.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-enable-cmd-caching 'safe-local-variable #'booleanp)
+
+(defun projectile--cache-project-commands-p ()
+  "Whether to cache project commands.
+The variable `projectile-project-enable-cmd-caching' is typically
+set via .dir-locals.el, which applies it buffer-locally in file
+buffers."
+  projectile-project-enable-cmd-caching)
+
+(defvar projectile-project-configure-cmd nil
+  "The command to use with `projectile-configure-project'.
+It takes precedence over the default command for the project type when set.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-configure-cmd 'safe-local-variable #'stringp)
+
+(defvar projectile-project-compilation-cmd nil
+  "The command to use with `projectile-compile-project'.
+It takes precedence over the default command for the project type when set.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-compilation-cmd 'safe-local-variable #'stringp)
+
+(defvar projectile-project-compilation-dir nil
+  "The directory to use with `projectile-compile-project'.
+The directory path is relative to the project root.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-compilation-dir 'safe-local-variable #'stringp)
+
+(defvar projectile-project-test-cmd nil
+  "The command to use with `projectile-test-project'.
+It takes precedence over the default command for the project type when set.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-test-cmd 'safe-local-variable #'stringp)
+
+(defvar projectile-project-install-cmd nil
+  "The command to use with `projectile-install-project'.
+It takes precedence over the default command for the project type when set.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-install-cmd 'safe-local-variable #'stringp)
+
+(defvar projectile-project-package-cmd nil
+  "The command to use with `projectile-package-project'.
+It takes precedence over the default command for the project type when set.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-package-cmd 'safe-local-variable #'stringp)
+
+(defvar projectile-project-run-cmd nil
+  "The command to use with `projectile-run-project'.
+It takes precedence over the default command for the project type when set.
+Should be set via .dir-locals.el.")
+(put 'projectile-project-run-cmd 'safe-local-variable #'stringp)
+
+;;; Project tasks
+;;
+;; A project's named tasks, both the ones configured in `projectile-tasks'
+;; and the ones discovered from the build tool.  Running them lives in
+;; `;;; Tasks, and repeating what you ran last'.
+
+(defun projectile-tasks-safe-p (value)
+  "Return non-nil if VALUE is a safe directory-local `projectile-tasks'.
+Only an alist mapping task-name strings to command strings is
+considered safe.  Function commands are rejected: a .dir-locals.el
+travels with the project, so a function value could execute arbitrary
+code the moment a task is run."
+  (let ((safe t))
+    (while (and safe (consp value))
+      (let ((entry (car value)))
+        (setq safe (and (consp entry)
+                        (stringp (car entry))
+                        (stringp (cdr entry)))))
+      (setq value (cdr value)))
+    (and safe (null value))))
+
+(defcustom projectile-tasks nil
+  "An alist of named tasks that can be run with `projectile-run-task'.
+
+Each entry has the form (TASK-NAME . COMMAND), where TASK-NAME is a
+string and COMMAND is either a shell command string or a function
+called with no arguments (and `default-directory' set to the project
+root) that returns such a string.
+
+Command strings support the same `%p' placeholder as the lifecycle
+commands; it's replaced with the project name at execution time.
+
+The variable can be set globally, per project type (see the `:tasks'
+keyword of `projectile-register-project-type'), or per project via
+.dir-locals.el, which makes the tasks shareable through your VCS.
+Entries here override same-named tasks defined by the project type
+\(see `projectile-project-tasks').
+
+Note that only string commands are safe as a directory-local value;
+tasks with function commands have to be defined globally or via a
+project type."
+  :group 'projectile
+  :type '(alist :key-type (string :tag "Task name")
+                :value-type (choice (string :tag "Shell command")
+                                    (function :tag "Function returning a shell command")))
+  :safe #'projectile-tasks-safe-p
+  :package-version '(projectile . "3.1.0"))
+
+;;;; Task discovery
+;;
+;; Most projects already describe their tasks somewhere - npm scripts,
+;; Makefile targets, justfile recipes - and retyping those into
+;; `projectile-tasks' is busy-work.  A provider reads one such file and
+;; turns it into tasks, which are offered alongside the configured ones.
+;;
+;; Providers are deliberately simple readers rather than full parsers:
+;; they only need the task names, and they must not shell out (that
+;; would make `projectile-run-task' pay for a process launch, and go
+;; wrong over TRAMP).
+
+(defcustom projectile-discover-tasks t
+  "Whether to offer the tasks a project's own tooling defines.
+
+When non-nil `projectile-run-task' also lists the tasks found by
+`projectile-task-providers' - npm scripts, Makefile targets and so on -
+in addition to the tasks configured via `projectile-tasks' and the
+project type.  Discovered tasks are named after the tool that defines
+them (e.g. `npm:build'), so they never collide with configured ones."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.3.0"))
+
+(defcustom projectile-task-providers
+  '(projectile-tasks-from-npm
+    projectile-tasks-from-deno
+    projectile-tasks-from-composer
+    projectile-tasks-from-just
+    projectile-tasks-from-taskfile
+    projectile-tasks-from-rake
+    projectile-tasks-from-make)
+  "Functions that discover the tasks a project's tooling defines.
+
+Each function is called with the project root and should return an
+alist of (TASK-NAME . COMMAND), both strings, or nil when the project
+has nothing it recognizes.  A function that signals is ignored, so a
+malformed manifest can't break `projectile-run-task'.
+
+Task names should carry a tool prefix (`npm:build', `make:test'), which
+is what keeps the providers from colliding with each other and with the
+configured tasks."
+  :group 'projectile
+  :type '(repeat function)
+  :package-version '(projectile . "3.3.0"))
+
+(defvar projectile--task-entry-set nil
+  "Entries of the project root being scanned for tasks, or nil.
+Bound by `projectile-discovered-tasks' so the providers can answer
+\"is this manifest here?\" from a single directory listing instead of
+stat-ing every candidate name (see `projectile--directory-entry-set').")
+
+(defun projectile--task-file (project-root name)
+  "Return NAME under PROJECT-ROOT when it exists as a readable file."
+  (when (or (null projectile--task-entry-set)
+            (gethash name projectile--task-entry-set))
+    (let ((file (expand-file-name name project-root)))
+      (and (file-readable-p file)
+           (not (file-directory-p file))
+           file))))
+
+(defun projectile--first-task-file (project-root names)
+  "Return the first of NAMES that exists under PROJECT-ROOT."
+  (seq-some (lambda (name) (projectile--task-file project-root name)) names))
+
+(defun projectile--tasks-named (names prefix command-format)
+  "Turn NAMES into tasks called `PREFIX:NAME'.
+Each task runs COMMAND-FORMAT with the name substituted for its `%s'."
+  (mapcar (lambda (name)
+            (cons (format "%s:%s" prefix name) (format command-format name)))
+          names))
+
+(defun projectile--json-tasks (file key prefix command-format)
+  "Return the tasks under KEY in the JSON object in FILE.
+Each key of that object becomes a task named `PREFIX:KEY', running
+COMMAND-FORMAT with the key substituted for its `%s'."
+  (when-let* ((json (projectile--read-json-file file
+                                                :object-type 'alist
+                                                :array-type 'list
+                                                :null-object nil
+                                                :false-object nil))
+              ;; A JSON document that isn't an object parses to something
+              ;; `alist-get' would choke on.
+              (object (and (consp json) json))
+              (entries (alist-get key object)))
+    (projectile--tasks-named (mapcar (lambda (entry) (symbol-name (car entry))) entries)
+                             prefix command-format)))
+
+(defun projectile--npm-runner (project-root)
+  "Return the package manager command to use in PROJECT-ROOT.
+Derived from the lock file present, so it holds regardless of which
+project type won detection."
+  (cond ((projectile--task-file project-root "pnpm-lock.yaml") "pnpm")
+        ((projectile--task-file project-root "yarn.lock") "yarn")
+        ((projectile--first-task-file project-root projectile--bun-lock-names) "bun")
+        (t "npm")))
+
+(defun projectile-tasks-from-npm (project-root)
+  "Return the npm scripts of the project in PROJECT-ROOT as tasks.
+The scripts run through whichever package manager the project's lock
+file points at."
+  (when-let* ((file (projectile--task-file project-root "package.json")))
+    (let ((runner (projectile--npm-runner project-root)))
+      (projectile--json-tasks file 'scripts runner (concat runner " run %s")))))
+
+(defun projectile-tasks-from-deno (project-root)
+  "Return the Deno tasks of the project in PROJECT-ROOT."
+  (when-let* ((file (projectile--first-task-file
+                     project-root projectile--deno-config-names)))
+    (projectile--json-tasks file 'tasks "deno" "deno task %s")))
+
+(defun projectile-tasks-from-composer (project-root)
+  "Return the Composer scripts of the project in PROJECT-ROOT."
+  (when-let* ((file (projectile--task-file project-root "composer.json")))
+    (projectile--json-tasks file 'scripts "composer" "composer run-script %s")))
+
+(defun projectile--matches-in-file (file regexp)
+  "Return the first capture group of every match of REGEXP in FILE.
+Matching is case-sensitive and the results keep their order, with
+duplicates dropped."
+  (let (names)
+    (with-temp-buffer
+      (insert-file-contents file)
+      (goto-char (point-min))
+      (let ((case-fold-search nil))
+        (while (re-search-forward regexp nil t)
+          (let ((name (match-string 1)))
+            (unless (member name names)
+              (push name names))))))
+    (nreverse names)))
+
+(defun projectile-tasks-from-just (project-root)
+  "Return the recipes of the justfile in PROJECT-ROOT as tasks."
+  (when-let* ((file (projectile--first-task-file
+                     project-root projectile--justfile-names)))
+    ;; A recipe starts in column zero, may be marked quiet with `@' and
+    ;; may take parameters.  The lookahead keeps `:=', which is an
+    ;; assignment, from reading as a recipe.
+    (projectile--tasks-named
+     (projectile--matches-in-file
+      file "^@?\\([a-zA-Z_][a-zA-Z0-9_-]*\\)[^:\n]*:\\(?:[^=\n]\\|$\\)")
+     "just" "just %s")))
+
+(defun projectile--taskfile-task-names (file)
+  "Return the keys of the top-level `tasks:' mapping in the Taskfile FILE.
+Those are the lines indented exactly one level under it; anything deeper
+belongs to a task rather than naming one."
+  (with-temp-buffer
+    (insert-file-contents file)
+    (goto-char (point-min))
+    (let ((case-fold-search nil)
+          names)
+      (when (re-search-forward "^tasks:[ \t]*$" nil t)
+        (forward-line 1)
+        (let ((indent (current-indentation)))
+          (while (and (not (eobp))
+                      (or (looking-at-p "^[ \t]*$")
+                          (< 0 (current-indentation))))
+            (when (and (= (current-indentation) indent)
+                       (looking-at "[ \t]+\\([a-zA-Z0-9_.:-]+\\):"))
+              (let ((name (match-string 1)))
+                (unless (member name names)
+                  (push name names))))
+            (forward-line 1))))
+      (nreverse names))))
+
+(defun projectile-tasks-from-taskfile (project-root)
+  "Return the tasks of the go-task Taskfile in PROJECT-ROOT."
+  (when-let* ((file (projectile--first-task-file
+                     project-root projectile--taskfile-names)))
+    (projectile--tasks-named (projectile--taskfile-task-names file)
+                             "task" "task %s")))
+
+(defun projectile-tasks-from-make (project-root)
+  "Return the targets of the Makefile in PROJECT-ROOT as tasks.
+Only plain named targets are offered - pattern rules, file targets and
+the special dot-targets aren't things you'd run by hand."
+  (when-let* ((file (projectile--first-task-file
+                     project-root projectile--makefile-names)))
+    (projectile--tasks-named
+     (projectile--matches-in-file
+      file "^\\([a-zA-Z0-9][a-zA-Z0-9_-]*\\)[ \t]*:\\(?:[^=\n]\\|$\\)")
+     "make" "make %s")))
+
+(defun projectile--rake-task-files (project-root)
+  "Return the files rake tasks may be defined in under PROJECT-ROOT.
+That's the project's Rakefile plus the `.rake' files in the usual task
+directories (see `projectile--rake-task-directories').  Returns nil when
+the project has no Rakefile, since without one there's nothing for rake
+to run - which also keeps this provider free for non-Ruby projects."
+  (when-let* ((rakefile (projectile--first-task-file
+                         project-root projectile--rakefile-names)))
+    (cons rakefile
+          (mapcan (lambda (dir)
+                    (let ((dir (expand-file-name dir project-root)))
+                      (when (file-directory-p dir)
+                        (ignore-errors
+                          (directory-files dir t "\\.rake\\'" 'nosort)))))
+                  projectile--rake-task-directories))))
+
+(defun projectile--rake-task-names (file)
+  "Return the names of the rake tasks defined in FILE.
+
+Only tasks whose name is written out literally are returned: a name
+built from a variable (`task type, [:id]') can't be known without
+running rake, which this deliberately doesn't do.  Names are qualified
+with the `namespace' blocks they sit in, so a task is returned under the
+name you'd actually invoke it by."
+  (let ((names nil)
+        ;; Stack of (INDENT . NAME) for the `namespace' blocks we're in.
+        (namespaces nil))
+    (with-temp-buffer
+      (insert-file-contents file)
+      (goto-char (point-min))
+      (let ((case-fold-search nil))
+        (while (not (eobp))
+          (let ((indent (current-indentation)))
+            (cond
+             ;; Leaving a block: drop the namespace it opened, if any.
+             ((looking-at "[ \t]*end\\_>")
+              (when (and namespaces (<= indent (caar namespaces)))
+                (pop namespaces)))
+             ((looking-at "[ \t]*namespace[ \t]+[:'\"]?\\([a-zA-Z0-9_][a-zA-Z0-9_-]*\\)")
+              (push (cons indent (match-string 1)) namespaces))
+             ;; `task' followed by whitespace - not `task.files = ...',
+             ;; which is a method call on a block argument.
+             ((looking-at
+               (concat "[ \t]*\\(?:multi\\)?task[ \t]+"
+                       ;; :symbol | 'string' | "string" | bare-word:
+                       "\\(?::\\([a-zA-Z0-9_][a-zA-Z0-9_:-]*\\)"
+                       "\\|[\"']\\([^\"'\n]+\\)[\"']"
+                       "\\|\\([a-zA-Z0-9_][a-zA-Z0-9_-]*\\):\\)"))
+              (let* ((name (or (match-string 1) (match-string 2) (match-string 3)))
+                     (qualified (string-join
+                                 (append (reverse (mapcar #'cdr namespaces))
+                                         (list name))
+                                 ":")))
+                (unless (member qualified names)
+                  (push qualified names))))))
+          (forward-line 1))))
+    (nreverse names)))
+
+(defun projectile-tasks-from-rake (project-root)
+  "Return the rake tasks of the project in PROJECT-ROOT.
+The tasks are read out of the project's Rakefile and `.rake' files
+rather than by running `rake -T', which would load the whole
+application."
+  (when-let* ((files (projectile--rake-task-files project-root)))
+    (let ((runner (if (projectile--task-file project-root "Gemfile")
+                      "bundle exec rake"
+                    "rake")))
+      (projectile--tasks-named
+       (delete-dups (mapcan #'projectile--rake-task-names files))
+       "rake" (concat runner " %s")))))
+
+(defun projectile-discovered-tasks (&optional project-root)
+  "Return the tasks discovered in the project at PROJECT-ROOT.
+PROJECT-ROOT defaults to the current project's root.  The tasks come
+from `projectile-task-providers'; a provider that signals is skipped."
+  (when projectile-discover-tasks
+    (when-let* ((root (or project-root (projectile-project-root)))
+                ;; One listing of the root answers every provider's
+                ;; "does this manifest exist?" question.
+                (projectile--task-entry-set (projectile--directory-entry-set root)))
+      (seq-mapcat (lambda (provider)
+                    (condition-case err
+                        (funcall provider root)
+                      (error
+                       (projectile--message "Task provider %s failed: %s"
+                                            provider (error-message-string err))
+                       nil)))
+                  projectile-task-providers))))
+
+(defun projectile--merge-tasks (&rest task-lists)
+  "Merge TASK-LISTS into one alist, earlier lists winning on name."
+  (let (merged)
+    (dolist (tasks task-lists)
+      (dolist (task tasks)
+        (unless (assoc (car task) merged)
+          (push task merged))))
+    (nreverse merged)))
+
+(defun projectile-project-tasks (&optional project-type project-root)
+  "Return the effective tasks alist for the current project.
+
+That's the PROJECT-TYPE's `:tasks' table (PROJECT-TYPE defaults to the
+current project's type) merged with `projectile-tasks', whose entries -
+set globally or per project via .dir-locals.el - override same-named
+project-type tasks, and with the tasks discovered in PROJECT-ROOT by
+`projectile-task-providers', which lose to both."
+  (let ((type-tasks (projectile-project-type-attribute
+                     (or project-type (projectile-project-type)) 'tasks)))
+    (projectile--merge-tasks projectile-tasks
+                             type-tasks
+                             (projectile-discovered-tasks project-root))))
+
+(defun projectile-default-generic-command (project-type command-type)
+  "Generic retrieval of COMMAND-TYPEs default cmd-value for PROJECT-TYPE.
+
+If found, checks if value is symbol or string.  In case of symbol
+resolves to function `funcall's.  Return value of function MUST
+be string to be executed as command."
+  (let ((command (plist-get (alist-get project-type projectile-project-types) command-type)))
+    (cond
+     ((not command) nil)
+     ((stringp command) command)
+     ((functionp command)
+      (funcall command))
+     (t
+      (error "The value for: %s in project-type: %s was neither a function nor a string" command-type project-type)))))
+
+(defun projectile-default-configure-command (project-type)
+  "Retrieve default configure command for PROJECT-TYPE."
+  (projectile-default-generic-command project-type 'configure-command))
+
+(defun projectile-default-compilation-command (project-type)
+  "Retrieve default compilation command for PROJECT-TYPE."
+  (projectile-default-generic-command project-type 'compile-command))
+
+(defun projectile-default-compilation-dir (project-type)
+  "Retrieve default compilation directory for PROJECT-TYPE."
+  (projectile-default-generic-command project-type 'compilation-dir))
+
+(defun projectile-default-test-command (project-type)
+  "Retrieve default test command for PROJECT-TYPE."
+  (projectile-default-generic-command project-type 'test-command))
+
+(defun projectile-default-install-command (project-type)
+  "Retrieve default install command for PROJECT-TYPE."
+  (projectile-default-generic-command project-type 'install-command))
+
+(defun projectile-default-package-command (project-type)
+  "Retrieve default package command for PROJECT-TYPE."
+  (projectile-default-generic-command project-type 'package-command))
+
+(defun projectile-default-run-command (project-type)
+  "Retrieve default run command for PROJECT-TYPE."
+  (projectile-default-generic-command project-type 'run-command))
+
+(defun projectile--expand-configure-command (project-type)
+  "Default configure command for PROJECT-TYPE with the project root filled in.
+The command may contain a `%s' placeholder which is replaced with
+the project root."
+  (when-let* ((cmd-format-string (projectile-default-configure-command project-type)))
+    (format cmd-format-string (projectile-project-root))))
+
+(defun projectile--phase-command (phase compile-dir)
+  "Resolve the command to run for lifecycle PHASE in COMPILE-DIR.
+Checks the phase's command cache first, then its .dir-locals.el
+override variable and finally the default command for the current
+project type."
+  (let ((descriptor (projectile--phase-descriptor phase)))
+    (or (gethash compile-dir (symbol-value (plist-get descriptor :cmd-map)))
+        (symbol-value (plist-get descriptor :dir-local-var))
+        (funcall (plist-get descriptor :default-fn) (projectile-project-type)))))
+
+(defun projectile-configure-command (compile-dir)
+  "Retrieve the configure command for COMPILE-DIR.
+Checks `projectile-configure-cmd-map' for the last configure command
+that was invoked on the project, then `projectile-project-configure-cmd'
+supplied via .dir-locals.el and finally the default configure command
+for a project of that type."
+  (projectile--phase-command 'configure compile-dir))
+
+;;; Compilation buffers, and resolving a command
+;;
+;; Where a lifecycle command's output goes and what it's called, plus the
+;; per-phase readers that resolve which command to run.
+
+
+(defvar projectile--compilation-command-type nil
+  "Lifecycle command type of the compilation being started, or nil.
+Bound by `projectile--run-project-cmd' for the duration of the call, so
+`projectile-compilation-buffer-name' - which `compile' calls with nothing
+but the mode name - can tell a test run from a build.")
+
+(defun projectile-compilation-buffer-scope ()
+  "Return the aspects a compilation buffer's name is qualified by.
+A list of `project' and/or `command'.  Normalizes the t shorthand of
+`projectile-compilation-buffer-scope' and folds in the two obsolete
+booleans it replaced, for a configuration that still sets one."
+  (let ((scope (if (eq projectile-compilation-buffer-scope t)
+                   '(project command)
+                 projectile-compilation-buffer-scope)))
+    (with-no-warnings
+      (append (unless (memq 'project scope)
+                (and projectile-per-project-compilation-buffer '(project)))
+              (unless (memq 'command scope)
+                (and projectile-per-command-compilation-buffer '(command)))
+              scope))))
+
+(defun projectile-compilation-buffer-name (compilation-mode)
+  "Meant to be used for `compilation-buffer-name-function'.
+Argument COMPILATION-MODE is the name of the major mode used for the
+compilation buffer.
+
+The name is qualified by the project and/or the lifecycle command type,
+according to `projectile-compilation-buffer-scope'."
+  (let* ((scope (projectile-compilation-buffer-scope))
+         (qualifiers
+          (delq nil
+                (list (and (memq 'project scope)
+                           (projectile-project-p)
+                           (projectile-project-name))
+                      (and (memq 'command scope)
+                           projectile--compilation-command-type
+                           (symbol-name projectile--compilation-command-type))))))
+    (concat "*" (downcase compilation-mode) "*"
+            (if qualifiers
+                (concat "<" (string-join qualifiers ":") ">")
+              ""))))
+
+(defun projectile-current-project-buffer-p ()
+  "Meant to be used for `compilation-save-buffers-predicate`.
+This indicates whether the current buffer is in the same project as the current
+window (including returning true if neither is in a project)."
+  (let ((root (with-current-buffer (window-buffer) (projectile-project-root))))
+    (or (not root)
+        (projectile-project-buffer-p (current-buffer) root))))
+
+(defun projectile-compilation-command (compile-dir)
+  "Retrieve the compilation command for COMPILE-DIR.
+Checks `projectile-compilation-cmd-map' for the last compile command
+that was invoked on the project, then `projectile-project-compilation-cmd'
+supplied via .dir-locals.el and finally the default compilation command
+for a project of that type."
+  (projectile--phase-command 'compile compile-dir))
+
+(defun projectile-test-command (compile-dir)
+  "Retrieve the test command for COMPILE-DIR.
+Checks `projectile-test-cmd-map' for the last test command that was
+invoked on the project, then `projectile-project-test-cmd' supplied
+via .dir-locals.el and finally the default test command for a project
+of that type."
+  (projectile--phase-command 'test compile-dir))
+
+(defun projectile-install-command (compile-dir)
+  "Retrieve the install command for COMPILE-DIR.
+Checks `projectile-install-cmd-map' for the last install command that
+was invoked on the project, then `projectile-project-install-cmd'
+supplied via .dir-locals.el and finally the default install command
+for a project of that type."
+  (projectile--phase-command 'install compile-dir))
+
+(defun projectile-package-command (compile-dir)
+  "Retrieve the package command for COMPILE-DIR.
+Checks `projectile-package-cmd-map' for the last package command that
+was invoked on the project, then `projectile-project-package-cmd'
+supplied via .dir-locals.el and finally the default package command
+for a project of that type."
+  (projectile--phase-command 'package compile-dir))
+
+(defun projectile-run-command (compile-dir)
+  "Retrieve the run command for COMPILE-DIR.
+Checks `projectile-run-cmd-map' for the last run command that was
+invoked on the project, then `projectile-project-run-cmd' supplied
+via .dir-locals.el and finally the default run command for a project
+of that type."
+  (projectile--phase-command 'run compile-dir))
+
+(defun projectile-read-command (prompt command &optional command-type)
+  "Adapted from the function `compilation-read-command'.
+
+COMMAND-TYPE, when non-nil, selects the per-type command history
+\(see `projectile--get-command-history') as the minibuffer history."
+  (let ((compile-history
+         ;; fetch the command history for the current project
+         (ring-elements (projectile--get-command-history (projectile-acquire-root)
+                                                         command-type))))
+    (read-shell-command prompt command
+                        (if (equal (car compile-history) command)
+                            '(compile-history . 1)
+                          'compile-history))))
+
+;;; Subprojects
+;;
+;; A monorepo is one project as far as version control (and therefore
+;; Projectile) is concerned, but its parts each have a manifest of their
+;; own - a crate, a package, a module.  Those are subprojects: Projectile
+;; keeps treating the repository as the project, and these commands let
+;; you work on the part you're in.
+
+(defcustom projectile-subproject-markers nil
+  "File names that mark a subproject inside a project.
+
+When nil (the default) the markers are derived from the registered
+project types - every type's `:project-file' - so registering a project
+type also teaches Projectile to recognize its manifest inside a
+monorepo.  Set this to an explicit list to narrow things down, e.g. to
+the manifests of the languages you actually work in.
+
+Derived markers never include the wildcard patterns some types use
+\(`?*.csproj' and friends), nor names with a directory component."
+  :group 'projectile
+  :type '(choice (const :tag "Derive from the registered project types" nil)
+                 (repeat string))
+  :package-version '(projectile . "3.3.0"))
+
+(defun projectile--subproject-markers ()
+  "Return the file names that mark a subproject.
+See `projectile-subproject-markers'."
+  (or projectile-subproject-markers
+      (let (markers)
+        (dolist (record projectile-project-types)
+          (dolist (file (ensure-list (plist-get (cdr record) 'project-file)))
+            (when (and (stringp file)
+                       ;; A wildcard would have to be expanded per
+                       ;; directory, and a name with a directory component
+                       ;; (`debian/control') isn't a plain marker.
+                       (not (projectile--wildcard-p file))
+                       (not (string-search "/" file))
+                       (not (member file markers)))
+              (push file markers))))
+        markers)))
+
+(defcustom projectile-subproject-functions
+  '(projectile-subprojects-from-manifest
+    projectile-subprojects-from-scan)
+  "Functions consulted by `projectile-project-subprojects'.
+
+Each is called with a project root and should return the project's
+subprojects as directory names relative to it, each ending in a slash.
+They are tried in order and the first non-empty answer wins - so the
+list runs from the most authoritative source to the most general, the
+way `projectile-project-root-functions' does.
+
+The default asks the workspace manifest first and falls back to scanning
+for manifests.  Put `projectile-subprojects-from-scan' first to always
+scan, or add your own function for a workspace format Projectile cannot
+read."
+  :group 'projectile
+  :type '(repeat function)
+  :package-version '(projectile . "3.5.0"))
+
+(defun projectile--expand-member-globs (root patterns)
+  "Expand PATTERNS relative to ROOT into a list of relative directory names.
+PATTERNS are workspace member globs (`packages/*', `crates/core').  Only
+existing directories survive, and each comes back with a trailing slash.
+Negated patterns - pnpm allows a leading `!' - are dropped rather than
+subtracted, which can only leave the answer too generous, never too
+narrow."
+  (let ((default-directory root)
+        (dirs nil))
+    (dolist (pattern patterns)
+      (unless (string-prefix-p "!" pattern)
+        ;; Two arguments only: the third is REGEXP, not a dotfile flag, and
+        ;; passing it makes a glob be read as a regular expression.
+        (dolist (hit (file-expand-wildcards (directory-file-name pattern)))
+          (when (file-directory-p (expand-file-name hit root))
+            (push (file-name-as-directory hit) dirs)))))
+    (sort (delete-dups dirs) #'string<)))
+
+(defun projectile--workspace-member-patterns (root)
+  "Return ROOT's declared workspace member patterns, or nil.
+Reads the manifest of the workspace formats Projectile can parse
+statically - pnpm, npm/yarn/bun, Cargo and Go - and returns the raw
+globs.  Formats whose member list is computed rather than declared
+\(Gradle builds it in a Kotlin or Groovy program, Bazel in Starlark) have
+no answer here and fall through to scanning."
+  (let ((pnpm (expand-file-name "pnpm-workspace.yaml" root))
+        (npm (expand-file-name "package.json" root))
+        (cargo (expand-file-name "Cargo.toml" root))
+        (gowork (expand-file-name "go.work" root)))
+    (cond
+     ((file-readable-p pnpm) (projectile--pnpm-workspace-patterns pnpm))
+     ((file-readable-p npm) (projectile--npm-workspace-patterns npm))
+     ((file-readable-p cargo) (projectile--cargo-workspace-patterns cargo))
+     ((file-readable-p gowork) (projectile--go-work-patterns gowork)))))
+
+(defun projectile--file-contents (file)
+  "Return the contents of FILE as a string."
+  (with-temp-buffer
+    (insert-file-contents file)
+    (buffer-string)))
+
+(defun projectile--pnpm-workspace-patterns (file)
+  "Return the `packages:' entries of the pnpm workspace manifest FILE.
+A deliberately small YAML reader: it takes the list items under the
+top-level `packages:' key and stops at the next top-level key, which is
+all this file shape needs (`catalog:' and friends live alongside it)."
+  (let ((lines (split-string (projectile--file-contents file) "\n"))
+        (in-packages nil)
+        (patterns nil))
+    (dolist (line lines)
+      (cond
+       ((string-match "\\`packages:[[:space:]]*\\'" line)
+        (setq in-packages t))
+       ;; any other unindented, non-comment line ends the block
+       ((and in-packages (string-match-p "\\`[^[:space:]#-]" line))
+        (setq in-packages nil))
+       ((and in-packages
+             (string-match "\\`[[:space:]]*-[[:space:]]*['\"]?\\([^'\"#]+?\\)['\"]?[[:space:]]*\\'" line))
+        (push (match-string 1 line) patterns))))
+    (nreverse patterns)))
+
+(defun projectile--npm-workspace-patterns (file)
+  "Return the `workspaces' globs declared by the package.json at FILE.
+Both the plain array form and the `{\"packages\": [...]}' form yarn uses
+are understood."
+  (when (fboundp 'json-parse-string)
+    (let* ((json (ignore-errors
+                   (json-parse-string (projectile--file-contents file)
+                                      :object-type 'alist
+                                      :array-type 'list)))
+           (workspaces (alist-get 'workspaces json)))
+      (cond
+       ((and (listp workspaces) (stringp (car workspaces))) workspaces)
+       ((listp workspaces) (alist-get 'packages workspaces))))))
+
+(defun projectile--toml-string-array (text key)
+  "Return the strings of the TOML array assigned to KEY in TEXT, or nil.
+Comments are stripped first, so the `# Internal' notes Cargo manifests
+carry inside their member list don't end up in the result."
+  (when (string-match (concat "^[[:space:]]*" (regexp-quote key)
+                              "[[:space:]]*=[[:space:]]*\\[\\(\\(?:.\\|\n\\)*?\\)\\]")
+                      text)
+    (let ((body (replace-regexp-in-string "#[^\n]*" "" (match-string 1 text)))
+          (out nil)
+          (start 0))
+      (while (string-match "\"\\([^\"]*\\)\"" body start)
+        (push (match-string 1 body) out)
+        (setq start (match-end 0)))
+      (nreverse out))))
+
+(defun projectile--cargo-workspace-patterns (file)
+  "Return the `[workspace]' members declared by the Cargo manifest at FILE.
+`exclude' entries are removed, so a fuzzing crate the workspace keeps out
+of the build is not reported as a member."
+  (let* ((text (projectile--file-contents file))
+         (members (projectile--toml-string-array text "members"))
+         (excluded (projectile--toml-string-array text "exclude")))
+    (seq-remove (lambda (m) (member m excluded)) members)))
+
+(defun projectile--go-work-patterns (file)
+  "Return the module directories a Go workspace file FILE puts to use.
+Both the parenthesised `use (...)' block and single-line `use ./dir' are
+understood."
+  (let ((text (projectile--file-contents file))
+        (out nil))
+    (when (string-match "use[[:space:]]*(\\([^)]*\\))" text)
+      (dolist (line (split-string (match-string 1 text) "\n" t))
+        (let ((entry (string-trim (replace-regexp-in-string "//.*" "" line))))
+          (unless (string-empty-p entry) (push entry out)))))
+    (let ((start 0))
+      (while (string-match "^[[:space:]]*use[[:space:]]+\\([^(\n]+\\)$" text start)
+        (push (string-trim (match-string 1 text)) out)
+        (setq start (match-end 0))))
+    (nreverse out)))
+
+(defun projectile-subprojects-from-manifest (root)
+  "Return the subprojects ROOT's workspace manifest declares, or nil.
+
+The member list a workspace declares is the workspace's own answer to
+what its parts are, so it is preferred over looking for manifests: it
+leaves out the ones that are deliberately not members - test fixtures
+carrying a package.json, a scaffolding template, an excluded fuzzing
+crate - which scanning cannot tell apart from the real thing."
+  (when-let* ((patterns (projectile--workspace-member-patterns root)))
+    (projectile--expand-member-globs root patterns)))
+
+(defun projectile-subprojects-from-scan (root)
+  "Return the directories below ROOT that hold a project manifest.
+
+What counts as a manifest comes from `projectile-subproject-markers'.
+The file listing of ROOT is what gets scanned, so the ignore rules apply
+as usual - the manifest of a vendored dependency does not turn it into a
+subproject.
+
+This finds every manifest there is, which is the right answer when
+nothing declares the members and too generous when something does; see
+`projectile-subprojects-from-manifest'."
+  (let* ((markers (projectile--subproject-markers))
+         (marker-set (make-hash-table :test 'equal))
+         (dirs (make-hash-table :test 'equal)))
+    (dolist (marker markers)
+      (puthash marker t marker-set))
+    (dolist (file (projectile-project-files root))
+      ;; The marker test first: it's a hash lookup against a name we
+      ;; already have, while `file-name-directory' allocates - and this
+      ;; runs over every file in the project.  A manifest sitting in the
+      ;; root itself has no directory part, which is the project rather
+      ;; than a subproject.
+      (when (gethash (file-name-nondirectory file) marker-set)
+        (when-let* ((dir (file-name-directory file)))
+          (puthash dir t dirs))))
+    (sort (hash-table-keys dirs) #'string<)))
+
+(defun projectile-project-subprojects (&optional project-root)
+  "Return the subprojects of the project at PROJECT-ROOT.
+
+A subproject is a part of a monorepo that has a project of its own - a
+crate, a package, a module.  The result is a sorted list of directory
+names relative to the root, each ending in a slash.
+
+Where the list comes from is `projectile-subproject-functions': by
+default the workspace manifest if there is one Projectile can read, and
+otherwise a scan for manifests."
+  (let ((root (or project-root (projectile-acquire-root))))
+    (run-hook-with-args-until-success 'projectile-subproject-functions root)))
+
+(defun projectile-subproject-type (&optional subproject-root)
+  "Return the project type of the subproject at SUBPROJECT-ROOT.
+
+Detection is rooted at the subproject instead of at the repository, so a
+crate inside a JavaScript monorepo comes back as `rust-cargo' rather than
+as one more `node' directory.  SUBPROJECT-ROOT defaults to the subproject
+containing the current file (see `projectile-subproject-root').
+
+This is what separates a subproject from a plain subdirectory: the
+repository stays the project - find-file, search and switching are still
+repository-wide - while the lifecycle commands under the `c m' prefix run
+the member's own build.  Promoting members to projects
+outright (by adding their manifests to
+`projectile-project-root-files-bottom-up') is the other way to get their
+commands right, at the cost of the repository no longer being a project."
+  (let* ((root (or subproject-root (projectile-subproject-root)))
+         ;; Resolve the repository's own type first, before the override is
+         ;; in force.
+         (repo-type (projectile-project-type))
+         (detected (let ((projectile--root-override root))
+                     (or (gethash root projectile-project-type-cache)
+                         (projectile-detect-project-type root root)))))
+    ;; A member of a JavaScript workspace holds a `package.json' and nothing
+    ;; else, so on its own it looks like a plain `node' project - and running
+    ;; `npm test' inside a pnpm or yarn workspace is worse than what the
+    ;; repository would have run.  The repository's type is the more specific
+    ;; one whenever both are identified by the same manifest, so keep it and
+    ;; only switch when the member is genuinely a different toolchain.
+    (if (projectile--same-manifest-type-p detected repo-type)
+        repo-type
+      detected)))
+
+(defun projectile--same-manifest-type-p (a b)
+  "Return non-nil when project types A and B are declared by the same manifest.
+Both `node' and `pnpm' are identified by `package.json', for instance, so
+one is a less specific reading of the other rather than a different kind
+of project."
+  (and a b
+       (let ((fa (projectile-project-type-attribute a 'project-file))
+             (fb (projectile-project-type-attribute b 'project-file)))
+         (and fa fb (equal fa fb)))))
+
+(defun projectile-subproject-root (&optional dir)
+  "Find the root of the nearest subproject containing DIR.
+Walk up from DIR (the current file's directory by default) looking for
+one of `projectile-subproject-markers', stopping at the project root.
+Returns the directory containing the nearest marker, or signals an error
+if no subproject is found between DIR and the project root."
+  (let* ((project-root (projectile-acquire-root))
+         (markers (projectile--subproject-markers))
+         (dir (or dir (file-name-directory (or (buffer-file-name) default-directory))))
+         (result nil))
+    ;; Walk up from current directory, stop at (but include) project root.
+    ;; Each level costs one directory listing rather than one stat per
+    ;; marker, which matters here - the derived marker set is long.
+    (while (and (not result)
+                dir
+                (string-prefix-p project-root dir))
+      (when (projectile--directory-marker dir markers 'files-only)
+        (setq result dir))
+      (let ((parent (file-name-directory (directory-file-name dir))))
+        (setq dir (unless (string= parent dir) parent))))
+    (or result
+        (user-error "No subproject found between current directory and project root"))))
+
+;;;###autoload
+(defun projectile-find-file-in-subproject ()
+  "Jump to a file in one of the current project's subprojects.
+Prompts for the subproject first, so the file completion only covers
+that part of the repository."
+  (interactive)
+  (let* ((project-root (projectile-acquire-root))
+         (subprojects (projectile-project-subprojects project-root)))
+    (unless subprojects
+      (user-error "No subprojects found in %s" project-root))
+    (let* ((subproject (projectile-completing-read "Subproject: " subprojects))
+           ;; Narrow the project's own listing rather than indexing the
+           ;; subdirectory afresh: it's already there, and indexing the
+           ;; subdirectory as if it were a project of its own would drop
+           ;; the project's ignore rules.
+           (files (projectile--restrict-to-subdirs
+                   (projectile-project-files project-root) (list subproject)))
+           (file (projectile-completing-read "Find file: " files
+                                             :caller 'projectile-read-file)))
+      (find-file (expand-file-name file project-root))
+      (run-hooks 'projectile-find-file-hook))))
+
+;;; Lifecycle commands
+;;
+;; Configure, compile, test, install, package and run: the six phases a
+;; project is driven through from Projectile.  Each resolves its command
+;; the same way (cache, then .dir-locals.el, then the project type's
+;; default), remembers what you ran, and hands it to `compile'.  The
+;; subproject variants at the end of the section are the same six, scoped
+;; to the part of a monorepo you're in.
+
+
+(defun projectile-compilation-dir (&optional base)
+  "Retrieve the compilation directory for this project.
+
+BASE, when non-nil, is the directory the project type's compilation
+directory is resolved against instead of the project root - a
+subproject's root, say, so a Meson module builds in its own `build'
+directory rather than the repository's."
+  (let* ((base (or base (projectile-acquire-root)))
+         (type (projectile-project-type base))
+         (comp-dir (or projectile-project-compilation-dir
+                       (projectile-default-compilation-dir type))))
+    (if comp-dir
+        (expand-file-name (file-name-as-directory comp-dir) base)
+      base)))
+
+(defun projectile-maybe-read-command (arg default-cmd prompt &optional command-type)
+  "Prompt user for command unless DEFAULT-CMD is an Elisp function.
+COMMAND-TYPE is forwarded to `projectile-read-command' to pick the
+per-type command history."
+  (if (and (or (stringp default-cmd) (null default-cmd))
+           (or compilation-read-command arg))
+      (projectile-read-command prompt default-cmd command-type)
+    default-cmd))
+
+(defun projectile-run-compilation (cmd &optional use-comint-mode)
+  "Run external or Elisp compilation command CMD."
+  (if (functionp cmd)
+      (funcall cmd)
+    (compile cmd use-comint-mode)))
+
+(defvar projectile-project-command-history (make-hash-table :test 'equal)
+  "The history of last executed project commands, per project.
+
+Indexed by whatever `projectile--command-history-key' makes of a project
+root, which is the repository the project is a checkout of when that can
+be established and the root itself otherwise.")
+
+(defun projectile--command-history-key (project-root)
+  "Return the key PROJECT-ROOT's command history is stored under.
+
+That's PROJECT-ROOT itself, unless `projectile-command-history-scope' asks
+for a repository-wide history and the repository can be identified - then
+it's a spelling of the repository, so that every checkout of it reaches the
+same history.
+
+The upstream is preferred over the repository directory because it is the
+broader of the two: worktrees of one repository agree on it, and so do
+separate clones, which is the same arrangement done by hand.  A repository
+with no upstream falls back to the directory its checkouts share, which
+still covers its worktrees.
+
+Two consequences worth knowing.  The key follows the remote, so pointing a
+repository at a new upstream moves it to a fresh history.  And this picks
+one of the two keys where `projectile-same-repo-p' accepts either, so
+checkouts that disagree about having a remote at all - an `hg share'
+working directory whose source configures a `default' path and which
+doesn't - are one repository for switching purposes but keep separate
+histories."
+  (or (and (eq projectile-command-history-scope 'repository)
+           (let ((identity (projectile-repo-identity project-root)))
+             (or (plist-get identity :remote)
+                 (plist-get identity :repo))))
+      project-root))
+
+(defun projectile--get-command-history (project-root &optional command-type)
+  "Return the command history ring for PROJECT-ROOT.
+
+With COMMAND-TYPE non-nil (one of the lifecycle command type
+symbols, e.g. `compile' or `test', or a (task . TASK-NAME) cons
+for named tasks) return the history specific to that command
+type, so histories of different types don't bleed into each
+other's prompts.  With COMMAND-TYPE nil return the combined history,
+which is what `projectile-repeat-last-command' reads.
+
+Which history that is depends on `projectile--command-history-key' - by
+default the repository's rather than this one checkout's."
+  (let* ((root-key (if command-type (cons project-root command-type) project-root))
+         (key (if command-type
+                  ;; The per-type histories are the ones you browse at a
+                  ;; prompt, so sharing them is all upside: pressing M-p in
+                  ;; a fresh worktree offers the commands this project is
+                  ;; actually built with.
+                  (cons (projectile--command-history-key project-root) command-type)
+                ;; The combined history stays this checkout's own.
+                ;; `projectile-repeat-last-command' replays its most recent
+                ;; entry without asking, and a command typed in another
+                ;; checkout can carry absolute paths back into it - being
+                ;; handed somebody else's build unasked is no fun.
+                project-root)))
+    (or (gethash key projectile-project-command-history)
+        ;; The per-type histories used to be keyed by root, and they're
+        ;; persisted, so an upgrade would otherwise walk into a project you
+        ;; have been building for years with nothing in hand.  Adopt this
+        ;; root's history as the repository's instead.
+        (unless (equal key root-key)
+          (when-let* ((inherited (gethash root-key projectile-project-command-history)))
+            (remhash root-key projectile-project-command-history)
+            (puthash key inherited projectile-project-command-history)))
+        (puthash key
+                 (make-ring 16)
+                 projectile-project-command-history))))
+
+(defun projectile--command-history-insert (history command)
+  "Insert COMMAND into the ring HISTORY.
+Duplicates are handled according to
+`projectile-command-history-ignore-duplicates'."
+  (cond
+   ((eq projectile-command-history-ignore-duplicates t)
+    (unless (string= (car-safe (ring-elements history)) command)
+      (ring-insert history command)))
+   ((eq projectile-command-history-ignore-duplicates 'erase)
+    (let ((idx (ring-member history command)))
+      (while idx
+        (ring-remove history idx)
+        (setq idx (ring-member history command))))
+    (ring-insert history command))
+   (t (ring-insert history command))))
+
+(cl-defun projectile--run-project-cmd
+    (command command-map &key command-type directory show-prompt prompt-prefix save-buffers use-comint-mode buffer-name-function no-cache)
+  "Run a project COMMAND, typically a test- or compile command.
+
+Cache the COMMAND for later use inside the hash-table COMMAND-MAP.
+With NO-CACHE non-nil the command is not stored in COMMAND-MAP (though
+its result still enters the command history) unless the user edited it
+at the prompt.  This is for function-derived commands, which must be
+re-resolved on every run so they can prompt again - but an edit is the
+user overriding that function, and overriding it once shouldn't have to
+be repeated on every run (issue #2097).
+
+COMMAND-TYPE, when non-nil, is the lifecycle command type symbol
+\(e.g. `compile' or `test') and is used to keep a per-type command
+history for the prompt, in addition to the combined per-project one.
+
+DIRECTORY, when non-nil, is where the command runs; it defaults to
+`projectile-compilation-dir'.  The caller passes it when it has already
+resolved the directory, so the command it looked up and the directory it
+runs in can't diverge.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+by setting SHOW-PROMPT.  The prompt will be prefixed with PROMPT-PREFIX.
+
+If SAVE-BUFFERS is non-nil save all projectile buffers before
+running the command.
+
+BUFFER-NAME-FUNCTION, when non-nil, is used as the
+`compilation-buffer-name-function' for the compilation, taking
+precedence over the `projectile-compilation-buffer-scope' naming.
+
+The placeholder `%p' in COMMAND is replaced with the project name.
+
+The command actually run is returned."
+  (let* ((project-root (projectile-acquire-root))
+         (default-directory (or directory (projectile-compilation-dir)))
+         ;; What the caller resolved, before the user got a say - the two
+         ;; differing is how we know the command was edited at the prompt.
+         (derived-command command)
+         (command (projectile-maybe-read-command show-prompt
+                                                 command
+                                                 prompt-prefix
+                                                 command-type))
+         (compilation-buffer-name-function compilation-buffer-name-function)
+         (compilation-save-buffers-predicate compilation-save-buffers-predicate)
+         ;; `compile' calls the buffer-name function with just the mode
+         ;; name, so the command type has to reach it this way.
+         (projectile--compilation-command-type command-type))
+    (when command-map
+      ;; A function-derived command (NO-CACHE) is re-resolved on every run so
+      ;; it can prompt again (e.g. a CMake preset picker); don't freeze its
+      ;; result in the cache, only feed it to the history below.  An edit at
+      ;; the prompt is a different matter: the user has overridden the
+      ;; function, so remember that instead of offering the function's
+      ;; answer again next time (issue #2097).  `projectile-discard-command-cache'
+      ;; hands the project back to the function.
+      (unless (and no-cache (equal command derived-command))
+        (puthash default-directory command command-map))
+      ;; Record into the combined per-project history (read by
+      ;; `projectile-repeat-last-command') and, when known, into the
+      ;; per-type history used for this command's prompt.
+      (projectile--command-history-insert
+       (projectile--get-command-history project-root) command)
+      (when command-type
+        (projectile--command-history-insert
+         (projectile--get-command-history project-root command-type) command)))
+    (when save-buffers
+      (save-some-buffers (not compilation-ask-about-save)
+                         (lambda ()
+                           (projectile-project-buffer-p (current-buffer)
+                                                        project-root))))
+    (let ((scope (projectile-compilation-buffer-scope)))
+      (when (memq 'project scope)
+        (setq compilation-save-buffers-predicate #'projectile-current-project-buffer-p))
+      (cond (buffer-name-function
+             (setq compilation-buffer-name-function buffer-name-function))
+            (scope
+             (setq compilation-buffer-name-function
+                   #'projectile-compilation-buffer-name))))
+    (unless command
+      (user-error "No %scommand configured for project type `%s'"
+                  (or prompt-prefix "") (projectile-project-type)))
+    (unless (file-directory-p default-directory)
+      (mkdir default-directory))
+    ;; Substitute placeholders: %p -> project name
+    (when (string-match-p "%p" command)
+      (setq command (string-replace "%p" (projectile-project-name project-root) command)))
+    (projectile-run-compilation command use-comint-mode)
+    command))
+
+(defcustom projectile-use-comint-mode nil
+  "Which of the commands Projectile runs get an interactive output buffer.
+
+Projectile reports through `compilation-mode', which is read-only.  For a
+command covered here it uses `comint-mode' instead, so a build that asks a
+question, a test runner that drops into a debugger, or a task that wants a
+sudo password can be typed at.
+
+The value is nil (nothing is interactive), t (everything is), or a list
+naming what is - the lifecycle phases `configure', `compile', `test',
+`install', `package' and `run', and `task' for the named tasks run by
+`projectile-run-task'."
+  :group 'projectile
+  :type '(choice (const :tag "Nothing" nil)
+                 (const :tag "Everything" t)
+                 (set :tag "Selected commands"
+                      (const :tag "Configure" configure)
+                      (const :tag "Compile" compile)
+                      (const :tag "Test" test)
+                      (const :tag "Install" install)
+                      (const :tag "Package" package)
+                      (const :tag "Run" run)
+                      (const :tag "Tasks" task)))
+  :package-version '(projectile . "3.4.0"))
+
+;; Remove in 4.0, this block and the fallback in
+;; `projectile-use-comint-mode-p' together.  Superseded by the single
+;; `projectile-use-comint-mode', which folds them in.
+(defvar projectile-configure-use-comint-mode nil
+  "Make the output buffer of `projectile-configure-project' interactive.")
+(defvar projectile-compile-use-comint-mode nil
+  "Make the output buffer of `projectile-compile-project' interactive.")
+(defvar projectile-test-use-comint-mode nil
+  "Make the output buffer of `projectile-test-project' interactive.")
+(defvar projectile-install-use-comint-mode nil
+  "Make the output buffer of `projectile-install-project' interactive.")
+(defvar projectile-package-use-comint-mode nil
+  "Make the output buffer of `projectile-package-project' interactive.")
+(defvar projectile-run-use-comint-mode nil
+  "Make the output buffer of `projectile-run-project' interactive.")
+
+(defconst projectile--obsolete-comint-vars
+  '((configure . projectile-configure-use-comint-mode)
+    (compile   . projectile-compile-use-comint-mode)
+    (test      . projectile-test-use-comint-mode)
+    (install   . projectile-install-use-comint-mode)
+    (package   . projectile-package-use-comint-mode)
+    (run       . projectile-run-use-comint-mode))
+  "The per-phase option `projectile-use-comint-mode' replaced, by phase.")
+
+(dolist (var projectile--obsolete-comint-vars)
+  (make-obsolete-variable (cdr var) "use `projectile-use-comint-mode' instead."
+                          "3.4.0"))
+
+(defun projectile-use-comint-mode-p (phase)
+  "Return non-nil when PHASE's output buffer should be interactive.
+PHASE is a lifecycle phase symbol such as `compile', or `task' for the
+named tasks - which run through the same machinery and are covered by the
+same option (see issue #2156).  Reads `projectile-use-comint-mode',
+falling back to the obsolete per-phase option it replaced for a
+configuration that still sets one; the tasks never had one of those."
+  ;; Normalized to a boolean: `memq' would otherwise hand the caller the
+  ;; tail of the option's list, which then travels all the way into
+  ;; `compile' as its COMINT argument.
+  (and (or (eq projectile-use-comint-mode t)
+           (memq phase projectile-use-comint-mode)
+           (when-let* ((var (alist-get phase projectile--obsolete-comint-vars)))
+             (symbol-value var)))
+       t))
+
+(defun projectile--phase-command-dynamic-p (phase)
+  "Non-nil when PHASE's command comes from a function for the current project.
+A project type can register a lifecycle command as a function (e.g. the
+CMake preset pickers, or a user's own `:test'/`:run' function).  Such a
+command is meant to be re-invoked - and may prompt - on every run, so its
+result must not be frozen in the command cache after the first run.  A
+`.dir-locals.el' override always wins and is a plain string, so it is
+never treated as dynamic."
+  (let ((descriptor (projectile--phase-descriptor phase)))
+    (and (not (symbol-value (plist-get descriptor :dir-local-var)))
+         (functionp
+          (plist-get (alist-get (projectile-project-type) projectile-project-types)
+                     (intern (format "%s-command" phase)))))))
+
+(defun projectile--lifecycle-prompt (descriptor base)
+  "Return the command prompt for the lifecycle phase DESCRIPTOR.
+When BASE is non-nil the command runs somewhere other than the project
+root, and the prompt says where - there's no other way to tell a
+subproject build from a whole-project one at the prompt."
+  (let ((prompt (plist-get descriptor :prompt)))
+    (if (null base)
+        prompt
+      (format "%s in %s: "
+              (string-trim-right prompt "[ :]+")
+              (file-relative-name base (projectile-acquire-root))))))
+
+(defun projectile--run-lifecycle-phase (phase show-prompt &optional base)
+  "Run the current project's command for lifecycle PHASE.
+PHASE is a symbol naming an entry of `projectile--lifecycle-phases'.
+With SHOW-PROMPT non-nil force prompting for the command, as in
+`projectile--run-project-cmd'.  BASE, when non-nil, is the directory the
+phase's compilation directory is resolved against instead of the project
+root (see `projectile-compilation-dir')."
+  (let* ((descriptor (projectile--phase-descriptor phase))
+         (directory (projectile-compilation-dir base))
+         (command (funcall (plist-get descriptor :command-fn) directory))
+         (command-map (if (projectile--cache-project-commands-p)
+                          (symbol-value (plist-get descriptor :cmd-map)))))
+    (projectile--run-project-cmd command command-map
+                                 :command-type phase
+                                 :directory directory
+                                 :show-prompt show-prompt
+                                 :prompt-prefix (projectile--lifecycle-prompt descriptor base)
+                                 :save-buffers (plist-get descriptor :save-buffers)
+                                 :no-cache (projectile--phase-command-dynamic-p phase)
+                                 :use-comint-mode (projectile-use-comint-mode-p phase))))
+
+;;;###autoload
+(defun projectile-configure-project (arg)
+  "Run project configure command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG."
+  (interactive "P")
+  (projectile--run-lifecycle-phase 'configure arg))
+
+;;;###autoload
+(defun projectile-compile-project (arg)
+  "Run project compilation command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG.  Per project default command can be set through
+`projectile-project-compilation-cmd'."
+  (interactive "P")
+  (projectile--run-lifecycle-phase 'compile arg))
+
+;;;###autoload
+(defun projectile-test-project (arg)
+  "Run project test command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG."
+  (interactive "P")
+  (projectile--run-lifecycle-phase 'test arg))
+
+;;;###autoload
+(defun projectile-install-project (arg)
+  "Run project install command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG."
+  (interactive "P")
+  (projectile--run-lifecycle-phase 'install arg))
+
+;;;###autoload
+(defun projectile-package-project (arg)
+  "Run project package command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG."
+  (interactive "P")
+  (projectile--run-lifecycle-phase 'package arg))
+
+;;;###autoload
+(defun projectile-run-project (arg)
+  "Run project run command.
+
+Normally you'll be prompted for a compilation command, unless
+variable `compilation-read-command'.  You can force the prompt
+with a prefix ARG."
+  (interactive "P")
+  (projectile--run-lifecycle-phase 'run arg))
+
+(defun projectile--run-subproject-phase (phase show-prompt)
+  "Run lifecycle PHASE in the nearest subproject of the current file.
+SHOW-PROMPT is as in `projectile--run-lifecycle-phase', which does the
+actual work - the subproject is just the directory the phase resolves
+its compilation directory against."
+  (let* ((subproject (projectile-subproject-root))
+         ;; `projectile--phase-command' falls back to the default command
+         ;; for `(projectile-project-type)'; bind it to the member's own
+         ;; type so a Rust crate in a JavaScript repo runs `cargo test'
+         ;; rather than the repository's `npm test'.  The dir-local
+         ;; override and the per-directory command cache still win over it.
+         (projectile-project-type (projectile-subproject-type subproject)))
+    (projectile--run-lifecycle-phase phase show-prompt subproject)))
+
+(defmacro projectile--define-subproject-commands (&rest phases)
+  "Define a subproject variant of the lifecycle command of each of PHASES.
+Each variant runs the phase command in the nearest subproject rather than
+at the project root; see `projectile--run-subproject-phase'."
+  `(progn
+     ,@(mapcar
+        (lambda (phase)
+          (let ((name (intern (format "projectile-%s-subproject" phase))))
+            `(defun ,name (arg)
+               ,(format "Run the %s command of the project in the nearest subproject.
+
+Find the closest project manifest (e.g. pom.xml, Cargo.toml) between the
+current directory and the project root, and run the command there instead
+of over the whole repository.  In a monorepo that is the module being
+worked on.  The command itself is unchanged - only the directory it runs
+in - so a project type that builds in a subdirectory (Meson in `build',
+say) still does, relative to the subproject.
+
+Normally you will be prompted for the command, unless variable
+`compilation-read-command'.  You can force the prompt with a prefix ARG."
+                        phase)
+               (interactive "P")
+               (projectile--run-subproject-phase ',phase arg))))
+        phases)))
+
+;;;###autoload (autoload 'projectile-configure-subproject "projectile" nil t)
+;;;###autoload (autoload 'projectile-compile-subproject "projectile" nil t)
+;;;###autoload (autoload 'projectile-test-subproject "projectile" nil t)
+;;;###autoload (autoload 'projectile-install-subproject "projectile" nil t)
+;;;###autoload (autoload 'projectile-package-subproject "projectile" nil t)
+;;;###autoload (autoload 'projectile-run-subproject "projectile" nil t)
+(projectile--define-subproject-commands configure compile test install package run)
+
+;;; Running the test at point
+;;
+;; Run just the test the cursor is in, rather than the whole suite.  A rule
+;; per major mode says how to recognise a test in that language's syntax
+;; tree and how to name it on the command line; `projectile-test-at-point-rules'
+;; ties them together and is where a language gets added.
+
+
+(defun projectile-test-at-point-python-name (node)
+  "Return the test name for the Python `function_definition' NODE.
+Return nil unless the function's name starts with \"test_\"."
+  (when-let* ((name-node (treesit-node-child-by-field-name node "name"))
+              (name (treesit-node-text name-node t)))
+    (when (string-prefix-p "test_" name)
+      name)))
+
+(defun projectile-test-at-point-python-command (test-name file-name)
+  "Return a pytest command running TEST-NAME in FILE-NAME.
+TEST-NAME and FILE-NAME are shell-quoted: a test name comes from the
+buffer's own source and a file name from the repository, so an
+unquoted interpolation would let a hostile project inject shell code."
+  (format "python -m pytest %s::%s"
+          (shell-quote-argument file-name)
+          (shell-quote-argument test-name)))
+
+(defun projectile-test-at-point-go-name (node)
+  "Return the test name for the Go `function_declaration' NODE.
+Return nil unless the function's name is one `go test' would run:
+\"Test\" followed by a non-lowercase character (or nothing)."
+  (when-let* ((name-node (treesit-node-child-by-field-name node "name"))
+              (name (treesit-node-text name-node t)))
+    (let ((case-fold-search nil))
+      (when (string-match-p "\\`Test\\([^[:lower:]]\\|\\'\\)" name)
+        name))))
+
+(defun projectile-test-at-point-go-command (test-name file-name)
+  "Return a `go test' command running TEST-NAME from FILE-NAME's package.
+The command targets exactly the package containing FILE-NAME (e.g.
+`./pkg/foo' for `pkg/foo/foo_test.go'); the recursive `./pkg/foo/...'
+form would also build every nested package and run any same-named
+tests they contain."
+  (let ((dir (file-name-directory file-name)))
+    ;; TEST-NAME and the package directory are shell-quoted to keep a
+    ;; hostile repository from injecting shell code.  The `^...$'
+    ;; regexp anchors stay inside the quoting so `-run' still gets one
+    ;; anchored pattern.
+    (format "go test -run %s %s"
+            (shell-quote-argument (concat "^" test-name "$"))
+            (shell-quote-argument
+             (if dir (concat "./" (directory-file-name dir)) ".")))))
+
+(defun projectile-test-at-point-jest-name (node)
+  "Return the test name for the JS/TS `call_expression' NODE.
+Matches `it'/`test'/`describe' calls (including member calls like
+`it.only' or `test.each') whose first argument is a string literal,
+returning that string without the surrounding quotes.  Return nil
+otherwise."
+  (let* ((fn (treesit-node-child-by-field-name node "function"))
+         (fn-name (when fn
+                    (pcase (treesit-node-type fn)
+                      ("identifier" (treesit-node-text fn t))
+                      ("member_expression"
+                       (when-let* ((object (treesit-node-child-by-field-name
+                                            fn "object")))
+                         (when (equal (treesit-node-type object) "identifier")
+                           (treesit-node-text object t))))))))
+    (when (member fn-name '("it" "test" "describe"))
+      (when-let* ((args (treesit-node-child-by-field-name node "arguments"))
+                  (arg (treesit-node-child args 0 t)))
+        (when (member (treesit-node-type arg) '("string" "template_string"))
+          ;; Strip the surrounding quotes/backticks.
+          (substring (treesit-node-text arg t) 1 -1))))))
+
+(defun projectile-test-at-point-jest-command (test-name file-name)
+  "Return a jest command running TEST-NAME in FILE-NAME.
+TEST-NAME and FILE-NAME are shell-quoted: the test name is arbitrary
+source text (JS strings can contain any character), so an unquoted
+interpolation would let a hostile project inject shell code."
+  (format "npx jest %s -t %s"
+          (shell-quote-argument file-name)
+          (shell-quote-argument test-name)))
+
+(defun projectile-test-at-point-ruby-name (node)
+  "Return the test name for the Ruby NODE at point.
+Handles both dialects: an RSpec `it'/`describe' call whose first
+argument is a string, and a Minitest `def test_foo' method."
+  (pcase (treesit-node-type node)
+    ("method"
+     (when-let* ((name-node (treesit-node-child-by-field-name node "name"))
+                 (name (treesit-node-text name-node t)))
+       (when (string-prefix-p "test_" name)
+         name)))
+    ((or "call" "method_call")
+     (when-let* ((method (treesit-node-child-by-field-name node "method"))
+                 (method-name (treesit-node-text method t)))
+       (when (member method-name '("it" "describe" "context" "specify"))
+         (when-let* ((args (treesit-node-child-by-field-name node "arguments"))
+                     (arg (treesit-node-child args 0 t)))
+           (when (equal (treesit-node-type arg) "string")
+             ;; Strip the surrounding quotes.
+             (let ((text (treesit-node-text arg t)))
+               (if (> (length text) 1) (substring text 1 -1) text)))))))))
+
+(defun projectile-test-at-point-ruby-command (test-name file-name)
+  "Return a command running Ruby\\='s TEST-NAME in FILE-NAME.
+
+Which runner to use is decided by the project type rather than by the
+buffer, since both dialects are written in the same major mode: an
+`rspec\\=' project gets `rspec -e\\=', anything else the Minitest
+invocation.  TEST-NAME and FILE-NAME are shell-quoted, as a test name is
+arbitrary source text."
+  (if (memq (projectile-project-type) '(rails-rspec ruby-rspec))
+      (format "bundle exec rspec %s -e %s"
+              (shell-quote-argument file-name)
+              (shell-quote-argument test-name))
+    (format "bundle exec ruby -Itest %s -n %s"
+            (shell-quote-argument file-name)
+            (shell-quote-argument test-name))))
+
+(defun projectile-test-at-point-rust-name (node)
+  "Return the test name for the Rust `function_item' NODE.
+Return nil unless the function carries a `#[test]\\=' (or
+`#[tokio::test]\\=', and friends) attribute, since an ordinary function
+isn\\='t something `cargo test\\=' would run."
+  (when-let* ((name-node (treesit-node-child-by-field-name node "name"))
+              (name (treesit-node-text name-node t)))
+    ;; Attributes are siblings preceding the function item.
+    (let ((sibling (treesit-node-prev-sibling node))
+          (test nil))
+      (while (and sibling
+                  (equal (treesit-node-type sibling) "attribute_item"))
+        (when (projectile--test-at-point-annotated-p
+               (treesit-node-text sibling t) '("test"))
+          (setq test t))
+        (setq sibling (treesit-node-prev-sibling sibling)))
+      (when test name))))
+
+(defun projectile-test-at-point-rust-command (test-name _file-name)
+  "Return a `cargo test\\=' command running TEST-NAME.
+Cargo selects tests by name filter rather than by file, so the file
+isn\\='t part of the command.  `--\\=' separates the filter from cargo\\='s own
+arguments and `--exact\\=' keeps a short name from also matching longer
+ones."
+  (format "cargo test -- --exact %s" (shell-quote-argument test-name)))
+
+(defun projectile-test-at-point-elixir-name (node)
+  "Return the test name for the Elixir `call' NODE.
+Matches an ExUnit `test\\='/`describe\\=' call whose first argument is a
+string."
+  (when-let* ((target (treesit-node-child-by-field-name node "target"))
+              (target-name (treesit-node-text target t)))
+    (when (member target-name '("test" "describe"))
+      (when-let* ((args (treesit-node-child-by-field-name node "arguments"))
+                  (arg (treesit-node-child args 0 t)))
+        (when (equal (treesit-node-type arg) "string")
+          (let ((text (treesit-node-text arg t)))
+            (if (> (length text) 1) (substring text 1 -1) text)))))))
+
+(defun projectile-test-at-point-elixir-command (_test-name file-name)
+  "Return a `mix test\\=' command running the test at point in FILE-NAME.
+
+ExUnit has no way to select a test by name from the command line, so it
+is addressed by line instead - the `FILE:LINE\\=' form.  The line is the
+one point is on, which is where the test was found in the first place."
+  (format "mix test %s"
+          (shell-quote-argument (format "%s:%d" file-name (line-number-at-pos)))))
+
+(defun projectile-test-at-point-java-name (node)
+  "Return the test name for the Java `method_declaration' NODE.
+Return nil unless the method carries a `@Test\\=' annotation (JUnit\\='s
+`@ParameterizedTest\\=' and `@RepeatedTest\\=' count too)."
+  (when-let* ((name-node (treesit-node-child-by-field-name node "name"))
+              (name (treesit-node-text name-node t))
+              (modifiers (treesit-node-child node 0 t)))
+    (when (and (equal (treesit-node-type modifiers) "modifiers")
+               (projectile--test-at-point-annotated-p
+                (treesit-node-text modifiers t)
+                '("Test" "ParameterizedTest" "RepeatedTest")))
+      name)))
+
+(defun projectile-test-at-point-java-command (test-name file-name)
+  "Return a command running Java\\='s TEST-NAME from FILE-NAME.
+
+JUnit addresses a test as `Class#method\\=', and Java requires the public
+class to be named after its file, so the class comes from FILE-NAME.
+Gradle and Maven spell the selector differently, so the project type
+decides which one to emit."
+  (let ((class (file-name-base file-name)))
+    (if (memq (projectile-project-type) '(gradle gradlew))
+        (format "./gradlew test --tests %s"
+                (shell-quote-argument (format "%s.%s" class test-name)))
+      (format "mvn test -Dtest=%s"
+              (shell-quote-argument (format "%s#%s" class test-name))))))
+
+(defun projectile--test-at-point-annotated-p (text names)
+  "Return non-nil when TEXT mentions one of NAMES as a whole word.
+
+Deliberately not the symbol-boundary operators: those consult the
+buffer's syntax table, under which the `<' and `>' of an F# `[<Fact>]'
+count as part of the symbol, so the boundary never matches.  Bracketing
+on non-alphanumerics is the same test without the dependency."
+  (string-match-p
+   (format "\\(?:^\\|[^[:alnum:]_]\\)\\(?:%s\\)\\(?:$\\|[^[:alnum:]_]\\)"
+           (mapconcat #'regexp-quote names "\\|"))
+   text))
+
+(defun projectile-test-at-point-erlang-name (node)
+  "Return the test name for the Erlang `fun_decl\\=' NODE.
+EUnit picks up functions whose name ends in `_test\\=' (a plain test) or
+`_test_\\=' (a test generator), which is the only thing marking one out
+from any other function."
+  (when-let* ((clause (treesit-node-child-by-field-name node "clause"))
+              (name-node (treesit-node-child-by-field-name clause "name"))
+              (name (treesit-node-text name-node t)))
+    (when (or (string-suffix-p "_test" name)
+              (string-suffix-p "_test_" name))
+      name)))
+
+(defun projectile-test-at-point-erlang-command (test-name file-name)
+  "Return a `rebar3 eunit\\=' command running TEST-NAME from FILE-NAME.
+EUnit addresses a test as `module:function\\=', and an Erlang module is
+named after its file, so the module comes from FILE-NAME."
+  (format "rebar3 eunit --test=%s"
+          (shell-quote-argument
+           (format "%s:%s" (file-name-base file-name) test-name))))
+
+(defun projectile-test-at-point-fsharp-name (node)
+  "Return the test name for the F# `function_or_value_defn\\=' NODE.
+
+Return nil unless the binding carries a test attribute - xUnit\\='s
+`[<Fact>]\\=' or `[<Theory>]\\=', NUnit\\='s `[<Test>]\\=' or FsCheck\\='s
+`[<Property>]\\='.  The attributes are a sibling of the definition under
+its enclosing `declaration_expression\\=', not a child of it.
+
+A name written between double backticks - which is how F# tests usually
+get readable names - is returned without them, since that is what the
+test framework sees."
+  (when-let* ((parent (treesit-node-parent node))
+              ;; `attributes' is a positional child of the enclosing
+              ;; `declaration_expression', not a field of it.
+              (attributes
+               (seq-find (lambda (child)
+                           (equal (treesit-node-type child) "attributes"))
+                         (treesit-node-children parent t))))
+    (when (projectile--test-at-point-annotated-p
+           (treesit-node-text attributes t)
+           '("Fact" "Theory" "Test" "TestCase" "Property"))
+      (when-let* ((left (treesit-node-child node 0 t))
+                  (name (treesit-node-text (treesit-node-child left 0 t) t)))
+        (if (and (string-prefix-p "``" name) (string-suffix-p "``" name))
+            (substring name 2 -2)
+          name)))))
+
+(defun projectile-test-at-point-fsharp-command (test-name _file-name)
+  "Return a `dotnet test\\=' command running TEST-NAME.
+The .NET test runners select by a filter expression rather than by file,
+so the file plays no part.  `FullyQualifiedName~\\=' matches on a
+substring, which keeps the filter working without the namespace."
+  (format "dotnet test --filter %s"
+          (shell-quote-argument (format "FullyQualifiedName~%s" test-name))))
+
+(defcustom projectile-test-at-point-rules
+  (let ((jest-rule '(:node-types ("call_expression")
+                     :name-fn projectile-test-at-point-jest-name
+                     :command-fn projectile-test-at-point-jest-command)))
+    `((python-ts-mode
+       :node-types ("function_definition")
+       :name-fn projectile-test-at-point-python-name
+       :command-fn projectile-test-at-point-python-command)
+      (go-ts-mode
+       :node-types ("function_declaration")
+       :name-fn projectile-test-at-point-go-name
+       :command-fn projectile-test-at-point-go-command)
+      (js-ts-mode ,@jest-rule)
+      (typescript-ts-mode ,@jest-rule)
+      (tsx-ts-mode ,@jest-rule)
+      (ruby-ts-mode
+       ;; RSpec examples are calls, Minitest cases are methods.
+       :node-types ("call" "method_call" "method")
+       :name-fn projectile-test-at-point-ruby-name
+       :command-fn projectile-test-at-point-ruby-command)
+      (rust-ts-mode
+       :node-types ("function_item")
+       :name-fn projectile-test-at-point-rust-name
+       :command-fn projectile-test-at-point-rust-command)
+      (elixir-ts-mode
+       :node-types ("call")
+       :name-fn projectile-test-at-point-elixir-name
+       :command-fn projectile-test-at-point-elixir-command)
+      (java-ts-mode
+       :node-types ("method_declaration")
+       :name-fn projectile-test-at-point-java-name
+       :command-fn projectile-test-at-point-java-command)
+      (erlang-ts-mode
+       :node-types ("fun_decl")
+       :name-fn projectile-test-at-point-erlang-name
+       :command-fn projectile-test-at-point-erlang-command)
+      (fsharp-ts-mode
+       :node-types ("function_or_value_defn")
+       :name-fn projectile-test-at-point-fsharp-name
+       :command-fn projectile-test-at-point-fsharp-command)))
+  "Rules telling `projectile-run-test-at-point' how to run a single test.
+
+An alist keyed by major mode symbol.  The current buffer's mode is
+matched against the keys with `derived-mode-p', so a rule keyed on a
+mode also applies to modes derived from it.  Each value is a plist
+with the following keys:
+
+`:node-types' - a list of tree-sitter node type strings; walking up
+the parse tree from point, only nodes of these types are considered.
+
+`:name-fn' - a function called with a matching tree-sitter node that
+returns the test name string, or nil if the node isn't a test (in
+which case the walk continues upward).
+
+`:command-fn' - a function called with the test name and the file
+name (relative to the directory the command runs in, normally the
+project root) that returns the shell command to run."
+  :group 'projectile
+  :type '(alist :key-type (symbol :tag "Major mode")
+                :value-type (plist :tag "Rule"))
+  :package-version '(projectile . "3.1.0"))
+
+(defun projectile--test-at-point-rule ()
+  "Return the `projectile-test-at-point-rules' rule for the current buffer.
+The buffer's major mode is matched against the rule keys with
+`derived-mode-p'.  Return nil when no rule matches."
+  (cdr (seq-find (lambda (rule) (derived-mode-p (car rule)))
+                 projectile-test-at-point-rules)))
+
+(defun projectile--test-at-point-name (rule)
+  "Return the name of the test around point according to RULE, or nil.
+Walk up the tree-sitter parse tree from the node at point; for every
+enclosing node whose type is in RULE's `:node-types', call the rule's
+`:name-fn' with the node and return its first non-nil result."
+  (let ((node-types (plist-get rule :node-types))
+        (name-fn (plist-get rule :name-fn))
+        (node (treesit-node-at (point)))
+        name)
+    (while (and node (null name))
+      (when (member (treesit-node-type node) node-types)
+        (setq name (funcall name-fn node)))
+      (setq node (treesit-node-parent node)))
+    name))
+
+;;;###autoload
+(defun projectile-run-test-at-point (arg)
+  "Run the test around point, if any.
+
+The test is located by walking up the buffer's tree-sitter parse
+tree according to the rule for the buffer's major mode in
+`projectile-test-at-point-rules', which also determines the command
+used to run it.  Requires Emacs 29+ built with tree-sitter support
+and a tree-sitter major mode (e.g. `python-ts-mode').
+
+The command runs like `projectile-test-project' does (same working
+directory and buffer-saving behavior), but it is not recorded as the
+project's test command and doesn't touch the command history.  With
+a prefix ARG you can edit the command before it's run."
+  (interactive "P")
+  (unless (and (fboundp 'treesit-available-p) (treesit-available-p))
+    (user-error "This command requires Emacs 29+ built with tree-sitter support"))
+  (unless (treesit-parser-list)
+    (user-error "No tree-sitter parser in this buffer; use a tree-sitter major mode (e.g. `python-ts-mode')"))
+  (unless buffer-file-name
+    (user-error "The current buffer is not visiting a file"))
+  (let ((rule (projectile--test-at-point-rule)))
+    (unless rule
+      (user-error "No test-at-point rule for `%s'; see `projectile-test-at-point-rules'"
+                  major-mode))
+    (let ((test-name (projectile--test-at-point-name rule)))
+      (unless test-name
+        (user-error "No test found at point"))
+      ;; The command runs in the compilation directory, so the file
+      ;; name is made relative to it as spelled - not through
+      ;; `file-truename', which would escape the project for a file
+      ;; under a symlinked subdirectory and yield a useless `../..' path.
+      (let ((command (funcall (plist-get rule :command-fn)
+                              test-name
+                              (file-relative-name
+                               buffer-file-name
+                               (projectile-compilation-dir))))
+            ;; The command was derived from the test at point, so the
+            ;; usual `compilation-read-command' prompt doesn't apply;
+            ;; prompt only when explicitly asked to with a prefix arg.
+            (compilation-read-command nil))
+        ;; A nil command-map keeps the project's cached test command and
+        ;; command history untouched - the command type is still declared,
+        ;; so this shares the test compilation buffer and the test history
+        ;; at the prompt.
+        (projectile--run-project-cmd command nil
+                                     :command-type 'test
+                                     :show-prompt arg
+                                     :prompt-prefix "Test at point command: "
+                                     :save-buffers t
+                                     :use-comint-mode (projectile-use-comint-mode-p 'test))))))
+
+;;; Tasks, and repeating what you ran last
+;;
+;; Tasks are the commands a project's own tooling defines - npm scripts,
+;; rake tasks, a Makefile's targets - discovered rather than configured.
+;; `projectile-repeat-last-command' sits here too: it re-runs the last
+;; command of any kind, lifecycle phase or task alike.
+
+
+;;;###autoload
+(defun projectile-repeat-last-command (show-prompt)
+  "Run last projectile external command.
+
+External commands are: `projectile-configure-project',
+`projectile-compile-project', `projectile-test-project',
+`projectile-install-project', `projectile-package-project',
+`projectile-run-project' and the named tasks run via
+`projectile-run-task' (which also feed the combined history this
+command reads).
+
+If the prefix argument SHOW-PROMPT is non nil, the command can be edited."
+  (interactive "P")
+  (let* ((project-root (projectile-acquire-root))
+         (command-history (projectile--get-command-history project-root))
+         (command (car-safe (ring-elements command-history)))
+         (compilation-read-command show-prompt)
+         executed-command)
+    (unless command
+      (user-error "No command has been run yet for this project"))
+    (setq executed-command
+          (projectile--run-project-cmd command
+                                       nil
+                                       :save-buffers t
+                                       :prompt-prefix "Execute command: "))
+    ;; `command-map' is nil above, so `projectile--run-project-cmd' doesn't
+    ;; record anything; we record here instead.  This command is
+    ;; type-agnostic (it repeats the last command of any type), so it only
+    ;; updates the combined history, not the per-type ones.
+    (unless (string= command executed-command)
+      (ring-insert command-history executed-command))))
+
+(defvar projectile-last-task-map (make-hash-table :test 'equal)
+  "The last task run per project, indexed by project root.
+Each value is a cons of the task name and the command that was run,
+which is what `projectile-repeat-last-task' re-runs.")
+
+(defun projectile--run-task (task-name command show-prompt &optional confirmed)
+  "Run TASK-NAME's COMMAND for the current project.
+
+COMMAND is a shell command string, or a function returning one, called
+with `default-directory' set to the project root.  With SHOW-PROMPT
+non-nil the command can always be edited before it's run; otherwise
+the command is offered for confirmation when `compilation-read-command'
+is non-nil (the default), like the other lifecycle commands, unless
+CONFIRMED says the user already confirmed this exact command (the
+repeat case).
+
+Task commands can come from a checked-out project's `.dir-locals.el',
+whose `projectile-tasks' entries are accepted without the
+risky-local-variable prompt - that is only acceptable because this
+run-time confirmation is guaranteed, the same trade-off Emacs's
+`compile-command' makes.
+
+The command is executed like the other lifecycle commands (see
+`projectile--run-project-cmd'), except that the output goes to a
+per-task compilation buffer.  Return the command that was run, with
+the `%p' placeholder still intact."
+  (let* ((project-root (projectile-acquire-root))
+         (command (if (functionp command)
+                      (let ((default-directory project-root))
+                        (funcall command))
+                    command))
+         ;; keyed like the per-type lifecycle histories, but per task
+         (history-key (cons 'task task-name)))
+    (unless (stringp command)
+      (user-error "The command of task `%s' must be a string or a function returning one"
+                  task-name))
+    (when (or show-prompt
+              (and compilation-read-command (not confirmed)))
+      (setq command (projectile-read-command
+                     (format "Task [%s] command: " task-name)
+                     command
+                     history-key)))
+    ;; Any prompting already happened above, so bind
+    ;; `compilation-read-command' to nil to stop
+    ;; `projectile--run-project-cmd' from prompting a second time.
+    (let ((compilation-read-command nil)
+          (buffer-name (concat "*projectile-task: " task-name "*"
+                               (when (memq 'project (projectile-compilation-buffer-scope))
+                                 (concat "<" (projectile-project-name project-root) ">")))))
+      (projectile--run-project-cmd command nil
+                                   :save-buffers t
+                                   :use-comint-mode (projectile-use-comint-mode-p 'task)
+                                   :buffer-name-function (lambda (_mode) buffer-name)))
+    ;; `command-map' is nil above, so `projectile--run-project-cmd' records
+    ;; nothing; record the command - before `%p' expansion, like the other
+    ;; lifecycle commands - into the combined per-project history (which
+    ;; `projectile-repeat-last-command' reads) and the per-task one here.
+    (projectile--command-history-insert
+     (projectile--get-command-history project-root) command)
+    (projectile--command-history-insert
+     (projectile--get-command-history project-root history-key) command)
+    (puthash project-root (cons task-name command) projectile-last-task-map)
+    command))
+
+;;;###autoload
+(defun projectile-run-task (arg)
+  "Run one of the current project's named tasks.
+
+The task is picked with completion among the tasks of the project's
+type, those in `projectile-tasks' (which win for same-named tasks) and
+the ones discovered in the project's own tooling - npm scripts, Makefile
+targets and the like, named after the tool that defines them (see
+`projectile-project-tasks' and `projectile-task-providers').  With a
+prefix ARG the task's command can be edited before it's run, e.g. to
+pass it ad-hoc arguments.
+
+The command runs through the same machinery as
+`projectile-compile-project' - in `projectile-compilation-dir', with
+`%p' expanded to the project name - but its output goes to a per-task
+compilation buffer named after the task."
+  (interactive "P")
+  ;; Establish we're in a project before prompting, so the task menu
+  ;; doesn't pop up (with globally-defined tasks) outside one.
+  (let ((tasks (projectile-project-tasks nil (projectile-acquire-root))))
+    (unless tasks
+      (user-error "No tasks defined for the current project"))
+    (let* ((task-name (projectile-completing-read "Run task: " (mapcar #'car tasks)))
+           (task (assoc task-name tasks)))
+      (unless task
+        (user-error "No task named `%s' in the current project" task-name))
+      (projectile--run-task task-name (cdr task) arg))))
+
+;;;###autoload
+(defun projectile-repeat-last-task (arg)
+  "Re-run the last task executed in the current project.
+
+This re-runs the exact command the task ran last time, including any
+ad-hoc edits made then.  With a prefix ARG the command can be edited
+again before it's run."
+  (interactive "P")
+  (let* ((project-root (projectile-acquire-root))
+         (last-task (gethash project-root projectile-last-task-map)))
+    (unless last-task
+      (user-error "No task has been run yet for this project"))
+    ;; The stored command was confirmed when it first ran, so re-running
+    ;; doesn't prompt again (like `projectile-repeat-last-command').
+    (projectile--run-task (car last-task) (cdr last-task) arg 'confirmed)))
+
+(defun compilation-find-file-projectile-find-compilation-buffer (orig-fun marker filename directory &rest formats)
+  "Advice around compilation-find-file.
+We enhance its functionality by appending the current project's directories
+to its search path.  This way when filenames in compilation buffers can't be
+found by compilation's normal logic they are searched for in project
+directories."
+  ;; If the file already exists, don't bother running the extra logic as the
+  ;; project directories might be massive (i.e. Unreal-sized).
+  (if (file-exists-p filename)
+      (apply orig-fun `(,marker ,filename ,directory ,@formats))
+
+    (let* ((root (projectile-project-root))
+           (compilation-search-path
+            (if (projectile-project-p)
+                (let ((dirs (append compilation-search-path (list root)
+                                    (mapcar (lambda (f) (expand-file-name f root))
+                                            (projectile-current-project-dirs)))))
+                  ;; If the file can be found relative to the project root,
+                  ;; add its parent directory to the search path.  This
+                  ;; handles directories that contain only subdirectories
+                  ;; and no files directly.
+                  (let ((candidate (expand-file-name filename root)))
+                    (when (file-exists-p candidate)
+                      (push (file-name-directory candidate) dirs)))
+                  dirs)
+              compilation-search-path)))
+      (apply orig-fun `(,marker ,filename ,directory ,@formats)))))
+
+;;; Known projects, and switching between them
+;;
+;; The list of projects Projectile has seen, how it's kept (loaded, merged
+;; between Emacsen, pruned of directories that have gone away) and the
+;; commands that move you from one to another.
+
+
+(defun projectile-open-projects ()
+  "Return a list of all open projects.
+An open project is a project with any open buffers."
+  (let ((truename-cache (make-hash-table :test 'equal)))
+    (seq-uniq
+     ;; TODO: Replace delq+mapcar with seq-keep when Emacs 29.1 is the minimum version
+     (delq nil
+           (mapcar (lambda (buffer)
+                     (with-current-buffer buffer
+                       (when-let* ((project-root (projectile-project-root)))
+                         (when (projectile-project-buffer-p buffer project-root truename-cache)
+                           (abbreviate-file-name project-root)))))
+                   (buffer-list))))))
+
+(defun projectile--remove-current-project (projects)
+  "Remove the current project (if any) from the list of PROJECTS."
+  (if-let* ((project (projectile-project-root)))
+      (seq-difference projects
+                             (list (abbreviate-file-name project)))
+    projects))
+
+(defun projectile--move-current-project-to-end (projects)
+  "Move current project (if any) to the end of the list of PROJECTS."
+  (if-let* ((project (projectile-project-root)))
+      (append
+       (projectile--remove-current-project projects)
+       (list (abbreviate-file-name project)))
+    projects))
+
+(defun projectile-known-projects ()
+  "Initialize the known projects.
+
+This might potentially clean up redundant projects and discover new ones
+if `projectile-auto-cleanup-known-projects' or
+`projectile-auto-discover-projects' are enabled."
+  ;; load the known projects
+  (unless projectile-known-projects
+    (projectile-load-known-projects))
+  (when projectile-auto-cleanup-known-projects
+    (projectile--cleanup-known-projects))
+  (when (and projectile-auto-discover-projects
+             projectile-project-search-path
+             (not projectile--search-path-discovered))
+    (projectile-discover-projects-in-search-path))
+  ;; return the list of known projects
+  projectile-known-projects)
+
+(defun projectile-relevant-known-projects ()
+  "Return a list of known projects.
+
+Projects matched by `projectile-ignored-projects' or
+`projectile-ignored-project-function' are excluded, even if they were
+added to the known projects before being ignored (see #1663).
+
+It factors the value of `projectile-current-project-on-switch'."
+  (let ((known-projects (projectile-known-projects)))
+    ;; Only filter when there's actually some ignore configuration, so the
+    ;; common case doesn't pay for a `file-truename' per known project.
+    (when (or projectile-ignored-projects projectile-ignored-project-function)
+      (setq known-projects (seq-remove #'projectile-ignored-project-p known-projects)))
+    (pcase projectile-current-project-on-switch
+      ('remove (projectile--remove-current-project known-projects))
+      ('move-to-end (projectile--move-current-project-to-end known-projects))
+      ('keep known-projects))))
+
+(defun projectile-relevant-open-projects ()
+  "Return a list of open projects."
+  (let ((open-projects (projectile-open-projects)))
+    (pcase projectile-current-project-on-switch
+      ('remove (projectile--remove-current-project open-projects))
+      ('move-to-end (projectile--move-current-project-to-end open-projects))
+      ('keep open-projects))))
+
+(defvar projectile-most-recent-project nil
+  "Root of the project that was current before the most recent project switch.
+
+Updated by `projectile-switch-project-by-name', so it only tracks
+switches made through Projectile's switch-project commands (not project
+changes that happen merely by visiting a file or buffer in another
+project).  Use `projectile-switch-to-most-recent-project' to jump to it.")
+
+;;;###autoload
+(defun projectile-switch-project (&optional arg)
+  "Switch to a project we have visited before.
+Invokes the command referenced by `projectile-switch-project-action' on switch.
+With a prefix ARG invokes `projectile-dispatch' instead
+of `projectile-switch-project-action'."
+  (interactive "P")
+  (let ((projects (projectile-relevant-known-projects)))
+    (if projects
+        (projectile-completing-read
+         "Switch to project: " projects
+         :action (lambda (project)
+                   (projectile-switch-project-by-name project arg))
+         :category 'projectile-project
+         :caller 'projectile-read-project)
+      (user-error "There are no known projects"))))
+
+;;;###autoload
+(defun projectile-switch-open-project (&optional arg)
+  "Switch to a project we have currently opened.
+Invokes the command referenced by `projectile-switch-project-action' on switch.
+With a prefix ARG invokes `projectile-dispatch' instead
+of `projectile-switch-project-action'."
+  (interactive "P")
+  (let ((projects (projectile-relevant-open-projects)))
+    (if projects
+        (projectile-completing-read
+         "Switch to open project: " projects
+         :action (lambda (project)
+                   (projectile-switch-project-by-name project arg))
+         :category 'projectile-project
+         :caller 'projectile-read-project)
+      (user-error "There are no open projects"))))
+
+;; The other-window/-frame switch commands reuse `projectile-switch-project'
+;; wholesale (so the dir-locals dance, prefix-arg dispatch, and most-recent
+;; tracking all stay in one place) and just rebind the post-switch action
+;; around it.  This relies on the completion framework invoking its action
+;; synchronously, which the supported ones (default, vertico, ivy, helm) do.
+;;;###autoload (autoload 'projectile-switch-project-other-window "projectile" nil t)
+;;;###autoload (autoload 'projectile-switch-project-other-frame "projectile" nil t)
+(projectile--define-display-variants projectile-switch-project (&optional arg)
+  "Switch to a project we have visited before; display it in another %s.
+
+Like `projectile-switch-project', but runs
+`projectile-switch-project-other-%s-action' (by default
+`projectile-find-file-other-%s') after switching, so the project is
+shown in another %s.  With a prefix ARG invokes `projectile-dispatch'
+instead."
+  (let ((projectile-switch-project-action projectile-switch-project-other-window-action))
+    (projectile-switch-project arg)))
+
+;;;###autoload
+(defun projectile-switch-to-most-recent-project (&optional arg)
+  "Switch to the project recorded in `projectile-most-recent-project'.
+That's the project that was current before the most recent project
+switch, so calling this from a buffer in the switched-to project takes
+you back where you came from.  With a prefix ARG invokes
+`projectile-dispatch' instead of
+`projectile-switch-project-action'."
+  (interactive "P")
+  (if projectile-most-recent-project
+      (projectile-switch-project-by-name projectile-most-recent-project arg)
+    (user-error "No most recent project recorded yet")))
+
+(defun projectile--transient-command-p (command)
+  "Return non-nil if COMMAND is a transient prefix.
+Such commands (e.g. `projectile-dispatch') pop a menu and run the chosen
+suffix command asynchronously, after the caller has already returned.
+Detected via the `transient--prefix' symbol property that
+`transient-define-prefix' sets, which is also how `transient' itself
+recognises its prefixes."
+  (and (symbolp command)
+       (fboundp command)
+       (get command 'transient--prefix)))
+
+(defun projectile--dispatch-in-directory (directory action)
+  "Run transient ACTION with DIRECTORY as the project context.
+ACTION (e.g. `projectile-dispatch') is a transient prefix, so its suffix
+commands run after this function returns; a dynamic `default-directory'
+binding (or a temporary buffer) would be unwound by then.  Instead set
+the current buffer's `default-directory' to DIRECTORY (the buffer that
+is current now is the one the suffix commands run in) for the lifetime
+of the transient, restoring it once the menu exits.  This makes commands
+picked from the menu - like `projectile-find-file' - target the
+switched-to project."
+  (let ((buffer (current-buffer))
+        (original-directory default-directory))
+    (setq default-directory directory)
+    (letrec ((restore
+              (lambda ()
+                (when (buffer-live-p buffer)
+                  (with-current-buffer buffer
+                    (setq default-directory original-directory)))
+                (remove-hook 'transient-exit-hook restore))))
+      (add-hook 'transient-exit-hook restore))
+    ;; A transient prefix is an interactive-only command, so invoke it via
+    ;; `call-interactively'.
+    (call-interactively action)))
+
+(defun projectile-switch-project-by-name (project-to-switch &optional arg)
+  "Switch to project by project name PROJECT-TO-SWITCH.
+Invokes the command referenced by `projectile-switch-project-action' on switch.
+With a prefix ARG invokes `projectile-dispatch' instead
+of `projectile-switch-project-action'."
+  ;; let's make sure that the target directory exists and is actually a project
+  ;; we ignore remote folders, as the check breaks for TRAMP unless already connected
+  (unless (or (file-remote-p project-to-switch) (projectile-project-p project-to-switch))
+    (projectile-remove-known-project project-to-switch)
+    (user-error "Directory %s is not a project" project-to-switch))
+  ;; Record the project we're leaving so `projectile-most-recent-project'
+  ;; points at it after the switch (captured before `default-directory' is
+  ;; rebound below).
+  (let ((previous-project (projectile-project-root))
+        (action (if arg
+                    'projectile-dispatch
+                  projectile-switch-project-action)))
+    (run-hooks 'projectile-before-switch-project-hook)
+    (if (projectile--transient-command-p action)
+        ;; A transient action (e.g. `projectile-dispatch', whether reached
+        ;; via the prefix argument or set as `projectile-switch-project-action'
+        ;; directly) runs its suffix commands *after* this function returns,
+        ;; so a dynamic `default-directory' binding (or the temporary buffer
+        ;; below) would be gone by the time the chosen command runs.  Hand off
+        ;; to a helper that keeps PROJECT-TO-SWITCH current for the lifetime of
+        ;; the menu instead.
+        (projectile--dispatch-in-directory project-to-switch action)
+      (let* ((default-directory project-to-switch)
+             (switched-buffer
+              ;; use a temporary buffer to load PROJECT-TO-SWITCH's dir-locals
+              ;; before calling the switch-project action
+              (with-temp-buffer
+                (hack-dir-local-variables-non-file-buffer)
+                ;; Normally the project name is determined from the current
+                ;; buffer. However, when we're switching projects, we want to
+                ;; show the name of the project being switched to, rather than
+                ;; the current project, in the minibuffer. This is a simple hack
+                ;; to tell the `projectile-project-name' function to ignore the
+                ;; current buffer and the caching mechanism, and just return the
+                ;; value of the `projectile-project-name' variable.
+                (let ((projectile-project-name (funcall projectile-project-name-function
+                                                        project-to-switch)))
+                  (funcall action)
+                  (current-buffer)))))
+        ;; If the action switched buffers then with-temp-buffer will
+        ;; have lost that change, so switch back to the correct buffer.
+        (when (buffer-live-p switched-buffer)
+          (switch-to-buffer switched-buffer))))
+    ;; Don't record the project we just came from if it's the same one we
+    ;; switched to.  Compare with `file-equal-p' for local paths (handles
+    ;; symlinks/abbreviation), but fall back to a plain string compare when
+    ;; either side is remote, so we don't trigger a TRAMP round-trip (and
+    ;; possible hang) for an unconnected remote project - the very thing the
+    ;; remote skip above guards against.
+    (when (and previous-project
+               (not (if (or (file-remote-p previous-project)
+                            (file-remote-p project-to-switch))
+                        (string-equal (file-name-as-directory previous-project)
+                                      (file-name-as-directory project-to-switch))
+                      (file-equal-p previous-project project-to-switch))))
+      (setq projectile-most-recent-project previous-project))
+    ;; The switch action usually visits a file or directory, which already
+    ;; runs the project-changed functions; this covers actions that don't.
+    ;; Resolving the root of an unconnected remote project would trigger a
+    ;; TRAMP connection, so leave remote detection to the next file visit.
+    (unless (file-remote-p project-to-switch)
+      (projectile--maybe-run-project-changed-functions
+       (projectile-project-root project-to-switch)))
+    (run-hooks 'projectile-after-switch-project-hook)))
+
+;;;###autoload
+(defun projectile-find-file-in-directory (&optional directory)
+  "Jump to a file in a (maybe regular) DIRECTORY.
+
+This command will first prompt for the directory the file is in."
+  (interactive "DFind file in directory: ")
+  (unless (projectile--directory-p directory)
+    (user-error "Directory %S does not exist" directory))
+  (let ((default-directory directory))
+    (if (projectile-project-p)
+        ;; target directory is in a project
+        (let ((file (projectile-completing-read "Find file: "
+                                                (projectile-dir-files directory)
+                                                :caller 'projectile-read-file)))
+          (find-file (expand-file-name file directory))
+          (run-hooks 'projectile-find-file-hook))
+      ;; target directory is not in a project
+      (projectile-find-file))))
+
+(defun projectile-all-project-files ()
+  "Get a list of all files in all projects."
+  (projectile-project-group-files (projectile-known-projects)))
+
+;;;###autoload
+(defun projectile-find-file-in-known-projects ()
+  "Jump to a file in any of the known projects.
+This is `projectile-find-file-in-projects' over every project you have
+ever visited."
+  (interactive)
+  (projectile-find-file-in-projects (projectile-known-projects)
+                                    "Find file in projects: "))
+
+(defun projectile-keep-project-p (project)
+  "Determine whether we should cleanup (remove) PROJECT or not.
+
+It handles the case of remote projects as well.
+See `projectile--cleanup-known-projects'.
+
+Remote projects are always kept regardless of connection state.
+Previously a remote project that *was* connected was tested with
+`file-readable-p', which is a remote round-trip per project - and
+since `projectile--cleanup-known-projects' may be called every time
+the user invokes a switch-project command (when
+`projectile-auto-cleanup-known-projects' is on), that turned project
+switching into a sequence of network stats.  The user can still
+explicitly drop dead remote projects via `projectile-remove-known-project'."
+  ;; Taken from `recentf-keep-default-predicate'
+  (cond
+   ((file-remote-p project))
+   ((file-readable-p project))))
+
+(defun projectile--cleanup-known-projects ()
+  "Remove known projects that don't exist anymore.
+Return a list of projects removed."
+  (projectile-merge-known-projects)
+  (let ((projects-kept (seq-filter #'projectile-keep-project-p projectile-known-projects))
+        (projects-removed (seq-remove #'projectile-keep-project-p projectile-known-projects)))
+    (setq projectile-known-projects projects-kept)
+    (projectile-merge-known-projects)
+    projects-removed))
+
+;;;###autoload
+(defun projectile-cleanup-known-projects ()
+  "Remove known projects that don't exist anymore."
+  (interactive)
+  (if-let* ((projects-removed (projectile--cleanup-known-projects)))
+      (message "Projects removed: %s"
+               (mapconcat #'identity projects-removed ", "))
+    (message "No projects needed to be removed.")))
+
+;;;###autoload
+(defalias 'projectile-forget-zombie-projects #'projectile-cleanup-known-projects
+  "Forget known projects that don't exist any more.
+An alias for `projectile-cleanup-known-projects', provided for
+discoverability and parity with project.el's
+`project-forget-zombie-projects'.")
+
+;;;###autoload
+(defun projectile-forget-projects-under (directory &optional recursive)
+  "Remove known projects located under DIRECTORY.
+
+Interactively, prompt for DIRECTORY.  With optional argument
+RECURSIVE non-nil (interactively, the prefix argument), remove
+projects nested at any depth under DIRECTORY; otherwise only remove
+projects that are immediate children of DIRECTORY.
+
+Matching is lexical (after `file-truename' expansion for local paths,
+which is skipped for remote ones to avoid a round-trip), so projects
+are removed even when DIRECTORY has already been deleted.  Mirrors
+project.el's `project-forget-projects-under'.  Return the number of
+projects removed."
+  (interactive "DForget projects under directory: \nP")
+  (let* ((expand (lambda (path)
+                   (file-name-as-directory
+                    (if (file-remote-p path) path (file-truename path)))))
+         (directory (funcall expand directory))
+         (projects-removed
+          (seq-filter
+           (lambda (project)
+             (let ((project (funcall expand project)))
+               (if recursive
+                   (string-prefix-p directory project)
+                 (string= (file-name-directory (directory-file-name project))
+                          directory))))
+           projectile-known-projects)))
+    (setq projectile-known-projects
+          (seq-difference projectile-known-projects projects-removed))
+    (projectile-merge-known-projects)
+    (if projects-removed
+        (message "Projects removed: %s"
+                 (mapconcat #'identity projects-removed ", "))
+      (message "No projects found under %s." (abbreviate-file-name directory)))
+    (length projects-removed)))
+
+;;;###autoload
+(defun projectile-clear-known-projects ()
+  "Clear both `projectile-known-projects' and `projectile-known-projects-file'."
+  (interactive)
+  (setq projectile-known-projects nil)
+  (projectile-save-known-projects))
+
+;;;###autoload
+(defun projectile-reset-known-projects ()
+  "Clear known projects and rediscover."
+  (interactive)
+  (projectile-clear-known-projects)
+  (projectile-discover-projects-in-search-path))
+
+;;;###autoload
+(defun projectile-remove-known-project (&optional project)
+  "Remove PROJECT from the list of known projects."
+  (interactive (list (projectile-completing-read
+                      "Remove from known projects: " (projectile-known-projects)
+                      :action 'projectile-remove-known-project
+                      :category 'projectile-project
+                      :caller 'projectile-read-project)))
+  (unless (called-interactively-p 'any)
+    (setq projectile-known-projects
+          (seq-remove
+           (lambda (proj) (string= project proj))
+           projectile-known-projects))
+    ;; Known projects are stored abbreviated while the watch registry is
+    ;; keyed by the cache key (usually expanded), so try both forms.
+    (when project
+      (projectile--unwatch-project project)
+      (projectile--unwatch-project (expand-file-name project)))
+    (projectile-merge-known-projects)
+    (projectile--message "Removed %s from the known projects" project)))
+
+;;;###autoload
+(defun projectile-remove-current-project-from-known-projects ()
+  "Remove the current project from the list of known projects."
+  (interactive)
+  (projectile-remove-known-project (projectile--known-project-root (projectile-acquire-root))))
+
+(defun projectile-ignored-projects ()
+  "A list of projects that should not be saved in `projectile-known-projects'.
+Local entries are canonicalized via `file-truename'; remote entries
+are returned as-is to avoid a remote round-trip per entry on every
+lookup (see `projectile-ignored-project-p')."
+  (mapcar (lambda (project)
+            (if (file-remote-p project) project (file-truename project)))
+          projectile-ignored-projects))
+
+(defun projectile-ignored-project-p (project-root)
+  "Return t if PROJECT-ROOT should not be added to `projectile-known-projects'.
+
+For remote (TRAMP) paths the symlink-resolution step is skipped:
+`file-truename' would round-trip to the remote, and matching against
+`projectile-ignored-projects' for a remote project is uncommon enough
+that requiring exact paths is acceptable.  Local behavior is unchanged."
+  (let ((project-root (if (file-remote-p project-root)
+                          project-root
+                        (file-truename project-root))))
+    (or (member project-root (projectile-ignored-projects))
+        (seq-some (lambda (pattern) (string-match-p pattern project-root))
+                  projectile-ignored-project-patterns)
+        (and (functionp projectile-ignored-project-function)
+             (funcall projectile-ignored-project-function project-root)))))
+
+;;;###autoload
+(defun projectile-add-known-project (project-root)
+  "Add PROJECT-ROOT to the list of known projects."
+  (interactive (list (read-directory-name "Add to known projects: ")))
+  (unless (projectile-ignored-project-p project-root)
+    (push (projectile--known-project-root project-root) projectile-known-projects)
+    (setq projectile-known-projects (seq-uniq projectile-known-projects))
+    (projectile-merge-known-projects)))
+
+;;;###autoload
+(defun projectile-add-and-switch-project (project-root)
+  "Add PROJECT-ROOT to the list of known projects and switch to it.
+This combines `projectile-add-known-project' and
+`projectile-switch-project-by-name' into a single command."
+  (interactive (list (read-directory-name "Add and switch to project: ")))
+  (projectile-add-known-project project-root)
+  (projectile-switch-project-by-name (file-name-as-directory project-root)))
+
+(defun projectile-load-known-projects ()
+  "Load saved projects from `projectile-known-projects-file'.
+Also set `projectile-known-projects'.
+
+An unreadable file is moved aside rather than silently overwritten on
+the next save, and the fact is reported - losing a list of projects
+built up over years to a stray byte is worse than being told about it."
+  (let ((data (projectile--read-known-projects-file)))
+    (if (eq data 'unreadable)
+        (progn
+          (projectile--quarantine-known-projects-file)
+          (setq projectile-known-projects nil))
+      (setq projectile-known-projects data))
+    (setq projectile-known-projects-on-file
+          (and (sequencep projectile-known-projects)
+               (copy-sequence projectile-known-projects)))))
+
+(defun projectile-save-known-projects ()
+  "Save PROJECTILE-KNOWN-PROJECTS to PROJECTILE-KNOWN-PROJECTS-FILE.
+Text properties are stripped on the way out: a propertized string
+serializes to `#(\"...\" 0 3 (face ...))\\=', whose properties can hold
+objects that don\\='t read back, which is how the file gets corrupted in
+the first place (see issue #1927)."
+  (projectile-serialize (mapcar (lambda (project)
+                                  ;; Anything that isn't a string is left
+                                  ;; alone: refusing to save at all would be
+                                  ;; a worse failure than the one being
+                                  ;; guarded against.
+                                  (if (stringp project)
+                                      (substring-no-properties project)
+                                    project))
+                                projectile-known-projects)
+                        projectile-known-projects-file)
+  (setq projectile-known-projects-on-file
+        (and (sequencep projectile-known-projects)
+             (copy-sequence projectile-known-projects))))
+
+(defun projectile--quarantine-known-projects-file ()
+  "Move an unreadable known projects file aside and say so.
+Returns non-nil when a file was moved.  Overwriting it would throw away
+whatever it holds, and merging against \"nothing\" would look exactly
+like every project having been removed elsewhere - so the file is kept
+under a `.corrupt\\=' name and the list carries on from memory."
+  (let ((file projectile-known-projects-file))
+    (when (file-exists-p file)
+      (let ((backup (concat file ".corrupt")))
+        (ignore-errors (rename-file file backup t))
+        (display-warning
+         'projectile
+         (format "Couldn't read %s, so it was moved to %s.  \
+Projectile is carrying on with the projects known to this session; \
+the file will be written afresh."
+                 file backup)
+         :warning)
+        t))))
+
+(defun projectile--read-known-projects-file ()
+  "Return the known projects on disk, or the symbol `unreadable\\='.
+Distinguishing the two matters: an absent file legitimately means no
+projects, while an unreadable one means the list on disk is unknown -
+and treating unknown as empty is how a corrupt file used to take the
+known projects with it (see issue #1927)."
+  (let ((file projectile-known-projects-file))
+    (cond
+     ((not (file-exists-p file)) nil)
+     (t (condition-case nil
+            (let ((data (with-temp-buffer
+                          (insert-file-contents file)
+                          (read (buffer-string)))))
+              (if (proper-list-p data) data 'unreadable))
+          (error 'unreadable))))))
+
+(defun projectile-merge-known-projects ()
+  "Merge any change from `projectile-known-projects-file' and save to disk.
+
+This enables multiple Emacs processes to make changes without
+overwriting each other's changes."
+  (let* ((known-now projectile-known-projects)
+         (known-on-file-raw (projectile--read-known-projects-file))
+         (unreadable (eq known-on-file-raw 'unreadable))
+         (known-on-last-sync projectile-known-projects-on-file)
+         (known-on-file (if unreadable nil known-on-file-raw))
+         (removed-after-sync (seq-difference known-on-last-sync known-now))
+         ;; An unreadable file says nothing about what another process
+         ;; removed.  Reading it as "nothing is on disk" is precisely how a
+         ;; corrupt file used to look like every project having been removed
+         ;; elsewhere, taking the session's list down with it (issue #1927).
+         (removed-in-other-process
+          (unless unreadable
+            (seq-difference known-on-last-sync known-on-file)))
+         (result (seq-uniq
+                  (seq-difference
+                   (append known-now known-on-file)
+                   (append removed-after-sync removed-in-other-process)))))
+    (when unreadable
+      (projectile--quarantine-known-projects-file))
+    (setq projectile-known-projects result)
+    (projectile-save-known-projects)))
+
+
+;;; Repository identity
+;;
+;; Projectile treats every checkout as a project of its own: a git worktree
+;; and the checkout it was linked from have their own roots, their own file
+;; listings and usually their own branches, so that's the right call.  It
+;; does mean that "take me to my other checkout of this" needs a notion of
+;; identity that outlives any single root, which is what
+;; `projectile-repo-identity' provides.  Its two keys answer progressively
+;; weaker questions:
+;;
+;;   :repo    the directory the checkouts share - git's common dir, the
+;;            store an `hg share' points at.  Equal `:repo' means one
+;;            repository checked out more than once, which is what a
+;;            worktree is.
+;;   :remote  the upstream they were cloned from, normalized so that the
+;;            scp-like and URL spellings of one remote compare equal.
+;;            Equal `:remote' means separate clones of one project - the
+;;            hand-rolled version of worktrees, and just as common.
+;;   :owner   the account, organization or directory that upstream hangs
+;;            off.  Equal `:owner' means nothing about the code, but it's
+;;            the strongest signal there is that two projects belong to
+;;            one effort (see `projectile-sibling-projects').
+;;
+;; The first two are both needed: `:repo' alone would miss separate clones
+;; entirely, and `:remote' alone would miss the worktrees of a repository
+;; that doesn't have a remote at all.
+
+(projectile-define-project-cache projectile-repo-identity-cache
+  "Cache of `projectile-repo-identity' results keyed by project root.
+Cleared by `projectile-invalidate-cache'.")
+
+(defconst projectile--repo-url-scheme-regexp
+  "\\`[a-zA-Z][a-zA-Z0-9+.-]*://\\(?:[^@/]*@\\)?\\([^/:]+\\)\\(?::[0-9]+\\)?/+\\(.+\\)\\'"
+  "Match a `scheme://[user@]host[:port]/path' remote URL.
+Group 1 is the host, group 2 the path.")
+
+(defconst projectile--repo-url-scp-regexp
+  "\\`\\(?:[^@/]*@\\)?\\([^/:]\\{2,\\}\\):\\(.+\\)\\'"
+  "Match git's scp-like `[user@]host:path' remote syntax.
+Group 1 is the host, group 2 the path.  The host has to be at least two
+characters long so that a Windows path like `c:/src/repo' isn't read as
+one; that's the same ambiguity, resolved the same way, as in git itself.")
+
+(defun projectile--normalize-repo-path (path)
+  "Return PATH without its trailing slashes or its `.git' suffix.
+Those are the two ways one repository path gets spelled differently."
+  (string-remove-suffix ".git" (string-trim-right path "/+")))
+
+(defun projectile--normalize-repo-url (url)
+  "Return a canonical identity for the remote URL, or nil when there's none.
+
+One repository can be addressed in several ways - `git@host:owner/repo.git',
+`https://host/owner/repo', `ssh://git@host:22/owner/repo/' - and all of
+them have to compare equal for two clones of it to be recognized as
+checkouts of the same thing.  The identity is `HOST/PATH' without the
+user, port, trailing slashes or `.git' suffix, downcased because hosts
+are case-insensitive and so, in practice, are the forges' paths.
+
+A URL that addresses a local repository (a bare path, or a `file://'
+URL) normalizes to that path, left in its original case since local file
+systems are not reliably case-insensitive."
+  (when (and url (not (string-blank-p url)))
+    (let ((url (string-trim url)))
+      (cond
+       ;; A `file://' URL addresses a local repository, same as a bare path.
+       ((string-prefix-p "file:///" url)
+        (projectile--normalize-repo-path (string-remove-prefix "file://" url)))
+       ((or (string-match projectile--repo-url-scheme-regexp url)
+            ;; The scp-like syntax has no scheme, so anything carrying one
+            ;; has already had its chance above and isn't a host:path.
+            (and (not (string-match-p "://" url))
+                 (string-match projectile--repo-url-scp-regexp url)))
+        (downcase (concat (match-string 1 url) "/"
+                          (projectile--normalize-repo-path
+                           (replace-regexp-in-string "\\`/+" "" (match-string 2 url))))))
+       (t (projectile--normalize-repo-path (expand-file-name url)))))))
+
+(defun projectile--repo-url-owner (remote)
+  "Return the owner of the normalized REMOTE, or nil when it has none.
+
+That's everything but the last segment: the account or organization a
+forge hangs the repository off, or the directory a local repository sits
+in.  A remote with a single path segment (`host/repo') has no owner worth
+the name - the host isn't one - so it gets nil rather than something that
+would put every repository on that host in one group."
+  (when (and remote (string-match "\\`\\(.*/.+\\)/[^/]+\\'" remote))
+    (match-string 1 remote)))
+
+;; Everything below reads git's own files rather than running git.  Identity
+;; is computed for every known project when looking for the other checkouts
+;; of one, and a subprocess apiece would be seconds of latency on a machine
+;; with a hundred projects - the same reason `projectile--hg-default-path'
+;; parses `.hg/hgrc' directly.  The layout being read is stable and
+;; documented in gitrepository-layout(5).
+
+(defun projectile--git-dir (root)
+  "Return the git directory belonging to the checkout at ROOT, or nil.
+
+That's `<root>/.git' when it is a directory, and the directory named by
+the `gitdir:' line when it is the file a linked worktree gets instead.
+
+Nil when ROOT holds no `.git' at all, which is what distinguishes a
+checkout from a directory inside one: `projectile-project-vcs'
+deliberately answers `git' for a project below a repository root too, so
+that file listing can still go through git, but the worktrees of the
+enclosing repository are not other copies of such a project."
+  (let ((dot-git (expand-file-name ".git" root)))
+    (cond
+     ((file-directory-p dot-git) (file-name-as-directory dot-git))
+     ((file-readable-p dot-git)
+      (with-temp-buffer
+        (insert-file-contents dot-git)
+        (goto-char (point-min))
+        (when (looking-at "gitdir:[ \t]*\\(.+?\\)[ \t]*$")
+          (file-name-as-directory
+           (expand-file-name (match-string 1) root))))))))
+
+(defun projectile--git-common-dir (git-dir)
+  "Return the directory GIT-DIR shares with the repository's other checkouts.
+
+A linked worktree's git directory carries a `commondir' file naming that
+shared directory; the main checkout's git directory is the shared
+directory itself."
+  (if-let* ((common (projectile--file-contents-trimmed
+                     (expand-file-name "commondir" git-dir))))
+      (file-name-as-directory (expand-file-name common git-dir))
+    git-dir))
+
+(defun projectile--git-config-remote-url (config-file)
+  "Return the URL of the upstream remote configured in CONFIG-FILE, or nil.
+
+That's `origin' when it's there, since it's what cloning sets up and what
+two checkouts of one repository will therefore agree on; a repository
+wired up by hand may use another name, so fall back to whichever remote
+comes first rather than giving up."
+  (when (file-readable-p config-file)
+    (with-temp-buffer
+      (insert-file-contents config-file)
+      (goto-char (point-min))
+      (let (remotes)
+        (while (re-search-forward "^[ \t]*\\[remote[ \t]+\"\\([^\"]+\\)\"\\]" nil t)
+          (let ((name (match-string 1))
+                (section-end (save-excursion
+                               (if (re-search-forward "^[ \t]*\\[" nil t)
+                                   (match-beginning 0)
+                                 (point-max)))))
+            (when (re-search-forward "^[ \t]*url[ \t]*=[ \t]*\\(.+?\\)[ \t]*$"
+                                     section-end t)
+              (push (cons name (match-string 1)) remotes))))
+        (setq remotes (nreverse remotes))
+        (or (cdr (assoc "origin" remotes)) (cdar remotes))))))
+
+(defun projectile--git-head-branch (git-dir)
+  "Return the branch checked out in GIT-DIR, or nil when HEAD is detached."
+  (let ((head (expand-file-name "HEAD" git-dir)))
+    (when (file-readable-p head)
+      (with-temp-buffer
+        (insert-file-contents head)
+        (goto-char (point-min))
+        (when (looking-at "ref:[ \t]*refs/heads/\\(.+?\\)[ \t]*$")
+          (match-string 1))))))
+
+(defun projectile--git-dir-identity (git-dir)
+  "Return the repository identity plist for the repository at GIT-DIR."
+  (let ((git-dir (file-name-as-directory git-dir)))
+    (list :repo (file-truename git-dir)
+          :remote (projectile--normalize-repo-url
+                   (projectile--git-config-remote-url
+                    (expand-file-name "config" git-dir))))))
+
+(defun projectile--git-repo-identity (root)
+  "Return the repository identity plist for the git checkout at ROOT."
+  (when-let* ((git-dir (projectile--git-dir root)))
+    (projectile--git-dir-identity (projectile--git-common-dir git-dir))))
+
+(defun projectile--file-contents-trimmed (file)
+  "Return the trimmed contents of FILE, or nil when it can't be read.
+The version control systems all record their cross-references as a path
+on a line of its own in a small file, so this is the shape of every one
+of those reads."
+  (when (file-readable-p file)
+    (with-temp-buffer
+      (insert-file-contents file)
+      (string-trim (buffer-string)))))
+
+(defun projectile--jj-repo-dir (root)
+  "Return the `.jj/repo' directory the Jujutsu workspace at ROOT uses, or nil.
+
+Jujutsu lays its workspaces out the way git lays out worktrees: the first
+one holds the directory itself, and every one added later holds a file
+naming it."
+  (let ((repo (expand-file-name ".jj/repo" root)))
+    (if (file-directory-p repo)
+        (file-name-as-directory repo)
+      (when-let* ((target (projectile--file-contents-trimmed repo))
+                  ((not (string-empty-p target))))
+        (file-name-as-directory
+         (expand-file-name target (file-name-directory repo)))))))
+
+(defun projectile--jj-repo-identity (root)
+  "Return the repository identity plist for the Jujutsu workspace at ROOT."
+  (when-let* ((repo-dir (projectile--jj-repo-dir root)))
+    ;; A git-backed repository - which is every one `jj git init' makes -
+    ;; names the git directory holding its commits, relative to the store
+    ;; rather than to the repository.  Resolving to that instead of to
+    ;; `.jj' makes a workspace and the colocated git checkout agree on
+    ;; which repository they are, rather than each insisting on its own
+    ;; answer, and it gets the remote for free.
+    (let ((store (expand-file-name "store/" repo-dir)))
+      (if-let* ((target (projectile--file-contents-trimmed
+                         (expand-file-name "git_target" store)))
+                (path (expand-file-name target store)))
+          (projectile--git-dir-identity
+           ;; The target is usually a git directory, but a submodule
+           ;; checkout or a linked worktree has a `.git' *file* pointing at
+           ;; the real one, and either can be a linked worktree's git
+           ;; directory rather than the shared one.
+           (projectile--git-common-dir
+            (if (file-directory-p path)
+                (file-name-as-directory path)
+              (or (projectile--git-dir (file-name-directory path))
+                  (file-name-as-directory path)))))
+        (list :repo (file-truename repo-dir))))))
+
+(defun projectile--hg-repo-identity (root)
+  "Return the repository identity plist for the Mercurial project at ROOT.
+
+A working directory created by `hg share' keeps its store elsewhere and
+records where in `.hg/sharedpath', which makes that path the Mercurial
+equivalent of git\\='s common dir."
+  (let* ((hg-dir (expand-file-name ".hg" root))
+         (store (or (projectile--file-contents-trimmed
+                     (expand-file-name "sharedpath" hg-dir))
+                    hg-dir)))
+    (list :repo (when (file-exists-p store) (file-truename store))
+          :remote (projectile--normalize-repo-url
+                   (projectile--hg-default-path root)))))
+
+(defun projectile--hg-default-path (root)
+  "Return the Mercurial `default' path configured for ROOT, or nil.
+That's the upstream a repository was cloned from, so it plays the same
+role as git\\='s `origin' remote.  Read out of `.hg/hgrc' directly rather
+than by running hg, which would cost a process launch per project."
+  (let ((hgrc (expand-file-name ".hg/hgrc" root)))
+    (when (file-readable-p hgrc)
+      (with-temp-buffer
+        (insert-file-contents hgrc)
+        (goto-char (point-min))
+        (when (re-search-forward "^[ \t]*default[ \t]*=[ \t]*\\(.+?\\)[ \t]*$" nil t)
+          (match-string 1))))))
+
+(defun projectile-repo-identity (&optional project-root)
+  "Return a plist identifying the repository PROJECT-ROOT is a checkout of.
+
+The plist has two keys, either of which may be nil: `:repo', the
+directory every checkout of this very repository shares, and `:remote',
+a canonical identity for the upstream it was cloned from.  See
+`projectile-same-repo-p' for comparing two of these.
+
+Returns nil for a project that isn't under a version control system
+Projectile can answer this for (only git, Mercurial and Jujutsu carry
+the notion),
+and for a remote project, where every probe would be a TRAMP round trip.
+
+Results are cached in `projectile-repo-identity-cache' (cleared by
+`projectile-invalidate-cache')."
+  (let ((root (or project-root (projectile-acquire-root))))
+    (unless (file-remote-p root)
+      (let ((cached (gethash root projectile-repo-identity-cache 'unset)))
+        (if (not (eq cached 'unset))
+            cached
+          (let ((identity (pcase (projectile-project-vcs root)
+                            ('git (projectile--git-repo-identity root))
+                            ('hg (projectile--hg-repo-identity root))
+                            ('jj (projectile--jj-repo-identity root)))))
+            ;; An identity with nothing in it says as little as no identity
+            ;; at all, and storing it as nil keeps the callers from having
+            ;; to test both.
+            (if (not (or (plist-get identity :repo) (plist-get identity :remote)))
+                (setq identity nil)
+              ;; The owner falls out of the remote, so derive it here rather
+              ;; than in every backend.
+              (setq identity
+                    (plist-put identity :owner
+                               (projectile--repo-url-owner
+                                (plist-get identity :remote)))))
+            (puthash root identity projectile-repo-identity-cache)
+            identity))))))
+
+(defun projectile-same-repo-p (a b)
+  "Return non-nil when identities A and B describe one repository.
+
+Either sharing the repository directory (worktrees of each other) or
+sharing an upstream (clones of each other) is enough.  Missing keys never
+match, so two projects that Projectile knows nothing about aren't
+silently declared identical."
+  (or (when-let* ((repo (plist-get a :repo)))
+        (equal repo (plist-get b :repo)))
+      (when-let* ((remote (plist-get a :remote)))
+        (equal remote (plist-get b :remote)))))
+
+
+;;; Worktrees
+;;
+;; A worktree, in the sense this section means it, is another directory
+;; holding the same repository: a real `git worktree', or simply a second
+;; clone, which is how the same workflow gets done without the plumbing.
+;; `projectile-switch-worktree' offers both, because from where the user
+;; sits they're the same thing - the other place this project is checked
+;; out, on another branch.
+;;
+;; Worktrees are found by `projectile-worktree-functions', which is a list
+;; so that a version control system Projectile can enumerate directly
+;; doesn't have to go through the generic fallback.  Each entry takes a
+;; project root and returns a list of plists with `:path' (mandatory),
+;; `:label' and `:prunable'.
+
+(defcustom projectile-worktree-functions
+  '(projectile-worktrees-from-git
+    projectile-worktrees-from-jj
+    projectile-worktrees-from-known-projects)
+  "Functions consulted by `projectile-project-worktrees'.
+
+Each is called with a project root and should return a list of plists,
+one per checkout of that project\\='s repository, with the keys `:path'
+(the checkout\\='s directory, mandatory), `:label' (what tells this
+checkout apart from the others - a branch, a workspace name - if that\\='s
+known) and `:prunable' (non-nil when the checkout is registered but no
+longer on disk).  Results from all the functions are
+merged and de-duplicated by path, so a checkout found twice is listed
+once, and a function that has nothing to say should return nil.
+
+The default set covers git worktrees and Jujutsu workspaces, both of
+which the version control system enumerates itself, and anything else via
+the known projects (see `projectile-worktrees-from-known-projects')."
+  :group 'projectile
+  :type '(repeat function)
+  :package-version '(projectile . "3.4.0"))
+
+(defun projectile--parse-git-worktree-list (output)
+  "Parse the `git worktree list --porcelain' OUTPUT into worktree plists.
+
+Records are separated by blank lines and each opens with a `worktree'
+line.  Bare repositories are skipped: they have no working tree, so
+there\\='s nothing there to switch to."
+  (delq nil
+        (mapcar
+         (lambda (record)
+           (let ((lines (split-string record "\n" t)))
+             (unless (member "bare" lines)
+               (let ((worktree (list :path (file-name-as-directory
+                                            (string-remove-prefix
+                                             "worktree " (car lines))))))
+                 ;; `HEAD' and `detached' say nothing a switch needs, and
+                 ;; `locked' doesn't stop one, so they're all skipped here.
+                 (dolist (line (cdr lines) worktree)
+                   (cond
+                    ((string-prefix-p "branch " line)
+                     (plist-put worktree :label
+                                (string-remove-prefix
+                                 "refs/heads/"
+                                 (string-remove-prefix "branch " line))))
+                    ((string-prefix-p "prunable" line)
+                     (plist-put worktree :prunable t))))))))
+         (split-string output "\n\n" t))))
+
+(defun projectile-worktrees-from-git (root)
+  "Return the git worktrees of the project at ROOT.
+
+Git registers them itself, so this finds worktrees that have never been
+visited in this Emacs session - which the known projects can't do."
+  (when-let* (((eq (projectile-project-vcs root) 'git))
+              ((not (file-remote-p root)))
+              ;; Only a checkout's own top level has worktrees.  ROOT can
+              ;; just as well be a directory *inside* one - a project marked
+              ;; out by its own `.projectile' in a corner of a bigger
+              ;; repository, say, which `projectile-project-vcs' still calls
+              ;; git because it walks up to find the repository.  Git would
+              ;; happily list the enclosing repository's worktrees, but none
+              ;; of them is another copy of *this* project.
+              ((projectile--git-dir root))
+              (output (projectile--git root "worktree" "list" "--porcelain")))
+    (projectile--parse-git-worktree-list output)))
+
+(defun projectile--jj (root &rest args)
+  "Run jj with ARGS in ROOT and return its output, or nil when it fails.
+`--no-pager' because a pager would hang a batch invocation,
+`--ignore-working-copy' so that merely listing workspaces doesn\\='t snapshot
+the working copy behind the user\\='s back, and `--color=never' because jj
+colorizes template output too and a user with `ui.color = \"always\"' would
+otherwise get paths wrapped in escape sequences."
+  (let ((default-directory root))
+    (with-temp-buffer
+      (when (eql 0 (ignore-errors
+                     (apply #'process-file "jj" nil '(t nil) nil
+                            "--no-pager" "--color=never"
+                            "--ignore-working-copy" args)))
+        (buffer-string)))))
+
+(defun projectile-worktrees-from-jj (root)
+  "Return the Jujutsu workspaces of the project at ROOT.
+
+Gated on a `.jj' directory rather than on `projectile-project-vcs'
+answering `jj', because a colocated repository (`jj git init --colocate')
+holds both markers and is reported as git by default - see
+`projectile-vcs-markers'.  Such a repository has git worktrees *and*
+Jujutsu workspaces, and both belong on the list.
+
+The workspace root is asked for through a template.  Jujutsu only started
+recording it in 0.38: an older *workspace* renders as nothing and is
+skipped rather than becoming a bogus candidate, while an older *binary*
+rejects the template outright and simply reports nothing.
+
+The remote check comes first, before anything touches the file system,
+so that a remote project costs no TRAMP round trip."
+  (when-let* (((not (file-remote-p root)))
+              ((file-directory-p (expand-file-name ".jj" root)))
+              ((executable-find "jj"))
+              (output (projectile--jj root "workspace" "list"
+                                      "-T" "self.name() ++ \"\\t\" ++ self.root() ++ \"\\n\"")))
+    (delq nil
+          (mapcar (lambda (line)
+                    ;; Only the name is escaped and quoted by jj, so a tab
+                    ;; in the output can only have come from the path -
+                    ;; hence splitting once, at the first one.
+                    (let* ((parts (split-string line "\t"))
+                           (name (car parts))
+                           (path (string-join (cdr parts) "\t")))
+                      (unless (string-empty-p path)
+                        (list :path (file-name-as-directory path)
+                              ;; A name that isn't a bare identifier comes
+                              ;; back quoted; the quotes aren't part of it.
+                              :label (string-trim name "\"" "\"")))))
+                  (split-string output "\n" t)))))
+
+(defun projectile-worktrees-from-known-projects (root)
+  "Return the known projects that are checkouts of ROOT\\='s repository.
+
+This is how everything git can\\='t enumerate gets found: a Mercurial
+working directory sharing another\\='s store, and - the case that turns up
+far more often than the plumbing suggests - a second clone of the same
+upstream, which is the same workflow done by hand.
+
+Only projects Projectile already knows about can be found this way, since
+there\\='s nothing else to enumerate."
+  (when-let* ((identity (projectile-repo-identity root)))
+    (delq nil
+          (mapcar (lambda (project)
+                    (let ((project (file-name-as-directory
+                                    (expand-file-name project))))
+                      (when (and (not (file-remote-p project))
+                                 (file-directory-p project)
+                                 (not (projectile-ignored-project-p project))
+                                 (projectile-same-repo-p
+                                  identity (projectile-repo-identity project)))
+                        (list :path project
+                              :label (projectile--checkout-branch project)))))
+                  (projectile-known-projects)))))
+
+(defun projectile--checkout-branch (root)
+  "Return the branch checked out at ROOT, or nil when that isn't knowable.
+
+Read out of the checkout's own files rather than by running the version
+control system, since this is asked once per candidate checkout."
+  (pcase (projectile-project-vcs root)
+    ('git (when-let* ((git-dir (projectile--git-dir root)))
+            (projectile--git-head-branch git-dir)))))
+
+(defun projectile-project-worktrees (&optional project-root)
+  "Return the checkouts of PROJECT-ROOT\\='s repository, including itself.
+
+Every function in `projectile-worktree-functions' is consulted in turn and
+their results merged, de-duplicated by resolved path so that a worktree
+both git and the known projects report is listed once - the first
+function to report it wins, which is why the one that knows the most
+about a checkout should come first.  The plists that come back carry
+`:path', and `:label'/`:prunable' when whoever found them knew."
+  (projectile--collect-from-functions
+   projectile-worktree-functions
+   (or project-root (projectile-acquire-root))
+   (lambda (worktree)
+     (when-let* ((path (plist-get worktree :path)))
+       (projectile--directory-key path)))
+   "Worktree"))
+
+(defun projectile--worktree-annotation (worktree)
+  "Return the completion annotation describing WORKTREE, or nil.
+That's whatever tells this checkout apart from the others - the branch
+for git and Mercurial, the workspace name for Jujutsu - which is the
+thing a path alone doesn't say and the whole reason for picking one
+checkout over another."
+  (when-let* ((label (plist-get worktree :label)))
+    (format " (%s)" label)))
+
+;;;###autoload
+(defun projectile-switch-worktree (&optional arg)
+  "Switch to another checkout of the current project\\='s repository.
+
+That's the project\\='s git worktrees, plus any other clone of the same
+upstream that Projectile already knows about - both are the same thing in
+practice, the place this project is checked out on another branch.
+
+Invokes the command referenced by `projectile-switch-project-action' on
+switch.  With a prefix ARG invokes `projectile-dispatch' instead."
+  (interactive "P")
+  (let* ((root (projectile-acquire-root))
+         (worktrees (seq-remove
+                     (lambda (worktree)
+                       ;; The checkout we're already in is not somewhere to
+                       ;; switch to, and one that's been deleted from under
+                       ;; its registration can't be switched to at all.
+                       (or (plist-get worktree :prunable)
+                           (file-equal-p (plist-get worktree :path) root)))
+                     (projectile-project-worktrees root)))
+         ;; Offered in the spelling every other switch command uses, so a
+         ;; worktree looks the same here as in `projectile-switch-project'.
+         (by-path (mapcar (lambda (worktree)
+                            (cons (projectile--known-project-root
+                                   (plist-get worktree :path))
+                                  worktree))
+                          worktrees)))
+    (unless worktrees
+      ;; Say which of the two it is: nothing to switch to, or nothing
+      ;; Projectile is able to look at.  They call for different responses
+      ;; and the same message for both sends people hunting for a bug.
+      (cond
+       ((file-remote-p root)
+        (user-error "Projectile doesn't look for the checkouts of a remote project"))
+       ((projectile-repo-identity root)
+        (user-error "No other checkout of %s found" (projectile-project-name root)))
+       (t
+        (user-error "Cannot tell what %s is a checkout of - only git, Mercurial and Jujutsu say.  Try `projectile-switch-sibling-project'"
+                    (projectile-project-name root)))))
+    (projectile-completing-read
+     "Switch to worktree: " (mapcar #'car by-path)
+     :action (lambda (path)
+               (projectile-switch-project-by-name path arg))
+     :annotation-function (lambda (path)
+                            (projectile--worktree-annotation
+                             (cdr (assoc path by-path))))
+     :category 'projectile-worktree)))
+
+
+;;; Sibling projects
+;;
+;; Plenty of work spans several repositories: a library and the app using
+;; it, a tool and its documentation site, the handful of packages that make
+;; up one project.  They're separate projects and should stay that way, but
+;; moving between them shouldn't mean going through every project on the
+;; machine.  `projectile-switch-sibling-project' offers just the ones
+;; related to the project you're in.
+;;
+;; Which ones those are comes from `projectile-sibling-project-functions',
+;; consulted in order, from the most reliable signal to the least:
+;;
+;;   1. Groups you configured yourself, which are always right.
+;;   2. The owner of the upstream remote - the account or organization the
+;;      repositories hang off.  This is by far the best of the inferred
+;;      signals: it relates projects whose names have nothing in common,
+;;      which no amount of looking at directory names ever will.
+;;   3. The leading word of the directory name, which is all that's left
+;;      for a repository with no remote at all.
+;;
+;; Inference is a heuristic, so it's bounded: a group covering more than
+;; `projectile-sibling-max-group-share' of the known projects is dropped
+;; rather than offered.  A group that most of your projects belong to isn't
+;; telling you anything - if everything you own lives under one account,
+;; "same account" doesn't relate anything to anything.
+
+(defcustom projectile-project-groups nil
+  "Named groups of projects that belong together.
+
+An alist mapping a group name to the list of project directories in it.
+A project may appear in several groups, and the groups of every one it
+belongs to are offered together by
+`projectile-switch-sibling-project'.
+
+This is the one signal that's never guessed, so it's consulted first.
+Use it for the projects that belong together for reasons nothing about
+them can reveal:
+
+  (setq projectile-project-groups
+        \\='((\"editor\" . (\"~/src/editor\" \"~/src/editor-docs\"))
+          (\"infra\"  . (\"~/src/deploy\" \"~/src/terraform\"))))
+
+To describe a single project's siblings from its own directory, set
+`projectile-project-siblings' in its `.dir-locals.el' instead."
+  :group 'projectile
+  :type '(alist :key-type (string :tag "Group")
+                :value-type (repeat directory))
+  :package-version '(projectile . "3.4.0"))
+
+(defvar projectile-project-siblings nil
+  "Projects to treat as siblings of the current one.
+A list of project directories.  Use this to describe one project's
+siblings from the project itself; it should be set via .dir-locals.el.
+`projectile-project-groups' is the equivalent for describing whole
+groups centrally.")
+(put 'projectile-project-siblings 'safe-local-variable
+     (lambda (value) (and (listp value) (seq-every-p #'stringp value))))
+
+(defcustom projectile-sibling-max-group-share 0.25
+  "How much of the known projects an inferred sibling group may cover.
+
+A number between 0 and 1, or nil to never discard a group.  Inference
+that relates most of your projects to each other has found nothing: if
+every repository you own lives under one account then \"same account\"
+tells you nothing, and offering that group is just
+`projectile-switch-project' with extra steps.  Such a group is dropped
+so the next signal gets its turn.
+
+Groups of two always survive, and the cap doesn't apply at all until
+there are `projectile--sibling-cap-min-projects' known projects to take
+a share of.  Configured groups (`projectile-project-groups') are never
+subject to this - you meant those."
+  :group 'projectile
+  :type '(choice (const :tag "Never discard a group" nil)
+                 (number :tag "Share of known projects"))
+  :package-version '(projectile . "3.4.0"))
+
+(defcustom projectile-sibling-project-functions
+  '(projectile-siblings-from-groups
+    projectile-siblings-from-owner
+    projectile-siblings-from-name)
+  "Functions consulted by `projectile-sibling-projects'.
+
+Each is called with a project root and should return a list of project
+directories related to it.  They're consulted in order and their results
+concatenated, so the most trustworthy signal should come first; a project
+found by more than one is offered once, in the position the first
+function to report it put it.
+
+Adding your own is the intended way to teach Projectile a grouping it
+can't infer - a workspace manifest, say.  Note that
+`projectile-sibling-max-group-share' is applied inside the two built-in
+inferred signals rather than to this list, so a function you add is never
+capped: it is trusted the way a configured group is."
+  :group 'projectile
+  :type '(repeat function)
+  :package-version '(projectile . "3.4.0"))
+
+(defconst projectile--sibling-cap-min-projects 10
+  "How many known projects there must be before the share cap applies.
+Below this `projectile-sibling-max-group-share' is ignored: a share of a
+handful of projects measures nothing, and relating three of your four
+projects to each other is a fine answer.")
+
+(defvar projectile--sibling-project-pool nil
+  "The known projects a sibling lookup is choosing from.
+Bound by `projectile-sibling-projects' so that every signal function
+shares one walk of the known projects and one pass of the ignore
+filtering, instead of each of them paying for both.")
+
+(defun projectile--sibling-candidate-projects ()
+  "Return the known projects a sibling signal may draw on."
+  (or projectile--sibling-project-pool
+      (let ((projects (projectile-known-projects)))
+        ;; Only filter when there's ignore configuration to apply, so the
+        ;; common case doesn't pay for a `file-truename' per known project.
+        (if (or projectile-ignored-projects
+                projectile-ignored-project-patterns
+                projectile-ignored-project-function)
+            (seq-remove #'projectile-ignored-project-p projects)
+          projects))))
+
+(defun projectile--siblings-by-key (root key-function)
+  "Return the known projects KEY-FUNCTION gives the same answer for as ROOT.
+
+Nil when ROOT has no key, and nil when so many projects share it that
+the answer says nothing - see `projectile-sibling-max-group-share'.  This
+is the shape every inferred signal takes: some property of a project
+root, and everything else that has it too."
+  (when-let* ((key (funcall key-function root)))
+    (let* ((projects (projectile--sibling-candidate-projects))
+           (matches (seq-filter (lambda (project)
+                                  (equal key (funcall key-function project)))
+                                projects)))
+      (unless (and projectile-sibling-max-group-share
+                   ;; A share of a handful of projects isn't a measurement
+                   ;; of anything, and the switch list is short enough not
+                   ;; to need narrowing, so the cap only starts applying
+                   ;; once "most of them" means something.
+                   (>= (length projects) projectile--sibling-cap-min-projects)
+                   (> (length matches)
+                      (max 2 (floor (* projectile-sibling-max-group-share
+                                       (length projects))))))
+        matches))))
+
+(defun projectile-siblings-from-groups (root)
+  "Return the projects grouped with ROOT by configuration.
+
+That's the groups in `projectile-project-groups' that ROOT is a member
+of, plus whatever `projectile-project-siblings' names.  The latter is a
+buffer-local setting describing the project you're in, so it's only
+consulted when that's the project being asked about.
+
+Configured groups are never subject to
+`projectile-sibling-max-group-share': however many projects you put in a
+group, you meant to."
+  (let ((key (projectile--directory-key root)))
+    (append
+     (when-let* ((current (ignore-errors (projectile-project-root)))
+                 ((equal key (projectile--directory-key current))))
+       projectile-project-siblings)
+     (seq-mapcat
+      #'cdr
+      (seq-filter (lambda (group)
+                    (seq-some (lambda (member)
+                                (equal key (projectile--directory-key member)))
+                              (cdr group)))
+                  projectile-project-groups)))))
+
+(defun projectile-siblings-from-owner (root)
+  "Return the known projects whose upstream has the same owner as ROOT\\='s.
+
+The account or organization a repository hangs off is the strongest hint
+there is that two projects are part of one effort, and the only one that
+relates projects whose names have nothing in common."
+  (projectile--siblings-by-key
+   root (lambda (project)
+          (plist-get (projectile-repo-identity project) :owner))))
+
+(defun projectile--project-leading-token (path)
+  "Return the first word of PATH\\='s directory name, or nil.
+Single characters aren't words worth grouping on, so they're skipped."
+  (seq-find (lambda (token) (>= (length token) 2))
+            (split-string (downcase (file-name-nondirectory
+                                     (directory-file-name path)))
+                          "[-_. ]+" t)))
+
+(defun projectile-siblings-from-name (root)
+  "Return the known projects whose directory name starts like ROOT\\='s.
+
+Only the leading word counts.  Matching on any shared word instead reads
+far more into a name than is there - it relates every `*-mode' to every
+other, and every `docs.*' site to the rest - whereas a shared first word
+is nearly always a deliberate family (`rubocop', `rubocop-ast').
+
+This is the signal of last resort: it's the only one left for a
+repository with no remote at all, and the only one that will ever relate
+two projects belonging to different owners."
+  (projectile--siblings-by-key root #'projectile--project-leading-token))
+
+(defun projectile-sibling-projects (&optional project-root)
+  "Return the projects related to PROJECT-ROOT, including itself.
+
+Every function in `projectile-sibling-project-functions' is consulted in
+turn and their results concatenated, de-duplicated by resolved path, so
+the ordering runs from the most trustworthy signal to the least.  The
+projects come back in the spelling the other switch commands use."
+  (let* ((root (or project-root (projectile-acquire-root)))
+         ;; Walk the known projects once for all the signal functions.
+         (projectile--sibling-project-pool (projectile--sibling-candidate-projects)))
+    (mapcar #'projectile--known-project-root
+            (projectile--collect-from-functions
+             projectile-sibling-project-functions root
+             #'projectile--directory-key "Sibling"))))
+
+;;;###autoload
+(defun projectile-switch-sibling-project (&optional arg)
+  "Switch to a project related to the current one.
+
+Related means grouped with it in `projectile-project-groups', or sharing
+the owner of its upstream remote, or - failing both - starting with the
+same word.  See `projectile-sibling-project-functions'.
+
+Invokes the command referenced by `projectile-switch-project-action' on
+switch.  With a prefix ARG invokes `projectile-dispatch' instead."
+  (interactive "P")
+  (let* ((root (projectile-acquire-root))
+         (siblings (seq-remove
+                    (lambda (project)
+                      ;; The project we're in isn't somewhere to switch to,
+                      ;; and a configured group can name one that has since
+                      ;; been moved away.
+                      (or (file-equal-p project root)
+                          (not (file-directory-p project))))
+                    (projectile-sibling-projects root))))
+    (unless siblings
+      ;; Nothing inferred is a perfectly ordinary outcome - it's what the
+      ;; share cap does when a signal relates too much - so point at the
+      ;; setting that always works rather than just reporting the miss.
+      (user-error "No projects related to %s found - see `projectile-project-groups'"
+                  (projectile-project-name root)))
+    (projectile-completing-read
+     "Switch to sibling project: " siblings
+     :action (lambda (project)
+               (projectile-switch-project-by-name project arg))
+     :category 'projectile-project)))
+
+
+;;; Commands over a group of projects
+;;
+;; Everything above works on the project you're in.  These two work on a set
+;; of projects handed to them, because those are the two questions a group
+;; actually raises: which of them was that file in, and which of them mention
+;; this string.
+;;
+;; They're plain functions taking the list, so a command for a new kind of
+;; group is a two-line wrapper.  The known-projects and sibling commands are
+;; exactly that, and so is anything you write yourself.
+
+(defun projectile--common-parent (directories)
+  "Return the innermost directory containing every one of DIRECTORIES.
+
+Nil when they share no ancestor at all: a group mixing local and remote
+\(TRAMP) projects has none, and neither do two remote projects on
+different hosts.  Nil for an empty DIRECTORIES too."
+  (when directories
+    (let ((parent (file-name-as-directory (expand-file-name (car directories)))))
+      (dolist (dir (cdr directories) parent)
+        (let ((other (file-name-as-directory (expand-file-name dir))))
+          (while (and parent (not (string-prefix-p parent other)))
+            ;; climb until PARENT contains OTHER too, giving up at the root
+            (let ((up (file-name-directory (directory-file-name parent))))
+              (setq parent (unless (equal up parent) up)))))))))
+
+(defun projectile--project-group (projects what)
+  "Return the members of PROJECTS that are still on disk.
+WHAT names the kind of group in the error signalled when none are."
+  (or (seq-filter #'projectile--directory-p projects)
+      (user-error "No %s to search" what)))
+
+(defun projectile-project-group-files (projects)
+  "Return every file in PROJECTS, as absolute paths.
+
+Projects that no longer exist are skipped rather than erroring: a group
+can name a directory that has since been moved away.  The result is
+de-duplicated, since two members of a group can nest."
+  (delete-dups
+   (mapcan
+    (lambda (project)
+      (mapcar (lambda (file) (expand-file-name file project))
+              (projectile-project-files project)))
+    (seq-filter #'projectile--directory-p projects))))
+
+;;;###autoload
+(defun projectile-find-file-in-projects (projects &optional prompt)
+  "Jump to a file in any of PROJECTS.
+PROMPT overrides the completion prompt."
+  (find-file (projectile-completing-read
+              (or prompt "Find file in projects: ")
+              (projectile-project-group-files
+               (projectile--project-group projects "projects"))
+              :caller 'projectile-read-file)))
+
+;;;###autoload
+(defun projectile-search-in-projects (projects &optional literal prompt)
+  "Search PROJECTS for a term and review the matches read-only.
+LITERAL non-nil searches for a literal string, otherwise the term is an
+Emacs regexp.  PROMPT overrides the label the term is read with.
+
+This is `projectile-search-review' widened to a group, and that command
+is the single-project case of it: matches from every project land in one
+`*projectile-search*' buffer, grouped by file and named relative to the
+innermost directory containing the group, so each one is labelled with
+the project it came from.  Everything that buffer does - filtering,
+re-search, the hand-off to the replace reviewer - then covers the whole
+group.
+
+Each member of the group is filtered by its own ignore rules, wherever
+you happen to be sitting, and a literal search runs `rg' over each of
+them in turn when ripgrep is available."
+  (let* ((projects (projectile--project-group projects "projects"))
+         (term (projectile--read-search-string-with-default
+                (or prompt (format "Search %d project%s%s for"
+                                   (length projects)
+                                   (if (cdr projects) "s" "")
+                                   (if literal "" " regexp")))))
+         (regexp (if literal (regexp-quote term) term))
+         (case-fold case-fold-search)
+         (candidates (lambda ()
+                       (projectile-replace--candidates
+                        term literal case-fold projects))))
+    (projectile-replace--open
+     #'projectile-search-mode projectile-search-buffer-name
+     (or (projectile--common-parent projects) "/")
+     term regexp nil literal case-fold candidates
+     (projectile-prepend-project-name (format "No matches for %s" term))
+     projectile-search-whole-word nil projects)))
+
+(defun projectile-project-group-buffers (projects)
+  "Return the live buffers belonging to any of PROJECTS.
+De-duplicated, since two members of a group can nest and a buffer under
+both would otherwise be offered twice."
+  (delete-dups (mapcan #'projectile-project-buffers projects)))
+
+;;;###autoload
+(defun projectile-switch-to-buffer-in-projects (projects &optional prompt)
+  "Switch to a buffer belonging to any of PROJECTS.
+PROMPT overrides the completion prompt.  The current buffer is left out
+of the choices, as `projectile-switch-to-buffer' does."
+  (switch-to-buffer
+   (projectile-completing-read
+    (or prompt "Switch to buffer: ")
+    (delete (buffer-name (current-buffer))
+            (mapcar #'buffer-name (projectile-project-group-buffers projects)))
+    :category 'buffer
+    :caller 'projectile-read-buffer)))
+
+(defun projectile--sibling-group ()
+  "Return the projects to treat as a group with the current one.
+
+That is `projectile-sibling-projects', which includes the project you are
+in - unlike switching, working across a family of projects is something
+you want the project at hand to be part of - minus any member that has
+been moved away, so a prompt never counts projects it cannot search."
+  (let ((root (projectile-acquire-root)))
+    (or (seq-filter #'projectile--directory-p (projectile-sibling-projects root))
+        (user-error "No projects related to %s found - see `projectile-project-groups'"
+                    (projectile-project-name root)))))
+
+;;;###autoload
+(defun projectile-find-file-in-sibling-projects ()
+  "Jump to a file in the current project or any related to it.
+Related is what `projectile-switch-sibling-project' means by it."
+  (interactive)
+  (projectile-find-file-in-projects (projectile--sibling-group)
+                                    "Find file in sibling projects: "))
+
+;;;###autoload
+(defun projectile-search-in-sibling-projects (&optional regexp)
+  "Search the current project and the ones related to it, reviewing the matches.
+
+Related is what `projectile-switch-sibling-project' means by it.  With a
+prefix argument REGEXP the search term is an Emacs regexp rather than a
+literal string."
+  (interactive "P")
+  (let ((siblings (projectile--sibling-group)))
+    (projectile-search-in-projects
+     siblings (not regexp)
+     (format "Search %d sibling project%s%s for"
+             (length siblings) (if (cdr siblings) "s" "")
+             (if regexp " regexp" "")))))
+
+;;;###autoload
+(defun projectile-switch-to-buffer-in-sibling-projects ()
+  "Switch to a buffer of the current project or of one related to it.
+Related is what `projectile-switch-sibling-project' means by it."
+  (interactive)
+  (projectile-switch-to-buffer-in-projects
+   (projectile--sibling-group) "Switch to sibling buffer: "))
+
+;;;###autoload
+(defun projectile-multi-occur-in-sibling-projects (&optional nlines)
+  "Do a `multi-occur' in the buffers of the current project and related ones.
+Related is what `projectile-switch-sibling-project' means by it.  With a
+prefix argument, show NLINES of context.
+
+Note this searches the buffers you have open, not the projects on disk -
+`projectile-search-in-sibling-projects' is the one that reads files."
+  (interactive "P")
+  (multi-occur (projectile-project-group-buffers (projectile--sibling-group))
+               (car (occur-read-primary-args))
+               nlines))
+
+;;;###autoload
+(defun projectile-todos-in-sibling-projects ()
+  "Collect TODO-style annotations across the current project and related ones.
+Related is what `projectile-switch-sibling-project' means by it.  See
+`projectile-todos' for what counts as an annotation."
+  (interactive)
+  (projectile--todos (projectile--sibling-group)))
+
+
+;;; Project bookmarks
+;;
+;; Project-scoped bookmarks on top of the built-in `bookmark.el'.  There's
+;; no separate storage and no separate persistence: a Projectile bookmark
+;; is an ordinary Emacs bookmark, so it shows up in `list-bookmarks',
+;; survives restarts and honours `bookmark-save-flag' for free.  All
+;; Projectile adds is a project scope - the commands below only ever offer
+;; you the current project's bookmarks - and a project-prefixed default
+;; name, so the entries stay identifiable in the global list.
+
+;; `bookmark' is built in, but only its commands are autoloaded - the
+;; accessors and `bookmark-alist' used below are not.
+(require 'bookmark)
+
+(defcustom projectile-bookmark-scope 'both
+  "How a bookmark is recognised as belonging to a project.
+
+Emacs bookmarks are global, so Projectile has to decide which of them
+belong to the project at hand.  There are two ways to tell, each with a
+different failure mode:
+
+- `file' - the bookmark's recorded file lives under the project root.
+  Robust (it survives renaming the bookmark, and catches bookmarks made
+  with plain `bookmark-set'), but blind to bookmarks that record no
+  file, e.g. those of Info or Man buffers.
+
+- `name' - the bookmark's name starts with the project's name followed
+  by a colon and a space, which is how `projectile-bookmark-set' names
+  bookmarks by default.  Covers bookmarks without a file, but breaks as
+  soon as the bookmark (or the project directory) is renamed.
+
+- `both' - the default: a bookmark belongs to the project when either
+  test says so."
+  :group 'projectile
+  :type '(choice (const :tag "Recorded file lives under the project root" file)
+                 (const :tag "Name starts with the project name" name)
+                 (const :tag "Either of the two" both))
+  :package-version '(projectile . "3.3.0"))
+
+(defun projectile-bookmark--name-prefix (&optional project)
+  "Return the bookmark name prefix for PROJECT.
+PROJECT is a project root and defaults to the current project."
+  (format "%s: " (projectile-project-name project)))
+
+(defun projectile-bookmark--under-root-p (filename root)
+  "Return non-nil when FILENAME is a file under ROOT.
+ROOT is expected to be a true name already; FILENAME is resolved to
+one, so a symlinked path into the project still matches.  FILENAME need
+not exist - a bookmark whose file was deleted still belongs to the
+project that file was in."
+  (and filename
+       ;; A remote file can't be under a local root (and the other way
+       ;; around).  Answer that from the names alone: resolving a remote
+       ;; name would open a TRAMP connection, and a single stale remote
+       ;; bookmark would then stall every bookmark prompt.
+       (equal (file-remote-p filename) (file-remote-p root))
+       (let ((non-essential t))
+         (string-prefix-p root (file-truename (expand-file-name filename))))))
+
+(defun projectile-bookmark--belongs-p (bookmark root)
+  "Return non-nil when BOOKMARK belongs to the project at ROOT.
+BOOKMARK is a bookmark record and ROOT the project root's true name,
+ending in a slash.  Which test is applied is governed by
+`projectile-bookmark-scope'."
+  (or (and (memq projectile-bookmark-scope '(file both))
+           (projectile-bookmark--under-root-p
+            (bookmark-get-filename bookmark) root)
+           t)
+      (and (memq projectile-bookmark-scope '(name both))
+           (string-prefix-p (projectile-bookmark--name-prefix root)
+                            (bookmark-name-from-full-record bookmark)))))
+
+(defun projectile-bookmark-names (&optional root)
+  "Return the names of the bookmarks belonging to the project at ROOT.
+ROOT defaults to the current project.  See `projectile-bookmark-scope'
+for what makes a bookmark the project's."
+  (let ((root (file-name-as-directory
+               (file-truename (or root (projectile-acquire-root))))))
+    (bookmark-maybe-load-default-file)
+    (delq nil (mapcar (lambda (bookmark)
+                        (and (projectile-bookmark--belongs-p bookmark root)
+                             (bookmark-name-from-full-record bookmark)))
+                      bookmark-alist))))
+
+(defun projectile-bookmark--default-name (root)
+  "Return the suggested name for a new bookmark at point in ROOT.
+That's the name `bookmark-make-record' suggests (normally the file or
+buffer name), prefixed with the project's name.  Buffers `bookmark.el'
+cannot record at all (those visiting neither a file nor a directory,
+unless their mode knows how to bookmark itself) are refused with a
+`user-error' rather than with a bare error and a backtrace."
+  (concat (projectile-bookmark--name-prefix root)
+          ;; Without this binding the record's name falls back to that of
+          ;; the bookmark last used, which has nothing to do with the
+          ;; location being bookmarked now.
+          (let ((bookmark-current-bookmark nil))
+            (condition-case err
+                (bookmark-name-from-full-record (bookmark-make-record))
+              (user-error (signal (car err) (cdr err)))
+              (error (user-error "%s" (error-message-string err)))))))
+
+(defun projectile-bookmark--record (name)
+  "Return the bookmark record named NAME.
+Signals a `user-error' when there is no such bookmark - the completion
+prompts don't require a match, and `bookmark.el' answers a name it
+doesn't know with a bare error (or, in the case of `bookmark-delete',
+with a cheerful nothing at all)."
+  (or (bookmark-get-bookmark name t)
+      (user-error "No bookmark named `%s'" name)))
+
+(defun projectile-bookmark--read (prompt &optional root)
+  "Read one of the project's bookmark names with PROMPT.
+ROOT defaults to the current project.  Signals a `user-error' when the
+project has no bookmarks yet."
+  (let* ((root (or root (projectile-acquire-root)))
+         (names (projectile-bookmark-names root)))
+    (unless names
+      (user-error "%s" (projectile-prepend-project-name
+                        "No bookmarks in this project")))
+    (projectile-completing-read prompt names :category 'bookmark)))
+
+;;;###autoload
+(defun projectile-bookmark-set (name)
+  "Set a bookmark named NAME at point, scoped to the current project.
+
+The bookmark is a regular Emacs bookmark - it lands in `bookmark-alist',
+shows up in `list-bookmarks' and is persisted by `bookmark.el' itself.
+The only Projectile touch is the suggested NAME: the name `bookmark-set'
+would suggest, prefixed with the project's name (e.g. \"projectile:
+projectile.el\"), so the project's bookmarks are easy to spot in the
+global list.  You're free to edit the name - a bookmark on a file inside
+the project is recognised as the project's even without the prefix (see
+`projectile-bookmark-scope')."
+  (interactive
+   (let ((default (projectile-bookmark--default-name (projectile-acquire-root))))
+     (list (read-string "Set bookmark: " default 'bookmark-history default))))
+  (bookmark-set name))
+
+;;;###autoload
+(defun projectile-bookmark-jump (name)
+  "Jump to the project bookmark named NAME.
+Only the current project's bookmarks are offered for completion - see
+`projectile-bookmark-scope' for how that's decided.
+
+When the bookmark's file has been deleted in the meantime this refuses
+with a friendly error instead of dragging you through the relocation
+prompt of `bookmark.el'.  Use `projectile-bookmark-delete' to get rid of
+such a stale bookmark."
+  (interactive (list (projectile-bookmark--read "Jump to bookmark: ")))
+  (let* ((record (projectile-bookmark--record name))
+         (file (bookmark-get-filename record)))
+    ;; A bookmark with a handler of its own may keep something else
+    ;; entirely in `filename', so only vet the ones `bookmark.el' will
+    ;; resolve as a file itself.
+    (when (and file
+               (not (bookmark-get-handler record))
+               (not (file-readable-p file)))
+      (user-error "The file of bookmark `%s' is gone (%s)" name file)))
+  (bookmark-jump name))
+
+;;;###autoload
+(defun projectile-bookmark-delete (name)
+  "Delete the project bookmark named NAME.
+Only the current project's bookmarks are offered for completion - see
+`projectile-bookmark-scope' for how that's decided."
+  (interactive (list (projectile-bookmark--read "Delete bookmark: ")))
+  (projectile-bookmark--record name)
+  (bookmark-delete name)
+  (message "Deleted bookmark `%s'" name))
+
+
+;;; IBuffer integration
+(define-ibuffer-filter projectile-files
+    "Show Ibuffer with all buffers in the current project."
+  (:reader (read-directory-name "Project root: " (projectile-project-root))
+           :description nil)
+  (with-current-buffer buf
+    (let ((directory (file-name-as-directory (expand-file-name qualifier))))
+      (and (projectile-project-buffer-p buf directory)
+           (equal directory
+                  (projectile-project-root))))))
+
+(defun projectile-ibuffer-by-project (project-root)
+  "Open an IBuffer window showing all buffers in PROJECT-ROOT."
+  (let ((project-name (funcall projectile-project-name-function project-root)))
+    (ibuffer nil (format "*%s Buffers*" project-name)
+             (list (cons 'projectile-files project-root)))))
+
+;;;###autoload
+(defun projectile-ibuffer (prompt-for-project)
+  "Open an IBuffer window showing all buffers in the current project.
+
+Let user choose another project when PROMPT-FOR-PROJECT is supplied."
+  (interactive "P")
+  (let ((project-root (if prompt-for-project
+                          (projectile-completing-read
+                           "Project name: "
+                           (projectile-relevant-known-projects)
+                           :category 'projectile-project
+                           :caller 'projectile-read-project)
+                        (projectile-acquire-root))))
+    (projectile-ibuffer-by-project project-root)))
+
+
+;;; Find next/previous project buffer
+(defun projectile--repeat-until-project-buffer (orig-fun &rest args)
+  "Repeat ORIG-FUN with ARGS until the current buffer is a project buffer."
+  (if (projectile-project-root)
+      (let* ((other-project-buffers (make-hash-table :test 'eq))
+             (projectile-project-buffers (projectile-project-buffers))
+             (max-iterations (length (buffer-list)))
+             (counter 0))
+        (dolist (buffer projectile-project-buffers)
+          (unless (eq buffer (current-buffer))
+            (puthash buffer t other-project-buffers)))
+        (when (cdr-safe projectile-project-buffers)
+          (while (and (< counter max-iterations)
+                      (not (gethash (current-buffer) other-project-buffers)))
+            (apply orig-fun args)
+            (setq counter (1+ counter)))))
+    (apply orig-fun args)))
+
+(defun projectile-next-project-buffer ()
+  "In selected window switch to the next project buffer.
+
+If the current buffer does not belong to a project, call `next-buffer'."
+  (interactive)
+  (projectile--repeat-until-project-buffer #'next-buffer))
+
+(defun projectile-previous-project-buffer ()
+  "In selected window switch to the previous project buffer.
+
+If the current buffer does not belong to a project, call `previous-buffer'."
+  (interactive)
+  (projectile--repeat-until-project-buffer #'previous-buffer))
+
+
+;;; Editing a project's .dir-locals
+(defun projectile-read-variable ()
+  "Prompt for a variable and return its name as a string.
+Return nil on empty input, which ends the variable-entry loop of
+`projectile-skel-dir-locals' while keeping the entries made so far."
+  (let ((var (completing-read "Variable (RET when done): "
+                              obarray
+                              (lambda (v)
+                                (and (boundp v) (not (keywordp v))))
+                              t)))
+    (unless (string-empty-p var) var)))
+
+(define-skeleton projectile-skel-variable-cons
+  "Insert a variable-name and a value in a cons-cell."
+  (projectile-read-variable)
+  "(" str " . " (skeleton-read "Value: " nil t) ")")
+
+(define-skeleton projectile-skel-dir-locals
+  "Insert a .dir-locals.el template.
+The variable-entry loop ends when an empty variable name is
+entered, keeping the entries made so far."
+  nil
+  "((nil . ("
+  ((projectile-read-variable) "(" str " . " (skeleton-read "Value: " nil t) ")" \n)
+  resume:
+  ")))")
+
+;;;###autoload
+(defun projectile-edit-dir-locals ()
+  "Edit or create a .dir-locals.el file of the project."
+  (interactive)
+  (let ((file (expand-file-name ".dir-locals.el" (projectile-acquire-root))))
+    (find-file file)
+    (when (not (file-exists-p file))
+      (projectile-skel-dir-locals)
+      (save-buffer))))
+
+
+;;; Project diagnostics (the doctor)
+;;
+;; `projectile-doctor' renders what Projectile thinks is going on in the
+;; current project - and why - into a plain, copy-pasteable buffer.  It
+;; computes nothing new: every value shown comes from the same accessor
+;; the rest of Projectile uses.
+;;
+;; A note on side effects, since a diagnostic that changes what it
+;; diagnoses is worse than useless.  The doctor reports the caches as it
+;; finds them: it never populates and never invalidates
+;; `projectile-projects-cache'.  When a project's file list isn't cached
+;; yet, the doctor indexes it with caching bound off, times that run and
+;; labels it a fresh index in the report - so running the doctor can't
+;; turn a cold project warm (or a warm one cold) behind your back.  The
+;; dirconfig is read with the uncached parser for the same reason.  The
+;; project root and VCS caches are the exception: those are populated by
+;; merely asking, exactly as any other command would.
+;;
+;; Anything whose cost is unknown - indexing, `executable-find', listing
+;; the project root - is skipped for remote (TRAMP) projects and marked
+;; as skipped in the report, so the doctor can't hang on a slow host.
+
+;;;; Shared rendering for the report buffers
+;;
+;; The doctor and the dashboard are both label/value reports, and they
+;; share their look.  Two rules keep them honest:
+;;
+;; - Every face here only inherits, so themes style them without knowing
+;;   Projectile exists, and a terminal without colors degrades to plain
+;;   text rather than to something unreadable.
+;; - The buffer text stays plain ASCII.  Faces are a display layer on top
+;;   of it, so what you see and what you yank are the same characters -
+;;   which matters because a doctor report's destination is usually a bug
+;;   report (see `projectile-report-copy').
+
+(defface projectile-report-section
+  '((t :inherit font-lock-function-name-face :weight bold))
+  "Face for the section headers of the doctor and dashboard buffers."
+  :group 'projectile
+  :package-version '(projectile . "3.4.0"))
+
+(defface projectile-report-label
+  '((t :inherit shadow))
+  "Face for the field labels of the doctor and dashboard buffers.
+Labels are dimmed so the values they introduce carry the eye."
+  :group 'projectile
+  :package-version '(projectile . "3.4.0"))
+
+(defface projectile-report-value
+  '((t :inherit font-lock-string-face))
+  "Face for the values that identify a project - its root, type and name."
+  :group 'projectile
+  :package-version '(projectile . "3.4.0"))
+
+(defface projectile-report-ok
+  '((t :inherit success))
+  "Face for a finding that reports something is fine, and for `on'/`present'."
+  :group 'projectile
+  :package-version '(projectile . "3.4.0"))
+
+(defface projectile-report-warning
+  '((t :inherit warning))
+  "Face for a finding that suggests a change, and for `missing'."
+  :group 'projectile
+  :package-version '(projectile . "3.4.0"))
+
+(defface projectile-report-info
+  '((t :inherit shadow))
+  "Face for a purely informational finding."
+  :group 'projectile
+  :package-version '(projectile . "3.4.0"))
+
+(defface projectile-report-hint
+  '((t :inherit shadow :slant italic))
+  "Face for the key hints at the foot of a report buffer."
+  :group 'projectile
+  :package-version '(projectile . "3.4.0"))
+
+(defun projectile--report-face (string face)
+  "Return STRING propertized with FACE."
+  (propertize string 'face face))
+
+(defun projectile--report-title (title &optional char)
+  "Insert TITLE underlined with CHAR (`=' by default).
+The rule is kept as text rather than expressed with a face, so a yanked
+report reads the same as the rendered one - but it is dimmed, so the
+title carries the emphasis rather than competing with its own underline."
+  (insert (projectile--report-face title 'projectile-report-section) "\n"
+          (projectile--report-face (make-string (length title) (or char ?=))
+                                   'projectile-report-label)
+          "\n"))
+
+(defun projectile--report-section (title)
+  "Insert the header of a report section titled TITLE."
+  (insert "\n")
+  (projectile--report-title title ?-))
+
+(defun projectile--report-label (label width)
+  "Insert LABEL, dimmed and padded out to WIDTH."
+  (insert (projectile--report-face label 'projectile-report-label)
+          (make-string (max 1 (- width (length label))) ?\s)))
+
+(defun projectile--report-status-face (value)
+  "Return the face for the status word VALUE, or nil when it isn't one.
+Only the words whose polarity is unambiguous are colored."
+  (cond ((member value '("on" "present" "yes")) 'projectile-report-ok)
+        ((member value '("missing")) 'projectile-report-warning)
+        ((member value '("off" "skipped" "none")) 'projectile-report-info)))
+
+(defun projectile--report-hints (bindings)
+  "Insert a dimmed footer line describing BINDINGS.
+BINDINGS is an alist of (COMMAND . DESCRIPTION).  The key is looked up
+with `substitute-command-keys', so the hint tells the truth even when the
+buffer\\='s map has been rebound - the trick Flycheck\\='s verify buffer uses."
+  (insert "\n"
+          (projectile--report-face
+           (mapconcat (lambda (binding)
+                        (format "%s %s"
+                                (substitute-command-keys
+                                 (format "\\[%s]" (car binding)))
+                                (cdr binding)))
+                      bindings "   ")
+           'projectile-report-hint)
+          "\n"))
+
+(defun projectile--report-setup-outline ()
+  "Make the report\\='s sections collapsible with `outline-minor-mode'.
+Section titles are capitalized and start in column zero, while every
+field label is lowercase, so that one distinction is the whole heading
+regexp - no dependency on `magit-section' needed to fold a long report."
+  (setq-local outline-regexp "[A-Z]")
+  (setq-local outline-level (lambda () 1))
+  (outline-minor-mode 1))
+
+;;;###autoload
+(defun projectile-report-copy ()
+  "Copy the current report buffer to the kill ring as plain text.
+
+Strips the faces and buttons, so what lands in the clipboard is exactly
+the text of the report - ready to paste into an issue, an email or a
+chat window without dragging Emacs\\='s text properties along."
+  (interactive)
+  (unless (derived-mode-p 'projectile-doctor-mode 'projectile-dashboard-mode)
+    (user-error "Not in a Projectile report buffer"))
+  (let ((text (buffer-substring-no-properties (point-min) (point-max))))
+    (kill-new text)
+    (message "Copied %d lines of %s to the kill ring"
+             (count-lines (point-min) (point-max))
+             (if (derived-mode-p 'projectile-doctor-mode) "the report" "the dashboard"))))
+
+(defconst projectile-doctor-buffer-name "*projectile-doctor*"
+  "The name of the buffer `projectile-doctor' renders its report in.")
+
+(defconst projectile-doctor--large-project 10000
+  "File count above which a project is considered large by the doctor.")
+
+(defconst projectile-doctor--huge-project 50000
+  "File count above which the doctor suspects the ignore rules.")
+
+(defconst projectile-doctor--label-width 22
+  "Column width of the labels in a doctor report.")
+
+(defvar-local projectile-doctor--directory nil
+  "The directory a doctor report was generated from.
+Used by the report buffer's `revert-buffer' to regenerate it.")
+
+(defun projectile-doctor--root-function (dir)
+  "Return the `projectile-project-root-functions' entry that roots DIR.
+That is the first function in the list to return a project root for
+DIR, which is the one whose answer function `projectile-project-root'
+used.  Returns nil when no function claims DIR."
+  (let ((true-dir (ignore-errors (file-truename dir))))
+    (seq-find (lambda (func)
+                (ignore-errors
+                  (funcall func (if (eq func 'projectile-root-local)
+                                    dir
+                                  (or true-dir dir)))))
+              projectile-project-root-functions)))
+
+(defun projectile-doctor--root-marker (func root)
+  "Return the marker file in ROOT that made FUNC report it as a root.
+Returns nil for a root function with no marker list of its own (e.g.
+`projectile-root-local', which reads a buffer-local variable) or when
+no marker can be pinned down."
+  (when-let* ((markers (pcase func
+                         ('projectile-root-marked
+                          (list projectile-dirconfig-file))
+                         ('projectile-root-bottom-up
+                          projectile-project-root-files-bottom-up)
+                         ('projectile-root-top-down
+                          projectile-project-root-files)
+                         ('projectile-root-top-down-recurring
+                          projectile-project-root-files-top-down-recurring))))
+    (seq-find (lambda (marker)
+                (ignore-errors
+                  (projectile-file-exists-p
+                   (projectile-expand-file-name-wildcard marker root))))
+              markers)))
+
+(defun projectile-doctor--type-marker (type)
+  "Return the registered marker files of the project TYPE, or nil."
+  (when-let* ((record (assq type projectile-project-types)))
+    (plist-get (cdr record) 'marker-files)))
+
+(defun projectile-doctor--executable (name remote)
+  "Report the availability of the NAME executable.
+Returns `present', `missing', or `skipped' when the project is REMOTE
+and looking the program up would mean a TRAMP round-trip."
+  (cond (remote 'skipped)
+        ((and name (executable-find name)) 'present)
+        (t 'missing)))
+
+(defun projectile-doctor--index-command (root vcs)
+  "Return the external indexing command Projectile would run in ROOT.
+VCS is the project's version-control system.  Returns nil under the
+`native' indexing method, which shells out to nothing."
+  (unless (eq projectile-indexing-method 'native)
+    (let ((default-directory root))
+      (ignore-errors (projectile--alien-ext-command vcs root)))))
+
+(defun projectile-doctor--file-info (root remote)
+  "Return a plist describing ROOT's file list and how it was obtained.
+The cached list is used when there is one.  Otherwise the project is
+indexed with caching bound off, so the doctor doesn't warm a cache the
+user didn't ask it to warm, and the timing of that run is reported.
+Indexing is skipped altogether when the project is REMOTE."
+  (let ((cached (gethash root projectile-projects-cache)))
+    (cond
+     (cached (list :file-count (length cached) :files-source 'cache))
+     (remote (list :files-source 'skipped))
+     (t (let* ((start (float-time))
+               (files (condition-case err
+                          ;; Index without touching the cache: no entry is
+                          ;; stored, no stale entry is evicted, no file
+                          ;; watch is armed.
+                          (let ((projectile-enable-caching nil)
+                                (projectile-files-cache-expire nil))
+                            (projectile-project-files root))
+                        (error (cons 'error (error-message-string err))))))
+          (if (eq (car-safe files) 'error)
+              (list :files-source 'error :files-error (cdr files))
+            (list :file-count (length files)
+                  :index-time (- (float-time) start)
+                  :files-source 'fresh)))))))
+
+(defun projectile-doctor--excluded-entries (root patterns)
+  "Return ROOT's immediate entries excluded by the ignore PATTERNS.
+Directories are returned with a trailing slash, the way the patterns
+match them."
+  (when-let* ((re (projectile--compile-ignore-patterns patterns))
+              (entries (ignore-errors
+                         (directory-files
+                          root t directory-files-no-dot-files-regexp))))
+    (let ((case-fold-search nil))
+      (delq nil
+            (mapcar (lambda (entry)
+                      (let ((rel (concat (file-name-nondirectory entry)
+                                         (if (file-directory-p entry) "/" ""))))
+                        (and (string-match-p re rel) rel)))
+                    entries)))))
+
+(defun projectile-doctor--collect (&optional dir)
+  "Collect the diagnostic data for DIR's project as a plist.
+DIR defaults to `default-directory'.  Outside a project the plist has
+a nil `:root' and the rendering degrades to saying so."
+  (let* ((dir (or dir default-directory))
+         (root (ignore-errors (projectile-project-root dir))))
+    (if (null root)
+        (list :dir dir :root nil)
+      (let* ((remote (file-remote-p root))
+             ;; The doctor reports prefix-less dirconfig lines as a
+             ;; finding; it shouldn't also pop up the warning buffer over
+             ;; the report it's about to show.
+             (projectile-warn-on-prefixless-dirconfig-lines nil)
+             (default-directory root)
+             (vcs (ignore-errors (projectile-project-vcs root)))
+             (type (ignore-errors (projectile-project-type)))
+             (root-func (projectile-doctor--root-function dir))
+             (ignore-patterns (ignore-errors (projectile--ignore-patterns root)))
+             (cache-time (gethash root projectile-projects-cache-time)))
+        (append
+         (list :dir dir
+               :root root
+               :remote remote
+               :root-function root-func
+               :root-marker (and root-func
+                                 (projectile-doctor--root-marker root-func root))
+               :name (ignore-errors (projectile-project-name root))
+               :name-source (if projectile-project-name
+                                'local-variable
+                              projectile-project-name-function)
+               :type type
+               :type-source (if projectile-project-type 'local-variable 'detected)
+               :type-marker (unless projectile-project-type
+                              (projectile-doctor--type-marker type))
+               :vcs vcs
+               :indexing-method projectile-indexing-method
+               :async-indexing projectile-async-indexing
+               :index-command (projectile-doctor--index-command root vcs)
+               :git (projectile-doctor--executable "git" remote)
+               :fd (projectile-doctor--executable
+                    (ignore-errors (projectile-fd-executable-for root)) remote)
+               :rg (projectile-doctor--executable "rg" remote)
+               :git-use-fd projectile-git-use-fd
+               :caching projectile-enable-caching
+               :cache-time cache-time
+               :cache-age (and cache-time
+                               (- (projectile-time-seconds) cache-time))
+               :cache-expire projectile-files-cache-expire
+               :cache-file (and (projectile-persistent-cache-p)
+                                (not remote)
+                                (let ((file (projectile-project-cache-file root)))
+                                  (and (file-exists-p file) file)))
+               :dirconfig-file (projectile-dirconfig-file)
+               ;; The uncached parser, so the doctor doesn't seed the
+               ;; dirconfig cache as a side effect of looking.
+               :dirconfig (ignore-errors
+                            (projectile--parse-dirconfig-file-uncached))
+               :ignore-patterns ignore-patterns
+               :ensure-patterns (ignore-errors (projectile--ensure-patterns root))
+               :excluded-entries (unless remote
+                                   (projectile-doctor--excluded-entries
+                                    root ignore-patterns))
+               :projectile-mode (bound-and-true-p projectile-mode))
+         (projectile-doctor--file-info root remote))))))
+
+
+;;;; Doctor findings
+
+(defun projectile-doctor--finding (severity message &optional action-label action)
+  "Return a finding of SEVERITY described by MESSAGE.
+SEVERITY is one of `ok\\=', `warn\\=' or `info\\='.
+
+ACTION, when given, is a function of no arguments that does something
+about the finding, and ACTION-LABEL is what to call it in the report.
+The report renders such a finding with a button, so the fix sits next to
+the diagnosis rather than in a sentence telling you what to go and type."
+  (list :severity severity :message message
+        :action-label action-label :action action))
+
+(defun projectile-doctor--enable-mode ()
+  "Turn `projectile-mode\\=' on."
+  (projectile-mode 1)
+  (projectile--message-always "`projectile-mode' enabled"))
+
+(defun projectile-doctor--set-option (option value)
+  "Set OPTION to VALUE for this session, the way Customize would.
+Says so, since the change doesn\\='t outlive Emacs unless it\\='s saved."
+  (customize-set-variable option value)
+  (projectile--message-always
+   "`%s' set to %s for this session - use %s to keep it"
+   option value (substitute-command-keys "\\[customize-save-variable]")))
+
+(defun projectile-doctor--visit-dirconfig ()
+  "Visit the current project\\='s dirconfig file, creating it if need be."
+  (find-file (expand-file-name projectile-dirconfig-file
+                               (projectile-acquire-root))))
+
+(defun projectile-doctor--findings (data)
+  "Return the list of findings for the report DATA.
+Each finding is a plist built by `projectile-doctor--finding\\='."
+  (let* ((remote (plist-get data :remote))
+         (method (plist-get data :indexing-method))
+         (external (memq method '(alien hybrid)))
+         (count (plist-get data :file-count))
+         (cfg (plist-get data :dirconfig))
+         (findings nil))
+    (push (if (eq (plist-get data :type) 'generic)
+              (projectile-doctor--finding
+               'warn (concat "Project type not detected (generic).  "
+                             "Register a type with "
+                             "`projectile-register-project-type', or set "
+                             "`projectile-project-type' in .dir-locals.el.")
+               "edit .dir-locals.el" #'projectile-edit-dir-locals)
+            (projectile-doctor--finding
+             'ok (format "Project type detected: %s." (plist-get data :type))))
+          findings)
+    (when (and external (eq (plist-get data :vcs) 'git))
+      (push (pcase (plist-get data :git)
+              ('present (projectile-doctor--finding
+                         'ok "git is installed and lists the project files."))
+              ('skipped (projectile-doctor--finding
+                         'info "git availability not checked (remote project)."))
+              (_ (projectile-doctor--finding
+                  'warn (concat "git is not installed, but this is a git "
+                                "project - indexing falls back to `find'."))))
+            findings))
+    (when external
+      (push (pcase (plist-get data :fd)
+              ('present (projectile-doctor--finding
+                         'ok "fd is installed and used for fast indexing."))
+              ('skipped (projectile-doctor--finding
+                         'info "fd availability not checked (remote project)."))
+              (_ (projectile-doctor--finding
+                  'warn (concat "fd is not installed.  Installing it speeds "
+                                "up indexing noticeably on large projects "
+                                "(see `projectile-git-use-fd')."))))
+            findings))
+    (when (and (eq (plist-get data :rg) 'missing) (not remote))
+      (push (projectile-doctor--finding
+             'info (concat "ripgrep (rg) is not installed; "
+                           "`projectile-ripgrep' and the fast path of the "
+                           "search reviewer need it."))
+            findings))
+    (when (integerp count)
+      (cond
+       ((>= count projectile-doctor--huge-project)
+        (push (projectile-doctor--finding
+               'warn (format (concat "%d files indexed.  That's a lot - "
+                                     "check the ignore rules above, a "
+                                     "build or vendor directory may be "
+                                     "sneaking in.")
+                             count)
+               "edit ignores" #'projectile-doctor--visit-dirconfig)
+              findings))
+       ((and (>= count projectile-doctor--large-project)
+             (not (plist-get data :caching)))
+        (push (projectile-doctor--finding
+               'warn (format (concat "%d files indexed with caching "
+                                     "disabled.  Set "
+                                     "`projectile-enable-caching' to t "
+                                     "(or `persistent').")
+                             count)
+               "enable caching"
+               (lambda () (projectile-doctor--set-option
+                           'projectile-enable-caching t)))
+              findings))
+       (t (push (projectile-doctor--finding
+                 'ok (format "%d files indexed." count))
+                findings))))
+    (when (and remote (not (plist-get data :async-indexing)))
+      (push (projectile-doctor--finding
+             'warn (concat "Remote project with `projectile-async-indexing' "
+                           "off - indexing will block Emacs for as long as "
+                           "the remote takes.")
+             "enable async indexing"
+             (lambda () (projectile-doctor--set-option
+                         'projectile-async-indexing t)))
+            findings))
+    (when cfg
+      (when (projectile-dirconfig-keep cfg)
+        (push (projectile-doctor--finding
+               'info (format (concat "The dirconfig has %d `+' keep "
+                                     "entries, so the project is "
+                                     "restricted to those subdirectories "
+                                     "- everything else is invisible to "
+                                     "Projectile.")
+                             (length (projectile-dirconfig-keep cfg)))
+               "open dirconfig" #'projectile-doctor--visit-dirconfig)
+              findings))
+      (when (projectile-dirconfig-prefixless-ignore cfg)
+        (push (projectile-doctor--finding
+               'warn (concat "The dirconfig has lines without a "
+                             "`+'/`-'/`!' prefix.  They are treated as "
+                             "ignore rules for now, but the implicit form "
+                             "is being phased out - prefix them with `-'.")
+               "open dirconfig" #'projectile-doctor--visit-dirconfig)
+              findings)))
+    (unless (plist-get data :projectile-mode)
+      (push (projectile-doctor--finding
+             'warn (concat "`projectile-mode' is not enabled; "
+                           "Projectile's keymap and mode line are "
+                           "inactive.")
+             "enable" #'projectile-doctor--enable-mode)
+            findings))
+    (nreverse findings)))
+
+;;;; Doctor report rendering
+
+(defun projectile-doctor--field (label value &optional face)
+  "Insert a LABEL/VALUE line into the report.
+VALUE is rendered with `%s'; a nil or empty one reads as \"n/a\".  FACE,
+when given, is applied to the value; otherwise a value that is an
+unambiguous status word is colored by its polarity."
+  (projectile--report-label label projectile-doctor--label-width)
+  (let* ((value (if (or (null value) (equal value "")) "n/a" (format "%s" value)))
+         (face (or face (projectile--report-status-face value))))
+    (insert (if face (projectile--report-face value face) value) "\n")))
+
+(defun projectile-doctor--section (title)
+  "Insert the header of a report section titled TITLE."
+  (projectile--report-section title))
+
+(defun projectile-doctor--list-field (label items)
+  "Insert LABEL followed by ITEMS, one per line."
+  (if (null items)
+      (projectile-doctor--field label "none")
+    (projectile-doctor--field label (car items))
+    (dolist (item (cdr items))
+      (insert (make-string projectile-doctor--label-width ?\s) item "\n"))))
+
+(defun projectile-doctor--executable-string (status)
+  "Return the human-readable rendering of an executable STATUS."
+  (pcase status
+    ('present "present")
+    ('missing "missing")
+    (_ "not checked (remote)")))
+
+(defun projectile-doctor--files-string (data)
+  "Return the file-count line of the report DATA."
+  (pcase (plist-get data :files-source)
+    ('cache (format "%d (from the cache)" (plist-get data :file-count)))
+    ('fresh (format "%d (fresh index, %.2fs - not cached by the doctor)"
+                    (plist-get data :file-count)
+                    (plist-get data :index-time)))
+    ('skipped "not indexed (skipped for a remote project)")
+    ('error (format "indexing failed: %s" (plist-get data :files-error)))
+    (_ "n/a")))
+
+(defun projectile-doctor--cache-string (data)
+  "Return the cache-state line of the report DATA."
+  (let ((age (plist-get data :cache-age))
+        (expire (plist-get data :cache-expire)))
+    (cond
+     ((null age) "not cached")
+     (expire (format "cached %ds ago (expires after %ds)" age expire))
+     (t (format "cached %ds ago (never expires)" age)))))
+
+(defun projectile-doctor--render-no-project (data)
+  "Render the no-project report for DATA."
+  (projectile-doctor--section "Project")
+  (projectile-doctor--field "directory" (plist-get data :dir))
+  (projectile-doctor--field "root" "none - not inside a project")
+  (projectile-doctor--list-field
+   "root functions tried"
+   (mapcar #'symbol-name projectile-project-root-functions))
+  (insert (format "
+None of the functions above found a project marker at or above that
+directory.  To make it a project, create a `%s' file in it (an
+empty one will do) or put it under version control.
+
+If you did that already and nothing changed, run
+`projectile-invalidate-cache' first - the \"not a project\" answer is
+cached too.
+" projectile-dirconfig-file)))
+
+(defun projectile-doctor--render (data)
+  "Render the report described by DATA into the current buffer."
+  (projectile--report-title "Projectile doctor report")
+  (insert (projectile--report-face
+           (format "projectile %s, Emacs %s, %s\n"
+                   projectile-version emacs-version system-type)
+           'projectile-report-label))
+  (if (null (plist-get data :root))
+      (projectile-doctor--render-no-project data)
+    (projectile-doctor--section "Project")
+    (projectile-doctor--field "root" (plist-get data :root)
+                              'projectile-report-value)
+    (projectile-doctor--field
+     "detected by"
+     (when-let* ((func (plist-get data :root-function)))
+       (concat (symbol-name func)
+               (if-let* ((marker (plist-get data :root-marker)))
+                   (format " (marker: %s)" marker)
+                 ""))))
+    (projectile-doctor--field
+     "name"
+     (format "%s (%s)" (plist-get data :name)
+             (if (eq (plist-get data :name-source) 'local-variable)
+                 "from the `projectile-project-name' variable"
+               (format "via %s" (plist-get data :name-source)))))
+    (projectile-doctor--field "remote" (or (plist-get data :remote)
+                                           "no (local project)"))
+    (projectile-doctor--field "projectile-mode"
+                              (if (plist-get data :projectile-mode) "on" "off"))
+
+    (projectile-doctor--section "Type")
+    (projectile-doctor--field
+     "type"
+     (format "%s (%s)" (plist-get data :type)
+             (if (eq (plist-get data :type-source) 'local-variable)
+                 "from the `projectile-project-type' variable"
+               "auto-detected")))
+    (projectile-doctor--field
+     "marker"
+     (when-let* ((marker (plist-get data :type-marker)))
+       (if (functionp marker)
+           (format "%s (predicate)" marker)
+         ;; Every position is a list of alternatives once normalized, so
+         ;; rendering doesn't need to know the shapes: `|' separates what
+         ;; would satisfy one position, a space separates the positions.
+         (mapconcat (lambda (alternatives) (string-join alternatives "|"))
+                    (projectile--marker-clauses marker)
+                    " "))))
+    (projectile-doctor--field "vcs" (plist-get data :vcs))
+    (when (eq (plist-get data :type) 'generic)
+      (insert "
+No registered project type matched this project's files.  That only
+affects the type-specific commands (compile, test, run, related files);
+file listing and search work regardless.  Set `projectile-project-type'
+in .dir-locals.el to pin a type, or register one with
+`projectile-register-project-type'.
+"))
+
+    (projectile-doctor--section "Indexing")
+    (projectile-doctor--field "method" (plist-get data :indexing-method))
+    (projectile-doctor--field "async indexing"
+                              (if (plist-get data :async-indexing) "on" "off"))
+    (projectile-doctor--field "command"
+                              (or (plist-get data :index-command)
+                                  "none (native indexing walks the tree in Lisp)"))
+    (projectile-doctor--field "git" (projectile-doctor--executable-string
+                                     (plist-get data :git)))
+    (projectile-doctor--field
+     "fd" (concat (projectile-doctor--executable-string (plist-get data :fd))
+                  (unless (plist-get data :git-use-fd)
+                    " (not used - projectile-git-use-fd is nil)")))
+    (projectile-doctor--field "rg" (projectile-doctor--executable-string
+                                    (plist-get data :rg)))
+
+    (projectile-doctor--section "Files")
+    (projectile-doctor--field "files" (projectile-doctor--files-string data))
+    (projectile-doctor--field "caching" (pcase (plist-get data :caching)
+                                          ('nil "disabled")
+                                          ('persistent "persistent")
+                                          (_ "enabled (this session)")))
+    (projectile-doctor--field "cache state" (projectile-doctor--cache-string data))
+    (projectile-doctor--field "cache file" (plist-get data :cache-file))
+
+    (projectile-doctor--section "Ignores")
+    (let ((cfg (plist-get data :dirconfig)))
+      (projectile-doctor--field
+       "dirconfig"
+       (if cfg
+           (format "%s (keep %d, ignore %d, ensure %d)"
+                   (plist-get data :dirconfig-file)
+                   (length (projectile-dirconfig-keep cfg))
+                   (length (projectile-dirconfig-ignore cfg))
+                   (length (projectile-dirconfig-ensure cfg)))
+         (format "%s (absent)" (plist-get data :dirconfig-file))))
+      (when cfg
+        (projectile-doctor--list-field "keep (+)"
+                                       (projectile-dirconfig-keep cfg))
+        (projectile-doctor--list-field "ignore (-)"
+                                       (projectile-dirconfig-ignore cfg))
+        (projectile-doctor--list-field "ensure (!)"
+                                       (projectile-dirconfig-ensure cfg))))
+    (projectile-doctor--list-field "ignore patterns"
+                                   (plist-get data :ignore-patterns))
+    (projectile-doctor--list-field "ensure patterns"
+                                   (plist-get data :ensure-patterns))
+    (projectile-doctor--list-field "ignored in root"
+                                   (if (plist-get data :remote)
+                                       (list "not checked (remote)")
+                                     (plist-get data :excluded-entries)))
+
+    (projectile-doctor--section "Findings")
+    ;; Anything that wants action first - a report is read top-down and a
+    ;; lone warning shouldn't be buried among a dozen `ok' lines.
+    (dolist (finding (projectile-doctor--sort-findings
+                      (projectile-doctor--findings data)))
+      (pcase-let* ((`(,label . ,face)
+                    (pcase (plist-get finding :severity)
+                      ('ok '("ok" . projectile-report-ok))
+                      ('warn '("warn" . projectile-report-warning))
+                      (_ '("info" . projectile-report-info)))))
+        (insert (projectile--report-face (format "%-6s" label) face)
+                (plist-get finding :message)
+                "\n")
+        ;; Put the fix under the diagnosis rather than describing it.  Its
+        ;; own line, because findings are long and a button at the end of
+        ;; one sits past the window edge where nobody will find it.
+        (when-let* ((action (plist-get finding :action)))
+          (insert (make-string 6 ?\s))
+          (insert-text-button (format "[%s]" (plist-get finding :action-label))
+                              'type 'projectile-doctor-action
+                              'projectile-action action)
+          (insert "\n"))))
+    (projectile--report-hints '((forward-button . "next action")
+                                (revert-buffer . "refresh")
+                                (projectile-report-copy . "copy")
+                                (outline-toggle-children . "fold")
+                                (quit-window . "quit")))))
+
+(defun projectile-doctor--sort-findings (findings)
+  "Return FINDINGS ordered warnings first, then info, then `ok'.
+The order within each severity is preserved, so the report still reads
+in the order the checks are written."
+  (let ((rank (lambda (finding)
+                (pcase (plist-get finding :severity) ('warn 0) ('ok 2) (_ 1)))))
+    (sort (copy-sequence findings)
+          (lambda (a b) (< (funcall rank a) (funcall rank b))))))
+
+(defun projectile-doctor--run-action (button)
+  "Run the action BUTTON stands for, then regenerate the report.
+Regenerating is the point: the finding that prompted the action should
+answer for itself once it has been dealt with."
+  (let ((action (button-get button 'projectile-action)))
+    (funcall action)
+    (when (derived-mode-p 'projectile-doctor-mode)
+      (revert-buffer))))
+
+(define-button-type 'projectile-doctor-action
+  'action #'projectile-doctor--run-action
+  'follow-link t
+  'help-echo "mouse-1, RET: do something about this finding")
+
+(defvar projectile-doctor-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "q") #'quit-window)
+    (define-key map (kbd "w") #'projectile-report-copy)
+    ;; The findings carry action buttons, so moving between them is worth
+    ;; a key - as is folding a report that runs past a screenful.
+    (define-key map (kbd "TAB") #'forward-button)
+    (define-key map (kbd "<backtab>") #'backward-button)
+    (define-key map (kbd "n") #'forward-button)
+    (define-key map (kbd "p") #'backward-button)
+    (define-key map (kbd "f") #'outline-toggle-children)
+    map)
+  "Keymap for `projectile-doctor-mode'.")
+
+(define-derived-mode projectile-doctor-mode special-mode "Projectile-Doctor"
+  "Major mode for the `projectile-doctor' report, read-only.
+
+The report is deliberately plain text, so it can be pasted verbatim into
+a bug report.  \\<projectile-doctor-mode-map>\\[revert-buffer] regenerates it for the same directory
+and \\[quit-window] buries it.
+
+\\{projectile-doctor-mode-map}"
+  (setq-local revert-buffer-function
+              (lambda (&rest _)
+                (projectile-doctor--report projectile-doctor--directory)))
+  (projectile--report-setup-outline))
+
+(defun projectile-doctor--report (dir)
+  "Render a doctor report for DIR into the report buffer and return it."
+  (let ((data (projectile-doctor--collect dir))
+        (buffer (get-buffer-create projectile-doctor-buffer-name)))
+    (with-current-buffer buffer
+      (let ((inhibit-read-only t))
+        (erase-buffer)
+        (projectile-doctor-mode)
+        (setq-local projectile-doctor--directory dir)
+        (projectile-doctor--render data)
+        (goto-char (point-min))))
+    buffer))
+
+;;;###autoload
+(defun projectile-doctor ()
+  "Diagnose Projectile's view of the current project.
+
+Open a read-only report describing the project Projectile sees around
+`default-directory': its root and which of
+`projectile-project-root-functions' found it, the detected project type
+and the marker that matched, the indexing method and the very command
+that will be run, which external tools are available, the file count and
+the cache state, the ignore rules in effect, and a list of findings -
+things that look fine and things worth changing.  Outside a project the
+report says so and explains how to mark the directory as one.
+
+The report is plain text, meant to be pasted into a bug report.
+
+The doctor doesn't change what it measures: it never populates and never
+invalidates the file cache.  A project that isn't cached yet is indexed
+with caching switched off and that run is reported as a fresh index.  On
+remote projects indexing and program lookups are skipped rather than
+risking a hang, and the report says so."
+  (interactive)
+  (pop-to-buffer (projectile-doctor--report default-directory)))
+
+;;; Project dashboard
+;;
+;; `projectile-dashboard' summarises a project in one buffer: what the
+;; project is, what its VCS thinks of it, the files you keep coming back
+;; to, and what you can run in it.  Every interesting entry is a button,
+;; so the dashboard doubles as a launcher - which is what makes it a
+;; usable `projectile-switch-project-action'.
+;;
+;; Being a switch action is what shapes the whole thing.  It runs right
+;; after a switch, on a project that is very likely cold, and it must not
+;; make the switch feel slow.  So it reports only what is already there:
+;; it never indexes, and an uncached project is shown as "not indexed
+;; yet" rather than indexed on the spot, which would both cost seconds
+;; and warm a cache the user didn't ask for.  Like the doctor, it neither
+;; populates nor invalidates `projectile-projects-cache'.
+;;
+;; The only external process it runs is git - two short commands, and
+;; only on a local git project.  `git rev-parse' is constant time, and
+;; `git status --porcelain' rides the index stat cache and doesn't
+;; recurse into untracked directories.  On a remote (TRAMP) project the
+;; VCS section is skipped outright: even `rev-parse' means a round-trip
+;; over the wire, and the frecency history isn't tracked for remote
+;; projects anyway, so the recent files list is empty there too.  Every
+;; other VCS degrades to its bare name.
+;;
+;; Lifecycle commands and tasks whose command is a function (the CMake
+;; preset pickers, say) are listed but never resolved - resolving one can
+;; pop up a prompt, and a dashboard that opens a minibuffer on project
+;; switch would be intolerable.
+
+(defcustom projectile-dashboard-sections
+  '(project links vcs recent tasks commands)
+  "The sections `projectile-dashboard' renders, in order.
+
+Each element is one of the symbols `project' (name, root, type, file and
+buffer counts, ignore rules), `links' (the project's README, changelog,
+license, manifest and Projectile configuration, when it has them), `vcs'
+\(version-control system, branch and working tree status), `recent' (the
+project files you visit most, ranked by frecency), `tasks' (the project's
+named tasks) and `commands' (the configured lifecycle commands).
+Dropping a section skips both its rendering and the work needed to fill
+it in."
+  :group 'projectile
+  :type '(repeat (choice (const :tag "Project summary" project)
+                         (const :tag "Notable files" links)
+                         (const :tag "Version control" vcs)
+                         (const :tag "Recently visited files" recent)
+                         (const :tag "Tasks" tasks)
+                         (const :tag "Lifecycle commands" commands)))
+  :package-version '(projectile . "3.3.0"))
+
+(defcustom projectile-dashboard-recent-files 10
+  "How many recently visited files `projectile-dashboard' lists.
+The files are ranked by frecency, so this is the length of the \"what
+was I working on\" list, not a history limit - that's
+`projectile-frecency-max-files'."
+  :group 'projectile
+  :type 'natnum
+  :package-version '(projectile . "3.3.0"))
+
+(defconst projectile-dashboard-buffer-name "*projectile-dashboard*"
+  "The name of the buffer `projectile-dashboard' renders into.")
+
+(defconst projectile-dashboard--label-width 16
+  "Column width of the labels in the dashboard.")
+
+(defvar-local projectile-dashboard--directory nil
+  "The directory the dashboard in this buffer was generated from.
+Used by the buffer's `revert-buffer' to regenerate it.")
+
+(defun projectile-dashboard--section-p (section)
+  "Return non-nil when SECTION is enabled in `projectile-dashboard-sections'."
+  (memq section projectile-dashboard-sections))
+
+;;;; Dashboard data collection
+
+(defun projectile-dashboard--git-status (root)
+  "Return the git branch and working tree counts for ROOT as a plist.
+
+The branch comes from a single `git rev-parse' and the counts from a
+single `git status --porcelain', which rides git's index stat cache and
+reports an untracked directory as one entry instead of recursing into
+it - that's what keeps this cheap enough to run on a project switch.
+The status is scoped to ROOT, since a project can sit below the git root
+\(see `projectile-project-vcs') and the whole repository's counts would
+be meaningless for it.
+
+The plist's `:vcs-state' is `ok' when both answered, `partial' when only
+the branch could be determined and `unavailable' when git couldn't
+answer at all (not installed, no commits yet, a broken repository)."
+  (if-let* ((branch (projectile--git
+                     root "rev-parse" "--abbrev-ref" "HEAD")))
+      (let ((status (projectile--git
+                     root "status" "--porcelain" "--untracked-files=normal"
+                     "--" "."))
+            (modified 0)
+            (untracked 0))
+        (dolist (line (and status (split-string status "\n" t)))
+          (if (string-prefix-p "??" line)
+              (setq untracked (1+ untracked))
+            (setq modified (1+ modified))))
+        (list :vcs-state (if status 'ok 'partial)
+              ;; `--abbrev-ref' prints "HEAD" itself when the head is
+              ;; detached, which would read as a branch named HEAD.
+              :branch (let ((branch (string-trim branch)))
+                        (if (equal branch "HEAD") "detached HEAD" branch))
+              :modified modified
+              :untracked untracked))
+    (list :vcs-state 'unavailable)))
+
+(defun projectile-dashboard--vcs-info (root vcs remote)
+  "Return the version control data for the project at ROOT as a plist.
+VCS is the project's version-control system and REMOTE is non-nil for a
+TRAMP root.  Only git is queried, and only locally, so the dashboard
+never blocks on a network round-trip or on a status command whose cost
+we can't vouch for; everything else degrades to the bare VCS name."
+  (cond
+   ((not (eq vcs 'git)) (list :vcs-state 'unsupported))
+   (remote (list :vcs-state 'skipped))
+   (t (projectile-dashboard--git-status root))))
+
+(defun projectile-dashboard--recent-files (root)
+  "Return ROOT's most frecent files, best first.
+This is the ranking `projectile-find-file' completion uses (see
+`projectile--frecency-score'), capped at
+`projectile-dashboard-recent-files'.
+
+The history outlives the files it tracks, so candidates are checked for
+existence as they are taken - which normally means one check per file
+shown, and never more than the tracked history.  The check is skipped
+for a remote ROOT, where each one would be a round-trip (nothing is
+tracked for remote projects in the first place)."
+  (when projectile-enable-frecency
+    (when-let* ((files (gethash root (projectile--frecency-data))))
+      (let ((now (projectile-time-seconds))
+            entries)
+        (maphash (lambda (file entry)
+                   (push (cons file (projectile--frecency-score entry now))
+                         entries))
+                 files)
+        (let ((ranked (seq-sort-by #'cdr #'> entries))
+              (remote (file-remote-p root))
+              (taken 0)
+              recent)
+          (while (and ranked (< taken projectile-dashboard-recent-files))
+            (let ((entry (pop ranked)))
+              (when (or remote
+                        (file-exists-p (expand-file-name (car entry) root)))
+                (push entry recent)
+                (setq taken (1+ taken)))))
+          (nreverse recent))))))
+
+(defun projectile-dashboard--commands (root)
+  "Return the configured lifecycle commands of the project at ROOT.
+Each element is a cons of the phase symbol and the shell command that
+would run, or nil for a phase whose command is a function.  Those are
+listed but never resolved: resolving one can pop up a prompt, which is
+the last thing to do in somebody's project-switch action."
+  (let ((compile-dir (or (ignore-errors (projectile-compilation-dir)) root)))
+    (delq nil
+          (mapcar
+           (lambda (descriptor)
+             (let ((phase (plist-get descriptor :name)))
+               (if (projectile--phase-command-dynamic-p phase)
+                   (cons phase nil)
+                 (when-let* ((command
+                              (ignore-errors
+                                (funcall (plist-get descriptor :command-fn)
+                                         compile-dir))))
+                   (cons phase command)))))
+           projectile--lifecycle-phases))))
+
+(defcustom projectile-dashboard-link-files
+  '("README" "CHANGELOG" "CONTRIBUTING" "LICENSE" "COPYING")
+  "Base names the dashboard offers as links when the project has them.
+
+Matched case-insensitively and ignoring any extension, so \"README\"
+finds `README.md\\=' as well as `README.rst\\='.  The project\\='s own marker
+file (`package.json\\=', `Cargo.toml\\=', ...) and its `.projectile\\=' are
+always offered when present, without being listed here."
+  :group 'projectile
+  :type '(repeat string)
+  :package-version '(projectile . "3.4.0"))
+
+(defun projectile-dashboard--links (root type)
+  "Return the notable files of the project at ROOT of TYPE, as relative names.
+Answered from a single listing of the project root, so this costs one
+`directory-files\\=' however many names are looked for."
+  (when-let* ((entries (projectile--directory-entry-set root)))
+    (let ((found nil))
+      ;; The docs a human looks for, matched without their extension.
+      (dolist (base projectile-dashboard-link-files)
+        (when-let* ((hit (seq-find
+                          (lambda (entry)
+                            (string-equal (downcase base)
+                                          (downcase (file-name-base entry))))
+                          (sort (hash-table-keys entries) #'string<))))
+          (push hit found)))
+      ;; The project\\='s own manifest, and its Projectile configuration.
+      (dolist (name (append (ensure-list
+                             (projectile-project-type-attribute type 'project-file))
+                            (list projectile-dirconfig-file ".dir-locals.el")))
+        (when (and (stringp name)
+                   (not (projectile--wildcard-p name))
+                   (gethash name entries)
+                   (not (member name found)))
+          (push name found)))
+      (nreverse found))))
+
+(defun projectile-dashboard--ignore-summary (root)
+  "Return a one-line summary of the ignore rules in effect at ROOT.
+Counting compiled patterns is free - they are derived from the
+configuration and the project\\='s dirconfig, both of which are cached."
+  (ignore-errors
+    (let* ((default-directory root)
+           ;; Reads the project's dirconfig; the parser caches it, so this
+           ;; costs nothing the rest of Projectile isn't paying anyway.
+           (cfg (projectile-parse-dirconfig-file))
+           (local (if cfg
+                      (+ (length (projectile-dirconfig-ignore cfg))
+                         (length (projectile-dirconfig-ensure cfg)))
+                    0))
+           (global (+ (length projectile-globally-ignored-directories)
+                      (length projectile-globally-ignored-files)
+                      (length projectile-globally-ignored-file-suffixes))))
+      (if (zerop local)
+          (format "%d global patterns" global)
+        (format "%d global patterns, %d from %s"
+                global local projectile-dirconfig-file)))))
+
+(defun projectile-dashboard--collect-in-project (dir root)
+  "Collect the dashboard data for the project at ROOT, reached from DIR.
+Must run in a buffer that has ROOT's directory-local variables applied -
+see `projectile-dashboard--collect', which arranges that."
+  (let* ((remote (file-remote-p root))
+         (vcs (ignore-errors (projectile-project-vcs root)))
+         (cached (gethash root projectile-projects-cache 'uncached))
+         (project (projectile-dashboard--section-p 'project)))
+    (append
+     (list :dir dir
+           :root root
+           :remote remote
+           :vcs vcs
+           :frecency projectile-enable-frecency
+           :name (when project (ignore-errors (projectile-project-name root)))
+           :type (when project (ignore-errors (projectile-project-type)))
+           :file-count (unless (eq cached 'uncached) (length cached))
+           :buffer-count (length (ignore-errors (projectile-project-buffers root)))
+           :links (when project
+                    (ignore-errors
+                      (projectile-dashboard--links
+                       root (ignore-errors (projectile-project-type)))))
+           :ignores (when project (projectile-dashboard--ignore-summary root))
+           :recent-files (when (projectile-dashboard--section-p 'recent)
+                           (projectile-dashboard--recent-files root))
+           :tasks (when (projectile-dashboard--section-p 'tasks)
+                    (ignore-errors (projectile-project-tasks nil root)))
+           :commands (when (projectile-dashboard--section-p 'commands)
+                       (ignore-errors (projectile-dashboard--commands root))))
+     (when (projectile-dashboard--section-p 'vcs)
+       (projectile-dashboard--vcs-info root vcs remote)))))
+
+(defun projectile-dashboard--collect (&optional dir)
+  "Collect the dashboard data for DIR's project as a plist.
+DIR defaults to `default-directory'.  Outside a project the plist has a
+nil `:root' and the rendering degrades to saying so.
+
+The data is collected in a temporary buffer with the project's
+directory-local variables applied, the way
+`projectile-switch-project-by-name' runs the switch action.  The project
+type, its tasks and its lifecycle commands can all come from
+.dir-locals.el, and the dashboard buffer has none of them - without this
+a refresh would quietly render a different project than the first pass.
+
+Nothing here indexes the project or touches the file cache: an uncached
+project is reported as not indexed rather than indexed on the spot, so
+that the dashboard stays cheap enough to be a
+`projectile-switch-project-action'."
+  (let* ((dir (or dir default-directory))
+         (root (ignore-errors (projectile-project-root dir))))
+    (if (null root)
+        (list :dir dir :root nil)
+      (with-temp-buffer
+        (setq default-directory root)
+        (hack-dir-local-variables-non-file-buffer)
+        (projectile-dashboard--collect-in-project dir root)))))
+
+
+;;;; Dashboard buttons
+
+(defun projectile-dashboard--visit-file (button)
+  "Visit the project file BUTTON stands for."
+  (find-file (expand-file-name (button-get button 'projectile-file)
+                               (button-get button 'projectile-root))))
+
+(defun projectile-dashboard--run-task (button)
+  "Run the project task BUTTON stands for."
+  (let ((default-directory (button-get button 'projectile-root)))
+    (projectile--run-task (button-get button 'projectile-task)
+                          (button-get button 'projectile-command)
+                          nil)))
+
+(defun projectile-dashboard--run-command (button)
+  "Run the lifecycle command BUTTON stands for."
+  (let ((default-directory (button-get button 'projectile-root)))
+    (call-interactively (button-get button 'projectile-command))))
+
+(defun projectile-dashboard--open-vc (button)
+  "Open the VC interface of the project BUTTON stands for."
+  (projectile-vc (button-get button 'projectile-root)))
+
+(defun projectile-dashboard--open-dired (button)
+  "Open the root of the project BUTTON stands for in Dired."
+  (dired (button-get button 'projectile-root)))
+
+(defun projectile-dashboard--index (button)
+  "Index the project BUTTON stands for, then refresh the dashboard."
+  (let ((root (button-get button 'projectile-root)))
+    (projectile-index-project-async root)
+    (projectile--message-always
+     "Indexing %s - press %s to refresh when it finishes"
+     root (substitute-command-keys "\\[revert-buffer]"))))
+
+(define-button-type 'projectile-dashboard-file
+  'action #'projectile-dashboard--visit-file
+  'follow-link t
+  'help-echo "mouse-1, RET: visit this file")
+
+(define-button-type 'projectile-dashboard-task
+  'action #'projectile-dashboard--run-task
+  'follow-link t
+  'help-echo "mouse-1, RET: run this task")
+
+(define-button-type 'projectile-dashboard-command
+  'action #'projectile-dashboard--run-command
+  'follow-link t
+  'help-echo "mouse-1, RET: run this command")
+
+(define-button-type 'projectile-dashboard-vc
+  'action #'projectile-dashboard--open-vc
+  'follow-link t
+  'help-echo "mouse-1, RET: open the project's VC interface")
+
+(define-button-type 'projectile-dashboard-dired
+  'action #'projectile-dashboard--open-dired
+  'follow-link t
+  'help-echo "mouse-1, RET: open the project root in Dired")
+
+(define-button-type 'projectile-dashboard-index
+  'action #'projectile-dashboard--index
+  'follow-link t
+  'help-echo "mouse-1, RET: index this project in the background")
+
+
+;;;; Dashboard rendering
+
+(defun projectile-dashboard--label (label)
+  "Insert LABEL padded out to the dashboard's label column."
+  (projectile--report-label label projectile-dashboard--label-width))
+
+(defun projectile-dashboard--field (label value &optional face)
+  "Insert a LABEL/VALUE line into the dashboard.
+VALUE is rendered with `%s'; a nil or empty one reads as \"n/a\".  FACE,
+when given, is applied to the value."
+  (projectile-dashboard--label label)
+  (let ((value (if (or (null value) (equal value "")) "n/a" (format "%s" value))))
+    (insert (if face (projectile--report-face value face) value) "\n")))
+
+(defun projectile-dashboard--section (title)
+  "Insert the header of a dashboard section titled TITLE."
+  (projectile--report-section title))
+
+(defun projectile-dashboard--button (label type root &rest properties)
+  "Insert a button labelled LABEL of button TYPE for the project at ROOT.
+PROPERTIES are any additional button properties, as a plist."
+  (apply #'insert-text-button label
+         'type type 'projectile-root root properties))
+
+(defun projectile-dashboard--entry (label type root &rest properties)
+  "Insert an indented list entry button, padded to the value column.
+LABEL, TYPE, ROOT and PROPERTIES are as in `projectile-dashboard--button'."
+  (insert "  ")
+  (apply #'projectile-dashboard--button label type root properties)
+  (insert (make-string (max 1 (- projectile-dashboard--label-width
+                                 2 (length label)))
+                       ?\s)))
+
+(defun projectile-dashboard--phase-command (phase)
+  "Return the interactive command running lifecycle PHASE.
+The lifecycle commands are named after their phase by construction (see
+`projectile--lifecycle-phases')."
+  (intern (format "projectile-%s-project" phase)))
+
+(defun projectile-dashboard--render-project (data)
+  "Render DATA's project summary."
+  (let ((root (plist-get data :root)))
+    (projectile-dashboard--section "Project")
+    (projectile-dashboard--field "name" (plist-get data :name))
+    (projectile-dashboard--label "root")
+    (projectile-dashboard--button root 'projectile-dashboard-dired root)
+    (insert "\n")
+    (projectile-dashboard--field "type" (plist-get data :type)
+                                 'projectile-report-value)
+    (projectile-dashboard--label "files")
+    (if-let* ((count (plist-get data :file-count)))
+        (insert (format "%d (cached)\n" count))
+      ;; The dashboard never indexes on its own - but it can offer to.
+      (insert "not indexed yet  ")
+      (projectile-dashboard--button "[index now]" 'projectile-dashboard-index root)
+      (insert "\n"))
+    (when-let* ((buffers (plist-get data :buffer-count)))
+      (unless (zerop buffers)
+        (projectile-dashboard--field "buffers" (format "%d open" buffers))))
+    (when-let* ((ignores (plist-get data :ignores)))
+      (projectile-dashboard--field "ignores" ignores))
+    (when (plist-get data :remote)
+      (projectile-dashboard--field "remote" (plist-get data :remote)))))
+
+(defun projectile-dashboard--render-vcs (data)
+  "Render DATA's version control summary."
+  (let ((root (plist-get data :root))
+        (vcs (plist-get data :vcs)))
+    (projectile-dashboard--section "Version control")
+    (projectile-dashboard--field "vcs" vcs)
+    (pcase (plist-get data :vcs-state)
+      ((and (or 'ok 'partial) state)
+       (projectile-dashboard--label "branch")
+       (projectile-dashboard--button (plist-get data :branch)
+                                     'projectile-dashboard-vc root)
+       (insert "\n")
+       (let ((modified (plist-get data :modified))
+             (untracked (plist-get data :untracked)))
+         (projectile-dashboard--field
+          "status"
+          (if (eq state 'partial)
+              "unavailable"
+            (format "%d modified, %d untracked" modified untracked))
+          (unless (eq state 'partial)
+            (if (and (zerop modified) (zerop untracked))
+                'projectile-report-ok
+              'projectile-report-warning)))))
+      ('skipped
+       (projectile-dashboard--field "status" "not checked (remote project)"))
+      ('unavailable
+       (projectile-dashboard--field "status" "unavailable (no commits yet?)"))
+      (_
+       (unless (memq vcs '(nil none))
+         (projectile-dashboard--label "vc")
+         (projectile-dashboard--button "open the VC interface"
+                                       'projectile-dashboard-vc root)
+         (insert "\n"))))))
+
+(defun projectile-dashboard--render-links (data)
+  "Render DATA's notable project files."
+  (let ((root (plist-get data :root))
+        (links (plist-get data :links)))
+    (projectile-dashboard--section "Notable files")
+    (if (null links)
+        (insert "  none found\n")
+      (dolist (file links)
+        (projectile-dashboard--entry file 'projectile-dashboard-file root
+                                     'projectile-file file)
+        (insert "\n")))))
+
+(defun projectile-dashboard--render-recent (data)
+  "Render DATA's recently visited files."
+  (let ((root (plist-get data :root))
+        (files (plist-get data :recent-files)))
+    (projectile-dashboard--section "Recent files")
+    (if (null files)
+        (insert (if (plist-get data :frecency)
+                    "Nothing visited in this project yet.\n"
+                  "Frecency tracking is off (`projectile-enable-frecency').\n"))
+      (dolist (entry files)
+        (insert "  ")
+        (projectile-dashboard--button (car entry) 'projectile-dashboard-file
+                                      root 'projectile-file (car entry))
+        (insert "\n")))))
+
+(defun projectile-dashboard--render-tasks (data)
+  "Render DATA's project tasks."
+  (let ((root (plist-get data :root))
+        (tasks (plist-get data :tasks)))
+    (projectile-dashboard--section "Tasks")
+    (if (null tasks)
+        (insert "No tasks defined for this project (see `projectile-tasks').\n")
+      (dolist (task tasks)
+        (projectile-dashboard--entry (car task) 'projectile-dashboard-task root
+                                     'projectile-task (car task)
+                                     'projectile-command (cdr task))
+        (insert (if (stringp (cdr task)) (cdr task) "computed at run time")
+                "\n")))))
+
+(defun projectile-dashboard--render-commands (data)
+  "Render DATA's configured lifecycle commands."
+  (let ((root (plist-get data :root))
+        (commands (plist-get data :commands)))
+    (projectile-dashboard--section "Lifecycle commands")
+    (if (null commands)
+        (insert "No lifecycle commands configured for this project type.\n")
+      (dolist (entry commands)
+        (projectile-dashboard--entry
+         (symbol-name (car entry)) 'projectile-dashboard-command root
+         'projectile-command (projectile-dashboard--phase-command (car entry)))
+        (insert (or (cdr entry) "computed at run time") "\n")))))
+
+(defun projectile-dashboard--render-no-project (data)
+  "Render the no-project dashboard for DATA."
+  (projectile-dashboard--section "Project")
+  (projectile-dashboard--field "directory" (plist-get data :dir))
+  (projectile-dashboard--field "root" "none - not inside a project")
+  (insert (format "
+There's no project around that directory, so there's nothing to show.
+Create a `%s' file in it (an empty one will do) or put it under version
+control, then press `g' to try again.
+
+`M-x projectile-doctor' lists the root functions that were tried and
+explains why none of them claimed the directory.
+" projectile-dirconfig-file)))
+
+(defun projectile-dashboard--render (data)
+  "Render the dashboard described by DATA into the current buffer."
+  (projectile--report-title
+   (if-let* ((name (plist-get data :name)))
+       (format "Projectile dashboard: %s" name)
+     "Projectile dashboard"))
+  (if (null (plist-get data :root))
+      (projectile-dashboard--render-no-project data)
+    (dolist (section projectile-dashboard-sections)
+      (pcase section
+        ('project (projectile-dashboard--render-project data))
+        ('links (projectile-dashboard--render-links data))
+        ('vcs (projectile-dashboard--render-vcs data))
+        ('recent (projectile-dashboard--render-recent data))
+        ('tasks (projectile-dashboard--render-tasks data))
+        ('commands (projectile-dashboard--render-commands data))))
+    (projectile--report-hints '((push-button . "act on entry")
+                                (forward-button . "next entry")
+                                (revert-buffer . "refresh")
+                                (projectile-report-copy . "copy")
+                                (quit-window . "bury")))))
+
+
+;;;; The dashboard buffer
+
+(defvar projectile-dashboard-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "TAB") #'forward-button)
+    (define-key map (kbd "<backtab>") #'backward-button)
+    ;; The buffer is a list of entries, so moving by entry is more useful
+    ;; here than the `next-line'/`previous-line' these shadow.
+    (define-key map (kbd "n") #'forward-button)
+    (define-key map (kbd "p") #'backward-button)
+    (define-key map (kbd "w") #'projectile-report-copy)
+    map)
+  "Keymap for `projectile-dashboard-mode'.")
+
+(define-derived-mode projectile-dashboard-mode special-mode "Projectile-Dashboard"
+  "Major mode for the `projectile-dashboard' buffer, read-only.
+
+The files, tasks, lifecycle commands and the current branch are buttons.
+RET acts on the one at point; \\<projectile-dashboard-mode-map>\\[forward-button] and \\[backward-button] (also `n' and `p')
+move between them.  \\[revert-buffer] refreshes the dashboard and \\[quit-window] buries it.
+
+\\{projectile-dashboard-mode-map}"
+  (setq-local revert-buffer-function
+              (lambda (&rest _)
+                (projectile-dashboard--refresh
+                 projectile-dashboard--directory)))
+  (projectile--report-setup-outline))
+
+(defun projectile-dashboard--refresh (dir)
+  "Render the dashboard for DIR into the dashboard buffer and return it."
+  (let ((data (projectile-dashboard--collect dir))
+        (buffer (get-buffer-create projectile-dashboard-buffer-name)))
+    (with-current-buffer buffer
+      (let ((inhibit-read-only t))
+        (erase-buffer)
+        (projectile-dashboard-mode)
+        (setq-local projectile-dashboard--directory dir)
+        ;; The buffer is reused across projects, so point it at the one it
+        ;; currently shows - otherwise commands invoked in it (and the mode
+        ;; line) would keep targeting whichever project opened it first.
+        (setq-local default-directory (or (plist-get data :root) dir))
+        (projectile-dashboard--render data)
+        (goto-char (point-min))))
+    buffer))
+
+;;;###autoload
+(defun projectile-dashboard ()
+  "Show a dashboard summarising the project around `default-directory'.
+
+The dashboard covers the project's name, root, type and file count, the
+version control system with the current branch and how many files are
+modified or untracked, the project files you visit most (ranked by
+frecency, the same ranking `projectile-find-file' uses), the project's
+tasks and its configured lifecycle commands.
+
+Everything worth acting on is a button, so the buffer doubles as a
+launcher: RET on a file visits it, on a task or a lifecycle command runs
+it, on the branch opens the project's VC interface, and on the root
+opens it in Dired.  TAB moves to the next button, `g' refreshes the
+dashboard and `q' buries it.
+
+The command is cheap on purpose, so that it can serve as a
+`projectile-switch-project-action'.  It never indexes the project and
+never touches the file cache - an uncached project is reported as not
+indexed rather than indexed on the spot.  The branch and status come
+from two short git commands, run only on a local git project; on a
+remote project, or under any other VCS, that section says so instead.
+
+`projectile-dashboard-sections' controls which sections are shown."
+  (interactive)
+  (pop-to-buffer (projectile-dashboard--refresh default-directory)))
+
+
+;;; Projectile Minor mode
+
+(defvar-local projectile--mode-line nil
+  "The mode-line lighter Projectile shows in this buffer.
+Seeded from `projectile-mode-line-prefix' and replaced by
+`projectile-update-mode-line' once the buffer's project is known.  A
+buffer that never gets that far keeps the prefix: that is every buffer
+when `projectile-dynamic-mode-line' is off, and remote ones always,
+since both update paths skip them to avoid a TRAMP round trip.")
+
+(defcustom projectile-mode-line-prefix
+  " Projectile"
+  "Mode line lighter prefix for Projectile.
+It's used by `projectile-default-mode-line'
+when using dynamic mode line lighter and is the only
+thing shown in the mode line otherwise.
+
+Change the value via Customize or `setopt' so it takes effect
+immediately; a plain `setq' only reaches buffers whose lighter is
+recomputed later, and none are when `projectile-dynamic-mode-line' is
+off."
+  :group 'projectile
+  :type 'string
+  :set (lambda (symbol value)
+         (set-default symbol value)
+         ;; The lighter is a variable, not a computation, so buffers that
+         ;; never recompute it - all of them with `projectile-dynamic-mode-line'
+         ;; off - would otherwise keep displaying whatever the prefix was
+         ;; when Projectile loaded.
+         (setq-default projectile--mode-line value)
+         (force-mode-line-update t))
+  :package-version '(projectile . "0.12.0"))
+
+(defcustom projectile-show-menu t
+  "Controls whether to display Projectile's menu."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "2.6.0"))
+
+(defun projectile-default-mode-line ()
+  "Report project name and type in the modeline."
+  (let ((project-name (projectile-project-name))
+        (project-type (projectile-project-type)))
+    (format "%s[%s%s]"
+            projectile-mode-line-prefix
+            (or project-name "-")
+            (if project-type
+                (format ":%s" project-type)
+              ""))))
+
+(defun projectile-update-mode-line ()
+  "Update the Projectile mode-line."
+  (let ((mode-line (funcall projectile-mode-line-function)))
+    (setq projectile--mode-line mode-line))
+  (force-mode-line-update))
+
+(defun projectile-update-mode-line-on-window-change ()
+  "Update the mode-line when the window configuration changes.
+This ensures the mode-line is correct in non-file buffers like
+Magit that don't trigger `find-file-hook'."
+  (when projectile-dynamic-mode-line
+    (unless (file-remote-p default-directory)
+      (projectile-update-mode-line))))
+
+(defvar projectile-command-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "4 4") #'projectile-other-window-command)
+    (define-key map (kbd "4 a") #'projectile-find-other-file-other-window)
+    (define-key map (kbd "4 b") #'projectile-switch-to-buffer-other-window)
+    (define-key map (kbd "4 C-o") #'projectile-display-buffer)
+    (define-key map (kbd "4 d") #'projectile-find-dir-other-window)
+    (define-key map (kbd "4 D") #'projectile-dired-other-window)
+    (define-key map (kbd "4 f") #'projectile-find-file-other-window)
+    (define-key map (kbd "4 g") #'projectile-find-file-dwim-other-window)
+    (define-key map (kbd "4 j") #'projectile-find-file-of-kind-other-window)
+    (define-key map (kbd "4 p") #'projectile-switch-project-other-window)
+    (define-key map (kbd "4 t") #'projectile-find-implementation-or-test-other-window)
+    (define-key map (kbd "5 5") #'projectile-other-frame-command)
+    (define-key map (kbd "5 a") #'projectile-find-other-file-other-frame)
+    (define-key map (kbd "5 b") #'projectile-switch-to-buffer-other-frame)
+    (define-key map (kbd "5 d") #'projectile-find-dir-other-frame)
+    (define-key map (kbd "5 D") #'projectile-dired-other-frame)
+    (define-key map (kbd "5 f") #'projectile-find-file-other-frame)
+    (define-key map (kbd "5 g") #'projectile-find-file-dwim-other-frame)
+    (define-key map (kbd "5 j") #'projectile-find-file-of-kind-other-frame)
+    (define-key map (kbd "5 p") #'projectile-switch-project-other-frame)
+    (define-key map (kbd "5 t") #'projectile-find-implementation-or-test-other-frame)
+    (define-key map (kbd "!") #'projectile-run-shell-command-in-root)
+    (define-key map (kbd "&") #'projectile-run-async-shell-command-in-root)
+    (define-key map (kbd "?") #'projectile-find-references)
+    (define-key map (kbd "a") #'projectile-find-other-file)
+    (define-key map (kbd "A") #'projectile-add-known-project)
+    (define-key map (kbd "b") #'projectile-switch-to-buffer)
+    ;; project-scoped bookmarks (see `projectile-bookmark-set')
+    (define-key map (kbd "B s") #'projectile-bookmark-set)
+    (define-key map (kbd "B j") #'projectile-bookmark-jump)
+    (define-key map (kbd "B d") #'projectile-bookmark-delete)
+    (define-key map (kbd "C") #'projectile-find-changed-file)
+    (define-key map (kbd "d") #'projectile-find-dir)
+    (define-key map (kbd "D") #'projectile-dired)
+    (define-key map (kbd "e") #'projectile-recentf)
+    (define-key map (kbd "E") #'projectile-edit-dir-locals)
+    (define-key map (kbd "f") #'projectile-find-file)
+    (define-key map (kbd "g") #'projectile-find-file-dwim)
+    (define-key map (kbd "F") #'projectile-find-file-in-known-projects)
+    ;; the h key is reserved for helm-projectile
+    ;; the binding below will be added when helm-projectile is enabled
+    ;; (define-key projectile-command-map (kbd "h") #'helm-projectile)
+    (define-key map (kbd "i") #'projectile-invalidate-cache)
+    (define-key map (kbd "I") #'projectile-ibuffer)
+    (define-key map (kbd "j") #'projectile-find-file-of-kind)
+    (define-key map (kbd "J") #'projectile-toggle-related-file)
+    (define-key map (kbd "k") #'projectile-kill-buffers)
+    (define-key map (kbd "l") #'projectile-find-file-in-directory)
+    (define-key map (kbd "m") #'projectile-dispatch)
+    ;; projects related to this one, in other repositories - the keys
+    ;; mirror the project-wide ones a level down, as `c m' does
+    (define-key map (kbd "n p") #'projectile-switch-sibling-project)
+    (define-key map (kbd "n f") #'projectile-find-file-in-sibling-projects)
+    (define-key map (kbd "n s") #'projectile-search-in-sibling-projects)
+    (define-key map (kbd "n b") #'projectile-switch-to-buffer-in-sibling-projects)
+    (define-key map (kbd "n o") #'projectile-multi-occur-in-sibling-projects)
+    (define-key map (kbd "n t") #'projectile-todos-in-sibling-projects)
+    (define-key map (kbd "o") #'projectile-multi-occur)
+    (define-key map (kbd "p") #'projectile-switch-project)
+    (define-key map (kbd "q") #'projectile-switch-open-project)
+    (define-key map (kbd "r") #'projectile-replace)
+    (define-key map (kbd "R") #'projectile-replace-review)
+    (define-key map (kbd "u") #'projectile-replace-undo)
+    (define-key map (kbd "s s") #'projectile-search)
+    (define-key map (kbd "s g") #'projectile-grep)
+    (define-key map (kbd "s r") #'projectile-ripgrep)
+    (define-key map (kbd "s a") #'projectile-ag)
+    (define-key map (kbd "s x") #'projectile-find-references)
+    (define-key map (kbd "s R") #'projectile-search-review)
+    (define-key map (kbd "s X") #'projectile-search-regexp-review)
+    (define-key map (kbd "s t") #'projectile-todos)
+    (define-key map (kbd "S") #'projectile-save-project-buffers)
+    (define-key map (kbd "t") #'projectile-toggle-between-implementation-and-test)
+    (define-key map (kbd "T") #'projectile-find-test-file)
+    (define-key map (kbd "v") #'projectile-vc)
+    ;; per-project sessions (see `projectile-session-mode')
+    (define-key map (kbd "w s") #'projectile-session-save)
+    (define-key map (kbd "w S") #'projectile-session-save-all)
+    (define-key map (kbd "w r") #'projectile-session-restore)
+    (define-key map (kbd "w R") #'projectile-session-restore-all)
+    (define-key map (kbd "w f") #'projectile-session-forget)
+    (define-key map (kbd "w b") #'projectile-session-switch-to-buffer)
+    ;; other checkouts of the current project's repository
+    (define-key map (kbd "W") #'projectile-switch-worktree)
+    ;; project lifecycle external commands
+    (define-key map (kbd "c o") #'projectile-configure-project)
+    (define-key map (kbd "c c") #'projectile-compile-project)
+    (define-key map (kbd "c p") #'projectile-package-project)
+    (define-key map (kbd "c i") #'projectile-install-project)
+    (define-key map (kbd "c t") #'projectile-test-project)
+    (define-key map (kbd "c .") #'projectile-run-test-at-point)
+    (define-key map (kbd "c r") #'projectile-run-project)
+    ;; subprojects (see `projectile-project-subprojects') - the keys
+    ;; mirror the project-wide ones a level down
+    (define-key map (kbd "c m f") #'projectile-find-file-in-subproject)
+    (define-key map (kbd "c m o") #'projectile-configure-subproject)
+    (define-key map (kbd "c m c") #'projectile-compile-subproject)
+    (define-key map (kbd "c m t") #'projectile-test-subproject)
+    (define-key map (kbd "c m i") #'projectile-install-subproject)
+    (define-key map (kbd "c m p") #'projectile-package-subproject)
+    (define-key map (kbd "c m r") #'projectile-run-subproject)
+    (define-key map (kbd "c x") #'projectile-run-task)
+    (define-key map (kbd "c X") #'projectile-repeat-last-task)
+    ;; integration with utilities
+    (define-key map (kbd "x r") #'projectile-run)
+    (define-key map (kbd "x e") #'projectile-run-eshell)
+    (define-key map (kbd "x i") #'projectile-run-ielm)
+    (define-key map (kbd "x t") #'projectile-run-term)
+    (define-key map (kbd "x s") #'projectile-run-shell)
+    (define-key map (kbd "x g") #'projectile-run-gdb)
+    (define-key map (kbd "x v") #'projectile-run-vterm)
+    (define-key map (kbd "x 4 v") #'projectile-run-vterm-other-window)
+    (define-key map (kbd "x x") #'projectile-run-eat)
+    (define-key map (kbd "x 4 x") #'projectile-run-eat-other-window)
+    (define-key map (kbd "x G") #'projectile-run-ghostel)
+    (define-key map (kbd "x 4 G") #'projectile-run-ghostel-other-window)
+    ;; misc
+    (define-key map (kbd "H") #'projectile-doctor)
+    (define-key map (kbd "P") #'projectile-dashboard)
+    (define-key map (kbd "z") #'projectile-cache-current-file)
+    (define-key map (kbd "<left>") #'projectile-previous-project-buffer)
+    (define-key map (kbd "<right>") #'projectile-next-project-buffer)
+    (define-key map (kbd "ESC") #'projectile-project-buffers-other-buffer)
+    map)
+  "Keymap for Projectile commands after `projectile-keymap-prefix'.")
+(fset 'projectile-command-map projectile-command-map)
+
+;;; Prefix commands for other-window/-frame display
+;;
+;; These are Projectile's take on the Emacs 28 `other-window-prefix' and
+;; `other-frame-prefix' commands (C-x 4 4 and C-x 5 5): they arrange for
+;; the buffer displayed by the *next* command to go to another window or
+;; frame, and additionally keep `projectile-command-map' active for the
+;; next key sequence.  So `4 4 f' (after the Projectile prefix) opens a
+;; project file in another window, and the same trick works for commands
+;; that never had a dedicated -other-window variant, e.g. `4 4 x s' runs
+;; a project shell in another window.
+
+(defun projectile--obey-display-actions-for-next-command ()
+  "Cover `switch-to-buffer'-based commands in the next-command override.
+Emacs 29 made `display-buffer-override-next-command' temporarily enable
+`switch-to-buffer-obey-display-actions', so that the display override
+armed by `other-window-prefix'/`other-frame-prefix' also applies to
+commands that display buffers with `switch-to-buffer'.  Emacs 28 lacks
+that, so arrange for it here: enable the option and restore the user's
+setting once the next command is done (mirroring the teardown conditions
+of window.el's own post-command function)."
+  (when (< emacs-major-version 29)
+    (let* ((obey-display switch-to-buffer-obey-display-actions)
+           (command this-command)
+           (depth (minibuffer-depth))
+           (restore (make-symbol "projectile--restore-obey-display-actions")))
+      (setq switch-to-buffer-obey-display-actions t)
+      (fset restore
+            (lambda ()
+              ;; Stay armed while reading from the minibuffer and while
+              ;; the command that armed us is still in progress.
+              (unless (or (> (minibuffer-depth) depth)
+                          (eq this-command command))
+                (setq switch-to-buffer-obey-display-actions obey-display)
+                (remove-hook 'post-command-hook restore))))
+      (add-hook 'post-command-hook restore))))
+
+;;;###autoload
+(defun projectile-other-window-command ()
+  "Show the buffer of the next Projectile command in another window.
+
+Set up the next command's buffer to be displayed in a new window (via
+`other-window-prefix') and keep `projectile-command-map' active for the
+next key sequence, so any Projectile key typed right after this command
+gets the other-window treatment without re-typing the Projectile
+prefix.  Any non-Projectile command works as well; commands that use
+`switch-to-buffer' are covered too, by temporarily enabling
+`switch-to-buffer-obey-display-actions'."
+  (interactive)
+  (other-window-prefix)
+  (projectile--obey-display-actions-for-next-command)
+  (set-transient-map projectile-command-map)
+  (message "Display buffer of next (Projectile) command in a new window..."))
+
+;;;###autoload
+(defun projectile-other-frame-command ()
+  "Show the buffer of the next Projectile command in another frame.
+
+Set up the next command's buffer to be displayed in a new frame (via
+`other-frame-prefix') and keep `projectile-command-map' active for the
+next key sequence, so any Projectile key typed right after this command
+gets the other-frame treatment without re-typing the Projectile
+prefix.  Any non-Projectile command works as well; commands that use
+`switch-to-buffer' are covered too, by temporarily enabling
+`switch-to-buffer-obey-display-actions'."
+  (interactive)
+  (other-frame-prefix)
+  (projectile--obey-display-actions-for-next-command)
+  (set-transient-map projectile-command-map)
+  (message "Display buffer of next (Projectile) command in a new frame..."))
+
+;;; projectile-dispatch modifiers
+;;
+;; `projectile-dispatch' (below) exposes a handful of command modifiers as
+;; transient switches: `--invalidate-cache', `--regexp', `--new-process' and a
+;; `--display' target (this window / other window / other frame).  Several
+;; Projectile commands already honour these via a prefix argument, and the
+;; other-window/-frame behaviour is provided by dedicated command variants.
+;; The switches are wired to the commands through the thin wrapper commands
+;; generated below: each reads the active switches and either dispatches to the
+;; right display variant or sets `current-prefix-arg' accordingly.
+;;
+;; These wrappers are plain commands (usable without `transient' loaded, they
+;; simply see no active switches then), so they're defined unconditionally,
+;; unlike the transient prefix itself.
+
+(defun projectile-dispatch--args ()
+  "Return the active `projectile-dispatch' switches, or nil.
+Only returns switches while a transient suffix is executing; a wrapper
+invoked outside the menu sees none."
+  (and (bound-and-true-p transient-current-command)
+       (transient-args transient-current-command)))
+
+(defmacro projectile-dispatch--define (name command &rest props)
+  "Define command NAME as a `projectile-dispatch' wrapper around COMMAND.
+PROPS is a plist of:
+  :other-window CMD, :other-frame CMD  command variants selected by the
+                                       `--display' switch;
+  :prefix-arg SWITCH                   set `current-prefix-arg' to a plain
+                                       prefix when SWITCH is active."
+  (declare (indent 2))
+  (let ((ow (plist-get props :other-window))
+        (of (plist-get props :other-frame))
+        (switch (plist-get props :prefix-arg)))
+    `(defun ,name ()
+       ,(format "A `projectile-dispatch' wrapper honouring its modifier switches.\nRuns `%s'." command)
+       (interactive)
+       (let* ((projectile-dispatch--switches (projectile-dispatch--args))
+              (current-prefix-arg
+               ,(if switch
+                    `(if (member ,switch projectile-dispatch--switches)
+                         '(4)
+                       current-prefix-arg)
+                  'current-prefix-arg))
+              (command
+               ,(if ow
+                    `(cond
+                      ((member "--display=frame" projectile-dispatch--switches) #',of)
+                      ((member "--display=window" projectile-dispatch--switches) #',ow)
+                      (t #',command))
+                  `#',command)))
+         (call-interactively command)))))
+
+;; Display + cache
+(projectile-dispatch--define projectile-dispatch-find-file projectile-find-file
+  :other-window projectile-find-file-other-window
+  :other-frame projectile-find-file-other-frame
+  :prefix-arg "--invalidate-cache")
+(projectile-dispatch--define projectile-dispatch-find-file-dwim projectile-find-file-dwim
+  :other-window projectile-find-file-dwim-other-window
+  :other-frame projectile-find-file-dwim-other-frame
+  :prefix-arg "--invalidate-cache")
+(projectile-dispatch--define projectile-dispatch-find-dir projectile-find-dir
+  :other-window projectile-find-dir-other-window
+  :other-frame projectile-find-dir-other-frame
+  :prefix-arg "--invalidate-cache")
+;; Display only
+(projectile-dispatch--define projectile-dispatch-find-other-file projectile-find-other-file
+  :other-window projectile-find-other-file-other-window
+  :other-frame projectile-find-other-file-other-frame)
+(projectile-dispatch--define projectile-dispatch-find-file-of-kind projectile-find-file-of-kind
+  :other-window projectile-find-file-of-kind-other-window
+  :other-frame projectile-find-file-of-kind-other-frame)
+(projectile-dispatch--define projectile-dispatch-dired projectile-dired
+  :other-window projectile-dired-other-window
+  :other-frame projectile-dired-other-frame)
+(projectile-dispatch--define projectile-dispatch-switch-to-buffer projectile-switch-to-buffer
+  :other-window projectile-switch-to-buffer-other-window
+  :other-frame projectile-switch-to-buffer-other-frame)
+(projectile-dispatch--define projectile-dispatch-switch-project projectile-switch-project
+  :other-window projectile-switch-project-other-window
+  :other-frame projectile-switch-project-other-frame)
+(projectile-dispatch--define projectile-dispatch-impl-or-test
+    projectile-toggle-between-implementation-and-test
+  :other-window projectile-find-implementation-or-test-other-window
+  :other-frame projectile-find-implementation-or-test-other-frame)
+;; Cache only
+(projectile-dispatch--define projectile-dispatch-find-test-file projectile-find-test-file
+  :prefix-arg "--invalidate-cache")
+;; Regexp search
+(projectile-dispatch--define projectile-dispatch-search projectile-search
+  :prefix-arg "--regexp")
+(projectile-dispatch--define projectile-dispatch-ag projectile-ag
+  :prefix-arg "--regexp")
+(projectile-dispatch--define projectile-dispatch-ripgrep projectile-ripgrep
+  :prefix-arg "--regexp")
+
+(defun projectile-dispatch-search-review ()
+  "Reviewable search honouring the `--regexp' and `--case-sensitive' switches.
+`--regexp' runs the Emacs-regexp reviewer, `--case-sensitive' seeds the
+search case-sensitive; all can still be flipped (`x'/`c'/`w') in the results
+buffer."
+  (interactive)
+  (let ((switches (projectile-dispatch--args)))
+    (let ((case-fold-search (if (member "--case-sensitive" switches)
+                                nil case-fold-search))
+          (projectile-search-whole-word
+           (if (member "--word" switches) t projectile-search-whole-word)))
+      (call-interactively (if (member "--regexp" switches)
+                              #'projectile-search-regexp-review
+                            #'projectile-search-review)))))
+
+(defun projectile-dispatch-search-siblings ()
+  "Sibling-project search honouring the search switches.
+`--regexp' reads the term as an Emacs regexp, `--case-sensitive' seeds
+the search case-sensitive and `--word' matches whole words; all can still
+be flipped (`x'/`c'/`w') in the results buffer."
+  (interactive)
+  (let* ((switches (projectile-dispatch--args))
+         (case-fold-search (if (member "--case-sensitive" switches)
+                               nil case-fold-search))
+         (projectile-search-whole-word
+          (if (member "--word" switches) t projectile-search-whole-word)))
+    (projectile-search-in-sibling-projects (and (member "--regexp" switches) t))))
+
+(defun projectile-dispatch-replace-review ()
+  "Reviewable replace honouring the `--regexp' and `--case-sensitive' switches.
+Like `projectile-dispatch-search-review', but for the replace reviewer."
+  (interactive)
+  (let ((switches (projectile-dispatch--args)))
+    (let ((case-fold-search (if (member "--case-sensitive" switches)
+                                nil case-fold-search))
+          (projectile-search-whole-word
+           (if (member "--word" switches) t projectile-search-whole-word)))
+      (call-interactively (if (member "--regexp" switches)
+                              #'projectile-replace-regexp-review
+                            #'projectile-replace-review)))))
+;; New process
+(projectile-dispatch--define projectile-dispatch-run projectile-run
+  :prefix-arg "--new-process")
+(projectile-dispatch--define projectile-dispatch-run-eshell projectile-run-eshell
+  :prefix-arg "--new-process")
+(projectile-dispatch--define projectile-dispatch-run-shell projectile-run-shell
+  :prefix-arg "--new-process")
+(projectile-dispatch--define projectile-dispatch-run-ielm projectile-run-ielm
+  :prefix-arg "--new-process")
+(projectile-dispatch--define projectile-dispatch-run-term projectile-run-term
+  :prefix-arg "--new-process")
+(projectile-dispatch--define projectile-dispatch-run-vterm projectile-run-vterm
+  :prefix-arg "--new-process")
+(projectile-dispatch--define projectile-dispatch-run-eat projectile-run-eat
+  :prefix-arg "--new-process")
+(projectile-dispatch--define projectile-dispatch-run-ghostel projectile-run-ghostel
+  :prefix-arg "--new-process")
+
+;; `projectile-dispatch' is a transient menu mirroring `projectile-command-map'.
+;; The menu keys deliberately match the `projectile-command-map' bindings.
+;; The transient prefix is defined lazily: loading `transient' costs a few
+;; milliseconds and some memory for every session, while the menu is only
+;; needed once invoked.  `projectile-dispatch' below is a stub that loads
+;; `transient', evaluates the real definition (replacing itself), and
+;; re-invokes it; `transient' is required at compile time (see the top of
+;; the file) so the macro still expands during byte-compilation.
+(defun projectile--dispatch-define ()
+  "Define the `projectile-dispatch' transient prefix, replacing the stub."
+  (transient-define-prefix projectile-dispatch ()
+    "Dispatch menu for Projectile commands.
+
+The switches in the Modifiers group tweak how the commands below run:
+`--invalidate-cache' rebuilds the file cache first (file/dir commands),
+`--regexp' searches for a regexp (the ag/ripgrep search and the
+reviewable search/replace), `--case-sensitive' seeds the reviewable
+search/replace case-sensitive, `--word' makes it match whole words,
+`--new-process' starts a fresh process
+(shells), and `--display' opens the result in another window or frame
+(file/buffer/project commands)."
+    ["Modifiers"
+     ("-i" "invalidate cache" "--invalidate-cache")
+     ("-r" "regexp search" "--regexp")
+     ("-c" "case-sensitive search" "--case-sensitive")
+     ("-w" "whole-word search" "--word")
+     ("-n" "new process" "--new-process")
+     ("-d" "display in" "--display="
+      :class transient-switches
+      :argument-format "--display=%s"
+      :argument-regexp "\\(--display=\\(window\\|frame\\)\\)"
+      :choices ("window" "frame"))]
+    [["Find"
+      ("f" "file" projectile-dispatch-find-file)
+      ("g" "file dwim" projectile-dispatch-find-file-dwim)
+      ("a" "other file" projectile-dispatch-find-other-file)
+      ("l" "file in dir" projectile-find-file-in-directory)
+      ("C" "changed file" projectile-find-changed-file)
+      ("F" "file in known projects" projectile-find-file-in-known-projects)
+      ("nf" "file in sibling projects" projectile-find-file-in-sibling-projects)
+      ("d" "dir" projectile-dispatch-find-dir)
+      ("D" "dired" projectile-dispatch-dired)
+      ("e" "recentf" projectile-recentf)
+      ("E" "edit .dir-locals" projectile-edit-dir-locals)
+      ("T" "test file" projectile-dispatch-find-test-file)
+      ("t" "toggle impl/test" projectile-dispatch-impl-or-test)
+      ("j" "file of kind" projectile-dispatch-find-file-of-kind)
+      ("J" "toggle related" projectile-toggle-related-file)]
+     ["Buffers"
+      ("b" "switch buffer" projectile-dispatch-switch-to-buffer)
+      ("nb" "buffer in siblings" projectile-switch-to-buffer-in-sibling-projects)
+      ("C-o" "display buffer" projectile-display-buffer)
+      ("I" "ibuffer" projectile-ibuffer)
+      ("k" "kill buffers" projectile-kill-buffers)
+      ("S" "save buffers" projectile-save-project-buffers)]
+     ["Bookmarks"
+      ("Bs" "set bookmark" projectile-bookmark-set)
+      ("Bj" "jump to bookmark" projectile-bookmark-jump)
+      ("Bd" "delete bookmark" projectile-bookmark-delete)]
+     ["Search / Replace"
+      ("ss" "search" projectile-dispatch-search)
+      ("sg" "grep" projectile-grep)
+      ("sr" "ripgrep" projectile-dispatch-ripgrep)
+      ("sa" "ag" projectile-dispatch-ag)
+      ("sx" "references" projectile-find-references)
+      ("sR" "search (review)" projectile-dispatch-search-review)
+      ("ns" "search siblings" projectile-dispatch-search-siblings)
+      ("no" "multi-occur siblings" projectile-multi-occur-in-sibling-projects)
+      ("nt" "todos in siblings" projectile-todos-in-sibling-projects)
+      ("st" "todos" projectile-todos)
+      ("o" "multi-occur" projectile-multi-occur)
+      ("r" "replace" projectile-replace)
+      ("R" "replace (review)" projectile-dispatch-replace-review)
+      ("u" "undo last replace" projectile-replace-undo)]]
+    [["Project"
+      ("p" "switch project" projectile-dispatch-switch-project)
+      ("q" "switch open project" projectile-switch-open-project)
+      ("W" "switch worktree" projectile-switch-worktree)
+      ("np" "switch sibling project" projectile-switch-sibling-project)
+      ("A" "add known project" projectile-add-known-project)
+      ("v" "vc" projectile-vc)
+      ("P" "dashboard" projectile-dashboard)
+      ("H" "doctor" projectile-doctor)]
+     ["Lifecycle"
+      ("cc" "compile" projectile-compile-project)
+      ("ct" "test" projectile-test-project)
+      ("c." "test at point" projectile-run-test-at-point)
+      ("cr" "run" projectile-run-project)
+      ("co" "configure" projectile-configure-project)
+      ("ci" "install" projectile-install-project)
+      ("cp" "package" projectile-package-project)
+      ("cx" "run task" projectile-run-task)
+      ("cX" "repeat last task" projectile-repeat-last-task)]
+     ["Subproject"
+      ("cmf" "find file" projectile-find-file-in-subproject)
+      ("cmc" "compile" projectile-compile-subproject)
+      ("cmt" "test" projectile-test-subproject)
+      ("cmr" "run" projectile-run-subproject)
+      ("cmo" "configure" projectile-configure-subproject)
+      ("cmi" "install" projectile-install-subproject)
+      ("cmp" "package" projectile-package-subproject)]
+     ["Shells / Run"
+      ("xr" "run" projectile-dispatch-run)
+      ("xe" "eshell" projectile-dispatch-run-eshell)
+      ("xs" "shell" projectile-dispatch-run-shell)
+      ("xt" "term" projectile-dispatch-run-term)
+      ("xi" "ielm" projectile-dispatch-run-ielm)
+      ("xg" "gdb" projectile-run-gdb)
+      ("xv" "vterm" projectile-dispatch-run-vterm)
+      ("xx" "eat" projectile-dispatch-run-eat)
+      ("xG" "ghostel" projectile-dispatch-run-ghostel)
+      ("!" "shell command" projectile-run-shell-command-in-root)
+      ("&" "async shell command" projectile-run-async-shell-command-in-root)]
+     ["Session"
+      ("ws" "save session" projectile-session-save)
+      ("wS" "save all sessions" projectile-session-save-all)
+      ("wr" "restore session" projectile-session-restore)
+      ("wR" "restore all sessions" projectile-session-restore-all)
+      ("wf" "forget session" projectile-session-forget)
+      ("wb" "switch project buffer" projectile-session-switch-to-buffer)]
+     ["Cache"
+      ("i" "invalidate cache" projectile-invalidate-cache)
+      ("z" "cache current file" projectile-cache-current-file)]]))
+
+(defun projectile-dispatch ()
+  "Dispatch menu for Projectile commands.
+
+The switches in the Modifiers group tweak how the commands below run:
+`--invalidate-cache' rebuilds the file cache first (file/dir commands),
+`--regexp' searches for a regexp (the ag/ripgrep search and the
+reviewable search/replace), `--case-sensitive' seeds the reviewable
+search/replace case-sensitive, `--word' makes it match whole words,
+`--new-process' starts a fresh process
+(shells), and `--display' opens the result in another window or frame
+(file/buffer/project commands)."
+  (interactive)
+  ;; Loading `transient' is deferred until the menu is first used; this
+  ;; stub is replaced by the real transient prefix on that first call.
+  (require 'transient)
+  (projectile--dispatch-define)
+  (call-interactively 'projectile-dispatch))
+
+;; Mark the stub as a transient prefix so `projectile--transient-command-p'
+;; recognizes it before the first invocation replaces the stub (and this
+;; property) with the real definition.
+(put 'projectile-dispatch 'transient--prefix t)
+
+(defvar projectile-mode-map
+  (let ((map (make-sparse-keymap)))
+    (when projectile-keymap-prefix
+      (define-key map projectile-keymap-prefix 'projectile-command-map))
+    (easy-menu-define projectile-mode-menu map
+      "Menu for Projectile"
+      '("Projectile" :visible projectile-show-menu
+        ("Find..."
+         ["Find file" projectile-find-file]
+         ["Find file (all, ignoring rules)" projectile-find-file-all]
+         ["Find file in known projects" projectile-find-file-in-known-projects]
+         ["Find file in sibling projects" projectile-find-file-in-sibling-projects]
+         ["Find test file" projectile-find-test-file]
+         ["Find directory" projectile-find-dir]
+         ["Find file in directory" projectile-find-file-in-directory]
+         ["Find file in subproject" projectile-find-file-in-subproject]
+         ["Find changed file" projectile-find-changed-file]
+         ["Find other file" projectile-find-other-file]
+         ["Find file of kind" projectile-find-file-of-kind]
+         ["Jump between implementation file and test file" projectile-toggle-between-implementation-and-test]
+         ["Toggle between related files" projectile-toggle-related-file])
+        ("Buffers"
+         ["Switch to buffer" projectile-switch-to-buffer]
+         ["Switch to buffer in sibling projects" projectile-switch-to-buffer-in-sibling-projects]
+         ["Kill project buffers" projectile-kill-buffers]
+         ["Save project buffers" projectile-save-project-buffers]
+         ["Recent files" projectile-recentf]
+         ["Previous buffer" projectile-previous-project-buffer]
+         ["Next buffer" projectile-next-project-buffer])
+        ("Bookmarks"
+         ["Set bookmark" projectile-bookmark-set]
+         ["Jump to bookmark" projectile-bookmark-jump]
+         ["Delete bookmark" projectile-bookmark-delete])
+        ("Projects"
+         ["Add known project" projectile-add-known-project]
+         ["Add and switch to project" projectile-add-and-switch-project]
+         "--"
+         ["Switch to project" projectile-switch-project]
+         ["Switch to open project" projectile-switch-open-project]
+         ["Switch to sibling project" projectile-switch-sibling-project]
+         ["Switch to worktree" projectile-switch-worktree]
+         "--"
+         ["Discover projects in directory" projectile-discover-projects-in-directory]
+         ["Discover projects in search path" projectile-discover-projects-in-search-path]
+         ["Clear known projects" projectile-clear-known-projects]
+         ["Reset known projects" projectile-reset-known-projects]
+         "--"
+         ["Open project in dired" projectile-dired]
+         "--"
+         "--"
+         ["Cache current file" projectile-cache-current-file]
+         ["Invalidate cache" projectile-invalidate-cache]
+         ["Invalidate all project caches" projectile-invalidate-cache-all]
+         ["Discard project root cache" projectile-discard-root-cache]
+         "--"
+         ["Toggle project wide read-only" projectile-toggle-project-read-only]
+         ["Edit .dir-locals.el" projectile-edit-dir-locals]
+         ["Project info" projectile-project-info]
+         ["Project dashboard" projectile-dashboard]
+         ["Project diagnostics (doctor)" projectile-doctor])
+        ("Search"
+         ["Search (default backend)" projectile-search]
+         ["Search with grep" projectile-grep]
+         ["Search with ripgrep" projectile-ripgrep]
+         ["Search with ag" projectile-ag]
+         ["Search in sibling projects" projectile-search-in-sibling-projects]
+         ["TODOs in sibling projects" projectile-todos-in-sibling-projects]
+         ["Multi-occur in sibling projects" projectile-multi-occur-in-sibling-projects]
+         ["Project TODOs (review)" projectile-todos]
+         ["Replace in project" projectile-replace]
+         ["Replace in project (review)" projectile-replace-review]
+         ["Replace regexp in project (review)" projectile-replace-regexp-review]
+         ["Undo last project-wide replace" projectile-replace-undo
+          :enable projectile-replace--last-apply]
+         ["Multi-occur in project" projectile-multi-occur]
+         ["Find references in project" projectile-find-references])
+        ("Run..."
+         ["Run (default backend)" projectile-run]
+         "--"
+         ["Run shell" projectile-run-shell]
+         ["Run eshell" projectile-run-eshell]
+         ["Run ielm" projectile-run-ielm]
+         ["Run term" projectile-run-term]
+         ["Run vterm" projectile-run-vterm]
+         ["Run eat" projectile-run-eat]
+         ["Run ghostel" projectile-run-ghostel]
+         "--"
+         ["Run GDB" projectile-run-gdb])
+        ("Build"
+         ["Configure project" projectile-configure-project]
+         ["Compile project" projectile-compile-project]
+         ["Test project" projectile-test-project]
+         ["Run test at point" projectile-run-test-at-point]
+         ["Install project" projectile-install-project]
+         ["Package project" projectile-package-project]
+         ["Run project" projectile-run-project]
+         "--"
+         ["Run task" projectile-run-task]
+         ["Repeat last task" projectile-repeat-last-task]
+         "--"
+         ["Configure subproject" projectile-configure-subproject]
+         ["Compile subproject" projectile-compile-subproject]
+         ["Test subproject" projectile-test-subproject]
+         ["Install subproject" projectile-install-subproject]
+         ["Package subproject" projectile-package-subproject]
+         ["Run subproject" projectile-run-subproject]
+         "--"
+         ["Repeat last build command" projectile-repeat-last-command])
+        ("Session"
+         ["Save session" projectile-session-save]
+         ["Save all sessions" projectile-session-save-all]
+         ["Restore session" projectile-session-restore]
+         ["Restore all sessions" projectile-session-restore-all]
+         ["Forget session" projectile-session-forget]
+         "--"
+         ["Switch to project buffer" projectile-session-switch-to-buffer])
+        "--"
+        ["About" projectile-version]))
+    map)
+  "Keymap for Projectile mode.")
+
+(defun projectile-find-file-hook-function ()
+  "Called by `find-file-hook' when `projectile-mode' is on.
+
+For remote (TRAMP) buffers the slow operations are skipped: the
+mode-line update probes many project-type markers on cold cache.  The
+cheap operations - caching the visited file, registering the project as
+a known project, and the open-buffer-count cap - run regardless of
+remoteness; they were previously skipped only because the original
+blanket guard was overly broad."
+  (let ((remote (file-remote-p default-directory))
+        ;; Resolve the project root once and thread it through the
+        ;; sub-hooks, so a single `find-file' doesn't repeat the lookup.
+        (project-root (projectile-project-p)))
+    (projectile-maybe-limit-project-file-buffers project-root)
+    (when projectile-auto-update-cache
+      (projectile-cache-files-find-file-hook project-root))
+    (projectile-track-known-projects-find-file-hook project-root)
+    (projectile--maybe-run-project-changed-functions project-root)
+    (projectile--frecency-record project-root)
+    (unless remote
+      (when projectile-dynamic-mode-line
+        (projectile-update-mode-line)))))
+
+(defun projectile-maybe-limit-project-file-buffers (&optional project-root)
+  "Limit the opened file buffers for a project.
+
+The function simply kills the last buffer, as it's normally called
+when opening new files.  PROJECT-ROOT defaults to the current project."
+  (when projectile-max-file-buffer-count
+    (let ((project-buffers (projectile-project-buffer-files project-root)))
+      (when (length> project-buffers projectile-max-file-buffer-count)
+        (kill-buffer (car (last project-buffers)))))))
+
+;;;; project.el integration
+;;
+;; Projectile will become the default provider for
+;; project.el project and project files lookup when
+;; projectile-mode is enabled.
+;;
+;; The integration can also be manually enabled like this:
+;;
+;; (add-hook 'project-find-functions #'project-projectile)
+;;
+;; See https://github.com/bbatsov/projectile/issues/1591 for
+;; more details.
+
+;; it's safe to require this directly, as it was added in Emacs 25.1
+(require 'project)
+
+;; Only define an override for project-root if the method exists.  For versions
+;; before emacs 28, project.el provided project-roots instead of project-root.
+(if (fboundp 'project-root)
+    (cl-defmethod project-root ((project (head projectile)))
+      (cdr project)))
+
+(cl-defmethod project-files ((project (head projectile)) &optional _dirs)
+  (let ((root (project-root project)))
+    ;; Make paths absolute and ignore the optional dirs argument,
+    ;; see https://github.com/bbatsov/projectile/issues/1591#issuecomment-896423965
+    ;; That's needed because Projectile uses relative paths for project files
+    ;; and project.el expects them to be absolute.
+    ;;
+    ;; Measured rather than feared: this is 4 ms for 50k files and 20 ms for
+    ;; 200k, a rounding error next to the listing it is prepending to.
+    ;; `expand-file-name' would be the obvious alternative and is 18 times
+    ;; slower, since it consults the filesystem's notion of the default
+    ;; directory; the paths here are already absolute once the root is on
+    ;; the front, so `concat' is both correct and the cheap option.
+    (mapcar (lambda (f)
+              (concat root f))
+            (projectile-project-files root))))
+
+(cl-defmethod project-name ((project (head projectile)))
+  (projectile-project-name (cdr project)))
+
+(cl-defmethod project-buffers ((project (head projectile)))
+  (projectile-project-buffers (cdr project)))
+
+(cl-defmethod project-ignores ((project (head projectile)) _dir)
+  "Return a list of glob patterns to ignore in PROJECT.
+
+The patterns are Projectile's own ignore patterns (see
+`projectile--ignore-patterns'), converted to the format project.el
+expects (see `project-ignores'): a pattern anchored at the project root
+is spelled with a leading `./' there, the rest match at any depth."
+  ;; PROJECT is Projectile's own `(projectile . root)' representation, so read
+  ;; the root straight from the cdr rather than going through `project-root'.
+  (mapcar #'projectile--project-el-ignore-glob
+          (projectile--project-ignore-globs (cdr project))))
+
+;;;###autoload
+(defun project-projectile (dir)
+  "Return Projectile project of form ('projectile . root-dir) for DIR."
+  (let ((root (projectile-project-root dir)))
+    (when root
+      (cons 'projectile root))))
+
+;;;###autoload
+(define-minor-mode projectile-mode
+  "Minor mode to assist project management and navigation.
+
+When called interactively, toggle `projectile-mode'.  With prefix
+ARG, enable `projectile-mode' if ARG is positive, otherwise disable
+it.
+
+When called from Lisp, enable `projectile-mode' if ARG is omitted,
+nil or positive.  If ARG is `toggle', toggle `projectile-mode'.
+Otherwise behave as if called interactively.
+
+\\{projectile-mode-map}"
+  :lighter projectile--mode-line
+  :keymap projectile-mode-map
+  :group 'projectile
+  :require 'projectile
+  :global t
+  (cond
+   (projectile-mode
+    (add-hook 'project-find-functions #'project-projectile)
+    (add-hook 'find-file-hook 'projectile-find-file-hook-function)
+    (add-hook 'projectile-find-dir-hook #'projectile-track-known-projects-find-file-hook t)
+    (add-hook 'dired-before-readin-hook #'projectile-track-known-projects-find-file-hook t)
+    (add-hook 'dired-before-readin-hook #'projectile--maybe-run-project-changed-functions t)
+    (add-hook 'kill-emacs-hook #'projectile--frecency-save)
+    (when projectile-dynamic-mode-line
+      (add-hook 'window-configuration-change-hook #'projectile-update-mode-line-on-window-change))
+    (add-hook 'kill-emacs-hook #'projectile--teardown-all-watches)
+    ;; Disabling the mode tears the watches down, so re-enabling it has to
+    ;; re-arm them - a warm cache would otherwise never trigger a cache fill.
+    (projectile--watch-all-cached-projects)
+    (advice-add 'compilation-find-file :around #'compilation-find-file-projectile-find-compilation-buffer)
+    (advice-add 'delete-file :before #'delete-file-projectile-remove-from-cache))
+   (t
+    (remove-hook 'project-find-functions #'project-projectile)
+    (remove-hook 'find-file-hook #'projectile-find-file-hook-function)
+    (remove-hook 'projectile-find-dir-hook #'projectile-track-known-projects-find-file-hook)
+    (remove-hook 'dired-before-readin-hook #'projectile-track-known-projects-find-file-hook)
+    (remove-hook 'dired-before-readin-hook #'projectile--maybe-run-project-changed-functions)
+    (projectile--frecency-save)
+    (remove-hook 'kill-emacs-hook #'projectile--frecency-save)
+    (remove-hook 'window-configuration-change-hook #'projectile-update-mode-line-on-window-change)
+    (remove-hook 'kill-emacs-hook #'projectile--teardown-all-watches)
+    (projectile--teardown-all-watches)
+    ;; Forget the last-seen project so re-enabling the mode fires
+    ;; `projectile-project-changed-functions' on the first re-entry.
+    (setq projectile--current-project nil)
+    (advice-remove 'compilation-find-file #'compilation-find-file-projectile-find-compilation-buffer)
+    (advice-remove 'delete-file #'delete-file-projectile-remove-from-cache))))
+
+;;; savehist-mode - When `savehist-mode' is t, projectile-project-command-history will be saved.
+;; See https://github.com/bbatsov/projectile/issues/1637 for more details
+(defvar savehist-additional-variables nil)
+
+(defun projectile--register-savehist-variables ()
+  "Add Projectile's persistable history variables to savehist."
+  (add-to-list 'savehist-additional-variables 'projectile-project-command-history)
+  ;; So `projectile-repeat-last-task' survives restarts, like
+  ;; `projectile-repeat-last-command' does via the command history.
+  (add-to-list 'savehist-additional-variables 'projectile-last-task-map))
+
+(if (bound-and-true-p savehist-loaded)
+    (projectile--register-savehist-variables)
+  (add-hook 'savehist-mode-hook #'projectile--register-savehist-variables))
+
+;;; Per-project sessions
+;;
+;; `projectile-session-mode' gives every project its own `tab-bar' tab.
+;; Each project tab is a native tab-bar tab, so it keeps its own window
+;; layout for free, and is bound to a project by stamping the project
+;; root onto a tab parameter (`projectile-root').  Switching to a project
+;; selects its existing tab (restoring that project's layout) when one is
+;; open, or otherwise opens a fresh, project-named tab and populates it.
+;;
+;; This milestone only deals with live, in-session tabs; persisting the
+;; tabs to disk and restoring them across restarts is planned for a
+;; follow-up, hence the deliberately storage-neutral naming.
+
+;; `tab-bar' is built in since Emacs 27.1, comfortably below Projectile's
+;; floor, so it's always available.
+(require 'tab-bar)
+
+(defcustom projectile-session-default-action 'projectile-find-file
+  "Action used to populate a project's freshly created tab.
+Called with no arguments by `projectile-session-switch-project-action'
+when a project is switched to for the first time (and thus gets a new
+tab).  Any command that takes no arguments will do."
+  :group 'projectile
+  :type 'function
+  :package-version '(projectile . "3.2.0"))
+
+(defcustom projectile-session-tab-name-function 'projectile-session-default-tab-name
+  "Function computing the tab name for a project.
+It is called with the project root and must return a string.  The
+default, `projectile-session-default-tab-name', names the tab after the
+project and disambiguates same-named projects with a parent-directory
+component."
+  :group 'projectile
+  :type 'function
+  :package-version '(projectile . "3.2.0"))
+
+(defcustom projectile-session-directory
+  (locate-user-emacs-file "projectile-sessions/")
+  "Directory under which per-project session files are stored.
+Each project's saved layout and buffers live in a single file here, named
+after the project (see `projectile-session--file')."
+  :group 'projectile
+  :type 'directory
+  :package-version '(projectile . "3.4.0"))
+
+(defcustom projectile-session-restore-on-switch t
+  "Whether switching to a project restores its saved session.
+When non-nil and the project being switched to has no open tab but does
+have a session saved on disk, `projectile-session-switch-project-action'
+restores that session (recreating its buffers and layout) instead of
+running `projectile-session-default-action'."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.2.0"))
+
+(defcustom projectile-session-restore-on-startup nil
+  "Whether to reopen every saved project session when Emacs starts.
+When non-nil and `projectile-session-mode' is enabled, a handler added to
+`emacs-startup-hook' runs `projectile-session-restore-all' once, reopening
+each saved project into its own tab after your init files have finished
+loading.  Because that hook is installed on mode enable and
+`emacs-startup-hook' fires only once, right after startup, enabling the
+mode *after* Emacs has finished starting never triggers a restore."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.2.0"))
+
+(defcustom projectile-session-autosave nil
+  "Whether `projectile-session-mode' saves sessions automatically.
+When non-nil, the outgoing project's session is saved when you switch
+away from it, and every open project's session is saved when Emacs exits.
+Degenerate layouts with no serializable buffer are skipped."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "3.2.0"))
+
+(defcustom projectile-session-buffer-serializers
+  '((dired-mode
+     . (projectile-session--serialize-dired
+        . projectile-session--deserialize-dired))
+    (t
+     . (projectile-session--serialize-file
+        . projectile-session--deserialize-file)))
+  "How buffers are turned into readable records and back.
+
+An alist whose entries have the shape (KEY SERIALIZE . DESERIALIZE),
+i.e. KEY mapped to a (SERIALIZE . DESERIALIZE) pair:
+
+KEY selects which buffers an entry handles.  It is one of:
+- a major-mode symbol - matches buffers whose mode is (derived from) it;
+- the symbol t - matches any buffer visiting a file (keep it last, so
+  mode-specific handlers win);
+- a predicate function of one argument (the buffer).
+
+SERIALIZE is called with the buffer current and returns a readable record
+\(any `read'-able sexp), or nil to decline the buffer.  DESERIALIZE is
+called with such a record and must recreate and return the live buffer,
+or nil when it cannot (e.g. the file is gone), in which case the buffer's
+window is dropped on restore rather than erroring.
+
+The first entry whose KEY matches and whose SERIALIZE returns non-nil wins.
+Buffers no entry handles are skipped, not saved.
+
+Handlers keyed by a major-mode symbol or by t round-trip cleanly: restore
+dispatches on that key.  A record produced by a predicate-keyed handler is
+stored under the buffer's major mode and, on restore, is handled by the
+first predicate-keyed entry that has a DESERIALIZE; so if you register
+several predicate handlers, give them distinct major-mode keys instead when
+they must restore differently.  To persist e.g. Magit or eshell buffers,
+add an entry keyed by their major mode, for instance:
+
+  (add-to-list \\='projectile-session-buffer-serializers
+               \\='(magit-status-mode
+                 . (my-serialize-magit . my-deserialize-magit)))"
+  :group 'projectile
+  :type '(alist :key-type sexp :value-type sexp)
+  :package-version '(projectile . "3.2.0"))
+
+(defconst projectile-session--format-version 1
+  "Format version stamped into session files written on disk.
+Session files whose version does not match are ignored on restore.")
+
+(defvar projectile-session--saved-switch-action nil
+  "The `projectile-switch-project-action' saved when the mode was enabled.
+Restored when `projectile-session-mode' is disabled.")
+
+(defvar projectile-session--closing-tab nil
+  "A project tab currently being closed, or nil.
+Bound while re-simplifying survivor names from
+`projectile-session--on-tab-close' (the pre-close hook, where the closing
+tab is still present in the tab list) so `projectile-session--project-tabs'
+omits it and its name no longer counts as a clash.")
+
+(declare-function dired-noselect "dired")
+
+(defun projectile-session--current-tab ()
+  "Return the current tab of the selected frame."
+  (assq 'current-tab (tab-bar-tabs)))
+
+(defun projectile-session--tab-root (tab)
+  "Return the project root stamped on TAB, or nil when it holds no project."
+  (alist-get 'projectile-root (cdr tab)))
+
+(defun projectile-session--set-tab-root (tab root)
+  "Stamp TAB with project ROOT."
+  (setf (alist-get 'projectile-root (cdr tab)) root))
+
+(defun projectile-session--set-tab-name (tab name)
+  "Give TAB the explicit NAME.
+`explicit-name' is set so `tab-bar' doesn't overwrite NAME with its own
+automatic naming.  NAME is also recorded in the `projectile-auto-name'
+tab parameter so `projectile-session--refresh-tab-names' can tell a name
+Projectile assigned from one the user set with `tab-bar-rename-tab'."
+  (setf (alist-get 'name (cdr tab)) name)
+  (setf (alist-get 'explicit-name (cdr tab)) t)
+  (setf (alist-get 'projectile-auto-name (cdr tab)) name))
+
+(defun projectile-session--same-root-p (a b)
+  "Return non-nil when project roots A and B denote the same directory.
+Identical paths match directly.  Otherwise local paths are compared with
+`file-equal-p' (so symlinks and abbreviations still match); remote paths
+never reach `file-equal-p', so an unconnected host doesn't trigger a
+TRAMP round-trip."
+  (and a b
+       (let ((a (file-name-as-directory a))
+             (b (file-name-as-directory b)))
+         (or (string-equal a b)
+             (and (not (or (file-remote-p a) (file-remote-p b)))
+                  (file-equal-p a b))))))
+
+(defun projectile-session--project-tabs ()
+  "Return the open tabs that are bound to a project.
+The tab held in `projectile-session--closing-tab' (one being closed) is
+omitted, so survivor names recomputed from the pre-close hook don't still
+treat the closing tab as an open clash."
+  (seq-filter (lambda (tab)
+                (and (not (eq tab projectile-session--closing-tab))
+                     (projectile-session--tab-root tab)))
+              (tab-bar-tabs)))
+
+(defun projectile-session--project-tab (root)
+  "Return the open tab bound to project ROOT, or nil when there is none."
+  (seq-find (lambda (tab)
+              (projectile-session--same-root-p
+               (projectile-session--tab-root tab) root))
+            (tab-bar-tabs)))
+
+(defun projectile-session--project-name (root)
+  "Return the project name for ROOT.
+Unlike `projectile-project-name', the name is always derived from ROOT
+via `projectile-project-name-function', so it stays correct while the
+dynamic `projectile-project-name' is bound during a project switch."
+  (funcall projectile-project-name-function root))
+
+(defun projectile-session--parent-components (root)
+  "Return ROOT's ancestor directory names, nearest parent first."
+  (let ((components (split-string (directory-file-name (expand-file-name root))
+                                  "/" t)))
+    ;; drop ROOT's own final component; reverse so the nearest parent leads
+    (reverse (butlast components))))
+
+(defun projectile-session--name-with-parents (root name depth)
+  "Return NAME prefixed with ROOT's DEPTH nearest parent directories.
+With DEPTH 0 the plain NAME is returned; with DEPTH 1 the immediate
+parent is prepended (e.g. \"shared/foo\"), and so on, in path order."
+  (let ((prefix (reverse (seq-take (projectile-session--parent-components root)
+                                   depth))))
+    (if prefix
+        (concat (string-join prefix "/") "/" name)
+      name)))
+
+(defun projectile-session-default-tab-name (root)
+  "Return the tab name for the project rooted at ROOT.
+Use the project's name, prepending as many parent-directory components as
+it takes to stay distinct from every other open project tab that shares
+the name, so same-named checkouts (even ones whose immediate parent also
+matches) remain distinguishable."
+  (let* ((name (projectile-session--project-name root))
+         ;; roots of the other open project tabs that share this name;
+         ;; `delq'/`mapcar' rather than `seq-keep', which is Emacs 29.1+
+         (clashers (delq nil
+                         (mapcar
+                          (lambda (tab)
+                            (let ((other (projectile-session--tab-root tab)))
+                              (and (not (projectile-session--same-root-p other root))
+                                   (equal (projectile-session--project-name other) name)
+                                   other)))
+                          (projectile-session--project-tabs)))))
+    (if (null clashers)
+        name
+      (let ((max-depth (length (projectile-session--parent-components root)))
+            (depth 1))
+        (while (and (< depth max-depth)
+                    (let ((candidate (projectile-session--name-with-parents
+                                      root name depth)))
+                      (seq-some
+                       (lambda (other)
+                         (equal candidate (projectile-session--name-with-parents
+                                           other name depth)))
+                       clashers)))
+          (setq depth (1+ depth)))
+        (projectile-session--name-with-parents root name depth)))))
+
+(defun projectile-session--refresh-tab-names ()
+  "Recompute and apply names for every open project tab.
+Naming every project tab (not just the newest) lets same-named projects
+become disambiguated the moment a clash appears.  Tabs the user renamed
+by hand are left alone: a tab is only renamed while its current name
+still matches the one Projectile last assigned it (its `projectile-auto-name'
+parameter), which a manual `tab-bar-rename-tab' breaks."
+  (dolist (tab (projectile-session--project-tabs))
+    (let ((auto (alist-get 'projectile-auto-name (cdr tab)))
+          (current (alist-get 'name (cdr tab))))
+      (when (or (null auto) (equal auto current))
+        (projectile-session--set-tab-name
+         tab (funcall projectile-session-tab-name-function
+                      (projectile-session--tab-root tab))))))
+  (force-mode-line-update t))
+
+(defun projectile-session--on-tab-close (tab &optional _last)
+  "Re-simplify survivor tab names after project TAB is closed.
+Wired onto `tab-bar-tab-pre-close-functions', so a project tab that was
+disambiguated only because of TAB (e.g. \"work/foo\" beside TAB's
+\"home/foo\") reverts to its plain name once TAB goes away.
+
+That hook fires while TAB is still in the tab list, so TAB is bound as
+`projectile-session--closing-tab' to exclude it from the recomputation.
+It is used rather than a post-close hook because Emacs has no post-close
+tab hook at Projectile's 28.1 floor (`tab-bar-tab-pre-close-functions'
+dates to 27.1; `tab-bar-tab-post-close-functions' does not exist), which
+keeps this 28.1-safe."
+  (when (projectile-session--tab-root tab)
+    (let ((projectile-session--closing-tab tab))
+      ;; never let a naming error (e.g. a custom `projectile-session-tab-name-function'
+      ;; that signals) escape this pre-close hook and abort the tab close
+      (ignore-errors
+        (projectile-session--refresh-tab-names)))))
+
+(defun projectile-session--make-project-tab (root)
+  "Create and select a fresh tab bound to project ROOT.
+The new tab is stamped with ROOT and named; populating it is left to the
+caller."
+  (tab-bar-new-tab)
+  (projectile-session--set-tab-root (projectile-session--current-tab) root)
+  (projectile-session--refresh-tab-names))
+
+(defun projectile-session--current-tab-index ()
+  "Return the 1-based index of the selected frame's current tab."
+  (1+ (or (cl-position 'current-tab (tab-bar-tabs) :key #'car :test #'eq) 0)))
+
+(defun projectile-session--select-tab-by-root (root)
+  "Select the open project tab bound to ROOT, if any.
+Returns non-nil when a tab was selected.  Resolves the tab to a 1-based
+index in a single pass and selects by index, so it is robust to
+`tab-bar-select-tab' rebuilding tab cons cells as it switches away from
+the current tab (a captured cons would go stale mid-loop)."
+  (let ((index 0) (target nil))
+    (dolist (tab (tab-bar-tabs))
+      (setq index (1+ index))
+      (when (and (not target)
+                 (projectile-session--same-root-p
+                  (projectile-session--tab-root tab) root))
+        (setq target index)))
+    (when target
+      (tab-bar-select-tab target)
+      t)))
+
+(defun projectile-session--select-tab (tab)
+  "Select TAB, restoring the project layout it holds.
+Selection goes through the tab's project root, so it stays correct even
+after other tabs' cons cells have been rebuilt."
+  (let ((root (projectile-session--tab-root tab)))
+    (when root
+      (projectile-session--select-tab-by-root root))))
+
+(defun projectile-session--adopt-current-tab ()
+  "Bind the current tab to the current project, when there is one.
+Called on mode enable so the tab you're already sitting on is adopted
+rather than left unowned."
+  (when-let* ((root (projectile-project-root))
+              (tab (projectile-session--current-tab)))
+    (unless (projectile-session--tab-root tab)
+      (projectile-session--set-tab-root tab root)
+      (projectile-session--refresh-tab-names))))
+
+(defun projectile-session-switch-project-action ()
+  "Tab-aware switch action installed by `projectile-session-mode'.
+When the target project already has a tab, select it and restore its
+live window layout instead of re-running the switch action.  Otherwise
+create a new tab for the project and either restore its saved session (see
+`projectile-session-restore-on-switch') or populate it by calling
+`projectile-session-default-action'."
+  (let* ((root (projectile-project-root))
+         (tab (and root (projectile-session--project-tab root))))
+    (cond
+     (tab (projectile-session--select-tab tab))
+     (root
+      (projectile-session--make-project-tab root)
+      ;; Bind `default-directory' so the populate action lists the new
+      ;; project regardless of what buffer `tab-bar-new-tab' left current
+      ;; (e.g. a non-default `tab-bar-new-tab-choice').
+      (let ((default-directory root))
+        (unless (and projectile-session-restore-on-switch
+                     (projectile-session--saved-p root)
+                     (projectile-session-restore root))
+          (funcall projectile-session-default-action))))
+     (t (funcall projectile-session-default-action)))))
+
+;;;###autoload
+(defun projectile-session-switch-to-buffer ()
+  "Switch to a buffer belonging to the current tab's project.
+Complete over just the buffers of the project bound to the current tab.
+When the current tab holds no project, fall back to the plain
+`switch-to-buffer'."
+  (interactive)
+  (let ((root (projectile-session--tab-root (projectile-session--current-tab))))
+    (if root
+        (switch-to-buffer
+         (projectile-completing-read
+          "Switch to project buffer: "
+          (mapcar #'buffer-name (projectile-project-buffers root))))
+      (call-interactively #'switch-to-buffer))))
+
+;;; Session persistence
+;;
+;; A project's live layout is a native tab, but tabs don't survive an Emacs
+;; restart.  To persist one we write a small readable sexp per project: the
+;; window layout as `window-state-get' with the WRITABLE flag (so it stays a
+;; plain, re-readable sexp) plus a manifest of the buffers it shows, each
+;; turned into a record by `projectile-session-buffer-serializers'.  Restoring
+;; recreates the buffers first (window-state only references them by name and
+;; won't recreate them) and then puts the layout back, replacing any buffer it
+;; couldn't recreate with a placeholder so the restore never errors.
+
+(defun projectile-session--buffer-matches-p (key buffer)
+  "Return non-nil when serializer KEY applies to BUFFER.
+KEY is a major-mode symbol, the symbol t (any file-visiting buffer), or a
+predicate function of one argument."
+  (cond
+   ((eq key t) (and (buffer-file-name buffer) t))
+   ((symbolp key) (with-current-buffer buffer (derived-mode-p key)))
+   (t (funcall key buffer))))
+
+(defun projectile-session--buffer-kind (key buffer)
+  "Return the symbol under which BUFFER's record is stored for serializer KEY.
+A symbol KEY (a mode or t) is its own kind and restore dispatches on it; a
+predicate KEY falls back to BUFFER's major mode."
+  (if (symbolp key)
+      key
+    (buffer-local-value 'major-mode buffer)))
+
+(defun projectile-session--readable-p (object)
+  "Return non-nil when OBJECT survives a `prin1'/`read' round-trip.
+Guards against a custom serializer returning a record that embeds a live
+object (buffer, marker, window) which can't be read back.  Binds
+`print-circle' so shared or circular structure prints, and reads, finitely
+rather than hanging."
+  (ignore-errors
+    (let ((print-circle t))
+      (read (prin1-to-string object))
+      t)))
+
+(defun projectile-session--serialize-buffer (buffer)
+  "Serialize BUFFER via the first matching entry of the serializer registry.
+Return a cons (KIND . RECORD), or nil when no entry handles BUFFER.
+Each registry entry is tried in isolation: a matcher or serializer that
+errors, or that yields a non-readable record, is skipped rather than
+aborting the whole session save."
+  (catch 'done
+    (dolist (entry projectile-session-buffer-serializers)
+      (ignore-errors
+        (let ((key (car entry))
+              (serialize (cadr entry)))
+          (when (projectile-session--buffer-matches-p key buffer)
+            (let ((record (with-current-buffer buffer (funcall serialize buffer))))
+              (when (and record (projectile-session--readable-p record))
+                (throw 'done
+                       (cons (projectile-session--buffer-kind key buffer)
+                             record))))))))
+    nil))
+
+(defun projectile-session--deserializer (kind)
+  "Return the deserialize function able to restore a record of KIND.
+Prefer an entry whose key is exactly KIND (a mode symbol or t).  Records
+produced by a predicate-keyed serializer are stored under the buffer's
+major mode, which no `assq' can match, so fall back to the first
+predicate-keyed entry that carries a deserializer."
+  (let ((exact (assq kind projectile-session-buffer-serializers)))
+    (if exact
+        (cddr exact)
+      (catch 'found
+        (dolist (entry projectile-session-buffer-serializers)
+          (when (and (functionp (car entry)) (cddr entry))
+            (throw 'found (cddr entry))))
+        nil))))
+
+(defun projectile-session--recreate-buffer (saved)
+  "Recreate the buffer described by SAVED, a (KIND . RECORD) cons.
+Return the live buffer, or nil when no deserializer handles KIND or the
+deserializer declines (e.g. the underlying file is gone)."
+  (let ((deserialize (projectile-session--deserializer (car saved))))
+    (when deserialize
+      (funcall deserialize (cdr saved)))))
+
+(defun projectile-session--serialize-file (buffer)
+  "Serialize file-visiting BUFFER as a (:file PATH :point N) record."
+  (when (buffer-file-name buffer)
+    (list :file (buffer-file-name buffer) :point (point))))
+
+(defun projectile-session--deserialize-file (record)
+  "Recreate the file buffer described by RECORD, or nil when the file is gone.
+The file is visited non-interactively - large-file warnings and unsafe
+file-local-variable prompts are suppressed - so restoring a session (in
+particular on startup) never blocks Emacs on a `yes-or-no-p'."
+  (let ((file (plist-get record :file)))
+    (when (and file (file-exists-p file))
+      (let* ((large-file-warning-threshold nil)
+             (enable-local-variables :safe)
+             (buffer (find-file-noselect file)))
+        (when (buffer-live-p buffer)
+          (let ((point (plist-get record :point)))
+            (when (integerp point)
+              (with-current-buffer buffer
+                (goto-char (min point (point-max))))))
+          buffer)))))
+
+(defun projectile-session--serialize-dired (buffer)
+  "Serialize dired BUFFER as a (:dir DIRECTORY) record."
+  (with-current-buffer buffer
+    (when (derived-mode-p 'dired-mode)
+      (list :dir (expand-file-name default-directory)))))
+
+(defun projectile-session--deserialize-dired (record)
+  "Recreate the dired buffer described by RECORD, or nil when it's gone."
+  (let ((dir (plist-get record :dir)))
+    (when (and dir (file-directory-p dir))
+      (dired-noselect dir))))
+
+(defun projectile-session--placeholder-buffer ()
+  "Return a live placeholder buffer for windows whose buffer is missing."
+  (get-buffer-create " *projectile-session-placeholder*"))
+
+(defun projectile-session--sanitize-window-state (state)
+  "Return a copy of window STATE with missing buffers replaced.
+Any window referencing a buffer that isn't live is pointed at a
+placeholder buffer instead, so `window-state-put' can't error out.  This
+is the Emacs 28 substitute for `window-restore-killed-buffer-windows'
+\(added in Emacs 30)."
+  (cond
+   ((and (consp state)
+         (eq (car state) 'buffer)
+         (stringp (cadr state))
+         (not (get-buffer (cadr state))))
+    (cons 'buffer
+          (cons (buffer-name (projectile-session--placeholder-buffer))
+                (cddr state))))
+   ((consp state)
+    (cons (projectile-session--sanitize-window-state (car state))
+          (projectile-session--sanitize-window-state (cdr state))))
+   (t state)))
+
+(defun projectile-session--file (root)
+  "Return the absolute session file name for project ROOT.
+The name pairs a readable, filesystem-safe project name with a hash of
+ROOT's canonical path, so distinct roots never collide and the same root
+maps to the same file across restarts."
+  (let* ((canonical (directory-file-name
+                     ;; Canonicalize with `file-truename' so a symlinked root
+                     ;; and its target map to the same file, matching M1's
+                     ;; `projectile-session--same-root-p'.  Skip it for remote
+                     ;; roots to avoid a TRAMP round-trip.
+                     (if (file-remote-p root)
+                         (expand-file-name root)
+                       (file-truename root))))
+         (name (projectile-session--project-name root))
+         (safe (replace-regexp-in-string "[^A-Za-z0-9_.-]" "_" (or name "project")))
+         (hash (md5 canonical)))
+    (expand-file-name (concat safe "-" hash ".eld")
+                      projectile-session-directory)))
+
+(defun projectile-session--saved-p (root)
+  "Return non-nil when project ROOT has a session saved on disk."
+  (file-exists-p (projectile-session--file root)))
+
+(defun projectile-session--write (root data)
+  "Write session DATA for project ROOT, creating the session directory.
+Return non-nil only when the file was actually written, so callers don't
+report success for an unwritable session directory.  Binds `print-circle'
+so shared or circular structure in a record can't hang the write."
+  (let ((file (projectile-session--file root)))
+    (ignore-errors (make-directory (file-name-directory file) t))
+    (and (file-writable-p file)
+         (progn
+           (let ((print-circle t))
+             (projectile-serialize data file))
+           (file-exists-p file)))))
+
+(defun projectile-session--read-file (file)
+  "Read and return the session data stored in FILE, or nil.
+Data that isn't a well-formed session plist of the current version is
+ignored, so an unreadable or stale file is skipped rather than erroring.
+A real session file written by an incompatible format version is skipped
+with a message, so the user learns why nothing was restored."
+  (let ((data (projectile-unserialize file)))
+    (cond
+     ((and (consp data)
+           (equal (plist-get data :projectile-session-version)
+                  projectile-session--format-version)
+           data))
+     ((and (consp data) (plist-member data :projectile-session-version))
+      ;; `projectile-session-restore-all' can walk a directory full of these
+      ;; at startup, so this is exactly the kind of thing that shouldn't
+      ;; announce itself once per file.
+      (projectile--message "Ignoring session file %s: format version %s (expected %s)"
+                           file (plist-get data :projectile-session-version)
+                           projectile-session--format-version)
+      nil))))
+
+(defun projectile-session--read (root)
+  "Read and return project ROOT's session data, or nil.
+Data whose format version doesn't match is ignored."
+  (projectile-session--read-file (projectile-session--file root)))
+
+(defun projectile-session--saved-roots ()
+  "Return the roots of every project with a session saved on disk.
+Scan `projectile-session-directory' for session files, read each (skipping
+any that is unreadable or of a mismatched version, via
+`projectile-session--read-file'), and collect the `:root' it stores.  The
+result is sorted so `projectile-session-restore-all' reopens tabs in a
+stable order across calls and restarts."
+  (let ((dir projectile-session-directory)
+        (roots '()))
+    (when (file-directory-p dir)
+      (dolist (file (directory-files dir t "\\.eld\\'"))
+        (let ((data (ignore-errors (projectile-session--read-file file))))
+          ;; require a string root: a corrupt/hand-edited file with a
+          ;; non-string `:root' would otherwise crash the `sort' below and
+          ;; (via the startup handler's guard) silently disable all restore
+          (when-let* ((root (plist-get data :root))
+                      ((stringp root)))
+            (push root roots)))))
+    (sort roots #'string-lessp)))
+
+(defun projectile-session--frame-buffers ()
+  "Return the distinct buffers shown in the selected frame's windows."
+  (delete-dups (mapcar #'window-buffer (window-list nil 'nomini))))
+
+;;;###autoload
+(defun projectile-session-save (&optional project)
+  "Save the current window layout and buffers as PROJECT's session.
+PROJECT defaults to the current project's root.  The layout is captured
+from the selected frame, so this saves whichever project's tab is
+current.  Buffers are recorded via `projectile-session-buffer-serializers';
+a layout with no serializable buffer is not saved.  Return non-nil on a
+successful save."
+  (interactive)
+  (let ((root (or project (projectile-project-root))))
+    (unless root
+      (user-error "Not in a project"))
+    (let* ((buffers (projectile-session--frame-buffers))
+           (records (delq nil (mapcar #'projectile-session--serialize-buffer
+                                      buffers))))
+      (cond
+       ((null records)
+        (when (called-interactively-p 'any)
+          (message "No serializable buffers to save for %s" root))
+        nil)
+       ((projectile-session--write
+         root
+         (list :projectile-session-version projectile-session--format-version
+               :root root
+               :buffers records
+               :window-state (window-state-get (frame-root-window) t)))
+        (when (called-interactively-p 'any)
+          (message "Saved session for %s" root))
+        t)
+       (t
+        (when (called-interactively-p 'any)
+          (message "Could not write session for %s" root))
+        nil)))))
+
+;;;###autoload
+(defun projectile-session-restore (&optional project)
+  "Restore PROJECT's saved session into the selected frame.
+PROJECT defaults to the current project's root.  Buffers are recreated
+first, then the saved window layout is put back; windows whose buffer
+can't be recreated fall back to a placeholder.  Return non-nil when a
+session was restored."
+  (interactive)
+  (let* ((root (or project (projectile-project-root)))
+         (data (and root (projectile-session--read root))))
+    (cond
+     (data
+      (let ((recreated nil))
+        (dolist (saved (plist-get data :buffers))
+          (when (ignore-errors (buffer-live-p (projectile-session--recreate-buffer saved)))
+            (setq recreated t)))
+        (cond
+         (recreated
+          (let ((state (plist-get data :window-state)))
+            (when state
+              ;; A hand-edited or corrupt :window-state that still passes the
+              ;; version check shouldn't abort the whole restore - fall through
+              ;; to the recreated buffers instead, matching the buffer-recreation
+              ;; guard above and the file-read robustness elsewhere here.
+              (condition-case err
+                  (window-state-put (projectile-session--sanitize-window-state state)
+                                    (frame-root-window) 'safe)
+                (error
+                 (message "projectile-session: could not restore window layout: %S" err)))))
+          t)
+         ;; Nothing could be recreated (every saved file is gone, say);
+         ;; return nil so `restore-on-switch' falls back to populating the
+         ;; tab instead of leaving the user in an all-placeholder frame.
+         (t
+          (when (called-interactively-p 'any)
+            (message "No buffers could be restored for %s" (or root "current project")))
+          nil))))
+     ((called-interactively-p 'any)
+      (user-error "No saved session for %s" (or root "current project"))))))
+
+;;;###autoload
+(defun projectile-session-forget (&optional project)
+  "Delete PROJECT's saved session file.
+PROJECT defaults to the current project's root."
+  (interactive)
+  (let ((root (or project (projectile-project-root))))
+    (unless root
+      (user-error "Not in a project"))
+    (let ((file (projectile-session--file root)))
+      (when (file-exists-p file)
+        (delete-file file)
+        (when (called-interactively-p 'any)
+          (message "Forgot session for %s" root))))))
+
+(defun projectile-session--maybe-autosave ()
+  "Save the current project's session when autosave is enabled.
+Wired onto `projectile-before-switch-project-hook', where the current
+project is still the one being switched away from."
+  (when projectile-session-autosave
+    (ignore-errors (projectile-session-save))))
+
+(defun projectile-session--save-all-tabs ()
+  "Save the session of every open project tab, selecting each in turn.
+Each project tab is selected so its own window layout is what gets saved,
+then the originally-selected tab is restored.  Tabs are re-resolved by
+root on each iteration rather than by a cons captured up front, because
+`tab-bar-select-tab' rebuilds cons cells as it switches tabs (a stale cons
+would save the wrong layout under a project's root).  The per-tab body is
+guarded so a tab that can't be selected or saved (its root gone, say)
+neither abandons the remaining projects nor lets an error escape (this
+also matters on `kill-emacs-hook').  Return the number of tabs whose
+session was actually written."
+  (let ((origin (projectile-session--current-tab-index))
+        (roots (delq nil (mapcar #'projectile-session--tab-root
+                                 (projectile-session--project-tabs))))
+        (saved 0))
+    (dolist (root roots)
+      (ignore-errors
+        (when (and (projectile-session--select-tab-by-root root)
+                   (projectile-session-save root))
+          (setq saved (1+ saved)))))
+    (ignore-errors (tab-bar-select-tab origin))
+    saved))
+
+;;;###autoload
+(defun projectile-session-save-all ()
+  "Save the session of every open project in one go.
+Every open project tab's window layout and buffers are saved (see
+`projectile-session-save'); a tab whose layout has no serializable buffer
+is skipped.  Unlike autosave, this runs regardless of
+`projectile-session-autosave'.  When called interactively, report how many
+sessions were saved."
+  (interactive)
+  ;; `--save-all-tabs' selects each project tab in turn and restores the
+  ;; originally-selected one afterwards.
+  (let ((saved (projectile-session--save-all-tabs)))
+    (when (called-interactively-p 'any)
+      (message "Saved %d project session%s" saved (if (= saved 1) "" "s")))
+    saved))
+
+;;;###autoload
+(defun projectile-session-restore-all ()
+  "Reopen every saved project's session into its own tab.
+For each project with a session saved on disk (see
+`projectile-session--saved-roots'): when a tab for it is already open,
+leave it be rather than duplicating it; otherwise create a fresh project
+tab and restore the saved session into it.  A session whose files are all
+gone recreates nothing, so its just-created empty tab is closed again and
+it is not counted, keeping restore-all from littering the frame with empty
+tabs.  Tabs are re-resolved by root, never by a cons captured before a
+selection, since `tab-bar-select-tab' rebuilds cons cells as it switches.
+End on the first successfully restored project's tab (falling back to the
+starting tab when nothing was restored) rather than wherever the iteration
+left off.  When called interactively, report how many sessions were
+restored.  Return that count."
+  (interactive)
+  (let ((origin (projectile-session--current-tab-index))
+        (first-root nil)
+        (restored 0))
+    (dolist (root (projectile-session--saved-roots))
+      (unless (projectile-session--project-tab root)
+        (projectile-session--make-project-tab root)
+        (if (ignore-errors (projectile-session-restore root))
+            (progn
+              (setq restored (1+ restored))
+              (unless first-root (setq first-root root)))
+          ;; nothing recreated (the project's files are gone): drop the
+          ;; empty tab `--make-project-tab' just created and selected
+          (ignore-errors (tab-bar-close-tab)))))
+    ;; Land the user somewhere deterministic.  When we restored something,
+    ;; go to the first restored project; otherwise return to where we
+    ;; started (any tabs we made for stale sessions were closed again, so
+    ;; the starting index still points at the same tab).
+    (if first-root
+        (projectile-session--select-tab-by-root first-root)
+      (ignore-errors (tab-bar-select-tab origin)))
+    (when (called-interactively-p 'any)
+      (message "Restored %d project session%s" restored
+               (if (= restored 1) "" "s")))
+    restored))
+
+(defun projectile-session--autosave-on-kill ()
+  "Save every open project's session when autosave is enabled.
+Wired onto `kill-emacs-hook'; the frame is going away, so the tab left
+selected by `projectile-session--save-all-tabs' does not matter."
+  (when projectile-session-autosave
+    (projectile-session--save-all-tabs)))
+
+(defun projectile-session--maybe-restore-on-startup ()
+  "Reopen all saved sessions at startup when configured to.
+Wired onto `emacs-startup-hook' while `projectile-session-mode' is on; the
+restore is gated on `projectile-session-restore-on-startup'.  Errors are
+swallowed so a restore problem can't abort the rest of Emacs startup."
+  (when projectile-session-restore-on-startup
+    (ignore-errors (projectile-session-restore-all))))
+
+;;;###autoload
+(define-minor-mode projectile-session-mode
+  "Global minor mode giving each project its own `tab-bar' tab.
+
+When enabled, `tab-bar-mode' is turned on and project switching becomes
+tab-aware: switching to a project selects its existing tab, restoring
+that project's live window layout, when one is open; otherwise it opens
+a fresh tab dedicated to the project and populates it via
+`projectile-session-default-action'.  Each project tab is stamped with
+its root and named after the project (see
+`projectile-session-tab-name-function').
+
+If the mode is enabled from inside a project, the tab you're already on
+is adopted so it isn't left unowned.
+
+Disabling the mode restores `projectile-switch-project-action' to the
+value it had when the mode was enabled; it leaves `tab-bar-mode' and any
+existing tabs untouched."
+  :group 'projectile
+  :global t
+  :require 'projectile
+  (cond
+   (projectile-session-mode
+    (unless (bound-and-true-p tab-bar-mode)
+      (tab-bar-mode 1))
+    ;; Guard the save so re-enabling an already-on mode (config re-eval, a
+    ;; startup hook, `custom-set' plus code) can't capture our own action as
+    ;; the "saved" value and lose the user's real one on the next disable.
+    (unless (eq projectile-switch-project-action
+                #'projectile-session-switch-project-action)
+      (setq projectile-session--saved-switch-action projectile-switch-project-action))
+    (setq projectile-switch-project-action #'projectile-session-switch-project-action)
+    ;; Autosave wiring.  `add-hook' is idempotent for an `eq' function, so a
+    ;; double enable can't stack duplicates; the actual saving is gated on
+    ;; `projectile-session-autosave' inside the hook functions.
+    (add-hook 'projectile-before-switch-project-hook
+              #'projectile-session--maybe-autosave)
+    (add-hook 'kill-emacs-hook #'projectile-session--autosave-on-kill)
+    ;; Restore-on-startup wiring.  The handler is gated on
+    ;; `projectile-session-restore-on-startup' and `emacs-startup-hook' fires
+    ;; once, right after init, so setting the mode plus the defcustom in init
+    ;; restores after startup; enabling the mode later simply never fires it.
+    ;; `add-hook' is idempotent for an `eq' function, so a double enable can't
+    ;; stack duplicates.
+    (add-hook 'emacs-startup-hook #'projectile-session--maybe-restore-on-startup)
+    ;; Re-simplify a survivor's name when its same-named sibling tab is
+    ;; closed.  `add-hook' is idempotent for an `eq' function, so a double
+    ;; enable can't stack duplicates.
+    (add-hook 'tab-bar-tab-pre-close-functions
+              #'projectile-session--on-tab-close)
+    (projectile-session--adopt-current-tab))
+   (t
+    (when (eq projectile-switch-project-action
+              #'projectile-session-switch-project-action)
+      (setq projectile-switch-project-action
+            projectile-session--saved-switch-action))
+    (setq projectile-session--saved-switch-action nil)
+    (remove-hook 'projectile-before-switch-project-hook
+                 #'projectile-session--maybe-autosave)
+    (remove-hook 'kill-emacs-hook #'projectile-session--autosave-on-kill)
+    (remove-hook 'emacs-startup-hook
+                 #'projectile-session--maybe-restore-on-startup)
+    (remove-hook 'tab-bar-tab-pre-close-functions
+                 #'projectile-session--on-tab-close))))
+
+
+;;; Optional Embark / Marginalia integration
+;;
+;; Gated behind `with-eval-after-load' so Embark and Marginalia stay soft,
+;; opt-in enhancements rather than dependencies.  Two Embark wins on top of the
+;; completion categories Projectile already advertises:
+;;
+;; 1. A transformer that expands a `project-file' candidate (which Projectile
+;;    presents project-relative) to an absolute path against the Projectile
+;;    root, so Embark's file actions hit the right file regardless of
+;;    `default-directory'.
+;; 2. A `projectile-project' action keymap, so acting on a project candidate
+;;    offers project operations (switch, vc, dired, remove) instead of only
+;;    generic file actions.  Marginalia keeps annotating those candidates via
+;;    the built-in file annotator (they are directory paths).
+;;
+;; The `projectile-worktree' category gets the same Embark actions but is
+;; deliberately left out of the Marginalia registry: those candidates carry
+;; their own `annotation-function' naming what each worktree has checked
+;; out, and a registered annotator would take precedence over it.
+
+(defun projectile--embark-project-file-target (target)
+  "Resolve a `project-file' TARGET to an absolute path under the Projectile root.
+Return (file . ABSOLUTE) only when TARGET actually exists under the
+current Projectile project root, otherwise nil so the caller can defer to
+Embark's own `project-file' handling.  The existence guard keeps the
+integration from ever misresolving a `project-file' candidate that is not
+Projectile's - worst case it does nothing and Embark behaves as before."
+  (when-let* ((root (projectile-project-root))
+              (full (expand-file-name target root))
+              ((file-exists-p full)))
+    (cons 'file full)))
+
+(defun projectile-embark-switch-project (project)
+  "Switch to PROJECT.  An Embark action for a project candidate."
+  (interactive "sProject: ")
+  (projectile-switch-project-by-name project))
+
+(defun projectile-embark-vc (project)
+  "Open the VC interface for PROJECT.  An Embark action for a project candidate."
+  (interactive "sProject: ")
+  (projectile-vc project))
+
+(defvar projectile--embark-project-file-prev-transform nil
+  "The `project-file' transformer Embark had before Projectile augmented it.
+Preserved so `projectile--embark-project-file-transform' can defer to it
+for candidates that don't belong to the current Projectile project.")
+
+(defun projectile--embark-project-file-transform (type target)
+  "Embark `project-file' transformer augmenting Embark's own with Projectile.
+Resolves TARGET against the Projectile root when it lives there,
+otherwise defers to the transformer Embark had before (or leaves
+TYPE/TARGET unchanged), so non-Projectile completions are unaffected."
+  (or (projectile--embark-project-file-target target)
+      (and projectile--embark-project-file-prev-transform
+           (funcall projectile--embark-project-file-prev-transform type target))
+      (cons type target)))
+
+(defvar projectile-embark-project-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "s") #'projectile-embark-switch-project)
+    (define-key map (kbd "v") #'projectile-embark-vc)
+    (define-key map (kbd "d") #'dired)
+    (define-key map (kbd "D") #'projectile-remove-known-project)
+    map)
+  "Embark action keymap for Projectile `projectile-project' candidates.")
+
+(defvar embark-transformer-alist)
+(defvar embark-keymap-alist)
+(defvar embark-general-map)
+
+(defun projectile--embark-setup ()
+  "Wire Projectile's transformer and action keymap into Embark.
+Run from a `with-eval-after-load' on Embark, and idempotent so loading
+Projectile again doesn't stack wrappers."
+  ;; inherit Embark's generic actions (collect, export, ...)
+  (set-keymap-parent projectile-embark-project-map embark-general-map)
+  ;; Augment - never replace - Embark's `project-file' handling.  Our
+  ;; transformer only claims a candidate that actually lives under the
+  ;; Projectile root; anything else defers to whatever transformer Embark
+  ;; already had, so non-Projectile `project-file' completions are unaffected.
+  ;; The `eq' guard keeps re-loading Projectile from wrapping our own wrapper.
+  (let ((prev (alist-get 'project-file embark-transformer-alist)))
+    (unless (eq prev #'projectile--embark-project-file-transform)
+      (setq projectile--embark-project-file-prev-transform prev)
+      (setf (alist-get 'project-file embark-transformer-alist)
+            #'projectile--embark-project-file-transform)))
+  (add-to-list 'embark-keymap-alist
+               '(projectile-project . projectile-embark-project-map))
+  ;; A worktree candidate is a project directory too, so the same actions
+  ;; apply to it.
+  (add-to-list 'embark-keymap-alist
+               '(projectile-worktree . projectile-embark-project-map)))
+
+(with-eval-after-load 'embark (projectile--embark-setup))
+
+(defun projectile--marginalia-setup ()
+  "Teach Marginalia how to annotate `projectile-project' candidates.
+They are directory paths, so the built-in file annotator fits and the
+candidates look exactly like they did under the `file' category.  The
+registry is `marginalia-annotators' these days and was
+`marginalia-annotator-registry' in older releases, so register with
+whichever one the installed Marginalia has."
+  (dolist (registry '(marginalia-annotators marginalia-annotator-registry))
+    (when (boundp registry)
+      (add-to-list registry
+                   '(projectile-project marginalia-annotate-file builtin none)))))
+
+(with-eval-after-load 'marginalia (projectile--marginalia-setup))
+
+(provide 'projectile)
+
+;;; projectile.el ends here
diff --git a/emacs/.emacs.d/elpa/projectile-20260824.913/projectile.elc b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile.elc
new file mode 100644
index 0000000..49c7174
Binary files /dev/null and b/emacs/.emacs.d/elpa/projectile-20260824.913/projectile.elc differ
diff --git a/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv-autoloads.el b/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv-autoloads.el
new file mode 100644
index 0000000..01b75d9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv-autoloads.el
@@ -0,0 +1,102 @@
+;;; pyvenv-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from pyvenv.el
+
+(autoload 'pyvenv-activate "pyvenv" "\
+Activate the virtual environment in DIRECTORY.
+
+(fn DIRECTORY)" t)
+(autoload 'pyvenv-deactivate "pyvenv" "\
+Deactivate any current virtual environment." t)
+(autoload 'pyvenv-workon "pyvenv" "\
+Activate a virtual environment from $WORKON_HOME.
+
+If the virtual environment NAME is already active, this function
+does not try to reactivate the environment.
+
+(fn NAME)" t)
+(defvar pyvenv-mode nil "\
+Non-nil if Pyvenv mode is enabled.
+See the `pyvenv-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 `pyvenv-mode'.")
+(custom-autoload 'pyvenv-mode "pyvenv" nil)
+(autoload 'pyvenv-mode "pyvenv" "\
+Global minor mode for pyvenv.
+
+Will show the current virtualenv in the mode line, and respect a
+`pyvenv-workon' setting in files.
+
+This is a global minor mode.  If called interactively, toggle the
+`Pyvenv mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='pyvenv-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(defvar pyvenv-tracking-mode nil "\
+Non-nil if Pyvenv-Tracking mode is enabled.
+See the `pyvenv-tracking-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 `pyvenv-tracking-mode'.")
+(custom-autoload 'pyvenv-tracking-mode "pyvenv" nil)
+(autoload 'pyvenv-tracking-mode "pyvenv" "\
+Global minor mode to track the current virtualenv.
+
+When this mode is active, pyvenv will activate a buffer-specific
+virtualenv whenever the user switches to a buffer with a
+buffer-local `pyvenv-workon' or `pyvenv-activate' variable.
+
+This is a global minor mode.  If called interactively, toggle the
+`Pyvenv-Tracking mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='pyvenv-tracking-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(autoload 'pyvenv-restart-python "pyvenv" "\
+Restart Python inferior processes." t)
+(register-definition-prefixes "pyvenv" '("pyvenv-"))
+
+;;; End of scraped data
+
+(provide 'pyvenv-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; pyvenv-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv-pkg.el b/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv-pkg.el
new file mode 100644
index 0000000..2f6470e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "pyvenv" "20211014.707"
+  "Python virtual environment interface."
+  ()
+  :url "https://github.com/jorgenschaefer/pyvenv"
+  :commit "31ea715f2164dd611e7fc77b26390ef3ca93509b"
+  :revdesc "31ea715f2164"
+  :keywords '("python" "virtualenv" "tools")
+  :authors '(("Jorgen Schaefer" . "contact@jorgenschaefer.de"))
+  :maintainers '(("Jorgen Schaefer" . "contact@jorgenschaefer.de")))
diff --git a/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv.el b/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv.el
new file mode 100644
index 0000000..abccaa7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv.el
@@ -0,0 +1,635 @@
+;;; pyvenv.el --- Python virtual environment interface -*- lexical-binding: t -*-
+
+;; Copyright (C) 2013-2017  Jorgen Schaefer <contact@jorgenschaefer.de>
+
+;; Author: Jorgen Schaefer <contact@jorgenschaefer.de>
+;; URL: http://github.com/jorgenschaefer/pyvenv
+;; Package-Version: 20211014.707
+;; Package-Revision: 31ea715f2164
+;; Keywords: Python, Virtualenv, Tools
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This is a simple global minor mode which will replicate the changes
+;; done by virtualenv activation inside Emacs.
+
+;; The main entry points are `pyvenv-activate', which queries the user
+;; for a virtual environment directory to activate, and
+;; `pyvenv-workon', which queries for a virtual environment in
+;; $WORKON_HOME (from virtualenvwrapper.sh).
+
+;; If you want your inferior Python processes to be restarted
+;; automatically when you switch your virtual environment, add
+;; `pyvenv-restart-python' to `pyvenv-post-activate-hooks'.
+
+;;; Code:
+
+(require 'eshell)
+(require 'json)
+(require 'subr-x)
+
+;; User customization
+
+(defgroup pyvenv nil
+  "Python Virtual Environment Interface."
+  :prefix "pyvenv-"
+  :group 'languages)
+
+(defcustom pyvenv-workon nil
+  "The intended virtualenv in the virtualenvwrapper directory.
+
+This is rarely useful to set globally. Rather, set this in file-
+or directory-local variables using \\[add-file-local-variable] or
+\\[add-dir-local-variable].
+
+When `pyvenv-mode' is enabled, pyvenv will switch to this
+virtualenv. If a virtualenv is already enabled, it will ask first."
+  :type 'pyvenv-workon
+  :safe #'stringp
+  :group 'pyvenv)
+
+(defcustom pyvenv-activate nil
+  "The intended virtualenv directory.
+
+This is rarely useful to set globally. Rather, set this in file-
+or directory-local variables using \\[add-file-local-variable] or
+\\[add-dir-local-variable].
+
+When `pyvenv-mode' is enabled, pyvenv will switch to this
+virtualenv. If a virtualenv is already enabled, it will ask first."
+  :type 'directory
+  :safe #'stringp
+  :group 'pyvenv)
+
+(defcustom pyvenv-tracking-ask-before-change nil
+  "Non-nil means pyvenv will ask before automatically changing a virtualenv.
+
+This can happen when a new file is opened with a buffer-local
+value (from file-local or directory-local variables) for
+`pyvenv-workon' or `pyvenv-workon', or if `pyvenv-tracking-mode'
+is active, after every command."
+  :type 'boolean
+  :group 'pyvenv)
+
+(defcustom pyvenv-virtualenvwrapper-python
+  (or (getenv "VIRTUALENVWRAPPER_PYTHON")
+      (executable-find "python3")
+      (executable-find "python")
+      (executable-find "py")
+      (executable-find "pythonw")
+      "python")
+  "The python process which has access to the virtualenvwrapper module.
+
+This should be $VIRTUALENVWRAPPER_PYTHON outside of Emacs, but
+virtualenvwrapper.sh does not export that variable. We make an
+educated guess, but that can be off."
+  :type '(file :must-match t)
+  :safe #'file-directory-p
+  :group 'pyvenv)
+
+(defcustom pyvenv-exec-shell
+  (or (executable-find "bash")
+      (executable-find "sh")
+      shell-file-name)
+  "The path to a POSIX compliant shell to use for running
+  virtualenv hooks. Useful if you use a non-POSIX shell (e.g.
+  fish)."
+  :type '(file :must-match t)
+  :group 'pyvenv)
+
+(defcustom pyvenv-default-virtual-env-name nil
+  "Default directory to use when prompting for a virtualenv directory
+in `pyvenv-activate'."
+  :type 'string
+  :group 'pyvenv)
+
+;; API for other libraries
+
+(defvar pyvenv-virtual-env nil
+  "The current virtual environment.
+
+Do not set this variable directly; use `pyvenv-activate' or
+`pyvenv-workon'.")
+
+(defvar pyvenv-virtual-env-path-directories nil
+  "Directories added to PATH by the current virtual environment.
+
+Do not set this variable directly; use `pyvenv-activate' or
+`pyvenv-workon'.")
+
+(defvar pyvenv-virtual-env-name nil
+  "The name of the current virtual environment.
+
+This is usually the base name of `pyvenv-virtual-env'.")
+
+
+(defvar pyvenv-pre-create-hooks nil
+  "Hooks run before a virtual environment is created.")
+
+
+(defvar pyvenv-post-create-hooks nil
+  "Hooks run after a virtual environment is created.")
+
+
+(defvar pyvenv-pre-activate-hooks nil
+  "Hooks run before a virtual environment is activated.
+
+`pyvenv-virtual-env' is already set.")
+
+(defvar pyvenv-post-activate-hooks nil
+  "Hooks run after a virtual environment is activated.
+
+`pyvenv-virtual-env' is set.")
+
+(defvar pyvenv-pre-deactivate-hooks nil
+  "Hooks run before a virtual environment is deactivated.
+
+`pyvenv-virtual-env' is set.")
+
+(defvar pyvenv-post-deactivate-hooks nil
+  "Hooks run after a virtual environment is deactivated.
+
+`pyvenv-virtual-env' is still set.")
+
+(defvar pyvenv-mode-line-indicator '(pyvenv-virtual-env-name
+                                     ("[" pyvenv-virtual-env-name "] "))
+  "How `pyvenv-mode' will indicate the current environment in the mode line.")
+
+;; Internal code.
+
+(defvar pyvenv-old-process-environment nil
+  "The old process environment that needs to be restored after deactivating the current environment.")
+
+
+(defun pyvenv-create (venv-name python-executable)
+  "Create virtualenv.  VENV-NAME  PYTHON-EXECUTABLE."
+  (interactive (list
+                (read-from-minibuffer "Name of virtual environment: ")
+                (let ((dir (if pyvenv-virtualenvwrapper-python
+                               (file-name-directory pyvenv-virtualenvwrapper-python)
+                             nil))
+                      (initial (if pyvenv-virtualenvwrapper-python
+                                   (file-name-base pyvenv-virtualenvwrapper-python)
+                                 nil)))
+                  (read-file-name "Python interpreter to use: " dir nil nil initial))))
+  (let ((venv-dir (concat (file-name-as-directory (pyvenv-workon-home))
+                          venv-name)))
+    (unless (file-exists-p venv-dir)
+      (run-hooks 'pyvenv-pre-create-hooks)
+      (cond
+       ((executable-find "virtualenv")
+        (with-current-buffer (generate-new-buffer "*virtualenv*")
+          (call-process "virtualenv" nil t t
+                        "-p" python-executable venv-dir)
+          (display-buffer (current-buffer))))
+       ((= 0 (call-process python-executable nil nil nil
+                           "-m" "venv" "-h"))
+        (with-current-buffer (generate-new-buffer "*venv*")
+          (call-process python-executable nil t t
+                        "-m" "venv" venv-dir)
+          (display-buffer (current-buffer))))
+       (t
+        (error "Pyvenv necessitates the 'virtualenv' python package")))
+      (run-hooks 'pyvenv-post-create-hooks))
+    (pyvenv-activate venv-dir)))
+
+
+;;;###autoload
+(defun pyvenv-activate (directory)
+  "Activate the virtual environment in DIRECTORY."
+  (interactive (list (read-directory-name "Activate venv: " nil nil nil
+					  pyvenv-default-virtual-env-name)))
+  (setq directory (expand-file-name directory))
+  (pyvenv-deactivate)
+  (setq pyvenv-virtual-env (file-name-as-directory directory)
+        pyvenv-virtual-env-name (file-name-nondirectory
+                                 (directory-file-name directory))
+        python-shell-virtualenv-path directory
+        python-shell-virtualenv-root directory)
+  ;; Set venv name as parent directory for generic directories or for
+  ;; the user's default venv name
+  (when (or (member pyvenv-virtual-env-name '("venv" ".venv" "env" ".env"))
+	    (and pyvenv-default-virtual-env-name
+		 (string= pyvenv-default-virtual-env-name
+			  pyvenv-virtual-env-name)))
+    (setq pyvenv-virtual-env-name
+          (file-name-nondirectory
+           (directory-file-name
+            (file-name-directory
+             (directory-file-name directory))))))
+  (pyvenv-run-virtualenvwrapper-hook "pre_activate" nil pyvenv-virtual-env)
+  (run-hooks 'pyvenv-pre-activate-hooks)
+  (setq pyvenv-virtual-env-path-directories (pyvenv--virtual-env-bin-dirs directory)
+        ;; Variables that must be reset during deactivation.
+        pyvenv-old-process-environment (list (cons "PYTHONHOME" (getenv "PYTHONHOME"))
+                                       (cons "VIRTUAL_ENV" nil)))
+  (setenv "VIRTUAL_ENV" directory)
+  (setenv "PYTHONHOME" nil)
+  (pyvenv--add-dirs-to-PATH pyvenv-virtual-env-path-directories)
+  (pyvenv-run-virtualenvwrapper-hook "post_activate" 'propagate-env)
+  (run-hooks 'pyvenv-post-activate-hooks))
+
+;;;###autoload
+(defun pyvenv-deactivate ()
+  "Deactivate any current virtual environment."
+  (interactive)
+  (when pyvenv-virtual-env
+    (pyvenv-run-virtualenvwrapper-hook "pre_deactivate" 'propagate-env)
+    (run-hooks 'pyvenv-pre-deactivate-hooks)
+    (pyvenv--remove-dirs-from-PATH (pyvenv--virtual-env-bin-dirs pyvenv-virtual-env))
+    (dolist (envvar pyvenv-old-process-environment)
+      (setenv (car envvar) (cdr envvar)))
+    ;; Make sure PROPAGATE-ENV is nil here, so that it does not change
+    ;; `exec-path', as $PATH is different
+    (pyvenv-run-virtualenvwrapper-hook "post_deactivate"
+                                 nil
+                                 pyvenv-virtual-env)
+    (run-hooks 'pyvenv-post-deactivate-hooks))
+  (setq pyvenv-virtual-env nil
+        pyvenv-virtual-env-path-directories nil
+        pyvenv-virtual-env-name nil
+        python-shell-virtualenv-root nil
+        python-shell-virtualenv-path nil))
+
+(defvar pyvenv-workon-history nil
+  "Prompt history for `pyvenv-workon'.")
+
+;;;###autoload
+(defun pyvenv-workon (name)
+  "Activate a virtual environment from $WORKON_HOME.
+
+If the virtual environment NAME is already active, this function
+does not try to reactivate the environment."
+  (interactive
+   (list
+    (completing-read "Work on: " (pyvenv-virtualenv-list)
+                     nil t nil 'pyvenv-workon-history nil nil)))
+  (unless (member name (list "" nil pyvenv-virtual-env-name))
+    (pyvenv-activate (format "%s/%s"
+                             (pyvenv-workon-home)
+                             name))))
+
+(defun pyvenv-virtualenv-list (&optional noerror)
+  "Prompt the user for a name in $WORKON_HOME.
+
+If NOERROR is set, do not raise an error if WORKON_HOME is not
+configured."
+  (let ((workon-home (pyvenv-workon-home))
+        (result nil))
+    (if (not (file-directory-p workon-home))
+        (when (not noerror)
+          (error "Can't find a workon home directory, set $WORKON_HOME"))
+      (dolist (name (directory-files workon-home))
+        (when (or (file-exists-p (format "%s/%s/bin/activate"
+                                         workon-home name))
+                  (file-exists-p (format "%s/%s/bin/python"
+                                         workon-home name))
+                  (file-exists-p (format "%s/%s/Scripts/activate.bat"
+                                         workon-home name))
+                  (file-exists-p (format "%s/%s/python.exe"
+                                         workon-home name)))
+          (setq result (cons name result))))
+      (sort result (lambda (a b)
+                     (string-lessp (downcase a)
+                                   (downcase b)))))))
+
+(define-widget 'pyvenv-workon 'choice
+  "Select an available virtualenv from virtualenvwrapper."
+  :convert-widget
+  (lambda (widget)
+    (setq widget (widget-copy widget))
+    (widget-put widget
+                :args (cons '(const :tag "None" nil)
+                            (mapcar (lambda (env)
+                                      (list 'const env))
+                                    (pyvenv-virtualenv-list t))))
+    (widget-types-convert-widget widget))
+
+  :prompt-value (lambda (_widget prompt _value _unbound)
+                  (let ((name (completing-read
+                               prompt
+                               (cons "None"
+                                     (pyvenv-virtualenv-list t))
+                               nil t)))
+                    (if (equal name "None")
+                        nil
+                      name))))
+
+(defvar pyvenv-mode-map (make-sparse-keymap)
+  "The mode keymap for `pyvenv-mode'.")
+
+(easy-menu-define pyvenv-menu pyvenv-mode-map
+  "Pyvenv Menu"
+  '("Virtual Envs"
+    :visible pyvenv-mode
+    ("Workon"
+     :help "Activate a virtualenvwrapper environment"
+     :filter (lambda (&optional ignored)
+               (mapcar (lambda (venv)
+                         (vector venv `(pyvenv-workon ,venv)
+                                 :style 'radio
+                                 :selected `(equal pyvenv-virtual-env-name
+                                                   ,venv)))
+                       (pyvenv-virtualenv-list t))))
+    ["Activate" pyvenv-activate
+     :help "Activate a virtual environment by directory"]
+    ["Deactivate" pyvenv-deactivate
+     :help "Deactivate the current virtual environment"
+     :active pyvenv-virtual-env
+     :suffix pyvenv-virtual-env-name]
+    ["Restart Python Processes" pyvenv-restart-python
+     :help "Restart all Python processes to use the current environment"]))
+
+;;;###autoload
+(define-minor-mode pyvenv-mode
+  "Global minor mode for pyvenv.
+
+Will show the current virtualenv in the mode line, and respect a
+`pyvenv-workon' setting in files."
+  :global t
+  (cond
+   (pyvenv-mode
+    (add-to-list 'mode-line-misc-info '(pyvenv-mode pyvenv-mode-line-indicator))
+    (add-hook 'hack-local-variables-hook #'pyvenv-track-virtualenv))
+   ((not pyvenv-mode)
+    (setq mode-line-misc-info (delete '(pyvenv-mode pyvenv-mode-line-indicator)
+                                      mode-line-misc-info))
+    (remove-hook 'hack-local-variables-hook #'pyvenv-track-virtualenv))))
+
+;;;###autoload
+(define-minor-mode pyvenv-tracking-mode
+  "Global minor mode to track the current virtualenv.
+
+When this mode is active, pyvenv will activate a buffer-specific
+virtualenv whenever the user switches to a buffer with a
+buffer-local `pyvenv-workon' or `pyvenv-activate' variable."
+  :global t
+  (if pyvenv-tracking-mode
+      (add-hook 'post-command-hook 'pyvenv-track-virtualenv)
+    (remove-hook 'post-command-hook 'pyvenv-track-virtualenv)))
+
+(defun pyvenv-track-virtualenv ()
+  "Set a virtualenv as specified for the current buffer.
+
+If either `pyvenv-activate' or `pyvenv-workon' are specified, and
+they specify a virtualenv different from the current one, switch
+to that virtualenv."
+  (cond
+   (pyvenv-activate
+    (when (and (not (equal (file-name-as-directory pyvenv-activate)
+                           pyvenv-virtual-env))
+               (or (not pyvenv-tracking-ask-before-change)
+                   (y-or-n-p (format "Switch to virtualenv %s (currently %s)"
+                                     pyvenv-activate pyvenv-virtual-env))))
+      (pyvenv-activate pyvenv-activate)))
+   (pyvenv-workon
+    (when (and (not (equal pyvenv-workon pyvenv-virtual-env-name))
+               (or (not pyvenv-tracking-ask-before-change)
+                   (y-or-n-p (format "Switch to virtualenv %s (currently %s)"
+                                     pyvenv-workon pyvenv-virtual-env-name))))
+      (pyvenv-workon pyvenv-workon)))))
+
+(defun pyvenv-run-virtualenvwrapper-hook (hook &optional propagate-env &rest args)
+  "Run a virtualenvwrapper hook, and update the environment.
+
+This will run a virtualenvwrapper hook and update the local
+environment accordingly.
+
+CAREFUL! If PROPAGATE-ENV is non-nil, this will modify your
+`process-environment' and `exec-path'."
+  (when (pyvenv-virtualenvwrapper-supported)
+    (with-temp-buffer
+      (let ((tmpfile (make-temp-file "pyvenv-virtualenvwrapper-"))
+            (shell-file-name pyvenv-exec-shell))
+        (unwind-protect
+            (let ((default-directory (pyvenv-workon-home)))
+              (apply #'call-process
+                     pyvenv-virtualenvwrapper-python
+                     nil t nil
+                     "-m" "virtualenvwrapper.hook_loader"
+                     "--script" tmpfile
+                     (if (getenv "HOOK_VERBOSE_OPTION")
+                         (cons (getenv "HOOK_VERBOSE_OPTION")
+                               (cons hook args))
+                       (cons hook args)))
+              (call-process-shell-command
+               (mapconcat 'identity
+                          (list
+                           (format "%s -c 'import os, json; print(json.dumps(dict(os.environ)))'"
+                                   pyvenv-virtualenvwrapper-python)
+                           (format ". '%s'" tmpfile)
+                           (format
+                            "%s -c 'import os, json; print(\"\\n=-=-=\"); print(json.dumps(dict(os.environ)))'"
+                            pyvenv-virtualenvwrapper-python))
+                          "; ")
+               nil t nil))
+          (delete-file tmpfile)))
+      (goto-char (point-min))
+      (when (not (re-search-forward "No module named '?virtualenvwrapper'?" nil t))
+        (let* ((json-key-type 'string)
+               (env-before (json-read))
+               (hook-output-start-pos (point))
+               (hook-output-end-pos (when (re-search-forward "\n=-=-=\n" nil t)
+                                      (match-beginning 0)))
+               (env-after (when hook-output-end-pos (json-read))))
+          (when hook-output-end-pos
+            (let ((output (string-trim (buffer-substring hook-output-start-pos
+                                            hook-output-end-pos))))
+              (when (> (length output) 0)
+                (with-help-window "*Virtualenvwrapper Hook Output*"
+                  (with-current-buffer "*Virtualenvwrapper Hook Output*"
+                    (let ((inhibit-read-only t))
+                      (erase-buffer)
+                      (insert
+                       (format
+                        "Output from the virtualenvwrapper hook %s:\n\n"
+                        hook)
+                       output))))))
+            (when propagate-env
+              (dolist (binding (pyvenv--env-diff (sort env-before (lambda (x y) (string-lessp (car x) (car y))))
+                                           (sort env-after (lambda (x y) (string-lessp (car x) (car y))))))
+                (setenv (car binding) (cdr binding))
+                (when (eq (car binding) 'PATH)
+                  (let ((new-path-elts (split-string (cdr binding)
+                                                     path-separator)))
+                    (setq exec-path new-path-elts)
+                    (setq-default eshell-path-env new-path-elts)))))))))))
+
+
+(defun pyvenv--env-diff (env-before env-after)
+  "Calculate diff between ENV-BEFORE alist and ENV-AFTER alist.
+
+Both ENV-BEFORE and ENV-AFTER must be sorted alists of (STR . STR)."
+  (let (env-diff)
+    (while (or env-before env-after)
+      (cond
+       ;; K-V are the same, both proceed to the next one.
+       ((equal (car-safe env-before) (car-safe env-after))
+        (setq env-before (cdr env-before)
+              env-after (cdr env-after)))
+
+       ;; env-after is missing one element: add (K-before . nil) to diff
+       ((and env-before (or (null env-after) (string-lessp (caar env-before)
+                                                           (caar env-after))))
+        (setq env-diff (cons (cons (caar env-before) nil) env-diff)
+              env-before (cdr env-before)))
+       ;; Otherwise: add env-after element to the diff, progress env-after,
+       ;; progress env-before only if keys matched.
+       (t
+        (setq env-diff (cons (car env-after) env-diff))
+        (when (equal (caar env-after) (caar env-before))
+          (setq env-before (cdr env-before)))
+        (setq env-after (cdr env-after)))))
+    (nreverse env-diff)))
+
+
+;;;###autoload
+(defun pyvenv-restart-python ()
+  "Restart Python inferior processes."
+  (interactive)
+  (dolist (buf (buffer-list))
+    (with-current-buffer buf
+      (when (and (eq major-mode 'inferior-python-mode)
+                 (get-buffer-process buf))
+        (let ((cmd (combine-and-quote-strings (process-command
+                                               (get-buffer-process buf))))
+              (dedicated (if (string-match "\\[.*\\]$" (buffer-name buf))
+                             t
+                           nil))
+              (show nil))
+          (delete-process (get-buffer-process buf))
+          (goto-char (point-max))
+          (insert "\n\n"
+                  "###\n"
+                  (format "### Restarting in virtualenv %s (%s)\n"
+                          pyvenv-virtual-env-name pyvenv-virtual-env)
+                  "###\n"
+                  "\n\n")
+          (run-python cmd dedicated show)
+          (goto-char (point-max)))))))
+
+(defun pyvenv-hook-dir ()
+  "Return the current hook directory.
+
+This is usually the value of $VIRTUALENVWRAPPER_HOOK_DIR, but
+virtualenvwrapper has stopped exporting that variable, so we go
+back to the default of $WORKON_HOME or even just ~/.virtualenvs/."
+  (or (getenv "VIRTUALENVWRAPPER_HOOK_DIR")
+      (pyvenv-workon-home)))
+
+(defun pyvenv-workon-home ()
+  "Return the current workon home.
+
+This is the value of $WORKON_HOME or ~/.virtualenvs."
+  (or (getenv "WORKON_HOME")
+      (expand-file-name "~/.virtualenvs")))
+
+(defun pyvenv-virtualenvwrapper-supported ()
+  "Return true iff virtualenvwrapper is supported.
+
+Right now, this just checks if WORKON_HOME is set."
+  (getenv "WORKON_HOME"))
+
+(defun pyvenv--virtual-env-bin-dirs (virtual-env)
+  (let ((virtual-env
+	 (if (string= "/" (directory-file-name virtual-env))
+	     ""
+	   (directory-file-name virtual-env))))
+   (append
+    ;; Unix
+    (when (file-exists-p (format "%s/bin" virtual-env))
+      (list (format "%s/bin" virtual-env)))
+    ;; Windows
+    (when (file-exists-p (format "%s/Scripts" virtual-env))
+      (list (format "%s/Scripts" virtual-env)
+            ;; Apparently, some virtualenv
+            ;; versions on windows put the
+            ;; python.exe in the virtualenv root
+            ;; for some reason?
+            virtual-env)))))
+
+(defun pyvenv--replace-once-destructive (list oldvalue newvalue)
+  "Replace one element equal to OLDVALUE with NEWVALUE values in LIST."
+  (let ((cur-elt list))
+    (while (and cur-elt (not (equal oldvalue (car cur-elt))))
+      (setq cur-elt (cdr cur-elt)))
+    (when cur-elt (setcar cur-elt newvalue))))
+
+(defun pyvenv--remove-many-once (values-to-remove list)
+  "Return a copy of LIST with each element from VALUES-TO-REMOVE removed once."
+  ;; Non-interned symbol is not eq to anything but itself.
+  (let ((values-to-remove (copy-sequence values-to-remove))
+        (sentinel (make-symbol "sentinel")))
+    (delq sentinel
+          (mapcar (lambda (x)
+                    (if (pyvenv--replace-once-destructive values-to-remove x sentinel)
+                        sentinel
+                      x))
+                  list))))
+
+(defun pyvenv--prepend-to-pathsep-string (values-to-prepend str)
+  "Prepend values from VALUES-TO-PREPEND list to path-delimited STR."
+  (mapconcat 'identity
+             (append values-to-prepend (split-string str path-separator))
+             path-separator))
+
+(defun pyvenv--remove-from-pathsep-string (values-to-remove str)
+  "Remove all values from VALUES-TO-REMOVE list from path-delimited STR."
+  (mapconcat 'identity
+             (pyvenv--remove-many-once values-to-remove (split-string str path-separator))
+             path-separator))
+
+(defun pyvenv--add-dirs-to-PATH (dirs-to-add)
+  "Add DIRS-TO-ADD to different variables related to execution paths."
+  (let* ((new-eshell-path-env (pyvenv--prepend-to-pathsep-string dirs-to-add (default-value 'eshell-path-env)))
+         (new-path-envvar (pyvenv--prepend-to-pathsep-string dirs-to-add (getenv "PATH"))))
+    (setq exec-path (append dirs-to-add exec-path))
+    (setq-default eshell-path-env new-eshell-path-env)
+    (setenv "PATH" new-path-envvar)))
+
+(defun pyvenv--remove-dirs-from-PATH (dirs-to-remove)
+  "Remove DIRS-TO-REMOVE from different variables related to execution paths."
+  (let* ((new-eshell-path-env (pyvenv--remove-from-pathsep-string dirs-to-remove (default-value 'eshell-path-env)))
+         (new-path-envvar (pyvenv--remove-from-pathsep-string dirs-to-remove (getenv "PATH"))))
+    (setq exec-path (pyvenv--remove-many-once dirs-to-remove exec-path))
+    (setq-default eshell-path-env new-eshell-path-env)
+    (setenv "PATH" new-path-envvar)))
+
+;;; Compatibility
+
+(when (not (fboundp 'file-name-base))
+  ;; Emacs 24.3
+  (defun file-name-base (&optional filename)
+    "Return the base name of the FILENAME: no directory, no extension.
+FILENAME defaults to `buffer-file-name'."
+    (file-name-sans-extension
+     (file-name-nondirectory (or filename (buffer-file-name)))))
+  )
+
+(when (not (boundp 'mode-line-misc-info))
+  (defvar mode-line-misc-info nil
+    "Compatibility variable for 24.3+")
+  (let ((line mode-line-format))
+    (while line
+      (when (eq 'which-func-mode
+                (car-safe (car-safe (cdr line))))
+        (setcdr line (cons 'mode-line-misc-format
+                           (cdr line)))
+        (setq line (cdr line)))
+      (setq line (cdr line)))))
+
+(provide 'pyvenv)
+;;; pyvenv.el ends here
diff --git a/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv.elc b/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv.elc
new file mode 100644
index 0000000..fc82a15
Binary files /dev/null and b/emacs/.emacs.d/elpa/pyvenv-20211014.707/pyvenv.elc differ
diff --git a/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters-autoloads.el b/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters-autoloads.el
new file mode 100644
index 0000000..63deb67
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters-autoloads.el
@@ -0,0 +1,51 @@
+;;; rainbow-delimiters-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from rainbow-delimiters.el
+
+(autoload 'rainbow-delimiters-mode "rainbow-delimiters" "\
+Highlight nested parentheses, brackets, and braces according to their depth.
+
+This is a minor mode.  If called interactively, toggle the
+`Rainbow-Delimiters mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `rainbow-delimiters-mode'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(autoload 'rainbow-delimiters-mode-enable "rainbow-delimiters" "\
+Enable `rainbow-delimiters-mode'.")
+(autoload 'rainbow-delimiters-mode-disable "rainbow-delimiters" "\
+Disable `rainbow-delimiters-mode'.")
+(register-definition-prefixes "rainbow-delimiters" '("rainbow-delimiters-"))
+
+;;; End of scraped data
+
+(provide 'rainbow-delimiters-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; rainbow-delimiters-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters-pkg.el b/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters-pkg.el
new file mode 100644
index 0000000..9a62602
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters-pkg.el
@@ -0,0 +1,11 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "rainbow-delimiters" "20210515.1254"
+  "Highlight brackets according to their depth."
+  ()
+  :url "https://github.com/Fanael/rainbow-delimiters"
+  :commit "7919681b0d883502155d5b26e791fec15da6aeca"
+  :revdesc "7919681b0d88"
+  :keywords '("faces" "convenience" "lisp" "tools")
+  :authors '(("Jeremy Rayman" . "opensource@jeremyrayman.com")
+             ("Fanael Linithien" . "fanael4@gmail.com"))
+  :maintainers '(("Fanael Linithien" . "fanael4@gmail.com")))
diff --git a/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters.el b/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters.el
new file mode 100644
index 0000000..4834d97
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters.el
@@ -0,0 +1,310 @@
+;;; rainbow-delimiters.el --- Highlight brackets according to their depth -*- lexical-binding: t -*-
+
+;; Copyright (C)
+;;   2010-2013 Jeremy Rayman
+;;   2013-2021 Fanael Linithien
+;; Author: Jeremy Rayman <opensource@jeremyrayman.com>
+;;         Fanael Linithien <fanael4@gmail.com>
+;; Maintainer: Fanael Linithien <fanael4@gmail.com>
+;; Created: 2010-09-02
+;; Package-Version: 20210515.1254
+;; Package-Revision: 7919681b0d88
+;; Keywords: faces, convenience, lisp, tools
+;; Homepage: https://github.com/Fanael/rainbow-delimiters
+
+;; Note: despite `lexical-binding', there's no Emacs 24 dependency.
+;; This is merely an optimization for Emacs 24+, the code is supposed to work
+;; with *both* dynamic and lexical binding.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Installation:
+
+;; The recommended way is to use MELPA (http://melpa.org/) or MELPA Stable
+;; (http://stable.melpa.org/). If either is in your `package-archives', do
+;;   M-x package-install RET rainbow-delimiters RET
+;; Otherwise, open `rainbow-delimiters.el' in Emacs and use
+;;   M-x package-install-from-buffer
+;; Any other methods of installation are unsupported.
+
+;;; Commentary:
+;;
+;; Rainbow-delimiters is a "rainbow parentheses"-like mode which highlights
+;; parentheses, brackets, and braces according to their depth. Each
+;; successive level is highlighted in a different color. This makes it easy
+;; to spot matching delimiters, orient yourself in the code, and tell which
+;; statements are at a given level.
+;;
+;; Great care has been taken to make this mode fast. You shouldn't see
+;; any discernible change in scrolling or editing speed while using it,
+;; even in delimiter-rich languages like Clojure, Lisp, and Scheme.
+;;
+;; Usage:
+;;
+;; To toggle the mode in the current buffer:
+;;   M-x rainbow-delimiters-mode
+;; To start the mode automatically in `foo-mode', add the following to your init
+;; file:
+;;   (add-hook 'foo-mode-hook #'rainbow-delimiters-mode)
+;; To start the mode automatically in most programming modes (Emacs 24 and
+;; above):
+;;   (add-hook 'prog-mode-hook #'rainbow-delimiters-mode)
+;;
+;; Customization:
+;;
+;; To customize various options, including the color theme:
+;;   M-x customize-group rainbow-delimiters
+;;
+;; You can specify custom colors by customizing following faces:
+;; - Faces take the form `rainbow-delimiters-depth-N-face', with N being the
+;;   depth. Depth begins at 1, the outermost color. Faces exist for depths 1-9.
+;; - The unmatched delimiter face: `rainbow-delimiters-unmatched-face'.
+;; - The mismatched delimiter face: `rainbow-delimiters-mismatched-face'.
+
+;;; Code:
+
+(defgroup rainbow-delimiters nil
+  "Highlight nested parentheses, brackets, and braces according to their depth."
+  :prefix "rainbow-delimiters-"
+  :link '(url-link :tag "Website for rainbow-delimiters"
+                   "https://github.com/Fanael/rainbow-delimiters")
+  :group 'applications)
+
+(defgroup rainbow-delimiters-faces nil
+  "Faces for successively nested pairs of delimiters.
+
+When depth exceeds innermost defined face, colors cycle back through."
+  :group 'rainbow-delimiters
+  :group 'faces
+  :link '(custom-group-link "rainbow-delimiters")
+  :prefix "rainbow-delimiters-")
+
+(defcustom rainbow-delimiters-pick-face-function
+  #'rainbow-delimiters-default-pick-face
+  "The function used to pick a face used to highlight a delimiter.
+The function should take three arguments (DEPTH MATCH LOC), where:
+  - DEPTH is the delimiter depth; when zero or negative, it's an unmatched
+    delimiter.
+  - MATCH is nil iff the delimiter is a mismatched closing delimiter.
+  - LOC is the location of the delimiter.
+The function should return a value suitable to use as a value of the `face' text
+property, or nil, in which case the delimiter is not highlighted.
+The function should not move the point or mark or change the match data."
+  :tag "Pick face function"
+  :type 'function
+  :group 'rainbow-delimiters)
+
+(defface rainbow-delimiters-base-face
+  '((default (:inherit unspecified)))
+  "Face inherited by all other rainbow-delimiter faces."
+  :group 'rainbow-delimiters-faces)
+
+(defface rainbow-delimiters-base-error-face
+  '((default (:inherit rainbow-delimiters-base-face))
+    (t (:foreground "#88090B")))
+  "Face inherited by all other rainbow-delimiter error faces."
+  :group 'rainbow-delimiters-faces)
+
+(defface rainbow-delimiters-unmatched-face
+  '((default (:inherit rainbow-delimiters-base-error-face)))
+  "Face to highlight unmatched closing delimiters in."
+  :group 'rainbow-delimiters-faces)
+
+(defface rainbow-delimiters-mismatched-face
+  '((default (:inherit rainbow-delimiters-unmatched-face)))
+  "Face to highlight mismatched closing delimiters in."
+  :group 'rainbow-delimiters-faces)
+
+(eval-when-compile
+  (defmacro rainbow-delimiters--define-depth-faces ()
+    (let ((faces '())
+          (light-colors ["#707183" "#7388d6" "#909183" "#709870" "#907373"
+                         "#6276ba" "#858580" "#80a880" "#887070"])
+          (dark-colors ["grey55" "#93a8c6" "#b0b1a3" "#97b098" "#aebed8"
+                        "#b0b0b3" "#90a890" "#a2b6da" "#9cb6ad"]))
+      (dotimes (i 9)
+        (push `(defface ,(intern (format "rainbow-delimiters-depth-%d-face" (1+ i)))
+                 '((default (:inherit rainbow-delimiters-base-face))
+                   (((class color) (background light)) :foreground ,(aref light-colors i))
+                   (((class color) (background dark)) :foreground ,(aref dark-colors i)))
+                 ,(format "Nested delimiter face, depth %d." (1+ i))
+                 :group 'rainbow-delimiters-faces)
+              faces))
+      `(progn ,@faces))))
+(rainbow-delimiters--define-depth-faces)
+
+(defcustom rainbow-delimiters-max-face-count 9
+  "Number of faces defined for highlighting delimiter levels.
+
+Determines depth at which to cycle through faces again.
+
+It's safe to change this variable provided that for all integers from 1 to the
+new value inclusive, a face `rainbow-delimiters-depth-N-face' is defined."
+  :type 'integer
+  :group 'rainbow-delimiters)
+
+(defcustom rainbow-delimiters-outermost-only-face-count 0
+  "Number of faces to be used only for N outermost delimiter levels.
+
+This should be smaller than `rainbow-delimiters-max-face-count'."
+  :type 'integer
+  :group 'rainbow-delimiters)
+
+
+(defun rainbow-delimiters-default-pick-face (depth match _loc)
+  "Return a face name appropriate for nesting depth DEPTH.
+DEPTH and MATCH are as in `rainbow-delimiters-pick-face-function'.
+
+The returned value is either `rainbow-delimiters-unmatched-face',
+`rainbow-delimiters-mismatched-face', or one of the
+`rainbow-delimiters-depth-N-face' faces, obeying
+`rainbow-delimiters-max-face-count' and
+`rainbow-delimiters-outermost-only-face-count'."
+  (cond
+   ((<= depth 0)
+    'rainbow-delimiters-unmatched-face)
+   ((not match)
+    'rainbow-delimiters-mismatched-face)
+   (t
+    (intern-soft
+     (concat "rainbow-delimiters-depth-"
+             (number-to-string
+              (if (<= depth rainbow-delimiters-max-face-count)
+                  ;; Our nesting depth has a face defined for it.
+                  depth
+                ;; Deeper than # of defined faces; cycle back through to
+                ;; `rainbow-delimiters-outermost-only-face-count' + 1.
+                ;; Return face # that corresponds to current nesting level.
+                (+ 1 rainbow-delimiters-outermost-only-face-count
+                   (mod (- depth rainbow-delimiters-max-face-count 1)
+                        (- rainbow-delimiters-max-face-count
+                           rainbow-delimiters-outermost-only-face-count)))))
+             "-face")))))
+
+(defun rainbow-delimiters--apply-color (loc depth match)
+  "Highlight a single delimiter at LOC according to DEPTH.
+
+LOC is the location of the character to add text properties to.
+DEPTH is the nested depth at LOC, which determines the face to use.
+MATCH is nil iff it's a mismatched closing delimiter."
+  (let ((face (funcall rainbow-delimiters-pick-face-function depth match loc)))
+    (when face
+      (font-lock-prepend-text-property loc (1+ loc) 'face face))))
+
+(defun rainbow-delimiters--char-ineligible-p (loc ppss delim-syntax-code)
+  "Return t if char at LOC should not be highlighted.
+PPSS is the `parse-partial-sexp' state at LOC.
+DELIM-SYNTAX-CODE is the `car' of a raw syntax descriptor at LOC.
+
+Returns t if char at loc meets one of the following conditions:
+- Inside a string.
+- Inside a comment.
+- Is an escaped char, e.g. ?\)"
+  (or
+   (nth 3 ppss)                ; inside string?
+   (nth 4 ppss)                ; inside comment?
+   (nth 5 ppss)                ; escaped according to the syntax table?
+   ;; Note: no need to consider single-char openers, they're already handled
+   ;; by looking at ppss.
+   (cond
+    ;; Two character opener, LOC at the first character?
+    ((/= 0 (logand #x10000 delim-syntax-code))
+     (/= 0 (logand #x20000 (or (car (syntax-after (1+ loc))) 0))))
+    ;; Two character opener, LOC at the second character?
+    ((/= 0 (logand #x20000 delim-syntax-code))
+     (/= 0 (logand #x10000 (or (car (syntax-after (1- loc))) 0))))
+    (t
+     nil))))
+
+;; Main function called by font-lock.
+(defun rainbow-delimiters--propertize (end)
+  "Highlight delimiters in region between point and END.
+
+Used by font-lock for dynamic highlighting."
+  (when (bound-and-true-p mmm-current-submode)
+    ;; `mmm-mode' is weird and apparently needs this hack, because otherwise we
+    ;; may end up thinking matched parentheses are mismatched.
+    (widen))
+  (let* ((last-ppss-pos (point))
+         (ppss (syntax-ppss)))
+    (while (> end (progn (skip-syntax-forward "^()" end)
+                         (point)))
+      (let* ((delim-pos (point))
+             (delim-syntax (syntax-after delim-pos)))
+        (setq ppss (parse-partial-sexp last-ppss-pos delim-pos nil nil ppss))
+        (setq last-ppss-pos delim-pos)
+        ;; `skip-syntax-forward' leaves the point at the delimiter, move past
+        ;; it.
+        (forward-char)
+        (let ((delim-syntax-code (car delim-syntax)))
+          (cond
+           ((rainbow-delimiters--char-ineligible-p delim-pos ppss delim-syntax-code)
+            nil)
+           ((= 4 (logand #xFFFF delim-syntax-code))
+            ;; The (1+ ...) is needed because `parse-partial-sexp' returns the
+            ;; depth at the opening delimiter, not in the block being started.
+            (rainbow-delimiters--apply-color delim-pos (1+ (nth 0 ppss)) t))
+           (t
+            ;; Not an opening delimiter, so it's a closing delimiter.
+            (let ((matches-p (eq (cdr delim-syntax) (char-after (nth 1 ppss)))))
+              (rainbow-delimiters--apply-color delim-pos (nth 0 ppss) matches-p))))))))
+  ;; We already fontified the delimiters, tell font-lock there's nothing more
+  ;; to do.
+  nil)
+
+;; NB: no face defined here because we apply the faces ourselves instead of
+;; leaving that to font-lock.
+(defconst rainbow-delimiters--font-lock-keywords
+  '(rainbow-delimiters--propertize))
+
+;;;###autoload
+(define-minor-mode rainbow-delimiters-mode
+  "Highlight nested parentheses, brackets, and braces according to their depth."
+  :init-value nil
+  :lighter "" ; No modeline lighter - it's already obvious when the mode is on.
+  :keymap nil
+  (font-lock-remove-keywords nil rainbow-delimiters--font-lock-keywords)
+  (when rainbow-delimiters-mode
+    (font-lock-add-keywords nil rainbow-delimiters--font-lock-keywords 'append)
+    (set (make-local-variable 'jit-lock-contextually) t)
+    (when (or (bound-and-true-p syntax-begin-function)
+              (bound-and-true-p font-lock-beginning-of-syntax-function))
+      ;; We're going to modify `syntax-begin-function', so flush the cache to
+      ;; avoid getting cached values that used the old value.
+      (syntax-ppss-flush-cache 0))
+    ;; `syntax-begin-function' may break the assumption we rely on that
+    ;; `syntax-ppss' is exactly equivalent to `parse-partial-sexp' from
+    ;; `point-min'. Just don't use it, the performance hit should be negligible.
+    (when (boundp 'syntax-begin-function)
+      (set (make-local-variable 'syntax-begin-function) nil))
+    ;; Obsolete equivalent of `syntax-begin-function'.
+    (when (boundp 'font-lock-beginning-of-syntax-function)
+      (set (make-local-variable 'font-lock-beginning-of-syntax-function) nil)))
+  (when font-lock-mode
+    (if (fboundp 'font-lock-flush)
+        (font-lock-flush)
+      (with-no-warnings (font-lock-fontify-buffer)))))
+
+;;;###autoload
+(defun rainbow-delimiters-mode-enable ()
+  "Enable `rainbow-delimiters-mode'."
+  (rainbow-delimiters-mode 1))
+
+;;;###autoload
+(defun rainbow-delimiters-mode-disable ()
+  "Disable `rainbow-delimiters-mode'."
+  (rainbow-delimiters-mode 0))
+
+(provide 'rainbow-delimiters)
+;;; rainbow-delimiters.el ends here
diff --git a/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters.elc b/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters.elc
new file mode 100644
index 0000000..d66ea6e
Binary files /dev/null and b/emacs/.emacs.d/elpa/rainbow-delimiters-20210515.1254/rainbow-delimiters.elc differ
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/dir b/emacs/.emacs.d/elpa/rg-20260823.1828/dir
new file mode 100644
index 0000000..24769cc
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/dir
@@ -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
+* RG: (rgel.info).              Search like a King with ripgrep in Emacs.
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-autoloads.el b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-autoloads.el
new file mode 100644
index 0000000..dfedb9a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-autoloads.el
@@ -0,0 +1,184 @@
+;;; rg-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from rg.el
+
+(defvar rg-keymap-prefix "\3s" "\
+Prefix for global `rg' keymap.")
+(custom-autoload 'rg-keymap-prefix "rg" t)
+(defvar rg-command-line-flags-function 'identity "\
+Function to modify command line flags of a search.
+The argument of the function is an optional list of search specific
+command line flags and the function shall return a list of command
+line flags to use.")
+(autoload 'rg-define-toggle "rg" "\
+Define a command line flag that can be toggled from the rg result buffer.
+
+This will create a function with prefix \"rg-custom-toggle-flag-\"
+concatenated with the FLAG name, stripped of any leading dashes.  Flag
+must be a form that will be evaluated to a string at macro expansion
+time.  For instance, if FLAG is \"--invert-match\" the function name
+will be `rg-custom-toggle-flag-invert-match'.  If the flag contains a
+value that will be excluded from the function name.
+
+Optional KEY is a key binding that is added to `rg-mode-map'.  If the
+optional DEFAULT parameter is non nil the flag will be enabled by default.
+
+(fn FLAG &optional KEY DEFAULT)" nil t)
+(autoload 'rg-enable-default-bindings "rg" "\
+Enable the global `rg' default key bindings under PREFIX key.
+If prefix is not supplied `rg-keymap-prefix' is used.
+
+(fn &optional PREFIX)" t)
+(autoload 'rg-use-old-defaults "rg" "\
+Restore default settings pre version 2.0.0.")
+(autoload 'rg-define-search "rg" "\
+Define an rg search functions named NAME.
+ARGS is a search specification that defines parameters of a search.
+It optionally starts with a string that is used as the docstring for
+the defined function.  The rest of ARGS contains key value pairs
+according to the specification below.  All keys are optional with
+specified default if left out.
+
+:query      Method for retrieving the search string.  Allowed values
+            are `point' which means extract thing at point and `ask'
+            which means prompt the user for a string.  Any form that
+            evaluates to a string is allowed.
+            Default is `ask'.
+:format     Specifies if :query is interpreted literally (`literal')
+            or as a regexp (`regexp').  If it is a form, eg.
+            (not `current-prefix-arg'), and is non-nil the :query is
+            interpreted literally, otherwise as a regexp.
+            Default is `regexp'.
+:files      Form that evaluates to a file alias or custom file glob.
+            `current' means extract alias from current buffer file name,
+            `ask' will prompt the user.
+            Default is `ask'.
+:dir        Root search directory.  Allowed values are `ask' for user
+            prompt, `current' for current dir and `project' for project
+            root.  Any form that evaluates to a directory string is
+            also allowed.
+            Default is `ask'.
+:confirm    `never', `always', or `prefix' are allowed values.  Specifies
+            if the the final search command line string can be modified
+            and confirmed by the user.
+            Default is `never'.
+:flags      `ask' or a list of command line flags that will be used when
+            invoking the search.
+:menu       Bind the command into `rg-menu'.  Must be a list with three
+            items in it.  The first item is the description of the
+            group in which the new command will appear.  If the group
+            does not exist a new will be created.  The second item is
+            the key binding for this new command (ether a key vector
+            or a key description string) and the third item is the
+            description of the command that will appear in the menu.
+
+Example:
+(rg-define-search search-home-dir-in-elisp
+  \"Doc string.\"
+  :query ask
+  :format literal
+  :files \"elisp\"
+  :dir (getenv \"HOME\"))
+  :menu (\"Custom\" \"H\" \"Home dir\")
+
+(fn NAME &rest ARGS)" nil t)
+(function-put 'rg-define-search 'lisp-indent-function 'defun)
+ (autoload 'rg-project "rg.el" "" t)
+ (autoload 'rg-dwim-project-dir "rg.el" "" t)
+ (autoload 'rg-dwim-current-dir "rg.el" "" t)
+ (autoload 'rg-dwim-current-file "rg.el" "" t)
+(autoload 'rg-dwim "rg" "\
+Run ripgrep without user interaction figuring out the intention by magic(!).
+The default magic searches for thing at point in files matching
+current file under project root directory.
+
+With \\[universal-argument] prefix (CURDIR), search is done in
+current dir instead of project root.
+
+With repeated \\[universal-argument] prefix, search is done in
+the current dir and using the current variable `buffer-file-name'
+as a pattern.  Subdirectories are still searched, so different
+files with the same name pattern still will be searched.
+
+(fn &optional CURDIR)" t)
+ (autoload 'rg-literal "rg.el" "" t)
+ (autoload 'rg "rg.el" "" t)
+(register-definition-prefixes "rg" '("kill-rg" "rg-"))
+
+
+;;; Generated autoloads from rg-header.el
+
+(register-definition-prefixes "rg-header" '("rg-"))
+
+
+;;; Generated autoloads from rg-history.el
+
+(register-definition-prefixes "rg-history" '("rg-history-"))
+
+
+;;; Generated autoloads from rg-ibuffer.el
+
+(autoload 'rg-list-searches "rg-ibuffer" "\
+List all `rg-mode' buffers in `ibuffer'." t)
+(register-definition-prefixes "rg-ibuffer" '("rg-"))
+
+
+;;; Generated autoloads from rg-info-hack.el
+
+(register-definition-prefixes "rg-info-hack" '("info-insert-file-contents"))
+
+
+;;; Generated autoloads from rg-isearch.el
+
+ (autoload 'rg-isearch-current-file "rg-isearch.el" "" t)
+ (autoload 'rg-isearch-current-dir "rg-isearch.el" "" t)
+ (autoload 'rg-isearch-project "rg-isearch.el" "" t)
+ (autoload 'rg-isearch-menu "rg-isearch.el" "" t)
+(register-definition-prefixes "rg-isearch" '("rg-get-isearch-string"))
+
+
+;;; Generated autoloads from rg-menu.el
+
+ (autoload 'rg-menu "rg-menu.el" "" t)
+(autoload 'rg-enable-menu "rg-menu" "\
+Bind `rg-menu' to PREFIX key.
+If prefix is not supplied `rg-keymap-prefix' is used.
+
+(fn &optional PREFIX)" t)
+(register-definition-prefixes "rg-menu" '("rg-menu-"))
+
+
+;;; Generated autoloads from rg-result.el
+
+(register-definition-prefixes "rg-result" '("rg-"))
+
+
+;;; Generated autoloads from wgrep-rg.el
+
+(autoload 'wgrep-rg-setup "wgrep-rg" "\
+Setup wgrep rg support.")
+(add-hook 'rg-mode-hook 'wgrep-rg-setup)
+(register-definition-prefixes "wgrep-rg" '("wgrep-rg-"))
+
+;;; End of scraped data
+
+(provide 'rg-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; rg-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-header.el b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-header.el
new file mode 100644
index 0000000..ee61280
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-header.el
@@ -0,0 +1,179 @@
+;;; rg-header.el --- Header line for rg-mode -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2018 David Landell <david.landell@sunnyhill.email>
+;;
+;; Author: David Landell <david.landell@sunnyhill.email>
+;; URL: https://github.com/dajva/rg.el
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Commentary:
+
+;; Header line format for rg-mode result buffer.
+
+;;; Code:
+
+(require 'mouse)
+
+(declare-function rg-cur-search-pattern "rg-result.el")
+
+
+;; Customization
+(defcustom rg-header-max-search-string-length nil
+  "The max line length of header line search string item."
+  :type '(choice (const :tag "Don't truncate" nil)
+                 (number :tag "The max width"))
+  :group 'rg)
+
+
+;; Faces
+(defface rg-toggle-on-face
+  '((t :inherit rg-file-tag-face))
+  "face for toggle \"on\" text in header."
+  :group 'rg-face)
+
+(defface rg-toggle-off-face
+  '((t :inherit rg-error-face))
+  "face for toggle \"off\" text in header."
+  :group 'rg-face)
+
+(defface rg-literal-face
+  '((t :inherit rg-filename-face))
+  "face for literal label in header."
+  :group 'rg-face)
+
+(defface rg-regexp-face
+  '((t :inherit compilation-line-number))
+  "face for regexp label in header."
+  :group 'rg-face)
+
+
+;; Defuns
+(defun rg-header-render-label (labelform)
+  "Return a fontified header label.
+LABELFORM is either a string to render or a form where the `car' is a
+conditional and the two following items are then and else specs.
+Specs are lists where the the `car' is the labels string and the
+`cadr' is font to use for that string."
+  (list '(:propertize "[" font-lock-face (header-line bold))
+        (cond
+         ((stringp labelform)
+          `(:propertize ,labelform font-lock-face (header-line bold)))
+         ((listp labelform)
+          (let* ((condition (nth 0 labelform))
+                 (then (nth 1 labelform))
+                 (else (nth 2 labelform)))
+            `(:eval (if ,condition
+                        (propertize ,(nth 0 then) 'font-lock-face '(,(nth 1 then) header-line bold))
+                      (propertize ,(nth 0 else) 'font-lock-face '(,(nth 1 else) header-line bold))))))
+         (t (error "Not a string or list")))
+        '(:propertize "]" font-lock-face (header-line bold))
+        '(": ")))
+
+(defun rg-header-render-toggle (on)
+  "Return a fontified toggle symbol.
+If ON is non nil, render \"on\" string, otherwise render \"off\"
+string."
+  `(:eval (let* ((on ,on)
+                 (value (if on "on " "off"))
+                 (face (if on 'rg-toggle-on-face 'rg-toggle-off-face)))
+            (propertize value 'font-lock-face `(bold ,face)))))
+
+(defun rg-header-mouse-action (command help &rest items)
+  "Add a keymap with mouse click action for COMMAND.
+When hoovering HELP is shown as a tooltip.  ITEMS is the header line
+items that the map will be applied to."
+  (let ((map (make-sparse-keymap)))
+    (define-key map
+      (if (or (> emacs-major-version 30)
+              (and (= emacs-major-version 30) (>= emacs-minor-version 2)))
+          [header-line mouse-1]
+        [header-line mouse-2])
+      (lambda (click)
+        (interactive "e")
+        (mouse-select-window click)
+        (call-interactively command)))
+    `(:propertize ,items mouse-face header-line-highlight
+                  help-echo ,help
+                  keymap ,map)))
+
+(defun rg-header-truncate-search-pattern (search)
+  "Truncate SEARCH if it exceeds `rg-header-max-search-string-length'."
+  (if (rg-header-truncates-p search)
+      (truncate-string-to-width search
+                                rg-header-max-search-string-length
+                                0
+                                nil
+                                t)
+    search))
+
+(defun rg-header-truncates-p (search)
+  "Verify that SEARCH would be truncated."
+  (and (numberp rg-header-max-search-string-length)
+       (< rg-header-max-search-string-length (length search))))
+
+(defun rg-header-search-help ()
+  "Get the search help for the current buffer."
+  (let ((pattern (rg-cur-search-pattern)))
+
+    (if (rg-header-truncates-p pattern)
+        (concat "Change search string: " pattern)
+      "Change search string")))
+
+;; Use full-command here to avoid dependency on rg-search
+;; struct. Should be properly fixed.
+(defun rg-create-header-line (search full-command)
+  "Create the header line for SEARCH.
+If FULL-COMMAND specifies if the full command line search was done."
+  (let ((itemspace "  "))
+    (setq header-line-format
+          (if full-command
+              (list (rg-header-render-label "command line") "no refinement")
+            (list
+             (rg-header-mouse-action
+              'rg-rerun-toggle-rexexp-literal "Toggle literal/regexp"
+              (rg-header-render-label `((rg-search-literal ,search)
+                                        ("literal" rg-literal-face)
+                                        ("regexp" rg-regexp-face))))
+             (rg-header-mouse-action
+              'rg-rerun-change-query (rg-header-search-help)
+              `(:eval (rg-header-truncate-search-pattern (rg-search-pattern ,search))))
+             itemspace
+             (rg-header-render-label "files")
+             (rg-header-mouse-action
+              'rg-rerun-change-files "Change file types"
+              `(:eval (rg-search-files ,search)))
+             itemspace
+             (rg-header-render-label "case")
+             (rg-header-mouse-action
+              'rg-rerun-toggle-case "Toggle case"
+              (rg-header-render-toggle
+               `(not (member "-i" (rg-search-flags ,search)))))
+             itemspace
+             (rg-header-render-label "ign")
+             (rg-header-mouse-action
+              'rg-rerun-toggle-ignore "Toggle ignore"
+              (rg-header-render-toggle
+               `(not (member "--no-ignore" (rg-search-flags ,search)))))
+             itemspace
+             (rg-header-render-label "hits")
+               '(:eval (format "%d" rg-hit-count)))))))
+
+(provide 'rg-header)
+
+;;; rg-header.el ends here
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-header.elc b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-header.elc
new file mode 100644
index 0000000..7b33115
Binary files /dev/null and b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-header.elc differ
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-history.el b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-history.el
new file mode 100644
index 0000000..60aa058
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-history.el
@@ -0,0 +1,61 @@
+;;; rg-history.el --- History navigation in rg.el -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2018 David Landell <david.landell@sunnyhill.email>
+;;
+;; Author: David Landell <david.landell@sunnyhill.email>
+;; URL: https://github.com/dajva/rg.el
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Commentary:
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'subr-x)
+
+(cl-defstruct (rg-history (:constructor rg-history-create)
+                          (:copier nil))
+  past                    ; list of searches for backward navigation
+  present                 ; current search
+  future)                 ; list of searches for forward navigation
+
+(defun rg-history-push (item instance)
+  "Push a new ITEM to the rg-history INSTANCE."
+  (when-let* ((present (rg-history-present instance)))
+    (push present (rg-history-past instance)))
+  (setf (rg-history-present instance) item)
+  (setf (rg-history-future instance) nil))
+
+(defun rg-history-back (instance)
+  "Move back in the rg-history INSTANCE.
+Return the new current search."
+  (when-let* ((prev (pop (rg-history-past instance))))
+    (push (rg-history-present instance) (rg-history-future instance))
+    (setf (rg-history-present instance) prev)))
+
+(defun rg-history-forward (instance)
+  "Move forward in the rg-history INSTANCE.
+Return the new current search."
+  (when-let* ((next (pop (rg-history-future instance))))
+    (push (rg-history-present instance) (rg-history-past instance))
+    (setf (rg-history-present instance) next)))
+
+(provide 'rg-history)
+
+;;; rg-history.el ends here
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-history.elc b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-history.elc
new file mode 100644
index 0000000..7a17ee7
Binary files /dev/null and b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-history.elc differ
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-ibuffer.el b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-ibuffer.el
new file mode 100644
index 0000000..40f753b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-ibuffer.el
@@ -0,0 +1,96 @@
+;;; rg-ibuffer.el --- List search buffers for rg-mode -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2018 David Landell <david.landell@sunnyhill.email>
+;;
+;; Author: David Landell <david.landell@sunnyhill.email>
+;; URL: https://github.com/dajva/rg.el
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Commentary:
+
+;; Use ibuffer to list active searches.
+
+;;; Code:
+
+(require 'ibuf-ext)
+(require 'ibuffer)
+(require 'rg-result)
+
+(defconst rg-search-list-buffer-name "*Searches rg*")
+
+(defun rg-ibuffer-search-updated()
+  "This function is executed when search list buffer is updated."
+  (when-let* ((list-buffer (get-buffer rg-search-list-buffer-name)))
+    (ignore-errors
+      (with-current-buffer list-buffer
+        (ibuffer-update nil t)))))
+
+(defun rg-ibuffer-buffer-killed ()
+  "Function run when the search list buffer is killed."
+  (remove-hook 'rg-filter-hook #'rg-ibuffer-search-updated))
+
+(define-ibuffer-column rg-search-term
+  (:name "Search" :props ('face 'rg-match-face))
+  (ignore mark)
+  (if rg-cur-search
+      (rg-search-pattern rg-cur-search)
+    "N/A"))
+
+(define-ibuffer-column rg-hit-count
+  (:name "Hits")
+  (ignore mark)
+  (number-to-string rg-hit-count))
+
+(define-ibuffer-column rg-search-dir
+  (:name "Directory" :props ('face 'rg-filename-face))
+  (ignore mark)
+  (if rg-cur-search
+      (rg-search-dir rg-cur-search)
+    "N/A"))
+
+(define-ibuffer-column rg-file-types
+  (:name "Type")
+  (ignore mark)
+  (if rg-cur-search
+      (rg-search-files rg-cur-search)
+    "N/A"))
+
+;;;###autoload
+(defun rg-list-searches ()
+  "List all `rg-mode' buffers in `ibuffer'."
+  (interactive)
+  (let ((other-window (equal current-prefix-arg '(4))))
+    (ibuffer other-window rg-search-list-buffer-name '((mode . rg-mode)) nil nil nil
+             '((mark " "
+                     (name 16 16 nil :elide) " "
+                     (rg-search-term 18 18 nil :elide) " "
+                     (rg-hit-count 7 7) " "
+                     (rg-file-types 7 7) " "
+                     (process 10 10)
+                     (rg-search-dir 20 -1 nil :elide) " ")))
+    (add-hook 'rg-filter-hook #'rg-ibuffer-search-updated)
+    (with-current-buffer rg-search-list-buffer-name
+      (ibuffer-auto-mode)
+      (set (make-local-variable 'ibuffer-use-header-line) nil)
+      (ibuffer-clear-filter-groups)
+      (add-hook 'kill-buffer-hook #'rg-ibuffer-buffer-killed nil t))))
+
+(provide 'rg-ibuffer)
+
+;;; rg-ibuffer.el ends here
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-ibuffer.elc b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-ibuffer.elc
new file mode 100644
index 0000000..95fc9db
Binary files /dev/null and b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-ibuffer.elc differ
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-info-hack.el b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-info-hack.el
new file mode 100644
index 0000000..0f5b3f3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-info-hack.el
@@ -0,0 +1,52 @@
+;;; rg-info-hack.el --- Make sure rg.el info documentation looks good -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2019 David Landell <david.landell@sunnyhill.email>
+;;
+;; Author: David Landell <david.landell@sunnyhill.email>
+;; URL: https://github.com/dajva/rg.el
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Commentary:
+
+;;; Code:
+(require 'info)
+
+(define-advice info-insert-file-contents
+    (:after (&rest _) sphinx-info-insert-file-contents)
+  "Hack to hide \"See\" in references.
+This makes `Info-hide-note-references' buffer-local and
+automatically set to `hide' iff it can be determined that this file
+is the rg.el documentation and was created from a Texinfo file
+  generated by Sphinx."
+  (set (make-local-variable
+	'Info-hide-note-references)
+       (default-value 'Info-hide-note-references))
+  (save-excursion
+    (save-restriction
+      (widen) (goto-char (point-min))
+      (when (and (search-forward "* RG:" nil t)
+                 (search-forward
+                  "Generated by Sphinx"
+                  (save-excursion (search-forward "\x1f" nil t)) t))
+        (set (make-local-variable 'Info-hide-note-references)
+             'hide)))))
+
+(provide 'rg-info-hack)
+
+;;; rg-info-hack.el ends here
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-info-hack.elc b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-info-hack.elc
new file mode 100644
index 0000000..aff0835
Binary files /dev/null and b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-info-hack.elc differ
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-isearch.el b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-isearch.el
new file mode 100644
index 0000000..f74ec61
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-isearch.el
@@ -0,0 +1,88 @@
+;;; rg-isearch.el --- rg integration into isearch -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2020 David Landell <david.landell@sunnyhill.email>
+;;
+;; Author: David Landell <david.landell@sunnyhill.email>
+;; URL: https://github.com/dajva/rg.el
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Commentary:
+
+;; This file provides rg isearch integration.
+;; Add this to your configuration to bind chosen key in isearch minibuffer:
+;;
+;; (define-key isearch-mode-map "\M-sr" 'rg-isearch-menu)
+;;
+
+;; See info node `(rgel)Isearch search' for documentation or online at https://rgel.readthedocs.io/.
+
+;;; Code:
+
+(require 'rg)
+
+(defun rg-get-isearch-string ()
+  "Extract the isearch string from the last isearch."
+  ;; Mimic what `isearch-occur' does.
+  (or (cond
+       ;; We can't handle arbitrary functions so just use the string.
+       ((functionp isearch-regexp-function) isearch-string)
+       ;; isearch-occur handles this as word search so insert word boundary
+       (isearch-regexp-function (concat "\b" isearch-string "\b"))
+       (isearch-regexp isearch-string)
+       (t isearch-string))
+      ""))
+
+;;;###autoload (autoload 'rg-isearch-current-file "rg-isearch.el" "" t)
+(rg-define-search rg-isearch-current-file
+  "Run ripgrep on current file searching for latest isearch string."
+  :dir current
+  :query (rg-get-isearch-string)
+  :format literal
+  :files (rg-get-buffer-file-name)
+  :dir current)
+
+;;;###autoload (autoload 'rg-isearch-current-dir "rg-isearch.el" "" t)
+(rg-define-search rg-isearch-current-dir
+  "Run ripgrep in current directory searching for latest isearch string
+in files matching the current file type."
+  :query (rg-get-isearch-string)
+  :format literal
+  :files current
+  :dir current)
+
+;;;###autoload (autoload 'rg-isearch-project "rg-isearch.el" "" t)
+(rg-define-search rg-isearch-project
+  "Run ripgrep in current project searching for latest isearch string
+in files matching the current file type."
+  :dir project
+  :query (rg-get-isearch-string)
+  :format literal
+  :files current)
+
+;;;###autoload (autoload 'rg-isearch-menu "rg-isearch.el" "" t)
+(transient-define-prefix rg-isearch-menu ()
+  "Show menu for rg isearch commands."
+  [:description "Search with ripgrep"
+    (3 "f" "File" rg-isearch-current-file--transient)
+    (3 "d" "Dir" rg-isearch-current-dir--transient)
+    (3 "p" "Project" rg-isearch-project--transient)])
+
+(provide 'rg-isearch)
+
+;;; rg-isearch.el ends here
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-isearch.elc b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-isearch.elc
new file mode 100644
index 0000000..f677f3e
Binary files /dev/null and b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-isearch.elc differ
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-menu.el b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-menu.el
new file mode 100644
index 0000000..67960cd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-menu.el
@@ -0,0 +1,227 @@
+;;; rg-menu.el --- Menu interface for rg -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2017 David Landell <david.landell@sunnyhill.email>
+;;
+;; Author: David Landell <david.landell@sunnyhill.email>
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Commentary:
+
+;; Support a menu interface for rg.el based on transient.
+
+;;; Code:
+
+(require 'rg-result)
+(require 'seq)
+(require 'transient)
+(require 'cl-lib)
+
+;; Forward declarations
+(declare-function rg "rg.el")
+(declare-function rg-literal "rg.el")
+(declare-function rg-dwim "rg.el")
+(declare-function rg-project "rg.el")
+(declare-function rg-dwim-current-dir "rg.el")
+(declare-function rg-dwim-current-file "rg.el")
+(declare-function rg-list-searches "rg.el")
+(declare-function rg-save-search "rg.el")
+(declare-function rg-save-search-as-name "rg.el")
+(defvar rg-keymap-prefix)
+(defvar rg-command-line-flags-function)
+
+(defun rg-menu-search-initial-value ()
+  "Provide initial value for `rg-menu' transient command."
+  (when (eq major-mode 'rg-mode)
+    (rg-search-flags rg-cur-search)))
+
+(eval-and-compile
+  (defun rg-menu-create-search-body (func)
+    "Call FUNC from search menu with the flags set in the transient menu."
+    `((let* ((transient-flags (transient-args transient-current-command))
+             (function-flags (funcall rg-command-line-flags-function nil))
+             (rg-command-line-flags-function
+              (lambda (flags)
+                (append function-flags transient-flags flags))))
+        (call-interactively #',func))))
+
+  (defun rg-menu-create-rerun-body (func)
+    "Call FUNC from rerun menu with flags extracted with ARGFUNC.
+If INTERACTIVE is non nil, call func interactively, otherwise call it
+regularly."
+    `((let ((transient-flags (transient-args transient-current-command))
+            (current-flags (rg-search-flags rg-cur-search)))
+        (setf (rg-search-flags rg-cur-search) (seq-uniq (append current-flags transient-flags))))
+      (if (commandp #',func)
+          (call-interactively #',func)
+        (,func))))
+
+  (defun rg-menu-assemble-transient-wrapper (func body)
+    "Create a defun with name `FUNC--transient' with BODY."
+    (let ((func-name (concat (symbol-name func) "--transient"))
+          (doc-string (format "Transient wrapper around `%s' for `rg-menu'."
+                              (symbol-name func))))
+      `(progn
+         (defun ,(intern func-name) ()
+           (interactive)
+           ,@body)
+         (put ',(intern func-name) 'function-documentation
+              ;; quote to defer evalutation until func is available
+              '(concat ,doc-string "\n\n" (documentation ',func)))))))
+
+(defmacro rg-menu-wrap-transient-search (func)
+  "Wrap FUNC with a command that apply transient arguments to the search.
+FUNC is an initial search function and not a rerun function."
+  (rg-menu-assemble-transient-wrapper
+   func
+   (rg-menu-create-search-body func)))
+
+(defmacro rg-menu-wrap-transient-rerun (func)
+  "Wrap FUNC with a command that apply transient arguments to the rerun.
+FUNC is an rerun function invoked from an `rg-mode' buffer."
+  (rg-menu-assemble-transient-wrapper
+   func
+   (rg-menu-create-rerun-body func)))
+
+;; Regular rg entries
+(rg-menu-wrap-transient-search rg)
+(rg-menu-wrap-transient-search rg-literal)
+(rg-menu-wrap-transient-search rg-dwim)
+(rg-menu-wrap-transient-search rg-project)
+(rg-menu-wrap-transient-search rg-dwim-current-dir)
+(rg-menu-wrap-transient-search rg-dwim-current-file)
+(rg-menu-wrap-transient-search rg-list-searches)
+(rg-menu-wrap-transient-search rg-save-search)
+(rg-menu-wrap-transient-search rg-save-search-as-name)
+(rg-menu-wrap-transient-search rg-back-history)
+(rg-menu-wrap-transient-search rg-forward-history)
+
+;; Rerun rg entries
+(rg-menu-wrap-transient-rerun rg-rerun)
+(rg-menu-wrap-transient-rerun rg-rerun-change-regexp)
+(rg-menu-wrap-transient-rerun rg-rerun-change-literal)
+(rg-menu-wrap-transient-rerun rg-rerun-change-files)
+(rg-menu-wrap-transient-rerun rg-rerun-change-dir)
+
+;;;###autoload (autoload 'rg-menu "rg-menu.el" "" t)
+(transient-define-prefix rg-menu ()
+  "Show menu buffer for rg commands."
+  :man-page "rg"
+  :value 'rg-menu-search-initial-value
+  ["Switches"
+   (3 "-h" "Search hidden files" "--hidden")
+   (6 "-a" "Search binary files" "--text")
+   (4 "-z" "Search zipped files" "--search-zip")
+   (4 "-v" "Invert match" "--invert-match")
+   (4 "-U" "Multi line" "--multiline")
+   (4 "-." "Dot all" "--multiline-dotall")
+   (3 "-w" "Search words" "--word-regexp")
+   (5 "-x" "Search lines" "--line-regexp")
+   (5 "-P" "Use PCRE2 regexps" "--pcre2")
+   (4 "-1" "Don't cross file system" "--one-file-system")
+   (6 "-L" "Follow symlinks" "--follow")
+   (3 "-n" "Override ignore files" "--no-ignore")]
+  ["Options"
+   (3 "-C" "Show context" "--context=")
+   (6 "-B" "Show context before" "--before-context=")
+   (6 "-A" "Show context after" "--after-context=")
+   (4 "-M" "Omit long lines" "--max-columns=")
+   (4 "-m" "Max matches per file" "--max-count=")
+   (6 "-s" "Ignore large files" "--max-filesize=")
+   (4 "-g" "Filter files glob" "--glob=")
+   (6 "-i" "Filter files glob (no case)" "--iglob=")
+   (4 "-T" "Exclude files types" "--type-not=")
+   (5 "-S" "Sort result" "--sort=")
+   (5 "-R" "Reverse sort result" "--sortr=")
+   (6 "-E" "Force encoding" "--encoding=")
+   (6 "-r" "Replace match" "--replace=")]
+  [[:if-not-mode rg-mode
+    :description "Search"
+    (3 "d" "Dwim project" rg-dwim--transient)
+    (4 "c" "Dwim current directory" rg-dwim-current-dir--transient)
+    (4 "f" "Dwim current file" rg-dwim-current-file--transient)
+    (3 "r" "Regex" rg--transient)
+    (3 "t" "Literal" rg-literal--transient)
+    (3 "p" "Project" rg-project--transient)]
+   [:if-mode rg-mode
+    :description "Rerun"
+    (3 "g" "Go" rg-rerun--transient)
+    (3 "r" "Change regex" rg-rerun-change-regexp--transient)
+    (3 "t" "Change literal" rg-rerun-change-literal--transient)
+    (3 "f" "Change files" rg-rerun-change-files--transient)
+    (3 "d" "Change directory" rg-rerun-change-dir--transient)]
+   [:description "Manage"
+    (4 "l" "List" rg-list-searches--transient)
+    (4 "s" "Save" rg-save-search--transient)
+    (4 "S" "Save as name" rg-save-search-as-name--transient)]
+   [:if-mode rg-mode
+    :description "History"
+    (3 "b" "Back" rg-back-history--transient)
+    (3 "w" "Forward" rg-forward-history--transient)]])
+
+(eval-and-compile
+  (defun rg-menu-group-at-location-p (desc loc)
+    "Check if group with description DESC exist at location LOC."
+    (let ((suffix (transient-get-suffix 'rg-menu loc)))
+      (and suffix
+           (string= (plist-get (seq-elt suffix 1) :description) desc))))
+
+  (defun rg-menu-get-loc-of-group (desc)
+    "Find the location of the group with description DESC.
+Returns the transient location coordinates for the group or NIL if not found."
+    (let ((loc (list 2 0)))
+      (ignore-errors
+        (while (not (rg-menu-group-at-location-p desc loc))
+          (cl-incf (cl-second loc)))
+        loc)))
+
+  (defun rg-menu-transient-insert (group key description command)
+    "Insert a new suffix into the rg-menu under GROUP.
+GROUP is the description of an existing group. If the group does not exist
+A new group will be created. KEY and DESCRIPTION defines the binding
+and description of the new menu entry. COMMAND is a transient wrapped
+command."
+    (unless (stringp group)
+      (user-error "'%S' is not a string" group))
+    (unless (or (stringp key)
+                (vectorp key))
+      (user-error "'%S' should be a key description string or a key vector" key))
+    (unless (stringp description)
+      (user-error "'%S' is not a string" description))
+    (if-let* ((group-loc (rg-menu-get-loc-of-group group)))
+        (transient-append-suffix 'rg-menu (append group-loc '(-1))
+          (list 3 key description command))
+      (transient-append-suffix 'rg-menu '(-1 -1)
+        (vector group (list 3 key description command))))))
+
+;;;###autoload
+(defun rg-enable-menu (&optional prefix)
+  "Bind `rg-menu' to PREFIX key.
+If prefix is not supplied `rg-keymap-prefix' is used."
+  (interactive)
+  (setq prefix (or prefix rg-keymap-prefix))
+  (when prefix
+    (global-set-key prefix #'rg-menu)
+    ;; If it's already bound it might have been rebound so keep that
+    ;; instead of overriding.
+    (unless (where-is-internal #'rg-menu (list rg-mode-map) t)
+      (define-key rg-mode-map "m" #'rg-menu))))
+
+(provide 'rg-menu)
+
+;;; rg-menu.el ends here
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-menu.elc b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-menu.elc
new file mode 100644
index 0000000..c369fd5
Binary files /dev/null and b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-menu.elc differ
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-pkg.el b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-pkg.el
new file mode 100644
index 0000000..6c6f516
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-pkg.el
@@ -0,0 +1,14 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "rg" "20260823.1828"
+  "A search tool based on ripgrep."
+  '((emacs     "28.1")
+    (transient "0.9.2")
+    (wgrep     "2.1.10"))
+  :url "https://github.com/dajva/rg.el"
+  :commit "6b00e2ae98c47cf7ea04d26636e11b7fa2a540e3"
+  :revdesc "6b00e2ae98c4"
+  :keywords '("matching" "tools")
+  :authors '(("David Landell" . "david.landell@sunnyhill.email")
+             ("Roland McGrath" . "roland@gnu.org"))
+  :maintainers '(("David Landell" . "david.landell@sunnyhill.email")
+                 ("Roland McGrath" . "roland@gnu.org")))
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-result.el b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-result.el
new file mode 100644
index 0000000..465210d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-result.el
@@ -0,0 +1,813 @@
+;;; rg-result.el ---- Result buffer implementation for rg.el. -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2018 David Landell <david.landell@sunnyhill.email>
+;;
+;; Author: David Landell <david.landell@sunnyhill.email>
+;; URL: https://github.com/dajva/rg.el
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Commentary:
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'grep)
+(require 'mouse)
+(require 'rg-header)
+(require 'rg-history)
+(require 'subr-x)
+(require 'wgrep-rg)
+
+;; Forward declarations.
+(declare-function rg-build-command "rg.el")
+(declare-function rg-get-type-aliases "rg.el")
+(declare-function rg-list-searches "rg.el")
+(declare-function rg-read-pattern "rg.el")
+(declare-function rg-menu "rg-menu.el")
+
+
+;; Customizations/public vars
+(defcustom rg-use-transient-menu t
+  "Use transient menu instead of a the global keymap."
+  :type 'boolean
+  :group 'rg
+  :package-version '(rg . "2.0.0"))
+
+(defcustom rg-show-columns nil
+  "If t, show the columns of the matches in the output buffer."
+  :type 'boolean
+  :group 'rg)
+
+(defcustom rg-group-result t
+  "Group matches in the same file together.
+If nil, the file name is repeated at the beginning of every match line."
+  :type 'boolean
+  :group 'rg
+  :package-version '(rg . "2.0.0"))
+
+(defcustom rg-show-header t
+  "Show header in results buffer if non nil."
+  :type 'boolean
+  :group 'rg)
+
+(defcustom rg-hide-command t
+  "Hide most of rg command line when non nil."
+  :type 'boolean
+  :group 'rg)
+
+(defcustom rg-align-position-numbers t
+  "If non nil, alignment of line and column numbers is turned on."
+  :type 'boolean
+  :group 'rg
+  :package-version '(rg . "2.0.0"))
+
+(defcustom rg-align-line-number-field-length 4
+  "Field length of aligned line numbers."
+  :type 'integer
+  :group 'rg)
+
+(defcustom rg-align-column-number-field-length 3
+  "Field length of aligned column numbers."
+  :type 'integer
+  :group 'rg)
+
+(defcustom rg-align-line-column-separator " "
+  "Separator used between line and column numbers.
+Depends on `rg-show-columns'.  Default is ':'."
+  :type 'string
+  :group 'rg
+  :package-version '(rg . "2.0.0"))
+
+(defcustom rg-align-position-content-separator " "
+  "Separator used between position numbers and the matching file content.
+Default is ':'."
+  :type 'string
+  :group 'rg
+  :package-version '(rg . "2.0.0"))
+
+(defvar rg-filter-hook nil
+  "Hook for new content in the rg buffer.
+This hook is called every time the rg buffer has been updated with
+new content and filtered through the `rg-filter' function.")
+
+
+;; Faces
+(defgroup rg-face nil
+  "Settings for rg faces."
+  :group 'rg)
+
+(defface rg-match-face
+  `((t :inherit ,grep-match-face))
+  "Face for match highlight."
+  :group 'rg-face)
+
+(defface rg-error-face
+  `((t :inherit ,grep-error-face))
+  "Face for error."
+  :group 'rg-face)
+
+(defface rg-context-face
+  `((t :inherit ,grep-context-face))
+  "Face for context lines."
+  :group 'rg-face)
+
+(defface rg-info-face
+  '((t :inherit compilation-info))
+  "Face for info."
+  :group 'rg-face)
+
+(defface rg-warning-face
+  '((t :inherit compilation-warning))
+  "Face for warning."
+  :group 'rg-face)
+
+(defface rg-filename-face
+  '((t :inherit rg-info-face))
+  "Face for filename."
+  :group 'rg-face)
+
+(defface rg-file-tag-face
+  '((t :inherit rg-info-face))
+  "Face for file tag in grouped layout."
+  :group 'rg-face)
+
+(defface rg-line-number-face
+  '((t :inherit compilation-line-number))
+  "Face for line numbers."
+  :group 'rg-face)
+
+(defface rg-column-number-face
+  '((t :inherit compilation-column-number))
+  "Face for column numbers."
+  :group 'rg-face)
+
+(defface rg-match-position-face
+  '((t :inherit default))
+  "Face that is being appended to file positions.
+This is the start of each matching line. This includes line number
+and, depending on configuration, column number and file name."
+  :group 'rg-face)
+
+
+;; Internal vars and structs
+
+(cl-defstruct (rg-search (:constructor rg-search-create)
+                         (:constructor rg-search-new (pattern files dir))
+                         (:copier rg-search-copy))
+  pattern                ; search pattern
+  files                  ; files to search
+  dir                    ; base directory
+  full-command           ; full-command (t or nil)
+  literal                ; literal patterh (t or nil)
+  flags)                 ; search specific flags
+
+(defvar-local rg-cur-search nil
+  "Stores parameters of last search.
+Becomes buffer local in `rg-mode' buffers.")
+(put 'rg-cur-search 'permanent-local t)
+
+(defvar-local rg-search-history nil
+  "Stores the search history per rg-mode buffer.")
+(put 'rg-search-history 'permanent-local t)
+
+(defvar-local rg-hit-count 0
+  "Stores number of hits in a search.")
+
+(defvar-local rg-match-positions nil
+  "Stores position of matches in a search.
+Each element is consists by (match-beginning-marker . match-string-length).")
+
+(defvar-local rg-recompile nil
+  "Is `recompile' in progress or `compile-start'.")
+
+(defconst rg-mode-font-lock-keywords
+  '(;; Command output lines.
+    (": \\(.+\\): \\(?:Permission denied\\|No such \\(?:file or directory\\|device or address\\)\\)$"
+     1 'rg-error-face)
+    ("^rg[/a-zA-z]* started.*"
+     (0 '(face nil compilation-message nil help-echo nil mouse-face nil) t))
+    ("^rg[/a-zA-z]* finished \\(?:(\\([0-9]+ matches found\\))\\|with \\(no matches found\\)\\).*"
+     (0 '(face nil compilation-message nil help-echo nil mouse-face nil) t)
+     (1 'rg-info-face nil t)
+     (2 'rg-warning-face nil t))
+    ("^rg[/a-zA-z]* \\(exited abnormally\\|interrupt\\|killed\\|terminated\\)\\(?:.*with code \\([0-9]+\\)\\)?.*"
+     (0 '(face nil compilation-message nil help-echo nil mouse-face nil) t)
+     (1 'rg-error-face)
+     (2 'rg-error-face nil t))
+    ;; "filename-linenumber-" or "linenumber-" format is used for
+    ;; context lines in rg
+    ("^ *\\(?:.+?-\\)?[0-9]+-.*\n" (0 'rg-context-face))
+    ;; Optional " after 'rg' is for windows where shell-quote-argument adds these.
+    ("^.*rg\"? \\(--color=always .*$\\)"
+     (0 rg-command-line-properties)
+     (1 (rg-hidden-command-line-properties)))
+    ("^-\\*- mode: rg; default-directory: \"\\(.*\\)\" -\\*-$"
+     (1 rg-directory-properties))
+    ("\\[\\.\\.\\. [0-9]+ more match\\(es\\)*\\]$"
+     (0 'rg-info-face nil t))))
+
+(defvar rg-menu-map
+  (let ((map (make-sparse-keymap "RipGrep")))
+    (define-key map [rg-toggle-command-hiding]
+      '(menu-item "Toggle command visibility"
+                  rg-toggle-command-hiding
+                  :help "Toggle showing verbose command options"))
+    (define-key map [rg-enable-wgrep]
+      '(menu-item "Edit buffer" wgrep-change-to-wgrep-mode
+                  :help "Edit buffer and save changes."))
+    (define-key map [rg-save-search]
+      '(menu-item "Save search" rg-save-search-as-name
+                  :help "Save current search."))
+    (define-key map [rg-search-list]
+      '(menu-item "List searches" rg-list-searches
+                  :help "List all ripgrep search buffers."))
+    (define-key map [rg-change-dir]
+      '(menu-item "Change dir" rg-rerun-change-dir
+                  :help "Rerun search in another directory."))
+    (define-key map [rg-change-files]
+      '(menu-item "Change file type" rg-rerun-change-files
+                  :help "Rerun search on other file types."))
+    (define-key map [rg-change-regexp]
+      '(menu-item "Change regexp" rg-rerun-change-regexp
+                  :help "Run regexp search with changed pattern."))
+    (define-key map [rg-change-literal]
+      '(menu-item "Change literal" rg-rerun-change-literal
+                  :help "Run literal search with changed search string."))
+    (define-key map [rg-kill-compilation]
+      '(menu-item "Kill Ripgrep" kill-compilation
+		  :help "Kill the currently running rg process"))
+    (define-key map [rg-another]
+      '(menu-item "Another search..."
+                  (lambda ()
+                    (interactive)
+                    (rg-save-search)
+                    (call-interactively 'rg))
+		  :help "Save current search results and start a new search."))
+    (define-key map [rg-recompile]
+      '(menu-item "Go..." rg-recompile
+		  :help "Rerun search"))
+    map))
+
+(defvar rg-mode-map
+  (let ((map (make-sparse-keymap)))
+    (set-keymap-parent map compilation-minor-mode-map)
+    (define-key map " " 'scroll-up-command)
+    (define-key map [?\S-\ ] 'scroll-down-command)
+    (define-key map "\^?" 'scroll-down-command)
+    (define-key map "\C-c\C-f" 'next-error-follow-minor-mode)
+    (define-key map "\r" 'compile-goto-error)  ;; ?
+    (define-key map "n" 'next-error-no-select)
+    (define-key map "p" 'previous-error-no-select)
+    (define-key map "{" 'compilation-previous-file)
+    (define-key map "}" 'compilation-next-file)
+    (define-key map "\t" 'compilation-next-error)
+    (define-key map [backtab] 'compilation-previous-error)
+
+    (define-key map "c" 'rg-rerun-toggle-case)
+    (define-key map "d" 'rg-rerun-change-dir)
+    (define-key map "f" 'rg-rerun-change-files)
+    (define-key map "g" 'rg-recompile)
+    (define-key map "i" 'rg-rerun-toggle-ignore)
+    (define-key map "L" 'rg-list-searches)
+    (define-key map "r" 'rg-rerun-change-regexp)
+    (define-key map "s" 'rg-save-search)
+    (define-key map "S" 'rg-save-search-as-name)
+    (define-key map "t" 'rg-rerun-change-literal)
+    (define-key map "e" 'wgrep-change-to-wgrep-mode)
+    (define-key map "\M-N" 'rg-next-file)
+    (define-key map "\M-P" 'rg-prev-file)
+    (define-key map "\C-c>" 'rg-forward-history)
+    (define-key map "\C-c<" 'rg-back-history)
+    (when rg-use-transient-menu
+      (define-key map "m" #'rg-menu))
+
+    ;; Set up the menu-bar
+    (define-key map [menu-bar rg]
+      (cons "RipGrep" rg-menu-map))
+    map)
+  "The keymap for `rg-mode'.")
+
+(defvar rg-ellipsis (if (char-displayable-p ?…) "[…]" "[...]")
+  "Used when hiding command line.")
+
+(defvar rg-finish-functions '()
+  "Functions to call when a ripgrep process finishes.
+
+Each function is called with two arguments: the compilation buffer,
+and a string describing how the process finished.")
+
+
+;; Defuns
+
+(defun rg-create-mouse-map (command)
+  "Create a mouse-map for the COMMAND.
+This makes sure point moves to click and that the clicked window is
+selected."
+  (let ((map (make-sparse-keymap)))
+    (define-key map [down-mouse-2] 'mouse-set-point)
+    (define-key map [mouse-2] command)
+    (define-key map "\C-m" command)
+    map))
+
+;; This solution was mostly copied from emacs grep.el and adjusted to
+;; be more usable.
+(defvar rg-command-line-properties
+  (let ((map (rg-create-mouse-map 'rg-toggle-command-hiding)))
+    `(face rg-context-face mouse-face highlight
+           help-echo "RET, mouse-2: show unabbreviated command"
+           keymap ,map))
+  "Properties for graying out and keymap for hiding command line.")
+
+(defun rg-hidden-command-line-properties ()
+  "Return properties of button-like ellipsis on part of rg command line."
+  (append
+   '(face nil rg-command-hidden-part t)
+   (when rg-hide-command
+     `(display ,rg-ellipsis))))
+
+(defun rg-toggle-command-hiding ()
+  "Toggle showing the hidden part of rg command line."
+  (interactive)
+  (with-silent-modifications
+    (let* ((beg (next-single-property-change (point-min) 'rg-command-hidden-part))
+           (end (when beg
+                  (next-single-property-change beg 'rg-command-hidden-part))))
+      (if end
+          (if (get-text-property beg 'display)
+              (remove-list-of-text-properties beg end '(display))
+            (add-text-properties beg end `(display ,rg-ellipsis)))
+        (user-error "No abbreviated part to hide/show")))))
+
+(defvar rg-directory-properties
+  (let ((map (rg-create-mouse-map 'rg-rerun-change-dir)))
+    `(face rg-filename-face mouse-face highlight
+           help-echo "RET, mouse-2: Change search directory"
+           keymap ,map))
+  "Properties for `default-directory' in header.")
+
+(defun rg-list-toggle (elem list)
+  "Remove ELEM from LIST if present or add it if not present.
+Returns the new list."
+  (if (member elem list)
+      (delete elem list)
+    (push elem list)))
+
+(defun rg-process-setup ()
+  "Setup compilation variables and buffer for `rg'.
+Set up `compilation-exit-message-function'."
+  (set (make-local-variable 'compilation-exit-message-function)
+       (lambda (status code msg)
+         (if (eq status 'exit)
+             ;; This relies on the fact that `compilation-start'
+             ;; sets buffer-modified to nil before running the command,
+             ;; so the buffer is still unmodified if there is no output.
+             (cond ((and (zerop code) (buffer-modified-p))
+                    `(,(format "finished (%d matches found)\n" rg-hit-count) . "matched"))
+                   ((not (buffer-modified-p))
+                    '("finished with no matches found\n" . "no match"))
+                   (t
+                    (cons msg code)))
+           (cons msg code)))))
+
+(defun rg-prepend-space (text length)
+  "Prepend TEXT with LENGTH number of spaces."
+  (let ((space-count (- length (length text))))
+    (concat
+     (when (> space-count 0) (make-string space-count ?\s))
+     text)))
+
+(defun rg-perform-position-numbers-alignment (line-number &optional column-number context-marker )
+  "Return aligned LINE-NUMBER, COLUMN-NUMBER and CONTEXT-MARKER."
+  (let* ((line-col-separator (or rg-align-line-column-separator ":"))
+         (pos-content-separator (or rg-align-position-content-separator ":"))
+         (pos-content-separator (if rg-show-columns
+                                    pos-content-separator
+                                  (propertize pos-content-separator 'invisible t)))
+         (line-number-width
+          (if (and rg-show-columns context-marker)
+              ;; Context lines should be aligned to column numbers
+              (+ rg-align-line-number-field-length
+                 (1+ rg-align-column-number-field-length))
+            rg-align-line-number-field-length))
+         (column-number (when column-number
+                          (if rg-show-columns
+                              column-number
+                            (propertize column-number 'invisible t)))))
+    (cl-assert (if column-number (not context-marker) context-marker))
+    (concat (rg-prepend-space line-number line-number-width)
+            (if column-number
+                (concat (if rg-show-columns
+                            line-col-separator
+                          pos-content-separator)
+                        (rg-prepend-space column-number
+                                          rg-align-column-number-field-length)
+                        pos-content-separator)
+              context-marker))))
+
+(defun rg-format-line-and-column-numbers (beg end)
+  "Align numbers in region defined by BEG and END."
+  (goto-char beg)
+  (while (re-search-forward
+          "^\033\\[[0]*m\033\\[32m\\([0-9]*?\\)\033\\[[0]*m\\(:\\|-\\)\\(?:\033\\[[0]*m\\([0-9]*?\\)\033\\[[0]*m:\\)?"
+          end 1)
+    (let* ((line-match (match-string 1))
+           (col-separator-match (match-string 2))
+           (context-marker (when (equal col-separator-match "-")
+                             col-separator-match))
+           (column-match (match-string 3)))
+    (cond
+     (rg-align-position-numbers
+      (replace-match
+       (rg-perform-position-numbers-alignment
+        line-match column-match context-marker)
+       t t))
+     ((and column-match (not rg-show-columns))
+      (replace-match
+       (propertize col-separator-match 'invisible t) t t nil 2)
+      (replace-match (propertize column-match 'invisible t) t t nil 3))))))
+
+(defun rg-filter ()
+  "Handle match highlighting escape sequences inserted by the rg process.
+This function is called from `compilation-filter-hook'."
+  (save-excursion
+    (forward-line 0)
+    (let ((end (point)) beg temp-positions)
+      (goto-char compilation-filter-start)
+      (forward-line 0)
+      (setq beg (point))
+      (when (zerop rg-hit-count)
+        (newline))
+      ;; Only operate on whole lines so we don't get caught with part of an
+      ;; escape sequence in one chunk and the rest in another.
+      (when (< (point) end)
+        (setq end (copy-marker end))
+        ;; Add File: in front of filename
+        (when rg-group-result
+          (while (re-search-forward "^\033\\[[0]*m\033\\[35m\\(.*?\\)\033\\[[0]*m$" end 1)
+            (replace-match (concat (propertize "File:"
+                                               'rg-file-message t
+                                               'face nil
+                                               'font-lock-face 'rg-file-tag-face)
+                                   " "
+                                   (propertize (match-string 1)
+                                               'face nil
+                                               'font-lock-face 'rg-filename-face))
+                           t t))
+          (goto-char beg))
+
+        ;; Highlight rg matches and delete marking sequences.
+        (while (re-search-forward "\033\\[[0]*m\033\\[[3]*1m\033\\[[3]*1m\\(.*?\\)\033\\[[0]*m" end 1)
+          (replace-match (propertize (match-string 1)
+                                     'face nil 'font-lock-face 'rg-match-face)
+                         t t)
+          (push (cons (copy-marker (match-beginning 0))
+                      (length (match-string 0)))
+                temp-positions)
+          (cl-incf rg-hit-count))
+        (rg-format-line-and-column-numbers beg end)
+
+        ;; Delete all remaining escape sequences
+        (goto-char beg)
+        (while (re-search-forward "\033\\[[0-9;]*[0mK]" end 1)
+          (replace-match "" t t))
+
+        (goto-char beg)
+
+        (setq rg-match-positions (nconc rg-match-positions (nreverse temp-positions)))
+
+        (run-hooks 'rg-filter-hook)))))
+
+;; The regexp and filter functions below were taken from ag.el
+;; Kudos to the people from https://github.com/Wilfred/ag.el for these.
+(defconst rg-file-line-column-pattern-nogroup
+  "^\\([^\n:]+?\\):\\([1-9][0-9]*\\):\\([1-9][0-9]*\\):"
+  "A regexp pattern that groups output.
+Groups into filename,line number and column number.")
+
+(defun rg-file-line-column-pattern-group ()
+  "A regexp pattern to match line number and column number with grouped output."
+  (concat "^ *\\([1-9][0-9]*\\)"
+          (regexp-quote (or (and rg-align-position-numbers
+                                 rg-align-line-column-separator) ":"))
+          " *\\([1-9][0-9]*\\)"
+          (regexp-quote (or (and rg-align-position-numbers
+                                 rg-align-position-content-separator) ":"))))
+
+(defconst rg-file-line-pattern-nogroup
+  "^\\([^\n:]+?\\):\\([1-9][0-9]*\\):"
+  "A regexp pattern that groups output into filename, line number.")
+
+(defun rg-file-line-pattern-group ()
+  "A regexp pattern to match line number with grouped output."
+  (concat "^ *\\([1-9][0-9]*\\)"
+          (regexp-quote (or (and rg-align-position-numbers
+                                 rg-align-position-content-separator) ":"))))
+
+(defun rg-match-grouped-filename ()
+  "Match filename backwards when a line/column match is found."
+  (save-match-data
+    (save-excursion
+      (when (re-search-backward "^File: \\(.*\\)$" (point-min) t)
+        (list (match-string 1))))))
+
+(defun rg-set-compilation-error-regexps ()
+  "Set the compilation mode regexps for errors for rg-mode buffers."
+  (set (make-local-variable 'compilation-error-regexp-alist)
+       '(rg-group-with-column
+         rg-nogroup-with-column
+         rg-group-no-column
+         rg-nogroup-no-column))
+  (set (make-local-variable 'compilation-error-regexp-alist-alist)
+       (list (cons 'rg-nogroup-no-column (list rg-file-line-pattern-nogroup 1 2))
+             (cons 'rg-nogroup-with-column (list rg-file-line-column-pattern-nogroup 1 2 3))
+             (cons 'rg-group-with-column (list (rg-file-line-column-pattern-group) 'rg-match-grouped-filename 1 2))
+             (cons 'rg-group-no-column (list (rg-file-line-pattern-group) 'rg-match-grouped-filename 1)))))
+
+(define-compilation-mode rg-mode "rg"
+  "Major mode for `rg' search results.
+Commands:
+\\<rg-mode-map>
+\\[rg-rerun-change-dir]\t Repeat this search in another directory (`rg-rerun-change-dir').
+\\[rg-rerun-change-files]\t Repeat this search with another file pattern (`rg-rerun-change-files').
+\\[rg-rerun-change-regexp]\t Change the search regexp for the current search (`rg-rerun-change-regexp').
+\\[rg-rerun-change-literal]\t Change the search literal for the current search (`rg-rerun-change-literal').
+\\[rg-rerun-toggle-ignore]\t Repeat search with toggled '--no-ignore' flag (`rg-rerun-toggle-ignore').
+\\[rg-rerun-toggle-case]\t Repeat search with toggled case insensitive setting (`rg-rerun-toggle-case').
+\\[rg-save-search-as-name]\t Save search result, prompt for new name (`rg-save-search-as-name').
+\\[rg-save-search]\t Save search result to some unique name (`rg-save-search').
+\\[wgrep-change-to-wgrep-mode]\t Change mode to `wgrep'.
+
+\\{rg-mode-map}"
+  (set (make-local-variable 'tool-bar-map) grep-mode-tool-bar-map)
+  (set (make-local-variable 'compilation-error-face) 'rg-filename-face)
+  (set (make-local-variable 'compilation-message-face) 'rg-match-position-face)
+  (set (make-local-variable 'compilation-line-face) 'rg-line-number-face)
+  (set (make-local-variable 'compilation-column-face) 'rg-column-number-face)
+
+  ;; compilation-directory-matcher can't be nil, so we set it to a regexp that
+  ;; can never match.
+  (set (make-local-variable 'compilation-directory-matcher) '("\\`a\\`"))
+  (set (make-local-variable 'compilation-process-setup-function)
+       'rg-process-setup)
+  (set (make-local-variable 'compilation-disable-input) t)
+  (set (make-local-variable 'compilation-error-screen-columns) nil)
+  (unless rg-search-history
+    (setq rg-search-history (rg-history-create)))
+  (set (make-local-variable 'compilation-filter-hook) '(rg-filter))
+  ;; Set compilation error regexps as the last compilation-mode-hook to be
+  ;; able to override these if they were set by other hooks.
+  (add-hook 'compilation-mode-hook
+            'rg-set-compilation-error-regexps 90 'local))
+
+(defun rg-maybe-show-header ()
+  "Recreate header if enabled."
+  (when rg-show-header
+    (rg-create-header-line 'rg-cur-search
+                           (rg-search-full-command rg-cur-search))))
+
+(defun rg-mode-init (search)
+  "Initiate `rg-mode' with SEARCH in current buffer."
+  (unless (eq major-mode 'rg-mode)
+    (error "Function rg-mode-init called in non rg mode buffer"))
+  (hack-dir-local-variables-non-file-buffer)
+  (setq rg-cur-search search)
+  (rg-history-push (rg-search-copy rg-cur-search)
+                   rg-search-history)
+  (rg-maybe-show-header)
+  (rg-configure-imenu))
+
+(defun rg-recompile ()
+  "Rerun the current search."
+  (interactive)
+  (let ((rg-recompile t))
+    (recompile))
+  (hack-dir-local-variables-non-file-buffer)
+  (rg-maybe-show-header)
+  (rg-configure-imenu))
+
+(defun rg-rerun (&optional no-history)
+  "Run `recompile' with `compilation-arguments' taken from `rg-cur-search'.
+If NO-HISTORY is non nil skip adding the search to the search history."
+  (let ((pattern (rg-search-pattern rg-cur-search))
+        (files (rg-search-files rg-cur-search))
+        (dir (rg-search-dir rg-cur-search))
+        (literal (rg-search-literal rg-cur-search))
+        (flags (rg-search-flags rg-cur-search)))
+    ;; compilation-directory is used as search dir and
+    ;; default-directory is used as the base for file paths.
+    (setq compilation-directory dir)
+    (setq default-directory compilation-directory)
+    (setcar compilation-arguments
+            (or (rg-search-full-command rg-cur-search)
+                (rg-build-command pattern files literal flags)))
+    (unless no-history
+      (rg-history-push (rg-search-copy rg-cur-search)
+                       rg-search-history))
+    (rg-recompile)))
+
+(defun rg-navigate-file-message (pos limit direction)
+  "Return position of next 'rg-file-message text property.
+POS is the start position of the search and LIMIT is the limit of the
+search.  If the property is not found within LIMIT, LIMIT is returned.  If
+DIRECTION is positive search forward in the buffer, otherwise search
+backward."
+  (let ((prop-change-func
+         (if (> direction 0)
+             'next-single-property-change
+           'previous-single-property-change)))
+    (while
+        (progn
+          (setq pos (funcall prop-change-func pos 'rg-file-message nil limit))
+          (and (not (eq pos limit))
+               (not (get-text-property pos 'rg-file-message)))))
+    pos))
+
+(defun rg-navigate-file-group (steps)
+  "Move point to the a matched result group in the compilation buffer.
+STEPS decides how many groups to move past.  Negative value means
+backwards and positive means forwards."
+  (let (move-to
+        (pos (point))
+        (steps-left (abs steps))
+        (limit
+         (if (< steps 0)
+             (point-min)
+           (point-max))))
+    (while  (and (> steps-left 0) (not (equal pos limit)))
+      (setq pos (rg-navigate-file-message pos limit steps))
+      (unless (eq pos limit)
+        (setq move-to pos))
+      (setq steps-left (- steps-left 1)))
+    (when move-to
+      (goto-char move-to))))
+
+(defun rg-rerun-toggle-flag (flag)
+  "Toggle FLAG in `rg-cur-search`."
+  (setf (rg-search-flags rg-cur-search)
+        (rg-list-toggle flag (rg-search-flags rg-cur-search)))
+  (rg-rerun))
+
+(defun rg-rerun-toggle-case ()
+  "Rerun last search with toggled case sensitivity setting."
+  (interactive)
+  (rg-rerun-toggle-flag "-i"))
+
+(defun rg-rerun-toggle-ignore ()
+  "Rerun last search with toggled '--no-ignore' flag."
+  (interactive)
+  (rg-rerun-toggle-flag "--no-ignore"))
+
+(defun rg-rerun-toggle-rexexp-literal ()
+  "Switch between literal and regexp and rerun last search."
+  (interactive)
+  (setf (rg-search-literal rg-cur-search)
+        (not (rg-search-literal rg-cur-search)))
+  (rg-rerun))
+
+(defun rg-rerun-change-query ()
+  "Rerun last search and change search string."
+  (interactive)
+  (rg-rerun-change-search-string
+   (rg-search-literal rg-cur-search)))
+
+(defun rg-rerun-change-search-string (literal)
+  "Rerun last search but prompt for new search pattern.
+IF LITERAL is non nil this will trigger a literal search,
+otherwise a regexp search."
+  (let ((pattern (rg-search-pattern rg-cur-search))
+        (read-from-minibuffer-orig (symbol-function 'read-from-minibuffer)))
+    ;; Override read-from-minibuffer in order to insert the original
+    ;; pattern in the input area.
+    (cl-letf (((symbol-function #'read-from-minibuffer)
+               (lambda (prompt &optional _ &rest args)
+                 (apply read-from-minibuffer-orig prompt pattern args))))
+      (setf (rg-search-pattern rg-cur-search) (rg-read-pattern literal pattern)))
+    (setf (rg-search-literal rg-cur-search) literal)
+    (rg-rerun)))
+
+(defun rg-rerun-change-regexp ()
+  "Rerun last search but prompt for new regexp."
+  (interactive)
+  (rg-rerun-change-search-string nil))
+
+(defun rg-rerun-change-literal ()
+  "Rerun last search but prompt for new literal."
+  (interactive)
+  (rg-rerun-change-search-string t))
+
+(defun rg-rerun-change-files()
+  "Rerun last search but prompt for new files."
+  (interactive)
+  (let ((files (rg-search-files rg-cur-search)))
+    (setf (rg-search-files rg-cur-search)
+          (completing-read
+           (concat "Repeat search in files (default: [" files "]): ")
+           (rg-get-type-aliases)
+           nil nil nil 'rg-files-history
+           files))
+    (rg-rerun)))
+
+(defun rg-rerun-change-dir()
+  "Rerun last search but prompt for new dir."
+  (interactive)
+  (setf (rg-search-dir rg-cur-search)
+        (read-directory-name "In directory: "
+                             (rg-search-dir rg-cur-search) nil))
+  (rg-rerun))
+
+(defun rg-next-file (n)
+  "Move point to next file's first match.
+Prefix arg N decides how many files to navigate.  When
+`rg-group-result' is nil this is the same as invoking
+`compilation-next-file', otherwise this will navigate to the
+next file with grouped matches."
+  (interactive "p")
+  (if rg-group-result
+      (when (rg-navigate-file-group n)
+        (forward-line))
+    (compilation-next-file n)))
+
+(defun rg-prev-file (n)
+  "Move point to previous file's first match.
+Prefix arg N decides how many files to navigate.  When
+`rg-group-result' is nil this is the same as invoking
+`compilation-previous-file', otherwise this will navigate to the
+previous file with grouped matches."
+  (interactive "p")
+  (if rg-group-result
+      (let ((steps
+             ;; On match rows we move 2 steps back to get to previous
+             ;; file, otherwise 1 step.  The later is on file
+             ;; headings, space between files and at the end of search results.
+             (if (or (get-text-property (point) 'rg-file-message)
+                     (save-excursion
+                       (beginning-of-line)
+                       (looking-at "^\\(?:rg finished .*\\)*$")))
+                 n
+               (+ n 1))))
+        (when (rg-navigate-file-group (- steps))
+          (forward-line)))
+    (compilation-previous-file n)))
+
+(defun rg-back-history ()
+  "Navigate back in the search history."
+  (interactive)
+  (if-let* ((prev (rg-history-back rg-search-history)))
+      (progn
+        (setq rg-cur-search (rg-search-copy prev))
+        (rg-rerun 'no-history))
+    (message "No more history elements for back.")))
+
+(defun rg-forward-history ()
+  "Navigate forward in the search history."
+  (interactive)
+  (if-let* ((next (rg-history-forward rg-search-history)))
+      (progn
+        (setq rg-cur-search (rg-search-copy next))
+        (rg-rerun 'no-history))
+    (message "No more history elements for forward.")))
+
+(defun rg-configure-imenu ()
+  "Add files with matches to imenu if rg-group-result is enabled."
+  (when rg-group-result
+    (setq imenu-create-index-function
+          (lambda ()
+            (goto-char (point-min))
+            (let ((elements nil)
+                  (filepath nil)
+                  (nextfile (point-min)))
+              (while (setq nextfile (rg-navigate-file-message nextfile nil 1))
+                (save-excursion
+                  (goto-char nextfile)
+                  (and (looking-at-p "^File: ") (forward-char 6))
+                  (setq filepath (buffer-substring-no-properties (point) (line-end-position))))
+                (push (cons filepath nextfile) elements))
+              (nreverse elements))))))
+
+(defun rg-cur-search-pattern ()
+  "Get the current search pattern."
+  (rg-search-pattern rg-cur-search))
+
+(provide 'rg-result)
+
+;; Local Variables:
+;; byte-compile-warnings: (not docstrings)
+;; End:
+
+;;; rg-result.el ends here
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg-result.elc b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-result.elc
new file mode 100644
index 0000000..b29bf8d
Binary files /dev/null and b/emacs/.emacs.d/elpa/rg-20260823.1828/rg-result.elc differ
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg.el b/emacs/.emacs.d/elpa/rg-20260823.1828/rg.el
new file mode 100644
index 0000000..8905e44
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/rg.el
@@ -0,0 +1,1002 @@
+;;; rg.el --- A search tool based on ripgrep -*- lexical-binding: t; -*-
+
+;; Copyright (C) 1985-1987, 1993-1999, 2001-2015 Free Software
+;; Foundation, Inc.
+;; Copyright (C) 2016-2018 David Landell <david.landell@sunnyhill.email>
+;;
+;; Author: David Landell <david.landell@sunnyhill.email>
+;;         Roland McGrath <roland@gnu.org>
+;; Package-Version: 20260823.1828
+;; Package-Revision: 6b00e2ae98c4
+;; URL: https://github.com/dajva/rg.el
+;; Package-Requires: ((emacs "28.1") (transient "0.9.2") (wgrep "2.1.10"))
+;; Keywords: matching, tools
+
+;; This file is not part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 3
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Commentary:
+
+;; A search package based on the ripgrep command line tool.
+;; It allows you to interactively create searches, doing automatic
+;; searches based on the editing context, refining and modifying
+;; search results and much more.  It is also highly configurable to be
+;; able to fit different users' needs.
+
+;; If you are used to built-in Emacs rgrep command, transitioning to
+;; rg should be simple.  rg provides a lot of extra features
+;; but the basics are similar.
+;;
+;; The big benefit of using ripgrep instead of grep as a backend is
+;; speed.  Especially when searching large source code repositories
+;; where ripgrep really shines.
+
+;; See info node `(rgel)Top' for documentation or online at https://rgel.readthedocs.io.
+
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'cus-edit)
+(require 'grep)
+(require 'rg-ibuffer)
+(require 'rg-menu)
+(require 'rg-result)
+(require 'rg-info-hack)
+(require 'subr-x)
+(require 'vc)
+(require 'files-x)
+
+
+;; Customizations/public vars
+(defgroup rg nil
+  "Settings for rg."
+  :group 'tools
+  :group 'external)
+
+(defcustom rg-custom-type-aliases
+  '()
+  "A list of file type aliases that are added to the ripgrep built in aliases.
+Each list element may be a (string . string) cons containing the name of the
+type alias and the file patterns, or a lambda returning a similar cons cell.
+A lambda should return nil if it currently has no type aliases to contribute."
+  :type '(repeat (choice (cons string string) function))
+  :group 'rg)
+
+(defcustom rg-prioritized-type-aliases '()
+  "A list of file type aliases that are prioritized.
+When detecting the file type from the current buffer these aliases are selected
+if there are conflicting aliases for a file type.  Contains only the alias names
+and need to match alias names of ripgrep's built in aliases.  The order of the
+list decides the priority among the types in the list."
+  :type '(repeat string)
+  :group 'rg)
+
+(defcustom rg-executable (executable-find "rg")
+  "Ripgrep executable."
+  :type 'string
+  :group 'rg)
+
+(defcustom rg-executable-per-connection t
+  "Invoke `executable-find' per host and store as connection local variable.
+Only works in Emacs 27.1 or later."
+  :type 'boolean
+  :group 'rg)
+
+(defcustom rg-command-line-flags nil
+  "List of command line flags for rg.
+Alternatively a function returning a list of flags."
+  :type '(choice function (repeat string))
+  :group 'rg)
+
+(defcustom rg-ignore-case 'case-fold-search
+  "Decides which mode of case insensitive search that is enabled.
+CASE-FOLD-SEARCH means that the variable `case-fold-search' will
+trigger smart-case functionality if non nil.
+SMART means that case insensitive search will be triggered if the
+search pattern contains only lower case.  If the pattern contains upper
+case letters, case sensitive search will be performed.  This is similar
+to the rg '--smart-case' flag.
+FORCE will force case insensitive search regardless of the content of
+the search pattern.
+NIL means case sensitive search will be forced."
+  :type '(choice (const :tag "Case Fold Search" case-fold-search)
+                 (const :tag "Smart" smart)
+                 (const :tag "Force" force)
+                 (const :tag "Off" nil))
+  :group 'rg)
+
+;;;###autoload
+(defcustom rg-keymap-prefix "\C-cs"
+  "Prefix for global `rg' keymap."
+  :type 'key-sequence
+  :group 'rg)
+
+(defcustom rg-default-alias-fallback "everything"
+  "The default file alias to use when no alias can be determined.
+This must be a string that can be match against the types returned
+from `rg-get-type-aliases'."
+  :type 'string
+  :group 'rg)
+
+(defcustom rg-buffer-name "rg"
+  "Search results buffer name.
+Can be string or function."
+  :type '(choice string function)
+  :group 'rg)
+
+(defcustom rg-ignore-ripgreprc t
+  "Ignore the ripgrep config file.
+Disabling this setting can break functionality of this package."
+  :type 'boolean
+  :group 'rg)
+
+(defcustom rg-w32-unicode nil
+  "Enable Unicode support on Windows.
+A workaround for NTEmacs subprocess not supporting Unicode arguments."
+  :type 'boolean
+  :group 'rg)
+
+(defcustom rg-w32-ripgrep-proxy
+  (expand-file-name "rg-w32-ripgrep-proxy.bat" user-emacs-directory)
+  "An automatically generated temporary batch file.
+Used to proxy ripgrep Unicode arguments."
+  :type 'string
+  :group 'rg)
+
+;;;###autoload
+(defvar rg-command-line-flags-function 'identity
+  "Function to modify command line flags of a search.
+The argument of the function is an optional list of search specific
+command line flags and the function shall return a list of command
+line flags to use.")
+
+
+;; Internal vars and structs
+(defvar rg-builtin-type-aliases-cache nil
+  "Cache for \"rg --type-list\".")
+
+(defvar rg-prioritized-type-aliases-cache nil
+  "Cache for `rg-prioritized-type-aliases'.")
+
+(defvar rg-initial-toggle-flags nil
+  "List of command line flags set by default by `rg-define-toggle' macro.")
+
+(defvar rg-history nil "History for full rg commands.")
+(defvar rg-files-history nil "History for files args.")
+(defvar rg-pattern-history nil "History for search patterns.")
+
+(defvar-local rg--executable-local 'unknown)
+
+(defvar rg-required-command-line-flags
+  '("--color=always"
+    "--colors=match:fg:red"
+    "--colors=path:fg:magenta"
+    "--colors=line:fg:green"
+    "--colors=column:none"
+    "-n"))
+
+(defconst rg-internal-type-aliases
+  '(("all" . "all defined type aliases") ; rg --type=all
+    ("everything" . "*")) ; rg without '--type' arg
+  "Internal type aliases for special purposes.
+These are not produced by \"rg --type-list\" but we need them anyway.")
+
+(defvar rg-global-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map "d" 'rg-dwim)
+    (define-key map "k" 'rg-kill-saved-searches)
+    (define-key map "l" 'rg-list-searches)
+    (define-key map "p" 'rg-project)
+    (define-key map "r" 'rg)
+    (define-key map "s" 'rg-save-search)
+    (define-key map "S" 'rg-save-search-as-name)
+    (define-key map "t" 'rg-literal)
+    map)
+  "The global keymap for `rg'.")
+
+
+;; Defuns
+(defun rg-has-connection-local-executable (criteria)
+  "Return non nil if there is a connection local executable for HOST."
+  (when (and (fboundp 'hack-connection-local-variables)
+             (boundp 'connection-local-variables-alist))
+    (hack-connection-local-variables criteria)
+    (assoc 'rg-executable connection-local-variables-alist)))
+
+(defun rg-find-executable ()
+  "Determine which rg executable to use."
+  (let* ((remote-host (file-remote-p default-directory 'host))
+         (criteria `(:application rg :machine ,remote-host)))
+    (if (and remote-host
+             rg-executable-per-connection
+             ;; Below are just to make byte compiler happy
+             (fboundp 'connection-local-set-profile-variables)
+             (fboundp 'connection-local-set-profiles)
+             (fboundp 'hack-connection-local-variables-apply)
+             (fboundp 'with-connection-local-variables))
+        (progn
+          ;; Find executable on remote host once
+          (when (not (rg-has-connection-local-executable criteria))
+            (let ((rg-vars-symbol (intern (concat "rg-vars-" remote-host)))
+                  (rg-exec (with-no-warnings (executable-find "rg" t))))
+              (connection-local-set-profile-variables
+               rg-vars-symbol
+               `((rg-executable . ,rg-exec)))
+              (connection-local-set-profiles criteria rg-vars-symbol)))
+          ;; Here there should be a remote executable available if found
+          (hack-connection-local-variables-apply criteria)
+          rg-executable)
+      ;; Use local executable for local buffer
+      (default-value 'rg-executable))))
+
+(defun rg-executable ()
+  "Return the \"rg\" executable.
+Raises an error if it can not be found."
+  (let ((executable (rg-find-executable)))
+    (if executable
+        (shell-quote-argument executable)
+      (user-error "No 'rg' executable found in host %s"
+                  (or (file-remote-p default-directory 'host) "localhost")))))
+
+(defun rg--buffer-name ()
+  "Wrapper for variable `rg-buffer-name'.  Return string or call function."
+  (if (functionp rg-buffer-name)
+      (funcall rg-buffer-name)
+    rg-buffer-name))
+
+(defun rg-buffer-name (&optional name-of-mode)
+  "Return search results buffer name.
+NAME-OF-MODE is needed to pass this function to `compilation-start'."
+  (ignore name-of-mode)
+  (if rg-recompile
+      (buffer-name)
+    (format "*%s*" (rg--buffer-name))))
+
+(defun rg-build-type-add-args ()
+  "Build a list of --type-add: \"foo:*.foo\" flags.
+Do this for each type in `rg-custom-type-aliases'."
+  (mapcar
+   (lambda (typedef)
+     (let ((name (car typedef))
+           (globs (cdr typedef)))
+       (mapconcat
+        (lambda (glob)
+          (concat "--type-add="
+                  (shell-quote-argument (concat name ":" glob))))
+        (split-string globs) " ")))
+   (rg-get-custom-type-aliases)))
+
+(defun rg-is-custom-file-pattern (files)
+  "Return non nil if FILES is a custom file pattern."
+  (not (assoc files (rg-get-type-aliases))))
+
+(defun rg-quote-flag (flag)
+  "If FLAG is an option with a value, shell quote the value if not already quoted.
+Options are expected to be in the format '--option=value'."
+  (if (and (string-match "\\`\\(--[^=]+=\\)\\(.*\\)\\'" flag)
+           (let ((val (match-string 2 flag)))
+             (not (or (string-prefix-p "'" val)
+                      (string-prefix-p "\"" val)))))
+      (concat (match-string 1 flag)
+              (shell-quote-argument (match-string 2 flag)))
+    flag))
+
+(defun rg-build-command (pattern files literal flags)
+  "Create the command line for PATTERN and FILES.
+LITERAL determines if search will be literal or regexp based and FLAGS
+are command line flags to use for the search."
+  (let ((command-line
+         (append
+          rg-required-command-line-flags
+          (when (or rg-show-columns rg-group-result)
+            (list "--column"))
+          (rg-build-type-add-args)
+          (mapcar #'rg-quote-flag
+                  (if (functionp rg-command-line-flags)
+                      (funcall rg-command-line-flags)
+                    rg-command-line-flags))
+          (mapcar #'rg-quote-flag flags)
+
+
+          (list
+           (if rg-group-result "--heading" "--no-heading"))
+          (when rg-ignore-ripgreprc
+            (list "--no-config"))
+          (when (rg-is-custom-file-pattern files)
+            (list (concat "--type-add=" (shell-quote-argument (concat "custom:" files)))))
+          (when literal
+            (list "--fixed-strings"))
+          (when (not (equal files "everything"))
+            (list "--type=<F>"))
+          (list "-e <R>")
+          (when (member system-type '(darwin windows-nt))
+            (list ".")))))
+
+    (let ((command (grep-expand-template
+                    (mapconcat 'identity (cons (rg-executable) (delete-dups command-line)) " ")
+                    pattern
+                    (if (rg-is-custom-file-pattern files) "custom" files))))
+      (cond ((and (eq system-type 'windows-nt) rg-w32-unicode)
+             (with-temp-file rg-w32-ripgrep-proxy
+               (set-buffer-multibyte t)
+               (setq buffer-file-coding-system 'utf-8-dos)
+               (insert (format "@echo off\n"))
+               (insert (format "chcp 65001 > nul\n"))
+               (insert (format "%s\n" command)))
+             rg-w32-ripgrep-proxy)
+            (t command)))))
+
+(defun rg-invoke-rg-type-list ()
+  "Invokes rg --type-list and return the result."
+  (shell-command-to-string (concat (rg-executable) " --type-list")))
+
+(defun rg-list-builtin-type-aliases ()
+  "Invokes rg --type-list and puts the result in an alist."
+  (let ((type-list (delete "" (split-string (rg-invoke-rg-type-list) "\n"))))
+    (mapcar
+     (lambda (type-alias)
+       (setq type-alias (split-string type-alias ":" t))
+       (cons (string-trim (car type-alias))
+             (string-trim
+              (mapconcat 'identity
+                         (split-string (cadr type-alias) "," t )
+                         " "))))
+     type-list)))
+
+
+(defun rg-get-custom-type-aliases ()
+  "Get alist of custom type aliases.
+Any lambda elements will be evaluated, and nil results will be
+filtered out."
+  (delq nil (mapcar
+             (lambda (ct) (if (functionp ct) (funcall ct) ct))
+             rg-custom-type-aliases)))
+
+(defun rg-get-type-aliases (&optional skip-internal)
+  "Return supported type aliases.
+If SKIP-INTERNAL is non nil the `rg-internal-type-aliases' will be
+excluded."
+  ;; Read from ripgrep once or if prioritized aliases changed.
+  (unless (and rg-builtin-type-aliases-cache
+               (equal rg-prioritized-type-aliases
+                      (mapcar #'car rg-prioritized-type-aliases-cache)))
+    (let ((builtin-aliases (rg-list-builtin-type-aliases)))
+      (if rg-prioritized-type-aliases
+          (progn
+            (let ((prioritized-type-aliases
+                   (seq-filter (lambda (item)
+                                 (member (car item) rg-prioritized-type-aliases))
+                               builtin-aliases)))
+              ;; Reorder the the found aliases to the same order as rg-prioritized-type-aliases
+              (setq rg-prioritized-type-aliases-cache
+                    (seq-map (lambda (item)
+                               (assoc item prioritized-type-aliases))
+                             rg-prioritized-type-aliases))
+              ;; Remove the prioritzed aliases from the builtin cache
+              ;; to avoid duplicates.
+              (setq rg-builtin-type-aliases-cache
+                    (seq-remove (lambda (item)
+                                  (member (car item) rg-prioritized-type-aliases))
+                                builtin-aliases))))
+        ;; Simple case, just assign
+        (setq rg-builtin-type-aliases-cache builtin-aliases)
+        (setq rg-prioritized-type-aliases-cache nil))))
+  (append (rg-get-custom-type-aliases)
+          rg-prioritized-type-aliases-cache
+          rg-builtin-type-aliases-cache
+          (unless skip-internal rg-internal-type-aliases)))
+
+(defun rg-default-alias ()
+  "Return the default alias by matching alias globs with the buffer file name."
+  (let* ((bufname (or (buffer-file-name)
+                      (replace-regexp-in-string "<[0-9]+>\\'" "" (buffer-name))))
+         (filename (and bufname
+                        (stringp bufname)
+                        (file-name-nondirectory bufname))))
+    (or
+     (when filename
+       (cl-find-if
+        (lambda (alias)
+          (string-match (mapconcat 'wildcard-to-regexp
+                                   (split-string (cdr alias) nil t)
+                                   "\\|")
+                        filename))
+        (rg-get-type-aliases t)))
+     ;; Default when an alias for the file can't be determined
+     (or
+      (cl-find-if
+       (lambda (alias)
+         (string= rg-default-alias-fallback (car alias)))
+       (rg-get-type-aliases))
+      (progn
+        (message "Warning: rg-default-alias-fallback customization does not match any alias. Using \"all\".")
+        (car rg-internal-type-aliases))))))
+
+(defun rg-tag-default ()
+  "Get the marked area or thing at point.
+Returns nil if nothing at point."
+  (or (and transient-mark-mode mark-active
+	   (/= (point) (mark))
+	   (buffer-substring-no-properties (point) (mark)))
+      (funcall (or find-tag-default-function
+		   (get major-mode 'find-tag-default-function)
+		   'find-tag-default))))
+
+(defun rg-read-files ()
+  "Read files argument for interactive rg."
+  (let ((default-alias (rg-default-alias)))
+    (completing-read
+     (concat "Search in files"
+             (if default-alias
+                 (concat
+                  " (default: [" (car default-alias) "] = "
+                  (cdr default-alias) ")"))
+             ": ")
+     (rg-get-type-aliases)
+     nil nil nil 'rg-files-history
+     (car default-alias))))
+
+(defun rg-read-pattern (literal &optional default)
+  "Read search pattern argument from user.
+If LITERAL is non nil prompt for literal string.
+DEFAULT is the default pattern to use at the prompt."
+  (let ((default (or default (rg-tag-default)))
+        (prompt (concat (if literal "Literal" "Regexp")
+                        " search for")))
+    (read-regexp prompt default 'rg-pattern-history)))
+
+(defun rg-project-root (file)
+  "Find the project root of the given FILE."
+  (or
+   (when (and (require 'projectile nil t)
+              (fboundp 'projectile-project-root))
+     (projectile-project-root))
+   (when (and (require 'find-file-in-project nil t)
+              (fboundp 'ffip-project-root))
+     (ffip-project-root))
+   (when (and (require 'project nil t)
+              (fboundp 'project-current))
+     (if-let* ((project (project-current)))
+         (cond
+          ((fboundp 'project-root)
+           (project-root project))
+          ((fboundp 'project-roots)
+           (car (project-roots project))))))
+   (let ((file (expand-file-name (or file default-directory))))
+     (condition-case nil
+         (vc-call-backend (vc-responsible-backend file) 'root file)
+       (error (file-name-directory file))))))
+
+(defun rg-run (pattern files dir &optional literal confirm flags)
+  "Execute rg command with supplied PATTERN, FILES and DIR.
+If LITERAL is nil interpret PATTERN as regexp, otherwise as a literal.
+CONFIRM allows the user to confirm and modify the command before
+executing.  FLAGS is additional command line flags to use in the search."
+  (unless (and (stringp pattern) (> (length pattern) 0))
+    (signal 'user-error '("Empty string: No search done")))
+  (wgrep-rg-warn-ag-setup)
+  (unless (and (file-directory-p dir) (file-readable-p dir))
+    (setq dir default-directory))
+  (rg-apply-case-flag pattern)
+  (setq dir (file-name-as-directory (expand-file-name dir)))
+  (let* ((flags (append rg-initial-toggle-flags flags))
+         (default-directory dir)
+         (command (rg-build-command
+                   pattern files literal
+                   flags))
+         confirmed)
+    (if confirm
+        (setq confirmed
+              (read-from-minibuffer "Confirm: "
+                                    command nil nil 'rg-history))
+      (add-to-history 'rg-history command))
+    (let ((search (rg-search-create
+                   :pattern pattern
+                   :files files
+                   :dir dir
+                   :literal literal
+                   :flags flags)))
+      (when (and confirmed
+                 (not (string= confirmed command)))
+        (setq command confirmed)
+        ;; If user changed command we can't know the parts of the
+        ;; search and needs to disable result buffer modifications.
+        (setf (rg-search-full-command search) command))
+      ;; Since `rg-buffer-name' can be changed through dir-locals file we
+      ;; need to apply variables from dir-locals that resides in search dir.
+      ;; This way the results buffer will receive correct name on `compilation-start'.
+      ;; `hack-dir-local-variables' is searching dir-locals file in
+      ;; `buffer-file-name' or `default-directory' directory.
+      ;; Temporary buffer must be created here to make sure that dir-locals
+      ;; file is loaded from `default-directory' defined above and
+      ;; not from `buffer-file-name' in case search is started from file buffer.
+      (with-temp-buffer
+        (hack-dir-local-variables-non-file-buffer)
+        ;; Setting process-setup-function makes exit-message-function work
+        ;; even when async processes aren't supported.
+        (with-current-buffer (compilation-start command 'rg-mode #'rg-buffer-name)
+          (rg-mode-init search)))))
+  (if (eq next-error-last-buffer (current-buffer))
+      (setq default-directory dir)))
+
+(defun rg-apply-case-flag (pattern)
+  "Make sure -i is added to the command if needed.
+The value of the `rg-ignore-case' variable and the case of the
+supplied PATTERN influences the result.  See `rg-ignore-case' for more
+detailed info."
+  (if (or (eq rg-ignore-case 'force)
+          (and (or (eq rg-ignore-case 'smart)
+                   (and (eq rg-ignore-case 'case-fold-search) case-fold-search))
+               (isearch-no-upper-case-p pattern t)))
+      (setq rg-initial-toggle-flags
+            (add-to-list 'rg-initial-toggle-flags "-i" ))
+    (setq rg-initial-toggle-flags
+          (delete "-i" rg-initial-toggle-flags))))
+
+(defun rg-get-rename-target ()
+  "Return the buffer that will be target for renaming."
+  (if (eq major-mode 'rg-mode)
+      (current-buffer)
+    (get-buffer (rg-buffer-name))))
+
+(defun rg-get-buffer-file-name ()
+  "Wrapper for function `buffer-file-name'.
+Return the result of function `buffer-file-name' if buffer has an
+associated file, otherwise raise a user error."
+  (if (buffer-file-name)
+      (file-name-nondirectory (buffer-file-name))
+    (user-error "Buffer does not have an associated file")))
+
+(defalias 'kill-rg 'kill-compilation)
+(defalias 'rg-kill-current 'kill-compilation "Kill the ongoing ripgrep search.")
+(make-obsolete 'kill-rg 'rg-kill-current "1.7.1")
+
+(defun rg-print-environment ()
+  "Print the environmet in which this package is running.
+The result is also copied to the `kill-ring'.  Should be attached to bug
+reports."
+  (interactive)
+  (let* ((settings
+          (thread-last (custom-group-members 'rg nil)
+            (seq-filter (lambda (item)
+                          (eq (cadr item) 'custom-variable)))
+            (mapcar (lambda (member)
+                      (cons (car member) (symbol-value (car member)))))))
+         (rg-version (car
+                      (split-string
+                       (shell-command-to-string (format "%s --version" (rg-executable)))
+                       "\n")))
+         (compilation-filter-advised
+          (when-let* ((advice-alist (get 'compilation-filter 'ad-advice-info)))
+            (cdr (assoc 'active advice-alist))))
+         (environment (concat
+                       "--------- RG environment ---------\n"
+                       (format "emacs-version: %s\n" (car (split-string (emacs-version) "\n")))
+                       (format "system: %s\n" system-type)
+                       (format "ripgrep-version: %s\n" rg-version)
+                       (format "compilation-filter-hook: %S\n" compilation-filter-hook)
+                       (format "compilation-filter-advised: %S\n" compilation-filter-advised)
+                       (mapconcat
+                        (lambda (setting) (format "%S: %S" (car setting) (cdr setting)))
+                        settings "\n")
+                       "\n------------------ END ------------------")))
+    (message environment)
+    (kill-new environment)))
+
+;;;###autoload
+(defmacro rg-define-toggle (flag &optional key default)
+  "Define a command line flag that can be toggled from the rg result buffer.
+
+This will create a function with prefix \"rg-custom-toggle-flag-\"
+concatenated with the FLAG name, stripped of any leading dashes.  Flag
+must be a form that will be evaluated to a string at macro expansion
+time.  For instance, if FLAG is \"--invert-match\" the function name
+will be `rg-custom-toggle-flag-invert-match'.  If the flag contains a
+value that will be excluded from the function name.
+
+Optional KEY is a key binding that is added to `rg-mode-map'.  If the
+optional DEFAULT parameter is non nil the flag will be enabled by default."
+  (let* ((flagvalue (eval flag))
+         (flagname (thread-last (car (split-string flagvalue " "  t))
+                     (string-remove-prefix "-")
+                     (string-remove-prefix "-")))
+         (funname (concat "rg-custom-toggle-flag-" flagname)))
+    `(progn
+       ,(if default
+            `(setq rg-initial-toggle-flags
+                   (add-to-list 'rg-initial-toggle-flags ,flagvalue))
+          `(setq rg-initial-toggle-flags
+                 (delete ,flagvalue rg-initial-toggle-flags)))
+       ,(when key
+          `(define-key rg-mode-map ,key (quote ,(intern funname))))
+       (defun ,(intern funname) ()
+         ,(format "Rerun last search with flag '%s' toggled." flagvalue)
+         (interactive)
+         (rg-rerun-toggle-flag ,flagvalue)))))
+
+(defun rg-save-search-as-name (newname)
+  "Save the search result in current result buffer.
+NEWNAME will be added to the result buffer name.  New searches will use the
+standard buffer unless the search is done from a saved buffer in
+which case the saved buffer will be reused."
+  (interactive "sSave search as name: ")
+  (when-let* ((buffer (rg-get-rename-target)))
+    (with-current-buffer buffer
+      (rename-buffer (format "*%s %s*" (rg--buffer-name) newname)))))
+
+(defun rg-save-search ()
+  "Save the search result in current result buffer.
+The result buffer will be renamed by the `rename-uniquify' function.
+To choose a custom name, use `rg-save-search-as-name' instead.  New
+searches will use the standard buffer unless the search is done from
+a saved buffer in which case the saved buffer will be reused."
+  (interactive)
+  (when-let* ((buffer (rg-get-rename-target)))
+    (with-current-buffer buffer
+      (rename-uniquely)
+      ;; If the new buffer name became default result buffer name, just rename
+      ;; again to make sure the result is saved.
+      (when (equal (buffer-name) (rg-buffer-name))
+        (rename-uniquely)))))
+
+(defun rg-kill-saved-searches ()
+  "Kill all saved rg buffers.  The default result buffer will be kept."
+  (interactive)
+  (when (y-or-n-p "Confirm kill all saved rg searches? ")
+    (dolist (buf (buffer-list))
+      (when (with-current-buffer buf
+              (and (eq major-mode 'rg-mode)
+                   (not (equal (buffer-name) (rg-buffer-name)))))
+        (kill-buffer buf)))))
+
+;;;###autoload
+(defun rg-enable-default-bindings (&optional prefix)
+  "Enable the global `rg' default key bindings under PREFIX key.
+If prefix is not supplied `rg-keymap-prefix' is used."
+  (interactive)
+  (when-let* ((prefix (or prefix rg-keymap-prefix)))
+    (if rg-use-transient-menu
+        (rg-enable-menu prefix)
+      (global-set-key prefix rg-global-map))))
+
+;;;###autoload
+(defun rg-use-old-defaults ()
+  "Restore default settings pre version 2.0.0."
+  (define-key rg-mode-map "\C-f" 'rg-forward-history)
+  (define-key rg-mode-map "\C-c>" nil)
+  (define-key rg-mode-map "\C-b" 'rg-back-history)
+  (define-key rg-mode-map "\C-c<" nil)
+  (define-key rg-mode-map "\C-n" 'rg-next-file)
+  (define-key rg-mode-map "\M-N" nil)
+  (define-key rg-mode-map "\C-p" 'rg-prev-file)
+  (define-key rg-mode-map "\M-P" nil)
+  (define-key rg-mode-map "l" 'rg-list-searches)
+  (define-key rg-mode-map "L" nil)
+  (define-key rg-mode-map "w" 'wgrep-change-to-wgrep-mode)
+  (define-key rg-mode-map "e" nil)
+  (setf rg-group-result nil)
+  (setf rg-align-position-numbers nil)
+  (setf rg-align-line-column-separator nil)
+  (setf rg-align-position-content-separator nil)
+  (setf rg-use-transient-menu nil)
+  (setf rg-default-alias-fallback "all"))
+
+
+(eval-and-compile
+  (defun rg-set-search-defaults (args)
+    "Set defaults for required search options missing from ARGS.
+If the :confirm option is missing, set it to NEVER, if
+the :format option is missing, set it to REGEXP, and if
+the :query option is missing, set it to ASK"
+    (unless (plist-get args :confirm)
+      (setq args (plist-put args :confirm 'never)))
+
+    (unless (plist-get args :format)
+      (setq args (plist-put args :format 'regexp)))
+
+    (unless (plist-get args :query)
+      (setq args (plist-put args :query 'ask)))
+
+    (unless (plist-get args :files)
+      (setq args (plist-put args :files 'ask)))
+
+    (unless (plist-get args :dir)
+      (setq args (plist-put args :dir 'ask)))
+    args))
+
+(eval-and-compile
+  (defun rg-ensure-quoted (arg)
+    "Ensure that ARG is quoted."
+    (if (and (consp arg)
+             (eq (car arg) 'quote))
+        arg
+      `(quote ,arg)))
+
+  (defun rg-ensure-unquoted (arg)
+    "Ensure that ARG is quoted."
+    (if (and (consp arg)
+             (eq (car arg) 'quote))
+        (cadr arg)
+      arg)))
+
+(eval-when-compile
+  ;; parse :format arg, default (non-nil) means to use regexp, otherwise
+  ;; do a literal search
+  (defsubst rg-parse-format-literal (format-opt)
+    (pcase format-opt
+      ('regexp nil)                     ; default to regexp search
+      ('literal t)
+      (_ format-opt))))                 ; otherwise evaluate form
+
+(eval-and-compile
+  (defun rg-search-parse-local-bindings (search-cfg)
+    "Parse local bindings for search functions from SEARCH-CFG."
+    (let* ((confirm-opt (plist-get search-cfg :confirm))
+           (format-opt (plist-get search-cfg :format))
+           (query-opt (plist-get search-cfg :query))
+           (alias-opt (plist-get search-cfg :files))
+           (dir-opt (plist-get search-cfg :dir))
+           (flags-opt (plist-get search-cfg :flags))
+           (literal-opt (rg-parse-format-literal format-opt))
+           (binding-list `((literal ,literal-opt))))
+
+      ;; confirm binding
+      (cond ((eq confirm-opt 'never)
+             (setq binding-list (append binding-list `((confirm nil)))))
+
+            ((eq confirm-opt 'always)
+             (setq binding-list (append binding-list `((confirm t)))))
+
+            ((eq confirm-opt 'prefix)
+             (setq binding-list (append binding-list
+                                        '((confirm (equal current-prefix-arg
+                                                          '(4))))))))
+
+      ;; query binding
+      (unless (eq query-opt 'ask)
+        (let ((query (cond ((eq query-opt 'point) '(or (rg-tag-default)
+                                                       (rg-read-pattern literal)))
+                           (t query-opt))))
+          (setq binding-list (append binding-list `((query ,query))))))
+
+      ;; dir binding
+      (unless (eq dir-opt 'ask)
+        (let ((dirs (cond ((eq dir-opt 'project) '(rg-project-root
+                                                   buffer-file-name))
+                          ((eq dir-opt 'current) 'default-directory)
+                          (t dir-opt))))
+          (setq binding-list (append binding-list `((dir ,dirs))))))
+
+      ;; file alias binding
+      (unless (eq alias-opt 'ask)
+        (let ((files (if (eq alias-opt 'current)
+                         '(car (rg-default-alias))
+                       alias-opt)))
+          (setq binding-list (append binding-list `((files ,files))))))
+
+      (when (eq flags-opt 'ask)
+        (setq flags-opt 'flags))
+
+      (setq flags-opt (rg-ensure-quoted flags-opt))
+      (setq binding-list
+            (append binding-list
+                    `((flags (funcall rg-command-line-flags-function ,flags-opt)))))
+      binding-list)))
+
+(eval-and-compile
+  (defun rg-search-parse-interactive-args (search-cfg)
+    "Parse interactive args from SEARCH-CFG for search functions."
+    (let* ((query-opt (plist-get search-cfg :query))
+           (format-opt (plist-get search-cfg :format))
+           (literal (rg-parse-format-literal format-opt))
+           (dir-opt (plist-get search-cfg :dir))
+           (files-opt (plist-get search-cfg :files))
+           (flags-opt (plist-get search-cfg :flags))
+           (iargs '()))
+
+      (when (eq query-opt 'ask)
+        (setq iargs
+              (append iargs `((query . (rg-read-pattern ,literal))))))
+
+      (when (eq files-opt 'ask)
+        (setq iargs
+              (append iargs '((files . (rg-read-files))))))
+
+      (when (eq dir-opt 'ask)
+        (setq iargs
+              (append iargs
+                      '((dir . (read-directory-name
+                                "In directory: " nil default-directory t))))))
+
+      (when (eq flags-opt 'ask)
+        (setq iargs
+              (append iargs '((flags . (split-string
+                                        (read-string "Command line flags: ")))))))
+      iargs)))
+
+(eval-and-compile
+  (defun rg-search-parse-menu-arg (search-cfg name)
+    "Parse :menu option in SEARCH-CFG.
+Returns forms for binding function with NAME into rg-menu."
+    (when-let* ((menu-opt (rg-ensure-unquoted
+                          (plist-get search-cfg :menu))))
+      (unless (and (consp menu-opt)
+                   (= (length menu-opt) 3))
+        (user-error "'%S' should be a list of length 3" menu-opt))
+      `((rg-menu-transient-insert
+         ,@menu-opt
+         ',(intern (concat (symbol-name name) "--transient")))))))
+
+(defconst rg-elisp-font-lock-keywords
+  '(("(\\(rg-define-search\\)\\_>[ \t']*\\(\\(?:\\sw\\|\\s_\\)+\\)?"
+     (1 font-lock-keyword-face)
+     (2 font-lock-function-name-face nil t))))
+
+(font-lock-add-keywords 'emacs-lisp-mode rg-elisp-font-lock-keywords)
+
+;;;###autoload
+(defmacro rg-define-search (name &rest args)
+  "Define an rg search functions named NAME.
+ARGS is a search specification that defines parameters of a search.
+It optionally starts with a string that is used as the docstring for
+the defined function.  The rest of ARGS contains key value pairs
+according to the specification below.  All keys are optional with
+specified default if left out.
+
+:query      Method for retrieving the search string.  Allowed values
+            are `point' which means extract thing at point and `ask'
+            which means prompt the user for a string.  Any form that
+            evaluates to a string is allowed.
+            Default is `ask'.
+:format     Specifies if :query is interpreted literally (`literal')
+            or as a regexp (`regexp').  If it is a form, eg.
+            (not `current-prefix-arg'), and is non-nil the :query is
+            interpreted literally, otherwise as a regexp.
+            Default is `regexp'.
+:files      Form that evaluates to a file alias or custom file glob.
+            `current' means extract alias from current buffer file name,
+            `ask' will prompt the user.
+            Default is `ask'.
+:dir        Root search directory.  Allowed values are `ask' for user
+            prompt, `current' for current dir and `project' for project
+            root.  Any form that evaluates to a directory string is
+            also allowed.
+            Default is `ask'.
+:confirm    `never', `always', or `prefix' are allowed values.  Specifies
+            if the the final search command line string can be modified
+            and confirmed by the user.
+            Default is `never'.
+:flags      `ask' or a list of command line flags that will be used when
+            invoking the search.
+:menu       Bind the command into `rg-menu'.  Must be a list with three
+            items in it.  The first item is the description of the
+            group in which the new command will appear.  If the group
+            does not exist a new will be created.  The second item is
+            the key binding for this new command (ether a key vector
+            or a key description string) and the third item is the
+            description of the command that will appear in the menu.
+
+Example:
+\(rg-define-search search-home-dir-in-elisp
+  \"Doc string.\"
+  :query ask
+  :format literal
+  :files \"elisp\"
+  :dir (getenv \"HOME\"\)\)
+  :menu (\"Custom\" \"H\" \"Home dir\")"
+  (declare (indent defun))
+  (let* ((body (macroexp-parse-body args))
+         (decls (car body))
+         (search-cfg (rg-set-search-defaults (cdr body)))
+         (local-bindings (rg-search-parse-local-bindings search-cfg))
+         (iargs (rg-search-parse-interactive-args search-cfg))
+         (menu-forms (rg-search-parse-menu-arg search-cfg name)))
+    `(progn
+       (defun ,name ,(mapcar 'car iargs)
+         ,@decls
+         (interactive
+          (list ,@(mapcar 'cdr iargs)))
+         (let* ,local-bindings
+           (rg-run query files dir literal confirm flags)))
+       (rg-menu-wrap-transient-search ,name)
+       ,@menu-forms)))
+
+;;;###autoload (autoload 'rg-project "rg.el" "" t)
+(rg-define-search rg-project
+  "Run ripgrep in current project searching for REGEXP in FILES.
+The project root will will be determined by either common project
+packages like projectile and `find-file-in-project' or the source
+version control system."
+  :dir project)
+
+;;;###autoload (autoload 'rg-dwim-project-dir "rg.el" "" t)
+(rg-define-search rg-dwim-project-dir
+  "Search for thing at point in files matching the current file
+under the project root directory."
+  :query point
+  :format literal
+  :files current
+  :dir project)
+
+;;;###autoload (autoload 'rg-dwim-current-dir "rg.el" "" t)
+(rg-define-search rg-dwim-current-dir
+  "Search for thing at point in files matching the current file
+under the current directory."
+  :query point
+  :format literal
+  :files current
+  :dir current)
+
+;;;###autoload (autoload 'rg-dwim-current-file "rg.el" "" t)
+(rg-define-search rg-dwim-current-file
+  "Search for thing at point in files matching the current file
+name (as a pattern) under the current directory."
+  :query point
+  :format literal
+  :files (rg-get-buffer-file-name)
+  :dir current)
+
+;;;###autoload
+(defun rg-dwim (&optional curdir)
+  "Run ripgrep without user interaction figuring out the intention by magic(!).
+The default magic searches for thing at point in files matching
+current file under project root directory.
+
+With \\[universal-argument] prefix (CURDIR), search is done in
+current dir instead of project root.
+
+With repeated \\[universal-argument] prefix, search is done in
+the current dir and using the current variable `buffer-file-name'
+as a pattern.  Subdirectories are still searched, so different
+files with the same name pattern still will be searched."
+  (interactive "P")
+  (cond
+   ((eq  4 (and (consp curdir) (car curdir))) (rg-dwim-current-dir))
+   ((eq 16 (and (consp curdir) (car curdir))) (rg-dwim-current-file))
+   (t     (rg-dwim-project-dir))))
+
+;;;###autoload (autoload 'rg-literal "rg.el" "" t)
+(rg-define-search rg-literal
+  "Run ripgrep, searching for literal PATTERN in FILES in directory DIR.
+With \\[universal-argument] prefix (CONFIRM), you can edit the
+constructed shell command line before it is executed."
+  :format literal
+  :confirm prefix)
+
+;;;###autoload (autoload 'rg "rg.el" "" t)
+(rg-define-search rg
+  "Run ripgrep, searching for REGEXP in FILES in directory DIR.
+The search is limited to file names matching shell pattern FILES.
+FILES may use abbreviations defined in `rg-custom-type-aliases'
+or ripgrep builtin type aliases, e.g. entering `elisp' is
+equivalent to `*.el'. REGEXP is a regexp as defined by the
+ripgrep executable. With \\[universal-argument] prefix (CONFIRM),
+you can edit the constructed shell command line before it is
+executed. Collect output in a buffer. While ripgrep runs
+asynchronously, you can use \\[next-error] (M-x `next-error'), or
+\\<grep-mode-map>\\[compile-goto-error] \ in the rg output
+buffer, to go to the lines where rg found matches."
+  :confirm prefix)
+
+(provide 'rg)
+
+;; Local Variables:
+;; byte-compile-warnings: (not cl-functions)
+;; End:
+
+;;; rg.el ends here
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rg.elc b/emacs/.emacs.d/elpa/rg-20260823.1828/rg.elc
new file mode 100644
index 0000000..9f820d5
Binary files /dev/null and b/emacs/.emacs.d/elpa/rg-20260823.1828/rg.elc differ
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/rgel.info b/emacs/.emacs.d/elpa/rg-20260823.1828/rgel.info
new file mode 100644
index 0000000..6337bbb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/rgel.info
@@ -0,0 +1,2557 @@
+This is rgel.info, produced by makeinfo version 7.1 from rgel.texi.
+
+     rg.el 2.4.0, Aug 23, 2026
+
+     David Landell
+
+     Copyright © 2019, David Landell
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* RG: (rgel.info). Search like a King with ripgrep in Emacs.
+END-INFO-DIR-ENTRY
+
+
+   Generated by Sphinx 7.2.6.
+
+
+File: rgel.info,  Node: Top,  Next: Usage,  Up: (dir)
+
+RG User Manual
+**************
+
+     rg.el 2.4.0, Aug 23, 2026
+
+     David Landell
+
+     Copyright © 2019, David Landell
+
+'rg.el' is an Emacs search package based on the ripgrep
+(https://github.com/BurntSushi/ripgrep) command line tool.  It allows
+you to interactively create searches, doing automatic searches based on
+the editing context, refining and modifying search results and much
+more.  It is also highly configurable to be able to fit different users’
+needs.
+
+Throughout this manual this emacs package will be referred to as 'rg'
+while the command line utility will be referred to as 'ripgrep'.
+
+If you are used to built-in Emacs ‘rgrep’ command, transitioning to 'rg'
+should be simple.  'rg' provides a lot of extra features but the basics
+are similar.
+
+The big benefit of using 'ripgrep' instead of 'grep' as a backend is
+speed.  Especially when searching large source code repositories where
+'ripgrep' really shines.  Please read this blog post
+(http://blog.burntsushi.net/ripgrep/) for some speed comparisons with
+other tools.
+
+* Menu:
+
+* Usage::
+* Configuration::
+* Contribute::
+* License::
+* Index::
+
+
+File: rgel.info,  Node: Usage,  Next: Configuration,  Prev: Top,  Up: Top
+
+1 Usage
+*******
+
+* Menu:
+
+* Installation::
+* Searching::
+* Results buffer::
+* Search management::
+* Multi line search::
+
+
+File: rgel.info,  Node: Installation,  Next: Searching,  Up: Usage
+
+1.1 Installation
+================
+
+This version of 'rg' is supported on GNU Emacs 28.1 or later on Linux
+systems.  It might work on older Emacsen and on other systems but such
+configurations are not tested.  Patches for other OS:es are welcome.
+
+MELPA
+.....
+
+Packages are published on MELPA Stable (https://stable.melpa.org/#/rg)
+and MELPA (http://melpa.org/#/rg).  From within Emacs, run ‘M-x
+package-install [RET] rg [RET]’ to install from those sources.
+
+Enable default key bindings:
+
+     (rg-enable-default-bindings)
+
+The above will enable the default key map ‘rg-menu’ under the default
+prefix key ‘C-c s’.
+
+Manual
+......
+
+Releases can alternatively be downloaded from GitHub
+(https://github.com/dajva/rg.el/releases/latest) and installed manually.
+Put all elisp files in main directory in your load path and ‘require’
+the package in your init file.
+
+     (require 'rg)
+     (rg-enable-default-bindings)
+
+You would also need to make sure all package requirements are met.  For
+this version these are:
+
+   - 'wgrep' 2.1.10
+
+   - 'transient' 0.9.2
+
+   - 'emacs' 28.1
+
+'rg' is using autoloaded symbols which means it’s also possible to defer
+loading if you have autoloading setup.  That usually comes out of the
+box with ‘package-install’.
+
+Lazy loading
+............
+
+For lazy loading you don’t want to call directly into the package during
+startup.  Use a setup similar to this instead:
+
+     (global-set-key (kbd "C-c s") #'rg-menu)
+     (with-eval-after-load 'rg
+        ;; Your settings goes here.
+     )
+
+If you don’t want to use the transient menu interface, the following is
+needed to achieve lazy loading:
+
+     ;; Workaround for emacs' lack of autoloaded keymaps.
+     ;; This is essentially what use-package do.
+     (defun rg-autoload-keymap ()
+       (interactive)
+       (if (not (require 'rg nil t))
+           (user-error (format "Cannot load rg"))
+         (let ((key-vec (this-command-keys-vector)))
+           (global-set-key key-vec rg-global-map)
+           (setq unread-command-events
+             (mapcar (lambda (ev) (cons t ev))
+                     (listify-key-sequence key-vec))))))
+
+     (global-set-key (kbd "C-c s") #'rg-autoload-keymap)
+     (with-eval-after-load 'rg
+        ;; Your settings goes here.
+     )
+
+wgrep
+.....
+
+This package use wgrep (https://github.com/mhayashi1120/Emacs-wgrep) for
+editing capabilities in the rg results buffer.  No setup is needed.
+
+Isearch integration
+...................
+
+Optional *note isearch integration: 6. can be enabled to allow you to
+extend isearch to trigger ripgrep searching.  Enable it in your
+configuration with:
+
+     (require 'rg-isearch)
+     (define-key isearch-mode-map "\M-sr" 'rg-isearch-menu)
+
+For the evil use case where isearch-mode is exited after first search
+hit, users would also want to add the binding to the ‘global-map’ or
+similar.
+
+Interaction with the 'ripgrep' configuration file
+.................................................
+
+The 'ripgrep' binary allows using a configuration file
+(https://github.com/BurntSushi/ripgrep/blob/master/GUIDE.md#configuration-file)
+to set default values for command line flags.  This package requires
+specific command line flags to function correctly and using a 'ripgrep'
+configuration may conflict with these requirements.  Therefore the
+configuration file is ignored by default.  This can be changed by the
+*note rg-ignore-ripgreprc: 7. setting.
+
+     Note: Using the 'ripgrep' configuration file may break
+     functionality of this package if you are not careful.
+
+Interaction with xterm-color
+............................
+
+This package is not written to be used with custom output colors
+provided by external packages like 'xterm-color'.  It relies on the
+color escape sequences so stripping these will break in unexpected ways.
+If you are using such packages, the advice is to hook such functionality
+into ‘compilation-filter-hook’ instead of advising ‘compilation-filter’.
+
+
+File: rgel.info,  Node: Searching,  Next: Results buffer,  Prev: Installation,  Up: Usage
+
+1.2 Searching
+=============
+
+Searching is done by invoking one of the different frontend commands.
+This package is built around recursive search based on three parameters;
+a single 'directory', 'file type' filter, and a search 'pattern'.  These
+three parameters can interactively be selected or figured out
+automatically by the package, depending on which command that is used.
+
+The underlying 'ripgrep' binary has the file type filter concept built
+in.  You have a high level of control over which files to search and
+which to ignore.  This is partly what makes it so fast, ignoring
+uninteresting files.
+
+In addition to the base parameters there are a lot of options that
+control how a search is done.  These are typically selected from the
+*note rg-menu: a. interface.
+
+* Menu:
+
+* Case sensitivity::
+* Interactive search::
+* Project search::
+* Do what I mean::
+* Isearch search::
+* File type aliases::
+* The menu::
+
+
+File: rgel.info,  Node: Case sensitivity,  Next: Interactive search,  Up: Searching
+
+1.2.1 Case sensitivity
+----------------------
+
+Considering case when searching is an important feature of any search
+tool.  This package gives you a lot of control over how to handle case
+sensitive and case insensitive search.  It can be forced to 'on' or
+'off' and set to 'smart case'.  The latter is similar to the 'ripgrep'
+‘--smart-case’ flag but is not using the flag directly.  One thing to
+note about this is that the case insensitive setting controls the
+behavior when starting a new search.  In the results buffer the setting
+is fixed to 'on' or 'off' but can be toggled easily with a key binding.
+See *note rg-ignore-case: c. customization for the details of the
+configuration.
+
+
+File: rgel.info,  Node: Interactive search,  Next: Project search,  Prev: Case sensitivity,  Up: Searching
+
+1.2.2 Interactive search
+------------------------
+
+Two commands implements fully interactive search, where all the base
+parameters are selected from the mini buffer.
+
+ -- ELisp Command: C-c s r (rg)
+
+     This command prompts for 'query', 'file type' and 'directory' and
+     tries to suggest reasonable default values.  The 'query' string is
+     interpreted as a regular expression.  Default for 'query' is the
+     thing at point and for 'directory' it is the current directory.  If
+     the type of the currently visited file is recognized, the
+     corresponding *note file type alias: 10. is suggested as the 'file
+     type' parameter.
+
+     Invoking this command with the 'universal argument' will trigger
+     confirmation and potential modification of the *note full command
+     line: 11. that will invoke the 'ripgrep' binary.
+
+ -- ELisp Command: C-c s t (rg-literal)
+
+     This command works in the same way as *note rg: f. but interprets
+     the 'query' string literally and not as a regular expression.
+
+     Invoking this command with the 'universal argument' will trigger
+     confirmation and potential modification of the *note full command
+     line: 11. that will invoke the 'ripgrep' binary.
+
+
+File: rgel.info,  Node: Project search,  Next: Do what I mean,  Prev: Interactive search,  Up: Searching
+
+1.2.3 Project search
+--------------------
+
+A common scenario is to search through a whole project while visiting a
+file in the project.  This essentially means identifying the project
+root and use that as the top 'directory' when invoking the 'ripgrep'
+binary.  'rg' supports several ways of identifying a project.  Emacs’
+major project packages are supported including projectile
+(https://www.projectile.mx/en/latest/), find-file-in-project
+(https://github.com/technomancy/find-file-in-project) and builtin
+project.el
+(https://github.com/emacs-mirror/emacs/blob/master/lisp/progmodes/project.el).
+If none of these are used, the fallback is Emacs’ ‘vc-backend’.
+
+ -- ELisp Command: C-c s p (rg-project)
+
+     Search in the current project.  The 'directory' is selected via one
+     of Emacs’ project packages while 'query string' and 'file type' are
+     prompted for.  The 'query string' is interpreted as a regular
+     expression.
+
+
+File: rgel.info,  Node: Do what I mean,  Next: Isearch search,  Prev: Project search,  Up: Searching
+
+1.2.4 Do what I mean
+--------------------
+
+The 'DWIM' family of search commands tries to be smart by figure out the
+search parameters from the context without prompting.  Thanks to
+'ripgrep’s' speed, this allows for new ways of searching by invoking a
+dwim command and then 'refine' the search from the results buffer.
+
+These commands use the word (with the definition of word depending on
+context) under cursor as the 'query' string.  The 'file type' parameter
+is taken from the type of the currently visited file.  If the current
+file type can not be identified all file types known to 'ripgrep' are
+used.  The fallback can be customized with *note
+rg-default-alias-fallback: 18.  The 'directory' parameter varies between
+these commands.
+
+ -- ELisp Command: M-x rg-dwim-project-dir
+
+     Do a 'DWIM' search in the current *note project: 14.
+
+ -- ELisp Command: M-x rg-dwim-current-dir
+
+     Do a 'DWIM' search in the current directory.
+
+ -- ELisp Command: M-x rg-dwim-current-file
+
+     Do a 'DWIM' search in the current file.  The 'current file' in this
+     context is actually a file 'pattern' exactly matching the current
+     file name in a search starting from current directory.  Most of the
+     time this means a single file but if there are multiple files with
+     the same name in a sub directory, those will be searched as well.
+
+ -- ELisp Command: C-c s d (rg-dwim)
+
+     This command combines all the 'DWIM' commands to one.  The default
+     search is in the *note project dir: 19.  With one 'universal
+     argument' *note current directory: 1a. is used and with double
+     'universal arguments' a *note file search: 1b. is done.
+
+
+File: rgel.info,  Node: Isearch search,  Next: File type aliases,  Prev: Do what I mean,  Up: Searching
+
+1.2.5 Isearch search
+--------------------
+
+Isearch integration is optional and need to be enabled explicitly in
+your emacs configuration.  See *note installation: 5. for more info.
+
+This functionality is similar to emacs built in occur package but offers
+some additional choices for the search and provides the full
+functionality of the rg search result buffer.  When enabled, the choosen
+binding can be used from isearch to trigger a menu for extending the
+isearch to do a ripgrep search in current file, current directory or
+current project.
+
+
+File: rgel.info,  Node: File type aliases,  Next: The menu,  Prev: Isearch search,  Up: Searching
+
+1.2.6 File type aliases
+-----------------------
+
+File type aliases are used in 'ripgrep' to filter out the files to
+search in.  The 'ripgrep' binary comes with a default set of aliases
+that can be extended or overridden from this package by customizing
+*note rg-custom-type-aliases: 1f.
+
+An alias is a mapping between a name and a list of glob patterns
+(https://en.wikipedia.org/wiki/Glob_%2528programming%2529) matching the
+files of interest.  Selecting an alias when searching is done with
+completing read of the defined aliases.  It is also possible to enter a
+custom glob pattern if there is no suitable alias defined for the file
+type.
+
+'rg' defines some internal aliases:
+
+Name                 Meaning
+                     
+--------------------------------------------------------------------------------------------------------------
+                     
+'all'                all defined types including *note rg-custom-type-aliases: 1f.
+                     
+                     
+'everything'         all files.  No filtering on type is done.
+                     
+                     
+'custom'             used internally in this package for mapping custom glob patterns.
+                     
+
+     Warning: Do not use any of the internal aliases in *note
+     rg-custom-type-aliases: 1f.  That would interfere with the package
+     internal usage.
+
+
+File: rgel.info,  Node: The menu,  Prev: File type aliases,  Up: Searching
+
+1.2.7 The menu
+--------------
+
+The global *note prefix key: 21. may be bound to a transient prefix
+command, which means that the key binding will popup a menu.  This
+package is using the same popup menu backend called transient
+(https://magit.vc/manual/transient) as the magit
+(https://magit.vc/manual/magit) package.  If you are familiar with magit
+this should feels like home.
+
+The menu is mostly interesting when you want to give specific command
+line flags to the 'ripgrep' binary.  When you just want to do a quick
+search based on the defaults the menu basically acts as a normal keymap.
+
+Pressing the ‘rg-menu’ *note prefix key: 21. will popup the menu where
+command line flags can be selected before triggering the wanted search
+function.  The menu can be customized via the transient API as usual.
+This package contains some shortcuts to directly add a new command to
+the menu when defining the command via the *note rg-define-search: 22.
+macro.
+
+     (rg-define-search rg-word
+       :format literal
+       :flags ("--word-regexp")
+       :menu ("Custom" "w" "Word"))
+
+The ‘:menu’ keyword in the above invocation will trigger insertion of a
+new menu item bound to key ‘w’ with description 'Word'.  The new menu
+item will be put under the 'Custom' group.  This group is not available
+in the original menu so it will be created.
+
+The menu can be triggered from the *note results buffer: 23. with the
+‘m’ key.  The commands in the menu differs, depending on from where it’s
+triggered but the available options are the same.  The menu does not
+show all options by default.
+
+The visible options can be controlled by the transient suffix levels
+documented here
+(https://magit.vc/manual/transient/Enabling-and-Disabling-Suffixes.html#Enabling-and-Disabling-Suffixes).
+To modify what is enabled at the default level 4 press ‘C-x l’ to enter
+edit mode when the menu is visible.  Then select the option by pressing
+the key sequence that activates the option and choose the level 4 for
+that option.  It’s also possible to use the transient edit mode for
+modifying the overall level of the menu to enable more options at once.
+
+
+File: rgel.info,  Node: Results buffer,  Next: Search management,  Prev: Searching,  Up: Usage
+
+1.3 Results buffer
+==================
+
+The results of a search is shown in the results buffer.  This buffer
+displays search parameters, the full command line and the output of the
+'ripgrep' binary.  It supports basic navigation between search results
+editing of the file contents directly from the search buffer and also
+modification of the current search.  The results buffer is a modified
+'compilation' buffer and some key bindings and functionality is
+inherited from the parent and from 'grep mode'.
+
+* Menu:
+
+* Navigation::
+* Refine search::
+* Full command line search::
+* History navigation::
+* Edit and apply (wgrep): Edit and apply wgrep.
+
+
+File: rgel.info,  Node: Navigation,  Next: Refine search,  Up: Results buffer
+
+1.3.1 Navigation
+----------------
+
+Navigation works mostly as in grep/compilation buffers.
+
+ -- ELisp Command: M-n (compilation-next-error)
+
+     Move to next line with a match.
+
+ -- ELisp Command: M-p (compilation-previous-error)
+
+     Move to previous line with a match.
+
+ -- ELisp Command: n (next-error-no-select)
+
+     Move to next line with a match, show that file in other buffer and
+     highlight the match.
+
+ -- ELisp Command: p (previous-error-no-select)
+
+     Move to previous line with a match, show that file in other buffer
+     and highlight the match.
+
+ -- ELisp Command: M-N (rg-next-file)
+
+     Move to next file header if the results is grouped under a file
+     header (See *note rg-group-result: 2b.).
+
+ -- ELisp Command: M-P (rg-prev-file)
+
+     Move to previous file header if the results is grouped under a file
+     header (See *note rg-group-result: 2b.).
+
+ -- ELisp Command: } (compilation-next-file)
+
+     Move first match in previous file.
+
+ -- ELisp Command: { (compilation-previous-file)
+
+     Move last match in previous file.
+
+ -- ELisp Command: RET (compile-goto-error)
+
+     Visit match in file.
+
+If *note rg-group-result: 2b. is enabled, the Imenu
+(https://www.gnu.org/software/emacs/manual/html_node/emacs/Imenu.html)
+facility is configured to jump across files.
+
+
+File: rgel.info,  Node: Refine search,  Next: Full command line search,  Prev: Navigation,  Up: Results buffer
+
+1.3.2 Refine search
+-------------------
+
+From the results buffer it’s easy to change the search parameters.  Some
+bindings toggle a flag while others allow you to interactively change
+the *note base parameters: 9.
+
+ -- ELisp Command: d (rg-rerun-change-dir)
+
+     Interactively change search 'directory'.
+
+ -- ELisp Command: f (rg-rerun-change-files)
+
+     Interactively change searched 'file types'.
+
+ -- ELisp Command: t (rg-rerun-change-literal)
+
+     Interactively change 'search string' interpret the string
+     literally.
+
+ -- ELisp Command: r (rg-rerun-change-regexp)
+
+     Interactively change 'search string' interpret the string as a
+     regular expression.
+
+     Tip: *note rg-rerun-change-regexp: 34. and *note
+     rg-rerun-change-literal: 33. are used for switching between regular
+     expression and literal search.  So for quick switching between
+     search modes with the same search string, just press the respective
+     key and then ‘RET’.
+
+ -- ELisp Command: g (rg-recompile)
+
+     Rerun the current search without changing any parameters.
+
+ -- ELisp Command: c (rg-rerun-toggle-case)
+
+     Toggle case sensitivity of search.  The state of the flag is shown
+     in the '[case]' header field.
+
+ -- ELisp Command: i (rg-rerun-toggle-ignore)
+
+     Toggle if ignore files are respected.  The state of the flag is
+     shown in the '[ign]' header field.
+
+     Tip: It is possible to create and bind your own toggle flags with
+     the macro *note rg-define-toggle: 38.
+
+ -- ELisp Command: m (rg-menu)
+
+     Fire up *note the menu: a. for full access to options and flags.
+
+
+File: rgel.info,  Node: Full command line search,  Next: History navigation,  Prev: Refine search,  Up: Results buffer
+
+1.3.3 Full command line search
+------------------------------
+
+Some search commands (See *note rg: f. or *note rg-literal: 12.) allow
+you to edit the final command line before invoking the search by giving
+a 'universal argument'.  This can be used to invoke features of the
+'ripgrep' binary that is not supported in this package’s interface.
+This could be specific flags, searching in multiple directories etc.
+
+     Note: Using full command line search will disable refinement of the
+     search from the result buffer.
+
+
+File: rgel.info,  Node: History navigation,  Next: Edit and apply wgrep,  Prev: Full command line search,  Up: Results buffer
+
+1.3.4 History navigation
+------------------------
+
+Each search result is stored in the search history, which is a per
+results buffer property.  History can be navigated back and forward, the
+forward history is cleared when a new search is done.
+
+ -- ELisp Command: C-c < (rg-back-history)
+
+     Navigate back in history.
+
+ -- ELisp Command: C-c > (rg-forward-history)
+
+     Navigate forward in history.
+
+     Tip: The key bindings here are slightly inconvenient so invoking
+     this via *note the menu: a. by pressing ‘m b’ and ‘m w’ is more
+     ergonomic.
+
+
+File: rgel.info,  Node: Edit and apply wgrep,  Prev: History navigation,  Up: Results buffer
+
+1.3.5 Edit and apply (wgrep)
+----------------------------
+
+The results buffer supports inline editing via the wgrep
+(https://github.com/mhayashi1120/Emacs-wgrep) package.  This is setup
+automatically when 'rg' is loaded.
+
+ -- ELisp Command: e (wgrep-change-to-wgrep-mode)
+
+     Make the search results editable by enabling ‘wgrep’ mode.  When
+     done press ‘C-c C-c’ to commit your changes to the underlying files
+     or ‘C-c C-k’ to drop the changes.
+
+
+File: rgel.info,  Node: Search management,  Next: Multi line search,  Prev: Results buffer,  Up: Usage
+
+1.4 Search management
+=====================
+
+The result buffer is named ‘*rg*’ and 'rg' reuse the same result buffer
+for new searches.  If you want to store a search while continuing doing
+new searches there are two ways of doing that.
+
+ -- ELisp Command: s (rg-save-search)
+
+     Save the search buffer by renaming it to a unique new name.  This
+     is available both outside and inside a result buffer.  Outside of
+     the result buffer it’s bound to ‘C-c s s’.
+
+     If you want to keep all search buffers until manually killed you
+     can use this snippet in your init file.
+
+          (defadvice rg-run (before rg-run-before activate)
+            (rg-save-search))
+
+ -- ELisp Command: S (rg-save-search-as-name)
+
+     Save the search buffer and interactively give it a specific name.
+     This is available both outside and inside a result buffer.  Outside
+     of the result buffer it’s bound to ‘C-c s S’.
+
+The default buffer name can be customized with *note rg-buffer-name: 46.
+This setting considers dir local variables and it’s even possible to use
+a function to get a really dynamic setup.
+
+Having a lot of search buffers floating around can easily get messy.  To
+help keeping this under control there is a search manager.  The manager
+is simply a modified ‘ibuffer’ that lists all the results buffers, shows
+some data about the searches and make it possible to kill of some unused
+etc.
+
+ -- ELisp Command: L (rg-list-searches)
+
+     Open the search manager.  This is available both in result buffer
+     and globally bound to ‘C-c s l’.
+
+ -- ELisp Command: C-c s k (rg-kill-saved-searches)
+
+     Kill all saved searches except for the one that matches *note
+     rg-buffer-name: 46.  This is available both in result buffer and
+     globally bound to ‘C-c s k’.
+
+     Warning: If you have a dynamic *note rg-buffer-name: 46. setup,
+     only one buffer that matches your current criteria (dir locals or
+     project for instance) will be kept.  So be careful when killing
+     saved searches to avoid losing important search results.
+
+
+File: rgel.info,  Node: Multi line search,  Prev: Search management,  Up: Usage
+
+1.5 Multi line search
+=====================
+
+By default, ripgrep does matching per line.  The ‘--multiline’ flag can
+be used for enabling matching over multiple lines.  This flag is
+available in the *note rg-menu: a. as an option.  The ‘--multiline’ flag
+does not match new line characters with the ‘.’ as one might expect
+though.  A separate flag is used to allow this, ‘--multiline-dotall’.
+The casual user of multi line search commonly want this flag on by
+default so it’s recommended to add this to *note rg-command-line-flags:
+4b. to avoid having to trigger this flag manually from the menu.
+
+See the ripgrep manual page for more info about the multi line flags.
+
+
+File: rgel.info,  Node: Configuration,  Next: Contribute,  Prev: Usage,  Up: Top
+
+2 Configuration
+***************
+
+* Menu:
+
+* Customization::
+* Faces::
+* Configuration functions::
+* Hooks::
+* Configuration macros::
+* Use with evil-mode::
+* Customizing the menu::
+
+
+File: rgel.info,  Node: Customization,  Next: Faces,  Up: Configuration
+
+2.1 Customization
+=================
+
+Customization is done via the Emacs customization system.  The group
+‘rg’ is the main group of the package.
+
+     M-x customize-group [RET] rg [RET]
+
+ -- ELisp Variable: rg-executable [(executable-find "rg")]
+
+     The 'ripgrep' executable to use.  Could be an absolute path or just
+     the base name if the executable is in the path.  The default is
+     using ‘executable-find’ to locate the command.  If you want to use
+     this package with tramp it might be better to set it to just “rg”
+     in order to let the OS find the binary where it’s invoked.  From
+     Emacs 27.1, the tramp use case is by default handled automatically.
+     See *note rg-executable-per-connection: 51. for details.
+
+ -- ELisp Variable: rg-executable-per-connection [t]
+
+     This setting only has effect in Emacs 27.1 or later.  Handle the
+     *note rg-executable: 50. automatically for different hosts if used
+     with tramp.  ‘executable-find’ for “rg” binary will be invoked on
+     remote hosts to determine the path to ripgrep.  The result is
+     stored per connection.
+
+ -- ELisp Variable: rg-custom-type-aliases [nil]
+
+     An association list that maps file type aliases to a space
+     delimited string with file globs.  These are combined with the
+     'ripgrep' builtin file aliases.
+
+     Example:
+
+          (setq rg-custom-type-aliases
+            '(("foo" .    "*.foo *.bar")
+              ("baz" .    "*.baz *.qux")))
+
+     You may also add lambdas to ‘rg-custom-type-aliases’ to add aliases
+     dynamically based on mode, directory, project, etc.
+
+          (add-to-list
+           'rg-custom-type-aliases
+           (lambda ()
+             (when (in-frontend-app)
+               (cons "ui" "*.js *.hbs *.json"))))
+
+ -- ELisp Variable: rg-prioritized-type-aliases [nil]
+
+     A list of aliases that are prioritized among ripgrep’s builtin
+     aliases when selecting the alias based on the buffer file name.
+     This list contains only the alias names and the order between the
+     items does not matter.
+
+     Example:
+
+          (setq rg-custom-type-aliases
+            '("cpp" "puppet"))
+
+ -- ELisp Variable: rg-default-alias-fallback ["everything"]
+
+     This setting controls the default alias used when no alias can be
+     recognized for the current buffer.  ‘all’ or ‘everything’ are
+     reasonable values for this variable.
+
+ -- ELisp Variable: rg-command-line-flags [nil]
+
+     A list of command line flags that will be appended to the 'ripgrep'
+     command line.  Must either be a list of flags or a function that
+     returns a list of flags.
+
+ -- ELisp Variable: rg-group-result [t]
+
+     Controls the layout of the results buffer.  If non ‘nil’, each file
+     name is displayed once and matches are grouped under that filename
+     instead of repeating the filename on each match.  This is
+     essentially the layout of the ‘--no-heading’ 'ripgrep' command line
+     flag.
+
+ -- ELisp Variable: rg-show-columns [nil]
+
+     Controls if column numbers are used in the search result.
+
+ -- ELisp Variable: rg-ignore-case [case-fold-search]
+
+     Setting that controls if case sensitive search is made or not.  It
+     can essentially be 'on', 'off' or 'smart'.  The 'smart' setting
+     will trigger an analyze of the search string and if it’s all lower
+     case, the search will be case 'insensitive', otherwise it will be
+     case 'sensitive'.  The following values are valid:
+
+        - 'case-fold-search' - A non nil value of ‘case-fold-search’
+          will trigger smart case behavior.
+
+        - 'smart' - Smart case behavior.
+
+        - 'force' - Always ignore case.
+
+        - 'nil' - Always consider case.
+
+ -- ELisp Variable: rg-hide-command [t]
+
+     Hide most of command line by default.  This is enabled by default
+     and can be set to ‘nil’ to show full command line.  This can be
+     toggled in the results buffer by clicking on the command line.
+
+ -- ELisp Variable: rg-keymap-prefix ["C-c s"]
+
+     This variable sets the default prefix used for the global key
+     bindings.  Note that ‘rg-enable-default-bindings’ needs to be
+     invoked for the bindings to be enabled.
+
+ -- ELisp Variable: rg-use-transient-menu [t]
+
+     Controls whether ‘rg-menu’ will be used by default or not.  It’s
+     also possible to enable the menu explicitly with
+
+          (rg-enable-menu)
+
+ -- ELisp Variable: rg-show-header [t]
+
+     Controls if the search info header is shown in the result buffer.
+     This is enabled by default but can be disabled by setting this
+     variable to ‘nil’.
+
+ -- ELisp Variable: rg-buffer-name ["rg"]
+
+     Controls the name of the results buffer.  It may be 'string' or
+     'function'.  This name will be surrounded by ‘*’ to yield the final
+     buffer name so if this setting is ‘foo’ the buffer name will be
+     ‘*foo*’.  One useful case of using it is to have separate result
+     buffers per project.  One can set this variable in 'dir-locals'
+     file or set it to function.
+
+     Example, this function will set results buffer name based on
+     'project-current':
+
+          (defun my-rg-buffer-name ()
+            (let ((p (project-current)))
+              (if p
+           (format "rg %s" (abbreviate-file-name (cdr p)))
+                "rg")))
+
+ -- ELisp Variable: rg-ignore-ripgreprc [t]
+
+     Controls if the ripgreprc
+     (https://github.com/BurntSushi/ripgrep/blob/master/GUIDE.md#configuration-file)
+     file should be ignored or not.  If ‘nil’, the config file will be
+     used, otherwise it will be ignored.  The default is to ignore this
+     file in order to avoid that conflicting settings have impact on
+     this package’s behavior.  Setting this to ‘nil’ may affect core
+     functionality of this package.  Especially changing colors can
+     affect parsing of the output and result in a broken results buffer.
+
+* Menu:
+
+* Position numbers alignment::
+
+
+File: rgel.info,  Node: Position numbers alignment,  Up: Customization
+
+2.1.1 Position numbers alignment
+--------------------------------
+
+When operating 'rg' in grouped output mode (*note rg-group-result: 2b.
+is non nil), it’s possible to control how the line and column numbers
+are displayed in the result buffer.
+
+Example settings:
+
+     (setq rg-align-position-numbers t)
+     (setq rg-align-line-number-field-length 3)
+     (setq rg-align-column-number-field-length 3)
+     (setq rg-align-line-column-separator "#")
+     (setq rg-align-position-content-separator "|")
+
+Will yield the following format:
+
+     File: matched_file.foo
+       1#  2|match1
+     888# 10|match2
+
+ -- ELisp Variable: rg-align-position-numbers [t]
+
+     Setting this to ‘t’ will align line and column numbers in columns
+     padded with white space.
+
+ -- ELisp Variable: rg-align-line-number-field-length [4]
+
+     Defines the length of the line number field.
+
+ -- ELisp Variable: rg-align-column-number-field-length [3]
+
+     Defines the length of the column number field.
+
+ -- ELisp Variable: rg-align-line-column-separator [" "]
+
+     Separator string used between line and column numbers.  ‘nil’ means
+     use default separator from 'ripgrep'.
+
+ -- ELisp Variable: rg-align-position-content-separator [" "]
+
+     Separator string used between the position numbers and matched
+     content.  ‘nil’ means use default separator from 'ripgrep'.
+
+
+File: rgel.info,  Node: Faces,  Next: Configuration functions,  Prev: Customization,  Up: Configuration
+
+2.2 Faces
+=========
+
+All faces are in the subgroup ‘rg-face’ of the main group ‘rg’.
+
+     M-x customize-group [RET] rg-face [RET]
+
+* Menu:
+
+* Results buffer: Results buffer<2>.
+* Header line::
+
+
+File: rgel.info,  Node: Results buffer<2>,  Next: Header line,  Up: Faces
+
+2.2.1 Results buffer
+--------------------
+
+ -- ELisp Variable: rg-match-face [match]
+
+     Face used to highlight matches in result.
+
+ -- ELisp Variable: rg-error-face [compilation-error]
+
+     Face used to highlight errors when invoking 'ripgrep'.
+
+ -- ELisp Variable: rg-context-face [shadow]
+
+     Face used to highlight context lines in 'ripgrep' output when
+     ‘--context-lines’ flag is used.
+
+ -- ELisp Variable: rg-info-face [compilation-info]
+
+     Face used to highlight general info in results buffer.  For
+     instance the number of matches found.
+
+ -- ELisp Variable: rg-warning-face [compilation-warning]
+
+     Face used to highlight warnings in the 'ripgrep' output.
+
+ -- ELisp Variable: rg-filename-face [rg-info-face]
+
+     Face used to highlight filenames in the output.
+
+ -- ELisp Variable: rg-file-tag-face [rg-info-face]
+
+     Face used for the ‘File:’ tag in grouped results output.
+
+ -- ELisp Variable: rg-line-number-face [compilation-line-number]
+
+     Face used on line numbers.
+
+ -- ELisp Variable: rg-column-number-face [compilation-column-number]
+
+     Face used on column numbers.
+
+ -- ELisp Variable: rg-match-position-face [default]
+
+     Face added to file positions.  This is the start of a matching line
+     and depending on configuration may be, file name, column number and
+     line number.
+
+
+File: rgel.info,  Node: Header line,  Prev: Results buffer<2>,  Up: Faces
+
+2.2.2 Header line
+-----------------
+
+ -- ELisp Variable: rg-toggle-on-face [rg-file-tag-face]
+
+     Face used for flags that are toggled ‘on’.
+
+ -- ELisp Variable: rg-toggle-off-face [rg-error-face]
+
+     Face used for flags that are toggled ‘off’.
+
+ -- ELisp Variable: rg-literal-face [rg-filename-face]
+
+     Face used the on the ‘literal’ marker in the header line.
+
+ -- ELisp Variable: rg-regexp-face [compilation-line-number]
+
+     Face used the on the ‘regexp’ marker in the header line.
+
+
+File: rgel.info,  Node: Configuration functions,  Next: Hooks,  Prev: Faces,  Up: Configuration
+
+2.3 Configuration functions
+===========================
+
+ -- ELisp Function: (rg-enable-default-bindings &optional, prefix)
+
+     Enable the default keyboard bindings for the package with prefix
+     key.  If *note rg-use-transient-menu: 55. is on this will enable
+     the menu instead of activating the global bindings.  If ‘prefix’ is
+     not provided *note rg-keymap-prefix: 21. will be used.
+
+ -- ELisp Function: (rg-enable-menu &optional, prefix)
+
+     Enable the *note rg-menu: a. with prefix key.  This bypass *note
+     rg-use-transient-menu: 55. setting.  If ‘prefix’ is not provided
+     *note rg-keymap-prefix: 21. will be used.
+
+ -- ELisp Function: (rg-use-old-defaults)
+
+     This function is provided to keep backwards compatibility with
+     versions older than 2.0.0.  In this version default settings as
+     well as key bindings changed and to bring back the old defaults
+     call this function in your init file.
+
+
+File: rgel.info,  Node: Hooks,  Next: Configuration macros,  Prev: Configuration functions,  Up: Configuration
+
+2.4 Hooks
+=========
+
+ -- ELisp Variable: rg-finish-functions [nil]
+
+     Functions to call when a ripgrep search is finished.
+
+     Each function is called with two arguments: the compilation buffer,
+     and a string describing how the process finished.
+
+ -- ELisp Variable: rg-filter-hook [nil]
+
+     Hook run after new content has been inserted in in the rg buffer.
+     This hook is called every time the rg buffer has been updated with
+     new content and filtered internally by the package.
+
+ -- ELisp Variable: rg-mode-hook [(wgrep-rg-setup)]
+
+     Hook run after entering rg mode.
+
+
+File: rgel.info,  Node: Configuration macros,  Next: Use with evil-mode,  Prev: Hooks,  Up: Configuration
+
+2.5 Configuration macros
+========================
+
+ -- ELisp Function: (rg-define-toggle flag, &optional, key, default)
+
+     This is a macro that can be used to define custom 'ripgrep' flag
+     toggling functions in the result buffer.  The macro takes the flag
+     (and potential value) as an argument and optionally binds the
+     toggle function to a key.  If ‘default’ is non nil the flag is used
+     by default.
+
+     The function defined by this macro will be named as the flag name
+     stripped with leading dashes and prefixed with
+     ‘rg-custom-toggle-flag-’.
+
+          (rg-define-toggle "-uu" "I" t)
+
+     Creates a function named ‘rg-custom-toggle-flag-uu’ that is on by
+     default and bound to ‘I’ in 'rg' result buffer.
+
+          (rg-define-toggle "--context 3" (kbd "C-c c"))
+
+     Creates a function named ‘rg-custom-toggle-flag-context’ that is
+     off by default and bound to ‘C-c c’ in 'rg' result buffer.
+
+ -- ELisp Function: (rg-define-search name, &rest, args)
+
+     This macro can be used to define custom search functions in a
+     declarative style.  Default implementations for common behavior is
+     available and custom forms can also be used.
+
+     It optionally starts with a string that is used as the docstring
+     for the defined function.  The rest of the arguments contain key
+     value pairs according to the specification below.  All keys are
+     optional with specified default if left out.
+
+        - ':query' - Method for retrieving the search string.  Allowed
+          values are ‘point’ which means extract thing at point and
+          ‘ask’ which means prompt the user for a string.  Any form that
+          evaluates to a string is allowed.  Default is ‘ask’.
+
+        - ':format' - Specifies if ‘:query’ is interpreted literally
+          (‘literal’) or as a regexp (‘regexp’).  If it is a form, eg.
+          ‘(not current-prefix-arg)’, and is non-nil the ‘:query’ is
+          interpreted literally, otherwise as a regexp.  Default is
+          ‘regexp’.
+
+        - ':files' - Form that evaluates to a file alias or custom file
+          glob.  ‘current’ means extract alias from current buffer file
+          name, ‘ask’ will prompt the user.  Default is ‘ask’.
+
+        - ':dir' - Root search directory.  Allowed values are ‘ask’ for
+          user prompt, ‘current’ for current dir and ‘project’ for
+          project root.  Any form that evaluates to a directory string
+          is also allowed.  Default is ‘ask’.
+
+        - ':confirm' - ‘never’, ‘always’, or ‘prefix’ are allowed
+          values.  Specifies if the the final search command line string
+          can be modified and confirmed the user.  Default is ‘never’.
+
+        - ':flags' - ‘ask’ or a list of command line flags that will be
+          used when invoking the search.
+
+        - ':menu' - Bind the command into ‘rg-menu’.  Must be a list
+          with three items in it.  The first item is the description of
+          the group in which the new command will appear.  If the group
+          does not exist a new will be created.  The second item is the
+          key binding for this new command (ether a key vector or a key
+          description string) and the third item is the description of
+          the command that will appear in the menu.
+
+     Examples:
+
+          (rg-define-search search-everything-at-home
+            "Search files including hidden in home directory"
+            :query ask
+            :format literal
+            :files "everything"
+            :flags ("--hidden")
+            :dir (getenv "HOME")
+            :menu ("Search" "h" "Home"))
+
+          (rg-define-search rg-emacs
+            "Search the emacs lisp source code."
+            :dir "/usr/share/emacs/25.2/lisp/"
+            :flags '("-z")
+            :files "*.{el,el.gz}"
+            :menu ("Custom" "L" "lisp"))
+
+
+File: rgel.info,  Node: Use with evil-mode,  Next: Customizing the menu,  Prev: Configuration macros,  Up: Configuration
+
+2.6 Use with evil-mode
+======================
+
+Some key bindings clash with 'evil-mode'.  Recommendation is to use evil
+'motion' state for the results buffer and then switch to evil 'normal'
+mode when editing in 'wgrep-mode'.  Some adjustments need to be done to
+avoid the clashes though.
+
+This is a start of a configuration.  This let 'rg-mode'’s key bindings
+override the motion state map bindings based on that these motion keys
+are not important in an 'rg' results buffer.  Adjust this to your
+preferred use case:
+
+     (with-eval-after-load 'rg
+       (advice-add 'wgrep-change-to-wgrep-mode :after
+               #'evil-normal-state)
+       (advice-add 'wgrep-to-original-mode :after
+               #'evil-motion-state)
+       (defvar rg-mode-map)
+       (add-to-list 'evil-motion-state-modes 'rg-mode)
+       (evil-add-hjkl-bindings rg-mode-map 'motion
+         "e" #'wgrep-change-to-wgrep-mode
+         "g" #'rg-recompile
+         "t" #'rg-rerun-change-literal))
+
+
+File: rgel.info,  Node: Customizing the menu,  Prev: Use with evil-mode,  Up: Configuration
+
+2.7 Customizing the menu
+========================
+
+The menu can be modified from the emacs configuration file.
+
+To add a new 'switch' before the option triggered by ‘-n’ at suffix
+level 3:
+
+     (transient-insert-suffix 'rg-menu "-n" '(3 "-o" "Only print matches" "--only-matching"))
+
+To add a new 'option' before the option triggered by ‘-g’ at suffix
+level 4:
+
+     (transient-insert-suffix 'rg-menu "-g" '(4 "-f" "Pattern file" "--file="))
+
+The ‘=’ in ‘--file=’ triggers argument input for the flag.
+
+To remove an item from the menu specify the trigger key in the transient
+remove command.  For example, to remove the ‘Search hidden files’ switch
+use the following:
+
+     (transient-remove-suffix 'rg-menu "-h")
+
+Please refer to the transient
+(https://magit.vc/manual/transient/Modifying-Existing-Transients.html#Modifying-Existing-Transients)
+documentation for details on customizing the menu.
+
+This package also adds a convenience function for appending new
+'commands' to the menu in the groups at the bottom.
+
+ -- ELisp Function: (rg-menu-transient-insert group, key, description,
+          command)
+
+     This inserts a new command under ‘group’ if it exists, otherwise a
+     new group is created.  ‘key’, ‘description’ and ‘command’ is as for
+     the ‘transient-insert-suffix’ function.
+
+     For example to insert a new command under ‘Search’ group:
+
+          (rg-menu-transient-insert "Search" "m" "My search" 'my-search-command)
+
+     It’s usually better to use the ‘:menu’ key of the *note
+     rg-define-search: 22. macro to define a search function and adding
+     it to the menu in one go.
+
+
+File: rgel.info,  Node: Contribute,  Next: License,  Prev: Configuration,  Up: Top
+
+3 Contribute
+************
+
+Contributions are very welcome.  Development is done in the GitHub
+repository (https://github.com/dajva/rg.el).  If you find a bug, please
+report it in the issue tracker (https://github.com/dajva/rg.el/issues).
+
+* Menu:
+
+* Pull requests::
+* Docker::
+* Tests::
+* Documentation::
+
+
+File: rgel.info,  Node: Pull requests,  Next: Docker,  Up: Contribute
+
+3.1 Pull requests
+=================
+
+If you want to submit a patch, please submit a GitHub pull request
+(https://github.com/dajva/rg.el/pulls).  If you want to submit any
+larger code changes, please create an issue first for discussion.  Some
+features does not fit well into this package and there is also good to
+agree on the general design before doing any major work.
+
+The minimum requirements for a pull request to be accepted is that all
+existing tests pass and test coverage should not decrease.  Often a
+patch also needs additional tests, new/changed documentation etc.
+
+Don’t strive to submit a perfect pull request directly.  It’s often
+better to submit something simple that shows the main direction of the
+new code in order to discuss the best way to proceed and what additions
+are needed.
+
+
+File: rgel.info,  Node: Docker,  Next: Tests,  Prev: Pull requests,  Up: Contribute
+
+3.2 Docker
+==========
+
+Docker can be used to run the tests or generate documentation locally
+without installing dependencies on the host and to test with different
+emacs versions.
+
+To use docker, just set the ‘USE_DOCKER’ variable when running the
+tests.  The ‘EMACS_VERSION’ variable can be used to select emacs
+version.  Note that dash (‘-’) is used instead of points (‘.’) in the
+version numbering.  So emacs 28.2 is specified as ‘28-2’.  Emacs are
+installed from ‘https://github.com/purcell/nix-emacs-ci’ so only emacs
+versions supported in that repository will work.
+
+   - Build docker container:
+
+          # Don't use the USE_DOCKER variable here
+          make EMACS_VERSION=30-2 docker-build
+
+   - To run all the tests in docker image:
+
+          make USE_DOCKER=true test
+
+   - Use a specific emacs version:
+
+          make USE_DOCKER=true EMACS_VERSION=snapshot
+
+   - Generate html documentation:
+
+          make USE_DOCKER=true html
+
+
+File: rgel.info,  Node: Tests,  Next: Documentation,  Prev: Docker,  Up: Contribute
+
+3.3 Tests
+=========
+
+Cask (https://cask.readthedocs.io/) is used for testing.  The tests are
+written using the Emacs built in ERT framework and follows the
+conventions of ert runner (https://github.com/rejeep/ert-runner.el)
+although ert_runner is no longer used.  There are also compilation
+tests, style check, package verification etc.
+
+* Menu:
+
+* Setup::
+* Running::
+
+
+File: rgel.info,  Node: Setup,  Next: Running,  Up: Tests
+
+3.3.1 Setup
+-----------
+
+   - Install cask
+     (https://cask.readthedocs.io/en/latest/guide/installation.html)
+
+   - Install all developer dependencies:
+
+          make deps
+
+
+File: rgel.info,  Node: Running,  Prev: Setup,  Up: Tests
+
+3.3.2 Running
+-------------
+
+   - Run the whole test suite:
+
+          make test
+
+   - Run only the unit/integration tests:
+
+          make ert-test
+
+   - Manually test the package with Emacs:
+
+          cask emacs -Q -L . --eval="(progn (require 'rg) (enable-default-bindings))"
+
+
+File: rgel.info,  Node: Documentation,  Prev: Tests,  Up: Contribute
+
+3.4 Documentation
+=================
+
+The documentation is written in org mode.  The export target is
+restructured text
+(https://www.sphinx-doc.org/en/master/usage/restructuredtext/basics.html)
+suitable for the Sphinx (http://www.sphinx-doc.org/en/master/)
+documentation generator.  Sphinx is used to export the output from org
+mode to info and HTML documentation.  The resulting .rst files are used
+for the online documentation on ‘https://readthedocs.io’.
+
+The end user documentation is generated after committing to the main
+repository.  It’s advisable to build both html and info documentation
+locally and verify the output to make sure the changes looks as
+expected.
+
+* Menu:
+
+* Setup: Setup<2>.
+* Building::
+
+
+File: rgel.info,  Node: Setup<2>,  Next: Building,  Up: Documentation
+
+3.4.1 Setup
+-----------
+
+   - Install Sphinx
+     (http://www.sphinx-doc.org/en/master/usage/installation.html)
+
+          sudo apt install python3-sphinx python3-sphinx-rtd-theme
+
+   - Install makeinfo
+
+          sudo apt install texinfo
+
+
+File: rgel.info,  Node: Building,  Prev: Setup<2>,  Up: Documentation
+
+3.4.2 Building
+--------------
+
+   - HTML documentation
+
+          make html
+
+     Open ‘docs/rst/_build/html/index.html’ in a browser.
+
+   - Info documentation
+
+          make info
+
+     To view in emacs:
+
+          C-u M-x info [RET]
+
+     Then select the ‘docs/rst/_build/info/rgel.info’ file.
+
+
+File: rgel.info,  Node: License,  Next: Index,  Prev: Contribute,  Up: Top
+
+4 License
+*********
+
+'rg' is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 3 of the License, or (at your
+option) any later version.
+
+'rg' is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or
+FITNESS FOR A PARTICULAR PURPOSE. See the *note GNU General Public
+License: 94. for more details.
+
+* Menu:
+
+* GNU General Public License::
+
+
+File: rgel.info,  Node: GNU General Public License,  Up: License
+
+4.1 GNU General Public License
+==============================
+
+                         GNU GENERAL PUBLIC LICENSE
+                            Version 3, 29 June 2007
+
+      Copyright (C) 2007 Free Software Foundation, Inc. <http://fsf.org/>
+      Everyone is permitted to copy and distribute verbatim copies
+      of this license document, but changing it is not allowed.
+
+                                 Preamble
+
+       The GNU General Public License is a free, copyleft license for
+     software and other kinds of works.
+
+       The licenses for most software and other practical works are designed
+     to take away your freedom to share and change the works.  By contrast,
+     the GNU General Public License is intended to guarantee your freedom to
+     share and change all versions of a program--to make sure it remains free
+     software for all its users.  We, the Free Software Foundation, use the
+     GNU General Public License for most of our software; it applies also to
+     any other work released this way by its authors.  You can apply it to
+     your programs, too.
+
+       When we speak of free software, we are referring to freedom, not
+     price.  Our General Public Licenses are designed to make sure that you
+     have the freedom to distribute copies of free software (and charge for
+     them if you wish), that you receive source code or can get it if you
+     want it, that you can change the software or use pieces of it in new
+     free programs, and that you know you can do these things.
+
+       To protect your rights, we need to prevent others from denying you
+     these rights or asking you to surrender the rights.  Therefore, you have
+     certain responsibilities if you distribute copies of the software, or if
+     you modify it: responsibilities to respect the freedom of others.
+
+       For example, if you distribute copies of such a program, whether
+     gratis or for a fee, you must pass on to the recipients the same
+     freedoms that you received.  You must make sure that they, too, receive
+     or can get the source code.  And you must show them these terms so they
+     know their rights.
+
+       Developers that use the GNU GPL protect your rights with two steps:
+     (1) assert copyright on the software, and (2) offer you this License
+     giving you legal permission to copy, distribute and/or modify it.
+
+       For the developers' and authors' protection, the GPL clearly explains
+     that there is no warranty for this free software.  For both users' and
+     authors' sake, the GPL requires that modified versions be marked as
+     changed, so that their problems will not be attributed erroneously to
+     authors of previous versions.
+
+       Some devices are designed to deny users access to install or run
+     modified versions of the software inside them, although the manufacturer
+     can do so.  This is fundamentally incompatible with the aim of
+     protecting users' freedom to change the software.  The systematic
+     pattern of such abuse occurs in the area of products for individuals to
+     use, which is precisely where it is most unacceptable.  Therefore, we
+     have designed this version of the GPL to prohibit the practice for those
+     products.  If such problems arise substantially in other domains, we
+     stand ready to extend this provision to those domains in future versions
+     of the GPL, as needed to protect the freedom of users.
+
+       Finally, every program is threatened constantly by software patents.
+     States should not allow patents to restrict development and use of
+     software on general-purpose computers, but in those that do, we wish to
+     avoid the special danger that patents applied to a free program could
+     make it effectively proprietary.  To prevent this, the GPL assures that
+     patents cannot be used to render the program non-free.
+
+       The precise terms and conditions for copying, distribution and
+     modification follow.
+
+                            TERMS AND CONDITIONS
+
+       0. Definitions.
+
+       "This License" refers to version 3 of the GNU General Public License.
+
+       "Copyright" also means copyright-like laws that apply to other kinds of
+     works, such as semiconductor masks.
+
+       "The Program" refers to any copyrightable work licensed under this
+     License.  Each licensee is addressed as "you".  "Licensees" and
+     "recipients" may be individuals or organizations.
+
+       To "modify" a work means to copy from or adapt all or part of the work
+     in a fashion requiring copyright permission, other than the making of an
+     exact copy.  The resulting work is called a "modified version" of the
+     earlier work or a work "based on" the earlier work.
+
+       A "covered work" means either the unmodified Program or a work based
+     on the Program.
+
+       To "propagate" a work means to do anything with it that, without
+     permission, would make you directly or secondarily liable for
+     infringement under applicable copyright law, except executing it on a
+     computer or modifying a private copy.  Propagation includes copying,
+     distribution (with or without modification), making available to the
+     public, and in some countries other activities as well.
+
+       To "convey" a work means any kind of propagation that enables other
+     parties to make or receive copies.  Mere interaction with a user through
+     a computer network, with no transfer of a copy, is not conveying.
+
+       An interactive user interface displays "Appropriate Legal Notices"
+     to the extent that it includes a convenient and prominently visible
+     feature that (1) displays an appropriate copyright notice, and (2)
+     tells the user that there is no warranty for the work (except to the
+     extent that warranties are provided), that licensees may convey the
+     work under this License, and how to view a copy of this License.  If
+     the interface presents a list of user commands or options, such as a
+     menu, a prominent item in the list meets this criterion.
+
+       1. Source Code.
+
+       The "source code" for a work means the preferred form of the work
+     for making modifications to it.  "Object code" means any non-source
+     form of a work.
+
+       A "Standard Interface" means an interface that either is an official
+     standard defined by a recognized standards body, or, in the case of
+     interfaces specified for a particular programming language, one that
+     is widely used among developers working in that language.
+
+       The "System Libraries" of an executable work include anything, other
+     than the work as a whole, that (a) is included in the normal form of
+     packaging a Major Component, but which is not part of that Major
+     Component, and (b) serves only to enable use of the work with that
+     Major Component, or to implement a Standard Interface for which an
+     implementation is available to the public in source code form.  A
+     "Major Component", in this context, means a major essential component
+     (kernel, window system, and so on) of the specific operating system
+     (if any) on which the executable work runs, or a compiler used to
+     produce the work, or an object code interpreter used to run it.
+
+       The "Corresponding Source" for a work in object code form means all
+     the source code needed to generate, install, and (for an executable
+     work) run the object code and to modify the work, including scripts to
+     control those activities.  However, it does not include the work's
+     System Libraries, or general-purpose tools or generally available free
+     programs which are used unmodified in performing those activities but
+     which are not part of the work.  For example, Corresponding Source
+     includes interface definition files associated with source files for
+     the work, and the source code for shared libraries and dynamically
+     linked subprograms that the work is specifically designed to require,
+     such as by intimate data communication or control flow between those
+     subprograms and other parts of the work.
+
+       The Corresponding Source need not include anything that users
+     can regenerate automatically from other parts of the Corresponding
+     Source.
+
+       The Corresponding Source for a work in source code form is that
+     same work.
+
+       2. Basic Permissions.
+
+       All rights granted under this License are granted for the term of
+     copyright on the Program, and are irrevocable provided the stated
+     conditions are met.  This License explicitly affirms your unlimited
+     permission to run the unmodified Program.  The output from running a
+     covered work is covered by this License only if the output, given its
+     content, constitutes a covered work.  This License acknowledges your
+     rights of fair use or other equivalent, as provided by copyright law.
+
+       You may make, run and propagate covered works that you do not
+     convey, without conditions so long as your license otherwise remains
+     in force.  You may convey covered works to others for the sole purpose
+     of having them make modifications exclusively for you, or provide you
+     with facilities for running those works, provided that you comply with
+     the terms of this License in conveying all material for which you do
+     not control copyright.  Those thus making or running the covered works
+     for you must do so exclusively on your behalf, under your direction
+     and control, on terms that prohibit them from making any copies of
+     your copyrighted material outside their relationship with you.
+
+       Conveying under any other circumstances is permitted solely under
+     the conditions stated below.  Sublicensing is not allowed; section 10
+     makes it unnecessary.
+
+       3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+       No covered work shall be deemed part of an effective technological
+     measure under any applicable law fulfilling obligations under article
+     11 of the WIPO copyright treaty adopted on 20 December 1996, or
+     similar laws prohibiting or restricting circumvention of such
+     measures.
+
+       When you convey a covered work, you waive any legal power to forbid
+     circumvention of technological measures to the extent such circumvention
+     is effected by exercising rights under this License with respect to
+     the covered work, and you disclaim any intention to limit operation or
+     modification of the work as a means of enforcing, against the work's
+     users, your or third parties' legal rights to forbid circumvention of
+     technological measures.
+
+       4. Conveying Verbatim Copies.
+
+       You may convey verbatim copies of the Program's source code as you
+     receive it, in any medium, provided that you conspicuously and
+     appropriately publish on each copy an appropriate copyright notice;
+     keep intact all notices stating that this License and any
+     non-permissive terms added in accord with section 7 apply to the code;
+     keep intact all notices of the absence of any warranty; and give all
+     recipients a copy of this License along with the Program.
+
+       You may charge any price or no price for each copy that you convey,
+     and you may offer support or warranty protection for a fee.
+
+       5. Conveying Modified Source Versions.
+
+       You may convey a work based on the Program, or the modifications to
+     produce it from the Program, in the form of source code under the
+     terms of section 4, provided that you also meet all of these conditions:
+
+         a) The work must carry prominent notices stating that you modified
+         it, and giving a relevant date.
+
+         b) The work must carry prominent notices stating that it is
+         released under this License and any conditions added under section
+         7.  This requirement modifies the requirement in section 4 to
+         "keep intact all notices".
+
+         c) You must license the entire work, as a whole, under this
+         License to anyone who comes into possession of a copy.  This
+         License will therefore apply, along with any applicable section 7
+         additional terms, to the whole of the work, and all its parts,
+         regardless of how they are packaged.  This License gives no
+         permission to license the work in any other way, but it does not
+         invalidate such permission if you have separately received it.
+
+         d) If the work has interactive user interfaces, each must display
+         Appropriate Legal Notices; however, if the Program has interactive
+         interfaces that do not display Appropriate Legal Notices, your
+         work need not make them do so.
+
+       A compilation of a covered work with other separate and independent
+     works, which are not by their nature extensions of the covered work,
+     and which are not combined with it such as to form a larger program,
+     in or on a volume of a storage or distribution medium, is called an
+     "aggregate" if the compilation and its resulting copyright are not
+     used to limit the access or legal rights of the compilation's users
+     beyond what the individual works permit.  Inclusion of a covered work
+     in an aggregate does not cause this License to apply to the other
+     parts of the aggregate.
+
+       6. Conveying Non-Source Forms.
+
+       You may convey a covered work in object code form under the terms
+     of sections 4 and 5, provided that you also convey the
+     machine-readable Corresponding Source under the terms of this License,
+     in one of these ways:
+
+         a) Convey the object code in, or embodied in, a physical product
+         (including a physical distribution medium), accompanied by the
+         Corresponding Source fixed on a durable physical medium
+         customarily used for software interchange.
+
+         b) Convey the object code in, or embodied in, a physical product
+         (including a physical distribution medium), accompanied by a
+         written offer, valid for at least three years and valid for as
+         long as you offer spare parts or customer support for that product
+         model, to give anyone who possesses the object code either (1) a
+         copy of the Corresponding Source for all the software in the
+         product that is covered by this License, on a durable physical
+         medium customarily used for software interchange, for a price no
+         more than your reasonable cost of physically performing this
+         conveying of source, or (2) access to copy the
+         Corresponding Source from a network server at no charge.
+
+         c) Convey individual copies of the object code with a copy of the
+         written offer to provide the Corresponding Source.  This
+         alternative is allowed only occasionally and noncommercially, and
+         only if you received the object code with such an offer, in accord
+         with subsection 6b.
+
+         d) Convey the object code by offering access from a designated
+         place (gratis or for a charge), and offer equivalent access to the
+         Corresponding Source in the same way through the same place at no
+         further charge.  You need not require recipients to copy the
+         Corresponding Source along with the object code.  If the place to
+         copy the object code is a network server, the Corresponding Source
+         may be on a different server (operated by you or a third party)
+         that supports equivalent copying facilities, provided you maintain
+         clear directions next to the object code saying where to find the
+         Corresponding Source.  Regardless of what server hosts the
+         Corresponding Source, you remain obligated to ensure that it is
+         available for as long as needed to satisfy these requirements.
+
+         e) Convey the object code using peer-to-peer transmission, provided
+         you inform other peers where the object code and Corresponding
+         Source of the work are being offered to the general public at no
+         charge under subsection 6d.
+
+       A separable portion of the object code, whose source code is excluded
+     from the Corresponding Source as a System Library, need not be
+     included in conveying the object code work.
+
+       A "User Product" is either (1) a "consumer product", which means any
+     tangible personal property which is normally used for personal, family,
+     or household purposes, or (2) anything designed or sold for incorporation
+     into a dwelling.  In determining whether a product is a consumer product,
+     doubtful cases shall be resolved in favor of coverage.  For a particular
+     product received by a particular user, "normally used" refers to a
+     typical or common use of that class of product, regardless of the status
+     of the particular user or of the way in which the particular user
+     actually uses, or expects or is expected to use, the product.  A product
+     is a consumer product regardless of whether the product has substantial
+     commercial, industrial or non-consumer uses, unless such uses represent
+     the only significant mode of use of the product.
+
+       "Installation Information" for a User Product means any methods,
+     procedures, authorization keys, or other information required to install
+     and execute modified versions of a covered work in that User Product from
+     a modified version of its Corresponding Source.  The information must
+     suffice to ensure that the continued functioning of the modified object
+     code is in no case prevented or interfered with solely because
+     modification has been made.
+
+       If you convey an object code work under this section in, or with, or
+     specifically for use in, a User Product, and the conveying occurs as
+     part of a transaction in which the right of possession and use of the
+     User Product is transferred to the recipient in perpetuity or for a
+     fixed term (regardless of how the transaction is characterized), the
+     Corresponding Source conveyed under this section must be accompanied
+     by the Installation Information.  But this requirement does not apply
+     if neither you nor any third party retains the ability to install
+     modified object code on the User Product (for example, the work has
+     been installed in ROM).
+
+       The requirement to provide Installation Information does not include a
+     requirement to continue to provide support service, warranty, or updates
+     for a work that has been modified or installed by the recipient, or for
+     the User Product in which it has been modified or installed.  Access to a
+     network may be denied when the modification itself materially and
+     adversely affects the operation of the network or violates the rules and
+     protocols for communication across the network.
+
+       Corresponding Source conveyed, and Installation Information provided,
+     in accord with this section must be in a format that is publicly
+     documented (and with an implementation available to the public in
+     source code form), and must require no special password or key for
+     unpacking, reading or copying.
+
+       7. Additional Terms.
+
+       "Additional permissions" are terms that supplement the terms of this
+     License by making exceptions from one or more of its conditions.
+     Additional permissions that are applicable to the entire Program shall
+     be treated as though they were included in this License, to the extent
+     that they are valid under applicable law.  If additional permissions
+     apply only to part of the Program, that part may be used separately
+     under those permissions, but the entire Program remains governed by
+     this License without regard to the additional permissions.
+
+       When you convey a copy of a covered work, you may at your option
+     remove any additional permissions from that copy, or from any part of
+     it.  (Additional permissions may be written to require their own
+     removal in certain cases when you modify the work.)  You may place
+     additional permissions on material, added by you to a covered work,
+     for which you have or can give appropriate copyright permission.
+
+       Notwithstanding any other provision of this License, for material you
+     add to a covered work, you may (if authorized by the copyright holders of
+     that material) supplement the terms of this License with terms:
+
+         a) Disclaiming warranty or limiting liability differently from the
+         terms of sections 15 and 16 of this License; or
+
+         b) Requiring preservation of specified reasonable legal notices or
+         author attributions in that material or in the Appropriate Legal
+         Notices displayed by works containing it; or
+
+         c) Prohibiting misrepresentation of the origin of that material, or
+         requiring that modified versions of such material be marked in
+         reasonable ways as different from the original version; or
+
+         d) Limiting the use for publicity purposes of names of licensors or
+         authors of the material; or
+
+         e) Declining to grant rights under trademark law for use of some
+         trade names, trademarks, or service marks; or
+
+         f) Requiring indemnification of licensors and authors of that
+         material by anyone who conveys the material (or modified versions of
+         it) with contractual assumptions of liability to the recipient, for
+         any liability that these contractual assumptions directly impose on
+         those licensors and authors.
+
+       All other non-permissive additional terms are considered "further
+     restrictions" within the meaning of section 10.  If the Program as you
+     received it, or any part of it, contains a notice stating that it is
+     governed by this License along with a term that is a further
+     restriction, you may remove that term.  If a license document contains
+     a further restriction but permits relicensing or conveying under this
+     License, you may add to a covered work material governed by the terms
+     of that license document, provided that the further restriction does
+     not survive such relicensing or conveying.
+
+       If you add terms to a covered work in accord with this section, you
+     must place, in the relevant source files, a statement of the
+     additional terms that apply to those files, or a notice indicating
+     where to find the applicable terms.
+
+       Additional terms, permissive or non-permissive, may be stated in the
+     form of a separately written license, or stated as exceptions;
+     the above requirements apply either way.
+
+       8. Termination.
+
+       You may not propagate or modify a covered work except as expressly
+     provided under this License.  Any attempt otherwise to propagate or
+     modify it is void, and will automatically terminate your rights under
+     this License (including any patent licenses granted under the third
+     paragraph of section 11).
+
+       However, if you cease all violation of this License, then your
+     license from a particular copyright holder is reinstated (a)
+     provisionally, unless and until the copyright holder explicitly and
+     finally terminates your license, and (b) permanently, if the copyright
+     holder fails to notify you of the violation by some reasonable means
+     prior to 60 days after the cessation.
+
+       Moreover, your license from a particular copyright holder is
+     reinstated permanently if the copyright holder notifies you of the
+     violation by some reasonable means, this is the first time you have
+     received notice of violation of this License (for any work) from that
+     copyright holder, and you cure the violation prior to 30 days after
+     your receipt of the notice.
+
+       Termination of your rights under this section does not terminate the
+     licenses of parties who have received copies or rights from you under
+     this License.  If your rights have been terminated and not permanently
+     reinstated, you do not qualify to receive new licenses for the same
+     material under section 10.
+
+       9. Acceptance Not Required for Having Copies.
+
+       You are not required to accept this License in order to receive or
+     run a copy of the Program.  Ancillary propagation of a covered work
+     occurring solely as a consequence of using peer-to-peer transmission
+     to receive a copy likewise does not require acceptance.  However,
+     nothing other than this License grants you permission to propagate or
+     modify any covered work.  These actions infringe copyright if you do
+     not accept this License.  Therefore, by modifying or propagating a
+     covered work, you indicate your acceptance of this License to do so.
+
+       10. Automatic Licensing of Downstream Recipients.
+
+       Each time you convey a covered work, the recipient automatically
+     receives a license from the original licensors, to run, modify and
+     propagate that work, subject to this License.  You are not responsible
+     for enforcing compliance by third parties with this License.
+
+       An "entity transaction" is a transaction transferring control of an
+     organization, or substantially all assets of one, or subdividing an
+     organization, or merging organizations.  If propagation of a covered
+     work results from an entity transaction, each party to that
+     transaction who receives a copy of the work also receives whatever
+     licenses to the work the party's predecessor in interest had or could
+     give under the previous paragraph, plus a right to possession of the
+     Corresponding Source of the work from the predecessor in interest, if
+     the predecessor has it or can get it with reasonable efforts.
+
+       You may not impose any further restrictions on the exercise of the
+     rights granted or affirmed under this License.  For example, you may
+     not impose a license fee, royalty, or other charge for exercise of
+     rights granted under this License, and you may not initiate litigation
+     (including a cross-claim or counterclaim in a lawsuit) alleging that
+     any patent claim is infringed by making, using, selling, offering for
+     sale, or importing the Program or any portion of it.
+
+       11. Patents.
+
+       A "contributor" is a copyright holder who authorizes use under this
+     License of the Program or a work on which the Program is based.  The
+     work thus licensed is called the contributor's "contributor version".
+
+       A contributor's "essential patent claims" are all patent claims
+     owned or controlled by the contributor, whether already acquired or
+     hereafter acquired, that would be infringed by some manner, permitted
+     by this License, of making, using, or selling its contributor version,
+     but do not include claims that would be infringed only as a
+     consequence of further modification of the contributor version.  For
+     purposes of this definition, "control" includes the right to grant
+     patent sublicenses in a manner consistent with the requirements of
+     this License.
+
+       Each contributor grants you a non-exclusive, worldwide, royalty-free
+     patent license under the contributor's essential patent claims, to
+     make, use, sell, offer for sale, import and otherwise run, modify and
+     propagate the contents of its contributor version.
+
+       In the following three paragraphs, a "patent license" is any express
+     agreement or commitment, however denominated, not to enforce a patent
+     (such as an express permission to practice a patent or covenant not to
+     sue for patent infringement).  To "grant" such a patent license to a
+     party means to make such an agreement or commitment not to enforce a
+     patent against the party.
+
+       If you convey a covered work, knowingly relying on a patent license,
+     and the Corresponding Source of the work is not available for anyone
+     to copy, free of charge and under the terms of this License, through a
+     publicly available network server or other readily accessible means,
+     then you must either (1) cause the Corresponding Source to be so
+     available, or (2) arrange to deprive yourself of the benefit of the
+     patent license for this particular work, or (3) arrange, in a manner
+     consistent with the requirements of this License, to extend the patent
+     license to downstream recipients.  "Knowingly relying" means you have
+     actual knowledge that, but for the patent license, your conveying the
+     covered work in a country, or your recipient's use of the covered work
+     in a country, would infringe one or more identifiable patents in that
+     country that you have reason to believe are valid.
+
+       If, pursuant to or in connection with a single transaction or
+     arrangement, you convey, or propagate by procuring conveyance of, a
+     covered work, and grant a patent license to some of the parties
+     receiving the covered work authorizing them to use, propagate, modify
+     or convey a specific copy of the covered work, then the patent license
+     you grant is automatically extended to all recipients of the covered
+     work and works based on it.
+
+       A patent license is "discriminatory" if it does not include within
+     the scope of its coverage, prohibits the exercise of, or is
+     conditioned on the non-exercise of one or more of the rights that are
+     specifically granted under this License.  You may not convey a covered
+     work if you are a party to an arrangement with a third party that is
+     in the business of distributing software, under which you make payment
+     to the third party based on the extent of your activity of conveying
+     the work, and under which the third party grants, to any of the
+     parties who would receive the covered work from you, a discriminatory
+     patent license (a) in connection with copies of the covered work
+     conveyed by you (or copies made from those copies), or (b) primarily
+     for and in connection with specific products or compilations that
+     contain the covered work, unless you entered into that arrangement,
+     or that patent license was granted, prior to 28 March 2007.
+
+       Nothing in this License shall be construed as excluding or limiting
+     any implied license or other defenses to infringement that may
+     otherwise be available to you under applicable patent law.
+
+       12. No Surrender of Others' Freedom.
+
+       If conditions are imposed on you (whether by court order, agreement or
+     otherwise) that contradict the conditions of this License, they do not
+     excuse you from the conditions of this License.  If you cannot convey a
+     covered work so as to satisfy simultaneously your obligations under this
+     License and any other pertinent obligations, then as a consequence you may
+     not convey it at all.  For example, if you agree to terms that obligate you
+     to collect a royalty for further conveying from those to whom you convey
+     the Program, the only way you could satisfy both those terms and this
+     License would be to refrain entirely from conveying the Program.
+
+       13. Use with the GNU Affero General Public License.
+
+       Notwithstanding any other provision of this License, you have
+     permission to link or combine any covered work with a work licensed
+     under version 3 of the GNU Affero General Public License into a single
+     combined work, and to convey the resulting work.  The terms of this
+     License will continue to apply to the part which is the covered work,
+     but the special requirements of the GNU Affero General Public License,
+     section 13, concerning interaction through a network will apply to the
+     combination as such.
+
+       14. Revised Versions of this License.
+
+       The Free Software Foundation may publish revised and/or new versions of
+     the GNU General Public License from time to time.  Such new versions will
+     be similar in spirit to the present version, but may differ in detail to
+     address new problems or concerns.
+
+       Each version is given a distinguishing version number.  If the
+     Program specifies that a certain numbered version of the GNU General
+     Public License "or any later version" applies to it, you have the
+     option of following the terms and conditions either of that numbered
+     version or of any later version published by the Free Software
+     Foundation.  If the Program does not specify a version number of the
+     GNU General Public License, you may choose any version ever published
+     by the Free Software Foundation.
+
+       If the Program specifies that a proxy can decide which future
+     versions of the GNU General Public License can be used, that proxy's
+     public statement of acceptance of a version permanently authorizes you
+     to choose that version for the Program.
+
+       Later license versions may give you additional or different
+     permissions.  However, no additional obligations are imposed on any
+     author or copyright holder as a result of your choosing to follow a
+     later version.
+
+       15. Disclaimer of Warranty.
+
+       THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
+     APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
+     HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
+     OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
+     THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+     PURPOSE.  THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
+     IS WITH YOU.  SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
+     ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+       16. Limitation of Liability.
+
+       IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+     WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
+     THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
+     GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
+     USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
+     DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
+     PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
+     EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
+     SUCH DAMAGES.
+
+       17. Interpretation of Sections 15 and 16.
+
+       If the disclaimer of warranty and limitation of liability provided
+     above cannot be given local legal effect according to their terms,
+     reviewing courts shall apply local law that most closely approximates
+     an absolute waiver of all civil liability in connection with the
+     Program, unless a warranty or assumption of liability accompanies a
+     copy of the Program in return for a fee.
+
+                          END OF TERMS AND CONDITIONS
+
+                 How to Apply These Terms to Your New Programs
+
+       If you develop a new program, and you want it to be of the greatest
+     possible use to the public, the best way to achieve this is to make it
+     free software which everyone can redistribute and change under these terms.
+
+       To do so, attach the following notices to the program.  It is safest
+     to attach them to the start of each source file to most effectively
+     state the exclusion of warranty; and each file should have at least
+     the "copyright" line and a pointer to where the full notice is found.
+
+         <one line to give the program's name and a brief idea of what it does.>
+         Copyright (C) <year>  <name of author>
+
+         This program is free software: you can redistribute it and/or modify
+         it under the terms of the GNU General Public License as published by
+         the Free Software Foundation, either version 3 of the License, or
+         (at your option) any later version.
+
+         This program is distributed in the hope that it will be useful,
+         but WITHOUT ANY WARRANTY; without even the implied warranty of
+         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+         GNU General Public License for more details.
+
+         You should have received a copy of the GNU General Public License
+         along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+     Also add information on how to contact you by electronic and paper mail.
+
+       If the program does terminal interaction, make it output a short
+     notice like this when it starts in an interactive mode:
+
+         <program>  Copyright (C) <year>  <name of author>
+         This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+         This is free software, and you are welcome to redistribute it
+         under certain conditions; type `show c' for details.
+
+     The hypothetical commands `show w' and `show c' should show the appropriate
+     parts of the General Public License.  Of course, your program's commands
+     might be different; for a GUI interface, you would use an "about box".
+
+       You should also get your employer (if you work as a programmer) or school,
+     if any, to sign a "copyright disclaimer" for the program, if necessary.
+     For more information on this, and how to apply and follow the GNU GPL, see
+     <http://www.gnu.org/licenses/>.
+
+       The GNU General Public License does not permit incorporating your program
+     into proprietary programs.  If your program is a subroutine library, you
+     may consider it more useful to permit linking proprietary applications with
+     the library.  If this is what you want to do, use the GNU Lesser General
+     Public License instead of this License.  But first, please read
+     <http://www.gnu.org/philosophy/why-not-lgpl.html>.
+
+
+File: rgel.info,  Node: Index,  Prev: License,  Up: Top
+
+Index
+*****
+
+[index]
+* Menu:
+
+* compilation-next-error (command):      Navigation.          (line   8)
+* compilation-next-file (command):       Navigation.          (line  36)
+* compilation-previous-error (command):  Navigation.          (line  12)
+* compilation-previous-file (command):   Navigation.          (line  40)
+* compile-goto-error (command):          Navigation.          (line  44)
+* next-error-no-select (command):        Navigation.          (line  16)
+* previous-error-no-select (command):    Navigation.          (line  21)
+* rg (command):                          Interactive search.  (line   9)
+* rg-align-column-number-field-length (customize option): Position numbers alignment.
+                                                              (line  33)
+* rg-align-line-column-separator (customize option): Position numbers alignment.
+                                                              (line  37)
+* rg-align-line-number-field-length (customize option): Position numbers alignment.
+                                                              (line  29)
+* rg-align-position-content-separator (customize option): Position numbers alignment.
+                                                              (line  42)
+* rg-align-position-numbers (customize option): Position numbers alignment.
+                                                              (line  24)
+* rg-back-history (command):             History navigation.  (line  10)
+* rg-buffer-name (customize option):     Customization.       (line 128)
+* rg-column-number-face (customize option): Results buffer<2>.
+                                                              (line  40)
+* rg-command-line-flags (customize option): Customization.    (line  68)
+* rg-context-face (customize option):    Results buffer<2>.   (line  14)
+* rg-custom-type-aliases (customize option): Customization.   (line  29)
+* rg-default-alias-fallback (customize option): Customization.
+                                                              (line  62)
+* rg-define-search (function):           Configuration macros.
+                                                              (line  28)
+* rg-define-toggle (function):           Configuration macros.
+                                                              (line   6)
+* rg-dwim (command):                     Do what I mean.      (line  35)
+* rg-dwim-current-dir (command):         Do what I mean.      (line  23)
+* rg-dwim-current-file (command):        Do what I mean.      (line  27)
+* rg-dwim-project-dir (command):         Do what I mean.      (line  19)
+* rg-enable-default-bindings (function): Configuration functions.
+                                                              (line   6)
+* rg-enable-menu (function):             Configuration functions.
+                                                              (line  13)
+* rg-error-face (customize option):      Results buffer<2>.   (line  10)
+* rg-executable (customize option):      Customization.       (line  11)
+* rg-executable-per-connection (customize option): Customization.
+                                                              (line  21)
+* rg-file-tag-face (customize option):   Results buffer<2>.   (line  32)
+* rg-filename-face (customize option):   Results buffer<2>.   (line  28)
+* rg-filter-hook (customize option):     Hooks.               (line  13)
+* rg-finish-functions (customize option): Hooks.              (line   6)
+* rg-forward-history (command):          History navigation.  (line  14)
+* rg-group-result (customize option):    Customization.       (line  74)
+* rg-hide-command (customize option):    Customization.       (line 103)
+* rg-ignore-case (customize option):     Customization.       (line  86)
+* rg-ignore-ripgreprc (customize option): Customization.      (line 146)
+* rg-info-face (customize option):       Results buffer<2>.   (line  19)
+* rg-keymap-prefix (customize option):   Customization.       (line 109)
+* rg-kill-saved-searches (command):      Search management.   (line  43)
+* rg-line-number-face (customize option): Results buffer<2>.  (line  36)
+* rg-list-searches (command):            Search management.   (line  38)
+* rg-literal (command):                  Interactive search.  (line  23)
+* rg-literal-face (customize option):    Header line.         (line  14)
+* rg-match-face (customize option):      Results buffer<2>.   (line   6)
+* rg-match-position-face (customize option): Results buffer<2>.
+                                                              (line  44)
+* rg-menu (command):                     Refine search.       (line  51)
+* rg-menu-transient-insert (function):   Customizing the menu.
+                                                              (line  33)
+* rg-mode-hook (customize option):       Hooks.               (line  19)
+* rg-next-file (command):                Navigation.          (line  26)
+* rg-prev-file (command):                Navigation.          (line  31)
+* rg-prioritized-type-aliases (customize option): Customization.
+                                                              (line  50)
+* rg-project (command):                  Project search.      (line  17)
+* rg-recompile (command):                Refine search.       (line  34)
+* rg-regexp-face (customize option):     Header line.         (line  18)
+* rg-rerun-change-dir (command):         Refine search.       (line  10)
+* rg-rerun-change-files (command):       Refine search.       (line  14)
+* rg-rerun-change-literal (command):     Refine search.       (line  18)
+* rg-rerun-change-regexp (command):      Refine search.       (line  23)
+* rg-rerun-toggle-case (command):        Refine search.       (line  38)
+* rg-rerun-toggle-ignore (command):      Refine search.       (line  43)
+* rg-save-search (command):              Search management.   (line  10)
+* rg-save-search-as-name (command):      Search management.   (line  22)
+* rg-show-columns (customize option):    Customization.       (line  82)
+* rg-show-header (customize option):     Customization.       (line 122)
+* rg-toggle-off-face (customize option): Header line.         (line  10)
+* rg-toggle-on-face (customize option):  Header line.         (line   6)
+* rg-use-old-defaults (function):        Configuration functions.
+                                                              (line  19)
+* rg-use-transient-menu (customize option): Customization.    (line 115)
+* rg-warning-face (customize option):    Results buffer<2>.   (line  24)
+* wgrep-change-to-wgrep-mode (command):  Edit and apply wgrep.
+                                                              (line  10)
+
+
+
+Tag Table:
+Node: Top317
+Ref: index doc496
+Ref: 0496
+Node: Usage1496
+Ref: usage doc1573
+Ref: 11573
+Ref: usage rg-manual1573
+Ref: 21573
+Ref: usage usage1573
+Ref: 31573
+Node: Installation1694
+Ref: usage id11764
+Ref: 41764
+Ref: usage installation1764
+Ref: 51764
+Node: Searching5722
+Ref: usage id25815
+Ref: 85815
+Ref: usage searching5815
+Ref: 95815
+Node: Case sensitivity6733
+Ref: usage case-sensitivity6820
+Ref: b6820
+Node: Interactive search7513
+Ref: usage basic-search7623
+Ref: d7623
+Ref: usage interactive-search7623
+Ref: e7623
+Ref: usage command-rg7790
+Ref: f7790
+Ref: usage command-rg-literal8463
+Ref: 128463
+Node: Project search8839
+Ref: usage id38947
+Ref: 138947
+Ref: usage project-search8947
+Ref: 148947
+Ref: usage command-rg-project9618
+Ref: 159618
+Node: Do what I mean9892
+Ref: usage do-what-i-mean9996
+Ref: 169996
+Ref: usage id49996
+Ref: 179996
+Ref: usage command-rg-dwim-project-dir10739
+Ref: 1910739
+Ref: usage command-rg-dwim-current-dir10842
+Ref: 1a10842
+Ref: usage command-rg-dwim-current-file10937
+Ref: 1b10937
+Ref: usage command-rg-dwim11343
+Ref: 1c11343
+Node: Isearch search11649
+Ref: usage id511756
+Ref: 1d11756
+Ref: usage isearch-search11756
+Ref: 611756
+Node: File type aliases12301
+Ref: usage file-type-aliases12402
+Ref: 1012402
+Ref: usage id612402
+Ref: 1e12402
+Node: The menu13765
+Ref: usage id713843
+Ref: 2013843
+Ref: usage the-menu13843
+Ref: a13843
+Node: Results buffer15992
+Ref: usage id816090
+Ref: 2416090
+Ref: usage results-buffer16090
+Ref: 2316090
+Node: Navigation16737
+Ref: usage navigation16818
+Ref: 2516818
+Ref: usage command-compilation-next-error16910
+Ref: 2616910
+Ref: usage command-compilation-previous-error16997
+Ref: 2716997
+Ref: usage command-next-error-no-select17092
+Ref: 2817092
+Ref: usage command-previous-error-no-select17236
+Ref: 2917236
+Ref: usage command-rg-next-file17388
+Ref: 2a17388
+Ref: usage command-rg-prev-file17543
+Ref: 2c17543
+Ref: usage command-compilation-next-file17702
+Ref: 2d17702
+Ref: usage command-compilation-previous-file17789
+Ref: 2e17789
+Ref: usage command-compile-goto-error17879
+Ref: 2f17879
+Node: Refine search18120
+Ref: usage refine-search18234
+Ref: 3018234
+Ref: usage command-rg-rerun-change-dir18451
+Ref: 3118451
+Ref: usage command-rg-rerun-change-files18542
+Ref: 3218542
+Ref: usage command-rg-rerun-change-literal18638
+Ref: 3318638
+Ref: usage command-rg-rerun-change-regexp18766
+Ref: 3418766
+Ref: usage command-rg-recompile19205
+Ref: 3519205
+Ref: usage command-rg-rerun-toggle-case19306
+Ref: 3619306
+Ref: usage command-rg-rerun-toggle-ignore19459
+Ref: 3719459
+Ref: usage command-rg-menu19731
+Ref: 3919731
+Node: Full command line search19834
+Ref: usage full-command-line-search19956
+Ref: 1119956
+Ref: usage id919956
+Ref: 3a19956
+Node: History navigation20480
+Ref: usage history-navigation20609
+Ref: 3b20609
+Ref: usage id1020609
+Ref: 3c20609
+Ref: usage command-rg-back-history20855
+Ref: 3d20855
+Ref: usage command-rg-forward-history20931
+Ref: 3e20931
+Node: Edit and apply wgrep21177
+Ref: usage edit-and-apply21273
+Ref: 3f21273
+Ref: usage edit-and-apply-wgrep21273
+Ref: 4021273
+Ref: usage command-wgrep-change-to-wgrep-mode21495
+Ref: 4121495
+Node: Search management21741
+Ref: usage id1221847
+Ref: 4221847
+Ref: usage search-management21847
+Ref: 4321847
+Ref: usage command-rg-save-search22088
+Ref: 4422088
+Ref: usage command-rg-save-search-as-name22531
+Ref: 4522531
+Ref: usage command-rg-list-searches23272
+Ref: 4723272
+Ref: usage command-rg-kill-saved-searches23427
+Ref: 4823427
+Node: Multi line search23928
+Ref: usage id1324011
+Ref: 4924011
+Ref: usage multi-line-search24011
+Ref: 4a24011
+Node: Configuration24698
+Ref: configuration doc24782
+Ref: 4c24782
+Ref: configuration configuration24782
+Ref: 4d24782
+Node: Customization24964
+Ref: configuration customization25039
+Ref: 4e25039
+Ref: configuration id125039
+Ref: 4f25039
+Ref: configuration option-rg-executable25230
+Ref: 5025230
+Ref: configuration option-rg-executable-per-connection25791
+Ref: 5125791
+Ref: configuration option-rg-custom-type-aliases26162
+Ref: 1f26162
+Ref: configuration option-rg-prioritized-type-aliases26824
+Ref: 5226824
+Ref: configuration option-rg-default-alias-fallback27204
+Ref: 1827204
+Ref: configuration option-rg-command-line-flags27455
+Ref: 4b27455
+Ref: configuration option-rg-group-result27678
+Ref: 2b27678
+Ref: configuration option-rg-show-columns28020
+Ref: 5328020
+Ref: configuration option-rg-ignore-case28127
+Ref: c28127
+Ref: configuration option-rg-hide-command28767
+Ref: 5428767
+Ref: configuration option-rg-keymap-prefix29021
+Ref: 2129021
+Ref: configuration option-rg-use-transient-menu29253
+Ref: 5529253
+Ref: configuration option-rg-show-header29459
+Ref: 5629459
+Ref: configuration option-rg-buffer-name29667
+Ref: 4629667
+Ref: configuration option-rg-ignore-ripgreprc30380
+Ref: 730380
+Node: Position numbers alignment31015
+Ref: configuration id231089
+Ref: 5731089
+Ref: configuration position-numbers-alignment31089
+Ref: 5831089
+Ref: configuration option-rg-align-position-numbers31696
+Ref: 5931696
+Ref: configuration option-rg-align-line-number-field-length31853
+Ref: 5a31853
+Ref: configuration option-rg-align-column-number-field-length31963
+Ref: 5b31963
+Ref: configuration option-rg-align-line-column-separator32077
+Ref: 5c32077
+Ref: configuration option-rg-align-position-content-separator32256
+Ref: 5d32256
+Node: Faces32457
+Ref: configuration faces32564
+Ref: 5e32564
+Node: Results buffer<2>32767
+Ref: configuration results-buffer32844
+Ref: 5f32844
+Ref: configuration option-rg-match-face32887
+Ref: 6032887
+Ref: configuration option-rg-error-face32978
+Ref: 6132978
+Ref: configuration option-rg-context-face33094
+Ref: 6233094
+Ref: configuration option-rg-info-face33249
+Ref: 6333249
+Ref: configuration option-rg-warning-face33411
+Ref: 6433411
+Ref: configuration option-rg-filename-face33533
+Ref: 6533533
+Ref: configuration option-rg-file-tag-face33640
+Ref: 6633640
+Ref: configuration option-rg-line-number-face33760
+Ref: 6733760
+Ref: configuration option-rg-column-number-face33860
+Ref: 6833860
+Ref: configuration option-rg-match-position-face33966
+Ref: 6933966
+Node: Header line34185
+Ref: configuration header-line34262
+Ref: 6a34262
+Ref: configuration header-line-config34262
+Ref: 6b34262
+Ref: configuration option-rg-toggle-on-face34299
+Ref: 6c34299
+Ref: configuration option-rg-toggle-off-face34410
+Ref: 6d34410
+Ref: configuration option-rg-literal-face34520
+Ref: 6e34520
+Ref: configuration option-rg-regexp-face34644
+Ref: 6f34644
+Node: Configuration functions34773
+Ref: configuration configuration-functions34872
+Ref: 7034872
+Ref: configuration id334872
+Ref: 7134872
+Ref: configuration function-rg-enable-default-bindings34929
+Ref: 7234929
+Ref: configuration function-rg-enable-menu35275
+Ref: 7335275
+Ref: configuration function-rg-use-old-defaults35523
+Ref: 7435523
+Node: Hooks35816
+Ref: configuration hooks35930
+Ref: 7535930
+Ref: configuration id435930
+Ref: 7635930
+Ref: configuration option-rg-finish-functions35951
+Ref: 7735951
+Ref: configuration option-rg-filter-hook36186
+Ref: 7836186
+Ref: configuration option-rg-mode-hook36429
+Ref: 7936429
+Node: Configuration macros36521
+Ref: configuration configuration-macros36630
+Ref: 7a36630
+Ref: configuration id536630
+Ref: 7b36630
+Ref: configuration function-rg-define-toggle36681
+Ref: 3836681
+Ref: configuration function-rg-define-search37590
+Ref: 2237590
+Node: Use with evil-mode40589
+Ref: configuration use-with-evil-mode40713
+Ref: 7c40713
+Node: Customizing the menu41687
+Ref: configuration customizing-the-menu41782
+Ref: 7d41782
+Ref: configuration id641782
+Ref: 7e41782
+Ref: configuration function-rg-menu-transient-insert42818
+Ref: 7f42818
+Node: Contribute43441
+Ref: contribute doc43527
+Ref: 8043527
+Ref: contribute contribute43527
+Ref: 8143527
+Node: Pull requests43833
+Ref: contribute id143906
+Ref: 8243906
+Ref: contribute pull-requests43906
+Ref: 8343906
+Node: Docker44712
+Ref: contribute docker44799
+Ref: 8444799
+Ref: contribute id244799
+Ref: 8544799
+Node: Tests45769
+Ref: contribute id345856
+Ref: 8645856
+Ref: contribute tests45856
+Ref: 8745856
+Node: Setup46226
+Ref: contribute setup46287
+Ref: 8846287
+Ref: contribute tests-setup46287
+Ref: 8946287
+Node: Running46463
+Ref: contribute running46524
+Ref: 8a46524
+Ref: contribute tests-running46524
+Ref: 8b46524
+Node: Documentation46805
+Ref: contribute documentation46877
+Ref: 8c46877
+Ref: contribute id446877
+Ref: 8d46877
+Node: Setup<2>47597
+Ref: contribute documentation-setup47670
+Ref: 8e47670
+Ref: contribute id547670
+Ref: 8f47670
+Node: Building47910
+Ref: contribute building47983
+Ref: 9047983
+Ref: contribute documentation-building47983
+Ref: 9147983
+Node: License48288
+Ref: index id148366
+Ref: 9248366
+Ref: index license48366
+Ref: 9348366
+Node: GNU General Public License48898
+Ref: gpl doc48966
+Ref: 9548966
+Ref: gpl gnu-general-public-license48966
+Ref: 9648966
+Ref: gpl gpl49029
+Ref: 9449029
+Node: Index86942
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/wgrep-rg.el b/emacs/.emacs.d/elpa/rg-20260823.1828/wgrep-rg.el
new file mode 100644
index 0000000..986b747
--- /dev/null
+++ b/emacs/.emacs.d/elpa/rg-20260823.1828/wgrep-rg.el
@@ -0,0 +1,199 @@
+;;; wgrep-rg.el --- Writable rg buffer and apply the changes to files -*- lexical-binding: t; -*-
+
+;; Author: Masahiro Hayashi <mhayashi1120@gmail.com>
+;; Rewritten by: Dale Sedivec <dale@codefu.org>
+;; Maintainer: David Landell <david.landell@sunnyhill.email>
+;; Keywords: grep edit extensions
+;; URL: http://github.com/dajva/rg.el
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License as
+;; published by the Free Software Foundation; either version 3, or (at
+;; your option) any later version.
+
+;; This program is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
+
+;;; Commentary:
+
+;; wgrep-rg allows you to edit a rg buffer and apply those changes to
+;; the file buffer.
+
+;;; Install:
+
+;; 1. Install rg.el
+;;
+;;   https://github.com/dajva/rg.el
+
+;; 2. Install wgrep.el
+
+;; 3. Put this file into load-path'ed directory, and byte compile it if
+;; desired. And put the following expression into your ~/.emacs.
+;;
+;;     (autoload 'wgrep-rg-setup "wgrep-rg")
+;;     (add-hook 'rg-mode-hook 'wgrep-rg-setup)
+
+;;; Usage:
+
+;; See wgrep.el
+
+;;; Code:
+
+(require 'wgrep)
+
+;; Forward declarations
+(declare-function rg-file-line-column-pattern-group "rg-result.el")
+(declare-function rg-file-line-pattern-group "rg-result.el")
+(defvar rg-mode-hook)
+
+(defvar wgrep-rg-grouped-result-file-regexp "^File:[[:space:]]+\\(.*\\)$"
+  "Regular expression for the start of results for a file in grouped results.
+\"Grouped results\" are what you get from rg.el when
+`rg-group-result' is true or when you call rg with --heading.")
+
+(defvar wgrep-rg-ungrouped-result-regexp
+  "^\\(.+?\\)\\(?:-\\|:\\)\\([1-9][0-9]*\\)\\(?:-\\|:\\)\\(?:[1-9][0-9]*:\\)*"
+  "Regular expression for an ungrouped result.
+You get \"ungrouped results\" when `rg-group-result' is false or
+when you manage to call rg with --no-heading.")
+
+(defun wgrep-rg-prepare-header/footer ()
+  "Add wgrep related text properties for header and footer.
+This is needed in order for wgrep to ignore thos areas when parsing
+the content."
+  (save-excursion
+    (goto-char (point-min))
+    ;; Look for the first useful result line.
+    (let ((result-line-regexp (concat wgrep-rg-grouped-result-file-regexp
+                                      "\\|"
+                                      wgrep-rg-ungrouped-result-regexp)))
+      (while
+          (progn
+            (if (not (re-search-forward result-line-regexp nil t))
+                ;; No results in this buffer, let's mark the whole thing as
+                ;; header.
+                (progn
+                  (add-text-properties (point-min) (point-max)
+                                       '(read-only t wgrep-header t))
+                  nil)
+              (save-excursion
+                (beginning-of-line)
+                ;; The ungrouped result regexp also match the "rg started"
+                ;; line. If that happens continue searching.
+                (if (looking-at-p "rg started.*")
+                    'continue
+                  (add-text-properties (point-min) (point)
+                                       '(read-only t wgrep-header t))
+                  nil)))))
+        (goto-char (point-max))
+        (re-search-backward "^rg finished .*$" nil t)
+        ;; Move to the start of the line after the last result, and
+        ;; mark everything from that line forward as wgrep-footer.
+        (when (zerop (forward-line -1))
+          (add-text-properties (point) (point-max)
+                               '(read-only t wgrep-footer t))))))
+
+(defun wgrep-rg-parse-command-results ()
+  "Parse the rg results for wgrep usage.
+This makes non content of the buffer readonly and marks specific areas
+with wgrep text properties to allow for wgrep to do its job."
+  ;; Note that this function is called with the buffer narrowed to
+  ;; exclude the header and the footer.  (We're going to assert that
+  ;; fact here, because we use (bobp) result a bit further down to
+  ;; decide that we're not reading grouped results; see below.)
+  (unless (bobp)
+    (error "Expected to be called with point at beginning of buffer"))
+  (save-excursion
+    ;; First look for grouped results (`rg-group-result' is/was
+    ;; probably true).
+    (while (re-search-forward wgrep-rg-grouped-result-file-regexp nil t)
+      ;; Ignore the line that introduces matches from a file, so that
+      ;; wgrep doesn't let you edit it.
+      (add-text-properties (match-beginning 0) (match-end 0)
+                           '(wgrep-ignore t))
+      (let ((file-name (match-string-no-properties 1)))
+        ;; Note that I think wgrep uses this property to quickly find
+        ;; the file it's interested in when searching during some
+        ;; operation(s).  We stick it on the file name in the results
+        ;; group header.
+        (add-text-properties (match-beginning 1) (match-end 1)
+                             (list (wgrep-construct-filename-property file-name)
+                                   file-name))
+        ;; Matches are like: 999{separator}55{separator}line content here
+        ;; Context lines are like: 999-line content here
+        (while (and
+                (zerop (forward-line 1)) ; last line
+                (not (looking-at-p "^$"))) ; Empty line between files
+          (cond ((or (looking-at (rg-file-line-column-pattern-group))
+                     (looking-at (rg-file-line-pattern-group))
+                     ;; Context lines
+                     (looking-at "^ *\\([1-9][0-9]*\\)-"))
+                 (add-text-properties (match-beginning 0) (match-end 0)
+                                      (list 'wgrep-line-filename file-name
+                                            'wgrep-line-number
+                                            (string-to-number (match-string 1)))))
+                ;; Ignore context separator.
+                ((looking-at "^--$")
+                 (add-text-properties (match-beginning 0) (match-end 0)
+                                      '(wgrep-ignore t)))))))
+    (when (bobp)
+      ;; Search above never moved point, so match non-grouped results
+      ;; (`rg-group-result' is/was probably false).
+      (let (last-file-name)
+        ;; Matches are like: /foo/bar:999:55:line content here
+        ;; Context lines are like: /foo/bar-999-line content here
+        (while (re-search-forward (concat wgrep-rg-ungrouped-result-regexp
+                                          "\\|\\(^--$\\)")
+                                  nil t)
+          (if (match-beginning 3)
+              ;; Ignore context separator.
+              (add-text-properties (match-beginning 0) (match-end 0)
+                                   '(wgrep-ignore t))
+            (let ((file-name (match-string-no-properties 1))
+                  (line-number (string-to-number (match-string 2))))
+              (unless (equal file-name last-file-name)
+                ;; This line is a result from a different file than
+                ;; the last match (or else this is the first match in
+                ;; the results).  Write the special file name property
+                ;; for wgrep.
+                (let ((file-name-prop
+                       (wgrep-construct-filename-property file-name)))
+                  (add-text-properties (match-beginning 1) (match-end 1)
+                                       (list file-name-prop file-name)))
+                (setq last-file-name file-name))
+              (add-text-properties (match-beginning 0) (match-end 0)
+                                   (list 'wgrep-line-filename file-name
+                                         'wgrep-line-number line-number)))))))))
+
+;;;###autoload
+(defun wgrep-rg-setup ()
+  "Setup wgrep rg support."
+  (set (make-local-variable 'wgrep-header&footer-parser)
+       'wgrep-rg-prepare-header/footer)
+  (set (make-local-variable 'wgrep-results-parser)
+       'wgrep-rg-parse-command-results)
+  (wgrep-setup-internal))
+
+(defun wgrep-rg-warn-ag-setup ()
+  "Print warning message if old ag setup is used."
+  (when (memq 'wgrep-ag-setup rg-mode-hook)
+    (message "Warning: wgrep-ag is no longer supported by this package. Please remove wgrep-ag-setup from rg-mode-hook.")))
+
+;;;###autoload
+(add-hook 'rg-mode-hook 'wgrep-rg-setup)
+
+;; For `unload-feature'
+(defun wgrep-rg-unload-function ()
+  "Allow for unloading wgrep rg support."
+  (remove-hook 'rg-mode-hook 'wgrep-rg-setup))
+
+(provide 'wgrep-rg)
+
+;;; wgrep-rg.el ends here
diff --git a/emacs/.emacs.d/elpa/rg-20260823.1828/wgrep-rg.elc b/emacs/.emacs.d/elpa/rg-20260823.1828/wgrep-rg.elc
new file mode 100644
index 0000000..ee66db7
Binary files /dev/null and b/emacs/.emacs.d/elpa/rg-20260823.1828/wgrep-rg.elc differ
diff --git a/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep-autoloads.el b/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep-autoloads.el
new file mode 100644
index 0000000..024d912
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep-autoloads.el
@@ -0,0 +1,33 @@
+;;; ripgrep-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from ripgrep.el
+
+(autoload 'ripgrep-regexp "ripgrep" "\
+Run a ripgrep search with `REGEXP' rooted at `DIRECTORY'.
+`ARGS' provides Ripgrep command line arguments.
+
+(fn REGEXP DIRECTORY &optional ARGS)" t)
+(register-definition-prefixes "ripgrep" '("ripgrep"))
+
+;;; End of scraped data
+
+(provide 'ripgrep-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; ripgrep-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep-pkg.el b/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep-pkg.el
new file mode 100644
index 0000000..74fe621
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "ripgrep" "20220520.1410"
+  "Front-end for ripgrep, a command line search tool."
+  ()
+  :url "https://github.com/nlamirault/ripgrep.el"
+  :commit "872e250e8f93b8bb0a8a1de8bde17fd9bd116e31"
+  :revdesc "872e250e8f93"
+  :keywords '("ripgrep" "ack" "pt" "ag" "sift" "grep" "search")
+  :authors '(("Nicolas Lamirault" . "nicolas.lamirault@gmail.com"))
+  :maintainers '(("Nicolas Lamirault" . "nicolas.lamirault@gmail.com")))
diff --git a/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep.el b/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep.el
new file mode 100644
index 0000000..7d907b1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep.el
@@ -0,0 +1,232 @@
+;;; ripgrep.el --- Front-end for ripgrep, a command line search tool
+
+;; Copyright (C) 2016 Nicolas Lamirault <nicolas.lamirault@gmail.com>
+;;
+;; Author: Nicolas Lamirault <nicolas.lamirault@gmail.com>
+;; Package-Version: 20220520.1410
+;; Package-Revision: 872e250e8f93
+;; Keywords : ripgrep ack pt ag sift grep search
+;; Homepage: https://github.com/nlamirault/ripgrep.el
+
+;;; Commentary:
+
+;; Emacs front-end for ripgrep, a command line search tool
+
+;; Installation:
+
+;; ripgrep.el is available on the two major community maintained repositories
+;; Melpa stable (https://stable.melpa.org), and Melpa (https://melpa.org)
+;;
+;; (add-to-list 'package-archives
+;;              '("melpa" . "https://melpa.org/packages/") t)
+;;
+;; M-x package-install ripgrep
+
+;;; License:
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License
+;; as published by the Free Software Foundation; either version 2
+;; of the License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program; if not, write to the Free Software
+;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Commentary:
+
+;; Usage :
+
+;; M-x ripgrep-regexp
+
+;;; Code:
+
+(require 'compile)
+(require 'grep)
+(require 'thingatpt)
+(require 'wgrep nil 'noerror) ;; optional
+
+;; Customization
+;; --------------------------
+
+(defgroup ripgrep nil
+  "Ripgrep"
+  :group 'tools
+  :group 'matching)
+
+
+(defcustom ripgrep-executable
+  "rg"
+  "Name of the ripgrep executable to use."
+  :type 'string
+  :group 'ripgrep)
+
+
+(defcustom ripgrep-arguments
+  (list "")
+  "Default arguments passed to ripgrep."
+  :type '(repeat (string))
+  :group 'ripgrep)
+
+
+(defcustom ripgrep-highlight-search t
+  "Non-nil means we highlight the current search term in results.
+This requires the ripgrep command to support --color-match, which is only in v0.14+"
+  :type 'boolean
+  :group 'ripgrep)
+
+
+;; Faces
+;; --------------------------
+
+(defface ripgrep-hit-face '((t :inherit compilation-info))
+  "Face name to use for ripgrep hits."
+  :group 'ripgrep)
+
+(defface ripgrep-match-face '((t :inherit match))
+  "Face name to use for ripgrep matches."
+  :group 'ripgrep)
+
+(defface ripgrep-error-face '((t :inherit compilation-error))
+  "Face name to use for ripgrep errors."
+  :group 'ripgrep)
+
+(defface ripgrep-context-face '((t :inherit shadow))
+  "Face name to use for ripgrep errors."
+  :group 'ripgrep)
+
+
+
+;; Mode
+;; --------------------------
+
+(defvar ripgrep--base-arguments '("--no-heading" "--line-number" "--with-filename")
+  "Options that are always applied to ripgrep commands.")
+
+(defvar ripgrep-search-finished-hook nil
+  "Hook run when ripgrep completes a search in a buffer.")
+
+(defun ripgrep/run-finished-hook (buffer how-finished)
+  "Run the ripgrep hook to signal that the search has completed."
+  (with-current-buffer buffer
+    (run-hooks 'ripgrep-search-finished-hook)))
+
+(defun ripgrep/kill-buffer ()
+  "Kill the ripgrep search buffer."
+  (interactive)
+  (let ((kill-buffer-query-functions))
+    (kill-buffer)))
+
+(defvar ripgrep-search-mode-map
+  (let ((map (make-sparse-keymap)))
+    (set-keymap-parent map compilation-minor-mode-map)
+    (define-key map "p" 'compilation-previous-error)
+    (define-key map "n" 'compilation-next-error)
+    (define-key map "{" 'compilation-previous-file)
+    (define-key map "}" 'compilation-next-file)
+    (define-key map "k" 'ripgrep/kill-buffer)
+    (define-key map "C-c C-p" 'wgrep-change-to-wgrep-mode)
+
+    map)
+  "Keymap for ripgrep-search buffers.
+`compilation-minor-mode-map' is a cdr of this.")
+
+;; from grep-mode-font-lock-keywords
+(defvar ripgrep-search-mode-font-lock-keywords
+   '(;; Command output lines.
+     (": \\(.+\\): \\(?:Permission denied\\|No such \\(?:file or directory\\|device or address\\)\\)$"
+      1 'ripgrep-error-face)
+     ;; remove match from grep-regexp-alist before fontifying
+     ("^Ripgrep[/a-zA-z]* \\(started\\|finished\\).*"
+      (0 '(face nil compilation-message nil help-echo nil mouse-face nil) t))
+     ("^Ripgrep[/a-zA-z]* \\(exited abnormally\\|interrupt\\|killed\\|terminated\\)\\(?:.*with code \\([0-9]+\\)\\)?.*"
+      (0 '(face nil compilation-message nil help-echo nil mouse-face nil) t)
+      (1 'ripgrep-error-face)
+      (2 'ripgrep-error-face nil t))
+     ;; "filename-linenumber-" format is used for context lines in GNU grep,
+     ;; "filename=linenumber=" for lines with function names in "git grep -p".
+     ("^.+?\\([-=\0]\\)[0-9]+\\([-=]\\).*\n" (0 'ripgrep-context-face)
+      (1 (if (eq (char-after (match-beginning 1)) ?\0)
+             `(face nil display ,(match-string 2))))))
+   "Additional things to highlight in ripgrep output.
+This gets tacked on the end of the generated expressions.")
+
+(define-compilation-mode ripgrep-search-mode "Ripgrep"
+  "Ripgrep results compilation mode"
+  (set (make-local-variable 'truncate-lines) t)
+  (set (make-local-variable 'compilation-disable-input) t)
+  (set (make-local-variable 'tool-bar-map) grep-mode-tool-bar-map)
+  (let ((symbol 'compilation-ripgrep)
+        (pattern '("^\\(.+\\):\\([1-9][0-9]*\\):" 1 2)))
+    (set (make-local-variable 'compilation-error-regexp-alist) (list symbol))
+    (set (make-local-variable 'compilation-error-regexp-alist-alist) (list (cons symbol pattern))))
+  (set (make-local-variable 'compilation-error-face) 'ripgrep-hit-face)
+  (add-hook 'compilation-filter-hook 'ripgrep-filter nil t)
+  (add-hook 'compilation-finish-functions 'ripgrep/run-finished-hook nil t)
+  (when (featurep 'wgrep)
+    (add-hook 'ripgrep-search-mode-hook 'wgrep-remove-all-change nil t)
+    (add-hook 'ripgrep-search-mode-hook 'wgrep-setup)))
+
+(defvar ripgrep--match-regexp "\e\\[[0-9]*m\e\\[[0-9]*1m\e\\[[0-9]*1m\\(.*?\\)\e\\[[0-9]*0m"
+  "Used in `ripgrep-filter' to search for the match via ANSI escape codes")
+
+;; Taken from grep-filter, just changed the color regex.
+(defun ripgrep-filter ()
+  "Handle match highlighting escape sequences inserted by the rg process.
+This function is called from `compilation-filter-hook'."
+  (when ripgrep-highlight-search
+    (save-excursion
+      (forward-line 0)
+      (let ((end (point)) beg)
+        (goto-char compilation-filter-start)
+        (forward-line 0)
+        (setq beg (point))
+        ;; Only operate on whole lines so we don't get caught with part of an
+        ;; escape sequence in one chunk and the rest in another.
+        (when (< (point) end)
+          (setq end (copy-marker end))
+          ;; Highlight rg matches and delete marking sequences.
+          (while (re-search-forward ripgrep--match-regexp end 1)
+            (replace-match (propertize (match-string 1)
+                                       'face nil 'font-lock-face 'ripgrep-match-face)
+                           t t))
+          ;; Delete all remaining escape sequences
+          (goto-char beg)
+          (while (re-search-forward "\033\\[[0-9;]*[mK]" end 1)
+            (replace-match "" t t)))))))
+
+;; API
+;; --------------------------
+
+
+;;;###autoload
+(defun ripgrep-regexp (regexp directory &optional args)
+  "Run a ripgrep search with `REGEXP' rooted at `DIRECTORY'.
+`ARGS' provides Ripgrep command line arguments."
+  (interactive
+   (list (read-from-minibuffer "Ripgrep search for: " (thing-at-point 'symbol))
+         (read-directory-name "Directory: ")))
+  (let ((default-directory directory))
+    (compilation-start
+     (mapconcat 'identity
+                (append (list ripgrep-executable)
+                        ripgrep-arguments
+                        args
+                        ripgrep--base-arguments
+                        (when ripgrep-highlight-search '("--color=always"))
+                        (when (and case-fold-search
+                                   (isearch-no-upper-case-p regexp t))
+                          '("--ignore-case"))
+                        '("--")
+                        (list (shell-quote-argument regexp) ".")) " ")
+     'ripgrep-search-mode)))
+
+
+(provide 'ripgrep)
+;;; ripgrep.el ends here
diff --git a/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep.elc b/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep.elc
new file mode 100644
index 0000000..7d34e0b
Binary files /dev/null and b/emacs/.emacs.d/elpa/ripgrep-20220520.1410/ripgrep.elc differ
diff --git a/emacs/.emacs.d/elpa/s-20260522.135/s-autoloads.el b/emacs/.emacs.d/elpa/s-20260522.135/s-autoloads.el
new file mode 100644
index 0000000..12e5abd
--- /dev/null
+++ b/emacs/.emacs.d/elpa/s-20260522.135/s-autoloads.el
@@ -0,0 +1,28 @@
+;;; s-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from s.el
+
+(register-definition-prefixes "s" '("s-"))
+
+;;; End of scraped data
+
+(provide 's-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; s-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/s-20260522.135/s-pkg.el b/emacs/.emacs.d/elpa/s-20260522.135/s-pkg.el
new file mode 100644
index 0000000..d63735e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/s-20260522.135/s-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "s" "20260522.135"
+  "The long lost Emacs string manipulation library."
+  ()
+  :url "https://github.com/magnars/s.el"
+  :commit "7393fa6fa305403e628058c0ec78c35d610fab05"
+  :revdesc "7393fa6fa305"
+  :keywords '("strings")
+  :authors '(("Magnar Sveen" . "magnars@gmail.com"))
+  :maintainers '(("Jason Milkins" . "jasonm23@gmail.com")))
diff --git a/emacs/.emacs.d/elpa/s-20260522.135/s.el b/emacs/.emacs.d/elpa/s-20260522.135/s.el
new file mode 100644
index 0000000..1a916ca
--- /dev/null
+++ b/emacs/.emacs.d/elpa/s-20260522.135/s.el
@@ -0,0 +1,793 @@
+;;; s.el --- The long lost Emacs string manipulation library. -*- lexical-binding: t -*-
+
+;; Copyright (C) 2012-2022 Magnar Sveen
+
+;; Author: Magnar Sveen <magnars@gmail.com>
+;; Maintainer: Jason Milkins <jasonm23@gmail.com>
+;; Package-Version: 20260522.135
+;; Package-Revision: 7393fa6fa305
+;; Keywords: strings
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; The long lost Emacs string manipulation library.
+;;
+;; See documentation on https://github.com/magnars/s.el#functions
+
+;;; Code:
+
+;; Silence byte-compiler
+(defvar ucs-normalize-combining-chars)  ; Defined in `ucs-normalize'
+(autoload 'slot-value "eieio")
+
+(defun s-trim-left (s)
+  "Remove whitespace at the beginning of S."
+  (declare (pure t) (side-effect-free t))
+  (save-match-data
+    (if (string-match "\\`[ \t\n\r]+" s)
+        (replace-match "" t t s)
+      s)))
+
+(defun s-trim-right (s)
+  "Remove whitespace at the end of S."
+  (declare (pure t) (side-effect-free t))
+  (save-match-data
+    (if (string-match "[ \t\n\r]+\\'" s)
+        (replace-match "" t t s)
+      s)))
+
+(defun s-trim (s)
+  "Remove whitespace at the beginning and end of S."
+  (declare (pure t) (side-effect-free t))
+  (s-trim-left (s-trim-right s)))
+
+(defun s-collapse-whitespace (s)
+  "Convert all adjacent whitespace characters to a single space."
+  (declare (pure t) (side-effect-free t))
+  (replace-regexp-in-string "[ \t\n\r]+" " " s))
+
+(defun s-unindent (s &optional bol)
+  "Unindent S which has BOL (beginning of line) indicators.
+BOL will default to pipe. You can optionally supply your own."
+  (declare (pure t) (side-effect-free t))
+  (let ((case-fold-search nil)
+        (bol (or bol "|")))
+   (s-replace-regexp (concat "^[[:space:]]*" (regexp-quote bol)) "" s)))
+
+(defun s-split (separator s &optional omit-nulls)
+  "Split S into substrings bounded by matches for regexp SEPARATOR.
+If OMIT-NULLS is non-nil, zero-length substrings are omitted.
+
+This is a simple wrapper around the built-in `split-string'."
+  (declare (side-effect-free t))
+  (save-match-data
+    (split-string s separator omit-nulls)))
+
+(defun s-split-up-to (separator s n &optional omit-nulls)
+  "Split S up to N times into substrings bounded by matches for regexp SEPARATOR.
+
+If OMIT-NULLS is non-nil, zero-length substrings are omitted.
+
+See also `s-split'."
+  (declare (side-effect-free t))
+  (save-match-data
+    (let ((op 0)
+          (r nil))
+      (with-temp-buffer
+        (insert s)
+        (setq op (goto-char (point-min)))
+        (while (and (re-search-forward separator nil t)
+                    (< 0 n))
+          (let ((sub (buffer-substring op (match-beginning 0))))
+            (unless (and omit-nulls
+                         (equal sub ""))
+              (push sub r)))
+          (setq op (goto-char (match-end 0)))
+          (setq n (1- n)))
+        (let ((sub (buffer-substring op (point-max))))
+          (unless (and omit-nulls
+                       (equal sub ""))
+            (push sub r))))
+      (nreverse r))))
+
+(defun s-lines (s)
+  "Splits S into a list of strings on newline characters."
+  (declare (pure t) (side-effect-free t))
+  (s-split "\\(\r\n\\|[\n\r]\\)" s))
+
+(defun s-join (separator strings)
+  "Join all the strings in STRINGS with SEPARATOR in between."
+  (declare (pure t) (side-effect-free t))
+  (mapconcat 'identity strings separator))
+
+(defun s-concat (&rest strings)
+  "Join all the string arguments into one string."
+  (declare (pure t) (side-effect-free t))
+  (apply 'concat strings))
+
+(defun s-prepend (prefix s)
+  "Concatenate PREFIX and S."
+  (declare (pure t) (side-effect-free t))
+  (concat prefix s))
+
+(defun s-append (suffix s)
+  "Concatenate S and SUFFIX."
+  (declare (pure t) (side-effect-free t))
+  (concat s suffix))
+
+(defun s-splice (needle n s)
+  "Splice NEEDLE into S at position N.
+0 is the beginning of the string, -1 is the end."
+  (if (< n 0)
+      (let ((left (substring s 0 (+ 1 n (length s))))
+            (right (s-right (- -1 n) s)))
+        (concat left needle right))
+    (let ((left (s-left n s))
+          (right (substring s n (length s))))
+        (concat left needle right))))
+
+
+(defun s-repeat (num s)
+  "Make a string of S repeated NUM times."
+  (declare (pure t) (side-effect-free t))
+  (let (ss)
+    (while (> num 0)
+      (setq ss (cons s ss))
+      (setq num (1- num)))
+    (apply 'concat ss)))
+
+(defun s-chop-suffix (suffix s)
+  "Remove SUFFIX if it is at end of S."
+  (declare (pure t) (side-effect-free t))
+  (let ((pos (- (length suffix))))
+    (if (and (>= (length s) (length suffix))
+             (string= suffix (substring s pos)))
+        (substring s 0 pos)
+      s)))
+
+(defun s-chop-suffixes (suffixes s)
+  "Remove SUFFIXES one by one in order, if they are at the end of S."
+  (declare (pure t) (side-effect-free t))
+  (while suffixes
+    (setq s (s-chop-suffix (car suffixes) s))
+    (setq suffixes (cdr suffixes)))
+  s)
+
+(defun s-chop-prefix (prefix s)
+  "Remove PREFIX if it is at the start of S."
+  (declare (pure t) (side-effect-free t))
+  (let ((pos (length prefix)))
+    (if (and (>= (length s) (length prefix))
+             (string= prefix (substring s 0 pos)))
+        (substring s pos)
+      s)))
+
+(defun s-chop-prefixes (prefixes s)
+  "Remove PREFIXES one by one in order, if they are at the start of S."
+  (declare (pure t) (side-effect-free t))
+  (while prefixes
+    (setq s (s-chop-prefix (car prefixes) s))
+    (setq prefixes (cdr prefixes)))
+  s)
+
+(defun s-shared-start (s1 s2)
+  "Returns the longest prefix S1 and S2 have in common."
+  (declare (pure t) (side-effect-free t))
+  (let ((cmp (compare-strings s1 0 (length s1) s2 0 (length s2))))
+    (if (eq cmp t) s1 (substring s1 0 (1- (abs cmp))))))
+
+(defun s-shared-end (s1 s2)
+  "Returns the longest suffix S1 and S2 have in common."
+  (declare (pure t) (side-effect-free t))
+  (let* ((l1 (length s1))
+         (l2 (length s2))
+         (search-length (min l1 l2))
+         (i 0))
+    (while (and (< i search-length)
+                (= (aref s1 (- l1 i 1)) (aref s2 (- l2 i 1))))
+      (setq i (1+ i)))
+    ;; If I is 0, then it means that there's no common suffix between
+    ;; S1 and S2.
+    ;;
+    ;; However, since (substring s (- 0)) will return the whole
+    ;; string, `s-shared-end' should simply return the empty string
+    ;; when I is 0.
+    (if (zerop i)
+        ""
+      (substring s1 (- i)))))
+
+(defun s-chomp (s)
+  "Remove one trailing `\\n`, `\\r` or `\\r\\n` from S."
+  (declare (pure t) (side-effect-free t))
+  (s-chop-suffixes '("\n" "\r") s))
+
+(defun s-truncate (len s &optional ellipsis)
+  "If S is longer than LEN, cut it down and add ELLIPSIS to the end.
+
+The resulting string, including ellipsis, will be LEN characters
+long.
+
+When not specified, ELLIPSIS defaults to ‘...’."
+  (declare (pure t) (side-effect-free t))
+  (unless ellipsis
+    (setq ellipsis "..."))
+  (if (> (length s) len)
+      (format "%s%s" (substring s 0 (- len (length ellipsis))) ellipsis)
+    s))
+
+(defun s-word-wrap (len s)
+  "If S is longer than LEN, wrap the words with newlines."
+  (declare (side-effect-free t))
+  (save-match-data
+    (with-temp-buffer
+      (insert s)
+      (let ((fill-column len))
+        (fill-region (point-min) (point-max)))
+      (buffer-substring (point-min) (point-max)))))
+
+(defun s-center (len s)
+  "If S is shorter than LEN, pad it with spaces so it is centered."
+  (declare (pure t) (side-effect-free t))
+  (let ((extra (max 0 (- len (length s)))))
+    (concat
+     (make-string (ceiling extra 2) ?\s)
+     s
+     (make-string (floor extra 2) ?\s))))
+
+(defun s-pad-left (len padding s)
+  "If S is shorter than LEN, pad it with PADDING on the left."
+  (declare (pure t) (side-effect-free t))
+  (let ((extra (max 0 (- len (length s)))))
+    (concat (make-string extra (string-to-char padding))
+            s)))
+
+(defun s-pad-right (len padding s)
+  "If S is shorter than LEN, pad it with PADDING on the right."
+  (declare (pure t) (side-effect-free t))
+  (let ((extra (max 0 (- len (length s)))))
+    (concat s
+            (make-string extra (string-to-char padding)))))
+
+(defun s-left (len s)
+  "Returns up to the LEN first chars of S."
+  (declare (pure t) (side-effect-free t))
+  (if (> (length s) len)
+      (substring s 0 len)
+    s))
+
+(defun s-right (len s)
+  "Returns up to the LEN last chars of S."
+  (declare (pure t) (side-effect-free t))
+  (let ((l (length s)))
+    (if (> l len)
+        (substring s (- l len) l)
+      s)))
+
+(defun s-chop-left (len s)
+  "Remove the first LEN chars from S."
+  (let ((l (length s)))
+    (if (> l len)
+        (substring s len l)
+      "")))
+
+(defun s-chop-right (len s)
+  "Remove the last LEN chars from S."
+  (let ((l (length s)))
+    (if (> l len)
+        (substring s 0 (- l len))
+      "")))
+
+(defun s-ends-with? (suffix s &optional ignore-case)
+  "Does S end with SUFFIX?
+
+If IGNORE-CASE is non-nil, the comparison is done without paying
+attention to case differences.
+
+Alias: `s-suffix?'"
+  (declare (pure t) (side-effect-free t))
+  (let ((start-pos (- (length s) (length suffix))))
+    (and (>= start-pos 0)
+         (eq t (compare-strings suffix nil nil
+                                s start-pos nil ignore-case)))))
+
+(defun s-starts-with? (prefix s &optional ignore-case)
+  "Does S start with PREFIX?
+
+If IGNORE-CASE is non-nil, the comparison is done without paying
+attention to case differences.
+
+Alias: `s-prefix?'. This is a simple wrapper around the built-in
+`string-prefix-p'."
+  (declare (pure t) (side-effect-free t))
+  (string-prefix-p prefix s ignore-case))
+
+(defun s--truthy? (val)
+  (declare (pure t) (side-effect-free t))
+  (not (null val)))
+
+(defun s-contains? (needle s &optional ignore-case)
+  "Does S contain NEEDLE?
+
+If IGNORE-CASE is non-nil, the comparison is done without paying
+attention to case differences."
+  (declare (pure t) (side-effect-free t))
+  (let ((case-fold-search ignore-case))
+    (s--truthy? (string-match-p (regexp-quote needle) s))))
+
+(defun s-equals? (s1 s2)
+  "Is S1 equal to S2?
+
+This is a simple wrapper around the built-in `string-equal'."
+  (declare (pure t) (side-effect-free t))
+  (string-equal s1 s2))
+
+(defun s-less? (s1 s2)
+  "Is S1 less than S2?
+
+This is a simple wrapper around the built-in `string-lessp'."
+  (declare (pure t) (side-effect-free t))
+  (string-lessp s1 s2))
+
+(defun s-matches? (regexp s &optional start)
+  "Does REGEXP match S?
+If START is non-nil the search starts at that index.
+
+This is a simple wrapper around the built-in `string-match-p'."
+  (declare (side-effect-free t))
+  (s--truthy? (string-match-p regexp s start)))
+
+(defun s-blank? (s)
+  "Is S nil or the empty string?"
+  (declare (pure t) (side-effect-free t))
+  (or (null s) (string= "" s)))
+
+(defun s-blank-str? (s)
+  "Is S nil or the empty string or string only contains whitespace?"
+  (declare (pure t) (side-effect-free t))
+  (or (s-blank? s) (s-blank? (s-trim s))))
+
+(defun s-present? (s)
+  "Is S anything but nil or the empty string?"
+  (declare (pure t) (side-effect-free t))
+  (not (s-blank? s)))
+
+(defun s-presence (s)
+  "Return S if it's `s-present?', otherwise return nil."
+  (declare (pure t) (side-effect-free t))
+  (and (s-present? s) s))
+
+(defun s-lowercase? (s)
+  "Are all the letters in S in lower case?"
+  (declare (side-effect-free t))
+  (let ((case-fold-search nil))
+    (not (string-match-p "[[:upper:]]" s))))
+
+(defun s-uppercase? (s)
+  "Are all the letters in S in upper case?"
+  (declare (side-effect-free t))
+  (let ((case-fold-search nil))
+    (not (string-match-p "[[:lower:]]" s))))
+
+(defun s-mixedcase? (s)
+  "Are there both lower case and upper case letters in S?"
+  (let ((case-fold-search nil))
+    (s--truthy?
+     (and (string-match-p "[[:lower:]]" s)
+          (string-match-p "[[:upper:]]" s)))))
+
+(defun s-capitalized? (s)
+  "In S, is the first letter upper case, and all other letters lower case?"
+  (declare (side-effect-free t))
+  (let ((case-fold-search nil))
+    (s--truthy?
+     (string-match-p "^[[:upper:]][^[:upper:]]*$" s))))
+
+(defun s-numeric? (s)
+  "Is S a number?"
+  (declare (pure t) (side-effect-free t))
+  (s--truthy?
+   (string-match-p "^[0-9]+$" s)))
+
+(defun s-replace (old new s)
+  "Replaces OLD with NEW in S."
+  (declare (pure t) (side-effect-free t))
+  (replace-regexp-in-string (regexp-quote old) new s t t))
+
+(defalias 's-replace-regexp 'replace-regexp-in-string)
+
+(defun s--aget (alist key)
+  "Get the value of KEY in ALIST."
+  (declare (pure t) (side-effect-free t))
+  (cdr (assoc-string key alist)))
+
+(defun s-replace-all (replacements s)
+  "REPLACEMENTS is a list of cons-cells. Each `car` is replaced with `cdr` in S."
+  (declare (pure t) (side-effect-free t))
+  (let ((case-fold-search nil))
+   (replace-regexp-in-string (regexp-opt (mapcar 'car replacements))
+                             (lambda (it) (s--aget replacements it))
+                             s t t)))
+
+(defun s-downcase (s)
+  "Convert S to lower case.
+
+This is a simple wrapper around the built-in `downcase'."
+  (declare (side-effect-free t))
+  (downcase s))
+
+(defun s-upcase (s)
+  "Convert S to upper case.
+
+This is a simple wrapper around the built-in `upcase'."
+  (declare (side-effect-free t))
+  (upcase s))
+
+(defun s-capitalize (s)
+  "Convert S first word's first character to upper and the rest to lower case."
+  (declare (side-effect-free t))
+  (concat (upcase (substring s 0 1)) (downcase (substring s 1))))
+
+(defun s-titleize (s)
+  "Convert in S each word's first character to upper and the rest to lower case.
+
+This is a simple wrapper around the built-in `capitalize'."
+  (declare (side-effect-free t))
+  (capitalize s))
+
+(defmacro s-with (s form &rest more)
+  "Threads S through the forms. Inserts S as the last item
+in the first form, making a list of it if it is not a list
+already. If there are more forms, inserts the first form as the
+last item in second form, etc."
+  (declare (debug (form &rest [&or (function &rest form) fboundp])))
+  (if (null more)
+      (if (listp form)
+          `(,(car form) ,@(cdr form) ,s)
+        (list form s))
+    `(s-with (s-with ,s ,form) ,@more)))
+
+(put 's-with 'lisp-indent-function 1)
+
+(defun s-index-of (needle s &optional ignore-case)
+  "Returns first index of NEEDLE in S, or nil.
+
+If IGNORE-CASE is non-nil, the comparison is done without paying
+attention to case differences."
+  (declare (pure t) (side-effect-free t))
+  (let ((case-fold-search ignore-case))
+    (string-match-p (regexp-quote needle) s)))
+
+(defun s-reverse (s)
+  "Return the reverse of S."
+  (declare (pure t) (side-effect-free t))
+  (save-match-data
+    (if (multibyte-string-p s)
+        (let ((input (string-to-list s))
+              output)
+          (require 'ucs-normalize)
+          (while input
+            ;; Handle entire grapheme cluster as a single unit
+            (let ((grapheme (list (pop input))))
+              (while (memql (car input) ucs-normalize-combining-chars)
+                (push (pop input) grapheme))
+              (setq output (nconc (nreverse grapheme) output))))
+          (concat output))
+      (concat (nreverse (string-to-list s))))))
+
+(defun s-match-strings-all (regex string)
+  "Return a list of matches for REGEX in STRING.
+
+Each element itself is a list of matches, as per
+`match-string'. Multiple matches at the same position will be
+ignored after the first."
+  (declare (side-effect-free t))
+  (save-match-data
+    (let ((all-strings ())
+          (i 0))
+      (while (and (< i (length string))
+                  (string-match regex string i))
+        (setq i (1+ (match-beginning 0)))
+        (let (strings
+              (num-matches (/ (length (match-data)) 2))
+              (match 0))
+          (while (/= match num-matches)
+            (push (match-string match string) strings)
+            (setq match (1+ match)))
+          (push (nreverse strings) all-strings)))
+      (nreverse all-strings))))
+
+(defun s-matched-positions-all (regexp string &optional subexp-depth)
+  "Return a list of matched positions for REGEXP in STRING.
+SUBEXP-DEPTH is 0 by default."
+  (declare (side-effect-free t))
+  (if (null subexp-depth)
+      (setq subexp-depth 0))
+  (save-match-data
+    (let ((pos 0) result)
+      (while (and (string-match regexp string pos)
+                  (< pos (length string)))
+        (push (cons (match-beginning subexp-depth) (match-end subexp-depth)) result)
+        (setq pos (match-end 0)))
+      (nreverse result))))
+
+(defun s-match (regexp s &optional start)
+  "When the given expression matches the string, this function returns a list
+of the whole matching string and a string for each matched subexpressions.
+Subexpressions that didn't match are represented by nil elements
+in the list, except that non-matching subexpressions at the end
+of REGEXP might not appear at all in the list.  That is, the
+returned list can be shorter than the number of subexpressions in
+REGEXP plus one.  If REGEXP did not match the returned value is
+an empty list (nil).
+
+When START is non-nil the search will start at that index."
+  (declare (side-effect-free t))
+  (save-match-data
+    (if (string-match regexp s start)
+        (let ((match-data-list (match-data))
+              result)
+          (while match-data-list
+            (let* ((beg (car match-data-list))
+                   (end (cadr match-data-list))
+                   (subs (if (and beg end) (substring s beg end) nil)))
+              (setq result (cons subs result))
+              (setq match-data-list
+                    (cddr match-data-list))))
+          (nreverse result)))))
+
+(defun s-slice-at (regexp s)
+  "Slices S up at every index matching REGEXP."
+  (declare (side-effect-free t))
+  (if (s-blank? s)
+      (list s)
+    (let (ss)
+      (while (not (s-blank? s))
+        (save-match-data
+          (let ((i (string-match regexp s 1)))
+            (if i
+                (setq ss (cons (substring s 0 i) ss)
+                      s (substring s i))
+              (setq ss (cons s ss)
+                    s "")))))
+      (nreverse ss))))
+
+(defun s-split-words (s)
+  "Split S into list of words."
+  (declare (side-effect-free t))
+  (s-split
+   "[^[:word:]0-9]+"
+   (let ((case-fold-search nil))
+     (replace-regexp-in-string
+      "\\([[:lower:]]\\)\\([[:upper:]]\\)" "\\1 \\2"
+      (replace-regexp-in-string "\\([[:upper:]]\\)\\([[:upper:]][0-9[:lower:]]\\)" "\\1 \\2" s)))
+   t))
+
+(defun s--mapcar-head (fn-head fn-rest list)
+  "Like MAPCAR, but applies a different function to the first element."
+  (if list
+      (cons (funcall fn-head (car list)) (mapcar fn-rest (cdr list)))))
+
+(defun s-lower-camel-case (s)
+  "Convert S to lowerCamelCase."
+  (declare (side-effect-free t))
+  (s-join "" (s--mapcar-head 'downcase 'capitalize (s-split-words s))))
+
+(defun s-upper-camel-case (s)
+  "Convert S to UpperCamelCase."
+  (declare (side-effect-free t))
+  (s-join "" (mapcar 'capitalize (s-split-words s))))
+
+(defun s-snake-case (s)
+  "Convert S to snake_case."
+  (declare (side-effect-free t))
+  (s-join "_" (mapcar 'downcase (s-split-words s))))
+
+(defun s-dashed-words (s)
+  "Convert S to dashed-words."
+  (declare (side-effect-free t))
+  (s-join "-" (mapcar 'downcase (s-split-words s))))
+
+(defun s-spaced-words (s)
+  "Convert S to spaced words."
+  (declare (side-effect-free t))
+  (s-join " " (s-split-words s)))
+
+(defun s-capitalized-words (s)
+  "Convert S to Capitalized words."
+  (declare (side-effect-free t))
+  (let ((words (s-split-words s)))
+    (s-join " " (cons (capitalize (car words)) (mapcar 'downcase (cdr words))))))
+
+(defun s-titleized-words (s)
+  "Convert S to Titleized Words."
+  (declare (side-effect-free t))
+  (s-join " " (mapcar 's-titleize (s-split-words s))))
+
+(defun s-word-initials (s)
+  "Convert S to its initials."
+  (declare (side-effect-free t))
+  (s-join "" (mapcar (lambda (ss) (substring ss 0 1))
+                     (s-split-words s))))
+
+;; Errors for s-format
+(progn
+  (put 's-format-resolve
+       'error-conditions
+       '(error s-format s-format-resolve))
+  (put 's-format-resolve
+       'error-message
+       "Cannot resolve a template to values"))
+
+(defun s-format (template replacer &optional extra)
+  "Format TEMPLATE with the function REPLACER.
+
+REPLACER takes an argument of the format variable and optionally
+an extra argument which is the EXTRA value from the call to
+`s-format'.
+
+Several standard `s-format' helper functions are recognized and
+adapted for this:
+
+    (s-format \"${name}\" \\='gethash hash-table)
+    (s-format \"${name}\" \\='aget alist)
+    (s-format \"$0\" \\='elt sequence)
+
+The REPLACER function may be used to do any other kind of
+transformation."
+  (let ((saved-match-data (match-data)))
+    (unwind-protect
+        (replace-regexp-in-string
+         "\\$\\({\\([^}]+\\)}\\|[0-9]+\\)"
+         (lambda (md)
+           (let ((var
+                  (let ((m (match-string 2 md)))
+                    (if m m
+                      (string-to-number (match-string 1 md)))))
+                 (replacer-match-data (match-data)))
+             (unwind-protect
+                 (let ((v
+                        (cond
+                         ((eq replacer 'gethash)
+                          (funcall replacer var extra))
+                         ((eq replacer 'aget)
+                          (funcall 's--aget extra var))
+                         ((eq replacer 'elt)
+                          (funcall replacer extra var))
+                         ((eq replacer 'oref)
+                          (funcall #'slot-value extra (intern var)))
+                         (t
+                          (set-match-data saved-match-data)
+                          (if extra
+                              (funcall replacer var extra)
+                            (funcall replacer var))))))
+                   (if v (format "%s" v) (signal 's-format-resolve md)))
+               (set-match-data replacer-match-data))))
+         template
+         ;; Need literal to make sure it works
+         t t)
+      (set-match-data saved-match-data))))
+
+(defvar s-lex-value-as-lisp nil
+  "If `t' interpolate lisp values as lisp.
+
+`s-lex-format' inserts values with (format \"%S\").")
+
+(defun s-lex-fmt|expand (fmt)
+  "Expand FMT into lisp."
+  (declare (side-effect-free t))
+  (list 's-format fmt (quote 'aget)
+        (append '(list)
+                (mapcar
+                 (lambda (matches)
+                   (list
+                    'cons
+                    (cadr matches)
+                    `(format
+                      (if s-lex-value-as-lisp "%S" "%s")
+                      ,(intern (cadr matches)))))
+                 (s-match-strings-all "${\\([^}]+\\)}" fmt)))))
+
+(defmacro s-lex-format (format-str)
+  "`s-format` with the current environment.
+
+FORMAT-STR may use the `s-format' variable reference to refer to
+any variable:
+
+ (let ((x 1))
+   (s-lex-format \"x is: ${x}\"))
+
+The values of the variables are interpolated with \"%s\" unless
+the variable `s-lex-value-as-lisp' is `t' and then they are
+interpolated with \"%S\"."
+  (declare (debug (form)))
+  (s-lex-fmt|expand format-str))
+
+(defun s-count-matches (regexp s &optional start end)
+  "Count occurrences of `regexp' in `s'.
+
+`start', inclusive, and `end', exclusive, delimit the part of `s' to
+match.  `start' and `end' are both indexed starting at 1; the initial
+character in `s' is index 1.
+
+This function starts looking for the next match from the end of the
+previous match.  Hence, it ignores matches that overlap a previously
+found match.  To count overlapping matches, use
+`s-count-matches-all'."
+  (declare (side-effect-free t))
+  (save-match-data
+    (with-temp-buffer
+      (insert s)
+      (goto-char (point-min))
+      (count-matches regexp (or start 1) (or end (point-max))))))
+
+(defun s-count-matches-all (regexp s &optional start end)
+  "Count occurrences of `regexp' in `s'.
+
+`start', inclusive, and `end', exclusive, delimit the part of `s' to
+match.  `start' and `end' are both indexed starting at 1; the initial
+character in `s' is index 1.
+
+This function starts looking for the next match from the second
+character of the previous match.  Hence, it counts matches that
+overlap a previously found match.  To ignore matches that overlap a
+previously found match, use `s-count-matches'."
+  (declare (side-effect-free t))
+  (let* ((anchored-regexp (format "^%s" regexp))
+         (match-count 0)
+         (i 0)
+         (narrowed-s (substring s (if start (1- start) 0)
+                                  (when end (1- end)))))
+    (save-match-data
+      (while (< i (length narrowed-s))
+        (when (s-matches? anchored-regexp (substring narrowed-s i))
+          (setq match-count (1+ match-count)))
+        (setq i (1+ i))))
+    match-count))
+
+(defun s-wrap (s prefix &optional suffix)
+  "Wrap string S with PREFIX and optionally SUFFIX.
+
+Return string S with PREFIX prepended.  If SUFFIX is present, it
+is appended, otherwise PREFIX is used as both prefix and
+suffix."
+  (declare (pure t) (side-effect-free t))
+  (concat prefix s (or suffix prefix)))
+
+
+;;; Aliases
+
+(defalias 's-blank-p 's-blank?)
+(defalias 's-blank-str-p 's-blank-str?)
+(defalias 's-capitalized-p 's-capitalized?)
+(defalias 's-contains-p 's-contains?)
+(defalias 's-ends-with-p 's-ends-with?)
+(defalias 's-equals-p 's-equals?)
+(defalias 's-less-p 's-less?)
+(defalias 's-lowercase-p 's-lowercase?)
+(defalias 's-matches-p 's-matches?)
+(defalias 's-mixedcase-p 's-mixedcase?)
+(defalias 's-numeric-p 's-numeric?)
+(defalias 's-prefix-p 's-starts-with?)
+(defalias 's-prefix? 's-starts-with?)
+(defalias 's-present-p 's-present?)
+(defalias 's-starts-with-p 's-starts-with?)
+(defalias 's-suffix-p 's-ends-with?)
+(defalias 's-suffix? 's-ends-with?)
+(defalias 's-uppercase-p 's-uppercase?)
+
+
+(provide 's)
+;;; s.el ends here
diff --git a/emacs/.emacs.d/elpa/s-20260522.135/s.elc b/emacs/.emacs.d/elpa/s-20260522.135/s.elc
new file mode 100644
index 0000000..cf29e48
Binary files /dev/null and b/emacs/.emacs.d/elpa/s-20260522.135/s.elc differ
diff --git a/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path-autoloads.el b/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path-autoloads.el
new file mode 100644
index 0000000..5a51289
--- /dev/null
+++ b/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path-autoloads.el
@@ -0,0 +1,28 @@
+;;; shrink-path-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from shrink-path.el
+
+(register-definition-prefixes "shrink-path" '("shrink-path-"))
+
+;;; End of scraped data
+
+(provide 'shrink-path-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; shrink-path-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path-pkg.el b/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path-pkg.el
new file mode 100644
index 0000000..51a5521
--- /dev/null
+++ b/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "shrink-path" "20190208.1335"
+  "Fish-style path."
+  '((emacs "24")
+    (s     "1.6.1")
+    (dash  "1.8.0")
+    (f     "0.10.0"))
+  :url "https://gitlab.com/bennya/shrink-path.el"
+  :commit "c14882c8599aec79a6e8ef2d06454254bb3e1e41"
+  :revdesc "c14882c8599a")
diff --git a/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path.el b/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path.el
new file mode 100644
index 0000000..17c3f38
--- /dev/null
+++ b/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path.el
@@ -0,0 +1,149 @@
+;;; shrink-path.el --- fish-style path -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2017 Benjamin Andresen
+
+;; Author: Benjamin Andresen
+;; Package-Version: 20190208.1335
+;; Package-Revision: c14882c8599a
+;; URL: https://gitlab.com/bennya/shrink-path.el
+;; Package-Requires: ((emacs "24") (s "1.6.1") (dash "1.8.0") (f "0.10.0"))
+
+;; This file is NOT part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file LICENSE.  If not, write to the
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
+
+;;; Commentary:
+
+;; Provides functions that offer fish shell[1] path truncation.
+;; Directory /usr/share/emacs/site-lisp => /u/s/e/site-lisp
+;;
+;; Also includes utility functions that make integration in eshell or the
+;; modeline easier.
+;;
+;; [1] https://fishshell.com/
+
+
+;;; Code:
+(require 'dash)
+(require 's)
+(require 'f)
+(require 'rx)
+
+(defun shrink-path--truncate (str)
+  "Return STR's first character or first two characters if hidden."
+  (substring str 0 (if (s-starts-with? "." str) 2 1)))
+
+(defun shrink-path--dirs-internal (full-path &optional truncate-all)
+  "Return fish-style truncated string based on FULL-PATH.
+Optional parameter TRUNCATE-ALL will cause the function to truncate the last
+directory too."
+  (let* ((home (expand-file-name "~"))
+         (path (replace-regexp-in-string
+                (s-concat "^" home) "~" full-path))
+         (split (s-split "/" path 'omit-nulls))
+         (split-len (length split))
+         shrunk)
+    (->> split
+         (--map-indexed (if (= it-index (1- split-len))
+                            (if truncate-all (shrink-path--truncate it) it)
+                          (shrink-path--truncate it)))
+         (s-join "/")
+         (setq shrunk))
+    (s-concat (unless (s-matches? (rx bos (or "~" "/")) shrunk) "/")
+              shrunk
+              (unless (s-ends-with? "/" shrunk) "/"))))
+
+
+(defun shrink-path-dirs (&optional path truncate-tail)
+  "Given PATH return fish-styled shrunken down path.
+TRUNCATE-TAIL will cause the function to truncate the last directory too."
+  (let* ((path (or path default-directory))
+         (path (f-full path)))
+    (cond
+     ((s-equals? (f-short path) "/") "/")
+     ((s-matches? (rx bos (or "~" "/") eos) "~/"))
+     (t (shrink-path--dirs-internal path truncate-tail)))))
+
+(defun shrink-path-expand (str &optional absolute-p)
+  "Return expanded path from STR if found or list of matches on multiple.
+The path referred to by STR has to exist for this to work.
+If ABSOLUTE-P is t the returned path will be absolute."
+  (let* ((str-split (s-split "/" str 'omit-nulls))
+         (head (car str-split)))
+    (if (= (length str-split) 1)
+        (s-concat "/" str-split)
+      (--> (-drop 1 str-split)   ;; drop head
+           (-map (lambda (e) (s-concat e "*")) it)
+           (-drop-last 1 it)     ;; drop tail as it may not exist
+           (s-join "/" it)
+           (s-concat (if (s-equals? head "~") "~/" head) it)
+           (f-glob it)
+           (-map (lambda (e) (s-concat e "/" (-last-item str-split))) it)
+           (if absolute-p (-map #'f-full it) (-map #'f-abbrev it))
+           (if (= (length it) 1) (car it) it)))))
+
+(defun shrink-path-prompt (&optional pwd)
+  "Return cons of BASE and DIR for PWD.
+If PWD isn't provided will default to `default-directory'."
+  (let* ((pwd (or pwd default-directory))
+         (shrunk (shrink-path-dirs pwd))
+         (split (--> shrunk (s-split "/" it 'omit-nulls)))
+         base dir)
+    (setq dir (or (-last-item split) "/"))
+    (setq base (if (s-equals? dir "/") ""
+                 (s-chop-suffix (s-concat dir "/") shrunk)))
+    (cons base dir)))
+
+(defun shrink-path-file (file &optional truncate-tail)
+  "Return FILE's shrunk down path and filename.
+TRUNCATE-TAIL controls if the last directory should also be shortened."
+  (let ((filename (f-filename file))
+        (dirname (f-dirname file)))
+    (s-concat (shrink-path-dirs dirname truncate-tail) filename)))
+
+(defun shrink-path-file-expand (str &optional exists-p absolute-p)
+  "Return STR's expanded filename.
+The path referred to by STR has to exist for this to work.
+If EXISTS-P is t the filename also has to exist.
+If ABSOLUTE-P is t the returned path will be absolute."
+  (let ((expanded (shrink-path-expand str absolute-p)))
+    (if (and expanded exists-p)
+        (if (f-exists? expanded) expanded)
+      expanded)))
+
+(defun shrink-path-file-mixed (shrink-path rel-path filename)
+  "Returns list of mixed truncated file name locations.
+
+Consists of SHRINK-PATH's parent, SHRINK-PATH basename, relative REL-PATH and
+FILENAME.
+For use in modeline or prompts, etc."
+  (let ((shrunk-dirs (shrink-path-prompt shrink-path))
+        sp-parent sp-rel rel-rel nd-file)
+
+    (when (f-descendant-of? filename shrink-path)
+      (when shrunk-dirs
+        (setq sp-parent (car shrunk-dirs)
+              sp-rel (cdr shrunk-dirs)))
+      (setq rel-rel (if (or (f-same? rel-path shrink-path)
+                            (s-equals? (f-relative rel-path shrink-path) "."))
+                        nil
+                      (f-relative rel-path shrink-path)))
+      (setq nd-file (file-name-nondirectory filename))
+
+      (list sp-parent sp-rel rel-rel nd-file))))
+
+(provide 'shrink-path)
+;;; shrink-path.el ends here
diff --git a/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path.elc b/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path.elc
new file mode 100644
index 0000000..5a95ee4
Binary files /dev/null and b/emacs/.emacs.d/elpa/shrink-path-20190208.1335/shrink-path.elc differ
diff --git a/emacs/.emacs.d/elpa/spinner-1.7.4.signed b/emacs/.emacs.d/elpa/spinner-1.7.4.signed
new file mode 100644
index 0000000..8045da3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/spinner-1.7.4.signed
@@ -0,0 +1 @@
+Good signature from 645357D2883A0966 GNU ELPA Signing Agent (2023) <elpasign@elpa.gnu.org> (trust undefined) created at 2024-03-31T18:00:03+0800 using EDDSA
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/spinner-1.7.4/README-elpa b/emacs/.emacs.d/elpa/spinner-1.7.4/README-elpa
new file mode 100644
index 0000000..96454a8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/spinner-1.7.4/README-elpa
@@ -0,0 +1,96 @@
+                              ━━━━━━━━━━━━
+                               SPINNER.EL
+                              ━━━━━━━━━━━━
+
+
+Add spinners and progress-bars to the mode-line for ongoing operations.
+
+<file:some-spinners.gif>
+
+<file:all-spinners.gif>
+
+
+1 Usage
+═══════
+
+  First of all, don’t forget to add `(spinner "VERSION")' to your
+  package’s dependencies.
+
+
+1.1 Major-modes
+───────────────
+
+  1. Just call `(spinner-start)' and a spinner will be added to the
+     mode-line.
+  2. Call `(spinner-stop)' on the same buffer when you want to remove
+     it.
+
+  The default spinner is a line drawing that rotates. You can pass an
+  argument to `spinner-start' to specify which spinner you want. All
+  possibilities are listed in the `spinner-types' variable, but here are
+  a few examples for you to try:
+
+  • `(spinner-start 'vertical-breathing 10)'
+  • `(spinner-start 'minibox)'
+  • `(spinner-start 'moon)'
+  • `(spinner-start 'triangle)'
+
+  You can also define your own as a vector of strings (see the examples
+  in `spinner-types').
+
+
+1.2 Minor-modes
+───────────────
+
+  Minor-modes can create a spinner with `spinner-create' and then add it
+  to their mode-line lighter. They can then start the spinner by setting
+  a variable and calling `spinner-start-timer'. Finally, they can stop
+  the spinner (and the timer) by just setting the same variable to nil.
+
+  Here’s an example for a minor-mode named `foo'. Assuming that
+  `foo--lighter' is used as the mode-line lighter, the following code
+  will add an *inactive* global spinner to the mode-line.
+  ┌────
+  │ (defvar foo--spinner (spinner-create 'rotating-line))
+  │ (defconst foo--lighter
+  │   '(" foo" (:eval (spinner-print foo--spinner))))
+  └────
+
+  1. To activate the spinner, just call `(spinner-start foo--spinner)'.
+     It will show up on the mode-line and start animating.
+  2. To get rid of it, call `(spinner-stop foo--spinner)'. It will then
+     disappear again.
+
+  Some minor-modes will need spinners to be buffer-local. To achieve
+  that, just make the `foo--spinner' variable buffer-local and use the
+  third argument of the `spinner-create' function. The snippet below is
+  an example.
+
+  ┌────
+  │ (defvar-local foo--spinner nil)
+  │ (defconst foo--lighter
+  │   '(" foo" (:eval (spinner-print foo--spinner))))
+  │ (defun foo--start-spinner ()
+  │   "Create and start a spinner on this buffer."
+  │   (unless foo--spinner
+  │     (setq foo--spinner (spinner-create 'moon t)))
+  │   (spinner-start foo--spinner))
+  └────
+
+  1. To activate the spinner, just call `(foo--start-spinner)'.
+  2. To get rid of it, call `(spinner-stop foo--spinner)'.
+
+  This will use the `moon' spinner, but you can use any of the names
+  defined in the `spinner-types' variable or even define your own.
+
+
+2 Extra options
+═══════════════
+
+  Both `spinner-start' and `spinner-create' take extra options to
+  configure the spinner, these are:
+
+  • `FPS': The number of frames to display per second. Defaults to
+    `spinner-frames-per-second'.
+  • `DELAY': After starting a spinner, it still won’t be displayed for
+    this many seconds.
diff --git a/emacs/.emacs.d/elpa/spinner-1.7.4/README.org b/emacs/.emacs.d/elpa/spinner-1.7.4/README.org
new file mode 100644
index 0000000..06c7b32
--- /dev/null
+++ b/emacs/.emacs.d/elpa/spinner-1.7.4/README.org
@@ -0,0 +1,76 @@
+#+TITLE: spinner.el
+
+Add spinners and progress-bars to the mode-line for ongoing operations.
+
+[[file:some-spinners.gif]]
+
+[[file:all-spinners.gif]]
+
+* Usage
+
+First of all, don’t forget to add ~(spinner "VERSION")~ to your package’s dependencies.
+
+** Major-modes
+1. Just call ~(spinner-start)~ and a spinner will be added to the mode-line.
+2. Call ~(spinner-stop)~ on the same buffer when you want to remove it.
+
+The default spinner is a line drawing that rotates. You can pass an
+argument to ~spinner-start~ to specify which spinner you want. All
+possibilities are listed in the ~spinner-types~ variable, but here are
+a few examples for you to try:
+
+- ~(spinner-start 'vertical-breathing 10)~
+- ~(spinner-start 'minibox)~
+- ~(spinner-start 'moon)~
+- ~(spinner-start 'triangle)~
+
+You can also define your own as a vector of strings (see the examples
+in ~spinner-types~).
+
+** Minor-modes
+Minor-modes can create a spinner with ~spinner-create~ and then add it
+to their mode-line lighter. They can then start the spinner by setting
+a variable and calling ~spinner-start-timer~. Finally, they can stop
+the spinner (and the timer) by just setting the same variable to nil.
+
+Here’s an example for a minor-mode named ~foo~. Assuming that
+~foo--lighter~ is used as the mode-line lighter, the following code
+will add an *inactive* global spinner to the mode-line.
+#+begin_src emacs-lisp
+(defvar foo--spinner (spinner-create 'rotating-line))
+(defconst foo--lighter
+  '(" foo" (:eval (spinner-print foo--spinner))))
+#+end_src
+
+1. To activate the spinner, just call ~(spinner-start foo--spinner)~.
+   It will show up on the mode-line and start animating.
+2. To get rid of it, call ~(spinner-stop foo--spinner)~. It will then
+   disappear again.
+
+Some minor-modes will need spinners to be buffer-local. To achieve
+that, just make the ~foo--spinner~ variable buffer-local and use the
+third argument of the ~spinner-create~ function. The snippet below is an example.
+
+#+begin_src emacs-lisp
+(defvar-local foo--spinner nil)
+(defconst foo--lighter
+  '(" foo" (:eval (spinner-print foo--spinner))))
+(defun foo--start-spinner ()
+  "Create and start a spinner on this buffer."
+  (unless foo--spinner
+    (setq foo--spinner (spinner-create 'moon t)))
+  (spinner-start foo--spinner))
+#+end_src
+
+1. To activate the spinner, just call ~(foo--start-spinner)~.
+2. To get rid of it, call ~(spinner-stop foo--spinner)~.
+
+This will use the ~moon~ spinner, but you can use any of the names
+defined in the ~spinner-types~ variable or even define your own.
+
+* Extra options
+
+Both ~spinner-start~ and ~spinner-create~ take extra options to configure the spinner, these are:
+
+- ~FPS~: The number of frames to display per second. Defaults to ~spinner-frames-per-second~.
+- ~DELAY~: After starting a spinner, it still won’t be displayed for this many seconds.
diff --git a/emacs/.emacs.d/elpa/spinner-1.7.4/all-spinners.gif b/emacs/.emacs.d/elpa/spinner-1.7.4/all-spinners.gif
new file mode 100644
index 0000000..5540b68
Binary files /dev/null and b/emacs/.emacs.d/elpa/spinner-1.7.4/all-spinners.gif differ
diff --git a/emacs/.emacs.d/elpa/spinner-1.7.4/some-spinners.gif b/emacs/.emacs.d/elpa/spinner-1.7.4/some-spinners.gif
new file mode 100644
index 0000000..a8028e7
Binary files /dev/null and b/emacs/.emacs.d/elpa/spinner-1.7.4/some-spinners.gif differ
diff --git a/emacs/.emacs.d/elpa/spinner-1.7.4/spinner-autoloads.el b/emacs/.emacs.d/elpa/spinner-1.7.4/spinner-autoloads.el
new file mode 100644
index 0000000..facaad1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/spinner-1.7.4/spinner-autoloads.el
@@ -0,0 +1,77 @@
+;;; spinner-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from spinner.el
+
+(autoload 'spinner-create "spinner" "\
+Create a spinner of the given TYPE.
+The possible TYPEs are described in `spinner--type-to-frames'.
+
+FPS, if given, is the number of desired frames per second.
+Default is `spinner-frames-per-second'.
+
+If BUFFER-LOCAL is non-nil, the spinner will be automatically
+deactivated if the buffer is killed.  If BUFFER-LOCAL is a
+buffer, use that instead of current buffer.
+
+When started, in order to function properly, the spinner runs a
+timer which periodically calls `force-mode-line-update' in the
+current buffer.  If BUFFER-LOCAL was set at creation time, then
+`force-mode-line-update' is called in that buffer instead.  When
+the spinner is stopped, the timer is deactivated.
+
+DELAY, if given, is the number of seconds to wait after starting
+the spinner before actually displaying it. It is safe to cancel
+the spinner before this time, in which case it won't display at
+all.
+
+(fn &optional TYPE BUFFER-LOCAL FPS DELAY)")
+(autoload 'spinner-start "spinner" "\
+Start a mode-line spinner of given TYPE-OR-OBJECT.
+If TYPE-OR-OBJECT is an object created with `make-spinner',
+simply activate it.  This method is designed for minor modes, so
+they can use the spinner as part of their lighter by doing:
+    '(:eval (spinner-print THE-SPINNER))
+To stop this spinner, call `spinner-stop' on it.
+
+If TYPE-OR-OBJECT is anything else, a buffer-local spinner is
+created with this type, and it is displayed in the
+`mode-line-process' of the buffer it was created it.  Both
+TYPE-OR-OBJECT and FPS are passed to `make-spinner' (which see).
+To stop this spinner, call `spinner-stop' in the same buffer.
+
+Either way, the return value is a function which can be called
+anywhere to stop this spinner.  You can also call `spinner-stop'
+in the same buffer where the spinner was created.
+
+FPS, if given, is the number of desired frames per second.
+Default is `spinner-frames-per-second'.
+
+DELAY, if given, is the number of seconds to wait until actually
+displaying the spinner. It is safe to cancel the spinner before
+this time, in which case it won't display at all.
+
+(fn &optional TYPE-OR-OBJECT FPS DELAY)")
+(register-definition-prefixes "spinner" '("spinner-"))
+
+;;; End of scraped data
+
+(provide 'spinner-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; spinner-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/spinner-1.7.4/spinner-pkg.el b/emacs/.emacs.d/elpa/spinner-1.7.4/spinner-pkg.el
new file mode 100644
index 0000000..20821a6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/spinner-1.7.4/spinner-pkg.el
@@ -0,0 +1,2 @@
+;; Generated package description from spinner.el  -*- no-byte-compile: t -*-
+(define-package "spinner" "1.7.4" "Add spinners and progress-bars to the mode-line for ongoing operations" '((emacs "24.3")) :commit "bca794fa6f6b007292cdac9b0a850a3711986db5" :authors '(("Artur Malabarba" . "emacs@endlessparentheses.com")) :maintainer '("Artur Malabarba" . "emacs@endlessparentheses.com") :keywords '("processes" "mode-line") :url "https://github.com/Malabarba/spinner.el")
diff --git a/emacs/.emacs.d/elpa/spinner-1.7.4/spinner.el b/emacs/.emacs.d/elpa/spinner-1.7.4/spinner.el
new file mode 100644
index 0000000..6be8f13
--- /dev/null
+++ b/emacs/.emacs.d/elpa/spinner-1.7.4/spinner.el
@@ -0,0 +1,340 @@
+;;; spinner.el --- Add spinners and progress-bars to the mode-line for ongoing operations -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2015 Free Software Foundation, Inc.
+
+;; Author: Artur Malabarba <emacs@endlessparentheses.com>
+;; Version: 1.7.4
+;; Package-Requires: ((emacs "24.3"))
+;; URL: https://github.com/Malabarba/spinner.el
+;; Keywords: processes mode-line
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; 1 Usage
+;; ═══════
+;;
+;;   First of all, don’t forget to add `(spinner "VERSION")' to your
+;;   package’s dependencies.
+;;
+;;
+;; 1.1 Major-modes
+;; ───────────────
+;;
+;;   1. Just call `(spinner-start)' and a spinner will be added to the
+;;      mode-line.
+;;   2. Call `(spinner-stop)' on the same buffer when you want to remove
+;;      it.
+;;
+;;   The default spinner is a line drawing that rotates. You can pass an
+;;   argument to `spinner-start' to specify which spinner you want. All
+;;   possibilities are listed in the `spinner-types' variable, but here are
+;;   a few examples for you to try:
+;;
+;;   • `(spinner-start 'vertical-breathing 10)'
+;;   • `(spinner-start 'minibox)'
+;;   • `(spinner-start 'moon)'
+;;   • `(spinner-start 'triangle)'
+;;
+;;   You can also define your own as a vector of strings (see the examples
+;;   in `spinner-types').
+;;
+;;
+;; 1.2 Minor-modes
+;; ───────────────
+;;
+;;   Minor-modes can create a spinner with `spinner-create' and then add it
+;;   to their mode-line lighter. They can then start the spinner by setting
+;;   a variable and calling `spinner-start-timer'. Finally, they can stop
+;;   the spinner (and the timer) by just setting the same variable to nil.
+;;
+;;   Here’s an example for a minor-mode named `foo'. Assuming that
+;;   `foo--lighter' is used as the mode-line lighter, the following code
+;;   will add an *inactive* global spinner to the mode-line.
+;;   ┌────
+;;   │ (defvar foo--spinner (spinner-create 'rotating-line))
+;;   │ (defconst foo--lighter
+;;   │   '(" foo" (:eval (spinner-print foo--spinner))))
+;;   └────
+;;
+;;   1. To activate the spinner, just call `(spinner-start foo--spinner)'.
+;;      It will show up on the mode-line and start animating.
+;;   2. To get rid of it, call `(spinner-stop foo--spinner)'. It will then
+;;      disappear again.
+;;
+;;   Some minor-modes will need spinners to be buffer-local. To achieve
+;;   that, just make the `foo--spinner' variable buffer-local and use the
+;;   third argument of the `spinner-create' function. The snippet below is an
+;;   example.
+;;
+;;   ┌────
+;;   │ (defvar-local foo--spinner nil)
+;;   │ (defconst foo--lighter
+;;   │   '(" foo" (:eval (spinner-print foo--spinner))))
+;;   │ (defun foo--start-spinner ()
+;;   │   "Create and start a spinner on this buffer."
+;;   │   (unless foo--spinner
+;;   │     (setq foo--spinner (spinner-create 'moon t)))
+;;   │   (spinner-start foo--spinner))
+;;   └────
+;;
+;;   1. To activate the spinner, just call `(foo--start-spinner)'.
+;;   2. To get rid of it, call `(spinner-stop foo--spinner)'.
+;;
+;;   This will use the `moon' spinner, but you can use any of the names
+;;   defined in the `spinner-types' variable or even define your own.
+
+
+;;; Code:
+(eval-when-compile
+  (require 'cl-lib))
+
+(defconst spinner-types
+  '((3-line-clock . ["┤" "┘" "┴" "└" "├" "┌" "┬" "┐"])
+    (2-line-clock . ["┘" "└" "┌" "┐"])
+    (flipping-line . ["_" "\\" "|" "/"])
+    (rotating-line . ["-" "\\" "|" "/"])
+    (progress-bar . ["[    ]" "[=   ]" "[==  ]" "[=== ]" "[====]" "[ ===]" "[  ==]" "[   =]"])
+    (progress-bar-filled . ["|    |" "|█   |" "|██  |" "|███ |" "|████|" "| ███|" "|  ██|" "|   █|"])
+    (vertical-breathing . ["▁" "▂" "▃" "▄" "▅" "▆" "▇" "█" "▇" "▆" "▅" "▄" "▃" "▂" "▁" " "])
+    (vertical-rising . ["▁" "▄" "█" "▀" "▔"])
+    (horizontal-breathing . [" " "▏" "▎" "▍" "▌" "▋" "▊" "▉" "▉" "▊" "▋" "▌" "▍" "▎" "▏"])
+    (horizontal-breathing-long
+     . ["  " "▎ " "▌ " "▊ " "█ " "█▎" "█▌" "█▊" "██" "█▊" "█▌" "█▎" "█ " "▊ " "▋ " "▌ " "▍ " "▎ " "▏ "])
+    (horizontal-moving . ["  " "▌ " "█ " "▐▌" " █" " ▐"])
+    (minibox . ["▖" "▘" "▝" "▗"])
+    (triangle . ["◢" "◣" "◤" "◥"])
+    (box-in-box . ["◰" "◳" "◲" "◱"])
+    (box-in-circle . ["◴" "◷" "◶" "◵"])
+    (half-circle . ["◐" "◓" "◑" "◒"])
+    (moon . ["🌑" "🌘" "🌗" "🌖" "🌕" "🌔" "🌓" "🌒"]))
+  "Predefined alist of spinners.
+Each car is a symbol identifying the spinner, and each cdr is a
+vector, the spinner itself.")
+
+(defun spinner-make-progress-bar (width &optional char)
+  "Return a vector of strings of the given WIDTH.
+The vector is a valid spinner type and is similar to the
+`progress-bar' spinner, except without the surrounding brackets.
+CHAR is the character to use for the moving bar (defaults to =)."
+  (let ((whole-string (concat (make-string (1- width) ?\s)
+                              (make-string 4 (or char ?=))
+                              (make-string width ?\s))))
+    (apply #'vector (mapcar (lambda (n) (substring whole-string n (+ n width)))
+                            (number-sequence (+ width 3) 0 -1)))))
+
+(defvar spinner-current nil
+  "Spinner currently being displayed on the `mode-line-process'.")
+(make-variable-buffer-local 'spinner-current)
+
+(defconst spinner--mode-line-construct
+  '(:eval (spinner-print spinner-current))
+  "Construct used to display a spinner in `mode-line-process'.")
+(put 'spinner--mode-line-construct 'risky-local-variable t)
+
+(defvar spinner-frames-per-second 10
+  "Default speed at which spinners spin, in frames per second.
+Each spinner can override this value.")
+
+
+;;; The spinner object.
+(defun spinner--type-to-frames (type)
+  "Return a vector of frames corresponding to TYPE.
+The list of possible built-in spinner types is given by the
+`spinner-types' variable, but you can also use your own (see
+below).
+
+If TYPE is nil, the frames of this spinner are given by the first
+element of `spinner-types'.
+If TYPE is a symbol, it specifies an element of `spinner-types'.
+If TYPE is 'random, use a random element of `spinner-types'.
+If TYPE is a list, it should be a list of symbols, and a random
+one is chosen as the spinner type.
+If TYPE is a vector, it should be a vector of strings and these
+are used as the spinner's frames.  This allows you to make your
+own spinner animations."
+  (cond
+   ((vectorp type) type)
+   ((not type) (cdr (car spinner-types)))
+   ((eq type 'random)
+    (cdr (elt spinner-types
+              (random (length spinner-types)))))
+   ((listp type)
+    (cdr (assq (elt type (random (length type)))
+               spinner-types)))
+   ((symbolp type) (cdr (assq type spinner-types)))
+   (t (error "Unknown spinner type: %s" type))))
+
+(cl-defstruct (spinner
+               (:copier nil)
+               (:conc-name spinner--)
+               (:constructor make-spinner (&optional type buffer-local frames-per-second delay-before-start)))
+  (frames (spinner--type-to-frames type))
+  (counter 0)
+  (fps (or frames-per-second spinner-frames-per-second))
+  (timer (timer-create))
+  (active-p nil)
+  (buffer (when buffer-local
+            (if (bufferp buffer-local)
+                buffer-local
+              (current-buffer))))
+  (delay (or delay-before-start 0)))
+
+;;;###autoload
+(defun spinner-create (&optional type buffer-local fps delay)
+  "Create a spinner of the given TYPE.
+The possible TYPEs are described in `spinner--type-to-frames'.
+
+FPS, if given, is the number of desired frames per second.
+Default is `spinner-frames-per-second'.
+
+If BUFFER-LOCAL is non-nil, the spinner will be automatically
+deactivated if the buffer is killed.  If BUFFER-LOCAL is a
+buffer, use that instead of current buffer.
+
+When started, in order to function properly, the spinner runs a
+timer which periodically calls `force-mode-line-update' in the
+current buffer.  If BUFFER-LOCAL was set at creation time, then
+`force-mode-line-update' is called in that buffer instead.  When
+the spinner is stopped, the timer is deactivated.
+
+DELAY, if given, is the number of seconds to wait after starting
+the spinner before actually displaying it. It is safe to cancel
+the spinner before this time, in which case it won't display at
+all."
+  (make-spinner type buffer-local fps delay))
+
+(defun spinner-print (spinner)
+  "Return a string of the current frame of SPINNER.
+If SPINNER is nil, just return nil.
+Designed to be used in the mode-line with:
+    (:eval (spinner-print some-spinner))"
+  (when (and spinner (spinner--active-p spinner))
+    (let ((frame (spinner--counter spinner)))
+      (when (>= frame 0)
+        (elt (spinner--frames spinner) frame)))))
+
+(defun spinner--timer-function (spinner)
+  "Function called to update SPINNER.
+If SPINNER is no longer active, or if its buffer has been killed,
+stop the SPINNER's timer."
+  (let ((buffer (spinner--buffer spinner)))
+    (if (or (not (spinner--active-p spinner))
+            (and buffer (not (buffer-live-p buffer))))
+        (spinner-stop spinner)
+      ;; Increment
+      (cl-callf (lambda (x) (if (< x 0)
+                           (1+ x)
+                         (% (1+ x) (length (spinner--frames spinner)))))
+          (spinner--counter spinner))
+      ;; Update mode-line.
+      (if (buffer-live-p buffer)
+          (with-current-buffer buffer
+            (force-mode-line-update))
+        (force-mode-line-update)))))
+
+(defun spinner--start-timer (spinner)
+  "Start a SPINNER's timer."
+  (let ((old-timer (spinner--timer spinner)))
+    (when (timerp old-timer)
+      (cancel-timer old-timer))
+
+    (setf (spinner--active-p spinner) t)
+
+    (unless (ignore-errors (> (spinner--fps spinner) 0))
+      (error "A spinner's FPS must be a positive number"))
+    (setf (spinner--counter spinner)
+          (round (- (* (or (spinner--delay spinner) 0)
+                       (spinner--fps spinner)))))
+    ;; Create timer.
+    (let* ((repeat (/ 1.0 (spinner--fps spinner)))
+           (time (timer-next-integral-multiple-of-time (current-time) repeat))
+           ;; Create the timer as a lex variable so it can cancel itself.
+           (timer (spinner--timer spinner)))
+      (timer-set-time timer time repeat)
+      (timer-set-function timer #'spinner--timer-function (list spinner))
+      (timer-activate timer)
+      ;; Return a stopping function.
+      (lambda () (spinner-stop spinner)))))
+
+
+;;; The main functions
+;;;###autoload
+(defun spinner-start (&optional type-or-object fps delay)
+  "Start a mode-line spinner of given TYPE-OR-OBJECT.
+If TYPE-OR-OBJECT is an object created with `make-spinner',
+simply activate it.  This method is designed for minor modes, so
+they can use the spinner as part of their lighter by doing:
+    '(:eval (spinner-print THE-SPINNER))
+To stop this spinner, call `spinner-stop' on it.
+
+If TYPE-OR-OBJECT is anything else, a buffer-local spinner is
+created with this type, and it is displayed in the
+`mode-line-process' of the buffer it was created it.  Both
+TYPE-OR-OBJECT and FPS are passed to `make-spinner' (which see).
+To stop this spinner, call `spinner-stop' in the same buffer.
+
+Either way, the return value is a function which can be called
+anywhere to stop this spinner.  You can also call `spinner-stop'
+in the same buffer where the spinner was created.
+
+FPS, if given, is the number of desired frames per second.
+Default is `spinner-frames-per-second'.
+
+DELAY, if given, is the number of seconds to wait until actually
+displaying the spinner. It is safe to cancel the spinner before
+this time, in which case it won't display at all."
+  (unless (spinner-p type-or-object)
+    ;; Choose type.
+    (if (spinner-p spinner-current)
+        (setf (spinner--frames spinner-current) (spinner--type-to-frames type-or-object))
+      (setq spinner-current (make-spinner type-or-object (current-buffer) fps delay)))
+    (setq type-or-object spinner-current)
+    ;; Maybe add to mode-line.
+    (unless (and (listp mode-line-process)
+                 (memq 'spinner--mode-line-construct mode-line-process))
+      (setq mode-line-process
+            (list (or mode-line-process "")
+                  'spinner--mode-line-construct))))
+
+  ;; Create timer.
+  (when fps (setf (spinner--fps type-or-object) fps))
+  (when delay (setf (spinner--delay type-or-object) delay))
+  (spinner--start-timer type-or-object))
+
+(defun spinner-start-print (spinner)
+  "Like `spinner-print', but also start SPINNER if it's not active."
+  (unless (spinner--active-p spinner)
+    (spinner-start spinner))
+  (spinner-print spinner))
+
+(defun spinner-stop (&optional spinner)
+  "Stop SPINNER, defaulting to the current buffer's spinner.
+It is always safe to call this function, even if there is no
+active spinner."
+  (let ((spinner (or spinner spinner-current)))
+    (when (spinner-p spinner)
+      (let ((timer (spinner--timer spinner)))
+        (when (timerp timer)
+          (cancel-timer timer)))
+      (setf (spinner--active-p spinner) nil)
+      (force-mode-line-update))))
+
+(provide 'spinner)
+
+;; Local Variables:
+;; indent-tabs-mode: nil
+;; End:
+;;; spinner.el ends here
diff --git a/emacs/.emacs.d/elpa/spinner-1.7.4/spinner.elc b/emacs/.emacs.d/elpa/spinner-1.7.4/spinner.elc
new file mode 100644
index 0000000..b450363
Binary files /dev/null and b/emacs/.emacs.d/elpa/spinner-1.7.4/spinner.elc differ
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3.signed b/emacs/.emacs.d/elpa/svg-lib-0.3.signed
new file mode 100644
index 0000000..736c80a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/svg-lib-0.3.signed
@@ -0,0 +1 @@
+Good signature from 645357D2883A0966 GNU ELPA Signing Agent (2023) <elpasign@elpa.gnu.org> (trust undefined) created at 2024-03-31T18:00:05+0800 using EDDSA
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/LICENSE.txt b/emacs/.emacs.d/elpa/svg-lib-0.3/LICENSE.txt
new file mode 100644
index 0000000..f288702
--- /dev/null
+++ b/emacs/.emacs.d/elpa/svg-lib-0.3/LICENSE.txt
@@ -0,0 +1,674 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 3, 29 June 2007
+
+ Copyright (C) 2007 Free Software Foundation, Inc. <https://fsf.org/>
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The GNU General Public License is a free, copyleft license for
+software and other kinds of works.
+
+  The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+the GNU General Public License is intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.  We, the Free Software Foundation, use the
+GNU General Public License for most of our software; it applies also to
+any other work released this way by its authors.  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+  To protect your rights, we need to prevent others from denying you
+these rights or asking you to surrender the rights.  Therefore, you have
+certain responsibilities if you distribute copies of the software, or if
+you modify it: responsibilities to respect the freedom of others.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must pass on to the recipients the same
+freedoms that you received.  You must make sure that they, too, receive
+or can get the source code.  And you must show them these terms so they
+know their rights.
+
+  Developers that use the GNU GPL protect your rights with two steps:
+(1) assert copyright on the software, and (2) offer you this License
+giving you legal permission to copy, distribute and/or modify it.
+
+  For the developers' and authors' protection, the GPL clearly explains
+that there is no warranty for this free software.  For both users' and
+authors' sake, the GPL requires that modified versions be marked as
+changed, so that their problems will not be attributed erroneously to
+authors of previous versions.
+
+  Some devices are designed to deny users access to install or run
+modified versions of the software inside them, although the manufacturer
+can do so.  This is fundamentally incompatible with the aim of
+protecting users' freedom to change the software.  The systematic
+pattern of such abuse occurs in the area of products for individuals to
+use, which is precisely where it is most unacceptable.  Therefore, we
+have designed this version of the GPL to prohibit the practice for those
+products.  If such problems arise substantially in other domains, we
+stand ready to extend this provision to those domains in future versions
+of the GPL, as needed to protect the freedom of users.
+
+  Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish to
+avoid the special danger that patents applied to a free program could
+make it effectively proprietary.  To prevent this, the GPL assures that
+patents cannot be used to render the program non-free.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+                       TERMS AND CONDITIONS
+
+  0. Definitions.
+
+  "This License" refers to version 3 of the GNU General Public License.
+
+  "Copyright" also means copyright-like laws that apply to other kinds of
+works, such as semiconductor masks.
+
+  "The Program" refers to any copyrightable work licensed under this
+License.  Each licensee is addressed as "you".  "Licensees" and
+"recipients" may be individuals or organizations.
+
+  To "modify" a work means to copy from or adapt all or part of the work
+in a fashion requiring copyright permission, other than the making of an
+exact copy.  The resulting work is called a "modified version" of the
+earlier work or a work "based on" the earlier work.
+
+  A "covered work" means either the unmodified Program or a work based
+on the Program.
+
+  To "propagate" a work means to do anything with it that, without
+permission, would make you directly or secondarily liable for
+infringement under applicable copyright law, except executing it on a
+computer or modifying a private copy.  Propagation includes copying,
+distribution (with or without modification), making available to the
+public, and in some countries other activities as well.
+
+  To "convey" a work means any kind of propagation that enables other
+parties to make or receive copies.  Mere interaction with a user through
+a computer network, with no transfer of a copy, is not conveying.
+
+  An interactive user interface displays "Appropriate Legal Notices"
+to the extent that it includes a convenient and prominently visible
+feature that (1) displays an appropriate copyright notice, and (2)
+tells the user that there is no warranty for the work (except to the
+extent that warranties are provided), that licensees may convey the
+work under this License, and how to view a copy of this License.  If
+the interface presents a list of user commands or options, such as a
+menu, a prominent item in the list meets this criterion.
+
+  1. Source Code.
+
+  The "source code" for a work means the preferred form of the work
+for making modifications to it.  "Object code" means any non-source
+form of a work.
+
+  A "Standard Interface" means an interface that either is an official
+standard defined by a recognized standards body, or, in the case of
+interfaces specified for a particular programming language, one that
+is widely used among developers working in that language.
+
+  The "System Libraries" of an executable work include anything, other
+than the work as a whole, that (a) is included in the normal form of
+packaging a Major Component, but which is not part of that Major
+Component, and (b) serves only to enable use of the work with that
+Major Component, or to implement a Standard Interface for which an
+implementation is available to the public in source code form.  A
+"Major Component", in this context, means a major essential component
+(kernel, window system, and so on) of the specific operating system
+(if any) on which the executable work runs, or a compiler used to
+produce the work, or an object code interpreter used to run it.
+
+  The "Corresponding Source" for a work in object code form means all
+the source code needed to generate, install, and (for an executable
+work) run the object code and to modify the work, including scripts to
+control those activities.  However, it does not include the work's
+System Libraries, or general-purpose tools or generally available free
+programs which are used unmodified in performing those activities but
+which are not part of the work.  For example, Corresponding Source
+includes interface definition files associated with source files for
+the work, and the source code for shared libraries and dynamically
+linked subprograms that the work is specifically designed to require,
+such as by intimate data communication or control flow between those
+subprograms and other parts of the work.
+
+  The Corresponding Source need not include anything that users
+can regenerate automatically from other parts of the Corresponding
+Source.
+
+  The Corresponding Source for a work in source code form is that
+same work.
+
+  2. Basic Permissions.
+
+  All rights granted under this License are granted for the term of
+copyright on the Program, and are irrevocable provided the stated
+conditions are met.  This License explicitly affirms your unlimited
+permission to run the unmodified Program.  The output from running a
+covered work is covered by this License only if the output, given its
+content, constitutes a covered work.  This License acknowledges your
+rights of fair use or other equivalent, as provided by copyright law.
+
+  You may make, run and propagate covered works that you do not
+convey, without conditions so long as your license otherwise remains
+in force.  You may convey covered works to others for the sole purpose
+of having them make modifications exclusively for you, or provide you
+with facilities for running those works, provided that you comply with
+the terms of this License in conveying all material for which you do
+not control copyright.  Those thus making or running the covered works
+for you must do so exclusively on your behalf, under your direction
+and control, on terms that prohibit them from making any copies of
+your copyrighted material outside their relationship with you.
+
+  Conveying under any other circumstances is permitted solely under
+the conditions stated below.  Sublicensing is not allowed; section 10
+makes it unnecessary.
+
+  3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+  No covered work shall be deemed part of an effective technological
+measure under any applicable law fulfilling obligations under article
+11 of the WIPO copyright treaty adopted on 20 December 1996, or
+similar laws prohibiting or restricting circumvention of such
+measures.
+
+  When you convey a covered work, you waive any legal power to forbid
+circumvention of technological measures to the extent such circumvention
+is effected by exercising rights under this License with respect to
+the covered work, and you disclaim any intention to limit operation or
+modification of the work as a means of enforcing, against the work's
+users, your or third parties' legal rights to forbid circumvention of
+technological measures.
+
+  4. Conveying Verbatim Copies.
+
+  You may convey verbatim copies of the Program's source code as you
+receive it, in any medium, provided that you conspicuously and
+appropriately publish on each copy an appropriate copyright notice;
+keep intact all notices stating that this License and any
+non-permissive terms added in accord with section 7 apply to the code;
+keep intact all notices of the absence of any warranty; and give all
+recipients a copy of this License along with the Program.
+
+  You may charge any price or no price for each copy that you convey,
+and you may offer support or warranty protection for a fee.
+
+  5. Conveying Modified Source Versions.
+
+  You may convey a work based on the Program, or the modifications to
+produce it from the Program, in the form of source code under the
+terms of section 4, provided that you also meet all of these conditions:
+
+    a) The work must carry prominent notices stating that you modified
+    it, and giving a relevant date.
+
+    b) The work must carry prominent notices stating that it is
+    released under this License and any conditions added under section
+    7.  This requirement modifies the requirement in section 4 to
+    "keep intact all notices".
+
+    c) You must license the entire work, as a whole, under this
+    License to anyone who comes into possession of a copy.  This
+    License will therefore apply, along with any applicable section 7
+    additional terms, to the whole of the work, and all its parts,
+    regardless of how they are packaged.  This License gives no
+    permission to license the work in any other way, but it does not
+    invalidate such permission if you have separately received it.
+
+    d) If the work has interactive user interfaces, each must display
+    Appropriate Legal Notices; however, if the Program has interactive
+    interfaces that do not display Appropriate Legal Notices, your
+    work need not make them do so.
+
+  A compilation of a covered work with other separate and independent
+works, which are not by their nature extensions of the covered work,
+and which are not combined with it such as to form a larger program,
+in or on a volume of a storage or distribution medium, is called an
+"aggregate" if the compilation and its resulting copyright are not
+used to limit the access or legal rights of the compilation's users
+beyond what the individual works permit.  Inclusion of a covered work
+in an aggregate does not cause this License to apply to the other
+parts of the aggregate.
+
+  6. Conveying Non-Source Forms.
+
+  You may convey a covered work in object code form under the terms
+of sections 4 and 5, provided that you also convey the
+machine-readable Corresponding Source under the terms of this License,
+in one of these ways:
+
+    a) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by the
+    Corresponding Source fixed on a durable physical medium
+    customarily used for software interchange.
+
+    b) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by a
+    written offer, valid for at least three years and valid for as
+    long as you offer spare parts or customer support for that product
+    model, to give anyone who possesses the object code either (1) a
+    copy of the Corresponding Source for all the software in the
+    product that is covered by this License, on a durable physical
+    medium customarily used for software interchange, for a price no
+    more than your reasonable cost of physically performing this
+    conveying of source, or (2) access to copy the
+    Corresponding Source from a network server at no charge.
+
+    c) Convey individual copies of the object code with a copy of the
+    written offer to provide the Corresponding Source.  This
+    alternative is allowed only occasionally and noncommercially, and
+    only if you received the object code with such an offer, in accord
+    with subsection 6b.
+
+    d) Convey the object code by offering access from a designated
+    place (gratis or for a charge), and offer equivalent access to the
+    Corresponding Source in the same way through the same place at no
+    further charge.  You need not require recipients to copy the
+    Corresponding Source along with the object code.  If the place to
+    copy the object code is a network server, the Corresponding Source
+    may be on a different server (operated by you or a third party)
+    that supports equivalent copying facilities, provided you maintain
+    clear directions next to the object code saying where to find the
+    Corresponding Source.  Regardless of what server hosts the
+    Corresponding Source, you remain obligated to ensure that it is
+    available for as long as needed to satisfy these requirements.
+
+    e) Convey the object code using peer-to-peer transmission, provided
+    you inform other peers where the object code and Corresponding
+    Source of the work are being offered to the general public at no
+    charge under subsection 6d.
+
+  A separable portion of the object code, whose source code is excluded
+from the Corresponding Source as a System Library, need not be
+included in conveying the object code work.
+
+  A "User Product" is either (1) a "consumer product", which means any
+tangible personal property which is normally used for personal, family,
+or household purposes, or (2) anything designed or sold for incorporation
+into a dwelling.  In determining whether a product is a consumer product,
+doubtful cases shall be resolved in favor of coverage.  For a particular
+product received by a particular user, "normally used" refers to a
+typical or common use of that class of product, regardless of the status
+of the particular user or of the way in which the particular user
+actually uses, or expects or is expected to use, the product.  A product
+is a consumer product regardless of whether the product has substantial
+commercial, industrial or non-consumer uses, unless such uses represent
+the only significant mode of use of the product.
+
+  "Installation Information" for a User Product means any methods,
+procedures, authorization keys, or other information required to install
+and execute modified versions of a covered work in that User Product from
+a modified version of its Corresponding Source.  The information must
+suffice to ensure that the continued functioning of the modified object
+code is in no case prevented or interfered with solely because
+modification has been made.
+
+  If you convey an object code work under this section in, or with, or
+specifically for use in, a User Product, and the conveying occurs as
+part of a transaction in which the right of possession and use of the
+User Product is transferred to the recipient in perpetuity or for a
+fixed term (regardless of how the transaction is characterized), the
+Corresponding Source conveyed under this section must be accompanied
+by the Installation Information.  But this requirement does not apply
+if neither you nor any third party retains the ability to install
+modified object code on the User Product (for example, the work has
+been installed in ROM).
+
+  The requirement to provide Installation Information does not include a
+requirement to continue to provide support service, warranty, or updates
+for a work that has been modified or installed by the recipient, or for
+the User Product in which it has been modified or installed.  Access to a
+network may be denied when the modification itself materially and
+adversely affects the operation of the network or violates the rules and
+protocols for communication across the network.
+
+  Corresponding Source conveyed, and Installation Information provided,
+in accord with this section must be in a format that is publicly
+documented (and with an implementation available to the public in
+source code form), and must require no special password or key for
+unpacking, reading or copying.
+
+  7. Additional Terms.
+
+  "Additional permissions" are terms that supplement the terms of this
+License by making exceptions from one or more of its conditions.
+Additional permissions that are applicable to the entire Program shall
+be treated as though they were included in this License, to the extent
+that they are valid under applicable law.  If additional permissions
+apply only to part of the Program, that part may be used separately
+under those permissions, but the entire Program remains governed by
+this License without regard to the additional permissions.
+
+  When you convey a copy of a covered work, you may at your option
+remove any additional permissions from that copy, or from any part of
+it.  (Additional permissions may be written to require their own
+removal in certain cases when you modify the work.)  You may place
+additional permissions on material, added by you to a covered work,
+for which you have or can give appropriate copyright permission.
+
+  Notwithstanding any other provision of this License, for material you
+add to a covered work, you may (if authorized by the copyright holders of
+that material) supplement the terms of this License with terms:
+
+    a) Disclaiming warranty or limiting liability differently from the
+    terms of sections 15 and 16 of this License; or
+
+    b) Requiring preservation of specified reasonable legal notices or
+    author attributions in that material or in the Appropriate Legal
+    Notices displayed by works containing it; or
+
+    c) Prohibiting misrepresentation of the origin of that material, or
+    requiring that modified versions of such material be marked in
+    reasonable ways as different from the original version; or
+
+    d) Limiting the use for publicity purposes of names of licensors or
+    authors of the material; or
+
+    e) Declining to grant rights under trademark law for use of some
+    trade names, trademarks, or service marks; or
+
+    f) Requiring indemnification of licensors and authors of that
+    material by anyone who conveys the material (or modified versions of
+    it) with contractual assumptions of liability to the recipient, for
+    any liability that these contractual assumptions directly impose on
+    those licensors and authors.
+
+  All other non-permissive additional terms are considered "further
+restrictions" within the meaning of section 10.  If the Program as you
+received it, or any part of it, contains a notice stating that it is
+governed by this License along with a term that is a further
+restriction, you may remove that term.  If a license document contains
+a further restriction but permits relicensing or conveying under this
+License, you may add to a covered work material governed by the terms
+of that license document, provided that the further restriction does
+not survive such relicensing or conveying.
+
+  If you add terms to a covered work in accord with this section, you
+must place, in the relevant source files, a statement of the
+additional terms that apply to those files, or a notice indicating
+where to find the applicable terms.
+
+  Additional terms, permissive or non-permissive, may be stated in the
+form of a separately written license, or stated as exceptions;
+the above requirements apply either way.
+
+  8. Termination.
+
+  You may not propagate or modify a covered work except as expressly
+provided under this License.  Any attempt otherwise to propagate or
+modify it is void, and will automatically terminate your rights under
+this License (including any patent licenses granted under the third
+paragraph of section 11).
+
+  However, if you cease all violation of this License, then your
+license from a particular copyright holder is reinstated (a)
+provisionally, unless and until the copyright holder explicitly and
+finally terminates your license, and (b) permanently, if the copyright
+holder fails to notify you of the violation by some reasonable means
+prior to 60 days after the cessation.
+
+  Moreover, your license from a particular copyright holder is
+reinstated permanently if the copyright holder notifies you of the
+violation by some reasonable means, this is the first time you have
+received notice of violation of this License (for any work) from that
+copyright holder, and you cure the violation prior to 30 days after
+your receipt of the notice.
+
+  Termination of your rights under this section does not terminate the
+licenses of parties who have received copies or rights from you under
+this License.  If your rights have been terminated and not permanently
+reinstated, you do not qualify to receive new licenses for the same
+material under section 10.
+
+  9. Acceptance Not Required for Having Copies.
+
+  You are not required to accept this License in order to receive or
+run a copy of the Program.  Ancillary propagation of a covered work
+occurring solely as a consequence of using peer-to-peer transmission
+to receive a copy likewise does not require acceptance.  However,
+nothing other than this License grants you permission to propagate or
+modify any covered work.  These actions infringe copyright if you do
+not accept this License.  Therefore, by modifying or propagating a
+covered work, you indicate your acceptance of this License to do so.
+
+  10. Automatic Licensing of Downstream Recipients.
+
+  Each time you convey a covered work, the recipient automatically
+receives a license from the original licensors, to run, modify and
+propagate that work, subject to this License.  You are not responsible
+for enforcing compliance by third parties with this License.
+
+  An "entity transaction" is a transaction transferring control of an
+organization, or substantially all assets of one, or subdividing an
+organization, or merging organizations.  If propagation of a covered
+work results from an entity transaction, each party to that
+transaction who receives a copy of the work also receives whatever
+licenses to the work the party's predecessor in interest had or could
+give under the previous paragraph, plus a right to possession of the
+Corresponding Source of the work from the predecessor in interest, if
+the predecessor has it or can get it with reasonable efforts.
+
+  You may not impose any further restrictions on the exercise of the
+rights granted or affirmed under this License.  For example, you may
+not impose a license fee, royalty, or other charge for exercise of
+rights granted under this License, and you may not initiate litigation
+(including a cross-claim or counterclaim in a lawsuit) alleging that
+any patent claim is infringed by making, using, selling, offering for
+sale, or importing the Program or any portion of it.
+
+  11. Patents.
+
+  A "contributor" is a copyright holder who authorizes use under this
+License of the Program or a work on which the Program is based.  The
+work thus licensed is called the contributor's "contributor version".
+
+  A contributor's "essential patent claims" are all patent claims
+owned or controlled by the contributor, whether already acquired or
+hereafter acquired, that would be infringed by some manner, permitted
+by this License, of making, using, or selling its contributor version,
+but do not include claims that would be infringed only as a
+consequence of further modification of the contributor version.  For
+purposes of this definition, "control" includes the right to grant
+patent sublicenses in a manner consistent with the requirements of
+this License.
+
+  Each contributor grants you a non-exclusive, worldwide, royalty-free
+patent license under the contributor's essential patent claims, to
+make, use, sell, offer for sale, import and otherwise run, modify and
+propagate the contents of its contributor version.
+
+  In the following three paragraphs, a "patent license" is any express
+agreement or commitment, however denominated, not to enforce a patent
+(such as an express permission to practice a patent or covenant not to
+sue for patent infringement).  To "grant" such a patent license to a
+party means to make such an agreement or commitment not to enforce a
+patent against the party.
+
+  If you convey a covered work, knowingly relying on a patent license,
+and the Corresponding Source of the work is not available for anyone
+to copy, free of charge and under the terms of this License, through a
+publicly available network server or other readily accessible means,
+then you must either (1) cause the Corresponding Source to be so
+available, or (2) arrange to deprive yourself of the benefit of the
+patent license for this particular work, or (3) arrange, in a manner
+consistent with the requirements of this License, to extend the patent
+license to downstream recipients.  "Knowingly relying" means you have
+actual knowledge that, but for the patent license, your conveying the
+covered work in a country, or your recipient's use of the covered work
+in a country, would infringe one or more identifiable patents in that
+country that you have reason to believe are valid.
+
+  If, pursuant to or in connection with a single transaction or
+arrangement, you convey, or propagate by procuring conveyance of, a
+covered work, and grant a patent license to some of the parties
+receiving the covered work authorizing them to use, propagate, modify
+or convey a specific copy of the covered work, then the patent license
+you grant is automatically extended to all recipients of the covered
+work and works based on it.
+
+  A patent license is "discriminatory" if it does not include within
+the scope of its coverage, prohibits the exercise of, or is
+conditioned on the non-exercise of one or more of the rights that are
+specifically granted under this License.  You may not convey a covered
+work if you are a party to an arrangement with a third party that is
+in the business of distributing software, under which you make payment
+to the third party based on the extent of your activity of conveying
+the work, and under which the third party grants, to any of the
+parties who would receive the covered work from you, a discriminatory
+patent license (a) in connection with copies of the covered work
+conveyed by you (or copies made from those copies), or (b) primarily
+for and in connection with specific products or compilations that
+contain the covered work, unless you entered into that arrangement,
+or that patent license was granted, prior to 28 March 2007.
+
+  Nothing in this License shall be construed as excluding or limiting
+any implied license or other defenses to infringement that may
+otherwise be available to you under applicable patent law.
+
+  12. No Surrender of Others' Freedom.
+
+  If conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot convey a
+covered work so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you may
+not convey it at all.  For example, if you agree to terms that obligate you
+to collect a royalty for further conveying from those to whom you convey
+the Program, the only way you could satisfy both those terms and this
+License would be to refrain entirely from conveying the Program.
+
+  13. Use with the GNU Affero General Public License.
+
+  Notwithstanding any other provision of this License, you have
+permission to link or combine any covered work with a work licensed
+under version 3 of the GNU Affero General Public License into a single
+combined work, and to convey the resulting work.  The terms of this
+License will continue to apply to the part which is the covered work,
+but the special requirements of the GNU Affero General Public License,
+section 13, concerning interaction through a network will apply to the
+combination as such.
+
+  14. Revised Versions of this License.
+
+  The Free Software Foundation may publish revised and/or new versions of
+the GNU General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+  Each version is given a distinguishing version number.  If the
+Program specifies that a certain numbered version of the GNU General
+Public License "or any later version" applies to it, you have the
+option of following the terms and conditions either of that numbered
+version or of any later version published by the Free Software
+Foundation.  If the Program does not specify a version number of the
+GNU General Public License, you may choose any version ever published
+by the Free Software Foundation.
+
+  If the Program specifies that a proxy can decide which future
+versions of the GNU General Public License can be used, that proxy's
+public statement of acceptance of a version permanently authorizes you
+to choose that version for the Program.
+
+  Later license versions may give you additional or different
+permissions.  However, no additional obligations are imposed on any
+author or copyright holder as a result of your choosing to follow a
+later version.
+
+  15. Disclaimer of Warranty.
+
+  THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
+APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
+HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
+OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
+THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+PURPOSE.  THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
+IS WITH YOU.  SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
+ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+  16. Limitation of Liability.
+
+  IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
+THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
+GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
+USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
+DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
+PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
+EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGES.
+
+  17. Interpretation of Sections 15 and 16.
+
+  If the disclaimer of warranty and limitation of liability provided
+above cannot be given local legal effect according to their terms,
+reviewing courts shall apply local law that most closely approximates
+an absolute waiver of all civil liability in connection with the
+Program, unless a warranty or assumption of liability accompanies a
+copy of the Program in return for a fee.
+
+                     END OF TERMS AND CONDITIONS
+
+            How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+state the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software: you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation, either version 3 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+Also add information on how to contact you by electronic and paper mail.
+
+  If the program does terminal interaction, make it output a short
+notice like this when it starts in an interactive mode:
+
+    <program>  Copyright (C) <year>  <name of author>
+    This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, your program's commands
+might be different; for a GUI interface, you would use an "about box".
+
+  You should also get your employer (if you work as a programmer) or school,
+if any, to sign a "copyright disclaimer" for the program, if necessary.
+For more information on this, and how to apply and follow the GNU GPL, see
+<https://www.gnu.org/licenses/>.
+
+  The GNU General Public License does not permit incorporating your program
+into proprietary programs.  If your program is a subroutine library, you
+may consider it more useful to permit linking proprietary applications with
+the library.  If this is what you want to do, use the GNU Lesser General
+Public License instead of this License.  But first, please read
+<https://www.gnu.org/licenses/why-not-lgpl.html>.
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/README-elpa b/emacs/.emacs.d/elpa/svg-lib-0.3/README-elpa
new file mode 100644
index 0000000..d43e1c7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/svg-lib-0.3/README-elpa
@@ -0,0 +1,183 @@
+1 SVG Library
+═════════════
+
+  svg-lib is an Emacs library that allows to create and display various
+  SVG objects, namely tags, icons, buttons, progress bars, progress pies
+  and dates. Each object is guaranteed to fit nicely in a text buffer
+  ensuring width is a multiple of character width and height a multiple
+  of character height.
+
+
+2 Installation
+══════════════
+
+  ┌────
+  │ M-x package-install RET svg-lib RET
+  └────
+
+
+3 Quick start
+═════════════
+
+  For the impatient, evaluate the following expression:
+
+  ┌────
+  │ M-: (insert-image (svg-lib-tag "TODO"))
+  └────
+
+  This should insert a SVG tag displaying "TODO" in a rounded box whose
+  size is exactly 5 characters wide (because of padding).
+
+
+4 Usage
+═══════
+
+4.1 Objects
+───────────
+
+  • `svg-lib-tag LABEL'
+  • `svg-lib-icon ICON'
+  • `svg-lib-icon+tag ICON LABEL'
+  • `svg-lib-button LABEL HOOK'
+  • `svg-lib-progress-bar VALUE'
+  • `svg-lib-progress-pie VALUE'
+  • `svg-lib-date DATE'
+
+
+4.2 Styling
+───────────
+
+  Each library object can be styled using a style property list that
+  defines:
+
+  • foreground color
+  • background color
+  • internal padding (tag and icon)
+  • external margin (in char)
+  • stroke width (in pixels)
+  • corner radius (in pixels) for the rounded box
+  • horizontal alignment (0 to 1) inside margins
+  • width (in characters)
+  • height as a scale of line height
+  • scale (for icon)
+  • ascent (for text)
+  • crop-left to crop object on the left
+  • crop-right to crop object on the right
+  • collection to use for icon
+  • font family
+  • font size
+  • font weight
+
+
+5 Icon repositories
+═══════════════════
+
+  Icons can be created by parsing remote collections whose license are
+  compatibles with GNU Emacs. The default size of an icon is exactly 2x1
+  characters such that it can be inserted inside a text without
+  disturbing alignment.
+
+  Each icon is cached locally to speed-up loading the next time you use
+  it. If for some reason the cache is corrupted you can force reload
+  using the svg-icon-get-data function. If you want to add new
+  collections (i.e. URL), make sure the icons are monochrome, that their
+  size is consistent and that they include a 'viewBox' node.
+
+
+5.1 [Material Design] (7447 icons)
+──────────────────────────────────
+
+  Open-source iconography for designers and developers.
+
+  • Version: 7.4.47 (December 2023)
+  • Licence: Apache 2.0
+  • Number of icons: 7447
+  • Sources: <https://github.com/Templarian/MaterialDesign>
+  • Collection: `material'
+
+
+[Material Design] <https://pictogrammers.com/library/mdi/>
+
+
+5.2 [Simple icons] (2926 icons)
+───────────────────────────────
+
+  Over 2900 Free SVG icons for popular brands.
+
+  • Version: 10.4.0 (December 2023)
+  • Licence: CC0-1.0 license
+  • Number of icons: 2926
+  • Sources: <https://github.com/twbs/icons>
+  • Collection: `simple'
+
+
+[Simple icons] <https://simpleicons.org/>
+
+
+5.3 [Bootstrap] (> 2000 icons)
+──────────────────────────────
+
+  Official open source SVG icon library for Bootstrap.
+
+  • Version: 1.11.2 (December 2023)
+  • Licence: MIT License
+  • Number of icons: > 2000
+  • Sources: <https://github.com/twbs/icons>
+  • Collection: `bootstrap'
+
+
+[Bootstrap] <https://icons.getbootstrap.com/>
+
+
+5.4 [Boxicons] (1634 icons)
+───────────────────────────
+
+  Simple Open Source icons carefully crafted for designers & developers.
+
+  • Version: 2.1.4 (September 2022)
+  • Licence: MIT License
+  • Number of icons: 1634
+  • Sources: <https://github.com/atisawd/boxicons>.
+  • Collection: `boxicons'
+
+
+[Boxicons] <https://boxicons.com/>
+
+
+5.5 [Octicons] (322 icons)
+──────────────────────────
+
+  Octicons are a set of SVG icons built by GitHub for GitHub.
+
+  • Version: 19.8.0 (September 2023)
+  • Licence: MIT License
+  • Number of icons: 322
+  • Sources: <https://github.com/primer/octicons>
+  • Collection: `octicons'
+
+
+[Octicons] <https://primer.style/octicons>
+
+
+5.6 [VSCode] (209 icons)
+────────────────────────
+
+  Icons used in Visual Studio Code.
+
+  • Version: (September 2020)
+  • Licence: CC-BY 4.0
+  • Number of icons: 209
+  • Sources: <https://github.com/microsoft/vscode-icons>
+  • Collection: `vscode'
+
+
+[VSCode]
+<https://www.figma.com/community/file/768673354734944365/visual-studio-code-icons>
+
+
+6 Screenshots
+═════════════
+
+  <file:screenshot.png>
+
+  <file:screenshot-2.png>
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/README.org b/emacs/.emacs.d/elpa/svg-lib-0.3/README.org
new file mode 100644
index 0000000..c640e8c
--- /dev/null
+++ b/emacs/.emacs.d/elpa/svg-lib-0.3/README.org
@@ -0,0 +1,139 @@
+
+* SVG Library
+
+svg-lib is an Emacs library that allows to create and display various
+SVG objects, namely tags, icons, buttons, progress bars, progress pies
+and dates. Each object is guaranteed to fit nicely in a text buffer
+ensuring width is a multiple of character width and height a multiple
+of character height.
+
+* Installation
+
+#+begin_src elisp
+M-x package-install RET svg-lib RET
+#+end_src
+
+* Quick start
+
+For the impatient, evaluate the following expression:
+
+#+begin_src emacs-lisp
+M-: (insert-image (svg-lib-tag "TODO"))
+#+end_src
+
+This should insert a SVG tag displaying "TODO" in a rounded box whose
+size is exactly 5 characters wide (because of padding).
+
+* Usage
+
+** Objects
+
+- =svg-lib-tag LABEL=
+- =svg-lib-icon ICON=
+- =svg-lib-icon+tag ICON LABEL=
+- =svg-lib-button LABEL HOOK=
+- =svg-lib-progress-bar VALUE=
+- =svg-lib-progress-pie VALUE=
+- =svg-lib-date DATE=
+  
+** Styling
+
+Each library object can be styled using a style property list that
+defines:
+
+- foreground color
+- background color
+- internal padding (tag and icon)
+- external margin (in char)
+- stroke width (in pixels)
+- corner radius (in pixels) for the rounded box
+- horizontal alignment (0 to 1) inside margins
+- width (in characters)
+- height as a scale of line height
+- scale (for icon)
+- ascent (for text)
+- crop-left to crop object on the left
+- crop-right to  crop object on the right
+- collection to use for icon 
+- font family
+- font size
+- font weight
+
+* Icon repositories
+
+Icons can be created by parsing remote collections whose license are
+compatibles with GNU Emacs. The default size of an icon is exactly 2x1
+characters such that it can be inserted inside a text without
+disturbing alignment.
+
+Each icon is cached locally to speed-up loading the next time you use
+it. If for some reason the cache is corrupted you can force reload
+using the svg-icon-get-data function. If you want to add new
+collections (i.e. URL), make sure the icons are monochrome, that their
+size is consistent and that they include a 'viewBox' node.
+
+** [[https://pictogrammers.com/library/mdi/][Material Design]] (7447 icons)
+
+Open-source iconography for designers and developers.
+
+- Version: 7.4.47 (December 2023)
+- Licence: Apache 2.0 
+- Number of icons: 7447
+- Sources: https://github.com/Templarian/MaterialDesign
+- Collection: =material=
+
+** [[https://simpleicons.org/][Simple icons]] (2926 icons)
+
+Over 2900 Free SVG icons for popular brands.
+
+- Version: 10.4.0 (December 2023)
+- Licence: CC0-1.0 license
+- Number of icons: 2926
+- Sources: https://github.com/twbs/icons
+- Collection: =simple=
+
+** [[https://icons.getbootstrap.com/][Bootstrap]] (> 2000 icons)
+
+Official open source SVG icon library for Bootstrap.
+ 
+- Version: 1.11.2 (December 2023)
+- Licence: MIT License
+- Number of icons: > 2000
+- Sources: https://github.com/twbs/icons
+- Collection: =bootstrap=
+
+** [[https://boxicons.com/][Boxicons]] (1634 icons)
+
+Simple Open Source icons carefully crafted for designers & developers.
+
+- Version: 2.1.4 (September 2022)
+- Licence: MIT License
+- Number of icons: 1634
+- Sources: https://github.com/atisawd/boxicons.
+- Collection: =boxicons=
+  
+** [[https://primer.style/octicons][Octicons]] (322 icons)
+
+Octicons are a set of SVG icons built by GitHub for GitHub.
+
+- Version: 19.8.0 (September 2023)
+- Licence: MIT License
+- Number of icons: 322
+- Sources: https://github.com/primer/octicons
+- Collection: =octicons=
+
+** [[https://www.figma.com/community/file/768673354734944365/visual-studio-code-icons][VSCode]] (209 icons)
+
+Icons used in Visual Studio Code.
+
+- Version: (September 2020)
+- Licence: CC-BY 4.0
+- Number of icons: 209
+- Sources: https://github.com/microsoft/vscode-icons
+- Collection: =vscode=
+   
+* Screenshots
+
+[[file:screenshot.png]]
+
+[[file:screenshot-2.png]]
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/screenshot-2.png b/emacs/.emacs.d/elpa/svg-lib-0.3/screenshot-2.png
new file mode 100644
index 0000000..a6b056a
Binary files /dev/null and b/emacs/.emacs.d/elpa/svg-lib-0.3/screenshot-2.png differ
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/screenshot.png b/emacs/.emacs.d/elpa/svg-lib-0.3/screenshot.png
new file mode 100644
index 0000000..4b5a81d
Binary files /dev/null and b/emacs/.emacs.d/elpa/svg-lib-0.3/screenshot.png differ
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-autoloads.el b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-autoloads.el
new file mode 100644
index 0000000..0a13d72
--- /dev/null
+++ b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-autoloads.el
@@ -0,0 +1,28 @@
+;;; svg-lib-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from svg-lib.el
+
+(register-definition-prefixes "svg-lib" '("svg-lib-"))
+
+;;; End of scraped data
+
+(provide 'svg-lib-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; svg-lib-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-demo.el b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-demo.el
new file mode 100644
index 0000000..f611f41
--- /dev/null
+++ b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-demo.el
@@ -0,0 +1,73 @@
+;; Copyright (C) 2021 Free Software Foundation, Inc. -*- lexical-binding: t; -*-
+
+;; This file is not part of GNU Emacs.
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; For a full copy of the GNU General Public License
+;; see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; This file demonstrates some usage examples of the svg-lib package.
+:; Each line should insert some svg objets into the current buffer.
+
+(require 'svg-lib)
+
+(dotimes (i 5)
+  (insert-image (svg-lib-tag "TODO" nil
+                             :font-weight (* (+ i 2) 100))))
+
+
+(dotimes (i 10)
+  (insert-image (svg-lib-tag "TODO" nil :padding 1 :stroke (/ i 4.0))))
+          
+
+(dotimes (i 10)
+  (insert-image (svg-lib-tag "TODO" nil :stroke 2 :radius i)))
+          
+
+(dotimes (i 10)
+  (insert-image (svg-lib-progress-bar (/ (+ i 1) 10.0) nil
+                    :width 5 :margin 1 :stroke 2 :padding 2)))
+          
+
+(insert-image (svg-lib-progress-bar 0.75 nil :radius 8 :stroke 2 :padding 0))
+ 
+
+(dotimes (i 10)
+  (insert-image (svg-lib-progress-pie (/ (+ i 1) 10.0) nil
+                    :margin 1 :stroke 2 :padding 1)))
+          
+
+(dotimes (i 10)
+  (insert-image (svg-lib-icon "star" nil :scale (/ (+ i 1) 10.0))))
+          
+
+(insert-image (svg-lib-icon+tag "check-bold" "DONE" nil
+                              :font-family "Roboto Mono"
+                              :font-weight 500
+                              :stroke 0 :background "#673AB7" :foreground "white"))
+ 
+
+(insert-image (svg-lib-icon "gnuemacs" nil :collection "simple"
+                            :stroke 0 :scale 1 :padding 0))
+  
+
+(insert-image (svg-lib-date nil nil :font-family "Roboto" :radius 5
+                                    :foreground "#673AB7"))
+ 
+(svg-lib-button-mode 1)
+(insert (svg-lib-button "[check-bold] OK"
+                        (lambda () (interactive) (message "OK"))))
+
+
+
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-demo.elc b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-demo.elc
new file mode 100644
index 0000000..faaf728
Binary files /dev/null and b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-demo.elc differ
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-demo.org b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-demo.org
new file mode 100644
index 0000000..de99589
--- /dev/null
+++ b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-demo.org
@@ -0,0 +1,75 @@
+#+STARTUP: overview indent
+
+* Code
+#+begin_src emacs-lisp
+(require 'svg-lib)
+
+(defvar svg-font-lock-keywords
+  `(("TODO"
+     (0 (list 'face nil 'display (svg-font-lock-todo))))
+    ("\\:\\([0-9a-zA-Z]+\\)\\:"
+     (0 (list 'face nil 'display (svg-font-lock-tag (match-string 1)))))
+    ("DONE"
+     (0 (list 'face nil 'display (svg-font-lock-done))))
+    ("\\[\\([0-9]\\{1,3\\}\\)%\\]"
+     (0 (list 'face nil 'display (svg-font-lock-progress_percent (match-string 1)))))
+    ("\\[\\([0-9]+/[0-9]+\\)\\]"
+     (0 (list 'face nil 'display (svg-font-lock-progress_count (match-string 1)))))))
+
+(defun svg-font-lock-tag (label)
+  (svg-lib-tag label nil :margin 0))
+
+(defun svg-font-lock-todo ()
+  (svg-lib-tag "TODO" nil :margin 0
+               :font-family "Roboto Mono" :font-weight 500
+               :foreground "#FFFFFF" :background "#673AB7"))
+
+(defun svg-font-lock-done ()
+  (svg-lib-tag "DONE" nil :margin 0
+               :font-family "Roboto Mono" :font-weight 400
+               :foreground "#B0BEC5" :background "white"))
+  
+(defun svg-font-lock-progress_percent (value)
+  (svg-image (svg-lib-concat
+              (svg-lib-progress-bar (/ (string-to-number value) 100.0)
+                                nil :margin 0 :stroke 2 :radius 3 :padding 2 :width 12)
+              (svg-lib-tag (concat value "%")
+                           nil :stroke 0 :margin 0)) :ascent 'center))
+
+(defun svg-font-lock-progress_count (value)
+  (let* ((seq (mapcar #'string-to-number (split-string value "/")))
+         (count (float (car seq)))
+         (total (float (cadr seq))))
+  (svg-image (svg-lib-concat
+              (svg-lib-progress-bar (/ count total) nil
+                                :margin 0 :stroke 2 :radius 3 :padding 2 :width 12)
+              (svg-lib-tag value nil
+                           :stroke 0 :margin 0)) :ascent 'center)))
+
+;; Activate
+(push 'display font-lock-extra-managed-props)
+(font-lock-add-keywords nil svg-font-lock-keywords)
+(font-lock-flush (point-min) (point-max))
+
+;; Deactivate 
+;; (font-lock-remove-keywords nil svg-font-lock-keywords)
+;; (font-lock-flush (point-min) (point-max))
+
+#+end_src
+
+
+* Progress count:   [2/3] 
+:PROPERTIES:
+:END:
+
+- [X] Sub-task 1
+- [X] Sub-task 2
+- [ ] Sub-task 3
+
+* Progress percent: [66%]
+:PROPERTIES:
+:END:
+
+- [X] Sub-task 1
+- [X] Sub-task 2
+- [ ] Sub-task 3
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-pkg.el b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-pkg.el
new file mode 100644
index 0000000..6a5d2a5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib-pkg.el
@@ -0,0 +1,2 @@
+;; Generated package description from svg-lib.el  -*- no-byte-compile: t -*-
+(define-package "svg-lib" "0.3" "SVG tags, progress bars & icons" '((emacs "27.1")) :commit "f2cc9615ef3a052747135d34f31c423a26592f14" :maintainer '("Nicolas P. Rougier" . "Nicolas.Rougier@inria.fr") :keywords '("svg" "icons" "tags" "convenience") :url "https://github.com/rougier/svg-lib")
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib.el b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib.el
new file mode 100644
index 0000000..79928d6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib.el
@@ -0,0 +1,1044 @@
+;;; svg-lib.el --- SVG tags, progress bars & icons -*- lexical-binding: t -*-
+
+;; Copyright (C) 2021-2023 Free Software Foundation, Inc.
+
+;; Maintainer: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
+;; URL: https://github.com/rougier/svg-lib
+;; Version: 0.3
+;; Package-Requires: ((emacs "27.1"))
+;; Keywords: svg, icons, tags, convenience
+
+;; This file is not part of GNU Emacs.
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; For a full copy of the GNU General Public License
+;; see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; Usage example:
+;;
+;; (insert-image (svg-lib-tag "TODO"))
+;; (insert-image (svg-lib-progress-bar 0.33))
+;; (insert-image (svg-lib-icon "star"))
+;;
+;; Icons ares created by parsing remote collections whose license are
+;; compatibles with GNU Emacs:
+;;
+;; - Boxicons (https://github.com/atisawd/boxicons), available under a
+;;   Creative Commons 4.0 license. As of version 2.07 (December 2020),
+;;   this collection offers 1500 icons in two styles (regular & solid).
+;;   Gallery is available at https://boxicons.com/
+;;
+;; - Octicons (https://github.com/primer/octicons), available under a
+;;   MIT License with some usage restriction for the GitHub logo. As of
+;;   version 11.2.0 (December 2020), this collection offers 201 icons.
+;;   Gallery available at https://primer.style/octicons/
+;;
+;; - Material (https://github.com/google/material-design-icons),
+;;   available under an Apache 2.0 license. As of version 4.0.0
+;;   (December 2020), this collection offers 500+ icons in 4 styles
+;;   (filled, outlined, rounded, sharp). Gallery available at
+;;   https://material.io/resources/icons/?style=baseline
+;;
+;; - Bootstrap (https://github.com/twbs/icons), available under a MIT
+;;   license.  As of version 1.2.1 (December 2020), this collection
+;;   offers 1200+ icons in 2 styles (regular & filled).  Gallery
+;;   available at https://icons.getbootstrap.com/
+;;
+;; The default size of an icon is exactly 2x1 characters such that it
+;; can be inserted inside a text without disturbing alignment.
+;;
+;; Note: Each icon is cached locally to speed-up loading the next time
+;;       you use it. If for some reason the cache is corrupted you can
+;;       force reload using the svg-icon-get-data function.
+;;
+;; If you want to add new collections (i.e. URL), make sure the icons
+;; are monochrome and that their size is consistent.
+
+;;; NEWS:
+
+;; Version 0.3
+;; - Renamed 'svg-lib-button' to 'svg-lib-icon+tag'
+;; - Added interactive 'svg-lib-button' with associtated 'svg-lib-button-mode'
+;; - Added proper documentation in the README
+
+;; Version 0.2.8
+;; - No background for icon when background color is nil
+;; - Refactored date icons
+
+;; Version 0.2.7
+;; - Added a dynamic date icon
+
+;; Version 0.2.6
+;; - Bug fix with bootstrap icon directory
+
+;; Version 0.2.5
+;; - Bug fix in text size computation
+
+;; Version 0.2.4
+;; - Better error handling if SVG support is missing
+
+;; Version 0.2.2
+;; - Added a left/righ crop style argument to allow for tags collage.
+
+;; Version 0.2.1
+;; - Added an alignment parameter for moving tags inside margins.
+
+;; Version 0.2
+;; - Fix most of the warnings.
+
+;; Version 0.1:
+;; - Submission to ELPA
+
+
+;;; Code:
+(require 'svg)
+(require 'xml)
+(require 'cl-lib)
+(require 'color)
+
+;; Check if Emacs has been compiled with svg support
+(defun svg-lib--image (&rest args)
+  ;; FIXME: Should `svg-image' perform this check instead?
+  (unless (image-type-available-p 'svg)
+     (error "svg-lib.el requires Emacs to be compiled with svg support.\n"))
+  (apply #'svg-image args))
+
+(defgroup svg-lib nil
+  "SVG tags, bars & icons."
+  :group 'convenience
+  :prefix "svg-lib-")
+
+(defface svg-lib-button-active-face
+  `((t :foreground ,(face-foreground 'default)
+       :background ,(face-background 'default)
+       :family "RobotoMono Nerd Font"
+       :weight regular
+       :box (:line-width 2 :style nil)))
+  "Default face for active button"
+  :group 'svg-lib)
+
+(defface svg-lib-button-hover-face
+  `((t :foreground ,(face-background 'font-lock-comment-face nil 'default)
+       :background ,(face-foreground 'font-lock-comment-face nil 'default)
+       :family "RobotoMono Nerd Font"
+       :weight semibold
+       :box nil))
+  "default face for when mouse is over the button"
+  :group 'svg-lib)
+
+(defface svg-lib-button-press-face
+  `((t :foreground ,(face-background 'default)
+       :background ,(face-foreground 'default)
+       :family "RobotoMono Nerd Font"
+       :weight semibold
+       :box nil))
+  "Default face for when button is prssed (mouse click or keyboard)"
+  :group 'svg-lib)
+
+;; Default icon collections
+;; ---------------------------------------------------------------------
+(defcustom  svg-lib-icon-collections
+  '(("bootstrap" .
+     "https://icons.getbootstrap.com/assets/icons/%s.svg")
+    ("simple" .
+     "https://raw.githubusercontent.com/simple-icons/simple-icons/develop/icons/%s.svg")
+    ("material" .
+     "https://raw.githubusercontent.com/Templarian/MaterialDesign/master/svg/%s.svg")
+    ("octicons" .
+     "https://raw.githubusercontent.com/primer/octicons/main/icons/%s-24.svg")
+    ("boxicons" .
+     "https://boxicons.com/static/img/svg/regular/bx-%s.svg")
+    ("vscode" .
+     "https://raw.githubusercontent.com/microsoft/vscode-icons/main/icons/light/%s.svg"))
+    
+  "Various icons collections stored as (name . base-url).
+
+The name of the collection is used as a pointer for the various
+icon creation methods.  The base-url is a string containing a %s
+such that is can be replaced with the name of a specific icon.
+User is responsible for finding/giving proper names for a given
+collection (there are way too many to store them)."
+
+  :type '(alist :key-type (string :tag "Name")
+                :value-type (string :tag "URL"))
+  :group 'svg-lib)
+
+(defcustom svg-lib-icons-dir
+  (expand-file-name (concat user-emacs-directory ".cache/svg-lib/"))
+  "svg-lib icons directory."
+  :group 'svg-lib
+  :type 'directory)
+
+
+;; Default style for all objects
+(defun svg-lib-style-compute-default (&optional face)
+  "Compute the default style according to face (which defaults
+to the default face)."
+
+  (let* ((face        (or face 'default))
+         (font-family (face-attribute face :family nil 'default))
+         (font-weight (face-attribute face :weight nil 'default))
+         (font-size   (face-attribute face :height nil 'default))
+         (font-size   (round (* font-size 0.085)))
+         (foreground  (face-attribute face :foreground nil 'default))
+         (background  (face-attribute face :background nil 'default)))
+
+    `(:background    ,background
+      :foreground    ,foreground
+
+      :padding       1      ;; In characters (tag and icons) or pixels (progress)
+      :margin        0      ;; In characters
+      :stroke        2      ;; In pixels
+      :radius        3      ;; In pixels
+      :alignment     0.5    ;; Horizontal alignment (in fraction of margin)
+      :width         20     ;; In characters
+      :height        0.90   ;; Ratio of text line height
+      :scale         0.75   ;; Icon scaling
+      :ascent        center ;; Position / baseline
+      :crop-left     nil    ;; Whether to crop on left (for collage with other tags)
+      :crop-right    nil    ;; Whether to crop on righ (for collage with other tags)
+
+      :collection    "material" ;; Icon collection
+      
+      :font-family   ,font-family
+      :font-size     ,font-size
+      :font-weight   ,font-weight)))
+
+(defcustom svg-lib-style-default
+  (svg-lib-style-compute-default)
+  "Default style"
+  :type '(plist :key-type (choice (const :tag "Background" :background)
+                                  (const :tag "Foreground" :foreground)
+                                  (const :tag "Padding" :padding)
+                                  (const :tag "Margin" :margin)
+                                  (const :tag "Stroke" :stroke)
+                                  (const :tag "Radius" :radius)
+                                  (const :tag "Ascent" :ascent)
+                                  (const :tag "Alignment" :alignment)
+                                  (const :tag "Width" :width)
+                                  (const :tag "Height" :height)
+                                  (const :tag "Scale" :scale)
+                                  (const :tag "Crop Left" :crop-left)
+                                  (const :tag "Crop Right" :crop-right)
+                                  (const :tag "Collection" :collection)
+                                  (const :tag "Font Family" :font-family)
+                                  (const :tag "Font Size" :font-size)
+                                  (const :tag "Font Weight" :font-weight))
+                :value-type (choice (const :tag "None" nil)
+                                    (number)
+                                    (string)
+                                    (boolean)
+                                    (symbol)))
+  :group 'svg-lib)
+
+
+;; Convert Emacs color to SVG color
+(defun svg-lib-convert-color (color-name)
+  "Convert Emacs COLOR-NAME to #rrggbb form.
+If COLOR-NAME is unknown to Emacs, then return COLOR-NAME as-is."
+  (when color-name
+    (let ((rgb-color (color-name-to-rgb color-name)))
+      (if rgb-color
+          (apply #'color-rgb-to-hex (append rgb-color '(2)))
+	color-name))))
+
+;; SVG Library style build from partial specification
+(defun svg-lib-style (&optional base &rest args)
+  "Build a news style using BASE and style elements ARGS."
+  
+  (let* ((default svg-lib-style-default)
+         (base (or base default))
+         (keys (cl-loop for (key _value) on default by 'cddr
+                        collect key))
+         (style '()))
+
+    (dolist (key keys)
+      (setq style (if (plist-member args key)
+                      (plist-put style key (plist-get args key))
+                    (plist-put style key (plist-get base key)))))
+
+    ;; Convert emacs colors to SVG colors
+    (plist-put style :foreground
+               (svg-lib-convert-color (plist-get style :foreground)))
+    (plist-put style :background
+               (svg-lib-convert-color (plist-get style :background)))
+
+    ;; Convert emacs font weights to SVG font weights
+    (let ((weights
+           '((thin       . 100) (ultralight . 200) (light      . 300)
+             (regular    . 400) (medium     . 500) (semibold   . 600)
+             (bold       . 700) (extrabold  . 800) (black      . 900))))
+      (plist-put style :font-weight
+                 (or (cdr (assoc (plist-get style :font-weight) weights))
+                     (plist-get style :font-weight))))
+    style))
+
+
+;; Create an image displaying LABEL in a rounded box.
+(defun svg-lib-tag (label &optional style &rest args)
+  "Create an image displaying LABEL in a rounded box using given STYLE
+and style elements ARGS."
+
+  (let* ((default svg-lib-style-default)
+         (style (if style (apply #'svg-lib-style nil style) default))
+         (style (if args  (apply #'svg-lib-style style args) style))
+
+         (foreground  (plist-get style :foreground))
+         (background  (plist-get style :background))
+
+         (crop-left   (plist-get style :crop-left))
+         (crop-right  (plist-get style :crop-right))
+
+         (alignment   (plist-get style :alignment))
+         (stroke      (plist-get style :stroke))
+         ;; (width       (plist-get style :width))
+         (height      (plist-get style :height))
+         (radius      (plist-get style :radius))
+         ;; (scale       (plist-get style :scale))
+         (margin      (plist-get style :margin))
+         (padding     (plist-get style :padding))
+         (font-size   (plist-get style :font-size))
+         (font-family (plist-get style :font-family))
+         (font-weight (plist-get style :font-weight))
+
+         (txt-char-width  (window-font-width))
+         (txt-char-height (window-font-height))
+         (txt-char-height (if line-spacing
+                              (+ txt-char-height line-spacing)
+                            txt-char-height))
+         (font-info       (font-info (format "%s-%d" font-family font-size)))
+         (font-size       (aref font-info 2)) ;; redefine font-size
+         (ascent          (aref font-info 8))
+         (tag-char-width  (aref font-info 11))
+         ;; (tag-char-height (aref font-info 3))
+         (tag-width       (* (+ (length label) padding) txt-char-width))
+         (tag-height      (* txt-char-height height))
+
+         (svg-width       (+ tag-width (* margin txt-char-width)))
+         (svg-height      tag-height)
+         (svg-ascent      (plist-get style :ascent))
+         
+         (tag-x  (* (- svg-width tag-width)  alignment))
+         (text-x (+ tag-x (/ (- tag-width (* (length label) tag-char-width)) 2)))
+         (text-y ascent)
+
+         (tag-x      (if crop-left  (- tag-x     txt-char-width) tag-x))
+         (tag-width  (if crop-left  (+ tag-width txt-char-width) tag-width))
+         (text-x     (if crop-left  (- text-x (/ stroke 2)) text-x))
+         (tag-width  (if crop-right (+ tag-width txt-char-width) tag-width))
+         (text-x     (if crop-right (+ text-x (/ stroke 2)) text-x))
+         
+         (svg (svg-create svg-width svg-height)))
+
+    (when (>= stroke 0.25)
+      (svg-rectangle svg tag-x 0 tag-width tag-height
+                     :fill foreground :rx radius))
+    (svg-rectangle svg (+ tag-x (/ stroke 2.0)) (/ stroke 2.0)
+                       (- tag-width stroke) (- tag-height stroke)
+                       :fill background :rx (- radius (/ stroke 2.0)))
+    (svg-text svg label
+              :font-family font-family :font-weight font-weight  :font-size font-size
+              :fill foreground :x text-x :y  text-y)
+    (svg-lib--image svg :ascent svg-ascent)))
+
+
+;; Create a progress pie
+(defun svg-lib-progress-pie (value &optional style &rest args)
+  "Create a progress pie image with value VALUE using given STYLE
+and style elements ARGS."
+
+  (let* ((default svg-lib-style-default)
+         (style (if style (apply #'svg-lib-style nil style) default))
+         (style (if args  (apply #'svg-lib-style style args) style))
+
+         (foreground  (plist-get style :foreground))
+         (background  (plist-get style :background))
+         (stroke      (plist-get style :stroke))
+         ;; (width       (plist-get style :width))
+         (height      (plist-get style :height))
+         ;;  (scale       (plist-get style :scale))
+         (margin      (plist-get style :margin))
+         (padding     (plist-get style :padding))
+         ;; (font-size   (plist-get style :font-size))
+         ;; (font-family (plist-get style :font-family))
+         ;; (font-weight (plist-get style :font-weight))
+         
+         (txt-char-width  (window-font-width))
+         (txt-char-height (window-font-height))
+         
+         ;; (font-info       (font-info (format "%s-%d" font-family font-size)))
+         ;; (ascent          (aref font-info 8))
+         ;; (tag-char-width  (aref font-info 11))
+         ;; (tag-char-height (aref font-info 3))
+
+         (tag-width       (* 2 txt-char-width))
+         (tag-height      (* txt-char-height height))
+
+         (svg-width       (+ tag-width (* margin txt-char-width)))
+         (svg-height      tag-height)
+         (svg-ascent      (plist-get style :ascent))
+         
+         ;; (tag-x           (/ (- svg-width tag-width) 2))
+
+         (cx              (/ svg-width  2))
+         (cy              (/ svg-height 2))
+         (radius          (- (/ tag-height 2) (/ stroke 2)))
+
+         (iradius         (- radius stroke (/ padding 2)))
+
+         (angle0          (- (/ float-pi 2)))
+         (x0              (+ cx (* iradius (cos angle0))))
+         (y0              (+ cy (* iradius (sin angle0))))
+
+         (angle1          (+ angle0 (* value 2 float-pi)))
+         (x1              (+ cx (* iradius (cos angle1))))
+         (y1              (+ cy (* iradius (sin angle1))))
+
+         (large-arc       (>= (- angle1 angle0) float-pi))
+         (svg (svg-create svg-width svg-height)))
+
+    (when (>= stroke 0.25)
+      (svg-circle svg cx cy radius :fill foreground))
+
+    (svg-circle svg cx cy (- radius (/ stroke 2.0)) :fill background)
+
+    (if (>= (- angle1 angle0) (* float-pi 2))
+        (svg-circle svg cx cy iradius :fill foreground)
+      (svg-path svg `((moveto ((,cx . ,cy)))
+                    (lineto ((,x0 . ,y0)))
+                    (elliptical-arc ((,iradius ,iradius ,x1 ,y1
+                                      :sweep t :large-arc ,large-arc))))
+              :fill foreground))
+    (svg-lib--image svg :ascent svg-ascent)))
+
+
+
+;; Create a progress bar
+(defun svg-lib-progress-bar (value &optional style &rest args)
+  "Create a progress bar image with value VALUE using given STYLE
+and style elements ARGS."
+
+  (let* ((default svg-lib-style-default)
+         (style (if style (apply #'svg-lib-style nil style) default))
+         (style (if args  (apply #'svg-lib-style style args) style))
+
+         (foreground  (plist-get style :foreground))
+         (background  (plist-get style :background))
+         (stroke      (plist-get style :stroke))
+         (width       (plist-get style :width))
+         (height      (plist-get style :height))
+         (radius      (plist-get style :radius))
+         ;; (scale       (plist-get style :scale))
+         (margin      (plist-get style :margin))
+         (padding     (plist-get style :padding))
+         ;; (font-size   (plist-get style :font-size))
+         ;; (font-family (plist-get style :font-family))
+         ;; (font-weight (plist-get style :font-weight))
+
+         (txt-char-width  (window-font-width))
+         (txt-char-height (window-font-height))
+         
+         ;; (font-info       (font-info (format "%s-%d" font-family font-size)))
+         ;; (ascent          (aref font-info 8))
+         ;; (tag-char-width  (aref font-info 11))
+         ;; (tag-char-height (aref font-info 3))
+
+         (tag-width       (* width txt-char-width))
+         (tag-height      (* txt-char-height height))
+
+         (svg-width       (+ tag-width (* margin txt-char-width)))
+         (svg-height      tag-height)
+         (svg-ascent      (plist-get style :ascent))
+         
+         (tag-x (/ (- svg-width tag-width) 2))
+         (svg (svg-create svg-width svg-height)))
+
+    (when (>= stroke 0.25)
+      (svg-rectangle svg tag-x 0 tag-width tag-height
+                     :fill foreground :rx radius))
+    (svg-rectangle svg (+ tag-x (/ stroke 2.0))
+                       (/ stroke 2.0)
+                       (- tag-width stroke)
+                       (- tag-height stroke)
+                       :fill background :rx (- radius (/ stroke 2.0)))
+    (svg-rectangle svg (+ tag-x (/ stroke 2.0) padding)
+                       (+ (/ stroke 2.0) padding)
+                       (- (* value tag-width) stroke (* 2 padding))
+                       (- tag-height stroke (* 2 padding))
+                       :fill foreground :rx (- radius (/ stroke 2.0)))
+    
+    (svg-lib--image svg :ascent svg-ascent)))
+
+
+
+;; Create a rounded box icon
+(defun svg-lib--icon-get-data (collection name &optional force-reload)
+  "Retrieve icon NAME from COLLECTION.
+
+Cached version is returned if it exists unless FORCE-RELOAD is t."
+
+  ;; Build url from collection and name without checking for error
+  (let ((url (format (cdr (assoc collection svg-lib-icon-collections)) name)))
+    ;; create the svg-lib-icons-dir if not exists
+    (unless (file-exists-p svg-lib-icons-dir)
+      (make-directory svg-lib-icons-dir t))
+    (let* ((filename (expand-file-name (format "%s_%s.svg" collection name) svg-lib-icons-dir))
+           (buffer (if (or force-reload (not (file-exists-p filename)))
+                       (with-current-buffer (url-retrieve-synchronously url)
+                         (goto-char (point-min))
+                         (search-forward "\n\n")
+                         (write-region (point) (point-max) filename)
+                         (current-buffer))
+                     (with-current-buffer (generate-new-buffer " *temp*")
+                       (insert-file-contents filename)
+                       (current-buffer)))))
+      (with-current-buffer buffer
+        (xml-parse-region (point-min) (point-max))))))
+
+
+(defun svg-lib-icon (icon &optional style &rest args)
+  "Create a SVG image displaying icon NAME from COLLECTION using
+given STYLE and style elements ARGS."
+
+  (let* ((default svg-lib-style-default)
+         (style (if style (apply #'svg-lib-style nil style) default))
+         (style (if args  (apply #'svg-lib-style style args) style))
+
+         (collection  (plist-get style :collection))
+         (root (svg-lib--icon-get-data collection icon))
+         
+         (foreground  (plist-get style :foreground))
+         (background  (plist-get style :background))
+         (stroke      (plist-get style :stroke))
+         (height      (plist-get style :height))
+         (radius      (plist-get style :radius))
+         (scale       (plist-get style :scale))
+         (margin      (plist-get style :margin))
+         (padding     (plist-get style :padding))
+         ;; (font-size   (plist-get style :font-size))
+         ;; (font-family (plist-get style :font-family))
+         ;; (font-weight (plist-get style :font-weight))
+         (width      (+ 2 padding))
+         
+         (txt-char-width  (window-font-width))
+         (txt-char-height (window-font-height))
+         (box-width       (* width txt-char-width))
+         (box-height      (* height txt-char-height))
+         (svg-width       (+ box-width (* margin txt-char-width)))
+         (svg-height      box-height)
+         (svg-ascent      (plist-get style :ascent))
+         (box-x           (/ (- svg-width box-width) 2))
+         (box-y           0)
+
+         ;; Read original viewbox
+         (viewbox (cdr (assq 'viewBox (xml-node-attributes (car root)))))
+         (viewbox (mapcar #'string-to-number (split-string viewbox)))
+         (icon-x      (nth 0 viewbox))
+         (icon-y      (nth 1 viewbox))
+         (icon-width  (nth 2 viewbox))
+         (icon-height (nth 3 viewbox))
+         (scale       (* scale (/ (float box-height) (float icon-height))))
+         (icon-transform
+          (format "translate(%f,%f) scale(%f) translate(%f,%f)"
+                  (- icon-x )
+                  (- icon-y )
+                  scale
+                  (- (/ svg-width 2 scale) (/ icon-width 2))
+                  (- (/ svg-height 2 scale) (/ icon-height 2))))
+
+         (svg (svg-create svg-width svg-height)))
+
+    (when (>= stroke 0.25)
+      (svg-rectangle svg box-x box-y box-width box-height
+                     :fill foreground :rx radius))
+    (when background
+      (svg-rectangle svg (+ box-x (/ stroke 2.0))
+                     (+ box-y (/ stroke 2.0))
+                     (- box-width stroke)
+                     (- box-height stroke)
+                     :fill background :rx (- radius (/ stroke 2.0))))
+    
+    (dolist (item (xml-get-children (car root) 'path))
+      (let* ((attrs (xml-node-attributes item))
+             (path (cdr (assoc 'd attrs)))
+             ;; (fill (or (cdr (assoc 'fill attrs)) foreground))
+             )
+        (svg-node svg 'path :d path
+                            :fill foreground
+                            :transform icon-transform)))
+    (svg-lib--image svg :ascent svg-ascent)))
+
+
+
+;; Create an image displaying LABEL in a rounded box.
+(defun svg-lib-icon+tag (icon label &optional style &rest args)
+  "Create an image displaying LABEL in a rounded box using given STYLE
+and style elements ARGS."
+
+  (let* ((default svg-lib-style-default)
+         (style (if style (apply #'svg-lib-style nil style) default))
+         (style (if args  (apply #'svg-lib-style style args) style))
+
+         (collection (plist-get style :collection))
+         (root (svg-lib--icon-get-data collection icon))
+         
+         (foreground  (plist-get style :foreground))
+         (background  (plist-get style :background))
+         (stroke      (plist-get style :stroke))
+         ;; (width       (plist-get style :width))
+         (height      (plist-get style :height))
+         (radius      (plist-get style :radius))
+         (scale       (plist-get style :scale))
+         (margin      (plist-get style :margin))
+         (padding     (plist-get style :padding))
+         (font-size   (plist-get style :font-size))
+         (font-family (plist-get style :font-family))
+         (font-weight (plist-get style :font-weight))
+
+         (label-length    (+ (length label) 2))
+                          
+         (txt-char-width  (window-font-width))
+         (txt-char-height (window-font-height))
+         ;; (box-width       (* width txt-char-width))
+         ;; (box-height      (* height txt-char-height))
+
+         (font-info       (font-info (format "%s-%d" font-family font-size)))
+         (ascent          (aref font-info 8))
+         (tag-char-width  (aref font-info 11))
+         ;; (tag-char-height (aref font-info 3))
+         (tag-width       (* (+ label-length padding) txt-char-width))
+         (tag-height      (* txt-char-height height))
+
+         (svg-width       (+ tag-width (* margin txt-char-width)))
+         (svg-height      tag-height)
+         (svg-ascent      (plist-get style :ascent))
+         
+         (tag-x (/ (- svg-width tag-width) 2))
+         (text-x (+ tag-x (/ (- tag-width (* (length label) tag-char-width)) 2)))
+         (text-x (+ text-x tag-char-width))
+         (text-y ascent)
+
+         ;; ;; Read original viewbox
+         (viewbox (cdr (assq 'viewBox (xml-node-attributes (car root)))))
+         (viewbox (mapcar 'string-to-number (split-string viewbox)))
+         (icon-x      (nth 0 viewbox))
+         (icon-y      (nth 1 viewbox))
+         (icon-width  (nth 2 viewbox))
+         (icon-height (nth 3 viewbox))
+         (scale       (* scale (/ (float tag-height) (float icon-height))))
+         (icon-transform
+          (format "translate(%f,%f) scale(%f) translate(%f,%f)"
+                  (- icon-x )
+                  (- icon-y )
+                  scale
+                  (- (/ (- text-x (* tag-char-width 1.25)) scale) (/ icon-width 2))
+                  (- (/ svg-height 2 scale) (/ icon-height 2))))
+         (svg (svg-create svg-width svg-height)))
+
+    (when (>= stroke 0.25)
+      (svg-rectangle svg tag-x 0 tag-width tag-height
+                     :fill foreground :rx radius))
+    (svg-rectangle svg (+ tag-x (/ stroke 2.0)) (/ stroke 2.0)
+                       (- tag-width stroke) (- tag-height stroke)
+                       :fill background :rx (- radius (/ stroke 2.0)))
+    (svg-text svg label
+              :font-family font-family :font-weight font-weight  :font-size font-size
+              :fill foreground :x text-x :y text-y)
+
+
+    (dolist (item (xml-get-children (car root) 'path))
+      (let* ((attrs (xml-node-attributes item))
+             (path (cdr (assoc 'd attrs)))
+             ;; (fill (or (cdr (assoc 'fill attrs)) foreground))
+             )
+        (svg-node svg 'path :d path
+                            :fill foreground
+                            :transform icon-transform)))
+    (svg-lib--image svg :ascent svg-ascent)))
+
+
+
+(defun svg-lib-date (&optional date style &rest args)
+  "Create a two lines date icon showing given DATE, using given
+STYLE and style elements ARGS."
+
+  (let* ((date (or date (current-time)))
+         (month (upcase (format-time-string "%b" date)))
+         (day (format-time-string "%d" date)))
+    (apply 'svg-lib-box month day style args)))
+
+(defun svg-lib-week-date (&optional date style &rest args)
+  "Create a two lines date icon showing given DATE, using given
+STYLE and style elements ARGS."
+
+  (let* ((date (or date (current-time)))
+         (week (format-time-string "%W" date)))
+    (apply 'svg-lib-box "WEEK" week style args)))
+
+(defun svg-lib-day-date (&optional date style &rest args)
+  "Create a two lines date icon showing given DATE, using given
+STYLE and style elements ARGS."
+
+  (let* ((weekday (upcase (format-time-string "%a" date)))
+         (day (format-time-string "%d" date)))
+    (apply 'svg-lib-box weekday day style args)))
+
+        
+(defun svg-lib-box (top bottom &optional style &rest args)
+  "Create a two lines icon showing given TOP and BOTTOM text, using
+given STYLE and style elements ARGS."
+
+  (let* ((default svg-lib-style-default)
+         (style (if style (apply #'svg-lib-style nil style) default))
+         (style (if args  (apply #'svg-lib-style style args) style))
+
+         (foreground  (plist-get style :foreground))
+         (background  (plist-get style :background))
+         (alignment   (plist-get style :alignment))
+         (stroke      (plist-get style :stroke))
+         (width       (or (plist-get args :width) 5))
+         (height      (or (plist-get args :height) 2))
+         (radius      (plist-get style :radius))
+         (margin      (plist-get style :margin))
+         
+         (font-size   (plist-get style :font-size))
+         (font-family (plist-get style :font-family))
+         (font-weight (plist-get style :font-weight))
+
+         (txt-char-width  (window-font-width))
+         (txt-char-height (window-font-height))
+         
+         (font-info       (font-info (format "%s-%d" font-family font-size)))
+         (ascent          (aref font-info 8))
+         (tag-char-width  (aref font-info 11))
+         (tag-char-height (aref font-info 3))
+         (tag-width       (* width txt-char-width))
+         
+         (tag-height      (* height txt-char-height))
+         (svg-width       (+ tag-width (* margin txt-char-width)))
+         (svg-height      tag-height)
+         (svg-ascent      (or (plist-get style :ascent) 'center))
+         (tag-x           (/ (- svg-width tag-width) 2) )
+
+         (svg (svg-create svg-width svg-height)))
+    
+    (when (>= stroke 0.25)
+      (svg-rectangle svg tag-x 0 tag-width tag-height
+                     :fill foreground :rx radius))
+    (svg-rectangle svg (+ tag-x (/ stroke 2.0))
+                       (/ stroke 2.0)
+                       (- tag-width stroke)
+                       (- tag-height stroke)
+                       :fill background :rx (- radius (/ stroke 2.0)))
+    (svg-rectangle svg (+ tag-x (/ stroke 2.0))
+                       (/ stroke 2.0)
+                       (- tag-width stroke)
+                       (- (/ tag-height 2) stroke)
+                       :fill foreground :rx (- radius (/ stroke 2.0)))
+    (svg-rectangle svg (+ tag-x (/ stroke 2.0))
+                       (+ (/ stroke 2.0) (/ tag-height 3))
+                       (- tag-width stroke)
+                       (- (/ tag-height 2) stroke)
+                       :fill background :rx 0)
+    (svg-text svg top
+              :font-family font-family
+              :font-weight "bold"
+              :font-size (* font-size 0.9)
+              :fill background
+              :text-anchor "middle"
+              :x (/ svg-width 2)
+              :y "+0.95em")
+    (svg-text svg bottom
+              :font-family font-family
+              :font-weight "bold"
+              :font-size (* font-size 1.7)
+              :fill foreground ;;(face-foreground 'default)
+              :text-anchor "middle"
+              :x (/ svg-width 2)
+              :y "+1.6em")
+    (svg-lib--image svg :ascent svg-ascent)))
+
+(defun svg-lib-concat (svg-image-1 svg-image-2)
+  "Concatenate two svg images horizontally."
+
+ (let* ((svg (car (with-temp-buffer
+ 	                (insert (plist-get (cdr svg-image-1) :data))
+ 	                (xml-parse-region (point-min) (point-max)))))
+        (attrs (xml-node-attributes svg))
+        (width-1 (string-to-number (cdr (assq 'width attrs))))
+        (height-1 (string-to-number (cdr (assq 'height attrs))))
+        (children-1 (xml-node-children svg))
+ 
+        (svg (car (with-temp-buffer
+ 	                (insert (plist-get (cdr svg-image-2) :data))
+ 	                (xml-parse-region (point-min) (point-max)))))
+        (attrs (xml-node-attributes svg))
+        (width-2 (string-to-number (cdr (assq 'width attrs))))
+        (height-2 (string-to-number (cdr (assq 'height attrs))))
+        (children-2 (xml-node-children svg))
+
+        (width (+ width-1 width-2))
+        (height (max height-1 height-2))
+        (transform (format "translate(%f,0)" width-1))
+        (svg (svg-create width height)))
+
+   (dolist (child children-1)
+     (dom-append-child svg child))
+
+   (dolist (child children-2)
+     (unless (stringp child)
+       (dom-set-attribute child 'transform transform))
+     (dom-append-child svg child))
+   svg))
+
+
+(defvar svg-lib-button--id-counter 0
+  "SVG button unique id counter")
+
+(defun svg-lib-button--search (id)
+  "Return region for the button with given ID"
+
+  (save-excursion
+    (goto-char (point-min))
+    (save-match-data
+      (when-let* ((match (text-property-search-forward 'button-id id t)))
+        (cons (prop-match-beginning match)
+              (prop-match-end match))))))
+
+(defun svg-lib-button--at-point (&optional pos)
+  "Return the button at point"
+  (get-text-property (or pos (point)) 'button-id))
+
+(defun svg-lib-button--get-state (id &optional region)
+  "Return the state of button ID"
+  
+  (when-let* ((region (or region (svg-lib-button--search id))))
+    (get-text-property (car region) 'button-state)))
+
+(defun svg-lib-button--set-state (id state &optional no-reset)
+  "Set the state of button ID to STATE, reset the state of any
+hovered button unless NO-RESET is t"
+
+  ;; Reset previous hover button state (if any)
+  (when (and (boundp 'svg-lib-button--hover-id) svg-lib-button--hover-id (not no-reset))
+    (let ((prev-id svg-lib-button--hover-id))
+      (setq-local svg-lib-button--hover-id nil)
+      (svg-lib-button--set-state prev-id 'active)))
+
+  ;; Set new state
+  (when-let* ((region (svg-lib-button--search id))
+              (cur-state (svg-lib-button--get-state id region))
+              (button-list (get-text-property (car region) 'button-list))
+              (display (cdr (assoc state button-list))))
+        (put-text-property (car region) (cdr region) 'display display)
+        (put-text-property (car region) (cdr region) 'button-state state)
+        (cond ((eq state 'hover)
+               (setq-local svg-lib-button--hover-id id))
+              ((eq state 'press)
+               (setq-local svg-lib-button--press-id id)))))
+
+(defun svg-lib-button--tooltip-hide (&rest args)
+  "Set currently press or hightlighted button to default
+state (active) and hover button at point if any."
+
+  (when (boundp 'svg-lib-button--press-id)
+    (svg-lib-button--set-state svg-lib-button--press-id 'active))
+  (when (boundp 'svg-lib-button--hover-id)
+    (svg-lib-button--set-state svg-lib-button--hover-id 'active))
+
+  ;; Hover button at point (if any)
+  (svg-lib-button--set-state (svg-lib-button--at-point) 'hover)
+  (advice-remove 'tooltip-hide #'svg-lib-button--tooltip-hide))
+
+(defun svg-lib-button--tooltip-show (pos)
+  "Set button under mouse state to hover or press depending
+on whether mouse button 1 is down (press) or up (hover)"
+
+  (if (and (consp last-input-event)
+           (string-match-p "down-mouse-1" (format "%s" (car last-input-event))))
+      (svg-lib-button--set-state (svg-lib-button--at-point pos) 'press)
+    (svg-lib-button--set-state (svg-lib-button--at-point pos) 'hover))
+  (advice-add 'tooltip-hide :before #'svg-lib-button--tooltip-hide))
+
+(defun svg-lib-button--mouse-down ()
+  "Set button under mouse state to press."
+
+  (interactive)
+  (save-excursion
+    (mouse-set-point last-input-event)
+    (svg-lib-button--set-state (svg-lib-button--at-point) 'press))
+  (advice-add 'tooltip-hide :before #'svg-lib-button--tooltip-hide))
+
+(defun svg-lib-button--mouse-press ()
+    "Set button under mouse state to default state (active) and call
+button hook. If current buffer is minibuffer, it aborts it. It
+would be better to simply exit minibuffer but this leads to focus
+problem if the hook creates a frame."
+
+  (interactive)
+
+  ;; Here we check if mouse is still over the button
+  (let ((mouse-point (save-excursion
+                       (mouse-set-point last-input-event)
+                       (point))))
+    (if-let ((id (svg-lib-button--at-point mouse-point)))
+        (svg-lib-button--set-state svg-lib-button--press-id 'hover)
+      (svg-lib-button--set-state svg-lib-button--press-id 'active)))
+  
+  (when-let* ((region (svg-lib-button--search svg-lib-button--press-id))
+              (hook (get-text-property (car region) 'button-hook)))
+    (if (minibufferp nil t)
+        (unwind-protect
+            (abort-minibuffers)
+          (funcall hook))
+      (funcall hook))))
+ 
+(defun svg-lib-button--mouse-drag ()
+  "Update the state of the button under mouse"
+  
+  (interactive)
+  (save-excursion
+    (mouse-set-point last-input-event)
+    (svg-lib-button--set-state (svg-lib-button--at-point) 'press)))
+
+(defun svg-lib-button--make (label &optional face)
+  "Return a svg tag with given LABEL and FACE. LABEL can be composed
+as \"[collection:icon] label\" resulting in an icon+tag button."
+
+  (save-match-data
+    (let* ((face (or face 'default))
+           (label-regex "\\[\\([a-zA-Z0-9]+:\\)?\\([a-zA-Z0-9 _-]+\\)\\] *\\(.+\\)"))
+      (if (string-match label-regex label)
+          (let* ((collection (match-string 1 label))
+                 (collection (if (stringp collection)
+                                 (substring collection 0 -1)
+                               (plist-get svg-lib-style-default ':collection)))
+                 (icon       (match-string 2 label))
+                 (label      (match-string 3 label)))
+            (svg-lib-icon+tag icon label nil
+                              :collection collection
+                              :stroke (or (plist-get (face-attribute face :box) ':line-width) 0)
+                              :font-family (face-attribute face :family nil t)
+                              :font-weight (face-attribute face :weight nil t)
+                              :foreground (face-foreground face nil 'default)
+                              :background (face-background face nil 'default)))
+        (svg-lib-tag label nil
+                     :stroke (or (plist-get (face-attribute face :box) ':line-width) 0)
+                     :font-family (face-attribute face :family nil t)
+                     :font-weight (face-attribute face :weight nil t)
+                     :foreground (face-foreground face nil 'default)
+                     :background (face-background face nil 'default))))))
+
+
+(defun svg-lib-button (label &optional hook help active-face hover-face press-face)
+  "Make a button with given LABEL that will call HOOK when
+pressed. The HELP text is displatyed when mouse is hovering the
+button. ACTIVE-FACE, HOVER-FACE and PRESS-FACE correspond to the
+different states of the button. LABEL can be composed as
+\"[collection:icon] label\" resulting in an icon+tag button.
+
+For proper highlighting, `svg-lib-button-mode' needs to be
+activated before inserting a button into a buffer."
+
+  ;; Having a SVG button highlighted when mouse cursor is hovering is
+  ;; not totally straightforward because Emacs lacks the proper
+  ;; machinery to do so. There is actually a mouse-face property but it
+  ;; only changes the face and cannot change the display property (that
+  ;; is needed for SVG). To solve the problem, we can take advantage of
+  ;; the tooltip machinery because it offers a hackable enter/exit event
+  ;; that can be used to update the display at the proper time.
+  ;;
+  ;; To make this works, a few properties needs to be removed from
+  ;; `font-lock-extra-managed-props' and `yank-excluded-properties'.
+  ;; For org-mode, another hack is necessary because when org-mode
+  ;; unfontifies a region (see `org-unfontify-region'), it removes the
+  ;; local keymap that is used. You thus need to activate the
+  ;; svg-lib-button-mode to have this set for you.
+  
+  (let* ((active (svg-lib-button--make label
+                          (or active-face 'svg-lib-button-active-face)))
+         (hover (svg-lib-button--make label
+                          (or hover-face 'svg-lib-button-hover-face)))
+         (press (svg-lib-button--make label
+                          (or press-face 'svg-lib-button-press-face)))
+         (buttons `((active . ,active)
+                    (hover . ,hover)
+                    (press . ,press)))
+         (state 'active))
+    (setq svg-lib-button--id-counter (1+ svg-lib-button--id-counter))
+    (propertize (concat label " ")
+                'display (cdr (assoc state buttons))
+                'svg-lib-button t
+                'button-id svg-lib-button--id-counter
+                'button-state state
+                'button-list buttons
+                'button-hook hook
+                'front-sticky nil
+                'rear-nonsticky t
+                'keymap (define-keymap :suppress t
+                          "<down-mouse-1>" #'svg-lib-button--mouse-down
+                          "<mouse-1>"      #'svg-lib-button--mouse-press
+                          "<drag-mouse-1>" #'svg-lib-button--mouse-drag)
+                'help-echo `(lambda (_window _object pos)
+                              (svg-lib-button--tooltip-show pos)
+                               ,help)
+                'pointer 'hand)))
+
+(defun svg-lib-button--remove-text-properties (orig-fun beg end properties &optional object)
+  "This advice function ensures keymap is not removed when in svg-lib-button-mode"
+
+  (let ((properties (if (and svg-lib-button-mode (derived-mode-p 'org-mode))
+                        (org-plist-delete properties 'keymap)
+                       properties)))
+    (apply orig-fun (list beg end properties object))))
+
+(define-minor-mode svg-lib-button-mode
+  "Activate svg-lib-button-mode that takes care of activating tooltip
+mode and removing some properties from `yank-excluded-properties'
+and `font-lock-extra-managed-props' in order for highlight to
+work properly. This mode also installs an advice on
+`remove-text-properties' in org-mode in order to not delete the
+`keymap' property that is necessary to detect mouse press events."
+
+  :lighter "B"
+
+  (when svg-lib-button-mode
+    ;; This is necessary for detecting when mouse cursor enter or
+    ;; leave a button
+    (require 'tooltip)
+    (tooltip-mode 1)
+
+    ;; This is necessary for preventing org-mode to remove keymap when
+    ;; unfontiying a region
+    (advice-add #'remove-text-properties :around #'svg-lib-button--remove-text-properties)
+
+    ;; This prevents help-echo to be removed.when button is copied/yanked
+    (dolist (property '(help-echo keymap))
+      (setq-local yank-excluded-properties
+                  (remove property yank-excluded-properties)))
+
+    ;; This prevents help-echo to be removed.by font-lock
+    (dolist (property '(help-echo keymap display))
+      (setq-local font-lock-extra-managed-props
+                  (remove property font-lock-extra-managed-props))))
+  
+  (unless svg-lib-button-mode
+    (advice-remove #'remove-text-properties #'svg-lib-button--remove-text-properties)))
+
+(provide 'svg-lib)
+;;; svg-lib.el ends here
+
+
+
+      
diff --git a/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib.elc b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib.elc
new file mode 100644
index 0000000..5dcf06b
Binary files /dev/null and b/emacs/.emacs.d/elpa/svg-lib-0.3/svg-lib.elc differ
diff --git a/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper-autoloads.el b/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper-autoloads.el
new file mode 100644
index 0000000..20537d0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper-autoloads.el
@@ -0,0 +1,56 @@
+;;; swiper-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from swiper.el
+
+(autoload 'swiper-avy "swiper" "\
+Jump to one of the current swiper candidates with `avy'." t)
+(autoload 'swiper-backward "swiper" "\
+`isearch-backward' with an overview.
+When non-nil, INITIAL-INPUT is the initial search pattern.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'swiper-thing-at-point "swiper" "\
+`swiper' with `ivy-thing-at-point'." t)
+(autoload 'swiper-all-thing-at-point "swiper" "\
+`swiper-all' with `ivy-thing-at-point'." t)
+(autoload 'swiper "swiper" "\
+`isearch-forward' with an overview.
+When non-nil, INITIAL-INPUT is the initial search pattern.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'swiper-all "swiper" "\
+Run `swiper' for all open buffers.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'swiper-isearch "swiper" "\
+A `swiper' that's not line-based.
+
+(fn &optional INITIAL-INPUT)" t)
+(autoload 'swiper-isearch-backward "swiper" "\
+Like `swiper-isearch' but the first result is before the point.
+
+(fn &optional INITIAL-INPUT)" t)
+(register-definition-prefixes "swiper" '("swiper-"))
+
+;;; End of scraped data
+
+(provide 'swiper-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; swiper-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper-pkg.el b/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper-pkg.el
new file mode 100644
index 0000000..3066d0f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper-pkg.el
@@ -0,0 +1,11 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "swiper" "20260101.2125"
+  "Isearch with an overview.  Oh, man!."
+  '((emacs "24.5")
+    (ivy   "0.15.1"))
+  :url "https://github.com/abo-abo/swiper"
+  :commit "d489b4f0d48fd215119261d92de103c5b5580895"
+  :revdesc "d489b4f0d48f"
+  :keywords '("matching")
+  :authors '(("Oleh Krehel" . "ohwoeowho@gmail.com"))
+  :maintainers '(("Basil L. Contovounesios" . "basil@contovou.net")))
diff --git a/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper.el b/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper.el
new file mode 100644
index 0000000..74eb1b7
--- /dev/null
+++ b/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper.el
@@ -0,0 +1,1827 @@
+;;; swiper.el --- Isearch with an overview.  Oh, man! -*- lexical-binding: t -*-
+
+;; Copyright (C) 2015-2026 Free Software Foundation, Inc.
+
+;; Author: Oleh Krehel <ohwoeowho@gmail.com>
+;; Maintainer: Basil L. Contovounesios <basil@contovou.net>
+;; URL: https://github.com/abo-abo/swiper
+;; Package-Version: 20260101.2125
+;; Package-Revision: d489b4f0d48f
+;; Package-Requires: ((emacs "24.5") (ivy "0.15.1"))
+;; Keywords: matching
+
+;; This file is part of GNU Emacs.
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; For a full copy of the GNU General Public License
+;; see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This package gives an overview of the current regex search
+;; candidates.  The search regex can be split into groups with a
+;; space.  Each group is highlighted with a different face.
+;;
+;; It can double as a quick `regex-builder', although only single
+;; lines will be matched.
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'ivy)
+
+(eval-when-compile
+  (unless (fboundp 'static-if)
+    (defmacro static-if (condition then-form &rest else-forms)
+      "Expand to THEN-FORM or ELSE-FORMS based on compile-time CONDITION.
+Polyfill for Emacs 30 `static-if'."
+      (declare (debug (sexp sexp &rest sexp)) (indent 2))
+      (if (eval condition lexical-binding)
+          then-form
+        (macroexp-progn else-forms)))))
+
+(defgroup swiper nil
+  "`isearch' with an overview."
+  :group 'matching
+  :prefix "swiper-")
+
+(defface swiper-match-face-1
+  '((t :inherit lazy-highlight))
+  "The background face for `swiper' matches."
+  :group 'ivy-faces)
+
+(defface swiper-match-face-2
+  '((t :inherit isearch))
+  "Face for `swiper' matches modulo 1."
+  :group 'ivy-faces)
+
+(defface swiper-match-face-3
+  '((t :inherit match))
+  "Face for `swiper' matches modulo 2."
+  :group 'ivy-faces)
+
+(defface swiper-match-face-4
+  '((t :inherit isearch-fail))
+  "Face for `swiper' matches modulo 3."
+  :group 'ivy-faces)
+
+(defface swiper-background-match-face-1
+  '((t :inherit swiper-match-face-1))
+  "The background face for non-current `swiper' matches."
+  :group 'ivy-faces)
+
+(defface swiper-background-match-face-2
+  '((t :inherit swiper-match-face-2))
+  "Face for non-current `swiper' matches modulo 1."
+  :group 'ivy-faces)
+
+(defface swiper-background-match-face-3
+  '((t :inherit swiper-match-face-3))
+  "Face for non-current `swiper' matches modulo 2."
+  :group 'ivy-faces)
+
+(defface swiper-background-match-face-4
+  '((t :inherit swiper-match-face-4))
+  "Face for non-current `swiper' matches modulo 3."
+  :group 'ivy-faces)
+
+(defface swiper-line-face
+  '((t :inherit highlight))
+  "Face for current `swiper' line."
+  :group 'ivy-faces)
+
+(defcustom swiper-faces '(swiper-match-face-1
+                          swiper-match-face-2
+                          swiper-match-face-3
+                          swiper-match-face-4)
+  "List of `swiper' faces for group matches."
+  :group 'ivy-faces
+  :type '(repeat face))
+
+(defvar swiper-background-faces
+  '(swiper-background-match-face-1
+    swiper-background-match-face-2
+    swiper-background-match-face-3
+    swiper-background-match-face-4)
+  "Like `swiper-faces', but used for all matches except the current one.")
+
+(defun swiper--recompute-background-faces ()
+  (let ((faces '(swiper-background-match-face-1
+                 swiper-background-match-face-2
+                 swiper-background-match-face-3
+                 swiper-background-match-face-4))
+        (colir-compose-method #'colir-compose-soft-light))
+    (cl-mapc (lambda (f1 f2)
+               (let* ((bg (face-background f1))
+                      ;; FIXME: (colir-color-parse "color-22") is nil.
+                      (bg (and bg (colir-color-parse bg))))
+                 (when bg
+                   (setq bg (colir-blend bg (colir-color-parse "#ffffff")))
+                   (set-face-background f2 bg))))
+             swiper-faces
+             faces)))
+(swiper--recompute-background-faces)
+
+(defcustom swiper-min-highlight 2
+  "Only highlight matches for regexps at least this long."
+  :type 'integer)
+
+(defcustom swiper-include-line-number-in-search nil
+  "Include line number in text of search candidates."
+  :type 'boolean
+  :group 'swiper)
+
+(defcustom swiper-goto-start-of-match nil
+  "When non-nil, go to the start of the match, not its end.
+Treated as non-nil when searching backwards."
+  :type 'boolean
+  :group 'swiper)
+
+(defun swiper-C-s (&optional arg)
+  "Move cursor vertically down ARG candidates.
+If the input is empty, select the previous history element instead."
+  (interactive "p")
+  (if (string= ivy-text "")
+      (ivy-previous-history-element 1)
+    (ivy-next-line arg)))
+(ivy--no-M-x #'swiper-C-s #'ivy--minibuffer-p)
+
+(defvar swiper-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "C-s") #'swiper-C-s)
+    (define-key map (kbd "M-q") #'swiper-query-replace)
+    (define-key map (kbd "C-l") #'swiper-recenter-top-bottom)
+    (define-key map (kbd "C-'") #'swiper-avy)
+    (define-key map [remap ivy-avy] #'swiper-avy)
+    (define-key map (kbd "C-7") #'swiper-mc)
+    (define-key map (kbd "C-c C-f") #'swiper-toggle-face-matching)
+    map)
+  "Keymap for `swiper'.")
+
+(defvar swiper--query-replace-overlays nil)
+
+(defun swiper--query-replace-updatefn ()
+  (let ((lisp (ignore-errors (nth 2 (query-replace-compile-replacement ivy-text t)))))
+    (dolist (ov swiper--query-replace-overlays)
+      (overlay-put
+       ov 'after-string
+       (propertize
+        (condition-case nil
+            (with-current-buffer (overlay-buffer ov)
+              (set-match-data (overlay-get ov 'md))
+              (if (consp lisp)
+                  (eval lisp)
+                (match-substitute-replacement ivy-text)))
+          (error ivy-text))
+        'face 'error)))))
+
+(defun swiper--query-replace-cleanup ()
+  (while swiper--query-replace-overlays
+    (delete-overlay (pop swiper--query-replace-overlays))))
+
+(defun swiper--query-replace-setup ()
+  (with-ivy-window
+    (let ((end (window-end (selected-window) t))
+          (re (ivy-re-to-str ivy-regex)))
+      (save-excursion
+        (beginning-of-line)
+        (while (re-search-forward re end t)
+          (let ((ov (make-overlay (1- (match-end 0)) (match-end 0)))
+                (md (match-data t)))
+            (overlay-put
+             ov 'matches
+             (mapcar
+              (lambda (x)
+                (list `(match-string ,x) (match-string x)))
+              (number-sequence 0 (1- (/ (length md) 2)))))
+            (overlay-put ov 'md md)
+            (push ov swiper--query-replace-overlays))
+          (unless (> (match-end 0) (match-beginning 0))
+            (forward-char)))))))
+
+(defun swiper-query-replace ()
+  "Start `query-replace' with string to replace from last search string."
+  (interactive)
+  (cond ((null (window-minibuffer-p))
+         (user-error "Should only be called in the minibuffer through `swiper-map'"))
+        ((string= "" ivy-text)
+         (user-error "Empty input"))
+        (t
+         (swiper--query-replace-setup)
+         (unwind-protect
+              (let* ((enable-recursive-minibuffers t)
+                     (from (ivy-re-to-str ivy-regex))
+                     (groups (number-sequence 1 ivy--subexps))
+                     (default
+                      (list
+                       (mapconcat (lambda (i) (format "\\%d" i)) groups " ")
+                       (format "\\,(concat %s)"
+                               (if (<= ivy--subexps 1)
+                                   "\\&"
+                                 (mapconcat
+                                  (lambda (i) (format "\\%d" i))
+                                  groups
+                                  " \" \" ")))))
+                     (to
+                      (query-replace-compile-replacement
+                       (ivy-read
+                        (format "Query replace %s with: " from) nil
+                        :def default
+                        :caller 'swiper-query-replace)
+                       t)))
+                (swiper--cleanup)
+                (ivy-exit-with-action
+                 (lambda (_)
+                   (with-ivy-window
+                     (move-beginning-of-line 1)
+                     (let ((inhibit-read-only t))
+                       (perform-replace from to
+                                        t t nil))))))
+           (swiper--query-replace-cleanup)))))
+(ivy--no-M-x #'swiper-query-replace #'ivy--minibuffer-p)
+
+(ivy-configure 'swiper-query-replace
+  :update-fn #'swiper--query-replace-updatefn)
+
+(defvar inhibit-message)
+
+(defun swiper-all-query-replace ()
+  "Start `query-replace' with string to replace from last search string."
+  (interactive)
+  (if (null (window-minibuffer-p))
+      (user-error
+       "Should only be called in the minibuffer through `swiper-all-map'")
+    (let* ((enable-recursive-minibuffers t)
+           (from (ivy--regex ivy-text))
+           (to (query-replace-read-to from "Query replace" t)))
+      (swiper--cleanup)
+      (ivy-exit-with-action
+       (lambda (_)
+         (let ((wnd-conf (current-window-configuration))
+               (inhibit-message t))
+           (unwind-protect
+                (dolist (cand ivy--old-cands)
+                  (let ((buffer (get-text-property 0 'buffer cand)))
+                    (switch-to-buffer buffer)
+                    (goto-char (point-min))
+                    (perform-replace from to t t nil)))
+             (set-window-configuration wnd-conf))))))))
+(ivy--no-M-x #'swiper-all-query-replace #'ivy--minibuffer-p)
+
+(defvar avy-all-windows)
+(defvar avy-style)
+(defvar avy-keys)
+(declare-function avy--overlay-post "ext:avy")
+(declare-function avy-action-goto "ext:avy")
+(declare-function avy-candidate-beg "ext:avy")
+(declare-function avy--done "ext:avy")
+(declare-function avy--make-backgrounds "ext:avy")
+(declare-function avy-window-list "ext:avy")
+(declare-function avy-read "ext:avy")
+(declare-function avy-read-de-bruijn "ext:avy")
+(declare-function avy-tree "ext:avy")
+(declare-function avy-push-mark "ext:avy")
+(declare-function avy--remove-leading-chars "ext:avy")
+
+(defun swiper--avy-candidates ()
+  (let* ((visible-overlays
+          (with-ivy-window (overlays-in (window-start) (window-end))))
+         ;; We'll have overlapping overlays, so we sort all the
+         ;; overlays in the visible region by their start, and then
+         ;; throw out non-Swiper overlays or overlapping Swiper
+         ;; overlays.
+         (visible-overlays
+          (static-if (bound-and-true-p ivy--new-sort-p)
+              (sort visible-overlays :key #'overlay-start :in-place t)
+            (cl-sort visible-overlays #'< :key #'overlay-start)))
+         (min-overlay-start 0)
+         (overlays-for-avy
+          (cl-delete-if-not
+           (lambda (ov)
+             (when (and (>= (overlay-start ov)
+                            min-overlay-start)
+                        (memq (overlay-get ov 'face)
+                              (append swiper-faces swiper-background-faces)))
+               (setq min-overlay-start (overlay-start ov))))
+           visible-overlays))
+         (offset (if (eq (ivy-state-caller ivy-last) 'swiper) 1 0)))
+    (nconc
+     (mapcar (lambda (ov)
+               (cons (overlay-start ov)
+                     (overlay-get ov 'window)))
+             overlays-for-avy)
+     (save-excursion
+       (save-restriction
+         (narrow-to-region (window-start) (window-end))
+         (goto-char (point-min))
+         (forward-line)
+         (let ((win (selected-window))
+               cands)
+           (while (not (eobp))
+             (push (cons (+ (point) offset) win)
+                   cands)
+             (forward-line))
+           cands))))))
+
+(defun swiper--avy-candidate ()
+  (let ((candidates (swiper--avy-candidates))
+        (avy-all-windows nil))
+    (unwind-protect
+         (prog2
+             (avy--make-backgrounds
+              (append (avy-window-list)
+                      (list (ivy-state-window ivy-last))))
+             (if (eq avy-style 'de-bruijn)
+                 (avy-read-de-bruijn candidates avy-keys)
+               (avy-read (avy-tree candidates avy-keys)
+                         #'avy--overlay-post
+                         #'avy--remove-leading-chars))
+           (avy-push-mark))
+      (avy--done))))
+
+(defun swiper--avy-index (pos)
+  "Return `ivy--index' for `avy' candidate at minibuffer POS."
+  ;; Position in original buffer.
+  (let ((opos (get-text-property pos 'point)))
+    (or
+     ;; Find `swiper-isearch' index based on buffer position.
+     (and opos (cl-position opos ivy--all-candidates))
+     ;; Find `swiper' index based on line number.
+     (let ((nlines (count-lines (point-min) (point-max))))
+       (+ (car (ivy--minibuffer-index-bounds
+                ivy--index ivy--length ivy-height))
+          (line-number-at-pos pos)
+          (if (or (= nlines (1+ ivy-height))
+                  (< ivy--length ivy-height))
+              0
+            (- ivy-height nlines))
+          -2)))))
+
+(defun swiper--avy-goto (candidate)
+  (cond ((let ((win (cdr-safe candidate)))
+           (and win (window-minibuffer-p win)))
+         (setq ivy--index (swiper--avy-index (car candidate)))
+         (ivy--exhibit)
+         (ivy-done)
+         (ivy-call))
+        ((or (consp candidate)
+             (number-or-marker-p candidate))
+         (ivy-quit-and-run
+           (avy-action-goto (avy-candidate-beg candidate))))))
+
+;;;###autoload
+(defun swiper-avy ()
+  "Jump to one of the current swiper candidates with `avy'."
+  (interactive)
+  (unless (require 'avy nil 'noerror)
+    (user-error "Package avy isn't installed"))
+  (cl-case (length ivy-text)
+    (0
+     (user-error "Need at least one char of input"))
+    (1
+     ;; FIXME: `swiper--update-input-ivy' expects string candidates,
+     ;; but `swiper-isearch' now uses buffer positions.
+     (when (stringp (ivy-state-current ivy-last))
+       (let ((swiper-min-highlight 1))
+         (swiper--update-input-ivy)))))
+  (swiper--avy-goto (swiper--avy-candidate)))
+(ivy--no-M-x #'swiper-avy #'ivy--minibuffer-p)
+
+(declare-function mc/create-fake-cursor-at-point "ext:multiple-cursors-core")
+(declare-function multiple-cursors-mode "ext:multiple-cursors-core")
+
+(defun swiper-mc ()
+  "Create a fake cursor for each `swiper' candidate.
+Make sure `swiper-mc' is on `mc/cmds-to-run-once' list."
+  (interactive)
+  (unless (require 'multiple-cursors nil t)
+    (error "Multiple-cursors isn't installed"))
+  (unless (window-minibuffer-p)
+    (error "Call me only from `swiper'"))
+  (let ((cands (nreverse ivy--old-cands))
+        (action (ivy--get-action ivy-last)))
+    (unless (string= ivy-text "")
+      (ivy-exit-with-action
+       (lambda (_)
+         (let (cand)
+           (while (setq cand (pop cands))
+             (funcall action cand)
+             (when cands
+               (mc/create-fake-cursor-at-point))))
+         (multiple-cursors-mode 1))))))
+(ivy--no-M-x #'swiper-mc #'ivy--minibuffer-p)
+
+(defvar swiper--current-window-start nil
+  "Store `window-start' to restore it later.
+This prevents a \"jumping\" behavior which occurs when variables
+such as `scroll-conservatively' are set to a high value.")
+
+(defun swiper-recenter-top-bottom (&optional arg)
+  "Call (`recenter-top-bottom' ARG)."
+  (interactive "P")
+  (with-ivy-window
+    (recenter-top-bottom arg)
+    (setq swiper--current-window-start (window-start))))
+(ivy--no-M-x #'swiper-recenter-top-bottom #'ivy--minibuffer-p t)
+
+(defvar swiper-font-lock-exclude
+  '(Man-mode
+    adoc-mode
+    bbdb-mode
+    bongo-library-mode
+    bongo-mode
+    bongo-playlist-mode
+    bookmark-bmenu-mode
+    circe-channel-mode
+    circe-query-mode
+    circe-server-mode
+    deadgrep-mode
+    debbugs-gnu-mode
+    dired-mode
+    elfeed-search-mode
+    elfeed-show-mode
+    emms-playlist-mode
+    emms-stream-mode
+    erc-mode
+    eshell-mode
+    eww-mode
+    forth-block-mode
+    forth-mode
+    fundamental-mode
+    gnus-article-mode
+    gnus-group-mode
+    gnus-summary-mode
+    help-mode
+    helpful-mode
+    jabber-chat-mode
+    magit-popup-mode
+    matrix-client-mode
+    matrix-client-room-list-mode
+    mu4e-headers-mode
+    mu4e-view-mode
+    nix-mode
+    notmuch-search-mode
+    notmuch-tree-mode
+    occur-edit-mode
+    occur-mode
+    org-agenda-mode
+    package-menu-mode
+    rcirc-mode
+    sauron-mode
+    sieve-mode
+    treemacs-mode
+    twittering-mode
+    vc-dir-mode
+    w3m-mode
+    woman-mode
+    xref--xref-buffer-mode)
+  "List of major-modes that are incompatible with `font-lock-ensure'.")
+
+(defun swiper-font-lock-ensure-p ()
+  "Return non-nil if we should not `font-lock-ensure'."
+  (or (derived-mode-p 'magit-mode)
+      (bound-and-true-p magit-blame-mode)
+      (memq major-mode swiper-font-lock-exclude)
+      (not (derived-mode-p 'prog-mode))))
+
+(defun swiper-font-lock-ensure ()
+  "Ensure the entire buffer is highlighted."
+  (unless (or (swiper-font-lock-ensure-p)
+              (> (buffer-size) 100000)
+              (not font-lock-mode))
+    (static-if (fboundp 'font-lock-ensure)
+        ;; Added in Emacs 25.1.
+        (font-lock-ensure)
+      (font-lock-fontify-buffer))))
+
+(defvar swiper--format-spec ""
+  "Store the current candidates format spec.")
+
+(defvar swiper--width nil
+  "Store the number of digits needed for the longest line number.")
+
+(defvar swiper-use-visual-line nil
+  "When non-nil, use `line-move' instead of `forward-line'.")
+
+(defvar dired-isearch-filenames)
+(declare-function dired-move-to-filename "dired")
+
+(defun swiper--line ()
+  (let* ((beg (cond ((and (eq major-mode 'dired-mode)
+                          (bound-and-true-p dired-isearch-filenames))
+                     (dired-move-to-filename)
+                     (point))
+                    (swiper-use-visual-line
+                     (save-excursion
+                       (beginning-of-visual-line)
+                       (point)))
+                    (t
+                     (point))))
+         (end (if swiper-use-visual-line
+                  (save-excursion
+                    (end-of-visual-line)
+                    (point))
+                (line-end-position))))
+
+    (concat
+     " "
+     (buffer-substring beg end))))
+
+(defvar swiper-use-visual-line-p
+  (lambda (n-lines)
+    (and visual-line-mode
+         ;; super-slow otherwise
+         (< (buffer-size) 20000)
+         (< n-lines 400)))
+  "A predicate that decides whether `line-move' or `forward-line' is used.
+Note that `line-move' can be very slow.")
+
+(defun swiper--candidates (&optional numbers-width)
+  "Return a list of this buffer lines.
+
+NUMBERS-WIDTH, when specified, is used for width spec of line
+numbers; replaces calculating the width from buffer line count."
+  (let* ((inhibit-field-text-motion t)
+         (n-lines (count-lines (point-min) (point-max))))
+    (if (funcall swiper-use-visual-line-p n-lines)
+        (progn
+          (when (eq major-mode 'org-mode)
+            (require 'outline)
+            (if (fboundp 'outline-show-all)
+                ;; Added in Emacs 25.1.
+                (outline-show-all)
+              (with-no-warnings
+                (show-all))))
+          (setq swiper-use-visual-line t))
+      (setq swiper-use-visual-line nil))
+    (unless (zerop n-lines)
+      (setq swiper--width (or numbers-width
+                              (1+ (floor (log n-lines 10)))))
+      (setq swiper--format-spec
+            (format "%%-%dd " swiper--width))
+      (let ((line-number 1)
+            (advancer (if swiper-use-visual-line
+                          (lambda (arg) (line-move arg t))
+                        #'forward-line))
+            candidates)
+        (save-excursion
+          (goto-char (point-min))
+          (swiper-font-lock-ensure)
+          (while (< (point) (point-max))
+            (when (swiper-match-usable-p)
+              (let ((str (swiper--line)))
+                (setq str (ivy-cleanup-string str))
+                (let ((line-number-str
+                       (format swiper--format-spec line-number)))
+                  (if swiper-include-line-number-in-search
+                      (setq str (concat line-number-str str))
+                    (put-text-property
+                     0 1 'display line-number-str str))
+                  (put-text-property
+                   0 1 'swiper-line-number line-number str))
+                (push str candidates)))
+            (funcall advancer 1)
+            (cl-incf line-number))
+          (nreverse candidates))))))
+
+(defvar swiper--opoint nil
+  "Value of point when `swiper' or `swiper-isearch' starts.")
+
+;;;###autoload
+(defun swiper-backward (&optional initial-input)
+  "`isearch-backward' with an overview.
+When non-nil, INITIAL-INPUT is the initial search pattern."
+  (interactive)
+  (let ((ivy-index-functions-alist
+         '((swiper . ivy-recompute-index-swiper-backward))))
+    (swiper initial-input)))
+
+;;;###autoload
+(defun swiper-thing-at-point ()
+  "`swiper' with `ivy-thing-at-point'."
+  (interactive)
+  (let ((thing (ivy-thing-at-point)))
+    (when (use-region-p)
+      (deactivate-mark))
+    (swiper (regexp-quote thing))))
+
+;;;###autoload
+(defun swiper-all-thing-at-point ()
+  "`swiper-all' with `ivy-thing-at-point'."
+  (interactive)
+  (let ((thing (ivy-thing-at-point)))
+    (when (use-region-p)
+      (deactivate-mark))
+    (swiper-all (regexp-quote thing))))
+
+(defun swiper--extract-matches (regex cands)
+  "Extract captured REGEX groups from CANDS."
+  (let (res)
+    (dolist (cand cands)
+      (setq cand (substring cand 1))
+      (when (string-match regex cand)
+        (push (mapconcat (lambda (n) (match-string-no-properties n cand))
+                         (number-sequence
+                          1
+                          (/ (- (length (match-data)) 2) 2))
+                         " ")
+              res)))
+    (nreverse res)))
+
+(defun swiper--occur-cands (fname cands)
+  (when cands
+    (with-current-buffer (ivy-state-buffer ivy-last)
+      (when (eq (ivy-state-caller ivy-last) 'swiper-isearch)
+        (setq cands (mapcar #'swiper--line-at-point cands)))
+      (let* ((pt-min (point-min))
+             (line-delta
+              (save-restriction
+                (widen)
+                (1- (line-number-at-pos pt-min))))
+             (lines
+              (if (eq (ivy-state-caller ivy-last) 'swiper-isearch)
+                  (swiper--isearch-occur-cands cands)
+                (mapcar (lambda (s)
+                          (let ((n (swiper--line-number s)))
+                            (setq s (substring s 1))
+                            (add-text-properties 0 1 (list 'swiper-line-number n) s)
+                            (cons n s)))
+                        cands)))
+             (offset (+ (length fname) 2)))
+        (mapcar (lambda (x)
+                  (let ((nn (number-to-string
+                             (+ (car x) line-delta))))
+                    (remove-text-properties 0 1 '(display) (cdr x))
+                    (put-text-property 0 (length nn) 'face 'ivy-grep-line-number nn)
+                    (put-text-property 0 1 'offset (+ offset (length nn)) fname)
+                    (format "%s:%s:%s" fname nn (cdr x))))
+                lines)))))
+
+(defun swiper--isearch-occur-cands (cands)
+  (let* ((last-pt (get-text-property 0 'point (car cands)))
+         (line (1+ (line-number-at-pos last-pt)))
+         res pt)
+    (dolist (cand cands)
+      (setq pt (get-text-property 0 'point cand))
+      (cl-incf line (1- (count-lines last-pt pt)))
+      (push (cons line cand) res)
+      (setq last-pt pt))
+    (nreverse res)))
+
+(defun swiper--occur-insert-lines (cands)
+  (let ((inhibit-read-only t))
+    ;; Need precise number of header lines for `wgrep' to work.
+    (insert (format "-*- mode:grep; default-directory: %S -*-\n\n\n"
+                    default-directory))
+    (insert (format "%d candidates:\n" (length cands)))
+    (ivy--occur-insert-lines cands)
+    (goto-char (point-min))
+    (forward-line 4)))
+
+(defun swiper--occur-buffer ()
+  (let ((buffer (ivy-state-buffer ivy-last)))
+    (unless (buffer-live-p buffer)
+      (setq buffer
+            (setf (ivy-state-buffer ivy-last)
+                  (find-file-noselect
+                   (plist-get (ivy-state-extra-props ivy-last) :fname))))
+      (save-selected-window
+        (pop-to-buffer buffer))
+      (setf (ivy-state-window ivy-last) (selected-window)))
+    buffer))
+
+(defun swiper-occur (&optional cands)
+  "Generate a custom occur buffer for `swiper'.
+When capture groups are present in the input, print them instead of lines."
+  (setq cands (or ivy-marked-candidates cands))
+  (let* ((buffer (swiper--occur-buffer))
+         (fname (propertize
+                 (with-ivy-window
+                   (if (buffer-file-name buffer)
+                       (file-name-nondirectory
+                        (buffer-file-name buffer))
+                     (buffer-name buffer)))
+                 'face
+                 'ivy-grep-info))
+         (re
+          (progn
+            (string-match "\"\\(.*\\)\"" (buffer-name))
+            (ivy-set-text (match-string 1 (buffer-name)))
+            (mapconcat #'identity (ivy--split ivy-text) ".*?")))
+         (cands
+          (swiper--occur-cands
+           fname
+           (or cands
+               (save-window-excursion
+                 (switch-to-buffer buffer)
+                 (if (eq (ivy-state-caller ivy-last) 'swiper)
+                     (let ((ivy--regex-function 'swiper--re-builder))
+                       (setq ivy--old-re nil)
+                       (ivy--filter re (swiper--candidates)))
+                   (swiper-isearch-function ivy-text)))))))
+    (if (string-match-p "\\\\(" re)
+        (insert
+         (mapconcat #'identity
+                    (swiper--extract-matches
+                     re (with-current-buffer buffer
+                          (swiper--candidates)))
+                    "\n"))
+      (unless (eq major-mode 'ivy-occur-grep-mode)
+        (ivy-occur-grep-mode)
+        (font-lock-mode -1))
+      (swiper--occur-insert-lines
+       (mapcar (lambda (cand) (concat "./" cand)) cands)))))
+
+(declare-function evil-set-jump "ext:evil-jumps")
+
+(defvar swiper--current-line nil)
+(defvar swiper--current-match-start nil)
+(defvar swiper--point-min nil)
+(defvar swiper--point-max nil)
+(defvar swiper--reveal-mode nil)
+
+(defun swiper--init ()
+  "Perform initialization common to both completion methods."
+  (setq swiper--current-line nil)
+  (setq swiper--current-match-start nil)
+  (setq swiper--current-window-start nil)
+  (setq swiper--opoint (point))
+  (setq swiper--point-min (point-min))
+  (setq swiper--point-max (point-max))
+  (when (setq swiper--reveal-mode
+              (bound-and-true-p reveal-mode))
+    (reveal-mode -1))
+  (lazy-highlight-cleanup t)
+  (setq isearch-opened-overlays nil)
+  (when (bound-and-true-p evil-mode)
+    (evil-set-jump)))
+
+(defun swiper--normalize-regex (re)
+  "Normalize the Swiper regexp RE.
+Add a space after a leading `^' for `swiper', and apply
+`search-default-mode' if bound in the original buffer."
+  (replace-regexp-in-string
+   "^\\(?:\\\\(\\)?\\^"
+   (concat "\\&" (if (eq 'swiper (ivy-state-caller ivy-last)) " " ""))
+   (let ((mode (with-ivy-window (bound-and-true-p search-default-mode))))
+     (if (functionp mode)
+         (mapconcat
+          (lambda (x)
+            (if (string-match-p "\\`[^$\\^]+\\'" x)
+                (funcall mode x)
+              x))
+          (split-string re "\\b") "")
+       re))
+   t))
+
+(defun swiper--re-builder (str)
+  "Transform STR into a swiper regex.
+This is the regex used in the minibuffer where candidates have
+line numbers.  For the buffer, use `ivy--regex' instead."
+  (let* ((re-builder (ivy-alist-setting ivy-re-builders-alist))
+         (str (ivy--string-replace "\\n" "\n" str))
+         (re (funcall re-builder str)))
+    (if (consp re)
+        (mapcar
+         (lambda (x)
+           (cons (swiper--normalize-regex (car x))
+                 (cdr x)))
+         re)
+      (swiper--normalize-regex re))))
+
+(defvar swiper-history nil
+  "History for `swiper'.")
+
+(defvar swiper-invocation-face nil
+  "The face at the point of invocation of `swiper'.")
+
+(defcustom swiper-stay-on-quit nil
+  "When non-nil don't go back to search start on abort."
+  :type 'boolean)
+
+;;;###autoload
+(defun swiper (&optional initial-input)
+  "`isearch-forward' with an overview.
+When non-nil, INITIAL-INPUT is the initial search pattern."
+  (interactive)
+  (let ((candidates (swiper--candidates)))
+    (swiper--init)
+    (setq swiper-invocation-face
+          (plist-get (text-properties-at (point)) 'face))
+    (let ((preselect
+           (if (or swiper-use-visual-line (null search-invisible))
+               (count-screen-lines
+                (point-min)
+                (save-excursion (beginning-of-visual-line) (point)))
+             (1- (line-number-at-pos))))
+          (minibuffer-allow-text-properties t)
+          res)
+      (unwind-protect
+           (and
+            (setq res
+                  (ivy-read
+                   "Swiper: "
+                   candidates
+                   :initial-input initial-input
+                   :keymap swiper-map
+                   :preselect
+                   (if initial-input
+                       (cl-position-if
+                        (lambda (x)
+                          (<= (1+ preselect) (swiper--line-number x)))
+                        (progn
+                          (setq ivy--old-re nil)
+                          (ivy--filter initial-input candidates)))
+                     preselect)
+                   :require-match t
+                   :action #'swiper--action
+                   :re-builder #'swiper--re-builder
+                   :history 'swiper-history
+                   :extra-props (list :fname (buffer-file-name))
+                   :caller 'swiper))
+            (point))
+        (unless (or res swiper-stay-on-quit)
+          (goto-char swiper--opoint))
+        (isearch-clean-overlays)
+        (unless (or res (string= ivy-text ""))
+          (cl-pushnew ivy-text swiper-history))
+        (setq swiper--current-window-start nil)
+        (when swiper--reveal-mode
+          (reveal-mode 1))))))
+
+(ivy-configure 'swiper
+  :occur #'swiper-occur
+  :update-fn #'swiper--update-input-ivy
+  :unwind-fn #'swiper--cleanup
+  :index-fn #'ivy-recompute-index-swiper)
+
+(ivy-add-actions 'swiper
+                 `(("w" ,#'swiper-action-copy "copy")))
+
+(defun swiper-toggle-face-matching ()
+  "Toggle matching only the candidates with `swiper-invocation-face'."
+  (interactive)
+  (setf (ivy-state-matcher ivy-last)
+        (if (ivy-state-matcher ivy-last)
+            nil
+          #'swiper--face-matcher))
+  (setq ivy--old-re nil))
+(ivy--no-M-x #'swiper-toggle-face-matching #'ivy--minibuffer-p)
+
+(defun swiper--face-matcher (regexp candidates)
+  "Return REGEXP matching CANDIDATES.
+Matched candidates should have `swiper-invocation-face'."
+  (cl-remove-if-not
+   (lambda (x)
+     (and (string-match regexp x)
+          (let* ((s (match-string 0 x))
+                 (n (length s))
+                 (i 0))
+            (while (and (< i n)
+                        (text-property-any
+                         i (1+ i)
+                         'face swiper-invocation-face
+                         s))
+              (cl-incf i))
+            (= i n))))
+   candidates))
+
+(defun swiper--ensure-visible ()
+  "Remove overlays hiding point."
+  (let ((overlays (overlays-at (1- (point))))
+        ov expose)
+    (while (setq ov (pop overlays))
+      (if (and (invisible-p (overlay-get ov 'invisible))
+               (setq expose (overlay-get ov 'isearch-open-invisible)))
+          (funcall expose ov)))))
+
+(defvar swiper--overlays nil
+  "Store overlays.")
+
+(defvar swiper--isearch-highlight-timer nil
+  "This timer used by `swiper--delayed-add-overlays'.")
+
+(defun swiper--cleanup ()
+  "Clean up the overlays."
+  (while swiper--overlays
+    (delete-overlay (pop swiper--overlays)))
+  ;; force cleanup unless it's :unwind
+  (lazy-highlight-cleanup
+   (if (eq ivy-exit 'done) lazy-highlight-cleanup t))
+  (when (timerp swiper--isearch-highlight-timer)
+    (cancel-timer swiper--isearch-highlight-timer)
+    (setq swiper--isearch-highlight-timer nil)))
+
+(defun swiper--add-cursor-overlay (wnd)
+  (let* ((special (or (eolp) (looking-at "\t")))
+         (ov (make-overlay (point) (if special (point) (1+ (point))))))
+    (if special
+        (overlay-put ov 'after-string (propertize " " 'face 'ivy-cursor))
+      (overlay-put ov 'face 'ivy-cursor))
+    (overlay-put ov 'window wnd)
+    (overlay-put ov 'priority 2)
+    (push ov swiper--overlays)))
+
+(defun swiper--add-line-overlay (wnd)
+  (let ((beg (if visual-line-mode
+                 (save-excursion
+                   (beginning-of-visual-line)
+                   (point))
+               (line-beginning-position)))
+        (end (if visual-line-mode
+                 (save-excursion
+                   (end-of-visual-line)
+                   (point))
+               (1+ (line-end-position)))))
+    (push (swiper--make-overlay beg end 'swiper-line-face wnd 0)
+          swiper--overlays)))
+
+(defun swiper--make-overlay (beg end face wnd priority)
+  "Create an overlay bound by BEG and END.
+FACE, WND and PRIORITY are properties corresponding to
+the face, window and priority of the overlay."
+  (let ((overlay (make-overlay beg end)))
+    (overlay-put overlay 'face face)
+    (overlay-put overlay 'window wnd)
+    (overlay-put overlay 'priority priority)
+    overlay))
+
+(defun swiper--recenter-p ()
+  (or (display-graphic-p)
+      (not recenter-redisplay)))
+
+(defun swiper--update-input-ivy ()
+  "Called when `ivy' input is updated."
+  (with-ivy-window
+    (swiper--cleanup)
+    (when (> (length (ivy-state-current ivy-last)) 0)
+      (let ((regexps (ivy--positive-regexps))
+            (re-idx -1)
+            (case-fold-search (ivy--case-fold-p ivy-text)))
+        (dolist (re regexps)
+          (setq re-idx (1+ re-idx))
+          (let* ((re (ivy--string-replace "    " "\t" re))
+                 (num (swiper--line-number (ivy-state-current ivy-last))))
+            (unless (memq this-command '(ivy-yank-word
+                                         ivy-yank-symbol
+                                         ivy-yank-char
+                                         scroll-other-window))
+              (when (cl-plusp num)
+                (unless (if swiper--current-line
+                            (eq swiper--current-line num)
+                          (eq (line-number-at-pos) num))
+                  (goto-char swiper--point-min)
+                  (if swiper-use-visual-line
+                      (line-move (1- num))
+                    (forward-line (1- num))))
+                (if (and (equal ivy-text "")
+                         (<= (line-beginning-position)
+                             swiper--opoint
+                             (line-end-position)))
+                    (goto-char swiper--opoint)
+                  (if (eq swiper--current-line num)
+                      (when swiper--current-match-start
+                        (goto-char swiper--current-match-start))
+                    (setq swiper--current-line num))
+                  (when (re-search-forward re (line-end-position) t)
+                    (setq swiper--current-match-start (match-beginning 0))))
+                (funcall isearch-filter-predicate
+                         (line-beginning-position)
+                         (line-end-position))
+                (swiper--maybe-recenter)))
+            (swiper--add-overlays
+             re
+             (max
+              (if (swiper--recenter-p)
+                  (window-start)
+                (line-beginning-position (- (window-height))))
+              swiper--point-min)
+             (min
+              (if (swiper--recenter-p)
+                  (window-end (selected-window) t)
+                (line-end-position (window-height)))
+              swiper--point-max)
+             nil
+             re-idx)))))))
+
+(defun swiper--add-overlays (re &optional beg end wnd re-idx)
+  "Add overlays for RE regexp in visible part of the current buffer.
+BEG and END, when specified, are the point bounds.
+WND, when specified is the window."
+  (setq wnd (or wnd (ivy-state-window ivy-last)))
+  (swiper--add-line-overlay wnd)
+  (let* ((pt (point))
+         (wh (window-height))
+         (beg (or beg (save-excursion
+                        (forward-line (- wh))
+                        (point))))
+         (end (or end (save-excursion
+                        (forward-line wh)
+                        (point))))
+         (case-fold-search (ivy--case-fold-p re)))
+    (when (>= (length re) swiper-min-highlight)
+      (save-excursion
+        (goto-char beg)
+        ;; RE can become an invalid regexp
+        (while (progn
+                 (when (eolp)
+                   (unless (eobp)
+                     (forward-char)))
+                 (and (ignore-errors (re-search-forward re end t))
+                      (> (- (match-end 0) (match-beginning 0)) 0)))
+          ;; Don't highlight a match if it spans multiple
+          ;; lines. `count-lines' returns 1 if the match is within a
+          ;; single line, even if it includes the newline, and 2 or
+          ;; greater otherwise. We hope that the inclusion of the
+          ;; newline will not ever be a problem in practice.
+          (when (< (count-lines (match-beginning 0) (match-end 0)) 2)
+            (let* ((faces (if (= (match-end 0) pt)
+                              swiper-faces
+                            swiper-background-faces))
+                   (adder-fn (lambda (beg end face priority)
+                               (push (swiper--make-overlay beg end face wnd priority)
+                                     isearch-lazy-highlight-overlays))))
+              (unless (and (consp ivy--old-re)
+                           (null
+                            (save-match-data
+                              (ivy--re-filter ivy--old-re
+                                              (list
+                                               (buffer-substring-no-properties
+                                                (line-beginning-position)
+                                                (line-end-position)))))))
+                (swiper--add-properties faces adder-fn re-idx)))))))))
+
+(defun swiper--add-properties (faces adder-fn &optional re-idx)
+  (let ((mb (match-beginning 0))
+        (me (match-end 0)))
+    (unless (> (- me mb) 2017)
+      (funcall adder-fn
+               mb me
+               (if (and ivy-use-group-face-if-no-groups (zerop ivy--subexps))
+                   (nth (1+ (mod (or re-idx 0) (1- (length faces)))) faces)
+                 (car faces))
+               0)))
+  (let ((i 1)
+        (j 0))
+    (while (<= (cl-incf j) ivy--subexps)
+      (let ((bm (match-beginning j))
+            (em (match-end j)))
+        (when (and (integerp em)
+                   (integerp bm))
+          (when (eq (ivy-alist-setting ivy-re-builders-alist t) #'ivy--regex-fuzzy)
+            (while (and (< j ivy--subexps)
+                        (integerp (match-beginning (+ j 1)))
+                        (= em (match-beginning (+ j 1))))
+              (setq em (match-end (cl-incf j)))))
+          (funcall adder-fn
+                   bm em
+                   (nth (1+ (mod (+ i 2) (1- (length faces))))
+                        faces)
+                   i)
+          (cl-incf i))))))
+
+(defcustom swiper-action-recenter nil
+  "When non-nil, recenter after exiting `swiper'."
+  :type 'boolean)
+(defvar evil-search-module)
+(defvar evil-ex-search-pattern)
+(defvar evil-ex-search-persistent-highlight)
+(defvar evil-ex-search-direction)
+(declare-function evil-ex-search-activate-highlight "ext:evil-search")
+
+(defun swiper--maybe-recenter ()
+  (cond (swiper-action-recenter
+         (recenter))
+        ((swiper--recenter-p)
+         (when swiper--current-window-start
+           (set-window-start (selected-window) swiper--current-window-start))
+         (when (or
+                (< (point) (window-start))
+                (> (point) (window-end (ivy-state-window ivy-last) t)))
+           (recenter))))
+  (setq swiper--current-window-start (window-start)))
+
+(defun swiper--line-number (x)
+  (or (get-text-property 0 'swiper-line-number x)
+      (get-text-property 1 'swiper-line-number x)))
+
+(defcustom swiper-verbose t
+  "When non-nil, print more informational messages."
+  :type 'boolean)
+
+(defun swiper--push-mark ()
+  (when (/= (point) swiper--opoint)
+    (unless (and transient-mark-mode mark-active)
+      (when (eq ivy-exit 'done)
+        (push-mark swiper--opoint t)
+        (when swiper-verbose
+          (message "Mark saved where search started"))))))
+
+(defun swiper--action (x)
+  "Goto line X."
+  (let ((ln (1- (swiper--line-number x)))
+        (re (ivy--regex ivy-text))
+        (case-fold-search (ivy--case-fold-p ivy-text)))
+    (if (null x)
+        (user-error "No candidates")
+      (with-ivy-window
+        (unless (equal (current-buffer)
+                       (ivy-state-buffer ivy-last))
+          (switch-to-buffer (ivy-state-buffer ivy-last)))
+        (goto-char
+         (if (buffer-narrowed-p)
+             swiper--point-min
+           (point-min)))
+        (funcall (if swiper-use-visual-line
+                     #'line-move
+                   #'forward-line)
+                 ln)
+        (when (and (re-search-forward re (line-end-position) t)
+                   swiper-goto-start-of-match)
+          (goto-char (match-beginning 0)))
+        (swiper--ensure-visible)
+        (swiper--maybe-recenter)
+        (swiper--push-mark)
+        (swiper--remember-search-history re)))))
+
+(defun swiper--remember-search-history (re)
+  "Add the search pattern RE to the search history ring."
+  (add-to-history
+   'regexp-search-ring
+   re
+   regexp-search-ring-max)
+  ;; integration with evil-mode's search
+  (when (bound-and-true-p evil-mode)
+    (when (eq evil-search-module 'isearch)
+      (setq isearch-string ivy-text))
+    (when (eq evil-search-module 'evil-search)
+      (add-to-history 'evil-ex-search-history re)
+      (setq evil-ex-search-pattern (list re t t))
+      (setq evil-ex-search-direction 'forward)
+      (when evil-ex-search-persistent-highlight
+        (evil-ex-search-activate-highlight evil-ex-search-pattern)))))
+
+(defun swiper-from-isearch ()
+  "Invoke `swiper' from isearch."
+  (interactive)
+  (swiper (prog1 (if isearch-regexp
+                     isearch-string
+                   (regexp-quote isearch-string))
+            (let ((search-nonincremental-instead nil))
+              (isearch-exit)))))
+
+(defvar swiper-multi-buffers nil
+  "Store the current list of buffers.")
+
+(defvar swiper-multi-candidates nil
+  "Store the list of candidates for `swiper-multi'.")
+
+(defun swiper-multi-prompt ()
+  "Return prompt for `swiper-multi'."
+  (format "Buffers (%s): "
+          (mapconcat #'identity swiper-multi-buffers ", ")))
+
+(defvar swiper-window-width 80)
+
+(defun swiper-multi ()
+  "Select one or more buffers.
+Run `swiper' for those buffers."
+  (interactive)
+  (setq swiper-multi-buffers nil)
+  (let ((ivy-use-virtual-buffers nil))
+    (ivy-read (swiper-multi-prompt)
+              #'internal-complete-buffer
+              :action #'swiper-multi-action-1))
+  (let ((swiper-window-width (- (- (frame-width) (if (display-graphic-p) 0 1)) 4)))
+    (ivy-read "Swiper: " swiper-multi-candidates
+              :action #'swiper-multi-action-2
+              :caller 'swiper-multi)))
+
+(ivy-configure 'swiper-multi
+  :unwind-fn #'swiper--cleanup
+  :index-fn #'ivy-recompute-index-swiper
+  :format-fn #'swiper--all-format-function)
+
+(defun swiper-multi-action-1 (x)
+  "Add X to list of selected buffers `swiper-multi-buffers'.
+If X is already part of the list, remove it instead.  Quit the selection if
+X is selected by either `ivy-done', `ivy-alt-done' or `ivy-immediate-done',
+otherwise continue prompting for buffers."
+  (if (member x swiper-multi-buffers)
+      (progn
+        (setq swiper-multi-buffers (delete x swiper-multi-buffers)))
+    (unless (equal x "")
+      (setq swiper-multi-buffers (append swiper-multi-buffers (list x)))))
+  (let ((prompt (swiper-multi-prompt)))
+    (setf (ivy-state-prompt ivy-last) prompt)
+    (setq ivy--prompt (concat "%-4d " prompt)))
+  (cond ((memq this-command '(ivy-done
+                              ivy-alt-done
+                              ivy-immediate-done))
+         (setq swiper-multi-candidates
+               (swiper--multi-candidates
+                (mapcar #'get-buffer swiper-multi-buffers))))
+        ((eq this-command 'ivy-call)
+         (with-selected-window (active-minibuffer-window)
+           (delete-minibuffer-contents)))))
+
+(defun swiper-multi-action-2 (x)
+  "Move to candidate X from `swiper-multi'."
+  (when (> (length x) 0)
+    (let ((buffer-name (get-text-property 0 'buffer x)))
+      (when buffer-name
+        (with-ivy-window
+          (switch-to-buffer buffer-name)
+          (goto-char (point-min))
+          (forward-line (1- (swiper--line-number x)))
+          (re-search-forward
+           (ivy--regex ivy-text)
+           (line-end-position) t)
+          (funcall isearch-filter-predicate
+                   (line-beginning-position)
+                   (line-end-position))
+          (unless (eq ivy-exit 'done)
+            (swiper--cleanup)
+            (swiper--add-overlays (ivy--regex ivy-text))))))))
+
+(defun swiper-all-buffer-p (buffer)
+  "Return non-nil if BUFFER should be considered by `swiper-all'."
+  (let ((mode (buffer-local-value 'major-mode (get-buffer buffer))))
+    (cond
+      ;; Ignore TAGS buffers, they tend to add duplicate results.
+      ((eq mode #'tags-table-mode) nil)
+      ;; Always consider dired buffers, even though they're not backed
+      ;; by a file.
+      ((eq mode #'dired-mode) t)
+      ;; Always consider stash buffers too, as they may have
+      ;; interesting content not present in any buffers. We don't #'
+      ;; quote to satisfy the byte-compiler.
+      ((eq mode 'magit-stash-mode) t)
+      ;; Email buffers have no file, but are useful to search
+      ((eq mode 'gnus-article-mode) t)
+      ;; Otherwise, only consider the file if it's backed by a file.
+      (t (buffer-file-name buffer)))))
+
+;;; `swiper-all'
+
+(defun swiper-all-function (str)
+  "Search in all open buffers for STR."
+  (or
+   (ivy-more-chars)
+   (let* ((buffers (cl-delete-if-not #'swiper-all-buffer-p (buffer-list)))
+          (re-full ivy-regex)
+          re re-tail
+          cands match
+          (case-fold-search (ivy--case-fold-p str)))
+     (setq re (ivy-re-to-str re-full))
+     (when (consp re-full)
+       (setq re-tail (cdr re-full)))
+     (dolist (buffer buffers)
+       (with-current-buffer buffer
+         (save-excursion
+           (goto-char (point-min))
+           (while (re-search-forward re nil t)
+             (setq match (if (memq major-mode '(org-mode dired-mode))
+                             (buffer-substring-no-properties
+                              (line-beginning-position)
+                              (line-end-position))
+                           (buffer-substring
+                            (line-beginning-position)
+                            (line-end-position))))
+             (put-text-property
+              0 1 'buffer
+              (buffer-name)
+              match)
+             (put-text-property 0 1 'point (point) match)
+             (when (or (null re-tail) (ivy-re-match re-tail match))
+               (push match cands))))))
+     (setq ivy--old-re re-full)
+     (if (null cands)
+         (list "")
+       (setq ivy--old-cands (nreverse cands))))))
+
+(defun swiper--all-format-function (cands)
+  "Format CANDS for `swiper-all'.
+See `ivy-format-functions-alist' for further information."
+  (let* ((ww swiper-window-width)
+         (col2 1)
+         (cands-with-buffer
+          (mapcar (lambda (s)
+                    (let ((buffer (get-text-property 0 'buffer s)))
+                      (setq col2 (max col2 (length buffer)))
+                      (cons s buffer))) cands))
+         (col1 (- ww 4 col2)))
+    (setq cands
+          (mapcar (lambda (x)
+                    (if (cdr x)
+                        (let ((s (ivy--truncate-string (car x) col1)))
+                          (concat
+                           s
+                           (make-string
+                            (max 0
+                                 (- ww (string-width s) (length (cdr x))))
+                            ?\ )
+                           (cdr x)))
+                      (car x)))
+                  cands-with-buffer))
+    (ivy--format-function-generic
+     (lambda (str)
+       (ivy--add-face str 'ivy-current-match))
+     (lambda (str)
+       str)
+     cands
+     "\n")))
+
+(defvar swiper-all-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "M-q") #'swiper-all-query-replace)
+    map)
+  "Keymap for `swiper-all'.")
+
+;;;###autoload
+(defun swiper-all (&optional initial-input)
+  "Run `swiper' for all open buffers."
+  (interactive)
+  (let ((swiper-window-width (- (frame-width) (if (display-graphic-p) 0 1))))
+    (ivy-read "swiper-all: " 'swiper-all-function
+              :action #'swiper-all-action
+              :dynamic-collection t
+              :keymap swiper-all-map
+              :initial-input initial-input
+              :caller 'swiper-all)))
+
+(ivy-configure 'swiper-all
+  :update-fn 'auto
+  :unwind-fn #'swiper--cleanup
+  :format-fn #'swiper--all-format-function)
+
+(defun swiper-all-action (x)
+  "Move to candidate X from `swiper-all'."
+  (when (> (length x) 0)
+    (let ((buffer-name (get-text-property 0 'buffer x)))
+      (when buffer-name
+        (with-ivy-window
+          (switch-to-buffer buffer-name)
+          (goto-char (get-text-property 0 'point x))
+          (funcall isearch-filter-predicate
+                   (line-beginning-position)
+                   (line-end-position))
+          (unless (eq ivy-exit 'done)
+            (swiper--cleanup)
+            (swiper--add-overlays (ivy--regex ivy-text))))))))
+
+(defun swiper--multi-candidates (buffers)
+  "Extract candidates from BUFFERS."
+  (let ((res nil))
+    (dolist (buf buffers)
+      (with-current-buffer buf
+        (setq res
+              (nconc
+               (mapcar
+                (lambda (s) (put-text-property 0 1 'buffer (buffer-name) s) s)
+                (swiper--candidates 4))
+               res))))
+    res))
+
+;;; `swiper-isearch'
+
+(defun swiper-isearch-function (str)
+  "Collect STR matches in the current buffer for `swiper-isearch'."
+  (with-ivy-window
+    (swiper--isearch-function str)))
+
+(defun swiper-match-usable-p ()
+  (or search-invisible
+      (cl-notany (lambda (ov)
+                   (invisible-p (overlay-get ov 'invisible)))
+                 (overlays-at (point)))))
+
+(defvar swiper--isearch-backward nil
+  "Non-nil when performing `swiper-isearch-backward'.")
+
+(defun swiper--isearch-function-1 (re backward)
+  (unless (string= re ".")
+    (let (cands)
+      (save-excursion
+        (goto-char (if backward (point-max) (point-min)))
+        (while (and (funcall (if backward #'re-search-backward #'re-search-forward) re nil t)
+                    (not (and
+                          (= (match-beginning 0) (match-end 0))
+                          (if backward (bobp) (eobp)))))
+          (when (swiper-match-usable-p)
+            (let ((pos (if (or backward swiper-goto-start-of-match)
+                           (match-beginning 0)
+                         (point))))
+              (push pos cands)))
+          (when (= (match-beginning 0) (match-end 0))
+            (if backward
+                (backward-char)
+              (forward-char)))))
+      (if backward
+          cands
+        (nreverse cands)))))
+
+(defun swiper--isearch-next-item (re cands)
+  (or (if swiper--isearch-backward
+          (save-excursion
+            ;; Match RE starting at each position in CANDS.
+            (setq re (concat "\\=\\(?:" re "\\)"))
+            (cl-position-if
+             (lambda (x)
+               (when (< x swiper--opoint)
+                 (goto-char x)
+                 ;; Note: Not quite the same as `looking-at' + `match-end'.
+                 (re-search-forward re swiper--opoint t)))
+             cands
+             :from-end t))
+        (cl-position swiper--opoint cands :test #'<))
+      0))
+
+(defun swiper--isearch-filter-ignore-order (re-full cands)
+  (let (filtered-cands)
+    (dolist (re-cons re-full cands)
+      (save-excursion
+        (dolist (cand cands)
+          (goto-char cand)
+          (beginning-of-line)
+          (unless (if (re-search-forward (car re-cons) (line-end-position) t)
+                      (not (cdr re-cons))
+                    (cdr re-cons))
+            (push cand filtered-cands))))
+      (setq cands (nreverse filtered-cands))
+      (setq filtered-cands nil))))
+
+(defun swiper--isearch-function (str)
+  (let ((re-full ivy-regex))
+    (unless (equal re-full "")
+      (let* ((case-fold-search (ivy--case-fold-p str))
+             (re
+              (if (stringp re-full)
+                  re-full
+                (mapconcat
+                 #'ivy--regex-or-literal
+                 (delq nil (mapcar (lambda (x) (and (cdr x) (car x))) re-full))
+                 "\\|")))
+             (cands (swiper--isearch-function-1 re swiper--isearch-backward)))
+        (when (consp re-full)
+          (setq cands (swiper--isearch-filter-ignore-order re-full cands)))
+        (setq ivy--old-re re)
+        (ivy-set-index (swiper--isearch-next-item re cands))
+        (setq ivy--old-cands cands)))))
+
+(defcustom swiper-isearch-highlight-delay '(2 0.2)
+  "When `ivy-text' is too short, delay showing the overlay.
+
+The default value will delay showing the overlay by 0.2 seconds
+if `ivy-text' is shorter than 2 characters.
+
+The aim is to reduce the visual clutter, since it's very rare
+that we search only for one character."
+  :type '(list
+          (integer :tag "Text length")
+          (float :tag "Delay in seconds")))
+
+(defun swiper--delayed-add-overlays ()
+  (if (and swiper-isearch-highlight-delay
+           (< (length ivy-text) (car swiper-isearch-highlight-delay)))
+      (setq swiper--isearch-highlight-timer
+            (run-with-idle-timer
+             (cadr swiper-isearch-highlight-delay) nil
+             (lambda ()
+               (with-ivy-window
+                 (swiper--add-overlays (ivy--regex ivy-text))))))
+    (dolist (re (ivy--positive-regexps))
+      (swiper--add-overlays re))))
+
+(defun swiper--isearch-candidate-pos (cand)
+  "Return the buffer position of `swiper-isearch' CAND, or nil."
+  (cond ((integer-or-marker-p cand) cand)
+        ((and (stringp cand) (> (length cand) 0))
+         (get-text-property 0 'point cand))))
+
+(defun swiper--isearch-candidate-string (cand)
+  "Return full match of `swiper-isearch' candidate CAND.
+Signal an error on failure."
+  ;; FIXME: Better way of getting current candidate?
+  (or (let ((pos (swiper--isearch-candidate-pos cand))
+            (re (ivy-re-to-str ivy-regex)))
+        (save-match-data
+          (save-excursion
+            (and pos (goto-char pos)
+                 (if (or swiper--isearch-backward swiper-goto-start-of-match)
+                     (looking-at re)
+                   (looking-back re (point-min)))
+                 (match-string 0)))))
+      (error "Could not extract `swiper-isearch' candidate: %S" cand)))
+
+(defun swiper-isearch-action (x)
+  "Move to X for `swiper-isearch'."
+  (if (setq x (swiper--isearch-candidate-pos x))
+      (with-ivy-window
+        (goto-char x)
+        (when (and (or (eq this-command 'ivy-previous-line-or-history)
+                       (and (eq this-command 'ivy-done)
+                            (eq last-command 'ivy-previous-line-or-history)))
+                   (looking-back ivy-regex (line-beginning-position)))
+          (goto-char (match-beginning 0)))
+        (funcall isearch-filter-predicate (point) (1+ (point)))
+        (swiper--maybe-recenter)
+        (if (or (eq ivy-exit 'done)
+                ;; FIXME: With the default action 'M-o o', `ivy-exit' remains
+                ;; nil for some reason, so check `this-command' instead to
+                ;; tell whether we're "done".
+                (eq this-command #'ivy-dispatching-done))
+            (progn
+              (swiper--push-mark)
+              (swiper--remember-search-history (ivy--regex ivy-text)))
+          (swiper--cleanup)
+          (swiper--delayed-add-overlays)
+          (swiper--add-cursor-overlay
+           (ivy-state-window ivy-last))))
+    (swiper--cleanup)))
+
+(defun swiper-action-copy (_x)
+  "Copy line at point and go back."
+  (kill-new
+   (buffer-substring-no-properties
+    (line-beginning-position) (line-end-position)))
+  (goto-char swiper--opoint))
+
+(defun swiper-isearch-action-copy (cand)
+  "Save `swiper-isearch' candidate CAND to `kill-ring'.
+Return to original position."
+  (unwind-protect
+      (kill-new (swiper--isearch-candidate-string cand))
+    ;; In case of unexpected error.
+    (goto-char swiper--opoint)))
+
+(defun swiper-isearch-action-insert (cand)
+  "Insert `swiper-isearch' candidate CAND where invoked.
+This cannot currently be called repeatedly without exiting
+completion."
+  (goto-char swiper--opoint)
+  (unwind-protect
+      ;; FIXME: This seems to invalidate many cached buffer positions, thus
+      ;; breaking `ivy-dispatching-call'.
+      (insert (swiper--isearch-candidate-string cand))
+    ;; In case of unexpected error.
+    (goto-char swiper--opoint)))
+
+(defun swiper--isearch-insert-current ()
+  "Replace minibuffer contents with the current candidate.
+Like `ivy-insert-current', but tailored for `swiper-isearch'."
+  (interactive)
+  (delete-minibuffer-contents)
+  (let ((cur (ivy-state-current ivy-last)))
+    (insert (with-ivy-window (swiper--isearch-candidate-string cur)))))
+(ivy--no-M-x #'swiper--isearch-insert-current #'ivy--minibuffer-p)
+
+(defun swiper--isearch-kill-ring-save ()
+  "Save the current candidates in the kill ring.
+If the region is active, forward to `kill-ring-save' instead.
+Like `ivy-kill-ring-save', but tailored for `swiper-isearch'."
+  (interactive)
+  (if (use-region-p)
+      (call-interactively #'kill-ring-save)
+    (kill-new (with-ivy-window
+                (mapconcat #'swiper--line-at-point ivy--old-cands "\n")))))
+(ivy--no-M-x #'swiper--isearch-kill-ring-save #'ivy--minibuffer-p)
+
+(defun swiper-isearch-thing-at-point ()
+  "Insert `symbol-at-point' into the minibuffer of `swiper-isearch'.
+When not running `swiper-isearch' already, start it."
+  (interactive)
+  (if (window-minibuffer-p)
+      (let (bnd str regionp)
+        (with-ivy-window
+          (setq bnd
+                (if (setq regionp (region-active-p))
+                    (prog1 (cons (region-beginning) (region-end))
+                      (deactivate-mark))
+                  (bounds-of-thing-at-point 'symbol)))
+          (setq str (buffer-substring-no-properties (car bnd) (cdr bnd))))
+        (insert str)
+        (unless regionp
+          (ivy--insert-symbol-boundaries)))
+    (let (thing)
+      (if (use-region-p)
+          (progn
+            (setq thing (buffer-substring-no-properties
+                         (region-beginning) (region-end)))
+            (goto-char (region-beginning))
+            (deactivate-mark))
+        (let ((bnd (bounds-of-thing-at-point 'symbol)))
+          (when bnd
+            (goto-char (car bnd)))
+          (setq thing (ivy-thing-at-point))))
+      (swiper-isearch thing))))
+
+(defun swiper-isearch-C-r (&optional arg)
+  "Move cursor vertically up ARG candidates.
+When the input is empty, browse the search history instead."
+  (interactive "p")
+  (if (string= ivy-text "")
+      (ivy-reverse-i-search)
+    (ivy-previous-line arg)))
+(ivy--no-M-x #'swiper-isearch-C-r #'ivy--minibuffer-p)
+
+(defvar swiper-isearch-map
+  (let ((map (make-sparse-keymap)))
+    (set-keymap-parent map swiper-map)
+    (define-key map `[remap ,#'ivy-insert-current]
+                #'swiper--isearch-insert-current)
+    (define-key map `[remap ,#'ivy-kill-ring-save]
+                #'swiper--isearch-kill-ring-save)
+    (define-key map `[remap ,#'kill-ring-save]
+                #'swiper--isearch-kill-ring-save)
+    (define-key map (kbd "M-n") #'swiper-isearch-thing-at-point)
+    (define-key map (kbd "C-r") #'swiper-isearch-C-r)
+    map)
+  "Keymap for `swiper-isearch'.")
+
+(defun swiper--isearch-same-line-p (s1 s2)
+  "Check if S1 and S2 are equal and on the same line."
+  (and (equal s1 s2)
+       (<= (count-lines
+            (get-text-property 0 'point s2)
+            (get-text-property 0 'point s1))
+           1)))
+
+(defun swiper-isearch-format-function (cands)
+  (if (numberp (car-safe cands))
+      (let ((re (ivy-re-to-str ivy-regex)))
+        (if (string= re "^$")
+            ""
+          (mapconcat
+           #'identity
+           (swiper--isearch-format
+            ivy--index ivy--length (or ivy--old-cands ivy--all-candidates)
+            re
+            (ivy-state-current ivy-last)
+            (ivy-state-buffer ivy-last))
+           "\n")))
+    (funcall
+     (ivy-alist-setting ivy-format-functions-alist t)
+     cands)))
+
+(defun swiper--line-at-point (pt)
+  (save-excursion
+    (goto-char pt)
+    (let ((s (buffer-substring
+              (line-beginning-position)
+              (line-end-position))))
+      (if (string= s "")
+          s
+        (put-text-property 0 1 'point pt s)
+        (ivy-cleanup-string s)))))
+
+(defun swiper--isearch-highlight (str &optional current)
+  (let ((start 0)
+        (i 0)
+        (re (ivy-re-to-str ivy-regex)))
+    (catch 'done
+      (while (string-match re str start)
+        (if (= (match-beginning 0) (match-end 0))
+            (throw 'done t)
+          (setq start (match-end 0)))
+        (swiper--add-properties
+         (if (eq current i)
+             swiper-faces
+           swiper-background-faces)
+         (lambda (beg end face _priority)
+           (add-face-text-property beg end face nil str)))
+        (cl-incf i)))
+    str))
+
+(defun swiper--isearch-format (index length cands regex current buffer)
+  (let* ((half-height (/ ivy-height 2))
+         (i (1- index))
+         (j 0)
+         (len 0)
+         res s)
+    (with-current-buffer buffer
+      (while (and (>= i 0)
+                  (swiper--isearch-same-line-p
+                   (swiper--line-at-point (nth i cands))
+                   (swiper--line-at-point current)))
+        (cl-decf i)
+        (cl-incf j))
+      (while (and (>= i 0)
+                  (< len half-height))
+        (setq s (swiper--line-at-point (nth i cands)))
+        (unless (swiper--isearch-same-line-p s (car res))
+          (push (swiper--isearch-highlight s) res)
+          (cl-incf len))
+        (cl-decf i))
+      (setq res (nreverse res))
+      (let ((current-str
+             (swiper--line-at-point current))
+            (start 0))
+        (dotimes (_ (1+ j))
+          (string-match regex current-str start)
+          (setq start (match-end 0)))
+        (font-lock-prepend-text-property
+         0 (length current-str)
+         'face 'swiper-line-face current-str)
+        (swiper--isearch-highlight current-str j)
+        (push current-str res))
+      (cl-incf len)
+      (setq i (1+ index))
+      (while (and (< i length)
+                  (swiper--isearch-same-line-p
+                   (swiper--line-at-point (nth i cands))
+                   (swiper--line-at-point current)))
+        (cl-incf i))
+      (while (and (< i length)
+                  (< len ivy-height))
+        (setq s (swiper--line-at-point (nth i cands)))
+        (unless (swiper--isearch-same-line-p s (car res))
+          (push (swiper--isearch-highlight s) res)
+          (cl-incf len))
+        (cl-incf i))
+      (nreverse res))))
+
+(defun swiper--isearch-init ()
+  "Initialize `swiper-isearch'."
+  (swiper--init)
+  (swiper-font-lock-ensure))
+
+(defun swiper--isearch-unwind ()
+  (swiper--cleanup)
+  (unless (or (eq ivy-exit 'done) swiper-stay-on-quit)
+    (goto-char swiper--opoint))
+  (isearch-clean-overlays)
+  (swiper--ensure-visible)
+  (unless (or (eq ivy-exit 'done) (string= ivy-text ""))
+    (cl-pushnew ivy-text swiper-history)))
+
+;;;###autoload
+(defun swiper-isearch (&optional initial-input)
+  "A `swiper' that's not line-based."
+  (interactive)
+  (let ((ivy-fixed-height-minibuffer t)
+        (cursor-in-non-selected-windows nil)
+        (swiper-min-highlight 1))
+    (ivy-read
+     "Swiper: "
+     #'swiper-isearch-function
+     :initial-input initial-input
+     :keymap swiper-isearch-map
+     :dynamic-collection t
+     :require-match t
+     :action #'swiper-isearch-action
+     :re-builder #'swiper--re-builder
+     :history 'swiper-history
+     :extra-props (list :fname (buffer-file-name))
+     :caller 'swiper-isearch)))
+
+(ivy-configure 'swiper-isearch
+  :occur #'swiper-occur
+  :init-fn #'swiper--isearch-init
+  :update-fn 'auto
+  :unwind-fn #'swiper--isearch-unwind
+  :format-fn #'swiper-isearch-format-function)
+
+(ivy-add-actions 'swiper-isearch
+                 `(("w" ,#'swiper-isearch-action-copy "copy")
+                   ("i" ,#'swiper-isearch-action-insert "insert")))
+
+;;;###autoload
+(defun swiper-isearch-backward (&optional initial-input)
+  "Like `swiper-isearch' but the first result is before the point."
+  (interactive)
+  (let ((swiper--isearch-backward t))
+    (swiper-isearch initial-input)))
+
+(defun swiper-isearch-toggle ()
+  "Two-way toggle between `swiper-isearch' and isearch.
+Intended to be bound in `isearch-mode-map' and `swiper-map'."
+  (interactive)
+  (if isearch-mode
+      (let ((query (if isearch-regexp
+                       isearch-string
+                     (regexp-quote isearch-string))))
+        (isearch-exit)
+        (goto-char (or (and isearch-forward isearch-other-end)
+                       (point)))
+        (swiper-isearch query))
+    (ivy-exit-with-action
+     (lambda (_)
+       (when (looking-back (ivy-re-to-str ivy-regex) (line-beginning-position))
+         (goto-char (match-beginning 0)))
+       (isearch-mode t)
+       (unless (string= ivy-text "")
+         (isearch-yank-string ivy-text))))))
+
+(provide 'swiper)
+
+;;; swiper.el ends here
diff --git a/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper.elc b/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper.elc
new file mode 100644
index 0000000..1b32116
Binary files /dev/null and b/emacs/.emacs.d/elpa/swiper-20260101.2125/swiper.elc differ
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2.signed b/emacs/.emacs.d/elpa/taxy-0.10.2.signed
new file mode 100644
index 0000000..96024fe
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2.signed
@@ -0,0 +1 @@
+Good signature from 645357D2883A0966 GNU ELPA Signing Agent (2023) <elpasign@elpa.gnu.org> (trust undefined) created at 2024-08-17T17:05:01+0800 using EDDSA
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/.dir-locals.el b/emacs/.emacs.d/elpa/taxy-0.10.2/.dir-locals.el
new file mode 100644
index 0000000..0a4990e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/.dir-locals.el
@@ -0,0 +1,6 @@
+;;; Directory Local Variables
+;;; For more information see (info "(emacs) Directory Variables")
+
+((emacs-lisp-mode . ((fill-column . 90)
+		     (indent-tabs-mode . nil)))
+ (org-mode . ((org-list-two-spaces-after-bullet-regexp . nil))))
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/.elpaignore b/emacs/.emacs.d/elpa/taxy-0.10.2/.elpaignore
new file mode 100644
index 0000000..a8ea314
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/.elpaignore
@@ -0,0 +1,3 @@
+examples/musicy.el
+examples/magit-loggy.el
+examples/taxy-org-ql-view.el
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/LICENSE b/emacs/.emacs.d/elpa/taxy-0.10.2/LICENSE
new file mode 100644
index 0000000..94a9ed0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/LICENSE
@@ -0,0 +1,674 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 3, 29 June 2007
+
+ Copyright (C) 2007 Free Software Foundation, Inc. <http://fsf.org/>
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The GNU General Public License is a free, copyleft license for
+software and other kinds of works.
+
+  The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+the GNU General Public License is intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.  We, the Free Software Foundation, use the
+GNU General Public License for most of our software; it applies also to
+any other work released this way by its authors.  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+  To protect your rights, we need to prevent others from denying you
+these rights or asking you to surrender the rights.  Therefore, you have
+certain responsibilities if you distribute copies of the software, or if
+you modify it: responsibilities to respect the freedom of others.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must pass on to the recipients the same
+freedoms that you received.  You must make sure that they, too, receive
+or can get the source code.  And you must show them these terms so they
+know their rights.
+
+  Developers that use the GNU GPL protect your rights with two steps:
+(1) assert copyright on the software, and (2) offer you this License
+giving you legal permission to copy, distribute and/or modify it.
+
+  For the developers' and authors' protection, the GPL clearly explains
+that there is no warranty for this free software.  For both users' and
+authors' sake, the GPL requires that modified versions be marked as
+changed, so that their problems will not be attributed erroneously to
+authors of previous versions.
+
+  Some devices are designed to deny users access to install or run
+modified versions of the software inside them, although the manufacturer
+can do so.  This is fundamentally incompatible with the aim of
+protecting users' freedom to change the software.  The systematic
+pattern of such abuse occurs in the area of products for individuals to
+use, which is precisely where it is most unacceptable.  Therefore, we
+have designed this version of the GPL to prohibit the practice for those
+products.  If such problems arise substantially in other domains, we
+stand ready to extend this provision to those domains in future versions
+of the GPL, as needed to protect the freedom of users.
+
+  Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish to
+avoid the special danger that patents applied to a free program could
+make it effectively proprietary.  To prevent this, the GPL assures that
+patents cannot be used to render the program non-free.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+                       TERMS AND CONDITIONS
+
+  0. Definitions.
+
+  "This License" refers to version 3 of the GNU General Public License.
+
+  "Copyright" also means copyright-like laws that apply to other kinds of
+works, such as semiconductor masks.
+
+  "The Program" refers to any copyrightable work licensed under this
+License.  Each licensee is addressed as "you".  "Licensees" and
+"recipients" may be individuals or organizations.
+
+  To "modify" a work means to copy from or adapt all or part of the work
+in a fashion requiring copyright permission, other than the making of an
+exact copy.  The resulting work is called a "modified version" of the
+earlier work or a work "based on" the earlier work.
+
+  A "covered work" means either the unmodified Program or a work based
+on the Program.
+
+  To "propagate" a work means to do anything with it that, without
+permission, would make you directly or secondarily liable for
+infringement under applicable copyright law, except executing it on a
+computer or modifying a private copy.  Propagation includes copying,
+distribution (with or without modification), making available to the
+public, and in some countries other activities as well.
+
+  To "convey" a work means any kind of propagation that enables other
+parties to make or receive copies.  Mere interaction with a user through
+a computer network, with no transfer of a copy, is not conveying.
+
+  An interactive user interface displays "Appropriate Legal Notices"
+to the extent that it includes a convenient and prominently visible
+feature that (1) displays an appropriate copyright notice, and (2)
+tells the user that there is no warranty for the work (except to the
+extent that warranties are provided), that licensees may convey the
+work under this License, and how to view a copy of this License.  If
+the interface presents a list of user commands or options, such as a
+menu, a prominent item in the list meets this criterion.
+
+  1. Source Code.
+
+  The "source code" for a work means the preferred form of the work
+for making modifications to it.  "Object code" means any non-source
+form of a work.
+
+  A "Standard Interface" means an interface that either is an official
+standard defined by a recognized standards body, or, in the case of
+interfaces specified for a particular programming language, one that
+is widely used among developers working in that language.
+
+  The "System Libraries" of an executable work include anything, other
+than the work as a whole, that (a) is included in the normal form of
+packaging a Major Component, but which is not part of that Major
+Component, and (b) serves only to enable use of the work with that
+Major Component, or to implement a Standard Interface for which an
+implementation is available to the public in source code form.  A
+"Major Component", in this context, means a major essential component
+(kernel, window system, and so on) of the specific operating system
+(if any) on which the executable work runs, or a compiler used to
+produce the work, or an object code interpreter used to run it.
+
+  The "Corresponding Source" for a work in object code form means all
+the source code needed to generate, install, and (for an executable
+work) run the object code and to modify the work, including scripts to
+control those activities.  However, it does not include the work's
+System Libraries, or general-purpose tools or generally available free
+programs which are used unmodified in performing those activities but
+which are not part of the work.  For example, Corresponding Source
+includes interface definition files associated with source files for
+the work, and the source code for shared libraries and dynamically
+linked subprograms that the work is specifically designed to require,
+such as by intimate data communication or control flow between those
+subprograms and other parts of the work.
+
+  The Corresponding Source need not include anything that users
+can regenerate automatically from other parts of the Corresponding
+Source.
+
+  The Corresponding Source for a work in source code form is that
+same work.
+
+  2. Basic Permissions.
+
+  All rights granted under this License are granted for the term of
+copyright on the Program, and are irrevocable provided the stated
+conditions are met.  This License explicitly affirms your unlimited
+permission to run the unmodified Program.  The output from running a
+covered work is covered by this License only if the output, given its
+content, constitutes a covered work.  This License acknowledges your
+rights of fair use or other equivalent, as provided by copyright law.
+
+  You may make, run and propagate covered works that you do not
+convey, without conditions so long as your license otherwise remains
+in force.  You may convey covered works to others for the sole purpose
+of having them make modifications exclusively for you, or provide you
+with facilities for running those works, provided that you comply with
+the terms of this License in conveying all material for which you do
+not control copyright.  Those thus making or running the covered works
+for you must do so exclusively on your behalf, under your direction
+and control, on terms that prohibit them from making any copies of
+your copyrighted material outside their relationship with you.
+
+  Conveying under any other circumstances is permitted solely under
+the conditions stated below.  Sublicensing is not allowed; section 10
+makes it unnecessary.
+
+  3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+  No covered work shall be deemed part of an effective technological
+measure under any applicable law fulfilling obligations under article
+11 of the WIPO copyright treaty adopted on 20 December 1996, or
+similar laws prohibiting or restricting circumvention of such
+measures.
+
+  When you convey a covered work, you waive any legal power to forbid
+circumvention of technological measures to the extent such circumvention
+is effected by exercising rights under this License with respect to
+the covered work, and you disclaim any intention to limit operation or
+modification of the work as a means of enforcing, against the work's
+users, your or third parties' legal rights to forbid circumvention of
+technological measures.
+
+  4. Conveying Verbatim Copies.
+
+  You may convey verbatim copies of the Program's source code as you
+receive it, in any medium, provided that you conspicuously and
+appropriately publish on each copy an appropriate copyright notice;
+keep intact all notices stating that this License and any
+non-permissive terms added in accord with section 7 apply to the code;
+keep intact all notices of the absence of any warranty; and give all
+recipients a copy of this License along with the Program.
+
+  You may charge any price or no price for each copy that you convey,
+and you may offer support or warranty protection for a fee.
+
+  5. Conveying Modified Source Versions.
+
+  You may convey a work based on the Program, or the modifications to
+produce it from the Program, in the form of source code under the
+terms of section 4, provided that you also meet all of these conditions:
+
+    a) The work must carry prominent notices stating that you modified
+    it, and giving a relevant date.
+
+    b) The work must carry prominent notices stating that it is
+    released under this License and any conditions added under section
+    7.  This requirement modifies the requirement in section 4 to
+    "keep intact all notices".
+
+    c) You must license the entire work, as a whole, under this
+    License to anyone who comes into possession of a copy.  This
+    License will therefore apply, along with any applicable section 7
+    additional terms, to the whole of the work, and all its parts,
+    regardless of how they are packaged.  This License gives no
+    permission to license the work in any other way, but it does not
+    invalidate such permission if you have separately received it.
+
+    d) If the work has interactive user interfaces, each must display
+    Appropriate Legal Notices; however, if the Program has interactive
+    interfaces that do not display Appropriate Legal Notices, your
+    work need not make them do so.
+
+  A compilation of a covered work with other separate and independent
+works, which are not by their nature extensions of the covered work,
+and which are not combined with it such as to form a larger program,
+in or on a volume of a storage or distribution medium, is called an
+"aggregate" if the compilation and its resulting copyright are not
+used to limit the access or legal rights of the compilation's users
+beyond what the individual works permit.  Inclusion of a covered work
+in an aggregate does not cause this License to apply to the other
+parts of the aggregate.
+
+  6. Conveying Non-Source Forms.
+
+  You may convey a covered work in object code form under the terms
+of sections 4 and 5, provided that you also convey the
+machine-readable Corresponding Source under the terms of this License,
+in one of these ways:
+
+    a) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by the
+    Corresponding Source fixed on a durable physical medium
+    customarily used for software interchange.
+
+    b) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by a
+    written offer, valid for at least three years and valid for as
+    long as you offer spare parts or customer support for that product
+    model, to give anyone who possesses the object code either (1) a
+    copy of the Corresponding Source for all the software in the
+    product that is covered by this License, on a durable physical
+    medium customarily used for software interchange, for a price no
+    more than your reasonable cost of physically performing this
+    conveying of source, or (2) access to copy the
+    Corresponding Source from a network server at no charge.
+
+    c) Convey individual copies of the object code with a copy of the
+    written offer to provide the Corresponding Source.  This
+    alternative is allowed only occasionally and noncommercially, and
+    only if you received the object code with such an offer, in accord
+    with subsection 6b.
+
+    d) Convey the object code by offering access from a designated
+    place (gratis or for a charge), and offer equivalent access to the
+    Corresponding Source in the same way through the same place at no
+    further charge.  You need not require recipients to copy the
+    Corresponding Source along with the object code.  If the place to
+    copy the object code is a network server, the Corresponding Source
+    may be on a different server (operated by you or a third party)
+    that supports equivalent copying facilities, provided you maintain
+    clear directions next to the object code saying where to find the
+    Corresponding Source.  Regardless of what server hosts the
+    Corresponding Source, you remain obligated to ensure that it is
+    available for as long as needed to satisfy these requirements.
+
+    e) Convey the object code using peer-to-peer transmission, provided
+    you inform other peers where the object code and Corresponding
+    Source of the work are being offered to the general public at no
+    charge under subsection 6d.
+
+  A separable portion of the object code, whose source code is excluded
+from the Corresponding Source as a System Library, need not be
+included in conveying the object code work.
+
+  A "User Product" is either (1) a "consumer product", which means any
+tangible personal property which is normally used for personal, family,
+or household purposes, or (2) anything designed or sold for incorporation
+into a dwelling.  In determining whether a product is a consumer product,
+doubtful cases shall be resolved in favor of coverage.  For a particular
+product received by a particular user, "normally used" refers to a
+typical or common use of that class of product, regardless of the status
+of the particular user or of the way in which the particular user
+actually uses, or expects or is expected to use, the product.  A product
+is a consumer product regardless of whether the product has substantial
+commercial, industrial or non-consumer uses, unless such uses represent
+the only significant mode of use of the product.
+
+  "Installation Information" for a User Product means any methods,
+procedures, authorization keys, or other information required to install
+and execute modified versions of a covered work in that User Product from
+a modified version of its Corresponding Source.  The information must
+suffice to ensure that the continued functioning of the modified object
+code is in no case prevented or interfered with solely because
+modification has been made.
+
+  If you convey an object code work under this section in, or with, or
+specifically for use in, a User Product, and the conveying occurs as
+part of a transaction in which the right of possession and use of the
+User Product is transferred to the recipient in perpetuity or for a
+fixed term (regardless of how the transaction is characterized), the
+Corresponding Source conveyed under this section must be accompanied
+by the Installation Information.  But this requirement does not apply
+if neither you nor any third party retains the ability to install
+modified object code on the User Product (for example, the work has
+been installed in ROM).
+
+  The requirement to provide Installation Information does not include a
+requirement to continue to provide support service, warranty, or updates
+for a work that has been modified or installed by the recipient, or for
+the User Product in which it has been modified or installed.  Access to a
+network may be denied when the modification itself materially and
+adversely affects the operation of the network or violates the rules and
+protocols for communication across the network.
+
+  Corresponding Source conveyed, and Installation Information provided,
+in accord with this section must be in a format that is publicly
+documented (and with an implementation available to the public in
+source code form), and must require no special password or key for
+unpacking, reading or copying.
+
+  7. Additional Terms.
+
+  "Additional permissions" are terms that supplement the terms of this
+License by making exceptions from one or more of its conditions.
+Additional permissions that are applicable to the entire Program shall
+be treated as though they were included in this License, to the extent
+that they are valid under applicable law.  If additional permissions
+apply only to part of the Program, that part may be used separately
+under those permissions, but the entire Program remains governed by
+this License without regard to the additional permissions.
+
+  When you convey a copy of a covered work, you may at your option
+remove any additional permissions from that copy, or from any part of
+it.  (Additional permissions may be written to require their own
+removal in certain cases when you modify the work.)  You may place
+additional permissions on material, added by you to a covered work,
+for which you have or can give appropriate copyright permission.
+
+  Notwithstanding any other provision of this License, for material you
+add to a covered work, you may (if authorized by the copyright holders of
+that material) supplement the terms of this License with terms:
+
+    a) Disclaiming warranty or limiting liability differently from the
+    terms of sections 15 and 16 of this License; or
+
+    b) Requiring preservation of specified reasonable legal notices or
+    author attributions in that material or in the Appropriate Legal
+    Notices displayed by works containing it; or
+
+    c) Prohibiting misrepresentation of the origin of that material, or
+    requiring that modified versions of such material be marked in
+    reasonable ways as different from the original version; or
+
+    d) Limiting the use for publicity purposes of names of licensors or
+    authors of the material; or
+
+    e) Declining to grant rights under trademark law for use of some
+    trade names, trademarks, or service marks; or
+
+    f) Requiring indemnification of licensors and authors of that
+    material by anyone who conveys the material (or modified versions of
+    it) with contractual assumptions of liability to the recipient, for
+    any liability that these contractual assumptions directly impose on
+    those licensors and authors.
+
+  All other non-permissive additional terms are considered "further
+restrictions" within the meaning of section 10.  If the Program as you
+received it, or any part of it, contains a notice stating that it is
+governed by this License along with a term that is a further
+restriction, you may remove that term.  If a license document contains
+a further restriction but permits relicensing or conveying under this
+License, you may add to a covered work material governed by the terms
+of that license document, provided that the further restriction does
+not survive such relicensing or conveying.
+
+  If you add terms to a covered work in accord with this section, you
+must place, in the relevant source files, a statement of the
+additional terms that apply to those files, or a notice indicating
+where to find the applicable terms.
+
+  Additional terms, permissive or non-permissive, may be stated in the
+form of a separately written license, or stated as exceptions;
+the above requirements apply either way.
+
+  8. Termination.
+
+  You may not propagate or modify a covered work except as expressly
+provided under this License.  Any attempt otherwise to propagate or
+modify it is void, and will automatically terminate your rights under
+this License (including any patent licenses granted under the third
+paragraph of section 11).
+
+  However, if you cease all violation of this License, then your
+license from a particular copyright holder is reinstated (a)
+provisionally, unless and until the copyright holder explicitly and
+finally terminates your license, and (b) permanently, if the copyright
+holder fails to notify you of the violation by some reasonable means
+prior to 60 days after the cessation.
+
+  Moreover, your license from a particular copyright holder is
+reinstated permanently if the copyright holder notifies you of the
+violation by some reasonable means, this is the first time you have
+received notice of violation of this License (for any work) from that
+copyright holder, and you cure the violation prior to 30 days after
+your receipt of the notice.
+
+  Termination of your rights under this section does not terminate the
+licenses of parties who have received copies or rights from you under
+this License.  If your rights have been terminated and not permanently
+reinstated, you do not qualify to receive new licenses for the same
+material under section 10.
+
+  9. Acceptance Not Required for Having Copies.
+
+  You are not required to accept this License in order to receive or
+run a copy of the Program.  Ancillary propagation of a covered work
+occurring solely as a consequence of using peer-to-peer transmission
+to receive a copy likewise does not require acceptance.  However,
+nothing other than this License grants you permission to propagate or
+modify any covered work.  These actions infringe copyright if you do
+not accept this License.  Therefore, by modifying or propagating a
+covered work, you indicate your acceptance of this License to do so.
+
+  10. Automatic Licensing of Downstream Recipients.
+
+  Each time you convey a covered work, the recipient automatically
+receives a license from the original licensors, to run, modify and
+propagate that work, subject to this License.  You are not responsible
+for enforcing compliance by third parties with this License.
+
+  An "entity transaction" is a transaction transferring control of an
+organization, or substantially all assets of one, or subdividing an
+organization, or merging organizations.  If propagation of a covered
+work results from an entity transaction, each party to that
+transaction who receives a copy of the work also receives whatever
+licenses to the work the party's predecessor in interest had or could
+give under the previous paragraph, plus a right to possession of the
+Corresponding Source of the work from the predecessor in interest, if
+the predecessor has it or can get it with reasonable efforts.
+
+  You may not impose any further restrictions on the exercise of the
+rights granted or affirmed under this License.  For example, you may
+not impose a license fee, royalty, or other charge for exercise of
+rights granted under this License, and you may not initiate litigation
+(including a cross-claim or counterclaim in a lawsuit) alleging that
+any patent claim is infringed by making, using, selling, offering for
+sale, or importing the Program or any portion of it.
+
+  11. Patents.
+
+  A "contributor" is a copyright holder who authorizes use under this
+License of the Program or a work on which the Program is based.  The
+work thus licensed is called the contributor's "contributor version".
+
+  A contributor's "essential patent claims" are all patent claims
+owned or controlled by the contributor, whether already acquired or
+hereafter acquired, that would be infringed by some manner, permitted
+by this License, of making, using, or selling its contributor version,
+but do not include claims that would be infringed only as a
+consequence of further modification of the contributor version.  For
+purposes of this definition, "control" includes the right to grant
+patent sublicenses in a manner consistent with the requirements of
+this License.
+
+  Each contributor grants you a non-exclusive, worldwide, royalty-free
+patent license under the contributor's essential patent claims, to
+make, use, sell, offer for sale, import and otherwise run, modify and
+propagate the contents of its contributor version.
+
+  In the following three paragraphs, a "patent license" is any express
+agreement or commitment, however denominated, not to enforce a patent
+(such as an express permission to practice a patent or covenant not to
+sue for patent infringement).  To "grant" such a patent license to a
+party means to make such an agreement or commitment not to enforce a
+patent against the party.
+
+  If you convey a covered work, knowingly relying on a patent license,
+and the Corresponding Source of the work is not available for anyone
+to copy, free of charge and under the terms of this License, through a
+publicly available network server or other readily accessible means,
+then you must either (1) cause the Corresponding Source to be so
+available, or (2) arrange to deprive yourself of the benefit of the
+patent license for this particular work, or (3) arrange, in a manner
+consistent with the requirements of this License, to extend the patent
+license to downstream recipients.  "Knowingly relying" means you have
+actual knowledge that, but for the patent license, your conveying the
+covered work in a country, or your recipient's use of the covered work
+in a country, would infringe one or more identifiable patents in that
+country that you have reason to believe are valid.
+
+  If, pursuant to or in connection with a single transaction or
+arrangement, you convey, or propagate by procuring conveyance of, a
+covered work, and grant a patent license to some of the parties
+receiving the covered work authorizing them to use, propagate, modify
+or convey a specific copy of the covered work, then the patent license
+you grant is automatically extended to all recipients of the covered
+work and works based on it.
+
+  A patent license is "discriminatory" if it does not include within
+the scope of its coverage, prohibits the exercise of, or is
+conditioned on the non-exercise of one or more of the rights that are
+specifically granted under this License.  You may not convey a covered
+work if you are a party to an arrangement with a third party that is
+in the business of distributing software, under which you make payment
+to the third party based on the extent of your activity of conveying
+the work, and under which the third party grants, to any of the
+parties who would receive the covered work from you, a discriminatory
+patent license (a) in connection with copies of the covered work
+conveyed by you (or copies made from those copies), or (b) primarily
+for and in connection with specific products or compilations that
+contain the covered work, unless you entered into that arrangement,
+or that patent license was granted, prior to 28 March 2007.
+
+  Nothing in this License shall be construed as excluding or limiting
+any implied license or other defenses to infringement that may
+otherwise be available to you under applicable patent law.
+
+  12. No Surrender of Others' Freedom.
+
+  If conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot convey a
+covered work so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you may
+not convey it at all.  For example, if you agree to terms that obligate you
+to collect a royalty for further conveying from those to whom you convey
+the Program, the only way you could satisfy both those terms and this
+License would be to refrain entirely from conveying the Program.
+
+  13. Use with the GNU Affero General Public License.
+
+  Notwithstanding any other provision of this License, you have
+permission to link or combine any covered work with a work licensed
+under version 3 of the GNU Affero General Public License into a single
+combined work, and to convey the resulting work.  The terms of this
+License will continue to apply to the part which is the covered work,
+but the special requirements of the GNU Affero General Public License,
+section 13, concerning interaction through a network will apply to the
+combination as such.
+
+  14. Revised Versions of this License.
+
+  The Free Software Foundation may publish revised and/or new versions of
+the GNU General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+  Each version is given a distinguishing version number.  If the
+Program specifies that a certain numbered version of the GNU General
+Public License "or any later version" applies to it, you have the
+option of following the terms and conditions either of that numbered
+version or of any later version published by the Free Software
+Foundation.  If the Program does not specify a version number of the
+GNU General Public License, you may choose any version ever published
+by the Free Software Foundation.
+
+  If the Program specifies that a proxy can decide which future
+versions of the GNU General Public License can be used, that proxy's
+public statement of acceptance of a version permanently authorizes you
+to choose that version for the Program.
+
+  Later license versions may give you additional or different
+permissions.  However, no additional obligations are imposed on any
+author or copyright holder as a result of your choosing to follow a
+later version.
+
+  15. Disclaimer of Warranty.
+
+  THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
+APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
+HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
+OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
+THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+PURPOSE.  THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
+IS WITH YOU.  SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
+ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+  16. Limitation of Liability.
+
+  IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
+THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
+GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
+USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
+DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
+PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
+EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGES.
+
+  17. Interpretation of Sections 15 and 16.
+
+  If the disclaimer of warranty and limitation of liability provided
+above cannot be given local legal effect according to their terms,
+reviewing courts shall apply local law that most closely approximates
+an absolute waiver of all civil liability in connection with the
+Program, unless a warranty or assumption of liability accompanies a
+copy of the Program in return for a fee.
+
+                     END OF TERMS AND CONDITIONS
+
+            How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+state the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software: you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation, either version 3 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+Also add information on how to contact you by electronic and paper mail.
+
+  If the program does terminal interaction, make it output a short
+notice like this when it starts in an interactive mode:
+
+    <program>  Copyright (C) <year>  <name of author>
+    This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, your program's commands
+might be different; for a GUI interface, you would use an "about box".
+
+  You should also get your employer (if you work as a programmer) or school,
+if any, to sign a "copyright disclaimer" for the program, if necessary.
+For more information on this, and how to apply and follow the GNU GPL, see
+<http://www.gnu.org/licenses/>.
+
+  The GNU General Public License does not permit incorporating your program
+into proprietary programs.  If your program is a subroutine library, you
+may consider it more useful to permit linking proprietary applications with
+the library.  If this is what you want to do, use the GNU Lesser General
+Public License instead of this License.  But first, please read
+<http://www.gnu.org/philosophy/why-not-lgpl.html>.
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/README-elpa b/emacs/.emacs.d/elpa/taxy-0.10.2/README-elpa
new file mode 100644
index 0000000..0dec30b
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/README-elpa
@@ -0,0 +1,1308 @@
+                               ━━━━━━━━━
+                                TAXY.EL
+                               ━━━━━━━━━
+
+
+[https://elpa.gnu.org/packages/taxy.svg]
+
+/Now, where did I put that…/
+
+This library provides a programmable way to classify arbitrary objects
+into a hierarchical taxonomy.  (That's a lot of fancy words to say that
+this lets you automatically put things in nested groups.)
+
+Helpful features include:
+
+Dynamic taxonomies
+      Objects may be classified into hierarchies automatically defined
+      at runtime based on their attributes.
+Reusable taxonomies
+      Taxonomy definitions may be stored in variables and reused in
+      other taxonomies' descendant groups.
+Classification domain-specific language
+      Easily define a custom DSL used to classify items dynamically
+      (which can be extended by users).
+Flexible table view
+      Based on `magit-section', with easily defined columns (also
+      extendable by users).
+
+
+[https://elpa.gnu.org/packages/taxy.svg]
+<https://elpa.gnu.org/packages/taxy.html>
+
+
+1 Examples
+══════════
+
+  • 
+  • 
+  • 
+  • 
+
+  May these examples help you classify your understanding.
+
+
+1.1 Numbery (starting basically)
+────────────────────────────────
+
+  Let's imagine a silly taxonomy of numbers below 100:
+
+  ┌────
+  │ ("Numbery" "A silly taxonomy of numbers."
+  │  (("< 10" "Numbers below 10"
+  │    ;; These numbers are leftovers from the sub-taxys below.
+  │    (0 2 4 6 8)
+  │    ;; These sub-taxys further classify the numbers below 10 into odd
+  │    ;; and even.  The odd taxy "consumes" numbers, while the even one
+  │    ;; doesn't, leaving them to reappear in the parent taxy's items.
+  │    (("Odd" "(consuming)"
+  │      (1 3 5 7 9))
+  │     ("Even" "(non-consuming)"
+  │      (0 2 4 6 8))))
+  │   (">= 10" "Numbers above 9"
+  │    ;; Like in the "< 10" taxy, these numbers are leftovers from this
+  │    ;; taxy's sub-taxys, three of which are non-consuming.
+  │    (10 11 13 14 17 19 22 23 25 26 29 31 34 35 37 38 41 43 46 47 49 50 53 55 58
+  │        59 61 62 65 67 70 71 73 74 77 79 82 83 85 86 89 91 94 95 97 98)
+  │    (("Divisible by 3" "(non-consuming)"
+  │      (12 15 18 21 24 27 30 33 36 39 42 45 48 51 54 57 60 63 66 69 72 75 78 81 84
+  │ 	 87 90 93 96 99))
+  │     ("Divisible by 4" "(non-consuming)"
+  │      (12 16 20 24 28 32 36 40 44 48 52 56 60 64 68 72 76 80 84 88 92 96))
+  │     ("Divisible by 3 or 4" "(consuming)"
+  │      ;; This taxy consumes numbers it takes in, but since these
+  │      ;; numbers have already been taken in (without being consumed) by
+  │      ;; the previous two sibling taxys, they may also appear in them.
+  │      (12 15 16 18 20 21 24 27 28 30 32 33 36 39 40 42 44 45 48 51 52 54 56 57 60
+  │ 	 63 64 66 68 69 72 75 76 78 80 81 84 87 88 90 92 93 96 99))
+  │     ("Divisible by 5" "(non-consuming)"
+  │      (10 25 35 50 55 65 70 85 95))))))
+  └────
+
+  You might think about how to produce that by writing some imperative
+  code, but `taxy' allows you to do so in a more declarative and
+  functional manner:
+
+  ┌────
+  │ (require 'taxy)
+  │ 
+  │ (defvar numbery
+  │   (make-taxy
+  │    :name "Numbery"
+  │    :description "A silly taxonomy of numbers."
+  │    :taxys (list (make-taxy
+  │ 		 :name "< 10"
+  │ 		 :description "Numbers below 10 (consuming)"
+  │ 		 :predicate (lambda (n) (< n 10))
+  │ 		 :taxys (list
+  │ 			 ;; These sub-taxys further classify the numbers below 10 into odd
+  │ 			 ;; and even.  The odd taxy "consumes" numbers, while the even one
+  │ 			 ;; doesn't, leaving them to reappear in the parent taxy's items.
+  │ 			 (make-taxy :name "Odd"
+  │ 				    :description "(consuming)"
+  │ 				    :predicate #'oddp)
+  │ 			 (make-taxy :name "Even"
+  │ 				    :description "(non-consuming)"
+  │ 				    :predicate #'evenp
+  │ 				    :then #'identity)))
+  │ 		(make-taxy
+  │ 		 :name ">= 10"
+  │ 		 :description "Numbers above 9 (consuming)"
+  │ 		 :predicate (lambda (n) (>= n 10))
+  │ 		 :taxys (list
+  │ 			 ;; Like in the "< 10" taxy, these sub-taxys further classify
+  │ 			 ;; the numbers, but only one of them consumes numbers it
+  │ 			 ;; takes in, leaving the rest to reappear in the parent taxy.
+  │ 			 (make-taxy :name "Divisible by 3"
+  │ 				    :description "(non-consuming)"
+  │ 				    :predicate (lambda (n) (zerop (mod n 3)))
+  │ 				    :then #'identity)
+  │ 			 (make-taxy :name "Divisible by 4"
+  │ 				    :description "(non-consuming)"
+  │ 				    :predicate (lambda (n) (zerop (mod n 4)))
+  │ 				    :then #'identity)
+  │ 			 (make-taxy :name "Divisible by 3 or 4"
+  │ 				    :description "(consuming)"
+  │ 				    ;; Since this taxy's `:then' function is unset,
+  │ 				    ;; it defaults to `ignore', which causes it to
+  │ 				    ;; consume numbers it takes in.  Since these
+  │ 				    ;; numbers have already been taken in (without
+  │ 				    ;; being consumed) by the previous two sibling
+  │ 				    ;; taxys, they also appear in them.
+  │ 				    :predicate (lambda (n) (or (zerop (mod n 3))
+  │ 							       (zerop (mod n 4)))))
+  │ 			 (make-taxy :name "Divisible by 5"
+  │ 				    :description "(non-consuming)"
+  │ 				    :predicate (lambda (n) (zerop (mod n 5)))
+  │ 				    :then #'identity))))))
+  │ 
+  │ (let ((numbers (cl-loop for i below 100 collect i))
+  │       ;; Since `numbery' is stored in a variable, we use an emptied
+  │       ;; copy of it to avoid mutating the original taxy.
+  │       (taxy (taxy-emptied numbery)))
+  │   (taxy-plain (taxy-fill (reverse numbers) taxy)))
+  └────
+
+  The `taxy-fill' function applies the numbers in a "cascade" down the
+  hierarchy of "taxys", and the `taxy-plain' function returns a
+  meaningful subset of the taxys' slots, suitable for display.
+
+
+1.2 Lettery (filling incrementally)
+───────────────────────────────────
+
+  You can also add more items after the hierarchy has been filled.  In
+  this example we'll make a comprehensive taxonomy of letters.  The
+  first sub-taxy collects vowels, and the second, by leaving its
+  predicate at the default value, `identity', collects all letters not
+  collected by the first taxy, i.e. non-vowels.
+
+  ┌────
+  │ (defvar lettery
+  │   (make-taxy
+  │    :name "Lettery"
+  │    :description "A comprehensive taxonomy of letters."
+  │    :taxys (list (make-taxy
+  │ 		 :name "Vowels"
+  │ 		 :description "You know what those are."
+  │ 		 :predicate (lambda (l)
+  │ 			      (member-ignore-case l '("a" "e" "i" "o" "u"))))
+  │ 		(make-taxy
+  │ 		 :name "Consonants"
+  │ 		 :description "Well, if they aren't vowels..."))))
+  │ 
+  │ (taxy-plain
+  │  (taxy-fill (reverse
+  │ 	     (cl-loop for l from ?a to ?n
+  │ 		      collect (upcase (char-to-string l))))
+  │ 	    lettery))
+  └────
+
+  That produces:
+
+  ┌────
+  │ ("Lettery" "A comprehensive taxonomy of letters."
+  │  (("Vowels" "You know what those are."
+  │    ("A" "E" "I"))
+  │   ("Consonants" "Well, if they aren't vowels..."
+  │    ("B" "C" "D" "F" "G" "H" "J" "K" "L" "M" "N"))))
+  └────
+
+  Oops, we forgot the letters after N!  Let's add them, too:
+
+  ┌────
+  │ (taxy-plain
+  │  (taxy-fill (reverse
+  │ 	     (cl-loop for l from ?n to ?z
+  │ 		      collect (upcase (char-to-string l))))
+  │ 	    lettery))
+  └────
+
+  Which gives us:
+
+  ┌────
+  │ ("Lettery" "A comprehensive taxonomy of letters."
+  │  (("Vowels" "You know what those are."
+  │    ("O" "U" "A" "E" "I"))
+  │   ("Consonants" "Well, if they aren't vowels..."
+  │    ("N" "P" "Q" "R" "S" "T" "V" "W" "X" "Y" "Z" "B" "C" "D" "F" "G" "H" "J" "K" "L" "M" "N"))))
+  └────
+
+  Oh, they're out of order, now.  That won't do.  Let's fix that:
+
+  ┌────
+  │ (taxy-plain
+  │  (taxy-sort #'string< #'identity lettery))
+  └────
+
+  That's better:
+
+  ┌────
+  │ ("Lettery" "A comprehensive taxonomy of letters."
+  │  (("Vowels" "You know what those are."
+  │    ("A" "E" "I" "O" "U"))
+  │   ("Consonants" "Well, if they aren't vowels..."
+  │    ("B" "C" "D" "F" "G" "H" "J" "K" "L" "M" "N" "N" "P" "Q" "R" "S" "T" "V" "W" "X" "Y" "Z"))))
+  └────
+
+
+1.3 Sporty (understanding completely)
+─────────────────────────────────────
+
+  Let's try to understand a few things about sports.  First we'll define
+  a struct to make them easier to grasp:
+
+  ┌────
+  │ (cl-defstruct sport
+  │   name uses venue fun)
+  └────
+
+  Now we'll make a list of sports:
+
+  ┌────
+  │ (defvar sports
+  │   (list (make-sport :name "Baseball"
+  │ 		    :uses '(bat ball glove)
+  │ 		    :venue 'outdoor
+  │ 		    :fun t)
+  │ 	(make-sport :name "Football"
+  │ 		    :uses '(ball)
+  │ 		    :venue 'outdoor
+  │ 		    :fun t)
+  │ 	(make-sport :name "Basketball"
+  │ 		    :uses '(ball hoop)
+  │ 		    :venue 'indoor
+  │ 		    :fun t)
+  │ 	(make-sport :name "Tennis"
+  │ 		    :uses '(ball racket)
+  │ 		    :venue 'outdoor
+  │ 		    :fun t)
+  │ 	(make-sport :name "Racquetball"
+  │ 		    :uses '(ball racket)
+  │ 		    :venue 'indoor
+  │ 		    :fun t)
+  │ 	(make-sport :name "Handball"
+  │ 		    :uses '(ball glove)
+  │ 		    :venue 'indoor
+  │ 		    :fun t)
+  │ 	(make-sport :name "Soccer"
+  │ 		    :uses '(ball)
+  │ 		    :venue 'outdoor
+  │ 		    :fun nil)
+  │ 	(make-sport :name "Disc golf"
+  │ 		    :uses '(disc basket)
+  │ 		    :venue 'outdoor
+  │ 		    :fun t)
+  │ 	(make-sport :name "Ultimate"
+  │ 		    :uses '(disc)
+  │ 		    :venue 'outdoor
+  │ 		    :fun t)
+  │ 	(make-sport :name "Volleyball"
+  │ 		    :uses '(ball)
+  │ 		    :venue 'indoor
+  │ 		    :fun t)))
+  └────
+
+  And finally we'll define a taxy to organize them.  In this, we use a
+  helper macro to make the `member' function easier to use in the list
+  of key functions:
+
+  ┌────
+  │ (defvar sporty
+  │   (cl-macrolet ((in (needle haystack)
+  │ 		    `(lambda (item)
+  │ 		       (when (member ,needle (funcall ,haystack item))
+  │ 			 ,needle))))
+  │     (make-taxy
+  │      :name "Sporty"
+  │      :take (lambda (item taxy)
+  │ 	     (taxy-take-keyed
+  │ 	       (list #'sport-venue
+  │ 		     (in 'ball 'sport-uses)
+  │ 		     (in 'disc 'sport-uses)
+  │ 		     (in 'glove 'sport-uses)
+  │ 		     (in 'racket 'sport-uses))
+  │ 	       item taxy
+  │ 	       ;; We set the `:then' function of the taxys
+  │ 	       ;; created by `taxy-take-keyed' to `identity'
+  │ 	       ;; so they will not consume their items.
+  │ 	       :then #'identity)))))
+  └────
+
+  Now let's fill the taxy with the sports and format it:
+
+  ┌────
+  │ (thread-last sporty
+  │   taxy-emptied
+  │   (taxy-fill sports)
+  │   (taxy-mapcar #'sport-name)
+  │   taxy-plain)
+  └────
+
+  ┌────
+  │ ((("Sporty"
+  │    ((indoor
+  │      ((ball
+  │        ("Volleyball" "Basketball")
+  │        ((glove
+  │ 	 ("Handball"))
+  │ 	(racket
+  │ 	 ("Racquetball"))))))
+  │     (outdoor
+  │      ((disc
+  │        ("Ultimate" "Disc golf"))
+  │       (ball
+  │        ("Soccer" "Football")
+  │        ((racket
+  │ 	 ("Tennis"))
+  │ 	(glove
+  │ 	 ("Baseball"))))))))))
+  └────
+
+  That's pretty sporty.  But classifying them by venue first makes the
+  racket and glove sports not be listed together.  Let's swap the key
+  functions around so the venue is classified at the deepest level of
+  the hierarchy:
+
+  ┌────
+  │ (defvar sporty
+  │   (cl-macrolet ((in (needle haystack)
+  │ 		    `(lambda (item)
+  │ 		       (when (member ,needle (funcall ,haystack item))
+  │ 			 ,needle))))
+  │     (make-taxy
+  │      :name "Sporty"
+  │      :take (lambda (item taxy)
+  │ 	     (taxy-take-keyed
+  │ 	       (list (in 'ball 'sport-uses)
+  │ 		     (in 'disc 'sport-uses)
+  │ 		     (in 'glove 'sport-uses)
+  │ 		     (in 'racket 'sport-uses)
+  │ 		     #'sport-venue)
+  │ 	       item taxy
+  │ 	       :then #'identity)))))
+  │ 
+  │ (thread-last sporty
+  │   taxy-emptied
+  │   (taxy-fill sports)
+  │   (taxy-mapcar #'sport-name)
+  │   taxy-plain)
+  └────
+
+  ┌────
+  │ ((("Sporty"
+  │    ((disc
+  │      ((outdoor
+  │        ("Ultimate" "Disc golf"))))
+  │     (ball
+  │      ((racket
+  │        ((indoor
+  │ 	 ("Racquetball"))
+  │ 	(outdoor
+  │ 	 ("Tennis"))))
+  │       (indoor
+  │        ("Volleyball" "Basketball"))
+  │       (outdoor
+  │        ("Soccer" "Football"))
+  │       (glove
+  │        ((indoor
+  │ 	 ("Handball"))
+  │ 	(outdoor
+  │ 	 ("Baseball"))))))))))
+  └────
+
+  That's better.  But I'd also like to see a very simple classification
+  to help me decide what to play:
+
+  ┌────
+  │ (thread-last
+  │     (make-taxy
+  │      :name "Funny"
+  │      :take (lambda (item taxy)
+  │ 	     (taxy-take-keyed
+  │ 	       (list (lambda (sport)
+  │ 		       (if (sport-fun sport)
+  │ 			   'fun 'boring))
+  │ 		     #'sport-venue)
+  │ 	       item taxy)))
+  │   taxy-emptied
+  │   (taxy-fill sports)
+  │   (taxy-mapcar #'sport-name)
+  │   taxy-plain)
+  └────
+
+  ┌────
+  │ ((("Funny"
+  │    ((boring
+  │      ((outdoor
+  │        ("Soccer"))))
+  │     (fun
+  │      ((indoor
+  │        ("Volleyball" "Handball" "Racquetball" "Basketball"))
+  │       (outdoor
+  │        ("Ultimate" "Disc golf" "Tennis" "Football" "Baseball"))))))))
+  └────
+
+  Ah, now I understand.
+
+
+1.4 Applications
+────────────────
+
+  Some example applications may be found in the [examples directory]:
+
+  ⁃ Deffy shows top-level definitions and forms in an Elisp project or
+    file:
+  ⁃ Diredy rearranges a Dired buffer into groups by file size and type:
+  ⁃ Musicy shows a music library with tracks categorized by genre,
+    artist, year, album, etc:
+
+
+[examples directory] <file:examples/>
+
+
+2 Installation
+══════════════
+
+  `taxy' is distributed in [GNU ELPA], which is available in Emacs by
+  default.  Use `M-x package-install RET taxy RET', then `(require
+  'taxy)' in your Elisp project.
+
+
+[GNU ELPA] <https://elpa.gnu.org/>
+
+
+3 Usage
+═══════
+
+  • 
+  • 
+  • 
+  • 
+  • 
+  • 
+
+  A taxy is defined with the `make-taxy' constructor, like:
+
+  ┌────
+  │ (make-taxy :name "Numbery"
+  │ 	   :description "A silly taxonomy of numbers."
+  │ 	   :predicate #'numberp
+  │ 	   :then #'ignore
+  │ 	   :taxys (list ...))
+  └────
+
+  The `:predicate' function determines whether an object fits into that
+  taxy.  If it does, `taxy-fill' adds the object to that taxy's
+  descendant `:taxys', if present, or to its own `:items'.  The function
+  defaults to `identity', so a taxy "takes in" any object by default
+  (i.e. if you only apply objects you want to classify, there's no need
+  to test them at the top-level taxy).
+
+  The `:then' function determines what happens to an object after being
+  taken in to the taxy's `:items': if the function, called with the
+  object, returns a non-nil value, that value is applied to other taxys
+  at the same level until one of their `:then' functions returns nil or
+  no more taxys remain.  The function defaults to `ignore', which makes
+  a taxy "consume" its items by default.  Setting the function to,
+  e.g. `identity', makes it not consume them, leaving them eligible to
+  also be taken into subsequent taxys, or to appear in the parent taxy's
+  items.
+
+  After defining a taxy, call `taxy-fill' with it and a list of objects
+  to fill the taxy's hierarchy.  *Note:* `taxy-fill' modifies the taxy
+  given to it (filling its `:items' and those of its `:taxys'), so when
+  using a statically defined taxy (e.g. one defined with `defvar'), you
+  should pass `taxy-fill' a taxy copied with `taxy-emptied', which
+  recursively copies a taxy without `:items'.
+
+  To return a taxy in a more human-readable format (with only relevant
+  fields included), use `taxy-plain'.  You may also use `taxy-mapcar' to
+  replace items in a taxy with, e.g. a more useful representation.
+
+
+3.1 Reusable taxys
+──────────────────
+
+  Since taxys are structs, they may be stored in variables and used in
+  other structs (being sure to copy the root taxy with `taxy-emptied'
+  before filling).  For example, this shows using `taxy' to classify
+  Matrix rooms in [Ement.el]:
+
+  ┌────
+  │ (defun ement-roomy-buffer (room)
+  │   (alist-get 'buffer (ement-room-local room)))
+  │ 
+  │ (defvar ement-roomy-unread
+  │   (make-taxy :name "Unread"
+  │ 	     :predicate (lambda (room)
+  │ 			  (buffer-modified-p (ement-roomy-buffer room)))))
+  │ 
+  │ (defvar ement-roomy-opened
+  │   (make-taxy :name "Opened"
+  │ 	     :description "Rooms with buffers"
+  │ 	     :predicate #'ement-roomy-buffer
+  │ 	     :taxys (list ement-roomy-unread
+  │ 			  (make-taxy))))
+  │ 
+  │ (defvar ement-roomy-closed
+  │   (make-taxy :name "Closed"
+  │ 	     :description "Rooms without buffers"
+  │ 	     :predicate (lambda (room)
+  │ 			  (not (ement-roomy-buffer room)))))
+  │ 
+  │ (defvar ement-roomy
+  │   (make-taxy
+  │    :name "Ement Rooms"
+  │    :taxys (list (make-taxy
+  │ 		 :name "Direct"
+  │ 		 :description "Direct messaging rooms"
+  │ 		 :predicate (lambda (room)
+  │ 			      (ement-room--direct-p room ement-session))
+  │ 		 :taxys (list ement-roomy-opened
+  │ 			      ement-roomy-closed))
+  │ 		(make-taxy
+  │ 		 :name "Non-direct"
+  │ 		 :description "Group chat rooms"
+  │ 		 :taxys (list ement-roomy-opened
+  │ 			      ement-roomy-closed)))))
+  └────
+
+  Note how the taxys defined in the first three variables are used in
+  subsequent taxys.  As well, the `ement-roomy-opened' taxy has an
+  "anonymous" taxy, which collects any rooms that aren't collected by
+  its sibling taxy (otherwise those objects would be collected into the
+  parent, "Opened" taxy, which may not always be the most useful way to
+  present the objects).
+
+  Using those defined taxys, we then fill the `ement-roomy' taxy with
+  all of the rooms in the user's session, and then use `taxy-mapcar' to
+  replace the room structs with useful representations for display:
+
+  ┌────
+  │ (taxy-plain
+  │  (taxy-mapcar (lambda (room)
+  │ 		(list (ement-room--room-display-name room)
+  │ 		      (ement-room-id room)))
+  │    (taxy-fill (ement-session-rooms ement-session)
+  │ 	      (taxy-emptied ement-roomy))))
+  └────
+
+  This produces:
+
+  ┌────
+  │ ("Ement Rooms"
+  │  (("Direct" "Direct messaging rooms"
+  │    (("Opened" "Rooms with buffers"
+  │      (("Unread"
+  │        (("Lars Ingebrigtsen" "!nope:gnus.org")))))
+  │     ("Closed" "Rooms without buffers"
+  │      (("John Wiegley" "!not-really:newartisans.com")
+  │       ("Eli Zaretskii" "!im-afraid-not:gnu.org")))))
+  │   ("Non-direct" "Group chat rooms"
+  │    (("Opened" "Rooms with buffers"
+  │      (("Unread"
+  │        (("Emacs" "!WfZsmtnxbxTdoYPkaT:greyface.org")
+  │ 	("#emacs" "!KuaCUVGoCiunYyKEpm:libera.chat")))
+  │       ;; The non-unread buffers in the "anonymous" taxy.
+  │       ((("magit/magit" "!HZYimOcmEAsAxOcgpE:gitter.im")
+  │ 	("Ement.el" "!NicAJNwJawmHrEhqZs:matrix.org")
+  │ 	("#emacsconf" "!UjTTDnYmSAslLTtMCF:libera.chat")
+  │ 	("Emacs Matrix Client" "!ZrZoyXEyFrzcBZKNis:matrix.org")
+  │ 	("org-mode" "!rUhEinythPhVTdddsb:matrix.org")
+  │ 	("This Week in Matrix (TWIM)" "!xYvNcQPhnkrdUmYczI:matrix.org")))))
+  │     ("Closed" "Rooms without buffers"
+  │      (("#matrix-spec" "!NasysSDfxKxZBzJJoE:matrix.org")
+  │       ("#commonlisp" "!IiGsrmKRHzpupHRaKS:libera.chat")
+  │       ("Matrix HQ" "!OGEhHVWSdvArJzumhm:matrix.org")
+  │       ("#lisp" "!czLxhhEegTEGNKUBgo:libera.chat")
+  │       ("Emacs" "!gLamGIXTWBaDFfhEeO:matrix.org")
+  │       ("#matrix-dev:matrix.org" "!jxlRxnrZCsjpjDubDX:matrix.org")))))))
+  └────
+
+
+[Ement.el] <https://github.com/alphapapa/ement.el>
+
+
+3.2 Threading macros
+────────────────────
+
+  If you happen to like macros, `taxy' works well with threading
+  (i.e. `thread-last' or `->>'):
+
+  ┌────
+  │ (thread-last ement-roomy
+  │   taxy-emptied
+  │   (taxy-fill (ement-session-rooms ement-session))
+  │   (taxy-mapcar (lambda (room)
+  │ 		 (list (ement-room--room-display-name room)
+  │ 		       (ement-room-id room))))
+  │   taxy-plain)
+  └────
+
+
+3.3 Modifying filled taxys
+──────────────────────────
+
+  Sometimes it's necessary to modify a taxy after filling it with
+  objects, e.g. to sort the items and/or the sub-taxys.  For this, use
+  the function `taxy-mapc-taxys' (a.k.a. `taxy-mapc*').  For example, in
+  the sample application [musicy.el], the taxys and their items are
+  sorted after filling, like so:
+
+  ┌────
+  │ (defun musicy-files (files)
+  │   (thread-last musicy-taxy
+  │     taxy-emptied
+  │     (taxy-fill files)
+  │     ;; Sort sub-taxys by their name.
+  │     (taxy-sort* #'string< #'taxy-name)
+  │     ;; Sort sub-taxys' items by name.
+  │     (taxy-sort #'string< #'identity)
+  │     taxy-magit-section-pp))
+  └────
+
+
+[musicy.el] <file:examples/musicy.el>
+
+
+3.4 Dynamic taxys
+─────────────────
+
+  • 
+  • 
+  • 
+
+  You may not always know in advance what taxonomy a set of objects fits
+  into, so `taxy' lets you add taxys dynamically by using the `:take'
+  function to add a taxy when an object is "taken into" a parent taxy's
+  items.  For example, you could dynamically classify buffers by their
+  major mode like so:
+
+  ┌────
+  │ (defun buffery-major-mode (buffer)
+  │   (buffer-local-value 'major-mode buffer))
+  │ 
+  │ (defvar buffery
+  │   (make-taxy
+  │    :name "Buffers"
+  │    :taxys (list
+  │ 	   (make-taxy
+  │ 	    :name "Modes"
+  │ 	    :take (apply-partially #'taxy-take-keyed (list #'buffery-major-mode))))))
+  │ 
+  │ ;; Note the use of `taxy-emptied' to avoid mutating the original taxy definition.
+  │ (taxy-plain
+  │  (taxy-fill (buffer-list)
+  │ 	    (taxy-emptied buffery)))
+  └────
+
+  The taxy's `:take' function is set to the `taxy-take-keyed' function,
+  partially applied with the `buffery-major-mode' function as its list
+  of `key-fns' (`taxy-fill' supplies the buffer and the taxy as
+  arguments), and it produces this taxonomy of buffers:
+
+  ┌────
+  │ ("Buffers"
+  │  (("Modes"
+  │    ((magit-process-mode
+  │      (#<buffer magit-process: taxy.el> #<buffer magit-process: > #<buffer magit-process: notes>))
+  │     (messages-buffer-mode
+  │      (#<buffer *Messages*>))
+  │     (special-mode
+  │      (#<buffer *Warnings*> #<buffer *elfeed-log*>))
+  │     (dired-mode
+  │      (#<buffer ement.el<emacs>>))
+  │     (Custom-mode
+  │      (#<buffer *Customize Apropos*>))
+  │     (fundamental-mode
+  │      (#<buffer  *helm candidates:Bookmarks*> #<buffer *Backtrace*>))
+  │     (magit-diff-mode
+  │      (#<buffer magit-diff: taxy.el> #<buffer magit-diff: notes> #<buffer magit-diff: ement.el>))
+  │     (compilation-mode
+  │      (#<buffer *compilation*> #<buffer *Compile-Log*>))
+  │     (Info-mode
+  │      (#<buffer  *helm info temp buffer*> #<buffer *info*>))
+  │     (help-mode
+  │      (#<buffer *Help*>))
+  │     (emacs-lisp-mode
+  │      (#<buffer ement.el<ement.el>> #<buffer ement-room-list.el> #<buffer *scratch*>
+  │ 	       #<buffer ement-room.el> #<buffer init.el> #<buffer bufler.el>
+  │ 	       #<buffer dash.el> #<buffer *Pp Eval Output*> #<buffer taxy.el> #<buffer scratch.el>))))))
+  └────
+
+
+3.4.1 Multi-level dynamic taxys
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  Of course, the point of taxonomies is that they aren't restricted to a
+  single level of depth, so you may also use the function
+  `taxy-take-keyed' to dynamically make multi-level taxys.
+
+  Expanding on the previous example, we use `cl-labels' to define
+  functions which are used in the taxy's definition, which are used in
+  the `:take' function, which calls `taxy-take-keyed' (rather than using
+  `apply-partially' like in the previous example, we use a lambda
+  function, which performs better than partially applied functions).
+  Then when the taxy is filled, a multi-level hierarchy is created
+  dynamically, organizing buffers first by their directory, and then by
+  mode in each directory.
+
+  ┌────
+  │ (defvar buffery
+  │   (cl-labels ((buffer-mode (buffer) (buffer-local-value 'major-mode buffer))
+  │ 	      (buffer-directory (buffer) (buffer-local-value 'default-directory buffer)))
+  │     (make-taxy
+  │      :name "Buffers"
+  │      :taxys (list
+  │ 	     (make-taxy
+  │ 	      :name "Directories"
+  │ 	      :take (lambda (item taxy)
+  │ 		      (taxy-take-keyed (list #'buffer-directory #'buffer-mode) item taxy)))))))
+  │ 
+  │ (taxy-plain
+  │  (taxy-fill (buffer-list)
+  │ 	    (taxy-emptied buffery)))
+  └────
+
+  That produces a list like:
+
+  ┌────
+  │ ("Buffers"
+  │  (("Directories"
+  │    (("~/src/emacs/ement.el/"
+  │      ((dired-mode
+  │        (#<buffer ement.el<emacs>))
+  │       (emacs-lisp-mode
+  │        (#<buffer ement.el<ement.el> #<buffer ement-room-list.el> #<buffer ement-room.el>))
+  │       (magit-diff-mode
+  │        (#<buffer magit-diff: ement.el>))))
+  │     ("~/src/emacs/taxy.el/"
+  │      ((dired-mode
+  │        (#<buffer taxy.el<emacs>))
+  │       (Info-mode
+  │        (#<buffer *info*>))
+  │       (magit-status-mode
+  │        (#<buffer magit: taxy.el>))
+  │       (emacs-lisp-mode
+  │        (#<buffer taxy-magit-section.el> #<buffer taxy.el<taxy.el> #<buffer scratch.el>))))))))
+  └────
+
+
+3.4.2 "Chains" of independent, multi-level dynamic taxys
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  /Naming things is hard./
+
+  Going a step further, each element in the `taxy-take-keyed' function's
+  `KEY-FNS' argument may be a list of functions (or a list of lists of
+  functions, etc.), which creates a "chain" of "independent" dynamic
+  taxys.  Each such chain may be said to "short-circuit" the filling
+  process in that, when an object is "taken" by the first key function
+  in a chain, the object is not "offered" to other functions outside
+  that chain.  This allows each dynamic sub-taxy to have its own set of
+  sub-taxys, rather than sharing the same "global" set.  In effect, this
+  creates multiple, unique taxonomies that share a single root taxy.
+
+  Building on the `sporty' example, let's define a taxy in which outdoor
+  sports are classified only by whether they involve a disc, but indoor
+  sports are additionally classified by whatever equipment they may use:
+
+  ┌────
+  │ (defvar sporty-dynamic
+  │   (cl-macrolet ((in (needle haystack)
+  │ 		    `(lambda (item)
+  │ 		       (when (member ,needle (funcall ,haystack item))
+  │ 			 ,needle))))
+  │     (cl-labels ((outdoor-p
+  │ 		 (sport) (when (eq 'outdoor (sport-venue sport))
+  │ 			   "Outdoor"))
+  │ 		(indoor-p
+  │ 		 (sport) (when (eq 'indoor (sport-venue sport))
+  │ 			   "Indoor"))
+  │ 		(disc-p
+  │ 		 (sport) (if (funcall (in 'disc 'sport-uses) sport)
+  │ 			     'disc
+  │ 			   'non-disc)))
+  │       (make-taxy
+  │        :name "Sporty (dynamic)"
+  │        :take (lambda (item taxy)
+  │ 	       (taxy-take-keyed
+  │ 		 (list (list #'outdoor-p #'disc-p)
+  │ 		       (list #'indoor-p
+  │ 			     (in 'ball 'sport-uses)
+  │ 			     (in 'disc 'sport-uses)
+  │ 			     (in 'glove 'sport-uses)
+  │ 			     (in 'racket 'sport-uses)))
+  │ 		 item taxy))))))
+  └────
+
+  Now let's fill the taxy with the sports and format it:
+
+  ┌────
+  │ (thread-last sporty-dynamic
+  │   taxy-emptied
+  │   (taxy-fill sports)
+  │   (taxy-mapcar #'sport-name)
+  │   taxy-plain)
+  └────
+
+  ┌────
+  │ ("Sporty (dynamic)"
+  │  (("Indoor"
+  │    ((ball
+  │      ("Volleyball" "Basketball")
+  │      ((glove
+  │        ("Handball"))
+  │       (racket
+  │        ("Racquetball"))))))
+  │   ("Outdoor"
+  │    ((disc
+  │      ("Ultimate" "Disc golf"))
+  │     (non-disc
+  │      ("Soccer" "Tennis" "Football" "Baseball"))))))
+  └────
+
+
+3.4.3 Defining a classification domain-specific language
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  When writing a larger Taxy-based application, it may be necessary to
+  define a number of key functions that would be unwieldy to manage in a
+  `cl-labels' form.  For this case, Taxy provides the macro
+  `taxy-define-key-definer' to easily define Taxy key functions in an
+  application library.  Those functions are then passed to the function
+  `taxy-make-take-function' at runtime, along with a list of keys being
+  used to classify items.  Using these allows key functions to be
+  defined in top-level forms, and it allows an application to be
+  extended by users by defining additional key functions in their
+  configurations.
+
+  Extending the previous `sporty' example, let's redefine its key
+  functions using `taxy-define-key-definer':
+
+  ┌────
+  │ (taxy-define-key-definer sporty-define-key
+  │   sporty-keys "sporty"
+  │   "Define a `sporty' key function.")
+  │ 
+  │ (sporty-define-key disc-based ()
+  │   (if (member 'disc (sport-uses item))
+  │       "Disc-based"
+  │     "Non-disc-based"))
+  │ 
+  │ (sporty-define-key uses (&optional thing)
+  │   (pcase thing
+  │     (`nil (sport-uses item))
+  │     (_ (when (cl-typecase (sport-uses item)
+  │ 	       (symbol (equal thing (sport-uses item)))
+  │ 	       (list (member thing (sport-uses item))))
+  │ 	 thing))))
+  │ 
+  │ (sporty-define-key venue (&optional place)
+  │   (pcase place
+  │     (`nil (sport-venue item))
+  │     (_ (when (equal place (sport-venue item))
+  │ 	 (sport-venue item)))))
+  └────
+
+  Now we'll define the default keys to use when classifying items.  This
+  list is equivalent to the one passed to `taxy-take-keyed' in the
+  previous, "Chains" example.
+
+  ┌────
+  │ (defvar sporty-default-keys
+  │   '(
+  │     ((venue 'outdoor)
+  │      disc-based)
+  │ 
+  │     ((venue 'indoor)
+  │      (uses 'ball)
+  │      (uses 'disc)
+  │      (uses 'glove)
+  │      (uses 'racket))))
+  └────
+
+  Finally, rather than using a pre-made taxy struct, we make one at
+  runtime, making the `:take' function with `taxy-make-take-function'.
+
+  ┌────
+  │ (let ((taxy (make-taxy
+  │ 	     :name "Sporty (DSL)"
+  │ 	     :take (taxy-make-take-function sporty-default-keys
+  │ 					    sporty-keys))))
+  │   (thread-last taxy
+  │     (taxy-fill sports)
+  │     (taxy-mapcar #'sport-name)
+  │     taxy-plain))
+  └────
+
+  Which gives us:
+
+  ┌────
+  │ ("Sporty (DSL)"
+  │  ((indoor
+  │    ((ball
+  │      ("Volleyball" "Basketball")
+  │      ((glove
+  │        ("Handball"))
+  │       (racket
+  │        ("Racquetball"))))))
+  │   (outdoor
+  │    (("Disc-based"
+  │      ("Ultimate" "Disc golf"))
+  │     ("Non-disc-based"
+  │      ("Soccer" "Tennis" "Football" "Baseball"))))))
+  └────
+
+  As you can see, the result is the same as that in the previous
+  example, but we've defined a kind of DSL for grouping sports in a
+  modular, extendable way.
+
+  This also allows the grouping keys to be easily changed at runtime,
+  producing a different result.  For example, we could group sports by,
+  first, whether they use a ball, and then by venue.  Let's do this in a
+  function so that users can pass their own list of keys:
+
+  ┌────
+  │ (cl-defun sporty-classify (sports &key (keys sporty-default-keys))
+  │   (declare (indent defun))
+  │   (let* ((taxy (make-taxy
+  │ 		:name "Sporty (DSL)"
+  │ 		:take (taxy-make-take-function keys
+  │ 					       sporty-keys))))
+  │     (thread-last taxy
+  │       (taxy-fill sports)
+  │       (taxy-mapcar #'sport-name)
+  │       taxy-plain)))
+  │ 
+  │ (sporty-classify sports
+  │   :keys '((uses 'ball) venue))
+  └────
+
+  And this produces:
+
+  ┌────
+  │ ("Sporty (DSL)"
+  │  ((outdoor
+  │    ("Ultimate" "Disc golf"))
+  │   (ball
+  │    ((indoor
+  │      ("Volleyball" "Handball" "Racquetball" "Basketball"))
+  │     (outdoor
+  │      ("Soccer" "Tennis" "Football" "Baseball"))))))
+  └────
+
+
+3.5 Magit section
+─────────────────
+
+  Showing a `taxy' with `magit-section' is easy using the library
+  [taxy-magit-section], which is packaged separately:
+
+  ┌────
+  │ (require 'taxy-magit-section)
+  │ 
+  │ ;; Using the `numbery' taxy defined in earlier examples:
+  │ (thread-last numbery
+  │   taxy-emptied ;; Get an empty copy of the taxy, since it's defined in a variable.
+  │   (taxy-fill (reverse (cl-loop for i below 30 collect i)))
+  │   taxy-magit-section-pp)
+  └────
+
+  That shows a buffer like this:
+
+
+[taxy-magit-section]
+<https://github.com/alphapapa/taxy.el/tree/package/taxy-magit-section>
+
+
+3.6 Reference
+─────────────
+
+  In Emacs 28+, see also `M-x shortdoc-display-group RET taxy RET'.
+
+
+3.6.1 Functions
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  taxy-flatten (taxy)
+        Return a list of items in `taxy' and its sub-taxys.
+
+  taxy-emptied (taxy)
+        Return a copy of `taxy' without items.  Omits =taxy=’s items and
+        those of its descendant taxys.  Useful when reusing taxy
+        definitions.
+
+  taxy-fill (items taxy)
+        Fill `taxy' with `items' according to its definition.
+
+  taxy-make-take-function (keys aliases)
+        Return a taxy "take" function for `keys'.  Each of `keys' should
+        be a function alias defined in `aliases', or a list of such
+        `key-fns' (recursively, ad infinitum, approximately).  `aliases'
+        should be an alist mapping aliases to functions (such as defined
+        with a definer defined by `taxy-define-key-definer').
+
+  taxy-mapc-taxys (fn taxy)
+        *Alias:* `taxy-mapc*'
+
+        Return `taxy' having applied `fn' to it and its descendants.
+        Does not copy `taxy'.  Destructively modifies `taxy', if `fn'
+        does.
+
+  taxy-mapcar-items (fn taxy)
+        *Alias:* `taxy-mapcar'
+
+        Return copy of `taxy', having replaced its items with the value
+        of `fn' on each.  Replaces every item in `taxy' and its
+        descendants.  Useful to replace items with a more useful form
+        after classification.
+
+  taxy-plain (taxy)
+        Return a list of the human-readable parts of `taxy'.
+
+  taxy-size (taxy)
+        Return the number of items `taxy' holds.  Includes items in
+        `taxy' ’s sub-taxys.
+
+  taxy-sort-items (pred key taxy)
+        *Alias:* `taxy-sort'
+
+        Sort `taxy' ’s items by `pred' and `key'.  Sorts items in `taxy'
+        and its sub-taxys.  `key' is passed to `cl-sort', which see.
+
+  taxy-sort-taxys (pred key taxy)
+        *Alias:* `taxy-sort*'
+
+        Sort `taxy' ’s sub-taxys by `pred' and `key'.  `key' is passed
+        to `cl-sort', which see.
+
+
+3.6.2 Macros
+╌╌╌╌╌╌╌╌╌╌╌╌
+
+  taxy-define-key-definer (name variable prefix docstring)
+        Define a macro `name' that defines a key-function-defining
+        macro.  The defined macro, having string `docstring', associates
+        the defined key functions with their aliases in an alist stored
+        in symbol `variable'.  The defined key functions are named
+        having string `prefix', which will have a hyphen appended to it.
+        The key functions take one or more arguments, the first of which
+        is the item being tested, bound within the function to `item'.
+
+
+4 Changelog
+═══════════
+
+4.1 0.10.2
+──────────
+
+  *Fixes*
+  ⁃ Reduce potential length of macro-expanded docstrings to prevent
+    byte-compiler warnings in downstream packages.
+
+
+4.2 0.10.1
+──────────
+
+  *Examples*
+  ⁃ Fixed byte-compilation of `diredy.el'.
+
+
+4.3 0.10
+────────
+
+  *Examples*
+  ⁃ Deffy
+    ⁃ Fix: Disambiguate forms with the same name.
+  ⁃ Diredy: Various small improvements.
+
+
+4.4 0.9
+───────
+
+4.4.1 Changes
+╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Library `taxy-magit-section' is now [packaged separately] and
+    maintained in a [separate branch].
+  ⁃ Minor fixes to documentation and examples.
+
+
+[packaged separately]
+<https://elpa.gnu.org/packages/taxy-magit-section.html>
+
+[separate branch]
+<https://github.com/alphapapa/taxy.el/tree/package/taxy-magit-section>
+
+
+4.5 0.8
+───────
+
+4.5.1 Additions
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Short documentation group for Emacs 28+.
+
+
+4.5.2 Fixes
+╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Require `map' for `pcase' pattern.
+
+
+4.6 0.7
+───────
+
+4.6.1 Additions
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Function `taxy-flatten' returns a list of the items in a taxy and
+    its sub-taxys.
+  ⁃ Function/macro reference documentation.
+  ⁃ Example application `bookmarky' lists Emacs bookmarks grouped with
+    Taxy.
+
+
+4.7 0.6
+───────
+
+4.7.1 Additions
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Sorting functions:
+    ⁃ `taxy-sort-items' (alias: `taxy-sort') sorts the items in a taxy
+      and its sub-taxys.
+    ⁃ `taxy-sort-taxys' (alias: `taxy-sort*') sorts a taxy's sub-taxys.
+  ⁃ Defining classification domain-specific languages:
+    ⁃ Macro `taxy-define-key-definer' defines a key-function-defining
+      macro.
+    ⁃ Function `taxy-make-take-function' makes a `:take' function using
+      a list of key functions and a set of classification keys.
+  ⁃ Table-like, column-based formatting system for `taxy-magit-section':
+    ⁃ Function `taxy-magit-section-format-items', which formats items by
+      columns.
+    ⁃ Variable `taxy-magit-section-insert-indent-items', which controls
+      whether `taxy-magit-section-insert' applies indentation to each
+      item.  (Used to disable that behavior when items are pre-indented
+      strings, e.g. as formatted by `taxy-magit-section-format-items'.)
+  ⁃ Example application `deffy', which shows an overview of top-level
+    definitions and forms in an Elisp project or file.  (Likely to be
+    published as a separate package later.)
+
+
+4.8 0.5
+───────
+
+4.8.1 Additions
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Function `taxy-magit-section-insert' takes new arguments:
+    • `:initial-depth' sets the level at which the first level of
+      hierarchy is considered to be at, for purposes of indentation.
+      Setting it to a negative number prevents indentation of so many
+      levels (i.e. setting it to -1 causes the first two levels to be
+      unindented, since the first level will be considered to be at
+      depth -1, and the second at depth 0).
+    • `:blank-between-depth' sets the level up to which blank lines
+      are inserted between sections (i.e. setting it to 1 causes blank
+      lines to be inserted between sections up to depth 1, but not
+      between sections deeper than that).
+  ⁃ Struct `taxy-magit-section' has a new `heading-face' slot, a
+    function which takes a depth level argument and returns the face
+    with which to propertize that section's heading.
+  ⁃ New example `taxy-package-report'.
+
+
+4.8.2 Fixes
+╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Example `diredy' referred to an old function name.
+
+
+4.9 0.4
+───────
+
+  ⁃ Incremented version to cause a new ELPA release (since removing a
+    file that wasn't intended to be distributed on ELPA).
+
+
+4.10 0.3
+────────
+
+4.10.1 Changes
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Within the `taxy' struct and related functions, the term `objects'
+    is renamed to `items', which is shorter and has the same meaning.
+    This makes code a bit more concise (e.g. `(taxy-objects taxy)'
+    becomes `(taxy-items taxy)').
+
+
+4.10.2 Fixes
+╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Function `taxy-fill' always calls a taxy's `:take' function if
+    defined.  (Fixing "chains" of dynamic taxys.)
+  ⁃ Function `taxy-magit-section-insert' applies text properties from
+    the inserted string to the indentation string (so commands that
+    rely on text properties at the beginning of a line will work).
+
+
+4.11 0.2
+────────
+
+4.11.1 Changes
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Function `taxy-take-keyed*' is renamed to `taxy-take-keyed',
+    replacing the old function: it's more powerful, and there's little
+    reason to maintain two versions.
+
+
+4.11.2 Additions
+╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ Struct `taxy' now has a `:make' slot, a function called to make new
+    sub-taxys by `take-take-keyed' (defaulting to `make-taxy').  This
+    is useful when defining structs specialized on `taxy'.
+  ⁃ Struct `taxy-magit-section' now has an `:indent' slot, a number of
+    characters by which to indent each level of sub-taxy, applied
+    automatically by function `taxy-magit-section-insert'.
+  ⁃ Each element of the new `taxy-take-keyed''s `KEY-FNS' argument may
+    now be a function or a list of functions (or a list of a list of
+    functions, etc.).  Lists of functions create "chains" of
+    independent, dynamic taxys descending from a single root taxy.  See
+    .
+
+
+4.11.3 Fixes
+╌╌╌╌╌╌╌╌╌╌╌╌
+
+  ⁃ `taxy-magit-section''s `insert-object' function.
+  ⁃ `taxy-fill' now applies objects to the root taxy if no sub-taxys
+    take them.
+
+
+4.12 0.1
+────────
+
+  First tagged version.
+
+
+5 Development
+═════════════
+
+  Bug reports, feature requests, suggestions — /oh my/!
+
+
+5.1 Copyright assignment
+────────────────────────
+
+  This package is part of [GNU Emacs], being distributed in [GNU ELPA].
+  Contributions to this project must follow GNU guidelines, which means
+  that, as with other parts of Emacs, patches of more than a few lines
+  must be accompanied by having assigned copyright for the contribution
+  to the FSF.  Contributors who wish to do so may contact
+  [emacs-devel@gnu.org] to request the assignment form.
+
+
+[GNU Emacs] <https://www.gnu.org/software/emacs/>
+
+[GNU ELPA] <https://elpa.gnu.org/>
+
+[emacs-devel@gnu.org] <mailto:emacs-devel@gnu.org>
+
+
+6 Credits
+═════════
+
+  ⁃ Thanks to Stefan Monnier for his feedback, and for maintaining GNU
+    ELPA.
+
+
+7 License
+═════════
+
+  GPLv3
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/README.org b/emacs/.emacs.d/elpa/taxy-0.10.2/README.org
new file mode 100644
index 0000000..23c7f04
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/README.org
@@ -0,0 +1,1093 @@
+#+TITLE: taxy.el
+
+#+PROPERTY: LOGGING nil
+
+# Note: This readme works with the org-make-toc <https://github.com/alphapapa/org-make-toc> package, which automatically updates the table of contents.
+
+#+HTML: <img src="images/mascot.png" align="right">
+
+[[https://elpa.gnu.org/packages/taxy.html][https://elpa.gnu.org/packages/taxy.svg]]
+
+/Now, where did I put that.../
+
+This library provides a programmable way to classify arbitrary objects into a hierarchical taxonomy.  (That's a lot of fancy words to say that this lets you automatically put things in nested groups.)
+
+Helpful features include:
+
++  Dynamic taxonomies :: Objects may be classified into hierarchies automatically defined at runtime based on their attributes.
++  Reusable taxonomies :: Taxonomy definitions may be stored in variables and reused in other taxonomies' descendant groups.
++  Classification domain-specific language :: Easily define a custom DSL used to classify items dynamically (which can be extended by users).
++  Flexible table view :: Based on =magit-section=, with easily defined columns (also extendable by users).
+
+* Contents                                                         :noexport:
+:PROPERTIES:
+:TOC:      :include siblings
+:END:
+:CONTENTS:
+- [[#examples][Examples]]
+- [[#installation][Installation]]
+- [[#usage][Usage]]
+- [[#changelog][Changelog]]
+- [[#development][Development]]
+- [[#credits][Credits]]
+:END:
+
+* Examples
+:PROPERTIES:
+:TOC:      :include descendants :depth 1 :ignore (descendants)
+:END:
+:CONTENTS:
+- [[#numbery-starting-basically][Numbery (starting basically)]]
+- [[#lettery-filling-incrementally][Lettery (filling incrementally)]]
+- [[#sporty-understanding-completely][Sporty (understanding completely)]]
+- [[#applications][Applications]]
+:END:
+
+May these examples help you classify your understanding.
+
+** Numbery (starting basically)
+
+Let's imagine a silly taxonomy of numbers below 100:
+
+#+BEGIN_SRC elisp
+  ("Numbery" "A silly taxonomy of numbers."
+   (("< 10" "Numbers below 10"
+     ;; These numbers are leftovers from the sub-taxys below.
+     (0 2 4 6 8)
+     ;; These sub-taxys further classify the numbers below 10 into odd
+     ;; and even.  The odd taxy "consumes" numbers, while the even one
+     ;; doesn't, leaving them to reappear in the parent taxy's items.
+     (("Odd" "(consuming)"
+       (1 3 5 7 9))
+      ("Even" "(non-consuming)"
+       (0 2 4 6 8))))
+    (">= 10" "Numbers above 9"
+     ;; Like in the "< 10" taxy, these numbers are leftovers from this
+     ;; taxy's sub-taxys, three of which are non-consuming.
+     (10 11 13 14 17 19 22 23 25 26 29 31 34 35 37 38 41 43 46 47 49 50 53 55 58
+         59 61 62 65 67 70 71 73 74 77 79 82 83 85 86 89 91 94 95 97 98)
+     (("Divisible by 3" "(non-consuming)"
+       (12 15 18 21 24 27 30 33 36 39 42 45 48 51 54 57 60 63 66 69 72 75 78 81 84
+           87 90 93 96 99))
+      ("Divisible by 4" "(non-consuming)"
+       (12 16 20 24 28 32 36 40 44 48 52 56 60 64 68 72 76 80 84 88 92 96))
+      ("Divisible by 3 or 4" "(consuming)"
+       ;; This taxy consumes numbers it takes in, but since these
+       ;; numbers have already been taken in (without being consumed) by
+       ;; the previous two sibling taxys, they may also appear in them.
+       (12 15 16 18 20 21 24 27 28 30 32 33 36 39 40 42 44 45 48 51 52 54 56 57 60
+           63 64 66 68 69 72 75 76 78 80 81 84 87 88 90 92 93 96 99))
+      ("Divisible by 5" "(non-consuming)"
+       (10 25 35 50 55 65 70 85 95))))))
+#+END_SRC
+
+You might think about how to produce that by writing some imperative code, but =taxy= allows you to do so in a more declarative and functional manner:
+
+#+BEGIN_SRC elisp :exports code
+  (require 'taxy)
+
+  (defvar numbery
+    (make-taxy
+     :name "Numbery"
+     :description "A silly taxonomy of numbers."
+     :taxys (list (make-taxy
+                   :name "< 10"
+                   :description "Numbers below 10 (consuming)"
+                   :predicate (lambda (n) (< n 10))
+                   :taxys (list
+                           ;; These sub-taxys further classify the numbers below 10 into odd
+                           ;; and even.  The odd taxy "consumes" numbers, while the even one
+                           ;; doesn't, leaving them to reappear in the parent taxy's items.
+                           (make-taxy :name "Odd"
+                                      :description "(consuming)"
+                                      :predicate #'oddp)
+                           (make-taxy :name "Even"
+                                      :description "(non-consuming)"
+                                      :predicate #'evenp
+                                      :then #'identity)))
+                  (make-taxy
+                   :name ">= 10"
+                   :description "Numbers above 9 (consuming)"
+                   :predicate (lambda (n) (>= n 10))
+                   :taxys (list
+                           ;; Like in the "< 10" taxy, these sub-taxys further classify
+                           ;; the numbers, but only one of them consumes numbers it
+                           ;; takes in, leaving the rest to reappear in the parent taxy.
+                           (make-taxy :name "Divisible by 3"
+                                      :description "(non-consuming)"
+                                      :predicate (lambda (n) (zerop (mod n 3)))
+                                      :then #'identity)
+                           (make-taxy :name "Divisible by 4"
+                                      :description "(non-consuming)"
+                                      :predicate (lambda (n) (zerop (mod n 4)))
+                                      :then #'identity)
+                           (make-taxy :name "Divisible by 3 or 4"
+                                      :description "(consuming)"
+                                      ;; Since this taxy's `:then' function is unset,
+                                      ;; it defaults to `ignore', which causes it to
+                                      ;; consume numbers it takes in.  Since these
+                                      ;; numbers have already been taken in (without
+                                      ;; being consumed) by the previous two sibling
+                                      ;; taxys, they also appear in them.
+                                      :predicate (lambda (n) (or (zerop (mod n 3))
+                                                                 (zerop (mod n 4)))))
+                           (make-taxy :name "Divisible by 5"
+                                      :description "(non-consuming)"
+                                      :predicate (lambda (n) (zerop (mod n 5)))
+                                      :then #'identity))))))
+
+  (let ((numbers (cl-loop for i below 100 collect i))
+        ;; Since `numbery' is stored in a variable, we use an emptied
+        ;; copy of it to avoid mutating the original taxy.
+        (taxy (taxy-emptied numbery)))
+    (taxy-plain (taxy-fill (reverse numbers) taxy)))
+#+END_SRC
+
+The ~taxy-fill~ function applies the numbers in a "cascade" down the hierarchy of "taxys", and the ~taxy-plain~ function returns a meaningful subset of the taxys' slots, suitable for display.
+
+** Lettery (filling incrementally)
+
+You can also add more items after the hierarchy has been filled.  In this example we'll make a comprehensive taxonomy of letters.  The first sub-taxy collects vowels, and the second, by leaving its predicate at the default value, ~identity~, collects all letters not collected by the first taxy, i.e. non-vowels.
+
+#+BEGIN_SRC elisp
+  (defvar lettery
+    (make-taxy
+     :name "Lettery"
+     :description "A comprehensive taxonomy of letters."
+     :taxys (list (make-taxy
+                   :name "Vowels"
+                   :description "You know what those are."
+                   :predicate (lambda (l)
+                                (member-ignore-case l '("a" "e" "i" "o" "u"))))
+                  (make-taxy
+                   :name "Consonants"
+                   :description "Well, if they aren't vowels..."))))
+
+  (taxy-plain
+   (taxy-fill (reverse
+               (cl-loop for l from ?a to ?n
+                        collect (upcase (char-to-string l))))
+              lettery))
+#+END_SRC
+
+That produces:
+
+#+BEGIN_SRC elisp
+  ("Lettery" "A comprehensive taxonomy of letters."
+   (("Vowels" "You know what those are."
+     ("A" "E" "I"))
+    ("Consonants" "Well, if they aren't vowels..."
+     ("B" "C" "D" "F" "G" "H" "J" "K" "L" "M" "N"))))
+#+END_SRC
+
+Oops, we forgot the letters after N!  Let's add them, too:
+
+#+BEGIN_SRC elisp
+  (taxy-plain
+   (taxy-fill (reverse
+               (cl-loop for l from ?n to ?z
+                        collect (upcase (char-to-string l))))
+              lettery))
+#+END_SRC
+
+Which gives us:
+
+#+BEGIN_SRC elisp
+  ("Lettery" "A comprehensive taxonomy of letters."
+   (("Vowels" "You know what those are."
+     ("O" "U" "A" "E" "I"))
+    ("Consonants" "Well, if they aren't vowels..."
+     ("N" "P" "Q" "R" "S" "T" "V" "W" "X" "Y" "Z" "B" "C" "D" "F" "G" "H" "J" "K" "L" "M" "N"))))
+#+END_SRC
+
+Oh, they're out of order, now.  That won't do.  Let's fix that:
+
+#+BEGIN_SRC elisp :exports code :results code
+  (taxy-plain
+   (taxy-sort #'string< #'identity lettery))
+#+END_SRC
+
+That's better:
+
+#+BEGIN_SRC elisp
+  ("Lettery" "A comprehensive taxonomy of letters."
+   (("Vowels" "You know what those are."
+     ("A" "E" "I" "O" "U"))
+    ("Consonants" "Well, if they aren't vowels..."
+     ("B" "C" "D" "F" "G" "H" "J" "K" "L" "M" "N" "N" "P" "Q" "R" "S" "T" "V" "W" "X" "Y" "Z"))))
+#+END_SRC
+
+** Sporty (understanding completely)
+
+Let's try to understand a few things about sports.  First we'll define a struct to make them easier to grasp:
+
+#+BEGIN_SRC elisp :exports code :results silent
+  (cl-defstruct sport
+    name uses venue fun)
+#+END_SRC
+
+Now we'll make a list of sports:
+
+#+BEGIN_SRC elisp :exports code :results silent
+  (defvar sports
+    (list (make-sport :name "Baseball"
+                      :uses '(bat ball glove)
+                      :venue 'outdoor
+                      :fun t)
+          (make-sport :name "Football"
+                      :uses '(ball)
+                      :venue 'outdoor
+                      :fun t)
+          (make-sport :name "Basketball"
+                      :uses '(ball hoop)
+                      :venue 'indoor
+                      :fun t)
+          (make-sport :name "Tennis"
+                      :uses '(ball racket)
+                      :venue 'outdoor
+                      :fun t)
+          (make-sport :name "Racquetball"
+                      :uses '(ball racket)
+                      :venue 'indoor
+                      :fun t)
+          (make-sport :name "Handball"
+                      :uses '(ball glove)
+                      :venue 'indoor
+                      :fun t)
+          (make-sport :name "Soccer"
+                      :uses '(ball)
+                      :venue 'outdoor
+                      :fun nil)
+          (make-sport :name "Disc golf"
+                      :uses '(disc basket)
+                      :venue 'outdoor
+                      :fun t)
+          (make-sport :name "Ultimate"
+                      :uses '(disc)
+                      :venue 'outdoor
+                      :fun t)
+          (make-sport :name "Volleyball"
+                      :uses '(ball)
+                      :venue 'indoor
+                      :fun t)))
+#+END_SRC
+
+And finally we'll define a taxy to organize them.  In this, we use a helper macro to make the ~member~ function easier to use in the list of key functions:
+
+#+BEGIN_SRC elisp :exports code :results silent :lexical t
+  (defvar sporty
+    (cl-macrolet ((in (needle haystack)
+                      `(lambda (item)
+                         (when (member ,needle (funcall ,haystack item))
+                           ,needle))))
+      (make-taxy
+       :name "Sporty"
+       :take (lambda (item taxy)
+               (taxy-take-keyed
+                 (list #'sport-venue
+                       (in 'ball 'sport-uses)
+                       (in 'disc 'sport-uses)
+                       (in 'glove 'sport-uses)
+                       (in 'racket 'sport-uses))
+                 item taxy
+                 ;; We set the `:then' function of the taxys
+                 ;; created by `taxy-take-keyed' to `identity'
+                 ;; so they will not consume their items.
+                 :then #'identity)))))
+#+END_SRC
+
+Now let's fill the taxy with the sports and format it:
+
+#+BEGIN_SRC elisp :exports code
+  (thread-last sporty
+    taxy-emptied
+    (taxy-fill sports)
+    (taxy-mapcar #'sport-name)
+    taxy-plain)
+#+END_SRC
+
+#+BEGIN_SRC elisp :exports code
+  ((("Sporty"
+     ((indoor
+       ((ball
+         ("Volleyball" "Basketball")
+         ((glove
+           ("Handball"))
+          (racket
+           ("Racquetball"))))))
+      (outdoor
+       ((disc
+         ("Ultimate" "Disc golf"))
+        (ball
+         ("Soccer" "Football")
+         ((racket
+           ("Tennis"))
+          (glove
+           ("Baseball"))))))))))
+#+END_SRC
+
+That's pretty sporty.  But classifying them by venue first makes the racket and glove sports not be listed together.  Let's swap the key functions around so the venue is classified at the deepest level of the hierarchy:
+
+#+BEGIN_SRC elisp :exports code :results silent
+  (defvar sporty
+    (cl-macrolet ((in (needle haystack)
+                      `(lambda (item)
+                         (when (member ,needle (funcall ,haystack item))
+                           ,needle))))
+      (make-taxy
+       :name "Sporty"
+       :take (lambda (item taxy)
+               (taxy-take-keyed
+                 (list (in 'ball 'sport-uses)
+                       (in 'disc 'sport-uses)
+                       (in 'glove 'sport-uses)
+                       (in 'racket 'sport-uses)
+                       #'sport-venue)
+                 item taxy
+                 :then #'identity)))))
+
+  (thread-last sporty
+    taxy-emptied
+    (taxy-fill sports)
+    (taxy-mapcar #'sport-name)
+    taxy-plain)
+#+END_SRC
+
+#+BEGIN_SRC elisp :exports code
+  ((("Sporty"
+     ((disc
+       ((outdoor
+         ("Ultimate" "Disc golf"))))
+      (ball
+       ((racket
+         ((indoor
+           ("Racquetball"))
+          (outdoor
+           ("Tennis"))))
+        (indoor
+         ("Volleyball" "Basketball"))
+        (outdoor
+         ("Soccer" "Football"))
+        (glove
+         ((indoor
+           ("Handball"))
+          (outdoor
+           ("Baseball"))))))))))
+#+END_SRC
+
+That's better.  But I'd also like to see a very simple classification to help me decide what to play:
+
+#+BEGIN_SRC elisp :exports code
+  (thread-last
+      (make-taxy
+       :name "Funny"
+       :take (lambda (item taxy)
+               (taxy-take-keyed
+                 (list (lambda (sport)
+                         (if (sport-fun sport)
+                             'fun 'boring))
+                       #'sport-venue)
+                 item taxy)))
+    taxy-emptied
+    (taxy-fill sports)
+    (taxy-mapcar #'sport-name)
+    taxy-plain)
+#+END_SRC
+
+#+BEGIN_SRC elisp :exports code
+((("Funny"
+   ((boring
+     ((outdoor
+       ("Soccer"))))
+    (fun
+     ((indoor
+       ("Volleyball" "Handball" "Racquetball" "Basketball"))
+      (outdoor
+       ("Ultimate" "Disc golf" "Tennis" "Football" "Baseball"))))))))
+#+END_SRC
+
+Ah, now I understand.
+
+** Applications
+
+Some example applications may be found in the [[file:examples/][examples directory]]:
+
++  Deffy shows top-level definitions and forms in an Elisp project or file:
+   [[images/deffy.png]]
++  Diredy rearranges a Dired buffer into groups by file size and type:
+   [[images/diredy.png]]
++  Musicy shows a music library with tracks categorized by genre, artist, year, album, etc:
+   [[images/musicy.png]]
+
+* Installation
+
+=taxy= is distributed in [[https://elpa.gnu.org/][GNU ELPA]], which is available in Emacs by default.  Use =M-x package-install RET taxy RET=, then ~(require 'taxy)~ in your Elisp project.
+
+* Usage
+:PROPERTIES:
+:TOC:      :include descendants :depth 1 :ignore (descendants)
+:END:
+:CONTENTS:
+- [[#reusable-taxys][Reusable taxys]]
+- [[#threading-macros][Threading macros]]
+- [[#modifying-filled-taxys][Modifying filled taxys]]
+- [[#dynamic-taxys][Dynamic taxys]]
+- [[#magit-section][Magit section]]
+- [[#reference][Reference]]
+:END:
+
+A taxy is defined with the ~make-taxy~ constructor, like:
+
+#+BEGIN_SRC elisp
+  (make-taxy :name "Numbery"
+             :description "A silly taxonomy of numbers."
+             :predicate #'numberp
+             :then #'ignore
+             :taxys (list ...))
+#+END_SRC
+
+The ~:predicate~ function determines whether an object fits into that taxy.  If it does, ~taxy-fill~ adds the object to that taxy's descendant ~:taxys~, if present, or to its own ~:items~.  The function defaults to ~identity~, so a taxy "takes in" any object by default (i.e. if you only apply objects you want to classify, there's no need to test them at the top-level taxy).
+
+The ~:then~ function determines what happens to an object after being taken in to the taxy's ~:items~: if the function, called with the object, returns a non-nil value, that value is applied to other taxys at the same level until one of their ~:then~ functions returns nil or no more taxys remain.  The function defaults to ~ignore~, which makes a taxy "consume" its items by default.  Setting the function to, e.g. ~identity~, makes it not consume them, leaving them eligible to also be taken into subsequent taxys, or to appear in the parent taxy's items.
+
+After defining a taxy, call ~taxy-fill~ with it and a list of objects to fill the taxy's hierarchy.  *Note:* ~taxy-fill~ modifies the taxy given to it (filling its ~:items~ and those of its ~:taxys~), so when using a statically defined taxy (e.g. one defined with ~defvar~), you should pass ~taxy-fill~ a taxy copied with ~taxy-emptied~, which recursively copies a taxy without ~:items~.
+
+To return a taxy in a more human-readable format (with only relevant fields included), use ~taxy-plain~.  You may also use ~taxy-mapcar~ to replace items in a taxy with, e.g. a more useful representation.
+
+** Reusable taxys
+
+Since taxys are structs, they may be stored in variables and used in other structs (being sure to copy the root taxy with ~taxy-emptied~ before filling).  For example, this shows using =taxy= to classify Matrix rooms in [[https://github.com/alphapapa/ement.el][Ement.el]]:
+
+#+BEGIN_SRC elisp
+  (defun ement-roomy-buffer (room)
+    (alist-get 'buffer (ement-room-local room)))
+
+  (defvar ement-roomy-unread
+    (make-taxy :name "Unread"
+               :predicate (lambda (room)
+                            (buffer-modified-p (ement-roomy-buffer room)))))
+
+  (defvar ement-roomy-opened
+    (make-taxy :name "Opened"
+               :description "Rooms with buffers"
+               :predicate #'ement-roomy-buffer
+               :taxys (list ement-roomy-unread
+                            (make-taxy))))
+
+  (defvar ement-roomy-closed
+    (make-taxy :name "Closed"
+               :description "Rooms without buffers"
+               :predicate (lambda (room)
+                            (not (ement-roomy-buffer room)))))
+
+  (defvar ement-roomy
+    (make-taxy
+     :name "Ement Rooms"
+     :taxys (list (make-taxy
+                   :name "Direct"
+                   :description "Direct messaging rooms"
+                   :predicate (lambda (room)
+                                (ement-room--direct-p room ement-session))
+                   :taxys (list ement-roomy-opened
+                                ement-roomy-closed))
+                  (make-taxy
+                   :name "Non-direct"
+                   :description "Group chat rooms"
+                   :taxys (list ement-roomy-opened
+                                ement-roomy-closed)))))
+#+END_SRC
+
+Note how the taxys defined in the first three variables are used in subsequent taxys.  As well, the ~ement-roomy-opened~ taxy has an "anonymous" taxy, which collects any rooms that aren't collected by its sibling taxy (otherwise those objects would be collected into the parent, "Opened" taxy, which may not always be the most useful way to present the objects).
+
+Using those defined taxys, we then fill the ~ement-roomy~ taxy with all of the rooms in the user's session, and then use ~taxy-mapcar~ to replace the room structs with useful representations for display:
+
+#+BEGIN_SRC elisp
+  (taxy-plain
+   (taxy-mapcar (lambda (room)
+                  (list (ement-room--room-display-name room)
+                        (ement-room-id room)))
+     (taxy-fill (ement-session-rooms ement-session)
+                (taxy-emptied ement-roomy))))
+#+END_SRC
+
+This produces:
+
+#+BEGIN_SRC elisp
+  ("Ement Rooms"
+   (("Direct" "Direct messaging rooms"
+     (("Opened" "Rooms with buffers"
+       (("Unread"
+         (("Lars Ingebrigtsen" "!nope:gnus.org")))))
+      ("Closed" "Rooms without buffers"
+       (("John Wiegley" "!not-really:newartisans.com")
+        ("Eli Zaretskii" "!im-afraid-not:gnu.org")))))
+    ("Non-direct" "Group chat rooms"
+     (("Opened" "Rooms with buffers"
+       (("Unread"
+         (("Emacs" "!WfZsmtnxbxTdoYPkaT:greyface.org")
+          ("#emacs" "!KuaCUVGoCiunYyKEpm:libera.chat")))
+        ;; The non-unread buffers in the "anonymous" taxy.
+        ((("magit/magit" "!HZYimOcmEAsAxOcgpE:gitter.im")
+          ("Ement.el" "!NicAJNwJawmHrEhqZs:matrix.org")
+          ("#emacsconf" "!UjTTDnYmSAslLTtMCF:libera.chat")
+          ("Emacs Matrix Client" "!ZrZoyXEyFrzcBZKNis:matrix.org")
+          ("org-mode" "!rUhEinythPhVTdddsb:matrix.org")
+          ("This Week in Matrix (TWIM)" "!xYvNcQPhnkrdUmYczI:matrix.org")))))
+      ("Closed" "Rooms without buffers"
+       (("#matrix-spec" "!NasysSDfxKxZBzJJoE:matrix.org")
+        ("#commonlisp" "!IiGsrmKRHzpupHRaKS:libera.chat")
+        ("Matrix HQ" "!OGEhHVWSdvArJzumhm:matrix.org")
+        ("#lisp" "!czLxhhEegTEGNKUBgo:libera.chat")
+        ("Emacs" "!gLamGIXTWBaDFfhEeO:matrix.org")
+        ("#matrix-dev:matrix.org" "!jxlRxnrZCsjpjDubDX:matrix.org")))))))
+#+END_SRC
+
+** Threading macros
+
+If you happen to like macros, ~taxy~ works well with threading (i.e. ~thread-last~ or ~->>~):
+
+#+BEGIN_SRC elisp
+  (thread-last ement-roomy
+    taxy-emptied
+    (taxy-fill (ement-session-rooms ement-session))
+    (taxy-mapcar (lambda (room)
+                   (list (ement-room--room-display-name room)
+                         (ement-room-id room))))
+    taxy-plain)
+#+END_SRC
+
+** Modifying filled taxys
+
+Sometimes it's necessary to modify a taxy after filling it with objects, e.g. to sort the items and/or the sub-taxys.  For this, use the function ~taxy-mapc-taxys~ (a.k.a. ~taxy-mapc*~).  For example, in the sample application [[file:examples/musicy.el][musicy.el]], the taxys and their items are sorted after filling, like so:
+
+#+BEGIN_SRC elisp
+  (defun musicy-files (files)
+    (thread-last musicy-taxy
+      taxy-emptied
+      (taxy-fill files)
+      ;; Sort sub-taxys by their name.
+      (taxy-sort* #'string< #'taxy-name)
+      ;; Sort sub-taxys' items by name.
+      (taxy-sort #'string< #'identity)
+      taxy-magit-section-pp))
+#+END_SRC
+
+** Dynamic taxys
+:PROPERTIES:
+:TOC:      :include descendants
+:END:
+:CONTENTS:
+- [[#multi-level-dynamic-taxys][Multi-level dynamic taxys]]
+- [[#chains-of-independent-multi-level-dynamic-taxys]["Chains" of independent, multi-level dynamic taxys]]
+- [[#defining-a-classification-domain-specific-language][Defining a classification domain-specific language]]
+:END:
+
+You may not always know in advance what taxonomy a set of objects fits into, so =taxy= lets you add taxys dynamically by using the ~:take~ function to add a taxy when an object is "taken into" a parent taxy's items.  For example, you could dynamically classify buffers by their major mode like so:
+
+#+BEGIN_SRC elisp :exports code
+  (defun buffery-major-mode (buffer)
+    (buffer-local-value 'major-mode buffer))
+
+  (defvar buffery
+    (make-taxy
+     :name "Buffers"
+     :taxys (list
+             (make-taxy
+              :name "Modes"
+              :take (apply-partially #'taxy-take-keyed (list #'buffery-major-mode))))))
+
+  ;; Note the use of `taxy-emptied' to avoid mutating the original taxy definition.
+  (taxy-plain
+   (taxy-fill (buffer-list)
+              (taxy-emptied buffery)))
+#+END_SRC
+
+The taxy's ~:take~ function is set to the ~taxy-take-keyed~ function, partially applied with the ~buffery-major-mode~ function as its list of ~key-fns~ (~taxy-fill~ supplies the buffer and the taxy as arguments), and it produces this taxonomy of buffers:
+
+#+BEGIN_SRC elisp
+  ("Buffers"
+   (("Modes"
+     ((magit-process-mode
+       (#<buffer magit-process: taxy.el> #<buffer magit-process: > #<buffer magit-process: notes>))
+      (messages-buffer-mode
+       (#<buffer *Messages*>))
+      (special-mode
+       (#<buffer *Warnings*> #<buffer *elfeed-log*>))
+      (dired-mode
+       (#<buffer ement.el<emacs>>))
+      (Custom-mode
+       (#<buffer *Customize Apropos*>))
+      (fundamental-mode
+       (#<buffer  *helm candidates:Bookmarks*> #<buffer *Backtrace*>))
+      (magit-diff-mode
+       (#<buffer magit-diff: taxy.el> #<buffer magit-diff: notes> #<buffer magit-diff: ement.el>))
+      (compilation-mode
+       (#<buffer *compilation*> #<buffer *Compile-Log*>))
+      (Info-mode
+       (#<buffer  *helm info temp buffer*> #<buffer *info*>))
+      (help-mode
+       (#<buffer *Help*>))
+      (emacs-lisp-mode
+       (#<buffer ement.el<ement.el>> #<buffer ement-room-list.el> #<buffer *scratch*>
+                 #<buffer ement-room.el> #<buffer init.el> #<buffer bufler.el>
+                 #<buffer dash.el> #<buffer *Pp Eval Output*> #<buffer taxy.el> #<buffer scratch.el>))))))
+#+END_SRC
+
+*** Multi-level dynamic taxys
+
+Of course, the point of taxonomies is that they aren't restricted to a single level of depth, so you may also use the function ~taxy-take-keyed~ to dynamically make multi-level taxys.
+
+Expanding on the previous example, we use ~cl-labels~ to define functions which are used in the taxy's definition, which are used in the ~:take~ function, which calls ~taxy-take-keyed~ (rather than using ~apply-partially~ like in the previous example, we use a lambda function, which performs better than partially applied functions).  Then when the taxy is filled, a multi-level hierarchy is created dynamically, organizing buffers first by their directory, and then by mode in each directory.
+
+# MAYBE: A macro to define :take functions more concisely.
+
+#+BEGIN_SRC elisp :exports code
+  (defvar buffery
+    (cl-labels ((buffer-mode (buffer) (buffer-local-value 'major-mode buffer))
+                (buffer-directory (buffer) (buffer-local-value 'default-directory buffer)))
+      (make-taxy
+       :name "Buffers"
+       :taxys (list
+               (make-taxy
+                :name "Directories"
+                :take (lambda (item taxy)
+                        (taxy-take-keyed (list #'buffer-directory #'buffer-mode) item taxy)))))))
+
+  (taxy-plain
+   (taxy-fill (buffer-list)
+              (taxy-emptied buffery)))
+#+END_SRC
+
+That produces a list like:
+
+#+BEGIN_SRC elisp
+  ("Buffers"
+   (("Directories"
+     (("~/src/emacs/ement.el/"
+       ((dired-mode
+         (#<buffer ement.el<emacs>))
+        (emacs-lisp-mode
+         (#<buffer ement.el<ement.el> #<buffer ement-room-list.el> #<buffer ement-room.el>))
+        (magit-diff-mode
+         (#<buffer magit-diff: ement.el>))))
+      ("~/src/emacs/taxy.el/"
+       ((dired-mode
+         (#<buffer taxy.el<emacs>))
+        (Info-mode
+         (#<buffer *info*>))
+        (magit-status-mode
+         (#<buffer magit: taxy.el>))
+        (emacs-lisp-mode
+         (#<buffer taxy-magit-section.el> #<buffer taxy.el<taxy.el> #<buffer scratch.el>))))))))
+#+END_SRC
+
+*** "Chains" of independent, multi-level dynamic taxys
+:PROPERTIES:
+:ID:       8aec3671-ee22-44a0-968c-81443f4dcd74
+:END:
+
+/Naming things is hard./
+
+Going a step further, each element in the ~taxy-take-keyed~ function's ~KEY-FNS~ argument may be a list of functions (or a list of lists of functions, etc.), which creates a "chain" of "independent" dynamic taxys.  Each such chain may be said to "short-circuit" the filling process in that, when an object is "taken" by the first key function in a chain, the object is not "offered" to other functions outside that chain.  This allows each dynamic sub-taxy to have its own set of sub-taxys, rather than sharing the same "global" set.  In effect, this creates multiple, unique taxonomies that share a single root taxy.
+
+Building on the ~sporty~ example, let's define a taxy in which outdoor sports are classified only by whether they involve a disc, but indoor sports are additionally classified by whatever equipment they may use:
+
+#+BEGIN_SRC elisp :exports code :results silent :lexical t
+  (defvar sporty-dynamic
+    (cl-macrolet ((in (needle haystack)
+                      `(lambda (item)
+                         (when (member ,needle (funcall ,haystack item))
+                           ,needle))))
+      (cl-labels ((outdoor-p
+                   (sport) (when (eq 'outdoor (sport-venue sport))
+                             "Outdoor"))
+                  (indoor-p
+                   (sport) (when (eq 'indoor (sport-venue sport))
+                             "Indoor"))
+                  (disc-p
+                   (sport) (if (funcall (in 'disc 'sport-uses) sport)
+                               'disc
+                             'non-disc)))
+        (make-taxy
+         :name "Sporty (dynamic)"
+         :take (lambda (item taxy)
+                 (taxy-take-keyed
+                   (list (list #'outdoor-p #'disc-p)
+                         (list #'indoor-p
+                               (in 'ball 'sport-uses)
+                               (in 'disc 'sport-uses)
+                               (in 'glove 'sport-uses)
+                               (in 'racket 'sport-uses)))
+                   item taxy))))))
+#+END_SRC
+
+Now let's fill the taxy with the sports and format it:
+
+#+BEGIN_SRC elisp :exports code :results code
+  (thread-last sporty-dynamic
+    taxy-emptied
+    (taxy-fill sports)
+    (taxy-mapcar #'sport-name)
+    taxy-plain)
+#+END_SRC
+
+#+BEGIN_SRC elisp :exports code
+  ("Sporty (dynamic)"
+   (("Indoor"
+     ((ball
+       ("Volleyball" "Basketball")
+       ((glove
+         ("Handball"))
+        (racket
+         ("Racquetball"))))))
+    ("Outdoor"
+     ((disc
+       ("Ultimate" "Disc golf"))
+      (non-disc
+       ("Soccer" "Tennis" "Football" "Baseball"))))))
+#+END_SRC
+
+*** Defining a classification domain-specific language
+
+When writing a larger Taxy-based application, it may be necessary to define a number of key functions that would be unwieldy to manage in a ~cl-labels~ form.  For this case, Taxy provides the macro ~taxy-define-key-definer~ to easily define Taxy key functions in an application library.  Those functions are then passed to the function ~taxy-make-take-function~ at runtime, along with a list of keys being used to classify items.  Using these allows key functions to be defined in top-level forms, and it allows an application to be extended by users by defining additional key functions in their configurations.
+
+Extending the previous ~sporty~ example, let's redefine its key functions using ~taxy-define-key-definer~:
+
+#+begin_src elisp :exports code :results silent :lexical t
+  (taxy-define-key-definer sporty-define-key
+    sporty-keys "sporty"
+    "Define a `sporty' key function.")
+
+  (sporty-define-key disc-based ()
+    (if (member 'disc (sport-uses item))
+        "Disc-based"
+      "Non-disc-based"))
+
+  (sporty-define-key uses (&optional thing)
+    (pcase thing
+      (`nil (sport-uses item))
+      (_ (when (cl-typecase (sport-uses item)
+                 (symbol (equal thing (sport-uses item)))
+                 (list (member thing (sport-uses item))))
+           thing))))
+
+  (sporty-define-key venue (&optional place)
+    (pcase place
+      (`nil (sport-venue item))
+      (_ (when (equal place (sport-venue item))
+           (sport-venue item)))))
+#+end_src
+
+Now we'll define the default keys to use when classifying items.  This list is equivalent to the one passed to ~taxy-take-keyed~ in the previous, "Chains" example.
+
+#+begin_src elisp :exports code :results silent :lexical t
+  (defvar sporty-default-keys
+    '(
+      ((venue 'outdoor)
+       disc-based)
+
+      ((venue 'indoor)
+       (uses 'ball)
+       (uses 'disc)
+       (uses 'glove)
+       (uses 'racket))))
+#+end_src
+
+Finally, rather than using a pre-made taxy struct, we make one at runtime, making the ~:take~ function with ~taxy-make-take-function~.
+
+#+begin_src elisp :exports code :results code :lexical t
+  (let ((taxy (make-taxy
+               :name "Sporty (DSL)"
+               :take (taxy-make-take-function sporty-default-keys
+                                              sporty-keys))))
+    (thread-last taxy
+      (taxy-fill sports)
+      (taxy-mapcar #'sport-name)
+      taxy-plain))
+#+end_src
+
+# NOTE: The #+RESULTS: header is removed for the following results block, because it seems to cause the GitHub renderer to hide it.
+
+Which gives us:
+
+#+begin_src elisp
+  ("Sporty (DSL)"
+   ((indoor
+     ((ball
+       ("Volleyball" "Basketball")
+       ((glove
+         ("Handball"))
+        (racket
+         ("Racquetball"))))))
+    (outdoor
+     (("Disc-based"
+       ("Ultimate" "Disc golf"))
+      ("Non-disc-based"
+       ("Soccer" "Tennis" "Football" "Baseball"))))))
+#+end_src
+
+As you can see, the result is the same as that in the previous example, but we've defined a kind of DSL for grouping sports in a modular, extendable way.
+
+This also allows the grouping keys to be easily changed at runtime, producing a different result.  For example, we could group sports by, first, whether they use a ball, and then by venue.  Let's do this in a function so that users can pass their own list of keys:
+
+#+begin_src elisp :exports code :results code :lexical t
+  (cl-defun sporty-classify (sports &key (keys sporty-default-keys))
+    (declare (indent defun))
+    (let* ((taxy (make-taxy
+                  :name "Sporty (DSL)"
+                  :take (taxy-make-take-function keys
+                                                 sporty-keys))))
+      (thread-last taxy
+        (taxy-fill sports)
+        (taxy-mapcar #'sport-name)
+        taxy-plain)))
+
+  (sporty-classify sports
+    :keys '((uses 'ball) venue))
+#+end_src
+
+# NOTE: The #+RESULTS: header is removed for the following results block, because it seems to cause the GitHub renderer to hide it.
+
+And this produces:
+
+#+begin_src elisp :exports code
+  ("Sporty (DSL)"
+   ((outdoor
+     ("Ultimate" "Disc golf"))
+    (ball
+     ((indoor
+       ("Volleyball" "Handball" "Racquetball" "Basketball"))
+      (outdoor
+       ("Soccer" "Tennis" "Football" "Baseball"))))))
+#+end_src
+
+** Magit section
+
+Showing a =taxy= with =magit-section= is easy using the library [[https://github.com/alphapapa/taxy.el/tree/package/taxy-magit-section][taxy-magit-section]], which is packaged separately:
+
+#+BEGIN_SRC elisp :exports code
+  (require 'taxy-magit-section)
+
+  ;; Using the `numbery' taxy defined in earlier examples:
+  (thread-last numbery
+    taxy-emptied ;; Get an empty copy of the taxy, since it's defined in a variable.
+    (taxy-fill (reverse (cl-loop for i below 30 collect i)))
+    taxy-magit-section-pp)
+#+END_SRC
+
+That shows a buffer like this:
+
+[[images/magit-section-numbery.png]]
+
+** Reference
+
+In Emacs 28+, see also =M-x shortdoc-display-group RET taxy RET=.
+
+*** Functions
+
+- taxy-flatten (taxy) ::
+  Return a list of items in =taxy= and its sub-taxys.
+
+- taxy-emptied (taxy) ::
+  Return a copy of =taxy= without items.  Omits =taxy=’s items and those of its descendant taxys.  Useful when reusing taxy definitions.
+
+- taxy-fill (items taxy) ::
+  Fill =taxy= with =items= according to its definition.
+
+- taxy-make-take-function (keys aliases) ::
+  Return a taxy "take" function for =keys=.  Each of =keys= should be a function alias defined in =aliases=, or a list of such =key-fns= (recursively, ad infinitum, approximately).  =aliases= should be an alist mapping aliases to functions (such as defined with a definer defined by ~taxy-define-key-definer~).
+
+- taxy-mapc-taxys (fn taxy) ::
+  *Alias:* ~taxy-mapc*~
+
+  Return =taxy= having applied =fn= to it and its descendants.  Does not copy =taxy=.  Destructively modifies =taxy=, if =fn= does.
+
+- taxy-mapcar-items (fn taxy) ::
+  *Alias:* ~taxy-mapcar~
+
+  Return copy of =taxy=, having replaced its items with the value of =fn= on each.  Replaces every item in =taxy= and its descendants.  Useful to replace items with a more useful form after classification.
+
+- taxy-plain (taxy) ::
+  Return a list of the human-readable parts of =taxy=.
+
+- taxy-size (taxy) ::
+  Return the number of items =taxy= holds.  Includes items in =taxy= ’s sub-taxys.
+
+- taxy-sort-items (pred key taxy) ::
+  *Alias:* ~taxy-sort~
+
+  Sort =taxy= ’s items by =pred= and =key=.  Sorts items in =taxy= and its sub-taxys.  =key= is passed to ~cl-sort~, which see.
+
+- taxy-sort-taxys (pred key taxy) ::
+  *Alias:* ~taxy-sort*~
+
+  Sort =taxy= ’s sub-taxys by =pred= and =key=.  =key= is passed to ~cl-sort~, which see.
+
+*** Macros
+
+- taxy-define-key-definer (name variable prefix docstring) ::
+  Define a macro =name= that defines a key-function-defining macro.  The defined macro, having string =docstring=, associates the defined key functions with their aliases in an alist stored in symbol =variable=.  The defined key functions are named having string =prefix=, which will have a hyphen appended to it.  The key functions take one or more arguments, the first of which is the item being tested, bound within the function to ~item~.
+
+* Changelog
+:PROPERTIES:
+:TOC:      :depth 0
+:END:
+
+** 0.10.2
+
+*Fixes*
++ Reduce potential length of macro-expanded docstrings to prevent byte-compiler warnings in downstream packages.
+
+** 0.10.1
+
+*Examples*
++ Fixed byte-compilation of ~diredy.el~.
+
+** 0.10
+
+*Examples*
++ Deffy
+  + Fix: Disambiguate forms with the same name.
++ Diredy: Various small improvements.
+
+** 0.9
+
+*** Changes
+
++  Library =taxy-magit-section= is now [[https://elpa.gnu.org/packages/taxy-magit-section.html][packaged separately]] and maintained in a [[https://github.com/alphapapa/taxy.el/tree/package/taxy-magit-section][separate branch]].
++  Minor fixes to documentation and examples.
+
+** 0.8
+
+*** Additions
+
++  Short documentation group for Emacs 28+.
+
+*** Fixes
+
++  Require =map= for ~pcase~ pattern.
+
+** 0.7
+
+*** Additions
+
++  Function ~taxy-flatten~ returns a list of the items in a taxy and its sub-taxys.
++  Function/macro reference documentation.
++  Example application =bookmarky= lists Emacs bookmarks grouped with Taxy.
+
+** 0.6
+
+*** Additions
+
++ Sorting functions:
+  + ~taxy-sort-items~ (alias: ~taxy-sort~) sorts the items in a taxy and its sub-taxys.
+  + ~taxy-sort-taxys~ (alias: ~taxy-sort*~) sorts a taxy's sub-taxys.
++ Defining classification domain-specific languages:
+  + Macro ~taxy-define-key-definer~ defines a key-function-defining macro.
+  + Function ~taxy-make-take-function~ makes a ~:take~ function using a list of key functions and a set of classification keys.
++ Table-like, column-based formatting system for ~taxy-magit-section~:
+  + Function ~taxy-magit-section-format-items~, which formats items by columns.
+  + Variable ~taxy-magit-section-insert-indent-items~, which controls whether ~taxy-magit-section-insert~ applies indentation to each item.  (Used to disable that behavior when items are pre-indented strings, e.g. as formatted by ~taxy-magit-section-format-items~.)
++ Example application =deffy=, which shows an overview of top-level definitions and forms in an Elisp project or file.  (Likely to be published as a separate package later.)
+
+** 0.5
+
+*** Additions
+
++  Function ~taxy-magit-section-insert~ takes new arguments:
+     -  ~:initial-depth~ sets the level at which the first level of hierarchy is considered to be at, for purposes of indentation.  Setting it to a negative number prevents indentation of so many levels (i.e. setting it to -1 causes the first two levels to be unindented, since the first level will be considered to be at depth -1, and the second at depth 0).
+     -  ~:blank-between-depth~ sets the level up to which blank lines are inserted between sections (i.e. setting it to 1 causes blank lines to be inserted between sections up to depth 1, but not between sections deeper than that).
++  Struct ~taxy-magit-section~ has a new ~heading-face~ slot, a function which takes a depth level argument and returns the face with which to propertize that section's heading.
++  New example ~taxy-package-report~.
+
+*** Fixes
+
++  Example ~diredy~ referred to an old function name.
+
+** 0.4
+
++  Incremented version to cause a new ELPA release (since removing a file that wasn't intended to be distributed on ELPA).
+
+** 0.3
+
+*** Changes
+
++  Within the ~taxy~ struct and related functions, the term =objects= is renamed to =items=, which is shorter and has the same meaning.  This makes code a bit more concise (e.g. ~(taxy-objects taxy)~ becomes ~(taxy-items taxy)~).
+
+*** Fixes
+
++  Function ~taxy-fill~ always calls a taxy's ~:take~ function if defined.  (Fixing "chains" of dynamic taxys.)
++  Function ~taxy-magit-section-insert~ applies text properties from the inserted string to the indentation string (so commands that rely on text properties at the beginning of a line will work).
+
+** 0.2
+
+*** Changes
+
++  Function ~taxy-take-keyed*~ is renamed to ~taxy-take-keyed~, replacing the old function: it's more powerful, and there's little reason to maintain two versions.
+
+*** Additions
+
++  Struct ~taxy~ now has a ~:make~ slot, a function called to make new sub-taxys by ~take-take-keyed~ (defaulting to ~make-taxy~).  This is useful when defining structs specialized on ~taxy~.
++  Struct ~taxy-magit-section~ now has an ~:indent~ slot, a number of characters by which to indent each level of sub-taxy, applied automatically by function ~taxy-magit-section-insert~.
++  Each element of the new ~taxy-take-keyed~'s ~KEY-FNS~ argument may now be a function or a list of functions (or a list of a list of functions, etc.).  Lists of functions create "chains" of independent, dynamic taxys descending from a single root taxy.  See [[id:8aec3671-ee22-44a0-968c-81443f4dcd74][example]].
+
+*** Fixes
+
++  ~taxy-magit-section~'s ~insert-object~ function.
++  ~taxy-fill~ now applies objects to the root taxy if no sub-taxys take them.
+
+** 0.1
+
+First tagged version.
+
+* Development
+:PROPERTIES:
+:TOC:      :ignore (descendants)
+:END:
+
+Bug reports, feature requests, suggestions — /oh my/!
+
+** Copyright assignment
+
+This package is part of [[https://www.gnu.org/software/emacs/][GNU Emacs]], being distributed in [[https://elpa.gnu.org/][GNU ELPA]].  Contributions to this project must follow GNU guidelines, which means that, as with other parts of Emacs, patches of more than a few lines must be accompanied by having assigned copyright for the contribution to the FSF.  Contributors who wish to do so may contact [[mailto:emacs-devel@gnu.org][emacs-devel@gnu.org]] to request the assignment form.
+
+* Credits
+
++  Thanks to Stefan Monnier for his feedback, and for maintaining GNU ELPA.
+
+* License
+:PROPERTIES:
+:TOC:      :ignore (this)
+:END:
+
+GPLv3
+
+* COMMENT Export setup                                             :noexport:
+:PROPERTIES:
+:TOC:      :ignore (this descendants)
+:END:
+
+# Copied from org-super-agenda's readme, in which much was borrowed from Org's =org-manual.org=.
+
+#+OPTIONS: broken-links:t *:t
+
+** Info export options
+
+#+TEXINFO_DIR_CATEGORY: Emacs
+#+TEXINFO_DIR_TITLE: Taxy: (taxy)
+#+TEXINFO_DIR_DESC: Programmable taxonomical grouping for arbitrary objects
+
+# NOTE: We could use these, but that causes a pointless error, "org-compile-file: File "..README.info" wasn't produced...", so we just rename the files in the after-save-hook instead.
+# #+TEXINFO_FILENAME: taxy.info
+# #+EXPORT_FILE_NAME: taxy.texi
+
+** File-local variables
+
+# NOTE: Setting org-comment-string buffer-locally is a nasty hack to work around GitHub's org-ruby's HTML rendering, which does not respect noexport tags.  The only way to hide this tree from its output is to use the COMMENT keyword, but that prevents Org from processing the export options declared in it.  So since these file-local variables don't affect org-ruby, wet set org-comment-string to an unused keyword, which prevents Org from deleting this tree from the export buffer, which allows it to find the export options in it.  And since org-export does respect the noexport tag, the tree is excluded from the info page.
+
+# Local Variables:
+# before-save-hook: org-make-toc
+# after-save-hook: (lambda nil (when (and (require 'ox-texinfo nil t) (org-texinfo-export-to-info)) (delete-file "README.texi") (rename-file "README.info" "taxy.info" t)))
+# org-export-initial-scope: buffer
+# org-comment-string: "NOTCOMMENT"
+# End:
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/dir b/emacs/.emacs.d/elpa/taxy-0.10.2/dir
new file mode 100644
index 0000000..a7ae589
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/dir
@@ -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
+* Taxy: (taxy).                 Programmable taxonomical grouping for 
+                                  arbitrary objects.
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/examples/README.org b/emacs/.emacs.d/elpa/taxy-0.10.2/examples/README.org
new file mode 100644
index 0000000..478f35a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/examples/README.org
@@ -0,0 +1,50 @@
+#+TITLE: Taxy Examples
+
+Some example applcations using ~taxy~.
+
+* Bookmarky
+
+=bookmarky= shows Emacs bookmarks grouped in a customizeable way:
+
+[[../images/bookmarky.png]]
+
+* Deffy
+
+=deffy= shows definitions and top-level forms in an Elisp project or file.
+
+[[../images/deffy.png]]
+
+* Diredy
+
+[[file:diredy.el][Diredy]] rearranges a Dired buffer, grouping files and directories by their size and MIME type.  Use it like:
+
+#+BEGIN_SRC elisp
+  (require 'diredy)
+#+END_SRC
+
+Then open a Dired buffer and =M-x diredy RET=, and it will be rearranged like so:
+
+[[../images/diredy.png]]
+
+* Musicy
+
+[[file:musicy.el][Musicy]] displays a music library in a ~magit-section~ buffer.  Use it like:
+
+#+BEGIN_SRC elisp
+  (require 'musicy)
+
+  (musicy "~/Music")
+#+END_SRC
+
+Since it calls the =mediainfo= program on every file, it can be slow on large music libraries, so you might want to test it on only a subset of them, like:
+
+#+BEGIN_SRC elisp
+  (musicy-files
+   (seq-take (directory-files-recursively
+              "~/Music" (rx "." (or "mp3" "ogg") eos))
+             100))
+#+END_SRC
+
+The resulting buffer shows tracks organized by genre, then artist, then year, then album, then track name:
+
+[[../images/musicy.png]]
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/examples/bookmarky.el b/emacs/.emacs.d/elpa/taxy-0.10.2/examples/bookmarky.el
new file mode 100644
index 0000000..9fa5e53
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/examples/bookmarky.el
@@ -0,0 +1,189 @@
+;;; bookmarky.el --- List bookmarks organized with Taxy  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Keywords: convenience, lisp
+;; Package-Requires: ((emacs "27.2") (taxy "0.7"))
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library provides commands that show bookmarks organized in a
+;; flexible, customizeable hierarchy and table.
+
+;;; Code:
+
+(require 'bookmark)
+(require 'cl-lib)
+(require 'subr-x)
+
+(require 'taxy)
+(require 'taxy-magit-section)
+
+(defgroup bookmarky nil
+  "List bookmarks grouped with Taxy."
+  :group 'bookmark)
+
+;;;; Keys
+
+(cl-eval-when (compile load eval)
+  ;; I don't understand why using `cl-eval-when' is necessary, but it
+  ;; seems to be.
+  (taxy-define-key-definer bookmarky-define-key bookmarky-keys "bookmarky-key"
+    ;; FIXME: Docstring.
+    ""))
+
+(bookmarky-define-key directory (&optional directory &key descendant-p name)
+  "Return key string for ITEM's directory, or nil.
+If DIRECTORY is specified, return key string if ITEM's `filename'
+is in DIRECTORY.  If DESCENDANT-P, return key string if ITEM's
+`filename' is a descendant of DIRECTORY.  DIRECTORY should end in
+a slash."
+  ;; It seems like undesirable overhead to `file-truename' every
+  ;; time this function is called, but avoiding that wouldn't be easy.
+  (when-let (filename (bookmark-prop-get item 'filename))
+    (setf filename (expand-file-name filename))
+    (pcase directory
+      ('nil (concat "Directory: " (file-name-directory filename)))
+      (_
+       (cl-assert (directory-name-p directory) t
+                  "DIRECTORY should end in a directory separator character (i.e. a slash)")
+       (setf directory (file-truename directory))
+       (pcase descendant-p
+         ('nil (when (equal directory (file-truename filename))
+                 (or name (concat "Directory: " directory))))
+         (_ (when (string-prefix-p directory filename)
+              (or name (concat "Directory: " directory)))))))))
+
+(bookmarky-define-key filename (&key name regexp)
+  "Return NAME if bookmark ITEM's filename matches REGEXP, or without REGEXP, the filename."
+  (when-let (filename (bookmark-prop-get item 'filename))
+    (pcase regexp
+      (`nil filename)
+      (_ (when (string-match-p regexp filename)
+           name)))))
+
+(bookmarky-define-key handler (handlers &key name)
+  "Return NAME if bookmark ITEM's handler is in HANDLERS."
+  (when-let (handler (bookmark-prop-get item 'handler))
+    (when (member handler handlers)
+      name)))
+
+(bookmarky-define-key name (&key name regexp)
+  "Return NAME if bookmark ITEM's name matches REGEXP."
+  (when (string-match-p regexp (car item))
+    name))
+
+(defvar bookmarky-default-keys
+  '(
+    ((handler '(burly-bookmark-handler) :name "Burly"))
+    ((directory "~/src/emacs/" :name "Emacs" :descendant-p t)))
+  "Default keys.")
+
+;;;; Columns
+
+(cl-eval-when (compile load eval)
+  ;; I don't understand why using `cl-eval-when' is necessary, but it
+  ;; seems to be.
+  (taxy-magit-section-define-column-definer "bookmarky"))
+
+(bookmarky-define-column "Name" (:max-width 45 :face bookmark-menu-bookmark)
+  (car item))
+
+(bookmarky-define-column "File" (:max-width nil :face font-lock-doc-face)
+  (bookmark-prop-get item 'filename))
+
+(unless bookmarky-columns
+  ;; TODO: Automate this or document it
+  (setq-default bookmarky-columns
+		(get 'bookmarky-columns 'standard-value)))
+
+;;;; Variables
+
+(defvar bookmarky-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "RET") #'bookmarky-RET)
+    (define-key map [mouse-1] #'bookmarky-mouse-1)
+    map))
+
+;;;; Commands
+
+;;;###autoload
+(cl-defun bookmarky (&key (keys bookmarky-default-keys)
+		          (buffer-name "*Bookmarky*")
+		          visibility-fn display-buffer-action)
+  "Show bookmarks grouped with Taxy."
+  (interactive)
+  (let (format-table column-sizes)
+    (cl-labels ((format-item (item) (gethash item format-table))
+		(make-fn (&rest args)
+			 (apply #'make-taxy-magit-section
+				:make #'make-fn
+				:format-fn #'format-item
+				:level-indent bookmarky-level-indent
+				:visibility-fn visibility-fn
+				args)))
+      (with-current-buffer (get-buffer-create buffer-name)
+	(bookmarky-mode)
+	(let* ((taxy (thread-last
+			 (make-fn
+			  :name "Bookmarky"
+			  :take (taxy-make-take-function keys bookmarky-keys))
+		       (taxy-fill bookmark-alist)
+		       (taxy-sort* #'string< #'taxy-name)
+		       (taxy-sort #'string< #'car)))
+	       (taxy-magit-section-insert-indent-items nil)
+	       (inhibit-read-only t)
+	       (format-cons (taxy-magit-section-format-items
+			     bookmarky-columns bookmarky-column-formatters taxy)))
+	  (setf format-table (car format-cons)
+		column-sizes (cdr format-cons)
+		header-line-format (taxy-magit-section-format-header
+				    column-sizes bookmarky-column-formatters))
+          (delete-all-overlays)
+          (erase-buffer)
+	  (save-excursion
+	    (taxy-magit-section-insert taxy :items 'last
+	      ;; :blank-between-depth bufler-taxy-blank-between-depth
+	      :initial-depth 0))))
+      (pop-to-buffer buffer-name display-buffer-action))))
+
+(defun bookmarky-revert (_ignore-auto _noconfirm)
+  "Revert current Bookmarky buffer."
+  (interactive)
+  (bookmarky))
+
+(defun bookmarky-mouse-1 (event)
+  "Call `bookmarky-RET' with point at EVENT's position."
+  (interactive "e")
+  (mouse-set-point event)
+  (call-interactively #'bookmarky-RET))
+
+(defun bookmarky-RET ()
+  "Go to bookmark at point, or expand section at point."
+  (interactive)
+  (cl-etypecase (oref (magit-current-section) value)
+    (taxy-magit-section (call-interactively #'magit-section-cycle))
+    (null nil)
+    (list (bookmark-jump (oref (magit-current-section) value)))))
+
+(define-derived-mode bookmarky-mode magit-section-mode "Bookmarky"
+  :global nil
+  (setq-local revert-buffer-function #'bookmarky-revert))
+
+(provide 'bookmarky)
+
+;;; bookmarky.el ends here
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/examples/deffy.el b/emacs/.emacs.d/elpa/taxy-0.10.2/examples/deffy.el
new file mode 100644
index 0000000..174bdc3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/examples/deffy.el
@@ -0,0 +1,478 @@
+;;; deffy.el --- Show definitions in an Elisp project/buffer  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Keywords: convenience, lisp
+;; Package-Requires: ((emacs "27.2") (taxy "0.7"))
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library provides commands that show top-level forms and
+;; definitions found in an Emacs Lisp project or buffer, organized by
+;; file and type.
+
+;;; Code:
+
+(require 'map)
+(require 'project)
+
+(require 'taxy)
+(require 'taxy-magit-section)
+
+(cl-defstruct deffy-def
+  ;; Okay, the name of this struct is silly, but at least it's concise.
+  file pos form name type docstring)
+
+(defgroup deffy nil
+  "Show an overview of definitions in an Emacs Lisp project or buffer."
+  :group 'emacs-lisp-mode)
+
+;;;; Variables
+
+(defvar deffy-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "RET") #'deffy-RET)
+    (define-key map [mouse-1] #'deffy-mouse-1)
+    map))
+
+(defvar-local deffy-directory nil
+  "Directory relative to which filenames should be expanded.")
+
+(defvar-local deffy-files nil
+  "Files shown in the current Deffy buffer.")
+
+(defvar-local deffy-display-buffer-action nil
+  "Last-used display-buffer-action in the current Deffy buffer.")
+
+;;;; Keys
+
+(cl-eval-when (compile load eval)
+  ;; I don't understand why using `cl-eval-when' is necessary, but it
+  ;; seems to be.
+  (taxy-define-key-definer deffy-define-key deffy-keys "deffy-key"
+    ;; FIXME: Docstring.
+    "")
+
+  (deffy-define-key file ()
+    (file-relative-name (deffy-def-file item) deffy-directory))
+
+  (deffy-define-key type ()
+    (pcase-let* (((cl-struct deffy-def form) item)
+	         (type (pcase form
+		         (`(,(or 'defun 'cl-defun 'defalias) . ,_)
+			  (if (cl-find-if (lambda (form)
+					    (pcase form
+					      (`(interactive . ,_) t)))
+					  form)
+			      'command
+			    'function))
+		         (`(,(or 'defmacro 'cl-defmacro) . ,_)
+			  'macro)
+                         (`(,(or 'cl-defstruct) . ,_)
+			  'struct)
+                         (`(,(or 'defclass) . ,_)
+			  'class)
+                         (`(,(or 'cl-defmethod 'defmethod) . ,_)
+			  'method)
+                         (`(,(or 'define-error) . ,_)
+			  'error)
+                         (`(,(or 'defconst 'defcustom 'defgroup 'defvar 'defvar-local) . ,_)
+                          'variable)
+                         (`(,(or 'define-hash-table-test) . ,_)
+                          'hash-table-test)
+                         (`(,(or 'defface) . ,_)
+                          'face)
+                         (`(,(or 'provide 'require) . ,_)
+                          'feature)
+                         ;; Top-level forms that don't usually correspond to definitions,
+                         ;; so we ignore them.
+                         (`(,(or 'cl-eval-when 'eval-and-compile 'eval-when-compile 'with-eval-after-load) . ,_)
+                          nil)
+                         (`(,(or 'declare-function) . ,_)
+                          nil)
+                         (`(,(or 'unless 'when 'if-let 'if-let* 'when-let 'when-let* '-if-let '-if-let* '-when-let '-when-let* 'setf 'setq) . ,_)
+                          nil)
+                         ;; Top-level forms that are macro calls (e.g. custom defining macros).
+                         ((and `(,car . ,_) (guard (macrop car))) car)
+                         ;; Anything else: ignored.
+		         (`(,car . ,_) nil))))
+      ;; FIXME: Returning nil for these ignored types only works when the form is in the
+      ;; top-level file, i.e. when the file's relative name is nil, so these ignored types
+      ;; still show up when they're in other files.  This isn't really the right way to
+      ;; discard uninteresting items.
+
+      ;; FIXME: Also, when a project Lisp file is not loaded into Emacs, some symbols may
+      ;; not be correctly classified, e.g. defining macros.  It's probably not feasible to
+      ;; solve that completely correctly, so some options or workarounds may be needed.
+      (when type
+        (format "%s" type)))))
+
+(defvar deffy-taxy-default-keys
+  '(type file))
+
+;;;; Columns
+
+(cl-eval-when (compile load eval)
+  ;; I don't understand why using `cl-eval-when' is necessary, but it
+  ;; seems to be.
+  (taxy-magit-section-define-column-definer "deffy"))
+
+(deffy-define-column "Definition" (:max-width 45 :face font-lock-function-name-face)
+  (format "%s" (deffy-def-name item)))
+
+(deffy-define-column "Type" (:max-width 25 :face font-lock-type-face)
+  (format "%s" (deffy-def-type item)))
+
+(deffy-define-column "Docstring" (:max-width nil :face font-lock-doc-face)
+  (deffy-def-docstring item))
+
+(unless deffy-columns
+  ;; TODO: Automate this or document it
+  (setq-default deffy-columns
+		(get 'deffy-columns 'standard-value)))
+
+;;;; Options
+
+(defcustom deffy-side-window-action
+  '(display-buffer-in-side-window
+    (side . right)
+    (window-parameters
+     (dedicated . t)
+     (window-side . right)
+     (no-delete-other-windows . t)))
+  "`display-buffer' action used when displaying Deffy buffer in a side window.
+See Info node `(elisp)Displaying Buffers in Side Windows'."
+  :type 'sexp)
+
+;;;; Commands
+
+;;;###autoload
+(cl-defun deffy
+    (&key (project (or (project-current)
+		       (cons 'transient default-directory)))
+	  (keys deffy-taxy-default-keys)
+	  (files deffy-files)
+	  (buffer-name (format "*Deffy: %s*"
+			       (if files
+				   (string-join (mapcar #'file-name-nondirectory files) ", ")
+				 (file-name-nondirectory
+				  (directory-file-name (project-root project))))))
+	  visibility-fn display-buffer-action)
+  "Show definitions defined in PROJECT or FILES.
+Interactively, with PREFIX, show only definitions in current
+buffer."
+  (interactive (list :files (when current-prefix-arg
+			      (list (buffer-file-name)))
+		     :keys (if current-prefix-arg
+			       (remove 'file deffy-taxy-default-keys)
+			     deffy-taxy-default-keys)))
+  (let (format-table column-sizes)
+    (cl-labels (;; (heading-face
+		;;  (depth) (list :inherit (list 'bufler-group (bufler-level-face depth))))
+		(elisp-file-p (file) (string-match-p (rx ".el" (optional ".gz") eos) file))
+		(file-visible-p
+		 (file) (not (string-match-p (rx bos ".") (file-name-nondirectory file))))
+		(format-item (item) (gethash item format-table))
+		(make-fn (&rest args)
+			 (apply #'make-taxy-magit-section
+				:make #'make-fn
+				:format-fn #'format-item
+				:level-indent deffy-level-indent
+				:visibility-fn visibility-fn
+				;; :heading-face-fn #'heading-face
+				args))
+		(def-name (def) (format "%s" (cl-second (deffy-def-form def)))))
+      ;; (when (get-buffer buffer-name)
+      ;;   (kill-buffer buffer-name))
+      (setf files (cl-reduce #'cl-remove-if-not (list #'file-exists-p #'elisp-file-p #'file-visible-p)
+			     :initial-value (or files (project-files project))
+			     :from-end t))
+      (unless files
+        (user-error "No files to show"))
+      (with-current-buffer (get-buffer-create buffer-name)
+	(deffy-mode)
+	(setq-local deffy-taxy-default-keys keys
+		    deffy-directory (project-root project)
+		    deffy-files files
+		    deffy-display-buffer-action display-buffer-action
+		    default-directory deffy-directory)
+	(let* ((forms (apply #'append (mapcar #'deffy--file-forms files)))
+	       (taxy (thread-last
+		       (make-fn
+			:name "Deffy"
+			:description
+                        (format "Definitions in %s:"
+				(if files
+				    (string-join (mapcar #'file-relative-name files) ", ")
+				  (file-name-nondirectory
+				   (directory-file-name (project-root project)))))
+			:take (taxy-make-take-function keys deffy-keys))
+		       (taxy-fill forms)
+		       (taxy-sort* #'string< #'taxy-name)
+		       (taxy-sort #'string< #'def-name)))
+	       (taxy-magit-section-insert-indent-items nil)
+	       (inhibit-read-only t)
+	       (format-cons (taxy-magit-section-format-items
+			     deffy-columns deffy-column-formatters taxy)))
+	  (setf format-table (car format-cons)
+		column-sizes (cdr format-cons)
+		header-line-format (taxy-magit-section-format-header
+				    column-sizes deffy-column-formatters))
+          (delete-all-overlays)
+          (erase-buffer)
+	  (save-excursion
+	    (taxy-magit-section-insert taxy :items 'last
+	      ;; :blank-between-depth bufler-taxy-blank-between-depth
+	      :initial-depth 0))))
+      (pop-to-buffer buffer-name display-buffer-action))))
+
+;;;###autoload
+(cl-defun deffy-buffer
+    (&optional (buffer (current-buffer))
+	       &key display-buffer-action)
+  "Show an Deffy view for BUFFER.
+Interactively, with prefix, display in dedicated side window."
+  (interactive
+   (list (current-buffer)
+	 :display-buffer-action (when current-prefix-arg
+				  deffy-side-window-action)))
+  (unless (buffer-file-name buffer)
+    (user-error "Buffer is not file-backed: %S.  See command `deffy-project'"
+		buffer))
+  (deffy :files (list (buffer-file-name buffer))
+    :keys (remove 'file deffy-taxy-default-keys)
+    :display-buffer-action display-buffer-action))
+
+(cl-defun deffy-project (&optional project &key display-buffer-action)
+  "Show an Deffy view for PROJECT.
+Interactively, with prefix, display in dedicated side window."
+  (interactive
+   (list nil :display-buffer-action (when current-prefix-arg
+				      deffy-side-window-action)))
+  (deffy :project (or project
+		      (project-current)
+		      (cons 'transient default-directory))
+    :display-buffer-action display-buffer-action))
+
+(defun deffy-revert (_ignore-auto _noconfirm)
+  "Revert current Deffy buffer."
+  (interactive)
+  (deffy :display-buffer-action (or deffy-display-buffer-action
+				    '((display-buffer-same-window)))))
+
+(defun deffy-jump (def)
+  "Jump to definition DEF.
+Interactively, read DEF from current buffer with completion; with
+universal prefix, from project buffers; with two universal
+prefixes, from all `deffy-mode' buffers."
+  (interactive
+   (list (deffy--read-def
+           (pcase current-prefix-arg
+             (`nil (deffy--buffer-for (current-buffer)))
+             ('(4) (save-window-excursion
+	             (deffy-project)
+	             (list (current-buffer))))
+             (_ (deffy--all-buffers))))))
+  (pcase-let (((cl-struct deffy-def file pos) def)
+              (action (if (eq 'deffy-mode major-mode)
+                          `(display-buffer-in-previous-window
+                            (previous-window . ,(get-mru-window nil nil 'not-selected)))
+                        '(display-buffer-same-window))))
+    (pop-to-buffer
+     (or (find-buffer-visiting file)
+	 (find-file-noselect file))
+     action)
+    (goto-char pos)
+    (backward-sexp 1)))
+
+(defun deffy-mouse-1 (event)
+  "Call `deffy-RET' with point at EVENT's position."
+  (interactive "e")
+  (mouse-set-point event)
+  (call-interactively #'deffy-RET))
+
+(defun deffy-RET ()
+  "Go to form at point, or expand section at point."
+  (interactive)
+  (cl-etypecase (oref (magit-current-section) value)
+    (deffy-def (deffy-jump (oref (magit-current-section) value)))
+    (taxy-magit-section (call-interactively #'magit-section-cycle))
+    (null nil)))
+
+(define-derived-mode deffy-mode magit-section-mode "Deffy"
+  :global nil
+  (setq-local bookmark-make-record-function #'deffy-bookmark-make-record
+	      revert-buffer-function #'deffy-revert))
+
+;;;; Functions
+
+(cl-defun deffy--read-def
+    (deffy-buffers &key
+      affixation-fn
+      (annotate-fn (lambda (def)
+		     (concat (deffy-def-type def) " " (deffy-def-docstring def))))
+      (group-fn #'deffy-def-file))
+  "Read form selected from Deffy BUFFERS with completion."
+  (unless deffy-buffers
+    (user-error "No Deffy buffers to find in"))
+  (cl-labels ((disambiguate (string)
+                            (format "%s (%s)"
+                                    string (deffy-def-type (get-text-property 0 :def string))))
+              (def-cons
+		(def) (cons (propertize
+			     (format "%s" (deffy-def-name def))
+			     :annotation (funcall annotate-fn def)
+			     :group (funcall group-fn def)
+			     :def def)
+			    def))
+	      (buffer-taxy
+	       (buffer) (with-current-buffer buffer
+			  (save-excursion
+			    (goto-char (point-min))
+			    (oref (magit-current-section) value))))
+	      (annotate
+	       (candidate)
+	       (concat (propertize " " 'display '(space :align-to center))
+		       (get-text-property 0 :annotation candidate)))
+	      (group
+	       (candidate transform)
+	       (pcase transform
+		 (`nil (get-text-property 0 :group candidate))
+		 (_ candidate)))
+	      (affix (candidates)
+		     (cl-loop for candidate in candidates collect
+		              (list (propertize candidate
+					        'face 'font-lock-function-name-face)
+			            (concat (propertize
+                                             (symbol-name
+                                              (deffy-def-type
+					        (get-text-property 0 :def candidate)))
+					     'face 'font-lock-type-face)
+				            "  ")
+			            (concat (propertize " "
+                                                        'display '(space :align-to center))
+				            (get-text-property 0 :annotation candidate))))))
+    (pcase (length deffy-buffers)
+      (1 (setf annotate-fn #'deffy-def-docstring
+	       group-fn #'deffy-key-type))
+      (_ (setf annotate-fn #'deffy-def-docstring
+               affixation-fn #'affix)))
+    (let* ((taxys (mapcar #'buffer-taxy deffy-buffers))
+	   (items (mapcan #'taxy-flatten taxys))
+	   (alist (mapcar #'def-cons items))
+           ;; Unfortunately, `completing-read' always discards text properties, which
+           ;; means that they can't be used to disambiguate items with the same name
+           ;; (e.g. `(defthis foo)' in one form and `(defthat foo)' in another).  So we
+           ;; have to check for items with duplicate names, then replace the string with
+           ;; one that disambiguates them.
+           (duplicates (cl-loop for item in alist
+                                when (> (cl-count (car item) alist :key #'car :test #'equal) 1)
+                                collect item))
+           (_ (when duplicates
+                (dolist (dupe duplicates)
+                  (setf alist (remove dupe alist)
+                        dupe (cons (disambiguate (car dupe)) (cdr dupe)))
+                  (push dupe alist))))
+	   (metadata (list 'metadata (cons 'group-function #'group)))
+	   (dynamic-fn (lambda (str pred flag)
+			 (pcase flag
+			   ('metadata metadata)
+			   (_ (complete-with-action flag alist str pred)))))
+	   (completion-extra-properties (list :annotation-function #'annotate
+					      :affixation-function affixation-fn))
+	   (selected (completing-read "Definition: " dynamic-fn nil t)))
+      (alist-get selected alist nil nil #'equal))))
+
+(cl-defun deffy--file-forms (file)
+  "Return forms defined in FILE."
+  (with-temp-buffer
+    (save-excursion
+      (insert-file-contents file))
+    (cl-loop for form = (ignore-errors
+			  (read (current-buffer)))
+	     while form
+	     when (listp form)
+	     collect (make-deffy-def
+                      :file file :pos (point) :form form
+                      :name (pcase-exhaustive (cadr form)
+			      ((and (pred atom) it) it)
+			      (`(quote ,it) it)
+			      (`(,it . ,_) it))
+                      :type (car form)
+                      :docstring
+                      (replace-regexp-in-string
+                       "\n" "  "
+                       (pcase form
+		         (`(,(or 'defun 'cl-defun 'defmacro 'cl-defmacro) ,_name ,_args
+		            ,(and (pred stringp) docstring) . ,_)
+		          docstring)
+		         (`(,(or 'defvar 'defvar-local 'defcustom) ,_name ,_value
+		            ,(and (pred stringp) docstring) . ,_)
+		          docstring)
+		         (_ ;; Use the first string found, if any.
+		          (or (cl-find-if #'stringp form)
+                              ""))))))))
+
+(defun deffy--all-buffers ()
+  "Return list of all `deffy-mode' buffers."
+  (cl-loop for buffer in (buffer-list)
+	   when (eq 'deffy-mode (buffer-local-value 'major-mode buffer))
+	   collect buffer))
+
+(defun deffy--buffer-for (buffer)
+  "Return `deffy-mode' buffer having definitions for BUFFER.
+Return value is actually a one-element list."
+  (or (cl-loop for other-buffer in (buffer-list)
+	       when (and (eq 'deffy-mode (buffer-local-value 'major-mode other-buffer))
+		         (or (member (buffer-file-name buffer)
+                                     (buffer-local-value 'deffy-files other-buffer))
+                             (equal default-directory (buffer-local-value 'deffy-directory other-buffer))))
+	       return (list other-buffer))
+      ;; Make a new deffy buffer for BUFFER.
+      (condition-case nil
+	  (save-window-excursion
+	    (deffy-buffer)
+	    (list (current-buffer)))
+	(error (cl-loop for window in (window-list)
+                        when (eq 'deffy-mode
+                                 (buffer-local-value 'major-mode (window-buffer window)))
+                        return (list (window-buffer window)))))))
+
+;;;;; Bookmark support
+
+;; FIXME: If a project gains a file after a Deffy bookmark is made, the restored Deffy
+;; buffer won't show the new file.
+
+(defvar bookmark-make-record-function)
+
+(defun deffy-bookmark-make-record ()
+  "Return a bookmark record for current Deffy buffer."
+  (list (concat "Deffy: %s" deffy-directory)
+	(cons 'directory deffy-directory)
+	(cons 'files deffy-files)
+	(cons 'handler #'deffy-bookmark-handler)))
+
+;;;###autoload
+(defun deffy-bookmark-handler (record)
+  "Show Deffy buffer for bookmark RECORD."
+  (pcase-let* ((`(,_ . ,(map directory files)) record))
+    (deffy :files files :project (project-current nil directory))
+    (current-buffer)))
+
+(provide 'deffy)
+
+;;; deffy.el ends here
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/examples/diredy.el b/emacs/.emacs.d/elpa/taxy-0.10.2/examples/diredy.el
new file mode 100644
index 0000000..ba204d6
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/examples/diredy.el
@@ -0,0 +1,140 @@
+;;; diredy.el --- Flexible grouping for files in Dired buffers  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+;; Keywords: convenience
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library provides a command, `diredy', that rearranges a Dired
+;; buffer into a hierarchy by file size and MIME type.
+
+;;; Code:
+
+;;;; Requirements
+
+(require 'taxy)
+(require 'taxy-magit-section)
+
+(require 'dired)
+(require 'mailcap)
+
+;;;; Functions
+
+(eval-and-compile
+  (defun diredy--machine-size (size)
+    "Return number of bytes represented by human-readable SIZE."
+    (declare (pure t) (side-effect-free t))
+    (let ((case-fold-search t))
+      (string-match (rx bos (group (1+ digit)) (0+ space)
+                        (group (repeat 1 (any "kmg")))
+                        (optional (optional "i") "b"))
+                    size)
+      (* (pcase (match-string 2 size)
+           ((or "k" "K") 1024)
+           ((or "m" "M") (* 1024 1024))
+           ((or "g" "G") (* 1024 1024 1024)))
+         (string-to-number (match-string 1 size))))))
+
+;;;; Variables
+
+(defvar diredy-taxy
+  (cl-macrolet ((label
+                 (prefix size)
+                 (propertize (concat prefix " " size)
+                             :machine-size (number-to-string (diredy--machine-size size)))))
+    (cl-labels ((file-name
+                 (string) (let* ((start (text-property-not-all 0 (length string) 'dired-filename nil string))
+                                 (end (text-property-any start (length string) 'dired-filename nil string)))
+                            (substring string start end)))
+                (file-extension
+                 (filename) (file-name-extension filename))
+                (file-type (string)
+                           (when-let ((extension (file-extension (file-name string))))
+                             (mailcap-extension-to-mime extension)))
+                (file-size
+                 (filename) (file-attribute-size (file-attributes filename)))
+                (file-size-group
+                 (string) (pcase (file-size (file-name string))
+                            ('nil "No size")
+                            ((pred (<= (diredy--machine-size "1G")))
+                             (label ">=" "1G"))
+                            ((pred (<= (diredy--machine-size "100M")))
+                             (label ">=" "100M"))
+                            ((pred (<= (diredy--machine-size "10M")))
+                             (label ">=" "10M"))
+                            ((pred (<= (diredy--machine-size "1M")))
+                             (label ">=" "1M"))
+                            ((pred (<= (diredy--machine-size "100K")))
+                             (label ">=" "100K"))
+                            ((pred (<= (diredy--machine-size "1K")))
+                             (label ">=" "1K"))
+                            (_ (label "<" "1K"))))
+                (file-dir? (string) (if (file-directory-p (file-name string))
+                                        "Directory" "File"))
+	        (make-fn (&rest args)
+		         (apply #'make-taxy-magit-section
+			        :make #'make-fn
+			        :level-indent 1
+			        :item-indent 2
+                                :format-fn #'identity
+			        args)))
+      (make-fn
+       :name "Diredy"
+       :make #'make-fn
+       :take (apply-partially #'taxy-take-keyed (list #'file-dir? #'file-size-group #'file-type))))))
+
+(defvar dired-mode)
+
+;;;; Customization
+
+
+;;;; Commands
+
+(defun diredy ()
+  "Apply grouping to current Dired buffer."
+  (interactive)
+  (cl-assert (eq 'dired-mode major-mode))
+  (use-local-map (make-composed-keymap (list dired-mode-map magit-section-mode-map)))
+  (save-excursion
+    (goto-char (point-min))
+    (forward-line 2)
+    (let* ((lines (save-excursion
+		    (cl-loop until (eobp)
+			     collect (string-trim (buffer-substring (point-at-bol) (point-at-eol)))
+			     do (forward-line 1))))
+	   (filled-taxy (thread-last diredy-taxy
+			             taxy-emptied
+			             (taxy-fill lines)
+			             (taxy-mapc* (lambda (taxy)
+					           (setf (taxy-taxys taxy)
+					                 (cl-sort (taxy-taxys taxy)
+                                                                  (lambda (a b)
+                                                                    (string< (or (get-text-property 0 :machine-size a) a)
+                                                                             (or (get-text-property 0 :machine-size b) b)))
+						                  :key #'taxy-name))))))
+	   (inhibit-read-only t))
+      (delete-region (point) (point-max))
+      (taxy-magit-section-insert filled-taxy :items 'first
+	:initial-depth 0 :blank-between-depth 1))))
+
+;;;; Footer
+
+(provide 'diredy)
+
+;;; diredy.el ends here
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/examples/taxy-package-report.el b/emacs/.emacs.d/elpa/taxy-0.10.2/examples/taxy-package-report.el
new file mode 100644
index 0000000..5c251ce
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/examples/taxy-package-report.el
@@ -0,0 +1,53 @@
+;; taxy-package-report.el  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>n
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Inspired by Manuel Uberti's blog post:
+;; <https://www.manueluberti.eu//emacs/2021/09/01/package-report/>.
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'package)
+
+(require 'taxy-magit-section)
+
+(defun taxy-package-report ()
+  "List installed packages by archive in a `magit-section' buffer."
+  (interactive)
+  (cl-labels ((package-archive
+               (package) (if-let* ((package-struct (car (alist-get (car package) package-archive-contents)))
+                                   (archive (package-desc-archive package-struct)))
+                             archive
+                           "no archive"))
+              (format-package
+               (package) (symbol-name (car package))))
+    (let ((taxy (make-taxy-magit-section
+                 :name "Packages by archive"
+                 :take (lambda (item taxy)
+                         (taxy-take-keyed (list #'package-archive) item taxy))
+                 :make (lambda (&rest args)
+                         (apply #'make-taxy-magit-section :format-fn #'format-package :indent 0 args))
+                 :format-fn #'format-package
+                 :indent 0)))
+      (taxy-magit-section-pp (taxy-fill package-alist taxy)))))
+
+;;; taxy-package-report.el ends here
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/taxy-autoloads.el b/emacs/.emacs.d/elpa/taxy-0.10.2/taxy-autoloads.el
new file mode 100644
index 0000000..6654ee5
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/taxy-autoloads.el
@@ -0,0 +1,28 @@
+;;; taxy-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from taxy.el
+
+(register-definition-prefixes "taxy" '("taxy-"))
+
+;;; End of scraped data
+
+(provide 'taxy-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; taxy-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/taxy-pkg.el b/emacs/.emacs.d/elpa/taxy-0.10.2/taxy-pkg.el
new file mode 100644
index 0000000..f4a3bde
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/taxy-pkg.el
@@ -0,0 +1,2 @@
+;; Generated package description from taxy.el  -*- no-byte-compile: t -*-
+(define-package "taxy" "0.10.2" "Programmable taxonomical grouping for arbitrary objects" '((emacs "26.3")) :commit "3099ae5cb27a34961e06a3af67555919c62c12d7" :authors '(("Adam Porter" . "adam@alphapapa.net")) :maintainer '("Adam Porter" . "adam@alphapapa.net") :keywords '("lisp") :url "https://github.com/alphapapa/taxy.el")
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/taxy.el b/emacs/.emacs.d/elpa/taxy-0.10.2/taxy.el
new file mode 100644
index 0000000..b6da5ec
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/taxy.el
@@ -0,0 +1,442 @@
+;;; taxy.el --- Programmable taxonomical grouping for arbitrary objects  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+;; URL: https://github.com/alphapapa/taxy.el
+;; Package-Requires: ((emacs "26.3"))
+;; Version: 0.10.2
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library provides a programmable way to classify arbitrary
+;; objects into a hierarchical taxonomy.  (That's a lot of fancy words
+;; to say that this lets you put things in nested groups.)
+
+;; Helpful features include:
+
+;; + Dynamic taxonomies: Objects may be classified into hierarchies
+;; automatically defined at runtime based on their attributes.
+
+;; + Reusable taxonomies: Taxonomy definitions may be stored in
+;; variables and reused in other taxonomies' descendant groups.
+
+;; Basic usage:
+
+;; 1.  Make a taxy with `make-taxy'.
+;; 2.  Fill the taxy with items using `taxy-fill'.
+;; 3.  For a simple display of a taxy's items, use `taxy-plain'.
+
+;; For more details, please see the README.org file.
+
+;;; Code:
+
+;;;; Requirements
+
+(require 'cl-lib)
+(require 'map)
+(require 'subr-x)
+
+;;;; Structs
+
+(cl-defstruct taxy
+  name description key items taxys
+  (predicate #'identity) (then #'ignore)
+  (make #'make-taxy)
+  take)
+
+;;;; Variables
+
+
+;;;; Customization
+
+
+;;;; Commands
+
+
+;;;; Functions
+
+(defun taxy-fill (items taxy)
+  "Fill TAXY with ITEMS according to its definition."
+  (cl-labels ((apply-item (item taxy)
+                          (or (if (taxy-take taxy)
+                                  (funcall (taxy-take taxy) item taxy)
+                                (cl-loop for taxy in (taxy-taxys taxy)
+                                         when (funcall (taxy-predicate taxy) item)
+                                         do (progn
+                                              (if (taxy-take taxy)
+                                                  (funcall (taxy-take taxy) item taxy)
+                                                (if (taxy-taxys taxy)
+                                                    (or (apply-item item taxy)
+                                                        (push item (taxy-items taxy)))
+                                                  (push item (taxy-items taxy))))
+                                              (setf item (funcall (taxy-then taxy) item)))
+                                         unless item return t
+                                         finally return nil))
+                              ;; No sub-taxys took the item: add it to this taxy.
+                              (when (funcall (taxy-predicate taxy) item)
+                                (if (taxy-take taxy)
+                                    (funcall (taxy-take taxy) item taxy)
+                                  (push item (taxy-items taxy)))))))
+    (dolist (item items taxy)
+      (apply-item item taxy))))
+
+(defun taxy-plain (taxy)
+  "Return a list of the human-readable parts of TAXY."
+  (delq nil
+        (list (taxy-name taxy)
+              (taxy-description taxy)
+              (taxy-items taxy)
+              (mapcar #'taxy-plain (taxy-taxys taxy)))))
+
+(defun taxy-emptied (taxy)
+  "Return a copy of TAXY without items.
+Omits TAXY's items and those of its descendant taxys.  Useful
+when reusing taxy definitions."
+  (setf taxy (copy-taxy taxy)
+        (taxy-items taxy) nil
+        (taxy-taxys taxy) (mapcar #'taxy-emptied (taxy-taxys taxy)))
+  taxy)
+
+(defun taxy-flatten (taxy)
+  "Return a list of items in TAXY and its sub-taxys."
+  (append (taxy-items taxy)
+          (cl-loop for taxy in (taxy-taxys taxy)
+                   append (taxy-flatten taxy))))
+
+(defun taxy-mapcar-items (fn taxy)
+  "Return copy of TAXY, having replaced its items with the value of FN on each.
+Replaces every item in TAXY and its descendants.  Useful to
+replace items with a more useful form after classification."
+  (declare (indent defun))
+  ;; It might be preferable to destructively replace items rather
+  ;; than consing new lists, but I haven't found a way that works
+  ;; (even `cl-loop' with `in-ref' hasn't worked).
+  (setf (taxy-items taxy) (mapcar fn (taxy-items taxy))
+        (taxy-taxys taxy) (cl-loop for taxy in (taxy-taxys taxy)
+                                   collect (taxy-mapcar-items fn taxy)))
+  taxy)
+
+(defalias 'taxy-mapcar #'taxy-mapcar-items)
+
+(defun taxy-mapc-taxys (fn taxy)
+  "Return TAXY having applied FN to it and its descendants.
+Does not copy TAXY.  Destructively modifies TAXY, if FN does."
+  (declare (indent defun))
+  (funcall fn taxy)
+  (cl-loop for sub-taxy in-ref (taxy-taxys taxy)
+           do (setf sub-taxy (taxy-mapc-taxys fn sub-taxy)))
+  taxy)
+
+(defalias 'taxy-mapc* #'taxy-mapc-taxys)
+
+(cl-defun taxy-take-keyed
+    (key-fns item taxy
+             &key (key-name-fn #'identity) (then #'ignore))
+  "Take ITEM into TAXY, adding new taxys dynamically and recursively.
+Places ITEM into a taxy in TAXY for the value returned by
+KEY-FNS called with ITEM.  The new taxys are added to TAXY
+recursively as necessary.  Each new taxy's name is that returned
+by KEY-NAME-FN called with ITEM.
+
+Each element of KEY-FNS may be a function or a list of functions.
+A list of functions creates a \"chain\" of functions: when an
+item is matched by the first function in a chain, it is placed
+in that chain's taxonomy, and is not \"offered\" to functions
+outside of that chain.
+
+For example, if KEY-FNS were:
+
+  '(((lambda (n) (< n 10)) oddp)
+    ((lambda (n) (>= n 10)) evenp))
+
+Then a list of numbers from 0-19 would be classified
+like (listing numbers on a single line for the sake of example):
+
+  - <10:
+    - 0, 2, 4, 6, 8
+    - oddp:
+      - 1, 3, 5, 7, 9
+  - >=10:
+    - 11, 13, 15, 17, 19
+    - evenp:
+      - 10, 12, 14, 16, 18
+
+So only numbers below 10 are tested against `oddp', and only
+numbers greater-than-or-equal-to 10 are tested against
+`evenp'.  (A contrived example, of course, since testing against
+`evenp' or `oddp' is just the inverse.)"
+  (declare (indent defun))
+  (cl-macrolet ((offer-or-push
+                 () `(if (cdr key-fns)
+                         (taxy-take-keyed (cdr key-fns) item taxy
+                           :key-name-fn key-name-fn :then then)
+                       (push item (taxy-items taxy)))))
+    (cl-typecase (car key-fns)
+      (function
+       ;; A single key function.
+       (let ((key-fn (car key-fns)))
+         (if-let ((key (funcall key-fn item)))
+             ;; This key function returned non-nil for the item:
+             ;; apply it to the appropriate sub-taxy.
+             (let ((key-taxy
+                    (or (cl-find-if (lambda (taxy-key)
+                                      (equal key taxy-key))
+                                    (taxy-taxys taxy)
+                                    :key #'taxy-key)
+                        ;; No existing, matching sub-taxy found: make
+                        ;; a new one and add it to TAXY's sub-taxys.
+                        (car
+                         (push (funcall
+                                ;; NOTE: Calling `make-taxy' directly might offer the
+                                ;; compiler a chance to optimize compared to using `funcall',
+                                ;; but allowing taxy structs to specify their own MAKE
+                                ;; functions is very helpful when using specialized structs.
+                                (taxy-make taxy)
+                                :name (funcall key-name-fn key)
+                                :key key
+                                :predicate (lambda (item)
+                                             (equal key (funcall key-fn item)))
+                                :take (when (cdr key-fns)
+                                        (lambda (item taxy)
+                                          (taxy-take-keyed (cdr key-fns) item taxy
+                                            :key-name-fn key-name-fn :then then)))
+                                :then then)
+                               (taxy-taxys taxy))))))
+               (if (cdr key-fns)
+                   ;; Other key-fns remain: offer item to them, allowing
+                   ;; them to create more sub-taxys beneath this key-taxy.
+                   (taxy-take-keyed (cdr key-fns) item key-taxy
+                     :key-name-fn key-name-fn :then then)
+                 ;; No more key-fns remain: add item to this taxy.
+                 (push item (taxy-items key-taxy))))
+           ;; No key value: offer to other KEY-FNS or push to this taxy.
+           (offer-or-push))))
+      (list
+       ;; A "chain" of key functions.
+       (or (when (funcall (caar key-fns) item)
+             ;; The first function in this chain returns non-nil for
+             ;; the item: apply the item to the chain.
+             (taxy-take-keyed (car key-fns) item taxy
+               :key-name-fn key-name-fn :then then))
+           ;; This "chain" of key-fns didn't take the item: offer it to
+           ;; other chains, or push to this taxy if they don't take it.
+           (offer-or-push))))))
+
+(defun taxy-size (taxy)
+  "Return the number of items TAXY holds.
+Includes items in TAXY's sub-taxys."
+  (cl-loop for sub-taxy in (taxy-taxys taxy)
+           sum (taxy-size sub-taxy) into total
+           finally return (+ total (length (taxy-items taxy)))))
+
+(defun taxy-sort-items (pred key taxy)
+  "Sort TAXY's items by PRED and KEY.
+Sorts items in TAXY and its sub-taxys.  KEY is passed to
+`cl-sort', which see."
+  (declare (indent defun))
+  (taxy-mapc* (lambda (taxy)
+                (setf (taxy-items taxy)
+                      (cl-sort (taxy-items taxy)
+                               pred :key key)))
+    taxy))
+
+(defalias 'taxy-sort #'taxy-sort-items)
+
+(defun taxy-sort-taxys (pred key taxy)
+  "Sort TAXY's sub-taxys by PRED and KEY.
+KEY is passed to `cl-sort', which see."
+  (declare (indent defun))
+  (taxy-mapc* (lambda (taxy)
+                (setf (taxy-taxys taxy)
+                      (cl-sort (taxy-taxys taxy)
+                               pred :key key)))
+    taxy))
+
+(defalias 'taxy-sort* #'taxy-sort-taxys)
+
+;;;; Key functions
+
+;; Utilities to define key and take functions in a standard way.
+
+(defmacro taxy-define-key-definer (name variable prefix docstring)
+  "Define a macro NAME that defines a key-function-defining macro.
+The defined macro, having string DOCSTRING, associates the
+defined key functions with their aliases in an alist stored in
+symbol VARIABLE.  The defined key functions are named having
+string PREFIX, which will have a hyphen appended to it.  The key
+functions take one or more arguments, the first of which is the
+item being tested, bound within the function to `item'."
+  ;; Example docstring:
+
+  ;;   "Define a `taxy-org-ql-view' key function by NAME having BODY taking ARGS.
+  ;; Within BODY, `element' is bound to the `org-element' element
+  ;; being tested.
+
+  ;; Defines a function named `taxy-org-ql--predicate-NAME', and adds
+  ;; an entry to `taxy-org-ql-view-keys' mapping NAME to the new
+  ;; function symbol."
+  (declare (indent defun))
+  ;; I'm not sure why it's necessary to bind the variable in the first
+  ;; level of the expansion here, but double-unquoting the variable in
+  ;; the defined macro's form leaves the second comma in place, which
+  ;; breaks the second expansion, and this works around that.
+  `(let ((variable ',variable))
+     (defvar ,variable nil
+       ;; For the best chance for this docstring to not exceed 80 characters in width, the
+       ;; macro's name goes on its own line.
+       ,(format "Alist mapping key aliases to key functions.
+This instance is defined with the macro:
+`%s'."
+                name))
+     (defmacro ,name (name args &rest body)
+       ,docstring
+       (declare (indent defun)
+                (debug (&define symbolp listp &rest def-form)))
+       (let* ((fn-symbol (intern (format "%s-%s" ,prefix name)))
+              (fn `(cl-function
+                    (lambda (item ,@args)
+                      ,@body))))
+         `(progn
+            (fset ',fn-symbol ,fn)
+            (setf (map-elt ,variable ',name) ',fn-symbol))))))
+
+(defun taxy-make-take-function (keys aliases)
+  "Return a `taxy' \"take\" function for KEYS.
+Each of KEYS should be a function alias defined in ALIASES, or a
+list of such KEY-FNS (recursively, ad infinitum, approximately).
+ALIASES should be an alist mapping aliases to functions (such as
+defined with a definer defined by `taxy-define-key-definer')."
+  (let ((macrolets (cl-loop for (name . fn) in aliases
+                            collect `(,name ',fn))))
+    (cl-labels ((expand-form
+                 ;; Is using (cadr (macroexpand-all ...)) really better than `eval'?
+                 (form) (cadr (macroexpand-all
+                               `(cl-symbol-macrolet (,@macrolets)
+                                  ,form))))
+                (quote-fn
+                 (fn) (pcase fn
+                        ((pred symbolp) (expand-form fn))
+                        (`(,(and (or 'and 'or 'not) boolean)
+                           . ,(and args (map (:name name) (:keys keys))))
+                         ;; Well, that pcase expression isn't confusing at all...  ;)
+                         ;;  (cl-assert name t "Boolean key functions require a NAME")
+                         ;;  (cl-assert keys t "Boolean key functions require KEYS")
+                         `(lambda (buffer)
+                            (when (cl-loop for fn in ',(mapcar #'quote-fn (or keys args))
+                                           ,(pcase boolean
+                                              ('and 'always)
+                                              ('or 'thereis)
+                                              ('not 'never))
+                                           (funcall fn buffer))
+                              (or ,name ""))))
+                        (`(,(and (pred symbolp) fn)
+                           . ,(and args (guard (pcase (car args)
+                                                 ((or (pred keywordp)
+                                                      (and (pred atom)
+                                                           ;; SOMEDAY: Use (not symbolp) when depending on Emacs 28.1.
+                                                           (pred (lambda (it) (not (symbolp it)))))
+                                                      `(quote ,_))
+                                                  t)))))
+                         ;; Key with args: replace with a lambda that
+                         ;; calls that key's function with given args.
+                         `(lambda (element)
+                            (,(expand-form fn) element ,@args)))
+                        ((pred listp) (mapcar #'quote-fn fn)))))
+      (setf keys (mapcar #'quote-fn keys))
+      `(lambda (item taxy)
+         (taxy-take-keyed ',keys item taxy)))))
+
+;;;; Documentation group
+
+;; Available in Emacs 28.  NOTE: In earlier Emacs versions,
+;; byte-compiling this section will produce warnings due to the
+;; shortdoc forms that appear to be function calls.
+
+(with-eval-after-load 'shortdoc
+  (declare-function shortdoc-add-function "shortdoc" (group section elem))
+  (mapc (lambda (elem)
+	  (shortdoc-add-function 'taxy nil elem))
+        '((taxy-flatten
+           :eval (taxy-flatten
+                  (make-taxy
+                   :items '(a b c)
+                   :taxys (list (make-taxy
+                                 :items '(d e f))))))
+          (taxy-emptied
+           :eval (taxy-emptied
+                  (make-taxy
+                   :items '(a b c)
+                   :taxys (list (make-taxy
+                                 :items '(d e f))))))
+          (taxy-fill
+           :eval (taxy-fill '(0 1 2 3)
+                            (make-taxy
+                             :name "Numbers"
+                             :taxys (list (make-taxy
+                                           :name "Odd"
+                                           :predicate #'cl-oddp)
+                                          (make-taxy
+                                           :name "Even"
+                                           :predicate #'cl-evenp)))))
+          (taxy-make-take-function
+           :eval (taxy-make-take-function
+                  '(first-char second-char)
+                  '((first-char (lambda (s) (substring s nil 1)))
+                    (second-char (lambda (s) (substring s 1 2))))))
+          (taxy-mapc-taxys
+            :eval (taxy-mapc-taxys
+                    (lambda (taxy)
+                      (setf (taxy-name taxy) (upcase (taxy-name taxy))))
+                    (make-taxy :name "a" :taxys (list (make-taxy :name "b")))))
+          (taxy-mapcar-items
+            :eval (taxy-mapcar-items #'upcase
+                    (make-taxy :items (list "a" "b" "c")
+                               :taxys (list (make-taxy :items (list "d" "e" "f"))))))
+          (taxy-plain
+           :eval (taxy-plain
+                  (taxy-fill '(0 1 2 3)
+                             (make-taxy
+                              :name "Numbers"
+                              :taxys (list (make-taxy
+                                            :name "Odd"
+                                            :predicate #'cl-oddp)
+                                           (make-taxy
+                                            :name "Even"
+                                            :predicate #'cl-evenp))))))
+          (taxy-size
+           :eval (taxy-size
+                  (make-taxy
+                   :items '(a b c)
+                   :taxys (list (make-taxy
+                                 :items '(d e f))))))
+          (taxy-sort-items
+            :eval (taxy-sort-items #'string< #'identity
+                    (make-taxy :items (list "c" "b" "a")
+                               :taxys (list (make-taxy :items (list "f" "e" "d"))))))
+          (taxy-sort-taxys
+            :eval (taxy-sort-taxys #'string< #'taxy-name
+                    (make-taxy :name "Taxy"
+                               :taxys (list (make-taxy :name "Beta")
+                                            (make-taxy :name "Alpha"))))))))
+
+;;;; Footer
+
+(provide 'taxy)
+
+;;; taxy.el ends here
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/taxy.elc b/emacs/.emacs.d/elpa/taxy-0.10.2/taxy.elc
new file mode 100644
index 0000000..ac0afae
Binary files /dev/null and b/emacs/.emacs.d/elpa/taxy-0.10.2/taxy.elc differ
diff --git a/emacs/.emacs.d/elpa/taxy-0.10.2/taxy.info b/emacs/.emacs.d/elpa/taxy-0.10.2/taxy.info
new file mode 100644
index 0000000..80e959d
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-0.10.2/taxy.info
@@ -0,0 +1,1536 @@
+This is README.info, produced by makeinfo version 6.7 from README.texi.
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Taxy: (taxy).         Programmable taxonomical grouping for arbitrary objects.
+END-INFO-DIR-ENTRY
+
+
+File: README.info,  Node: Top,  Next: Examples,  Up: (dir)
+
+taxy.el
+*******
+
+https://elpa.gnu.org/packages/taxy.svg
+(https://elpa.gnu.org/packages/taxy.html)
+
+   _Now, where did I put that..._
+
+   This library provides a programmable way to classify arbitrary
+objects into a hierarchical taxonomy.  (That’s a lot of fancy words to
+say that this lets you automatically put things in nested groups.)
+
+   Helpful features include:
+
+Dynamic taxonomies
+     Objects may be classified into hierarchies automatically defined at
+     runtime based on their attributes.
+Reusable taxonomies
+     Taxonomy definitions may be stored in variables and reused in other
+     taxonomies’ descendant groups.
+Classification domain-specific language
+     Easily define a custom DSL used to classify items dynamically
+     (which can be extended by users).
+Flexible table view
+     Based on ‘magit-section’, with easily defined columns (also
+     extendable by users).
+
+* Menu:
+
+* Examples::
+* Installation::
+* Usage::
+* Changelog::
+* Development::
+* Credits::
+* License::
+
+— The Detailed Node Listing —
+
+Examples
+
+* Numbery (starting basically)::
+* Lettery (filling incrementally)::
+* Sporty (understanding completely)::
+* Applications::
+
+Usage
+
+* Reusable taxys::
+* Threading macros::
+* Modifying filled taxys::
+* Dynamic taxys::
+* Magit section::
+* Reference::
+
+Dynamic taxys
+
+* Multi-level dynamic taxys::
+* "Chains" of independent, multi-level dynamic taxys: "Chains" of independent multi-level dynamic taxys.
+* Defining a classification domain-specific language::
+
+Reference
+
+* Functions::
+* Macros::
+
+Changelog
+
+* 0.10.2: 0102.
+* 0.10.1: 0101.
+* 0.10: 010.
+* 0.9: 09.
+* 0.8: 08.
+* 0.7: 07.
+* 0.6: 06.
+* 0.5: 05.
+* 0.4: 04.
+* 0.3: 03.
+* 0.2: 02.
+* 0.1: 01.
+
+0.9
+
+* Changes::
+
+0.8
+
+* Additions::
+* Fixes::
+
+0.7
+
+* Additions: Additions (1).
+
+0.6
+
+* Additions: Additions (2).
+
+0.5
+
+* Additions: Additions (3).
+* Fixes: Fixes (1).
+
+0.3
+
+* Changes: Changes (1).
+* Fixes: Fixes (2).
+
+0.2
+
+* Changes: Changes (2).
+* Additions: Additions (4).
+* Fixes: Fixes (3).
+
+Development
+
+* Copyright assignment::
+
+
+
+File: README.info,  Node: Examples,  Next: Installation,  Prev: Top,  Up: Top
+
+1 Examples
+**********
+
+   • • • • 
+   May these examples help you classify your understanding.
+
+* Menu:
+
+* Numbery (starting basically)::
+* Lettery (filling incrementally)::
+* Sporty (understanding completely)::
+* Applications::
+
+
+File: README.info,  Node: Numbery (starting basically),  Next: Lettery (filling incrementally),  Up: Examples
+
+1.1 Numbery (starting basically)
+================================
+
+Let’s imagine a silly taxonomy of numbers below 100:
+
+     ("Numbery" "A silly taxonomy of numbers."
+      (("< 10" "Numbers below 10"
+        ;; These numbers are leftovers from the sub-taxys below.
+        (0 2 4 6 8)
+        ;; These sub-taxys further classify the numbers below 10 into odd
+        ;; and even.  The odd taxy "consumes" numbers, while the even one
+        ;; doesn't, leaving them to reappear in the parent taxy's items.
+        (("Odd" "(consuming)"
+          (1 3 5 7 9))
+         ("Even" "(non-consuming)"
+          (0 2 4 6 8))))
+       (">= 10" "Numbers above 9"
+        ;; Like in the "< 10" taxy, these numbers are leftovers from this
+        ;; taxy's sub-taxys, three of which are non-consuming.
+        (10 11 13 14 17 19 22 23 25 26 29 31 34 35 37 38 41 43 46 47 49 50 53 55 58
+            59 61 62 65 67 70 71 73 74 77 79 82 83 85 86 89 91 94 95 97 98)
+        (("Divisible by 3" "(non-consuming)"
+          (12 15 18 21 24 27 30 33 36 39 42 45 48 51 54 57 60 63 66 69 72 75 78 81 84
+              87 90 93 96 99))
+         ("Divisible by 4" "(non-consuming)"
+          (12 16 20 24 28 32 36 40 44 48 52 56 60 64 68 72 76 80 84 88 92 96))
+         ("Divisible by 3 or 4" "(consuming)"
+          ;; This taxy consumes numbers it takes in, but since these
+          ;; numbers have already been taken in (without being consumed) by
+          ;; the previous two sibling taxys, they may also appear in them.
+          (12 15 16 18 20 21 24 27 28 30 32 33 36 39 40 42 44 45 48 51 52 54 56 57 60
+              63 64 66 68 69 72 75 76 78 80 81 84 87 88 90 92 93 96 99))
+         ("Divisible by 5" "(non-consuming)"
+          (10 25 35 50 55 65 70 85 95))))))
+
+   You might think about how to produce that by writing some imperative
+code, but ‘taxy’ allows you to do so in a more declarative and
+functional manner:
+
+     (require 'taxy)
+
+     (defvar numbery
+       (make-taxy
+        :name "Numbery"
+        :description "A silly taxonomy of numbers."
+        :taxys (list (make-taxy
+                      :name "< 10"
+                      :description "Numbers below 10 (consuming)"
+                      :predicate (lambda (n) (< n 10))
+                      :taxys (list
+                              ;; These sub-taxys further classify the numbers below 10 into odd
+                              ;; and even.  The odd taxy "consumes" numbers, while the even one
+                              ;; doesn't, leaving them to reappear in the parent taxy's items.
+                              (make-taxy :name "Odd"
+                                         :description "(consuming)"
+                                         :predicate #'oddp)
+                              (make-taxy :name "Even"
+                                         :description "(non-consuming)"
+                                         :predicate #'evenp
+                                         :then #'identity)))
+                     (make-taxy
+                      :name ">= 10"
+                      :description "Numbers above 9 (consuming)"
+                      :predicate (lambda (n) (>= n 10))
+                      :taxys (list
+                              ;; Like in the "< 10" taxy, these sub-taxys further classify
+                              ;; the numbers, but only one of them consumes numbers it
+                              ;; takes in, leaving the rest to reappear in the parent taxy.
+                              (make-taxy :name "Divisible by 3"
+                                         :description "(non-consuming)"
+                                         :predicate (lambda (n) (zerop (mod n 3)))
+                                         :then #'identity)
+                              (make-taxy :name "Divisible by 4"
+                                         :description "(non-consuming)"
+                                         :predicate (lambda (n) (zerop (mod n 4)))
+                                         :then #'identity)
+                              (make-taxy :name "Divisible by 3 or 4"
+                                         :description "(consuming)"
+                                         ;; Since this taxy's `:then' function is unset,
+                                         ;; it defaults to `ignore', which causes it to
+                                         ;; consume numbers it takes in.  Since these
+                                         ;; numbers have already been taken in (without
+                                         ;; being consumed) by the previous two sibling
+                                         ;; taxys, they also appear in them.
+                                         :predicate (lambda (n) (or (zerop (mod n 3))
+                                                                    (zerop (mod n 4)))))
+                              (make-taxy :name "Divisible by 5"
+                                         :description "(non-consuming)"
+                                         :predicate (lambda (n) (zerop (mod n 5)))
+                                         :then #'identity))))))
+
+     (let ((numbers (cl-loop for i below 100 collect i))
+           ;; Since `numbery' is stored in a variable, we use an emptied
+           ;; copy of it to avoid mutating the original taxy.
+           (taxy (taxy-emptied numbery)))
+       (taxy-plain (taxy-fill (reverse numbers) taxy)))
+
+   The ‘taxy-fill’ function applies the numbers in a "cascade" down the
+hierarchy of "taxys", and the ‘taxy-plain’ function returns a meaningful
+subset of the taxys’ slots, suitable for display.
+
+
+File: README.info,  Node: Lettery (filling incrementally),  Next: Sporty (understanding completely),  Prev: Numbery (starting basically),  Up: Examples
+
+1.2 Lettery (filling incrementally)
+===================================
+
+You can also add more items after the hierarchy has been filled.  In
+this example we’ll make a comprehensive taxonomy of letters.  The first
+sub-taxy collects vowels, and the second, by leaving its predicate at
+the default value, ‘identity’, collects all letters not collected by the
+first taxy, i.e.  non-vowels.
+
+     (defvar lettery
+       (make-taxy
+        :name "Lettery"
+        :description "A comprehensive taxonomy of letters."
+        :taxys (list (make-taxy
+                      :name "Vowels"
+                      :description "You know what those are."
+                      :predicate (lambda (l)
+                                   (member-ignore-case l '("a" "e" "i" "o" "u"))))
+                     (make-taxy
+                      :name "Consonants"
+                      :description "Well, if they aren't vowels..."))))
+
+     (taxy-plain
+      (taxy-fill (reverse
+                  (cl-loop for l from ?a to ?n
+                           collect (upcase (char-to-string l))))
+                 lettery))
+
+   That produces:
+
+     ("Lettery" "A comprehensive taxonomy of letters."
+      (("Vowels" "You know what those are."
+        ("A" "E" "I"))
+       ("Consonants" "Well, if they aren't vowels..."
+        ("B" "C" "D" "F" "G" "H" "J" "K" "L" "M" "N"))))
+
+   Oops, we forgot the letters after N!  Let’s add them, too:
+
+     (taxy-plain
+      (taxy-fill (reverse
+                  (cl-loop for l from ?n to ?z
+                           collect (upcase (char-to-string l))))
+                 lettery))
+
+   Which gives us:
+
+     ("Lettery" "A comprehensive taxonomy of letters."
+      (("Vowels" "You know what those are."
+        ("O" "U" "A" "E" "I"))
+       ("Consonants" "Well, if they aren't vowels..."
+        ("N" "P" "Q" "R" "S" "T" "V" "W" "X" "Y" "Z" "B" "C" "D" "F" "G" "H" "J" "K" "L" "M" "N"))))
+
+   Oh, they’re out of order, now.  That won’t do.  Let’s fix that:
+
+     (taxy-plain
+      (taxy-sort #'string< #'identity lettery))
+
+   That’s better:
+
+     ("Lettery" "A comprehensive taxonomy of letters."
+      (("Vowels" "You know what those are."
+        ("A" "E" "I" "O" "U"))
+       ("Consonants" "Well, if they aren't vowels..."
+        ("B" "C" "D" "F" "G" "H" "J" "K" "L" "M" "N" "N" "P" "Q" "R" "S" "T" "V" "W" "X" "Y" "Z"))))
+
+
+File: README.info,  Node: Sporty (understanding completely),  Next: Applications,  Prev: Lettery (filling incrementally),  Up: Examples
+
+1.3 Sporty (understanding completely)
+=====================================
+
+Let’s try to understand a few things about sports.  First we’ll define a
+struct to make them easier to grasp:
+
+     (cl-defstruct sport
+       name uses venue fun)
+
+   Now we’ll make a list of sports:
+
+     (defvar sports
+       (list (make-sport :name "Baseball"
+                         :uses '(bat ball glove)
+                         :venue 'outdoor
+                         :fun t)
+             (make-sport :name "Football"
+                         :uses '(ball)
+                         :venue 'outdoor
+                         :fun t)
+             (make-sport :name "Basketball"
+                         :uses '(ball hoop)
+                         :venue 'indoor
+                         :fun t)
+             (make-sport :name "Tennis"
+                         :uses '(ball racket)
+                         :venue 'outdoor
+                         :fun t)
+             (make-sport :name "Racquetball"
+                         :uses '(ball racket)
+                         :venue 'indoor
+                         :fun t)
+             (make-sport :name "Handball"
+                         :uses '(ball glove)
+                         :venue 'indoor
+                         :fun t)
+             (make-sport :name "Soccer"
+                         :uses '(ball)
+                         :venue 'outdoor
+                         :fun nil)
+             (make-sport :name "Disc golf"
+                         :uses '(disc basket)
+                         :venue 'outdoor
+                         :fun t)
+             (make-sport :name "Ultimate"
+                         :uses '(disc)
+                         :venue 'outdoor
+                         :fun t)
+             (make-sport :name "Volleyball"
+                         :uses '(ball)
+                         :venue 'indoor
+                         :fun t)))
+
+   And finally we’ll define a taxy to organize them.  In this, we use a
+helper macro to make the ‘member’ function easier to use in the list of
+key functions:
+
+     (defvar sporty
+       (cl-macrolet ((in (needle haystack)
+                         `(lambda (item)
+                            (when (member ,needle (funcall ,haystack item))
+                              ,needle))))
+         (make-taxy
+          :name "Sporty"
+          :take (lambda (item taxy)
+                  (taxy-take-keyed
+                    (list #'sport-venue
+                          (in 'ball 'sport-uses)
+                          (in 'disc 'sport-uses)
+                          (in 'glove 'sport-uses)
+                          (in 'racket 'sport-uses))
+                    item taxy
+                    ;; We set the `:then' function of the taxys
+                    ;; created by `taxy-take-keyed' to `identity'
+                    ;; so they will not consume their items.
+                    :then #'identity)))))
+
+   Now let’s fill the taxy with the sports and format it:
+
+     (thread-last sporty
+       taxy-emptied
+       (taxy-fill sports)
+       (taxy-mapcar #'sport-name)
+       taxy-plain)
+
+     ((("Sporty"
+        ((indoor
+          ((ball
+            ("Volleyball" "Basketball")
+            ((glove
+              ("Handball"))
+             (racket
+              ("Racquetball"))))))
+         (outdoor
+          ((disc
+            ("Ultimate" "Disc golf"))
+           (ball
+            ("Soccer" "Football")
+            ((racket
+              ("Tennis"))
+             (glove
+              ("Baseball"))))))))))
+
+   That’s pretty sporty.  But classifying them by venue first makes the
+racket and glove sports not be listed together.  Let’s swap the key
+functions around so the venue is classified at the deepest level of the
+hierarchy:
+
+     (defvar sporty
+       (cl-macrolet ((in (needle haystack)
+                         `(lambda (item)
+                            (when (member ,needle (funcall ,haystack item))
+                              ,needle))))
+         (make-taxy
+          :name "Sporty"
+          :take (lambda (item taxy)
+                  (taxy-take-keyed
+                    (list (in 'ball 'sport-uses)
+                          (in 'disc 'sport-uses)
+                          (in 'glove 'sport-uses)
+                          (in 'racket 'sport-uses)
+                          #'sport-venue)
+                    item taxy
+                    :then #'identity)))))
+
+     (thread-last sporty
+       taxy-emptied
+       (taxy-fill sports)
+       (taxy-mapcar #'sport-name)
+       taxy-plain)
+
+     ((("Sporty"
+        ((disc
+          ((outdoor
+            ("Ultimate" "Disc golf"))))
+         (ball
+          ((racket
+            ((indoor
+              ("Racquetball"))
+             (outdoor
+              ("Tennis"))))
+           (indoor
+            ("Volleyball" "Basketball"))
+           (outdoor
+            ("Soccer" "Football"))
+           (glove
+            ((indoor
+              ("Handball"))
+             (outdoor
+              ("Baseball"))))))))))
+
+   That’s better.  But I’d also like to see a very simple classification
+to help me decide what to play:
+
+     (thread-last
+         (make-taxy
+          :name "Funny"
+          :take (lambda (item taxy)
+                  (taxy-take-keyed
+                    (list (lambda (sport)
+                            (if (sport-fun sport)
+                                'fun 'boring))
+                          #'sport-venue)
+                    item taxy)))
+       taxy-emptied
+       (taxy-fill sports)
+       (taxy-mapcar #'sport-name)
+       taxy-plain)
+
+     ((("Funny"
+        ((boring
+          ((outdoor
+            ("Soccer"))))
+         (fun
+          ((indoor
+            ("Volleyball" "Handball" "Racquetball" "Basketball"))
+           (outdoor
+            ("Ultimate" "Disc golf" "Tennis" "Football" "Baseball"))))))))
+
+   Ah, now I understand.
+
+
+File: README.info,  Node: Applications,  Prev: Sporty (understanding completely),  Up: Examples
+
+1.4 Applications
+================
+
+Some example applications may be found in the examples directory
+(examples/):
+
+   • Deffy shows top-level definitions and forms in an Elisp project or
+     file:
+   • Diredy rearranges a Dired buffer into groups by file size and type:
+   • Musicy shows a music library with tracks categorized by genre,
+     artist, year, album, etc:
+
+
+File: README.info,  Node: Installation,  Next: Usage,  Prev: Examples,  Up: Top
+
+2 Installation
+**************
+
+‘taxy’ is distributed in GNU ELPA (https://elpa.gnu.org/), which is
+available in Emacs by default.  Use ‘M-x package-install RET taxy RET’,
+then ‘(require 'taxy)’ in your Elisp project.
+
+
+File: README.info,  Node: Usage,  Next: Changelog,  Prev: Installation,  Up: Top
+
+3 Usage
+*******
+
+   • • • • • • 
+   A taxy is defined with the ‘make-taxy’ constructor, like:
+
+     (make-taxy :name "Numbery"
+                :description "A silly taxonomy of numbers."
+                :predicate #'numberp
+                :then #'ignore
+                :taxys (list ...))
+
+   The ‘:predicate’ function determines whether an object fits into that
+taxy.  If it does, ‘taxy-fill’ adds the object to that taxy’s descendant
+‘:taxys’, if present, or to its own ‘:items’.  The function defaults to
+‘identity’, so a taxy "takes in" any object by default (i.e.  if you
+only apply objects you want to classify, there’s no need to test them at
+the top-level taxy).
+
+   The ‘:then’ function determines what happens to an object after being
+taken in to the taxy’s ‘:items’: if the function, called with the
+object, returns a non-nil value, that value is applied to other taxys at
+the same level until one of their ‘:then’ functions returns nil or no
+more taxys remain.  The function defaults to ‘ignore’, which makes a
+taxy "consume" its items by default.  Setting the function to, e.g.
+‘identity’, makes it not consume them, leaving them eligible to also be
+taken into subsequent taxys, or to appear in the parent taxy’s items.
+
+   After defining a taxy, call ‘taxy-fill’ with it and a list of objects
+to fill the taxy’s hierarchy.  *Note:* ‘taxy-fill’ modifies the taxy
+given to it (filling its ‘:items’ and those of its ‘:taxys’), so when
+using a statically defined taxy (e.g.  one defined with ‘defvar’), you
+should pass ‘taxy-fill’ a taxy copied with ‘taxy-emptied’, which
+recursively copies a taxy without ‘:items’.
+
+   To return a taxy in a more human-readable format (with only relevant
+fields included), use ‘taxy-plain’.  You may also use ‘taxy-mapcar’ to
+replace items in a taxy with, e.g.  a more useful representation.
+
+* Menu:
+
+* Reusable taxys::
+* Threading macros::
+* Modifying filled taxys::
+* Dynamic taxys::
+* Magit section::
+* Reference::
+
+
+File: README.info,  Node: Reusable taxys,  Next: Threading macros,  Up: Usage
+
+3.1 Reusable taxys
+==================
+
+Since taxys are structs, they may be stored in variables and used in
+other structs (being sure to copy the root taxy with ‘taxy-emptied’
+before filling).  For example, this shows using ‘taxy’ to classify
+Matrix rooms in Ement.el (https://github.com/alphapapa/ement.el):
+
+     (defun ement-roomy-buffer (room)
+       (alist-get 'buffer (ement-room-local room)))
+
+     (defvar ement-roomy-unread
+       (make-taxy :name "Unread"
+                  :predicate (lambda (room)
+                               (buffer-modified-p (ement-roomy-buffer room)))))
+
+     (defvar ement-roomy-opened
+       (make-taxy :name "Opened"
+                  :description "Rooms with buffers"
+                  :predicate #'ement-roomy-buffer
+                  :taxys (list ement-roomy-unread
+                               (make-taxy))))
+
+     (defvar ement-roomy-closed
+       (make-taxy :name "Closed"
+                  :description "Rooms without buffers"
+                  :predicate (lambda (room)
+                               (not (ement-roomy-buffer room)))))
+
+     (defvar ement-roomy
+       (make-taxy
+        :name "Ement Rooms"
+        :taxys (list (make-taxy
+                      :name "Direct"
+                      :description "Direct messaging rooms"
+                      :predicate (lambda (room)
+                                   (ement-room--direct-p room ement-session))
+                      :taxys (list ement-roomy-opened
+                                   ement-roomy-closed))
+                     (make-taxy
+                      :name "Non-direct"
+                      :description "Group chat rooms"
+                      :taxys (list ement-roomy-opened
+                                   ement-roomy-closed)))))
+
+   Note how the taxys defined in the first three variables are used in
+subsequent taxys.  As well, the ‘ement-roomy-opened’ taxy has an
+"anonymous" taxy, which collects any rooms that aren’t collected by its
+sibling taxy (otherwise those objects would be collected into the
+parent, "Opened" taxy, which may not always be the most useful way to
+present the objects).
+
+   Using those defined taxys, we then fill the ‘ement-roomy’ taxy with
+all of the rooms in the user’s session, and then use ‘taxy-mapcar’ to
+replace the room structs with useful representations for display:
+
+     (taxy-plain
+      (taxy-mapcar (lambda (room)
+                     (list (ement-room--room-display-name room)
+                           (ement-room-id room)))
+        (taxy-fill (ement-session-rooms ement-session)
+                   (taxy-emptied ement-roomy))))
+
+   This produces:
+
+     ("Ement Rooms"
+      (("Direct" "Direct messaging rooms"
+        (("Opened" "Rooms with buffers"
+          (("Unread"
+            (("Lars Ingebrigtsen" "!nope:gnus.org")))))
+         ("Closed" "Rooms without buffers"
+          (("John Wiegley" "!not-really:newartisans.com")
+           ("Eli Zaretskii" "!im-afraid-not:gnu.org")))))
+       ("Non-direct" "Group chat rooms"
+        (("Opened" "Rooms with buffers"
+          (("Unread"
+            (("Emacs" "!WfZsmtnxbxTdoYPkaT:greyface.org")
+             ("#emacs" "!KuaCUVGoCiunYyKEpm:libera.chat")))
+           ;; The non-unread buffers in the "anonymous" taxy.
+           ((("magit/magit" "!HZYimOcmEAsAxOcgpE:gitter.im")
+             ("Ement.el" "!NicAJNwJawmHrEhqZs:matrix.org")
+             ("#emacsconf" "!UjTTDnYmSAslLTtMCF:libera.chat")
+             ("Emacs Matrix Client" "!ZrZoyXEyFrzcBZKNis:matrix.org")
+             ("org-mode" "!rUhEinythPhVTdddsb:matrix.org")
+             ("This Week in Matrix (TWIM)" "!xYvNcQPhnkrdUmYczI:matrix.org")))))
+         ("Closed" "Rooms without buffers"
+          (("#matrix-spec" "!NasysSDfxKxZBzJJoE:matrix.org")
+           ("#commonlisp" "!IiGsrmKRHzpupHRaKS:libera.chat")
+           ("Matrix HQ" "!OGEhHVWSdvArJzumhm:matrix.org")
+           ("#lisp" "!czLxhhEegTEGNKUBgo:libera.chat")
+           ("Emacs" "!gLamGIXTWBaDFfhEeO:matrix.org")
+           ("#matrix-dev:matrix.org" "!jxlRxnrZCsjpjDubDX:matrix.org")))))))
+
+
+File: README.info,  Node: Threading macros,  Next: Modifying filled taxys,  Prev: Reusable taxys,  Up: Usage
+
+3.2 Threading macros
+====================
+
+If you happen to like macros, ‘taxy’ works well with threading (i.e.
+‘thread-last’ or ‘->>’):
+
+     (thread-last ement-roomy
+       taxy-emptied
+       (taxy-fill (ement-session-rooms ement-session))
+       (taxy-mapcar (lambda (room)
+                      (list (ement-room--room-display-name room)
+                            (ement-room-id room))))
+       taxy-plain)
+
+
+File: README.info,  Node: Modifying filled taxys,  Next: Dynamic taxys,  Prev: Threading macros,  Up: Usage
+
+3.3 Modifying filled taxys
+==========================
+
+Sometimes it’s necessary to modify a taxy after filling it with objects,
+e.g.  to sort the items and/or the sub-taxys.  For this, use the
+function ‘taxy-mapc-taxys’ (a.k.a.  ‘taxy-mapc*’).  For example, in the
+sample application musicy.el (examples/musicy.el), the taxys and their
+items are sorted after filling, like so:
+
+     (defun musicy-files (files)
+       (thread-last musicy-taxy
+         taxy-emptied
+         (taxy-fill files)
+         ;; Sort sub-taxys by their name.
+         (taxy-sort* #'string< #'taxy-name)
+         ;; Sort sub-taxys' items by name.
+         (taxy-sort #'string< #'identity)
+         taxy-magit-section-pp))
+
+
+File: README.info,  Node: Dynamic taxys,  Next: Magit section,  Prev: Modifying filled taxys,  Up: Usage
+
+3.4 Dynamic taxys
+=================
+
+   • • • 
+   You may not always know in advance what taxonomy a set of objects
+fits into, so ‘taxy’ lets you add taxys dynamically by using the ‘:take’
+function to add a taxy when an object is "taken into" a parent taxy’s
+items.  For example, you could dynamically classify buffers by their
+major mode like so:
+
+     (defun buffery-major-mode (buffer)
+       (buffer-local-value 'major-mode buffer))
+
+     (defvar buffery
+       (make-taxy
+        :name "Buffers"
+        :taxys (list
+                (make-taxy
+                 :name "Modes"
+                 :take (apply-partially #'taxy-take-keyed (list #'buffery-major-mode))))))
+
+     ;; Note the use of `taxy-emptied' to avoid mutating the original taxy definition.
+     (taxy-plain
+      (taxy-fill (buffer-list)
+                 (taxy-emptied buffery)))
+
+   The taxy’s ‘:take’ function is set to the ‘taxy-take-keyed’ function,
+partially applied with the ‘buffery-major-mode’ function as its list of
+‘key-fns’ (‘taxy-fill’ supplies the buffer and the taxy as arguments),
+and it produces this taxonomy of buffers:
+
+     ("Buffers"
+      (("Modes"
+        ((magit-process-mode
+          (#<buffer magit-process: taxy.el> #<buffer magit-process: > #<buffer magit-process: notes>))
+         (messages-buffer-mode
+          (#<buffer *Messages*>))
+         (special-mode
+          (#<buffer *Warnings*> #<buffer *elfeed-log*>))
+         (dired-mode
+          (#<buffer ement.el<emacs>>))
+         (Custom-mode
+          (#<buffer *Customize Apropos*>))
+         (fundamental-mode
+          (#<buffer  *helm candidates:Bookmarks*> #<buffer *Backtrace*>))
+         (magit-diff-mode
+          (#<buffer magit-diff: taxy.el> #<buffer magit-diff: notes> #<buffer magit-diff: ement.el>))
+         (compilation-mode
+          (#<buffer *compilation*> #<buffer *Compile-Log*>))
+         (Info-mode
+          (#<buffer  *helm info temp buffer*> #<buffer *info*>))
+         (help-mode
+          (#<buffer *Help*>))
+         (emacs-lisp-mode
+          (#<buffer ement.el<ement.el>> #<buffer ement-room-list.el> #<buffer *scratch*>
+                    #<buffer ement-room.el> #<buffer init.el> #<buffer bufler.el>
+                    #<buffer dash.el> #<buffer *Pp Eval Output*> #<buffer taxy.el> #<buffer scratch.el>))))))
+
+* Menu:
+
+* Multi-level dynamic taxys::
+* "Chains" of independent, multi-level dynamic taxys: "Chains" of independent multi-level dynamic taxys.
+* Defining a classification domain-specific language::
+
+
+File: README.info,  Node: Multi-level dynamic taxys,  Next: "Chains" of independent multi-level dynamic taxys,  Up: Dynamic taxys
+
+3.4.1 Multi-level dynamic taxys
+-------------------------------
+
+Of course, the point of taxonomies is that they aren’t restricted to a
+single level of depth, so you may also use the function
+‘taxy-take-keyed’ to dynamically make multi-level taxys.
+
+   Expanding on the previous example, we use ‘cl-labels’ to define
+functions which are used in the taxy’s definition, which are used in the
+‘:take’ function, which calls ‘taxy-take-keyed’ (rather than using
+‘apply-partially’ like in the previous example, we use a lambda
+function, which performs better than partially applied functions).  Then
+when the taxy is filled, a multi-level hierarchy is created dynamically,
+organizing buffers first by their directory, and then by mode in each
+directory.
+
+     (defvar buffery
+       (cl-labels ((buffer-mode (buffer) (buffer-local-value 'major-mode buffer))
+                   (buffer-directory (buffer) (buffer-local-value 'default-directory buffer)))
+         (make-taxy
+          :name "Buffers"
+          :taxys (list
+                  (make-taxy
+                   :name "Directories"
+                   :take (lambda (item taxy)
+                           (taxy-take-keyed (list #'buffer-directory #'buffer-mode) item taxy)))))))
+
+     (taxy-plain
+      (taxy-fill (buffer-list)
+                 (taxy-emptied buffery)))
+
+   That produces a list like:
+
+     ("Buffers"
+      (("Directories"
+        (("~/src/emacs/ement.el/"
+          ((dired-mode
+            (#<buffer ement.el<emacs>))
+           (emacs-lisp-mode
+            (#<buffer ement.el<ement.el> #<buffer ement-room-list.el> #<buffer ement-room.el>))
+           (magit-diff-mode
+            (#<buffer magit-diff: ement.el>))))
+         ("~/src/emacs/taxy.el/"
+          ((dired-mode
+            (#<buffer taxy.el<emacs>))
+           (Info-mode
+            (#<buffer *info*>))
+           (magit-status-mode
+            (#<buffer magit: taxy.el>))
+           (emacs-lisp-mode
+            (#<buffer taxy-magit-section.el> #<buffer taxy.el<taxy.el> #<buffer scratch.el>))))))))
+
+
+File: README.info,  Node: "Chains" of independent multi-level dynamic taxys,  Next: Defining a classification domain-specific language,  Prev: Multi-level dynamic taxys,  Up: Dynamic taxys
+
+3.4.2 "Chains" of independent, multi-level dynamic taxys
+--------------------------------------------------------
+
+_Naming things is hard._
+
+   Going a step further, each element in the ‘taxy-take-keyed’
+function’s ‘KEY-FNS’ argument may be a list of functions (or a list of
+lists of functions, etc.), which creates a "chain" of "independent"
+dynamic taxys.  Each such chain may be said to "short-circuit" the
+filling process in that, when an object is "taken" by the first key
+function in a chain, the object is not "offered" to other functions
+outside that chain.  This allows each dynamic sub-taxy to have its own
+set of sub-taxys, rather than sharing the same "global" set.  In effect,
+this creates multiple, unique taxonomies that share a single root taxy.
+
+   Building on the ‘sporty’ example, let’s define a taxy in which
+outdoor sports are classified only by whether they involve a disc, but
+indoor sports are additionally classified by whatever equipment they may
+use:
+
+     (defvar sporty-dynamic
+       (cl-macrolet ((in (needle haystack)
+                         `(lambda (item)
+                            (when (member ,needle (funcall ,haystack item))
+                              ,needle))))
+         (cl-labels ((outdoor-p
+                      (sport) (when (eq 'outdoor (sport-venue sport))
+                                "Outdoor"))
+                     (indoor-p
+                      (sport) (when (eq 'indoor (sport-venue sport))
+                                "Indoor"))
+                     (disc-p
+                      (sport) (if (funcall (in 'disc 'sport-uses) sport)
+                                  'disc
+                                'non-disc)))
+           (make-taxy
+            :name "Sporty (dynamic)"
+            :take (lambda (item taxy)
+                    (taxy-take-keyed
+                      (list (list #'outdoor-p #'disc-p)
+                            (list #'indoor-p
+                                  (in 'ball 'sport-uses)
+                                  (in 'disc 'sport-uses)
+                                  (in 'glove 'sport-uses)
+                                  (in 'racket 'sport-uses)))
+                      item taxy))))))
+
+   Now let’s fill the taxy with the sports and format it:
+
+     (thread-last sporty-dynamic
+       taxy-emptied
+       (taxy-fill sports)
+       (taxy-mapcar #'sport-name)
+       taxy-plain)
+
+     ("Sporty (dynamic)"
+      (("Indoor"
+        ((ball
+          ("Volleyball" "Basketball")
+          ((glove
+            ("Handball"))
+           (racket
+            ("Racquetball"))))))
+       ("Outdoor"
+        ((disc
+          ("Ultimate" "Disc golf"))
+         (non-disc
+          ("Soccer" "Tennis" "Football" "Baseball"))))))
+
+
+File: README.info,  Node: Defining a classification domain-specific language,  Prev: "Chains" of independent multi-level dynamic taxys,  Up: Dynamic taxys
+
+3.4.3 Defining a classification domain-specific language
+--------------------------------------------------------
+
+When writing a larger Taxy-based application, it may be necessary to
+define a number of key functions that would be unwieldy to manage in a
+‘cl-labels’ form.  For this case, Taxy provides the macro
+‘taxy-define-key-definer’ to easily define Taxy key functions in an
+application library.  Those functions are then passed to the function
+‘taxy-make-take-function’ at runtime, along with a list of keys being
+used to classify items.  Using these allows key functions to be defined
+in top-level forms, and it allows an application to be extended by users
+by defining additional key functions in their configurations.
+
+   Extending the previous ‘sporty’ example, let’s redefine its key
+functions using ‘taxy-define-key-definer’:
+
+     (taxy-define-key-definer sporty-define-key
+       sporty-keys "sporty"
+       "Define a `sporty' key function.")
+
+     (sporty-define-key disc-based ()
+       (if (member 'disc (sport-uses item))
+           "Disc-based"
+         "Non-disc-based"))
+
+     (sporty-define-key uses (&optional thing)
+       (pcase thing
+         (`nil (sport-uses item))
+         (_ (when (cl-typecase (sport-uses item)
+                    (symbol (equal thing (sport-uses item)))
+                    (list (member thing (sport-uses item))))
+              thing))))
+
+     (sporty-define-key venue (&optional place)
+       (pcase place
+         (`nil (sport-venue item))
+         (_ (when (equal place (sport-venue item))
+              (sport-venue item)))))
+
+   Now we’ll define the default keys to use when classifying items.
+This list is equivalent to the one passed to ‘taxy-take-keyed’ in the
+previous, "Chains" example.
+
+     (defvar sporty-default-keys
+       '(
+         ((venue 'outdoor)
+          disc-based)
+
+         ((venue 'indoor)
+          (uses 'ball)
+          (uses 'disc)
+          (uses 'glove)
+          (uses 'racket))))
+
+   Finally, rather than using a pre-made taxy struct, we make one at
+runtime, making the ‘:take’ function with ‘taxy-make-take-function’.
+
+     (let ((taxy (make-taxy
+                  :name "Sporty (DSL)"
+                  :take (taxy-make-take-function sporty-default-keys
+                                                 sporty-keys))))
+       (thread-last taxy
+         (taxy-fill sports)
+         (taxy-mapcar #'sport-name)
+         taxy-plain))
+
+   Which gives us:
+
+     ("Sporty (DSL)"
+      ((indoor
+        ((ball
+          ("Volleyball" "Basketball")
+          ((glove
+            ("Handball"))
+           (racket
+            ("Racquetball"))))))
+       (outdoor
+        (("Disc-based"
+          ("Ultimate" "Disc golf"))
+         ("Non-disc-based"
+          ("Soccer" "Tennis" "Football" "Baseball"))))))
+
+   As you can see, the result is the same as that in the previous
+example, but we’ve defined a kind of DSL for grouping sports in a
+modular, extendable way.
+
+   This also allows the grouping keys to be easily changed at runtime,
+producing a different result.  For example, we could group sports by,
+first, whether they use a ball, and then by venue.  Let’s do this in a
+function so that users can pass their own list of keys:
+
+     (cl-defun sporty-classify (sports &key (keys sporty-default-keys))
+       (declare (indent defun))
+       (let* ((taxy (make-taxy
+                     :name "Sporty (DSL)"
+                     :take (taxy-make-take-function keys
+                                                    sporty-keys))))
+         (thread-last taxy
+           (taxy-fill sports)
+           (taxy-mapcar #'sport-name)
+           taxy-plain)))
+
+     (sporty-classify sports
+       :keys '((uses 'ball) venue))
+
+   And this produces:
+
+     ("Sporty (DSL)"
+      ((outdoor
+        ("Ultimate" "Disc golf"))
+       (ball
+        ((indoor
+          ("Volleyball" "Handball" "Racquetball" "Basketball"))
+         (outdoor
+          ("Soccer" "Tennis" "Football" "Baseball"))))))
+
+
+File: README.info,  Node: Magit section,  Next: Reference,  Prev: Dynamic taxys,  Up: Usage
+
+3.5 Magit section
+=================
+
+Showing a ‘taxy’ with ‘magit-section’ is easy using the library
+taxy-magit-section
+(https://github.com/alphapapa/taxy.el/tree/package/taxy-magit-section),
+which is packaged separately:
+
+     (require 'taxy-magit-section)
+
+     ;; Using the `numbery' taxy defined in earlier examples:
+     (thread-last numbery
+       taxy-emptied ;; Get an empty copy of the taxy, since it's defined in a variable.
+       (taxy-fill (reverse (cl-loop for i below 30 collect i)))
+       taxy-magit-section-pp)
+
+   That shows a buffer like this:
+
+
+File: README.info,  Node: Reference,  Prev: Magit section,  Up: Usage
+
+3.6 Reference
+=============
+
+In Emacs 28+, see also ‘M-x shortdoc-display-group RET taxy RET’.
+
+* Menu:
+
+* Functions::
+* Macros::
+
+
+File: README.info,  Node: Functions,  Next: Macros,  Up: Reference
+
+3.6.1 Functions
+---------------
+
+taxy-flatten (taxy)
+     Return a list of items in ‘taxy’ and its sub-taxys.
+
+taxy-emptied (taxy)
+     Return a copy of ‘taxy’ without items.  Omits =taxy=’s items and
+     those of its descendant taxys.  Useful when reusing taxy
+     definitions.
+
+taxy-fill (items taxy)
+     Fill ‘taxy’ with ‘items’ according to its definition.
+
+taxy-make-take-function (keys aliases)
+     Return a taxy "take" function for ‘keys’.  Each of ‘keys’ should be
+     a function alias defined in ‘aliases’, or a list of such ‘key-fns’
+     (recursively, ad infinitum, approximately).  ‘aliases’ should be an
+     alist mapping aliases to functions (such as defined with a definer
+     defined by ‘taxy-define-key-definer’).
+
+taxy-mapc-taxys (fn taxy)
+     *Alias:* ‘taxy-mapc*’
+
+     Return ‘taxy’ having applied ‘fn’ to it and its descendants.  Does
+     not copy ‘taxy’.  Destructively modifies ‘taxy’, if ‘fn’ does.
+
+taxy-mapcar-items (fn taxy)
+     *Alias:* ‘taxy-mapcar’
+
+     Return copy of ‘taxy’, having replaced its items with the value of
+     ‘fn’ on each.  Replaces every item in ‘taxy’ and its descendants.
+     Useful to replace items with a more useful form after
+     classification.
+
+taxy-plain (taxy)
+     Return a list of the human-readable parts of ‘taxy’.
+
+taxy-size (taxy)
+     Return the number of items ‘taxy’ holds.  Includes items in ‘taxy’
+     ’s sub-taxys.
+
+taxy-sort-items (pred key taxy)
+     *Alias:* ‘taxy-sort’
+
+     Sort ‘taxy’ ’s items by ‘pred’ and ‘key’.  Sorts items in ‘taxy’
+     and its sub-taxys.  ‘key’ is passed to ‘cl-sort’, which see.
+
+taxy-sort-taxys (pred key taxy)
+     *Alias:* ‘taxy-sort*’
+
+     Sort ‘taxy’ ’s sub-taxys by ‘pred’ and ‘key’.  ‘key’ is passed to
+     ‘cl-sort’, which see.
+
+
+File: README.info,  Node: Macros,  Prev: Functions,  Up: Reference
+
+3.6.2 Macros
+------------
+
+taxy-define-key-definer (name variable prefix docstring)
+     Define a macro ‘name’ that defines a key-function-defining macro.
+     The defined macro, having string ‘docstring’, associates the
+     defined key functions with their aliases in an alist stored in
+     symbol ‘variable’.  The defined key functions are named having
+     string ‘prefix’, which will have a hyphen appended to it.  The key
+     functions take one or more arguments, the first of which is the
+     item being tested, bound within the function to ‘item’.
+
+
+File: README.info,  Node: Changelog,  Next: Development,  Prev: Usage,  Up: Top
+
+4 Changelog
+***********
+
+* Menu:
+
+* 0.10.2: 0102.
+* 0.10.1: 0101.
+* 0.10: 010.
+* 0.9: 09.
+* 0.8: 08.
+* 0.7: 07.
+* 0.6: 06.
+* 0.5: 05.
+* 0.4: 04.
+* 0.3: 03.
+* 0.2: 02.
+* 0.1: 01.
+
+
+File: README.info,  Node: 0102,  Next: 0101,  Up: Changelog
+
+4.1 0.10.2
+==========
+
+*Fixes*
+   • Reduce potential length of macro-expanded docstrings to prevent
+     byte-compiler warnings in downstream packages.
+
+
+File: README.info,  Node: 0101,  Next: 010,  Prev: 0102,  Up: Changelog
+
+4.2 0.10.1
+==========
+
+*Examples*
+   • Fixed byte-compilation of ‘diredy.el’.
+
+
+File: README.info,  Node: 010,  Next: 09,  Prev: 0101,  Up: Changelog
+
+4.3 0.10
+========
+
+*Examples*
+   • Deffy
+        • Fix: Disambiguate forms with the same name.
+   • Diredy: Various small improvements.
+
+
+File: README.info,  Node: 09,  Next: 08,  Prev: 010,  Up: Changelog
+
+4.4 0.9
+=======
+
+* Menu:
+
+* Changes::
+
+
+File: README.info,  Node: Changes,  Up: 09
+
+4.4.1 Changes
+-------------
+
+   • Library ‘taxy-magit-section’ is now packaged separately
+     (https://elpa.gnu.org/packages/taxy-magit-section.html) and
+     maintained in a separate branch
+     (https://github.com/alphapapa/taxy.el/tree/package/taxy-magit-section).
+   • Minor fixes to documentation and examples.
+
+
+File: README.info,  Node: 08,  Next: 07,  Prev: 09,  Up: Changelog
+
+4.5 0.8
+=======
+
+* Menu:
+
+* Additions::
+* Fixes::
+
+
+File: README.info,  Node: Additions,  Next: Fixes,  Up: 08
+
+4.5.1 Additions
+---------------
+
+   • Short documentation group for Emacs 28+.
+
+
+File: README.info,  Node: Fixes,  Prev: Additions,  Up: 08
+
+4.5.2 Fixes
+-----------
+
+   • Require ‘map’ for ‘pcase’ pattern.
+
+
+File: README.info,  Node: 07,  Next: 06,  Prev: 08,  Up: Changelog
+
+4.6 0.7
+=======
+
+* Menu:
+
+* Additions: Additions (1).
+
+
+File: README.info,  Node: Additions (1),  Up: 07
+
+4.6.1 Additions
+---------------
+
+   • Function ‘taxy-flatten’ returns a list of the items in a taxy and
+     its sub-taxys.
+   • Function/macro reference documentation.
+   • Example application ‘bookmarky’ lists Emacs bookmarks grouped with
+     Taxy.
+
+
+File: README.info,  Node: 06,  Next: 05,  Prev: 07,  Up: Changelog
+
+4.7 0.6
+=======
+
+* Menu:
+
+* Additions: Additions (2).
+
+
+File: README.info,  Node: Additions (2),  Up: 06
+
+4.7.1 Additions
+---------------
+
+   • Sorting functions:
+        • ‘taxy-sort-items’ (alias: ‘taxy-sort’) sorts the items in a
+          taxy and its sub-taxys.
+        • ‘taxy-sort-taxys’ (alias: ‘taxy-sort*’) sorts a taxy’s
+          sub-taxys.
+   • Defining classification domain-specific languages:
+        • Macro ‘taxy-define-key-definer’ defines a
+          key-function-defining macro.
+        • Function ‘taxy-make-take-function’ makes a ‘:take’ function
+          using a list of key functions and a set of classification
+          keys.
+   • Table-like, column-based formatting system for
+     ‘taxy-magit-section’:
+        • Function ‘taxy-magit-section-format-items’, which formats
+          items by columns.
+        • Variable ‘taxy-magit-section-insert-indent-items’, which
+          controls whether ‘taxy-magit-section-insert’ applies
+          indentation to each item.  (Used to disable that behavior when
+          items are pre-indented strings, e.g.  as formatted by
+          ‘taxy-magit-section-format-items’.)
+   • Example application ‘deffy’, which shows an overview of top-level
+     definitions and forms in an Elisp project or file.  (Likely to be
+     published as a separate package later.)
+
+
+File: README.info,  Node: 05,  Next: 04,  Prev: 06,  Up: Changelog
+
+4.8 0.5
+=======
+
+* Menu:
+
+* Additions: Additions (3).
+* Fixes: Fixes (1).
+
+
+File: README.info,  Node: Additions (3),  Next: Fixes (1),  Up: 05
+
+4.8.1 Additions
+---------------
+
+   • Function ‘taxy-magit-section-insert’ takes new arguments:
+        • ‘:initial-depth’ sets the level at which the first level of
+          hierarchy is considered to be at, for purposes of indentation.
+          Setting it to a negative number prevents indentation of so
+          many levels (i.e.  setting it to -1 causes the first two
+          levels to be unindented, since the first level will be
+          considered to be at depth -1, and the second at depth 0).
+        • ‘:blank-between-depth’ sets the level up to which blank lines
+          are inserted between sections (i.e.  setting it to 1 causes
+          blank lines to be inserted between sections up to depth 1, but
+          not between sections deeper than that).
+   • Struct ‘taxy-magit-section’ has a new ‘heading-face’ slot, a
+     function which takes a depth level argument and returns the face
+     with which to propertize that section’s heading.
+   • New example ‘taxy-package-report’.
+
+
+File: README.info,  Node: Fixes (1),  Prev: Additions (3),  Up: 05
+
+4.8.2 Fixes
+-----------
+
+   • Example ‘diredy’ referred to an old function name.
+
+
+File: README.info,  Node: 04,  Next: 03,  Prev: 05,  Up: Changelog
+
+4.9 0.4
+=======
+
+   • Incremented version to cause a new ELPA release (since removing a
+     file that wasn’t intended to be distributed on ELPA).
+
+
+File: README.info,  Node: 03,  Next: 02,  Prev: 04,  Up: Changelog
+
+4.10 0.3
+========
+
+* Menu:
+
+* Changes: Changes (1).
+* Fixes: Fixes (2).
+
+
+File: README.info,  Node: Changes (1),  Next: Fixes (2),  Up: 03
+
+4.10.1 Changes
+--------------
+
+   • Within the ‘taxy’ struct and related functions, the term ‘objects’
+     is renamed to ‘items’, which is shorter and has the same meaning.
+     This makes code a bit more concise (e.g.  ‘(taxy-objects taxy)’
+     becomes ‘(taxy-items taxy)’).
+
+
+File: README.info,  Node: Fixes (2),  Prev: Changes (1),  Up: 03
+
+4.10.2 Fixes
+------------
+
+   • Function ‘taxy-fill’ always calls a taxy’s ‘:take’ function if
+     defined.  (Fixing "chains" of dynamic taxys.)
+   • Function ‘taxy-magit-section-insert’ applies text properties from
+     the inserted string to the indentation string (so commands that
+     rely on text properties at the beginning of a line will work).
+
+
+File: README.info,  Node: 02,  Next: 01,  Prev: 03,  Up: Changelog
+
+4.11 0.2
+========
+
+* Menu:
+
+* Changes: Changes (2).
+* Additions: Additions (4).
+* Fixes: Fixes (3).
+
+
+File: README.info,  Node: Changes (2),  Next: Additions (4),  Up: 02
+
+4.11.1 Changes
+--------------
+
+   • Function ‘taxy-take-keyed*’ is renamed to ‘taxy-take-keyed’,
+     replacing the old function: it’s more powerful, and there’s little
+     reason to maintain two versions.
+
+
+File: README.info,  Node: Additions (4),  Next: Fixes (3),  Prev: Changes (2),  Up: 02
+
+4.11.2 Additions
+----------------
+
+   • Struct ‘taxy’ now has a ‘:make’ slot, a function called to make new
+     sub-taxys by ‘take-take-keyed’ (defaulting to ‘make-taxy’).  This
+     is useful when defining structs specialized on ‘taxy’.
+   • Struct ‘taxy-magit-section’ now has an ‘:indent’ slot, a number of
+     characters by which to indent each level of sub-taxy, applied
+     automatically by function ‘taxy-magit-section-insert’.
+   • Each element of the new ‘taxy-take-keyed’’s ‘KEY-FNS’ argument may
+     now be a function or a list of functions (or a list of a list of
+     functions, etc.).  Lists of functions create "chains" of
+     independent, dynamic taxys descending from a single root taxy.  See
+     *note example: "Chains" of independent multi-level dynamic taxys.
+
+
+File: README.info,  Node: Fixes (3),  Prev: Additions (4),  Up: 02
+
+4.11.3 Fixes
+------------
+
+   • ‘taxy-magit-section’’s ‘insert-object’ function.
+   • ‘taxy-fill’ now applies objects to the root taxy if no sub-taxys
+     take them.
+
+
+File: README.info,  Node: 01,  Prev: 02,  Up: Changelog
+
+4.12 0.1
+========
+
+First tagged version.
+
+
+File: README.info,  Node: Development,  Next: Credits,  Prev: Changelog,  Up: Top
+
+5 Development
+*************
+
+Bug reports, feature requests, suggestions — _oh my_!
+
+* Menu:
+
+* Copyright assignment::
+
+
+File: README.info,  Node: Copyright assignment,  Up: Development
+
+5.1 Copyright assignment
+========================
+
+This package is part of GNU Emacs (https://www.gnu.org/software/emacs/),
+being distributed in GNU ELPA (https://elpa.gnu.org/).  Contributions to
+this project must follow GNU guidelines, which means that, as with other
+parts of Emacs, patches of more than a few lines must be accompanied by
+having assigned copyright for the contribution to the FSF.  Contributors
+who wish to do so may contact emacs-devel@gnu.org <emacs-devel@gnu.org>
+to request the assignment form.
+
+
+File: README.info,  Node: Credits,  Next: License,  Prev: Development,  Up: Top
+
+6 Credits
+*********
+
+   • Thanks to Stefan Monnier for his feedback, and for maintaining GNU
+     ELPA.
+
+
+File: README.info,  Node: License,  Prev: Credits,  Up: Top
+
+7 License
+*********
+
+GPLv3
+
+
+
+Tag Table:
+Node: Top218
+Node: Examples2313
+Node: Numbery (starting basically)2632
+Node: Lettery (filling incrementally)8393
+Node: Sporty (understanding completely)10907
+Node: Applications16894
+Node: Installation17369
+Node: Usage17682
+Node: Reusable taxys19837
+Node: Threading macros23990
+Node: Modifying filled taxys24529
+Node: Dynamic taxys25347
+Node: Multi-level dynamic taxys27996
+Node: "Chains" of independent multi-level dynamic taxys30189
+Node: Defining a classification domain-specific language33120
+Node: Magit section37283
+Node: Reference37951
+Node: Functions38159
+Node: Macros40137
+Node: Changelog40787
+Node: 010241049
+Node: 010141267
+Node: 01041427
+Node: 0941643
+Node: Changes41753
+Node: 0842125
+Node: Additions42246
+Node: Fixes42390
+Node: 0742528
+Node: Additions (1)42653
+Node: 0642972
+Node: Additions (2)43097
+Node: 0544447
+Node: Additions (3)44592
+Node: Fixes (1)45702
+Node: 0445860
+Node: 0346082
+Node: Changes (1)46225
+Node: Fixes (2)46594
+Node: 0247035
+Node: Changes (2)47206
+Node: Additions (4)47500
+Node: Fixes (3)48425
+Node: 0148681
+Node: Development48782
+Node: Copyright assignment48988
+Node: Credits49576
+Node: License49766
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3.signed b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3.signed
new file mode 100644
index 0000000..63b5855
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3.signed
@@ -0,0 +1 @@
+Good signature from 645357D2883A0966 GNU ELPA Signing Agent (2023) <elpasign@elpa.gnu.org> (trust undefined) created at 2024-09-24T17:05:02+0800 using EDDSA
\ No newline at end of file
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/.dir-locals.el b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/.dir-locals.el
new file mode 100644
index 0000000..0a4990e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/.dir-locals.el
@@ -0,0 +1,6 @@
+;;; Directory Local Variables
+;;; For more information see (info "(emacs) Directory Variables")
+
+((emacs-lisp-mode . ((fill-column . 90)
+		     (indent-tabs-mode . nil)))
+ (org-mode . ((org-list-two-spaces-after-bullet-regexp . nil))))
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/.elpaignore b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/.elpaignore
new file mode 100644
index 0000000..e69de29
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/LICENSE b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/LICENSE
new file mode 100644
index 0000000..94a9ed0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/LICENSE
@@ -0,0 +1,674 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 3, 29 June 2007
+
+ Copyright (C) 2007 Free Software Foundation, Inc. <http://fsf.org/>
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The GNU General Public License is a free, copyleft license for
+software and other kinds of works.
+
+  The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+the GNU General Public License is intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.  We, the Free Software Foundation, use the
+GNU General Public License for most of our software; it applies also to
+any other work released this way by its authors.  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+  To protect your rights, we need to prevent others from denying you
+these rights or asking you to surrender the rights.  Therefore, you have
+certain responsibilities if you distribute copies of the software, or if
+you modify it: responsibilities to respect the freedom of others.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must pass on to the recipients the same
+freedoms that you received.  You must make sure that they, too, receive
+or can get the source code.  And you must show them these terms so they
+know their rights.
+
+  Developers that use the GNU GPL protect your rights with two steps:
+(1) assert copyright on the software, and (2) offer you this License
+giving you legal permission to copy, distribute and/or modify it.
+
+  For the developers' and authors' protection, the GPL clearly explains
+that there is no warranty for this free software.  For both users' and
+authors' sake, the GPL requires that modified versions be marked as
+changed, so that their problems will not be attributed erroneously to
+authors of previous versions.
+
+  Some devices are designed to deny users access to install or run
+modified versions of the software inside them, although the manufacturer
+can do so.  This is fundamentally incompatible with the aim of
+protecting users' freedom to change the software.  The systematic
+pattern of such abuse occurs in the area of products for individuals to
+use, which is precisely where it is most unacceptable.  Therefore, we
+have designed this version of the GPL to prohibit the practice for those
+products.  If such problems arise substantially in other domains, we
+stand ready to extend this provision to those domains in future versions
+of the GPL, as needed to protect the freedom of users.
+
+  Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish to
+avoid the special danger that patents applied to a free program could
+make it effectively proprietary.  To prevent this, the GPL assures that
+patents cannot be used to render the program non-free.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+                       TERMS AND CONDITIONS
+
+  0. Definitions.
+
+  "This License" refers to version 3 of the GNU General Public License.
+
+  "Copyright" also means copyright-like laws that apply to other kinds of
+works, such as semiconductor masks.
+
+  "The Program" refers to any copyrightable work licensed under this
+License.  Each licensee is addressed as "you".  "Licensees" and
+"recipients" may be individuals or organizations.
+
+  To "modify" a work means to copy from or adapt all or part of the work
+in a fashion requiring copyright permission, other than the making of an
+exact copy.  The resulting work is called a "modified version" of the
+earlier work or a work "based on" the earlier work.
+
+  A "covered work" means either the unmodified Program or a work based
+on the Program.
+
+  To "propagate" a work means to do anything with it that, without
+permission, would make you directly or secondarily liable for
+infringement under applicable copyright law, except executing it on a
+computer or modifying a private copy.  Propagation includes copying,
+distribution (with or without modification), making available to the
+public, and in some countries other activities as well.
+
+  To "convey" a work means any kind of propagation that enables other
+parties to make or receive copies.  Mere interaction with a user through
+a computer network, with no transfer of a copy, is not conveying.
+
+  An interactive user interface displays "Appropriate Legal Notices"
+to the extent that it includes a convenient and prominently visible
+feature that (1) displays an appropriate copyright notice, and (2)
+tells the user that there is no warranty for the work (except to the
+extent that warranties are provided), that licensees may convey the
+work under this License, and how to view a copy of this License.  If
+the interface presents a list of user commands or options, such as a
+menu, a prominent item in the list meets this criterion.
+
+  1. Source Code.
+
+  The "source code" for a work means the preferred form of the work
+for making modifications to it.  "Object code" means any non-source
+form of a work.
+
+  A "Standard Interface" means an interface that either is an official
+standard defined by a recognized standards body, or, in the case of
+interfaces specified for a particular programming language, one that
+is widely used among developers working in that language.
+
+  The "System Libraries" of an executable work include anything, other
+than the work as a whole, that (a) is included in the normal form of
+packaging a Major Component, but which is not part of that Major
+Component, and (b) serves only to enable use of the work with that
+Major Component, or to implement a Standard Interface for which an
+implementation is available to the public in source code form.  A
+"Major Component", in this context, means a major essential component
+(kernel, window system, and so on) of the specific operating system
+(if any) on which the executable work runs, or a compiler used to
+produce the work, or an object code interpreter used to run it.
+
+  The "Corresponding Source" for a work in object code form means all
+the source code needed to generate, install, and (for an executable
+work) run the object code and to modify the work, including scripts to
+control those activities.  However, it does not include the work's
+System Libraries, or general-purpose tools or generally available free
+programs which are used unmodified in performing those activities but
+which are not part of the work.  For example, Corresponding Source
+includes interface definition files associated with source files for
+the work, and the source code for shared libraries and dynamically
+linked subprograms that the work is specifically designed to require,
+such as by intimate data communication or control flow between those
+subprograms and other parts of the work.
+
+  The Corresponding Source need not include anything that users
+can regenerate automatically from other parts of the Corresponding
+Source.
+
+  The Corresponding Source for a work in source code form is that
+same work.
+
+  2. Basic Permissions.
+
+  All rights granted under this License are granted for the term of
+copyright on the Program, and are irrevocable provided the stated
+conditions are met.  This License explicitly affirms your unlimited
+permission to run the unmodified Program.  The output from running a
+covered work is covered by this License only if the output, given its
+content, constitutes a covered work.  This License acknowledges your
+rights of fair use or other equivalent, as provided by copyright law.
+
+  You may make, run and propagate covered works that you do not
+convey, without conditions so long as your license otherwise remains
+in force.  You may convey covered works to others for the sole purpose
+of having them make modifications exclusively for you, or provide you
+with facilities for running those works, provided that you comply with
+the terms of this License in conveying all material for which you do
+not control copyright.  Those thus making or running the covered works
+for you must do so exclusively on your behalf, under your direction
+and control, on terms that prohibit them from making any copies of
+your copyrighted material outside their relationship with you.
+
+  Conveying under any other circumstances is permitted solely under
+the conditions stated below.  Sublicensing is not allowed; section 10
+makes it unnecessary.
+
+  3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+  No covered work shall be deemed part of an effective technological
+measure under any applicable law fulfilling obligations under article
+11 of the WIPO copyright treaty adopted on 20 December 1996, or
+similar laws prohibiting or restricting circumvention of such
+measures.
+
+  When you convey a covered work, you waive any legal power to forbid
+circumvention of technological measures to the extent such circumvention
+is effected by exercising rights under this License with respect to
+the covered work, and you disclaim any intention to limit operation or
+modification of the work as a means of enforcing, against the work's
+users, your or third parties' legal rights to forbid circumvention of
+technological measures.
+
+  4. Conveying Verbatim Copies.
+
+  You may convey verbatim copies of the Program's source code as you
+receive it, in any medium, provided that you conspicuously and
+appropriately publish on each copy an appropriate copyright notice;
+keep intact all notices stating that this License and any
+non-permissive terms added in accord with section 7 apply to the code;
+keep intact all notices of the absence of any warranty; and give all
+recipients a copy of this License along with the Program.
+
+  You may charge any price or no price for each copy that you convey,
+and you may offer support or warranty protection for a fee.
+
+  5. Conveying Modified Source Versions.
+
+  You may convey a work based on the Program, or the modifications to
+produce it from the Program, in the form of source code under the
+terms of section 4, provided that you also meet all of these conditions:
+
+    a) The work must carry prominent notices stating that you modified
+    it, and giving a relevant date.
+
+    b) The work must carry prominent notices stating that it is
+    released under this License and any conditions added under section
+    7.  This requirement modifies the requirement in section 4 to
+    "keep intact all notices".
+
+    c) You must license the entire work, as a whole, under this
+    License to anyone who comes into possession of a copy.  This
+    License will therefore apply, along with any applicable section 7
+    additional terms, to the whole of the work, and all its parts,
+    regardless of how they are packaged.  This License gives no
+    permission to license the work in any other way, but it does not
+    invalidate such permission if you have separately received it.
+
+    d) If the work has interactive user interfaces, each must display
+    Appropriate Legal Notices; however, if the Program has interactive
+    interfaces that do not display Appropriate Legal Notices, your
+    work need not make them do so.
+
+  A compilation of a covered work with other separate and independent
+works, which are not by their nature extensions of the covered work,
+and which are not combined with it such as to form a larger program,
+in or on a volume of a storage or distribution medium, is called an
+"aggregate" if the compilation and its resulting copyright are not
+used to limit the access or legal rights of the compilation's users
+beyond what the individual works permit.  Inclusion of a covered work
+in an aggregate does not cause this License to apply to the other
+parts of the aggregate.
+
+  6. Conveying Non-Source Forms.
+
+  You may convey a covered work in object code form under the terms
+of sections 4 and 5, provided that you also convey the
+machine-readable Corresponding Source under the terms of this License,
+in one of these ways:
+
+    a) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by the
+    Corresponding Source fixed on a durable physical medium
+    customarily used for software interchange.
+
+    b) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by a
+    written offer, valid for at least three years and valid for as
+    long as you offer spare parts or customer support for that product
+    model, to give anyone who possesses the object code either (1) a
+    copy of the Corresponding Source for all the software in the
+    product that is covered by this License, on a durable physical
+    medium customarily used for software interchange, for a price no
+    more than your reasonable cost of physically performing this
+    conveying of source, or (2) access to copy the
+    Corresponding Source from a network server at no charge.
+
+    c) Convey individual copies of the object code with a copy of the
+    written offer to provide the Corresponding Source.  This
+    alternative is allowed only occasionally and noncommercially, and
+    only if you received the object code with such an offer, in accord
+    with subsection 6b.
+
+    d) Convey the object code by offering access from a designated
+    place (gratis or for a charge), and offer equivalent access to the
+    Corresponding Source in the same way through the same place at no
+    further charge.  You need not require recipients to copy the
+    Corresponding Source along with the object code.  If the place to
+    copy the object code is a network server, the Corresponding Source
+    may be on a different server (operated by you or a third party)
+    that supports equivalent copying facilities, provided you maintain
+    clear directions next to the object code saying where to find the
+    Corresponding Source.  Regardless of what server hosts the
+    Corresponding Source, you remain obligated to ensure that it is
+    available for as long as needed to satisfy these requirements.
+
+    e) Convey the object code using peer-to-peer transmission, provided
+    you inform other peers where the object code and Corresponding
+    Source of the work are being offered to the general public at no
+    charge under subsection 6d.
+
+  A separable portion of the object code, whose source code is excluded
+from the Corresponding Source as a System Library, need not be
+included in conveying the object code work.
+
+  A "User Product" is either (1) a "consumer product", which means any
+tangible personal property which is normally used for personal, family,
+or household purposes, or (2) anything designed or sold for incorporation
+into a dwelling.  In determining whether a product is a consumer product,
+doubtful cases shall be resolved in favor of coverage.  For a particular
+product received by a particular user, "normally used" refers to a
+typical or common use of that class of product, regardless of the status
+of the particular user or of the way in which the particular user
+actually uses, or expects or is expected to use, the product.  A product
+is a consumer product regardless of whether the product has substantial
+commercial, industrial or non-consumer uses, unless such uses represent
+the only significant mode of use of the product.
+
+  "Installation Information" for a User Product means any methods,
+procedures, authorization keys, or other information required to install
+and execute modified versions of a covered work in that User Product from
+a modified version of its Corresponding Source.  The information must
+suffice to ensure that the continued functioning of the modified object
+code is in no case prevented or interfered with solely because
+modification has been made.
+
+  If you convey an object code work under this section in, or with, or
+specifically for use in, a User Product, and the conveying occurs as
+part of a transaction in which the right of possession and use of the
+User Product is transferred to the recipient in perpetuity or for a
+fixed term (regardless of how the transaction is characterized), the
+Corresponding Source conveyed under this section must be accompanied
+by the Installation Information.  But this requirement does not apply
+if neither you nor any third party retains the ability to install
+modified object code on the User Product (for example, the work has
+been installed in ROM).
+
+  The requirement to provide Installation Information does not include a
+requirement to continue to provide support service, warranty, or updates
+for a work that has been modified or installed by the recipient, or for
+the User Product in which it has been modified or installed.  Access to a
+network may be denied when the modification itself materially and
+adversely affects the operation of the network or violates the rules and
+protocols for communication across the network.
+
+  Corresponding Source conveyed, and Installation Information provided,
+in accord with this section must be in a format that is publicly
+documented (and with an implementation available to the public in
+source code form), and must require no special password or key for
+unpacking, reading or copying.
+
+  7. Additional Terms.
+
+  "Additional permissions" are terms that supplement the terms of this
+License by making exceptions from one or more of its conditions.
+Additional permissions that are applicable to the entire Program shall
+be treated as though they were included in this License, to the extent
+that they are valid under applicable law.  If additional permissions
+apply only to part of the Program, that part may be used separately
+under those permissions, but the entire Program remains governed by
+this License without regard to the additional permissions.
+
+  When you convey a copy of a covered work, you may at your option
+remove any additional permissions from that copy, or from any part of
+it.  (Additional permissions may be written to require their own
+removal in certain cases when you modify the work.)  You may place
+additional permissions on material, added by you to a covered work,
+for which you have or can give appropriate copyright permission.
+
+  Notwithstanding any other provision of this License, for material you
+add to a covered work, you may (if authorized by the copyright holders of
+that material) supplement the terms of this License with terms:
+
+    a) Disclaiming warranty or limiting liability differently from the
+    terms of sections 15 and 16 of this License; or
+
+    b) Requiring preservation of specified reasonable legal notices or
+    author attributions in that material or in the Appropriate Legal
+    Notices displayed by works containing it; or
+
+    c) Prohibiting misrepresentation of the origin of that material, or
+    requiring that modified versions of such material be marked in
+    reasonable ways as different from the original version; or
+
+    d) Limiting the use for publicity purposes of names of licensors or
+    authors of the material; or
+
+    e) Declining to grant rights under trademark law for use of some
+    trade names, trademarks, or service marks; or
+
+    f) Requiring indemnification of licensors and authors of that
+    material by anyone who conveys the material (or modified versions of
+    it) with contractual assumptions of liability to the recipient, for
+    any liability that these contractual assumptions directly impose on
+    those licensors and authors.
+
+  All other non-permissive additional terms are considered "further
+restrictions" within the meaning of section 10.  If the Program as you
+received it, or any part of it, contains a notice stating that it is
+governed by this License along with a term that is a further
+restriction, you may remove that term.  If a license document contains
+a further restriction but permits relicensing or conveying under this
+License, you may add to a covered work material governed by the terms
+of that license document, provided that the further restriction does
+not survive such relicensing or conveying.
+
+  If you add terms to a covered work in accord with this section, you
+must place, in the relevant source files, a statement of the
+additional terms that apply to those files, or a notice indicating
+where to find the applicable terms.
+
+  Additional terms, permissive or non-permissive, may be stated in the
+form of a separately written license, or stated as exceptions;
+the above requirements apply either way.
+
+  8. Termination.
+
+  You may not propagate or modify a covered work except as expressly
+provided under this License.  Any attempt otherwise to propagate or
+modify it is void, and will automatically terminate your rights under
+this License (including any patent licenses granted under the third
+paragraph of section 11).
+
+  However, if you cease all violation of this License, then your
+license from a particular copyright holder is reinstated (a)
+provisionally, unless and until the copyright holder explicitly and
+finally terminates your license, and (b) permanently, if the copyright
+holder fails to notify you of the violation by some reasonable means
+prior to 60 days after the cessation.
+
+  Moreover, your license from a particular copyright holder is
+reinstated permanently if the copyright holder notifies you of the
+violation by some reasonable means, this is the first time you have
+received notice of violation of this License (for any work) from that
+copyright holder, and you cure the violation prior to 30 days after
+your receipt of the notice.
+
+  Termination of your rights under this section does not terminate the
+licenses of parties who have received copies or rights from you under
+this License.  If your rights have been terminated and not permanently
+reinstated, you do not qualify to receive new licenses for the same
+material under section 10.
+
+  9. Acceptance Not Required for Having Copies.
+
+  You are not required to accept this License in order to receive or
+run a copy of the Program.  Ancillary propagation of a covered work
+occurring solely as a consequence of using peer-to-peer transmission
+to receive a copy likewise does not require acceptance.  However,
+nothing other than this License grants you permission to propagate or
+modify any covered work.  These actions infringe copyright if you do
+not accept this License.  Therefore, by modifying or propagating a
+covered work, you indicate your acceptance of this License to do so.
+
+  10. Automatic Licensing of Downstream Recipients.
+
+  Each time you convey a covered work, the recipient automatically
+receives a license from the original licensors, to run, modify and
+propagate that work, subject to this License.  You are not responsible
+for enforcing compliance by third parties with this License.
+
+  An "entity transaction" is a transaction transferring control of an
+organization, or substantially all assets of one, or subdividing an
+organization, or merging organizations.  If propagation of a covered
+work results from an entity transaction, each party to that
+transaction who receives a copy of the work also receives whatever
+licenses to the work the party's predecessor in interest had or could
+give under the previous paragraph, plus a right to possession of the
+Corresponding Source of the work from the predecessor in interest, if
+the predecessor has it or can get it with reasonable efforts.
+
+  You may not impose any further restrictions on the exercise of the
+rights granted or affirmed under this License.  For example, you may
+not impose a license fee, royalty, or other charge for exercise of
+rights granted under this License, and you may not initiate litigation
+(including a cross-claim or counterclaim in a lawsuit) alleging that
+any patent claim is infringed by making, using, selling, offering for
+sale, or importing the Program or any portion of it.
+
+  11. Patents.
+
+  A "contributor" is a copyright holder who authorizes use under this
+License of the Program or a work on which the Program is based.  The
+work thus licensed is called the contributor's "contributor version".
+
+  A contributor's "essential patent claims" are all patent claims
+owned or controlled by the contributor, whether already acquired or
+hereafter acquired, that would be infringed by some manner, permitted
+by this License, of making, using, or selling its contributor version,
+but do not include claims that would be infringed only as a
+consequence of further modification of the contributor version.  For
+purposes of this definition, "control" includes the right to grant
+patent sublicenses in a manner consistent with the requirements of
+this License.
+
+  Each contributor grants you a non-exclusive, worldwide, royalty-free
+patent license under the contributor's essential patent claims, to
+make, use, sell, offer for sale, import and otherwise run, modify and
+propagate the contents of its contributor version.
+
+  In the following three paragraphs, a "patent license" is any express
+agreement or commitment, however denominated, not to enforce a patent
+(such as an express permission to practice a patent or covenant not to
+sue for patent infringement).  To "grant" such a patent license to a
+party means to make such an agreement or commitment not to enforce a
+patent against the party.
+
+  If you convey a covered work, knowingly relying on a patent license,
+and the Corresponding Source of the work is not available for anyone
+to copy, free of charge and under the terms of this License, through a
+publicly available network server or other readily accessible means,
+then you must either (1) cause the Corresponding Source to be so
+available, or (2) arrange to deprive yourself of the benefit of the
+patent license for this particular work, or (3) arrange, in a manner
+consistent with the requirements of this License, to extend the patent
+license to downstream recipients.  "Knowingly relying" means you have
+actual knowledge that, but for the patent license, your conveying the
+covered work in a country, or your recipient's use of the covered work
+in a country, would infringe one or more identifiable patents in that
+country that you have reason to believe are valid.
+
+  If, pursuant to or in connection with a single transaction or
+arrangement, you convey, or propagate by procuring conveyance of, a
+covered work, and grant a patent license to some of the parties
+receiving the covered work authorizing them to use, propagate, modify
+or convey a specific copy of the covered work, then the patent license
+you grant is automatically extended to all recipients of the covered
+work and works based on it.
+
+  A patent license is "discriminatory" if it does not include within
+the scope of its coverage, prohibits the exercise of, or is
+conditioned on the non-exercise of one or more of the rights that are
+specifically granted under this License.  You may not convey a covered
+work if you are a party to an arrangement with a third party that is
+in the business of distributing software, under which you make payment
+to the third party based on the extent of your activity of conveying
+the work, and under which the third party grants, to any of the
+parties who would receive the covered work from you, a discriminatory
+patent license (a) in connection with copies of the covered work
+conveyed by you (or copies made from those copies), or (b) primarily
+for and in connection with specific products or compilations that
+contain the covered work, unless you entered into that arrangement,
+or that patent license was granted, prior to 28 March 2007.
+
+  Nothing in this License shall be construed as excluding or limiting
+any implied license or other defenses to infringement that may
+otherwise be available to you under applicable patent law.
+
+  12. No Surrender of Others' Freedom.
+
+  If conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot convey a
+covered work so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you may
+not convey it at all.  For example, if you agree to terms that obligate you
+to collect a royalty for further conveying from those to whom you convey
+the Program, the only way you could satisfy both those terms and this
+License would be to refrain entirely from conveying the Program.
+
+  13. Use with the GNU Affero General Public License.
+
+  Notwithstanding any other provision of this License, you have
+permission to link or combine any covered work with a work licensed
+under version 3 of the GNU Affero General Public License into a single
+combined work, and to convey the resulting work.  The terms of this
+License will continue to apply to the part which is the covered work,
+but the special requirements of the GNU Affero General Public License,
+section 13, concerning interaction through a network will apply to the
+combination as such.
+
+  14. Revised Versions of this License.
+
+  The Free Software Foundation may publish revised and/or new versions of
+the GNU General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+  Each version is given a distinguishing version number.  If the
+Program specifies that a certain numbered version of the GNU General
+Public License "or any later version" applies to it, you have the
+option of following the terms and conditions either of that numbered
+version or of any later version published by the Free Software
+Foundation.  If the Program does not specify a version number of the
+GNU General Public License, you may choose any version ever published
+by the Free Software Foundation.
+
+  If the Program specifies that a proxy can decide which future
+versions of the GNU General Public License can be used, that proxy's
+public statement of acceptance of a version permanently authorizes you
+to choose that version for the Program.
+
+  Later license versions may give you additional or different
+permissions.  However, no additional obligations are imposed on any
+author or copyright holder as a result of your choosing to follow a
+later version.
+
+  15. Disclaimer of Warranty.
+
+  THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
+APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
+HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
+OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
+THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+PURPOSE.  THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
+IS WITH YOU.  SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
+ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+  16. Limitation of Liability.
+
+  IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
+THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
+GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
+USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
+DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
+PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
+EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGES.
+
+  17. Interpretation of Sections 15 and 16.
+
+  If the disclaimer of warranty and limitation of liability provided
+above cannot be given local legal effect according to their terms,
+reviewing courts shall apply local law that most closely approximates
+an absolute waiver of all civil liability in connection with the
+Program, unless a warranty or assumption of liability accompanies a
+copy of the Program in return for a fee.
+
+                     END OF TERMS AND CONDITIONS
+
+            How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+state the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software: you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation, either version 3 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+Also add information on how to contact you by electronic and paper mail.
+
+  If the program does terminal interaction, make it output a short
+notice like this when it starts in an interactive mode:
+
+    <program>  Copyright (C) <year>  <name of author>
+    This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, your program's commands
+might be different; for a GUI interface, you would use an "about box".
+
+  You should also get your employer (if you work as a programmer) or school,
+if any, to sign a "copyright disclaimer" for the program, if necessary.
+For more information on this, and how to apply and follow the GNU GPL, see
+<http://www.gnu.org/licenses/>.
+
+  The GNU General Public License does not permit incorporating your program
+into proprietary programs.  If your program is a subroutine library, you
+may consider it more useful to permit linking proprietary applications with
+the library.  If this is what you want to do, use the GNU Lesser General
+Public License instead of this License.  But first, please read
+<http://www.gnu.org/philosophy/why-not-lgpl.html>.
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/README-elpa b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/README-elpa
new file mode 100644
index 0000000..40c8a29
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/README-elpa
@@ -0,0 +1,166 @@
+                        ━━━━━━━━━━━━━━━━━━━━━━━
+                         TAXY-MAGIT-SECTION.EL
+                        ━━━━━━━━━━━━━━━━━━━━━━━
+
+
+[https://elpa.gnu.org/packages/taxy-magit-section.svg]
+
+This library renders [Taxy] structs with [magit-section].
+
+
+[https://elpa.gnu.org/packages/taxy-magit-section.svg]
+<https://elpa.gnu.org/packages/taxy-magit-section.html>
+
+[Taxy] <https://github.com/alphapapa/taxy.el>
+
+[magit-section] <https://melpa.org/#/magit-section>
+
+
+1 Installation
+══════════════
+
+  `taxy-magit-section' is distributed in [GNU ELPA], which is available
+  in Emacs by default.  Use `M-x package-install RET taxy-magit-section
+  RET', then `(require 'taxy-magit-section)' in your Elisp project.
+
+
+[GNU ELPA] <https://elpa.gnu.org/>
+
+
+2 Changelog
+═══════════
+
+2.1 0.14.3
+──────────
+
+  *Fixes*
+  ⁃ Only use visible frames when checking image sizes.  (See [Ement.el
+    #298].)
+
+
+[Ement.el #298]
+<https://github.com/alphapapa/ement.el/issues/298#issuecomment-2369652629>
+
+
+2.2 0.14.2
+──────────
+
+  *Changes*
+  ⁃ Avoid redundant calculations of the width of strings containing
+    images (a minor performance improvement).
+
+
+2.3 0.14.1
+──────────
+
+  *Fixes*
+  ⁃ Don't pass string as `ELLIPSIS' argument to
+    `truncate-string-to-width'; pass t, which defaults to value of
+    variable `truncate-string-ellipsis'.  (The width of the string
+    passed before, the U+2026 HORIZONTAL ELLIPSIS character, varies by
+    font, and fonts which display it with a width different than that of
+    a single space cause misalignment of columns.  Now users may specify
+    the ellipsis string according to their needs.)
+  ⁃ Try to find a graphical frame when calculating image widths for
+    column widths (or signal an error if none are available, rather than
+    leaving `image-size' to signal an error).  (For example, if both
+    graphical and text frames are available, and a column's values
+    contain an image, and the buffer is being redisplayed on a text
+    frame, try to use a graphical frame for calculating the image width,
+    rather than just signaling an error.)
+
+
+2.4 0.14
+────────
+
+  *Fixes*
+  ⁃ Reduce the potential width of macro-expanded docstrings to prevent
+    byte-compiler warnings.
+
+
+2.5 0.13
+────────
+
+  *Additions*
+
+  ⁃ Function `taxy-magit-section-insert' takes a `:section-class'
+    argument, which is passed to `magit-insert-section' as its `class'
+    argument.  This allows a custom subclass of `magit-section' to be
+    passed, which, with a custom method on `magit-section-ident-value',
+    allows section visibility to be cached concisely.
+
+
+2.6 0.12.2
+──────────
+
+  *Fixes*
+  ⁃ Header alignment.
+
+
+2.7 0.12.1
+──────────
+
+  *Fixes*
+  ⁃ Compilation error.
+
+
+2.8 0.12
+────────
+
+  *Fixes*
+  ⁃ Section visibility caching.
+
+
+2.9 0.11
+────────
+
+  *Additions*
+  ⁃ Truncated column values receive help-echo tooltips so the full
+    value can be viewed.
+
+
+2.10 0.10
+─────────
+
+  *Fixes*
+  ⁃ Require package `taxy' in package headers.
+
+
+2.11 0.9.1
+──────────
+
+  *Fixes*
+  ⁃ `taxy-magit-section-insert' appends heading faces, so users can
+    override (or merge with) the default.
+  ⁃ `taxy-magit-section-format-items' uses columns' headers as their
+    minimum width, which preserves each column's width regardless of
+    items' values.
+
+
+2.12 0.9
+────────
+
+  ⁃ `taxy-magit-section' moved to separate package.
+  ⁃ Better align columns whose values are images.
+
+
+3 Development
+═════════════
+
+  `taxy-magit-section' is developed in a branch of the [main Taxy repo].
+
+
+[main Taxy repo] <https://github.com/alphapapa/taxy.el>
+
+
+4 Credits
+═════════
+
+  ⁃ Thanks to Stefan Monnier for his feedback, and for maintaining GNU
+    ELPA.
+
+
+5 License
+═════════
+
+  GPLv3
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/README.org b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/README.org
new file mode 100644
index 0000000..c9d42ac
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/README.org
@@ -0,0 +1,144 @@
+#+TITLE: taxy-magit-section.el
+
+#+PROPERTY: LOGGING nil
+
+# Note: This readme works with the org-make-toc <https://github.com/alphapapa/org-make-toc> package, which automatically updates the table of contents.
+
+[[https://elpa.gnu.org/packages/taxy-magit-section.html][https://elpa.gnu.org/packages/taxy-magit-section.svg]]
+
+This library renders [[https://github.com/alphapapa/taxy.el][Taxy]] structs with [[https://melpa.org/#/magit-section][magit-section]].
+
+* Contents                                                         :noexport:
+:PROPERTIES:
+:TOC:      :include siblings
+:END:
+:CONTENTS:
+- [[#installation][Installation]]
+- [[#changelog][Changelog]]
+- [[#development][Development]]
+- [[#credits][Credits]]
+:END:
+
+* COMMENT Examples
+
+* Installation
+
+=taxy-magit-section= is distributed in [[https://elpa.gnu.org/][GNU ELPA]], which is available in Emacs by default.  Use =M-x package-install RET taxy-magit-section RET=, then ~(require 'taxy-magit-section)~ in your Elisp project.
+
+* COMMENT Usage
+
+* Changelog
+:PROPERTIES:
+:TOC:      :depth 0
+:END:
+
+** 0.14.3
+
+*Fixes*
++ Only use visible frames when checking image sizes.  (See [[https://github.com/alphapapa/ement.el/issues/298#issuecomment-2369652629][Ement.el #298]].)
+
+** 0.14.2
+
+*Changes*
++ Avoid redundant calculations of the width of strings containing images (a minor performance improvement).
+
+** 0.14.1
+
+*Fixes*
++ Don't pass string as ~ELLIPSIS~ argument to ~truncate-string-to-width~; pass t, which defaults to value of variable ~truncate-string-ellipsis~.  (The width of the string passed before, the U+2026 HORIZONTAL ELLIPSIS character, varies by font, and fonts which display it with a width different than that of a single space cause misalignment of columns.  Now users may specify the ellipsis string according to their needs.)
++ Try to find a graphical frame when calculating image widths for column widths (or signal an error if none are available, rather than leaving ~image-size~ to signal an error).  (For example, if both graphical and text frames are available, and a column's values contain an image, and the buffer is being redisplayed on a text frame, try to use a graphical frame for calculating the image width, rather than just signaling an error.)
+
+** 0.14
+
+*Fixes*
++ Reduce the potential width of macro-expanded docstrings to prevent byte-compiler warnings.
+
+** 0.13
+
+*Additions*
+
++ Function ~taxy-magit-section-insert~ takes a ~:section-class~ argument, which is passed to ~magit-insert-section~ as its ~class~ argument.  This allows a custom subclass of ~magit-section~ to be passed, which, with a custom method on ~magit-section-ident-value~, allows section visibility to be cached concisely.
+
+** 0.12.2
+
+*Fixes*
++ Header alignment.
+
+** 0.12.1
+
+*Fixes*
++ Compilation error.
+
+** 0.12
+
+*Fixes*
++ Section visibility caching.
+
+** 0.11
+
+*Additions*
++  Truncated column values receive help-echo tooltips so the full value can be viewed.
+
+** 0.10
+
+*Fixes*
++  Require package ~taxy~ in package headers.
+
+** 0.9.1
+
+*Fixes*
++  =taxy-magit-section-insert= appends heading faces, so users can override (or merge with) the default.
++  =taxy-magit-section-format-items= uses columns' headers as their minimum width, which preserves each column's width regardless of items' values.
+
+** 0.9
+
++  =taxy-magit-section= moved to separate package.
++  Better align columns whose values are images.
+
+* Development
+:PROPERTIES:
+:TOC:      :ignore (descendants)
+:END:
+
+=taxy-magit-section= is developed in a branch of the [[https://github.com/alphapapa/taxy.el][main Taxy repo]].
+
+* Credits
+
++  Thanks to Stefan Monnier for his feedback, and for maintaining GNU ELPA.
+
+* License
+:PROPERTIES:
+:TOC:      :ignore (this)
+:END:
+
+GPLv3
+
+* COMMENT Export setup                                             :noexport:
+:PROPERTIES:
+:TOC:      :ignore (this descendants)
+:END:
+
+# Copied from org-super-agenda's readme, in which much was borrowed from Org's =org-manual.org=.
+
+#+OPTIONS: broken-links:t *:t
+
+** Info export options
+
+#+TEXINFO_DIR_CATEGORY: Emacs
+#+TEXINFO_DIR_TITLE: Taxy Magit Section: (taxy-magit-section)
+#+TEXINFO_DIR_DESC: Render Taxy structs with Magit Section
+
+# NOTE: We could use these, but that causes a pointless error, "org-compile-file: File "..README.info" wasn't produced...", so we just rename the files in the after-save-hook instead.
+# #+TEXINFO_FILENAME: taxy.info
+# #+EXPORT_FILE_NAME: taxy.texi
+
+** File-local variables
+
+# NOTE: Setting org-comment-string buffer-locally is a nasty hack to work around GitHub's org-ruby's HTML rendering, which does not respect noexport tags.  The only way to hide this tree from its output is to use the COMMENT keyword, but that prevents Org from processing the export options declared in it.  So since these file-local variables don't affect org-ruby, wet set org-comment-string to an unused keyword, which prevents Org from deleting this tree from the export buffer, which allows it to find the export options in it.  And since org-export does respect the noexport tag, the tree is excluded from the info page.
+
+# Local Variables:
+# before-save-hook: org-make-toc
+# after-save-hook: (lambda nil (when (and (require 'ox-texinfo nil t) (org-texinfo-export-to-info)) (delete-file "README.texi") (rename-file "README.info" "taxy-magit-section.info" t)))
+# org-export-initial-scope: buffer
+# org-comment-string: "NOTCOMMENT"
+# End:
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/dir b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/dir
new file mode 100644
index 0000000..483069a
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/dir
@@ -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
+* Taxy Magit Section: (taxy-magit-section).
+                                Render Taxy structs with Magit Section.
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section-autoloads.el b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section-autoloads.el
new file mode 100644
index 0000000..a89e74e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section-autoloads.el
@@ -0,0 +1,28 @@
+;;; taxy-magit-section-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from taxy-magit-section.el
+
+(register-definition-prefixes "taxy-magit-section" '("taxy-magit-section-"))
+
+;;; End of scraped data
+
+(provide 'taxy-magit-section-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; taxy-magit-section-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section-pkg.el b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section-pkg.el
new file mode 100644
index 0000000..1223461
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section-pkg.el
@@ -0,0 +1,2 @@
+;; Generated package description from taxy-magit-section.el  -*- no-byte-compile: t -*-
+(define-package "taxy-magit-section" "0.14.3" "View Taxy structs in a Magit Section buffer" '((emacs "26.3") (magit-section "3.2.1") (taxy "0.10")) :commit "19c67f4d2e7a87cb9aed8e17058c4cf4dfd75406" :authors '(("Adam Porter" . "adam@alphapapa.net")) :maintainer '("Adam Porter" . "adam@alphapapa.net") :keywords '("lisp") :url "https://github.com/alphapapa/taxy.el")
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section.el b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section.el
new file mode 100644
index 0000000..f583b43
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section.el
@@ -0,0 +1,502 @@
+;;; taxy-magit-section.el --- View Taxy structs in a Magit Section buffer  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2021  Free Software Foundation, Inc.
+
+;; Author: Adam Porter <adam@alphapapa.net>
+;; Maintainer: Adam Porter <adam@alphapapa.net>
+;; URL: https://github.com/alphapapa/taxy.el
+;; Version: 0.14.3
+;; Package-Requires: ((emacs "26.3") (magit-section "3.2.1") (taxy "0.10"))
+;; Keywords: lisp
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library provides a way to view `taxy' structs in a
+;; column-based, `magit-section' buffer.  Columns are defined using
+;; simple top-level forms, and new columns may be easily defined by
+;; users in their configurations.
+
+;;; Code:
+
+;;;; Requirements
+
+(require 'map)
+
+(require 'taxy)
+(require 'magit-section)
+
+;;;; Variables
+
+(defvar taxy-magit-section-level-indent 2
+  "Default heading indentation per level.")
+
+(defvar taxy-magit-section-item-indent 2
+  "Default item indentation per level.")
+
+(defvar taxy-magit-section-depth nil
+  "Bound to current depth around calls to a taxy's format-fn.")
+
+(defvar taxy-magit-section-insert-indent-items t
+  ;; NOTE: I hate to use a variable to control this, but it seems like
+  ;; the cleanest way for now.
+  "Whether to indent items in `taxy-magit-section-insert'.
+May be disabled when `taxy-magit-section-insert' should not
+indent items itself, e.g. if items are pre-indented.  Note that
+this does not disable indentation of section headings.")
+
+;;;; Customization
+
+
+;;;; Structs
+
+;; NOTE: When making `taxy-magit-section' structs at runtime
+;; (e.g. with `taxy-take-keyed'), the struct's `make' slot must be set
+;; to a function that returns a new struct with the other slots set as
+;; desired; the slots' values do not automatically propagate to
+;; structs with the default `make' function.  (Using `cl-labels' to
+;; define the `make' function makes this simple.)
+
+;; MAYBE: In `taxy-take-keyed', use `taxy-emptied' to copy structs
+;; with inheritance for relevant slots, so defining custom `make'
+;; functions wouldn't be necessary.
+
+(cl-defstruct (taxy-magit-section
+               (:include taxy
+                         (make #'make-taxy-magit-section)))
+  ;; MAYBE: Pass parent section to the :make function, would make
+  ;; inheritance easier (and/or use EIEIO, but that would reduce
+  ;; performance, since slot accessors can't be optimized).
+  (visibility-fn #'taxy-magit-section-visibility)
+  (heading-face-fn (lambda (_depth) 'magit-section-heading))
+  (level-indent 2)
+  (item-indent 2)
+  (format-fn #'prin1-to-string))
+
+(defclass taxy-magit-section-section (magit-section)
+  ;; We define this class so we can use it as the type of section we insert, so we can
+  ;; define a method to return identifiers for our section type, so section visibility can
+  ;; be cached.
+  nil)
+
+(cl-defmethod magit-section-ident-value ((section taxy-magit-section-section))
+  ;; FIXME: The name of each taxy could be ambiguous.  Best would be to use the
+  ;; hierarchical path, but since the taxys aren't doubly linked, that isn't easily done.
+  ;; Could probably be worked around by binding a special variable around the creation of
+  ;; the taxy hierarchy that would allow the path to be saved into each taxy.
+
+  ;; NOTE: This method seems to slightly conflate a couple of things: the section class
+  ;; and the value of the section instance.  In the case of `taxy-magit-section', the
+  ;; non-leaf nodes will have a `taxy' as their value, but the leaves will be whatever
+  ;; type of object the `taxy' contains, and we can't account for that in the method
+  ;; specializer (or could we define our own specializer?  I guess we could, but the
+  ;; implications of that aren't obvious).  It's not clear that calling the next method
+  ;; (i.e. probably falling back on just the `magit-section' class) would produce a useful
+  ;; or "correct" value for visibility caching purposes, but at least it works, so it will
+  ;; do for now.
+  (let ((value (oref section value)))
+    (cl-typecase value
+      (taxy (taxy-name value))
+      (otherwise (cl-call-next-method)))))
+
+;;;; Commands
+
+
+;;;; Functions
+
+(cl-defun taxy-magit-section-insert
+    (taxy &key (items 'first) (initial-depth 0) (blank-between-depth 1)
+          (section-class 'taxy-magit-section-section))
+  "Insert a `magit-section' for TAXY into current buffer.
+If ITEMS is `first', insert a taxy's items before its descendant
+taxys; if `last', insert them after descendants.  INITIAL-DEPTH
+is the initial indentation depth; it may be, e.g. -1 to make the
+second level unindented.  BLANK-BETWEEN-DEPTH is the level up to
+which blank lines are inserted between sections at that level.
+SECTION-CLASS is passed to `magit-insert-section', which
+see (this may be set to a custom subclass of `magit-section' in
+order to define a custom `magit-section-ident-value' method so
+that section visibility may be cached concisely)."
+  (declare (indent defun))
+  (let* ((magit-section-set-visibility-hook
+          (cons #'taxy-magit-section-visibility magit-section-set-visibility-hook)))
+    (cl-labels ((insert-item (item taxy depth)
+                  (magit-insert-section ((eval section-class) item)
+                    (magit-insert-section-body
+                      ;; This is a tedious way to give the indent
+                      ;; string the same text properties as the start
+                      ;; of the formatted string, but no matter where I
+                      ;; left point after using `insert-and-inherit',
+                      ;; something was wrong about the properties, and
+                      ;; `magit-section' didn't navigate the sections
+                      ;; properly anymore.
+                      (let* ((formatted (funcall (taxy-magit-section-format-fn taxy) item))
+                             (indent-size (if (or (not taxy-magit-section-insert-indent-items)
+                                                  (< depth 0))
+                                              0
+                                            (+ (* depth (taxy-magit-section-level-indent taxy))
+                                               (taxy-magit-section-item-indent taxy))))
+                             (indent-string (make-string indent-size ? )))
+                        (add-text-properties 0 (length indent-string)
+                                             (text-properties-at 0 formatted)
+                                             indent-string)
+                        (insert indent-string formatted "\n")))))
+                (insert-taxy (taxy depth)
+                  (let ((magit-section-set-visibility-hook magit-section-set-visibility-hook)
+                        (taxy-magit-section-level-indent (taxy-magit-section-level-indent taxy))
+                        (taxy-magit-section-item-indent (taxy-magit-section-item-indent taxy))
+                        (taxy-name (copy-sequence (taxy-name taxy))))
+                    (add-face-text-property
+                     0 (length taxy-name)
+                     (funcall (taxy-magit-section-heading-face-fn taxy) depth)
+                     t taxy-name)
+                    (cl-typecase taxy
+                      (taxy-magit-section
+                       (when (taxy-magit-section-visibility-fn taxy)
+                         (push (taxy-magit-section-visibility-fn taxy)
+                               magit-section-set-visibility-hook))))
+                    ;; HACK: We set the section's washer to nil to prevent
+                    ;; `magit-section--maybe-wash' from trying to wash the section when its
+                    ;; visibility is toggled back on.  I'm not sure why this is necessary
+                    ;; (maybe an issue in magit-section?).
+                    (oset (magit-insert-section ((eval section-class) taxy)
+                            (magit-insert-heading
+                              (make-string (* (if (< depth 0) 0 depth)
+                                              (taxy-magit-section-level-indent taxy))
+                                           ? )
+                              taxy-name
+                              (format " (%s%s)"
+                                      (if (taxy-description taxy)
+                                          (concat (taxy-description taxy) " ")
+                                        "")
+                                      (taxy-size taxy)))
+                            (magit-insert-section-body
+                              (when (eq 'first items)
+                                (dolist (item (taxy-items taxy))
+                                  (insert-item item taxy depth)))
+                              (dolist (taxy (taxy-taxys taxy))
+                                (insert-taxy taxy (1+ depth)))
+                              (when (eq 'last items)
+                                (dolist (item (taxy-items taxy))
+                                  (insert-item item taxy depth))))
+                            (when (<= depth blank-between-depth)
+                              (insert "\n")))
+                          washer nil))))
+      ;; HACK: See earlier note about washer.
+      (oset (magit-insert-section ((eval section-class))
+              (insert-taxy taxy initial-depth))
+            washer nil))))
+
+(cl-defun taxy-magit-section-pp (taxy &key (items 'first))
+  "Pretty-print TAXY into a buffer with `magit-section' and show it."
+  (with-current-buffer (get-buffer-create "*taxy-magit-section-pp*")
+    (magit-section-mode)
+    (let ((inhibit-read-only t))
+      (erase-buffer)
+      (taxy-magit-section-insert taxy :items items))
+    (pop-to-buffer (current-buffer))))
+
+(defun taxy-magit-section-visibility (section)
+  "Show SECTION if its taxy is non-empty.
+Default visibility function for
+`magit-section-set-visibility-hook'."
+  (pcase (oref section value)
+    ((and (pred taxy-p) taxy)
+     (pcase (taxy-size taxy)
+       (0 'hide)
+       (_ (or (magit-section-cached-visibility section)
+              'show))))
+    (_ nil)))
+
+;;;; Column-based formatting
+
+;; Column-based, or "table"?
+
+;; MAYBE: Move this to a separate library, since it's not directly
+;; related to using taxy or magit-section.  Maybe it could be called
+;; something like `flextab' (or, keeping with the theme, `tabley').
+;; But see also <https://github.com/kiwanami/emacs-ctable>.
+
+;;;;; Macros
+
+(cl-defmacro taxy-magit-section-define-column-definer
+    (prefix &key columns-variable-docstring)
+  "Define a column-defining macro.
+The macro is named \"PREFIX-define-column\".
+
+These customization options are defined, which are to be used in
+a `taxy-magit-section' in its `:level-indent' and `:item-indent'
+slots, respectively:
+
+  - PREFIX-level-indent
+  - PREFIX-item-indent
+
+As well as these variables, which are to be passed to
+`taxy-magit-section-format-items':
+
+  - PREFIX-columns
+  - PREFIX-column-formatters"
+  ;; TODO: Document this.
+  (let* ((definer-name (intern (format "%s-define-column" prefix)))
+         (definer-docstring (format "Define a column formatting function with NAME.
+NAME should be a string.  BODY should return a string or nil.  In
+the BODY, `item' is bound to the item being formatted, and `depth' is
+bound to the item's depth in the hierarchy.
+
+PLIST may be a plist setting the following options:
+
+  `:align' may be `left' or `right' to align the column
+  accordingly.
+
+  `:face' is a face applied to the string.
+
+  `:max-width' defines a customization option for the column's
+  maximum width with the specified value as its default: an
+  integer limits the width, while nil does not."))
+         (level-indent-variable-name (intern (format "%s-level-indent" prefix)))
+         (level-indent-docstring (format "Indentation applied to each level of depth for `%s' columns."
+                                         prefix))
+         (item-indent-variable-name (intern (format "%s-item-indent" prefix)))
+         (item-indent-docstring (format "Indentation applied to each item for `%s' columns."
+                                        prefix))
+         (columns-variable-name (intern (format "%s-columns" prefix)))
+         (columns-variable-docstring (or columns-variable-docstring
+                                         (format "Columns defined by `%s'."
+                                                 definer-name)))
+         (column-formatters-variable-name (intern (format "%s-column-formatters" prefix)))
+         (column-formatters-variable-docstring
+          ;; For the best chance for this docstring to not exceed 80 characters in width,
+          ;; the macro's name goes on its own line.
+          (format "Column formatters defined by the macro:
+`%s'."
+                  definer-name)))
+    `(let ((columns-variable ',columns-variable-name)
+           (column-formatters-variable ',column-formatters-variable-name))
+       (defcustom ,level-indent-variable-name 2
+         ,level-indent-docstring
+         :type 'integer)
+       (defcustom ,item-indent-variable-name 2
+         ,item-indent-docstring
+         :type 'integer)
+       (defvar ,columns-variable-name nil
+         ,columns-variable-docstring)
+       (defvar ,column-formatters-variable-name nil
+         ,column-formatters-variable-docstring)
+       (defmacro ,definer-name (name plist &rest body)
+         ,definer-docstring
+         (declare (indent defun))
+         (cl-check-type name string)
+         (pcase-let* ((fn-name (intern (concat ,prefix "-column-format-" (downcase name))))
+                      (columns-variable-name ',columns-variable-name)
+                      (level-indent-variable-name ',level-indent-variable-name)
+                      (item-indent-variable-name ',item-indent-variable-name)
+                      ((map (:face face) (:max-width max-width)) plist)
+                      (max-width-variable (intern (concat ,prefix "-column-" name "-max-width")))
+                      (max-width-docstring (format "Maximum width of the %s column." name)))
+           `(progn
+              ,(when (plist-member plist :max-width)
+                 `(defcustom ,max-width-variable
+                    ,max-width
+                    ,max-width-docstring
+                    :type '(choice (integer :tag "Maximum width")
+                                   (const :tag "Unlimited width" nil))))
+              (defun ,fn-name (item depth)
+                (if-let ((string (progn ,@body)))
+                    (progn
+                      ,(when max-width
+                         `(when ,max-width-variable
+                            ;; I don't like having to save a copy of the old string for
+                            ;; comparison, but given the way `truncate-string-to-width'
+                            ;; calculates widths, I don't see much alternative.  It would
+                            ;; be nice if it returned nil when no change was made.
+                            (let ((old-string string)
+                                  ;; NOTE: We do not specify an ELLIPSIS argument to
+                                  ;; `truncate-string-to-width', because some fonts display
+                                  ;; e.g. U+2026 "HORIZONTAL ELLIPSIS" with a width greater
+                                  ;; than that of the space character, which breaks
+                                  ;; alignment.  The ellipsis used can be controlled with
+                                  ;; the variable `truncate-string-ellipsis', which see.
+                                  (new-string (truncate-string-to-width string ,max-width-variable nil nil t)))
+                              (unless (equal old-string new-string)
+                                ;; String was elided: add help-echo.
+                                (put-text-property 0 (length new-string) 'help-echo old-string new-string)
+                                (setf string new-string)))))
+                      ,(when face
+                         ;; Faces are not defined until load time, while this checks type at expansion
+                         ;; time, so we can only test that the argument is a symbol, not a face.
+                         (cl-check-type face symbol ":face must be a face symbol")
+                         `(setf string (propertize string 'face ',face)))
+                      (when (equal ,name (car ,columns-variable-name))
+                        ;; First column: apply indentation.
+                        (let ((indentation (make-string (+ (* depth ,level-indent-variable-name)
+                                                           ,item-indent-variable-name)
+                                                        ? )))
+                          (setf string (concat indentation string))))
+                      string)
+                  ""))
+              (setf (alist-get 'formatter
+                               (alist-get ,name ,column-formatters-variable nil nil #'equal))
+                    #',fn-name)
+              (setf (alist-get 'align
+                               (alist-get ,name ,column-formatters-variable nil nil #'equal))
+                    ,(plist-get plist :align))
+              ;; Add column to the columns-variable's standard value.
+              (unless (member ,name (get ',columns-variable 'standard-value))
+                (setf (get ',columns-variable 'standard-value)
+                      (append (get ',columns-variable 'standard-value)
+                              (list ,name))))
+              ;; Add column to the columns-variable's custom type.
+              (cl-pushnew ,name (get ',columns-variable 'custom-type)
+                          :test #'equal)))))))
+
+;;;;; Functions
+
+;; MAYBE: Consider using spaces with `:align-to', rather than formatting strings with
+;; indentation, as used by `epkg' (see
+;; <https://github.com/emacscollective/epkg/blob/edf8c009066360af61caedf67a2482eaa19481b0/epkg-desc.el#L363>).
+;; I'm not sure which would perform better; I guess that with many lines, redisplay might
+;; take longer to use the display properties for alignment than just having pre-aligned
+;; lines of text.
+
+(defun taxy-magit-section-format-items (columns formatters taxy)
+  ;; TODO: Document this.
+  "Return a cons (table . column-sizes) for COLUMNS, FORMATTERS, and TAXY.
+COLUMNS is a list of column names, each of which should have an
+associated formatting function in FORMATTERS.
+
+Table is a hash table keyed by item whose values are display
+strings.  Column-sizes is an alist whose keys are column names
+and values are the column width.  Each string is formatted
+according to `columns' and takes into account the width of all
+the items' values for each column."
+  (let ((table (make-hash-table))
+        column-aligns column-sizes image-p window-system-frame)
+    (cl-labels ((string-width* (string)
+                  (if-let (pos (text-property-not-all 0 (length string)
+                                                      'display nil string))
+                      ;; Text has a display property: check for an image.
+                      (pcase (get-text-property pos 'display string)
+                        ((and `(image . ,_rest) spec)
+                         ;; An image: try to calculate the display width.  (See also:
+                         ;; `org-string-width'.)
+
+                         ;; FIXME: The entire string may not be an image, so the
+                         ;; image part needs to be handled separately from any
+                         ;; non-image part.
+
+                         ;; TODO: Do we need to specify the frame?  What if the
+                         ;; buffer isn't currently displayed?
+                         (setf image-p t)
+                         (floor (car (image-size
+                                      spec nil
+                                      (or window-system-frame
+                                          (setf window-system-frame
+                                                (cl-loop for frame in (frame-list)
+                                                         when (and (frame-visible-p frame)
+                                                                   (memq (framep frame)
+                                                                         '(x w32 ns pgtk)))
+                                                         return frame))
+                                          (error "taxy-magit-section-format-items: No graphical frame to calculate image size"))))))
+                        (_
+                         ;; No image: just use `string-width'.
+                         (setf image-p nil)
+                         (string-width string)))
+                    ;; No display property.
+                    (setf image-p nil)
+                    (string-width string)))
+                (resized-image-string (string width)
+                  (let ((image
+                         (get-text-property
+                          (text-property-not-all 0 (length string)
+                                                 'display nil string)
+                          'display string)))
+                    (propertize (make-string width ? ) 'display image)))
+                (format-column (item depth column-name)
+                  (let* ((column-alist (alist-get column-name formatters nil nil #'equal))
+                         (fn (alist-get 'formatter column-alist))
+                         (value (funcall fn item depth))
+                         (current-column-size (or (map-elt column-sizes column-name)
+                                                  (string-width column-name)))
+                         (string-width* (string-width* value)))
+                    (setf (map-elt column-sizes column-name)
+                          (max current-column-size string-width*))
+                    (setf (map-elt column-aligns column-name)
+                          (or (alist-get 'align column-alist) 'left))
+                    (when image-p
+                      ;; String probably is an image: set its non-image string value to a
+                      ;; number of matching spaces.  It's not always pixel-perfect, but
+                      ;; this is probably as good as we can do without using pixel-based
+                      ;; :align-to's for everything (which might be worth doing in the
+                      ;; future).
+
+                      ;; FIXME: This only works properly if the entire string has an image
+                      ;; display property (but this is good enough for now).
+                      (setf value (resized-image-string value string-width*)))
+                    value))
+                (format-item (depth item)
+                  (puthash item
+                           (cl-loop for column in columns
+                                    collect (format-column item depth column))
+                           table))
+                (format-taxy (depth taxy)
+                  (dolist (item (taxy-items taxy))
+                    (format-item depth item))
+                  (dolist (taxy (taxy-taxys taxy))
+                    (format-taxy (1+ depth) taxy))))
+      (format-taxy 0 taxy)
+      ;; Now format each item's string using the column sizes.
+      (let* ((column-sizes (nreverse column-sizes))
+             (format-string
+              (string-join
+               (cl-loop for (name . size) in column-sizes
+                        for align = (pcase-exhaustive (alist-get name column-aligns nil nil #'equal)
+                                      ((or `nil 'left) "-")
+                                      ('right ""))
+                        collect (format "%%%s%ss" align size))
+               " ")))
+        (maphash (lambda (item column-values)
+                   (puthash item (apply #'format format-string column-values)
+                            table))
+                 table)
+        (cons table column-sizes)))))
+
+(defun taxy-magit-section-format-header (column-sizes formatters)
+  ;; TODO: Document this.
+  "Return header string for COLUMN-SIZES and FORMATTERS.
+COLUMN-SIZES should be the CDR of the cell returned by
+`taxy-magit-section-format-items'.  FORMATTERS should be the
+variable passed to that function, which see."
+  (let* ((first-column-name (caar column-sizes))
+         (first-column-alist (alist-get first-column-name formatters nil nil #'equal))
+         (first-column-align (pcase-exhaustive (alist-get 'align first-column-alist)
+                               ((or `nil 'left) "-")
+                               ('right ""))))
+    (concat (format (format " %%%s%ss"
+                            ;; FIXME: Why is this 1+ necessary for proper alignment?
+                            first-column-align (1+ (cdar column-sizes)))
+                    (caar column-sizes))
+            (cl-loop for (name . size) in (cdr column-sizes)
+                     for column-alist = (alist-get name formatters nil nil #'equal)
+                     for align = (pcase-exhaustive (alist-get 'align column-alist)
+                                   ((or `nil 'left) "-")
+                                   ('right ""))
+                     for spec = (format " %%%s%ss" align size)
+                     concat (format spec name)))))
+
+;;;; Footer
+
+(provide 'taxy-magit-section)
+
+;;; taxy-magit-section.el ends here
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section.elc b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section.elc
new file mode 100644
index 0000000..546c926
Binary files /dev/null and b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section.elc differ
diff --git a/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section.info b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section.info
new file mode 100644
index 0000000..49a1380
--- /dev/null
+++ b/emacs/.emacs.d/elpa/taxy-magit-section-0.14.3/taxy-magit-section.info
@@ -0,0 +1,266 @@
+This is README.info, produced by makeinfo version 6.7 from README.texi.
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Taxy Magit Section: (taxy-magit-section). Render Taxy structs with Magit Section.
+END-INFO-DIR-ENTRY
+
+
+File: README.info,  Node: Top,  Next: Installation,  Up: (dir)
+
+taxy-magit-section.el
+*********************
+
+https://elpa.gnu.org/packages/taxy-magit-section.svg
+(https://elpa.gnu.org/packages/taxy-magit-section.html)
+
+   This library renders Taxy (https://github.com/alphapapa/taxy.el)
+structs with magit-section (https://melpa.org/#/magit-section).
+
+* Menu:
+
+* Installation::
+* Changelog::
+* Development::
+* Credits::
+* License::
+
+— The Detailed Node Listing —
+
+Changelog
+
+* 0.14.3: 0143.
+* 0.14.2: 0142.
+* 0.14.1: 0141.
+* 0.14: 014.
+* 0.13: 013.
+* 0.12.2: 0122.
+* 0.12.1: 0121.
+* 0.12: 012.
+* 0.11: 011.
+* 0.10: 010.
+* 0.9.1: 091.
+* 0.9: 09.
+
+
+
+File: README.info,  Node: Installation,  Next: Changelog,  Prev: Top,  Up: Top
+
+1 Installation
+**************
+
+‘taxy-magit-section’ is distributed in GNU ELPA (https://elpa.gnu.org/),
+which is available in Emacs by default.  Use ‘M-x package-install RET
+taxy-magit-section RET’, then ‘(require 'taxy-magit-section)’ in your
+Elisp project.
+
+
+File: README.info,  Node: Changelog,  Next: Development,  Prev: Installation,  Up: Top
+
+2 Changelog
+***********
+
+* Menu:
+
+* 0.14.3: 0143.
+* 0.14.2: 0142.
+* 0.14.1: 0141.
+* 0.14: 014.
+* 0.13: 013.
+* 0.12.2: 0122.
+* 0.12.1: 0121.
+* 0.12: 012.
+* 0.11: 011.
+* 0.10: 010.
+* 0.9.1: 091.
+* 0.9: 09.
+
+
+File: README.info,  Node: 0143,  Next: 0142,  Up: Changelog
+
+2.1 0.14.3
+==========
+
+*Fixes*
+   • Only use visible frames when checking image sizes.  (See Ement.el
+     #298
+     (https://github.com/alphapapa/ement.el/issues/298#issuecomment-2369652629).)
+
+
+File: README.info,  Node: 0142,  Next: 0141,  Prev: 0143,  Up: Changelog
+
+2.2 0.14.2
+==========
+
+*Changes*
+   • Avoid redundant calculations of the width of strings containing
+     images (a minor performance improvement).
+
+
+File: README.info,  Node: 0141,  Next: 014,  Prev: 0142,  Up: Changelog
+
+2.3 0.14.1
+==========
+
+*Fixes*
+   • Don’t pass string as ‘ELLIPSIS’ argument to
+     ‘truncate-string-to-width’; pass t, which defaults to value of
+     variable ‘truncate-string-ellipsis’.  (The width of the string
+     passed before, the U+2026 HORIZONTAL ELLIPSIS character, varies by
+     font, and fonts which display it with a width different than that
+     of a single space cause misalignment of columns.  Now users may
+     specify the ellipsis string according to their needs.)
+   • Try to find a graphical frame when calculating image widths for
+     column widths (or signal an error if none are available, rather
+     than leaving ‘image-size’ to signal an error).  (For example, if
+     both graphical and text frames are available, and a column’s values
+     contain an image, and the buffer is being redisplayed on a text
+     frame, try to use a graphical frame for calculating the image
+     width, rather than just signaling an error.)
+
+
+File: README.info,  Node: 014,  Next: 013,  Prev: 0141,  Up: Changelog
+
+2.4 0.14
+========
+
+*Fixes*
+   • Reduce the potential width of macro-expanded docstrings to prevent
+     byte-compiler warnings.
+
+
+File: README.info,  Node: 013,  Next: 0122,  Prev: 014,  Up: Changelog
+
+2.5 0.13
+========
+
+*Additions*
+
+   • Function ‘taxy-magit-section-insert’ takes a ‘:section-class’
+     argument, which is passed to ‘magit-insert-section’ as its ‘class’
+     argument.  This allows a custom subclass of ‘magit-section’ to be
+     passed, which, with a custom method on ‘magit-section-ident-value’,
+     allows section visibility to be cached concisely.
+
+
+File: README.info,  Node: 0122,  Next: 0121,  Prev: 013,  Up: Changelog
+
+2.6 0.12.2
+==========
+
+*Fixes*
+   • Header alignment.
+
+
+File: README.info,  Node: 0121,  Next: 012,  Prev: 0122,  Up: Changelog
+
+2.7 0.12.1
+==========
+
+*Fixes*
+   • Compilation error.
+
+
+File: README.info,  Node: 012,  Next: 011,  Prev: 0121,  Up: Changelog
+
+2.8 0.12
+========
+
+*Fixes*
+   • Section visibility caching.
+
+
+File: README.info,  Node: 011,  Next: 010,  Prev: 012,  Up: Changelog
+
+2.9 0.11
+========
+
+*Additions*
+   • Truncated column values receive help-echo tooltips so the full
+     value can be viewed.
+
+
+File: README.info,  Node: 010,  Next: 091,  Prev: 011,  Up: Changelog
+
+2.10 0.10
+=========
+
+*Fixes*
+   • Require package ‘taxy’ in package headers.
+
+
+File: README.info,  Node: 091,  Next: 09,  Prev: 010,  Up: Changelog
+
+2.11 0.9.1
+==========
+
+*Fixes*
+   • ‘taxy-magit-section-insert’ appends heading faces, so users can
+     override (or merge with) the default.
+   • ‘taxy-magit-section-format-items’ uses columns’ headers as their
+     minimum width, which preserves each column’s width regardless of
+     items’ values.
+
+
+File: README.info,  Node: 09,  Prev: 091,  Up: Changelog
+
+2.12 0.9
+========
+
+   • ‘taxy-magit-section’ moved to separate package.
+   • Better align columns whose values are images.
+
+
+File: README.info,  Node: Development,  Next: Credits,  Prev: Changelog,  Up: Top
+
+3 Development
+*************
+
+‘taxy-magit-section’ is developed in a branch of the main Taxy repo
+(https://github.com/alphapapa/taxy.el).
+
+
+File: README.info,  Node: Credits,  Next: License,  Prev: Development,  Up: Top
+
+4 Credits
+*********
+
+   • Thanks to Stefan Monnier for his feedback, and for maintaining GNU
+     ELPA.
+
+
+File: README.info,  Node: License,  Prev: Credits,  Up: Top
+
+5 License
+*********
+
+GPLv3
+
+
+
+Tag Table:
+Node: Top221
+Node: Installation874
+Node: Changelog1228
+Node: 01431523
+Node: 01421783
+Node: 01412011
+Node: 0143066
+Node: 0133271
+Node: 01223742
+Node: 01213874
+Node: 0124007
+Node: 0114144
+Node: 0104345
+Node: 0914502
+Node: 094896
+Node: Development5088
+Node: Credits5315
+Node: License5505
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/transient-20260806.1211/dir b/emacs/.emacs.d/elpa/transient-20260806.1211/dir
new file mode 100644
index 0000000..d4d5540
--- /dev/null
+++ b/emacs/.emacs.d/elpa/transient-20260806.1211/dir
@@ -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 misc features
+* Transient: (transient).       Transient Commands.
diff --git a/emacs/.emacs.d/elpa/transient-20260806.1211/gpl.info b/emacs/.emacs.d/elpa/transient-20260806.1211/gpl.info
new file mode 100644
index 0000000..68d3336
--- /dev/null
+++ b/emacs/.emacs.d/elpa/transient-20260806.1211/gpl.info
@@ -0,0 +1,721 @@
+This is gpl.info, produced by makeinfo version 7.1.1 from gpl.texi.
+
+                        Version 3, 29 June 2007
+
+     Copyright © 2007 Free Software Foundation, Inc. <https://fsf.org/>
+
+     Everyone is permitted to copy and distribute verbatim copies of this
+     license document, but changing it is not allowed.
+
+Preamble
+========
+
+The GNU General Public License is a free, copyleft license for software
+and other kinds of works.
+
+   The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+the GNU General Public License is intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.  We, the Free Software Foundation, use the
+GNU General Public License for most of our software; it applies also to
+any other work released this way by its authors.  You can apply it to
+your programs, too.
+
+   When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+   To protect your rights, we need to prevent others from denying you
+these rights or asking you to surrender the rights.  Therefore, you have
+certain responsibilities if you distribute copies of the software, or if
+you modify it: responsibilities to respect the freedom of others.
+
+   For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must pass on to the recipients the same
+freedoms that you received.  You must make sure that they, too, receive
+or can get the source code.  And you must show them these terms so they
+know their rights.
+
+   Developers that use the GNU GPL protect your rights with two steps:
+(1) assert copyright on the software, and (2) offer you this License
+giving you legal permission to copy, distribute and/or modify it.
+
+   For the developers' and authors' protection, the GPL clearly explains
+that there is no warranty for this free software.  For both users' and
+authors' sake, the GPL requires that modified versions be marked as
+changed, so that their problems will not be attributed erroneously to
+authors of previous versions.
+
+   Some devices are designed to deny users access to install or run
+modified versions of the software inside them, although the manufacturer
+can do so.  This is fundamentally incompatible with the aim of
+protecting users' freedom to change the software.  The systematic
+pattern of such abuse occurs in the area of products for individuals to
+use, which is precisely where it is most unacceptable.  Therefore, we
+have designed this version of the GPL to prohibit the practice for those
+products.  If such problems arise substantially in other domains, we
+stand ready to extend this provision to those domains in future versions
+of the GPL, as needed to protect the freedom of users.
+
+   Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish to
+avoid the special danger that patents applied to a free program could
+make it effectively proprietary.  To prevent this, the GPL assures that
+patents cannot be used to render the program non-free.
+
+   The precise terms and conditions for copying, distribution and
+modification follow.
+
+TERMS AND CONDITIONS
+====================
+
+  0. Definitions.
+
+     "This License" refers to version 3 of the GNU General Public
+     License.
+
+     "Copyright" also means copyright-like laws that apply to other
+     kinds of works, such as semiconductor masks.
+
+     "The Program" refers to any copyrightable work licensed under this
+     License.  Each licensee is addressed as "you".  "Licensees" and
+     "recipients" may be individuals or organizations.
+
+     To "modify" a work means to copy from or adapt all or part of the
+     work in a fashion requiring copyright permission, other than the
+     making of an exact copy.  The resulting work is called a "modified
+     version" of the earlier work or a work "based on" the earlier work.
+
+     A "covered work" means either the unmodified Program or a work
+     based on the Program.
+
+     To "propagate" a work means to do anything with it that, without
+     permission, would make you directly or secondarily liable for
+     infringement under applicable copyright law, except executing it on
+     a computer or modifying a private copy.  Propagation includes
+     copying, distribution (with or without modification), making
+     available to the public, and in some countries other activities as
+     well.
+
+     To "convey" a work means any kind of propagation that enables other
+     parties to make or receive copies.  Mere interaction with a user
+     through a computer network, with no transfer of a copy, is not
+     conveying.
+
+     An interactive user interface displays "Appropriate Legal Notices"
+     to the extent that it includes a convenient and prominently visible
+     feature that (1) displays an appropriate copyright notice, and (2)
+     tells the user that there is no warranty for the work (except to
+     the extent that warranties are provided), that licensees may convey
+     the work under this License, and how to view a copy of this
+     License.  If the interface presents a list of user commands or
+     options, such as a menu, a prominent item in the list meets this
+     criterion.
+
+  1. Source Code.
+
+     The "source code" for a work means the preferred form of the work
+     for making modifications to it.  "Object code" means any non-source
+     form of a work.
+
+     A "Standard Interface" means an interface that either is an
+     official standard defined by a recognized standards body, or, in
+     the case of interfaces specified for a particular programming
+     language, one that is widely used among developers working in that
+     language.
+
+     The "System Libraries" of an executable work include anything,
+     other than the work as a whole, that (a) is included in the normal
+     form of packaging a Major Component, but which is not part of that
+     Major Component, and (b) serves only to enable use of the work with
+     that Major Component, or to implement a Standard Interface for
+     which an implementation is available to the public in source code
+     form.  A "Major Component", in this context, means a major
+     essential component (kernel, window system, and so on) of the
+     specific operating system (if any) on which the executable work
+     runs, or a compiler used to produce the work, or an object code
+     interpreter used to run it.
+
+     The "Corresponding Source" for a work in object code form means all
+     the source code needed to generate, install, and (for an executable
+     work) run the object code and to modify the work, including scripts
+     to control those activities.  However, it does not include the
+     work's System Libraries, or general-purpose tools or generally
+     available free programs which are used unmodified in performing
+     those activities but which are not part of the work.  For example,
+     Corresponding Source includes interface definition files associated
+     with source files for the work, and the source code for shared
+     libraries and dynamically linked subprograms that the work is
+     specifically designed to require, such as by intimate data
+     communication or control flow between those subprograms and other
+     parts of the work.
+
+     The Corresponding Source need not include anything that users can
+     regenerate automatically from other parts of the Corresponding
+     Source.
+
+     The Corresponding Source for a work in source code form is that
+     same work.
+
+  2. Basic Permissions.
+
+     All rights granted under this License are granted for the term of
+     copyright on the Program, and are irrevocable provided the stated
+     conditions are met.  This License explicitly affirms your unlimited
+     permission to run the unmodified Program.  The output from running
+     a covered work is covered by this License only if the output, given
+     its content, constitutes a covered work.  This License acknowledges
+     your rights of fair use or other equivalent, as provided by
+     copyright law.
+
+     You may make, run and propagate covered works that you do not
+     convey, without conditions so long as your license otherwise
+     remains in force.  You may convey covered works to others for the
+     sole purpose of having them make modifications exclusively for you,
+     or provide you with facilities for running those works, provided
+     that you comply with the terms of this License in conveying all
+     material for which you do not control copyright.  Those thus making
+     or running the covered works for you must do so exclusively on your
+     behalf, under your direction and control, on terms that prohibit
+     them from making any copies of your copyrighted material outside
+     their relationship with you.
+
+     Conveying under any other circumstances is permitted solely under
+     the conditions stated below.  Sublicensing is not allowed; section
+     10 makes it unnecessary.
+
+  3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+     No covered work shall be deemed part of an effective technological
+     measure under any applicable law fulfilling obligations under
+     article 11 of the WIPO copyright treaty adopted on 20 December
+     1996, or similar laws prohibiting or restricting circumvention of
+     such measures.
+
+     When you convey a covered work, you waive any legal power to forbid
+     circumvention of technological measures to the extent such
+     circumvention is effected by exercising rights under this License
+     with respect to the covered work, and you disclaim any intention to
+     limit operation or modification of the work as a means of
+     enforcing, against the work's users, your or third parties' legal
+     rights to forbid circumvention of technological measures.
+
+  4. Conveying Verbatim Copies.
+
+     You may convey verbatim copies of the Program's source code as you
+     receive it, in any medium, provided that you conspicuously and
+     appropriately publish on each copy an appropriate copyright notice;
+     keep intact all notices stating that this License and any
+     non-permissive terms added in accord with section 7 apply to the
+     code; keep intact all notices of the absence of any warranty; and
+     give all recipients a copy of this License along with the Program.
+
+     You may charge any price or no price for each copy that you convey,
+     and you may offer support or warranty protection for a fee.
+
+  5. Conveying Modified Source Versions.
+
+     You may convey a work based on the Program, or the modifications to
+     produce it from the Program, in the form of source code under the
+     terms of section 4, provided that you also meet all of these
+     conditions:
+
+       a. The work must carry prominent notices stating that you
+          modified it, and giving a relevant date.
+
+       b. The work must carry prominent notices stating that it is
+          released under this License and any conditions added under
+          section 7.  This requirement modifies the requirement in
+          section 4 to "keep intact all notices".
+
+       c. You must license the entire work, as a whole, under this
+          License to anyone who comes into possession of a copy.  This
+          License will therefore apply, along with any applicable
+          section 7 additional terms, to the whole of the work, and all
+          its parts, regardless of how they are packaged.  This License
+          gives no permission to license the work in any other way, but
+          it does not invalidate such permission if you have separately
+          received it.
+
+       d. If the work has interactive user interfaces, each must display
+          Appropriate Legal Notices; however, if the Program has
+          interactive interfaces that do not display Appropriate Legal
+          Notices, your work need not make them do so.
+
+     A compilation of a covered work with other separate and independent
+     works, which are not by their nature extensions of the covered
+     work, and which are not combined with it such as to form a larger
+     program, in or on a volume of a storage or distribution medium, is
+     called an "aggregate" if the compilation and its resulting
+     copyright are not used to limit the access or legal rights of the
+     compilation's users beyond what the individual works permit.
+     Inclusion of a covered work in an aggregate does not cause this
+     License to apply to the other parts of the aggregate.
+
+  6. Conveying Non-Source Forms.
+
+     You may convey a covered work in object code form under the terms
+     of sections 4 and 5, provided that you also convey the
+     machine-readable Corresponding Source under the terms of this
+     License, in one of these ways:
+
+       a. Convey the object code in, or embodied in, a physical product
+          (including a physical distribution medium), accompanied by the
+          Corresponding Source fixed on a durable physical medium
+          customarily used for software interchange.
+
+       b. Convey the object code in, or embodied in, a physical product
+          (including a physical distribution medium), accompanied by a
+          written offer, valid for at least three years and valid for as
+          long as you offer spare parts or customer support for that
+          product model, to give anyone who possesses the object code
+          either (1) a copy of the Corresponding Source for all the
+          software in the product that is covered by this License, on a
+          durable physical medium customarily used for software
+          interchange, for a price no more than your reasonable cost of
+          physically performing this conveying of source, or (2) access
+          to copy the Corresponding Source from a network server at no
+          charge.
+
+       c. Convey individual copies of the object code with a copy of the
+          written offer to provide the Corresponding Source.  This
+          alternative is allowed only occasionally and noncommercially,
+          and only if you received the object code with such an offer,
+          in accord with subsection 6b.
+
+       d. Convey the object code by offering access from a designated
+          place (gratis or for a charge), and offer equivalent access to
+          the Corresponding Source in the same way through the same
+          place at no further charge.  You need not require recipients
+          to copy the Corresponding Source along with the object code.
+          If the place to copy the object code is a network server, the
+          Corresponding Source may be on a different server (operated by
+          you or a third party) that supports equivalent copying
+          facilities, provided you maintain clear directions next to the
+          object code saying where to find the Corresponding Source.
+          Regardless of what server hosts the Corresponding Source, you
+          remain obligated to ensure that it is available for as long as
+          needed to satisfy these requirements.
+
+       e. Convey the object code using peer-to-peer transmission,
+          provided you inform other peers where the object code and
+          Corresponding Source of the work are being offered to the
+          general public at no charge under subsection 6d.
+
+     A separable portion of the object code, whose source code is
+     excluded from the Corresponding Source as a System Library, need
+     not be included in conveying the object code work.
+
+     A "User Product" is either (1) a "consumer product", which means
+     any tangible personal property which is normally used for personal,
+     family, or household purposes, or (2) anything designed or sold for
+     incorporation into a dwelling.  In determining whether a product is
+     a consumer product, doubtful cases shall be resolved in favor of
+     coverage.  For a particular product received by a particular user,
+     "normally used" refers to a typical or common use of that class of
+     product, regardless of the status of the particular user or of the
+     way in which the particular user actually uses, or expects or is
+     expected to use, the product.  A product is a consumer product
+     regardless of whether the product has substantial commercial,
+     industrial or non-consumer uses, unless such uses represent the
+     only significant mode of use of the product.
+
+     "Installation Information" for a User Product means any methods,
+     procedures, authorization keys, or other information required to
+     install and execute modified versions of a covered work in that
+     User Product from a modified version of its Corresponding Source.
+     The information must suffice to ensure that the continued
+     functioning of the modified object code is in no case prevented or
+     interfered with solely because modification has been made.
+
+     If you convey an object code work under this section in, or with,
+     or specifically for use in, a User Product, and the conveying
+     occurs as part of a transaction in which the right of possession
+     and use of the User Product is transferred to the recipient in
+     perpetuity or for a fixed term (regardless of how the transaction
+     is characterized), the Corresponding Source conveyed under this
+     section must be accompanied by the Installation Information.  But
+     this requirement does not apply if neither you nor any third party
+     retains the ability to install modified object code on the User
+     Product (for example, the work has been installed in ROM).
+
+     The requirement to provide Installation Information does not
+     include a requirement to continue to provide support service,
+     warranty, or updates for a work that has been modified or installed
+     by the recipient, or for the User Product in which it has been
+     modified or installed.  Access to a network may be denied when the
+     modification itself materially and adversely affects the operation
+     of the network or violates the rules and protocols for
+     communication across the network.
+
+     Corresponding Source conveyed, and Installation Information
+     provided, in accord with this section must be in a format that is
+     publicly documented (and with an implementation available to the
+     public in source code form), and must require no special password
+     or key for unpacking, reading or copying.
+
+  7. Additional Terms.
+
+     "Additional permissions" are terms that supplement the terms of
+     this License by making exceptions from one or more of its
+     conditions.  Additional permissions that are applicable to the
+     entire Program shall be treated as though they were included in
+     this License, to the extent that they are valid under applicable
+     law.  If additional permissions apply only to part of the Program,
+     that part may be used separately under those permissions, but the
+     entire Program remains governed by this License without regard to
+     the additional permissions.
+
+     When you convey a copy of a covered work, you may at your option
+     remove any additional permissions from that copy, or from any part
+     of it.  (Additional permissions may be written to require their own
+     removal in certain cases when you modify the work.)  You may place
+     additional permissions on material, added by you to a covered work,
+     for which you have or can give appropriate copyright permission.
+
+     Notwithstanding any other provision of this License, for material
+     you add to a covered work, you may (if authorized by the copyright
+     holders of that material) supplement the terms of this License with
+     terms:
+
+       a. Disclaiming warranty or limiting liability differently from
+          the terms of sections 15 and 16 of this License; or
+
+       b. Requiring preservation of specified reasonable legal notices
+          or author attributions in that material or in the Appropriate
+          Legal Notices displayed by works containing it; or
+
+       c. Prohibiting misrepresentation of the origin of that material,
+          or requiring that modified versions of such material be marked
+          in reasonable ways as different from the original version; or
+
+       d. Limiting the use for publicity purposes of names of licensors
+          or authors of the material; or
+
+       e. Declining to grant rights under trademark law for use of some
+          trade names, trademarks, or service marks; or
+
+       f. Requiring indemnification of licensors and authors of that
+          material by anyone who conveys the material (or modified
+          versions of it) with contractual assumptions of liability to
+          the recipient, for any liability that these contractual
+          assumptions directly impose on those licensors and authors.
+
+     All other non-permissive additional terms are considered "further
+     restrictions" within the meaning of section 10.  If the Program as
+     you received it, or any part of it, contains a notice stating that
+     it is governed by this License along with a term that is a further
+     restriction, you may remove that term.  If a license document
+     contains a further restriction but permits relicensing or conveying
+     under this License, you may add to a covered work material governed
+     by the terms of that license document, provided that the further
+     restriction does not survive such relicensing or conveying.
+
+     If you add terms to a covered work in accord with this section, you
+     must place, in the relevant source files, a statement of the
+     additional terms that apply to those files, or a notice indicating
+     where to find the applicable terms.
+
+     Additional terms, permissive or non-permissive, may be stated in
+     the form of a separately written license, or stated as exceptions;
+     the above requirements apply either way.
+
+  8. Termination.
+
+     You may not propagate or modify a covered work except as expressly
+     provided under this License.  Any attempt otherwise to propagate or
+     modify it is void, and will automatically terminate your rights
+     under this License (including any patent licenses granted under the
+     third paragraph of section 11).
+
+     However, if you cease all violation of this License, then your
+     license from a particular copyright holder is reinstated (a)
+     provisionally, unless and until the copyright holder explicitly and
+     finally terminates your license, and (b) permanently, if the
+     copyright holder fails to notify you of the violation by some
+     reasonable means prior to 60 days after the cessation.
+
+     Moreover, your license from a particular copyright holder is
+     reinstated permanently if the copyright holder notifies you of the
+     violation by some reasonable means, this is the first time you have
+     received notice of violation of this License (for any work) from
+     that copyright holder, and you cure the violation prior to 30 days
+     after your receipt of the notice.
+
+     Termination of your rights under this section does not terminate
+     the licenses of parties who have received copies or rights from you
+     under this License.  If your rights have been terminated and not
+     permanently reinstated, you do not qualify to receive new licenses
+     for the same material under section 10.
+
+  9. Acceptance Not Required for Having Copies.
+
+     You are not required to accept this License in order to receive or
+     run a copy of the Program.  Ancillary propagation of a covered work
+     occurring solely as a consequence of using peer-to-peer
+     transmission to receive a copy likewise does not require
+     acceptance.  However, nothing other than this License grants you
+     permission to propagate or modify any covered work.  These actions
+     infringe copyright if you do not accept this License.  Therefore,
+     by modifying or propagating a covered work, you indicate your
+     acceptance of this License to do so.
+
+  10. Automatic Licensing of Downstream Recipients.
+
+     Each time you convey a covered work, the recipient automatically
+     receives a license from the original licensors, to run, modify and
+     propagate that work, subject to this License.  You are not
+     responsible for enforcing compliance by third parties with this
+     License.
+
+     An "entity transaction" is a transaction transferring control of an
+     organization, or substantially all assets of one, or subdividing an
+     organization, or merging organizations.  If propagation of a
+     covered work results from an entity transaction, each party to that
+     transaction who receives a copy of the work also receives whatever
+     licenses to the work the party's predecessor in interest had or
+     could give under the previous paragraph, plus a right to possession
+     of the Corresponding Source of the work from the predecessor in
+     interest, if the predecessor has it or can get it with reasonable
+     efforts.
+
+     You may not impose any further restrictions on the exercise of the
+     rights granted or affirmed under this License.  For example, you
+     may not impose a license fee, royalty, or other charge for exercise
+     of rights granted under this License, and you may not initiate
+     litigation (including a cross-claim or counterclaim in a lawsuit)
+     alleging that any patent claim is infringed by making, using,
+     selling, offering for sale, or importing the Program or any portion
+     of it.
+
+  11. Patents.
+
+     A "contributor" is a copyright holder who authorizes use under this
+     License of the Program or a work on which the Program is based.
+     The work thus licensed is called the contributor's "contributor
+     version".
+
+     A contributor's "essential patent claims" are all patent claims
+     owned or controlled by the contributor, whether already acquired or
+     hereafter acquired, that would be infringed by some manner,
+     permitted by this License, of making, using, or selling its
+     contributor version, but do not include claims that would be
+     infringed only as a consequence of further modification of the
+     contributor version.  For purposes of this definition, "control"
+     includes the right to grant patent sublicenses in a manner
+     consistent with the requirements of this License.
+
+     Each contributor grants you a non-exclusive, worldwide,
+     royalty-free patent license under the contributor's essential
+     patent claims, to make, use, sell, offer for sale, import and
+     otherwise run, modify and propagate the contents of its contributor
+     version.
+
+     In the following three paragraphs, a "patent license" is any
+     express agreement or commitment, however denominated, not to
+     enforce a patent (such as an express permission to practice a
+     patent or covenant not to sue for patent infringement).  To "grant"
+     such a patent license to a party means to make such an agreement or
+     commitment not to enforce a patent against the party.
+
+     If you convey a covered work, knowingly relying on a patent
+     license, and the Corresponding Source of the work is not available
+     for anyone to copy, free of charge and under the terms of this
+     License, through a publicly available network server or other
+     readily accessible means, then you must either (1) cause the
+     Corresponding Source to be so available, or (2) arrange to deprive
+     yourself of the benefit of the patent license for this particular
+     work, or (3) arrange, in a manner consistent with the requirements
+     of this License, to extend the patent license to downstream
+     recipients.  "Knowingly relying" means you have actual knowledge
+     that, but for the patent license, your conveying the covered work
+     in a country, or your recipient's use of the covered work in a
+     country, would infringe one or more identifiable patents in that
+     country that you have reason to believe are valid.
+
+     If, pursuant to or in connection with a single transaction or
+     arrangement, you convey, or propagate by procuring conveyance of, a
+     covered work, and grant a patent license to some of the parties
+     receiving the covered work authorizing them to use, propagate,
+     modify or convey a specific copy of the covered work, then the
+     patent license you grant is automatically extended to all
+     recipients of the covered work and works based on it.
+
+     A patent license is "discriminatory" if it does not include within
+     the scope of its coverage, prohibits the exercise of, or is
+     conditioned on the non-exercise of one or more of the rights that
+     are specifically granted under this License.  You may not convey a
+     covered work if you are a party to an arrangement with a third
+     party that is in the business of distributing software, under which
+     you make payment to the third party based on the extent of your
+     activity of conveying the work, and under which the third party
+     grants, to any of the parties who would receive the covered work
+     from you, a discriminatory patent license (a) in connection with
+     copies of the covered work conveyed by you (or copies made from
+     those copies), or (b) primarily for and in connection with specific
+     products or compilations that contain the covered work, unless you
+     entered into that arrangement, or that patent license was granted,
+     prior to 28 March 2007.
+
+     Nothing in this License shall be construed as excluding or limiting
+     any implied license or other defenses to infringement that may
+     otherwise be available to you under applicable patent law.
+
+  12. No Surrender of Others' Freedom.
+
+     If conditions are imposed on you (whether by court order, agreement
+     or otherwise) that contradict the conditions of this License, they
+     do not excuse you from the conditions of this License.  If you
+     cannot convey a covered work so as to satisfy simultaneously your
+     obligations under this License and any other pertinent obligations,
+     then as a consequence you may not convey it at all.  For example,
+     if you agree to terms that obligate you to collect a royalty for
+     further conveying from those to whom you convey the Program, the
+     only way you could satisfy both those terms and this License would
+     be to refrain entirely from conveying the Program.
+
+  13. Use with the GNU Affero General Public License.
+
+     Notwithstanding any other provision of this License, you have
+     permission to link or combine any covered work with a work licensed
+     under version 3 of the GNU Affero General Public License into a
+     single combined work, and to convey the resulting work.  The terms
+     of this License will continue to apply to the part which is the
+     covered work, but the special requirements of the GNU Affero
+     General Public License, section 13, concerning interaction through
+     a network will apply to the combination as such.
+
+  14. Revised Versions of this License.
+
+     The Free Software Foundation may publish revised and/or new
+     versions of the GNU General Public License from time to time.  Such
+     new versions will be similar in spirit to the present version, but
+     may differ in detail to address new problems or concerns.
+
+     Each version is given a distinguishing version number.  If the
+     Program specifies that a certain numbered version of the GNU
+     General Public License "or any later version" applies to it, you
+     have the option of following the terms and conditions either of
+     that numbered version or of any later version published by the Free
+     Software Foundation.  If the Program does not specify a version
+     number of the GNU General Public License, you may choose any
+     version ever published by the Free Software Foundation.
+
+     If the Program specifies that a proxy can decide which future
+     versions of the GNU General Public License can be used, that
+     proxy's public statement of acceptance of a version permanently
+     authorizes you to choose that version for the Program.
+
+     Later license versions may give you additional or different
+     permissions.  However, no additional obligations are imposed on any
+     author or copyright holder as a result of your choosing to follow a
+     later version.
+
+  15. Disclaimer of Warranty.
+
+     THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
+     APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE
+     COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS"
+     WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED,
+     INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+     MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE
+     RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.
+     SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL
+     NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+  16. Limitation of Liability.
+
+     IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN
+     WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES
+     AND/OR CONVEYS THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR
+     DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR
+     CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE
+     THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA
+     BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
+     PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+     PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF
+     THE POSSIBILITY OF SUCH DAMAGES.
+
+  17. Interpretation of Sections 15 and 16.
+
+     If the disclaimer of warranty and limitation of liability provided
+     above cannot be given local legal effect according to their terms,
+     reviewing courts shall apply local law that most closely
+     approximates an absolute waiver of all civil liability in
+     connection with the Program, unless a warranty or assumption of
+     liability accompanies a copy of the Program in return for a fee.
+
+END OF TERMS AND CONDITIONS
+===========================
+
+How to Apply These Terms to Your New Programs
+=============================================
+
+If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these
+terms.
+
+   To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+state the exclusion of warranty; and each file should have at least the
+"copyright" line and a pointer to where the full notice is found.
+
+     ONE LINE TO GIVE THE PROGRAM'S NAME AND A BRIEF IDEA OF WHAT IT DOES.
+     Copyright (C) YEAR NAME OF AUTHOR
+
+     This program is free software: you can redistribute it and/or modify
+     it under the terms of the GNU General Public License as published by
+     the Free Software Foundation, either version 3 of the License, or (at
+     your option) any later version.
+
+     This program is distributed in the hope that it will be useful, but
+     WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+     You should have received a copy of the GNU General Public License
+     along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+   Also add information on how to contact you by electronic and paper
+mail.
+
+   If the program does terminal interaction, make it output a short
+notice like this when it starts in an interactive mode:
+
+     PROGRAM Copyright (C) YEAR NAME OF AUTHOR
+     This program comes with ABSOLUTELY NO WARRANTY; for details type ‘show w’.
+     This is free software, and you are welcome to redistribute it
+     under certain conditions; type ‘show c’ for details.
+
+   The hypothetical commands ‘show w’ and ‘show c’ should show the
+appropriate parts of the General Public License.  Of course, your
+program's commands might be different; for a GUI interface, you would
+use an "about box".
+
+   You should also get your employer (if you work as a programmer) or
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  For more information on this, and how to apply and follow
+the GNU GPL, see <https://www.gnu.org/licenses/>.
+
+   The GNU General Public License does not permit incorporating your
+program into proprietary programs.  If your program is a subroutine
+library, you may consider it more useful to permit linking proprietary
+applications with the library.  If this is what you want to do, use the
+GNU Lesser General Public License instead of this License.  But first,
+please read <https://www.gnu.org/licenses/why-not-lgpl.html>.
+
+
+Tag Table:
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/transient-20260806.1211/transient-autoloads.el b/emacs/.emacs.d/elpa/transient-20260806.1211/transient-autoloads.el
new file mode 100644
index 0000000..59a93cb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/transient-20260806.1211/transient-autoloads.el
@@ -0,0 +1,89 @@
+;;; transient-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from transient.el
+
+(autoload 'transient-insert-suffix "transient" "\
+Insert a SUFFIX into PREFIX before LOC.
+PREFIX is a prefix command, a symbol.
+SUFFIX is a suffix command or a group specification (of
+  the same forms as expected by `transient-define-prefix').
+LOC is a command, a key vector, a key description (a string
+  as returned by `key-description'), or a coordination list
+  (whose last element may also be a command or key).
+Remove a conflicting binding unless optional KEEP-OTHER is
+  non-nil.  When the conflict appears to be a false-positive,
+  non-nil KEEP-OTHER may be ignored, which can be prevented
+  by using `always'.
+See info node `(transient)Modifying Existing Transients'.
+
+(fn PREFIX LOC SUFFIX &optional KEEP-OTHER)")
+(function-put 'transient-insert-suffix 'lisp-indent-function 'defun)
+(autoload 'transient-append-suffix "transient" "\
+Insert a SUFFIX into PREFIX after LOC.
+PREFIX is a prefix command, a symbol.
+SUFFIX is a suffix command or a group specification (of
+  the same forms as expected by `transient-define-prefix').
+LOC is a command, a key vector, a key description (a string
+  as returned by `key-description'), or a coordination list
+  (whose last element may also be a command or key).
+Remove a conflicting binding unless optional KEEP-OTHER is
+  non-nil.  When the conflict appears to be a false-positive,
+  non-nil KEEP-OTHER may be ignored, which can be prevented
+  by using `always'.
+See info node `(transient)Modifying Existing Transients'.
+
+(fn PREFIX LOC SUFFIX &optional KEEP-OTHER)")
+(function-put 'transient-append-suffix 'lisp-indent-function 'defun)
+(autoload 'transient-replace-suffix "transient" "\
+Replace the suffix at LOC in PREFIX with SUFFIX.
+PREFIX is a prefix command, a symbol.
+SUFFIX is a suffix command or a group specification (of
+  the same forms as expected by `transient-define-prefix').
+LOC is a command, a key vector, a key description (a string
+  as returned by `key-description'), or a coordination list
+  (whose last element may also be a command or key).
+See info node `(transient)Modifying Existing Transients'.
+
+(fn PREFIX LOC SUFFIX)")
+(function-put 'transient-replace-suffix 'lisp-indent-function 'defun)
+(autoload 'transient-inline-group "transient" "\
+Inline the included GROUP into PREFIX.
+Replace the symbol GROUP with its expanded layout in the
+layout of PREFIX.
+
+(fn PREFIX GROUP)")
+(function-put 'transient-inline-group 'lisp-indent-function 'defun)
+(autoload 'transient-remove-suffix "transient" "\
+Remove the suffix or group at LOC in PREFIX.
+PREFIX is a prefix command, a symbol.
+LOC is a command, a key vector, a key description (a string
+  as returned by `key-description'), or a coordination list
+  (whose last element may also be a command or key).
+See info node `(transient)Modifying Existing Transients'.
+
+(fn PREFIX LOC)")
+(function-put 'transient-remove-suffix 'lisp-indent-function 'defun)
+(register-definition-prefixes "transient" '("find-function-advised-original" "transient"))
+
+;;; End of scraped data
+
+(provide 'transient-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; transient-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/transient-20260806.1211/transient-pkg.el b/emacs/.emacs.d/elpa/transient-20260806.1211/transient-pkg.el
new file mode 100644
index 0000000..c42ae11
--- /dev/null
+++ b/emacs/.emacs.d/elpa/transient-20260806.1211/transient-pkg.el
@@ -0,0 +1,14 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "transient" "20260806.1211"
+  "Transient commands."
+  '((emacs    "28.1")
+    (compat   "31.0")
+    (cond-let "1.1")
+    (llama    "1.0")
+    (seq      "2.24"))
+  :url "https://github.com/magit/transient"
+  :commit "0ec75dcce235f5ab3d39a02b878e6aaa78159b22"
+  :revdesc "0ec75dcce235"
+  :keywords '("extensions")
+  :authors '(("Jonas Bernoulli" . "emacs.transient@jonas.bernoulli.dev"))
+  :maintainers '(("Jonas Bernoulli" . "emacs.transient@jonas.bernoulli.dev")))
diff --git a/emacs/.emacs.d/elpa/transient-20260806.1211/transient.el b/emacs/.emacs.d/elpa/transient-20260806.1211/transient.el
new file mode 100644
index 0000000..1b85bd8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/transient-20260806.1211/transient.el
@@ -0,0 +1,5817 @@
+;;; transient.el --- Transient commands  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2018-2026 Free Software Foundation, Inc.
+
+;; Author: Jonas Bernoulli <emacs.transient@jonas.bernoulli.dev>
+;; Homepage: https://github.com/magit/transient
+;; Keywords: extensions
+
+;; Package-Version: 20260806.1211
+;; Package-Revision: 0ec75dcce235
+;; Package-Requires: (
+;;     (emacs   "28.1")
+;;     (compat  "31.0")
+;;     (cond-let "1.1")
+;;     (llama    "1.0")
+;;     (seq      "2.24"))
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Transient is the library used to implement the keyboard-driven menus
+;; in Magit.  It is distributed as a separate package, so that it can be
+;; used to implement similar menus in other packages.
+
+;; You can contact the maintainer of this package by sending an email to
+;; <emacs.transient@jonas.bernoulli.dev>, or you can use the public issue
+;; tracker at <https://github.com/magit/transient>.  The latter can also
+;; be accessed using the `forge' package, which lets you avoid the sadly
+;; non-free javascript on that website.
+
+;;; Code:
+
+(defconst transient-version "0.13.7")
+
+(require 'cl-lib)
+(require 'compat)
+(require 'cond-let)
+(require 'eieio)
+(require 'edmacro)
+(require 'format-spec)
+(require 'llama)
+(require 'pcase)
+(require 'pp)
+
+(eval-and-compile
+  (when (and (featurep 'seq)
+             (not (fboundp 'seq-keep)))
+    (unload-feature 'seq 'force)))
+(require 'seq)
+(unless (fboundp 'seq-keep)
+  (display-warning 'transient (substitute-command-keys "\
+Transient requires `seq' >= 2.24,
+but due to bad defaults, Emacs's package manager, refuses to
+upgrade this and other built-in packages to higher releases
+from GNU Elpa, when a package specifies that this is needed.
+
+To fix this, you have to add this to your init file:
+
+  (setq package-install-upgrade-built-in t)
+
+Then evaluate that expression by placing the cursor after it
+and typing \\[eval-last-sexp].
+
+Once you have done that, you have to explicitly upgrade `seq':
+
+  \\[package-upgrade] seq \\`RET'
+
+Then you also must make sure the updated version is loaded,
+by evaluating this form:
+
+  (progn (unload-feature 'seq t) (require 'seq))
+
+Until you do this, you will get random errors about `seq-keep'
+being undefined while using Transient.
+
+If you don't use the `package' package manager but still get
+this warning, then your chosen package manager likely has a
+similar defect.") :emergency))
+
+(eval-when-compile (require 'subr-x))
+
+(declare-function info "info" (&optional file-or-node buffer))
+(declare-function Man-find-section "man" (section))
+(declare-function Man-next-section "man" (n))
+(declare-function Man-getpage-in-background "man" (topic))
+
+(defvar Man-notify-method)
+(defvar pp-default-function) ; since Emacs 29.1
+
+(define-obsolete-variable-alias
+  'transient-show-popup
+  'transient-show-menu
+  "transient 0.13.0")
+
+(define-obsolete-variable-alias
+  'transient-enable-popup-navigation
+  'transient-enable-menu-navigation
+  "transient 0.13.0")
+
+(defvar transient-common-command-prefix)
+
+(defmacro transient--with-emergency-exit (id &rest body)
+  (declare (indent defun))
+  (unless (keywordp id)
+    (setq body (cons id body))
+    (setq id nil))
+  `(condition-case err
+       (let ((debugger #'transient--exit-and-debug))
+         ,(macroexp-progn body))
+     ((debug error)
+      (transient--emergency-exit ,id)
+      (static-if (version< emacs-version "31.0.50")
+          (signal (car err) (cdr err))
+        (condition-case nil
+            (signal err)
+          (wrong-number-of-arguments
+           (signal (car err) (cdr err))))))))
+
+(defun transient--exit-and-debug (&rest args)
+  (transient--emergency-exit :debugger)
+  (apply #'debug args))
+
+;;; Options
+
+(defgroup transient nil
+  "Transient commands."
+  :group 'extensions)
+
+(defcustom transient-show-menu t
+  "Whether and when to show transient's menu in a buffer.
+
+\\<transient-map>\
+- If t (the default), then show the buffer as soon as a transient
+  prefix command is invoked.
+
+- If nil, then do not show the buffer unless the user explicitly
+  requests it, by pressing \\[transient-show] or a prefix key.
+
+- If a number, then delay displaying the buffer and instead show
+  a brief one-line summary.  If zero or negative, then suppress
+  even showing that summary and display the pressed key only.
+
+  Show the buffer once the user explicitly requests it by pressing
+  \\[transient-show] or a prefix key.  Unless zero, then also show the buffer
+  after that many seconds of inactivity (using the absolute value)."
+  :package-version '(transient . "0.1.0")
+  :group 'transient
+  :type '(choice (const  :tag "Instantly" t)
+                 (const  :tag "On demand" nil)
+                 (const  :tag "On demand (no summary)" 0)
+                 (number :tag "After delay" 1)))
+
+(defcustom transient-enable-menu-navigation 'verbose
+  "Whether navigation commands are enabled in the menu buffer.
+
+If the value is `verbose' (the default), show additional documentation
+about the command at point in the echo area.  If this would result in
+the same documentation, which is being displayed inside the menu buffer,
+to be duplicated in the echo area, then `verbose' forgoes doing so.
+Use `force-verbose' to echo even such documentation.  If `t', enable
+navigation, but without echoing any documentation.
+
+While a transient is active, the menu buffer is (by default) not the
+current buffer, making it necessary to use dedicated commands to act
+on that buffer itself.  If this option is non-nil, then the following
+bindings are available:
+
+\\<transient-popup-navigation-map>\
+- \\[transient-backward-button] moves the cursor to the previous suffix.
+- \\[transient-forward-button] moves the cursor to the next suffix.
+- \\[transient-push-button] invokes the suffix the cursor is on.
+- \\`<mouse-1>' and \\`<mouse-2>' invoke the clicked on suffix.
+- \\[transient-isearch-backward]\
+ and \\[transient-isearch-forward] start isearch in the menu buffer.
+
+\\`<mouse-1>' and \\`<mouse-2>' are bound in `transient-button-map'.
+All other bindings are in `transient-popup-navigation-map'.
+
+Instead of \\`RET', \\`M-RET' is used to invoke the suffix command at point by
+default, because if a transient allows the invocation of non-suffixes,
+then it is likely that the user would want the former do what it would
+do if no transient were active."
+  :package-version '(transient . "0.7.8")
+  :group 'transient
+  :type
+  '(choice
+    (const :tag "Enable navigation and force showing summary" force-verbose)
+    (const :tag "Enable navigation and enable showing summary" verbose)
+    (const :tag "Enable navigation commands" t)
+    (const :tag "Disable navigation commands" nil)))
+
+(defcustom transient-navigate-to-group-descriptions nil
+  "Whether menu navigation commands stop at group descriptions.
+
+If `transient-enable-menu-navigation' is non-nil, which it is by default,
+\\<transient-popup-navigation-map>\
+then \\[transient-backward-button] and \\[transient-forward-button] move \
+from suffix to suffix.  When this option is
+non-nil as well, then they additionally stop at group descriptions.  This
+is useful for visually impaired users, who use a braille or audio output
+device."
+  :package-version '(transient . "0.13.0")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-describe-menu nil
+  "Whether to begin the menu buffer with a very short description.
+
+When this is non-nil, then the menu buffer begins with a short
+description.  Ideally this is a string written exactly for that
+purpose, but because this is a new feature, most menu commands
+do not provide that yet.  In that case the first line of the prefix
+command's docstring is used as fallback.  If the value is `docstring',
+then the docstring is used even if a description is available."
+  :package-version '(transient . "0.13.0")
+  :group 'transient
+  :type '(choice (const :tag "Insert description" t)
+                 (const :tag "Insert docstring summary" docstring)
+                 (const :tag "Do not insert description" nil)))
+
+(defcustom transient-select-menu-window nil
+  "Whether to select the window displaying the transient menu.
+
+Enabling this is discouraged, except for users of braille output
+devises.  Note that enabling this, or alternatively selecting the
+menu window on demand, are both unnecessary, to be able to move
+the cursor in the menu.  See `transient-enable-menu-navigation'."
+  :package-version '(transient . "0.13.0")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-display-buffer-action
+  '(display-buffer-in-side-window
+    (side . bottom)
+    (dedicated . t)
+    (inhibit-same-window . t))
+  "The action used to display transient's menu buffer.
+
+The transient menu buffer is displayed in a window using
+
+  (display-buffer BUFFER transient-display-buffer-action)
+
+The value of this option has the form (FUNCTION . ALIST),
+where FUNCTION is a function or a list of functions.  Each such
+function should accept two arguments: a buffer to display and an
+alist of the same form as ALIST.  See info node `(elisp)Choosing
+Window' for details.
+
+The default is:
+
+  (display-buffer-in-side-window
+    (side . bottom)
+    (dedicated . t)
+    (inhibit-same-window . t))
+
+This displays the window at the bottom of the selected frame.
+For alternatives see info node `(elisp)Display Action Functions'
+and info node `(elisp)Buffer Display Action Alists'.
+
+When you switch to a different ACTION, you should keep the ALIST
+entries for `dedicated' and `inhibit-same-window' in most cases.
+Do not drop them because you are unsure whether they are needed;
+if you are unsure, then keep them.
+
+Note that the buffer that was current before the transient buffer
+is shown should remain the current buffer.  Many suffix commands
+act on the thing at point, if appropriate, and if the transient
+buffer became the current buffer, then that would change what is
+at point.  To that effect `inhibit-same-window' ensures that the
+selected window is not used to show the transient buffer.
+
+The use of a horizontal split to display the menu window can lead
+to incompatibilities and is thus discouraged.  Transient tries to
+mitigate such issue but cannot proactively deal with all possible
+configurations and combinations of third-party packages.
+
+It may be possible to display the window in another frame, but
+whether that works in practice depends on the window-manager.
+If the window manager selects the new window (Emacs frame),
+then that unfortunately changes which buffer is current.
+
+If you change the value of this option, then you might also
+want to change the value of `transient-mode-line-format'."
+  :package-version '(transient . "0.7.5")
+  :group 'transient
+  :type '(cons (choice function (repeat :tag "Functions" function))
+               alist))
+
+(defcustom transient-minimal-frame-width 83
+  "Minimal width of dedicated frame used to display transient menu.
+
+This is only used if the transient menu is actually displayed in a
+dedicated frame (see `transient-display-buffer-action').  The value
+is in characters."
+  :package-version '(transient . "0.8.1")
+  :group 'transient
+  :type 'natnum)
+
+(defcustom transient-mode-line-format 'line
+  "The mode-line format for transient's menu buffer.
+
+If nil, then the buffer has no mode-line.  If the buffer is not
+displayed right above the echo area, then this probably is not
+a good value.
+
+If `line' (the default) or a natural number, then the buffer has no
+mode-line, but a line is drawn in its place.  If a number is used,
+that specifies the thickness of the line.  On termcap frames we
+cannot draw lines, so there `line' and numbers are synonyms for nil.
+
+The color of the line is used to indicate if non-suffixes are
+allowed and whether they exit the transient.  The foreground
+color of `transient-key-noop' (if non-suffixes are disallowed),
+`transient-key-stay' (if allowed and transient stays active), or
+`transient-key-exit' (if allowed and they exit the transient) is
+used to draw the line.
+
+Otherwise this can be any mode-line format.
+See `mode-line-format' for details."
+  :package-version '(transient . "0.2.0")
+  :group 'transient
+  :type '(choice (const  :tag "Hide mode-line" nil)
+                 (const  :tag "Substitute thin line" line)
+                 (number :tag "Substitute line with thickness")
+                 (const  :tag "Name of prefix command"
+                         ("%e" mode-line-front-space
+                          mode-line-buffer-identification))
+                 (sexp   :tag "Custom mode-line format")))
+
+(defcustom transient-show-common-commands nil
+  "Whether to permanently show common suffix commands in transient menus.
+
+By default these commands are only temporarily shown after typing their
+shared prefix key \
+\\<transient--docstr-hint-1>\\[transient-common-command-prefix], \
+while a transient menu is active.  When the value
+of this option is non-nil, then these commands are permanently shown.
+To toggle the value for the current Emacs session only type \
+\\<transient--docstr-hint-2>\\[transient-toggle-common] while
+any transient menu is active."
+  :package-version '(transient . "0.1.0")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-show-during-minibuffer-read nil
+  "Whether to show the transient menu while reading in the minibuffer.
+
+This is only relevant to commands that do not close the menu, such as
+commands that set infix arguments.  If a command exits the menu, and
+uses the minibuffer, then the menu is always closed before the
+minibuffer is entered, irrespective of the value of this option.
+
+When nil (the default), hide the menu while the minibuffer is in use.
+When t, keep showing the menu, but allow for the menu window to be
+resized, to ensure that completion candidates can be displayed.
+
+When `fixed', keep showing the menu and prevent it from being resized,
+which may make it impossible to display the completion candidates.  If
+that ever happens for you, consider using t or an integer, as described
+below.
+
+If the value is `fixed' and the menu window uses the full height of its
+frame, then the former is ignored and resizing is allowed anyway.  This
+is necessary because individual menus may use unusual display actions
+different from what `transient-display-buffer-action' specifies (likely
+to display that menu in a side-window).
+
+When using a third-party mode, which automatically resizes windows
+\(e.g., by calling `balance-windows' on `post-command-hook'), then
+`fixed' (or nil) is likely a better choice than t.
+
+The value can also be an integer, in which case the behavior depends on
+whether at least that many lines are left to display windows other than
+the menu window.  If that is the case, display the menu and preserve the
+size of that window.  Otherwise, allow resizing the menu window if the
+number is positive, or hide the menu if it is negative."
+  :package-version '(transient . "0.8.0")
+  :group 'transient
+  :type '(choice
+          (const :tag "Hide menu" nil)
+          (const :tag "Show menu and preserve size" fixed)
+          (const :tag "Show menu and allow resizing" t)
+          (natnum :tag "Show menu, allow resizing if less than N lines left"
+                  :format "\n   %t: %v"
+                  :value 20)
+          (integer :tag "Show menu, except if less than N lines left"
+                   :format "\n   %t: %v"
+                   :value -20)))
+
+(defcustom transient-show-docstring-format "%s"
+  "How to display suffix docstrings.
+
+The command `transient-toggle-docstrings' toggles between showing suffix
+descriptions as usual, and instead or additionally displaying the suffix
+docstrings.  The format specified here controls how that is done.  %c is
+the description and %s is the docstring.  Use \"%-14c %s\" or similar to
+display both.
+
+This command is not bound by default, see its docstring for instructions."
+  :package-version '(transient . "0.8.4")
+  :group 'transient
+  :type 'string)
+
+(defcustom transient-read-with-initial-input nil
+  "Whether to use the last history element as initial minibuffer input."
+  :package-version '(transient . "0.2.0")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-prefer-reading-value nil
+  "Whether to prefer reading new value over other value selection methods.
+
+If this is nil (the default), then certain arguments are directly
+disabled when they are invoked, while they have a non-nil value.  I.e.,
+to switch from one non-nil value to another non-nil value, such commands
+have to be invoked twice.  For other arguments, which happen to have a
+small set of possible values, all values are displayed at all times,
+using solely coloring to indicate which of the values is active.  When
+such an infix command is invoked it cycles to the next value.
+
+This default does not work for visually impaired user.  If this option
+is non-nil, then more arguments immediately read the new value, instead
+of being toggled off on first invocation, or instead of cycling through
+values.
+
+If you enable this, then `transient-use-accessible-values' should also
+be enabled."
+  :package-version '(transient . "0.13.0")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-highlight-mismatched-keys nil
+  "Whether to highlight keys that do not match their argument.
+
+This is mostly intended for authors of transient menus and disabled by
+default.
+
+This only affects infix arguments that represent command-line arguments.
+When this option is non-nil, then the key binding for infix argument are
+highlighted when only a long argument \(e.g., \"--verbose\") is specified
+but no shorthand (e.g., \"-v\"). In the rare case that a short-hand is
+specified but does not match the key binding, then it is highlighted
+differently.
+
+The highlighting is done using `transient-mismatched-key'
+and `transient-nonstandard-key'."
+  :package-version '(transient . "0.1.0")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-highlight-higher-levels nil
+  "Whether to highlight suffixes on higher levels.
+
+This is primarily intended for package authors.
+
+When non-nil then highlight the description of suffixes whose
+level is above 4, the default of `transient-default-level'.
+Assuming you have set that variable to 7, this highlights all
+suffixes that won't be available to users without them making
+the same customization."
+  :package-version '(transient . "0.3.6")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-substitute-key-function nil
+  "Function used to modify key bindings.
+
+This function is called with one argument, the prefix object,
+and must return a key binding description, either the existing
+key description it finds in the `key' slot, or a substitution.
+
+This is intended to let users replace certain prefix keys.  It
+could also be used to make other substitutions, but that is
+discouraged.
+
+For example, \"=\" is hard to reach using my custom keyboard
+layout, so I substitute \"(\" for that, which is easy to reach
+using a layout optimized for Lisp.
+
+  (setq transient-substitute-key-function
+        (lambda (obj)
+          (let ((key (oref obj key)))
+            (if (string-match \"\\\\`\\\\(=\\\\)[a-zA-Z]\" key)
+                (replace-match \"(\" t t key 1)
+              key)))))"
+  :package-version '(transient . "0.1.0")
+  :group 'transient
+  :type '(choice (const :tag "Transform no keys (nil)" nil) function))
+
+(defcustom transient-semantic-coloring t
+  "Whether to use colors to indicate transient behavior.
+
+If non-nil, then the key binding of each suffix is colorized to
+indicate whether it exits the transient state or not, and the
+line that is drawn below transient's menu buffer is used to
+indicate the behavior of non-suffix commands."
+  :package-version '(transient . "0.5.0")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-detect-key-conflicts nil
+  "Whether to detect key binding conflicts.
+
+Conflicts are detected when a transient prefix command is invoked
+and results in an error, which prevents the transient from being
+used."
+  :package-version '(transient . "0.1.0")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-error-on-insert-failure nil
+  "Whether to signal an error when failing to insert a suffix.
+
+When `transient-insert-suffix' and `transient-append-suffix' fail
+to insert a suffix into an existing prefix, they usually just show
+a warning.  If this is non-nil, they signal an error instead."
+  :package-version '(transient . "0.8.8")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-align-variable-pitch nil
+  "Whether to align columns pixel-wise in the menu buffer.
+
+If this is non-nil, then columns are aligned pixel-wise to
+support variable-pitch fonts.  Keys are not aligned, so you
+should use a fixed-pitch font for the `transient-key' face.
+Other key faces inherit from that face unless a theme is
+used that breaks that relationship.
+
+This option is intended for users who use a variable-pitch
+font for the `default' face.
+
+See also `transient-force-fixed-pitch'."
+  :package-version '(transient . "0.4.0")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-force-fixed-pitch nil
+  "Whether to force use of monospaced font in the menu buffer.
+
+Even if you use a proportional font for the `default' face,
+you might still want to use a monospaced font in transient's
+menu buffer.  Setting this option to t causes `default' to
+be remapped to `fixed-pitch' in that buffer.
+
+See also `transient-align-variable-pitch'."
+  :package-version '(transient . "0.2.0")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-force-single-column nil
+  "Whether to force use of a single column to display suffixes.
+
+This might be useful for users with low vision who use large text
+and might otherwise have to scroll in two dimensions. This is also
+useful for blind users, because it causes suffixes to be navigated
+in a more natural order."
+  :package-version '(transient . "0.3.6")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-use-accessible-values nil
+  "Whether to show values in a way that does not rely on coloring.
+
+If this is nil (the default), then colors are used to communicate the
+state of arguments.  For certain argument types the state is solely
+communicated that way.  For example, an enabled command-line switch is
+shown using some bright color, and disabling that argument, changes the
+color to gray, without otherwise changing the displayed text.
+
+This default does not work for visually impaired user.  If this option
+is non-nil, then the state is additionally communicated through other
+means.  A switch, for example, is either followed by \"is enabled\" or
+\"is disabled\".  How exactly the state is communicated depends on the
+type of the infix command.
+
+Note that packages, which use Transient, can define their own infix
+command types, which may or may not involve overriding Transient's
+code, which honors this new option.  I.e., it will take some time until
+everything respects this setting.
+
+If you enable this, then `transient-prefer-reading-value' should also
+be enabled.  Also consider enabling `transient-use-accessible-formats'."
+  :package-version '(transient . "0.13.0")
+  :group 'transient
+  :type 'boolean)
+
+(defcustom transient-use-accessible-formats nil
+  "Whether to use a more accessible format strings for menu elements.
+
+If this is non-nil, then menu elements are displayed in a way, that I
+hope, is more suitable for visually impaired users than the default.
+Please provide feedback, so that we can together work on improving this.
+
+By default the format specified by an element's `format' slot is used.
+When this is non-nil, then the `accessible-format' slot is used instead.
+One change implemented in the latter is that for an element representing
+a command-line argument, the argument and its value are moved before the
+description, giving quicker access to the current state, while still
+allowing users to read the description, in case they don't know yet what
+the argument in question does.
+
+Enabling this also causes the string \"inapt\" to be added at the very
+beginning of the text describing a command that currently cannot be
+used.  When using the default format, the only visual clue that a
+command is inapt, is that the complete text representing it is grayed
+out.  (As an example of such an inapt command, consider the case of a
+commands that can only act on the file at point, when there currently
+isn't a file at point.)  Placing the string \"inapt\" at the very
+beginning gives users the opportunity to immediately skip over unusable
+commands, while still giving them the opportunity to read on.
+
+Also consider enabling `transient-use-accessible-values'."
+  :package-version '(transient . "0.13.0")
+  :group 'transient
+  :type 'boolean)
+
+(defconst transient--max-level 7)
+(defconst transient--default-child-level 1)
+(defconst transient--default-prefix-level 4)
+
+(defcustom transient-default-level transient--default-prefix-level
+  "Control what suffix levels are made available by default.
+
+Each suffix command is placed on a level and each prefix command
+has a level, which controls which suffix commands are available.
+Integers between 1 and 7 (inclusive) are valid levels.
+
+The levels of individual transients and/or their individual
+suffixes can be changed individually, by invoking the prefix and
+then pressing \\<transient--docstr-hint-2>\\[transient-set-level].
+
+The default level for both transients and their suffixes is 4.
+This option only controls the default for transients.  The default
+suffix level is always 4.  The author of a transient should place
+certain suffixes on a higher level if they expect that it won't be
+of use to most users, and they should place very important suffixes
+on a lower level so that they remain available even if the user
+lowers the transient level.
+
+\(Magit currently places nearly all suffixes on level 4 and lower
+levels are not used at all yet.  So for the time being you should
+not set a lower level here and using a higher level might not
+give you as many additional suffixes as you hoped.)"
+  :package-version '(transient . "0.1.0")
+  :group 'transient
+  :type '(choice (const :tag "1 - fewest suffixes" 1)
+                 (const 2)
+                 (const 3)
+                 (const :tag "4 - default" 4)
+                 (const 5)
+                 (const 6)
+                 (const :tag "7 - most suffixes" 7)))
+
+(defcustom transient-levels-file
+  (locate-user-emacs-file "transient/levels.el")
+  "File used to save levels of transients and their suffixes."
+  :package-version '(transient . "0.1.0")
+  :group 'transient
+  :type 'file)
+
+(defcustom transient-values-file
+  (locate-user-emacs-file "transient/values.el")
+  "File used to save values of transients."
+  :package-version '(transient . "0.1.0")
+  :group 'transient
+  :type 'file)
+
+(defcustom transient-history-file
+  (locate-user-emacs-file "transient/history.el")
+  "File used to save history of transients and their infixes."
+  :package-version '(transient . "0.1.0")
+  :group 'transient
+  :type 'file)
+
+(defcustom transient-history-limit 10
+  "Number of history elements to keep when saving to file."
+  :package-version '(transient . "0.1.0")
+  :group 'transient
+  :type 'integer)
+
+(defcustom transient-save-history t
+  "Whether to save history of transient commands when exiting Emacs."
+  :package-version '(transient . "0.1.0")
+  :group 'transient
+  :type 'boolean)
+
+;;; Faces
+
+(defgroup transient-faces nil
+  "Faces used by Transient."
+  :group 'transient)
+
+(defface transient-heading '((t :inherit font-lock-keyword-face))
+  "Face used for headings."
+  :group 'transient-faces)
+
+(defface transient-argument '((t :inherit font-lock-string-face :weight bold))
+  "Face used for enabled arguments."
+  :group 'transient-faces)
+
+(defface transient-inactive-argument '((t :inherit shadow))
+  "Face used for inactive arguments."
+  :group 'transient-faces)
+
+(defface transient-inapt-argument '((t :inherit shadow :weight bold))
+  "Face used for inapt arguments with a (currently ignored) value.
+Depending on the type this is used for the argument and/or value."
+  :group 'transient-faces)
+
+(defface transient-value '((t :inherit font-lock-string-face :weight bold))
+  "Face used for values."
+  :group 'transient-faces)
+
+(defface transient-inactive-value '((t :inherit shadow))
+  "Face used for inactive values."
+  :group 'transient-faces)
+
+(defface transient-unreachable '((t :inherit shadow))
+  "Face used for suffixes unreachable from the current prefix sequence."
+  :group 'transient-faces)
+
+(defface transient-inapt-suffix '((t :inherit shadow :slant italic))
+  "Face used for suffixes that are inapt at this time."
+  :group 'transient-faces)
+
+(defface transient-active-infix '((t :inherit highlight))
+  "Face used for the infix for which the value is being read."
+  :group 'transient-faces)
+
+(defface transient-enabled-suffix
+  '((t :background "green" :foreground "black" :weight bold))
+  "Face used for enabled levels while editing suffix levels.
+See info node `(transient)Enabling and Disabling Suffixes'."
+  :group 'transient-faces)
+
+(defface transient-disabled-suffix
+  '((t :background "red" :foreground "black" :weight bold))
+  "Face used for disabled levels while editing suffix levels.
+See info node `(transient)Enabling and Disabling Suffixes'."
+  :group 'transient-faces)
+
+(defface transient-higher-level
+  (let* ((color (face-attribute 'shadow :foreground t t))
+         (color (if (eq color 'unspecified) "grey60" color)))
+    `((t :box (:line-width (-1 . -1) :color ,color))))
+  "Face optionally used to highlight suffixes on higher levels.
+See also option `transient-highlight-higher-levels'."
+  :group 'transient-faces)
+
+(defface transient-delimiter '((t :inherit shadow))
+  "Face used for delimiters and separators.
+This includes the parentheses around values and the pipe
+character used to separate possible values from each other."
+  :group 'transient-faces)
+
+(defface transient-key '((t :inherit font-lock-builtin-face))
+  "Face used for keys."
+  :group 'transient-faces)
+
+(defface transient-key-stay
+  `((((class color) (background light))
+     :inherit transient-key
+     :foreground "#22aa22")
+    (((class color) (background dark))
+     :inherit transient-key
+     :foreground "#ddffdd"))
+  "Face used for keys of suffixes that don't exit the menu."
+  :group 'transient-faces)
+
+(defface transient-key-noop
+  `((((class color) (background light))
+     :inherit transient-key
+     :foreground "grey80")
+    (((class color) (background dark))
+     :inherit transient-key
+     :foreground "grey30"))
+  "Face used for keys of suffixes that currently cannot be invoked."
+  :group 'transient-faces)
+
+(defface transient-key-return
+  `((((class color) (background light))
+     :inherit transient-key
+     :foreground "#aaaa11")
+    (((class color) (background dark))
+     :inherit transient-key
+     :foreground "#ffffcc"))
+  "Face used for keys of suffixes that return to the parent menu."
+  :group 'transient-faces)
+
+(defface transient-key-recurse
+  `((((class color) (background light))
+     :inherit transient-key
+     :foreground "#2266ff")
+    (((class color) (background dark))
+     :inherit transient-key
+     :foreground "#2299ff"))
+  "Face used for keys of sub-menus whose suffixes return to the parent menu."
+  :group 'transient-faces)
+
+(defface transient-key-stack
+  `((((class color) (background light))
+     :inherit transient-key
+     :foreground "#dd4488")
+    (((class color) (background dark))
+     :inherit transient-key
+     :foreground "#ff6699"))
+  "Face used for keys of sub-menus that exit the parent menu."
+  :group 'transient-faces)
+
+(defface transient-key-exit
+  `((((class color) (background light))
+     :inherit transient-key
+     :foreground "#aa2222")
+    (((class color) (background dark))
+     :inherit transient-key
+     :foreground "#ffdddd"))
+  "Face used for keys of suffixes that exit the menu."
+  :group 'transient-faces)
+
+(defface transient-unreachable-key
+  '((t :inherit (shadow transient-key) :weight normal))
+  "Face used for keys unreachable from the current prefix sequence."
+  :group 'transient-faces)
+
+(defface transient-nonstandard-key
+  `((t :box (:line-width (-1 . -1) :color "cyan")))
+  "Face optionally used to highlight keys conflicting with short-argument.
+See also option `transient-highlight-mismatched-keys'."
+  :group 'transient-faces)
+
+(defface transient-mismatched-key
+  `((t :box (:line-width (-1 . -1) :color "magenta")))
+  "Face optionally used to highlight keys without a short-argument.
+See also option `transient-highlight-mismatched-keys'."
+  :group 'transient-faces)
+
+;;; Persistence
+
+(defun transient--read-file-contents (file)
+  (with-demoted-errors "Transient error: %S"
+    (and (file-exists-p file)
+         (with-temp-buffer
+           (insert-file-contents file)
+           (read (current-buffer))))))
+
+(defun transient--pp-to-file (value file)
+  (when (or value (file-exists-p file))
+    (make-directory (file-name-directory file) t)
+    (setq value (compat-call sort (copy-sequence value)
+                             :lessp #'string< :key #'car))
+    (with-temp-file file
+      (let ((print-level nil)
+            (print-length nil)
+            (pp-default-function 'pp-28)
+            (fill-column 999))
+        (pp value (current-buffer))))))
+
+(defvar transient-values
+  (transient--read-file-contents transient-values-file)
+  "Values of transient commands.
+The value of this variable persists between Emacs sessions
+and you usually should not change it manually.")
+
+(defun transient-save-values ()
+  (transient--pp-to-file transient-values transient-values-file))
+
+(defvar transient-levels
+  (transient--read-file-contents transient-levels-file)
+  "Levels of transient commands.
+The value of this variable persists between Emacs sessions
+and you usually should not change it manually.")
+
+(defun transient-save-levels ()
+  (transient--pp-to-file transient-levels transient-levels-file))
+
+(defvar transient-history
+  (transient--read-file-contents transient-history-file)
+  "History of transient commands and infix arguments.
+The value of this variable persists between Emacs sessions
+\(unless `transient-save-history' is nil) and you usually
+should not change it manually.")
+
+(defun transient-save-history ()
+  (setq transient-history
+        (compat-call sort
+                     (mapcar (pcase-lambda (`(,key . ,val))
+                               (cons key (take transient-history-limit
+                                               (delete-dups val))))
+                             transient-history)
+                     :lessp #'string< :key #'car))
+  (transient--pp-to-file transient-history transient-history-file))
+
+(defun transient-maybe-save-history ()
+  "Save the value of `transient-history'.
+If `transient-save-history' is nil, then do nothing."
+  (when transient-save-history
+    (with-demoted-errors "Error saving transient history: %S"
+      (transient-save-history))))
+
+(unless noninteractive
+  (add-hook 'kill-emacs-hook #'transient-maybe-save-history))
+
+;;; Classes
+;;;; Base
+
+(defclass transient-object () () :abstract t)
+
+;;;; Prefix
+
+(defclass transient-prefix (transient-object)
+  ((prototype   :initarg :prototype)
+   (command     :initarg :command)
+   (level       :initarg :level)
+   (init-value  :initarg :init-value)
+   (value) (default-value :initarg :value)
+   (return      :initarg :return      :initform nil)
+   (scope       :initarg :scope       :initform nil)
+   (history     :initarg :history     :initform nil)
+   (history-pos :initarg :history-pos :initform 0)
+   (history-key :initarg :history-key :initform nil)
+   (description :initarg :description :initform nil)
+   (show-help   :initarg :show-help   :initform nil)
+   (info-manual :initarg :info-manual :initform nil)
+   (man-page    :initarg :man-page    :initform nil)
+   (summary     :initarg :summary     :initform nil)
+   (transient-suffix     :initarg :transient-suffix     :initform nil)
+   (transient-non-suffix :initarg :transient-non-suffix :initform nil)
+   (transient-switch-frame :initarg :transient-switch-frame)
+   (refresh-suffixes     :initarg :refresh-suffixes     :initform nil)
+   (remember-value       :initarg :remember-value       :initform nil)
+   (environment          :initarg :environment          :initform nil)
+   (incompatible         :initarg :incompatible         :initform nil)
+   (suffix-description   :initarg :suffix-description)
+   (display-action       :initarg :display-action       :initform nil)
+   (mode-line-format     :initarg :mode-line-format)
+   (variable-pitch       :initarg :variable-pitch       :initform nil)
+   (column-widths        :initarg :column-widths        :initform nil)
+   (unwind-suffix        :documentation "Internal use." :initform nil))
+  "Transient prefix command.
+
+Each transient prefix command consists of a command, which is
+stored in a symbol's function slot and an object, which is
+stored in the `transient--prefix' property of the same symbol.
+
+When a transient prefix command is invoked, then a clone of that
+object is stored in the global variable `transient--prefix' and
+the prototype is stored in the clone's `prototype' slot.")
+
+;;;; Suffix
+
+(defclass transient-child (transient-object)
+  ((parent
+    :initarg :parent
+    :initform nil
+    :documentation "The parent group object.")
+   (level
+    :initarg :level
+    :initform nil
+    :documentation "Enable if level of prefix is equal or greater.")
+   (inactive
+    :initform nil)
+   (if
+    :initarg :if
+    :initform nil
+    :documentation "Enable if predicate returns non-nil.")
+   (if-not
+    :initarg :if-not
+    :initform nil
+    :documentation "Enable if predicate returns nil.")
+   (if-non-nil
+    :initarg :if-non-nil
+    :initform nil
+    :documentation "Enable if variable's value is non-nil.")
+   (if-nil
+    :initarg :if-nil
+    :initform nil
+    :documentation "Enable if variable's value is nil.")
+   (if-mode
+    :initarg :if-mode
+    :initform nil
+    :documentation "Enable if major-mode matches value.")
+   (if-not-mode
+    :initarg :if-not-mode
+    :initform nil
+    :documentation "Enable if major-mode does not match value.")
+   (if-derived
+    :initarg :if-derived
+    :initform nil
+    :documentation "Enable if major-mode derives from value.")
+   (if-not-derived
+    :initarg :if-not-derived
+    :initform nil
+    :documentation "Enable if major-mode does not derive from value.")
+   (inapt
+    :initform nil)
+   (inapt-face
+    :initarg :inapt-face
+    :initform 'transient-inapt-suffix)
+   (inapt-if
+    :initarg :inapt-if
+    :initform nil
+    :documentation "Inapt if predicate returns non-nil.")
+   (inapt-if-not
+    :initarg :inapt-if-not
+    :initform nil
+    :documentation "Inapt if predicate returns nil.")
+   (inapt-if-non-nil
+    :initarg :inapt-if-non-nil
+    :initform nil
+    :documentation "Inapt if variable's value is non-nil.")
+   (inapt-if-nil
+    :initarg :inapt-if-nil
+    :initform nil
+    :documentation "Inapt if variable's value is nil.")
+   (inapt-if-mode
+    :initarg :inapt-if-mode
+    :initform nil
+    :documentation "Inapt if major-mode matches value.")
+   (inapt-if-not-mode
+    :initarg :inapt-if-not-mode
+    :initform nil
+    :documentation "Inapt if major-mode does not match value.")
+   (inapt-if-derived
+    :initarg :inapt-if-derived
+    :initform nil
+    :documentation "Inapt if major-mode derives from value.")
+   (inapt-if-not-derived
+    :initarg :inapt-if-not-derived
+    :initform nil
+    :documentation "Inapt if major-mode does not derive from value.")
+   (advice
+    :initarg :advice
+    :initform nil
+    :documentation "Advise applied to the command body.")
+   (advice*
+    :initarg :advice*
+    :initform nil
+    :documentation "Advise applied to the command body and interactive spec.")
+   (summary
+    :initarg :summary
+    :initform nil))
+  "Abstract superclass for group and suffix classes.
+
+It is undefined which predicates are used if more than one `if*'
+predicate slots or more than one `inapt-if*' slots are non-nil."
+  :abstract t)
+
+(defclass transient-suffix (transient-child)
+  ((definition  :allocation :class    :initform nil)
+   (key         :initarg :key)
+   (command     :initarg :command)
+   (transient   :initarg :transient)
+   (format      :initarg :format      :initform " %k %d")
+   (accessible-format
+    :initarg :accessible-format       :initform "%i%k %d")
+   (description :initarg :description :initform nil)
+   (face        :initarg :face        :initform nil)
+   (show-help   :initarg :show-help   :initform nil))
+  "Superclass for suffix command.")
+
+(defclass transient-information (transient-suffix)
+  ((key :initform " "))
+  "Display-only information, aligned with suffix keys.
+Technically a suffix object with no associated command.")
+
+(defclass transient-information* (transient-information)
+  ((format :initform " %d"))
+  "Display-only information, aligned with suffix descriptions.
+Technically a suffix object with no associated command.")
+
+(defclass transient-infix (transient-suffix)
+  ((transient                         :initform t)
+   (argument    :initarg :argument)
+   (shortarg    :initarg :shortarg)
+   (claim-argument
+    :initarg :claim-argument          :initform nil)
+   (value                             :initform nil)
+   (init-value  :initarg :init-value)
+   (unsavable   :initarg :unsavable   :initform nil)
+   (multi-value :initarg :multi-value :initform nil)
+   (always-read :initarg :always-read :initform nil)
+   (allow-empty :initarg :allow-empty :initform nil)
+   (history-key :initarg :history-key :initform nil)
+   (reader      :initarg :reader      :initform nil)
+   (prompt      :initarg :prompt      :initform nil)
+   (choices     :initarg :choices     :initform nil)
+   (format                            :initform " %k %d (%v)")
+   (accessible-format                 :initform "%i%k %v (%d)"))
+  "Transient infix command."
+  :abstract t)
+
+(defclass transient-argument (transient-infix) ()
+  "Abstract superclass for infix arguments."
+  :abstract t)
+
+(defclass transient-switch (transient-argument) ()
+  "Class used for command-line argument that can be turned on and off.")
+
+(defclass transient-option (transient-argument) ()
+  "Class used for command-line argument that can take a value.")
+
+(defclass transient-variable (transient-infix)
+  ((variable    :initarg :variable)
+   (format                            :initform " %k %d %v")
+   (accessible-format                 :initform "%i%k %v (%d)"))
+  "Abstract superclass for infix commands that set a variable."
+  :abstract t)
+
+(defclass transient-switches (transient-argument)
+  ((argument-format  :initarg :argument-format)
+   (argument-regexp  :initarg :argument-regexp))
+  "Class used for sets of mutually exclusive command-line switches.")
+
+(defclass transient-files (transient-option) ()
+  ((key         :initform "--")
+   (argument    :initform "--")
+   (multi-value :initform rest)
+   (reader      :initform transient-read-files))
+  "Class used for the \"--\" argument or similar.
+All remaining arguments are treated as files.
+They become the value of this argument.")
+
+(defclass transient-value-preset (transient-suffix)
+  ((transient :initform t)
+   (set :initarg := :initform nil))
+  "Class used by the `transient-preset' suffix command.")
+
+(defclass transient-describe-target (transient-suffix)
+  ((transient :initform #'transient--do-suspend)
+   (helper :initarg :helper :initform nil)
+   (target :initarg := :initform nil))
+  "Class used by the `transient-describe' suffix command.")
+
+;;;; Group
+
+(defclass transient-group (transient-child)
+  ((suffixes       :initarg :suffixes       :initform nil)
+   (hide           :initarg :hide           :initform nil)
+   (description    :initarg :description    :initform nil)
+   (pad-keys       :initarg :pad-keys       :initform nil)
+   (info-format    :initarg :info-format    :initform nil)
+   (setup-children :initarg :setup-children))
+  "Abstract superclass of all group classes."
+  :abstract t)
+
+(defclass transient-column (transient-group) ()
+  "Group class that displays each element on a separate line.")
+
+(defclass transient-row (transient-group) ()
+  "Group class that displays all elements on a single line.")
+
+(defclass transient-columns (transient-group) ()
+  "Group class that displays elements organized in columns.
+Direct elements have to be groups whose elements have to be
+commands or strings.  Each subgroup represents a column.
+This class takes care of inserting the subgroups' elements.")
+
+(defclass transient-subgroups (transient-group) ()
+  "Group class that wraps other groups.
+
+Direct elements have to be groups whose elements have to be
+commands or strings.  This group inserts an empty line between
+subgroups.  The subgroups are responsible for displaying their
+elements themselves.")
+
+;;; Define
+
+(defmacro transient-define-prefix (name arglist &rest args)
+  "Define NAME as a transient prefix command.
+
+ARGLIST are the arguments that command takes.
+DOCSTRING is the documentation string and is optional.
+
+These arguments can optionally be followed by key-value pairs.
+Each key has to be a keyword symbol, either `:class' or a keyword
+argument supported by the constructor of that class.  The
+`transient-prefix' class is used if the class is not specified
+explicitly.
+
+GROUPs add key bindings for infix and suffix commands and specify
+how these bindings are presented in the menu buffer.  At least
+one GROUP has to be specified.  See info node `(transient)Binding
+Suffix and Infix Commands'.
+
+The BODY is optional.  If it is omitted, then ARGLIST is also
+ignored and the function definition becomes:
+
+  (lambda ()
+    (interactive)
+    (transient-setup \\='NAME))
+
+If BODY is specified, then it must begin with an `interactive'
+form that matches ARGLIST, and it must call `transient-setup'.
+It may however call that function only when some condition is
+satisfied; that is one of the reason why you might want to use
+an explicit BODY.
+
+All transients have a (possibly nil) value, which is exported
+when suffix commands are called, so that they can consume that
+value.  For some transients it might be necessary to have a sort
+of secondary value, called a scope.  Such a scope would usually
+be set in the commands `interactive' form and has to be passed
+to the setup function:
+
+  (transient-setup \\='NAME nil nil :scope SCOPE)
+
+\(fn NAME ARGLIST [DOCSTRING] [KEYWORD VALUE]... GROUP... [BODY...])"
+  (declare (debug ( &define name lambda-list
+                    [&optional lambda-doc]
+                    [&rest keywordp sexp]
+                    [&rest vectorp]
+                    [&optional ("interactive" interactive) def-body]))
+           (indent defun)
+           (doc-string 3))
+  (pcase-let
+      ((`(,class ,slots ,groups ,docstr ,body ,interactive-only)
+        (transient--expand-define-args args arglist 'transient-define-prefix)))
+    `(progn
+       (defalias ',name
+         ,(if body
+              `(lambda ,arglist ,@body)
+            `(lambda ()
+               (interactive)
+               (transient-setup ',name))))
+       :autoload-end
+       (put ',name 'interactive-only ,interactive-only)
+       (put ',name 'function-documentation ,docstr)
+       (put ',name 'transient--prefix
+            (,(or class 'transient-prefix) :command ',name ,@slots))
+       (transient--set-layout
+        ',name
+        (list ,@(mapcan (##transient--parse-child name %) groups))))))
+(put 'transient-define-prefix 'autoload-macro 'expand)
+
+(defmacro transient-define-group (name &rest groups)
+  "Define one or more groups and store them in symbol NAME.
+
+Groups defined using this macro, can be used inside the
+definition of transient prefix commands, by using the symbol
+NAME where a group vector is expected.  GROUPS has the same
+form as for `transient-define-prefix'."
+  (declare (debug (&define name [&rest vectorp]))
+           (indent defun))
+  `(transient--set-layout
+    ',name
+    (list ,@(mapcan (##transient--parse-child name %) groups))))
+
+(defmacro transient-define-suffix (name arglist &rest args)
+  "Define NAME as a transient suffix command.
+
+ARGLIST are the arguments that the command takes.
+DOCSTRING is the documentation string and is optional.
+
+These arguments can optionally be followed by key-value pairs.
+Each key has to be a keyword symbol, either `:class' or a
+keyword argument supported by the constructor of that class.
+The `transient-suffix' class is used if the class is not
+specified explicitly.
+
+The BODY must begin with an `interactive' form that matches
+ARGLIST.  The infix arguments are usually accessed by using
+`transient-args' inside `interactive'.
+
+\(fn NAME ARGLIST [DOCSTRING] [KEYWORD VALUE]... [BODY...])"
+  (declare (debug ( &define name lambda-list
+                    [&optional lambda-doc]
+                    [&rest keywordp sexp]
+                    [&optional ("interactive" interactive) def-body]))
+           (indent defun)
+           (doc-string 3))
+  (pcase-let
+      ((`(,class ,slots ,_ ,docstr ,body ,interactive-only)
+        (transient--expand-define-args args arglist 'transient-define-suffix)))
+    `(progn
+       (defalias ',name
+         ,(if (and (not body) class (oref-default class definition))
+              `(oref-default ',class definition)
+            `(lambda ,arglist ,@body)))
+       :autoload-end
+       (put ',name 'interactive-only ,interactive-only)
+       (put ',name 'function-documentation ,docstr)
+       (put ',name 'transient--suffix
+            (,(or class 'transient-suffix) :command ',name ,@slots)))))
+(put 'transient-define-suffix 'autoload-macro 'expand)
+
+(defmacro transient-augment-suffix (name &rest args)
+  "Augment existing command NAME with a new transient suffix object.
+Similar to `transient-define-suffix' but define a suffix object only.
+\n\(fn NAME [KEYWORD VALUE]...)"
+  (declare (debug (&define name [&rest keywordp sexp]))
+           (indent defun))
+  (pcase-let
+      ((`(,class ,slots)
+        (transient--expand-define-args args nil 'transient-augment-suffix t)))
+    :autoload-end
+    `(put ',name 'transient--suffix
+          (,(or class 'transient-suffix) :command ',name ,@slots))))
+(put 'transient-define-infix 'autoload-macro 'expand)
+
+(defmacro transient-define-infix (name arglist &rest args)
+  "Define NAME as a transient infix command.
+
+ARGLIST is always ignored and reserved for future use.
+DOCSTRING is the documentation string and is optional.
+
+At least one key-value pair is required.  All transient infix
+commands are equal to each other (but not eq).  It is meaning-
+less to define an infix command, without providing at least one
+keyword argument (usually `:argument' or `:variable', depending
+on the class).  The suffix class defaults to `transient-switch'
+and can be set using the `:class' keyword.
+
+The function definitions is always:
+
+  (lambda ()
+    (interactive)
+    (let ((obj (transient-suffix-object)))
+      (transient-infix-set obj (transient-infix-read obj)))
+    (transient--show))
+
+`transient-infix-read' and `transient-infix-set' are generic
+functions.  Different infix commands behave differently because
+the concrete methods are different for different infix command
+classes.  In rare case the above command function might not be
+suitable, even if you define your own infix command class.  In
+that case you have to use `transient-define-suffix' to define
+the infix command and use t as the value of the `:transient'
+keyword.
+
+\(fn NAME ARGLIST [DOCSTRING] KEYWORD VALUE [KEYWORD VALUE]...)"
+  (declare (debug ( &define name lambda-list
+                    [&optional lambda-doc]
+                    keywordp sexp
+                    [&rest keywordp sexp]))
+           (indent defun)
+           (doc-string 3))
+  (pcase-let
+      ((`(,class ,slots ,_ ,docstr ,_ ,interactive-only)
+        (transient--expand-define-args args arglist 'transient-define-infix t)))
+    `(progn
+       (defalias ',name #'transient--default-infix-command)
+       (put ',name 'interactive-only ,interactive-only)
+       (put ',name 'completion-predicate #'transient--suffix-only)
+       (put ',name 'function-documentation ,docstr)
+       (put ',name 'transient--suffix
+            (,(or class 'transient-switch) :command ',name ,@slots)))))
+
+(defalias 'transient-define-argument #'transient-define-infix
+  "Define NAME as a transient infix command.
+
+Only use this alias to define an infix command that actually
+sets an infix argument.  To define a infix command that, for
+example, sets a variable, use `transient-define-infix' instead.
+
+\(fn NAME ARGLIST [DOCSTRING] [KEYWORD VALUE]...)")
+
+(defun transient--default-infix-command ()
+  ;; Most infix commands are but an alias for this command.
+  "Cannot show any documentation for this transient infix command.
+
+When you request help for an infix command using `transient-help', that
+usually shows the respective man-page and tries to jump to the location
+where the respective argument is being described.
+
+If no man-page is specified for the containing transient menu, then the
+docstring is displayed instead, if any.
+
+If the infix command doesn't have a docstring, as is the case here, then
+this docstring is displayed instead, because technically infix commands
+are aliases for `transient--default-infix-command'.
+
+`describe-function' also shows the docstring of the infix command,
+falling back to that of the same aliased command."
+  (interactive)
+  (let ((obj (transient-suffix-object)))
+    (transient-infix-set obj (transient-infix-read obj)))
+  (transient--show))
+(put 'transient--default-infix-command 'interactive-only t)
+(put 'transient--default-infix-command 'completion-predicate
+     #'transient--suffix-only)
+
+(define-advice find-function-advised-original
+    (:around (fn func) transient-default-infix)
+  "Return nil instead of `transient--default-infix-command'.
+When using `find-function' to jump to the definition of a transient
+infix command/argument, then we want to actually jump to that, not to
+the definition of `transient--default-infix-command', which all infix
+commands are aliases for."
+  (let ((val (funcall fn func)))
+    (and val (not (eq val 'transient--default-infix-command)) val)))
+
+(eval-and-compile ;transient--expand-define-args
+  (defun transient--expand-define-args (args &optional arglist form nobody)
+    ;; ARGLIST and FORM are only optional for backward compatibility.
+    ;; This is necessary because "emoji.el" from Emacs 29 calls this
+    ;; function directly, with just one argument.
+    (declare (advertised-calling-convention
+              (args arglist form &optional nobody) "0.7.1"))
+    (unless (listp arglist)
+      (error "Mandatory ARGLIST is missing"))
+    (let (class keys suffixes docstr declare (interactive-only t))
+      (when (stringp (car args))
+        (setq docstr (pop args)))
+      (while (keywordp (car args))
+        (let ((k (pop args))
+              (v (pop args)))
+          (if (eq k :class)
+              (setq class v)
+            (push k keys)
+            (push v keys))))
+      (while-let*
+          ((arg (car args))
+           (arg (cond
+                  ;; Inline group definition.
+                  ((vectorp arg)
+                   (pop args))
+                  ;; Quoted include, as one would expect.
+                  ((eq (car-safe arg) 'quote)
+                   (cadr (pop args)))
+                  ;; Unquoted include, for compatibility.
+                  ((and arg (symbolp arg))
+                   (pop args)))))
+        (push arg suffixes))
+      (when (eq (car-safe (car args)) 'declare)
+        (setq declare (car args))
+        (setq args (cdr args))
+        (when-let ((int (assq 'interactive-only declare)))
+          (setq interactive-only (cadr int))
+          (delq int declare))
+        (unless (cdr declare)
+          (setq declare nil)))
+      (cond
+        ((not args))
+        (nobody
+         (error "%s: No function body allowed" form))
+        ((not (eq (car-safe (nth (if declare 1 0) args)) 'interactive))
+         (error "%s: Interactive form missing" form)))
+      (list (if (eq (car-safe class) 'quote)
+                (cadr class)
+              class)
+            (nreverse keys)
+            (nreverse suffixes)
+            docstr
+            (if declare (cons declare args) args)
+            interactive-only))))
+
+(defun transient--parse-child (prefix spec)
+  (cl-typecase spec
+    (null    (error "Invalid transient--parse-child spec: %s" spec))
+    (symbol  (list `',spec))
+    (vector  (and$ (transient--parse-group  prefix spec) (list $)))
+    (list    (and$ (transient--parse-suffix prefix spec) (list $)))
+    (string  (list spec))
+    (t       (error "Invalid transient--parse-child spec: %s" spec))))
+
+(defun transient--parse-group (prefix spec)
+  (let (class args)
+    (setq spec (append spec nil))
+    (when (integerp (car spec))
+      (setq args (plist-put args :level (pop spec))))
+    (when (stringp (car spec))
+      (setq args (plist-put args :description (pop spec))))
+    (while (keywordp (car spec))
+      (let* ((key (pop spec))
+             (val (if spec (pop spec) (error "No value for `%s'" key))))
+        (cond ((eq key :class)
+               (setq class val))
+              ((or (symbolp val)
+                   (and (listp val)
+                        (not (memq (car val) (list 'lambda (intern ""))))))
+               (setq args (plist-put args key (macroexp-quote val))))
+              ((setq args (plist-put args key val))))))
+    (unless (or spec class (not (plist-get args :setup-children)))
+      (message "WARNING: %s: When %s is used, %s must also be specified"
+               'transient-define-prefix :setup-children :class))
+    (list 'vector
+          (list 'quote
+                (cond (class)
+                      ((cl-typep (car spec)
+                                 '(or vector (and symbol (not null))))
+                       'transient-columns)
+                      ('transient-column)))
+          (and args (cons 'list args))
+          (cons 'list
+                (mapcan (##transient--parse-child prefix %) spec)))))
+
+(defun transient--parse-suffix (prefix spec)
+  (let (class args)
+    (cl-flet ((use (prop value)
+                (setq args (plist-put args prop value))))
+      (pcase (car spec)
+        ((cl-type integer)
+         (use :level (pop spec))))
+      (pcase (car spec)
+        ((cl-type (or string vector))
+         (use :key (pop spec))))
+      (pcase (car spec)
+        ((guard (or (stringp (car spec))
+                    (and (eq (car-safe (car spec)) 'lambda)
+                         (not (commandp (car spec))))))
+         (use :description (pop spec)))
+        ((and (cl-type (and symbol (not keyword) (not command)))
+              (guard (commandp (cadr spec))))
+         (use :description (macroexp-quote (pop spec)))))
+      (pcase (car spec)
+        ((or :info :info* :cons))
+        ((and (cl-type keyword) invalid)
+         (error "Need command, argument, `:info', `:info*' or `:cons'; got `%s'"
+                invalid))
+        ((cl-type symbol)
+         (use :command (macroexp-quote (pop spec))))
+        ;; During macro-expansion this is expected to be a `lambda'
+        ;; expression (i.e., source code).  When this is called from a
+        ;; `:setup-children' function, it may also be a function object
+        ;; (a.k.a a function value).  However, we never treat a string
+        ;; as a command, so we have to check for that explicitly.
+        ((cl-type (and command (not string)))
+         (let ((cmd (pop spec))
+               (sym (intern
+                     (format
+                      "transient:%s:%s:%d" prefix
+                      (string-replace (plist-get args :key) " " "")
+                      (prog1 gensym-counter (incf gensym-counter))))))
+           (use :command
+                `(prog1 ',sym
+                   (put ',sym 'interactive-only t)
+                   (put ',sym 'completion-predicate #'transient--suffix-only)
+                   (defalias ',sym ,cmd)))))
+        ((cl-type (or string (and list (not null))))
+         (let ((arg (pop spec)))
+           (cl-typecase arg
+             (list
+              (use :shortarg (car arg))
+              (use :argument (cadr arg))
+              (setq arg (cadr arg)))
+             (string
+              (when-let ((shortarg (transient--derive-shortarg arg)))
+                (use :shortarg shortarg))
+              (use :argument arg)))
+           (use :command
+                (let ((sym (intern (format "transient:%s:%s" prefix arg))))
+                  `(prog1 ',sym
+                     (put ',sym 'interactive-only t)
+                     (put ',sym 'completion-predicate #'transient--suffix-only)
+                     (defalias ',sym #'transient--default-infix-command))))
+           (pcase (car spec)
+             ((cl-type (and (not null) (not keyword)))
+              (setq class 'transient-option)
+              (use :reader (macroexp-quote (pop spec))))
+             ((guard (string-suffix-p "=" arg))
+              (setq class 'transient-option))
+             (_ (setq class 'transient-switch)))))
+        (invalid
+         (error "Need command, argument, `:info' or `:info*'; got %s" invalid)))
+      (while (keywordp (car spec))
+        (let* ((key (pop spec))
+               (val (if spec (pop spec) (error "No value for `%s'" key))))
+          (pcase key
+            (:class (setq class val))
+            (:info  (setq class 'transient-information)
+                    (use :description val))
+            (:info* (setq class 'transient-information*)
+                    (use :description val))
+            (:cons
+             (setq class 'transient-cons-option)
+             (use :command
+                  (let ((sym (intern (format "transient:%s:%s" prefix val))))
+                    `(prog1 ',sym
+                       (put ',sym 'interactive-only t)
+                       (put ',sym 'completion-predicate #'transient--suffix-only)
+                       (defalias ',sym #'transient--default-infix-command))))
+             (use :argument val))
+            ((guard (eq (car-safe val) '\,))
+             (use key (cadr val)))
+            ((guard (or (symbolp val)
+                        (and (listp val)
+                             (not (memq (car val) (list 'lambda (intern "")))))))
+             (use key (macroexp-quote val)))
+            (_ (use key val)))))
+      (when spec
+        (error "Need keyword, got %S" (car spec)))
+      (cond-let
+        ([key (plist-get args :key)]
+         (when (string-match "\\`\\({p}\\)" key)
+           (use :key
+                (replace-match transient-common-command-prefix t t key 1))))
+        ([shortarg (plist-get args :shortarg)]
+         (use :key shortarg))))
+    (list 'cons
+          (macroexp-quote (or class 'transient-suffix))
+          (cons 'list args))))
+
+(defun transient--derive-shortarg (arg)
+  (save-match-data
+    (and (string-match "\\`\\(-[a-zA-Z]\\)\\(\\'\\|=\\)" arg)
+         (match-string 1 arg))))
+
+(defun transient-command-completion-not-suffix-only-p (symbol _buffer)
+  "Say whether SYMBOL should be offered as a completion.
+If the value of SYMBOL's `completion-predicate' property is
+`transient--suffix-only', then return nil, otherwise return t.
+This is the case when a command should only ever be used as a
+suffix of a transient prefix command (as opposed to bindings
+in regular keymaps or by using `execute-extended-command')."
+  (not (eq (get symbol 'completion-predicate) 'transient--suffix-only)))
+
+(defalias 'transient--suffix-only #'ignore
+  "Ignore ARGUMENTS, do nothing, and return nil.
+See also `transient-command-completion-not-suffix-only-p'.
+Only use this alias as the value of the `completion-predicate'
+symbol property.")
+
+(unless read-extended-command-predicate
+  (setq read-extended-command-predicate
+        #'transient-command-completion-not-suffix-only-p))
+
+(defun transient--set-layout (prefix layout)
+  (put prefix 'transient--layout (vector 2 nil layout)))
+
+(defun transient--get-layout (prefix)
+  (cond-let
+    [[layout (or (get prefix 'transient--layout)
+                 ;; Migrate unparsed legacy group definition.
+                 (condition-case-unless-debug err
+                     (and-let ((value (symbol-value prefix)))
+                       (transient--set-layout
+                        prefix
+                        (if (and (listp value)
+                                 (or (listp (car value))
+                                     (vectorp (car value))))
+                            (transient-parse-suffixes prefix value)
+                          (list (transient-parse-suffix prefix value)))))
+                   (error
+                    (message "Not a legacy group definition: %s: %S" prefix err)
+                    nil)))]]
+    ((not layout)
+     (error "Not a transient prefix command or group definition: %s" prefix))
+    ((vectorp layout)
+     (let ((version (aref layout 0)))
+       (if (= version 2)
+           layout
+         (error "Unsupported layout version %s for %s" version prefix))))
+    (t
+     ;; Upgrade from version 1.
+     (transient--set-layout
+      prefix
+      (named-let upgrade ((spec layout))
+        (cond ((and (vectorp spec)
+                    (length= spec 3))
+               ;; This format is used by emoji.el from Emacs <= 29.4.
+               (pcase-let ((`[,class ,args ,children] spec))
+                 (vector class args (mapcar #'upgrade children))))
+              ((vectorp spec)
+               (pcase-let ((`[,level ,class ,args ,children] spec))
+                 (when level
+                   (setq args (plist-put args :level level)))
+                 (vector class args (mapcar #'upgrade children))))
+              ((and (listp spec)
+                    (length= spec 3)
+                    (or (null (car spec))
+                        (natnump (car spec)))
+                    (symbolp (cadr spec)))
+               (pcase-let ((`(,level ,class ,args) spec))
+                 (when level
+                   (setq args (plist-put args :level level)))
+                 (cons class args)))
+              ((listp spec)
+               (mapcar #'upgrade spec))
+              (t spec)))))))
+
+(defun transient--get-children (prefix)
+  (aref (transient--get-layout prefix) 2))
+
+(defun transient-parse-suffix (prefix suffix)
+  "Parse SUFFIX, to be added to PREFIX.
+PREFIX is a prefix command symbol or object.
+SUFFIX is a suffix command or a group specification (of
+  the same forms as expected by `transient-define-prefix').
+Intended for use in a group's `:setup-children' function."
+  (when (cl-typep prefix 'transient-prefix)
+    (setq prefix (oref prefix command)))
+  (eval (car (transient--parse-child prefix suffix)) t))
+
+(defun transient-parse-suffixes (prefix suffixes)
+  "Parse SUFFIXES, to be added to PREFIX.
+PREFIX is a prefix command symbol or object.
+SUFFIXES is a list of suffix command or a group specification
+  (of the same forms as expected by `transient-define-prefix').
+Intended for use in a group's `:setup-children' function."
+  (when (cl-typep prefix 'transient-prefix)
+    (setq prefix (oref prefix command)))
+  (mapcar (##transient-parse-suffix prefix %) suffixes))
+
+;;; Edit
+
+(defun transient--insert-suffix (prefix loc suffix action &optional keep-other)
+  (pcase-let* ((suf (cl-etypecase suffix
+                      (vector (eval (transient--parse-group  prefix suffix) t))
+                      (list   (eval (transient--parse-suffix prefix suffix) t))
+                      (string suffix)
+                      (symbol suffix)))
+               (`(,elt ,group) (transient--locate-child prefix loc)))
+    (cond
+      ((not elt)
+       (funcall (if transient-error-on-insert-failure #'error #'message)
+                "Cannot insert %S into %s; %s not found"
+                suffix prefix loc))
+      ((or (and (vectorp suffix) (not (vectorp elt)))
+           (and (listp   suffix) (vectorp elt))
+           (and (stringp suffix) (vectorp elt)))
+       (funcall (if transient-error-on-insert-failure #'error #'message)
+                "Cannot place %S into %s at %s; %s"
+                suffix prefix loc
+                "suffixes and groups cannot be siblings"))
+      (t
+       (when-let* ((_(not (eq keep-other 'always)))
+                   (bindingp (listp suf))
+                   (key (transient--suffix-key suf))
+                   (conflict (car (transient--locate-child prefix key)))
+                   (conflictp
+                    (and (not (and (eq action 'replace)
+                                   (eq conflict elt)))
+                         (or (not keep-other)
+                             (eq (plist-get (transient--suffix-props suf)
+                                            :command)
+                                 (plist-get (transient--suffix-props conflict)
+                                            :command)))
+                         (equal (transient--suffix-predicate suf)
+                                (transient--suffix-predicate conflict)))))
+         (transient-remove-suffix prefix key)
+         (let ((eg (transient--locate-child prefix loc)))
+           (setq elt (car eg) group (cadr eg))))
+       (let ((mem (memq elt (aref group 2))))
+         (pcase-exhaustive action
+           ('insert  (setcdr mem (cons elt (cdr mem)))
+                     (setcar mem suf))
+           ('append  (setcdr mem (cons suf (cdr mem))))
+           ('replace (setcar mem suf))))))))
+
+;;;###autoload
+(defun transient-insert-suffix (prefix loc suffix &optional keep-other)
+  "Insert a SUFFIX into PREFIX before LOC.
+PREFIX is a prefix command, a symbol.
+SUFFIX is a suffix command or a group specification (of
+  the same forms as expected by `transient-define-prefix').
+LOC is a command, a key vector, a key description (a string
+  as returned by `key-description'), or a coordination list
+  (whose last element may also be a command or key).
+Remove a conflicting binding unless optional KEEP-OTHER is
+  non-nil.  When the conflict appears to be a false-positive,
+  non-nil KEEP-OTHER may be ignored, which can be prevented
+  by using `always'.
+See info node `(transient)Modifying Existing Transients'."
+  (declare (indent defun))
+  (transient--insert-suffix prefix loc suffix 'insert keep-other))
+
+;;;###autoload
+(defun transient-append-suffix (prefix loc suffix &optional keep-other)
+  "Insert a SUFFIX into PREFIX after LOC.
+PREFIX is a prefix command, a symbol.
+SUFFIX is a suffix command or a group specification (of
+  the same forms as expected by `transient-define-prefix').
+LOC is a command, a key vector, a key description (a string
+  as returned by `key-description'), or a coordination list
+  (whose last element may also be a command or key).
+Remove a conflicting binding unless optional KEEP-OTHER is
+  non-nil.  When the conflict appears to be a false-positive,
+  non-nil KEEP-OTHER may be ignored, which can be prevented
+  by using `always'.
+See info node `(transient)Modifying Existing Transients'."
+  (declare (indent defun))
+  (transient--insert-suffix prefix loc suffix 'append keep-other))
+
+;;;###autoload
+(defun transient-replace-suffix (prefix loc suffix)
+  "Replace the suffix at LOC in PREFIX with SUFFIX.
+PREFIX is a prefix command, a symbol.
+SUFFIX is a suffix command or a group specification (of
+  the same forms as expected by `transient-define-prefix').
+LOC is a command, a key vector, a key description (a string
+  as returned by `key-description'), or a coordination list
+  (whose last element may also be a command or key).
+See info node `(transient)Modifying Existing Transients'."
+  (declare (indent defun))
+  (transient--insert-suffix prefix loc suffix 'replace))
+
+;;;###autoload
+(defun transient-inline-group (prefix group)
+  "Inline the included GROUP into PREFIX.
+Replace the symbol GROUP with its expanded layout in the
+layout of PREFIX."
+  (declare (indent defun))
+  (cl-assert (symbolp group))
+  (pcase-let ((`(,suffix ,parent) (transient--locate-child prefix group)))
+    (when suffix
+      (let* ((siblings (aref parent 2))
+             (pos (cl-position group siblings)))
+        (aset parent 2
+              (nconc (take pos siblings)
+                     (transient--get-children group)
+                     (drop (1+ pos) siblings)))))))
+
+;;;###autoload
+(defun transient-remove-suffix (prefix loc)
+  "Remove the suffix or group at LOC in PREFIX.
+PREFIX is a prefix command, a symbol.
+LOC is a command, a key vector, a key description (a string
+  as returned by `key-description'), or a coordination list
+  (whose last element may also be a command or key).
+See info node `(transient)Modifying Existing Transients'."
+  (declare (indent defun))
+  (pcase-let ((`(,suffix ,group) (transient--locate-child prefix loc)))
+    (when suffix
+      (aset group 2 (delq suffix (aref group 2))))))
+
+(defun transient-suffix-put (prefix loc prop value)
+  "Edit the suffix at LOC in PREFIX, setting PROP to VALUE.
+PREFIX is a prefix command, a symbol.
+SUFFIX is a suffix command or a group specification (of
+  the same forms as expected by `transient-define-prefix').
+LOC is a command, a key vector, a key description (a string
+  as returned by `key-description'), or a coordination list
+  (whose last element may also be a command or key).
+See info node `(transient)Modifying Existing Transients'."
+  (let ((child (transient-get-suffix prefix loc)))
+    (if (vectorp child)
+        (aset child 1 (plist-put (aref child 1) prop value))
+      (setcdr child (plist-put (transient--suffix-props child) prop value)))))
+
+(defalias 'transient--suffix-props #'cdr)
+
+(defun transient-get-suffix (prefix loc)
+  "Return the suffix or group at LOC in PREFIX.
+PREFIX is a prefix command, a symbol.
+LOC is a command, a key vector, a key description (a string
+  as returned by `key-description'), or a coordination list
+  (whose last element may also be a command or key).
+See info node `(transient)Modifying Existing Transients'."
+  (or (car (transient--locate-child prefix loc))
+      (error "%s not found in %s" loc prefix)))
+
+(defun transient--locate-child (group loc)
+  (when (symbolp group)
+    (setq group (transient--get-layout group)))
+  (when (vectorp loc)
+    (setq loc (append loc nil)))
+  (cond-let
+    ((atom loc)
+     (seq-some (lambda (child)
+                 (transient--match-child group loc child))
+               (aref group 2)))
+    ([match (transient--nth (pop loc) (aref group 2))]
+     (cond (loc (transient--locate-child
+                 match (cond ((or (stringp (car loc))
+                                  (symbolp (car loc)))
+                              (car loc))
+                             ((symbolp match)
+                              (vconcat (cons 0 loc)))
+                             ((vconcat loc)))))
+           ((list match group))))))
+
+(defun transient--match-child (group loc child)
+  (cl-etypecase child
+    (string nil)
+    (symbol (cond-let
+              ((symbolp loc)
+               (and (eq child loc)
+                    (list child group)))
+              ([include (transient--get-layout child)]
+               (transient--locate-child include loc))))
+    (vector (seq-some (lambda (subgroup)
+                        (transient--locate-child subgroup loc))
+                      (aref group 2)))
+    (list   (and (if (symbolp loc)
+                     (eq (plist-get (transient--suffix-props child) :command)
+                         loc)
+                   (equal (kbd (transient--suffix-key child))
+                          (kbd loc)))
+                 (list child group)))))
+
+(defun transient--nth (n list)
+  (nth (if (< n 0) (- (length list) (abs n)) n) list))
+
+(defun transient--suffix-key (spec)
+  (let ((props (transient--suffix-props spec)))
+    (or (plist-get props :key)
+        (transient--command-key
+         (plist-get props :command)))))
+
+(defun transient--command-key (cmd)
+  (and-let ((obj (transient--suffix-prototype cmd)))
+    (cond ((slot-boundp obj 'key)
+           (oref obj key))
+          ((slot-exists-p obj 'shortarg)
+           (if (slot-boundp obj 'shortarg)
+               (oref obj shortarg)
+             (transient--derive-shortarg (oref obj argument)))))))
+
+(defun transient-set-default-level (command level)
+  "Set the default level of suffix COMMAND to LEVEL.
+
+The default level is shadowed if the binding of the suffix in a
+prefix menu specifies a level, and also if the user changes the
+level of such a binding.
+
+The default level can only be set for commands that were defined
+using `transient-define-suffix', `transient-define-infix' or
+`transient-define-argument'."
+  (if-let ((proto (transient--suffix-prototype command)))
+      (oset proto level level)
+    (user-error "Cannot set level for `%s'; no prototype object exists"
+                command)))
+
+;;; Variables
+
+(defvar transient-current-prefix nil
+  "The transient from which this suffix command was invoked.
+This is an object representing that transient, use
+`transient-current-command' to get the respective command.")
+
+(defvar transient-current-command nil
+  "The transient from which this suffix command was invoked.
+This is a symbol representing that transient, use
+`transient-current-prefix' to get the respective object.")
+
+(defvar transient-current-suffixes nil
+  "The suffixes of the transient from which this suffix command was invoked.
+This is a list of objects.  Usually it is sufficient to instead
+use the function `transient-args', which returns a list of
+values.  In complex cases it might be necessary to use this
+variable instead.")
+
+(defvar transient-exit-hook nil
+  "Hook run after exiting a transient menu.
+Unlike `transient-post-exit-hook', this runs even if another transient
+menu becomes active at the same time. ")
+
+(defvar transient-post-exit-hook nil
+  "Hook run after exiting all transient menus.
+Unlike `transient-exit-hook', this does not run if another transient
+menu becomes active at the same time.")
+
+(defvar transient-setup-buffer-hook nil
+  "Hook run when setting up the transient buffer.
+That buffer is current and empty when this hook runs.")
+
+(defvar transient--prefix nil)
+(defvar transient--layout nil)
+(defvar transient--suffixes nil)
+
+(defconst transient--stay t   "Do not exit the transient.")
+(defconst transient--exit nil "Do exit the transient.")
+
+(defvar transient--exitp nil "Whether to exit the transient.")
+(defvar transient--showp nil "Whether to show the transient menu buffer.")
+(defvar transient--helpp nil "Whether help-mode is active.")
+(defvar transient--docsp nil "Whether docstring-mode is active.")
+(defvar transient--editp nil "Whether edit-mode is active.")
+
+(defvar transient--refreshp nil
+  "Whether to refresh the transient completely.")
+
+(defvar transient--pre-command nil
+  "The pre-command selected for `this-command'.")
+
+(defvar transient--all-levels-p nil
+  "Whether temporary display of suffixes on all levels is active.")
+
+(defvar transient--timer nil)
+
+(defvar transient--stack nil)
+
+(defvar transient--minibuffer-depth 0)
+
+(defvar transient--buffer-name " *transient*"
+  "Name of the transient buffer.")
+
+(defvar transient--buffer nil
+  "The transient menu buffer.")
+
+(defvar transient--window nil
+  "The window used to display transient's menu buffer.")
+
+(defvar transient--original-window nil
+  "The window that was selected before the transient was invoked.
+Usually it remains selected while the transient is active.")
+
+(defvar transient--original-buffer nil
+  "The buffer that was current before the transient was invoked.
+Usually it remains current while the transient is active.")
+
+(defvar transient--restore-winconf nil
+  "Window configuration to restore after exiting help.")
+
+(defvar transient--shadowed-buffer nil
+  "The buffer that is temporarily shadowed by the transient buffer.
+This is bound while the suffix predicate is being evaluated and while
+drawing in the transient buffer.")
+
+(defvar transient--pending-suffix nil
+  "The suffix that is currently being processed.
+This is bound while the suffix predicate is being evaluated,
+and while functions that return faces are being evaluated.")
+
+(defvar transient--current-suffix nil
+  "The suffix currently being invoked using a mouse event.
+Do not use this; instead use function `transient-suffix-object'.")
+
+(defvar transient--pending-group nil
+  "The group that is currently being processed.
+This is bound while the suffixes are drawn in the transient buffer.")
+
+(defvar transient--debug nil
+  "Whether to put debug information into *Messages*.")
+
+(defvar transient--history nil)
+
+(defvar transient--quit-commands
+  '(transient-quit-one
+    transient-quit-all
+    top-level))
+
+;;; Identities
+
+(defun transient-active-prefix (&optional prefixes)
+  "Return the active transient object.
+
+Return nil if there is no active transient, if the transient buffer
+isn't shown, and while the active transient is suspended (e.g., while
+the minibuffer is in use).
+
+Unlike `transient-current-prefix', which is only ever non-nil in code
+that is run directly by a command that is invoked while a transient
+is current, this function is also suitable for use in asynchronous
+code, such as timers and callbacks (this function's main use-case).
+
+If optional PREFIXES is non-nil, it must be a prefix command symbol
+or a list of symbols, in which case the active transient object is
+only returned if it matches one of PREFIXES."
+  (and transient--showp
+       transient--prefix
+       (or (not prefixes)
+           (memq (oref transient--prefix command) (ensure-list prefixes)))
+       (or (memq 'transient--pre-command pre-command-hook)
+           (and (memq t pre-command-hook)
+                (memq 'transient--pre-command
+                      (default-value 'pre-command-hook))))
+       transient--prefix))
+
+(defun transient-prefix-object ()
+  "Return the current prefix as an object.
+
+While a transient is being setup or refreshed (which involves
+preparing its suffixes) the variable `transient--prefix' can be
+used to access the prefix object.  Thus this is what has to be
+used in suffix methods such as `transient-format-description',
+and in object-specific functions that are stored in suffix slots
+such as `description'.
+
+When a suffix command is invoked (i.e., in its `interactive' form
+and function body) then the variable `transient-current-prefix'
+has to be used instead.
+
+Two distinct variables are needed, because any prefix may itself
+be used as a suffix of another prefix, and such sub-prefixes have
+to be able to tell themselves apart from the prefix they were
+invoked from.
+
+Regular suffix commands, which are not prefixes, do not have to
+concern themselves with this distinction, so they can use this
+function instead.  In the context of a plain suffix, it always
+returns the value of the appropriate variable."
+  (or transient--prefix transient-current-prefix))
+
+(defun transient-suffix-object (&optional command)
+  "Return the object associated with the current suffix command.
+
+Each suffix commands is associated with an object, which holds
+additional information about the suffix, such as its value (in
+the case of an infix command, which is a kind of suffix command).
+
+This function is intended to be called by infix commands, which
+are usually aliases of `transient--default-infix-command', which
+is defined like this:
+
+  (defun transient--default-infix-command ()
+    (interactive)
+    (let ((obj (transient-suffix-object)))
+      (transient-infix-set obj (transient-infix-read obj)))
+    (transient--show))
+
+\(User input is read outside of `interactive' to prevent the
+command from being added to `command-history'.  See #23.)
+
+Such commands need to be able to access their associated object
+to guide how `transient-infix-read' reads the new value and to
+store the read value.  Other suffix commands (including non-infix
+commands) may also need the object to guide their behavior.
+
+This function attempts to return the object associated with the
+current suffix command even if the suffix command was not invoked
+from a transient.  (For some suffix command that is a valid thing
+to do, for others it is not.)  In that case nil may be returned,
+if the command was not defined using one of the macros intended
+to define such commands.
+
+The optional argument COMMAND is intended for internal use.  If
+you are contemplating using it in your own code, then you should
+probably use this instead:
+
+  (get COMMAND \\='transient--suffix)"
+  (when command
+    (cl-check-type command command))
+  (cond-let*
+    (transient--pending-suffix)
+    (transient--current-suffix)
+    [[this-command (advice--cd*r this-command)]]
+    ((or transient--prefix
+         transient-current-prefix)
+     (let ((suffixes
+            (cl-remove-if-not
+             (lambda (obj)
+               (eq (oref obj command)
+                   (or command
+                       (if (eq this-command 'transient-set-level)
+                           ;; This is how it can look up for which
+                           ;; command it is setting the level.
+                           this-original-command
+                         this-command))))
+             (or transient--suffixes
+                 transient-current-suffixes))))
+       (cond
+         ((length= suffixes 1)
+          (car suffixes))
+         ((cl-find-if (lambda (obj)
+                        (equal (listify-key-sequence (kbd (oref obj key)))
+                               (listify-key-sequence (this-command-keys))))
+                      suffixes))
+         ;; COMMAND is only provided if `this-command' is meaningless, in
+         ;; which case `this-command-keys' is also meaningless, making it
+         ;; impossible to disambiguate bindings for the same command.
+         (command (car suffixes))
+         ;; If COMMAND is nil, then failure to disambiguate likely means
+         ;; that there is a bug somewhere.
+         ((length> suffixes 1)
+          (error "BUG: Cannot unambiguously determine suffix object"))
+         ;; It is legitimate to use this function as a predicate of sorts.
+         ;; `transient--pre-command' and `transient-help' are examples.
+         (t nil))))
+    ([obj (transient--suffix-prototype (or command this-command))]
+     [obj (clone obj)]
+     (transient-init-scope obj)
+     (transient-init-value obj)
+     obj)))
+
+(defun transient--suffix-prototype (command)
+  (or (get command 'transient--suffix)
+      (seq-some (##get % 'transient--suffix)
+                (function-alias-p command))))
+
+;;; Keymaps
+
+(defvar-keymap transient-base-map
+  :doc "Parent of other keymaps used by Transient.
+
+This is the parent keymap of all the keymaps that are used in
+all transients: `transient-map' (which in turn is the parent
+of the transient-specific keymaps), `transient-edit-map' and
+`transient-sticky-map'.
+
+If you change a binding here, then you might also have to edit
+`transient-sticky-map' and `transient-common-commands'.  While
+the latter isn't a proper transient prefix command, it can be
+edited using the same functions as used for transients.
+
+If you add a new command here, then you must also add a binding
+to `transient-predicate-map'."
+  "ESC ESC ESC" #'transient-quit-all
+  "C-g"     #'transient-quit-one
+  "C-q"     #'transient-quit-all
+  "C-z"     #'transient-suspend
+  "C-v"     #'transient-scroll-up
+  "C-M-v"   #'transient-scroll-down
+  "<next>"  #'transient-scroll-up
+  "<prior>" #'transient-scroll-down)
+
+(defvar-keymap transient-map
+  :doc "Top-level keymap used by all transients.
+
+If you add a new command here, then you must also add a binding
+to `transient-predicate-map'.  See also `transient-base-map'."
+  :parent transient-base-map
+  "C-u"     #'universal-argument
+  "C--"     #'negative-argument
+  "C-t"     #'transient-show
+  "?"       #'transient-help
+  "C-h"     #'transient-help
+  "C-x 5 5" #'other-frame-prefix
+  "C-x 4 4" #'other-window-prefix
+  ;; These have additional bindings in transient-common-commands.
+  "C-M-p"   #'transient-history-prev
+  "C-M-n"   #'transient-history-next)
+
+(defvar-keymap transient-edit-map
+  :doc "Keymap that is active while a transient in is in \"edit mode\"."
+  :parent transient-base-map
+  "?"   #'transient-help
+  "C-h" #'transient-help)
+
+(defvar-keymap transient-sticky-map
+  :doc "Keymap that is active while an incomplete key sequence is active."
+  :parent transient-base-map
+  "C-g" #'transient-quit-seq)
+
+(defvar transient-common-commands
+  [:hide (lambda ()
+           (defvar transient--redisplay-key)
+           (and (not (equal (vconcat transient--redisplay-key)
+                            (read-kbd-macro transient-common-command-prefix)))
+                (not transient-show-common-commands)))
+   ["Value commands"
+    ("{p} s  " "Set"            transient-set)
+    ("{p} C-s" "Save"           transient-save)
+    ("{p} C-k" "Reset"          transient-reset)
+    ("{p} p  " "Previous value" transient-history-prev)
+    ("{p} n  " "Next value"     transient-history-next)]
+   ["Sticky commands"
+    ;; Like `transient-sticky-map' except that
+    ;; "C-g" has to be bound to a different command.
+    ("C-g" "Quit prefix or transient" transient-quit-one)
+    ("C-q" "Quit transient stack"     transient-quit-all)
+    ("C-z" "Suspend transient stack"  transient-suspend)]
+   ["Customize"
+    ("{p} t" transient-toggle-common)
+    ("{p} l" "Show/hide suffixes" transient-set-level)
+    ("{p} a" transient-toggle-level-limit)]]
+  "Commands available in all transient menus.
+
+The same functions, that are used to change bindings in transient prefix
+commands and transient groups (defined using `transient-define-group'),
+should be used to modify these bindings as well.  The actual layout is
+stored in the symbol's `transient--layout' property.  The variable value
+is only used when customizing `transient-common-command-prefix', which
+resets the value of `transient--layout' based on the values of that
+option and this variable.")
+
+(defun transient--init-common-commands ()
+  (transient--set-layout
+   'transient-common-commands
+   (list (eval (car (transient--parse-child 'transient-common-commands
+                                            transient-common-commands))
+               t)))
+  (defvar transient-common-command-prefix)
+  (defvar transient--docstr-hint-1)
+  (defvar transient--docstr-hint-2)
+  (setq transient--docstr-hint-1
+        (define-keymap transient-common-command-prefix
+          'transient-common-command-prefix))
+  (setq transient--docstr-hint-2
+        (define-keymap (concat transient-common-command-prefix " t")
+          'transient-toggle-common)))
+
+(defcustom transient-common-command-prefix "C-x"
+  "The prefix key used for most commands common to all menus.
+
+Some shared commands are available in all transient menus, most of
+which share a common prefix specified by this option.  By default the
+bindings for these shared commands are only shown after pressing that
+prefix key and before following that up with a valid key binding.
+
+For historic reasons \\`C-x' is used by default, but users are
+encouraged to pick another key, preferably one that is not commonly used
+in Emacs but is still convenient to them.  See info node `(transient)
+Common Suffix Commands'."
+  :type 'key
+  :initialize (lambda (symbol exp)
+                (custom-initialize-default symbol exp)
+                (transient--init-common-commands))
+  :set (lambda (symbol value)
+         (set-default symbol value)
+         (transient--init-common-commands)))
+
+(defvar-keymap transient-popup-navigation-map
+  :doc "One of the keymaps used when menu navigation is enabled.
+See `transient-enable-menu-navigation'."
+  "<up>"   #'transient-backward-button
+  "<down>" #'transient-forward-button
+  "C-r"    #'transient-isearch-backward
+  "C-s"    #'transient-isearch-forward
+  "M-RET"  #'transient-push-button)
+
+(defvar-keymap transient-button-map
+  :doc "One of the keymaps used when menu navigation is enabled.
+See `transient-enable-menu-navigation'."
+  "<mouse-1>" #'transient-push-button
+  "<mouse-2>" #'transient-push-button)
+
+(defvar-keymap transient-resume-mode-map
+  :doc "Keymap for `transient-resume-mode'.
+
+This keymap remaps every command that would usually just quit the
+documentation buffer to `transient-resume', which additionally
+resumes the suspended transient."
+  "<remap> <Man-quit>"    #'transient-resume
+  "<remap> <Info-exit>"   #'transient-resume
+  "<remap> <quit-window>" #'transient-resume)
+
+(defvar-keymap transient-predicate-map
+  :doc "Base keymap used to map common commands to their transient behavior.
+
+The \"transient behavior\" of a command controls, among other
+things, whether invoking the command causes the transient to be
+exited or not, and whether infix arguments are exported before
+doing so.
+
+Each \"key\" is a command that is common to all transients and
+that is bound in `transient-map', `transient-edit-map',
+`transient-sticky-map' and/or `transient-common-command'.
+
+Each binding is a \"pre-command\", a function that controls the
+transient behavior of the respective command.
+
+For transient commands that are bound in individual transients,
+the transient behavior is specified using the `:transient' slot
+of the corresponding object."
+  "<transient-suspend>"           #'transient--do-suspend
+  "<transient-help>"              #'transient--do-stay
+  "<transient-set-level>"         #'transient--do-stay
+  "<transient-history-prev>"      #'transient--do-stay
+  "<transient-history-next>"      #'transient--do-stay
+  "<universal-argument>"          #'transient--do-stay
+  "<universal-argument-more>"     #'transient--do-stay
+  "<negative-argument>"           #'transient--do-minus
+  "<digit-argument>"              #'transient--do-stay
+  "<other-frame-prefix>"          #'transient--do-stay
+  "<other-window-prefix>"         #'transient--do-stay
+  "<top-level>"                   #'transient--do-quit-all
+  "<transient-quit-all>"          #'transient--do-quit-all
+  "<transient-quit-one>"          #'transient--do-quit-one
+  "<transient-quit-seq>"          #'transient--do-stay
+  "<transient-show>"              #'transient--do-stay
+  "<transient-update>"            #'transient--do-stay
+  "<transient-set>"               #'transient--do-call
+  "<transient-set-and-exit>"      #'transient--do-exit
+  "<transient-save>"              #'transient--do-call
+  "<transient-save-and-exit>"     #'transient--do-exit
+  "<transient-reset>"             #'transient--do-call
+  "<describe-key-briefly>"        #'transient--do-stay
+  "<describe-key>"                #'transient--do-stay
+  "<transient-scroll-up>"         #'transient--do-scroll
+  "<transient-scroll-down>"       #'transient--do-scroll
+  "<mwheel-scroll>"               #'transient--do-scroll
+  "<scroll-bar-toolkit-scroll>"   #'transient--do-scroll
+  "<transient-noop>"              #'transient--do-noop
+  "<transient-mouse-push-button>" #'transient--do-move
+  "<transient-push-button>"       #'transient--do-push-button
+  "<transient-backward-button>"   #'transient--do-move
+  "<transient-forward-button>"    #'transient--do-move
+  "<transient-isearch-backward>"  #'transient--do-move
+  "<transient-isearch-forward>"   #'transient--do-move
+  "<mouse-set-point>"             #'transient--do-mouse
+  "<mouse-set-region>"            #'transient--do-mouse
+  "<mouse-drag-region>"           #'transient--do-mouse
+  "<transient-copy-menu-text>"    #'transient--do-stay
+  "<transient-toggle-docstrings>" #'transient--do-stay
+  ;; If a valid but incomplete prefix sequence is followed by
+  ;; an unbound key, then Emacs calls the `undefined' command
+  ;; but does not set `this-command', `this-original-command'
+  ;; or `real-this-command' accordingly.  Instead they are nil.
+  "<nil>"                         #'transient--do-warn
+  ;; Bound to the `mouse-movement' event, this command is similar
+  ;; to `ignore'.
+  "<ignore-preserving-kill-region>" #'transient--do-noop)
+
+(defvar transient--transient-map nil)
+(defvar transient--predicate-map nil)
+(defvar transient--redisplay-map nil)
+(defvar transient--redisplay-key nil)
+
+(defun transient--push-keymap (var)
+  (let ((map (symbol-value var)))
+    (transient--debug "     push %s%s" var (if map "" " VOID"))
+    (when map
+      (with-demoted-errors "transient--push-keymap: %S"
+        (internal-push-keymap map 'overriding-terminal-local-map)))))
+
+(defun transient--pop-keymap (var)
+  (let ((map (symbol-value var)))
+    (when map
+      (transient--debug "     pop  %s" var)
+      (with-demoted-errors "transient--pop-keymap: %S"
+        (internal-pop-keymap map 'overriding-terminal-local-map)))))
+
+(defun transient--make-transient-map ()
+  (let ((map (make-sparse-keymap)))
+    (cond (transient--editp
+           (keymap-set map (concat transient-common-command-prefix " l")
+                       #'transient-set-level)
+           (set-keymap-parent map transient-edit-map))
+          ((set-keymap-parent map transient-map)))
+    (dolist (obj transient--suffixes)
+      (let ((key (oref obj key)))
+        (when (vectorp key)
+          (setq key (key-description key))
+          (oset obj key key))
+        (when transient-substitute-key-function
+          (setq key (save-match-data
+                      (funcall transient-substitute-key-function obj)))
+          (oset obj key key))
+        (let* ((kbd (kbd key))
+               (cmd (oref obj command))
+               (alt (transient--lookup-key map kbd)))
+          (cond ((not alt)
+                 (define-key map kbd cmd))
+                ((eq alt cmd))
+                ((oref obj inactive))
+                ((oref obj inapt))
+                ((and-let ((alt (transient-suffix-object alt)))
+                   (or (oref alt inactive)
+                       (oref alt inapt)))
+                 (define-key map kbd cmd))
+                (transient-detect-key-conflicts
+                 (error "Cannot bind %S to %s and also %s"
+                        (string-trim key) cmd alt))
+                ((define-key map kbd cmd))))))
+    (when$ (keymap-lookup map "-") (keymap-set map "<kp-subtract>" $))
+    (when$ (keymap-lookup map "=") (keymap-set map "<kp-equal>" $))
+    (when$ (keymap-lookup map "+") (keymap-set map "<kp-add>" $))
+    (when transient-enable-menu-navigation
+      ;; `transient--make-redisplay-map' maps only over bindings that are
+      ;; directly in the base keymap, so that cannot be a composed keymap.
+      (set-keymap-parent
+       map (make-composed-keymap
+            (keymap-parent map)
+            transient-popup-navigation-map)))
+    map))
+
+(defun transient--make-predicate-map ()
+  (let ((default (transient--resolve-pre-command
+                  (oref transient--prefix transient-suffix)))
+        (return (and transient--stack (oref transient--prefix return)))
+        (map (make-sparse-keymap)))
+    (set-keymap-parent map transient-predicate-map)
+    (when (or (and (slot-boundp transient--prefix 'transient-switch-frame)
+                   (transient--resolve-pre-command
+                    (not (oref transient--prefix transient-switch-frame))))
+              (memq (transient--resolve-pre-command
+                     (oref transient--prefix transient-non-suffix))
+                    '(nil transient--do-warn transient--do-noop)))
+      (define-key map [handle-switch-frame] #'transient--do-suspend))
+    (dolist (obj transient--suffixes)
+      (let* ((cmd (oref obj command))
+             (id (vector cmd))
+             (kind (cond ((get cmd 'transient--prefix)    'prefix)
+                         ((cl-typep obj 'transient-infix) 'infix)
+                         (t                               'suffix)))
+             (pre (cond
+                    ((oref obj inactive) nil)
+                    ((oref obj inapt) #'transient--do-warn-inapt)
+                    ((slot-boundp obj 'transient)
+                     (pcase (list kind
+                                  (transient--resolve-pre-command
+                                   (oref obj transient) nil t)
+                                  return)
+                       (`(prefix   t  ,_) #'transient--do-recurse)
+                       (`(prefix nil  ,_) #'transient--do-stack)
+                       (`(infix    t  ,_) #'transient--do-stay)
+                       (`(suffix   t  ,_) #'transient--do-call)
+                       ('(suffix nil   t) #'transient--do-return)
+                       (`(,_     nil  ,_) #'transient--do-exit)
+                       (`(,_     ,do  ,_) do)))
+                    ((not (lookup-key transient-predicate-map id))
+                     (pcase (list kind default return)
+                       (`(prefix ,(or 'transient--do-stay 'transient--do-call) ,_)
+                        #'transient--do-recurse)
+                       (`(prefix   t  ,_) #'transient--do-recurse)
+                       (`(prefix  ,_  ,_) #'transient--do-stack)
+                       (`(infix   ,_  ,_) #'transient--do-stay)
+                       (`(suffix   t  ,_) #'transient--do-call)
+                       ('(suffix nil   t) #'transient--do-return)
+                       (`(suffix nil nil) #'transient--do-exit)
+                       (`(suffix ,do  ,_) do))))))
+        (when pre
+          (if-let ((alt (lookup-key map id)))
+              (unless (eq alt pre)
+                (define-key map (vconcat (oref obj key) id) pre))
+            (define-key map id pre)))))
+    map))
+
+(defun transient--make-redisplay-map ()
+  (setq transient--redisplay-key
+        (pcase this-command
+          ('transient-update
+           (setq transient--showp t)
+           (let ((keys (listify-key-sequence (this-single-command-keys))))
+             (setq unread-command-events (mapcar (##cons t %) keys))
+             keys))
+          ('transient-quit-seq
+           (setq unread-command-events
+                 (butlast (listify-key-sequence (this-single-command-keys)) 2))
+           (butlast transient--redisplay-key))
+          (_ nil)))
+  (let ((topmap (make-sparse-keymap))
+        (submap (make-sparse-keymap)))
+    (when transient--redisplay-key
+      (define-key topmap (vconcat transient--redisplay-key) submap)
+      (set-keymap-parent submap transient-sticky-map))
+    (map-keymap-internal
+     (lambda (key def)
+       (when (and (not (eq key ?\e))
+                  (listp def)
+                  (keymapp def))
+         (define-key topmap (vconcat transient--redisplay-key (list key))
+           #'transient-update)))
+     (if transient--redisplay-key
+         (let ((key (vconcat transient--redisplay-key)))
+           (or (lookup-key transient--transient-map key)
+               (and-let ((regular (lookup-key local-function-key-map key)))
+                 (lookup-key transient--transient-map (vconcat regular)))))
+       transient--transient-map))
+    topmap))
+
+;;; Setup
+
+(defun transient-setup (&optional name layout edit &rest params)
+  "Setup the transient specified by NAME.
+
+This function is called by transient prefix commands to setup the
+transient.  In that case NAME is mandatory, LAYOUT and EDIT must
+be nil and PARAMS may be (but usually is not) used to set, e.g.,
+the \"scope\" of the transient (see `transient-define-prefix').
+
+This function is also called internally, in which case LAYOUT and
+EDIT may be non-nil."
+  (transient--debug 'setup)
+  (transient--with-emergency-exit :setup
+    (cond
+      ((not name)
+       ;; Switching between regular and edit mode.
+       (transient--pop-keymap 'transient--transient-map)
+       (transient--pop-keymap 'transient--redisplay-map)
+       (setq name (oref transient--prefix command))
+       (setq params (list :scope (oref transient--prefix scope))))
+      (transient--prefix
+       ;; Invoked as a ":transient-non-suffix 'transient--do-{stay,call}"
+       ;; of an outer prefix.  Unlike the usual `transient--do-stack',
+       ;; these predicates fail to clean up after the outer prefix.
+       (transient--pop-keymap 'transient--transient-map)
+       (transient--pop-keymap 'transient--redisplay-map))
+      ((not (or layout                      ; resuming parent/suspended prefix
+                transient-current-command)) ; entering child prefix
+       (transient--stack-zap))              ; replace suspended prefix, if any
+      (edit
+       ;; Returning from help to edit.
+       (setq transient--editp t)))
+    (transient--env-apply
+     (lambda ()
+       (transient--init-transient name layout params)
+       (transient--history-init transient--prefix)
+       (setq transient--original-window (selected-window))
+       (setq transient--original-buffer (current-buffer))
+       (setq transient--minibuffer-depth (minibuffer-depth))
+       (transient--redisplay))
+     (get name 'transient--prefix))
+    (transient--suspend-text-conversion-style)
+    (transient--setup-transient)
+    (transient--suspend-which-key-mode)))
+
+(cl-defgeneric transient-setup-children (group children)
+  "Setup the CHILDREN of GROUP.
+If the value of the `setup-children' slot is non-nil, then call
+that function with CHILDREN as the only argument and return the
+value.  Otherwise return CHILDREN as is.")
+
+(cl-defmethod transient-setup-children ((group transient-group) children)
+  (if (slot-boundp group 'setup-children)
+      (funcall (oref group setup-children) children)
+    children))
+
+(defun transient--env-apply (fn &optional prefix)
+  (if-let ((env (oref (or prefix transient--prefix) environment)))
+      (funcall env fn)
+    (funcall fn)))
+
+(defun transient--init-transient (&optional name layout params)
+  (unless name
+    ;; Re-init.
+    (if (eq transient--refreshp 'updated-value)
+        ;; Preserve the prefix value this once, because the
+        ;; invoked suffix indicates that it has updated that.
+        (setq transient--refreshp (oref transient--prefix refresh-suffixes))
+      ;; Otherwise update the prefix value from suffix values.
+      (oset transient--prefix value (transient--get-extended-value))))
+  (transient--init-objects name layout params)
+  (transient--init-keymaps))
+
+(defun transient--init-keymaps ()
+  (setq transient--predicate-map (transient--make-predicate-map))
+  (setq transient--transient-map (transient--make-transient-map))
+  (setq transient--redisplay-map (transient--make-redisplay-map)))
+
+(defun transient--init-objects (&optional name layout params)
+  (if name
+      (setq transient--prefix (transient--init-prefix name params))
+    (setq name (oref transient--prefix command)))
+  (setq transient--refreshp (oref transient--prefix refresh-suffixes))
+  (setq transient--layout
+        (or (and (not transient--refreshp) layout)
+            (transient--init-suffixes name)))
+  (setq transient--suffixes (transient--flatten-suffixes transient--layout))
+  (slot-makeunbound transient--prefix 'value))
+
+(defun transient--init-prefix (name &optional params)
+  (let ((obj (let ((proto (get name 'transient--prefix)))
+               (apply #'clone proto
+                      :prototype proto
+                      :level (or (alist-get t (alist-get name transient-levels))
+                                 transient-default-level)
+                      params))))
+    (transient-init-value  obj)
+    (transient-init-return obj)
+    (transient-init-scope  obj)
+    obj))
+
+(defun transient--init-suffixes (name)
+  (let ((levels (alist-get name transient-levels)))
+    (mapcan (##transient--init-child levels % nil)
+            (append (transient--get-children name)
+                    (and (not transient--editp)
+                         (transient--get-children
+                          'transient-common-commands))))))
+
+(defun transient--flatten-suffixes (layout)
+  (nreverse
+   (named-let flatten ((def layout))
+     (cond ((stringp def) nil)
+           ((cl-typep def 'transient-information) nil)
+           ((listp def) (mapcan #'flatten def))
+           ((cl-typep def 'transient-group)
+            (mapcan #'flatten (oref def suffixes)))
+           ((cl-typep def 'transient-suffix)
+            (list def))))))
+
+(defun transient--init-child (levels spec parent)
+  (cl-etypecase spec
+    (symbol (mapcan (##transient--init-child levels % parent)
+                    (transient--get-children spec)))
+    (vector (transient--init-group  levels spec parent))
+    (list   (transient--init-suffix levels spec parent))
+    (string (list spec))))
+
+(defun transient--init-group (levels spec parent)
+  (pcase-let* ((`[,class ,args ,children] spec)
+               (level (or (plist-get args :level)
+                          transient--default-child-level)))
+    (and-let* ((_(transient--use-level-p level))
+               (obj (apply class :parent parent :level level args))
+               (_(transient--use-suffix-p obj))
+               (_(prog1 t
+                   (when (transient--inapt-suffix-p obj)
+                     (oset obj inapt t))))
+               (suffixes (mapcan (##transient--init-child levels % obj)
+                                 (transient-setup-children obj children))))
+      (progn
+        (oset obj suffixes suffixes)
+        (list obj)))))
+
+(defun transient--init-suffix (levels spec parent)
+  (let* ((class  (car spec))
+         (args   (cdr spec))
+         (cmd    (plist-get args :command))
+         (_      (transient--load-command-if-autoload cmd))
+         (key    (plist-get args :key))
+         (key    (and key (kbd key)))
+         (proto  (and cmd (transient--suffix-prototype cmd)))
+         (level  (or (alist-get (cons cmd key) levels nil nil #'equal)
+                     (alist-get cmd levels)
+                     (plist-get args :level)
+                     (and proto (oref proto level))
+                     transient--default-child-level))
+         (args   (plist-put (copy-sequence args) :level level))
+         (obj    (if (child-of-class-p class 'transient-information)
+                     (apply class :parent parent args)
+                   (unless (and cmd (symbolp cmd))
+                     (error "BUG: Non-symbolic suffix command: %s" cmd))
+                   (if proto
+                       (apply #'clone proto :parent parent args)
+                     (apply class :command cmd :parent parent args))))
+         (active (and (transient--use-level-p level)
+                      (transient--use-suffix-p obj)))
+         (inapt  (and active (transient--inapt-suffix-p obj)))
+         (active (and active (not inapt))))
+    (cond (inapt
+           (oset obj inapt t))
+          ((not active)
+           (oset obj inactive t)))
+    (cond ((not cmd))
+          ((commandp cmd))
+          ((or (cl-typep obj 'transient-switch)
+               (cl-typep obj 'transient-option))
+           ;; As a temporary special case, if the package was compiled
+           ;; with an older version of Transient, then we must define
+           ;; "anonymous" switch and option commands here.
+           (defalias cmd #'transient--default-infix-command))
+          (active
+           (error "Suffix command %s is not defined or autoloaded" cmd)))
+    (cond ((not (cl-typep obj 'transient-information))
+           (transient--init-suffix-key obj)
+           (transient-init-scope obj)
+           (transient-init-value obj)))
+    (list obj)))
+
+(cl-defmethod transient--init-suffix-key ((obj transient-suffix))
+  (unless (slot-boundp obj 'key)
+    (error "No key for %s" (oref obj command))))
+
+(cl-defmethod transient--init-suffix-key ((obj transient-argument))
+  (if (transient-switches--eieio-childp obj)
+      (cl-call-next-method obj)
+    (when-let* ((_(not (slot-boundp obj 'shortarg)))
+                (argument (oref obj argument))
+                (_(stringp argument))
+                (shortarg (transient--derive-shortarg argument)))
+      (oset obj shortarg shortarg))
+    (unless (slot-boundp obj 'key)
+      (if (slot-boundp obj 'shortarg)
+          (oset obj key (oref obj shortarg))
+        (error "No key for %s" (oref obj command))))))
+
+(defun transient--use-level-p (level &optional edit)
+  (or transient--all-levels-p
+      (and transient--editp (not edit))
+      (and (>= level 1)
+           (<= level (oref transient--prefix level)))))
+
+(defun transient--use-suffix-p (obj)
+  (let ((transient--shadowed-buffer (current-buffer))
+        (transient--pending-suffix obj))
+    (transient--do-suffix-p
+     (oref obj if)
+     (oref obj if-not)
+     (oref obj if-nil)
+     (oref obj if-non-nil)
+     (oref obj if-mode)
+     (oref obj if-not-mode)
+     (oref obj if-derived)
+     (oref obj if-not-derived)
+     t)))
+
+(defun transient--inapt-suffix-p (obj)
+  (or (and$ (oref obj parent)
+            (oref $ inapt))
+      (let ((transient--shadowed-buffer (current-buffer))
+            (transient--pending-suffix obj))
+        (transient--do-suffix-p
+         (oref obj inapt-if)
+         (oref obj inapt-if-not)
+         (oref obj inapt-if-nil)
+         (oref obj inapt-if-non-nil)
+         (oref obj inapt-if-mode)
+         (oref obj inapt-if-not-mode)
+         (oref obj inapt-if-derived)
+         (oref obj inapt-if-not-derived)
+         nil))))
+
+(defun transient--do-suffix-p
+    (if if-not if-nil if-non-nil if-mode if-not-mode if-derived if-not-derived
+        default)
+  (cond
+    (if                  (funcall if))
+    (if-not         (not (funcall if-not)))
+    (if-non-nil          (symbol-value if-non-nil))
+    (if-nil         (not (symbol-value if-nil)))
+    (if-mode             (if (atom if-mode)
+                             (eq major-mode if-mode)
+                           (memq major-mode if-mode)))
+    (if-not-mode    (not (if (atom if-not-mode)
+                             (eq major-mode if-not-mode)
+                           (memq major-mode if-not-mode))))
+    (if-derived          (if (or (atom if-derived)
+                                 (>= emacs-major-version 30))
+                             (derived-mode-p if-derived)
+                           (apply #'derived-mode-p if-derived)))
+    (if-not-derived (not (if (or (atom if-not-derived)
+                                 (>= emacs-major-version 30))
+                             (derived-mode-p if-not-derived)
+                           (apply #'derived-mode-p if-not-derived))))
+    (default)))
+
+(defun transient--suffix-predicate (spec)
+  (let ((props (transient--suffix-props spec)))
+    (seq-some (lambda (prop)
+                (and$ (plist-get props prop)
+                      (list prop $)))
+              '( :if :if-not
+                 :if-nil :if-non-nil
+                 :if-mode :if-not-mode
+                 :if-derived :if-not-derived
+                 :inapt-if :inapt-if-not
+                 :inapt-if-nil :inapt-if-non-nil
+                 :inapt-if-mode :inapt-if-not-mode
+                 :inapt-if-derived :inapt-if-not-derived))))
+
+(defun transient--load-command-if-autoload (cmd)
+  (when-let* ((_(symbolp cmd))
+              (fn (symbol-function cmd))
+              (_(autoloadp fn)))
+    (transient--debug "   autoload %s" cmd)
+    (autoload-do-load fn)))
+
+;;; Flow-Control
+
+(defun transient--setup-transient ()
+  (transient--debug 'setup-transient)
+  (transient--push-keymap 'transient--transient-map)
+  (transient--push-keymap 'transient--redisplay-map)
+  (add-hook 'pre-command-hook  #'transient--pre-command 99)
+  (add-hook 'post-command-hook #'transient--post-command)
+  (advice-add 'recursive-edit :around #'transient--recursive-edit)
+  (transient--quit-kludge 'enable)
+  (when transient--exitp
+    ;; This prefix command was invoked as the suffix of another.
+    ;; Prevent `transient--post-command' from removing the hooks
+    ;; that we just added.
+    (setq transient--exitp 'replace)))
+
+(defun transient--refresh-transient ()
+  (transient--debug 'refresh-transient)
+  (transient--pop-keymap 'transient--predicate-map)
+  (transient--pop-keymap 'transient--transient-map)
+  (transient--pop-keymap 'transient--redisplay-map)
+  (transient--init-transient)
+  (transient--push-keymap 'transient--transient-map)
+  (transient--push-keymap 'transient--redisplay-map)
+  (transient--redisplay))
+
+(defun transient--pre-command ()
+  (transient--debug 'pre-command)
+  (transient--with-emergency-exit :pre-command
+    ;; The use of `overriding-terminal-local-map' does not prevent the
+    ;; lookup of command remappings in the overridden maps, which can
+    ;; lead to a suffix being remapped to a non-suffix.  We have to undo
+    ;; the remapping in that case.  However, remapping a non-suffix to
+    ;; another should remain possible.
+    (when (and (transient--get-pre-command this-original-command nil 'suffix)
+               (not (transient--get-pre-command this-command nil 'suffix)))
+      (setq this-command this-original-command))
+    (cond
+      ((memq this-command '(transient-update transient-quit-seq))
+       (transient--pop-keymap 'transient--redisplay-map))
+      ((and transient--helpp
+            (not (memq this-command transient--quit-commands)))
+       (cond
+         ((transient-help)
+          (transient--do-suspend)
+          (setq this-command 'transient-suspend)
+          (transient--pre-exit))
+         ((not (transient--edebug-command-p))
+          (setq this-command 'transient-undefined))))
+      ((and transient--editp
+            (transient-suffix-object)
+            (not (memq this-command
+                       (cons 'transient-help transient--quit-commands))))
+       (setq this-command 'transient-set-level)
+       (transient--wrap-command))
+      (t
+       (setq transient--exitp nil)
+       (let ((exitp (eq (transient--call-pre-command) transient--exit)))
+         (transient--wrap-command)
+         (when exitp
+           (transient--maybe-set-value 'exit)
+           (transient--pre-exit)))))
+    (when (and (eq (selected-window) transient--window)
+               (not (eq transient--pre-command 'transient--do-mouse)))
+      (select-window transient--original-window))))
+
+(defun transient--pre-exit ()
+  (transient--debug 'pre-exit)
+  (transient--delete-window)
+  (transient--timer-cancel)
+  (transient--pop-keymap 'transient--transient-map)
+  (transient--pop-keymap 'transient--redisplay-map)
+  (unless transient--showp
+    (let ((message-log-max nil))
+      (message "")))
+  (setq transient--transient-map nil)
+  (setq transient--predicate-map nil)
+  (setq transient--redisplay-map nil)
+  (setq transient--redisplay-key nil)
+  (setq transient--helpp nil)
+  (unless (eq transient--docsp 'permanent)
+    (setq transient--docsp nil))
+  (setq transient--editp nil)
+  (setq transient--pre-command nil)
+  (setq transient--prefix nil)
+  (setq transient--layout nil)
+  (setq transient--suffixes nil)
+  (setq transient--original-window nil)
+  (setq transient--original-buffer nil)
+  (setq transient--window nil))
+
+(defun transient--export ()
+  (setq transient-current-prefix transient--prefix)
+  (setq transient-current-command (oref transient--prefix command))
+  (setq transient-current-suffixes transient--suffixes)
+  (unless (transient--maybe-set-value 'export)
+    (transient--history-push transient--prefix)))
+
+(defun transient--suspend-override (&optional nohide)
+  (transient--debug 'suspend-override)
+  (transient--timer-cancel)
+  (let ((show (transient--preserve-window-p nohide)))
+    (cond ((not show)
+           (transient--delete-window))
+          ((and transient--prefix transient--redisplay-key)
+           (setq transient--redisplay-key nil)
+           (when transient--showp
+             (if-let ((win (minibuffer-selected-window)))
+                 (with-selected-window win
+                   (transient--show))
+               (transient--show)))))
+    (when (and (window-live-p transient--window)
+               (and show
+                    (or (not (eq show 'fixed))
+                        (window-full-height-p transient--window))))
+      (set-window-parameter transient--window 'window-preserved-size
+                            (list (window-buffer transient--window) nil nil))))
+  (transient--pop-keymap 'transient--transient-map)
+  (transient--pop-keymap 'transient--redisplay-map)
+  (remove-hook 'pre-command-hook  #'transient--pre-command)
+  (remove-hook 'post-command-hook #'transient--post-command))
+
+(defun transient--resume-override (&optional _ignore)
+  (transient--debug 'resume-override)
+  (when (window-live-p transient--window)
+    (transient--fit-window-to-buffer transient--window))
+  (transient--push-keymap 'transient--transient-map)
+  (transient--push-keymap 'transient--redisplay-map)
+  (add-hook 'pre-command-hook  #'transient--pre-command)
+  (add-hook 'post-command-hook #'transient--post-command))
+
+(defun transient--recursive-edit (fn)
+  (transient--debug 'recursive-edit)
+  (if (not transient--prefix)
+      (funcall fn)
+    (transient--suspend-override (bound-and-true-p edebug-active))
+    (condition-case err
+        (unwind-protect
+            (funcall fn)
+          (cond
+            ((memq this-command '(top-level abort-recursive-edit))
+             (setq transient--exitp t)
+             (transient--post-exit this-command)
+             (transient--delete-window)
+             (transient--debug "     abort recursive-edit and menu "))
+            (transient--prefix
+             (transient--resume-override)
+             (transient--debug "     exit recursive-edit and resumed menu"))))
+      (error (if (and (eq (car err) 'error)
+                      (stringp (cadr err))
+                      (string-prefix-p "Abort" (cadr err)))
+                 (message "%s" (cadr err))
+               (message "transient--recursive-edit: %S" err))))))
+
+(defmacro transient--with-suspended-override (&rest body)
+  (let ((depth (make-symbol "depth"))
+        (setup (make-symbol "setup"))
+        (exit  (make-symbol "exit")))
+    `(if (and transient--transient-map
+              (memq transient--transient-map
+                    overriding-terminal-local-map))
+         (let ((,depth (1+ (minibuffer-depth))) ,setup ,exit)
+           (setq ,setup
+                 (lambda () "@transient--with-suspended-override"
+                   (transient--debug 'minibuffer-setup)
+                   (remove-hook 'minibuffer-setup-hook ,setup)
+                   (transient--suspend-override)))
+           (setq ,exit
+                 (lambda () "@transient--with-suspended-override"
+                   (transient--debug 'minibuffer-exit)
+                   (when (= (minibuffer-depth) ,depth)
+                     (transient--resume-override))))
+           (unwind-protect
+               (progn
+                 (add-hook 'minibuffer-setup-hook ,setup)
+                 (add-hook 'minibuffer-exit-hook ,exit)
+                 ,@body)
+             (remove-hook 'minibuffer-setup-hook ,setup)
+             (remove-hook 'minibuffer-exit-hook ,exit)))
+       ,@body)))
+
+(defun transient--wrap-command ()
+  (transient--load-command-if-autoload this-command)
+  (static-if (>= emacs-major-version 30)
+      (letrec
+          ((command this-command)
+           (suffix (transient-suffix-object this-command))
+           (prefix transient--prefix)
+           (advice
+            (lambda (fn &rest args)
+              (interactive
+                (lambda (spec)
+                  (let ((abort t))
+                    (unwind-protect
+                        (prog1 (let ((debugger #'transient--exit-and-debug))
+                                 (if-let* ((obj suffix)
+                                           (grp (oref obj parent))
+                                           (adv (or (oref obj advice*)
+                                                    (oref grp advice*))))
+                                     (funcall
+                                      adv #'advice-eval-interactive-spec spec)
+                                   (advice-eval-interactive-spec spec)))
+                          (setq abort nil))
+                      (when abort
+                        (when-let ((unwind (oref prefix unwind-suffix)))
+                          (transient--debug 'unwind-interactive)
+                          (funcall unwind command))
+                        (when (symbolp command)
+                          (remove-function (symbol-function command) advice))
+                        (oset prefix unwind-suffix nil))))))
+              (unwind-protect
+                  (let ((debugger #'transient--exit-and-debug))
+                    (if-let* ((obj suffix)
+                              (grp (oref obj parent))
+                              (adv (or (oref obj advice)
+                                       (oref obj advice*)
+                                       (oref grp advice)
+                                       (oref grp advice*))))
+                        (apply adv fn args)
+                      (apply fn args)))
+                (when-let ((unwind (oref prefix unwind-suffix)))
+                  (transient--debug 'unwind-command)
+                  (funcall unwind command))
+                (when (symbolp command)
+                  (remove-function (symbol-function command) advice))
+                (oset prefix unwind-suffix nil)))))
+        (transient--advise-this-command advice)
+        (cl-assert
+         (>= emacs-major-version 30) nil
+         "Emacs was downgraded, making it necessary to recompile Transient"))
+    ;; (< emacs-major-version 30)
+    (let* ((command this-command)
+           (suffix (transient-suffix-object this-command))
+           (prefix transient--prefix)
+           (advice nil)
+           (advice-interactive
+            (lambda (spec)
+              (let ((abort t))
+                (unwind-protect
+                    (prog1 (let ((debugger #'transient--exit-and-debug))
+                             (if-let* ((obj suffix)
+                                       (grp (oref obj parent))
+                                       (adv (or (oref obj advice*)
+                                                (oref grp advice*))))
+                                 (funcall
+                                  adv #'advice-eval-interactive-spec spec)
+                               (advice-eval-interactive-spec spec)))
+                      (setq abort nil))
+                  (when abort
+                    (when-let ((unwind (oref prefix unwind-suffix)))
+                      (transient--debug 'unwind-interactive)
+                      (funcall unwind command))
+                    (when (symbolp command)
+                      (remove-function (symbol-function command) advice))
+                    (oset prefix unwind-suffix nil))))))
+           (advice-body
+            (lambda (fn &rest args)
+              (unwind-protect
+                  (let ((debugger #'transient--exit-and-debug))
+                    (if-let* ((obj suffix)
+                              (grp (oref obj parent))
+                              (adv (or (oref obj advice)
+                                       (oref obj advice*)
+                                       (oref grp advice)
+                                       (oref grp advice*))))
+                        (apply adv fn args)
+                      (apply fn args)))
+                (when-let ((unwind (oref prefix unwind-suffix)))
+                  (transient--debug 'unwind-command)
+                  (funcall unwind command))
+                (when (symbolp command)
+                  (remove-function (symbol-function command) advice))
+                (oset prefix unwind-suffix nil)))))
+      (setq advice `(lambda (fn &rest args)
+                      (interactive ,advice-interactive)
+                      (apply ',advice-body fn args)))
+      (transient--advise-this-command advice))))
+
+(defun transient--advise-this-command (advice)
+  "Add ADVICE around `this-command'.
+If possible add the advice to the value of `this-command' instead of
+the symbol directly, so the command's identity does not get obfuscated.
+For primitive and anonymous functions that isn't possible, so fall back
+to advising via the symbol in those cases."
+  (add-function
+   :around (if (and (symbolp this-command)
+                    (not (subr-primitive-p (symbol-function this-command))))
+               (symbol-function this-command)
+             this-command)
+   advice '((depth . -99))))
+
+(defun transient--premature-post-command ()
+  (and (equal (this-command-keys-vector) [])
+       (= (minibuffer-depth)
+          (1+ transient--minibuffer-depth))
+       (progn
+         (transient--debug 'premature-post-command)
+         (transient--suspend-override)
+         (oset (or transient--prefix transient-current-prefix)
+               unwind-suffix
+               (if transient--exitp
+                   #'transient--post-exit
+                 #'transient--resume-override))
+         t)))
+
+(defun transient--post-command ()
+  (unless (transient--premature-post-command)
+    (transient--debug 'post-command)
+    (transient--with-emergency-exit :post-command
+      (cond (transient--exitp (transient--post-exit))
+            ;; If `this-command' is the current transient prefix, then we
+            ;; have already taken care of updating the transient buffer...
+            ((and (eq this-command (oref transient--prefix command))
+                  ;; ... but if `prefix-arg' is non-nil, then the values
+                  ;; of `this-command' and `real-this-command' are untrue
+                  ;; because `prefix-command-preserve-state' changes them.
+                  ;; We cannot use `current-prefix-arg' because it is set
+                  ;; too late (in `command-execute'), and if it were set
+                  ;; earlier, then we likely still would not be able to
+                  ;; rely on it, and `prefix-command-preserve-state-hook'
+                  ;; would have to be used to record that a universal
+                  ;; argument is in effect.
+                  (not prefix-arg)))
+            (transient--refreshp
+             (transient--env-apply #'transient--refresh-transient))
+            ((let ((old transient--redisplay-map)
+                   (new (transient--make-redisplay-map)))
+               (unless (equal old new)
+                 (transient--pop-keymap 'transient--redisplay-map)
+                 (setq transient--redisplay-map new)
+                 (transient--push-keymap 'transient--redisplay-map))
+               (transient--env-apply #'transient--redisplay)))))
+    (setq transient-current-prefix nil)
+    (setq transient-current-command nil)
+    (setq transient-current-suffixes nil)
+    (setq transient--current-suffix nil)))
+
+(defun transient--post-exit (&optional command)
+  (transient--debug 'post-exit)
+  (unless (and (eq transient--exitp 'replace)
+               (or transient--prefix
+                   ;; The current command could act as a prefix,
+                   ;; but decided not to call `transient-setup',
+                   ;; or it is prevented from doing so because it
+                   ;; uses the minibuffer and the user aborted
+                   ;; that.
+                   (prog1 nil
+                     (if (let ((obj (transient-suffix-object command)))
+                           (and (slot-boundp obj 'transient)
+                                (oref obj transient)))
+                         ;; This sub-prefix is a transient suffix;
+                         ;; go back to outer prefix, by calling
+                         ;; `transient--stack-pop' further down.
+                         (setq transient--exitp nil)
+                       (transient--stack-zap)))))
+    (remove-hook 'pre-command-hook  #'transient--pre-command)
+    (remove-hook 'post-command-hook #'transient--post-command)
+    (advice-remove 'recursive-edit #'transient--recursive-edit))
+  (let ((replace (eq transient--exitp 'replace))
+        (resume (and transient--stack
+                     (not (memq transient--exitp '(replace suspend))))))
+    (unless (or resume replace)
+      (setq transient--showp nil))
+    (setq transient--exitp nil)
+    (setq transient--helpp nil)
+    (setq transient--editp nil)
+    (setq transient--all-levels-p nil)
+    (setq transient--minibuffer-depth 0)
+    (run-hooks 'transient-exit-hook)
+    (when command
+      (setq transient-current-prefix nil)
+      (setq transient-current-command nil)
+      (setq transient-current-suffixes nil)
+      (setq transient--current-suffix nil))
+    (cond (resume (transient--stack-pop))
+          ((not replace)
+           (transient--quit-kludge 'disable)
+           (run-hooks 'transient-post-exit-hook)))))
+
+(defun transient--stack-push ()
+  (transient--debug 'stack-push)
+  (push (list (oref transient--prefix command)
+              transient--layout
+              transient--editp
+              :value  (transient--get-extended-value)
+              :return (oref transient--prefix return)
+              :scope  (oref transient--prefix scope))
+        transient--stack))
+
+(defun transient--stack-pop ()
+  (transient--debug 'stack-pop)
+  (and transient--stack
+       (prog1 t (apply #'transient-setup (pop transient--stack)))))
+
+(defun transient--stack-zap ()
+  (transient--debug 'stack-zap)
+  (setq transient--stack nil))
+
+(defun transient--redisplay ()
+  (cond
+    ((or (eq transient-show-menu t)
+         transient--showp)
+     (unless (or (eq transient--pre-command 'transient--do-move)
+                 (eq transient--pre-command 'transient--do-scroll)
+                 (and (or (eq transient--pre-command 'transient--do-mouse)
+                          (eq (event-basic-type last-command-event)
+                              'mouse-movement))
+                      (eq (current-buffer) transient--buffer)))
+       (transient--show))
+     (when (and transient-select-menu-window
+                (not (eq (selected-window) transient--window))
+                (not (eq transient--pre-command 'transient--do-mouse)))
+       (select-window transient--window)))
+    (t
+     (when (and (numberp transient-show-menu)
+                (not (zerop transient-show-menu))
+                (not transient--timer))
+       (transient--timer-start))
+     (transient--show-hint))))
+
+(defun transient--timer-start ()
+  (setq transient--timer
+        (run-at-time (abs transient-show-menu) nil
+                     (lambda ()
+                       (transient--timer-cancel)
+                       (transient--show)
+                       (let ((message-log-max nil))
+                         (message ""))))))
+
+(defun transient--timer-cancel ()
+  (when transient--timer
+    (cancel-timer transient--timer)
+    (setq transient--timer nil)))
+
+(defun transient--debug (arg &rest args)
+  (when transient--debug
+    (let ((inhibit-message (not (eq transient--debug 'message))))
+      (if (symbolp arg)
+          (message "-- %-22s (cmd: %s, event: %S, exit: %s%s)"
+                   arg
+                   (cond ((and (symbolp this-command) this-command))
+                         ((fboundp 'help-fns-function-name)
+                          (help-fns-function-name this-command))
+                         ((byte-code-function-p this-command)
+                          "#[...]")
+                         (this-command))
+                   (key-description (this-command-keys-vector))
+                   transient--exitp
+                   (cond ((keywordp (car args))
+                          (format ", from: %s"
+                                  (substring (symbol-name (car args)) 1)))
+                         ((stringp (car args))
+                          (concat ", " (apply #'format args)))
+                         ((functionp (car args))
+                          (concat ", " (apply (car args) (cdr args))))
+                         ("")))
+        (apply #'message arg args)))))
+
+(defun transient--emergency-exit (&optional id)
+  "Exit the current transient command after an error occurred.
+When no transient is active (i.e., when `transient--prefix' is
+nil) then only reset `inhibit-quit'.  Optional ID is a keyword
+identifying the exit."
+  (transient--debug 'emergency-exit id)
+  (transient--quit-kludge 'disable)
+  (when transient--prefix
+    (setq transient--stack nil)
+    (setq transient--exitp t)
+    (transient--pre-exit)
+    (transient--post-exit this-command)))
+
+(defun transient--quit-kludge (action)
+  ;; Fixing the bug that makes this kludge necessary was proposed in
+  ;; https://yhetil.org/emacs-bugs/m1ikl4iqtg.fsf@dancol.org/, but it
+  ;; does not look like that's gonna be merged any time soon.  See also
+  ;; https://github.com/magit/transient/commit/45fbefdc5b112f0a15cd9365.
+  (static-if (boundp 'redisplay-can-quit)
+      action
+    (pcase-exhaustive action
+      ('enable
+       (add-function
+        :around command-error-function
+        (let (unreadp)
+          (lambda (orig data context fn)
+            (cond ((not (eq (car data) 'quit))
+                   (funcall orig data context fn)
+                   (setq unreadp nil))
+                  (unreadp
+                   (remove-function command-error-function "inhibit-quit")
+                   (funcall orig data context fn))
+                  (t
+                   (push ?\C-g unread-command-events)
+                   (setq unreadp t)))))
+        '((name . "inhibit-quit"))))
+      ('disable
+       (remove-function command-error-function "inhibit-quit")))))
+
+;;; Pre-Commands
+
+(defun transient--call-pre-command ()
+  (cond-let
+    ([fn (transient--get-pre-command this-command (this-command-keys-vector))]
+     (setq transient--pre-command fn)
+     (let ((action (funcall fn)))
+       (when (eq action transient--exit)
+         (setq transient--exitp (or transient--exitp t)))
+       action))
+    ((let ((keys (this-command-keys-vector)))
+       (eq (aref keys (1- (length keys))) ?\C-g))
+     (transient--do-noop))
+    ((transient--edebug-command-p)
+     (transient--do-stay))
+    ((transient--do-warn))))
+
+(defun transient--get-pre-command (&optional cmd key enforce-type)
+  (or (and (not (eq enforce-type 'non-suffix))
+           (symbolp cmd)
+           (or (and key
+                    (let ((def (lookup-key transient--predicate-map
+                                           (vconcat key (list cmd)))))
+                      (and (symbolp def) def)))
+               (lookup-key transient--predicate-map (vector cmd))))
+      (and (not (eq enforce-type 'suffix))
+           (if (equal (event-basic-type last-command-event) 'mouse-movement)
+               ;; `this-command' is most likely the anonymous
+               ;; drag command defined inside `mouse-drag-track'.
+               'transient--do-mouse
+             (transient--resolve-pre-command
+              (oref transient--prefix transient-non-suffix)
+              t)))))
+
+(defun transient--resolve-pre-command (pre &optional resolve-boolean correct)
+  (setq pre (cond ((booleanp pre)
+                   (if resolve-boolean
+                       (if pre #'transient--do-stay #'transient--do-warn)
+                     pre))
+                  ((string-match-p "--do-" (symbol-name pre)) pre)
+                  ((let ((sym (intern (format "transient--do-%s" pre))))
+                     (if (functionp sym) sym pre)))))
+  (cond ((not correct) pre)
+        ((and (eq pre 'transient--do-return)
+              (not transient--stack))
+         'transient--do-exit)
+        (pre)))
+
+(defun transient--do-stay ()
+  "Call the command without exporting variables and stay transient."
+  (setq transient--pre-command 'transient--do-stay)
+  transient--stay)
+
+(defun transient--do-noop ()
+  "Call `transient-noop' and stay transient."
+  (setq transient--pre-command 'transient--do-noop)
+  (setq this-command 'transient-noop)
+  transient--stay)
+
+(defun transient--do-warn ()
+  "Call `transient-undefined' and stay transient."
+  (setq transient--pre-command 'transient--do-warn)
+  (setq this-command 'transient-undefined)
+  transient--stay)
+
+(defun transient--do-warn-inapt ()
+  "Call `transient-inapt' and stay transient."
+  (setq this-command 'transient-inapt)
+  transient--stay)
+
+(defun transient--do-call ()
+  "Call the command after exporting variables and stay transient."
+  (transient--export)
+  transient--stay)
+
+(defun transient--do-return ()
+  "Call the command after exporting variables and return to parent prefix.
+If there is no parent prefix, then behave like `transient--do-exit'."
+  (if (not transient--stack)
+      (transient--do-exit)
+    (transient--export)
+    transient--exit))
+
+(defun transient--do-exit ()
+  "Call the command after exporting variables and exit the transient."
+  (transient--export)
+  (transient--stack-zap)
+  transient--exit)
+
+(defun transient--do-leave ()
+  "Call the command without exporting variables and exit the transient."
+  (transient--stack-zap)
+  transient--exit)
+
+(defun transient--do-push-button ()
+  "Call the command represented by the activated button.
+Use that command's pre-command to determine transient behavior."
+  (with-selected-window transient--window
+    (cond-let*
+      ([pos (if (mouse-event-p last-command-event)
+                (posn-point (event-start last-command-event))
+              (point))]
+       [obj (get-text-property pos 'button-data)]
+       [_(cl-typep obj '(and transient-suffix (not transient-information)))]
+       (setq this-command (oref obj command))
+       (setq transient--current-suffix obj)
+       (transient--call-pre-command))
+      (transient--stay))))
+
+(defun transient--do-recurse ()
+  "Call the transient prefix command, preparing for return to outer transient.
+If there is no parent prefix, then just call the command."
+  (transient--do-stack))
+
+(defun transient--do-stack ()
+  "Call the transient prefix command, stacking the active transient.
+Push the active transient to the transient stack."
+  (transient--export)
+  (transient--stack-push)
+  (setq transient--exitp 'replace)
+  transient--exit)
+
+(defun transient--do-replace ()
+  "Call the transient prefix command, replacing the active transient.
+Do not push the active transient to the transient stack."
+  (transient--export)
+  (setq transient--exitp 'replace)
+  transient--exit)
+
+(defun transient--do-suspend ()
+  "Suspend the active transient, saving the transient stack."
+  ;; Export so that `transient-describe' instances can use
+  ;; `transient-suffix-object' to get their respective object.
+  (transient--export)
+  (transient--stack-push)
+  (setq transient--exitp 'suspend)
+  transient--exit)
+
+(defun transient--do-quit-one ()
+  "If active, quit help or edit mode, else exit the active transient."
+  (cond (transient--helpp
+         (setq transient--helpp nil)
+         transient--stay)
+        (transient--editp
+         (setq transient--editp nil)
+         (transient-setup)
+         transient--stay)
+        (prefix-arg
+         transient--stay)
+        (transient--exit)))
+
+(defun transient--do-quit-all ()
+  "Exit all transients without saving the transient stack."
+  (transient--stack-zap)
+  transient--exit)
+
+(defun transient--do-move ()
+  "Call the command if `transient-enable-menu-navigation' is non-nil.
+In that case behave like `transient--do-stay', otherwise similar
+to `transient--do-warn'."
+  (unless transient-enable-menu-navigation
+    (setq this-command 'transient-inhibit-move))
+  transient--stay)
+
+(defun transient--do-scroll ()
+  "Call the scroll command without exporting variables and stay transient."
+  transient--stay)
+
+(defun transient--do-mouse ()
+  "Call the mouse command without exporting variables and stay transient."
+  transient--stay)
+
+(defun transient--do-minus ()
+  "Call `negative-argument' or pivot to `transient-update'.
+If `negative-argument' is invoked using \"-\" then preserve the
+prefix argument and pivot to `transient-update'."
+  (when (equal (this-command-keys) "-")
+    (setq this-command 'transient-update))
+  transient--stay)
+
+(put 'transient--do-stay       'transient-face 'transient-key-stay)
+(put 'transient--do-noop       'transient-face 'transient-key-noop)
+(put 'transient--do-warn       'transient-face 'transient-key-noop)
+(put 'transient--do-warn-inapt 'transient-face 'transient-key-noop)
+(put 'transient--do-call       'transient-face 'transient-key-stay)
+(put 'transient--do-return     'transient-face 'transient-key-return)
+(put 'transient--do-exit       'transient-face 'transient-key-exit)
+(put 'transient--do-leave      'transient-face 'transient-key-exit)
+
+(put 'transient--do-recurse    'transient-face 'transient-key-recurse)
+(put 'transient--do-stack      'transient-face 'transient-key-stack)
+(put 'transient--do-replace    'transient-face 'transient-key-exit)
+(put 'transient--do-suspend    'transient-face 'transient-key-exit)
+
+(put 'transient--do-quit-one   'transient-face 'transient-key-return)
+(put 'transient--do-quit-all   'transient-face 'transient-key-exit)
+(put 'transient--do-move       'transient-face 'transient-key-stay)
+(put 'transient--do-minus      'transient-face 'transient-key-stay)
+
+;;; Commands
+;;;; Noop
+
+(defun transient-noop ()
+  "Do nothing at all."
+  (interactive))
+
+(defun transient-undefined ()
+  "Warn the user that the pressed key is not bound to any suffix."
+  (interactive)
+  (transient--invalid "Unbound suffix"))
+
+(defun transient-inapt ()
+  "Warn the user that the invoked command is inapt."
+  (interactive)
+  (transient--invalid "Inapt command"))
+
+(defun transient--invalid (msg)
+  (ding)
+  (message "%s: `%s' (Use `%s' to abort, `%s' for help)%s"
+           msg
+           (propertize (key-description (this-single-command-keys))
+                       'face 'font-lock-warning-face)
+           (propertize "C-g" 'face 'transient-key)
+           (propertize "?"   'face 'transient-key)
+           ;; `this-command' is `transient-undefined' or `transient-inapt'.
+           ;; Show the command (`this-original-command') the user actually
+           ;; tried to invoke.
+           (if-let ((cmd (or (ignore-errors (symbol-name this-original-command))
+                             (ignore-errors (symbol-name this-command)))))
+               (format " [%s]" (propertize cmd 'face 'font-lock-warning-face))
+             ""))
+  (unless (and transient--transient-map
+               (memq transient--transient-map overriding-terminal-local-map))
+    (let ((transient--prefix (or transient--prefix 'sic)))
+      (transient--emergency-exit))
+    (view-lossage)
+    (other-window 1)
+    (display-warning 'transient "Inconsistent transient state detected.
+This should never happen.
+Please open an issue and post the shown command log." :error)))
+
+(defun transient-inhibit-move ()
+  "Warn the user that menu navigation is disabled."
+  (interactive)
+  (message "To enable use of `%s', please customize `%s'"
+           this-original-command
+           'transient-enable-menu-navigation))
+
+;;;; Core
+
+(defun transient-quit-all ()
+  "Exit all transients without saving the transient stack."
+  (interactive))
+
+(defun transient-quit-one ()
+  "Exit the current transients, returning to outer transient, if any."
+  (interactive))
+
+(defun transient-quit-seq ()
+  "Abort the current incomplete key sequence."
+  (interactive))
+
+(defun transient-update ()
+  "Redraw the transient's state in the menu buffer."
+  (interactive)
+  (setq prefix-arg current-prefix-arg))
+
+(defun transient-show ()
+  "Show the transient's state in the menu buffer."
+  (interactive)
+  (setq transient--showp t))
+
+(defun transient-push-button ()
+  "Invoke the suffix command represented by this button."
+  (interactive))
+
+;;;; Suspend
+
+(defun transient-suspend ()
+  "Suspend the current transient.
+It can later be resumed using `transient-resume', while no other
+transient is active."
+  (interactive))
+
+(define-minor-mode transient-resume-mode
+  "Auxiliary minor-mode used to resume a transient after viewing help.")
+
+(defun transient-resume ()
+  "Resume a previously suspended stack of transients."
+  (interactive)
+  (cond (transient--stack
+         (let ((winconf transient--restore-winconf))
+           (kill-local-variable 'transient--restore-winconf)
+           (when transient-resume-mode
+             (transient-resume-mode -1)
+             (quit-window))
+           (when winconf
+             (set-window-configuration winconf)))
+         (transient--stack-pop))
+        (transient-resume-mode
+         (kill-local-variable 'transient--restore-winconf)
+         (transient-resume-mode -1)
+         (quit-window))
+        (t
+         (message "No suspended transient command"))))
+
+;;;; Help
+
+(defun transient-help (&optional interactivep)
+  "Show help for the active transient or one of its suffixes.
+\n(fn)"
+  (interactive (list t))
+  (cond
+    (interactivep
+     (setq transient--helpp t))
+    ((lookup-key transient--transient-map (this-single-command-keys))
+     (setq transient--helpp nil)
+     (with-demoted-errors "transient-help: %S"
+       (transient--display-help #'transient-show-help
+                                (if (eq this-original-command 'transient-help)
+                                    transient--prefix
+                                  (or (transient-suffix-object)
+                                      this-original-command)))))))
+
+(transient-define-suffix transient-describe ()
+  "From a transient menu, describe something in another buffer.
+
+This command can be bound multiple times to describe different targets.
+Each binding must specify the thing it describes, by setting the value
+of its `target' slot, using the keyword argument `:='.
+
+The `helper' slot specifies the low-level function used to describe the
+target, and can be omitted, in which case `transient--describe-function'
+is used for a symbol, `transient--show-manual' is used for a string
+beginning with a parenthesis, and `transient--show-manpage' is used for
+any other string.
+
+For example:
+  [(\"e\" \"about emacs\" transient-describe := \"(emacs)\")
+   (\"g\" \"about git\"   transient-describe := \"git\")]"
+  :class 'transient-describe-target
+  (interactive)
+  (with-slots (helper target) (transient-suffix-object)
+    (transient--display-help helper target)))
+
+;;;; Level
+
+(defun transient-set-level (&optional command level)
+  "Set the level of the transient or one of its suffix commands."
+  (interactive
+    (let ((command this-original-command)
+          (prefix (oref transient--prefix command)))
+      (and (or (not (eq command 'transient-set-level))
+               (and transient--editp
+                    (setq command prefix)))
+           (list command
+                 (let ((keys (this-single-command-keys)))
+                   (and (lookup-key transient--transient-map keys)
+                        (progn
+                          (transient--show)
+                          (string-to-number
+                           (transient--read-number-N
+                            (format "Set level for `%s': " command)
+                            nil nil (not (eq command prefix)))))))))))
+  (cond
+    ((not command)
+     (setq transient--editp t)
+     (transient-setup))
+    (level
+     (let* ((prefix (oref transient--prefix command))
+            (alist (alist-get prefix transient-levels))
+            (akey command))
+       (cond ((eq command prefix)
+              (oset transient--prefix level level)
+              (setq akey t))
+             (t
+              (oset (transient-suffix-object command) level level)
+              (when (cdr (cl-remove-if-not (##eq (oref % command) command)
+                                           transient--suffixes))
+                (setq akey (cons command (this-command-keys))))))
+       (setf (alist-get akey alist) level)
+       (setf (alist-get prefix transient-levels) alist))
+     (transient-save-levels)
+     (transient--show))
+    (t
+     (transient-undefined))))
+
+(transient-define-suffix transient-toggle-level-limit ()
+  "Toggle whether to temporarily display suffixes on all levels."
+  :description
+  (lambda ()
+    (cond
+      (transient--all-levels-p
+       (format "Hide suffix %s"
+               (propertize
+                (format "levels > %s" (oref (transient-prefix-object) level))
+                'face 'transient-higher-level)))
+      ("Show all suffix levels")))
+  :transient t
+  (interactive)
+  (setq transient--all-levels-p (not transient--all-levels-p))
+  (setq transient--refreshp t))
+
+;;;; Value
+
+(defun transient-set ()
+  "Set active transient's value for this Emacs session."
+  (interactive)
+  (transient-set-value (transient-prefix-object)))
+
+(defalias 'transient-set-and-exit #'transient-set
+  "Set active transient's value for this Emacs session and exit.")
+
+(defun transient-save ()
+  "Save active transient's value for this and future Emacs sessions."
+  (interactive)
+  (transient-save-value (transient-prefix-object)))
+
+(defalias 'transient-save-and-exit #'transient-save
+  "Save active transient's value for this and future Emacs sessions and exit.")
+
+(defun transient-reset ()
+  "Clear the set and saved values of the active transient."
+  (interactive)
+  (transient-reset-value (transient-prefix-object)))
+
+(defun transient-history-next ()
+  "Switch to the next value used for the active transient."
+  (interactive)
+  (let* ((obj transient--prefix)
+         (pos (1- (oref obj history-pos)))
+         (hst (oref obj history)))
+    (if (< pos 0)
+        (user-error "End of history")
+      (oset obj history-pos pos)
+      (oset obj value (nth pos hst))
+      (mapc #'transient-init-value transient--suffixes))))
+
+(defun transient-history-prev ()
+  "Switch to the previous value used for the active transient."
+  (interactive)
+  (let* ((obj transient--prefix)
+         (pos (1+ (oref obj history-pos)))
+         (hst (oref obj history))
+         (len (length hst)))
+    (if (> pos (1- len))
+        (user-error "End of history")
+      (oset obj history-pos pos)
+      (oset obj value (nth pos hst))
+      (mapc #'transient-init-value transient--suffixes))))
+
+(transient-define-suffix transient-preset ()
+  "Put this preset into action."
+  :class transient-value-preset
+  (interactive)
+  (transient-prefix-set (oref (transient-suffix-object) set)))
+
+;;;; Auxiliary
+
+(transient-define-suffix transient-toggle-common ()
+  "Toggle whether common commands are permanently shown."
+  :transient t
+  :description (lambda ()
+                 (if transient-show-common-commands
+                     "Hide common commands"
+                   "Show common permanently"))
+  (interactive)
+  (setq transient-show-common-commands (not transient-show-common-commands)))
+
+(transient-define-suffix transient-toggle-docstrings (&optional permanent)
+  "Toggle whether to show docstrings instead of suffix descriptions.
+
+By default this is only enabled temporarily for the current transient
+menu invocation.  With a prefix argument, enable this until explicitly
+disabled again.
+
+Infix arguments are not affected by this, because otherwise many menus
+would likely become unreadable.  To make this command available in all
+menus, bind it in `transient-map'.  `transient-show-docstring-format'
+controls how the docstrings are displayed and whether descriptions are
+also displayed."
+  :transient t
+  (interactive (list current-prefix-arg))
+  (setq transient--docsp (if permanent 'permanent (not transient--docsp))))
+
+(defun transient-toggle-debug ()
+  "Toggle debugging statements for transient commands."
+  (interactive)
+  (setq transient--debug (not transient--debug))
+  (message "Debugging transient %s"
+           (if transient--debug "enabled" "disabled")))
+
+(defun transient-copy-menu-text ()
+  "Copy the contents of the menu buffer to the kill ring.
+To make this available in all menus, bind it in `transient-map'"
+  (interactive)
+  (transient--show)
+  (with-current-buffer (get-buffer transient--buffer-name)
+    (copy-region-as-kill (point-min) (point-max))))
+
+(transient-define-suffix transient-echo-arguments (arguments)
+  "Show the transient's active ARGUMENTS in the echo area.
+Intended for use in prefixes used for demonstration purposes,
+such as when suggesting a new feature or reporting an issue."
+  :transient t
+  :description "Echo arguments"
+  :key "x"
+  (interactive (list (transient-args transient-current-command)))
+  (if (all #'stringp arguments)
+      (message "%s: %s" (key-description (this-command-keys))
+               (mapconcat (lambda (arg)
+                            (propertize (if (string-match-p " " arg)
+                                            (format "%S" arg)
+                                          arg)
+                                        'face 'transient-argument))
+                          arguments " "))
+    (message "%s: %S" (key-description (this-command-keys)) arguments)))
+
+;;; Value
+;;;; Init
+
+(cl-defgeneric transient-init-value (obj)
+  "Set the initial value of the prefix or suffix object OBJ.
+
+This function is called for all prefix and suffix commands.
+
+Third-party subclasses of `transient-infix' must implement a primary
+method.")
+
+(cl-defmethod transient-init-value :around ((obj transient-prefix))
+  "If bound, use the value returned by OBJ' `init-value' function.
+If the value of OBJ's `init-value' is non-nil, call that function to
+determine the value.  Otherwise call the primary method according to
+OBJ's class."
+  (if (slot-boundp obj 'init-value)
+      (funcall (oref obj init-value) obj)
+    (cl-call-next-method obj)))
+
+(cl-defmethod transient-init-value :around ((obj transient-infix))
+  "If bound, use the value returned by OBJ's `init-value' function.
+If the value of OBJ's `init-value' is non-nil, call that function to
+determine the value.  Otherwise call the primary method according to
+OBJ's class."
+  (if (slot-boundp obj 'init-value)
+      (funcall (oref obj init-value) obj)
+    (cl-call-next-method obj)))
+
+(cl-defmethod transient-init-value ((obj transient-prefix))
+  "Set OBJ's initial value to the set, saved or default value.
+Use `transient-default-value' to determine the default value."
+  (if (slot-boundp obj 'value)
+      ;; Already set because the live object is cloned from
+      ;; the prototype, were the set (if any) value is stored.
+      (oref obj value)
+    (oset obj value
+          (if-let ((saved (assq (oref obj command) transient-values)))
+              (cdr saved)
+            (transient-default-value obj)))))
+
+(cl-defmethod transient-init-value ((obj transient-suffix))
+  "Non-infix suffixes usually don't have a value.
+Call `transient-default-value' but because that is a noop for
+`transient-suffix', this function is effectively also a noop."
+  (let ((value (transient-default-value obj)))
+    (unless (eq value eieio--unbound)
+      (oset obj value value))))
+
+(cl-defmethod transient-init-value ((obj transient-switch))
+  "Extract OBJ's value from the value of the prefix object."
+  (oset obj value
+        (car (member (oref obj argument)
+                     (oref transient--prefix value)))))
+
+(cl-defmethod transient-init-value ((obj transient-argument))
+  "Extract OBJ's value from the value of the prefix object."
+  (let* ((args (oref transient--prefix value))
+         (value
+          (pcase-exhaustive (oref obj multi-value)
+            ((or 't 'rest) (cdr (assoc (oref obj argument) args)))
+            ('repeat       (seq-keep (transient--extract-value obj) args))
+            ('nil          (seq-some (transient--extract-value obj) args)))))
+    (oset obj value value)
+    (when (and value (oref obj claim-argument))
+      (oset transient--prefix value
+            (seq-difference args (transient--get-wrapped-value obj))))))
+
+(defun transient--extract-value (obj)
+  (cond-let*
+    ([_(slot-exists-p obj 'argument-regexp)]
+     [regexp (oref obj argument-regexp)]
+     (lambda (arg)
+       (and (stringp arg)
+            (let ((case-fold-search nil))
+              (string-match regexp arg))
+            (match-string 1 arg))))
+    ([argument (oref obj argument)]
+     (lambda (arg)
+       (and (stringp arg)
+            (string-prefix-p argument arg)
+            (substring arg (length argument)))))))
+
+;;;; Default
+
+(cl-defgeneric transient-default-value (obj)
+  "Return the default value.")
+
+(cl-defmethod transient-default-value ((obj transient-prefix))
+  "Return the default value as specified by the `default-value' slot.
+If the value of the `default-value' slot is a function, call it to
+determine the value.  If the slot's value isn't a function, return
+that.  If the slot is unbound, return nil."
+  (if-let ((default (and (slot-boundp obj 'default-value)
+                         (oref obj default-value))))
+      (if (functionp default)
+          (funcall default)
+        default)
+    nil))
+
+(cl-defmethod transient-default-value ((_   transient-suffix))
+  "Return `eieio--unbound' to indicate that there is no default value.
+Doing so causes `transient-init-value' to skip setting the `value' slot."
+  eieio--unbound)
+
+;;;; Read
+
+(cl-defgeneric transient-infix-read (obj)
+  "Determine the new value of the infix object OBJ.
+
+This function merely determines the value; `transient-infix-set'
+is used to actually store the new value in the object.
+
+For most infix classes this is done by reading a value from the
+user using the reader specified by the `reader' slot (using the
+method for `transient-infix', described below).
+
+For some infix classes the value is changed without reading
+anything in the minibuffer, i.e., the mere act of invoking the
+infix command determines what the new value should be, based
+on the previous value.")
+
+(cl-defmethod transient-infix-read :around ((obj transient-infix))
+  "Refresh the transient buffer and call the next method.
+
+Also wrap `cl-call-next-method' with two macros:
+- `transient--with-suspended-override' allows use of minibuffer.
+- `transient--with-emergency-exit' arranges for the transient to
+  be exited in case of an error."
+  (transient--show)
+  (transient--with-emergency-exit :infix-read
+    (transient--with-suspended-override
+     (cl-call-next-method obj))))
+
+(cl-defmethod transient-infix-read ((obj transient-infix))
+  "Read a value while taking care of history.
+
+This method is suitable for a wide variety of infix commands,
+including but not limited to inline arguments and variables.
+
+If you do not use this method for your own infix class, then
+you should likely replicate a lot of the behavior of this
+method.  If you fail to do so, then users might not appreciate
+the lack of history, for example.
+
+Only for very simple classes that toggle or cycle through a very
+limited number of possible values should you replace this with a
+simple method that does not handle history.  (E.g., for a command
+line switch the only possible values are \"use it\" and \"don't use
+it\", in which case it is pointless to preserve history.)"
+  (with-slots (value multi-value always-read allow-empty choices) obj
+    (if (and value
+             (not multi-value)
+             (not transient-prefer-reading-value)
+             (not always-read)
+             transient--prefix)
+        (oset obj value nil)
+      (let* ((enable-recursive-minibuffers t)
+             (reader (oref obj reader))
+             (choices (if (functionp choices) (funcall choices) choices))
+             (prompt (transient-prompt obj))
+             (value (if (and multi-value value)
+                        (string-join value ",")
+                      value))
+             (history-key (or (oref obj history-key)
+                              (oref obj command)))
+             (transient--history (alist-get history-key transient-history))
+             (transient--history (if (or (null value)
+                                         (eq value (car transient--history)))
+                                     transient--history
+                                   (cons value transient--history)))
+             (initial-input (or value
+                                (and transient-read-with-initial-input
+                                     (car transient--history))))
+             (history (if initial-input
+                          (cons 'transient--history 1)
+                        'transient--history))
+             (value
+              (cond
+                (reader (funcall reader prompt initial-input history))
+                (multi-value
+                 (completing-read-multiple prompt choices nil nil
+                                           initial-input history))
+                (choices
+                 (completing-read prompt choices nil t initial-input history))
+                ((read-string prompt initial-input history)))))
+        (cond ((and (equal value "") (not allow-empty))
+               (setq value nil))
+              ((and (equal value "\"\"") allow-empty)
+               (setq value "")))
+        (when value
+          (when (and (bound-and-true-p ivy-mode)
+                     (stringp (car transient--history)))
+            (set-text-properties 0 (length (car transient--history)) nil
+                                 (car transient--history)))
+          (setf (alist-get history-key transient-history)
+                (delete-dups transient--history)))
+        value))))
+
+(cl-defmethod transient-infix-read ((obj transient-switch))
+  "Toggle the switch on or off."
+  (prog1 (if (oref obj value) nil (oref obj argument))
+    (when transient-prefer-reading-value
+      (message "%s is now %s"
+               (oref obj argument)
+               (if (oref obj value) "enabled" "disabled")))))
+
+(cl-defmethod transient-infix-read ((obj transient-switches))
+  "Cycle through the mutually exclusive switches.
+The last value is \"don't use any of these switches\"."
+  (let ((choices (mapcar (apply-partially #'format (oref obj argument-format))
+                         (oref obj choices))))
+    (cond-let
+      (transient-prefer-reading-value
+       (let ((choice (completing-read (transient-prompt obj) choices nil t)))
+         (if (equal choice "") nil choice)))
+      ([value (oref obj value)]
+       (cadr (member value choices)))
+      ((car choices)))))
+
+(cl-defmethod transient-infix-read ((command symbol))
+  "Elsewhere use the reader of the infix command COMMAND.
+Use this if you want to share an infix's history with a regular
+stand-alone command."
+  (if-let ((obj (transient--suffix-prototype command)))
+      (cl-letf (((symbol-function #'transient--show) #'ignore))
+        (transient-infix-read obj))
+    (error "Not a suffix command: `%s'" command)))
+
+;;;; Readers
+
+(defun transient-read-file (prompt _initial-input _history)
+  "Read a file."
+  (file-local-name (expand-file-name (read-file-name prompt))))
+
+(defun transient-read-existing-file (prompt _initial-input _history)
+  "Read an existing file."
+  (file-local-name (expand-file-name (read-file-name prompt nil nil t))))
+
+(defun transient-read-directory (prompt _initial-input _history)
+  "Read a directory."
+  (file-local-name (expand-file-name (read-directory-name prompt))))
+
+(defun transient-read-existing-directory (prompt _initial-input _history)
+  "Read an existing directory."
+  (file-local-name (expand-file-name (read-directory-name prompt nil nil t))))
+
+(defun transient-read-number-N0 (prompt initial-input history)
+  "Read a natural number (including zero) and return it as a string."
+  (transient--read-number-N prompt initial-input history t))
+
+(defun transient-read-number-N+ (prompt initial-input history)
+  "Read a natural number (excluding zero) and return it as a string."
+  (transient--read-number-N prompt initial-input history nil))
+
+(defun transient--read-number-N (prompt initial-input history include-zero)
+  (save-match-data
+    (cl-block nil
+      (while t
+        (let ((str (read-from-minibuffer prompt initial-input nil nil history)))
+          (when (or (string-equal str "")
+                    (string-match-p (if include-zero
+                                        "\\`\\(0\\|[1-9][0-9]*\\)\\'"
+                                      "\\`[1-9][0-9]*\\'")
+                                    str))
+            (cl-return str)))
+        (message "Please enter a natural number (%s zero)."
+                 (if include-zero "including" "excluding"))
+        (sit-for 1)))))
+
+(defun transient-read-date (prompt default-time _history)
+  "Read a date using `org-read-date' (which see)."
+  (require 'org)
+  (when (fboundp 'org-read-date)
+    (org-read-date 'with-time nil nil prompt default-time)))
+
+(static-when (fboundp 'string-edit) ; since Emacs 29.1
+  (defun transient-read-string-from-buffer (prompt value _)
+    "Switch to a new buffer to edit STRING in a recursive edit.
+Like `read-string-from-buffer' but accept an additional argument as
+provided by `transient-infix-read' (but ignore it).  Only available
+when using Emacs 29.1 or greater."
+    (string-edit prompt (or value "")
+                 (lambda (edited)
+                   (setq value edited)
+                   (exit-recursive-edit))
+                 :abort-callback #'exit-recursive-edit)
+    (recursive-edit)
+    value))
+
+;;;; Prompt
+
+(cl-defgeneric transient-prompt (obj)
+  "Return the prompt to be used to read infix object OBJ's value.")
+
+(cl-defmethod transient-prompt ((obj transient-infix))
+  "Return the prompt to be used to read infix object OBJ's value.
+
+This implementation should be suitable for almost all infix
+commands.
+
+If the value of OBJ's `prompt' slot is non-nil, then it must be
+a string or a function.  If it is a string, then use that.  If
+it is a function, then call that with OBJ as the only argument.
+That function must return a string, which is then used as the
+prompt.
+
+Otherwise, if the value of either the `argument' or `variable'
+slot of OBJ is a string, then base the prompt on that (preferring
+the former), appending either \"=\" (if it appears to be a
+command-line option) or \": \".
+
+Finally fall through to using \"(BUG: no prompt): \" as the
+prompt."
+  (cond-let
+    ([prompt (oref obj prompt)]
+     (let ((prompt (if (functionp prompt)
+                       (funcall prompt obj)
+                     prompt)))
+       (if (stringp prompt)
+           prompt
+         "[BUG: invalid prompt]: ")))
+    ([name
+      (or (ignore-error (invalid-slot-name unbound-slot) (oref obj argument))
+          (ignore-error (invalid-slot-name unbound-slot) (oref obj variable)))]
+     (if (and (stringp name)
+              (string-suffix-p "=" name))
+         name
+       (format "%s: " name)))
+    ("[BUG: no prompt]: ")))
+
+;;;; Set
+
+(cl-defgeneric transient-infix-set (obj value)
+  "Set the value of infix object OBJ to VALUE.")
+
+(cl-defmethod transient-infix-set ((obj transient-infix) value)
+  "Set the value of infix object OBJ to VALUE."
+  (oset obj value value))
+
+(cl-defmethod transient-infix-set :after ((obj transient-argument) value)
+  "Unset incompatible infix arguments."
+  (when-let* ((_ value)
+              (val (transient-infix-value obj))
+              (arg (if (slot-boundp obj 'argument)
+                       (oref obj argument)
+                     (oref obj argument-format)))
+              (incomp (oref transient--prefix incompatible))
+              (incomp
+               (nconc
+                (mapcan (##and (member arg %) (remove arg %)) incomp)
+                (and (not (equal val arg))
+                     (mapcan (##and (member val %) (remove val %)) incomp)))))
+    (dolist (obj transient--suffixes)
+      (when-let* ((_(cl-typep obj 'transient-argument))
+                  (val (transient-infix-value obj))
+                  (arg (if (slot-boundp obj 'argument)
+                           (oref obj argument)
+                         (oref obj argument-format)))
+                  (_(if (equal val arg)
+                        (member arg incomp)
+                      (or (member val incomp)
+                          (member arg incomp)))))
+        (transient-infix-set obj nil)))))
+
+(defun transient-prefix-set (value)
+  "Set the value of the active transient prefix to VALUE.
+Intended for use by transient suffix commands."
+  (oset transient--prefix value value)
+  (setq transient--refreshp 'updated-value))
+
+(cl-defgeneric transient-set-value (obj)
+  "Persist the value of the transient prefix OBJ.
+Only intended for use by `transient-set'.
+See also `transient-prefix-set'.")
+
+(cl-defmethod transient-set-value ((obj transient-prefix))
+  (let ((value (transient--get-savable-value)))
+    (oset (oref obj prototype) value value)
+    (transient--history-push obj value)))
+
+(defun transient--maybe-set-value (event)
+  "Maybe set the value, subject to EVENT and the `remember-value' slot."
+  (let* ((event (if (and (eq event 'exit)
+                         (memq this-command transient--quit-commands))
+                    'quit
+                  event))
+         (spec (oref transient--prefix remember-value))
+         (spec (cond ((listp spec) spec)
+                     ((memq spec '(export exit quit))
+                      (list spec))
+                     ((boundp spec)
+                      (symbol-value spec)))))
+    (and (memq event spec)
+         (prog1 t
+           (if (memq 'save spec)
+               (transient-save-value transient--prefix)
+             (transient-set-value transient--prefix))))))
+
+;;;; Save
+
+(cl-defgeneric transient-save-value (obj)
+  "Save the value of the transient prefix OBJ.")
+
+(cl-defmethod transient-save-value ((obj transient-prefix))
+  (let ((value (transient--get-savable-value)))
+    (oset (oref obj prototype) value value)
+    (setf (alist-get (oref obj command) transient-values) value)
+    (transient-save-values)
+    (transient--history-push obj value)))
+
+;;;; Reset
+
+(cl-defgeneric transient-reset-value (obj)
+  "Clear the set and saved values of the transient prefix OBJ.")
+
+(cl-defmethod transient-reset-value ((obj transient-prefix))
+  (let ((value (transient-default-value obj)))
+    (oset obj value value)
+    (oset (oref obj prototype) value value)
+    (setf (alist-get (oref obj command) transient-values nil 'remove) nil)
+    (transient-save-values)
+    (transient--history-push obj value))
+  (mapc #'transient-init-value transient--suffixes))
+
+;;;; Get
+
+(defun transient-args (prefix)
+  "Return the value of the transient prefix command PREFIX.
+
+If the current command was invoked from the transient prefix command
+PREFIX, then return the active infix arguments.  If the current command
+was not invoked from PREFIX, then return the set, saved or default value
+for PREFIX.
+
+PREFIX may also be a list of prefixes.  If no prefix is active, the
+fallback value of the first of these prefixes is used.
+
+The generic function `transient-prefix-value' is used to determine the
+returned value.
+
+This function is intended to be used by suffix commands, whether they
+are invoked from a menu or not.  It is not intended to be used when
+setting up a menu and its suffixes, in which case `transient-get-value'
+should be used."
+  (when (listp prefix)
+    (setq prefix (car (or (memq transient-current-command prefix) prefix))))
+  (if-let ((obj (get prefix 'transient--prefix)))
+      ;; This OBJ is only used for dispatch purposes; see below.
+      (transient-prefix-value obj)
+    (error "Not a transient prefix: %s" prefix)))
+
+(cl-defgeneric transient-prefix-value (obj)
+  "Return a list of the values of the suffixes of the specified prefix.
+
+OBJ is a prototype object and is only used to select the appropriate
+method of this generic function.  Transient itself only provides one
+such method, which should be suitable for most prefixes.
+
+This function is only intended to be used by `transient-args'.  It is
+not defined as an internal function because third-party packages may
+define their own methods.  That does not mean that it would be a good
+idea to call it for any other purpose.")
+
+(cl-defmethod transient-prefix-value ((obj transient-prefix))
+  "Return a list of the values of the suffixes of the specified prefix.
+
+OBJ is a prototype object.  This method does not return the value of
+that object.  Instead it extracts the name of the respective command
+from the object and uses that to collect the current values from the
+suffixes of the prefix from which the current command was invoked.
+If the current command was not invoked from the identified prefix,
+then this method returns the set, save or default value, as described
+for `transient-args'.
+
+This method uses `transient-suffixes' (which see) to determine the
+suffix objects and then extracts the value(s) from those objects."
+  (mapcan (lambda (obj)
+            (and (not (oref obj inactive))
+                 (not (oref obj inapt))
+                 (transient--get-wrapped-value obj)))
+          (transient-suffixes (oref obj command))))
+
+(defun transient-suffixes (prefix)
+  "Return the suffix objects of the transient prefix command PREFIX.
+
+If PREFIX is not the current prefix, initialize the suffixes so that
+they can be returned.  That does not cause the menu to be displayed."
+  (if (eq transient-current-command prefix)
+      transient-current-suffixes
+    (let ((transient--prefix (transient--init-prefix prefix)))
+      (transient--flatten-suffixes
+       (transient--init-suffixes prefix)))))
+
+(defun transient-get-value ()
+  "Return the value of the extant prefix.
+
+This function is intended to be used when setting up a menu and its
+suffixes.  It is not intended to be used when a suffix command is
+invoked, whether from a menu or not, in which case `transient-args'
+should be used."
+  (transient--with-emergency-exit :get-value
+    (mapcan (lambda (obj)
+              (and (not (oref obj inactive))
+                   (not (oref obj inapt))
+                   (transient--get-wrapped-value obj)))
+            transient--suffixes)))
+
+(defun transient--get-extended-value ()
+  "Return the extended value of the extant prefix.
+
+Unlike `transient-get-value' also include the values of inactive and
+inapt arguments.  This function is mainly intended for internal use.
+It is used to preserve the full value when a menu is being refreshed,
+including the presently ineffective parts."
+  (transient--with-emergency-exit :get-extended-value
+    (mapcan #'transient--get-wrapped-value transient--suffixes)))
+
+(defun transient--get-savable-value ()
+  "Return the value of the extant prefix, excluding unsavable parts.
+
+This function is only intended for internal use.  It is used to save
+the value."
+  (transient--with-emergency-exit :get-savable-value
+    (mapcan (lambda (obj)
+              (and (not (and (slot-exists-p obj 'unsavable)
+                             (oref obj unsavable)))
+                   (transient--get-wrapped-value obj)))
+            (or transient--suffixes transient-current-suffixes))))
+
+(defun transient--get-wrapped-value (obj)
+  "Return a list of the value(s) of suffix object OBJ.
+
+Internally a suffix only ever has one value, stored in its `value'
+slot, but callers of `transient-args' wish to treat the values of
+certain suffixes as multiple values.  That translation is handled
+here.  The object's `multi-value' slot specifies whether and how
+to interpret the `value' as multiple values."
+  (and-let ((value (transient-infix-value obj)))
+    (pcase-exhaustive (and (slot-exists-p obj 'multi-value)
+                           (oref obj multi-value))
+      ('nil          (list value))
+      ((or 't 'rest) (list value))
+      ('repeat       value))))
+
+(cl-defgeneric transient-infix-value (obj)
+  "Return the value of the suffix object OBJ.
+
+By default this function is involved when determining the prefix's
+overall value, returned by `transient-args' (which see),  so that
+the invoked suffix command can use that.
+
+Currently most values are strings, but that is not set in stone.
+Nil is not a value, it means \"no value\".
+
+Usually only infixes have a value, but see the method for
+`transient-suffix'.")
+
+(cl-defmethod transient-infix-value ((_   transient-suffix))
+  "Return nil, which means \"no value\".
+
+Infix arguments contribute the transient's value while suffix
+commands consume it.  This function is called for suffixes anyway
+because a command that both contributes to the transient's value
+and also consumes it is not completely unconceivable.
+
+If you define such a command, then you must define a derived
+class and implement this function because this default method
+does nothing." nil)
+
+(cl-defmethod transient-infix-value ((obj transient-infix))
+  "Return the value of OBJ's `value' slot."
+  (oref obj value))
+
+(cl-defmethod transient-infix-value ((obj transient-option))
+  "Return ARGUMENT and VALUE as a unit or nil if the latter is nil."
+  (and-let ((value (oref obj value)))
+    (let ((arg (oref obj argument)))
+      (pcase-exhaustive (oref obj multi-value)
+        ('nil          (concat arg value))
+        ((or 't 'rest) (cons arg value))
+        ('repeat       (mapcar (##concat arg %) value))))))
+
+(cl-defmethod transient-infix-value ((_   transient-variable))
+  "Return nil, which means \"no value\".
+
+Setting the value of a variable is done by, well, setting the
+value of the variable.  I.e., this is a side-effect and does
+not contribute to the value of the transient."
+  nil)
+
+;;;; Utilities
+
+(defun transient-arg-value (arg args)
+  "Return the value of ARG as it appears in ARGS.
+
+For a switch return a boolean.  For an option return the value as
+a string, using the empty string for the empty value, or nil if
+the option does not appear in ARGS.
+
+Append \"=\ to ARG to indicate that it is an option."
+  (save-match-data
+    (cond-let
+      ((member arg args) t)
+      ([_(string-suffix-p "=" arg)]
+       [match (let ((case-fold-search nil)
+                    (re (format "\\`%s\\(?:=\\(.+\\)\\)?\\'"
+                                (substring arg 0 -1))))
+                (cl-find-if (##and (stringp %)
+                                   (string-match re %))
+                            args))]
+       (match-string 1 match)))))
+
+;;; Return
+
+(defun transient-init-return (obj)
+  (when-let* ((_ transient--stack)
+              (command (oref obj command))
+              (suffix-obj (transient-suffix-object command))
+              (_(memq (cond ((slot-boundp suffix-obj 'transient)
+                             (oref suffix-obj transient))
+                            (transient-current-prefix
+                             (oref transient-current-prefix transient-suffix)))
+                      (list t 'recurse #'transient--do-recurse))))
+    (oset obj return t)))
+
+;;; Scope
+;;;; Init
+
+(cl-defgeneric transient-init-scope (obj)
+  "Set the scope of the prefix or suffix object OBJ.
+
+The scope is actually a property of the transient prefix, not of
+individual suffixes.  However it is possible to invoke a suffix
+command directly instead of from a transient.  In that case, if
+the suffix expects a scope, then it has to determine that itself
+and store it in its `scope' slot.
+
+This function is called for all prefix and suffix commands, but
+unless a concrete method is implemented, this falls through to
+a default implementation, which is a noop.")
+
+(cl-defmethod transient-init-scope ((_   transient-prefix))
+  "Noop." nil)
+
+(cl-defmethod transient-init-scope ((_   transient-suffix))
+  "Noop." nil)
+
+;;;; Get
+
+(defun transient-scope (&optional prefixes classes)
+  "Return the scope of the active or current transient prefix command.
+
+If optional PREFIXES and CLASSES are both nil, return the scope of
+the prefix currently being setup, making this variation useful, e.g.,
+in `:if*' predicates.  If no prefix is being setup, but the current
+command was invoked from some prefix, then return the scope of that.
+
+If PREFIXES is non-nil, it must be a prefix command or a list of such
+commands.  If CLASSES is non-nil, it must be a prefix class or a list
+of such classes.  When this function is called from the body or the
+`interactive' form of a suffix command, PREFIXES and/or CLASSES should
+be non-nil.  If either is non-nil, try the following in order:
+
+- If the current suffix command was invoked from a prefix, which
+  appears in PREFIXES, return the scope of that prefix.
+
+- If the current suffix command was invoked from a prefix, and its
+  class derives from one of the CLASSES, return the scope of that
+  prefix.
+
+- If a prefix is being setup and it appears in PREFIXES, return its
+  scope.
+
+- If a prefix is being setup and its class derives from one of the
+  CLASSES, return its scope.
+
+- Finally try to return the default scope of the first command in
+  PREFIXES.  This only works if that slot is set in the respective
+  class definition or using its `transient-init-scope' method.
+
+If no prefix matches, return nil."
+  (cond-let
+    ((or prefixes classes)
+     (let* ((prefixes (ensure-list prefixes))
+            (type (if (symbolp classes) classes (cons 'or classes)))
+            (match (lambda (obj)
+                     (and obj
+                          (or (memq (oref obj command) prefixes)
+                              (cl-typep obj type))
+                          obj))))
+       (cond-let
+         ([obj (or (funcall match transient-current-prefix)
+                   (funcall match transient--prefix))]
+          (oref obj scope))
+         ((get (car prefixes) 'transient--prefix)
+          (oref (transient--init-prefix (car prefixes)) scope)))))
+    ([obj (transient-prefix-object)]
+     (oref obj scope))))
+
+;;; History
+
+(cl-defgeneric transient--history-key (obj)
+  "Return OBJ's history key.")
+
+(cl-defmethod transient--history-key ((obj transient-prefix))
+  "If the value of the `history-key' slot is non-nil, return that.
+Otherwise return the value of the `command' slot."
+  (or (oref obj history-key)
+      (oref obj command)))
+
+(cl-defgeneric transient--history-push (obj value)
+  "Push VALUE to OBJ's entry in `transient-history'.")
+
+(cl-defmethod transient--history-push
+  ((obj transient-prefix)
+   &optional (value (transient--get-savable-value)))
+  (let ((key (transient--history-key obj)))
+    (setf (alist-get key transient-history)
+          (cons value (delete value (alist-get key transient-history))))))
+
+(cl-defgeneric transient--history-init (obj)
+  "Initialize OBJ's `history' slot.
+This is the transient-wide history; many individual infixes also
+have a history of their own.")
+
+(cl-defmethod transient--history-init ((obj transient-prefix))
+  "Initialize OBJ's `history' slot from the variable `transient-history'."
+  (oset obj history
+        (let ((val (transient--get-extended-value)))
+          (cons val (delete val (alist-get (transient--history-key obj)
+                                           transient-history))))))
+
+;;; Display
+
+(defun transient--show-hint ()
+  (let ((message-log-max nil))
+    (message "%s" (transient--format-hint))))
+
+(defun transient--show ()
+  (transient--timer-cancel)
+  (setq transient--showp t)
+  (let ((transient--shadowed-buffer (current-buffer))
+        (setup (not (get-buffer transient--buffer-name)))
+        (focus nil))
+    (setq transient--buffer (get-buffer-create transient--buffer-name))
+    (with-current-buffer transient--buffer
+      (when transient-enable-menu-navigation
+        (setq focus (or (get-text-property (point) 'button-data)
+                        (and (not (bobp))
+                             (get-text-property (1- (point)) 'button-data)))))
+      (erase-buffer)
+      (transient--insert-menu setup))
+    (unless (window-live-p transient--window)
+      (setq transient--window
+            (display-buffer transient--buffer
+                            (transient--display-action)))
+      (with-selected-window transient--window
+        (set-window-parameter nil 'prev--no-other-window
+                              (window-parameter nil 'no-other-window))))
+    (when (window-live-p transient--window)
+      (with-selected-window transient--window
+        (unless (eq (lookup-key transient-predicate-map [other-window])
+                    'transient--do-move)
+          (set-window-parameter nil 'no-other-window t))
+        (goto-char (point-min))
+        (when (and focus transient-enable-menu-navigation)
+          (transient--goto-button focus))
+        (transient--fit-window-to-buffer transient--window)))))
+
+(defun transient--display-action ()
+  (let ((action
+         (cond ((oref transient--prefix display-action))
+               ((memq 'display-buffer-full-frame
+                      (ensure-list (car transient-display-buffer-action)))
+                (user-error "%s disallowed in %s"
+                            'display-buffer-full-frame
+                            'transient-display-buffer-action))
+               (transient-display-buffer-action))))
+    (when (and (assq 'pop-up-frame-parameters (cdr action))
+               (fboundp 'buffer-line-statistics)) ; since Emacs 28.1
+      (setq action (copy-tree action))
+      (pcase-let ((`(,height ,width)
+                   (buffer-line-statistics transient--buffer))
+                  (params (assq 'pop-up-frame-parameters (cdr action))))
+        (setf (alist-get 'height params) height)
+        (setf (alist-get 'width params)
+              (max width (or transient-minimal-frame-width 0)))))
+    action))
+
+(defun transient--fit-window-to-buffer (window)
+  (set-window-parameter window 'window-preserved-size nil)
+  (let ((fit-window-to-buffer-horizontally t)
+        (window-resize-pixelwise t)
+        (window-size-fixed nil))
+    (cond ((not (window-parent window))
+           (fit-frame-to-buffer (window-frame window) nil nil nil
+                                transient-minimal-frame-width))
+          ((eq (car (window-parameter window 'quit-restore)) 'other)
+           ;; Grow but never shrink window that previously displayed
+           ;; another buffer and is going to display that again.
+           (fit-window-to-buffer window nil (window-height window)))
+          ((fit-window-to-buffer window nil 1))))
+  (set-window-parameter window 'window-preserved-size
+                        (list (window-buffer window)
+                              (window-body-width window t)
+                              (window-body-height window t))))
+
+;;; Delete
+
+(defun transient--delete-window ()
+  (when (window-live-p transient--window)
+    (let ((win transient--window)
+          (remain-in-minibuffer-window
+           (and (minibuffer-selected-window)
+                (selected-window))))
+      (cond
+        ((eq (car (window-parameter win 'quit-restore)) 'other)
+         ;; Window used to display another buffer.
+         (set-window-parameter win 'no-other-window
+                               (window-parameter win 'prev--no-other-window))
+         (set-window-parameter win 'prev--no-other-window nil))
+        ((with-demoted-errors "Error while exiting transient: %S"
+           (if (window-parent win)
+               (delete-window win)
+             (delete-frame (window-frame win) t)))))
+      (with-demoted-errors "Error while exiting transient [1]: %S"
+        (when remain-in-minibuffer-window
+          (select-window remain-in-minibuffer-window)))))
+  (with-demoted-errors "Error while exiting transient [2]: %S"
+    (when (buffer-live-p transient--buffer)
+      (kill-buffer transient--buffer)))
+  (setq transient--buffer nil))
+
+(defun transient--preserve-window-p (&optional nohide)
+  (let ((show (if nohide 'fixed transient-show-during-minibuffer-read)))
+    (when (and (integerp show)
+               (window-live-p transient--window)
+               (< (frame-height (window-frame transient--window))
+                  (+ (abs show)
+                     (window-height transient--window))))
+      (setq show (natnump show)))
+    show))
+
+;;; Format
+
+(defun transient--format-hint ()
+  (if (and transient-show-menu (<= transient-show-menu 0))
+      (format "%s-" (key-description (this-command-keys)))
+    (format
+     "%s- [%s] %s"
+     (key-description (this-command-keys))
+     (oref transient--prefix command)
+     (string-join
+      (sort (seq-keep
+             (lambda (suffix)
+               (let ((key (kbd (oref suffix key))))
+                 ;; Don't list any common commands.
+                 (and (not (memq (oref suffix command)
+                                 `(,(lookup-key transient-map key)
+                                   ,(lookup-key transient-sticky-map key)
+                                   ;; From transient-common-commands:
+                                   transient-set
+                                   transient-save
+                                   transient-history-prev
+                                   transient-history-next
+                                   transient-quit-one
+                                   transient-toggle-common
+                                   transient-set-level)))
+                      (propertize (oref suffix key) 'face 'transient-key))))
+             transient--suffixes)
+            #'string<)
+      (propertize "|" 'face 'transient-delimiter)))))
+
+(defun transient--insert-menu (setup)
+  (when setup
+    (when transient-force-fixed-pitch
+      (transient--force-fixed-pitch))
+    (when (bound-and-true-p tab-line-format)
+      (setq tab-line-format nil))
+    (setq header-line-format nil)
+    (setq mode-line-format
+          (let ((format (transient--mode-line-format)))
+            (if (or (natnump format) (eq format 'line)) nil format)))
+    (setq mode-line-buffer-identification
+          (symbol-name (oref transient--prefix command)))
+    (if transient-enable-menu-navigation
+        (setq-local cursor-in-non-selected-windows 'box)
+      (setq cursor-type nil))
+    (setq display-line-numbers nil)
+    (setq show-trailing-whitespace nil)
+    (run-hooks 'transient-setup-buffer-hook))
+  (when transient-describe-menu
+    (let* ((command (oref transient--prefix command))
+           (desc (propertize
+                  (or (and (not (eq transient-describe-menu 'docstring))
+                           (oref transient--prefix description))
+                      (and$ (documentation command)
+                            (car (split-string $ "\n")))
+                      (symbol-name command))
+                  'face 'transient-heading)))
+      (when (string-suffix-p "." desc)
+        (setq desc (substring desc 0 -1)))
+      (if transient-navigate-to-group-descriptions
+          (insert (transient-buttonize desc transient--prefix))
+        (insert desc))
+      (insert "\n\n")))
+  (transient--insert-groups)
+  (when (or transient--helpp transient--editp)
+    (transient--insert-help))
+  (when-let ((line (transient--separator-line)))
+    (insert line)))
+
+(defun transient--mode-line-format ()
+  (if (slot-boundp transient--prefix 'mode-line-format)
+      (oref transient--prefix mode-line-format)
+    transient-mode-line-format))
+
+(defun transient--separator-line ()
+  (and-let* ((format (transient--mode-line-format))
+             (height (cond ((not window-system) nil)
+                           ((natnump format) format)
+                           ((eq format 'line) 1)))
+             (face `(:background ,(transient--prefix-color) :extend t)))
+    (concat (propertize "__" 'face face 'display `(space :height (,height)))
+            (propertize "\n" 'face face 'line-height t))))
+
+(defun transient--prefix-color ()
+  (or (face-foreground (transient--key-face nil nil 'non-suffix) nil t)
+      "#gray60"))
+
+(defmacro transient-with-shadowed-buffer (&rest body)
+  "While in the transient buffer, temporarily make the shadowed buffer current."
+  (declare (indent 0) (debug t))
+  `(with-current-buffer (or transient--shadowed-buffer (current-buffer))
+     ,@body))
+
+(defun transient--insert-groups ()
+  (let ((groups (mapcan (lambda (group)
+                          (let ((hide (oref group hide)))
+                            (and (not (and (functionp hide)
+                                           (transient-with-shadowed-buffer
+                                             (funcall hide))))
+                                 (list group))))
+                        transient--layout)))
+    (while-let ((group (pop groups)))
+      (when (transient--active-suffixes group)
+        (transient--insert-group group)
+        (when groups
+          (insert ?\n))))))
+
+(defun transient--active-suffixes (group)
+  (seq-remove (lambda (suffix)
+                (and (cl-typep suffix 'transient-suffix)
+                     (oref suffix inactive)))
+              (oref group suffixes)))
+
+(defvar transient--max-group-level 1)
+
+(cl-defgeneric transient--insert-group (group)
+  "Format GROUP and its elements and insert the result.")
+
+(cl-defmethod transient--insert-group :around ((group transient-group)
+                                               &optional _)
+  "Insert GROUP's description, if any."
+  (when-let ((desc (transient-with-shadowed-buffer
+                     (transient-format-description group))))
+    (insert desc ?\n))
+  (let ((transient--max-group-level
+         (max (oref group level) transient--max-group-level))
+        (transient--pending-group group))
+    (cl-call-next-method group)))
+
+(cl-defmethod transient--insert-group ((group transient-row))
+  (transient--maybe-pad-keys group)
+  (dolist (suffix (transient--active-suffixes group))
+    (insert (transient-with-shadowed-buffer (transient-format suffix)))
+    (insert "   "))
+  (insert ?\n))
+
+(cl-defmethod transient--insert-group ((group transient-column)
+                                       &optional skip-empty)
+  (transient--maybe-pad-keys group)
+  (dolist (suffix (transient--active-suffixes group))
+    (let ((str (transient-with-shadowed-buffer (transient-format suffix))))
+      (unless (and (not skip-empty) (equal str ""))
+        (insert str)
+        (unless (string-match-p ".\n\\'" str)
+          (insert ?\n))))))
+
+(cl-defmethod transient--insert-group ((group transient-columns))
+  (if (or transient-force-single-column transient--docsp)
+      (dolist (group (oref group suffixes))
+        (transient--insert-group group t))
+    (let* ((columns
+            (mapcar
+             (lambda (column)
+               (transient--maybe-pad-keys column group)
+               (transient-with-shadowed-buffer
+                 `(,@(and-let ((desc (transient-format-description column)))
+                       (list desc))
+                   ,@(let ((transient--pending-group column))
+                       (mapcar #'transient-format
+                               (transient--active-suffixes column))))))
+             (oref group suffixes)))
+           (stops (transient--column-stops columns)))
+      (dolist (row (apply #'transient--mapn #'list columns))
+        (let ((stops stops))
+          (dolist (cell row)
+            (let ((stop (pop stops)))
+              (when cell
+                (transient--align-to stop)
+                (insert cell)))))
+        (insert ?\n)))))
+
+(cl-defmethod transient--insert-group ((group transient-subgroups))
+  (let ((subgroups (oref group suffixes)))
+    (while-let ((subgroup (pop subgroups)))
+      (transient--maybe-pad-keys subgroup group)
+      (transient--insert-group subgroup)
+      (when subgroups
+        (insert ?\n)))))
+
+(cl-defgeneric transient-format (obj)
+  "Format and return OBJ for display.
+
+When this function is called, then the current buffer is some
+temporary buffer.  If you need the buffer from which the prefix
+command was invoked to be current, then do so by temporarily
+making `transient--original-buffer' current.")
+
+(cl-defmethod transient-format ((arg string))
+  "Return the string ARG after applying the `transient-heading' face."
+  (propertize arg 'face 'transient-heading))
+
+(cl-defmethod transient-format ((_   null))
+  "Return a string containing just the newline character."
+  "\n")
+
+(cl-defmethod transient-format ((arg integer))
+  "Return a string containing just the ARG character."
+  (char-to-string arg))
+
+(cl-defmethod transient-format :around ((obj transient-suffix))
+  "Add additional formatting if appropriate.
+When reading user input for this infix, then highlight it.
+When edit-mode is enabled, then prepend the level information.
+When `transient-enable-menu-navigation' is non-nil then format
+as a button."
+  (let ((str (cl-call-next-method obj)))
+    (when (and (cl-typep obj 'transient-infix)
+               (eq (oref obj command) this-original-command)
+               (active-minibuffer-window))
+      (setq str (transient--add-face str 'transient-active-infix)))
+    (when transient--editp
+      (setq str (concat (let ((level (oref obj level)))
+                          (propertize (format " %s " level)
+                                      'face (if (transient--use-level-p level t)
+                                                'transient-enabled-suffix
+                                              'transient-disabled-suffix)))
+                        str)))
+    (transient-buttonize str obj)))
+
+(cl-defmethod transient-format ((obj transient-infix))
+  "Return a string generated using OBJ's `format'.
+%k is formatted using `transient-format-key'.
+%d is formatted using `transient-format-description'.
+%v is formatted using `transient-format-value'.
+%i is formatted using `transient-format-inapt'."
+  (format-spec (transient--get-format obj)
+               `((?k . ,(transient-format-key obj))
+                 (?d . ,(transient-format-description obj))
+                 (?v . ,(transient-format-value obj))
+                 (?i . ,(transient-format-inapt obj)))))
+
+
+(cl-defmethod transient-format ((obj transient-suffix))
+  "Return a string generated using OBJ's `format'.
+%k is formatted using `transient-format-key'.
+%d is formatted using `transient-format-description'.
+%i is formatted using `transient-format-inapt'."
+  (format-spec (transient--get-format obj)
+               `((?k . ,(transient-format-key obj))
+                 (?d . ,(transient-format-description obj))
+                 (?i . ,(transient-format-inapt obj)))))
+
+(cl-defgeneric transient-format-key (obj)
+  "Format OBJ's `key' for display and return the result.")
+
+(cl-defmethod transient-format-key ((obj transient-suffix))
+  "Format OBJ's `key' for display and return the result."
+  (let ((key (if (slot-boundp obj 'key) (oref obj key) ""))
+        (cmd (and (slot-boundp obj 'command) (oref obj command))))
+    (when-let ((width (oref transient--pending-group pad-keys)))
+      (setq key (truncate-string-to-width key width nil ?\s)))
+    (if transient--redisplay-key
+        (let ((len (length transient--redisplay-key))
+              (seq (cl-coerce (edmacro-parse-keys key t) 'list)))
+          (cond
+            ((member (take len seq)
+                     (list transient--redisplay-key
+                           (thread-last transient--redisplay-key
+                             (cl-substitute ?- 'kp-subtract)
+                             (cl-substitute ?= 'kp-equal)
+                             (cl-substitute ?+ 'kp-add))))
+             (let ((pre (key-description (vconcat (take len seq))))
+                   (suf (key-description (vconcat (drop len seq)))))
+               (setq pre (string-replace "RET" "C-m" pre))
+               (setq pre (string-replace "TAB" "C-i" pre))
+               (setq suf (string-replace "RET" "C-m" suf))
+               (setq suf (string-replace "TAB" "C-i" suf))
+               ;; We use e.g., "-k" instead of the more correct "- k",
+               ;; because the former is prettier.  If we did that in
+               ;; the definition, then we want to drop the space that
+               ;; is reinserted above.  False-positives are possible
+               ;; for silly bindings like "-C-c C-c".
+               (unless (string-search " " key)
+                 (setq pre (string-replace " " "" pre))
+                 (setq suf (string-replace " " "" suf)))
+               (concat (propertize pre 'face 'transient-unreachable-key)
+                       (and (string-prefix-p (concat pre " ") key) " ")
+                       (propertize suf 'face (transient--key-face cmd key))
+                       (save-excursion
+                         (and (string-match " +\\'" key)
+                              (propertize (match-string 0 key)
+                                          'face 'fixed-pitch))))))
+            ((transient--lookup-key transient-sticky-map (kbd key))
+             (propertize key 'face (transient--key-face cmd key)))
+            (t
+             (propertize key 'face 'transient-unreachable-key))))
+      (propertize key 'face (transient--key-face cmd key)))))
+
+(cl-defmethod transient-format-key :around ((obj transient-argument))
+  "Handle `transient-highlight-mismatched-keys'."
+  (let ((key (cl-call-next-method obj)))
+    (cond
+      ((not transient-highlight-mismatched-keys) key)
+      ((not (slot-boundp obj 'shortarg))
+       (transient--add-face key 'transient-nonstandard-key))
+      ((not (string-equal key (oref obj shortarg)))
+       (transient--add-face key 'transient-mismatched-key))
+      (key))))
+
+(cl-defgeneric transient-format-description (obj)
+  "Format OBJ's `description' for display and return the result.")
+
+(cl-defmethod transient-format-description ((obj transient-suffix))
+  "The `description' slot may be a function, in which case that is
+called inside the correct buffer (see `transient--insert-group')
+and its value is returned to the caller."
+  (transient--get-description obj))
+
+(cl-defmethod transient-format-description ((obj transient-value-preset))
+  (pcase-let* (((eieio description key set) obj)
+               (value (transient--get-extended-value))
+               (active (seq-set-equal-p set value)))
+    (format
+     "%s %s"
+     (propertize (or description (format "Preset %s" key))
+                 'face (and active 'transient-argument))
+     (format (propertize "(%s)" 'face 'transient-delimiter)
+             (mapconcat (lambda (arg)
+                          (propertize
+                           arg 'face (cond (active 'transient-argument)
+                                           ((member arg value)
+                                            '((:weight demibold)
+                                              transient-inactive-argument))
+                                           ('transient-inactive-argument))))
+                        set " ")))))
+
+(cl-defmethod transient-format-description ((obj transient-group))
+  "Format the description by calling the next method.
+If the result doesn't use the `face' property at all, then apply the
+face `transient-heading' to the complete string."
+  (and-let* ((desc (transient--get-description obj))
+             (desc (cond ((oref obj inapt)
+                          (propertize desc 'face 'transient-inapt-suffix))
+                         ((text-property-not-all 0 (length desc) 'face nil desc)
+                          desc)
+                         ((propertize desc 'face 'transient-heading)))))
+    (if transient-navigate-to-group-descriptions
+        (transient-buttonize desc obj)
+      desc)))
+
+(cl-defmethod transient-format-description :around ((obj transient-suffix))
+  "Format the description by calling the next method.
+If the result is nil, then use \"(BUG: no description)\" as the
+description.  If the OBJ's `key' is currently unreachable, then
+apply the face `transient-unreachable' to the complete string."
+  (let ((desc (or (cl-call-next-method obj)
+                  (and (slot-boundp transient--prefix 'suffix-description)
+                       (funcall (oref transient--prefix suffix-description)
+                                obj)))))
+    (when-let* ((_ transient--docsp)
+                (_(slot-boundp obj 'command))
+                (cmd (oref obj command))
+                (_(not (memq 'transient--default-infix-command
+                             (function-alias-p cmd))))
+                (docstr (ignore-errors (documentation cmd)))
+                (docstr (string-trim
+                         (substring docstr 0 (string-match "\\.?\n" docstr))))
+                (_(not (equal docstr ""))))
+      (setq desc (format-spec transient-show-docstring-format
+                              `((?c . ,desc)
+                                (?s . ,docstr)))))
+    (if desc
+        (when-let ((face (transient--get-face obj 'face)))
+          (setq desc (transient--add-face desc face t)))
+      (setq desc (propertize "(BUG: no description)" 'face 'error)))
+    (when (cond (transient--all-levels-p
+                 (> (oref obj level) transient--default-prefix-level))
+                (transient-highlight-higher-levels
+                 (> (max (oref obj level) transient--max-group-level)
+                    transient--default-prefix-level)))
+      (setq desc (transient--add-face desc 'transient-higher-level)))
+    (when-let ((inapt-face (and (oref obj inapt)
+                                (transient--get-face obj 'inapt-face))))
+      (setq desc (transient--add-face desc inapt-face)))
+    (when (and (slot-boundp obj 'key)
+               (transient--key-unreachable-p obj))
+      (setq desc (transient--add-face desc 'transient-unreachable)))
+    desc))
+
+(cl-defgeneric transient-format-value (obj)
+  "Format OBJ's value for display and return the result.")
+
+(cl-defmethod transient-format-value ((obj transient-suffix))
+  (with-slots (argument value inapt) obj
+    (concat (propertize argument 'face (transient-argument-face obj))
+            (cond ((not transient-use-accessible-values) nil)
+                  (inapt " is inapt")
+                  (value " is enabled")
+                  (t     " is disabled")))))
+
+(cl-defmethod transient-format-value ((obj transient-option))
+  (let ((argument (prin1-to-string (oref obj argument) t))
+        (aface (transient-argument-face obj))
+        (vface (transient-value-face obj)))
+    (if-let ((value (oref obj value)))
+        (pcase-exhaustive (oref obj multi-value)
+          ('nil
+           (concat (propertize argument 'face aface)
+                   (propertize value    'face vface)))
+          ((or 't 'rest)
+           (concat (propertize (if (string-suffix-p " " argument)
+                                   argument
+                                 (concat argument " "))
+                               'face aface)
+                   (propertize (mapconcat #'prin1-to-string value " ")
+                               'face vface)))
+          ('repeat
+           (mapconcat (lambda (value)
+                        (concat (propertize argument 'face aface)
+                                (propertize value    'face vface)))
+                      value " ")))
+      (concat (propertize (if (string-suffix-p "=" argument)
+                              (substring argument 0 -1)
+                            argument)
+                          'face aface)
+              (and transient-use-accessible-values " is disabled")))))
+
+(cl-defmethod transient-format-value ((obj transient-switches))
+  (pcase-let (((eieio value argument-format choices) obj)
+              (face (transient-argument-face obj)))
+    (cond
+      ((not transient-use-accessible-values)
+       (format (propertize argument-format 'face face)
+               (format
+                (propertize "[%s]" 'face 'transient-delimiter)
+                (mapconcat
+                 (lambda (choice)
+                   (propertize choice 'face
+                               (transient-value-face
+                                obj
+                                (equal (format argument-format choice) value))))
+                 choices
+                 (propertize "|" 'face 'transient-delimiter)))))
+      (value (propertize value 'face face))
+      ((format "No %s argument is enabled"
+               (propertize (string-replace "%s" "*" argument-format)
+                           'face face))))))
+
+(cl-defmethod transient-format-inapt ((obj transient-suffix))
+  "If OBJ is currently inapt, return \"inapt \", else the empty string."
+  (if (oref obj inapt) "inapt " ""))
+
+(defun transient-argument-face (obj)
+  (if (oref obj value)
+      (if (oref obj inapt)
+          'transient-inapt-argument
+        'transient-argument)
+    'transient-inactive-argument))
+
+(cl-defun transient-value-face (obj &optional (active nil sactive))
+  (if (if sactive active (oref obj value))
+      (if (oref obj inapt)
+          ;; transient-inapt-value does not exist
+          'transient-inapt-argument
+        'transient-value)
+    'transient-inactive-value))
+
+(cl-defmethod transient--get-format ((obj transient-suffix))
+  (if transient-use-accessible-formats
+      (oref obj accessible-format)
+    (oref obj format)))
+
+(cl-defmethod transient--get-description ((obj transient-child))
+  (cond-let*
+    [[desc (oref obj description)]]
+    ((functionp desc)
+     (condition-case nil
+         (funcall desc obj)
+       (wrong-number-of-arguments (funcall desc))))
+    (desc)))
+
+(cl-defmethod transient--get-face ((obj transient-suffix) slot)
+  (cond-let*
+    ((not (slot-boundp obj slot)) nil)
+    [[face (slot-value obj slot)]]
+    ((facep face) face)
+    ((functionp face)
+     (let ((transient--pending-suffix obj))
+       (condition-case nil
+           (funcall face obj)
+         (wrong-number-of-arguments (funcall face)))))))
+
+(defun transient--add-face (string face &optional append beg end)
+  (let ((str (copy-sequence string)))
+    (add-face-text-property (or beg 0) (or end (length str)) face append str)
+    str))
+
+(defun transient--key-face (cmd key &optional enforce-type)
+  (or (and transient-semantic-coloring
+           (not transient--helpp)
+           (not transient--editp)
+           (get (transient--get-pre-command cmd key enforce-type)
+                'transient-face))
+      (if cmd 'transient-key 'transient-key-noop)))
+
+(defun transient--key-unreachable-p (obj)
+  (and transient--redisplay-key
+       (let ((key (oref obj key)))
+         (not (or (equal (take (length transient--redisplay-key)
+                               (cl-coerce (edmacro-parse-keys key t) 'list))
+                         transient--redisplay-key)
+                  (transient--lookup-key transient-sticky-map (kbd key)))))))
+
+(defun transient--lookup-key (keymap key)
+  (let ((val (lookup-key keymap key)))
+    (and val (not (integerp val)) val)))
+
+(defun transient--maybe-pad-keys (group &optional parent)
+  (when-let ((pad (or (oref group pad-keys)
+                      (and parent (oref parent pad-keys)))))
+    (oset group pad-keys
+          (apply #'max
+                 (if (integerp pad) pad 0)
+                 (seq-keep (lambda (suffix)
+                             (and (eieio-object-p suffix)
+                                  (slot-boundp suffix 'key)
+                                  (length (oref suffix key))))
+                           (oref group suffixes))))))
+
+(static-if (fboundp 'string-pixel-width) ; since Emacs 29.1
+    (progn ; See https://github.com/magit/magit/issues/5557.
+      (defalias 'transient--string-pixel-width #'string-pixel-width))
+  ;; c22b735f0c6 and 61c254cafc9 cannot be backported.  Some later
+  ;; commits could be ported, but users should instead update Emacs.
+  (defun transient--string-pixel-width (string)
+    (with-temp-buffer
+      (insert string)
+      (save-window-excursion
+        (set-window-dedicated-p nil nil)
+        (set-window-buffer nil (current-buffer))
+        (car (window-text-pixel-size
+              nil (line-beginning-position) (point)))))))
+
+(defun transient--column-stops (columns)
+  (let* ((var-pitch (or transient-align-variable-pitch
+                        (oref transient--prefix variable-pitch)))
+         (char-width (and var-pitch (transient--string-pixel-width " ")))
+         (gap (* 2 (if var-pitch char-width 1))))
+    (transient--seq-reductions-from
+     (lambda (acc elt) (+ acc gap elt))
+     (transient--mapn
+      (lambda (cells min)
+        (apply #'max
+               (if min (if var-pitch (* min char-width) min) 0)
+               (mapcar (if var-pitch #'transient--string-pixel-width #'length)
+                       cells)))
+      columns
+      (oref transient--prefix column-widths))
+     0)))
+
+(defun transient--align-to (stop)
+  (unless (zerop stop)
+    (insert (if (or transient-align-variable-pitch
+                    (oref transient--prefix variable-pitch))
+                (propertize " " 'display `(space :align-to (,stop)))
+              (make-string (max 0 (- stop (current-column))) ?\s)))))
+
+(defun transient-command-summary-or-name (obj)
+  "Return the summary or name of the command represented by OBJ.
+
+If the command has a doc-string, then return the first line of
+that, else its name.
+
+Intended to be temporarily used as the `:suffix-description' of
+a prefix command, while porting a regular keymap to a transient."
+  (let ((command (oref obj command)))
+    (if-let ((doc (documentation command)))
+        (propertize (car (split-string doc "\n")) 'face 'font-lock-doc-face)
+      (propertize (symbol-name command) 'face 'font-lock-function-name-face))))
+
+;;; Help
+
+(cl-defgeneric transient-show-help (obj)
+  "Show documentation for the command represented by OBJ.")
+
+(cl-defmethod transient-show-help ((obj transient-prefix))
+  "Call `show-help' if non-nil, else show `info-manual',
+if non-nil, else show the `man-page' if non-nil, else use
+`describe-function'."
+  (with-slots (show-help info-manual man-page command) obj
+    (cond (show-help (funcall show-help obj))
+          (info-manual (transient--show-manual info-manual))
+          (man-page (transient--show-manpage man-page))
+          ((transient--describe-function command)))))
+
+(cl-defmethod transient-show-help ((obj transient-suffix))
+  "Call `show-help' if non-nil, else use `describe-function'.
+Also used to dispatch showing documentation for the current
+prefix.  If the suffix is a sub-prefix, then also call the
+prefix method."
+  (cond-let
+    ((eq this-command 'transient-help)
+     (transient-show-help transient--prefix))
+    ([prefix (get (oref obj command) 'transient--prefix)]
+     [_(not (eq (oref transient--prefix command) this-command))]
+     (transient-show-help prefix))
+    ([show-help (oref obj show-help)]
+     (funcall show-help obj))
+    ((transient--describe-function this-command))))
+
+(cl-defmethod transient-show-help ((obj transient-infix))
+  "Call `show-help' if non-nil, else show the `man-page'
+if non-nil, else use `describe-function'.  When showing the
+manpage, then try to jump to the correct location."
+  (cond-let
+    ([show-help (oref obj show-help)]
+     (funcall show-help obj))
+    ([man-page (oref transient--prefix man-page)]
+     [argument (and (slot-boundp obj 'argument)
+                    (oref obj argument))]
+     (transient--show-manpage man-page argument))
+    ((transient--describe-function this-command))))
+
+;; `cl-generic-generalizers' doesn't support `command' et al.
+(cl-defmethod transient-show-help (cmd)
+  "Show the command doc-string."
+  (transient--describe-function cmd))
+
+(defmacro transient-with-help-window (&rest body)
+  "Evaluate BODY, send output to *Help* buffer, and display it in a window.
+Select the help window, and make the help buffer current and return it."
+  (declare (indent 0))
+  `(let ((buffer nil)
+         (help-window-select t))
+     (with-help-window (help-buffer)
+       ,@body
+       (setq buffer (current-buffer)))
+     (set-buffer buffer)))
+
+(defun transient--display-help (helper target)
+  (let ((winconf (current-window-configuration)))
+    (funcall (cond (helper)
+                   ((symbolp target) #'transient--describe-function)
+                   ((stringp target)
+                    (if (string-prefix-p "(" target)
+                        #'transient--show-manual
+                      #'transient--show-manpage))
+                   ((error "Unknown how to show help for %S" target)))
+             target)
+    (setq-local transient--restore-winconf winconf))
+  (fit-window-to-buffer nil (frame-height) (window-height))
+  (transient-resume-mode)
+  (message (substitute-command-keys "Type \\`q' to resume transient command.")))
+
+(defun transient--describe-function (fn)
+  (let* ((buffer nil)
+         (help-window-select t)
+         (temp-buffer-window-setup-hook
+          (cons (lambda () (setq buffer (current-buffer)))
+                temp-buffer-window-setup-hook)))
+    (describe-function fn)
+    (when buffer
+      (set-buffer buffer))))
+
+(defun transient--show-manual (manual)
+  (info manual))
+
+(defun transient--show-manpage (manpage &optional argument)
+  (require 'man)
+  (let* ((Man-notify-method 'meek)
+         (buf (Man-getpage-in-background manpage))
+         (proc (get-buffer-process buf)))
+    (while (and proc (eq (process-status proc) 'run))
+      (accept-process-output proc))
+    (switch-to-buffer buf)
+    (when argument
+      (transient--goto-argument-description argument))))
+
+(defun transient--goto-argument-description (arg)
+  (goto-char (point-min))
+  (let ((case-fold-search nil)
+        ;; This matches preceding/proceeding options.  Options
+        ;; such as "-a", "-S[<keyid>]", and "--grep=<pattern>"
+        ;; are matched by this regex without the shy group.
+        ;; The ". " in the shy group is for options such as
+        ;; "-m parent-number", and the "-[^[:space:]]+ " is
+        ;; for options such as "--mainline parent-number"
+        (others "-\\(?:. \\|-[^[:space:]]+ \\)?[^[:space:]]+"))
+    (when (re-search-forward
+           (if (equal arg "--")
+               ;; Special case.
+               "^[\t\s]+\\(--\\(?: \\|$\\)\\|\\[--\\]\\)"
+             ;; Should start with whitespace and may have
+             ;; any number of options before and/or after.
+             (format
+              "^[\t\s]+\\(?:%s, \\)*?\\(?1:%s\\)%s\\(?:, %s\\)*$"
+              others
+              ;; Options don't necessarily end in an "="
+              ;; (e.g., "--gpg-sign[=<keyid>]")
+              (string-remove-suffix "=" arg)
+              ;; Simple options don't end in an "=".  Splitting this
+              ;; into 2 cases should make getting false positives
+              ;; less likely.
+              (if (string-suffix-p "=" arg)
+                  ;; "[^[:space:]]*[^.[:space:]]" matches the option
+                  ;; value, which is usually after the option name
+                  ;; and either '=' or '[='.  The value can't end in
+                  ;; a period, as that means it's being used at the
+                  ;; end of a sentence.  The space is for options
+                  ;; such as '--mainline parent-number'.
+                  "\\(?: \\|\\[?=\\)[^[:space:]]*[^.[:space:]]"
+                ;; Either this doesn't match anything (e.g., "-a"),
+                ;; or the option is followed by a value delimited
+                ;; by a "[", "<", or ":".  A space might appear
+                ;; before this value, as in "-f <file>".  The
+                ;; space alternative is for options such as
+                ;; "-m parent-number".
+                "\\(?:\\(?: \\| ?[\\[<:]\\)[^[:space:]]*[^.[:space:]]\\)?")
+              others))
+           nil t)
+      (goto-char (match-beginning 1)))))
+
+(defun transient--insert-help ()
+  (unless (looking-back "\n\n" 2)
+    (insert "\n"))
+  (when transient--helpp
+    (insert
+     (format
+      (propertize "\
+Type a %s to show help for that suffix command, or %s to show manual.
+Type %s to exit help.\n"
+                  'face 'transient-heading)
+      (propertize "<KEY>" 'face 'transient-key)
+      (propertize "?"     'face 'transient-key)
+      (propertize "C-g"   'face 'transient-key))))
+  (when transient--editp
+    (unless transient--helpp
+      (insert
+       (format
+        (propertize "\
+Type %s and then %s to put the respective suffix command on level %s.
+Type %s and then %s to display suffixes up to level %s in this menu.
+Type %s and then %s to describe the respective suffix command.\n"
+                    'face 'transient-heading)
+        (propertize "<KEY>" 'face 'transient-key)
+        (propertize "<N>"   'face 'transient-key)
+        (propertize " N "   'face 'transient-enabled-suffix)
+        (propertize (concat transient-common-command-prefix " l")
+                    'face 'transient-key)
+        (propertize "<N>"   'face 'transient-key)
+        (propertize " N "   'face 'transient-enabled-suffix)
+        (propertize "C-h"   'face 'transient-key)
+        (propertize "<KEY>" 'face 'transient-key))))
+    (with-slots (level) transient--prefix
+      (insert
+       (format
+        (propertize "
+The current level of this menu is %s, so
+  commands on levels %s are displayed, and
+  commands on levels %s and %s are not displayed.\n"
+                    'face 'transient-heading)
+        (propertize (format " %s " level)    'face 'transient-enabled-suffix)
+        (propertize (format " 1..%s " level) 'face 'transient-enabled-suffix)
+        (propertize (format " >= %s " (1+ level))
+                    'face 'transient-disabled-suffix)
+        (propertize " 0 " 'face 'transient-disabled-suffix))))))
+
+(cl-defgeneric transient-get-summary (obj)
+  "Return brief summary about the menu element at point.
+
+If OBJ's `summary' slot is a string, use that.  If it is a function,
+call that with OBJ as the only argument and use the returned string.
+If `summary' is or returns something other than a string or nil,
+show no summary.  If `summary' is or returns nil, use the first line
+of the documentation string, if any.
+
+If RETURN is non-nil, return the summary instead of showing it.
+This is used when a tooltip is needed.")
+
+(cl-defmethod transient-get-summary ((obj transient-object))
+  (cond-let*
+    ([summary (cond-let*
+                [[summary (oref obj summary)]]
+                ((functionp summary)
+                 (funcall summary obj))
+                (summary)
+                ([command (ignore-error (invalid-slot-name unbound-slot)
+                            (oref obj command))]
+                 [_(documentation command)]
+                 (car (split-string (documentation command) "\n"))))]
+     [_(stringp summary)]
+     [_(not (equal summary
+                   (car (split-string (documentation
+                                       'transient--default-infix-command)
+                                      "\n"))))]
+     (if (string-suffix-p "." summary)
+         (substring summary 0 -1)
+       summary))
+    ((eq transient-enable-menu-navigation 'force-verbose)
+     (transient--get-description obj))))
+
+;;; Menu Navigation
+
+(defun transient-scroll-up (&optional arg)
+  "Scroll text of transient's menu window upward ARG lines.
+If ARG is nil scroll near full screen.  This is a wrapper
+around `scroll-up-command' (which see)."
+  (interactive "^P")
+  (with-selected-window transient--window
+    (scroll-up-command arg)))
+
+(defun transient-scroll-down (&optional arg)
+  "Scroll text of transient's menu window down ARG lines.
+If ARG is nil scroll near full screen.  This is a wrapper
+around `scroll-down-command' (which see)."
+  (interactive "^P")
+  (with-selected-window transient--window
+    (scroll-down-command arg)))
+
+(defun transient-backward-button (n)
+  "Move to the previous button in transient's menu buffer.
+See `backward-button' for information about N."
+  (interactive "p")
+  (with-selected-window transient--window
+    (backward-button n t)
+    (transient--button-move-echo)))
+
+(defun transient-forward-button (n)
+  "Move to the next button in transient's menu buffer.
+See `forward-button' for information about N."
+  (interactive "p")
+  (with-selected-window transient--window
+    (forward-button n t)
+    (transient--button-move-echo)))
+
+(defun transient--button-move-echo ()
+  (when-let ((_(memq transient-enable-menu-navigation '(verbose force-verbose)))
+             (obj (get-text-property (point) 'button-data)))
+    (let ((message-log-max nil))
+      (message "%s" (or (transient-get-summary obj) "")))))
+
+(defun transient--button-help-echo (win buf pos)
+  (with-selected-window win
+    (with-current-buffer buf
+      (transient-get-summary (get-text-property pos 'button-data)))))
+
+(define-button-type 'transient
+  'face nil
+  'keymap transient-button-map
+  'help-echo #'transient--button-help-echo)
+
+(defun transient-buttonize (string object)
+  (if transient-enable-menu-navigation
+      (make-text-button string nil 'type 'transient 'button-data object)
+    string))
+
+(defun transient--goto-button (object)
+  (cl-etypecase object
+    (transient-prefix (goto-char (point-min)))
+    ((or transient-group transient-suffix)
+     (let ((found (transient--match-button object)))
+       (while (and (not (funcall found))
+                   (ignore-errors (forward-button 1))))
+       (unless (funcall found)
+         (goto-char (point-min))
+         (ignore-errors (forward-button 1))
+         (unless (funcall found)
+           (goto-char (point-min))))))))
+
+(defun transient--match-button (object)
+  (cl-etypecase object
+    ((or transient-group transient-information)
+     (let ((description (transient-format-description object)))
+       (lambda ()
+         (let ((obj (get-text-property (point) 'button-data)))
+           (and (cl-typep obj '(or transient-group transient-information))
+                (equal (string-trim-left (button-label (button-at (point))))
+                       description))))))
+    (transient-suffix
+     (let ((key (oref object key)))
+       (lambda ()
+         (let ((obj (get-text-property (point) 'button-data)))
+           (and (cl-typep obj 'transient-suffix)
+                (eq (oref obj key) key))))))))
+
+;;; Compatibility
+;;;; Menu Isearch
+
+(defvar-keymap transient--isearch-mode-map
+  :parent isearch-mode-map
+  "<t>"                      #'transient-isearch-exit
+  "<remap> <isearch-exit>"   #'transient-isearch-exit
+  "<remap> <isearch-cancel>" #'transient-isearch-cancel
+  "<remap> <isearch-abort>"  #'transient-isearch-abort)
+
+(defun transient-isearch-backward (&optional regexp-p)
+  "Do incremental search backward.
+With a prefix argument, do an incremental regular expression
+search instead."
+  (interactive "P")
+  (transient--isearch-setup)
+  (let ((isearch-mode-map transient--isearch-mode-map))
+    (isearch-mode nil regexp-p)))
+
+(defun transient-isearch-forward (&optional regexp-p)
+  "Do incremental search forward.
+With a prefix argument, do an incremental regular expression
+search instead."
+  (interactive "P")
+  (transient--isearch-setup)
+  (let ((isearch-mode-map transient--isearch-mode-map))
+    (isearch-mode t regexp-p)))
+
+(defun transient-isearch-exit ()
+  "Like `isearch-exit' but adapted for `transient'."
+  (interactive)
+  (isearch-exit)
+  (transient--isearch-exit))
+
+(defun transient-isearch-cancel ()
+  "Like `isearch-cancel' but adapted for `transient'."
+  (interactive)
+  (condition-case nil (isearch-cancel) (quit))
+  (transient--isearch-exit))
+
+(defun transient-isearch-abort ()
+  "Like `isearch-abort' but adapted for `transient'."
+  (interactive)
+  (let ((around (lambda (fn)
+                  (condition-case nil (funcall fn) (quit))
+                  (transient--isearch-exit))))
+    (advice-add 'isearch-cancel :around around)
+    (unwind-protect
+        (isearch-abort)
+      (advice-remove 'isearch-cancel around))))
+
+(defun transient--isearch-setup ()
+  (select-window transient--window)
+  (transient--suspend-override t))
+
+(defun transient--isearch-exit ()
+  (select-window transient--original-window)
+  (transient--resume-override))
+
+;;;; Edebug
+
+(defun transient--edebug-command-p ()
+  (and (bound-and-true-p edebug-active)
+       (or (memq this-command '(top-level abort-recursive-edit))
+           (string-prefix-p "edebug" (symbol-name this-command)))))
+
+;;;; Miscellaneous
+
+(cl-pushnew (list nil (concat "^\\s-*("
+                              (eval-when-compile
+                                (regexp-opt
+                                 '("transient-define-prefix"
+                                   "transient-define-suffix"
+                                   "transient-define-infix"
+                                   "transient-define-argument")
+                                 t))
+                              "\\s-+\\(" lisp-mode-symbol-regexp "\\)")
+                  2)
+            lisp-imenu-generic-expression :test #'equal)
+
+(defun transient--suspend-text-conversion-style ()
+  (when (and (bound-and-true-p text-conversion-style)
+             (bound-and-true-p overriding-text-conversion-style)
+             ;; Somehow the above does not silence the compiler.
+             (boundp 'overriding-text-conversion-style))
+    (letrec ((suspended overriding-text-conversion-style)
+             (fn (lambda ()
+                   (setq overriding-text-conversion-style nil)
+                   (remove-hook 'transient-exit-hook fn))))
+      (setq overriding-text-conversion-style suspended)
+      (add-hook 'transient-exit-hook fn))))
+
+(declare-function which-key-mode "ext:which-key" (&optional arg))
+
+(defun transient--suspend-which-key-mode ()
+  (when (bound-and-true-p which-key-mode)
+    (which-key-mode -1)
+    (add-hook 'transient-exit-hook #'transient--resume-which-key-mode)))
+
+(defun transient--resume-which-key-mode ()
+  (unless transient--prefix
+    (which-key-mode 1)
+    (remove-hook 'transient-exit-hook #'transient--resume-which-key-mode)))
+
+(defun transient-bind-q-to-quit ()
+  "Modify some keymaps to bind \\`q' to the appropriate quit command.
+
+\\`C-g' is the default binding for such commands now, but Transient's
+predecessor Magit-Popup used \\`q' instead.  If you would like to get
+that binding back, then call this function in your init file like so:
+
+  (with-eval-after-load \\='transient
+    (transient-bind-q-to-quit))
+
+Individual transients may already bind \\`q' to something else
+and such a binding would shadow the quit binding.  If that is the
+case then \\`Q' is bound to whatever \\`q' would have been bound
+to, by setting `transient-substitute-key-function' to a function
+that does that.  Of course \\`Q' may already be bound to something
+else, so that function binds \\`M-q' to that command instead.
+Of course \\`M-q' may already be bound to something else, but
+we stop there."
+  (keymap-set transient-base-map   "q" #'transient-quit-one)
+  (keymap-set transient-sticky-map "q" #'transient-quit-seq)
+  (setq transient-substitute-key-function
+        #'transient-rebind-quit-commands))
+
+(defun transient-rebind-quit-commands (obj)
+  "See `transient-bind-q-to-quit'."
+  (let ((key (oref obj key)))
+    (cond ((string-equal key "q") "Q")
+          ((string-equal key "Q") "M-q")
+          (key))))
+
+(defun transient--force-fixed-pitch ()
+  (require 'face-remap)
+  (face-remap-reset-base 'default)
+  (face-remap-add-relative 'default 'fixed-pitch))
+
+(defun transient--seq-reductions-from (function sequence initial-value)
+  (let ((acc (list initial-value)))
+    (seq-doseq (elt sequence)
+      (push (funcall function (car acc) elt) acc))
+    (nreverse acc)))
+
+(defun transient--mapn (function &rest lists)
+  "Apply FUNCTION to elements of LISTS.
+Like `cl-mapcar' but while that stops when the shortest list
+is exhausted, continue until the longest list is, using nil
+as stand-in for elements of exhausted lists."
+  (let (result)
+    (while (catch 'more (mapc (##and % (throw 'more t)) lists) nil)
+      (push (apply function (mapcar #'car-safe lists)) result)
+      (setq lists (mapcar #'cdr lists)))
+    (nreverse result)))
+
+;;; Font-Lock
+
+(defconst transient-font-lock-keywords
+  (eval-when-compile
+    `((,(concat "("
+                (regexp-opt (list "transient-define-prefix"
+                                  "transient-define-group"
+                                  "transient-define-infix"
+                                  "transient-define-argument"
+                                  "transient-define-suffix")
+                            t)
+                "\\_>[ \t'(]*"
+                "\\(\\(?:\\sw\\|\\s_\\)+\\)?")
+       (1 'font-lock-keyword-face)
+       (2 'font-lock-function-name-face nil t)))))
+
+(font-lock-add-keywords 'emacs-lisp-mode transient-font-lock-keywords)
+
+;;; Auxiliary Classes
+;;;; `transient-lisp-variable'
+
+(defclass transient-lisp-variable (transient-variable)
+  ((reader :initform #'transient-lisp-variable--reader)
+   (always-read :initform t)
+   (set-value :initarg :set-value :initform #'set))
+  "[Experimental] Class used for Lisp variables.")
+
+(cl-defmethod transient-init-value ((obj transient-lisp-variable))
+  (oset obj value (symbol-value (oref obj variable))))
+
+(cl-defmethod transient-infix-set ((obj transient-lisp-variable) value)
+  (funcall (oref obj set-value)
+           (oref obj variable)
+           (oset obj value value)))
+
+(cl-defmethod transient-format-description ((obj transient-lisp-variable))
+  (or (cl-call-next-method obj)
+      (symbol-name (oref obj variable))))
+
+(cl-defmethod transient-format-value ((obj transient-lisp-variable))
+  (propertize (prin1-to-string (oref obj value))
+              'face 'transient-value))
+
+(cl-defmethod transient-prompt ((obj transient-lisp-variable))
+  (if (and (slot-boundp obj 'prompt)
+           (oref obj prompt))
+      (cl-call-next-method obj)
+    (format "Set %s: " (oref obj variable))))
+
+(defun transient-lisp-variable--reader (prompt initial-input _history)
+  (read--expression prompt initial-input))
+
+;;;; `transient-cons-option'
+
+(defclass transient-cons-option (transient-option)
+  ((format            :initform " %k %d: %v")
+   (accessible-format :initform "%i%k %d is %v"))
+  "[Experimental] Class used for unencoded key-value pairs.")
+
+(cl-defmethod transient-infix-value ((obj transient-cons-option))
+  "Return ARGUMENT and VALUE as a cons-cell or nil if the latter is nil."
+  (and$ (oref obj value)
+        (cons (oref obj argument) $)))
+
+(cl-defmethod transient-format-description ((obj transient-cons-option))
+  (or (oref obj description)
+      (let ((description (prin1-to-string (oref obj argument) t)))
+        (if (string-prefix-p ":" description)
+            (substring description 1)
+          description))))
+
+(cl-defmethod transient-format-value ((obj transient-cons-option))
+  (with-slots (value) obj
+    (if (or value (not transient-use-accessible-values))
+        (propertize (prin1-to-string value t)
+                    'face (transient-argument-face obj))
+      "unset")))
+
+;;; _
+(provide 'transient)
+;; Local Variables:
+;; checkdoc-symbol-words: ("command-line" "edit-mode" "help-mode")
+;; indent-tabs-mode: nil
+;; lisp-indent-local-overrides: (
+;;   (cond . 0)
+;;   (interactive . 0))
+;; read-symbol-shorthands: (
+;;   ("and$"       . "cond-let--and$")
+;;   ("thread$"    . "cond-let--thread$")
+;;   ("when$"      . "cond-let--when$")
+;;   ("and-let*"   . "cond-let--and-let*")
+;;   ("and-let"    . "cond-let--and-let")
+;;   ("if-let*"    . "cond-let--if-let*")
+;;   ("if-let"     . "cond-let--if-let")
+;;   ("when-let*"  . "cond-let--when-let*")
+;;   ("when-let"   . "cond-let--when-let")
+;;   ("while-let*" . "cond-let--while-let*")
+;;   ("while-let"  . "cond-let--while-let"))
+;; End:
+;;; transient.el ends here
diff --git a/emacs/.emacs.d/elpa/transient-20260806.1211/transient.elc b/emacs/.emacs.d/elpa/transient-20260806.1211/transient.elc
new file mode 100644
index 0000000..2d564af
Binary files /dev/null and b/emacs/.emacs.d/elpa/transient-20260806.1211/transient.elc differ
diff --git a/emacs/.emacs.d/elpa/transient-20260806.1211/transient.info b/emacs/.emacs.d/elpa/transient-20260806.1211/transient.info
new file mode 100644
index 0000000..e211d25
--- /dev/null
+++ b/emacs/.emacs.d/elpa/transient-20260806.1211/transient.info
@@ -0,0 +1,4121 @@
+This is transient.info, produced by makeinfo version 7.1.1 from
+transient.texi.
+
+     Copyright (C) 2018-2026 Free Software Foundation, Inc.
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+INFO-DIR-SECTION Emacs misc features
+START-INFO-DIR-ENTRY
+* Transient: (transient). Transient Commands.
+END-INFO-DIR-ENTRY
+
+
+File: transient.info,  Node: Top,  Next: Introduction,  Up: (dir)
+
+Transient User and Developer Manual
+***********************************
+
+Transient is the library used to implement the keyboard-driven "menus"
+in Magit.  It is distributed as a separate package, so that it can be
+used to implement similar menus in other packages.
+
+   This manual can be bit hard to digest when getting started.  A useful
+resource to get over that hurdle is Psionic K's interactive tutorial,
+available at <https://github.com/positron-solutions/transient-showcase>.
+
+This manual is for Transient version 0.13.7.
+
+     Copyright (C) 2018-2026 Free Software Foundation, Inc.
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+* Menu:
+
+* Introduction::
+* Usage::
+* Modifying Existing Transients::
+* Defining New Commands::
+* Classes and Methods::
+* FAQ::
+* Keystroke Index::
+* Command and Function Index::
+* Variable Index::
+* Concept Index::
+* GNU General Public License::
+
+-- The Detailed Node Listing --
+
+Usage
+
+* Invoking Transients::
+* Aborting and Resuming Transients::
+* Common Suffix Commands::
+* Saving Values::
+* Using History::
+* Getting Help for Suffix Commands::
+* Enabling and Disabling Suffixes::
+* Other Commands::
+* Configuration::
+
+Defining New Commands
+
+* Technical Introduction::
+* Defining Transients::
+* Binding Suffix and Infix Commands::
+* Defining Suffix and Infix Commands::
+* Using Infix Arguments::
+* Using Prefix Scope::
+* Current Suffix Command::
+* Current Prefix Command::
+* Transient State::
+
+Classes and Methods
+
+* Group Classes::
+* Group Methods::
+* Prefix Classes::
+* Suffix Classes::
+* Prefix Methods::
+* Suffix Methods::
+* Prefix Slots::
+* Suffix Slots::
+* Predicate Slots::
+
+
+
+File: transient.info,  Node: Introduction,  Next: Usage,  Prev: Top,  Up: Top
+
+1 Introduction
+**************
+
+Transient is the library used to implement the keyboard-driven “menus”
+in Magit.  It is distributed as a separate package, so that it can be
+used to implement similar menus in other packages.
+
+   This manual can be bit hard to digest when getting started.  A useful
+resource to get over that hurdle is Psionic K's interactive tutorial,
+available at <https://github.com/positron-solutions/transient-showcase>.
+
+Some things that Transient can do
+=================================
+
+   • Display current state of arguments
+   • Display and manage lifecycle of modal bindings
+   • Contextual user interface
+   • Flow control for wizard-like composition of interactive forms
+   • History & persistence
+   • Rendering arguments for controlling CLI programs
+
+Complexity in CLI programs
+==========================
+
+Complexity tends to grow with time.  How do you manage the complexity of
+commands?  Consider the humble shell command ‘ls’.  It now has over
+_fifty_ command line options.  Some of these are boolean flags (‘ls
+-l’).  Some take arguments (‘ls --sort=s’).  Some have no effect unless
+paired with other flags (‘ls -lh’).  Some are mutually exclusive.  Some
+shell commands even have so many options that they introduce
+_subcommands_ (‘git branch’, ‘git commit’), each with their own rich set
+of options (‘git branch -f’).
+
+Using Transient for composing interactive commands
+==================================================
+
+What about Emacs commands used interactively?  How do these handle
+options?  One solution is to make many versions of the same command, so
+you don't need to!  Consider: ‘delete-other-windows’ vs.
+‘delete-other-windows-vertically’ (among many similar examples).
+
+   Some Emacs commands will simply prompt you for the next "argument"
+(‘M-x switch-to-buffer’).  Another common solution is to use prefix
+arguments which usually start with ‘C-u’.  Sometimes these are sensibly
+numerical in nature (‘C-u 4 M-x forward-paragraph’ to move forward 4
+paragraphs).  But sometimes they function instead as boolean "switches"
+(‘C-u C-SPACE’ to jump to the last mark instead of just setting it, ‘C-u
+C-u C-SPACE’ to unconditionally set the mark).  Since there aren't many
+standards for the use of prefix options, you have to read the command's
+documentation to find out what the possibilities are.
+
+   But when an Emacs command grows to have a truly large set of options
+and arguments, with dependencies between them, lots of option values,
+etc., these simple approaches just don't scale.  Transient is designed
+to solve this issue.  Think of it as the humble prefix argument ‘C-u’,
+_raised to the power of 10_.  Like ‘C-u’, it is key driven.  Like the
+shell, it supports boolean "flag" options, options that take arguments,
+and even "sub-commands", with their own options.  But instead of
+searching through a man page or command documentation, well-designed
+transients _guide_ their users to the relevant set of options (and even
+their possible values!)  directly, taking into account any important
+pre-existing Emacs settings.  And while for shell commands like ‘ls’,
+there is only one way to "execute" (hit ‘Return’!), transients can
+"execute" using multiple different keys tied to one of many
+self-documenting _actions_ (imagine having 5 different colored return
+keys on your keyboard!).  Transients make navigating and setting large,
+complex groups of command options and arguments easy.  Fun even.  Once
+you've tried it, it's hard to go back to the ‘C-u what can I do here
+again?’ way.
+
+
+File: transient.info,  Node: Usage,  Next: Modifying Existing Transients,  Prev: Introduction,  Up: Top
+
+2 Usage
+*******
+
+* Menu:
+
+* Invoking Transients::
+* Aborting and Resuming Transients::
+* Common Suffix Commands::
+* Saving Values::
+* Using History::
+* Getting Help for Suffix Commands::
+* Enabling and Disabling Suffixes::
+* Other Commands::
+* Configuration::
+
+
+File: transient.info,  Node: Invoking Transients,  Next: Aborting and Resuming Transients,  Up: Usage
+
+2.1 Invoking Transients
+=======================
+
+A transient prefix command is invoked like any other command by pressing
+the key that is bound to that command.  The main difference to other
+commands is that a transient prefix command activates a transient
+keymap, which temporarily binds the transient's infix and suffix
+commands, and that those bindings are shown in menu buffer, which is
+displayed in a new window, until the menu is exited.  Bindings from
+other keymaps may, or may not, be disabled while the transient state is
+in effect.
+
+   There are two kinds of commands that are available after invoking a
+transient prefix command; infix and suffix commands.  Infix commands set
+some value (which is then shown in the menu buffer), without leaving the
+transient.  Suffix commands, on the other hand, usually quit the
+transient and they may use the values set by the infix commands, i.e.,
+the infix *arguments*.
+
+   Instead of setting arguments to be used by a suffix command, infix
+commands may also set some value by side-effect, e.g., by setting the
+value of some variable.
+
+
+File: transient.info,  Node: Aborting and Resuming Transients,  Next: Common Suffix Commands,  Prev: Invoking Transients,  Up: Usage
+
+2.2 Aborting and Resuming Transients
+====================================
+
+To quit the transient without invoking a suffix command press ‘C-g’.
+
+   Key bindings in transient keymaps may be longer than a single event.
+After pressing a valid prefix key, all commands whose bindings do not
+begin with that prefix key are temporarily unavailable and grayed out.
+To abort the prefix key press ‘C-g’ (which in this case only quits the
+prefix key, but not the complete transient).
+
+   A transient prefix command can be bound as a suffix of another
+transient.  Invoking such a suffix replaces the current transient state
+with a new transient state, i.e., the available bindings change and the
+information displayed in the menu buffer is updated accordingly.
+Pressing ‘C-g’ while a nested transient is active only quits the
+innermost transient, causing a return to the previous transient.
+
+   ‘C-q’ or ‘C-z’ on the other hand always exits all transients.  If you
+use the latter, then you can later resume the stack of transients using
+‘M-x transient-resume’.
+
+‘C-g’ (‘transient-quit-seq’)
+‘C-g’ (‘transient-quit-one’)
+     This key quits the currently active incomplete key sequence, if
+     any, or else the current transient.  When quitting the current
+     transient, it returns to the previous transient, if any.
+
+   Transient's predecessor bound ‘q’ instead of ‘C-g’ to the quit
+command.  To learn how to get that binding back see
+‘transient-bind-q-to-quit’'s documentation string.
+
+‘C-q’ (‘transient-quit-all’)
+     This command quits the currently active incomplete key sequence, if
+     any, and all transients, including the active transient and all
+     suspended transients, if any.
+
+‘C-z’ (‘transient-suspend’)
+     Like ‘transient-quit-all’, this command quits an incomplete key
+     sequence, if any, and all transients.  Additionally, it saves the
+     stack of transients so that it can easily be resumed (which is
+     particularly useful if you quickly need to do "something else" and
+     the stack is deeper than a single transient, and/or you have
+     already changed the values of some infix arguments).
+
+     Note that only a single stack of transients can be saved at a time.
+     If another stack is already saved, then saving a new stack discards
+     the previous stack.
+
+‘M-x transient-resume’
+     This command resumes the previously suspended stack of transients,
+     if any.
+
+
+File: transient.info,  Node: Common Suffix Commands,  Next: Saving Values,  Prev: Aborting and Resuming Transients,  Up: Usage
+
+2.3 Common Suffix Commands
+==========================
+
+A few shared suffix commands are available in all transients.  These
+suffix commands are not shown permanently in every menu by default.
+Most of these commands share a common prefix key and pressing that key
+causes the common commands to be temporarily shown in the active menu.
+
+ -- User Option: transient-show-common-commands
+     This option controls whether shared suffix commands are permanently
+     shown alongside the menu-specific infix and suffix commands.  By
+     default, the shared commands are not permanently shown to avoid
+     wasting precious space and overwhelming the user with too many
+     choices.
+
+     If you prefer to always see these commands, then set this option to
+     a non-‘nil’ value.  Alternatively the value can be toggled for the
+     current Emacs session only, using ‘transient-toggle-common’,
+     described below.
+
+ -- User Option: transient-common-command-prefix
+     This option specifies the prefix key used in all transient menus to
+     invoke most of the shared commands, which are available in all
+     transient menus.  By default these bindings are only shown after
+     pressing that prefix key and before following that up with a valid
+     key binding (but see the previous option).
+
+     For historic reasons ‘C-x’ is used by default, but users are
+     encouraged to pick another key, preferably one that is not commonly
+     used in Emacs but is still convenient to them.
+
+     Usually, while a transient menu is active, the user cannot invoke
+     commands that are not bound in the menu itself.  For those menus it
+     does not matter, if ‘C-x’ or another commonly used prefix key is
+     used for common menu commands.  However, certain other, newer menus
+     do not suppress key bindings established outside the menu itself,
+     and in those cases a binding for a common menu command could shadow
+     an external binding.  For example, ‘C-x C-s’ could not be used to
+     invoke ‘save-buffer’, if that binding is shadowed by the menu
+     binding for ‘transient-save’.
+
+     Which key is most suitable depends on the user's preferences, but
+     good choices may include function keys and ‘C-z’ (for many keyboard
+     layouts ‘z’ is right next to ‘x’, and invoking ‘suspend-frame’,
+     while a transient menu is active, would not be a good idea anyway).
+
+‘C-x t’ (‘transient-toggle-common’)
+     This command toggles whether the generic commands, that are common
+     to all transients, are permanently displayed or only after typing
+     the incomplete prefix key sequence‘’.  This only affects the
+     current Emacs session.
+
+   The other common commands are described in either the previous or in
+one of the following sections.
+
+
+File: transient.info,  Node: Saving Values,  Next: Using History,  Prev: Common Suffix Commands,  Up: Usage
+
+2.4 Saving Values
+=================
+
+After setting the infix arguments in a transient, the user can save
+those arguments for future invocations.
+
+   Most transients will start out with the saved arguments when they are
+invoked.  There are a few exceptions, though.  Some transients are
+designed so that the value that they use is stored externally as the
+buffer-local value of some variable.  Invoking such a transient again
+uses the buffer-local value.  (1)
+
+   If the user does not save the value and just exits using a regular
+suffix command, then the value is merely saved to the transient's
+history.  That value won't be used when the transient is next invoked,
+but it is easily accessible (see *note Using History::).
+
+   Option ‘transient-common-command-prefix’ controls the prefix key used
+in the following bindings.  For simplicity's sake the default, ‘C-x’, is
+shown below.
+
+‘C-x s’ (‘transient-set’)
+     This command saves the value of the active transient for this Emacs
+     session.
+
+‘C-x C-s’ (‘transient-save’)
+     This command saves the value of the active transient persistently
+     across Emacs sessions.
+
+‘C-x C-k’ (‘transient-reset’)
+     This command clears the set and saved values of the active
+     transient.
+
+ -- User Option: transient-values-file
+     This option names the file that is used to persist the values of
+     transients between Emacs sessions.
+
+   ---------- Footnotes ----------
+
+   (1) ‘magit-diff’ and ‘magit-log’ are two prominent examples, and
+their handling of buffer-local values is actually a bit more complicated
+than outlined above and even customizable.
+
+
+File: transient.info,  Node: Using History,  Next: Getting Help for Suffix Commands,  Prev: Saving Values,  Up: Usage
+
+2.5 Using History
+=================
+
+Every time the user invokes a suffix command the transient's current
+value is saved to its history.  These values can be cycled through, the
+same way one can cycle through the history of commands that read
+user-input in the minibuffer.
+
+   Option ‘transient-common-command-prefix’ controls the prefix key used
+in the following bindings.  For simplicity's sake the default, ‘C-x’, is
+shown below.
+
+‘C-M-p’ (‘transient-history-prev’)
+‘C-x p’
+     This command switches to the previous value used for the active
+     transient.
+
+‘C-M-n’ (‘transient-history-next’)
+‘C-x n’
+     This command switches to the next value used for the active
+     transient.
+
+   In addition to the transient-wide history, infixes can have their own
+history.  When an infix reads user-input using the minibuffer, the user
+can use the regular minibuffer history commands to cycle through
+previously used values.  Usually the same keys as those mentioned above
+are bound to those commands.
+
+   Authors of transients should arrange for different infix commands
+that read the same kind of value to also use the same history key (see
+*note Suffix Slots::).
+
+   Both kinds of history are saved to a file when Emacs is exited.
+
+ -- User Option: transient-save-history
+     This option controls whether the history of transient commands is
+     saved when exiting Emacs.
+
+ -- User Option: transient-history-file
+     This option names the file that is used to persist the history of
+     transients and their infixes between Emacs sessions.
+
+ -- User Option: transient-history-limit
+     This option controls how many history elements are kept at the time
+     the history is saved in ‘transient-history-file’.
+
+
+File: transient.info,  Node: Getting Help for Suffix Commands,  Next: Enabling and Disabling Suffixes,  Prev: Using History,  Up: Usage
+
+2.6 Getting Help for Suffix Commands
+====================================
+
+Transients can have many suffixes and infixes that the user might not be
+familiar with.  To make it trivial to get help for these, Transient
+provides access to the documentation directly from the active transient.
+
+‘C-h’ (‘transient-help’)
+     This command enters help mode.  When help mode is active, typing a
+     key shows information about the suffix command that the key
+     normally is bound to (instead of invoking it).  Pressing ‘C-h’ a
+     second time shows information about the _prefix_ command.
+
+     After typing a key, the stack of transient states is suspended and
+     information about the suffix command is shown instead.  Typing ‘q’
+     in the help buffer buries that buffer and resumes the transient
+     state.
+
+   What sort of documentation is shown depends on how the transient was
+defined.  For infix commands that represent command-line arguments this
+ideally shows the appropriate manpage.  ‘transient-help’ then tries to
+jump to the correct location within that.  Info manuals are also
+supported.  The fallback is to show the command's documentation string,
+for non-infix suffixes this is usually appropriate.
+
+
+File: transient.info,  Node: Enabling and Disabling Suffixes,  Next: Other Commands,  Prev: Getting Help for Suffix Commands,  Up: Usage
+
+2.7 Enabling and Disabling Suffixes
+===================================
+
+The user base of a package that uses transients can be very diverse.
+This is certainly the case for Magit; some users have been using it and
+Git for a decade, while others are just getting started now.
+
+   For that reason a mechanism is needed that authors can use to
+classify a transient's infixes and suffixes along the
+essentials...everything spectrum.  We use the term “levels” to describe
+that mechanism.
+
+   Each suffix command is placed on a level and each transient has a
+level (called “transient-level”), which controls which suffix commands
+are available.  Integers between 1 and 7 (inclusive) are valid levels.
+For suffixes, 0 is also valid; it means that the suffix is not displayed
+at any level.
+
+   The levels of individual transients and/or their individual suffixes
+can be changed interactively, by invoking the menu and entering its
+"edit" mode using the command ‘transient-set-level’, as described below.
+
+   The default level for both transients and their suffixes is 4.  The
+‘transient-default-level’ option only controls the default for
+transients.  The default suffix level is always 4.  The authors of
+transients should place certain suffixes on a higher level, if they
+expect that it won't be of use to most users, and they should place very
+important suffixes on a lower level, so that they remain available even
+if the user lowers the transient level.
+
+ -- User Option: transient-default-level
+     This option controls which suffix levels are made available by
+     default.  It sets the transient-level for transients for which the
+     user has not set that individually.
+
+ -- User Option: transient-levels-file
+     This option names the file that is used to persist the levels of
+     transients and their suffixes between Emacs sessions.
+
+   Option ‘transient-common-command-prefix’ controls the prefix key used
+in the following bindings.  For simplicity's sake the default, ‘C-x’, is
+shown below.
+
+‘C-x l’ (‘transient-set-level’)
+     This command enters edit mode.  When edit mode is active, then all
+     infixes and suffixes that are currently usable are displayed along
+     with their levels.  The colors of the levels indicate whether they
+     are enabled or not.  The level of the transient is also displayed
+     along with some usage information.
+
+     In edit mode, pressing the key that would usually invoke a certain
+     suffix instead prompts the user for the level that suffix should be
+     placed on.
+
+     Help mode is available in edit mode.
+
+     To change the transient level press ‘C-x l’ again.
+
+     To exit edit mode press ‘C-g’.
+
+     Note that edit mode does not display any suffixes that are not
+     currently usable.  ‘magit-rebase’, for example, shows different
+     suffixes depending on whether a rebase is already in progress or
+     not.  The predicates also apply in edit mode.
+
+     Therefore, to control which suffixes are available given a certain
+     state, you have to make sure that that state is currently active.
+
+‘C-x a’ (‘transient-toggle-level-limit’)
+     This command toggle whether suffixes that are on levels higher than
+     the level specified by ‘transient-default-level’ are temporarily
+     available anyway.
+
+ -- Function: transient-set-default-level suffix level
+     This function sets the default level of the suffix COMMAND to
+     LEVEL.
+
+     If a suffix command appears in multiple menus, it may make sense to
+     consistently change its level in all those menus at once.  For
+     example, the ‘--gpg-sign’ argument (which is implemented using the
+     command ‘magit:--gpg-sign’), is bound in all of Magit's menu which
+     create commits.  Users who sometimes sign their commits would want
+     that argument to be available in all of these menus, while for
+     users who never sign it is just unnecessary noise in any menus.
+
+     To always make ‘--gpg-sign’ available, use:
+
+          (transient-set-default-level 'magit:--gpg-sign 1)
+
+     To never make ‘--gpg-sign’ available, use:
+
+          (transient-set-default-level 'magit:--gpg-sign 0)
+
+     This sets the level in the suffix prototype object for this
+     command.  Commands only have a suffix prototype if they were
+     defined using one of ‘transient-define-argument’,
+     ‘transient-define-infix’ and ‘transient-define-suffix’.  For all
+     other commands this would signal an error.  (This is one of the
+     reasons why package authors should use one of these functions to
+     define shared suffix commands, and especially shared arguments.)
+
+     If the user changes the level of a suffix in a particular menu,
+     using ‘C-x l’ as shown above, then that obviously shadows the
+     default.
+
+     It is also possible to set the level of a suffix binding in a
+     particular menu, either when defining the menu using
+     ‘transient-define-prefix,’ or later using
+     ‘transient-insert-suffix’.  If such bindings specify a level, then
+     that also overrides the default.  (Per-suffix default levels is a
+     new feature, so you might encounter this quite often.)
+
+
+File: transient.info,  Node: Other Commands,  Next: Configuration,  Prev: Enabling and Disabling Suffixes,  Up: Usage
+
+2.8 Other Commands
+==================
+
+When invoking a transient in a small frame, the transient window may not
+show the complete buffer, making it necessary to scroll, using the
+following commands.  These commands are never shown in the transient
+window, and the key bindings are the same as for ‘scroll-up-command’ and
+‘scroll-down-command’ in other buffers.
+
+ -- Command: transient-scroll-up arg
+     This command scrolls text of transient's menu window upward ARG
+     lines.  If ARG is ‘nil’, then it scrolls near full screen.  This is
+     a wrapper around ‘scroll-up-command’ (which see).
+
+ -- Command: transient-scroll-down arg
+     This command scrolls text of transient's menu window down ARG
+     lines.  If ARG is ‘nil’, then it scrolls near full screen.  This is
+     a wrapper around ‘scroll-down-command’ (which see).
+
+   The following commands are not available by default.  If you would
+like to use them for all menus, bind them in ‘transient-map’.
+
+ -- Command: transient-copy-menu-text
+     This command copies the contents of the menu buffer to the kill
+     ring.
+
+ -- Command: transient-toggle-docstrings
+     This command toggle between showing suffix descriptions in the menu
+     (as usual) or showing the first lines of the respective docstrings
+     in their place.  For commands that do not have a docstring, always
+     display the suffix description.  Because there likely isn't enough
+     room to display multiple docstrings side-by-side, a single column
+     is used when displaying docstrings.
+
+
+File: transient.info,  Node: Configuration,  Prev: Other Commands,  Up: Usage
+
+2.9 Configuration
+=================
+
+More options are described in *note Common Suffix Commands::, in *note
+Saving Values::, in *note Using History:: and in *note Enabling and
+Disabling Suffixes::.
+
+Essential Options
+-----------------
+
+Two more essential options are documented in *note Common Suffix
+Commands::.
+
+ -- User Option: transient-show-menu
+     This option controls whether and when transient's menu buffer is
+     shown.
+
+        • If ‘t’ (the default), then the buffer is shown as soon as a
+          transient prefix command is invoked.
+
+        • If ‘nil’, then the buffer is not shown unless the user
+          explicitly requests it, by pressing an incomplete prefix key
+          sequence.
+
+        • If a number, then the a brief one-line summary is shown
+          instead of the menu buffer.  If zero or negative, then not
+          even that summary is shown; only the pressed key itself is
+          shown.
+
+          The buffer is shown once the user explicitly requests it by
+          pressing an incomplete prefix key sequence.  Unless this is
+          zero, the menu is shown after that many seconds of inactivity
+          (using the absolute value).
+
+ -- User Option: transient-show-during-minibuffer-read
+     This option controls whether the transient menu continues to be
+     displayed while the minibuffer is used to read user input.
+
+     This is only relevant to commands that do not close the menu, such
+     as commands that set infix arguments.  If a command exits the menu,
+     and uses the minibuffer, then the menu is always closed before the
+     minibuffer is entered, irrespective of the value of this option.
+
+     When ‘nil’ (the default), hide the menu while the minibuffer is in
+     use.  When ‘t’, keep showing the menu, but allow for the menu
+     window to be resized, to ensure that completion candidates can be
+     displayed.
+
+     When ‘fixed’, keep showing the menu and prevent it from being
+     resized, which may make it impossible to display the completion
+     candidates.  If that ever happens for you, consider using ‘t’ or an
+     integer, as described below.
+
+     If the value is ‘fixed’ and the menu window uses the full height of
+     its frame, then the former is ignored and resizing is allowed
+     anyway.  This is necessary because individual menus may use unusual
+     display actions different from what
+     ‘transient-display-buffer-action’ specifies (likely to display that
+     menu in a side-window).
+
+     When using a third-party mode, which automatically resizes windows
+     (e.g., by calling ‘balance-windows’ on ‘post-command-hook’), then
+     ‘fixed’ (or ‘nil’) is likely a better choice than ‘t’.
+
+     The value can also be an integer, in which case the behavior
+     depends on whether at least that many lines are left to display
+     windows other than the menu window.  If that is the case, display
+     the menu and preserve the size of that window.  Otherwise, allow
+     resizing the menu window if the number is positive, or hide the
+     menu if it is negative.
+
+ -- User Option: transient-read-with-initial-input
+     This option controls whether the last history element is used as
+     the initial minibuffer input when reading the value of an infix
+     argument from the user.  If ‘nil’, there is no initial input and
+     the first element has to be accessed the same way as the older
+     elements.
+
+ -- User Option: transient-enable-menu-navigation
+     This option controls whether navigation commands are enabled in
+     transient menu buffer, and whether additional documentation is
+     shown in the echo area while doing so.
+
+     If the value is ‘verbose’ (the default), additional documentation
+     about the command at point is shown in the echo area.  If this
+     would result in the same documentation, which is being displayed
+     inside the menu buffer, to be duplicated in the echo area, then
+     ‘verbose’ forgoes doing so.  Use ‘force-verbose’ to echo even such
+     documentation.  Use ‘t’ to enable menu navigation without showing
+     documentation in the echo area.
+
+     While a transient is active, the menu buffer is (by default) not
+     the current buffer, making it necessary to use dedicated commands
+     to act on that buffer itself.  If this option is non-nil, then the
+     following bindings are available:
+
+        • ‘<UP>’ moves the cursor to the previous suffix.
+        • ‘<DOWN>’ moves the cursor to the next suffix.
+        • ‘M-<RET>’ invokes the suffix the cursor is on.
+        • ‘mouse-1’ and ‘mouse-2’ invokes the clicked on suffix.
+        • ‘C-s’ and ‘C-r’ start isearch in the menu buffer.
+
+     ‘mouse-1’ and ‘mouse-2’ are bound in ‘transient-button-map’.  All
+     other bindings are in ‘transient-popup-navigation-map’.
+
+     Instead of ‘<RET>’, ‘M-<RET>’ is used to invoke the suffix command
+     at point by default, because if a transient allows the invocation
+     of non-suffixes, then it is likely that the user would want the
+     former do what it would do if no transient were active.
+
+ -- User Option: transient-display-buffer-action
+     This option specifies the action used to display the transient's
+     menu buffer.  The menu buffer is displayed in a window using
+     ‘(display-buffer BUFFER transient-display-buffer-action)’.
+
+     The value of this option has the form ‘(FUNCTION . ALIST)’, where
+     FUNCTION is a function or a list of functions.  Each such function
+     should accept two arguments: a buffer to display and an alist of
+     the same form as ALIST.  See *note (elisp)Choosing Window::, for
+     details.
+
+     The default is:
+
+          (display-buffer-in-side-window
+           (side . bottom)
+           (dedicated . t)
+           (inhibit-same-window . t))
+
+     This displays the window at the bottom of the selected frame.  For
+     alternatives see *note (elisp)Buffer Display Action Functions::,
+     and *note (elisp)Buffer Display Action Alists::.
+
+     When you switch to a different ACTION, you should keep the ALIST
+     entries for ‘dedicated’ and ‘inhibit-same-window’ in most cases.
+     Do not drop them because you are unsure whether they are needed; if
+     you are unsure, then keep them.
+
+     Note that the buffer that was current before the transient buffer
+     is shown should remain the current buffer.  Many suffix commands
+     act on the thing at point, if appropriate, and if the transient
+     buffer became the current buffer, then that would change what is at
+     point.  To that effect ‘inhibit-same-window’ ensures that the
+     selected window is not used to show the transient buffer.
+
+     It may be possible to display the window in another frame, but
+     whether that works in practice depends on the window-manager.  If
+     the window manager selects the new window (Emacs frame), then that
+     unfortunately changes which buffer is current.
+
+     If you change the value of this option, then you might also want to
+     change the value of ‘transient-mode-line-format’.
+
+     This user option may be overridden if ‘:display-action’ is passed
+     when creating a new prefix with ‘transient-define-prefix’.
+
+Accessibility Options
+---------------------
+
+For visually impaired users I recommend the following configuration.  If
+you need more guidance or would like to share your experience, please
+don't hesitate to contact me.
+
+     (setopt transient-enable-menu-navigation 'force-verbose)
+     (setopt transient-navigate-to-group-descriptions t)
+     (setopt transient-describe-menu t)
+     (setopt transient-select-menu-window t)
+     (setopt transient-force-single-column t)
+     (setopt transient-prefer-reading-value t)
+     (setopt transient-use-accessible-values t)
+     (setopt transient-use-accessible-formats t)
+
+   Additionally you have allow the command, which you use to read the
+text at point, to be run when a transient menu is active, for example:
+
+     (define-key transient-predicate-map
+       [my-read-text-at-point] #'transient--do-stay)
+
+ -- User Option: transient-enable-menu-navigation
+     This option is documented in the previous node (*note Essential
+     Options::).  You might want to change the value from ‘verbose’ to
+     ‘force-verbose’, which causes information to be shown in the echo
+     area, even if it is identical to information already displayed in
+     the menu buffer.  Whether that is useful to you depends on whether
+     your setup makes it easy to read the last message displayed in the
+     echo area.
+
+ -- User Option: transient-navigate-to-group-descriptions
+     This option controls whether menu navigation commands stop at group
+     descriptions.  If your output method works by reading the text at
+     point, you most likely want to enable this.
+
+     If ‘transient-enable-menu-navigation’ is non-‘nil’, which it is by
+     default, ‘<UP>’ and ‘<DOWN>’ move from suffix to suffix.  When this
+     option is non-‘nil’ as well, then they additionally stop at group
+     descriptions.  This is useful because it allows braille and audio
+     devices to output the group title at point.
+
+ -- User Option: transient-describe-menu
+     This option controls whether a short description about the menu
+     itself is inserted at the beginning of the menu buffer.
+
+     When this is non-‘nil’, then the menu buffer begins with a short
+     description.  Ideally this is a string written exactly for that
+     purpose, but because this is a new feature, most menu commands do
+     not provide that yet.  In that case the first line of the prefix
+     command's docstring is used as fallback.  If the value is
+     ‘docstring’, then the docstring is used even if a description is
+     available.
+
+ -- User Option: transient-select-menu-window
+     This option controls whether the window displaying the transient
+     menu is automatically selected as soon as it is displayed.
+
+     Enabling this is discouraged, except for users of braille and audio
+     output devises.  Note that enabling this, or alternatively
+     selecting the menu window on demand, are both unnecessary, to be
+     able to move the cursor in the menu.  See
+     ‘transient-enable-menu-navigation’.
+
+ -- User Option: transient-force-single-column
+     This option controls whether the use of a single column to display
+     suffixes is enforced.  This might be useful for users with low
+     vision who use large text and might otherwise have to scroll in two
+     dimensions.  This is also useful for blind users, because it causes
+     suffixes to be navigated in a more natural order, because often
+     related commands are displayed in the same column but navigation
+     first moves horizontally to the next item on the same row.
+
+ -- User Option: transient-prefer-reading-value
+     This option controls whether reading a new value is preferred over
+     other value selection methods.
+
+     If this is ‘nil’ (the default), then certain arguments are directly
+     disabled when they are invoked, while they have a non-‘nil’ value.
+     I.e., to switch from one non-‘nil’ value to another non-‘nil’
+     value, such commands have to be invoked twice.  For other
+     arguments, which happen to have a small set of possible values, all
+     values are displayed at all times, using solely coloring to
+     indicate which of the values is active.  When such an infix command
+     is invoked it cycles to the next value.
+
+     This default does not work for visually impaired user.  If this
+     option is non-‘nil’, then more arguments immediately read the new
+     value, instead of being toggled off on first invocation, or instead
+     of cycling through values.
+
+ -- User Option: transient-use-accessible-values
+     This option controls whether values are shown in a way that does
+     not rely on coloring.
+
+     If this is ‘nil’ (the default), then colors are used to communicate
+     the state of arguments.  For certain argument types the state is
+     solely communicated that way.  For example, an enabled command-line
+     switch is shown using some bright color, and disabling that
+     argument, changes the color to gray, without otherwise changing the
+     displayed text.
+
+     This default does not work for visually impaired user.  If this
+     option is non-‘nil’, then the state is additionally communicated
+     through other means.  A switch, for example, is either followed by
+     "is enabled" or "is disabled".  How exactly the state is
+     communicated depends on the type of the infix command.
+
+     Note that packages, which use Transient, can define their own infix
+     command types, which may or may not involve overriding Transient's
+     code, which honors this new option.  I.e., it will take some time
+     until everything respects this setting.
+
+ -- User Option: transient-use-accessible-formats
+     This option controls whether more accessible format strings are
+     used for menu elements.
+
+     If this is non-‘nil’, then menu elements are displayed in a way,
+     that I hope, is more suitable for visually impaired users than the
+     default.  Please provide feedback, so that we can together work on
+     improving this.
+
+     By default the format specified by an element's ‘format’ slot is
+     used.  When this is non-‘nil’, then the ‘accessible-format’ slot is
+     used instead.  One change implemented in the latter is that for an
+     element representing a command-line argument, the argument and its
+     value are moved before the description, giving quicker access to
+     the current state, while still allowing users to read the
+     description, in case they don't know yet what the argument in
+     question does.
+
+     Enabling this also causes the string "inapt" to be added at the
+     very beginning of the text describing a command that currently
+     cannot be used.  When using the default format, the only visual
+     clue that a command is inapt, is that the complete text
+     representing it is grayed out.  (As an example of such an inapt
+     command, consider the case of a commands that can only act on the
+     file at point, when there currently isn't a file at point.)
+     Placing the string "inapt" at the very beginning gives users the
+     opportunity to immediately skip over unusable commands, while still
+     giving them the opportunity to read on.
+
+Auxiliary Options
+-----------------
+
+ -- User Option: transient-mode-line-format
+     This option controls whether transient's menu buffer has a
+     mode-line, separator line, or neither.
+
+     If ‘nil’, then the buffer has no mode-line.  If the buffer is not
+     displayed right above the echo area, then this probably is not a
+     good value.
+
+     If ‘line’ (the default) or a natural number, then the buffer has no
+     mode-line, but a line is drawn in its place.  If a number is used,
+     that specifies the thickness of the line.  On termcap frames we
+     cannot draw lines, so there ‘line’ and numbers are synonyms for
+     ‘nil’.
+
+     The color of the line is used to indicate if non-suffixes are
+     allowed and whether they exit the transient.  The foreground color
+     of ‘transient-key-noop’ (if non-suffixes are disallowed),
+     ‘transient-key-stay’ (if allowed and transient stays active), or
+     ‘transient-key-exit’ (if allowed and they exit the transient) is
+     used to draw the line.
+
+     This user option may be overridden if ‘:mode-line-format’ is passed
+     when creating a new prefix with ‘transient-define-prefix’.
+
+     Otherwise this can be any mode-line format.  See *note (elisp)Mode
+     Line Format::, for details.
+
+ -- User Option: transient-semantic-coloring
+     This option controls whether colors are used to indicate the
+     transient behavior of commands.
+
+     If non-‘nil’, then the key binding of each suffix is colorized to
+     indicate whether it exits the transient state or not.  The color of
+     the prefix is indicated using the line that is drawn when the value
+     of ‘transient-mode-line-format’ is ‘line’.
+
+ -- User Option: transient-highlight-mismatched-keys
+     This option controls whether key bindings of infix commands that do
+     not match the respective command-line argument should be
+     highlighted.  For other infix commands this option has no effect.
+
+     This is mostly intended for authors of transient menus and disabled
+     by default.
+
+     When this option is non-‘nil’, the key binding for an infix
+     argument is highlighted when only a long argument (e.g.,
+     ‘--verbose’) is specified but no shorthand (e.g., ‘-v’).  In the
+     rare case that a shorthand is specified but the key binding does
+     not match, then it is highlighted differently.
+
+     Highlighting mismatched key bindings is useful when learning the
+     arguments of the underlying command-line tool; you wouldn't want to
+     learn any short-hands that do not actually exist.
+
+     The highlighting is done using one of the faces
+     ‘transient-mismatched-key’ and ‘transient-nonstandard-key’.
+
+ -- User Option: transient-substitute-key-function
+     This function is used to modify key bindings.  If the value of this
+     option is ‘nil’ (the default), then no substitution is performed.
+
+     This function is called with one argument, the prefix object, and
+     must return a key binding description, either the existing key
+     description it finds in the ‘key’ slot, or the key description that
+     replaces the prefix key.  It could be used to make other
+     substitutions, but that is discouraged.
+
+     For example, ‘=’ is hard to reach using my custom keyboard layout,
+     so I substitute ‘(’ for that, which is easy to reach using a layout
+     optimized for lisp.
+
+          (setq transient-substitute-key-function
+                (lambda (obj)
+                  (let ((key (oref obj key)))
+                    (if (string-match "\\`\\(=\\)[a-zA-Z]" key)
+                        (replace-match "(" t t key 1)
+                      key))))
+
+ -- User Option: transient-align-variable-pitch
+     This option controls whether columns are aligned pixel-wise in the
+     menu buffer.
+
+     If this is non-‘nil’, then columns are aligned pixel-wise to
+     support variable-pitch fonts.  Keys are not aligned, so you should
+     use a fixed-pitch font for the ‘transient-key’ face.  Other key
+     faces inherit from that face unless a theme is used that breaks
+     that relationship.
+
+     This option is intended for users who use a variable-pitch font for
+     the ‘default’ face.
+
+ -- User Option: transient-force-fixed-pitch
+     This option controls whether to force the use of a monospaced font
+     in menu buffer.  Even if you use a proportional font for the
+     ‘default’ face, you might still want to use a monospaced font in
+     the menu buffer.  Setting this option to ‘t’ causes ‘default’ to be
+     remapped to ‘fixed-pitch’ in that buffer.
+
+Developer Options
+-----------------
+
+These options are mainly intended for developers.
+
+ -- User Option: transient-detect-key-conflicts
+     This option controls whether key binding conflicts should be
+     detected at the time the transient is invoked.  If so, this results
+     in an error, which prevents the transient from being used.  Because
+     of that, conflicts are ignored by default.
+
+     Conflicts cannot be determined earlier, i.e., when the transient is
+     being defined and when new suffixes are being added, because at
+     that time there can be false-positives.  It is actually valid for
+     multiple suffixes to share a common key binding, provided the
+     predicates of those suffixes prevent that more than one of them is
+     enabled at a time.
+
+ -- User Option: transient-error-on-insert-failure
+     This option controls whether to signal an error when
+     ‘transient-insert-suffix’ or ‘transient-append-suffix’ failed to
+     insert a suffix into an existing prefix.  By default a warning is
+     shown instead.
+
+ -- User Option: transient-highlight-higher-levels
+     This option controls whether suffixes that would not be available
+     by default are highlighted.
+
+     When non-‘nil’ then the descriptions of suffixes are highlighted if
+     their level is above 4, the default of ‘transient-default-level’.
+     Assuming you have set that variable to 7, this highlights all
+     suffixes that won't be available to users without them making the
+     same customization.
+
+Hook Variables
+--------------
+
+ -- Variable: transient-exit-hook
+     This hook is run after a transient menu is exited, even if another
+     transient menu becomes active at the same time.
+
+ -- Variable: transient-post-exit-hook
+     This hook is run after a transient menu is exited, provided no
+     other transient menu becomes active at the same time.
+
+ -- Variable: transient-setup-buffer-hook
+     This hook is run when the transient buffer is being setup.  That
+     buffer is current and empty when this hook is runs.
+
+
+File: transient.info,  Node: Modifying Existing Transients,  Next: Defining New Commands,  Prev: Usage,  Up: Top
+
+3 Modifying Existing Transients
+*******************************
+
+To an extent, transients can be customized interactively, see *note
+Enabling and Disabling Suffixes::.  This section explains how existing
+transients can be further modified non-interactively.  Let's begin with
+an example:
+
+     (transient-append-suffix 'magit-patch-apply "-3"
+       '("-R" "Apply in reverse" "--reverse"))
+
+   This inserts a new infix argument to toggle the ‘--reverse’ argument
+after the infix argument that is bound to ‘-3’ in ‘magit-patch-apply’.
+
+   The following functions share a few arguments:
+
+   • PREFIX is a transient prefix command, a symbol.
+
+     PREFIX may also by a symbol identifying a separately defined group,
+     which can be included in multiple prefixes.  See TODO.
+
+   • SUFFIX is a transient infix or suffix specification in the same
+     form as expected by ‘transient-define-prefix’.  Note that an infix
+     is a special kind of suffix.  Depending on context "suffixes" means
+     "suffixes (including infixes)" or "non-infix suffixes".  Here it
+     means the former.  See *note Suffix Specifications::.
+
+     SUFFIX may also be a group in the same form as expected by
+     ‘transient-define-prefix’.  See *note Group Specifications::.
+
+   • LOC is a key description (a string as returned by ‘key-description’
+     and understood by ‘kbd’), a command, a symbol identifying an
+     included group, or a vector specifying coordinates.  For example,
+     ‘[1 0 -1]’ identifies the last suffix (‘-1’) of the first subgroup
+     (‘0’) of the second group (‘1’).
+
+     If LOC is a vector, then it can be used to identify a group, not
+     just an individual suffix command.  The last element in a vector
+     may also be a symbol or key, in which case the preceding elements
+     must match a group and the last element is looked up within that
+     group.
+
+     The function ‘transient-get-suffix’ can be useful to determine
+     whether a certain coordinate vector identifies the suffix or group
+     that you expect it to identify.  In hairy cases it may be necessary
+     to look at the internal layout representation, which you can access
+     using the function ‘transient--get-layout’.
+
+   These functions operate on the information stored in the
+‘transient--layout’ property of the PREFIX symbol.  Elements in that
+tree are not objects but have the form ‘(CLASS PLIST)’ for suffixes and
+‘[CLASS PLIST CHILDREN]’ for groups.  At the root of the tree is an
+element ‘[N nil CHILDREN]’, where ‘N’ is the version of the layout
+format, currently and hopefully for a long time 2.  While that element
+looks like a group vector, that element does not count when identifying
+a group using a coordinate vector, i.e., ‘[0]’ is its first child, not
+the root element itself.
+
+ -- Function: transient-insert-suffix prefix loc suffix &optional
+          keep-other
+ -- Function: transient-append-suffix prefix loc suffix &optional
+          keep-other
+     These functions insert the suffix or group SUFFIX into PREFIX
+     before or after LOC.
+
+     Conceptually adding a binding to a transient prefix is similar to
+     adding a binding to a keymap, but this is complicated by the fact
+     that multiple suffix commands can be bound to the same key,
+     provided they are never active at the same time, see *note
+     Predicate Slots::.
+
+     Unfortunately both false-positives and false-negatives are
+     possible.  To deal with the former, use non-‘nil’ KEEP-OTHER.  The
+     symbol ‘always’ prevents the removal of a false-positive, in some
+     cases where other non-‘nil’ values would fail.  To deal with
+     false-negatives remove the conflicting binding separately, using
+     ‘transient-remove-suffix’.
+
+ -- Function: transient-replace-suffix prefix loc suffix
+     This function replaces the suffix or group at LOC in PREFIX with
+     suffix or group SUFFIX.
+
+ -- Function: transient-remove-suffix prefix loc
+     This function removes the suffix or group at LOC in PREFIX.
+
+ -- Function: transient-get-suffix prefix loc
+     This function returns the suffix or group at LOC in PREFIX.  The
+     returned value has the form mentioned above.
+
+ -- Function: transient-suffix-put prefix loc prop value
+     This function edits the suffix or group at LOC in PREFIX, by
+     setting the PROP of its plist to VALUE.
+
+   Some prefix commands share suffixes, which are separately and then
+included in each prefix when it is defined.  The inclusion is done by
+reference, the included suffix groups are not inlined by default.  So if
+you change, for example, the key binding for an argument in ‘magit-diff’
+(‘d’) the same change also applies to ‘magit-diff-refresh’ (‘D’).  In
+the rare case that this is not desirable use ‘transient-inline-group’
+before making changes to included suffixes.
+
+ -- Function: transient-inline-group PREFIX GROUP
+     This function inlines the included GROUP into PREFIX, by replacing
+     the symbol GROUP with its expanded layout in the layout of PREFIX.
+
+   Most of these functions do not signal an error if they cannot perform
+the requested modification.  The functions that insert new suffixes show
+a warning if LOC cannot be found in PREFIX without signaling an error.
+The reason for doing it like this is that establishing a key binding
+(and that is what we essentially are trying to do here) should not
+prevent the rest of the configuration from loading.  Among these
+functions only ‘transient-get-suffix’ and ‘transient-suffix-put’ signal
+an error by default.  If you really want the insert functions to also
+signal an error, set ‘transient-error-on-insert-failure’ to ‘t’.
+
+
+File: transient.info,  Node: Defining New Commands,  Next: Classes and Methods,  Prev: Modifying Existing Transients,  Up: Top
+
+4 Defining New Commands
+***********************
+
+* Menu:
+
+* Technical Introduction::
+* Defining Transients::
+* Binding Suffix and Infix Commands::
+* Defining Suffix and Infix Commands::
+* Using Infix Arguments::
+* Using Prefix Scope::
+* Current Suffix Command::
+* Current Prefix Command::
+* Transient State::
+
+
+File: transient.info,  Node: Technical Introduction,  Next: Defining Transients,  Up: Defining New Commands
+
+4.1 Technical Introduction
+==========================
+
+Taking inspiration from prefix keys and prefix arguments, Transient
+implements a similar abstraction involving a prefix command, infix
+arguments and suffix commands.
+
+   When the user calls a transient prefix command, a transient
+(temporary) keymap is activated, which binds the transient's infix and
+suffix commands, and functions that control the transient state are
+added to ‘pre-command-hook’ and ‘post-command-hook’.  The available
+suffix and infix commands and their state are shown in a menu buffer
+until the transient state is exited by invoking a suffix command.
+
+   Calling an infix command causes its value to be changed.  How that is
+done depends on the type of the infix command.  The simplest case is an
+infix command that represents a command-line argument that does not take
+a value.  Invoking such an infix command causes the switch to be toggled
+on or off.  More complex infix commands may read a value from the user,
+using the minibuffer.
+
+   Calling a suffix command usually causes the transient to be exited;
+the transient keymaps and hook functions are removed, the menu buffer no
+longer shows information about the (no longer bound) suffix commands,
+the values of some public global variables are set, while some internal
+global variables are unset, and finally the command is actually called.
+Suffix commands can also be configured to not exit the transient.
+
+   A suffix command can, but does not have to, use the infix arguments
+in much the same way any command can choose to use or ignore the prefix
+arguments.  For a suffix command that was invoked from a transient, the
+variable ‘transient-current-suffixes’ and the function ‘transient-args’
+serve about the same purpose as the variables ‘prefix-arg’ and
+‘current-prefix-arg’ do for any command that was called after the prefix
+arguments have been set using a command such as ‘universal-argument’.
+
+   Transient can be used to implement simple "command dispatchers".  The
+main benefit then is that the user can see all the available commands in
+a temporarily shown buffer, which can be thought of as a "menu".  That
+is useful by itself because it frees the user from having to remember
+all the keys that are valid after a certain prefix key or command.
+Magit's ‘magit-dispatch’ (on ‘C-x M-g’) command is an example of using
+Transient to merely implement a command dispatcher.
+
+   In addition to that, Transient also allows users to interactively
+pass arguments to commands.  These arguments can be much more complex
+than what is reasonable when using prefix arguments.  There is a limit
+to how many aspects of a command can be controlled using prefix
+arguments.  Furthermore, what a certain prefix argument means for
+different commands can be completely different, and users have to read
+documentation to learn and then commit to memory what a certain prefix
+argument means to a certain command.
+
+   Transient suffix commands, on the other hand, can accept dozens of
+different arguments without the user having to remember anything.  When
+using Transient, one can call a command with arguments that are just as
+complex as when calling the same function non-interactively from Lisp.
+
+   Invoking a transient suffix command with arguments is similar to
+invoking a command in a shell with command-line completion and history
+enabled.  One benefit of the Transient interface is that it remembers
+history not only on a global level ("this command was invoked using
+these arguments, and previously it was invoked using those other
+arguments"), but also remembers the values of individual arguments
+independently.  See *note Using History::.
+
+   After a transient prefix command is invoked, ‘C-h KEY’ can be used to
+show the documentation for the infix or suffix command that ‘KEY’ is
+bound to (see *note Getting Help for Suffix Commands::), and infixes and
+suffixes can be removed from the transient using ‘C-x l KEY’.  Infixes
+and suffixes that are disabled by default can be enabled the same way.
+See *note Enabling and Disabling Suffixes::.
+
+   Transient ships with support for a few different types of specialized
+infix commands.  A command that sets a command line option, for example,
+has different needs than a command that merely toggles a boolean flag.
+Additionally, Transient provides abstractions for defining new types,
+which the author of Transient did not anticipate (or didn't get around
+to implementing yet).
+
+   Note that suffix commands also support regular prefix arguments.  A
+suffix command may even be called with both infix and prefix arguments
+at the same time.  If you invoke a command as a suffix of a transient
+prefix command, but also want to pass prefix arguments to it, then first
+invoke the prefix command, and only after doing that invoke the prefix
+arguments, before finally invoking the suffix command.  If you instead
+began by providing the prefix arguments, then those would apply to the
+prefix command, not the suffix command.  Likewise, if you want to change
+infix arguments before invoking a suffix command with prefix arguments,
+then change the infix arguments before invoking the prefix arguments.
+In other words, regular prefix arguments always apply to the next
+command, and since transient prefix, infix and suffix commands are just
+regular commands, the same applies to them.  (Regular prefix keys behave
+differently because they are not commands at all, instead they are just
+incomplete key sequences, and those cannot be interrupted with prefix
+commands.)
+
+
+File: transient.info,  Node: Defining Transients,  Next: Binding Suffix and Infix Commands,  Prev: Technical Introduction,  Up: Defining New Commands
+
+4.2 Defining Transients
+=======================
+
+A transient consists of a prefix command and at least one suffix
+command, though usually a transient has several infix and suffix
+commands.  The below macro defines the transient prefix command *and*
+binds the transient's infix and suffix commands.  In other words, it
+defines the complete transient, not just the transient prefix command
+that is used to invoke that transient.
+
+ -- Macro: transient-define-prefix name arglist [docstring] [keyword
+          value]... group... [body...]
+     This macro defines NAME as a transient prefix command and binds the
+     transient's infix and suffix commands.
+
+     ARGLIST are the arguments that the prefix command takes.  DOCSTRING
+     is the documentation string and is optional.
+
+     These arguments can optionally be followed by keyword-value pairs.
+     Each key has to be a keyword symbol, either ‘:class’ or a keyword
+     argument supported by the constructor of that class.  The
+     ‘transient-prefix’ class is used if the class is not specified
+     explicitly.
+
+     GROUPs add key bindings for infix and suffix commands and specify
+     how these bindings are presented in the menu buffer.  At least one
+     GROUP has to be specified.  See *note Binding Suffix and Infix
+     Commands::.
+
+     The BODY is optional.  If it is omitted, then ARGLIST is ignored
+     and the function definition becomes:
+
+          (lambda ()
+            (interactive)
+            (transient-setup 'NAME))
+
+     If BODY is specified, then it must begin with an ‘interactive’ form
+     that matches ARGLIST, and it must call ‘transient-setup’.  It may,
+     however, call that function only when some condition is satisfied.
+
+     All transients have a (possibly ‘nil’) value, which is exported
+     when suffix commands are called, so that they can consume that
+     value.  For some transients it might be necessary to have a sort of
+     secondary value, called a "scope".  Such a scope would usually be
+     set in the command's ‘interactive’ form and has to be passed to the
+     setup function:
+
+          (transient-setup 'NAME nil nil :scope SCOPE)
+
+     For example, the scope of the ‘magit-branch-configure’ transient is
+     the branch whose variables are being configured.
+
+   Sometimes multiple prefix commands share a common set of suffixes.
+For example, while ‘magit-diff’ (‘d’) and ‘magit-diff-refresh’ (‘D’)
+offer different suffixes to actually create or update a diff, they both
+offer the same infix arguments to control how that diff is formatted.
+Such shared groups should be defined using ‘transient-define-group’ and
+then included in multiple prefixes, by using the symbol that identifies
+the group in the prefix definition, in a location where you would
+otherwise use a group vector.  If an included group is placed at the
+top-level of a prefix (as opposed of inside inside a vector as a child
+group), then the symbol should be quoted.
+
+ -- Macro: transient-define-group name group...
+     This macro define one or more groups and stores them in symbol
+     NAME.  GROUPs have the same form as for ‘transient-define-prefix’.
+
+
+File: transient.info,  Node: Binding Suffix and Infix Commands,  Next: Defining Suffix and Infix Commands,  Prev: Defining Transients,  Up: Defining New Commands
+
+4.3 Binding Suffix and Infix Commands
+=====================================
+
+The macro ‘transient-define-prefix’ is used to define a transient.  This
+defines the actual transient prefix command (see *note Defining
+Transients::) and adds the transient's infix and suffix bindings, as
+described below.
+
+   Users and third-party packages can add additional bindings using
+functions such as ‘transient-insert-suffix’ (see *note Modifying
+Existing Transients::).  These functions take a "suffix specification"
+as one of their arguments, which has the same form as the specifications
+used in ‘transient-define-prefix’.
+
+4.3.1 Group Specifications
+--------------------------
+
+The suffix and infix commands of a transient are organized in groups.
+The grouping controls how the descriptions of the suffixes are outlined
+visually but also makes it possible to set certain properties for a set
+of suffixes.
+
+   Several group classes exist, some of which organize suffixes in
+subgroups.  In most cases the class does not have to be specified
+explicitly, but see *note Group Classes::.
+
+   Groups are specified in the call to ‘transient-define-prefix’, using
+vectors.  Because groups are represented using vectors, we cannot use
+square brackets to indicate an optional element and instead use curly
+brackets to do the latter.
+
+   Group specifications then have this form:
+
+     [{LEVEL} {DESCRIPTION} {KEYWORD VALUE}... ELEMENT...]
+
+   The LEVEL is optional and defaults to 4.  See *note Enabling and
+Disabling Suffixes::.
+
+   The DESCRIPTION is optional.  If present, it is used as the heading
+of the group.
+
+   The KEYWORD-VALUE pairs are optional.  Each keyword has to be a
+keyword symbol, either ‘:class’ or a keyword argument supported by the
+constructor of that class.
+
+   • One of these keywords, ‘:description’, is equivalent to specifying
+     DESCRIPTION at the very beginning of the vector.  The
+     recommendation is to use ‘:description’ if some other keyword is
+     also used, for consistency, or DESCRIPTION otherwise, because it
+     looks better.
+
+   • Likewise ‘:level’ is equivalent to LEVEL.
+
+   • Other important keywords include the ‘:if...’ and ‘:inapt-if...’
+     keywords.  These keywords control whether the group is available in
+     a certain situation.
+
+     For example, one group of the ‘magit-rebase’ transient uses ‘:if
+     magit-rebase-in-progress-p’, which contains the suffixes that are
+     useful while rebase is already in progress; and another that uses
+     ‘:if-not magit-rebase-in-progress-p’, which contains the suffixes
+     that initiate a rebase.
+
+     These predicates can also be used on individual suffixes and are
+     only documented once, see *note Predicate Slots::.
+
+   • The value of ‘:hide’, if non-‘nil’, is a predicate that controls
+     whether the group is hidden by default.  The key bindings for
+     suffixes of a hidden group should all use the same prefix key.
+     Pressing that prefix key should temporarily show the group and its
+     suffixes, which assumes that a predicate like this is used:
+
+          (lambda ()
+            (eq (car transient--redisplay-key)
+                ?\C-c)) ; the prefix key shared by all bindings
+
+   • The value of ‘:setup-children’, if non-‘nil’, is a function that
+     takes one argument, a potentially list of children, and must return
+     a list of children or an empty list.  This can either be used to
+     somehow transform the group's children that were defined the normal
+     way, or to dynamically create the children from scratch.
+
+     The returned children must have the same form as stored in the
+     prefix's ‘transient--layout’ property, but it is often more
+     convenient to use the same form as understood by
+     ‘transient-define-prefix’, described below.  If you use the latter
+     approach, you can use the ‘transient-parse-suffixes’ and
+     ‘transient-parse-suffix’ functions to transform them from the
+     convenient to the expected form.  Depending on the used group
+     class, ‘transient-parse-suffixes’'s SUFFIXES must be a list of
+     group vectors (for ‘transient-columns’) or a list of suffix lists
+     (for all other group classes).
+
+     If you explicitly specify children and then transform them using
+     ‘:setup-children’, then the class of the group is determined as
+     usual, based on explicitly specified children.
+
+     If you do not explicitly specify children and thus rely solely on
+     ‘:setup-children’, then you must specify the class using ‘:class’.
+     For backward compatibility, if you fail to do so,
+     ‘transient-column’ is used and a warning is displayed.  This
+     warning will eventually be replaced with an error.
+
+          (transient-define-prefix my-finder-by-keyword ()
+            "Select a keyword and list matching packages."
+            ;; The real `finder-by-keyword' is more convenient
+            ;; of course, but that is not the point here.
+            [:class transient-columns
+             :setup-children
+             (lambda (_)
+               (transient-parse-suffixes
+                'my-finder-by-keyword
+                (let ((char (1- ?A)))
+                  (mapcar                  ; a list ...
+                   (lambda (partition)
+                     (vconcat              ; of group vectors ...
+                      (mapcar (lambda (elt)
+                                (let ((keyword (symbol-name (car elt))))
+                                           ; ... where each suffix is a list
+                                  (list (format "%c" (cl-incf char))
+                                        keyword
+                                        (lambda ()
+                                          (interactive)
+                                          (finder-list-matches keyword)))))
+                              partition)))
+                   (seq-partition finder-known-keywords 7)))))])
+
+   • The boolean ‘:pad-keys’ argument controls whether keys of all
+     suffixes contained in a group are right padded, effectively
+     aligning the descriptions.
+
+   • If a keyword argument accepts a function as value, you an use a
+     ‘lambda’ expression.  As a special case, the ‘##’ macro (which
+     returns a ‘lambda’ expression and is implemented in the ‘llama’
+     package) is also supported.  Inside group specifications, the use
+     of ‘##’ is not supported anywhere but directly following a keyword
+     symbol.
+
+   The ELEMENTs are either all subgroups, or all suffixes and strings.
+(At least currently no group type exists that would allow mixing
+subgroups with commands at the same level, though in principle there is
+nothing that prevents that.)
+
+   If the ELEMENTs are not subgroups, then they can be a mixture of
+lists, which specify commands, and strings.  Strings are inserted
+verbatim into the buffer.  The empty string can be used to insert gaps
+between suffixes, which is particularly useful if the suffixes are
+outlined as a table.
+
+   Inside group specifications, including inside contained suffix
+specifications, nothing has to be quoted and quoting anyway is invalid.
+The value following a keyword, can be explicitly unquoted using ‘,’.
+This feature is experimental and should be avoided.
+
+   The form of suffix specifications is documented in the next node.
+
+4.3.2 Suffix Specifications
+---------------------------
+
+A transient's suffix and infix commands are bound when the transient
+prefix command is defined using ‘transient-define-prefix’, see *note
+Defining Transients::.  The commands are organized into groups, see
+*note Group Specifications::.  Here we describe the form used to bind an
+individual suffix command.
+
+   The same form is also used when later binding additional commands
+using functions such as ‘transient-insert-suffix’, see *note Modifying
+Existing Transients::.
+
+   Note that an infix is a special kind of suffix.  Depending on context
+"suffixes" means "suffixes (including infixes)" or "non-infix suffixes".
+Here it means the former.
+
+   Suffix specifications have this form:
+
+     ([LEVEL] [KEY [DESCRIPTION]] COMMAND|ARGUMENT [KEYWORD VALUE]...)
+
+   LEVEL, KEY and DESCRIPTION can also be specified using the KEYWORDs
+‘:level’, ‘:key’ and ‘:description’.  If the object that is associated
+with COMMAND sets these properties, then they do not have to be
+specified here.  You can however specify them here anyway, possibly
+overriding the object's values just for the binding inside this
+transient.
+
+   • LEVEL is the suffix level, an integer between 1 and 7.  See *note
+     Enabling and Disabling Suffixes::.
+
+   • KEY is the key binding, a string in the format returned by
+     ‘describe-key’ and understood by ‘kbd’.
+
+     That format is more permissive than the one accepted by
+     ‘key-valid-p’.  Being more permissive makes it possible, for
+     example, to write the key binding, which toggles the ‘-a’ command
+     line argument, as "-a", instead of having to write "- a".  Likewise
+     additional spaces can be added, which is not removed when
+     displaying the binding in the menu, which is useful for alignment
+     purposes.
+
+   • DESCRIPTION is the description, either a string or a function that
+     takes zero or one arguments (the suffix object) and returns a
+     string.  The function should be a lambda expression to avoid
+     ambiguity.  In some cases a symbol that is bound as a function
+     would also work but to be safe you should use ‘:description’ in
+     that case.
+
+   The next element is either a command or an argument.  This is the
+only argument that is mandatory in all cases.
+
+   • COMMAND should be a symbol that is bound as a function, which has
+     to be defined or at least autoloaded as a command by the time the
+     containing prefix command is invoked.
+
+     Any command will do; it does not need to have an object associated
+     with it (as would be the case if ‘transient-define-suffix’ or
+     ‘transient-define-infix’ were used to define it).
+
+     COMMAND can also be a ‘lambda’ expression.
+
+     As mentioned above, the object that is associated with a command
+     can be used to set the default for certain values that otherwise
+     have to be set in the suffix specification.  Therefore if there is
+     no object, then you have to make sure to specify the KEY and the
+     DESCRIPTION.
+
+     As a special case, if you want to add a command that might be
+     neither defined nor autoloaded, you can use a workaround like:
+
+          (transient-insert-suffix 'some-prefix "k"
+            '("!" "Ceci n'est pas une commande" no-command
+              :if (lambda () (featurep 'no-library))))
+
+     Instead of ‘featurep’ you could also use ‘require’ with a non-‘nil’
+     value for NOERROR.
+
+   • The mandatory argument can also be a command-line argument, a
+     string.  In that case an anonymous command is defined and bound.
+
+     Instead of a string, this can also be a list of two strings, in
+     which case the first string is used as the short argument (which
+     can also be specified using ‘:shortarg’) and the second as the long
+     argument (which can also be specified using ‘:argument’).
+
+     Only the long argument is displayed in the menu buffer.  See
+     ‘transient-detect-key-conflicts’ for how the short argument may be
+     used.
+
+     Unless the class is specified explicitly, the appropriate class is
+     guessed based on the long argument.  If the argument ends with ‘=’
+     (e.g., ‘--format=’) then ‘transient-option’ is used, otherwise
+     ‘transient-switch’.
+
+   Finally, details can be specified using optional KEYWORD-VALUE pairs.
+Each keyword has to be a keyword symbol, either ‘:class’ or a keyword
+argument supported by the constructor of that class.  See *note Suffix
+Slots::.
+
+   If a keyword argument accepts a function as value, you an use a
+‘lambda’ expression.  As a special case, the ‘##’ macro (which returns a
+‘lambda’ expression and is implemented in the ‘llama’ package) is also
+supported.  Inside suffix bindings, the use of ‘##’ is not supported
+anywhere but directly following a keyword symbol.
+
+
+File: transient.info,  Node: Defining Suffix and Infix Commands,  Next: Using Infix Arguments,  Prev: Binding Suffix and Infix Commands,  Up: Defining New Commands
+
+4.4 Defining Suffix and Infix Commands
+======================================
+
+Note that an infix is a special kind of suffix.  Depending on context
+"suffixes" means "suffixes (including infixes)" or "non-infix suffixes".
+
+ -- Macro: transient-define-suffix name arglist [docstring] [keyword
+          value]... body...
+     This macro defines NAME as a transient suffix command.
+
+     ARGLIST are the arguments that the command takes.  DOCSTRING is the
+     documentation string and is optional.
+
+     These arguments can optionally be followed by keyword-value pairs.
+     Each keyword has to be a keyword symbol, either ‘:class’ or a
+     keyword argument supported by the constructor of that class.  The
+     ‘transient-suffix’ class is used if the class is not specified
+     explicitly.
+
+     The BODY must begin with an ‘interactive’ form that matches
+     ARGLIST.  The infix arguments are usually accessed by using
+     ‘transient-args’ inside ‘interactive’.
+
+ -- Macro: transient-define-infix name arglist [docstring] [keyword
+          value]...
+     This macro defines NAME as a transient infix command.
+
+     ARGLIST is always ignored (but mandatory never-the-less) and
+     reserved for future use.  DOCSTRING is the documentation string and
+     is optional.
+
+     At least one key-value pair is required.  All transient infix
+     commands are ‘equal’ to each other (but not ‘eq’).  It is
+     meaningless to define an infix command, without providing at least
+     one keyword argument (usually ‘:argument’ or ‘:variable’, depending
+     on the class).  The suffix class defaults to ‘transient-switch’ and
+     can be set using the ‘:class’ keyword.
+
+     The function definition is always:
+
+          (lambda ()
+            (interactive)
+            (let ((obj (transient-suffix-object)))
+              (transient-infix-set obj (transient-infix-read obj)))
+            (transient--show))
+
+     ‘transient-infix-read’ and ‘transient-infix-set’ are generic
+     functions.  Different infix commands behave differently because the
+     concrete methods are different for different infix command classes.
+     In rare cases the above command function might not be suitable,
+     even if you define your own infix command class.  In that case you
+     have to use ‘transient-define-suffix’ to define the infix command
+     and use ‘t’ as the value of the ‘:transient’ keyword.
+
+ -- Macro: transient-define-argument name arglist [docstring] [keyword
+          value]...
+     This macro defines NAME as a transient infix command.
+
+     This is an alias for ‘transient-define-infix’.  Only use this alias
+     to define an infix command that actually sets an infix argument.
+     To define an infix command that, for example, sets a variable, use
+     ‘transient-define-infix’ instead.
+
+
+File: transient.info,  Node: Using Infix Arguments,  Next: Using Prefix Scope,  Prev: Defining Suffix and Infix Commands,  Up: Defining New Commands
+
+4.5 Using Infix Arguments
+=========================
+
+The functions and the variables described below allow suffix commands to
+access the value of the transient from which they were invoked; which is
+the value of its infix arguments.  These variables are set when the user
+invokes a suffix command that exits the transient, but before actually
+calling the command.
+
+   When returning to the command-loop after calling the suffix command,
+the arguments are reset to ‘nil’ (which causes the function to return
+‘nil’ too).
+
+   Like for Emacs's prefix arguments, it is advisable, but not
+mandatory, to access the infix arguments inside the command's
+‘interactive’ form.  The preferred way of doing that is to call the
+‘transient-args’ function, which for infix arguments serves about the
+same purpose as ‘prefix-arg’ serves for prefix arguments.
+
+ -- Function: transient-args prefix
+     This function returns the value of the transient prefix command
+     PREFIX.
+
+     If the current command was invoked from the transient prefix
+     command PREFIX, then it returns the active infix arguments.  If the
+     current command was not invoked from PREFIX, then it returns the
+     set, saved or default value for PREFIX.
+
+     PREFIX may also be a list of prefixes.  If no prefix is active, the
+     fallback value of the first of these prefixes is used.
+
+     The generic function ‘transient-prefix-value’ is used to determine
+     the returned value.
+
+     This function is intended to be used by suffix commands, whether
+     they are invoked from a menu or not.  It is not intended to be used
+     when setting up a menu and its suffixes, in which case
+     ‘transient-get-value’ should be used.
+
+ -- Function: transient-get-value
+     This function returns the value of the extant prefix.
+
+     This function is intended to be used when setting up a menu and its
+     suffixes.  It is not intended to be used when a suffix command is
+     invoked, whether from a menu or not, in which case ‘transient-args’
+     should be used.  In other words, use this, e.g., in a suffixes
+     ‘:if*’ or ‘:inapt-if*’ predicate and ‘:description’ function, but
+     never in its ‘interactive’ form or function body.
+
+ -- Function: transient-arg-value arg args
+     This function returns the value of ARG as it appears in ARGS.
+
+     For a switch a boolean is returned.  For an option the value is
+     returned as a string, using the empty string for the empty value,
+     or ‘nil’ if the option does not appear in ARGS.
+
+ -- Function: transient-suffixes prefix
+     This function returns the suffixes of the transient prefix command
+     PREFIX.  This is a list of objects.  This function should only be
+     used if you need the objects (as opposed to just their values) and
+     if the current command is not being invoked from PREFIX.
+
+
+File: transient.info,  Node: Using Prefix Scope,  Next: Current Suffix Command,  Prev: Using Infix Arguments,  Up: Defining New Commands
+
+4.6 Using Prefix Scope
+======================
+
+Some transients have a sort of secondary value, called a scope.  A
+prefix's scope can be accessed using ‘transient-scope’; similar to how
+its value can be accessed using ‘transient-args’.
+
+ -- Function: transient-scope prefixes classes
+     This function returns the scope of the active or current transient
+     prefix command.
+
+     If optional PREFIXES and CLASSES are both ‘nil’, return the scope
+     of the prefix currently being setup, making this variation useful,
+     e.g., in ‘:if*’ predicates.  If no prefix is being setup, but the
+     current command was invoked from some prefix, then return the scope
+     of that.
+
+     If PREFIXES is non-‘nil’, it must be a prefix command or a list of
+     such commands.  If CLASSES is non-‘nil’, it must be a prefix class
+     or a list of such classes.  When this function is called from the
+     body or the ‘interactive’ form of a suffix command, PREFIXES and/or
+     CLASSES should be non-‘nil’.  If either is non-‘nil’, try the
+     following in order:
+
+        • If the current suffix command was invoked from a prefix, which
+          appears in PREFIXES, return the scope of that prefix.
+
+        • If the current suffix command was invoked from a prefix, and
+          its class derives from one of the CLASSES, return the scope of
+          that prefix.
+
+        • If a prefix is being setup and it appears in PREFIXES, return
+          its scope.
+
+        • If a prefix is being setup and its class derives from one of
+          the CLASSES, return its scope.
+
+        • Finally try to return the default scope of the first command
+          in PREFIXES.  This only works if that slot is set in the
+          respective class definition or using its
+          'transient-init-scope' method.
+
+     If no prefix matches, return ‘nil’.
+
+
+File: transient.info,  Node: Current Suffix Command,  Next: Current Prefix Command,  Prev: Using Prefix Scope,  Up: Defining New Commands
+
+4.7 Current Suffix Command
+==========================
+
+ -- Function: transient-suffix-object command
+     This function returns the object associated with the current suffix
+     command.
+
+     Each suffix commands is associated with an object, which holds
+     additional information about the suffix, such as its value (in the
+     case of an infix command, which is a kind of suffix command).
+
+     This function is intended to be called by infix commands, which are
+     usually aliases of ‘transient--default-infix-command’, which is
+     defined like this:
+
+          (defun transient--default-infix-command ()
+            (interactive)
+            (let ((obj (transient-suffix-object)))
+              (transient-infix-set obj (transient-infix-read obj)))
+            (transient--show))
+
+     (User input is read outside of ‘interactive’ to prevent the command
+     from being added to ‘command-history’.)
+
+     Such commands need to be able to access their associated object to
+     guide how ‘transient-infix-read’ reads the new value and to store
+     the read value.  Other suffix commands (including non-infix
+     commands) may also need the object to guide their behavior.
+
+     This function attempts to return the object associated with the
+     current suffix command even if the suffix command was not invoked
+     from a transient.  (For some suffix command that is a valid thing
+     to do, for others it is not.)  In that case ‘nil’ may be returned,
+     if the command was not defined using one of the macros intended to
+     define such commands.
+
+     The optional argument COMMAND is intended for internal use.  If you
+     are contemplating using it in your own code, then you should
+     probably use this instead:
+
+          (get COMMAND 'transient--suffix)
+
+ -- Variable: transient-current-suffixes
+     The suffixes of the transient from which this suffix command was
+     invoked.  This is a list of objects.  Usually it is sufficient to
+     instead use the function ‘transient-args’, which returns a list of
+     values.  In complex cases it might be necessary to use this
+     variable instead, i.e., if you need access to information beside
+     the value.
+
+
+File: transient.info,  Node: Current Prefix Command,  Next: Transient State,  Prev: Current Suffix Command,  Up: Defining New Commands
+
+4.8 Current Prefix Command
+==========================
+
+ -- Function: transient-prefix-object
+     This function returns the current prefix as an object.
+
+     While a transient is being setup or refreshed (which involves
+     preparing its suffixes) the variable ‘transient--prefix’ can be
+     used to access the prefix object.  Thus this is what has to be used
+     in suffix methods such as ‘transient-format-description’, and in
+     object-specific functions that are stored in suffix slots such as
+     ‘description’.
+
+     When a suffix command is invoked (i.e., in its ‘interactive’ form
+     and function body) then the variable ‘transient-current-prefix’ has
+     to be used instead.
+
+     Two distinct variables are needed, because any prefix may itself be
+     used as a suffix of another prefix, and such sub-prefixes have to
+     be able to tell themselves apart from the prefix they were invoked
+     from.
+
+     Regular suffix commands, which are not prefixes, do not have to
+     concern themselves with this distinction, so they can use this
+     function instead.  In the context of a plain suffix, it always
+     returns the value of the appropriate variable.
+
+ -- Variable: transient-current-prefix
+     The transient from which this suffix command was invoked.  The
+     value is a ‘transient-prefix’ object, which holds information
+     associated with the transient prefix command.
+
+ -- Variable: transient-current-command
+     The transient from which this suffix command was invoked.  The
+     value is a symbol, the transient prefix command.
+
+ -- Function: transient-active-prefix &optional prefixes
+     This function returns the active transient object.  It returns
+     ‘nil’ if there is no active transient, if the transient buffer
+     isn't shown, and while the active transient is suspended (e.g.,
+     while the minibuffer is in use).
+
+     Unlike ‘transient-current-prefix’, which is only ever non-‘nil’ in
+     code that is run directly by a command that is invoked while a
+     transient is current, this function is also suitable for use in
+     asynchronous code, such as timers and callbacks (this function's
+     main use-case).
+
+     If optional PREFIXES is non-‘nil’, it must be a prefix command
+     symbol or a list of symbols, in which case the active transient
+     object is only returned if it matches one of the PREFIXES.
+
+
+File: transient.info,  Node: Transient State,  Prev: Current Prefix Command,  Up: Defining New Commands
+
+4.9 Transient State
+===================
+
+Invoking a transient prefix command "activates" the respective
+transient, i.e., it puts a transient keymap into effect, which binds the
+transient's infix and suffix commands.
+
+   The default behavior while a transient is active is as follows:
+
+   • Invoking an infix command does not affect the transient state; the
+     transient remains active.
+
+   • Invoking a (non-infix) suffix command "deactivates" the transient
+     state by removing the transient keymap and performing some
+     additional cleanup.
+
+   • Invoking a command that is bound in a keymap other than the
+     transient keymap is disallowed and trying to do so results in a
+     warning.  This does not "deactivate" the transient.
+
+   The behavior can be changed for all suffixes of a particular prefix
+and/or for individual suffixes.  The values should nearly always be
+booleans, but certain functions, called "pre-commands", can also be
+used.  These functions are named ‘transient--do-VERB’, and the symbol
+‘VERB’ can be used as a shorthand.
+
+   A boolean is interpreted as answering the question "does the
+transient stay active, when this command is invoked?"  ‘t’ means that
+the transient stays active, while ‘nil’ means that invoking the command
+exits the transient.
+
+   Note that when the suffix is a "sub-prefix", invoking that command
+always activates that sub-prefix, causing the outer prefix to no longer
+be active and displayed.  Here ‘t’ means that when you exit the inner
+prefix, then the outer prefix becomes active again, while ‘nil’ means
+that all outer prefixes are exited at once.
+
+   • The behavior for non-suffixes can be set for a particular prefix,
+     by the prefix's ‘transient-non-suffix’ slot to a boolean, a
+     suitable pre-command function, or a shorthand for such a function.
+     See *note Pre-commands for Non-Suffixes::.
+
+   • The common behavior for the suffixes of a particular prefix can be
+     set using the prefix's ‘transient-suffixes’ slot.
+
+     The value specified in this slot does *not* affect infixes.
+     Because it affects both regular suffixes as well as sub-prefixes,
+     which have different needs, it is best to avoid explicitly
+     specifying a function.
+
+   • The behavior of an individual suffix can be changed using its
+     ‘transient’ slot.  While it is usually best to use a boolean, for
+     this slot it can occasionally make sense to specify a function
+     explicitly.
+
+     Note that this slot can be set when defining a suffix command using
+     ‘transient-define-suffix’ and/or in the definition of the prefix.
+     If set in both places, then the latter takes precedence, as usual.
+
+   The available pre-command functions are documented in the following
+sub-sections.  They are called by ‘transient--pre-command’, a function
+on ‘pre-command-hook’, and the value that they return determines whether
+the transient is exited.  To do so the value of one of the constants
+‘transient--exit’ or ‘transient--stay’ is used (that way we don't have
+to remember if ‘t’ means "exit" or "stay").
+
+   Additionally, these functions may change the value of ‘this-command’
+(which explains why they have to be called using ‘pre-command-hook’),
+call ‘transient-export’, ‘transient--stack-zap’ or
+‘transient--stack-push’; and set the values of ‘transient--exitp’,
+‘transient--helpp’ or ‘transient--editp’.
+
+   For completeness sake, some notes about complications:
+
+   • The transient-ness of certain built-in suffix commands is specified
+     using ‘transient-predicate-map’.  This is a special keymap, which
+     binds commands to pre-commands (as opposed to keys to commands) and
+     takes precedence over the prefix's ‘transient-suffix’ slot, but not
+     the suffix's ‘transient’ slot.
+
+   • While a sub-prefix is active we nearly always want ‘C-g’ to take
+     the user back to the "super-prefix", even when the other suffixes
+     don't do that.  However, in rare cases this may not be desirable,
+     in which case ‘replace’ can be used as the value of the
+     sub-prefix's ‘transient’ slot.
+
+Pre-commands for Infixes
+------------------------
+
+The default for infixes is ‘transient--do-stay’.  This is also the only
+function that makes sense for infixes, which is why this predicate is
+used even if the value of the prefix's ‘transient-suffix’ slot is ‘t’.
+In extremely rare cases, one might want to use something else, which can
+be done by setting the infix's ‘transient’ slot directly.
+
+ -- Function: transient--do-stay
+     Call the command without exporting variables and stay transient.
+
+Pre-commands for Suffixes
+-------------------------
+
+By default, invoking a suffix causes the transient to be exited.
+
+   The behavior for an individual suffix command can be changed by
+setting its ‘transient’ slot to a boolean (which is highly recommended),
+or to one of the following pre-commands.
+
+ -- Function: transient--do-exit
+     Call the command after exporting variables and exit the transient.
+
+ -- Function: transient--do-return
+     Call the command after exporting variables and return to the parent
+     prefix.  If there is no parent prefix, then call
+     ‘transient--do-exit’.
+
+ -- Function: transient--do-call
+     Call the command after exporting variables and stay transient.
+
+   The following pre-commands are only suitable for sub-prefixes.  It is
+not necessary to explicitly use these predicates because the correct
+predicate is automatically picked based on the value of the ‘transient’
+slot for the sub-prefix itself.
+
+ -- Function: transient--do-recurse
+     Call the transient prefix command, preparing for return to outer
+     transient.
+
+     Whether we actually return to the parent transient is ultimately
+     under the control of each invoked suffix.  The difference between
+     this pre-command and ‘transient--do-stack’ is that it changes the
+     value of the ‘transient-suffix’ slot to ‘t’.
+
+     If there is no parent transient, then only call this command and
+     skip the second step.
+
+ -- Function: transient--do-stack
+     Call the transient prefix command, stacking the active transient.
+     Push the active transient to the transient stack.
+
+     Unless ‘transient--do-recurse’ is explicitly used, this pre-command
+     is automatically used for suffixes that are prefixes themselves,
+     i.e., for sub-prefixes.
+
+ -- Function: transient--do-replace
+     Call the transient prefix command, replacing the active transient.
+     Do not push the active transient to the transient stack.
+
+     Unless ‘transient--do-recurse’ is explicitly used, this pre-command
+     is automatically used for suffixes that are prefixes themselves,
+     i.e., for sub-prefixes.
+
+ -- Function: transient--do-suspend
+     Suspend the active transient, saving the transient stack.
+
+     This is used by the command ‘transient-suspend’ and optionally also
+     by "external events" such as ‘handle-switch-frame’.  Such bindings
+     should be added to ‘transient-predicate-map’.
+
+Pre-commands for Non-Suffixes
+-----------------------------
+
+By default, non-suffixes (commands that are bound in other keymaps
+beside the transient keymap) cannot be invoked.  Trying to invoke such a
+command results in a warning and the transient stays active.
+
+   If you want a different behavior, then set the ‘transient-non-suffix’
+slot of the transient prefix command.  The value should be a boolean,
+answering the question, "is it allowed to invoke non-suffix commands?, a
+pre-command function, or a shorthand for such a function.
+
+   If the value is ‘t’, then non-suffixes can be invoked, when it is
+‘nil’ (the default) then they cannot be invoked.
+
+   The only other recommended value is ‘leave’.  If that is used, then
+non-suffixes can be invoked, but if one is invoked, then that exits the
+transient.
+
+ -- Function: transient--do-warn
+     Call ‘transient-undefined’ and stay transient.
+
+ -- Function: transient--do-stay
+     Call the command without exporting variables and stay transient.
+
+ -- Function: transient--do-leave
+     Call the command without exporting variables and exit the
+     transient.
+
+Special Pre-Commands
+--------------------
+
+ -- Function: transient--do-quit-one
+     If active, quit help or edit mode, else exit the active transient.
+
+     This is used when the user pressed ‘C-g’.
+
+ -- Function: transient--do-quit-all
+     Exit all transients without saving the transient stack.
+
+     This is used when the user pressed ‘C-q’.
+
+ -- Function: transient--do-suspend
+     Suspend the active transient, saving the transient stack.
+
+     This is used when the user pressed ‘C-z’.
+
+
+File: transient.info,  Node: Classes and Methods,  Next: FAQ,  Prev: Defining New Commands,  Up: Top
+
+5 Classes and Methods
+*********************
+
+Transient uses classes and generic functions to make it possible to
+define new types of suffix and prefix commands, which are similar to
+existing types, but behave differently in some respects.
+
+   Every prefix, infix and suffix command is associated with an object,
+which holds information, which controls certain aspects of its behavior.
+This happens in two ways.
+
+   • Associating a command with a certain class gives the command a
+     type.  This makes it possible to use generic functions to do
+     certain things that have to be done differently depending on what
+     type of command it acts on.
+
+     That in turn makes it possible for third-parties to add new types
+     without having to convince the maintainer of Transient, that that
+     new type is important enough to justify adding a special case to a
+     dozen or so functions.
+
+   • Associating a command with an object makes it possible to easily
+     store information that is specific to that particular command.
+
+     Two commands may have the same type, but obviously their key
+     bindings and descriptions still have to be different, for example.
+
+     The values of some slots are functions.  The ‘reader’ slot for
+     example holds a function that is used to read a new value for an
+     infix command.  The values of such slots are regular functions.
+
+     Generic functions are used when a function should do something
+     different based on the type of the command, i.e., when all commands
+     of a certain type should behave the same way but different from the
+     behavior for other types.  Object slots that hold a regular
+     function as value are used when the task that they perform is
+     likely to differ even between different commands of the same type.
+
+* Menu:
+
+* Group Classes::
+* Group Methods::
+* Prefix Classes::
+* Suffix Classes::
+* Prefix Methods::
+* Suffix Methods::
+* Prefix Slots::
+* Suffix Slots::
+* Predicate Slots::
+
+
+File: transient.info,  Node: Group Classes,  Next: Group Methods,  Up: Classes and Methods
+
+5.1 Group Classes
+=================
+
+The type of a group can be specified using the ‘:class’ property at the
+beginning of the class specification, e.g., ‘[:class transient-columns
+...]’ in a call to ‘transient-define-prefix’.
+
+   • The abstract ‘transient-child’ class is the base class of both
+     ‘transient-group’ (and therefore all groups) as well as of
+     ‘transient-suffix’ (and therefore all suffix and infix commands).
+
+     This class exists because the elements (or "children") of certain
+     groups can be other groups instead of suffix and infix commands.
+
+   • The abstract ‘transient-group’ class is the superclass of all other
+     group classes.
+
+   • The ‘transient-column’ class is the simplest group.
+
+     This is the default "flat" group.  If the class is not specified
+     explicitly and the first element is not a vector (i.e., not a
+     group), then this class is used.
+
+     This class displays each element on a separate line.
+
+   • The ‘transient-row’ class displays all elements on a single line.
+
+   • The ‘transient-columns’ class displays commands organized in
+     columns.
+
+     Direct elements have to be groups whose elements have to be
+     commands or strings.  Each subgroup represents a column.  This
+     class takes care of inserting the subgroups' elements.
+
+     This is the default "nested" group.  If the class is not specified
+     explicitly and the first element is a vector (i.e., a group), then
+     this class is used.
+
+   • The ‘transient-subgroups’ class wraps other groups.
+
+     Direct elements have to be groups whose elements have to be
+     commands or strings.  This group inserts an empty line between
+     subgroups.  The subgroups themselves are responsible for displaying
+     their elements.
+
+
+File: transient.info,  Node: Group Methods,  Next: Prefix Classes,  Prev: Group Classes,  Up: Classes and Methods
+
+5.2 Group Methods
+=================
+
+ -- Function: transient-setup-children group children
+     This generic function can be used to setup the children or a group.
+
+     The default implementation usually just returns the children
+     unchanged, but if the ‘setup-children’ slot of GROUP is non-‘nil’,
+     then it calls that function with CHILDREN as the only argument and
+     returns the value.
+
+     The children are given as a (potentially empty) list consisting of
+     either group or suffix specifications.  These functions can make
+     arbitrary changes to the children including constructing new
+     children from scratch.
+
+ -- Function: transient--insert-group group
+     This generic function formats the group and its elements and
+     inserts the result into the current buffer, which is a temporary
+     buffer.  The contents of that buffer are later inserted into the
+     menu buffer.
+
+     Functions that are called by this function may need to operate in
+     the buffer from which the transient was called.  To do so they can
+     temporarily make the ‘transient--shadowed-buffer’ the current
+     buffer.
+
+
+File: transient.info,  Node: Prefix Classes,  Next: Suffix Classes,  Prev: Group Methods,  Up: Classes and Methods
+
+5.3 Prefix Classes
+==================
+
+Transient itself provides a single class for prefix commands,
+‘transient-prefix’, but package authors may wish to define specialized
+classes.  Doing so makes it possible to change the behavior of the set
+of prefix commands that use that class, by implementing specialized
+methods for certain generic functions (see *note Prefix Methods::).
+
+   A transient prefix command's object is stored in the
+‘transient--prefix’ property of the command symbol.  While a transient
+is active, a clone of that object is stored in the variable
+‘transient--prefix’.  A clone is used because some changes that are made
+to the active transient's object should not affect later invocations.
+
+
+File: transient.info,  Node: Suffix Classes,  Next: Prefix Methods,  Prev: Prefix Classes,  Up: Classes and Methods
+
+5.4 Suffix Classes
+==================
+
+   • All suffix and infix classes derive from ‘transient-suffix’, which
+     in turn derives from ‘transient-child’, from which
+     ‘transient-group’ also derives (see *note Group Classes::).
+
+   • All infix classes derive from the abstract ‘transient-infix’ class,
+     which in turn derives from the ‘transient-suffix’ class.
+
+     Infixes are a special type of suffixes.  The primary difference is
+     that infixes always use the ‘transient--do-stay’ pre-command, while
+     non-infix suffixes use a variety of pre-commands (see *note
+     Transient State::).  Doing that is most easily achieved by using
+     this class, though theoretically it would be possible to define an
+     infix class that does not do so.  If you do that then you get to
+     implement many methods.
+
+     Also, infixes and non-infix suffixes are usually defined using
+     different macros (see *note Defining Suffix and Infix Commands::).
+
+   • Classes used for infix commands that represent arguments should be
+     derived from the abstract ‘transient-argument’ class.
+
+   • The ‘transient-switch’ class (or a derived class) is used for infix
+     arguments that represent command-line switches (arguments that do
+     not take a value).
+
+   • The ‘transient-option’ class (or a derived class) is used for infix
+     arguments that represent command-line options (arguments that do
+     take a value).
+
+   • The ‘transient-switches’ class can be used for a set of mutually
+     exclusive command-line switches.
+
+   • The ‘transient-files’ class can be used for a ‘--’ argument that
+     indicates that all remaining arguments are files.
+
+   • Classes used for infix commands that represent variables should
+     derived from the abstract ‘transient-variable’ class.
+
+   • The ‘transient-information’ and ‘transient-information*’ classes
+     are special in that suffixes that use these class are not
+     associated with a command and thus also not with any key binding.
+     Such suffixes are only used to display arbitrary information, and
+     that anywhere a suffix can appear.  Display-only suffix
+     specifications take these form:
+
+          (:info DESCRIPTION [KEYWORD VALUE]...)
+          (:info* DESCRIPTION [KEYWORD VALUE]...)
+
+     The ‘:info’ and ‘:info*’ keyword arguments replaces the
+     ‘:description’ keyword used for other suffix classes.  Other
+     keyword arguments that you might want to set, include ‘:face’,
+     predicate keywords (such as ‘:if’ and ‘:inapt-if’), and ‘:format’.
+     By default the value of ‘:format’ includes ‘%k’, which for this
+     class is replaced with the empty string or spaces, if keys are
+     being padded in the containing group.
+
+     The only difference between these two classes is that ‘:info*’
+     aligns its description with the descriptions of suffix commands,
+     while for ‘:info’ the description bleeds into the area where
+     suffixes display their key bindings.
+
+   • The ‘transient-lisp-variable’ class can be used to show and change
+     the value of lisp variables.  This class is not fully featured yet
+     and it is somewhat likely that future improvements won't be fully
+     backward compatible.
+
+   • The ‘transient-cons-option’ class is intended for situations where
+     ‘transient-args’ should return an alist, instead of a list of
+     strings (arguments).  Such suffixes can be specified in prefix
+     definitions like so:
+
+          (:cons OPTION :key KEY [KEYWORD VALUE]...)
+
+     OPTION may be something other than a string, likely a keyword or
+     some other symbol, it is used as the ‘car’ of the cons-cell.  When
+     using such an inline definition ‘:key’ has to be specified.  In
+     most cases ‘:reader’ should also be specified.  When defining such
+     a suffix separately, the "alist key" has to be specified using the
+     ‘:variable’ keyword argument.
+
+     This class is still experimental it is somewhat likely that future
+     improvements won't be fully backward compatible.
+
+   • The ‘transient-describe-target’ class is used by the command
+     ‘transient-describe’.
+
+   • The ‘transient-value-preset’ class is used to implement the command
+     ‘transient-preset’, which activates a value preset.
+
+   Magit defines additional classes, which can serve as examples for the
+fancy things you can do without modifying Transient.  Some of these
+classes will likely get generalized and added to Transient.  For now
+they are very much subject to change and not documented.
+
+
+File: transient.info,  Node: Prefix Methods,  Next: Suffix Methods,  Prev: Suffix Classes,  Up: Classes and Methods
+
+5.5 Prefix Methods
+==================
+
+To get information about the methods implementing these generic
+functions use ‘describe-function’.
+
+ -- Function: transient-init-value obj
+     This generic function sets the initial value of the object OBJ.
+     Methods exist for both prefix and suffix objects.
+
+     The default method for prefix objects sets the value of OBJ's
+     ‘value’ slot to the set, saved or default value.  The value that is
+     set for the current session is preferred over the saved value,
+     which is preferred over the default value.
+
+     The default value is determined using the generic function
+     ‘transient-default-value’.  If you need to change how the value for
+     a prefix class is determined, its usually sufficient to implement a
+     method for that function.
+
+ -- Function: transient-default-value obj
+     This generic function returns the default value of the object OBJ.
+     Methods exist for both prefix and suffix objects.
+
+     The default method for prefix objects returns the value of the
+     ‘default-value’ slot if that is bound and not a function.  If it is
+     a function, that is called to get the value.  If the slot is
+     unbound, ‘nil’ is returned.
+
+ -- Function: transient-prefix-value obj
+     This generic function returns the value of the prefix object OBJ.
+
+     OBJ is a prototype object and is only used to select the
+     appropriate method of this generic function.  This function does
+     not return the value of that object.  Instead it extracts the name
+     of the respective command from the object and uses that to collect
+     the current values from the suffixes of the prefix from which the
+     current command was invoked.  If the current command was not
+     invoked from the identified prefix, then this method returns the
+     set, save or default value, as described for ‘transient-args’.
+
+     This function is only intended to be used by ‘transient-args’.  It
+     is not defined as an internal function because third-party packages
+     may define their own methods.  That does not mean that it would be
+     a good idea to call it for any other purpose.
+
+     The respective generic function for infix and suffix objects is
+     named ‘transient-infix-value’.
+
+ -- Function: transient-init-scope obj
+     This generic function sets the scope of the object OBJ.  Methods
+     exist for both prefix and suffix objects.
+
+     This function is called for all prefix and suffix commands, but
+     unless a concrete method is implemented this falls through to the
+     default implementation, which is a noop.
+
+   ‘transient-set-value’, ‘transient-save-value’,
+‘transient-reset-value’, ‘transient--history-key’,
+‘transient--history-push’ and ‘transient--history-init’ are other
+generic functions dealing with the value of prefix objects.  See their
+doc-strings for more information.
+
+   ‘transient-show-help’ is another generic function implemented for
+prefix commands.  The default method effectively describes the command
+using ‘describe-function’.
+
+
+File: transient.info,  Node: Suffix Methods,  Next: Prefix Slots,  Prev: Prefix Methods,  Up: Classes and Methods
+
+5.6 Suffix Methods
+==================
+
+To get information about the methods implementing these generic
+functions use ‘describe-function’.
+
+5.6.1 Suffix Value Methods
+--------------------------
+
+ -- Function: transient-init-value obj
+     This generic function sets the initial value of the object OBJ.
+     Methods exist for both prefix and suffix objects.
+
+     For ‘transient-argument’ objects this function handles setting the
+     value by itself.
+
+     For other ‘transient-suffix’ objects (including ‘transient-infix’
+     objects), this calls ‘transient-default-value’ and uses the value
+     returned by that, unless it is the special value ‘eieio--unbound’,
+     which indicates that there is no default value.  Since that is what
+     the default method for ‘transient-suffix’ objects does, both of
+     these functions effectively are noops for these classes.
+
+     If you implement a class that derives from ‘transient-infix’
+     directly, then you must implement a dedicated method for this
+     function and/or ‘transient-default-value’.
+
+ -- Function: transient-default-value obj
+     This generic function returns the default value of the object OBJ.
+     Methods exist for both prefix and suffix objects.
+
+ -- Function: transient-infix-read obj
+     This generic function determines the new value of the infix object
+     OBJ.
+
+     This function merely determines the value; ‘transient-infix-set’ is
+     used to actually store the new value in the object.
+
+     For most infix classes this is done by reading a value from the
+     user using the reader specified by the ‘reader’ slot (using the
+     ‘transient-infix-value’ method described below).
+
+     For some infix classes the value is changed without reading
+     anything in the minibuffer, i.e., the mere act of invoking the
+     infix command determines what the new value should be, based on the
+     previous value.
+
+ -- Function: transient-prompt obj
+     This generic function returns the prompt to be used to read infix
+     object OBJ's value.
+
+ -- Function: transient-infix-set obj value
+     This generic function sets the value of infix object OBJ to VALUE.
+
+ -- Function: transient-infix-value obj
+     This generic function returns the value of the suffix object OBJ.
+
+     This function is called by ‘transient-args’ (which see), meaning
+     this function is how the value of a transient is determined so that
+     the invoked suffix command can use it.
+
+     Currently most values are strings, but that is not set in stone.
+     ‘nil’ is not a value, it means "no value".
+
+     Usually only infixes have a value, but see the method for
+     ‘transient-suffix’.
+
+ -- Function: transient-init-scope obj
+     This generic function sets the scope of the object OBJ.  Methods
+     exist for both prefix and suffix objects.
+
+     The scope is actually a property of the transient prefix, not of
+     individual suffixes.  However it is possible to invoke a suffix
+     command directly instead of from a transient.  In that case, if the
+     suffix expects a scope, then it has to determine that itself and
+     store it in its ‘scope’ slot.
+
+     This function is called for all prefix and suffix commands, but
+     unless a concrete method is implemented, this falls through to the
+     default implementation, which is a noop.
+
+5.6.2 Suffix Format Methods
+---------------------------
+
+ -- Function: transient-format obj
+     This generic function formats and returns OBJ for display.
+
+     When this function is called, then the current buffer is some
+     temporary buffer.  If you need the buffer from which the prefix
+     command was invoked to be current, then do so by temporarily making
+     ‘transient--source-buffer’ current.
+
+ -- Function: transient-format-key obj
+     This generic function formats OBJ's ‘key’ for display and returns
+     the result.
+
+ -- Function: transient-format-description obj
+     This generic function formats OBJ's ‘description’ for display and
+     returns the result.
+
+ -- Function: transient-format-value obj
+     This generic function formats OBJ's value for display and returns
+     the result.
+
+ -- Function: transient-show-help obj
+     Show help for the prefix, infix or suffix command represented by
+     OBJ.
+
+     Regardless of OBJ's type, if its ‘show-help’ slot is non-‘nil’,
+     that must be a function, which takes OBJ is its only argument.  It
+     must prepare, display and return a buffer, and select the window
+     used to display it.  The ‘transient-show-help-window’ macro is
+     intended for use in such functions.
+
+     For prefixes, show the info manual, if that is specified using the
+     ‘info-manual’ slot.  Otherwise, show the manpage if that is
+     specified using the ‘man-page’ slot.  Otherwise, show the command's
+     documentation string.
+
+     For suffixes, show the command's documentation string.
+
+     For infixes, show the manpage if that is specified.  Otherwise show
+     the command's documentation string.
+
+ -- Macro: transient-with-help-window &rest body
+     Evaluate BODY, send output to ‘*Help*’ buffer, and display it in a
+     window.  Select the help window, and make the help buffer current
+     and return it.
+
+ -- Function: transient-show-summary obj &optional return
+     This generic function shows or, if optional RETURN is non-‘nil’,
+     returns a brief summary about the command at point or hovered with
+     the mouse.
+
+     This function is called when the mouse is moved over a command and
+     (if the value of ‘transient-enable-menu-navigation’ is ‘verbose’)
+     when the user navigates to a command using the keyboard.
+
+     If OBJ's ‘summary’ slot is a string, that is used.  If ‘summary’ is
+     a function, that is called with OBJ as the only argument and the
+     returned string is used.  If ‘summary’ is or returns something
+     other than a string or ‘nil’, no summary is shown.  If ‘summary’ is
+     or returns ‘nil’, the first line of the documentation string is
+     used, if any.
+
+     If RETURN is non-‘nil’, this function returns the summary instead
+     of showing it.  This is used when a tooltip is needed.
+
+
+File: transient.info,  Node: Prefix Slots,  Next: Suffix Slots,  Prev: Suffix Methods,  Up: Classes and Methods
+
+5.7 Prefix Slots
+================
+
+Value and Scope
+---------------
+
+   • ‘default-value’ The default value of the prefix.  Use the keyword
+     argument ‘:value’ (sic) to set this slot in the definition of a
+     prefix.
+
+   • ‘init-value’ A function that is responsible for setting the
+     object's value.  If bound, then this is called with the object as
+     the only argument.  Usually this is not bound, in which case the
+     object's primary ‘transient-init-value’ method is called instead.
+
+   • ‘history-key’ If multiple prefix commands should share a single
+     value, then this slot has to be set to the same value for all of
+     them.  You probably don't want that.
+
+   • ‘remember-value’ When a suffix command is invoked, which can
+     consume the prefix's value (which depends on the suffix slot
+     ‘transient’ and the prefix slots ‘transient-suffix’ and
+     ‘transient-non-suffix’), then the value is automatically pushed to
+     the prefix's value history.
+
+     This slot allows additionally setting or even saving the value, so
+     that it becomes the initial value when the menu is invoked again.
+
+     Beside ‘nil’, the value can be one of these symbols:
+
+        • ‘export’ Set the value when it is exported.  That is the time
+          when the value would ordinarily just be pushed to the history
+          stack.
+
+        • ‘exit’ Set the value when the menu is exited, except when that
+          is done using a command whose sole purpose is to quit the
+          menu.
+
+        • ‘quit’ Set the value when the menu is quit, using a command
+          whose sole purpose is to do so.
+
+     The value can also be a list of one or more of these symbols and
+     optionally also the symbol ‘save’.
+
+        • ‘save’ Instead of merely setting the value, save it, so that
+          it will be used in future Emacs sessions.  At least one other
+          symbol has to be used together with this.
+
+     The value can also be a (quoted) variable, whose value is a list of
+     symbols as described above.  Ideally an option should be used,
+     since not all users will find the automatic saving of the value
+     desirable.
+
+   • ‘incompatible’ A list of lists.  Each sub-list specifies a set of
+     mutually exclusive arguments.  Enabling one of these arguments
+     causes the others to be disabled.  An argument may appear in
+     multiple sub-lists.  Arguments must me given in the same form as
+     used in the ‘argument’ or ‘argument-format’ slot of the respective
+     suffix objects, usually something like ‘--switch’ or ‘--option=%s’.
+     For options and ‘transient-switches’ suffixes it is also possible
+     to match against a specific value, as returned by
+     ‘transient-infix-value’, for example, ‘--option=one’.
+
+   • ‘scope’ For some transients it might be necessary to have a sort of
+     secondary value, called a "scope".  See ‘transient-define-prefix’.
+
+Behavior
+--------
+
+   • ‘transient-suffix’, ‘transient-non-suffix’ and
+     ‘transient-switch-frame’ play a part when determining whether the
+     currently active transient prefix command remains active/transient
+     when a suffix or arbitrary non-suffix command is invoked.  See
+     *note Transient State::.
+
+   • ‘refresh-suffixes’ Normally suffix objects and keymaps are only
+     setup once, when the prefix is invoked.  Setting this to ‘t’,
+     causes them to be recreated after every command.  This is useful
+     when using ‘:if...’ predicates, and those need to be rerun for some
+     reason.  Doing this is somewhat costly, and there is a risk of
+     losing state, so this is disabled by default and still considered
+     experimental.
+
+   • ‘environment’ A function used to establish an environment while
+     initializing, refreshing or redisplaying a transient prefix menu.
+     This is useful to establish a cache, in case multiple suffixes
+     require the same expensive work.  The provided function is called
+     with at least one argument, the function for which it establishes
+     the environment.  It must ‘funcall’ that function with no
+     arguments.  During initialization the second argument is the prefix
+     object being initialized.  This slot is still experimental.
+
+Appearance
+----------
+
+   • ‘display-action’ determines how this prefix is displayed,
+     overriding ‘transient-display-buffer-action’.  It should have the
+     same type.
+
+   • ‘mode-line-format’ is this prefix's mode line format, overriding
+     ‘transient-mode-line-format’.  It should have the same type.
+
+   • ‘column-widths’ is only respected inside ‘transient-columns’ groups
+     and allows aligning columns across separate instances of that.  A
+     list of integers.
+
+   • ‘variable-pitch’ controls whether alignment is done pixel-wise to
+     account for use of variable-pitch characters, which is useful,
+     e.g., when using emoji.
+
+Documentation
+-------------
+
+   • ‘show-help’, ‘man-page’ or ‘info-manual’ can be used to specify the
+     documentation for the prefix and its suffixes.  The command
+     ‘transient-help’ uses the function ‘transient-show-help’ (which
+     see) to lookup and use these values.
+
+   • ‘suffix-description’ can be used to specify a function which
+     provides fallback descriptions for suffixes that lack a
+     description.  This is intended to be temporarily used when
+     implementing of a new prefix command, at which time
+     ‘transient-command-summary-or-name’ is a useful value.
+
+   • ‘description’ a short string describing the prefix, which users can
+     opt-in to be displayed at the top of the menu buffer.  This should
+     be more concise than the first line of the docstring, which is used
+     as a fallback if no description is provided.
+
+Internal
+--------
+
+These slots are mostly intended for internal use.  They should not be
+set in calls to ‘transient-define-prefix’.
+
+   • ‘prototype’ When a transient prefix command is invoked, then a
+     clone of that object is stored in the global variable
+     ‘transient--prefix’ and the prototype is stored in the clone's
+     ‘prototype’ slot.
+
+   • ‘command’ The command, a symbol.  Each transient prefix command
+     consists of a command, which is stored in a symbol's function slot
+     and an object, which is stored in the ‘transient--prefix’ property
+     of the same symbol.
+
+   • ‘level’ The level of the prefix commands.  The suffix commands
+     whose layer is equal or lower are displayed.  See *note Enabling
+     and Disabling Suffixes::.
+
+   • ‘value’ The likely outdated value of the prefix.  Instead of
+     accessing this slot directly you should use the function
+     ‘transient-get-value’, which is guaranteed to return the up-to-date
+     value.
+
+   • ‘history’ and ‘history-pos’ are used to keep track of historic
+     values.  Unless you implement your own ‘transient-infix-read’
+     method you should not have to deal with these slots.
+
+   • ‘unwind-suffix’ is used internally to ensure transient state is
+     properly exited, even in case of an error.
+
+
+File: transient.info,  Node: Suffix Slots,  Next: Predicate Slots,  Prev: Prefix Slots,  Up: Classes and Methods
+
+5.8 Suffix Slots
+================
+
+Here we document most of the slots that are only available for suffix
+objects.  Some slots are shared by suffix and group objects, they are
+documented in *note Predicate Slots::.
+
+   Also see *note Suffix Classes::.
+
+Slots of ‘transient-child’
+--------------------------
+
+This is the abstract superclass of ‘transient-suffix’ and
+‘transient-group’.  In addition to the slots listed below, this class is
+also where the ‘if*’ and ‘inapt-if*’ slots (see *note Predicate Slots::)
+and the ‘level’ slot (see *note Enabling and Disabling Suffixes::) are
+defined.
+
+   • ‘parent’ The object for the parent group, if any.
+
+   • ‘inactive’ If an ‘:if*’ predicate of a suffix or group returns
+     ‘nil’, then it is not displayed in the menu, but it has to remain
+     in the internal object tree, in case that predicate later returns
+     ‘t’, and the ‘object’ therefore has to appear in the menu again.
+     Likewise a group or suffix may be (potentially only temporarily)
+     inactive due to its ‘level’.  The ‘inactive’ slot is set
+     accordingly.  Never set it yourself.
+
+   The following two slots are experimental.  If they are set for a
+group, then they apply to all suffixes in that group, except for
+suffixes that themselves set the same slot to a non-‘nil’ value.
+
+   • ‘advice’ A function used to advise the command.  The advise is
+     called using ‘(apply advice command args)’, i.e., it behaves like
+     an "around" advice.
+
+   • ‘advice*’ A function used to advise the command.  Unlike ‘advice’,
+     this advises not only the command body but also its ‘interactive’
+     spec.  If both slots are non-‘nil’, ‘advice’ is used for the body
+     and ‘advice*’ is used for the ‘interactive’ form.  When advising
+     the ‘interactive’ spec, called using ‘(funcall advice
+     #'advice-eval-interactive-spec spec)’.
+
+Slots of ‘transient-suffix’
+---------------------------
+
+   • ‘key’ is the key binding, a string in the format returned by
+     ‘describe-key’ and understood by ‘kbd’.
+
+     That format is more permissive than the one accepted by
+     ‘key-valid-p’.  Being more permissive makes it possible, for
+     example, to write the key binding, which toggles the ‘-a’ command
+     line argument, as "-a", instead of having to write "- a".  Likewise
+     additional spaces can be added, which is not removed when
+     displaying the binding in the menu, which is useful for alignment
+     purposes.
+
+   • ‘command’ The command, a symbol.
+
+   • ‘transient’ Whether to stay transient.  See *note Transient
+     State::.
+
+   • ‘format’ The format used to display the suffix in the menu buffer.
+     It must contain the following %-placeholders:
+
+        • ‘%k’ For the key.
+        • ‘%d’ For the description.
+        • ‘%v’ For the infix value.  Non-infix suffixes don't have a
+          value.
+
+   • ‘description’ The description, either a string or a function, which
+     is called with zero or one argument (the suffix object), and
+     returns a string.
+
+   • ‘face’ Face used for the description.  In simple cases it is easier
+     to use this instead of using a function as ‘description’ and adding
+     the styling there.  ‘face’ is appended using
+     ‘add-face-text-property’.
+
+   • ‘show-help’ A function used to display help for the suffix.  If
+     unspecified, the prefix controls how help is displayed for its
+     suffixes.  See also function ‘transient-show-help’.
+
+   • ‘summary’ A short description to be displayed in addition to the
+     text displayed in the menu itself.  If this is ‘nil’, the first
+     line of the documentation string is used instead.  If non-‘nil’,
+     this must be a string or a function that returns a string or ‘nil’.
+
+     This description is displayed as a tooltip, when hovering an
+     element in the menu.  If ‘transient-enable-menu-navigation’ is
+     ‘verbose’, it is also shown in the echo area, when navigating the
+     menu.
+
+     The generic function ‘transient-get-summary’ is used to determine
+     and format this description.
+
+   • ‘definition’ A command, which is used if the body is omitted when
+     defining a command using ‘transient-define-suffix’.
+
+Slots of ‘transient-infix’
+--------------------------
+
+Some of these slots are only meaningful for some of the subclasses.
+They are defined here anyway to allow sharing certain methods.
+
+   • ‘argument’ The long argument, e.g., ‘--verbose’.
+
+   • ‘shortarg’ The short argument, e.g., ‘-v’.
+
+   • ‘claim-argument’ Whether to claim matched arguments exclusively,
+     i.e., whether to prevent other "overlapping" infixes from also
+     matching.
+
+     For example, consider the suffix arguments
+     ‘--push-option=known=<val>’ and ‘--push-option=<arbitrary>’.
+     Unless the former claims any matched value exclusively (and appears
+     before the latter in the menu), the latter also matches, which
+     would lead to undesirable behavior.
+
+   • ‘value’ The value.  Should not be accessed directly.
+
+   • ‘init-value’ Function that is responsible for setting the object's
+     value.  If bound, then this is called with the object as the only
+     argument.  Usually this is not bound, in which case the object's
+     primary ‘transient-init-value’ method is called instead.
+
+   • ‘unsavable’ Whether the value of the suffix is not saved as part of
+     the prefixes.
+
+   • ‘multi-value’ For options, whether the option can have multiple
+     values.  If this is non-‘nil’, then the values are read using
+     ‘completing-read-multiple’ by default and if you specify your own
+     reader, then it should read the values using that function or
+     similar.
+
+     Supported non-‘nil’ values are:
+
+        • Use ‘rest’ for an option that can have multiple values.  This
+          is useful e.g., for an ‘--’ argument that indicates that all
+          remaining arguments are files (such as ‘git log -- file1
+          file2’).
+
+          In the list returned by ‘transient-args’ such an option and
+          its values are represented by a single list of the form
+          ‘(ARGUMENT . VALUES)’.
+
+        • Use ‘repeat’ for an option that can be specified multiple
+          times.
+
+          In the list returned by ‘transient-args’ each instance of the
+          option and its value appears separately in the usual from, for
+          example: ‘("--another-argument" "--option=first"
+          "--option=second")’.
+
+     In both cases the option's values have to be specified in the
+     default value of a prefix using the same format as returned by
+     ‘transient-args’, e.g., ‘("--other" "--o=1" "--o=2" ("--" "f1"
+     "f2"))’.
+
+   • ‘always-read’ For options, whether to read a value on every
+     invocation.  If this is ‘nil’, then options that have a value are
+     simply unset and have to be invoked a second time to set a new
+     value.
+
+   • ‘allow-empty’ For options, whether the empty string is a valid
+     value.
+
+   • ‘history-key’ The key used to store the history.  This defaults to
+     the command name.  This is useful when multiple infixes should
+     share the same history because their values are of the same kind.
+
+   • ‘reader’ The function used to read the value of an infix.  Not used
+     for switches.  The function takes three arguments, PROMPT,
+     INITIAL-INPUT and HISTORY, and must return a string.
+
+   • ‘prompt’ The prompt used when reading the value, either a string or
+     a function that takes the object as the only argument and which
+     returns a prompt string.
+
+   • ‘choices’ A list of valid values, or a function that returns such a
+     list.  The latter is not implemented for ‘transient-switches’,
+     because I couldn't think of a use-case.  How exactly the choices
+     are used varies depending on the class of the suffix.
+
+Slots of ‘transient-variable’
+-----------------------------
+
+   • ‘variable’ The variable.
+
+Slots of ‘transient-switches’
+-----------------------------
+
+   • ‘argument-format’ The display format.  Must contain ‘%s’, one of
+     the ‘choices’ is substituted for that.  E.g., ‘--%s-order’.
+
+   • ‘argument-regexp’ The regexp used to match any one of the switches.
+     E.g., ‘\\(--\\(topo\\|author-date\\|date\\)-order\\)’.
+
+
+File: transient.info,  Node: Predicate Slots,  Prev: Suffix Slots,  Up: Classes and Methods
+
+5.9 Predicate Slots
+===================
+
+Suffix and group objects share two sets of predicate slots that control
+whether a group or suffix should be available depending on some state.
+Only one slot from each set can be used at the same time.  It is
+undefined which slot is honored if you use more than one.
+
+   Predicates from the first group control whether the suffix is present
+in the menu at all.
+
+   • ‘if’ Enable if predicate returns non-‘nil’.
+   • ‘if-not’ Enable if predicate returns ‘nil’.
+   • ‘if-non-nil’ Enable if variable's value is non-‘nil’.
+   • ‘if-nil’ Enable if variable's value is ‘nil’.
+   • ‘if-mode’ Enable if major-mode matches value.
+   • ‘if-not-mode’ Enable if major-mode does not match value.
+   • ‘if-derived’ Enable if major-mode derives from value.
+   • ‘if-not-derived’ Enable if major-mode does not derive from value.
+
+   Predicates from the second group control whether the suffix can be
+invoked.  The suffix is shown in the menu regardless, but when it is
+considered "inapt", then it is grayed out to indicated that it currently
+cannot be invoked.
+
+   • ‘inapt-if’ Inapt if predicate returns non-‘nil’.
+   • ‘inapt-if-not’ Inapt if predicate returns ‘nil’.
+   • ‘inapt-if-non-nil’ Inapt if variable's value is non-‘nil’.
+   • ‘inapt-if-nil’ Inapt if variable's value is ‘nil’.
+   • ‘inapt-if-mode’ Inapt if major-mode matches value.
+   • ‘inapt-if-not-mode’ Inapt if major-mode does not match value.
+   • ‘inapt-if-derived’ Inapt if major-mode derives from value.
+   • ‘inapt-if-not-derived’ Inapt if major-mode does not derive from
+     value.
+
+   By default these predicates run when the prefix command is invoked,
+but this can be changes, using the ‘refresh-suffixes’ prefix slot.  See
+*note Prefix Slots::.
+
+   One more slot is shared between group and suffix classes, ‘level’.
+Like the slots documented above, it is a predicate, but it is used for a
+different purpose.  The value has to be an integer between 1 and 7.
+‘level’ controls whether a suffix or a group should be available
+depending on user preference.  See *note Enabling and Disabling
+Suffixes::.
+
+
+File: transient.info,  Node: FAQ,  Next: Keystroke Index,  Prev: Classes and Methods,  Up: Top
+
+Appendix A FAQ
+**************
+
+A.1 Can I control how the menu buffer is displayed?
+===================================================
+
+Yes, see ‘transient-display-buffer-action’ in *note Configuration::.
+You can also control how the menu buffer is displayed on a case-by-case
+basis by passing ‘:display-action’ to ‘transient-define-prefix’.
+
+A.2 How can I copy text from the menu buffer?
+=============================================
+
+You can select text in the menu buffer using the mouse, like in most
+other buffers, by clicking ‘mouse-1’ and keeping it pressed while
+dragging.
+
+   (Before v0.13.0, the above required additional configuration and the
+region was not visualized while dragging.  This isn't the case anymore,
+but explains why the following was once deemed necessary.)
+
+   Alternatively the command ‘transient-copy-menu-text’ can be used to
+copy the complete content of the menu buffer.  You have to add a binding
+for this command in ‘transient-map’.
+
+     (keymap-set transient-map "C-c C-w" #'transient-copy-menu-text)
+
+A.3 How can I autoload prefix and suffix commands?
+==================================================
+
+If your package only supports Emacs 30, just prefix the definition with
+‘;;;###autoload’.  If your package supports older Emacs releases, you
+unfortunately have to use a long-form autoload comment as described in
+*note (elisp)Autoload::.
+
+     ;;;###autoload (autoload 'magit-dispatch "magit" nil t)
+     (transient-define-prefix magit-dispatch ()
+       ...)
+
+A.4 How does Transient compare to prefix keys and universal arguments?
+======================================================================
+
+See
+<https://github.com/magit/transient/wiki/Comparison-with-prefix-keys-and-universal-arguments>.
+
+A.5 How does Transient compare to Magit-Popup and Hydra?
+========================================================
+
+See
+<https://github.com/magit/transient/wiki/Comparison-with-other-packages>.
+
+A.6 Why does ‘q’ not quit popups anymore?
+=========================================
+
+I agree that ‘q’ is a good binding for commands that quit something.
+This includes quitting whatever transient is currently active, but it
+also includes quitting whatever it is that some specific transient is
+controlling.  The transient ‘magit-blame’ for example binds ‘q’ to the
+command that turns ‘magit-blame-mode’ off.
+
+   So I had to decide if ‘q’ should quit the active transient (like
+Magit-Popup used to) or whether ‘C-g’ should do that instead, so that
+‘q’ could be bound in individual transient to whatever commands make
+sense for them.  Because all other letters are already reserved for use
+by individual transients, I have decided to no longer make an exception
+for ‘q’.
+
+   If you want to get ‘q’'s old binding back then you can do so.  Doing
+that is a bit more complicated than changing a single key binding, so I
+have implemented a function, ‘transient-bind-q-to-quit’ that makes the
+necessary changes.  See its documentation string for more information.
+
+
+File: transient.info,  Node: Keystroke Index,  Next: Command and Function Index,  Prev: FAQ,  Up: Top
+
+Appendix B Keystroke Index
+**************************
+
+[index]
+* Menu:
+
+* C-g:                                   Aborting and Resuming Transients.
+                                                               (line 27)
+* C-g <1>:                               Aborting and Resuming Transients.
+                                                               (line 27)
+* C-h:                                   Getting Help for Suffix Commands.
+                                                               (line 11)
+* C-M-n:                                 Using History.        (line 22)
+* C-M-p:                                 Using History.        (line 17)
+* C-q:                                   Aborting and Resuming Transients.
+                                                               (line 36)
+* C-x a:                                 Enabling and Disabling Suffixes.
+                                                               (line 72)
+* C-x C-k:                               Saving Values.        (line 33)
+* C-x C-s:                               Saving Values.        (line 29)
+* C-x l:                                 Enabling and Disabling Suffixes.
+                                                               (line 47)
+* C-x n:                                 Using History.        (line 22)
+* C-x p:                                 Using History.        (line 17)
+* C-x s:                                 Saving Values.        (line 25)
+* C-x t:                                 Common Suffix Commands.
+                                                               (line 50)
+* C-z:                                   Aborting and Resuming Transients.
+                                                               (line 41)
+
+
+File: transient.info,  Node: Command and Function Index,  Next: Variable Index,  Prev: Keystroke Index,  Up: Top
+
+Appendix C Command and Function Index
+*************************************
+
+[index]
+* Menu:
+
+* transient--do-call:                    Transient State.     (line 118)
+* transient--do-exit:                    Transient State.     (line 110)
+* transient--do-leave:                   Transient State.     (line 186)
+* transient--do-quit-all:                Transient State.     (line 198)
+* transient--do-quit-one:                Transient State.     (line 193)
+* transient--do-recurse:                 Transient State.     (line 126)
+* transient--do-replace:                 Transient State.     (line 146)
+* transient--do-return:                  Transient State.     (line 113)
+* transient--do-stack:                   Transient State.     (line 138)
+* transient--do-stay:                    Transient State.     (line  98)
+* transient--do-stay <1>:                Transient State.     (line 183)
+* transient--do-suspend:                 Transient State.     (line 154)
+* transient--do-suspend <1>:             Transient State.     (line 203)
+* transient--do-warn:                    Transient State.     (line 180)
+* transient--insert-group:               Group Methods.       (line  19)
+* transient-active-prefix:               Current Prefix Command.
+                                                              (line  39)
+* transient-append-suffix:               Modifying Existing Transients.
+                                                              (line  63)
+* transient-arg-value:                   Using Infix Arguments.
+                                                              (line  52)
+* transient-args:                        Using Infix Arguments.
+                                                              (line  22)
+* transient-copy-menu-text:              Other Commands.      (line  25)
+* transient-default-value:               Prefix Methods.      (line  23)
+* transient-default-value <1>:           Suffix Methods.      (line  30)
+* transient-define-argument:             Defining Suffix and Infix Commands.
+                                                              (line  57)
+* transient-define-group:                Defining Transients. (line  66)
+* transient-define-infix:                Defining Suffix and Infix Commands.
+                                                              (line  26)
+* transient-define-prefix:               Defining Transients. (line  13)
+* transient-define-suffix:               Defining Suffix and Infix Commands.
+                                                              (line   9)
+* transient-format:                      Suffix Methods.      (line  87)
+* transient-format-description:          Suffix Methods.      (line  99)
+* transient-format-key:                  Suffix Methods.      (line  95)
+* transient-format-value:                Suffix Methods.      (line 103)
+* transient-get-suffix:                  Modifying Existing Transients.
+                                                              (line  88)
+* transient-get-value:                   Using Infix Arguments.
+                                                              (line  42)
+* transient-help:                        Getting Help for Suffix Commands.
+                                                              (line  11)
+* transient-history-next:                Using History.       (line  22)
+* transient-history-prev:                Using History.       (line  17)
+* transient-infix-read:                  Suffix Methods.      (line  34)
+* transient-infix-set:                   Suffix Methods.      (line  54)
+* transient-infix-value:                 Suffix Methods.      (line  57)
+* transient-init-scope:                  Prefix Methods.      (line  52)
+* transient-init-scope <1>:              Suffix Methods.      (line  70)
+* transient-init-value:                  Prefix Methods.      (line   9)
+* transient-init-value <1>:              Suffix Methods.      (line  12)
+* transient-inline-group:                Modifying Existing Transients.
+                                                              (line 104)
+* transient-insert-suffix:               Modifying Existing Transients.
+                                                              (line  61)
+* transient-prefix-object:               Current Prefix Command.
+                                                              (line   6)
+* transient-prefix-value:                Prefix Methods.      (line  32)
+* transient-prompt:                      Suffix Methods.      (line  50)
+* transient-quit-all:                    Aborting and Resuming Transients.
+                                                              (line  36)
+* transient-quit-one:                    Aborting and Resuming Transients.
+                                                              (line  27)
+* transient-quit-seq:                    Aborting and Resuming Transients.
+                                                              (line  27)
+* transient-remove-suffix:               Modifying Existing Transients.
+                                                              (line  85)
+* transient-replace-suffix:              Modifying Existing Transients.
+                                                              (line  81)
+* transient-reset:                       Saving Values.       (line  33)
+* transient-resume:                      Aborting and Resuming Transients.
+                                                              (line  53)
+* transient-save:                        Saving Values.       (line  29)
+* transient-scope:                       Using Prefix Scope.  (line  10)
+* transient-scroll-down:                 Other Commands.      (line  17)
+* transient-scroll-up:                   Other Commands.      (line  12)
+* transient-set:                         Saving Values.       (line  25)
+* transient-set-default-level:           Enabling and Disabling Suffixes.
+                                                              (line  76)
+* transient-set-level:                   Enabling and Disabling Suffixes.
+                                                              (line  47)
+* transient-setup-children:              Group Methods.       (line   6)
+* transient-show-help:                   Suffix Methods.      (line 107)
+* transient-show-summary:                Suffix Methods.      (line 132)
+* transient-suffix-object:               Current Suffix Command.
+                                                              (line   6)
+* transient-suffix-put:                  Modifying Existing Transients.
+                                                              (line  92)
+* transient-suffixes:                    Using Infix Arguments.
+                                                              (line  59)
+* transient-suspend:                     Aborting and Resuming Transients.
+                                                              (line  41)
+* transient-toggle-common:               Common Suffix Commands.
+                                                              (line  50)
+* transient-toggle-docstrings:           Other Commands.      (line  29)
+* transient-toggle-level-limit:          Enabling and Disabling Suffixes.
+                                                              (line  72)
+* transient-with-help-window:            Suffix Methods.      (line 127)
+
+
+File: transient.info,  Node: Variable Index,  Next: Concept Index,  Prev: Command and Function Index,  Up: Top
+
+Appendix D Variable Index
+*************************
+
+[index]
+* Menu:
+
+* transient-align-variable-pitch:        Configuration.       (line 381)
+* transient-common-command-prefix:       Common Suffix Commands.
+                                                              (line  23)
+* transient-current-command:             Current Prefix Command.
+                                                              (line  35)
+* transient-current-prefix:              Current Prefix Command.
+                                                              (line  30)
+* transient-current-suffixes:            Current Suffix Command.
+                                                              (line  45)
+* transient-default-level:               Enabling and Disabling Suffixes.
+                                                              (line  33)
+* transient-describe-menu:               Configuration.       (line 200)
+* transient-detect-key-conflicts:        Configuration.       (line 406)
+* transient-display-buffer-action:       Configuration.       (line 113)
+* transient-enable-menu-navigation:      Configuration.       (line  81)
+* transient-enable-menu-navigation <1>:  Configuration.       (line 180)
+* transient-error-on-insert-failure:     Configuration.       (line 419)
+* transient-exit-hook:                   Configuration.       (line 438)
+* transient-force-fixed-pitch:           Configuration.       (line 394)
+* transient-force-single-column:         Configuration.       (line 222)
+* transient-highlight-higher-levels:     Configuration.       (line 425)
+* transient-highlight-mismatched-keys:   Configuration.       (line 339)
+* transient-history-file:                Using History.       (line  41)
+* transient-history-limit:               Using History.       (line  45)
+* transient-levels-file:                 Enabling and Disabling Suffixes.
+                                                              (line  38)
+* transient-mode-line-format:            Configuration.       (line 303)
+* transient-navigate-to-group-descriptions: Configuration.    (line 189)
+* transient-post-exit-hook:              Configuration.       (line 442)
+* transient-prefer-reading-value:        Configuration.       (line 231)
+* transient-read-with-initial-input:     Configuration.       (line  74)
+* transient-save-history:                Using History.       (line  37)
+* transient-select-menu-window:          Configuration.       (line 212)
+* transient-semantic-coloring:           Configuration.       (line 330)
+* transient-setup-buffer-hook:           Configuration.       (line 446)
+* transient-show-common-commands:        Common Suffix Commands.
+                                                              (line  11)
+* transient-show-during-minibuffer-read: Configuration.       (line  37)
+* transient-show-menu:                   Configuration.       (line  16)
+* transient-substitute-key-function:     Configuration.       (line 360)
+* transient-use-accessible-formats:      Configuration.       (line 271)
+* transient-use-accessible-values:       Configuration.       (line 249)
+* transient-values-file:                 Saving Values.       (line  36)
+
+
+File: transient.info,  Node: Concept Index,  Next: GNU General Public License,  Prev: Variable Index,  Up: Top
+
+Appendix E Concept Index
+************************
+
+[index]
+* Menu:
+
+* aborting transients:                   Aborting and Resuming Transients.
+                                                              (line   6)
+* classes and methods:                   Classes and Methods. (line   6)
+* command dispatchers:                   Technical Introduction.
+                                                              (line  39)
+* common suffix commands:                Common Suffix Commands.
+                                                              (line   6)
+* defining infix commands:               Defining Suffix and Infix Commands.
+                                                              (line   6)
+* defining suffix commands:              Defining Suffix and Infix Commands.
+                                                              (line   6)
+* disabling suffixes:                    Enabling and Disabling Suffixes.
+                                                              (line   6)
+* enabling suffixes:                     Enabling and Disabling Suffixes.
+                                                              (line   6)
+* getting help:                          Getting Help for Suffix Commands.
+                                                              (line   6)
+* group specifications:                  Binding Suffix and Infix Commands.
+                                                              (line  20)
+* invoking transients:                   Invoking Transients. (line   6)
+* levels:                                Enabling and Disabling Suffixes.
+                                                              (line  10)
+* modifying existing transients:         Modifying Existing Transients.
+                                                              (line   6)
+* quit transient:                        Aborting and Resuming Transients.
+                                                              (line   6)
+* resuming transients:                   Aborting and Resuming Transients.
+                                                              (line   6)
+* saving values of arguments:            Saving Values.       (line   6)
+* scope of a transient:                  Defining Transients. (line  43)
+* suffix specifications:                 Binding Suffix and Infix Commands.
+                                                              (line 162)
+* transient state:                       Transient State.     (line   6)
+* transient-level:                       Enabling and Disabling Suffixes.
+                                                              (line  15)
+* value history:                         Using History.       (line   6)
+
+
+File: transient.info,  Node: GNU General Public License,  Prev: Concept Index,  Up: Top
+
+Appendix F GNU General Public License
+*************************************
+
+                        Version 3, 29 June 2007
+
+     Copyright © 2007 Free Software Foundation, Inc. <https://fsf.org/>
+
+     Everyone is permitted to copy and distribute verbatim copies of this
+     license document, but changing it is not allowed.
+
+Preamble
+========
+
+The GNU General Public License is a free, copyleft license for software
+and other kinds of works.
+
+   The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+the GNU General Public License is intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.  We, the Free Software Foundation, use the
+GNU General Public License for most of our software; it applies also to
+any other work released this way by its authors.  You can apply it to
+your programs, too.
+
+   When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+   To protect your rights, we need to prevent others from denying you
+these rights or asking you to surrender the rights.  Therefore, you have
+certain responsibilities if you distribute copies of the software, or if
+you modify it: responsibilities to respect the freedom of others.
+
+   For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must pass on to the recipients the same
+freedoms that you received.  You must make sure that they, too, receive
+or can get the source code.  And you must show them these terms so they
+know their rights.
+
+   Developers that use the GNU GPL protect your rights with two steps:
+(1) assert copyright on the software, and (2) offer you this License
+giving you legal permission to copy, distribute and/or modify it.
+
+   For the developers' and authors' protection, the GPL clearly explains
+that there is no warranty for this free software.  For both users' and
+authors' sake, the GPL requires that modified versions be marked as
+changed, so that their problems will not be attributed erroneously to
+authors of previous versions.
+
+   Some devices are designed to deny users access to install or run
+modified versions of the software inside them, although the manufacturer
+can do so.  This is fundamentally incompatible with the aim of
+protecting users' freedom to change the software.  The systematic
+pattern of such abuse occurs in the area of products for individuals to
+use, which is precisely where it is most unacceptable.  Therefore, we
+have designed this version of the GPL to prohibit the practice for those
+products.  If such problems arise substantially in other domains, we
+stand ready to extend this provision to those domains in future versions
+of the GPL, as needed to protect the freedom of users.
+
+   Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish to
+avoid the special danger that patents applied to a free program could
+make it effectively proprietary.  To prevent this, the GPL assures that
+patents cannot be used to render the program non-free.
+
+   The precise terms and conditions for copying, distribution and
+modification follow.
+
+TERMS AND CONDITIONS
+====================
+
+  0. Definitions.
+
+     "This License" refers to version 3 of the GNU General Public
+     License.
+
+     "Copyright" also means copyright-like laws that apply to other
+     kinds of works, such as semiconductor masks.
+
+     "The Program" refers to any copyrightable work licensed under this
+     License.  Each licensee is addressed as "you".  "Licensees" and
+     "recipients" may be individuals or organizations.
+
+     To "modify" a work means to copy from or adapt all or part of the
+     work in a fashion requiring copyright permission, other than the
+     making of an exact copy.  The resulting work is called a "modified
+     version" of the earlier work or a work "based on" the earlier work.
+
+     A "covered work" means either the unmodified Program or a work
+     based on the Program.
+
+     To "propagate" a work means to do anything with it that, without
+     permission, would make you directly or secondarily liable for
+     infringement under applicable copyright law, except executing it on
+     a computer or modifying a private copy.  Propagation includes
+     copying, distribution (with or without modification), making
+     available to the public, and in some countries other activities as
+     well.
+
+     To "convey" a work means any kind of propagation that enables other
+     parties to make or receive copies.  Mere interaction with a user
+     through a computer network, with no transfer of a copy, is not
+     conveying.
+
+     An interactive user interface displays "Appropriate Legal Notices"
+     to the extent that it includes a convenient and prominently visible
+     feature that (1) displays an appropriate copyright notice, and (2)
+     tells the user that there is no warranty for the work (except to
+     the extent that warranties are provided), that licensees may convey
+     the work under this License, and how to view a copy of this
+     License.  If the interface presents a list of user commands or
+     options, such as a menu, a prominent item in the list meets this
+     criterion.
+
+  1. Source Code.
+
+     The "source code" for a work means the preferred form of the work
+     for making modifications to it.  "Object code" means any non-source
+     form of a work.
+
+     A "Standard Interface" means an interface that either is an
+     official standard defined by a recognized standards body, or, in
+     the case of interfaces specified for a particular programming
+     language, one that is widely used among developers working in that
+     language.
+
+     The "System Libraries" of an executable work include anything,
+     other than the work as a whole, that (a) is included in the normal
+     form of packaging a Major Component, but which is not part of that
+     Major Component, and (b) serves only to enable use of the work with
+     that Major Component, or to implement a Standard Interface for
+     which an implementation is available to the public in source code
+     form.  A "Major Component", in this context, means a major
+     essential component (kernel, window system, and so on) of the
+     specific operating system (if any) on which the executable work
+     runs, or a compiler used to produce the work, or an object code
+     interpreter used to run it.
+
+     The "Corresponding Source" for a work in object code form means all
+     the source code needed to generate, install, and (for an executable
+     work) run the object code and to modify the work, including scripts
+     to control those activities.  However, it does not include the
+     work's System Libraries, or general-purpose tools or generally
+     available free programs which are used unmodified in performing
+     those activities but which are not part of the work.  For example,
+     Corresponding Source includes interface definition files associated
+     with source files for the work, and the source code for shared
+     libraries and dynamically linked subprograms that the work is
+     specifically designed to require, such as by intimate data
+     communication or control flow between those subprograms and other
+     parts of the work.
+
+     The Corresponding Source need not include anything that users can
+     regenerate automatically from other parts of the Corresponding
+     Source.
+
+     The Corresponding Source for a work in source code form is that
+     same work.
+
+  2. Basic Permissions.
+
+     All rights granted under this License are granted for the term of
+     copyright on the Program, and are irrevocable provided the stated
+     conditions are met.  This License explicitly affirms your unlimited
+     permission to run the unmodified Program.  The output from running
+     a covered work is covered by this License only if the output, given
+     its content, constitutes a covered work.  This License acknowledges
+     your rights of fair use or other equivalent, as provided by
+     copyright law.
+
+     You may make, run and propagate covered works that you do not
+     convey, without conditions so long as your license otherwise
+     remains in force.  You may convey covered works to others for the
+     sole purpose of having them make modifications exclusively for you,
+     or provide you with facilities for running those works, provided
+     that you comply with the terms of this License in conveying all
+     material for which you do not control copyright.  Those thus making
+     or running the covered works for you must do so exclusively on your
+     behalf, under your direction and control, on terms that prohibit
+     them from making any copies of your copyrighted material outside
+     their relationship with you.
+
+     Conveying under any other circumstances is permitted solely under
+     the conditions stated below.  Sublicensing is not allowed; section
+     10 makes it unnecessary.
+
+  3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+     No covered work shall be deemed part of an effective technological
+     measure under any applicable law fulfilling obligations under
+     article 11 of the WIPO copyright treaty adopted on 20 December
+     1996, or similar laws prohibiting or restricting circumvention of
+     such measures.
+
+     When you convey a covered work, you waive any legal power to forbid
+     circumvention of technological measures to the extent such
+     circumvention is effected by exercising rights under this License
+     with respect to the covered work, and you disclaim any intention to
+     limit operation or modification of the work as a means of
+     enforcing, against the work's users, your or third parties' legal
+     rights to forbid circumvention of technological measures.
+
+  4. Conveying Verbatim Copies.
+
+     You may convey verbatim copies of the Program's source code as you
+     receive it, in any medium, provided that you conspicuously and
+     appropriately publish on each copy an appropriate copyright notice;
+     keep intact all notices stating that this License and any
+     non-permissive terms added in accord with section 7 apply to the
+     code; keep intact all notices of the absence of any warranty; and
+     give all recipients a copy of this License along with the Program.
+
+     You may charge any price or no price for each copy that you convey,
+     and you may offer support or warranty protection for a fee.
+
+  5. Conveying Modified Source Versions.
+
+     You may convey a work based on the Program, or the modifications to
+     produce it from the Program, in the form of source code under the
+     terms of section 4, provided that you also meet all of these
+     conditions:
+
+       a. The work must carry prominent notices stating that you
+          modified it, and giving a relevant date.
+
+       b. The work must carry prominent notices stating that it is
+          released under this License and any conditions added under
+          section 7.  This requirement modifies the requirement in
+          section 4 to "keep intact all notices".
+
+       c. You must license the entire work, as a whole, under this
+          License to anyone who comes into possession of a copy.  This
+          License will therefore apply, along with any applicable
+          section 7 additional terms, to the whole of the work, and all
+          its parts, regardless of how they are packaged.  This License
+          gives no permission to license the work in any other way, but
+          it does not invalidate such permission if you have separately
+          received it.
+
+       d. If the work has interactive user interfaces, each must display
+          Appropriate Legal Notices; however, if the Program has
+          interactive interfaces that do not display Appropriate Legal
+          Notices, your work need not make them do so.
+
+     A compilation of a covered work with other separate and independent
+     works, which are not by their nature extensions of the covered
+     work, and which are not combined with it such as to form a larger
+     program, in or on a volume of a storage or distribution medium, is
+     called an "aggregate" if the compilation and its resulting
+     copyright are not used to limit the access or legal rights of the
+     compilation's users beyond what the individual works permit.
+     Inclusion of a covered work in an aggregate does not cause this
+     License to apply to the other parts of the aggregate.
+
+  6. Conveying Non-Source Forms.
+
+     You may convey a covered work in object code form under the terms
+     of sections 4 and 5, provided that you also convey the
+     machine-readable Corresponding Source under the terms of this
+     License, in one of these ways:
+
+       a. Convey the object code in, or embodied in, a physical product
+          (including a physical distribution medium), accompanied by the
+          Corresponding Source fixed on a durable physical medium
+          customarily used for software interchange.
+
+       b. Convey the object code in, or embodied in, a physical product
+          (including a physical distribution medium), accompanied by a
+          written offer, valid for at least three years and valid for as
+          long as you offer spare parts or customer support for that
+          product model, to give anyone who possesses the object code
+          either (1) a copy of the Corresponding Source for all the
+          software in the product that is covered by this License, on a
+          durable physical medium customarily used for software
+          interchange, for a price no more than your reasonable cost of
+          physically performing this conveying of source, or (2) access
+          to copy the Corresponding Source from a network server at no
+          charge.
+
+       c. Convey individual copies of the object code with a copy of the
+          written offer to provide the Corresponding Source.  This
+          alternative is allowed only occasionally and noncommercially,
+          and only if you received the object code with such an offer,
+          in accord with subsection 6b.
+
+       d. Convey the object code by offering access from a designated
+          place (gratis or for a charge), and offer equivalent access to
+          the Corresponding Source in the same way through the same
+          place at no further charge.  You need not require recipients
+          to copy the Corresponding Source along with the object code.
+          If the place to copy the object code is a network server, the
+          Corresponding Source may be on a different server (operated by
+          you or a third party) that supports equivalent copying
+          facilities, provided you maintain clear directions next to the
+          object code saying where to find the Corresponding Source.
+          Regardless of what server hosts the Corresponding Source, you
+          remain obligated to ensure that it is available for as long as
+          needed to satisfy these requirements.
+
+       e. Convey the object code using peer-to-peer transmission,
+          provided you inform other peers where the object code and
+          Corresponding Source of the work are being offered to the
+          general public at no charge under subsection 6d.
+
+     A separable portion of the object code, whose source code is
+     excluded from the Corresponding Source as a System Library, need
+     not be included in conveying the object code work.
+
+     A "User Product" is either (1) a "consumer product", which means
+     any tangible personal property which is normally used for personal,
+     family, or household purposes, or (2) anything designed or sold for
+     incorporation into a dwelling.  In determining whether a product is
+     a consumer product, doubtful cases shall be resolved in favor of
+     coverage.  For a particular product received by a particular user,
+     "normally used" refers to a typical or common use of that class of
+     product, regardless of the status of the particular user or of the
+     way in which the particular user actually uses, or expects or is
+     expected to use, the product.  A product is a consumer product
+     regardless of whether the product has substantial commercial,
+     industrial or non-consumer uses, unless such uses represent the
+     only significant mode of use of the product.
+
+     "Installation Information" for a User Product means any methods,
+     procedures, authorization keys, or other information required to
+     install and execute modified versions of a covered work in that
+     User Product from a modified version of its Corresponding Source.
+     The information must suffice to ensure that the continued
+     functioning of the modified object code is in no case prevented or
+     interfered with solely because modification has been made.
+
+     If you convey an object code work under this section in, or with,
+     or specifically for use in, a User Product, and the conveying
+     occurs as part of a transaction in which the right of possession
+     and use of the User Product is transferred to the recipient in
+     perpetuity or for a fixed term (regardless of how the transaction
+     is characterized), the Corresponding Source conveyed under this
+     section must be accompanied by the Installation Information.  But
+     this requirement does not apply if neither you nor any third party
+     retains the ability to install modified object code on the User
+     Product (for example, the work has been installed in ROM).
+
+     The requirement to provide Installation Information does not
+     include a requirement to continue to provide support service,
+     warranty, or updates for a work that has been modified or installed
+     by the recipient, or for the User Product in which it has been
+     modified or installed.  Access to a network may be denied when the
+     modification itself materially and adversely affects the operation
+     of the network or violates the rules and protocols for
+     communication across the network.
+
+     Corresponding Source conveyed, and Installation Information
+     provided, in accord with this section must be in a format that is
+     publicly documented (and with an implementation available to the
+     public in source code form), and must require no special password
+     or key for unpacking, reading or copying.
+
+  7. Additional Terms.
+
+     "Additional permissions" are terms that supplement the terms of
+     this License by making exceptions from one or more of its
+     conditions.  Additional permissions that are applicable to the
+     entire Program shall be treated as though they were included in
+     this License, to the extent that they are valid under applicable
+     law.  If additional permissions apply only to part of the Program,
+     that part may be used separately under those permissions, but the
+     entire Program remains governed by this License without regard to
+     the additional permissions.
+
+     When you convey a copy of a covered work, you may at your option
+     remove any additional permissions from that copy, or from any part
+     of it.  (Additional permissions may be written to require their own
+     removal in certain cases when you modify the work.)  You may place
+     additional permissions on material, added by you to a covered work,
+     for which you have or can give appropriate copyright permission.
+
+     Notwithstanding any other provision of this License, for material
+     you add to a covered work, you may (if authorized by the copyright
+     holders of that material) supplement the terms of this License with
+     terms:
+
+       a. Disclaiming warranty or limiting liability differently from
+          the terms of sections 15 and 16 of this License; or
+
+       b. Requiring preservation of specified reasonable legal notices
+          or author attributions in that material or in the Appropriate
+          Legal Notices displayed by works containing it; or
+
+       c. Prohibiting misrepresentation of the origin of that material,
+          or requiring that modified versions of such material be marked
+          in reasonable ways as different from the original version; or
+
+       d. Limiting the use for publicity purposes of names of licensors
+          or authors of the material; or
+
+       e. Declining to grant rights under trademark law for use of some
+          trade names, trademarks, or service marks; or
+
+       f. Requiring indemnification of licensors and authors of that
+          material by anyone who conveys the material (or modified
+          versions of it) with contractual assumptions of liability to
+          the recipient, for any liability that these contractual
+          assumptions directly impose on those licensors and authors.
+
+     All other non-permissive additional terms are considered "further
+     restrictions" within the meaning of section 10.  If the Program as
+     you received it, or any part of it, contains a notice stating that
+     it is governed by this License along with a term that is a further
+     restriction, you may remove that term.  If a license document
+     contains a further restriction but permits relicensing or conveying
+     under this License, you may add to a covered work material governed
+     by the terms of that license document, provided that the further
+     restriction does not survive such relicensing or conveying.
+
+     If you add terms to a covered work in accord with this section, you
+     must place, in the relevant source files, a statement of the
+     additional terms that apply to those files, or a notice indicating
+     where to find the applicable terms.
+
+     Additional terms, permissive or non-permissive, may be stated in
+     the form of a separately written license, or stated as exceptions;
+     the above requirements apply either way.
+
+  8. Termination.
+
+     You may not propagate or modify a covered work except as expressly
+     provided under this License.  Any attempt otherwise to propagate or
+     modify it is void, and will automatically terminate your rights
+     under this License (including any patent licenses granted under the
+     third paragraph of section 11).
+
+     However, if you cease all violation of this License, then your
+     license from a particular copyright holder is reinstated (a)
+     provisionally, unless and until the copyright holder explicitly and
+     finally terminates your license, and (b) permanently, if the
+     copyright holder fails to notify you of the violation by some
+     reasonable means prior to 60 days after the cessation.
+
+     Moreover, your license from a particular copyright holder is
+     reinstated permanently if the copyright holder notifies you of the
+     violation by some reasonable means, this is the first time you have
+     received notice of violation of this License (for any work) from
+     that copyright holder, and you cure the violation prior to 30 days
+     after your receipt of the notice.
+
+     Termination of your rights under this section does not terminate
+     the licenses of parties who have received copies or rights from you
+     under this License.  If your rights have been terminated and not
+     permanently reinstated, you do not qualify to receive new licenses
+     for the same material under section 10.
+
+  9. Acceptance Not Required for Having Copies.
+
+     You are not required to accept this License in order to receive or
+     run a copy of the Program.  Ancillary propagation of a covered work
+     occurring solely as a consequence of using peer-to-peer
+     transmission to receive a copy likewise does not require
+     acceptance.  However, nothing other than this License grants you
+     permission to propagate or modify any covered work.  These actions
+     infringe copyright if you do not accept this License.  Therefore,
+     by modifying or propagating a covered work, you indicate your
+     acceptance of this License to do so.
+
+  10. Automatic Licensing of Downstream Recipients.
+
+     Each time you convey a covered work, the recipient automatically
+     receives a license from the original licensors, to run, modify and
+     propagate that work, subject to this License.  You are not
+     responsible for enforcing compliance by third parties with this
+     License.
+
+     An "entity transaction" is a transaction transferring control of an
+     organization, or substantially all assets of one, or subdividing an
+     organization, or merging organizations.  If propagation of a
+     covered work results from an entity transaction, each party to that
+     transaction who receives a copy of the work also receives whatever
+     licenses to the work the party's predecessor in interest had or
+     could give under the previous paragraph, plus a right to possession
+     of the Corresponding Source of the work from the predecessor in
+     interest, if the predecessor has it or can get it with reasonable
+     efforts.
+
+     You may not impose any further restrictions on the exercise of the
+     rights granted or affirmed under this License.  For example, you
+     may not impose a license fee, royalty, or other charge for exercise
+     of rights granted under this License, and you may not initiate
+     litigation (including a cross-claim or counterclaim in a lawsuit)
+     alleging that any patent claim is infringed by making, using,
+     selling, offering for sale, or importing the Program or any portion
+     of it.
+
+  11. Patents.
+
+     A "contributor" is a copyright holder who authorizes use under this
+     License of the Program or a work on which the Program is based.
+     The work thus licensed is called the contributor's "contributor
+     version".
+
+     A contributor's "essential patent claims" are all patent claims
+     owned or controlled by the contributor, whether already acquired or
+     hereafter acquired, that would be infringed by some manner,
+     permitted by this License, of making, using, or selling its
+     contributor version, but do not include claims that would be
+     infringed only as a consequence of further modification of the
+     contributor version.  For purposes of this definition, "control"
+     includes the right to grant patent sublicenses in a manner
+     consistent with the requirements of this License.
+
+     Each contributor grants you a non-exclusive, worldwide,
+     royalty-free patent license under the contributor's essential
+     patent claims, to make, use, sell, offer for sale, import and
+     otherwise run, modify and propagate the contents of its contributor
+     version.
+
+     In the following three paragraphs, a "patent license" is any
+     express agreement or commitment, however denominated, not to
+     enforce a patent (such as an express permission to practice a
+     patent or covenant not to sue for patent infringement).  To "grant"
+     such a patent license to a party means to make such an agreement or
+     commitment not to enforce a patent against the party.
+
+     If you convey a covered work, knowingly relying on a patent
+     license, and the Corresponding Source of the work is not available
+     for anyone to copy, free of charge and under the terms of this
+     License, through a publicly available network server or other
+     readily accessible means, then you must either (1) cause the
+     Corresponding Source to be so available, or (2) arrange to deprive
+     yourself of the benefit of the patent license for this particular
+     work, or (3) arrange, in a manner consistent with the requirements
+     of this License, to extend the patent license to downstream
+     recipients.  "Knowingly relying" means you have actual knowledge
+     that, but for the patent license, your conveying the covered work
+     in a country, or your recipient's use of the covered work in a
+     country, would infringe one or more identifiable patents in that
+     country that you have reason to believe are valid.
+
+     If, pursuant to or in connection with a single transaction or
+     arrangement, you convey, or propagate by procuring conveyance of, a
+     covered work, and grant a patent license to some of the parties
+     receiving the covered work authorizing them to use, propagate,
+     modify or convey a specific copy of the covered work, then the
+     patent license you grant is automatically extended to all
+     recipients of the covered work and works based on it.
+
+     A patent license is "discriminatory" if it does not include within
+     the scope of its coverage, prohibits the exercise of, or is
+     conditioned on the non-exercise of one or more of the rights that
+     are specifically granted under this License.  You may not convey a
+     covered work if you are a party to an arrangement with a third
+     party that is in the business of distributing software, under which
+     you make payment to the third party based on the extent of your
+     activity of conveying the work, and under which the third party
+     grants, to any of the parties who would receive the covered work
+     from you, a discriminatory patent license (a) in connection with
+     copies of the covered work conveyed by you (or copies made from
+     those copies), or (b) primarily for and in connection with specific
+     products or compilations that contain the covered work, unless you
+     entered into that arrangement, or that patent license was granted,
+     prior to 28 March 2007.
+
+     Nothing in this License shall be construed as excluding or limiting
+     any implied license or other defenses to infringement that may
+     otherwise be available to you under applicable patent law.
+
+  12. No Surrender of Others' Freedom.
+
+     If conditions are imposed on you (whether by court order, agreement
+     or otherwise) that contradict the conditions of this License, they
+     do not excuse you from the conditions of this License.  If you
+     cannot convey a covered work so as to satisfy simultaneously your
+     obligations under this License and any other pertinent obligations,
+     then as a consequence you may not convey it at all.  For example,
+     if you agree to terms that obligate you to collect a royalty for
+     further conveying from those to whom you convey the Program, the
+     only way you could satisfy both those terms and this License would
+     be to refrain entirely from conveying the Program.
+
+  13. Use with the GNU Affero General Public License.
+
+     Notwithstanding any other provision of this License, you have
+     permission to link or combine any covered work with a work licensed
+     under version 3 of the GNU Affero General Public License into a
+     single combined work, and to convey the resulting work.  The terms
+     of this License will continue to apply to the part which is the
+     covered work, but the special requirements of the GNU Affero
+     General Public License, section 13, concerning interaction through
+     a network will apply to the combination as such.
+
+  14. Revised Versions of this License.
+
+     The Free Software Foundation may publish revised and/or new
+     versions of the GNU General Public License from time to time.  Such
+     new versions will be similar in spirit to the present version, but
+     may differ in detail to address new problems or concerns.
+
+     Each version is given a distinguishing version number.  If the
+     Program specifies that a certain numbered version of the GNU
+     General Public License "or any later version" applies to it, you
+     have the option of following the terms and conditions either of
+     that numbered version or of any later version published by the Free
+     Software Foundation.  If the Program does not specify a version
+     number of the GNU General Public License, you may choose any
+     version ever published by the Free Software Foundation.
+
+     If the Program specifies that a proxy can decide which future
+     versions of the GNU General Public License can be used, that
+     proxy's public statement of acceptance of a version permanently
+     authorizes you to choose that version for the Program.
+
+     Later license versions may give you additional or different
+     permissions.  However, no additional obligations are imposed on any
+     author or copyright holder as a result of your choosing to follow a
+     later version.
+
+  15. Disclaimer of Warranty.
+
+     THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
+     APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE
+     COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS"
+     WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED,
+     INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+     MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE
+     RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.
+     SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL
+     NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+  16. Limitation of Liability.
+
+     IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN
+     WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES
+     AND/OR CONVEYS THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR
+     DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR
+     CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE
+     THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA
+     BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
+     PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+     PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF
+     THE POSSIBILITY OF SUCH DAMAGES.
+
+  17. Interpretation of Sections 15 and 16.
+
+     If the disclaimer of warranty and limitation of liability provided
+     above cannot be given local legal effect according to their terms,
+     reviewing courts shall apply local law that most closely
+     approximates an absolute waiver of all civil liability in
+     connection with the Program, unless a warranty or assumption of
+     liability accompanies a copy of the Program in return for a fee.
+
+END OF TERMS AND CONDITIONS
+===========================
+
+How to Apply These Terms to Your New Programs
+=============================================
+
+If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these
+terms.
+
+   To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+state the exclusion of warranty; and each file should have at least the
+"copyright" line and a pointer to where the full notice is found.
+
+     ONE LINE TO GIVE THE PROGRAM'S NAME AND A BRIEF IDEA OF WHAT IT DOES.
+     Copyright (C) YEAR NAME OF AUTHOR
+
+     This program is free software: you can redistribute it and/or modify
+     it under the terms of the GNU General Public License as published by
+     the Free Software Foundation, either version 3 of the License, or (at
+     your option) any later version.
+
+     This program is distributed in the hope that it will be useful, but
+     WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+     You should have received a copy of the GNU General Public License
+     along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+   Also add information on how to contact you by electronic and paper
+mail.
+
+   If the program does terminal interaction, make it output a short
+notice like this when it starts in an interactive mode:
+
+     PROGRAM Copyright (C) YEAR NAME OF AUTHOR
+     This program comes with ABSOLUTELY NO WARRANTY; for details type ‘show w’.
+     This is free software, and you are welcome to redistribute it
+     under certain conditions; type ‘show c’ for details.
+
+   The hypothetical commands ‘show w’ and ‘show c’ should show the
+appropriate parts of the General Public License.  Of course, your
+program's commands might be different; for a GUI interface, you would
+use an "about box".
+
+   You should also get your employer (if you work as a programmer) or
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  For more information on this, and how to apply and follow
+the GNU GPL, see <https://www.gnu.org/licenses/>.
+
+   The GNU General Public License does not permit incorporating your
+program into proprietary programs.  If your program is a subroutine
+library, you may consider it more useful to permit linking proprietary
+applications with the library.  If this is what you want to do, use the
+GNU Lesser General Public License instead of this License.  But first,
+please read <https://www.gnu.org/licenses/why-not-lgpl.html>.
+
+
+
+Tag Table:
+Node: Top763
+Node: Introduction2906
+Ref: Some things that Transient can do3432
+Ref: Complexity in CLI programs3785
+Ref: Using Transient for composing interactive commands4386
+Node: Usage6616
+Node: Invoking Transients6984
+Node: Aborting and Resuming Transients8174
+Node: Common Suffix Commands10786
+Node: Saving Values13727
+Ref: Saving Values-Footnote-115295
+Node: Using History15488
+Node: Getting Help for Suffix Commands17360
+Node: Enabling and Disabling Suffixes18736
+Node: Other Commands24090
+Node: Configuration25768
+Ref: Essential Options26048
+Ref: Accessibility Options33174
+Ref: Auxiliary Options40415
+Ref: Developer Options45066
+Ref: Hook Variables46591
+Node: Modifying Existing Transients47119
+Node: Defining New Commands52986
+Node: Technical Introduction53426
+Node: Defining Transients59117
+Node: Binding Suffix and Infix Commands62460
+Ref: Group Specifications63251
+Ref: Suffix Specifications70058
+Node: Defining Suffix and Infix Commands74956
+Node: Using Infix Arguments77992
+Node: Using Prefix Scope81020
+Node: Current Suffix Command83056
+Node: Current Prefix Command85413
+Node: Transient State87965
+Ref: Pre-commands for Infixes92268
+Ref: Pre-commands for Suffixes92784
+Ref: Pre-commands for Non-Suffixes95233
+Ref: Special Pre-Commands96369
+Node: Classes and Methods96877
+Node: Group Classes98964
+Node: Group Methods100877
+Node: Prefix Classes102136
+Node: Suffix Classes102977
+Node: Prefix Methods107771
+Node: Suffix Methods110992
+Ref: Suffix Value Methods111252
+Ref: Suffix Format Methods114491
+Node: Prefix Slots117372
+Ref: Value and Scope117522
+Ref: Behavior120510
+Ref: Appearance121851
+Ref: Documentation122535
+Ref: Internal123430
+Node: Suffix Slots124781
+Ref: Slots of transient-child125149
+Ref: Slots of transient-suffix126864
+Ref: Slots of transient-infix129305
+Ref: Slots of transient-variable133058
+Ref: Slots of transient-switches133160
+Node: Predicate Slots133523
+Node: FAQ135860
+Ref: Can I control how the menu buffer is displayed?135989
+Ref: How can I copy text from the menu buffer?136313
+Ref: How can I autoload prefix and suffix commands?137020
+Ref: How does Transient compare to prefix keys and universal arguments?137488
+Ref: How does Transient compare to Magit-Popup and Hydra?137731
+Ref: Why does q not quit popups anymore?137925
+Node: Keystroke Index139026
+Node: Command and Function Index140891
+Node: Variable Index148358
+Node: Concept Index151648
+Node: GNU General Public License154472
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy-autoloads.el b/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy-autoloads.el
new file mode 100644
index 0000000..2f9bee9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy-autoloads.el
@@ -0,0 +1,28 @@
+;;; treepy-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from treepy.el
+
+(register-definition-prefixes "treepy" '("treepy-"))
+
+;;; End of scraped data
+
+(provide 'treepy-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; treepy-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy-pkg.el b/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy-pkg.el
new file mode 100644
index 0000000..e588857
--- /dev/null
+++ b/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "treepy" "20260531.1144"
+  "Generic tree traversal tools."
+  '((emacs "27.1"))
+  :url "https://github.com/volrath/treepy.el"
+  :commit "806c000bd40153d17dfa5709c6d19546d507a416"
+  :revdesc "806c000bd401"
+  :keywords '("lisp" "maint" "tools")
+  :authors '(("Daniel Barreto" . "daniel.barreto.n@gmail.com"))
+  :maintainers '(("Daniel Barreto" . "daniel.barreto.n@gmail.com")))
diff --git a/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy.el b/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy.el
new file mode 100644
index 0000000..8ea4fdb
--- /dev/null
+++ b/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy.el
@@ -0,0 +1,499 @@
+;;; treepy.el --- Generic tree traversal tools  -*- lexical-binding: t -*-
+
+;; Copyright (C) 2017 Daniel Barreto
+
+;; Author: Daniel Barreto <daniel.barreto.n@gmail.com>
+;; Keywords: lisp, maint, tools
+;; Created: Mon Jul 10 15:17:36 2017 (+0200)
+;; Package-Version: 20260531.1144
+;; Package-Revision: 806c000bd401
+;; Package-Requires: ((emacs "27.1"))
+;; URL: https://github.com/volrath/treepy.el
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or (at
+;; your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; Generic tools for recursive and iterative tree traversal based on
+;; clojure.walk and clojure.zip respectively.  Depends on `map', a map
+;; manipulation library built in Emacs 25.1.  All functions are prefixed
+;; with "treepy-".
+
+;;; Code:
+
+(require 'map)
+(require 'cl-lib)
+
+;;; Walk (recursive tree traversal)
+
+(defun treepy-walk (inner outer form)
+  "Using INNER and OUTER, traverse FORM, an arbitrary data structure.
+INNER and OUTER are functions.  Apply INNER to each element of
+FORM, building up a data structure of the same type, then apply
+OUTER to the result.  Recognize cons, lists, alists, vectors and
+hash tables."
+  (cond
+   ((and (listp form) (cdr form) (atom (cdr form)))
+    (funcall outer (cons (funcall inner (car form))
+                         (funcall inner (cdr form)))))
+   ((listp form) (funcall outer (mapcar inner form)))
+   ((vectorp form) (funcall outer (apply #'vector (mapcar inner form))))
+   ((hash-table-p form)
+    (funcall outer (map-apply (lambda (k v) (funcall inner (cons k v))) form)))
+   (t (funcall outer form))))
+
+(defun treepy-postwalk (f form)
+  "Perform a depth-first, post-order traversal of F applied to FORM.
+Call F on each sub-form, use F's return value in place of the
+original.  Recognize cons, lists, alists, vectors and
+hash tables."
+  (treepy-walk (apply-partially #'treepy-postwalk f) f form))
+
+(defun treepy-prewalk (f form)
+  "Perform a depth-first, pre-order traversal of F applied to FORM.
+Like `treepy-postwalk'."
+  (treepy-walk (apply-partially #'treepy-prewalk f) #'identity
+               (funcall f form)))
+
+(defun treepy-postwalk-demo (form)
+  "Demonstrate the behavior of `treepy-postwalk' for FORM.
+Return a list of each form as it is walked."
+  (let ((walk nil))
+    (treepy-postwalk (lambda (x) (push x walk) x)
+                     form)
+    (reverse walk)))
+
+(defun treepy-prewalk-demo (form)
+  "Demonstrate the behavior of `treepy-prewalk' for FORM.
+Return a list of each form as it is walked."
+  (let ((walk nil))
+    (treepy-prewalk (lambda (x) (push x walk) x)
+                    form)
+    (reverse walk)))
+
+(defun treepy-postwalk-replace (smap form &optional testfn)
+  "Use SMAP to transform FORM by doing replacing operations.
+Recursively replace in FORM keys in SMAP with their values.
+Does replacement at the leaves of the tree first."
+  ;; Also see comment in `map-contains-key's definition.
+  (declare (advertised-calling-convention (smap key) "0.1.3"))
+  (treepy-postwalk (lambda (x)
+                     (if (with-suppressed-warnings ((callargs map-contains-key))
+                           (map-contains-key smap x testfn))
+                         (map-elt smap x)
+                       x))
+                   form))
+
+(defun treepy-prewalk-replace (smap form &optional testfn)
+  "Use SMAP to transform FORM by doing replacing operations.
+Recursively replace in FORM keys in SMAP with their values.
+Does replacement at the root of the tree first."
+  ;; Also see comment in `map-contains-key's definition.
+  (declare (advertised-calling-convention (smap key) "0.1.3"))
+  (treepy-prewalk (lambda (x)
+                    (if (with-suppressed-warnings ((callargs map-contains-key))
+                          (map-contains-key smap x testfn))
+                        (map-elt smap x)
+                      x))
+                  form))
+
+
+;;; Zipper (iterative tree traversal)
+
+(defun treepy--context (loc &optional key)
+  "Return context for this LOC.
+If KEY is given, only return this key's value in context."
+  (let ((context (cdr (car loc))))
+    (if (and context key)
+        (map-elt context key)
+      context)))
+
+(defun treepy--context-assoc-1 (context k v)
+  "Assoc in CONTEXT a key K with a value V."
+  (if (map-contains-key context k)
+      (mapcar (lambda (entry)
+                (if (equal (car entry) k)
+                    (cons k v)
+                  entry))
+              context)
+    (cons (cons k v) context)))
+
+(defun treepy--context-assoc (context &rest kvs)
+  "Immutable map association in CONTEXT using KVS."
+  (declare (indent defun))
+  (seq-reduce (lambda (context kv)
+                (seq-let [k v] kv
+                  (treepy--context-assoc-1 context k v)))
+              (seq-partition kvs 2) context))
+
+(defun treepy--meta (loc &optional key)
+  "Return meta information for this LOC.
+If KEY is given, only return this key's value in meta
+information."
+  (let ((meta (cdr loc)))
+    (if key
+        (map-elt meta key)
+      meta)))
+
+(defun treepy--with-meta (obj meta)
+  "Bind OBJ with some META information."
+  (cons obj meta))
+
+(defun treepy--join-children (left-children right-children)
+  "Return a joining of LEFT-CHILDREN and RIGHT-CHILDREN.
+Reverses LEFT-CHILDREN so that they are correctly ordered as in
+the tree."
+  (append (reverse left-children) right-children))
+
+(defmacro treepy--with-loc (loc vars &rest body)
+  "Create a lexical context using LOC VARS.
+Execute BODY in this context."
+  (declare (indent defun))
+  (let ((lex-ctx
+         (mapcar (lambda (v)
+                   (cl-case v
+                     (node  `(node (treepy-node ,loc)))
+                     (context `(context (treepy--context ,loc)))
+                     (t `(,v (treepy--context
+                              ,loc
+                              ',(intern (concat ":" (symbol-name v))))))))
+                 vars)))
+    `(let* (,@lex-ctx) ,@body)))
+
+;;;; Construction
+
+(defun treepy-zipper (branchp children make-node root)
+  "Create a new zipper structure.
+
+BRANCHP is a function that, given a node, returns t if it can
+have children, even if it currently doesn't.
+
+CHILDREN is a function that, given a branch node, returns a seq
+of its children.
+
+MAKE-NODE is a function that, given an existing node and a seq of
+children, returns a new branch node with the supplied children.
+
+ROOT is the root node."
+  (treepy--with-meta
+   (cons root nil)
+   `((:branchp . ,branchp) (:children . ,children) (:make-node . ,make-node))))
+
+(defun treepy-list-zip (root)
+  "Return a zipper for nested lists, given a ROOT list."
+  (let ((make-node (lambda (_ children) children)))
+    (treepy-zipper #'listp #'identity make-node root)))
+
+(defun treepy-vector-zip (root)
+  "Return a zipper for nested vectors, given a ROOT vector."
+  (let ((make-node (lambda (_ children) (apply #'vector children)))
+        (children (lambda (cs) (seq-into cs 'list))))
+    (treepy-zipper #'vectorp children make-node root)))
+
+;;;; Context
+
+(defun treepy-node (loc)
+  "Return the node at LOC."
+  (caar loc))
+
+(defun treepy-branch-p (loc)
+  "Return t if the node at LOC is a branch."
+  (funcall (treepy--meta loc :branchp) (treepy-node loc)))
+
+(defun treepy-children (loc)
+  "Return a children list of the node at LOC, which must be a branch."
+  (if (treepy-branch-p loc)
+      (funcall (treepy--meta loc :children) (treepy-node loc))
+    (error "Called children on a leaf node")))
+
+(defun treepy-make-node (loc node children)
+  "Return a new branch node.
+Given an existing LOC, NODE and new CHILDREN, creates a new LOC
+with them.  The LOC is only used to supply the constructor."
+  (funcall (treepy--meta loc :make-node) node children))
+
+(defun treepy-path (loc)
+  "Return a list of nodes leading to the given LOC."
+  (reverse (treepy--context loc :pnodes)))
+
+(defun treepy-lefts (loc)
+  "Return a list of the left siblings of this LOC."
+  (reverse (treepy--context loc :l)))
+
+(defun treepy-rights (loc)
+  "Return a list of the right siblings of this LOC."
+  (treepy--context loc :r))
+
+;;;; Navigation
+
+(defun treepy-down (loc)
+  "Return the loc of the leftmost child of the node at this LOC.
+nil if no children."
+  (when (treepy-branch-p loc)
+    (let ((children (treepy-children loc)))
+      (treepy--with-loc loc (node context pnodes)
+        (seq-let [c &rest cs] children
+          (when children
+            (treepy--with-meta
+             `(,c . ((:l . ,nil)
+                     (:pnodes . ,(if context (cons node pnodes) (list node)))
+                     (:ppath . ,context)
+                     (:r . ,cs)))
+             (treepy--meta loc))))))))
+
+(defun treepy-up (loc)
+  "Return the loc of the parent of the node at this LOC.
+nil if at the top."
+  (treepy--with-loc loc (node pnodes ppath changed? l r)
+    (when pnodes
+      (let ((pnode (car pnodes)))
+        (treepy--with-meta
+         (if changed?
+             (cons (treepy-make-node loc pnode
+                                     (treepy--join-children l (cons node r)))
+                   (and ppath (treepy--context-assoc ppath :changed? t)))
+           (cons pnode ppath))
+         (treepy--meta loc))))))
+
+(defun treepy-root (loc)
+  "Zip from LOC all the way up and return the root node.
+Reflect any alterations to the tree."
+  (if (equal :end (treepy--context loc))
+      (treepy-node loc)
+    (let ((p loc))
+      (while (setq p (treepy-up p))
+        (setq loc p))
+      (treepy-node loc))))
+
+(defun treepy-right (loc)
+  "Return the loc of the right sibling of the node at this LOC.
+nil if there's no more right siblings."
+  (treepy--with-loc loc (node context l r)
+    (let ((r (if (listp r)
+                 r
+               ;; If `r' is not a list (or nil), then we're dealing with a non
+               ;; nil cdr ending list.
+               (cons r nil))))
+      (seq-let [cr &rest rnext] r
+        (when (and context r)
+          (treepy--with-meta
+           (cons cr
+                 (treepy--context-assoc context
+                   :l (cons node l)
+                   :r rnext))
+           (treepy--meta loc)))))))
+
+
+(defun treepy-rightmost (loc)
+  "Return the loc of the rightmost sibling of the node at this LOC.
+If LOC is already the rightmost sibling, return self."
+  (treepy--with-loc loc (node context l r)
+    (if (and context r)
+        (treepy--with-meta
+         (cons (car (last r))
+               (treepy--context-assoc context
+                 :l (treepy--join-children l (cons node (butlast r)))
+                 :r nil))
+         (treepy--meta loc))
+      loc)))
+
+(defun treepy-left (loc)
+  "Return the loc of the left sibling of the node at this LOC.
+nil if no more left siblings."
+  (treepy--with-loc loc (node context l r)
+    (when (and context l)
+      (seq-let [cl &rest lnext] l
+        (treepy--with-meta
+         (cons cl
+               (treepy--context-assoc context
+                 :l lnext
+                 :r (cons node r)))
+         (treepy--meta loc))))))
+
+(defun treepy-leftmost (loc)
+  "Return the loc of the leftmost sibling of the node at this LOC.
+If LOC is already the leftmost sibling, return self."
+  (treepy--with-loc loc (node context l r)
+    (if (and context l)
+        (treepy--with-meta
+         (cons (car (last l))
+               (treepy--context-assoc context
+                 :l []
+                 :r (treepy--join-children (butlast l) (cons node r))))
+         (treepy--meta loc))
+      loc)))
+
+(defun treepy-leftmost-descendant (loc)
+  "Return the leftmost descendant of the given LOC.
+\(ie, down repeatedly)."
+  (while (treepy-branch-p loc)
+    (setq loc (treepy-down loc)))
+  loc)
+
+;;;; Modification
+
+(defun treepy-insert-left (loc item)
+  "Insert as the left sibling of this LOC'S node the ITEM.
+Return same loc with siblings updated."
+  (treepy--with-loc loc (node context l)
+    (if (not context)
+        (error "Insert at top")
+      (treepy--with-meta
+       (cons node
+             (treepy--context-assoc context
+               :l (cons item l)
+               :changed? t))
+       (treepy--meta loc)))))
+
+(defun treepy-insert-right (loc item)
+  "Insert as the right sibling of this LOC's node the ITEM.
+Return same loc with siblings updated."
+  (treepy--with-loc loc (node context r)
+    (if (not context)
+        (error "Insert at top")
+      (treepy--with-meta
+       (cons node
+             (treepy--context-assoc context
+               :r (cons item r)
+               :changed? t))
+       (treepy--meta loc)))))
+
+(defun treepy-replace (loc node)
+  "Replace the node in this LOC with the given NODE, without moving."
+  (let ((context (treepy--context loc)))
+    (treepy--with-meta
+     (cons node
+           (treepy--context-assoc context
+             :changed? t))
+     (treepy--meta loc))))
+
+(defun treepy-edit (loc f &rest args)
+  "Replace the node at this LOC with the value of (F node ARGS)."
+  (treepy-replace loc (apply f (treepy-node loc) args)))
+
+(defun treepy-insert-child (loc item)
+  "Insert as the leftmost child of this LOC's node the ITEM.
+Return same loc with children updated."
+  (treepy-replace loc (treepy-make-node loc (treepy-node loc)
+                                        (cons item (treepy-children loc)))))
+
+(defun treepy-append-child (loc item)
+  "Insert as the rightmost child of this LOC'S node the ITEM.
+Return same loc with children updated."
+  ;; TODO: check performance
+  (treepy-replace loc (treepy-make-node loc (treepy-node loc)
+                                        (append (treepy-children loc)
+                                                `(,item)))))
+
+(defun treepy-remove (loc)
+  "Remove the node at LOC.
+Return the loc that would have preceded it in a depth-first
+walk."
+  (treepy--with-loc loc (context pnodes ppath l r)
+    (if (not context)
+        (error "Remove at top")
+      (if (> (length l) 0)
+          (let ((nloc (treepy--with-meta (cons (car l)
+                                               (treepy--context-assoc context
+                                                 :l (cdr l)
+                                                 :changed? t))
+                                         (treepy--meta loc)))
+                (child nil))
+            (while (setq child (and (treepy-branch-p nloc)
+                                    (treepy-children nloc)))
+              (setq nloc (treepy-rightmost child)))
+            nloc)
+        (treepy--with-meta
+         (cons (treepy-make-node loc (car pnodes) r)
+               (and ppath (treepy--context-assoc context :changed? t)))
+         (treepy--meta loc))))))
+
+;;;; Enumeration
+
+(defun treepy--preorder-next (loc)
+  "Move to the next LOC in the hierarchy, depth-first in preorder.
+When reaching the end, returns a distinguished loc detectable via
+`treepy-end-p'.  If already at the end, stays there."
+  (if (equal :end (treepy--context loc))
+      loc
+    (let ((cloc loc))
+      (or
+       (and (treepy-branch-p cloc) (treepy-down cloc))
+       (treepy-right cloc)
+       (let ((p cloc)
+             (pr nil))
+         (while (and (treepy-up p) (not (setq pr (treepy-right (treepy-up p)))))
+           (setq p (treepy-up p)))
+         (or pr (cons (cons (treepy-node p) :end) nil)))))))
+
+(defun treepy--postorder-next (loc)
+  "Move to the next LOC in the hierarchy, depth-first in postorder.
+When reaching the end, returns a distinguished loc detectable via
+`treepy-end-p'.  If already at the end, stays there."
+  (if (equal :end (treepy--context loc))
+      loc
+    (if (null (treepy-up loc))
+        (cons (cons (treepy-node loc) :end) nil)
+      (or (let ((rloc (treepy-right loc)))
+            (and rloc (treepy-leftmost-descendant rloc)))
+          (treepy-up loc)))))
+
+(defun treepy-next (loc &optional order)
+  "Move to the next LOC in the hierarchy, depth-first.
+Use ORDER if given.  Possible values for ORDER are `:preorder' and
+`:postorder', defaults to the former."
+  (cl-case (or order :preorder)
+    (:preorder (treepy--preorder-next loc))
+    (:postorder (treepy--postorder-next loc))
+    (t (error "Unrecognized order"))))
+
+(defun treepy--preorder-prev (loc)
+  "Move to the previous LOC in the hierarchy, depth-first preorder.
+If already at the root, returns nil."
+  (let ((lloc (treepy-left loc))
+        (child nil))
+    (if lloc
+        (progn
+          (while (setq child (and (treepy-branch-p lloc)
+                                  (treepy-children lloc)))
+            (setq lloc (treepy-rightmost child)))
+          lloc)
+      (treepy-up loc))))
+
+(defun treepy--postorder-prev (loc)
+  "Move to the previous LOC in the hierarchy, depth-first postorder.
+If already at the root, returns nil."
+  (if (treepy-branch-p loc)
+      (treepy-rightmost (treepy-down loc))
+    (progn
+      (while (not (treepy-left loc))
+        (setq loc (treepy-up loc)))
+      (treepy-left loc))))
+
+(defun treepy-prev (loc &optional order)
+  "Move to the previous LOC in the hierarchy, depth-first.
+Use ORDER if given.  Possible values for ORDER are `:preorder' and `:postorder',
+defaults to the former."
+  (cl-case (or order :preorder)
+    (:preorder (treepy--preorder-prev loc))
+    (:postorder (treepy--postorder-prev loc))
+    (t (error "Unrecognized order"))))
+
+(defun treepy-end-p (loc)
+  "Return t if LOC represents the end of a depth-first walk."
+  (equal :end (treepy--context loc)))
+
+(provide 'treepy)
+
+;;; treepy.el ends here
diff --git a/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy.elc b/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy.elc
new file mode 100644
index 0000000..f18701c
Binary files /dev/null and b/emacs/.emacs.d/elpa/treepy-20260531.1144/treepy.elc differ
diff --git a/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep-autoloads.el b/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep-autoloads.el
new file mode 100644
index 0000000..fece53f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep-autoloads.el
@@ -0,0 +1,31 @@
+;;; wgrep-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from wgrep.el
+
+(autoload 'wgrep-setup "wgrep" "\
+Setup wgrep preparation.")
+(add-hook 'grep-setup-hook 'wgrep-setup)
+(register-definition-prefixes "wgrep" '("wgrep-"))
+
+;;; End of scraped data
+
+(provide 'wgrep-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; wgrep-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep-pkg.el b/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep-pkg.el
new file mode 100644
index 0000000..e29b4d9
--- /dev/null
+++ b/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "wgrep" "20230203.1214"
+  "Writable grep buffer."
+  '((emacs "25.1"))
+  :url "https://github.com/mhayashi1120/Emacs-wgrep/raw/master/wgrep.el"
+  :commit "b4d69280d8a6a5ded1597e02afbaa811a160383b"
+  :revdesc "b4d69280d8a6"
+  :keywords '("grep" "edit" "extensions")
+  :authors '(("Masahiro Hayashi" . "mhayashi1120@gmail.com"))
+  :maintainers '(("Masahiro Hayashi" . "mhayashi1120@gmail.com")))
diff --git a/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep.el b/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep.el
new file mode 100644
index 0000000..e6adee1
--- /dev/null
+++ b/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep.el
@@ -0,0 +1,1220 @@
+;;; wgrep.el --- Writable grep buffer -*- lexical-binding: t -*-
+
+;; Copyright (C) 2010-2020,2023 Masahiro Hayashi
+;; Copyright (C) 2002-2009 Matsushita Akihisa <akihisa@mail.ne.jp>
+
+;; Author: Masahiro Hayashi <mhayashi1120@gmail.com>
+;; Keywords: grep edit extensions
+;; URL: http://github.com/mhayashi1120/Emacs-wgrep/raw/master/wgrep.el
+;; Emacs: GNU Emacs 25 or later
+;; Package-Requires: ((emacs "25.1"))
+;; Package-Version: 20230203.1214
+;; Package-Revision: b4d69280d8a6
+
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License as
+;; published by the Free Software Foundation; either version 3, or (at
+;; your option) any later version.
+
+;; This program is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
+
+;;; Commentary:
+
+;; ## Summary:
+
+;; wgrep allows you to edit a grep buffer and apply those changes to
+;; the file buffer like `sed` interactively. No need to learn sed
+;; script, just learn Emacs.
+
+;; ## Install:
+
+;; Put this file into load-path'ed directory, and byte compile it if
+;; desired. And put the following expression into your ~/.emacs.
+;;
+;;     (require 'wgrep)
+
+;; ## Usage:
+
+;; You can edit the text in the *grep* buffer after typing `C-c C-p` .
+;; After that the changed text is highlighted.
+;; The following keybindings are defined:
+
+;; * `C-c C-e`: Apply the changes to file buffers.
+;; * `C-c C-u`: All changes are unmarked and ignored.
+;; * `C-c C-d`: Mark as delete to current line (including newline).
+;; * `C-c C-r`: Remove the changes in the region (these changes are not
+;;   applied to the files. Of course, the remaining
+;;   changes can still be applied to the files.)
+;; * `C-c C-p`: Toggle read-only area.
+;; * `C-c C-k`: Discard all changes and exit.
+;; * `C-x C-q`: Exit wgrep mode.
+
+;; * To save all buffers that wgrep has changed, run
+;;
+;;     M-x wgrep-save-all-buffers
+
+;; * To save buffer automatically when `wgrep-finish-edit'.
+;;
+;;     (setq wgrep-auto-save-buffer t)
+
+;; * You can change the default key binding to switch to wgrep.
+;;
+;;     (setq wgrep-enable-key "r")
+
+;; * To apply all changes regardless of whether or not buffer is read-only.
+;;
+;;     (setq wgrep-change-readonly-file t)
+
+;; ### Trivial features:
+
+;; - wdired.el like interface.
+;; - Support GNU grep `--context` (`-A` `-B` and `-C`) option.
+;; - Can handle too many files.
+;; - Can handle newline insertion in *grep* buffer.
+;; - Delete whole line include newline.
+
+;; ### Similar software:
+
+;; [GNU sed](https://www.gnu.org/software/sed/)
+;; [helm-ag](https://github.com/syohex/emacs-helm-ag) has a similar feature.
+
+;; ## History:
+
+;; This program was forked from Matsushita Akihisa's [grep-edit.el
+;; v2.11](http://www.bookshelf.jp/elc/grep-edit.el).  As this website is
+;; now inaccessible,
+;; [emacswiki.org's](https://www.emacswiki.org/emacs/grep-edit.el) copy
+;; may be consulted.
+
+;; Imported version can be downloaded from this orphan commit:
+;; https://github.com/mhayashi1120/Emacs-wgrep/tree/import-original-author/
+
+;; Following added implementations and differences.
+;; * Support GNU grep context option -A -B and -C
+;; * Some bugfix. (wrong coloring text etc..)
+;; * wdired.el like interface.
+;; * Remove all advice.
+;; * Bind to local variables. (grep-a-lot.el works well)
+;; * After save buffer, colored face will be removed.
+;; * Change face easy to see.
+;; * Reinforce checking error.
+;; * Support removing whole line include new-line.
+
+;;; Code:
+
+(require 'grep)
+
+(declare-function image-get-display-property "image-mode.el" ())
+(declare-function image-mode-as-text "image-mode.el" ())
+
+(defgroup wgrep nil
+  "Customize wgrep"
+  :prefix "wgrep-"
+  :group 'grep)
+
+;;;
+;;; Variable / Constant
+;;;
+
+;;;;
+;;;; Customize
+;;;;
+
+(defcustom wgrep-change-readonly-file nil
+  "Non-nil means to enable change read-only files."
+  :group 'wgrep
+  :type 'boolean)
+
+(defcustom wgrep-enable-key "\C-c\C-p"
+  "This variable will be obsoleted in the future release.
+Key to enable `wgrep-mode'."
+  :group 'wgrep
+  :type 'string)
+
+(defcustom wgrep-auto-save-buffer nil
+  "Non-nil means do `basic-save-buffer' automatically while `wgrep-finish-edit'."
+  :group 'wgrep
+  :type 'boolean)
+
+(defcustom wgrep-too-many-file-length 10
+  "Number to detect as too many files."
+  :group 'wgrep
+  :type 'number)
+
+(defvar wgrep-setup-hook nil
+  "Hooks to run when setting up wgrep.")
+
+(defvar wgrep-mode-map nil)
+
+;;;;
+;;;; Internal variable
+;;;;
+
+(defvar wgrep-readonly-state nil)
+(make-variable-buffer-local 'wgrep-readonly-state)
+
+(defvar wgrep-prepared nil)
+(make-variable-buffer-local 'wgrep-prepared)
+
+(defvar wgrep-sibling-buffer nil)
+(make-variable-buffer-local 'wgrep-sibling-buffer)
+
+(defvar wgrep-original-mode-map nil)
+(make-variable-buffer-local 'wgrep-original-mode-map)
+
+(defvar wgrep-inhibit-modification-hook nil)
+
+(defvar wgrep-auto-apply-disk nil
+  "Internal use `wgrep-auto-save-buffer' or too many file is editing.")
+
+(defvar wgrep-acceptable-modes nil)
+(make-obsolete 'wgrep-acceptable-modes nil "2.1.1")
+
+;; Suppress elint warning
+;; GNU Emacs have this variable at least version 21 or later
+(defvar auto-coding-regexp-alist)
+
+;;;;
+;;;; Constant
+;;;;
+
+;; These regexp come from `grep-regexp-alist' at grep.el
+(eval-and-compile
+  (defconst wgrep-null-file-separator-header-regexp
+    "\\(?1:[^\0\n]+\\)\\(?:\0\\)\\(?3:[0-9]+\\):")
+
+  (defconst wgrep-colon-file-separator-header-regexp
+    "\\(?1:[^\n:]+?[^\n/:]\\):[\t ]*\\(?3:[1-9][0-9]*\\)[\t ]*:"))
+
+;; Generalized regexp, but wrong matching when colon `:' and null `\0'
+;; is contained in grep result.
+(defconst wgrep-default-line-header-regexp
+  (eval-when-compile
+    (concat
+     "^"
+     "\\(?:"
+     ;; `--null' argument is used.
+     wgrep-null-file-separator-header-regexp
+     "\\|"
+     ;; Fallback regexp
+     wgrep-colon-file-separator-header-regexp
+     "\\)")))
+
+;;;;
+;;;; Error
+;;;;
+
+(define-error 'wgrep-error "wgrep error")
+
+;;;;
+;;;; Overridable functions / regexp
+;;;;
+
+(defvar wgrep-line-file-regexp wgrep-default-line-header-regexp
+  "Regexp that match to line header of grep result.
+
+That capture 1: filename 3: line-number
+End of this match equals start of file contents.
+")
+
+(defvar wgrep-results-parser 'wgrep-parse-command-results
+  "This function parse line oriented command output and set following properties.
+`wgrep-line-filename', `wgrep-line-number', `wgrep-ignore' and
+`wgrep-construct-filename-property' function construct the property name with
+`wgrep-line-filename' and the value is same. This property is used for searching
+ correct point of filename.
+Not like `wgrep-header&footer-parser' should not set `read-only' property.")
+
+;; Previously named `wgrep-header/footer-parser` this name violate `package-lint`
+;; conventions.
+(defvar wgrep-header&footer-parser 'wgrep-prepare-header&footer
+  "This function should set text properties `read-only' and `wgrep-header' to
+non editable region.")
+
+;;;
+;;; Basic utilities
+;;;
+
+;;;;
+;;;; misc
+;;;;
+
+;;Hack function
+(defun wgrep-string-replace-bom (string cs)
+  (let ((regexp (car (rassq (coding-system-base cs) auto-coding-regexp-alist)))
+        ;;TODO check ack-grep
+        ;; FIXME: `find-operation-coding-system' is not exactly correct.
+        ;;        However almost case is ok like this bom function.
+        ;;        e.g. (let ((default-process-coding-system 'some-coding))
+        ;;               (call-interactively 'grep))
+        (grep-cs (or (find-operation-coding-system 'call-process grep-program)
+                     (terminal-coding-system)))
+        str)
+    (if (and regexp
+             (setq str (encode-coding-string string grep-cs))
+             (string-match regexp str))
+        (decode-coding-string (substring str (match-end 0)) cs)
+      string)))
+
+(defun wgrep-delete-whole-line ()
+  (delete-region (line-beginning-position)
+                 (line-beginning-position 2)))
+
+(defun wgrep-goto-line (line)
+  (goto-char (point-min))
+  (forward-line (1- line)))
+
+(defun wgrep-process-exited-p ()
+  (let ((proc (get-buffer-process (current-buffer))))
+    (or (null proc)
+        (eq (process-status proc) 'exit))))
+
+;;;;
+;;;; error
+;;;;
+
+(defun wgrep-check-file (file)
+  (unless (file-exists-p file)
+    (signal 'wgrep-error (list "File does not exist.")))
+  (unless (file-writable-p file)
+    (signal 'wgrep-error (list "File is not writable."))))
+
+;;;;
+;;;; overlay
+;;;;
+
+(defun wgrep-cleanup-overlays (beg end)
+  (dolist (ov (overlays-in beg end))
+    (when (overlay-get ov 'wgrep)
+      (delete-overlay ov))))
+
+(defun wgrep-make-overlay (beg end)
+  (let ((o (make-overlay beg end nil nil t)))
+    (overlay-put o 'wgrep t)
+    o))
+
+(defun wgrep-file-overlays ()
+  (save-restriction
+    (widen)
+    (let (res)
+      (dolist (ov (overlays-in (point-min) (point-max)))
+        (when (overlay-get ov 'wgrep)
+          (setq res (cons ov res))))
+      (nreverse res))))
+
+(defun wgrep-edit-field-overlays ()
+  (let (res)
+    (dolist (ov (overlays-in (point-min) (point-max)))
+      (when (overlay-get ov 'wgrep-changed)
+        (setq res (cons ov res))))
+    (sort res (lambda (x y) (< (overlay-start x) (overlay-start y))))))
+
+;;;
+;;; grep result handler
+;;;
+
+(defun wgrep-construct-filename-property (filename)
+  (intern (format "wgrep-fn-%s" filename)))
+
+(defun wgrep-goto-grep-line (file number)
+  (let ((first (point))
+        (fprop (wgrep-construct-filename-property file))
+        fn next)
+    (catch 'found
+      ;; FIXME
+      ;; In a huge buffer, `next-single-property-change' loop make
+      ;; slow down the program.
+      ;; 1. sketchy move by filename (wgrep-fn-* property).
+      ;; 2. search filename and line-number in text property.
+      ;; 3. return to 1. while search is done or EOB.
+
+      (goto-char (point-min))
+
+      (while (setq next (next-single-property-change (point) fprop))
+        (goto-char next)
+        (while (and (not (eobp))
+                    (or (null (setq fn (get-text-property
+                                        (line-beginning-position)
+                                        'wgrep-line-filename)))
+                        (string= fn file)))
+          (when fn
+            (let ((num (get-text-property (point) 'wgrep-line-number))
+                  (start (next-single-property-change (point) 'wgrep-line-number)))
+              (when (eq number num)
+                (goto-char start)
+                (throw 'found t))))
+          (forward-line 1)))
+      (goto-char first)
+      nil)))
+
+(defun wgrep-get-old-text (file number)
+  (when (and wgrep-sibling-buffer
+             (buffer-live-p wgrep-sibling-buffer))
+    (with-current-buffer wgrep-sibling-buffer
+      (when (wgrep-goto-grep-line file number)
+        (buffer-substring-no-properties
+         (point) (line-end-position))))))
+
+;;;
+;;; Prepare and parse grep <-> wgrep
+;;;
+
+(defun wgrep-to-original-mode ()
+  (kill-local-variable 'query-replace-skip-read-only)
+  (remove-hook 'after-change-functions 'wgrep-after-change-function t)
+  ;; do not remove `wgrep-maybe-echo-error-at-point' that display
+  ;; errors at point
+  (use-local-map wgrep-original-mode-map)
+  (set-buffer-modified-p nil)
+  (setq buffer-undo-list nil)
+  (setq buffer-read-only t))
+
+(defun wgrep-goto-first-found ()
+  (let ((header (previous-single-property-change (point-max) 'wgrep-header)))
+    (cond
+     (header
+      (goto-char header)
+      header)
+     (t
+      (goto-char (point-min))
+      (point)))))
+
+(defun wgrep-goto-end-of-found ()
+  (let ((footer (next-single-property-change (point-min) 'wgrep-footer)))
+    (cond
+     (footer
+      (goto-char footer)
+      footer)
+     (t
+      (goto-char (point-max))
+      (point-max)))))
+
+(defun wgrep-cleanup-temp-buffer ()
+  "Cleanup temp buffer in *grep* buffer."
+  (let ((origin-buffer (current-buffer)))
+    (dolist (buf (buffer-list))
+      (with-current-buffer buf
+        (when (eq origin-buffer wgrep-sibling-buffer)
+          (kill-buffer buf)))))
+  (setq wgrep-sibling-buffer nil))
+
+(defun wgrep-clone-to-temp-buffer ()
+  (wgrep-cleanup-temp-buffer)
+  (let ((grepbuf (current-buffer))
+        (tmpbuf (generate-new-buffer " *wgrep temp* ")))
+    (setq wgrep-sibling-buffer tmpbuf)
+    (add-hook 'kill-buffer-hook 'wgrep-cleanup-temp-buffer nil t)
+    (append-to-buffer tmpbuf (point-min) (point-max))
+    (with-current-buffer tmpbuf
+      (setq wgrep-sibling-buffer grepbuf))
+    tmpbuf))
+
+(defun wgrep-set-readonly-area (state)
+  (let ((inhibit-read-only t)
+        (wgrep-inhibit-modification-hook t)
+        pos start end)
+    (save-excursion
+      ;; set readonly grep result filename
+      (setq pos (point-min))
+      (while (setq start (next-single-property-change
+                          pos 'wgrep-line-filename))
+        (setq end (next-single-property-change
+                   start 'wgrep-line-filename))
+        (put-text-property start end 'read-only state)
+        (put-text-property (1- end) end 'rear-nonsticky t)
+        ;; set readonly all newline at end of grep line
+        (when (eq (char-before start) ?\n)
+          (put-text-property (1- start) start 'read-only state))
+        (setq pos end))
+      (setq pos (point-min))
+      (while (setq start (next-single-property-change
+                          pos 'wgrep-ignore))
+        (setq end (next-single-property-change
+                   start 'wgrep-ignore))
+        (put-text-property start end 'read-only state)
+        ;; set readonly all newline at end of grep line
+        (when (eq (char-before start) ?\n)
+          (put-text-property (1- start) start 'read-only state))
+        (setq pos end))
+      ;; set readonly last of grep line
+      (let ((footer (or (next-single-property-change (point-min) 'wgrep-footer)
+                        ;; to consider empty footer.
+                        (point-max))))
+        (when (eq (char-before footer) ?\n)
+          (put-text-property (1- footer) footer 'read-only state))))
+    (setq wgrep-readonly-state state)))
+
+(defun wgrep-prepare-context ()
+  (save-restriction
+    (let ((start (wgrep-goto-first-found))
+          (end (wgrep-goto-end-of-found)))
+      (narrow-to-region start end)
+      (goto-char (point-min))
+      (funcall wgrep-results-parser))))
+
+;; -A -B -C output may be misunderstood and set read-only.
+;; Context match break font-lock if context have at least two `:'.
+;; e.g.
+;; filename-1-2010-01-01 23:59:99
+;; filename:2:hoge
+;; filename-3-20:10:25
+(defun wgrep-prepare-context-while (filename line direction fprop flen)
+  (let* ((next (+ direction line))
+         (fregexp (regexp-quote filename)))
+    (forward-line direction)
+    (while (looking-at (format "^%s[-\0]%d-" fregexp next))
+      (let ((start (match-beginning 0))
+            (end (match-end 0))
+            (bol (line-beginning-position))
+            (eol (line-end-position)))
+        (put-text-property start end 'wgrep-line-filename filename)
+        (put-text-property start end 'wgrep-line-number next)
+        (put-text-property start (+ start flen) fprop filename)
+        (remove-text-properties bol eol '(wgrep-ignore))
+        (forward-line direction)
+        (setq next (+ direction next))))))
+
+(defun wgrep-parse-command-results ()
+  (let ((cache (make-hash-table)))
+    (while (not (eobp))
+      (cond
+       ((looking-at wgrep-line-file-regexp)
+        (let* ((fn (match-string-no-properties 1))
+               (line (string-to-number (match-string 3)))
+               (start (match-beginning 0))
+               (end (match-end 0))
+               (fprop (wgrep-construct-filename-property fn))
+               (flen (length fn)))
+          ;; check relative path grep result
+          ;; grep result may be --context result with number between 2 colon.
+          ;; ./filename-1-:10:
+          ;; that make misunderstand font-locking
+          ;; check file existence decrease risk of the misunderstanding.
+          (when (or (gethash fn cache nil)
+                    (and (file-exists-p fn)
+                         (puthash fn t cache)))
+            (put-text-property start end 'wgrep-line-filename fn)
+            (put-text-property start end 'wgrep-line-number line)
+            (put-text-property start (+ start flen) fprop fn)
+            ;; handle backward and forward following options.
+            ;; -A (--after-context) -B (--before-context) -C (--context)
+            (save-excursion
+              (wgrep-prepare-context-while fn line -1 fprop flen))
+            (wgrep-prepare-context-while fn line 1 fprop flen)
+            ;; end of context output `--'.
+            (forward-line -1))))
+       (t
+        ;; Add property but this may be removed by `wgrep-prepare-context-while'
+        (put-text-property (line-beginning-position)
+                           (line-end-position)
+                           'wgrep-ignore t)))
+      (forward-line 1))))
+
+(defun wgrep-current-file-and-linum ()
+  (save-excursion
+    (forward-line 0)
+    (let ((fn (get-text-property (point) 'wgrep-line-filename))
+          (linum (get-text-property (point) 'wgrep-line-number)))
+      (when (and fn linum)
+        (list fn linum)))))
+
+(defun wgrep-restore-from-temp-buffer ()
+  (cond
+   ((and wgrep-sibling-buffer
+         (buffer-live-p wgrep-sibling-buffer))
+    (let ((grepbuf (current-buffer))
+          (tmpbuf wgrep-sibling-buffer)
+          (header (wgrep-current-file-and-linum))
+          (savedc (current-column))
+          (savedp (point))
+          (inhibit-read-only t)
+          (wgrep-inhibit-modification-hook t)
+          buffer-read-only)
+      (erase-buffer)
+      (with-current-buffer tmpbuf
+        (append-to-buffer grepbuf (point-min) (point-max)))
+      (goto-char (point-min))
+      ;; restore previous cursor
+      (or (and header
+               (apply 'wgrep-goto-grep-line header)
+               (move-to-column savedc))
+          (goto-char (min (point-max) savedp)))
+      (wgrep-cleanup-temp-buffer)))
+   (t
+    ;; non fatal error
+    (message "Error! Saved buffer is unavailable."))))
+
+(defun wgrep-prepare-to-edit ()
+  (unless wgrep-prepared
+    (save-excursion
+      (let ((inhibit-read-only t)
+            (wgrep-inhibit-modification-hook t)
+            buffer-read-only)
+        (funcall (or wgrep-header&footer-parser
+                     ;; TODO FIXME: workaround compat for previous code.
+                     (and (boundp 'wgrep-header/footer-parser)
+                          wgrep-header/footer-parser)))
+        (wgrep-prepare-context)
+        (setq wgrep-prepared t)))))
+
+(defun wgrep-prepare-header&footer ()
+  (let (beg end)
+    ;; Set read-only grep result header
+    (goto-char (point-min))
+    (setq beg (point-min))
+    ;; See `compilation-start'
+    (forward-line 4)
+    (setq end (point))
+    (put-text-property beg end 'read-only t)
+    (put-text-property beg end 'wgrep-header t)
+    ;; Set read-only grep result footer
+    (goto-char (point-max))
+    (forward-line -1)
+    (when (re-search-backward "^$" end t)
+      (setq beg (point))
+      (setq end (point-max))
+      (when beg
+        (put-text-property beg end 'read-only t)
+        (put-text-property beg end 'wgrep-footer t)))))
+
+(defun wgrep-set-header&footer-read-only (state)
+  (let ((inhibit-read-only t)
+        (wgrep-inhibit-modification-hook t))
+    ;; header
+    (let ((header-end (next-single-property-change (point-min) 'wgrep-header)))
+      (when header-end
+        (put-text-property (point-min) header-end 'read-only state)))
+    ;; footer
+    (let ((footer-beg (next-single-property-change (point-min) 'wgrep-footer)))
+      (when footer-beg
+        (put-text-property footer-beg (point-max) 'read-only state)))))
+
+;;;
+;;; Editing handlers
+;;;
+
+;; get overlay BEG and END is passed by `after-change-functions'
+(defun wgrep-editing-overlay (&optional start end)
+  (let ((beg (or start (line-beginning-position)))
+        (fin (or end (line-end-position)))
+        ov bol eol
+        ;; beginning/end of grep
+        bog eog)
+    (goto-char beg)
+    (setq bol (line-beginning-position))
+    (goto-char fin)
+    (setq eol (line-end-position))
+    (catch 'done
+      (dolist (o (overlays-in bol eol))
+        ;; find overlay that have changed by user.
+        (when (overlay-get o 'wgrep-changed)
+          (setq ov o)
+          (throw 'done o))))
+    (if ov
+        (setq bog (min beg (overlay-start ov))
+              eog (max (overlay-end ov) fin))
+      (setq bog bol
+            eog eol))
+    (goto-char bog)
+    (cond
+     ;; When handling whole line, BOL equal beginning of edit.
+     ((and (null ov) start (= bog start)))
+     ((get-text-property (point) 'wgrep-line-filename)
+      (let* ((header-end
+              (next-single-property-change (point) 'wgrep-line-filename nil eol))
+             (filename (get-text-property (point) 'wgrep-line-filename))
+             (linum (get-text-property (point) 'wgrep-line-number))
+             (value (buffer-substring-no-properties header-end eog))
+             contents-begin)
+        (goto-char header-end)
+        (setq contents-begin (point-marker))
+        ;; create editing overlay
+        (cond
+         ((null ov)
+          (let ((old (wgrep-get-old-text filename linum)))
+            (setq ov (wgrep-make-overlay bog eog))
+            (overlay-put ov 'wgrep-contents-begin contents-begin)
+            (overlay-put ov 'wgrep-filename filename)
+            (overlay-put ov 'wgrep-linum linum)
+            (overlay-put ov 'wgrep-changed t)
+            (overlay-put ov 'priority 0)
+            (overlay-put ov 'evaporate t)
+            (overlay-put ov 'wgrep-old-text old)))
+         (t
+          (move-overlay ov bog eog)))
+        (overlay-put ov 'wgrep-edit-text value))))
+    ov))
+
+(defun wgrep-after-change-function (beg end _leng-before)
+  (cond
+   (wgrep-inhibit-modification-hook nil)
+   ((= (point-min) (point-max))
+    ;; cleanup when first executing
+    (wgrep-cleanup-overlays (point-min) (point-max)))
+   (t
+    (wgrep-put-change-face beg end))))
+
+(defun wgrep-put-change-face (beg end)
+  (save-excursion
+    ;; `looking-at' may destroy match data while replace by regexp.
+    (save-match-data
+      (let ((ov (wgrep-editing-overlay beg end)))
+        ;; delete overlay if text is same as old value.
+        (cond
+         ;; not a valid point
+         ((null ov))
+         ((string= (overlay-get ov 'wgrep-old-text)
+                   (overlay-get ov 'wgrep-edit-text))
+          ;; back to unchanged
+          (delete-overlay ov))
+         (t
+          (overlay-put ov 'face 'wgrep-face)))))))
+
+;;;
+;;; Save grep buffer to file buffer/disk
+;;;
+
+(defun wgrep-display-physical-data ()
+  (cond
+   ;; `funcall' is a trick to suppress the elint warnings.
+   ((derived-mode-p 'image-mode)
+    ;; toggle to raw data if buffer has image.
+    (when (image-get-display-property)
+      (image-mode-as-text)))
+   (t nil)))
+
+(defun wgrep-set-result (ov face &optional message)
+  (overlay-put ov 'face face)
+  (overlay-put ov 'priority 1)
+  (overlay-put ov 'wgrep-reject-message message))
+
+(defun wgrep-put-done-result (ov)
+  (wgrep-set-result ov 'wgrep-done-face))
+
+(defun wgrep-put-reject-result (ov error-data)
+  (let ((message (mapconcat (lambda (x) (format "%s" x)) error-data " ")))
+    (wgrep-set-result ov 'wgrep-reject-face message)))
+
+(defun wgrep-put-reject-result-all (editor error-data)
+  (dolist (edit (cdr editor))
+    (let ((result (nth 3 edit)))
+      (wgrep-put-reject-result result error-data))))
+
+(defun wgrep-after-save-hook ()
+  (remove-hook 'after-save-hook 'wgrep-after-save-hook t)
+  (dolist (ov (wgrep-file-overlays))
+    (delete-overlay ov)))
+
+(defun wgrep-put-overlay-to-file-buffer (beg end)
+  "*Highlight the changes in the file"
+  (let ((ov
+         (catch 'done
+           (dolist (o (overlays-in beg end))
+             (when (overlay-get o 'wgrep)
+               (move-overlay o beg end)
+               (throw 'done o)))
+           (wgrep-make-overlay beg end))))
+    (overlay-put ov 'face 'wgrep-file-face)
+    (overlay-put ov 'priority 0)
+    (add-hook 'after-save-hook 'wgrep-after-save-hook nil t)
+    ov))
+
+(defun wgrep-let-destructive-overlay (ov)
+  (dolist (prop '(modification-hooks insert-in-front-hooks insert-behind-hooks))
+    (overlay-put
+     ov prop
+     `(,(lambda (ov after-p &rest _ignore)
+          (when after-p
+            (delete-overlay ov)))))))
+
+(defun wgrep-replace-to-new-line (new-text)
+  ;; delete grep extracted region (restricted to a line)
+  (delete-region (line-beginning-position) (line-end-position))
+  (let ((beg (point)))
+    (insert new-text)
+    (let* ((end (point))
+           ;; highlight the changed line
+           (ov (wgrep-put-overlay-to-file-buffer beg end)))
+      ;; make overlay volatile.
+      (wgrep-let-destructive-overlay ov))))
+
+(defun wgrep-flush-whole-line ()
+  (wgrep-put-overlay-to-file-buffer
+   (line-beginning-position) (line-end-position))
+  (wgrep-delete-whole-line))
+
+;; EDITOR ::= FILE (absolute-path) . EDITS
+;; EDITS ::= EDIT [...]
+;; EDIT ::= linum-or-marker old-text new-text result-overlay edit-field-overlay
+(defun wgrep-gather-editor ()
+  (let (res)
+    (dolist (edit-field (wgrep-edit-field-overlays))
+      (goto-char (overlay-start edit-field))
+      (forward-line 0)
+      (cond
+       ;; ignore removed line or removed overlay
+       ((eq (overlay-start edit-field) (overlay-end edit-field)))
+       ((get-text-property (point) 'wgrep-line-filename)
+        (let* ((name (get-text-property (point) 'wgrep-line-filename))
+               (linum (get-text-property (point) 'wgrep-line-number))
+               (start (next-single-property-change
+                       (point) 'wgrep-line-filename nil (line-end-position)))
+               (file (expand-file-name name default-directory))
+               (old (overlay-get edit-field 'wgrep-old-text))
+               (new (overlay-get edit-field 'wgrep-edit-text))
+               result)
+          ;; wgrep-result overlay show the committing of this editing
+          (catch 'done
+            (dolist (o (overlays-in (overlay-start edit-field) (overlay-end edit-field)))
+              (when (overlay-get o 'wgrep-result)
+                ;; get existing overlay
+                (setq result o)
+                (throw 'done t)))
+            ;; create overlay to show result of committing
+            (setq result (wgrep-make-overlay start (overlay-end edit-field)))
+            (overlay-put result 'wgrep-result t))
+          (setq res
+                (cons
+                 (list file (list linum old new result edit-field))
+                 res))))))
+    (nreverse res)))
+
+(defun wgrep-compute-transaction ()
+  (let ((editors (wgrep-gather-editor))
+        editor-group tran)
+    (dolist (editor editors)
+      (let* ((file (car editor))
+             (edits (cdr editor))
+             (editor-cache (assoc file editor-group)))
+        (unless editor-cache
+          (setq editor-cache (cons file nil))
+          (setq editor-group (cons editor-cache editor-group)))
+        ;; construct with current settings
+        (setcdr editor-cache (append (cdr editor-cache) edits))))
+    (setq editor-group (nreverse editor-group))
+
+    ;; Check file accessibility
+    (dolist (editor editor-group)
+      (let ((file (car editor)))
+        (condition-case err
+            (progn
+              (wgrep-check-file file)
+              (setq tran (cons editor tran)))
+          (wgrep-error
+           (wgrep-put-reject-result-all editor (cdr err))))))
+
+    (nreverse tran)))
+
+(defun wgrep-compute-linum-to-marker (edits)
+  ;; Convert linum to marker.
+  ;; When new text contains newline destroy linum access.
+  (dolist (edit edits)
+    (let ((linum (car edit)))
+      ;; get a marker
+      (wgrep-goto-line linum)
+      (setcar edit (point-marker)))))
+
+(defun wgrep-commit-edits (editor)
+  (let ((file (car editor))
+        (edits (cdr editor)))
+    (wgrep-compute-linum-to-marker edits)
+    (let ((done 0)
+          (first-result nil)
+          (inhibit-read-only wgrep-change-readonly-file))
+      (dolist (edit edits)
+        (let ((marker (nth 0 edit))
+              (old (nth 1 edit))
+              (new (nth 2 edit))
+              (result-ov (nth 3 edit))
+              (edit-ov (nth 4 edit)))
+          (condition-case err
+              (progn
+                (unless first-result
+                  (setq first-result result-ov))
+                (wgrep-apply-change marker old new)
+                (wgrep-put-done-result result-ov)
+                (delete-overlay edit-ov)
+                (setq done (1+ done)))
+            (error
+             (wgrep-put-reject-result result-ov (cdr err))))))
+      (cond
+       ((or (not wgrep-auto-apply-disk)
+            (= done 0)))
+       (buffer-file-name
+        (basic-save-buffer))
+       (t
+        (let ((coding-system-for-write buffer-file-coding-system))
+          (write-region (point-min) (point-max) file nil 'no-msg))))
+      (list done first-result))))
+
+(defun wgrep-commit-file (editor)
+  ;; Apply EDITOR to file/buffer. See `wgrep-compute-transaction'.
+  ;; Return succeeded count and first result overlay in *grep* buffer.
+  (let* ((file (car editor))
+         (open-buffer (get-file-buffer file))
+         (buffer
+          (cond
+           (open-buffer open-buffer)
+           (wgrep-auto-apply-disk
+            (let ((buf (generate-new-buffer "*TMP <wgrep>*")))
+              (with-current-buffer buf
+                ;; To detect coding-system and set `buffer-file-coding-system'.
+                (insert-file-contents file))
+              buf))
+           (t
+            (find-file-noselect file)))))
+    (unwind-protect
+        (with-current-buffer buffer
+          (save-restriction
+            (widen)
+            (wgrep-display-physical-data)
+
+            (cond
+             ((and (not wgrep-change-readonly-file)
+                   buffer-read-only)
+              (wgrep-put-reject-result-all
+               editor
+               (list (format "Buffer \"%s\" is read-only." (buffer-name))))
+              (list 0 nil))
+             (t
+              (wgrep-commit-edits editor)))))
+      (when wgrep-auto-apply-disk
+        (when (null open-buffer)
+          (kill-buffer buffer))))))
+
+(defun wgrep-apply-change (marker old new)
+  "The changes in the *grep* buffer are applied to the file.
+NEW may be nil this means deleting whole line."
+  (let ((coding buffer-file-coding-system))
+    (goto-char marker)
+    ;; check BOM
+    (when (and (= (point-min-marker) marker)
+               coding
+               (coding-system-get coding :bom))
+      (setq old (wgrep-string-replace-bom old coding))
+      (when new
+        (setq new (wgrep-string-replace-bom new coding))))
+    ;; Check buffer line was modified after execute grep.
+    (unless (string= old
+                     (buffer-substring-no-properties
+                      (line-beginning-position) (line-end-position)))
+      (signal 'wgrep-error (list "Buffer was changed after grep.")))
+    (cond
+     (new
+      (wgrep-replace-to-new-line new))
+     (t
+      ;; new nil means flush whole line.
+      (wgrep-flush-whole-line)))))
+
+;;;
+;;; UI
+;;;
+
+(defface wgrep-face
+  '((((class color)
+      (background dark))
+     (:background "SlateGray1" :foreground "Black"))
+    (((class color)
+      (background light))
+     (:background "ForestGreen" :foreground "white"))
+    (t
+     ()))
+  "*Face used for the changed text in the grep buffer."
+  :group 'wgrep)
+
+(defface wgrep-delete-face
+  '((((class color)
+      (background dark))
+     (:background "SlateGray1" :foreground "pink"))
+    (((class color)
+      (background light))
+     (:background "ForestGreen" :foreground "pink"))
+    (t
+     ()))
+  "*Face used for the deleted whole line in the grep buffer."
+  :group 'wgrep)
+
+(defface wgrep-file-face
+  '((((class color)
+      (background dark))
+     (:background "gray30" :foreground "white"))
+    (((class color)
+      (background light))
+     (:background "ForestGreen" :foreground "white"))
+    (t
+     ()))
+  "*Face used for the changed text in the file buffer."
+  :group 'wgrep)
+
+(defface wgrep-reject-face
+  '((((class color)
+      (background dark))
+     (:foreground "HotPink" :weight bold))
+    (((class color)
+      (background light))
+     (:foreground "Red" :weight bold))
+    (t
+     ()))
+  "*Face used for the line in the grep buffer that can not be applied to
+a file."
+  :group 'wgrep)
+
+(defface wgrep-done-face
+  '((((class color)
+      (background dark))
+     (:foreground "LightSkyBlue"))
+    (((class color)
+      (background light))
+     (:foreground "Blue"))
+    (t
+     ()))
+  "*Face used for the line in the grep buffer that can be applied to a file."
+  :group 'wgrep)
+
+(defun wgrep-maybe-echo-error-at-point ()
+  (when (null (current-message))
+    (let ((ov (catch 'found
+                (dolist (o (overlays-in (line-beginning-position)
+                                        (line-end-position)))
+                  (when (overlay-get o 'wgrep-reject-message)
+                    (throw 'found o))))))
+      (when ov
+        (let (message-log-max)
+          (message "%s" (overlay-get ov 'wgrep-reject-message)))))))
+
+;;;
+;;; Commands
+;;;
+
+(defun wgrep-finish-edit ()
+  "Apply changes to file buffers.
+These changes are not immediately saved to disk unless
+`wgrep-auto-save-buffer' is non-nil."
+  (interactive)
+  (let* ((tran (wgrep-compute-transaction))
+         (all-length (length tran))
+         (wgrep-auto-apply-disk nil)
+         (done 0))
+    (cond
+     (wgrep-auto-save-buffer
+      (setq wgrep-auto-apply-disk t))
+     ((> all-length wgrep-too-many-file-length)
+      (when (y-or-n-p (eval-when-compile
+                        (concat
+                         "Edited files are too many."
+                         " Apply the changes to disk with non-confirmation?")))
+        (setq wgrep-auto-apply-disk t))))
+    (while tran
+      (let* ((editor (car tran))
+             (committed (wgrep-commit-file editor))
+             (count (nth 0 committed))
+             (result (nth 1 committed)))
+        (when result
+          (goto-char (overlay-start result))
+          (forward-line 0))
+        (setq done (+ done count))
+        (setq tran (cdr tran))
+        (let (message-log-max)
+          (message "Writing %d files, %d files are left..."
+                   all-length (length tran)))
+        (redisplay t)))
+    (wgrep-cleanup-temp-buffer)
+    (wgrep-to-original-mode)
+    (let ((msg (format "(%d changed)" done))
+          (ovs (wgrep-edit-field-overlays)))
+      (cond
+       ((null ovs)
+        (if (= done 0)
+            (message "(No changes to be performed)")
+          (message "Successfully finished. %s" msg)))
+       ((= (length ovs) 1)
+        (message "There is an unapplied change. %s" msg))
+       (t
+        (message "There are %d unapplied changes. %s"
+                 (length ovs) msg))))))
+
+(defun wgrep-exit ()
+  "Return to original mode."
+  (interactive)
+  (if (and (buffer-modified-p)
+           (y-or-n-p (format "Buffer %s modified; save changes? "
+                             (current-buffer))))
+      (wgrep-finish-edit)
+    (wgrep-abort-changes)))
+
+(defun wgrep-abort-changes ()
+  "Discard all changes and return to original mode."
+  (interactive)
+  (wgrep-cleanup-overlays (point-min) (point-max))
+  (wgrep-restore-from-temp-buffer)
+  (wgrep-to-original-mode)
+  (message "Changes discarded"))
+
+(defun wgrep-remove-change (beg end)
+  "Remove changes in the region between BEG and END."
+  (interactive "r")
+  (wgrep-cleanup-overlays beg end)
+  (setq mark-active nil))
+
+(defun wgrep-remove-all-change ()
+  "Remove changes in the whole buffer."
+  (interactive)
+  (wgrep-cleanup-overlays (point-min) (point-max)))
+
+(defun wgrep-toggle-readonly-area ()
+  "Toggle read-only area to remove a whole line.
+
+See the following example: you obviously don't want to edit the first line.
+If grep matches a lot of lines, it's hard to edit the grep buffer.
+After toggling to editable, you can call
+`delete-matching-lines', `delete-non-matching-lines'.
+
+Example:
+----------------------------------------------
+./.svn/text-base/some.el.svn-base:87:(hoge)
+./some.el:87:(hoge)
+----------------------------------------------
+"
+  (interactive)
+  (let ((modified (buffer-modified-p))
+        (read-only (not wgrep-readonly-state)))
+    (wgrep-set-readonly-area read-only)
+    (wgrep-set-header&footer-read-only read-only)
+    (set-buffer-modified-p modified)
+    (if wgrep-readonly-state
+        (message "Removing the whole line is now disabled.")
+      (message "Removing the whole line is now enabled."))))
+
+(defun wgrep-change-to-wgrep-mode ()
+  "Change to wgrep mode.
+
+When the *grep* buffer is huge, this might freeze your Emacs
+for several minutes.
+"
+  (interactive)
+  (unless (wgrep-process-exited-p)
+    (error "Active process working"))
+  (wgrep-prepare-to-edit)
+  (wgrep-set-readonly-area t)
+  (set (make-local-variable 'query-replace-skip-read-only) t)
+  (add-hook 'after-change-functions 'wgrep-after-change-function nil t)
+  (add-hook 'post-command-hook 'wgrep-maybe-echo-error-at-point nil t)
+  (use-local-map wgrep-mode-map)
+  (buffer-disable-undo)
+  (wgrep-clone-to-temp-buffer)
+  (setq buffer-read-only nil)
+  (buffer-enable-undo)
+  ;; restore modified status
+  (set-buffer-modified-p (wgrep-edit-field-overlays))
+  (setq buffer-undo-list nil)
+  (message "%s" (substitute-command-keys
+                 "Press \\[wgrep-finish-edit] when finished \
+or \\[wgrep-abort-changes] to abort changes.")))
+
+(defun wgrep-save-all-buffers ()
+  "Save the buffers that wgrep changed."
+  (interactive)
+  (let ((count 0))
+    (dolist (b (buffer-list))
+      (with-current-buffer b
+        (let ((ovs (wgrep-file-overlays)))
+          (when (and ovs (buffer-modified-p))
+            (basic-save-buffer)
+            (setq count (1+ count))))))
+    (cond
+     ((= count 0)
+      (message "No buffer has been saved."))
+     ((= count 1)
+      (message "Buffer has been saved."))
+     (t
+      (message "%d buffers have been saved." count)))))
+
+(defun wgrep-mark-deletion ()
+  "Mark as delete to current line.
+This change will be applied when \\[wgrep-finish-edit]."
+  (interactive)
+  (save-excursion
+    (let ((ov (wgrep-editing-overlay)))
+      (unless ov
+        (error "Not a grep result"))
+      (condition-case nil
+          (progn
+            (overlay-put ov 'wgrep-edit-text nil)
+            (let ((wgrep-inhibit-modification-hook t)
+                  (begin (overlay-get ov 'wgrep-contents-begin))
+                  (end (overlay-end ov)))
+              (delete-region begin end)
+              (overlay-put ov 'face 'wgrep-delete-face)))
+        (error
+         (delete-overlay ov))))))
+
+(unless wgrep-mode-map
+  (let ((map (make-sparse-keymap)))
+
+    (define-key map "\C-c\C-c" 'wgrep-finish-edit)
+    (define-key map "\C-c\C-d" 'wgrep-mark-deletion)
+    (define-key map "\C-c\C-e" 'wgrep-finish-edit)
+    (define-key map "\C-c\C-p" 'wgrep-toggle-readonly-area)
+    (define-key map "\C-c\C-r" 'wgrep-remove-change)
+    (define-key map "\C-x\C-s" 'wgrep-finish-edit)
+    (define-key map "\C-c\C-u" 'wgrep-remove-all-change)
+    (define-key map "\C-c\C-k" 'wgrep-abort-changes)
+    (define-key map "\C-x\C-q" 'wgrep-exit)
+
+    (setq wgrep-mode-map map)))
+
+;;;
+;;; Entry point
+;;;
+
+(defun wgrep-setup-internal ()
+  (setq wgrep-original-mode-map (current-local-map))
+  (define-key wgrep-original-mode-map
+    wgrep-enable-key 'wgrep-change-to-wgrep-mode)
+  ;; delete previous wgrep overlays
+  (wgrep-cleanup-overlays (point-min) (point-max))
+  (remove-hook 'post-command-hook 'wgrep-maybe-echo-error-at-point t)
+  (run-hooks 'wgrep-setup-hook))
+
+;;;###autoload
+(defun wgrep-setup ()
+  "Setup wgrep preparation."
+  (cond
+   ((and (boundp 'grep-use-null-filename-separator)
+         grep-use-null-filename-separator
+         ;; FIXME: command may contain "--null" text in search text
+         ;; (e.g. grep -nH -e "searching --null argument")
+         ;; `grep-use-null-filename-separator' is non-nil
+         ;; enough to reduce that confusion.
+         (let ((command (car-safe compilation-arguments)))
+           (and (stringp command)
+                (string-match "[\s\t]--null[\s\t]" command))))
+    (set (make-local-variable 'wgrep-line-file-regexp)
+         wgrep-null-file-separator-header-regexp))
+   (t
+    (set (make-local-variable 'wgrep-line-file-regexp)
+         wgrep-colon-file-separator-header-regexp)))
+  (wgrep-setup-internal))
+
+;;;
+;;; activate/deactivate marmalade install or github install.
+;;;
+
+;;;###autoload
+(add-hook 'grep-setup-hook 'wgrep-setup)
+
+;; For `unload-feature'
+(defun wgrep-unload-function ()
+  (remove-hook 'grep-setup-hook 'wgrep-setup))
+
+(provide 'wgrep)
+
+;;; wgrep.el ends here
diff --git a/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep.elc b/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep.elc
new file mode 100644
index 0000000..29d5a0b
Binary files /dev/null and b/emacs/.emacs.d/elpa/wgrep-20230203.1214/wgrep.elc differ
diff --git a/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key-autoloads.el b/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key-autoloads.el
new file mode 100644
index 0000000..922f4d4
--- /dev/null
+++ b/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key-autoloads.el
@@ -0,0 +1,191 @@
+;;; which-key-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from which-key.el
+
+(defvar which-key-mode nil "\
+Non-nil if Which-Key mode is enabled.
+See the `which-key-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 `which-key-mode'.")
+(custom-autoload 'which-key-mode "which-key" nil)
+(autoload 'which-key-mode "which-key" "\
+Toggle `which-key-mode'.
+
+This is a global minor mode.  If called interactively, toggle the
+`Which-Key mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='which-key-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(autoload 'which-key-setup-side-window-right "which-key" "\
+Set up side-window on right." t)
+(autoload 'which-key-setup-side-window-right-bottom "which-key" "\
+Set up side-window on right if space allows.
+Otherwise, use bottom." t)
+(autoload 'which-key-setup-side-window-bottom "which-key" "\
+Set up side-window that opens on bottom." t)
+(autoload 'which-key-setup-minibuffer "which-key" "\
+Set up minibuffer display.
+Do not use this setup if you use the paging commands.  Instead use
+`which-key-setup-side-window-bottom', which is nearly identical
+but more functional." t)
+(autoload 'which-key-add-keymap-based-replacements "which-key" "\
+Replace the description of KEY using REPLACEMENT in KEYMAP.
+KEY should take a format suitable for use in `kbd'.  REPLACEMENT
+should be a cons cell of the form (STRING . COMMAND) for each
+REPLACEMENT, where STRING is the replacement string and COMMAND
+is a symbol corresponding to the intended command to be
+replaced.  COMMAND can be nil if the binding corresponds to a key
+prefix.  An example is
+
+(which-key-add-keymap-based-replacements global-map
+  \"C-x w\" \\='(\"Save as\" . write-file)).
+
+For backwards compatibility, REPLACEMENT can also be a string,
+but the above format is preferred, and the option to use a string
+for REPLACEMENT will eventually be removed.
+
+(fn KEYMAP KEY REPLACEMENT &rest MORE)")
+(function-put 'which-key-add-keymap-based-replacements 'lisp-indent-function 'defun)
+(autoload 'which-key-add-key-based-replacements "which-key" "\
+Replace the description of KEY-SEQUENCE with REPLACEMENT.
+KEY-SEQUENCE is a string suitable for use in `kbd'.
+REPLACEMENT may either be a string, as in
+
+(which-key-add-key-based-replacements \"C-x 1\" \"maximize\")
+
+a cons of two strings as in
+
+(which-key-add-key-based-replacements \"C-x 8\"
+                                        \\='(\"unicode\" . \"Unicode keys\"))
+
+or a function that takes a (KEY . BINDING) cons and returns a
+replacement.
+
+In the second case, the second string is used to provide a longer
+name for the keys under a prefix.
+
+MORE allows you to specifcy additional KEY REPLACEMENT pairs.  All
+replacements are added to `which-key-replacement-alist'.
+
+(fn KEY-SEQUENCE REPLACEMENT &rest MORE)")
+(autoload 'which-key-add-major-mode-key-based-replacements "which-key" "\
+Functions like `which-key-add-key-based-replacements'.
+The difference is that MODE specifies the `major-mode' that must
+be active for KEY-SEQUENCE and REPLACEMENT (MORE contains
+addition KEY-SEQUENCE REPLACEMENT pairs) to apply.
+
+(fn MODE KEY-SEQUENCE REPLACEMENT &rest MORE)")
+(function-put 'which-key-add-major-mode-key-based-replacements 'lisp-indent-function 'defun)
+(autoload 'which-key-reload-key-sequence "which-key" "\
+Simulate entering the key sequence KEY-SEQ.
+KEY-SEQ should be a list of events as produced by
+`listify-key-sequence'.  If nil, KEY-SEQ defaults to
+`which-key--current-key-list'.  Any prefix arguments that were
+used are reapplied to the new key sequence.
+
+(fn &optional KEY-SEQ)")
+(autoload 'which-key-show-standard-help "which-key" "\
+Call the command in `which-key--prefix-help-cmd-backup'.
+Usually this is `describe-prefix-bindings'.
+
+(fn &optional _)" t)
+(autoload 'which-key-show-next-page-no-cycle "which-key" "\
+Show next page of keys or `which-key-show-standard-help'." t)
+(autoload 'which-key-show-previous-page-no-cycle "which-key" "\
+Show previous page of keys if one exists." t)
+(autoload 'which-key-show-next-page-cycle "which-key" "\
+Show the next page of keys, cycling from end to beginning.
+
+(fn &optional _)" t)
+(autoload 'which-key-show-previous-page-cycle "which-key" "\
+Show the previous page of keys, cycling from beginning to end.
+
+(fn &optional _)" t)
+(autoload 'which-key-show-top-level "which-key" "\
+Show top-level bindings.
+
+(fn &optional _)" t)
+(autoload 'which-key-show-major-mode "which-key" "\
+Show top-level bindings in the map of the current major mode.
+This function will also detect evil bindings made using
+`evil-define-key' in this map.  These bindings will depend on the
+current evil state.
+
+(fn &optional ALL)" t)
+(autoload 'which-key-show-full-major-mode "which-key" "\
+Show all bindings in the map of the current major mode.
+This function will also detect evil bindings made using
+`evil-define-key' in this map.  These bindings will depend on the
+current evil state." t)
+(autoload 'which-key-dump-bindings "which-key" "\
+Dump bindings from PREFIX into buffer named BUFFER-NAME.
+PREFIX should be a string suitable for `kbd'.
+
+(fn PREFIX BUFFER-NAME)" t)
+(autoload 'which-key-undo-key "which-key" "\
+Undo last keypress and force which-key update.
+
+(fn &optional _)" t)
+(autoload 'which-key-C-h-dispatch "which-key" "\
+Dispatch \\`C-h' commands by looking up key in `which-key-C-h-map'.
+This command is always accessible (from any prefix) if
+`which-key-use-C-h-commands' is non nil." t)
+(autoload 'which-key-show-keymap "which-key" "\
+Show the top-level bindings in KEYMAP using which-key.
+KEYMAP is selected interactively from all available keymaps.
+
+If NO-PAGING is non-nil, which-key will not intercept subsequent
+keypresses for the paging functionality.
+
+(fn KEYMAP &optional NO-PAGING)" t)
+(autoload 'which-key-show-full-keymap "which-key" "\
+Show all bindings in KEYMAP using which-key.
+KEYMAP is selected interactively from all available keymaps.
+
+(fn KEYMAP)" t)
+(autoload 'which-key-show-minor-mode-keymap "which-key" "\
+Show the top-level bindings in KEYMAP using which-key.
+KEYMAP is selected interactively by mode in
+`minor-mode-map-alist'.
+
+(fn &optional ALL)" t)
+(autoload 'which-key-show-full-minor-mode-keymap "which-key" "\
+Show all bindings in KEYMAP using which-key.
+KEYMAP is selected interactively by mode in
+`minor-mode-map-alist'." t)
+(register-definition-prefixes "which-key" '("evil-state" "which-key-"))
+
+;;; End of scraped data
+
+(provide 'which-key-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; which-key-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key-pkg.el b/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key-pkg.el
new file mode 100644
index 0000000..d91bbac
--- /dev/null
+++ b/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key-pkg.el
@@ -0,0 +1,9 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "which-key" "20240620.2145"
+  "Display available keybindings in popup."
+  '((emacs "25.1"))
+  :url "https://github.com/justbur/emacs-which-key"
+  :commit "ed389312170df955aaf10c2e120cc533ed5c509e"
+  :revdesc "ed389312170d"
+  :authors '(("Justin Burkett" . "justin@burkett.cc"))
+  :maintainers '(("Justin Burkett" . "justin@burkett.cc")))
diff --git a/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key.el b/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key.el
new file mode 100644
index 0000000..36a117e
--- /dev/null
+++ b/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key.el
@@ -0,0 +1,2810 @@
+;;; which-key.el --- Display available keybindings in popup  -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2017-2024  Free Software Foundation, Inc.
+
+;; Author: Justin Burkett <justin@burkett.cc>
+;; Maintainer: Justin Burkett <justin@burkett.cc>
+;; Package-Version: 20240620.2145
+;; Package-Revision: ed389312170d
+;; Package-Requires: ((emacs "25.1"))
+
+;; This file is part of GNU Emacs.
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; The `which-key' mode displays the key bindings following your
+;; currently entered incomplete command (a prefix) in a popup.  For
+;; example, after enabling the minor mode if you enter C-x and wait for
+;; the default of 1 second the minibuffer will expand with all of the
+;; available key bindings that follow C-x (or as many as space allows
+;; given your settings).
+;;
+;; This includes prefixes like C-x 8 which are shown in a different
+;; face.
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'button)
+(require 'regexp-opt)
+
+;; For compiler
+(defvar evil-operator-shortcut-map)
+(defvar evil-operator-state-map)
+(defvar evil-motion-state-map)
+(defvar golden-ratio-mode)
+(declare-function evil-get-command-property "ext:evil-common.el")
+
+;;; Options
+
+(defgroup which-key nil
+  "Customization options for `which-key-mode'."
+  :group 'help
+  :prefix "which-key-")
+
+(defcustom which-key-idle-delay 1.0
+  "Delay (in seconds) for which-key buffer to popup.
+This variable should be set before activating `which-key-mode'.
+
+A value of zero might lead to issues, so a non-zero value is
+recommended
+(see https://github.com/justbur/emacs-which-key/issues/134)."
+  :type 'float
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-idle-secondary-delay nil
+  "Seconds to wait for which-key to pop up after initial display.
+This makes it possible to shorten the delay for subsequent popups
+in the same key sequence.  The default is for this value to be
+nil, which disables this behavior."
+  :type '(choice float (const :tag "Disabled" nil))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-echo-keystrokes (if (and echo-keystrokes
+                                              (> (+ echo-keystrokes 0.01)
+                                                 which-key-idle-delay))
+                                         (/ (float which-key-idle-delay) 4)
+                                       echo-keystrokes)
+  "Value to use for `echo-keystrokes'.
+This only applies if `which-key-popup-type' is minibuffer or
+`which-key-show-prefix' is echo.  It needs to be less than
+`which-key-idle-delay' or else the keystroke echo will erase the
+which-key popup."
+  :type 'float
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-max-description-length 27
+  "Truncate the description of keys to this length.
+Either nil (no truncation), an integer (truncate after that many
+characters), a float (use that fraction of the available width),
+or a function, which takes one argument, the available width in
+characters, and whose return value has one of the types mentioned
+before.  Truncation is done using `which-key-ellipsis'."
+  :type '(choice (const :tag "Disable truncation" nil)
+		 (integer :tag "Width in characters")
+		 (float :tag "Use fraction of available width")
+		 function)
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-min-column-description-width 0
+  "Every column should at least have this width."
+  :type 'natnum
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-add-column-padding 0
+  "Additional spaces to add to the left of each key column."
+  :type 'integer
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-unicode-correction 3
+  "Correction for wide unicode characters.
+Since we measure width in terms of the number of characters,
+Unicode characters that are wider than ASCII characters throw off
+the calculation for available width in the which-key buffer.  This
+variable allows you to adjust for the wide unicode characters by
+artificially reducing the available width in the buffer.
+
+The default of 3 means allow for the total extra width
+contributed by any wide unicode characters to be up to one
+additional ASCII character in the which-key buffer.  Increase this
+number if you are seeing characters get cutoff on the right side
+of the which-key popup."
+  :type 'integer
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-dont-use-unicode t
+  "If non-nil, don't use any unicode characters in default setup.
+For affected settings, see `which-key-replacement-alist', `which-key-ellipsis'
+`which-key-separator'."
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-separator
+  (if which-key-dont-use-unicode " : " " → ")
+  "Separator to use between key and description.
+Default is \" → \", unless `which-key-dont-use-unicode' is non
+nil, in which case the default is \" : \"."
+  :type 'string
+  :set-after '(which-key-dont-use-unicode)
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-ellipsis
+  (if which-key-dont-use-unicode ".." "…")
+  "Ellipsis to use when truncating.
+Default is \"…\", unless `which-key-dont-use-unicode' is non nil,
+in which case the default is \"..\".  This can also be the empty
+string to truncate without using any ellipsis."
+  :type 'string
+  :set-after '(which-key-dont-use-unicode)
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-prefix-prefix "+"
+  "Prefix string to indicate a key bound to a keymap.
+Default is \"+\"."
+  :type 'string
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-compute-remaps nil
+  "If non-nil, show remapped commands.
+This applies to commands that have been remapped given the
+currently active keymaps."
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-replacement-alist
+  `(((nil . "which-key-show-next-page-no-cycle") . (nil . "wk next pg"))
+    ,@(unless which-key-dont-use-unicode
+        '((("<left>") . ("←"))
+          (("<right>") . ("→"))))
+    (("<\\([[:alnum:]-]+\\)>") . ("\\1")))
+  "ALIST for manipulating display of binding descriptions.
+Each element of the list is a nested cons cell with the format
+
+\(MATCH CONS . REPLACEMENT\).
+
+The MATCH CONS determines when a replacement should occur and
+REPLACEMENT determines how the replacement should occur.  Each may
+have the format \(KEY REGEXP . BINDING REGEXP\).  For the
+replacement to apply the key binding must match both the KEY
+REGEXP and the BINDING REGEXP.  A value of nil in either position
+can be used to match every possibility.  The replacement is
+performed by using `replace-regexp-in-string' on the KEY REGEXP
+from the MATCH CONS and REPLACEMENT when it is a cons cell, and
+then similarly for the BINDING REGEXP.  A nil value in the BINDING
+REGEXP position cancels the replacement.  For example, the entry
+
+\(\(nil . \"Prefix Command\"\) . \(nil . \"prefix\"\)\)
+
+matches any binding with the descriptions \"Prefix Command\" and
+replaces the description with \"prefix\", ignoring the
+corresponding key.
+
+REPLACEMENT may also be a function taking a cons cell
+\(KEY . BINDING\) and producing a new corresponding cons cell.
+
+If REPLACEMENT is anything other than a cons cell \(and non nil\)
+the key binding is ignored by which-key.
+
+Finally, you can multiple replacements to occur for a given key
+binding by setting `which-key-allow-multiple-replacements' to a
+non-nil value."
+  :type '(alist :key-type (cons (choice regexp (const nil))
+                                (choice regexp (const nil)))
+                :value-type (cons (choice string (const nil))
+                                  (choice string (const nil))))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-allow-multiple-replacements nil
+  "Allow a key binding to be modified by multiple elements.
+When non-nil, this allows a single key binding to match multiple
+patterns in `which-key-replacement-alist'.  When nil, only the
+first match is used to perform replacements from
+`which-key-replacement-alist'."
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-show-docstrings nil
+  "If non-nil, show each command's docstring in the which-key popup.
+This will only display the docstring up to the first line
+break.  If you set this variable to the symbol docstring-only,
+then the command's name with be omitted.  You probably also want
+to adjust `which-key-max-description-length' at the same time if
+you use this feature."
+  :type '(radio
+          (const :tag "Do not show docstrings" nil)
+          (const :tag "Add docstring to command names" t)
+          (const :tag "Replace command name with docstring" docstring-only))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-highlighted-command-list '()
+  "Rules used to highlight certain commands.
+If the element is a string, assume it is a regexp pattern for
+matching command names and use
+`which-key-highlighted-command-face' for any matching names.  If
+the element is a cons cell, it should take the form (regexp .
+face to apply)."
+  :type  '(repeat (choice string (cons regexp face)))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-special-keys '()
+  "These keys will automatically be truncated to one character.
+They also have `which-key-special-key-face' applied to them.  This
+is disabled by default.  An example configuration is
+
+\(setq which-key-special-keys \\='(\"SPC\" \"TAB\" \"RET\" \"ESC\" \"DEL\")\)"
+  :type '(repeat string)
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-buffer-name " *which-key*"
+  "Name of which-key buffer."
+  :type 'string
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-show-prefix 'echo
+  "Whether to and where to display the current prefix sequence.
+Possible choices are echo for echo area (the default), left, top
+and nil.  nil turns the feature off."
+  :type '(radio (const :tag "Left of the keys" left)
+                (const :tag "In the first line" top)
+                (const :tag "In the last line" bottom)
+                (const :tag "In the echo area" echo)
+                (const :tag "In the mode-line" mode-line)
+                (const :tag "Hide" nil))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-popup-type 'side-window
+  "Supported types are minibuffer, side-window, frame, and custom."
+  :type '(radio (const :tag "Show in minibuffer" minibuffer)
+                (const :tag "Show in side window" side-window)
+                (const :tag "Show in popup frame" frame)
+                (const :tag "Use your custom display functions" custom))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-min-display-lines 1
+  "Minimum number of horizontal lines to display in the which-key buffer."
+  :type 'integer
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-max-display-columns nil
+  "Maximum number of columns to display in the which-key buffer.
+A value of nil means don't impose a maximum."
+  :type '(choice integer (const :tag "Unbounded" nil))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-side-window-location 'bottom
+  "Location of which-key popup when `which-key-popup-type' is side-window.
+Should be one of top, bottom, left or right.  You can also specify
+a list of two locations, like (right bottom).  In this case, the
+first location is tried.  If there is not enough room, the second
+location is tried."
+  :type '(radio (const right)
+                (const bottom)
+                (const left)
+                (const top)
+                (const (right bottom))
+                (const (bottom right)))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-side-window-slot 0
+  "The `slot' to use for `display-buffer-in-side-window'.
+This applies when `which-key-popup-type' is `side-window'.
+Quoting from the docstring of `display-buffer-in-side-window',
+
+`slot' if non-nil, specifies the window slot where to display
+BUFFER.  A value of zero or nil means use the middle slot on the
+specified side.  A negative value means use a slot
+preceding (that is, above or on the left of) the middle slot.  A
+positive value means use a slot following (that is, below or on
+the right of) the middle slot.  The default is zero."
+  :type 'integer
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-side-window-max-width 0.333
+  "Maximum width of which-key popup when type is side-window.
+This variable can also be a number between 0 and 1. In that case,
+it denotes a percentage out of the frame's width."
+  :type 'float
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-side-window-max-height 0.25
+  "Maximum height of which-key popup when type is side-window.
+This variable can also be a number between 0 and 1. In that case, it denotes
+a percentage out of the frame's height."
+  :type 'float
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-frame-max-width 60
+  "Maximum width of which-key popup when type is frame."
+  :type 'natnum
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-frame-max-height 20
+  "Maximum height of which-key popup when type is frame."
+  :type 'natnum
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-allow-imprecise-window-fit (not (display-graphic-p))
+  "Allow which-key to use a simpler method for resizing the popup.
+If you are noticing lag when the which-key popup displays turning
+this on may help.
+
+See https://github.com/justbur/emacs-which-key/issues/130
+and https://github.com/justbur/emacs-which-key/issues/225."
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-show-remaining-keys nil
+  "Show remaining keys in last slot, when keys are hidden."
+  :type '(radio (const :tag "Yes" t)
+                (const :tag "No" nil))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-sort-order #'which-key-key-order
+  "Order in which the key bindings are sorted.
+If nil, do not resort the output from `describe-buffer-bindings'
+which groups by mode.  Ordering options are:
+
+1. `which-key-key-order': by key (default)
+2. `which-key-key-order-alpha': by key using alphabetical order
+3. `which-key-description-order': by description
+4. `which-key-prefix-then-key-order': prefix (no prefix first) then key
+5. `which-key-local-then-key-order': local binding then key
+
+See the README and the docstrings for those functions for more
+information."
+  :type '(choice (function-item which-key-key-order)
+                 (function-item which-key-key-order-alpha)
+                 (function-item which-key-description-order)
+                 (function-item which-key-prefix-then-key-order)
+                 (function-item which-key-local-then-key-order))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-sort-uppercase-first t
+  "If non-nil, uppercase comes before lowercase in sorting.
+This applies to the function chosen in
+`which-key-sort-order'.  Otherwise, the order is reversed."
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-paging-prefixes '()
+  "Enable paging for these prefixes."
+  :type '(repeat string)
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-paging-key "<f5>"
+  "Key to use for changing pages.
+Bound after each of the prefixes in `which-key-paging-prefixes'"
+  :type 'string
+  :package-version "1.0" :version "30.1")
+
+;; (defcustom which-key-undo-key nil
+;;   "Key (string) to use for undoing keypresses. Bound recursively
+;; in each of the maps in `which-key-undo-keymaps'."
+;;   :group 'which-key
+;;   :type 'string)
+
+;; (defcustom which-key-undo-keymaps '()
+;;   "Keymaps in which to bind `which-key-undo-key'"
+;;   :group 'which-key
+;;   :type '(repeat symbol))
+
+(defcustom which-key-use-C-h-commands t
+  "Use \\`C-h' (`help-char') for paging if non-nil.
+Normally `help-char' after a prefix calls
+`describe-prefix-bindings'.  This changes that command to a
+which-key paging command when `which-key-mode' is active."
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-show-early-on-C-h nil
+  "Allow \\`C-h' (`help-char') to trigger which-key popup before timer.
+Show the which-key buffer if `help-char' is pressed in the middle
+of a prefix before the which-key buffer would normally be
+triggered by the time.  If combined with the following settings,
+which-key will effectively only show when triggered \"manually\"
+using \\`C-h'.
+
+\(setq `which-key-idle-delay' 10000)
+\(setq `which-key-idle-secondary-delay' 0.05)
+
+Note that `which-key-idle-delay' should be set before turning on
+`which-key-mode'."
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-preserve-window-configuration nil
+  "Save and restore window configuration around which-key popup display.
+If non-nil, save window configuration before which-key buffer is
+shown and restore it after which-key buffer is hidden.  It
+prevents which-key from changing window position of visible
+buffers.  Only takken into account when popup type is
+side-window."
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(defvar which-key-C-h-map-prompt
+  (concat " \\<which-key-C-h-map>"
+          " \\[which-key-show-next-page-cycle]"
+          which-key-separator "next-page,"
+          " \\[which-key-show-previous-page-cycle]"
+          which-key-separator "previous-page,"
+          " \\[which-key-undo-key]"
+          which-key-separator "undo-key,"
+          " \\[which-key-toggle-docstrings]"
+          which-key-separator "toggle-docstrings,"
+          " \\[which-key-show-standard-help]"
+          which-key-separator "help,"
+          " \\[which-key-abort]"
+          which-key-separator "abort"
+          " 1..9"
+          which-key-separator "digit-arg")
+  "Prompt to display when invoking `which-key-C-h-map'.
+This string is fed into `substitute-command-keys'")
+
+(defvar which-key-C-h-map
+  (let ((map (make-sparse-keymap)))
+    (dolist (bind `(("\C-a" . which-key-abort)
+                    ("a" . which-key-abort)
+                    ("\C-d" . which-key-toggle-docstrings)
+                    ("d" . which-key-toggle-docstrings)
+                    (,(vector help-char) . which-key-show-standard-help)
+                    ("h" . which-key-show-standard-help)
+                    ("\C-n" . which-key-show-next-page-cycle)
+                    ("n" . which-key-show-next-page-cycle)
+                    ("\C-p" . which-key-show-previous-page-cycle)
+                    ("p" . which-key-show-previous-page-cycle)
+                    ("\C-u" . which-key-undo-key)
+                    ("u" . which-key-undo-key)
+                    ("1" . which-key-digit-argument)
+                    ("2" . which-key-digit-argument)
+                    ("3" . which-key-digit-argument)
+                    ("4" . which-key-digit-argument)
+                    ("5" . which-key-digit-argument)
+                    ("6" . which-key-digit-argument)
+                    ("7" . which-key-digit-argument)
+                    ("8" . which-key-digit-argument)
+                    ("9" . which-key-digit-argument)))
+      (define-key map (car bind) (cdr bind)))
+    map)
+  "Keymap for \\`C-h' commands.")
+
+(defvar which-key--paging-functions
+  (list #'which-key-C-h-dispatch
+        #'which-key-turn-page
+        #'which-key-show-next-page-cycle
+        #'which-key-show-next-page-no-cycle
+        #'which-key-show-previous-page-cycle
+        #'which-key-show-previous-page-no-cycle
+        #'which-key-undo-key
+        #'which-key-undo))
+
+(defvar which-key-persistent-popup nil
+  "Whether or not to disable `which-key--hide-popup'.")
+
+(defcustom which-key-hide-alt-key-translations t
+  "Hide key translations using Alt key if non nil.
+These translations are not relevant most of the times since a lot
+of terminals issue META modifier for the Alt key.
+
+See Info node `(emacs)Modifier Keys'."
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-delay-functions nil
+  "List of functions that may delay the which-key popup.
+A list of functions that may decide whether to delay the
+which-key popup based on the current incomplete key
+sequence.  Each function in the list is run with two arguments,
+the current key sequence as produced by `key-description' and the
+length of the key sequence.  If the popup should be delayed based
+on that key sequence, the function should return the delay time
+in seconds.  Returning nil means no delay.  The first function in
+this list to return a value is the value that is used.
+
+The delay time is effectively added to the normal
+`which-key-idle-delay'."
+  :type '(repeat function)
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-allow-regexps nil
+  "A list of regexp strings to use to filter key sequences.
+When non-nil, for a key sequence to trigger the which-key popup
+it must match one of the regexps in this list.  The format of the
+key sequences is what is produced by `key-description'."
+  :type '(repeat regexp)
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-inhibit-regexps nil
+  "A list of regexp strings to use to filter key sequences.
+When non-nil, for a key sequence to trigger the which-key popup
+it cannot match one of the regexps in this list.  The format of
+the key sequences is what is produced by `key-description'."
+  :type '(repeat regexp)
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-show-transient-maps nil
+  "Show keymaps created by `set-transient-map' when applicable.
+
+More specifically, detect when `overriding-terminal-local-map' is
+set (this is the keymap used by `set-transient-map') and display
+it."
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(make-obsolete-variable
+ 'which-key-enable-extended-define-key
+ "which-key-enable-extended-define-key is obsolete and has no effect."
+ "2021-06-21")
+
+;; Hooks
+(defcustom which-key-init-buffer-hook '()
+  "Hook run when which-key buffer is initialized."
+  :type 'hook
+  :package-version "1.0" :version "30.1")
+
+;;;; Faces
+
+(defgroup which-key-faces nil
+  "Faces for `which-key-mode'."
+  :group 'which-key
+  :prefix "which-key-")
+
+(defface which-key-key-face
+  '((t . (:inherit font-lock-constant-face)))
+  "Face for which-key keys."
+  :group 'which-key-faces
+  :package-version "1.0" :version "30.1")
+
+(defface which-key-separator-face
+  '((t . (:inherit font-lock-comment-face)))
+  "Face for the separator (default separator is an arrow)."
+  :group 'which-key-faces
+  :package-version "1.0" :version "30.1")
+
+(defface which-key-note-face
+  '((t . (:inherit which-key-separator-face)))
+  "Face for notes or hints occasionally provided."
+  :group 'which-key-faces
+  :package-version "1.0" :version "30.1")
+
+(defface which-key-command-description-face
+  '((t . (:inherit font-lock-function-name-face)))
+  "Face for the key description when it is a command."
+  :group 'which-key-faces
+  :package-version "1.0" :version "30.1")
+
+(defface which-key-local-map-description-face
+  '((t . (:inherit which-key-command-description-face)))
+  "Face for the key description when it is found in `current-local-map'."
+  :group 'which-key-faces
+  :package-version "1.0" :version "30.1")
+
+(defface which-key-highlighted-command-face
+  '((t . (:inherit (which-key-command-description-face highlight))))
+  "Default face for highlighted command descriptions.
+A command is highlighted, when it matches a string in
+`which-key-highlighted-command-list'."
+  :group 'which-key-faces
+  :package-version "1.0" :version "30.1")
+
+(defface which-key-group-description-face
+  '((t . (:inherit font-lock-keyword-face)))
+  "Face for the key description when it is a group or prefix."
+  :group 'which-key-faces
+  :package-version "1.0" :version "30.1")
+
+(defface which-key-special-key-face
+  '((t . (:inherit which-key-key-face :inverse-video t :weight bold)))
+  "Face for special keys (\\`SPC', \\`TAB', \\`RET')."
+  :group 'which-key-faces
+  :package-version "1.0" :version "30.1")
+
+(defface which-key-docstring-face
+  '((t . (:inherit which-key-note-face)))
+  "Face for docstrings."
+  :group 'which-key-faces
+  :package-version "1.0" :version "30.1")
+
+;;;; Custom popup
+
+(defcustom which-key-custom-popup-max-dimensions-function nil
+  "Set a custom max-dimensions function.
+Will be passed the width of the active window and is expected to
+return the maximum height in lines and width in characters of the
+which-key popup in the form a cons cell (height . width)."
+  :group 'which-key
+  :type '(choice function (const nil))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-custom-hide-popup-function nil
+  "Set a custom hide-popup function.
+It takes no arguments and the return value is ignored."
+  :group 'which-key
+  :type '(choice function (const nil))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-custom-show-popup-function nil
+  "Set a custom show-popup function.
+Will be passed the required dimensions in the form (height .
+width) in lines and characters respectively.  The return value is
+ignored."
+  :group 'which-key
+  :type '(choice function (const nil))
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-lighter " WK"
+  "Minor mode lighter to use in the mode-line."
+  :group 'which-key
+  :type 'string
+  :package-version "1.0" :version "30.1")
+
+(defvar which-key-inhibit nil
+  "Prevent which-key from popping up momentarily.
+This can be used by setting this to a non-nil value for the
+execution of a command, as in
+
+\(let \(\(which-key-inhibit t\)\)
+...\)")
+
+(defcustom which-key-inhibit-display-hook nil
+  "Hook run before display of which-key popup.
+Each function in the hook is run before displaying the which-key
+popup.  If any function returns a non-nil value, the popup will
+not display."
+  :group 'which-key
+  :type 'hook
+  :package-version "1.0" :version "30.1")
+
+(defvar which-key-keymap-history nil
+  "History of keymap selections.
+Used in functions like `which-key-show-keymap'.")
+
+;;; Internal Vars
+
+(defvar which-key--buffer nil
+  "Holds reference to which-key buffer.")
+(defvar which-key--timer nil
+  "Holds reference to open window timer.")
+(defvar which-key--secondary-timer-active nil
+  "Non-nil if the secondary timer is active.")
+(defvar which-key--paging-timer nil
+  "Holds reference to timer for paging.")
+(defvar which-key--frame nil
+  "Holds reference to which-key frame.
+Used when `which-key-popup-type' is frame.")
+(defvar which-key--echo-keystrokes-backup nil
+  "Backup the initial value of `echo-keystrokes'.")
+(defvar which-key--prefix-help-cmd-backup nil
+  "Backup the value of `prefix-help-command'.")
+(defvar which-key--last-try-2-loc nil
+  "Last location of side-window when two locations used.")
+(defvar which-key--automatic-display nil
+  "Non-nil if popup was triggered with automatic update.")
+(defvar which-key--debug-buffer-name nil
+  "If non-nil, use this buffer for debug messages.")
+(defvar which-key--multiple-locations nil)
+(defvar which-key--inhibit-next-operator-popup nil)
+(defvar which-key--prior-show-keymap-args nil)
+(defvar which-key--previous-frame-size nil)
+(defvar which-key--prefix-title-alist nil)
+(defvar which-key--evil-keys-regexp (eval-when-compile
+                                      (regexp-opt '("-state"))))
+(defvar which-key--ignore-non-evil-keys-regexp
+  (regexp-opt '("mouse-" "wheel-" "remap" "drag-" "scroll-bar"
+                "select-window" "switch-frame" "which-key")))
+(defvar which-key--ignore-keys-regexp
+  (regexp-opt '("mouse-" "wheel-" "remap" "drag-" "scroll-bar"
+                "select-window" "switch-frame" "-state"
+                "which-key")))
+
+(defvar which-key--pages-obj nil)
+(cl-defstruct which-key--pages
+  pages
+  height
+  widths
+  keys/page
+  page-nums
+  num-pages
+  total-keys
+  prefix
+  prefix-title)
+
+(defvar which-key--saved-window-configuration nil)
+
+(defun which-key--rotate (list n)
+  (let* ((len (length list))
+         (n (- len (mod n len))))
+    (append (last list n) (butlast list n))))
+
+(defun which-key--pages-set-current-page (pages-obj n)
+  (setf (which-key--pages-pages pages-obj)
+        (which-key--rotate (which-key--pages-pages pages-obj) n))
+  (setf (which-key--pages-widths pages-obj)
+        (which-key--rotate (which-key--pages-widths pages-obj) n))
+  (setf (which-key--pages-keys/page pages-obj)
+        (which-key--rotate (which-key--pages-keys/page pages-obj) n))
+  (setf (which-key--pages-page-nums pages-obj)
+        (which-key--rotate (which-key--pages-page-nums pages-obj) n))
+  pages-obj)
+
+(defsubst which-key--on-first-page ()
+  (= (which-key--pages-page-nums which-key--pages-obj) 1))
+
+(defsubst which-key--on-last-page ()
+  (= (which-key--pages-page-nums which-key--pages-obj)
+     (which-key--pages-num-pages which-key--pages-obj)))
+
+(defsubst which-key--current-prefix ()
+  (and which-key--pages-obj
+       (which-key--pages-prefix which-key--pages-obj)))
+
+(defmacro which-key--debug-message (&rest msg)
+  `(when which-key--debug-buffer-name
+     (let ((buf (get-buffer-create which-key--debug-buffer-name))
+           (fmt-msg (format ,@msg)))
+       (with-current-buffer buf
+         (goto-char (point-max))
+         (insert "\n" fmt-msg "\n")))))
+
+(defsubst which-key--safe-lookup-key (keymap key)
+  "Version of `lookup-key' that allows KEYMAP to be nil.
+Also convert numeric results of `lookup-key' to nil.
+KEY is not checked."
+  (when (keymapp keymap)
+    (let ((result (lookup-key keymap key)))
+      (when (and result (not (numberp result)))
+        result))))
+
+(defsubst which-key--safe-lookup-key-description (keymap key)
+  "Version of `lookup-key' that allows KEYMAP to be nil.
+Also convert numeric results of `lookup-key' to nil.
+KEY should be formatted as an input for `kbd'."
+  (let ((key (ignore-errors (kbd key))))
+    (when (and key (keymapp keymap))
+      (let ((result (lookup-key keymap key)))
+        (when (and result (not (numberp result)))
+          result)))))
+
+;;; Third-party library support
+
+(defun which-key--this-command-keys ()
+  "Version of `this-single-command-keys' corrected for key-chords."
+  (let ((this-command-keys (this-single-command-keys)))
+    (when (and (vectorp this-command-keys)
+               (> (length this-command-keys) 0)
+               (eq (aref this-command-keys 0) 'key-chord)
+               (bound-and-true-p key-chord-mode))
+      (setq this-command-keys (this-single-command-raw-keys)))
+    this-command-keys))
+
+(defcustom which-key-this-command-keys-function #'which-key--this-command-keys
+  "Function used to retrieve current key sequence.
+The purpose of allowing this variable to be customized is to
+allow which-key to support packages that insert non-standard
+`keys' into the key sequence being read by Emacs."
+  :group 'which-key
+  :type 'function
+  :package-version "1.0" :version "30.1")
+
+
+;;;; Evil
+
+(defvar evil-state nil)
+
+(defcustom which-key-allow-evil-operators (boundp 'evil-this-operator)
+  "Allow popup to show for evil operators.
+The popup is normally inhibited in the middle of commands, but
+setting this to non-nil will override this behavior for evil
+operators."
+  :group 'which-key
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(defcustom which-key-show-operator-state-maps nil
+  "Show the keys following an evil command that reads a motion.
+These are commands typically mapped to keys such as \"y\", \"d\"
+and \"c\" from normal state. This is experimental, because there
+might be some valid keys missing and it might be showing some
+invalid keys."
+  :group 'which-key
+  :type 'boolean
+  :package-version "1.0" :version "30.1")
+
+(defun which-key-evil-this-operator-p ()
+  (and which-key-allow-evil-operators
+       (bound-and-true-p evil-this-operator)))
+
+(add-hook 'which-key-inhibit-display-hook
+          #'which-key-evil-this-operator-p)
+
+;;;; God-mode
+
+(defvar which-key--god-mode-support-enabled nil
+  "Support god-mode if non-nil.")
+
+(defvar which-key--god-mode-key-string nil
+  "String to use for god-mode support.")
+
+(defun which-key--god-mode-lookup-command-advice (orig-fun arg1 &rest args)
+  (setq which-key--god-mode-key-string arg1)
+  (unwind-protect
+      (apply orig-fun arg1 args)
+    (when (bound-and-true-p which-key-mode)
+      (which-key--hide-popup))))
+
+(defun which-key--god-mode-this-command-keys ()
+  "Version of `this-single-command-keys' corrected for god-mode."
+  (let ((this-command-keys (this-single-command-keys)))
+    (when (and which-key--god-mode-support-enabled
+               (bound-and-true-p god-local-mode)
+               (eq this-command 'god-mode-self-insert))
+      (setq this-command-keys (when which-key--god-mode-key-string
+                                (kbd which-key--god-mode-key-string))))
+    this-command-keys))
+
+(defun which-key-god-mode-self-insert-p ()
+  (and which-key--god-mode-support-enabled
+       (bound-and-true-p god-local-mode)
+       (eq this-command 'god-mode-self-insert)))
+
+(defun which-key-enable-god-mode-support (&optional disable)
+  "Enable support for god-mode if non-nil.
+This is experimental, so you need to explicitly opt-in for
+now.  Please report any problems at github.  If DISABLE is non-nil
+disable support."
+  (interactive "P")
+  (setq which-key--god-mode-support-enabled (null disable))
+  (if disable
+      (progn
+        (advice-remove 'god-mode-lookup-command
+                       #'which-key--god-mode-lookup-command-advice)
+        (remove-function which-key-this-command-keys-function
+                         #'which-key--god-mode-this-command-keys)
+        (remove-hook 'which-key-inhibit-display-hook
+                     #'which-key-god-mode-self-insert-p))
+    (advice-add 'god-mode-lookup-command :around
+                #'which-key--god-mode-lookup-command-advice)
+    (add-function :override which-key-this-command-keys-function
+                  #'which-key--god-mode-this-command-keys)
+    (add-hook 'which-key-inhibit-display-hook
+              #'which-key-god-mode-self-insert-p)))
+
+;;; Mode
+
+;;;###autoload
+(define-minor-mode which-key-mode
+  "Toggle `which-key-mode'."
+  :global t
+  :group 'which-key
+  :lighter which-key-lighter
+  :keymap (let ((map (make-sparse-keymap)))
+            (mapc
+             (lambda (prefix)
+               (define-key map
+                 (kbd (concat prefix " " which-key-paging-key))
+                 #'which-key-C-h-dispatch))
+             which-key-paging-prefixes)
+            map)
+  (if which-key-mode
+      (progn
+        (setq which-key--echo-keystrokes-backup echo-keystrokes)
+        (when (or (eq which-key-show-prefix 'echo)
+                  (eq which-key-popup-type 'minibuffer))
+          (which-key--setup-echo-keystrokes))
+        (unless (member prefix-help-command which-key--paging-functions)
+          (setq which-key--prefix-help-cmd-backup prefix-help-command))
+        (when (or which-key-use-C-h-commands
+                  which-key-show-early-on-C-h)
+          (setq prefix-help-command #'which-key-C-h-dispatch))
+        (when which-key-show-remaining-keys
+          (add-hook 'pre-command-hook #'which-key--lighter-restore))
+        (add-hook 'pre-command-hook #'which-key--hide-popup)
+        (add-hook 'window-size-change-functions
+                  #'which-key--hide-popup-on-frame-size-change)
+        (which-key--start-timer))
+    (setq echo-keystrokes which-key--echo-keystrokes-backup)
+    (when which-key--prefix-help-cmd-backup
+      (setq prefix-help-command which-key--prefix-help-cmd-backup))
+    (when which-key-show-remaining-keys
+      (remove-hook 'pre-command-hook #'which-key--lighter-restore))
+    (remove-hook 'pre-command-hook #'which-key--hide-popup)
+    (remove-hook 'window-size-change-functions
+                 #'which-key--hide-popup-on-frame-size-change)
+    (which-key--stop-timer)))
+
+(defun which-key--init-buffer ()
+  "Initialize which-key buffer."
+  (unless (buffer-live-p which-key--buffer)
+    (setq which-key--buffer (get-buffer-create which-key-buffer-name))
+    (with-current-buffer which-key--buffer
+      ;; suppress confusing minibuffer message
+      (let (message-log-max)
+        (toggle-truncate-lines 1)
+        (message ""))
+      (setq-local cursor-type nil)
+      (setq-local cursor-in-non-selected-windows nil)
+      (setq-local mode-line-format nil)
+      (setq-local header-line-format nil)
+      (setq-local word-wrap nil)
+      (setq-local show-trailing-whitespace nil)
+      (run-hooks 'which-key-init-buffer-hook))))
+
+(defun which-key--setup-echo-keystrokes ()
+  "Reduce `echo-keystrokes' if necessary.
+It will interfere if set too high."
+  (when (and echo-keystrokes
+             (> (abs (- echo-keystrokes which-key-echo-keystrokes)) 0.000001))
+    (if (> which-key-idle-delay which-key-echo-keystrokes)
+        (setq echo-keystrokes which-key-echo-keystrokes)
+      (setq which-key-echo-keystrokes (/ (float which-key-idle-delay) 4)
+            echo-keystrokes which-key-echo-keystrokes))))
+
+(defun which-key-remove-default-unicode-chars ()
+  "Remove default unicode chars from settings.
+Use of `which-key-dont-use-unicode' is preferred to this
+function, but it's included here in case someone cannot set that
+variable early enough in their configuration, if they are using a
+starter kit for example."
+  (when (string-equal which-key-separator " → ")
+    (setq which-key-separator " : ")))
+
+;;; Default configuration functions for use by users.
+
+;;;###autoload
+(defun which-key-setup-side-window-right ()
+  "Set up side-window on right."
+  (interactive)
+  (setq which-key-popup-type 'side-window
+        which-key-side-window-location 'right
+        which-key-show-prefix 'top))
+
+;;;###autoload
+(defun which-key-setup-side-window-right-bottom ()
+  "Set up side-window on right if space allows.
+Otherwise, use bottom."
+  (interactive)
+  (setq which-key-popup-type 'side-window
+        which-key-side-window-location '(right bottom)
+        which-key-show-prefix 'top))
+
+;;;###autoload
+(defun which-key-setup-side-window-bottom ()
+  "Set up side-window that opens on bottom."
+  (interactive)
+  (which-key--setup-echo-keystrokes)
+  (setq which-key-popup-type 'side-window
+        which-key-side-window-location 'bottom
+        which-key-show-prefix 'echo))
+
+;;;###autoload
+(defun which-key-setup-minibuffer ()
+  "Set up minibuffer display.
+Do not use this setup if you use the paging commands.  Instead use
+`which-key-setup-side-window-bottom', which is nearly identical
+but more functional."
+  (interactive)
+  (which-key--setup-echo-keystrokes)
+  (setq which-key-popup-type 'minibuffer
+        which-key-show-prefix 'left))
+
+;;; Helper functions to modify replacement lists.
+
+;;;###autoload
+(defun which-key-add-keymap-based-replacements (keymap key replacement &rest more)
+  "Replace the description of KEY using REPLACEMENT in KEYMAP.
+KEY should take a format suitable for use in `kbd'.  REPLACEMENT
+should be a cons cell of the form \(STRING . COMMAND\) for each
+REPLACEMENT, where STRING is the replacement string and COMMAND
+is a symbol corresponding to the intended command to be
+replaced.  COMMAND can be nil if the binding corresponds to a key
+prefix.  An example is
+
+\(which-key-add-keymap-based-replacements global-map
+  \"C-x w\" \\='\(\"Save as\" . write-file\)\).
+
+For backwards compatibility, REPLACEMENT can also be a string,
+but the above format is preferred, and the option to use a string
+for REPLACEMENT will eventually be removed."
+  (declare (indent defun))
+  (while key
+    (let ((def
+           (cond
+            ((consp replacement) replacement)
+            ((stringp replacement)
+             (cons replacement
+                   (or (which-key--safe-lookup-key-description keymap key)
+                       (make-sparse-keymap))))
+            (t
+             (user-error "Replacement is neither a cons cell or a string")))))
+      (define-key keymap (kbd key) def))
+    (setq key (pop more)
+          replacement (pop more))))
+
+;;;###autoload
+(defun which-key-add-key-based-replacements
+    (key-sequence replacement &rest more)
+  "Replace the description of KEY-SEQUENCE with REPLACEMENT.
+KEY-SEQUENCE is a string suitable for use in `kbd'.
+REPLACEMENT may either be a string, as in
+
+\(which-key-add-key-based-replacements \"C-x 1\" \"maximize\"\)
+
+a cons of two strings as in
+
+\(which-key-add-key-based-replacements \"C-x 8\"
+                                        \\='(\"unicode\" . \"Unicode keys\")\)
+
+or a function that takes a \(KEY . BINDING\) cons and returns a
+replacement.
+
+In the second case, the second string is used to provide a longer
+name for the keys under a prefix.
+
+MORE allows you to specifcy additional KEY REPLACEMENT pairs.  All
+replacements are added to `which-key-replacement-alist'."
+  ;; TODO: Make interactive
+  (while key-sequence
+    ;; normalize key sequences before adding
+    (let ((key-seq (key-description (kbd key-sequence)))
+          (replace (or (and (functionp replacement) replacement)
+                       (car-safe replacement)
+                       replacement)))
+      (push (cons (cons (concat "\\`" (regexp-quote key-seq) "\\'") nil)
+                  (if (functionp replace) replace (cons nil replace)))
+            which-key-replacement-alist)
+      (when (and (not (functionp replacement)) (consp replacement))
+        (push (cons key-seq (cdr-safe replacement))
+              which-key--prefix-title-alist)))
+    (setq key-sequence (pop more) replacement (pop more))))
+(put 'which-key-add-key-based-replacements 'lisp-indent-function 'defun)
+
+;;;###autoload
+(defun which-key-add-major-mode-key-based-replacements
+    (mode key-sequence replacement &rest more)
+  "Functions like `which-key-add-key-based-replacements'.
+The difference is that MODE specifies the `major-mode' that must
+be active for KEY-SEQUENCE and REPLACEMENT (MORE contains
+addition KEY-SEQUENCE REPLACEMENT pairs) to apply."
+  (declare (indent defun))
+  ;; TODO: Make interactive
+  (when (not (symbolp mode))
+    (error "`%S' should be a symbol corresponding to a value of major-mode" mode))
+  (let ((mode-alist
+         (or (cdr-safe (assq mode which-key-replacement-alist)) (list)))
+        (title-mode-alist
+         (or (cdr-safe (assq mode which-key--prefix-title-alist)) (list))))
+    (while key-sequence
+      ;; normalize key sequences before adding
+      (let ((key-seq (key-description (kbd key-sequence)))
+            (replace (or (and (functionp replacement) replacement)
+                         (car-safe replacement)
+                         replacement)))
+        (push (cons (cons (concat "\\`" (regexp-quote key-seq) "\\'") nil)
+                    (if (functionp replace) replace (cons nil replace)))
+              mode-alist)
+        (when (and (not (functionp replacement)) (consp replacement))
+          (push (cons key-seq (cdr-safe replacement))
+                title-mode-alist)))
+      (setq key-sequence (pop more) replacement (pop more)))
+    (if (assq mode which-key-replacement-alist)
+        (setcdr (assq mode which-key-replacement-alist) mode-alist)
+      (push (cons mode mode-alist) which-key-replacement-alist))
+    (if (assq mode which-key--prefix-title-alist)
+        (setcdr (assq mode which-key--prefix-title-alist) title-mode-alist)
+      (push (cons mode title-mode-alist) which-key--prefix-title-alist))))
+
+(defun which-key-define-key-recursively (map key def &optional at-root)
+  "Recursively bind KEY in MAP to DEF on every level of MAP except the first.
+If AT-ROOT is non-nil the binding is also placed at the root of MAP."
+  (when at-root (define-key map key def))
+  (map-keymap
+   (lambda (_ev df)
+     (when (keymapp df)
+       (which-key-define-key-recursively df key def t)))
+   map))
+
+;;; Functions for computing window sizes
+
+(defun which-key--text-width-to-total (text-width)
+  "Convert window TEXT-WIDTH to window total-width.
+TEXT-WIDTH is the desired text width of the window.  The function
+calculates what total width is required for a window in the
+selected to have a text-width of TEXT-WIDTH columns.  The
+calculation considers possible fringes and scroll bars.  This
+function assumes that the desired window has the same character
+width as the frame."
+  (let ((char-width (frame-char-width)))
+    (+ text-width
+       (/ (frame-fringe-width) char-width)
+       (/ (frame-scroll-bar-width) char-width)
+       (if (which-key--char-enlarged-p) 1 0)
+       ;; add padding to account for possible wide (unicode) characters
+       3)))
+
+(defun which-key--total-width-to-text (total-width)
+  "Convert window TOTAL-WIDTH to window text-width.
+TOTAL-WIDTH is the desired total width of the window.  The function calculates
+what text width fits such a window.  The calculation considers possible fringes
+and scroll bars.  This function assumes that the desired window has the same
+character width as the frame."
+  (let ((char-width (frame-char-width)))
+    (- total-width
+       (/ (frame-fringe-width) char-width)
+       (/ (frame-scroll-bar-width) char-width)
+       (if (which-key--char-enlarged-p) 1 0)
+       ;; add padding to account for possible wide (unicode) characters
+       3)))
+
+(defun which-key--char-enlarged-p (&optional _frame)
+  (> (frame-char-width)
+     (/ (float (frame-pixel-width)) (window-total-width (frame-root-window)))))
+
+(defun which-key--char-reduced-p (&optional _frame)
+  (< (frame-char-width)
+     (/ (float (frame-pixel-width)) (window-total-width (frame-root-window)))))
+
+(defun which-key--char-exact-p (&optional _frame)
+  (= (frame-char-width)
+     (/ (float (frame-pixel-width)) (window-total-width (frame-root-window)))))
+
+(defun which-key--width-or-percentage-to-width (width-or-percentage)
+  "Return window total width.
+If WIDTH-OR-PERCENTAGE is a whole number, return it unchanged.  Otherwise, it
+should be a percentage (a number between 0 and 1) out of the frame's width.
+More precisely, it should be a percentage out of the frame's root window's
+total width."
+  (if (natnump width-or-percentage)
+      width-or-percentage
+    (round (* width-or-percentage (window-total-width (frame-root-window))))))
+
+(defun which-key--height-or-percentage-to-height (height-or-percentage)
+  "Return window total height.
+If HEIGHT-OR-PERCENTAGE is a whole number, return it unchanged.  Otherwise, it
+should be a percentage (a number between 0 and 1) out of the frame's height.
+More precisely, it should be a percentage out of the frame's root window's
+total height."
+  (if (natnump height-or-percentage)
+      height-or-percentage
+    (round (* height-or-percentage (window-total-height (frame-root-window))))))
+
+(defun which-key--frame-size-changed-p ()
+  "Non-nil if a change in frame size is detected."
+  (let ((new-size (cons (frame-width) (frame-height))))
+    (cond ((null which-key--previous-frame-size)
+           (setq which-key--previous-frame-size new-size)
+           nil)
+          ((not (equal which-key--previous-frame-size new-size))
+           (setq which-key--previous-frame-size new-size)))))
+
+;;; Show/hide which-key buffer
+
+(defun which-key--hide-popup ()
+  "This function is called to hide the which-key buffer."
+  (unless (or which-key-persistent-popup
+              (member real-this-command which-key--paging-functions))
+    (setq which-key--last-try-2-loc nil)
+    (setq which-key--pages-obj nil)
+    (setq which-key--automatic-display nil)
+    (setq which-key--prior-show-keymap-args nil)
+    (when (and which-key-idle-secondary-delay which-key--secondary-timer-active)
+      (which-key--start-timer))
+    (which-key--lighter-restore)
+    (which-key--hide-popup-ignore-command)))
+
+(defun which-key--hide-popup-ignore-command ()
+  "`which-key--hide-popup' without the check of `real-this-command'."
+  (cl-case which-key-popup-type
+    ;; Not necessary to hide minibuffer
+    ;; (minibuffer (which-key--hide-buffer-minibuffer))
+    (side-window (which-key--hide-buffer-side-window))
+    (frame (which-key--hide-buffer-frame))
+    (custom (funcall which-key-custom-hide-popup-function))))
+
+(defun which-key--hide-popup-on-frame-size-change (&optional _)
+  "Hide which-key popup if the frame is resized (to trigger a new popup)."
+  (when (which-key--frame-size-changed-p)
+    (which-key--hide-popup)))
+
+(defun which-key--hide-buffer-side-window ()
+  "Hide which-key buffer when side-window popup is used."
+  (when (buffer-live-p which-key--buffer)
+    ;; in case which-key buffer was shown in an existing window, `quit-window'
+    ;; will re-show the previous buffer, instead of closing the window
+    (quit-windows-on which-key--buffer)
+    (when (and which-key-preserve-window-configuration
+               which-key--saved-window-configuration)
+      (set-window-configuration which-key--saved-window-configuration)
+      (setq which-key--saved-window-configuration nil))))
+
+(defun which-key--hide-buffer-frame ()
+  "Hide which-key buffer when frame popup is used."
+  (when (frame-live-p which-key--frame)
+    (delete-frame which-key--frame)))
+
+(defun which-key--popup-showing-p ()
+  (and (bufferp which-key--buffer)
+       (or (window-live-p (get-buffer-window which-key--buffer))
+           (let ((window (get-buffer-window which-key--buffer t)))
+             (and (window-live-p window)
+                  (frame-visible-p (window-frame window)))))))
+
+(defun which-key--show-popup (act-popup-dim)
+  "Show the which-key buffer.
+ACT-POPUP-DIM includes the dimensions, (height . width) of the
+buffer text to be displayed in the popup.  Return nil if no window
+is shown, or if there is no need to start the closing timer."
+  (when (and (> (car act-popup-dim) 0)
+             (> (cdr act-popup-dim) 0))
+    (cl-case which-key-popup-type
+      ;; Not called for minibuffer
+      ;; (minibuffer (which-key--show-buffer-minibuffer act-popup-dim))
+      (side-window (which-key--show-buffer-side-window act-popup-dim))
+      (frame (which-key--show-buffer-frame act-popup-dim))
+      (custom (funcall which-key-custom-show-popup-function act-popup-dim)))))
+
+(defun which-key--fit-buffer-to-window-horizontally
+    (&optional window &rest params)
+  "Slightly modified version of `fit-buffer-to-window'.
+Use &rest params because `fit-buffer-to-window' has a different
+call signature in different Emacs versions"
+  (let ((fit-window-to-buffer-horizontally t)
+        (window-min-height 1))
+    (apply #'fit-window-to-buffer window params)))
+
+(defun which-key--show-buffer-side-window (act-popup-dim)
+  "Show which-key buffer when popup type is side-window."
+  (when (and which-key-preserve-window-configuration
+             (not which-key--saved-window-configuration))
+    (setq which-key--saved-window-configuration (current-window-configuration)))
+  (let* ((height (car act-popup-dim))
+         (width (cdr act-popup-dim))
+         (alist
+          (if which-key-allow-imprecise-window-fit
+              `((window-width .  ,(which-key--text-width-to-total width))
+                (window-height . ,height)
+                (side . ,which-key-side-window-location)
+                (slot . ,which-key-side-window-slot))
+            `((window-width . which-key--fit-buffer-to-window-horizontally)
+              (window-height . (lambda (w) (fit-window-to-buffer w nil 1)))
+              (side . ,which-key-side-window-location)
+              (slot . ,which-key-side-window-slot)))))
+    (which-key--debug-message "Allow imprecise fit: %s
+Display window alist: %s"
+                              which-key-allow-imprecise-window-fit
+                              alist)
+    ;; Previously used `display-buffer-in-major-side-window' here, but
+    ;; apparently that is meant to be an internal function. See emacs bug #24828
+    ;; and advice given there.
+    (cond
+     ((eq which-key--multiple-locations t)
+      ;; possibly want to switch sides in this case so we can't reuse the window
+      (delete-windows-on which-key--buffer)
+      (display-buffer-in-side-window which-key--buffer alist))
+     ((get-buffer-window which-key--buffer)
+      (display-buffer-reuse-window which-key--buffer alist))
+     (t
+      (display-buffer-in-side-window which-key--buffer alist)))))
+
+(defun which-key--show-buffer-frame (act-popup-dim)
+  "Show which-key buffer when popup type is frame."
+  (let* (;(orig-window (selected-window))
+         (frame-height (+ (car act-popup-dim)
+                          (if (with-current-buffer which-key--buffer
+                                mode-line-format)
+                              1
+                            0)))
+         ;; without adding 2, frame sometimes isn't wide enough for the buffer.
+         ;; this is probably because of the fringes. however, setting fringes
+         ;; sizes to 0 (instead of adding 2) didn't always make the frame wide
+         ;; enough. don't know why it is so.
+         (frame-width (+ (cdr act-popup-dim) 2))
+         (new-window (if (and (frame-live-p which-key--frame)
+                              (eq which-key--buffer
+                                  (window-buffer
+                                   (frame-root-window which-key--frame))))
+                         (which-key--show-buffer-reuse-frame
+                          frame-height frame-width)
+                       (which-key--show-buffer-new-frame
+                        frame-height frame-width))))
+    (when new-window
+      ;; display successful
+      (setq which-key--frame (window-frame new-window))
+      new-window)))
+
+(defun which-key--show-buffer-new-frame (frame-height frame-width)
+  "Helper for `which-key--show-buffer-frame'."
+  (let* ((frame-params `((height . ,frame-height)
+                         (width . ,frame-width)
+                         ;; tell the window manager to respect the given sizes
+                         (user-size . t)
+                         ;; which-key frame doesn't need a minibuffer
+                         (minibuffer . nil)
+                         (name . "which-key")
+                         ;; no need for scroll bars in which-key frame
+                         (vertical-scroll-bars . nil)
+                         ;; (left-fringe . 0)
+                         ;; (right-fringe . 0)
+                         ;; (right-divider-width . 0)
+                         ;; make sure frame is visible
+                         (visibility . t)))
+         (alist `((pop-up-frame-parameters . ,frame-params)))
+         (orig-frame (selected-frame))
+         (new-window (display-buffer-pop-up-frame which-key--buffer alist)))
+    (when new-window
+      ;; display successful
+      (redirect-frame-focus (window-frame new-window) orig-frame)
+      new-window)))
+
+(defun which-key--show-buffer-reuse-frame (frame-height frame-width)
+  "Helper for `which-key--show-buffer-frame'."
+  (let ((window
+         (display-buffer-reuse-window
+          which-key--buffer `((reusable-frames . ,which-key--frame)))))
+    (when window
+      ;; display successful
+      (set-frame-size (window-frame window) frame-width frame-height)
+      window)))
+
+;;; Max dimension of available window functions
+
+(defun which-key--popup-max-dimensions ()
+  "Return maximum dimension available for popup.
+Dimension functions should return the maximum possible (height
+. width) of the intended popup.  SELECTED-WINDOW-WIDTH is the
+width of currently active window, not the which-key buffer
+window."
+  (cl-ecase which-key-popup-type
+    (minibuffer (which-key--minibuffer-max-dimensions))
+    (side-window (which-key--side-window-max-dimensions))
+    (frame (which-key--frame-max-dimensions))
+    (custom (funcall which-key-custom-popup-max-dimensions-function
+                     (window-width)))))
+
+(defun which-key--minibuffer-max-dimensions ()
+  "Return max-dimensions of minibuffer (height . width).
+Measured in lines and characters respectively."
+  (cons
+   ;; height
+   (if (floatp max-mini-window-height)
+       (floor (* (frame-text-lines)
+                 max-mini-window-height))
+     max-mini-window-height)
+   ;; width
+   (max 0 (- (frame-text-cols) which-key-unicode-correction))))
+
+(defun which-key--side-window-max-dimensions ()
+  "Return max-dimensions of the side-window popup.
+The return value should be (height . width) in lines and
+characters respectively."
+  (cons
+   ;; height
+   (if (member which-key-side-window-location '(left right))
+       ;; 1 is a kludge to make sure there is no overlap
+       (- (frame-height) (window-text-height (minibuffer-window)) 1)
+     ;; (window-mode-line-height which-key--window))
+     ;; FIXME: change to something like
+     ;; (min which-*-height (calculate-max-height))
+     (which-key--height-or-percentage-to-height
+      which-key-side-window-max-height))
+   ;; width
+   (max 0
+        (- (if (memq which-key-side-window-location '(left right))
+               (which-key--total-width-to-text
+                (which-key--width-or-percentage-to-width
+                 which-key-side-window-max-width))
+             (which-key--total-width-to-text
+              (which-key--width-or-percentage-to-width
+               1.0)))
+           which-key-unicode-correction))))
+
+(defun which-key--frame-max-dimensions ()
+  "Return max-dimensions of the frame popup.
+The return value should be (height . width) in lines and
+characters respectively."
+  (cons which-key-frame-max-height which-key-frame-max-width))
+
+;;; Sorting functions
+
+(defun which-key--string< (a b &optional alpha)
+  (let ((da (downcase a))
+        (db (downcase b)))
+    (cond
+     ((and alpha (not which-key-sort-uppercase-first))
+      (if (string-equal da db)
+          (not (string-lessp a b))
+        (string-lessp da db)))
+     ((and alpha which-key-sort-uppercase-first)
+      (if (string-equal da db)
+          (string-lessp a b)
+        (string-lessp da db)))
+     ((not which-key-sort-uppercase-first)
+      (let ((aup (not (string-equal da a)))
+            (bup (not (string-equal db b))))
+        (if (eq aup bup)
+            (string-lessp a b)
+          bup)))
+     (t (string-lessp a b)))))
+
+(defun which-key--key-description< (a b &optional alpha)
+  "Key sorting function.
+Used for `which-key-key-order' and `which-key-key-order-alpha'."
+  (save-match-data
+    (let* ((a (which-key--extract-key a))
+           (b (which-key--extract-key b))
+           (rngrgxp "^\\([^ ]+\\) \\.\\. [^ ]+")
+           (a (if (string-match rngrgxp a) (match-string 1 a) a))
+           (b (if (string-match rngrgxp b) (match-string 1 b) b))
+           (aem? (string-equal a ""))
+           (bem? (string-equal b ""))
+           (a1? (= 1 (length a)))
+           (b1? (= 1 (length b)))
+           (srgxp "^\\(RET\\|SPC\\|TAB\\|DEL\\|LFD\\|ESC\\|NUL\\)")
+           (asp? (string-match-p srgxp a))
+           (bsp? (string-match-p srgxp b))
+           (prrgxp "^\\(M\\|C\\|S\\|A\\|H\\|s\\)-")
+           (apr? (string-match-p prrgxp a))
+           (bpr? (string-match-p prrgxp b))
+           (afn? (string-match-p "<f[0-9]+>" a))
+           (bfn? (string-match-p "<f[0-9]+>" b)))
+      (cond ((or aem? bem?) (and aem? (not bem?)))
+            ((and asp? bsp?)
+             (if (string-equal (substring a 0 3) (substring b 0 3))
+                 (which-key--key-description<
+                  (substring a 3) (substring b 3) alpha)
+               (which-key--string< a b alpha)))
+            ((or asp? bsp?) asp?)
+            ((and a1? b1?) (which-key--string< a b alpha))
+            ((or a1? b1?) a1?)
+            ((and afn? bfn?)
+             (< (string-to-number
+                 (replace-regexp-in-string "<f\\([0-9]+\\)>" "\\1" a))
+                (string-to-number
+                 (replace-regexp-in-string "<f\\([0-9]+\\)>" "\\1" b))))
+            ((or afn? bfn?) afn?)
+            ((and apr? bpr?)
+             (if (string-equal (substring a 0 2) (substring b 0 2))
+                 (which-key--key-description<
+                  (substring a 2) (substring b 2) alpha)
+               (which-key--string< a b alpha)))
+            ((or apr? bpr?) apr?)
+            (t (which-key--string< a b alpha))))))
+
+(defsubst which-key-key-order-alpha (acons bcons)
+  "Order key descriptions A and B.
+Order is lexicographic within a \"class\", where the classes and
+the ordering of classes are listed below.
+
+special (SPC,TAB,...) < single char < mod (C-,M-,...) < other.
+Sorts single characters alphabetically with lowercase coming
+before upper."
+  (which-key--key-description< (car acons) (car bcons) t))
+
+(defsubst which-key-key-order (acons bcons)
+  "Order key descriptions A and B.
+Order is lexicographic within a \"class\", where the classes and
+the ordering of classes are listed below.
+
+special (SPC,TAB,...) < single char < mod (C-,M-,...) < other."
+  (which-key--key-description< (car acons) (car bcons)))
+
+(defsubst which-key-description-order (acons bcons)
+  "Order descriptions of A and B.
+Uses `string-lessp' after applying lowercase."
+  (string-lessp (downcase (cdr acons)) (downcase (cdr bcons))))
+
+(defsubst which-key--group-p (description)
+  (or (string-equal description "prefix")
+      (string-match-p "^group:" description)
+      (keymapp (intern description))))
+
+(defun which-key-prefix-then-key-order (acons bcons)
+  "Order prefixes before non-prefixes.
+Within these categories order using `which-key-key-order'."
+  (let ((apref? (which-key--group-p (cdr acons)))
+        (bpref? (which-key--group-p (cdr bcons))))
+    (if (not (eq apref? bpref?))
+        (and (not apref?) bpref?)
+      (which-key-key-order acons bcons))))
+
+(defun which-key-prefix-then-key-order-reverse (acons bcons)
+  "Order prefixes before non-prefixes.
+Within these categories order using `which-key-key-order'."
+  (let ((apref? (which-key--group-p (cdr acons)))
+        (bpref? (which-key--group-p (cdr bcons))))
+    (if (not (eq apref? bpref?))
+        (and apref? (not bpref?))
+      (which-key-key-order acons bcons))))
+
+(defun which-key-local-then-key-order (acons bcons)
+  "Order local bindings before non-local ones.
+Within these categories order using `which-key-key-order'."
+  (let ((aloc? (which-key--local-binding-p acons))
+        (bloc? (which-key--local-binding-p bcons)))
+    (if (not (eq aloc? bloc?))
+        (and aloc? (not bloc?))
+      (which-key-key-order acons bcons))))
+
+;;; Functions for retrieving and formatting keys
+
+(defsubst which-key--string-width (maybe-string)
+  "If MAYBE-STRING is a string use `which-key--string-width' o/w return 0."
+  (if (stringp maybe-string) (string-width maybe-string) 0))
+
+(defsubst which-key--butlast-string (str)
+  (string-join (butlast (split-string str)) " "))
+
+(defun which-key--match-replacement (key-binding replacement)
+  ;; these are mode specific ones to ignore. The mode specific case is
+  ;; handled in the selection of alist
+  (when (and (consp key-binding) (not (symbolp (car replacement))))
+    (let ((key-regexp (caar replacement))
+          (binding-regexp (cdar replacement))
+          (case-fold-search nil))
+      (and (or (null key-regexp)
+               (string-match-p key-regexp
+                               (car key-binding)))
+           (or (null binding-regexp)
+               (string-match-p binding-regexp
+                               (cdr key-binding)))))))
+
+(defsubst which-key--replace-in-binding (key-binding repl)
+  (cond ((or (not (consp repl)) (null (cdr repl)))
+         key-binding)
+        ((functionp (cdr repl))
+         (funcall (cdr repl) key-binding))
+        ((consp (cdr repl))
+         (cons
+          (cond ((and (caar repl) (cadr repl))
+                 (replace-regexp-in-string
+                  (caar repl) (cadr repl) (car key-binding) t))
+                ((cadr repl) (cadr repl))
+                (t (car key-binding)))
+          (cond ((and (cdar repl) (cddr repl))
+                 (replace-regexp-in-string
+                  (cdar repl) (cddr repl) (cdr key-binding) t))
+                ((cddr repl) (cddr repl))
+                (t (cdr key-binding)))))))
+
+(defun which-key--replace-in-repl-list-once (key-binding repls)
+  (cl-dolist (repl repls)
+    (when (which-key--match-replacement key-binding repl)
+      (cl-return `(replaced . ,(which-key--replace-in-binding key-binding repl))))))
+
+(defun which-key--replace-in-repl-list-many (key-binding repls)
+  (let (found)
+    (dolist (repl repls)
+      (when (which-key--match-replacement key-binding repl)
+        (setq found t)
+        (setq key-binding (which-key--replace-in-binding key-binding repl))))
+    (when found `(replaced . ,key-binding))))
+
+(defun which-key--maybe-replace (key-binding)
+  "Use `which-key--replacement-alist' to maybe replace KEY-BINDING.
+KEY-BINDING is a cons cell of the form \(KEY . BINDING\) each of
+which are strings.  KEY is of the form produced by `key-binding'."
+  (let* ((replacer (if which-key-allow-multiple-replacements
+                       #'which-key--replace-in-repl-list-many
+                     #'which-key--replace-in-repl-list-once)))
+    (pcase
+        (apply replacer
+               (list key-binding
+                     (cdr-safe (assq major-mode which-key-replacement-alist))))
+      (`(replaced . ,repl)
+       (if which-key-allow-multiple-replacements
+           (pcase (apply replacer (list repl which-key-replacement-alist))
+             (`(replaced . ,repl) repl)
+             ('() repl))
+         repl))
+      ('()
+       (pcase (apply replacer (list key-binding which-key-replacement-alist))
+         (`(replaced . ,repl) repl)
+         ('() key-binding))))))
+
+(defsubst which-key--current-key-list (&optional key-str)
+  (append (listify-key-sequence (which-key--current-prefix))
+          (when key-str
+            (listify-key-sequence (kbd key-str)))))
+
+(defsubst which-key--current-key-string (&optional key-str)
+  (key-description (which-key--current-key-list key-str)))
+
+(defun which-key--local-binding-p (keydesc)
+  (eq (which-key--safe-lookup-key-description
+       (current-local-map)
+       (which-key--current-key-string (car keydesc)))
+      (intern (cdr keydesc))))
+
+(defun which-key--map-binding-p (map keydesc)
+  "Does MAP contain KEYDESC = (key . binding)?"
+  (or
+   (when (bound-and-true-p evil-state)
+     (let ((lookup
+            (which-key--safe-lookup-key-description
+             map
+             (which-key--current-key-string
+              (format "<%s-state> %s" evil-state (car keydesc))))))
+       (or (eq lookup (intern (cdr keydesc)))
+           (and (keymapp lookup) (string= (cdr keydesc) "Prefix Command")))))
+   (let ((lookup
+          (which-key--safe-lookup-key-description
+           map (which-key--current-key-string (car keydesc)))))
+     (or (eq lookup (intern (cdr keydesc)))
+         (and (keymapp lookup) (string= (cdr keydesc) "Prefix Command"))))))
+
+(defun which-key--maybe-get-prefix-title (keys)
+  "KEYS is a string produced by `key-description'.
+A title is possibly returned using
+`which-key--prefix-title-alist'.  An empty string is returned if
+no title exists."
+  (cond
+   ((not (string-equal keys ""))
+    (let* ((title-res
+            (cdr-safe (assoc-string keys which-key--prefix-title-alist)))
+           (repl-res
+            (cdr-safe (which-key--maybe-replace (cons keys ""))))
+           (binding (key-binding (kbd keys)))
+           (alternate (when (and binding (symbolp binding))
+                        (symbol-name binding))))
+      (cond (title-res title-res)
+            ((not (string-empty-p repl-res)) repl-res)
+            ((and (eq which-key-show-prefix 'echo) alternate)
+             alternate)
+            ((and (member which-key-show-prefix '(bottom top mode-line))
+                  (eq which-key-side-window-location 'bottom)
+                  echo-keystrokes)
+             (if alternate alternate
+               (concat "Following " keys)))
+            (t ""))))
+   (t "")))
+
+(defun which-key--propertize (string &rest properties)
+  "Version of `propertize' that checks type of STRING."
+  (when (stringp string)
+    (apply #'propertize string properties)))
+
+(defun which-key--propertize-key (key)
+  "Add a face to KEY.
+If KEY contains any \"special keys\" defined in
+`which-key-special-keys' then truncate and add the corresponding
+`which-key-special-key-face'."
+  (let ((key-w-face (which-key--propertize key 'face 'which-key-key-face))
+        (regexp (concat "\\("
+                        (mapconcat #'identity which-key-special-keys
+                                   "\\|")
+                        "\\)"))
+        (case-fold-search nil))
+    (save-match-data
+      (if (and which-key-special-keys
+               (string-match regexp key))
+          (let ((beg (match-beginning 0)) (end (match-end 0)))
+            (concat (substring key-w-face 0 beg)
+                    (which-key--propertize (substring key-w-face beg (1+ beg))
+                                           'face 'which-key-special-key-face)
+                    (substring key-w-face end
+                               (which-key--string-width key-w-face))))
+        key-w-face))))
+
+(defsubst which-key--truncate-description (desc avl-width)
+  "Truncate DESC description to `which-key-max-description-length'."
+  (let* ((max which-key-max-description-length)
+         (max (cl-etypecase max
+                (null nil)
+                (integer max)
+                (float (truncate (* max avl-width)))
+                (function (let ((val (funcall max avl-width)))
+                            (if (floatp val) (truncate val) val))))))
+    (if (and max (> (length desc) max))
+        (let ((dots (and (not (equal which-key-ellipsis ""))
+                         (which-key--propertize
+                          which-key-ellipsis 'face
+                          (get-text-property (1- (length desc)) 'face desc)))))
+          (if dots
+              (concat (substring desc 0 (- max (length dots))) dots)
+            (substring desc 0 max)))
+      desc)))
+
+(defun which-key--highlight-face (description)
+  "Return the highlight face for DESCRIPTION if it has one."
+  (let (face)
+    (dolist (el which-key-highlighted-command-list)
+      (unless face
+        (cond ((consp el)
+               (when (string-match-p (car el) description)
+                 (setq face (cdr el))))
+              ((stringp el)
+               (when (string-match-p el description)
+                 (setq face 'which-key-highlighted-command-face)))
+              (t
+               (message "which-key: warning: element %s of \
+which-key-highlighted-command-list is not a string or a cons
+cell" el)))))
+    face))
+
+(defun which-key--propertize-description
+    (description group local hl-face &optional original-description)
+  "Add face to DESCRIPTION.
+The face chosen depends on whether the description represents a
+group or a command.  Also make some minor adjustments to the
+description string, like removing a \"group:\" prefix.
+
+ORIGINAL-DESCRIPTION is the description given by
+`describe-buffer-bindings'."
+  (when description
+    (let* ((desc description)
+           (desc (if (string-match-p "^group:" desc)
+                     (substring desc 6) desc))
+           (desc (if group (concat which-key-prefix-prefix desc) desc)))
+      (make-text-button
+       desc nil
+       'face (cond (hl-face hl-face)
+                   (group 'which-key-group-description-face)
+                   (local 'which-key-local-map-description-face)
+                   (t 'which-key-command-description-face))
+       'help-echo (cond
+                   ((and original-description
+                         (fboundp (intern original-description))
+                         (documentation (intern original-description))
+                         ;; tooltip-mode doesn't exist in emacs-nox
+                         (boundp 'tooltip-mode) tooltip-mode)
+                    (documentation (intern original-description)))
+                   ((and original-description
+                         (fboundp (intern original-description))
+                         (documentation (intern original-description))
+                         (let* ((doc (documentation
+                                      (intern original-description)))
+                                (str (replace-regexp-in-string "\n" " " doc))
+                                (max (floor (* (frame-width) 0.8))))
+                           (if (> (length str) max)
+                               (concat (substring str 0 max) "...")
+                             str)))))))))
+
+(defun which-key--extract-key (key-str)
+  "Pull the last key (or key range) out of KEY-STR."
+  (save-match-data
+    (let ((key-range-regexp "\\`.*\\([^ \t]+ \\.\\. [^ \t]+\\)\\'"))
+      (if (string-match key-range-regexp key-str)
+          (match-string 1 key-str)
+        (car (last (split-string key-str " ")))))))
+
+(defun which-key--maybe-add-docstring (current original)
+  "Maybe concat a docstring to CURRENT and return result.
+Specifically, do this if ORIGINAL is a command with a docstring
+and `which-key-show-docstrings' is non-nil.  If
+`which-key-show-docstrings' is the symbol docstring-only, just
+return the docstring."
+  (let* ((orig-sym (intern original))
+         (doc (when (commandp orig-sym)
+                (documentation orig-sym)))
+         (doc (when doc
+                (replace-regexp-in-string
+                 (concat "^\\(?::"
+                         (regexp-opt '("around" "override"
+                                       "after" "after-until" "after-while"
+                                       "before" "before-until" "before-while"
+                                       "filter-args" "filter-return"))
+                         " advice: [^\n]+\n"
+                         "\\)+\n")
+                 "" doc)))
+         (docstring (when doc
+                      (which-key--propertize (car (split-string doc "\n"))
+                                             'face 'which-key-docstring-face))))
+    (cond ((not (and which-key-show-docstrings docstring))
+           current)
+          ((eq which-key-show-docstrings 'docstring-only)
+           docstring)
+          (t
+           (format "%s %s" current docstring)))))
+
+(defun which-key--format-and-replace (unformatted &optional preserve-full-key)
+  "Make list of key bindings with separators and descriptions.
+Take a list of (key . desc) cons cells in UNFORMATTED, add
+faces and perform replacements according to the three replacement
+alists.  Return a list (key separator description)."
+  (let ((sep-w-face
+         (which-key--propertize which-key-separator
+                                'face 'which-key-separator-face))
+        (local-map (current-local-map))
+	(avl-width (cdr (which-key--popup-max-dimensions)))
+        new-list)
+    (dolist (key-binding unformatted)
+      (let* ((keys (car key-binding))
+             (orig-desc (cdr key-binding))
+             (group (which-key--group-p orig-desc))
+             (local (eq (which-key--safe-lookup-key-description
+                         local-map keys)
+                        (intern orig-desc)))
+             (hl-face (which-key--highlight-face orig-desc))
+             (key-binding (which-key--maybe-replace key-binding))
+             (final-desc (which-key--propertize-description
+                          (cdr key-binding) group local hl-face orig-desc)))
+        (when final-desc
+          (setq final-desc
+                (which-key--truncate-description
+                 (which-key--maybe-add-docstring final-desc orig-desc)
+		 avl-width)))
+        (when (consp key-binding)
+          (push
+           (list (which-key--propertize-key
+                  (if preserve-full-key
+                      (car key-binding)
+                    (which-key--extract-key (car key-binding))))
+                 sep-w-face
+                 final-desc)
+           new-list))))
+    (nreverse new-list)))
+
+(defun which-key--compute-binding (binding)
+  "Replace BINDING with remapped binding if it exists.
+Requires `which-key-compute-remaps' to be non-nil."
+  (copy-sequence (symbol-name
+                  (or (and which-key-compute-remaps
+                           (command-remapping binding))
+                      binding))))
+
+(defun which-key--get-menu-item-binding (def)
+  "Retrieve binding for menu-item."
+  ;; see `keymap--menu-item-binding'
+  (let* ((binding (nth 2 def))
+         (plist (nthcdr 3 def))
+         (filter (plist-get plist :filter)))
+    (if filter (funcall filter binding) binding)))
+
+(defun which-key--get-keymap-bindings-1
+    (keymap start &optional prefix filter all ignore-commands)
+  "See `which-key--get-keymap-bindings'."
+  (let ((bindings start)
+        (prefix-map (if prefix (lookup-key keymap prefix) keymap)))
+    (when (keymapp prefix-map)
+      (map-keymap
+       (lambda (ev def)
+         (let* ((key (vconcat prefix (list ev)))
+                (key-desc (key-description key)))
+           (cond
+            ((assoc key-desc bindings))
+            ((and (listp ignore-commands) (symbolp def) (memq def ignore-commands)))
+            ((or (string-match-p
+                  which-key--ignore-non-evil-keys-regexp key-desc)
+                 (eq ev 'menu-bar)))
+            ((and (keymapp def)
+                  (string-match-p which-key--evil-keys-regexp key-desc)))
+            ((and (keymapp def)
+                  (or all
+                      ;; event 27 is escape, so this will pick up meta
+                      ;; bindings and hopefully not too much more
+                      (eql ev 27)))
+             (setq bindings
+                   (which-key--get-keymap-bindings-1
+                    keymap bindings key nil all ignore-commands)))
+            (def
+             (let* ((def (if (eq 'menu-item (car-safe def))
+                             (which-key--get-menu-item-binding def)
+                           def))
+                    (binding
+                     (cons key-desc
+                           (cond
+                            ((symbolp def) (which-key--compute-binding def))
+                            ((keymapp def) "prefix")
+                            ((functionp def)
+                             (cond
+                              ((eq 'lambda (car-safe def)) "lambda")
+                              ((eq 'closure (car-safe def)) "closure")
+                              (t "function")))
+                            ((stringp def) def)
+                            ((vectorp def) (key-description def))
+                            ((and (consp def)
+                                  ;; looking for (STRING . DEFN)
+                                  (stringp (car def)))
+                             (concat (when (keymapp (cdr-safe def))
+                                       "group:")
+                                     (car def)))
+                            (t "unknown")))))
+               (when (or (null filter)
+                         (and (functionp filter)
+                              (funcall filter binding)))
+                 (push binding bindings)))))))
+       prefix-map))
+    bindings))
+
+(defun which-key--get-keymap-bindings
+    (keymap &optional start prefix filter all evil)
+  "Retrieve top-level bindings from KEYMAP.
+PREFIX limits bindings to those starting with this key
+sequence.  START is a list of existing bindings to add to.  If ALL
+is non-nil, recursively retrieve all bindings below PREFIX.  If
+EVIL is non-nil, extract active evil bidings."
+  (let ((bindings start)
+        (ignore '(self-insert-command ignore ignore-event company-ignore))
+        (evil-map
+         (when (and evil (bound-and-true-p evil-local-mode))
+           (lookup-key keymap (kbd (format "<%s-state>" evil-state))))))
+    (when (keymapp evil-map)
+      (setq bindings (which-key--get-keymap-bindings-1
+                      evil-map bindings prefix filter all ignore)))
+    (which-key--get-keymap-bindings-1
+     keymap bindings prefix filter all ignore)))
+
+(defun which-key--get-current-bindings (&optional prefix filter)
+  "Generate a list of current active bindings."
+  (let (bindings)
+    (dolist (map (current-active-maps t) bindings)
+      (when (cdr map)
+        (setq bindings
+              (which-key--get-keymap-bindings
+               map bindings prefix filter))))))
+
+(defun which-key--get-bindings (&optional prefix keymap filter recursive)
+  "Collect key bindings.
+If KEYMAP is nil, collect from current buffer using the current
+key sequence as a prefix.  Otherwise, collect from KEYMAP.  FILTER
+is a function to use to filter the bindings.  If RECURSIVE is
+non-nil, then bindings are collected recursively for all prefixes."
+  (let* ((unformatted
+          (cond ((keymapp keymap)
+                 (which-key--get-keymap-bindings
+                  keymap nil prefix filter recursive))
+                (keymap
+                 (error "%s is not a keymap" keymap))
+                (t
+                 (which-key--get-current-bindings prefix filter)))))
+    (when which-key-sort-order
+      (setq unformatted
+            (sort unformatted which-key-sort-order)))
+    (which-key--format-and-replace unformatted recursive)))
+
+;;; Functions for laying out which-key buffer pages
+
+(defun which-key--normalize-columns (columns)
+  "Pad COLUMNS to the same length using empty strings."
+  (let ((max-len (cl-reduce (lambda (a x) (max a (length x))) columns
+                            :initial-value 0)))
+    (mapcar
+     (lambda (c)
+       (if (< (length c) max-len)
+           (append c (make-list (- max-len (length c)) ""))
+         c))
+     columns)))
+
+(defsubst which-key--join-columns (columns)
+  "Transpose columns into rows, concat rows into lines and rows into page."
+  (let* ((padded (which-key--normalize-columns (nreverse columns)))
+         (rows (apply #'cl-mapcar #'list padded)))
+    (mapconcat (lambda (row) (mapconcat #'identity row " ")) rows "\n")))
+
+(defsubst which-key--max-len (keys index &optional initial-value)
+  "Find the max length of the INDEX element in each of KEYS."
+  (cl-reduce
+   (lambda (x y) (max x (which-key--string-width (nth index y))))
+   keys :initial-value (if initial-value initial-value 0)))
+
+(defun which-key--pad-column (col-keys avl-width)
+  "Pad cells of COL-KEYS to AVL-WIDTH.
+Take a column of (key separator description) COL-KEYS,
+calculate the max width in the column and pad all cells out to
+that width."
+  (let* ((col-key-width  (+ which-key-add-column-padding
+                            (which-key--max-len col-keys 0)))
+         (col-sep-width  (which-key--max-len col-keys 1))
+         (avl-width      (- avl-width col-key-width col-sep-width))
+         (col-desc-width (min avl-width
+                              (which-key--max-len
+                               col-keys 2
+                               which-key-min-column-description-width)))
+         (col-width      (+ col-key-width col-sep-width col-desc-width))
+         (col-format     (concat "%" (int-to-string col-key-width) "s%s%s")))
+    (cons col-width
+          (mapcar (pcase-lambda (`(,key ,sep ,desc ,_doc))
+                    (concat
+                     (format col-format key sep desc)
+                     (make-string (- col-desc-width (length desc)) ?\s)))
+                  col-keys))))
+
+(defun which-key--partition-list (n list)
+  "Partition LIST into N-sized sublists."
+  (let (res)
+    (while list
+      (setq res (cons (cl-subseq list 0 (min n (length list))) res)
+            list (nthcdr n list)))
+    (nreverse res)))
+
+(defun which-key--list-to-pages (keys avl-lines avl-width)
+  "Convert list of KEYS to columns based on dimensions AVL-LINES and AVL-WIDTH.
+Return a `which-key--pages' object that holds the page strings,
+as well as metadata."
+  (let ((cols-w-widths (mapcar (lambda (c) (which-key--pad-column c avl-width))
+			       (which-key--partition-list avl-lines keys)))
+        (page-width 0) (n-pages 0) (n-keys 0) (n-columns 0)
+        page-cols pages page-widths keys/page col)
+    (if (> (apply #'max (mapcar #'car cols-w-widths)) avl-width)
+        ;; give up if no columns fit
+        nil
+      (while cols-w-widths
+        ;; start new page
+        (cl-incf n-pages)
+        (setq col (pop cols-w-widths))
+        (setq page-cols (list (cdr col)))
+        (setq page-width (car col))
+        (setq n-keys (length (cdr col)))
+        (setq n-columns 1)
+        ;; add additional columns as long as they fit
+        (while (and cols-w-widths
+                    (or (null which-key-max-display-columns)
+                        (< n-columns which-key-max-display-columns))
+                    (<= (+ page-width 1 (caar cols-w-widths)) avl-width))
+          (setq col (pop cols-w-widths))
+          (push (cdr col) page-cols)
+          (cl-incf page-width (1+ (car col)))
+          (cl-incf n-keys (length (cdr col)))
+          (cl-incf n-columns))
+        (push (which-key--join-columns page-cols) pages)
+        (push n-keys keys/page)
+        (push page-width page-widths))
+      (make-which-key--pages
+       :pages (nreverse pages)
+       :height (if (> n-pages 1) avl-lines (min avl-lines n-keys))
+       :widths (nreverse page-widths)
+       :keys/page (reverse keys/page)
+       :page-nums (number-sequence 1 n-pages)
+       :num-pages n-pages
+       :total-keys (apply #'+ keys/page)))))
+
+(defun which-key--create-pages-1
+    (keys available-lines available-width &optional min-lines vertical)
+  "Create page strings using `which-key--list-to-pages'.
+Will try to find the best number of rows and columns using the
+given dimensions and the length and widths of ITEMS.  Use VERTICAL
+if the ITEMS are laid out vertically and the number of columns
+should be minimized."
+  (let ((result (which-key--list-to-pages
+                 keys available-lines available-width))
+        (min-lines (or min-lines 0))
+        found prev-result)
+    (if (or (null result)
+            vertical
+            (> (which-key--pages-num-pages result) 1)
+            (= 1 available-lines))
+        result
+      ;; simple search for a fitting page
+      (while (and (> available-lines min-lines)
+                  (not found))
+        (setq available-lines (cl-decf available-lines)
+              prev-result result
+              result (which-key--list-to-pages
+                      keys available-lines available-width)
+              found (> (which-key--pages-num-pages result) 1)))
+      (if found prev-result result))))
+
+(defun which-key--create-pages (keys &optional prefix-keys prefix-title)
+  "Create page strings using `which-key--list-to-pages'.
+Will try to find the best number of rows and columns using the
+given dimensions and the length and wdiths of KEYS.  SEL-WIN-WIDTH
+is the width of the live window."
+  (let* ((max-dims (which-key--popup-max-dimensions))
+         (max-lines (car max-dims))
+         (max-width (cdr max-dims))
+         (prefix-desc (key-description prefix-keys))
+         (full-prefix (which-key--full-prefix prefix-desc))
+         (prefix (when (eq which-key-show-prefix 'left)
+                   (+ 2 (which-key--string-width full-prefix))))
+         (prefix-top-bottom (member which-key-show-prefix '(bottom top)))
+         (avl-lines (if prefix-top-bottom (- max-lines 1) max-lines))
+         (min-lines (min avl-lines which-key-min-display-lines))
+         (avl-width (if prefix (- max-width prefix) max-width))
+         (vertical (or (and (eq which-key-popup-type 'side-window)
+                            (member which-key-side-window-location '(left right)))
+                       (eq which-key-max-display-columns 1)))
+         result)
+    (setq result
+          (which-key--create-pages-1
+           keys avl-lines avl-width min-lines vertical))
+    (when (and result
+               (> (which-key--pages-num-pages result) 0))
+      (setf (which-key--pages-prefix result) prefix-keys)
+      (setf (which-key--pages-prefix-title result)
+            (or prefix-title
+                (which-key--maybe-get-prefix-title
+                 (key-description prefix-keys))))
+      (when prefix-top-bottom
+        ;; Add back the line earlier reserved for the page information.
+        (setf (which-key--pages-height result) max-lines))
+      (when (and (= (which-key--pages-num-pages result) 1)
+                 (> which-key-min-display-lines
+                    (which-key--pages-height result)))
+        ;; result is shorter than requested, so we artificially increase the
+        ;; height. See #325. Note this only has an effect if
+        ;; `which-key-allow-imprecise-window-fit' is non-nil.
+        (setf (which-key--pages-height result) which-key-min-display-lines))
+      (which-key--debug-message "Frame height: %s
+Frame pixel width: %s
+Frame char width: %s
+Frame width: %s
+Which-key initial width: %s
+Which-key adjusted width: %s
+Minibuffer height: %s
+Max dimensions: (%s, %s)
+Available for bindings: (%s, %s)
+Popup type info: (%s, %s, %s)
+Computed page widths: %s
+Actual lines: %s"
+                                (frame-height)
+                                (frame-pixel-width)
+                                (frame-char-width)
+                                (window-total-width (frame-root-window))
+                                (which-key--width-or-percentage-to-width
+                                  which-key-side-window-max-width)
+                                (which-key--total-width-to-text
+                                 (which-key--width-or-percentage-to-width
+                                  which-key-side-window-max-width))
+                                (window-text-height (minibuffer-window))
+                                max-lines
+                                max-width
+                                avl-lines
+                                avl-width
+                                which-key-popup-type
+                                which-key-side-window-location
+                                which-key-side-window-max-width
+                                (which-key--pages-widths result)
+                                (which-key--pages-height result))
+      result)))
+
+(defun which-key--lighter-status ()
+  "Possibly show number of keys and total in the mode line."
+  (when which-key-show-remaining-keys
+    (let ((n-shown (car (which-key--pages-keys/page which-key--pages-obj)))
+          (n-tot (which-key--pages-total-keys which-key--pages-obj)))
+      (setcar (cdr (assq 'which-key-mode minor-mode-alist))
+              (format " WK: %s/%s keys" n-shown n-tot)))))
+
+(defun which-key--lighter-restore ()
+  "Restore the lighter for which-key."
+  (when which-key-show-remaining-keys
+    (setcar (cdr (assq 'which-key-mode minor-mode-alist))
+            which-key-lighter)))
+
+(defun which-key--echo (text)
+  "Echo TEXT to minibuffer without logging."
+  (let (message-log-max)
+    (message "%s" text)))
+
+(defun which-key--next-page-hint (prefix-keys)
+  "Return string for next page hint."
+  (let* ((paging-key (concat prefix-keys " " which-key-paging-key))
+         (paging-key-bound (eq 'which-key-C-h-dispatch
+                               (key-binding (kbd paging-key))))
+         (key (key-description (vector help-char)))
+         (key (if paging-key-bound
+                  (concat key " or " which-key-paging-key)
+                key)))
+    (when (and which-key-use-C-h-commands
+               (not (equal (vector help-char)
+                           (vconcat (kbd prefix-keys)))))
+      (which-key--propertize (format "[%s paging/help]" key)
+                             'face 'which-key-note-face))))
+
+(defun which-key--full-prefix (prefix-keys &optional -prefix-arg dont-prop-keys)
+  "Return a description of the full key sequence up to now.
+Include prefix arguments."
+  (let* ((left (eq which-key-show-prefix 'left))
+         (prefix-arg (if -prefix-arg -prefix-arg prefix-arg))
+         (str (concat
+               (universal-argument--description)
+               (when prefix-arg " ")
+               prefix-keys))
+         (dash (if (and (not (string= prefix-keys ""))
+                        (null left)) "-" "")))
+    (if (or (eq which-key-show-prefix 'echo) dont-prop-keys)
+        (concat str dash)
+      (concat (which-key--propertize-key str)
+              (which-key--propertize dash 'face 'which-key-key-face)))))
+
+(defun which-key--get-popup-map ()
+  "Generate transient map for use in the top level binding display."
+  (unless which-key--automatic-display
+    (let ((map (make-sparse-keymap)))
+      (define-key map (kbd which-key-paging-key) #'which-key-C-h-dispatch)
+      (when which-key-use-C-h-commands
+        ;; Show next page even when C-h is pressed
+        (define-key map (vector help-char) #'which-key-C-h-dispatch))
+      map)))
+
+(defun which-key--process-page (pages-obj)
+  "Add information to the basic list of key bindings.
+Include, if applicable, the current prefix, the name of the current
+prefix, and a page count."
+  (let* ((page (car (which-key--pages-pages pages-obj)))
+         (height (which-key--pages-height pages-obj))
+         (n-pages (which-key--pages-num-pages pages-obj))
+         (page-n (car (which-key--pages-page-nums pages-obj)))
+         (prefix-desc (key-description (which-key--pages-prefix pages-obj)))
+         (prefix-title (which-key--pages-prefix-title pages-obj))
+         (full-prefix (which-key--full-prefix prefix-desc))
+         (nxt-pg-hint (which-key--next-page-hint prefix-desc))
+         ;; not used in left case
+         (status-line
+          (concat (which-key--propertize prefix-title 'face 'which-key-note-face)
+                  (when (< 1 n-pages)
+                    (which-key--propertize (format " (%s of %s)" page-n n-pages)
+                                           'face 'which-key-note-face)))))
+    (pcase which-key-show-prefix
+      (`left
+       (let* ((page-cnt (which-key--propertize (format "%s/%s" page-n n-pages)
+                                               'face 'which-key-separator-face))
+              (first-col-width (+ 2 (max (which-key--string-width full-prefix)
+                                         (which-key--string-width page-cnt))))
+              (prefix (format (concat "%-" (int-to-string first-col-width) "s")
+                              full-prefix))
+              (page-cnt (if (> n-pages 1)
+                            (format
+                             (concat "%-" (int-to-string first-col-width) "s")
+                             page-cnt)
+                          (make-string first-col-width ?\s)))
+              lines first-line new-end)
+         (if (= 1 height)
+             (cons (concat prefix page) nil)
+           (setq lines (split-string page "\n")
+                 first-line (concat prefix (car lines) "\n" page-cnt)
+                 new-end (concat "\n" (make-string first-col-width ?\s)))
+           (cons
+            (concat first-line (mapconcat #'identity (cdr lines) new-end))
+            nil))))
+      (`top
+       (cons
+        (concat (when (or (= 0 echo-keystrokes)
+                          (not (eq which-key-side-window-location 'bottom)))
+                  (concat full-prefix " "))
+                status-line " " nxt-pg-hint "\n" page)
+        nil))
+      (`bottom
+       (cons
+        (concat page "\n"
+                (when (or (= 0 echo-keystrokes)
+                          (not (eq which-key-side-window-location 'bottom)))
+                  (concat full-prefix " "))
+                status-line " " nxt-pg-hint)
+        nil))
+      (`echo
+       (cons page
+             (lambda ()
+               (which-key--echo
+                (concat full-prefix (when prefix-desc " ")
+                        status-line (when status-line " ")
+                        nxt-pg-hint)))))
+      (`mode-line
+       (cons page
+             (lambda ()
+               (with-current-buffer which-key--buffer
+                 (setq-local mode-line-format
+                             (concat " " full-prefix
+                                     " " status-line
+                                     " " nxt-pg-hint))))))
+      (_ (cons page nil)))))
+
+(defun which-key--show-page (&optional n)
+  "Show current page.
+N changes the current page to the Nth page relative to the
+current one."
+  (which-key--init-buffer) ;; in case it was killed
+  (let ((prefix-keys (which-key--current-key-string))
+        golden-ratio-mode)
+    (if (null which-key--pages-obj)
+        (message "%s- which-key can't show keys: There is not \
+enough space based on your settings and frame size." prefix-keys)
+      (when n
+        (setq which-key--pages-obj
+              (which-key--pages-set-current-page which-key--pages-obj n)))
+      (let ((page-echo (which-key--process-page which-key--pages-obj))
+            (height (which-key--pages-height which-key--pages-obj))
+            (width (car (which-key--pages-widths which-key--pages-obj))))
+        (which-key--lighter-status)
+        (if (eq which-key-popup-type 'minibuffer)
+            (which-key--echo (car page-echo))
+          (with-current-buffer which-key--buffer
+            (erase-buffer)
+            (insert (car page-echo))
+            (goto-char (point-min)))
+          (when (cdr page-echo) (funcall (cdr page-echo)))
+          (which-key--show-popup (cons height width)))))
+    ;; used for paging at top-level
+    (if (fboundp 'set-transient-map)
+        (set-transient-map (which-key--get-popup-map))
+      (with-no-warnings
+        (set-temporary-overlay-map (which-key--get-popup-map))))))
+
+;;; Paging functions
+
+;;;###autoload
+(defun which-key-reload-key-sequence (&optional key-seq)
+  "Simulate entering the key sequence KEY-SEQ.
+KEY-SEQ should be a list of events as produced by
+`listify-key-sequence'.  If nil, KEY-SEQ defaults to
+`which-key--current-key-list'.  Any prefix arguments that were
+used are reapplied to the new key sequence."
+  (let* ((key-seq (or key-seq (which-key--current-key-list)))
+         (next-event (mapcar (lambda (ev) (cons t ev)) key-seq)))
+    (setq prefix-arg current-prefix-arg
+          unread-command-events next-event)))
+
+(defun which-key-turn-page (delta)
+  "Show the next page of keys."
+  (which-key-reload-key-sequence)
+  (if which-key--last-try-2-loc
+      (let ((which-key-side-window-location which-key--last-try-2-loc)
+            (which-key--multiple-locations t))
+        (which-key--show-page delta))
+    (which-key--show-page delta))
+  (which-key--start-paging-timer))
+
+;;;###autoload
+(defun which-key-show-standard-help (&optional _)
+  "Call the command in `which-key--prefix-help-cmd-backup'.
+Usually this is `describe-prefix-bindings'."
+  (interactive)
+  (let ((which-key-inhibit t)
+        (popup-showing (which-key--popup-showing-p)))
+    (which-key--hide-popup-ignore-command)
+    (cond ((and (eq which-key--prefix-help-cmd-backup
+                    'describe-prefix-bindings)
+                ;; If the popup is not showing, we call
+                ;; `describe-prefix-bindings' directly.
+                popup-showing)
+           ;; This is essentially what `describe-prefix-bindings' does. We can't
+           ;; use this function directly, because the prefix will not be correct
+           ;; when we enter using `which-key-C-h-dispatch'.
+           (describe-bindings (kbd (which-key--current-key-string))))
+          ((functionp which-key--prefix-help-cmd-backup)
+           (funcall which-key--prefix-help-cmd-backup)))))
+
+;;;###autoload
+(defun which-key-show-next-page-no-cycle ()
+  "Show next page of keys or `which-key-show-standard-help'."
+  (interactive)
+  (let ((which-key-inhibit t))
+    (if (which-key--on-last-page)
+        (which-key-show-standard-help)
+      (which-key-turn-page 1))))
+
+;;;###autoload
+(defun which-key-show-previous-page-no-cycle ()
+  "Show previous page of keys if one exists."
+  (interactive)
+  (let ((which-key-inhibit t))
+    (unless (which-key--on-first-page)
+      (which-key-turn-page -1))))
+
+;;;###autoload
+(defun which-key-show-next-page-cycle (&optional _)
+  "Show the next page of keys, cycling from end to beginning."
+  (interactive)
+  (let ((which-key-inhibit t))
+    (which-key-turn-page 1)))
+
+;;;###autoload
+(defun which-key-show-previous-page-cycle (&optional _)
+  "Show the previous page of keys, cycling from beginning to end."
+  (interactive)
+  (let ((which-key-inhibit t))
+    (which-key-turn-page -1)))
+
+;;;###autoload
+(defun which-key-show-top-level (&optional _)
+  "Show top-level bindings."
+  (interactive)
+  (which-key--create-buffer-and-show nil nil nil "Top-level bindings"))
+
+;;;###autoload
+(defun which-key-show-major-mode (&optional all)
+  "Show top-level bindings in the map of the current major mode.
+This function will also detect evil bindings made using
+`evil-define-key' in this map.  These bindings will depend on the
+current evil state."
+  (interactive "P")
+  (let ((map-sym (intern (format "%s-map" major-mode))))
+    (if (and (boundp map-sym) (keymapp (symbol-value map-sym)))
+        (which-key--show-keymap
+         "Major-mode bindings"
+         (symbol-value map-sym)
+         (apply-partially #'which-key--map-binding-p (symbol-value map-sym))
+         all)
+      (message "which-key: No map named %s" map-sym))))
+
+;;;###autoload
+(defun which-key-show-full-major-mode ()
+  "Show all bindings in the map of the current major mode.
+This function will also detect evil bindings made using
+`evil-define-key' in this map.  These bindings will depend on the
+current evil state."
+  (interactive)
+  (which-key-show-major-mode t))
+
+;;;###autoload
+(defun which-key-dump-bindings (prefix buffer-name)
+  "Dump bindings from PREFIX into buffer named BUFFER-NAME.
+PREFIX should be a string suitable for `kbd'."
+  (interactive "sPrefix: \nB")
+  (let* ((buffer (get-buffer-create buffer-name))
+         (keys (which-key--get-bindings (kbd prefix))))
+    (with-current-buffer buffer
+      (point-max)
+      (save-excursion
+        (dolist (key keys)
+          (insert (apply #'format "%s%s%s\n" key)))))
+    (switch-to-buffer-other-window buffer)))
+
+;;;###autoload
+(defun which-key-undo-key (&optional _)
+  "Undo last keypress and force which-key update."
+  (interactive)
+  (let* ((key-lst (butlast (which-key--current-key-list)))
+         (which-key-inhibit t))
+    (cond (which-key--prior-show-keymap-args
+           (if (keymapp (cdr (car-safe which-key--prior-show-keymap-args)))
+               (let ((args (pop which-key--prior-show-keymap-args)))
+                 (which-key--show-keymap (car args) (cdr args)))
+             (which-key--hide-popup)))
+          (key-lst
+           (which-key-reload-key-sequence key-lst)
+           (which-key--create-buffer-and-show (apply #'vector key-lst)))
+          (t (setq which-key--automatic-display nil)
+             (which-key-show-top-level)))))
+(defalias 'which-key-undo #'which-key-undo-key)
+
+(defun which-key-abort (&optional _)
+  "Abort key sequence."
+  (interactive)
+  (let ((which-key-inhibit t))
+    (which-key--hide-popup-ignore-command)
+    (keyboard-quit)))
+
+(defun which-key-digit-argument (key)
+  "Version of `digit-argument' for use in `which-key-C-h-map'."
+  (interactive)
+  (let ((last-command-event (string-to-char key)))
+    (digit-argument key))
+  (let ((current-prefix-arg prefix-arg))
+    (which-key-reload-key-sequence)))
+
+(defun which-key-toggle-docstrings (&optional _)
+  "Toggle the display of docstrings."
+  (interactive)
+  (unless (eq which-key-show-docstrings 'docstring-only)
+    (setq which-key-show-docstrings (null which-key-show-docstrings)))
+  (which-key-reload-key-sequence)
+  (which-key--create-buffer-and-show (which-key--current-prefix)))
+
+;;;###autoload
+(defun which-key-C-h-dispatch ()
+  "Dispatch \\`C-h' commands by looking up key in `which-key-C-h-map'.
+This command is always accessible (from any prefix) if
+`which-key-use-C-h-commands' is non nil."
+  (interactive)
+  (cond ((and (not (which-key--popup-showing-p))
+              which-key-show-early-on-C-h)
+         (let ((current-prefix
+                (butlast
+                 (listify-key-sequence
+                  (funcall which-key-this-command-keys-function)))))
+           (which-key-reload-key-sequence current-prefix)
+           (if which-key-idle-secondary-delay
+               (which-key--start-timer which-key-idle-secondary-delay t)
+             (which-key--start-timer 0.05 t))))
+        ((not (which-key--popup-showing-p))
+         (which-key-show-standard-help))
+        (t
+         (if (not (which-key--popup-showing-p))
+             (which-key-show-standard-help)
+           (let* ((prefix-keys (which-key--current-key-string))
+                  (full-prefix (which-key--full-prefix prefix-keys current-prefix-arg t))
+                  (prompt (concat (when (string-equal prefix-keys "")
+                                    (which-key--propertize
+                                     (concat " "
+                                             (which-key--pages-prefix-title
+                                              which-key--pages-obj))
+                                     'face 'which-key-note-face))
+                                  full-prefix
+                                  (which-key--propertize
+                                   (substitute-command-keys
+                                    which-key-C-h-map-prompt)
+                                   'face 'which-key-note-face)))
+                  (key (let ((key (read-key prompt)))
+                         (if (numberp key)
+                             (string key)
+                           (vector key))))
+                  (cmd (lookup-key which-key-C-h-map key))
+                  (which-key-inhibit t))
+             (if cmd (funcall cmd key) (which-key-turn-page 0)))))))
+
+;;; Update
+
+(defun which-key--any-match-p (regexps string)
+  "Non-nil if any of REGEXPS match STRING."
+  (catch 'match
+    (dolist (regexp regexps)
+      (when (string-match-p regexp string)
+        (throw 'match t)))))
+
+(defun which-key--try-2-side-windows
+    (bindings prefix-keys prefix-title loc1 loc2 &rest _ignore)
+  "Try to show BINDINGS (PAGE-N) in LOC1 first.
+Only if no bindings fit fallback to LOC2."
+  (let (pages1)
+    (let ((which-key-side-window-location loc1)
+          (which-key--multiple-locations t))
+      (setq pages1 (which-key--create-pages
+                    bindings prefix-keys prefix-title)))
+    (if pages1
+        (progn
+          (setq which-key--pages-obj pages1)
+          (let ((which-key-side-window-location loc1)
+                (which-key--multiple-locations t))
+            (which-key--show-page))
+          loc1)
+      (let ((which-key-side-window-location loc2)
+            (which-key--multiple-locations t))
+        (setq which-key--pages-obj
+              (which-key--create-pages bindings prefix-keys prefix-title))
+        (which-key--show-page)
+        loc2))))
+
+(defun which-key--read-keymap ()
+  "Read keymap symbol from minibuffer."
+  (intern
+   (completing-read "Keymap: " obarray
+                    (lambda (m)
+                      (and (boundp m)
+                           (keymapp (symbol-value m))
+                           (not (equal (symbol-value m)
+                                       (make-sparse-keymap)))))
+                    t
+                    (let ((sym (symbol-at-point)))
+                      (and (boundp sym)
+                           (keymapp (symbol-value sym))
+                           (symbol-name sym)))
+                    'which-key-keymap-history)))
+
+;;;###autoload
+(defun which-key-show-keymap (keymap &optional no-paging)
+  "Show the top-level bindings in KEYMAP using which-key.
+KEYMAP is selected interactively from all available keymaps.
+
+If NO-PAGING is non-nil, which-key will not intercept subsequent
+keypresses for the paging functionality."
+  (interactive (list (which-key--read-keymap)))
+  (which-key--show-keymap (symbol-name keymap)
+                          (symbol-value keymap)
+                          nil nil no-paging))
+
+;;;###autoload
+(defun which-key-show-full-keymap (keymap)
+  "Show all bindings in KEYMAP using which-key.
+KEYMAP is selected interactively from all available keymaps."
+  (interactive (list (which-key--read-keymap)))
+  (which-key--show-keymap (symbol-name keymap)
+                          (symbol-value keymap)
+                          nil t))
+
+;;;###autoload
+(defun which-key-show-minor-mode-keymap (&optional all)
+  "Show the top-level bindings in KEYMAP using which-key.
+KEYMAP is selected interactively by mode in
+`minor-mode-map-alist'."
+  (interactive)
+  (let ((mode-sym
+         (intern
+          (completing-read
+           "Minor Mode: "
+           (mapcar #'car
+                   (cl-remove-if-not
+                    (lambda (entry)
+                      (and (symbol-value (car entry))
+                           (not (equal (cdr entry) (make-sparse-keymap)))))
+                    minor-mode-map-alist))
+           nil t nil 'which-key-keymap-history))))
+    (which-key--show-keymap (symbol-name mode-sym)
+                            (cdr (assq mode-sym minor-mode-map-alist))
+                            all)))
+;;;###autoload
+(defun which-key-show-full-minor-mode-keymap ()
+  "Show all bindings in KEYMAP using which-key.
+KEYMAP is selected interactively by mode in
+`minor-mode-map-alist'."
+  (interactive)
+  (which-key-show-minor-mode-keymap t))
+
+(defun which-key--show-keymap
+    (keymap-name keymap &optional prior-args all no-paging filter)
+  (when prior-args (push prior-args which-key--prior-show-keymap-args))
+  (let ((bindings (which-key--get-bindings nil keymap filter all)))
+    (if (null bindings)
+        (message "which-key: No bindings found in %s" keymap-name)
+      (cond ((listp which-key-side-window-location)
+             (setq which-key--last-try-2-loc
+                   (apply #'which-key--try-2-side-windows
+                          bindings nil keymap-name
+                          which-key-side-window-location)))
+            (t (setq which-key--pages-obj
+                     (which-key--create-pages bindings nil keymap-name))
+               (which-key--show-page)))
+      (unless no-paging
+        (let* ((key (read-key))
+               (key-desc (key-description (list key)))
+               (next-def (lookup-key keymap (vector key))))
+          (cond ((and which-key-use-C-h-commands
+                      (numberp key) (= key help-char))
+                 (which-key-C-h-dispatch))
+                ((keymapp next-def)
+                 (which-key--hide-popup-ignore-command)
+                 (which-key--show-keymap
+                  (concat keymap-name " " key-desc)
+                  next-def
+                  (cons keymap-name keymap)))
+                (t (which-key--hide-popup))))))))
+
+(defun which-key--evil-operator-filter (binding)
+  (let ((def (intern (cdr binding))))
+    (and (functionp def)
+         (not (evil-get-command-property def :suppress-operator)))))
+
+(defun which-key--show-evil-operator-keymap ()
+  (if which-key--inhibit-next-operator-popup
+      (setq which-key--inhibit-next-operator-popup nil)
+    (let ((keymap
+           (make-composed-keymap (list evil-operator-shortcut-map
+                                       evil-operator-state-map
+                                       evil-motion-state-map))))
+      (when (keymapp keymap)
+        (let ((formatted-keys
+               (which-key--get-bindings
+                nil keymap #'which-key--evil-operator-filter)))
+          (cond ((null formatted-keys)
+                 (message "which-key: Keymap empty"))
+                ((listp which-key-side-window-location)
+                 (setq which-key--last-try-2-loc
+                       (apply #'which-key--try-2-side-windows
+                              formatted-keys nil "evil operator/motion keys"
+                              which-key-side-window-location)))
+                (t (setq which-key--pages-obj
+                         (which-key--create-pages
+                          formatted-keys
+                          nil "evil operator/motion keys"))
+                   (which-key--show-page)))))
+      (let ((key (read-key)))
+        (when (memq key '(?f ?F ?t ?T ?`))
+          ;; these keys trigger commands that read the next char manually
+          (setq which-key--inhibit-next-operator-popup t))
+        (cond ((and which-key-use-C-h-commands (numberp key) (= key help-char))
+               (which-key-C-h-dispatch))
+              ((and (numberp key) (= key ?\C-\[))
+               (which-key--hide-popup)
+               (keyboard-quit))
+              (t
+               (which-key--hide-popup)
+               (setq unread-command-events (vector key))))))))
+
+(defun which-key--create-buffer-and-show
+    (&optional prefix-keys from-keymap filter prefix-title)
+  "Fill `which-key--buffer' with key descriptions and reformat.
+Finally, show the buffer."
+  (let ((start-time (current-time))
+        (formatted-keys (which-key--get-bindings
+                         prefix-keys from-keymap filter))
+        (prefix-desc (key-description prefix-keys)))
+    (cond ((null formatted-keys)
+           (message "%s-  which-key: There are no keys to show" prefix-desc))
+          ((listp which-key-side-window-location)
+           (setq which-key--last-try-2-loc
+                 (apply #'which-key--try-2-side-windows
+                        formatted-keys prefix-keys prefix-title
+                        which-key-side-window-location)))
+          (t (setq which-key--pages-obj
+                   (which-key--create-pages
+                    formatted-keys prefix-keys prefix-title))
+             (which-key--show-page)))
+    (which-key--debug-message
+     "On prefix \"%s\" which-key took %.0f ms." prefix-desc
+     (* 1000 (float-time (time-since start-time))))))
+
+(defun which-key--update ()
+  "Function run by timer to possibly trigger `which-key--create-buffer-and-show'."
+  (let ((prefix-keys (funcall which-key-this-command-keys-function))
+        delay-time)
+    (cond ((and (> (length prefix-keys) 0)
+                (or (keymapp (key-binding prefix-keys))
+                    ;; Some keymaps are stored here like iso-transl-ctl-x-8-map
+                    (keymapp (which-key--safe-lookup-key
+                              key-translation-map prefix-keys))
+                    ;; just in case someone uses one of these
+                    (keymapp (which-key--safe-lookup-key
+                              function-key-map prefix-keys)))
+                (not which-key-inhibit)
+                (or (null which-key-allow-regexps)
+                    (which-key--any-match-p
+                     which-key-allow-regexps (key-description prefix-keys)))
+                (or (null which-key-inhibit-regexps)
+                    (not
+                     (which-key--any-match-p
+                      which-key-inhibit-regexps (key-description prefix-keys))))
+                ;; Do not display the popup if a command is currently being
+                ;; executed
+                (or (run-hook-with-args-until-success
+                     'which-key-inhibit-display-hook)
+                    (null this-command))
+                (let ((max-dim (which-key--popup-max-dimensions)))
+                  (> (min (car-safe max-dim) (cdr-safe max-dim)) 0)))
+           (when (and (not (equal prefix-keys (which-key--current-prefix)))
+                      (or (null which-key-delay-functions)
+                          (null (setq delay-time
+                                      (run-hook-with-args-until-success
+                                       'which-key-delay-functions
+                                       (key-description prefix-keys)
+                                       (length prefix-keys))))
+                          (sit-for delay-time)))
+             (setq which-key--automatic-display t)
+             (which-key--create-buffer-and-show prefix-keys)
+             (when (and which-key-idle-secondary-delay
+                        (not which-key--secondary-timer-active))
+               (which-key--start-timer which-key-idle-secondary-delay t))))
+          ((and which-key-show-transient-maps
+                ;; Assuming that if this is not true we're in
+                ;; `which-key-show-top-level', which would then be overwritten.
+                (> (length prefix-keys) 0)
+                (keymapp overriding-terminal-local-map)
+                ;; basic test for it being a hydra
+                (not (eq (lookup-key overriding-terminal-local-map "\C-u")
+                         'hydra--universal-argument)))
+           (which-key--create-buffer-and-show
+            nil overriding-terminal-local-map))
+          ((and which-key-show-operator-state-maps
+                (bound-and-true-p evil-state)
+                (eq evil-state 'operator)
+                (not (which-key--popup-showing-p)))
+           (which-key--show-evil-operator-keymap))
+          (which-key--automatic-display
+           (which-key--hide-popup)))))
+
+;;; Timers
+
+(defun which-key--start-timer (&optional delay secondary)
+  "Activate idle timer to trigger `which-key--update'."
+  (which-key--stop-timer)
+  (setq which-key--secondary-timer-active secondary)
+  (setq which-key--timer
+        (run-with-idle-timer (or delay which-key-idle-delay)
+                             t #'which-key--update)))
+
+(defun which-key--stop-timer ()
+  "Deactivate idle timer for `which-key--update'."
+  (when which-key--timer (cancel-timer which-key--timer)))
+
+(defun which-key--start-paging-timer ()
+  "Activate timer to restart which-key after paging."
+  (when which-key--paging-timer (cancel-timer which-key--paging-timer))
+  (which-key--stop-timer)
+  (setq which-key--paging-timer
+        (run-with-idle-timer
+         0.2 t (lambda ()
+                 (when (or (not (member real-last-command
+                                        which-key--paging-functions))
+                           (and (< 0 (length (this-single-command-keys)))
+                                (not (equal (which-key--current-prefix)
+                                            (funcall which-key-this-command-keys-function)))))
+                   (cancel-timer which-key--paging-timer)
+                   (if which-key-idle-secondary-delay
+                       ;; we haven't executed a command yet so the secandary
+                       ;; timer is more relevant here
+                       (which-key--start-timer which-key-idle-secondary-delay t)
+                     (which-key--start-timer)))))))
+
+(provide 'which-key)
+;;; which-key.el ends here
diff --git a/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key.elc b/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key.elc
new file mode 100644
index 0000000..639021a
Binary files /dev/null and b/emacs/.emacs.d/elpa/which-key-20240620.2145/which-key.elc differ
diff --git a/emacs/.emacs.d/elpa/with-editor-20260731.2234/dir b/emacs/.emacs.d/elpa/with-editor-20260731.2234/dir
new file mode 100644
index 0000000..c5810e0
--- /dev/null
+++ b/emacs/.emacs.d/elpa/with-editor-20260731.2234/dir
@@ -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
+* With-Editor: (with-editor).   Using the Emacsclient as $EDITOR.
diff --git a/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor-autoloads.el b/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor-autoloads.el
new file mode 100644
index 0000000..f202a1f
--- /dev/null
+++ b/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor-autoloads.el
@@ -0,0 +1,121 @@
+;;; with-editor-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from with-editor.el
+
+(autoload 'with-editor-export-editor "with-editor" "\
+Teach subsequent commands to use current Emacs instance as editor.
+
+Set and export the environment variable ENVVAR, by default \"EDITOR\".
+The value is automatically generated to teach commands to use the
+current Emacs instance as \"the editor\".
+
+PROCESS is only intended for use by `eat-exec-hook'.  When invoked
+interactively, INTERACTIVE is non-nil, which supresses the call to
+\"clear\" (only relevant in `vterm-mode' and `eat-mode').
+
+This command can be used in `shell-mode', `term-mode', `eshell-mode',
+`vterm-mode' and `eat-mode'.
+
+(fn &optional (ENVVAR \"EDITOR\") PROCESS INTERACTIVE)" t)
+(autoload 'with-editor-export-git-editor "with-editor" "\
+Like `with-editor-export-editor' but always set `$GIT_EDITOR'.
+
+PROCESS is only intended for use by `eat-exec-hook'.  When invoked
+interactively, INTERACTIVE is non-nil, which supresses the call to
+\"clear\".
+
+(fn &optional PROCESS INTERACTIVE)" t)
+(autoload 'with-editor-export-hg-editor "with-editor" "\
+Like `with-editor-export-editor' but always set `$HG_EDITOR'.
+
+PROCESS is only intended for use by `eat-exec-hook'.  When invoked
+interactively, INTERACTIVE is non-nil, which supresses the call to
+\"clear\".
+
+(fn &optional PROCESS INTERACTIVE)" t)
+(defvar shell-command-with-editor-mode nil "\
+Non-nil if Shell-Command-With-Editor mode is enabled.
+See the `shell-command-with-editor-mode' command
+for a description of this minor mode.")
+(custom-autoload 'shell-command-with-editor-mode "with-editor" nil)
+(autoload 'shell-command-with-editor-mode "with-editor" "\
+Teach `shell-command' to use current Emacs instance as editor.
+
+Teach `shell-command', and all commands that ultimately call that
+command, to use the current Emacs instance as editor by executing
+\"EDITOR=CLIENT COMMAND&\" instead of just \"COMMAND&\".
+
+CLIENT is automatically generated; EDITOR=CLIENT instructs
+COMMAND to use to the current Emacs instance as \"the editor\",
+assuming no other variable overrides the effect of \"$EDITOR\".
+CLIENT may be the path to an appropriate emacsclient executable
+with arguments, or a script which also works over Tramp.
+
+Alternatively you can use the `with-editor-async-shell-command',
+which also allows the use of another variable instead of
+\"EDITOR\".
+
+This is a global minor mode.  If called interactively, toggle the
+`Shell-Command-With-Editor mode' 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.
+
+To check whether the minor mode is enabled in the current buffer,
+evaluate `(default-value \\='shell-command-with-editor-mode)'.
+
+The mode's hook is called both when the mode is enabled and when
+it is disabled.
+
+(fn &optional ARG)" t)
+(autoload 'with-editor-async-shell-command "with-editor" "\
+Like `async-shell-command' but with `$EDITOR' set.
+
+Execute string \"ENVVAR=CLIENT COMMAND\" in an inferior shell;
+display output, if any.  With a prefix argument prompt for an
+environment variable, otherwise the default \"EDITOR\" variable
+is used.  With a negative prefix argument additionally insert
+the COMMAND's output at point.
+
+CLIENT is automatically generated; ENVVAR=CLIENT instructs
+COMMAND to use to the current Emacs instance as \"the editor\",
+assuming it respects ENVVAR as an \"EDITOR\"-like variable.
+CLIENT may be the path to an appropriate emacsclient executable
+with arguments, or a script which also works over Tramp.
+
+Also see `async-shell-command' and `shell-command'.
+
+(fn COMMAND &optional OUTPUT-BUFFER ERROR-BUFFER ENVVAR)" t)
+(autoload 'with-editor-shell-command "with-editor" "\
+Like `shell-command' or `with-editor-async-shell-command'.
+If COMMAND ends with \"&\" behave like the latter,
+else like the former.
+
+(fn COMMAND &optional OUTPUT-BUFFER ERROR-BUFFER ENVVAR)" t)
+(register-definition-prefixes "with-editor" '("server-" "shell-command" "start-file-process" "with-editor"))
+
+;;; End of scraped data
+
+(provide 'with-editor-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; with-editor-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor-pkg.el b/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor-pkg.el
new file mode 100644
index 0000000..7438a28
--- /dev/null
+++ b/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor-pkg.el
@@ -0,0 +1,13 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "with-editor" "20260731.2234"
+  "Use the Emacsclient as $EDITOR."
+  '((emacs    "28.1")
+    (compat   "31.0")
+    (cond-let "1.1")
+    (llama    "1.0"))
+  :url "https://github.com/magit/with-editor"
+  :commit "a1f92a26e53033ec58e1d2ce9b132da7ebae816e"
+  :revdesc "a1f92a26e530"
+  :keywords '("processes" "terminals")
+  :authors '(("Jonas Bernoulli" . "emacs.with-editor@jonas.bernoulli.dev"))
+  :maintainers '(("Jonas Bernoulli" . "emacs.with-editor@jonas.bernoulli.dev")))
diff --git a/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor.el b/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor.el
new file mode 100644
index 0000000..89e66f3
--- /dev/null
+++ b/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor.el
@@ -0,0 +1,1064 @@
+;;; with-editor.el --- Use the Emacsclient as $EDITOR  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2014-2026 The Magit Project Contributors
+
+;; Author: Jonas Bernoulli <emacs.with-editor@jonas.bernoulli.dev>
+;; Homepage: https://github.com/magit/with-editor
+;; Keywords: processes terminals
+
+;; Package-Version: 20260731.2234
+;; Package-Revision: a1f92a26e530
+;; Package-Requires: (
+;;     (emacs   "28.1")
+;;     (compat  "31.0")
+;;     (cond-let "1.1")
+;;     (llama    "1.0"))
+
+;; SPDX-License-Identifier: GPL-3.0-or-later
+
+;; This file is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published
+;; by the Free Software Foundation, either version 3 of the License,
+;; or (at your option) any later version.
+;;
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this file.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+
+;; This library makes it possible to reliably use the Emacsclient as
+;; the `$EDITOR' of child processes.  It makes sure that they know how
+;; to call home.  For remote processes a substitute is provided, which
+;; communicates with Emacs on standard output/input instead of using a
+;; socket as the Emacsclient does.
+
+;; It provides the commands `with-editor-async-shell-command' and
+;; `with-editor-shell-command', which are intended as replacements
+;; for `async-shell-command' and `shell-command'.  They automatically
+;; export `$EDITOR' making sure the executed command uses the current
+;; Emacs instance as "the editor".  With a prefix argument these
+;; commands prompt for an alternative environment variable such as
+;; `$GIT_EDITOR'.  To always use these variants add this to your init
+;; file:
+;;
+;;   (keymap-global-set "<remap> <async-shell-command>"
+;;                      #'with-editor-async-shell-command)
+;;   (keymap-global-set "<remap> <shell-command>"
+;;                      #'with-editor-shell-command)
+
+;; Alternatively use the global `shell-command-with-editor-mode',
+;; which always sets `$EDITOR' for all Emacs commands which ultimately
+;; use `shell-command' to asynchronously run some shell command.
+
+;; The command `with-editor-export-editor' exports `$EDITOR' or
+;; another such environment variable in `shell-mode', `eshell-mode',
+;; `term-mode', `vterm-mode' and `eat-mode' buffers.  Use this Emacs
+;; command before executing a shell command which needs the editor
+;; set, or always arrange for the current Emacs instance to be used
+;; as editor by adding it to the appropriate mode hooks:
+;;
+;;   (add-hook 'shell-mode-hook  #'with-editor-export-editor)
+;;   (add-hook 'eshell-mode-hook #'with-editor-export-editor)
+;;   (add-hook 'term-exec-hook   #'with-editor-export-editor)
+;;   (add-hook 'vterm-mode-hook  #'with-editor-export-editor)
+;;   (add-hook 'eat-exec-hook    #'with-editor-export-editor)
+
+;; Some variants of this function exist, these two forms are
+;; equivalent:
+;;
+;;   (add-hook 'shell-mode-hook
+;;             (apply-partially #'with-editor-export-editor "GIT_EDITOR"))
+;;   (add-hook 'shell-mode-hook #'with-editor-export-git-editor)
+
+;; This library can also be used by other packages which need to use
+;; the current Emacs instance as editor.  In fact this library was
+;; written for Magit and its `git-commit-mode' and `git-rebase-mode'.
+;; Consult `git-rebase.el' and the related code in `magit-sequence.el'
+;; for a simple example.
+
+;;; Code:
+
+(require 'cl-lib)
+(require 'compat)
+(require 'cond-let)
+(require 'llama)
+(require 'server)
+(require 'shell)
+(eval-when-compile (require 'subr-x))
+
+(declare-function dired-get-filename "dired"
+                  (&optional localp no-error-if-not-filep))
+(declare-function term-emulate-terminal "term" (proc str))
+(defvar eat-terminal)
+(defvar eshell-preoutput-filter-functions)
+(defvar git-commit-post-finish-hook)
+(defvar vterm--process)
+(defvar warning-minimum-level)
+(defvar warning-minimum-log-level)
+
+;;; Options
+
+(defgroup with-editor nil
+  "Use the Emacsclient as $EDITOR."
+  :group 'external
+  :group 'server)
+
+(defun with-editor-locate-emacsclient ()
+  "Search for a suitable Emacsclient executable."
+  (or (with-editor-locate-emacsclient-1
+       (with-editor-emacsclient-path)
+       (length (split-string emacs-version "\\.")))
+      (prog1 nil (display-warning 'with-editor "\
+Cannot determine a suitable Emacsclient
+
+Determining an Emacsclient executable suitable for the
+current Emacs instance failed.  For more information
+please see https://github.com/magit/magit/wiki/Emacsclient."))))
+
+(defvar with-editor-emacsclient-program-suffixes
+  (list "-snapshot" ".emacs-snapshot")
+  "Suffixes to append to append when looking for a Emacsclient executables.")
+
+(defun with-editor-locate-emacsclient-1 (path depth)
+  (let* ((version-lst (cl-subseq (split-string emacs-version "\\.") 0 depth))
+         (version-reg (concat "^" (string-join version-lst "\\."))))
+    (or (locate-file
+         (cond ((equal (downcase invocation-name) "remacs")
+                "remacsclient")
+               ((bound-and-true-p emacsclient-program-name))
+               ("emacsclient"))
+         path
+         (mapcan (lambda (suffix) (mapcar (##concat suffix %) exec-suffixes))
+                 (nconc (and (boundp 'debian-emacs-flavor)
+                             (list (format ".%s" debian-emacs-flavor)))
+                        (cl-mapcon (lambda (ver)
+                                     (setq ver (string-join (reverse ver) "."))
+                                     (list ver
+                                           (concat "-" ver)
+                                           (concat ".emacs" ver)))
+                                   (reverse version-lst))
+                        (cons "" with-editor-emacsclient-program-suffixes)))
+         (lambda (exec)
+           (ignore-errors
+             (string-match-p version-reg
+                             (with-editor-emacsclient-version exec)))))
+        (and (> depth 1)
+             (with-editor-locate-emacsclient-1 path (1- depth))))))
+
+(defun with-editor-emacsclient-version (exec)
+  (let ((default-directory (file-name-directory exec)))
+    (ignore-errors
+      (cadr (split-string (car (process-lines exec "--version")))))))
+
+(defun with-editor-emacsclient-path ()
+  (let ((path exec-path))
+    (when invocation-directory
+      (push (directory-file-name invocation-directory) path)
+      (let* ((linkname (expand-file-name invocation-name invocation-directory))
+             (truename (file-chase-links linkname)))
+        (unless (equal truename linkname)
+          (push (directory-file-name (file-name-directory truename)) path)))
+      (when (eq system-type 'darwin)
+        (let ((dir (expand-file-name "bin" invocation-directory)))
+          (when (file-directory-p dir)
+            (push dir path)))
+        (cond
+          ((string-search "Cellar" invocation-directory)
+           (let ((dir (expand-file-name "../../../bin" invocation-directory)))
+             (when (file-directory-p dir)
+               (push dir path))))
+          ((string-search "Emacs.app" invocation-directory)
+           (let ((dir (expand-file-name "../../../../bin" invocation-directory)))
+             (when (file-directory-p dir)
+               (push dir path)))))))
+    (cl-remove-duplicates path :test #'equal)))
+
+(defcustom with-editor-emacsclient-executable (with-editor-locate-emacsclient)
+  "The Emacsclient executable used by the `with-editor' macro."
+  :group 'with-editor
+  :type '(choice (string :tag "Executable")
+                 (const  :tag "Don't use Emacsclient" nil)))
+
+(defcustom with-editor-sleeping-editor "\
+sh -c '\
+printf \"\\nWITH-EDITOR: $$ OPEN $0\\037$1\\037 IN $(pwd)\\n\"; \
+sleep 604800 & sleep=$!; \
+trap \"kill $sleep; exit 0\" USR1; \
+trap \"kill $sleep; exit 1\" USR2; \
+wait $sleep'"
+  "The sleeping editor, used when the Emacsclient cannot be used.
+
+This fallback is used for asynchronous processes started inside
+the macro `with-editor', when the process runs on a remote machine
+or for local processes when `with-editor-emacsclient-executable'
+is nil (i.e., when no suitable Emacsclient was found, or the user
+decided not to use it).
+
+Where the latter uses a socket to communicate with Emacs' server,
+this substitute prints edit requests to its standard output on
+which a process filter listens for such requests.  As such it is
+not a complete substitute for a proper Emacsclient, it can only
+be used as $EDITOR of child process of the current Emacs instance.
+
+Some shells do not execute traps immediately when waiting for a
+child process, but by default we do use such a blocking child
+process.
+
+If you use such a shell (e.g., `csh' on FreeBSD, but not Debian),
+then you have to edit this option.  You can either replace \"sh\"
+with \"bash\" (and install that), or you can use the older, less
+performant implementation:
+
+  \"sh -c '\\
+  echo -e \\\"\\nWITH-EDITOR: $$ OPEN $0$1 IN $(pwd)\\n\\\"; \\
+  trap \\\"exit 0\\\" USR1; \\
+  trap \\\"exit 1\" USR2; \\
+  while true; do sleep 1; done'\"
+
+Note that the two unit separator characters () right after $0
+and $1 are required.  Normally $0 is the file name and $1 is
+missing or else gets ignored.  But if $0 has the form \"+N[:N]\",
+then it is treated as a position in the file and $1 is expected
+to be the file.
+
+Also note that using this alternative implementation leads to a
+delay of up to a second.  The delay can be shortened by replacing
+\"sleep 1\" with \"sleep 0.01\", or if your implementation does
+not support floats, then by using \"nanosleep\" instead."
+  :package-version '(with-editor . "2.8.0")
+  :group 'with-editor
+  :type 'string)
+
+(defcustom with-editor-finish-query-functions nil
+  "List of functions called to query before finishing session.
+
+The buffer in question is current while the functions are called.
+If any of them returns nil, then the session is not finished and
+the buffer is not killed.  The user should then fix the issue and
+try again.  The functions are called with one argument.  If it is
+non-nil then that indicates that the user used a prefix argument
+to force finishing the session despite issues.  Functions should
+usually honor that and return non-nil."
+  :group 'with-editor
+  :type 'hook)
+(put 'with-editor-finish-query-functions 'permanent-local t)
+
+(defcustom with-editor-cancel-query-functions nil
+  "List of functions called to query before canceling session.
+
+The buffer in question is current while the functions are called.
+If any of them returns nil, then the session is not canceled and
+the buffer is not killed.  The user should then fix the issue and
+try again.  The functions are called with one argument.  If it is
+non-nil then that indicates that the user used a prefix argument
+to force canceling the session despite issues.  Functions should
+usually honor that and return non-nil."
+  :group 'with-editor
+  :type 'hook)
+(put 'with-editor-cancel-query-functions 'permanent-local t)
+
+(defcustom with-editor-mode-lighter " WE"
+  "The mode-line lighter of the With-Editor mode."
+  :group 'with-editor
+  :type '(choice (const :tag "No lighter" "") string))
+
+(defvar with-editor-server-window-alist nil
+  "Alist of filename patterns vs corresponding `server-window'.
+
+Each element looks like (REGEXP . FUNCTION).  Files matching
+REGEXP are selected using FUNCTION instead of the default in
+`server-window'.
+
+Note that when a package adds an entry here then it probably
+has a reason to disrespect `server-window' and it likely is
+not a good idea to change such entries.")
+
+(defvar with-editor-file-name-history-exclude nil
+  "List of regexps for filenames `server-visit' should not remember.
+When a filename matches any of the regexps, then `server-visit'
+does not add it to the variable `file-name-history', which is
+used when reading a filename in the minibuffer.")
+
+(defcustom with-editor-shell-command-use-emacsclient t
+  "Whether to use the emacsclient when running shell commands.
+
+This affects `with-editor-async-shell-command' and, if the input
+ends with \"&\" `with-editor-shell-command' .
+
+If `shell-command-with-editor-mode' is enabled, then it also
+affects `shell-command-async' and, if the input ends with \"&\"
+`shell-command'.
+
+This is a temporary kludge that lets you choose between two
+possible defects, the ones described in the issues #23 and #40.
+
+When t, then use the emacsclient.  This has the disadvantage that
+`with-editor-mode' won't be enabled because we don't know whether
+this package was involved at all in the call to the emacsclient,
+and when it is not, then we really should.  The problem is that
+the emacsclient doesn't pass along any environment variables to
+the server.  This will hopefully be fixed in Emacs eventually.
+
+When nil, then use the sleeping editor.  Because in this case we
+know that this package is involved, we can enable the mode.  But
+this makes it necessary that you invoke $EDITOR in shell scripts
+like so:
+
+  eval \"$EDITOR\" file
+
+And some tools that do not handle $EDITOR properly also break."
+  :package-version '(with-editor . "2.7.1")
+  :group 'with-editor
+  :type 'boolean)
+
+;;; Mode Commands
+
+(defvar with-editor-pre-finish-hook nil)
+(defvar with-editor-pre-cancel-hook nil)
+(defvar with-editor-post-finish-hook nil)
+(defvar with-editor-post-finish-hook-1 nil)
+(defvar with-editor-post-cancel-hook nil)
+(defvar with-editor-post-cancel-hook-1 nil)
+(defvar with-editor-cancel-alist nil)
+(put 'with-editor-pre-finish-hook 'permanent-local t)
+(put 'with-editor-pre-cancel-hook 'permanent-local t)
+(put 'with-editor-post-finish-hook 'permanent-local t)
+(put 'with-editor-post-cancel-hook 'permanent-local t)
+
+(defvar-local with-editor-show-usage t)
+(defvar-local with-editor-cancel-message nil)
+(defvar-local with-editor-previous-winconf nil)
+(put 'with-editor-cancel-message 'permanent-local t)
+(put 'with-editor-previous-winconf 'permanent-local t)
+
+(defvar-local with-editor--pid nil "For internal use.")
+(put 'with-editor--pid 'permanent-local t)
+
+(defun with-editor-finish (force)
+  "Finish the current edit session."
+  (interactive "P")
+  (when (run-hook-with-args-until-failure
+         'with-editor-finish-query-functions force)
+    (let ((post-finish-hook with-editor-post-finish-hook)
+          (post-commit-hook (bound-and-true-p git-commit-post-finish-hook))
+          (dir default-directory))
+      (run-hooks 'with-editor-pre-finish-hook)
+      (with-editor-return nil)
+      (accept-process-output nil 0.1)
+      (with-temp-buffer
+        (setq default-directory dir)
+        (setq-local with-editor-post-finish-hook post-finish-hook)
+        (when post-commit-hook
+          (setq-local git-commit-post-finish-hook post-commit-hook))
+        (run-hooks 'with-editor-post-finish-hook)))))
+
+(defun with-editor-cancel (force)
+  "Cancel the current edit session."
+  (interactive "P")
+  (when (run-hook-with-args-until-failure
+         'with-editor-cancel-query-functions force)
+    (let ((message with-editor-cancel-message))
+      (when (functionp message)
+        (setq message (funcall message)))
+      (let ((post-cancel-hook with-editor-post-cancel-hook)
+            (with-editor-cancel-alist nil)
+            (dir default-directory))
+        (run-hooks 'with-editor-pre-cancel-hook)
+        (with-editor-return t)
+        (accept-process-output nil 0.1)
+        (with-temp-buffer
+          (setq default-directory dir)
+          (setq-local with-editor-post-cancel-hook post-cancel-hook)
+          (run-hooks 'with-editor-post-cancel-hook)))
+      (message (or message "Canceled by user")))))
+
+(defun with-editor-return (cancel)
+  (let ((winconf with-editor-previous-winconf)
+        (clients server-buffer-clients)
+        (dir default-directory)
+        (pid with-editor--pid))
+    (remove-hook 'kill-buffer-query-functions
+                 #'with-editor-kill-buffer-noop t)
+    (cond (cancel
+           (save-buffer)
+           (if clients
+               (let ((buf (current-buffer)))
+                 (dolist (client clients)
+                   (message "client %S" client)
+                   (ignore-errors
+                     (server-send-string client "-error Canceled by user\n"))
+                   (delete-process client))
+                 (when (buffer-live-p buf)
+                   (kill-buffer buf)))
+             ;; Fallback for when emacs was used as $EDITOR
+             ;; instead of emacsclient or the sleeping editor.
+             ;; See https://github.com/magit/magit/issues/2258.
+             (ignore-errors (delete-file buffer-file-name))
+             (kill-buffer)))
+          (t
+           (save-buffer)
+           (if clients
+               ;; Don't use `server-edit' because we do not want to
+               ;; show another buffer belonging to another client.
+               ;; See https://github.com/magit/magit/issues/2197.
+               (server-done)
+             (kill-buffer))))
+    (when pid
+      (let ((default-directory dir))
+        (process-file "kill" nil nil nil
+                      "-s" (if cancel "USR2" "USR1") pid)))
+    (when (and winconf (eq (window-configuration-frame winconf)
+                           (selected-frame)))
+      (set-window-configuration winconf))))
+
+;;; Mode
+
+(defvar-keymap with-editor-mode-map
+  "C-c C-c"                                #'with-editor-finish
+  "<remap> <server-edit>"                  #'with-editor-finish
+  "<remap> <evil-save-and-close>"          #'with-editor-finish
+  "<remap> <evil-save-modified-and-close>" #'with-editor-finish
+  "C-c C-k"                                #'with-editor-cancel
+  "<remap> <kill-buffer>"                  #'with-editor-cancel
+  "<remap> <ido-kill-buffer>"              #'with-editor-cancel
+  "<remap> <iswitchb-kill-buffer>"         #'with-editor-cancel
+  "<remap> <evil-quit>"                    #'with-editor-cancel)
+
+(define-minor-mode with-editor-mode
+  "Edit a file as the $EDITOR of an external process."
+  :lighter with-editor-mode-lighter
+  ;; Protect the user from enabling or disabling the mode interactively.
+  ;; Manually enabling the mode is dangerous because canceling the buffer
+  ;; deletes the visited file.  The mode must not be disabled manually,
+  ;; either `with-editor-finish' or `with-editor-cancel' must be used.
+  :interactive nil                    ; >= 28.1
+  (when (called-interactively-p 'any) ; <  28.1
+    (setq with-editor-mode (not with-editor-mode))
+    (user-error "With-Editor mode is not intended for interactive use"))
+  ;; The buffer must also not be killed using regular kill commands.
+  (add-hook 'kill-buffer-query-functions
+            #'with-editor-kill-buffer-noop nil t)
+  ;; `server-execute' displays a message which is not
+  ;; correct when using this mode.
+  (when with-editor-show-usage
+    (with-editor-usage-message)))
+
+(put 'with-editor-mode 'permanent-local t)
+
+(defun with-editor-kill-buffer-noop ()
+  ;; We started doing this in response to #64, but it is not safe
+  ;; to do so, because the client has already been killed, causing
+  ;; `with-editor-return' (called by `with-editor-cancel') to delete
+  ;; the file, see #66.  The reason we delete the file in the first
+  ;; place are https://github.com/magit/magit/issues/2258 and
+  ;; https://github.com/magit/magit/issues/2248.
+  ;; (if (memq this-command '(save-buffers-kill-terminal
+  ;;                          save-buffers-kill-emacs))
+  ;;     (let ((with-editor-cancel-query-functions nil))
+  ;;       (with-editor-cancel nil)
+  ;;       t)
+  ;;   ...)
+  ;; So go back to always doing this instead:
+  (user-error (substitute-command-keys (format "\
+Don't kill this buffer %S.  Instead cancel using \\[with-editor-cancel]"
+                                               (current-buffer)))))
+
+(defvar-local with-editor-usage-message "\
+Type \\[with-editor-finish] to finish, \
+or \\[with-editor-cancel] to cancel")
+
+(defun with-editor-usage-message ()
+  ;; Run after `server-execute', which is run using
+  ;; a timer which starts immediately.
+  (let ((buffer (current-buffer)))
+    (run-with-timer
+     0.05 nil
+     (lambda ()
+       (with-current-buffer buffer
+         (message (substitute-command-keys with-editor-usage-message)))))))
+
+;;; Wrappers
+
+(defvar with-editor--envvar nil "For internal use.")
+
+(defmacro with-editor (&rest body)
+  "Use the Emacsclient as $EDITOR while evaluating BODY.
+Modify the `process-environment' for processes started in BODY,
+instructing them to use the Emacsclient as $EDITOR.  If optional
+ENVVAR is a literal string then bind that environment variable
+instead.
+\n(fn [ENVVAR] BODY...)"
+  (declare (indent defun) (debug (body)))
+  `(let ((with-editor--envvar ,(if (stringp (car body))
+                                   (pop body)
+                                 '(or with-editor--envvar "EDITOR")))
+         (process-environment process-environment))
+     (with-editor--setup)
+     ,@body))
+
+(defmacro with-editor* (envvar &rest body)
+  "Use the Emacsclient as the editor while evaluating BODY.
+Modify the `process-environment' for processes started in BODY,
+instructing them to use the Emacsclient as editor.  ENVVAR is the
+environment variable that is exported to do so, it is evaluated
+at run-time.
+\n(fn ENVVAR BODY...)"
+  (declare (indent defun) (debug (sexp body)))
+  `(let ((with-editor--envvar ,envvar)
+         (process-environment process-environment))
+     (with-editor--setup)
+     ,@body))
+
+(defun with-editor--setup ()
+  (if (or (not with-editor-emacsclient-executable)
+          (file-remote-p default-directory))
+      (push (concat with-editor--envvar "=" with-editor-sleeping-editor)
+            process-environment)
+    ;; Make sure server-use-tcp's value is valid.
+    (unless (featurep 'make-network-process '(:family local))
+      (setq server-use-tcp t))
+    ;; Make sure the server is running.
+    (unless (process-live-p server-process)
+      (when (server-running-p server-name)
+        (setq server-name (format "server%s" (emacs-pid)))
+        (when (server-running-p server-name)
+          (server-force-delete server-name)))
+      (server-start))
+    ;; Tell $EDITOR to use the Emacsclient.
+    (push (concat with-editor--envvar "="
+                  ;; Quoting is the right thing to do.  Applications that
+                  ;; fail because of that, are the ones that need fixing,
+                  ;; e.g., by using 'eval "$EDITOR" file'.  See #121.
+                  (shell-quote-argument
+                   ;; If users set the executable manually, they might
+                   ;; begin the path with "~", which would get quoted.
+                   (if (string-prefix-p "~" with-editor-emacsclient-executable)
+                       (concat (expand-file-name "~")
+                               (substring with-editor-emacsclient-executable 1))
+                     with-editor-emacsclient-executable))
+                  ;; Tell the process where the server file is.
+                  (and (not server-use-tcp)
+                       (concat " --socket-name="
+                               (shell-quote-argument
+                                (expand-file-name server-name
+                                                  server-socket-dir)))))
+          process-environment)
+    (when server-use-tcp
+      (push (concat "EMACS_SERVER_FILE="
+                    (expand-file-name server-name server-auth-dir))
+            process-environment))
+    ;; As last resort fallback to the sleeping editor.
+    (push (concat "ALTERNATE_EDITOR=" with-editor-sleeping-editor)
+          process-environment)
+    ;; Work around bug in server.el of Emacs < 31.1.  #139
+    (when (member (getenv "TERM") '(nil ""))
+      (setenv "TERM" "dumb"))))
+
+(defun with-editor-server-window ()
+  (or (and buffer-file-name
+           (cdr (cl-find-if (##string-match-p (car %) buffer-file-name)
+                            with-editor-server-window-alist)))
+      server-window))
+
+(define-advice server-switch-buffer
+    (:around (fn &optional next-buffer &rest args)
+             with-editor-server-window-alist)
+  "Honor `with-editor-server-window-alist' (which see)."
+  (let ((server-window (with-current-buffer
+                           (or next-buffer (current-buffer))
+                         (when with-editor-mode
+                           (setq with-editor-previous-winconf
+                                 (current-window-configuration)))
+                         (with-editor-server-window))))
+    (apply fn next-buffer args)))
+
+(define-advice start-file-process
+    (:around (fn name buffer program &rest program-args)
+             with-editor-process-filter)
+  "When called inside a `with-editor' form and the Emacsclient
+cannot be used, then give the process the filter function
+`with-editor-process-filter'.  To avoid overriding the filter
+being added here you should use `with-editor-set-process-filter'
+instead of `set-process-filter' inside `with-editor' forms.
+
+When the `default-directory' is located on a remote machine,
+then also manipulate PROGRAM and PROGRAM-ARGS in order to set
+the appropriate editor environment variable."
+  (if (not with-editor--envvar)
+      (apply fn name buffer program program-args)
+    (when (file-remote-p default-directory)
+      (unless (equal program "env")
+        (push program program-args)
+        (setq program "env"))
+      (push (concat with-editor--envvar "=" with-editor-sleeping-editor)
+            program-args))
+    (let ((process (apply fn name buffer program program-args)))
+      (set-process-filter process #'with-editor-process-filter)
+      (process-put process 'default-dir default-directory)
+      process)))
+
+(advice-add #'make-process :around
+            #'make-process@with-editor-process-filter)
+(cl-defun make-process@with-editor-process-filter
+    (fn &rest keys &key name buffer command coding noquery stop
+        connection-type filter sentinel stderr file-handler
+        &allow-other-keys)
+  "When called inside a `with-editor' form and the Emacsclient
+cannot be used, then give the process the filter function
+`with-editor-process-filter'.  To avoid overriding the filter
+being added here you should use `with-editor-set-process-filter'
+instead of `set-process-filter' inside `with-editor' forms.
+
+When the `default-directory' is located on a remote machine and
+FILE-HANDLER is non-nil, then also manipulate COMMAND in order
+to set the appropriate editor environment variable."
+  (if (or (not file-handler) (not with-editor--envvar))
+      (apply fn keys)
+    (when (file-remote-p default-directory)
+      (unless (equal (car command) "env")
+        (push "env" command))
+      (push (concat with-editor--envvar "=" with-editor-sleeping-editor)
+            (cdr command)))
+    (let* ((filter (if filter
+                       (lambda (process output)
+                         (funcall filter process output)
+                         (with-editor-process-filter process output t))
+                     #'with-editor-process-filter))
+           (process (funcall fn
+                             :name name
+                             :buffer buffer
+                             :command command
+                             :coding coding
+                             :noquery noquery
+                             :stop stop
+                             :connection-type connection-type
+                             :filter filter
+                             :sentinel sentinel
+                             :stderr stderr
+                             :file-handler file-handler)))
+      (process-put process 'default-dir default-directory)
+      process)))
+
+(defun with-editor-set-process-filter (process filter)
+  "Like `set-process-filter' but keep `with-editor-process-filter'.
+Give PROCESS the new FILTER but keep `with-editor-process-filter'
+if that was added earlier by the advised `start-file-process'.
+
+Do so by wrapping the two filter functions using a lambda, which
+becomes the actual filter.  It calls FILTER first, which may or
+may not insert the text into the PROCESS's buffer.  Then it calls
+`with-editor-process-filter', passing t as NO-STANDARD-FILTER."
+  (set-process-filter
+   process
+   (if (eq (process-filter process) 'with-editor-process-filter)
+       `(lambda (proc str)
+          (,filter proc str)
+          (with-editor-process-filter proc str t))
+     filter)))
+
+(defvar with-editor-filter-visit-hook nil)
+
+(defconst with-editor-sleeping-editor-regexp "^\
+WITH-EDITOR: \\([0-9]+\\) \
+OPEN \\([^]+?\\)\
+\\(?:\\([^]*\\)\\)?\
+\\(?: IN \\([^\r]+?\\)\\)?\r?$")
+
+(defvar with-editor--max-incomplete-length 1000)
+
+(defun with-editor-sleeping-editor-filter (process string)
+  (when-let ((incomplete (and process (process-get process 'incomplete))))
+    (setq string (concat incomplete string)))
+  (save-match-data
+    (cond
+      ((and process (not (string-suffix-p "\n" string)))
+       (let ((length (length string)))
+         (when (> length with-editor--max-incomplete-length)
+           (setq string
+                 (substring string
+                            (- length with-editor--max-incomplete-length)))))
+       (process-put process 'incomplete string)
+       nil)
+      ((string-match with-editor-sleeping-editor-regexp string)
+       (when process
+         (process-put process 'incomplete nil))
+       (let ((pid  (match-string 1 string))
+             (arg0 (match-string 2 string))
+             (arg1 (match-string 3 string))
+             (dir  (match-string 4 string))
+             file line column)
+         (cond ((string-match "\\`\\+\\([0-9]+\\)\\(?::\\([0-9]+\\)\\)?\\'" arg0)
+                (setq file arg1)
+                (setq line (string-to-number (match-string 1 arg0)))
+                (setq column (match-string 2 arg0))
+                (setq column (and column (string-to-number column))))
+               ((setq file arg0)))
+         (unless (file-name-absolute-p file)
+           (setq file (expand-file-name file dir)))
+         (when default-directory
+           (setq file (concat (file-remote-p default-directory) file)))
+         (with-current-buffer (find-file-noselect file)
+           (with-editor-mode 1)
+           (setq with-editor--pid pid)
+           (setq with-editor-previous-winconf
+                 (current-window-configuration))
+           (when line
+             (let ((pos (save-excursion
+                          (save-restriction
+                            (goto-char (point-min))
+                            (forward-line (1- line))
+                            (when column
+                              (move-to-column column))
+                            (point)))))
+               (when (and (buffer-narrowed-p)
+                          widen-automatically
+                          (not (<= (point-min) pos (point-max))))
+                 (widen))
+               (goto-char pos)))
+           (run-hooks 'with-editor-filter-visit-hook)
+           (funcall (or (with-editor-server-window) #'switch-to-buffer)
+                    (current-buffer))
+           (kill-local-variable 'server-window)))
+       nil)
+      (t string))))
+
+(defun with-editor-process-filter
+    (process string &optional no-default-filter)
+  "Listen for edit requests by child processes."
+  (let ((default-directory (process-get process 'default-dir)))
+    (with-editor-sleeping-editor-filter process string))
+  (unless no-default-filter
+    (internal-default-process-filter process string)))
+
+(define-advice server-visit-files
+    (:after (files _proc &optional _nowait)
+            with-editor-file-name-history-exclude)
+  "Prevent certain files from being added to `file-name-history'.
+Files matching a regexp in `with-editor-file-name-history-exclude'
+are prevented from being added to that list."
+  (pcase-dolist (`(,file . ,_) files)
+    (when (cl-find-if (##string-match-p % file)
+                      with-editor-file-name-history-exclude)
+      (setq file-name-history
+            (delete (abbreviate-file-name file) file-name-history)))))
+
+;;; Augmentations
+
+;;;###autoload
+(cl-defun with-editor-export-editor
+    (&optional (envvar "EDITOR") process interactive)
+  "Teach subsequent commands to use current Emacs instance as editor.
+
+Set and export the environment variable ENVVAR, by default \"EDITOR\".
+The value is automatically generated to teach commands to use the
+current Emacs instance as \"the editor\".
+
+PROCESS is only intended for use by `eat-exec-hook'.  When invoked
+interactively, INTERACTIVE is non-nil, which supresses the call to
+\"clear\" (only relevant in `vterm-mode' and `eat-mode').
+
+This command can be used in `shell-mode', `term-mode', `eshell-mode',
+`vterm-mode' and `eat-mode'."
+  (interactive (list (with-editor-read-envvar) nil t))
+  (cond
+    ((derived-mode-p 'comint-mode 'term-mode)
+     (when-let ((process (get-buffer-process (current-buffer))))
+       (goto-char (process-mark process))
+       (process-send-string
+        process (format " export %s=%s\n" envvar
+                        (shell-quote-argument with-editor-sleeping-editor)))
+       (while (accept-process-output process 1 nil t))
+       (if (derived-mode-p 'term-mode)
+           (with-editor-set-process-filter process #'with-editor-emulate-terminal)
+         (add-hook 'comint-output-filter-functions #'with-editor-output-filter
+                   nil t))))
+    ((derived-mode-p 'eshell-mode)
+     (add-to-list 'eshell-preoutput-filter-functions
+                  #'with-editor-output-filter)
+     (setenv envvar with-editor-sleeping-editor))
+    ((not with-editor-emacsclient-executable)
+     (if (derived-mode-p 'vterm-mode 'eat-mode)
+         (error "Cannot use sleeping editor in this buffer")
+       (error "Cannot export environment variables in this buffer")))
+    ((and (derived-mode-p 'vterm-mode)
+          (fboundp 'vterm-send-return)
+          (fboundp 'vterm-send-string))
+     (let ((process-environment process-environment)
+           (with-editor--envvar envvar))
+       (with-editor--setup)
+       (while (accept-process-output vterm--process 1 nil t))
+       (when$ (getenv envvar)
+         (vterm-send-string (format " export %s=%S" envvar $))
+         (vterm-send-return))
+       (when$ (getenv "EMACS_SERVER_FILE")
+         (vterm-send-string (format " export EMACS_SERVER_FILE=%S" $))
+         (vterm-send-return))
+       (unless interactive
+         (vterm-send-string " clear")
+         (vterm-send-return))))
+    ((and (derived-mode-p 'eat-mode)
+          (fboundp 'eat-self-input)
+          (fboundp 'eat-term-parameter)
+          (fboundp 'eat-term-send-string))
+     (let* ((process-environment process-environment)
+            ;; `eat-exec-hook' calls this function with one argument.  If
+            ;; (apply-partially #'with-editor-export-editor "SOMEEDITOR"))
+            ;; was added to that hook, we receive that as the PROCESS
+            ;; argument.  However, if this function is called via one of
+            ;; the commands below, then ENVVAR actually is an envvar, and
+            ;; the process has to be determined by other means.
+            (process (cond ((processp envvar)
+                            (prog1 envvar (setq envvar "EDITOR")))
+                           ((processp process) process)
+                           ((eat-term-parameter eat-terminal 'eat--process))))
+            (with-editor--envvar envvar))
+       (with-editor--setup)
+       (while (accept-process-output process 1 nil t))
+       (when$ (getenv envvar)
+         (eat-term-send-string eat-terminal
+                               (format " export %s=%S" envvar $))
+         (eat-self-input 1 'return))
+       (when$ (getenv "EMACS_SERVER_FILE")
+         (eat-term-send-string eat-terminal
+                               (format " export EMACS_SERVER_FILE=%S" $))
+         (eat-self-input 1 'return))
+       (unless interactive
+         (eat-term-send-string eat-terminal "clear")
+         (eat-self-input 1 'return)))))
+  (message "Successfully exported %s" envvar))
+
+;;;###autoload
+(defun with-editor-export-git-editor (&optional process interactive)
+  "Like `with-editor-export-editor' but always set `$GIT_EDITOR'.
+
+PROCESS is only intended for use by `eat-exec-hook'.  When invoked
+interactively, INTERACTIVE is non-nil, which supresses the call to
+\"clear\"."
+  (interactive (list nil t))
+  (with-editor-export-editor "GIT_EDITOR" process interactive))
+
+;;;###autoload
+(defun with-editor-export-hg-editor (&optional process interactive)
+  "Like `with-editor-export-editor' but always set `$HG_EDITOR'.
+
+PROCESS is only intended for use by `eat-exec-hook'.  When invoked
+interactively, INTERACTIVE is non-nil, which supresses the call to
+\"clear\"."
+  (interactive (list nil t))
+  (with-editor-export-editor "HG_EDITOR" process interactive))
+
+(defun with-editor-output-filter (string)
+  "Handle edit requests on behalf of `comint-mode' and `eshell-mode'."
+  (with-editor-sleeping-editor-filter nil string))
+
+(defun with-editor-emulate-terminal (process string)
+  "Like `term-emulate-terminal' but also handle edit requests."
+  (let ((with-editor-sleeping-editor-regexp
+         (substring with-editor-sleeping-editor-regexp 1)))
+    (with-editor-sleeping-editor-filter process string))
+  (term-emulate-terminal process string))
+
+(defvar with-editor-envvars '("EDITOR" "GIT_EDITOR" "HG_EDITOR"))
+
+(cl-defun with-editor-read-envvar
+    (&optional (prompt  "Set environment variable")
+               (default "EDITOR"))
+  (let ((reply (completing-read (if default
+                                    (format "%s (%s): " prompt default)
+                                  (concat prompt ": "))
+                                with-editor-envvars nil nil nil nil default)))
+    (if (string= reply "") (user-error "Nothing selected") reply)))
+
+;;;###autoload
+(define-minor-mode shell-command-with-editor-mode
+  "Teach `shell-command' to use current Emacs instance as editor.
+
+Teach `shell-command', and all commands that ultimately call that
+command, to use the current Emacs instance as editor by executing
+\"EDITOR=CLIENT COMMAND&\" instead of just \"COMMAND&\".
+
+CLIENT is automatically generated; EDITOR=CLIENT instructs
+COMMAND to use to the current Emacs instance as \"the editor\",
+assuming no other variable overrides the effect of \"$EDITOR\".
+CLIENT may be the path to an appropriate emacsclient executable
+with arguments, or a script which also works over Tramp.
+
+Alternatively you can use the `with-editor-async-shell-command',
+which also allows the use of another variable instead of
+\"EDITOR\"."
+  :global t)
+
+;;;###autoload
+(defun with-editor-async-shell-command
+    (command &optional output-buffer error-buffer envvar)
+  "Like `async-shell-command' but with `$EDITOR' set.
+
+Execute string \"ENVVAR=CLIENT COMMAND\" in an inferior shell;
+display output, if any.  With a prefix argument prompt for an
+environment variable, otherwise the default \"EDITOR\" variable
+is used.  With a negative prefix argument additionally insert
+the COMMAND's output at point.
+
+CLIENT is automatically generated; ENVVAR=CLIENT instructs
+COMMAND to use to the current Emacs instance as \"the editor\",
+assuming it respects ENVVAR as an \"EDITOR\"-like variable.
+CLIENT may be the path to an appropriate emacsclient executable
+with arguments, or a script which also works over Tramp.
+
+Also see `async-shell-command' and `shell-command'."
+  (interactive (with-editor-shell-command-read-args "Async shell command: " t))
+  (let ((with-editor--envvar envvar))
+    (with-editor
+      (async-shell-command command output-buffer error-buffer))))
+
+;;;###autoload
+(defun with-editor-shell-command
+    (command &optional output-buffer error-buffer envvar)
+  "Like `shell-command' or `with-editor-async-shell-command'.
+If COMMAND ends with \"&\" behave like the latter,
+else like the former."
+  (interactive (with-editor-shell-command-read-args "Shell command: "))
+  (if (string-match "&[ \t]*\\'" command)
+      (with-editor-async-shell-command
+       command output-buffer error-buffer envvar)
+    (shell-command command output-buffer error-buffer)))
+
+(defun with-editor-shell-command-read-args (prompt &optional async)
+  (let ((command (read-shell-command
+                  prompt nil nil
+                  (let ((filename (or buffer-file-name
+                                      (and (eq major-mode 'dired-mode)
+                                           (dired-get-filename nil t)))))
+                    (and filename (file-relative-name filename))))))
+    (list command
+          (if (or async (setq async (string-match-p "&[ \t]*\\'" command)))
+              (< (prefix-numeric-value current-prefix-arg) 0)
+            current-prefix-arg)
+          shell-command-default-error-buffer
+          (and async current-prefix-arg (with-editor-read-envvar)))))
+
+(define-advice shell-command
+    (:around (fn command &optional output-buffer error-buffer)
+             shell-command-with-editor-mode)
+  "Set editor envvar, if `shell-command-with-editor-mode' is enabled.
+Also take care of that for `with-editor-[async-]shell-command'."
+  ;; `shell-mode' and its hook are intended for buffers in which an
+  ;; interactive shell is running, but `shell-command' also turns on
+  ;; that mode, even though it only runs the shell to run a single
+  ;; command.  The `with-editor-export-editor' hook function is only
+  ;; intended to be used in buffers in which an interactive shell is
+  ;; running, so it has to be removed here.
+  (let ((shell-mode-hook (remove 'with-editor-export-editor shell-mode-hook)))
+    (cond
+      ;; If `with-editor-async-shell-command' was used, then `with-editor'
+      ;; was used, and `with-editor--envvar'.  `with-editor-shell-command'
+      ;; only goes down that path if the command ends with "&".  We might
+      ;; still have to use `with-editor' here, for `async-shell-command'
+      ;; or `shell-command', if the mode is enabled.
+      ((and (string-suffix-p "&" command)
+            (or with-editor--envvar
+                shell-command-with-editor-mode))
+       (if with-editor--envvar
+           (funcall fn command output-buffer error-buffer)
+         (with-editor (funcall fn command output-buffer error-buffer)))
+       ;; The comint filter was overridden with our filter.  Use both.
+       (and-let ((process (get-buffer-process
+                           (or output-buffer
+                               (get-buffer "*Async Shell Command*")))))
+         (prog1 process
+           (add-function :after (process-filter process)
+                         (lambda (proc str)
+                           (with-editor-process-filter proc str t))))))
+      ((funcall fn command output-buffer error-buffer)))))
+
+;;; _
+
+(defun with-editor-debug ()
+  "Debug configuration issues.
+See info node `(with-editor)Debugging' for instructions."
+  (interactive)
+  (require 'warnings)
+  (with-current-buffer (get-buffer-create "*with-editor-debug*")
+    (pop-to-buffer (current-buffer))
+    (erase-buffer)
+    (ignore-errors (with-editor))
+    (insert
+     (format "with-editor: %s\n" (locate-library "with-editor.el"))
+     (format "emacs: %s (%s)\n"
+             (expand-file-name invocation-name invocation-directory)
+             emacs-version)
+     "system:\n"
+     (format "  system-type: %s\n" system-type)
+     (format "  system-configuration: %s\n" system-configuration)
+     (format "  system-configuration-options: %s\n" system-configuration-options)
+     "server:\n"
+     (format "  server-running-p: %s\n" (server-running-p))
+     (format "  server-process: %S\n" server-process)
+     (format "  server-use-tcp: %s\n" server-use-tcp)
+     (format "  server-name: %s\n" server-name)
+     (format "  server-socket-dir: %s\n" server-socket-dir))
+    (if (and server-socket-dir (file-accessible-directory-p server-socket-dir))
+        (dolist (file (directory-files server-socket-dir nil "^[^.]"))
+          (insert (format "    %s\n" file)))
+      (insert (format "    %s: not an accessible directory\n"
+                      (if server-use-tcp "WARNING" "ERROR"))))
+    (insert (format "  server-auth-dir: %s\n" server-auth-dir))
+    (if (file-accessible-directory-p server-auth-dir)
+        (dolist (file (directory-files server-auth-dir nil "^[^.]"))
+          (insert (format "    %s\n" file)))
+      (insert (format "    %s: not an accessible directory\n"
+                      (if server-use-tcp "ERROR" "WARNING"))))
+    (let ((val with-editor-emacsclient-executable)
+          (def (default-value 'with-editor-emacsclient-executable))
+          (fun (let ((warning-minimum-level :error)
+                     (warning-minimum-log-level :error))
+                 (with-editor-locate-emacsclient))))
+      (insert "with-editor-emacsclient-executable:\n"
+              (format " value:   %s (%s)\n" val
+                      (and val (with-editor-emacsclient-version val)))
+              (format " default: %s (%s)\n" def
+                      (and def (with-editor-emacsclient-version def)))
+              (format " funcall: %s (%s)\n" fun
+                      (and fun (with-editor-emacsclient-version fun)))))
+    (insert "path:\n"
+            (format "  $PATH:     %s\n" (split-string (getenv "PATH") ":"))
+            (format "  exec-path: %s\n" exec-path))
+    (insert (format "  with-editor-emacsclient-path:\n"))
+    (dolist (dir (with-editor-emacsclient-path))
+      (insert (format "    %s (%s)\n" dir (car (file-attributes dir))))
+      (when (file-directory-p dir)
+        ;; Don't match emacsclientw.exe, it makes popup windows.
+        (dolist (exec (directory-files dir t "emacsclient\\(?:[^w]\\|\\'\\)"))
+          (insert (format "      %s (%s)\n" exec
+                          (with-editor-emacsclient-version exec))))))))
+
+(defconst with-editor-font-lock-keywords
+  '(("(\\(with-\\(?:git-\\)?editor\\)\\_>" (1 'font-lock-keyword-face))))
+(font-lock-add-keywords 'emacs-lisp-mode with-editor-font-lock-keywords)
+
+(provide 'with-editor)
+;; Local Variables:
+;; byte-compile-warnings: (not docstrings-control-chars)
+;; indent-tabs-mode: nil
+;; lisp-indent-local-overrides: ((cond . 0) (interactive . 0))
+;; read-symbol-shorthands: (
+;;   ("and$"         . "cond-let--and$")
+;;   ("thread$"      . "cond-let--thread$")
+;;   ("when$"        . "cond-let--when$")
+;;   ("and-let*"     . "cond-let--and-let*")
+;;   ("and-let"      . "cond-let--and-let")
+;;   ("if-let*"      . "cond-let--if-let*")
+;;   ("if-let"       . "cond-let--if-let")
+;;   ("when-let*"    . "cond-let--when-let*")
+;;   ("when-let"     . "cond-let--when-let")
+;;   ("while-let*"   . "cond-let--while-let*")
+;;   ("while-let"    . "cond-let--while-let")
+;;   ("match-string" . "match-string")
+;;   ("match-str"    . "match-string-no-properties"))
+;; End:
+;;; with-editor.el ends here
diff --git a/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor.elc b/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor.elc
new file mode 100644
index 0000000..cf072bb
Binary files /dev/null and b/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor.elc differ
diff --git a/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor.info b/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor.info
new file mode 100644
index 0000000..0d25bc8
--- /dev/null
+++ b/emacs/.emacs.d/elpa/with-editor-20260731.2234/with-editor.info
@@ -0,0 +1,410 @@
+This is with-editor.info, produced by makeinfo version 7.1.1 from
+with-editor.texi.
+
+     Copyright (C) 2015-2026 Jonas Bernoulli
+     <emacs.with-editor@jonas.bernoulli.dev>
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* With-Editor: (with-editor). Using the Emacsclient as $EDITOR.
+END-INFO-DIR-ENTRY
+
+
+File: with-editor.info,  Node: Top,  Next: Using the With-Editor package,  Up: (dir)
+
+With-Editor User Manual
+***********************
+
+The library ‘with-editor’ makes it easy to use the Emacsclient as the
+‘$EDITOR’ of child processes, making sure they know how to call home.
+For remote processes a substitute is provided, which communicates with
+Emacs on standard output instead of using a socket as the Emacsclient
+does.
+
+   This library was written because Magit has to be able to do the above
+to allow the user to edit commit messages gracefully and to edit rebase
+sequences, which wouldn't be possible at all otherwise.
+
+   Because other packages can benefit from such functionality, this
+library is made available as a separate package.  It also defines some
+additional functionality which makes it useful even for end-users, who
+don't use Magit or another package which uses it internally.
+
+This manual is for With-Editor version 3.5.3.
+
+     Copyright (C) 2015-2026 Jonas Bernoulli
+     <emacs.with-editor@jonas.bernoulli.dev>
+
+     You can redistribute this document and/or modify it under the terms
+     of the GNU General Public License as published by the Free Software
+     Foundation, either version 3 of the License, or (at your option)
+     any later version.
+
+     This document is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+     General Public License for more details.
+
+* Menu:
+
+* Using the With-Editor package::
+* Using With-Editor as a library::
+* Debugging::
+* FAQ::
+* Function and Command Index::
+* Variable Index::
+
+-- The Detailed Node Listing --
+
+Using the With-Editor package
+
+* Configuring With-Editor::
+* Using With-Editor commands::
+
+FAQ
+
+* I am unable to commit with Magit::
+
+
+
+File: with-editor.info,  Node: Using the With-Editor package,  Next: Using With-Editor as a library,  Prev: Top,  Up: Top
+
+1 Using the With-Editor package
+*******************************
+
+The ‘With-Editor’ package is used internally by Magit when editing
+commit messages and rebase sequences.  It also provides some commands
+and features which are useful by themselves, even if you don't use
+Magit.
+
+   For information about using this library in your own package, see
+*note Using With-Editor as a library::.
+
+* Menu:
+
+* Configuring With-Editor::
+* Using With-Editor commands::
+
+
+File: with-editor.info,  Node: Configuring With-Editor,  Next: Using With-Editor commands,  Up: Using the With-Editor package
+
+1.1 Configuring With-Editor
+===========================
+
+With-Editor tries very hard to locate a suitable ‘emacsclient’
+executable, so ideally you should never have to customize the option
+‘with-editor-emacsclient-executable’.  When it fails to do so, then the
+most likely reason is that someone found yet another way to package
+Emacs (most likely on macOS) without putting the executable on ‘$PATH’,
+and we have to add another kludge to find it anyway.
+
+ -- User Option: with-editor-emacsclient-executable
+     The ‘emacsclient’ executable used as the editor by child processes
+     of this Emacs instance.  By using this executable, child processes
+     can call home to their parent process.
+
+     This option is automatically set at startup by looking in
+     ‘exec-path’, and other places where the executable could be
+     installed, to find the ‘emacsclient’ executable most suitable for
+     the current Emacs instance.
+
+     You should *not* customize this option permanently.  If you have to
+     do it, then you should consider that a temporary kludge and inform
+     the Magit maintainer as described in *note Debugging: Debugging.
+
+     If With-Editor fails to find a suitable ‘emacsclient’ on your
+     system, then this should be fixed for all users at once, by
+     teaching ‘with-editor-locate-emacsclient’ how to do so on your
+     system and systems like yours.  Doing it this way has the
+     advantage, that you won't have do it again every time you update
+     Emacs, and that other users who have installed Emacs the same way
+     as you have, won't have to go through the same trouble.
+
+     Note that there also is a nuclear option; setting this variable to
+     ‘nil’ causes the "sleeping editor" described below to be used even
+     for local child processes.  Obviously we don't recommend that you
+     use this except in "emergencies", i.e., before we had a change to
+     add a kludge appropriate for your setup.
+
+ -- Function: with-editor-locate-emacsclient
+     The function used to set the initial value of the option
+     ‘with-editor-emacsclient-executable’.  There's a lot of voodoo
+     here.
+
+   The ‘emacsclient’ cannot be used when using Tramp to run a process on
+a remote machine.  (Theoretically it could, but that would be hard to
+setup, very fragile, and rather insecure).
+
+   With-Editor provides an alternative "editor" which can be used by
+remote processes in much the same way as local processes use an
+‘emacsclient’ executable.  This alternative is known as the "sleeping
+editor" because it is implemented as a shell script which sleeps until
+it receives a signal.
+
+ -- User Option: with-editor-sleeping-editor
+     The sleeping editor is a shell script used as the editor of child
+     processes when the ‘emacsclient’ executable cannot be used.
+
+     This fallback is used for asynchronous processes started inside the
+     macro ‘with-editor’, when the process runs on a remote machine or
+     for local processes when ‘with-editor-emacsclient-executable’ is
+     ‘nil’.
+
+     Where the latter uses a socket to communicate with Emacs' server,
+     this substitute prints edit requests to its standard output on
+     which a process filter listens for such requests.  As such it is
+     not a complete substitute for a proper ‘emacsclient’, it can only
+     be used as ‘$EDITOR’ of child process of the current Emacs
+     instance.
+
+     Some shells do not execute traps immediately when waiting for a
+     child process, but by default we do use such a blocking child
+     process.
+
+     If you use such a shell (e.g., ‘csh’ on FreeBSD, but not Debian),
+     then you have to edit this option.  You can either replace ‘sh’
+     with ‘bash’ (and install that), or you can use the older, less
+     performant implementation:
+
+          "sh -c '\
+          echo \"WITH-EDITOR: $$ OPEN $0$1 IN $(pwd)\"; \
+          trap \"exit 0\" USR1; \
+          trap \"exit 1\" USR2; \
+          while true; do sleep 1; done'"
+
+     Note that the unit separator character () right after the file name
+     ($0) is required.
+
+     Also note that using this alternative implementation leads to a
+     delay of up to a second.  The delay can be shortened by replacing
+     ‘sleep 1’ with ‘sleep 0.01’, or if your implementation does not
+     support floats, then by using ‘nanosleep’ instead.
+
+
+File: with-editor.info,  Node: Using With-Editor commands,  Prev: Configuring With-Editor,  Up: Using the With-Editor package
+
+1.2 Using With-Editor commands
+==============================
+
+This section describes how to use the ‘with-editor’ library _outside_ of
+Magit.  You don't need to know any of this just to create commits using
+Magit.
+
+   The commands ‘with-editor-async-shell-command’ and
+‘with-editor-shell-command’ are intended as drop in replacements for
+‘async-shell-command’ and ‘shell-command’.  They automatically export
+‘$EDITOR’ making sure the executed command uses the current Emacs
+instance as "the editor".  With a prefix argument these commands prompt
+for an alternative environment variable such as ‘$GIT_EDITOR’.
+
+ -- Command: with-editor-async-shell-command
+     This command is like ‘async-shell-command’, but it runs the shell
+     command with the current Emacs instance exported as ‘$EDITOR’.
+
+ -- Command: with-editor-shell-command
+     This command is like ‘shell-command’, but if the shell command ends
+     with ‘&’ and is therefore run asynchronously, then the current
+     Emacs instance is exported as ‘$EDITOR’.
+
+   To always use these variants add this to your init file:
+
+     (keymap-global-set "<remap> <async-shell-command>"
+                        #'with-editor-async-shell-command)
+     (keymap-global-set "<remap> <shell-command>"
+                        #'with-editor-shell-command)
+
+   Alternatively use the global ‘shell-command-with-editor-mode’.
+
+ -- Variable: shell-command-with-editor-mode
+     When this mode is active, then ‘$EDITOR’ is exported whenever
+     ultimately ‘shell-command’ is called to asynchronously run some
+     shell command.  This affects most variants of that command, whether
+     they are defined in Emacs or in some third-party package.
+
+   The command ‘with-editor-export-editor’ exports ‘$EDITOR’ or another
+such environment variable in ‘shell-mode’, ‘eshell-mode’, ‘term-mode’,
+‘vterm-mode’ and ‘eat-mode’ buffers.  Use this Emacs command before
+executing a shell command which needs the editor set, or always arrange
+for the current Emacs instance to be used as editor by adding it to the
+appropriate mode hooks:
+
+     (add-hook 'shell-mode-hook  #'with-editor-export-editor)
+     (add-hook 'eshell-mode-hook #'with-editor-export-editor)
+     (add-hook 'term-exec-hook   #'with-editor-export-editor)
+     (add-hook 'vterm-mode-hook  #'with-editor-export-editor)
+     (add-hook 'eat-exec-hook    #'with-editor-export-editor)
+
+   Some variants of this function exist; these two forms are equivalent:
+
+     (add-hook 'shell-mode-hook
+               (apply-partially #'with-editor-export-editor "GIT_EDITOR"))
+     (add-hook 'shell-mode-hook #'with-editor-export-git-editor)
+
+ -- Command: with-editor-export-editor
+     When invoked in a ‘shell-mode’, ‘eshell-mode’, ‘term-mode’ or
+     ‘vterm-mode’ buffer, this command teaches shell commands to use the
+     current Emacs instance as the editor, by exporting ‘$EDITOR’.
+
+ -- Command: with-editor-export-git-editor
+     This command is like ‘with-editor-export-editor’ but exports
+     ‘$GIT_EDITOR’.
+
+ -- Command: with-editor-export-hg-editor
+     This command is like ‘with-editor-export-editor’ but exports
+     ‘$HG_EDITOR’.
+
+
+File: with-editor.info,  Node: Using With-Editor as a library,  Next: Debugging,  Prev: Using the With-Editor package,  Up: Top
+
+2 Using With-Editor as a library
+********************************
+
+This section describes how to use the ‘with-editor’ library _outside_ of
+Magit to teach another package how to have its child processes call
+home, just like Magit does.  You don't need to know any of this just to
+create commits using Magit.  You can also ignore this if you use
+‘with-editor’ outside of Magit, but only as an end-user.
+
+   For information about interactive use and options that affect both
+interactive and non-interactive use, see *note Using the With-Editor
+package::.
+
+ -- Macro: with-editor &rest body
+     This macro arranges for the ‘emacsclient’ or the sleeping editor to
+     be used as the editor of child processes, effectively teaching them
+     to call home to the current Emacs instance when they require that
+     the user edits a file.
+
+     This is done by establishing a local binding for
+     ‘process-environment’ and changing the value of the ‘EDITOR’
+     environment variable in that scope.  This affects all
+     (asynchronous) processes started by forms (dynamically) inside
+     BODY.
+
+     If BODY begins with a literal string, then that variable is set
+     instead of ‘EDITOR’.
+
+ -- Macro: with-editor* envvar &rest body
+     This macro is like ‘with-editor’, except that the ENVVAR argument
+     is required and that it is evaluated at run-time.
+
+ -- Function: with-editor-set-process-filter process filter
+     This function is like ‘set-process-filter’ but ensures that adding
+     the new FILTER does not remove the ‘with-editor-process-filter’.
+     This is done by wrapping the two filter functions using a lambda,
+     which becomes the actual filter.  It calls FILTER first, which may
+     or may not insert the text into the PROCESS's buffer.  Then it
+     calls ‘with-editor-process-filter’, passing ‘t’ as
+     NO-STANDARD-FILTER.
+
+
+File: with-editor.info,  Node: Debugging,  Next: FAQ,  Prev: Using With-Editor as a library,  Up: Top
+
+3 Debugging
+***********
+
+With-Editor tries very hard to locate a suitable ‘emacsclient’
+executable, and then sets option ‘with-editor-emacsclient-executable’
+accordingly.  In very rare cases this fails.  When it does fail, then
+the most likely reason is that someone found yet another way to package
+Emacs (most likely on macOS) without putting the executable on ‘$PATH’,
+and we have to add another kludge to find it anyway.
+
+   If you are having problems using ‘with-editor’, e.g., you cannot
+commit in Magit, then please open a new issue at
+<https://github.com/magit/with-editor/issues> and provide information
+about your Emacs installation.  Most importantly how did you install
+Emacs and what is the output of ‘M-x with-editor-debug RET’.
+
+
+File: with-editor.info,  Node: FAQ,  Next: Function and Command Index,  Prev: Debugging,  Up: Top
+
+Appendix A FAQ
+**************
+
+* Menu:
+
+* I am unable to commit with Magit::
+
+
+File: with-editor.info,  Node: I am unable to commit with Magit,  Up: FAQ
+
+A.1 I am unable to commit with Magit
+====================================
+
+See *note Debugging::.
+
+
+File: with-editor.info,  Node: Function and Command Index,  Next: Variable Index,  Prev: FAQ,  Up: Top
+
+Appendix B Function and Command Index
+*************************************
+
+[index]
+* Menu:
+
+* with-editor:                           Using With-Editor as a library.
+                                                               (line 16)
+* with-editor-async-shell-command:       Using With-Editor commands.
+                                                               (line 17)
+* with-editor-export-editor:             Using With-Editor commands.
+                                                               (line 60)
+* with-editor-export-git-editor:         Using With-Editor commands.
+                                                               (line 65)
+* with-editor-export-hg-editor:          Using With-Editor commands.
+                                                               (line 69)
+* with-editor-locate-emacsclient:        Configuring With-Editor.
+                                                               (line 41)
+* with-editor-set-process-filter:        Using With-Editor as a library.
+                                                               (line 35)
+* with-editor-shell-command:             Using With-Editor commands.
+                                                               (line 21)
+* with-editor*:                          Using With-Editor as a library.
+                                                               (line 31)
+
+
+File: with-editor.info,  Node: Variable Index,  Prev: Function and Command Index,  Up: Top
+
+Appendix C Variable Index
+*************************
+
+[index]
+* Menu:
+
+* shell-command-with-editor-mode:        Using With-Editor commands.
+                                                               (line 35)
+* with-editor-emacsclient-executable:    Configuring With-Editor.
+                                                               (line 13)
+* with-editor-sleeping-editor:           Configuring With-Editor.
+                                                               (line 56)
+
+
+
+Tag Table:
+Node: Top801
+Node: Using the With-Editor package2662
+Node: Configuring With-Editor3247
+Node: Using With-Editor commands7802
+Node: Using With-Editor as a library11186
+Node: Debugging13214
+Node: FAQ14083
+Node: I am unable to commit with Magit14262
+Node: Function and Command Index14438
+Node: Variable Index15930
+
+End Tag Table
+
+
+Local Variables:
+coding: utf-8
+End:
diff --git a/emacs/.emacs.d/elpa/yaml-20260605.834/yaml-autoloads.el b/emacs/.emacs.d/elpa/yaml-20260605.834/yaml-autoloads.el
new file mode 100644
index 0000000..5dfa651
--- /dev/null
+++ b/emacs/.emacs.d/elpa/yaml-20260605.834/yaml-autoloads.el
@@ -0,0 +1,28 @@
+;;; yaml-autoloads.el --- automatically extracted autoloads (do not edit)   -*- lexical-binding: t -*-
+;; Generated by the `loaddefs-generate' function.
+
+;; This file is part of GNU Emacs.
+
+;;; Code:
+
+(add-to-list 'load-path (or (and load-file-name (directory-file-name (file-name-directory load-file-name))) (car load-path)))
+
+
+
+;;; Generated autoloads from yaml.el
+
+(register-definition-prefixes "yaml" '("yaml-"))
+
+;;; End of scraped data
+
+(provide 'yaml-autoloads)
+
+;; Local Variables:
+;; version-control: never
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; coding: utf-8-emacs-unix
+;; End:
+
+;;; yaml-autoloads.el ends here
diff --git a/emacs/.emacs.d/elpa/yaml-20260605.834/yaml-pkg.el b/emacs/.emacs.d/elpa/yaml-20260605.834/yaml-pkg.el
new file mode 100644
index 0000000..15dfd41
--- /dev/null
+++ b/emacs/.emacs.d/elpa/yaml-20260605.834/yaml-pkg.el
@@ -0,0 +1,10 @@
+;; -*- no-byte-compile: t; lexical-binding: nil -*-
+(define-package "yaml" "20260605.834"
+  "YAML parser for Elisp."
+  '((emacs "25.1"))
+  :url "https://github.com/zkry/yaml.el"
+  :commit "5546f36bde24a9a8c1934e0f6ce205cd41d72537"
+  :revdesc "5546f36bde24"
+  :keywords '("tools")
+  :authors '(("Zachary Romero" . "zkry@posteo.org"))
+  :maintainers '(("Zachary Romero" . "zkry@posteo.org")))
diff --git a/emacs/.emacs.d/elpa/yaml-20260605.834/yaml.el b/emacs/.emacs.d/elpa/yaml-20260605.834/yaml.el
new file mode 100644
index 0000000..f6a49ac
--- /dev/null
+++ b/emacs/.emacs.d/elpa/yaml-20260605.834/yaml.el
@@ -0,0 +1,2795 @@
+;;; yaml.el --- YAML parser for Elisp -*- lexical-binding: t -*-
+
+;; Copyright © 2021-2025  Free Software Foundation, Inc.
+
+;; Author: Zachary Romero <zkry@posteo.org>
+;; Package-Version: 20260605.834
+;; Package-Revision: 5546f36bde24
+;; Homepage: https://github.com/zkry/yaml.el
+;; Package-Requires: ((emacs "25.1"))
+;; Keywords: tools
+
+;; yaml.el requires at least GNU Emacs 25.1
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; For a full copy of the GNU General Public License
+;; see <http://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+
+;; yaml.el contains the code for parsing YAML natively in Elisp with
+;; no dependencies.  The main function to parse YAML provided is
+;; `yaml-parse-string'.  `yaml-encode' is also provided to encode a
+;; Lisp object to YAML.  The following are some examples of its usage:
+;;
+;; (yaml-parse-string "key1: value1\nkey2: value2")
+;; (yaml-parse-string "key1: value1\nkey2: value2" :object-type 'alist)
+;; (yaml-parse-string "numbers: [1, 2, 3]" :sequence-type 'list)
+;;
+;; (yaml-encode '((count . 3) (value . 10) (items ("ruby" "diamond"))))
+
+;;; Code:
+
+(require 'subr-x)
+(require 'seq)
+(require 'cl-lib)
+
+(defconst yaml-parser-version "0.5.1")
+
+
+(defvar yaml-encode-dialect :auto "yaml-encode-dialect. one of :auto, :kyaml-pretty, :kyaml-compact")
+(defvar yaml-encode-indent-width 2 "Number of spaces per indentation. Valid values >=2")
+
+(defvar yaml--encode-use-flow-sequence t
+  "Turn on encoding sequence of scalars as flow sequence.")
+
+(defvar yaml--parse-debug nil
+  "Turn on debugging messages when parsing YAML when non-nil.
+
+This flag is intended for development purposes.")
+
+(defconst yaml--tracing-ignore '(s-space
+                                 s-tab
+                                 s-white
+                                 l-comment
+                                 b-break
+                                 b-line-feed
+                                 b-carriage-return
+                                 s-b-comment
+                                 b-comment
+                                 l-comment
+                                 ns-char
+                                 nb-char
+                                 b-char
+                                 c-printable
+                                 b-as-space))
+
+(defvar yaml--parsing-input ""
+  "The string content of the current item being processed.")
+(defvar yaml--parsing-position 0
+  "The position that the parser is currently looking at.")
+(defvar yaml--states nil
+  "Stack of parsing states.")
+
+(defvar yaml--parsing-object-type nil)
+(defvar yaml--parsing-object-key-type nil)
+(defvar yaml--parsing-sequence-type nil)
+(defvar yaml--parsing-null-object nil)
+(defvar yaml--parsing-false-object nil)
+(defvar yaml--parsing-store-position nil)
+(defvar yaml--string-values nil)
+
+(cl-defstruct (yaml--state (:constructor yaml--state-create)
+                           (:copier nil))
+  doc tt m (name nil :type symbol) lvl beg end)
+
+(defmacro yaml--parse (data &rest forms)
+  "Parse DATA according to FORMS."
+  (declare (indent defun))
+  `(progn (setq yaml--parsing-input ,data)
+          (setq yaml--parsing-position 0)
+          (yaml--initialize-state)
+          ,@forms))
+
+(defun yaml--state-curr ()
+  "Return the current state."
+  (or (car yaml--states)
+      (yaml--state-create
+       :name nil :doc nil :lvl 0 :beg 0 :end 0 :m nil :tt nil)))
+
+(defun yaml--state-set-m (val)
+  "Set the current value of `m' to VAL."
+  (let* ((states yaml--states))
+    (while states
+      (let* ((top-state (car states))
+             (new-state (yaml--state-create :doc (yaml--state-doc top-state)
+                                            :tt (yaml--state-tt top-state)
+                                            :m val
+                                            :name (yaml--state-name top-state)
+                                            :lvl (yaml--state-lvl top-state)
+                                            :beg (yaml--state-beg top-state)
+                                            :end (yaml--state-end top-state))))
+        (setcar states new-state))
+      (setq states (cdr states)))))
+
+(defun yaml--state-set-t (val)
+  "Set the current value of t to VAL."
+  (let* ((states yaml--states))
+    (while states
+      (let* ((top-state (car states))
+             (new-state (yaml--state-create :doc (yaml--state-doc top-state)
+                                            :tt val
+                                            :m (yaml--state-m top-state)
+                                            :name (yaml--state-name top-state)
+                                            :lvl (yaml--state-lvl top-state)
+                                            :beg (yaml--state-beg top-state)
+                                            :end (yaml--state-end top-state))))
+        (setcar states new-state))
+      (setq states (cdr states)))))
+
+(defun yaml--state-curr-doc ()
+  "Return the doc property of current state."
+  (yaml--state-doc (yaml--state-curr)))
+
+(defun yaml--state-curr-t ()
+  "Return the doc property of current state."
+  (yaml--state-tt (yaml--state-curr)))
+
+(defun yaml--state-curr-m ()
+  "Return the doc property of current state."
+  (or (yaml--state-m (yaml--state-curr)) 1))
+
+(defun yaml--state-curr-end ()
+  "Return the doc property of current state."
+  (yaml--state-end (yaml--state-curr)))
+
+(defun yaml--push-state (name)
+  "Add a new state frame with NAME."
+  (let* ((curr-state (yaml--state-curr))
+         (new-state (yaml--state-create
+                     :doc (yaml--state-curr-doc)
+                     :tt (yaml--state-curr-t)
+                     :m (yaml--state-curr-m)
+                     :name name
+                     :lvl (1+ (yaml--state-lvl curr-state))
+                     :beg yaml--parsing-position
+                     :end nil)))
+    (push new-state yaml--states)))
+
+(defun yaml--pop-state ()
+  "Pop the current state."
+  (let ((popped-state (car yaml--states)))
+    (setq yaml--states (cdr yaml--states))
+    (let ((top-state (car yaml--states)))
+      (when top-state
+        (setcar yaml--states
+                (yaml--state-create :doc (yaml--state-doc top-state)
+                                    :tt (yaml--state-tt top-state)
+                                    :m (yaml--state-m top-state)
+                                    :name (yaml--state-name top-state)
+                                    :lvl (yaml--state-lvl top-state)
+                                    :beg (yaml--state-beg popped-state)
+                                    :end yaml--parsing-position))))))
+
+(defun yaml--initialize-state ()
+  "Initialize the yaml state for parsing."
+  (setq yaml--states
+        (list (yaml--state-create :doc nil
+                                  :tt nil
+                                  :m nil
+                                  :name nil
+                                  :lvl 0
+                                  :beg nil
+                                  :end nil))))
+
+(defconst yaml--grammar-resolution-rules
+  '((ns-plain . literal))
+  "Alist determining how to resolve grammar rule.")
+
+;;; Receiver Functions
+
+(defvar yaml--document-start-version nil)
+(defvar yaml--document-start-explicit nil)
+(defvar yaml--document-end-explicit nil)
+(defvar yaml--tag-map nil)
+(defvar yaml--tag-handle nil)
+(defvar yaml--document-end nil)
+
+(defvar yaml--cache nil
+  "Stack of data for temporary calculations.")
+(defvar yaml--object-stack nil
+  "Stack of objects currently being build.")
+(defvar yaml--state-stack nil
+  "The state that the YAML parser is with regards to incoming events.")
+(defvar yaml--root nil)
+
+(defvar yaml--anchor-mappings nil
+  "Hashmap containing the anchor mappings of the current parsing run.")
+(defvar yaml--resolve-aliases nil
+  "Flag determining if the event processing should attempt to resolve aliases.")
+
+(defun yaml--parse-block-header (header)
+  "Parse the HEADER string returning chomping style and indent count."
+  (let* ((pos 0)
+         (chomp-indicator :clip)
+         (indentation-indicator nil)
+         (char (and (< pos (length header)) (aref header pos)))
+         (process-char (lambda (char)
+                         (when char
+                           (cond
+                            ((< ?0 char ?9)
+                             (progn (setq indentation-indicator (- char ?0))))
+                            ((equal char ?\-) (setq chomp-indicator :strip))
+                            ((equal char ?\+) (setq chomp-indicator :keep)))
+                           (setq pos (1+ pos))))))
+    (when (or (eq char ?\|) (eq char ?\>))
+      (setq pos (1+ pos))
+      (setq char (and (< pos (length header)) (aref header pos))))
+    (funcall process-char char)
+    (let ((char (and (< pos (length header)) (aref header pos)))) ;
+      (funcall process-char char)
+      (list chomp-indicator indentation-indicator))))
+
+(defun yaml--chomp-text (text-body chomp)
+  "Change the ending newline of TEXT-BODY based on CHOMP."
+  (cond ((eq :clip chomp)
+         (concat (replace-regexp-in-string "\n*\\'" "" text-body) "\n"))
+        ((eq :strip chomp)
+         (replace-regexp-in-string "\n*\\'" "" text-body))
+        ((eq :keep chomp)
+         text-body)))
+
+(defun yaml--process-folded-text (text)
+  "Remove the header line for a folded match and return TEXT body formatted."
+  (let* ((text (yaml--process-literal-text text))
+         (done))
+    (while (not done)
+      (let ((replaced (replace-regexp-in-string "\\([^\n]\\)\n\\([^\n ]\\)"
+                                                "\\1 \\2"
+                                                text)))
+        (when (equal replaced text)
+          (setq done t))
+        (setq text replaced)))
+    (replace-regexp-in-string
+     "\\(\\(?:^\\|\n\\)[^ \n][^\n]*\\)\n\\(\n+\\)\\([^\n ]\\)" "\\1\\2\\3"
+     text)))
+
+(defun yaml--process-literal-text (text)
+  "Remove the header line for a folded match and return TEXT body formatted."
+  (let ((n (get-text-property 0 'yaml-n text)))
+    (remove-text-properties 0 (length text) '(yaml-n nil) text)
+    (let* ((header-line (substring text 0 (string-match "\n" text)))
+           (text-body (substring text (1+ (string-match "\n" text))))
+           (parsed-header (yaml--parse-block-header header-line))
+           (chomp (car parsed-header))
+           (starting-spaces-ct
+            (or (and (cadr parsed-header) (+ (or n 0) (cadr parsed-header)))
+                (let ((_ (string-match "^\n*\\( *\\)" text-body)))
+                  (length (match-string 1 text-body)))))
+           (lines (split-string text-body "\n"))
+           (striped-lines
+            (seq-map (lambda (l)
+                       (replace-regexp-in-string
+                        (format "\\` \\{0,%d\\}" starting-spaces-ct) "" l))
+                     lines))
+           (text-body (string-join striped-lines "\n")))
+      (yaml--chomp-text text-body chomp))))
+
+;; TODO: Process tags and use them in this function.
+(defun yaml--resolve-scalar-tag (scalar)
+  "Convert a SCALAR string to it's corresponding object."
+  (cond
+   (yaml--string-values
+    scalar)
+   ;; tag:yaml.org,2002:null
+   ((or (equal "null" scalar)
+        (equal "Null" scalar)
+        (equal "NULL" scalar)
+        (equal "~" scalar))
+    yaml--parsing-null-object)
+   ;; tag:yaml.org,2002:bool
+   ((or (equal "true" scalar)
+        (equal "True" scalar)
+        (equal "TRUE" scalar)) t)
+   ((or (equal "false" scalar)
+        (equal "False" scalar)
+        (equal "FALSE" scalar))
+    yaml--parsing-false-object)
+   ;; tag:yaml.org,2002:int
+   ((string-match "^0$\\|^-?[1-9][0-9]*$" scalar)
+    (string-to-number scalar))
+   ((string-match "^[-+]?[0-9]+$" scalar)
+    (string-to-number scalar))
+   ((string-match "^0o[0-7]+$" scalar)
+    (string-to-number (substring scalar 2) 8))
+   ((string-match "^0x[0-9a-fA-F]+$" scalar)
+    (string-to-number (substring scalar 2) 16))
+   ;; tag:yaml.org,2002:float
+   ((string-match
+     "^[-+]?\\(\\.[0-9]+\\|[0-9]+\\(\\.[0-9]*\\)?\\)\\([eE][-+]?[0-9]+\\)?$"
+     scalar)
+    (string-to-number scalar 10))
+   ((string-match "^[-+]?\\(\\.inf\\|\\.Inf\\|\\.INF\\)$" scalar)
+    1.0e+INF)
+   ((string-match "^[-+]?\\(\\.nan\\|\\.NaN\\|\\.NAN\\)$" scalar)
+    1.0e+INF)
+   ((string-match "^0$\\|^-?[1-9]\\(\\.[0-9]*\\)?\\(e[-+][1-9][0-9]*\\)?$"
+                  scalar)
+    (string-to-number scalar))
+   (t scalar)))
+
+(defun yaml--hash-table-to-alist (hash-table)
+  "Convert HASH-TABLE to a alist."
+  (let ((alist nil))
+    (maphash
+     (lambda (k v)
+       (setq alist (cons (cons k v) alist)))
+     hash-table)
+    alist))
+
+(defun yaml--hash-table-to-plist (hash-table)
+  "Convert HASH-TABLE to a plist."
+  (let ((plist nil))
+    (maphash
+     (lambda (k v)
+       (setq plist (cons k (cons v plist))))
+     hash-table)
+    plist))
+
+(defun yaml--format-object (hash-table)
+  "Convert HASH-TABLE to alist of plist if specified."
+  (cond
+   ((equal yaml--parsing-object-type 'hash-table)
+    hash-table)
+   ((equal yaml--parsing-object-type 'alist)
+    (yaml--hash-table-to-alist hash-table))
+   ((equal yaml--parsing-object-type 'plist)
+    (yaml--hash-table-to-plist hash-table))
+   (t hash-table)))
+
+(defun yaml--format-list (l)
+  "Convert L to array if specified."
+  (cond
+   ((equal yaml--parsing-sequence-type 'list)
+    l)
+   ((equal yaml--parsing-sequence-type 'array)
+    (apply #'vector l))
+   (t l)))
+
+(defun yaml--stream-start-event ()
+  "Create the data for a stream-start event."
+  '(:stream-start))
+
+(defun yaml--stream-end-event ()
+  "Create the data for a stream-end event."
+  '(:stream-end))
+
+(defun yaml--mapping-start-event (_)
+  "Process event indicating start of mapping."
+  ;; NOTE: currently don't have a use for FLOW
+  (push :mapping yaml--state-stack)
+  (push (make-hash-table :test 'equal) yaml--object-stack))
+
+(defun yaml--mapping-end-event ()
+  "Process event indicating end of mapping."
+  (pop yaml--state-stack)
+  (let ((obj (pop yaml--object-stack)))
+    (yaml--scalar-event nil obj))
+  '(:mapping-end))
+
+(defun yaml--sequence-start-event (_)
+  "Process event indicating start of sequence according to FLOW."
+  ;; NOTE: currently don't have a use for FLOW
+  (push :sequence yaml--state-stack)
+  (push nil yaml--object-stack)
+  '(:sequence-start))
+
+(defun yaml--sequence-end-event ()
+  "Process event indicating end of sequence."
+  (pop yaml--state-stack)
+  (let ((obj (pop yaml--object-stack)))
+    (yaml--scalar-event nil obj))
+  '(:sequence-end))
+
+(defun yaml--anchor-event (name)
+  "Process event indicating an anchor has been defined with NAME."
+  (push :anchor yaml--state-stack)
+  (push `(:anchor ,name) yaml--object-stack))
+
+(defun yaml--scalar-event (style value)
+  "Process the completion of a scalar VALUE.
+
+ Note that VALUE may be a complex object here.  STYLE is
+ currently unused."
+  (let ((top-state (car yaml--state-stack))
+        (value* (cond
+                 ((stringp value) (yaml--resolve-scalar-tag value))
+                 ((listp value) (yaml--format-list value))
+                 ((hash-table-p value) (yaml--format-object value))
+                 ((vectorp value) value)
+                 ((not value) nil))))
+    (cond
+     ((not top-state)
+      (setq yaml--root value*))
+     ((equal top-state :anchor)
+      (let* ((anchor (pop yaml--object-stack))
+             (name (nth 1 anchor)))
+        (puthash name value yaml--anchor-mappings)
+        (pop yaml--state-stack)
+        (yaml--scalar-event nil value)))
+     ((equal top-state :sequence)
+      (let ((l (car yaml--object-stack)))
+        (setcar yaml--object-stack (append l (list value*)))))
+     ((equal top-state :mapping)
+      (progn
+        (push :mapping-value yaml--state-stack)
+        (push value* yaml--cache)))
+     ((equal top-state :mapping-value)
+      (progn
+        (let ((key (pop yaml--cache))
+              (table (car yaml--object-stack)))
+          (when (stringp key)
+            (cond
+             ((eql 'symbol yaml--parsing-object-key-type)
+              (setq key (intern key)))
+             ((eql 'keyword yaml--parsing-object-key-type)
+              (setq key (intern (format ":%s" key))))))
+          (puthash key value* table))
+        (pop yaml--state-stack)))
+     ((equal top-state :trail-comments)
+      (pop yaml--state-stack)
+      (let ((comment-text (pop yaml--object-stack)))
+        (unless (stringp value*)
+          (error "Trail-comments can't be nested under non-string"))
+        (yaml--scalar-event
+         style
+         (replace-regexp-in-string (concat (regexp-quote comment-text) "\n*\\'")
+                                   ""
+                                   value*))))
+     ((equal top-state nil))))
+  '(:scalar))
+
+(defun yaml--alias-event (name)
+  "Process a node has been defined via alias NAME."
+  (if yaml--resolve-aliases
+      (let ((resolved (gethash name yaml--anchor-mappings)))
+        (unless resolved (error "Undefined alias '%s'" name))
+        (yaml--scalar-event nil resolved))
+    (yaml--scalar-event nil (vector :alias name)))
+  '(:alias))
+
+(defun yaml--trail-comments-event (text)
+  "Process trailing comments of TEXT which should be trimmed from parent."
+  (push :trail-comments yaml--state-stack)
+  (push text yaml--object-stack)
+  '(:trail-comments))
+
+
+
+(defun yaml--check-document-end ()
+  "Return non-nil if at end of document."
+  ;; NOTE: currently no need for this.  May be needed in the future.
+  t)
+
+(defun yaml--reverse-at-list ()
+  "Reverse the list at the top of the object stack.
+
+This is needed to get the correct order as lists are processed in
+reverse order."
+  (setcar yaml--object-stack (reverse (car yaml--object-stack))))
+
+(defconst yaml--grammar-events-in
+  `((l-yaml-stream . ,(lambda ()
+                        (yaml--stream-start-event)
+                        (setq yaml--document-start-version nil)
+                        (setq yaml--document-start-explicit nil)
+                        (setq yaml--tag-map (make-hash-table))))
+    (c-flow-mapping . ,(lambda ()
+                         (yaml--mapping-start-event t)))
+    (c-flow-sequence . ,(lambda ()
+                          (yaml--sequence-start-event nil)))
+    (l+block-mapping . ,(lambda ()
+                          (yaml--mapping-start-event nil)))
+    (l+block-sequence . ,(lambda ()
+                           (yaml--sequence-start-event nil)))
+    (ns-l-compact-mapping . ,(lambda ()
+                               (yaml--mapping-start-event nil)))
+    (ns-l-compact-sequence . ,(lambda ()
+                                (yaml--sequence-start-event nil)))
+    (ns-flow-pair . ,(lambda ()
+                       (yaml--mapping-start-event t)))
+    (ns-l-block-map-implicit-entry . ,(lambda () nil))
+    (ns-l-compact-mapping . ,(lambda () nil))
+    (c-l-block-seq-entry . ,(lambda () nil)))
+  "List of functions for matched rules that run on the entering of a rule.")
+
+(defconst yaml--grammar-events-out
+  `((c-b-block-header .
+     ,(lambda (_text)
+       nil))
+    (l-yaml-stream .
+     ,(lambda (_text)
+       (yaml--check-document-end)
+       (yaml--stream-end-event)))
+    (ns-yaml-version .
+     ,(lambda (text)
+       (when yaml--document-start-version
+         (throw 'error "Multiple %YAML directives not allowed."))
+       (setq yaml--document-start-version text)))
+    (c-tag-handle .
+     ,(lambda (text)
+       (setq yaml--tag-handle text)))
+    (ns-tag-prefix .
+     ,(lambda (text)
+       (puthash yaml--tag-handle text yaml--tag-map)))
+    (c-directives-end .
+     ,(lambda (_text)
+       (yaml--check-document-end)
+       (setq yaml--document-start-explicit t)))
+    (c-document-end .
+     ,(lambda (_text)
+       (when (not yaml--document-end)
+         (setq yaml--document-end-explicit t))
+       (yaml--check-document-end)))
+    (c-flow-mapping .
+     ,(lambda (_text)
+       (yaml--mapping-end-event)))
+    (c-flow-sequence .
+     ,(lambda (_text)
+       (yaml--sequence-end-event )))
+    (l+block-mapping .
+     ,(lambda (_text)
+       (yaml--mapping-end-event)))
+    (l+block-sequence .
+     ,(lambda (_text)
+       (yaml--reverse-at-list)
+       (yaml--sequence-end-event)))
+    (ns-l-compact-mapping .
+     ,(lambda (_text)
+       (yaml--mapping-end-event)))
+    (ns-l-compact-sequence .
+     ,(lambda (_text)
+       (yaml--sequence-end-event)))
+    (ns-flow-pair .
+     ,(lambda (_text)
+       (yaml--mapping-end-event)))
+    (ns-plain .
+     ,(lambda (text)
+       (let* ((replaced (if (and (zerop (length yaml--state-stack))
+                                 (string-match "\\(^\\|\n\\)\\.\\.\\.\\'" text))
+                            ;; Hack to not send the document parse end.
+                            ;; Will only occur with bare ns-plain at top level.
+                            (replace-regexp-in-string "\\(^\\|\n\\)\\.\\.\\.\\'"
+                                                      ""
+                                                      text)
+                          text))
+              (replaced (replace-regexp-in-string
+                         "\\(?:[ \t]*\r?\n[ \t]*\\)"
+                         "\n"
+                         replaced))
+              (replaced (replace-regexp-in-string
+                         "\\(\n\\)\\(\n*\\)"
+                         (lambda (x)
+                           (if (> (length x) 1)
+                               (substring x 1)
+                             " "))
+                         replaced)))
+         (yaml--scalar-event "plain" replaced))))
+    (c-single-quoted .
+     ,(lambda (text)
+       (let* ((replaced (replace-regexp-in-string
+                         "\\(?:[ \t]*\r?\n[ \t]*\\)"
+                         "\n"
+                         text))
+              (replaced (replace-regexp-in-string
+                         "\\(\n\\)\\(\n*\\)"
+                         (lambda (x)
+                           (if (> (length x) 1)
+                               (substring x 1)
+                             " "))
+                         replaced))
+              (replaced (if (not (equal "''" replaced))
+                            (replace-regexp-in-string
+                             "''"
+                             (lambda (x)
+                               (if (> (length x) 1)
+                                   (substring x 1)
+                                 "'"))
+                             replaced)
+                          replaced)))
+         (yaml--scalar-event "single"
+                             (substring replaced 1 (1- (length replaced)))))))
+    (c-double-quoted .
+     ,(lambda (text)
+       (let* ((replaced (replace-regexp-in-string
+                         "\\(?:[ \t]*\r?\n[ \t]*\\)"
+                         "\n"
+                         text))
+              (replaced (replace-regexp-in-string
+                         "\\(\n\\)\\(\n*\\)"
+                         (lambda (x)
+                           (if (> (length x) 1)
+                               (substring x 1)
+                             " "))
+                         replaced))
+              (replaced (replace-regexp-in-string "\\\\\\([\"\\/]\\)"
+                                                  "\\1"
+                                                  replaced))
+              (replaced (replace-regexp-in-string "\\\\ " " " replaced))
+              (replaced (replace-regexp-in-string "\\\\ " " " replaced))
+              (replaced (replace-regexp-in-string "\\\\b" "\b" replaced))
+              (replaced (replace-regexp-in-string "\\\\t" "\t" replaced))
+              (replaced (replace-regexp-in-string "\\\\n" "\n" replaced))
+              (replaced (replace-regexp-in-string "\\\\r" "\r" replaced))
+              (replaced (replace-regexp-in-string "\\\\r" "\r" replaced))
+              (replaced (replace-regexp-in-string
+                         "\\\\x\\([0-9a-fA-F]\\{2\\}\\)"
+                         (lambda (x)
+                           (let ((char-pt (substring 2 x)))
+                             (string (string-to-number char-pt 16))))
+                         replaced))
+              (replaced (replace-regexp-in-string
+                         "\\\\x\\([0-9a-fA-F]\\{2\\}\\)"
+                         (lambda (x)
+                           (let ((char-pt (substring x 2)))
+                             (string (string-to-number char-pt 16))))
+                         replaced))
+              (replaced (replace-regexp-in-string
+                         "\\\\x\\([0-9a-fA-F]\\{4\\}\\)"
+                         (lambda (x)
+                           (let ((char-pt (substring x 2)))
+                             (string (string-to-number char-pt 16))))
+                         replaced))
+              (replaced (replace-regexp-in-string
+                         "\\\\x\\([0-9a-fA-F]\\{8\\}\\)"
+                         (lambda (x)
+                           (let ((char-pt (substring x 2)))
+                             (string (string-to-number char-pt 16))))
+                         replaced))
+              (replaced (replace-regexp-in-string
+                         "\\\\\\\\"
+                         "\\"
+                         replaced))
+              (replaced (substring replaced 1 (1- (length replaced)))))
+         (yaml--scalar-event "double" replaced))))
+    (c-l+literal .
+     ,(lambda (text)
+       (when (equal (car yaml--state-stack) :trail-comments)
+         (pop yaml--state-stack)
+         (let ((comment-text (pop yaml--object-stack)))
+           (setq text (replace-regexp-in-string
+                       (concat (regexp-quote comment-text) "\n*\\'") "" text))))
+       (let* ((processed-text (yaml--process-literal-text text)))
+         (yaml--scalar-event "folded" processed-text))))
+    (c-l+folded .
+     ,(lambda (text)
+       (when (equal (car yaml--state-stack) :trail-comments)
+         (pop yaml--state-stack)
+         (let ((comment-text (pop yaml--object-stack)))
+           (setq text (replace-regexp-in-string
+                       (concat (regexp-quote comment-text) "\n*\\'") "" text))))
+       (let* ((processed-text (yaml--process-folded-text text)))
+         (yaml--scalar-event "folded" processed-text))))
+    (e-scalar .
+     ,(lambda (_text)
+       (yaml--scalar-event "plain" "null")))
+    (c-ns-anchor-property .
+     ,(lambda (text)
+       (yaml--anchor-event (substring text 1))))
+    (c-ns-tag-property .
+     ,(lambda (_text)
+       ;; TODO: Implement tags
+       ))
+    (l-trail-comments .
+     ,(lambda (text)
+       (yaml--trail-comments-event text)))
+    (c-ns-alias-node .
+     ,(lambda (text)
+       (yaml--alias-event (substring text 1)))))
+  "List of functions for matched rules that run on the exiting of a rule.")
+
+(defconst yaml--terminal-rules
+  '( l-nb-literal-text
+     l-nb-diff-lines
+     ns-plain
+     c-single-quoted
+     c-double-quoted)
+  "List of rules that indicate at which the parse tree should stop.
+
+This addition is a hack to prevent the parse tree from going too deep and thus
+risk hitting the stack depth limit.  Each of these rules are recursive and
+repeat for each character in a text.")
+
+(defun yaml--walk-events (tree)
+  "Event walker iterates over the parse TREE and signals events from the rules."
+  (when (consp tree)
+    (if (stringp (car tree))
+        (let ((text (car tree))
+              (grammar-rule (cadr tree))
+              (children (cl-caddr tree)))
+          (let ((in-fn (cdr (assq grammar-rule yaml--grammar-events-in)))
+                (out-fn (cdr (assq grammar-rule yaml--grammar-events-out))))
+            (when in-fn
+              (funcall in-fn))
+            (yaml--walk-events children)
+            (when out-fn
+              (funcall out-fn text))))
+      (yaml--walk-events (car tree))
+      (yaml--walk-events (cdr tree)))))
+
+(defun yaml--end-of-stream ()
+  "Return non-nil if the current position is after the end of the document."
+  (>= yaml--parsing-position (length yaml--parsing-input)))
+
+(defun yaml--char-at-pos (pos)
+  "Return the character at POS."
+  (aref yaml--parsing-input pos))
+
+(defun yaml--slice (pos)
+  "Return the character at POS."
+  (substring yaml--parsing-input pos))
+
+(defun yaml--at-char ()
+  "Return the current character."
+  (yaml--char-at-pos yaml--parsing-position))
+
+(defun yaml--char-match (at &rest chars)
+  "Return non-nil if AT match any of CHARS."
+  (if (not chars)
+      nil
+    (or (equal at (car chars))
+        (apply #'yaml--char-match (cons at (cdr chars))))))
+
+(defun yaml--chr (c)
+  "Try to match the character C."
+  (if (or (yaml--end-of-stream) (not (equal (yaml--at-char) c)))
+      nil
+    (setq yaml--parsing-position (1+ yaml--parsing-position))
+    t))
+
+(defun yaml--chr-range (min max)
+  "Return non-nil if the current character is between MIN and MAX."
+  (if (or (yaml--end-of-stream) (not (<= min (yaml--at-char) max)))
+      nil
+    (setq yaml--parsing-position (1+ yaml--parsing-position))
+    t))
+
+(defun yaml--run-all (&rest funcs)
+  "Return list of all evaluated FUNCS if all of FUNCS pass."
+  (let* ((start-pos yaml--parsing-position)
+         (ress '())
+         (break))
+    (while (and (not break) funcs)
+      (let ((res (funcall (car funcs))))
+        (when (not res)
+          (setq break t))
+        (setq ress (append ress (list res)))
+        (setq funcs (cdr funcs))))
+    (when break
+      (setq yaml--parsing-position start-pos))
+    (if break nil ress)))
+
+(defmacro yaml--all (&rest forms)
+  "Pass and return all forms if all of FORMS pass."
+  `(yaml--run-all
+    ,@(mapcar (lambda (form)
+                `(lambda () ,form))
+              forms)))
+
+(defmacro yaml--any (&rest forms)
+  "Pass if any of FORMS pass."
+  (if (= 1 (length forms))
+      (car forms)
+    (let ((start-pos-sym (make-symbol "start"))
+          (rules-sym (make-symbol "rules"))
+          (res-sym (make-symbol "res")))
+      `(let ((,start-pos-sym yaml--parsing-position)
+             (,rules-sym ,(cons 'list
+                                (seq-map (lambda (form) `(lambda () ,form))
+                                         forms)))
+             (,res-sym))
+         (while (and (not ,res-sym) ,rules-sym)
+           (setq ,res-sym (funcall (car ,rules-sym)))
+           (unless ,res-sym
+             (setq yaml--parsing-position ,start-pos-sym))
+           (setq ,rules-sym (cdr ,rules-sym)))
+         ,res-sym))))
+
+(defmacro yaml--exclude (_)
+  "Set the excluded characters according to RULE.
+
+This is currently unimplemented."
+  ;; NOTE: This is currently not implemented.
+  't)
+
+(defmacro yaml--max (_)
+  "Automatically pass."
+  t)
+
+(defun yaml--empty ()
+  "Return non-nil indicating that empty rule needs nothing to pass."
+  't)
+
+(defun yaml--sub (a b)
+  "Return A minus B."
+  (- a b))
+
+(defun yaml--match ()
+  "Return the content of the previous sibling completed."
+  (let* ((states yaml--states)
+         (res nil))
+    (while (and states (not res))
+      (let ((top-state (car states)))
+        (if (yaml--state-end top-state)
+            (let ((beg (yaml--state-beg top-state))
+                  (end (yaml--state-end top-state)))
+              (setq res (substring yaml--parsing-input beg end)))
+          (setq states (cdr states)))))
+    res))
+
+(defun yaml--auto-detect (n)
+  "Detect the indentation given N."
+  (let* ((slice (yaml--slice yaml--parsing-position))
+         (match (string-match
+                 "^.*\n\\(\\(?: *\n\\)*\\)\\( *\\)"
+                 slice)))
+    (if (not match)
+        1
+      (let ((pre (match-string 1 slice))
+            (m (- (length (match-string 2 slice)) n)))
+        (if (< m 1)
+            1
+          (when (string-match (format "^.\\{%d\\}." m) pre)
+            (error "Spaces found after indent in auto-detect (5LLU)"))
+          m)))))
+
+(defun yaml--auto-detect-indent (n)
+  "Detect the indentation given N."
+  (let* ((pos yaml--parsing-position)
+         (in-seq (and
+                  (> pos 0)
+                  (yaml--char-match (yaml--char-at-pos (1- pos)) ?\- ?\? ?\:)))
+         (slice (yaml--slice pos))
+         (_ (string-match
+             "^\\(\\(?: *\\(?:#.*\\)?\n\\)*\\)\\( *\\)"
+             slice))
+         (pre (match-string 1 slice))
+         (m (length (match-string 2 slice))))
+    (if (and in-seq (= (length pre) 0))
+        (when (= n -1)
+          (setq m (1+ m)))
+      (setq m (- m n)))
+    (when (< m 0)
+      (setq m 0))
+    m))
+
+(defun yaml--the-end ()
+  "Return non-nil if at the end of input (?)."
+  (or (>= yaml--parsing-position (length yaml--parsing-input))
+      (and (yaml--state-curr-doc)
+           (yaml--start-of-line)
+           (string-match
+            "\\^g\\(?:---|\\.\\.\\.\\)\\([[:blank:]]\\|$\\)"
+            (substring yaml--parsing-input yaml--parsing-position)))))
+
+(defun yaml--ord (f)
+  "Convert an ASCII number returned by F to a number."
+  (let ((res (funcall f)))
+    (- (aref res 0) 48)))
+
+(defun yaml--but (&rest fs)
+  "Match the first FS but none of the others."
+  (if (yaml--the-end)
+      nil
+    (let ((pos1 yaml--parsing-position))
+      (if (not (funcall (car fs)))
+          nil
+        (let ((pos2 yaml--parsing-position))
+          (setq yaml--parsing-position pos1)
+          (if (equal ':error (catch 'break
+                               (dolist (f (cdr fs))
+                                 (if (funcall f)
+                                     (progn
+                                       (setq yaml--parsing-position pos1)
+                                       (throw 'break ':error))))))
+              nil
+            (setq yaml--parsing-position pos2)
+            t))))))
+
+(defmacro yaml--rep (min max func)
+  "Repeat FUNC between MIN and MAX times."
+  (declare (indent 2))
+  `(yaml--rep2 ,min ,max ,func))
+
+(defun yaml--rep2 (min max func)
+  "Repeat FUNC between MIN and MAX times."
+  (declare (indent 2))
+  (if (and max (< max 0))
+      nil
+    (let* ((res-list '())
+           (count 0)
+           (pos yaml--parsing-position)
+           (pos-start pos)
+           (break nil))
+      (while (and (not break) (or (not max) (< count max)))
+        (let ((res (funcall func)))
+          (if (or (not res) (= yaml--parsing-position pos))
+              (setq break t)
+            (setq res-list (cons res res-list))
+            (setq count (1+ count))
+            (setq pos yaml--parsing-position))))
+      (if (and (>= count min)
+               (or (not max) (<= count max)))
+          (progn
+            (setq yaml--parsing-position pos)
+            (if (zerop count)
+                t
+              res-list))
+        (setq yaml--parsing-position pos-start)
+        nil))))
+
+(defun yaml--start-of-line ()
+  "Return non-nil if start of line."
+  (or (= yaml--parsing-position 0)
+      (>= yaml--parsing-position (length yaml--parsing-input))
+      (equal (yaml--char-at-pos (1- yaml--parsing-position)) ?\n)))
+
+(defun yaml--top ()
+  "Perform top level YAML parsing rule."
+  (yaml--parse-from-grammar 'l-yaml-stream))
+
+(defmacro yaml--set (variable value)
+  "Set the current state of VARIABLE to VALUE."
+  (let ((res-sym (make-symbol "res")))
+    `(let ((,res-sym ,value))
+       (when ,res-sym
+         (,(cond ((eq 'm variable) 'yaml--state-set-m)
+                 ((eq 't variable) 'yaml--state-set-t))
+          ,res-sym)
+         ,res-sym))))
+
+(defmacro yaml--chk (type expr)
+  "Check if EXPR is non-nil at the parsing position.
+
+If TYPE is \"<=\" then check at the previous position.  If TYPE
+is \"!\" ensure that EXPR is nil.  Otherwise, if TYPE is \"=\"
+then check EXPR at the current position."
+  (let ((start-symbol (make-symbol "start"))
+        (ok-symbol (make-symbol "ok")))
+    `(let ((,start-symbol yaml--parsing-position)
+           (_ (when (equal ,type "<=")
+                (setq yaml--parsing-position (1- yaml--parsing-position))))
+           (,ok-symbol (and (>= yaml--parsing-position 0) ,expr)))
+       (setq yaml--parsing-position ,start-symbol)
+       (if (equal ,type "!")
+           (not ,ok-symbol)
+         ,ok-symbol))))
+
+(cl-defun yaml--initialize-parsing-state
+    (&key (null-object :null)
+          (false-object :false)
+          object-type
+          object-key-type
+          sequence-type
+          string-values)
+  "Initialize state required for parsing according to plist ARGS."
+  (setq yaml--cache nil)
+  (setq yaml--object-stack nil)
+  (setq yaml--state-stack nil)
+  (setq yaml--root nil)
+  (setq yaml--anchor-mappings (make-hash-table :test 'equal))
+  (setq yaml--resolve-aliases nil)
+  (setq yaml--parsing-null-object null-object)
+  (setq yaml--parsing-false-object false-object)
+  (cond
+   ((or (not object-type)
+        (equal object-type 'hash-table))
+    (setq yaml--parsing-object-type 'hash-table))
+   ((equal 'alist object-type)
+    (setq yaml--parsing-object-type 'alist))
+   ((equal 'plist object-type)
+    (setq yaml--parsing-object-type 'plist))
+   (t (error "Invalid object-type.  Must be hash-table, alist, or plist")))
+  (cond
+   ((or (not object-key-type)
+        (equal 'symbol object-key-type))
+    (if (equal 'plist yaml--parsing-object-type)
+        (setq yaml--parsing-object-key-type 'keyword)
+      (setq yaml--parsing-object-key-type 'symbol)))
+   ((equal 'string object-key-type)
+    (setq yaml--parsing-object-key-type 'string))
+   ((equal 'keyword object-key-type)
+    (setq yaml--parsing-object-key-type 'keyword))
+   (t (error "Invalid object-key-type.  Must be string, keyword, or symbol")))
+  (cond
+   ((or (not sequence-type)
+        (equal sequence-type 'array))
+    (setq yaml--parsing-sequence-type 'array))
+   ((equal 'list sequence-type)
+    (setq yaml--parsing-sequence-type 'list))
+   (t (error "Invalid sequence-type.  sequence-type must be list or array")))
+  (if string-values
+      (setq yaml--string-values t)
+    (setq yaml--string-values nil)))
+
+(cl-defun yaml-parse-string (string
+                             &key
+                             (null-object :null)
+                             (false-object :false)
+                             object-type
+                             object-key-type
+                             sequence-type
+                             string-values)
+  "Parse the YAML value in STRING.
+
+OBJECT-TYPE specifies the Lisp object to use for representing
+key-value YAML mappings.  Possible values for OBJECT-TYPE are
+the symbols `hash-table' (default), `alist', and `plist'.
+
+OBJECT-KEY-TYPE specifies the Lisp type to use for keys in
+key-value YAML mappings.  Possible values are the symbols
+`string', `symbol', and `keyword'.  By default, this is `symbol';
+if OBJECT-TYPE is `plist', the default is `keyword' (and `symbol'
+becomes synonym for `keyword').
+
+SEQUENCE-TYPE specifies the Lisp object to use for representing
+YAML sequences.  Possible values for SEQUENCE-TYPE are the symbols
+`list', and `array' (default).
+
+NULL-OBJECT contains the object used to represent the null value.
+It defaults to the symbol `:null'.
+
+FALSE-OBJECT contains the object used to represent the false
+value.  It defaults to the symbol `:false'."
+  (yaml--initialize-parsing-state
+   :null-object null-object
+   :false-object false-object
+   :object-type object-type
+   :object-key-type object-key-type
+   :sequence-type sequence-type
+   :string-values string-values)
+  (let ((res (yaml--parse string
+               (yaml--top))))
+    (when (< yaml--parsing-position (length yaml--parsing-input))
+      (error
+       "Unable to parse YAML.  Parser finished before end of input %s/%s"
+       yaml--parsing-position
+       (length yaml--parsing-input)))
+    (when yaml--parse-debug (message "Parsed data: %s" (pp-to-string res)))
+    (yaml--walk-events res)
+    (if (hash-table-empty-p yaml--anchor-mappings)
+        yaml--root
+      ;; Run event processing twice to resolve aliases.
+      (let ((yaml--root nil)
+            (yaml--resolve-aliases t))
+        (yaml--walk-events res)
+        yaml--root))))
+
+(defun yaml-parse-tree (string)
+  "Parse the YAML value in STRING and return its parse tree."
+  (yaml--initialize-parsing-state)
+  (let* ((yaml--parsing-store-position t)
+         (res (yaml--parse string
+                (yaml--top))))
+    (when (< yaml--parsing-position (length yaml--parsing-input))
+      (error
+       "Unable to parse YAML.  Parser finished before end of input %s/%s"
+       yaml--parsing-position
+       (length yaml--parsing-input)))
+    res))
+
+(defun yaml-parse-string-with-pos (string)
+  "Parse the YAML value in STRING, storing positions as text properties.
+
+NOTE: This is an experimental feature and may experience API
+changes in the future."
+  (let ((yaml--parsing-store-position t))
+    (yaml-parse-string string
+                       :object-type 'alist
+                       :object-key-type 'string
+                       :string-values t)))
+
+(defun yaml--parse-from-grammar (state &rest args)
+  "Parse YAML grammar for given STATE and ARGS.
+
+Rules for this function are defined by the yaml-spec JSON file."
+  (let* ((beg yaml--parsing-position)
+         (_ (when (and yaml--parse-debug
+                       (not (memq state yaml--tracing-ignore)))
+              (message "|%s>%s %40s args=%s '%s'"
+                       (make-string (length yaml--states) ?-)
+                       (make-string (- 70 (length yaml--states)) ?\s)
+                       state
+                       args
+                       (replace-regexp-in-string
+                        "\n"
+                        "↓"
+                        (yaml--slice yaml--parsing-position)))))
+         (_ (yaml--push-state state))
+         (yaml-n)
+         (res
+          (pcase state
+            ('c-flow-sequence
+             (let ((n (nth 0 args))
+                   (c (nth 1 args)))
+               (yaml--all
+                (yaml--chr ?\[)
+                (yaml--rep 0 1
+                           (lambda () (yaml--parse-from-grammar 's-separate n c)))
+                (yaml--rep 0 1
+                           (lambda ()
+                             (yaml--parse-from-grammar
+                              'ns-s-flow-seq-entries n
+                              (yaml--parse-from-grammar 'in-flow c))))
+                (yaml--chr ?\]))))
+
+            ('c-indentation-indicator
+             (let ((m (nth 0 args)))
+               (yaml--any (when (yaml--parse-from-grammar 'ns-dec-digit)
+                            (yaml--set m (yaml--ord (lambda () (yaml--match)))) t)
+                          (when (yaml--empty)
+                            (let ((new-m (yaml--auto-detect m)))
+                              (yaml--set m new-m))
+                            t))))
+
+            ('ns-reserved-directive
+             (yaml--all (yaml--parse-from-grammar 'ns-directive-name)
+                        (yaml--rep2 0 nil
+                                    (lambda ()
+                                      (yaml--all
+                                       (yaml--parse-from-grammar 's-separate-in-line)
+                                       (yaml--parse-from-grammar 'ns-directive-parameter))))))
+
+            ('ns-flow-map-implicit-entry
+             (let ((n (nth 0 args))
+                   (c (nth 1 args)))
+               ;; NOTE: I ran into a bug with the order of these rules. It seems
+               ;; sometimes ns-flow-map-yaml-key-entry succeeds with an empty
+               ;; when the correct answer should be
+               ;; c-ns-flow-map-json-key-entry.  Changing the order seemed to
+               ;; have fix this but this seems like a bandage fix.
+               (yaml--any
+                (yaml--parse-from-grammar 'c-ns-flow-map-json-key-entry n c)
+                (yaml--parse-from-grammar 'ns-flow-map-yaml-key-entry n c)
+                (yaml--parse-from-grammar 'c-ns-flow-map-empty-key-entry n c))))
+
+            ('ns-esc-double-quote
+             (yaml--chr ?\"))
+
+            ('c-mapping-start
+             (yaml--chr ?\{))
+
+            ('ns-flow-seq-entry
+             (let ((n (nth 0 args))
+                   (c (nth 1 args)))
+               (yaml--any (yaml--parse-from-grammar 'ns-flow-pair n c)
+                          (yaml--parse-from-grammar 'ns-flow-node n c))))
+
+            ('l-empty
+             (let ((n (nth 0 args))
+                   (c (nth 1 args)))
+               (yaml--all (yaml--any (yaml--parse-from-grammar 's-line-prefix n c)
+                                     (yaml--parse-from-grammar 's-indent-lt n))
+                          (yaml--parse-from-grammar 'b-as-line-feed))))
+
+            ('c-primary-tag-handle
+             (yaml--chr ?\!))
+
+            ('ns-plain-safe-out
+             (yaml--parse-from-grammar 'ns-char))
+
+            ('c-ns-shorthand-tag
+             (yaml--all
+              (yaml--parse-from-grammar 'c-tag-handle)
+              (yaml--rep 1 nil (lambda () (yaml--parse-from-grammar 'ns-tag-char)))))
+
+            ('nb-ns-single-in-line
+             (yaml--rep2 0 nil
+                         (lambda ()
+                           (yaml--all (yaml--rep2 0 nil
+                                                  (lambda () (yaml--parse-from-grammar 's-white)))
+                                      (yaml--parse-from-grammar 'ns-single-char)))))
+
+            ('l-strip-empty
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--rep2 0 nil
+                            (lambda () (yaml--all
+                                   (yaml--parse-from-grammar 's-indent-le n)
+                                   (yaml--parse-from-grammar 'b-non-content))))
+                (yaml--rep 0 1
+                           (lambda () (yaml--parse-from-grammar 'l-trail-comments n))))))
+
+            ('c-indicator
+             (yaml--any (yaml--chr ?\-)
+                        (yaml--chr ?\?)
+                        (yaml--chr ?\:)
+                        (yaml--chr ?\,)
+                        (yaml--chr ?\[)
+                        (yaml--chr ?\])
+                        (yaml--chr ?\{)
+                        (yaml--chr ?\})
+                        (yaml--chr ?\#)
+                        (yaml--chr ?\&)
+                        (yaml--chr ?\*)
+                        (yaml--chr ?\!)
+                        (yaml--chr ?\|)
+                        (yaml--chr ?\>)
+                        (yaml--chr ?\')
+                        (yaml--chr ?\")
+                        (yaml--chr ?\%)
+                        (yaml--chr ?\@)
+                        (yaml--chr ?\`)))
+
+            ('c-l+literal
+             (let ((n (nth 0 args)))
+               (setq yaml-n n)
+               (yaml--all
+                (yaml--chr ?\|)
+                (yaml--parse-from-grammar 'c-b-block-header n (yaml--state-curr-t))
+                (yaml--parse-from-grammar 'l-literal-content
+                                          (max (+ n (yaml--state-curr-m)) 1)
+                                          (yaml--state-curr-t)))))
+
+            ('c-single-quoted
+             (let ((n (nth 0 args))
+                   (c (nth 1 args)))
+               (yaml--all (yaml--chr ?\')
+                          (yaml--parse-from-grammar 'nb-single-text n c)
+                          (yaml--chr ?\'))))
+
+            ('c-forbidden
+             (yaml--all (yaml--start-of-line)
+                        (yaml--any
+                         (yaml--parse-from-grammar 'c-directives-end)
+                         (yaml--parse-from-grammar 'c-document-end))
+                        (yaml--any
+                         (yaml--parse-from-grammar 'b-char)
+                         (yaml--parse-from-grammar 's-white)
+                         (yaml--end-of-stream))))
+
+            ('c-ns-alias-node
+             (yaml--all (yaml--chr ?\*)
+                        (yaml--parse-from-grammar 'ns-anchor-name)))
+
+            ('c-secondary-tag-handle
+             (yaml--all (yaml--chr ?\!) (yaml--chr ?\!)))
+
+            ('ns-esc-next-line
+             (yaml--chr ?N))
+
+            ('l-nb-same-lines
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--rep2 0 nil
+                            (lambda () (yaml--parse-from-grammar 'l-empty n "block-in")))
+                (yaml--any (yaml--parse-from-grammar 'l-nb-folded-lines n)
+                           (yaml--parse-from-grammar 'l-nb-spaced-lines n)))))
+
+            ('c-alias
+             (yaml--chr ?\*))
+
+            ('ns-single-char
+             (yaml--but (lambda () (yaml--parse-from-grammar 'nb-single-char))
+                        (lambda () (yaml--parse-from-grammar 's-white))))
+
+            ('c-l-block-map-implicit-value
+             (let ((n (nth 0 args)))
+               (yaml--all (yaml--chr ?\:)
+                          (yaml--any
+                           (yaml--parse-from-grammar 's-l+block-node n "block-out")
+                           (yaml--all (yaml--parse-from-grammar 'e-node)
+                                      (yaml--parse-from-grammar 's-l-comments))))))
+
+            ('ns-uri-char
+             (yaml--any (yaml--all (yaml--chr ?\%)
+                                   (yaml--parse-from-grammar 'ns-hex-digit)
+                                   (yaml--parse-from-grammar 'ns-hex-digit))
+                        (yaml--parse-from-grammar 'ns-word-char)
+                        (yaml--chr ?\#)
+                        (yaml--chr ?\;)
+                        (yaml--chr ?\/)
+                        (yaml--chr ?\?)
+                        (yaml--chr ?\:)
+                        (yaml--chr ?\@)
+                        (yaml--chr ?\&)
+                        (yaml--chr ?\=)
+                        (yaml--chr ?\+)
+                        (yaml--chr ?\$)
+                        (yaml--chr ?\,)
+                        (yaml--chr ?\_)
+                        (yaml--chr ?\.)
+                        (yaml--chr ?\!)
+                        (yaml--chr ?\~)
+                        (yaml--chr ?\*)
+                        (yaml--chr ?\')
+                        (yaml--chr ?\()
+                        (yaml--chr ?\))
+                        (yaml--chr ?\[)
+                        (yaml--chr ?\])))
+
+            ('ns-esc-16-bit
+             (yaml--all (yaml--chr ?u)
+                        (yaml--rep 4 4
+                                   (lambda () (yaml--parse-from-grammar 'ns-hex-digit)))))
+
+            ('l-nb-spaced-lines
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 's-nb-spaced-text n)
+                (yaml--rep2 0 nil
+                            (lambda () (yaml--all
+                                   (yaml--parse-from-grammar 'b-l-spaced n)
+                                   (yaml--parse-from-grammar 's-nb-spaced-text n)))))))
+
+            ('ns-plain
+             (let ((n (nth 0 args))
+                   (c (nth 1 args)))
+               (pcase c
+                 ("block-key" (yaml--parse-from-grammar 'ns-plain-one-line c))
+                 ("flow-in" (yaml--parse-from-grammar 'ns-plain-multi-line n c))
+                 ("flow-key" (yaml--parse-from-grammar 'ns-plain-one-line c))
+                 ("flow-out" (yaml--parse-from-grammar 'ns-plain-multi-line n c)))))
+
+            ('c-printable
+             (yaml--any (yaml--chr ?\x09)
+                        (yaml--chr ?\x0A)
+                        (yaml--chr ?\x0D)
+                        (yaml--chr-range ?\x20 ?\x7E)
+                        (yaml--chr ?\x85)
+                        (yaml--chr-range ?\xA0 ?\xD7FF)
+                        (yaml--chr-range ?\xE000 ?\xFFFD)
+                        (yaml--chr-range ?\x010000 ?\x10FFFF)))
+
+            ('c-mapping-value
+             (yaml--chr ?\:))
+
+            ('l-nb-literal-text
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--rep2 0 nil
+                            (lambda () (yaml--parse-from-grammar 'l-empty n "block-in")))
+                (yaml--parse-from-grammar 's-indent n)
+                (yaml--rep 1 nil
+                           (lambda () (yaml--parse-from-grammar 'nb-char))))))
+
+            ('ns-plain-char
+             (let ((c (nth 0 args)))
+               (yaml--any
+                (yaml--but
+                 (lambda () (yaml--parse-from-grammar 'ns-plain-safe c))
+                 (lambda () (yaml--chr ?\:)) (lambda () (yaml--chr ?\#)))
+                (yaml--all
+                 (yaml--chk "<=" (yaml--parse-from-grammar 'ns-char))
+                 (yaml--chr ?\#))
+                (yaml--all
+                 (yaml--chr ?\:)
+                 (yaml--chk "=" (yaml--parse-from-grammar 'ns-plain-safe c))))))
+
+            ('ns-anchor-char
+             (yaml--but (lambda () (yaml--parse-from-grammar 'ns-char))
+                        (lambda () (yaml--parse-from-grammar 'c-flow-indicator))))
+
+            ('s-l+block-scalar
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all (yaml--parse-from-grammar 's-separate (+ n 1) c)
+                          (yaml--rep 0 1
+                                     (lambda ()
+                                       (yaml--all
+                                        (yaml--parse-from-grammar 'c-ns-properties (+ n 1) c)
+                                        (yaml--parse-from-grammar 's-separate (+ n 1) c))))
+                          (yaml--any (yaml--parse-from-grammar 'c-l+literal n)
+                                     (yaml--parse-from-grammar 'c-l+folded n)))))
+
+            ('ns-plain-safe-in
+             (yaml--but (lambda () (yaml--parse-from-grammar 'ns-char))
+                        (lambda () (yaml--parse-from-grammar 'c-flow-indicator))))
+
+            ('nb-single-text
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (pcase c
+                 ("block-key" (yaml--parse-from-grammar 'nb-single-one-line))
+                 ("flow-in" (yaml--parse-from-grammar 'nb-single-multi-line n))
+                 ("flow-key" (yaml--parse-from-grammar 'nb-single-one-line))
+                 ("flow-out" (yaml--parse-from-grammar 'nb-single-multi-line n)))))
+
+            ('s-indent-le
+             (let ((n (nth 0 args)))
+               (yaml--all (yaml--rep2 0 nil
+                                      (lambda () (yaml--parse-from-grammar 's-space)))
+                          (<= (length (yaml--match)) n))))
+
+            ('ns-esc-carriage-return
+             (yaml--chr ?r))
+
+            ('l-chomped-empty
+             (let ((n (nth 0 args))
+                   (tt (nth 1 args)))
+               (pcase tt
+                 ("clip" (yaml--parse-from-grammar 'l-strip-empty n))
+                 ("keep" (yaml--parse-from-grammar 'l-keep-empty n))
+                 ("strip" (yaml--parse-from-grammar 'l-strip-empty n)))))
+
+            ('c-s-implicit-json-key
+             (let ((c (nth 0 args)))
+               (yaml--all
+                (yaml--max 1024)
+                (yaml--parse-from-grammar 'c-flow-json-node nil c)
+                (yaml--rep 0 1
+                           (lambda () (yaml--parse-from-grammar 's-separate-in-line))))))
+
+            ('b-as-space
+             (yaml--parse-from-grammar 'b-break))
+
+            ('ns-s-flow-seq-entries
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'ns-flow-seq-entry n c)
+                (yaml--rep 0 1
+                           (lambda () (yaml--parse-from-grammar 's-separate n c)))
+                (yaml--rep 0 1
+                           (lambda ()
+                             (yaml--all
+                              (yaml--chr ?\,)
+                              (yaml--rep 0 1
+                                         (lambda () (yaml--parse-from-grammar 's-separate n c)))
+                              (yaml--rep 0 1
+                                         (lambda ()
+                                           (yaml--parse-from-grammar 'ns-s-flow-seq-entries
+                                                                     n
+                                                                     c)))))))))
+
+            ('l-block-map-explicit-value
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 's-indent n)
+                (yaml--chr ?\:)
+                (yaml--parse-from-grammar 's-l+block-indented n "block-out"))))
+
+            ('c-ns-flow-map-json-key-entry
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'c-flow-json-node n c)
+                (yaml--any
+                 (yaml--all
+                  (yaml--rep 0 1
+                             (lambda () (yaml--parse-from-grammar 's-separate n c)))
+                  (yaml--parse-from-grammar 'c-ns-flow-map-adjacent-value n c))
+                 (yaml--parse-from-grammar 'e-node)))))
+
+            ('c-sequence-entry
+             (yaml--chr ?\-))
+
+            ('l-bare-document
+             (yaml--all (yaml--exclude "c-forbidden")
+                        (yaml--parse-from-grammar 's-l+block-node -1 "block-in")))
+
+            ;; TODO: don't use the symbol t as a variable.
+            ('b-chomped-last
+             (let ((tt (nth 0 args)))
+               (pcase tt
+                 ("clip"
+                  ;; TODO: Fix this
+                  (yaml--any (yaml--parse-from-grammar 'b-as-line-feed)
+                             (yaml--end-of-stream)))
+                 ("keep"
+                  (yaml--any (yaml--parse-from-grammar 'b-as-line-feed)
+                             (yaml--end-of-stream)))
+                 ("strip"
+                  (yaml--any (yaml--parse-from-grammar 'b-non-content)
+                             (yaml--end-of-stream))))))
+
+            ('l-trail-comments
+             (let ((n (nth 0 args)))
+               (yaml--all (yaml--parse-from-grammar 's-indent-lt n)
+                          (yaml--parse-from-grammar 'c-nb-comment-text)
+                          (yaml--parse-from-grammar 'b-comment)
+                          (yaml--rep2 0 nil
+                                      (lambda () (yaml--parse-from-grammar 'l-comment))))))
+
+            ('ns-flow-map-yaml-key-entry
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'ns-flow-yaml-node n c)
+                (yaml--any
+                 (yaml--all
+                  (yaml--rep 0 1
+                             (lambda () (yaml--parse-from-grammar 's-separate n c)))
+                  (yaml--parse-from-grammar 'c-ns-flow-map-separate-value n c))
+                 (yaml--parse-from-grammar 'e-node)))))
+
+            ('s-indent
+             (let ((n (nth 0 args)))
+               (yaml--rep n n (lambda () (yaml--parse-from-grammar 's-space)))))
+
+            ('ns-esc-line-separator
+             (yaml--chr ?L))
+
+            ('ns-flow-yaml-node
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--any
+                (yaml--parse-from-grammar 'c-ns-alias-node)
+                (yaml--parse-from-grammar 'ns-flow-yaml-content n c)
+                (yaml--all
+                 (yaml--parse-from-grammar 'c-ns-properties n c)
+                 (yaml--any
+                  (yaml--all
+                   (yaml--parse-from-grammar 's-separate n c)
+                   (yaml--parse-from-grammar 'ns-flow-yaml-content n c))
+                  (yaml--parse-from-grammar 'e-scalar))))))
+
+            ('ns-yaml-version
+             (yaml--all (yaml--rep 1 nil
+                                   (lambda () (yaml--parse-from-grammar 'ns-dec-digit)))
+                        (yaml--chr ?\.)
+                        (yaml--rep 1 nil
+                                   (lambda () (yaml--parse-from-grammar 'ns-dec-digit)))))
+
+            ('c-folded
+             (yaml--chr ?\>))
+
+            ('c-directives-end
+             (yaml--all (yaml--chr ?\-) (yaml--chr ?\-) (yaml--chr ?\-)))
+
+            ('s-double-break
+             (let ((n (nth 0 args)))
+               (yaml--any (yaml--parse-from-grammar 's-double-escaped n)
+                          (yaml--parse-from-grammar 's-flow-folded n))))
+
+            ('s-nb-spaced-text
+             (let ((n (nth 0 args)))
+               (yaml--all (yaml--parse-from-grammar 's-indent n)
+                          (yaml--parse-from-grammar 's-white)
+                          (yaml--rep2 0 nil
+                                      (lambda () (yaml--parse-from-grammar 'nb-char))))))
+
+            ('l-folded-content
+             (let ((n (nth 0 args))
+                   (tt (nth 1 args)))
+               (yaml--all
+                (yaml--rep 0 1
+                           (lambda ()
+                             (yaml--all (yaml--parse-from-grammar 'l-nb-diff-lines n)
+                                        (yaml--parse-from-grammar 'b-chomped-last tt))))
+                (yaml--parse-from-grammar 'l-chomped-empty n tt))))
+
+            ('nb-ns-plain-in-line
+             (let ((c (nth 0 args)))
+               (yaml--rep2 0 nil
+                           (lambda () (yaml--all
+                                  (yaml--rep2 0 nil
+                                              (lambda () (yaml--parse-from-grammar 's-white)))
+                                  (yaml--parse-from-grammar 'ns-plain-char c))))))
+
+            ('nb-single-multi-line
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'nb-ns-single-in-line)
+                (yaml--any
+                 (yaml--parse-from-grammar 's-single-next-line n)
+                 (yaml--rep2 0 nil
+                             (lambda () (yaml--parse-from-grammar 's-white)))))))
+
+            ('l-document-suffix
+             (yaml--all (yaml--parse-from-grammar 'c-document-end)
+                        (yaml--parse-from-grammar 's-l-comments)))
+
+            ('c-sequence-start
+             (yaml--chr ?\[))
+
+            ('ns-l-block-map-entry
+             (yaml--any
+              (yaml--parse-from-grammar 'c-l-block-map-explicit-entry
+                                        (nth 0 args))
+              (yaml--parse-from-grammar 'ns-l-block-map-implicit-entry
+                                        (nth 0 args))))
+
+            ('ns-l-compact-mapping
+             (yaml--all
+              (yaml--parse-from-grammar 'ns-l-block-map-entry (nth 0 args))
+              (yaml--rep2 0 nil
+                          (lambda ()
+                            (yaml--all
+                             (yaml--parse-from-grammar 's-indent (nth 0 args))
+                             (yaml--parse-from-grammar 'ns-l-block-map-entry (nth 0 args)))))))
+
+            ('ns-esc-space
+             (yaml--chr ?\x20))
+            ('ns-esc-vertical-tab
+             (yaml--chr ?v))
+
+            ('ns-s-implicit-yaml-key
+             (let ((c (nth 0 args)))
+               (yaml--all
+                (yaml--max 1024)
+                (yaml--parse-from-grammar 'ns-flow-yaml-node nil c)
+                (yaml--rep 0 1
+                           (lambda () (yaml--parse-from-grammar 's-separate-in-line))))))
+
+            ('b-l-folded
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--any (yaml--parse-from-grammar 'b-l-trimmed n c)
+                          (yaml--parse-from-grammar 'b-as-space))))
+
+            ('s-l+block-collection
+             (yaml--all
+              (yaml--rep 0 1
+                         (lambda ()
+                           (yaml--all
+                            (yaml--parse-from-grammar
+                             's-separate
+                             (+ (nth 0 args) 1)
+                             (nth 1 args))
+                            (yaml--parse-from-grammar
+                             'c-ns-properties
+                             (+ (nth 0 args) 1)
+                             (nth 1 args)))))
+              (yaml--parse-from-grammar 's-l-comments)
+              (yaml--any
+               (yaml--parse-from-grammar
+                'l+block-sequence
+                (yaml--parse-from-grammar 'seq-spaces (nth 0 args) (nth 1 args)))
+               (yaml--parse-from-grammar 'l+block-mapping (nth 0 args)))))
+
+            ('c-quoted-quote
+             (yaml--all (yaml--chr ?\') (yaml--chr ?\')))
+
+            ('l+block-sequence
+             ;; NOTE: deviated from the spec example here by making new-m at least 1.
+             ;; The wording and examples lead me to believe this is how it's done.
+             ;; ie /* For some fixed auto-detected m > 0 */
+             (let ((new-m (max (yaml--auto-detect-indent (nth 0 args)) 1)))
+               (yaml--all
+                (yaml--set m new-m)
+                (yaml--rep 1 nil
+                           (lambda ()
+                             (yaml--all
+                              (yaml--parse-from-grammar
+                               's-indent
+                               (+ (nth 0 args) new-m))
+                              (yaml--parse-from-grammar
+                               'c-l-block-seq-entry
+                               (+ (nth 0 args) new-m))))))))
+
+            ('c-double-quote
+             (yaml--chr ?\"))
+
+            ('ns-esc-backspace
+             (yaml--chr ?b))
+
+            ('c-flow-json-content
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--any (yaml--parse-from-grammar 'c-flow-sequence n c)
+                          (yaml--parse-from-grammar 'c-flow-mapping n c)
+                          (yaml--parse-from-grammar 'c-single-quoted n c)
+                          (yaml--parse-from-grammar 'c-double-quoted n c))))
+
+            ('c-mapping-end
+             (yaml--chr ?\}))
+
+            ('nb-single-char
+             (yaml--any (yaml--parse-from-grammar 'c-quoted-quote)
+                        (yaml--but (lambda () (yaml--parse-from-grammar 'nb-json))
+                                   (lambda () (yaml--chr ?\')))))
+
+            ('ns-flow-node
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--any
+                (yaml--parse-from-grammar 'c-ns-alias-node)
+                (yaml--parse-from-grammar 'ns-flow-content n c)
+                (yaml--all
+                 (yaml--parse-from-grammar 'c-ns-properties n c)
+                 (yaml--any
+                  (yaml--all (yaml--parse-from-grammar 's-separate n c)
+                             (yaml--parse-from-grammar 'ns-flow-content n c))
+                  (yaml--parse-from-grammar 'e-scalar))))))
+
+            ('c-non-specific-tag
+             (yaml--chr ?\!))
+
+            ('l-directive-document
+             (yaml--all (yaml--rep 1 nil
+                                   (lambda () (yaml--parse-from-grammar 'l-directive)))
+                        (yaml--parse-from-grammar 'l-explicit-document)))
+
+            ('c-l-block-map-explicit-entry
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'c-l-block-map-explicit-key n)
+                (yaml--any (yaml--parse-from-grammar 'l-block-map-explicit-value n)
+                           (yaml--parse-from-grammar 'e-node)))))
+
+            ('e-node
+             (yaml--parse-from-grammar 'e-scalar))
+
+            ('seq-spaces
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (pcase c
+                 ("block-in" n)
+                 ("block-out" (yaml--sub n 1)))))
+
+            ('l-yaml-stream
+             (yaml--all
+              (yaml--rep2 0 nil
+                          (lambda () (yaml--parse-from-grammar 'l-document-prefix)))
+              (yaml--rep 0 1
+                         (lambda () (yaml--parse-from-grammar 'l-any-document)))
+              (yaml--rep2 0 nil
+                          (lambda ()
+                            (yaml--any
+                             (yaml--all
+                              (yaml--rep 1 nil
+                                         (lambda () (yaml--parse-from-grammar 'l-document-suffix)))
+                              (yaml--rep2 0 nil
+                                          (lambda () (yaml--parse-from-grammar 'l-document-prefix)))
+                              (yaml--rep 0 1
+                                         (lambda () (yaml--parse-from-grammar 'l-any-document))))
+                             (yaml--all
+                              (yaml--rep2 0 nil
+                                          (lambda () (yaml--parse-from-grammar 'l-document-prefix)))
+                              (yaml--rep 0 1
+                                         (lambda ()
+                                           (yaml--parse-from-grammar 'l-explicit-document)))))))))
+
+            ('nb-double-one-line
+             (yaml--rep2 0 nil
+                         (lambda () (yaml--parse-from-grammar 'nb-double-char))))
+
+            ('s-l-comments
+             (yaml--all (yaml--any
+                         (yaml--parse-from-grammar 's-b-comment)
+                         (yaml--start-of-line))
+                        (yaml--rep2 0 nil
+                                    (lambda () (yaml--parse-from-grammar 'l-comment)))))
+
+            ('nb-char
+             (yaml--but (lambda () (yaml--parse-from-grammar 'c-printable))
+                        (lambda () (yaml--parse-from-grammar 'b-char))
+                        (lambda () (yaml--parse-from-grammar 'c-byte-order-mark))))
+
+            ('ns-plain-first
+             (let ((c (nth 0 args)))
+               (yaml--any
+                (yaml--but (lambda () (yaml--parse-from-grammar 'ns-char))
+                           (lambda () (yaml--parse-from-grammar 'c-indicator)))
+                (yaml--all
+                 (yaml--any (yaml--chr ?\?)
+                            (yaml--chr ?\:)
+                            (yaml--chr ?\-))
+                 (yaml--chk "=" (yaml--parse-from-grammar 'ns-plain-safe c))))))
+
+            ('c-ns-esc-char
+             (yaml--all
+              (yaml--chr ?\\)
+              (yaml--any (yaml--parse-from-grammar 'ns-esc-null)
+                         (yaml--parse-from-grammar 'ns-esc-bell)
+                         (yaml--parse-from-grammar 'ns-esc-backspace)
+                         (yaml--parse-from-grammar 'ns-esc-horizontal-tab)
+                         (yaml--parse-from-grammar 'ns-esc-line-feed)
+                         (yaml--parse-from-grammar 'ns-esc-vertical-tab)
+                         (yaml--parse-from-grammar 'ns-esc-form-feed)
+                         (yaml--parse-from-grammar 'ns-esc-carriage-return)
+                         (yaml--parse-from-grammar 'ns-esc-escape)
+                         (yaml--parse-from-grammar 'ns-esc-space)
+                         (yaml--parse-from-grammar 'ns-esc-double-quote)
+                         (yaml--parse-from-grammar 'ns-esc-slash)
+                         (yaml--parse-from-grammar 'ns-esc-backslash)
+                         (yaml--parse-from-grammar 'ns-esc-next-line)
+                         (yaml--parse-from-grammar 'ns-esc-non-breaking-space)
+                         (yaml--parse-from-grammar 'ns-esc-line-separator)
+                         (yaml--parse-from-grammar 'ns-esc-paragraph-separator)
+                         (yaml--parse-from-grammar 'ns-esc-8-bit)
+                         (yaml--parse-from-grammar 'ns-esc-16-bit)
+                         (yaml--parse-from-grammar 'ns-esc-32-bit))))
+
+            ('ns-flow-map-entry
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--any
+                (yaml--all (yaml--chr ?\?)
+                           (yaml--parse-from-grammar 's-separate n c)
+                           (yaml--parse-from-grammar 'ns-flow-map-explicit-entry n c))
+                (yaml--parse-from-grammar 'ns-flow-map-implicit-entry n c))))
+
+            ('l-explicit-document
+             (yaml--all
+              (yaml--parse-from-grammar 'c-directives-end)
+              (yaml--any (yaml--parse-from-grammar 'l-bare-document)
+                         (yaml--all (yaml--parse-from-grammar 'e-node)
+                                    (yaml--parse-from-grammar 's-l-comments)))))
+
+            ('s-white
+             (yaml--any (yaml--parse-from-grammar 's-space)
+                        (yaml--parse-from-grammar 's-tab)))
+
+            ('l-keep-empty
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--rep2 0 nil
+                            (lambda () (yaml--parse-from-grammar 'l-empty n "block-in")))
+                (yaml--rep 0 1
+                           (lambda () (yaml--parse-from-grammar 'l-trail-comments n))))))
+
+            ('ns-tag-prefix
+             (yaml--any (yaml--parse-from-grammar 'c-ns-local-tag-prefix)
+                        (yaml--parse-from-grammar 'ns-global-tag-prefix)))
+
+            ('c-l+folded
+             (let ((n (nth 0 args)))
+               (setq yaml-n n)
+               (yaml--all
+                (yaml--chr ?\>)
+                (yaml--parse-from-grammar 'c-b-block-header
+                                          n
+                                          (yaml--state-curr-t))
+                (yaml--parse-from-grammar 'l-folded-content
+                                          (max (+ n (yaml--state-curr-m)) 1)
+                                          (yaml--state-curr-t)))))
+
+            ('ns-directive-name
+             (yaml--rep 1 nil (lambda () (yaml--parse-from-grammar 'ns-char))))
+
+            ('b-char
+             (yaml--any (yaml--parse-from-grammar 'b-line-feed)
+                        (yaml--parse-from-grammar 'b-carriage-return)))
+
+            ('ns-plain-multi-line
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'ns-plain-one-line c)
+                (yaml--rep2 0 nil
+                            (lambda ()
+                              (yaml--parse-from-grammar 's-ns-plain-next-line n c))))))
+
+            ('ns-char
+             (yaml--but (lambda () (yaml--parse-from-grammar 'nb-char))
+                        (lambda () (yaml--parse-from-grammar 's-white))))
+
+            ('s-space
+             (yaml--chr ?\x20))
+
+            ('c-l-block-seq-entry
+             (yaml--all (yaml--chr ?\-)
+                        (yaml--chk "!" (yaml--parse-from-grammar 'ns-char))
+                        (yaml--parse-from-grammar 's-l+block-indented
+                                                  (nth 0 args)
+                                                  "block-in")))
+
+            ('c-ns-properties
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--any
+                (yaml--all
+                 (yaml--parse-from-grammar 'c-ns-tag-property)
+                 (yaml--rep 0 1
+                            (lambda ()
+                              (yaml--all
+                               (yaml--parse-from-grammar 's-separate n c)
+                               (yaml--parse-from-grammar 'c-ns-anchor-property)))))
+                (yaml--all
+                 (yaml--parse-from-grammar 'c-ns-anchor-property)
+                 (yaml--rep 0 1
+                            (lambda () (yaml--all
+                                   (yaml--parse-from-grammar 's-separate n c)
+                                   (yaml--parse-from-grammar 'c-ns-tag-property))))))))
+
+            ('ns-directive-parameter
+             (yaml--rep 1 nil (lambda () (yaml--parse-from-grammar 'ns-char))))
+
+            ('c-chomping-indicator
+             (yaml--any (when (yaml--chr ?\-) (yaml--set t "strip") t)
+                        (when (yaml--chr ?\+) (yaml--set t "keep") t)
+                        (when (yaml--empty) (yaml--set t "clip") t)))
+
+            ('ns-global-tag-prefix
+             (yaml--all
+              (yaml--parse-from-grammar 'ns-tag-char)
+              (yaml--rep2 0 nil
+                          (lambda () (yaml--parse-from-grammar 'ns-uri-char)))))
+
+            ('c-ns-flow-pair-json-key-entry
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'c-s-implicit-json-key "flow-key")
+                (yaml--parse-from-grammar 'c-ns-flow-map-adjacent-value n c))))
+
+            ('l-literal-content
+             (let ((n (nth 0 args))
+                   (tt (nth 1 args)))
+               (yaml--all
+                (yaml--rep 0 1
+                           (lambda ()
+                             (yaml--all (yaml--parse-from-grammar 'l-nb-literal-text n)
+                                        (yaml--rep2 0 nil
+                                                    (lambda ()
+                                                      (yaml--parse-from-grammar 'b-nb-literal-next n)))
+                                        (yaml--parse-from-grammar 'b-chomped-last tt))))
+                (yaml--parse-from-grammar 'l-chomped-empty n tt))))
+
+            ('c-document-end
+             (yaml--all (yaml--chr ?\.)
+                        (yaml--chr ?\.)
+                        (yaml--chr ?\.)))
+
+            ('nb-double-text
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (pcase c
+                 ("block-key" (yaml--parse-from-grammar 'nb-double-one-line))
+                 ("flow-in" (yaml--parse-from-grammar 'nb-double-multi-line n))
+                 ("flow-key" (yaml--parse-from-grammar 'nb-double-one-line))
+                 ("flow-out" (yaml--parse-from-grammar 'nb-double-multi-line n)))))
+
+            ('s-b-comment
+             (yaml--all
+              (yaml--rep 0 1
+                         (lambda ()
+                           (yaml--all
+                            (yaml--parse-from-grammar 's-separate-in-line)
+                            (yaml--rep 0 1
+                                       (lambda () (yaml--parse-from-grammar 'c-nb-comment-text))))))
+              (yaml--parse-from-grammar 'b-comment)))
+
+            ('s-block-line-prefix
+             (let ((n (nth 0 args)))
+               (yaml--parse-from-grammar 's-indent n)))
+
+            ('c-tag-handle
+             (yaml--any (yaml--parse-from-grammar 'c-named-tag-handle)
+                        (yaml--parse-from-grammar 'c-secondary-tag-handle)
+                        (yaml--parse-from-grammar 'c-primary-tag-handle)))
+
+            ('ns-plain-one-line
+             (let ((c (nth 0 args)))
+               (yaml--all (yaml--parse-from-grammar 'ns-plain-first c)
+                          (yaml--parse-from-grammar 'nb-ns-plain-in-line c))))
+
+            ('nb-json
+             (yaml--any (yaml--chr ?\x09)
+                        (yaml--chr-range ?\x20 ?\x10FFFF)))
+
+            ('s-ns-plain-next-line
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all (yaml--parse-from-grammar 's-flow-folded n)
+                          (yaml--parse-from-grammar 'ns-plain-char c)
+                          (yaml--parse-from-grammar 'nb-ns-plain-in-line c))))
+
+            ('c-reserved
+             (yaml--any (yaml--chr ?\@) (yaml--chr ?\`)))
+
+            ('b-l-trimmed
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'b-non-content)
+                (yaml--rep 1 nil
+                           (lambda () (yaml--parse-from-grammar 'l-empty n c))))))
+
+            ('l-document-prefix
+             (yaml--all
+              (yaml--rep 0 1
+                         (lambda () (yaml--parse-from-grammar 'c-byte-order-mark)))
+              (yaml--rep2 0 nil
+                          (lambda () (yaml--parse-from-grammar 'l-comment)))))
+
+            ('c-byte-order-mark
+             (yaml--chr ?\xFEFF))
+
+            ('c-anchor
+             (yaml--chr ?\&))
+
+            ('s-double-escaped
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--rep2 0 nil
+                            (lambda () (yaml--parse-from-grammar 's-white)))
+                (yaml--chr ?\\)
+                (yaml--parse-from-grammar 'b-non-content)
+                (yaml--rep2 0 nil
+                            (lambda () (yaml--parse-from-grammar 'l-empty n "flow-in")))
+                (yaml--parse-from-grammar 's-flow-line-prefix n))))
+
+            ('ns-esc-32-bit
+             (yaml--all
+              (yaml--chr ?U)
+              (yaml--rep 8 8 (lambda () (yaml--parse-from-grammar 'ns-hex-digit)))))
+
+
+            ('b-non-content
+             (yaml--parse-from-grammar 'b-break))
+
+            ('ns-tag-char
+             (yaml--but (lambda () (yaml--parse-from-grammar 'ns-uri-char))
+                        (lambda () (yaml--chr ?\!))
+                        (lambda () (yaml--parse-from-grammar 'c-flow-indicator))))
+
+            ('b-carriage-return
+             (yaml--chr ?\x0D))
+
+            ('s-double-next-line
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 's-double-break n)
+                (yaml--rep 0 1
+                           (lambda ()
+                             (yaml--all
+                              (yaml--parse-from-grammar 'ns-double-char)
+                              (yaml--parse-from-grammar 'nb-ns-double-in-line)
+                              (yaml--any
+                               (yaml--parse-from-grammar 's-double-next-line n)
+                               (yaml--rep2 0 nil
+                                           (lambda () (yaml--parse-from-grammar 's-white))))))))))
+
+            ('ns-esc-non-breaking-space
+             (yaml--chr ?\_))
+
+            ('l-nb-diff-lines
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'l-nb-same-lines n)
+                (yaml--rep2 0 nil
+                            (lambda ()
+                              (yaml--all (yaml--parse-from-grammar 'b-as-line-feed)
+                                         (yaml--parse-from-grammar 'l-nb-same-lines n)))))))
+
+            ('s-flow-folded
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--rep 0 1
+                           (lambda () (yaml--parse-from-grammar 's-separate-in-line)))
+                (yaml--parse-from-grammar 'b-l-folded n "flow-in")
+                (yaml--parse-from-grammar 's-flow-line-prefix n))))
+
+            ('ns-flow-map-explicit-entry
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--any
+                (yaml--parse-from-grammar 'ns-flow-map-implicit-entry n c)
+                (yaml--all
+                 (yaml--parse-from-grammar 'e-node)
+                 (yaml--parse-from-grammar 'e-node)))))
+
+            ('ns-l-block-map-implicit-entry
+             (yaml--all
+              (yaml--any (yaml--parse-from-grammar 'ns-s-block-map-implicit-key)
+                         (yaml--parse-from-grammar 'e-node))
+              (yaml--parse-from-grammar 'c-l-block-map-implicit-value (nth 0 args))))
+
+            ('l-nb-folded-lines
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 's-nb-folded-text n)
+                (yaml--rep2 0 nil
+                            (lambda ()
+                              (yaml--all (yaml--parse-from-grammar 'b-l-folded n "block-in")
+                                         (yaml--parse-from-grammar 's-nb-folded-text n)))))))
+
+            ('c-l-block-map-explicit-key
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--chr ?\?)
+                (yaml--parse-from-grammar 's-l+block-indented n "block-out"))))
+
+            ('s-separate
+             (let ((n (nth 0 args))
+                   (c (nth 1 args)))
+               (pcase c
+                 ("block-in" (yaml--parse-from-grammar 's-separate-lines n))
+                 ("block-key" (yaml--parse-from-grammar 's-separate-in-line))
+                 ("block-out" (yaml--parse-from-grammar 's-separate-lines n))
+                 ("flow-in" (yaml--parse-from-grammar 's-separate-lines n))
+                 ("flow-key" (yaml--parse-from-grammar 's-separate-in-line))
+                 ("flow-out" (yaml--parse-from-grammar 's-separate-lines n)))))
+
+            ('ns-flow-pair-entry
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--any
+                (yaml--parse-from-grammar 'ns-flow-pair-yaml-key-entry n c)
+                (yaml--parse-from-grammar 'c-ns-flow-map-empty-key-entry n c)
+                (yaml--parse-from-grammar 'c-ns-flow-pair-json-key-entry n c))))
+
+            ('c-flow-indicator
+             (yaml--any (yaml--chr ?\,)
+                        (yaml--chr ?\[)
+                        (yaml--chr ?\])
+                        (yaml--chr ?\{)
+                        (yaml--chr ?\})))
+
+            ('ns-flow-pair-yaml-key-entry
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'ns-s-implicit-yaml-key "flow-key")
+                (yaml--parse-from-grammar 'c-ns-flow-map-separate-value n c))))
+
+            ('e-scalar
+             (yaml--empty))
+
+            ('s-indent-lt
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--rep2 0 nil
+                            (lambda () (yaml--parse-from-grammar 's-space)))
+                (< (length (yaml--match)) n))))
+
+            ('nb-single-one-line
+             (yaml--rep2 0 nil
+                         (lambda () (yaml--parse-from-grammar 'nb-single-char))))
+
+            ('c-collect-entry
+             (yaml--chr ?\,))
+
+            ('ns-l-compact-sequence
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'c-l-block-seq-entry n)
+                (yaml--rep2 0 nil
+                            (lambda ()
+                              (yaml--all
+                               (yaml--parse-from-grammar 's-indent n)
+                               (yaml--parse-from-grammar 'c-l-block-seq-entry n)))))))
+
+            ('c-comment
+             (yaml--chr ?\#))
+
+            ('s-line-prefix
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (pcase c
+                 ("block-in" (yaml--parse-from-grammar 's-block-line-prefix n))
+                 ("block-out" (yaml--parse-from-grammar 's-block-line-prefix n))
+                 ("flow-in" (yaml--parse-from-grammar 's-flow-line-prefix n))
+                 ("flow-out" (yaml--parse-from-grammar 's-flow-line-prefix n)))))
+
+            ('s-tab
+             (yaml--chr ?\x09))
+
+            ('c-directive
+             (yaml--chr ?\%))
+
+            ('ns-flow-pair
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--any
+                (yaml--all (yaml--chr ?\?)
+                           (yaml--parse-from-grammar 's-separate n c)
+                           (yaml--parse-from-grammar 'ns-flow-map-explicit-entry n c))
+                (yaml--parse-from-grammar 'ns-flow-pair-entry n c))))
+
+            ('s-l+block-indented
+             (let ((m (yaml--auto-detect-indent (nth 0 args))))
+               (yaml--any
+                (yaml--all
+                 (yaml--parse-from-grammar 's-indent m)
+                 (yaml--any
+                  (yaml--parse-from-grammar 'ns-l-compact-sequence
+                                            (+ (nth 0 args) (+ 1 m)))
+                  (yaml--parse-from-grammar 'ns-l-compact-mapping
+                                            (+ (nth 0 args) (+ 1 m)))))
+                (yaml--parse-from-grammar 's-l+block-node (nth 0 args) (nth 1 args))
+                (yaml--all (yaml--parse-from-grammar 'e-node)
+                           (yaml--parse-from-grammar 's-l-comments)))))
+
+            ('c-single-quote
+             (yaml--chr ?\'))
+
+            ('s-flow-line-prefix
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 's-indent n)
+                (yaml--rep 0 1
+                           (lambda () (yaml--parse-from-grammar 's-separate-in-line))))))
+
+            ('nb-double-char
+             (yaml--any
+              (yaml--parse-from-grammar 'c-ns-esc-char)
+              (yaml--but (lambda () (yaml--parse-from-grammar 'nb-json))
+                         (lambda () (yaml--chr ?\\)) (lambda () (yaml--chr ?\")))))
+
+            ('l-comment
+             (yaml--all
+              (yaml--parse-from-grammar 's-separate-in-line)
+              (yaml--rep 0 1
+                         (lambda () (yaml--parse-from-grammar 'c-nb-comment-text)))
+              (yaml--parse-from-grammar 'b-comment)))
+
+            ('ns-hex-digit
+             (yaml--any
+              (yaml--parse-from-grammar 'ns-dec-digit)
+              (yaml--chr-range ?\x41 ?\x46)
+              (yaml--chr-range ?\x61 ?\x66)))
+
+            ('s-l+flow-in-block
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 's-separate (+ n 1) "flow-out")
+                (yaml--parse-from-grammar 'ns-flow-node (+ n 1) "flow-out")
+                (yaml--parse-from-grammar 's-l-comments))))
+
+            ('c-flow-json-node
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--rep 0 1
+                           (lambda ()
+                             (yaml--all
+                              (yaml--parse-from-grammar 'c-ns-properties n c)
+                              (yaml--parse-from-grammar 's-separate n c))))
+                (yaml--parse-from-grammar 'c-flow-json-content n c))))
+
+            ('c-b-block-header
+             (let ((m (nth 0 args))
+                   (tt (nth 1 args)))
+               (yaml--all
+                (yaml--any
+                 (and (not (string-match "\\`[-+][0-9]"
+                                         (yaml--slice yaml--parsing-position)))
+                      ;; hack to not match this case if there is a number.
+                      (yaml--all
+                       (yaml--parse-from-grammar 'c-indentation-indicator m)
+                       (yaml--parse-from-grammar 'c-chomping-indicator tt)))
+                 (yaml--all
+                  (yaml--parse-from-grammar 'c-chomping-indicator tt)
+                  (yaml--parse-from-grammar 'c-indentation-indicator m)))
+                (yaml--parse-from-grammar 's-b-comment))))
+
+            ('ns-esc-8-bit
+             (yaml--all (yaml--chr ?x)
+                        (yaml--rep 2 2
+                                   (lambda () (yaml--parse-from-grammar 'ns-hex-digit)))))
+
+            ('ns-anchor-name
+             (yaml--rep 1 nil
+                        (lambda () (yaml--parse-from-grammar 'ns-anchor-char))))
+
+            ('ns-esc-slash
+             (yaml--chr ?\/))
+
+            ('s-nb-folded-text
+             (let ((n (nth 0 args)))
+               (yaml--all (yaml--parse-from-grammar 's-indent n)
+                          (yaml--parse-from-grammar 'ns-char)
+                          (yaml--rep2 0 nil
+                                      (lambda () (yaml--parse-from-grammar 'nb-char))))))
+
+            ('ns-word-char
+             (yaml--any (yaml--parse-from-grammar 'ns-dec-digit)
+                        (yaml--parse-from-grammar 'ns-ascii-letter)
+                        (yaml--chr ?\-)))
+
+            ('ns-esc-form-feed
+             (yaml--chr ?f))
+
+            ('ns-s-block-map-implicit-key
+             (yaml--any
+              (yaml--parse-from-grammar 'c-s-implicit-json-key "block-key")
+              (yaml--parse-from-grammar 'ns-s-implicit-yaml-key "block-key")))
+
+            ('ns-esc-null (yaml--chr ?\0))
+
+            ('c-ns-tag-property
+             (yaml--any (yaml--parse-from-grammar 'c-verbatim-tag)
+                        (yaml--parse-from-grammar 'c-ns-shorthand-tag)
+                        (yaml--parse-from-grammar 'c-non-specific-tag)))
+
+            ('c-ns-local-tag-prefix
+             (yaml--all
+              (yaml--chr ?\!)
+              (yaml--rep2 0 nil
+                          (lambda () (yaml--parse-from-grammar 'ns-uri-char)))))
+
+            ('ns-tag-directive
+             (yaml--all (yaml--chr ?T) (yaml--chr ?A) (yaml--chr ?G)
+                        (yaml--parse-from-grammar 's-separate-in-line)
+                        (yaml--parse-from-grammar 'c-tag-handle)
+                        (yaml--parse-from-grammar 's-separate-in-line)
+                        (yaml--parse-from-grammar 'ns-tag-prefix)))
+
+            ('c-flow-mapping
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--chr ?\{)
+                (yaml--rep 0 1
+                           (lambda () (yaml--parse-from-grammar 's-separate n c)))
+                (yaml--rep 0 1
+                           (lambda ()
+                             (yaml--parse-from-grammar 'ns-s-flow-map-entries
+                                                       n
+                                                       (yaml--parse-from-grammar 'in-flow c))))
+                (yaml--chr ?\}))))
+
+            ('ns-double-char
+             (yaml--but (lambda () (yaml--parse-from-grammar 'nb-double-char))
+                        (lambda () (yaml--parse-from-grammar 's-white))))
+
+            ('ns-ascii-letter
+             (yaml--any (yaml--chr-range ?\x41 ?\x5A)
+                        (yaml--chr-range ?\x61 ?\x7A)))
+
+            ('b-break
+             (yaml--any (yaml--all (yaml--parse-from-grammar 'b-carriage-return)
+                                   (yaml--parse-from-grammar 'b-line-feed))
+                        (yaml--parse-from-grammar 'b-carriage-return)
+                        (yaml--parse-from-grammar 'b-line-feed)))
+
+            ('nb-ns-double-in-line
+             (yaml--rep2 0 nil
+                         (lambda ()
+                           (yaml--all
+                            (yaml--rep2 0 nil
+                                        (lambda () (yaml--parse-from-grammar 's-white)))
+                            (yaml--parse-from-grammar 'ns-double-char)))))
+
+            ('s-l+block-node
+             (yaml--any
+              (yaml--parse-from-grammar 's-l+block-in-block (nth 0 args) (nth 1 args))
+              (yaml--parse-from-grammar 's-l+flow-in-block (nth 0 args))))
+
+            ('ns-esc-bell
+             (yaml--chr ?a))
+
+            ('c-named-tag-handle
+             (yaml--all
+              (yaml--chr ?\!)
+              (yaml--rep 1 nil (lambda () (yaml--parse-from-grammar 'ns-word-char)))
+              (yaml--chr ?\!)))
+
+            ('s-separate-lines
+             (let ((n (nth 0 args)))
+               (yaml--any (yaml--all (yaml--parse-from-grammar 's-l-comments)
+                                     (yaml--parse-from-grammar 's-flow-line-prefix n))
+                          (yaml--parse-from-grammar 's-separate-in-line))))
+
+            ('l-directive
+             (yaml--all (yaml--chr ?\%)
+                        (yaml--any (yaml--parse-from-grammar 'ns-yaml-directive)
+                                   (yaml--parse-from-grammar 'ns-tag-directive)
+                                   (yaml--parse-from-grammar 'ns-reserved-directive))
+                        (yaml--parse-from-grammar 's-l-comments)))
+
+            ('ns-esc-escape
+             (yaml--chr ?e))
+
+            ('b-nb-literal-next
+             (let ((n (nth 0 args)))
+               (yaml--all (yaml--parse-from-grammar 'b-as-line-feed)
+                          (yaml--parse-from-grammar 'l-nb-literal-text n))))
+
+            ('ns-s-flow-map-entries
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'ns-flow-map-entry n c)
+                (yaml--rep 0 1 (lambda () (yaml--parse-from-grammar 's-separate n c)))
+                (yaml--rep 0 1
+                           (lambda ()
+                             (yaml--all
+                              (yaml--chr ?\,)
+                              (yaml--rep 0 1
+                                         (lambda () (yaml--parse-from-grammar 's-separate n c)))
+                              (yaml--rep 0 1
+                                         (lambda ()
+                                           (yaml--parse-from-grammar 'ns-s-flow-map-entries
+                                                                     n
+                                                                     c)))))))))
+
+            ('c-nb-comment-text
+             (yaml--all
+              (yaml--chr ?\#)
+              (yaml--rep2 0 nil (lambda () (yaml--parse-from-grammar 'nb-char)))))
+
+            ('ns-dec-digit
+             (yaml--chr-range ?\x30 ?\x39))
+
+            ('ns-yaml-directive
+             (yaml--all (yaml--chr ?Y) (yaml--chr ?A) (yaml--chr ?M) (yaml--chr ?L)
+                        (yaml--parse-from-grammar 's-separate-in-line)
+                        (yaml--parse-from-grammar 'ns-yaml-version)))
+
+            ('c-mapping-key
+             (yaml--chr ?\?))
+
+            ('b-as-line-feed
+             (yaml--parse-from-grammar 'b-break))
+
+            ('s-l+block-in-block
+             (yaml--any
+              (yaml--parse-from-grammar 's-l+block-scalar
+                                        (nth 0 args)
+                                        (nth 1 args))
+              (yaml--parse-from-grammar 's-l+block-collection
+                                        (nth 0 args)
+                                        (nth 1 args))))
+
+            ('ns-esc-paragraph-separator
+             (yaml--chr ?P))
+
+            ('c-double-quoted
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all (yaml--chr ?\")
+                          (yaml--parse-from-grammar 'nb-double-text n c)
+                          (yaml--chr ?\"))))
+
+            ('b-line-feed
+             (yaml--chr ?\x0A))
+
+            ('ns-esc-horizontal-tab
+             (yaml--any (yaml--chr ?t) (yaml--chr ?\x09)))
+
+            ('c-ns-flow-map-empty-key-entry
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'e-node)
+                (yaml--parse-from-grammar 'c-ns-flow-map-separate-value n c))))
+
+            ('l-any-document
+             (yaml--any (yaml--parse-from-grammar 'l-directive-document)
+                        (yaml--parse-from-grammar 'l-explicit-document)
+                        (yaml--parse-from-grammar 'l-bare-document)))
+
+            ('c-tag (yaml--chr ?\!))
+
+            ('c-escape (yaml--chr ?\\))
+
+            ('c-sequence-end (yaml--chr ?\]))
+
+            ('l+block-mapping
+             (let ((new-m (yaml--auto-detect-indent (nth 0 args))))
+               (if (= 0 new-m)
+                   nil ;; For some fixed auto-detected m > 0 ;; Is this right???
+                 (yaml--all
+                  (yaml--set m new-m)
+                  (yaml--rep 1 nil
+                             (lambda ()
+                               (yaml--all
+                                (yaml--parse-from-grammar 's-indent
+                                                          (+ (nth 0 args) new-m))
+                                (yaml--parse-from-grammar 'ns-l-block-map-entry
+                                                          (+ (nth 0 args) new-m)))))))))
+
+            ('c-ns-flow-map-adjacent-value
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--chr ?\:)
+                (yaml--any
+                 (yaml--all
+                  (yaml--rep 0 1
+                             (lambda () (yaml--parse-from-grammar 's-separate n c)))
+                  (yaml--parse-from-grammar 'ns-flow-node n c))
+                 (yaml--parse-from-grammar 'e-node)))))
+
+            ('s-single-next-line
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 's-flow-folded n)
+                (yaml--rep 0 1
+                           (lambda ()
+                             (yaml--all
+                              (yaml--parse-from-grammar 'ns-single-char)
+                              (yaml--parse-from-grammar 'nb-ns-single-in-line)
+                              (yaml--any
+                               (yaml--parse-from-grammar 's-single-next-line n)
+                               (yaml--rep2 0 nil
+                                           (lambda () (yaml--parse-from-grammar 's-white))))))))))
+
+            ('s-separate-in-line
+             (yaml--any (yaml--rep 1 nil
+                                   (lambda () (yaml--parse-from-grammar 's-white)))
+                        (yaml--start-of-line)))
+
+            ('b-comment
+             (yaml--any (yaml--parse-from-grammar 'b-non-content)
+                        (yaml--end-of-stream)))
+
+            ('ns-esc-backslash
+             (yaml--chr ?\\))
+
+            ('c-ns-anchor-property
+             (yaml--all (yaml--chr ?\&)
+                        (yaml--parse-from-grammar 'ns-anchor-name)))
+
+            ('ns-plain-safe
+             (let ((c (nth 0 args)))
+               (pcase c
+                 ("block-key" (yaml--parse-from-grammar 'ns-plain-safe-out))
+                 ("flow-in" (yaml--parse-from-grammar 'ns-plain-safe-in))
+                 ("flow-key" (yaml--parse-from-grammar 'ns-plain-safe-in))
+                 ("flow-out" (yaml--parse-from-grammar 'ns-plain-safe-out)))))
+
+            ('ns-flow-content
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--any (yaml--parse-from-grammar 'ns-flow-yaml-content n c)
+                          (yaml--parse-from-grammar 'c-flow-json-content n c))))
+
+            ('c-ns-flow-map-separate-value
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--all
+                (yaml--chr ?\:)
+                (yaml--chk "!" (yaml--parse-from-grammar 'ns-plain-safe c))
+                (yaml--any (yaml--all (yaml--parse-from-grammar 's-separate n c)
+                                      (yaml--parse-from-grammar 'ns-flow-node n c))
+                           (yaml--parse-from-grammar 'e-node)))))
+
+            ('in-flow
+             (let ((c (nth 0 args)))
+               (pcase c
+                 ("block-key" "flow-key")
+                 ("flow-in" "flow-in")
+                 ("flow-key" "flow-key")
+                 ("flow-out" "flow-in"))))
+
+            ('c-verbatim-tag
+             (yaml--all
+              (yaml--chr ?\!)
+              (yaml--chr ?\<)
+              (yaml--rep 1 nil (lambda () (yaml--parse-from-grammar 'ns-uri-char)))
+              (yaml--chr ?\>)))
+
+            ('c-literal
+             (yaml--chr ?\|))
+
+            ('ns-esc-line-feed
+             (yaml--chr ?n))
+
+            ('nb-double-multi-line
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'nb-ns-double-in-line)
+                (yaml--any (yaml--parse-from-grammar 's-double-next-line n)
+                           (yaml--rep2 0 nil
+                                       (lambda () (yaml--parse-from-grammar 's-white)))))))
+
+            ('b-l-spaced
+             (let ((n (nth 0 args)))
+               (yaml--all
+                (yaml--parse-from-grammar 'b-as-line-feed)
+                (yaml--rep2 0 nil
+                            (lambda () (yaml--parse-from-grammar 'l-empty n "block-in"))))))
+
+            ('ns-flow-yaml-content
+             (let ((n (nth 0 args)) (c (nth 1 args)))
+               (yaml--parse-from-grammar 'ns-plain n c)))
+            (_ (error "Unknown parsing grammar state: %S %S" state args)))))
+    (when (and yaml--parse-debug
+               res
+               (not (memq state yaml--tracing-ignore)))
+      (message "<%s|%s %40s = '%s'"
+               (make-string (length yaml--states) ?-)
+               (make-string (- 70 (length yaml--states)) ?\s)
+               state
+               (replace-regexp-in-string
+                "\n"
+                "↓"
+                (substring yaml--parsing-input beg yaml--parsing-position))))
+    (yaml--pop-state)
+    (if (not res)
+        nil
+      (let ((res-type (cdr (assq state yaml--grammar-resolution-rules)))
+            (res (if (memq state yaml--terminal-rules)
+                     ;; Ignore children if at-rule is
+                     ;; indicated to be terminal.
+                     t
+                   res)))
+        (cond
+         ((or (assq state yaml--grammar-events-in)
+              (assq state yaml--grammar-events-out))
+          (let ((str (substring yaml--parsing-input beg yaml--parsing-position)))
+            (when yaml--parsing-store-position
+              (setq str (propertize str 'yaml-position
+                                    (cons (1+ beg)
+                                          (1+ yaml--parsing-position)))))
+            (when (memq state '(c-l+folded c-l+literal))
+              (setq str (propertize str 'yaml-n (max 0 yaml-n))))
+            (list (if yaml--parsing-store-position
+                      (propertize str 'yaml-position (cons (1+ beg)
+                                                           (1+ yaml--parsing-position)))
+                    str)
+                  state
+                  res)))
+         ((equal res-type 'list) (list state res))
+         ((equal res-type 'literal)
+          (substring yaml--parsing-input beg yaml--parsing-position))
+         (t res))))))
+
+;;; Encoding
+
+(defun yaml-encode (object)
+  "Encode OBJECT to a YAML string."
+  (with-temp-buffer
+    (yaml--encode-object object 0)
+    (goto-char (point-min))
+    (while (looking-at-p "\n")
+      (delete-char 1))
+    (buffer-string)))
+
+(defun yaml--encode-object (object indent &optional auto-indent)
+  "Encode a Lisp OBJECT to YAML.
+
+INDENT indicates how deeply nested the object will be displayed
+in the YAML.  If AUTO-INDENT is non-nil, then emit the object
+without first inserting a newline."
+  (cond
+   ((yaml--scalarp object) (yaml--encode-scalar object))
+   ((hash-table-p object) (yaml--encode-hash-table object indent auto-indent))
+   ((listp object) (yaml--encode-list object indent auto-indent))
+   ((arrayp object) (yaml--encode-array object indent auto-indent))
+   (t (error "Unknown object %s" object))))
+
+(defun yaml--scalarp (object)
+  "Return non-nil if OBJECT correlates to a YAML scalar."
+  (or (numberp object)
+      (symbolp object)
+      (stringp object)
+      (not object)))
+
+(defun yaml--encode-escape-string (s)
+  "Escape yaml special characters in string S."
+  (let* ((s (replace-regexp-in-string "\\\\" "\\\\" s))
+         (s (replace-regexp-in-string "\n" "\\\\n" s))
+         (s (replace-regexp-in-string "\t" "\\\\t" s))
+         (s (replace-regexp-in-string "\r" "\\\\r" s))
+         (s (replace-regexp-in-string "\"" "\\\\\"" s)))
+    s))
+
+(defun yaml--encode-array (a indent &optional auto-indent)
+  "Encode array A to a string in the context of being INDENT deep.
+
+If AUTO-INDENT is non-nil, start the list on the current line,
+auto-detecting the indentation.  Functionality defers to
+`yaml--encode-list'."
+  (if (equal a [])
+      (insert "[]")
+    (yaml--encode-list (seq-map #'identity a)
+                       indent
+                       auto-indent)))
+
+
+(defun yaml--encode-scalar (s)
+  "Encode scalar S to buffer."
+  (cond
+   ((not s) (insert "null"))
+   ((eql t s) (insert "true"))
+   ((symbolp s)
+    (cond
+     ((eql s :null) (insert "null"))
+     ((eql s :false) (insert "false"))
+     (t (insert (symbol-name s)))))
+   ((numberp s) (insert (number-to-string s)))
+   ((stringp s)
+    (if (and (string-match "\\`[-_a-zA-Z0-9]+\\'" s)
+	     (eql yaml-encode-dialect :auto))
+        (insert s)
+      (insert "\"" (yaml--encode-escape-string s) "\"")))))
+
+(defun yaml--alist-to-hash-table (l)
+  "Return hash representation of L if it is an alist, nil otherwise."
+  (when (and (listp l)
+             (seq-every-p (lambda (x) (and (consp x) (atom (car x)))) l))
+    (let ((h (make-hash-table)))
+      (seq-map (lambda (cpair)
+                 (let* ((k (car cpair))
+                        (v (alist-get k l)))
+                   (puthash k v h)))
+               l)
+      h)))
+
+(defun yaml--encode-list (l indent &optional auto-indent)
+  "Encode list L to a string in the context of being INDENT deep.
+
+If AUTO-INDENT is non-nil, start the list on the current line,
+auto-detecting the indentation"
+  (let ((ht (yaml--alist-to-hash-table l)))
+    (cond (ht
+           (yaml--encode-hash-table ht indent auto-indent))
+          ((zerop (length l))
+           (insert "[]"))
+	      ((eql yaml-encode-dialect :kyaml-pretty)
+	       (let* ((indent-string (make-string indent ?\s))
+		          (next-indent (+ indent yaml-encode-indent-width))
+		          (next-indent-string (make-string next-indent ?\s)))
+	         (insert "[" "\n")
+             (let ((i 0))
+	           (seq-do (lambda (object)
+		                 (insert next-indent-string)
+		                 (yaml--encode-object object next-indent)
+                         (insert "," "\n")
+                         (cl-incf i))
+		               l))
+	         (insert indent-string "]")))
+          ((eql yaml-encode-dialect :kyaml-compact)
+	       (insert "[")
+           (seq-do (lambda (object)
+                     (yaml--encode-object object 0)
+                     (insert ", "))
+                   l)
+           (insert "]"))
+          ((and yaml--encode-use-flow-sequence
+                (seq-every-p #'yaml--scalarp l))
+           (insert "[")
+           (yaml--encode-object (car l) 0)
+           (seq-do (lambda (object)
+                     (insert ", ")
+                     (yaml--encode-object object 0))
+                   (cdr l))
+           (insert "]"))
+          (t
+           (when (zerop indent)
+             (setq indent yaml-encode-indent-width))
+           (let* ((first t)
+                  (indent-string (make-string (- indent yaml-encode-indent-width) ?\s)))
+             (seq-do
+              (lambda (object)
+                (if (not first)
+                    (insert "\n" indent-string "- ")
+                  (if auto-indent
+                      (let ((curr-indent (yaml--encode-auto-detect-indent)))
+                        (insert (make-string (- indent curr-indent) ?\s)  "- "))
+                    (insert "\n" indent-string "- "))
+                  (setq first nil))
+                (if (or (hash-table-p object)
+                        (yaml--alist-to-hash-table object))
+                    (yaml--encode-object object indent t)
+                  (yaml--encode-object object (+ indent yaml-encode-indent-width) nil)))
+              l))))))
+
+(defun yaml--encode-auto-detect-indent ()
+  "Return the amount of indentation at current place in encoding."
+  (length (thing-at-point 'line)))
+
+(defun yaml--encode-hash-table (m indent &optional auto-indent)
+  "Encode hash table M to a string in the context of being INDENT deep.
+
+If AUTO-INDENT is non-nil, auto-detect the indent on the current
+line and insert accordingly."
+  (cond ((zerop (hash-table-size m))
+         (insert "{}"))
+	((eql yaml-encode-dialect :kyaml-pretty)
+	 (let* ((indent-string (make-string indent ?\s))
+		(next-indent (+ indent yaml-encode-indent-width))
+		(next-indent-string (make-string next-indent ?\s)))
+	   (insert "{" "\n")
+       (let ((i 0))
+	     (maphash
+	      (lambda (k v)
+	        (insert next-indent-string)
+	        (yaml--encode-object k next-indent)
+	        (insert ": ")
+	        (yaml--encode-object v next-indent)
+            (insert ",\n")
+            (cl-incf i))
+          m))
+	   (insert indent-string "}")))
+	((eql yaml-encode-dialect :kyaml-compact)
+	 (insert "{")
+     (let ((i 0))
+	   (maphash
+	    (lambda (k v)
+	      (yaml--encode-object k nil)
+	      (insert ": ")
+	      (yaml--encode-object v nil)
+          (insert ", ")
+          (cl-incf i))
+        m))
+	 (insert "}"))
+        (t
+         (let ((first t)
+               (indent-string (make-string indent ?\s)))
+           (maphash
+            (lambda (k v)
+              (if (not first)
+                  (insert "\n" indent-string)
+                (if auto-indent
+                    (let ((curr-indent (yaml--encode-auto-detect-indent)))
+                      (when (> curr-indent indent)
+                        (setq indent (+ curr-indent yaml-encode-indent-width)))
+                      (insert (make-string (- indent curr-indent) ?\s)))
+                  (insert "\n" indent-string))
+                (setq first nil))
+              (yaml--encode-object k indent nil)
+              (insert ": ")
+              (yaml--encode-object v (+ indent yaml-encode-indent-width)))
+            m)))))
+
+(provide 'yaml)
+
+;;; yaml.el ends here
diff --git a/emacs/.emacs.d/elpa/yaml-20260605.834/yaml.elc b/emacs/.emacs.d/elpa/yaml-20260605.834/yaml.elc
new file mode 100644
index 0000000..42915b9
Binary files /dev/null and b/emacs/.emacs.d/elpa/yaml-20260605.834/yaml.elc differ
diff --git a/emacs/.emacs.d/forge-database.sqlite b/emacs/.emacs.d/forge-database.sqlite
new file mode 100644
index 0000000..d868e46
Binary files /dev/null and b/emacs/.emacs.d/forge-database.sqlite differ
diff --git a/emacs/.emacs.d/init.el b/emacs/.emacs.d/init.el
new file mode 100644
index 0000000..ffac4f5
--- /dev/null
+++ b/emacs/.emacs.d/init.el
@@ -0,0 +1,386 @@
+;;; init.el --- Emacs Configuration -*- lexical-binding: t; -*-
+
+;; -------------------------------------------------------------------
+;; Basic UI and Defaults
+;; -------------------------------------------------------------------
+(setq inhibit-startup-message t)
+
+(scroll-bar-mode -1)
+(tool-bar-mode -1)
+(tooltip-mode -1)
+(set-fringe-mode 10)
+(menu-bar-mode -1)
+(menu-bar--display-line-numbers-mode-relative)
+
+(setq scroll-margin 5)
+(setq scroll-conservatively 101)
+
+(setq visible-bell t)
+
+(column-number-mode 1)
+
+;; Enable line numbers exclusively in programming modes (clean Org/terminals)
+(add-hook 'prog-mode-hook #'display-line-numbers-mode)
+
+;; Clipboard settings
+(setq select-enable-clipboard t)
+(setq select-enable-primary t)
+(setq save-interprogram-paste-before-kill t)
+(setq auth-sources '("~/.authinfo"))
+
+(add-to-list 'initial-frame-alist '(fullscreen . maximized))
+
+;; Global Escape binding
+(global-set-key (kbd "<escape>") 'keyboard-escape-quit)
+
+;; -------------------------------------------------------------------
+;; Package Management
+;; -------------------------------------------------------------------
+(require 'package)
+
+(setq package-archives '(("melpa" . "https://melpa.org/packages/")
+                         ("org"   . "https://orgmode.org/elpa/")
+                         ("elpa"  . "https://elpa.gnu.org/packages/")))
+
+(package-initialize)
+(require 'seq)
+
+(unless package-archive-contents
+  (package-refresh-contents))
+
+(unless (package-installed-p 'use-package)
+  (package-install 'use-package))
+
+(require 'use-package)
+(setq use-package-always-ensure t)
+
+;; -------------------------------------------------------------------
+;; Appearance & Theming
+;; -------------------------------------------------------------------
+(use-package doom-themes
+  :init (load-theme 'doom-gruvbox t))
+
+(use-package all-the-icons)
+
+(use-package doom-modeline
+  :init (doom-modeline-mode 1)
+  :custom (doom-modeline-height 15))
+
+(use-package rainbow-delimiters
+  :hook (prog-mode . rainbow-delimiters-mode))
+
+;; Fonts (scaled for 1080p laptop display)
+(defvar runemacs/default-font-size 115)
+(set-face-attribute 'default nil :font "Fira Code" :height runemacs/default-font-size)
+(set-face-attribute 'fixed-pitch nil :font "Fira Code" :height 115)
+(set-face-attribute 'variable-pitch nil :font "Cantarell" :height 125 :weight 'regular)
+
+;; -------------------------------------------------------------------
+;; Completion & Search (Ivy / Counsel / Swiper)
+;; -------------------------------------------------------------------
+(use-package command-log-mode)
+
+(use-package ivy
+  :diminish
+  :bind (("C-s" . swiper)
+         :map ivy-minibuffer-map
+         ("TAB" . ivy-alt-done)
+         ("C-l" . ivy-alt-done)
+         ("C-j" . ivy-next-line)
+         ("C-k" . ivy-previous-line)
+         :map ivy-switch-buffer-map
+         ("C-k" . ivy-previous-line)
+         ("C-l" . ivy-done)
+         :map ivy-reverse-i-search-map
+         ("C-k" . ivy-previous-line)
+         ("C-d" . ivy-reverse-i-search-kill))
+  :config
+  (ivy-mode 1))
+
+(use-package ivy-rich
+  :init (ivy-rich-mode 1))
+
+(use-package counsel
+  :bind (("M-x" . counsel-M-x)
+         ("C-x b" . counsel-ibuffer)
+         ("C-x C-f" . counsel-find-file)
+         :map minibuffer-local-map
+         ("C-r" . counsel-minibuffer-history))
+  :config
+  (setq ivy-initial-inputs-alist nil))
+
+(use-package which-key
+  :init (which-key-mode)
+  :diminish which-key-mode
+  :config (setq which-key-idle-delay 0.3))
+
+(use-package helpful
+  :custom
+  (counsel-describe-function-function #'helpful-callable)
+  (counsel-describe-variable-function #'helpful-variable)
+  :bind
+  ([remap describe-function] . counsel-describe-function)
+  ([remap describe-command]  . helpful-command)
+  ([remap describe-variable] . counsel-describe-variable)
+  ([remap describe-key]      . helpful-key))
+
+;; -------------------------------------------------------------------
+;; Evil Mode (Vim Emulation) & Keybindings
+;; -------------------------------------------------------------------
+(use-package evil
+  :demand t
+  :init
+  (setq evil-want-integration t)
+  (setq evil-want-keybinding nil)
+  (setq evil-want-C-u-scroll t)
+  (setq evil-want-C-i-jump nil)
+  :config
+  (evil-mode 1)
+
+  ;; Configure initial states and modes once Evil is loaded
+  (evil-set-initial-state 'messages-buffer-mode 'normal)
+  (evil-set-initial-state 'dashboard-mode 'normal)
+  (dolist (mode '(custom-mode
+                  eshell-mode
+                  git-rebase-mode
+                  erc-mode
+                  circe-server-mode
+                  circe-chat-mode
+                  circe-query-mode
+                  sauron-mode
+                  term-mode))
+    (add-to-list 'evil-emacs-state-modes mode))
+
+  (define-key evil-insert-state-map (kbd "C-g") 'evil-normal-state)
+  (define-key evil-insert-state-map (kbd "C-h") 'evil-delete-backward-char-and-join)
+
+  ;; Use visual line motions even outside of visual-line-mode buffers
+  (evil-global-set-key 'motion "j" 'evil-next-visual-line)
+  (evil-global-set-key 'motion "k" 'evil-previous-visual-line))
+
+(use-package evil-collection
+  :after evil
+  :demand t
+  :config
+  (evil-collection-init))
+
+(use-package general
+  :config
+  (general-create-definer rune/leader-keys
+    :prefix "C-SPC")
+
+  (global-unset-key (kbd "C-SPC"))
+
+  (rune/leader-keys
+    "t"  '(:ignore t :which-key "toggles")
+    "tt" '(counsel-load-theme :which-key "choose theme")
+    "p"  '(:ignore t :which-key "projectile")
+    "ps" '(rune/counsel-rg-project :which-key "search project with rg")
+    "pf" '(counsel-projectile-find-file :which-key "find file in project")
+    "pp" '(counsel-projectile-switch-project :which-key "switch project")
+    "m"  '(:ignore t :which-key "magit")
+    "mm" '(magit-status :which-key "magit status")
+    "."  '(find-file :which-key "find file"))
+
+  (general-define-key
+   "C-M-j" 'counsel-switch-buffer))
+
+;; -------------------------------------------------------------------
+;; Projectile & Version Control
+;; -------------------------------------------------------------------
+(use-package ripgrep)
+(use-package rg)
+
+(defun rune/counsel-rg-project ()
+  "Search the current project using counsel-rg."
+  (interactive)
+  (counsel-rg nil (projectile-project-root)))
+
+(use-package projectile
+  :diminish projectile-mode
+  :config (projectile-mode)
+  :custom ((projectile-completion-system 'ivy))
+  :bind-keymap
+  ("C-c p" . projectile-command-map)
+  :init
+  (when (file-directory-p "~/Projects")
+    (setq projectile-project-search-path '("~/Projects")))
+  (setq projectile-switch-project-action #'projectile-dired))
+
+(use-package counsel-projectile
+  :init
+  (unless (fboundp 'projectile-ignored-files-rel)
+    (defalias 'projectile-ignored-files-rel
+      (if (fboundp 'projectile-ignored-files-relative)
+          #'projectile-ignored-files-relative
+        #'projectile-ignored-files)))
+  :after (projectile counsel)
+  :config (counsel-projectile-mode 1))
+
+(use-package magit
+  :commands (magit-status magit-get-current-branch)
+  :custom
+  (magit-display-buffer-function #'magit-display-buffer-same-window-except-diff-v1))
+
+;; -------------------------------------------------------------------
+;; Org Mode
+;; -------------------------------------------------------------------
+(defun marc/org-mode-setup ()
+  (org-indent-mode)
+  (variable-pitch-mode 1)
+  (auto-fill-mode 0)
+  (visual-line-mode 1)
+  (setq evil-auto-indent nil)
+  (setq display-line-numbers nil))
+
+(defun marc/org-font-setup ()
+  ;; Replace list item marker with bullet
+  (font-lock-add-keywords 'org-mode
+                          '(("^ *\\([-]\\) "
+                             (0 (prog1 () (compose-region (match-beginning 1) (match-end 1) "•"))))))
+
+  ;; Set heading levels font and size
+  (dolist (face '((org-level-1 . 1.25)
+                  (org-level-2 . 1.15)
+                  (org-level-3 . 1.08)
+                  (org-level-4 . 1.0)
+                  (org-level-5 . 1.0)
+                  (org-level-6 . 1.0)
+                  (org-level-7 . 1.0)
+                  (org-level-8 . 1.0)))
+    (set-face-attribute (car face) nil :font "Cantarell" :weight 'regular :height (cdr face)))
+
+  ;; Ensure code, tables, and metadata keep monospaced fixed-pitch font
+  (dolist (face '(org-block
+                  org-block-begin-line
+                  org-block-end-line
+                  org-code
+                  org-table
+                  org-verbatim
+                  org-special-keyword
+                  org-meta-line
+                  org-checkbox
+                  org-property-value
+                  org-document-info-keyword))
+    (set-face-attribute face nil :inherit 'fixed-pitch :font "Fira Code")))
+
+(use-package org
+  :hook ((org-mode . marc/org-mode-setup)
+         (org-mode . marc/org-font-setup))
+  :config
+  (setq org-ellipsis " ▼"
+        org-hide-emphasis-markers t)
+  (setq org-agenda-files
+        '("/home/mmarcos/Nextcloud/OrgVault/testing_tutorial/Tasks.org"
+          "/home/mmarcos/Nextcloud/OrgVault/lists/Birthdays.org"))
+  (setq org-todo-keywords
+        '((sequence "TODO(t)" "NEXT(n)" "|" "DONE(d!)")
+          (sequence "PLAN(p)" "READY(r)" "BLOCKED(b)" "ACTIVE(a)" "HOLD(h)" "|" "COMPLETED(c)" "KILLED(k)")))
+  (setq org-agenda-start-with-log-mode t)
+  (setq org-log-done 'time)
+  (setq org-log-into-drawer t))
+
+(use-package org-bullets
+  :after org
+  :hook (org-mode . org-bullets-mode)
+  :custom
+  (org-bullets-bullet-list '("◉" "○" "●" "○" "●" "○" "●")))
+
+
+;;; Languages
+
+; Python
+
+(defun marc/lsp-mode-setup ()
+  (setq lsp-headerline-breadcrumb-segments '(path-up-to-project file symbols))
+  (lsp-headerline-breadcrumb-mode))
+
+(use-package lsp-mode
+  :commands (lsp lsp-deferred)
+  :init
+  (setq lsp-keymap-prefix "C-c l")
+  :hook ((python-mode . lsp-deferred)
+         (lsp-mode . lsp-enable-which-key-integration)))
+
+(use-package pyvenv
+  :ensure t
+  :config
+  (pyvenv-mode 1))
+
+(use-package lsp-pyright
+  :ensure t
+  :hook (python-mode . (lambda ()
+                        (require 'lsp-pyright)
+                        (lsp-deferred))))
+
+; Verilog
+
+(use-package verilog-mode
+  :ensure nil  ;; Built-in to Emacs
+  :hook (verilog-mode . lsp-deferred)
+  :custom
+  ;; Auto-indentation and formatting tweaks for Verilog mode
+  (verilog-auto-newline nil)
+  (verilog-auto-indent-on-newline t)
+  (verilog-tab-always-indent t)
+  (verilog-auto-lineup nil)
+  (verilog-align-typdef-words nil))
+
+;; Register verible-verilog-ls with lsp-mode
+(with-eval-after-load 'lsp-mode
+  (lsp-register-client
+   (make-lsp-client :new-connection (lsp-stdio-connection "verible-verilog-ls")
+                    :major-modes '(verilog-mode)
+                    :server-id 'verible-ls)))
+
+; C/C++
+
+(use-package cc-mode
+  :ensure nil  ;; Built-in to Emacs
+  :hook ((c-mode . lsp-deferred)
+         (c++-mode . lsp-deferred))
+  :custom
+  (c-basic-offset 4)
+  (c-default-style "linux"))
+
+(with-eval-after-load 'lsp-mode
+  (setq lsp-clients-clangd-args
+        '("--background-index"
+          "--clang-tidy"
+          "--completion-style=detailed"
+          "--header-insertion=iwyu"
+          "-j=4"))
+  (setq lsp-clients-clangd-executable "clangd"))
+
+; Company mode
+
+(use-package company
+  :after lsp-mode
+  :hook (lsp-mode . company-mode)
+  :bind (:map company-active-map
+         ("<tab>" . company-complete-selection))
+        (:map lsp-mode-map
+         ("<tab>" . company-indent-or-complete-common))
+  :custom
+  (company-minimum-prefix-length 1)
+  (company-idle-delay 0.0))
+
+(use-package company-box
+  :hook (company-mode . (company-box-mode)))
+
+
+;;; init.el ends here
+
+(custom-set-variables
+ ;; custom-set-variables was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ '(package-selected-packages
+   '(company-box company lsp-pyright pyvenv lsp-mode ement visual-fill-mode which-key ripgrep rg rainbow-delimiters org-bullets ivy-rich helpful general forge evil-collection doom-themes doom-modeline counsel-projectile command-log-mode all-the-icons 0x0 0blayout)))
+(custom-set-faces
+ ;; custom-set-faces was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ )
diff --git a/emacs/init.el b/emacs/.emacs.d/init.el~
similarity index 61%
rename from emacs/init.el
rename to emacs/.emacs.d/init.el~
index bf5d00b..3f4eb2b 100644
--- a/emacs/init.el
+++ b/emacs/.emacs.d/init.el~
@@ -10,17 +10,17 @@
 (tooltip-mode -1)
 (set-fringe-mode 10)
 (menu-bar-mode -1)
+(menu-bar--display-line-numbers-mode-relative)
+
+(setq scroll-margin 5)
+(setq scroll-conservatively 101)
 
 (setq visible-bell t)
 
 (column-number-mode 1)
-(global-display-line-numbers-mode t)
 
-;; Disable line numbers in specific modes
-(dolist (mode '(org-mode-hook
-                term-mode-hook
-                eshell-mode-hook))
-  (add-hook mode (lambda () (display-line-numbers-mode 0))))
+;; Enable line numbers exclusively in programming modes (clean Org/terminals)
+(add-hook 'prog-mode-hook #'display-line-numbers-mode)
 
 ;; Clipboard settings
 (setq select-enable-clipboard t)
@@ -28,6 +28,8 @@
 (setq save-interprogram-paste-before-kill t)
 (setq auth-sources '("~/.authinfo"))
 
+(add-to-list 'initial-frame-alist '(fullscreen . maximized))
+
 ;; Global Escape binding
 (global-set-key (kbd "<escape>") 'keyboard-escape-quit)
 
@@ -41,6 +43,7 @@
                          ("elpa"  . "https://elpa.gnu.org/packages/")))
 
 (package-initialize)
+(require 'seq)
 
 (unless package-archive-contents
   (package-refresh-contents))
@@ -124,7 +127,19 @@
 ;; -------------------------------------------------------------------
 ;; Evil Mode (Vim Emulation) & Keybindings
 ;; -------------------------------------------------------------------
-(defun rune/evil-hook ()
+(use-package evil
+  :demand t
+  :init
+  (setq evil-want-integration t)
+  (setq evil-want-keybinding nil)
+  (setq evil-want-C-u-scroll t)
+  (setq evil-want-C-i-jump nil)
+  :config
+  (evil-mode 1)
+
+  ;; Configure initial states and modes once Evil is loaded
+  (evil-set-initial-state 'messages-buffer-mode 'normal)
+  (evil-set-initial-state 'dashboard-mode 'normal)
   (dolist (mode '(custom-mode
                   eshell-mode
                   git-rebase-mode
@@ -134,28 +149,18 @@
                   circe-query-mode
                   sauron-mode
                   term-mode))
-    (add-to-list 'evil-emacs-state-modes mode)))
+    (add-to-list 'evil-emacs-state-modes mode))
 
-(use-package evil
-  :init
-  (setq evil-want-integration t)
-  (setq evil-want-keybinding nil)
-  (setq evil-want-C-u-scroll t)
-  (setq evil-want-C-i-jump nil)
-  :config
-  (evil-mode 1)
   (define-key evil-insert-state-map (kbd "C-g") 'evil-normal-state)
   (define-key evil-insert-state-map (kbd "C-h") 'evil-delete-backward-char-and-join)
 
   ;; Use visual line motions even outside of visual-line-mode buffers
   (evil-global-set-key 'motion "j" 'evil-next-visual-line)
-  (evil-global-set-key 'motion "k" 'evil-previous-visual-line)
-
-  (evil-set-initial-state 'messages-buffer-mode 'normal)
-  (evil-set-initial-state 'dashboard-mode 'normal))
+  (evil-global-set-key 'motion "k" 'evil-previous-visual-line))
 
 (use-package evil-collection
   :after evil
+  :demand t
   :config
   (evil-collection-init))
 
@@ -186,6 +191,11 @@
 (use-package ripgrep)
 (use-package rg)
 
+(defun rune/counsel-rg-project ()
+  "Search the current project using counsel-rg."
+  (interactive)
+  (counsel-rg nil (projectile-project-root)))
+
 (use-package projectile
   :diminish projectile-mode
   :config (projectile-mode)
@@ -207,11 +217,6 @@
   :after (projectile counsel)
   :config (counsel-projectile-mode 1))
 
-(defun rune/counsel-rg-project ()
-  "Search the current project using counsel-rg."
-  (interactive)
-  (counsel-rg nil (projectile-project-root)))
-
 (use-package magit
   :commands (magit-status magit-get-current-branch)
   :custom
@@ -225,37 +230,32 @@
   (variable-pitch-mode 1)
   (auto-fill-mode 0)
   (visual-line-mode 1)
-  (setq evil-auto-indent nil))
+  (setq evil-auto-indent nil)
+  (setq display-line-numbers nil))
 
-(use-package org
-  :hook (org-mode . marc/org-mode-setup)
-  :config
-  (setq org-ellipsis " ▼"
-        org-hide-emphasis-markers t))
+(defun marc/org-font-setup ()
+  ;; Replace list item marker with bullet
+  (font-lock-add-keywords 'org-mode
+                          '(("^ *\\([-]\\) "
+                             (0 (prog1 () (compose-region (match-beginning 1) (match-end 1) "•"))))))
 
-(use-package org-bullets
-  :after org
-  :hook (org-mode . org-bullets-mode)
-  :custom
-  (org-bullets-bullet-list '("◉" "○" "●" "○" "●" "○" "●")))
-
-(dolist (face '((org-level-1 . 1.25)
-                (org-level-2 . 1.15)
-                (org-level-3 . 1.08)
-                (org-level-4 . 1.0)
-                (org-level-5 . 1.0)
-                (org-level-6 . 1.0)
-                (org-level-7 . 1.0)
-                (org-level-8 . 1.0)))
-  (set-face-attribute (car face) nil :font "Cantarell" :weight 'regular :height (cdr face)))
+  ;; Set heading levels font and size
+  (dolist (face '((org-level-1 . 1.25)
+                  (org-level-2 . 1.15)
+                  (org-level-3 . 1.08)
+                  (org-level-4 . 1.0)
+                  (org-level-5 . 1.0)
+                  (org-level-6 . 1.0)
+                  (org-level-7 . 1.0)
+                  (org-level-8 . 1.0)))
+    (set-face-attribute (car face) nil :font "Cantarell" :weight 'regular :height (cdr face)))
 
+  ;; Ensure code, tables, and metadata keep monospaced fixed-pitch font
   (dolist (face '(org-block
                   org-block-begin-line
                   org-block-end-line
                   org-code
                   org-table
-                  org-table-row
-                  org-table-header
                   org-verbatim
                   org-special-keyword
                   org-meta-line
@@ -269,4 +269,118 @@
          (org-mode . marc/org-font-setup))
   :config
   (setq org-ellipsis " ▼"
-        org-hide-emphasis-markers t))
+        org-hide-emphasis-markers t)
+  (setq org-agenda-files
+        '("/home/mmarcos/Nextcloud/OrgVault/testing_tutorial/Tasks.org"
+          "/home/mmarcos/Nextcloud/OrgVault/lists/Birthdays.org"))
+  (setq org-todo-keywords
+        '((sequence "TODO(t)" "NEXT(n)" "|" "DONE(d!)")
+          (sequence "PLAN(p)" "READY(r)" "BLOCKED(b)" "ACTIVE(a)" "HOLD(h)" "|" "COMPLETED(c)" "KILLED(k)")))
+  (setq org-agenda-start-with-log-mode t)
+  (setq org-log-done 'time)
+  (setq org-log-into-drawer t))
+
+(use-package org-bullets
+  :after org
+  :hook (org-mode . org-bullets-mode)
+  :custom
+  (org-bullets-bullet-list '("◉" "○" "●" "○" "●" "○" "●")))
+
+
+;;; Languages
+
+; Python
+
+(defun marc/lsp-mode-setup ()
+  (setq lsp-headerline-breadcrumb-segments '(path-up-to-project file symbols))
+  (lsp-headerline-breadcrumb-mode))
+
+(use-package lsp-mode
+  :commands (lsp lsp-deferred)
+  :init
+  (setq lsp-keymap-prefix "C-c l")
+  :hook ((python-mode . lsp-deferred)
+         (lsp-mode . lsp-enable-which-key-integration)))
+
+(use-package pyvenv
+  :ensure t
+  :config
+  (pyvenv-mode 1))
+
+(use-package lsp-pyright
+  :ensure t
+  :hook (python-mode . (lambda ()
+                        (require 'lsp-pyright)
+                        (lsp-deferred))))
+
+; Verilog
+
+(use-package verilog-mode
+  :ensure nil  ;; Built-in to Emacs
+  :hook (verilog-mode . lsp-deferred)
+  :custom
+  ;; Auto-indentation and formatting tweaks for Verilog mode
+  (verilog-auto-newline nil)
+  (verilog-auto-indent-on-newline t)
+  (verilog-tab-always-indent t)
+  (verilog-auto-lineup nil)
+  (verilog-align-typdef-words nil))
+
+;; Register verible-verilog-ls with lsp-mode
+(with-eval-after-load 'lsp-mode
+  (lsp-register-client
+   (make-lsp-client :new-connection (lsp-stdio-connection "verible-verilog-ls")
+                    :major-modes '(verilog-mode)
+                    :server-id 'verible-ls)))
+
+; C/C++
+
+(use-package cc-mode
+  :ensure nil  ;; Built-in to Emacs
+  :hook ((c-mode . lsp-deferred)
+         (c++-mode . lsp-deferred))
+  :custom
+  (c-basic-offset 4)
+  (c-default-style "linux"))
+
+(with-eval-after-load 'lsp-mode
+  (setq lsp-clients-clangd-args
+        '("--background-index"
+          "--clang-tidy"
+          "--completion-style=detailed"
+          "--header-insertion=iwyu"
+          "-j=4"))
+  (setq lsp-clients-clangd-executable "clangd"))
+
+; Company mode
+
+(use-package company
+  :after lsp-mode
+  :hook (lsp-mode . company-mode)
+  :bind (:map company-active-map
+         ("<tab>" . company-complete-selection))
+        (:map lsp-mode-map
+         ("<tab>" . company-indent-or-complete-common))
+  :custom
+  (company-minimum-prefix-length 1)
+  (company-idle-delay 0.0))
+
+(use-package company-box
+  :hook (company-mode . (company-box-mode)))
+
+
+;;; init.el ends here
+
+(custom-set-variables
+ ;; custom-set-variables was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ '(package-selected-packages
+   '(company lsp-pyright pyvenv lsp-mode ement visual-fill-mode which-key ripgrep rg rainbow-delimiters org-bullets ivy-rich helpful general forge evil-collection doom-themes doom-modeline counsel-projectile command-log-mode all-the-icons 0x0 0blayout)))
+(custom-set-faces
+ ;; custom-set-faces was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ )
diff --git a/emacs/.emacs.d/projectile-bookmarks.eld b/emacs/.emacs.d/projectile-bookmarks.eld
new file mode 100644
index 0000000..0cc7b10
--- /dev/null
+++ b/emacs/.emacs.d/projectile-bookmarks.eld
@@ -0,0 +1 @@
+("~/Projects/learning_emacs/" "~/Projects/aoc_rv64/" "~/Projects/XiangShan/" "~/Projects/NEMU/" "~/Projects/zvkned_generator/")
\ No newline at end of file
diff --git a/emacs/.emacs.d/projectile-frecency.eld b/emacs/.emacs.d/projectile-frecency.eld
new file mode 100644
index 0000000..161e92b
--- /dev/null
+++ b/emacs/.emacs.d/projectile-frecency.eld
@@ -0,0 +1 @@
+(("/home/mmarcos/Projects/NEMU/" ("a-vcompute_impl.d" 1 1787633286)) ("/home/mmarcos/Projects/learning_emacs/" ("systems_crafters/init.el~" 1 1787635418) ("docs/useful-keybinds.org" 3 1787642640) ("systems_crafters/init.el" 5 1787745763) (".git/COMMIT_EDITMSG" 1 1787638328) ("test/serious.org" 1 1787642761) ("docs/org-mode-basics.org" 2 1787745940)) ("/home/mmarcos/Projects/XiangShan/" ("CONTRIBUTING.zh-cn.md" 1 1787637779) ("README.md" 1 1787637796)) ("/home/mmarcos/Projects/aoc_rv64/" ("screen.S" 1 1787645952)))
\ No newline at end of file
diff --git a/emacs/.emacs.d/transient/history.el b/emacs/.emacs.d/transient/history.el
new file mode 100644
index 0000000..1f57eda
--- /dev/null
+++ b/emacs/.emacs.d/transient/history.el
@@ -0,0 +1,4 @@
+((forge-add-repository nil)
+ (magit-commit
+  ("--verbose"))
+ (magit-dispatch nil))
diff --git a/zsh/.zshrc b/zsh/.zshrc
index d361bc5..4808a6b 100644
--- a/zsh/.zshrc
+++ b/zsh/.zshrc
@@ -149,3 +149,6 @@ alias ssh="TERM=xterm-256color ssh"
 
 alias opencode="opencode"
 alias opencode-team="OPENCODE_CONFIG_DIR=~/.config/opencode-team opencode"
+
+export VISUAL="emacsclient -c -a ''"
+export EDITOR="emacsclient -t -a ''"